commit eda20ac13126b61f32caa3fd590761188c98e353
Author: JacksonYang2022 <yangjy2022@zju.edu.cn>
Date:   Mon Oct 14 09:32:17 2024 +0800

    Initial commit

diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..244eb82
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,7 @@
+/.vs
+/API/bin/
+/CFD/bin/
+/Mesh/bin/
+/PHengLEI/build/
+/PHengLEI/3rdparty/
+
diff --git a/API/CMakeLists.txt b/API/CMakeLists.txt
new file mode 100644
index 0000000..cd312e1
--- /dev/null
+++ b/API/CMakeLists.txt
@@ -0,0 +1,741 @@
+#+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+#          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+#          P   P  H   H  E      NN   N  G      L      E       I          +
+#          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+#          P      H   H  E      N  N N  G   G  L      E       I          +
+#          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+#------------------------------------------------------------------------+
+#          Platform for Hybrid Engineering Simulation of Flows           +
+#           China Aerodynamics Research and Development Center           +
+#                     (C) Copyright, Since 2010                          +
+#+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+#! @file      CMakeLists.txt
+#! @brief     It defines the project.
+#! @author    Bell, Xu Qingxin, He Kun, He Xin.
+cmake_minimum_required(VERSION 2.6)
+
+#set cmake environment:
+set(CMAKE_USE_RELATIVE_PATHS ON)
+
+#output message:
+message(STATUS "Welcome to Build Project ${CMAKE_PROJECT_NAME}.")
+message(STATUS "The OS is ${CMAKE_SYSTEM_NAME}, version ${CMAKE_SYSTEM_VERSION}.")
+message(STATUS "The working directory is ${CMAKE_BINARY_DIR}/${EXEC_WORKING_DIR}/${DLL_WORKING_DIR}.")
+message(STATUS "--- Start to call ${CMAKE_CURRENT_LIST_FILE} ---") 
+message(STATUS "This current binary directory is ${CMAKE_CURRENT_BINARY_DIR}.")
+message(STATUS "This current source directory is ${CMAKE_CURRENT_SOURCE_DIR}.")
+
+# Define some pre-definition.
+include(${PROJECT_SOURCE_DIR}/../PHengLEI/PHMacro.cmake)
+if(USE_OCC)
+  message(STATUS "USE_OCC is turned on!")
+  add_definitions(-DUSE_OCC)
+endif()
+if(USE_DOUBLE_PRECISION)
+  message(STATUS "USE_DOUBLE_PRECISION is turned on!")
+  add_definitions(-DPH_DOUBLE_PREC)
+endif()
+if(USE_SMARTARRAY)
+  message(STATUS "USE_SMARTARRAY is turned on!")
+  add_definitions(-DUSE_SMARTARRAY)
+endif()
+
+#1. output message:
+message(STATUS "") 
+message(STATUS "--- Enter subdirectory <API>, Start to call ${CMAKE_CURRENT_LIST_FILE} ---") 
+message(STATUS "This current binary directory is ${CMAKE_CURRENT_BINARY_DIR}.")
+message(STATUS "This current source directory is ${CMAKE_CURRENT_SOURCE_DIR}.")
+
+set(API_TARGET_NAME "PHAPI")
+set(LIBRARY_OUTPUT_PATH)
+if(WIN32)
+if(CMAKE_CL_64)
+ set(LIBRARY_OUTPUT_PATH ${PROJECT_SOURCE_DIR}/../API/bin/${CMAKE_SYSTEM_NAME}-x64/${CMAKE_BUILD_TYPE})
+ set(CMAKE_EXE_LINKER_FLAGS "/machine:x64")
+ message(STATUS "USE_Windows_X64 is turned on!")
+ add_definitions(-DUSE_WINDOWS_X64)
+else(CMAKE_CL_64)
+  message(STATUS "Windows_X86 is turned on!")
+  set(LIBRARY_OUTPUT_PATH ${PROJECT_SOURCE_DIR}/../API/bin/${CMAKE_SYSTEM_NAME}-x86/${CMAKE_BUILD_TYPE})
+endif(CMAKE_CL_64)
+else(WIN32)
+  set(LIBRARY_OUTPUT_PATH ${PROJECT_SOURCE_DIR}/../API/bin/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR})
+endif(WIN32)
+
+message(STATUS "API library path is: ${LIBRARY_OUTPUT_PATH}.")
+
+#set options
+if(NOT BUILD_LIBRARY_TYPE)
+  set (BUILD_LIBRARY_TYPE "Static" CACHE STRING "The type of PHengLEI libraries" FORCE)
+  SET_PROPERTY(CACHE BUILD_LIBRARY_TYPE PROPERTY STRINGS Shared Static)
+endif()
+
+#3. set environment for MPICH and 3rdParty lib directory:
+if(WIN32)
+  include_directories("${MSMPI_HOME_DIRECTORY}/Include")
+  link_directories("${MSMPI_HOME_DIRECTORY}/lib")
+  if(CMAKE_CL_64)
+    link_directories("${MSMPI_HOME_DIRECTORY}/Lib/x64")
+    set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/${THIRD_PARTY_COMPILER_FLAG}/win-x64")
+  else(CMAKE_CL_64) 
+    link_directories("${MSMPI_HOME_DIRECTORY}/Lib/x86")
+    set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/${THIRD_PARTY_COMPILER_FLAG}/win-x86")
+  endif(CMAKE_CL_64)
+else(WIN32)
+  set(CMAKE_CXX_COMPILER  mpicxx)
+  set(CMAKE_C_COMPILER    mpicc)
+  if(${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR} MATCHES "Linux-x86_64")
+    if(USE_INTEL_COMPILER)
+      set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/liblinux/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR}/intel")
+      message(STATUS "USE_INTEL_COMPILER is turned on!")
+    else(USE_INTEL_COMPILER)
+      set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/liblinux/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR}/gcc")
+      message(STATUS "USE_INTEL_COMPILER is turned off!")
+    endif()
+  else(${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR} MATCHES "Linux-aarch64")
+    set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/liblinux/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR}")
+  endif()
+endif(WIN32)
+
+set(MESH_H_PATH   ${PROJECT_SOURCE_DIR}/../Mesh/include)
+include_directories(${MESH_H_PATH})
+
+# specify directory in which the linker will look for libraries for myself libraries:
+message(STATUS "The 3rdparty path is: ${THIRDPARTY_LIB_DIR}.") 
+link_directories("${THIRDPARTY_LIB_DIR}")
+
+set(HDF5_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/HDF5/include)
+include_directories("${HDF5_H_PATH}")
+
+if(USE_TecplotLib)
+set(TECIO_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/TECIO/include)
+include_directories("${TECIO_H_PATH}")
+endif(USE_TecplotLib)
+
+set(PARMETIS_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/parmetis/include)
+include_directories("${PARMETIS_H_PATH}")
+
+set(MEITIS_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/metis/include)
+include_directories("${MEITIS_H_PATH}")
+
+set(CGNS_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/cgns/include)
+include_directories("${CGNS_H_PATH}")
+
+set(MGRID_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/mgrid/include)
+include_directories("${MGRID_H_PATH}")
+
+add_definitions(-DPH_PARALLEL -DPH_CGNS)
+#set(API_H_DIR ${PROJECT_SOURCE_DIR}/3rdparty)
+
+# set directory of DataStruct
+set(DataStruct_H_PATH DataStruct/include)
+set(DataStruct_H_LIST
+${DataStruct_H_PATH}/DataStruct_Array.h
+${DataStruct_H_PATH}/DataStruct_AdtNode.h
+${DataStruct_H_PATH}/DataStruct_AdtTree.h
+${DataStruct_H_PATH}/DataStruct_KDNode.h
+${DataStruct_H_PATH}/DataStruct_KDTree.h
+${DataStruct_H_PATH}/DataStruct_BinaryTree.h
+${DataStruct_H_PATH}/DataStruct_Sort.h
+${DataStruct_H_PATH}/DataStruct_Range.h
+${DataStruct_H_PATH}/PHET.h
+${DataStruct_H_PATH}/PHETBase.h
+${DataStruct_H_PATH}/PHExpr.h
+${DataStruct_H_PATH}/PHExprWrap.h
+${DataStruct_H_PATH}/PHFastArrayIterator.h
+${DataStruct_H_PATH}/PHMemblock.h
+${DataStruct_H_PATH}/PHOps.h
+${DataStruct_H_PATH}/PHProduct.h
+${DataStruct_H_PATH}/PHSimpleArray.h
+${DataStruct_H_PATH}/PHStorage.h
+${DataStruct_H_PATH}/PHSlice.h
+${DataStruct_H_PATH}/Pointer.h
+${DataStruct_H_PATH}/PHVector3.h
+${DataStruct_H_PATH}/PHMatrix.h
+${DataStruct_H_PATH}/TypeDefine.h
+${DataStruct_H_PATH}/HyList.h
+${DataStruct_H_PATH}/DataContainer.h
+${DataStruct_H_PATH}/PHHeapSort.h
+)
+source_group(DataStruct\\include FILES ${DataStruct_H_LIST}) 
+include_directories(${DataStruct_H_PATH})
+
+set(DataStruct_CPP_PATH DataStruct/src)
+set(DataStruct_CPP_LIST
+${DataStruct_CPP_PATH}/PHStorage.cpp
+${DataStruct_CPP_PATH}/DataStruct_BinaryTree.cpp
+${DataStruct_CPP_PATH}/DataStruct_KDTree.cpp
+${DataStruct_CPP_PATH}/DataContainer.cpp
+)
+source_group(DataStruct\\src FILES ${DataStruct_CPP_LIST})
+
+# set directory of Data:
+set(Data_H_PATH Data/include)
+set(Data_H_LIST
+${Data_H_PATH}/Data_SafeData.h
+${Data_H_PATH}/Data_Util.h
+${Data_H_PATH}/Data_IndexData.h
+${Data_H_PATH}/Data_Param.h
+${Data_H_PATH}/Data_Field.h
+${Data_H_PATH}/Data_ParamFieldSuite.h
+${Data_H_PATH}/GlobalDataBase.h
+)
+source_group(Data\\include FILES ${Data_H_LIST}) 
+include_directories(${Data_H_PATH})
+
+set(Data_CPP_PATH Data/src)
+set(Data_CPP_LIST
+${Data_CPP_PATH}/Data_SafeData.cpp
+${Data_CPP_PATH}/Data_Util.cpp
+${Data_CPP_PATH}/Data_IndexData.cpp
+${Data_CPP_PATH}/Data_Param.cpp
+${Data_CPP_PATH}/Data_Field.cpp
+${Data_CPP_PATH}/Data_ParamFieldSuite.cpp
+${Data_CPP_PATH}/GlobalDataBase.cpp
+)
+source_group(Data\\src FILES ${Data_CPP_LIST})
+
+# set directory of Math:
+set(Math_H_PATH Math/include)
+set(Math_H_LIST
+${Math_H_PATH}/Math_BasisFunction.h
+${Math_H_PATH}/Math_Limiter.h
+)
+source_group(Math\\include FILES ${Math_H_LIST}) 
+include_directories(${Math_H_PATH})
+
+set(Math_CPP_PATH Math/src)
+set(Math_CPP_LIST
+${Math_CPP_PATH}/Math_BasisFunction.cpp
+)
+source_group(Math\\src FILES ${Math_CPP_LIST})
+
+
+# set directory of MPI:
+set(MPI_H_PATH FYMPI/include)
+set(MPI_H_LIST
+${MPI_H_PATH}/PHMpi.h
+${MPI_H_PATH}/Parallel.h
+${MPI_H_PATH}/ActionKey.h
+)
+source_group(MPI\\include FILES ${MPI_H_LIST}) 
+include_directories(${MPI_H_PATH})
+
+set(MPI_CPP_PATH FYMPI/src)
+set(MPI_CPP_LIST
+${MPI_CPP_PATH}/PHMpi.cpp
+${MPI_CPP_PATH}/Parallel.cpp
+${MPI_CPP_PATH}/ActionKey.cpp
+)
+source_group(MPI\\src FILES ${MPI_CPP_LIST})
+
+# set directory of Toolkit:
+set(Toolkit_H_PATH Toolkit/include)
+set(Toolkit_H_LIST
+${Toolkit_H_PATH}/TK_Log.h
+${Toolkit_H_PATH}/TK_Exit.h
+${Toolkit_H_PATH}/TK_Parse.h
+${Toolkit_H_PATH}/TK_Time.h
+${Toolkit_H_PATH}/TK_Warning.h
+)
+source_group(Toolkit\\include FILES ${Toolkit_H_LIST}) 
+include_directories(${Toolkit_H_PATH})
+
+set(Toolkit_CPP_PATH Toolkit/src)
+set(Toolkit_CPP_LIST
+${Toolkit_CPP_PATH}/TK_Log.cpp
+${Toolkit_CPP_PATH}/TK_Exit.cpp
+${Toolkit_CPP_PATH}/TK_Parse.cpp
+${Toolkit_CPP_PATH}/TK_Time.cpp
+${Toolkit_CPP_PATH}/TK_Warning.cpp
+)
+source_group(Toolkit\\src FILES ${Toolkit_CPP_LIST})
+
+# set directory of IO:
+set(IO_H_PATH IO/include)
+set(IO_H_LIST
+${IO_H_PATH}/PHIO.h
+${IO_H_PATH}/IO_VirtualFile.h
+${IO_H_PATH}/IO_FileReader.h
+${IO_H_PATH}/IO_HDF5File.h
+${IO_H_PATH}/IO_FileName.h
+)
+source_group(IO\\include FILES ${IO_H_LIST}) 
+include_directories(${IO_H_PATH})
+
+set(IO_CPP_PATH IO/src)
+set(IO_CPP_LIST
+${IO_CPP_PATH}/PHIO.cpp
+${IO_CPP_PATH}/IO_VirtualFile.cpp
+${IO_CPP_PATH}/IO_FileReader.cpp
+${IO_CPP_PATH}/IO_HDF5File.cpp
+${IO_CPP_PATH}/IO_FileName.cpp
+)
+source_group(IO\\src FILES ${IO_CPP_LIST})
+
+# set directory of Geometry.
+set(Geometry_H_PATH Geometry/include)
+set(Geometry_H_LIST
+${Geometry_H_PATH}/Geo_Grid.h
+${Geometry_H_PATH}/Geo_GridManager.h
+${Geometry_H_PATH}/GridType.h
+${Geometry_H_PATH}/Geo_Interface.h
+${Geometry_H_PATH}/Geo_Interpoint.h
+${Geometry_H_PATH}/Geo_SimpleGrid.h
+${Geometry_H_PATH}/Geo_StructGrid.h
+${Geometry_H_PATH}/Geo_UnstructGrid.h
+${Geometry_H_PATH}/MultigridFactory.h
+${Geometry_H_PATH}/Geo_CellMetrics_Struct.h
+${Geometry_H_PATH}/Geo_CellMetrics_Unstruct.h
+${Geometry_H_PATH}/Geo_CellTopo_Unstruct.h
+${Geometry_H_PATH}/Geo_DynamicGridMetrics_Struct.h
+${Geometry_H_PATH}/Geo_DynamicGridMetrics_Unstruct.h
+${Geometry_H_PATH}/Geo_FaceMetrics_Struct.h
+${Geometry_H_PATH}/Geo_FaceMetrics_Unstruct.h
+${Geometry_H_PATH}/Geo_FaceTopo_Unstruct.h
+${Geometry_H_PATH}/Geo_LineTopo_Unstruct.h
+${Geometry_H_PATH}/Geo_GridIndex.h
+${Geometry_H_PATH}/Geo_LSQWeight_Unstruct.h
+${Geometry_H_PATH}/Geo_MultiGridInfo_Struct.h
+${Geometry_H_PATH}/Geo_NodeTopo_Struct.h
+${Geometry_H_PATH}/Geo_NodeTopo_Unstruct.h
+${Geometry_H_PATH}/Geo_OversetGridTopo_Struct.h
+${Geometry_H_PATH}/Geo_SimpleBC.h
+${Geometry_H_PATH}/Geo_StructBC.h
+${Geometry_H_PATH}/Geo_UnstructBC.h
+${Geometry_H_PATH}/Geo_OversetGrid.h
+${Geometry_H_PATH}/OversetGridFactory.h
+${Geometry_H_PATH}/OversetInformation.h
+${Geometry_H_PATH}/MeshAgglomeration.h
+${Geometry_H_PATH}/Geometry.h
+${Geometry_H_PATH}/LinkStruct.h
+${Geometry_H_PATH}/Geo_Point.h
+${Geometry_H_PATH}/Geo_Face.h
+${Geometry_H_PATH}/GRHash.h
+${Geometry_H_PATH}/OverLappingGrid.h
+${Geometry_H_PATH}/GeometryUnit.h
+${Geometry_H_PATH}/Geo_PointFactory.h
+${Geometry_H_PATH}/Geo_Element.h
+${Geometry_H_PATH}/Geo_Sample.h
+${Geometry_H_PATH}/GeomProxy.h
+${Geometry_H_PATH}/FieldProxy.h
+${Geometry_H_PATH}/GeneralFieldProxy.h
+${Geometry_H_PATH}/FaceProxy.h
+${Geometry_H_PATH}/Geo_SimpleVC.h
+)
+source_group(Geometry\\include FILES ${Geometry_H_LIST})
+include_directories(${Geometry_H_PATH})
+
+set(Geometry_CPP_PATH Geometry/src)
+set(Geometry_CPP_LIST
+${Geometry_CPP_PATH}/Geo_Grid.cpp
+${Geometry_CPP_PATH}/Geo_GridManager.cpp
+${Geometry_CPP_PATH}/GridType.cpp
+${Geometry_CPP_PATH}/Geo_SimpleGrid.cpp
+${Geometry_CPP_PATH}/Geo_StructGrid.cpp
+${Geometry_CPP_PATH}/Geo_UnstructGrid.cpp
+${Geometry_CPP_PATH}/StructGridFD.cpp
+${Geometry_CPP_PATH}/Geo_CellMetrics_Struct.cpp
+${Geometry_CPP_PATH}/Geo_CellMetrics_Unstruct.cpp
+${Geometry_CPP_PATH}/Geo_CellTopo_Unstruct.cpp
+${Geometry_CPP_PATH}/Geo_DynamicGridMetrics_Struct.cpp
+${Geometry_CPP_PATH}/Geo_DynamicGridMetrics_Unstruct.cpp
+${Geometry_CPP_PATH}/Geo_FaceMetrics_Struct.cpp
+${Geometry_CPP_PATH}/Geo_FaceMetrics_Unstruct.cpp
+${Geometry_CPP_PATH}/Geo_FaceTopo_Unstruct.cpp
+${Geometry_CPP_PATH}/Geo_LineTopo_Unstruct.cpp
+${Geometry_CPP_PATH}/Geo_GridIndex.cpp
+${Geometry_CPP_PATH}/Geo_LSQWeight_Unstruct.cpp
+${Geometry_CPP_PATH}/Geo_MultiGridInfo_Struct.cpp
+${Geometry_CPP_PATH}/Geo_NodeTopo_Struct.cpp
+${Geometry_CPP_PATH}/Geo_NodeTopo_Unstruct.cpp
+${Geometry_CPP_PATH}/Geo_OversetGridTopo_Struct.cpp
+${Geometry_CPP_PATH}/Geo_SimpleBC.cpp
+${Geometry_CPP_PATH}/Geo_StructBC.cpp
+${Geometry_CPP_PATH}/Geo_UnstructBC.cpp
+${Geometry_CPP_PATH}/Geo_OversetGrid.cpp
+${Geometry_CPP_PATH}/OversetGridFactory.cpp
+${Geometry_CPP_PATH}/OversetInformation.cpp
+${Geometry_CPP_PATH}/MeshAgglomeration.cpp
+${Geometry_CPP_PATH}/Geometry.cpp
+${Geometry_CPP_PATH}/Geo_Interface.cpp
+${Geometry_CPP_PATH}/Geo_Interpoint.cpp
+${Geometry_CPP_PATH}/MultigridFactory.cpp
+${Geometry_CPP_PATH}/GRHash.cpp
+${Geometry_CPP_PATH}/OverLappingGrid.cpp
+${Geometry_CPP_PATH}/GeometryUnit.cpp
+${Geometry_CPP_PATH}/Geo_PointFactory.cpp
+${Geometry_CPP_PATH}/Geo_Element.cpp
+${Geometry_CPP_PATH}/Geo_Sample.cpp
+${Geometry_CPP_PATH}/GeomProxy.cpp
+${Geometry_CPP_PATH}/FieldProxy.cpp
+${Geometry_CPP_PATH}/GeneralFieldProxy.cpp
+${Geometry_CPP_PATH}/FaceProxy.cpp
+${Geometry_CPP_PATH}/Geo_SimpleVC.cpp
+)
+source_group(Geometry\\src FILES ${Geometry_CPP_LIST})
+
+# set directory of Physics.
+set(Physics_H_PATH Physics/include)
+set(Physics_H_LIST
+${Physics_H_PATH}/AleModel.h
+${Physics_H_PATH}/AleManager.h
+${Physics_H_PATH}/AleForceManager.h
+${Physics_H_PATH}/MovingMesh.h
+${Physics_H_PATH}/DeformingSolverManager.h
+${Physics_H_PATH}/SixDofManager.h
+${Physics_H_PATH}/PHSuperMatrix.h
+${Physics_H_PATH}/SixDOF.h
+${Physics_H_PATH}/Force.h
+${Physics_H_PATH}/Zone.h
+${Physics_H_PATH}/Residual.h
+${Physics_H_PATH}/GradientOperation.h
+${Physics_H_PATH}/AerodynamicsBasicRelations.h
+${Physics_H_PATH}/Limiter.h
+${Physics_H_PATH}/Task.h
+${Physics_H_PATH}/Task_Simple.h
+${Physics_H_PATH}/Task_ServerUpdateInterface.h
+${Physics_H_PATH}/Task_ServerUpdateInterpoint.h
+${Physics_H_PATH}/Task_WriteBinaryTecplot.h
+${Physics_H_PATH}/Region.h
+${Physics_H_PATH}/IO_GridReader.h
+${Physics_H_PATH}/GridGroup.h
+${Physics_H_PATH}/PerfectGas.h
+${Physics_H_PATH}/Gas.h
+${Physics_H_PATH}/Solver.h
+${Physics_H_PATH}/Flux_Inviscid.h
+${Physics_H_PATH}/Flux_RoeEntropyCorrection.h
+${Physics_H_PATH}/Jacobian.h
+${Physics_H_PATH}/Gradient.h
+${Physics_H_PATH}/MatrixLUSGS.h
+)
+
+if(BUILD_IncomSolver)
+list(APPEND Physics_H_LIST ${Physics_H_PATH}/IncomGas.h)
+endif(BUILD_IncomSolver)
+
+source_group(Physics\\include FILES ${Physics_H_LIST}) 
+include_directories(${Physics_H_PATH})
+
+set(Physics_CPP_PATH Physics/src)
+set(Physics_CPP_LIST
+${Physics_CPP_PATH}/Zone.cpp
+${Physics_CPP_PATH}/Force.cpp
+${Physics_CPP_PATH}/AleForceManager.cpp
+${Physics_CPP_PATH}/AleModel.cpp
+${Physics_CPP_PATH}/AleManager.cpp
+${Physics_CPP_PATH}/MovingMesh.cpp
+${Physics_CPP_PATH}/DeformingSolverManager.cpp
+${Physics_CPP_PATH}/SixDofManager.cpp
+${Physics_CPP_PATH}/SixDOF.cpp
+${Physics_CPP_PATH}/Residual.cpp
+${Physics_CPP_PATH}/GradientOperation.cpp
+${Physics_CPP_PATH}/AerodynamicsBasicRelations.cpp
+${Physics_CPP_PATH}/Limiter.cpp
+${Physics_CPP_PATH}/Task.cpp
+${Physics_CPP_PATH}/Task_Simple.cpp
+${Physics_CPP_PATH}/Task_ServerUpdateInterface.cpp
+${Physics_CPP_PATH}/Task_ServerUpdateInterpoint.cpp
+${Physics_CPP_PATH}/Task_WriteBinaryTecplot.cpp
+${Physics_CPP_PATH}/Region.cpp
+${Physics_CPP_PATH}/IO_GridReader.cpp
+${Physics_CPP_PATH}/GridGroup.cpp
+${Physics_CPP_PATH}/PerfectGas.cpp
+${Physics_CPP_PATH}/Solver.cpp
+${Physics_CPP_PATH}/Flux_Inviscid.cpp
+${Physics_CPP_PATH}/Flux_RoeEntropyCorrection.cpp
+${Physics_CPP_PATH}/Jacobian.cpp
+${Physics_CPP_PATH}/Gradient.cpp
+${Physics_CPP_PATH}/Gas.cpp
+${Physics_CPP_PATH}/MatrixLUSGS.cpp
+)
+
+if(BUILD_IncomSolver)
+list(APPEND Physics_CPP_LIST ${Physics_CPP_PATH}/IncomGas.cpp)
+endif(BUILD_IncomSolver)
+
+source_group(Physics\\src FILES ${Physics_CPP_LIST})
+
+# set directory of PreProcess:
+set(PreProcess_H_PATH PreProcess/include)
+set(PreProcess_H_LIST
+${PreProcess_H_PATH}/Pre_Block_Struct.h
+${PreProcess_H_PATH}/Pre_UnstructGridPartition.h
+${PreProcess_H_PATH}/Pre_WalldistCompute.h
+${PreProcess_H_PATH}/Pre_GridConversion.h
+${PreProcess_H_PATH}/Pre_FieldViewToPHengLEI_Unstruct.h
+${PreProcess_H_PATH}/Pre_CGNSToPHengLEI_Unstruct.h
+${PreProcess_H_PATH}/Pre_CGNSConversion_Struct.h
+${PreProcess_H_PATH}/Pre_CGNSToPlot3D_Struct.h
+${PreProcess_H_PATH}/Pre_CGNSToPHengLEI_Struct.h
+${PreProcess_H_PATH}/Pre_Plot3DToPHengLEI_Struct.h
+${PreProcess_H_PATH}/Pre_FluentToPHengLEI_Unstruct.h
+${PreProcess_H_PATH}/Pre_HDF5File.h
+${PreProcess_H_PATH}/Pre_GridMirror.h
+${PreProcess_H_PATH}/Pre_StructGridPartition.h
+${PreProcess_H_PATH}/Pre_StructToUnstruct.h
+${PreProcess_H_PATH}/Pre_GridTranslator.h
+${PreProcess_H_PATH}/Pre_GridCombine.h
+${PreProcess_H_PATH}/Pre_GridBase.h
+${PreProcess_H_PATH}/MixGrid.h
+${PreProcess_H_PATH}/Pre_Reorder.h
+)
+source_group(PreProcess\\include FILES ${PreProcess_H_LIST}) 
+include_directories(${PreProcess_H_PATH})
+
+set(PreProcess_CPP_PATH PreProcess/src)
+set(PreProcess_CPP_LIST
+${PreProcess_CPP_PATH}/Pre_Block_Struct.cpp
+${PreProcess_CPP_PATH}/Pre_UnstructGridPartition.cpp
+${PreProcess_CPP_PATH}/Pre_WalldistCompute.cpp
+${PreProcess_CPP_PATH}/Pre_GridConversion.cpp
+${PreProcess_CPP_PATH}/Pre_FieldViewToPHengLEI_Unstruct.cpp
+${PreProcess_CPP_PATH}/Pre_CGNSToPHengLEI_Unstruct.cpp
+${PreProcess_CPP_PATH}/Pre_CGNSConversion_Struct.cpp
+${PreProcess_CPP_PATH}/Pre_CGNSToPlot3D_Struct.cpp
+${PreProcess_CPP_PATH}/Pre_CGNSToPHengLEI_Struct.cpp
+${PreProcess_CPP_PATH}/Pre_Plot3DToPHengLEI_Struct.cpp
+${PreProcess_CPP_PATH}/Pre_FluentToPHengLEI_Unstruct.cpp
+${PreProcess_CPP_PATH}/Pre_HDF5File.cpp
+${PreProcess_CPP_PATH}/Pre_GridMirror.cpp
+${PreProcess_CPP_PATH}/Pre_StructGridPartition.cpp
+${PreProcess_CPP_PATH}/Pre_StructToUnstruct.cpp
+${PreProcess_CPP_PATH}/Pre_GridTranslator.cpp
+${PreProcess_CPP_PATH}/Pre_GridCombine.cpp
+${PreProcess_CPP_PATH}/Pre_GridBase.cpp
+${PreProcess_CPP_PATH}/MixGrid.cpp
+${PreProcess_CPP_PATH}/Pre_Reorder.cpp
+)
+source_group(PreProcess\\src FILES ${PreProcess_CPP_LIST})
+
+# set directory of PostProcess:
+set(PostProcess_H_PATH PostProcess/include)
+set(PostProcess_H_LIST
+${PostProcess_H_PATH}/Post_Visual.h
+${PostProcess_H_PATH}/Post_WriteVisualFile.h
+${PostProcess_H_PATH}/Post_WriteTecplot.h
+${PostProcess_H_PATH}/Post_WriteEnsight.h
+${PostProcess_H_PATH}/Post_ForceMoment.h
+${PostProcess_H_PATH}/PostProcess.h
+${PostProcess_H_PATH}/IO_FlowReader.h
+${PostProcess_H_PATH}/ForceProcessStruct.h
+${PostProcess_H_PATH}/ForceProcessUnstruct.h
+${PostProcess_H_PATH}/PostProcessData.h
+${PostProcess_H_PATH}/Post_Probes.h
+${PostProcess_H_PATH}/Post_ProbesWrite.h
+)
+source_group(PostProcess\\include FILES ${PostProcess_H_LIST}) 
+include_directories(${PostProcess_H_PATH})
+
+set(PostProcess_CPP_PATH PostProcess/src)
+set(PostProcess_CPP_LIST
+${PostProcess_CPP_PATH}/Post_Visual.cpp
+${PostProcess_CPP_PATH}/Post_WriteVisualFile.cpp
+${PostProcess_CPP_PATH}/Post_WriteTecplot.cpp
+${PostProcess_CPP_PATH}/Post_WriteEnsight.cpp
+${PostProcess_CPP_PATH}/Post_ForceMoment.cpp
+${PostProcess_CPP_PATH}/PostProcess.cpp
+${PostProcess_CPP_PATH}/IO_FlowReader.cpp
+${PostProcess_CPP_PATH}/ForceProcessStruct.cpp
+${PostProcess_CPP_PATH}/ForceProcessUnstruct.cpp
+${PostProcess_CPP_PATH}/PostProcessData.cpp
+${PostProcess_CPP_PATH}/Post_Probes.cpp
+${PostProcess_CPP_PATH}/Post_ProbesWrite.cpp
+)
+source_group(PostProcess\\src FILES ${PostProcess_CPP_LIST})
+
+# set directory of Common:
+set(Common_H_PATH Common/include)
+set(Common_H_LIST
+${Common_H_PATH}/AMRDef.h
+${Common_H_PATH}/Constants.h
+${Common_H_PATH}/PHHeader.h
+${Common_H_PATH}/Precision.h
+${Common_H_PATH}/Glb_Dimension.h
+${Common_H_PATH}/LIB_Macro.h
+)
+source_group(Common\\include FILES ${Common_H_LIST}) 
+include_directories(${Common_H_PATH})
+
+set(Common_CPP_PATH Common/src)
+set(Common_CPP_LIST
+${Common_CPP_PATH}/Glb_Dimension.cpp
+)
+source_group(Common\\src FILES ${Common_CPP_LIST})
+
+#20.1 set header file list
+set(API_HEAD_LIST 
+${DataStruct_H_LIST}
+${Data_H_LIST}
+${Math_H_LIST}
+${MPI_H_LIST}
+${Toolkit_H_LIST}
+${IO_H_LIST}
+${Geometry_H_LIST}
+${Physics_H_LIST}
+${PreProcess_H_LIST}
+${PostProcess_H_LIST}
+${Common_H_LIST}
+)
+
+#20.2 set source file list:
+set(API_CPP_LIST 
+${DataStruct_CPP_LIST}
+${Data_CPP_LIST}
+${Math_CPP_LIST}
+${MPI_CPP_LIST}
+${Toolkit_CPP_LIST}
+${IO_CPP_LIST}
+${Geometry_CPP_LIST}
+${Physics_CPP_LIST}
+${PreProcess_CPP_LIST}
+${PostProcess_CPP_LIST}
+${Common_CPP_LIST}
+)
+
+# set directory of MultiSpeciesGas.
+set(MultiSpecies_H_PATH MultiSpecies/include)
+set(MultiSpecies_H_LIST
+${MultiSpecies_H_PATH}/ChemModel.h
+${MultiSpecies_H_PATH}/MixedGas.h
+)
+source_group(MultiSpecies\\include FILES ${MultiSpecies_H_LIST}) 
+include_directories(${MultiSpecies_H_PATH})
+
+set(MultiSpecies_CPP_PATH MultiSpecies/src)
+set(MultiSpecies_CPP_LIST
+${MultiSpecies_CPP_PATH}/ChemModel.cpp
+${MultiSpecies_CPP_PATH}/MixedGas.cpp
+)
+source_group(MultiSpecies\\src FILES ${MultiSpecies_CPP_LIST})
+list(APPEND API_HEAD_LIST ${MultiSpecies_H_LIST})
+list(APPEND API_CPP_LIST ${MultiSpecies_CPP_LIST})
+
+
+#21. adds flags to the compiler command line for sources in the current directory and below:
+add_definitions(-DPH_PARALLEL -DPH_CGNS)
+
+# For OCC.
+set(OCC_LIBS)
+if(USE_OCC)
+  message(STATUS "Using OpenCasCade ...... ")
+  set(OCC_LIBS_REQUIRED
+      # subset of DataExchange
+      TKSTEP TKSTEP209 TKSTEPAttr TKSTEPBase TKIGES TKSTL TKXSBase
+      # ModelingAlgorithms
+      TKOffset TKFeat TKFillet TKBool TKShHealing TKMesh TKHLR TKBO TKPrim
+      TKTopAlgo TKGeomAlgo
+      # ModelingData
+      TKBRep TKGeomBase TKG3d TKG2d
+      # FoundationClasses
+      # TKAdvTools -- not necessary? (and removed from OCC 6.8)
+      TKMath TKernel)
+  
+  # Set the path of the OCC library.
+  set(3RDPARTY_LIB_PATH ${PROJECT_SOURCE_DIR}/3rdparty/occ730-vc11-bit64-release)
+  set(OCC_LIB_PATH ${3RDPARTY_LIB_PATH} CACHE PATH "path to OpenCasCade library.")
+  message(STATUS "Path to OpenCasCade library: " ${OCC_LIB_PATH})
+  
+  # Check if all the library exist -- it's need to be checked. 
+  foreach(OCC ${OCC_LIBS_REQUIRED})     
+      list(APPEND OCC_LIBS ${OCC})
+      unset(OCC CACHE)
+  endforeach(OCC)
+  
+  if(WIN32)           
+    MESSAGE(STATUS "Using Win32 OpenCasCade.")
+    MESSAGE(STATUS "${OCC_LIB_PATH}/lib")
+    MESSAGE(STATUS "${OCC_LIB_PATH}/bin")
+    link_directories("${OCC_LIB_PATH}/lib")
+    link_directories("${OCC_LIB_PATH}/bin") 
+    include_directories("${OCC_LIB_PATH}/inc")
+  else(WIN32)
+    MESSAGE(STATUS "Using NON-Win32 OpenCasCade.")
+    MESSAGE(STATUS "${OCC_LIB_PATH}/lin64/gcc/lib")
+    MESSAGE(STATUS "${OCC_LIB_PATH}/inc")
+    link_directories("${OCC_LIB_PATH}/lin64/gcc/lib")
+    include_directories("${OCC_LIB_PATH}/inc")
+  endif(WIN32)
+endif()
+
+# Some pre-definitions that occ need.
+if(USE_OCC)
+  #target_link_libraries(${EXECUTABLE_TARGET_NAME} ${OCC_LIBS})  
+  add_definitions(-DWNT)
+  add_definitions(-DNOTCL)
+endif()
+
+# build executable program or library to the project using the specified source files and header files:
+if ("${BUILD_LIBRARY_TYPE}" STREQUAL "Shared")
+  # Building Shared Library.   
+  message(STATUS "Building Shared Library ${API_TARGET_NAME} ...")
+  add_library(${API_TARGET_NAME} SHARED ${API_CPP_LIST} ${API_HEAD_LIST})
+elseif ("${BUILD_LIBRARY_TYPE}" STREQUAL "Static")
+  # Building Static Library.
+  message(STATUS "Building Static Library ${API_TARGET_NAME} ...")
+  add_library(${API_TARGET_NAME} STATIC ${API_CPP_LIST} ${API_HEAD_LIST}) 
+endif()
+
+# link API library:
+
+if(WIN32)
+  list(APPEND LINK_LIBRARY_LIST metis parmetis cgns hdf5 mgrid IMlib)
+else(WIN32)
+  list(APPEND LINK_LIBRARY_LIST metis parmetis cgns hdf5 mgrid)
+endif(WIN32)
+
+if(USE_TecplotLib)
+  list(APPEND LINK_LIBRARY_LIST tecio)
+endif(USE_TecplotLib)
+
+if(WIN32)
+  list(APPEND LINK_LIBRARY_LIST ${mpiname})
+endif(WIN32)
+
+if(BUILD_GMRESSolver)
+  # sacado library
+  list(APPEND LINK_LIBRARY_LIST ${Sacado_LIBRARIES})
+  # PETSc library
+  list(APPEND LINK_LIBRARY_LIST ${PETSC_Libraries})
+endif()
+
+target_link_libraries(${API_TARGET_NAME} ${LINK_LIBRARY_LIST})
+
+message(STATUS "Link library list: ${LINK_LIBRARY_LIST}.")
+
+# For OpenMP
+if(USE_OMP)
+find_package (OpenMP)
+if (OpenMP_FOUND)
+
+if(WIN32)
+target_include_directories (${API_TARGET_NAME}
+  PRIVATE
+    ${OpenMP_CXX_INCLUDE_DIRS}
+)
+
+target_compile_options (${API_TARGET_NAME}
+  PRIVATE
+    ${OpenMP_CXX_FLAGS}
+)
+
+target_compile_features (${API_TARGET_NAME}
+  PUBLIC 
+    cxx_std_14
+)
+
+target_link_libraries (${API_TARGET_NAME}
+  PRIVATE 
+    ${OpenMP_CXX_LIBRARIES}
+)
+else(WIN32)
+  set(CMAKE_C_FLAGS "${CMAKE_C_FLAGS} ${OpenMP_C_FLAGS}")
+  set(CMAKE_CXX_FLAGS "${CMAKE_CXX_FLAGS} ${OpenMP_CXX_FLAGS}")
+  set(CMAKE_EXE_LINKER_FLAGS "${CMAKE_EXE_LINKER_FLAGS} ${OpenMP_EXE_LINKER_FLAGS}")
+endif(WIN32)
+endif (OpenMP_FOUND)
+endif (USE_OMP)
+
+#24. exit:
+message(STATUS "--- Exit ${CMAKE_CURRENT_LIST_FILE}! ---")
+
diff --git a/API/Common/include/AMRDef.h b/API/Common/include/AMRDef.h
new file mode 100644
index 0000000..abcc3d9
--- /dev/null
+++ b/API/Common/include/AMRDef.h
@@ -0,0 +1,81 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      AMRDef.h
+//! @brief     Explain this file briefly.
+//! @author    Bell.
+
+#pragma once
+#include <fstream>
+#include <string>
+#include <iomanip>
+#include <sstream>
+#include <set>
+#include <vector>
+#include <algorithm>
+#include <string>
+using namespace std;
+
+namespace PHSPACE
+{
+template < typename T >
+class PHVector1D : public vector< T >
+{
+public:
+    typedef typename vector< T >::size_type size_type;
+    typedef typename vector< T >::value_type value_type;
+
+public:
+    PHVector1D() {};
+    ~PHVector1D() {};
+
+public:
+    PHVector1D < T > (size_type count, const value_type &value) : vector< T >(count, value)
+    {
+    }
+
+    explicit PHVector1D < T > (size_type count) : vector< T >(count)
+    {
+    }
+
+    PHVector1D < T > (T *first, T *last) : vector< T >(first, last)
+    {
+    }
+
+public:
+    T * GetPointer() { return & (*this)[0]; }
+};
+
+template < typename T >
+class PHVector2D
+{
+public:
+    PHVector2D() {};
+    ~PHVector2D() {};
+
+public:
+    explicit PHVector2D < T > (int count)
+    {
+        data2D.resize(count);
+    }
+    size_t size() const { return data2D.size(); }
+    void push_back(const PHVector1D < T > &data1D) { data2D.push_back(data1D); }
+
+protected:
+    PHVector1D < PHVector1D < T > > data2D;
+
+public:
+    PHVector1D < T > & operator [] (const size_t &index) { return data2D[index]; }
+    const PHVector1D < T > & operator [] (const size_t &index) const { return data2D[index]; }
+    void resize(size_t nSize) { data2D.resize(nSize); }
+};
+
+}
\ No newline at end of file
diff --git a/API/Common/include/Constants.h b/API/Common/include/Constants.h
new file mode 100644
index 0000000..42101c9
--- /dev/null
+++ b/API/Common/include/Constants.h
@@ -0,0 +1,454 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Constants.h
+//! @brief     Define some global const value.
+//! @author    He Xin.
+
+#pragma once
+#include "Precision.h"
+
+namespace PHSPACE
+{
+const int SOLVER_BASED        = 0;
+const int GRID_BASED          = 1;
+
+const int DENSITY_BASED_SOLVER = 0;
+const int PRESSURE_BASED_SOLVER = 1;
+
+const int FV_METHOD           = 0;
+const int FD_METHOD           = 1;
+
+const int SOLVE_FIELD         = 0;
+const int CREATE_GRID         = 1;
+const int CAL_WALL_DIST       = 2;
+const int PARTITION_GRID      = 3;
+const int REPOSITORY          = 4;  //! Useless.
+const int OVERSETGRID_VIEW    = 5;
+const int OVERSET_CONFIG      = 6;
+const int CONVERT_PARTITION   = 7;
+const int DSMC_SOLVER         = 8;  //! Useless.
+const int HELICOPTER          = 9;  //! Useless.
+const int UGKS_SOLVER         = 10; //! Useless.
+const int HO_SOLVER           = 12;
+const int LBM_SOLVER_MPI      = 13;
+const int LBM_SOLVER_OMP      = 17;
+const int INTEGRATIVE_SOLVER  = 14;
+const int GRIDCHECK_SOLVER    = 15;
+const int GRID_SOLVER         = 16;
+
+const int SPECDIFFHYB_SOLVER  = 51;
+const int SPEC_SOLVER         = 52;
+
+const int DERIVATIVE_IDENITFY = 98;
+const int POST_PROCESSING     = 99;
+
+const int NOLES_SOLVER        = 0;
+const int LES_SOLVER          = 1;
+
+const int GRID_CONVERSION     = 1;
+const int GRID_REFINE         = 2;
+const int GRID_MERGING        = 3;
+const int GRID_DEFORMATION    = 4;
+const int GRID_REPAIR         = 5;
+const int GRID_MIRROR         = 6;
+const int GRID_STRTOUNS       = 7;
+
+//! Type of  rotating reference frame.
+const int STATIONARY_FRAME    = 0;
+const int TRANSLATIONAL_FRAME   = 1;
+const int ROTATIONAL_FRAME      = 2;
+
+//! periodicType
+const int NO_PERIODICITY = 0;
+const int TRANSLATIONAL_PERIODICITY = 1;
+const int ROTATIONAL_PERIODICITY = 2;
+
+const RDouble half            = 0.5;
+const RDouble third           = 1.0 / 3.0;
+const RDouble two3rd          = 2.0 / 3.0;
+const RDouble four3rd         = 4.0 / 3.0;
+const RDouble fourth          = 0.25;
+const RDouble sixth           = 1.0 / 6.0;
+const RDouble eighth          = 1.0 / 8.0;
+const RDouble tenth           = 0.1;
+const RDouble zero            = 0.0;
+const RDouble one             = 1.0;
+const RDouble two             = 2.0;
+const RDouble three           = 3.0;
+const RDouble four            = 4.0;
+const RDouble five            = 5.0;
+const RDouble six             = 6.0;
+const RDouble seven           = 7.0;
+const RDouble eight           = 8.0;
+const RDouble nine            = 9.0;
+const RDouble ten             = 10.0;
+const RDouble eleven          = 11.0;
+const RDouble twelve          = 12.0;
+const RDouble thirteen        = 13.0;
+const RDouble fourteen        = 14.0;
+const RDouble fifteen         = 15.0;
+const RDouble sixteen         = 16.0;
+const RDouble seventeen       = 17.0;
+const RDouble eighteen        = 18.0;
+const RDouble nineteen        = 19.0;
+const RDouble twenty          = 20.0;
+
+const RDouble PI              = 3.141592653589793;
+const RDouble straightAngle   = 180.0;
+
+const int SEGCTION_LENGTH     = 10240;
+
+const int NS_EQUATION         = 1;
+const int TURBULENCE          = 2;
+const int TRANSITION          = 3;
+
+const int NONDIMENSIONCONDITION = 0;
+const int FLIGHTCONDITION       = 1;
+const int EXPERIMENTCONDITION   = 2;
+const int SUBSONICBCCONDITION   = 3;    //! Useless.
+const int TEMPERATURE_DENSITY   = 4;
+const int TEMPERATURE_PRESSURE  = 5;
+const int MACH_TEMP_PRE         = 6;
+const int WEATHERCONDITION      = 7;
+const int PRIMITIVE_VARIABLES   = 9;
+const int TRAJECTORY            = 10;
+
+const int VIS_STD               = 0;
+const int VIS_AVER              = 1;
+const int VIS_TEST              = 2;
+const int VIS_NEW1              = 3;
+const int VIS_NEW2              = 4;
+const int VIS_ERIC              = 5;
+
+const int ISCHEME_ROE            = 1;
+const int ISCHEME_VANLEER        = 2;
+const int ISCHEME_STEGER         = 3;
+const int ISCHEME_HLLE           = 4;
+const int ISCHEME_LAX_FRIEDRICHS = 5;
+const int ISCHEME_AUSM           = 6;
+const int ISCHEME_AUSMP          = 7;
+const int ISCHEME_AUSMPUP        = 8;
+const int ISCHEME_AUSMDV         = 9;
+const int ISCHEME_AUSM_W         = 10;
+const int ISCHEME_AUSMPW         = 11;
+const int ISCHEME_Rotate         = 12;
+const int ISCHEME_ROE_MODIFIED   = 13;
+const int ISCHEME_AUSMPW_PLUS    = 14;
+const int ISCHEME_GMRES_ROE      = 15;    //! GMRES modified Roe scheme for assembling Jacobian matrix using FD
+const int ISCHEME_GMRES_Steger   = 16;    //! GMRES modified Steger scheme  GMRES3D
+
+const int FIRST_ORDER            = 1;
+const int SECOND_ORDER           = 2;
+
+const int ILMT_NOLIM             = 1;
+const int ILMT_FIRST             = 2;
+const int ILMT_BARTH             = 3;
+const int ILMT_VENCAT            = 4;
+const int ILMT_STRUCT            = 10;
+const int ILMT_MINMOD            = 11;
+const int ILMT_VAN_ALBADA        = 12;
+const int ILMT_VAN_ALBADA_CLZ    = 13;
+const int ILMT_VANLEER           = 14;
+const int ILMT_SMOOTH            = 15;
+const int ILMT_MINMODTEST        = 16;
+const int ILMT_MIN_VAN           = 17;
+const int ILMT_3rd_SMOOTH        = 18;
+const int ILMT_3rd_Minmod_SMOOTH = 19;
+const int ILMT_WENO3_JS          = 20;
+const int ILMT_WENN3_PRM211      = 21;
+const int ILMT_WENN3_ZM          = 22;
+const int ILMT_WENN3_ZES2        = 23;
+const int ILMT_WENN3_ZES3        = 24;
+
+const int INVISCID               = 0;
+const int LAMINAR                = 1;
+const int ALGEBRAIC              = 2;
+const int ONE_EQU                = 3;
+const int TWO_EQU                = 4;
+
+const int IREGAMA                = 2;
+const int BALDWIN_LOMAX          = 10;
+const int SPALART_ALLMARAS       = 11;
+const int KW_SST                 = 12;
+const int KEPSILON               = 13;
+
+const int INCOMPRESSIBLE         = 0;
+const int COMPRESSIBLE           = 1;
+
+const int MULTI_STAGE            = 1;
+const int LU_SGS                 = 4;
+const int Block_LU_SGS           = 5;
+const int JACOBIAN_ITERATION     = 6;
+const int Line_LU_SGS            = 7;
+const int Matrix_LU_SGS          = 8;
+const int GMRES                  = 9;  
+
+const int OneRefineOneDeform     = 1;
+const int DeformAfterAllRefine   = 2;
+
+const int X_DIR    = 1;
+const int Y_DIR    = 2;
+const int Z_DIR    = 3;
+
+const int PHINT    = 1;
+const int PHFLOAT  = 2;
+const int PHDOUBLE = 3;
+const int PHSTRING = 4;
+const int PHBOOL   = 5;
+
+const RDouble SAME_POINT_TOL = static_cast<RDouble> (1.0e-12);
+
+const int PROBESMONITOR   = 0;
+const int LINESMONITOR    = 1;
+const int SURFACESMONITOR = 2;
+
+const int NEARESTCELLDATA = 0;
+const int REALCELLDATA    = 1;
+
+const int CELLVALUE       = 0;
+const int CELLSTOPROBE    = 1;
+const int NODESTOPROBE    = 2;
+
+const int NON_GHOST       = 0;    //! These are interior cells.
+const int ONE_GHOST_LAYER = 1;    //! Their have one-layer ghost cells.
+const int TWO_GHOST_LAYER = 2;    //! Their have two-layer ghost cells.
+const int THREE_GHOST_LAYER = 3;    //! Their have three-layer ghost cells.
+
+const int GlobalCoordinate = 0;
+const int LocalCoordinate  = 1;
+namespace IDX
+{
+const int IR   = 0;
+const int IU   = 1;
+const int IV   = 2;
+const int IW   = 3;
+const int IP   = 4;
+
+const int IRU  = 1;
+const int IRV  = 2;
+const int IRW  = 3;
+const int IRE  = 4;
+
+const int IA   = 0;
+const int IX   = 1;
+const int IY   = 2;
+const int IZ   = 3;
+
+const int IKES = 1;
+const int IETA = 2;
+const int IZTA = 3;
+
+const int ISA  = 0;
+
+const int IKE  = 0;
+const int IKW  = 1;
+
+const int IGAMA = 0;
+const int IRECT = 1;
+
+const int ITT  = 0;
+const int ITV  = 1;
+const int ITE  = 2;
+
+// these variables are for SIMPLE algorithm.
+const int S_IU = 0;
+const int S_IV = 1;
+const int S_IW = 2;
+const int S_IP = 3;
+const int S_IR = 4;
+const int S_ITEMP  = 5;
+const int S_ITURBK = 6;
+const int S_IEPSILON  = 7;
+
+const int S_IOMEGA = 8;
+const int S_ISA = 9;
+const int S_IEDDYVISC = 10;
+
+const int S_IAIR            = 15;
+const int S_IH2             = 16;
+const int S_IH2_l           = 17;
+const int S_INH3_l          = 18;
+const int S_ICH4            = 19;
+const int S_IC2H4           = 20;
+const int S_IC3H8           = 21;
+const int S_ING             = 22;
+const int S_ILNG            = 23;
+const int S_IH2S            = 24;
+const int S_ICl2            = 25;
+const int S_INH3            = 26;
+const int S_IC2H6           = 27;
+
+const int MOMX_EQ    = 0;
+const int MOMY_EQ    = 1;
+const int MOMZ_EQ    = 2;
+const int CONT_EQ    = 3;
+const int ENER_EQ    = 4;
+const int ZNUT_EQ    = 5;
+const int TURBK_EQ   = 6;
+const int EPSILON_EQ = 7;
+const int OMEGA_EQ   = 8;
+}
+const int MAX_SPECIES_NUM  = 20;     //! The maximum number of species.
+const int MAX_REACTION_NUM = 50;    //! The maximum number of reactions.
+
+namespace WALLFUNCTION
+{
+    const int NONE     = 0;
+    const int STANDARD = 1;
+    const int PAB3D    = 2;
+}
+
+namespace ABLATION
+{
+const RDouble FormationHeat = 13.083E+07;
+}
+
+#define BOLTZMANN_CONSTANT  1.380649E-23      //! The Boltzmann constant, Unit: J/K.
+#define AVOGADRO_CONSTANT   6.0225E+23        //! The Avogadro constant, Unit: mol-1.
+#define VACUUM_PERMITTIVITY 8.854187817E-12   //! The permittivity of vacuum,Unit: C/(V*m).
+#define STANDARD_PRESSURE   101325.0          //! The standard atmosphere pressure,Unit: Pa.
+#define ELECTRIC_QUANTITY   1.602176634E-19   //! The electric quantity, Unit: C.
+#define GeneralGasConstant  8.31434           //! The general gas constant, J/(kg * K).
+}
+
+//---------------------------
+// Pressure-based enum
+//----------------------------
+typedef enum  
+{
+    Projection = 1,
+    SIMPLE     = 2,
+    SIMPLEC    = 3,
+    PISO       = 4
+}InCom_method;
+
+typedef enum
+{
+    HYPRELib = 0,
+    UNAPLib  = 1,
+    YHAMGLib = 2
+}mathLibName;
+
+typedef enum  
+{
+    GaussSeidelMethod = 0,
+    GMRESMethod       = 1,
+    BicgstabMethod    = 2,
+    AMGMethod         = 3,
+    PCGMethod         = 4,
+    FlexGMRESMethod   = 5,
+    LGMRESMethod      = 6,
+    COGMRESMethod     = 7,
+    CGNRMethod        = 8,
+    MGRMethod         = 9,
+    ILUMethod         = 10,
+    AMGDDMethod       = 11,
+    HybridMethod       = 12,
+    PipeBicgstabMethod = 13,
+    PipeCGMethod = 14,
+    PipeGMRESMethod = 15
+}LinearSolverID;
+
+typedef enum  
+{
+    L1Res = 1,
+    L2Res    = 2,
+    LinfRes  = 3,
+}ResidualID;
+
+typedef enum
+{
+    iNone = 0,
+    iILU = 1,
+    iAMG = 2,
+    iEuclid = 3,
+    DiagScale = 4,
+    PILUT = 5,
+    GSMG = 6,
+    ParaSails = 7,
+    LduDiag = 8,
+    LduDIC = 9,
+    LduDILU = 10,
+    LduBJacobi = 11,
+    iBJILU =   12,
+    iBJSOR =   13,
+    iJacobi =  14,
+    iSOR    =  15,
+    iAMGDD = 16
+}PrecondTypeID;
+
+typedef enum
+{
+    None                  = 0,
+    MinimumCorrection     = 1,
+    OrthogonalCorrection  = 2,
+    OverrelaxedCorrection = 3
+} InCom_nonOrthMethod;
+
+typedef enum
+{
+    firstUpWind   = 0,
+    secondUpWind  = 1,
+    QUICKMTHOD    = 2,
+    SecondCentral = 3,
+} invFluxScheme;
+
+typedef enum
+{
+    iDefScheme            = 0,
+    iCentralScalar        = 1,
+    iCentralScalarReconst = 5,
+    iCentralMatrix        = 2,
+    iUpwindAUSMPlus       = 3,
+    iUpwindRoe            = 4
+}SpaceScheme;
+
+typedef enum
+{
+    iEuler      = 0,
+    iNSLam      = 1,
+    iSAWallF    = 2,
+    iKEStandard = 3,
+    iSSTWallF   = 4
+}Model;
+
+typedef enum
+{
+    WriteBoundary,
+    WriteBlock,
+    Writecomplete
+} plotFieldType;
+
+typedef enum
+{
+    Tecplot_Binary,
+    Tecplot_ASCII,
+    Ensight_Binary,
+    Ensight_ASCII
+} VisualfileType;
+
+namespace TEC_SPACE
+{
+const int ORDERED         = 0;
+const int FELINESEG       = 1;
+const int FETRIANGLE      = 2;
+const int FEQUADRILATERAL = 3;
+const int FETETRAHEDRON   = 4;
+const int FEBRICK         = 5;
+const int FEPOLYGON       = 6;
+const int FEPOLYHEDRON    = 7;
+
+const int BoundaryVisual  = 0;
+const int FieldVisual     = 1;
+const int BlockVisual     = 2;
+}
+
diff --git a/API/Common/include/Glb_Dimension.h b/API/Common/include/Glb_Dimension.h
new file mode 100644
index 0000000..0c88e47
--- /dev/null
+++ b/API/Common/include/Glb_Dimension.h
@@ -0,0 +1,32 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Glb_Dimension.h
+//! @brief     It defines the global grid dimension.
+//! @author    Bell.
+
+#pragma once
+#include "LIB_Macro.h"
+
+namespace PHSPACE
+{
+const int ONE_D   = 1;
+const int TWO_D   = 2;
+const int THREE_D = 3;
+
+//! Return the global grid dimension.
+//! - # 2, two dimensional.
+//! - # 3, three dimensional.
+LIB_EXPORT int GetDim();
+
+//! Assign the global grid dimension.
+LIB_EXPORT void SetDim(int dim);
+}
diff --git a/API/Common/include/LIB_Macro.h b/API/Common/include/LIB_Macro.h
new file mode 100644
index 0000000..cedac8f
--- /dev/null
+++ b/API/Common/include/LIB_Macro.h
@@ -0,0 +1,99 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      LIB_Macro.h
+//! @brief     This file is part of PHengLEI Technology software library.
+//!            This file is intended to be the first file #included to any
+//!            PHengLEI source. It defines platform-specific pre-processor 
+//!            macros necessary for correct compilation of PHengLEI code
+//!            It's used to define the DLL/Static library.
+//! @author    Bell modified it from OCC.
+
+#pragma once
+#include <iostream>
+using namespace std;
+
+#if defined(__cplusplus) && (__cplusplus >= 201100L)
+  //! Part of C++11 standard.
+  #define Standard_OVERRIDE override
+#elif defined(_MSC_VER) && (_MSC_VER >= 1700)
+  //! MSVC extension since VS2012.
+  #define Standard_OVERRIDE override
+#else
+  #define Standard_OVERRIDE
+#endif
+
+//======================================================
+// Windows-specific definitions
+//======================================================
+# if defined(_WIN32) && !defined(HAVE_NO_DLL)
+
+#  ifndef LIB_EXPORT
+#   define LIB_EXPORT __declspec(dllexport)
+//! For global variables :
+#   define LIB_EXPORTEXTERN __declspec(dllexport) extern
+#   define LIB_EXPORTEXTERNC extern "C" __declspec(dllexport)
+#  endif  /* LIB_EXPORT */
+
+#  ifndef LIB_IMPORT
+#   define LIB_IMPORT __declspec(dllimport) extern
+#   define LIB_IMPORTC extern "C" __declspec(dllimport)
+#  endif  /* LIB_IMPORT */
+
+# else  /* WNT */
+
+//======================================================
+// UNIX definitions
+//======================================================
+
+#  ifndef LIB_EXPORT
+#   define LIB_EXPORT
+//! For global variables :
+#   define LIB_EXPORTEXTERN extern
+#   define LIB_EXPORTEXTERNC extern "C"
+#  endif  /* Standard_EXPORT */
+
+#  ifndef LIB_IMPORT
+#   define LIB_IMPORT extern
+#   define LIB_IMPORTC extern "C"
+#  endif  /* Standard_IMPORT */
+
+//! Compatibility with old SUN compilers.
+
+//! This preprocessor directive is a kludge to get around
+//! a bug in the Sun Workshop 5.0 compiler, it keeps the
+//! /usr/include/memory.h file from being #included
+//! with an incompatible extern "C" definition of memchr
+//! October 18, 2000  <rboehne@ricardo-us.com>.
+#if __SUNPRO_CC_COMPAT == 5
+#define _MEMORY_H
+#endif
+
+# endif  /* WNT */
+
+//======================================================
+// Other
+//======================================================
+
+# ifndef __Standard_API
+//#  ifdef WNT
+#   if !defined(_WIN32) || defined(__Standard_DLL) || defined(__FSD_DLL) || defined(__MMgt_DLL) || defined(__OSD_DLL) || defined(__Plugin_DLL) || defined(__Quantity_DLL) || defined(__Resource_DLL) || defined(__SortTools_DLL) || defined(__StdFail_DLL) || defined(__Storage_DLL) || defined(__TColStd_DLL) || defined(__TCollection_DLL) || defined(__TShort_DLL) || defined(__Units_DLL) || defined(__UnitsAPI_DLL) || defined(__Dico_DLL)
+#    define __Standard_API Standard_EXPORT
+#    define __Standard_APIEXTERN Standard_EXPORTEXTERN
+#   else
+#    define __Standard_API Standard_IMPORT
+#    define __Standard_APIEXTERN Standard_IMPORT
+#   endif  // __Standard_DLL
+//#  else
+//#   define __Standard_API
+//#  endif  // WNT
+# endif  // __Standard_API
+ 
diff --git a/API/Common/include/PHHeader.h b/API/Common/include/PHHeader.h
new file mode 100644
index 0000000..f5bf74e
--- /dev/null
+++ b/API/Common/include/PHHeader.h
@@ -0,0 +1,225 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PHHeader.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin, Bell.
+
+#pragma once
+#include <fstream>
+#include <string>
+#include <iomanip>
+#include <sstream>
+#include <set>
+#include <vector>
+#include <algorithm>
+#include "AMRDef.h"
+#include "Precision.h"
+using namespace std;
+
+namespace PHSPACE
+{
+
+#define PHDEBUG
+#ifdef PHDEBUG
+#define ASSERT(x) \
+    if (!(x))  \
+{\
+    cout << "ERROR: Assert " << #x << endl; \
+    cout << "On line " << __LINE__ << endl; \
+    cout << "On file " << __FILE__ << endl; \
+    abort();                                \
+}
+#else
+#define ASSERT(truth) (()0)
+#endif
+
+template < typename T >
+void Set2Array(set<T> &data_set, T *data_array)
+{
+    typedef typename set<T>::iterator ITER;
+    ITER iter;
+    int icount = 0;
+    for (iter = data_set.begin(); iter != data_set.end(); ++ iter)
+    {
+        data_array[icount++] = *iter;
+    }
+}
+
+template < typename T >
+void Array2Set(vector<T> &data_array, set<T> &data_set)
+{
+    for (std::size_t i = 0; i < data_array.size(); ++ i)
+    {
+        data_set.insert(data_array[i]);
+    }
+}
+
+template < typename T >
+void Array2Set(T *data_array, int size, set<T> &data_set)
+{
+    for (int i = 0; i < size; ++ i)
+    {
+        data_set.insert(data_array[i]);
+    }
+}
+
+template < typename T1, typename T2 >
+void GetPartOfArrayByCondition(vector<T1> &valueArray, const T1 &value, vector<T2> &referenceArray, vector<T2> &resultArray)
+{
+    resultArray.resize(0);
+    for (std::size_t i = 0; i < valueArray.size(); ++ i)
+    {
+        if (valueArray[i] == value)
+        {
+            resultArray.push_back(referenceArray[i]);
+        }
+    }
+}
+
+template < typename T >
+inline void SetField(vector< T > &field, const T &inputValue, int numberOfElements)
+{
+    for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+    {
+        field[iElement] = inputValue;
+    }
+}
+
+template < typename T >
+inline void SetField(T *field, const T &inputValue, int numberOfElements)
+{
+    for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+    {
+        field[iElement] = inputValue;
+    }
+}
+
+template < typename T >
+inline void SetField(T **field, int nDimension1, int nDimension2, const T &inputValue)
+{
+    for (int i = 0; i < nDimension1; ++ i)
+    {
+        for (int j = 0; j < nDimension2; ++ j)
+        {
+            field[i][j] = inputValue;
+        }
+    }
+}
+
+template < typename T1, typename T2 >
+void SetField(PHVector1D <T1 *> &vectorA, const T2 &value, int numberOfElements)
+{
+    int numberOfEquations = vectorA.size();
+    for (int iEquation = 0; iEquation < numberOfEquations; ++ iEquation)
+    {
+        for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+        {
+            vectorA[iEquation][iElement] = value;
+        }
+    }
+}
+
+template < typename T1, typename T2 >
+void SetField(PHVector1D < PHVector1D < T1 > > &vectorA, const T2 &value)
+{
+    int numberOfEquations = vectorA.size();
+
+    for (int iEquation = 0; iEquation < numberOfEquations; ++ iEquation)
+    {
+        int numberOfElements = vectorA[iEquation].size();
+        for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+        {
+            vectorA[iEquation][iElement] = value;
+        }
+    }
+}
+
+template < typename T1, typename T2 >
+void SetField(PHVector1D <T1 *> &vectorA, PHVector1D <T1 *> &vectorB, const T2 &coefficient, int numberOfElements)
+{
+    int numberOfEquations = vectorA.size();
+    for (int iEquation = 0; iEquation < numberOfEquations; ++ iEquation)
+    {
+        for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+        {
+            vectorA[iEquation][iElement] = coefficient * vectorB[iEquation][iElement];
+        }
+    }
+}
+
+template < typename T1, typename T2 >
+inline void SetField(T1 *resultField, const T2 &inputValue, int numberOfElements)
+{
+    for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+    {
+        resultField[iElement] = inputValue;
+    }
+}
+
+template < typename T1, typename T2 >
+inline void SetField(T1 *resultField, T2 *inputField, int numberOfElements)
+{
+    if (resultField == inputField) return;
+    for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+    {
+        resultField[iElement] = inputField[iElement];
+    }
+}
+
+template < typename T1, typename T2 >
+inline void SetField(PHVector1D < T1 > &resultField, const T2 &inputValue, int numberOfElements)
+{
+    if (resultField.size() == 0) return;
+    SetField(&resultField[0], inputValue, numberOfElements);
+}
+
+template < typename T1, typename T2 >
+void SetField(PHVector1D < PHVector1D < T1 > > &vectorA, PHVector1D < PHVector1D < T1 > > &vectorB, const T2 &coefficient)
+{
+    int numberOfEquations = vectorA.size();
+    for (int iEquation = 0; iEquation < numberOfEquations; ++ iEquation)
+    {
+        int numberOfElements = vectorA[iEquation].size();
+        for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+        {
+            vectorA[iEquation][iElement] = coefficient * vectorB[iEquation][iElement];
+        }
+    }
+}
+
+template < typename T1, typename T2 >
+inline void SetField(T1 *field, const T2 &inputvalue, int ist, int ied, int jst, int jed, int kst, int ked)
+{
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                (*field)(i, j, k) = inputvalue;
+            }
+        }
+    }
+}
+
+template < typename T >
+void CopyField(T *It, const T *In, int size)
+{
+    if (!In || !It) return;
+
+    for (int i = 0; i < size; ++ i)
+    {
+        It[i] = In[i];
+    }
+}
+
+}
\ No newline at end of file
diff --git a/API/Common/include/Precision.h b/API/Common/include/Precision.h
new file mode 100644
index 0000000..1907e98
--- /dev/null
+++ b/API/Common/include/Precision.h
@@ -0,0 +1,57 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Precision.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin, Bell.
+
+#pragma once
+#include<stdio.h>
+#include<mpi.h>
+
+namespace PHSPACE
+{
+#ifdef PH_DOUBLE_PREC
+    typedef double RDouble;
+    typedef double RFloat;
+
+    const RDouble LARGE = 1.0e40;
+    const RDouble SMALL = 1.0e-40;
+    const RDouble TINY  = 1.0e-40;
+    const RDouble EPSILON = 1.0e-12;
+
+    #define PH_MPI_DOUBLE MPI_DOUBLE
+#else
+    typedef float RDouble;
+    typedef float RFloat;
+
+    const RDouble LARGE = 1.0e36f;
+    const RDouble SMALL = 1.0e-36f;
+    const RDouble TINY  = 1.0e-36f;
+    const RDouble EPSILON = 1.0e-8f;
+
+    #define PH_MPI_DOUBLE MPI_FLOAT
+#endif
+
+typedef size_t uint_t;
+typedef unsigned long long uint_long;
+
+#ifdef WIN32
+    #ifdef _WIN64
+        typedef long long int_t;
+    #else
+        typedef int int_t;
+    #endif
+#else
+    typedef long long int_t;
+#endif
+
+}
\ No newline at end of file
diff --git a/API/Common/src/Glb_Dimension.cpp b/API/Common/src/Glb_Dimension.cpp
new file mode 100644
index 0000000..2a6c611
--- /dev/null
+++ b/API/Common/src/Glb_Dimension.cpp
@@ -0,0 +1,17 @@
+#include "Glb_Dimension.h"
+
+namespace PHSPACE
+{
+int dimension = THREE_D;
+
+LIB_EXPORT int GetDim()
+{
+    return dimension;
+}
+
+LIB_EXPORT void SetDim(int dim)
+{
+    dimension = dim;
+}
+
+}
\ No newline at end of file
diff --git a/API/Data/include/Data_Field.h b/API/Data/include/Data_Field.h
new file mode 100644
index 0000000..5270d19
--- /dev/null
+++ b/API/Data/include/Data_Field.h
@@ -0,0 +1,62 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Data_Field.h
+//! @brief     Data_Field has a set of data which stores field data by name.
+//!            It only stores field data's first address, i.e. a pointer to data's memory.
+//!            Users can update or obtain the data's pointer by its name.
+//!            Usually, users use Data_Field to store flow field data, such as rho, u, p, and so on.
+//! @author    He Xin, Zhang Jian.
+
+#pragma once
+#include <set>
+#include "Data_IndexData.h"
+#include "LIB_Macro.h"
+
+namespace PHSPACE
+{
+
+class Data_Field
+{
+private:
+    //! A set that stores Data_IndexData type data.
+    //! Data_IndexData has data's name and address(pointer to the data).
+    set < Data_IndexData > *dataSet;
+
+public:
+    //! Constructor, create Data_Field.
+    LIB_EXPORT Data_Field();
+
+    //! Destructor, free Data_Field.
+    LIB_EXPORT ~Data_Field();
+
+    //! Add or update a data(with name, type ,size) to dataSet.
+    //! If there was a data with same name, replace the old with the new.
+    //! @param[in]  name    Source data's name.
+    //! @param[in]  data    Pointer the Source data.
+    LIB_EXPORT void UpdateDataPtr(const string &name, void *data);
+
+    //! Obtain data's address from dataSet by name.
+    //! If the dataSet doesn't has a same name data, returns null.
+    //! @param[in]  name    Source data's name.
+    LIB_EXPORT void * GetDataPtr(const string &name) const;
+
+    //! Delete one of the items in the dataSet by name.
+    //! @param[in]  name    Item's name needs to be deleted.
+    LIB_EXPORT void DeleteDataPtr(const string &name);
+
+    LIB_EXPORT int CheckDataExist(const string &name);
+
+    //! Obtain the underlying dataSet that stores all data.
+    LIB_EXPORT set < Data_IndexData > * GetDataSet() const;
+};
+
+}
\ No newline at end of file
diff --git a/API/Data/include/Data_IndexData.h b/API/Data/include/Data_IndexData.h
new file mode 100644
index 0000000..d4efbc6
--- /dev/null
+++ b/API/Data/include/Data_IndexData.h
@@ -0,0 +1,53 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Data_IndexData.h
+//! @brief     Data_IndexData is a basic class of data storage that only stores the pointer to the data.
+//! @author    He Xin, Zhang Jian.
+
+#pragma once
+#include <string>
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+//! @brief Data_IndexData stores the data's name and address(pointer to the data).
+//! It doesn't allocate or free memory for the data.
+class Data_IndexData
+{
+private:
+    string name;
+    void *data;
+public:
+    //! Default constructor.
+    Data_IndexData();
+
+    //! Constructor using name and data.
+    Data_IndexData(const string &name, void *data);
+
+    //! Destructor, do nothing.
+    ~Data_IndexData();
+
+    //! Return data's name.
+    string GetName() const;
+
+    //! Return pointer to the data.
+    void * GetData() const;
+
+    //! Override operator < used by set<Data_IndexData>, sort by name.
+    bool operator < (const Data_IndexData &rhs) const;
+};
+
+}
+
+#include "Data_IndexData.hxx"
\ No newline at end of file
diff --git a/API/Data/include/Data_IndexData.hxx b/API/Data/include/Data_IndexData.hxx
new file mode 100644
index 0000000..6b94a69
--- /dev/null
+++ b/API/Data/include/Data_IndexData.hxx
@@ -0,0 +1,14 @@
+namespace PHSPACE
+{
+
+inline string Data_IndexData::GetName() const
+{
+    return name;
+}
+
+inline void * Data_IndexData::GetData() const
+{
+    return data;
+}
+
+}
\ No newline at end of file
diff --git a/API/Data/include/Data_Param.h b/API/Data/include/Data_Param.h
new file mode 100644
index 0000000..db8bea3
--- /dev/null
+++ b/API/Data/include/Data_Param.h
@@ -0,0 +1,79 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Data_Param.h
+//! @brief     Data_Param has a set of data which stores parameters by name.
+//!            Users can update or obtain the data by its name, type and size.
+//!            Data_Param is usually used to store the parameters from *.hypara file, such as refReNumber, viscousName, limitVariables, et. al.
+//! @author    He Xin, Zhang Jian.
+
+#pragma once
+#include <set>
+#include "Data_SafeData.h"
+#include "LIB_Macro.h"
+
+namespace PHSPACE
+{
+
+class Data_Param
+{
+private:
+    //! A set that contains Data_SafeData type data.
+    //! Data_SafeData has data and its' name, type and size.
+    set < Data_SafeData > *dataSet;
+
+public:
+    //! Constructor.
+    LIB_EXPORT Data_Param();
+
+    //! Copy constructor.
+    LIB_EXPORT Data_Param(const Data_Param &rhs);
+
+    //! Destructor, free memory for dataSet.
+    LIB_EXPORT ~Data_Param();
+
+    //! Add or update a data(with name, type, size) to dataSet.
+    //! If there was a data with same name, replace the old with the new.
+    //! Obtain the data by its name, type and size.
+    //! @param[in]  name    Source data's name.
+    //! @param[in]  data    Source data's address.
+    //! @param[in]  type    Source data's type.
+    //! @param[in]  size    Source data's size(length of data array).
+    LIB_EXPORT void UpdateData(const string &name, void *data, int type, int size);
+
+    //! Obtain the data by its name, type and size.
+    //! @param[in]  name    Target data's name.
+    //! @param[in]  data    Target data's address.
+    //! @param[in]  type    Target data's type.
+    //! @param[in]  size    Target data's size(length of data array).
+    LIB_EXPORT void GetData(const string &name, void *data, int type, int size);
+
+    LIB_EXPORT int CheckDataExist(const string &name);
+
+    //! Obtain the data's size (length of data array) by its name.
+    LIB_EXPORT int GetSizeOfData(const string &name);
+
+    //! Find one Data_Param object whether exist in dataSet.
+    LIB_EXPORT bool IsExist(const string &name, int type, int size);
+
+    //! Obtain a reference pointing to the underlying data set that stores the parameter data.
+    LIB_EXPORT set < Data_SafeData > * GetBaseP() const;
+
+    //! Override the operator =, assign another Data_Param instance to self.
+    //! It will erase all the old data, and copy new data from right hand side.
+    LIB_EXPORT Data_Param & operator = (const Data_Param &rhs);
+
+private:
+    //! Invoking function copy_data_exist.
+    void CopyDataValue(void *dataout, void *data, int type, int size);
+};
+
+}
\ No newline at end of file
diff --git a/API/Data/include/Data_ParamFieldSuite.h b/API/Data/include/Data_ParamFieldSuite.h
new file mode 100644
index 0000000..1e6bd7d
--- /dev/null
+++ b/API/Data/include/Data_ParamFieldSuite.h
@@ -0,0 +1,81 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Data_ParamFieldSuite.h
+//! @brief     Data_ParamFieldSuite embeds a Data_Param type pointer and a Data_Field pointer into one class.
+//!            It wraps Data_Param's public interface(UpdateData, GetData) and Data_Field's public interface(UpdateDataPtr, GetDataPtr).
+//! @author    He Xin, Zhang Jian, reference from Dr. Wang.
+
+#pragma once
+#include <string>
+#include "LIB_Macro.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+//! Forward declaration.
+class Data_Param;
+class Data_Field;
+
+//! @brief Data_ParamFieldSuite wraps Data_Param's public interface(UpdateData, GetData) 
+//!        and Data_Field's public interface(UpdateDataPtr, GetDataPtr).
+class Data_ParamFieldSuite
+{
+private:
+    //! Pointer to a Data_Param instance which stores parameters.
+    Data_Param *param;
+
+    //! Pointer to a Data_Field instance which stores field data's pointer.
+    Data_Field *field;
+
+public:
+    //! Constructor.
+    //! @param[in]  init    Create instance for param and field if true(default).
+    LIB_EXPORT Data_ParamFieldSuite(bool init = true);
+
+    //! Destructor, free param and field.
+    LIB_EXPORT ~Data_ParamFieldSuite();
+
+    //! Add or update a data(with name, type, size) for param.
+    //! If there was a data with same name, replace the old with the new.
+    //! Obtain the data by its name, type and size.
+    //! @param[in]  name    Source data's name.
+    //! @param[in]  data    Source data's address.
+    //! @param[in]  type    Source data's type.
+    //! @param[in]  size    Source data's size.
+    LIB_EXPORT void UpdateData(const string &name, void *data, int type, int size);
+
+    //! Obtain the data by its name, type and size.
+    //! @param[in]  name    Target data's name.
+    //! @param[in]  data    Target data's address.
+    //! @param[in]  type    Target data's type.
+    //! @param[in]  size    Target data's size.
+    LIB_EXPORT void GetData(const string &name, void *data, int type, int size);
+
+    //! Add or update a data(with name, type, size) to field.
+    //! If there was a data with same name, replace the old with the new.
+    //! @param[in]  name    Source data's name.
+    //! @param[in]  data    Pointer the Source data.
+    LIB_EXPORT void UpdateDataPtr(const string &name, void *data);
+
+    //! Obtain data's address from dataSet by name.
+    //! If the dataSet doesn't has a same name data, returns null.
+    //! @param[in]  name    Source data's name.
+    LIB_EXPORT void * GetDataPtr(const string &name) const;
+
+    //! Remove data's address from dataSet by name.
+    //! @param[in]  name    Source data's name.
+    LIB_EXPORT void DeleteDataPtr(const string &name);
+};
+
+}
\ No newline at end of file
diff --git a/API/Data/include/Data_SafeData.h b/API/Data/include/Data_SafeData.h
new file mode 100644
index 0000000..4e2c585
--- /dev/null
+++ b/API/Data/include/Data_SafeData.h
@@ -0,0 +1,79 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Data_SafeData.h
+//! @brief     Data_SafeData is a basic class of data storage.
+//! @author    He Xin, Zhang Jian, reference from Dr. Wang.
+
+#pragma once
+#include <string>
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+//! @brief Data_SafeData is a basic class of data storage.
+//! It stores the data's name, type, size, and allocate memory for the data.
+//! There is a pointer to the data.
+class Data_SafeData
+{
+private:
+    string name;
+    void  *data;
+    int    type;
+    int    size;
+
+public:
+    //! Construct function.
+    Data_SafeData(const string &name, void *data, int type, int size);
+
+    //! Copy Construct function.
+    Data_SafeData(const Data_SafeData &rhs);
+
+    //! Destructor, free memory.
+    ~Data_SafeData();
+
+    //! OverWrite old data by new type and size data.
+    void OverWrite(void *data, int type, int size);
+
+    //! Print Data to window.
+    void ShowData();
+
+    //! Return data's name.
+    string GetName() const;
+
+    //! Return data's type.
+    int GetType() const;
+
+    //! Return data's size.
+    int GetSize() const;
+
+    //! Return pointer to the data.
+    void * GetData() const;
+
+    //! Override operator < used by set<Data_SafeData>, sort by name.
+    bool operator < (const Data_SafeData &rhs) const;
+
+private:
+    //! Override operator < used by set<Data_SafeData>.
+    Data_SafeData & operator = (const Data_SafeData &rhs);
+
+    //! Invoking function copy_data_sub.
+    void CopyData(void *data, int type, int size);
+
+    //! Invoking function delete_void.
+    void DeleteData();
+};
+
+}
+
+#include "Data_SafeData.hxx"
\ No newline at end of file
diff --git a/API/Data/include/Data_SafeData.hxx b/API/Data/include/Data_SafeData.hxx
new file mode 100644
index 0000000..683c8ab
--- /dev/null
+++ b/API/Data/include/Data_SafeData.hxx
@@ -0,0 +1,24 @@
+namespace PHSPACE
+{
+
+inline string Data_SafeData::GetName() const
+{
+    return name;
+}
+
+inline int Data_SafeData::GetType() const
+{
+    return type;
+}
+
+inline int Data_SafeData::GetSize() const
+{
+    return size;
+}
+
+inline void * Data_SafeData::GetData() const
+{
+    return data;
+}
+
+}
\ No newline at end of file
diff --git a/API/Data/include/Data_Util.h b/API/Data/include/Data_Util.h
new file mode 100644
index 0000000..2c90dd1
--- /dev/null
+++ b/API/Data/include/Data_Util.h
@@ -0,0 +1,77 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Data_Util.h
+//! @brief     This file defines some util function about copying data.
+//! @author    He Xin, Zhang Jian.
+
+#pragma once
+
+namespace PHSPACE
+{
+
+struct Data_Util
+{
+    //! Function template, copy T type data from source to target.
+    //! The target is a null pointer at first, this function will allocate memory internally.
+    //! @param[in] size      size of the source object.
+    //! @param[in] source    the source address.
+    //! @param[in] target    the target address.
+    template < typename T >
+    static void copy_void(void *&target, void *source, int size)
+    {
+        target = new T[size];
+        for (int i = 0; i < size; ++ i)
+        {
+            reinterpret_cast <T *> (target)[i] = reinterpret_cast <T *> (source)[i];
+        }
+    }
+
+    //! Free memory for T type data.
+    //! @param[in] data    the object to be deleted.
+    template < typename T >
+    static void delete_void(void *data)
+    {
+        delete [] reinterpret_cast<T *> (data);
+    }
+
+    //! Function template, copy T type data from source to target with same type and size.
+    //! @param[in] size      size of the source object.
+    //! @param[in] source    the source address.
+    //! @param[in] target    the target address.
+    template < typename T >
+    static void copy_void_exist(void *target, void *source, int size)
+    {
+        for (int i = 0; i < size; ++ i)
+        {
+            reinterpret_cast<T *> (target)[i] = reinterpret_cast<T *> (source)[i];
+        }
+    }
+
+    //! Copy data from source to target with the assumption that target hasn't allocated memory.
+    //! This function will help to allocate memory internally.
+    //! @param[out] target    The target address.
+    //! @param[in]  source    The source address.
+    //! @param[in]  type      The data's type.
+    //! @param[in]  size      The data's size.
+    static void copy_data_sub(void *&target, void *source, int type, int size);
+
+    //! Copy data from source to target with the assumption that target has allocated memory.
+    //! This function will replace the old data with new data.
+    //! Users must guarantee the source has the same size and type with target.
+    //! @param[out] target    The target address.
+    //! @param[in]  source    The source address.
+    //! @param[in]  type      The data's type.
+    //! @param[in]  size      The data's size.
+    static void copy_data_exist(void *target, void *source, int type, int size);
+};
+
+}
\ No newline at end of file
diff --git a/API/Data/include/GlobalDataBase.h b/API/Data/include/GlobalDataBase.h
new file mode 100644
index 0000000..5ed0389
--- /dev/null
+++ b/API/Data/include/GlobalDataBase.h
@@ -0,0 +1,141 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      GlobalDataBase.h
+//! @brief     GlobalDataBase class is similar to a database which stores global parameters or data pointer.
+//!            Users can update or obtain the data by its name, type and size.
+//!            It is different from Data_ParamFieldSuite class.
+//!            It forbids users to create instance and only provides some interface function to users to access the data.
+//!            These interface functions include UpdateData, GetData, UpdateDataPtr, GetDataPtr, etc.
+//!            Example:
+//!                 int nl = 5; GlobalDataBase::GetData("nl", &nl, PHINT, 1);
+//!                 GlobalDataBase::UpdateData("dtmin", &dtmin, PHDOUBLE, 1);
+//!                 RFloat *prim_inf = new RFloat[nl+nchem]; GlobalDataBase::UpdateDataPtr("prim_inf", prim_inf);
+//!                 RFloat *prim_inf = reinterpret_cast<RFloat *>(GlobalDataBase::GetDataPtr("prim_inf")).
+//! @author    Zhang Jian, He Xin.
+
+#pragma once
+#include "Data_Param.h"
+#include "Data_Field.h"
+#include "Precision.h"
+#include <vector>
+
+using namespace std;
+
+namespace PHSPACE
+{
+class DataContainer;
+
+class GlobalDataBase
+{
+private:
+    //! Zonal control parameters.
+    //! Data_Param is usually used to store the parameters from *.hypara file, such as refReNumber, viscousName, limitVariables, et. al.
+    static Data_Param *globalParam;
+
+    //! Zonal data pointers.
+    static Data_Field *globalField;
+public:
+    //! Add or update a data(with name, type, size) to global database.
+    //! If there was a data with same name, replace the old with the new.
+    //! Obtain the data by its name, type and size.
+    //! @param[in]  name    Source data's name.
+    //! @param[in]  data    Source data's address.
+    //! @param[in]  type    Source data's type.
+    //! @param[in]  size    Source data's size(length of data array).
+    static void UpdateData(const string &name, void *data, int type, int size);
+
+    //! Obtain the data by its name, type and size from global database.
+    //! @param[in]  name    Target data's name.
+    //! @param[in]  data    Target data's address.
+    //! @param[in]  type    Target data's type.
+    //! @param[in]  size    Target data's size(length of data array).
+    static void GetData(const string &name, void *data, int type, int size);
+
+    //! Obtain the data's size (length of data array) by its name.
+    static int GetSizeOfData(const string &name);
+
+    //! Add or update a data(with name, type, size) to global database.
+    //! If there was a data with same name, replace the old with the new.
+    //! @param[in]  name    Source data's name.
+    //! @param[in]  data    Pointer the Source data.
+    static void UpdateDataPtr(const string &name, void *data);
+
+    static void DeleteDataPtr(const string &name);
+
+    //! Obtain data's pointer(address) from global database by name.
+    //! If the dataSet doesn't has a same name data, returns null.
+    //! @param[in]  name    Source data's name.
+    static void * GetDataPtr(const string &name);
+
+    //! Obtain the underlying data set which stores global parameters.
+    static set < Data_SafeData > * GetBaseP();
+
+    //! Obtain the private member globalParam that stores global parameters.
+    static Data_Param * GetDataPara();
+
+    //! Compress global parameters stored in globalParm into a DataContainer cdata.
+    static void CompressData(DataContainer *&cdata);
+
+    //! Decompress data from a DataContainer cdata, and update them to globalParam.
+    static void DecompressData(DataContainer *cdata);
+
+    //! UpdateData one data from a DataContainer cdata.
+    //! @param[in]  name    data's name.
+    //! @param[in]  type    data's type.
+    //! @param[in]  size    length of data array.
+    //! @param[out]  cdata    the DataContainer which stores one data.
+    static void UpdateData(DataContainer *cdata, const string &name, int type, int size);
+
+    //! Get one string type data from database by name.
+    static string GetStrParaFromDB(const string &name);
+
+    //! Get one integer type data from database by name.
+    static int GetIntParaFromDB(const string &name);
+
+    //! Get one double type data from database by name.
+    static RDouble GetDoubleParaFromDB(const string &name);
+
+    //! Return if the data named by 'name' exist or not.
+    static bool IsExist(const string &name, int type, int size);
+
+    //! Get double type vector from database by name.
+    static RDouble * GetRDoubleArrayFromDB(const string &name, int numberOfElements);
+
+    static void GetRDoubleVectorFromDB(vector< RDouble > &parameter, const string &nameOfRFloatArray, int numberOfElements);
+
+private:
+    //! Constructor is private, so instantiation of this class is forbidden.
+    GlobalDataBase();
+
+    //! WriteString function is used to write string object cs into cdata.
+    //! @param[in]  cs       string type,source object.
+    //! @param[in]  cdata    receive data from cs,target object.
+    static void WriteString(DataContainer *cdata, const string &cs);
+
+    //! ReadString function is used to write cdata into string object cs.
+    //! @param[in] cs       string object,target object.
+    //! @param[in] cdata    cope data to cs,source object.
+    static void ReadString(DataContainer *cdata, string &cs);
+
+    //! WriteVoid function is used to select suitable write function, restricted by type.
+    //! @param[in]  cdata   receive and store data from data object.
+    //! @param[in]  data    source object.
+    //! @param[in]  type    the data type to be transformed.
+    //! @param[in]  size    length of data array.
+    static void WriteVoid(DataContainer *cdata, void *data, int type, int size);
+
+    static void SetDefaultParamInfo();
+};
+
+//! Get task type.
+LIB_EXPORT int GetTaskCode();
+}
diff --git a/API/Data/src/Data_Field.cpp b/API/Data/src/Data_Field.cpp
new file mode 100644
index 0000000..7ed930d
--- /dev/null
+++ b/API/Data/src/Data_Field.cpp
@@ -0,0 +1,71 @@
+#include "Data_Field.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Data_Field::Data_Field()
+{
+    dataSet = new set < Data_IndexData >;
+}
+
+LIB_EXPORT Data_Field::~Data_Field()
+{
+    delete dataSet;
+}
+
+LIB_EXPORT void Data_Field::UpdateDataPtr(const string &name, void *data)
+{
+    pair<set < Data_IndexData > ::iterator, bool> ret = dataSet->insert(Data_IndexData(name, data));
+    if (!ret.second)
+    {
+        cout << "    Warning: UpdateDataPtr false, inserted repeatedly: " << name << " !!!" << endl;
+    }
+}
+
+LIB_EXPORT void * Data_Field::GetDataPtr(const string &name) const
+{
+    Data_IndexData data(name, 0);
+    set < Data_IndexData >::iterator it = dataSet->find(data);
+    if (it != dataSet->end())
+    {
+        return it->GetData();
+    }
+    else
+    {
+        //cout << "Variable " << name << " is not in the database.\n";
+        return 0;
+    }
+}
+
+LIB_EXPORT void Data_Field::DeleteDataPtr(const string &name)
+{
+    Data_IndexData data(name, 0);
+    set < Data_IndexData >::iterator it = dataSet->find(data);
+    if (it != dataSet->end())
+    {
+        dataSet->erase(it);
+    }
+}
+
+LIB_EXPORT int Data_Field::CheckDataExist(const string &name)
+{
+    int data;
+    set < Data_IndexData >::iterator iter;
+    Data_IndexData datas = Data_IndexData(name, &data);
+    iter = dataSet->find(datas);
+    if (iter != dataSet->end())
+    {
+        return 1;
+    }
+    else
+    {
+        return 0;
+    }
+}
+
+LIB_EXPORT set < Data_IndexData > * Data_Field::GetDataSet() const
+{ 
+    return dataSet;
+}
+
+}
\ No newline at end of file
diff --git a/API/Data/src/Data_IndexData.cpp b/API/Data/src/Data_IndexData.cpp
new file mode 100644
index 0000000..68da36f
--- /dev/null
+++ b/API/Data/src/Data_IndexData.cpp
@@ -0,0 +1,25 @@
+#include "Data_IndexData.h"
+
+namespace PHSPACE
+{
+
+Data_IndexData::Data_IndexData():data(0)
+{
+}
+
+Data_IndexData::Data_IndexData(const string &name, void *data)
+{
+    this->name = name;
+    this->data = data;
+}
+
+Data_IndexData::~Data_IndexData()
+{
+}
+
+bool Data_IndexData::operator < (const Data_IndexData &rhs) const
+{
+    return name < rhs.name;
+}
+
+}
\ No newline at end of file
diff --git a/API/Data/src/Data_Param.cpp b/API/Data/src/Data_Param.cpp
new file mode 100644
index 0000000..a91504b
--- /dev/null
+++ b/API/Data/src/Data_Param.cpp
@@ -0,0 +1,152 @@
+#include <stdlib.h>
+#include "Data_Param.h"
+#include "Data_Util.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Data_Param::Data_Param()
+{
+    dataSet = new set < Data_SafeData >;
+}
+
+LIB_EXPORT Data_Param::Data_Param(const Data_Param &rhs)
+{
+    dataSet = new set < Data_SafeData >;
+    set < Data_SafeData >::iterator iter;
+    for (iter = rhs.dataSet->begin(); iter != rhs.dataSet->end(); ++ iter)
+    {
+        dataSet->insert(*iter);
+    }
+}
+
+LIB_EXPORT Data_Param::~Data_Param()
+{
+    delete dataSet;
+    dataSet = NULL;
+}
+
+LIB_EXPORT void Data_Param::UpdateData(const string &name, void *data, int type, int size)
+{
+    Data_SafeData datas = Data_SafeData(name, data, type, size);
+    //datas.ShowData();
+
+    set < Data_SafeData >::iterator iter;
+    iter = dataSet->find(datas);
+    if (iter != dataSet->end())
+    {
+        dataSet->erase(iter);
+        dataSet->insert(datas);
+    }
+    else
+    {
+        dataSet->insert(datas);
+    }
+}
+
+LIB_EXPORT void Data_Param::GetData(const string &name, void *data, int type, int size)
+{
+    set < Data_SafeData >::iterator iter;
+    Data_SafeData datas = Data_SafeData(name, data, type, size);
+    iter = dataSet->find(datas);
+
+    /*static set<string> bcNameSet;
+    static int count = 0;*/
+
+    if (iter != dataSet->end())
+    {
+        CopyDataValue(data, iter->GetData(), iter->GetType(), iter->GetSize());
+
+        //bcNameSet.insert(name);
+        //count ++;
+    }
+    else
+    {
+        cout << "This data does not exist: " << name.c_str() << endl;
+        exit(0);    //! It is temporary!!!
+    }
+
+    /*int iCount = static_cast<int>(bcNameSet.size()) + 10000;
+    if (iCount < count)
+    {
+        cout << "  Warning: this data has been read  more times: "<< name.c_str() << endl;
+    }*/
+}
+
+LIB_EXPORT int Data_Param::CheckDataExist(const string &name)
+{
+    int data;
+    set < Data_SafeData >::iterator iter;
+    Data_SafeData datas = Data_SafeData(name, &data, 1, 1);
+    iter = dataSet->find(datas);
+    if (iter != dataSet->end())
+    {
+        return 1;
+    }
+    else
+    {
+        return 0;
+    }
+}
+
+LIB_EXPORT int Data_Param::GetSizeOfData(const string &name)
+{
+    set < Data_SafeData >::iterator iter;
+    Data_SafeData datas = Data_SafeData(name, 0, 0, 0);
+    iter = dataSet->find(datas);
+    if (iter != dataSet->end())
+    {
+        return iter->GetSize();
+    }
+    else
+    {
+        cout << "This data does not exist: " << name.c_str() << endl;
+        exit(0);    //! It is temporary!!!
+    }
+}
+
+LIB_EXPORT bool Data_Param::IsExist(const string &name, int type, int size)
+{
+    set < Data_SafeData >::iterator iter;
+    Data_SafeData datas = Data_SafeData(name, 0, type, size);
+    iter = dataSet->find(datas);
+    if (iter != dataSet->end())
+    {
+        return true;
+    }
+    else
+    {
+        return false;
+    }
+}
+
+LIB_EXPORT set < Data_SafeData > * Data_Param::GetBaseP() const
+{
+    return dataSet;
+};
+
+LIB_EXPORT Data_Param & Data_Param::operator = (const Data_Param &rhs)
+{
+    //! Only do assignment if rhs is a different object from this.
+    if (this != &rhs)
+    {
+        //! Deallocate, allocate new space, copy values.
+        delete dataSet;
+        dataSet = new set < Data_SafeData >;
+        set < Data_SafeData >::iterator iter;
+        for (iter = rhs.dataSet->begin(); iter != rhs.dataSet->end(); ++ iter)
+        {
+            dataSet->insert(*iter);
+        }
+    }
+
+    return *this;
+}
+
+void Data_Param::CopyDataValue(void *dataout, void *data, int type, int size)
+{
+    if (data == 0) return;
+    Data_Util::copy_data_exist(dataout, data, type, size);
+}
+
+}
\ No newline at end of file
diff --git a/API/Data/src/Data_ParamFieldSuite.cpp b/API/Data/src/Data_ParamFieldSuite.cpp
new file mode 100644
index 0000000..f5bbc2c
--- /dev/null
+++ b/API/Data/src/Data_ParamFieldSuite.cpp
@@ -0,0 +1,59 @@
+#include "Data_ParamFieldSuite.h"
+#include "Data_Param.h"
+#include "Data_Field.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Data_ParamFieldSuite::Data_ParamFieldSuite(bool init)
+{ 
+    if (init)
+    {
+        param = new Data_Param();
+        field = new Data_Field();
+    }
+    else
+    {
+        param = 0;
+        field = 0;
+    }
+}
+
+LIB_EXPORT Data_ParamFieldSuite::~Data_ParamFieldSuite()
+{
+    if (param)
+    {
+        delete param;
+    }
+    if (field)
+    {
+        delete field;
+    }
+}
+
+LIB_EXPORT void Data_ParamFieldSuite::UpdateData(const string &name, void *data, int type, int size)
+{
+    param->UpdateData(name, data, type, size);
+}
+
+LIB_EXPORT void Data_ParamFieldSuite::GetData(const string &name, void *data, int type, int size)
+{
+    param->GetData(name, data, type, size);
+}
+
+LIB_EXPORT void Data_ParamFieldSuite::UpdateDataPtr(const string &name, void *data)
+{
+    field->UpdateDataPtr(name, data);
+};
+
+LIB_EXPORT void * Data_ParamFieldSuite::GetDataPtr(const string &name) const
+{
+    return field->GetDataPtr(name);
+};
+
+LIB_EXPORT void Data_ParamFieldSuite::DeleteDataPtr(const string &name)
+{
+    field->DeleteDataPtr(name);
+}
+
+}
\ No newline at end of file
diff --git a/API/Data/src/Data_SafeData.cpp b/API/Data/src/Data_SafeData.cpp
new file mode 100644
index 0000000..f0d498b
--- /dev/null
+++ b/API/Data/src/Data_SafeData.cpp
@@ -0,0 +1,138 @@
+#include <iostream>
+#include <stdlib.h>
+#include "Data_SafeData.h"
+#include "Data_Util.h"
+#include "Constants.h"
+
+namespace PHSPACE
+{
+
+Data_SafeData::Data_SafeData(const string &name, void *data, int type, int size)
+{
+    this->name = name;
+    this->data = NULL;
+    CopyData(data, type, size);
+}
+
+Data_SafeData::Data_SafeData(const Data_SafeData &rhs)
+{
+    name = rhs.name;
+    this->data = 0;
+    CopyData(rhs.data, rhs.type, rhs.size);
+}
+
+Data_SafeData::~Data_SafeData()
+{
+    this->DeleteData();
+}
+
+void Data_SafeData::OverWrite(void *data, int type, int size)
+{
+    //! Firstly, delete the old memory.
+    DeleteData();
+    //! Overwrite the old data.
+    CopyData(data, type, size);
+}
+
+void Data_SafeData::ShowData()
+{
+    cout << "name = " << name << "\n";
+    cout << "type = " << type << "\n";
+    cout << "size = " << size << "\n";
+    if (type == PHSPACE::PHSTRING)
+    {
+        string * mydata = reinterpret_cast<string *> (data);
+        for (int i = 0; i < size; ++ i)
+        {
+            cout << "var[" << i << "] = " << mydata[i] << "\n";
+        }
+        cout << "\n";
+    }
+    else if (type == PHSPACE::PHINT)
+    {
+        int *mydata = reinterpret_cast<int *> (data);
+        for (int i = 0; i < size; ++ i)
+        {
+            cout << "var[" << i << "] = " << mydata[i] << "\n";
+        }
+        cout << "\n";
+    }
+    else if (type == PHSPACE::PHFLOAT)
+    {
+        RFloat *mydata = reinterpret_cast<RFloat *> (data);
+        for (int i = 0; i < size; ++ i)
+        {
+            cout << "var[" << i << "] = " << mydata[i] << "\n";
+        }
+        cout << "\n";
+    }
+    else if (type == PHSPACE::PHDOUBLE)
+    {
+        RDouble *mydata = reinterpret_cast<RDouble *> (data);
+        for (int i = 0; i < size; ++ i)
+        {
+            cout << "var[" << i << "] = " << mydata[i] << "\n";
+        }
+        cout << "\n";
+    }
+}
+
+bool Data_SafeData::operator < (const Data_SafeData &rhs) const
+{
+    return name < rhs.name;
+}
+
+Data_SafeData & Data_SafeData::operator = (const Data_SafeData &rhs)
+{
+    if (this == &rhs)
+    {
+        return *this;
+    }
+    this->name = rhs.name;
+
+    OverWrite(rhs.data, rhs.type, rhs.size);
+    return *this;
+}
+
+void Data_SafeData::CopyData(void *data, int type, int size)
+{
+    this->type = type;
+    this->size = size;
+    if (data == NULL) return;
+
+    Data_Util::copy_data_sub(this->data, data, type, size);
+}
+
+void Data_SafeData::DeleteData()
+{
+    if (data == 0) return;
+
+    if (type == PHSPACE::PHINT)
+    {
+        Data_Util::delete_void <int> (data);
+    }
+    else if (type == PHSPACE::PHFLOAT)
+    {
+        Data_Util::delete_void <RFloat> (data);
+    }
+    else if (type == PHSPACE::PHDOUBLE)
+    {
+        Data_Util::delete_void <RDouble> (data);
+    }
+    else if (type == PHSPACE::PHSTRING)
+    {
+        Data_Util::delete_void <string> (data);
+    }
+    else if (type == PHSPACE::PHBOOL)
+    {
+        Data_Util::delete_void <bool> (data);
+    }
+    else
+    {
+        cout << "No such type\n" << endl;
+        abort();    //! It is temporary!!!
+    }
+    this->data = 0;
+}
+
+}
\ No newline at end of file
diff --git a/API/Data/src/Data_Util.cpp b/API/Data/src/Data_Util.cpp
new file mode 100644
index 0000000..d0546d6
--- /dev/null
+++ b/API/Data/src/Data_Util.cpp
@@ -0,0 +1,70 @@
+#include <string>
+#include <iostream>
+#include <stdlib.h>
+#include "Data_Util.h"
+#include "Constants.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+void Data_Util::copy_data_sub(void *&target, void *source, int type, int size)
+{
+    if (type == PHSPACE::PHINT)
+    {
+        copy_void <int> (target, source, size);
+    }
+    else if (type == PHSPACE::PHFLOAT)
+    {
+        copy_void <RFloat> (target, source, size);
+    }
+    else if (type == PHSPACE::PHDOUBLE)
+    {
+        copy_void <RDouble> (target, source, size);
+    }
+    else if (type == PHSPACE::PHSTRING)
+    {
+        copy_void <std::string> (target, source, size);
+    }
+    else if (type == PHSPACE::PHBOOL)
+    {
+        copy_void <bool> (target, source, size);
+    }
+    else
+    {
+        cout << "No such type\n" << endl;
+        abort();    //! It is temporary!!!
+    }
+}
+
+void Data_Util::copy_data_exist(void *target, void *source, int type, int size)
+{
+    if (type == PHSPACE::PHINT)
+    {
+        copy_void_exist <int> (target, source, size);
+    }
+    else if (type == PHSPACE::PHFLOAT)
+    {
+        copy_void_exist <RFloat> (target, source, size);
+    }
+    else if (type == PHSPACE::PHDOUBLE)
+    {
+        copy_void_exist <RDouble> (target, source, size);
+    }
+    else if (type == PHSPACE::PHSTRING)
+    {
+        copy_void_exist <std::string> (target, source, size);
+    }
+    else if (type == PHSPACE::PHBOOL)
+    {
+        copy_void_exist <bool> (target, source, size);
+    }
+    else
+    {
+        cout << "No such type\n" << endl;
+        abort();    //! It is temporary!!!
+    }
+}
+
+}
\ No newline at end of file
diff --git a/API/Data/src/GlobalDataBase.cpp b/API/Data/src/GlobalDataBase.cpp
new file mode 100644
index 0000000..4d55930
--- /dev/null
+++ b/API/Data/src/GlobalDataBase.cpp
@@ -0,0 +1,247 @@
+#include "GlobalDataBase.h"
+#include "Constants.h"
+#include "DataContainer.h"
+
+using namespace std;
+#pragma warning (disable:913)
+namespace PHSPACE
+{
+Data_Param * GlobalDataBase::globalParam = new Data_Param();
+Data_Field * GlobalDataBase::globalField = new Data_Field();
+
+void GlobalDataBase::UpdateData(const string &name, void *data, int type, int size)
+{
+    globalParam->UpdateData(name, data, type, size);
+}
+
+void GlobalDataBase::GetData(const string &name, void *data, int type, int size)
+{
+    globalParam->GetData(name, data, type, size);
+}
+
+int GlobalDataBase::GetSizeOfData(const string &name)
+{
+    return globalParam->GetSizeOfData(name);
+}
+
+void GlobalDataBase::UpdateDataPtr(const string &name, void *data)
+{
+    globalField->UpdateDataPtr(name, data);
+};
+
+void GlobalDataBase::DeleteDataPtr(const string &name)
+{
+    globalField->DeleteDataPtr(name);
+};
+
+void * GlobalDataBase::GetDataPtr(const string &name)
+{
+    return globalField->GetDataPtr(name);
+};
+
+set < Data_SafeData > * GlobalDataBase::GetBaseP()
+{
+    return globalParam->GetBaseP();
+};
+
+Data_Param * GlobalDataBase::GetDataPara() 
+{
+    return globalParam;
+};
+
+void GlobalDataBase::WriteString(DataContainer *cdata, const string &cs)
+{
+    int nlen = static_cast<int>(cs.length());
+    cdata->write(&nlen, sizeof(int));
+
+    char *data = new char[nlen+1];
+
+    cs.copy(data, nlen);
+    data[nlen] = '\0';
+
+    cdata->write(data, nlen+1);
+
+    delete [] data;
+}
+
+void GlobalDataBase::ReadString(DataContainer *cdata, string &cs)
+{
+    int nlen = 0;
+    cdata->read(&nlen, sizeof(int));
+
+    char *data = new char[nlen+1];
+    cdata->read(data, nlen+1);
+
+    cs = data;
+
+    delete [] data;
+}
+
+void GlobalDataBase::WriteVoid(DataContainer *cdata, void *data, int type, int size)
+{
+    if (type == PHSTRING)
+    {
+        string * mydata = reinterpret_cast<string *> (data);
+        for (int i = 0; i < size; ++ i)
+        {
+            WriteString(cdata, mydata[i]);
+        }
+    }
+    else if (type == PHINT)
+    {
+        int *mydata = reinterpret_cast<int *> (data);
+        for (int i = 0; i < size; ++ i)
+        {
+            cdata->write(&mydata[i], sizeof(int));
+        }
+    }
+    else if (type == PHFLOAT)
+    {
+        RFloat *mydata = reinterpret_cast<RFloat *> (data);
+        for (int i = 0; i < size; ++ i)
+        {
+            cdata->write(&mydata[i], sizeof(RFloat));
+        }
+    }
+    else if (type == PHDOUBLE)
+    {
+        RDouble *mydata = reinterpret_cast<RDouble *> (data);
+        for (int i = 0; i < size; ++ i)
+        {
+            cdata->write(&mydata[i], sizeof(RDouble));
+        }
+    }
+}
+
+void GlobalDataBase::UpdateData(DataContainer *cdata, const string &name, int type, int size)
+{
+    if (type == PHSTRING)
+    {
+        string *data = new string [size];
+        for (int i = 0; i < size; ++ i)
+        {
+            ReadString(cdata, data[i]);
+        }
+        UpdateData(name, data, type, size);
+        delete [] data;
+    }
+    else if (type == PHINT)
+    {
+        int *data = new int [size];
+        for (int i = 0; i < size; ++ i)
+        {
+            cdata->read(&data[i], sizeof(int));
+        }
+        UpdateData(name, data, type, size);
+        delete [] data;
+    }
+    else if (type == PHFLOAT)
+    {
+        RFloat *data = new RFloat [size];
+        for (int i = 0; i < size; ++ i)
+        {
+            cdata->read(&data[i], sizeof(RFloat));
+        }
+        UpdateData(name, data, type, size);
+        delete [] data;
+    }
+    else if (type == PHDOUBLE)
+    {
+        RDouble *data = new RDouble [size];
+        for (int i = 0; i < size; ++ i)
+        {
+            cdata->read(&data[i], sizeof(RDouble));
+        }
+        UpdateData(name, data, type, size);
+        delete [] data;
+    }
+}
+
+void GlobalDataBase::CompressData(DataContainer *&cdata)
+{
+    set < Data_SafeData > *basep = GetBaseP();
+    set < Data_SafeData >::iterator iter;
+
+    uint_t ndata = basep->size();
+
+    cdata->write(&ndata, sizeof(uint_t));
+
+    for (iter = basep->begin(); iter != basep->end(); ++ iter)
+    {
+        int type = iter->GetType();
+        int size = iter->GetSize();
+
+        WriteString(cdata, iter->GetName());
+        cdata->write(&type, sizeof(int));
+        cdata->write(&size, sizeof(int));
+        WriteVoid(cdata, iter->GetData(), type, size);
+    }
+}
+
+void GlobalDataBase::DecompressData(DataContainer *cdata)
+{
+    //! It seems that move cdata to the beginning is very important.
+    cdata->moveto_begin();
+
+    uint_t ndata = 0;
+    cdata->read(&ndata, sizeof(uint_t));
+
+    for (uint_t i = 0; i < ndata; ++ i)
+    {
+        string name;
+        int type;
+        int size;
+
+        ReadString(cdata, name);
+        cdata->read(&type, sizeof(int));
+        cdata->read(&size, sizeof(int));
+        UpdateData(cdata, name, type, size);
+    }
+}
+
+string GlobalDataBase::GetStrParaFromDB(const string &name)
+{
+    string data;
+    GetData(name, &data, PHSTRING, 1);
+    return data;
+}
+
+int GlobalDataBase::GetIntParaFromDB(const string &name)
+{
+    int data;
+    GetData(name, &data, PHINT, 1);
+    return data;
+}
+
+RDouble GlobalDataBase::GetDoubleParaFromDB(const string &name)
+{
+    RDouble data;
+    GetData(name, &data, PHDOUBLE, 1);
+    return data;
+}
+
+bool GlobalDataBase::IsExist(const string &name, int type, int size)
+{
+    return globalParam->IsExist(name, type, size);
+}
+
+RDouble * GlobalDataBase::GetRDoubleArrayFromDB(const string &name, int numberOfElements)
+{
+    RDouble *rRDoubleArray = new RDouble[numberOfElements];
+    GetData(name, rRDoubleArray, PHDOUBLE, numberOfElements);
+    return rRDoubleArray;
+}
+
+void GlobalDataBase::GetRDoubleVectorFromDB(vector< RDouble > &parameter, const string &nameOfRFloatArray, int numberOfElements)
+{
+    parameter.resize(numberOfElements);
+    GetData(nameOfRFloatArray, &parameter[0], PHDOUBLE, numberOfElements);
+}
+
+LIB_EXPORT int GetTaskCode()
+{
+    int nsimutask = GlobalDataBase::GetIntParaFromDB("nsimutask");
+    return nsimutask;
+}
+
+}
\ No newline at end of file
diff --git a/API/DataStruct/include/DataContainer.h b/API/DataStruct/include/DataContainer.h
new file mode 100644
index 0000000..816d141
--- /dev/null
+++ b/API/DataStruct/include/DataContainer.h
@@ -0,0 +1,273 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      DataContainer.h
+//! @brief     It defines kernel data structure of PHengLEI, named 'DataContainer'.
+//!            All types of data are standardized into DataChar. "Three-In-One" data is designed:
+//!            1 - MPI communication; 2 - File I/O; 3 - Communication for hybrid parallel.
+//! @author    Bell, Xu Qingxin, He Xin.
+
+#pragma once
+#include <fstream>
+#include <string>
+#include "TypeDefine.h"
+#include "AMRDef.h"
+using namespace std;
+
+namespace PHSPACE
+{
+class DataChar;
+typedef vector< char >::size_type CharVecSizeType;
+typedef vector< DataChar * >::size_type ContainerSizeType;
+typedef string::size_type StringSizeType;
+//! the purpose of designing DataContainer is to make up the deficiencies of the original DataChar.
+//! the interface should look like to be the same as the DataChar.
+//! the design concept is as this at least.
+class DataContainer
+{
+public:
+    typedef int iterator;
+public:
+    DataContainer(DataContainer *rhs);    // Bell add, but i am not sure it's perfect right.
+    DataContainer();
+    ~DataContainer();
+private:
+    vector< DataChar * > *data;
+    iterator start;
+    iterator finish;
+    CharVecSizeType pos, elem_pos, max_unit_size;
+
+public:
+
+    //! get data from vector *data.
+    DataChar * getcurr();
+
+    //! return vector *data's value at the site of i.
+    DataChar * getiter(ContainerSizeType i);
+
+    //! return start.
+    iterator begin() { return start; }
+
+    //! return finish.
+    iterator end() { return finish; };
+
+    //! invoking delete function to delete *iter.
+    void destroy(DataChar *iter);
+
+    //!invoking destroy function to delete *iter data,start with ist and end with ied.
+    //!@param[in ]: ist  begin position.
+    //!@param[in ]: ied  end position
+    void erase(ContainerSizeType ist, ContainerSizeType ied);
+
+    //! return the number of vector *data 
+    ContainerSizeType element_size();
+
+    //!read DataContainer vector<char> * data,and receive it by void *data.
+    //!@param[in ]: *data , target object.
+    //!@param[in ]: size
+    void read(void *data, CharVecSizeType size);
+
+    //!write *data into DataContainer vector<char> *data
+    //!@param[in ]: *data ,source object.
+    //!@param[in ]: size
+    void write(void *data, CharVecSizeType size);
+
+    //!initialize dataContainer with char 
+    void write(DataContainer *dataContainer);
+
+    //!read data from file.
+    void readfile(fstream &file);
+
+    //!write data into file.
+    void writefile(fstream &file);
+
+    //!read DataContainer vector<char> *data, and put it in cs.
+    void read_string(string &cs);
+
+    //!write cs into DataContainer vector<char> *data.
+    void write_string(string &cs);
+
+    //!put oss data into vector<char> *data.
+    void write(ostringstream *oss);
+
+    //!return size of sum of all data object.
+    CharVecSizeType size();
+
+    //!vector<char> *data object resize itself.
+    void resize(CharVecSizeType nlen);
+
+    //!char transform to string
+    void to_string(string &str);
+
+    //!link another data
+    void append(void *data, CharVecSizeType size);
+
+    //!link sting object
+    void append_string(string &cs);
+
+    //!before invoking resize function, calculate it size.
+    void secure_relative_space(CharVecSizeType size);
+
+    //! invoking resize function.
+    void secure_absolute_space(CharVecSizeType need_size);
+
+    //! invoking moveto function.
+    void moveto_begin();
+
+    //! invoking moveto function.
+    void moveto_end();
+
+    //! calculate: pos += size;
+    void forward_position(ContainerSizeType size);
+
+private:
+
+    //!use new DataChar object fill up ,until the size equal new_size.
+    void element_resize(ContainerSizeType new_size);
+
+    //!return max_unit_size - remainder;
+    CharVecSizeType remain();
+
+public:
+
+    //!invoking DataChar::read function
+    //! @param[in ]:   *data :  target object.\n
+    //! @param[in ]:
+    void static_read(void *data, CharVecSizeType size);
+
+    //!invoking DataChar::write function
+    //! @param[in ]: *data :source object.\n
+    //! @param[in ]:
+    void static_write(void *data, CharVecSizeType size);
+
+
+    //!invoking DataChar::read function with two parameter
+    //! @param[in ]:   *data :  target object.\n
+    //! @param[in ]:
+    //! @param[in ]:
+    void static_read(CharVecSizeType begin, void *data, CharVecSizeType size);
+
+    //!invoking DataChar::write function with two parameter
+    //! @param[in ]:  *data  :source object.\n
+    //! @param[in ]:
+    //! @param[in ]:
+    void static_write(CharVecSizeType begin, void *data, CharVecSizeType size);
+public:
+
+    //!return size of sum of all data object
+    CharVecSizeType my_size(streamsize size);
+
+    //!
+    streamsize get_remainder(streamsize position) 
+        const { return position % max_unit_size; }
+
+    //!
+    int get_element_index(streamsize position) 
+        const { return (int)(position / max_unit_size); }
+
+    //!
+    streamsize get_element_pos(streamsize elem) 
+        const { return elem * max_unit_size; }
+public:
+
+    //!from elem_beg to elem_num.use  moveto(0) function initial vector<char> * data .
+    //! @param[in ]: buf_beg   : \n
+    //! @param[in ]: elem_beg  : the number of invoking moveto_begin() function.\n
+    //! @param[in ]: elem_num  : the number of invoking moveto_begin() function.
+    void init_buffer(CharVecSizeType buf_beg, int elem_beg, int elem_num);
+
+    //!
+    //! @param[in ]: ptr_elem_len  : use to resize vector<char> *data.\n
+    //! @param[in ]: ptr_elem_beg  : use to store which object to be resize.\n
+    //! @param[in ]: ptr_elem_num  : use to store which object to be resize.\n
+    //! @param[in ]: elem_num
+    //! @param[in ]: ptr_dim
+    void init_buffer(int elem_num, int ptr_dim, ContainerSizeType *ptr_elem_beg, 
+         ContainerSizeType *ptr_elem_len, ContainerSizeType *ptr_elem_num);
+};
+
+class DataChar
+{
+public:
+    DataChar();
+    ~DataChar();
+public:
+
+    //!
+    CharVecSizeType size();
+
+    //! invoking function memcpy
+    //! @param[in ]:   *data : target object.\n
+    //! @param[in ]:        
+    void read(void *data, CharVecSizeType size);
+
+    //! invoking function read with two parameter
+    //! @param[in ]:   *data :  target object.\n
+    //! @param[in ]:   pos:     moveto(pos);\n
+    //! @param[in ]:
+    void read(void *data, CharVecSizeType size, int pos);
+
+    //! invoking function memcpy
+    //! @param[in ]:   *data :source object.\n
+    //! @param[in ]:            
+    void write(void *data, CharVecSizeType size);
+
+    //! invoking function write with two parameter
+    //! @param[in ]:   *data:    source object.\n
+    //! @param[in ]:   pos:      moveto(pos);\n
+    //! @param[in ]:
+    void write(void *data, CharVecSizeType size, int pos);
+
+    //!file.read(data, nlen);
+    void readfile(fstream &file);
+
+    //!file.write(data, nlen);
+    void writefile(fstream &file);
+
+    //!str.append(begin(),size());
+    void to_string(string &str);
+
+    //!return &((*data)[0]);
+    char * begin();
+
+    //!
+    void moveto_begin() { moveto(0); }
+
+    //!
+    void moveto_end() { pos = size(); }
+
+    //!invoking data->resize(size);
+    void resize(CharVecSizeType size);
+
+    //!return &((*data)[pos]);
+    char * data_pointer();
+
+    //! calculate pos += size;
+    void forward_position(CharVecSizeType size);
+
+private:
+
+    //!
+    void moveto(CharVecSizeType pos);
+
+private:
+    CharVecSizeType pos;
+    vector<char> *data;
+
+public:
+
+    //!
+    char * data_pointer(int beg) { return &((*data)[beg]); }
+};
+
+//!return reinterpret_cast<char *>(data) + size;
+char * move_pointer(void *data, streamsize size);
+}
diff --git a/API/DataStruct/include/DataStruct_AdtNode.h b/API/DataStruct/include/DataStruct_AdtNode.h
new file mode 100644
index 0000000..502e47e
--- /dev/null
+++ b/API/DataStruct/include/DataStruct_AdtNode.h
@@ -0,0 +1,83 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      DataStruct_AdtNode.h
+//! @brief     DataStruct_AdtNode defines a "Node" data structure used by ADT Tree.
+//!            The "node" has its coordinates(x, y, z), level in the tree, and pointer to its "son" node.
+//!            Data is stored in node's item.
+//! @author    Bell, He Xin, reference from Dr. Wang.
+
+#pragma once
+#include <vector>
+#include <queue>
+#include <string.h>
+#include "Precision.h"
+using namespace std;
+
+namespace PHSPACE 
+{
+
+template < typename T, typename U >
+class DataStruct_AdtNode 
+{
+public:
+    typedef DataStruct_AdtNode<T,U> AdtNode;
+    typedef vector<AdtNode *> AdtNodeList;
+    typedef typename AdtNodeList::iterator AdtNodeListIter;
+
+public:
+    //! The coordinate of the node.
+    U *point;
+
+    //! The level in the tree.
+    int level; 
+
+    //! The left tree.
+    AdtNode *left;
+
+    //! The right tree.
+    AdtNode *right;
+
+    //! Any data stored.
+    T item;
+
+    //! The dimension of point's coordinates.
+    int ndim;
+
+public:
+    //! Constructor, default dimension is three.
+    DataStruct_AdtNode(int ndim = 3);
+
+    //! Constructor, set with coordinates and data.
+    DataStruct_AdtNode(int ndim, U *coor, T data);
+
+    //! Destructor.
+    ~DataStruct_AdtNode();
+
+    //! Add an Adt node under the current node .
+    void AddNode(AdtNode *node, U *nwmin, U *nwmax, const int &ndim);
+
+    //! Judge if its the current node inside region (pmin,pmax).
+    bool IsInRegion(U *pmin, U *pmax, const int &ndim);
+
+    //! Find all the nodes inside region (pmin,pmax) among all descendant nodes, (including node self).
+    void FindNodesInRegion(U *pmin, U *pmax, U *nwmin, U *nwmax, const int &ndim, AdtNodeList &ld, const uint_t &sizeLimit = 0);
+
+    //! Count all the descendant nodes, including self.
+    int GetNodeNum();
+
+    //! Get the date stored in item.
+    T GetData() const { return item; }
+};
+
+#include "DataStruct_AdtNode.hxx"
+
+}
\ No newline at end of file
diff --git a/API/DataStruct/include/DataStruct_AdtNode.hxx b/API/DataStruct/include/DataStruct_AdtNode.hxx
new file mode 100644
index 0000000..e3880b8
--- /dev/null
+++ b/API/DataStruct/include/DataStruct_AdtNode.hxx
@@ -0,0 +1,143 @@
+template < typename T, typename U >
+DataStruct_AdtNode<T, U>::DataStruct_AdtNode(int ndim)
+{
+    this->ndim = ndim;
+    point = new U[ndim];
+    level = 0;
+    left  = 0;
+    right = 0;
+}
+
+template < typename T, typename U >
+DataStruct_AdtNode<T, U>::DataStruct_AdtNode(int ndim, U *coor, T data)
+{
+    this->ndim = ndim;
+    point = new U[ndim];
+    memcpy(point, coor, ndim*sizeof(U));
+
+    level = 0;
+    left  = 0;
+    right = 0;
+    item  = data;
+}
+
+template < typename T, typename U >
+DataStruct_AdtNode<T, U>::~DataStruct_AdtNode()
+{
+    delete [] point;
+    delete left;
+    delete right;
+}
+
+template < typename T, typename U >
+int DataStruct_AdtNode<T, U>::GetNodeNum()
+{
+    int count = 0;
+    count += 1;
+    if (this->left)
+    {
+        count += left->GetNodeNum();
+    }
+    if (this->right)
+    {
+        count += right->GetNodeNum();
+    }
+    return count;
+}
+
+//! Add an Adt node under the current node.
+template < typename T, typename U >
+void DataStruct_AdtNode<T, U>::AddNode(AdtNode *node, U *nwmin, U *nwmax, const int &ndim)
+{
+    int axis = level%ndim;
+    U mid = 0.5 * (nwmin[axis] + nwmax[axis]);
+
+    if (node->point[axis] <= mid)
+    {
+        if (left)
+        {
+            nwmax[axis] = mid;
+            left->AddNode(node, nwmin, nwmax, ndim);
+        }
+        else
+        {
+            left = node;
+            node->level = level + 1;
+        }
+    }
+    else
+    {
+        if (right)
+        {
+            nwmin[axis] = mid;
+            right->AddNode(node, nwmin, nwmax, ndim);
+        }
+        else
+        {
+            right = node;
+            node->level = level + 1;
+        }
+    }
+}
+
+// is the current node inside region (pmin,pmax)?
+template < typename T, typename U >
+bool DataStruct_AdtNode<T, U>::IsInRegion(U *pmin, U *pmax, const int &ndim)
+{
+    for (int i = 0; i < ndim; ++ i)
+    {
+        if (point[i] < pmin[i] || point[i] > pmax[i])
+        {
+            return false;
+        }
+    }
+
+    return true;
+}
+
+// ld carries all the nodes inside region (pmin,pmax)
+template < typename T, typename U >
+void DataStruct_AdtNode<T, U>::FindNodesInRegion(U *pmin, U *pmax, U *nwmin, U *nwmax, const int &ndim, AdtNodeList &ld, const uint_t & sizeLimit)
+{
+    int axis;
+    U mid, temp;
+
+    if (IsInRegion(pmin, pmax, ndim))
+    {
+        ld.push_back(this);
+    }
+
+    uint_t sizeInList = ld.size();
+
+    if (sizeLimit > 0 && sizeInList >= sizeLimit)
+    {
+        return;
+    }
+
+    axis = level%ndim;
+    mid = 0.5 * (nwmin[axis] + nwmax[axis]);
+
+    if (left)
+    {
+        if (pmin[axis] <= mid && pmax[axis] >= nwmin[axis])
+        {
+            temp        = nwmax[axis];
+            nwmax[axis] = mid;
+            left->FindNodesInRegion(pmin, pmax, nwmin, nwmax, ndim, ld, sizeLimit);
+            nwmax[axis] = temp;
+        }
+    }
+
+    if (right)
+    {
+        if (pmax[axis] >= mid && pmin[axis] <= nwmax[axis])
+        {
+            temp        = nwmin[axis];
+            nwmin[axis] = mid;
+            right->FindNodesInRegion(pmin, pmax, nwmin, nwmax, ndim, ld, sizeLimit);
+            nwmin[axis] = temp;
+        }
+    }
+
+    return;
+}
\ No newline at end of file
diff --git a/API/DataStruct/include/DataStruct_AdtTree.h b/API/DataStruct/include/DataStruct_AdtTree.h
new file mode 100644
index 0000000..3375a61
--- /dev/null
+++ b/API/DataStruct/include/DataStruct_AdtTree.h
@@ -0,0 +1,78 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      DataStruct_AdtTree.h
+//! @brief     DataStruct_AdtTree defines a ADT Tree data structure.
+//!            The tree starts from root node, and has a coordinates range limit.
+//!            The node's definition refers to DataStruct_AdtNode.
+//! @author    Bell, He Xin, reference from Dr. Wang.
+
+#pragma once
+#include "DataStruct_AdtNode.h"
+
+namespace PHSPACE
+{
+
+template < typename T, typename U >
+class DataStruct_AdtTree
+{
+public:
+    typedef typename DataStruct_AdtNode<T,U>::AdtNode         AdtNode;
+    typedef typename DataStruct_AdtNode<T,U>::AdtNodeList     AdtNodeList;
+    typedef typename DataStruct_AdtNode<T,U>::AdtNodeListIter AdtNodeListIter;
+    typedef          DataStruct_AdtTree<T,U>                  AdtTree;
+
+private:
+    int ndim;
+    U *pmin, *pmax;
+    AdtNode *root;
+
+public:
+    //! Construct an Adt tree.
+    //! @param[in] ndim the dimension of element's coordinate in node, default is 3.
+    //! The element's numerical range is default with 0 to 1.
+    DataStruct_AdtTree(int ndim = 3);
+
+    //! Construct an Adt tree with the region's elements' coordinate range.
+    //! pmin and pmax is a pointer to a ndim array which stores each dimension's elements' coordinate range.
+    //! @param[in] ndim the dimension of elements coordinate in node
+    //! @param[in] pmin the minimum value of all elements' coordinate
+    //! @param[in] pmax the maximum value of all elements' coordinate
+    DataStruct_AdtTree(int ndim, U *pmin, U *pmax);
+
+    //! Destructor.
+    ~DataStruct_AdtTree();
+
+    //! Add an Adt node to the AdtTree.
+    void AddNode(AdtNode *node);
+
+    //! Find All nodes inside the region (pmin,pmax) from the tree.
+    void FindNodesInRegion(U *pmin, U *pmax, AdtNodeList &ld, const size_t &sizeLimit = 0);
+
+    //! Get the total number of all nodes.
+    int GetNodeNum();
+
+    //! Get the min coordinates of the tree.
+    U * GetMin() const;
+
+    //! Get the max coordinates of the tree.
+    U * GetMax() const;
+
+    //! Get the root node of this tree.
+    AdtNode * GetRoot() const;
+
+    //! Traverse all the node from root.
+    void LevelTraverse() const;
+
+};
+#include "DataStruct_AdtTree.hxx"
+
+}
\ No newline at end of file
diff --git a/API/DataStruct/include/DataStruct_AdtTree.hxx b/API/DataStruct/include/DataStruct_AdtTree.hxx
new file mode 100644
index 0000000..e4052aa
--- /dev/null
+++ b/API/DataStruct/include/DataStruct_AdtTree.hxx
@@ -0,0 +1,137 @@
+template < typename T, typename U >
+DataStruct_AdtTree<T, U>::DataStruct_AdtTree(int ndim)
+{
+    this->ndim = ndim;
+    pmin = new U[ndim];
+    pmax = new U[ndim];
+    for (int i = 0; i < ndim; ++ i)
+    { 
+        pmin[i] = 0.0;
+        pmax[i] = 1.0;
+    }
+    root = 0;
+}
+
+template < typename T, typename U >
+DataStruct_AdtTree<T, U>::DataStruct_AdtTree(int ndim, U *pmin, U *pmax)
+{
+    this->ndim = ndim;
+    this->pmin = new U[ndim];
+    this->pmax = new U[ndim];
+    for (int i = 0; i < ndim; ++ i)
+    { 
+        this->pmin[i] = pmin[i];
+        this->pmax[i] = pmax[i];
+    }
+    root = 0;
+}
+
+template < typename T, typename U >
+DataStruct_AdtTree<T, U>::~DataStruct_AdtTree()
+{  
+    delete [] pmin;
+    delete [] pmax;
+    delete root;
+}
+
+// Add an Adt node to the AdtTree 
+template < typename T, typename U >
+void DataStruct_AdtTree<T, U>::AddNode(AdtNode *node)
+{
+    //�����ƺ����Լ���,��Ҫ��new��newȥ��
+    U *nwmin = new U[ndim];
+    U *nwmax = new U[ndim];
+    memcpy(nwmin, this->pmin, ndim*sizeof(U));
+    memcpy(nwmax, this->pmax, ndim*sizeof(U));
+
+    if (root == 0)
+    {
+        root = node;
+    }
+    else
+    {
+        root->AddNode(node, nwmin, nwmax, ndim);
+    }
+        
+    delete [] nwmin;
+    delete [] nwmax;
+}
+
+// Find All nodes inside the region (pmin,pmax) from the tree
+template < typename T, typename U >
+void DataStruct_AdtTree<T, U>::FindNodesInRegion(U *pmin, U *pmax, AdtNodeList &ld, const size_t &sizeLimit)
+{
+    U *nwmin = new U[ndim];
+    U *nwmax = new U[ndim];
+    memcpy(nwmin, this->pmin, ndim*sizeof(U));
+    memcpy(nwmax, this->pmax, ndim*sizeof(U));
+
+    if (root)
+    {
+        root->FindNodesInRegion(pmin, pmax, nwmin, nwmax, ndim, ld, sizeLimit);
+    }
+    delete [] nwmin;
+    delete [] nwmax;
+}
+
+// Get the min coordinates of the tree
+template < typename T, typename U >
+U * DataStruct_AdtTree<T, U>::GetMin() const
+{
+    return pmin;
+}
+
+// Get the max coordinates of the tree
+template < typename T, typename U >
+U * DataStruct_AdtTree<T, U>::GetMax() const
+{
+    return pmax;
+}
+
+template < typename T, typename U >
+void DataStruct_AdtTree<T, U>::LevelTraverse() const
+{
+    queue< AdtNode * > nodeQueue;
+    AdtNode *start = root;
+    if (start == 0)
+    {
+        return;
+    }
+
+    nodeQueue.push(start);
+    while (!nodeQueue.empty())
+    {
+        start = nodeQueue.front();
+        nodeQueue.pop();
+
+        //cout<<start->item<<" ";
+        if (start->left)
+        {
+            nodeQueue.push(start->left);
+        }
+        if (start->right)
+        {
+            nodeQueue.push(start->right);
+        }
+    }
+}
+
+template < typename T, typename U >
+int  DataStruct_AdtTree<T, U>::GetNodeNum()
+{ 
+    if (root)
+    {
+        return root->GetNodeNum();
+    }
+    else
+    {
+        return 0;
+    }
+}
+
+template < typename T, typename U >
+typename DataStruct_AdtTree<T, U>::AdtNode * DataStruct_AdtTree<T,U>::GetRoot() const
+{
+    return root;
+}
+
diff --git a/API/DataStruct/include/DataStruct_Array.h b/API/DataStruct/include/DataStruct_Array.h
new file mode 100644
index 0000000..d8bdaca
--- /dev/null
+++ b/API/DataStruct/include/DataStruct_Array.h
@@ -0,0 +1,574 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      DataStruct_Array.h
+//! @brief     PHArray defines a multidimensional array class. It is a template class.
+//!            PHArray<T,N> refers to a N-dimensional T type array
+//!            We can construct a multidimensional array by specify every dimension's length or range.
+//!            The way of underlying data's storage follow the example of fortran,
+//!            e.g. we can construct an 3d RDouble type array by length, PHArray<RDouble,3> array3d = PH<RDouble,3>(10, 20, 30)
+//!            and access the i,j,k index data by operator(), i.e. array3d(i,j,k).
+//!            The underlying data's memory storage sequence is from innermost(i) layer to outermost layer(k).
+//!            So, if we loop over all the data, we recommend you loop from k to i, i.e for(k,...){for(j,...){for(i,...)}}}
+//!            PHArray class also implement some other array's scalar operatation +=, -=, *=, /=, e.g. array1 *= 0.1.
+//!            Some other set operator like =, +, -, *, /. We can directly use these operators to PHArray object
+//!            e.g. dql(I, J, K, M) = MUSCLCoefXb * qr(I, J, K, M)
+//! @author    He Xin, Zhang Jian, referred from Blitz.
+#pragma once
+#include <cstddef>
+#include <stdexcept>
+#include <stdlib.h>
+#include "PHSimpleArray.h"
+#include "PHStorage.h"
+#include "PHMemblock.h"
+#include "PHProduct.h"
+#include "PHETBase.h"
+#include "PHSlice.h"    //! Sub-arrays and slicing.
+
+namespace PHSPACE
+{
+
+template < typename T, int N >
+class PHFastArrayIterator;
+
+template < typename T, int N >
+class PHArray : public MemoryBlockReference<T> , public PHETBase< PHArray<T,N> >
+{
+private:
+    typedef MemoryBlockReference<T> T_base;
+    using T_base::data_;
+    using T_base::changeToNullBlock;
+    using T_base::numReferences;
+    GeneralArrayStorage<N> storage_;
+    SimpleArray<int, N> length_;
+    SimpleArray<int, N> stride_;
+    int zeroOffset_;
+public:
+    //! T_numtype is the numeric type stored in the array.
+    typedef T T_numtype;
+
+    //! T_index is a vector type which can be used to access elements
+    //! of many-dimensional arrays.
+    typedef SimpleArray<int, N> T_index;
+    
+    //! T_array is the array type itself -- Array<T_numtype, N_rank>.
+    typedef PHArray<T, N> T_array;
+
+    //! T_iterator is a a fast iterator for the array, used for expression.
+    //! Templates.
+    typedef PHFastArrayIterator<T, N> T_iterator;
+
+    //! This array's dimension.
+    static const int ranks = N;
+
+public:
+    //! Create a reference of another array.
+    PHArray(const PHArray<T, N> &array);
+
+    //! Any missing length arguments will have their value taken from the
+    //! last argument.  For example,
+    //! Array<int,3> A(32,64);
+    //! will create a 32x64x64 array.  This is handled by setupStorage().
+    //! Construct an array by each dimension's length.
+    PHArray(GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! Construct an array by each dimension's length.
+    explicit PHArray(int length0, GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! Construct an array by each dimension's length.
+    PHArray(int length0, int length1, GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! Construct an array by each dimension's length.
+    PHArray(int length0, int length1, int length2,
+            GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! Construct an array by each dimension's length.
+    PHArray(int length0, int length1, int length2, int length3,
+            GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! Construct an array by each dimension's length.
+    PHArray(int length0, int length1, int length2, int length3, int length4,
+            GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! This constructor takes an extent (length) vector and storage format.
+    PHArray(const SimpleArray<int, N> &extent, 
+            GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! This constructor takes a vector of bases (lbounds) and a vector of extents.
+    PHArray(const SimpleArray<int, N> &lbounds,
+            const SimpleArray<int, N> &extent,
+            const GeneralArrayStorage<N> &storage = GeneralArrayStorage<N>());
+
+    //! These constructors allow arbitrary bases (starting indices) to be set.
+    //! e.g. Array<int,2> A(Range(10,20), Range(20,30))
+    //! will create an 11x11 array whose indices are 10..20 and 20..30
+    //! Construct an array by each dimension's range.
+    PHArray(Range r0, 
+            GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! Construct an array by each dimension's range.
+    PHArray(Range r0, Range r1,
+            GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! Construct an array by each dimension's range.
+    PHArray(Range r0, Range r1, Range r2,
+            GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! Construct an array by each dimension's range.
+    PHArray(Range r0, Range r1, Range r2, Range r3,
+            GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! Construct an array by each dimension's range.
+    PHArray(Range r0, Range r1, Range r2, Range r3, Range r4,
+            GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! Construct an array by each dimension's range.
+    PHArray(Range r0, Range r1, Range r2, Range r3, Range r4, Range r5,
+            GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! Construct an array from an existing block of memory.
+    PHArray(T *dataFirst,
+            Range r0,
+            preexistingMemoryPolicy deletionPolicy,
+            GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! Construct an array from an existing block of memory.
+    PHArray(T *dataFirst,
+            Range r0, Range r1,
+            preexistingMemoryPolicy deletionPolicy,
+            GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! Construct an array from an existing block of memory.
+    PHArray(T *dataFirst,
+            Range r0, Range r1, Range r2,
+            preexistingMemoryPolicy deletionPolicy,
+            GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! Construct an array from an existing block of memory.
+    PHArray(T *dataFirst,
+            Range r0, Range r1, Range r2, Range r3,
+            preexistingMemoryPolicy deletionPolicy,
+            GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! Construct an array from an existing block of memory.
+    PHArray(T *dataFirst,
+            Range r0, Range r1, Range r2, Range r3, Range r4,
+            preexistingMemoryPolicy deletionPolicy,
+            GeneralArrayStorage<N> storage = GeneralArrayStorage<N>());
+
+    //! These constructors construct an sub-array from another array.
+    //! Construct an sub-array from another array.
+    PHArray(PHArray<T, N> &array_in, Range r0);
+
+    //! Construct an sub-array from another array.
+    PHArray(PHArray<T, N> &array_in, Range r0, Range r1);
+
+    //! Construct an sub-array from another array.
+    PHArray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2);
+
+    //! Construct an sub-array from another array.
+    PHArray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2, Range r3);
+
+    //! Construct an sub-array from another array.
+    PHArray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2, Range r3, Range r4);
+
+    //! Construct an sub-array from another array.
+    PHArray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2, Range r3, Range r4, Range r5);
+
+    //! Construct an sub-array from another array.
+    PHArray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2, Range r3, Range r4, Range r5, Range r6);
+
+    //! This constructor is invoked by the operator()'s which take
+    //! a combination of integer and Range arguments.  
+    //! It's not intended for end-user use.
+    template < int N2, typename gasConstant, typename R1, typename R2, typename R3, typename R4,
+        typename R5, typename R6, typename R7, typename R8, typename R9, typename R10 >
+        PHArray(PHArray<T, N2> &array_in, gasConstant r0, R1 r1, R2 r2,
+        R3 r3, R4 r4, R5 r5, R6 r6, R7 r7, R8 r8, R9 r9, R10 r10);
+
+public:
+    //! operator() functions:
+    //! Return constant reference to array[i0].
+    const T &operator()(int i0) const;
+
+    //! Return reference to array[i0].
+    T & operator()(int i0);
+
+    //! Return constant reference to array[i0][i1].
+    const T & operator()(int i0, int i1) const;
+
+    //! Return reference to array[i0][i1].
+    T & operator()(int i0, int i1);
+
+    //! Return constant reference to array[i0][i1][i2].
+    const T & operator()(int i0, int i1, int i2) const;
+
+    //! Return reference to array[i0][i1][i2].
+    T & operator()(int i0, int i1, int i2);
+
+    //! Return constant reference to array[i0][i1][i2][i3].
+    const T & operator()(int i0, int i1, int i2, int i3) const;
+
+    //! Return reference to array[i0][i1][i2][i3].
+    T & operator()(int i0, int i1, int i2, int i3);
+
+    //! Return constant reference to array[i0][i1][i2][i3][i4].
+    const T & operator()(int i0, int i1, int i2, int i3, int i4) const;
+
+    //! Return reference to array[i0][i1][i2][i3][i4].
+    T & operator()(int i0, int i1, int i2, int i3, int i4);
+    
+    //! UGKS.
+    //! Return constant reference to array[i0][i1][i2][i3][i4][i5].
+    const T & operator()(int i0, int i1, int i2, int i3, int i4, int i5) const;
+
+    //! UGKS.
+    //! Return reference to array[i0][i1][i2][i3][i4][i5]
+    T & operator()(int i0, int i1, int i2, int i3, int i4,int i5);
+
+    //! Return constant reference to underlying data storage at index i, 
+    //! ie. data_[i].
+    const T & operator[](int i) const;
+
+    //! Return reference to underlying data storage at index i, 
+    //! ie. data_[i].
+    T & operator[](int i);
+
+    //! Return const reference to underlying data stored by an index array.
+    //! e.g index = (10, 20), calculate offset = stride_[0]*10+stride_[1]*20
+    //! then returns data_[offset].
+    template<int N_rank2>
+    const T & operator()(const SimpleArray<int, N_rank2> &index) const;
+
+    //! Return reference to underlying data stored by an index array.
+    //! e.g index = (10, 20), calculate offset = stride_[0]*10+stride_[1]*20
+    //! then returns data_[offset].
+    template<int N_rank2>
+    T & operator()(const SimpleArray<int, N_rank2> &index);
+
+    //! These constructors construct an sub-array from this array self.
+    //! Construct an sub-array from this array self by offering a range.
+    T_array operator()(Range r0) const;
+
+    //! Construct an sub-array from this array self by offering a range.
+    T_array operator()(Range r0, Range r1) const;
+
+    //! Construct an sub-array from this array self by offering a range.
+    T_array operator()(Range r0, Range r1, Range r2) const;
+
+    //! Construct an sub-array from this array self by offering a range.
+    T_array operator()(Range r0, Range r1, Range r2, Range r3) const;
+
+    //! Construct an sub-array from this array self by offering a range.
+    T_array operator()(Range r0, Range r1, Range r2, Range r3, Range r4) const;
+
+    //! Construct an sub-array from this array self by offering a range.
+    T_array operator()(Range r0, Range r1, Range r2, Range r3, Range r4, Range r5) const;
+
+    //! Construct an sub-array from this array self by offering a range.
+    T_array operator()(Range r0, Range r1, Range r2, Range r3, Range r4, Range r5, Range r6) const;
+
+    //! After calling slice(int rank, Range r), the array refers only to the
+    //! range r of the original array.
+    //! e.g. Array<int,1> x(100);
+    //!      x.slice(firstRank, Range(25,50));
+    //!      x = 0;       //! Sets elements 25..50 of the original array to 0.
+    template < typename T1, typename T2 >
+    typename PHSliceInfo<T, T1, T2>::T_slice operator()(T1 r1, T2 r2) const;
+
+    template < typename T1, typename T2, typename T3 >
+    typename PHSliceInfo<T, T1, T2, T3>::T_slice operator()(T1 r1, T2 r2, T3 r3) const;
+
+    template < typename T1, typename T2, typename T3, typename T4 >
+    typename PHSliceInfo<T, T1, T2, T3, T4>::T_slice operator()(T1 r1, T2 r2, T3 r3, T4 r4) const;
+
+    template < typename T1, typename T2, typename T3, typename T4, typename T5 >
+    typename PHSliceInfo<T, T1, T2, T3, T4, T5>::T_slice operator()(T1 r1, T2 r2, T3 r3, T4 r4, T5 r5) const;
+
+    template < typename T1, typename T2, typename T3, typename T4, typename T5, typename T6 >
+    typename PHSliceInfo<T, T1, T2, T3, T4, T5, T6>::T_slice operator()(T1 r1, T2 r2, T3 r3, T4 r4, T5 r5, T6 r6) const;
+
+    //! Array expression operands.
+
+    //! Scalar operand.
+    //! NEEDS_WORK : need a precondition check on.
+    //! isStorageContiguous when operator, is used.
+    T_array & operator=(T x);
+
+    //! operator = expr
+    template<typename T_expr>
+    T_array & operator = (const PHETBase<T_expr> &expr);
+
+    //! operator = PHArray<T,N>
+    T_array & operator = (const PHArray<T, N> &rhs);
+
+    //! operator +=
+    template<typename T_expr> T_array & operator += (const T_expr &expr);
+
+    //! operator -=
+    template<typename T_expr> T_array & operator -= (const T_expr &expr);
+
+    //! operator *=
+    template<typename T_expr> T_array & operator *= (const T_expr &expr);
+
+    //! operator /=
+    template<typename T_expr> T_array & operator /= (const T_expr &expr);
+
+    //! Member functions.
+
+    //! Return index relative to data_, ie. data_[index].
+    //! index =  i0 * stride_[0] + i1 * stride_[1] + i2 * stride_[2] + i3 * stride_[3].
+    int getindex(int i0, int i1, int i2, int i3) const;
+
+    //! Return the rank dimension's lower bound, ie. range's first index, equals base_[rank].
+    int lbound(int rank) const;
+
+    //! Return the rank dimension's upper bound, ie. range's last index, equals base_[rank]+length_[rank]-1.
+    int ubound(int rank) const;
+
+    //! Return the array storing lbound, ie. base_.
+    SimpleArray<int, N> lbound() const;
+
+    //! Return the rank dimension's length, ig length_[rank]
+    int length(int rank) const;
+
+    //! Return the array storing length_.
+    const SimpleArray<int, N> & length() const;
+
+    //! Return the array storing base_.
+    //! base_ is each dimension's lower bound.
+    const SimpleArray<int, N> & base() const;
+
+    //! Return the rank dimension's base, ie. base_[rank].
+    int base(int rank) const;
+
+    //! Return the rank dimension's stride, ie. stride_[rank].
+    int stride(int rank) const;
+
+    //! Total number of elements in this array.
+    int numElements() const;
+
+    //! data_ always refers to the point (0,0,...,0) which may
+    //! not be in the array if the base is not zero in each rank.
+    //! These data() routines return a pointer to the first
+    //! element in the array (but note that it may not be
+    //! stored first in memory if some ranks are stored descending).
+    const T * data() const;
+
+    //! data() is the location of the first data member,that is the location of the base.
+    //! The base array starting subscript of each dimension,ri.first().
+    //! It is especially important for slice.
+    //! After slice, the first data point actually is (ifirst, jfirst, ...).
+    //! The actual location is data_ + dataOffset().
+    T * data();
+
+    //! Judge whether the array's outer dimension's stride equals sum of inner dimension's stride.
+    //! eg. if outerRank =3 and innerRank =2 , returns true if stride[3] == stride[2]*length[2], otherwise, returns false
+    bool canCollapse(int outerRank, int innerRank) const;
+
+    //! Return the PHFastArrayIterator of this array.
+    //! It's not intended for end-user use.
+    T_iterator beginFast() const;
+
+    //! Return storage_.ordering(storageRankIndex).
+    //! It's not intended for end-user use.
+    int ordering(int storageRankIndex) const;
+
+    //! Return storage_.ordering().
+    //! It's not intended for end-user use.
+    const SimpleArray<int, N> & ordering() const;
+
+    //! True if storage_.ordering(rank) == 0.
+    //! It's not intended for end-user use.
+    bool isMajorRank(int rank) const;
+    
+    //! True if storage_.ordering(rank) != 0.
+    //! It's not intended for end-user use.
+    bool isMinorRank(int rank) const;
+
+    //! Call storage_.isRankStoredAscending(rank).
+    //! It's not intended for end-user use.
+    bool isRankStoredAscending(int rank) const;
+    //! The underlying data storage(data_) always refers to the point index at (0,0,...,0) which may
+    //! not be in the array if the base is not zero in each rank.
+    //! Return the pointer to data.
+    T * getData() const { return data_; }
+
+protected:
+    //! Implementation routines.
+    void computeStrides();
+
+    void setupStorage(int rank);
+
+    void setupStorage(int rank, T *data, preexistingMemoryPolicy deletionPolicy);
+
+    void calculateZeroOffset();
+
+    void Reference(const T_array&);
+
+    T_array & noConst() const;
+
+    void constructSubarray(PHArray<T, N> &array_in, Range r0);
+
+    void constructSubarray(PHArray<T, N> &array_in, Range r0, Range r1);
+
+    void constructSubarray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2);
+
+    void constructSubarray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2, Range r3);
+
+    void constructSubarray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2, Range r3, Range r4);
+
+    void constructSubarray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2, Range r3, Range r4, Range r5);
+
+    void constructSubarray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2, Range r3, Range r4, Range r5, Range r6);
+
+    template < int N2, typename gasConstant,
+        typename R1, typename R2, typename R3, typename R4, typename R5, typename R6, typename R7,
+        typename R8, typename R9, typename R10 >
+        void constructSlice(PHArray<T, N2> &array_in,
+        gasConstant r0, R1 r1, R2 r2, R3 r3, R4 r4, R5 r5, R6 r6, R7 r7, R8 r8, R9 r9, R10 r10);
+    void slice(int rank, Range r);
+
+    template<int N2>
+    void slice(int &setRank, Range r, PHArray<T, N2> &array_in, SimpleArray<int, N2> &rankMap, int sourceRank);
+
+    template<int N2>
+    void slice(int &setRank, int i, PHArray<T, N2> &array_in, SimpleArray<int, N2> &rankMap, int sourceRank);
+
+    template<int N2>
+    void slice(int &setRank, PHnilArraySection nil, PHArray<T, N2> &array_in, SimpleArray<int, N2> &rankMap, int sourceRank);
+
+    T_array & initialize(T x);
+
+    int dataOffset() const;
+
+    template<typename T_expr, typename T_update>
+    T_array & evaluate(T_expr expr, T_update);
+
+    template<typename T_expr, typename T_update>
+    T_array & evaluateWithIndexTraversal1(T_expr expr, T_update);
+
+    template<typename T_expr, typename T_update>
+    T_array & evaluateWithIndexTraversalN(T_expr expr, T_update);
+
+    template<typename T_expr, typename T_update>
+    T_array & evaluateWithStackTraversal1(T_expr expr, T_update);
+
+    template<typename T_expr, typename T_update>
+    T_array & evaluateWithStackTraversalN(T_expr expr, T_update);
+
+    //! #ifdef USE_SMARTARRY will construct an multi-array pointer to the underlying data_
+    //! e.g. for a three dimensional T type array with range(r0, r1, r2).
+    //! We can get and T*** type pointer called datap3 by GetSmartArrayP3() function
+    //! and access the data at index i, j, k directly by datap3[k][j][i].
+    //! Remember the way of array storage of range r0, r1, ... corresponding with innermost layer to outermost layer.
+    //! Moreover, if use operator(i, j, k), will return datap3[k][j][i] instead of data_[i0 * stride_[0] + i1 * stride_[1]+ i2 * stride_[2]].
+#ifdef USE_SMARTARRAY
+public:
+    typedef T      * TypeP1; //TypeP1 T *
+    typedef TypeP1 * TypeP2; //TypeP2 T **
+    typedef TypeP2 * TypeP3; //TypeP3 T ***
+    typedef TypeP3 * TypeP4; //TypeP4 T ****
+    typedef TypeP4 * TypeP5; //TypeP5 T *****
+    typedef TypeP5 * TypeP6; //TypeP6 T ******
+private:
+    TypeP1 data1, datap1; //TypeP1 T *
+    TypeP2 data2, datap2; //TypeP2 T **
+    TypeP3 data3, datap3; //TypeP3 T ***
+    TypeP4 data4, datap4; //TypeP4 T ****
+    TypeP5 data5, datap5; //TypeP5 T *****
+    TypeP6 data6, datap6; //TypeP6 T ******
+private:
+    void ZeroAllPointer();
+    void AllocateRange(int dimension);
+    void AllocateRange1();
+    void AllocateRange2();
+    void AllocateRange3();
+    void AllocateRange4();
+    void AllocateRange5();
+    void AllocateRange6();
+public:
+    ~PHArray()
+    {
+        if (data1 != NULL) {                     data1 = NULL; }
+        if (data2 != NULL) { delete [] data2;    data2 = NULL; }
+        if (data3 != NULL) { delete [] data3;    data3 = NULL; }
+        if (data4 != NULL) { delete [] data4;    data4 = NULL; }
+        if (data5 != NULL) { delete [] data5;    data5 = NULL; }
+        if (data6 != NULL) { delete [] data6;    data6 = NULL; }
+    }
+
+    TypeP1 GetSmartArrayP1() const
+    {
+        return datap1;
+    }
+
+    TypeP2 GetSmartArrayP2() const
+    {
+        return datap2;
+    }
+
+    TypeP3 GetSmartArrayP3() const
+    {
+        return datap3;
+    }
+
+    TypeP4 GetSmartArrayP4() const
+    {
+        return datap4;
+    }
+
+    TypeP5 GetSmartArrayP5() const
+    {
+        return datap5;
+    }
+
+    TypeP6 GetSmartArrayP6() const
+    {
+        return datap6;
+    }
+#endif
+    //! End
+};
+
+}
+
+const int firstRank    = 0;
+const int secondRank   = 1;
+const int thirdRank    = 2;
+const int fourthRank   = 3;
+const int fifthRank    = 4;
+const int sixthRank    = 5;
+const int seventhRank  = 6;
+const int eighthRank   = 7;
+const int ninthRank    = 8;
+const int tenthRank    = 9;
+const int eleventhRank = 10;
+
+const int firstDim    = 0;
+const int secondDim   = 1;
+const int thirdDim    = 2;
+const int fourthDim   = 3;
+const int fifthDim    = 4;
+const int sixthDim    = 5;
+const int seventhDim  = 6;
+const int eighthDim   = 7;
+const int ninthDim    = 8;
+const int tenthDim    = 9;
+const int eleventhDim = 10;
+
+#include "PHFastArrayIterator.h"    //! Fast Array iterators (for et).
+#include "PHExpr.h"                 //! Array expression objects.
+#include "PHExprWrap.h"
+#include "PHET.h"                   //! Expression templates.
+#include "PHOps.hxx"                //! Assignment operators.
+#include "PHArray.hxx"
+#include "PHSlice.hxx"              //! Slicing and sub-arrays.
diff --git a/API/DataStruct/include/DataStruct_BinaryTree.h b/API/DataStruct/include/DataStruct_BinaryTree.h
new file mode 100644
index 0000000..84f013f
--- /dev/null
+++ b/API/DataStruct/include/DataStruct_BinaryTree.h
@@ -0,0 +1,51 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      DataStruct_BinaryTree.h
+//! @brief     Plant binary tree for overset grid.
+//! @author    Guo Yongheng.
+
+#include <vector>
+using namespace std;
+namespace PHSPACE
+{
+struct DataStuct_BinaryNode
+{
+    int inf, sup, zoneLabel;
+    DataStuct_BinaryNode *leftChild, *rightChild;
+};
+
+class DataStruct_BinaryTree
+{
+private:
+    vector<int> startPointLabel;
+    int numberOfZones, numberOfPoints;
+    DataStuct_BinaryNode *root;
+
+public:
+    //!
+    DataStruct_BinaryTree(int *startPointLabel, int nZones, int numberOfPoints);
+
+    //!
+    ~DataStruct_BinaryTree();
+
+public:
+    //!
+    int ComputeZoneLabel(int globalPointIndex);
+
+private:
+    int ComputeZoneLabel(DataStuct_BinaryNode *binaryNode, int globalPointIndex);
+    void CopyOriginalVector(int *startPointLabel, int nZones);
+    DataStuct_BinaryNode * Create(DataStuct_BinaryNode *binaryNode, int leftLabel, int rightLabel);
+    void Release(DataStuct_BinaryNode *binaryNode);
+};
+
+}
\ No newline at end of file
diff --git a/API/DataStruct/include/DataStruct_KDNode.h b/API/DataStruct/include/DataStruct_KDNode.h
new file mode 100644
index 0000000..681ae9b
--- /dev/null
+++ b/API/DataStruct/include/DataStruct_KDNode.h
@@ -0,0 +1,133 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      DataStruct_KDNode.h
+//! @brief     DataStruct_KDNode defines a "Node" data structure used by KDTree
+//!            The "node" has its coordinates(x, y, z) range, level in the tree, and pointer to its "son" node.
+//!            Data is stored in node's item.
+//! @author    hekun.
+#include "Precision.h"
+
+#pragma once
+using namespace std;
+
+namespace PHSPACE 
+{
+
+class DataStruct_KDNode 
+{
+public:
+    typedef DataStruct_KDNode  KDNode;
+public:
+
+    //! The coordinate of the node.
+    RDouble *pos;
+
+    //! The split Axis.
+    int dir;
+
+    //! The left tree.
+    KDNode *left;
+
+    //! The right tree.
+    KDNode *right;
+
+    void *data;
+
+public:
+    //! Constructor, default dimension is three.
+    DataStruct_KDNode(int dir)
+    {
+        this->dir = dir;
+        pos = new RDouble[dir];
+        left  = NULL;
+        right = NULL;
+        data = NULL;
+    };
+
+    //! Constructor, set with coordinates and data.
+    DataStruct_KDNode(RDouble *pos, int dir)
+    {
+        this->dir = dir;
+        this->pos = new RDouble[this->dir];
+        for (int i = 0; i < dir; ++ i)
+        {
+            this->pos[i] = pos[i];
+        }
+
+        left  = NULL;
+        right = NULL;
+        data = NULL;
+    };
+
+    //! Constructor, set with another node.
+    DataStruct_KDNode(const KDNode &node)
+    {
+        this->dir = node.dir;
+        this->pos = new RDouble[this->dir];
+        for (int i = 0; i < this->dir; ++ i)
+        {
+            this->pos[i] = node.pos[i];
+        }
+
+        this->left  = node.left;
+        this->right = node.right;
+        this->data  = node.data;
+    };
+
+    void operator = (const KDNode &node)
+    {
+        this->dir = node.dir;
+        this->pos = new RDouble[this->dir];
+        for (int i = 0; i < this->dir; ++ i)
+        {
+            this->pos[i] = node.pos[i];
+        }
+
+        this->left  = node.left;
+        this->right = node.right;
+        this->data  = node.data;
+    };
+
+    //! Destructor.
+    ~DataStruct_KDNode()
+    {
+        delete [] pos;
+        delete left;
+        delete right;
+    };
+
+    //! Add an Adt node under the current node.
+
+    //! Count all the descendant nodes, including self.
+    int GetNodeNum()
+    {
+        int count = 0;
+        count += 1;
+        if (this->left)
+        {
+            count += left->GetNodeNum();
+        }
+        if (this->right)
+        {
+            count += right->GetNodeNum();
+        }
+        return count;
+    };
+
+    //! Get the date stored in item.
+    RDouble * GetData() const
+    {
+        return pos;
+    };
+};
+
+}
\ No newline at end of file
diff --git a/API/DataStruct/include/DataStruct_KDTree.h b/API/DataStruct/include/DataStruct_KDTree.h
new file mode 100644
index 0000000..8d58dea
--- /dev/null
+++ b/API/DataStruct/include/DataStruct_KDTree.h
@@ -0,0 +1,246 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      DataStruct_KDTree.h
+//! @brief     DataStruct_KDTree defines a k-dimension Tree data structure.
+//!            The tree starts from root node, and has a coordinates range limit.
+//!            The node's definition refers to DataStruct_KDNode.
+//! @author    hekun.
+
+#pragma once
+#include "DataStruct_KDNode.h"
+#include "Precision.h"
+#include "string.h"
+
+namespace PHSPACE
+{
+
+class DataStruct_KDHyperRect
+{
+public:
+    int dim;
+    RDouble *min, *max;
+public:
+    DataStruct_KDHyperRect()
+    {
+        dim = 0;
+        min = NULL;
+        max = NULL;
+    };
+
+    DataStruct_KDHyperRect(int dim)
+    {
+        this->dim = dim;
+        min = new RDouble[dim];
+        max = new RDouble[dim];
+        for (int i = 0; i < dim; ++ i)
+        { 
+            min[i] = 0.0;
+            max[i] = 1.0;
+        }
+    };
+
+    ~DataStruct_KDHyperRect()
+    {
+        if (this->min)
+        {
+            delete [] this->min;
+        }
+        if (this->max)
+        {
+            delete [] this->max;
+        }
+    };
+
+    void Free()
+    {
+        if (this->min)
+        {
+            delete [] this->min;
+        }
+        if (this->max)
+        {
+            delete [] this->max;
+        }
+    };
+
+    void Extend(const RDouble *pos);
+
+    RDouble distSQ(const RDouble *pos);
+};
+
+class DataStruct_ResNode
+{
+public:
+    typedef DataStruct_KDNode KDNode;
+    DataStruct_ResNode()
+    {
+        item = NULL;
+        distSQ = 0.0;
+        next = NULL;
+    }
+public:
+    KDNode *item;
+    RDouble distSQ;
+    DataStruct_ResNode *next;
+};
+
+typedef DataStruct_KDNode      KDNode;
+typedef DataStruct_KDHyperRect KDHyperRect;
+typedef DataStruct_ResNode     KDResNode;
+
+int ListInsert(KDResNode *list, KDNode *item, RDouble distSQ);
+
+class DataStruct_KDTree
+{
+public:
+    int dim;
+    KDNode *root;
+    KDHyperRect *rect;
+    void (*destr)(void *);
+
+public:
+    //! Construct an K-Dimension tree.
+    //! @param[in] ndim the dimension of element's coordinate in node, default is 3.
+    //! The element's numerical range is default with 0 to 1.
+    DataStruct_KDTree()
+    {
+        dim  = 0;
+        root = NULL;
+        rect = NULL;
+        destr = NULL;
+    };
+
+    DataStruct_KDTree(int dim)
+    {
+        this->dim = dim;
+        root = NULL;
+        rect = new KDHyperRect(dim);
+        destr = NULL;
+    };
+
+    void Free();
+
+    void Clear();
+
+    void ClearRec(KDNode *node, void(*destr)(void *));
+
+    void DestructorKDData(void(*destr)(void *));
+
+    void ExtendHyperRect(int dim, const RDouble *pos);
+
+    KDResNode * KDNearest(DataStruct_KDTree *kdtree, const RDouble *pos);
+};
+
+typedef DataStruct_KDTree KDTree;
+
+class DataStruct_KDRes
+{
+public:
+    KDTree *kdTree;
+    KDResNode *rlist, *riter;
+    int size;
+    DataStruct_KDRes()
+    {
+        size   = 0;
+        kdTree = NULL;
+        rlist  = NULL;
+        riter  = NULL;
+    };
+    ~DataStruct_KDRes()
+    {
+        if (kdTree) delete kdTree;
+        if (rlist)  delete rlist;
+        if (riter)  delete riter;
+    }
+
+
+public:
+    int Size()
+    {
+        return size;
+    };
+
+    void Rewind()
+    {
+        riter = rlist->next;
+    };
+
+    int End()
+    {
+        return riter == NULL;
+    };
+
+    int Next()
+    {
+        riter = riter->next;
+        return riter != NULL;
+    };
+
+    void * Item(RDouble *pos)
+    {
+        if (riter)
+        {
+            if (pos)
+            {
+                memcpy(pos, riter->item->pos, kdTree->dim * sizeof(RDouble));
+            }
+            return riter->item->data;
+        }
+        return NULL;
+    };
+
+    RDouble * Position()
+    {
+        if (riter)
+        {
+            if (riter->item->pos)
+            {
+                return riter->item->pos;
+            }
+        }
+        return NULL;
+    };
+
+    void * itemData()
+    {
+        return Item(0);
+    };
+};
+typedef DataStruct_KDRes KDRes;
+
+KDTree * CreatKDTree(int k);
+
+void ClearRec(KDNode *node, void(*destr)(void *));
+
+KDRes * NearestRange(KDTree *kdTree, const RDouble *pos, RDouble range);
+
+KDRes * KDNearest(KDTree *kdTree, const RDouble *pos);
+
+void KDNearestI(KDNode *node, const RDouble *pos, const RDouble **result, RDouble *resultDistSQ, KDHyperRect *rect);
+
+KDHyperRect * DuplicateHyperRect(const KDHyperRect *rect);
+
+int KDInsert(KDTree *kdTree, const RDouble *pos, void *data);
+
+int InsertRList(KDResNode *list, KDNode *item, RDouble distsq);
+
+void FreeKDRes(KDRes *rset);
+
+int FindNearest(KDNode *node, const RDouble *pos, RDouble range, KDResNode *list, int ordered, int dim);
+
+int InsertRec(KDNode **nptr, const RDouble *pos, void *data, int dir, int dim);
+
+KDHyperRect * CreatHyperRect(int dim, const RDouble *min, const RDouble *max);
+
+void clearResults(KDRes *rset);
+
+}
\ No newline at end of file
diff --git a/API/DataStruct/include/DataStruct_Range.h b/API/DataStruct/include/DataStruct_Range.h
new file mode 100644
index 0000000..7eb9e60
--- /dev/null
+++ b/API/DataStruct/include/DataStruct_Range.h
@@ -0,0 +1,139 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      DataStruct_Range.h
+//! @brief     Arbitrary range of array which is encapsulated using C++.
+//!            Fortran custom is considered also. The start and end indices can be arbitrary.
+//!            This is referred from Blitz.
+//! @author    He Xin, Bell.
+
+#pragma once
+#include <iostream>
+#include <climits>
+using namespace std;
+namespace PHSPACE
+{
+    //! @brief Range: arbitrary range of array which is encapsulated using C++.
+    //! Fortran custom is considered also. The start and end indices can be arbitrary.
+    class Range
+    {
+    private:
+        //! The start index of the range.
+        int first_;
+
+        //! The end index of the range.
+        int last_;
+
+        //! Stride.
+        int stride_;
+
+    public:
+        //! This declaration not yet supported by all compilers.
+        // const int fromStart = INT_MIN;
+        // const int toEnd = INT_MIN;
+
+        typedef int T_numtype;
+
+        enum { fromStart = INT_MIN, toEnd = INT_MIN };
+
+        Range()
+        {
+            first_  = fromStart;
+            last_   = toEnd;
+            stride_ = 1;
+        }
+
+        //! Range(Range r): allow default copy constructor to be used.
+
+        Range(const Range &rightRange)
+        {
+            first_  = rightRange.first_;
+            last_   = rightRange.last_;
+            stride_ = rightRange.stride_;
+        }
+
+        explicit Range(int slicePosition)
+        {
+            first_  = slicePosition;
+            last_   = slicePosition;
+            stride_ = 1;
+        }
+
+        Range(int first, int last, int stride = 1)
+            : first_(first), last_(last), stride_(stride)
+        { 
+        }
+
+        //! Return the start index.
+        int first(int lowRange = 0) const;
+
+        //! Return the end index.
+        int last(int highRange = 0) const;
+
+        //! Return the range length.
+        unsigned length(int = 0) const;
+
+        //! Return the stride.
+        int stride() const;
+
+        //! Return if the range is ascending ordered.
+        bool isAscendingContiguous() const;
+
+        //! Reset the range, start with first, end with last, and stride.
+        void setRange(int first, int last, int stride = 1);
+
+        //! If the stride is one or not.
+        bool isUnitStride() const;
+
+        bool hasFastAccess() const;
+
+        T_numtype fastAccess(unsigned i) const;
+
+        unsigned suggestLength() const;
+
+        static Range all() 
+        { 
+            return Range(fromStart, toEnd, 1);
+        }
+
+        //! Operators.
+        Range operator - (int shift) const
+        { 
+            return Range(first_ - shift, last_ - shift, stride_);
+        }
+
+        Range operator + (int shift) const
+        { 
+            return Range(first_ + shift, last_ + shift, stride_);
+        }
+
+        int operator [] (unsigned i) const
+        {
+            return first_ + i * stride_;
+        }
+
+        int operator () (unsigned i) const
+        {
+            return first_ + i * stride_;
+        }
+
+        friend inline ostream & operator << (ostream &os, const Range &range)
+        {
+            os << "Range(" << range.first() << "," << range.last() << ","
+               << range.stride() << ")";
+
+            return os;
+        }
+    };
+
+#include "DataStruct_Range.hxx"
+
+}
diff --git a/API/DataStruct/include/DataStruct_Range.hxx b/API/DataStruct/include/DataStruct_Range.hxx
new file mode 100644
index 0000000..6398c70
--- /dev/null
+++ b/API/DataStruct/include/DataStruct_Range.hxx
@@ -0,0 +1,48 @@
+inline int Range::first(int lowRange) const
+{ 
+    if (first_ == fromStart) return lowRange;
+    return first_;
+}
+
+inline int Range::last(int highRange) const
+{
+    if (last_ == toEnd) return highRange;
+    return last_;
+}
+
+inline unsigned Range::length(int) const
+{
+    return (last_ - first_) / stride_ + 1;
+}
+
+inline int Range::stride() const
+{
+    return stride_;
+}
+
+inline bool Range::isAscendingContiguous() const
+{
+    return ((first_ < last_) && (stride_ == 1) || (first_ == last_));
+}
+
+inline void Range::setRange(int first, int last, int stride)
+{
+    first_  = first;
+    last_   = last;
+    stride_ = stride;
+}
+
+inline bool Range::isUnitStride() const
+{ 
+    return stride_ == 1;
+}
+
+inline Range::T_numtype Range::fastAccess(unsigned i) const
+{
+    return first_ + i; 
+}
+
+inline unsigned Range::suggestLength() const
+{ 
+    return length();
+}
\ No newline at end of file
diff --git a/API/DataStruct/include/DataStruct_Sort.h b/API/DataStruct/include/DataStruct_Sort.h
new file mode 100644
index 0000000..7b3efd8
--- /dev/null
+++ b/API/DataStruct/include/DataStruct_Sort.h
@@ -0,0 +1,44 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      DataStruct_Sort.h
+//! @brief     DataStruct_Sort is usually used combined with set of STL, e.g. set<DataStruct_Sort<int>>.
+//!            DataStruct_Sort objects stored in set is sorted by comparing its' value.
+//! @author    Zhang Jian.
+
+#pragma once
+namespace PHSPACE
+{
+template < typename T >
+class DataStruct_Sort
+{
+public:
+    //! Value used to compare.
+    T value;
+
+    //! Index.
+    int index;
+
+public:
+    //! Constructor.
+    DataStruct_Sort();
+
+    //! Constructor with value and index.
+    DataStruct_Sort(T &value, int index);
+
+    //! Overload operator < used to sort.
+    bool operator < (const DataStruct_Sort &rhs) const;
+
+    bool operator > (const DataStruct_Sort &rhs) const;
+};
+
+#include "DataStruct_Sort.hxx"
+}
diff --git a/API/DataStruct/include/DataStruct_Sort.hxx b/API/DataStruct/include/DataStruct_Sort.hxx
new file mode 100644
index 0000000..0f1802a
--- /dev/null
+++ b/API/DataStruct/include/DataStruct_Sort.hxx
@@ -0,0 +1,24 @@
+template<typename T>
+DataStruct_Sort<T>::DataStruct_Sort()
+{
+
+}
+
+template<typename T>
+DataStruct_Sort<T>::DataStruct_Sort(T &value, int index)
+{
+    this->value = value; 
+    this->index = index;
+}
+
+template<typename T>
+bool DataStruct_Sort<T>::operator < (const DataStruct_Sort &rhs) const
+{
+    return value < rhs.value;
+}
+
+template<typename T>
+bool DataStruct_Sort<T>::operator > (const DataStruct_Sort &rhs) const
+{
+    return value > rhs.value;
+}
\ No newline at end of file
diff --git a/API/DataStruct/include/HyList.h b/API/DataStruct/include/HyList.h
new file mode 100644
index 0000000..57791ee
--- /dev/null
+++ b/API/DataStruct/include/HyList.h
@@ -0,0 +1,75 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      HyList.h
+//! @brief     Efficient / Hybrid Structure Container.
+//! @author    Bell.
+
+#ifndef HYLIST_H
+#define HYLIST_H
+
+#include <cstdlib>
+#include <iostream>
+using namespace std;
+
+//! Define the sub segment list of the HyList.
+template < typename T >
+class Sub_List
+{
+public: 
+    int      NP;    //! Average No. point of sublist.
+    int      num;
+    T        *node;
+    Sub_List *next;
+    Sub_List(int nNode);
+    ~Sub_List();
+};
+
+
+//! Define the HyList.
+template < typename T > 
+class HyList
+{
+public:
+    int AverNnode;
+    int num;
+    Sub_List<T> *head;
+    Sub_List<T> *sublist;
+
+    //! SetAverNnode :initialize AverNnode with the input value in.
+    void SetAverNnode(int in) { AverNnode = in; }
+
+    //! push_back :add new item.
+    void push_back(const T node);    //! Don't deal with overlap values.
+
+    //! insert    :insert an item.
+    void insert(const T node);       //! Deal with overlap value. 
+
+    //! insert    :invoking exit(0).
+    void insert(const int iNode, const T node);    //! Deal with overlap value. 
+
+    //! erase     :invoking exit(0).
+    void erase(const int iNode);    //! Delete the iNode th node.
+
+    //! GetData   :get data from a Sub_List object's node property.
+    T GetData(const int iNode);
+
+    //! size      :return  num's value.
+    int size();
+
+    //! operator []: invoking GetData function.
+    T operator [] (int i);
+    HyList();
+    ~HyList();
+};
+
+#include "HyList.hxx"
+#endif
\ No newline at end of file
diff --git a/API/DataStruct/include/HyList.hxx b/API/DataStruct/include/HyList.hxx
new file mode 100644
index 0000000..5763a91
--- /dev/null
+++ b/API/DataStruct/include/HyList.hxx
@@ -0,0 +1,176 @@
+/****************************************************\
+        High Efficient / Hybrid Structure Container
+                   By BELL, 2010.08.01
+                   Modified 2012.08.09
+ Note:  ����ģ�壬�ڰ���ʱ��Ӧ��ͬʱ����.h & .cpp�ļ�
+\****************************************************/
+
+#include "HyList.h"
+template < typename T > Sub_List<T>::Sub_List(int nNode)
+{
+    num  = 0;
+    NP   = nNode;
+    node = new T [NP];
+    next = NULL;
+}
+
+template < typename T > Sub_List<T>::~Sub_List()
+{
+    delete [] node;
+    num = 0;
+}
+
+//****************************************************************//
+
+template < typename T > HyList<T>::HyList()
+{
+    AverNnode  = 8;
+    num        = 0;
+    head       = new Sub_List<T>(0);
+    head->next = NULL;
+}
+
+template < typename T > HyList<T>::~HyList()
+{
+    Sub_List< T > *p = head->next;
+    while (p)
+    {
+        Sub_List<T> *temp;
+        if (p->next)
+        {
+            temp = p->next;
+            delete p;
+            p = temp;
+        }
+        else
+        {
+            delete p;
+            break;
+        }
+    }
+    delete head;
+    num = 0;
+}
+
+template < typename T > void HyList<T>::push_back(const T node)
+{
+    int nNode = AverNnode, i;
+    Sub_List<T> *p = head->next;
+
+    if (!p)
+    {
+        Sub_List<T> *temp = new Sub_List<T>(nNode);
+        p = temp;
+        head->next = p;
+    }
+    else
+    {
+        while (p->next)
+        {
+            p = p->next;
+        }
+
+        if (p->num == p->NP)
+        {
+            Sub_List<T> *temp = new Sub_List<T>(nNode);
+            p->next = temp;
+            p = p->next;
+        }
+    }
+
+    i = p->num;
+    p->node[i] = node;
+    p->num ++;
+    num ++;
+}
+
+// Before insert a node to tail of the list, chech if it is exist.
+template < typename T > void HyList<T>::insert(const T node)
+{
+    int nNode = AverNnode, i;
+    Sub_List<T> *p = head->next;
+
+    if (!p)
+    {
+        Sub_List<T> *temp = new Sub_List<T>(nNode);
+        p = temp;
+        head->next = p;
+    }
+    else
+    {
+        while (p->next)
+        {
+            p = p->next;
+        }
+
+        if (p->num == p->NP)
+        {
+            Sub_List<T> *temp = new Sub_List<T>(nNode);
+            p->next = temp;
+            p = p->next;
+        }
+    }
+
+    bool flag = true;
+    i = 0;
+    while (flag && i < num)
+    {
+        T data = GetData(i++);
+        if (data == node)
+            flag = false;
+    }
+    if (flag)
+    {
+        i = p->num;
+        p->node[i] = node;
+        p->num ++;
+        num ++;
+    }
+}
+
+// Insert "node" to the position witch is before "iNode".
+template < typename T > void HyList<T>::insert(const int iNode, const T node)
+{
+    exit(0);
+}
+
+template < typename T > void HyList<T>::erase(const int iNode)
+{
+    if (iNode < 0 || iNode >= num)
+    {
+        exit(0);
+    }
+}
+
+template < typename T > T HyList<T>::GetData(const int iNode)
+{
+    T data;
+    if (iNode < 0)
+    {
+        exit(0);
+    }
+    else
+    {
+        int num = 0, i;
+        Sub_List<T> *p = head->next;
+        num += p->NP;
+        while (num <= iNode)
+        {
+            p = p->next;
+            num += p->NP;
+        }
+        i = iNode - (num - p->NP);
+        data = p->node[i];
+    }
+
+    return data;
+}
+template < typename T > int HyList<T>::size()
+{
+    return num;
+}
+
+template < typename T> T HyList<T>::operator[] (int i)
+{
+    return GetData(i);
+}
\ No newline at end of file
diff --git a/API/DataStruct/include/PHArray.hxx b/API/DataStruct/include/PHArray.hxx
new file mode 100644
index 0000000..711c02c
--- /dev/null
+++ b/API/DataStruct/include/PHArray.hxx
@@ -0,0 +1,1016 @@
+namespace PHSPACE
+{
+
+//! Construction functions:
+template<typename T, int N>
+PHArray<T, N>::PHArray(const PHArray<T, N> &array)
+    : MemoryBlockReference<T>(), PHETBase< PHArray<T, N> >(array)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    // NEEDS_WORK: this const_cast is a tad ugly.
+    Reference(const_cast<T_array &>(array));
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(GeneralArrayStorage<N> storage)
+    : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_     = 0;
+    stride_     = 0;
+    zeroOffset_ = 0;
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(int length0, 
+                 GeneralArrayStorage<N> storage)
+                 : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_[0] = length0;
+    setupStorage(0);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(int length0, int length1,
+        GeneralArrayStorage<N> storage)
+        : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_[0] = length0;
+    length_[1] = length1;
+    setupStorage(1);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(int length0, int length1, int length2,
+        GeneralArrayStorage<N> storage)
+        : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_[0] = length0;
+    length_[1] = length1;
+    length_[2] = length2;
+    setupStorage(2);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(int length0, int length1, int length2, int length3,
+        GeneralArrayStorage<N> storage)
+        : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_[0] = length0;
+    length_[1] = length1;
+    length_[2] = length2;
+    length_[3] = length3;
+    setupStorage(3);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(int length0, int length1, int length2, int length3, int length4,
+        GeneralArrayStorage<N> storage)
+        : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_[0] = length0;
+    length_[1] = length1;
+    length_[2] = length2;
+    length_[3] = length3;
+    length_[4] = length4;
+    setupStorage(4);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(const SimpleArray<int, N> &extent, 
+        GeneralArrayStorage<N> storage)
+        : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_ = extent;
+    setupStorage(N - 1);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(const SimpleArray<int, N> &lbounds,
+        const SimpleArray<int, N> &extent,
+        const GeneralArrayStorage<N> &storage)
+        : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_ = extent;
+    storage_.setBase(lbounds);
+    setupStorage(N - 1);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(Range r0, 
+        GeneralArrayStorage<N> storage)
+        : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_[0] = r0.length();
+    storage_.setBase(0, r0.first());
+    setupStorage(0);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(Range r0, Range r1,
+        GeneralArrayStorage<N> storage)
+        : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_[0] = r0.length();
+    storage_.setBase(0, r0.first());
+    length_[1] = r1.length();
+    storage_.setBase(1, r1.first());
+
+    setupStorage(1);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(Range r0, Range r1, Range r2,
+        GeneralArrayStorage<N> storage)
+        : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_[0] = r0.length();
+    storage_.setBase(0, r0.first());
+    length_[1] = r1.length();
+    storage_.setBase(1, r1.first());
+    length_[2] = r2.length();
+    storage_.setBase(2, r2.first());
+
+    setupStorage(2);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(Range r0, Range r1, Range r2, Range r3,
+        GeneralArrayStorage<N> storage)
+        : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_[0] = r0.length();
+    storage_.setBase(0, r0.first());
+    length_[1] = r1.length();
+    storage_.setBase(1, r1.first());
+    length_[2] = r2.length();
+    storage_.setBase(2, r2.first());
+    length_[3] = r3.length();
+    storage_.setBase(3, r3.first());
+
+    setupStorage(3);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(Range r0, Range r1, Range r2, Range r3, Range r4,
+        GeneralArrayStorage<N> storage)
+        : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_[0] = r0.length();
+    storage_.setBase(0, r0.first());
+    length_[1] = r1.length();
+    storage_.setBase(1, r1.first());
+    length_[2] = r2.length();
+    storage_.setBase(2, r2.first());
+    length_[3] = r3.length();
+    storage_.setBase(3, r3.first());
+    length_[4] = r4.length();
+    storage_.setBase(4, r4.first());
+
+    setupStorage(4);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(Range r0, Range r1, Range r2, Range r3, Range r4, Range r5,
+        GeneralArrayStorage<N> storage)
+        : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_[0] = r0.length();
+    storage_.setBase(0, r0.first());
+    length_[1] = r1.length();
+    storage_.setBase(1, r1.first());
+    length_[2] = r2.length();
+    storage_.setBase(2, r2.first());
+    length_[3] = r3.length();
+    storage_.setBase(3, r3.first());
+    length_[4] = r4.length();
+    storage_.setBase(4, r4.first());
+    length_[5] = r5.length();
+    storage_.setBase(5, r5.first());
+
+    setupStorage(5);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(T *dataFirst,
+        Range r0,
+        preexistingMemoryPolicy deletionPolicy,
+        GeneralArrayStorage<N> storage)
+        : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_[0] = r0.length();
+    storage_.setBase(0, r0.first());
+    setupStorage(0, dataFirst, deletionPolicy);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(T *dataFirst,
+        Range r0, Range r1,
+        preexistingMemoryPolicy deletionPolicy,
+        GeneralArrayStorage<N> storage)
+        : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_[0] = r0.length();
+    storage_.setBase(0, r0.first());
+    length_[1] = r1.length();
+    storage_.setBase(1, r1.first());
+
+    setupStorage(1, dataFirst, deletionPolicy);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(T *dataFirst,
+        Range r0, Range r1, Range r2,
+        preexistingMemoryPolicy deletionPolicy,
+        GeneralArrayStorage<N> storage)
+        : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_[0] = r0.length();
+    storage_.setBase(0, r0.first());
+    length_[1] = r1.length();
+    storage_.setBase(1, r1.first());
+    length_[2] = r2.length();
+    storage_.setBase(2, r2.first());
+
+    setupStorage(2, dataFirst, deletionPolicy);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(T *dataFirst,
+        Range r0, Range r1, Range r2, Range r3, Range r4,
+        preexistingMemoryPolicy deletionPolicy,
+        GeneralArrayStorage<N> storage)
+        : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_[0] = r0.length();
+    storage_.setBase(0, r0.first());
+    length_[1] = r1.length();
+    storage_.setBase(1, r1.first());
+    length_[2] = r2.length();
+    storage_.setBase(2, r2.first());
+    length_[3] = r3.length();
+    storage_.setBase(3, r3.first());
+    length_[4] = r4.length();
+    storage_.setBase(4, r4.first());
+
+    setupStorage(4, dataFirst, deletionPolicy);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(T *dataFirst,
+        Range r0, Range r1, Range r2, Range r3,
+        preexistingMemoryPolicy deletionPolicy,
+        GeneralArrayStorage<N> storage)
+        : storage_(storage)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    length_[0] = r0.length();
+    storage_.setBase(0, r0.first());
+    length_[1] = r1.length();
+    storage_.setBase(1, r1.first());
+    length_[2] = r2.length();
+    storage_.setBase(2, r2.first());
+    length_[3] = r3.length();
+    storage_.setBase(3, r3.first());
+
+    setupStorage(3, dataFirst, deletionPolicy);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(PHArray<T, N> &array_in, Range r0)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    constructSubarray(array_in, r0);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(PHArray<T, N> &array_in, Range r0, Range r1)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    constructSubarray(array_in, r0, r1);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    constructSubarray(array_in, r0, r1, r2);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2, Range r3)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    constructSubarray(array_in, r0, r1, r2, r3);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2, Range r3, Range r4)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    constructSubarray(array_in, r0, r1, r2, r3, r4);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2, Range r3, Range r4, Range r5)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    constructSubarray(array_in, r0, r1, r2, r3, r4, r5);
+}
+
+template<typename T, int N>
+PHArray<T, N>::PHArray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2, Range r3, Range r4, Range r5, Range r6)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    constructSubarray(array_in, r0, r1, r2, r3, r4, r5, r6);
+}
+
+template < typename T, int N >
+template < int N2, typename R0, typename R1, typename R2, typename R3, typename R4,
+    typename R5, typename R6, typename R7, typename R8, typename R9, typename R10 >
+    PHArray<T, N>::PHArray(PHArray<T, N2> &array_in, R0 r0, R1 r1, R2 r2,
+    R3 r3, R4 r4, R5 r5, R6 r6, R7 r7, R8 r8, R9 r9, R10 r10)
+{
+#ifdef USE_SMARTARRAY
+    ZeroAllPointer();
+#endif
+    constructSlice(array_in, r0, r1, r2, r3, r4, r5, r6, r7, r8, r9, r10);
+}
+
+//! Public member functions:
+template<typename T, int N>
+int PHArray<T, N>::getindex(int i0, int i1, int i2, int i3) const
+{
+    return i0 * stride_[0] + i1 * stride_[1]
+    + i2 * stride_[2] + i3 * stride_[3];
+}
+
+template<typename T, int N>
+int PHArray<T, N>::lbound(int rank) const
+{
+    return base(rank); 
+}
+
+template<typename T, int N>
+SimpleArray<int, N> PHArray<T, N>::lbound() const
+{ 
+    return base();
+}
+
+template<typename T, int N>
+int PHArray<T, N>::ubound(int rank) const
+{ 
+    return base(rank) + length(rank) - 1;
+}
+
+template<typename T, int N>
+int PHArray<T, N>::length(int rank) const
+{
+    return length_[rank]; 
+}
+
+template<typename T, int N>
+const SimpleArray<int, N> & PHArray<T, N>::length() const
+{
+    return length_; 
+}
+
+template<typename T, int N>
+const SimpleArray<int, N> & PHArray<T, N>::base() const
+{
+    return storage_.base(); 
+}
+
+template<typename T, int N>
+int PHArray<T, N>::base(int rank) const
+{
+    return storage_.base(rank); 
+}
+
+template<typename T, int N>
+int PHArray<T, N>::stride(int rank) const
+{ 
+    return stride_[rank];
+}
+
+template<typename T, int N>
+int PHArray<T, N>::numElements() const 
+{
+    return product(length_);
+}
+
+template<typename T, int N>
+const T * PHArray<T, N>::data() const
+{
+    return data_ + dataOffset();
+}
+
+template<typename T, int N>
+T* PHArray<T, N>::data() 
+{ 
+    return data_ + dataOffset();
+}
+
+template<typename T, int N>
+bool PHArray<T, N>::canCollapse(int outerRank, int innerRank) const 
+{ 
+    return (stride(innerRank) * length(innerRank) == stride(outerRank));
+}
+
+template<typename T, int N>
+typename PHArray<T, N>::T_iterator PHArray<T, N>::beginFast() const
+{ 
+    return T_iterator(*this);
+}
+
+template<typename T, int N>
+int PHArray<T, N>::ordering(int storageRankIndex) const
+{ 
+    return storage_.ordering(storageRankIndex);
+}
+
+template<typename T, int N>
+const SimpleArray<int, N> & PHArray<T, N>::ordering() const
+{ 
+    return storage_.ordering();
+}
+
+template<typename T, int N>
+bool PHArray<T, N>::isMajorRank(int rank) const
+{  
+    return storage_.ordering(rank) == 0;
+}
+
+template<typename T, int N>
+bool PHArray<T, N>::isMinorRank(int rank) const
+{  
+    return storage_.ordering(rank) != 0; 
+}
+
+template<typename T, int N>
+bool PHArray<T, N>::isRankStoredAscending(int rank) const
+{
+    return storage_.isRankStoredAscending(rank);
+}
+
+//! Private member functions:
+template<typename T, int N>
+int PHArray<T, N>::dataOffset() const
+{
+    return dot(storage_.base(), stride_);
+}
+
+template<typename T, int N>
+void PHArray<T, N>::Reference(const T_array &array)
+{
+    storage_    = array.storage_;
+    length_     = array.length_;
+    stride_     = array.stride_;
+    zeroOffset_ = array.zeroOffset_;
+
+    MemoryBlockReference<T>::changeBlock(array.noConst());
+}
+template<typename T, int N>
+PHArray<T, N> & PHArray<T, N>::noConst() const
+{ 
+    return const_cast<PHArray<T, N> &>(*this);
+}
+
+template<typename T, int N>
+void PHArray<T, N>::setupStorage(int lastRankInitialized)
+{
+    // If the length of some of the ranks was unspecified, fill these
+    // in using the last specified value.
+    //
+    // e.g. Array<int,3> A(40) results in a 40x40x40 array.
+    for (int i = lastRankInitialized + 1; i < N; ++ i)
+    {
+        storage_.setBase(i, storage_.base(lastRankInitialized));
+        length_[i] = length_[lastRankInitialized];
+    }
+
+    // Compute strides
+    computeStrides();
+
+    // Allocate a block of memory
+    int numElem = numElements();
+    if (numElem == 0)
+    {
+        MemoryBlockReference<T>::changeToNullBlock();
+    }
+    else
+    {
+        MemoryBlockReference<T>::newBlock(numElem);
+    }
+
+    // Adjust the base of the array to account for non-zero base
+    // indices and reversals
+    data_ += zeroOffset_;
+
+#ifdef USE_SMARTARRAY
+    AllocateRange(lastRankInitialized + 1);
+#endif
+    //! End
+}
+
+template<typename T, int N>
+void PHArray<T, N>::setupStorage(int lastRankInitialized, T *data, preexistingMemoryPolicy deletionPolicy)
+{
+    // If the length of some of the ranks was unspecified, fill these
+    // in using the last specified value.
+    //
+    // e.g. Array<int, 3> A(40) results in a 40x40x40 array.
+    for (int i = lastRankInitialized + 1; i < N; ++ i)
+    {
+        storage_.setBase(i, storage_.base(lastRankInitialized));
+        length_[i] = length_[lastRankInitialized];
+    }
+
+    // Compute strides
+    computeStrides();
+
+    // Allocate a block of memory
+    int numElem = numElements();
+
+    MemoryBlockReference<T>::newBlock(numElem, data, deletionPolicy);
+
+    // Adjust the base of the array to account for non-zero base
+    // indices and reversals
+    data_ += zeroOffset_;
+
+#ifdef USE_SMARTARRAY
+    AllocateRange(lastRankInitialized + 1);
+#endif
+    //! End
+}
+
+template<typename T, int N>
+void PHArray<T, N>::computeStrides()
+{
+    int Ntmp = N;
+    if (Ntmp > 1)
+    {
+        int stride = 1;
+
+        // This flag simplifies the code in the loop, encouraging
+        // compile-time computation of strides through constant folding.
+        bool allAscending = storage_.allRanksStoredAscending();
+
+        for (int n = 0; n < Ntmp; ++ n)
+        {
+            int strideSign = +1;
+
+            // If this rank is stored in descending order, then the stride
+            // will be negative.
+            if (!allAscending)
+            {
+                if (!isRankStoredAscending(ordering(n)))
+                {
+                    strideSign = -1;
+                }
+            }
+
+            // The stride for this rank is the product of the lengths of
+            // the ranks minor to it.
+            stride_[ordering(n)] = stride * strideSign;
+
+            stride *= length_[ordering(n)];
+        }
+    }
+    else
+    {
+        // Specialization for N_rank == 1
+        // This simpler calculation makes it easier for the compiler
+        // to propagate stride values.
+
+        if (isRankStoredAscending(0))
+        {
+            stride_[0] = 1;
+        }
+        else
+        {
+            stride_[0] = -1;
+        }
+    }
+
+    calculateZeroOffset();
+}
+
+template<typename T, int N>
+void PHArray<T, N>::calculateZeroOffset()
+{
+    // Compute the offset of (0,0,...,0)
+    zeroOffset_ = 0;
+
+    // zeroOffset_ = - sum(where(ascendingFlag_, stride_ * base_,
+    //     (length_ - 1 + base_) * stride_))
+    for (int n = 0; n < N; ++ n)
+    {
+        if (!isRankStoredAscending(n))
+        {
+            zeroOffset_ -= (length_[n] - 1 + base(n)) * stride_[n];
+        }
+        else
+        {
+            zeroOffset_ -= stride_[n] * base(n);
+        }
+    }
+}
+
+template<typename T, int N>
+void PHArray<T, N>::constructSubarray(PHArray<T, N> &array_in, Range r0)
+{
+    Reference(array_in);
+    slice(0, r0);
+}
+
+template<typename T, int N>
+void PHArray<T, N>::constructSubarray(PHArray<T, N> &array_in, Range r0, Range r1)
+{
+    Reference(array_in);
+    slice(0, r0);
+    slice(1, r1);
+}
+
+template<typename T, int N>
+void PHArray<T, N>::constructSubarray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2)
+{
+    Reference(array_in);
+    slice(0, r0);
+    slice(1, r1);
+    slice(2, r2);
+}
+
+template<typename T, int N>
+void PHArray<T, N>::constructSubarray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2, Range r3)
+{
+    Reference(array_in);
+    slice(0, r0);
+    slice(1, r1);
+    slice(2, r2);
+    slice(3, r3);
+}
+
+template<typename T, int N>
+void PHArray<T, N>::constructSubarray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2, Range r3, Range r4)
+{
+    Reference(array_in);
+    slice(0, r0);
+    slice(1, r1);
+    slice(2, r2);
+    slice(3, r3);
+    slice(4, r4);
+}
+
+template<typename T, int N>
+void PHArray<T, N>::constructSubarray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2, Range r3, Range r4, Range r5)
+{
+    Reference(array_in);
+    slice(0, r0);
+    slice(1, r1);
+    slice(2, r2);
+    slice(3, r3);
+    slice(4, r4);
+    slice(5, r5);
+}
+
+template<typename T, int N>
+void PHArray<T, N>::constructSubarray(PHArray<T, N> &array_in, Range r0, Range r1, Range r2, Range r3, Range r4, Range r5, Range r6)
+{
+    Reference(array_in);
+    slice(0, r0);
+    slice(1, r1);
+    slice(2, r2);
+    slice(3, r3);
+    slice(4, r4);
+    slice(5, r5);
+    slice(6, r6);
+}
+
+#ifdef USE_SMARTARRAY
+template<typename T, int N>
+void PHArray<T, N>::ZeroAllPointer()
+{
+    //!ugks
+    data1  = NULL;
+    data2  = NULL;
+    data3  = NULL;
+    data4  = NULL;
+    data5  = NULL;
+    data6  = NULL;
+    datap1 = NULL;
+    datap2 = NULL;
+    datap3 = NULL;
+    datap4 = NULL;
+    datap5 = NULL;
+    datap6 = NULL;
+}
+
+template<typename T, int N>
+void PHArray<T, N>::AllocateRange(int dimension)
+{
+    switch (dimension)
+    {
+    case 1:
+        AllocateRange1();
+        break;
+    case 2:
+        AllocateRange2();
+        break;
+    case 3:
+        AllocateRange3();
+        break;
+    case 4:
+        AllocateRange4();
+        break;
+    case 5:
+        AllocateRange5();
+        break;
+    case 6:
+        AllocateRange6();
+        break;
+    default:
+#ifdef _DEBUG
+        printf("File: %s Line: %d Function: PHArray::AllocateRange Error\n", __FILE__, __LINE__);
+        //PHSPACE::FYUnexpectedSituation("PHArray::AllocateRange", dimension);
+#endif
+        exit(0);
+        break;
+    }
+}
+
+template<typename T, int N>
+void PHArray<T, N>::AllocateRange1()
+{
+    datap1 = data_;
+}
+
+template<typename T, int N>
+void PHArray<T, N>::AllocateRange2()
+{
+    int bound0 = length_[0];
+    int bound1 = length_[1];
+
+    data2 = new T * [bound1];
+    data1 = data_ - zeroOffset_;
+
+    int st1 = storage_.base(0);
+    int st2 = storage_.base(1);
+
+    datap2 = data2 - st2;
+    for (int i1 = 0; i1 < bound1; ++ i1)
+    {
+        int j0 = bound0 * i1;
+        datap2[i1 + st2] = & data1[j0] - st1;
+    }
+}
+
+template<typename T, int N>
+void PHArray<T, N>::AllocateRange3()
+{
+    int bound0 = length_[0];
+    int bound1 = length_[1];
+    int bound2 = length_[2];
+
+    int const bound12 = bound1 * bound2;
+    data3 = new T ** [bound2 ];
+    data2 = new T *  [bound12];
+    data1 = data_ - zeroOffset_;
+
+    int st1 = storage_.base(0);
+    int st2 = storage_.base(1);
+    int st3 = storage_.base(2);
+    
+    datap3 = data3 - st3;
+    for (int i2 = 0; i2 < bound2; ++ i2)
+    {
+        int j1 = bound1 * (i2);
+        datap3[i2 + st3] = &data2[j1] - st2;
+        for (int i1 = 0; i1 < bound1; ++ i1)
+        {
+            int j0 = bound0 * (i1 + j1);
+            datap3[i2 + st3][i1 + st2] = &data1[j0] - st1;
+        }
+    }
+}
+
+template<typename T, int N>
+void PHArray<T, N>::AllocateRange4()
+{
+    int bound0 = length_[0];
+    int bound1 = length_[1];
+    int bound2 = length_[2];
+    int bound3 = length_[3];
+
+    int const bound23  = bound2 * bound3;
+    int const bound123 = bound1 * bound23;
+    data4 = new T *** [bound3  ];
+    data3 = new T **  [bound23 ];
+    data2 = new T *   [bound123];
+    data1 = data_ - zeroOffset_;
+
+    int st1 = storage_.base(0);
+    int st2 = storage_.base(1);
+    int st3 = storage_.base(2);
+    int st4 = storage_.base(3);
+
+    datap4= data4 - st4;
+    for (int i3 = 0; i3 < bound3; ++ i3)
+    {
+        int j2 = bound2 * i3;  // = bound2*(i3 + j3) where j3 = 0
+        datap4[i3 + st4] = &data3[j2] - st3;
+        for (int i2 = 0; i2 < bound2; ++ i2)
+        {
+            int j1 = bound1 * (i2 + j2);
+            datap4[i3 + st4][i2 + st3] = &data2[j1] - st2;
+            for (int i1 = 0; i1 < bound1; ++ i1)
+            {
+                int j0 = bound0 * (i1 + j1);
+                datap4[i3 + st4][i2 + st3][i1 + st2] = &data1[j0] - st1;
+            }
+        }
+    }
+}
+
+template<typename T, int N>
+void PHArray<T, N>::AllocateRange5()
+{
+    int bound0 = length_[0];
+    int bound1 = length_[1];
+    int bound2 = length_[2];
+    int bound3 = length_[3];
+    int bound4 = length_[4];
+
+    int const bound34   = bound3 * bound4;
+    int const bound234  = bound2 * bound34;
+    int const bound1234 = bound1 * bound234;
+
+    data5 = new T ****[bound4   ];
+    data4 = new T *** [bound34  ];
+    data3 = new T **  [bound234 ];
+    data2 = new T *   [bound1234];
+
+    data1 = data_ - zeroOffset_;
+
+    int st1 = storage_.base(0);
+    int st2 = storage_.base(1);
+    int st3 = storage_.base(2);
+    int st4 = storage_.base(3);
+    int st5 = storage_.base(4);
+
+    datap5= data5 - st5;
+    for (int i4 = 0; i4 < bound4; ++ i4)
+    {
+        int j3 = bound3 * i4;
+        datap5[i4 + st5] = &data4[j3] - st4;
+        for (int i3 = 0; i3 < bound3; ++ i3)
+        {
+            int j2 = bound2 * (i3 + j3);
+            datap5[i4 + st5][i3 + st4] = &data3[j2] - st3;
+            for (int i2 = 0; i2 < bound2; ++ i2)
+            {
+                int j1 = bound1 * (i2 + j2);
+                datap5[i4 + st5][i3 + st4][i2 + st3] = &data2[j1] - st2;
+                for (int i1 = 0; i1 < bound1; ++ i1)
+                {
+                    int j0 = bound0 * (i1 + j1);
+                    datap5[i4 + st5][i3 + st4][i2 + st3][i1 + st2] = &data1[j0] - st1;
+                }
+            }
+        }
+    }
+}
+
+template<typename T, int N>
+void PHArray<T, N>::AllocateRange6()
+{
+    int bound0 = length_[0];
+    int bound1 = length_[1];
+    int bound2 = length_[2];
+    int bound3 = length_[3];
+    int bound4 = length_[4];
+    int bound5 = length_[5];
+
+    int const bound45    = bound4 * bound5;
+    int const bound345   = bound3 * bound45;
+    int const bound2345  = bound2 * bound345;
+    int const bound12345 = bound1 * bound2345;
+
+    data6 = new T *****[bound5    ];
+    data5 = new T **** [bound45   ];
+    data4 = new T ***  [bound345  ];
+    data3 = new T **   [bound2345 ];
+    data2 = new T *    [bound12345];
+
+    data1 = data_ - zeroOffset_;
+
+    int st1 = storage_.base(0);
+    int st2 = storage_.base(1);
+    int st3 = storage_.base(2);
+    int st4 = storage_.base(3);
+    int st5 = storage_.base(4);
+    int st6 = storage_.base(5);
+
+    datap6 = data6 - st6;
+    for (int i5 = 0; i5 < bound5; ++ i5)
+    {
+        int j4 = bound4 * i5;
+        datap6[i5 + st6] = &data5[j4] - st5;
+        for (int i4 = 0; i4 < bound4; ++ i4)
+        {
+            int j3 = bound3 * (i4 + j4);
+            datap6[i5 + st6][i4 + st5] = &data4[j3] - st4;
+            for (int i3 = 0; i3 < bound3; ++ i3)
+            {
+                int j2 = bound2 * (i3 + j3);
+                datap6[i5 + st6][i4 + st5][i3 + st4] = &data3[j2] - st3;
+                for (int i2 = 0; i2 < bound2; ++ i2)
+                {
+                    int j1 = bound1 * (i2 + j2);
+                    datap6[i5 + st6][i4 + st5][i3 + st4][i2 + st3] = &data2[j1] - st2;
+                    for (int i1 = 0; i1 < bound1; ++ i1)
+                    {
+                        int j0 = bound0 * (i1 + j1);
+                        datap6[i5 + st6][i4 + st5][i3 + st4][i2 + st3][i1 + st2] = &data1[j0] - st1;
+                    }
+                }
+            }
+        }
+    }
+}
+
+#endif
+//! End
+}
+
diff --git a/API/DataStruct/include/PHET.h b/API/DataStruct/include/PHET.h
new file mode 100644
index 0000000..8d64606
--- /dev/null
+++ b/API/DataStruct/include/PHET.h
@@ -0,0 +1,120 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PHET.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+
+namespace PHSPACE
+{
+class PHUpdaterBase { };
+
+template<typename X, typename Y>
+class PHUpdate : public PHUpdaterBase
+{
+public:
+    static inline void update(X &x, Y y)
+    {
+        x = (X)y; 
+    }
+};
+
+#define PH_DEFINE_UPDATER(name, op)                         \
+template<typename X, typename Y>                            \
+class name : public PHUpdaterBase                           \
+{                                                           \
+public:                                                     \
+    static inline void update(X &x, Y y)                    \
+    {                                                       \
+        x op y;                                             \
+    }                                                       \
+}
+
+PH_DEFINE_UPDATER(fy_plus_update    , +=);
+PH_DEFINE_UPDATER(fy_minus_update   , -=);
+PH_DEFINE_UPDATER(fy_multiply_update, *=);
+PH_DEFINE_UPDATER(fy_divide_update  , /=);
+
+#define PH_DECLARE_ARRAY_UNARY(name, functor)                             \
+                                                                          \
+template <typename T1>                                                    \
+inline                                                                    \
+typename PHUnaryExprResult<functor, T1>::T_result                         \
+name(const PHETBase<T1> &d1)                                              \
+{                                                                         \
+    typedef typename PHUnaryExprResult<functor, T1>::T_result result;     \
+    return result(PHExprWrap<T1>::getExpr(d1.unwrap()));                  \
+}
+
+#define PH_DECLARE_ARRAY_BINARY(name, applic)                             \
+                                                                          \
+template <typename T1, typename T2>                                       \
+inline                                                                    \
+typename PHBinaryExprResult<applic, T1, T2>::T_result                     \
+name(const PHETBase<T1> &d1,const PHETBase<T2> &d2)                       \
+{                                                                         \
+    typedef typename PHBinaryExprResult<applic, T1, T2>::T_result result; \
+    return result(PHExprWrap<T1>::getExpr(d1.unwrap()),                   \
+                  PHExprWrap<T2>::getExpr(d2.unwrap()));                  \
+}
+
+#define PH_DECLARE_ARRAY_BINARY_SCALAR(name, applic, scalar_type)                 \
+template<typename T>                                                              \
+inline                                                                            \
+typename PHBinaryExprResult<applic, scalar_type,T>::T_result                      \
+name(const scalar_type d1, const PHETBase<T> &d2)                                 \
+{                                                                                 \
+    typedef typename PHBinaryExprResult<applic, scalar_type, T>::T_result result; \
+    return result(PHExprWrap<scalar_type >::getExpr(d1),                          \
+                  PHExprWrap<T>::getExpr(d2.unwrap()));                           \
+}                                                                                 \
+                                                                                  \
+template<typename T>                                                              \
+inline                                                                            \
+typename PHBinaryExprResult<applic, T, scalar_type >::T_result                    \
+name(const PHETBase<T> &d1, const scalar_type d2)                                 \
+{                                                                                 \
+    typedef typename PHBinaryExprResult<applic, T, scalar_type >::T_result result;\
+    return result(PHExprWrap<T>::getExpr(d1.unwrap()),                            \
+                  PHExprWrap<scalar_type >::getExpr(d2));                         \
+}
+
+#define PH_DECLARE_ARRAY_SCALAR_OPERATIONS(scalar_type)                           \
+                                                                                  \
+PH_DECLARE_ARRAY_BINARY_SCALAR(operator +, Add     , scalar_type)                 \
+PH_DECLARE_ARRAY_BINARY_SCALAR(operator -, Subtract, scalar_type)                 \
+PH_DECLARE_ARRAY_BINARY_SCALAR(operator *, Multiply, scalar_type)                 \
+PH_DECLARE_ARRAY_BINARY_SCALAR(operator /, Divide  , scalar_type)
+
+PH_DECLARE_ARRAY_SCALAR_OPERATIONS(char)
+PH_DECLARE_ARRAY_SCALAR_OPERATIONS(unsigned char)
+PH_DECLARE_ARRAY_SCALAR_OPERATIONS(short)
+PH_DECLARE_ARRAY_SCALAR_OPERATIONS(unsigned short)
+PH_DECLARE_ARRAY_SCALAR_OPERATIONS(int)
+PH_DECLARE_ARRAY_SCALAR_OPERATIONS(unsigned int)
+PH_DECLARE_ARRAY_SCALAR_OPERATIONS(long)
+PH_DECLARE_ARRAY_SCALAR_OPERATIONS(unsigned long)
+PH_DECLARE_ARRAY_SCALAR_OPERATIONS(float)
+PH_DECLARE_ARRAY_SCALAR_OPERATIONS(double)
+PH_DECLARE_ARRAY_SCALAR_OPERATIONS(long double)
+
+PH_DECLARE_ARRAY_BINARY(operator+, Add)
+PH_DECLARE_ARRAY_BINARY(operator-, Subtract)
+PH_DECLARE_ARRAY_BINARY(operator*, Multiply)
+PH_DECLARE_ARRAY_BINARY(operator/, Divide)
+// unary operators
+PH_DECLARE_ARRAY_UNARY(operator+, UnaryPlus)
+PH_DECLARE_ARRAY_UNARY(operator-, UnaryMinus)
+
+}
+
diff --git a/API/DataStruct/include/PHETBase.h b/API/DataStruct/include/PHETBase.h
new file mode 100644
index 0000000..1c701ca
--- /dev/null
+++ b/API/DataStruct/include/PHETBase.h
@@ -0,0 +1,36 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PHETBase.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+#include <iostream>
+using namespace std;
+
+namespace PHSPACE
+{
+
+template<typename T>
+class PHETBase
+{ 
+public:
+    PHETBase() {}
+
+    PHETBase(const PHETBase<T> &){}
+    
+    T & unwrap() { return static_cast<T &>(*this); }
+    
+    const T & unwrap() const { return static_cast<const T &>(*this); }
+};
+}
+
diff --git a/API/DataStruct/include/PHExpr.h b/API/DataStruct/include/PHExpr.h
new file mode 100644
index 0000000..9d73beb
--- /dev/null
+++ b/API/DataStruct/include/PHExpr.h
@@ -0,0 +1,352 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PHExpr.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+
+#include "PHOps.h"
+#pragma warning (disable:4100)
+namespace PHSPACE
+{
+
+template<typename P_numtype>
+class PHArrayExprConstant
+{
+public:
+    typedef P_numtype T_numtype;
+    typedef T_numtype T_ctorArg1;
+    typedef int       T_ctorArg2;    // dummy
+
+    static const int numArrayOperands = 0;
+    static const int numIndexPlaceholders = 0;
+    static const int rank = 0;
+
+    PHArrayExprConstant(const PHArrayExprConstant<T_numtype> &a)
+        : value_(a.value_)
+    { }
+
+    PHArrayExprConstant(T_numtype value)
+        : value_(value)
+    { 
+    }
+public:
+    template<int N_rank>
+    T_numtype operator()(const SimpleArray<int, N_rank> &)
+    { 
+        return value_; 
+    }
+
+    T_numtype operator * ()
+    { 
+        return value_; 
+    }
+
+    void loadStride(int rank) {}
+
+    bool isUnitStride(int) const
+    { 
+        return true;
+    }
+
+    bool canCollapse(int outerLoopRank, int innerLoopRank) const 
+    {
+        return true; 
+    }
+
+    T_numtype fastRead(int i)
+    {
+        return value_; 
+    }
+
+    void push(int position) {}
+    void pop(int position) {}
+    void advance() {};
+    void advance(int n) {};
+protected:
+    PHArrayExprConstant() {}
+
+    T_numtype value_;
+};
+
+template<typename P_expr, typename P_op>
+class PHArrayExprUnaryOp
+{
+public:
+    typedef P_expr T_expr;
+    typedef P_op T_op;
+    typedef typename T_expr::T_numtype T_numtype1;
+    typedef typename T_op::T_numtype T_numtype;
+    typedef T_expr T_ctorArg1;
+    typedef int    T_ctorArg2;    // dummy
+
+    PHArrayExprUnaryOp(const PHArrayExprUnaryOp<T_expr, T_op> &a)
+        : iter_(a.iter_)
+    { }
+
+    PHArrayExprUnaryOp(const T_expr &a)
+        : iter_(a)
+    { }
+
+    int lbound(int rank)
+    { 
+        return iter_.lbound(rank);
+    }
+
+    int ubound(int rank)
+    { 
+        return iter_.ubound(rank);
+    }
+
+    T_numtype operator *()
+    {
+        return T_op::apply(*iter_);
+    }
+
+    template<int N_rank>
+    T_numtype operator()(const SimpleArray<int, N_rank> &i)
+    { 
+        return T_op::apply(iter1_(i));
+    }
+
+    void push(int position)
+    {
+        iter_.push(position);
+    }
+
+    void pop(int position)
+    {
+        iter_.pop(position);
+    }
+
+    void advance()
+    {
+        iter_.advance();
+    }
+
+    void advance(int n)
+    {
+        iter_.advance(n);
+    }
+
+    void loadStride(int rank)
+    {
+        iter_.loadStride(rank);
+    }
+
+    bool isUnitStride(int rank) const
+    { 
+        return iter_.isUnitStride(rank);
+    }
+
+    void advanceUnitStride()
+    {
+        iter_.advanceUnitStride();
+    }
+
+    bool canCollapse(int outerLoopRank, int innerLoopRank) const
+    { 
+        return iter_.canCollapse(outerLoopRank, innerLoopRank); 
+    }
+
+    T_numtype operator [](int i)
+    {
+        return T_op::apply(iter_[i]); 
+    }
+
+    T_numtype fastRead(int i)
+    { 
+        return T_op::apply(iter_.fastRead(i));
+    }
+
+    int suggestStride(int rank) const
+    {
+        return iter_.suggestStride(rank);
+    }
+
+    bool isStride(int rank, int stride) const
+    { 
+        return iter_.isStride(rank,stride);
+    }
+
+protected:
+    PHArrayExprUnaryOp() {}
+
+    T_expr iter_;
+};
+
+template<typename P_expr1, typename P_expr2, typename P_op>
+class PHArrayExprBinaryOp
+{
+public:
+    typedef P_expr1 T_expr1;
+    typedef P_expr2 T_expr2;
+    typedef P_op T_op;
+
+    typedef typename T_op::T_numtype T_numtype;
+
+    PHArrayExprBinaryOp(const PHArrayExprBinaryOp<T_expr1, T_expr2, T_op> &a)
+        : iter1_(a.iter1_), iter2_(a.iter2_)
+    { }
+
+    template<typename T1, typename T2>
+    PHArrayExprBinaryOp(T1 &a, T2 &b)
+        : iter1_(a), iter2_(b)
+    { }
+public:
+    template<int N_rank>
+    T_numtype operator()(const SimpleArray<int, N_rank> &i)
+    { 
+        return T_op::apply(iter1_(i), iter2_(i));
+    }
+
+    T_numtype operator * ()
+    { 
+        return T_op::apply(*iter1_, *iter2_);
+    }
+
+    void loadStride(int rank)
+    { 
+        iter1_.loadStride(rank); 
+        iter2_.loadStride(rank);
+    }
+
+    bool isUnitStride(int rank) const
+    { 
+        return iter1_.isUnitStride(rank) && iter2_.isUnitStride(rank);
+    }
+
+    void push(int position)
+    { 
+        iter1_.push(position);
+        iter2_.push(position);
+    }
+
+    void pop(int position)
+    { 
+        iter1_.pop(position);
+        iter2_.pop(position);
+    }
+
+    void advance()
+    { 
+        iter1_.advance();
+        iter2_.advance();
+    }
+
+    void advance(int n)
+    {
+        iter1_.advance(n);
+        iter2_.advance(n);
+    }
+
+    bool canCollapse(int outerLoopRank, int innerLoopRank) const
+    { 
+        return iter1_.canCollapse(outerLoopRank, innerLoopRank)
+            && iter2_.canCollapse(outerLoopRank, innerLoopRank);
+    }
+
+    T_numtype fastRead(int i)
+    { 
+        return T_op::apply(iter1_.fastRead(i), iter2_.fastRead(i));
+    }
+
+protected:
+    PHArrayExprBinaryOp() { }
+
+    T_expr1 iter1_;
+    T_expr2 iter2_;
+};
+
+template<typename P_expr>
+class PHArrayExpr : public PHETBase< PHArrayExpr<P_expr > >
+{
+public:
+    typedef P_expr T_expr;
+    typedef typename T_expr::T_numtype T_numtype;
+    typedef T_expr T_ctorArg1;
+    typedef int    T_ctorArg2;    // dummy
+public:
+    PHArrayExpr(const PHArrayExpr<T_expr> &a)
+        : PHETBase< PHArrayExpr<T_expr> >(a), iter_(a.iter_)
+    { }
+
+    template<typename T1, typename T2>
+    PHArrayExpr(const T1 &a, const T2 &b)
+        : iter_(a, b)
+    { }
+
+    template<typename T>
+    PHArrayExpr(const T &a)
+        : iter_(a)
+    { }
+public:
+
+    T_numtype operator * ()
+    {
+        return *iter_; 
+    }
+
+    template<int N_rank>
+    T_numtype operator()(const SimpleArray<int, N_rank> &i)
+    {
+        return iter_(i);
+    }
+
+    void loadStride(int rank)
+    { 
+        iter_.loadStride(rank);
+    }
+
+    bool isUnitStride(int rank) const
+    { 
+        return iter_.isUnitStride(rank);
+    }
+
+    bool canCollapse(int outerLoopRank, int innerLoopRank) const
+    { 
+        return iter_.canCollapse(outerLoopRank, innerLoopRank); 
+    }
+
+    T_numtype fastRead(int i)
+    { 
+        return iter_.fastRead(i);
+    }
+
+    void advance()
+    {
+        iter_.advance();
+    }
+
+    void advance(int n)
+    { 
+        iter_.advance(n);
+    }
+
+    void push(int position)
+    { 
+        iter_.push(position);
+    }
+
+    void pop(int position)
+    {
+        iter_.pop(position); 
+    }
+
+protected:
+    PHArrayExpr() { }
+    T_expr iter_;
+};
+
+}
+
diff --git a/API/DataStruct/include/PHExprWrap.h b/API/DataStruct/include/PHExprWrap.h
new file mode 100644
index 0000000..3b06b9a
--- /dev/null
+++ b/API/DataStruct/include/PHExprWrap.h
@@ -0,0 +1,73 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PHExprWrap.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+
+namespace PHSPACE
+{
+
+template <typename T>
+struct PHExprWrap
+{
+    typedef PHArrayExprConstant<T> T_expr;
+    static T_expr getExpr(const T &x) { return T_expr(x); }
+};
+
+//! Already an expression template term.
+template <typename T>
+struct PHExprWrap< PHArrayExpr<T> >
+{
+    typedef PHArrayExpr<T> T_expr;
+    static const T_expr & getExpr(const T_expr &x) { return x; }
+};
+
+//! An array operand.
+template <typename T,int N>
+struct PHExprWrap< PHArray<T, N> >
+{
+    typedef PHFastArrayIterator<T, N> T_expr;
+    static T_expr getExpr(const PHArray<T, N> &x) { return x.beginFast(); }
+};
+
+template < template < typename T1> class OP, typename O1>
+struct PHUnaryExprResult
+{
+    typedef PHArrayExpr
+    <
+        PHArrayExprUnaryOp
+        <
+            typename PHExprWrap<O1>::T_expr,
+            OP<typename PHExprWrap<O1>::T_expr::T_numtype> 
+        > 
+    > T_result;
+};
+
+//! A traits class that provides the return type of a binary operation.
+template <template <typename T1, typename T2> class OP, typename O1, typename O2>
+struct PHBinaryExprResult
+{
+    typedef PHArrayExpr
+    <  
+        PHArrayExprBinaryOp
+        <
+            typename PHExprWrap<O1>::T_expr,
+            typename PHExprWrap<O2>::T_expr,
+            OP<typename PHExprWrap<O1>::T_expr::T_numtype,typename PHExprWrap<O2>::T_expr::T_numtype>
+        >
+    > T_result;
+};
+
+}
+
diff --git a/API/DataStruct/include/PHFastArrayIterator.h b/API/DataStruct/include/PHFastArrayIterator.h
new file mode 100644
index 0000000..ecef7d0
--- /dev/null
+++ b/API/DataStruct/include/PHFastArrayIterator.h
@@ -0,0 +1,228 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PHFastArrayIterator.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+
+namespace PHSPACE
+{
+
+//! helper class ConstPointerStack.
+template<typename T, int N>
+class PHConstPointerStack
+{
+public:
+    typedef T T_numtype;
+
+    void operator = (const PHConstPointerStack<T, N> &rhs)
+    {
+        for (int i = 0; i < N; ++ i)
+        {
+            stack_[i] = rhs.stack_[i];
+        }
+    }
+
+    const T_numtype *& operator[](int position)
+    {
+        return stack_[position];
+    }
+      
+private:
+    const T_numtype *stack_[N];
+};
+
+template<typename T, int N>
+class PHFastArrayIterator
+{
+public:
+    typedef T T_numtype;
+    typedef PHArray<T, N> T_array;
+    typedef PHFastArrayIterator<T, N> iterator;
+    typedef const T_array &T_ctorArg1;
+    typedef int            T_ctorArg2;    // dummy
+
+    static const int numArrayOperands = 1;
+    static const int numIndexPlaceholders = 0;
+    static const int rank = N;
+
+    PHFastArrayIterator(const PHFastArrayIterator<T, N> &x)
+        : data_(x.data_), array_(x.array_),stride_(x.stride_)
+    { }
+
+    void operator = (const PHFastArrayIterator<T, N> &x)
+    {
+        array_  = x.array_;
+        data_   = x.data_;
+        stack_  = x.stack_;
+        stride_ = x.stride_;
+    }
+
+    PHFastArrayIterator(const T_array &array)
+        : array_(array)
+    {
+        data_   = array.data();
+        stride_ = array.stride(0);
+    }
+
+    ~PHFastArrayIterator()
+    { }
+
+    T_numtype operator()(const SimpleArray<int, N> &i)
+    { 
+        return array_(i);
+    }
+
+    int ascending(int rank)
+    {
+        if (rank < N)
+        {
+            return array_.isRankStoredAscending(rank);
+        }
+        else
+        {
+            return INT_MIN;    // tiny(int());
+        }
+    }
+
+    int ordering(int rank)
+    {
+        if (rank < N)
+        {
+            return array_.ordering(rank);
+        }
+        else
+        {
+            return INT_MIN;    // tiny(int());
+        }
+    }
+
+    int lbound(int rank)
+    { 
+        if (rank < N)
+        {
+            return array_.lbound(rank); 
+        }
+        else
+        {
+            return INT_MIN;    // tiny(int());
+        }
+    }
+
+    int ubound(int rank)
+    { 
+        if (rank < N)
+        {
+            return array_.ubound(rank); 
+        }
+        else
+        {
+            return INT_MAX;    // huge(int());
+        }
+    }
+
+    T operator * ()
+    { 
+        return *data_;
+    }
+
+    T operator[](int i)
+    { 
+        return data_[i * stride_];
+    }
+
+    T fastRead(int i)
+    { 
+        return data_[i];
+    }
+
+    int suggestStride(int rank) const
+    { 
+        return array_.stride(rank);
+    }
+
+    bool isStride(int rank, int stride) const
+    {
+        return array_.stride(rank) == stride;
+    }
+
+    void push(int position)
+    {
+        stack_[position] = data_;
+    }
+  
+    void pop(int position)
+    { 
+        data_ = stack_[position];
+    }
+
+    void advance()
+    {
+        data_ += stride_;
+    }
+
+    void advance(int n)
+    {
+        data_ += n * stride_;
+    }
+
+    void loadStride(int rank)
+    {
+        stride_ = array_.stride(rank);
+    }
+
+    const T * data() const
+    { 
+        return data_;
+    }
+
+    void SetData(const T *ptr)
+    {
+        data_ = ptr;
+    }
+
+    int stride() const
+    {
+        return stride_;
+    }
+
+    bool isUnitStride(int rank) const
+    {
+        return array_.stride(rank) == 1;
+    }
+
+    void advanceUnitStride()
+    {
+        ++ data_; 
+    }
+
+    bool canCollapse(int outerLoopRank, int innerLoopRank) const
+    { 
+        return array_.canCollapse(outerLoopRank, innerLoopRank);
+    }
+
+ //   template<typename T_shape>
+ //   bool shapeCheck(const T_shape &shape)
+ //   {
+    //    return areShapesConformable(shape, array_.length());
+    //}
+private:
+    const T *data_;
+    const T_array &array_;
+    PHConstPointerStack<T, N> stack_;
+    int stride_;
+};
+
+}
+
+
diff --git a/API/DataStruct/include/PHHeapSort.h b/API/DataStruct/include/PHHeapSort.h
new file mode 100644
index 0000000..0dc6a21
--- /dev/null
+++ b/API/DataStruct/include/PHHeapSort.h
@@ -0,0 +1,94 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PHHeapSort.h
+//! @brief     It defines kernel data structure of PHengLEI, named 'heapSortInplace'.
+//! @author    WanYunBo.
+
+#pragma once
+using namespace std;
+
+namespace PHSPACE
+{
+struct sortIdxValue
+{
+    RDouble val;
+    int idx;
+};
+
+#define COMPARE(a, b) ((a.val) < (b.val))
+    //k/2  2*k  2*k+1
+#define PARENT(k) ((k) >> 1)
+#define LEFT__(k) ((k) << 1)
+#define RIGHT_(k) (((k) << 1) | 0x1)
+
+template< typename T >
+class heapSortInplace
+{
+    //heap_max root >= child for k 2*k 2*k+1
+
+private:
+    T *_data;
+    int _N;
+
+public:
+    heapSortInplace(T *data, int N) : _data(data - 1), _N(N) {}
+
+    //private:
+    void swim(int k) 
+    {
+        while ((k > 1) && COMPARE(_data[k], _data[PARENT(k)]))
+        {
+            SWAP(_data[PARENT(k)], _data[k]);
+            k = PARENT(k);
+        }
+    }
+
+    void sink(int k, int N)
+    {
+        while (LEFT__(k) <= N)
+        {
+            int largest_child_idx = LEFT__(k);
+
+            if (largest_child_idx < N && COMPARE(_data[largest_child_idx + 1], _data[largest_child_idx])) ++largest_child_idx;
+
+            if (!COMPARE(_data[largest_child_idx], _data[k])) break;
+
+            SWAP(_data[k], _data[largest_child_idx]);
+            k = largest_child_idx;
+        }
+    }
+
+public:
+    void sort()
+    {
+        int N = _N;    //get_size();
+        for (int i = N / 2; i > 0; -- i)
+        {
+            sink(i, N);
+        }
+
+        while (N > 1)
+        {
+            SWAP(_data[1], _data[N]);
+            --N;
+            sink(1, N);
+        }
+    }
+
+    int get_size() const { return _N; }
+
+    void add(const T &data) { _data[++_N] = data; }
+    void set(int i, const T &data) { _data[i] = data; }
+    const T & get(int i) { return _data[i]; }
+};
+
+}
diff --git a/API/DataStruct/include/PHMatrix.h b/API/DataStruct/include/PHMatrix.h
new file mode 100644
index 0000000..5dd222d
--- /dev/null
+++ b/API/DataStruct/include/PHMatrix.h
@@ -0,0 +1,486 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PHMatrix.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+#include <cstddef>
+#include <vector>
+#include <cmath>
+#include "DataStruct_Array.h"
+#include "Pointer.h"
+#include "Constants.h"
+using namespace std;
+
+namespace PHSPACE
+{
+template < typename T >
+class MAT3D
+{
+private:
+    int ni, nj, nk;
+    T ***elems;
+    int Nelem;
+public:
+    MAT3D(int ni, int nj, int nk)
+    {
+        this->ni = ni;
+        this->nj = nj;
+        this->nk = nk;
+        Nelem = ni * nj * nk;
+        elems       = new T ** [ni];
+        elems[0]    = new T *  [ni * nj];
+        elems[0][0] = new T    [ni * nj * nk];
+        for (int i = 1; i < ni; ++ i)
+        {
+            elems[i] = &elems[i-1][nj];
+        }
+        
+        for (int j = 1; j < nj; ++ j)
+        {
+            elems[0][j] = &elems[0][j-1][nk];
+        }
+
+        for (int i = 1; i < ni; ++ i)
+        {
+            elems[i][0] = &elems[i-1][nj-1][nk];
+            for (int j = 1; j < nj; ++ j)
+            {
+                elems[i][j] = &elems[i][j-1][nk];
+            }
+        }
+    }
+
+    ~MAT3D()
+    {
+        delete [] elems[0][0];
+        delete [] elems[0];
+        delete [] elems;
+    }
+
+    T **  GetT2D(int i) const { return elems[i]; }
+    T *** GetT3D() const { return elems; }
+
+    void SwitchSign()
+    {
+        T *mat = elems[0][0];
+        for (int i = 0; i < Nelem; ++ i)
+        {
+            mat[i] = - mat[i];
+        }
+    }
+};
+
+template < typename T >
+inline void SetValue(T *v, int ni, const T &x)
+{
+    for (int i = 0; i < ni; ++ i)
+    {
+        v[i] = x;
+    }
+}
+
+template < typename T >
+inline void SetValue(T **v, int ni, int nj, const T &x)
+{
+    for (int i = 0; i < ni; ++ i)
+    {
+        for (int j = 0; j < nj; ++ j)
+        {
+            v[i][j] = x;
+        }
+    }
+}
+
+template < typename T >
+inline void SetValue(T **x, T **y, int ni, int nj, int coef)
+{
+    for (int i = 0; i < ni; ++ i)
+    {
+        for (int j = 0; j < nj; ++ j)
+        {
+            x[i][j] = coef * y[i][j];
+        }
+    }
+}
+
+template < typename T >
+inline void SetValue(T **x, T **y, int ni, int nj)
+{
+    for (int i = 0; i < ni; ++ i)
+    {
+        for (int j = 0; j < nj; ++ j)
+        {
+            x[i][j] = y[i][j];
+        }
+    }
+}
+
+
+template < typename T >
+void AllocateVector(vector < T * > &a, int length)
+{
+    for (int m = 0; m < a.size(); ++ m)
+    {
+        a[m] = new T [ length ];
+    }
+}
+
+template < typename T >
+void AllocateVector(vector < T * > *&a, int length, int nm)
+{
+    a = new vector < T * >(nm);
+    for (int m = 0; m < a.size(); ++ m)
+    {
+        (*a)[m] = new T [length];
+    }
+}
+
+template < typename T >
+void AllocateVector(vector< vector< T > > &data, int numberOfEquations, int numberOfElements)
+{
+    data.resize(numberOfEquations);
+    for (int iEquation = 0; iEquation < numberOfEquations; ++ iEquation)
+    {
+        data[iEquation].resize(numberOfElements);
+    }
+}
+
+template < typename T >
+void DeAllocateVector(vector < T * > &a)
+{
+    for (int m = 0; m < a.size(); ++ m)
+    {
+        delete [] a[m];
+    }
+}
+
+template < typename T >
+void DeAllocateVector(vector < T * > *a)
+{
+    for (int m = 0; m < a->size(); ++ m)
+    {
+        delete [] (*a)[m];
+    }
+    delete a;
+}
+
+// Compute the dot product of two vectors with length n
+template < typename T >
+T DotProduct(T *a, T *b, int n)
+{
+    T sum = 0.0;
+     for (int i = 0; i < n; ++ i)
+    {
+        sum += a[i] * b[i];
+    }
+    return sum;
+}
+
+// Compute the dot product of two vectors with length n
+template < typename T >
+T GetNorm(T *a, int n)
+{
+    T sum = 0.0;
+    for (int i = 0; i < n; ++ i)
+    {
+        sum += a[i] * a[i];
+    }
+    return sqrt(sum);
+}
+
+template < typename T >
+T GetAngleOfTwoVector(T* x, T* y, int n)
+{
+    RDouble cosnum = DotProduct(x, y, n)/GetNorm(x, n)/GetNorm(y, n);
+    if (cosnum > 1.0)
+    {
+        return 0;
+    }
+    else if(cosnum < -1.0)
+    {
+        return PI;
+    }
+    else
+    {
+        return acos(cosnum);
+    }
+}
+
+template < typename T >
+T ** MATMUL(T **matrixA, T **matrixB)
+{
+    int nrow = 3;
+    int ncol = 3;
+
+    T **result = NewPointer2 <T> (3, 3);
+
+    for (int row = 0; row < 3; ++ row)
+    {
+        for (int col = 0; col < 3; ++ col)
+        {
+            T sum = static_cast< T >(0);
+            for (int i = 0; i < 3; ++ i)
+            {
+                sum += matrixA[row][i] * matrixB[i][col];
+            }
+            result[row][col] = sum;
+        }
+    }
+    return result;
+}
+
+template < typename T >
+T * MATMUL(T **matrixA, T *matrixB)
+{
+    int nrow = 3;
+    int ncol = 3;
+
+    T *result = new T [3];
+
+    for (int row = 0; row < 3; ++ row)
+    {
+        T sum = static_cast< T >(0);
+        for (int i = 0; i <3; ++ i)
+        {
+            sum += matrixA[row][i] * matrixB[i];
+        }
+        result[row] = sum;
+    }
+    return result;
+}
+
+//solve the dq by LU decompound methods.
+template < typename T >
+void ScalarLUSolve(T **A, T *B, int N)
+{
+    // Forward substitution
+    B[0] /= A[0][0];
+    for (int i = 1; i < N; ++ i)
+    {
+        for (int k = 0; k < i; ++ k)
+        {
+            B[i] -= A[i][k] * B[k];
+        }
+        B[i] /= A[i][i];
+    } 
+
+    // Backward substitution
+    for (int i = N - 1; i >= 0; -- i)
+    {
+        for (int k = i + 1; k < N; ++ k)
+        {
+            B[i] -= A[i][k] * B[k];
+        }
+    }
+}
+
+template < typename T >
+void LUDCMPBlockDiag(MAT3D< T > *impmat, int len, int N)
+{
+    for (int iCell = 0; iCell < len; ++ iCell)
+    {
+        T **A = impmat->GetT2D(iCell);
+        for (int j = 0; j < N; ++ j)
+        {
+            // Lower triangular matrix
+            for (int i = j; i < N; ++ i)
+            {
+                for (int k = 0; k < j; ++ k)
+                {
+                    A[i][j] -= A[i][k] * A[k][j];
+                }
+            }
+
+            // Upper triangular matrix
+            for (int i = j + 1; i < N; ++ i)
+            {
+                for (int k = 0; k < j; ++ k)
+                {
+                    A[j][i] -= A[j][k] * A[k][i];
+                }
+                A[j][i] /= A[j][j];
+            }
+        }
+    }
+}
+
+template < typename T >
+void BlockLUInverse(T ***sub_matrix_A, T ***sub_matrix_B, T ***sub_matrix_C, int len, int N)
+{
+    for (int iCell = 0; iCell < len - 1; ++ iCell)
+    {
+        //A^-1 B
+        //forward elimination
+        for (int k = 0; k < N - 1; ++ k)
+        {
+            //scale row k by A[k][k]
+            for (int j = k + 1; j < N; ++ j)
+            {
+                sub_matrix_A[iCell][k][j] /= sub_matrix_A[iCell][k][k];
+            }
+            for (int j = 0; j < N; ++ j)
+            {
+                sub_matrix_B[iCell][k][j] /= sub_matrix_A[iCell][k][k];
+            }
+
+            //loop over rows
+            for (int i = k + 1; i < N; ++ i)
+            {
+                for (int j = k + 1; j < N; ++ j)
+                {
+                    sub_matrix_A[iCell][i][j] -= sub_matrix_A[iCell][i][k] * sub_matrix_A[iCell][k][j];
+                }
+                for (int j = 0; j < N; ++ j)
+                {
+                    sub_matrix_B[iCell][i][j] -= sub_matrix_A[iCell][i][k] * sub_matrix_B[iCell][k][j];
+                }
+            }
+        } //end of k
+
+        //scale by A[4][4]
+        for (int j = 0; j < N; ++ j)
+        {
+            sub_matrix_B[iCell][N - 1][j] /= sub_matrix_A[iCell][N - 1][N - 1];
+        }
+
+        //end forward elimination && start backward substitution
+        //loop over rows
+        for (int k = N - 2; k >= 0; -- k)
+        { ///3
+            for (int i = k + 1; i < N; ++ i)
+            {
+                for (int j = 0; j < N; ++ j)
+                {
+                    sub_matrix_B[iCell][k][j] -= sub_matrix_A[iCell][k][i] * sub_matrix_B[iCell][i][j];
+                }
+            }
+        } //end backward substitution
+
+        // compute A[cell+1] := A[cell+1] - C[cell+1] * B[cell];
+        for (int i = 0; i < N; ++ i)
+        {
+            for (int j = 0; j < N; ++ j)
+            {
+                for (int k = 0; k < N; ++ k)
+                {
+                    sub_matrix_A[iCell + 1][i][j] -= sub_matrix_C[iCell + 1][i][k] * sub_matrix_B[iCell][k][j];
+                }
+            }
+        }
+    } //end of jCell cell
+
+    //forward elimination
+    for (int k = 0; k < N - 1; ++ k)
+    {
+        //scale row k by A[k][k]
+        for (int j = k + 1; j < N; ++ j)
+        {
+            sub_matrix_A[len - 1][k][j] /= sub_matrix_A[len - 1][k][k];
+        }
+        //loop over rows
+        for (int i = k + 1; i < N; ++ i)
+        {
+            for (int j = k + 1; j < N; ++ j)
+            {
+                sub_matrix_A[len - 1][i][j] -= sub_matrix_A[len - 1][i][k] * sub_matrix_A[len - 1][k][j];
+            }
+        }
+    } //end of k end forward elimination
+}
+
+//! Solve tri-diagonal block system
+template < typename T >
+void BlockLUSolve(T **DQ, T ***sub_matrix_A, T ***sub_matrix_B, T ***sub_matrix_C, int len, int N)
+{
+    //forward elimination for the tridiagonal block system
+    for (int iCell = 0; iCell < len - 1; ++ iCell)
+    {
+        //A^-1 dq
+        //forward elimination
+        for (int k = 0; k < N - 1; ++ k)
+        {
+            //scale row k by A[k][k]
+            DQ[iCell][k] /= sub_matrix_A[iCell][k][k];
+            //loop over rows
+            for (int i = k + 1; i < N; ++ i)
+            {
+                DQ[iCell][i] -= sub_matrix_A[iCell][i][k] * DQ[iCell][k];
+            }
+        } //end of k
+
+        //scale by A[4][4]
+        DQ[iCell][N - 1] /= sub_matrix_A[iCell][N - 1][N - 1];
+
+        //end forward elimination && start backward substitution
+        //loop over rows
+        for (int k = N - 2; k >= 0; -- k)
+        { ///3
+            for (int i = k + 1; i < N; ++ i)
+            {
+                DQ[iCell][k] -= sub_matrix_A[iCell][k][i] * DQ[iCell][i];
+            }
+        } //end backward substitution
+
+        // compute dq[cell+1] := dq[cell+1] - C[cell+1] * dq[cell];
+        for (int i = 0; i < N; ++ i)
+        {
+            for (int k = 0; k < N; ++ k)
+            {
+                DQ[iCell + 1][i] -= sub_matrix_C[iCell + 1][i][k] * DQ[iCell][k];
+            }
+        }
+    } //end of jCell cell
+
+    //A^-1 dq at len-1
+    //forward elimination
+    for (int k = 0; k < N - 1; ++ k)
+    {
+        //scale row k by A[k][k]
+        DQ[len - 1][k] /= sub_matrix_A[len - 1][k][k];
+        //loop over rows
+        for (int i = k + 1; i < N; ++ i)
+        {
+            DQ[len - 1][i] -= sub_matrix_A[len - 1][i][k] * DQ[len - 1][k];
+        }
+    } //end of k end forward elimination
+
+    //scale by A[4][4]
+    DQ[len - 1][N - 1] /= sub_matrix_A[len - 1][N - 1][N - 1];
+
+    //end forward elimination && start backward substitution
+    //loop over rows
+    for (int k = N - 2; k >= 0; -- k)
+    { ///3
+        for (int i = k + 1; i < N; ++ i)
+        {
+            DQ[len - 1][k] -= sub_matrix_A[len - 1][k][i] * DQ[len - 1][i];
+        }
+    } //end backward substitution
+
+    //backward substitution for the block tri-diagonal system
+    //loop over block rows
+    for (int iCell = len - 2; iCell >= 0; -- iCell)
+    { ///-2
+        //compute dq = dq- B dq[cell+1]
+        for (int i = 0; i < N; ++ i)
+        {
+            for (int k = 0; k < N; ++ k)
+            {
+                DQ[iCell][i] -= sub_matrix_B[iCell][i][k] * DQ[iCell + 1][k];
+            }
+        }
+    }
+}
+
+}
diff --git a/API/DataStruct/include/PHMemblock.h b/API/DataStruct/include/PHMemblock.h
new file mode 100644
index 0000000..d8aa4ce
--- /dev/null
+++ b/API/DataStruct/include/PHMemblock.h
@@ -0,0 +1,305 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PHMemblock.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+
+#include <stddef.h>    // ptrdiff_t
+
+namespace PHSPACE
+{
+template<typename P_numtype>
+class NumericTypeTraits
+{
+public:
+    typedef P_numtype T_sumtype;       //! Type to be used for summing.
+    typedef P_numtype T_difftype;      //! Type to be used for difference.
+    typedef P_numtype T_floattype;     //! Type to be used for floating-point.
+                                       //! calculations.
+    typedef P_numtype T_signedtype;    //! Type to be used for signed calculations.
+    enum { hasTrivialCtor = 0 };       //! Assume the worst.
+};
+enum preexistingMemoryPolicy
+{ 
+    duplicateData, 
+    deleteDataWhenDone, 
+    neverDeleteData 
+};
+
+//! Forward declaration of MemoryBlockReference.
+template < typename T_type > class MemoryBlockReference;
+
+//! Class MemoryBlock provides a reference-counted block of memory.  This block
+//! may be referred to by multiple vector, matrix and array objects.  The memory
+//! is automatically deallocated when the last referring object is destructed.
+//! MemoryBlock may be subclassed to provide special allocators.
+template<typename P_type>
+class MemoryBlock
+{
+    friend class MemoryBlockReference<P_type>;
+public:
+    typedef P_type T_type;
+protected:
+    MemoryBlock()
+    {
+        length_ = 0;
+        data_ = 0;
+        dataBlockAddress_ = 0;
+        references_ = 0;
+    }
+
+    explicit MemoryBlock(size_t items)
+    {
+        length_ = items;
+        allocate(length_);
+
+        references_ = 0;
+    }
+
+    MemoryBlock(size_t length, T_type *data)
+    {
+        length_ = length;
+        data_   = data;
+        dataBlockAddress_ = data;
+        references_ = 0;
+    }
+
+    virtual ~MemoryBlock()
+    {
+        if (dataBlockAddress_)
+        {
+            deallocate();
+        }
+    }
+
+    void addReference()
+    { 
+        ++ references_;
+    }
+
+    T_type * data()
+    { 
+        return data_;
+    }
+
+    const T_type * data() const
+    { 
+        return data_;
+    }
+
+    T_type *& dataBlockAddress()
+    { 
+        return dataBlockAddress_;
+    }
+
+    size_t length() const
+    { 
+        return length_;
+    }
+
+    int removeReference()
+    {
+        int refcount = -- references_;
+        return refcount;
+    }
+
+    int references() const
+    {
+        int refcount = references_;
+        return refcount;
+    }
+
+protected:
+    inline void allocate(size_t length);
+    void deallocate();
+
+private:    //! Disabled member functions.
+    MemoryBlock(const MemoryBlock<T_type> &)
+    { }
+
+    void operator=(const MemoryBlock<T_type> &)
+    { }
+
+private:    //! Data members.
+    T_type *data_;
+    T_type *dataBlockAddress_;
+
+    volatile int references_;
+    size_t length_;
+};
+
+template<typename P_type>
+class UnownedMemoryBlock : public MemoryBlock<P_type>
+{
+public:
+    UnownedMemoryBlock(size_t length, P_type *data)
+        : MemoryBlock<P_type>(length, data)
+    {
+        //! This ensures that MemoryBlock destructor will not 
+        //! attempt to delete data.
+        MemoryBlock<P_type>::dataBlockAddress() = 0;
+    }
+
+    virtual ~UnownedMemoryBlock()
+    {
+    }
+};
+
+template<typename P_type>
+class NullMemoryBlock : public MemoryBlock<P_type>
+{
+public:
+    NullMemoryBlock()
+    { 
+        //! This ensures that the delete operator will not be invoked
+        //! on an instance of NullMemoryBlock in removeReference().
+        MemoryBlock<P_type>::addReference();
+    }
+
+    virtual ~NullMemoryBlock()  
+    { }
+};
+
+template<typename P_type>
+class MemoryBlockReference
+{
+public:
+    typedef P_type T_type;
+protected:
+    T_type *data_;
+
+private:
+    MemoryBlock<T_type> *block_;
+    static NullMemoryBlock<T_type> nullBlock_;
+public:
+    MemoryBlockReference()
+    {
+        block_ = &nullBlock_;
+        block_->addReference();
+        data_ = 0;
+    }
+
+    MemoryBlockReference(MemoryBlockReference<T_type> &ref, size_t offset = 0)
+    {
+        block_ = ref.block_;
+        block_->addReference();
+        data_ = ref.data_ + offset;
+    }
+
+    MemoryBlockReference(size_t length, T_type *data, 
+        preexistingMemoryPolicy deletionPolicy)
+    {
+        //! Create a memory block using already allocated memory. 
+
+        //! Note: if the deletionPolicy is duplicateData, this must
+        //! be handled by the leaf class.  In MemoryBlockReference,
+        //! this is treated as neverDeleteData; the leaf class (e.g. Array)
+        //! must duplicate the data.
+
+        if ((deletionPolicy == neverDeleteData) || (deletionPolicy == duplicateData))
+        {
+            block_ = new UnownedMemoryBlock<T_type>(length, data);
+        }
+        else if (deletionPolicy == deleteDataWhenDone)
+        {
+            block_ = new MemoryBlock<T_type>(length, data);
+        }
+        block_->addReference();
+
+        data_ = data;
+    }
+
+    explicit MemoryBlockReference(size_t items)
+    {
+        block_ = new MemoryBlock<T_type>(items);
+        block_->addReference();
+        data_ = block_->data();
+    }
+
+    void blockRemoveReference()
+    {
+        int refcount = block_->removeReference();
+        if ((refcount == 0) && (block_ != &nullBlock_))
+        {
+            delete block_;
+        }
+    }
+
+    ~MemoryBlockReference()
+    {
+        blockRemoveReference();
+    }
+
+    int numReferences() const
+    {
+        return block_->references();
+    }
+
+protected:
+    void changeToNullBlock()
+    {
+        blockRemoveReference();
+        block_ = &nullBlock_;
+        block_->addReference();
+        data_ = 0;
+    }
+
+    void changeBlock(MemoryBlockReference<T_type> &ref, size_t offset = 0)
+    {
+        blockRemoveReference();
+        block_ = ref.block_;
+        block_->addReference();
+        data_ = ref.data_ + offset;
+    }
+
+    void newBlock(size_t items)
+    {
+        blockRemoveReference();
+        block_ = new MemoryBlock<T_type>(items);
+        block_->addReference();
+        data_ = block_->data();
+    }
+
+    void newBlock(size_t length, T_type *data, 
+        preexistingMemoryPolicy deletionPolicy)
+    {
+        //! Create a memory block using already allocated memory.
+
+        //! Note: if the deletionPolicy is duplicateData, this must
+        //! be handled by the leaf class.  In MemoryBlockReference,
+        //! this is treated as neverDeleteData; the leaf class (e.g. Array)
+        //! must duplicate the data.
+        blockRemoveReference();
+
+        if ((deletionPolicy == neverDeleteData) || (deletionPolicy == duplicateData))
+        {
+            block_ = new UnownedMemoryBlock<T_type>(length, data);
+        }
+        else if (deletionPolicy == deleteDataWhenDone)
+        {
+            block_ = new MemoryBlock<T_type>(length, data);
+        }
+        block_->addReference();
+
+        data_ = data;
+    }
+
+private:
+    void operator = (const MemoryBlockReference<T_type> &)
+    { }
+};
+
+}
+
+#include "PHMemblock.hxx"
diff --git a/API/DataStruct/include/PHMemblock.hxx b/API/DataStruct/include/PHMemblock.hxx
new file mode 100644
index 0000000..2e84363
--- /dev/null
+++ b/API/DataStruct/include/PHMemblock.hxx
@@ -0,0 +1,77 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//#include "FYMemblock.h"
+
+namespace PHSPACE
+{
+// Null memory block for each (template) instantiation of MemoryBlockReference
+template<typename P_type>
+NullMemoryBlock<P_type> MemoryBlockReference<P_type>::nullBlock_;
+
+template<typename P_type>
+void MemoryBlock<P_type>::deallocate()
+{
+    if (!NumericTypeTraits<T_type>::hasTrivialCtor)
+    {
+        for (std::size_t i = 0; i < length_; ++ i)
+        {
+            data_[i].~T_type();
+        }
+        delete [] reinterpret_cast<char*>(dataBlockAddress_);
+    }
+    else
+    {
+        delete [] dataBlockAddress_;
+    }
+}
+
+template<typename P_type>
+inline void MemoryBlock<P_type>::allocate(size_t length)
+{
+    size_t numBytes = length * sizeof(T_type);
+
+    if (numBytes < 1024)
+    {
+        dataBlockAddress_ = new T_type[length];
+        data_ = dataBlockAddress_;
+    }
+    else
+    {
+        // We're allocating a large array.  For performance reasons,
+        // it's advantageous to force the array to start on a
+        // cache line boundary.  We do this by allocating a little
+        // more memory than necessary, then shifting the pointer
+        // to the next cache line boundary.
+
+        // Patches by Petter Urkedal to support types with nontrivial
+        // constructors.
+
+        const int cacheBlockSize = 128;    // Will work for 32, 16 also
+
+        dataBlockAddress_ = reinterpret_cast<T_type*>(new char[numBytes + cacheBlockSize - 1]);
+        // Shift to the next cache line boundary
+
+        //ptrdiff_t offset = ptrdiff_t(dataBlockAddress_) % cacheBlockSize;
+        ptrdiff_t offset = reinterpret_cast<ptrdiff_t>(dataBlockAddress_) % cacheBlockSize;
+        ptrdiff_t shift  = (offset == 0) ? 0 : (cacheBlockSize - offset);
+        data_ = reinterpret_cast<T_type *>(reinterpret_cast<char *>(dataBlockAddress_) + shift);
+
+        // Use placement new to construct types with nontrival ctors
+        for (std::size_t i = 0; i < length; ++ i)
+        {
+            new(&data_[i]) T_type;
+        }
+    }
+}
+
+}
+
diff --git a/API/DataStruct/include/PHOps.h b/API/DataStruct/include/PHOps.h
new file mode 100644
index 0000000..dd63b34
--- /dev/null
+++ b/API/DataStruct/include/PHOps.h
@@ -0,0 +1,141 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PHOps.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+namespace PHSPACE
+{
+
+template<typename T>
+struct autopromote_trait
+{
+    typedef T T_numtype;
+};
+
+template<typename T1, typename T2, bool promote2T1>
+struct promote2
+{
+    typedef T1 T_promote;
+};
+
+template<typename T1, typename T2>
+struct promote2<T1, T2, false>
+{
+    typedef T2 T_promote;
+};
+
+/*
+ * This compiler supports partial specialization, so type promotion
+ * can be done the elegant way.  This implementation is after ideas
+ * by Jean-Louis Leroy.
+ */
+
+template<typename T>
+struct precision_trait 
+{
+    static const int  precisionRank = 0;
+    static const bool knowPrecisionRank = false;
+};
+
+template<typename T1_orig, typename T2_orig>
+struct promote_trait 
+{
+    //! Handle promotion of small integers to int/unsigned int.
+    typedef typename autopromote_trait<T1_orig>::T_numtype T1;
+    typedef typename autopromote_trait<T2_orig>::T_numtype T2;
+
+    //! True if T1 is higher ranked.
+    static const bool T1IsBetter = precision_trait<T1>::precisionRank > precision_trait<T2>::precisionRank;
+
+    //! True if we know ranks for both T1 and T2.
+    static const bool knowBothRanks = precision_trait<T1>::knowPrecisionRank && precision_trait<T2>::knowPrecisionRank;
+
+    //! True if we know T1 but not T2.
+    static const bool knowT1butNotT2 = precision_trait<T1>::knowPrecisionRank && !precision_trait<T2>::knowPrecisionRank;
+
+    //! True if we know T2 but not T1.
+    static const bool knowT2butNotT1 = precision_trait<T2>::knowPrecisionRank && !precision_trait<T1>::knowPrecisionRank;
+
+    //! True if T1 is bigger than T2.
+    static const bool T1IsLarger = sizeof(T1) >= sizeof(T2);
+
+    //! We know T1 but not T2: false.
+    //! We know T2 but not T1: true.
+    //! Otherwise, if T1 is bigger than T2: true.
+    //! static const bool.
+    //defaultPromotion = knowT1butNotT2 ? false : (knowT2butNotT1 ? true : T1IsLarger);
+    
+    //! If we have both ranks, then use them.
+    //! If we have only one rank, then use the unknown type.
+    //! If we have neither rank, then promote to the larger type.
+    static const bool promoteToT1 = knowBothRanks ? T1IsBetter : (knowT1butNotT2 ? false : (knowT2butNotT1 ? true : T1IsLarger));
+
+    typedef typename promote2<T1, T2, promoteToT1>::T_promote T_promote;
+};
+
+
+//#define PH_PROMOTE(A,B) A
+#define PH_PROMOTE(A, B) typename promote_trait<A, B>::T_promote
+
+#define PH_DEFINE_UNARY_OP(name, op)                           \
+template<typename T_numtype1>                                  \
+struct name                                                    \
+{                                                              \
+    typedef T_numtype1 T_numtype;                              \
+                                                               \
+    static inline T_numtype                                    \
+    apply(T_numtype1 a)                                        \
+    {                                                          \
+        return op a;                                           \
+    }                                                          \
+                                                               \
+};
+
+#define PH_DEFINE_BINARY_OPERATION(name, op)                      \
+template<typename T_numtype1, typename T_numtype2>                \
+struct name                                                       \
+{                                                                 \
+    typedef PH_PROMOTE(T_numtype1, T_numtype2) T_numtype;         \
+                                                                  \
+    static inline T_numtype                                       \
+    apply(T_numtype1 a, T_numtype2 b)                             \
+    {                                                             \
+        return a op b;                                            \
+    }                                                             \
+                                                                  \
+};
+
+#define PH_DEFINE_BINARY_FUNCTION(name, functor)                  \
+template<typename T_numtype1, typename T_numtype2>                \
+struct name                                                       \
+{                                                                 \
+    typedef PH_PROMOTE(T_numtype1, T_numtype2) T_numtype;         \
+                                                                  \
+    static inline T_numtype                                       \
+    apply(T_numtype1 a, T_numtype2 b)                             \
+    {                                                             \
+        return functor(a, b);                                     \
+    }                                                             \
+                                                                  \
+};
+
+PH_DEFINE_UNARY_OP(UnaryPlus , +)
+PH_DEFINE_UNARY_OP(UnaryMinus, -)
+
+PH_DEFINE_BINARY_OPERATION(Add     , +)
+PH_DEFINE_BINARY_OPERATION(Subtract, -)
+PH_DEFINE_BINARY_OPERATION(Multiply, *)
+PH_DEFINE_BINARY_OPERATION(Divide  , /)
+
+}
+
diff --git a/API/DataStruct/include/PHOps.hxx b/API/DataStruct/include/PHOps.hxx
new file mode 100644
index 0000000..4998508
--- /dev/null
+++ b/API/DataStruct/include/PHOps.hxx
@@ -0,0 +1,764 @@
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//                                                                             +
+//       Hybrid Platform for Engineering and Research of Flows (HyperFlow)     +
+//                        �������幤�����о��Ļ��CFDƽ̨                      +
+//                        ��C��Zhang Laiping and He Xin                        +
+//                    State Key Laboratory of Aerodynamics                     +
+//                    Computational Aerodynamics Institute                     +
+//            China Aerodynamics Research and Development Center               +
+//                                 Since 2007                                  +
+//                                                                             +
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+// �ļ�ͷ��˵����                                                              +
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+// FILE:       XXX.cpp (XXX.h)                                                 +
+// AUTHOR(S):  He Xin                                                          +
+// PURPOSE:    simulation object                                               +
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+// ����ͷ��˵����                                                              +
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+// Function:   ���磺Simulation::Simulation()                                  +
+// AUTHOR(S):  He Xin                                                          +
+// PURPOSE:    ����˵����ģ��Ĺ���                                            +
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+
+namespace PHSPACE
+{
+//! Operator() functions:
+template<typename T, int N>
+const T & PHArray<T, N>::operator()(int i0) const
+{
+    //assertInRange(i0);
+#ifdef USE_SMARTARRAY
+    return datap1[i0];
+#else
+    return data_[i0 * stride_[0]];
+#endif
+}
+
+template<typename T, int N>
+T & PHArray<T, N>::operator()(int i0)
+{
+    //assertInRange(i0);
+#ifdef USE_SMARTARRAY
+    return datap1[i0];
+#else
+    return data_[i0 * stride_[0]];
+#endif
+}
+
+template<typename T, int N>
+const T & PHArray<T, N>::operator()(int i0, int i1) const
+{ 
+    //assertInRange(i0, i1);
+#ifdef USE_SMARTARRAY
+    return datap2[i1][i0];
+#else
+    return data_[i0 * stride_[0] + i1 * stride_[1]];
+#endif
+}
+
+template<typename T, int N>
+T & PHArray<T, N>::operator()(int i0, int i1)
+{
+    //assertInRange(i0, i1);
+#ifdef USE_SMARTARRAY
+    return datap2[i1][i0];
+#else
+    return data_[i0 * stride_[0] + i1 * stride_[1]];
+#endif
+}
+
+template<typename T, int N>
+const T & PHArray<T, N>::operator()(int i0, int i1, int i2) const
+{
+    //assertInRange(i0, i1, i2);
+#ifdef USE_SMARTARRAY
+    return datap3[i2][i1][i0];
+#else
+    return data_[i0 * stride_[0] + i1 * stride_[1]
+    + i2 * stride_[2]];
+#endif
+}
+
+template<typename T, int N>
+T & PHArray<T, N>::operator()(int i0, int i1, int i2)
+{
+    //assertInRange(i0, i1, i2);
+#ifdef USE_SMARTARRAY
+    return datap3[i2][i1][i0];
+#else
+    return data_[i0 * stride_[0] + i1 * stride_[1]
+    + i2 * stride_[2]];
+#endif
+}
+
+template<typename T, int N>
+const T & PHArray<T, N>::operator()(int i0, int i1, int i2, int i3) const
+{
+    //assertInRange(i0, i1, i2);
+#ifdef USE_SMARTARRAY
+    return datap4[i3][i2][i1][i0];
+#else
+    return data_[i0 * stride_[0] + i1 * stride_[1]
+    + i2 * stride_[2] + i3 * stride_[3]];
+#endif
+}
+
+template<typename T, int N>
+T & PHArray<T, N>::operator()(int i0, int i1, int i2, int i3)
+{
+    //assertInRange(i0, i1, i2);
+#ifdef USE_SMARTARRAY
+    return datap4[i3][i2][i1][i0];
+#else
+    return data_[i0 * stride_[0] + i1 * stride_[1]
+    + i2 * stride_[2] + i3 * stride_[3]];
+#endif
+}
+
+template<typename T, int N>
+const T & PHArray<T, N>::operator()(int i0, int i1, int i2, int i3, int i4) const
+{
+#ifdef USE_SMARTARRAY
+    return datap5[i4][i3][i2][i1][i0];
+#else
+    return data_[i0 * stride_[0] + i1 * stride_[1]
+    + i2 * stride_[2] + i3 * stride_[3] + i4 * stride_[4]];
+#endif
+}
+
+template<typename T, int N>
+T & PHArray<T, N>::operator()(int i0, int i1, int i2, int i3, int i4)
+{
+#ifdef USE_SMARTARRAY
+    return datap5[i4][i3][i2][i1][i0];
+#else
+    return data_[i0 * stride_[0] + i1 * stride_[1]
+    + i2 * stride_[2] + i3 * stride_[3] + i4 * stride_[4]];
+#endif
+}
+
+//!ugks
+template<typename T, int N>
+const T & PHArray<T, N>::operator()(int i0, int i1, int i2, int i3, int i4, int i5) const
+{
+#ifdef USE_SMARTARRAY
+    return datap6[i5][i4][i3][i2][i1][i0];
+#else
+    return data_[i0 * stride_[0] + i1 * stride_[1]
+    + i2 * stride_[2] + i3 * stride_[3] + i4 * stride_[4] + i5 * stride_[5]];
+#endif
+}
+//!ugks
+template<typename T, int N>
+T & PHArray<T, N>::operator()(int i0, int i1, int i2, int i3, int i4, int i5) 
+{
+#ifdef USE_SMARTARRAY
+    return datap6[i5][i4][i3][i2][i1][i0];
+#else
+    return data_[i0 * stride_[0] + i1 * stride_[1]
+    + i2 * stride_[2] + i3 * stride_[3] + i4 * stride_[4]+i5 * stride_[5]];
+#endif
+}
+
+template<typename T, int N>
+const T & PHArray<T, N>::operator[](int i) const
+{
+    return data_[i];
+}
+
+template<typename T, int N>
+T & PHArray<T, N>::operator[](int i)
+{
+    return data_[i];
+}
+
+template<typename T, int N>
+template<int N_rank2>
+const T & PHArray<T, N>::operator()(const SimpleArray<int, N_rank2> &index) const
+{
+    return data_[dot(index, stride_)];
+}
+
+template<typename T, int N>
+template<int N_rank2>
+T & PHArray<T, N>::operator()(const SimpleArray<int, N_rank2> &index)
+{
+    return data_[dot(index, stride_)];
+}
+
+template<typename T, int N>
+PHArray<T, N> PHArray<T, N>::operator()(Range r0) const
+{
+    return PHArray<T, N>(noConst(), r0);
+}
+
+template<typename T, int N>
+PHArray<T, N> PHArray<T, N>::operator()(Range r0, Range r1) const
+{
+    return PHArray<T, N>(noConst(), r0, r1);
+}
+
+template<typename T, int N>
+PHArray<T, N> PHArray<T, N>::operator()(Range r0, Range r1, Range r2) const
+{
+    return T_array(noConst(), r0, r1, r2);
+}
+
+template<typename T, int N>
+PHArray<T, N> PHArray<T, N>::operator()(Range r0, Range r1, Range r2, Range r3) const
+{
+    return PHArray<T, N>(noConst(), r0, r1, r2, r3);
+}
+
+template<typename T, int N>
+PHArray<T, N> PHArray<T, N>::operator()(Range r0, Range r1, Range r2, Range r3, Range r4) const
+{
+    return PHArray<T, N>(noConst(), r0, r1, r2, r3, r4);
+}
+
+template<typename T, int N>
+PHArray<T, N> PHArray<T, N>::operator()(Range r0, Range r1, Range r2, Range r3, Range r4, Range r5) const        
+{
+    return PHArray<T, N>(noConst(), r0, r1, r2, r3, r4, r5);
+}
+
+template<typename T, int N>
+PHArray<T, N> PHArray<T, N>::operator()(Range r0, Range r1, Range r2, Range r3, Range r4, Range r5, Range r6) const
+{
+    return PHArray<T, N>(noConst(), r0, r1, r2, r3, r4, r5, r6);
+}
+
+template<typename T, int N>
+template<typename T1, typename T2>
+typename PHSliceInfo<T, T1, T2>::T_slice
+    PHArray<T, N>::operator()(T1 r1, T2 r2) const
+{
+    typedef typename PHSliceInfo<T, T1, T2>::T_slice slice;
+    return slice(noConst(), r1, r2, PHnilArraySection(), PHnilArraySection(), PHnilArraySection(),
+                 PHnilArraySection(), PHnilArraySection(), PHnilArraySection(),
+                 PHnilArraySection(), PHnilArraySection(), PHnilArraySection());
+}
+
+template<typename T, int N>
+template<typename T1, typename T2, typename T3>
+typename PHSliceInfo<T, T1, T2, T3>::T_slice 
+    PHArray<T, N>::operator()(T1 r1, T2 r2, T3 r3) const
+{
+    typedef typename PHSliceInfo<T, T1, T2, T3>::T_slice slice;
+    return slice(noConst(), r1, r2, r3, PHnilArraySection(), PHnilArraySection(), PHnilArraySection(),
+                 PHnilArraySection(), PHnilArraySection(), PHnilArraySection(),
+                 PHnilArraySection(), PHnilArraySection());
+}
+
+template<typename T, int N>
+template<typename T1, typename T2, typename T3, typename T4>
+typename PHSliceInfo<T, T1, T2, T3, T4>::T_slice
+    PHArray<T, N>::operator()(T1 r1, T2 r2, T3 r3, T4 r4) const
+{
+    typedef typename PHSliceInfo<T, T1, T2, T3, T4>::T_slice slice;
+    return slice(noConst(), r1, r2, r3, r4, PHnilArraySection(), PHnilArraySection(),
+                 PHnilArraySection(), PHnilArraySection(), PHnilArraySection(),
+                 PHnilArraySection(), PHnilArraySection());
+}
+
+template<typename T, int N>
+template<typename T1, typename T2, typename T3, typename T4, typename T5>
+typename PHSliceInfo<T, T1, T2, T3, T4, T5>::T_slice
+    PHArray<T, N>::operator()(T1 r1, T2 r2, T3 r3, T4 r4, T5 r5) const
+{
+    typedef typename PHSliceInfo<T, T1, T2, T3, T4, T5>::T_slice slice;
+    return slice(noConst(), r1, r2, r3, r4, r5, PHnilArraySection(),
+                 PHnilArraySection(), PHnilArraySection(), PHnilArraySection(),
+                 PHnilArraySection(), PHnilArraySection());
+}
+
+template<typename T, int N>
+template<typename T1, typename T2, typename T3, typename T4, typename T5, typename T6>
+typename PHSliceInfo<T, T1, T2, T3, T4, T5, T6>::T_slice
+    PHArray<T, N>::operator()(T1 r1, T2 r2, T3 r3, T4 r4, T5 r5, T6 r6) const
+{
+    typedef typename PHSliceInfo<T, T1, T2, T3, T4, T5, T6>::T_slice slice;
+    return slice(noConst(), r1, r2, r3, r4, r5, r6, PHnilArraySection(), PHnilArraySection(), PHnilArraySection(),
+                 PHnilArraySection(), PHnilArraySection());
+}
+#define PH_ARRAY_UPDATE(op, name)                                    \
+template < typename P_numtype, int N_rank >                          \
+template < typename T >                                              \
+inline PHArray<P_numtype, N_rank>&                                   \
+PHArray<P_numtype, N_rank>::operator op(const T &expr)               \
+{                                                                    \
+    evaluate(typename PHExprWrap<T>::T_expr(expr),                   \
+      name<T_numtype, typename PHExprWrap<T>::T_expr::T_numtype>()); \
+    return *this;                                                    \
+}
+
+PH_ARRAY_UPDATE(+=, fy_plus_update)
+PH_ARRAY_UPDATE(-=, fy_minus_update)
+PH_ARRAY_UPDATE(*=, fy_multiply_update)
+PH_ARRAY_UPDATE(/=, fy_divide_update)
+
+template < typename T_numtype, int N_rank > template < typename T_expr, typename T_update >
+PHArray<T_numtype, N_rank>&
+PHArray<T_numtype, N_rank>::evaluateWithIndexTraversal1(T_expr expr, T_update)
+{
+    SimpleArray<int, N_rank> index;
+
+    if (stride(firstRank) == 1)
+    {
+        int first = lbound(firstRank);
+        int last  = ubound(firstRank);
+
+        T_numtype *iter = data_ + first;
+
+        for (index[0] = first; index[0] <= last; ++ index[0])
+        {
+            T_update::update(*iter ++, expr(index));
+            int kk = 1;
+            int i = *iter;
+            //T_update::update(*iter++,3);
+            //PHUpdate<int,int>::update(kk,2);
+            int kkk = 1;
+        }
+    }
+    else
+    {
+        PHFastArrayIterator<T_numtype, N_rank> iter(*this);
+        iter.loadStride(0);
+        int first = lbound(firstRank);
+        int last  = ubound(firstRank);
+
+        for (index[0] = first; index[0] <= last; ++ index[0])
+        {
+            T_update::update(*const_cast<T_numtype*>(iter.data()), expr(index));
+            iter.advance();
+        }
+    }
+
+    return *this;
+}
+
+template < typename T_numtype, int N_rank > template < typename T_expr, typename T_update >
+PHArray<T_numtype, N_rank>&
+PHArray<T_numtype, N_rank>::evaluateWithIndexTraversalN(T_expr expr, T_update)
+{
+    // Do a stack-type traversal for the destination array and use
+    // index traversal for the source expression
+   
+    const int maxRank = ordering(0);
+
+    PHFastArrayIterator<T_numtype, N_rank> iter(*this);
+    for (int i = 1; i < N_rank; ++ i)
+    {
+        iter.push(ordering(i));
+    }
+
+    iter.loadStride(maxRank);
+
+    SimpleArray<int, N_rank> index, last;
+
+    index = storage_.base();
+
+    for (int i = 0; i < N_rank; ++ i)
+    {
+        last[i] = storage_.base(i) + length_[i];
+    }
+
+    // int lastLength = length(maxRank);
+
+    while (true)
+    {
+        int a = base(maxRank);
+        int b = last[maxRank];
+        for (index[maxRank] = base(maxRank); index[maxRank] < last[maxRank]; ++ index[maxRank])
+        {
+            T_update::update(*const_cast<T_numtype*>(iter.data()), expr(index));
+            iter.advance();
+        }
+
+        int j = 1;
+        for (; j < N_rank; ++ j)
+        {
+            iter.pop(ordering(j));
+            iter.loadStride(ordering(j));
+            iter.advance();
+
+            index[ordering(j-1)] = base(ordering(j-1));
+            ++ index[ordering(j)];
+            if (index[ordering(j)] != last[ordering(j)])
+            {
+                break;
+            }
+        }
+
+        if (j == N_rank)
+        {
+            break;
+        }
+
+        for (; j > 0; -- j)
+        {
+            iter.push(ordering(j));
+        }
+
+        iter.loadStride(maxRank);
+    }
+
+    return *this; 
+}
+
+template < typename T_numtype, int N_rank > template < typename T_expr, typename T_update >
+PHArray<T_numtype, N_rank>&
+PHArray<T_numtype, N_rank>::evaluateWithStackTraversal1(T_expr expr, T_update)
+{
+    PHFastArrayIterator<T_numtype, N_rank> iter(*this);
+    iter.loadStride(firstRank);
+    expr.loadStride(firstRank);
+
+    const T_numtype *last = iter.data() + length(firstRank) * stride(firstRank);
+
+    while (iter.data() != last)
+    {
+        T_update::update(*const_cast<T_numtype*>(iter.data()), *expr);
+        iter.advance();
+        expr.advance();
+    }
+
+    return *this;
+}
+
+template < typename T_numtype, int N_rank > template < typename T_expr, typename T_update >
+PHArray<T_numtype, N_rank>&
+PHArray<T_numtype, N_rank>::evaluateWithStackTraversalN(T_expr expr, T_update)
+{
+    /*
+     * A stack traversal replaces the usual nested loops:
+     *
+     * for (int i=A.lbound(firstDim); i <= A.ubound(firstDim); ++i)
+     *   for (int j=A.lbound(secondDim); j <= A.ubound(secondDim); ++j)
+     *     for (int k=A.lbound(thirdDim); k <= A.ubound(thirdDim); ++k)
+     *       A(i,j,k) = 0;
+     *
+     * with a stack data structure.  The stack allows this single
+     * routine to replace any number of nested loops.
+     *
+     * For each dimension (loop), these quantities are needed:
+     * - a pointer to the first element encountered in the loop
+     * - the stride associated with the dimension/loop
+     * - a pointer to the last element encountered in the loop
+     *
+     * The basic idea is that entering each loop is a "push" onto the
+     * stack, and exiting each loop is a "pop".  In practice, this
+     * routine treats accesses the stack in a random-access way,
+     * which confuses the picture a bit.  But conceptually, that's
+     * what is going on.
+     */
+
+    /*
+     * ordering(0) gives the dimension associated with the smallest
+     * stride (usually; the exceptions have to do with subarrays and
+     * are uninteresting).  We call this dimension maxRank; it will
+     * become the innermost "loop".
+     *
+     * Ordering the loops from ordering(N_rank-1) down to
+     * ordering(0) ensures that the largest stride is associated
+     * with the outermost loop, and the smallest stride with the
+     * innermost.  This is critical for good performance on
+     * cached machines.
+     */
+
+    const int maxRank = ordering(0);
+    // const int secondLastRank = ordering(1);
+
+    // Create an iterator for the array receiving the result
+    PHFastArrayIterator<T_numtype, N_rank> iter(*this);
+
+    // Set the initial stack configuration by pushing the pointer
+    // to the first element of the array onto the stack N times.
+
+    int i;
+    for (i = 1; i < N_rank; ++ i)
+    {
+        iter.push(i);
+        expr.push(i);
+    }
+
+    // Load the strides associated with the innermost loop.
+    iter.loadStride(maxRank);
+    expr.loadStride(maxRank);
+
+    /* 
+     * Is the stride in the innermost loop equal to 1?  If so,
+     * we might take advantage of this and generate more
+     * efficient code.
+     */
+    bool useUnitStride = iter.isUnitStride(maxRank) && expr.isUnitStride(maxRank);
+
+    /*
+     * Do all array operands share a common stride in the innermost
+     * loop?  If so, we can generate more efficient code (but only
+     * if this optimization has been enabled).
+     */
+#ifdef BZ_ARRAY_EXPR_USE_COMMON_STRIDE
+    int commonStride = expr.suggestStride(maxRank);
+    if (iter.suggestStride(maxRank) > commonStride)
+    {
+        commonStride = iter.suggestStride(maxRank);
+    }
+    bool useCommonStride = iter.isStride(maxRank, commonStride) && expr.isStride(maxRank, commonStride);
+#else
+    int commonStride = 1;
+    bool useCommonStride = false;
+#endif
+
+    /*
+     * The "last" array contains a pointer to the last element
+     * encountered in each "loop".
+     */
+    const T_numtype *last[N_rank];
+
+    // Set up the initial state of the "last" array
+    for (i = 1; i < N_rank; ++ i)
+    {
+        last[i] = iter.data() + length(ordering(i)) * stride(ordering(i));
+    }
+
+    int lastLength = length(maxRank);
+    int firstNoncollapsedLoop = 1;
+
+    /*
+     * This bit of code handles collapsing loops.  When possible,
+     * the N nested loops are converted into a single loop (basically,
+     * the N-dimensional array is treated as a long vector).
+     * This is important for cases where the length of the innermost
+     * loop is very small, for example a 100x100x3 array.
+     * If this code can't collapse all the loops into a single loop,
+     * it will collapse as many loops as possible starting from the
+     * innermost and working out.
+     */
+
+    // Collapse loops when possible
+    for (i = 1; i < N_rank; ++ i)
+    {
+        // Figure out which pair of loops we are considering combining.
+        int outerLoopRank = ordering(i);
+        int innerLoopRank = ordering(i-1);
+
+        /*
+         * The canCollapse() routines look at the strides and extents
+         * of the loops, and determine if they can be combined into
+         * one loop.
+         */
+
+        if (canCollapse(outerLoopRank, innerLoopRank) && expr.canCollapse(outerLoopRank, innerLoopRank))
+        {
+            lastLength *= length(outerLoopRank);
+            firstNoncollapsedLoop = i+1;
+        }
+        else
+        {
+            break;
+        }
+    }
+
+    /*
+     * Now we actually perform the loops.  This while loop contains
+     * two parts: first, the innermost loop is performed.  Then we
+     * exit the loop, and pop our way down the stack until we find
+     * a loop that isn't completed.  We then restart the inner loops
+     * and push them onto the stack.
+     */
+
+    while (true)
+    {
+
+        /*
+         * This bit of code handles the innermost loop.  It would look
+         * a lot simpler if it weren't for unit stride and common stride
+         * optimizations; these clutter up the code with multiple versions.
+         */
+
+        if ((useUnitStride) || (useCommonStride))
+        {
+            /*
+             * The check for BZ_USE_FAST_READ_ARRAY_EXPR can probably
+             * be taken out.  This was put in place while the unit stride/
+             * common stride optimizations were being implemented and
+             * tested.
+             */
+
+            // Compute the end of the innermost loop
+            int ubound = lastLength * commonStride;
+
+            /*
+             * This is a real kludge.  I didn't want to have to write
+             * a const and non-const version of FastArrayIterator, so I use a
+             * const iterator and cast away const.  This could
+             * probably be avoided with some trick, but the whole routine
+             * is ugly, so why bother.
+             */
+
+            T_numtype *data = const_cast<T_numtype*>(iter.data());
+
+            /*
+             * BZ_NEEDS_WORK-- need to implement optional unrolling.
+             */
+            if (commonStride == 1)
+            {
+                for (i = 0; i < ubound; ++ i)
+                {
+                    T_update::update(*data++, expr.fastRead(i));
+                }
+            }
+            else 
+            {
+                for (i = 0; i != ubound; i += commonStride)
+                {
+                    T_update::update(data[i], expr.fastRead(i));
+                }
+            }
+            /*
+             * Tidy up for the fact that we haven't actually been
+             * incrementing the iterators in the innermost loop, by
+             * faking it afterward.
+             */
+            iter.advance(lastLength *commonStride);
+            expr.advance(lastLength *commonStride);
+
+        }
+        else
+        {
+            /*
+             * We don't have a unit stride or common stride in the innermost
+             * loop.  This is going to hurt performance.  Luckily 95% of
+             * the time, we hit the cases above.
+             */
+            T_numtype *end = const_cast<T_numtype*>(iter.data()) + lastLength * stride(maxRank);
+                
+
+            while (iter.data() != end)
+            {
+                T_update::update(*const_cast<T_numtype*>(iter.data()), *expr);
+                iter.advance();
+                expr.advance();
+            }
+        }
+
+        /*
+         * We just finished the innermost loop.  Now we pop our way down
+         * the stack, until we hit a loop that hasn't completed yet.
+         */ 
+        int j = firstNoncollapsedLoop;
+        for (; j < N_rank; ++ j)
+        {
+            // Get the next loop
+            int r = ordering(j);
+
+            // Pop-- this restores the data pointers to the first element
+            // encountered in the loop.
+            iter.pop(j);
+            expr.pop(j);
+
+            // Load the stride associated with this loop, and increment
+            // once.
+            iter.loadStride(r);
+            expr.loadStride(r);
+            iter.advance();
+            expr.advance();
+
+            // If we aren't at the end of this loop, then stop popping.
+            if (iter.data() != last[j])
+            {
+                break;
+            }
+        }
+
+        // Are we completely done?
+        if (j == N_rank)
+        {
+            break;
+        }
+
+        // No, so push all the inner loops back onto the stack.
+        for (; j >= firstNoncollapsedLoop; --j)
+        {
+            int r2 = ordering(j-1);
+            iter.push(j);
+            expr.push(j);
+            last[j-1] = iter.data() + length(r2) * stride(r2);
+        }
+
+        // Load the stride for the innermost loop again.
+        iter.loadStride(maxRank);
+        expr.loadStride(maxRank);
+    }
+
+    return *this;
+}
+
+template < typename T_numtype, int N_rank > template < typename T_expr, typename T_update >
+PHArray<T_numtype, N_rank>& 
+PHArray<T_numtype, N_rank>::evaluate(T_expr expr, T_update)
+{
+    // Check that all arrays have the same shape
+    /*
+     * Check that the arrays are not empty (e.g. length 0 arrays)
+     * This fixes a bug found by Peter Bienstman, 6/16/99, where
+     * Array<RDouble,2> A(0,0),B(0,0); B=A(tensor::j,tensor::i);
+     * went into an infinite loop.
+     */
+    int N_rankTmp = N_rank;
+
+    if (numElements() == 0)
+    {
+        return *this;
+    }
+
+    if (N_rankTmp == 1)
+    {
+        return evaluateWithStackTraversal1(expr, T_update());
+    }
+    else
+    {
+        return evaluateWithStackTraversalN(expr, T_update());
+    }
+}
+
+template < typename T, int N >
+PHArray<T, N> & PHArray<T, N>::operator=(T x)
+{
+    return initialize(x);
+}
+
+template < typename T, int N > template < typename T_expr >
+PHArray<T, N>& 
+PHArray<T, N>::operator = (const PHETBase<T_expr> &expr)
+{
+    evaluate(expr.unwrap(), PHUpdate<T_numtype, typename T_expr::T_numtype>());
+
+    return *this;
+}
+
+template < typename T, int N >
+PHArray<T, N>&
+PHArray<T, N>::operator = (const PHArray<T, N> &x)
+{
+    (*this) = PHArrayExpr< PHFastArrayIterator<T, N> >(x.beginFast());
+    return *this;
+}
+
+template < typename T, int N >
+PHArray<T, N>& 
+PHArray<T, N>::initialize(T x)
+{
+    (*this) = PHArrayExpr< PHArrayExprConstant<T > >(x);
+    return *this;
+}
+
+}
+
diff --git a/API/DataStruct/include/PHProduct.h b/API/DataStruct/include/PHProduct.h
new file mode 100644
index 0000000..d83fe75
--- /dev/null
+++ b/API/DataStruct/include/PHProduct.h
@@ -0,0 +1,41 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PHProduct.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+namespace PHSPACE
+{
+template < typename T, int N >
+T product(SimpleArray<T, N> &length)
+{
+    T result = static_cast<T>(1);
+    for (int i = 0; i < N; ++ i)
+    {
+        result *= length[i];
+    }
+    return result;
+}
+
+template < typename T, int N >
+T product(const SimpleArray<T, N> &length)
+{
+    T result = static_cast<T>(1);
+    for (int i = 0; i < N; ++ i)
+    {
+        result *= length[i];
+    }
+    return result;
+}
+
+}
diff --git a/API/DataStruct/include/PHSimpleArray.h b/API/DataStruct/include/PHSimpleArray.h
new file mode 100644
index 0000000..887c579
--- /dev/null
+++ b/API/DataStruct/include/PHSimpleArray.h
@@ -0,0 +1,233 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PHSimpleArray.h
+//! @brief     Explain this file briefly.
+//! @author    xxx.
+
+
+#pragma once
+#include <cstddef>
+#include <stdexcept>
+#include "DataStruct_Range.h"
+namespace PHSPACE
+{
+template < typename T, int N >
+class SimpleArray
+{
+public:
+    T elems[N];    //! Fixed-size array of elements of type T.
+public:
+    //! Type definitions.
+    typedef T              value_type;
+    typedef T             *iterator;
+    typedef const T       *const_iterator;
+    typedef T             &reference;
+    typedef const T       &const_reference;
+    typedef std::size_t    size_type;
+    typedef std::ptrdiff_t difference_type;
+
+    //! iterator support.
+    iterator begin() { return elems; }
+    const_iterator begin() const { return elems; }
+    iterator end() { return elems+N; }
+    const_iterator end() const { return elems+N; }
+
+    //! reverse iterator support.
+    typedef std::reverse_iterator<iterator> reverse_iterator;
+    typedef std::reverse_iterator<const_iterator> const_reverse_iterator;
+
+    reverse_iterator rbegin() { return reverse_iterator(end()); }
+    const_reverse_iterator rbegin() const
+    {
+        return const_reverse_iterator(end());
+    }
+    reverse_iterator rend() { return reverse_iterator(begin()); }
+    const_reverse_iterator rend() const
+    {
+        return const_reverse_iterator(begin());
+    }
+
+    //! operator[].
+    reference operator[](size_type i)
+    {
+        return elems[i];
+    }
+
+    const_reference operator[](size_type i) const
+    {
+        return elems[i];
+    }
+
+    //! at() with range check.
+    reference at(size_type i) { rangecheck(i); return elems[i]; }
+    const_reference at(size_type i) const { rangecheck(i); return elems[i]; }
+
+    //! front() and back().
+    reference front()
+    {
+        return elems[0];
+    }
+
+    const_reference front() const
+    {
+        return elems[0];
+    }
+
+    reference back()
+    {
+        return elems[N-1];
+    }
+
+    const_reference back() const
+    {
+        return elems[N-1];
+    }
+
+    //! Size is constant.
+    static size_type size() { return N; }
+    static bool empty() { return false; }
+    static size_type max_size() { return N; }
+    enum { static_size = N };
+
+    //! Swap (note: linear complexity).
+    void swap (SimpleArray<T, N> &y)
+    {
+        std::swap_ranges(begin(), end(), y.begin());
+    }
+
+    //! Direct access to data (read-only).
+    const T * data() const { return elems; }
+
+    //! Use array as C array (direct read/write access to data).
+    T * c_array() { return elems; }
+
+    //! Assignment with type conversion.
+    template <typename T2>
+    SimpleArray<T, N> & operator = (const SimpleArray<T2, N> &rhs)
+    {
+        std::copy(rhs.begin(), rhs.end(), begin());
+        return *this;
+    }
+
+    SimpleArray<T, N> & operator = (const T &value)
+    {
+        std::fill_n(begin(), size(), value);
+        return *this;
+    }
+    SimpleArray<T, N> &operator += (const T &value)
+    {
+        for (int i = 0; i < N; ++ i)
+        {
+            elems[i] += value;
+        }
+        return *this;
+    }
+
+    SimpleArray<T, N> &operator += (const SimpleArray<T, N> &x)
+    {
+        const T *tmp = x.data();
+        for (int i = 0; i < N; ++ i)
+        {
+            elems[i] += tmp[i];
+        }
+        return *this;
+    }
+
+    SimpleArray<T, N> &operator -= (const T &value)
+    {
+        for (int i = 0; i < N; ++ i)
+        {
+            elems[i] -= value;
+        }
+        return *this;
+    }
+
+    SimpleArray<T, N> &operator -= (const SimpleArray<T, N> &x)
+    {
+        const T *tmp = x.data();
+        for (int i = 0; i < N; ++ i)
+        {
+            elems[i] -= tmp[i];
+        }
+        return *this;
+    }
+    //! Assign one value to all elements.
+    void assign (const T &value)
+    {
+        std::fill_n(begin(), size(), value);
+    }
+
+    //! Check range (may be private because it is static).
+    static void rangecheck (size_type i)
+    {
+        if (i >= size())
+        {
+            throw std::range_error("SimpleArray<>: index out of range");
+        }
+    }
+};
+
+//! Comparisons.
+template < typename T, int N >
+bool operator == (const SimpleArray<T, N> &x, const SimpleArray<T, N> &y)
+{
+    return std::equal(x.begin(), x.end(), y.begin());
+}
+template < typename T, int N >
+bool operator < (const SimpleArray<T, N> &x, const SimpleArray<T, N> &y)
+{
+    return std::lexicographical_compare(x.begin(), x.end(), y.begin(), y.end());
+}
+
+template < typename T, int N >
+bool operator != (const SimpleArray<T, N> &x, const SimpleArray<T, N> &y)
+{
+    return ! (x == y);
+}
+
+template < typename T, int N >
+bool operator > (const SimpleArray<T, N> &x, const SimpleArray<T, N> &y)
+{
+    return y < x;
+}
+
+template < typename T, int N >
+bool operator <= (const SimpleArray<T, N> &x, const SimpleArray<T, N> &y)
+{
+    return ! (y < x);
+}
+
+template < typename T, int N >
+bool operator >= (const SimpleArray<T, N> &x, const SimpleArray<T, N> &y)
+{
+    return ! (x < y);
+}
+
+//! Global swap().
+template < typename T, int N >
+inline void swap (SimpleArray<T, N> &x, SimpleArray<T, N> &y)
+{
+    x.swap(y);
+}
+
+template < typename T, int N >
+inline T dot (const SimpleArray<T, N> &x, const SimpleArray<T, N> &y)
+{
+    T sum = 0;
+    for (int i = 0; i < N; ++ i)
+    {
+        sum += x[i] * y[i];
+    }
+    return sum;
+}
+
+}
diff --git a/API/DataStruct/include/PHSlice.h b/API/DataStruct/include/PHSlice.h
new file mode 100644
index 0000000..a519e55
--- /dev/null
+++ b/API/DataStruct/include/PHSlice.h
@@ -0,0 +1,113 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PHSlice.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+#pragma once
+
+namespace PHSPACE
+{
+//! Forward declaration.
+template<typename T, int N>
+class PHArray;
+
+
+class PHnilArraySection { };
+
+template<typename T>
+class PHArraySectionInfo
+{
+public:
+    static const int isValidType = 0;
+    static const int rank = 0;
+    static const int isPick = 0;
+};
+
+template<>
+class PHArraySectionInfo<Range> 
+{
+public:
+    static const int isValidType = 1;
+    static const int rank = 1;
+    static const int isPick = 0;
+};
+
+template<>
+class PHArraySectionInfo<int>
+{
+public:
+    static const int isValidType = 1;
+    static const int rank = 0;
+    static const int isPick = 0;
+};
+
+template<>
+class PHArraySectionInfo<PHnilArraySection>
+{
+public:
+    static const int isValidType = 1;
+    static const int rank = 0;
+    static const int isPick = 0;
+};
+
+template<typename T,  typename T1,   typename T2 = PHnilArraySection, 
+    typename T3 = PHnilArraySection, typename T4 = PHnilArraySection, 
+    typename T5 = PHnilArraySection, typename T6 = PHnilArraySection, 
+    typename T7 = PHnilArraySection, typename T8 = PHnilArraySection, 
+    typename T9 = PHnilArraySection, typename T10 = PHnilArraySection, 
+    typename T11 = PHnilArraySection>
+class PHSliceInfo
+{
+public:
+    static const int numValidTypes = PHArraySectionInfo<T1>::isValidType
+                                   + PHArraySectionInfo<T2>::isValidType
+                                   + PHArraySectionInfo<T3>::isValidType
+                                   + PHArraySectionInfo<T4>::isValidType
+                                   + PHArraySectionInfo<T5>::isValidType
+                                   + PHArraySectionInfo<T6>::isValidType
+                                   + PHArraySectionInfo<T7>::isValidType
+                                   + PHArraySectionInfo<T8>::isValidType
+                                   + PHArraySectionInfo<T9>::isValidType
+                                   + PHArraySectionInfo<T10>::isValidType
+                                   + PHArraySectionInfo<T11>::isValidType;
+
+    static const int rank = PHArraySectionInfo<T1>::rank
+                          + PHArraySectionInfo<T2>::rank
+                          + PHArraySectionInfo<T3>::rank
+                          + PHArraySectionInfo<T4>::rank
+                          + PHArraySectionInfo<T5>::rank
+                          + PHArraySectionInfo<T6>::rank
+                          + PHArraySectionInfo<T7>::rank
+                          + PHArraySectionInfo<T8>::rank
+                          + PHArraySectionInfo<T9>::rank
+                          + PHArraySectionInfo<T10>::rank
+                          + PHArraySectionInfo<T11>::rank;
+
+    static const int isPick = PHArraySectionInfo<T1>::isPick
+                            + PHArraySectionInfo<T2>::isPick
+                            + PHArraySectionInfo<T3>::isPick
+                            + PHArraySectionInfo<T4>::isPick
+                            + PHArraySectionInfo<T5>::isPick
+                            + PHArraySectionInfo<T6>::isPick
+                            + PHArraySectionInfo<T7>::isPick
+                            + PHArraySectionInfo<T8>::isPick
+                            + PHArraySectionInfo<T9>::isPick
+                            + PHArraySectionInfo<T10>::isPick
+                            + PHArraySectionInfo<T11>::isPick;
+
+    typedef PHArray<T, numValidTypes> T_array;
+    typedef PHArray<T, rank> T_slice;
+};
+
+}
+
+
diff --git a/API/DataStruct/include/PHSlice.hxx b/API/DataStruct/include/PHSlice.hxx
new file mode 100644
index 0000000..039d3f1
--- /dev/null
+++ b/API/DataStruct/include/PHSlice.hxx
@@ -0,0 +1,132 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+#pragma once
+
+namespace PHSPACE
+{
+
+// This member template is also used in the implementation of
+// operator() with any combination of int and Rank parameters.
+// It's called by constructSlice(), above.  This version handles
+// Range parameters.
+
+template < typename T, int N > template < int N2 >
+void PHArray<T, N>::slice(int &setRank, Range r, PHArray<T, N2> &array_in, SimpleArray<int, N2> &rankMap, int sourceRank)
+{
+    // NEEDS WORK: ordering will change completely when some ranks
+    // are deleted.
+
+    rankMap[sourceRank] = setRank;
+    length_[setRank]    = array_in.length(sourceRank);
+    stride_[setRank]    = array_in.stride(sourceRank);
+    storage_.setAscendingFlag(setRank, array_in.isRankStoredAscending(sourceRank));
+    storage_.setBase(setRank, array_in.base(sourceRank));
+    slice(setRank, r);
+    ++ setRank;
+}
+
+// This member template is also used in the implementation of
+// operator() with any combination of int and Rank parameters.
+// It's called by constructSlice(), above.  This version handles
+// int parameters, which reduce the dimensionality by one.
+
+template < typename T, int N > template  <int N2 >
+void PHArray<T, N>::slice(int &setRank, int i, PHArray<T, N2> &array_in, SimpleArray<int, N2> &rankMap, int sourceRank)
+{
+    rankMap[sourceRank] = -1;
+    data_ += i * array_in.stride(sourceRank);
+}
+
+template < typename T, int N > template<int N2>
+void PHArray<T, N>::slice(int &setRank, PHnilArraySection nil, PHArray<T, N2> &array_in, SimpleArray<int, N2> &rankMap, int sourceRank)
+{ }
+
+// This member template is used to implement operator() with any
+// combination of int and Range parameters.  There's room for up
+// to 11 parameters, but any unused parameters have no effect.
+
+template < typename T, int N > template < int N2, typename R0,
+    typename R1, typename R2, typename R3, typename R4, typename R5, typename R6, typename R7,
+    typename R8, typename R9, typename R10 >
+void PHArray<T, N>::constructSlice(PHArray<T, N2> &array_in,
+    R0 r0, R1 r1, R2 r2, R3 r3, R4 r4, R5 r5, R6 r6, R7 r7, R8 r8, R9 r9, R10 r10)
+{
+    MemoryBlockReference<T>::changeBlock(array_in);
+
+    int setRank = 0;
+
+    SimpleArray<int, N2> rankMap;
+
+    slice(setRank, r0 , array_in, rankMap, 0 );
+    slice(setRank, r1 , array_in, rankMap, 1 );
+    slice(setRank, r2 , array_in, rankMap, 2 );
+    slice(setRank, r3 , array_in, rankMap, 3 );
+    slice(setRank, r4 , array_in, rankMap, 4 );
+    slice(setRank, r5 , array_in, rankMap, 5 );
+    slice(setRank, r6 , array_in, rankMap, 6 );
+    slice(setRank, r7 , array_in, rankMap, 7 );
+    slice(setRank, r8 , array_in, rankMap, 8 );
+    slice(setRank, r9 , array_in, rankMap, 9 );
+    slice(setRank, r10, array_in, rankMap, 10);
+
+    // Redo the ordering_ array to account for dimensions which
+    // have been sliced away.
+    int j = 0;
+    for (int i = 0; i < N2; ++ i)
+    {
+        if (rankMap[array_in.ordering(i)] != -1)
+        {
+            storage_.setOrdering(j ++, rankMap[array_in.ordering(i)]);
+        }
+    }
+
+    calculateZeroOffset();
+}
+
+/*
+ * After calling slice(int rank, Range r), the array refers only to the
+ * Range r of the original array.
+ * e.g. Array<int,1> x(100);
+ *      x.slice(firstRank, Range(25,50));
+ *      x = 0;       // Sets elements 25..50 of the original array to 0
+ */
+template<typename T, int N>
+void PHArray<T, N>::slice(int rank, Range r)
+{
+    int first  = r.first(lbound(rank));
+    int last   = r.last (ubound(rank));
+    int stride = r.stride();
+
+    // Will the storage be non-contiguous?
+    // (1) Slice in the minor dimension and the range does not span
+    //     the entire index interval (NB: non-unit strides are possible)
+    // (2) Slice in a middle dimension and the range is not Range::all()
+
+    length_[rank] = (last - first) / stride + 1;
+
+    // TV 20000312: added second term here, for testsuite/Josef-Wagenhuber
+    int offset = (first - base(rank) * stride) * stride_[rank];
+
+    data_         += offset;
+    zeroOffset_   += offset;
+    stride_[rank] *= stride;
+
+    // JCC: adjust ascending flag if slicing with backwards Range
+    if (stride < 0)
+    {
+        storage_.setAscendingFlag(rank, !isRankStoredAscending(rank));
+    }
+}
+
+}
+
+
diff --git a/API/DataStruct/include/PHStorage.h b/API/DataStruct/include/PHStorage.h
new file mode 100644
index 0000000..93399c0
--- /dev/null
+++ b/API/DataStruct/include/PHStorage.h
@@ -0,0 +1,263 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PHStorage.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+
+#pragma once
+#include "PHSimpleArray.h"
+
+#ifdef WIN32
+//! Shield compiling warning C4800 and C4805 (by zhangjian).
+//! The warning is because result &= ascendingFlag_[i].
+//! After verification, this code is come from blitz/aray/storage.h.
+#pragma warning(disable: 4800)
+#pragma warning(disable: 4805)
+#pragma warning(disable: 26495)
+#endif
+namespace PHSPACE
+{
+template < int N >
+class GeneralArrayStorage
+{
+public:
+    class noInitializeFlag { };
+
+    GeneralArrayStorage(noInitializeFlag)
+    { }
+
+    GeneralArrayStorage()
+    {
+        for (int i = 0; i < N; ++ i)
+        {
+            ordering_[i] = N - 1 - i;
+        }
+        ascendingFlag_ = true;
+        base_ = 0;
+    }
+
+    GeneralArrayStorage(const GeneralArrayStorage<N> &rhs)
+                        : ordering_(rhs.ordering_), ascendingFlag_(rhs.ascendingFlag_), base_(rhs.base_)
+    {
+    }
+
+    GeneralArrayStorage(SimpleArray<int,N> ordering,
+                        SimpleArray<bool,N> ascendingFlag)
+                        : ordering_(ordering), ascendingFlag_(ascendingFlag)
+    {
+        base_ = 0;
+    }
+
+    ~GeneralArrayStorage()
+    { }
+
+    GeneralArrayStorage<N> & operator = (const GeneralArrayStorage<N> &rhs)
+    {
+        ordering_      = rhs.ordering();
+        ascendingFlag_ = rhs.ascendingFlag();
+        base_          = rhs.base();
+        return *this;
+    }
+
+    SimpleArray<int, N> & ordering()
+    { return ordering_; }
+
+    const SimpleArray<int, N> & ordering() const
+    { return ordering_; }
+
+    int ordering(int i) const
+    { return ordering_[i]; }
+
+    void setOrdering(int i, int order)
+    { ordering_[i] = order; }
+
+    bool allRanksStoredAscending() const
+    {
+        bool result = true;
+        for (int i = 0; i < N; ++ i)
+        {
+            result &= ascendingFlag_[i];
+        }
+        return result;
+    }
+
+    bool isRankStoredAscending(int i) const
+    {
+        return ascendingFlag_[i];
+    }
+
+    SimpleArray<bool, N> & ascendingFlag()
+    {
+        return ascendingFlag_;
+    }
+
+    const SimpleArray<bool, N> & ascendingFlag() const
+    {
+        return ascendingFlag_;
+    }
+
+    void setAscendingFlag(int i, bool ascendingFlag)
+    {
+        ascendingFlag_[i] = ascendingFlag;
+    }
+
+    SimpleArray<int, N> & base()
+    {
+        return base_;
+    }
+
+    const SimpleArray<int, N> & base() const
+    {
+        return base_;
+    }
+
+    int base(int i) const
+    {
+        return base_[i];
+    }
+
+    void setBase(int i, int base)
+    {
+        base_[i] = base;
+    }
+
+    void setBase(const SimpleArray<int, N> &base)
+    {
+        base_ = base;
+    }
+protected:
+    //! ordering_[] specifies the order in which the array is stored in
+    //! memory.  For a newly allocated array, ordering_(0) will give the
+    //! rank with unit stride, and ordering_(N_rank-1) will be the rank
+    //! with largest stride.  An order like [2, 1, 0] corresponds to
+    //! C-style array storage; an order like [0, 1, 2] corresponds to
+    //! Fortran array storage.
+    //
+    //! ascendingFlag_[] indicates whether the data in a rank is stored
+    //! in ascending or descending order.  Most of the time these values
+    //! will all be true (indicating ascending order).  Some peculiar
+    //! formats (e.g. MS-Windows BMP image format) store the data in
+    //! descending order.
+    //
+    //! base_[] gives the first valid index for each rank.  For a C-style
+    //! array, all the base_ elements will be zero; for a Fortran-style
+    //! array, they will be one.  base_[] can be set arbitrarily using
+    //! the Array constructor which takes a Range argument, e.g.
+    //! Array<RFloat,2> A(Range(30,40),Range(23,33));
+    //! will create an array with base_[] = { 30, 23 }.
+
+    //! Ascending.
+    SimpleArray<int,  N> ordering_;
+    SimpleArray<bool, N> ascendingFlag_;
+    SimpleArray<int,  N> base_;
+};
+
+/*
+    * Class FortranArray specializes GeneralArrayStorage to provide Fortran
+    * style arrays (column major ordering, base of 1).  The noInitializeFlag()
+    * passed to the base constructor indicates that the subclass will take
+    * care of initializing the ordering_, ascendingFlag_ and base_ members.
+    */
+
+template<int N>
+class FortranArray : public GeneralArrayStorage<N> {
+private:
+    typedef GeneralArrayStorage<N> T_base;
+    typedef typename T_base::noInitializeFlag noInitializeFlag;
+    using T_base::ordering_;
+    using T_base::ascendingFlag_;
+    using T_base::base_;
+public:
+    FortranArray()
+        : GeneralArrayStorage<N>(noInitializeFlag())
+    {
+        for (int i = 0; i < N; ++ i)
+        {
+            ordering_[i] = i;
+        }
+        ascendingFlag_ = true;
+        base_ = 1;
+    }
+};
+
+//! This tag class can be used to provide a nicer notation for
+//! constructing Fortran-style arrays: instead of
+//!     Array<int,2> A(3, 3, FortranArray<2>());
+//! One can simply write:
+//!     Array<int,2> A(3, 3, fortranArray);
+//! where fortranArray is an object of type _bz_fortranTag.
+
+class fortranTag {
+public:
+    operator GeneralArrayStorage<1>()
+    { return FortranArray<1>(); }
+
+    operator GeneralArrayStorage<2>()
+    { return FortranArray<2>(); }
+
+    operator GeneralArrayStorage<3>()
+    { return FortranArray<3>(); }
+
+    operator GeneralArrayStorage<4>()
+    { return FortranArray<4>(); }
+
+    operator GeneralArrayStorage<5>()
+    { return FortranArray<5>(); }
+
+    operator GeneralArrayStorage<6>()
+    { return FortranArray<6>(); }
+
+    operator GeneralArrayStorage<7>()
+    { return FortranArray<7>(); }
+
+    operator GeneralArrayStorage<8>()
+    { return FortranArray<8>(); }
+
+    operator GeneralArrayStorage<9>()
+    { return FortranArray<9>(); }
+
+    operator GeneralArrayStorage<10>()
+    { return FortranArray<10>(); }
+
+    operator GeneralArrayStorage<11>()
+    { return FortranArray<11>(); }
+};
+
+//! A global instance of this class will be placed in
+//! the blitz library (libblitz.a on Unix machines).
+
+extern fortranTag fortranArray;
+
+/*
+    * Class ColumnMajorArray specializes GeneralArrayStorage to provide column
+    * major arrays (column major ordering, base of 0).
+    */
+
+template<int N>
+class ColumnMajorArray : public GeneralArrayStorage<N> {
+private:
+    typedef GeneralArrayStorage<N> T_base;
+    typedef typename T_base::noInitializeFlag noInitializeFlag;
+    using T_base::ordering_;
+    using T_base::ascendingFlag_;
+    using T_base::base_;
+public:
+    ColumnMajorArray()
+        : GeneralArrayStorage<N>(noInitializeFlag())
+    {
+        ordering_ = Range(0, N - 1);
+        ascendingFlag_ = true;
+        base_ = 0;
+    }
+};
+}
diff --git a/API/DataStruct/include/PHVector3.h b/API/DataStruct/include/PHVector3.h
new file mode 100644
index 0000000..2ac1362
--- /dev/null
+++ b/API/DataStruct/include/PHVector3.h
@@ -0,0 +1,138 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PHVector3D.h
+//! @brief     Explain this file briefly.
+//! @author    Wan YunBo.
+
+#pragma once
+#include <math.h>
+#include <PHHeader.h>
+
+using namespace std;
+
+namespace PHSPACE
+{
+template <class T>
+struct Vector3
+{
+    Vector3 (T x_=0, T y_=0, T z_=0) : x(x_), y(y_), z(z_) {}
+ 
+    void set (T x_, T y_, T z_)
+    { 
+        x = x_;
+        y = y_;
+        z = z_;
+    }
+ 
+    Vector3 normalize() const
+    {
+        return ((*this) / norm());
+    }
+    RDouble norm () const 
+    {
+        return sqrt(normSquare());
+    }
+    T normSquare () const
+    {
+        return x*x + y*y + z*z;
+    }
+ 
+    bool operator == (const Vector3 &v) const
+    {
+        return x == v.x && y == v.y && z == v.z;
+    }
+    bool operator != (const Vector3 &v) const
+    {
+        return x != v.x || y != v.y || z != v.z;
+    }
+ 
+    Vector3 operator + (const Vector3 &v) const
+    {
+        return Vector3(x+v.x, y+v.y, z+v.z);
+    }
+    Vector3 & operator += (const Vector3 &v)
+    {
+        x+=v.x; y+=v.y; z+=v.z; return *this;
+    }
+    Vector3 operator - () const
+    {
+        return Vector3(-x, -y, -z);
+    }
+    Vector3 operator - (const Vector3 &v) const
+    {
+        return Vector3(x-v.x, y-v.y, z-v.z);
+    }
+    Vector3 & operator -= (const Vector3 &v)
+    { 
+        x-=v.x; y-=v.y; z-=v.z; return *this;
+    }
+    Vector3 operator * (T s) const
+    {
+        return Vector3(x*s, y*s, z*s);
+    }
+    T  operator * (const Vector3 &v) const
+    { 
+        return x*v.x + y*v.y + z*v.z;
+    }
+    //Vector3 operator * (const Vector3 &v) const
+    //{
+    //    return Vector3(*v.x, *v.y, *v.z);
+    //}
+    Vector3 & operator *= (float s)
+    { 
+        x*=s; y*=s; z*=s;
+        return *this;
+    }
+    Vector3 operator / (float s) const
+    { 
+        ASSERT(s);
+        return (*this)*(1/s);
+    }
+    Vector3 & operator /= (float s)
+    { 
+        ASSERT(s); 
+        return (*this)*=(1/s);
+    }
+    T operator[](int i)
+    {  
+        if (i == 0) return this->x;
+        if (i == 1) return this->y;
+        if (i == 2) return this->z;
+     }
+    
+    T x, y, z;
+};
+ 
+template <class T> inline
+T Dot (const Vector3<T> &l, const Vector3<T> &r)
+{
+    return l.x*r.x + l.y*r.y + l.z*r.z;
+}
+ 
+template <class T> inline
+Vector3<T> Cross (const Vector3<T> &l, const Vector3<T> &r)
+{
+    return Vector3<T>(l.y*r.z - l.z*r.y, l.z*r.x - l.x*r.z, l.x*r.y - l.y*r.x);
+}
+ 
+template <class T> inline
+T BlendProduct (const Vector3<T> &l, const Vector3<T> &m, const Vector3<T> &r)
+{
+    return Dot(Cross(l, m), r);
+}
+ 
+typedef Vector3<char>    Vector3C;
+typedef Vector3<int>     Vector3I;
+typedef Vector3<float>   Vector3F;
+typedef Vector3<RDouble> Vector3D;
+
+}
diff --git a/API/DataStruct/include/Pointer.h b/API/DataStruct/include/Pointer.h
new file mode 100644
index 0000000..de282c9
--- /dev/null
+++ b/API/DataStruct/include/Pointer.h
@@ -0,0 +1,186 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pointer.h
+//! @brief     Pointer operation for multi-dimensional array.
+//! @author    He Xin, Bell.
+
+#pragma once
+#include <vector>
+#include <cstddef>
+using namespace std;
+
+namespace PHSPACE
+{
+template < typename T >
+T * HeaderPointer(vector< T > &field)
+{
+    if (field.size() != 0)
+    {
+        return &field[0];
+    }
+    return 0;
+}
+
+template < typename T >
+T * NewPointer(int length)
+{
+    T *data = new T [length];
+    
+    return data;
+}
+
+template < typename T >
+T ** NewPointer2(int fistDim, int secondDim)
+{
+    T **data = new T * [fistDim];
+    data[0] = new T[fistDim * secondDim];
+    for (int m = 1; m < fistDim; ++ m)
+    {
+        data[m] = &data[m-1][secondDim];
+    }
+    return data;
+}
+
+template < typename T >
+T ** NewPointer2(int nm, int *nlen)
+{
+    int count = 0;
+
+    for (int m = 0; m < nm; ++ m)
+    {
+        count += nlen[m];
+    }
+
+    T **vv = new T * [nm];
+    vv[0] = new T [count];
+    for (int m = 1; m < nm; ++ m)
+    {
+        vv[m] = &vv[m-1][nlen[m-1]];
+    }
+    return vv;
+}
+
+template < typename T >
+T *** NewPointer3(int fistDim, int secondDim, int thirdDim)
+{
+    T *** data = new T ** [fistDim];
+    data[0]    = new T *  [fistDim * secondDim];
+    data[0][0] = new T    [fistDim * secondDim * thirdDim];
+
+    for (int i = 1; i < fistDim; ++ i)
+    {
+        data[i] = &data[i-1][secondDim];
+    }
+
+    for (int j = 1; j < secondDim; ++ j)
+    {
+        data[0][j] = &data[0][j-1][thirdDim];
+    }
+
+    for (int i = 1; i < fistDim; ++ i)
+    {
+        data[i][0] = &data[i-1][secondDim-1][thirdDim];
+        for (int j = 1; j < secondDim; ++ j)
+        {
+            data[i][j] = &data[i][j-1][thirdDim];
+        }
+    }
+
+    return data;
+}
+
+template < typename T >
+T *** NewPointer3(int nCell, int nEqn, const int *nlen)
+{
+    int count = 0;
+
+    for (int m = 0; m < nCell; ++ m)
+    {
+        count += nEqn * nlen[m];
+    }
+
+    T *** v3 = new T ** [nCell];
+    v3[0]    = new T *  [nCell * nEqn];
+    v3[0][0] = new T    [count];
+
+    for (int i = 1; i < nCell; ++ i)
+    {
+        v3[i] = &v3[i-1][nEqn];
+    }
+
+    for (int j = 1; j < nEqn; ++ j)
+    {
+        v3[0][j] = &v3[0][j-1][nlen[0]];
+    }
+
+    for (int i = 1; i < nCell; ++ i)
+    {
+        v3[i][0] = &v3[i-1][nEqn-1][nlen[i-1]];
+        for (int j = 1; j < nEqn; ++ j)
+        {
+            v3[i][j] = &v3[i][j-1][nlen[i]];
+        }
+    }
+
+    return v3;
+}
+
+template < typename T >
+T ** NewFastPointer(vector < T * > &vec)
+{
+    T **vv = new T * [vec.size()];
+    for (int m = 0; m < vec.size(); ++ m)
+    {
+        vv[m] = vec[m];
+    }
+    return vv;
+}
+
+template < typename T >
+void DelPointer(T *&v)
+{
+    if (!v) return;
+    delete [] v;
+    v = NULL;
+}
+
+template < typename T >
+void DelPointer2(T **Data)
+{
+    if (!Data) return;
+    delete [] Data[0];    Data[0] = NULL;
+    delete [] Data;       Data = NULL;
+}
+
+
+template < typename T >
+void DelPointer3(T ***v3)
+{
+    delete [] v3[0][0];    v3[0][0] = NULL;
+    delete [] v3[0];       v3[0] = NULL;
+    delete [] v3;          v3 = NULL;
+}
+
+
+template < typename T >
+void DelFastPointer(T **v)
+{
+    delete [] v;    v = NULL;
+}
+
+template < typename T >
+void FreePointer(T *&pointer)
+{
+    if (!pointer) return;
+    delete pointer;    pointer = NULL;
+}
+}
diff --git a/API/DataStruct/include/TypeDefine.h b/API/DataStruct/include/TypeDefine.h
new file mode 100644
index 0000000..6af2460
--- /dev/null
+++ b/API/DataStruct/include/TypeDefine.h
@@ -0,0 +1,79 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      TypeDefine.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+#include "Precision.h"
+#include "DataStruct_Array.h"
+#include "DataStruct_AdtTree.h"
+#include "DataStruct_KDTree.h"
+#include "AMRDef.h"
+#include <string>
+#include <vector>
+#include <map>
+#include <numeric>
+using namespace std;
+
+namespace PHSPACE
+{
+    typedef PHArray<int, 1> Int1D;
+    typedef PHArray<int, 2> Int2D;
+    typedef PHArray<int, 3> Int3D;
+    typedef PHArray<int, 4> Int4D;
+    typedef PHArray<int, 5> Int5D;
+    typedef PHArray<int, 6> Int6D;
+
+    typedef PHArray<RFloat, 1> RFloat1D;
+    typedef PHArray<RFloat, 2> RFloat2D;
+    typedef PHArray<RFloat, 3> RFloat3D;
+    typedef PHArray<RFloat, 4> RFloat4D;
+    typedef PHArray<RFloat, 5> RFloat5D;
+    typedef PHArray<RFloat, 6> RFloat6D;
+
+    typedef PHArray<RDouble, 1> RDouble1D;
+    typedef PHArray<RDouble, 2> RDouble2D;
+    typedef PHArray<RDouble, 3> RDouble3D;
+    typedef PHArray<RDouble, 4> RDouble4D;
+    typedef PHArray<RDouble, 5> RDouble5D;
+    typedef PHArray<RDouble, 6> RDouble6D;
+
+    typedef vector < RDouble * > VDoubleP;
+
+    typedef vector < int  > VInt;
+    typedef vector < VInt > VVInt;
+
+    typedef map<string, int    > IntDBase;
+    typedef map<string, RDouble> RDoubleDBase;
+    typedef map<string, RFloat > RFloatDBase;
+    typedef map<string, void * > PointerDBase;
+
+    typedef streamsize PHLongLong;
+
+    typedef vector<int> PHInt1D;
+    typedef vector<PHInt1D> PHInt2D;
+    typedef vector<RDouble> PHDouble1D;
+    typedef vector<PHDouble1D> PHDouble2D;
+    typedef vector<PHDouble2D> PHDouble3D;
+    typedef vector<string> PHString1D;
+
+    typedef DataStruct_AdtNode<int, RDouble> PHProcessorNode;
+    typedef DataStruct_AdtTree<int, RDouble> PHProcessorTree;
+
+    typedef PHVector1D<int    > PHVectorInt1D;
+    typedef PHVector1D<string > PHVectorString1D;
+    typedef PHVector1D<RDouble> PHVectorRDouble1D;
+    typedef PHVector2D<int    > PHVectorInt2D;
+
+}
+
diff --git a/API/DataStruct/src/DataContainer.cpp b/API/DataStruct/src/DataContainer.cpp
new file mode 100644
index 0000000..70f627b
--- /dev/null
+++ b/API/DataStruct/src/DataContainer.cpp
@@ -0,0 +1,716 @@
+#include "DataContainer.h"
+using namespace std;
+
+namespace PHSPACE
+{
+
+DataChar::DataChar()
+{
+    data = new vector<char>;
+    pos  = 0;
+}
+
+DataChar::~DataChar()
+{
+    delete data;
+}
+
+void DataChar::moveto(CharVecSizeType pos)
+{
+    if ((0 < pos) && (pos < size()))
+    {
+        this->pos = pos;
+    }
+    else if (0 == pos)
+    {
+        this->pos = pos;
+    }
+    else
+    {
+        ostringstream oss;
+        oss << "Out of Range: pos " << pos << endl;
+
+        //PHMPI::FreeBlockData();
+        cout << oss.str() << endl;
+        exit(0);
+    }
+}
+
+void DataChar::forward_position(CharVecSizeType size)
+{
+    pos += size;
+}
+
+CharVecSizeType DataChar::size()
+{
+    return data->size();
+}
+
+char * DataChar::begin()
+{ 
+    //! should consider that the size = 0;
+    if (this->size() == 0) return 0;
+    return &((*data)[0]);
+}
+
+char * DataChar::data_pointer()
+{ 
+    //! should consider that the size = 0;
+    if (this->size() == 0) return 0;
+    return &((*data)[pos]);
+}
+
+void DataChar::to_string(string &str)
+{
+    if (size())
+    {
+        str.append(begin(), size());
+    }
+}
+
+void DataChar::write(void *data, CharVecSizeType size)
+{
+    if (size <= 0) return;
+
+    memcpy(data_pointer(), data, size);
+    forward_position(size);
+}
+
+void DataChar::read(void *data, CharVecSizeType size)
+{
+    if (size <= 0) return;
+    memcpy(data, data_pointer(), size);
+    forward_position(size);
+}
+
+void DataChar::write(void *data, CharVecSizeType size, int pos)
+{
+    moveto(pos);
+    write(data, size);
+}
+
+void DataChar::read(void *data, CharVecSizeType size, int pos)
+{
+    moveto(pos);
+    read(data, size);
+}
+
+void DataChar::resize(CharVecSizeType size)
+{
+    this->data->resize(size);
+}
+
+void DataChar::readfile(fstream &file)
+{
+    CharVecSizeType nlen = this->size();
+    if (nlen <= 0) return;
+
+    char *data = this->begin();
+
+    file.read(data, nlen);
+}
+
+void DataChar::writefile(fstream &file)
+{
+    CharVecSizeType nlen = this->size();
+    if (nlen <= 0) return;
+
+    char *data = this->begin();
+
+    file.write(data, nlen);
+}
+
+DataContainer::DataContainer(DataContainer *rhs)
+{
+    max_unit_size = 102400000;
+    start  = 0;
+    finish = 1;
+    pos = 0;
+    elem_pos = 0;
+    data = new vector< DataChar * >;
+    ContainerSizeType nelement = rhs->element_size();
+    data->resize(nelement);
+    for (ContainerSizeType i = 0; i < nelement; ++ i)
+    {
+        DataChar *rhsData = rhs->getiter(i);
+        CharVecSizeType nlen = rhsData->size();
+
+        DataChar *sectionData = new DataChar;
+        sectionData->resize(nlen);
+
+        sectionData->moveto_begin();
+        rhsData->moveto_begin();
+        memcpy(sectionData->data_pointer(), rhsData->data_pointer(), nlen);
+        //sectionData->forward_position(nlen);
+        (*data)[i] = sectionData;
+
+        //this->forward_position(nlen);
+    }
+}
+
+DataContainer::DataContainer()
+{
+    //max_unit_size = 1024000;
+    max_unit_size = 102400000;
+    start  = 0;
+    finish = 1;
+    data = new vector< DataChar * >;
+    data->push_back(new DataChar());
+    pos = 0;
+    elem_pos = 0;
+}
+
+DataContainer::~DataContainer()
+{
+    for (ContainerSizeType i = 0; i < data->size(); ++ i)
+    {
+        delete (*data)[i];
+    }
+
+    delete data;
+}
+
+ContainerSizeType DataContainer::element_size()
+{
+    return data->size();
+}
+
+DataChar * DataContainer::getcurr()
+{
+    //! concern that the current element is self consistent with the pos.
+    elem_pos = pos / max_unit_size;
+    return (*data)[elem_pos];
+}
+
+DataChar * DataContainer::getiter(ContainerSizeType i)
+{
+    return (*data)[i];
+}
+
+void DataContainer::forward_position(ContainerSizeType size)
+{
+    pos += size;
+}
+
+void DataContainer::write(DataContainer *dataContainer)
+{
+    dataContainer->moveto_begin();
+    CharVecSizeType length = dataContainer->size();
+
+    char *data;
+
+    data = new char[length];
+
+    dataContainer->read(data, length);
+
+    this->write(data, length);
+
+    delete [] data;
+}
+
+void DataContainer::read(void *data, CharVecSizeType size)
+{
+    //! note. reading from DataContainer require the DataContainer is not empty.
+    if (size <= 0) return;
+
+    CharVecSizeType remain_size = remain();
+
+    if (remain_size >= size)
+    {
+        //! if the sub data length is not small than 'size', it can read directly.
+        getcurr()->read(data, size);
+        forward_position(size);
+    }
+    else
+    {
+        //! read the data by segmentation.
+        //! first read the remained data int this DataChar.
+        getcurr()->read(data, remain_size);
+        forward_position(remain_size);
+
+        void *new_data = move_pointer(data, remain_size);
+        CharVecSizeType new_size = size - remain_size;
+
+        read(new_data, new_size);
+    }
+}
+
+void DataContainer::write(void *data, CharVecSizeType size)
+{
+    if (size <= 0) return;
+
+    secure_relative_space(size);
+
+    CharVecSizeType remain_size = remain();
+
+    if (remain_size >= size)
+    {
+        getcurr()->write(data, size);
+        forward_position(size);
+    }
+    else
+    {
+        //! write the data by segmentation.
+        //! write some data for the rest space.
+        getcurr()->write(data, remain_size);
+
+        forward_position(remain_size);
+
+        void *new_data = move_pointer(data, remain_size);
+        CharVecSizeType new_size = size - remain_size;
+
+        //! repeat this function for the rest data that has node been written.
+        write(new_data, new_size);
+    }
+}
+
+void DataContainer::read_string(string &cs)
+{
+    int nlen = 0;
+    read(&nlen, sizeof(int));
+
+    char *data = new char[nlen+1];
+
+    read(data, nlen+1);
+
+    cs = data;
+
+    delete [] data;
+}
+
+void DataContainer::write_string(string &cs)
+{
+    int nlen = static_cast<int>(cs.length());
+
+    write(&nlen, sizeof(int));
+
+    char *data = new char[nlen+1];
+
+    cs.copy(data, nlen);
+    data[nlen] = '\0';
+
+    write(data, nlen+1);
+
+    delete [] data;
+}
+
+void DataContainer::append_string(string &cs)
+{
+    moveto_end();
+    write_string(cs);
+}
+
+void DataContainer::write(ostringstream *oss)
+{
+    string str = oss->str();
+    int str_size = static_cast<int>(str.size());
+    write(const_cast<char *>(str.c_str()), str_size * sizeof(char));
+}
+
+CharVecSizeType DataContainer::size()
+{
+    CharVecSizeType sum = 0;
+    for (unsigned int i = 0; i < element_size(); ++ i)
+    {
+        sum += getiter(i)->size();
+    }
+    return sum;
+}
+
+void DataContainer::resize(CharVecSizeType nlen)
+{
+    if (nlen <= 0) return;
+
+    //23 divided by 3 is 7, remainder 2.
+
+    ContainerSizeType basic_elem = nlen / max_unit_size;
+    ContainerSizeType remainder  = nlen % max_unit_size;
+
+    ContainerSizeType additional_elem = 0;
+    if (remainder) additional_elem = 1;
+
+    ContainerSizeType new_size = basic_elem + additional_elem;
+    element_resize(new_size);
+
+    for (ContainerSizeType i = 0; i < element_size(); ++ i)
+    {
+        CharVecSizeType need_size = max_unit_size;
+        if (i == basic_elem)
+        {
+            need_size = remainder;
+        }
+        getiter(i)->resize(need_size);
+    }
+}
+
+void DataContainer::element_resize(ContainerSizeType new_size)
+{
+    if (new_size <= element_size())
+    {
+        erase(new_size, element_size());
+        data->resize(new_size);
+    }
+    else
+    {
+        ContainerSizeType ist = element_size();
+        ContainerSizeType ied = new_size;
+
+        for (ContainerSizeType i = ist; i != ied; ++ i)
+        {
+            data->push_back(new DataChar());
+        }
+    }
+}
+
+void DataContainer::secure_relative_space(CharVecSizeType size)
+{
+    CharVecSizeType need_size = pos + size;
+
+    secure_absolute_space(need_size);
+}
+
+void DataContainer::secure_absolute_space(CharVecSizeType need_size)
+{
+    //! if the space is enough, then it does not need to resize.
+    //! it may cause some questions of these chars, if we do not resize��there may be some extra chars not been cleared in the memory.
+    //if (need_size <= size()) return;
+
+    resize(need_size);
+}
+
+void DataContainer::moveto_begin()
+{
+    pos = 0;
+    for (ContainerSizeType i = 0; i < element_size(); ++ i)
+    {
+        getiter(i)->moveto_begin();
+    }
+}
+
+void DataContainer::moveto_end()
+{
+    pos = size();
+    for (ContainerSizeType i = 0; i < element_size(); ++ i)
+    {
+        getiter(i)->moveto_end();
+    }
+}
+
+CharVecSizeType DataContainer::remain()
+{
+    CharVecSizeType remainder  = pos % max_unit_size;
+    return max_unit_size - remainder;
+}
+
+void DataContainer::readfile(fstream &file)
+{
+    //! write the data to DataContainer from the file.
+    streamsize nlen = 0;
+    file.read(reinterpret_cast<char *>(&nlen), sizeof(streamsize));
+    if (nlen <= 0) return;
+
+    secure_absolute_space(static_cast< CharVecSizeType >(nlen));
+
+    //cout << "element_size = " << element_size() << "\n";
+
+    for (ContainerSizeType i = 0; i < element_size(); ++ i)
+    {
+        getiter(i)->readfile(file);
+    }
+}
+
+void DataContainer::writefile(fstream &file)
+{
+    streamsize nlen = size();
+
+    //! it need to be written to the file whenever the nlen is less than 0 or not.
+    file.write(reinterpret_cast<char *>(&nlen), sizeof(streamsize));
+    if (nlen <= 0) return;
+
+    //cout << "element_size = " << element_size() << "\n";
+
+    for (ContainerSizeType i = 0; i < element_size(); ++ i)
+    {
+        getiter(i)->writefile(file);
+    }
+}
+
+void DataContainer::to_string(string &str)
+{
+    for (ContainerSizeType i = 0; i < element_size(); ++ i)
+    {
+        //cout << " i = " << i << " to_string element_size = " << element_size() << "\n";
+        getiter(i)->to_string(str);
+    }
+}
+
+void DataContainer::append(void *data, CharVecSizeType size)
+{
+    moveto_end();
+    CharVecSizeType need_size = this->size() + size;
+    secure_absolute_space(need_size);
+
+    getcurr()->write(data, size);
+}
+
+void DataContainer::destroy(DataChar *iter)
+{
+    delete iter;
+}
+
+void DataContainer::erase(ContainerSizeType ist, ContainerSizeType ied)
+{
+    for (ContainerSizeType i = ist; i != ied; ++ i)
+    {
+        destroy(getiter(i));
+    }
+}
+
+//start to add by Xu Qingxin 2013.03.20., modified 2013.05.09.
+CharVecSizeType DataContainer::my_size(streamsize size)
+{
+    CharVecSizeType sum = 0;
+    ContainerSizeType elem_beg = static_cast< ContainerSizeType >(pos / max_unit_size);
+    ContainerSizeType elem_end = static_cast< ContainerSizeType >((pos + size - 1) / max_unit_size);
+
+    for (ContainerSizeType i = elem_beg; i <= elem_end; ++ i)
+    {
+        sum += getiter(i)->size();
+    }
+
+    return sum;
+}
+
+void DataContainer::init_buffer(CharVecSizeType buf_beg, int elem_beg, int elem_num)
+{
+    pos = elem_beg * max_unit_size + buf_beg;
+
+    for (int i = elem_beg; i < elem_beg + elem_num; ++ i)
+    {
+        getiter(i)->moveto_begin();
+    }
+}
+
+void DataContainer::init_buffer(int elem_num, int ptr_dim, 
+     ContainerSizeType *ptr_elem_beg, ContainerSizeType *ptr_elem_len, 
+     ContainerSizeType *ptr_elem_num)
+{
+    element_resize(elem_num);
+
+    for (int i = 0; i < ptr_dim; i ++)
+    {
+        CharVecSizeType remainder  = ptr_elem_len[i] % max_unit_size;
+        ContainerSizeType elem_end = ptr_elem_beg[i] + ptr_elem_num[i];
+
+        for (ContainerSizeType inum = ptr_elem_beg[i]; inum < elem_end; inum ++)
+        {
+            CharVecSizeType need_size;
+            if (inum == elem_end - 1)
+            {
+                need_size = remainder;
+            }
+            else
+            {
+                need_size = max_unit_size;
+            }
+
+            getiter(inum)->resize(need_size);
+        }
+    }
+
+    moveto_begin();
+}
+
+void DataContainer::static_write(CharVecSizeType begin, void *data, CharVecSizeType size)
+{
+    //using namespace PHMPI;
+
+    pos += begin;
+
+    //check:
+    if (size > this->my_size(size))
+    {
+        ostringstream oss;
+
+        oss << "Error: Proc ? " //<< GetCurrentProcessorID() 
+            << ", The write buffer size not enough!\n"
+            << "   ---- begin =" << pos << ", actual size = " << size 
+            << ", buffer size = " << this->my_size(size) << " ----\n"
+            << " (In static_write, from ActionKey.cpp)\n";
+
+        string errmsg = oss.str();
+
+        //PHMPI::FreeBlockData();
+        cout << errmsg << endl;
+        exit(0);
+    }
+
+    //begin                  = begin%max_unit_size;
+    begin = pos % max_unit_size;
+    CharVecSizeType remain_size = remain();
+
+    if (remain_size >= size)
+    {
+        getcurr()->write(data, size, static_cast<int>(begin));
+        forward_position(size);
+    }
+    else 
+    {
+        //! write the data by segmentation.
+        //! write some data for the rest space.
+        getcurr()->write(data, remain_size, static_cast<int>(begin));
+
+        forward_position(remain_size);
+
+        void *new_data = move_pointer(data, remain_size);
+        CharVecSizeType new_size = size - remain_size;
+
+        //! repeat this function for the rest data that has node been written.
+        static_write(new_data, new_size);
+    }
+}
+
+void DataContainer::static_write(void *data, CharVecSizeType size)
+{
+    //using namespace PHMPI;
+
+    //check:
+    if (size > this->my_size(size))
+    {
+        ostringstream oss;
+
+        oss << "Error: Proc ? " //<< GetCurrentProcessorID() 
+            << ", The write buffer size not enough!\n"
+            << "   ---- pos =" << pos << ", actual size = " << size 
+            << ", buffer size = " << this->my_size(size) << " ----\n"
+            << " (In static_write, from ActionKey.cpp)\n";
+
+        string errmsg = oss.str();
+
+        //PHMPI::FreeBlockData();
+        cout << errmsg << endl;
+        exit(0);
+    }
+
+    CharVecSizeType remain_size = remain();
+
+    if (remain_size >= size)
+    {
+        getcurr()->write(data, size);
+        forward_position(size);
+    }
+    else 
+    {
+        //! write the data by segmentation.
+        //! write some data for the rest space.
+        getcurr()->write(data, remain_size);
+
+        forward_position(remain_size);
+
+        void *new_data = move_pointer(data, remain_size);
+        CharVecSizeType new_size = size - remain_size;
+
+        //! repeat this function for the rest data that has node been written.
+        static_write(new_data, new_size);
+    }
+}
+
+void DataContainer::static_read(CharVecSizeType begin, void *data, CharVecSizeType size)
+{
+    //using namespace PHMPI;
+
+    pos += begin;
+
+    //check:
+    if (size > this->my_size(size))
+    {
+        ostringstream oss;
+
+        oss << "Error: Proc ? " //<< GetCurrentProcessorID() 
+            << ", The read buffer size not enough!\n"
+            << "   ---- begin =" << pos << ", actual size = " << size 
+            << ", buffer size = " << this->my_size(size) << " ----\n"
+            << " (In static_read, from ActionKey.cpp)\n";
+
+        string errmsg = oss.str();
+
+        //PHMPI::FreeBlockData();
+        cout << errmsg << endl;
+        exit(0);
+    }
+
+    CharVecSizeType remain_size = remain();
+    //begin                  = begin%max_unit_size;
+    begin = pos % max_unit_size;
+
+    if (remain_size >= size)
+    {
+        //! if the sub data length is not small than 'size', it can read directly.
+        getcurr()->read(data, size, static_cast<int>(begin));
+        forward_position(size);
+    }
+    else
+    {
+        //! read the data by segmentation.
+        //! first read the remained data int this superchar.
+        getcurr()->read(data, remain_size, static_cast<int>(begin));
+        forward_position(remain_size);
+
+        void *new_data = move_pointer(data, remain_size);
+        CharVecSizeType new_size = size - remain_size;
+
+        static_read(new_data, new_size);
+    }
+}
+
+void DataContainer::static_read(void *data, CharVecSizeType size)
+{
+    //using namespace PHMPI;
+
+    streamsize need_size = pos + size;
+
+    //check:
+    if (need_size > static_cast<streamsize>(this->size()))
+    {
+        ostringstream oss;
+
+        oss << "Error: Proc ? " //<< GetCurrentProcessorID() 
+            << ", The read buffer size not enough!\n"
+            << "   ---- pos =" << pos << ", actual size = " << need_size 
+            << ", buffer size = " << this->size() << " ----\n"
+            << " (In static_read, from ActionKey.cpp)\n";
+
+        string errmsg = oss.str();
+
+        //PHMPI::FreeBlockData();
+        cout << errmsg << endl;
+        exit(0);
+    }
+
+    CharVecSizeType remain_size = remain();
+
+    if (remain_size >= size)
+    {
+        //! if the sub data legth is not small than 'size', it can read directly.
+        getcurr()->read(data, size);
+        forward_position(size);
+    }
+    else
+    {
+        //! read the data by segmentation.
+        //! first read the remained data int this superchar.
+        getcurr()->read(data, remain_size);
+        forward_position(remain_size);
+
+        void *new_data = move_pointer(data, remain_size);
+        CharVecSizeType new_size = size - remain_size;
+
+        static_read(new_data, new_size);
+    }
+}
+
+char * move_pointer(void *data, streamsize size)
+{
+    return reinterpret_cast<char *>(data) + size;
+}
+}
diff --git a/API/DataStruct/src/DataStruct_BinaryTree.cpp b/API/DataStruct/src/DataStruct_BinaryTree.cpp
new file mode 100644
index 0000000..74711d1
--- /dev/null
+++ b/API/DataStruct/src/DataStruct_BinaryTree.cpp
@@ -0,0 +1,84 @@
+#include "DataStruct_BinaryTree.h"
+using namespace std;
+
+namespace PHSPACE
+{
+DataStruct_BinaryTree::DataStruct_BinaryTree(int *startPointLabel, int nZones, int numberOfPoints)
+{
+    CopyOriginalVector(startPointLabel, nZones);
+    this->numberOfPoints = numberOfPoints;
+    root = Create(root, 0, nZones-1);
+    return;
+}
+
+DataStruct_BinaryTree::~DataStruct_BinaryTree()
+{
+    Release(root);
+    return;
+}
+
+int DataStruct_BinaryTree::ComputeZoneLabel(int globalPointIndex)
+{
+    return ComputeZoneLabel(root, globalPointIndex);
+}
+
+int DataStruct_BinaryTree::ComputeZoneLabel(DataStuct_BinaryNode *binaryNode, int globalPointIndex)
+{
+    if (globalPointIndex < binaryNode->inf)
+    {
+        return ComputeZoneLabel(binaryNode->leftChild, globalPointIndex);
+    }
+    else if (globalPointIndex > binaryNode->sup)
+    {
+        return ComputeZoneLabel(binaryNode->rightChild, globalPointIndex);
+    }
+    else
+    {
+        return binaryNode->zoneLabel;
+    }
+}
+
+void DataStruct_BinaryTree::CopyOriginalVector(int *startPointLabel, int nZones)
+{
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        this->startPointLabel.push_back(startPointLabel[iZone]);
+    }
+    this->numberOfZones = nZones;
+    return;
+}
+
+DataStuct_BinaryNode * DataStruct_BinaryTree::Create(DataStuct_BinaryNode *binaryNode, int leftLabel, int rightLabel)
+{
+    if (leftLabel > rightLabel) return 0;
+
+    int middleLabel = (leftLabel + rightLabel) / 2;
+    binaryNode = new DataStuct_BinaryNode();
+    binaryNode->inf = startPointLabel[middleLabel];
+    if (middleLabel < numberOfZones-1)
+    {
+        binaryNode->sup = startPointLabel[middleLabel+1] - 1;
+    }
+    else
+    {
+        binaryNode->sup = numberOfPoints - 1;
+    }
+    binaryNode->zoneLabel = middleLabel;
+
+    binaryNode->leftChild  = Create(binaryNode->leftChild, leftLabel, middleLabel-1);
+    binaryNode->rightChild = Create(binaryNode->rightChild, middleLabel+1, rightLabel);
+
+    return binaryNode;
+}
+
+void DataStruct_BinaryTree::Release(DataStuct_BinaryNode *binaryNode)
+{
+    if (!binaryNode) return;
+
+    Release(binaryNode->leftChild);
+    Release(binaryNode->rightChild);
+    delete binaryNode;
+    return;
+}
+
+}
\ No newline at end of file
diff --git a/API/DataStruct/src/DataStruct_KDTree.cpp b/API/DataStruct/src/DataStruct_KDTree.cpp
new file mode 100644
index 0000000..bf054d3
--- /dev/null
+++ b/API/DataStruct/src/DataStruct_KDTree.cpp
@@ -0,0 +1,453 @@
+#pragma once
+#include "DataStruct_KDTree.h"
+#include <cstring>
+#include <cmath>
+#include <new>
+using namespace std;
+
+#define SQ(x) ((x)*(x))
+
+namespace PHSPACE
+{
+    KDHyperRect * CreatHyperRect(int dim, const RDouble *min, const RDouble *max)
+    {
+        size_t size = dim * sizeof(RDouble);
+        KDHyperRect *rect = new KDHyperRect(dim);
+        if (!rect)
+        {
+            return NULL;
+        }
+
+        rect->dim = dim;
+        rect->min = new(std::nothrow) RDouble[dim];
+        if (rect->min == NULL)
+        {
+            delete rect;
+            return NULL;
+        }
+
+        rect->max = new(std::nothrow) RDouble[dim];
+        if (rect->max == NULL)
+        {
+            delete rect->min;
+            delete rect;
+            return NULL;
+        }
+
+        memcpy(rect->min, min, size);
+        memcpy(rect->max, max, size);
+
+        return rect;
+    }
+
+    void KDHyperRect::Extend(const RDouble *pos)
+    {
+        for (int i = 0; i < dim; ++ i)
+        {
+            if (pos[i] < min[i])
+            {
+                min[i] = pos[i];
+            }
+
+            if (pos[i] > max[i])
+            {
+                max[i] = pos[i];
+            }
+        }
+    }
+
+    RDouble KDHyperRect::distSQ(const RDouble *pos)
+    {
+        RDouble result = 0.0;
+        for (int i = 0; i < dim; ++ i)
+        {
+            if (pos[i] < min[i])
+            {
+                result += SQ(min[i] - pos[i]);
+            }
+
+            if (pos[i] > max[i])
+            {
+                result += SQ(max[i] - pos[i]);
+            }
+        }
+        return result;
+    }
+
+    KDTree * CreatKDTree(int k)
+    {
+        KDTree *kdTree = new KDTree(k);
+        if (!kdTree)
+        {
+            return NULL;
+        }
+
+        return kdTree;
+    };
+
+    void KDTree::Free()
+    {
+        if (this)
+        {
+            this->Clear();
+        }
+    }
+
+    void KDTree::Clear()
+    {
+        ClearRec(root, destr);
+        root = NULL;
+
+        if (rect)
+        {
+            rect->Free();
+            delete rect;
+            rect = NULL;
+        }
+    }
+
+    void KDTree::ClearRec(KDNode *node, void(*destr)(void *))
+    {
+        if (!node)
+        {
+            return;
+        }
+        ClearRec(node->left, destr);
+        ClearRec(node->right, destr);
+
+        if (destr)
+        {
+            destr(node->data);
+        }
+        delete [] node->pos;
+        delete node;
+    }
+
+    void KDTree::DestructorKDData(void(*destr)(void *))
+    {
+        this->destr = destr;
+    }
+
+    int InsertRec(KDNode **nptr, const RDouble *pos, void *data, int dir, int dim)
+    {
+        int newDir;
+        KDNode *node;
+
+        if (!*nptr)
+        {
+            try {
+                node = new KDNode(dir);
+            }
+            catch (bad_alloc) {
+                return -1;
+            }
+
+            node->pos = new(std::nothrow) RDouble[dim];
+            if ( node->pos == NULL )
+            {
+                delete node;
+                return -1;
+            }
+
+            memcpy(node->pos, pos, dim * sizeof(node->pos));
+            node->data = data;
+            node->dir = dir;
+            node->left = NULL;
+            node->right = NULL;
+            *nptr = node;
+            return 0;
+        }
+
+        node = *nptr;
+        newDir = (node->dir + 1) % dim;
+        if (pos[node->dir] < node->pos[node->dir])
+        {
+            return InsertRec(&(*nptr)->left, pos, data, newDir, dim);
+        }
+        return InsertRec(&(*nptr)->right, pos, data, newDir, dim);
+    }
+
+    int KDInsert(KDTree *kdTree, const RDouble *pos, void *data)
+    {
+        if (InsertRec(&kdTree->root, pos, data, 0, kdTree->dim))
+        {
+            return -1;
+        }
+
+        if (kdTree->rect == NULL)
+        {
+            kdTree->rect = CreatHyperRect(kdTree->dim, pos, pos);
+        }
+        else
+        {
+            kdTree->rect->Extend(pos);
+        }
+
+        return 0;
+    }
+
+    int ListInsert(KDResNode *list, KDNode *item, RDouble distSQ)
+    {
+        KDResNode *rnode = new KDResNode();
+        if (!rnode)
+        {
+            return -1;
+        }
+        rnode->item = item;
+        rnode->distSQ = distSQ;
+
+        if (distSQ >= 0.0)
+        {
+            while (list->next && list->next->distSQ < distSQ)
+            {
+                list = list->next;
+            }
+        }
+        rnode->next = list->next;
+        list->next = rnode;
+        return 0;
+    }
+
+    KDHyperRect * DuplicateHyperRect(const KDHyperRect *rect)
+    {
+        return CreatHyperRect(rect->dim, rect->min, rect->max);
+    };
+
+    int FindNearest(KDNode *node, const RDouble *pos, RDouble range, KDResNode *list, int ordered, int dim)
+    {
+        if (!node)
+        {
+            return 0;
+        }
+
+        RDouble distSQ = 0.0;
+        int addedRes = 0;
+        for (int i = 0; i < dim; i ++)
+        {
+            distSQ += SQ(node->pos[i] - pos[i]);
+        }
+        if (distSQ <= SQ(range))
+        {
+            if (ListInsert(list, node, ordered ? distSQ: -1.0) == -1)
+            {
+                return -1;
+            }
+            addedRes = 1;
+        }
+
+        RDouble dx = pos[node->dir] - node->pos[node->dir];
+        int ret = FindNearest(dx <= 0.0 ? node->left: node->right, pos, range, list, ordered, dim);
+        if (ret >= 0 && fabs(dx) < range)
+        {
+            addedRes += ret;
+            ret = FindNearest(dx <= 0.0 ? node->right: node->left, pos, range, list, ordered, dim);
+        }
+        if (ret == -1)
+        {
+            return -1;
+        }
+        addedRes += ret;
+        return addedRes;
+    }
+
+    void FreeKDRes(KDRes *rset)
+    {
+        clearResults(rset);
+        delete rset->rlist;
+        delete rset;
+    }
+
+    void clearResults(KDRes *rset)
+    {
+        KDResNode *node = rset->rlist->next;
+        while (node)
+        {
+            KDResNode *tmp = node;
+            node = node->next;
+            delete tmp;
+        }
+        rset->rlist->next = NULL;
+    }
+
+    void KDNearestI(KDNode *node, const RDouble *pos, KDNode **result, RDouble *resultDistSQ, KDHyperRect *rect)
+    {
+        int dir = node->dir;
+        RDouble distSQ;
+        KDNode *nearestSubTree, *fatherSubTree;
+        RDouble *nearerHyperRectCoord, *fatherHyperRectCoord;
+
+        RDouble dummy = pos[dir] - node->pos[dir];
+        if (dummy <= 0.0)
+        {
+            nearestSubTree = node->left;
+            fatherSubTree  = node->right;
+            nearerHyperRectCoord = rect->max + dir;
+            fatherHyperRectCoord = rect->min + dir;
+        }
+        else
+        {
+            nearestSubTree = node->right;
+            fatherSubTree  = node->left;
+            nearerHyperRectCoord = rect->min + dir;
+            fatherHyperRectCoord = rect->max + dir;
+        }
+
+        if (nearestSubTree)
+        {
+            dummy = *nearerHyperRectCoord;
+            *nearerHyperRectCoord = node->pos[dir];
+
+            KDNearestI(nearestSubTree, pos, result, resultDistSQ, rect);
+
+            *nearerHyperRectCoord = dummy;
+        }
+
+        distSQ = 0.0;
+        for (int i = 0; i < rect->dim; ++ i)
+        {
+            distSQ += SQ(node->pos[i] - pos[i]);
+        }
+        if (distSQ < *resultDistSQ)
+        {
+            *result = node;
+            *resultDistSQ = distSQ;
+        }
+
+        if (fatherSubTree)
+        {
+            dummy = *fatherHyperRectCoord;
+            *fatherHyperRectCoord = node->pos[dir];
+            if (rect->distSQ(pos) < *resultDistSQ)
+            {
+                KDNearestI(fatherSubTree, pos, result, resultDistSQ, rect);
+            }
+            *fatherHyperRectCoord = dummy;
+        }
+    }
+
+    KDRes * KDNearest(KDTree *kdTree, const RDouble *pos)
+    {
+        KDHyperRect *rect;
+        KDNode *result;
+        KDRes *rset;
+        RDouble distSQ;
+
+        if (!kdTree)
+        {
+            return NULL;
+        }
+
+        if (!kdTree->rect)
+        {
+            return NULL;
+        }
+
+        // Allocate result set
+        try {
+            rset = new KDRes;
+        }
+        catch (bad_alloc) {
+            return NULL;
+        }
+
+        try {
+            rset->rlist = new KDResNode;
+        }
+        catch (bad_alloc) {
+            delete rset;
+            return NULL;
+        }
+
+        rset->rlist->next = NULL;
+        rset->kdTree = kdTree;
+
+        rect = DuplicateHyperRect(kdTree->rect);
+        if (rect == NULL)
+        {
+            FreeKDRes(rset);
+            return NULL;
+        }
+
+        result = kdTree->root;
+        distSQ = 0.0;
+        for (int i = 0; i < kdTree->dim; ++ i)
+        {
+            distSQ += SQ(result->pos[i] - pos[i]);
+        }
+
+        KDNearestI(kdTree->root, pos, &result, &distSQ, rect);
+
+        //rect->Free();
+		delete rect;
+
+        if (result)
+        {
+            if (InsertRList(rset->rlist, result, -1.0) == -1)
+            {
+                FreeKDRes(rset);
+                return NULL;
+            }
+            rset->size = 1;
+            rset->Rewind();
+            return rset;
+        }
+        else
+        {
+            FreeKDRes(rset);
+            return NULL;
+        }
+    }
+    int InsertRList(KDResNode *list, KDNode *item, RDouble distSQ)
+    {
+        KDResNode *rNode = new KDResNode;
+        if (!rNode)
+        {
+            return -1;
+        }
+        rNode->item = item;
+        rNode->distSQ = distSQ;
+
+        if (distSQ >= 0.0)
+        {
+            while (list->next && list->next->distSQ < distSQ)
+            {
+                list = list->next;
+            }
+        }
+
+        rNode->next = list->next;
+        list->next = rNode;
+        return 0;
+
+    }
+
+    KDRes * NearestRange(KDTree *kdTree, const RDouble *pos, RDouble range)
+    {
+        KDRes *rset = new KDRes;
+        if (!rset)
+        {
+            return NULL;
+        }
+
+        try {
+            rset->rlist = new KDResNode;
+        }
+        catch (bad_alloc) {
+            delete rset;
+            return NULL;
+        }
+
+        rset->rlist->next = NULL;
+        rset->kdTree = kdTree;
+        int ret = 0;
+        if ((ret = FindNearest(kdTree->root, pos, range, rset->rlist, 0, kdTree->dim)) == -1)
+        {
+            FreeKDRes(rset);
+            return NULL;
+        }
+        rset->size = ret;
+        rset->Rewind();
+        return rset;
+    }
+
+}
\ No newline at end of file
diff --git a/API/DataStruct/src/PHStorage.cpp b/API/DataStruct/src/PHStorage.cpp
new file mode 100644
index 0000000..6484017
--- /dev/null
+++ b/API/DataStruct/src/PHStorage.cpp
@@ -0,0 +1,6 @@
+#include "PHStorage.h"
+
+namespace PHSPACE
+{
+    fortranTag fortranArray;
+}
diff --git a/API/FYMPI/include/ActionKey.h b/API/FYMPI/include/ActionKey.h
new file mode 100644
index 0000000..b7ae891
--- /dev/null
+++ b/API/FYMPI/include/ActionKey.h
@@ -0,0 +1,124 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      ActionKey.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin, Bell.
+
+#pragma once
+#include "DataContainer.h"
+using namespace std;
+
+namespace PHSPACE
+{
+typedef enum
+{
+    READ_RESTART = 1,
+    BUILD_WALL_STRUCT,
+    CALC_WALL_DIST,
+    FILL_WALL_STRUCT,
+    READ_WALL_DIST,
+    WRITE_WALL_DIST,
+    DUMP_RESTART,
+    UPDATE_INTERFACE_DATA,
+    UPLOAD_INTERFACE_DATA,
+    DOWNLOAD_INTERFACE_DATA,
+    UPDATE_INTERPOINT_DATA,
+    UPLOAD_INTERPOINT_DATA,
+    DOWNLOAD_INTERPOINT_DATA,
+    UPDATE_OVERSET_DATA,
+    UPLOAD_OVERSET_DATA,
+    DOWNLOAD_OVERSET_DATA,
+    DUMP_COMPONENT_AIR_FORCE_COEF,
+    DUMP_AIR_FORCE_COEF,
+    DUMP_CP_DISTRI,
+    VISUALIZATION,
+    DUMP_RESIDUAL,
+    ALLOCATEINTERFACE,
+    COMPUTEMETRICS,
+    COMMCELLCENTERDATA,
+    COMMCELLIBLANK,
+    ALLOCATE_WALL_DIST,
+    TEST_RECONSTRUCTION,
+    TEST_INTERFACE,
+    SIMPLE_ACTION,
+    SHOW_VISTMAX,
+    INIT_FIRST,
+    INIT_SECOND,
+    INIT_FINAL,
+    DUMP_AVERAGE_FLOW,
+    READ_AVERAGE_FLOW,
+    VISUALIZATION_AVERAGE_FLOW,
+    DUMP_SURFACE_INFO,
+    DUMP_PROBES_FLOW,
+    VISUALIZATION_AVERAGE_ReynoldsStress,
+    DUMP_HEATFLUX,
+    COMPUTE_AERODYNAMIC_FORCE
+}ActionEnum;
+const int NofValidAction = 41;
+extern const char * ActionName[NofValidAction];
+
+class ActionKey
+{
+public:
+    int action;
+    int subact;
+    int solver;
+    int solverID;
+    int level;
+    int ipos;
+    int kind;    //! 0 solver, 1 grid.
+    int filepos;
+    int format;
+    fstream *file;
+    bool del_file;
+    bool VTKvisual;
+    ios_base::openmode openmode;
+    string filename;
+    string tecfilename;
+    DataContainer *data;
+    DataContainer *tecdata;
+    string taskname;
+public:
+    ActionKey();
+    ~ActionKey();
+    DataContainer * GetData() const { return data; }
+    DataContainer * GetTecData() const { return tecdata; }
+    fstream * GetFile() const { return file; }
+    string GetFileName() const { return filename; }
+    int GetAction() { return action; }
+    void SetData(DataContainer *dataIn) { this->data = dataIn; }
+    void SetTecData(DataContainer *dataIn) { this->tecdata = dataIn; }
+    bool IsNeedOpenFile() const { return this->filename != ""; }
+};
+
+class ActionTag
+{
+public:
+    ActionTag(){};
+    ActionTag(int action, int level, bool run_now = true)
+    {
+        this->action  = action;
+        this->level   = level;
+        this->run_now = run_now;
+    };
+    ~ActionTag(){};
+public:
+    int  action;
+    int  level;
+    bool run_now;
+};
+
+void SetCurrentActionKey(ActionKey *ActionKeyIn);
+ActionKey * GetCurrentActionKey();
+
+}
+
diff --git a/API/FYMPI/include/PHMpi.h b/API/FYMPI/include/PHMpi.h
new file mode 100644
index 0000000..37c9afa
--- /dev/null
+++ b/API/FYMPI/include/PHMpi.h
@@ -0,0 +1,693 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PHMPI.h
+//! @brief     It defines many basic global variables and interfaces which are related to MPI.
+//! @author    Bell, He Xin, Xu Qingxin.
+#pragma once
+
+#ifdef PH_PARALLEL
+    #include "mpi.h"
+#endif
+
+#include "LIB_Macro.h"
+#include "DataStruct_BinaryTree.h"
+#include "ActionKey.h"
+#include "Parallel.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+//! Parallel or file mode:
+//!    CS_MODE(0) : Client-Server mode.
+//!    P2P_MODE(1): Peer-To-Peer mode.
+const int CS_MODE  = 0;
+const int P2P_MODE = 1;
+
+//! Zone block distribution method.
+//! -# DETERMIN_BY_PARTITION(0): each zone is assigned to the one that defined in grid partition procedure.
+//! -# REDISTRIBUTION(1)       : random assigned for each zone or by some else ways.
+const int DETERMIN_BY_PARTITION = 0;
+const int REDISTRIBUTION        = 1;
+
+namespace PHMPI
+{
+extern int csmode;
+extern int server;
+extern VVInt zone_over_link;
+
+typedef void (*DATA_COMPRESS)(DataContainer *&cdata);
+typedef void (*DATA_DECOMPRESS)(DataContainer *cdata);
+
+//! PHengLEI solver initialization.
+void Initialization();
+
+void SetServerProcessorID(int serverId);
+
+void SetGridServerProcessorID(int serverId);
+
+//! Set the number of global zones, which make up the whole computation domain,
+//! no matter the domain is divided into many partition or not. The number of global zone
+//! is equal to the sum of number of local zone on each processor.
+LIB_EXPORT void SetNumberOfGlobalZones(int nblock);
+
+//! Set the number of processors used in this simulation process.
+void SetNumberOfProcessor(int nproc);
+
+void SetNumberOfGridProcessor(int nproc);
+
+//! Set parallel Strategy:
+//! -# 0 : each zone is assigned to the one that defined in grid partition procedure.
+//! -# 1 : random assigned for each zone or by some else ways.
+void SetParallelStrategy(int parallelStrategy);
+int  GetParallelStrategy();
+
+//! Set the number of local zones on the current processor.
+//! The sum of local zones of each processor is equal to the number of global zones.
+LIB_EXPORT void SetNumberofLocalZones(int nblock);
+
+//! Set the number of files, that are the groups to manage grid/visualization/flow files, etc.
+void SetNumberofFiles(int fileNumber);
+
+//! Set the corresponding processor ID to be 'id' of iZone-th zone.
+LIB_EXPORT void SetZoneProcessorID(int iZone, int id);
+
+void SetZoneProcessID_INP(int *data);
+
+void SetIsFileServer(int isServer);
+
+//! Set zone block distribution method.
+void SetZoneDistributionMethod(int method);
+
+void InsertGlobalZones(int globalZoneID);
+
+void BuildProcessorTree();
+
+//! Special functions for HYBRID solver.
+void SetNumberOfProcStructUsed(int number);
+
+int GetServerProcessorID();
+
+//! Return the processor index of the current processor, which is start from 0 and 
+//! end with (nProcessor-1).
+LIB_EXPORT int GetCurrentProcessorID();
+
+int GetGridServerProcessorID();
+
+//! Return the number of global zones, which make up the whole computation domain,
+//! no matter the domain is divided into many partition or not. The number of global zone
+//! is equal to the sum of number of local zone on each processor.
+LIB_EXPORT int GetNumberofGlobalZones();
+
+//! Special functions for HYBRID solver.
+int * GetNZonesInProcessor();
+
+//! Return the number of processors used in this simulation process.
+LIB_EXPORT int GetNumberOfProcessor();
+
+LIB_EXPORT int GetNumberOfGridProcessor();
+
+//! Return the number of local zones on the current processor.
+//! The sum of local zones of each processor is equal to the number of global zones.
+LIB_EXPORT int GetNumberofLocalZones();
+
+//! Return the number of files, that are the groups to manage grid/visualization/flow files, etc.
+LIB_EXPORT int GetNumberofFiles();
+
+//! Return the zone processor ID array pointer.
+LIB_EXPORT int * GetZoneProcessorID();
+
+//! Return the corresponding processor ID of iZone-th zone.
+LIB_EXPORT int GetZoneProcessorID(int iZone);
+
+LIB_EXPORT int * GetZoneProcessorIDForGrid();
+
+LIB_EXPORT int GetZoneProcessorIDForGrid(int iZone);
+
+//! Return the zone grid type array pointer.
+LIB_EXPORT int * GetZoneGridType();
+
+//! Return the grid type of iZone-th zone.
+LIB_EXPORT int GetZoneGridType(int iZone);
+
+//! Return the zone block ID array pointer.
+LIB_EXPORT int * GetZoneGridID();
+
+//! Return the zone file ID array pointer.
+LIB_EXPORT int * GetZoneFileID();
+
+//! Return the corresponding file manager processor ID of iZone-th zone.
+//! File manage processor: which is used to read or write information of iZone-th zone.
+//! The zone ID is not necessary equal to the file manager processor ID.
+LIB_EXPORT int GetZoneFileID(int iZone);
+
+//! This function is special used in HYBRID solver.
+LIB_EXPORT int * GetZoneProcessorID_INP();
+
+//! This function is special used in HYBRID solver.
+LIB_EXPORT int * GetZoneProcessorIDDump();
+
+LIB_EXPORT int * GetZoneGroupID();
+
+//! Return zone block distribution method.
+//! -# 0 : each zone is assigned to the one that defined in grid partition procedure.
+//! -# 1 : random assigned for each zone or by some else ways.
+LIB_EXPORT int GetZoneDistributionMethod();
+
+//! Return the global zone index of local zone index = localZoneID.
+LIB_EXPORT int GetLocalZoneIDToGlobalZoneID(int localZoneID);
+
+//! Return the local zone index of global zone index = localZoneID.
+LIB_EXPORT int GetGlobalZoneIDToLocalZoneID(int globalZoneID);
+
+//! Special functions for HYBRID solver.
+int GetNumberOfProcStructUsed();
+
+void CreateZoneProcessorID(int nZonesTmp);
+
+void CreatetZoneProcessorID_INP(int nZonesTmp);
+
+void CreateZoneGridID(int nZonesTmp);
+
+void CreateZoneGridType(int nZonesTmp);
+
+void CreateZoneFileID(int nZonesTmp);
+
+//! Special functions for HYBRID solver.
+void CreateZoneProcessorIDDump(int nZonesTmp);
+
+void CreateZoneGroupID(int nZonesTmp);
+
+void FreeBlockData();
+
+void CreateZoneStartPointContainer(int nZonesTmp);
+
+int * GetZoneStartPointContainer();
+
+void DeleteZoneStartPointContainer();
+
+void CreateZoneStartCenterContainer(int nZonesTmp);
+
+int * GetZoneStartCenterContainer();
+
+void DeleteZoneStartCenterContainer();
+
+void GenerateGlobalBinaryTree(int * zoneStartPointContainerTmp, int nZonesTmp, int numberOfPoints);
+
+//! The following 8 functions should be moved to overset file.
+int GetZoneIndexAccordingToGlobalPointLabel(int globalPointLabel);
+
+void DeleteGlobalBinaryTree();
+
+//! Return true if number of processors > 1.
+LIB_EXPORT bool IsParallelRun();
+
+LIB_EXPORT bool CurrentProcessorIsGridProcessor();
+
+//! Return the interval of processors that manage files.
+LIB_EXPORT int GetIntervalofProcessorFiles();
+
+//! Return the file index that manage current processor data.
+LIB_EXPORT int GetFileIndexofCurrentProcessor();
+
+LIB_EXPORT int GetZoneProcessorIDSepMode(int iZone);
+
+//! Return the send or receive processor ID of iZone-th zone.
+LIB_EXPORT void GetSendRecvProc(int iZone, int &send_proc, int &recv_proc);
+
+int GetServerSepMode();
+
+LIB_EXPORT int * GetZoneProcessorIDSepMode();
+
+//! Return the file manager processor ID, two cases of file mode:
+//! Case CS_MODE (0): the processor ID is the server ID (0).
+//! Case P2P_MODE(1): the processor ID is the current processor.
+LIB_EXPORT void GetFileProc(int &file_proc);
+
+//! Return if the current processor if file server.
+LIB_EXPORT int IsCurrentProcessorFileServer();
+
+void PH_Read(fstream &file, void *data, int size, int proc);
+
+void PH_Read(fstream &file, void *data, int size);
+
+void PH_ReadBcastInteger(fstream &file, void *data, int size, int proc);
+
+void PH_ReadBcastDouble(fstream &file, void *data, int size, int proc);
+
+void PH_Read_Bcast(fstream &file, void *data, int size, int proc);
+
+void PH_BcastToClinet(void *data, int size, int proc, int key, int tag = 0);
+
+void PH_BcastSepMode(void *data, int size, int proc, int tag = 0);
+
+void PH_Bcast(void *data, int size, int proc, int tag = 0);
+
+void PH_Bcast(DataContainer *cdata, int proc, int tag = 0);
+
+void PH_BcastByServer(DataContainer *cdata, int tag = 0);
+
+void PH_GatherByServer(DataContainer *cdata, int tag = 0);
+
+void PH_BcastByServerSepMode(DataContainer *cdata, int tag = 0);
+
+void PH_BcastByServerToClinet(DataContainer *cdata, int key, int tag = 0);
+
+void PH_BcastNonBlocking(DataContainer *&cdata, int bcastProcessor, int tag);
+
+void PH_BcastNlenData(int &nlen, char *&data, int proc, int tag = 0);
+
+void PH_BcastComposite(DATA_COMPRESS dt_c, DATA_DECOMPRESS dt_d, int proc, int tag = 0);
+
+void PH_BcastString(string &cs, int proc, int tag);
+
+void PH_CollectString(string &cs, int proc, int tag);
+
+void ServerRead(fstream &file, void *data, int size);
+
+void PH_Trade(void *data, int size, int send_proc, int recv_proc, int tag = 0);
+
+void PH_Trade(DataContainer *cdata, int send_proc, int recv_proc, int tag = 0);
+
+void PH_Trade(DataContainer *cdata, int send_proc, int recv_proc, streamsize nlen, int tag = 0);
+
+void PH_Trade(ActionKey *actkey, int send_proc, int recv_proc, int tag = 0);
+
+void PH_Trade(ActionKey *actkey, int send_proc, int recv_proc, streamsize nlen, int tag);
+
+template < typename T >
+void PH_SmartBcastNewVersion(T *field, int numberOfElements, int processorIndex)
+{
+#ifdef PH_PARALLEL
+    //! In order to avoid special situation.
+    if (numberOfElements <= 0) return;
+    int bufferSize = numberOfElements * sizeof(T);
+    MPI_Bcast(field, bufferSize, MPI_CHAR, processorIndex, MPI_COMM_WORLD);
+#endif
+
+//! MPI_BCAST(buffer, count, datatype, root, comm)
+//! IN/OUT buffer    the start address of communication buffer(optional data types).
+//! IN count         number of data to be broadcast or received (int type).
+//! IN datatype      types of data to be broadcast or received (handle).
+//! IN root          the ID of broadcast data root process(int type).
+//! IN comm          communication field (handle).
+//int MPI_Bcast(void *buffer, int count, MPI_Datatype datatype, int root, MPI_Comm comm)
+}
+
+template < typename T >
+void PH_SmartSend(T *field, int numberOfElements, int processorIndex, int tag)
+{
+#ifdef PH_PARALLEL
+    //! In order to avoid special situation.
+    if (numberOfElements <= 0) return;
+    MPI_Send(field, numberOfElements * sizeof(T), MPI_CHAR, processorIndex, tag, MPI_COMM_WORLD);
+#endif
+}
+
+template < typename T >
+void PH_SmartRecv(T *field, int numberOfElements, int processorIndex, int tag)
+{
+#ifdef PH_PARALLEL
+    //! In order to avoid special situation.
+    if (numberOfElements <= 0) return;
+
+    MPI_Status status;
+    MPI_Recv(field, numberOfElements * sizeof(T), MPI_CHAR, processorIndex, tag, MPI_COMM_WORLD, &status);
+#endif
+}
+
+template < typename T >
+void FillGobalData(T localData, T *&globalData)
+{
+    int nTProcessor = PHMPI::GetNumberOfProcessor();
+    int myid        = PHMPI::GetCurrentProcessorID();
+
+    for (int iProc = 0; iProc < nTProcessor; ++ iProc)
+    {
+        int procID = iProc;
+        T tempData;
+
+        if (myid == procID)
+        {
+            tempData = localData;
+        }
+
+        PHMPI::PH_Bcast(&tempData, sizeof(T), procID);
+
+        globalData[iProc] = tempData;
+    }
+}
+
+template < typename T >
+void FillGobalData(T *localData, int *localSize, T **&globalData)
+{
+    int nTProcessor = PHMPI::GetNumberOfProcessor();
+    int myid        = PHMPI::GetCurrentProcessorID();
+
+    for (int iProc = 0; iProc < nTProcessor; ++ iProc)
+    {
+        int procID = iProc;
+
+        int nData = localSize[iProc];
+        T *tempData = new T [nData];
+
+        if (myid == procID)
+        {
+            for (int iData = 0; iData < nData; ++ iData)
+            {
+                tempData[iData] = localData[iData];
+            }
+        }
+
+        PHMPI::PH_Bcast(tempData, nData * sizeof(T), procID);
+
+        globalData[iProc] = tempData;
+    }
+}
+
+template < typename T >
+void FillGobalDataCollectBcast(T *localData, int *localSize, T **&globalData)
+{
+    int nTProcessor = PHMPI::GetNumberOfProcessor() + PHMPI::GetNumberOfGridProcessor();
+    int myid        = PHMPI::GetCurrentProcessorID();
+    int serverTmp      = PHMPI::GetServerProcessorID();
+    int tag = 0;
+
+    //! Step1: collection from each other processors by server.
+    int totalDataSize = 0;
+    int *stride = new int [nTProcessor];
+    stride[0] = 0;
+    for (int iProc = 0; iProc < nTProcessor; ++ iProc)
+    {
+        totalDataSize += localSize[iProc];
+
+        if (iProc > 0) stride[iProc] = stride[iProc - 1] + localSize[iProc - 1];
+    }
+
+    T * globalDataTemp = new int [totalDataSize];
+
+    PH_Gatherv(localData, localSize[myid], globalDataTemp, localSize, stride, serverTmp);
+
+    delete [] stride;
+
+    if (myid == serverTmp)
+    {
+        int dataCount = 0;
+        for (int iProc = 0; iProc < nTProcessor; ++ iProc)
+        {
+            int nData = localSize[iProc];
+            T *tempData = new T [nData];
+
+            for (int jData = 0; jData < nData; ++ jData)
+            {
+                tempData[jData] = globalDataTemp[dataCount ++];
+            }
+
+            globalData[iProc] = tempData;
+        }
+    }
+
+    delete [] globalDataTemp;
+
+    //! Step2: broad casting to each other processors by server.
+    DataContainer *cdata = new DataContainer();
+
+    if (myid == serverTmp)
+    {
+        cdata->moveto_begin();
+        for (int iProc = 0; iProc < nTProcessor; ++ iProc)
+        {
+            T *temp = globalData[iProc];
+            PHWrite(cdata, temp, localSize[iProc]);
+        }
+    }
+
+    PHSPACE::PHMPI::PH_BcastByServerToClinet(cdata, 2, tag);
+
+    if (myid != serverTmp)
+    {
+        cdata->moveto_begin();
+        for (int iProc = 0; iProc < nTProcessor; ++ iProc)
+        {
+            globalData[iProc] = new T [localSize[iProc]];
+            PHRead(cdata, globalData[iProc], localSize[iProc]);
+        }
+    }
+
+    delete cdata;
+}
+
+//! Broad cast a data with size of nData to every other processor.
+template < typename T >
+void PH_BcastNonBlocking(T *data, int nData, int bcastProcessor, int tag)
+{
+    using namespace PHMPI;
+
+    vector< T * > sendDataBuffer;
+    vector< T * > receivedDataBuffer;
+    vector< PH_Request > requestContainer;
+
+    int sendProcessor = bcastProcessor;
+    int myid = GetCurrentProcessorID();
+    int number_of_processor = GetNumberOfProcessor();
+
+    if (myid == bcastProcessor)
+    {
+        sendDataBuffer.reserve(number_of_processor);
+        requestContainer.reserve(number_of_processor);
+
+        //! Step 1: Server sending.
+        for (int iProc = 0; iProc < number_of_processor; ++ iProc)
+        {
+            if (iProc == bcastProcessor) continue;
+
+            int receiveProcessor = iProc;
+
+            //! Allocate the buffers for sending and receiving.
+            T *sendBuffer = new T [nData];
+            sendDataBuffer.push_back(sendBuffer);
+
+            for (int iData = 0; iData < nData; ++ iData)
+            {
+                sendBuffer[iData] = data[iData];
+            }
+
+            //! Send the data to others.
+            requestContainer.push_back(MPI_REQUEST_NULL);
+            PHSPACE::PH_Send(sendBuffer, sizeof(T) * nData, receiveProcessor, tag, &requestContainer.back());
+        }
+    }
+    else
+    {
+        T *receivedBuffer = new T[nData];
+        receivedDataBuffer.push_back(receivedBuffer);
+
+        //! Receive the data from server.
+        requestContainer.push_back(MPI_REQUEST_NULL);
+        PHSPACE::PH_Receive(receivedBuffer, sizeof(T) * nData, sendProcessor, tag, &requestContainer.back());
+    }
+
+    //! Step2: MPI waiting for Non-blocking communications.
+    if (PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_Wait(static_cast<int>(requestContainer.size()), &(requestContainer[0]));
+    }
+
+    //! Step3: Translating.
+    if (myid != bcastProcessor)
+    {
+        T *receivedBuffer = receivedDataBuffer[0];
+        for (int iData = 0; iData < nData; ++ iData)
+        {
+            data[iData] = receivedBuffer[iData];
+        }
+    }
+
+    //! Step4: Free the buffers.
+    for (std::size_t iDim = 0; iDim < receivedDataBuffer.size(); ++ iDim)
+    {
+        delete receivedDataBuffer[iDim];
+    }
+    for (std::size_t iDim = 0; iDim < sendDataBuffer.size(); ++ iDim)
+    {
+        delete sendDataBuffer[iDim];
+    }
+
+    requestContainer.clear();
+    receivedDataBuffer.clear();
+    sendDataBuffer.clear();
+}
+
+}
+
+bool IsNeedNonBlockingCommunication(const ActionKey *actkey);
+
+template < typename T >
+void PHRead(DataContainer *dataContainer, T *field, int numberOfElements)
+{
+    dataContainer->read(field, numberOfElements * sizeof(T));
+}
+
+template < typename T >
+void PHRead(DataContainer *dataContainer, T *field, uint_t numberOfElements)
+{
+    dataContainer->read(field, numberOfElements * sizeof(T));
+}
+
+template < typename T >
+void PHRead(DataContainer *dataContainer, vector<T> &field, int numberOfElements)
+{
+    dataContainer->read(&field[0], numberOfElements * sizeof(T));
+}
+
+template < typename T >
+void PHRead(DataContainer *dataContainer, T &value)
+{
+    dataContainer->read(&value, sizeof(T));
+}
+
+template < typename T >
+void PHWrite(DataContainer *dataContainer, T &value)
+{
+    dataContainer->write(&value, sizeof(T));
+}
+
+template < typename T >
+void PHWrite(DataContainer *dataContainer, T *field, int numberOfElements)
+{
+    dataContainer->write(field, numberOfElements * sizeof(T));
+}
+
+template < typename T >
+void PHWrite(DataContainer *dataContainer, T *field, uint_t numberOfElements)
+{
+    dataContainer->write(field, numberOfElements * sizeof(T));
+}
+
+template < typename T >
+void PHWrite(DataContainer *dataContainer, vector<T> &field, int numberOfElements)
+{
+    PHWrite(dataContainer, &field[0], numberOfElements);
+}
+
+template < typename T >
+void PHRead(DataContainer *dataContainer, PHVector1D <T> &field, int numberOfElements)
+{
+    dataContainer->read(&field[0], numberOfElements * sizeof(T));
+}
+
+template < typename T >
+void PHRead(DataContainer *dataContainer, PHVector2D <T> &field2D, int numberOfElements)
+{
+    for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+    {
+        PHVector1D <T> &field = field2D[iElement];
+
+        int numberOfSubElements = 0;
+        PHRead(dataContainer, numberOfSubElements);
+
+        field.resize(numberOfSubElements);
+        PHRead(dataContainer, field, numberOfSubElements);
+    }
+}
+
+template < typename T >
+void PHRead(DataContainer *dataContainer, PHVector2D <T> &field2D, uint_t numberOfElements)
+{
+    for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+    {
+        PHVector1D <T> &field = field2D[iElement];
+
+        int numberOfSubElements = 0;
+        PHRead(dataContainer, numberOfSubElements);
+
+        field.resize(numberOfSubElements);
+        PHRead(dataContainer, field, numberOfSubElements);
+    }
+}
+
+template < typename T >
+void PHWrite(DataContainer *dataContainer, PHVector1D <T> &field, int numberOfElements)
+{
+    PHWrite(dataContainer, &field[0], numberOfElements);
+}
+
+template < typename T >
+void PHWrite(DataContainer *dataContainer, PHVector2D <T> &field2D, int numberOfElements)
+{
+    for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+    {
+        PHVector1D <T> &field = field2D[iElement];
+
+        int numberOfSubElements = field.size();
+        PHWrite(dataContainer, numberOfSubElements);
+        PHWrite(dataContainer, field, numberOfSubElements);
+    }
+}
+
+template < typename T >
+void PHWrite(DataContainer *dataContainer, PHVector2D <T> &field2D, uint_t numberOfElements)
+{
+    for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+    {
+        PHVector1D <T> &field = field2D[iElement];
+
+        int numberOfSubElements = static_cast<int>(field.size());
+        PHWrite(dataContainer, numberOfSubElements);
+        PHWrite(dataContainer, field, numberOfSubElements);
+    }
+}
+
+template < typename T >
+void ZeroField(T *field, uint_t numberOfElements)
+{
+    for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+    {
+        field[iElement] = T(0);
+    }
+}
+
+template < typename T >
+void ZeroField(T **field2D, uint_t numberOfEquations, uint_t numberOfElements)
+{
+    for (uint_t iEquation = 0; iEquation < numberOfEquations; ++ iEquation)
+    {
+        ZeroField(field2D[iEquation], numberOfElements);
+    }
+}
+
+template < typename T >
+void ZeroField(PHVector1D <T> &field, uint_t numberOfElements)
+{
+    ZeroField(&field[0], numberOfElements);
+}
+
+void StreamToActionKey(ActionKey *actkey, ostringstream &oss);
+void DataCharToString(DataContainer *cdata, string &str);
+
+int GetSendRecvTag(ActionKey *actkey, int iZone);
+int GetSendRecvTag(int tagKind, int index, int iZone);
+
+void PH_AllreduceSepMode(int *sendingBuffer, int *receivingBuffer, int numberOfElements, MPI_Datatype mpiDataType, PH_Op op);
+void PH_AllreduceSepMode(float *sendingBuffer, float *receivingBuffer, int numberOfElements, MPI_Datatype mpiDataType, PH_Op op);
+void PH_AllreduceSepMode(double *sendingBuffer, double *receivingBuffer, int numberOfElements, MPI_Datatype mpiDataType, PH_Op op);
+
+int PH_Reduce(int *sendbuf, int *recvbuf, int count, PH_Op op);
+int PH_Reduce(float *sendbuf, float *recvbuf, int count, PH_Op op);
+int PH_Reduce(double *sendbuf, double *recvbuf, int count, PH_Op op);
+
+void PH_CompareMaxMin(int &local_data, int flag);
+void PH_CompareMaxMin(RDouble &local_data, int flag);
+
+int PH_BarrierSepMode();
+}
diff --git a/API/FYMPI/include/Parallel.h b/API/FYMPI/include/Parallel.h
new file mode 100644
index 0000000..9954aeb
--- /dev/null
+++ b/API/FYMPI/include/Parallel.h
@@ -0,0 +1,124 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Parallel.h
+//! @brief     Explain this file briefly.
+//! @author    Bell, He Xin, Xu Qingxin.
+
+#pragma once
+#include "DataContainer.h"
+
+#ifdef PH_PARALLEL
+    #include "mpi.h"
+
+    typedef MPI_Request PH_Request;
+    typedef MPI_Op      PH_Op;
+
+    #define PH_REQUEST_NULL MPI_REQUEST_NULL
+    #define PH_MAX          MPI_MAX
+    #define PH_MIN          MPI_MIN
+    #define PH_SUM          MPI_SUM
+#else
+    typedef int PH_Request;
+    typedef int PH_Op;
+
+    #define PH_REQUEST_NULL 0
+    #define PH_MAX          0
+    #define PH_MIN          0
+    #define PH_SUM          0
+#endif
+
+using namespace std;
+
+namespace PHSPACE
+{
+int  PH_Init();
+int  PH_Init(int &argc, char ***argv);
+void PH_Rank(int &rank);
+void PH_Size(int &size);
+void PH_Finalize();
+
+void PH_GetProcessorName(string &proc_name);
+
+//! Non-blocking standard send process of MPICH.
+//! @param[in] data    address of the send buffer.
+//! @param[in] size    size of the send buffer.
+//! @param[in] to      the send target process number.
+//! @param[in] tag     information tag.
+void PH_Send(void *data, int size, int to, int tag);
+
+//! Non-blocking standard receive process of MPICH.
+//! @param[in] data    address of the receive buffer.
+//! @param[in] size    size of the receive buffer.
+//! @param[in] to      the receive source process number.
+//! @param[in] tag     information tag.
+void PH_Receive(void *data, int size, int from, int tag);
+int  PH_Receive(void *data, int size, int tag);
+//!
+void PH_SendString(string &cs, int proc, int tag);
+void PH_ReceiveString(string &cs, int proc, int tag);
+
+//! Non-blocking standard send process of MPICH.
+//! @param[in] data    address of the send buffer.
+//! @param[in] size    size of the send buffer.
+//! @param[in] to      the send target process number.
+//! @param[in] tag     information tag.
+//! @param[in] request PH_Request pointer, communication object handle.
+int PH_Send(void *data, int size, int to, int tag, PH_Request *request);
+
+//! Non-blocking standard receive process of MPICH.
+//! @param[in] data    address of the receive buffer.
+//! @param[in] size    size of the receive buffer.
+//! @param[in] from    the receive source process number.
+//! @param[in] tag     information tag.
+//! @param[in] request PH_Request pointer, communication object handle.
+int PH_Receive(void *data, int size, int from, int tag, PH_Request *request);
+
+//! Non-blocking completed communication process of MPICH.
+//! @param[in] request    PH_Request pointer, communication object handle.
+//! @param[in] count      number of communication objects to be completed.
+int PH_Wait(PH_Request *request);
+int PH_Wait(int count, PH_Request *array_of_requests);
+
+//! Global reduction operation of MPICH.
+//! @param[in] sendbuf    address of the send buffer.
+//! @param[in] recvbuf    address of the receive buffer.
+//! @param[in] count      number of communication objects to be reduced.
+//! @param[in] op         reduction operation handle.
+int PH_AllReduce(void   *sendbuf, void   *recvbuf, int count, PH_Op op);
+int PH_AllReduce(double *sendbuf, double *recvbuf, int count, PH_Op op);
+int PH_AllReduce(float  *sendbuf, float  *recvbuf, int count, PH_Op op);
+int PH_AllReduce(int    *sendbuf, int    *recvbuf, int count, PH_Op op);
+
+int PH_AllGather(int *sendbuf, int sendcount, int *recvbuf, int recvcount);
+
+//int PH_Reduce(void *sendbuf, void *recvbuf, int count, PH_Op op, int root);
+int PH_Barrier();
+
+//!
+int PH_Gatherv(void *sendBuffer, int sendCount, void *receiveBuffer, int *receiveCount, int *displs, int root);
+
+//!
+void send(DataChar *dataChar, int to, int tag);
+void send(DataChar *dataChar, int to, vector<PH_Request> &requestContainer, int tag);
+void receive(DataChar *dataChar, int from, int tag);
+void receive(DataChar *dataChar, int from, vector<PH_Request> &requestContainer, int tag);
+
+//!
+void send(DataContainer *dataContainer, int to, int tag);
+void send(DataContainer *dataContainer, int to, streamsize nlen, int tag);
+void send(DataContainer *dataContainer, int to, streamsize nlen, vector<PH_Request> &requestContainer, int tag);
+
+//!
+void receive(DataContainer *dataContainer, int from, int tag);
+void receive(DataContainer *dataContainer, int from, CharVecSizeType nlen, int tag);
+void receive(DataContainer *dataContainer, int from, CharVecSizeType nlen, vector<PH_Request> &requestContainer, int tag);
+}
diff --git a/API/FYMPI/src/ActionKey.cpp b/API/FYMPI/src/ActionKey.cpp
new file mode 100644
index 0000000..2151979
--- /dev/null
+++ b/API/FYMPI/src/ActionKey.cpp
@@ -0,0 +1,91 @@
+#include "ActionKey.h"
+using namespace std;
+
+namespace PHSPACE
+{
+const char * ActionName[NofValidAction] =
+{
+    "READ_RESTART",
+    "BUILD_WALL_STRUCT",
+    "CALC_WALL_DIST",
+    "FILL_WALL_STRUCT",
+    "READ_WALL_DIST",
+    "WRITE_WALL_DIST",
+    "DUMP_RESTART",
+    "UPDATE_INTERFACE_DATA",
+    "UPLOAD_INTERFACE_DATA",
+    "DOWNLOAD_INTERFACE_DATA",
+    "UPDATE_INTERPOINT_DATA",
+    "UPLOAD_INTERPOINT_DATA",
+    "DOWNLOAD_INTERPOINT_DATA",
+    "UPDATE_OVERSET_DATA",
+    "UPLOAD_OVERSET_DATA",
+    "DOWNLOAD_OVERSET_DATA",
+    "DUMP_COMPONENT_AIR_FORCE_COEF",
+    "DUMP_AIR_FORCE_COEF",
+    "DUMP_CP_DISTRI",
+    "VISUALIZATION",
+    "DUMP_RESIDUAL",
+    "ALLOCATEINTERFACE",
+    "COMPUTEMETRICS",
+    "COMMCELLCENTERDATA",
+    "COMMCELLIBLANK",
+    "ALLOCATE_WALL_DIST",
+    "TEST_RECONSTRUCTION",
+    "TEST_INTERFACE",
+    "SIMPLE_ACTION",
+    "SHOW_VISTMAX",
+    "INIT_FIRST",
+    "INIT_SECOND",
+    "INIT_FINAL",
+    "DUMP_AVERAGE_FLOW",
+    "READ_AVERAGE_FLOW",
+    "VISUALIZATION_AVERAGE_FLOW",
+    "DUMP_SURFACE_INFO",
+    "DUMP_PROBES_FLOW",
+    "DUMP_HEATFLUX",
+    "COMPUTE_AERODYNAMIC_FORCE"
+};
+
+ActionKey::ActionKey()
+{
+    data    = new DataContainer();
+    tecdata = new DataContainer();
+
+    action    = 0;
+    subact    = 0;
+    solver    = 0;
+    solverID  = 0;
+    level     = 0;
+    ipos      = 0;
+    kind      = 0;
+    filepos   = 0;
+    format    = 0;
+    file      = 0;
+    del_file  = false;
+    VTKvisual = false;
+    openmode  = ios_base::out;
+    filename  = "";
+    tecfilename = "";
+    taskname  = "";
+}
+
+ActionKey::~ActionKey()
+{
+    delete data;    data = NULL;
+    delete tecdata;    tecdata = NULL;
+}
+
+ActionKey *currentActionKey = 0;
+
+void SetCurrentActionKey(ActionKey *currentActionKeyIn)
+{
+    currentActionKey = currentActionKeyIn;
+}
+
+ActionKey * GetCurrentActionKey()
+{
+    return currentActionKey;
+}
+
+}
diff --git a/API/FYMPI/src/PHMpi.cpp b/API/FYMPI/src/PHMpi.cpp
new file mode 100644
index 0000000..9b424f8
--- /dev/null
+++ b/API/FYMPI/src/PHMpi.cpp
@@ -0,0 +1,1940 @@
+#ifdef PH_PARALLEL
+    #include "mpi.h"
+#endif
+
+#include <stack>
+#include "PHMpi.h"
+#include "Constants.h"
+#include "Math_BasisFunction.h"
+#include "GlobalDataBase.h"
+
+using namespace std;
+
+#pragma warning (disable:913)
+namespace PHSPACE
+{
+
+namespace PHMPI
+{
+//! Kernel Global Variables.
+//! To control the whole PHengLEI software architecture,
+//! especially for parallel computational.
+//! The zones (grid blocks are including) information is defined here.
+//! -# myID               :  Index of the current processor.
+//! -# numberOfProcessor  :  The total number of processors used by this procedure.
+//! -# server             :  Index of the server processor, default 0.
+//! -# nZones             :  The total number of global zones that used in parallel approach.
+//!                          It is equal to the sum of zones in all processors.
+//! Zones lay out information:
+//! -# block_proc :  The processor index of each zone(grid).
+//! -# block_type :  The grid type of each zone(grid), structured or unstructured.
+//! -# block_idx  :  The zone(block) index of each zone(grid).
+//! -# block_file :  The processor index that manage data in each zone(grid).
+int csmode     = 0;    // Initialization()
+
+int server     = 0;    // Initialization()
+int myID       = 0;    // Initialization()
+int gridServer = 0;
+int nZones     = 0;     //! The number of global zones.
+
+//! Some special zones information for HYBRID SOLVER.
+int *nZones_in_proc = 0;    // Initialization()
+
+VVInt zone_over_link;
+
+int numberOfProcessor          = 1;    // Initialization()
+int numberOfGridProcessor      = 0;
+int numberOfZonesInThisProcess = 0;
+int numberofFiles              = 0;    // Initialization()
+
+int *block_proc = NULL;               // Initialization()
+int *block_proc_grid = NULL;
+int *block_type = NULL;               // Initialization()
+int *block_idx  = NULL;               // Initialization()
+int *block_file = NULL;
+int *block_proc_inp = NULL;           // Initialization()
+
+int *block_proc_dump = NULL;
+
+int *block_group = NULL;
+
+//! Is current processor is file processor:
+//! -#  -1: has not been judged.
+//! -#  0 : no.
+//! -#  1 : yes.
+int isFileServer = -1;
+
+//! zoneDistributionMethod: zone block distribution method, default 0.
+//! -# 0 : each zone is assigned to the one that defined in grid partition procedure.
+//! -# 1 : random assigned for each zone or by some else ways.
+int zoneDistributionMethod = 0;
+
+vector<int> *localZoneIDToGlobalZoneID = NULL;
+
+//! Processor tree.
+PHProcessorTree *processorTree = NULL;
+PHProcessorTree *processorTreeForAllProcessor  = NULL;
+PHProcessorTree *processorTreeForGridProcessor = NULL;
+
+int numberOfProcessorStructgridUsed = 0;
+
+int *zoneStartPointContainer = NULL;
+int *zoneStartCenterContainer = NULL;
+
+DataStruct_BinaryTree *binaryTree = NULL;
+
+void Initialization()
+{
+    myID       = 0;
+    server     = 0;
+    nZones_in_proc = 0;
+    block_proc = 0;
+    block_type = 0;
+    block_idx  = 0;
+    block_proc_inp = 0;
+
+    //! Default model.
+    csmode     = 0;
+
+#ifdef PH_PARALLEL
+    int argc = 0;
+    char ***argv = 0;
+
+    PH_Init(argc, argv);
+    PH_Rank(myID);
+
+    int numberOfProcessorTmp;
+    PH_Size(numberOfProcessorTmp);
+    SetNumberOfProcessor(numberOfProcessorTmp);
+    PHMPI::BuildProcessorTree();
+    string proc_name;
+    PH_GetProcessorName(proc_name);
+
+    ostringstream oss;
+    oss << "Process " << myID << " numberOfProcessor = " << numberOfProcessorTmp << " name = " << proc_name << endl;
+
+    if (GetCurrentProcessorID() == server)
+    {
+        std::cout << oss.str();
+    }
+
+    oss.clear();
+    oss.str("");
+
+    PHMPI::SetNumberofFiles(1);
+#endif
+}
+
+void SetServerProcessorID(int serverId)
+{
+    server = serverId;
+}
+
+void SetGridServerProcessorID(int serverId)
+{
+    gridServer = serverId;
+}
+
+LIB_EXPORT void SetNumberOfGlobalZones(int nblock)
+{
+    nZones = nblock;
+}
+
+int GetParallelStrategy()
+{
+    return PHSPACE::GlobalDataBase::GetIntParaFromDB("parallelStrategy");
+}
+
+void SetParallelStrategy(int parallelStrategy)
+{
+    PHSPACE::GlobalDataBase::UpdateData("parallelStrategy", &parallelStrategy, PHINT, 1);
+}
+
+void SetNumberOfProcessor(int nproc)
+{
+    numberOfProcessor = nproc;
+}
+
+void SetNumberOfGridProcessor(int nproc)
+{
+    numberOfGridProcessor = nproc;
+}
+
+LIB_EXPORT void SetNumberofLocalZones(int nblock)
+{
+    numberOfZonesInThisProcess = nblock;
+}
+
+void SetNumberofFiles(int fileNumber)
+{
+    numberofFiles = fileNumber;
+}
+
+LIB_EXPORT void SetZoneProcessorID(int iZone, int id)
+{
+    block_proc[iZone] = id;
+}
+
+void SetZoneProcessID_INP(int *data)
+{
+    block_proc_inp = data;
+}
+
+void SetIsFileServer(int isServer)
+{
+    isFileServer = isServer;
+}
+
+void SetZoneDistributionMethod(int method)
+{
+    zoneDistributionMethod = method;
+}
+
+void InsertGlobalZones(int globalZoneID)
+{
+    if (!localZoneIDToGlobalZoneID)
+    {
+        localZoneIDToGlobalZoneID = new vector <int>;
+    }
+
+    localZoneIDToGlobalZoneID->push_back(globalZoneID);
+}
+
+void BuildProcessorTree()
+{
+    int numberOfOriginalProcessor = GetNumberOfProcessor();
+    RDouble start = 0.0;
+    RDouble end = static_cast<RDouble>(numberOfOriginalProcessor);
+
+    int dim = 1;
+    processorTree = new PHProcessorTree(dim, &start, &end);
+
+    for (int iProc = 0; iProc < numberOfOriginalProcessor; ++ iProc)
+    {
+        RDouble coord = static_cast<RDouble>(iProc);
+        PHProcessorNode *node = new PHProcessorNode(dim, &coord, iProc);
+        processorTree->AddNode(node);
+    }
+
+    int numberOfGridProcessorTmp  = GetNumberOfGridProcessor();
+    int numberOfTotalProcessor = numberOfGridProcessorTmp + numberOfOriginalProcessor;
+
+    if (numberOfGridProcessorTmp == 0)
+    {
+        processorTreeForAllProcessor  = processorTree;
+        processorTreeForGridProcessor = processorTree;
+        return;
+    }
+
+    //! processorTreeForAllProcessor.
+    start = 0;
+    end = numberOfTotalProcessor;
+    processorTreeForAllProcessor = new PHProcessorTree(dim, &start, &end);
+
+    for (int iProc = 0; iProc < numberOfTotalProcessor; ++ iProc)
+    {
+        RDouble coord = static_cast<RDouble>(iProc);
+        PHProcessorNode *node = new PHProcessorNode(dim, &coord, iProc);
+        processorTreeForAllProcessor->AddNode(node);
+    }
+
+    //! processorTreeForGridProcessor.
+    start = 0;
+    end = numberOfGridProcessorTmp;
+    processorTreeForGridProcessor = new PHProcessorTree(dim, &start, &end);
+
+    for (int iProc = 0; iProc < numberOfGridProcessorTmp; ++ iProc)
+    {
+        RDouble coord = static_cast<RDouble>(iProc);
+        int item = iProc + numberOfOriginalProcessor;
+
+        PHProcessorNode *node = new PHProcessorNode(dim, &coord, item);
+        processorTreeForGridProcessor->AddNode(node);
+    }
+}
+
+void SetNumberOfProcStructUsed(int number)
+{
+    numberOfProcessorStructgridUsed = number;
+}
+
+int GetServerProcessorID()
+{
+    return server;
+}
+
+LIB_EXPORT int GetCurrentProcessorID()
+{
+    return myID;
+}
+
+int GetGridServerProcessorID()
+{
+    return gridServer;
+}
+
+LIB_EXPORT int GetNumberofGlobalZones()
+{
+    return nZones;
+}
+
+int * GetNZonesInProcessor()
+{
+    return nZones_in_proc;
+}
+
+LIB_EXPORT int GetNumberOfProcessor()
+{
+    return numberOfProcessor;
+}
+
+LIB_EXPORT int GetNumberOfGridProcessor()
+{
+    return numberOfGridProcessor;
+}
+
+LIB_EXPORT int GetNumberofLocalZones()
+{
+    return numberOfZonesInThisProcess;
+}
+
+LIB_EXPORT int GetNumberofFiles()
+{
+    return numberofFiles;
+}
+
+LIB_EXPORT int * GetZoneProcessorID()
+{
+    return block_proc;
+}
+
+LIB_EXPORT int GetZoneProcessorID(int iZone)
+{
+    return block_proc[iZone];
+}
+
+LIB_EXPORT int * GetZoneProcessorIDForGrid()
+{
+    return block_proc_grid;
+}
+
+LIB_EXPORT int GetZoneProcessorIDForGrid(int iZone)
+{
+    return block_proc_grid[iZone];
+}
+
+LIB_EXPORT int * GetZoneGridType()
+{
+    return block_type;
+}
+
+LIB_EXPORT int GetZoneGridType(int iZone)
+{
+    return block_type[iZone];
+}
+
+LIB_EXPORT int * GetZoneGridID()
+{
+    return block_idx;
+}
+
+LIB_EXPORT int * GetZoneFileID()
+{
+    return block_file;
+}
+
+LIB_EXPORT int GetZoneFileID(int iZone)
+{
+    return block_file[iZone];
+}
+
+LIB_EXPORT int * GetZoneProcessorID_INP()
+{
+    return block_proc_inp;
+}
+
+LIB_EXPORT int * GetZoneProcessorIDDump()
+{
+    return block_proc_dump;
+}
+
+LIB_EXPORT int * GetZoneGroupID()
+{
+    return block_group;
+}
+
+LIB_EXPORT int GetZoneDistributionMethod()
+{
+    return zoneDistributionMethod;
+}
+
+LIB_EXPORT int GetLocalZoneIDToGlobalZoneID(int localZoneID)
+{
+    if (!localZoneIDToGlobalZoneID)
+    {
+        ostringstream oss;
+        oss << "  Error: this situation has not been considered, for " << "local zone ID" << " = " << localZoneID << endl;
+
+        PHMPI::FreeBlockData();
+        cout << oss.str() << endl;
+        MPI_Abort(MPI_COMM_WORLD, -1);
+    }
+
+    return (*localZoneIDToGlobalZoneID)[localZoneID];
+}
+
+LIB_EXPORT int GetGlobalZoneIDToLocalZoneID(int globalZoneIndex)
+{
+    int localZoneIndex = -1;
+
+    int numberOfZones = PHMPI::GetNumberofLocalZones();
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        if (GetLocalZoneIDToGlobalZoneID(iZone) == globalZoneIndex)
+        {
+            localZoneIndex = iZone;
+            break;
+        }
+    }
+
+    if (localZoneIndex == -1)
+    {
+        cout << "Error: Could not find out the local zone index !" << endl;
+    }
+
+    return localZoneIndex;
+}
+
+
+int GetNumberOfProcStructUsed()
+{
+    return numberOfProcessorStructgridUsed;
+}
+
+void CreateZoneProcessorID(int nZonesTmp)
+{
+    if (block_proc)
+    {
+        delete [] block_proc;
+        //cout << "  Warning: block_proc array has been created, it would be deleted here !\n";
+    }
+    block_proc = new int [nZonesTmp];
+
+    if (block_proc_grid)
+    {
+        delete [] block_proc_grid;
+        //cout << "  Warning: block_proc array has been created, it would be deleted here !\n";
+    }
+    block_proc_grid = new int [nZonesTmp];
+}
+
+void CreatetZoneProcessorID_INP(int nZonesTmp)
+{
+    if (block_proc_inp)
+    {
+        delete [] block_proc_inp;
+        //cout << "  Warning: block_proc_inp array has been created, it would be deleted here !\n";
+    }
+
+    block_proc_inp = new int [nZonesTmp];
+}
+
+void CreateZoneGridID(int nZonesTmp)
+{
+    if (block_idx)
+    {
+        delete [] block_idx;
+        //cout << "  Warning: block_idx array has been created, it would be deleted here !\n";
+    }
+    block_idx = new int [nZonesTmp];
+}
+
+void CreateZoneGridType(int nZonesTmp)
+{
+    if (block_type)
+    {
+        delete [] block_type;
+        //cout << "  Warning: block_type array has been created, it would be deleted here !\n";
+    }
+
+    block_type = new int [nZonesTmp];
+}
+
+void CreateZoneFileID(int nZonesTmp)
+{
+    if (block_file)
+    {
+        delete [] block_file;
+        //cout << "  Warning: block_file array has been created, it would be deleted here !\n";
+    }
+
+    block_file = new int [nZonesTmp];
+}
+
+void CreateZoneProcessorIDDump(int nZonesTmp)
+{
+    if (block_proc_dump)
+    {
+        delete [] block_proc_dump;
+        //cout << "Warning: CreateZoneProcessorIDDumphas been created, it would be deleted here !\n";
+    }
+    block_proc_dump = new int [nZonesTmp];
+}
+
+void CreateZoneGroupID(int nZonesTmp)
+{
+    if (block_group)
+    {
+        delete [] block_group;
+        //cout << "Warning: CreateZoneGroupID has been created, it would be deleted here !\n";
+    }
+    block_group = new int [nZonesTmp];
+}
+
+void FreeBlockData()
+{
+    if (block_proc)
+    {
+        delete [] block_proc;
+    }
+    block_proc = NULL;
+
+    if (block_type)
+    {
+        delete [] block_type;
+    }
+    block_type = NULL;
+
+    if (block_idx)
+    {
+        delete [] block_idx;
+    }
+    block_idx = NULL;
+
+    if (block_file)
+    {
+        delete [] block_file;
+    }
+    block_file = NULL;
+
+    if (block_proc_inp)
+    {
+        delete [] block_proc_inp;
+    }
+    block_proc_inp = NULL;
+
+    if (nZones_in_proc)
+    {
+        delete [] nZones_in_proc;
+    }
+    nZones_in_proc = NULL;
+
+    if (block_proc_dump)
+    {
+        delete [] block_proc_dump;
+    }
+    block_proc_dump = NULL;
+
+    if (localZoneIDToGlobalZoneID)
+    {
+        delete localZoneIDToGlobalZoneID;
+    }
+    localZoneIDToGlobalZoneID = NULL;
+}
+
+void CreateZoneStartPointContainer(int nZonesTmp)
+{
+    using namespace PHMPI;
+
+    zoneStartPointContainer = new int [nZonesTmp];
+}
+
+int *GetZoneStartPointContainer()
+{
+    return zoneStartPointContainer;
+}
+
+void DeleteZoneStartPointContainer()
+{
+    delete [] zoneStartPointContainer;
+    zoneStartPointContainer = NULL;
+}
+
+void CreateZoneStartCenterContainer(int nZonesTmp)
+{
+    using namespace PHMPI;
+
+    zoneStartCenterContainer = new int [nZonesTmp];
+}
+
+int * GetZoneStartCenterContainer()
+{
+    return zoneStartCenterContainer;
+}
+
+void DeleteZoneStartCenterContainer()
+{
+    delete [] zoneStartCenterContainer;
+    zoneStartCenterContainer = NULL;
+}
+
+void GenerateGlobalBinaryTree(int *zoneStartPointContainerTmp, int nZonesTmp, int numberOfPoints)
+{
+    binaryTree = new DataStruct_BinaryTree(zoneStartPointContainerTmp, nZonesTmp, numberOfPoints);
+    return;
+}
+
+int GetZoneIndexAccordingToGlobalPointLabel(int globalPointLabel)
+{
+    return binaryTree->ComputeZoneLabel(globalPointLabel);
+}
+
+void DeleteGlobalBinaryTree()
+{
+    if (binaryTree)
+    {
+        delete binaryTree;    binaryTree = NULL; 
+    }
+    return;
+}
+
+LIB_EXPORT bool IsParallelRun()
+{
+    return numberOfProcessor > 1;
+}
+
+LIB_EXPORT bool CurrentProcessorIsGridProcessor()
+{
+    int numberOfTotalProcessor = numberOfProcessor + numberOfGridProcessor;
+
+    if (myID >= numberOfProcessor && myID < numberOfTotalProcessor)
+    {
+        return true;
+    }
+    else
+    {
+        return false;
+    }
+}
+
+LIB_EXPORT int GetIntervalofProcessorFiles()
+{
+    return PHMPI::GetNumberOfProcessor() / PHMPI::GetNumberofFiles();
+}
+
+LIB_EXPORT int GetFileIndexofCurrentProcessor()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    int fileProcessorInterval = PHMPI::GetIntervalofProcessorFiles();
+    int fileID = currentProcessorIndex / fileProcessorInterval;
+    return fileID;
+}
+
+LIB_EXPORT int GetZoneProcessorIDSepMode(int iZone)
+{
+    if (CurrentProcessorIsGridProcessor())
+    {
+        return block_proc_grid[iZone];
+    }
+    else
+    {
+        return block_proc[iZone];
+    }
+}
+
+LIB_EXPORT void GetSendRecvProc(int iZone, int &sendProcessor, int &recvProcessor)
+{
+    sendProcessor = block_file[iZone];
+    recvProcessor = block_proc[iZone];
+}
+
+int GetServerSepMode()
+{
+    if (CurrentProcessorIsGridProcessor())
+    {
+        return gridServer;
+    }
+    else
+    {
+        return server;
+    }
+}
+
+LIB_EXPORT int * GetZoneProcessorIDSepMode()
+{
+    if (CurrentProcessorIsGridProcessor())
+    {
+        return block_proc_grid;
+    }
+    else
+    {
+        return block_proc;
+    }
+}
+
+LIB_EXPORT void GetFileProc(int &file_proc)
+{
+    if (!IsParallelRun())
+    {
+        file_proc = server;
+        if (myID == PHMPI::GetServerProcessorID())
+        {
+            SetIsFileServer(1);
+        }
+    }
+    else
+    {
+        //file_proc = myID;
+        if (!block_file)
+        {
+            //! The file_proc has not been initialized.
+            file_proc = myID;
+            SetIsFileServer(1);
+        }
+        else
+        {
+            //! The file_proc has been initialized.
+            file_proc = -1;
+            for (int iZone = 0; iZone < nZones; ++ iZone)
+            {
+                if (block_file[iZone] == myID)
+                {
+                    file_proc = myID;
+                    break;
+                }
+            }
+
+            if (file_proc == -1)
+            {
+                SetIsFileServer(0);
+            }
+            else
+            {
+                SetIsFileServer(1);
+            }
+        }
+    }
+}
+
+LIB_EXPORT int IsCurrentProcessorFileServer()
+{
+    if (isFileServer >= 0)
+    {
+        return isFileServer;
+    }
+    else
+    {
+        int fileProcessorIndex;
+        GetFileProc(fileProcessorIndex);
+
+        if (GetCurrentProcessorID() == fileProcessorIndex)
+            return 1;
+        else
+            return 0;
+    }
+}
+
+void PH_Read(fstream &file, void *data, int size, int proc)
+{
+    if (myID == proc)
+    {
+        PH_Read(file, data, size);
+    }
+}
+
+void PH_Read(fstream &file, void *data, int size)
+{
+    file.read(reinterpret_cast<char*>(data), size);
+}
+
+void PH_ReadBcastInteger(fstream &file, void *data, int size, int proc)
+{
+    PH_Read_Bcast(file, data, size * sizeof(int), proc);
+}
+
+void PH_ReadBcastDouble(fstream &file, void *data, int size, int proc)
+{
+    PH_Read_Bcast(file, data, size * sizeof(double), proc);
+}
+
+void PH_Read_Bcast(fstream &file, void *data, int size, int proc)
+{
+    PH_Read(file, data, size, proc);
+
+    PH_Bcast(data, size, proc);
+}
+
+void PH_BcastToClinet(void *data, int size, int proc, int key, int tag)
+{
+    int numberOfOriginalProcessor = GetNumberOfProcessor();
+    int numberOfGridProcessorTmp     = GetNumberOfGridProcessor();
+
+    int numberOfProcessorTmp = numberOfOriginalProcessor;
+    int startProcessor = 0;
+
+    //! 0: to original processors; 1: to grid processors; 2: to all processors.
+    if (key == 0)
+    {
+        numberOfProcessorTmp = numberOfOriginalProcessor;
+        startProcessor = 0;
+    }
+    else if (key == 1)
+    {
+        numberOfProcessorTmp = numberOfOriginalProcessor + numberOfGridProcessorTmp;
+        startProcessor = numberOfOriginalProcessor;
+    }
+    else if (key == 2)
+    {
+        numberOfProcessorTmp = numberOfOriginalProcessor + numberOfGridProcessorTmp;
+        startProcessor = 0;
+    }
+
+    bool keyReceive = true;
+
+    if (key == 0 && myID >= numberOfOriginalProcessor)
+    {
+        keyReceive = false;
+    }
+
+    if (key == 1 && myID < numberOfOriginalProcessor)
+    {
+        keyReceive = false;
+    }
+
+    if (myID == proc)
+    {
+        for (int i = startProcessor; i < numberOfProcessorTmp; ++ i)
+        {
+            if (i == proc) continue;
+            PHSPACE::PH_Send(data, size, i, tag);
+        }
+    }
+    else
+    {
+        if (keyReceive)
+        {
+            PHSPACE::PH_Receive(data, size, proc, tag);
+        }
+    }
+}
+
+void PH_BcastSepMode(void *data, int size, int proc, int tag)
+{
+    int startProcessor = 0;
+    int endProcessor = GetNumberOfProcessor();
+
+    if (CurrentProcessorIsGridProcessor())
+    {
+        startProcessor = GetNumberOfProcessor();
+        endProcessor = startProcessor + GetNumberOfGridProcessor();
+    }
+
+    if (myID == proc)
+    {
+        for (int i = startProcessor; i < endProcessor; ++ i)
+        {
+            if (i == proc) continue;
+            PHSPACE::PH_Send(data, size, i, tag);
+        }
+    }
+    else
+    {
+        PHSPACE::PH_Receive(data, size, proc, tag);
+    }
+}
+
+void PH_Bcast(void *data, int size, int proc, int tag)
+{
+    if (myID == proc)
+    {
+        int numberOfProcessorTmp = GetNumberOfProcessor();
+        for (int i = 0; i < numberOfProcessorTmp; ++ i)
+        {
+            if (i == proc)
+            {
+                continue;
+            }
+            PHSPACE::PH_Send(data, size, i, tag);
+        }
+    }
+    else
+    {
+        PHSPACE::PH_Receive(data, size, proc, tag);
+    }
+}
+
+void PH_Bcast(DataContainer *cdata, int proc, int tag)
+{
+    if (myID == proc)
+    {
+        int numberOfProcessorTmp = GetNumberOfProcessor();
+        for (int i = 0; i < numberOfProcessorTmp; ++ i)
+        {
+            if (i == proc)
+            {
+                continue;
+            }
+            send(cdata, i, tag);
+        }
+    }
+    else
+    {
+        receive(cdata, proc, tag);
+    }
+}
+
+void PH_BcastByServer(DataContainer *cdata, int tag)
+{
+    queue <PHProcessorNode *> nodeQueue;
+    PHProcessorNode *start = processorTree->GetRoot();
+
+    if (!start)
+    {
+        return;
+    }
+
+    if (start->GetData() != GetServerProcessorID())
+    {
+        ostringstream oss;
+        oss << "\n";
+        oss << "++++++++++++++++++  StopProgram Information  +++++++++++++++++++++++++++\n";
+        oss <<  "Error: the server should be processor 0!" << "\n";
+        oss << " The stop filename is : " << __FILE__ << "\n";
+        oss << " at line " << __LINE__ << "\n";
+        oss << " Compiled On line " << __DATE__ << " at " << __TIME__ << "\n";
+        oss << "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++\n";
+
+        PHMPI::FreeBlockData();
+        cout << oss.str() << endl;
+        MPI_Abort(MPI_COMM_WORLD, -1);
+    }
+
+    nodeQueue.push(start);
+    while (!nodeQueue.empty())
+    {
+        start = nodeQueue.front();
+        nodeQueue.pop();
+
+        int sendProcessor = start->GetData();
+
+        if (start->left)
+        {
+            nodeQueue.push(start->left);
+            int recvProcessor = start->left->GetData();
+
+            if (sendProcessor != recvProcessor)
+            {
+                if (myID == sendProcessor)
+                {
+                    send(cdata, recvProcessor, tag);
+                }
+                if (myID == recvProcessor)
+                {
+                    receive(cdata, sendProcessor, tag);
+                }
+            }
+        }
+
+        if (start->right)
+        {
+            nodeQueue.push(start->right);
+
+            int recvProcessor = start->right->GetData();
+
+            if (sendProcessor != recvProcessor)
+            {
+                if (myID == sendProcessor)
+                {
+                    send(cdata, recvProcessor, tag);
+                }
+                if (myID == recvProcessor)
+                {
+                    receive(cdata, sendProcessor, tag);
+                }
+            }
+        }
+    }
+}
+
+void PH_GatherByServer(DataContainer *cdata, int tag)
+{
+    stack <PHProcessorNode *> nodeStack;
+    PHProcessorNode *start = processorTree->GetRoot();
+    PHProcessorNode *cur = start, *pre = NULL;
+    if (!start)
+    {
+        return;
+    }
+
+    if (start->GetData() != GetServerProcessorID())
+    {
+        ostringstream oss;
+        oss << "\n";
+        oss << "++++++++++++++++++  StopProgram Information  +++++++++++++++++++++++++++\n";
+        oss <<  "Error: the server should be processor 0!" << "\n";
+        oss << " The stop filename is : " << __FILE__ << "\n";
+        oss << " at line " << __LINE__ << "\n";
+        oss << " Compiled On line " << __DATE__ << " at " << __TIME__ << "\n";
+        oss << "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++\n";
+
+        PHMPI::FreeBlockData();
+        cout << oss.str() << endl;
+        MPI_Abort(MPI_COMM_WORLD, -1);
+    }
+
+    nodeStack.push(start);
+
+    while (!nodeStack.empty())
+    {
+        cur = nodeStack.top();
+
+        int recvProcessor = cur->GetData();
+
+        if ((cur->left == NULL && cur->right == NULL) || ((pre == cur->left || pre == cur->right) && pre != NULL))
+        {
+            nodeStack.pop();
+            pre = cur;
+        } 
+        else
+        {
+            if (cur->right)
+            {
+                nodeStack.push(cur->right);
+                int sendProcessor = cur->right->GetData();
+
+                if (sendProcessor != recvProcessor)
+                {
+                    if (myID == sendProcessor)
+                    {
+                        send(cdata, recvProcessor, tag);
+                    }
+                    if (myID == recvProcessor)
+                    {
+                        receive(cdata, sendProcessor, tag);
+                    }
+                }
+            }
+            if (cur->left)
+            {
+                nodeStack.push(cur->left);
+                int sendProcessor = cur->right->GetData();
+
+                if (sendProcessor != recvProcessor)
+                {
+                    if (myID == sendProcessor)
+                    {
+                        send(cdata, recvProcessor, tag);
+                    }
+                    if (myID == recvProcessor)
+                    {
+                        receive(cdata, sendProcessor, tag);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void PH_BcastByServerSepMode(DataContainer *cdata, int tag)
+{
+    queue <PHProcessorNode *> nodeQueue;
+
+    PHProcessorNode *start = processorTree->GetRoot();
+
+    if (CurrentProcessorIsGridProcessor())
+    {
+        start = processorTreeForGridProcessor->GetRoot();
+    }
+
+    if (!start)
+    {
+        return;
+    }
+
+    if (start->GetData() != GetServerSepMode())
+    {
+        ostringstream oss;
+        oss << "\n";
+        oss << "++++++++++++++++++  StopProgram Information  +++++++++++++++++++++++++++\n";
+        oss <<  "Error: the server should be processor 0!" << "\n";
+        oss << " The stop filename is : " << __FILE__ << "\n";
+        oss << " at line " << __LINE__ << "\n";
+        oss << " Compiled On line " << __DATE__ << " at " << __TIME__ << "\n";
+        oss << "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++\n";
+
+        PHMPI::FreeBlockData();
+        cout << oss.str() << endl;
+        MPI_Abort(MPI_COMM_WORLD, -1);
+    }
+
+    nodeQueue.push(start);
+    while (!nodeQueue.empty())
+    {
+        start = nodeQueue.front();
+        nodeQueue.pop();
+
+        int sendProcessor = start->GetData();
+
+        if (start->left)
+        {
+            nodeQueue.push(start->left);
+            int recvProcessor = start->left->GetData();
+
+            if (sendProcessor != recvProcessor)
+            {
+                if (myID == sendProcessor)
+                {
+                    send(cdata, recvProcessor, tag);
+                }
+                if (myID == recvProcessor)
+                {
+                    receive(cdata, sendProcessor, tag);
+                }
+            }
+        }
+
+        if (start->right)
+        {
+            nodeQueue.push(start->right);
+
+            int recvProcessor = start->right->GetData();
+
+            if (sendProcessor != recvProcessor)
+            {
+                if (myID == sendProcessor)
+                {
+                    send(cdata, recvProcessor, tag);
+                }
+                if (myID == recvProcessor)
+                {
+                    receive(cdata, sendProcessor, tag);
+                }
+            }
+        }
+    }
+}
+
+void PH_BcastByServerToClinet(DataContainer *cdata, int key, int tag)
+{
+    queue <PHProcessorNode *> nodeQueue;
+
+    PHProcessorNode *start = processorTree->GetRoot();
+
+    if (key == 1)
+    {
+        start = processorTreeForGridProcessor->GetRoot();
+    }
+    else if (key == 2)
+    {
+        start = processorTreeForAllProcessor->GetRoot();
+    }
+
+    if (!start)
+    {
+        return;
+    }
+
+    if (start->GetData() != GetServerProcessorID())
+    {
+        ostringstream oss;
+        oss << "\n";
+        oss << "++++++++++++++++++  StopProgram Information  +++++++++++++++++++++++++++\n";
+        oss <<  "Error: the server should be processor 0!" << "\n";
+        oss << " The stop filename is : " << __FILE__ << "\n";
+        oss << " at line " << __LINE__ << "\n";
+        oss << " Compiled On line " << __DATE__ << " at " << __TIME__ << "\n";
+        oss << "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++\n";
+
+        PHMPI::FreeBlockData();
+        cout << oss.str() << endl;
+        MPI_Abort(MPI_COMM_WORLD, -1);
+    }
+
+    nodeQueue.push(start);
+    while (!nodeQueue.empty())
+    {
+        start = nodeQueue.front();
+        nodeQueue.pop();
+
+        int sendProcessor = start->GetData();
+
+        if (start->left)
+        {
+            nodeQueue.push(start->left);
+            int recvProcessor = start->left->GetData();
+
+            if (sendProcessor != recvProcessor)
+            {
+                if (myID == sendProcessor)
+                {
+                    send(cdata, recvProcessor, tag);
+                }
+                if (myID == recvProcessor)
+                {
+                    receive(cdata, sendProcessor, tag);
+                }
+            }
+        }
+
+        if (start->right)
+        {
+            nodeQueue.push(start->right);
+
+            int recvProcessor = start->right->GetData();
+
+            if (sendProcessor != recvProcessor)
+            {
+                if (myID == sendProcessor)
+                {
+                    send(cdata, recvProcessor, tag);
+                }
+                if (myID == recvProcessor)
+                {
+                    receive(cdata, sendProcessor, tag);
+                }
+            }
+        }
+    }
+}
+
+void PH_BcastNonBlocking(DataContainer *&cdata, int bcastProcessor, int tag)
+{
+    using namespace PHMPI;
+
+    vector<DataContainer *> sendDataBuffer;
+    vector<DataContainer *> receivedDataBuffer;
+    vector<PH_Request> requestContainer;
+
+    int sendProcessor = bcastProcessor;
+    int myIDTmp = GetCurrentProcessorID();
+    int numberOfProcessorTmp = GetNumberOfProcessor();
+
+    CharVecSizeType dataLength;
+    if (myIDTmp == bcastProcessor)
+    {
+        dataLength = cdata->size();
+    }
+    PH_BcastNonBlocking(&dataLength, 1, bcastProcessor, 0);
+
+    if (myIDTmp == bcastProcessor)
+    {
+        sendDataBuffer.reserve(numberOfProcessorTmp);
+        requestContainer.reserve(numberOfProcessorTmp);
+
+        //! Step 1: Server sending.
+        for (int iProc = 0; iProc < numberOfProcessorTmp; ++ iProc)
+        {
+            if (iProc == bcastProcessor)
+            {
+                continue;
+            }
+
+            int receiveProcessor = iProc;
+
+            //! Allocate the buffers for sending and receiving.
+            DataContainer *sendBuffer = new DataContainer (cdata);
+            sendDataBuffer.push_back(sendBuffer);
+
+            //! Send the data to others.
+            send(sendBuffer, receiveProcessor, dataLength, requestContainer, tag);
+        }
+    }
+    else
+    {
+        DataContainer *receivedBuffer = new DataContainer();
+        receivedDataBuffer.push_back(receivedBuffer);
+
+        //! Receive the data from server.
+        receive(receivedBuffer, sendProcessor, dataLength, requestContainer, tag);
+    }
+
+    //! Step2: MPI waiting for Non-blocking communications.
+    if (PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_Wait(static_cast<int>(requestContainer.size()), &(requestContainer[0]));
+    }
+
+    //! Step3: Translating.
+    if (myIDTmp != bcastProcessor)
+    {
+        if (cdata) delete cdata;
+
+        cdata = receivedDataBuffer[0];
+    }
+
+    //! Step4: Free the buffers.
+    for (std::size_t iDim = 0; iDim < sendDataBuffer.size(); ++ iDim)
+    {
+        delete sendDataBuffer[iDim];
+    }
+
+    requestContainer.clear();
+    receivedDataBuffer.clear();
+    sendDataBuffer.clear();
+}
+
+void PH_BcastNlenData(int &nlen, char *&data, int proc, int tag)
+{
+    PH_Bcast(&nlen, sizeof(int), proc, tag);
+
+    if (myID != proc)
+    {
+        data = new char [nlen];
+    }
+
+    PH_Bcast(data, nlen, proc, tag);
+}
+
+//! proc process obtains data and sends them to all processes, other processes receive data and then deal with them.
+void PH_BcastComposite(DATA_COMPRESS dt_c, DATA_DECOMPRESS dt_d, int proc, int tag)
+{
+    DataContainer *cdata = new DataContainer();
+
+    if (myID == proc)
+    {
+        //! Compress the data to cdata.
+        dt_c(cdata);
+    }
+
+    //! Send the cdata to other processes which need it.
+    PH_Bcast(cdata, proc, tag);
+
+    if (myID != proc)
+    {
+        //! Decompress data of the cdata to obtain the required information.
+        dt_d(cdata);
+    }
+
+    delete cdata;
+}
+
+void PH_BcastString(string &cs, int processor, int tag)
+{
+    if (myID == processor)
+    {
+        int numberOfProcessorTmp = GetNumberOfProcessor();
+        for (int i = 0; i < numberOfProcessorTmp; ++ i)
+        {
+            if (i == processor)
+            {
+                continue;
+            }
+            PH_SendString(cs, processor, tag);
+        }
+    }
+    else
+    {
+        PH_ReceiveString(cs, processor, tag);
+    }
+}
+
+void PH_CollectString(string &cs, int processor, int tag)
+{
+    if (myID != processor)
+    {
+        //! Processes other than proc are responsible for sending information to proc process.
+        PH_SendString(cs, processor, tag);
+        //WriteLogFile(cs);
+    }
+    else
+    {
+        //! myID == proc, all information is received and handled by proc process.
+        int numberOfProcessorTmp = GetNumberOfProcessor();
+        for (int i = 0; i < numberOfProcessorTmp; ++ i)
+        {
+            if (i != processor)
+            {
+                PH_ReceiveString(cs, i, tag);
+            }
+            if (GetCurrentProcessorID() == server)
+            {
+                cout << cs;
+            }
+        }
+    }
+}
+
+void ServerRead(fstream &file, void *data, int size)
+{
+    PH_Read(file, data, size, server);
+    PH_Bcast(data, size, server);
+}
+
+void PH_Trade(void *data, int size, int sendProcessor, int recvProcessor, int tag)
+{
+    //! Do nothing if the sendProcessID equal to the recieveProcessID.
+    if (sendProcessor == recvProcessor) return;
+
+    if (myID == sendProcessor)
+    {
+        //! Send the data to the receive process.
+        PHSPACE::PH_Send(data, size, recvProcessor, tag);
+    }
+    else if (myID == recvProcessor)
+    {
+        //! Receive the data from the send process.
+        PHSPACE::PH_Receive(data, size, sendProcessor, tag);
+    }
+}
+
+void PH_Trade(DataContainer *cdata, int sendProcessor, int recvProcessor, int tag)
+{
+    if (sendProcessor == recvProcessor) return;
+
+    if (myID == sendProcessor)
+    {
+        send(cdata, recvProcessor, tag);
+    }
+    else if (myID == recvProcessor)
+    {
+        receive(cdata, sendProcessor, tag);
+    }
+}
+
+void PH_Trade(DataContainer *cdata, int sendProcessor, int recvProcessor, streamsize nlen, int tag)
+{
+    if (sendProcessor == recvProcessor) return;
+
+    if (myID == sendProcessor)
+    {
+        send(cdata, recvProcessor, static_cast<CharVecSizeType>(nlen), tag);
+    }
+    if (myID == recvProcessor)
+    {
+        receive(cdata, sendProcessor, static_cast<CharVecSizeType>(nlen), tag);
+    }
+}
+
+void PH_Trade(ActionKey *actkey, int sendProcessor, int recvProcessor, int tag)
+{
+    DataContainer *cdata = actkey->GetData();
+
+    PH_Trade(cdata, sendProcessor, recvProcessor, tag);
+}
+
+void PH_Trade(ActionKey *actkey, int sendProcessor, int recvProcessor, streamsize nlen, int tag)
+{
+    DataContainer *cdata = actkey->GetData();
+    PH_Trade(cdata, sendProcessor, recvProcessor, nlen, tag);
+}
+
+}
+
+bool IsNeedNonBlockingCommunication(const ActionKey *actkey)
+{
+    using namespace PHMPI;
+
+    if (actkey->action == UPDATE_INTERFACE_DATA)
+    {
+        return true;
+    }
+    //if (actkey->action == COMMCELLIBLANK)
+    //{
+    //    return true;
+    //}
+    if (actkey->action == UPDATE_INTERPOINT_DATA)
+    {
+        return true;
+    }
+    return false;
+}
+
+void StreamToActionKey(ActionKey *actkey, ostringstream &oss)
+{
+    if (actkey)
+    {
+        DataContainer *cdata = actkey->GetData();
+        cdata->moveto_begin();
+        cdata->write(&oss);
+    }
+}
+
+void DataCharToString(DataContainer *cdata, string &str)
+{
+    cdata->to_string(str);
+}
+
+int GetSendRecvTag(ActionKey *actkey, int iZone)
+{
+    using namespace PHMPI;
+    int nZonesTmp = GetNumberofGlobalZones();
+
+    int tag = 0;
+
+    if (nZonesTmp <= 0)
+    {
+        //! It is easy to make mistakes here.
+        //! nZones is not assigned here.
+        PHMPI::FreeBlockData();
+        cout << "FATAL ERROR in GetSendRecvTag\n" << endl;
+        MPI_Abort(MPI_COMM_WORLD, -1);
+    }
+
+    if (actkey->kind == SOLVER_BASED)
+    {
+        tag = iZone + actkey->solverID * nZonesTmp;
+    }
+    else
+    {
+        tag = iZone + actkey->level * nZonesTmp;
+    }
+
+    return tag;
+}
+
+int GetSendRecvTag(int tagKind, int index, int iZone)
+{
+    using namespace PHMPI;
+    int nZonesTmp = GetNumberofGlobalZones();
+
+    int tag = 0;
+
+    if (nZonesTmp <= 0)
+    {
+        //! It is easy to make mistakes here.
+        //! nZones is not assigned here.
+        PHMPI::FreeBlockData();
+        cout << "FATAL ERROR in GetSendRecvTag\n" << endl;
+        MPI_Abort(MPI_COMM_WORLD, -1);
+    }
+
+    tag = iZone + index * nZonesTmp;
+
+    return tag;
+}
+
+void PH_AllreduceSepMode(int *sendingBuffer, int *receivingBuffer, int numberOfElements, MPI_Datatype mpiDataType, PH_Op op)
+{
+    using namespace PHMPI;
+
+#ifdef PH_PARALLEL
+    int numberOfGridProcessorTmp = GetNumberOfGridProcessor();
+
+    //ostringstream oss;
+    //oss << "sendingBuffer = " << sendingBuffer[ 0 ] << endl;
+    //WriteLogFile(oss.str());
+
+    if (numberOfGridProcessorTmp == 0)
+    {
+        MPI_Allreduce(sendingBuffer, receivingBuffer, numberOfElements, mpiDataType, op, MPI_COMM_WORLD);
+        return;
+    }
+
+    int serverTmp = PHMPI::GetServerSepMode();
+
+    int numberOfOriginalProcessor = GetNumberOfProcessor();
+
+    int startProcessor = 0;
+    int endProcessor = numberOfOriginalProcessor;
+
+    if (CurrentProcessorIsGridProcessor())
+    {
+        startProcessor = numberOfOriginalProcessor;
+        endProcessor = numberOfGridProcessorTmp + numberOfOriginalProcessor;
+    }
+
+    int myIDTmp = GetCurrentProcessorID();
+
+    for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+    {
+        receivingBuffer[iElement] = sendingBuffer[iElement];
+    }
+
+    for (int iProc = startProcessor; iProc < endProcessor; ++ iProc)
+    {
+        if (iProc == serverTmp)
+        {
+            continue;
+        }
+
+        int tag = iProc;
+
+        if (myIDTmp == iProc)
+        {
+            PH_SmartSend(sendingBuffer, numberOfElements, serverTmp, tag);
+        }
+
+        if (myIDTmp == serverTmp)
+        {
+            int *tmpBuffer = new int[numberOfElements];
+
+            PH_SmartRecv(tmpBuffer, numberOfElements, iProc, tag);
+
+            if (op == MPI_MAX)
+            {
+                for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+                {
+                    receivingBuffer[iElement] = MAX(receivingBuffer[iElement], tmpBuffer[iElement]);
+                }
+            }
+            else if (op == MPI_MIN)
+            {
+                for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+                {
+                    receivingBuffer[iElement] = MIN(receivingBuffer[iElement], tmpBuffer[iElement]);
+                }
+            }
+            else if (op == MPI_SUM)
+            {
+                for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+                {
+                    receivingBuffer[iElement] += tmpBuffer[iElement];
+                }
+            }
+
+            delete [] tmpBuffer;
+        }
+    }
+
+    //! Bcast the final results to each processors.
+
+    DataContainer *cdata;
+
+    cdata = new DataContainer;
+
+    if (myIDTmp == serverTmp)
+    {
+        cdata->write(receivingBuffer, numberOfElements * sizeof(int));
+    }
+
+    PH_BcastByServerSepMode(cdata);
+
+    cdata->moveto_begin();
+
+    cdata->read(receivingBuffer, numberOfElements * sizeof(int));
+
+    delete cdata;
+
+    //ostringstream oss1;
+    //oss1 << "After all reduce, sendingBuffer = " << receivingBuffer[0] << endl;
+    //WriteLogFile(oss1.str());
+
+#endif
+}
+
+void PH_AllreduceSepMode(float *sendingBuffer, float *receivingBuffer, int numberOfElements, MPI_Datatype mpiDataType, PH_Op op)
+{
+    using namespace PHMPI;
+
+#ifdef PH_PARALLEL
+    int numberOfGridProcessorTmp = GetNumberOfGridProcessor();
+
+    //ostringstream oss;
+    //oss << "sendingBuffer = " << sendingBuffer[0] << endl;
+    //WriteLogFile(oss.str());
+
+    if (numberOfGridProcessorTmp == 0)
+    {
+        MPI_Allreduce(sendingBuffer, receivingBuffer, numberOfElements, mpiDataType, op, MPI_COMM_WORLD);
+        return;
+    }
+
+    int serverTmp = PHMPI::GetServerSepMode();
+
+    int numberOfOriginalProcessor = GetNumberOfProcessor();
+
+    int startProcessor = 0;
+    int endProcessor = numberOfOriginalProcessor;
+
+    if (CurrentProcessorIsGridProcessor())
+    {
+        startProcessor = numberOfOriginalProcessor;
+        endProcessor = numberOfGridProcessorTmp + numberOfOriginalProcessor;
+    }
+
+    int myIDTmp = GetCurrentProcessorID();
+
+    for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+    {
+        receivingBuffer[iElement] = sendingBuffer[iElement];
+    }
+
+    for (int iProc = startProcessor; iProc < endProcessor; ++ iProc)
+    {
+        if (iProc == serverTmp)
+        {
+            continue;
+        }
+
+        int tag = iProc;
+
+        if (myIDTmp == iProc)
+        {
+            PH_SmartSend(sendingBuffer, numberOfElements, serverTmp, tag);
+        }
+
+        if (myIDTmp == serverTmp)
+        {
+            float *tmpBuffer = new float [numberOfElements];
+
+            PH_SmartRecv(tmpBuffer, numberOfElements, iProc, tag);
+
+            if (op == MPI_MAX)
+            {
+                for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+                {
+                    receivingBuffer[iElement] = MAX(receivingBuffer[iElement], tmpBuffer[iElement]);
+                }
+            }
+            else if (op == MPI_MIN)
+            {
+                for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+                {
+                    receivingBuffer[iElement] = MIN(receivingBuffer[iElement], tmpBuffer[iElement]);
+                }
+            }
+            else if (op == MPI_SUM)
+            {
+                for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+                {
+                    receivingBuffer[iElement] += tmpBuffer[iElement];
+                }
+            }
+
+            delete [] tmpBuffer;
+        }
+    }
+
+    //! Bcast the final results to each processors.
+
+    DataContainer *cdata;
+
+    cdata = new DataContainer;
+
+    if (myIDTmp == serverTmp)
+    {
+        cdata->write(receivingBuffer, numberOfElements * sizeof(int));
+    }
+
+    PH_BcastByServerSepMode(cdata);
+
+    cdata->moveto_begin();
+
+    cdata->read(receivingBuffer, numberOfElements * sizeof(int));
+
+    delete cdata;
+
+    //ostringstream oss1;
+    //oss1 << "After all reduce, sendingBuffer = " << receivingBuffer[0] << endl;
+    //WriteLogFile(oss1.str());
+
+#endif
+}
+
+void PH_AllreduceSepMode(double *sendingBuffer, double *receivingBuffer, int numberOfElements, MPI_Datatype mpiDataType, PH_Op op)
+{
+    using namespace PHMPI;
+
+#ifdef PH_PARALLEL
+    int numberOfGridProcessorTmp = GetNumberOfGridProcessor();
+
+    //ostringstream oss;
+    //oss << "sendingBuffer = " << sendingBuffer[0] << endl;
+    //WriteLogFile(oss.str());
+
+    if (numberOfGridProcessorTmp == 0)
+    {
+        MPI_Allreduce(sendingBuffer, receivingBuffer, numberOfElements, mpiDataType, op, MPI_COMM_WORLD);
+        return;
+    }
+
+    int serverTmp = PHMPI::GetServerSepMode();
+
+    int numberOfOriginalProcessor = GetNumberOfProcessor();
+
+    int startProcessor = 0;
+    int endProcessor = numberOfOriginalProcessor;
+
+    if (CurrentProcessorIsGridProcessor())
+    {
+        startProcessor = numberOfOriginalProcessor;
+        endProcessor = numberOfGridProcessorTmp + numberOfOriginalProcessor;
+    }
+
+    int myIDTmp = GetCurrentProcessorID();
+
+    for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+    {
+        receivingBuffer[iElement] = sendingBuffer[iElement];
+    }
+
+    for (int iProc = startProcessor; iProc < endProcessor; ++ iProc)
+    {
+        if (iProc == serverTmp)
+        {
+            continue;
+        }
+
+        int tag = iProc;
+
+        if (myIDTmp == iProc)
+        {
+            PH_SmartSend(sendingBuffer, numberOfElements, serverTmp, tag);
+        }
+
+        if (myIDTmp == serverTmp)
+        {
+            double *tmpBuffer = new double[numberOfElements];
+
+            PH_SmartRecv(tmpBuffer, numberOfElements, iProc, tag);
+
+            if (op == MPI_MAX)
+            {
+                for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+                {
+                    receivingBuffer[iElement] = MAX(receivingBuffer[iElement], tmpBuffer[iElement]);
+                }
+            }
+            else if (op == MPI_MIN)
+            {
+                for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+                {
+                    receivingBuffer[iElement] = MIN(receivingBuffer[iElement], tmpBuffer[iElement]);
+                }
+            }
+            else if (op == MPI_SUM)
+            {
+                for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+                {
+                    receivingBuffer[iElement] += tmpBuffer[iElement];
+                }
+            }
+
+            delete [] tmpBuffer;
+        }
+    }
+
+    //! Bcast the final results to each processors.
+
+    DataContainer *cdata;
+
+    cdata = new DataContainer;
+
+    if (myIDTmp == serverTmp)
+    {
+        cdata->write(receivingBuffer, numberOfElements * sizeof(double));
+    }
+
+    PH_BcastByServerSepMode(cdata);
+
+    cdata->moveto_begin();
+
+    cdata->read(receivingBuffer, numberOfElements * sizeof(double));
+
+    delete cdata;
+
+    //ostringstream oss1;
+    //oss1 << "After all reduce, sendingBuffer = " << receivingBuffer[0] << endl;
+    //WriteLogFile(oss1.str());
+
+#endif
+}
+
+int PH_Reduce(int *sendbuf, int *recvbuf, int count, PH_Op op)
+{
+    int errcode = 0;
+    int root = PHMPI::GetServerProcessorID();
+
+#ifdef PH_PARALLEL
+    errcode = MPI_Reduce(sendbuf, recvbuf, count, MPI_INT, op, root, MPI_COMM_WORLD);
+#endif
+
+    return errcode;
+}
+
+int PH_Reduce(float *sendbuf, float *recvbuf, int count, PH_Op op)
+{
+    int errcode = 0;
+    int root = PHMPI::GetServerProcessorID();
+
+#ifdef PH_PARALLEL
+    errcode = MPI_Reduce(sendbuf, recvbuf, count, MPI_FLOAT, op, root, MPI_COMM_WORLD);
+#endif
+
+    return errcode;
+}
+
+int PH_Reduce(double *sendbuf, double *recvbuf, int count, PH_Op op)
+{
+    int errcode = 0;
+    int root = PHMPI::GetServerProcessorID();
+
+    if (PHMPI::GetNumberOfProcessor() == 1)
+    {
+        for (int iData = 0; iData < count; ++ iData)
+        {
+            recvbuf[iData] = sendbuf[iData];
+        }
+        return 1;
+    }
+
+#ifdef PH_PARALLEL
+    errcode = MPI_Reduce(sendbuf, recvbuf, count, MPI_DOUBLE, op, root, MPI_COMM_WORLD);
+#endif
+
+    return errcode;
+}
+
+//! flag:
+//! MAX = 1;
+//! MIN = 2;
+void PH_CompareMaxMin(int &local_data, int flag)
+{
+    const int MAX = 1;
+    const int MIN = 2;
+
+    if (PHMPI::GetNumberOfProcessor() == 1)
+    {
+        return;
+    }
+
+#ifdef PH_PARALLEL
+    int global_data = 0;
+    if (flag == MAX)
+    {
+        MPI_Allreduce(&local_data, &global_data, 1, MPI_INT, MPI_MAX, MPI_COMM_WORLD);
+    }
+    else if (flag == MIN)
+    {
+        MPI_Allreduce(&local_data, &global_data, 1, MPI_INT, MPI_MIN, MPI_COMM_WORLD);
+    }
+    local_data = global_data;
+#endif
+}
+
+//! flag:
+//! MAX = 1;
+//! MIN = 2;
+void PH_CompareMaxMin(RDouble &local_data, int flag)
+{
+    const int MAX = 1;
+    const int MIN = 2;
+
+#ifdef PH_PARALLEL
+    RDouble global_data = 0.0;
+    if (flag == MAX)
+    {
+        MPI_Allreduce(&local_data, &global_data, 1, PH_MPI_DOUBLE, MPI_MAX, MPI_COMM_WORLD);
+        //PH_AllreduceSepMode(&local_data, &global_data, 1, PH_MPI_DOUBLE, MPI_MAX);
+    }
+    else if (flag == MIN)
+    {
+        MPI_Allreduce(&local_data, &global_data, 1, PH_MPI_DOUBLE, MPI_MIN, MPI_COMM_WORLD);
+        //PH_AllreduceSepMode(&local_data, &global_data, 1, PH_MPI_DOUBLE, MPI_MIN);
+    }
+    local_data = global_data;
+#endif
+}
+
+int PH_BarrierSepMode()
+{
+    int test = 1;
+    int testAll = 1;
+
+    PH_AllreduceSepMode(&test, &testAll, 1, MPI_INT, MPI_SUM);
+
+    return testAll;
+}
+
+}
\ No newline at end of file
diff --git a/API/FYMPI/src/Parallel.cpp b/API/FYMPI/src/Parallel.cpp
new file mode 100644
index 0000000..9558681
--- /dev/null
+++ b/API/FYMPI/src/Parallel.cpp
@@ -0,0 +1,454 @@
+#include "Parallel.h"
+#include "PHMpi.h"
+
+namespace PHSPACE
+{
+
+int PH_Init()
+{
+    int err      = 0;
+    int argc     = 0;
+    char ***argv = 0;
+#ifdef PH_PARALLEL
+    err = MPI_Init(&argc, argv);
+#endif
+    return err;
+}
+
+int PH_Init(int &argc, char ***argv)
+{
+    int err = 0;
+#ifdef PH_PARALLEL
+    err = MPI_Init(&argc, argv);
+#endif
+    return err;
+}
+
+void PH_Rank(int &rank)
+{
+#ifdef PH_PARALLEL
+    MPI_Comm_rank(MPI_COMM_WORLD, &rank);
+#endif
+}
+
+void PH_Size(int &size)
+{
+#ifdef PH_PARALLEL
+    MPI_Comm_size(MPI_COMM_WORLD, &size);
+#endif
+}
+
+void PH_Finalize()
+{
+#ifdef PH_PARALLEL
+    MPI_Finalize();
+#endif
+}
+
+void PH_GetProcessorName(string &proc_name)
+{
+#ifdef PH_PARALLEL
+    char processor_name[MPI_MAX_PROCESSOR_NAME];
+    int nlen = 0;
+
+    MPI_Get_processor_name(processor_name, &nlen);
+    proc_name = processor_name;
+#endif
+}
+
+void PH_Send(void *data, int size, int to, int tag)
+{
+#ifdef PH_PARALLEL
+    //! In order to avoid special situation.
+    if (size <= 0) return;
+    MPI_Send(data, size, MPI_CHAR, to, tag, MPI_COMM_WORLD);
+#endif
+}
+
+void PH_Receive(void *data, int size, int from, int tag)
+{
+#ifdef PH_PARALLEL
+    //! In order to avoid special situation.
+    if (size <= 0) return;
+
+    MPI_Status status;
+    MPI_Recv(data, size, MPI_CHAR, from, tag, MPI_COMM_WORLD, &status);
+#endif
+}
+
+int PH_Receive(void *data, int size, int tag)
+{
+    int err_code = 0;
+
+#ifdef PH_PARALLEL
+    //! In order to avoid special situation.
+    if (size <= 0) return -1;
+
+    MPI_Status status;
+    MPI_Recv(data, size, MPI_CHAR, MPI_ANY_SOURCE, tag, MPI_COMM_WORLD, &status);
+    err_code = status.MPI_SOURCE;
+#endif
+
+    return err_code;
+}
+
+void PH_SendString(string &cs, int proc, int tag)
+{
+    int nlen = static_cast<int>(cs.length());
+
+    PH_Send(&nlen, sizeof(int), proc, tag);
+
+    char *data = new char[nlen+1];
+
+    cs.copy(data, nlen);
+    data[nlen] = '\0';
+
+    PH_Send(data, nlen+1, proc, tag);
+
+    delete [] data;
+}
+
+void PH_ReceiveString(string &cs, int proc, int tag)
+{
+    int nlen = 0;
+    PH_Receive(&nlen, sizeof(int), proc, tag);
+
+    char *data = new char[nlen+1];
+
+    PH_Receive(data, nlen+1, proc, tag);
+
+    cs = data;
+
+    delete [] data;
+}
+
+//! Non-blocking send/receive function:
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+// Function :   int PH_Send(void *data, int size, int to, int tag, PH_Request *request)                                  +
+// Author   :   Xu QingXin,  2013.02.16,   Modified 2013.02.16.                                                          +
+// Purpose  :   Non-blocking standard send function,package Non-blocking standard send process function of MPICH.        +
+// Description: data, input type parameter, optional type, address of the send buffer.                                   +
+//              size, input type parameter, int type,size of the send buffer in bytes.                                   +
+//              to  , input type parameter, int type,the send target process number.                                     +
+//              tag , input type parameter, int type,information tag.                                                    +
+//              comm, input optional parameter, MPI_Comm type, communication field handle, default is MPI_COMM_WORLD.    +
+//              request, output type parameter, PH_Request type pointer, communication object handle.                    +
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+int PH_Send(void *data, int size, int to, int tag, PH_Request *request)
+{
+    int errcode = 0;
+
+    if (size <= 0)
+    {
+        errcode = -1;
+        return errcode;
+    }
+
+#ifdef PH_PARALLEL
+    errcode = MPI_Isend(data, size, MPI_CHAR, to, tag, MPI_COMM_WORLD, request);
+#endif
+
+    return errcode;
+}
+
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+// Function    :   int PH_Receive(void *data, int size, int from, int tag, PH_Request *request)                               +
+// Author      :   Xu QingXin,  2013.02.07, Modified 2013.02.07.                                                              +
+// Purpose     :   Non-blocking standard receive function, package Non-blocking standard receive process function of MPICH.   +
+// Description :   data, input type parameter, optional type, address of the receive buffer.                                  +
+//                 size, input type parameter, int type, size of the receive buffer in bytes.                                 +
+//                 from, input type parameter, int type, the receive source process number.                                   +
+//                 tag , input type parameter, int type,information tag.                                                      +
+//                 request, output type parameter, PH_Request type pointer, communication object handle.                      +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+int PH_Receive(void *data, int size, int from, int tag, PH_Request *request)
+{
+    int errcode = 0;
+
+    if (size <= 0)
+    {
+        errcode = -1;
+        return errcode;
+    }
+
+#ifdef PH_PARALLEL
+    errcode = MPI_Irecv(data, size, MPI_CHAR, from, tag, MPI_COMM_WORLD, request);
+#endif
+    
+    return errcode;
+}
+
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+// Function    :   int PH_Wait(PH_Request *request)                                                                                                   +
+// Author      :   Xu QingXin, 2013.02.16, Modified 2013.02.16.                                                                                       +
+// Purpose     :   Non-blocking completed communication operation function, package Non-blocking completed communication process function of MPICH.   +
+// Description :request, input/output type parameter, PH_Request type pointer, communication object handle.                                           +
+//               status, output type parameter, PH_Status type pointer, state object,default is MPI_STATUS_IGNORE.                                    +
+//                count, input type parameter, int type, number of communication objects to be completed.                                             +
+//    array_of_requests, input/output type parameter, PH_Request type one dimension array, store count communication objects handle.                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+int PH_Wait(PH_Request *request)
+{
+    int errcode = 0;
+    
+#ifdef PH_PARALLEL
+    errcode = MPI_Wait(request, MPI_STATUS_IGNORE);
+#endif
+    
+    return errcode;
+}
+
+int PH_Wait(int count, PH_Request *array_of_requests)
+{
+    int errcode = 0;
+ 
+#ifdef PH_PARALLEL
+    errcode = MPI_Waitall(count, array_of_requests, MPI_STATUSES_IGNORE);
+#endif
+    
+    return errcode;
+}
+
+//! Global reduction function:
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+// Function    :   int PH_Reduce(void *sendbuf, void *recvbuf, int count, PH_Op op)                    +
+//                 int PH_Reduce(void *sendbuf, void *recvbuf, int count, PH_Op op, int root)          +
+// Author      :   Xu QingXin, 2013.04.02, Modified 2013.04.02.                                        +
+// Purpose     :   Global reduction function, package Global reduction operation function of MPICH.    +
+// Description : sendbuf, input type parameter, optional type, address of the send buffer.             +
+//               recvbuf, input type parameter, optional type, address of the receive buffer.          +
+//               count  , input type parameter, int type,number of communication objects to be reduced.+
+//               op     , input type parameter, MPI_Op type, reduction operation handle.               +
+//               root   , input type parameter, int type,root process number.                          +
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+int PH_AllReduce(void *sendbuf, void *recvbuf, int count, PH_Op op)
+{
+    int errcode = 0;
+
+#ifdef PH_PARALLEL
+    errcode = MPI_Allreduce(sendbuf, recvbuf, count, MPI_CHAR, op, MPI_COMM_WORLD);
+#endif
+
+    return errcode;
+}
+
+int PH_AllReduce(double *sendbuf, double *recvbuf, int count, PH_Op op)
+{
+    int errcode = 0;
+    if (PHMPI::GetNumberOfProcessor() == 1)
+    {
+        for (int iData = 0; iData < count; ++ iData)
+        {
+            recvbuf[iData] = sendbuf[iData];
+        }
+        return 1;
+    }
+
+#ifdef PH_PARALLEL
+    errcode = MPI_Allreduce(sendbuf, recvbuf, count, MPI_DOUBLE, op, MPI_COMM_WORLD);
+#endif
+
+    return errcode;
+}
+
+int PH_AllReduce(float *sendbuf, float *recvbuf, int count, PH_Op op)
+{
+    int errcode = 0;
+
+#ifdef PH_PARALLEL
+    errcode = MPI_Allreduce(sendbuf, recvbuf, count, MPI_FLOAT, op, MPI_COMM_WORLD);
+#endif
+
+    return errcode;
+}
+
+int PH_AllReduce(int *sendbuf, int *recvbuf, int count, PH_Op op)
+{
+    int errcode = 0;
+    if (PHMPI::GetNumberOfProcessor() == 1)
+    {
+        for (int iData = 0; iData < count; ++ iData)
+        {
+            recvbuf[iData] = sendbuf[iData];
+        }
+        return 1;
+    }
+
+#ifdef PH_PARALLEL
+    errcode = MPI_Allreduce(sendbuf, recvbuf, count, MPI_INT, op, MPI_COMM_WORLD);
+#endif
+
+    return errcode;
+}
+
+int PH_AllGather(int *sendbuf, int sendcount, int *recvbuf, int recvcount)
+{
+    int errcode = 0;
+    if (PHMPI::GetNumberOfProcessor() == 1)
+    {
+        for (int iData = 0; iData < sendcount; ++ iData)
+        {
+            recvbuf[iData] = sendbuf[iData];
+        }
+        return 1;
+    }
+
+#ifdef PH_PARALLEL
+    errcode = MPI_Allgather(sendbuf, sendcount, MPI_INT, recvbuf, recvcount, MPI_INT, MPI_COMM_WORLD);
+#endif
+
+    return errcode;
+}
+
+// int PH_Reduce(void *sendbuf, void *recvbuf, int count, PH_Op op, int root)
+// {
+//      int errcode = 0;
+// 
+// #ifdef PH_PARALLEL
+//      errcode = MPI_Reduce(sendbuf, recvbuf, count, MPI_CHAR, op, root, MPI_COMM_WORLD);
+// #endif
+// 
+//      return errcode;
+// }
+
+int PH_Barrier()
+{
+    int errorCode = 0;
+#ifdef PH_PARALLEL
+    errorCode = MPI_Barrier(MPI_COMM_WORLD);
+#endif
+    return errorCode;
+}
+
+int PH_Gatherv(void *sendBuffer, int sendCount, void *receiveBuffer, int *receiveCount, int *displs, int root)
+{
+    int errcode = 0;
+
+#ifdef PH_PARALLEL
+    errcode = MPI_Gatherv(sendBuffer, sendCount, MPI_INT, receiveBuffer, receiveCount, displs, MPI_INT, root, MPI_COMM_WORLD);
+#endif
+
+    return errcode;
+}
+
+void send(DataChar *dataChar, int to, int tag)
+{
+    int nlen = static_cast<int>(dataChar->size());
+
+    //! It is necessary to judge whether the data length is zero.
+    if (nlen <= 0) return;
+
+    PH_Send(dataChar->begin(), nlen, to, tag);
+}
+
+void send(DataChar *dataChar, int to, vector<PH_Request> &requestContainer, int tag)
+{
+    int nlen = static_cast<int>(dataChar->size());
+
+    //! It is necessary to judge whether the data length is zero.
+    if (nlen <= 0) return;
+
+    requestContainer.push_back(MPI_REQUEST_NULL);
+
+    PH_Send(dataChar->begin(), nlen, to, tag, &requestContainer.back());
+}
+
+void receive(DataChar *dataChar, int from, int tag)
+{
+    int nlen = static_cast<int>(dataChar->size());
+
+    //! It is necessary to judge whether the data length is zero.
+    if (nlen <= 0) return;
+
+    PH_Receive(dataChar->begin(), nlen, from, tag);
+}
+
+void receive(DataChar *dataChar, int from, vector<PH_Request> &requestContainer, int tag)
+{
+    int nlen = static_cast<int>(dataChar->size());
+
+    //! It is necessary to judge whether the data length is zero.
+    if (nlen <= 0) return;
+
+    requestContainer.push_back(MPI_REQUEST_NULL);
+
+    PH_Receive(dataChar->begin(), nlen, from, tag, &requestContainer.back());
+}
+
+void send(DataContainer *dataContainer, int to, int tag)
+{
+    CharVecSizeType nlen = dataContainer->size();
+
+    PH_Send(&nlen, sizeof(streamsize), to, tag);
+
+    //! It is necessary to judge whether the data length is zero.
+    if (nlen <= 0) return;
+
+    for (ContainerSizeType i = 0; i < dataContainer->element_size(); ++ i)
+    {
+        send(dataContainer->getiter(i), to, tag);
+    }
+}
+
+void send(DataContainer *dataContainer, int to, streamsize nlen, int tag)
+{
+    //! It is necessary to judge whether the data length is zero.
+    if (nlen <= 0) return;
+
+    for (ContainerSizeType i = 0; i < dataContainer->element_size(); ++ i)
+    {
+        send(dataContainer->getiter(i), to, tag);
+    }
+}
+
+void send(DataContainer *dataContainer, int to, streamsize nlen, vector<PH_Request> &requestContainer, int tag)
+{
+    //! It is necessary to judge whether the data length is zero.
+    if (nlen <= 0) return;
+
+    for (ContainerSizeType i = 0; i < dataContainer->element_size(); ++ i)
+    {
+        send(dataContainer->getiter(i), to, requestContainer, tag);
+    }
+}
+
+void receive(DataContainer *dataContainer, int from, int tag)
+{
+    streamsize nlen = 0;
+    PH_Receive(&nlen, sizeof(streamsize), from, tag);
+
+    if (nlen <= 0) return;
+
+    dataContainer->secure_absolute_space(static_cast< CharVecSizeType >(nlen));
+
+    for (ContainerSizeType i = 0; i < dataContainer->element_size(); ++ i)
+    {
+        receive(dataContainer->getiter(i), from, tag);
+    }
+}
+
+void receive(DataContainer *dataContainer, int from, CharVecSizeType nlen, int tag)
+{
+    if (nlen <= 0) return;
+
+    dataContainer->secure_absolute_space(nlen);
+
+    for (ContainerSizeType i = 0; i < dataContainer->element_size(); ++ i)
+    {
+        receive(dataContainer->getiter(i), from, tag);
+    }
+}
+
+void receive(DataContainer *dataContainer, int from, CharVecSizeType nlen, vector<PH_Request> &requestContainer, int tag)
+{
+    if (nlen <= 0) return;
+
+    dataContainer->secure_absolute_space(nlen);
+
+    for (ContainerSizeType i = 0; i < dataContainer->element_size(); ++ i)
+    {
+        receive(dataContainer->getiter(i), from, requestContainer, tag);
+    }
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/include/FaceProxy.h b/API/Geometry/include/FaceProxy.h
new file mode 100644
index 0000000..bbb3dc6
--- /dev/null
+++ b/API/Geometry/include/FaceProxy.h
@@ -0,0 +1,217 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      FaceProxy.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+#include "TypeDefine.h"
+#include "GeneralFieldProxy.h"
+#include "Geo_Grid.h"
+#include "GeomProxy.h"
+#include "Constants.h"
+
+namespace PHSPACE
+{
+class NSFaceValue
+{
+private:
+    GeneralFieldProxy *rho_ds, *hint_s;
+    GeneralFieldProxy *prim, *t;
+    RDouble *kcp, *mul, *mut;
+public:
+    NSFaceValue(int neqn, int ns, int nlen);
+    ~NSFaceValue();
+    GeneralFieldProxy * GetRhoDS() { return rho_ds; }
+    GeneralFieldProxy * GetHintS() { return hint_s; }
+    GeneralFieldProxy * GetPrim()  { return prim; }
+    GeneralFieldProxy * GetT()     { return t; }
+
+    //! Heat conductivity coefficient, usually computed by Cp.
+    RDouble * GetKCP() { return kcp; }
+    RDouble * GetMUL() { return mul; }
+    RDouble * GetMUT() { return mut; }
+};
+
+class TurbFaceValue
+{
+public:
+    RDouble **prim, **mlt;
+    RDouble *mul, *mut;
+public:
+    TurbFaceValue(int neqn, int nlen);
+    ~TurbFaceValue();
+};
+
+class TransitionFaceValue
+{
+public:
+    RDouble **prim, **mlt;
+    RDouble *mul, *mut;
+public:
+    TransitionFaceValue(int neqn, int nlen);
+    ~TransitionFaceValue();
+};
+
+class FaceProxy
+{
+public:
+    //! Type definitions.
+    typedef RDouble **value_type;
+private:
+    value_type ql, qr, flux;
+    value_type qlc,qrc; //GMRESPassQC , pass the value at cell center
+    RDouble **tl, **tr;
+    RDouble** dRdq; // GMRES
+    RDouble** dRdq1st; // GMRESJac1st
+    RDouble** dDdP;  // GMRESBoundary
+    RDouble *deltl, *deltr;
+    RDouble *gamal, *gamar;
+    RDouble *lrtl, *lrtr;    //! Pressure factor.
+    int* leftcellindexofFace, *rightcellindexofFace; //GMRES
+    int* qlsign, *qrsign; //GMRESnolim GMRESSign , according the sign for limiter
+    RDouble *tcl, *tcr;
+    RDouble *pcl, *pcr;
+    NSFaceValue   *ns_facevar;
+    TurbFaceValue *turb_facevar;
+    TransitionFaceValue *transition_facevar;
+    GeomProxy     *geom_proxy;
+    int nlen, nsize, neqn;
+    int localStart, localEnd, nBoundFace, nTotalCell;  // GMRESBoundary
+    vector<int>* wallFaceIndex; // GMRESBCorrection , this is for the correction of wall bc
+    vector<int> JacobianAI; // GMRESCSR
+    vector<int> JacobianAJ; // GMRESCSR
+    vector<int> JacobianAI1st; // GMRESJac1st
+    vector<int> JacobianAJ1st; // GMRESJac1st
+    int JacOrder; // GMRESJac1st
+    int isViscous;  // GMRESBCorrection
+    FaceProxy *next;
+public:
+    FaceProxy();
+    ~FaceProxy();
+public:
+    FaceProxy * GetNext() { return next; }
+    void SetNext(FaceProxy *next) { this->next = next; }
+public:
+    void Create(int nsize, int neqn);
+    value_type GetQL();
+    value_type GetQR();
+    value_type GetQLC(); // GMRESPassQC
+    value_type GetQRC(); // GMRESPassQC
+    value_type GetFlux();
+
+    RDouble ** GetLeftTemperature();
+    RDouble ** GetRightTemperature();
+    RDouble ** GetJacobianMatrix(); //GMRES
+    void SetJacobianMatrix(RDouble** dRdqfromGrid); //GMRES
+
+    //! GMRESJac1st
+    RDouble ** GetJacobianMatrix1st();
+    void SetJacobianMatrix1st(RDouble** dRdq1stfromGrid);
+
+    RDouble ** GetdDdPMatrix(); // GMRESBoundary
+    void SetdDdPMatrix(RDouble** dDdPfromGrid); // GMRESBoundary
+
+    // GMRESBoundary
+    int GetlocalStart() {return localStart;};  
+    int GetlocalEnd() {return localEnd;};      
+    int GetnBoundFace() {return nBoundFace;};  
+    int GetnTotalCell() {return nTotalCell;};  
+    int GetWallType() {return isViscous;}; // GMRESBCorrection
+    vector<int>* GetWallFaceIndex() const { return wallFaceIndex;}; // GMRESBCorrection
+    void SetlocalStart(int localStart) {this->localStart = localStart;}; 
+    void SetlocalEnd(int localEnd) {this->localEnd = localEnd;};         
+    void SetnBoundFace(int nBoundFace) {this->nBoundFace = nBoundFace;};
+    void SetnTotalCell(int nTotalCell) {this->nTotalCell = nTotalCell;};
+    void SetWallType(int isViscous) {this->isViscous = isViscous;}; // GMRESBCorrection
+    void SetWallFaceIndex(vector<int>* wallFaceIndex){this->wallFaceIndex = wallFaceIndex;};// GMRESBCorrection
+
+
+    // GMRESCSR
+    vector<int> GetJacobianAI4GMRES() const { return JacobianAI; };
+    vector<int> GetJacobianAJ4GMRES() const { return JacobianAJ; };
+    void SetJacobianAI4GMRES(vector<int> JacobianAI) { this->JacobianAI = JacobianAI; };
+    void SetJacobianAJ4GMRES(vector<int> JacobianAJ) { this->JacobianAJ = JacobianAJ; };
+    //! GMRESJac1st
+    vector<int> GetJacobianAI1st4GMRES() const { return JacobianAI1st; };
+    vector<int> GetJacobianAJ1st4GMRES() const { return JacobianAJ1st; };
+    void SetJacobianAI1st4GMRES(vector<int> JacobianAI1st) { this->JacobianAI1st = JacobianAI1st; };
+    void SetJacobianAJ1st4GMRES(vector<int> JacobianAJ1st) { this->JacobianAJ1st = JacobianAJ1st; };
+
+    int GetJacobianOrder() const { return JacOrder; };
+    void SetJacobianOrder(int JacOrder) { this->JacOrder = JacOrder; };
+
+    int size() { return nlen; }
+    int capacity() { return nsize; }
+    void setsize(int nlen) { this->nlen = nlen; }
+
+    // GMRES
+    int* GetLeftCellIndexOfFace();
+    int* GetRightCellIndexOfFace();
+
+    // GMRESnolim GMRESSign
+    int* GetQLSign();
+    int* GetQRSign();
+
+    //! Get left cell gama of the face.
+    RDouble * GetGamaL();
+
+    //! Get right cell gama of the face.
+    RDouble * GetGamaR();
+
+    //! Get left cell pressure coefficient of the face.
+    RDouble * GetPressureCoefficientL();
+
+    //! Get right cell pressure coefficient of the face.
+    RDouble * GetPressureCoefficientR();
+
+    //! Get left cell time coefficient for precondition of the face.
+    RDouble * GetTimeCoefficientL();
+
+    //! Get right cell time coefficient for precondition of the face.
+    RDouble * GetTimeCoefficientR();
+
+    //! Get left cell precondition coefficient of the face.
+    RDouble * GetPreconCoefficientL();
+
+    //! Get right cell precondition coefficient of the face.
+    RDouble * GetPreconCoefficientR();
+
+    //! Get left cell weight of the face.
+    RDouble * GetWeightL();
+
+    //! Get right cell weight of the face.
+    RDouble * GetWeightR();
+
+    GeomProxy * GetGeomProxy();
+    void SetGeomProxy(GeomProxy *geom_proxy);
+
+    NSFaceValue * GetNSFaceValue();
+    void SetNSFaceValue(NSFaceValue *facevar);
+
+    TurbFaceValue * GetTurbFaceValue();
+    void SetTurbFaceValue(TurbFaceValue *facevar);
+
+    TransitionFaceValue * GetTransitionFaceValue();
+    void SetTransitionFaceValue(TransitionFaceValue *facevar);
+};
+
+//! Check whether the density and pressure are positive.
+inline bool PositiveCheckForDensityAndPressure(RDouble *qTry)
+{
+    if (qTry[IDX::IR] <= 0.0 || qTry[IDX::IP] <= 0.0) return false;
+    return true;
+}
+
+//! ReConstruct the left and right cell variables (Ql and Qr) of the face for structured grid.
+void ReConstructQlQr_STR(Grid *grid_in, FaceProxy *face_proxy, int neqn, int nst, int ned);
+}
diff --git a/API/Geometry/include/FieldProxy.h b/API/Geometry/include/FieldProxy.h
new file mode 100644
index 0000000..32c9240
--- /dev/null
+++ b/API/Geometry/include/FieldProxy.h
@@ -0,0 +1,41 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      FieldProxy.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+#include "TypeDefine.h"
+
+namespace PHSPACE
+{
+class FieldProxy
+{
+private:
+    RDouble ***field_uho;
+    RDouble  **field_uns;
+    RDouble4D *field_str;
+    bool del_field;
+public:
+    FieldProxy();
+    ~FieldProxy();
+public:
+    RDouble *** GetField_UHO();
+    RDouble  ** GetField_UNS();
+    RDouble4D & GetField_STR();
+
+    void SetField_UHO(RDouble ***field_uho, bool del_field = false);
+    void SetField_UNS(RDouble  **field_uns, bool del_field = false);
+    void SetField_STR(RDouble4D *field_str, bool del_field = false);
+};
+
+}
diff --git a/API/Geometry/include/GRHash.h b/API/Geometry/include/GRHash.h
new file mode 100644
index 0000000..f080e84
--- /dev/null
+++ b/API/Geometry/include/GRHash.h
@@ -0,0 +1,430 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      GRhash.h
+//! @brief     Hash table.
+//! @author    Dr. Wang, Bell.
+
+//
+// James's hash table (RDouble hashing)
+// class T cannot be int
+// class T needs to have the following functions:
+// hash_key();
+// operator ==
+// operator =
+//
+// Note: index returned starts from 1 !!!!
+// hash size must be of power of 2
+
+// The follows is noted by Bell.
+// Hash function, h(k,i) = [h1(k) + i*h2(k)] mod m.
+// ii=(hash1+i_prob*hash2)%hash_size --> Double Hashing.
+// iProb: is the i, probing time.
+// hash_size: m, always to be 2^r
+// hash1: h1(k), hash function1, always to be ODD.
+// hash2: h2(k), hash function2, always to be ODD.
+// alpha: load factor = n / m < 1, where, n and m are the number of data and slot, respectively.
+// hash_table: hash table, the position of the element, but the real element is stored in hash_deque.
+// hash_deque: stores the real element. Because of deque STL is used, which is not a random store data-structure,
+//             hash_table is used to store the position, a one-to-one map is build between 
+//             hash_table and the position in hash_deque.
+#include "PHMpi.h"
+#include "Geo_Point.h"
+#include "Geo_Face.h"
+#include "TK_Exit.h"
+
+using namespace std;
+using namespace PHSPACE;
+
+namespace GRIDER_SPACE
+{
+
+#define HASH_MAXI_LOAD 0.8
+#define HASH_INIT_SIZE 128
+
+#define NIL 0 //! Defined as reference <Introduction to Algorithms>.
+
+//typedef unsigned int CAulong;
+typedef            int CAulong;
+
+CAulong gethashkey(const Point3D &p);
+CAulong gethashkey(const Point3D *p);
+
+CAulong gethashkey(const Geo_Face &face);
+CAulong gethashkey(const Geo_Face *face);
+
+bool equal_hash(const Point3D &p1, const Point3D &p2);
+bool equal_hash(const Point3D *p1, const Point3D *p2);
+
+bool equal_hash(const Geo_Face &face1, const Geo_Face &face2);
+bool equal_hash(const Geo_Face *face1, const Geo_Face *face2);
+
+template <class T>
+class Hash {
+public:
+    Hash(CAulong n = HASH_INIT_SIZE)
+    {
+        data_size  = 0;
+        hash_table = 0;
+        hash_size  = n/2;    // because it is doubled in resize
+        hash_deque = new deque<T>; resize();
+    }
+    ~Hash() { delete [] hash_table; delete hash_deque; }
+
+    int insert(const T &p);
+    int insert(const T &p, bool &isExist);
+    int search(const T &p);
+    int erase (const T &p);
+
+    T & operator[](const T &p) { return ((*hash_deque)[insert(p)-1]); }
+    T & operator[](CAulong i) const { return ((*hash_deque)[i]); }
+    T & operator[](CAulong i)  { return ((*hash_deque)[i]); }
+
+    //CAulong size() const { return ((*hash_deque).size()); }    //! It is not suitable for deleting case.
+    CAulong size() const { return data_size; }
+
+    RDouble  load() const { return ((*hash_deque).size()/RDouble(hash_size)); }
+
+    void    clear() 
+    {
+        delete [] hash_table; hash_table = NULL; hash_size = HASH_INIT_SIZE;
+        (*hash_deque).clear();
+        delete hash_deque;
+        hash_deque = new deque<T>;
+        resize();
+    }
+    CAulong probes() const { return i_prob; }
+    void info();
+
+    Hash(const Hash<T> &H) {                    //! Assignment constructor.
+        register CAulong i; CAulong sz = H.size();
+        for (i = 0; i < sz; i ++)
+            (*this).insert((*(H.hash_deque))[i]);
+    }
+
+    //     Hash<T>& operator=(const Hash<T>& H) {      //! Assign operator.
+    //         clear();
+    //         register int i; int sz=H.size();
+    //         for (i=0; i<sz; i++)
+    //             (*this).insert((*(H.hash_deque))[i]);
+    //         return (*this);
+    //     }    
+    Hash<T> &operator = (const Hash<T> &H) {      //! Assign operator.
+        clear();
+        hash_size = H.hash_size;
+        delete [] hash_table;
+        hash_table = new CAulong[hash_size];
+        register CAulong i; CAulong sz = H.size();
+
+        for (i = 0; i < hash_size; i ++) hash_table[i] = H.hash_table[i];
+
+        for (i = 0; i < sz; i ++)
+            hash_deque->push_back(H[i]);
+        return (*this);
+    }
+private:
+    CAulong   data_size;
+    CAulong   hash_size;
+    CAulong  *hash_table;    //! Store the position of elements, value start from '1'.
+    deque<T> *hash_deque;
+    //    sstring     name;
+
+    CAulong     key, hash1, hash2, o_size, i_prob;
+
+    void resize();
+
+    //Hash(const Hash<T>& H) {}    // disable copy constructor
+    //void operator=(const Hash<T>& H) {}    // disable assignment operator
+};
+
+template <class T>
+void Hash<T>::resize()
+{
+    register CAulong ii, jj, kk;
+
+    o_size = static_cast<CAulong>((*hash_deque).size());
+    bool *isDeleted = new bool [o_size];
+    for (int i = 0; i < o_size; ++ i) isDeleted[i] = false;
+
+    //! Mark out which elements have been deleted.
+    if (hash_table)
+    {
+        for (int i = 0; i < hash_size; ++ i)
+        {
+            if (hash_table[i] < NIL)
+            {
+                int position = - hash_table[i];
+                isDeleted[position - 1] = true;
+            }
+        }
+        delete [] hash_table;
+        hash_table = 0;
+    }
+
+    int numberOfElement = 0;
+    for (int i = 0; i < o_size; ++ i)
+    {
+        if (!isDeleted[i]) ++ numberOfElement;
+    }
+
+    //! Resize the hash size, multiply by two.
+    hash_table = new CAulong[hash_size*=2];
+    for (ii = 0; ii < hash_size; ii ++) hash_table[ii] = 0;
+
+    //************************************************
+    //! Erase the deleted element from hash_deque.
+    //************************************************
+    //! Firstly, re-order the non-deleted elements.
+    int iStart = 0, iEnd = o_size - 1;
+    while (iStart <= iEnd)
+    {
+        if (isDeleted[iStart])
+        {
+            while (isDeleted[iEnd] && iStart <= iEnd)
+            {
+                -- iEnd;
+            }
+
+            if (!isDeleted[iEnd] && iStart < iEnd)
+            {
+                (*hash_deque)[iStart] = (*hash_deque)[iEnd];
+
+                ++ iStart;
+                -- iEnd;
+            }
+        }
+        else
+        {
+            ++ iStart;
+        }
+    }
+    
+    if (numberOfElement != iStart)
+    {
+        ostringstream oss;
+        oss << "Error: numberOfElement != iStart " << numberOfElement << "!=" << iStart << endl;
+        TK_Exit::ExceptionExit(oss);
+    }
+
+    //! Secondly, Erase the left elements.
+    int deleteDataNumber = o_size - numberOfElement;
+    int count = 0;
+    while (count < deleteDataNumber)
+    {
+        ++ count;
+        hash_deque->pop_back();
+    }
+    ASSERT(hash_deque->size() == numberOfElement);
+
+    //! Re-build the image: hash_table --> hash_deque.
+    o_size = static_cast<CAulong>(hash_deque->size());
+    for (jj = 0; jj < o_size; jj ++)
+    {
+        key = gethashkey((*hash_deque)[jj]);
+        hash1 = key % hash_size;
+        hash2 = key % (hash_size-1) | 1;
+        kk = 0;
+        while (hash_table[ii=((hash1+kk++*hash2)%hash_size)] != NIL);
+
+        hash_table[ii] = jj+1;
+    }
+
+    delete [] isDeleted;
+}
+
+/*
+This function is used when some data could be erased !!!
+*/
+template <class T>
+int Hash<T>::insert(const T& p, bool &isExist)
+{
+    int index = search(p);
+    if (!index)
+    {
+        isExist = false;
+        index = insert(p);
+    }
+    else
+    {
+        isExist = true;
+    }
+
+    return index;
+}
+
+/*
+This function is used when NO data is erased !!!!!
+insert(): 
+Insert the Type p into hash table,according the hash key.
+E.g. when Type == Point3D, key is the computed from (x, y, z),
+The point index is the same, when the coordinates is same for different points.
+*/
+template <class T>
+int Hash<T>::insert(const T &p)
+{
+    key = gethashkey(p);
+    hash1 = key % hash_size;
+    hash2 = key % (hash_size-1) | 1;
+    register CAulong ii;
+
+    // ii=(hash1+i_prob*hash2)%hash_size --> Double Hashing.
+    for (i_prob = 0; i_prob < hash_size; i_prob ++)
+    {
+        if (hash_table[ii=((hash1+i_prob*hash2)%hash_size)] == NIL)
+        {
+            // Insert
+            (*hash_deque).push_back(p);    // empty slot, insert
+            hash_table[ii] = o_size = static_cast<CAulong>((*hash_deque).size());
+            if (o_size > hash_size*HASH_MAXI_LOAD) resize();
+            ++ data_size;
+            return (o_size);
+        }
+        else if (hash_table[ii] < NIL)
+        {
+            //****************************************************************************
+            //!!This is only used when insert(p, isExist) is used!!!!!
+            //!!The deleted position could be re-insert, when search() is used!!!!!
+            //****************************************************************************
+
+            //! When the element at this position has been deleted,
+            //! it is permission to re-insert other one into this position.
+            int position = - hash_table[ii];
+            hash_table[ii] = position;    //! hash_table is re-marked to be usable.
+
+            (*hash_deque)[position-1] = p;
+            ++ data_size;
+            return position;
+        }
+        else if (equal_hash((*hash_deque)[hash_table[ii]-1], p))
+        {
+            return (hash_table[ii]);    //! Already exist.
+        }
+    }
+
+    return (0);    //! Insert failed.
+}
+
+template <class T>
+int Hash<T>::erase(const T &p)
+{
+    key = gethashkey(p);
+    hash1 = key % hash_size;
+    hash2 = key % (hash_size-1) | 1;
+    register CAulong ii;
+
+    // ii=(hash1+i_prob*hash2)%hash_size --> Double Hashing.
+    for (i_prob = 0; i_prob < hash_size; i_prob ++)
+    {
+        if (hash_table[ii=((hash1+i_prob*hash2)%hash_size)] == NIL)
+        {
+            //! Data not here, do not need to erase.
+            return 0;
+        } 
+        else if (hash_table[ii] < NIL)
+        {
+            //! Deleted position, continue.
+            //! Because element may be exist at the position after 'ii'.
+            continue;
+        }
+        else if (equal_hash((*hash_deque)[hash_table[ii]-1], p))
+        {
+            /*
+            T end = (*hash_deque).back();
+            (*hash_deque)[hash_table[ii]-1] = end;
+
+            key=gethashkey(end);
+            hash1=key%hash_size;
+            hash2=key%(hash_size-1)|1;
+            register CAulong jj;
+            CAulong j_prob;
+            for(j_prob=0; j_prob<hash_size; j_prob++) 
+            {
+                if (hash_table[jj=((hash1+j_prob*hash2)%hash_size)]==0)
+                {
+
+                } 
+                //else if ((*hash_deque)[hash_table[jj]-1]==end) 
+                else if (equal_hash((*hash_deque)[hash_table[jj]-1], end)) 
+                {
+                    hash_table[jj] = hash_table[ii];
+                    break;
+                }
+            }
+            */
+
+            hash_table[ii] *= -1;    // This position is marked as 'Deleted'
+            -- data_size;
+
+            /*
+            (*hash_deque).pop_back();    // Delete the real element from deque container.
+            */
+
+            //! Data not here, do not need to delete.
+            return hash_table[ii];
+        }
+    }
+
+    return 0;    // delete failed
+}
+
+template <class T>
+int Hash<T>::search(const T &p)
+{
+    key = gethashkey(p);
+    hash1 = key % hash_size;
+    hash2 = key % (hash_size-1) | 1;
+    register CAulong ii;
+
+    // ii=(hash1+i_prob*hash2)%hash_size --> Double Hashing.
+    for (i_prob = 0; i_prob < hash_size; i_prob ++)
+    {
+        if (hash_table[ii=((hash1+i_prob*hash2)%hash_size)] == NIL)
+        {
+            return (0);    //! Does not exist.
+        }
+        else if (hash_table[ii] < NIL)
+        {
+            //! Deleted position, continue.
+            //! Because element may be exist at the position after 'ii'.
+            continue;
+        }
+        else if (equal_hash((*hash_deque)[hash_table[ii]-1], p))
+        {
+            return (hash_table[ii]);    //! Found.
+        }
+    }
+
+    return (0);    //! Search failed.
+}
+
+template <class T>
+void Hash<T>::info()
+{
+    if (size() == 0) return;
+
+    T data;
+    CAulong maxp = 0, avp = 0, p;
+
+    for (CAulong i = 0; i < size(); i ++)
+    {
+        data = (*this)[i];
+        search(data);
+        p = probes();
+        avp += p;
+        if (maxp < p) maxp = p;
+    }
+}
+
+
+typedef Hash<Point3D *> PointHash;
+typedef Hash<Geo_Face *> FaceHash;
+}
+
diff --git a/API/Geometry/include/GeneralFieldProxy.h b/API/Geometry/include/GeneralFieldProxy.h
new file mode 100644
index 0000000..ff25e6f
--- /dev/null
+++ b/API/Geometry/include/GeneralFieldProxy.h
@@ -0,0 +1,35 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      GeneralFieldProxy.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+#include "TypeDefine.h"
+
+namespace PHSPACE
+{
+class GeneralFieldProxy
+{
+private:
+    RDouble **field;
+    bool del_field;
+    int ndim;
+    int nsize;
+public:
+    GeneralFieldProxy();
+    ~GeneralFieldProxy();
+public:
+    void Create(int ndim, int nsize);
+    RDouble ** GetField();
+};
+}
diff --git a/API/Geometry/include/Geo_CellMetrics_Struct.h b/API/Geometry/include/Geo_CellMetrics_Struct.h
new file mode 100644
index 0000000..69f5ca6
--- /dev/null
+++ b/API/Geometry/include/Geo_CellMetrics_Struct.h
@@ -0,0 +1,107 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_CellMetrics_Struct.h
+//! @brief     It defines the cell metrics of the structured grid,
+//!            such as the cell center and cell volume.
+//! @author    Bell, He Xin.
+#pragma once
+#include "TypeDefine.h"
+
+namespace PHSPACE
+{
+//! @brief Geo_CellMetrics_Struct class defines the cell metrics of structured grid.
+//! 1: cell center.
+//! 2: cell volume.
+class Geo_CellMetrics_Struct
+{
+private:
+    //! Cell center.
+    RDouble3D *xcc, *ycc, *zcc;
+
+    //! Cell volume.
+    RDouble3D *vol;
+
+    //! Cell length.
+    RDouble3D *xlen, *ylen, *zlen;
+
+    RDouble3D *jacobian;
+
+    //! Used for DES simulation ONLY: largest local grid length, distance of neighbor cell centers.
+    RDouble3D *largestLocalGridLength;
+
+    //! Used for DES simulation ONLY: smallest local grid length, distance of neighbor cell centers.
+    RDouble3D *smallestLocalGridLength;
+
+    //! Used for DES simulation ONLY: sub-grid length.
+    RDouble3D *subgridLength;
+
+public:
+    Geo_CellMetrics_Struct();
+    ~Geo_CellMetrics_Struct();
+
+public:
+    //! Return the X component of cell center (xcc).
+    RDouble3D * GetCellCenterX() const;
+
+    //! Return the Y component of cell center (ycc).
+    RDouble3D * GetCellCenterY() const;
+
+    //! Return the Z component of cell center (zcc).
+    RDouble3D * GetCellCenterZ() const;
+
+    //! Return the cell volume (vol).
+    RDouble3D * GetCellVolume() const;
+
+    //! Return the X direction cell length.
+    RDouble3D * GetCellLengthX() const;
+
+    //! Return the Y direction cell length.
+    RDouble3D * GetCellLengthY() const;
+
+    //! Return the Z direction cell length.
+    RDouble3D * GetCellLengthZ() const;
+
+    //! 
+    RDouble3D * GetCellJacobian() const;
+
+    //! Return the largest local grid spacing.
+    RDouble3D * GetLargestLocalGridLength();
+
+    //! Return the smallest local grid spacing.
+    RDouble3D * GetSmallestLocalGridLength();
+
+    //! Return the sub-grid length, used for DES simulation ONLY.
+    RDouble3D * GetSubgridLength();
+
+    //! Assign the largest local grid spacing.
+    void SetLargestLocalGridLength(RDouble3D *length);
+
+    //! Assign the smallest local grid spacing.
+    void SetSmallestLocalGridLength(RDouble3D *length);
+
+    //! Assign the sub-grid length, used for DES simulation ONLY.
+    void SetSubgridLength(RDouble3D *length);
+
+    //! Init all the metrics pointers (allocate memory).
+    //! @param[in] I
+    //! @param[in] J
+    //! @param[in] K
+    //! @note construct the three dimensional array with Range I, J, K.
+    void AllocateMetrics(Range &I, Range &J, Range &K);
+
+private:
+    //! Deallocate memory of all the metrics array pointers.
+    void DeallocateAll();
+};
+
+#include "Geo_CellMetrics_Struct.hxx"
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_CellMetrics_Struct.hxx b/API/Geometry/include/Geo_CellMetrics_Struct.hxx
new file mode 100644
index 0000000..82b01bb
--- /dev/null
+++ b/API/Geometry/include/Geo_CellMetrics_Struct.hxx
@@ -0,0 +1,95 @@
+inline void Geo_CellMetrics_Struct::DeallocateAll()
+{
+    if (xcc) { delete xcc;    xcc = 0; }
+    if (ycc) { delete ycc;    ycc = 0; }
+    if (zcc) { delete zcc;    zcc = 0; }
+    if (vol) { delete vol;    vol = 0; }
+
+    if (xlen) { delete xlen;    xlen = 0; }
+    if (ylen) { delete ylen;    ylen = 0; }
+    if (zlen) { delete zlen;    zlen = 0; }
+
+    if (jacobian) { delete jacobian;    jacobian = 0; }
+}
+
+inline RDouble3D * Geo_CellMetrics_Struct::GetCellVolume() const
+{
+    return vol;
+}
+
+inline RDouble3D * Geo_CellMetrics_Struct::GetCellLengthX() const
+{
+    return xlen;
+}
+
+inline RDouble3D * Geo_CellMetrics_Struct::GetCellLengthY() const
+{
+    return ylen;
+}
+
+inline RDouble3D * Geo_CellMetrics_Struct::GetCellLengthZ() const
+{
+    return zlen;
+}
+
+inline RDouble3D * Geo_CellMetrics_Struct::GetCellJacobian() const
+{
+    return jacobian;
+}
+
+inline RDouble3D * Geo_CellMetrics_Struct::GetCellCenterX() const
+{
+    return xcc;
+}
+
+inline RDouble3D * Geo_CellMetrics_Struct::GetCellCenterY() const
+{
+    return ycc;
+}
+
+inline RDouble3D * Geo_CellMetrics_Struct::GetCellCenterZ() const
+{
+    return zcc;
+}
+
+inline RDouble3D * Geo_CellMetrics_Struct::GetLargestLocalGridLength()
+{
+    return largestLocalGridLength;
+}
+
+inline RDouble3D * Geo_CellMetrics_Struct::GetSmallestLocalGridLength()
+{
+    return smallestLocalGridLength;
+}
+
+inline RDouble3D * Geo_CellMetrics_Struct::GetSubgridLength()
+{
+    return subgridLength;
+}
+
+inline void Geo_CellMetrics_Struct::SetLargestLocalGridLength(RDouble3D *length)
+{
+    if (this->largestLocalGridLength && this->largestLocalGridLength != length)
+    {
+        delete this->largestLocalGridLength;
+    }
+    this->largestLocalGridLength = length;
+}
+
+inline void Geo_CellMetrics_Struct::SetSmallestLocalGridLength(RDouble3D *length)
+{
+    if (this->smallestLocalGridLength && this->smallestLocalGridLength != length)
+    {
+        delete this->smallestLocalGridLength;
+    }
+    this->smallestLocalGridLength = length;
+}
+
+inline void Geo_CellMetrics_Struct::SetSubgridLength(RDouble3D *length)
+{
+    if (this->subgridLength && this->subgridLength != length)
+    {
+        delete this->subgridLength;
+    }
+    this->subgridLength = length;
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_CellMetrics_Unstruct.h b/API/Geometry/include/Geo_CellMetrics_Unstruct.h
new file mode 100644
index 0000000..66305c3
--- /dev/null
+++ b/API/Geometry/include/Geo_CellMetrics_Unstruct.h
@@ -0,0 +1,83 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_CellMetrics_Unstruct.h
+//! @brief     It defines the cell metrics of the unstructured grid,
+//!            such as the cell center and cell volume.
+//! @author    Bell, He Xin.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "Precision.h"
+namespace PHSPACE
+{
+//! @brief Geo_CellMetrics_Unstruct class defines the cell metrics of unstructured grid.\n
+//! 1: cell center.\n
+//! 2: cell volume.
+class Geo_CellMetrics_Unstruct
+{
+private:
+    //! Cell center data, including ghost cells.
+    RDouble *xcc, *ycc, *zcc;
+
+    //! Cell volume data, excluding ghosts.
+    RDouble *vol; 
+
+    //! Used for DES simulation ONLY: largest local grid length, distance of neighbor cell centers.
+    RDouble *largestLocalGridLength;
+
+    //! Used for DES simulation ONLY: sub-grid length.
+    RDouble *subgridLength;
+public:
+    LIB_EXPORT Geo_CellMetrics_Unstruct();
+    LIB_EXPORT ~Geo_CellMetrics_Unstruct();
+
+public:
+    //! Assign the given pointer to the X Cell center data.
+    void SetCellCenterX(RDouble *xcc);
+
+    //! Assign the given pointer to the Y Cell center data.
+    void SetCellCenterY(RDouble *ycc);
+
+    //! Assign the given pointer to the Z Cell center data.
+    void SetCellCenterZ(RDouble *zcc);
+
+    //! Assign the given pointer to the Cell volume data.
+    void SetCellVolume(RDouble *vol);
+
+    //! Assign the largest local grid spacing.
+    void SetLargestLocalGridLength(RDouble *length);
+
+    //! Assign the sub-grid length, used for DES simulation ONLY.
+    void SetSubgridLength(RDouble *length);
+
+    //! Return the X pointer of cell center.
+    RDouble * GetCellCenterX() const;
+
+    //! Return the X pointer of cell center.
+    RDouble * GetCellCenterY() const;
+
+    //! Return the X pointer of cell center.
+    RDouble * GetCellCenterZ() const;
+
+    //! Return the cell volume pointer.
+    RDouble * GetCellVolume()  const;
+
+    //! Return the largest local grid spacing.
+    RDouble * GetLargestLocalGridLength();
+
+    //! Return the sub-grid length, used for DES simulation ONLY.
+    RDouble * GetSubgridLength();
+};
+
+#include "Geo_CellMetrics_Unstruct.hxx"
+
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_CellMetrics_Unstruct.hxx b/API/Geometry/include/Geo_CellMetrics_Unstruct.hxx
new file mode 100644
index 0000000..39d3547
--- /dev/null
+++ b/API/Geometry/include/Geo_CellMetrics_Unstruct.hxx
@@ -0,0 +1,83 @@
+inline RDouble * Geo_CellMetrics_Unstruct::GetCellCenterX() const
+{
+    return xcc;
+}
+
+inline RDouble * Geo_CellMetrics_Unstruct::GetCellCenterY() const
+{
+    return ycc;
+}
+
+inline RDouble * Geo_CellMetrics_Unstruct::GetCellCenterZ() const
+{
+    return zcc;
+}
+
+inline RDouble * Geo_CellMetrics_Unstruct::GetCellVolume()  const
+{
+    return vol;
+}
+
+inline void Geo_CellMetrics_Unstruct::SetCellCenterX(RDouble *xcc)
+{
+    if (this->xcc && this->xcc != xcc)
+    {
+        delete [] this->xcc;
+    }
+    this->xcc = xcc;
+}
+
+inline void Geo_CellMetrics_Unstruct::SetCellCenterY(RDouble *ycc)
+{
+    if (this->ycc && this->ycc != ycc)
+    {
+        delete [] this->ycc;
+    }
+    this->ycc = ycc;
+}
+
+inline void Geo_CellMetrics_Unstruct::SetCellCenterZ(RDouble *zcc)
+{
+    if (this->zcc && this->zcc != zcc)
+    {
+        delete [] this->zcc;
+    }
+    this->zcc = zcc;
+}
+
+inline void Geo_CellMetrics_Unstruct::SetCellVolume(RDouble *vol)
+{
+    if (this->vol && this->vol != vol)
+    {
+        delete [] this->vol;
+    }
+    this->vol = vol;
+}
+
+inline void Geo_CellMetrics_Unstruct::SetLargestLocalGridLength(RDouble *length)
+{
+    if (this->largestLocalGridLength && this->largestLocalGridLength != length)
+    {
+        delete [] this->largestLocalGridLength;
+    }
+    this->largestLocalGridLength = length;
+}
+
+inline void Geo_CellMetrics_Unstruct::SetSubgridLength(RDouble *length)
+{
+    if (this->subgridLength && this->subgridLength != length)
+    {
+        delete [] this->subgridLength;
+    }
+    this->subgridLength = length;
+}
+
+inline RDouble * Geo_CellMetrics_Unstruct::GetLargestLocalGridLength()
+{
+    return largestLocalGridLength;
+}
+
+inline RDouble * Geo_CellMetrics_Unstruct::GetSubgridLength()
+{
+    return subgridLength;
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_CellTopo_Unstruct.h b/API/Geometry/include/Geo_CellTopo_Unstruct.h
new file mode 100644
index 0000000..5252974
--- /dev/null
+++ b/API/Geometry/include/Geo_CellTopo_Unstruct.h
@@ -0,0 +1,113 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_CellTopo_Unstruct.h
+//! @brief     It defines the cell topology of the unstructured grid,
+//!            such as the cell-face and cell-node connected relationship.
+//! @author    Bell, He Xin, Tang Jin.
+#pragma once
+#include <vector>
+#include "LIB_Macro.h"
+
+namespace PHSPACE
+{
+//! @brief Geo_CellTopo_Unstruct class defines the cell-face, cell-node connected relationship of unstructured grid.\n
+//! 1: faces of each cell.\n
+//! 2: nodes of each cell.\n
+//! 3: neighbor cells of each cell.
+class Geo_CellTopo_Unstruct
+{
+private:
+    //! Number of faces per cell.
+    int *face_number_of_each_cell;
+
+    //! Cell to face: face index of each cell.
+    int **cell2face;
+
+    //! Number of cells per cell.
+    int *node_number_of_each_cell;
+
+    //! Cell to node: node index of each cell.
+    int *cell2node;
+
+    //! Cell to node: node index of each cell.
+    int **cell2nodeArray;
+
+    //! Number of neighbor cells per cell;
+    int *number_of_neighbor_cell;
+
+    //! Cell to cell: neighbor cell index of each cell.
+    vector<int> *cell2cell;
+    // GMRESVis
+    vector<int> * neighborCells;
+    vector<int> * neighborFaces;
+    vector<int> * neighborLR;
+
+public:
+    LIB_EXPORT Geo_CellTopo_Unstruct();
+    LIB_EXPORT ~Geo_CellTopo_Unstruct();
+
+public:
+    //! Set the number of faces per cell.
+    void SetFaceNumberOfEachCell(int *face_number_of_each_cell);
+
+    //! Set the cell to face.
+    void SetCell2Face(int **cell2faceIn);
+
+    //! Set the number of cells per cell.
+    void SetNodeNumberOfEachCell(int *node_number_of_each_cell);
+
+    //! Set the cell to node.
+    void SetCell2Node(int *cell2node);
+
+    //! Set the cell to node.
+    void SetCell2NodeArray(int **cell2nodeArrayIn);
+
+    //! Set number of neighbor cells per cell.
+    void SetNumberOfNeighborCell(int *number_of_neighbor_cell);
+
+    //! Set the cell to cell: neighbor cell index of each cell.
+    void SetCell2Cell(vector<int> *cell2cell);
+    
+    // GMRESVis
+    void GMRESSetNeighborCells(vector<int> * neighborCells);
+    void GMRESSetNeighborFaces(vector<int> * neighborFaces);
+    void GMRESSetNeighborLR(vector<int> * neighborLR);
+
+    //! Get the number of faces per cell.
+    int * GetFaceNumberOfEachCell();
+
+    //! Get the cell to face: face index of each cell.
+    int ** GetCell2Face();
+
+    //! Get number of nodes per cell.
+    int * GetNodeNumberOfEachCell();
+
+    //! Get the cell to node: node index of each cell.
+    int * GetCell2Node();
+
+    //! Get the cell to node: node index of each cell.
+    int ** GetCell2NodeArray();
+
+    //! Get number of neighbor cells per cell.
+    int * GetNumberOfNeighborCell();
+
+    //! Get the cell to cell: neighbor cell index of each cell.
+    vector<int> * GetCell2Cell();
+    
+    // GMRESVis
+    vector<int> * GMRESGetNeighborCells();
+    vector<int> * GMRESGetNeighborFaces();
+    vector<int> * GMRESGetNeighborLR();
+};
+
+#include "Geo_CellTopo_Unstruct.hxx"
+}
diff --git a/API/Geometry/include/Geo_CellTopo_Unstruct.hxx b/API/Geometry/include/Geo_CellTopo_Unstruct.hxx
new file mode 100644
index 0000000..59ff19a
--- /dev/null
+++ b/API/Geometry/include/Geo_CellTopo_Unstruct.hxx
@@ -0,0 +1,147 @@
+inline void Geo_CellTopo_Unstruct::SetFaceNumberOfEachCell(int *face_number_of_each_cell)
+{
+    if (this->face_number_of_each_cell && this->face_number_of_each_cell != face_number_of_each_cell)
+    {
+        delete [] this->face_number_of_each_cell;
+    }
+    this->face_number_of_each_cell = face_number_of_each_cell;
+}
+
+inline void Geo_CellTopo_Unstruct::SetCell2Face(int **cell2faceIn)
+{
+    if (this->cell2face && this->cell2face != cell2faceIn)
+    {
+        delete [] cell2face[0];
+        delete [] cell2face;
+    }
+    cell2face = cell2faceIn;
+}
+
+inline void Geo_CellTopo_Unstruct::SetNodeNumberOfEachCell(int *node_number_of_each_cell)
+{
+    if (this->node_number_of_each_cell && this->node_number_of_each_cell != node_number_of_each_cell)
+    {
+        delete [] this->node_number_of_each_cell; 
+    }
+    this->node_number_of_each_cell = node_number_of_each_cell;
+}
+
+inline void Geo_CellTopo_Unstruct::SetCell2Node(int *cell2node)
+{
+    if (this->cell2node && this->cell2node != cell2node)
+    {
+        delete [] this->cell2node;
+    }
+    this->cell2node = cell2node;
+}
+
+inline void Geo_CellTopo_Unstruct::SetCell2NodeArray(int **cell2nodeArrayIn)
+{
+    if (this->cell2nodeArray && this->cell2nodeArray != cell2nodeArray)
+    {
+        delete [] cell2nodeArray[0];
+        delete [] cell2nodeArray;
+    }
+    this->cell2nodeArray = cell2nodeArrayIn;
+}
+
+inline void Geo_CellTopo_Unstruct::SetNumberOfNeighborCell(int *number_of_neighbor_cell)
+{
+    if (this->number_of_neighbor_cell && this->number_of_neighbor_cell != number_of_neighbor_cell)
+    {
+        delete [] this->number_of_neighbor_cell;
+    }
+    this->number_of_neighbor_cell = number_of_neighbor_cell;
+}
+
+inline void Geo_CellTopo_Unstruct::SetCell2Cell(vector<int> *cell2cell)
+{
+    if (this->cell2cell && this->cell2cell != cell2cell)
+    {
+        delete this->cell2cell;
+    }
+    this->cell2cell = cell2cell;
+}
+
+// GMRESVis
+inline void Geo_CellTopo_Unstruct::GMRESSetNeighborCells(vector<int> * neighborCells)
+{
+	if(this->neighborCells && this->neighborCells != neighborCells)
+	{
+		delete this->neighborCells;
+	}
+	this->neighborCells = neighborCells;
+}
+
+// GMRESVis
+inline void Geo_CellTopo_Unstruct::GMRESSetNeighborFaces(vector<int> * neighborFaces)
+{
+	if(this->neighborFaces && this->neighborFaces != neighborFaces)
+	{
+		delete this->neighborFaces;
+	}
+	this->neighborFaces = neighborFaces;
+}
+
+// GMRESVis
+inline void Geo_CellTopo_Unstruct::GMRESSetNeighborLR(vector<int> * neighborLR)
+{
+	if(this->neighborLR && this->neighborLR != neighborLR)
+	{
+		delete this->neighborLR;
+	}
+	this->neighborLR = neighborLR;
+}
+
+inline int * Geo_CellTopo_Unstruct::GetFaceNumberOfEachCell() 
+{
+    return face_number_of_each_cell;
+}
+
+inline int ** Geo_CellTopo_Unstruct::GetCell2Face()
+{
+    return cell2face;
+}
+
+inline int * Geo_CellTopo_Unstruct::GetNodeNumberOfEachCell()
+{
+    return node_number_of_each_cell;
+}
+
+inline int * Geo_CellTopo_Unstruct::GetCell2Node()
+{
+    return cell2node;
+}
+
+inline int ** Geo_CellTopo_Unstruct::GetCell2NodeArray()
+{
+    return cell2nodeArray;
+}
+
+inline int * Geo_CellTopo_Unstruct::GetNumberOfNeighborCell()
+{
+    return number_of_neighbor_cell;
+}
+
+inline vector<int> * Geo_CellTopo_Unstruct::GetCell2Cell()
+{
+    return cell2cell;
+}
+
+// GMRESVis
+inline vector<int> * Geo_CellTopo_Unstruct::GMRESGetNeighborCells()
+{
+	return neighborCells;
+}
+
+// GMRESVis
+inline vector<int> * Geo_CellTopo_Unstruct::GMRESGetNeighborFaces()
+{
+	return neighborFaces;
+}
+
+// GMRESVis
+inline vector<int> * Geo_CellTopo_Unstruct::GMRESGetNeighborLR()
+{
+	return neighborLR;
+}
diff --git a/API/Geometry/include/Geo_DynamicGridMetrics_Struct.h b/API/Geometry/include/Geo_DynamicGridMetrics_Struct.h
new file mode 100644
index 0000000..86eff73
--- /dev/null
+++ b/API/Geometry/include/Geo_DynamicGridMetrics_Struct.h
@@ -0,0 +1,78 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_DynamicGridMetrics_Struct.h
+//! @brief     It defines the dynamic grid metrics of the structured grid,
+//!            such as the face normal velocity.
+//! @author    Bell, Chang Xinghua, Zhang Jian, He Xin.
+
+#pragma once
+#include "TypeDefine.h"
+namespace PHSPACE
+{
+//! @brief Geo_DynamicGridMetrics_Struct class defines the dynamic grid metrics of the structured grid.
+//! 1: Cell volume of the last time step.
+//! 2: Face normal velocity.
+//! 3: Face velocity.
+class Geo_DynamicGridMetrics_Struct
+{
+private:
+    //! Cell volume of the last time step.
+    RDouble3D *voln;
+
+    //! Face normal velocity.
+    RDouble4D *vgn;
+
+    //! Face velocity.
+    RDouble4D *xfv, *yfv, *zfv;
+    
+public:
+    Geo_DynamicGridMetrics_Struct();
+    ~Geo_DynamicGridMetrics_Struct();
+
+public:
+    //! Return the cell volume of the last time step (voln).
+    RDouble3D * GetCellVolumeOld() const;
+
+    //! Return the Face normal velocity (vgn).
+    RDouble4D * GetFaceNormalVelocity() const;
+
+    //! Return the x component of face velocity (xfv).
+    RDouble4D * GetFaceVelocityX() const;
+
+    //! Return the y component of face velocity (yfv).
+    RDouble4D * GetFaceVelocityY() const;
+
+    //! Return the z component of face velocity (zfv).
+    RDouble4D * GetFaceVelocityZ() const;
+
+    //! Assign the cell volume of the last time step (voln).
+    void SetCellVolumeOld(RDouble3D *voln);
+
+    //! Assign the Face normal velocity (vgn).
+    void SetFaceNormalVelocity(RDouble4D *vgn);
+
+    //! Assign the x component of face velocity (xfv).
+    void SetFaceVelocityX(RDouble4D *xfv);
+
+    //! Assign the y component of face velocity (yfv).
+    void SetFaceVelocityY(RDouble4D *yfv);
+
+    //! Assign the z component of face velocity (zfv).
+    void SetFaceVelocityZ(RDouble4D *zfv);
+
+private:
+    void DeallocateAll();
+
+};
+
+#include "Geo_DynamicGridMetrics_Struct.hxx"
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_DynamicGridMetrics_Struct.hxx b/API/Geometry/include/Geo_DynamicGridMetrics_Struct.hxx
new file mode 100644
index 0000000..fe995c6
--- /dev/null
+++ b/API/Geometry/include/Geo_DynamicGridMetrics_Struct.hxx
@@ -0,0 +1,78 @@
+inline void Geo_DynamicGridMetrics_Struct::DeallocateAll()
+{
+    if (voln != NULL) { delete voln;   voln = NULL; }
+    if (xfv  != NULL) { delete xfv;    xfv  = NULL; }
+    if (yfv  != NULL) { delete yfv;    yfv  = NULL; }
+    if (zfv  != NULL) { delete zfv;    zfv  = NULL; }
+    if (vgn  != NULL) { delete vgn;    vgn  = NULL; }
+}
+
+inline RDouble3D * Geo_DynamicGridMetrics_Struct::GetCellVolumeOld() const
+{
+    return voln;
+}
+
+inline RDouble4D * Geo_DynamicGridMetrics_Struct::GetFaceNormalVelocity() const
+{
+    return vgn;
+}
+
+inline RDouble4D * Geo_DynamicGridMetrics_Struct::GetFaceVelocityX() const
+{
+    return xfv;
+}
+
+inline RDouble4D * Geo_DynamicGridMetrics_Struct::GetFaceVelocityY() const
+{
+    return yfv;
+}
+
+inline RDouble4D * Geo_DynamicGridMetrics_Struct::GetFaceVelocityZ() const
+{
+    return zfv;
+}
+
+inline void Geo_DynamicGridMetrics_Struct::SetFaceVelocityX(RDouble4D *xfv)
+{
+    if (this->xfv && this->xfv != xfv)
+    {
+        delete this->xfv;
+    }
+    this->xfv = xfv;
+}
+
+inline void Geo_DynamicGridMetrics_Struct::SetFaceVelocityY(RDouble4D *yfv)
+{
+    if (this->yfv && this->yfv != yfv)
+    {
+        delete this->yfv;
+    }
+    this->yfv = yfv;
+}
+
+inline void Geo_DynamicGridMetrics_Struct::SetFaceVelocityZ(RDouble4D *zfv)
+{
+    if (this->zfv && this->zfv != zfv)
+    {
+        delete this->zfv;
+    }
+    this->zfv = zfv;
+}
+
+inline void Geo_DynamicGridMetrics_Struct::SetCellVolumeOld(RDouble3D *voln)
+{
+    if (this->voln && this->voln != voln)
+    {
+        delete this->voln;
+    }
+    this->voln = voln;
+}
+
+inline void Geo_DynamicGridMetrics_Struct::SetFaceNormalVelocity(RDouble4D *vgn)
+{
+    if (this->vgn && this->vgn != vgn)
+    {
+        delete this->vgn;
+    }
+    this->vgn = vgn;
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_DynamicGridMetrics_Unstruct.h b/API/Geometry/include/Geo_DynamicGridMetrics_Unstruct.h
new file mode 100644
index 0000000..8b15091
--- /dev/null
+++ b/API/Geometry/include/Geo_DynamicGridMetrics_Unstruct.h
@@ -0,0 +1,74 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_DynamicGridMetrics_Unstruct.h
+//! @brief     It defines the dynamic grid metrics of the unstructured grid,
+//!            such as the face normal velocity.
+//! @author    Bell (Modified).
+
+#pragma once
+#include "LIB_Macro.h"
+#include "Precision.h"
+namespace PHSPACE
+{
+//! @brief Geo_DynamicGridMetrics_Unstruct class defines dynamic mesh metrics of unstructured grid.\n
+//! 1: face normal velocity.\n
+//! 2: face velocity.
+class Geo_DynamicGridMetrics_Unstruct
+{
+private:
+    //! Cell volume of the last time step.
+    RDouble *voln;
+
+    //! Face normal velocity.
+    RDouble *vgn;
+
+    //! face velocity.
+    RDouble *xfv, *yfv, *zfv;
+
+public:
+    LIB_EXPORT Geo_DynamicGridMetrics_Unstruct();
+    LIB_EXPORT ~Geo_DynamicGridMetrics_Unstruct();
+
+public:
+    //! Assign the given pointer to the X face velocity.
+    void SetFaceVelocityX(RDouble *xfv);
+
+    //! Assign the given pointer to the Y face velocity.
+    void SetFaceVelocityY(RDouble *yfv);
+
+    //! Assign the given pointer to the Z face velocity.
+    void SetFaceVelocityZ(RDouble *zfv);
+    
+    //! Assign the given pointer to the face normal velocity.
+    void SetFaceNormalVelocity(RDouble *vgn);
+
+    //! Assign the given pointer to the Cell volume of the last time step.
+    void SetCellVolumeOld(RDouble *voln);
+
+    //! Return the X face velocity pointer.
+    RDouble * GetFaceVelocityX() const;
+
+    //! Return the Y face velocity pointer.
+    RDouble * GetFaceVelocityY() const;
+
+    //! Return the Z face velocity pointer.
+    RDouble * GetFaceVelocityZ() const;
+
+    //! Return the face normal velocity pointer.
+    RDouble * GetFaceNormalVelocity() const;
+
+    //! Return the cell volume of the last time step.
+    RDouble * GetCellVolumeOld() const;
+};
+
+#include "Geo_DynamicGridMetrics_Unstruct.hxx"
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_DynamicGridMetrics_Unstruct.hxx b/API/Geometry/include/Geo_DynamicGridMetrics_Unstruct.hxx
new file mode 100644
index 0000000..223c75a
--- /dev/null
+++ b/API/Geometry/include/Geo_DynamicGridMetrics_Unstruct.hxx
@@ -0,0 +1,48 @@
+inline void Geo_DynamicGridMetrics_Unstruct::SetFaceVelocityX(RDouble *xfv)
+{
+    this->xfv = xfv;
+}
+
+inline void Geo_DynamicGridMetrics_Unstruct::SetFaceVelocityY(RDouble *yfv)
+{
+    this->yfv = yfv;
+}
+
+inline void Geo_DynamicGridMetrics_Unstruct::SetFaceVelocityZ(RDouble *zfv)
+{
+    this->zfv = zfv;
+}
+inline void Geo_DynamicGridMetrics_Unstruct::SetFaceNormalVelocity(RDouble *vgn)
+{
+    this->vgn = vgn;
+}
+
+inline void Geo_DynamicGridMetrics_Unstruct::SetCellVolumeOld(RDouble *voln)
+{
+    this->voln = voln;
+}
+
+inline RDouble * Geo_DynamicGridMetrics_Unstruct::GetFaceVelocityX() const
+{
+    return xfv;
+}
+
+inline RDouble * Geo_DynamicGridMetrics_Unstruct::GetFaceVelocityY() const
+{
+    return yfv;
+}
+
+inline RDouble * Geo_DynamicGridMetrics_Unstruct::GetFaceVelocityZ() const
+{
+    return zfv;
+}
+
+inline RDouble * Geo_DynamicGridMetrics_Unstruct::GetFaceNormalVelocity() const
+{
+    return vgn;
+}
+
+inline RDouble * Geo_DynamicGridMetrics_Unstruct::GetCellVolumeOld() const
+{
+    return voln;
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_Element.h b/API/Geometry/include/Geo_Element.h
new file mode 100644
index 0000000..e22cabd
--- /dev/null
+++ b/API/Geometry/include/Geo_Element.h
@@ -0,0 +1,177 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_Element.h
+//! @brief     Explain this file briefly.
+//! @author    xxx
+
+#pragma once
+#include "Math_BasisFunction.h"
+#include "cgnslib.h"
+using namespace std;
+
+namespace PHSPACE
+{
+class BasicElement
+{
+public:
+    typedef vector< int > int_array;
+public:
+    BasicElement();
+    ~BasicElement();
+private:
+    int elem_type;
+    vector< int_array > mp_struct;     //! Midpoint data structure.
+    vector< int_array > child_element_index;
+    vector< int_array > child_element_index_case2;
+    vector< int > child_element_type;
+    vector< int > face_element_type;
+    vector< int_array > face_list;
+
+    vector< int >       composite_face_element_type;
+    vector< int_array > composite_face_list;
+public:
+    void Init(int elem_type);
+    //!
+    int_array & GetElementPhysicsFace(int iFace) { return composite_face_list[iFace]; }
+    //!
+    int GetElementPhysicsFaceType(int iFace) const { return composite_face_element_type[iFace]; }
+    //! Get the face number of element.
+    uint_t GetElementFaceNumber() const { return face_list.size(); }
+    //!
+    uint_t GetElementPhysicsFaceNumber() const { return composite_face_list.size(); }
+    //! Get the element type.
+    int GetElementType() const { return elem_type; }
+    //! Get the node number of element.
+    int GetElementNodeNumber(int elem_type);
+    //! Get the refine element type.
+    int GetRefineElemType(int elem_type, const bool &anisotropicAdapt);
+    //! Get the simple element type.
+    int GetSimpleElemType(int elem_type);
+    //! Whether the type is basic element or not.
+    bool ISBasicElement(int elem_type);
+    //! Whether the type is face element or not.
+    bool IsFaceElementType(int elementType);
+    //!
+    bool IsFaceElementTypeAtLeast(int elementType);
+    //! Whether the type is volume element or not.
+    bool IsBasicVolumeElementType(int elementType);
+    //! Get the faces of element.
+    int_array & GetElementFace(int iFace) { return face_list[iFace]; }
+    //! Get the type of the element faces.
+    int GetFaceElementType(int iFace) const { return face_element_type[iFace]; }
+
+    int_array & GetMPlist(int i) { return mp_struct[i]; }
+    //! Get the index of child element.
+    int_array & GetChildIndex(int i) { return child_element_index[i]; }
+    //! Get the number of child element.
+    uint_t GetChildElementNumber() const { return child_element_type.size(); }
+    //! Get the type of child element.
+    int GetChildElementType(int i) { return child_element_type[i]; }
+    //! Get the relative node index of child element.
+    vector< int > & GetChildElementRelativeNodeIndex(int iChildElement) { return child_element_index[iChildElement]; }
+    vector< int > & GetChildElementRelativeNodeIndexCase2(int iChildElement) { return child_element_index_case2[iChildElement]; }
+};
+
+class ElementProxy
+{
+public:
+    ElementProxy();
+    ~ElementProxy();
+private: 
+    BasicElement **basic_element;
+    int basic_element_number;
+public:
+    BasicElement * GetBasicElement(int elem_type) { return basic_element[elem_type]; }
+};
+
+class IndexArray
+{
+public:
+    IndexArray();
+    ~IndexArray();
+private:
+    vector<int> index;
+public:
+    uint_t size() { return index.size(); }
+    void resize(int n) { index.resize(n); }
+
+    int& operator[](int i)
+    {
+        return index[i];
+    }
+
+    const int& operator[](int i) const
+    {
+        return index[i];
+    }
+};
+
+//! The following sections is copy from HyperFLOW 3.0.
+//! Copy start.
+class ElementInitializingClass
+{
+public:
+    ElementInitializingClass();
+    ~ElementInitializingClass();
+public:
+    void InitConstants();
+};
+
+const int INVALID_INDEX = -1;
+const int PENTA_12      = NofValidElementTypes;
+const int QUAD_6        = NofValidElementTypes+1;
+//! Get the refine element type.
+int GetRefineElemType(int elementType, const bool &anisotropicAdapt);
+//! Get the simple element type.
+int GetSimpleElementType(int elementType);
+//! Whether the type is basic element or not.
+bool ISBasicElement(int elementType);
+//! Whether the type is face element or not.
+bool IsFaceElementType(int elementType);
+//!
+bool IsFaceElementTypeAtLeast(int elementType);
+//! Whether the type is volume element or not.
+bool IsBasicVolumeElementType(int elementType);
+//! Get the basic element type.
+BasicElement * GetBasicElement(int elementType);
+//! Get the number of child element.
+uint_t GetChildElementNumbers(int elementType);
+//! Get the number of child element.
+uint_t GetChildElementNumber(int elementType);
+//! Get the node number of element.
+int GetElementNodeNumbers(int elementType);
+//!
+vector<int> & GetRelatedPointListForMiddlePointComputation(int elem_type, int i);
+//!//! If the right cell is boundary face.
+bool IsBoundaryFace(const int &rightCellIndex);
+//! If the right cell is not exist.
+bool IsElementNotExist(const int &rightCellIndex);
+//! Copy end.
+//! Get the number of basic element.
+int GetNumberOfBasicElement();
+
+typedef enum
+{
+
+    TYPE_EDGE,            /* Edge */
+    TYPE_FACE_TRIA,       /* Triangle */
+    TYPE_FACE_QUAD,       /* Quadrangle */
+    TYPE_FACE_POLY,       /* Simple Polygon */
+    TYPE_CELL_TETRA,      /* Tetrahedron */
+    TYPE_CELL_PYRAM,      /* Pyramid */
+    TYPE_CELL_PRISM,      /* Prism (pentahedron) */
+    TYPE_CELL_HEXA,       /* Hexahedron (brick) */
+    TYPE_CELL_POLY,       /* Simple Polyhedron (convex or quasi-convex) */
+    TYPE_N_ELEMENT_TYPES, /* Number of element types */
+    TYPE_NOT_CONSIDERED
+} ElementType;
+}
diff --git a/API/Geometry/include/Geo_Face.h b/API/Geometry/include/Geo_Face.h
new file mode 100644
index 0000000..82b6892
--- /dev/null
+++ b/API/Geometry/include/Geo_Face.h
@@ -0,0 +1,61 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_Face.h
+//! @brief     It defines the face topology, with left and right cell.
+//! @author    Bell.
+#pragma once
+using namespace std;
+
+namespace PHSPACE
+{
+class Geo_Face
+{
+public:
+    //! Left cell id.
+    int le;
+
+    //! Right cell id.
+    int re;
+
+    //! Face id.
+    int faceID;
+
+    //! Maximum face id in global, it would be a estimated appropriate value.
+    int maxFaceID;
+
+public:
+    Geo_Face();
+    Geo_Face(const int &le, const int &re, const int &id, int maxFaceID = 102400);
+    Geo_Face(const Geo_Face &rhs);
+    Geo_Face & operator = (const Geo_Face &rhs);
+    ~Geo_Face();
+
+public:
+    //! Get face id.
+    int GetID() const { return faceID; }
+    void SetID(const int &id) { this->faceID = id; }
+
+    int hash_key() const;
+
+    bool operator < (const Geo_Face &rhs) const;
+    friend bool operator == (const Geo_Face &face1, const Geo_Face &face2)
+    {
+        if (&face1 == &face2) return true;
+
+        return (face1.le == face2.le && face1.re == face2.re);
+        //return (face1.le == face2.le && face1.re == face2.re && face1.faceID == face2.faceID);
+    }
+};
+
+}
+
+#include "Geo_Face.hxx"
diff --git a/API/Geometry/include/Geo_Face.hxx b/API/Geometry/include/Geo_Face.hxx
new file mode 100644
index 0000000..83491e8
--- /dev/null
+++ b/API/Geometry/include/Geo_Face.hxx
@@ -0,0 +1,67 @@
+#include "Math_BasisFunction.h"
+using namespace std;
+
+namespace PHSPACE
+{
+
+inline Geo_Face::Geo_Face()
+{
+
+}
+
+inline Geo_Face::Geo_Face(const int &le, const int &re, const int &id, int maxFaceID)
+{
+    this->le     = le;
+    this->re     = re;
+    this->faceID = id;
+    this->maxFaceID = maxFaceID;
+}
+
+inline Geo_Face::Geo_Face(const Geo_Face &rhs)
+{
+    this->le     = rhs.le;
+    this->re     = rhs.re;
+    this->faceID = rhs.faceID;
+    this->maxFaceID = rhs.maxFaceID;
+}
+
+inline Geo_Face::~Geo_Face(void)
+{
+
+}
+
+inline Geo_Face & Geo_Face::operator = (const Geo_Face &rhs)
+{
+    if (this == &rhs) return *this;
+
+    this->le     = rhs.le;
+    this->re     = rhs.re;
+    this->faceID = rhs.faceID;
+    this->maxFaceID = rhs.maxFaceID;
+
+    return *this;
+}
+
+inline bool Geo_Face::operator < (const Geo_Face &rhs) const
+{
+    int dx = le - rhs.le;
+    int dy = re - rhs.re;
+
+    if (ABS(dx) > 0) return le < rhs.le;
+    if (ABS(dy) > 0) return re < rhs.re;
+
+    return false;
+}
+
+inline int Geo_Face::hash_key() const
+{
+    unsigned long temp1, temp2;
+    int hashNumber;
+
+    temp1 = (le + re) * 23;
+    temp2 = le * re;
+    hashNumber = (temp1 + temp2) % maxFaceID;
+    return hashNumber;
+}
+
+}
diff --git a/API/Geometry/include/Geo_FaceMetrics_Struct.h b/API/Geometry/include/Geo_FaceMetrics_Struct.h
new file mode 100644
index 0000000..b814f82
--- /dev/null
+++ b/API/Geometry/include/Geo_FaceMetrics_Struct.h
@@ -0,0 +1,83 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_FaceMetrics_Struct.h
+//! @brief     It defines the face metrics of the structured grid,
+//!            such as the face area and face normal.
+//! @author    Bell, He Xin, Zhang Jian.
+#pragma once
+#include "TypeDefine.h"
+
+namespace PHSPACE
+{
+//! @brief Geo_FaceMetrics_Struct class defines the face metrics of structured grid.
+//! 1: face normal.
+//! 2: face area.
+//! 3: face vector.
+class Geo_FaceMetrics_Struct
+{
+private:
+    //! UNIT face normal.
+    RDouble4D *xfn, *yfn, *zfn;
+
+    //! Face area.
+    RDouble4D *area;
+
+    //! Face vector.
+    RDouble4D *xFaceVector, *yFaceVector, *zFaceVector;
+
+    RDouble5D *xyzFaceVector_FD;
+    RDouble5D *xyzFaceNormal_FD;
+
+public:
+    Geo_FaceMetrics_Struct();
+    ~Geo_FaceMetrics_Struct();
+
+public:
+    //! Return the X component of UNIT face normal (xfn).
+    RDouble4D * GetFaceNormalX() const;
+
+    //! Return the Y component of UNIT face normal (yfn).
+    RDouble4D * GetFaceNormalY() const;
+
+    //! Return the Z component of UNIT face normal (zfn).
+    RDouble4D * GetFaceNormalZ() const;
+
+    //! Return the face area (area).
+    RDouble4D * GetFaceArea() const;
+
+    //! Return the X component of face vector (xFaceVector).
+    RDouble4D * GetFaceVectorX() const;
+
+    //! Return the Y component of face vector (yFaceVector).
+    RDouble4D * GetFaceVectorY() const;
+
+    //! Return the Z component of face vector (zFaceVector).
+    RDouble4D * GetFaceVectorZ() const;
+
+    RDouble5D * GetFaceVector_FD() const;
+    RDouble5D * GetFaceNormal_FD() const;
+
+    //! Init all the metrics pointers (allocate memory).
+    //! @param[in] I.
+    //! @param[in] J.
+    //! @param[in] K.
+    //! @param[in] D.
+    //! @note construct the four dimensional array with Range I, J, K, D.
+    void AllocateMetrics(Range &I, Range &J, Range &K, Range &D);
+
+private:
+    //! Deallocate memory of all the metrics array pointers.
+    void DeallocateAll();
+};
+
+#include "Geo_FaceMetrics_Struct.hxx"
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_FaceMetrics_Struct.hxx b/API/Geometry/include/Geo_FaceMetrics_Struct.hxx
new file mode 100644
index 0000000..1c4d96c
--- /dev/null
+++ b/API/Geometry/include/Geo_FaceMetrics_Struct.hxx
@@ -0,0 +1,59 @@
+inline RDouble4D * Geo_FaceMetrics_Struct::GetFaceNormalX() const
+{
+    return xfn;
+}
+
+inline RDouble4D * Geo_FaceMetrics_Struct::GetFaceNormalY() const
+{
+    return yfn;
+}
+
+inline RDouble4D * Geo_FaceMetrics_Struct::GetFaceNormalZ() const
+{
+    return zfn;
+}
+
+inline RDouble4D * Geo_FaceMetrics_Struct::GetFaceArea() const
+{
+    return area;
+}
+
+inline RDouble4D * Geo_FaceMetrics_Struct::GetFaceVectorX() const
+{
+    return xFaceVector;
+}
+
+inline RDouble4D * Geo_FaceMetrics_Struct::GetFaceVectorY() const
+{
+    return yFaceVector;
+}
+
+inline RDouble4D * Geo_FaceMetrics_Struct::GetFaceVectorZ() const
+{
+    return zFaceVector;
+}
+
+inline RDouble5D * Geo_FaceMetrics_Struct::GetFaceVector_FD() const
+{
+    return xyzFaceVector_FD;
+}
+
+inline RDouble5D * Geo_FaceMetrics_Struct::GetFaceNormal_FD() const
+{ 
+    return xyzFaceNormal_FD;
+}
+
+inline void Geo_FaceMetrics_Struct::DeallocateAll()
+{
+    if (xfn)  { delete xfn;      xfn = 0; }
+    if (yfn)  { delete yfn;      yfn = 0; }
+    if (zfn)  { delete zfn;      zfn = 0; }
+    if (area) { delete area;    area = 0; }
+
+    if (xFaceVector) { delete xFaceVector;    xFaceVector = 0; }
+    if (yFaceVector) { delete yFaceVector;    yFaceVector = 0; }
+    if (zFaceVector) { delete zFaceVector;    zFaceVector = 0; }
+
+    if (xyzFaceVector_FD) { delete xyzFaceVector_FD;    xyzFaceVector_FD = 0; }
+    if (xyzFaceNormal_FD) { delete xyzFaceNormal_FD;    xyzFaceNormal_FD = 0; }
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_FaceMetrics_Unstruct.h b/API/Geometry/include/Geo_FaceMetrics_Unstruct.h
new file mode 100644
index 0000000..7aec9f6
--- /dev/null
+++ b/API/Geometry/include/Geo_FaceMetrics_Unstruct.h
@@ -0,0 +1,86 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_FaceMetrics_Unstruct.h
+//! @brief     It defines the face metrics of the unstructured grid,
+//!            such as the face center and face normal.
+//! @author    Bell (Modified).
+
+#pragma once
+#include "LIB_Macro.h"
+#include "Precision.h"
+namespace PHSPACE
+{
+//! @brief Geo_FaceMetrics_Unstruct class defines the face metrics of unstructured grid.\n
+//! 1: face center.\n
+//! 2: face normal.\n
+//! 3: face area.
+class Geo_FaceMetrics_Unstruct
+{
+private:
+    //! Face center data.
+    RDouble *xfc, *yfc, *zfc;
+
+    //! Face UNIT normal data.
+    RDouble *xfn, *yfn, *zfn;
+
+    //! Face area.
+    RDouble *area;
+public:
+    LIB_EXPORT Geo_FaceMetrics_Unstruct();
+    LIB_EXPORT ~Geo_FaceMetrics_Unstruct();
+
+public:
+    //! Assign the given pointer to the X Face center data.
+    void SetFaceCenterX(RDouble *xfc);
+
+    //! Assign the given pointer to the Y Face center data.
+    void SetFaceCenterY(RDouble *yfc);
+
+    //! Assign the given pointer to the Z Face center data.
+    void SetFaceCenterZ(RDouble *zfc);
+
+    //! Assign the given pointer to the X Face UNIT normal data.
+    void SetFaceNormalX(RDouble *xfn);
+
+    //! Assign the given pointer to the Y Face UNIT normal data.
+    void SetFaceNormalY(RDouble *yfn);
+
+    //! Assign the given pointer to the Z Face UNIT normal data.
+    void SetFaceNormalZ(RDouble *zfn);
+
+    //! Assign the given pointer to the Face area.
+    void SetFaceArea(RDouble *area);
+
+    //! Return the X pointer of face center.
+    RDouble * GetFaceCenterX() const;
+
+    //! Return the Y pointer of face center.
+    RDouble * GetFaceCenterY() const;
+
+    //! Return the Z pointer of face center.
+    RDouble * GetFaceCenterZ() const;
+
+    //! Return the X pointer of face UNIT normal.
+    RDouble * GetFaceNormalX() const;
+
+    //! Return the Y pointer of face UNIT normal.
+    RDouble * GetFaceNormalY() const;
+
+    //! Return the Z pointer of face UNIT normal.
+    RDouble * GetFaceNormalZ() const;
+
+    //! Return the face area.
+    RDouble * GetFaceArea() const;
+};
+
+#include "Geo_FaceMetrics_Unstruct.hxx"
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_FaceMetrics_Unstruct.hxx b/API/Geometry/include/Geo_FaceMetrics_Unstruct.hxx
new file mode 100644
index 0000000..3b1d28c
--- /dev/null
+++ b/API/Geometry/include/Geo_FaceMetrics_Unstruct.hxx
@@ -0,0 +1,97 @@
+inline void Geo_FaceMetrics_Unstruct::SetFaceCenterX(RDouble *xfc)
+{
+    if (this->xfc && this->xfc != xfc)
+    {
+        delete [] this->xfc;
+    }
+    this->xfc = xfc;
+}
+
+inline void Geo_FaceMetrics_Unstruct::SetFaceCenterY(RDouble *yfc)
+{
+    if (this->yfc && this->yfc != yfc)
+    {
+        delete [] this->yfc;
+    }
+    this->yfc = yfc;
+}
+
+inline void Geo_FaceMetrics_Unstruct::SetFaceCenterZ(RDouble *zfc)
+{
+    if (this->zfc && this->zfc != zfc)
+    {
+        delete [] this->zfc;
+    }
+    this->zfc = zfc;
+}
+
+inline void Geo_FaceMetrics_Unstruct::SetFaceNormalX(RDouble *xfn)
+{
+    if (this->xfn && this->xfn != xfn)
+    {
+        delete [] this->xfn;
+    }
+    this->xfn = xfn;
+}
+
+inline void Geo_FaceMetrics_Unstruct::SetFaceNormalY(RDouble *yfn)
+{
+    if (this->yfn && this->yfn != yfn)
+    {
+        delete [] this->yfn;
+    }
+    this->yfn = yfn;
+}
+
+inline void Geo_FaceMetrics_Unstruct::SetFaceNormalZ(RDouble *zfn)
+{
+    if (this->zfn && this->zfn != zfn)
+    {
+        delete [] this->zfn;
+    }
+    this->zfn = zfn;
+}
+
+inline void Geo_FaceMetrics_Unstruct::SetFaceArea(RDouble *area)
+{
+    if (this->area && this->area != area)
+    {
+        delete [] this->area;
+    }
+    this->area = area;
+}
+
+inline RDouble * Geo_FaceMetrics_Unstruct::GetFaceCenterX() const
+{
+    return this->xfc;
+}
+
+inline RDouble * Geo_FaceMetrics_Unstruct::GetFaceCenterY() const
+{
+    return this->yfc;
+}
+
+inline RDouble * Geo_FaceMetrics_Unstruct::GetFaceCenterZ() const
+{
+    return this->zfc;
+}
+
+inline RDouble * Geo_FaceMetrics_Unstruct::GetFaceNormalX() const
+{
+    return this->xfn;
+}
+
+inline RDouble * Geo_FaceMetrics_Unstruct::GetFaceNormalY() const
+{
+    return this->yfn;
+}
+
+inline RDouble * Geo_FaceMetrics_Unstruct::GetFaceNormalZ() const
+{
+    return this->zfn;
+}
+
+inline RDouble * Geo_FaceMetrics_Unstruct::GetFaceArea() const
+{
+    return this->area;
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_FaceTopo_Unstruct.h b/API/Geometry/include/Geo_FaceTopo_Unstruct.h
new file mode 100644
index 0000000..2409d0d
--- /dev/null
+++ b/API/Geometry/include/Geo_FaceTopo_Unstruct.h
@@ -0,0 +1,91 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_FaceTopo_Unstruct.h
+//! @brief     It defines the face topology of the unstructured grid,
+//!            such as the face-cell and face-node connected relationship.
+//! @author    Bell (Modified).
+
+#pragma once
+#include "LIB_Macro.h"
+namespace PHSPACE
+{
+//! @brief Geo_FaceTopo_Unstruct class defines the face-node connected relationship of unstructured grid.\n
+//! 1: right and left cell of each face.\n
+//! 2: nodes list of each face.
+class Geo_FaceTopo_Unstruct
+{
+private:
+    //! Left cell index of each face.\n
+    //! Left Cell: the cell that the INVERSE face normal point to.
+    int *left_cell_of_face;
+
+    //! Right cell index of each face.\n
+    //! Right Cell: the cell that the face normal point to.
+    int *right_cell_of_face;
+
+    //! Number of nodes per face.  
+    int *node_number_of_each_face;
+
+    //! Face to node: node index of each face.
+    int *face2node;  
+
+    //! The face2node is a 1D array which record every face's node index.
+    //! face2nodeSubscript records each face's starting subcript of the face2node array.
+    long long int *face2nodeSubscript;
+
+    //! Face to node: node index of each face.
+    int **face2nodeArray;
+
+public:
+    LIB_EXPORT Geo_FaceTopo_Unstruct();
+    LIB_EXPORT ~Geo_FaceTopo_Unstruct();
+
+public:
+    //! Set the left cell list of each face.
+    void SetLeftCellOfFace(int *left_cell_of_face_in);
+
+    //! Set the right cell list of each face.
+    void SetRightCellOfFace(int *right_cell_of_face_in); 
+
+    //! Set the number of nodes per face.
+    void SetNodeNumberOfEachFace(int *node_number_of_each_face);
+
+    //! Set the face to node, node index of each face.
+    void SetFace2Node(int *face2node);
+
+    //! Set each face's starting subscript in the face2node array.
+    void SetFace2NodeSubscript(long long int *face2nodeSubscript);
+
+    //!
+    void SetFace2NodeArray(int **face2NodeArrayIn);
+
+    //! Get the left cell list of each face.
+    int * GetLeftCellOfFace() const;
+
+    //! Get the right cell list of each face.
+    int * GetRightCellOfFace() const;
+
+    //! Get the number of nodes per face.
+    int * GetNodeNumberOfEachFace() const;
+
+    //! Get the face to node, node index of each face.
+    int * GetFace2Node() const;
+
+    //! Get each face's starting subscript in the face2node array.
+    long long int * GetFace2NodeSubscript() const;
+
+    //! Get the face to node, node index of each face.
+    int ** GetFace2NodeArray() const;
+};
+
+#include "Geo_FaceTopo_Unstruct.hxx"
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_FaceTopo_Unstruct.hxx b/API/Geometry/include/Geo_FaceTopo_Unstruct.hxx
new file mode 100644
index 0000000..bfb3c30
--- /dev/null
+++ b/API/Geometry/include/Geo_FaceTopo_Unstruct.hxx
@@ -0,0 +1,79 @@
+inline void Geo_FaceTopo_Unstruct::SetLeftCellOfFace(int *left_cell_of_face_in) 
+{ 
+//  if ( this->left_cell_of_face && this->left_cell_of_face != left_cell_of_face_in ) 
+//  {
+//      delete [] this->left_cell_of_face;
+//      this->left_cell_of_face = 0;
+//  }
+    this->left_cell_of_face = left_cell_of_face_in;
+}
+
+inline void Geo_FaceTopo_Unstruct::SetRightCellOfFace(int *right_cell_of_face_in)
+{
+//  if (this->right_cell_of_face && this->right_cell_of_face != right_cell_of_face_in)
+//  {
+//      delete [] this->right_cell_of_face;
+//      this->right_cell_of_face = 0;
+//  }
+    this->right_cell_of_face = right_cell_of_face_in;
+}
+
+inline void Geo_FaceTopo_Unstruct::SetNodeNumberOfEachFace(int *node_number_of_each_face)
+{
+//  if (this->node_number_of_each_face && this->node_number_of_each_face != node_number_of_each_face)
+//  {
+//      delete [] this->node_number_of_each_face;
+//      this->node_number_of_each_face = 0;
+//  }
+    this->node_number_of_each_face = node_number_of_each_face;
+}
+
+inline void Geo_FaceTopo_Unstruct::SetFace2Node(int *face2node)
+{
+//  if (this->face2node && this->face2node != face2node)
+//  {
+//      delete [] this->face2node;
+//      this->face2node = 0;
+//  }
+    this->face2node = face2node;
+}
+
+inline void Geo_FaceTopo_Unstruct::SetFace2NodeSubscript(long long int *face2nodeSubscript)
+{
+    this->face2nodeSubscript = face2nodeSubscript;
+}
+
+inline int * Geo_FaceTopo_Unstruct::GetLeftCellOfFace() const
+{
+    return left_cell_of_face;
+}
+
+inline int * Geo_FaceTopo_Unstruct::GetRightCellOfFace() const
+{
+    return right_cell_of_face;
+}
+
+inline int * Geo_FaceTopo_Unstruct::GetNodeNumberOfEachFace() const
+{
+    return node_number_of_each_face;
+}
+
+inline int * Geo_FaceTopo_Unstruct::GetFace2Node() const
+{
+    return face2node;
+}
+
+inline int ** Geo_FaceTopo_Unstruct::GetFace2NodeArray() const
+{
+    return face2nodeArray;
+}
+
+inline long long int * Geo_FaceTopo_Unstruct::GetFace2NodeSubscript() const
+{
+    return face2nodeSubscript;
+}
+
+inline void Geo_FaceTopo_Unstruct::SetFace2NodeArray(int **face2NodeArrayIn)
+{
+    this->face2nodeArray = face2NodeArrayIn;
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_Grid.h b/API/Geometry/include/Geo_Grid.h
new file mode 100644
index 0000000..976f743
--- /dev/null
+++ b/API/Geometry/include/Geo_Grid.h
@@ -0,0 +1,594 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_Grid.h
+//! @brief     It defines the class 'Grid', which is the base class of geometry grid.
+//!            The inheriting order is: SimpleGrid -> Grid -> StructuredGrid/UnstructuredGrid.
+//! @author    Bell, He Xin.
+
+#pragma once
+#include "LinkStruct.h"
+#include "Geo_GridIndex.h"
+#include "DataStruct_Sort.h"
+#include "Geo_Interpoint.h"
+#include "Geo_Interface.h"
+#include "ActionKey.h"
+#include "Data_Field.h"
+#include "Data_Param.h"
+#include "FieldProxy.h"
+#include "OversetInformation.h"
+#include "Geo_SimpleVC.h"
+
+namespace PHSPACE
+{
+//! @brief It defines the class 'Grid', which is the base class of Structured or Unstructured geometry grid.
+//!        It is usually used in the whole code, it could be used to represent both Structured or Unstructured grid.
+//!        The inheriting order is: SimpleGrid -> Grid -> StructuredGrid/UnstructuredGrid.
+class Grid : public SimpleGrid
+{
+public:
+    Grid();
+    virtual ~Grid();
+    
+protected: 
+    //! Grid dimension.
+    //! -# 2: two dimensional grid.
+    //! -# 3: three dimensional grid.
+    int dimension;
+
+    //! The grid type.
+    //! -# 0: UNSTRUCTGRID.
+    //! -# 1: STRUCTGRID.
+    //! -# 2: MIXGRID.
+    int type;
+
+    //! Grid level in Multi-Grid method, level = 0, 1, 2, 3 ...
+    //! It starts from 0, which is the original finest level.
+    //! The coarse level is obtained by agglomerate the finer level grid.
+    int level;
+
+    //! The number of Total Faces.
+    int nTotalFace;
+
+    //! The number of Total Cells.
+    int nTotalCell;
+
+    //! The number of boundary faces which include interface faces.
+    int nBoundFace;
+
+    //! The number of interface faces.
+    //! Interface faces: faces between different zones,
+    //! such as faces between zones in different unstructured grid partitions,
+    //! and faces between zones in different structured grid blocks.
+    int nIFace;
+
+    //! Interface topology information of interface faces.
+    InterfaceInfo *interfaceInfo;
+
+    //! Interpoint topology information of interface points.
+    InterpointInformation *interpointInformation;
+
+    //! Interface fields information.
+    //! Stores the field variables that need to communicate between different gird of zones.
+    InterfaceFields *interfaceFields;
+
+    //! Interpoint fields information.
+    //! Stores the field variables that need to communicate between different grid of zones.
+    InterpointFields *interpointFields;
+
+    //! Coarser grid of the current grid.
+    //! 'c' represents 'coarse'.
+    Grid *cGrid;
+
+    //! Finer grid of the current grid.
+    //! 'f' represents 'fine'.
+    Grid *fGrid;
+
+    //! Store any type of flow field variables, such as velocity, time, temperature.
+    Data_Field *gField;
+
+    //! Store any type of control parameters, such as int, double, string.
+    Data_Param *gPara;
+  
+    //! Grid index.
+    GridID *index;
+
+    //! Overset or overlapping Grid information.
+    OversetInfoProxy *oversetInfoProxy;
+
+    //! Overset information for unstructured overset cell interpolation(need further revise)
+    OversetInformationProxy *oversetInformationProxy;
+
+    //! The grid at the last time.
+    //! It is used in unsteady dynamic grid method.
+    SimpleGrid *oldGrid;
+
+    //! which block the grid belongs to.
+    int iBlock;
+
+    //! The probes' number of the current grid.
+    int zoneProbesNumber;
+
+    //! The probes' global index of the current grid.
+    vector<int> zoneProbesGlobalID;
+
+    //! The probes' line index of the current grid.
+    vector<int> zoneProbesLineID;
+
+    //! The probes' surface index of the current grid.
+    vector<int> zoneProbesSurfaceID;
+
+    //! The probes' coordinates of the current grid.
+    vector<vector<RDouble> > zoneProbesCoordinates;
+
+    //! The grid file index current grid belong, only used in multi-file grid convert.
+    int fileIndexCurrentGridBelong;
+
+    SimpleVC *volumeCondition;
+
+private:
+    //! 
+    int own_database;
+
+public:
+    //! Assign the value to the grid dimension.
+    void SetDim(int dim);
+
+    //! Assign the value to the multi-grid level.
+    void SetLevel(int level);
+
+    //! Assign the value to the number of Total faces.
+    void SetNTotalFace(int nTotalFace);
+
+    //! Assign the value to the number of Total Cells.
+    void SetNTotalCell(int nTotalCell);
+
+    //! Assign the value to the number of boundary faces which include interface faces.
+    void SetNBoundFace(int nBoundFace);
+
+    //! Assign the value to the number of interfaces.
+    void SetNIFace(int nIFace);
+
+    //! Assign the pointer to the interface topology information of interface faces.
+    void SetInterfaceInfo(InterfaceInfo *interfaceInfo);
+
+    //! Assign the pointer to the interface topology information of interface faces.
+    void SetInterfaceFields(InterfaceFields *interfaceFields) { this->interfaceFields = interfaceFields; }
+
+    //! Assign the pointer to the interpoint topology information of interface points.
+    //! @param[in] interpointInformation    an object of class InterpointInformation.
+    void SetInterpointInfo(InterpointInformation *interpointInformation);
+
+    //! Assign the pointer to coarser grid of the current grid;
+    //! 'c' represents 'coarse'.
+    void SetCoarseGrid(Grid *cGrid);
+
+    //! Assign the pointer to finer grid of the current grid;
+    //! 'f' represents 'fine'.
+    void SetFineGrid(Grid *fGrid);
+
+    //! Assign the value to the global zone grid index.
+    void SetZoneID(int index);
+
+    //! Assign the value to the local zone grid index.
+    void SetZoneLocalID(int index);
+
+    //! Assign the pointer to the overset or overlapping Grid information.
+    void SetOversetInfoProxy(OversetInfoProxy *oversetInfoProxy);
+
+    //! Assign the pointer to the overset information for unstructured overset cell interpolation.
+    void SetOversetInformationProxy(OversetInformationProxy *oversetInformationProxyIn);
+
+    //! Assign iBlock.
+    void SetIBlock(int iBlockIn);
+
+    //! Assign the probes number of each zone grid.
+    void SetZoneProbesNumber(int zoneProbesNumberIn);
+
+    //! Assign the probes global index of each zone grid.
+    void SetZoneProbesGlobalID(vector<int> &zoneProbesGlobalIDIn);
+    //! Assign the probes line index of each zone grid.
+    void SetZoneProbesLineID(vector<int> &zoneProbesLineIDIn);
+    //! Assign the probes surface index of each zone grid.
+    void SetZoneProbesSurfaceID(vector<int> &zoneProbesSurfaceIDIn);
+
+    //! Assign the probes coordinates of each zone grid.
+    void SetZoneProbesCoordinates(vector<vector<RDouble> > &zoneProbesCoordinatesIn);
+
+    void SetVolumeCondition(SimpleVC *volumeConditionIn);
+    SimpleVC *GetVolumeConditionIn();
+
+    //! Return the grid dimension.
+    int GetDim() const;
+
+    //! Return the grid type.
+    //! -# 0: UNSTRUCTGRID
+    //! -# 1: STRUCTGRID
+    //! -# 2: MIXGRID
+    int Type() const;
+
+    //! Return the grid level in Multi-Grid method, level = 0, 1, 2, 3 ...
+    //! It starts from 0, which is the original finest level.
+    //! The coarse level is obtained by agglomerate the finer level grid.
+    int GetLevel() const;
+
+    //! Return the number of Total Faces.
+    int GetNTotalFace() const;
+
+    //! Return the value to the number of Total Cells.
+    int GetNTotalCell() const;
+
+    //! Return the value to the number of boundary faces which include interface faces.
+    int GetNBoundFace() const;
+
+    //! Return The number of interface faces.
+    //! Interface faces: faces between different zones,
+    //! such as faces between zones in different unstructured grid partitions,
+    //! and faces between zones in different structured grid blocks.
+    int GetNIFace() const;
+
+    //! Return the interface topology information of interface faces.
+    InterfaceInfo * GetInterfaceInfo() const;
+
+    //! Return the interpoint topology information of interface points.
+    //! @param[out] interpointInformation    the object of class InterpointInformation.
+    InterpointInformation * GetInterpointInfo() const;
+
+    //! Return the Interface fields information.
+    //! Stores the field variables that need to communicate between different gird of zones.
+    InterfaceFields * GetInterfaceFields();
+
+    //! Return the Interpoint fields information.
+    //! @param[out] interpointFields    Interpoint fields information.
+    InterpointFields * GetInterpointFields();
+
+    //! Return the Coarser grid of the current grid.
+    Grid * GetCoarseGrid() const;
+
+    //! Return the Finer grid of the current grid.
+    Grid * GetFineGrid() const;
+
+    //! Copy any type of control parameters from give pointer, such as int, RDouble, string.
+    void CopyPara(Data_Param *gPara);
+
+    //! Copy any type of flow field variables from give pointer, such as velocity, time, temperature.
+    void CopyField(Data_Field *gField);
+
+    //! Return the Grid index.
+    GridID * GetGridID() const;
+
+    //! Return the Global Zone Grid index.
+    int GetZoneID() const;
+
+    //! Return the Local Zone Grid index.
+    int GetZoneLocalID() const;
+
+    //! Return the overset or overlapping Grid information.
+    OversetInfoProxy * GetOversetInfoProxy() const;
+
+    //! Return the overset information for unstructured overset cell interpolation.
+    OversetInformationProxy * GetOversetInformationProxy() const;
+
+    //! Return iBlock.
+    int GetIBlock();
+
+    //! Return the probes number of each zone grid.
+    int GetZoneProbesNumber() const;
+
+    //! Return the probes global index of each zone grid.
+    vector<int> GetZoneProbesGlobalID() const;
+    //! Return the probes line index of each zone grid.
+    vector<int> GetZoneProbesLineID() const;
+    //! Return the probes surface index of each zone grid.
+    vector<int> GetZoneProbesSurfaceID() const;
+
+    //! Return the probes coordinates of each zone grid.
+    vector<vector<RDouble> > GetZoneProbesCoordinates() const;
+
+    //! Is this grid is the finest grid, in multi-grid method.
+    bool IsFinestGrid();
+
+    //! Is this grid is the coarsest grid, in multi-grid method.
+    bool IsCoarsestGrid();
+
+    //! Return the initial finest level grid, in multi-grid method.
+    LIB_EXPORT Grid * GetFinestGrid();
+    
+    //! Back up the grid at the last time step.
+    //! It is used in unsteady dynamic grid method.
+    LIB_EXPORT virtual void BackUpOldGrid();
+
+    //! Return the grid at the last time step.
+    //! It is used in unsteady dynamic grid method.
+    SimpleGrid * GetOldGrid();
+
+    void SetOldGrid(SimpleGrid *oldGrid);
+
+    //! Register an interface field (variable) into buffer which is loaded on grid, used in parallel communication.
+    //! The interface field variable buffer is set to be ZERO.
+    //! @param[in] name    variable name of the interface field that need to be communicated.
+    //! @param[in] type    variable type of the interface field.
+    //! -# PHINT   : Integer type.
+    //! -# PHFLOAT : Float type.
+    //! -# PHDouble: Double type.
+    //! @param[in] dimension    variable dimension.
+    //! -# 1: 1-D array.
+    //! -# 2: 2-D array.
+    //! -# n: n-D array.
+    LIB_EXPORT void RegisterInterfaceField(const string &name, const int type, const int dimesion, const int solverID);
+
+    LIB_EXPORT void ReleaseInterfaceField();
+
+    LIB_EXPORT void ReleaseInterfaceField(string varName);
+    
+    //! Register an interpoint field (variable) into buffer which is loaded on grid, used in parallel communication.
+    //! The interpoint field variable buffer is set to be ZERO.
+    //! @param[in] name    variable name of the interface field that need to be communicated.
+    //! @param[in] type    variable type of the interface field.
+    //! -# PHINT   : Integer type.
+    //! -# PHFLOAT : Float type.
+    //! -# PHDouble: Double type.
+    //! @param[in] dimension    variable dimension.
+    //! -# 1: 1-D array.
+    //! -# 2: 2-D array.
+    //! -# n: n-D array.
+    LIB_EXPORT void RegisterInterpointField(const string &name, const int type, const int dimesion, const int solverID);
+
+    //! Allocate storage for overset field of inner cells and donor cells.
+    LIB_EXPORT virtual void RegisterOversetField(const string &name, const int type, const int dimesion);
+    
+    //! This subroutine calculates the new set of coordinates,
+    //! after a rotation by 'dangle' and a translation by 'tcoord'.
+    //! @param[in]  coord0    Original coordinates.
+    //! @param[out] xyzref    New coordinates, after rotation and translation.
+    LIB_EXPORT void RotTransVel(RDouble *xyzref, RDouble *dangle, RDouble *tcoord, RDouble **coord0);
+
+    //! This subroutine calculates the grid velocity at the cell vertexes.
+    //! Compute the components of the rotation vector.
+    //! Omega (psip, thetap, phip) in the frame (k0, jh, i) where
+    //! k0 = -sin theta * i + cos theta sin phi * j + cos theta cos phi * k
+    //! jh = cos phi * j - sin phi * k.
+    //! Omega(p,q,r) in the frame (i,j,k) angle0(1,.) = (psi,theta,phi)
+    //! psi is not set since it is not needed.
+    //! @param[in] angle0    Euler's angles and their time derivatives.
+    //! @param[in] coord0    position of the reference point abd their time derivatives.
+    LIB_EXPORT void ComputeGDVel(RDouble *xt, RDouble *yt, RDouble *zt, RDouble **angle0, RDouble **coord0);
+    
+    //! Turn the Y axis to be up, if the original Z axis is up.
+    LIB_EXPORT void RotateAboutAxis();
+
+    //! Read grid from file.
+    LIB_EXPORT virtual void ReadGrid(fstream &file) = 0;
+
+    //! Write grid to file.
+    LIB_EXPORT virtual void WriteGrid(fstream &file) = 0;
+
+    //! Compress the grid data structure into data container.
+    LIB_EXPORT virtual void Encode(DataContainer *cdata, int flag) = 0;
+
+    //! Decompress the grid data structure from data container.
+    LIB_EXPORT virtual void Decode(DataContainer *cdata, int flag) = 0;
+
+    //! 
+    LIB_EXPORT virtual void ReviseNeighborZoneIndex(int zoneStart) = 0;
+
+    //! Update the grid coordinates from data container.
+    LIB_EXPORT virtual void UpdateCoordinate(DataContainer *cdata) = 0;
+
+    //! Initialize the grid after the object has been created.
+    LIB_EXPORT virtual void InitGrid(GridID *index, int level, int dim, int type);
+
+    //! Static the mesh skewness only for unstructured grid.
+    //! Skewness, 0 represents bad mesh quality; 1 represents satisfactory quality.
+    LIB_EXPORT virtual RDouble SkewnessSummary(ActionKey *actkey = 0) = 0;
+
+    //! Initialize over-lapping grid information.
+    LIB_EXPORT virtual void AllocateOversetGrid() = 0;
+
+    //! Compute the grid metrics, such as volume, face area, cell center, face center, etc.
+    LIB_EXPORT virtual void ComputeMetrics(ActionKey *actkey = 0) = 0;
+
+    //! Compute node bctype in each zone.
+    LIB_EXPORT virtual void ComputeNodeBCType() {};
+
+    //! Get the grid cell center data.
+    LIB_EXPORT virtual void GetCellCenter(ActionKey *actkey) = 0;
+
+    //! Translate the grid cell center data.
+    LIB_EXPORT virtual void TranslateCellCenter(ActionKey *actkey) = 0;
+
+    //! Compute and return the number of wall faces.
+    LIB_EXPORT virtual int GetNumberOfWallCell() = 0;
+
+    //! Compute node weight for Least Square Approach.
+    LIB_EXPORT virtual void ComputeWeight() = 0;
+
+    //! Compute the minimum and maximum distance between two grid nodes in whole computational zones.
+    LIB_EXPORT virtual void GetMinMaxDS(RDouble &dismin, RDouble &dismax) = 0;
+
+    //! Compute the minimum and maximum distance between two grid nodes on Boundary.
+    LIB_EXPORT virtual void GetBoundaryMinMax(RDouble *pmin, RDouble *pmax) = 0;
+
+    //! Compute the coarse grid of the current grid,
+    //! using agglomeration method, for multi-grid method.
+    LIB_EXPORT virtual void CoarseGrids(int nlmax) = 0;
+
+    //! Initialize the BC information of structured grid,
+    //! such as left and right cell of the BC faces.
+    LIB_EXPORT virtual void ProcessBCInfo() = 0;
+    LIB_EXPORT virtual void SetLnkInfo() = 0;
+
+    //! Change the BC type, if necessary.
+    LIB_EXPORT virtual void ChangeBCType(int from_bctype, int to_bctype) = 0;
+
+    //! Build the interface topology link between different zones.
+    //! Such as faces between zones in different unstructured grid partitions,
+    //! and faces between zones in different structured grid blocks.
+    LIB_EXPORT virtual void BuildGridLink(LinkStruct *link) = 0;
+    
+    //! Update the cell volume between two time step.
+    LIB_EXPORT virtual void UpdateVolold() = 0;
+
+    //! Compute the difference flow variable normal between two time step.
+    LIB_EXPORT virtual void CVGNorm(FieldProxy *q_1_proxy, FieldProxy *q_0_proxy, int neqn, RDouble &norm) = 0;
+    
+    //! Compute the grid velocity.
+    LIB_EXPORT virtual void GridSurfaceVelocity(RDouble *xt, RDouble *yt, RDouble *zt) = 0;
+
+    LIB_EXPORT void GridVerticeVelocity(RDouble *xt, RDouble *yt, RDouble *zt);
+
+    LIB_EXPORT virtual void ComputeGridFaceVelocity() = 0;
+
+    //! Compute the minimum distance of the grid edges.
+    LIB_EXPORT virtual RDouble CalMinEdgeLength() = 0;
+
+    //! Compute the maximum distance of the grid edges.
+    LIB_EXPORT virtual RDouble CalMaxEdgeLength() = 0;
+
+    //! Write face boundary condition to file stream.
+    LIB_EXPORT virtual void WriteFaceBC(fstream &file) = 0;
+
+    //! Initialize the dynamic/moving grid information.
+    LIB_EXPORT void InitMovingGrids();
+
+    //! Check grid validity.
+    LIB_EXPORT void GridValidityCheck();
+
+    //! 
+    virtual void InitWallDist() = 0;
+
+    //! 
+    virtual void ReadWalldist(RDouble *wallDistIn) = 0;
+
+    //!
+    virtual void ReadNearestwallfacenormalx(RDouble *nearestwallfaceNormalxIn) = 0;
+    virtual void ReadNearestwallfacenormaly(RDouble *nearestwallfaceNormalyIn) = 0;
+    virtual void ReadNearestwallfacenormalz(RDouble *nearestwallfaceNormalzIn) = 0;
+
+    //! 
+    virtual void DumpWalldist(ActionKey *actkey) = 0;
+
+    virtual void DumpWallFaceCenter(ActionKey *actkey) = 0;
+
+    //! Update a data pointer into the Running-Data-Base.
+    //! @param[in] name    Name of the data pointer, type of string.
+    //! @param[in] data    The data pointer that need to be stored in Running-Data-Base.
+    void UpdateDataPtr(const string &name, void *data);
+
+    //! Update a data into the Running-Data-Base.
+    //! @param[in] name    Name of the data, type of string.
+    //! @param[in] data    The data that need to be stored in Running-Data-Base.
+    //! @param[in] size    The size of the data.
+    //! @param[in] type    The data type.
+    //! -# PHINT   : integer type.
+    //! -# PHFLOAT : RFloat type.
+    //! -# PHDOUBLE: RDouble type.
+    //! -# PHSTRING: string type.
+    //! -# PHBOOL  : bool type.
+    void UpdateData(const string &name, void *data, int type, int size);
+
+    //! Get data pointer with name of 'name' from Running-Data-Base.
+    void * GetDataPtr(const string &name) const;
+   
+    //! Get data with name of 'name' from Running-Data-Base.
+    //! @param[out] data    The data that need to be got from Running-Data-Base.
+    //! @param[in]  name    Name of the data, type of string.
+    //! @param[in]  size    The size of the data.
+    //! @param[in]  type    The data type.
+    //! -# PHINT   : integer type.
+    //! -# PHFLOAT : RFloat type.
+    //! -# PHDOUBLE: RDouble type.
+    //! -# PHSTRING: string type.
+    //! -# PHBOOL  : bool type.
+    void GetData(const string &name, void *data, int type, int size);
+
+    //! Delete a data with name of 'name' from Running-Data-Base.
+    void DeleteDataPtr(const string &name) const;
+
+    void SetFileIndex(int fileIndex);
+    int  GetFileIndex();
+
+    set < Data_IndexData > * GetDataSet();
+
+    //! Action mechanism, these action is not allowed to be calling by library.
+    virtual void Action(ActionKey *actkey) = 0;
+    virtual void TranslateAction(ActionKey *actkey) = 0;
+    virtual streamsize TranslateActionLength(ActionKey *actkey) = 0;
+    virtual void ReSetBoundaryConditionByGlobalBC() {};
+    virtual void InitVariableWallTemperature() {};
+    //! Allocate memory for walldist.
+    virtual void AllocateWalldist() = 0;
+    virtual void GetBcNamePair(set< pair<int, string> > &bcNamePairSet) = 0;
+    virtual void ComputeCellBoundaryType();
+
+    virtual int  GetOrdinaryGridIndex() { return -1; };
+
+    virtual RDouble  GetPartialCFL() { return -1.0; };
+
+#pragma warning(disable:4100)
+    virtual void SetPartialCFL(RDouble PartialCFL){ 
+#pragma warning(default:4100) 
+    };
+
+    //! To compress the specified array to the the DataContainer which will be sent by parallel communication .
+    //! @param[out]: dataContainer denotes the compress database which will be sent.
+    //! @param[in ]: fieldName denotes the name of flow field to communicate.
+    //! @param[in ]: neighborZoneIndex denotes the grid index of target zone.
+    //! @param[in ]: nEquation denotes the number of variable to send.
+    virtual void CompressSpecificArrayToInterface(DataContainer *&dataContainer, const string &fieldName, const int &neighborZoneIndex, const int &nEquation) = 0;
+
+    //! To decompress the specified array from the the DataContainer received from parallel communication.
+    //! @param[in ]: dataContainer denotes the compress database which was received.
+    //! @param[in ]: fieldName denotes the name of flow field to communicate.
+    //! @param[in ]: neighborZoneIndex denotes the grid index of source zone.
+    //! @param[in ]: nEquation denotes the number of received variable.
+    virtual void DecompressArrayFromInterface(DataContainer *&dataContainer, const string &fieldName, const int &neighborZoneIndex, const int &nEquation) = 0;
+
+protected:
+    virtual void AllocateMetrics(ActionKey *actkey) = 0;
+    void FreeInterfaceField();
+    void RotateTranslation();
+};
+
+#include "Geo_Grid.hxx"
+
+void CheckGrid(Grid **grids, int nBlocks);
+
+//!
+LIB_EXPORT void Create_Link_Info(VInt &pindex, int iZone, int iFace, uint_t &fcount, set< DataStruct_Sort< VInt > > &face_list, VVInt &zoneid, VVInt &faceid, LinkStruct *link);
+//!
+LIB_EXPORT void GetFaceCoorList(VInt &index, int nlist, RDouble *xlist, RDouble *ylist, RDouble *zlist, RDouble *x, RDouble *y, RDouble *z);
+//!
+LIB_EXPORT void GetFaceCoorList(int il, int jl, int kl, int ir, int jr, int kr, int ijk[4][3], int nlist,
+                                RDouble *xlist, RDouble *ylist, RDouble *zlist, RDouble3D &x, RDouble3D &y, RDouble3D &z);
+//!
+LIB_EXPORT void GetCoorIndexList(DataStruct_AdtTree<int, RDouble> *adt_tree, RDouble &diff_tolerance, int &pcount, RDouble *xlist, RDouble *ylist, RDouble *zlist, int nlist, vector<int> &pindex);
+//!
+LIB_EXPORT int  GetCoorIndex(DataStruct_AdtTree<int, RDouble> *adt_tree, RDouble *coor, RDouble *minwin, RDouble *maxwin, int &count, int &index);
+//!
+LIB_EXPORT void ShiftMinMaxBox(RDouble *pmin, RDouble *pmax, RDouble tol);
+
+//! Get cell type on the basis of node number.
+int GetCellType(int dimension, int nodeNumberOfCell);
+
+//! Get face type on the basis of node number.
+int GetFaceType(int dimension, int nodeNumberOfFace);
+
+//! Some special functions for HYBRID solver.
+//!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+//! Special functions for HYBRID solver.
+bool IsConvertGridToMixGrid();
+
+LIB_EXPORT void CommunicateSpecificArray(int level, string arrayName, int nEquation);
+
+extern ZoneConnectivity *zoneConnectivity;
+extern ZoneConnectivityForPoint *zoneConnectivityForPoint;
+}
diff --git a/API/Geometry/include/Geo_Grid.hxx b/API/Geometry/include/Geo_Grid.hxx
new file mode 100644
index 0000000..a9335b1
--- /dev/null
+++ b/API/Geometry/include/Geo_Grid.hxx
@@ -0,0 +1,329 @@
+inline bool Grid::IsFinestGrid()
+{
+    if (this->GetFineGrid() == 0)
+        return true;
+    else
+        return false;
+}
+
+inline bool Grid::IsCoarsestGrid()
+{
+    if (GetCoarseGrid() == 0)
+        return true;
+    else
+        return false;
+}
+
+inline SimpleGrid * Grid::GetOldGrid()
+{
+    return oldGrid; 
+}
+
+inline void Grid::SetOldGrid(SimpleGrid *oldGrid)
+{
+    this->oldGrid = oldGrid;
+}
+
+inline void Grid::SetNTotalFace(int nTotalFace)
+{
+    this->nTotalFace = nTotalFace;
+}
+
+inline void Grid::SetNIFace(int nIFace)
+{
+    this->nIFace = nIFace;
+}
+
+inline void Grid::SetNTotalCell(int nTotalCell)
+{
+    this->nTotalCell = nTotalCell;
+}
+
+inline void Grid::SetNBoundFace(int nBoundFace)
+{
+    this->nBoundFace = nBoundFace;
+}
+
+inline int Grid::GetNTotalFace() const
+{
+    return nTotalFace;
+}
+
+inline int Grid::GetNTotalCell() const
+{
+    return nTotalCell;
+}
+
+inline int Grid::GetNBoundFace() const
+{ 
+    return nBoundFace;
+}
+
+inline int Grid::GetNIFace() const
+{
+    if (interfaceInfo)
+    {
+        return interfaceInfo->GetNIFace();
+    }
+    return 0;
+}
+
+inline void Grid::SetDim(int dim) 
+{
+    this->dimension = dim;
+}
+
+inline int Grid::GetDim() const
+{
+    return dimension;
+}
+
+inline int Grid::Type() const
+{
+    return type;
+}
+
+inline GridID * Grid::GetGridID() const
+{
+    return index;
+}
+
+inline void Grid::SetZoneID(int index)
+{
+    this->index->SetIndex(index);
+}
+
+inline void Grid::SetZoneLocalID(int index)
+{
+    this->index->SetLocalIndex(index);
+}
+
+inline int Grid::GetZoneID() const
+{
+    return index->GetIndex();
+}
+
+inline int Grid::GetZoneLocalID() const
+{
+    return index->GetLocalIndex();
+}
+
+inline SimpleVC * Grid::GetVolumeConditionIn()
+{
+    return this->volumeCondition;
+}
+
+inline void Grid::SetInterfaceInfo(InterfaceInfo *interfaceInfo)
+{
+    if (!interfaceInfo) return;
+
+    delete this->interfaceInfo;
+    this->interfaceInfo = interfaceInfo;
+
+    if (interfaceFields) delete interfaceFields;
+    interfaceFields = new InterfaceFields(interfaceInfo);
+}
+
+inline void Grid::SetInterpointInfo(InterpointInformation *interpointInformation)
+{
+    if (!interpointInformation)
+    {
+        return;
+    }
+
+    delete this->interpointInformation;
+    this->interpointInformation = interpointInformation;
+    
+    delete interpointFields;
+    interpointFields = new InterpointFields(interpointInformation);
+}
+
+inline InterfaceInfo * Grid::GetInterfaceInfo() const
+{
+    return interfaceInfo;
+}
+
+inline InterpointInformation *Grid::GetInterpointInfo() const
+{
+    return interpointInformation;
+}
+
+inline InterfaceFields *Grid::GetInterfaceFields() 
+{
+    return interfaceFields;
+}
+
+inline InterpointFields * Grid::GetInterpointFields()
+{
+    return interpointFields;
+}
+
+inline void Grid::SetOversetInfoProxy(OversetInfoProxy *oversetInfoProxy)
+{
+    this->oversetInfoProxy = oversetInfoProxy;
+}
+
+inline void Grid::SetOversetInformationProxy(OversetInformationProxy *oversetInformationProxyIn)
+{
+    this->oversetInformationProxy = oversetInformationProxyIn;
+}
+
+inline OversetInformationProxy * Grid::GetOversetInformationProxy() const
+{
+    return oversetInformationProxy;
+}
+
+inline OversetInfoProxy * Grid::GetOversetInfoProxy() const
+{
+    return oversetInfoProxy; 
+}
+
+inline int Grid::GetLevel() const
+{
+    return level;
+}
+
+inline void Grid::SetLevel(int level)
+{ 
+    this->level = level;
+}
+
+inline Grid * Grid::GetCoarseGrid() const
+{
+    return cGrid;
+}
+
+inline Grid * Grid::GetFineGrid() const
+{
+    return fGrid;
+}
+
+inline void Grid::SetCoarseGrid(Grid *cGrid)
+{
+    this->cGrid = cGrid;
+}
+
+inline void Grid::SetFineGrid(Grid *fGrid)
+{
+    this->fGrid = fGrid;
+}
+
+inline void Grid::CopyPara(Data_Param *gPara)
+{
+    this->gPara = gPara;
+}
+
+inline void Grid::CopyField(Data_Field *gField)
+{
+    this->gField = gField;
+}
+
+inline set < Data_IndexData > * Grid::GetDataSet()
+{
+    return gField->GetDataSet();
+}
+
+inline void Grid::UpdateDataPtr(const string &name, void *data)
+{
+    gField->UpdateDataPtr(name, data);
+};
+
+//const means the function won't change the data member of class
+inline void * Grid::GetDataPtr(const string &name) const
+{
+    return gField->GetDataPtr(name);
+};
+
+inline void Grid::DeleteDataPtr(const string &name) const
+{
+    return gField->DeleteDataPtr(name);
+};
+
+inline void Grid::UpdateData(const string &name, void *data, int type, int size)
+{
+    gPara->UpdateData(name, data, type, size);
+}
+
+inline void Grid::GetData(const string &name, void *data, int type, int size)
+{
+    gPara->GetData(name, data, type, size);
+}
+
+inline int Grid::GetIBlock()
+{
+    return iBlock;
+}
+
+inline void Grid::SetIBlock(int iBlockIn)
+{
+    this->iBlock = iBlockIn;
+}
+
+inline int Grid::GetZoneProbesNumber() const
+{
+    return zoneProbesNumber;
+}
+
+inline void Grid::SetZoneProbesNumber(int zoneProbesNumberIn)
+{
+    this->zoneProbesNumber = zoneProbesNumberIn;
+}
+
+inline vector<int> Grid::GetZoneProbesGlobalID() const
+{
+    return zoneProbesGlobalID;
+}
+
+inline void Grid::SetZoneProbesGlobalID(vector<int> &zoneProbesGlobalIDIn)
+{
+    this->zoneProbesGlobalID = zoneProbesGlobalIDIn;
+}
+
+inline vector<int> Grid::GetZoneProbesLineID() const
+{
+    return zoneProbesLineID;
+}
+
+inline void Grid::SetZoneProbesLineID(vector<int> &zoneProbesLineIDIn)
+{
+    this->zoneProbesLineID = zoneProbesLineIDIn;
+}
+
+inline vector<int> Grid::GetZoneProbesSurfaceID() const
+{
+    return zoneProbesSurfaceID;
+}
+
+inline void Grid::SetZoneProbesSurfaceID(vector<int> &zoneProbesSurfaceIDIn)
+{
+    this->zoneProbesSurfaceID = zoneProbesSurfaceIDIn;
+}
+
+inline vector<vector<RDouble> > Grid::GetZoneProbesCoordinates() const
+{
+    return zoneProbesCoordinates;
+}
+
+inline void Grid::SetZoneProbesCoordinates(vector<vector<RDouble> > &zoneProbesCoordinatesIn)
+{
+    this->zoneProbesCoordinates = zoneProbesCoordinatesIn;
+}
+
+inline void Grid::SetVolumeCondition(SimpleVC *volumeConditionIn)
+{
+    if (volumeCondition)
+    {
+        delete volumeCondition;
+    }
+    this->volumeCondition = volumeConditionIn;
+}
+
+inline void Grid::SetFileIndex(int fileIndex)
+{
+    this->fileIndexCurrentGridBelong = fileIndex;
+}
+
+inline int Grid::GetFileIndex()
+{
+    return this->fileIndexCurrentGridBelong;
+}
diff --git a/API/Geometry/include/Geo_GridIndex.h b/API/Geometry/include/Geo_GridIndex.h
new file mode 100644
index 0000000..56a80b5
--- /dev/null
+++ b/API/Geometry/include/Geo_GridIndex.h
@@ -0,0 +1,381 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_GridIndex.h
+//! @brief     This file is part of PHengLEI Technology software library.
+//!            It defines the class 'Geo_GridIndex', which is the index information used in Grid.
+//! @author    He Xin, Bell.
+
+#pragma once
+#include "Data_ParamFieldSuite.h"
+#include "Geo_SimpleGrid.h"
+#include "GlobalDataBase.h"
+#include "DataContainer.h"
+#include "Geo_Interface.h"
+#include "Geo_Interpoint.h"
+
+namespace PHSPACE
+{
+class Grid;
+class ActionKey;
+class ActionTag;
+class LinkStruct;
+class Geo_OversetGrid;
+
+class IndexSlice
+{
+private:
+    int tag;
+    int nlen;
+    vector<int> index;
+public:
+    int  GetTag() { return tag; }
+    void SetTag(int tag) { this->tag = tag; }
+
+    int  GetLength() { return nlen; }
+    void SetLength(int nlen) { this->nlen = nlen; }
+
+    uint_t size() { return index.size(); }
+
+    int * GetIndexPointer() { return &index[0]; }
+
+    vector<int> & GetIndex() { return index; }
+    void SetIndex(vector<int> &index) { this->index = index; }
+};
+
+class IndexProxy
+{
+private:
+    vector <IndexSlice *> indexArray;
+    vector <IndexSlice *> indexMapArray;
+    vector <int> zoneIndexArray;
+    int init;
+private:
+    void InitZoneIndexArray()
+    {
+        if (init) return;
+        for (std::size_t i = 0; i < indexArray.size(); ++ i)
+        {
+            zoneIndexArray.push_back(indexArray[i]->GetTag());
+        }
+        init = 1;
+    }
+public:
+    IndexProxy()
+    {
+        init = 0;
+    }
+
+    ~IndexProxy()
+    {
+        ;
+    }
+public:
+    IndexSlice * GetIndexSlice(int m) { return indexArray[m]; }
+    void  AddIndexSlice(IndexSlice *indexSlice) { indexArray.push_back(indexSlice); }
+    int   GetLength(int m) { return indexArray[m]->GetLength(); }
+    int * GetIndexPointer(int m) { return indexArray[m]->GetIndexPointer(); }
+    int * GetIndexMapPointer(int m) { return indexMapArray[m]->GetIndexPointer(); }
+
+    void SetIndexMap(int m, int start)
+    {
+        int *indexMap = GetIndexMapPointer(m);
+        int length = GetLength(m);
+        for (int i = 0; i < length; ++ i)
+        {
+            indexMap[i] = start + i;
+        }
+    }
+
+    uint_t size() const { return indexArray.size(); }
+
+    vector < int > & GetZoneIndexArray()
+    {
+        InitZoneIndexArray();
+        return zoneIndexArray; 
+    }
+};
+
+class OversetInfo
+{
+private:
+    int zoneid, zoneIndexOfNeighbor;
+    int numberOfCellForTransfer;
+    int *cellIndexForTransfer;
+private:
+    Data_ParamFieldSuite *dataStorageForTransfer;
+public:
+    OversetInfo();
+    ~OversetInfo();
+public:
+    int * GetCellIndexForTransfer() const { return cellIndexForTransfer; }
+    void SetCellIndexForTransfer(int *cellIndexForTransfer) { this->cellIndexForTransfer = cellIndexForTransfer; }
+
+    int  GetNumberOfCellForTransfer() const { return numberOfCellForTransfer; }
+    void SetNumberOfCellForTransfer(int numberOfCellForTransfer) { this->numberOfCellForTransfer = numberOfCellForTransfer; }
+
+    int  GetZoneIndexOfNeighbor() const { return zoneIndexOfNeighbor; }
+    void SetZoneIndexOfNeighbor(int zoneIndexOfNeighbor) { this->zoneIndexOfNeighbor = zoneIndexOfNeighbor; }
+public:
+    void AllocateData();
+public:
+    void Encode();
+    void Decode(DataContainer *cdata);
+};
+
+class CompositeOversetInfo
+{
+private:
+    int numberOfZone;
+    int numberOfCell;
+    int *cellIndex;
+    vector <OversetInfo *> oversetInfoArray;
+    Data_ParamFieldSuite *dataStorage;
+public:
+    CompositeOversetInfo();
+    ~CompositeOversetInfo();
+public:
+    int  GetNumberOfZone() const { return numberOfZone; }
+    void SetNumberOfZone(int numberOfZone) { this->numberOfZone = numberOfZone; }
+
+    int  GetNumberOfCell() const { return numberOfCell; }
+    void SetNumberOfCell(int numberOfCell) { this->numberOfCell = numberOfCell; }
+
+    OversetInfo * GetOversetInfo(int ineighbor) { return oversetInfoArray[ineighbor]; }
+
+    int GetNumberOfCell(int ineighbor)
+    { 
+        OversetInfo *oversetInfo = GetOversetInfo(ineighbor);
+        return oversetInfo->GetNumberOfCellForTransfer();
+    };
+
+    int * GetCellIndex(int ineighbor)
+    {
+        OversetInfo *oversetInfo = GetOversetInfo(ineighbor);
+        return oversetInfo->GetCellIndexForTransfer();
+    };
+
+    int FindIthNeighbor() { return -1; }
+
+    Data_ParamFieldSuite * GetDataStorage() const { return dataStorage; }
+
+    void AddOversetInfo(OversetInfo *oversetInfo) { oversetInfoArray.push_back(oversetInfo); }
+public:
+    void Encode(DataContainer *cdata);
+    void Decode(DataContainer *cdata);
+};
+
+class OversetInfoProxy
+{
+private:
+    CompositeOversetInfo *sendInfo;
+    CompositeOversetInfo *recvInfo;
+    Grid *grid;
+private:
+    int zoneIndex;
+
+    IndexProxy *sendIndexProxy;
+    IndexProxy *recvIndexProxy;
+
+    IndexProxy *temporaryIndexProxy;
+
+    vector<int> cellIndexRef1, cellIndexRef2, zoneIndexRef2;
+
+    int numberOfCellForRecv, numberOfCellForSend;
+public:
+    vector<int> & GetCellIndexRef1() { return cellIndexRef1; }
+    vector<int> & GetCellIndexRef2() { return cellIndexRef2; }
+    vector<int> & GetZoneIndexRef2() { return zoneIndexRef2; }
+
+    void Process();
+    void GetNeighborZoneIndexSet(set<int> &neighborZoneIndexSet);
+public:
+    IndexProxy * GetSendIndexProxy() { return sendIndexProxy; }
+    IndexProxy * GetRecvIndexProxy() { return recvIndexProxy; }
+
+    IndexProxy * GetTemporaryIndexProxy() { return temporaryIndexProxy; }
+public:
+    vector<int> & GetNeighborZoneIndexArray() { return sendIndexProxy->GetZoneIndexArray(); }    // for send
+public:
+    OversetInfoProxy();
+    ~OversetInfoProxy();
+public:
+    uint_t GetNumberOfNeighborForSend() { return sendIndexProxy->size(); }
+    uint_t GetNumberOfNeighborForRecv() { return recvIndexProxy->size(); }
+
+    int GetNumberOfCellForRecv() { return numberOfCellForRecv; }
+    int GetNumberOfCellForSend() { return numberOfCellForSend; }
+
+    void SetNumberOfCellForRecv(int numberOfCellForRecv) { this->numberOfCellForRecv = numberOfCellForRecv; }
+    void SetNumberOfCellForSend(int numberOfCellForSend) { this->numberOfCellForSend = numberOfCellForSend; }
+
+    int GetNumberOfCellForRecv(int iNeighbor) { return recvIndexProxy->GetLength(iNeighbor); }
+    int GetNumberOfCellForSend(int iNeighbor) { return sendIndexProxy->GetLength(iNeighbor); }
+
+    int * GetCellIndexForRecv(int iNeighbor) { return recvIndexProxy->GetIndexPointer(iNeighbor); }
+    int * GetCellIndexForSend(int iNeighbor) { return sendIndexProxy->GetIndexPointer(iNeighbor); }
+
+    int * GetCellIndexMapForRecv(int iNeighbor) { return recvIndexProxy->GetIndexMapPointer(iNeighbor); }
+    int * GetCellIndexMapForSend(int iNeighbor) { return sendIndexProxy->GetIndexMapPointer(iNeighbor); }
+
+    Data_ParamFieldSuite * GetRecvDataStorage() const { return recvInfo->GetDataStorage(); }
+    Data_ParamFieldSuite * GetSendDataStorage() const { return sendInfo->GetDataStorage(); }
+
+    void PostProcessRecv();
+    void PostProcessSend();
+
+    int FindIthNeighbor(vector<int> &zoneIndexArray, int zone)
+    {
+        for (std::size_t i = 0; i < zoneIndexArray.size(); ++ i)
+        {
+            if (zoneIndexArray[i] == zone)
+            {
+                return int(i);
+            }
+        }
+        return -1; 
+    };
+
+    int FindIthNeighborOfRecv(int zone)
+    {
+        vector<int> &zoneIndexArray = recvIndexProxy->GetZoneIndexArray();
+        return FindIthNeighbor(zoneIndexArray, zone);
+    };
+
+    int FindIthNeighborOfSend(int zone)
+    {
+        vector<int> &zoneIndexArray = sendIndexProxy->GetZoneIndexArray();
+        return FindIthNeighbor(zoneIndexArray, zone);
+
+    };
+public:
+    void SetGrid(Grid *grid) { this->grid = grid; }
+    Grid * GetGrid() { return grid; }
+    void PrepareSendingInformation(Geo_OversetGrid **oversetGrids);
+    void PostProcess(Geo_OversetGrid **oversetGrids);
+    void InitReceivingInformation(vector<int> &cellIndexRef1, vector<int> &zoneIndexRef2, vector<int> &cellIndexRef2);
+    CompositeOversetInfo * GetRecvInfo() const { return recvInfo; }
+    CompositeOversetInfo * GetSendInfo() const { return sendInfo; }
+
+    int  GetNIFaceOfNeighbor(int ineighbor) const;
+
+    void AllocateNeighborInfo();
+public:
+    void Encode(DataContainer *cdata);
+    void Decode(DataContainer *cdata);
+};
+
+class ZoneNeighbor
+{
+public:
+    ZoneNeighbor()
+    {
+    };
+
+    ~ZoneNeighbor()
+    {
+    };
+public:
+    void SetNumberOfNeighbor(int neighbor) { data.resize(neighbor); }
+    int  GetNumberOfNeighbor() const { return static_cast<int>(data.size()); }
+    void AddZoneIndexOfNeighbor(int value) { data.push_back(value); }
+    int * GetZoneIndexOfNeighbor() { return &data[0]; }
+    int  GetZoneIndexOfNeighbor(const uint_t &ineighbor) const { return data[ineighbor]; }
+    bool hasNeighborZone(int zoneIndex)
+    {
+        return find(data.begin(), data.end(), zoneIndex) == data.end() ? false : true;
+    }
+private:
+    vector<int> data;
+};
+
+class ZoneConnectivity
+{
+public:
+    ZoneConnectivity()
+    { 
+        numberOfZones = 0;
+        zoneNeighbor  = 0;
+    };
+    ~ZoneConnectivity()
+    {
+        for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+        {
+            delete zoneNeighbor[iZone];
+        }
+        delete [] zoneNeighbor;
+    }
+    int  GetNumberOfZones() const { return numberOfZones; }
+    void SetNumberOfZones(int nZones) { this->numberOfZones = nZones; }
+    void CreateAllZones(int nZones)
+    {
+        SetNumberOfZones(nZones);
+        zoneNeighbor = new ZoneNeighbor *[nZones];
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            zoneNeighbor[iZone] = new ZoneNeighbor();
+        } 
+    }
+    ZoneNeighbor * GetZoneNeighbor(int iZone) const { return zoneNeighbor[iZone]; }
+private:
+    int numberOfZones;
+    ZoneNeighbor **zoneNeighbor;
+};
+
+//! @brief the zone connectivity for point.\n
+class ZoneConnectivityForPoint
+{
+public:
+    ZoneConnectivityForPoint();
+    ~ZoneConnectivityForPoint();
+    int  GetNumberOfZonesForPoint() const;
+    void SetNumberOfZonesForPoint(int numberOfZonesForPoint);
+    void CreateAllZones(int numberOfZonesForPoint);
+    ZoneNeighbor * GetZoneNeighborForPoint(int iZone) const;
+private:
+    int numberOfZonesForPoint;
+    ZoneNeighbor **zoneNeighborForPoint;
+};
+
+class GridID
+{
+public:
+    GridID(int index = 0, int local_index = 0);
+    ~GridID();
+public:
+    void SetIndex(int index) { this->index = index; }
+    void SetLocalIndex(int local_index) { this->local_index = local_index; }
+    int GetIndex() const { return index; }
+    int GetLocalIndex() const { return local_index; }
+private:
+    int index;
+    int local_index;
+};
+
+//! The level  number of multigrid.
+uint_t GetNumberOfMultiGrid();
+uint_t GetNumberOfMultiGrid(int iZone);
+
+Grid * GetGrid(int iZone, int level = 0);
+void DeleteGGrids();
+void AddGridToGlobal(int iZone, vector <Grid *> *grids);
+void GetGlobalMinMaxBox(RDouble *globalMinBox, RDouble *globalMaxBox);
+void SetGlobalMinMaxBox(RDouble *globalMinBox, RDouble *globalMaxBox);
+
+InterfaceInfo * GetInterfaceInfo(int iZone, int level = 0);
+//! Return the interpoint information of the iZone.
+//! @param[in] iZone : the zone number.
+//! @param[in] level : the number of ghost cell layers.
+//! @param[out] the object of the class InterpointInformation.
+InterpointInformation * GetInterpointInfo(int iZone, int level);
+OversetInfoProxy * GetOversetInfoProxy(int iZone, int level = 0);
+
+}
diff --git a/API/Geometry/include/Geo_GridManager.h b/API/Geometry/include/Geo_GridManager.h
new file mode 100644
index 0000000..c84626a
--- /dev/null
+++ b/API/Geometry/include/Geo_GridManager.h
@@ -0,0 +1,175 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+#pragma once
+#include "Precision.h"
+#include "TypeDefine.h"
+#include <fstream>
+#include <vector>
+using namespace std;
+
+namespace PHSPACE
+{
+class UnstructGrid;
+class ActionKey;
+class DataContainer;
+class FieldProxy;
+class VirtualFile;
+
+class GridManager
+{
+public:
+    GridManager(UnstructGrid *unstructGrid);
+    ~GridManager();
+protected:
+    UnstructGrid *unstructGrid;
+
+    RDouble *cellCenterX;    // cell center data, including ghosts;
+    RDouble *cellCenterY;    // cell center data, including ghosts;
+    RDouble *cellCenterZ;    // cell center data, including ghosts;
+    RDouble *faceNormalX;    // face unit normal;
+    RDouble *faceNormalY;    // face unit normal;
+    RDouble *faceNormalZ;    // face unit normal;
+    RDouble *oldFaceNormalX; // n-1 grid face unit normal; 
+    RDouble *oldFaceNormalY; // n-1 grid face unit normal; 
+    RDouble *oldFaceNormalZ; // n-1 grid face unit normal; 
+    RDouble *oldFaceArea;
+    RDouble *cellVolume;     // face faceAreaContainer, cell cellVolume excluding ghosts;
+    RDouble *faceCenterX;    // face center data;
+    RDouble *faceCenterY;    // face center data;
+    RDouble *faceCenterZ;    // face center data;
+    RDouble *faceArea;       // face faceAreaContainer;
+
+    RDouble *oldFaceCenterX; // old face center data;
+    RDouble *oldFaceCenterY; // old face center data;
+    RDouble *oldFaceCenterZ; // old face center data;
+
+    RDouble *cellVolumeN1;   // cell cellVolume
+    RDouble *cellVolumeN2;   // cell cellVolume
+protected:
+    RDouble *faceNormalVelocity;
+    RDouble *faceVelocityX;
+    RDouble *faceVelocityY;
+    RDouble *faceVelocityZ;
+
+    RDouble *oldFaceNormalVelocity;
+    RDouble *oldFaceVelocityX;
+    RDouble *oldFaceVelocityY;
+    RDouble *oldFaceVelocityZ;
+
+    RDouble *newFaceNormalVelocity;
+    RDouble *newFaceVelocityX;
+    RDouble *newFaceVelocityY;
+    RDouble *newFaceVelocityZ;
+protected:
+    int *blankIndex;
+protected:
+    int *localToGlobalNodeIndexMapping;
+    RDouble *globalCoordinateNew;
+public:
+    int * GetLocalToGlobalNodeIndexMapping() { return localToGlobalNodeIndexMapping; }
+    RDouble * GetGlobalCoordinateNew() { return globalCoordinateNew; }
+
+    void UpdateGridCoordinateByReadingFile                      (int targetZone);
+    void ComputeLocalToGlobalNodeIndexMappingDirectly           ();
+    void ComputeLocalToGlobalNodeIndexMappingByReadingLayoutFile(int targetZone);
+public:
+    int * GetBlankIndex() { return blankIndex; }
+
+    RDouble * GetCellCenterX() { return cellCenterX; }
+    RDouble * GetCellCenterY() { return cellCenterY; }
+    RDouble * GetCellCenterZ() { return cellCenterZ; }
+
+    RDouble * GetFaceNormalX() { return faceNormalX; }
+    RDouble * GetFaceNormalY() { return faceNormalY; }
+    RDouble * GetFaceNormalZ() { return faceNormalZ; }
+
+    RDouble * GetOldFaceNormalX() { return oldFaceNormalX; }
+    RDouble * GetOldFaceNormalY() { return oldFaceNormalY; }
+    RDouble * GetOldFaceNormalZ() { return oldFaceNormalZ; }
+
+    RDouble * GetFaceCenterX() { return faceCenterX; }
+    RDouble * GetFaceCenterY() { return faceCenterY; }
+    RDouble * GetFaceCenterZ() { return faceCenterZ; }
+
+    RDouble * GetOldFaceCenterX() { return oldFaceCenterX; }
+    RDouble * GetOldFaceCenterY() { return oldFaceCenterY; }
+    RDouble * GetOldFaceCenterZ() { return oldFaceCenterZ; }
+
+    RDouble * GetFaceArea() { return faceArea; }
+    RDouble * GetOldFaceArea() { return oldFaceArea; }
+
+    RDouble * GetOldCellVolume() { return cellVolumeN1; }
+    RDouble * GetCellVolume(int iStep = 0);
+public:
+    RDouble * GetFaceVelocityX() { return faceVelocityX; }
+    RDouble * GetFaceVelocityY() { return faceVelocityY; }
+    RDouble * GetFaceVelocityZ() { return faceVelocityZ; }
+    RDouble * GetFaceNormalVelocity() { return faceNormalVelocity; }
+
+    RDouble * GetOldFaceVelocityX() { return oldFaceVelocityX; }
+    RDouble * GetOldFaceVelocityY() { return oldFaceVelocityY; }
+    RDouble * GetOldFaceVelocityZ() { return oldFaceVelocityZ; }
+    RDouble * GetOldFaceNormalVelocity() { return oldFaceNormalVelocity; }
+
+    RDouble * GetNewFaceVelocityX() { return newFaceVelocityX; }
+    RDouble * GetNewFaceVelocityY() { return newFaceVelocityY; }
+    RDouble * GetNewFaceVelocityZ() { return newFaceVelocityZ; }
+    RDouble * GetNewFaceNormalVelocity() { return newFaceNormalVelocity; }
+public:
+    void ComputeMassCharacterOfObject();
+    void AllocateMetrics();
+    void DeAllocateMetrics();
+    void AllocateALEMetrics();
+    void DeAllocateALEMetrics();
+    void BackUpOldGrid();
+    void ComputeMetrics(ActionKey *actkey);
+    void ComputeGridFaceVelocity();
+    void ComputeGridFaceVelocityDirectly();
+    void ComputeGridFaceVelocitySatisfyingGCL();
+    void ComputeGridFaceVelocity2DSatisfyingGCL();
+    void ComputeGridFaceVelocity3DSatisfyingGCL();
+    void DumpCellCenterFile();
+
+protected:
+    void ClosureCheck(RDouble *faceNormalX, RDouble *faceArea);
+    void ComputeFaceNormal2D();
+    void ComputeFaceCenter2D();
+    void ComputeCellCenterVol2D(ActionKey *actkey);
+
+    void ComputeFaceNormal3D();
+    void ComputeFaceCenter3D();
+    void ComputeCellCenterVol3D(ActionKey *actkey);
+
+    void ComputeFaceNormal3DNew();
+    void ComputeFaceCenter3DNew();
+    void ComputeCellCenterVol3DNew();
+
+public:
+    void SkipReadLayoutFile(fstream &file, int targetZone);
+    void ReadNewCoordinate();
+    void UpdateGridNode();
+public:
+    void InitializeMovingGrids();
+    void InitializeOldFaceNormalVelocity();
+    void InitializeOldCellVolume();
+public:
+    void ReadMovingGrid();
+
+    void UpdateOldCellVolume();
+    void ConvergenceNorm(FieldProxy *q1Proxy, FieldProxy *q0Proxy, int numberOfEquations, RFloat &norm);
+};
+
+RDouble ComputeVolume4P(RDouble x1, RDouble y1, RDouble z1, RDouble x2, RDouble y2, RDouble z2, RDouble x3, RDouble y3, RDouble z3, RDouble x4, RDouble y4, RDouble z4);
+
+bool IsNotAllocated(void *pointer);
+
+}
diff --git a/API/Geometry/include/Geo_Interface.h b/API/Geometry/include/Geo_Interface.h
new file mode 100644
index 0000000..49a1243
--- /dev/null
+++ b/API/Geometry/include/Geo_Interface.h
@@ -0,0 +1,328 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_Interface.h
+//! @brief     Interface information for multi-zone grid.
+//! @author    Bell, He Xin.
+
+#pragma once
+#include "Precision.h"
+#include <vector>
+#include "LIB_Macro.h"
+#include "Data_ParamFieldSuite.h"
+#include "GlobalDataBase.h"
+
+namespace PHSPACE
+{
+inline int GetNumberOfGhostCellLayers()
+{
+    //! Warning: the layer number should be judged by grid type.
+    //! however, it will lead to RESTART file (flow.dat/turb.dat)
+    //! different with the previous, using 2 layers temporary.
+    //! the bellowing judge should be used in future.
+    int nLayers = 2;
+
+    //! Add one layer ghost cell for high order method.
+    int isWennScheme = PHSPACE::GlobalDataBase::GetIntParaFromDB("isWennScheme");
+    if (isWennScheme == 1)
+    {
+        nLayers = 3;
+    }
+
+    return nLayers;
+
+    //! The bellowing judge should be used in future.
+    //const int UNSTRUCTGRID = 0;
+    //const int STRUCTGRID   = 1;
+    //const int MIXGRID      = 2;
+
+    //! Note that sys_gridtype is undefined! Error may occur here!
+    //int systemGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    //if (systemGridType == UNSTRUCTGRID)
+    //{
+    //    return 1;
+    //}
+    //else
+    //{
+    //    return 2;
+    //}
+}
+
+class InterfacePatch
+{
+private:
+    //! The index of the current zone.
+    int zoneid;
+
+    //! The index of the neighbor zone.
+    int zoneIndexOfNeighbor;
+
+    //! The number of patched-interface in the neighbor zone which linked to current zone.
+    int faceNumberOfPatch;
+
+    //! Interface number in the CURRENT zone, using in receiving.
+    int *faceIndexForRecv;
+    
+    //! Interface number in the TARGET zone, using in sending.
+    int *faceIndexForSend;
+
+    //! GMRESParallel cell index in the local zone
+    int *cellIndexOfLocal;
+
+    //! GMRESParallel ghost cell index in the local zone
+    int *cellIndexOfLocalGhost;
+
+    //! GMRESParallel cell index in the neighbor zone
+    int *cellIndexOfNeighbor;
+
+private:
+    Data_ParamFieldSuite *dataStorageSend;
+    Data_ParamFieldSuite *dataStorageRecv;
+
+public:
+    InterfacePatch();
+    InterfacePatch(const InterfacePatch &interPatchchIN);
+    InterfacePatch & operator = (const InterfacePatch  &interPatchchIN);
+    ~InterfacePatch();
+
+public:
+    int * GetFaceIndexForRecv() const;
+    void SetFaceIndexForRecv(int *faceIndexForRecv);
+
+    int * GetFaceIndexForSend() const;
+    void SetFaceIndexForSend(int *faceIndexForSend);
+
+    int  GetNumberOfFace() const;
+    void SetNumberOfFace(int faceNumberOfPatch);
+
+    int  GetZoneIndexOfNeighbor() const;
+    void SetZoneIndexOfNeighbor(int zoneIndexOfNeighbor);
+
+    //! GMRESParallel
+    int *GetCellIndexOfLocal() const;
+    void SetCellIndexOfLocal(int *cellIndexLocal);
+
+    int *GetCellIndexOfLocalGhost() const;
+    void SetCellIndexOfLocalGhost(int *cellIndexLocalGhost);
+
+    int *GetCellIndexOfNeighbor() const;
+    void SetCellIndexOfNeighbor(int *cellIndexNeighbor);
+
+    int GetZoneID() const;
+
+    void AllocateData();
+};
+
+class Grid;
+
+class InterfaceInfo
+{
+private:
+    //! Number of interfaces.
+    int nIFace;
+
+    //! Number of neighbor zones.
+    int numberOfNeighbor;
+
+    //! Neighbor zone index of the interface in current zone.
+    int *interFace2ZoneID;
+
+    //! Cell index to neighbor zone of the interface in current zone.
+    int *interFace2CellID;
+
+    //! Interface index in neighbor zone of the interface in current zone.
+    //! Be careful, in grid partition procedure, it stores the neighbor local cell index firstly,
+    //! and then, it was covered by neighbor local interface index in interface matching stage.
+    int *interFace2InterFaceID;
+
+    //! Boundary face index in current zone of the interface in current zone.
+    int *interFace2BoundaryFace;
+
+    //! Interface direction.
+    //! -#  1: If left cell of the interface exist.
+    //! -# -1: If right cell of the interface exist.
+    int *interFaceDirection;
+
+    //! Parent grid of the current grid, using in multi-grid method.
+    Grid *parent;
+
+    //! Data storage for sending.
+    Data_ParamFieldSuite *dsend;
+
+    //! Data storage for receiving.
+    Data_ParamFieldSuite *drecv;
+
+    vector <InterfacePatch *> interFacePatch;
+
+    //! GMRESParallel global cell index of the ghost cell for interface bc
+    int *globalNeighborCellIndex;
+
+    int *localInterfaceCellIndex;
+
+    int *localInterfacePhysicalCellIndex;
+
+public:
+    InterfaceInfo();
+    InterfaceInfo(const InterfaceInfo &infoIn);
+    InterfaceInfo(int nIFace, Grid *parent = 0);
+    ~InterfaceInfo();
+
+public:
+    int * GetInterFace2ZoneID() const;
+    int * GetInterFace2CellID() const;
+    int * GetInterFace2InterFaceID() const;
+    int * GetInterFace2BoundaryFace() const;
+    int * GetInterFaceDirection() const;
+
+    //! Get the neighbor zone index of ineighbor, ineighbor among in [0, numberOfNeighbor).
+    int GetZoneIndexOfNeighbor(int ineighbor) const;
+
+    int * GetFaceIndexForRecv(int ineighbor) const;
+    int * GetFaceIndexForSend(int ineighbor) const;
+
+    Data_ParamFieldSuite * GetSendDataStorage(int istore) const;
+    Data_ParamFieldSuite * GetRecvDataStorage(int istore) const;
+
+    void SetNIFace(int nIFace);
+    int GetNIFace() const;
+
+    void SetNumberOfNeighbor(int numberOfNeighbor);
+    int GetNumberOfNeighbor() const;
+
+    int FindIthNeighbor(int zone);
+
+    int * ComputeFaceIndexForSend(int ineighbor);
+
+    void FillFaceIndexForSend(int zone, int *faceIndexForSend_in);
+
+    vector <InterfacePatch *> GetInterfacePatch() const;
+    InterfacePatch * GetInterfacePatch(int ineighbor) const;
+
+    void FindNeighbors();
+
+    void InitNeighbors();
+    void InitNeighbors(int ineighbor);
+
+    void AllocateNeighborInfo();
+    void AllocateSendRecv(int ineighbor);
+
+    int GetNIFaceOfNeighbor(int ineighbor) const;
+
+    void ComputeFaceIndexForRecv(int ineighbor);
+
+    int ComputeNIFaceOfNeighbor(int ineighbor);
+
+    int ComputeNumberOfNeighbor(int *zoneflag);
+
+    //! Resize the data according to the new number of inter faces.
+    void ReSize(int numberOfNewInterfaces);
+
+    void SetIsNeighborInterfaceFound(bool *data);
+    bool * GetIsNeighborInterfaceFound();
+
+    //! GMRESParallel
+    int *GetCellIndexOfNeighbor(int ineighbor) const;
+
+    int *GetGlobalNeighborCellIndex() const;
+
+    void SetGlobalNeighborCellIndex(int *globalNeighborCellIndex);
+
+    int *GetLocalInterfaceCellIndex() const;
+
+    void SetLocalInterfaceCellIndex(int *localInterfaceCellIndex);
+
+    int *GetLocalInterfacePhysicalCellIndex() const;
+
+    void SetLocalInterfacePhysicalCellIndex(int *localInterfacePhysicalCellIndex);
+
+    int MatchedGlobalNeighborCellIndex(int cell);
+
+    int MatchedLocalPhysicalCellIndex(int cell);
+
+private:
+    //! Is the neighbor interface has been found.
+    //! this is used during partition only.
+    bool *isNeighborInterfaceFound;
+};
+
+//! Interface variable fields
+//! Store the interface variable for multi-zone grid, using for Parallel communication.
+class InterfaceFields
+{
+private:
+    //! List of interface field variable names.
+    vector< string > variableNames;
+
+    //! List of interface field variable types.
+    vector< int > variableTypes;
+
+    //! List of interface field variable dimensions.
+    //! eg. 1D/2D array, dimension is equal to '1' or '2'.
+    vector< int > variableDimensions;
+
+    //! Interface information.
+    InterfaceInfo *interfaceInfo;
+
+    //! Solver ID.
+    vector< int > solverIndex;
+
+public:
+    InterfaceFields(InterfaceInfo *dataIn);
+    ~InterfaceFields();
+
+public:
+    uint_t Size();
+
+    int GetDim(const int iData);
+
+    string & GetName(const int iData);
+
+    int GetSolverIndex(const int iData);
+
+    void RegisterField(const string &name, const int type, const int dimesion, const int solverID);
+
+    void RemoveAllField();
+
+    void RemoveAnVariable(string varName);
+    
+    void FreeInterfaceVar();
+
+    template< typename T >
+    T ** GetSendVariable(const string &name, const int iGhost);
+
+    template< typename T >
+    T ** GetRecvVariable(const string &name, const int iGhost);
+
+private:
+    void AllocateInterfaceVar(const string &name, const int type, const int dimesion, Data_ParamFieldSuite *datastore);
+    void FreeInterfaceVar(Data_ParamFieldSuite *datastore);
+    void RemoveInterfaceVar(const string &name);
+};
+
+class InterfaceDataProxy
+{
+private:
+    vector<RDouble **> vdata;
+    vector<int> vdim;
+
+public:
+    InterfaceDataProxy();
+    ~InterfaceDataProxy();
+    vector<string> dataName;
+
+public:
+    vector<RDouble **> & GetVectorData();
+    vector<int> & GetVectorDimension();
+    vector<string> & GetVectorName();
+};
+
+#include "Geo_Interface.hxx"
+}
diff --git a/API/Geometry/include/Geo_Interface.hxx b/API/Geometry/include/Geo_Interface.hxx
new file mode 100644
index 0000000..dc42822
--- /dev/null
+++ b/API/Geometry/include/Geo_Interface.hxx
@@ -0,0 +1,267 @@
+inline int * InterfacePatch::GetFaceIndexForRecv() const
+{
+    return faceIndexForRecv;
+}
+
+inline void InterfacePatch::SetFaceIndexForRecv(int *faceIndexForRecv)
+{
+    this->faceIndexForRecv = faceIndexForRecv;
+}
+
+inline int * InterfacePatch::GetFaceIndexForSend() const
+{
+    return faceIndexForSend;
+}
+
+inline void InterfacePatch::SetFaceIndexForSend(int *faceIndexForSend)
+{
+    this->faceIndexForSend = faceIndexForSend;
+}
+
+inline int InterfacePatch::GetNumberOfFace() const
+{
+    return faceNumberOfPatch;
+}
+
+inline void InterfacePatch::SetNumberOfFace(int faceNumberOfPatch)
+{
+    this->faceNumberOfPatch = faceNumberOfPatch;
+}
+
+inline int InterfacePatch::GetZoneIndexOfNeighbor() const
+{
+    return zoneIndexOfNeighbor;
+}
+
+inline void InterfacePatch::SetZoneIndexOfNeighbor(int zoneIndexOfNeighbor)
+{
+    this->zoneIndexOfNeighbor = zoneIndexOfNeighbor;
+}
+
+inline int InterfacePatch::GetZoneID() const
+{
+    return zoneid;
+}
+
+//! GMRESParallel
+inline void InterfacePatch::SetCellIndexOfLocal(int *cellIndexOfLocal)
+{
+    this->cellIndexOfLocal = cellIndexOfLocal;
+}
+
+inline int* InterfacePatch::GetCellIndexOfLocal() const
+{
+    return this->cellIndexOfLocal;
+}
+
+inline void InterfacePatch::SetCellIndexOfLocalGhost(int *cellIndexLocalGhost)
+{
+    this->cellIndexOfLocalGhost = cellIndexLocalGhost;
+}
+
+inline int* InterfacePatch::GetCellIndexOfLocalGhost() const
+{
+    return this->cellIndexOfLocalGhost;
+}
+
+inline void InterfacePatch::SetCellIndexOfNeighbor(int *cellIndexOfNeighbor)
+{
+    this->cellIndexOfNeighbor = cellIndexOfNeighbor;
+}
+
+inline int* InterfacePatch::GetCellIndexOfNeighbor() const
+{
+    return this->cellIndexOfNeighbor;
+}
+
+inline void InterfaceInfo::SetNIFace(int nIFace)
+{
+    this->nIFace = nIFace;
+}
+
+inline int InterfaceInfo::GetNIFace() const
+{
+    return nIFace;
+}
+
+inline void InterfaceInfo::SetNumberOfNeighbor(int numberOfNeighbor)
+{
+    this->numberOfNeighbor = numberOfNeighbor;
+}
+
+inline int InterfaceInfo::GetNumberOfNeighbor() const
+{
+    return numberOfNeighbor;
+}
+
+inline vector <InterfacePatch *> InterfaceInfo::GetInterfacePatch() const
+{
+    return interFacePatch;
+}
+
+inline InterfacePatch * InterfaceInfo::GetInterfacePatch(int ineighbor) const
+{
+    return interFacePatch[ineighbor];
+}
+
+inline int * InterfaceInfo::GetInterFace2ZoneID() const
+{
+    return interFace2ZoneID;
+}
+
+inline int * InterfaceInfo::GetInterFace2CellID() const 
+{ 
+    return interFace2CellID; 
+}
+
+inline int * InterfaceInfo::GetInterFace2InterFaceID() const
+{
+    return interFace2InterFaceID;
+}
+
+inline int * InterfaceInfo::GetInterFace2BoundaryFace() const
+{
+    return interFace2BoundaryFace;
+}
+
+inline int * InterfaceInfo::GetInterFaceDirection() const
+{
+    return interFaceDirection;
+}
+
+inline void InterfaceInfo::SetIsNeighborInterfaceFound(bool *data)
+{
+    this->isNeighborInterfaceFound = data;
+}
+
+inline bool * InterfaceInfo::GetIsNeighborInterfaceFound()
+{
+    return isNeighborInterfaceFound;
+}
+
+inline int InterfaceInfo::GetZoneIndexOfNeighbor(int ineighbor) const
+{
+    InterfacePatch *interFacePatch = this->GetInterfacePatch(ineighbor);
+    return interFacePatch->GetZoneIndexOfNeighbor();
+}
+
+inline int * InterfaceInfo::GetFaceIndexForRecv(int ineighbor) const
+{
+    InterfacePatch *interFacePatch = this->GetInterfacePatch(ineighbor);
+    return interFacePatch->GetFaceIndexForRecv();
+}
+
+inline int * InterfaceInfo::GetFaceIndexForSend(int ineighbor) const
+{
+    InterfacePatch *interFacePatch = this->GetInterfacePatch(ineighbor);
+    return interFacePatch->GetFaceIndexForSend();
+}
+
+//! GMRESParallel
+inline int * InterfaceInfo::GetCellIndexOfNeighbor(int ineighbor) const
+{
+    InterfacePatch *interFacePatch = this->GetInterfacePatch(ineighbor);
+    return interFacePatch->GetCellIndexOfNeighbor();
+}
+
+inline int * InterfaceInfo::GetGlobalNeighborCellIndex() const
+{
+    return this->globalNeighborCellIndex;
+}
+
+inline void InterfaceInfo::SetGlobalNeighborCellIndex(int* globalNeighborCellIndex)
+{
+    this->globalNeighborCellIndex = globalNeighborCellIndex;
+}
+
+inline int * InterfaceInfo::GetLocalInterfaceCellIndex() const
+{
+    return this->localInterfaceCellIndex;
+}
+
+inline void InterfaceInfo::SetLocalInterfaceCellIndex(int* localInterfaceCellIndex)
+{
+    this->localInterfaceCellIndex = localInterfaceCellIndex;
+}
+
+inline int * InterfaceInfo::GetLocalInterfacePhysicalCellIndex() const
+{
+    return this->localInterfacePhysicalCellIndex;
+}
+
+inline void InterfaceInfo::SetLocalInterfacePhysicalCellIndex(int *localInterfacePhysicalCellIndex)
+{
+    this->localInterfacePhysicalCellIndex = localInterfacePhysicalCellIndex;
+}
+
+/**
+ * @brief return the ghost cell index with respect to the global mesh for interface
+ * 
+ * @param cell local ghost cell index
+ * @return int 
+ */
+inline int InterfaceInfo::MatchedGlobalNeighborCellIndex(int cell)
+{
+    for (int i = 0; i < nIFace; ++i)
+    {
+        if(cell == localInterfaceCellIndex[i])
+        {
+            return globalNeighborCellIndex[i];
+        }
+    }
+    return -1;
+}
+
+/**
+ * @brief return the physical cell index with respect to the local mesh for interface
+ * 
+ * @param cell local ghost cell index
+ * @return int 
+ */
+inline int InterfaceInfo::MatchedLocalPhysicalCellIndex(int cell)
+{
+    for (int i = 0; i < nIFace; ++i)
+    {
+        if(cell == localInterfaceCellIndex[i])
+        {
+            return localInterfacePhysicalCellIndex[i];
+        }
+    }
+    return -1;
+}
+
+inline Data_ParamFieldSuite * InterfaceInfo::GetSendDataStorage(int istore) const
+{
+    return &dsend[istore];
+}
+
+inline Data_ParamFieldSuite * InterfaceInfo::GetRecvDataStorage(int istore) const
+{
+    return &drecv[istore];
+}
+
+inline int InterfaceInfo::GetNIFaceOfNeighbor(int ineighbor) const
+{
+    InterfacePatch *interFacePatch = this->GetInterfacePatch(ineighbor);
+    return interFacePatch->GetNumberOfFace();
+}
+
+inline uint_t InterfaceFields::Size()
+{
+    return variableNames.size();
+}
+
+inline int InterfaceFields::GetDim(const int iData)
+{
+    return variableDimensions[iData];
+}
+
+inline string & InterfaceFields::GetName(const int iData)
+{
+    return variableNames[iData];
+}
+
+inline int InterfaceFields::GetSolverIndex(const int iData)
+{
+    return solverIndex[iData];
+}
diff --git a/API/Geometry/include/Geo_Interpoint.h b/API/Geometry/include/Geo_Interpoint.h
new file mode 100644
index 0000000..12c2f2c
--- /dev/null
+++ b/API/Geometry/include/Geo_Interpoint.h
@@ -0,0 +1,414 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_Interpoint.h
+//! @brief     Interpoint information for multi-zone grid.
+//! @author    Wan Yunbo.
+//! @email     wanyb11@163.com
+//! @date      2019-11-30
+
+#pragma once
+#include <vector>
+#include "Precision.h"
+#include "LIB_Macro.h"
+#include "Data_ParamFieldSuite.h"
+namespace PHSPACE
+{
+//! @brief patched-interpoint class for one neighor zone.
+class InterpointPatch
+{
+private:
+    //! The index of the current zone.
+    int zoneID;
+
+    //! The index of the neighbor zone.
+    int zoneIndexOfNeighbor;
+
+    //! The number of patched-interpoint in the neighbor zone which linked to current zone.
+    int pointNumberOfPatch;
+
+    //! Interpoint index in the CURRENT zone, using in receiving.
+    int *pointIndexForReceive;
+    
+    //! Interpoint index in the TARGET zone, using in sending.
+    int *pointIndexForSend;
+
+private:
+    //! Store the data for sending to other zones.
+    Data_ParamFieldSuite *dataStorageSend;
+
+    //! Store the data for receiving from other zones.
+    Data_ParamFieldSuite *dataStorageReceive;
+
+public:
+    //! Construct function for class InterpointPatch.
+    InterpointPatch();
+    //! Copy construct function for class InterpointPatch.
+    InterpointPatch(const InterpointPatch &interPatchIn);
+    //! Destructor, free memory.
+    ~InterpointPatch();
+public:
+    //! Get the interpoint index in the target zone.
+    //! @param[out] pointIndexForReceive      interpoint index for receiving in current zone.
+    int * GetPointIndexForReceive() const;
+
+    //! Set the interpoint index in the target zone.
+    //! @param[in] pointIndexForReceive      interpoint index for receiving in current zone.
+    void SetPointIndexForReceive(int *pointIndexForReceive);
+
+    //! Get the interpoint number in the target zone.
+    //! @param[out] pointIndexForSend      interpoint index for sending in current zone.
+    int * GetPointIndexForSend() const;
+
+    //! Set the interpoint number in the target zone.
+    //! @param[in] pointIndexForSend      interpoint index for sending in current zone.
+    void SetPointIndexForSend(int *pointIndexForSend);
+
+    //! Get the number of patched-interpoint in the neighbor zone.
+    //! @param[out] pointNumberOfPatch      The number of patched-interpoint in the neighbor zone.
+    int GetNumberOfPoint() const;
+
+    //! Get the number of patched-interpoint in the neighbor zone.
+    //! @param[in] pointNumberOfPatch      The number of patched-interpoint in the neighbor zone.
+    void SetNumberOfPoint(int pointNumberOfPatch);
+
+    //! Get the zone index of the neighbor zone.
+    //! @param[out] zoneIndexOfNeighbor      the zone index of the neighbor zone.
+    int  GetZoneIndexOfNeighbor() const;
+
+    //! Set the zone index of the neighbor zone.
+    //! @param[in] zoneIndexOfNeighbor      the zone index of the neighbor zone.
+    void SetZoneIndexOfNeighbor(int zoneIndexOfNeighbor);
+
+    //! Get the zone index of the current zone.
+    //! @param[out] zoneID      The index of the current zone.
+    int GetZoneID() const;
+
+    //! Allocate the memory for sending and receiving data.
+    void AllocateData();
+};
+
+class Grid;
+
+//! @brief InterpointInformation: inter-point information, similar with the interface information,
+//!        which is used to store the inter-point connection information between neighbor zones.
+class InterpointInformation
+{
+private:
+    //! Number of interpoints.
+    int numberOfInterpoints;
+
+    //! Number of neighbor zones.
+    int numberOfNeighbor;
+
+    //! Neighbor zone index of the interpoint in current zone.
+    int *interPoint2ZoneID;
+
+    //! Interpoint index in neighbor zone of the interpoint in current zone.
+    int *interPoint2InterPointID;
+
+    //! Global point index in current zone of the interpoint in current zone.
+    int *interPoint2GlobalPoint;
+
+    //! Total cell numbers of the interpoint in computing node value, is not node2cell.
+    int *cellNumberOfInterPoint;
+
+    //! Total zones of the interpoint belongs to.
+    int *totalZonesOfInterPoint;
+
+    //! Label of the interpoint,if =1 ,the InterPoint is needed in computing node value.if =0,
+    //! it is not needed in computing node value.
+    int *labelOfInterPoint;
+
+    //! Parent grid of the current grid, using in multi-grid method.
+    Grid *parent;
+
+    //! Data storage for sending.
+    Data_ParamFieldSuite *dataForSend;
+
+    //! Data storage for receiving.
+    Data_ParamFieldSuite *dataForReceive;
+
+    //! The number of patched-interpoint in the neighbor zone which linked to current zone.
+    InterpointPatch **interPointPatch;
+public:
+    //! Construct function for class InterpointInformation.
+    InterpointInformation();
+
+    //! Copy Construct function for class InterpointInfo.
+    //! @param[out] infoIn           an object of class InterpointInfo.
+    InterpointInformation(const InterpointInformation &infoIn);
+
+    //! Copy Construct function for class InterpointInformation.
+    //! @param[in] numberOfInterpoints           Number of interpoints.
+    //! @param[in] parent           Parent grid of the current grid.
+    InterpointInformation(int numberOfInterpoints, Grid *parent = 0);
+
+    //! Destructor, free memory.
+    ~InterpointInformation();
+
+public:
+
+    //! Get the number of interpoints.
+    //! @param[out] interPoint2ZoneID      Neighbor zone index of the interpoint.
+    int * GetInterPoint2ZoneID() const;
+
+    //! Get interpoint index in neighbor zone.
+    //! @param[out] interPoint2InterPointID      interpoint index in neighbor zone.
+    int * GetInterPoint2InterPointID() const;
+
+    //! Get global point index in current zone.
+    //! @param[out] interPoint2GlobalPoint       Global point index in current zone.
+    int * GetInterPoint2GlobalPoint() const;
+
+    //! Get the total cell numbers of the interpoint.
+    //! @param[out] cellNumberOfInterPoint      total cell numbers of the interpoint.
+    int * GetCellNumberOfInterPoint() const;
+
+    //! Get the total zones of the interpoint.
+    //! @param[out] totalZonesOfInterPoint       Total zones of the interpoint.
+    int * GetTotalZonesOfInterPoint() const;
+
+    //! Get the label of the interpoint.
+    //! @param[out] labelOfInterPoint          Label of the interpoint.
+    int * GetLabelOfInterPoint() const;
+
+    //! Get the neighbor zone index of iNeighbor, iNeighbor among in [0, numberOfNeighbor].
+    //! @param[in] iNeighbor            the i-th neighbor for interpoint of this zone.
+    //! @param[out]           the zone index of the i-th neighbor.
+    int GetZoneIndexOfNeighbor(int iNeighbor) const;
+
+    //! Get the point index of iNeighbor for receiving.
+    //! @param[in] iNeighbor            the i-th neighbor for interpoint of this zone.
+    //! @param[out]           the point index of iNeighbor for receiving.
+    int * GetPointIndexForReceive(int iNeighbor) const;
+
+    //! Get the point index of iNeighbor for sending.
+    //! @param[in] iNeighbor            the i-th neighbor for interpoint of this zone.
+    //! @param[out]           the point index of iNeighbor for sending.
+    int * GetPointIndexForSend(int iNeighbor) const;
+
+    //! Get the send data storage of the i-th data.
+    //! @param[in] istore         the ID the sending data storage.
+    //! @param[out]dataForSend[istore]     the send data storage of the i-th data.
+    Data_ParamFieldSuite * GetSendDataStorage(int istore) const;
+
+    //! Get the receive data storage of the i-th data.
+    //! @param[in] istore         the ID the receiving data storage.
+    //! @param[out] dataForSend[istore]     the receive data storage of the i-th data.
+    Data_ParamFieldSuite * GetReceiveDataStorage(int istore) const;
+
+    //! Set the number of interpoints.
+    //! @param[in] numberOfInterpoints           Number of interpoints.
+    void SetNumberOfInterpoints(int numberOfInterpoints);
+
+    //! Get the number of interpoints.
+    //! @param[out] numberOfInterpoints           Number of interpoints.
+    int GetNumberOfInterpoints() const;
+
+    //! Set the number of Neighbor for interpoint.
+    //! @param[in] numberOfNeighbor          Number of neighbor zones.
+    void SetNumberOfNeighbor(int numberOfNeighbor);
+
+    //! Get the number of Neighbor for interpoint.
+    //! @param[out] numberOfNeighbor          Number of neighbor zones.
+    int  GetNumberOfNeighbor() const;
+
+    //! get the index of Neighbor zone.
+    //! @param[in] zone          zone Index.
+    //! @param[out]            the i-th index.
+    int FindIthNeighbor(int zone);
+
+    //! Compute the point index of iNeighbor for sending.
+    //! @param[in] iNeighbor            the i-th neighbor for interpoint of this zone.
+    //! @param[out]           the point index of iNeighbor for sending.
+    int * ComputePointIndexForSend(int iNeighbor);
+
+    //! Fill the point index of iNeighbor for sending to zone.
+    //! @param[in] zone            the zone Index for sending to.
+    //! @param[in] pointIndexForSendIn         point index for sending to zone.
+    void FillPointIndexForSend(int zone, int *pointIndexForSendIn);
+
+    //! Get the number of patched-interpoint.
+    //! @param[out] interPointPatch        the number of patched-interpoint.
+    InterpointPatch ** GetInterpointPatch() const;
+
+    //! Get the patched-interpoint of the ith neighbor zone.
+    //! @param[in] iNeighbor        the i-th neighbor zone.
+    //! @param[out] interPointPatch        the patched-interpoint of the i-th neighbor zone.
+    InterpointPatch * GetInterpointPatch(int iNeighbor) const;
+
+    //! Find the neighbor zone for interpoint.
+    void FindNeighbors();
+
+    //! Init the neighbor zone for interpoint.
+    void InitNeighbors();
+
+    //! Init the i-th neighbor zone for interpoint.
+    //! @param[in] iNeighbor        the i-th neighbor zone.
+    void InitNeighbors(int iNeighbor);
+
+    //! Allocate the memory for the neighbors for interpoint.
+    void AllocateNeighborInfo();
+
+    //! Allocate the memory for the neighbors sending or receive of the interpoint.
+    //! @param[in] iNeighbor        the i-th neighbor zone.
+    void AllocateSendReceive(int iNeighbor);
+
+    //! Get the number of the interpoint with the i-th neighbor.
+    //! @param[in] iNeighbor        the i-th neighbor zone.
+    int GetNumberOfInterpointsForNeighbor(int iNeighbor) const;
+
+    //! compute the point index for receive interpoint in current zone.
+    //! @param[in] iNeighbor        the i-th neighbor zone.
+    void ComputePointIndexForReceive(int iNeighbor);
+
+    //! Compute the number of the interpoint for the i-th neighbor.
+    //! @param[in] iNeighbor        the i-th neighbor zone.
+    int ComputeNumberOfInterpointsForNeighbor(int iNeighbor);
+
+    //! Compute the number of the neighbors for this zone.
+    //! @param[in] zoneFlag        array to store the neighbor zones.
+    int ComputeNumberOfNeighbor(int *zoneFlag);
+
+    //! Resize the number of new interpoints according to the new number of inter points.
+    //! @param[in] numberOfNewInterpoints        the number of new interpoints in this zone.
+    void ReSize(int numberOfNewInterpoints);
+
+    //! Set the neighbor of this interpoint found or not.
+    //! @param[in] data        array to store true or false.
+    void SetIsNeighborInterpointFound(bool *data);
+
+    //! Get the neighbor of this interpoint found or not.
+    //! @param[out] isNeighborInterpointFound         Is the neighbor interpoint has been found.
+    bool * GetIsNeighborInterpointFound();
+
+private:
+    //! Is the neighbor interpoint has been found.
+    //! This is used during partition only.
+    bool *isNeighborInterpointFound;
+};
+
+//! Interpoint variable fields
+//! Store the interpoint variable for multi-zone grid, using for Parallel communication.
+class InterpointFields
+{
+private:
+    //! List of interpoint field variable names.
+    vector<string> variableNames;
+
+    //! List of interpoint field variable types.
+    vector<int> variableTypes;
+
+    //! List of interpoint field variable dimensions.
+    //! eg. 1D/2D array, dimension is equal to '1' or '2'.
+    vector<int> variableDimensions;
+
+    //! Interpoint information.
+    InterpointInformation *interpointInformation;
+
+    //! Solver ID.
+    vector<int> solverIndex;
+
+public:
+
+    //! Construct function.
+    //! @param[in] interpointInformationIn       an object of class InterpointInformation.
+    InterpointFields(InterpointInformation *interpointInformationIn);
+
+    //! Destructor, free memory.
+    ~InterpointFields();
+
+public:
+    //! Get the number of variables.
+    //! @param[out]         the number of variables.
+    uint_t Size();
+
+    //! Get the dimension  of the i-th data.
+    //! @param[in]iData         data index.
+    //! @param[out]         the dimension  of the i-th data.
+    int GetDimension(const int iData);
+
+    //! Get the name  of the i-th data.
+    //! @param[in]iData         data index.
+    //! @param[out]         the name  of the i-th data.
+    string & GetName(const int iData);
+
+    //! Get the solver index  of the i-th data.
+    //! @param[in]iData         data index.
+    //! @param[out]         the solver index  of the i-th data.
+    int GetSolverIndex(const int iData);
+
+    //! Register the data fields according to the name, type and dimensional.
+    //! @param[in] name         data fields name.
+    //! @param[in] type         data fields type.
+    //! @param[in] dimesion         data fields dimesion.
+    //! @param[in] solverID         data fields solverID.
+    void RegisterField(const string &name, const int type, const int dimesion, const int solverID);
+
+    //! Free the store for interpoint.
+    void FreeInterpointVariable();
+
+    //! Get the sending variable according to the name and the ghost layers.
+    //! @param[in] name         data fields name.
+    //! @param[in] IDOfGhostLayer         the ID of ghost layers..
+    //! @param[out]              the sending variable.
+    template<typename T>
+    T ** GetSendVariable(const string &name, const int IDOfGhostLayer);
+
+    //! Get the sending variable according to the name and the ghost layers.
+    //! @param[in] name         data fields name.
+    //! @param[in] IDOfGhostLayer         the ID of ghost layers..
+    //! @param[out]              the receiving variable.
+    template<typename T>
+    T ** GetReceiveVariable(const string &name, const int IDOfGhostLayer);
+
+private:
+
+    //! Allocate the memory for variable according to the name type and dimesion.
+    //! @param[in] name         data fields name.
+    //! @param[in] type         data fields type.
+    //! @param[in] dimesion         data fields dimesion.
+    //! @param[out] datastore        the data store for all variables needing communicating.
+    void AllocateInterpointVariable(const string &name, const int type, const int dimesion, Data_ParamFieldSuite *datastore);
+
+    //! Free the memory for all variables.
+    //! @param[in] datastore        the data store for all variables needing communicating.
+    void FreeInterpointVariable(Data_ParamFieldSuite *datastore);
+};
+
+//! @brief store the interpoint value.\n
+class InterpointDataProxy
+{
+private:
+    //! The vector to store the interpoint data for sending or receiving.
+    vector<RDouble **> vdata;
+
+    //! The vector to store the interpoint data dimension for sending or receiving.
+    vector<int> vdim;
+public:
+    //! Construct function for class InterpointDataProxy.
+    InterpointDataProxy();
+
+    //! Destructor, free memory
+    ~InterpointDataProxy();
+public:
+    //! Get the vector of the interpoint data.
+    //! @param[out] vdata      vector of the interpoint data.
+    vector<RDouble **> & GetVectorData();
+
+    //! Get the vector of the interpoint data dimension.
+    //! @param[out] vdim      the vector of the interpoint data dimension.
+    vector<int> & GetVectorDimension();
+};
+
+#include "Geo_Interpoint.hxx"
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_Interpoint.hxx b/API/Geometry/include/Geo_Interpoint.hxx
new file mode 100644
index 0000000..cd9f44d
--- /dev/null
+++ b/API/Geometry/include/Geo_Interpoint.hxx
@@ -0,0 +1,167 @@
+inline int * InterpointPatch::GetPointIndexForReceive() const
+{
+    return pointIndexForReceive; 
+}
+
+inline void InterpointPatch::SetPointIndexForReceive(int *pointIndexForReceive)
+{
+    this->pointIndexForReceive = pointIndexForReceive; 
+}
+
+inline int * InterpointPatch::GetPointIndexForSend() const
+{
+    return pointIndexForSend;
+}
+
+inline void InterpointPatch::SetPointIndexForSend(int *pointIndexForSend)
+{
+    this->pointIndexForSend = pointIndexForSend; 
+}
+
+inline int InterpointPatch::GetNumberOfPoint() const
+{
+    return pointNumberOfPatch;
+}
+
+inline void InterpointPatch::SetNumberOfPoint(int pointNumberOfPatch) 
+{ 
+    this->pointNumberOfPatch = pointNumberOfPatch;
+}
+
+inline int InterpointPatch::GetZoneIndexOfNeighbor() const 
+{ 
+    return zoneIndexOfNeighbor; 
+}
+
+inline void InterpointPatch::SetZoneIndexOfNeighbor(int zoneIndexOfNeighbor) 
+{
+    this->zoneIndexOfNeighbor = zoneIndexOfNeighbor; 
+}
+
+inline int InterpointPatch::GetZoneID() const 
+{ 
+    return zoneID; 
+}
+
+inline void InterpointInformation::SetNumberOfInterpoints(int numberOfInterpoints)
+{ 
+    this->numberOfInterpoints = numberOfInterpoints; 
+}
+
+inline int InterpointInformation::GetNumberOfInterpoints() const
+{ 
+    return numberOfInterpoints;
+}
+
+inline void InterpointInformation::SetNumberOfNeighbor(int numberOfNeighbor) 
+{ 
+    this->numberOfNeighbor = numberOfNeighbor;
+}
+
+inline int InterpointInformation::GetNumberOfNeighbor() const 
+{
+    return numberOfNeighbor;
+}
+
+inline InterpointPatch ** InterpointInformation::GetInterpointPatch() const
+{
+    return interPointPatch;
+}
+
+inline InterpointPatch * InterpointInformation::GetInterpointPatch(int iNeighbor) const
+{
+    return interPointPatch[iNeighbor];
+}
+
+inline int * InterpointInformation::GetInterPoint2ZoneID() const 
+{ 
+    return interPoint2ZoneID; 
+}
+
+inline int * InterpointInformation::GetInterPoint2InterPointID() const 
+{ 
+    return interPoint2InterPointID;
+}
+
+inline int * InterpointInformation::GetInterPoint2GlobalPoint() const 
+{
+    return interPoint2GlobalPoint;
+}
+
+inline int * InterpointInformation::GetCellNumberOfInterPoint() const 
+{
+    return cellNumberOfInterPoint;
+}
+
+inline int * InterpointInformation::GetTotalZonesOfInterPoint() const 
+{
+    return totalZonesOfInterPoint;
+}
+inline int * InterpointInformation::GetLabelOfInterPoint() const
+{
+    return labelOfInterPoint;
+}
+
+inline void InterpointInformation::SetIsNeighborInterpointFound(bool *data)
+{
+    this->isNeighborInterpointFound = data;
+}
+
+inline bool * InterpointInformation::GetIsNeighborInterpointFound()
+{
+    return isNeighborInterpointFound;
+}
+
+inline int InterpointInformation::GetZoneIndexOfNeighbor(int iNeighbor) const 
+{
+    InterpointPatch *interPointPatch = this->GetInterpointPatch(iNeighbor);
+    return interPointPatch->GetZoneIndexOfNeighbor();
+}
+
+inline int * InterpointInformation::GetPointIndexForReceive(int iNeighbor) const
+{
+    InterpointPatch *interPointPatch = this->GetInterpointPatch(iNeighbor);
+    return interPointPatch->GetPointIndexForReceive();
+}
+
+inline int * InterpointInformation::GetPointIndexForSend(int iNeighbor) const
+{ 
+    InterpointPatch *interPointPatch = this->GetInterpointPatch(iNeighbor);
+    return interPointPatch->GetPointIndexForSend();
+}
+
+inline Data_ParamFieldSuite * InterpointInformation::GetSendDataStorage(int iStore) const
+{ 
+    return &dataForSend[iStore]; 
+}
+
+inline Data_ParamFieldSuite * InterpointInformation::GetReceiveDataStorage(int iStore) const
+{ 
+    return &dataForReceive[iStore];
+}
+
+inline int InterpointInformation::GetNumberOfInterpointsForNeighbor(int iNeighbor) const
+{ 
+    InterpointPatch *interPointPatch = this->GetInterpointPatch(iNeighbor);
+    return interPointPatch->GetNumberOfPoint();
+}
+
+inline uint_t InterpointFields::Size()
+{
+    return variableNames.size();
+}
+
+inline int InterpointFields::GetDimension(const int iData)
+{
+    return variableDimensions[iData];
+}
+
+inline string & InterpointFields::GetName(const int iData)
+{
+    return variableNames[iData];
+}
+
+inline int InterpointFields::GetSolverIndex(const int iData)
+{
+    return solverIndex[iData];
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_LSQWeight_Unstruct.h b/API/Geometry/include/Geo_LSQWeight_Unstruct.h
new file mode 100644
index 0000000..8a000ea
--- /dev/null
+++ b/API/Geometry/include/Geo_LSQWeight_Unstruct.h
@@ -0,0 +1,88 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_LSQWeight_Unstruct.h
+//! @brief     It defines the Least Square Weight of the unstructured grid.
+//! @author    Bell, He Xin.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "Precision.h"
+namespace PHSPACE
+{
+//! @brief Geo_LSQWeight_Unstruct class defines Least Square Weight of unstructured grid.\n
+class Geo_LSQWeight_Unstruct
+{
+private:
+
+    RDouble *iwt;
+
+    RDouble *ixx, *iyy, *izz;
+
+    RDouble *ixy, *ixz, *iyz;
+
+    char *fMark;
+public:
+    LIB_EXPORT Geo_LSQWeight_Unstruct();
+    LIB_EXPORT ~Geo_LSQWeight_Unstruct();
+
+public:
+    //! Return the least square weights IWT.
+    RDouble * GetLeastSquareIWT() const;
+
+    //! Return the least square weights IXX.
+    RDouble * GetLeastSquareIXX() const;
+
+    //! Return the least square weights IYY.
+    RDouble * GetLeastSquareIYY() const;
+
+    //! Return the least square weights IZZ.
+    RDouble * GetLeastSquareIZZ() const;
+
+    //! Return the least square weights IXY.
+    RDouble * GetLeastSquareIXY() const;
+
+    //! Return the least square weights IXZ.
+    RDouble * GetLeastSquareIXZ() const;
+
+    //! Return the least square weights IYZ.
+    RDouble * GetLeastSquareIYZ() const;
+
+    //! Set the least square weights IWT.
+    void SetLeastSquareIWT(RDouble *iwt);
+
+    //! Set the least square weights IXX.
+    void SetLeastSquareIXX(RDouble *ixx);
+
+    //! Set the least square weights IYY.
+    void SetLeastSquareIYY(RDouble *iyy);
+
+    //! Set the least square weights IZZ.
+    void SetLeastSquareIZZ(RDouble *izz);
+
+    //! Set the least square weights IXY.
+    void SetLeastSquareIXY(RDouble *ixy);
+
+    //! Set the least square weights IXZ.
+    void SetLeastSquareIXZ(RDouble *ixz);
+
+    //! Set the least square weights IYZ.
+    void SetLeastSquareIYZ(RDouble *iyz);
+
+    //! Get the face mark.
+    char * GetFaceMark() const;
+
+    //! Set the face mark.
+    void SetFaceMark(char *fMark);
+};
+
+#include "Geo_LSQWeight_Unstruct.hxx"
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_LSQWeight_Unstruct.hxx b/API/Geometry/include/Geo_LSQWeight_Unstruct.hxx
new file mode 100644
index 0000000..e061c8a
--- /dev/null
+++ b/API/Geometry/include/Geo_LSQWeight_Unstruct.hxx
@@ -0,0 +1,79 @@
+inline void Geo_LSQWeight_Unstruct::SetLeastSquareIWT(RDouble *iwt) 
+{
+    this->iwt = iwt;
+}
+
+inline void Geo_LSQWeight_Unstruct::SetLeastSquareIXX(RDouble *ixx)
+{
+    this->ixx = ixx;
+}
+
+inline void Geo_LSQWeight_Unstruct::SetLeastSquareIYY(RDouble *iyy) 
+{
+    this->iyy = iyy;
+}
+
+inline void Geo_LSQWeight_Unstruct::SetLeastSquareIZZ(RDouble *izz)
+{
+    this->izz = izz;
+}
+
+inline void Geo_LSQWeight_Unstruct::SetLeastSquareIXY(RDouble *ixy) 
+{
+    this->ixy = ixy;
+}
+
+inline void Geo_LSQWeight_Unstruct::SetLeastSquareIXZ(RDouble *ixz)
+{
+    this->ixz = ixz;
+}
+
+inline void Geo_LSQWeight_Unstruct::SetLeastSquareIYZ(RDouble *iyz) 
+{
+    this->iyz = iyz;
+}
+
+inline void Geo_LSQWeight_Unstruct::SetFaceMark(char *fMark)
+{
+    this->fMark = fMark;
+}
+
+inline RDouble * Geo_LSQWeight_Unstruct::GetLeastSquareIWT() const
+{
+    return iwt;
+}
+
+inline RDouble * Geo_LSQWeight_Unstruct::GetLeastSquareIXX() const
+{
+    return ixx;
+}
+
+inline RDouble * Geo_LSQWeight_Unstruct::GetLeastSquareIYY() const
+{
+    return iyy;
+}
+
+inline RDouble * Geo_LSQWeight_Unstruct::GetLeastSquareIZZ() const
+{
+    return izz;
+}
+
+inline RDouble * Geo_LSQWeight_Unstruct::GetLeastSquareIXY() const
+{
+    return ixy;
+}
+
+inline RDouble * Geo_LSQWeight_Unstruct::GetLeastSquareIXZ() const
+{
+    return ixz;
+}
+
+inline RDouble * Geo_LSQWeight_Unstruct::GetLeastSquareIYZ() const
+{
+    return iyz;
+}
+
+inline char * Geo_LSQWeight_Unstruct::GetFaceMark() const
+{
+    return fMark;
+}
diff --git a/API/Geometry/include/Geo_LineTopo_Unstruct.h b/API/Geometry/include/Geo_LineTopo_Unstruct.h
new file mode 100644
index 0000000..01add68
--- /dev/null
+++ b/API/Geometry/include/Geo_LineTopo_Unstruct.h
@@ -0,0 +1,78 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +  
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_LineTopo_Unstruct.h
+//! @brief     It defines the face topology of the unstructured grid,
+//!              such as the face-cell and face-node connected relationship.
+//! @author    WanYunBo.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "Pointer.h"
+namespace PHSPACE
+{
+//! @brief Geo_LineTopo_Unstruct class defines the line for line implicit LUSGS.\n
+class Geo_LineTopo_Unstruct
+{
+private:
+    //! the number of lines.
+    int nLine;
+
+    //! the number of cells in all lines.
+    int *nCellsInLines;
+
+    //! the cell No. of all lines.
+    int **CellOfLine;
+
+    //! the face No. of all lines.
+    int **FaceOfLine;
+
+    //! the line No. of all cells.
+    int *LineOfCell;
+
+public:
+    LIB_EXPORT Geo_LineTopo_Unstruct();
+    LIB_EXPORT ~Geo_LineTopo_Unstruct();
+
+public:
+    //! set the number of lines.
+    void SetLI_nLine(int nLine);
+
+    //! set the number of cells in all lines.
+    void SetLI_nCellsInLine(int *nCellsInLines);
+
+    //! set the cell No. of all lines.
+    void SetLI_CellOfLine(int **CellOfLine);
+
+    //! set the face No. of all lines.
+    void SetLI_FaceOfLine(int **FaceOfLine);
+
+    //! set the line No. of all cells.
+    void SetLI_LineOfCell(int *LineOfCell);
+
+    //! get the number of lines.
+    int GetLI_nLine() const;
+
+    //! get the number of cells in all lines.
+    int * GetLI_nCellsInLine() const;
+
+    //! get the cell No. of all lines.
+    int ** GetLI_CellOfLine() const;
+
+    //! get the face No. of all lines.
+    int ** GetLI_FaceOfLine() const;
+
+    //! get the line No. of all cells.
+    int * GetLI_LineOfCell() const;
+};
+
+#include "Geo_LineTopo_Unstruct.hxx"
+}
diff --git a/API/Geometry/include/Geo_LineTopo_Unstruct.hxx b/API/Geometry/include/Geo_LineTopo_Unstruct.hxx
new file mode 100644
index 0000000..8ac578e
--- /dev/null
+++ b/API/Geometry/include/Geo_LineTopo_Unstruct.hxx
@@ -0,0 +1,50 @@
+inline void Geo_LineTopo_Unstruct::SetLI_nLine(int nLine_in)
+{
+    this->nLine = nLine_in;
+}
+
+inline void Geo_LineTopo_Unstruct::SetLI_nCellsInLine(int *nCellsInLines_in)
+{
+    this->nCellsInLines = nCellsInLines_in;
+}
+
+inline void Geo_LineTopo_Unstruct::SetLI_CellOfLine(int **CellOfLine_in)
+{
+    this->CellOfLine = CellOfLine_in;
+}
+
+inline void Geo_LineTopo_Unstruct::SetLI_FaceOfLine(int **FaceOfLine_in)
+{
+    this->FaceOfLine = FaceOfLine_in;
+}
+
+inline void Geo_LineTopo_Unstruct::SetLI_LineOfCell(int *LineOfCell_in)
+{
+    this->LineOfCell = LineOfCell_in;
+}
+
+inline int Geo_LineTopo_Unstruct::GetLI_nLine() const
+{
+    return nLine;
+}
+
+inline int * Geo_LineTopo_Unstruct::GetLI_nCellsInLine() const
+{
+    return nCellsInLines;
+}
+
+inline int ** Geo_LineTopo_Unstruct::GetLI_CellOfLine() const
+{
+    return CellOfLine;
+}
+
+inline int ** Geo_LineTopo_Unstruct::GetLI_FaceOfLine() const
+{
+    return FaceOfLine;
+}
+
+inline int * Geo_LineTopo_Unstruct::GetLI_LineOfCell() const
+{
+    return LineOfCell;
+}
+
diff --git a/API/Geometry/include/Geo_MultiGridInfo_Struct.h b/API/Geometry/include/Geo_MultiGridInfo_Struct.h
new file mode 100644
index 0000000..ec32bae
--- /dev/null
+++ b/API/Geometry/include/Geo_MultiGridInfo_Struct.h
@@ -0,0 +1,49 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_MultiGridInfo_Struct.h
+//! @brief     It defines the multi-grid step of the structured grid,
+//!            such as StepI, StepJ, StepK.
+//! @author    Zhang Jian.
+
+#pragma once
+namespace PHSPACE
+{
+
+class Geo_MultiGridInfo_Struct
+{
+private:
+    int istp, jstp, kstp;    //! Multigrid step.
+public:
+    Geo_MultiGridInfo_Struct();
+    ~Geo_MultiGridInfo_Struct();
+public:
+    //!
+    int GetMultigridStepI() const;
+
+    //!
+    int GetMultigridStepJ() const;
+
+    //!
+    int GetMultigridStepK() const;
+
+    //!
+    void SetMultigridStepI(int istp);
+
+    //!
+    void SetMultigridStepJ(int jstp);
+
+    //!
+    void SetMultigridStepK(int kstp);
+};
+
+#include "Geo_MultiGridInfo_struct.hxx"
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_MultiGridInfo_struct.hxx b/API/Geometry/include/Geo_MultiGridInfo_struct.hxx
new file mode 100644
index 0000000..66d6e2e
--- /dev/null
+++ b/API/Geometry/include/Geo_MultiGridInfo_struct.hxx
@@ -0,0 +1,29 @@
+inline int Geo_MultiGridInfo_Struct::GetMultigridStepI() const
+{
+    return istp;
+}
+
+inline int Geo_MultiGridInfo_Struct::GetMultigridStepJ() const
+{
+    return jstp;
+}
+
+inline int Geo_MultiGridInfo_Struct::GetMultigridStepK() const
+{
+    return kstp;
+}
+
+inline void Geo_MultiGridInfo_Struct::SetMultigridStepI(int istp)
+{
+    this->istp = istp;
+}
+
+inline void Geo_MultiGridInfo_Struct::SetMultigridStepJ(int jstp)
+{
+    this->jstp = jstp;
+}
+
+inline void Geo_MultiGridInfo_Struct::SetMultigridStepK(int kstp)
+{
+    this->kstp = kstp;
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_NodeTopo_Struct.h b/API/Geometry/include/Geo_NodeTopo_Struct.h
new file mode 100644
index 0000000..b24e59e
--- /dev/null
+++ b/API/Geometry/include/Geo_NodeTopo_Struct.h
@@ -0,0 +1,82 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_NodeTopo_Struct.h
+//! @brief     It defines the node topology of the structured grid,
+//!            such as the node dimension(ni, nj, nk) and three dimensional 
+//!            array of node coordinates(structx[i][j][k], structy[i][j][k], structz[i][j][k]).
+//! @author    Bell, Zhang Jian, He Xin.
+
+#pragma once
+#include "TypeDefine.h"
+namespace PHSPACE
+{
+//! @brief Geo_NodeTopo_Struct class defines the node dimension and coordinates.
+class Geo_NodeTopo_Struct
+{
+private:
+    //! The dimension of three direction.
+    int ni, nj, nk;
+
+    //! The node coordinates array of three direction.
+    RDouble3D *structx, *structy, *structz;
+
+public:
+    Geo_NodeTopo_Struct();
+    ~Geo_NodeTopo_Struct();
+
+public:
+    //! Set the node dimension of I direction (ni).
+    void SetNI(int ni);
+
+    //! Set the node dimension of J direction (nj).
+    void SetNJ(int nj);
+
+    //! Set the node dimension of K direction (nk).
+    void SetNK(int nk);
+
+    //! Get the node dimension of I direction (ni).
+    int GetNI() const;
+
+    //! Get the node dimension of J direction (nj).
+    int GetNJ() const;
+
+    //! Get the node dimension of K direction (nk).
+    int GetNK() const;
+
+    //! Get the all node's x coordinates array (structx).
+    RDouble3D * GetStructX() const;
+
+    //! Get the all node's y coordinates array (structy).
+    RDouble3D * GetStructY() const;
+
+    //! Get the all node's z coordinates array (structz).
+    RDouble3D * GetStructZ() const;
+
+    //! Set the three dimensional array of coordinates from one dimensional coordinates.
+    //! @param[in] x    x coordinates of all nodes.
+    //! @param[in] y    y coordinates of all nodes.
+    //! @param[in] z    z coordinates of all nodes.
+    //! @note           use x to create a three dimensional array structx, with range I(1, ni), J(1, nj), K(1, nk).
+    void SetArrayLayout(RDouble *x, RDouble *y, RDouble *z);
+
+    //! Set the three dimensional array of coordinates from one dimensional coordinates for HighOrder structured solver.
+    //! @param[in] x    x coordinates of all nodes.
+    //! @param[in] y    y coordinates of all nodes.
+    //! @param[in] z    z coordinates of all nodes.
+    void SetArrayLayoutStructHighOrder(RDouble *x, RDouble *y, RDouble *z);
+
+private:
+    void DeallocateAll();
+};
+
+#include "Geo_NodeTopo_Struct.hxx"
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_NodeTopo_Struct.hxx b/API/Geometry/include/Geo_NodeTopo_Struct.hxx
new file mode 100644
index 0000000..d572633
--- /dev/null
+++ b/API/Geometry/include/Geo_NodeTopo_Struct.hxx
@@ -0,0 +1,51 @@
+inline void Geo_NodeTopo_Struct::SetNI(int ni)
+{
+    this->ni = ni;
+}
+
+inline void Geo_NodeTopo_Struct::SetNJ(int nj)
+{
+    this->nj = nj;
+}
+
+inline void Geo_NodeTopo_Struct::SetNK(int nk)
+{
+    this->nk = nk;
+}
+
+inline int Geo_NodeTopo_Struct::GetNI() const
+{
+    return ni;
+}
+
+inline int Geo_NodeTopo_Struct::GetNJ() const
+{
+    return nj;
+}
+
+inline int Geo_NodeTopo_Struct::GetNK() const
+{
+    return nk;
+}
+
+inline RDouble3D * Geo_NodeTopo_Struct::GetStructX() const
+{
+    return structx;
+}
+
+inline RDouble3D * Geo_NodeTopo_Struct::GetStructY() const
+{
+    return structy;
+}
+
+inline RDouble3D * Geo_NodeTopo_Struct::GetStructZ() const
+{
+    return structz;
+}
+
+inline void Geo_NodeTopo_Struct::DeallocateAll()
+{
+    if (structx) { delete structx;    structx = 0; }
+    if (structy) { delete structy;    structy = 0; }
+    if (structz) { delete structz;    structz = 0; }
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_NodeTopo_Unstruct.h b/API/Geometry/include/Geo_NodeTopo_Unstruct.h
new file mode 100644
index 0000000..1a2bccd
--- /dev/null
+++ b/API/Geometry/include/Geo_NodeTopo_Unstruct.h
@@ -0,0 +1,61 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_NodeTopo_Unstruct.h
+//! @brief     It defines the node topology of the unstructured grid,
+//!            such as the node-face, node-cell, node-node connected relationship.
+//! @author    Bell, He Xin.
+
+#pragma once
+#include "LIB_Macro.h"
+namespace PHSPACE
+{
+//! @brief Geo_NodeTopo_Unstruct class defines the node-face, node-cell, node-node \n
+//! connected relationship of unstructured grid.\n
+//! 1: cells index list of each node.
+class Geo_NodeTopo_Unstruct
+{
+private:
+    //! Number of connected cells per node.
+    int *cell_number_of_each_node;
+
+    //! Node to cell: connected cells index of per node.
+    int *node2cell;
+
+    //! 2D Node to cell: connected cells index of per node.
+    int **node2CellArray;
+
+public:
+    LIB_EXPORT Geo_NodeTopo_Unstruct();
+    LIB_EXPORT ~Geo_NodeTopo_Unstruct();
+
+public:
+    //! Set the number of connected cells per node.
+    void SetCellNumberOfEachNode(int *nCPN);
+
+    //! Set node to cell: connected cells index of per node.
+    void SetNode2Cell(int *n2c);
+
+    //! Get the number of connected cells per node.
+    int * GetCellNumberOfEachNode() const;
+
+    //! Get node to cell: connected cells index of per node.
+    int * GetNode2Cell() const;
+
+    //! Set 2-D node to cell: connected cells index of per node.
+    void SetNode2CellArray(int **node2Cell);
+
+    //! Get 2-D node to cell: connected cells index of per node.
+    int ** GetNode2CellArray() const;
+};
+
+#include "Geo_NodeTopo_Unstruct.hxx"
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_NodeTopo_Unstruct.hxx b/API/Geometry/include/Geo_NodeTopo_Unstruct.hxx
new file mode 100644
index 0000000..3260293
--- /dev/null
+++ b/API/Geometry/include/Geo_NodeTopo_Unstruct.hxx
@@ -0,0 +1,41 @@
+inline int * Geo_NodeTopo_Unstruct::GetCellNumberOfEachNode() const
+{
+    return cell_number_of_each_node;
+}
+
+inline int * Geo_NodeTopo_Unstruct::GetNode2Cell() const
+{
+    return node2cell;
+}
+
+inline void Geo_NodeTopo_Unstruct::SetCellNumberOfEachNode(int *nCPN)
+{
+    if (this->cell_number_of_each_node && this->cell_number_of_each_node != nCPN)
+    {
+        delete [] this->cell_number_of_each_node;
+    }
+    this->cell_number_of_each_node = nCPN;
+}
+
+inline void Geo_NodeTopo_Unstruct::SetNode2Cell(int *n2c)
+{
+    if (this->node2cell && this->node2cell != n2c)
+    {
+        delete [] this->node2cell;
+    }
+    this->node2cell = n2c; 
+}
+
+inline void Geo_NodeTopo_Unstruct::SetNode2CellArray(int **node2Cell)
+{
+    if (this->node2CellArray && this->node2CellArray != node2Cell)
+    {
+        delete [] this->node2CellArray;
+    }
+    this->node2CellArray = node2Cell;
+}
+
+inline int ** Geo_NodeTopo_Unstruct::GetNode2CellArray() const
+{
+    return this->node2CellArray;
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_OversetGrid.h b/API/Geometry/include/Geo_OversetGrid.h
new file mode 100644
index 0000000..cef81e9
--- /dev/null
+++ b/API/Geometry/include/Geo_OversetGrid.h
@@ -0,0 +1,156 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_OversetGrid.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+#include "Geo_Grid.h"
+#include "Geo_Interface.h"
+#include "Geo_Interpoint.h"
+#pragma warning (disable:4100)
+// Composite Overlapping Meshes for the Solution of Partial Differential Equations
+// G.CHESSGIRE AND W. D. HENSHAW
+// JOURNAL OF COMPUTATIONAL PHYSICS 90, 1-64(1990)
+
+// The algorithm for the generation of a composite grid must detect regions of overlap
+// and determine the points to be used for interpolation between component grids.
+// In addition, the algorithm should recognize regions of grid points which are not 
+// needed in the computation.
+
+// A valid composite grid G consists of a set of component grids Gk, labelled by k, 
+// k = 1, ..., ng. The particular composite grid which is generated will depend upon a 
+// number of parameters including
+// (1) the width of the interpolation formula,
+// (2) the width of the discretization formula,
+// (3) the minimum allowable overlap,
+// (4) the ordering of the component grids.
+
+// Each point(i,j,k) on a valid composite grid must be one of the following:
+// (1) Discretization point.
+//     A discretization point is either an interior point or a boundary point.
+//     Point(i,j,k) is called an interior point if it can be discretized, to
+//     the required order, in terms of points on component grid Gk which are
+//     interior points, boundary points, or interpolation points. The discretization
+//     is assumed to be centered so that a rectangle of points is required;
+//     the width and height of the rectangle being specified by the user.
+//     Point(i,j,k) is called a boundary point if it lies on the true boundary
+//     and can be discretized to the required order in terms of points on grid Gk
+//     which are interior points, boundary points, or interpolation points.
+//     (Boundary condition discretizations may be different from interior point
+//     discretizations.)
+// (2) Interpolation point.
+//     Point(i,j,k) is an interpolation point if it can be interpolated from 
+//     discretization or interpolation points on another component grid Gk'
+//     with k'<> k to the required order.
+// (3) Exterior or unused point.
+//     Point(i,j,k) is an exterior or unused point if it is not a discretization
+//     or interpolation point.
+
+// It is possible that a given point could belong to more than one of the above
+// categories. For example, some discretization points might just as well be 
+// interpolation points. However, for efficiency we try to create a composite grid 
+// with a minimum number of interpolation points. It is possible that the only valid
+// composits grid is one consisting entirely of unused points, a null grid. This 
+// situtation can be avoided by having enough overlap between component grids.
+
+// The basic idea in our composite grid construction algorithm is to think of 
+// ordering the component grids, k = 1, 2, ..., ng so that higher-numbered grids 
+// cover over parts of lower-numbered component grids. Points which are removed will
+// be in general lie underneath a higher numbered component grid.
+
+// We now outline the composite grid algorithm for constructing a composite grid from
+// a set of component grids. We combine an explanation in words with brief sections of
+// pseudo-code. The composite grid is described by a flag array, kr(i,j,k)(where kr 
+// stands for coordinates). This array contains a code for each point on the composite grid, 
+// indicating whether the point(i,j,k) is a discretization, exterior of interpolation point.
+// By the end of the algorithm the values in this array will have the following meaning
+
+//            = k     if (i,j,k) is a discretization point
+//  kr(i,j,k) = - k'  if (i,j,k) is interpolated from grid k' <> k
+//            = 0     if (i,j,k) is an exterior point
+
+namespace PHSPACE
+{
+class Grid;
+class StructGrid;
+class UnstructGrid;
+
+enum OversetPointType
+{ 
+    ExteriorPoint = 0
+};
+
+class Geo_OversetGrid
+{
+private:
+    Grid *grid;
+    RDouble *xb, *yb, *zb;
+    uint_t numberOfBoundaryPoints;
+    int rank;
+    int nBlocks;
+
+    OversetInfoProxy *oversetInfoProxy;
+public:
+    Geo_OversetGrid(Grid *grid_in, int rank, int nBlocks);
+    ~Geo_OversetGrid();
+public:
+    bool IsExteriorPoint(int flagOfPoint);
+
+    int GetZoneID() const { return GetGrid()->GetZoneID(); }
+
+    OversetInfoProxy * GetOversetInfoProxy() { return oversetInfoProxy; }
+
+    Grid * GetGrid() const { return grid; }
+    void SetX(RDouble *xb) { this->xb = xb; }
+    void SetY(RDouble *yb) { this->yb = yb; }
+    void SetZ(RDouble *zb) { this->zb = zb; }
+    RDouble * GetX() const { return xb; }
+    RDouble * GetY() const { return yb; }
+    RDouble * GetZ() const { return zb; }
+
+    void SetNumberOfBoundaryPoints(uint_t numberOfBoundaryPoints) { this->numberOfBoundaryPoints = numberOfBoundaryPoints; }
+    uint_t GetNumberOfBoundaryPoints() const { return numberOfBoundaryPoints; }
+
+    void SetRank(int rank) { this->rank = rank; }
+    int  GetRank() const { return rank; }
+    int  GetNBlocks() const { return nBlocks; }
+    void InitReceivingInformation(vector<int> &cellIndexRef1, vector<int> &zoneIndexRef2, vector<int> &cellIndexRef2);
+    void PrepareSendingInformation(Geo_OversetGrid **oversetGrids);
+    void DumpOversetGrid(fstream &file);
+public:
+    virtual void InitialFlagOfGridPoints(int numberOfOversetGrid) {};
+    virtual void MarkNonBoundaryPoints(int numberOfBoundaryPoints, RDouble *xBoundary, RDouble *yBoundary, RDouble *zBoundary) {};
+    virtual bool FindGridOfEachPointCanBeInterpolatedFrom(Geo_OversetGrid **oversetGrids) { return true; }
+    virtual void MarkAllPointsOnLowerGridNeededByHigherGrid(Geo_OversetGrid **oversetGrids) {};
+    virtual void MarkAllPointsOnHigherGridNeededByLowerGrid(Geo_OversetGrid **oversetGrids) {};
+    virtual void NormalizeAllValidPoints(Geo_OversetGrid **oversetGrids) {};
+public:
+    virtual void PrepareReceivingInformation(Geo_OversetGrid **oversetGrids) {};
+    virtual void MarkNegativeSignOfIndexFlag(int index) {};
+    virtual bool FindInterplatePoints(RDouble xm, RDouble ym, RDouble zm, int &index, RDouble &xit, RDouble &yit, RDouble &zit) = 0;
+    virtual void SetFlag(vector<int> &idlist, int value) {};
+    virtual void DumpFlags(fstream &file) {};
+    virtual void PreProcess();
+    virtual void PostProcess(Geo_OversetGrid **oversetGrids);
+    virtual void GetCellCenterCoor(vector<int> &index, vector<RDouble> &xcc, vector<RDouble> &ycc, vector<RDouble> &zcc) {};
+};
+
+bool p_On_RHSide(RDouble &x, RDouble &y, RDouble &z, RDouble *p1, RDouble *p2);
+bool InBox(RDouble &xb, RDouble &yb, RDouble &zb, RDouble *pmin, RDouble *pmax);
+bool RightSide(RDouble &xm, RDouble &ym, RDouble &zm, RDouble &xfc, RDouble &yfc, RDouble &zfc, RDouble &xfn, RDouble &yfn, RDouble &zfn);
+
+vector<string> GetTecplotTitle(const string &field_name);
+void DumpField(UnstructGrid *grid, fstream &file, RFloat *field, const string &name);
+void Visualization(UnstructGrid *grid, RFloat *field, const string &filename, const string &fieldname);
+
+}
diff --git a/API/Geometry/include/Geo_OversetGridTopo_Struct.h b/API/Geometry/include/Geo_OversetGridTopo_Struct.h
new file mode 100644
index 0000000..632336f
--- /dev/null
+++ b/API/Geometry/include/Geo_OversetGridTopo_Struct.h
@@ -0,0 +1,74 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_OversetGridTopo_Struct.h
+//! @brief     It defines the topology information of the overlap grid.
+//! @author    Zhang Jian, He Xin.
+
+#pragma once
+#include "TypeDefine.h"
+
+namespace PHSPACE
+{
+//! @brief Geo_OversetGridTopo_Struct class
+class Geo_OversetGridTopo_Struct
+{
+private:
+    int numberOfCores;
+    int zoneStartPointLabel;
+    int *iLinkPointLabel, *jLinkPointLabel, *kLinkPointLabel;
+    int *iBlank;
+    int zoneStartCenterLabel;
+    int *hingedPointContainer;
+    RDouble *xCoreContainer, *yCoreContainer, *zCoreContainer;
+
+public:
+    Geo_OversetGridTopo_Struct();
+    ~Geo_OversetGridTopo_Struct();
+public:
+
+    int GetNumberOfCores() const;
+
+    int GetZoneStartPointLabel() const;
+
+    int * GetILinkPointLabel() const;
+
+    int * GetJLinkPointLabel() const;
+
+    int * GetKLinkPointLabel() const;
+
+    int * GetCellTypeContainer() const;
+
+    int * GetHingedPointContainer() const;
+
+    RDouble * GetXCoreContainer() const;
+
+    RDouble * GetYCoreContainer() const;
+
+    RDouble * GetZCoreContainer() const;
+
+    void SetNumberOfCores(int numberOfCores);
+
+    void SetCellContainer(int *iBlank) { this -> iBlank = iBlank; }
+
+    void SetZoneStartPointLabel(int zoneStartPointLabel);
+
+    void SetZoneStartCenterLabel(int zoneStartCenterLabel);
+
+    void CreateLinkPointStructure(int nTotalNode);
+
+    void CreateCellContainer(int nTotalCell);
+
+    void CreateCoreParameterContainer(int numberOfCores);
+};
+
+#include "Geo_OversetGridTopo_Struct.hxx"
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_OversetGridTopo_Struct.hxx b/API/Geometry/include/Geo_OversetGridTopo_Struct.hxx
new file mode 100644
index 0000000..d54c234
--- /dev/null
+++ b/API/Geometry/include/Geo_OversetGridTopo_Struct.hxx
@@ -0,0 +1,64 @@
+inline int Geo_OversetGridTopo_Struct::GetNumberOfCores() const
+{
+    return numberOfCores;
+}
+
+inline int Geo_OversetGridTopo_Struct::GetZoneStartPointLabel() const
+{
+    return zoneStartPointLabel;
+}
+
+inline int * Geo_OversetGridTopo_Struct::GetILinkPointLabel() const
+{
+    return iLinkPointLabel;
+}
+
+inline int * Geo_OversetGridTopo_Struct::GetJLinkPointLabel() const
+{
+    return jLinkPointLabel;
+}
+
+inline int * Geo_OversetGridTopo_Struct::GetKLinkPointLabel() const
+{
+    return kLinkPointLabel;
+}
+
+inline int * Geo_OversetGridTopo_Struct::GetCellTypeContainer() const
+{
+    return iBlank;
+}
+
+inline void Geo_OversetGridTopo_Struct::SetNumberOfCores(int numberOfCores)
+{
+    this->numberOfCores = numberOfCores;
+}
+
+inline void Geo_OversetGridTopo_Struct::SetZoneStartCenterLabel(int zoneStartCenterLabel)
+{
+    this->zoneStartCenterLabel = zoneStartCenterLabel;
+}
+
+inline void Geo_OversetGridTopo_Struct::SetZoneStartPointLabel(int zoneStartPointLabel)
+{
+    this->zoneStartPointLabel = zoneStartPointLabel;
+}
+
+inline int * Geo_OversetGridTopo_Struct::GetHingedPointContainer() const
+{
+    return hingedPointContainer;
+}
+
+inline RDouble * Geo_OversetGridTopo_Struct::GetXCoreContainer() const
+{
+    return xCoreContainer;
+}
+
+inline RDouble * Geo_OversetGridTopo_Struct::GetYCoreContainer() const
+{
+    return yCoreContainer;
+}
+
+inline RDouble * Geo_OversetGridTopo_Struct::GetZCoreContainer() const
+{
+    return zCoreContainer;
+}
diff --git a/API/Geometry/include/Geo_Point.h b/API/Geometry/include/Geo_Point.h
new file mode 100644
index 0000000..1b985ac
--- /dev/null
+++ b/API/Geometry/include/Geo_Point.h
@@ -0,0 +1,71 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_Point.h
+//! @brief     Class of grid point.
+//! @author    Bell, He Xin.
+
+#pragma once
+#include "Math_BasisFunction.h"
+using namespace std;
+
+namespace PHSPACE
+{
+template < typename T >
+class Geo_Point
+{
+public:
+    typedef Geo_Point<T> point_type;
+private:
+    T x, y, z;
+    int id;
+    RDouble tolerance;
+public:
+    Geo_Point();
+    Geo_Point(const T &x, const T &y, const T &z, int id = 0);
+    Geo_Point(const point_type &rhs);
+    Geo_Point & operator = (const point_type &rhs);
+    ~Geo_Point();
+public:
+    T X() const { return x; }
+    T Y() const { return y; }
+    T Z() const { return z; }
+    int ID() const { return id; }
+
+    void SetTolerance(RDouble dataIn) { this->tolerance = dataIn; }
+
+    void SetX(const T &x) { this->x  = x;  }
+    void SetY(const T &y) { this->y  = y;  }
+    void SetZ(const T &z) { this->z  = z;  }
+    void SetID(int id)    { this->id = id; }
+
+    int hash_key() const;
+public:
+    bool operator < (const point_type &rhs) const;
+    friend bool operator == (const Geo_Point &pt1, const Geo_Point &pt2)
+    {
+        RDouble epsilon = 1.0e-13;
+
+        if (&pt1 == &pt2) return true;
+
+        RDouble dx = ABS(pt1.X() - pt2.X());
+        RDouble dy = ABS(pt1.Y() - pt2.Y());
+        RDouble dz = ABS(pt1.Z() - pt2.Z());
+
+        return (dx <= epsilon && dy <= epsilon && dz <= epsilon);
+    }
+};
+
+typedef Geo_Point< RDouble > Point3D;
+
+}
+
+#include "Geo_Point.hxx"
diff --git a/API/Geometry/include/Geo_Point.hxx b/API/Geometry/include/Geo_Point.hxx
new file mode 100644
index 0000000..b1e750b
--- /dev/null
+++ b/API/Geometry/include/Geo_Point.hxx
@@ -0,0 +1,86 @@
+#include "Geo_Point.h"
+
+#include <iostream>
+using namespace std;
+
+namespace PHSPACE
+{
+template < typename T >
+Geo_Point<T>::Geo_Point()
+{
+}
+
+template < typename T >
+Geo_Point<T>::Geo_Point(const T &x, const T &y, const T &z, int id)
+{
+    this->x  = x;
+    this->y  = y;
+    this->z  = z;
+    this->id = id;
+    tolerance = 0.0;
+}
+
+template < typename T >
+Geo_Point<T>::Geo_Point(const point_type &rhs)
+{
+    this->x  = rhs.x;
+    this->y  = rhs.y;
+    this->z  = rhs.z;
+    this->id = rhs.id;
+    tolerance = 0.0;
+}
+
+template < typename T >
+Geo_Point<T>::~Geo_Point(void)
+{
+}
+
+template < typename T >
+Geo_Point<T> & Geo_Point<T>::operator = (const Geo_Point<T> &rhs)
+{
+    if (this == &rhs) return *this;
+
+    this->x  = rhs.x;
+    this->y  = rhs.y;
+    this->z  = rhs.z;
+    this->id = rhs.id;
+
+    return *this;
+}
+
+template < typename T >
+bool Geo_Point<T>::operator < (const Geo_Point<T> &rhs) const
+{
+    T dx = x - rhs.x;
+    T dy = y - rhs.y;
+    T dz = z - rhs.z;
+
+    T diff = 1.0e-8;
+
+    if (ABS(dx) > diff) return x < rhs.x;
+    if (ABS(dy) > diff) return y < rhs.y;
+    if (ABS(dz) > diff) return z < rhs.z;
+
+    return false;
+}
+
+template < typename T >
+int Geo_Point<T>::hash_key() const
+{
+    RDouble dbl[3];
+    int *intg = (int *) dbl;
+
+    dbl[0] = x;
+    dbl[1] = y;
+    dbl[2] = z;
+
+    int hashnum = 0;
+    for (int i = 0; i < 3; i ++)
+    {
+        hashnum += (intg[i] >> i);
+    }
+
+    return (int) ABS(hashnum);
+}
+
+}
diff --git a/API/Geometry/include/Geo_PointFactory.h b/API/Geometry/include/Geo_PointFactory.h
new file mode 100644
index 0000000..7fa6b17
--- /dev/null
+++ b/API/Geometry/include/Geo_PointFactory.h
@@ -0,0 +1,132 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_PointFactory.h
+//! @brief     Explain this file briefly.
+//! @author    Bell, Zhang Yang.
+
+#pragma once
+#include "PHHeader.h"
+#include "GRHash.h"
+using namespace GRIDER_SPACE;
+
+namespace PHSPACE
+{
+
+class Geo_PointFactory
+{
+public:
+    Geo_PointFactory ();
+    ~Geo_PointFactory();
+
+public:
+    typedef RDouble value_type;
+    typedef Point3D point_type;
+    typedef set< point_type >::iterator iterator;
+
+protected:
+    PHVectorRDouble1D pointRBFWeight;
+    
+    PHVectorRDouble1D pointNormalX;
+    PHVectorRDouble1D pointNormalY;
+    PHVectorRDouble1D pointNormalZ;
+
+    PointHash pointList;
+    PHVector1D < point_type > pointArray;
+
+    PHVectorInt1D * computationalToGlobalNodeIndexMapping;
+    PHVectorInt1D * globalToComputationalNodeIndexMapping;
+
+    PHVector1D < set< int > > pointBoundaryConditionType;
+
+    int oldNumberOfComputationalNodes;
+
+    RDouble minDistance;
+
+public:
+    //!
+    PHVectorRDouble1D & GetPointRBFWeight() { return pointRBFWeight; }
+
+    //!
+    PHVectorRDouble1D & GetPointNormalX() { return pointNormalX; }
+
+    //!
+    PHVectorRDouble1D & GetPointNormalY() { return pointNormalY; }
+
+    //!
+    PHVectorRDouble1D & GetPointNormalZ() { return pointNormalZ; }
+
+    //!
+    void SetMinDistance(RDouble dataIn) { this->minDistance = dataIn; }
+
+    //! Get the minimum distance between two points.
+    RDouble GetMinDistance() { return this->minDistance; }
+
+    //!
+    point_type & GetPoint(int id) { return pointArray[id]; }
+
+    //!
+    PHVectorInt1D & GetComputationalToGlobalNodeIndexMapping(){ return *computationalToGlobalNodeIndexMapping; }
+
+    //!
+    PHVectorInt1D & GetGlobalToComputationalNodeIndexMapping(){ return *globalToComputationalNodeIndexMapping; }
+
+    //!
+    void SetPoint(int id, point_type &point) { pointArray[id] = point; }
+
+    //!
+    bool FindPoint(point_type &point, iterator &iter);
+
+    //!
+    void AddPointDirectly(point_type &point, int boundaryConditionType = 0);
+
+    //!
+    int AddPoint(point_type *&point, bool &isNodeExist);
+
+    //!
+    int AddPointTest(point_type &point, int iNode, int numberOfNodes);
+
+    //!
+    PointHash & GetPointList() { return pointList; }
+
+    //!
+    PHVector1D < point_type > & GetPointArray() { return pointArray; }
+
+    //!
+    uint_t GetNumberOfComputationalNodes() { return (*computationalToGlobalNodeIndexMapping).size(); }    //! Green.
+
+    //!
+    uint_t GetNumberOfPoints() { return pointArray.size(); }
+
+    //!
+    Geo_PointFactory::point_type * GetCenterPoint(PHVectorInt1D &element, vector< int > &pointList);
+
+    //!
+    Geo_PointFactory::point_type CirclePoint(PHVectorInt1D &element, PHVectorInt1D &pointList);
+
+    //!
+    void SetBoundaryPoint(set< int > &bcVertex, int boundaryConditionType);
+
+    //!
+    bool PointWithBoundary(int index, int boundaryConditionType);
+
+    //!
+    void InsertPointBoundaryConditionType(int index, int boundaryConditionType);
+
+    //!
+    void SetOldNumberOfComputationalNodes(int oldNumberOfComputationalNodes);
+
+    //!
+    int GetOldNumberOfComputationalNodes();
+};
+
+Geo_PointFactory::point_type GetCenterPoint(PHVectorInt1D &element, PHVectorInt1D &pointList);
+}
diff --git a/API/Geometry/include/Geo_Sample.h b/API/Geometry/include/Geo_Sample.h
new file mode 100644
index 0000000..48cfa5c
--- /dev/null
+++ b/API/Geometry/include/Geo_Sample.h
@@ -0,0 +1,226 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_Sample.h
+//! @brief     To set location information and data structure for Sampling.
+//! @author    MengLiyuan.
+
+#pragma once
+#include "Math_BasisFunction.h"
+#include "Geo_Grid.h"
+#include "Geo_UnstructGrid.h"
+#include "Geo_StructGrid.h"
+using namespace std;
+
+namespace PHSPACE
+{
+class ProbeData
+{
+private:
+    vector <RDouble> probeCoordinates;
+    int probeGlobalID;
+    int probeLineID;
+    int probeSurfaceID;
+    bool isProbeValid;
+    RDouble probeToCellDistance;
+    int probeCellType;
+    int probeCellZoneID;
+    int probeCellID;
+    int probeCellNI;
+    int probeCellNJ;
+    int probeCellNK;
+
+public:
+    ProbeData();
+    ~ProbeData();
+
+public:
+    //! To set coordinates by in-parameter.
+    void SetProbeCoordinates(const vector <RDouble> &probeCoordinates);
+    //! To set global index of the probe.
+    void SetProbeGlobalID(const int &probeGlobalID);
+    //! To set line index of the probe.
+    void SetProbeLineID(const int &probeLineID);
+    //! To set surface index of the probe.
+    void SetProbeSurfaceID(const int &probeSurfaceID);
+    //! To set validity of the probe.
+    void SetProbeValidity(const bool &isProbeValid);
+
+    //! To set distance from the probe to its cell.
+    void SetProbeToCellDistance(const RDouble &probeToCellDistance);
+    //! To set grid type of the probe cell.
+    void SetProbeCellType(const int &probeCellType);
+    //! To set zone index of the probe cell.
+    void SetProbeCellZoneID(const int &probeCellZoneID);
+    //! To set index of the probe cell(unstructured grid).
+    void SetProbeCellID(const int &probeCellID);
+
+    //! To set the probe cell dimension of i direction (structured grid).
+    void SetProbeCellNI(const int &probeCellNI);
+    //! To set the probe cell dimension of j direction (structured grid).
+    void SetProbeCellNJ(const int &probeCellNJ);
+    //! To set the probe cell dimension of k direction (structured grid).
+    void SetProbeCellNK(const int &probeCellNK);
+
+    //! To get coordinates of the probe.
+    vector <RDouble> GetProbeCoordinates();
+    //! To get validity of the probe.
+    bool GetProbeValidity();
+
+    //! To get distance from the probe to its cell.
+    RDouble GetProbeToCellDistance();
+    //! To get grid type of the probe cell.
+    int GetProbeCellType();
+    //! To get zone index of the probe cell.
+    int GetProbeCellZoneID();
+    //! To get index of the probe cell(unstructured grid).
+    int GetProbeCellID();
+    //! To Get global index of the probe.
+    int GetProbeGlobalID();
+    //! To Get line index of the probe.
+    int GetProbeLineID();
+    //! To Get surface index of the probe.
+    int GetProbeSurfaceID();
+    //! To get the probe cell dimension of i direction (structured grid).
+    int GetProbeCellNI();
+    //! To get the probe cell node dimension of j direction (structured grid).
+    int GetProbeCellNJ();
+    //! To get the probe cell node dimension of k direction (structured grid).
+    int GetProbeCellNK();
+
+    //! To search the cell nearest to the probe.
+    void SearchNearestCell(Grid *grid);
+    //! To search the cell nearest to the probe for structured grid.
+    void SearchNearestCell(StructGrid *grid);
+    //! To search the cell nearest to the probe for unstructured grid.
+    void SearchNearestCell(UnstructGrid *grid);
+
+    //! To search the real cell where the probe is located.
+    void SearchRealCell(Grid *grid, bool &flag);
+    //! To search the real cell where the probe is located for structured grid.
+    void SearchRealCell(StructGrid *grid, bool &flag);
+    //! To search the real cell where the probe is located for unstructured grid.
+    void SearchRealCell(UnstructGrid *grid, bool &flag);
+
+    //! To dump the probe cell information of the each probe for structured grid.
+    void WriteStructProbeCellInfo(fstream &file);
+    //! To dump the probe cell information of the each probe for unstructured grid.
+    void WriteUnstructProbeCellInfo(fstream &file);
+
+    //! Compress each ProbeData probe cell information to DataContainer for structured grid.
+    void CompressStructProbeCellInfo(DataContainer *cdata);
+    //! Compress each ProbeData probe cell information to DataContainer for unstructured grid.
+    void CompressUnstructProbeCellInfo(DataContainer *cdata);
+   
+    //! Decompress DataContainer's probe cell information into each ProbeData for structured grid.
+    void DecompressStructProbeCellInfo(DataContainer *cdata);
+    //! Decompress DataContainer's probe cell information into each ProbeData for unstructured grid.
+    void DecompressUnstructProbeCellInfo(DataContainer *cdata);
+};
+
+class SampleLocationInfo
+{
+private:
+
+    string defineFileName;
+    int numberToMonitor;
+    bool defineFileExist;
+    int numberOfTotalProbes;
+    vector <int> numberOfProbes;
+    vector <int> surfaceProbes_ni;
+    vector <int> surfaceProbes_nj;
+    vector <int> typeOfTotalProbes;
+    vector <ProbeData *> sampleLocationInfo;
+
+public:
+    SampleLocationInfo();
+    ~SampleLocationInfo();
+
+public:
+    void Run();
+    //! To set the file name of data monitor parameter.
+    void SetDefineFileName(const string &defineFileName);
+    //! To set the number of lines or surfaces.
+    void SetNumberToMonitor(const int &numberToMonitor);
+    //! To set the total number of probes.
+    void SetTotalProbesNumber(const int &numberOfTotalProbes);
+    //! To set the probes number of each line or surface.
+    void SetProbesNumber(const vector <int> &numberOfProbes);
+    //! To set the probe dimension of I direction of each surface.
+    void SetSurfaceProbesNI(const vector <int> &surfaceProbes_ni);
+    //! To set the probe dimension of J direction of each surface..
+    void SetSurfaceProbesNJ(const vector <int> &surfaceProbes_nj);
+    //!To set the grid type of all probes.
+    void SetTotalProbesType(const vector <int> &typeOfTotalProbes);
+
+    //! Check if the defined file exist(xxx_XYZ.dat).
+    void CheckIfDefineFileExist();
+    //! To get the number of lines or surfaces.
+    int GetNumberToMonitor();
+
+    //! To get the file name of data monitor parameter.
+    string GetDefineFileName();
+    //!To get the total number of probes.
+    int GetTotalProbesNumber();
+    //!To get the probes number of each line or surface.
+    vector <int> GetProbesNumber();
+    //! To get the probe dimension of I direction of each surface.
+    vector <int> GetSurfaceProbesNI();
+    //! To get the probe dimension of J direction of each surface..
+    vector <int> GetSurfaceProbesNJ();
+    //!To get the grid type of all probes.
+    vector <int> GetTotalProbesType();
+
+    //! To get the location information of all probes.
+    vector<ProbeData *> GetSampleLocationInfo();
+    //! If the defined file exist or not(xxx_XYZ.dat).
+    bool IfDefineFileExist();
+    //! No dimension the parameter.
+    void Nondimensional();
+
+private:
+    //! To read coordination parameter in probesDefineFile.
+    void ReadProbesData();
+    //! To read coordination parameter in linesDefineFile.
+    void ReadLinesData();
+    //! To read coordination parameter in surfacesDefineFile.
+    void ReadSurfacesData();
+    //! Check the invalid probes data in define file.
+    void CheckInvalidProbesData();
+    //! Add or update all the probes' cell information to ProbData.
+    void UpdateAllProbesData();
+    //! Add or update all the probes' nearest cell information to ProbData.
+    void UpdateNearestCellsData();
+    //! Add or update all the probes' real cell information to ProbData.
+    void UpdateRealCellsData();
+    //! Add or update some global parameters about probes information.
+    void UpdateProbesGlobalPara();
+    //! Communicate with each processor,then determine probes' cell of all zones with minimum distance.
+    void ServerCollectionProbesData();
+    //! Broadcast all probes data to all processor.
+    void BroadcastProbesData();
+    //! Compress each ProbeData probe cell information to DataContainer.
+    void CompressProbesData(DataContainer *cdata);
+    //! Decompress DataContainer's probe cell information into each ProbeData
+    void DecompressProbesData(DataContainer *cdata);
+    //! To save the all probes cells data to class grid.
+    void SampleLocationInfoToGrid();
+    //! To dump the information of the all probes cells.
+    void WriteProbesCellInfo(const string &filename);
+};
+
+//! Check if the probe in Min-Max box.
+bool CheckIfProbeInMinMaxBox(RDouble coordX, RDouble coordY, RDouble coordZ, RDouble *pmin, RDouble *pmax);
+
+//! To dump the probes cells information file title.
+void WriteProbesCellInfoHeader(fstream &file);
+
+}
diff --git a/API/Geometry/include/Geo_SimpleBC.h b/API/Geometry/include/Geo_SimpleBC.h
new file mode 100644
index 0000000..207282e
--- /dev/null
+++ b/API/Geometry/include/Geo_SimpleBC.h
@@ -0,0 +1,393 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_SimpleBC.h
+//! @brief     It is the base class of geometry operation for boundary condition.
+//!            The inheriting order is: SimpleBC -> StructBC/UnstructBC.
+//! @author    Zhang Yong, Bell, He Xin.
+
+#pragma once
+#include "TypeDefine.h"
+#include "Constants.h"
+#include "Data_Param.h"
+#include "Data_Field.h"
+using namespace std;
+
+namespace PHSPACE
+{
+namespace PHENGLEI
+{
+    //! the 1000 for periodic is default output of the User Defined for CGNS.
+    const int PERIODIC                     = 1000;
+    const int USER_DEFINED                 = -3;
+    const int WAKE                         = -2;
+    const int INTERFACE                    = -1;
+    const int NO_BOUNDARY_CONDITION        = 0;
+    const int EXTRAPOLATION                = 1;
+    const int SOLID_SURFACE                = 2;
+    const int SYMMETRY                     = 3;
+    const int FARFIELD                     = 4;
+    const int INFLOW                       = 5;
+    const int OUTFLOW                      = 6;
+
+    //! surface with ablation is 119.
+    const int ABLATION_SURFACE             = 119;
+
+    //! pressure in and out boundary 52, 62.
+    const int PRESSURE_INLET               = 52;
+    const int PRESSURE_OUTLET              = 62;
+
+    //! pressure in and out for nozzle boundary.
+    const int NOZZLE_INFLOW                = 53;
+    const int NOZZLE_OUTFLOW               = 63;
+
+    //! mass flow in and out boundary 53, 63.
+    const int MASS_FLOW_INLET              = 53;
+    const int MASS_FLOW_OUTLET             = 63;
+
+    const int OUTFLOW_CONFINED             = 61;
+    const int POLE                         = 7;
+    const int POLE1                        = 71;
+    const int POLE2                        = 72;
+    const int POLE3                        = 73;
+    const int GENERIC_1                    = 8;
+    const int GENERIC_2                    = 9;
+    const int GENERIC_3                    = 10;
+    const int INTERIOR                     = 100;
+
+    const int EXTERNAL_BC                  = 9;    //! External overlap cells label.
+
+    //! Boundary condition for special case.
+    const int PRESSURE_INLET_PLATE         = 1001;
+    const int PRESSURE_OUTLET_PLATE        = 1002;
+
+    const int StartNumberOfBodyOfHyperFLOW = 11;
+    const int ENDNumberOfBodyOfHyperFLOW   = 30;
+    const int BODY1                        = 11;
+    const int BODY2                        = 12;
+    const int BODY3                        = 13;
+    const int BODY4                        = 14;
+    const int BODY5                        = 15;
+    const int BODY6                        = 16;
+    const int BODY7                        = 17;
+    const int BODY8                        = 18;
+    const int BODY9                        = 19;
+    const int BODY10                       = 20;
+    const int BODY11                       = 21;
+    const int BODY12                       = 22;
+    const int BODY13                       = 23;
+    const int BODY14                       = 24;
+    const int BODY15                       = 25;
+    const int BODY16                       = 26;
+    const int BODY17                       = 27;
+    const int BODY18                       = 28;
+    const int BODY19                       = 29;
+    const int BODY20                       = 30;
+    const int OVERSET                      = 1000;
+}
+
+namespace INIFLOW_SPACE
+{
+    const int RECTANGLE             = 0;
+    const int SPHERE                = 1;
+    const int CYLINDER              = 2;
+    const int CONE                  = 3;
+
+    const int CUSTOM_ANGLE          = 0;
+    const int CUSTOM_VECTOR         = 1;
+}
+
+
+
+namespace GRIDGEN_SPACE
+{
+    const int INTERFACE             = -1;
+    const int NO_BOUNDARY_CONDITION = 0;
+    const int SOLID_SURFACE         = 2;
+    const int SYMMETRY              = 3;
+    const int FARFIELD              = 4;
+    const int INFLOW                = 5;
+    const int OUTFLOW               = 6;
+    const int POLE                  = 7;
+    const int GENERIC_1             = 8;
+    const int GENERIC_2             = 9;
+    const int GENERIC_3             = 10;
+    const int PERIODIC              = 99;
+}
+
+namespace FLUENT_SPACE
+{
+    const int FLUENT_COMMENT            = 0;
+    const int FLUENT_HEADER             = 1;
+    const int FLUENT_DIMENSIONS         = 2;
+    const int FLUENT_NODES              = 10;
+    const int FLUENT_EDGES              = 11;
+    const int FLUENT_CELLS              = 12;
+    const int FLUENT_FACES              = 13;
+    const int FLUENT_PERIODICFACES      = 18;
+    const int FLUENT_C39                = 39;
+    const int FLUENT_C45                = 45;
+    const int MaxFluentBCType           = 38;
+    const int FLUENT_CELLTREE           = 58;
+    const int FLUENT_FACETREE           = 59;
+
+    const int NODETYPE_GHOST            = 0;
+    const int NODETYPE_NOTYPE           = 1;
+    const int NODETYPE_BOUNDARY         = 2;
+
+    const int ELEMENTTYPE_MIXED         = 0;
+    const int ELEMENTTYPE_TRIANGULAR    = 1;
+    const int ELEMENTTYPE_TETRAHEDRAL   = 2;
+    const int ELEMENTTYPE_QUADRILATERAL = 3;
+    const int ELEMENTTYPE_HEXAHEDRAL    = 4;
+    const int ELEMENTTYPE_PYRAMID       = 5;
+    const int ELEMENTTYPE_WEDGE         = 6;
+    const int ELEMENTTYPE_POLYHEDRAL    = 7;
+
+    const int CELLTYPE_DEAD             = 0;
+    const int CELLTYPE_FLUID            = 1;
+    const int CELLTYPE_SOLID            = 17;
+
+    const int FACETYPE_MIXED            = 0;
+    const int FACETYPE_LINEAR           = 2;
+    const int FACETYPE_TRIANGULAR       = 3;
+    const int FACETYPE_QUADRILATERAL    = 4;
+    const int FACETYPE_POLYGONAL        = 5;
+
+    const int UNSPECIFIED               = 0;
+    const int INTERIOR                  = 2;
+    const int WALL                      = 3;
+    const int PRESSURE_INLET            = 4;
+    const int INLET_VENT                = 4;
+    const int INTAKE_FAN                = 4;
+    const int PRESSURE_OUTLET           = 5;
+    const int EXHAUST_FAN               = 5;
+    const int OUTLET_VENT               = 5;
+    const int SYMMETRY                  = 7;
+    const int PERIODIC_SHADOW           = 8;
+    const int PRESSURE_FAR_FIELD        = 9;
+    const int VELOCITY_INLET            = 10;
+    const int PERIODIC                  = 12;
+    const int FAN                       = 14;
+    const int POROUS_JUMP               = 14;
+    const int RADIATOR                  = 14;
+    const int MASS_FLOW_INLET           = 20;
+    const int INTERFACE                 = 24;
+    const int PARENT                    = 31;
+    const int OUTFLOW                   = 36;
+    const int AXIS                      = 37;
+}
+
+//! @brief A boundary condition base class, StructBC and UnstructBC inheriting from it.
+class SimpleBC
+{
+public:
+    SimpleBC()
+    {
+        bcName = "";
+        bodyName = "";
+        bcType = 0;
+
+        bcParamDataBase = new Data_Param();
+        bcFieldDataBase = new Data_Field();
+    }
+
+    ~SimpleBC()
+    {
+        delete bcParamDataBase;    bcParamDataBase = NULL;
+        delete bcFieldDataBase;    bcFieldDataBase = NULL;
+    }
+
+private:
+    //! Boundary name of BC;
+    string bcName;
+
+    string bodyName;
+
+    //! Boundary type value of BC;
+    int bcType;
+
+    //! BC control parameters.
+    Data_Param *bcParamDataBase;
+
+    //! BC data pointers.
+    Data_Field *bcFieldDataBase;
+
+public:
+    const string & GetBCName() const { return this->bcName; }
+
+    const string & GetBodyName()
+    { 
+        //string *bodyName = new string;
+        if (bcParamDataBase->IsExist("bodyName", PHSTRING, 1))
+        {
+            bcParamDataBase->GetData("bodyName", &bodyName, PHSTRING, 1);
+        }
+        return bodyName; 
+    }
+
+    //! Get boundary conditions type.
+    int GetBCType() const { return this->bcType; }
+
+    Data_Param * GetBCParamDataBase();
+    Data_Field * GetBCFieldDataBase();
+
+    void SetBCName(const string &bcName) { this->bcName = bcName; }
+    void SetBodyName(const string &bodyName) { this->bodyName = bodyName; }
+    void SetBCType(int bcType) { this->bcType = bcType; }
+    void SetBCParamDataBase(Data_Param *paraDB)  { this->bcParamDataBase = paraDB; }
+    void SetBCFieldDataBase(Data_Field *fieldDB) { this->bcFieldDataBase = fieldDB; }
+
+    void UpdateParamData(const string &name, void *data, int type, int size) 
+    {
+        bcParamDataBase->UpdateData(name, data, type, size);
+    }
+
+    void GetParamData(const string &name, void *data, int type, int size) 
+    {
+        bcParamDataBase->GetData(name, data, type, size);
+    }
+
+    int CheckParamData(const string &name)
+    {
+        return bcParamDataBase->CheckDataExist(name);
+    }
+
+    void UpdateFieldDataPtr(const string &name, void *data)
+    {
+        bcFieldDataBase->UpdateDataPtr(name, data);
+    };
+
+    void * GetFieldDataPtr(const string &name) const
+    {
+        return bcFieldDataBase->GetDataPtr(name);
+    };
+
+    int CheckFieldData(const string &name)
+    {
+        return bcFieldDataBase->CheckDataExist(name);
+    }
+};
+
+//! @brief Global boundary conditions, all of the global boundary conditions are stored here.
+class GlobalBoundaryCondition
+{
+private:
+    //! Warning: it has not been deleted!
+    static vector<SimpleBC *> *globalBCList;
+    static map <int, int> *bodyMap;
+    static set <string> *bodyList;
+
+private:
+    GlobalBoundaryCondition();
+    ~GlobalBoundaryCondition();
+
+public:
+    //! Get number of total BC.
+    static uint_t GetNumberOfBC()
+    {
+        if (!globalBCList)
+            return 0;
+        else
+            return globalBCList->size();
+    }
+
+    static uint_t GetNumberOfBody()
+    {
+        if (!bodyList)
+        {
+            return 0;
+        }
+        else
+        {
+            return bodyList->size();
+        }
+    }
+
+    static uint_t GetBodyIndex(int iBC)
+    {
+        return (*bodyMap)[iBC];
+    }
+
+    static string GetBoundaryName(int iBC)
+    {
+        return (*globalBCList)[iBC]->GetBCName();
+    }
+
+    static set <string> * GetBodyNameList() { return bodyList; }
+
+    //! Get number of BC with solid_wall BC type.
+    static int GetNumberOfSolidWallPart();
+
+    //! Is solid wall.
+    static bool IsSolidWallBC(const int &partID)
+    {
+        return ((*globalBCList)[partID]->GetBCType() == PHENGLEI::SOLID_SURFACE /*|| PHENGLEI::ABLATION_SURFACE*/);
+    }
+
+    static SimpleBC *GetBC(const int &iBC) { return (*globalBCList)[iBC]; }
+
+    //! Get global boundary conditions list.
+    static vector<SimpleBC *> *GetGlobalBoundaryConditionList() { return globalBCList; }
+
+    //! Read global boundary conditions.
+    static void ReadGlobalBoundaryCondition();
+
+    static void SetGlobalBCByGlobalDataBase();
+
+    static void SetBCDataBaseByGlobalBC();
+
+    static void SetDefaultSolidBoundaryCondition();
+
+    static void ChangeBCTypeByGlobalBC();
+
+    static void SetBCInitialValuesByReynolds(Data_Param *bcParamDB, RDouble *primitiveVar);
+
+    static void SetBCInitialValuesByHeight(Data_Param *bcParamDB, RDouble *primitiveVar);
+
+    static void SetMaximumSpeciesForBC(Data_Param *bcParamDB);
+
+    static void SetSpeedDrictionForBC(Data_Param *bcParamDB, RDouble localNonDimensionalVelocity, RDouble *primitiveVar);
+
+    static void SetSpeedDrictionForReferenceVar(RDouble localNonDimensionalVelocity, RDouble *primitiveVar);
+
+    static void SetBCInitialValuesByDensity(Data_Param *bcParamDB, RDouble *primitiveVar);
+
+    static void SetBCInitialValuesByPressure(Data_Param *bcParamDB, RDouble *primitiveVar);
+
+    static void SetBCInitialValuesByTotalPressure(Data_Param *bcParamDB, RDouble *primitiveVar);
+
+    static void SetBCInitialValuesByMachNumberTemperaturePressure(Data_Param *bcParamDB, RDouble *primitiveVar);
+
+    static void SetBCInitialValuesByWRFData(Data_Param *bcParamDB, RDouble *primitiveVar);
+
+    static void SetBCInitialValuesByPrimitive(Data_Param *bcParamDB, RDouble *primitiveVar);
+
+    static void SetBCInitialValuesByMolecularWeightGama(Data_Param *bcParamDB, RDouble *primitiveVar);
+
+    static void InitMassFlowBoundary();
+private:
+    static void ParseBCFromFile(fstream &file);
+    static void BuildBodyMap();
+};
+
+//! Judge whether a boundary condition type number belongs to interface.
+bool IsInterface(const int &boundaryConditionType);
+
+//! Judge whether a boundary condition type number belongs to solid surface.
+inline bool IsWall(const int &bctype)
+{
+    return (bctype == PHENGLEI::SOLID_SURFACE);
+}
+
+map<int, string> CreatFantasybctype();
+
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_SimpleGrid.h b/API/Geometry/include/Geo_SimpleGrid.h
new file mode 100644
index 0000000..163b198
--- /dev/null
+++ b/API/Geometry/include/Geo_SimpleGrid.h
@@ -0,0 +1,107 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_SimpleGrid.h
+//! @brief     It is the base class of geometry grid.
+//!            The inheriting order is: SimpleGrid -> Grid -> StructuredGrid/UnstructuredGrid.
+//! @author    He Xin, Bell.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "TypeDefine.h"
+
+namespace PHSPACE
+{
+//! @brief It defines the class 'SimpleGrid', which is the base class of geometry grid.
+//!        The inheriting order is: SimpleGrid -> Grid -> StructuredGrid/UnstructuredGrid.
+class SimpleGrid
+{
+protected:
+    //! Number of total nodes.
+    int nTotalNode;
+
+    //! Coordinates.
+    RDouble *x, *y, *z;
+
+    //! Min-max box of the nodes coordinates.
+    RDouble *pmin, *pmax;
+
+    //! The minimum edge length.
+    RDouble minEdgeLength;
+
+    //! The maximum edge length.
+    RDouble maxEdgeLength;
+
+    //! If the min-max box has been calculated.
+    bool has_cal_minmax;
+
+    //! The material type of grid, such as water and air.
+    int materialType;
+
+public:
+    SimpleGrid();
+    SimpleGrid(const SimpleGrid &rhs);
+    virtual ~SimpleGrid();
+
+public:
+    SimpleGrid & operator = (const SimpleGrid &rhs);
+
+public:
+    //! Assign the given pointer to the X coordinate pointer of this point.
+    void SetX(RDouble *x);
+
+    //! Assign the given pointer to the Y coordinate pointer of this point.
+    void SetY(RDouble *y);
+
+    //! Assign the given pointer to the Z coordinate pointer of this point.
+    void SetZ(RDouble *z);
+
+    //! Return its X coordinate pointer.
+    RDouble * GetX() const;
+
+    //! Return its Y coordinate pointer.
+    RDouble * GetY() const;
+
+    //! Return its Z coordinate pointer.
+    RDouble * GetZ() const;
+
+    //! Assign the given value to the number of the nodes.
+    void SetNTotalNode(int nTotalNode);
+
+    //! Return the number of the nodes.
+    int GetNTotalNode() const;
+
+    //! Return the minimum box of the grid zone.
+    RDouble * GetMinBox();
+    
+    //! Return the maximum box of the grid zone.
+    RDouble * GetMaxBox();
+
+    //! Compute the minimum and maximum box of the grid zone.
+    LIB_EXPORT void ComputeMinMaxBox();
+
+    //! Compute the minimum distance of the grid edges.
+    LIB_EXPORT virtual RDouble CalMinEdgeLength();
+
+    //! Compute the maximum distance of the grid edges.
+    LIB_EXPORT virtual RDouble CalMaxEdgeLength();
+
+private:
+    //! Free memory.
+    void FreeMemory();
+
+    //! Copy object.
+    void Copy(const SimpleGrid &rhs);
+};
+
+#include "Geo_SimpleGrid.hxx"
+
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_SimpleGrid.hxx b/API/Geometry/include/Geo_SimpleGrid.hxx
new file mode 100644
index 0000000..f874a67
--- /dev/null
+++ b/API/Geometry/include/Geo_SimpleGrid.hxx
@@ -0,0 +1,39 @@
+inline void	SimpleGrid::SetX(RDouble *x)
+{
+    this->x = x;
+}
+
+inline void	SimpleGrid::SetY(RDouble *y)
+{
+    this->y = y;
+}
+
+inline void	SimpleGrid::SetZ(RDouble *z)
+{
+    this->z = z;
+}
+
+inline RDouble * SimpleGrid::GetX() const
+{
+    return x;
+}
+
+inline RDouble * SimpleGrid::GetY() const
+{
+    return y;
+}
+
+inline RDouble * SimpleGrid::GetZ() const
+{
+    return z;
+}
+
+inline void SimpleGrid::SetNTotalNode(int nTotalNode)
+{
+    this->nTotalNode = nTotalNode;
+}
+
+inline int SimpleGrid::GetNTotalNode() const
+{
+    return nTotalNode;
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_SimpleVC.h b/API/Geometry/include/Geo_SimpleVC.h
new file mode 100644
index 0000000..0ee42f7
--- /dev/null
+++ b/API/Geometry/include/Geo_SimpleVC.h
@@ -0,0 +1,128 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_SimpleVC.h
+//! @brief     It is the base class of geometry operation for volume condition.
+//! @author    Baka.
+
+#pragma once
+#include "TypeDefine.h"
+#include "Data_Param.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+namespace PHENGLEI
+{
+    const int UNDEFINED = 0;
+    const int FLUID     = 1;
+    const int SOLID     = 2;
+}
+
+//! @brief A volume condition base class.
+class SimpleVC
+{
+public:
+    SimpleVC()
+    {
+        vcName = "";
+        vcType = 0;
+
+        vcParamDataBase = new Data_Param();
+    }
+
+    ~SimpleVC()
+    {
+        delete vcParamDataBase;
+        vcParamDataBase = NULL;
+    }
+
+private:
+    //! volume condition name;
+    string vcName;
+
+    //! volume condition type;
+    int vcType;
+
+    //! VC control parameters.
+    Data_Param *vcParamDataBase;
+
+public:
+    const string &GetVCName() const { return this->vcName; }
+
+    //! Get volume conditions type.
+    int GetVCType() const { return this->vcType; }
+
+    Data_Param *GetVCParamDataBase();
+
+    void SetVCName(const string &vcNameIn) { this->vcName = vcNameIn; }
+    void SetVCType(int vcTypeIn) { this->vcType = vcTypeIn; }
+    void SetVCParamDataBase(Data_Param *paraDB);
+
+    void UpdateParamData(const string &name, void *data, int type, int size) 
+    {
+        vcParamDataBase->UpdateData(name, data, type, size);
+    }
+
+    void GetParamData(const string &name, void *data, int type, int size) 
+    {
+        vcParamDataBase->GetData(name, data, type, size);
+    }
+
+    int CheckParamData(const string &name)
+    {
+        return vcParamDataBase->CheckDataExist(name);
+    }
+};
+
+//! @brief Global volume conditions, all of the global volume conditions are stored here.
+class GlobalVolumeCondition
+{
+private:
+    //! Warning: it has not been deleted!
+    static vector<SimpleVC *> *globalVCList;
+
+private:
+    GlobalVolumeCondition();
+    ~GlobalVolumeCondition();
+
+public:
+    //! Get number of total VC.
+    static uint_t GetNumberOfVC()
+    {
+        if (!globalVCList)
+            return 0;
+        else
+            return globalVCList->size();
+    }
+
+    static string GetVolumeName(int iVC)
+    {
+        return (*globalVCList)[iVC]->GetVCName();
+    }
+
+    static SimpleVC *GetVC(const int &iVC) { return (*globalVCList)[iVC]; }
+
+    //! Get global volume conditions list.
+    static vector<SimpleVC *> *GetGlobalVolumeConditionList() { return globalVCList; }
+
+    //! Read global volume conditions.
+    static void ReadGlobalVolumeCondition();
+
+    static void SetVCDataByGlobalVC();
+
+private:
+    static void ParseVCFromFile(fstream &file);
+
+};
+
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_StructBC.h b/API/Geometry/include/Geo_StructBC.h
new file mode 100644
index 0000000..7967b66
--- /dev/null
+++ b/API/Geometry/include/Geo_StructBC.h
@@ -0,0 +1,617 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_StructBC.h
+//! @brief     It is the class 'StructBC', which is type of Structured geometry grid operation for boundary condition.
+//!            The inheriting order is: SimpleBC -> StructBC/UnstructBC.
+//! @author    Zhang Yong, Bell, He Xin.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "TypeDefine.h"
+#include "Geo_SimpleBC.h"
+#include "PHMpi.h"
+#include "Constants.h"
+using namespace std;
+
+namespace PHSPACE
+{
+//! @brief It defines the class 'StructBC', which is the base class of structured geometry grid operation for boundary condition.
+//!        The inheriting order is: SimpleBC -> StructBC/UnstructBC.
+class StructBC : public SimpleBC
+{
+public:
+    //! Construct the StructBC.
+    //! @param[in] zoneID      Zone Index.
+    //! @param[in] regionID    Region Index.
+    StructBC(int zoneID, uint_t regionID);
+
+    ~StructBC();
+
+private:
+    //! Region index (the number of region).
+    uint_t nr;
+
+    //! s_nd: Dimensional number in the current  zone. s - source, nd - the number of dimension.
+    //! t_nd: Dimensional number in the neighbor zone. t - target, nd - the number of dimension.
+    //! -# 0: i direction.
+    //! -# 1: j direction.
+    //! -# 2: k direction.
+    int s_nd, t_nd;
+
+    //! s_lr : This BC region is on the left or right side in the current zone.  s - source, lr - Left/Right.
+    //! t_lr : This BC region is on the left or right side in the neighbor zone. t - target, lr - Left/Right.
+    //! -# -1: Left side.
+    //! -#  1: Right side.
+    int s_lr, t_lr;
+
+    //! s_lr3d && t_lr3d stores the composite information of both s_nd/t_nd && s_lr/t_lr.
+    //! It is used to uniform the loop format only. The values are equal to the following:
+    //!     if (i == s_nd) s_lr3d[i] = s_lr;  else  s_lr3d[i] = 0;
+    //!     if (i == t_nd) t_lr3d[i] = t_lr;  else  t_lr3d[i] = 0;
+    int s_lr3d[3], t_lr3d[3];
+
+    //! nbs: The current  zone index of this BC region. nb - the number of block, s - source.
+    //! nbt: The neighbor zone index of this BC region. nb - the number of block, t - target.
+    int nbs, nbt;
+
+    //! s_st: Start local point index in the current zone. s - source, st - start.
+    //! s_ed: End   local point index in the current zone. s - source, ed - end.
+    int s_st[3], s_ed[3];
+
+    //!
+    int lnkInfo[12];
+
+    //! s_dir3d: the i\j\k direction between the current face and matching target face if the face is a interface.
+    int s_dir3d[3];
+
+public:
+    StructBC & operator = (const StructBC &rhs);
+
+public:
+    void SetFaceMatchingTargetDirIndex(int *dir3dIn);
+
+    //! Set the current source zone index.
+    void SetRegionBlock(int currentSourceZoneID);
+
+    //! Set the target zone index.
+    void SetTargetRegionBlock(int targetZoneID);
+    
+    //! Set the start/end range index in the current zone in i/j/k dimensions.
+    void SetIJKRegion(int ist, int ied, int jst, int jed, int kst, int ked);
+
+    //! Set the start/end range index in the neighbor zone in i/j/k dimensions.
+    void SetTargetIJKRegion(int ist, int ied, int jst, int jed, int kst, int ked);
+
+    //! Set this BC region on the left(-1) or right(1) in the current zone.
+    void SetFaceLeftOrRightIndex(int s_lr);
+
+    //! Set this BC region on the left(-1) or right(1) in the neighbor target zone.
+    void SetFaceLeftOrRightIndexOfTargetBlock(int t_lr);
+
+    //! Set the dimension number of this BC region on the current zone.
+    //! 0-1-2, represents i, j, k direction, respectively.
+    void SetFaceDirection(int s_nd);
+
+    //! Set the dimension number of this BC region on the neighbor target zone.
+    //! 0-1-2, represents i, j, k direction, respectively.
+    void SetFaceDirectionOfTargetBlock(int t_nd);
+
+    //! Return the current source zone index.
+    int GetRegionBlock() const;
+
+    //! Return the neighbor target zone index.
+    int GetTargetRegionBlock() const;
+
+    //! Return face direction.
+    int * GetFaceDirectionIndex();
+
+    //! Return direction between current face and matching target face.
+    int * GetFaceMatchingTargetDirIndex();
+
+    //! Return face direction in the neighbor zone.
+    int * GetFaceDirectionIndexOfTargetBlock();
+
+    //! Process to construct start/end local point index in the current/neighbor zones.
+    void ProcessBCInfo();
+    void SetLnkInfo();
+
+    //! Init Face direction, all to zero.
+    void InitFaceDirectionIndex();
+
+    //! Return the start/end i/j/k range in the current zone.
+    void GetIJKRegion(int &ist, int &ied, int &jst, int &jed, int &kst, int &ked);
+
+    //! Return the three dimensional start index in the current zone.
+    int * GetStartPoint();
+
+    //! Return the m-th dimensional start index in the current zone.
+    int GetStartPoint(int m);
+
+    //! Return the three dimensional end index in the current zone.
+    int * GetEndPoint(void);
+
+    //! Return the m-th dimensional end index in the current zone.
+    int GetEndPoint(int m);
+
+    int * GetInkInfo();
+
+    //! Return the m-th dimensional start index in the neighbor target zone.
+    int GetTargetStart(int m);
+
+    //! Return the m-th dimensional end index in the neighbor target zone.
+    int GetTargetEnd(int m);
+    
+    //! Return the three dimensional start index in the neighbor target zone.
+    int * GetTargetStart();
+
+    //! Return the three dimensional end index in the neighbor target zone.
+    int * GetTargetEnd();
+    
+    //! Return this BC region on the left(-1) or right(1) in the current zone.
+    int GetFaceLeftOrRightIndex() const;
+
+    //! Return this BC region on the left(-1) or right(1) in the neighbor target zone.
+    int GetFaceLeftOrRightIndexOfTargetBlock() const;
+
+    //! Return the dimension number of this BC region on the current zone.
+    //! 0-1-2, represents i, j, k direction, respectively.
+    int GetFaceDirection() const;
+
+    //! Return the dimension number of this BC region on the neighbor target zone.
+    //! 0-1-2, represents i, j, k direction, respectively.
+    int GetFaceDirectionOfTargetBlock() const;
+
+    //! Compute the coarse grid i/j/k range for multi-grid.
+    void ComputeMultiGridIJKRegion(int imin, int imax, int jmin, int jmax, int kmin, int kmax, int istp, int jstp, int kstp, int nsurf);
+
+    //! The followings used to accelerate the massive grid converting, or for overset grid,
+    //! Do not care about it.
+    void ComputeRelativeParameters();
+    int * GetStam();
+    int * GetRate();
+    void ProbeExternalOverlapCells(int *iBlank, int nci, int ncj, int &counter);
+
+    //! Return the i/j/k range in the current source zone, it is rarely used.
+    void GetNormalizeIJKRegion(int &ist, int &ied, int &jst, int &jed, int &kst, int &ked);
+
+    //! Return the cell index inside flowfield.
+    void GetInsideCellIndex(int i, int j, int k, int &is, int &js, int &ks, int nss);
+
+    //! Return the cell index of ghostcell.
+    void GetGhostCellIndex(int i, int j, int k, int &it, int &jt, int &kt, int ntt);
+
+    //! Return the index of boundary face.
+    void GetBoundaryFaceIndex(int i, int j, int k, int &ib, int &jb, int &kb);
+
+private:
+    //! t_st: Start local point index in the neighbor zone. t - target, st - start.
+    //! t_ed: End   local point index in the neighbor zone. t - target, ed - end.
+    int t_st[3], t_ed[3];
+
+    //! stam[3] && rate[3] are used to accelerate the massive grid converting.
+    //! Do not care about the two.
+    int stam[3], rate[3];
+};
+
+//! @brief StructBCSet class defines the composites of StructBC informations.
+//! In one zone (block), several StructBCs may be exist, so all StructBCs in one zone
+//! are defined as a 'StructBCSet'.
+class StructBCSet
+{
+private:
+    //! Number of zone (block) index this BC in.
+    int zoneID;
+
+    //! The BCRegions list in the current StructBCSet.
+    vector<StructBC *> *bcRegions;
+
+
+    //! The I/J/K id of interface faces.
+    int *iID, *jID, *kID;
+
+    //! The bcRegions id of interface faces.
+    int *bcRegionIDofIFace; 
+
+    //! Boundary name of given type;
+    string boundaryName[100];
+
+public:
+    StructBCSet(int zoneID = 0);
+    ~StructBCSet();
+
+public:
+    string GetBCName(int bcType) { return boundaryName[bcType]; }
+
+    void CopyStructBCSet(StructBCSet *rightHandSide);
+
+    StructBC * GetBCRegion(uint_t iBCRegion) const;
+
+    void CreateBCRegion(uint_t nBCRegion);
+
+    void SetBCRegion(uint_t iBCRegion, StructBC *bcregion);
+
+    int GetnBCRegion() const;
+
+    void GetSourceIndexIJK(int iFace, int ipos, int &i, int &j, int &k);
+    void GetSourceIndexIJK_Nsurf_LR(int iFace, int ipos, int &i, int &j, int &k, int &nsruf, int &s_lr);
+    void GetTargetIndexIJK(int iFace, int ipos, int &i, int &j, int &k);
+
+    void GetSourceIndexIJK_fornodetransfer(int iFace, int &id, int &jd, int &kd, int &i_lr, int &j_lr, int &k_lr);
+    void GetTargetIndexIJK_fornodetransfer(int iFace, int &id, int &jd, int &kd, int &i_lr, int &j_lr, int &k_lr);
+
+    void ProcessBCInfo();
+    void SetLnkInfo();
+
+    void SetIFaceInfo();
+
+    //! Get the bcregion id by interfaceIndexContainerForReceive value.
+    int * GetIFaceInfo();
+
+private:
+    void DecodeIJK(int index, int &i, int &j, int &k);
+    void DeleteIndex();
+    void InitBoundaryName();
+};
+
+#include "Geo_StructBC.hxx"
+
+void GetBCFaceIDX(int *s_lr3d, int &id, int &jd, int &kd);
+
+template < typename T >
+void GhostCell2D(PHArray<T, 2> &w, int ni, int nj)
+{
+    //! w(-1:ni+1, -1:nj+1).
+
+    for (int j = 1; j <= nj - 1; ++ j)
+    {
+        w(0 , j) = w(1   , j);
+        w(ni, j) = w(ni-1, j);
+    }
+
+    for (int i = 0; i <= ni; ++ i)
+    {
+        w(i, 0) = w(i, 1  );
+        w(i, nj) = w(i, nj-1);
+    }
+
+    //! Initialize volume in second row of ghost cells.
+    for (int j = 0; j <= nj; ++ j)
+    {
+        w(-1  , j) = w(0 , j);
+        w(ni+1, j) = w(ni, j);
+    }
+
+    for (int i = -1; i <= ni + 1; ++ i)
+    {
+        w(i, -1 ) = w(i, 0);
+        w(i, nj+1) = w(i, nj);
+    }
+}
+
+template < typename T >
+void GhostCell2D(PHArray<T, 3> &w, int ni, int nj, int nm)
+{
+    //! w(-1:ni+1, -1:nj+1, 0:nm-1).
+
+    for (int m = 0; m < nm; ++ m)
+    {
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            w(0 , j, m) = w(1   , j, m);
+            w(ni, j, m) = w(ni-1, j, m);
+        }
+
+        for (int i = 0; i <= ni; ++ i)
+        {
+            w(i, 0 , m) = w(i, 1   , m);
+            w(i, nj, m) = w(i, nj-1, m);
+        }
+
+        //! Initialize volume in second row of ghost cells.
+        for (int j = 0; j <= nj; ++ j)
+        {
+            w(-1  , j, m) = w(0 , j, m);
+            w(ni+1, j, m) = w(ni, j, m);
+        }
+
+        for (int i = - 1; i <= ni + 1; ++ i)
+        {
+            w(i, -1  , m) = w(i, 0 , m);
+            w(i, nj+1, m) = w(i, nj, m);
+        }
+    }
+}
+
+template < typename T >
+void GhostCell3D(PHArray<T, 3> &w, int ni, int nj, int nk)
+{
+    //! w(-1:ni+1, -1:nj+1, -1:nk+1).
+    int kst, ked;
+    kst = 1;
+    ked = nk;
+    if (nk == 1) ked = 1;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            w(0 , j, k) = w(1   , j, k);
+            w(ni, j, k) = w(ni-1, j, k);
+        }
+
+        for (int i = 0; i <= ni; ++ i)
+        {
+            w(i, 0 , k) = w(i, 1   , k);
+            w(i, nj, k) = w(i, nj-1, k);
+        }
+        //! Initialize volume in second row of ghost cells.
+        for (int j = 0; j <= nj; ++ j)
+        {
+            w(-1  , j, k) = w(0 , j, k);
+            w(ni+1, j, k) = w(ni, j, k);
+        }
+
+        for (int i = -1; i <= ni + 1; ++ i)
+        {
+            w(i, -1  , k) = w(i, 0 , k);
+            w(i, nj+1, k) = w(i, nj, k);
+        }
+    }
+
+    if (nk == 1) return;
+
+    for (int j = -1; j <= nj + 1; ++ j)
+    {
+        for (int i = -1; i <= ni + 1; ++ i)
+        {
+            w(i, j, 0) = w(i, j, 1);
+            w(i, j, -1) = w(i, j, 1);
+
+            w(i, j, nk ) = w(i, j, nk-1);
+            w(i, j, nk+1) = w(i, j, nk-1);
+        }
+    }
+}
+
+template < typename T >
+void GhostCell3D(PHArray<T, 4> &w, int ni, int nj, int nk, int nm)
+{
+    //! w(-1:ni+1, -1:nj+1, -1:nk+1, 0:nm-1).
+    if (nk != 1)
+    {
+        for (int m = 0; m < nm; ++ m)
+        {
+            for (int k = 1; k <= nk - 1; ++ k)
+            {
+                for (int j = 1; j <= nj - 1; ++ j)
+                {
+                    w(0 , j, k, m) = w(1   , j, k, m);
+                    w(ni, j, k, m) = w(ni-1, j, k, m);
+                }
+
+                for (int i = 0; i <= ni; ++ i)
+                {
+                    w(i, 0 , k, m) = w(i, 1   , k, m);
+                    w(i, nj, k, m) = w(i, nj-1, k, m);
+                }
+
+                //! Initialize volume in second row of ghost cells.
+                for (int j = 0; j <= nj; ++ j)
+                {
+                    w(-1  , j, k, m) = w(0 , j, k, m);
+                    w(ni+1, j, k, m) = w(ni, j, k, m);
+                }
+
+                for (int i = -1; i <= ni + 1; ++ i)
+                {
+                    w(i, -1  , k, m) = w(i, 0 , k, m);
+                    w(i, nj+1, k, m) = w(i, nj, k, m);
+                }
+            }
+
+            for (int j = -1; j <= nj + 1; ++ j)
+            {
+                for (int i = -1; i <= ni + 1; ++ i)
+                {
+                    w(i, j, 0 , m) = w(i, j, 1, m);
+                    w(i, j, -1, m) = w(i, j, 1, m);
+
+                    w(i, j, nk  , m) = w(i, j, nk-1, m);
+                    w(i, j, nk+1, m) = w(i, j, nk-1, m);
+                }
+            }
+        }
+    }
+    else
+    {
+        int k = 1;
+        for (int m = 0; m < nm; ++ m)
+        {
+            for (int j = 1; j <= nj - 1; ++ j)
+            {
+                w(0 , j, k, m) = w(1   , j, k, m);
+                w(ni, j, k, m) = w(ni-1, j, k, m);
+            }
+
+            for (int i = 0; i <= ni; ++ i)
+            {
+                w(i, 0 , k, m) = w(i, 1   , k, m);
+                w(i, nj, k, m) = w(i, nj-1, k, m);
+            }
+
+            //! Initialize volume in second row of ghost cells.
+            for (int j = 0; j <= nj; ++ j)
+            {
+                w(-1  , j, k, m) = w(0 , j, k, m);
+                w(ni+1, j, k, m) = w(ni, j, k, m);
+            }
+
+            for (int i = -1; i <= ni + 1; ++ i)
+            {
+                w(i, -1  , k, m) = w(i, 0 , k, m);
+                w(i, nj+1, k, m) = w(i, nj, k, m);
+            }
+        }
+    }
+}
+
+template < typename T >
+void FillCornerPoint3D(PHArray<T, 3> &w, int ni, int nj, int nk)
+{
+    //! This subroutine is developed to fill the ghost points which are 
+    //! shared by two planes. this is necessary for the calculation of the 
+    //! viscous fluxes.
+
+    //! The figure below shows a 2d plane.
+
+    //!      nsurf -->
+
+    //!         $(a)  |   x   |                x  = internal cell
+    //!               |       |
+    //!      .........-----------------        $  = ghost cell filled by
+    //!               .       .                     bcin or bcvis
+    //!         ?     .   $(b).                ?  = ghost cell filled by 
+    //!      ..........................             this routine
+
+    //! The algorithm used to fill the points ? is the following. in the
+    //! algorithm for the calculation of the viscous fluxes, the average
+    //! is taken from the 4 points shown in the figure. this average is
+    //! replaced by taking the average of the points $(a) and x, hence
+    //! the value of ? is set to accomplish this.
+    //! 3d: fill the 8 vertex lines for each direction nsurf.
+
+    if (nk != 1)
+    {
+        for (int k = 1; k <= nk - 1; ++ k)
+        {
+            w(0,  0, k) = w(0 ,    1, k) + w(  1,  0, k) - w(  1,    1, k);
+            w(0, nj, k) = w(0 , nj-1, k) + w(  1, nj, k) - w(  1, nj-1, k);
+            w(ni,  0, k) = w(ni,    1, k) + w(ni-1,  0, k) - w(ni-1,    1, k);
+            w(ni, nj, k) = w(ni, nj-1, k) + w(ni-1, nj, k) - w(ni-1, nj-1, k);
+        }
+
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            w(0, j,  0) = w(0, j,    1) + w(  1, j,  0) - w(  1, j,    1);
+            w(0, j, nk) = w(0, j, nk-1) + w(  1, j, nk) - w(  1, j, nk-1);
+            w(ni, j,  0) = w(ni, j,    1) + w(ni-1, j,  0) - w(ni-1, j,    1);
+            w(ni, j, nk) = w(ni, j, nk-1) + w(ni-1, j, nk) - w(ni-1, j, nk-1);
+        }
+
+        for (int i = 1; i <= ni - 1; ++ i)
+        {
+            w(i,  0,  0) = w(i,  0,    1) + w(i,    1,  0) - w(i,    1,    1);
+            w(i,  0, nk) = w(i,  0, nk-1) + w(i,    1, nk) - w(i,    1, nk-1);
+            w(i, nj,  0) = w(i, nj,    1) + w(i, nj-1,  0) - w(i, nj-1,    1);
+            w(i, nj, nk) = w(i, nj, nk-1) + w(i, nj-1, nk) - w(i, nj-1, nk-1);
+        }
+
+        //! Fill the 8 corner points.
+        w(0,  0,  0) = third * (w(  1,  0,  0) + w(0,    1,  0) + w(0,  0,    1));
+        w(0, nj,  0) = third * (w(  1, nj,  0) + w(0, nj-1,  0) + w(0, nj,    1));
+        w(0,  0, nk) = third * (w(  1,  0, nk) + w(0,    1, nk) + w(0,  0, nk-1));
+        w(0, nj, nk) = third * (w(  1, nj, nk) + w(0, nj-1, nk) + w(0, nj, nk-1));
+        w(ni,  0,  0) = third * (w(ni-1,  0,  0) + w(ni,    1,  0) + w(ni,  0,    1));
+        w(ni, nj,  0) = third * (w(ni-1, nj,  0) + w(ni, nj-1,  0) + w(ni, nj,    1));
+        w(ni,  0, nk) = third * (w(ni-1,  0, nk) + w(ni,    1, nk) + w(ni,  0, nk-1));
+        w(ni, nj, nk) = third * (w(ni-1, nj, nk) + w(ni, nj-1, nk) + w(ni, nj, nk-1));
+    }
+    else
+    {
+        int k = 1;
+        w(0,  0, k) = w(0 ,    1, k) + w(  1,  0, k) - w(  1,    1, k);
+        w(0, nj, k) = w(0 , nj-1, k) + w(  1, nj, k) - w(  1, nj-1, k);
+        w(ni,  0, k) = w(ni,    1, k) + w(ni-1,  0, k) - w(ni-1,    1, k);
+        w(ni, nj, k) = w(ni, nj-1, k) + w(ni-1, nj, k) - w(ni-1, nj-1, k);
+    }
+}
+
+template < typename T >
+void FillCornerPoint3D(PHArray<T, 4 > &w, int ni, int nj, int nk, int nl)
+{
+    //! This subroutine is developed to fill the ghost points which are 
+    //! shared by two planes. this is necessary for the calculation of the 
+    //! viscous fluxes.
+
+    //! The figure below shows a 2d plane.
+
+    //!      nsurf -->
+
+    //!         $(a)  |   x   |                x  = internal cell
+    //!               |       |
+    //!      .........-----------------        $  = ghost cell filled by
+    //!               .       .                     bcin or bcvis
+    //!         ?     .   $(b).                ?  = ghost cell filled by 
+    //!      ..........................             this routine
+
+    //! The algorithm used to fill the points ? is the following. in the
+    //! algorithm for the calculation of the viscous fluxes, the average
+    //! is taken from the 4 points shown in the figure. this average is
+    //! replaced by taking the average of the points $(a) and x, hence
+    //! the value of ? is set to accomplish this.
+    //! 3d: fill the 8 vertex lines for each direction nsurf.
+
+    if (nk != 1)
+    {
+        for (int m = 0; m < nl; ++ m)
+        {
+            for (int k = 1; k <= nk - 1; ++ k)
+            {
+                w(0,  0, k, m) = w(0 ,    1, k, m) + w(  1,  0, k, m) - w(  1,    1, k, m);
+                w(0, nj, k, m) = w(0 , nj-1, k, m) + w(  1, nj, k, m) - w(  1, nj-1, k, m);
+                w(ni,  0, k, m) = w(ni,    1, k, m) + w(ni-1,  0, k, m) - w(ni-1,    1, k, m);
+                w(ni, nj, k, m) = w(ni, nj-1, k, m) + w(ni-1, nj, k, m) - w(ni-1, nj-1, k, m);
+            }
+
+            for (int j = 1; j <= nj - 1; ++ j)
+            {
+                w(0, j,  0, m) = w(0, j,    1, m) + w(  1, j,  0, m) - w(  1, j,    1, m);
+                w(0, j, nk, m) = w(0, j, nk-1, m) + w(  1, j, nk, m) - w(  1, j, nk-1, m);
+                w(ni, j,  0, m) = w(ni, j,    1, m) + w(ni-1, j,  0, m) - w(ni-1, j,    1, m);
+                w(ni, j, nk, m) = w(ni, j, nk-1, m) + w(ni-1, j, nk, m) - w(ni-1, j, nk-1, m);
+            }
+
+            for (int i = 1; i <= ni - 1; ++ i)
+            {
+                w(i,  0,  0, m) = w(i,  0,    1, m) + w(i,    1,  0, m) - w(i,    1,    1, m);
+                w(i,  0, nk, m) = w(i,  0, nk-1, m) + w(i,    1, nk, m) - w(i,    1, nk-1, m);
+                w(i, nj,  0, m) = w(i, nj,    1, m) + w(i, nj-1,  0, m) - w(i, nj-1,    1, m);
+                w(i, nj, nk, m) = w(i, nj, nk-1, m) + w(i, nj-1, nk, m) - w(i, nj-1, nk-1, m);
+            }
+        }
+
+        //! Fill the 8 corner points.
+        for (int m = 0; m < nl; ++ m)
+        {
+            w(0,  0,  0, m) = third * (w(  1,  0,  0, m) + w(0,    1,  0, m) + w(0,  0,    1, m));
+            w(0, nj,  0, m) = third * (w(  1, nj,  0, m) + w(0, nj-1,  0, m) + w(0, nj,    1, m));
+            w(0,  0, nk, m) = third * (w(  1,  0, nk, m) + w(0,    1, nk, m) + w(0,  0, nk-1, m));
+            w(0, nj, nk, m) = third * (w(  1, nj, nk, m) + w(0, nj-1, nk, m) + w(0, nj, nk-1, m));
+            w(ni,  0,  0, m) = third * (w(ni-1,  0,  0, m) + w(ni,    1,  0, m) + w(ni,  0,    1, m));
+            w(ni, nj,  0, m) = third * (w(ni-1, nj,  0, m) + w(ni, nj-1,  0, m) + w(ni, nj,    1, m));
+            w(ni,  0, nk, m) = third * (w(ni-1,  0, nk, m) + w(ni,    1, nk, m) + w(ni,  0, nk-1, m));
+            w(ni, nj, nk, m) = third * (w(ni-1, nj, nk, m) + w(ni, nj-1, nk, m) + w(ni, nj, nk-1, m));
+        }
+    }
+    else
+    {
+        int k = 1;
+        for (int m = 0; m < nl; ++ m)
+        {
+            w(0,  0, k, m) = w(0 ,    1, k, m) + w(  1,  0, k, m) - w(  1,    1, k, m);
+            w(0, nj, k, m) = w(0 , nj-1, k, m) + w(  1, nj, k, m) - w(  1, nj-1, k, m);
+            w(ni,  0, k, m) = w(ni,    1, k, m) + w(ni-1,  0, k, m) - w(ni-1,    1, k, m);
+            w(ni, nj, k, m) = w(ni, nj-1, k, m) + w(ni-1, nj, k, m) - w(ni-1, nj-1, k, m);
+        }
+    }
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_StructBC.hxx b/API/Geometry/include/Geo_StructBC.hxx
new file mode 100644
index 0000000..5ef7730
--- /dev/null
+++ b/API/Geometry/include/Geo_StructBC.hxx
@@ -0,0 +1,216 @@
+inline int StructBC::GetRegionBlock() const
+{
+    return nbs;
+}
+
+inline void StructBC::SetRegionBlock(int currentSourceZoneID)
+{
+    this->nbs = currentSourceZoneID;
+}
+
+inline void StructBC::SetFaceMatchingTargetDirIndex(int *dir3dIn)
+{
+    for (int i = 0; i < 3; i ++)
+    {
+        s_dir3d[i] = dir3dIn[i];
+    }
+}
+
+inline int * StructBC::GetStam()
+{
+    return stam;
+}
+
+inline int * StructBC::GetRate()
+{
+    return rate;
+}
+
+inline int * StructBC::GetFaceDirectionIndex()
+{
+    return s_lr3d;
+}
+
+inline int * StructBC::GetFaceMatchingTargetDirIndex()
+{
+    return s_dir3d;
+}
+
+inline int * StructBC::GetFaceDirectionIndexOfTargetBlock()
+{
+    return t_lr3d;
+}
+
+inline void StructBC::SetIJKRegion(int ist, int ied, int jst, int jed, int kst, int ked)
+{
+    s_st[0] = ist;
+    s_ed[0] = ied;
+    s_st[1] = jst;
+    s_ed[1] = jed;
+    s_st[2] = kst;
+    s_ed[2] = ked;
+}
+
+inline void StructBC::GetIJKRegion(int &ist, int &ied, int &jst, int &jed, int &kst, int &ked)
+{
+    ist = s_st[0];
+    ied = s_ed[0];
+    jst = s_st[1];
+    jed = s_ed[1];
+    kst = s_st[2];
+    ked = s_ed[2];
+}
+
+inline void StructBC::SetTargetIJKRegion(int ist, int ied, int jst, int jed, int kst, int ked)
+{
+    t_st[0] = ist;
+    t_ed[0] = ied;
+    t_st[1] = jst;
+    t_ed[1] = jed;
+    t_st[2] = kst;
+    t_ed[2] = ked;
+}
+
+inline int * StructBC::GetStartPoint()
+{
+    return s_st;
+}
+
+inline int StructBC::GetStartPoint(int m)
+{
+    return s_st[m];
+}
+
+inline int StructBC::GetTargetStart(int m)
+{
+    return t_st[m];
+}
+
+inline int * StructBC::GetTargetStart()
+{
+    return t_st;
+}
+
+inline int StructBC::GetTargetEnd(int m)
+{
+    return t_ed[m];
+}
+
+inline int * StructBC::GetTargetEnd()
+{
+    return t_ed;
+}
+
+inline int * StructBC::GetEndPoint(void)
+{
+    return s_ed;
+}
+
+inline int * StructBC::GetInkInfo()
+{
+    return lnkInfo;
+}
+
+inline int StructBC::GetEndPoint(int m)
+{
+    return s_ed[m];
+}
+
+inline int StructBC::GetTargetRegionBlock() const
+{
+    return nbt;
+}
+
+inline void StructBC::SetTargetRegionBlock(int targetZoneID)
+{
+    this->nbt = targetZoneID;
+}
+
+inline int StructBC::GetFaceLeftOrRightIndex() const
+{
+    return s_lr;
+}
+
+inline void StructBC::SetFaceLeftOrRightIndex(int s_lr)
+{
+    this->s_lr = s_lr;
+}
+
+inline int StructBC::GetFaceLeftOrRightIndexOfTargetBlock() const
+{
+    return t_lr;
+}
+
+inline void StructBC::SetFaceLeftOrRightIndexOfTargetBlock(int t_lr)
+{
+    this->t_lr = t_lr;
+}
+
+inline int StructBC::GetFaceDirection() const
+{
+    return s_nd;
+}
+
+inline void StructBC::SetFaceDirection(int s_nd)
+{
+    this->s_nd = s_nd;
+}
+
+inline int StructBC::GetFaceDirectionOfTargetBlock() const
+{
+    return t_nd;
+}
+
+inline void StructBC::SetFaceDirectionOfTargetBlock(int t_nd)
+{
+    this->t_nd = t_nd;
+}
+
+inline void StructBC::GetInsideCellIndex(int i, int j, int k, int &is, int &js, int &ks, int nss)
+{
+    is = i - s_lr3d[0] * (nss - 1);
+    js = j - s_lr3d[1] * (nss - 1);
+    ks = k - s_lr3d[2] * (nss - 1);
+}
+
+inline void StructBC::GetGhostCellIndex(int i, int j, int k, int &it, int &jt, int &kt, int ntt)
+{
+    it = i + s_lr3d[0] * ntt;
+    jt = j + s_lr3d[1] * ntt;
+    kt = k + s_lr3d[2] * ntt;
+}
+
+inline void StructBC::GetBoundaryFaceIndex(int i, int j, int k, int &ib, int &jb, int &kb)
+{
+    ib = i;
+    jb = j;
+    kb = k;
+    
+    if (s_lr3d[0] == 1)
+    {
+        ib = i + 1;
+    }
+    else if (s_lr3d[1] == 1)
+    {
+        jb = j + 1;
+    }
+    else if (s_lr3d[2] == 1)
+    {
+        kb = k + 1;
+    }
+}
+
+inline void StructBCSet::CreateBCRegion(uint_t nBCRegion)
+{
+    bcRegions = new vector<StructBC *>(nBCRegion);
+}
+
+inline void StructBCSet::SetBCRegion(uint_t iBCRegion, StructBC *bcregion)
+{
+    (*bcRegions)[iBCRegion] = bcregion;
+}
+
+inline int StructBCSet::GetnBCRegion() const
+{
+    return static_cast<int>(bcRegions->size());
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_StructGrid.h b/API/Geometry/include/Geo_StructGrid.h
new file mode 100644
index 0000000..0fa3afb
--- /dev/null
+++ b/API/Geometry/include/Geo_StructGrid.h
@@ -0,0 +1,667 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_StructGrid.h
+//! @brief     It is type of Structured geometry grid.
+//!            The inheriting order is: SimpleGrid->Grid->StructuredGrid/UnstructuredGrid
+//! @author    He Xin, Bell, Min Yaobing.
+
+#pragma once
+#include "Geo_Grid.h"
+#include "Geo_UnstructGrid.h"
+#include "Geo_OversetGridTopo_Struct.h"
+#include "Geo_NodeTopo_Struct.h"
+#include "Geo_FaceMetrics_Struct.h"
+#include "Geo_CellMetrics_Struct.h"
+#include "Geo_MultiGridInfo_Struct.h"
+#include "Geo_DynamicGridMetrics_Struct.h"
+#include "IO_VirtualFile.h"
+#include "Geo_StructBC.h"
+
+namespace PHSPACE
+{
+class HoleGrid;
+class BackgroundTree;
+class OversetCellCollector;
+class UnstructGrid;
+
+class VirtualFile;
+class StructBCSet;
+class StructBC;
+
+class StructGrid : public Grid
+{
+private:
+    //! Geo_NodeTopo_Struct class defines the node dimension and coordinates.
+    //! 1: The dimension of three direction (ni, nj ,nk).
+    //! 2: The node coordinates array of three direction (structx, structy, structz).
+    Geo_NodeTopo_Struct *nodeTopology;
+
+    //! Geo_FaceMetrics_Struct class defines the face metrics of structured grid.
+    //! 1: unit face normal (xfn, yfn, zfn).
+    //! 2: face area (area).
+    //! 3: face vector (xSurfaceVector, ySurfaceVector, zSurfaceVector).
+    Geo_FaceMetrics_Struct *faceMetrics;
+
+    //! Geo_CellMetrics_Struct class defines the cell metrics of structured grid.
+    //! 1: cell center (xcc).
+    //! 2: cell volume (vol).
+    //! 3: cell length (xlen).
+    Geo_CellMetrics_Struct *cellMetrics;
+
+    //! Multi-grid step information.
+    //! 1:istp, jstp, kstp.
+    Geo_MultiGridInfo_Struct *multigridInfo;
+
+    //! Geo_DynamicGridMetrics_Struct class defines the dynamic grid metrics of the structured grid.
+    //! 1: Cell volume of the last time step (voln).
+    //! 2: Face normal velocity (vgn).
+    //! 3: Face velocity (xfv, yfv, zfv).
+    Geo_DynamicGridMetrics_Struct *dynamicGridMetrics;
+
+    //! Distance to wall
+    RDouble3D *walldist;
+
+    //! Normal direction of the wall face nearest to a cell.
+    RDouble3D *nearestwallfacenormalx;
+    RDouble3D *nearestwallfacenormaly;
+    RDouble3D *nearestwallfacenormalz;
+
+    //! overset iblank
+    Int3D *iBlank3D;
+
+    //! If the cell is the firse cell near wall.
+    Int3D *wallCellLabel;
+
+    Int3D *cellBoundaryType;
+
+    //! Boundary information.
+    //! 1: Number of boundary face (nBoundFace).
+    //! 2: Number of interface face (nIFace).
+    StructBCSet *structBCSet;
+
+    //! Topology information of the overset grid.
+    Geo_OversetGridTopo_Struct *oversetGridTopology;
+
+    //! 
+    PHDouble2D localFrame;
+
+    //! Probes nearest node dimension of i,j,k directions.
+    vector <int> zoneProbesCellNI;
+    vector <int> zoneProbesCellNJ;
+    vector <int> zoneProbesCellNK;
+
+    UnstructGrid *gridUnstr;
+
+    //! Ordinary grid information.
+    int ordinaryGridIndex;
+    int ordinaryDimStartIndex[3], ordinaryDimEndIndex[3];
+
+    RDouble partialCFL;
+
+public:
+    LIB_EXPORT StructGrid();
+    LIB_EXPORT ~StructGrid();
+
+public:
+    //! Initialize the Grid, create nodeTopology, faceMetrics, et al.
+    LIB_EXPORT void InitGrid(GridID *index, int level, int dim, int type);
+
+    //! Return the wall distance (walldist) pointer.
+    RDouble3D * GetWallDist() const;
+
+    //! Return the nearest wall face normal x pointer.
+    RDouble3D * GetNearestWallFaceNormalX() const;
+
+    //! Return the nearest wall face normal y pointer.
+    RDouble3D * GetNearestWallFaceNormalY() const;
+
+    //! Return the nearest wall face normal z pointer.
+    RDouble3D * GetNearestWallFaceNormalZ() const;
+
+    //! Return the wall cell label for the first layer of wall boundary.
+    Int3D * GetWallCellLabel();
+
+    void InitWallDist();
+
+    void InitIBlank3D();
+
+    Int3D * GetIBlank3D();
+
+    void CopyIBlank3D(int *iBlank);
+    void SetIBlank(int *iBlank);
+
+    UnstructGrid * GetUnstrGrid() { return this->gridUnstr; }
+    void SetUnstrGrid(UnstructGrid *gridIn) { this->gridUnstr = gridIn; }
+    //! 
+    void DecodeWallDist(DataContainer *cdata);
+
+    // ! Get the i,j,k when map current grid to the level layer coarse grid.
+    // ! @param[in]  level    level layer coarse grid.
+    // ! @param[out] i,j,k    number of the grid point in  three direction.
+    LIB_EXPORT void RemapMultigridIJK(int level, int &i, int &j, int &k);
+
+    //! Return the cell center (xcc) pointer.
+    RDouble3D * GetCellCenterX() const;
+
+    //! Return the cell center (ycc) pointer.
+    RDouble3D * GetCellCenterY() const;
+
+    //! Return the cell center (zcc) pointer.
+    RDouble3D * GetCellCenterZ() const;
+
+    //! Return the UNIT face normal (xfn) pointer.
+    RDouble4D * GetFaceNormalX() const;
+
+    //! Return the UNIT face normal (yfn) pointer.
+    RDouble4D * GetFaceNormalY() const;
+
+    //! Return the UNIT face normal (zfn) pointer.
+    RDouble4D * GetFaceNormalZ() const;
+
+    //! Return the face area (area) pointer.
+    RDouble4D * GetFaceArea() const;
+
+    //! Return the face vector (xFaceVector) pointer.
+    RDouble4D * GetFaceVectorX() const;
+
+    //! Return the face vector (yFaceVector) pointer.
+    RDouble4D * GetFaceVectorY() const;
+
+    //! Return the face vector (zFaceVector) pointer.
+    RDouble4D * GetFaceVectorZ() const;
+
+    //! Return the cell volume (vol) pointer.
+    RDouble3D * GetCellVolume() const;
+
+    //! 
+    RDouble3D * GetCellLengthX() const;
+
+    //! 
+    RDouble3D * GetCellLengthY() const;
+
+    //!
+    RDouble3D * GetCellLengthZ() const;
+
+    //! Return the cell volume pointer of the last time step (voln).
+    RDouble3D * GetCellVolumeOld() const;
+
+    //! Return the face normal velocity (vgn) pointer.
+    RDouble4D * GetFaceNormalVelocity() const;
+
+    RDouble5D * GetFaceVector_FD() const;
+    RDouble5D * GetFaceNormal_FD() const;
+    RDouble3D * GetCellJacobian() const;
+
+    //! Return the node's x coordinates array (structx) pointer.
+    RDouble3D * GetStructX() const;
+
+    //! Return the node's y coordinates array (structx) pointer.
+    RDouble3D * GetStructY() const;
+
+    //! Return the node's z coordinates array (structx) pointer.
+    RDouble3D * GetStructZ() const;
+
+    //! Set the node dimension of I direction (ni).
+    void SetNI(int ni);
+
+    //! Set the node dimension of J direction (nj).
+    void SetNJ(int nj);
+
+    //! Set the node dimension of K direction (nk).
+    void SetNK(int nk);
+
+    //! Return the node dimension of I direction (ni).
+    int GetNI() const;
+
+    //! Return the node dimension of J direction (nj).
+    int GetNJ() const;
+
+    //! Return the node dimension of K direction (nk).
+    int GetNK() const;
+
+    //! Set the probes cell dimension of I direction (ni).
+    void SetZoneProbesCellNI(vector <int> zoneProbesCellNI);
+
+    //! Set the probes cell dimension of J direction (nj).
+    void SetZoneProbesCellNJ(vector <int> zoneProbesCellNJ);
+
+    //! Set the probes cell dimension of K direction (nk).
+    void SetZoneProbesCellNK(vector <int> zoneProbesCellNK);
+
+    //! Return the probes cell dimension of I direction (ni).
+    vector <int> GetZoneProbesCellNI() const;
+
+    //! Return the probes cell dimension of J direction (nj).
+    vector <int> GetZoneProbesCellNJ() const;
+
+    //! Return the probes cell dimension of K direction (nk).
+    vector <int> GetZoneProbesCellNK() const;
+
+    //! Return the cell iteration index, for example: if layer = 0, then iCellStart = 1, iCellEnd = ni-1.
+    void GetCellIterationIndex(int &iCellStart, int &iCellEnd, int &jCellStart, int &jCellEnd, int &kCellStart, int &kCellEnd, int layer = 0);
+
+    //! Return the node iteration index, for example: iNodeStart = 1, iNodeEnd = ni.
+    void GetNodeIterationIndex(int &iNodeStart, int &iNodeEnd, int &jNodeStart, int &jNodeEnd, int &kNodeStart, int &kNodeEnd);
+
+    //! Return the face iteration index, for example: if nSurface = 1, then iFaceStart = 0, iFaceEnd = ni-1.
+    void GetFaceIterationIndex(int &iFaceStart, int &iFaceEnd, int &jFaceStart, int &jFaceEnd, int &kFaceStart, int &kFaceEnd, int iSurface);
+
+    //! Get the face index.
+    void GetNsurfIndex(int &il1, int &jl1, int &kl1, int iDimension);
+
+    //! Get the left cell list of each face.
+    void GetLeftCellOfFace(int &i, int &j, int &k, int &il1, int &jl1, int &kl1, int &ile, int &jle, int &kle);
+
+    //! Get the right cell list of each face.
+    void GetRightCellOfFace(int &i, int &j, int &k, int &il1, int &jl1, int &kl1, int &ire, int &jre, int &kre);
+
+    //! Assign the node dimension of I, J, K direction to si, sj ,sk.
+    void GetND(int &si, int &sj, int &sk) const;
+
+    //! Return multigrid step I (istp);
+    int GetMultigridStepI() const;
+
+    //! Return multigrid step J (jstp);
+    int GetMultigridStepJ() const;
+
+    //! Return multigrid step K (kstp);
+    int GetMultigridStepK() const;
+
+    //! Sets multigrid step I (istp);
+    void SetMultigridStepI(int istp);
+
+    //! Sets multigrid step J (jstp);
+    void SetMultigridStepJ(int jstp);
+
+    //! Sets multigrid step K (kstp);
+    void SetMultigridStepK(int kstp);
+
+    //! Copy coordinates(X, Y, Z) and boundary information from another grid.
+    LIB_EXPORT void CopyGrid(StructGrid *grid);
+
+    //! Copy boundary information from another grid.
+    LIB_EXPORT void CopyStructBCSet(StructBCSet *structBCSet);
+
+    //! Copy coordinates(X, Y, Z) information from another grid.
+    LIB_EXPORT void CopyXYZ(int ni, int nj, int nk, RDouble *xx, RDouble *yy, RDouble *zz);
+
+    //! Return cell volume reference.
+    LIB_EXPORT RDouble3D & GetVolume(int istep = 0) const;
+
+    //! Set the three dimensional array of coordinates from one dimensional coordinates.
+    LIB_EXPORT void SetArrayLayout();
+
+    //! Allocate memory for face metrics, cell metrics (dynamic grid metrics alternatively).
+    LIB_EXPORT void AllocateMetrics(ActionKey *actkey);
+    
+    //! Compute metrics (face normal, cell center, et al.).
+    LIB_EXPORT void ComputeMetrics(ActionKey *actkey = 0);
+    
+    //! Create composite boundary condition region (allocate memory for structBCSet).
+    LIB_EXPORT void CreateCompositeBCRegion(int nBCRegion);
+
+    //! Return composite boundary condition region pointer (structBCSet).
+    StructBCSet * GetStructBCSet() const;
+
+    //! Set boundary face information.
+    LIB_EXPORT void SetBCFaceInfo();
+
+    //! Get source boundary grid's I, J, K index.
+    LIB_EXPORT void GetSourceIndexIJK(int iFace, int ipos, int &i, int &j, int &k);
+
+    //! Get source boundary grid's I, J, K index.
+    LIB_EXPORT void GetSourceIndexIJK_Nsurf_LR(int iFace, int ipos, int &i, int &j, int &k, int &nsurf, int &s_lr);
+
+    //! Get target boundary grid's I, J, K index.
+    LIB_EXPORT void GetTargetIndexIJK(int iFace, int ipos, int &i, int &j, int &k);
+
+    LIB_EXPORT void GetSourceIndexIJK_fornodetransfer(int iFace, int &id, int &jd, int &kd, int &i_lr, int &j_lr, int &k_lr);
+    LIB_EXPORT void GetTargetIndexIJK_fornodetransfer(int iFace, int &id, int &jd, int &kd, int &i_lr, int &j_lr, int &k_lr);
+    void ComputeMetrics_BC();
+    void ComputeMetrics_BC_2D();
+    void ComputeMetrics_BC_3D();
+    void ComputeMetricsWithBCforStructHighOrder();
+    void ComputeMetricsWithBCforStructHighOrder2D();
+    void ComputeMetricsWithBCforStructHighOrder3D();
+    void ComputeJacobianforStructHighOrder();
+    void ComputeJacobianforStructHighOrder2D();
+    void ComputeJacobianforStructHighOrder3D();
+
+    void UploadGridInfoOnlyforStructHighOrder(DataContainer *&dataContainer, const int &neighborZoneIndex, int mission);
+    void DownloadGridInfoOnlyforStructHighOrder(DataContainer *&dataContainer, const int &neighborZoneIndex, int mission);
+    void UploadGridInfoOnlyforStructHighOrder_mission1(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void UploadGridInfoOnlyforStructHighOrder_mission2(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void UploadGridInfoOnlyforStructHighOrder_mission3(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void UploadGridInfoOnlyforStructHighOrder_mission4(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void UploadGridInfoOnlyforStructHighOrder_mission5(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void UploadGridInfoOnlyforStructHighOrder_mission6(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void UploadGridInfoOnlyforStructHighOrder_mission7(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void UploadGridInfoOnlyforStructHighOrder_mission8(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void UploadGridInfoOnlyforStructHighOrder_mission9(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void UploadGridInfoOnlyforStructHighOrder_mission10(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void UploadGridInfoOnlyforStructHighOrder_mission11(DataContainer *&dataContainer, const int &neighborZoneIndex);
+
+    void DownloadGridInfoOnlyforStructHighOrder_mission1(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void DownloadGridInfoOnlyforStructHighOrder_mission2(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void DownloadGridInfoOnlyforStructHighOrder_mission3(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void DownloadGridInfoOnlyforStructHighOrder_mission4(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void DownloadGridInfoOnlyforStructHighOrder_mission5(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void DownloadGridInfoOnlyforStructHighOrder_mission6(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void DownloadGridInfoOnlyforStructHighOrder_mission7(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void DownloadGridInfoOnlyforStructHighOrder_mission8(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void DownloadGridInfoOnlyforStructHighOrder_mission9(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void DownloadGridInfoOnlyforStructHighOrder_mission10(DataContainer *&dataContainer, const int &neighborZoneIndex);
+    void DownloadGridInfoOnlyforStructHighOrder_mission11(DataContainer *&dataContainer, const int &neighborZoneIndex);
+         
+    Int1D *DiscretePrecisionKXI;
+    Int1D *DiscretePrecisionETA;
+    Int1D *DiscretePrecisionCTA;
+
+    void InitialDiffOrderforStructHighOrder();
+    void CorrectDiffOrderNearUnstructBlockforStructHighOrder(const int &neighborZoneIndex);
+
+    //! Read x,y,z coordinates from file to construct node topology (structx, structy, structz).
+    LIB_EXPORT void ReadXYZ(fstream &file);
+
+    //! Write node topology (structx, structy, structz) from range i(j, k)st to i(j, k)ed to file.
+    LIB_EXPORT void WriteXYZ(fstream &file, int ist, int ied, int jst, int jed, int kst, int ked);
+
+    //! Compute and set nTotalNode, nTotalFacenTFace, nTCell.
+    LIB_EXPORT void SetBasicDimension();
+
+    LIB_EXPORT void SetBasicDimension(int ni, int nj, int nk);
+
+    //! Compute face center ? Yes, Verified by Li Peng on Mar 13,2019.
+    LIB_EXPORT void FaceCoor(int i, int j, int k, int nsurf, RDouble &xc, RDouble &yc, RDouble &zc);
+
+    //! Compute cell center ? Yes, Verified by Li Peng on Mar 13,2019.
+    LIB_EXPORT void CenterCoor(int i, int j, int k, RDouble &xc, RDouble &yc, RDouble &zc);
+
+    //! Compute average norm of q_0_proxy and q_1_proxy field's difference.
+    LIB_EXPORT void CVGNorm(FieldProxy *q_1_proxy, FieldProxy *q_0_proxy, int neqn, RDouble &norm);
+
+    //! 
+    LIB_EXPORT void ActionReflect(ActionTag *acttag);
+
+    //! Grid based actions.
+    LIB_EXPORT void Action(ActionKey *actkey);
+
+    //! Action of trading cell center.
+    LIB_EXPORT void TranslateAction(ActionKey *actkey);
+
+    //! Total length of data need to be translated.
+    LIB_EXPORT streamsize TranslateActionLength(ActionKey *actkey);
+
+    //! CoarseGrids.
+    LIB_EXPORT void CoarseGrids(int nlmax);
+
+    //! Process boundary condition information.
+    LIB_EXPORT void ProcessBCInfo();
+    LIB_EXPORT void SetLnkInfo();
+
+    //! Read grid information from file.
+    LIB_EXPORT void ReadGrid(fstream &file);
+
+    //! Write grid information to file
+    LIB_EXPORT void WriteGrid(fstream &file);
+
+    //! Encode data from datacontainer to virtual file.
+    LIB_EXPORT void Encode(DataContainer *cdata, int flag);
+    
+    //! Decode data from virtual file to datacontainer.
+    LIB_EXPORT void Decode(DataContainer *cdata, int flag);
+
+    //! Revise the zone index of neighbor zones.
+    LIB_EXPORT void ReviseNeighborZoneIndex(int zoneStart);
+    
+    //! Update coordinate data to datacontainer.
+    LIB_EXPORT void UpdateCoordinate(DataContainer *cdata);
+
+    //! Get grid's min and max distance.
+    LIB_EXPORT void GetMinMaxDS(RDouble &dismin, RDouble &dismax);
+
+    //! Get boundary grid's min and max distance.
+    LIB_EXPORT void GetBoundaryMinMax(RDouble *pmin, RDouble *pmax);
+
+    //! Establish grid link information (parallel computation).
+    LIB_EXPORT void BuildGridLink(LinkStruct *link);
+
+    //! Compute total number of Wall Type cell.
+    LIB_EXPORT int GetNumberOfWallCell();
+
+    //! To obtain the information of wall boundary conditions.
+    //! param[out]: wallBCNum indicates the number of the wall boundary conditions;
+    //! param[out]: maxCellNum denotes the maximum number of the cells in the wall boundary conditions.
+    LIB_EXPORT void GetWallBCInfo(int &wallBCNum, int &maxCellNum);
+
+    //! Dump to tecplot.
+    LIB_EXPORT void ToTecplot();
+
+    //! Get surface velocity.
+    LIB_EXPORT void GridSurfaceVelocity(RDouble *xt, RDouble *yt, RDouble *zt);
+    
+    LIB_EXPORT void ComputeGridFaceVelocity();
+    //! Change BC type.
+    LIB_EXPORT void ChangeBCType(int from_bctype, int to_bctype);
+
+    //! Compute variables at nodes.
+    LIB_EXPORT void CompNodeVar(RDouble4D &q_n, RDouble4D &q);
+    
+    //! Allocate memory for walldist.
+    LIB_EXPORT void AllocateWalldist();
+
+    //! Get the largest local grid length, distance of neighbor cell centers.
+    LIB_EXPORT RDouble3D * GetLargestLocalGridLength();
+
+    //! Get the smallest local grid length, distance of neighbor cell centers.
+    LIB_EXPORT RDouble3D * GetSmallestLocalGridLength();
+
+    //! Get the sub-grid length, used for DES simulation ONLY.
+    LIB_EXPORT RDouble3D * GetSubgridLength();
+    
+    //! Compute the minimum distance of the grid edges.
+    LIB_EXPORT RDouble CalMinEdgeLength();
+
+    //! Compute the maximum distance of the grid edges.
+    LIB_EXPORT RDouble CalMaxEdgeLength();
+
+    //! Write face boundary condition to file stream.
+    LIB_EXPORT void WriteFaceBC(fstream &file);
+#pragma warning(disable:4100)
+    LIB_EXPORT RDouble SkewnessSummary(ActionKey *actkey = 0) { return 1.0; }
+#pragma warning(default:4100)
+    
+    void GetLocalIndex(int gp, int &ip, int &jp, int &kp) const;
+    void GetLocalCenter(int gp, int &ip, int &jp, int &kp) const;
+    LIB_EXPORT void EncodeOversetGrid(DataContainer *cdata);
+    LIB_EXPORT void DecodeOversetGrid(DataContainer *cdata);
+    LIB_EXPORT void AllocateOversetGrid();
+    LIB_EXPORT void CopyOversetFromUnstructGrid();
+    LIB_EXPORT int * GetCellTypeContainer();
+    LIB_EXPORT void CreateLinkPointStructure();
+    LIB_EXPORT void SetLinkPointLabel(int *iLabel, int iDirection);
+    //LIB_EXPORT void DeleteLinkPointStructure();
+    LIB_EXPORT void SetZoneStartPointLabel(int zoneStartPointLabel);
+    //LIB_EXPORT void DeleteCellContainer();
+    int GetZoneStartPointLabel() const;
+    int * GetILinkPointLabel() const;
+    int * GetJLinkPointLabel() const;
+    int * GetKLinkPointLabel() const;
+    LIB_EXPORT void GatherCellsByColor(int &pCell, int color);
+    LIB_EXPORT void ResetCellType();
+    LIB_EXPORT void ProbeExternalOverlapCells(int &counter);
+    LIB_EXPORT void ProbeHoleCell(HoleGrid *holeGrid);
+    LIB_EXPORT void ProbeBorderCell(int iType, int jType, vector< int > *friendPoint, vector< int > *friendZone);
+    LIB_EXPORT void ColorOverlapCell(int gp, int type);
+    LIB_EXPORT void SetZoneStartCenterLabel(int zoneStartCenterLabel);
+    int GetNumberOfCores() const;
+    LIB_EXPORT int * GetHingedPointContainer() const;
+    LIB_EXPORT RDouble * GetXCoreContainer() const;
+    LIB_EXPORT RDouble * GetYCoreContainer() const;
+    LIB_EXPORT RDouble * GetZCoreContainer() const;
+    //LIB_EXPORT void InitCoreParameterContainer();
+    LIB_EXPORT void CreateCoreParameterContainer();
+    //LIB_EXPORT void DeleteCoreParameterContainer();
+    LIB_EXPORT void SetHingedPointContainer(int *iLabel);
+    LIB_EXPORT void SetCoreCoordinateContainer(RDouble *sLabel, int iDirection);
+    LIB_EXPORT PHDouble2D & GetLocalFrame();    //! Frequent calls will reduce the computational efficiency, it will be optimized later.
+    LIB_EXPORT void ComputeWeight();
+
+    LIB_EXPORT void ComputeUnitCellCapsule(BackgroundTree *backgroundTree, int &iUnitCell);
+    LIB_EXPORT void CollectOversetCells(OversetCellCollector *oversetCellCollector, int myid);
+    LIB_EXPORT void ProbeNearestPoint(RDouble xx, RDouble yy, RDouble zz, vector< RDouble > &ss, vector< int > &gp);
+    LIB_EXPORT void ComputeLocalCoordinateByNewtonMethod(int iCore, int jCore, int kCore, RDouble xx, RDouble yy, RDouble zz, vector< RDouble > &ss, vector< int > &node);
+    
+    void DecodeBCFace(DataContainer *cdata);
+    void DecodeBcDirFace(DataContainer *cdata);
+
+    void GhostCell3DExceptInterface(RDouble3D &TargetArray3D);
+    void GhostCell3DExceptInterface(RDouble4D &TargetArray4D, const int &nVariables);
+
+    void InitVariableWallTemperature();
+
+    RDouble4D * GetFaceVelocityX() const;
+    RDouble4D * GetFaceVelocityY() const;
+    RDouble4D * GetFaceVelocityZ() const;
+
+    void GetBcNamePair(set< pair<int, string> > &bcNamePairSet);
+    void DumpWallFaceCenter(ActionKey *actkey);
+    void GetCellIBlank(ActionKey *actkey);
+    void TranslateCellIBlank(ActionKey *actkey);
+    void ComputeCellBoundaryType();
+    Int3D *GetCellBoundaryType();
+
+    void SetOrdinaryGridIndex(int ordinaryGridIndexIn);
+    void SetOrdinaryDimStartIndex(int *ordinaryDimStartIndexIn);
+    void SetOrdinaryDimEndIndex  (int *ordinaryDimEndIndexIn);
+    int  GetOrdinaryGridIndex();    
+    int *GetOrdinaryDimStartIndex();
+    int *GetOrdinaryDimEndIndex();
+    void GetOrdinaryNodeIndex(int iIndexIn, int jIndexIn,int kIndexIn,int &iOrdinaryIndexOut,int &jOrdinaryIndexOut,int &kOrdinaryIndexOut);
+    void GetOrdinaryCellIndex(int iIndexIn, int jIndexIn,int kIndexIn,int &iOrdinaryIndexOut,int &jOrdinaryIndexOut,int &kOrdinaryIndexOut);
+
+    RDouble  GetPartialCFL();
+    void SetPartialCFL(RDouble PartialCFL){ partialCFL = PartialCFL;}
+
+    void CompressSpecificArrayToInterface(DataContainer *&dataContainer, const string &fieldName, const int &neighborZoneIndex, const int &neqn);
+    void DecompressArrayFromInterface(DataContainer *&dataContainer, const string &fieldName, const int &neighborZoneIndex, const int &neqn);
+
+private:
+    void ReadXYZ(fstream &file, RDouble3D &coor, int ist, int ied, int jst, int jed, int kst, int ked);
+    void ReadXYZASCII(fstream &file, RDouble3D &coor, int ist, int ied, int jst, int jed, int kst, int ked);
+    void WriteXYZ(fstream &file, RDouble3D &coor, int ist, int ied, int jst, int jed, int kst, int ked);
+    void AllocateMetricsALE(ActionKey *actkey);
+    void ComputeMetrics3D(ActionKey *actkey);
+    void ComputeMetrics2D(ActionKey *actkey);
+    void ComputeCellCenter();
+
+    //! @brief grid metrics computation for struct high order solver.
+    void AllocateMetricsStructHighOrder(ActionKey *actkey);
+    void ComputeMetricsStructHighOrder2D(ActionKey *actkey);
+    void ComputeMetricsStructHighOrder3D(ActionKey *actkey);
+    void ComputeMetricsStructHighOrder2D_HDCS();
+    void ComputeMetricsStructHighOrder3D_HDCS();
+    void GhostMetricsStructHighOrder2D();
+    void GhostMetricsStructHighOrder3D();
+
+    //! @brief grid difference operator for a whole line.
+    void GridDelta(const Range &NP, const Range &NI, RDouble2D *LineData1, RDouble2D *LineData2);
+
+    void ReadMovingGrid();
+    void UpdateVolold();
+    void ReadGrid(VirtualFile *vfile);
+    void WriteGrid(VirtualFile *vfile);
+    void EncodeGrid(DataContainer *cdata);
+    void DecodeGrid(DataContainer *cdata);
+    void DumpWalldist(ActionKey *actkey);
+    void ReadWalldist(RDouble *wallDistIn);
+    void ReadNearestwallfacenormalx(RDouble* nearestwallfaceNormalxIn);
+    void ReadNearestwallfacenormaly(RDouble* nearestwallfaceNormalyIn);
+    void ReadNearestwallfacenormalz(RDouble* nearestwallfaceNormalzIn);
+    void GetCellCenter(ActionKey *actkey);
+    void TranslateCellCenter(ActionKey *actkey);
+    bool CommunicateNodeLocation();
+    void GetNodeIJKfromSourceIndex(StructGrid *fgrid, int iFace, int layer, int IJKofNodes[4][3]);
+    void GetNodeIJKfromTargetIndex(StructGrid *fgrid, int iFace, int layer, int IJKofNodes[4][3]);
+    void GetRelationBetweenTwoPairsofNodes(int RelationBetweenTwoPairsofNodes[4], RDouble Nodes_ABCD[4][3], RDouble Nodes_abcd[4][3]);
+    void GetNodeIJKfromSourceIndexghostofghost(StructGrid *fgrid, int iFace, int layer, int IJKofNodes[12][3]);
+    void GetNodeIJKfromTargetIndexghostofghost(StructGrid *fgrid, int iFace, int layer, int IJKofNodes[12][3]);
+    int GetRelationshipBetweenTwoPairsofNodes(RDouble NodesofABCD[4][3], RDouble Nodesofabcd[4][3]);
+    streamsize TranslateCellCenterLength(ActionKey *actkey);
+    void GhostMetrics3D();
+    void GhostMetrics2D();
+    void SimpleAction(ActionKey *actkey);
+
+    int CompNIFace();
+    void FillCoreIndex(vector< int > &core_index, int iCore, int jCore, int kCore);
+    void ComputePhysicalCoordinate(vector< vector< RDouble > > &amer, vector< int > &core_index, vector< RDouble > &xx, vector< RDouble > &yy,  vector< RDouble > &zz);
+    void ComputePhysicalCoordinate(vector< vector< RDouble > > &localFrame, RDouble xx, RDouble yy, RDouble zz, vector< RDouble > &globalCoordinate);
+    void FillCoefficientContainer(vector< vector< RDouble > > &source, vector< RDouble > &target, int i);
+    void ComputeTempContainer(vector< RDouble > &ksai, vector< RDouble > &temp);
+    void ComputeJacobiMatrix(vector< RDouble > &a, vector< RDouble > &b, vector< RDouble > &c, vector< RDouble > &ksai, vector< vector< RDouble > > &amer);
+    void GaussElimination(vector< vector< RDouble > > &a, vector< RDouble > &b, int n, vector< RDouble > &x, int &flag);
+
+    void ComputeLargestLocalGridLength();
+    void ComputeSmallestLocalGridLength();
+    void ComputeSubgridLength();
+};
+
+#include "Geo_StructGrid.hxx"
+
+//! Communicate the interface variables at the boundary faces between different zones.
+//! @param[in] grid    computational mesh.
+//! @param[in] variable    variable pointer of which need to be communicated.
+//! @param[in] variableName    variable name of which need to be communicated.
+//! @param[in] variableDimension    variable dimension of which need to be communicated.
+//! -# 1: 1-D array.
+//! -# 2: 2-D array.
+//! -# n: n-D array.
+void CommunicateInterfaceValue(StructGrid *grid, RDouble4D *variable, const string &variableName, int variableDimension);
+void CommunicateInterfaceValue(StructGrid *grid, RDouble3D *variable, const string &variableName);
+
+void UploadInterfaceValue(StructGrid *grid, RDouble4D *f, const string &name, int neqn);
+void UploadInterfaceValue(StructGrid *grid, RDouble3D *f, const string &name);
+void DownloadInterfaceValue(StructGrid *grid, RDouble4D *f, const string &name, int neqn);
+void DownloadInterfaceValue(StructGrid *grid, RDouble3D *f, const string &name);
+
+void UploadOversetValue(StructGrid *grid, RDouble4D *field, const string &name, int neqn);
+void DownloadOversetValue(StructGrid *grid, RDouble4D *field, const string &name, int neqn);
+void UploadOversetValue(StructGrid *grid, RDouble3D *field, const string &name);
+void DownloadOversetValue(StructGrid *grid, RDouble3D *field, const string &name);
+
+void MinMaxDiffINF(StructGrid *grid, int ig, RDouble *dmin, RDouble *dmax, RDouble4D *q, int m);
+void BarthLimiterINF (StructGrid *grid, int ig, RDouble *limit, RDouble4D *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, int m);
+void VencatLimiterINF(StructGrid *grid, int ig, RDouble *limit, RDouble4D *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, int m);
+
+void EncodeIJK(int &index, int i, int j, int k, int ni, int nj);
+void DecodeIJK(int index, int &i, int &j, int &k, int ni, int nj);
+
+void GetIJKRegion(const Range &I, const Range &J, const Range &K, int &ist, int &ied, int &jst, int &jed, int &kst, int &ked);
+void GetNsurfIndex(int nsurf, int &i, int &j, int &k);
+
+void GetIJKROT(int ijk[4][3], int *irot, int *jrot, int *krot);
+
+extern int mide[3][3];
+
+StructGrid * StructGridCast(Grid *grid_in);
+
+void GetRange(int ni, int nj, int nk, int startShift, int endShift, Range &I, Range &J, Range &K);
+void GetRange(Range &I, Range &J, Range &K, int ist, int ied, int jst, int jed, int kst, int ked);
+
+//! Used by Post_Visual class.
+void CompNodeVar(Grid *grid_in, RDouble4D &qn, int m, RDouble4D &q, int n, bool isVelocityForPostVisual = false);
+void CompNodeVar(Grid *grid_in, RDouble4D &qn, int m, RDouble3D &q);
+
+void ModifyWallTemperature(const string& name, Grid *grid_in, RDouble4D &qn);
+void ModifyBoundaryNodeValue(const string &name, Grid *grid_in, RDouble4D &qn, RDouble4D &cellCenterData, int index, int bcType);
+void ModifyBoundaryNodeValue(const string &name, Grid *grid_in, RDouble4D &qn, RDouble3D &cellCenterData, int bcType);
+}
diff --git a/API/Geometry/include/Geo_StructGrid.hxx b/API/Geometry/include/Geo_StructGrid.hxx
new file mode 100644
index 0000000..f6a5b6a
--- /dev/null
+++ b/API/Geometry/include/Geo_StructGrid.hxx
@@ -0,0 +1,456 @@
+inline int StructGrid::GetMultigridStepI() const
+{
+    return multigridInfo->GetMultigridStepI();
+}
+
+inline int StructGrid::GetMultigridStepJ() const
+{
+    return multigridInfo->GetMultigridStepJ();
+}
+
+inline int StructGrid::GetMultigridStepK() const
+{
+    return multigridInfo->GetMultigridStepK();
+}
+
+inline void StructGrid::SetMultigridStepI(int istp)
+{
+    multigridInfo->SetMultigridStepI(istp);
+}
+
+inline void StructGrid::SetMultigridStepJ(int jstp)
+{
+    multigridInfo->SetMultigridStepJ(jstp);
+}
+
+inline void StructGrid::SetMultigridStepK(int kstp)
+{
+    multigridInfo->SetMultigridStepK(kstp);
+}
+
+inline RDouble3D * StructGrid::GetWallDist() const
+{
+    return walldist;
+}
+
+inline RDouble3D * StructGrid::GetNearestWallFaceNormalX() const
+{
+    return nearestwallfacenormalx;
+}
+
+inline RDouble3D * StructGrid::GetNearestWallFaceNormalY() const
+{
+    return nearestwallfacenormaly;
+}
+
+inline RDouble3D * StructGrid::GetNearestWallFaceNormalZ() const
+{
+    return nearestwallfacenormalz;
+}
+
+inline Int3D *StructGrid::GetCellBoundaryType()
+{
+    return cellBoundaryType;
+}
+
+inline RDouble3D * StructGrid::GetCellCenterX() const
+{
+    return cellMetrics->GetCellCenterX();
+}
+
+inline RDouble3D * StructGrid::GetCellCenterY() const
+{
+    return cellMetrics->GetCellCenterY();
+}
+
+inline RDouble3D * StructGrid::GetCellCenterZ() const
+{
+    return cellMetrics->GetCellCenterZ();
+}
+
+inline RDouble4D * StructGrid::GetFaceNormalX() const
+{
+    return faceMetrics->GetFaceNormalX();
+}
+
+inline RDouble4D * StructGrid::GetFaceNormalY() const
+{
+    return faceMetrics->GetFaceNormalY();
+}
+
+inline RDouble4D * StructGrid::GetFaceNormalZ() const
+{
+    return faceMetrics->GetFaceNormalZ();
+}
+
+inline RDouble4D * StructGrid::GetFaceArea() const
+{
+    return faceMetrics->GetFaceArea();
+}
+
+inline RDouble4D * StructGrid::GetFaceVectorX() const
+{
+    return faceMetrics->GetFaceVectorX();
+}
+
+inline RDouble4D * StructGrid::GetFaceVectorY() const
+{
+    return faceMetrics->GetFaceVectorY();
+}
+
+inline RDouble4D * StructGrid::GetFaceVectorZ() const
+{
+    return faceMetrics->GetFaceVectorZ();
+}
+
+inline RDouble3D * StructGrid::GetCellVolume() const
+{
+    return cellMetrics->GetCellVolume();
+}
+
+inline RDouble3D * StructGrid::GetCellLengthX() const
+{
+    return cellMetrics->GetCellLengthX();
+}
+
+inline RDouble3D * StructGrid::GetCellLengthY() const
+{
+    return cellMetrics->GetCellLengthY();
+}
+
+inline RDouble3D * StructGrid::GetCellLengthZ() const
+{
+    return cellMetrics->GetCellLengthZ();
+}
+
+inline RDouble3D * StructGrid::GetCellVolumeOld() const
+{
+    return dynamicGridMetrics->GetCellVolumeOld();
+}
+
+inline RDouble5D * StructGrid::GetFaceVector_FD() const
+{
+    return faceMetrics->GetFaceVector_FD();
+}
+
+inline RDouble5D * StructGrid::GetFaceNormal_FD() const
+{
+    return faceMetrics->GetFaceNormal_FD();
+}
+
+inline RDouble3D * StructGrid::GetCellJacobian() const
+{
+    return cellMetrics->GetCellJacobian();
+}
+
+inline RDouble4D * StructGrid::GetFaceNormalVelocity() const
+{
+    return dynamicGridMetrics->GetFaceNormalVelocity();
+}
+
+inline void StructGrid::SetNI(int ni)
+{
+    nodeTopology->SetNI(ni);
+}
+
+inline void StructGrid::SetNJ(int nj)
+{
+    nodeTopology->SetNJ(nj);
+}
+
+inline void StructGrid::SetNK(int nk)
+{
+    nodeTopology->SetNK(nk);
+}
+
+inline int StructGrid::GetNI() const
+{
+    return nodeTopology->GetNI();
+}
+
+inline int StructGrid::GetNJ() const
+{
+    return nodeTopology->GetNJ();
+}
+
+inline int StructGrid::GetNK() const
+{
+    return nodeTopology->GetNK();
+}
+
+inline void StructGrid::SetZoneProbesCellNI(vector <int> zoneProbesCellNI)
+{
+    this->zoneProbesCellNI = zoneProbesCellNI;
+}
+
+inline void StructGrid::SetZoneProbesCellNJ(vector <int> zoneProbesCellNJ)
+{
+    this->zoneProbesCellNJ = zoneProbesCellNJ;
+}
+
+inline void StructGrid::SetZoneProbesCellNK(vector <int> zoneProbesCellNK)
+{
+    this->zoneProbesCellNK = zoneProbesCellNK;
+}
+
+inline vector <int> StructGrid::GetZoneProbesCellNI() const
+{
+    return zoneProbesCellNI;
+}
+
+inline vector <int> StructGrid::GetZoneProbesCellNJ() const
+{
+    return zoneProbesCellNJ;
+}
+
+inline vector <int> StructGrid::GetZoneProbesCellNK() const
+{
+    return zoneProbesCellNK;
+}
+
+inline void StructGrid::GetCellIterationIndex(int &iCellStart, int &iCellEnd, int &jCellStart, int &jCellEnd, int &kCellStart, int &kCellEnd, int layer)
+{
+    int ni = nodeTopology->GetNI();
+    int nj = nodeTopology->GetNJ();
+    int nk = nodeTopology->GetNK();
+
+    iCellStart = 1 - layer;
+    iCellEnd = ni - 1 + layer;
+    jCellStart = 1 - layer;
+    jCellEnd = nj - 1 + layer;
+
+    if (nk == 1)
+    {
+        kCellStart = 1;
+        kCellEnd = 1;
+    }
+    else
+    {
+        kCellStart = 1 - layer;
+        kCellEnd = nk -1 + layer;
+    }
+}
+
+inline void StructGrid::GetNodeIterationIndex(int &iNodeStart, int &iNodeEnd, int &jNodeStart, int &jNodeEnd, int &kNodeStart, int &kNodeEnd)
+{
+    int ni = nodeTopology->GetNI();
+    int nj = nodeTopology->GetNJ();
+    int nk = nodeTopology->GetNK();
+
+    iNodeStart = 1;
+    iNodeEnd = ni;
+    jNodeStart = 1;
+    jNodeEnd = nj;
+
+    if (nk == 1)
+    {
+        kNodeStart = 1;
+        kNodeEnd = 1;
+    }
+    else
+    {
+        kNodeStart = 1;
+        kNodeEnd = nk;
+    }
+}
+
+inline void StructGrid::GetFaceIterationIndex(int &iFaceStart, int &iFaceEnd, int &jFaceStart, int &jFaceEnd, int &kFaceStart, int &kFaceEnd, int iSurface)
+{
+    int ni = nodeTopology->GetNI();
+    int nj = nodeTopology->GetNJ();
+    int nk = nodeTopology->GetNK();
+
+    if (iSurface == 1)
+    {
+        iFaceStart = 0;
+        iFaceEnd = ni-1;
+        jFaceStart = 1;
+        jFaceEnd = nj-1;
+
+        if (nk == 1)
+        {
+            kFaceStart = 1;
+            kFaceEnd = 1;
+        }
+        else
+        {
+            kFaceStart = 1;
+            kFaceEnd = nk-1;
+        }
+    }
+    else if (iSurface == 2)
+    {
+        iFaceStart = 1;
+        iFaceEnd = ni-1;
+        jFaceStart = 0;
+        jFaceEnd = nj-1;
+
+        if (nk == 1)
+        {
+            kFaceStart = 1;
+            kFaceEnd = 1;
+        }
+        else
+        {
+            kFaceStart = 1;
+            kFaceEnd = nk-1;
+        }
+    }
+    else
+    {
+        iFaceStart = 1;
+        iFaceEnd = ni-1;
+        jFaceStart = 1;
+        jFaceEnd = nj-1;
+        kFaceStart = 0;
+        kFaceEnd = nk-1;
+    }
+}
+
+inline void StructGrid::GetNsurfIndex(int &il1, int &jl1, int &kl1, int iDimension)
+{
+    if(iDimension == 1)
+    {
+        il1 = 1;
+        jl1 = 0;
+        kl1 = 0;
+    }
+    else if(iDimension == 2)
+    {
+        il1 = 0;
+        jl1 = 1;
+        kl1 = 0;
+    }
+    else if(iDimension == 3)
+    {
+        il1 = 0;
+        jl1 = 0;
+        kl1 = 1;
+    }
+}
+
+inline void StructGrid::GetLeftCellOfFace(int &i, int &j, int &k, int &il1, int &jl1, int &kl1, int &ile, int &jle, int &kle)
+{
+	ile  = i - il1;
+	jle  = j - jl1;
+	kle  = k - kl1;
+}
+
+inline void StructGrid::GetRightCellOfFace(int &i, int &j, int &k, int &il1, int &jl1, int &kl1, int &ire, int &jre, int &kre)
+{
+	ire  = i + il1;
+	jre  = j + jl1;
+	kre  = k + kl1;
+}
+
+inline void StructGrid::GetND(int &si, int &sj, int &sk) const
+{
+    si = nodeTopology->GetNI();
+    sj = nodeTopology->GetNJ();
+    sk = nodeTopology->GetNK();
+}
+
+inline void StructGrid::GetLocalCenter(int gp, int &ip, int &jp, int &kp) const
+{
+    int ni = nodeTopology->GetNI();
+    int nj = nodeTopology->GetNJ();
+    kp = gp / ((ni - 1) * (nj - 1));
+
+    int other = gp % ((ni - 1) * (nj - 1));
+
+    jp = other / (ni - 1);
+
+    ip = other % (ni - 1);
+
+    return;
+}
+
+inline RDouble3D * StructGrid::GetStructX() const
+{
+    return nodeTopology->GetStructX();
+}
+
+inline RDouble3D * StructGrid::GetStructY() const
+{
+    return nodeTopology->GetStructY();
+}
+
+inline RDouble3D * StructGrid::GetStructZ() const
+{
+    return nodeTopology->GetStructZ();
+}
+
+inline StructBCSet * StructGrid::GetStructBCSet() const
+{
+    return structBCSet;
+}
+
+inline RDouble4D * StructGrid::GetFaceVelocityX() const
+{
+    return dynamicGridMetrics->GetFaceVelocityX();
+}
+
+inline RDouble4D * StructGrid::GetFaceVelocityY() const
+{
+    return dynamicGridMetrics->GetFaceVelocityY();
+}
+
+inline RDouble4D * StructGrid::GetFaceVelocityZ() const
+{
+    return dynamicGridMetrics->GetFaceVelocityZ();
+}
+
+inline int StructGrid::GetZoneStartPointLabel() const
+{
+    return oversetGridTopology->GetZoneStartPointLabel();
+}
+
+inline void StructGrid::SetZoneStartPointLabel(int zoneStartPointLabel)
+{
+    oversetGridTopology->SetZoneStartPointLabel(zoneStartPointLabel);
+}
+
+inline int * StructGrid::GetHingedPointContainer() const
+{
+    return oversetGridTopology->GetHingedPointContainer();
+}
+
+inline RDouble * StructGrid::GetXCoreContainer() const
+{
+    return oversetGridTopology->GetXCoreContainer();
+}
+
+inline RDouble * StructGrid::GetYCoreContainer() const
+{
+    return oversetGridTopology->GetYCoreContainer();
+}
+
+inline RDouble * StructGrid::GetZCoreContainer() const
+{
+    return oversetGridTopology->GetZCoreContainer();
+}
+
+inline int StructGrid::GetNumberOfCores() const
+{
+    return oversetGridTopology->GetNumberOfCores();
+}
+
+inline int * StructGrid::GetILinkPointLabel() const
+{
+    return oversetGridTopology->GetILinkPointLabel();
+}
+
+inline int * StructGrid::GetJLinkPointLabel() const
+{
+    return oversetGridTopology->GetJLinkPointLabel();
+}
+
+inline int * StructGrid::GetKLinkPointLabel() const
+{
+    return oversetGridTopology->GetKLinkPointLabel();
+}
+
+inline void StructGrid::SetZoneStartCenterLabel(int zoneStartCenterLabel)
+{
+    oversetGridTopology->SetZoneStartCenterLabel(zoneStartCenterLabel);
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_UnstructBC.h b/API/Geometry/include/Geo_UnstructBC.h
new file mode 100644
index 0000000..6a667db
--- /dev/null
+++ b/API/Geometry/include/Geo_UnstructBC.h
@@ -0,0 +1,131 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_UnstructBC.h
+//! @brief     It is the base class of geometry operation for boundary condition.
+//!            The inheriting order is: SimpleBC -> StructuredBC/UnstructuredBC.
+//! @author    Zhang Yong, Bell, He Xin.
+
+#pragma once
+#include "Geo_SimpleBC.h"
+using namespace std;
+
+namespace PHSPACE
+{
+class SimpleBC;
+
+//class BCRegionUnstruct is used to store a single boundary Region.
+//i.e. including some boundary faces with a same name.
+class UnstructBC : public SimpleBC
+{
+private:
+    //! The faceIndex set store the all face numbers in this boundary region.
+    vector <int> *faceIndex;
+
+    int bcRegionID;
+
+public:
+    vector <int> * GetFaceIndex() const { return this->faceIndex; }
+    void SetFaceIndex(vector<int> *faceIndex) { this->faceIndex = faceIndex; }
+
+
+public:
+    //! copy constructor function of this class.
+    UnstructBC(UnstructBC &bcRegionUnstruct)
+    {
+        SetBCParamDataBase(bcRegionUnstruct.GetBCParamDataBase());
+        SetBCType(bcRegionUnstruct.GetBCType());
+        SetBCName(bcRegionUnstruct.GetBCName());
+        this->bcRegionID = 0;
+        this->faceIndex = NULL;
+    }
+
+    //! constructor function of this class.
+    UnstructBC(int bcRegionID)
+    {
+        this->bcRegionID = bcRegionID;
+        this->faceIndex = new vector<int>;
+    }
+
+    //! destructor function of this class.
+    ~UnstructBC()
+    {
+        faceIndex->clear();
+        delete faceIndex;
+    }
+};
+
+class UnstructBCSet
+{
+private:
+    int key;    //! The bc key, used to store an integer type.
+    string bcName;
+    SimpleBC *boundaryCondition;
+    
+    //! Number of zone (block) index this BC in.
+    int zoneID;
+    
+    //! The BCRegions list in the current UnstructBCSet.
+    vector<UnstructBC *> *bcRegions;
+
+    //! The bcRegions id of boundary condition faces.
+    int *bcRegionIDofBCFace;
+
+public:
+    void SetKey(int key) { this->key = key; }
+    int GetKey() const { return key; }    //! Return the key.
+    const string & GetBCName() const { return this->bcName; }
+    void SetBCName(const string &bcName) { this->bcName = bcName; }
+    void SetBCRegion(uint_t iBCRegion, UnstructBC *unstructBC) { (*bcRegions)[iBCRegion] = unstructBC; }
+    
+    UnstructBC * GetBCRegion(uint_t iBCRegion) const{ return (*bcRegions)[iBCRegion];}
+
+    SimpleBC * GetBoundaryCondition() const;
+    void SetBoundaryCondition(SimpleBC *boundaryCondition) { this->boundaryCondition = boundaryCondition; }
+
+    void CreatenBCRegion(uint_t nBCRegion) {bcRegions = new vector<UnstructBC *>(nBCRegion);}
+    int GetnBCRegion() const {  return static_cast<int>(bcRegions->size()); }
+
+    void SetBCFaceInfo(int* bcRegionIDofBCFace) {this->bcRegionIDofBCFace = bcRegionIDofBCFace;}
+
+    //! Get the bcregion id by interfaceIndexContainerForReceive value.
+    int * GetBCFaceInfo() const {  return this->bcRegionIDofBCFace; }
+
+public:
+    UnstructBCSet(const UnstructBCSet &rhs)
+    {
+        key = rhs.key;
+        bcName = rhs.GetBCName();
+        this->boundaryCondition = rhs.GetBoundaryCondition();
+    }
+    //UnstructBCSet() { key = 0; boundaryCondition = 0; bcRegion = 0; }
+    UnstructBCSet(int zoneID = 0) { this->zoneID = zoneID; bcRegionIDofBCFace = NULL; key = 0; boundaryCondition = 0; bcRegions = 0; }
+  
+    ~UnstructBCSet()
+   {
+       if (bcRegions)
+	   {
+		   for (std::size_t i = 0; i < bcRegions->size(); ++i)
+		   {
+			   delete (*bcRegions)[i];
+		   }
+	   }
+       delete bcRegions;    bcRegions = NULL;
+
+       if (bcRegionIDofBCFace != NULL)
+       {
+           delete bcRegionIDofBCFace;
+           bcRegionIDofBCFace = NULL;
+       } 
+   }
+};
+
+}
\ No newline at end of file
diff --git a/API/Geometry/include/Geo_UnstructGrid.h b/API/Geometry/include/Geo_UnstructGrid.h
new file mode 100644
index 0000000..4a5a0b2
--- /dev/null
+++ b/API/Geometry/include/Geo_UnstructGrid.h
@@ -0,0 +1,1032 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_UnstructGrid.h
+//! @brief     It defines the class 'UnstructGrid', which is type of Unstructured geometry grid.
+//!            The inheriting order is: SimpleGrid->Grid->StructuredGrid/UnstructuredGrid
+//! @author    Bell, He Xin.
+
+#pragma once
+#include "PHHeader.h"
+#include "Geo_Grid.h"
+#include "Geo_CellTopo_Unstruct.h"
+#include "Geo_NodeTopo_Unstruct.h"
+#include "Geo_FaceMetrics_Unstruct.h"
+#include "Geo_FaceTopo_Unstruct.h"
+#include "Geo_CellMetrics_Unstruct.h"
+#include "Geo_DynamicGridMetrics_Unstruct.h"
+#include "Geo_LSQWeight_Unstruct.h"
+#include "Geo_UnstructBC.h"
+#include "Geo_Element.h"
+#include "Geo_LineTopo_Unstruct.h"
+#ifdef USE_WINDOWS_X64
+#include "metis64.h"
+#else
+#include "metis.h"
+#endif
+
+#ifdef USE_INCOMSOLVER
+#include "PHVector3.h"
+#endif
+
+namespace PHSPACE
+{
+class Connectivity
+{
+public:
+    int *data;
+    int *index;
+    int n;
+public:
+    Connectivity();
+    ~Connectivity();
+};
+
+class UnstructBCSet;
+class UnstructBC;
+class VirtualFile;
+class OversetConfig;
+class GridManager;
+
+class UnstructGrid : public Grid
+{
+private:
+    //! The boundary condition list.\n
+    //! Each face has a Boundary Condition Record.
+    UnstructBCSet **bcr;
+
+    UnstructBCSet *unstructBCSet;
+
+    //! The volume condition list, without using at the moment.\n
+    //UnstructBCSet **vcr;
+
+    //! Unstructured node topology information:\n
+    //! Defines the node-face, node-cell, node-node \n
+    //! connected relationship of unstructured grid.
+    //! 1: cells index list of each node.
+    Geo_NodeTopo_Unstruct *nodeTopology;
+
+    //! Unstructured face topology information:\n
+    //! Defines the face-node connected relationship of unstructured grid.\n
+    //! 1: right and left cell of each face.\n
+    //! 2: nodes list of each face.
+    Geo_FaceTopo_Unstruct *faceTopology;
+
+    Geo_LineTopo_Unstruct *lineTopology;
+
+    //! Unstructured cell topology information:\n
+    //! Defines the cell-face, cell-node connected relationship of unstructured grid.\n
+    //! 1: faces of each cell.\n
+    //! 2: nodes of each cell.\n
+    //! 3: neighbor cells of each cell.
+    Geo_CellTopo_Unstruct *cellTopology;
+
+    //! Unstructured face metrics information:\n
+    //! Defines the face metrics of unstructured grid.\n
+    //! 1: face center.\n
+    //! 2: face normal.\n
+    //! 3: face area.
+    Geo_FaceMetrics_Unstruct *faceMetrics;
+
+    //! Unstructured cell metrics information:\n
+    //! Defines the cell metrics of unstructured grid.\n
+    //! 1: cell center.\n
+    //! 2: cell volume.
+    Geo_CellMetrics_Unstruct *cellMetrics;
+
+    //! Unstructured dynamic grid metrics information:\n
+    //! Defines dynamic mesh metrics of unstructured grid.\n
+    //! 1: face normal velocity.\n
+    //! 2: face velocity.
+    Geo_DynamicGridMetrics_Unstruct *dynamicGridMetrics;
+
+    //! Least Square Weight of unstructured grid.\n
+    Geo_LSQWeight_Unstruct *leastSquareWeights;
+
+    //! Connection of cell index to coarse cell index.\n
+    //! For multi-grid method, the original finest grid is coarsen,
+    //! so, each cell belongs to a coarse cell on the coarse level.
+    int *cell2coarsegridcell;
+
+    //! for multizone rotating reference frame.
+    RDouble *PeriodicRotationAngle;
+
+    //! There are two cells for each cell face.\n
+    //! fc2cL: the order of the right cell on the neighbor cell list.
+    //! fc2cR: the order of the left  cell on the neighbor cell list.
+    int *fc2cL, *fc2cR;
+
+    //! Wall distance: the nearest distance of a cell to the wall.
+    RDouble *walldist;
+
+    //! Nearest wall face normal: the normal direction of the wall face nearest to a cell .
+    RDouble *nearestwallfacenormalx;
+    RDouble *nearestwallfacenormaly;
+    RDouble *nearestwallfacenormalz;
+
+    //! Wall distance: the nearest distance of a node to the wall.
+    RDouble *walldistNode;
+
+    RDouble *normalDistanceC2C;
+
+    //! the label for first layer cell of the wall boundary.
+    int *wallCellLabel;
+
+    //! Cell to cell connectivity, used in over-set unstructured grid ONLY.
+    Connectivity *cell2cell_connectivity;
+
+    //! Some special variables for Laplacian-ggnode reconstruction
+    RDouble *lamdax, *lamday, *lamdaz;
+    int *knode;
+
+    //! A lable to judge if the cell is in the over-set zone.\n
+    //! For over-set grid method only.
+    int *iBlank;
+
+    //! A lable to judge if the point is boundary point .\n;
+    //! if point i is boundary point, boundaryPointLabel[i] = 1; else boundaryPointLabel[i] = 0;
+    //! if point j is interpoint but not boundary point, boundaryPointLabel[j] = 0;
+    map <int, int> boundaryPointLabel;
+
+    //! Boundary condition type array.
+    vector< int > boundaryConditionType;
+
+    vector< int > localToGlobalNodesMap;
+
+    vector< RDouble > nodeWalldistDistance;
+
+    vector< RDouble > nodeWalldistDistanceInOtherBlock;
+    OversetConfig *oversetConfig;
+
+    //! Average volume of all mesh.
+    RDouble averageVolume;
+
+    GridManager *gridManager;
+    //! Probes' cell index of current zone grid.
+    vector <int> zoneProbesCellID;
+    
+    // GMRES CSR format Jacobian matrix, AI and AJ GMRESCSR
+    vector<int> JacobianAI;
+    vector<int> JacobianAJ;
+   
+    //! GMRESParallel
+    vector<int> JacobianAK;
+   
+    // GMRESJac1st CSR format Jacobian matrix, AI and AJ, this is for 1storder-Jacobian precond
+    vector<int> JacobianAI1st;
+    vector<int> JacobianAJ1st;
+    int JacOrder;
+
+    //! GMRESParallel
+    int globalCellIndexShift;
+
+    int blockSizeOfJacobianMatrix; //! GMRESCoupled
+
+    // GMRES2ndCorrection
+    vector<int> BCLeftCells;
+    vector<int> BCRightCells;
+    vector<int> BCFaces;
+
+public:
+
+#ifdef USE_INCOMSOLVER
+    //! This is values for SIMPLE algorithm.
+    //! cellCenterVector container the three coordinates of the cells center. 
+    Vector3D *cellCenterVector;
+
+    //! faceNormalVector container the three units of the face normal directions. 
+    Vector3D *faceNormalVector;
+
+    int* localCell2GlobalMap;
+
+    int* localCell2LocalMap;
+    int* cell2ZoneIDMap;
+
+#endif
+
+    //! Ordinary grid information.
+    int ordinaryGridIndex;
+    int *ordinaryNodeIndex;
+    int *ordinaryFaceIndex;
+    int *ordinaryCellIndex;
+
+public:
+    LIB_EXPORT UnstructGrid();
+    LIB_EXPORT ~UnstructGrid();
+
+public:
+    GridManager * GetGridManager();
+    //! Set the boundary condition records.
+    void SetBCRecord(UnstructBCSet **bcr);
+
+    //! Set the boundary condition region.
+    void SetUnstructBCSet(UnstructBCSet* unstructBCSet);
+
+    //! Set the left cell list of each face.
+    void SetLeftCellOfFace(int *left_cell_of_face_in);
+
+    //! Set the right cell list of each face.
+    void SetRightCellOfFace(int *right_cell_of_face_in); 
+
+    //! Set the number of nodes per face.
+    void SetNodeNumberOfEachFace(int *node_number_of_each_face);
+
+    //! Set the face to node, node index of each face.
+    void SetFace2Node(int *face2node);
+
+    //! Set each face's starting subscript in the face2node array.
+    void SetFace2NodeSubscript(long long int *face2nodeSubscript);
+
+    //! Set the Connection of cell index to coarse cell index.
+    void SetCell2CoarseGridCell(int *cell2coarsegridcell);
+
+    //! set the number of lines.
+    void SetLI_nLine(int nLine);
+
+#ifdef USE_GMRESSOLVER
+    //! GMRESCoupled set the block size of Jacobian Matrix
+    void SetBlockSizeOfJacobianMatrix(int blockSizeOfJacobianMatrix) { this->blockSizeOfJacobianMatrix = blockSizeOfJacobianMatrix; }
+
+    //! GMRESCoupled get the block size of Jacobian Matrix
+    int GetBlockSizeOfJacobianMatrix() const { return this->blockSizeOfJacobianMatrix; }
+
+    //! GMRES set the CSR format Jacobian matrix AI
+    void SetJacobianAI4GMRES(vector<int> JacobianAI) { this->JacobianAI = JacobianAI; }
+
+    //! GMRES set the CSR format Jacobian matrix AJ
+    void SetJacobianAJ4GMRES(vector<int> JacobianAJ) { this->JacobianAJ = JacobianAJ; }
+
+    //! GMRES set the CSR format Jacobian matrix AK
+    //! GMRESParallel
+    void SetJacobianAK4GMRES(vector<int> JacobianAK) { this->JacobianAK = JacobianAK; }
+
+    //! GMRES get the CSR format Jacobian matrix AI
+    vector<int> GetJacobianAI4GMRES() const { return this->JacobianAI; }
+
+    //! GMRES get the CSR format Jacobian matrix AJ
+    vector<int> GetJacobianAJ4GMRES() const { return this->JacobianAJ; }
+
+    //! GMRES get the CSR format Jacobian matrix AK
+    //! GMRESParallel
+    vector<int> GetJacobianAK4GMRES() const { return this->JacobianAK; }
+
+    //! GMRESJac1st set the CSR format Jacobian matrix AI1st
+    void SetJacobianAI1st4GMRES(vector<int> JacobianAI1st) { this->JacobianAI1st = JacobianAI1st; }
+
+    //! GMRESJac1st set the CSR format Jacobian matrix AJ1st
+    void SetJacobianAJ1st4GMRES(vector<int> JacobianAJ1st) { this->JacobianAJ1st = JacobianAJ1st; }
+
+    //! GMRESJac1st set the JacobianOrder
+    void SetJacobianOrder(int JacOrder) {this->JacOrder = JacOrder;}
+
+    //! GMRESJac1st get the CSR format Jacobian matrix AI
+    vector<int> GetJacobianAI1st4GMRES() const { return this->JacobianAI1st; }
+
+    //! GMRESJac1st get the CSR format Jacobian matrix AJ
+    vector<int> GetJacobianAJ1st4GMRES() const { return this->JacobianAJ1st; }
+
+    //! GMRESJac1st get the JacobianOrder
+    int GetJacobianOrder() {return this->JacOrder;}
+
+    //! GMRESParallel
+    //! set cell index shift
+    void SetGlobalCellIndexShift(int shift) { this->globalCellIndexShift = shift; }
+
+    //! get cell index shift
+    int GetGlobalCellIndexShift() const { return this->globalCellIndexShift; }
+
+    // GMRES2ndCorrection
+    // ! GMRES set the left cells at the boundary face
+    void SetBCLeftCells(vector<int> BCLeftCells) { this->BCLeftCells = BCLeftCells; }
+
+    // ! GMRES set the right cells at the boundary face
+    void SetBCRightCells(vector<int> BCRightCells) { this->BCRightCells = BCRightCells; }
+
+    // ! GMRES set the boundary faces
+    void SetBCFaces(vector<int> BCFaces) { this->BCFaces = BCFaces; }
+
+    // ! GMRES get the left cells at the boundary face
+    vector<int> GetBCLeftCells() { return this->BCLeftCells; }
+
+    // ! GMRES get the right cells at the boundary face
+    vector<int> GetBCRightCells() { return this->BCRightCells; }
+
+    // ! GMRES get the boundary faces
+    vector<int> GetBCFaces() { return this->BCFaces; }
+#endif
+
+    //! set the number of cells in all lines.
+    void SetLI_nCellsInLine(int *nCellsInLines);
+
+    //! set the cell No. of all lines.
+    void SetLI_CellOfLine(int **CellOfLine);
+
+    //! set the face No. of all lines.
+    void SetLI_FaceOfLine(int **FaceOfLine);
+
+    //! set the line No. of all cells.
+    void SetLI_LineOfCell(int *LineOfCell);
+
+    //! Set the order of the right cell on the neighbor cell list.
+    void Setfc2cL(int *fc2cL);
+
+    //! Set the order of the left  cell on the neighbor cell list.
+    void Setfc2cR(int *fc2cR);
+
+    void SetBlankIndex(int *iBlank);
+
+    //! Set the probes cell index of each zone grid.
+    void SetZoneProbesCellID(vector <int> zoneProbesCellID);
+
+    //! Return the boundary condition records.
+    UnstructBCSet ** GetBCRecord() const;
+    
+    //! Create composite boundary condition region (allocate memory for structBCSet).
+    LIB_EXPORT void CreateUnstructBCSet(int nBCRegion);
+
+    //! Return composite boundary condition region pointer (structBCSet).
+    UnstructBCSet * GetUnstructBCSet() const;
+   
+    RDouble * GetNormalDistanceOfC2C() const;
+
+
+    vector <int> & GetBoundaryConditionType();
+
+    vector <int> & GetLocalToGlobalNodesMap();
+
+    //! Get the left cell list of each face.
+    int * GetLeftCellOfFace() const;
+
+    //! Get the right cell list of each face.
+    int * GetRightCellOfFace() const;
+
+    //! Get the number of nodes per face.
+    int * GetNodeNumberOfEachFace() const;
+
+    //! Get the face to node, node index of each face.
+    int * GetFace2Node() const;
+
+    //! Return the X pointer of face center.
+    RDouble * GetFaceCenterX() const;
+
+    //! Return the Y pointer of face center.
+    RDouble * GetFaceCenterY() const;
+
+    //! Return the Z pointer of face center.
+    RDouble * GetFaceCenterZ() const;
+
+    //! Return the X pointer of face UNIT normal.
+    RDouble * GetFaceNormalX() const;
+
+    //! Return the Y pointer of face UNIT normal.
+    RDouble * GetFaceNormalY() const;
+
+    //! Return the Z pointer of face UNIT normal.
+    RDouble * GetFaceNormalZ() const;
+
+    //! Return the face area.
+    RDouble * GetFaceArea()    const;
+
+    //! Return the X pointer of cell center.
+    RDouble * GetCellCenterX() const;
+
+    //! Return the Y pointer of cell center.
+    RDouble * GetCellCenterY() const;
+
+    //! Return the Z pointer of cell center.
+    RDouble * GetCellCenterZ() const;
+
+    //! Return the cell volume pointer.
+    RDouble * GetCellVolume()  const;
+
+    //! Return the X velocity pointer of face center.
+    RDouble * GetFaceVelocityX() const;
+
+    //! Return the Y velocity pointer of face center.
+    RDouble * GetFaceVelocityY() const;
+
+    //! Return the Z velocity pointer of face center.
+    RDouble * GetFaceVelocityZ() const;
+
+    //! Return the face normal velocity pointer.
+    RDouble * GetFaceNormalVelocity() const;
+
+    //! Return the cell volume of the last time step.
+    RDouble * GetCellVolumeOld() const;
+
+    //! Return the connection of cell index to coarse cell index.
+    int * GetCell2CoarseGridCell() const;
+
+    //! Return the order of the right cell on the neighbor cell list.
+    int * Getfc2cL() const;
+
+    //! Return the order of the left cell on the neighbor cell list.
+    int * Getfc2cR() const;
+
+    LIB_EXPORT void InitGrid(GridID *index, int level, int dim, int type);
+
+    //! Get the Number of faces per cell.
+    LIB_EXPORT int * GetFaceNumberOfEachCell();
+
+    //! Get the cell to face: face index of each cell.
+    LIB_EXPORT int ** GetCell2Face();
+
+    //! Get Number of nodes per cell.
+    LIB_EXPORT int * GetNodeNumberOfEachCell();
+
+    LIB_EXPORT Geo_CellTopo_Unstruct * GetCellTopology() { return cellTopology; }
+
+    LIB_EXPORT Geo_LineTopo_Unstruct * GetLineTopology() { return lineTopology; }
+
+    LIB_EXPORT bool ExistCell2Node();
+
+    //! Get the cell to node: node index of each cell.
+    LIB_EXPORT int * GetCell2Node();
+    //! Get the cell to node: node index of each cell.
+    LIB_EXPORT int ** GetCell2NodeArray();
+
+    //! Get the face to node, node index of each face.
+    LIB_EXPORT int ** GetFace2NodeArray();
+
+    //! Get each face's starting subscript in the face2node array.
+    LIB_EXPORT long long int * GetFace2NodeSubscript();
+
+    //! get the number of lines.
+    int GetLI_nLine() const;
+
+    //! get the number of cells in all lines.
+    int* GetLI_nCellsInLine() const;
+
+    //! get the cell No. of all lines.
+    int** GetLI_CellOfLine() const;
+
+    //! get the face No. of all lines.
+    int** GetLI_FaceOfLine() const;
+
+    //! get the line No. of all cells.
+    int* GetLI_LineOfCell() const;
+
+    //! Get the cell to node: node index of each cell.
+    LIB_EXPORT bool IsCell2NodeExist();
+
+    //! Get Number of neighbor cells per cell.
+    LIB_EXPORT int * GetNumberOfNeighborCell();
+
+    //! Get the Cell to cell: neighbor cell index of each cell.
+    LIB_EXPORT vector<int> * GetCell2Cell();
+
+#ifdef USE_GMRESSOLVER
+   // GMRESVis
+    //! Get the neighbor cell index of each cell.
+    LIB_EXPORT vector<int> * GMRESGetNeighborCells();
+
+    // GMRESVis
+    //! Get the neighbor face index of each cell.
+    LIB_EXPORT vector<int> * GMRESGetNeighborFaces();
+
+    // GMRESVis
+    //! Judge left or right.
+    LIB_EXPORT vector<int> * GMRESGetNeighborLR();
+
+    // GMRESVis
+    void ComputeNeighborinfo();
+#endif
+
+    //! Get the cell to cell connectivity, used in over-set unstructured grid ONLY.
+    LIB_EXPORT Connectivity * GetCell2CellConnectivity();
+
+    //! Get the Number of connected cell per node.
+    LIB_EXPORT int * GetCellNumberOfEachNode();
+
+    //! Get Node to cell: connected cells index of per node.
+    LIB_EXPORT int * GetNode2Cell();
+
+    //! Get two-dimensional array of Node to cell connectivity.
+    LIB_EXPORT int ** GetNode2CellArray();
+
+    //! Compute the minimum distance of the grid edges.
+    LIB_EXPORT RDouble CalMinEdgeLength();
+
+    //! Compute the maximum distance of the grid edges.
+    LIB_EXPORT RDouble CalMaxEdgeLength();
+
+    //! Reset the left&&right cell index to -1 on BC faces.
+    LIB_EXPORT void ReSpecifyBC();
+
+    //! Get the largest local grid length, distance of neighbor cell centers.
+    LIB_EXPORT RDouble * GetLargestLocalGridLength();
+
+    //! Get the sub-grid length, used for DES simulation ONLY.
+    LIB_EXPORT RDouble * GetSubgridLength();
+
+    //! Get the boundary point label used for judge the point type.
+    //! @param[out] boundaryPointLabel    the boundary point.\n.
+    map<int,int> & GetBoundaryPointLabel();
+
+    //! compute the boundary point label used for judge the point type.
+    void computeBoundaryPointLabel();
+
+    //! Set the cell to node: node index of each cell.
+    void SetCell2Node(int *cell2node);
+
+    //! Set the number of nodes in each cell.
+    void SetNodeNumberOfEachCell(int *node_number_of_each_cell);
+
+    //! Get the number of nodes in each cell.
+    int * GetNodeNumberOfEachCell() const;
+
+    //! Set the least square weights.
+    void SetLeastSquareIWT(RDouble *iwt);
+
+    //! Set the least square weights IXX.
+    void SetLeastSquareIXX(RDouble *ixx);
+
+    //! Set the least square weights IYY.
+    void SetLeastSquareIYY(RDouble *iyy);
+
+    //! Set the least square weights IZZ.
+    void SetLeastSquareIZZ(RDouble *izz);
+
+    //! Set the least square weights IXY.
+    void SetLeastSquareIXY(RDouble *ixy);
+
+    //! Set the least square weights IXZ.
+    void SetLeastSquareIXZ(RDouble *ixz);
+
+    //! Set the least square weights IYZ.
+    void SetLeastSquareIYZ(RDouble *iyz);
+
+    //! Set the face mark of the least square method.
+    void SetFaceMark(char *fMark);
+
+    //! Return the least square weights.
+    RDouble * GetLeastSquareIWT() const;
+
+    //! Return the least square weights IXX.
+    RDouble * GetLeastSquareIXX() const;
+
+    //! Return the least square weights IYY.
+    RDouble * GetLeastSquareIYY() const;
+
+    //! Return the least square weights IZZ.
+    RDouble * GetLeastSquareIZZ() const;
+
+    //! Return the least square weights IXY.
+    RDouble * GetLeastSquareIXY() const;
+
+    //! Return the least square weights IXZ.
+    RDouble * GetLeastSquareIXZ() const;
+
+    //! Return the least square weights IYZ.
+    RDouble * GetLeastSquareIYZ() const;
+
+    //! Return the face mark of the least square method.
+    char * GetFaceMark() const;
+
+    //! Return the wall distance: the nearest distance of a cell to the wall.
+    RDouble * GetWallDist() const;
+
+    //! Return the nearest wall face normal x: the normal x of the wall face nearest to a cell.
+    RDouble * GetNearestWallFaceNormalX() const;
+
+    //! Return the nearest wall face normal y: the normal y of the wall face nearest to a cell.
+    RDouble * GetNearestWallFaceNormalY() const;
+
+    //! Return the nearest wall face normal z: the normal z of the wall face nearest to a cell.
+    RDouble * GetNearestWallFaceNormalZ() const;
+
+    //! Return the wall distance: the nearest distance of a node to the wall.
+    RDouble* GetWallDistNode() const;
+
+    //! Return the wall cell label for the first layer of wall boundary. 
+    int * GetWallCellLabel();
+
+    void InitWallDist();
+
+    vector< RDouble > & GetNodeWallDist();
+
+    vector< RDouble > & GetNodeWallDistInOtherBlock();
+    //! Computes and returns the number of faces on the solid wall.
+    int GetNumberOfWallCell();
+
+    //! Get the probes cell index of each zone grid.
+    vector <int> GetZoneProbesCellID() const;
+
+    int * GetBlankIndex() const;
+
+    RDouble * GetLamdax() const;
+
+    RDouble * GetLamday() const;
+
+    RDouble * GetLamdaz() const;
+
+    int * Getknode() const; 
+
+    RDouble * GetVolume(int istep = 0) const;
+
+    //! Find out the points that lie on the solid wall.
+    LIB_EXPORT void FindOutWallPoints(bool *isWallPoint, int &nWallPoints);
+
+    //! Find out the faces that lie on the solid wall.
+    LIB_EXPORT void FindOutWallFaces(bool *isWallFace, int &nWallFaces);
+
+    //! Static the mesh skewness.\n
+    //! Skewness, 0 represents bad mesh quality; 1 represents satisfactory quality.
+    //! Generally, the minimum skewness must be greater than 0.001.
+    LIB_EXPORT RDouble SkewnessSummary(ActionKey *actkey = 0);
+
+    //! Write face boundary condition to file stream.
+    LIB_EXPORT void WriteFaceBC(fstream &file);
+
+    //! Allocate iBlank for unstructured grid.
+    LIB_EXPORT void AllocateOversetGrid();
+
+    //! Allocate overset storage for donor cells and inter cells.
+    LIB_EXPORT void RegisterOversetField(const string &name, const int type, const int dimesion);
+
+    //! Set the average volume.
+    void SetAverageVolume(RDouble Rin);
+
+    //! Get the average volume.
+    LIB_EXPORT RDouble GetAverageVolume();
+
+    void GetSourceIndex(int iFace, int ipos, int &s);
+    void GetTargetIndex(int iFace, int ipos, int &t);
+
+    //! Return the global point number map to the interpoint for send.
+    //! @param[in] ipoint : the interpoint number.
+    //! @param[in] ipos : the number of ghost cell layers.
+    //! @param[out] s :the global point number
+    void GetSourcePointIndex(int ipoint, int ipos, int &s);
+
+    //! Return the global point number map to the interpoint for receive.
+    //! @param[in] ipoint : the interpoint number.
+    //! @param[in] ipos : the number of ghost cell layers.
+    //! @param[out] s :the global point number
+    void GetTargetPointIndex(int ipoint, int ipos, int &s);
+
+    void Action(ActionKey *actkey);
+    void TranslateAction(ActionKey *actkey);
+    streamsize TranslateActionLength(ActionKey *actkey);
+
+    void SetGhostCellExceptInterface(RDouble *f);
+    void SetGhostCell(RDouble *f);
+    void SetGhostCell(RDouble **f, const int &nVariables);
+    void SetGhostCell(RDouble *f, RDouble value);
+
+    void AllocateWalldist();
+
+    void SpecifyRightCellofBC();
+
+    //! Return the gradient computed by ggnode.
+    //! @param[in] qnode : the flow value on the point.
+    //! @param[out] dqdx/dqdy/dqdz :the gradient value in three direction.
+    void CompGradientGGNode_NEW(RDouble *q, RDouble *qnode, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+    void CompGradientGGNodeWeight(RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+    void CompGradientGGCell(RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, int setting = 0);
+    void CompGradientGGCell2(RDouble *q, RDouble *wfL, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+    void CompGradientGGModified2(RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+    void CompGradientGGCellNew(RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+    void CompGradientGGCellW(RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+    void CompGradientLSQ   (RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+    void CompGradientGGNode(RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+
+    void CompGradient(RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+
+    void CalcLaplacianWeitht();
+    void FaceWeight(RDouble *deltl, RDouble *deltr, int nst, int ned);
+    void CVGNorm(FieldProxy *q_1_proxy, FieldProxy *q_0_proxy, int neqn, RDouble &norm);
+
+    void ComputeWeight();
+
+    //! Compute node bctype in each zone.
+    LIB_EXPORT void ComputeNodeBCType();
+
+    void GetMinMaxDS(RDouble &dismin, RDouble &dismax);
+    void GetBoundaryMinMax(RDouble *pmin, RDouble *pmax);
+
+    // calculate the normal distance between two neighbor cells.
+    LIB_EXPORT void CalNormalDistanceOfC2C();
+    void ReadGrid(fstream &file);
+    void ReadGrid(VirtualFile *vfile);
+    LIB_EXPORT void WriteGrid(fstream &file);
+    void WriteGrid(VirtualFile *vfile);
+
+    void Output(const string &fileName);
+
+    void Decode(DataContainer *cdata, int flag);
+
+    //! Revise the zone index of neighbor zones.
+    void ReviseNeighborZoneIndex(int zoneStart);
+
+    void DecodeOversetGrid(DataContainer *cdata);
+    void DecodeCellNode(DataContainer *cdata);
+
+    //! Return the interpoint information from the DataContainer.
+    void DecodeInterpointInfo(DataContainer *cdata);
+
+    void DecodeWallDist(DataContainer *cdata);
+    void DecodeBCFace(DataContainer *cdata);
+    void Encode(DataContainer *cdata, int flag);
+    void EncodeGrid(DataContainer *cdata);
+    void EncodeOversetGrid(DataContainer *cdata);
+
+    void UpdateCoordinate(DataContainer *cdata);
+
+    void DXDYDZ(RDouble *f, int ie, RDouble &dfdx, RDouble &dfdy, RDouble &dfdz);
+    void DXDYDZ(RDouble *f, int ie, int **cell2face, int *face_number_of_each_cell, RDouble &dfdx, RDouble &dfdy, RDouble &dfdz);
+    void DXDYDZ_Face(RDouble *f, int iFace, int nodepos, RDouble fl, RDouble fr, RDouble &dfdx, RDouble &dfdy, RDouble &dfdz);
+    void DXDYDZ_GG (RDouble *f, int ie, RDouble &dfdx, RDouble &dfdy, RDouble &dfdz);
+    void DXDYDZ_LSQ(RDouble *f, int ie, RDouble &dfdx, RDouble &dfdy, RDouble &dfdz);
+
+    void ComputeMetrics(ActionKey *actkey = 0);
+
+    LIB_EXPORT void CoarseGrids(int maxLevel);
+    void BuildGridLink(LinkStruct *link);
+    void CalCNNCF();
+    void ChangeBCType(int from_bctype, int to_bctype);
+    void CompareMaxMinValue(RDouble &local_data, int flag);
+    void ProcessBCInfo();
+    void SetLnkInfo() {};
+    void GridSurfaceVelocity(RDouble *xt, RDouble *yt, RDouble *zt);
+
+    LIB_EXPORT void ComputeGridFaceVelocity();
+
+    LIB_EXPORT void BackUpOldGrid();
+
+    void ReSetBoundaryConditionByGlobalBC();
+
+    void SetOversetConfig(OversetConfig *oversetConfig);
+
+    void AllocateMetrics(ActionKey *actkey);
+    void AllocateMetricsALE(ActionKey *actkey);
+
+    void GetBcNamePair(set< pair<int, string> > &bcNamePairSet);
+    void DumpWallFaceCenter(ActionKey *actkey);
+    void InitVariableWallTemperature();
+    void GetCellIBlank(ActionKey *actkey);
+    void TranslateCellIBlank(ActionKey *actkey);
+    streamsize TranslateCellIBlankLength(ActionKey *actkey);
+
+    void SetOrdinaryGridIndex(int ordinaryGridIndexIn);
+    void SetOrdinaryNodeIndex(int *ordinaryNodeIndexIn);
+    void SetOrdinaryFaceIndex(int *ordinaryFaceIndexIn);
+    void SetOrdinaryCellIndex(int *ordinaryCellIndexIn);
+    int  GetOrdinaryGridIndex();
+    int *GetOrdinaryNodeIndex();
+    int *GetOrdinaryFaceIndex();
+    int *GetOrdinaryCellIndex();
+
+    void CompressSpecificArrayToInterface(DataContainer *&dataContainer, const string &fieldName, const int &neighborZoneIndex, const int &neqn);
+    void DecompressArrayFromInterface(DataContainer *&dataContainer, const string &fieldName, const int &neighborZoneIndex, const int &neqn);
+
+    int  CompNIFace();
+
+private:
+    bool ComputeCellNodeTopo();
+    void ComputeCell2NodeArray();
+    void ComputeCell2Node();
+    void ComputeCell2Node(set<int> *&cell2node_set);
+    void ComputeCell2Face();
+    void ComputeFace2NodeArray();
+    void ComputeFace2NodeSubscript();
+    void ComputeNumberOfNeighborCell();
+    void ComputeCell2Cell();
+    void ComputeCell2CellConnectivity();
+    void ComputeNode2Cell();
+    void ComputeNode2CellArray();
+
+    void ComputeLargestLocalGridLength();
+    void ComputeSubgridLength();
+
+    void DumpWalldist(ActionKey *actkey);
+    void ReadWalldist(RDouble *wallDistIn);
+    void ReadNearestwallfacenormalx(RDouble* nearestwallfaceNormalxIn);
+    void ReadNearestwallfacenormaly(RDouble* nearestwallfaceNormalyIn);
+    void ReadNearestwallfacenormalz(RDouble* nearestwallfaceNormalzIn);
+
+    void GetCellCenter(ActionKey *actkey);
+    void TranslateCellCenter(ActionKey *actkey);
+    streamsize TranslateCellCenterLength(ActionKey *actkey);
+
+    void SimpleAction(ActionKey *actkey);
+    void UpdateVolold();
+    void ClosureCheck(RDouble *xfn, RDouble *area);
+
+    void CompFaceGradient(RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+    void CompFaceGradientGauss2D(RDouble *q, RDouble *qn, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+    void CompFaceGradientGauss  (RDouble *q, RDouble *qn, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+
+    void ReadMovingGrid();
+    void DecodeGrid(DataContainer *cdata);
+
+    void ComputeFaceNormal2D();
+    void ComputeFaceNormal3D();
+    void ComputeFaceNormal3DNew();
+
+    void ComputeFaceCenter2D(ActionKey *actkey);
+    void ComputeFaceCenter3D(ActionKey *actkey);
+    void ComputeFaceCenter3DNew(ActionKey *actkey);
+
+    void ComputeCellCenterVol2D(ActionKey *actkey);
+    void ComputeCellCenterVol3D(ActionKey *actkey);
+    void ComputeCellCenterVol3DNew(ActionKey *actkey);
+    
+    void ComputeFaceCenterAreaNormal3DNew2(ActionKey *actkey);
+    void ComputeCellCenterVol3DNew2(ActionKey *actkey);
+
+    /**
+     * @brief  calcu cell face type and face node of every cell
+     * @param  icel: cell index
+     * @param  cell_vtx_edge: face node of two dimension
+     * @param  cell_vtx_tria: face node of tria when three dimension
+     * @param  cell_vtx_quad: face node of quad when three dimension
+     * @return ElementType: element type of cell
+     */
+    ElementType CellFaceVertex(int icel, int *cell_vtx_edge, int *cell_vtx_tria, int *cell_vtx_quad);
+
+    /**
+     * @brief  hexa cell node
+     * @param  cell_vtx_quad: quad face node
+     * @param  cell_vtx_hexa: hexa face node container
+     * @return int: return symbol
+     */
+    int nodal_from_cel_hexa(const int *cell_vtx_quad, int *cell_vtx_hexa);
+
+    /**
+     * @brief  prism cell node 
+     * @param  cell_vtx_tria: tria face node
+     * @param  cell_vtx_quad: quad face node
+     * @param  cell_vtx_prism: prism face node container
+     * @return int: return symbol
+     */
+    int nodal_from_cel_prism(const int *cell_vtx_tria, const int *cell_vtx_quad, int *cell_vtx_prism);
+
+    /**
+     * @brief  pyram cell node
+     * @param  cell_vtx_tria: tria face node
+     * @param  cell_vtx_quad: quad face node
+     * @param  cell_vtx_pyram: pyram face node container
+     * @return int: return symbol
+     */
+    int nodal_from_cel_pyram(const int *cell_vtx_tria, const int *cell_vtx_quad, int *cell_vtx_pyram);
+
+    /**
+     * @brief  tetra cell node
+     * @param  cell_vtx_tria: tria face node
+     * @param  cell_vtx_tetra: tetra face node container
+     * @return int: return symbol
+     */
+    int nodal_from_cel_tetra(const int *cell_vtx_tria, int *cell_vtx_tetra);
+
+    /**
+     * @brief  quad face node
+     * @param  cell_vtx_edge: face node of two dimension
+     * @param  cell_vtx_quad: quad face node container
+     * @return int: return symbol
+     */
+    int nodal_from_face_quad(const int *cell_vtx_edge, int *cell_vtx_quad);
+
+    /**
+     * @brief  tria face node
+     * @param  cell_vtx_edge: face node of two dimension
+     * @param  cell_vtx_tria: tria face node container
+     * @return int: return symbol
+     */
+    int nodal_from_face_tria(const int *cell_vtx_edge, int *cell_vtx_tria);
+
+public:
+#ifdef USE_INCOMSOLVER
+    //! This is function for SIMPLE algorithm.
+    Vector3D * GetCellCenterVector() const;
+    Vector3D * GetFaceNormalVector() const;
+    void SetCellCenterVector(Vector3D *cellC);
+    void SetFaceNormalVector(Vector3D* faceN);
+    void SetLocalCell2GlobalMap(int* localCell2GlobalMap);
+    void SetLocalCell2LocalMap(int* localCell2LocalMap);
+    void SetCell2ZoneIDMap(int *cell2ZoneIDMap);
+    int *GetLocalCell2GlobalMap() const;
+    int *GetLocalCell2LocalMap() const;
+    int *GetCell2ZoneIDMap() const; 
+   
+#endif
+};
+
+#include "Geo_UnstructGrid.hxx"
+
+void CoarseGridConnectUNMergeFace(UnstructGrid *fgrid, UnstructGrid *cgrid);
+
+int PickOutBadSkewnessFaces(UnstructGrid *grid, bool *isBadFace = 0, bool *isBadCell = 0);
+
+void FieldVisualization(Grid *grid_in, std::ostringstream &oss, vector<string> &title, RDouble **qn, int nl);
+void FieldVisualizationForVTK(Grid *grid_in, std::ostringstream &oss, vector<string> &title, RDouble **qn, int nl);
+void SaveDataForTecio_bac(Grid *grid_in, ActionKey *actkey, RDouble **qn, int nl);
+void SaveDataForTecio(Grid *grid_in, ActionKey *actkey, RDouble **qn, int nl);
+
+void CompNodeVarWeight(UnstructGrid *grid, RDouble *q_n, RDouble *q);
+void CompNodeVar(UnstructGrid *grid, RDouble *q_n, RDouble *q, bool isVelocityForPostVisual = false);
+void CompNodeVar_new(UnstructGrid *grid, RDouble *q_n, RDouble *q);
+void CompNodeVarForVisual(UnstructGrid *grid, RDouble *q_n, RDouble *q);
+void CompNodeVarForVelocity(UnstructGrid *grid, RDouble *qNode, RDouble *q);
+void ComputeNodeVariable(UnstructGrid *grid, RDouble **q_n, RDouble **q, int nEquation);
+void FixBCNodeVar(UnstructGrid* grid, RDouble* q, RDouble* q_n, int* n_count, int bctype_in, bool twoside);
+void FixBCNodeVar(UnstructGrid *grid, RDouble *q, RDouble *q_n, RDouble *n_count, int bctype_in, bool twoside);
+void CompNodeVarLimit(UnstructGrid *grid, RDouble *q_n, RDouble *q);
+
+void GetFace2NodeList(UnstructGrid *grid, pair<int, string> iter, vector<int> &linkmap, vector < vector < int > > &face2nodelist);
+void GetFace2NodeList(UnstructGrid *grid, int bcType, vector<int> &linkmap, vector < vector < int > > &face2nodelist);
+
+void MinMaxDiffINF(Grid *grid_in, int ig, RDouble *dmin, RDouble *dmax, RDouble *q);
+
+//! Communicate the interface variables at the boundary faces between different zones.
+//! @param[in] grid              computational mesh.
+//! @param[in] variable          variable pointer of which need to be communicated.
+//! @param[in] variableName      variable name of which need to be communicated.
+//! @param[in] variableDimension variable dimension of which need to be communicated.
+//! -# 1 :  1-D array.
+//! -# 2 :  2-D array.
+//! -# n :  n-D array.
+void CommunicateInterfaceValue(UnstructGrid *grid, RDouble **variable, const string &variableName, int variableDimension);
+void CommunicateInterfaceValue(UnstructGrid *grid, RDouble *variable, const string &variableName);
+
+//! Communicate the interpoint variables at the interface between different zones.
+//! @param[in] grid                computational mesh.
+//! @param[in] variable            variable pointer of which need to be communicated.
+//! @param[in] variableName        variable name of which need to be communicated.
+//! @param[in] variableDimension   variable dimension of which need to be communicated.
+//! -# 1 :  1-D array.
+//! -# 2 :  2-D array.
+//! -# n :  n-D array.
+void CommunicateInterpointValue(UnstructGrid *grid, RDouble **variable, const string &variableName, int variableDimension);
+
+void UploadInterfaceValue(UnstructGrid *grid, RDouble **f, const string &name, int neqn);
+void UploadInterfaceValue(UnstructGrid *grid, RDouble *f, const string &name);
+void DownloadInterfaceValue(UnstructGrid *grid, RDouble **f, const string &name, int neqn);
+void DownloadInterfaceValue(UnstructGrid *grid, RDouble *f, const string &name);
+
+//! Upload the interpoint variables for send.
+//! @param[in] grid                computational mesh.
+//! @param[in] f                   variable pointer of which need to be sent.
+//! @param[in] name                variable name of which need to be sent.
+//! @param[in] neqn                variable dimension of which need to be sent.
+//! -# 1 :  1-D array.
+//! -# 2 :  2-D array.
+//! -# n :  n-D array.
+void UploadInterpointValue(UnstructGrid *grid, RDouble **f, const string &name, int neqn);
+
+//! down the interpoint variables for receive.
+//! @param[in] grid    computational mesh.
+//! @param[in] f       variable pointer of which need to be received.
+//! @param[in] name    variable name of which need to be received.
+//! @param[in] neqn    variable dimension of which need to be received.
+//! -# 1 :  1-D array.
+//! -# 2 :  2-D array.
+//! -# n :  n-D array.
+void DownloadInterpointValue(UnstructGrid *grid, RDouble **f, const string &name, int neqn);
+
+void UploadOversetValue(UnstructGrid *grid, RDouble **field, const string &name, int neqn);
+void UploadOversetValueDefault(UnstructGrid *grid, RDouble **field, const string &name, int neqn);
+void UploadOversetValueByWeight(UnstructGrid *grid, RDouble **field, const string &name, int neqn);
+void DownloadOversetValue(UnstructGrid *grid, RDouble **field, const string &name, int neqn);
+
+void BarthLimiterINF (Grid *grid_in, int ig, RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+void VencatLimiterINF(Grid *grid_in, int ig, RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+
+void SmoothField(UnstructGrid *grid, RDouble *q);
+
+void SetLimitBoundary(Grid *grid_in, RDouble *limit);
+void addn2c(int ie, int ip, int *nCPN, struct linkbase **nc);
+UnstructGrid * UnstructGridCast(Grid *grid_in);
+
+LIB_EXPORT void ConstructFace2Node(int *nPointPerFace, int *nodesOfPerFace, uint_t nFaces, vector< vector<int> > &face2node);
+
+void VisualizationMesh2D(UnstructGrid *grid, const string &fileName);
+void VisualizationMesh3D(UnstructGrid *grid, const string &fileName);
+void VisualizationEigenMeshofCoarseGrid3D(UnstructGrid *grid, const string &fileName);
+
+void GetFaceToNodeList(UnstructGrid *grid, int boundaryConditionType, PHVectorInt1D &linkMap, PHVectorInt2D &faceToNodeList);
+
+void ExtractSubGridFromGrid(UnstructGrid *grid, UnstructGrid *grid_Slice, int *isThisCellNeedExtract);
+
+void DumpSliceGrid(UnstructGrid *unstructGrid, int sliceAxis, RDouble slicePosition, string fileName);
+
+RDouble AspectRatio(RDouble dist, RDouble area, int nodeNumOfPerFace);
+
+void Get_Xadj_Adjncy(UnstructGrid *grid, idx_t *xadj, idx_t *adjncy);
+
+//! @param[in] neighborCell local cell ID in the neighbor zone.
+//! @param[in] vtxdist start cell ID of each zone from the global view.
+void Get_Xadj_Adjncy(UnstructGrid *grid, idx_t *xadj, idx_t *adjncy, int *neighborCell, idx_t *vtxdist);
+
+void Get_Xadj_Adjncy_Weight(UnstructGrid *grid, idx_t *xadj, idx_t *adjncy, RDouble *adjncyWeight);
+
+}
+
diff --git a/API/Geometry/include/Geo_UnstructGrid.hxx b/API/Geometry/include/Geo_UnstructGrid.hxx
new file mode 100644
index 0000000..42decfe
--- /dev/null
+++ b/API/Geometry/include/Geo_UnstructGrid.hxx
@@ -0,0 +1,474 @@
+inline void UnstructGrid::SetLeftCellOfFace(int *left_cell_of_face_in)
+{
+    this->faceTopology->SetLeftCellOfFace(left_cell_of_face_in);
+}
+
+inline void UnstructGrid::SetRightCellOfFace(int *right_cell_of_face_in)
+{
+    this->faceTopology->SetRightCellOfFace(right_cell_of_face_in);
+}
+
+inline void UnstructGrid::SetNodeNumberOfEachFace(int *node_number_of_each_face)
+{
+    this->faceTopology->SetNodeNumberOfEachFace(node_number_of_each_face);
+}
+
+inline void UnstructGrid::SetFace2Node(int *face2node)
+{
+    this->faceTopology->SetFace2Node(face2node);
+}
+
+inline void UnstructGrid::SetFace2NodeSubscript( long long int *face2nodeSubscript)
+{
+    this->faceTopology->SetFace2NodeSubscript(face2nodeSubscript);
+}
+
+inline void UnstructGrid::SetCell2CoarseGridCell(int *cell2coarsegridcell)
+{
+    this->cell2coarsegridcell = cell2coarsegridcell;
+}
+
+inline void UnstructGrid::SetLI_nLine(int nLine)
+{
+    this->lineTopology->SetLI_nLine(nLine);
+}
+
+inline void UnstructGrid::SetLI_nCellsInLine(int *nCellsInLines)
+{
+    this->lineTopology->SetLI_nCellsInLine(nCellsInLines);
+}
+
+inline void UnstructGrid::SetLI_CellOfLine(int **CellOfLine)
+{
+    this->lineTopology->SetLI_CellOfLine(CellOfLine);
+}
+
+inline void UnstructGrid::SetLI_FaceOfLine(int **FaceOfLine)
+{
+    this->lineTopology->SetLI_FaceOfLine(FaceOfLine);
+}
+
+inline void UnstructGrid::SetLI_LineOfCell(int *LineOfCell)
+{
+    this->lineTopology->SetLI_LineOfCell(LineOfCell);
+}
+
+inline void UnstructGrid::Setfc2cL(int *fc2cL)
+{
+    this->fc2cL = fc2cL;
+}
+
+inline void UnstructGrid::Setfc2cR(int *fc2cR)
+{
+    this->fc2cR = fc2cR;
+}
+
+inline void UnstructGrid::SetBCRecord(UnstructBCSet **bcr)
+{
+    this->bcr = bcr;
+}
+
+inline void UnstructGrid::SetUnstructBCSet(UnstructBCSet *unstructBCSet)
+{
+    this->unstructBCSet = unstructBCSet;
+}
+
+inline void UnstructGrid::SetBlankIndex(int *iBlank)
+{
+    this->iBlank = iBlank;
+}
+
+inline void UnstructGrid::SetZoneProbesCellID(vector <int> zoneProbesCellID)
+{
+    this->zoneProbesCellID = zoneProbesCellID;
+}
+
+inline int * UnstructGrid::GetLeftCellOfFace() const
+{
+    return this->faceTopology->GetLeftCellOfFace();
+}
+
+inline int * UnstructGrid::GetRightCellOfFace() const
+{
+    return this->faceTopology->GetRightCellOfFace();
+}
+
+inline int *UnstructGrid::GetNodeNumberOfEachFace() const
+{
+    return this->faceTopology->GetNodeNumberOfEachFace();
+}
+
+inline int *UnstructGrid::GetFace2Node() const
+{
+    return this->faceTopology->GetFace2Node();
+}
+
+inline RDouble *UnstructGrid::GetFaceCenterX() const
+{
+    return this->faceMetrics->GetFaceCenterX();
+}
+
+inline RDouble *UnstructGrid::GetFaceCenterY() const
+{
+    return this->faceMetrics->GetFaceCenterY();
+}
+
+inline RDouble *UnstructGrid::GetFaceCenterZ() const
+{
+    return this->faceMetrics->GetFaceCenterZ();
+}
+
+inline RDouble *UnstructGrid::GetFaceNormalX() const
+{
+    return this->faceMetrics->GetFaceNormalX();
+}
+
+inline RDouble *UnstructGrid::GetFaceNormalY() const
+{
+    return this->faceMetrics->GetFaceNormalY();
+}
+
+inline RDouble *UnstructGrid::GetFaceNormalZ() const
+{
+    return this->faceMetrics->GetFaceNormalZ();
+}
+
+inline RDouble *UnstructGrid::GetFaceArea() const
+{
+    return this->faceMetrics->GetFaceArea();
+}
+
+inline RDouble *UnstructGrid::GetCellCenterX() const
+{
+    return cellMetrics->GetCellCenterX();
+}
+
+inline RDouble *UnstructGrid::GetCellCenterY() const
+{
+    return cellMetrics->GetCellCenterY();
+}
+
+inline RDouble * UnstructGrid::GetCellCenterZ() const
+{
+    return cellMetrics->GetCellCenterZ();
+}
+
+inline RDouble * UnstructGrid::GetCellVolume() const
+{
+    return cellMetrics->GetCellVolume();
+}
+
+inline RDouble * UnstructGrid::GetFaceVelocityX() const
+{
+    return dynamicGridMetrics->GetFaceVelocityX();
+}
+
+inline RDouble *UnstructGrid::GetFaceVelocityY() const
+{
+    return dynamicGridMetrics->GetFaceVelocityY();
+}
+
+inline RDouble *UnstructGrid::GetFaceVelocityZ() const
+{
+    return dynamicGridMetrics->GetFaceVelocityZ();
+}
+
+inline RDouble * UnstructGrid::GetFaceNormalVelocity() const
+{
+    return dynamicGridMetrics->GetFaceNormalVelocity();
+}
+
+inline RDouble * UnstructGrid::GetCellVolumeOld() const
+{
+    return dynamicGridMetrics->GetCellVolumeOld();
+}
+
+inline RDouble *UnstructGrid::GetLeastSquareIWT() const
+{
+    return leastSquareWeights->GetLeastSquareIWT();
+}
+
+inline RDouble *UnstructGrid::GetLeastSquareIXX() const
+{
+    return leastSquareWeights->GetLeastSquareIXX();
+}
+
+inline RDouble *UnstructGrid::GetLeastSquareIYY() const
+{
+    return leastSquareWeights->GetLeastSquareIYY();
+}
+
+inline RDouble *UnstructGrid::GetLeastSquareIZZ() const
+{
+    return leastSquareWeights->GetLeastSquareIZZ();
+}
+
+inline RDouble *UnstructGrid::GetLeastSquareIXY() const
+{
+    return leastSquareWeights->GetLeastSquareIXY();
+}
+
+inline RDouble *UnstructGrid::GetLeastSquareIXZ() const
+{
+    return leastSquareWeights->GetLeastSquareIXZ();
+}
+
+inline RDouble *UnstructGrid::GetLeastSquareIYZ() const
+{
+    return leastSquareWeights->GetLeastSquareIYZ();
+}
+
+inline void UnstructGrid::SetLeastSquareIWT(RDouble *iwt)
+{
+    leastSquareWeights->SetLeastSquareIWT(iwt);
+}
+
+inline void UnstructGrid::SetLeastSquareIXX(RDouble *ixx)
+{
+    leastSquareWeights->SetLeastSquareIXX(ixx);
+}
+
+inline void UnstructGrid::SetLeastSquareIYY(RDouble *iyy)
+{
+    leastSquareWeights->SetLeastSquareIYY(iyy);
+}
+
+inline void UnstructGrid::SetLeastSquareIZZ(RDouble *izz)
+{
+    leastSquareWeights->SetLeastSquareIZZ(izz);
+}
+
+inline void UnstructGrid::SetLeastSquareIXY(RDouble *ixy)
+{
+    leastSquareWeights->SetLeastSquareIXY(ixy);
+}
+
+inline void UnstructGrid::SetLeastSquareIXZ(RDouble *ixz)
+{
+    leastSquareWeights->SetLeastSquareIXZ(ixz);
+}
+
+inline void UnstructGrid::SetLeastSquareIYZ(RDouble *iyz)
+{
+    leastSquareWeights->SetLeastSquareIYZ(iyz);
+}
+
+inline void UnstructGrid::SetFaceMark(char *fMark)
+{
+    leastSquareWeights->SetFaceMark(fMark);
+}
+
+inline char *UnstructGrid::GetFaceMark() const
+{
+    return leastSquareWeights->GetFaceMark();
+}
+
+inline int * UnstructGrid::GetCell2CoarseGridCell(void) const
+{
+    return cell2coarsegridcell;
+}
+
+inline int * UnstructGrid::Getfc2cL(void) const
+{
+    return fc2cL;
+}
+
+inline int *UnstructGrid::Getfc2cR(void) const
+{
+    return fc2cR;
+}
+
+inline UnstructBCSet ** UnstructGrid::GetBCRecord(void) const
+{
+    return bcr;
+}
+
+inline UnstructBCSet * UnstructGrid::GetUnstructBCSet(void) const
+{
+    return unstructBCSet;
+}
+
+inline void UnstructGrid::CreateUnstructBCSet(int nBCRegion)
+{
+    if (!unstructBCSet)
+    {
+        unstructBCSet = new UnstructBCSet(this->GetZoneID());
+    }
+
+    unstructBCSet->CreatenBCRegion(nBCRegion);
+}
+
+inline RDouble * UnstructGrid::GetNormalDistanceOfC2C(void) const
+{
+    return normalDistanceC2C;
+}
+
+inline int * UnstructGrid::GetBlankIndex(void) const
+{
+    return iBlank;
+}
+
+inline vector <int> UnstructGrid::GetZoneProbesCellID() const
+{
+    return zoneProbesCellID;
+}
+
+inline RDouble *UnstructGrid::GetWallDist() const
+{
+    return walldist;
+}
+
+inline RDouble *UnstructGrid::GetNearestWallFaceNormalX() const
+{
+    return nearestwallfacenormalx;
+}
+
+inline RDouble *UnstructGrid::GetNearestWallFaceNormalY() const
+{
+    return nearestwallfacenormaly;
+}
+
+inline RDouble *UnstructGrid::GetNearestWallFaceNormalZ() const
+{
+    return nearestwallfacenormalz;
+}
+
+inline RDouble * UnstructGrid::GetWallDistNode() const
+{
+    return walldistNode;
+}
+
+inline RDouble * UnstructGrid::GetLamdax() const
+{
+    return lamdax;
+}
+
+inline RDouble *UnstructGrid::GetLamday() const
+{
+    return lamday;
+}
+
+inline RDouble *UnstructGrid::GetLamdaz() const
+{
+    return lamdaz;
+}
+
+inline int * UnstructGrid::Getknode() const
+{
+    return knode;
+}
+
+//! Set the cell to node: node index of each cell.
+inline void UnstructGrid::SetCell2Node(int *cell2node)
+{
+    cellTopology->SetCell2Node(cell2node);
+}
+
+inline map<int, int> &UnstructGrid::GetBoundaryPointLabel()
+{
+    return boundaryPointLabel;
+}
+
+//! Set the number of nodes in each cell.
+inline void UnstructGrid::SetNodeNumberOfEachCell(int *node_number_of_each_cell)
+{
+    cellTopology->SetNodeNumberOfEachCell(node_number_of_each_cell);
+}
+
+//! Set the number of nodes in each cell.
+inline int *UnstructGrid::GetNodeNumberOfEachCell() const
+{
+    return cellTopology->GetNodeNumberOfEachCell();
+}
+
+inline void UnstructGrid::SetOversetConfig(OversetConfig *oversetConfigIn)
+{
+    this->oversetConfig = oversetConfigIn;
+}
+
+inline void UnstructGrid::SetAverageVolume(RDouble rIn)
+{
+    averageVolume = rIn;
+}
+
+inline int UnstructGrid::GetLI_nLine() const
+{
+    return this->lineTopology->GetLI_nLine();
+}
+
+inline int * UnstructGrid::GetLI_nCellsInLine() const
+{
+    return this->lineTopology->GetLI_nCellsInLine();
+}
+
+inline int ** UnstructGrid::GetLI_CellOfLine() const
+{
+    return this->lineTopology->GetLI_CellOfLine();
+}
+
+inline int ** UnstructGrid::GetLI_FaceOfLine() const
+{
+    return this->lineTopology->GetLI_FaceOfLine();
+}
+
+inline int * UnstructGrid::GetLI_LineOfCell() const
+{
+    return this->lineTopology->GetLI_LineOfCell();
+}
+
+#ifdef USE_INCOMSOLVER
+
+inline Vector3D *UnstructGrid::GetCellCenterVector() const
+{
+    return cellCenterVector;
+}
+
+inline Vector3D *UnstructGrid::GetFaceNormalVector() const
+{
+    return faceNormalVector;
+}
+
+inline int *UnstructGrid::GetLocalCell2GlobalMap() const
+{
+    return localCell2GlobalMap;
+}
+
+inline int *UnstructGrid::GetLocalCell2LocalMap() const
+
+{
+    return localCell2LocalMap;
+}
+
+
+inline void UnstructGrid::SetLocalCell2GlobalMap(int *localCell2GlobalMap)
+{
+    this->localCell2GlobalMap = localCell2GlobalMap;
+}
+
+inline void UnstructGrid::SetLocalCell2LocalMap(int *localCell2LocalMap)
+{
+    this->localCell2LocalMap = localCell2LocalMap;
+}
+
+inline void UnstructGrid::SetCell2ZoneIDMap(int *cell2ZoneIDMap)
+{
+    this->cell2ZoneIDMap = cell2ZoneIDMap;
+}
+
+inline int* UnstructGrid::GetCell2ZoneIDMap() const
+{
+    return cell2ZoneIDMap;
+}
+
+inline void UnstructGrid::SetCellCenterVector(Vector3D *cellC)
+{
+    cellCenterVector = cellC;
+}
+
+inline void UnstructGrid::SetFaceNormalVector(Vector3D *faceN)
+{
+    faceNormalVector = faceN;
+}
+
+#endif
+
diff --git a/API/Geometry/include/GeomProxy.h b/API/Geometry/include/GeomProxy.h
new file mode 100644
index 0000000..8246ce5
--- /dev/null
+++ b/API/Geometry/include/GeomProxy.h
@@ -0,0 +1,54 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      GeomProxy.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+#include "TypeDefine.h"
+
+namespace PHSPACE
+{
+
+class GeomProxy
+{
+public:
+    // type definitions
+    typedef RDouble value_type;
+    typedef RDouble *iterator;
+    typedef const RDouble *const_iterator;
+    typedef RDouble &reference;
+private:
+    iterator xfn, yfn, zfn, vgn, area;
+public:
+    GeomProxy();
+    ~GeomProxy();
+public:
+    void Create(int nsize);
+
+    //! Return the X of face normal.
+    iterator GetFaceNormalX();
+
+    //! Return the Y of face normal.
+    iterator GetFaceNormalY();
+
+    //! Return the Z of face normal.
+    iterator GetFaceNormalZ();
+
+    //! Return the face area.
+    iterator GetFaceArea();
+
+    //! Return the face velocity.
+    iterator GetFaceVelocity(); 
+};
+
+}
diff --git a/API/Geometry/include/Geometry.h b/API/Geometry/include/Geometry.h
new file mode 100644
index 0000000..6a58f3a
--- /dev/null
+++ b/API/Geometry/include/Geometry.h
@@ -0,0 +1,41 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geometry.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "TypeDefine.h"
+#include "Geo_Grid.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+class PHGeometry
+{
+private:
+    vector < Grid * > *grids;
+public:
+    PHGeometry(vector < Grid * > *grids);
+    ~PHGeometry();
+public:
+    Grid * GetGrid(int level = 0);
+    int GetNumberOfMultiGrid() const { return static_cast<int>(grids->size()); }
+    void AddGrid(Grid *grid);
+    vector < Grid * > * GetVectorGrid();
+};
+
+}
+
diff --git a/API/Geometry/include/GeometryUnit.h b/API/Geometry/include/GeometryUnit.h
new file mode 100644
index 0000000..23d2c17
--- /dev/null
+++ b/API/Geometry/include/GeometryUnit.h
@@ -0,0 +1,99 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      GeometryUnit.h 
+//! @brief     It defines the hybrid grid structures, for arbitrary mixed cells.
+//! @author    Bell, Baka.
+
+#pragma once
+
+namespace PHSPACE
+{
+class DYNode
+{
+public:
+    //! Coor before deform.
+    double x, y, z;
+
+    //! Coor after deform.
+    double xnew, ynew, znew;
+
+    int moveType;
+
+    //! Number of node around per node.
+    int nodeNumberAround;
+
+    //! Node to node.
+    int *node2node;
+
+    //! Spring 'k' of each node.
+    double *node2nodeK;
+
+public:
+    DYNode();
+    ~DYNode();
+};
+
+
+class DYFace
+{
+public:
+    //! Face boundary type.
+    int bcType;
+
+    //! Left and right cell index.
+    int leftCell, rightCell;
+
+    //! Number of node in per face.
+    int nodeNumber;
+
+    //! Node index.
+    int *face2node;
+
+    double area;
+    double xfc, yfc, zfc;
+    double xfn, yfn, zfn;
+public:
+    DYFace();
+    ~DYFace();
+};
+
+
+class DYCell
+{
+public:
+    //! Number of face in per cell.
+    int faceNumber;
+
+    //! Face index.
+    int *cell2face;
+
+    //! Number of node in per cell.
+    int nodeNumber;
+
+    //! Node index.
+    int *cell2node;
+
+    //! Number of cell around per cell.
+    int cellNumberAround;
+
+    //! Cell index.
+    int *cell2cell;
+
+    double volume;
+    double xCenter, yCenter, zCenter;
+    int celltype, material;
+public:
+    DYCell();
+    ~DYCell();
+};
+
+}
\ No newline at end of file
diff --git a/API/Geometry/include/GridType.h b/API/Geometry/include/GridType.h
new file mode 100644
index 0000000..eb4e5ce
--- /dev/null
+++ b/API/Geometry/include/GridType.h
@@ -0,0 +1,32 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      GridType.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "TypeDefine.h"
+#include "Geo_GridIndex.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+const int UNSTRUCTGRID = 0;
+const int STRUCTGRID   = 1;
+const int MIXGRID      = 2;
+
+Grid * CreateGridGeneral(int gridtype, GridID *index, int level, int nDim);
+int GetSystemGridType(set<int> &grid_type);
+}
diff --git a/API/Geometry/include/LinkStruct.h b/API/Geometry/include/LinkStruct.h
new file mode 100644
index 0000000..bce3d31
--- /dev/null
+++ b/API/Geometry/include/LinkStruct.h
@@ -0,0 +1,66 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      LinkStruct.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "DataStruct_Sort.h"
+#include "Geo_Point.h"
+
+namespace PHSPACE
+{
+
+//! LinkStruct only works when to generate and convert grids, and it will not be used the rest of time.
+class LinkStruct
+{
+public:
+    typedef DataStruct_AdtTree<int,RDouble> AdtTree;
+private:
+    //! coor_tree is created to find the point column of interfaces.
+    AdtTree coor_tree;
+    //! facelist is mainly used as a search list of global face.
+    set < DataStruct_Sort< VInt > > facelist;
+    //! In general, each interface consists of two faces of different blocks.
+    //! This requires the block index number of each face and the faces index number in current block.
+    //! That is what zoneid and faceid do, and consistent with the order of global faces.
+    VVInt zoneid;
+    VVInt faceid;
+    VVInt facemap;
+    RDouble tol;
+    vector< RDouble > x, y, z;
+    set< Geo_Point< RDouble > > point_set;
+public:
+    AdtTree & GetCoordinateTree() { return coor_tree; }
+    set < DataStruct_Sort< VInt > > & GetFaceList() { return facelist; }
+    VVInt & GetZoneID() { return zoneid; }
+    VVInt & GetFaceID() { return faceid; }
+    VVInt & GetFaceMap() { return facemap; }
+    RDouble GetTolerance() const { return tol; }
+    vector< RDouble > & GetX() { return x; }
+    vector< RDouble > & GetY() { return y; }
+    vector< RDouble > & GetZ() { return z; }
+    set< Geo_Point< RDouble >  > & GetPointSet() { return point_set; }
+public:
+    LinkStruct(RDouble *pmin, RDouble *pmax, RDouble tol, int nblocks) : coor_tree(3, pmin, pmax)
+    {
+        this->tol = tol;
+        facemap.resize(nblocks);
+    };
+
+    ~LinkStruct()
+    {
+    };
+};
+
+}
diff --git a/API/Geometry/include/MeshAgglomeration.h b/API/Geometry/include/MeshAgglomeration.h
new file mode 100644
index 0000000..db9edd7
--- /dev/null
+++ b/API/Geometry/include/MeshAgglomeration.h
@@ -0,0 +1,59 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Mesh_Agglomeration.h
+//! @brief     Mesh coarsen using agglomeration method for unstructured grid.
+//! @author    Bell.
+
+#pragma once
+#include "Geo_UnstructGrid.h"
+using namespace std;
+
+namespace PHSPACE
+{
+
+//! @brief Mesh coarsen using agglomeration method for unstructured grid.
+class Mesh_Agglomeration
+{
+public:
+    //! @param[in] fineGridIn     The pre-fine grid, which is need to be coarsen.\n
+    //! @param[in] fineGridLevel  The level of the fineGrid.   
+    LIB_EXPORT Mesh_Agglomeration(UnstructGrid *fineGridIn, int fineGridLevelIn);
+
+    LIB_EXPORT ~Mesh_Agglomeration();
+
+    //! Coarse the fine grid, this function is recommended,
+    //! since the coarse grid quality is guaranteed.
+    LIB_EXPORT void CoarsenGridOnce();
+
+    LIB_EXPORT void CoarsenGridOncebyMGridgen();
+
+    //! Coarse the fine grid, fast but not robust, this function is NOT recommended.
+    LIB_EXPORT void CoarsenGridOnceWithoutSkewnessLimit();
+
+    //! Return the agglomerated coarse grid.
+    LIB_EXPORT UnstructGrid * GetCoarseGrid() { return this->coarseGrid; }
+
+private:
+    //! The pre-fine grid, which is need to be coarsen.
+    UnstructGrid *fineGrid;
+
+    //! The coarse grid, which is agglomerated from fineGrid.
+    UnstructGrid *coarseGrid;
+
+    //! The level of the fineGrid.
+    int fineGridLevel;
+
+private:
+    void AspectRatioModifyBySkewness(RDouble *ratio, RDouble *xcc, RDouble *ycc, RDouble *zcc, const RDouble &limitAngle);
+};
+
+}
\ No newline at end of file
diff --git a/API/Geometry/include/MultigridFactory.h b/API/Geometry/include/MultigridFactory.h
new file mode 100644
index 0000000..97d2938
--- /dev/null
+++ b/API/Geometry/include/MultigridFactory.h
@@ -0,0 +1,158 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      MultigridFactory.h
+//! @brief     Analyse relationship between multigrid.
+//! @author    Guo Yongheng.
+
+#pragma once
+#include "PHMpi.h"
+#include "Geo_Grid.h"
+#include "Geo_StructGrid.h"
+#include "OversetGridFactory.h"
+
+namespace PHSPACE
+{
+class PHSurface
+{
+private:
+    int ni, nj, nk;
+    int ist, jst, kst;
+    int np;
+    int *data;
+public:
+     PHSurface(Range I, Range J, Range K);
+    ~PHSurface();
+public:
+    int & operator()(int i, int j, int k);
+    int * GetData();
+    int   GetNumberOfFaces();
+};
+
+class StructFace
+{
+private:
+    int ni, nj, nk;
+    vector< int > numberOfFaceElements;
+    Range IST, ISE, IED;
+    Range JST, JSE, JED;
+    Range KST, KSE, KED;
+    StructGrid *structGrid;
+
+    vector< PHSurface * > *neighborZoneIndexContainer;
+    vector< PHSurface * > *neighborZoneLocalInterfaceIndexContainer;
+    vector< PHSurface * > *localInterfaceIndexContainer;
+    vector< PHSurface * > *localBoundaryFaceIndexContainer;
+
+    vector< StructFace * > *structFaceGroup;
+public:
+    StructFace(StructGrid *structGrid);
+    ~StructFace();
+public:
+    void PaintSelf();
+    void PaintNeighbor();
+    void SetStructFaceGroup(vector< StructFace * > *structFaceGroup) { this->structFaceGroup = structFaceGroup; }
+    void CollectInterfaceInformation(InterfaceInfo *interfaceInformation);
+    int  ComputeNumberOfInterfaces();
+private:
+    void Init();
+    void GenerateSubspace(vector< PHSurface * > *micro);
+
+    PHSurface & GetNeighborZoneIndexContainer(int m) { return * (*neighborZoneIndexContainer)[m]; }
+    PHSurface & GetNeighborZoneLocalInterfaceIndexContainer(int m) { return * (*neighborZoneLocalInterfaceIndexContainer)[m]; }
+    PHSurface & GetLocalInterfaceIndexContainer(int m) { return * (*localInterfaceIndexContainer)[m]; }
+    PHSurface & GetLocalBoundaryFaceIndexContainer(int m) { return * (*localBoundaryFaceIndexContainer)[m]; }
+
+    int * GetNeighborZoneIndex(int m) { return (*neighborZoneIndexContainer)[m]->GetData(); }
+    int * GetNeighborZoneLocalInterfaceIndex(int m) { return (*neighborZoneLocalInterfaceIndexContainer)[m]->GetData(); }
+    int * GetLocalInterfaceIndex(int m) { return (*localInterfaceIndexContainer)[m]->GetData(); }
+    int * GetLocalBoundaryFaceIndex(int m) { return (*localBoundaryFaceIndexContainer)[m]->GetData(); }
+
+    StructFace * GetStructFaceGroup(int m) { return (*structFaceGroup)[m]; }
+};
+
+class MultigridManager
+{
+public:
+    MultigridManager(Grid **OrdinaryGrid, int isOverset, int globalBlockNumber);
+    ~MultigridManager();
+public:
+    void Run();
+protected:
+    Grid **OrdinaryGrid;
+    int isOverset;
+public:
+    void GenerateGlobalNodeLinkStructure();
+    void GenerateGlobalCellLinkStructure();
+    void ReadGridCoordinate();
+    void GridExtend();
+    void ComputeCellCenter();
+    void FaceExtend();
+    void PrismLineExtend();
+    void CornerExtend();
+    void GetCrossPoint(int mPatch, int nPatch, RDouble x, RDouble y, RDouble z, RDouble &xx, RDouble &yy, RDouble &zz, int &nFlap, int &nPointBy, int &nBlock, int &iPoint, int &jPoint, int &kPoint);
+    void GenerateGlobalBlockSpace();
+    void GenerateGlobalPointSpace();
+    void GenerateGlobalCenterSpace();
+    void GenerateLocalPointSpace();
+    void ReadBoundaryCondition();
+    void InitialNodeLinksData();
+    void SetNewPatchModel();
+    void ComputeContravariantComponent();
+    void OutputLinkData();
+    void GenerateGlobalFaceSpace();
+    void GenerateLocalFaceSpace();
+    void InitializeLocalFaceSpace(PHInt2D &myInt2D, int value);
+    void GetOtherBlockDirections(int id1, int &id2, int &id3);
+    string GetLinkFileName();
+public:
+    void GenerateLinkStructure();
+    void GenerateHoleStructure();
+    void ReadOriginalHoleFile();
+    
+    void ComputeLocalCoordinate();
+    void OutputNewHoleFile();
+protected:
+    int numberOfHoles;
+    PHInt1D holeZoneStart, holeZoneEnd, holeZoneAttached, numberOfHoleSurfaces, numberOfHolePoints, zoneInverseIndex;
+    PHInt2D nsi, nsj, spst;
+    PHDouble2D xsurf, ysurf, zsurf;
+protected:
+    int globalBlockNumber, globalPointNumber, globalCenterNumber, maxLocalFaceNumber, specialBlockLabel;
+    PHInt1D overallFaceNumber, externalFaceNumber, internalFaceNumber, processLabel;
+    PHInt1D startPointLabel, iDimension, jDimension, kDimension;
+    PHInt1D patchIPoint, patchJPoint, patchKPoint;
+    PHInt2D iminMaster, imaxMaster, jminMaster, jmaxMaster, kminMaster, kmaxMaster;
+    PHInt2D iminSlave, imaxSlave, jminSlave, jmaxSlave, kminSlave, kmaxSlave;
+    PHInt2D iminInner, imaxInner, jminInner, jmaxInner, kminInner, kmaxInner;
+    PHInt2D tarPatch, faceType;
+    PHInt1D startCenterLabel, iCenterDimension, jCenterDimension, kCenterDimension;
+    PHInt1D blockLocation, iLocation, jLocation, kLocation;
+    PHInt1D characterPoint;
+    PHDouble1D coordinateX, coordinateY, coordinateZ;
+    PHDouble1D cellCenterX, cellCenterY, cellCenterZ;
+
+public:
+    void GenerateHoleGridStructure();
+protected:
+    void ReadZoneInverseMapping();
+    void ReadOriginalHoleGrid();
+    void ComputeLocalHoleGrid();
+    void OutputNewHoleGrid();
+protected:
+    vector<HoleGrid *> holeGridList;
+};
+
+void Standardize(vector< int > &st, vector< int > &ed, int side);
+string GetHoleBasicFileName();
+void GaussElimination(PHDouble2D &a, PHDouble1D &b, int n, PHDouble1D &x, int &flag);
+}
+
diff --git a/API/Geometry/include/OverLappingGrid.h b/API/Geometry/include/OverLappingGrid.h
new file mode 100644
index 0000000..0aa15ea
--- /dev/null
+++ b/API/Geometry/include/OverLappingGrid.h
@@ -0,0 +1,30 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      OverLappingGrid.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+#include "Geo_Grid.h"
+#include "GridType.h"
+
+namespace PHSPACE
+{
+class Grid;
+class StructGrid;
+class UnstructGrid;
+
+class Geo_OversetGrid;
+void DumpFlags(Geo_OversetGrid **oversetGrids, int nBlocks, const string &filename);
+void DumpOversetGrid(Geo_OversetGrid **oversetGrids, int nBlocks, const string &filename);
+
+}
diff --git a/API/Geometry/include/OversetGridFactory.h b/API/Geometry/include/OversetGridFactory.h
new file mode 100644
index 0000000..9b7cca2
--- /dev/null
+++ b/API/Geometry/include/OversetGridFactory.h
@@ -0,0 +1,236 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      OversetGridFactory.h
+//! @brief     Probe overlap cells.
+//! @author    Guo Yongheng.
+
+#pragma once
+#include "PHMpi.h"
+#include "Geo_StructGrid.h"
+
+namespace PHSPACE
+{
+const int IN_HOLE_COLOR = 0;
+const int GENERIC_COLOR = 1;
+const int OVERSET_COLOR = 2;
+const int SECOND_COLOR  = 3;
+
+class HoleGrid
+{
+protected:
+    int zone_st, zone_ed, zone_at;
+    int ns, np;
+    vector< int > *nsi, *nsj, *nsp;
+    vector< RDouble > *x, *y, *z;
+    vector< RDouble > *box;
+    vector< vector< RDouble > * > *capsule;
+public:
+    LIB_EXPORT  HoleGrid();
+    LIB_EXPORT ~HoleGrid();
+
+    void SetZoneStart      (int iZone);
+    void SetZoneEnd        (int iZone);
+    void SetZoneAttached   (int iZone);
+    void SetNumberOfSurface(int nSurf);
+    void SetNumberOfPoints (int np);
+    
+    int GetZoneStart();
+    int GetZoneEnd();
+    int GetZoneAttached();
+    int GetNumberOfSurface();
+    int GetNumberOfPoints();
+
+    int * GetNSI();
+    int * GetNSJ();
+    int * GetNSP();
+
+    RDouble * GetX();
+    RDouble * GetY();
+    RDouble * GetZ();
+
+    RDouble * GetBox();
+
+    LIB_EXPORT void DigHoles();
+    LIB_EXPORT void GenerateSurfaceSpace();
+    LIB_EXPORT void GeneratePointSpace();
+    LIB_EXPORT int GetCellColor(RDouble x, RDouble y, RDouble z, RDouble far);
+private:
+    void GenerateCapsualSpace();
+    void ProbeBorderCell(int iType, int jType);
+    void MeasureBoxAndCapsual();
+    void ProbeCellsInHole();
+    void CopyNodeCoordinate(vector< vector< RDouble > > &r, vector< vector< RDouble > > &s, vector< int > &node);
+    void ProduceCasing(vector< vector< RDouble > > &nodeCoordinate, int i);
+    void Radial_Triangle_Intersect(vector< RDouble > &pst, vector< RDouble > &ped, vector< RDouble > &xqd, vector< RDouble > &yqd, vector< RDouble > &zqd, vector< RDouble > &pp_ist, int &pCounter);
+    void GaussElimination(vector< vector< RDouble > > &a, vector< RDouble > &b, int n, vector< RDouble > &x, int &flag);
+private:
+    vector< vector< RDouble > > phy;
+};
+
+class Stainer
+{
+private:
+    int numberOfHoles;
+    vector< HoleGrid* > *holeGridContainer;
+public:
+    LIB_EXPORT  Stainer();
+    LIB_EXPORT ~Stainer();
+
+    LIB_EXPORT void ReadHoleData();
+    LIB_EXPORT void ProbeOversetCells();
+private:
+    void PaintGenericColor();
+    void ProbeInternalOverlapCells();
+    void ProbeExternalOverlapCells();
+    void EraseSecondColor();
+};
+
+class BackgroundTree 
+{
+private:
+    bool isEmptyBinaryTree;
+    int zone_st, zone_ed, numberOfUnitCells;
+    vector< RDouble > *unitCellCapsule, *inf_plane, *sup_plane;
+    int *zone_location, *i_location, *j_location, *k_location, *fruitLevel;
+    vector< int > *fruitInheritMapping;
+    vector< int > fruitIndexStorage;
+public:
+    LIB_EXPORT  BackgroundTree();
+    LIB_EXPORT ~BackgroundTree();
+
+    LIB_EXPORT void Generate(int zone_st, int zone_ed);
+    LIB_EXPORT void SetUnitCellParameter(int iUnitCell, vector< RDouble > &xx, vector< RDouble > &yy, vector< RDouble > &zz);
+    LIB_EXPORT void SearchNodes(OversetCellCollector *oversetCellCollector, RDouble xx, RDouble yy, RDouble zz, int ip, int iElement);
+    LIB_EXPORT void ProbeNearestPoint(RDouble xx, RDouble yy, RDouble zz, RDouble &distance, int &index);
+
+    void SetZoneViewRange(int st, int ed);
+    void SetUnitCellLocation(int iUnitCell, int iZone, int iCore, int jCore, int kCore);
+    bool IsEmpty();
+private:
+    void ComputeNumberOfUnitCells();
+    void GenerateSourceSpace();
+    void ComputeUnitCellCapsule();
+    void InitFruitLevelAndInheritMapping();
+    void ComputeRootSpaceParameter();
+    void AppendNewFruit();
+    void AppendNewFruit(int iUnitCell);
+        
+    void SearchNodes(RDouble xx, RDouble yy, RDouble zz, int n);
+    void ComputeLocalCoordinateByNewtonMethod(RDouble xx, RDouble yy, RDouble zz, vector< RDouble > &ss, vector< int > &node);
+
+    bool UnitCellCapsuleBelongsToNewNode(vector< RDouble > &capsule, vector< RDouble > &inf_plane, vector< RDouble > &sup_plane);
+    bool PointBelongsToUnitCellCapsule(RDouble xx, RDouble yy, RDouble zz, vector< RDouble > &capsule);
+    bool PointBelongsToNewNode(RDouble xx, RDouble yy, RDouble zz, int kNode);
+
+    void ProduceNewLeftNode (int kNode, vector< RDouble > &inf_left,  vector< RDouble > &sup_left);
+    void ProduceNewRightNode(int kNode, vector< RDouble > &inf_right, vector< RDouble > &sup_right);
+
+    void AppendNewLeftNode (int iUnitCell, int kNode, vector< RDouble > &inf_new_node, vector< RDouble > &sup_new_node);
+    void AppendNewRightNode(int iUnitCell, int kNode, vector< RDouble > &inf_new_node, vector< RDouble > &sup_new_node);
+};
+
+class OversetCellCollector 
+{
+private:
+    int zone_st, zone_ed;
+    vector< int > elementNumberRecorder;
+    vector< int > sourceProcessorIndex;
+
+    vector< int > *localCellIndex, *zoneIndex;
+    vector< RDouble > *xCenter, *yCenter, *zCenter;
+
+    vector< int > *spaceLattice;
+    vector< RDouble > *xLocal, *yLocal, *zLocal, *radius;
+public:
+    LIB_EXPORT  OversetCellCollector();
+    LIB_EXPORT ~OversetCellCollector();
+
+    LIB_EXPORT void RunGeometricAnalysis(int zone_st, int zone_ed);
+    LIB_EXPORT void SearchOptimalUnitCell(BackgroundTree *backgroundTree);
+    LIB_EXPORT void ResizeSourceIndexContainer();
+    LIB_EXPORT void InsertOversetParameter(vector< int > *zoneContainer, vector< int > *cellContainer);
+    LIB_EXPORT void InsertServiceParameter(vector< RDouble > *ksai, vector< int > *waiter);
+    LIB_EXPORT void CollectOversetCells(int iZone, vector< int > &cell, vector< RDouble > &xx, vector< RDouble > &yy, vector< RDouble > &zz);
+    LIB_EXPORT void SetNearestPointParameter(int ip, int iElement, RDouble distance, int index);
+    LIB_EXPORT void SetOptimalPointParameter(int ip, int iElement, vector< RDouble > &ss, vector< int > &node);
+    
+    void SetZoneViewRange(int st, int ed);
+    
+private:
+    void GenerateTargetSpace();
+    void CollectOversetCells();
+    void BcastOversetCells();
+    void GenerateServiceSpace();
+    void SetVirtualPointParameter();
+    void ProbeNearestPoint(BackgroundTree *backgroundTree, RDouble xx, RDouble yy, RDouble zz, int ip, int iElement);
+};
+
+class OversetStructGrid
+{
+private:
+    int searchTimes;
+    vector< int > sourceZoneStart, sourceZoneEnd, targetZoneStart, targetZoneEnd;
+    vector< int > zoneInverseIndex;
+
+    vector< RDouble > *ksai;
+    vector< int > *waiter;
+    vector< int > indexGroup, processGroup;
+
+    vector< int > *zoneContainer, *cellContainer;
+    vector< int > *nodeSend, *nodeRecv;
+    
+    vector< string > solverNameContainer;
+    vector< int > equationNumberContainer;
+    vector< RDouble4D * > *field;
+    vector< RDouble > **dataSend, **dataRecv;
+public:
+    LIB_EXPORT  OversetStructGrid();
+    LIB_EXPORT ~OversetStructGrid();
+
+    LIB_EXPORT void RunGeometricAnalysis();
+
+    LIB_EXPORT void FillSolverContainer();
+    LIB_EXPORT void InitFieldNew();
+    LIB_EXPORT void InitField();
+
+    LIB_EXPORT void CommunicateOversetField(int iSolver);
+    LIB_EXPORT void CorrectOversetField(int iSolver);
+
+    int GetZoneInverseIndex(int i_view);
+private:
+    void ReadBasicParameter();
+    void ProbeOversetCells();
+    void GenerateSourceAndTargetSpace();
+    void ProbeRelativeOversetLocation();
+    void FillNodeIndexContainer();
+    void InsertOversetAndServiceParameter(OversetCellCollector *oversetCellCollector);
+    void LinearInsertValue(int numberOfEquations, vector< RDouble > &backdrop, RDouble xx, RDouble yy, RDouble zz, vector< RDouble > &newCellValue);
+};
+
+#include "OversetGridFactory.hxx"
+
+int GetCodeOfDigHoles();
+int GetCodeOfTurbulenceModel();
+
+LIB_EXPORT void GenerateStructGridTable();
+LIB_EXPORT void DeleteStructGridTable();
+LIB_EXPORT StructGrid * GetStructGrid(int i);
+
+LIB_EXPORT OversetStructGrid * GetOversetStructGrid();
+LIB_EXPORT void CreateOversetStructGrid();
+LIB_EXPORT void DeleteOversetStructGrid();
+
+LIB_EXPORT int GetZoneInverseIndex(int i_view);
+
+LIB_EXPORT void ComputePhysicalCoordinate(vector< vector< RDouble > > &frame, RDouble x, RDouble y, RDouble z, vector< RDouble > &r);
+
+}
diff --git a/API/Geometry/include/OversetGridFactory.hxx b/API/Geometry/include/OversetGridFactory.hxx
new file mode 100644
index 0000000..743ed74
--- /dev/null
+++ b/API/Geometry/include/OversetGridFactory.hxx
@@ -0,0 +1,114 @@
+inline void HoleGrid::SetZoneStart(int iZone)
+{
+    this->zone_st = iZone;
+}
+
+inline void HoleGrid::SetZoneEnd(int iZone)
+{
+    this->zone_ed = iZone;
+}
+
+inline void HoleGrid::SetZoneAttached(int iZone)
+{
+    this->zone_at = iZone;
+}
+
+inline void HoleGrid::SetNumberOfSurface(int nSurf)
+{
+    this->ns = nSurf;
+}
+
+inline void HoleGrid::SetNumberOfPoints(int np)
+{
+    this->np = np;
+}
+
+inline int HoleGrid::GetZoneStart()
+{
+    return this->zone_st;
+}
+
+inline int HoleGrid::GetZoneEnd()
+{
+    return this->zone_ed;
+}
+
+inline int HoleGrid::GetZoneAttached()
+{
+    return this->zone_at;
+}
+
+inline int HoleGrid::GetNumberOfSurface()
+{
+    return this->ns;
+}
+
+inline int HoleGrid::GetNumberOfPoints()
+{
+    return this->np;
+}
+
+inline int * HoleGrid::GetNSI()
+{
+    return & (*nsi)[0];
+}
+
+inline int * HoleGrid::GetNSJ() 
+{
+    return & (*nsj)[0];
+}
+
+inline int * HoleGrid::GetNSP()
+{
+    return & (*nsp)[0];
+}
+
+inline RDouble * HoleGrid::GetX()
+{
+    return & (*x)[0];
+}
+
+inline RDouble * HoleGrid::GetY()
+{
+    return & (*y)[0];
+}
+
+inline RDouble * HoleGrid::GetZ()
+{
+    return & (*z)[0];
+}
+
+inline RDouble * HoleGrid::GetBox()
+{
+    return & (*box)[0];
+}
+
+inline void BackgroundTree::SetZoneViewRange(int st, int ed)
+{
+    this->zone_st = st;
+    this->zone_ed = ed;
+}
+
+inline void BackgroundTree::SetUnitCellLocation(int iUnitCell, int iZone, int iCore, int jCore, int kCore)
+{
+    zone_location[iUnitCell] = iZone;
+    i_location[iUnitCell]    = iCore;
+    j_location[iUnitCell]    = jCore;
+    k_location[iUnitCell]    = kCore;
+}
+
+inline bool BackgroundTree::IsEmpty()
+{
+    return isEmptyBinaryTree;
+}
+
+inline void OversetCellCollector::SetZoneViewRange(int st, int ed)
+{
+    this->zone_st = st;
+    this->zone_ed = ed;
+}
+
+inline int OversetStructGrid::GetZoneInverseIndex(int i_view)
+{
+    return zoneInverseIndex[i_view];
+}
\ No newline at end of file
diff --git a/API/Geometry/include/OversetInformation.h b/API/Geometry/include/OversetInformation.h
new file mode 100644
index 0000000..6aa3754
--- /dev/null
+++ b/API/Geometry/include/OversetInformation.h
@@ -0,0 +1,336 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      OversetInformation.h
+//! @brief     It define overset information reconstruction(unstructured grid).
+//! @author    He Xin, Chang Xinghua .
+
+#pragma once
+
+#include "Geo_SimpleGrid.h"
+namespace PHSPACE
+{
+
+class Grid;
+class DataContainer;
+class Geo_OversetGrid;
+class OversetCell;
+class OversetInterplateCell;
+class OversetDonorCell;
+class OversetInterplateCellManager;
+class OversetDonorCellManager;
+class Data_ParamFieldSuite;
+
+class OversetSwapManager
+{
+public:
+    OversetSwapManager ();
+    ~OversetSwapManager();
+protected:
+    OversetInterplateCellManager *oversetInterplateCellManager;
+    OversetDonorCellManager      *oversetDonorCellManager;
+public:
+    OversetInterplateCellManager * GetOversetInterplateCellManager() { return oversetInterplateCellManager; }
+    OversetDonorCellManager * GetOversetDonorCellManager() { return oversetDonorCellManager; }
+
+    void AddOversetInterplateCell(OversetInterplateCell *oversetInterplateCell);
+    void AddOversetDonorCell(OversetDonorCell *oversetDonorCell);
+public:
+    void PostProcessReceivingOversetInformation();
+    void PostProcessSendingOversetInformation();
+
+    void EncodeOversetInformation(DataContainer *dataContainer);
+    void DecodeOversetInformation(DataContainer *dataContainer);
+protected:
+    void EncodeOversetInterplateCellInformation(DataContainer *dataContainer);
+    void EncodeOversetDonorCellInformation(DataContainer *dataContainer);
+
+    void DecodeOversetInterplateCellInformation(DataContainer *dataContainer);
+    void DecodeOversetDonorCellInformation(DataContainer *dataContainer);
+};
+
+class OversetDataProxy
+{
+public:
+    OversetDataProxy();
+    ~OversetDataProxy();
+protected:
+    int sendReceiveFlag; //! 0: send ; 1: receive;
+    OversetSwapManager *oversetSwapManager;
+public:
+    void  Initialize(OversetSwapManager *oversetSwapManager, int sendReceiveFlag);
+    int   GetNumberOfNeighbors();
+    int   GetNumberOfCells();
+    int   GetNumberOfCells(int neighborIndex);
+    int * GetCellIndexContainer(int neighborIndex);
+    int * GetCellStorageIndexMapping(int neighborIndex);
+
+    RDouble * GetInterCellCenterX(int neighborIndex);
+    RDouble * GetInterCellCenterY(int neighborIndex);
+    RDouble * GetInterCellCenterZ(int neighborIndex);
+
+    Data_ParamFieldSuite * GetDataStorage();
+public:
+    int FindNeighborIndex(int zoneIndex);
+    PHVectorInt1D GetNeighborZoneIndexArray();
+protected:
+    int FindNeighborIndex(PHVectorInt1D &neighborZoneIndexArray, int neighborZoneIndexForSearching);
+};
+
+class OversetInformationProxy
+{
+public:
+    OversetInformationProxy ();
+    ~OversetInformationProxy();
+protected:
+    Grid *grid;
+
+    OversetSwapManager *oversetSwapManager;
+
+    PHVector1D < OversetCell * > *oversetCellContainer;
+
+    OversetDataProxy *oversetDataProxyForSend;
+    OversetDataProxy *oversetDataProxyForReceive;
+public:
+    int GetZoneIndex();
+    OversetSwapManager * GetOversetSwapManager() { return oversetSwapManager; }
+    PHVector1D < OversetCell * > * GetOversetCellContainer() { return oversetCellContainer; }
+    void SetOversetCellContainer(PHVector1D < OversetCell * > *oversetCellContainer) { this->oversetCellContainer = oversetCellContainer; }
+
+    PHVectorInt1D GetNeighborZoneIndexArray();
+public:
+    void GenerateNeighborZoneIndexSet(set < int > &neighborZoneIndexSet);
+    void GetNeighborZoneIndexContainer(PHVectorInt1D &neighborZoneIndexContainer);
+    void FreeOversetCellContainer(PHVector1D < OversetCell * > *oversetCellContainer);
+public:
+    OversetDonorCellManager * GetOversetDonorCellManager() { return oversetSwapManager->GetOversetDonorCellManager(); }
+    OversetInterplateCellManager * GetOversetInterplateCellManager() { return oversetSwapManager->GetOversetInterplateCellManager(); }
+
+    OversetDataProxy * GetOversetDataProxyForSend() { return oversetDataProxyForSend; }
+    OversetDataProxy * GetOversetDataProxyForReceive() { return oversetDataProxyForReceive; }
+public:
+    void PostProcessReceivingOversetInformation();
+    void PostProcessSendingOversetInformation();
+public:
+
+    void SetGrid(Grid *grid) { this->grid = grid; }
+    Grid * GetGrid() { return grid; }
+
+    void PostProcessOversetInformation();
+    void InitializeReceivingInformation(PHVector1D < OversetCell * > *oversetCellContainer);
+
+public:
+    void GetCellIndexContainer(int donorZoneIndexIn, PHVectorInt1D &cellIndexContainer);
+    void GetDonorCellIndexContainer(int donorZoneIndexIn, PHVectorInt1D &donorCellIndexContainer,
+                                                          PHVectorRDouble1D &interCellCenterX,
+                                                          PHVectorRDouble1D &interCellCenterY,
+                                                          PHVectorRDouble1D &interCellCenterZ);
+public:
+    void EncodeOversetInformation(DataContainer *dataContainer);
+    void DecodeOversetInformation(DataContainer *dataContainer);
+};
+
+class ActionKey;
+class OversetInformationProxy;
+
+OversetInformationProxy * GetOversetInformationProxy(int iZone, int gridLevelIndex = 0);
+
+class OversetTopologyManager
+{
+public:
+    OversetTopologyManager();
+    ~OversetTopologyManager();
+protected:
+    PHVectorInt2D oversetTopology;
+    PHVectorInt2D oversetTopologyForSend;
+    PHVectorInt2D oversetTopologyForReceive;
+public:
+    PHVectorInt2D & GetOversetTopology();
+    PHVectorInt2D & GetOversetTopologyForSend();
+    PHVectorInt2D & GetOversetTopologyForReceive();
+
+    uint_t GetNumberOfOversetNeighbors(int zoneIndex);
+    int GetNeighborOversetZoneIndex(int zoneIndex, int ithOversetNeighbor);
+public:
+    void InitializeOversetInterfaceTopology();
+    void InitializeOversetInterfaceTopologyServerCollectAndBcast();
+};
+
+OversetTopologyManager * GetOversetTopologyManager();
+void InitializeOversetInterfaceTopology();
+
+class OversetCell
+{
+public:
+    OversetCell();
+    ~OversetCell();
+protected:
+    int zoneIndex;
+    int cellIndex;
+    int donorZoneIndex;
+    int donorCellIndex;
+public:
+    void SetZoneIndex     (int zoneIndex     ) { this->zoneIndex      = zoneIndex     ; }
+    void SetCellIndex     (int cellIndex     ) { this->cellIndex      = cellIndex     ; }
+    void SetDonorZoneIndex(int donorZoneIndex) { this->donorZoneIndex = donorZoneIndex; }
+    void SetDonorCellIndex(int donorCellIndex) { this->donorCellIndex = donorCellIndex; }
+
+    int GetZoneIndex() { return zoneIndex; }
+    int GetCellIndex() { return cellIndex; }
+    int GetDonorZoneIndex() { return donorZoneIndex; }
+    int GetDonorCellIndex() { return donorCellIndex; }
+};
+
+class OversetInterplateCell
+{
+public:
+    OversetInterplateCell();
+    ~OversetInterplateCell();
+protected:
+    int zoneIndex;
+    int donorZoneIndex;
+    PHVectorInt1D cellIndexContainer;
+    PHVectorInt1D storageIndexContainer;
+    Data_ParamFieldSuite *dataStorage;
+public:
+    Data_ParamFieldSuite * GetDataStorage() { return dataStorage; }
+
+    void SetZoneIndex     (int zoneIndex     ) { this->zoneIndex      = zoneIndex; }
+    void SetDonorZoneIndex(int donorZoneIndex) { this->donorZoneIndex = donorZoneIndex; }
+
+    int GetZoneIndex     () { return zoneIndex; }
+    int GetDonorZoneIndex() { return donorZoneIndex; }
+
+    PHVectorInt1D & GetCellIndexContainer() { return cellIndexContainer; }
+
+    int GetNumberOfOversetInterplateCells() { return static_cast<int>(cellIndexContainer.size()); }
+
+    PHVectorInt1D & GetStorageIndexContainer() { return storageIndexContainer; }
+public:
+    void EncodeOversetInterplateCellInformation(DataContainer *dataContainer);
+    void DecodeOversetInterplateCellInformation(DataContainer *dataContainer);
+};
+
+class OversetDonorCell
+{
+public:
+    OversetDonorCell ();
+    ~OversetDonorCell();
+protected:
+    int zoneIndex;
+    int interplateZoneIndex;
+    PHVectorInt1D donorCellIndexContainer;
+    PHVectorInt1D storageIndexContainer;
+    Data_ParamFieldSuite *dataStorage;
+    PHVectorRDouble1D interCellCenterX;
+    PHVectorRDouble1D interCellCenterY;
+    PHVectorRDouble1D interCellCenterZ;
+public:
+    Data_ParamFieldSuite * GetDataStorage() { return dataStorage; }
+
+    void SetZoneIndex(int zoneIndex) { this->zoneIndex = zoneIndex; }
+    int  GetZoneIndex() { return zoneIndex; }
+
+    void SetInterplateZoneIndex(int interplateZoneIndex) { this->interplateZoneIndex = interplateZoneIndex; }
+    int  GetInterplateZoneIndex() { return interplateZoneIndex; }
+
+    PHVectorInt1D     & GetDonorCellIndexContainer() { return donorCellIndexContainer; }
+    PHVectorRDouble1D & GetInterCellCenterX() { return interCellCenterX; }
+    PHVectorRDouble1D & GetInterCellCenterY() { return interCellCenterY; }
+    PHVectorRDouble1D & GetInterCellCenterZ() { return interCellCenterZ; }
+
+    void SetDonorCellIndexContainer(PHVectorInt1D     & donorCellIndexContainerIn) { this->donorCellIndexContainer = donorCellIndexContainerIn; }
+    void SetInterCellCenterX       (PHVectorRDouble1D & interCellCenterXIn       ) { this->interCellCenterX        = interCellCenterXIn; }
+    void SetInterCellCenterY       (PHVectorRDouble1D & interCellCenterYIn       ) { this->interCellCenterY        = interCellCenterYIn; }
+    void SetInterCellCenterZ       (PHVectorRDouble1D & interCellCenterZIn       ) { this->interCellCenterZ        = interCellCenterZIn; }
+
+    int GetNumberOfOversetDonorCells() { return static_cast<int>(donorCellIndexContainer.size()); }
+
+    PHVectorInt1D & GetStorageIndexContainer() { return storageIndexContainer; }
+public:
+    void EncodeOversetDonorCellInformation(DataContainer *dataContainer);
+    void DecodeOversetDonorCellInformation(DataContainer *dataContainer);
+};
+
+class OversetInterplateCellManager
+{
+public:
+    OversetInterplateCellManager ();
+    ~OversetInterplateCellManager();
+protected:
+    PHVector1D < OversetInterplateCell * > oversetInterplateCellContainer;
+    int totalNumberOfOversetInterplateCells;
+    Data_ParamFieldSuite *dataStorage;
+public:
+    PHVector1D < OversetInterplateCell * > & GetOversetInterplateCellContainer() { return oversetInterplateCellContainer; }
+
+    int GetNumberOfNeighbors() { return static_cast<int>(oversetInterplateCellContainer.size()); }
+
+    int  GetTotalNumberOfOversetInterplateCells() { return totalNumberOfOversetInterplateCells; }
+    void SetTotalNumberOfOversetInterplateCells(int totalNumberOfOversetInterplateCells) { this->totalNumberOfOversetInterplateCells = totalNumberOfOversetInterplateCells; }
+
+    int GetNumberOfOversetInterplateCells(int iNeighbor);
+
+    int * GetOversetInterplateCell(int iNeighbor);
+    int * GetInterplateCellStorageIndex(int iNeighbor);
+
+    Data_ParamFieldSuite * GetDataStorage() { return dataStorage; }
+
+    PHVectorInt1D GetNeighborDonorZoneIndexArray();
+public:
+    void PostProcessReceivingOversetInformation();
+    void EncodeOversetInterplateCellInformation(DataContainer *dataContainer);
+    void DecodeOversetInterplateCellInformation(DataContainer *dataContainer);
+public:
+    void AddOversetInterplateCell(OversetInterplateCell *oversetInterplateCell);
+};
+
+class OversetDonorCellManager
+{
+public:
+    OversetDonorCellManager();
+    ~OversetDonorCellManager();
+protected:
+    PHVector1D < OversetDonorCell * > oversetDonorCellContainer;
+    int totalNumberOfOversetDonorCells;
+    Data_ParamFieldSuite *dataStorage;
+public:
+    PHVector1D < OversetDonorCell * > & GetOversetDonorCellContainer() { return oversetDonorCellContainer; }
+
+    int GetNumberOfNeighbors() { return static_cast<int>(oversetDonorCellContainer.size()); }
+
+    int  GetTotalNumberOfOversetDonorCells() { return totalNumberOfOversetDonorCells; }
+    void SetTotalNumberOfOversetDonorCells(int totalNumberOfOversetDonorCells) { this->totalNumberOfOversetDonorCells = totalNumberOfOversetDonorCells; }
+
+    int GetNumberOfOversetDonorCells(int iNeighbor);
+
+    int * GetOversetDonorCell(int iNeighbor);
+    int * GetDonorCellStorageIndex(int iNeighbor);
+
+    RDouble * GetInterCellCenterX(int iNeighbor);
+    RDouble * GetInterCellCenterY(int iNeighbor);
+    RDouble * GetInterCellCenterZ(int iNeighbor);
+
+    Data_ParamFieldSuite * GetDataStorage() { return dataStorage; }
+
+    PHVectorInt1D GetNeighborInterplateZoneIndexArray();
+public:
+    void PostProcessSendingOversetInformation();
+    void EncodeOversetDonorCellInformation(DataContainer *dataContainer);
+    void DecodeOversetDonorCellInformation(DataContainer *dataContainer);
+public:
+    void AddOversetDonorCell(OversetDonorCell *oversetDonorCell);
+};
+
+uint_t GetNumberOfOversetNeighbors(int zoneIndex);
+int GetNeighborOversetZoneIndex(int zoneIndex, int iNeighbor);
+
+}
diff --git a/API/Geometry/src/FaceProxy.cpp b/API/Geometry/src/FaceProxy.cpp
new file mode 100644
index 0000000..807cea3
--- /dev/null
+++ b/API/Geometry/src/FaceProxy.cpp
@@ -0,0 +1,528 @@
+#include "FaceProxy.h"
+#include "Geo_Interface.h"
+#include "Geo_Interpoint.h"
+#include "Geo_FaceMetrics_Unstruct.h"
+#include "Geo_CellMetrics_Unstruct.h"
+#include "Geo_DynamicGridMetrics_Unstruct.h"
+#include "Geo_LSQWeight_Unstruct.h"
+#include "Geo_UnstructBC.h"
+#include "Pointer.h"
+#include "GeomProxy.h"
+#include "GeneralFieldProxy.h"
+#include "Geo_UnstructGrid.h"
+#include "Geo_FaceTopo_Unstruct.h"
+#include "Math_Limiter.h"
+
+namespace PHSPACE
+{
+FaceProxy::FaceProxy()
+{
+    ql   = 0;
+    qr   = 0;
+    flux = 0;
+
+    qlc  = 0; // GMRESPassQC
+    qrc  = 0; // GMRESPassQC
+
+    qlsign = 0; // GMRESnolim GMRESSign
+    qrsign = 0; // GMRESnolim
+
+    tl   = 0;
+    tr   = 0;
+
+    gamal = 0;
+    gamar = 0;
+
+    deltl = 0;
+    deltr = 0;
+
+    lrtl  = 0;
+    lrtr  = 0;
+
+    tcl  = 0;
+    tcr  = 0;
+
+    pcl  = 0;
+    pcr  = 0;
+
+    ns_facevar   = 0;
+    turb_facevar = 0;
+    transition_facevar = 0;
+    geom_proxy   = 0;
+
+    next = 0;
+    nlen = 0;
+    nsize= 0;
+    neqn = 0;
+
+    leftcellindexofFace     = 0;//GMRES
+    rightcellindexofFace    = 0;
+
+    dRdq = 0; // GMRES
+    dDdP  = 0; // GMRESBoundary
+    dRdq1st = 0; //GMRESJac1st
+    JacOrder = 1; // GMRESJac1st
+}
+
+FaceProxy::~FaceProxy()
+{
+    if (next) delete next;
+
+    DelPointer2(ql);
+    DelPointer2(qr);
+    DelPointer2(flux);
+
+    DelPointer2(qlc); //GMRESPassQC
+    DelPointer2(qrc); //GMRESPassQC
+
+    DelPointer2(tl);
+    DelPointer2(tr);
+
+    delete [] gamal;    gamal = NULL;
+    delete [] gamar;    gamar = NULL;
+
+    delete [] deltl;    deltl = NULL;
+    delete [] deltr;    deltr = NULL;
+
+    delete [] lrtl;    lrtl = NULL;
+    delete [] lrtr;    lrtr = NULL;
+
+    delete[] leftcellindexofFace; leftcellindexofFace = NULL;    // GMRES
+    delete[] rightcellindexofFace; rightcellindexofFace = NULL;
+
+    
+    delete[] qlsign;    qlsign = NULL; // GMRESnolim GMRESSign
+    delete[] qrsign;    qrsign = NULL; // GMRESnolim
+   
+    delete [] tcl;    tcl = NULL;
+    delete [] tcr;    tcr = NULL;
+
+    delete [] pcl;    tcl = NULL;
+    delete [] pcr;    tcr = NULL;
+
+    delete ns_facevar;
+    delete turb_facevar;
+    delete transition_facevar;
+    delete geom_proxy;
+}
+
+void FaceProxy::Create(int nsize, int neqn)
+{
+    this->neqn  = neqn;
+    this->nsize = nsize;
+
+    ql   = NewPointer2<RDouble>(neqn, nsize);
+    qr   = NewPointer2<RDouble>(neqn, nsize);
+    flux = NewPointer2<RDouble>(neqn, nsize);
+
+    qlc  = NewPointer2<RDouble>(neqn,nsize); // GMRESPassQC
+    qrc  = NewPointer2<RDouble>(neqn,nsize); // GMRESPassQC
+
+    gamal = new RDouble[nsize];
+    gamar = new RDouble[nsize];
+
+    deltl = new RDouble[nsize];
+    deltr = new RDouble[nsize];
+
+    lrtl  = new RDouble[nsize];
+    lrtr  = new RDouble[nsize];
+
+    leftcellindexofFace     = new int[nsize]; //GMRES
+    rightcellindexofFace    = new int[nsize];
+
+    qlsign                  = new int[nsize]; //    GMRESnolim GMRESSign
+    qrsign                  = new int[nsize]; //    GMRESnolim GMRESSign
+   
+    tcl  = new RDouble[nsize];
+    tcr  = new RDouble[nsize];
+
+    pcl  = new RDouble[nsize];
+    pcr  = new RDouble[nsize];
+
+    tl = NewPointer2<RDouble>(3, nsize);
+    tr = NewPointer2<RDouble>(3, nsize);
+}
+
+FaceProxy::value_type FaceProxy::GetQL()
+{
+    return ql;
+}
+
+FaceProxy::value_type FaceProxy::GetQR()
+{
+    return qr;
+}
+
+// GMRESPassQC
+FaceProxy::value_type FaceProxy::GetQLC()
+{
+    return qlc;
+}
+
+FaceProxy::value_type FaceProxy::GetQRC()
+{
+    return qrc;
+}
+
+
+FaceProxy::value_type FaceProxy::GetFlux()
+{
+    return flux;
+}
+
+// GMRES
+int* FaceProxy::GetLeftCellIndexOfFace()
+{
+    return leftcellindexofFace;
+}
+
+int* FaceProxy::GetRightCellIndexOfFace()
+{
+    return rightcellindexofFace;
+}
+
+// GMRESnolim GMRESSign
+int* FaceProxy::GetQLSign()
+{
+    return qlsign;
+}
+
+int* FaceProxy::GetQRSign()
+{
+    return qrsign;
+}
+
+// GMRES
+RDouble** FaceProxy::GetJacobianMatrix()
+{
+    return dRdq;
+}
+
+void FaceProxy::SetJacobianMatrix(RDouble** dRdqfromGrid)
+{
+    if(dRdq) DelPointer2(dRdq);
+    dRdq = dRdqfromGrid;
+}
+
+// GMRESJac1st
+RDouble** FaceProxy::GetJacobianMatrix1st()
+{
+    return dRdq1st;
+}
+
+void FaceProxy::SetJacobianMatrix1st(RDouble** dRdq1stfromGrid)
+{
+    if(dRdq1st) DelPointer2(dRdq1st);
+    dRdq1st = dRdq1stfromGrid;
+}
+
+// GMRESBoundary
+RDouble ** FaceProxy::GetdDdPMatrix() 
+{
+    return dDdP;
+}
+
+void FaceProxy::SetdDdPMatrix(RDouble** dDdPfromGrid)
+{
+    if(dDdP) DelPointer2(dDdP);
+    dDdP = dDdPfromGrid;
+}
+
+
+RDouble * FaceProxy::GetGamaL()
+{
+    return gamal;
+}
+
+RDouble * FaceProxy::GetGamaR()
+{
+    return gamar;
+}
+
+RDouble ** FaceProxy::GetLeftTemperature()
+{
+    return tl;
+}
+
+RDouble ** FaceProxy::GetRightTemperature()
+{
+    return tr;
+}
+
+RDouble * FaceProxy::GetPressureCoefficientL()
+{
+    return lrtl;
+}
+
+RDouble * FaceProxy::GetPressureCoefficientR()
+{
+    return lrtr;
+}
+
+RDouble * FaceProxy::GetTimeCoefficientL()
+{
+    return tcl;
+}
+
+RDouble * FaceProxy::GetTimeCoefficientR()
+{
+    return tcr;
+}
+
+RDouble * FaceProxy::GetPreconCoefficientL()
+{
+    return pcl;
+}
+
+RDouble * FaceProxy::GetPreconCoefficientR()
+{
+    return pcr;
+}
+
+RDouble * FaceProxy::GetWeightL()
+{
+    return deltl;
+}
+
+RDouble * FaceProxy::GetWeightR()
+{
+    return deltr;
+}
+
+NSFaceValue * FaceProxy::GetNSFaceValue()
+{
+    return ns_facevar;
+}
+
+void FaceProxy::SetNSFaceValue(NSFaceValue *facevar)
+{
+    if (ns_facevar) delete ns_facevar;
+    ns_facevar = facevar;
+}
+
+TurbFaceValue * FaceProxy::GetTurbFaceValue()
+{
+    return turb_facevar;
+}
+
+void FaceProxy::SetTurbFaceValue(TurbFaceValue *facevar)
+{
+    if (turb_facevar) delete turb_facevar;
+    turb_facevar = facevar;
+}
+
+TransitionFaceValue * FaceProxy::GetTransitionFaceValue()
+{
+    return transition_facevar;
+}
+
+void FaceProxy::SetTransitionFaceValue(TransitionFaceValue *facevar)
+{
+    if (transition_facevar) delete transition_facevar;
+    transition_facevar = facevar;
+}
+
+GeomProxy * FaceProxy::GetGeomProxy()
+{
+    return geom_proxy;
+}
+
+void FaceProxy::SetGeomProxy(GeomProxy *geom_proxy)
+{
+    if (this->geom_proxy) delete this->geom_proxy;
+    this->geom_proxy = geom_proxy;
+}
+
+NSFaceValue::NSFaceValue(int neqn, int ns, int nlen)
+{
+    rho_ds = new GeneralFieldProxy();
+    hint_s = new GeneralFieldProxy();
+    if (!(ns == 0 || nlen == 0))
+    {
+        rho_ds->Create(ns,nlen);
+        hint_s->Create(ns,nlen);
+    }
+
+    kcp = new RDouble[nlen];
+    mul = new RDouble[nlen];
+    mut = new RDouble[nlen];
+
+    prim = new GeneralFieldProxy();
+    prim->Create(neqn,nlen);
+
+    t = new GeneralFieldProxy();
+    t->Create(1,nlen);
+}
+
+NSFaceValue::~NSFaceValue()
+{
+    delete hint_s;
+    delete rho_ds;
+    delete prim;
+    delete t;
+
+    delete [] kcp;    kcp = NULL;
+    delete [] mul;    mul = NULL;
+    delete [] mut;    mut = NULL;
+}
+
+TurbFaceValue::TurbFaceValue(int neqn, int nlen)
+{
+    mul = new RDouble[nlen];
+    mut = new RDouble[nlen];
+
+    mlt  = NewPointer2<RDouble>(neqn, nlen);
+    prim = NewPointer2<RDouble>(neqn, nlen);
+}
+
+TurbFaceValue::~TurbFaceValue()
+{
+    delete [] mul;    mul = NULL;
+    delete [] mut;    mut = NULL;
+
+    DelPointer2(mlt);
+    DelPointer2(prim);
+}
+
+TransitionFaceValue::TransitionFaceValue(int neqn, int nlen)
+{
+    mul = new RDouble[nlen];
+    mut = new RDouble[nlen];
+
+    mlt  = NewPointer2<RDouble>(neqn, nlen);
+    prim = NewPointer2<RDouble>(neqn, nlen);
+}
+
+TransitionFaceValue::~TransitionFaceValue()
+{
+    delete [] mul;    mul = NULL;
+    delete [] mut;    mut = NULL;
+
+    DelPointer2(mlt);
+    DelPointer2(prim);
+}
+
+void ReConstructQlQr_STR(Grid *grid_in, FaceProxy *face_proxy, int neqn, int nst, int ned)
+{
+    UnstructGrid *grid = UnstructGridCast(grid_in);
+
+    int     *left_cell_of_face = grid->GetLeftCellOfFace();
+    int     *right_cell_of_face = grid->GetRightCellOfFace();
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    RDouble **ql = face_proxy->GetQL();
+    RDouble **qr = face_proxy->GetQR();
+
+    int uns_limiter;
+    GlobalDataBase::GetData("uns_limiter", &uns_limiter, PHINT, 1);
+
+    RDouble *qltry = new RDouble[neqn];
+    RDouble *qrtry = new RDouble[neqn];
+
+    RDouble MUSCLCoefXk;
+    GlobalDataBase::GetData("MUSCLCoefXk", &MUSCLCoefXk, PHDOUBLE, 1);
+    RDouble MUSCLCoefXb;
+    GlobalDataBase::GetData("MUSCLCoefXb", &MUSCLCoefXb, PHDOUBLE, 1);
+
+    RDouble dx, dy, dz;
+    RDouble c1, c2;
+
+    c1 = fourth * (1.0 - MUSCLCoefXk);
+    c2 = fourth * (1.0 + MUSCLCoefXk);
+
+    RDouble (*LIMIT_FUN)(const RDouble &x, const RDouble &y);
+
+    if (uns_limiter == ILMT_MINMOD)
+    {
+        LIMIT_FUN = MINMOD;
+    }
+    else if (uns_limiter == ILMT_VAN_ALBADA)
+    {
+        LIMIT_FUN = VANALBADA;
+    }
+    else if (uns_limiter == ILMT_SMOOTH)
+    {
+        LIMIT_FUN = SMOOTH;
+    }
+    else
+    {
+        LIMIT_FUN = VANALBADA;
+    }
+
+    RDouble **dqdx = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **dqdy = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **dqdz = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    int le,re,j;
+    for (int iFace = nst; iFace < ned; ++ iFace)
+    {
+        j  = iFace - nst;
+        le = left_cell_of_face [iFace];
+        re = right_cell_of_face[iFace];
+
+        for (int m = 0; m < neqn; ++ m)
+        {
+            qltry[m] = ql[m][j];
+            qrtry[m] = qr[m][j];
+        }
+
+        dx = xfc[iFace] - xcc[le];
+        dy = yfc[iFace] - ycc[le];
+        dz = zfc[iFace] - zcc[le];
+
+        for (int m = 0; m < neqn; ++ m)
+        {
+            RDouble lx = LIMIT_FUN(dqdx[m][le], dqdx[m][re]);
+            RDouble ly = LIMIT_FUN(dqdy[m][le], dqdy[m][re]);
+            RDouble lz = LIMIT_FUN(dqdz[m][le], dqdz[m][re]);
+            RDouble limdq = lx * dx + ly * dy + lz * dz;
+
+            //limdq = MINMOD(limdq,0.5*(qr[m][j]-ql[m][j]));
+
+            qltry[m] += limdq;
+        }
+
+        dx = xfc[iFace] - xcc[re];
+        dy = yfc[iFace] - ycc[re];
+        dz = zfc[iFace] - zcc[re];
+
+        for (int m = 0; m < neqn; ++ m)
+        {
+            RDouble lx = LIMIT_FUN(dqdx[m][le], dqdx[m][re]);
+            RDouble ly = LIMIT_FUN(dqdy[m][le], dqdy[m][re]);
+            RDouble lz = LIMIT_FUN(dqdz[m][le], dqdz[m][re]);
+            RDouble limdq = lx * dx + ly * dy + lz * dz;
+
+            //limdq = MINMOD(limdq, 0.5*(ql[m][j]-qr[m][j]));
+
+            qrtry[m] += limdq;
+        }
+
+        if (PositiveCheckForDensityAndPressure(qltry))
+        {
+            for (int m = 0; m < neqn; ++ m)
+            {
+                ql[m][j] = qltry[m];
+            }
+        }
+
+        if (PositiveCheckForDensityAndPressure(qrtry))
+        {
+            for (int m = 0; m < neqn; ++ m)
+            {
+                qr[m][j] = qrtry[m];
+            }
+        }
+    }
+
+    delete [] qltry;    qltry = NULL;
+    delete [] qrtry;    qrtry = NULL;
+}
+
+}
+
diff --git a/API/Geometry/src/FieldProxy.cpp b/API/Geometry/src/FieldProxy.cpp
new file mode 100644
index 0000000..a44c030
--- /dev/null
+++ b/API/Geometry/src/FieldProxy.cpp
@@ -0,0 +1,55 @@
+#include "FieldProxy.h"
+#include "Pointer.h"
+
+namespace PHSPACE
+{
+FieldProxy::FieldProxy()
+{
+    field_uns  = 0;
+    field_str  = 0;
+    del_field  = false;
+}
+
+FieldProxy::~FieldProxy()
+{
+    if (del_field)
+    {
+        delete field_str;
+        DelPointer2(field_uns);
+    }
+}
+
+RDouble ***FieldProxy::GetField_UHO()
+{
+    return field_uho;
+}
+
+RDouble ** FieldProxy::GetField_UNS()
+{
+    return field_uns;
+}
+
+RDouble4D & FieldProxy::GetField_STR()
+{
+    return *field_str;
+}
+
+void FieldProxy::SetField_UHO(RDouble ***field_uho, bool del_field)
+{
+    this->field_uho = field_uho;
+    this->del_field = del_field;
+}
+
+void FieldProxy::SetField_UNS(RDouble **field_uns, bool del_field)
+{
+    this->field_uns = field_uns;
+    this->del_field = del_field;
+}
+
+void FieldProxy::SetField_STR(RDouble4D *field_str, bool del_field)
+{
+    this->field_str = field_str;
+    this->del_field = del_field;
+}
+}
+
diff --git a/API/Geometry/src/GRHash.cpp b/API/Geometry/src/GRHash.cpp
new file mode 100644
index 0000000..a68f1a1
--- /dev/null
+++ b/API/Geometry/src/GRHash.cpp
@@ -0,0 +1,38 @@
+#include "GRHash.h"
+#include "Geo_Face.h"
+
+namespace GRIDER_SPACE
+{
+CAulong gethashkey(const Point3D& p)
+{
+    return p.hash_key();
+}
+CAulong gethashkey(const Point3D* p)
+{
+    return p->hash_key();
+}
+CAulong gethashkey(const Geo_Face& face)
+{
+    return face.hash_key();
+}
+CAulong gethashkey(const Geo_Face* face)
+{
+    return face->hash_key();
+}
+bool equal_hash(const Point3D& p1, const Point3D& p2)
+{
+    return (p1 == p2);
+}
+bool equal_hash(const Point3D* p1, const Point3D* p2)
+{
+    return (*p1==*p2);
+}
+bool equal_hash(const Geo_Face& face1, const Geo_Face& face2)
+{
+    return (face1 == face2);
+}
+bool equal_hash(const Geo_Face* face1, const Geo_Face* face2)
+{
+    return (*face1 == *face2);
+}
+}
diff --git a/API/Geometry/src/GeneralFieldProxy.cpp b/API/Geometry/src/GeneralFieldProxy.cpp
new file mode 100644
index 0000000..dc98a2d
--- /dev/null
+++ b/API/Geometry/src/GeneralFieldProxy.cpp
@@ -0,0 +1,36 @@
+#include "GeneralFieldProxy.h"
+#include "Pointer.h"
+
+namespace PHSPACE
+{
+
+GeneralFieldProxy::GeneralFieldProxy()
+{
+    ndim      = 0;
+    nsize     = 0;
+    field     = 0;
+    del_field = false;
+}
+
+GeneralFieldProxy::~GeneralFieldProxy()
+{
+    if (del_field)
+    {
+        DelPointer2(field);
+    }
+}
+
+void GeneralFieldProxy::Create(int ndim, int nsize)
+{
+    this->ndim  = ndim;
+    this->nsize = nsize;
+    del_field   = true;
+    field = NewPointer2<RDouble>(ndim, nsize);
+}
+
+RDouble ** GeneralFieldProxy::GetField()
+{
+    return field;
+}
+}
+
diff --git a/API/Geometry/src/Geo_CellMetrics_Struct.cpp b/API/Geometry/src/Geo_CellMetrics_Struct.cpp
new file mode 100644
index 0000000..2e06d44
--- /dev/null
+++ b/API/Geometry/src/Geo_CellMetrics_Struct.cpp
@@ -0,0 +1,51 @@
+#include "GlobalDataBase.h"
+#include "Geo_CellMetrics_Struct.h"
+
+namespace PHSPACE
+{
+Geo_CellMetrics_Struct::Geo_CellMetrics_Struct()
+{
+    xcc = NULL;
+    ycc = NULL;
+    zcc = NULL;
+    vol = NULL;
+
+    xlen = NULL;
+    ylen = NULL;
+    zlen = NULL;
+
+    jacobian = NULL;
+
+    largestLocalGridLength = NULL;
+    smallestLocalGridLength = NULL;
+    subgridLength = NULL;
+}
+
+Geo_CellMetrics_Struct::~Geo_CellMetrics_Struct()
+{
+    DeallocateAll();
+
+    delete largestLocalGridLength; largestLocalGridLength = NULL;
+    delete smallestLocalGridLength; smallestLocalGridLength = NULL;
+    delete subgridLength; subgridLength = NULL;
+}
+
+void Geo_CellMetrics_Struct::AllocateMetrics(Range &I, Range &J, Range &K)
+{
+    DeallocateAll();
+    xcc = new RDouble3D(I, J, K, fortranArray);
+    ycc = new RDouble3D(I, J, K, fortranArray);
+    zcc = new RDouble3D(I, J, K, fortranArray);
+    vol = new RDouble3D(I, J, K, fortranArray);
+
+    xlen = new RDouble3D(I, J, K, fortranArray);
+    ylen = new RDouble3D(I, J, K, fortranArray);
+    zlen = new RDouble3D(I, J, K, fortranArray);
+
+    int SolverStructOrder = PHSPACE::GlobalDataBase::GetIntParaFromDB("SolverStructOrder");
+    if (SolverStructOrder > 2)
+    {
+        jacobian = new RDouble3D(I, J, K, fortranArray);
+    }
+}
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_CellMetrics_Unstruct.cpp b/API/Geometry/src/Geo_CellMetrics_Unstruct.cpp
new file mode 100644
index 0000000..3f5e020
--- /dev/null
+++ b/API/Geometry/src/Geo_CellMetrics_Unstruct.cpp
@@ -0,0 +1,27 @@
+#include "Geo_CellMetrics_Unstruct.h"
+
+namespace PHSPACE
+{
+LIB_EXPORT Geo_CellMetrics_Unstruct::Geo_CellMetrics_Unstruct()
+{
+    xcc = NULL;
+    ycc = NULL;
+    zcc = NULL;
+    vol = NULL;
+
+    largestLocalGridLength = NULL;
+    subgridLength = NULL;
+}
+
+LIB_EXPORT Geo_CellMetrics_Unstruct::~Geo_CellMetrics_Unstruct()
+{
+    delete [] xcc; xcc = NULL;
+    delete [] ycc; ycc = NULL;
+    delete [] zcc; zcc = NULL;
+    delete [] vol; vol = NULL;
+
+    delete [] largestLocalGridLength; largestLocalGridLength = NULL;
+    delete [] subgridLength; subgridLength = NULL;
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_CellTopo_Unstruct.cpp b/API/Geometry/src/Geo_CellTopo_Unstruct.cpp
new file mode 100644
index 0000000..dab54df
--- /dev/null
+++ b/API/Geometry/src/Geo_CellTopo_Unstruct.cpp
@@ -0,0 +1,43 @@
+#include "Geo_CellTopo_Unstruct.h"
+#include "Pointer.h"
+
+namespace PHSPACE
+{
+LIB_EXPORT Geo_CellTopo_Unstruct::Geo_CellTopo_Unstruct()
+{
+    face_number_of_each_cell = NULL;
+    cell2face = NULL;
+
+    number_of_neighbor_cell = NULL;
+    cell2cell = NULL;
+
+    node_number_of_each_cell = NULL;
+    cell2node = NULL;
+    cell2nodeArray = NULL;
+
+    // GMRESVis
+    neighborCells   = NULL;
+    neighborFaces   = NULL;
+    neighborLR      = NULL;
+}
+
+LIB_EXPORT Geo_CellTopo_Unstruct::~Geo_CellTopo_Unstruct()
+{
+    DelPointer2(cell2face);
+    DelPointer2(cell2nodeArray);
+
+    delete [] face_number_of_each_cell;
+    delete [] cell2node;
+
+    delete [] number_of_neighbor_cell;
+    delete [] cell2cell;
+
+    if (node_number_of_each_cell) delete [] node_number_of_each_cell;
+
+    // GMRESVis
+    delete [] neighborCells;
+    delete [] neighborFaces;
+    delete [] neighborLR;
+}
+
+}
diff --git a/API/Geometry/src/Geo_DynamicGridMetrics_Struct.cpp b/API/Geometry/src/Geo_DynamicGridMetrics_Struct.cpp
new file mode 100644
index 0000000..29b4682
--- /dev/null
+++ b/API/Geometry/src/Geo_DynamicGridMetrics_Struct.cpp
@@ -0,0 +1,20 @@
+#include "Geo_DynamicGridMetrics_Struct.h"
+
+namespace PHSPACE
+{
+
+Geo_DynamicGridMetrics_Struct::Geo_DynamicGridMetrics_Struct()
+{
+    voln = NULL;
+    xfv = NULL;
+    yfv = NULL;
+    zfv = NULL;
+    vgn = NULL;
+}
+
+Geo_DynamicGridMetrics_Struct::~Geo_DynamicGridMetrics_Struct()
+{
+    DeallocateAll();
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_DynamicGridMetrics_Unstruct.cpp b/API/Geometry/src/Geo_DynamicGridMetrics_Unstruct.cpp
new file mode 100644
index 0000000..4576a73
--- /dev/null
+++ b/API/Geometry/src/Geo_DynamicGridMetrics_Unstruct.cpp
@@ -0,0 +1,23 @@
+#include "Geo_DynamicGridMetrics_Unstruct.h"
+
+namespace PHSPACE
+{
+LIB_EXPORT Geo_DynamicGridMetrics_Unstruct::Geo_DynamicGridMetrics_Unstruct()
+{
+    voln = NULL;
+    vgn  = NULL;
+    xfv  = NULL;
+    yfv  = NULL;
+    zfv  = NULL;
+}
+
+LIB_EXPORT Geo_DynamicGridMetrics_Unstruct::~Geo_DynamicGridMetrics_Unstruct()
+{
+    if (voln) delete [] voln; voln = NULL;
+    if (vgn) delete [] vgn ; vgn  = NULL;
+    if (xfv) delete [] xfv ; xfv  = NULL;
+    if (yfv) delete [] yfv ; yfv  = NULL;
+    if (zfv) delete [] zfv ; zfv  = NULL;
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_Element.cpp b/API/Geometry/src/Geo_Element.cpp
new file mode 100644
index 0000000..8b109be
--- /dev/null
+++ b/API/Geometry/src/Geo_Element.cpp
@@ -0,0 +1,3015 @@
+#include "Geo_Element.h"
+//#include "Constants.h"
+#include "Glb_Dimension.h"
+using namespace std;
+
+namespace PHSPACE
+{
+
+BasicElement::BasicElement()
+{
+    
+}
+
+BasicElement::~BasicElement()
+{
+}
+
+int BasicElement::GetElementNodeNumber(int elem_type)
+{
+    int node_number = 0;
+    if (elem_type == NODE)
+    {
+        node_number = 1;
+    }
+    else if (elem_type == BAR_2)
+    {
+        node_number = 2;
+    }
+    else if (elem_type == BAR_3)
+    {
+        node_number = 3;
+    }
+    else if (elem_type == TRI_3)
+    {
+        node_number = 3;
+    }
+    else if (elem_type == TRI_6)
+    {
+        node_number = 6;
+    }
+    else if (elem_type == QUAD_4)
+    {
+        node_number = 4;
+    }
+    else if (elem_type == QUAD_6)
+    {
+        node_number = 6;
+    }
+    else if (elem_type == QUAD_8)
+    {
+        node_number = 8;
+    }
+    else if (elem_type == QUAD_9)
+    {
+        node_number = 9;
+    }
+    else if (elem_type == TETRA_4)
+    {
+        node_number = 4;
+    }
+    else if (elem_type == TETRA_10)
+    {
+        node_number = 10;
+    }
+    else if (elem_type == PYRA_5)
+    {
+        node_number = 5;
+    }
+    else if (elem_type == PYRA_14)
+    {
+        node_number = 14;
+    }
+    else if (elem_type == PENTA_6)
+    {
+        node_number = 6;
+    }
+    else if (elem_type == PENTA_12)
+    {
+        node_number = 12;
+    }
+    else if (elem_type == PENTA_15)
+    {
+        node_number = 15;
+    }
+    else if (elem_type == PENTA_18)
+    {
+        node_number = 18;
+    }
+    else if (elem_type == HEXA_8)
+    {
+        node_number = 8;
+    }
+    else if (elem_type == HEXA_20)
+    {
+        node_number = 20;
+    }
+    else if (elem_type == HEXA_27)
+    {
+        node_number = 27;
+    }
+
+    return node_number;
+}
+
+void BasicElement::Init(int elem_type)
+{
+    this->elem_type = elem_type;
+
+    int node_max = GetElementNodeNumber(elem_type);
+    mp_struct.resize(node_max);
+
+    if (elem_type == NODE)
+    {
+        //Face 1
+        // 1
+
+        face_list.resize(1);
+        face_list[0].push_back(1-1);
+    }
+    else if (elem_type == BAR_2)
+    {
+        //Face 1
+        // 1 2
+
+        face_list.resize(1);
+        face_list[0].push_back(1-1);
+        face_list[0].push_back(2-1);
+    }
+    else if (elem_type == BAR_3)
+    {
+        //Face 2
+        // 1 3
+        // 3 2
+
+        face_element_type.resize(2);
+        face_list.resize(2);
+        face_element_type[0] = BAR_2;
+        face_list[0].push_back(1-1);
+        face_list[0].push_back(3-1);
+
+        face_element_type[1] = BAR_2;
+        face_list[1].push_back(3-1);
+        face_list[1].push_back(2-1);
+
+
+        //! BAR_3
+        //! 1.........3..........2
+        //! For the midpoint 3, the adjacent points are 1and 2,change them to subscript which starts from zero is (0,1).
+        int_array &mp = mp_struct[2];
+        mp.push_back(0);
+        mp.push_back(1);
+
+        //! subcell
+        //! BAR_2 1 3
+        //! BAR_2 3 2
+
+        child_element_type.resize(2);
+        child_element_index.resize(2);
+
+        child_element_type[0] = BAR_2;
+        child_element_index[0].push_back(1-1);
+        child_element_index[0].push_back(3-1);
+
+        child_element_type[1] = BAR_2;
+        child_element_index[1].push_back(3-1);
+        child_element_index[1].push_back(2-1);
+    }
+    else if (elem_type == TRI_3)
+    {
+        //! TRI_3
+        //! 1.........2.........3
+
+        //! Face 3
+        //! 1 2
+        //! 2 3
+        //! 3 1
+        face_element_type.resize(3);
+        face_list.resize(3);
+
+        face_element_type[0] = BAR_2;
+        face_list[0].push_back(1-1);
+        face_list[0].push_back(2-1);
+
+        face_element_type[1] = BAR_2;
+        face_list[1].push_back(2-1);
+        face_list[1].push_back(3-1);
+
+        face_element_type[2] = BAR_2;
+        face_list[2].push_back(3-1);
+        face_list[2].push_back(1-1);
+    }
+    else if (elem_type == TRI_6)
+    {
+        //! TRI_6
+        //! 1....4....2 ...5....3....6....1
+
+        //! Composite Face 3
+        //! BAR_3 1 2 4
+        //! BAR_3 2 3 5
+        //! BAR_3 3 1 6
+        composite_face_element_type.resize(3);
+        composite_face_list.resize(3);
+
+        composite_face_element_type[0] = BAR_3;
+        composite_face_list[0].push_back(1-1);
+        composite_face_list[0].push_back(2-1);
+        composite_face_list[0].push_back(4-1);
+
+        composite_face_element_type[1] = BAR_3;
+        composite_face_list[1].push_back(2-1);
+        composite_face_list[1].push_back(3-1);
+        composite_face_list[1].push_back(5-1);
+
+        composite_face_element_type[2] = BAR_3;
+        composite_face_list[2].push_back(3-1);
+        composite_face_list[2].push_back(1-1);
+        composite_face_list[2].push_back(6-1);
+
+        face_element_type.resize(6);
+        face_list.resize(6);
+        face_element_type[0] = BAR_2;
+        face_list[0].push_back(1-1);
+        face_list[0].push_back(4-1);
+
+        face_element_type[1] = BAR_2;
+        face_list[1].push_back(4-1);
+        face_list[1].push_back(2-1);
+
+        face_element_type[2] = BAR_2;
+        face_list[2].push_back(2-1);
+        face_list[2].push_back(5-1);
+
+        face_element_type[3] = BAR_2;
+        face_list[3].push_back(5-1);
+        face_list[3].push_back(3-1);
+
+        face_element_type[4] = BAR_2;
+        face_list[4].push_back(3-1);
+        face_list[4].push_back(6-1);
+
+        face_element_type[5] = BAR_2;
+        face_list[5].push_back(6-1);
+        face_list[5].push_back(1-1);
+
+
+        //! Face 6
+        //! 1 4
+        //! 4 2
+        //! 2 5
+        //! 5 3
+        //! 3 6
+        //! 6 1
+        face_element_type.resize(6);
+        face_list.resize(6);
+        face_element_type[0] = BAR_2;
+        face_list[0].push_back(1-1);
+        face_list[0].push_back(4-1);
+
+        face_element_type[1] = BAR_2;
+        face_list[1].push_back(4-1);
+        face_list[1].push_back(2-1);
+
+        face_element_type[2] = BAR_2;
+        face_list[2].push_back(2-1);
+        face_list[2].push_back(5-1);
+
+        face_element_type[3] = BAR_2;
+        face_list[3].push_back(5-1);
+        face_list[3].push_back(3-1);
+
+        face_element_type[4] = BAR_2;
+        face_list[4].push_back(3-1);
+        face_list[4].push_back(6-1);
+
+        face_element_type[5] = BAR_2;
+        face_list[5].push_back(6-1);
+        face_list[5].push_back(1-1);
+
+        //! TRI_6
+        //! 1.........4..........2
+        //! 2.........5..........3
+        //! 3.........6..........1
+
+        mp_struct[3].push_back(0);
+        mp_struct[3].push_back(1);
+
+        mp_struct[4].push_back(1);
+        mp_struct[4].push_back(2);
+
+        mp_struct[5].push_back(2);
+        mp_struct[5].push_back(0);
+
+        //! subcell
+        //! TRI_3 1 4 6
+        //! TRI_3 4 2 5
+        //! TRI_3 4 5 6
+        //! TRI_3 6 5 3 
+
+        child_element_type.resize(4);
+        child_element_index.resize(4);
+
+        child_element_type[0] = TRI_3;
+        child_element_index[0].push_back(1-1);
+        child_element_index[0].push_back(4-1);
+        child_element_index[0].push_back(6-1);
+
+        child_element_type[1] = TRI_3;
+        child_element_index[1].push_back(4-1);
+        child_element_index[1].push_back(2-1);
+        child_element_index[1].push_back(5-1);
+
+        child_element_type[2] = TRI_3;
+        child_element_index[2].push_back(4-1);
+        child_element_index[2].push_back(5-1);
+        child_element_index[2].push_back(6-1);
+
+        child_element_type[3] = TRI_3;
+        child_element_index[3].push_back(6-1);
+        child_element_index[3].push_back(5-1);
+        child_element_index[3].push_back(3-1);
+    }
+    else if (elem_type == QUAD_4)
+    {
+        //! QUAD_4
+        //! 1....2....3 ...4....1
+
+        //! Face 4
+        //! 1 2
+        //! 2 3
+        //! 3 4
+        //! 4 1
+        face_element_type.resize(4);
+        face_list.resize(4);
+
+        face_element_type[0] = BAR_2;
+        face_list[0].push_back(1-1);
+        face_list[0].push_back(2-1);
+
+        face_element_type[1] = BAR_2;
+        face_list[1].push_back(2-1);
+        face_list[1].push_back(3-1);
+
+        face_element_type[2] = BAR_2;
+        face_list[2].push_back(3-1);
+        face_list[2].push_back(4-1);
+
+        face_element_type[3] = BAR_2;
+        face_list[3].push_back(4-1);
+        face_list[3].push_back(1-1);
+    }
+    else if (elem_type == QUAD_6)
+    {
+        //! QUAD_6
+        //! Composite Face 4
+        composite_face_element_type.resize(2);
+        composite_face_list.resize(2);
+
+        composite_face_element_type[ 0 ] = BAR_3;
+        composite_face_list[ 0 ].push_back(1 - 1);
+        composite_face_list[ 0 ].push_back(2 - 1);
+        composite_face_list[ 0 ].push_back(5 - 1);
+
+        composite_face_element_type[ 1 ] = BAR_3;
+        composite_face_list[ 1 ].push_back(3 - 1);
+        composite_face_list[ 1 ].push_back(4 - 1);
+        composite_face_list[ 1 ].push_back(6 - 1);
+
+        //! Face
+        face_element_type.resize(6);
+        face_list.resize(6);
+
+        face_element_type[ 0 ] = BAR_2;
+        face_list[ 0 ].push_back(1 - 1);
+        face_list[ 0 ].push_back(5 - 1);
+
+        face_element_type[ 1 ] = BAR_2;
+        face_list[ 1 ].push_back(5 - 1);
+        face_list[ 1 ].push_back(2 - 1);
+
+        face_element_type[ 2 ] = BAR_2;
+        face_list[ 2 ].push_back(2 - 1);
+        face_list[ 2 ].push_back(3 - 1);
+
+        face_element_type[ 3 ] = BAR_2;
+        face_list[ 3 ].push_back(3 - 1);
+        face_list[ 3 ].push_back(6 - 1);
+
+        face_element_type[ 4 ] = BAR_2;
+        face_list[ 4 ].push_back(6 - 1);
+        face_list[ 4 ].push_back(4 - 1);
+
+        face_element_type[ 5 ] = BAR_2;
+        face_list[ 5 ].push_back(4 - 1);
+        face_list[ 5 ].push_back(1 - 1);
+
+
+        //! QUAD_6
+        mp_struct[ 4 ].push_back(0);
+        mp_struct[ 4 ].push_back(1);
+
+        mp_struct[ 5 ].push_back(2);
+        mp_struct[ 5 ].push_back(3);
+
+        //! subcell
+        child_element_type.resize(2);
+        child_element_index.resize(2);
+
+        child_element_type[ 0 ] = QUAD_4;
+        child_element_index[ 0 ].push_back(1 - 1);
+        child_element_index[ 0 ].push_back(5 - 1);
+        child_element_index[ 0 ].push_back(6 - 1);
+        child_element_index[ 0 ].push_back(4 - 1);
+
+        child_element_type[ 1 ] = QUAD_4;
+        child_element_index[ 1 ].push_back(5 - 1);
+        child_element_index[ 1 ].push_back(2 - 1);
+        child_element_index[ 1 ].push_back(3 - 1);
+        child_element_index[ 1 ].push_back(6 - 1);
+    }
+    else if (elem_type == QUAD_8)
+    {
+        //! QUAD_8
+        //! 1..5.2..6..3..7..4..8..1
+
+        //! Composite Face 4
+        //! BAR_3 1 2 5
+        //! BAR_3 2 3 6
+        //! BAR_3 3 4 7
+        //! BAR_3 4 1 8
+        composite_face_element_type.resize(4);
+        composite_face_list.resize(4);
+
+        composite_face_element_type[0] = BAR_3;
+        composite_face_list[0].push_back(1-1);
+        composite_face_list[0].push_back(2-1);
+        composite_face_list[0].push_back(5-1);
+
+        composite_face_element_type[1] = BAR_3;
+        composite_face_list[1].push_back(2-1);
+        composite_face_list[1].push_back(3-1);
+        composite_face_list[1].push_back(6-1);
+
+        composite_face_element_type[2] = BAR_3;
+        composite_face_list[2].push_back(3-1);
+        composite_face_list[2].push_back(4-1);
+        composite_face_list[2].push_back(7-1);
+
+        composite_face_element_type[3] = BAR_3;
+        composite_face_list[3].push_back(4-1);
+        composite_face_list[3].push_back(1-1);
+        composite_face_list[3].push_back(8-1);
+
+        //! Face 8
+        //! 1 5
+        //! 5 2
+        //! 2 6
+        //! 6 3
+
+        //! 3 7
+        //! 7 4
+        //! 4 8
+        //! 8 1
+
+        face_element_type.resize(8);
+        face_list.resize(8);
+
+        face_element_type[0] = BAR_2;
+        face_list[0].push_back(1-1);
+        face_list[0].push_back(5-1);
+
+        face_element_type[1] = BAR_2;
+        face_list[1].push_back(5-1);
+        face_list[1].push_back(2-1);
+
+        face_element_type[2] = BAR_2;
+        face_list[2].push_back(2-1);
+        face_list[2].push_back(6-1);
+
+        face_element_type[3] = BAR_2;
+        face_list[3].push_back(6-1);
+        face_list[3].push_back(3-1);
+
+        face_element_type[4] = BAR_2;
+        face_list[4].push_back(3-1);
+        face_list[4].push_back(7-1);
+
+        face_element_type[5] = BAR_2;
+        face_list[5].push_back(7-1);
+        face_list[5].push_back(4-1);
+
+        face_element_type[6] = BAR_2;
+        face_list[6].push_back(4-1);
+        face_list[6].push_back(8-1);
+
+        face_element_type[7] = BAR_2;
+        face_list[7].push_back(8-1);
+        face_list[7].push_back(1-1);
+
+        //! QUAD_8
+        //! 1.........5..........2
+        //! 2.........6..........3
+        //! 3.........7..........4
+        //! 4.........8..........1
+
+        mp_struct[4].push_back(0);
+        mp_struct[4].push_back(1);
+
+        mp_struct[5].push_back(1);
+        mp_struct[5].push_back(2);
+
+        mp_struct[6].push_back(2);
+        mp_struct[6].push_back(3);
+
+        mp_struct[7].push_back(3);
+        mp_struct[7].push_back(0);
+    }
+    else if (elem_type == QUAD_9)
+    {
+        //! QUAD_9
+        //! 1..5.2..6..3..7..4..8..1
+
+        //! Composite Face 4
+        //! BAR_3 1 2 5
+        //! BAR_3 2 3 6
+        //! BAR_3 3 4 7
+        //! BAR_3 4 1 8
+        composite_face_element_type.resize(4);
+        composite_face_list.resize(4);
+
+        composite_face_element_type[0] = BAR_3;
+        composite_face_list[0].push_back(1-1);
+        composite_face_list[0].push_back(2-1);
+        composite_face_list[0].push_back(5-1);
+
+        composite_face_element_type[1] = BAR_3;
+        composite_face_list[1].push_back(2-1);
+        composite_face_list[1].push_back(3-1);
+        composite_face_list[1].push_back(6-1);
+
+        composite_face_element_type[2] = BAR_3;
+        composite_face_list[2].push_back(3-1);
+        composite_face_list[2].push_back(4-1);
+        composite_face_list[2].push_back(7-1);
+
+        composite_face_element_type[3] = BAR_3;
+        composite_face_list[3].push_back(4-1);
+        composite_face_list[3].push_back(1-1);
+        composite_face_list[3].push_back(8-1);
+
+        //! Face 8
+        //! 1 5
+        //! 5 2
+        //! 2 6
+        //! 6 3
+
+        //! 3 7
+        //! 7 4
+        //! 4 8
+        //! 8 1
+        face_element_type.resize(8);
+        face_list.resize(8);
+
+        face_element_type[0] = BAR_2;
+        face_list[0].push_back(1-1);
+        face_list[0].push_back(5-1);
+
+        face_element_type[1] = BAR_2;
+        face_list[1].push_back(5-1);
+        face_list[1].push_back(2-1);
+
+        face_element_type[2] = BAR_2;
+        face_list[2].push_back(2-1);
+        face_list[2].push_back(6-1);
+
+        face_element_type[3] = BAR_2;
+        face_list[3].push_back(6-1);
+        face_list[3].push_back(3-1);
+
+        face_element_type[4] = BAR_2;
+        face_list[4].push_back(3-1);
+        face_list[4].push_back(7-1);
+
+        face_element_type[5] = BAR_2;
+        face_list[5].push_back(7-1);
+        face_list[5].push_back(4-1);
+
+        face_element_type[6] = BAR_2;
+        face_list[6].push_back(4-1);
+        face_list[6].push_back(8-1);
+
+        face_element_type[7] = BAR_2;
+        face_list[7].push_back(8-1);
+        face_list[7].push_back(1-1);
+
+        //!QUAD_9
+        //! 1.........5..........2
+        //! 2.........6..........3
+        //! 3.........7..........4
+        //! 4.........8..........1
+        //! 1 2.........9..........3 4
+
+        mp_struct[4].push_back(0);
+        mp_struct[4].push_back(1);
+
+        mp_struct[5].push_back(1);
+        mp_struct[5].push_back(2);
+
+        mp_struct[6].push_back(2);
+        mp_struct[6].push_back(3);
+
+        mp_struct[7].push_back(3);
+        mp_struct[7].push_back(0);
+
+        mp_struct[8].push_back(0);
+        mp_struct[8].push_back(1);
+        mp_struct[8].push_back(2);
+        mp_struct[8].push_back(3);
+
+        //! subcell
+        //! QUAD_4 : 1 5 9 8
+        //! QUAD_4 : 5 2 6 9
+        //! QUAD_4 : 9 6 3 7
+        //! QUAD_4 : 8 9 7 4
+
+        child_element_type.resize(4);
+        child_element_index.resize(4);
+
+        child_element_type[0] = QUAD_4;
+        child_element_index[0].push_back(1-1);
+        child_element_index[0].push_back(5-1);
+        child_element_index[0].push_back(9-1);
+        child_element_index[0].push_back(8-1);
+
+        child_element_type[1] = QUAD_4;
+        child_element_index[1].push_back(5-1);
+        child_element_index[1].push_back(2-1);
+        child_element_index[1].push_back(6-1);
+        child_element_index[1].push_back(9-1);
+
+        child_element_type[2] = QUAD_4;
+        child_element_index[2].push_back(9-1);
+        child_element_index[2].push_back(6-1);
+        child_element_index[2].push_back(3-1);
+        child_element_index[2].push_back(7-1);
+
+        child_element_type[3] = QUAD_4;
+        child_element_index[3].push_back(8-1);
+        child_element_index[3].push_back(9-1);
+        child_element_index[3].push_back(7-1);
+        child_element_index[3].push_back(4-1);
+    }
+    else if (elem_type == TETRA_4)
+    {
+        //! TETRA_4
+        //! 1..2...3...4
+
+        //! Face 4
+        //! 1 3 2
+        //! 1 2 4
+        //! 2 3 4
+        //! 3 1 4
+
+        face_element_type.resize(4);
+        face_list.resize(4);
+
+        face_element_type[0] = TRI_3;
+        face_list[0].push_back(1-1);
+        face_list[0].push_back(3-1);
+        face_list[0].push_back(2-1);
+
+        face_element_type[1] = TRI_3;
+        face_list[1].push_back(1-1);
+        face_list[1].push_back(2-1);
+        face_list[1].push_back(4-1);
+
+        face_element_type[2] = TRI_3;
+        face_list[2].push_back(2-1);
+        face_list[2].push_back(3-1);
+        face_list[2].push_back(4-1);
+
+        face_element_type[3] = TRI_3;
+        face_list[3].push_back(3-1);
+        face_list[3].push_back(1-1);
+        face_list[3].push_back(4-1);
+    }
+    else if (elem_type == TETRA_10)
+    {
+        //! TETRA_10
+        //! 1..7..3..6..2..5..1
+
+        //! Composite Face 4
+        //! TRI_6 1  3  2  7  6  5
+        //! TRI_6 2  3  4  6  10 9
+        //! TRI_6 3  1  4  7  8  10
+        //! TRI_6 1  2  4  5  9  8
+        composite_face_element_type.resize(4);
+        composite_face_list.resize(4);
+
+        composite_face_element_type[0] = TRI_6;
+        composite_face_list[0].push_back(1-1);
+        composite_face_list[0].push_back(3-1);
+        composite_face_list[0].push_back(2-1);
+        composite_face_list[0].push_back(7-1);
+        composite_face_list[0].push_back(6-1);
+        composite_face_list[0].push_back(5-1);
+
+        composite_face_element_type[1] = TRI_6;
+        composite_face_list[1].push_back(2-1);
+        composite_face_list[1].push_back(3-1);
+        composite_face_list[1].push_back(4-1);
+        composite_face_list[1].push_back(6-1);
+        composite_face_list[1].push_back(10-1);
+        composite_face_list[1].push_back(9-1);
+
+        composite_face_element_type[2] = TRI_6;
+        composite_face_list[2].push_back(3-1);
+        composite_face_list[2].push_back(1-1);
+        composite_face_list[2].push_back(4-1);
+        composite_face_list[2].push_back(7-1);
+        composite_face_list[2].push_back(8-1);
+        composite_face_list[2].push_back(10-1);
+
+        composite_face_element_type[3] = TRI_6;
+        composite_face_list[3].push_back(1-1);
+        composite_face_list[3].push_back(2-1);
+        composite_face_list[3].push_back(4-1);
+        composite_face_list[3].push_back(5-1);
+        composite_face_list[3].push_back(9-1);
+        composite_face_list[3].push_back(8-1);
+
+        //! Face 16
+        //! 1  7  5
+        //! 7  6  5
+        //! 5  6  2
+        //! 6  7  3
+
+        face_element_type.resize(16);
+        face_list.resize(16);
+
+        face_element_type[0]= TRI_3;
+        face_list[0].push_back(1-1);
+        face_list[0].push_back(7-1);
+        face_list[0].push_back(5-1);
+
+        face_element_type[1]= TRI_3;
+        face_list[1].push_back(7-1);
+        face_list[1].push_back(6-1);
+        face_list[1].push_back(5-1);
+
+        face_element_type[2]= TRI_3;
+        face_list[2].push_back(5-1);
+        face_list[2].push_back(6-1);
+        face_list[2].push_back(2-1);
+
+        face_element_type[3]= TRI_3;
+        face_list[3].push_back(6-1);
+        face_list[3].push_back(7-1);
+        face_list[3].push_back(3-1);
+
+        //! 2..6..3..10..4..9..2
+        //! 2  6  9
+        //! 9  6  10
+        //! 10 6  3
+        //! 10 4  9
+
+        face_element_type[4]= TRI_3;
+        face_list[4].push_back(2-1);
+        face_list[4].push_back(6-1);
+        face_list[4].push_back(9-1);
+
+        face_element_type[5]= TRI_3;
+        face_list[5].push_back(9 -1);
+        face_list[5].push_back(6 -1);
+        face_list[5].push_back(10-1);
+
+        face_element_type[6]= TRI_3;
+        face_list[6].push_back(10-1);
+        face_list[6].push_back(6 -1);
+        face_list[6].push_back(3 -1);
+
+        face_element_type[7]= TRI_3;
+        face_list[7].push_back(10-1);
+        face_list[7].push_back(4 -1);
+        face_list[7].push_back(9 -1);
+
+        //! 1..8..4..10..3..7..1
+        //! 1  8  7
+        //! 8  10 7
+        //! 10 3  7
+        //! 10 8  4
+
+        face_element_type[8]= TRI_3;
+        face_list[8].push_back(1-1);
+        face_list[8].push_back(8-1);
+        face_list[8].push_back(7-1);
+
+        face_element_type[9]= TRI_3;
+        face_list[9].push_back(8 -1);
+        face_list[9].push_back(10-1);
+        face_list[9].push_back(7 -1);
+
+        face_element_type[10]= TRI_3;
+        face_list[10].push_back(10-1);
+        face_list[10].push_back(3 -1);
+        face_list[10].push_back(7 -1);
+
+        face_element_type[11]= TRI_3;
+        face_list[11].push_back(10-1);
+        face_list[11].push_back(8 -1);
+        face_list[11].push_back(4 -1);
+
+        //! 1..5..2..9..4..8..1
+        //! 1  5  8
+        //! 8  5  9
+        //! 9  5  2
+        //! 9  4  8
+        face_element_type[12]= TRI_3;
+        face_list[12].push_back(1-1);
+        face_list[12].push_back(5-1);
+        face_list[12].push_back(8-1);
+
+        face_element_type[13]= TRI_3;
+        face_list[13].push_back(8-1);
+        face_list[13].push_back(5-1);
+        face_list[13].push_back(9-1);
+
+        face_element_type[14]= TRI_3;
+        face_list[14].push_back(9-1);
+        face_list[14].push_back(5-1);
+        face_list[14].push_back(2-1);
+
+        face_element_type[15]= TRI_3;
+        face_list[15].push_back(9-1);
+        face_list[15].push_back(4-1);
+        face_list[15].push_back(8-1);
+
+        //! TETRA_10
+        //! 1.........5..........2
+        //! 2.........6..........3
+        //! 3.........7..........1
+
+        //! 1.........8..........4
+        //! 2.........9..........4
+        //! 3.........10.........4
+
+        mp_struct[4].push_back(1-1);
+        mp_struct[4].push_back(2-1);
+
+        mp_struct[5].push_back(2-1);
+        mp_struct[5].push_back(3-1);
+
+        mp_struct[6].push_back(3-1);
+        mp_struct[6].push_back(1-1);
+
+        mp_struct[7].push_back(1-1);
+        mp_struct[7].push_back(4-1);
+
+        mp_struct[8].push_back(2-1);
+        mp_struct[8].push_back(4-1);
+
+        mp_struct[9].push_back(3-1);
+        mp_struct[9].push_back(4-1);
+
+        //! subcell
+        //! TETRA_4 : 8  5  1  7
+        //! TETRA_4 : 8  9  5  7
+        //! TETRA_4 : 9  10 6  7
+        //! TETRA_4 : 10 3  6  7
+        //! TETRA_4 : 2  6  5  9
+        //! TETRA_4 : 5  6  7  9
+        //! TETRA_4 : 4  8  10 9
+        //! TETRA_4 : 10 8  7  9
+
+        child_element_type.resize(8);
+        child_element_index.resize(8);
+
+        child_element_type[0] = TETRA_4;
+        child_element_index[0].push_back(8-1);
+        child_element_index[0].push_back(5-1);
+        child_element_index[0].push_back(1-1);
+        child_element_index[0].push_back(7-1);
+
+        child_element_type[1] = TETRA_4;
+        child_element_index[1].push_back(8-1);
+        child_element_index[1].push_back(9-1);
+        child_element_index[1].push_back(5-1);
+        child_element_index[1].push_back(7-1);
+
+        child_element_type[2] = TETRA_4;
+        child_element_index[2].push_back(9-1);
+        child_element_index[2].push_back(10-1);
+        child_element_index[2].push_back(6-1);
+        child_element_index[2].push_back(7-1);
+
+        child_element_type[3] = TETRA_4;
+        child_element_index[3].push_back(10-1);
+        child_element_index[3].push_back(3-1);
+        child_element_index[3].push_back(6-1);
+        child_element_index[3].push_back(7-1);
+
+        child_element_type[4] = TETRA_4;
+        child_element_index[4].push_back(2-1);
+        child_element_index[4].push_back(6-1);
+        child_element_index[4].push_back(5-1);
+        child_element_index[4].push_back(9-1);
+
+        child_element_type[5] = TETRA_4;
+        child_element_index[5].push_back(5-1);
+        child_element_index[5].push_back(6-1);
+        child_element_index[5].push_back(7-1);
+        child_element_index[5].push_back(9-1);
+
+        child_element_type[6] = TETRA_4;
+        child_element_index[6].push_back(4-1);
+        child_element_index[6].push_back(8-1);
+        child_element_index[6].push_back(10-1);
+        child_element_index[6].push_back(9-1);
+
+        child_element_type[7] = TETRA_4;
+        child_element_index[7].push_back(10-1);
+        child_element_index[7].push_back(8-1);
+        child_element_index[7].push_back(7-1);
+        child_element_index[7].push_back(9-1);
+
+        //! Case2: A second quad-dividing method.
+        child_element_index_case2.resize(8);
+
+        child_element_index_case2[ 0 ].push_back(8 - 1);    //! Store the corresponding composite elements index number according to the local index numbering sequence of child elements!!! 
+        child_element_index_case2[ 0 ].push_back(5 - 1);
+        child_element_index_case2[ 0 ].push_back(1 - 1);
+        child_element_index_case2[ 0 ].push_back(7 - 1);////////////
+
+        child_element_index_case2[ 1 ].push_back(9 - 1);
+        child_element_index_case2[ 1 ].push_back(8 - 1);
+        child_element_index_case2[ 1 ].push_back(10 - 1);
+        child_element_index_case2[ 1 ].push_back(5 - 1);
+
+        child_element_index_case2[ 2 ].push_back(10 - 1);
+        child_element_index_case2[ 2 ].push_back(5 - 1);
+        child_element_index_case2[ 2 ].push_back(8 - 1);
+        child_element_index_case2[ 2 ].push_back(7 - 1);
+
+        child_element_index_case2[ 3 ].push_back(10 - 1);
+        child_element_index_case2[ 3 ].push_back(3 - 1);
+        child_element_index_case2[ 3 ].push_back(6 - 1);
+        child_element_index_case2[ 3 ].push_back(7 - 1);////////////
+
+        child_element_index_case2[ 4 ].push_back(2 - 1);
+        child_element_index_case2[ 4 ].push_back(6 - 1);
+        child_element_index_case2[ 4 ].push_back(5 - 1);
+        child_element_index_case2[ 4 ].push_back(9 - 1);////////////
+
+        child_element_index_case2[ 5 ].push_back(9 - 1);
+        child_element_index_case2[ 5 ].push_back(6 - 1);
+        child_element_index_case2[ 5 ].push_back(5 - 1);
+        child_element_index_case2[ 5 ].push_back(10 - 1);
+
+        child_element_index_case2[ 6 ].push_back(4 - 1);
+        child_element_index_case2[ 6 ].push_back(8 - 1);
+        child_element_index_case2[ 6 ].push_back(10 - 1);
+        child_element_index_case2[ 6 ].push_back(9 - 1);////////////
+
+        child_element_index_case2[ 7 ].push_back(10 - 1);
+        child_element_index_case2[ 7 ].push_back(5 - 1);
+        child_element_index_case2[ 7 ].push_back(7 - 1);
+        child_element_index_case2[ 7 ].push_back(6 - 1);
+    }
+    else if (elem_type == PYRA_5)
+    {
+        //! PYRA_5
+        //! 1..2..3..4..5
+
+        //! Face 5
+        //! 1  4  3  2
+        //! 1  5  4
+        //! 1  2  5
+        //! 2  3  5
+        //! 3  4  5
+
+        face_element_type.resize(5);
+        face_list.resize(5);
+
+        face_element_type[0] = QUAD_4;
+        face_list[0].push_back(1-1);
+        face_list[0].push_back(4-1);
+        face_list[0].push_back(3-1);
+        face_list[0].push_back(2-1);
+
+        face_element_type[1] = TRI_3;
+        face_list[1].push_back(1-1);
+        face_list[1].push_back(5-1);
+        face_list[1].push_back(4-1);
+
+        face_element_type[2] = TRI_3;
+        face_list[2].push_back(1-1);
+        face_list[2].push_back(2-1);
+        face_list[2].push_back(5-1);
+
+        face_element_type[3] = TRI_3;
+        face_list[3].push_back(2-1);
+        face_list[3].push_back(3-1);
+        face_list[3].push_back(5-1);
+
+        face_element_type[4] = TRI_3;
+        face_list[4].push_back(3-1);
+        face_list[4].push_back(4-1);
+        face_list[4].push_back(5-1);
+
+    }
+    else if (elem_type == PYRA_14)
+    {
+        //! PYRA_14
+        //! Face 20
+
+        //! Composite Face 5
+        //! QUAD_9 : 1  4  3  2  9   8   7  6  14
+        //! TRI_6  : 1  2  5  6  11  10
+        //! TRI_6  : 2  3  5  7  12  11
+        //! TRI_6  : 3  4  5  8  13  12
+        //! TRI_6  : 4  1  5  9  10  13
+        composite_face_element_type.resize(5);
+        composite_face_list.resize(5);
+
+        composite_face_element_type[0] = QUAD_9;
+        composite_face_list[0].push_back(1-1);
+        composite_face_list[0].push_back(4-1);
+        composite_face_list[0].push_back(3-1);
+        composite_face_list[0].push_back(2-1);
+        composite_face_list[0].push_back(9-1);
+        composite_face_list[0].push_back(8-1);
+        composite_face_list[0].push_back(7-1);
+        composite_face_list[0].push_back(6-1);
+        composite_face_list[0].push_back(14-1);
+
+        composite_face_element_type[1] = TRI_6;
+        composite_face_list[ 1 ].push_back(1 - 1);
+        composite_face_list[ 1 ].push_back(2 - 1);
+        composite_face_list[ 1 ].push_back(5 - 1);
+        composite_face_list[ 1 ].push_back(6 - 1);
+        composite_face_list[ 1 ].push_back(11 - 1);
+        composite_face_list[ 1 ].push_back(10 - 1);
+
+        composite_face_element_type[2] = TRI_6;
+        composite_face_list[2].push_back(2-1);
+        composite_face_list[2].push_back(3-1);
+        composite_face_list[2].push_back(5-1);
+        composite_face_list[2].push_back(7-1);
+        composite_face_list[2].push_back(12-1);
+        composite_face_list[2].push_back(11-1);
+
+        composite_face_element_type[3] = TRI_6;
+        composite_face_list[3].push_back(3-1);
+        composite_face_list[3].push_back(4-1);
+        composite_face_list[3].push_back(5-1);
+        composite_face_list[3].push_back(8-1);
+        composite_face_list[3].push_back(13-1);
+        composite_face_list[3].push_back(12-1);
+
+        composite_face_element_type[4] = TRI_6;
+        composite_face_list[4].push_back(4-1);
+        composite_face_list[4].push_back(1-1);
+        composite_face_list[4].push_back(5-1);
+        composite_face_list[4].push_back(9-1);
+        composite_face_list[4].push_back(10-1);
+        composite_face_list[4].push_back(13-1);
+
+        //! 1  9  4  8  3  7  2  6  1   middle 14
+        //! Face 4
+        //! 1  9  14 6
+        //! 9  4  8  14
+        //! 6  14 7  2
+        //! 14 8  3  7
+
+        face_element_type.resize(20);
+        face_list.resize(20);
+
+        face_element_type[0] = QUAD_4;
+        face_list[0].push_back(1-1);
+        face_list[0].push_back(9-1);
+        face_list[0].push_back(14-1);
+        face_list[0].push_back(6-1);
+
+        face_element_type[1] = QUAD_4;
+        face_list[1].push_back(9-1);
+        face_list[1].push_back(4-1);
+        face_list[1].push_back(8-1);
+        face_list[1].push_back(14-1);
+
+        face_element_type[2] = QUAD_4;
+        face_list[2].push_back(6-1);
+        face_list[2].push_back(14-1);
+        face_list[2].push_back(7-1);
+        face_list[2].push_back(2-1);
+
+        face_element_type[3] = QUAD_4;
+        face_list[3].push_back(14-1);
+        face_list[3].push_back(8-1);
+        face_list[3].push_back(3-1);
+        face_list[3].push_back(7-1);
+
+        //! 1  10  5  13  4  9  1
+        //! Face 4
+        //! 1  10  9
+        //! 9  10  13
+        //! 4  9   13
+        //! 10 5   13
+
+        face_element_type[4] = TRI_3;
+        face_list[4].push_back(1-1);
+        face_list[4].push_back(10-1);
+        face_list[4].push_back(9-1);
+
+        face_element_type[5] = TRI_3;
+        face_list[5].push_back(9-1);
+        face_list[5].push_back(10-1);
+        face_list[5].push_back(13-1);
+
+        face_element_type[6] = TRI_3;
+        face_list[6].push_back(4-1);
+        face_list[6].push_back(9-1);
+        face_list[6].push_back(13-1);
+
+        face_element_type[7] = TRI_3;
+        face_list[7].push_back(10-1);
+        face_list[7].push_back(5-1);
+        face_list[7].push_back(13-1);
+
+        //! 1  6  2  11  5  10  1
+        //! Face 4
+        //! 1  6  10
+        //! 6  11 10
+        //! 6  2  11
+        //! 10 11 5
+
+        face_element_type[8] = TRI_3;
+        face_list[8].push_back(1-1);
+        face_list[8].push_back(6-1);
+        face_list[8].push_back(10-1);
+
+        face_element_type[9] = TRI_3;
+        face_list[9].push_back(6-1);
+        face_list[9].push_back(11-1);
+        face_list[9].push_back(10-1);
+
+        face_element_type[10] = TRI_3;
+        face_list[10].push_back(6-1);
+        face_list[10].push_back(2-1);
+        face_list[10].push_back(11-1);
+
+        face_element_type[11] = TRI_3;
+        face_list[11].push_back(10-1);
+        face_list[11].push_back(11-1);
+        face_list[11].push_back(5-1);
+
+        //! 2  7   3  12  5  11  2
+        //! Face 4
+        //! 2  7  11
+        //! 7  12 11
+        //! 7  3  12
+        //! 11 12 5
+
+        face_element_type[12] = TRI_3;
+        face_list[12].push_back(2-1);
+        face_list[12].push_back(7-1);
+        face_list[12].push_back(11-1);
+
+        face_element_type[13] = TRI_3;
+        face_list[13].push_back(7-1);
+        face_list[13].push_back(12-1);
+        face_list[13].push_back(11-1);
+
+        face_element_type[14] = TRI_3;
+        face_list[14].push_back(7-1);
+        face_list[14].push_back(3-1);
+        face_list[14].push_back(12-1);
+
+        face_element_type[15] = TRI_3;
+        face_list[15].push_back(11-1);
+        face_list[15].push_back(12-1);
+        face_list[15].push_back(5-1);
+
+        //! 3  8  4  13  5  12  3
+        //! Face 4
+        //! 3  8  12
+        //! 8  13 12
+        //! 8  4  13
+        //! 12 13 5
+
+        face_element_type[16] = TRI_3;
+        face_list[16].push_back(3-1);
+        face_list[16].push_back(8-1);
+        face_list[16].push_back(12-1);
+
+        face_element_type[17] = TRI_3;
+        face_list[17].push_back(8-1);
+        face_list[17].push_back(13-1);
+        face_list[17].push_back(12-1);
+
+        face_element_type[18] = TRI_3;
+        face_list[18].push_back(8-1);
+        face_list[18].push_back(4-1);
+        face_list[18].push_back(13-1);
+
+        face_element_type[19] = TRI_3;
+        face_list[19].push_back(12-1);
+        face_list[19].push_back(13-1);
+        face_list[19].push_back(5-1);
+
+        //! PYRA_14
+        //! 1.........6..........2
+        //! 2.........7..........3
+        //! 3.........8..........4
+        //! 4.........9..........1
+
+        //! 1.........10.........5
+        //! 2.........11.........5
+        //! 3.........12.........5
+        //! 4.........13.........5
+
+        //! 1 2.......14.........3 4
+
+        mp_struct[5].push_back(0);
+        mp_struct[5].push_back(1);
+
+        mp_struct[6].push_back(1);
+        mp_struct[6].push_back(2);
+
+        mp_struct[7].push_back(2);
+        mp_struct[7].push_back(3);
+
+        mp_struct[8].push_back(3);
+        mp_struct[8].push_back(0);
+
+        mp_struct[9].push_back(0);
+        mp_struct[9].push_back(4);
+
+        mp_struct[10].push_back(1);
+        mp_struct[10].push_back(4);
+
+        mp_struct[11].push_back(2);
+        mp_struct[11].push_back(4);
+
+        mp_struct[12].push_back(3);
+        mp_struct[12].push_back(4);
+
+        mp_struct[13].push_back(0);
+        mp_struct[13].push_back(3);
+        mp_struct[13].push_back(2);
+        mp_struct[13].push_back(1);
+
+        //! subcell
+        //! PYRA_5  : 10 11 12 13 5
+        //! PYRA_5  : 1  6  14 9  10
+        //! PYRA_5  : 6  2  7  14 11
+        //! PYRA_5  : 4  9  14 8  13
+        //! PYRA_5  : 14 7  3  8  12
+        //! PYRA_5  : 10 13 12 11 14
+        //! TETRA_4 : 6  10 11 14
+        //! TETRA_4 : 8  12 13 14
+        //! TETRA_4 : 9  13 10 14
+        //! TETRA_4 : 7  11 12 14
+
+        child_element_type.resize(10);
+        child_element_index.resize(10);
+
+        child_element_type[0] = PYRA_5;
+        child_element_index[0].push_back(10-1);
+        child_element_index[0].push_back(11-1);
+        child_element_index[0].push_back(12-1);
+        child_element_index[0].push_back(13-1);
+        child_element_index[0].push_back(5-1);
+
+        child_element_type[1] = PYRA_5;
+        child_element_index[1].push_back(1-1);
+        child_element_index[1].push_back(6-1);
+        child_element_index[1].push_back(14-1);
+        child_element_index[1].push_back(9-1);
+        child_element_index[1].push_back(10-1);
+
+        child_element_type[2] = PYRA_5;
+        child_element_index[2].push_back(6-1);
+        child_element_index[2].push_back(2-1);
+        child_element_index[2].push_back(7-1);
+        child_element_index[2].push_back(14-1);
+        child_element_index[2].push_back(11-1);
+
+        child_element_type[3] = PYRA_5;
+        child_element_index[3].push_back(4-1);
+        child_element_index[3].push_back(9-1);
+        child_element_index[3].push_back(14-1);
+        child_element_index[3].push_back(8-1);
+        child_element_index[3].push_back(13-1);
+
+        child_element_type[4] = PYRA_5;
+        child_element_index[4].push_back(14-1);
+        child_element_index[4].push_back(7-1);
+        child_element_index[4].push_back(3-1);
+        child_element_index[4].push_back(8-1);
+        child_element_index[4].push_back(12-1);
+
+        child_element_type[5] = PYRA_5;
+        child_element_index[5].push_back(10-1);
+        child_element_index[5].push_back(13-1);
+        child_element_index[5].push_back(12-1);
+        child_element_index[5].push_back(11-1);
+        child_element_index[5].push_back(14-1);
+
+        child_element_type[6] = TETRA_4;
+        child_element_index[6].push_back(6-1);
+        child_element_index[6].push_back(10-1);
+        child_element_index[6].push_back(11-1);
+        child_element_index[6].push_back(14-1);
+
+        child_element_type[7] = TETRA_4;
+        child_element_index[7].push_back(8-1);
+        child_element_index[7].push_back(12-1);
+        child_element_index[7].push_back(13-1);
+        child_element_index[7].push_back(14-1);
+
+        child_element_type[8] = TETRA_4;
+        child_element_index[8].push_back(9-1);
+        child_element_index[8].push_back(13-1);
+        child_element_index[8].push_back(10-1);
+        child_element_index[8].push_back(14-1);
+
+        child_element_type[9] = TETRA_4;
+        child_element_index[9].push_back(7-1);
+        child_element_index[9].push_back(11-1);
+        child_element_index[9].push_back(12-1);
+        child_element_index[9].push_back(14-1);
+    }
+    else if (elem_type == PENTA_6)
+    {
+        //! PENTA_6
+
+        //! 1  2  3  4  5  6
+        //! Face 5
+
+        //! 1  3  2
+        //! 4  5  6
+        //! 1  2  5  4
+        //! 2  3  6  5
+        //! 3  1  4  6
+
+        face_element_type.resize(5);
+        face_list.resize(5);
+
+        face_element_type[0] = TRI_3;
+        face_list[0].push_back(1-1);
+        face_list[0].push_back(3-1);
+        face_list[0].push_back(2-1);
+
+        face_element_type[1] = TRI_3;
+        face_list[1].push_back(4-1);
+        face_list[1].push_back(5-1);
+        face_list[1].push_back(6-1);
+
+        face_element_type[2] = QUAD_4;
+        face_list[2].push_back(1-1);
+        face_list[2].push_back(2-1);
+        face_list[2].push_back(5-1);
+        face_list[2].push_back(4-1);
+
+        face_element_type[3] = QUAD_4;
+        face_list[3].push_back(2-1);
+        face_list[3].push_back(3-1);
+        face_list[3].push_back(6-1);
+        face_list[3].push_back(5-1);
+
+        face_element_type[4] = QUAD_4;
+        face_list[4].push_back(3-1);
+        face_list[4].push_back(1-1);
+        face_list[4].push_back(4-1);
+        face_list[4].push_back(6-1);
+    }
+    else if (elem_type == PHSPACE::PENTA_12)
+    {
+        //! PENTA_12
+
+        //******************************
+        //! Composite Face 5
+        //! QUAD_8 : 1  2  5  4  7  10
+        //! QUAD_8 : 2  3  6  5  8  11
+        //! QUAD_8 : 3  1  4  6  9  12
+        //! TRI_6  : 1  3  2  9  8  7
+        //! TRI_6  : 4  5  6  10 11 12
+
+        composite_face_element_type.resize(5);
+        composite_face_list.resize(5);
+
+        composite_face_element_type[ 0 ] = QUAD_6;
+        composite_face_list[ 0 ].push_back(1 - 1);
+        composite_face_list[ 0 ].push_back(2 - 1);
+        composite_face_list[ 0 ].push_back(5 - 1);
+        composite_face_list[ 0 ].push_back(4 - 1);
+        composite_face_list[ 0 ].push_back(7 - 1);
+        composite_face_list[ 0 ].push_back(10 - 1);
+
+        composite_face_element_type[ 1 ] = QUAD_6;
+        composite_face_list[ 1 ].push_back(2 - 1);
+        composite_face_list[ 1 ].push_back(3 - 1);
+        composite_face_list[ 1 ].push_back(6 - 1);
+        composite_face_list[ 1 ].push_back(5 - 1);
+        composite_face_list[ 1 ].push_back(8 - 1);
+        composite_face_list[ 1 ].push_back(11 - 1);
+
+        composite_face_element_type[ 2 ] = QUAD_6;
+        composite_face_list[ 2 ].push_back(3 - 1);
+        composite_face_list[ 2 ].push_back(1 - 1);
+        composite_face_list[ 2 ].push_back(4 - 1);
+        composite_face_list[ 2 ].push_back(6 - 1);
+        composite_face_list[ 2 ].push_back(9 - 1);
+        composite_face_list[ 2 ].push_back(12 - 1);
+
+        composite_face_element_type[ 3 ] = TRI_6;
+        composite_face_list[ 3 ].push_back(1 - 1);
+        composite_face_list[ 3 ].push_back(3 - 1);
+        composite_face_list[ 3 ].push_back(2 - 1);
+        composite_face_list[ 3 ].push_back(9 - 1);
+        composite_face_list[ 3 ].push_back(8 - 1);//
+        composite_face_list[ 3 ].push_back(7 - 1);
+
+        composite_face_element_type[ 4 ] = TRI_6;
+        composite_face_list[ 4 ].push_back(4 - 1);
+        composite_face_list[ 4 ].push_back(5 - 1);
+        composite_face_list[ 4 ].push_back(6 - 1);
+        composite_face_list[ 4 ].push_back(10 - 1);
+        composite_face_list[ 4 ].push_back(11 - 1);
+        composite_face_list[ 4 ].push_back(12 - 1);
+
+        //! Face 20
+
+        //! 1  9  3  8  2  7  1
+        //! Face 4
+        //! 1  9  7
+        //! 9  8  7
+        //! 7  8  2
+        //! 9  3  8
+
+        face_element_type.resize(14);
+        face_list.resize(14);
+
+        face_element_type[ 0 ] = TRI_3;
+        face_list[ 0 ].push_back(1 - 1);
+        face_list[ 0 ].push_back(9 - 1);
+        face_list[ 0 ].push_back(7 - 1);
+
+        face_element_type[ 1 ] = TRI_3;
+        face_list[ 1 ].push_back(9 - 1);
+        face_list[ 1 ].push_back(8 - 1);
+        face_list[ 1 ].push_back(7 - 1);
+
+        face_element_type[ 2 ] = TRI_3;
+        face_list[ 2 ].push_back(7 - 1);
+        face_list[ 2 ].push_back(8 - 1);
+        face_list[ 2 ].push_back(2 - 1);
+
+        face_element_type[ 3 ] = TRI_3;
+        face_list[ 3 ].push_back(9 - 1);
+        face_list[ 3 ].push_back(3 - 1);
+        face_list[ 3 ].push_back(8 - 1);
+
+        //! 4  13  5  14  6  15  4
+        //! Face 4
+        //! 4  13 15
+        //! 13 14 15
+        //! 13 5  14
+        //! 15 14 6
+
+        face_element_type[ 4 ] = TRI_3;
+        face_list[ 4 ].push_back(4 - 1);
+        face_list[ 4 ].push_back(10 - 1);
+        face_list[ 4 ].push_back(12 - 1);
+
+        face_element_type[ 5 ] = TRI_3;
+        face_list[ 5 ].push_back(10 - 1);
+        face_list[ 5 ].push_back(11 - 1);
+        face_list[ 5 ].push_back(12 - 1);
+
+        face_element_type[ 6 ] = TRI_3;
+        face_list[ 6 ].push_back(10 - 1);//
+        face_list[ 6 ].push_back(5 - 1);
+        face_list[ 6 ].push_back(11 - 1);
+
+        face_element_type[ 7 ] = TRI_3;
+        face_list[ 7 ].push_back(12 - 1);
+        face_list[ 7 ].push_back(11 - 1);
+        face_list[ 7 ].push_back(6 - 1);
+
+        //! 1  7  2  11  5  13  4  10  1  middle16
+        //! Face 4
+        //! 1  7  16 10
+        //! 7  2  11 16
+        //! 10 16 13 4
+        //! 16 11 5  13
+        face_element_type[ 8 ] = QUAD_4;
+        face_list[ 8 ].push_back(1 - 1);
+        face_list[ 8 ].push_back(7 - 1);
+        face_list[ 8 ].push_back(10 - 1);
+        face_list[ 8 ].push_back(4 - 1);
+
+        face_element_type[ 9 ] = QUAD_4;
+        face_list[ 9 ].push_back(7 - 1);
+        face_list[ 9 ].push_back(2 - 1);
+        face_list[ 9 ].push_back(5 - 1);
+        face_list[ 9 ].push_back(10 - 1);
+
+        //! 2  8  3  12  6  14  5  11  2  middle17
+        //! Face 4
+        //! 2  8  17 11
+        //! 8  3  12 17
+        //! 11 17 14 5
+        //! 17 12 6  14
+
+        face_element_type[ 10 ] = QUAD_4;
+        face_list[ 10 ].push_back(2 - 1);
+        face_list[ 10 ].push_back(8 - 1);
+        face_list[ 10 ].push_back(11 - 1);
+        face_list[ 10 ].push_back(5 - 1);
+
+        face_element_type[ 11 ] = QUAD_4;
+        face_list[ 11 ].push_back(8 - 1);
+        face_list[ 11 ].push_back(3 - 1);
+        face_list[ 11 ].push_back(6 - 1);
+        face_list[ 11 ].push_back(11 - 1);
+
+        //! 1  10  4  15  6  12  3  9  1  middle18
+        //! Face 4
+        //! 1  10 18 9
+        //! 9  18 12 3
+        //! 10 4  15 18
+        //! 18 15 6  12
+
+        face_element_type[ 12 ] = QUAD_4;
+        face_list[ 12 ].push_back(3 - 1);
+        face_list[ 12 ].push_back(9 - 1);
+        face_list[ 12 ].push_back(12 - 1);
+        face_list[ 12 ].push_back(6 - 1);
+
+        face_element_type[ 13 ] = QUAD_4;
+        face_list[ 13 ].push_back(9 - 1);
+        face_list[ 13 ].push_back(1 - 1);
+        face_list[ 13 ].push_back(4 - 1);
+        face_list[ 13 ].push_back(12 - 1);
+        //******************************
+
+        //! PENTA_12
+
+        mp_struct[ 6 ].push_back(0);
+        mp_struct[ 6 ].push_back(1);
+
+        mp_struct[ 7 ].push_back(1);
+        mp_struct[ 7 ].push_back(2);
+
+        mp_struct[ 8 ].push_back(2);
+        mp_struct[ 8 ].push_back(0);//
+
+        mp_struct[ 9 ].push_back(3);
+        mp_struct[ 9 ].push_back(4);
+
+        mp_struct[ 10 ].push_back(4);
+        mp_struct[ 10 ].push_back(5);
+
+        mp_struct[ 11 ].push_back(5);
+        mp_struct[ 11 ].push_back(3);
+
+
+        //! subcell
+
+        child_element_type.resize(4);
+        child_element_index.resize(4);
+
+        child_element_type[ 0 ] = PENTA_6;
+        child_element_index[ 0 ].push_back(1 - 1);
+        child_element_index[ 0 ].push_back(7 - 1);
+        child_element_index[ 0 ].push_back(9 - 1);
+        child_element_index[ 0 ].push_back(4 - 1);
+        child_element_index[ 0 ].push_back(10 - 1);
+        child_element_index[ 0 ].push_back(12 - 1);
+
+        child_element_type[ 1 ] = PENTA_6;
+        child_element_index[ 1 ].push_back(7 - 1);
+        child_element_index[ 1 ].push_back(8 - 1);
+        child_element_index[ 1 ].push_back(9 - 1);
+        child_element_index[ 1 ].push_back(10 - 1);
+        child_element_index[ 1 ].push_back(11 - 1);
+        child_element_index[ 1 ].push_back(12 - 1);
+
+        child_element_type[ 2 ] = PENTA_6;
+        child_element_index[ 2 ].push_back(7 - 1);
+        child_element_index[ 2 ].push_back(2 - 1);
+        child_element_index[ 2 ].push_back(8 - 1);
+        child_element_index[ 2 ].push_back(10 - 1);
+        child_element_index[ 2 ].push_back(5 - 1);
+        child_element_index[ 2 ].push_back(11 - 1);
+
+
+        child_element_type[ 3 ] = PENTA_6;
+        child_element_index[ 3 ].push_back(9 - 1);
+        child_element_index[ 3 ].push_back(8 - 1);
+        child_element_index[ 3 ].push_back(3 - 1);
+        child_element_index[ 3 ].push_back(12 - 1);
+        child_element_index[ 3 ].push_back(11 - 1);
+        child_element_index[ 3 ].push_back(6 - 1);
+    }
+    else if (elem_type == PENTA_15)
+    {
+        //! PENTA_15
+        //! 1.........7..........2
+        //! 2.........8..........3
+        //! 3.........9..........1
+
+        //! 1.........10.........4
+        //! 2.........11.........5
+        //! 3.........12.........6
+
+        //! 4.........13..........5
+        //! 5.........14..........6
+        //! 6.........15..........4
+
+        mp_struct[6].push_back(0);
+        mp_struct[6].push_back(1);
+
+        mp_struct[7].push_back(1);
+        mp_struct[7].push_back(2);
+
+        mp_struct[8].push_back(2);
+        mp_struct[8].push_back(3);
+
+        mp_struct[9].push_back(0);
+        mp_struct[9].push_back(3);
+
+        mp_struct[10].push_back(1);
+        mp_struct[10].push_back(4);
+
+        mp_struct[11].push_back(2);
+        mp_struct[11].push_back(5);
+
+        mp_struct[12].push_back(3);
+        mp_struct[12].push_back(4);
+
+        mp_struct[13].push_back(4);
+        mp_struct[13].push_back(5);
+
+        mp_struct[14].push_back(5);
+        mp_struct[14].push_back(3);
+    }
+    else if (elem_type == PENTA_18)
+    {
+        //! PENTA_18
+
+        //! Composite Face 5
+        //! QUAD_9 : 1  2  5  4  7  11  13  10  16
+        //! QUAD_9 : 2  3  6  5  8  12  14  11  17
+        //! QUAD_9 : 3  1  4  6  9  10  15  12  18
+        //! TRI_6  : 1  3  2  9  8  7
+        //! TRI_6  : 4  5  6  13 14 15
+
+        composite_face_element_type.resize(5);
+        composite_face_list.resize(5);
+
+        composite_face_element_type[0] = QUAD_9;
+        composite_face_list[0].push_back(1-1);
+        composite_face_list[0].push_back(2-1);
+        composite_face_list[0].push_back(5-1);
+        composite_face_list[0].push_back(4-1);
+        composite_face_list[0].push_back(7-1);
+        composite_face_list[0].push_back(11-1);
+        composite_face_list[0].push_back(13-1);
+        composite_face_list[0].push_back(10-1);
+        composite_face_list[0].push_back(16-1);
+
+        composite_face_element_type[1] = QUAD_9;
+        composite_face_list[1].push_back(2-1);
+        composite_face_list[1].push_back(3-1);
+        composite_face_list[1].push_back(6-1);
+        composite_face_list[1].push_back(5-1);
+        composite_face_list[1].push_back(8-1);
+        composite_face_list[1].push_back(12-1);
+        composite_face_list[1].push_back(14-1);
+        composite_face_list[1].push_back(11-1);
+        composite_face_list[1].push_back(17-1);
+
+        composite_face_element_type[2] = QUAD_9;
+        composite_face_list[2].push_back(3-1);
+        composite_face_list[2].push_back(1-1);
+        composite_face_list[2].push_back(4-1);
+        composite_face_list[2].push_back(6-1);
+        composite_face_list[2].push_back(9-1);
+        composite_face_list[2].push_back(10-1);
+        composite_face_list[2].push_back(15-1);
+        composite_face_list[2].push_back(12-1);
+        composite_face_list[2].push_back(18-1);
+
+        composite_face_element_type[3] = TRI_6;
+        composite_face_list[3].push_back(1-1);
+        composite_face_list[3].push_back(3-1);
+        composite_face_list[3].push_back(2-1);
+        composite_face_list[3].push_back(9-1);
+        composite_face_list[3].push_back(8-1);
+        composite_face_list[3].push_back(7-1);
+
+        composite_face_element_type[4] = TRI_6;
+        composite_face_list[4].push_back(4-1);
+        composite_face_list[4].push_back(5-1);
+        composite_face_list[4].push_back(6-1);
+        composite_face_list[4].push_back(13-1);
+        composite_face_list[4].push_back(14-1);
+        composite_face_list[4].push_back(15-1);
+
+        //! Face 20
+
+        //! 1  9  3  8  2  7  1
+        //! Face 4
+        //! 1  9  7
+        //! 9  8  7
+        //! 7  8  2
+        //! 9  3  8
+
+        face_element_type.resize(20);
+        face_list.resize(20);
+
+        face_element_type[0] = TRI_3;
+        face_list[0].push_back(1-1);
+        face_list[0].push_back(9-1);
+        face_list[0].push_back(7-1);
+
+        face_element_type[1] = TRI_3;
+        face_list[1].push_back(9-1);
+        face_list[1].push_back(8-1);
+        face_list[1].push_back(7-1);
+
+        face_element_type[2] = TRI_3;
+        face_list[2].push_back(7-1);
+        face_list[2].push_back(8-1);
+        face_list[2].push_back(2-1);
+
+        face_element_type[3] = TRI_3;
+        face_list[3].push_back(9-1);
+        face_list[3].push_back(3-1);
+        face_list[3].push_back(8-1);
+
+        //! 4  13  5  14  6  15  4
+        //! Face 4
+        //! 4  13 15
+        //! 13 14 15
+        //! 12 5  14
+        //! 15 14 6
+
+        face_element_type[4] = TRI_3;
+        face_list[4].push_back(4-1);
+        face_list[4].push_back(13-1);
+        face_list[4].push_back(15-1);
+
+        face_element_type[5] = TRI_3;
+        face_list[5].push_back(13-1);
+        face_list[5].push_back(14-1);
+        face_list[5].push_back(15-1);
+
+        face_element_type[6] = TRI_3;
+        face_list[6].push_back(13-1);
+        face_list[6].push_back(5-1);
+        face_list[6].push_back(14-1);
+
+        face_element_type[7] = TRI_3;
+        face_list[7].push_back(15-1);
+        face_list[7].push_back(14-1);
+        face_list[7].push_back(6-1);
+
+        //! 1  7  2  11  5  13  4  10  1  middle16
+        //! Face 4
+        //! 1  7  16 10
+        //! 7  2  11 16
+        //! 10 16 13 4
+        //! 16 11 5  13
+
+        face_element_type[8] = QUAD_4;
+        face_list[8].push_back(1-1);
+        face_list[8].push_back(7-1);
+        face_list[8].push_back(16-1);
+        face_list[8].push_back(10-1);
+
+        face_element_type[9] = QUAD_4;
+        face_list[9].push_back(7-1);
+        face_list[9].push_back(2-1);
+        face_list[9].push_back(11-1);
+        face_list[9].push_back(16-1);
+
+        face_element_type[10] = QUAD_4;
+        face_list[10].push_back(10-1);
+        face_list[10].push_back(16-1);
+        face_list[10].push_back(13-1);
+        face_list[10].push_back(4-1);
+
+        face_element_type[11] = QUAD_4;
+        face_list[11].push_back(16-1);
+        face_list[11].push_back(11-1);
+        face_list[11].push_back(5-1);
+        face_list[11].push_back(13-1);
+
+        //! 2  8  3  12  6  14  5  11  2  middle17
+        //! Face 4
+        //! 2  8  17 11
+        //! 8  3  12 17
+        //! 11 17 14 5
+        //! 17 12 6  14
+
+        face_element_type[12] = QUAD_4;
+        face_list[12].push_back(2-1);
+        face_list[12].push_back(8-1);
+        face_list[12].push_back(17-1);
+        face_list[12].push_back(11-1);
+
+        face_element_type[13] = QUAD_4;
+        face_list[13].push_back(8-1);
+        face_list[13].push_back(3-1);
+        face_list[13].push_back(12-1);
+        face_list[13].push_back(17-1);
+
+        face_element_type[14] = QUAD_4;
+        face_list[14].push_back(11-1);
+        face_list[14].push_back(17-1);
+        face_list[14].push_back(14-1);
+        face_list[14].push_back(5-1);
+
+        face_element_type[15] = QUAD_4;
+        face_list[15].push_back(17-1);
+        face_list[15].push_back(12-1);
+        face_list[15].push_back(6-1);
+        face_list[15].push_back(14-1);
+
+        //! 1  10  4  15  6  12  3  9  1  middle18
+        //! Face 4
+        //! 1  10 18 9
+        //! 9  18 12 3
+        //! 10 4  15 18
+        //! 18 15 6  12
+
+        face_element_type[16] = QUAD_4;
+        face_list[16].push_back(1-1);
+        face_list[16].push_back(10-1);
+        face_list[16].push_back(18-1);
+        face_list[16].push_back(9-1);
+
+        face_element_type[17] = QUAD_4;
+        face_list[17].push_back(9-1);
+        face_list[17].push_back(18-1);
+        face_list[17].push_back(12-1);
+        face_list[17].push_back(3-1);
+
+        face_element_type[18] = QUAD_4;
+        face_list[18].push_back(10-1);
+        face_list[18].push_back(4-1);
+        face_list[18].push_back(15-1);
+        face_list[18].push_back(18-1);
+
+        face_element_type[19] = QUAD_4;
+        face_list[19].push_back(18-1);
+        face_list[19].push_back(15-1);
+        face_list[19].push_back(6-1);
+        face_list[19].push_back(12-1);
+
+        //! PENTA_18
+        //! 1.........7..........2
+        //! 2.........8..........3
+        //! 3.........9..........1
+
+        //! 1.........10.........4
+        //! 2.........11.........5
+        //! 3.........12.........6
+
+        //! 4.........13.........5
+        //! 5.........14.........6
+        //! 6.........15.........4
+
+        //! 10........16.........11
+        //! 11........17.........12
+        //! 12........18.........10
+
+        mp_struct[6].push_back(0);
+        mp_struct[6].push_back(1);
+
+        mp_struct[7].push_back(1);
+        mp_struct[7].push_back(2);
+
+        mp_struct[8].push_back(2);
+        mp_struct[8].push_back(0);
+
+        mp_struct[9].push_back(0);
+        mp_struct[9].push_back(3);
+
+        mp_struct[10].push_back(1);
+        mp_struct[10].push_back(4);
+
+        mp_struct[11].push_back(2);
+        mp_struct[11].push_back(5);
+
+        mp_struct[12].push_back(3);
+        mp_struct[12].push_back(4);
+
+        mp_struct[13].push_back(4);
+        mp_struct[13].push_back(5);
+
+        mp_struct[14].push_back(5);
+        mp_struct[14].push_back(3);
+
+        mp_struct[ 15 ].push_back(0);//
+        mp_struct[ 15 ].push_back(1);//
+        mp_struct[ 15 ].push_back(4);//
+        mp_struct[ 15 ].push_back(3);//
+
+        mp_struct[ 16 ].push_back(1);//
+        mp_struct[ 16 ].push_back(2);//
+        mp_struct[ 16 ].push_back(5);//
+        mp_struct[ 16 ].push_back(4);//
+
+        mp_struct[ 17 ].push_back(2);//
+        mp_struct[ 17 ].push_back(0);//
+        mp_struct[ 17 ].push_back(3);//
+        mp_struct[ 17 ].push_back(5);//
+
+        //! subcell
+        //! PENTA_6  : 1  7  9  10 16 18
+        //! PENTA_6  : 7  8  9  16 17 18
+        //! PENTA_6  : 7  2  8  16 11 17
+        //! PENTA_6  : 9  8  3  18 17 12
+        //! PENTA_6  : 10 16 18 4  13 15
+        //! PENTA_6  : 16 17 18 13 14 15
+        //! PENTA_6  : 16 11 17 12 5  14
+        //! PENTA_6  : 18 17 12 15 14 6
+
+        child_element_type.resize(8);
+        child_element_index.resize(8);
+
+        child_element_type[0] = PENTA_6;
+        child_element_index[0].push_back(1-1);
+        child_element_index[0].push_back(7-1);
+        child_element_index[0].push_back(9-1);
+        child_element_index[0].push_back(10-1);
+        child_element_index[0].push_back(16-1);
+        child_element_index[0].push_back(18-1);
+
+        child_element_type[1] = PENTA_6;
+        child_element_index[1].push_back(7-1);
+        child_element_index[1].push_back(8-1);
+        child_element_index[1].push_back(9-1);
+        child_element_index[1].push_back(16-1);
+        child_element_index[1].push_back(17-1);
+        child_element_index[1].push_back(18-1);
+
+        child_element_type[2] = PENTA_6;
+        child_element_index[2].push_back(7-1);
+        child_element_index[2].push_back(2-1);
+        child_element_index[2].push_back(8-1);
+        child_element_index[2].push_back(16-1);
+        child_element_index[2].push_back(11-1);
+        child_element_index[2].push_back(17-1);
+
+
+        child_element_type[3] = PENTA_6;
+        child_element_index[3].push_back(9-1);
+        child_element_index[3].push_back(8-1);
+        child_element_index[3].push_back(3-1);
+        child_element_index[3].push_back(18-1);
+        child_element_index[3].push_back(17-1);
+        child_element_index[3].push_back(12-1);
+
+        child_element_type[4] = PENTA_6;
+        child_element_index[4].push_back(10-1);
+        child_element_index[4].push_back(16-1);
+        child_element_index[4].push_back(18-1);
+        child_element_index[4].push_back(4-1);
+        child_element_index[4].push_back(13-1);
+        child_element_index[4].push_back(15-1);
+
+        child_element_type[5] = PENTA_6;
+        child_element_index[5].push_back(16-1);
+        child_element_index[5].push_back(17-1);
+        child_element_index[5].push_back(18-1);
+        child_element_index[5].push_back(13-1);
+        child_element_index[5].push_back(14-1);
+        child_element_index[5].push_back(15-1);
+
+        child_element_type[6] = PENTA_6;
+        child_element_index[6].push_back(16-1);
+        child_element_index[6].push_back(11-1);
+        child_element_index[6].push_back(17-1);
+        child_element_index[6].push_back(13-1);
+        child_element_index[6].push_back(5-1);
+        child_element_index[6].push_back(14-1);
+
+        child_element_type[7] = PENTA_6;
+        child_element_index[7].push_back(18-1);
+        child_element_index[7].push_back(17-1);
+        child_element_index[7].push_back(12-1);
+        child_element_index[7].push_back(15-1);
+        child_element_index[7].push_back(14-1);
+        child_element_index[7].push_back(6-1);
+    }
+    else if (elem_type == HEXA_8)
+    {
+        //! HEXA_8
+
+        //! 1  2 3 4 5 6 7 8
+        //! Face 6
+        //! 1  4  3  2
+        //! 5  6  7  8
+        //! 1  5  8  4
+        //! 2  3  7  6
+        //! 4  3  8  7
+        //! 1  2  6  5
+
+        face_element_type.resize(6);
+        face_list.resize(6);
+
+        face_element_type[0] = QUAD_4;
+        face_list[0].push_back(1-1);
+        face_list[0].push_back(4-1);
+        face_list[0].push_back(3-1);
+        face_list[0].push_back(2-1);
+
+        face_element_type[1] = QUAD_4;
+        face_list[1].push_back(5-1);
+        face_list[1].push_back(6-1);
+        face_list[1].push_back(7-1);
+        face_list[1].push_back(8-1);
+
+        face_element_type[2] = QUAD_4;
+        face_list[2].push_back(1-1);
+        face_list[2].push_back(5-1);
+        face_list[2].push_back(8-1);
+        face_list[2].push_back(4-1);
+
+        face_element_type[3] = QUAD_4;
+        face_list[3].push_back(2-1);
+        face_list[3].push_back(3-1);
+        face_list[3].push_back(7-1);
+        face_list[3].push_back(6-1);
+
+        face_element_type[4] = QUAD_4;
+        face_list[4].push_back(3-1);
+        face_list[4].push_back(4-1);
+        face_list[4].push_back(8-1);
+        face_list[4].push_back(7-1);
+
+        face_element_type[5] = QUAD_4;
+        face_list[5].push_back(1-1);
+        face_list[5].push_back(2-1);
+        face_list[5].push_back(6-1);
+        face_list[5].push_back(5-1);
+    }
+    else if (elem_type == HEXA_20)
+    {
+        //! HEXA_20
+        //! 1.........9. ........2
+        //! 2.........10.........3
+        //! 3.........11.........4
+        //! 4.........12.........1
+
+        //! 1.........13.........5
+        //! 2.........14.........6
+        //! 3.........15.........7
+        //! 4.........16.........8
+
+        //! 5.........17.........6
+        //! 6.........18.........7
+        //! 7.........19.........8
+        //! 8.........20.........5
+
+        mp_struct[8].push_back(0);
+        mp_struct[8].push_back(1);
+
+        mp_struct[9].push_back(1);
+        mp_struct[9].push_back(2);
+
+        mp_struct[10].push_back(2);
+        mp_struct[10].push_back(3);
+
+        mp_struct[11].push_back(3);
+        mp_struct[11].push_back(0);
+
+        mp_struct[12].push_back(0);
+        mp_struct[12].push_back(4);
+
+        mp_struct[13].push_back(1);
+        mp_struct[13].push_back(5);
+
+        mp_struct[14].push_back(2);
+        mp_struct[14].push_back(6);
+
+        mp_struct[15].push_back(3);
+        mp_struct[15].push_back(7);
+
+        mp_struct[16].push_back(4);
+        mp_struct[16].push_back(5);
+
+        mp_struct[17].push_back(5);
+        mp_struct[17].push_back(6);
+
+        mp_struct[18].push_back(6);
+        mp_struct[18].push_back(7);
+
+        mp_struct[19].push_back(7);
+        mp_struct[19].push_back(4);
+    }
+    else if (elem_type == HEXA_27)
+    {
+        //! HEXA_27
+
+        //! Composite Face 6
+        //! QUAD_9 : 1  4  3  2  12  11  10  9   21
+        //! QUAD_9 : 5  6  7  8  17  18  19  20  26
+        //! QUAD_9 : 1  2  6  5  9   14  17  13  22
+        //! QUAD_9 : 2  3  7  6  10  15  18  14  23
+        //! QUAD_9 : 3  4  8  7  11  16  19  15  24
+        //! QUAD_9 : 1  4  8  5  12  16  20  10  25
+
+        composite_face_element_type.resize(6);
+        composite_face_list.resize(6);
+
+        composite_face_element_type[0] = QUAD_9;
+        composite_face_list[0].push_back(1-1);
+        composite_face_list[0].push_back(4-1);
+        composite_face_list[0].push_back(3-1);
+        composite_face_list[0].push_back(2-1);
+        composite_face_list[0].push_back(12-1);
+        composite_face_list[0].push_back(11-1);
+        composite_face_list[0].push_back(10-1);
+        composite_face_list[0].push_back(9-1);
+        composite_face_list[0].push_back(21-1);
+
+        composite_face_element_type[1] = QUAD_9;
+        composite_face_list[1].push_back(5-1);
+        composite_face_list[1].push_back(6-1);
+        composite_face_list[1].push_back(7-1);
+        composite_face_list[1].push_back(8-1);
+        composite_face_list[1].push_back(17-1);
+        composite_face_list[1].push_back(18-1);
+        composite_face_list[1].push_back(19-1);
+        composite_face_list[1].push_back(20-1);
+        composite_face_list[1].push_back(26-1);
+
+        composite_face_element_type[2] = QUAD_9;
+        composite_face_list[2].push_back(1-1);
+        composite_face_list[2].push_back(2-1);
+        composite_face_list[2].push_back(6-1);
+        composite_face_list[2].push_back(5-1);
+        composite_face_list[2].push_back(9-1);
+        composite_face_list[2].push_back(14-1);
+        composite_face_list[2].push_back(17-1);
+        composite_face_list[2].push_back(13-1);
+        composite_face_list[2].push_back(22-1);
+
+        composite_face_element_type[3] = QUAD_9;
+        composite_face_list[3].push_back(2-1);
+        composite_face_list[3].push_back(3-1);
+        composite_face_list[3].push_back(7-1);
+        composite_face_list[3].push_back(6-1);
+        composite_face_list[3].push_back(10-1);
+        composite_face_list[3].push_back(15-1);
+        composite_face_list[3].push_back(18-1);
+        composite_face_list[3].push_back(14-1);
+        composite_face_list[3].push_back(23-1);
+
+        composite_face_element_type[4] = QUAD_9;
+        composite_face_list[4].push_back(3-1);
+        composite_face_list[4].push_back(4-1);
+        composite_face_list[4].push_back(8-1);
+        composite_face_list[4].push_back(7-1);
+        composite_face_list[4].push_back(11-1);
+        composite_face_list[4].push_back(16-1);
+        composite_face_list[4].push_back(19-1);
+        composite_face_list[4].push_back(15-1);
+        composite_face_list[4].push_back(24-1);
+
+        composite_face_element_type[5] = QUAD_9;
+        composite_face_list[5].push_back(1-1);
+        composite_face_list[5].push_back(5-1);
+        composite_face_list[5].push_back(8-1);
+        composite_face_list[5].push_back(4-1);
+        composite_face_list[5].push_back(13-1);
+        composite_face_list[5].push_back(20-1);
+        composite_face_list[5].push_back(16-1);
+        composite_face_list[5].push_back(12-1);
+        composite_face_list[5].push_back(25-1);
+
+        //! Face 24
+
+        //! 1 12 4 11 3  10  2  9  1  middle 21
+        //! Face 4
+        //! 1  12 21 9
+        //! 12 4  11 21
+        //! 9  21 10 2
+        //! 21 11 3 10
+
+        face_element_type.resize(24);
+        face_list.resize(24);
+
+        face_element_type[0] = QUAD_4;
+        face_list[0].push_back(1-1);
+        face_list[0].push_back(12-1);
+        face_list[0].push_back(21-1);
+        face_list[0].push_back(9-1);
+
+        face_element_type[1] = QUAD_4;
+        face_list[1].push_back(12-1);
+        face_list[1].push_back(4-1);
+        face_list[1].push_back(11-1);
+        face_list[1].push_back(21-1);
+
+        face_element_type[2] = QUAD_4;
+        face_list[2].push_back(9-1);
+        face_list[2].push_back(21-1);
+        face_list[2].push_back(10-1);
+        face_list[2].push_back(2-1);
+
+        face_element_type[3] = QUAD_4;
+        face_list[3].push_back(21-1);
+        face_list[3].push_back(11-1);
+        face_list[3].push_back(3-1);
+        face_list[3].push_back(10-1);
+
+        //! 5 17 6  18 7 19 8 20 5  middle 26
+        //! Face 4
+        //! 5  17 26 20
+        //! 20 26 19 8
+        //! 17 6  18 26
+        //! 26 18 7  19
+
+        face_element_type[4] = QUAD_4;
+        face_list[4].push_back(5-1);
+        face_list[4].push_back(17-1);
+        face_list[4].push_back(26-1);
+        face_list[4].push_back(20-1);
+
+        face_element_type[5] = QUAD_4;
+        face_list[5].push_back(20-1);
+        face_list[5].push_back(26-1);
+        face_list[5].push_back(19-1);
+        face_list[5].push_back(8-1);
+
+        face_element_type[6] = QUAD_4;
+        face_list[6].push_back(17-1);
+        face_list[6].push_back(6-1);
+        face_list[6].push_back(18-1);
+        face_list[6].push_back(26-1);
+
+        face_element_type[7] = QUAD_4;
+        face_list[7].push_back(26-1);
+        face_list[7].push_back(18-1);
+        face_list[7].push_back(7-1);
+        face_list[7].push_back(19-1);
+
+        //! 1  13  5  20  8  16 4 12 1  middle 25
+        //! Face 4
+        //! 1  13 25 12
+        //! 12 25 16  4
+        //! 13 5  20 25
+        //! 25 20 8  16
+
+        face_element_type[8] = QUAD_4;
+        face_list[8].push_back(1-1);
+        face_list[8].push_back(13-1);
+        face_list[8].push_back(25-1);
+        face_list[8].push_back(12-1);
+
+        face_element_type[9] = QUAD_4;
+        face_list[9].push_back(12-1);
+        face_list[9].push_back(25-1);
+        face_list[9].push_back(16-1);
+        face_list[9].push_back(4-1);
+
+        face_element_type[10] = QUAD_4;
+        face_list[10].push_back(13-1);
+        face_list[10].push_back(5-1);
+        face_list[10].push_back(20-1);
+        face_list[10].push_back(25-1);
+
+        face_element_type[11] = QUAD_4;
+        face_list[11].push_back(25-1);
+        face_list[11].push_back(20-1);
+        face_list[11].push_back(8-1);
+        face_list[11].push_back(16-1);
+
+        //! 2  10  3  15  7 18 6 14 2  middle 23
+        //! Face 4
+        //! 2  10 23 14
+        //! 10 3  15 23
+        //! 14 23 18 6
+        //! 23 15 7 18
+
+        face_element_type[12] = QUAD_4;
+        face_list[12].push_back(2-1);
+        face_list[12].push_back(10-1);
+        face_list[12].push_back(23-1);
+        face_list[12].push_back(14-1);
+
+        face_element_type[13] = QUAD_4;
+        face_list[13].push_back(10-1);
+        face_list[13].push_back(3-1);
+        face_list[13].push_back(15-1);
+        face_list[13].push_back(23-1);
+
+        face_element_type[14] = QUAD_4;
+        face_list[14].push_back(14-1);
+        face_list[14].push_back(23-1);
+        face_list[14].push_back(18-1);
+        face_list[14].push_back(6-1);
+
+        face_element_type[15] = QUAD_4;
+        face_list[15].push_back(23-1);
+        face_list[15].push_back(15-1);
+        face_list[15].push_back(7-1);
+        face_list[15].push_back(18-1);
+
+        //! 4 16 8 19  7 15 3 11 4  middle 24
+        //! Face 4
+        //! 4 16 24 11
+        //! 11 24 15 3
+        //! 16 8 19 24
+        //! 24 19 7 15
+
+        face_element_type[16] = QUAD_4;
+        face_list[16].push_back(4-1);
+        face_list[16].push_back(16-1);
+        face_list[16].push_back(24-1);
+        face_list[16].push_back(11-1);
+
+        face_element_type[17] = QUAD_4;
+        face_list[17].push_back(11-1);
+        face_list[17].push_back(24-1);
+        face_list[17].push_back(15-1);
+        face_list[17].push_back(3-1);
+
+        face_element_type[18] = QUAD_4;
+        face_list[18].push_back(16-1);
+        face_list[18].push_back(8-1);
+        face_list[18].push_back(19-1);
+        face_list[18].push_back(24-1);
+
+        face_element_type[19] = QUAD_4;
+        face_list[19].push_back(24-1);
+        face_list[19].push_back(19-1);
+        face_list[19].push_back(7-1);
+        face_list[19].push_back(15-1);
+
+        //! 1 9 2 14 6 17 5 13 1  middle 22
+        //! Face 4
+        //! 1  9  22 10
+        //! 9  2  14 22
+        //! 10 22 17 5
+        //! 22 14 6 17
+
+        face_element_type[20] = QUAD_4;
+        face_list[20].push_back(1-1);
+        face_list[20].push_back(9-1);
+        face_list[20].push_back(22-1);
+        face_list[20].push_back(13-1);
+
+        face_element_type[21] = QUAD_4;
+        face_list[21].push_back(9-1);
+        face_list[21].push_back(2-1);
+        face_list[21].push_back(14-1);
+        face_list[21].push_back(22-1);
+
+        face_element_type[22] = QUAD_4;
+        face_list[22].push_back(13-1);
+        face_list[22].push_back(22-1);
+        face_list[22].push_back(17-1);
+        face_list[22].push_back(5-1);
+
+        face_element_type[23] = QUAD_4;
+        face_list[23].push_back(22-1);
+        face_list[23].push_back(14-1);
+        face_list[23].push_back(6-1);
+        face_list[23].push_back(17-1);
+
+        //! HEXA_27
+        //! 1.........9. ........2
+        //! 2.........10.........3
+        //! 3.........11.........4
+        //! 4.........12.........1
+
+        //! 1.........13.........5
+        //! 2.........14.........6
+        //! 3.........15.........7
+        //! 4.........16.........8
+
+        //! 5.........17.........6
+        //! 6.........18.........7
+        //! 7.........19.........8
+        //! 8.........20.........5
+
+        //! 1 2.......21.........3 4
+        //! 1 2.......22.........6 5
+        //! 2 6.......23.........7 3
+        //! 3 7.......24.........8 4
+        //! 1 5.......25.........8 4
+        //! 5 6.......26.........7 8
+        //! 1 2 3 4...27.........5 6 7 8
+
+        mp_struct[8].push_back(0);
+        mp_struct[8].push_back(1);
+
+        mp_struct[9].push_back(1);
+        mp_struct[9].push_back(2);
+
+        mp_struct[10].push_back(2);
+        mp_struct[10].push_back(3);
+
+        mp_struct[11].push_back(3);
+        mp_struct[11].push_back(0);
+
+        mp_struct[12].push_back(0);
+        mp_struct[12].push_back(4);
+
+        mp_struct[13].push_back(1);
+        mp_struct[13].push_back(5);
+
+        mp_struct[14].push_back(2);
+        mp_struct[14].push_back(6);
+
+        mp_struct[15].push_back(3);
+        mp_struct[15].push_back(7);
+
+        mp_struct[16].push_back(4);
+        mp_struct[16].push_back(5);
+
+        mp_struct[17].push_back(5);
+        mp_struct[17].push_back(6);
+
+        mp_struct[18].push_back(6);
+        mp_struct[18].push_back(7);
+
+        mp_struct[19].push_back(7);
+        mp_struct[19].push_back(4);
+
+        //! 1 2.......21.........3 4
+        //! 1 2.......22.........6 5
+        //! 2 6.......23.........7 3
+        //! 3 7.......24.........8 4
+        //! 1 5.......25.........8 4
+        //! 5 6.......26.........7 8
+        //! 1 2 3 4...27.........5 6 7 8
+
+        mp_struct[20].push_back(0);
+        mp_struct[20].push_back(3);
+        mp_struct[20].push_back(2);
+        mp_struct[20].push_back(1);
+
+        mp_struct[21].push_back(0);
+        mp_struct[21].push_back(1);
+        mp_struct[21].push_back(5);
+        mp_struct[21].push_back(4);
+
+        mp_struct[22].push_back(1);
+        mp_struct[22].push_back(2);
+        mp_struct[22].push_back(6);
+        mp_struct[22].push_back(5);
+
+        mp_struct[23].push_back(2);
+        mp_struct[23].push_back(3);
+        mp_struct[23].push_back(7);
+        mp_struct[23].push_back(6);
+
+        mp_struct[24].push_back(0);
+        mp_struct[24].push_back(4);
+        mp_struct[24].push_back(7);
+        mp_struct[24].push_back(3);
+
+        mp_struct[25].push_back(4);
+        mp_struct[25].push_back(5);
+        mp_struct[25].push_back(6);
+        mp_struct[25].push_back(7);
+
+        mp_struct[26].push_back(0);
+        mp_struct[26].push_back(1);
+        mp_struct[26].push_back(2);
+        mp_struct[26].push_back(3);
+        mp_struct[26].push_back(4);
+        mp_struct[26].push_back(5);
+        mp_struct[26].push_back(6);
+        mp_struct[26].push_back(7);
+
+        //! subcell
+        //! HEXA_8  : 4  12 21 11 16 25 27 24
+        //! HEXA_8  : 12 1  9  21 25 13 22 27
+        //! HEXA_8  : 11 21 10 3  24 27 23 15
+        //! HEXA_8  : 21 9  2  10 27 22 14 23
+        //! HEXA_8  : 16 25 27 24 8  20 26 19
+        //! HEXA_8  : 25 13 22 27 20 5  17 26
+        //! HEXA_8  : 24 27 23 15 19 26 18 7
+        //! HEXA_8  : 27 22 14 23 26 17 6  18
+
+        child_element_type.resize(8);
+        child_element_index.resize(8);
+
+        child_element_type[0] = HEXA_8;
+        child_element_index[0].push_back(4-1);
+        child_element_index[0].push_back(12-1);
+        child_element_index[0].push_back(21-1);
+        child_element_index[0].push_back(11-1);
+        child_element_index[0].push_back(16-1);
+        child_element_index[0].push_back(25-1);
+        child_element_index[0].push_back(27-1);
+        child_element_index[0].push_back(24-1);
+
+        child_element_type[1] = HEXA_8;
+        child_element_index[1].push_back(12-1);
+        child_element_index[1].push_back(1-1);
+        child_element_index[1].push_back(9-1);
+        child_element_index[1].push_back(21-1);
+        child_element_index[1].push_back(25-1);
+        child_element_index[1].push_back(13-1);
+        child_element_index[1].push_back(22-1);
+        child_element_index[1].push_back(27-1);
+
+        child_element_type[2] = HEXA_8;
+        child_element_index[2].push_back(11-1);
+        child_element_index[2].push_back(21-1);
+        child_element_index[2].push_back(10-1);
+        child_element_index[2].push_back(3-1);
+        child_element_index[2].push_back(24-1);
+        child_element_index[2].push_back(27-1);
+        child_element_index[2].push_back(23-1);
+        child_element_index[2].push_back(15-1);
+
+        child_element_type[3] = HEXA_8;
+        child_element_index[3].push_back(21-1);
+        child_element_index[3].push_back(9-1);
+        child_element_index[3].push_back(2-1);
+        child_element_index[3].push_back(10-1);
+        child_element_index[3].push_back(27-1);
+        child_element_index[3].push_back(22-1);
+        child_element_index[3].push_back(14-1);
+        child_element_index[3].push_back(23-1);
+
+        child_element_type[4] = HEXA_8;
+        child_element_index[4].push_back(16-1);
+        child_element_index[4].push_back(25-1);
+        child_element_index[4].push_back(27-1);
+        child_element_index[4].push_back(24-1);
+        child_element_index[4].push_back(8-1);
+        child_element_index[4].push_back(20-1);
+        child_element_index[4].push_back(26-1);
+        child_element_index[4].push_back(19-1);
+
+        child_element_type[5] = HEXA_8;
+        child_element_index[5].push_back(25-1);
+        child_element_index[5].push_back(13-1);
+        child_element_index[5].push_back(22-1);
+        child_element_index[5].push_back(27-1);
+        child_element_index[5].push_back(20-1);
+        child_element_index[5].push_back(5-1);
+        child_element_index[5].push_back(17-1);
+        child_element_index[5].push_back(26-1);
+
+        child_element_type[6] = HEXA_8;
+        child_element_index[6].push_back(24-1);
+        child_element_index[6].push_back(27-1);
+        child_element_index[6].push_back(23-1);
+        child_element_index[6].push_back(15-1);
+        child_element_index[6].push_back(19-1);
+        child_element_index[6].push_back(26-1);
+        child_element_index[6].push_back(18-1);
+        child_element_index[6].push_back(7-1);
+
+        child_element_type[7] = HEXA_8;
+        child_element_index[7].push_back(27-1);
+        child_element_index[7].push_back(22-1);
+        child_element_index[7].push_back(14-1);
+        child_element_index[7].push_back(23-1);
+        child_element_index[7].push_back(26-1);
+        child_element_index[7].push_back(17-1);
+        child_element_index[7].push_back(6-1);
+        child_element_index[7].push_back(18-1);
+    }
+}
+
+bool BasicElement::ISBasicElement(int elem_type)
+{
+    bool results = false;
+    if (elem_type == NODE)
+    {
+    }
+    else if (elem_type == BAR_2)
+    {
+        results = true;
+    }
+    else if (elem_type == BAR_3)
+    {
+    }
+    else if (elem_type == TRI_3)
+    {
+        if (GetDim() == TWO_D)
+        {
+            results = true;
+        }
+    }
+    else if (elem_type == TRI_6)
+    {
+    }
+    else if (elem_type == QUAD_4)
+    {
+        if (GetDim() == TWO_D)
+        {
+            results = true;
+        }
+    }
+    else if (elem_type == QUAD_8)
+    {
+    }
+    else if (elem_type == QUAD_9)
+    {
+    }
+    else if (elem_type == TETRA_4)
+    {
+        results = true;
+    }
+    else if (elem_type == TETRA_10)
+    {
+    }
+    else if (elem_type == PYRA_5)
+    {
+        results = true;
+    }
+    else if (elem_type == PYRA_14)
+    {
+    }
+    else if (elem_type == PENTA_6)
+    {
+        results = true;
+    }
+    else if (elem_type == PENTA_15)
+    {
+    }
+    else if (elem_type == PENTA_18)
+    {
+    }
+    else if (elem_type == HEXA_8)
+    {
+        results = true;
+    }
+    else if (elem_type == HEXA_20)
+    {
+    }
+    else if (elem_type == HEXA_27)
+    {
+    }
+    return results;
+}
+
+bool BasicElement::IsFaceElementType(int elementType)
+{
+    bool results = false;
+
+    if (elementType == BAR_2)
+    {
+        if (GetDim() == TWO_D)
+        {
+            results = true;
+        }
+        else
+        {
+            results = false;
+        }
+    }
+    else if (elementType == TRI_3)
+    {
+        if (GetDim() == TWO_D)
+        {
+            results = false;
+        }
+        else
+        {
+            results = true;
+        }
+    }
+    else if (elementType == QUAD_4)
+    {
+        if (GetDim() == TWO_D)
+        {
+            results = false;
+        }
+        else
+        {
+            results = true;
+        }
+    }
+    return results;
+}
+
+
+bool BasicElement::IsFaceElementTypeAtLeast(int elementType)
+{
+    bool results = ISBasicElement(elementType);
+
+    if (elementType == BAR_2)
+    {
+        if (GetDim() == TWO_D)
+        {
+            results = true;
+        }
+        else
+        {
+            results = false;
+        }
+    }
+    return results;
+}
+
+
+bool BasicElement::IsBasicVolumeElementType(int elementType)
+{
+    bool results = false;
+    if (elementType == TRI_3)
+    {
+        if (GetDim() == TWO_D)
+        {
+            results = true;
+        }
+    }
+    else if (elementType == QUAD_4)
+    {
+        if (GetDim() == TWO_D)
+        {
+            results = true;
+        }
+    }
+    else if (elementType == TETRA_4)
+    {
+        results = true;
+    }
+    else if (elementType == PYRA_5)
+    {
+        results = true;
+    }
+    else if (elementType == PENTA_6)
+    {
+        results = true;
+    }
+    else if (elementType == HEXA_8)
+    {
+        results = true;
+    }
+    return results;
+}
+
+int BasicElement::GetRefineElemType(int elem_type, const bool & anisotropicAdapt)
+{
+    int next_elem_type = -1;
+    if (elem_type == NODE)
+    {
+    }
+    else if (elem_type == BAR_2)
+    {
+        next_elem_type = BAR_3;
+    }
+    else if (elem_type == BAR_3)
+    {
+    }
+    else if (elem_type == TRI_3)
+    {
+        next_elem_type = TRI_6;
+    }
+    else if (elem_type == TRI_6)
+    {
+    }
+    else if (elem_type == QUAD_4)
+    {
+        if (anisotropicAdapt)
+        {
+            next_elem_type = QUAD_6;
+        }
+        else
+        {
+            next_elem_type = QUAD_9;
+        }
+    }
+    else if (elem_type == QUAD_8)
+    {
+    }
+    else if (elem_type == QUAD_9)
+    {
+    }
+    else if (elem_type == TETRA_4)
+    {
+        next_elem_type = TETRA_10;
+    }
+    else if (elem_type == TETRA_10)
+    {
+    }
+    else if (elem_type == PYRA_5)
+    {
+        next_elem_type = PYRA_14;
+    }
+    else if (elem_type == PYRA_14)
+    {
+    }
+    else if (elem_type == PENTA_6)
+    {
+        if (anisotropicAdapt)
+        {
+            next_elem_type = PENTA_12;
+        }
+        else
+        {
+            next_elem_type = PENTA_18;
+        }
+    }
+    else if (elem_type == PENTA_15)
+    {
+    }
+    else if (elem_type == PENTA_18)
+    {
+    }
+    else if (elem_type == HEXA_8)
+    {
+        next_elem_type = HEXA_27;
+    }
+    else if (elem_type == HEXA_20)
+    {
+    }
+    else if (elem_type == HEXA_27)
+    {
+    }
+    return next_elem_type;
+}
+
+int BasicElement::GetSimpleElemType(int elem_type)
+{
+    int prev_elem_type = -1;
+    if (elem_type == NODE)
+    {
+    }
+    else if (elem_type == BAR_2)
+    {
+    }
+    else if (elem_type == BAR_3)
+    {
+        prev_elem_type = BAR_2;
+    }
+    else if (elem_type == TRI_3)
+    {
+    }
+    else if (elem_type == TRI_6)
+    {
+        prev_elem_type = TRI_3;
+    }
+    else if (elem_type == QUAD_4)
+    {
+    }
+    else if (elem_type == QUAD_6)
+    {
+        prev_elem_type = QUAD_4;
+    }
+    else if (elem_type == QUAD_8)
+    {
+    }
+    else if (elem_type == QUAD_9)
+    {
+        prev_elem_type = QUAD_4;
+    }
+    else if (elem_type == TETRA_4)
+    {
+    }
+    else if (elem_type == TETRA_10)
+    {
+        prev_elem_type = TETRA_4;
+    }
+    else if (elem_type == PYRA_5)
+    {
+    }
+    else if (elem_type == PYRA_14)
+    {
+        prev_elem_type = PYRA_5;
+    }
+    else if (elem_type == PENTA_6)
+    {
+    }
+    else if (elem_type == PENTA_12)
+    {
+        prev_elem_type = PENTA_6;
+    }
+    else if (elem_type == PENTA_15)
+    {
+    }
+    else if (elem_type == PENTA_18)
+    {
+        prev_elem_type = PENTA_6;
+    }
+    else if (elem_type == HEXA_8)
+    {
+    }
+    else if (elem_type == HEXA_20)
+    {
+    }
+    else if (elem_type == HEXA_27)
+    {
+        prev_elem_type = HEXA_8;
+    }
+    return prev_elem_type;
+}
+
+
+ElementProxy::ElementProxy()
+{
+    basic_element_number = GetNumberOfBasicElement();
+    basic_element = new BasicElement * [ basic_element_number ];
+    for (int i = 0; i < basic_element_number; ++ i)
+    {
+        basic_element[i] = new BasicElement();
+        basic_element[i]->Init(i);
+    }
+}
+
+ElementProxy::~ElementProxy()
+{
+    for (int i = 0; i < basic_element_number; ++ i)
+    {
+        delete basic_element[i];
+    }
+    delete [] basic_element;
+}
+
+//! The following sections is copy from HyperFLOW 3.0.
+//! Copy start.
+ElementProxy * elementProxy = 0;
+ElementInitializingClass::ElementInitializingClass()
+{
+    elementProxy = new ElementProxy();
+}
+
+ElementInitializingClass::~ElementInitializingClass()
+{
+    delete elementProxy;
+}
+
+ElementInitializingClass element_initializing;
+
+int  GetRefineElemType(int elementType, const bool & anisotropicAdapt)
+{ 
+    return GetBasicElement(elementType)->GetRefineElemType(elementType, anisotropicAdapt);
+}
+
+int  GetSimpleElementType(int elementType)
+{ 
+    return GetBasicElement(elementType)->GetSimpleElemType(elementType);
+}
+
+bool ISBasicElement(int elementType)
+{ 
+    return GetBasicElement(elementType)->ISBasicElement(elementType); 
+}
+
+bool IsFaceElementType(int elementType)
+{
+    return GetBasicElement(elementType)->IsFaceElementType(elementType); 
+}
+
+bool IsFaceElementTypeAtLeast(int elementType)
+{
+    return GetBasicElement(elementType)->IsFaceElementTypeAtLeast(elementType); 
+}
+
+BasicElement * GetBasicElement(int elementType)
+{ 
+    return elementProxy->GetBasicElement(elementType);
+}
+
+uint_t GetChildElementNumbers(int elementType)
+{ 
+    return elementProxy->GetBasicElement(elementType)->GetChildElementNumber();
+}
+
+bool IsBasicVolumeElementType(int elementType)
+{
+    BasicElement * element = GetBasicElement(elementType);
+    return element->ISBasicElement(elementType);
+}
+
+uint_t GetChildElementNumber(int elementType)
+{ 
+    return elementProxy->GetBasicElement(elementType)->GetChildElementNumber();
+}
+
+int GetElementNodeNumbers(int elementType) 
+{ 
+    return elementProxy->GetBasicElement(elementType)->GetElementNodeNumber(elementType);
+}
+
+vector<int> & GetRelatedPointListForMiddlePointComputation(int elem_type, int i)
+{ 
+    return elementProxy->GetBasicElement(elem_type)->GetMPlist(i);
+}
+
+bool IsBoundaryFace(const int & rightCellIndex)
+{
+    return (rightCellIndex < 0);
+}
+
+bool IsElementNotExist(const int & rightCellIndex)
+{
+    return (rightCellIndex < 0);
+}
+//! Copy end.
+
+int GetNumberOfBasicElement()
+{
+    //const int PENTA_12 = NofValidElementTypes;
+    //const int QUAD_6   = NofValidElementTypes+1;
+    return (NofValidElementTypes + 2);
+}
+
+}
diff --git a/API/Geometry/src/Geo_FaceMetrics_Struct.cpp b/API/Geometry/src/Geo_FaceMetrics_Struct.cpp
new file mode 100644
index 0000000..8cad027
--- /dev/null
+++ b/API/Geometry/src/Geo_FaceMetrics_Struct.cpp
@@ -0,0 +1,48 @@
+#include "GlobalDataBase.h"
+#include "Geo_FaceMetrics_Struct.h"
+
+namespace PHSPACE
+{
+
+    Geo_FaceMetrics_Struct::Geo_FaceMetrics_Struct()
+    {
+        xfn = NULL;
+        yfn = NULL;
+        zfn = NULL;
+        area = NULL;
+        xFaceVector = NULL;
+        yFaceVector = NULL;
+        zFaceVector = NULL;
+
+        xyzFaceVector_FD = NULL;
+        xyzFaceNormal_FD = NULL;
+    }
+
+    Geo_FaceMetrics_Struct::~Geo_FaceMetrics_Struct()
+    {
+        DeallocateAll();
+    }
+
+    void Geo_FaceMetrics_Struct::AllocateMetrics(Range &I, Range &J, Range &K, Range &D)
+    {
+        DeallocateAll();
+
+        xfn  = new RDouble4D(I, J, K, D, fortranArray);
+        yfn  = new RDouble4D(I, J, K, D, fortranArray);
+        zfn  = new RDouble4D(I, J, K, D, fortranArray);
+        area = new RDouble4D(I, J, K, D, fortranArray);
+
+        xFaceVector = new RDouble4D(I, J, K, D, fortranArray);
+        yFaceVector = new RDouble4D(I, J, K, D, fortranArray);
+        zFaceVector = new RDouble4D(I, J, K, D, fortranArray);
+
+        int SolverStructOrder = PHSPACE::GlobalDataBase::GetIntParaFromDB("SolverStructOrder");
+        if (SolverStructOrder > 2)
+        {
+            Range DA(D.first() - 1, D.last());
+
+            xyzFaceVector_FD = new RDouble5D(D , I, J, K, D, fortranArray);
+            xyzFaceNormal_FD = new RDouble5D(DA, I, J, K, D, fortranArray);
+        }
+    }
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_FaceMetrics_Unstruct.cpp b/API/Geometry/src/Geo_FaceMetrics_Unstruct.cpp
new file mode 100644
index 0000000..512dbe8
--- /dev/null
+++ b/API/Geometry/src/Geo_FaceMetrics_Unstruct.cpp
@@ -0,0 +1,31 @@
+#include "Geo_FaceMetrics_Unstruct.h"
+
+namespace PHSPACE
+{
+LIB_EXPORT Geo_FaceMetrics_Unstruct::Geo_FaceMetrics_Unstruct()
+{
+    xfc = NULL;
+    yfc = NULL;
+    zfc = NULL;
+
+    xfn = NULL;
+    yfn = NULL;
+    zfn = NULL;
+
+    area = NULL;
+}
+
+LIB_EXPORT Geo_FaceMetrics_Unstruct::~Geo_FaceMetrics_Unstruct()
+{
+    delete [] xfc;    xfc = NULL;
+    delete [] yfc;    yfc = NULL;
+    delete [] zfc;    zfc = NULL;
+
+    delete [] xfn;    xfn = NULL;
+    delete [] yfn;    yfn = NULL;
+    delete [] zfn;    zfn = NULL;
+
+    delete [] area;    area = NULL;
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_FaceTopo_Unstruct.cpp b/API/Geometry/src/Geo_FaceTopo_Unstruct.cpp
new file mode 100644
index 0000000..f42d382
--- /dev/null
+++ b/API/Geometry/src/Geo_FaceTopo_Unstruct.cpp
@@ -0,0 +1,34 @@
+#include "Geo_FaceTopo_Unstruct.h"
+
+namespace PHSPACE
+{
+LIB_EXPORT Geo_FaceTopo_Unstruct::Geo_FaceTopo_Unstruct()
+{
+    left_cell_of_face  = NULL;
+    right_cell_of_face = NULL;
+    node_number_of_each_face = NULL;
+    face2node = NULL;
+
+    face2nodeSubscript = NULL;
+    face2nodeArray = NULL;
+}
+
+LIB_EXPORT Geo_FaceTopo_Unstruct::~Geo_FaceTopo_Unstruct()
+{
+    delete [] left_cell_of_face;    left_cell_of_face  = NULL;
+    delete [] right_cell_of_face;    right_cell_of_face = NULL;
+    delete [] node_number_of_each_face;    node_number_of_each_face = NULL;
+    delete [] face2node;    face2node = NULL;
+
+    if (face2nodeSubscript != 0)
+    {
+        delete [] face2nodeSubscript;    face2nodeSubscript = NULL;
+    }
+
+    if (face2nodeArray != 0)
+    {
+        delete [] face2nodeArray;    face2nodeArray = NULL;
+    }
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_Grid.cpp b/API/Geometry/src/Geo_Grid.cpp
new file mode 100644
index 0000000..20f794d
--- /dev/null
+++ b/API/Geometry/src/Geo_Grid.cpp
@@ -0,0 +1,929 @@
+#include "Geo_StructGrid.h"
+#include "IO_FileName.h"
+#include "Constants.h"
+#include "GridType.h"
+#include "Geo_StructBC.h"
+#include "Geo_Interface.h"
+#include "Geo_Interpoint.h"
+#include "LinkStruct.h"
+#include "TK_Exit.h"
+#include "TK_Log.h"
+#include "OversetInformation.h"
+#include "PHIO.h"
+#include "cgnslib.h"
+#include "Glb_Dimension.h"
+
+using namespace std;
+namespace PHSPACE
+{
+
+Grid::Grid()
+{
+    zoneProbesNumber = 0;
+    zoneProbesGlobalID.resize(0);
+    zoneProbesLineID.resize(0);
+    zoneProbesSurfaceID.resize(0);
+    zoneProbesCoordinates.resize(0);
+    oversetInformationProxy = NULL;
+    volumeCondition = NULL;
+}
+
+LIB_EXPORT void Grid::InitGrid(GridID *index, int level, int dim, int type)
+{
+    this->dimension = dim;
+    this->type  = type;
+    this->level = level;
+    this->index = index;
+
+    cGrid = NULL;
+    fGrid = NULL;
+
+    interfaceInfo = NULL;
+    interpointInformation = NULL;
+    interfaceFields = NULL;
+    interpointFields = NULL;
+    oversetInfoProxy = NULL;
+    oversetInformationProxy = NULL;
+
+    own_database = 0;
+    gField = new Data_Field();
+    gPara = NULL;
+
+    oldGrid = NULL;
+    fileIndexCurrentGridBelong = 0;
+}
+
+Grid::~Grid()
+{
+    delete index;    index = NULL;
+    delete oversetInfoProxy;    oversetInfoProxy = NULL;
+    delete gField;    gField = NULL;
+
+    if (own_database)
+    {
+        delete gPara;    gPara = NULL;
+    }
+
+    delete oldGrid;    oldGrid = NULL;
+
+    if (IsFinestGrid())
+    {
+        FreeInterfaceField();
+    }
+
+    if (interfaceFields){delete interfaceFields;    interfaceFields = NULL;};
+    delete interpointFields;    interpointFields = NULL;
+
+    delete oversetInformationProxy;    oversetInformationProxy = NULL;
+
+    if (interfaceInfo){delete interfaceInfo;    interfaceInfo = NULL;};
+    delete interpointInformation;    interpointInformation = NULL;
+
+    if (IsFinestGrid())
+    {
+        if (volumeCondition) { delete volumeCondition; volumeCondition = NULL; };
+    }
+
+    zoneProbesGlobalID.clear();
+    zoneProbesLineID.clear();
+    zoneProbesSurfaceID.clear();
+    zoneProbesCoordinates.clear();
+}
+
+LIB_EXPORT Grid * Grid::GetFinestGrid()
+{
+    if (!this->GetFineGrid())
+    {
+        return this;
+    }
+    else
+    {
+        return this->GetFineGrid()->GetFinestGrid();
+    }
+}
+
+LIB_EXPORT void Grid::BackUpOldGrid()
+{
+    if (!oldGrid) oldGrid = new SimpleGrid();
+    *oldGrid = *this;
+}
+
+void Grid::GridVerticeVelocity(RDouble *xt, RDouble *yt, RDouble *zt)
+{
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+
+    SimpleGrid *oldGrid = this->GetOldGrid();
+
+    RDouble *oldX = oldGrid->GetX();
+    RDouble *oldY = oldGrid->GetY();
+    RDouble *oldZ = oldGrid->GetZ();
+
+    int numberOfNodes = this->GetNTotalNode();
+
+    RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+    for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        xt[iNode] = (x[iNode] - oldX[iNode]) / physicalTimeStep;
+        yt[iNode] = (y[iNode] - oldY[iNode]) / physicalTimeStep;
+        zt[iNode] = (z[iNode] - oldZ[iNode]) / physicalTimeStep;
+    }
+}
+
+LIB_EXPORT void Grid::RotTransVel(RDouble *xyzref, RDouble *dangle, RDouble *tcoord, RDouble **coord0)
+{
+    //! This subroutine calculates the new set of coordinates after a rotation and a translation.
+
+    RDouble psi, theta, phi, cp, sp, ct, st, cf, sf;
+    RDouble xm, ym, zm, xp, yp, zp, dx, dy, dz;
+    RDouble m11, m12, m13, m21, m22, m23, m31, m32, m33;
+
+    int nTotalNode = this->GetNTotalNode();
+
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+
+    psi   = dangle[0];
+    theta = dangle[1];
+    phi   = dangle[2];
+
+    dx = tcoord[0];
+    dy = tcoord[1];
+    dz = tcoord[2];
+    
+    xp = coord0[0][0] - dx;
+    yp = coord0[1][0] - dy;
+    zp = coord0[2][0] - dz;
+    
+    cp = cos(psi);
+    sp = sin(psi);
+    ct = cos(theta);
+    st = sin(theta);
+    cf = cos(phi);
+    sf = sin(phi);
+
+    m11 =   ct * cp;
+    m12 = - ct * sp;
+    m13 =   st;
+    m21 =   cf * sp + sf * st * cp;
+    m22 =   cf * cp - sf * st * sp;
+    m23 = - sf * ct;
+    m31 =   sf * sp - cf * st * cp;
+    m32 =   sf * cp + cf * st * sp;
+    m33 =   cf * ct;
+
+    //! Update the grid.
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        xm = x[iNode] - xp;
+        ym = y[iNode] - yp;
+        zm = z[iNode] - zp;
+
+        x[iNode] = m11 * xm + m12 * ym + m13 * zm + xp + dx;
+        y[iNode] = m21 * xm + m22 * ym + m23 * zm + yp + dy;
+        z[iNode] = m31 * xm + m32 * ym + m33 * zm + zp + dz;
+    }
+
+    //! Update xyzref array.
+    xm = xyzref[0] - xp;
+    ym = xyzref[1] - yp;
+    zm = xyzref[2] - zp;
+
+    xyzref[0] = m11 * xm + m12 * ym + m13 * zm + xp + dx;
+    xyzref[1] = m21 * xm + m22 * ym + m23 * zm + yp + dy;
+    xyzref[2] = m31 * xm + m32 * ym + m33 * zm + zp + dz;
+}
+
+LIB_EXPORT void Grid::ComputeGDVel(RDouble *xt, RDouble *yt, RDouble *zt, RDouble **angle0, RDouble **coord0)
+{
+    //! This subroutine calculates the grid velocity at the cell vertices.
+    
+    //! angle0 = Euler's angles and their time derivatives.
+    //! coord0 = position of the reference point abd their time derivatives.
+
+    RDouble psip, theta, thetap, phi, phip, omega1, omega2, omega3;
+
+    int nTotalNode = this->GetNTotalNode();
+
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+
+    //! Compute the components of the rotation vector.
+    //! Omega (psip,thetap,phip) in the frame (k0,jh,i) where
+    //! k0 = -sin theta * i + cos theta sin phi * j + cos theta cos phi * k
+    //! jh = cos phi * j - sin phi * k
+    //! Omega(p,q,r) in the frame (i,j,k) angle0(1,.) = (psi,theta,phi)
+    //! psi is not set since it is not needed.
+
+    psip   = angle0[0][1];
+    theta  = angle0[1][0];
+    thetap = angle0[1][1];
+    phi    = angle0[2][0];
+    phip   = angle0[2][1];
+
+    omega1 = - psip * sin(theta)            + phip;
+    omega2 =   psip * cos(theta) * sin(phi) + thetap * cos(phi);
+    omega3 =   psip * cos(theta) * cos(phi) - thetap * sin(phi);
+
+    //! Calculate the grid velocity with the formula dOM =dOP+Omega*PM.
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        xt[iNode] = coord0[0][1] + omega2 * (z[iNode] - coord0[2][0]) - omega3 * (y[iNode] - coord0[1][0]);
+        yt[iNode] = coord0[1][1] + omega3 * (x[iNode] - coord0[0][0]) - omega1 * (z[iNode] - coord0[2][0]);
+        zt[iNode] = coord0[2][1] + omega1 * (y[iNode] - coord0[1][0]) - omega2 * (x[iNode] - coord0[0][0]);
+    }
+}
+
+LIB_EXPORT void Grid::RotateAboutAxis()
+{
+    int nAxisRotateTimes = 0;
+    PHSPACE::GlobalDataBase::GetData("nAxisRotateTimes", &nAxisRotateTimes, PHINT, 1);
+    if(nAxisRotateTimes < 1)
+    {
+        return;
+    }
+
+    //! Turn the Y axis to be up, if the original Z axis is up.
+    int nTotalNode = this->GetNTotalNode();
+
+    RDouble *x, *y, *z;
+    x = this->GetX();
+    y = this->GetY();
+    z = this->GetZ();
+
+    //! The axis rotating order.
+    int *axisRotateOrder = new int [nAxisRotateTimes];
+    GlobalDataBase::GetData("axisRotateOrder", axisRotateOrder, PHINT, nAxisRotateTimes);
+
+    //! The axis rotating angles (degree), which are corresponding to the axis rotating order.
+    RDouble *axisRotateAngles = new RDouble [nAxisRotateTimes];
+    GlobalDataBase::GetData("axisRotateAngles", axisRotateAngles, PHDOUBLE, nAxisRotateTimes);
+
+    const int AXIS_X = 1;
+    const int AXIS_Y = 2;
+    const int AXIS_Z = 3;
+    for (int iRotate = 0; iRotate < nAxisRotateTimes; ++ iRotate)
+    {
+        int rotateAxis = axisRotateOrder[iRotate];
+        RDouble rotateAngle = axisRotateAngles[iRotate] * PI / 180.0;
+
+        RDouble cosinTheta = cos(rotateAngle);
+        RDouble sinTheta   = sin(rotateAngle);
+        if(rotateAxis == AXIS_X)
+        {            
+            for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+            {
+                RDouble oldY = y[iNode];
+                RDouble oldZ = z[iNode];
+                y[iNode] = cosinTheta * oldY + sinTheta   * oldZ;
+                z[iNode] = -sinTheta  * oldY + cosinTheta * oldZ;
+            }
+        }
+        else if(rotateAxis == AXIS_Y)
+        {
+            for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+            {
+                RDouble oldX = x[iNode];
+                RDouble oldZ = z[iNode];
+                x[iNode] = cosinTheta * oldX + sinTheta   * oldZ;
+                z[iNode] = -sinTheta  * oldX + cosinTheta * oldZ;
+            }
+        }
+        else if(rotateAxis == AXIS_Z)
+        {
+            for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+            {
+                RDouble oldX = x[iNode];
+                RDouble oldY = y[iNode];
+                x[iNode] = cosinTheta * oldX + sinTheta   * oldY;
+                y[iNode] = -sinTheta  * oldX + cosinTheta * oldY;
+            }
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("Error axis rotating!");
+        }
+    }
+    delete []axisRotateOrder;
+    delete []axisRotateAngles;
+
+    RDouble xmin, ymin, zmin, xmax, ymax, zmax;
+    xmin = ymin = zmin =   LARGE;
+    xmax = ymax = zmax = - LARGE;
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        xmin = MIN(xmin, x[iNode]);
+        ymin = MIN(ymin, y[iNode]);
+        zmin = MIN(zmin, z[iNode]);
+
+        xmax = MAX(xmax, x[iNode]);
+        ymax = MAX(ymax, y[iNode]);
+        zmax = MAX(zmax, z[iNode]);
+    }
+
+    ostringstream oss;
+    oss << "After axis turning \n";
+
+    oss << setiosflags(ios::right);
+    oss << setprecision(8);
+    oss << setiosflags(ios::scientific);
+    oss << setiosflags(ios::showpoint);
+    int wordwidth = 16;
+    oss << " xmin = " << setw(wordwidth) << xmin << " xmax = " << setw(wordwidth) << xmax << "\n";
+    oss << " ymin = " << setw(wordwidth) << ymin << " ymax = " << setw(wordwidth) << ymax << "\n";
+    oss << " zmin = " << setw(wordwidth) << zmin << " zmax = " << setw(wordwidth) << zmax << "\n";
+
+    if (PHMPI::GetCurrentProcessorID() == PHMPI::GetServerProcessorID())
+    {
+        cout << oss.str();
+    }
+}
+
+LIB_EXPORT void Grid::RegisterInterfaceField(const string &name, const int type, const int dimesion, const int solverID)
+{
+    if (!interfaceFields) return;
+
+    interfaceFields->RegisterField(name, type, dimesion, solverID);
+}
+
+LIB_EXPORT void Grid::ReleaseInterfaceField()
+{
+    if (interfaceFields)
+    {
+        interfaceFields->RemoveAllField();
+    }
+}
+
+LIB_EXPORT void Grid::ReleaseInterfaceField(string varName)
+{
+    if (interfaceFields)
+    {
+        interfaceFields->RemoveAnVariable(varName);
+    }
+}
+
+LIB_EXPORT void Grid::RegisterInterpointField(const string &name, const int type, const int dimesion, const int solverID)
+{
+    if (!interpointFields)
+    {
+        return;
+    }
+
+    interpointFields->RegisterField(name, type, dimesion, solverID);
+}
+#pragma warning(disable:4100)
+LIB_EXPORT void Grid::RegisterOversetField(const string &name, const int type, const int dimesion)
+{
+}
+#pragma warning(default:4100)
+void Grid::FreeInterfaceField()
+{
+    if (!interfaceFields) return;
+    if (interfaceFields->Size() == 0) return;
+
+    interfaceFields->FreeInterfaceVar();
+}
+
+LIB_EXPORT void Grid::InitMovingGrids()
+{
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+    if (isAle)
+    {
+        //ostringstream oss;
+        //oss << "Warning: in Grid::InitMovingGrids, nstart parameter has been deleted from cfd_para" << " !!!" << endl;
+        //cout << oss.str();
+
+        //int nstart = GlobalDataBase::GetIntParaFromDB("nstart");
+        int nstart = 0;
+
+        if (nstart == 0 || nstart == 3)
+        {
+            //! nstart==0: start all over again.
+            //! nstart==3: Unsteady-->Dynamics mesh.
+            UpdateVolold();
+        }
+    }
+}
+
+//! Check grid validity.
+LIB_EXPORT void Grid::GridValidityCheck()
+{
+    //! Interface check.
+    int nIFace = this->GetNIFace();
+    if (PHMPI::GetNumberOfProcessor() > 1 && nIFace == 0)
+    {
+        //! Parallel computing, but without any interface faces.
+        ostringstream oss;
+        oss << "Error: myid = " << PHMPI::GetCurrentProcessorID() 
+            << ", zone index = " << this->GetZoneID() 
+            << ", nIFace = 0 for parallel computing!!"
+            << endl;
+
+        PHMPI::FreeBlockData();
+        cout << oss.str() << endl;
+        MPI_Abort(MPI_COMM_WORLD, -1);
+    }
+}
+
+void Grid::RotateTranslation()
+{
+}
+
+void Grid::ComputeCellBoundaryType()
+{
+
+}
+
+void CheckGrid(Grid **grids, int nBlocks)
+{
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        StructGrid *grid = StructGridCast(grids[iZone]);
+        InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+
+        int nIFace = 0;
+        if (interfaceInfo)
+        {
+            nIFace = interfaceInfo->GetNIFace();
+        }
+
+        if (nIFace == 0) continue;
+
+        int *interFace2ZoneID       = interfaceInfo->GetInterFace2ZoneID();
+        int *interFace2InterFaceID  = interfaceInfo->GetInterFace2InterFaceID();
+
+        int target_zone, itface;
+        int is, js, ks, nsurf, s_lr, it, jt, kt, t_lr;
+        RDouble s_xfc, s_yfc, s_zfc, t_xfc, t_yfc, t_zfc;
+        int il1, jl1, kl1;
+  
+        for (int iFace = 0; iFace < nIFace; ++ iFace)
+        {
+            target_zone = interFace2ZoneID[iFace];
+            if (target_zone < iZone) continue;
+            
+            grid->GetSourceIndexIJK_Nsurf_LR(iFace, 1, is, js, ks, nsurf, s_lr);
+            if (s_lr == 1)
+            {
+                GetNsurfIndex(nsurf, il1, jl1, kl1);
+                is = is + il1;
+                js = js + jl1;
+                ks = ks + kl1;
+            }
+            grid->FaceCoor(is, js, ks, nsurf, s_xfc, s_yfc, s_zfc);
+
+            itface = interFace2InterFaceID[iFace];
+
+            if (target_zone == iZone)
+            {
+                grid->GetSourceIndexIJK_Nsurf_LR(itface, 1, it, jt, kt, nsurf, t_lr);
+                if (t_lr == 1)
+                {
+                    GetNsurfIndex(nsurf, il1, jl1, kl1);
+                    it = it + il1;
+                    jt = jt + jl1;
+                    kt = kt + kl1;
+                }
+                grid->FaceCoor(it, jt, kt, nsurf, t_xfc, t_yfc, t_zfc);
+            }
+            else
+            {
+                StructGrid *tgrid = StructGridCast(grids[target_zone]);
+                tgrid->GetSourceIndexIJK_Nsurf_LR(itface, 1, it, jt, kt, nsurf, t_lr);
+                if (t_lr == 1)
+                {
+                    GetNsurfIndex(nsurf, il1, jl1, kl1);
+                    it = it + il1;
+                    jt = jt + jl1;
+                    kt = kt + kl1;
+                }
+                tgrid->FaceCoor(it, jt, kt, nsurf, t_xfc, t_yfc, t_zfc);
+            }
+            
+            if ((fabs(s_xfc - t_xfc) > 1.0e-8) || (fabs(s_yfc - t_yfc) > 1.0e-8) || (fabs(s_zfc - t_zfc) > 1.0e-8))
+            {
+                PHMPI::FreeBlockData();
+                cout << " Grid Link Error! " << endl;
+                MPI_Abort(MPI_COMM_WORLD, -1);
+            }
+        }
+    }
+}
+
+int GetCellType(int dimension, int nodeNumberOfCell)
+{
+    int cellType = -1;
+    if (dimension == TWO_D)
+    {
+        switch (nodeNumberOfCell)
+        {
+        case 3:
+            cellType = TRI_3;
+            break;
+        case 4:
+            cellType = QUAD_4;
+            break;
+        default:
+            break;
+        }
+    }
+    else
+    {
+        switch (nodeNumberOfCell)
+        {
+        case 4:
+            cellType = TETRA_4;
+            break;
+        case 5:
+            cellType = PYRA_5;
+            break;
+        case 6:
+            cellType = PENTA_6;
+            break;
+        case 8:
+            cellType = HEXA_8;
+            break;
+        default:
+            break;
+        }
+    }
+
+    if (cellType == -1)
+    {
+        PrintToWindow("This cell type is not supported!\n");
+    }
+
+    return cellType;
+}
+
+int GetFaceType(int dimension, int nodeNumberOfFace)
+{
+    int faceType = -1;
+    if (dimension == TWO_D)
+    {
+        switch (nodeNumberOfFace)
+        {
+        case 2:
+            faceType = BAR_2;
+            break;
+        case 3:
+            faceType = BAR_3;
+            break;
+        default:
+            break;
+        }
+    }
+    else
+    {
+        switch (nodeNumberOfFace)
+        {
+        case 3:
+            faceType = TRI_3;
+            break;
+        case 4:
+            faceType = QUAD_4;
+            break;
+        default:
+            break;
+        }
+    }
+
+    if (faceType == -1)
+    {
+        TK_Exit::PrintDebugInfoExit("This face type is not supported!");
+    }
+
+    return faceType;
+}
+
+bool IsConvertGridToMixGrid()
+{
+    bool flag = false;
+    if (GetTaskCode() == CREATE_GRID)
+    {
+        int gridobj = 0;
+        GlobalDataBase::GetData("gridobj", &gridobj, PHINT, 1);
+
+        if (gridobj == 1)
+        {
+            int gridtype;
+            GlobalDataBase::GetData("gridtype", &gridtype, PHINT, 1);
+
+            if (gridtype == MIXGRID)
+            {
+                flag = true;
+            }
+        }
+    }
+    return flag;
+}
+
+LIB_EXPORT void Create_Link_Info(VInt &pindex, int iZone, int iFace, uint_t &fcount, set< DataStruct_Sort< VInt > > &face_list, VVInt &zoneid, VVInt &faceid, LinkStruct *link)
+{
+    sort(pindex.begin(), pindex.end());
+    DataStruct_Sort< VInt > face(pindex, static_cast<int>(fcount));
+    set< DataStruct_Sort< VInt > >::iterator iter = face_list.find(face);
+
+    VVInt &facemap = link->GetFaceMap();
+
+    if (iter == face_list.end())
+    {
+        face_list.insert(face);
+        facemap[iZone][iFace] = static_cast<int>(fcount);
+        VInt l_zoneid;
+        VInt l_faceid;
+        l_zoneid.push_back(iZone);
+        l_faceid.push_back(iFace);
+
+        zoneid.push_back(l_zoneid);
+        faceid.push_back(l_faceid);
+
+        ++ fcount;
+    }
+    else
+    {
+        facemap[iZone][iFace] = iter->index;
+        zoneid[iter->index].push_back(iZone);
+        faceid[iter->index].push_back(iFace);
+    }
+}
+
+LIB_EXPORT void GetFaceCoorList(VInt &index, int nlist, RDouble *xlist, RDouble *ylist, RDouble *zlist, RDouble *x, RDouble *y, RDouble *z)
+{
+    for (int m = 0; m < nlist; ++ m)
+    {
+        xlist[m] = x[index[m]];
+        ylist[m] = y[index[m]];
+        zlist[m] = z[index[m]];
+    }
+}
+
+LIB_EXPORT void GetFaceCoorList(int il, int jl, int kl, int ir, int jr, int kr, int ijk[4][3], int nlist,
+                                RDouble *xlist, RDouble *ylist, RDouble *zlist, RDouble3D &x, RDouble3D &y, RDouble3D &z)
+{
+    for (int m = 0; m < nlist; ++ m)
+    {
+        int i = il + ijk[m][ir];
+        int j = jl + ijk[m][jr];
+        int k = kl + ijk[m][kr];
+
+        xlist[m] = x(i, j, k);
+        ylist[m] = y(i, j, k);
+        zlist[m] = z(i, j, k);
+    }
+}
+
+LIB_EXPORT void GetCoorIndexList(DataStruct_AdtTree<int, RDouble> *adt_tree, RDouble &diff_tolerance, int &pcount, RDouble *xlist, RDouble *ylist, RDouble *zlist, int nlist, vector<int> &pindex)
+{
+    RDouble coor[3], minwin[3], maxwin[3];
+
+    for (int m = 0; m < nlist; ++ m)
+    {
+        coor[0] = xlist[m];
+        coor[1] = ylist[m];
+        coor[2] = zlist[m];
+
+        minwin[0] = coor[0] - diff_tolerance;
+        minwin[1] = coor[1] - diff_tolerance;
+        minwin[2] = coor[2] - diff_tolerance;
+
+        maxwin[0] = coor[0] + diff_tolerance;
+        maxwin[1] = coor[1] + diff_tolerance;
+        maxwin[2] = coor[2] + diff_tolerance;
+
+        GetCoorIndex(adt_tree, coor, minwin, maxwin, pcount, pindex[m]);
+    }
+}
+
+LIB_EXPORT int GetCoorIndex(DataStruct_AdtTree<int, RDouble> *adt_tree, RDouble *coor, RDouble *minwin, RDouble *maxwin, int &count, int &index)
+{
+    typedef DataStruct_AdtTree<int, RDouble> AdtTree;
+    typedef DataStruct_AdtNode<int, RDouble> AdtNode;
+
+    AdtNode *node;
+    AdtTree::AdtNodeList node_list;
+
+    node_list.resize(0);
+    adt_tree->FindNodesInRegion(minwin, maxwin, node_list);
+
+    if (node_list.size() == 0)
+    {
+        node = new AdtNode(3, coor, count);
+        adt_tree->AddNode(node);
+        index = count;
+        ++ count;
+        return 0;
+    }
+    else
+    {
+        if (node_list.size() > 1)
+        {
+            ostringstream oss;
+            oss << " impossible node_list.size() = " << node_list.size() << "\n";
+            TK_Exit::ExceptionExit(oss.str());
+        }
+        node  = node_list[0];
+        index = node->GetData();
+        return 1;
+    }
+}
+
+LIB_EXPORT void ShiftMinMaxBox(RDouble *pmin, RDouble *pmax, RDouble tol)
+{
+    pmin[0] -= tol;
+    pmin[1] -= tol;
+    pmin[2] -= tol;
+
+    pmax[0] += tol;
+    pmax[1] += tol;
+    pmax[2] += tol;
+}
+
+LIB_EXPORT void CommunicateSpecificArray(int level, string arrayName, int nEquation)
+{
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    vector <PH_Request > requestContainer;
+    vector <vector <DataContainer *> > receivedDataBuffer;
+    vector <vector <DataContainer *> > sendDataBuffer;
+    receivedDataBuffer.resize(nZones);
+    sendDataBuffer.resize(nZones);
+
+    //! Step 0: Compressing data firstly.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+        if (currentProcessor == sendProcessor)
+        {
+            sendDataBuffer[iZone].resize(numberOfNeighbor);
+        }
+
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate and compress the buffers for sending.
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = new DataContainer;
+                sendDataBuffer[iZone][iNeighbor] = sendBuffer;
+
+                //! Compress the send information into the actkey.
+                Grid *grid = PHSPACE::GetGrid(iZone, level);
+                grid->CompressSpecificArrayToInterface(sendBuffer, arrayName, neighborZone, nEquation);
+            }
+        }
+    }
+
+    //! Step 1: Communication.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        //! Communicating.
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate the buffers for sending and receiving.
+            DataContainer *receivedBuffer = 0;
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == receiveProcessor)
+            {
+                receivedBuffer = new DataContainer;
+                receivedDataBuffer[iZone].push_back(receivedBuffer);
+            }
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = sendDataBuffer[iZone][iNeighbor];
+            }
+
+            int tag = iZone;
+
+            //! Communication.
+            if (currentProcessor == sendProcessor)
+            {
+                if (sendProcessor != receiveProcessor)
+                {
+                    streamsize nlen = sendBuffer->size();
+
+                    //! Send the data to neighbors.
+                    send(sendBuffer, receiveProcessor, nlen, requestContainer, tag);
+                }
+            }
+            if (currentProcessor == receiveProcessor)
+            {
+                //! Get the neighbor order: which order that 'iZone' on neighbors of neighborZone.
+                int neighborOrer = -1;
+                ZoneNeighbor *globalNeighborZonesTemp = zoneConnectivity->GetZoneNeighbor(neighborZone);
+                int numberOfNeighborTemp = globalNeighborZonesTemp->GetNumberOfNeighbor();
+
+                for (int neighborID = 0; neighborID < numberOfNeighborTemp; ++ neighborID)
+                {
+                    int neighborZoneTemp = globalNeighborZonesTemp->GetZoneIndexOfNeighbor(neighborID);
+                    if (neighborZoneTemp == iZone)
+                    {
+                        neighborOrer = neighborID;
+                        break;
+                    }
+                }
+
+                ASSERT(neighborOrer != -1);
+
+                if (sendProcessor != receiveProcessor)
+                {
+                    //! The data length of the received data is same to the length that send to the neighbor.
+                    CharVecSizeType nlen = sendDataBuffer[neighborZone][neighborOrer]->size();
+
+                    //! Receive data from neighbors.
+                    receive(receivedBuffer, sendProcessor, nlen, requestContainer, tag);
+                }
+                else
+                {
+                    SWAP(receivedDataBuffer[iZone].back(), sendDataBuffer[iZone][iNeighbor]);
+                }
+            }
+        }
+    }
+
+    //! Step2: MPI waiting for Non-blocking communications.
+    if (PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_Wait(static_cast<int>(requestContainer.size()), &(requestContainer[0]));
+    }
+
+    //! Step3: Translate the data container.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        int count = 0;
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor == receiveProcessor)
+            {
+                DataContainer *receiveData = receivedDataBuffer[iZone][count];
+
+                //! Because get into here when currentProcessor==receiveProcessor,
+                //! so, use zoneGridSolver of neighborZone, this zone is on the current processor!
+
+                //! Decompress the interface data from data-container.
+                Grid *grid = PHSPACE::GetGrid(neighborZone, level);
+                grid->DecompressArrayFromInterface(receiveData, arrayName, iZone, nEquation);
+
+                ++count;
+            }
+        }
+    }
+
+    //! Step4: Free the buffers.
+    for (int iDim = 0; iDim < receivedDataBuffer.size(); ++ iDim)
+    {
+        for (int jDim = 0; jDim < receivedDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete receivedDataBuffer[iDim][jDim];
+        }
+    }
+    receivedDataBuffer.clear();
+    for (int iDim = 0; iDim < sendDataBuffer.size(); ++ iDim)
+    {
+        for (int jDim = 0; jDim < sendDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete sendDataBuffer[iDim][jDim];
+        }
+    }
+    sendDataBuffer.clear();
+    requestContainer.clear();
+}
+
+}
diff --git a/API/Geometry/src/Geo_GridIndex.cpp b/API/Geometry/src/Geo_GridIndex.cpp
new file mode 100644
index 0000000..53563d5
--- /dev/null
+++ b/API/Geometry/src/Geo_GridIndex.cpp
@@ -0,0 +1,406 @@
+#include "Geo_Interface.h"
+#include "Geo_Interpoint.h"
+#include "Geo_UnstructGrid.h"
+#include "PHMpi.h"
+#pragma warning(disable:4100)
+
+using namespace std;
+
+namespace PHSPACE
+{
+vector< vector< Grid * > * > ggrids;
+ZoneConnectivity *zoneConnectivity;
+ZoneConnectivityForPoint *zoneConnectivityForPoint;
+RDouble globalGridMinBox[3], globalGridMaxBox[3];
+
+Grid * GetGrid(int iZone, int level)
+{
+    if (!ggrids[iZone])
+    {
+        return 0;
+    }
+
+    return (*ggrids[iZone])[level];
+}
+
+void DeleteGGrids()
+{
+    ggrids.clear();
+}
+
+InterfaceInfo * GetInterfaceInfo(int iZone, int level)
+{
+    Grid *grid = GetGrid(iZone, level);
+    if (!grid) return 0;
+    return grid->GetInterfaceInfo();
+}
+
+InterpointInformation * GetInterpointInfo(int iZone, int level)
+{
+    Grid *grid = GetGrid(iZone, level);
+    if (! grid)
+    {
+        return 0;
+    }
+    //! Temporarily debug to obtain the interpoint information of unstructured grid.
+    return (static_cast<UnstructGrid *>(grid))->GetInterpointInfo();
+}
+
+OversetInfoProxy * GetOversetInfoProxy(int iZone, int level)
+{
+    Grid *grid = GetGrid(iZone, level);
+    if (!grid) return 0;
+    return grid->GetOversetInfoProxy();
+}
+
+uint_t GetNumberOfMultiGrid(int iZone)
+{
+    return ggrids[iZone]->size();
+}
+
+uint_t GetNumberOfMultiGrid()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        if (ggrids[iZone])
+        {
+            return ggrids[iZone]->size();
+        }
+    }
+    return 0;
+}
+
+void AddGridToGlobal(int iZone, vector <Grid *> *grids)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    if (ggrids.size() == 0)
+    {
+        ggrids.resize(nZones, 0);
+    }
+    ggrids[iZone] = grids;
+}
+
+void GetGlobalMinMaxBox(RDouble *globalMinBox, RDouble *globalMaxBox)
+{
+    for (int iDim = 0; iDim < 3; ++ iDim)
+    {
+        globalMinBox[iDim] = globalGridMinBox[iDim];
+        globalMaxBox[iDim] = globalGridMaxBox[iDim];
+    }
+}
+
+void SetGlobalMinMaxBox(RDouble * globalMinBox, RDouble * globalMaxBox)
+{
+    for (int iDim = 0; iDim < 3; ++ iDim)
+    {
+        globalGridMinBox[iDim] = globalMinBox[iDim];
+        globalGridMaxBox[iDim] = globalMaxBox[iDim];
+    }
+}
+
+ZoneConnectivityForPoint::ZoneConnectivityForPoint()
+{
+    numberOfZonesForPoint = 0;
+    zoneNeighborForPoint  = 0;
+};
+
+ZoneConnectivityForPoint::~ZoneConnectivityForPoint()
+{
+    for (int iZone = 0; iZone < numberOfZonesForPoint; ++ iZone)
+    {
+        delete zoneNeighborForPoint[iZone];
+    }
+    delete [] zoneNeighborForPoint;
+}
+
+int  ZoneConnectivityForPoint::GetNumberOfZonesForPoint() const
+{ 
+    return numberOfZonesForPoint;
+};
+
+void ZoneConnectivityForPoint::SetNumberOfZonesForPoint(int numberOfZonesForPoint)
+{
+    this->numberOfZonesForPoint = numberOfZonesForPoint;
+};
+
+void ZoneConnectivityForPoint::CreateAllZones(int numberOfZonesForPoint)
+{
+    SetNumberOfZonesForPoint(numberOfZonesForPoint);
+    zoneNeighborForPoint = new ZoneNeighbor *[numberOfZonesForPoint];
+    for (int iZone = 0; iZone < numberOfZonesForPoint; ++ iZone)
+    {
+        zoneNeighborForPoint[iZone] = new ZoneNeighbor();
+    }
+}
+
+ZoneNeighbor * ZoneConnectivityForPoint::GetZoneNeighborForPoint(int iZone) const 
+{
+    return zoneNeighborForPoint[iZone];
+}
+
+GridID::GridID(int index, int local_index)
+{
+    this->index       = index;
+    this->local_index = local_index;
+}
+
+GridID::~GridID()
+{
+}
+
+OversetInfo::OversetInfo()
+{
+    cellIndexForTransfer = 0;
+    dataStorageForTransfer = new Data_ParamFieldSuite();
+}
+
+OversetInfo::~OversetInfo()
+{
+    delete dataStorageForTransfer;
+    delete [] cellIndexForTransfer;
+}
+
+void OversetInfo::AllocateData()
+{
+    int numberOfCellForTransfer = this->GetNumberOfCellForTransfer();
+    int * cellIndexForTransfer = new int [ numberOfCellForTransfer ];
+    this->SetCellIndexForTransfer(cellIndexForTransfer);
+}
+
+void OversetInfo::Encode()
+{
+    ;
+}
+
+void OversetInfo::Decode(DataContainer *cdata)
+{
+    int zoneIndexOfNeighbor = 0;
+    cdata->read(reinterpret_cast<char *>(&zoneIndexOfNeighbor), sizeof(int));
+    SetZoneIndexOfNeighbor(zoneIndexOfNeighbor);
+
+    int numberOfCellForTransfer;
+    cdata->read(reinterpret_cast<char *>(&numberOfCellForTransfer), sizeof(int));
+
+    int * cellIndexForTransfer = new int [numberOfCellForTransfer];
+    cdata->read(reinterpret_cast<char *>(cellIndexForTransfer), numberOfCellForTransfer * sizeof(int));
+    SetCellIndexForTransfer(cellIndexForTransfer);
+}
+
+CompositeOversetInfo::CompositeOversetInfo()
+{
+}
+
+CompositeOversetInfo::~CompositeOversetInfo()
+{
+}
+
+
+void CompositeOversetInfo::Encode(DataContainer *cdata)
+{
+    int numberOfZone = this->GetNumberOfZone();
+    cdata->write(reinterpret_cast<char *>(&numberOfZone), sizeof(int));
+
+    int numberOfCell = this->GetNumberOfCell();
+    cdata->write(reinterpret_cast<char *>(&numberOfCell), sizeof(int));
+
+    for (int iZone = 0; iZone < numberOfZone; ++ iZone)
+    {
+        OversetInfo *oversetInfo = GetOversetInfo(iZone);
+        oversetInfo->Encode();
+    }
+}
+
+void CompositeOversetInfo::Decode(DataContainer *cdata)
+{
+    int numberOfZone;
+    cdata->read(reinterpret_cast<char *>(&numberOfZone), sizeof(int));
+
+    SetNumberOfZone(numberOfZone);
+
+    int numberOfCell;
+    cdata->read(reinterpret_cast<char *>(&numberOfCell), sizeof(int));
+    SetNumberOfCell(numberOfCell);
+
+    for (int iZone = 0; iZone < numberOfZone; ++ iZone)
+    {
+        OversetInfo *oversetInfo = new OversetInfo();
+        AddOversetInfo(oversetInfo);
+        oversetInfo->Decode(cdata);
+    }
+}
+
+OversetInfoProxy::OversetInfoProxy()
+{
+    sendIndexProxy = 0;
+    recvIndexProxy = 0;
+}
+
+OversetInfoProxy::~OversetInfoProxy()
+{
+}
+
+void OversetInfoProxy::AllocateNeighborInfo()
+{
+}
+
+void OversetInfoProxy::Encode(DataContainer *cdata)
+{
+    sendInfo->Encode(cdata);
+    recvInfo->Encode(cdata);
+}
+
+void OversetInfoProxy::Decode(DataContainer *cdata)
+{
+    sendInfo->Decode(cdata);
+    recvInfo->Decode(cdata);
+}
+
+int OversetInfoProxy::GetNIFaceOfNeighbor(int ineighbor) const
+{
+    return -1;
+}
+
+void OversetInfoProxy::InitReceivingInformation(vector<int> &cellIndexRef1, vector<int> &zoneIndexRef2, vector<int> &cellIndexRef2)
+{
+    this->cellIndexRef1 = cellIndexRef1;
+    this->zoneIndexRef2 = zoneIndexRef2;
+    this->cellIndexRef2 = cellIndexRef2;
+
+    set<int> neighborZoneIndexSet;
+    GetNeighborZoneIndexSet(neighborZoneIndexSet);
+
+    IndexProxy * recvIndexProxy      = GetRecvIndexProxy();
+    IndexProxy * temporaryIndexProxy = GetTemporaryIndexProxy();
+
+    for (set<int>::iterator iter = neighborZoneIndexSet.begin(); iter != neighborZoneIndexSet.end(); ++ iter)
+    {
+        //! jZone is the neighbor, which is the interpolated zone overlapped with iZone.
+        int jZone = *iter;
+
+        vector<int> cellIndexI, cellIndexJ;
+
+        GetPartOfArrayByCondition(zoneIndexRef2, jZone, cellIndexRef1, cellIndexI);
+        GetPartOfArrayByCondition(zoneIndexRef2, jZone, cellIndexRef2, cellIndexJ);
+
+        IndexSlice *indexSlice = new IndexSlice();
+
+        indexSlice->SetTag(jZone);
+        indexSlice->SetIndex(cellIndexI);
+        recvIndexProxy->AddIndexSlice(indexSlice);
+
+        IndexSlice *temporaryIndexSlice = new IndexSlice();
+
+        temporaryIndexSlice->SetTag(jZone);
+        temporaryIndexSlice->SetIndex(cellIndexJ);
+        temporaryIndexProxy->AddIndexSlice(temporaryIndexSlice);
+    }
+}
+
+void OversetInfoProxy::PrepareSendingInformation(Geo_OversetGrid **oversetGrids)
+{
+    IndexProxy * temporaryIndexProxy = GetTemporaryIndexProxy();
+
+    uint_t numberOfNeighbor = temporaryIndexProxy->size();
+    int zoneIndex = this->GetGrid()->GetZoneID();
+    
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+    {
+        IndexSlice * temporaryIndexSlice = temporaryIndexProxy->GetIndexSlice(iNeighbor);
+        int jZone = temporaryIndexSlice->GetTag();
+        OversetInfoProxy * jOversetInfoProxy = GetOversetInfoProxy(jZone);
+        IndexProxy *sendIndexProxy = jOversetInfoProxy->GetSendIndexProxy();
+
+        IndexSlice * sendIndexSlice = new IndexSlice();
+        sendIndexSlice->SetTag(zoneIndex);
+        sendIndexSlice->SetIndex(temporaryIndexSlice->GetIndex());
+        sendIndexProxy->AddIndexSlice(sendIndexSlice);
+    }
+}
+
+void OversetInfoProxy::PostProcessRecv()
+{
+    IndexProxy * recvIndexProxy = GetRecvIndexProxy();
+    int numberOfCellForRecv = 0;
+
+    uint_t numberOfNeighbor = recvIndexProxy->size();
+    
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+    {
+        int iLength = recvIndexProxy->GetLength(iNeighbor);
+        recvIndexProxy->SetIndexMap(iNeighbor, iLength);
+        numberOfCellForRecv += iLength;
+    }
+
+    this->SetNumberOfCellForRecv(numberOfCellForRecv);
+}
+
+void OversetInfoProxy::PostProcessSend()
+{
+    IndexProxy * sendIndexProxy = GetSendIndexProxy();
+
+    int numberOfCellForSend = 0;
+    uint_t numberOfNeighbor = sendIndexProxy->size();
+    
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+    {
+        int iLength = sendIndexProxy->GetLength(iNeighbor);
+        sendIndexProxy->SetIndexMap(iNeighbor, iLength);
+        numberOfCellForSend += iLength;
+    }
+
+    this->SetNumberOfCellForSend(numberOfCellForSend);
+}
+
+void OversetInfoProxy::PostProcess(Geo_OversetGrid **oversetGrids)
+{
+    PostProcessRecv();
+    PostProcessSend();
+}
+
+void OversetInfoProxy::GetNeighborZoneIndexSet(set<int> &neighborZoneIndexSet)
+{
+    Array2Set(zoneIndexRef2, neighborZoneIndexSet);
+}
+
+void OversetInfoProxy::Process()
+{
+    set<int> neighborZoneIndexSet;
+    GetNeighborZoneIndexSet(neighborZoneIndexSet);
+
+    IndexProxy * recvIndexProxy      = GetRecvIndexProxy();
+    IndexProxy * temporaryIndexProxy = GetTemporaryIndexProxy();
+
+    vector<int> & cellIndexRef1 = GetCellIndexRef1();
+    vector<int> & cellIndexRef2 = GetCellIndexRef2();
+    vector<int> & zoneIndexRef2 = GetZoneIndexRef2();
+
+    for (set<int>::iterator iter = neighborZoneIndexSet.begin(); iter != neighborZoneIndexSet.end(); ++ iter)
+    {
+        //! jZone is the neighbor,which is the interpolated zone overlapped with iZone.
+        int jZone = *iter;
+
+        vector<int> cellIndexI, cellIndexJ;
+
+        GetPartOfArrayByCondition(zoneIndexRef2, jZone, cellIndexRef1, cellIndexI);
+        GetPartOfArrayByCondition(zoneIndexRef2, jZone, cellIndexRef2, cellIndexJ);
+
+        IndexSlice * indexSlice = new IndexSlice();
+
+        indexSlice->SetTag(jZone);
+        indexSlice->SetIndex(cellIndexI);
+        recvIndexProxy->AddIndexSlice(indexSlice);
+
+        IndexSlice * temporaryIndexSlice = new IndexSlice();
+
+        temporaryIndexSlice->SetTag(jZone);
+        temporaryIndexSlice->SetIndex(cellIndexJ);
+        temporaryIndexProxy->AddIndexSlice(temporaryIndexSlice);
+    }
+}
+
+}
diff --git a/API/Geometry/src/Geo_GridManager.cpp b/API/Geometry/src/Geo_GridManager.cpp
new file mode 100644
index 0000000..954e1d8
--- /dev/null
+++ b/API/Geometry/src/Geo_GridManager.cpp
@@ -0,0 +1,1975 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+#pragma once
+#include "PHMpi.h"
+#include "Constants.h"
+#include "ActionKey.h"
+#include "Geo_UnstructGrid.h"
+#include "Geo_GridManager.h"
+#include "Glb_Dimension.h"
+#include "Geo_FaceMetrics_Unstruct.h"
+#include "Geo_CellMetrics_Unstruct.h"
+#include "IO_FileName.h"
+#include "PHIO.h"
+#include "TK_Parse.h"
+#include "TK_Exit.h"
+
+namespace PHSPACE
+{
+
+GridManager::GridManager(UnstructGrid* unstructGridIn)
+{
+    oldFaceNormalX = NULL;
+    oldFaceNormalY = NULL;
+    oldFaceNormalZ = NULL;
+    oldFaceArea = NULL;
+
+    oldFaceCenterX = NULL;
+    oldFaceCenterY = NULL;
+    oldFaceCenterZ = NULL;
+
+    cellVolumeN1 = NULL;
+    cellVolumeN2 = NULL;
+
+    oldFaceNormalVelocity = NULL;
+    oldFaceVelocityX = NULL;
+    oldFaceVelocityY = NULL;
+    oldFaceVelocityZ = NULL;
+
+    newFaceNormalVelocity = NULL;
+    newFaceVelocityX = NULL;
+    newFaceVelocityY = NULL;
+    newFaceVelocityZ = NULL;
+
+    blankIndex = NULL;
+
+    localToGlobalNodeIndexMapping = NULL;
+    globalCoordinateNew = NULL;
+
+    this->unstructGrid = unstructGridIn;
+    cellCenterX = unstructGrid->GetCellCenterX();
+    cellCenterY = unstructGrid->GetCellCenterY();
+    cellCenterZ = unstructGrid->GetCellCenterZ();
+
+    faceNormalX = unstructGrid->GetFaceNormalX();
+    faceNormalY = unstructGrid->GetFaceNormalY();
+    faceNormalZ = unstructGrid->GetFaceNormalZ();
+
+    cellVolume  = unstructGrid->GetCellVolume();
+    faceCenterX = unstructGrid->GetFaceCenterX();
+    faceCenterY = unstructGrid->GetFaceCenterY();
+    faceCenterZ = unstructGrid->GetFaceCenterZ();
+    faceArea    = unstructGrid->GetFaceArea();
+
+    faceNormalVelocity = unstructGrid->GetFaceNormalVelocity();
+    faceVelocityX = unstructGrid->GetFaceVelocityX();
+    faceVelocityY = unstructGrid->GetFaceVelocityY();
+    faceVelocityZ = unstructGrid->GetFaceVelocityZ();
+
+    blankIndex = unstructGrid->GetBlankIndex();
+
+}
+
+GridManager::~GridManager()
+{
+    DeAllocateMetrics();
+
+    DeAllocateALEMetrics();
+
+    delete [] localToGlobalNodeIndexMapping;    localToGlobalNodeIndexMapping = NULL;
+}
+
+
+RDouble *GridManager::GetCellVolume(int iStep)
+{
+    //! set this here in temporary.
+    if (iStep == 0)
+    {
+        return cellVolume;
+    }
+    else if (iStep == 1)
+    {
+        return cellVolumeN1;
+    }
+    else if (iStep == 2)
+    {
+        return cellVolumeN2;
+    }
+
+    return cellVolume;
+}
+
+void GridManager::AllocateMetrics()
+{
+    int numberOfFaces = this->unstructGrid->GetNTotalFace();
+
+    if (IsNotAllocated(oldFaceNormalX))
+    {
+        oldFaceNormalX = new RDouble[numberOfFaces];
+    }
+    if (IsNotAllocated(oldFaceNormalY))
+    {
+        oldFaceNormalY = new RDouble[numberOfFaces];
+    }
+    if (IsNotAllocated(oldFaceNormalZ))
+    {
+        oldFaceNormalZ = new RDouble[numberOfFaces];
+    }
+}
+
+void GridManager::DeAllocateMetrics()
+{
+    if (oldFaceNormalX)
+    {
+        delete [] oldFaceNormalX;
+    }
+    if (oldFaceNormalY)
+    {
+        delete [] oldFaceNormalY;
+    }
+    if (oldFaceNormalZ)
+    {
+        delete [] oldFaceNormalZ;
+    }
+}
+
+void GridManager::AllocateALEMetrics()
+{
+    int numberOfCells = this->unstructGrid->GetNTotalCell();
+    int numberOfBoundaryFaces = this->unstructGrid->GetNBoundFace();
+    int numberOfFaces = this->unstructGrid->GetNTotalFace();
+    int numberOfTotalCells = numberOfCells + numberOfBoundaryFaces;
+
+    //ALE and other solver all need the data of faceNormalVelocity.
+    //if (faceNormalVelocity == 0) faceNormalVelocity = new RDouble[numberOfFaces];
+
+    //Open up the meory for cellVolumeN1Container\cellVolumeN2Container\oldFaceNormalVelocity only when the unsteady moving meshes conditions.
+    if (IsNotAllocated(cellVolumeN1))
+    {
+        cellVolumeN1 = new RDouble[numberOfTotalCells];
+    }
+    if (IsNotAllocated(cellVolumeN2))
+    {
+        cellVolumeN2 = new RDouble[numberOfTotalCells];
+    }
+
+    if (IsNotAllocated(oldFaceVelocityX))
+    {
+        oldFaceVelocityX = new RDouble[numberOfFaces];
+    }
+    if (IsNotAllocated(oldFaceVelocityY))
+    {
+        oldFaceVelocityY = new RDouble[numberOfFaces];
+    }
+    if (IsNotAllocated(oldFaceVelocityZ))
+    {
+        oldFaceVelocityZ = new RDouble[numberOfFaces];
+    }
+    if (IsNotAllocated(oldFaceNormalVelocity))
+    {
+        oldFaceNormalVelocity = new RDouble[numberOfFaces];
+    }
+
+    if (IsNotAllocated(newFaceVelocityX))
+    {
+        newFaceVelocityX = new RDouble[numberOfFaces];
+    }
+    if (IsNotAllocated(newFaceVelocityY))
+    {
+        newFaceVelocityY = new RDouble[numberOfFaces];
+    }
+    if (IsNotAllocated(newFaceVelocityZ))
+    {
+        newFaceVelocityZ = new RDouble[numberOfFaces];
+    }
+    if (IsNotAllocated(newFaceNormalVelocity))
+    {
+        newFaceNormalVelocity = new RDouble[numberOfFaces];
+    }
+}
+
+void GridManager::DeAllocateALEMetrics()
+{
+    if (cellVolumeN1)
+    {
+        delete [] cellVolumeN1;
+    }
+    if (cellVolumeN2)
+    {
+        delete [] cellVolumeN2;
+    }
+
+    if (oldFaceVelocityX)
+    {
+        delete [] oldFaceVelocityX;
+    }
+    if (oldFaceVelocityY)
+    {
+        delete [] oldFaceVelocityY;
+    }
+    if (oldFaceVelocityZ)
+    {
+        delete [] oldFaceVelocityZ;
+    }
+    if (oldFaceNormalVelocity)
+    {
+        delete [] oldFaceNormalVelocity;
+    }
+
+    if (newFaceVelocityX)
+    {
+        delete [] newFaceVelocityX;
+    }
+    if (newFaceVelocityY)
+    {
+        delete [] newFaceVelocityY;
+    }
+    if (newFaceVelocityZ)
+    {
+        delete [] newFaceVelocityZ;
+    }
+    if (newFaceNormalVelocity)
+    {
+        delete [] newFaceNormalVelocity;
+    }
+}
+
+void GridManager::ComputeMetrics(ActionKey* actkey)
+{
+    ActionKey* actionKey = PHSPACE::GetCurrentActionKey();
+    this->unstructGrid->AllocateMetrics(actionKey);
+
+    if (PHSPACE::GetDim() == ONE_D)
+    {
+    }
+    else if (PHSPACE::GetDim() == TWO_D)
+    {
+        this->ComputeFaceNormal2D();
+        this->ComputeFaceCenter2D();
+        this->ComputeCellCenterVol2D(actkey);
+    }
+    else
+    {
+        this->ComputeFaceNormal3D();
+        this->ComputeFaceCenter3D();
+        this->ComputeCellCenterVol3D(actkey);
+    }
+
+    RDouble* faceNormalX = unstructGrid->GetFaceNormalX();
+    RDouble* faceNormalY = unstructGrid->GetFaceNormalY();
+    RDouble* faceNormalZ = unstructGrid->GetFaceNormalZ();
+    RDouble* faceArea    = unstructGrid->GetFaceArea();
+
+    this->ClosureCheck(faceNormalX, faceArea);
+    this->ClosureCheck(faceNormalY, faceArea);
+    this->ClosureCheck(faceNormalZ, faceArea);
+}
+
+void GridManager::ClosureCheck(RDouble *faceNormalX, RDouble *faceArea)
+{
+    int numberOfCells = unstructGrid->GetNTotalCell();
+    int numberOfFaces = unstructGrid->GetNTotalFace();
+
+    int* leftCellIndexContainer = unstructGrid->GetLeftCellOfFace();
+    int* rightCellIndexContainer = unstructGrid->GetRightCellOfFace();
+
+    RDouble* geometricSummation = new RDouble[numberOfCells];
+
+    PHSPACE::ZeroField(geometricSummation, numberOfCells);
+
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        int leftCellIndex = leftCellIndexContainer[iFace];
+        int rightCellIndex = rightCellIndexContainer[iFace];
+
+        geometricSummation[leftCellIndex] += faceNormalX[iFace] * faceArea[iFace];
+
+        if (rightCellIndex < 0 ||
+            rightCellIndex >= numberOfCells)
+        {
+            continue;
+        }
+        geometricSummation[rightCellIndex] -= faceNormalX[iFace] * faceArea[iFace];
+    }
+
+    RDouble totalGeometricSummation = 0.0;
+    for (int iCell = 0; iCell < numberOfCells; ++iCell)
+    {
+        totalGeometricSummation += PHSPACE::ABS(geometricSummation[iCell]);
+        if (PHSPACE::ABS(geometricSummation[iCell]) > 1.0e-8)
+        {
+            cout << "faceArea sum for cell " << iCell << " is " << geometricSummation[iCell] << "\n";
+        }
+    }
+    delete [] geometricSummation;
+    //cout << "zone " << this->GetZoneIndex() << " faceArea sums is " << total << "\n";
+}
+
+void GridManager::ComputeFaceNormal2D()
+{
+    RDouble* x = unstructGrid->GetX();
+    RDouble* y = unstructGrid->GetY();
+
+    int numberOfFaces = unstructGrid->GetNTotalFace();
+
+    RDouble* faceNormalX = unstructGrid->GetFaceNormalX();
+    RDouble* faceNormalY = unstructGrid->GetFaceNormalY();
+    RDouble* faceNormalZ = unstructGrid->GetFaceNormalZ();
+    RDouble* oldFaceNormalX = this->GetOldFaceNormalX();
+    RDouble* oldFaceNormalY = this->GetOldFaceNormalY();
+    RDouble* oldFaceNormalZ = this->GetOldFaceNormalZ();
+    RDouble* faceArea = unstructGrid->GetFaceArea();
+
+    int* faceNodeIndexContainer = unstructGrid->GetFace2Node();
+
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        oldFaceNormalX[iFace] = faceNormalX[iFace];
+        oldFaceNormalY[iFace] = faceNormalY[iFace];
+        oldFaceNormalZ[iFace] = faceNormalZ[iFace];
+
+        int p1 = faceNodeIndexContainer[2 * iFace];
+        int p2 = faceNodeIndexContainer[2 * iFace + 1];
+
+        faceNormalX[iFace] = y[p2] - y[p1];
+        faceNormalY[iFace] = x[p1] - x[p2];
+        faceNormalZ[iFace] = 0.0;
+
+        faceArea[iFace] = PHSPACE::DISTANCE(faceNormalX[iFace], faceNormalY[iFace], faceNormalZ[iFace]);
+        RDouble reciprocalArea = 1.0 / (faceArea[iFace] + SMALL);
+        faceNormalX[iFace] *= reciprocalArea;
+        faceNormalY[iFace] *= reciprocalArea;
+        faceNormalZ[iFace] *= reciprocalArea;
+    }
+}
+
+void GridManager::ComputeFaceCenter2D()
+{
+    RDouble* x = unstructGrid->GetX();
+    RDouble* y = unstructGrid->GetY();
+    RDouble* z = unstructGrid->GetZ();
+
+    int* faceNodeIndexContainer = unstructGrid->GetFace2Node();
+
+    int numberOfFaces = unstructGrid->GetNTotalFace();
+
+    RDouble* faceCenterX = unstructGrid->GetFaceCenterX();
+    RDouble* faceCenterY = unstructGrid->GetFaceCenterY();
+    RDouble* faceCenterZ = unstructGrid->GetFaceCenterZ();
+
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        int p1 = faceNodeIndexContainer[2 * iFace];
+        int p2 = faceNodeIndexContainer[2 * iFace + 1];
+        faceCenterX[iFace] = half * (x[p1] + x[p2]);
+        faceCenterY[iFace] = half * (y[p1] + y[p2]);
+        faceCenterZ[iFace] = half * (z[p1] + z[p2]);
+    }
+}
+
+void GridManager::ComputeCellCenterVol2D(ActionKey* actkey)
+{
+    int numberOfCells = this->unstructGrid->GetNTotalCell();
+    int numberOfBoundaryFaces = this->unstructGrid->GetNBoundFace();
+    int numberOfFaces = this->unstructGrid->GetNTotalFace();
+    int numberOfTotalCells = numberOfCells + numberOfBoundaryFaces;
+
+    int* leftCellIndexContainer = unstructGrid->GetLeftCellOfFace();
+    int* rightCellIndexContainer = unstructGrid->GetRightCellOfFace();
+
+    RDouble* cellCenterX = unstructGrid->GetCellCenterX();
+    RDouble* cellCenterY = unstructGrid->GetCellCenterY();
+    RDouble* cellCenterZ = unstructGrid->GetCellCenterZ();
+
+    RDouble* faceCenterX = unstructGrid->GetFaceCenterX();
+    RDouble* faceCenterY = unstructGrid->GetFaceCenterY();
+    RDouble* faceCenterZ = unstructGrid->GetFaceCenterZ();
+
+    RDouble* faceNormalX = unstructGrid->GetFaceNormalX();
+    RDouble* faceNormalY = unstructGrid->GetFaceNormalY();
+    RDouble* faceNormalZ = unstructGrid->GetFaceNormalZ();
+    RDouble* faceArea = unstructGrid->GetFaceArea();
+    RDouble* cellVolume = unstructGrid->GetCellVolume();
+
+    PHSPACE::ZeroField(cellCenterX, numberOfTotalCells);
+    PHSPACE::ZeroField(cellCenterY, numberOfTotalCells);
+    PHSPACE::ZeroField(cellCenterZ, numberOfTotalCells);
+    PHSPACE::ZeroField(cellVolume, numberOfTotalCells);
+
+    // now the cell center and cellVolume
+    // For each face, boundary faces first
+    // For boundary faces
+    for (int iFace = 0; iFace < numberOfBoundaryFaces; ++iFace)
+    {
+        int leftCellIndex = leftCellIndexContainer[iFace];
+        RDouble dot = (faceCenterX[iFace] * faceNormalX[iFace] +
+            faceCenterY[iFace] * faceNormalY[iFace] +
+            faceCenterZ[iFace] * faceNormalZ[iFace]) * faceArea[iFace];
+        cellCenterX[leftCellIndex] += faceCenterX[iFace] * dot;
+        cellCenterY[leftCellIndex] += faceCenterY[iFace] * dot;
+        cellCenterZ[leftCellIndex] += faceCenterZ[iFace] * dot;
+        cellVolume[leftCellIndex] += dot;
+    }
+
+    // For interior cell faces
+    for (int iFace = numberOfBoundaryFaces; iFace < numberOfFaces; ++iFace)
+    {
+        int leftCellIndex = leftCellIndexContainer[iFace];
+        int rightCellIndex = rightCellIndexContainer[iFace];
+        RDouble dot = (faceCenterX[iFace] * faceNormalX[iFace] +
+            faceCenterY[iFace] * faceNormalY[iFace] +
+            faceCenterZ[iFace] * faceNormalZ[iFace]) * faceArea[iFace];
+        cellCenterX[leftCellIndex] += faceCenterX[iFace] * dot;
+        cellCenterY[leftCellIndex] += faceCenterY[iFace] * dot;
+        cellCenterZ[leftCellIndex] += faceCenterZ[iFace] * dot;
+        cellVolume[leftCellIndex] += dot;
+
+        cellCenterX[rightCellIndex] -= faceCenterX[iFace] * dot;
+        cellCenterY[rightCellIndex] -= faceCenterY[iFace] * dot;
+        cellCenterZ[rightCellIndex] -= faceCenterZ[iFace] * dot;
+        cellVolume[rightCellIndex] -= dot;
+    }
+
+    ostringstream oss;
+
+    // Don't forget the coefficients
+    int numberOfCellsHaveNegativeVolumes = 0;
+    RDouble minvol = LARGE, maxvol = 0.0;
+    int indexMinv = 0, indexMaxv = 0;
+    for (int iCell = 0; iCell < numberOfCells; ++iCell)
+    {
+        RDouble tmp = 1.0 / (1.5 * cellVolume[iCell] + SMALL);
+        cellCenterX[iCell] *= tmp;
+        cellCenterY[iCell] *= tmp;
+        cellCenterZ[iCell] *= tmp;
+        cellVolume[iCell] *= half;
+
+        if (minvol > cellVolume[iCell])
+        {
+            minvol = cellVolume[iCell];
+            indexMinv = iCell;
+        }
+        if (maxvol < cellVolume[iCell])
+        {
+            maxvol = cellVolume[iCell];
+            indexMaxv = iCell;
+        }
+
+        if (cellVolume[iCell] <= 0.0)
+        {
+            cellVolume[iCell] = -cellVolume[iCell];
+            ++numberOfCellsHaveNegativeVolumes;
+            oss << "  Warning: negative volume cell index " << iCell << ", (x, y) " << cellCenterX[iCell] << " " << cellCenterY[iCell] << " !\n";
+        }
+    }
+    if (numberOfCellsHaveNegativeVolumes) oss << numberOfCellsHaveNegativeVolumes << " cells have negative volumes \n";
+
+    // For ghost cells
+    for (int iFace = 0; iFace < numberOfBoundaryFaces; ++iFace)
+    {
+        int leftCellIndex = leftCellIndexContainer[iFace];
+        int rightCellIndex = iFace + numberOfCells;
+        if (faceArea[iFace] > SMALL)
+        {
+            RDouble tmp = 2.0 * ((cellCenterX[leftCellIndex] - faceCenterX[iFace]) * faceNormalX[iFace]
+                + (cellCenterY[leftCellIndex] - faceCenterY[iFace]) * faceNormalY[iFace]
+                + (cellCenterZ[leftCellIndex] - faceCenterZ[iFace]) * faceNormalZ[iFace]);
+            cellCenterX[iFace + numberOfCells] = cellCenterX[leftCellIndex] - faceNormalX[iFace] * tmp;
+            cellCenterY[iFace + numberOfCells] = cellCenterY[leftCellIndex] - faceNormalY[iFace] * tmp;
+            cellCenterZ[iFace + numberOfCells] = cellCenterZ[leftCellIndex] - faceNormalZ[iFace] * tmp;
+        }
+        else
+        {
+            // Degenerated faces
+            cellCenterX[iFace + numberOfCells] = -cellCenterX[leftCellIndex] + 2.0 * faceCenterX[iFace];
+            cellCenterY[iFace + numberOfCells] = -cellCenterY[leftCellIndex] + 2.0 * faceCenterY[iFace];
+            cellCenterZ[iFace + numberOfCells] = -cellCenterZ[leftCellIndex] + 2.0 * faceCenterZ[iFace];
+        }
+        cellVolume[rightCellIndex] = cellVolume[leftCellIndex];
+    }
+
+    PHSPACE::StreamToActionKey(actkey, oss);
+}
+
+void GridManager::ComputeFaceNormal3D()
+{
+    RDouble* x = unstructGrid->GetX();
+    RDouble* y = unstructGrid->GetY();
+    RDouble* z = unstructGrid->GetZ();
+
+    int numberOfFaces = this->unstructGrid->GetNTotalFace();
+
+    RDouble* faceNormalX = unstructGrid->GetFaceNormalX();
+    RDouble* faceNormalY = unstructGrid->GetFaceNormalY();
+    RDouble* faceNormalZ = unstructGrid->GetFaceNormalZ();
+    RDouble* oldFaceNormalX = this->GetOldFaceNormalX();
+    RDouble* oldFaceNormalY = this->GetOldFaceNormalY();
+    RDouble* oldFaceNormalZ = this->GetOldFaceNormalZ();
+    RDouble* faceArea = unstructGrid->GetFaceArea();
+
+    int* faceNodeIndexContainer = unstructGrid->GetFace2Node();
+    int* faceNodeNumberContainer = unstructGrid->GetNodeNumberOfEachFace();
+
+    int nodePosition = 0;
+
+    PHSPACE::SetField(oldFaceNormalX, faceNormalX, numberOfFaces);
+    PHSPACE::SetField(oldFaceNormalY, faceNormalY, numberOfFaces);
+    PHSPACE::SetField(oldFaceNormalZ, faceNormalZ, numberOfFaces);
+
+    PHSPACE::ZeroField(faceNormalX, numberOfFaces);
+    PHSPACE::ZeroField(faceNormalY, numberOfFaces);
+    PHSPACE::ZeroField(faceNormalZ, numberOfFaces);
+
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        int faceNodeNumber = faceNodeNumberContainer[iFace];
+        for (int iNodeInFace = 0; iNodeInFace < faceNodeNumber; ++iNodeInFace)
+        {
+            int index1 = iNodeInFace;
+            int index2 = (iNodeInFace + 1) % faceNodeNumberContainer[iFace];
+            int p1 = faceNodeIndexContainer[nodePosition + index1];
+            int p2 = faceNodeIndexContainer[nodePosition + index2];
+
+            RDouble dx1 = x[p1];
+            RDouble dy1 = y[p1];
+            RDouble dz1 = z[p1];
+
+            RDouble dx2 = x[p2];
+            RDouble dy2 = y[p2];
+            RDouble dz2 = z[p2];
+
+            faceNormalX[iFace] += half * (dy1 * dz2 - dy2 * dz1);
+            faceNormalY[iFace] += half * (dz1 * dx2 - dz2 * dx1);
+            faceNormalZ[iFace] += half * (dx1 * dy2 - dx2 * dy1);
+        }
+        faceArea[iFace] = PHSPACE::DISTANCE(faceNormalX[iFace], faceNormalY[iFace], faceNormalZ[iFace]);
+        nodePosition += faceNodeNumber;
+    }
+
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        RDouble reciprocalArea = 1.0 / (faceArea[iFace] + SMALL);
+        faceNormalX[iFace] *= reciprocalArea;
+        faceNormalY[iFace] *= reciprocalArea;
+        faceNormalZ[iFace] *= reciprocalArea;
+    }
+}
+
+void GridManager::ComputeFaceCenter3D()
+{
+    RDouble* x = unstructGrid->GetX();
+    RDouble* y = unstructGrid->GetY();
+    RDouble* z = unstructGrid->GetZ();
+
+    int* faceNodeIndexContainer = unstructGrid->GetFace2Node();
+    int* faceNodeNumberContainer = unstructGrid->GetNodeNumberOfEachFace();
+
+    int numberOfFaces = this->unstructGrid->GetNTotalFace();
+
+    RDouble* faceCenterX = unstructGrid->GetFaceCenterX();
+    RDouble* faceCenterY = unstructGrid->GetFaceCenterY();
+    RDouble* faceCenterZ = unstructGrid->GetFaceCenterZ();
+
+    RDouble* faceNormalX = unstructGrid->GetFaceNormalX();
+    RDouble* faceNormalY = unstructGrid->GetFaceNormalY();
+    RDouble* faceNormalZ = unstructGrid->GetFaceNormalZ();
+
+    int nodePosition = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        RDouble x0 = 0.0;
+        RDouble y0 = 0.0;
+        RDouble z0 = 0.0;
+
+        int faceNodeNumber = faceNodeNumberContainer[iFace];
+        for (int iNodeInFace = 0; iNodeInFace < faceNodeNumber; ++iNodeInFace)
+        {
+            int index = faceNodeIndexContainer[nodePosition + iNodeInFace];
+            x0 += x[index];
+            y0 += y[index];
+            z0 += z[index];
+        }
+
+        RDouble coef = 1.0 / faceNodeNumberContainer[iFace];
+
+        x0 *= coef;
+        y0 *= coef;
+        z0 *= coef;
+
+        faceCenterX[iFace] = 0.0;
+        faceCenterY[iFace] = 0.0;
+        faceCenterZ[iFace] = 0.0;
+        RDouble sarea = 0.0;
+
+        for (int iNodeInFace = 0; iNodeInFace < faceNodeNumber; ++iNodeInFace)
+        {
+            int index1 = iNodeInFace;
+            int index2 = (iNodeInFace + 1) % faceNodeNumberContainer[iFace];
+            int p1 = faceNodeIndexContainer[nodePosition + index1];
+            int p2 = faceNodeIndexContainer[nodePosition + index2];
+
+            RDouble dx1 = x[p1] - x0;
+            RDouble dy1 = y[p1] - y0;
+            RDouble dz1 = z[p1] - z0;
+
+            RDouble dx2 = x[p2] - x0;
+            RDouble dy2 = y[p2] - y0;
+            RDouble dz2 = z[p2] - z0;
+
+            RDouble x00 = third * (x[p1] + x[p2] + x0);
+            RDouble y00 = third * (y[p1] + y[p2] + y0);
+            RDouble z00 = third * (z[p1] + z[p2] + z0);
+
+            RDouble anx = dy1 * dz2 - dy2 * dz1;
+            RDouble any = dz1 * dx2 - dz2 * dx1;
+            RDouble anz = dx1 * dy2 - dx2 * dy1;
+
+            RDouble faceArea = half * DISTANCE(anx, any, anz);
+            RDouble norm = anx * faceNormalX[iFace] + any * faceNormalY[iFace] + anz * faceNormalZ[iFace];
+
+            if (norm < 0.0) faceArea = -faceArea;
+            sarea += faceArea;
+
+            faceCenterX[iFace] += faceArea * x00;
+            faceCenterY[iFace] += faceArea * y00;
+            faceCenterZ[iFace] += faceArea * z00;
+        }
+
+        RDouble osarea = 1.0 / (sarea + SMALL);
+
+        faceCenterX[iFace] *= osarea;
+        faceCenterY[iFace] *= osarea;
+        faceCenterZ[iFace] *= osarea;
+
+        nodePosition += faceNodeNumber;
+    }
+}
+
+void GridManager::ComputeCellCenterVol3D(ActionKey* actkey)
+{
+    int numberOfCells = this->unstructGrid->GetNTotalCell();
+    int numberOfBoundaryFaces = this->unstructGrid->GetNBoundFace();
+    int numberOfFaces = this->unstructGrid->GetNTotalFace();
+    int numberOfTotalCells = numberOfCells + numberOfBoundaryFaces;
+
+    int* leftCellIndexContainer = unstructGrid->GetLeftCellOfFace();
+    int* rightCellIndexContainer = unstructGrid->GetRightCellOfFace();
+
+    int* faceNodeIndexContainer = unstructGrid->GetFace2Node();
+    int* faceNodeNumberContainer = unstructGrid->GetNodeNumberOfEachFace();
+
+    RDouble* x = unstructGrid->GetX();
+    RDouble* y = unstructGrid->GetY();
+    RDouble* z = unstructGrid->GetZ();
+
+    RDouble* cellCenterX = unstructGrid->GetCellCenterX();
+    RDouble* cellCenterY = unstructGrid->GetCellCenterY();
+    RDouble* cellCenterZ = unstructGrid->GetCellCenterZ();
+
+    RDouble* faceCenterX = unstructGrid->GetFaceCenterX();
+    RDouble* faceCenterY = unstructGrid->GetFaceCenterY();
+    RDouble* faceCenterZ = unstructGrid->GetFaceCenterZ();
+
+    RDouble* faceNormalX = unstructGrid->GetFaceNormalX();
+    RDouble* faceNormalY = unstructGrid->GetFaceNormalY();
+    RDouble* faceNormalZ = unstructGrid->GetFaceNormalZ();
+
+    RDouble* faceArea = unstructGrid->GetFaceArea();
+    RDouble* cellVolume = unstructGrid->GetCellVolume();
+
+    PHSPACE::ZeroField(cellCenterX, numberOfTotalCells);
+    PHSPACE::ZeroField(cellCenterY, numberOfTotalCells);
+    PHSPACE::ZeroField(cellCenterZ, numberOfTotalCells);
+    PHSPACE::ZeroField(cellVolume, numberOfTotalCells);
+
+    int nodePosition = 0;
+
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        int leftCellIndex = leftCellIndexContainer[iFace];
+        int rightCellIndex = rightCellIndexContainer[iFace];
+
+        int faceNodeNumber = faceNodeNumberContainer[iFace];
+
+        for (int iNode = 0; iNode < faceNodeNumber; ++iNode)
+        {
+            int index1 = iNode;
+            int index2 = (iNode + 1) % faceNodeNumber;
+            int p2 = faceNodeIndexContainer[nodePosition + index1];
+            int p3 = faceNodeIndexContainer[nodePosition + index2];
+
+            RDouble x21 = x[p2] - faceCenterX[iFace];
+            RDouble y21 = y[p2] - faceCenterY[iFace];
+            RDouble z21 = z[p2] - faceCenterZ[iFace];
+
+            RDouble x31 = x[p3] - faceCenterX[iFace];
+            RDouble y31 = y[p3] - faceCenterY[iFace];
+            RDouble z31 = z[p3] - faceCenterZ[iFace];
+
+            RDouble nx = y21 * z31 - y31 * z21;
+            RDouble ny = z21 * x31 - z31 * x21;
+            RDouble nz = x21 * y31 - x31 * y21;
+
+            RDouble fcX = faceCenterX[iFace] + x[p2] + x[p3];
+            RDouble fcY = faceCenterY[iFace] + y[p2] + y[p3];
+            RDouble fcZ = faceCenterZ[iFace] + z[p2] + z[p3];
+
+            // Cell Center and Volume
+            RDouble tmp = nx * fcX + ny * fcY + nz * fcZ;
+            fcX *= tmp;
+            fcY *= tmp;
+            fcZ *= tmp;
+
+            cellCenterX[leftCellIndex] += fcX;
+            cellCenterY[leftCellIndex] += fcY;
+            cellCenterZ[leftCellIndex] += fcZ;
+            cellVolume[leftCellIndex] += tmp;
+
+            cellCenterX[rightCellIndex] -= fcX;
+            cellCenterY[rightCellIndex] -= fcY;
+            cellCenterZ[rightCellIndex] -= fcZ;
+            cellVolume[rightCellIndex] -= tmp;
+        }
+        nodePosition += faceNodeNumber;
+    }
+
+    ostringstream oss;
+
+    // Don't forget the coefficients
+    int numberOfErrorCells = 0;
+    RDouble minvol = LARGE, maxvol = 0.0;
+    int indexMinv = 0, indexMaxv = 0;
+    for (int iCell = 0; iCell < numberOfCells; ++iCell)
+    {
+        RDouble tmp = 1.0 / (4.0 * cellVolume[iCell] + SMALL);
+        cellCenterX[iCell] *= tmp;
+        cellCenterY[iCell] *= tmp;
+        cellCenterZ[iCell] *= tmp;
+        cellVolume[iCell] /= 18.0;
+        if (minvol > cellVolume[iCell])
+        {
+            minvol = cellVolume[iCell];
+            indexMinv = iCell;
+        }
+        if (maxvol < cellVolume[iCell])
+        {
+            maxvol = cellVolume[iCell];
+            indexMaxv = iCell;
+        }
+
+        if (cellVolume[iCell] <= 0.0)
+        {
+            cellVolume[iCell] = -cellVolume[iCell];
+            ++numberOfErrorCells;
+            oss << "  Warning: negative volume cell index " << iCell << ", (x, y, z) " << cellCenterX[iCell] << " " << cellCenterY[iCell] << " " << cellCenterZ[iCell] << " !\n";
+        }
+    }
+
+    if (numberOfErrorCells) oss << numberOfErrorCells << " cells have negative vols \n";
+
+    // For ghost cells
+    for (int iFace = 0; iFace < numberOfBoundaryFaces; ++iFace)
+    {
+        int leftCellIndex = leftCellIndexContainer[iFace];
+        int rightCellIndex = iFace + numberOfCells;
+
+        if (faceArea[iFace] > SMALL)
+        {
+            RDouble tmp = 2.0 * ((cellCenterX[leftCellIndex] - faceCenterX[iFace]) * faceNormalX[iFace]
+                + (cellCenterY[leftCellIndex] - faceCenterY[iFace]) * faceNormalY[iFace]
+                + (cellCenterZ[leftCellIndex] - faceCenterZ[iFace]) * faceNormalZ[iFace]);
+            cellCenterX[rightCellIndex] = cellCenterX[leftCellIndex] - faceNormalX[iFace] * tmp;
+            cellCenterY[rightCellIndex] = cellCenterY[leftCellIndex] - faceNormalY[iFace] * tmp;
+            cellCenterZ[rightCellIndex] = cellCenterZ[leftCellIndex] - faceNormalZ[iFace] * tmp;
+
+        }
+        else
+        {
+            // Degenerated faces
+            cellCenterX[rightCellIndex] = -cellCenterX[leftCellIndex] + 2.0 * faceCenterX[iFace];
+            cellCenterY[rightCellIndex] = -cellCenterY[leftCellIndex] + 2.0 * faceCenterY[iFace];
+            cellCenterZ[rightCellIndex] = -cellCenterZ[leftCellIndex] + 2.0 * faceCenterZ[iFace];
+        }
+        cellVolume[rightCellIndex] = cellVolume[leftCellIndex];
+    }
+
+    PHSPACE::StreamToActionKey(actkey, oss);
+}
+
+void GridManager::ComputeFaceNormal3DNew()
+{
+    RDouble* x = unstructGrid->GetX();
+    RDouble* y = unstructGrid->GetY();
+    RDouble* z = unstructGrid->GetZ();
+
+    int numberOfFaces = this->unstructGrid->GetNTotalFace();
+
+    RDouble* faceNormalX = this->GetFaceNormalX();
+    RDouble* faceNormalY = this->GetFaceNormalY();
+    RDouble* faceNormalZ = this->GetFaceNormalZ();
+    RDouble* faceArea = this->GetFaceArea();
+
+    int* faceNodeIndexContainer = unstructGrid->GetFace2Node();
+    int* faceNodeNumberContainer = unstructGrid->GetNodeNumberOfEachFace();
+
+    int nodePosition = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        RDouble xct = 0.0;
+        RDouble yct = 0.0;
+        RDouble zct = 0.0;
+
+        int faceNodeNumber = faceNodeNumberContainer[iFace];
+        for (int iNodeInFace = 0; iNodeInFace < faceNodeNumber; ++iNodeInFace)
+        {
+            int nodeIndex = faceNodeIndexContainer[nodePosition + iNodeInFace];
+            xct += x[nodeIndex];
+            yct += y[nodeIndex];
+            zct += z[nodeIndex];
+        }
+        xct /= faceNodeNumberContainer[iFace];
+        yct /= faceNodeNumberContainer[iFace];
+        zct /= faceNodeNumberContainer[iFace];
+
+        faceNormalX[iFace] = 0.0;
+        faceNormalY[iFace] = 0.0;
+        faceNormalZ[iFace] = 0.0;
+
+        for (int iNodeInFace = 0; iNodeInFace < faceNodeNumber; ++iNodeInFace)
+        {
+            int p1 = faceNodeIndexContainer[nodePosition + iNodeInFace];
+            int p2 = faceNodeIndexContainer[nodePosition + (iNodeInFace + 1) % faceNodeNumber];
+
+            RDouble dx1 = xct - x[p1];
+            RDouble dy1 = yct - y[p1];
+            RDouble dz1 = zct - z[p1];
+
+            RDouble dx2 = xct - x[p2];
+            RDouble dy2 = yct - y[p2];
+            RDouble dz2 = zct - z[p2];
+
+            faceNormalX[iFace] += dy1 * dz2 - dy2 * dz1;
+            faceNormalY[iFace] += dz1 * dx2 - dz2 * dx1;
+            faceNormalZ[iFace] += dx1 * dy2 - dx2 * dy1;
+        }
+
+        faceNormalX[iFace] *= half;
+        faceNormalY[iFace] *= half;
+        faceNormalZ[iFace] *= half;
+
+        faceArea[iFace] = PHSPACE::DISTANCE(faceNormalX[iFace], faceNormalY[iFace], faceNormalZ[iFace]);
+        nodePosition += faceNodeNumber;
+    }
+
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        RDouble reciprocalArea = 1.0 / (faceArea[iFace] + SMALL);
+        faceNormalX[iFace] *= reciprocalArea;
+        faceNormalY[iFace] *= reciprocalArea;
+        faceNormalZ[iFace] *= reciprocalArea;
+    }
+}
+
+void GridManager::ComputeFaceCenter3DNew()
+{
+    RDouble* x = unstructGrid->GetX();
+    RDouble* y = unstructGrid->GetY();
+    RDouble* z = unstructGrid->GetZ();
+
+    int numberOfFaces = unstructGrid->GetNTotalFace();
+
+    RDouble* faceCenterX = this->GetFaceCenterX();
+    RDouble* faceCenterY = this->GetFaceCenterY();
+    RDouble* faceCenterZ = this->GetFaceCenterZ();
+
+    RDouble* faceNormalX = this->GetFaceNormalX();
+    RDouble* faceNormalY = this->GetFaceNormalY();
+    RDouble* faceNormalZ = this->GetFaceNormalZ();
+
+    int* faceNodeIndexContainer = unstructGrid->GetFace2Node();
+    int* faceNodeNumberContainer = unstructGrid->GetNodeNumberOfEachFace();
+
+    int nodePosition = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        RDouble xct = 0.0;
+        RDouble yct = 0.0;
+        RDouble zct = 0.0;
+
+        int faceNodeNumber = faceNodeNumberContainer[iFace];
+        for (int iNodeInFace = 0; iNodeInFace < faceNodeNumber; ++iNodeInFace)
+        {
+            int faceNodeIndex = faceNodeIndexContainer[nodePosition + iNodeInFace];
+            xct += x[faceNodeIndex];
+            yct += y[faceNodeIndex];
+            zct += z[faceNodeIndex];
+        }
+
+        RDouble tmp = 1.0 / faceNodeNumberContainer[iFace];
+
+        xct *= tmp;
+        yct *= tmp;
+        zct *= tmp;
+
+        faceCenterX[iFace] = 0.0;
+        faceCenterY[iFace] = 0.0;
+        faceCenterZ[iFace] = 0.0;
+
+        RDouble suma = 0.0;
+
+        for (int iNodeInFace = 0; iNodeInFace < faceNodeNumber; ++iNodeInFace)
+        {
+            int p1 = faceNodeIndexContainer[nodePosition + iNodeInFace];
+            int p2 = faceNodeIndexContainer[nodePosition + (iNodeInFace + 1) % faceNodeNumber];
+
+            RDouble dx1 = xct - x[p1];
+            RDouble dy1 = yct - y[p1];
+            RDouble dz1 = zct - z[p1];
+
+            RDouble dx2 = xct - x[p2];
+            RDouble dy2 = yct - y[p2];
+            RDouble dz2 = zct - z[p2];
+
+            RDouble x00 = x[p1] + x[p2] + xct;
+            RDouble y00 = y[p1] + y[p2] + yct;
+            RDouble z00 = z[p1] + z[p2] + zct;
+
+            RDouble anx = dy1 * dz2 - dy2 * dz1;
+            RDouble any = dz1 * dx2 - dz2 * dx1;
+            RDouble anz = dx1 * dy2 - dx2 * dy1;
+
+            RDouble sss = PHSPACE::DISTANCE(anx, any, anz);
+            RDouble norm = anx * faceNormalX[iFace] + any * faceNormalY[iFace] + anz * faceNormalZ[iFace];
+
+            if (norm < 0.0) sss = -sss;
+            suma += sss;
+
+            faceCenterX[iFace] += sss * x00;
+            faceCenterY[iFace] += sss * y00;
+            faceCenterZ[iFace] += sss * z00;
+        }
+
+        tmp = third / (suma + SMALL);
+
+        faceCenterX[iFace] *= tmp;
+        faceCenterY[iFace] *= tmp;
+        faceCenterZ[iFace] *= tmp;
+
+        nodePosition += faceNodeNumber;
+    }
+}
+
+void GridManager::ComputeCellCenterVol3DNew()
+{
+    int numberOfCells = this->unstructGrid->GetNTotalCell();
+    int numberOfBoundaryFaces = this->unstructGrid->GetNBoundFace();
+    int numberOfFaces = this->unstructGrid->GetNTotalFace();
+    int numberOfTotalCells = numberOfCells + numberOfBoundaryFaces;
+
+    int* leftCellIndexContainer = unstructGrid->GetLeftCellOfFace();
+    int* rightCellIndexContainer = unstructGrid->GetRightCellOfFace();
+
+    int* faceNodeIndexContainer = unstructGrid->GetFace2Node();
+    int* faceNodeNumberContainer = unstructGrid->GetNodeNumberOfEachFace();
+
+    RDouble* x = unstructGrid->GetX();
+    RDouble* y = unstructGrid->GetY();
+    RDouble* z = unstructGrid->GetZ();
+
+    RDouble* cellCenterX = this->GetCellCenterX();
+    RDouble* cellCenterY = this->GetCellCenterY();
+    RDouble* cellCenterZ = this->GetCellCenterZ();
+
+    RDouble* faceCenterX = this->GetFaceCenterX();
+    RDouble* faceCenterY = this->GetFaceCenterY();
+    RDouble* faceCenterZ = this->GetFaceCenterZ();
+
+    RDouble* faceNormalX = this->GetFaceNormalX();
+    RDouble* faceNormalY = this->GetFaceNormalY();
+    RDouble* faceNormalZ = this->GetFaceNormalZ();
+    RDouble* faceArea = this->GetFaceArea();
+    RDouble* cellVolume = this->GetCellVolume();
+
+    RDouble c34 = 3.0 / 4.0;
+
+    PHSPACE::ZeroField(cellCenterX, numberOfTotalCells);
+    PHSPACE::ZeroField(cellCenterY, numberOfTotalCells);
+    PHSPACE::ZeroField(cellCenterZ, numberOfTotalCells);
+    PHSPACE::ZeroField(cellVolume, numberOfTotalCells);
+
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        int leftCellIndex = leftCellIndexContainer[iFace];
+        int rightCellIndex = rightCellIndexContainer[iFace];
+        if (iFace < numberOfBoundaryFaces) rightCellIndex = iFace + numberOfCells;
+
+        RDouble xc = faceCenterX[iFace];
+        RDouble yc = faceCenterY[iFace];
+        RDouble zc = faceCenterZ[iFace];
+
+        RDouble vvol = third * (faceNormalX[iFace] * xc + faceNormalY[iFace] * yc + faceNormalZ[iFace] * zc) * faceArea[iFace];
+        xc *= c34 * vvol;
+        yc *= c34 * vvol;
+        zc *= c34 * vvol;
+
+        cellCenterX[leftCellIndex] += xc;
+        cellCenterY[leftCellIndex] += yc;
+        cellCenterZ[leftCellIndex] += zc;
+        cellVolume[leftCellIndex] += vvol;
+
+        cellCenterX[rightCellIndex] -= xc;
+        cellCenterY[rightCellIndex] -= yc;
+        cellCenterZ[rightCellIndex] -= zc;
+        cellVolume[rightCellIndex] -= vvol;
+    }
+
+    for (int iCell = 0; iCell < numberOfCells; ++iCell)
+    {
+        RDouble tmp = 1.0 / (cellVolume[iCell] + SMALL);
+        cellCenterX[iCell] *= tmp;
+        cellCenterY[iCell] *= tmp;
+        cellCenterZ[iCell] *= tmp;
+    }
+
+    RDouble* txc = new RDouble[numberOfTotalCells];
+    RDouble* tyc = new RDouble[numberOfTotalCells];
+    RDouble* tzc = new RDouble[numberOfTotalCells];
+
+    PHSPACE::SetField(txc, cellCenterX, numberOfCells);
+    PHSPACE::SetField(tyc, cellCenterY, numberOfCells);
+    PHSPACE::SetField(tzc, cellCenterZ, numberOfCells);
+
+    PHSPACE::ZeroField(cellCenterX, numberOfTotalCells);
+    PHSPACE::ZeroField(cellCenterY, numberOfTotalCells);
+    PHSPACE::ZeroField(cellCenterZ, numberOfTotalCells);
+    PHSPACE::ZeroField(cellVolume, numberOfTotalCells);
+
+    int nodePosition = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        int leftCellIndex = leftCellIndexContainer[iFace];
+        int rightCellIndex = rightCellIndexContainer[iFace];
+        if (iFace < numberOfBoundaryFaces) rightCellIndex = iFace + numberOfCells;
+
+        int faceNodeNumber = faceNodeNumberContainer[iFace];
+        for (int iNodeInFace = 0; iNodeInFace < faceNodeNumber; ++iNodeInFace)
+        {
+            int p2 = faceNodeIndexContainer[nodePosition + iNodeInFace];
+            int p3 = faceNodeIndexContainer[nodePosition + (iNodeInFace + 1) % faceNodeNumber];
+
+            RDouble x21 = x[p2] - faceCenterX[iFace];
+            RDouble y21 = y[p2] - faceCenterY[iFace];
+            RDouble z21 = z[p2] - faceCenterZ[iFace];
+
+            RDouble x31 = x[p3] - faceCenterX[iFace];
+            RDouble y31 = y[p3] - faceCenterY[iFace];
+            RDouble z31 = z[p3] - faceCenterZ[iFace];
+
+            RDouble nx = half * (y21 * z31 - y31 * z21);
+            RDouble ny = half * (z21 * x31 - z31 * x21);
+            RDouble nz = half * (x21 * y31 - x31 * y21);
+
+            RDouble xc = third * (faceCenterX[iFace] + x[p2] + x[p3]);
+            RDouble yc = third * (faceCenterY[iFace] + y[p2] + y[p3]);
+            RDouble zc = third * (faceCenterZ[iFace] + z[p2] + z[p3]);
+
+            RDouble hxcl = xc - txc[leftCellIndex];
+            RDouble hycl = yc - tyc[leftCellIndex];
+            RDouble hzcl = zc - tzc[leftCellIndex];
+
+            RDouble hxcr = xc - txc[rightCellIndex];
+            RDouble hycr = yc - tyc[rightCellIndex];
+            RDouble hzcr = zc - tzc[rightCellIndex];
+
+            // Cell Center and Volume
+            RDouble vvoll = third * (nx * hxcl + ny * hycl + nz * hzcl);
+            RDouble vvolr = third * (nx * hxcr + ny * hycr + nz * hzcr);
+
+            RDouble xcl = xc - fourth * hxcl;
+            RDouble ycl = yc - fourth * hycl;
+            RDouble zcl = zc - fourth * hzcl;
+            xcl *= vvoll;
+            ycl *= vvoll;
+            zcl *= vvoll;
+
+            cellCenterX[leftCellIndex] += xcl;
+            cellCenterY[leftCellIndex] += ycl;
+            cellCenterZ[leftCellIndex] += zcl;
+            cellVolume[leftCellIndex] += vvoll;
+
+            RDouble xcr = xc - fourth * hxcr;
+            RDouble ycr = yc - fourth * hycr;
+            RDouble zcr = zc - fourth * hzcr;
+            xcr *= vvolr;
+            ycr *= vvolr;
+            zcr *= vvolr;
+
+            cellCenterX[rightCellIndex] -= xcr;
+            cellCenterY[rightCellIndex] -= ycr;
+            cellCenterZ[rightCellIndex] -= zcr;
+            cellVolume[rightCellIndex] -= vvolr;
+        }
+        nodePosition += faceNodeNumber;
+    }
+
+    ostringstream oss;
+
+    // Don't forget the coefficients
+    int  numberOfCellsHaveNegativeVolumes = 0;
+    RDouble minvol = LARGE, maxvol = 0.0;
+    int indexMinv = 0, indexMaxv = 0;
+    for (int iCell = 0; iCell < numberOfCells; ++iCell)
+    {
+        RDouble tmp = 1.0 / (cellVolume[iCell] + SMALL);
+        cellCenterX[iCell] *= tmp;
+        cellCenterY[iCell] *= tmp;
+        cellCenterZ[iCell] *= tmp;
+
+        if (minvol > cellVolume[iCell])
+        {
+            minvol = cellVolume[iCell];
+            indexMinv = iCell;
+        }
+        if (maxvol < cellVolume[iCell])
+        {
+            maxvol = cellVolume[iCell];
+            indexMaxv = iCell;
+        }
+
+        if (cellVolume[iCell] <= 0.0)
+        {
+            cellVolume[iCell] = -cellVolume[iCell];
+            ++numberOfCellsHaveNegativeVolumes;
+            oss << "  Warning: negative volume cell index " << iCell << ", (x, y, z) " << cellCenterX[iCell] << " " << cellCenterY[iCell] << " " << cellCenterZ[iCell] << " !\n";
+        }
+    }
+
+    if (numberOfCellsHaveNegativeVolumes) oss << numberOfCellsHaveNegativeVolumes << " cells have negative vols \n";
+
+    // For ghost cells
+    for (int iFace = 0; iFace < numberOfBoundaryFaces; ++iFace)
+    {
+        int leftCellIndex = leftCellIndexContainer[iFace];
+        int rightCellIndex = rightCellIndexContainer[iFace];
+
+        if (faceArea[iFace] > SMALL)
+        {
+            RDouble tmp = 2.0 * ((cellCenterX[leftCellIndex] - faceCenterX[iFace]) * faceNormalX[iFace] +
+                (cellCenterY[leftCellIndex] - faceCenterY[iFace]) * faceNormalY[iFace] +
+                (cellCenterZ[leftCellIndex] - faceCenterZ[iFace]) * faceNormalZ[iFace]);
+            cellCenterX[rightCellIndex] = cellCenterX[leftCellIndex] - faceNormalX[iFace] * tmp;
+            cellCenterY[rightCellIndex] = cellCenterY[leftCellIndex] - faceNormalY[iFace] * tmp;
+            cellCenterZ[rightCellIndex] = cellCenterZ[leftCellIndex] - faceNormalZ[iFace] * tmp;
+        }
+        else
+        {
+            // Degenerated faces
+            cellCenterX[rightCellIndex] = -cellCenterX[leftCellIndex] + 2.0 * faceCenterX[iFace];
+            cellCenterY[rightCellIndex] = -cellCenterY[leftCellIndex] + 2.0 * faceCenterY[iFace];
+            cellCenterZ[rightCellIndex] = -cellCenterZ[leftCellIndex] + 2.0 * faceCenterZ[iFace];
+        }
+        cellVolume[rightCellIndex] = cellVolume[leftCellIndex];
+    }
+
+    delete [] txc;    txc  = NULL;
+    delete [] tyc;    tyc  = NULL;
+    delete [] tzc;    tzc  = NULL;
+
+    ActionKey* actionKey = PHSPACE::GetCurrentActionKey();
+    PHSPACE::StreamToActionKey(actionKey, oss);
+}
+
+void GridManager::BackUpOldGrid()
+{
+    SimpleGrid * oldGrid = this->unstructGrid->GetOldGrid();
+    if (! oldGrid)
+    {
+        oldGrid = new SimpleGrid();
+        this->unstructGrid->SetOldGrid(oldGrid);
+    }
+    * oldGrid = * this->unstructGrid;
+
+    int numberOfFaces         = this->unstructGrid->GetNTotalFace();
+    int numberOfCells         = this->unstructGrid->GetNTotalCell();
+    int numberOfBoundaryFaces = this->unstructGrid->GetNBoundFace();
+    int numberOfTotalCells    = numberOfCells + numberOfBoundaryFaces;
+
+    if (IsNotAllocated(oldFaceCenterX)) oldFaceCenterX = new RDouble[numberOfFaces]();
+    if (IsNotAllocated(oldFaceCenterY)) oldFaceCenterY = new RDouble[numberOfFaces]();
+    if (IsNotAllocated(oldFaceCenterZ)) oldFaceCenterZ = new RDouble [numberOfFaces]();
+    if (IsNotAllocated(oldFaceArea)) oldFaceArea = new RDouble[numberOfFaces]();
+    if (IsNotAllocated(cellVolumeN1)) cellVolumeN1 = new RDouble[numberOfTotalCells]();
+    if (IsNotAllocated(cellVolumeN2)) cellVolumeN2 = new RDouble [numberOfTotalCells]();
+
+    PHSPACE::SetField(oldFaceCenterX, unstructGrid->GetFaceCenterX(), numberOfFaces);
+    PHSPACE::SetField(oldFaceCenterY, unstructGrid->GetFaceCenterY(), numberOfFaces);
+    PHSPACE::SetField(oldFaceCenterZ, unstructGrid->GetFaceCenterZ(), numberOfFaces);
+    PHSPACE::SetField(oldFaceArea, unstructGrid->GetFaceArea(), numberOfFaces);
+
+    PHSPACE::SetField(cellVolumeN2, cellVolumeN1, numberOfTotalCells);
+    PHSPACE::SetField(cellVolumeN1, unstructGrid->GetCellVolume(), numberOfTotalCells);
+
+    PHSPACE::SetField(oldFaceNormalVelocity, newFaceNormalVelocity, numberOfFaces);
+    PHSPACE::SetField(oldFaceVelocityX, newFaceVelocityX, numberOfFaces);
+    PHSPACE::SetField(oldFaceVelocityY, newFaceVelocityY, numberOfFaces);
+    PHSPACE::SetField(oldFaceVelocityZ, newFaceVelocityZ, numberOfFaces);
+}
+
+void GridManager::ComputeMassCharacterOfObject()
+{
+    //0- prepare the data.
+    int numberOfCells         = unstructGrid->GetNTotalCell();
+    RDouble *cellVolume  = unstructGrid->GetCellVolume();
+
+    //0.1- compute the mass of every cell.
+    RDouble totalMass   = 10000.0;
+    RDouble totalVolume = 0.0;
+    RDouble* cellMass = new RDouble [numberOfCells];
+    
+    for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+    {
+        totalVolume += cellVolume[ iCell ];
+    }
+
+    ofstream Volume ("totalVolume.dat", ios_base::out|ios_base::app);
+    Volume << totalVolume << "\n";
+    Volume.close();
+    Volume.clear();
+
+    for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+    {
+        cellMass[ iCell ] = totalMass / totalVolume * cellVolume[ iCell ];
+    }
+
+    //1-calculate the mass center coordinate.
+    RDouble massCenterX = 0.0;
+    RDouble massCenterY = 0.0;
+    RDouble massCenterZ = 0.0;
+
+    for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+    {
+        //! minus the origin position later!
+        RDouble x = cellCenterX[ iCell ] - 0.0;
+        RDouble y = cellCenterY[ iCell ] - 0.0;
+        RDouble z = cellCenterZ[ iCell ] - 0.0;
+        
+        massCenterX += x * cellMass[ iCell ];
+        massCenterY += y * cellMass[ iCell ];
+        massCenterZ += z * cellMass[ iCell ];
+    }
+
+    massCenterX /= totalMass;
+    massCenterY /= totalMass;
+    massCenterZ /= totalMass;
+
+    ofstream massCenter ("massCenter.dat", ios_base::out|ios_base::app);
+    massCenter << massCenterX << '\t' << massCenterY << '\t' << massCenterZ << "\n";
+    massCenter.close();
+    massCenter.clear();
+
+    //2. calculate moment of inertia.
+    RDouble iXX = 0.0;
+    RDouble iYY = 0.0;
+    RDouble iZZ = 0.0;
+    RDouble iXY = 0.0;
+    RDouble iYZ = 0.0;
+    RDouble iZX = 0.0;
+
+    for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+    {
+        //! minus the mass cell center position later!
+        RDouble x = cellCenterX[ iCell ] - 2.4880824;
+        RDouble y = cellCenterY[ iCell ] - 0.0;
+        RDouble z = cellCenterZ[ iCell ] - 0.0;
+        
+        iXX += cellMass[ iCell ] * (PHSPACE::SQR(y) + PHSPACE::SQR(z));
+        iYY += cellMass[ iCell ] * (PHSPACE::SQR(z) + PHSPACE::SQR(x));
+        iZZ += cellMass[ iCell ] * (PHSPACE::SQR(x) + PHSPACE::SQR(y));
+        iXY += cellMass[ iCell ] * (x * y);
+        iYZ += cellMass[ iCell ] * (y * z);
+        iZX += cellMass[ iCell ] * (z * x);
+    }
+
+    ofstream massCharacter ("massCharacter.dat", ios_base::out|ios_base::app);
+    massCharacter << iXX << '\t' << iYY << '\t' << iZZ << '\t' << iXY << '\t' << iYZ<< '\t' << iZX << "\n";
+    massCharacter.close();
+    massCharacter.clear();
+    delete [] cellMass;    cellMass = NULL;
+}
+
+void GridManager::DumpCellCenterFile()
+{
+    fstream cellCenterFile;
+    cellCenterFile.open("./grid/cellCenterFile.ccf", ios::out);
+
+    int numberOfBoundaryFaces = unstructGrid->GetNBoundFace();
+    int numberOfCells = unstructGrid->GetNTotalCell();
+    int numberOfTotalCells = numberOfCells + numberOfBoundaryFaces;
+    RDouble* cellCenterX  = unstructGrid->GetCellCenterX();
+    RDouble* cellCenterY  = unstructGrid->GetCellCenterY();
+    RDouble* cellCenterZ  = unstructGrid->GetCellCenterZ();
+
+    cellCenterFile << numberOfTotalCells << endl;
+
+    for (int iCell = 0; iCell < numberOfTotalCells; ++ iCell)
+    {
+        cellCenterFile << cellCenterX[ iCell ] << " "
+                       << cellCenterY[ iCell ] << " "
+                       << cellCenterZ[ iCell ] << " "
+                       << endl;
+    }
+
+    cellCenterFile.close();
+    cellCenterFile.clear();
+}
+
+void GridManager::ComputeGridFaceVelocity()
+{
+    int strategyFaceNormalVelocity = GlobalDataBase::GetIntParaFromDB("strategyForFaceNormalVelocity");
+    if (strategyFaceNormalVelocity == 0)
+    {
+        this->ComputeGridFaceVelocitySatisfyingGCL();
+    }
+    else if (strategyFaceNormalVelocity == 1)
+    {
+        this->ComputeGridFaceVelocityDirectly();
+    }
+    else if (strategyFaceNormalVelocity == 2)
+    {
+        this->ComputeGridFaceVelocityDirectly();
+    }
+    else
+    {
+        //StopProgram("�޴�strategyForFaceNormalVelocity!");
+    }
+}
+
+void GridManager::ComputeGridFaceVelocityDirectly()
+{
+    RDouble * newFaceCenterX = unstructGrid->GetFaceCenterX();
+    RDouble * newFaceCenterY = unstructGrid->GetFaceCenterY();
+    RDouble * newFaceCenterZ = unstructGrid->GetFaceCenterZ();
+
+    RDouble * oldFaceCenterX = this->GetOldFaceCenterX();
+    RDouble * oldFaceCenterY = this->GetOldFaceCenterY();
+    RDouble * oldFaceCenterZ = this->GetOldFaceCenterZ();
+
+    int numberOfFaces         = unstructGrid->GetNTotalFace();
+
+    RDouble * newFaceNormalVelocity = this->GetNewFaceNormalVelocity();
+    RDouble * newFaceVelocityX      = this->GetNewFaceVelocityX();
+    RDouble * newFaceVelocityY      = this->GetNewFaceVelocityY();
+    RDouble * newFaceVelocityZ      = this->GetNewFaceVelocityZ();
+
+    RDouble * faceNormalVelocity = unstructGrid->GetFaceNormalVelocity();
+    RDouble * faceVelocityX      = unstructGrid->GetFaceVelocityX();
+    RDouble * faceVelocityY      = unstructGrid->GetFaceVelocityY();
+    RDouble * faceVelocityZ      = unstructGrid->GetFaceVelocityZ();
+
+    RDouble * oldFaceVelocityX      = this->GetOldFaceVelocityX();
+    RDouble * oldFaceVelocityY      = this->GetOldFaceVelocityY();
+    RDouble * oldFaceVelocityZ      = this->GetOldFaceVelocityZ();
+
+    RDouble * newFaceNormalX        = unstructGrid->GetFaceNormalX();
+    RDouble * newFaceNormalY        = unstructGrid->GetFaceNormalY();
+    RDouble * newFaceNormalZ        = unstructGrid->GetFaceNormalZ();
+
+    RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        RDouble newFcX = newFaceCenterX[ iFace ];
+        RDouble newFcY = newFaceCenterY[ iFace ];
+        RDouble newFcZ = newFaceCenterZ[ iFace ];
+        RDouble oldFcX = oldFaceCenterX[ iFace ];
+        RDouble oldFcY = oldFaceCenterY[ iFace ];
+        RDouble oldFcZ = oldFaceCenterZ[ iFace ];
+    
+        newFaceVelocityX[ iFace ] = (newFcX - oldFcX) / physicalTimeStep;
+        newFaceVelocityY[ iFace ] = (newFcY - oldFcY) / physicalTimeStep;
+        newFaceVelocityZ[ iFace ] = (newFcZ - oldFcZ) / physicalTimeStep;
+
+        newFaceNormalVelocity[ iFace ] = newFaceVelocityX[ iFace ] * newFaceNormalX[ iFace ]
+                                                + newFaceVelocityY[ iFace ] * newFaceNormalY[ iFace ]
+                                                + newFaceVelocityZ[ iFace ] * newFaceNormalZ[ iFace ];
+    }
+
+    RFloat a = 1.0;
+    RFloat b = 0.0;
+
+    int strategyFaceNormalVelocity = GlobalDataBase::GetIntParaFromDB("strategyForFaceNormalVelocity");
+    if (strategyFaceNormalVelocity == 2)
+    {
+        a = 1.5;
+        b = 0.5;
+    }
+
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        //! faceVelocity is combined by the one order face velocities of the two times.
+        faceVelocityX[ iFace ] = a * newFaceVelocityX[ iFace ] - b * oldFaceVelocityX[ iFace ];
+        faceVelocityY[ iFace ] = a * newFaceVelocityY[ iFace ] - b * oldFaceVelocityY[ iFace ];
+        faceVelocityZ[ iFace ] = a * newFaceVelocityZ[ iFace ] - b * oldFaceVelocityZ[ iFace ];
+
+        faceNormalVelocity[ iFace ] = faceVelocityX[ iFace ] * newFaceNormalX[ iFace ]
+                                             + faceVelocityY[ iFace ] * newFaceNormalY[ iFace ]
+                                             + faceVelocityZ[ iFace ] * newFaceNormalZ[ iFace ];
+    }
+}
+
+void GridManager::ComputeGridFaceVelocitySatisfyingGCL()
+{
+    int geometricDimension = GlobalDataBase::GetIntParaFromDB("ndim");
+
+    if (geometricDimension == TWO_D)
+    {
+        this->ComputeGridFaceVelocity2DSatisfyingGCL();
+    }
+    else
+    {
+        this->ComputeGridFaceVelocity3DSatisfyingGCL();
+    }
+}
+
+// this function needs to fit all the 2D situation in the arbitrary plane, not only in xy plane.
+// the direction shoule be the same as others when computing the volume rate of change.
+void GridManager::ComputeGridFaceVelocity2DSatisfyingGCL()
+{
+    SimpleGrid * oldGrid = unstructGrid->GetOldGrid();
+
+    RDouble * x = unstructGrid->GetX();
+    RDouble * y = unstructGrid->GetY();
+    RDouble * z = unstructGrid->GetZ();
+
+    RDouble * oldX = oldGrid->GetX();
+    RDouble * oldY = oldGrid->GetY();
+    RDouble * oldZ = oldGrid->GetZ();
+
+    RDouble * faceCenterX = unstructGrid->GetFaceCenterX();
+    RDouble * faceCenterY = unstructGrid->GetFaceCenterY();
+    RDouble * faceCenterZ = unstructGrid->GetFaceCenterZ();
+
+    RDouble * oldFaceCenterX = this->GetOldFaceCenterX();
+    RDouble * oldFaceCenterY = this->GetOldFaceCenterY();
+    RDouble * oldFaceCenterZ = this->GetOldFaceCenterZ();
+
+    RDouble * faceArea    = unstructGrid->GetFaceArea();
+    RDouble * oldFaceArea = this->GetOldFaceArea();
+
+    int *faceNodeIndex  = unstructGrid->GetFace2Node();
+    int numberOfFaces         = unstructGrid->GetNTotalFace();
+
+    RDouble * newFaceNormalVelocity = this->GetNewFaceNormalVelocity();
+    RDouble * newFaceVelocityX      = this->GetNewFaceVelocityX();
+    RDouble * newFaceVelocityY      = this->GetNewFaceVelocityY();
+    RDouble * newFaceVelocityZ      = this->GetNewFaceVelocityZ();
+
+    RDouble * faceNormalVelocity = unstructGrid->GetFaceNormalVelocity();
+    RDouble * faceVelocityX      = unstructGrid->GetFaceVelocityX();
+    RDouble * faceVelocityY      = unstructGrid->GetFaceVelocityY();
+    RDouble * faceVelocityZ      = unstructGrid->GetFaceVelocityZ();
+
+    RDouble * oldFaceNormalVelocity = this->GetOldFaceNormalVelocity();
+    RDouble * oldFaceVelocityX      = this->GetOldFaceVelocityX();
+    RDouble * oldFaceVelocityY      = this->GetOldFaceVelocityY();
+    RDouble * oldFaceVelocityZ      = this->GetOldFaceVelocityZ();
+
+    RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        RDouble darea  = 0.0;
+
+        RDouble newFcX = faceCenterX[ iFace ];
+        RDouble newFcY = faceCenterY[ iFace ];
+        RDouble newFcZ = faceCenterZ[ iFace ];
+        RDouble oldFcX = oldFaceCenterX[ iFace ];
+        RDouble oldFcY = oldFaceCenterY[ iFace ];
+        RDouble oldFcZ = oldFaceCenterZ[ iFace ];
+
+        int p1 = faceNodeIndex[ 2 * iFace     ];
+        int p2 = faceNodeIndex[ 2 * iFace + 1 ];
+        
+        RDouble oldX1 = oldX[ p1 ];
+        RDouble oldY1 = oldY[ p1 ];
+        RDouble oldZ1 = oldZ[ p1 ];
+
+        RDouble oldX2 = oldX[ p2 ];
+        RDouble oldY2 = oldY[ p2 ];
+        RDouble oldZ2 = oldZ[ p2 ];
+
+        RDouble newX1 = x[ p1 ];
+        RDouble newY1 = y[ p1 ];
+        RDouble newZ1 = z[ p1 ];
+
+        RDouble newX2 = x[ p2 ];
+        RDouble newY2 = y[ p2 ];
+        RDouble newZ2 = z[ p2 ];
+
+        RDouble dX1 = newX2 - oldX1;
+        RDouble dY1 = newY2 - oldY1;
+        RDouble dZ1 = newZ2 - oldZ1;
+        
+        RDouble dX2 = oldX2 - newX1;
+        RDouble dY2 = oldY2 - newY1;
+        RDouble dZ2 = oldZ2 - newZ1;
+        //! the four points must in the same plane, so the area can be computed by the cross product of the diagonal.
+        //! and it is right for arbitrary quadrilateral!
+        darea = half * (dY1 * dZ2 - dZ1 * dY2 + dZ1 * dX2 - dX1 * dZ2 + dX1 * dY2 - dY1 * dX2);
+    
+        newFaceNormalVelocity[ iFace ] = darea / physicalTimeStep / (faceArea[iFace] + TINY);
+        newFaceVelocityX[ iFace ] = (newFcX - oldFcX) / physicalTimeStep;
+        newFaceVelocityY[ iFace ] = (newFcY - oldFcY) / physicalTimeStep;
+        newFaceVelocityZ[ iFace ] = (newFcZ - oldFcZ) / physicalTimeStep;
+    }
+
+    RDouble a = 1.0;
+    RDouble b = 0.0;
+
+    int linearTwoStepMethods = PHSPACE::GlobalDataBase::GetIntParaFromDB("linearTwoStepMethods");
+
+    if      (linearTwoStepMethods == 1)
+    {
+        //linearTwoStepMethods == 1
+        //Backward Euler                          : Order 1
+        a = 1.0;
+        b = 0.0;
+    }
+    else if (linearTwoStepMethods == 3)
+    {
+        //linearTwoStepMethods == 3
+        //Backward differentiation                : Order 2
+        a = 1.5;
+        b = 0.5;
+    }
+
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        //! faceVelocity is combined by the one order face velocities of the two times(old and new).
+        faceNormalVelocity[ iFace ] = a * newFaceNormalVelocity[ iFace ] - b * oldFaceNormalVelocity[ iFace ] * (oldFaceArea[ iFace ] / faceArea[ iFace ]);
+        faceVelocityX     [ iFace ] = a * newFaceVelocityX     [ iFace ] - b * oldFaceVelocityX     [ iFace ];
+        faceVelocityY     [ iFace ] = a * newFaceVelocityY     [ iFace ] - b * oldFaceVelocityY     [ iFace ];
+        faceVelocityZ     [ iFace ] = a * newFaceVelocityZ     [ iFace ] - b * oldFaceVelocityZ     [ iFace ];
+    }
+}
+
+void GridManager::ComputeGridFaceVelocity3DSatisfyingGCL()
+{
+    SimpleGrid * oldGrid = unstructGrid->GetOldGrid();
+
+    RDouble * x = unstructGrid->GetX();
+    RDouble * y = unstructGrid->GetY();
+    RDouble * z = unstructGrid->GetZ();
+
+    RDouble * oldX = oldGrid->GetX();
+    RDouble * oldY = oldGrid->GetY();
+    RDouble * oldZ = oldGrid->GetZ();
+
+    RDouble * faceCenterX = unstructGrid->GetFaceCenterX();
+    RDouble * faceCenterY = unstructGrid->GetFaceCenterY();
+    RDouble * faceCenterZ = unstructGrid->GetFaceCenterZ();
+
+    RDouble * oldFaceCenterX = this->GetOldFaceCenterX();
+    RDouble * oldFaceCenterY = this->GetOldFaceCenterY();
+    RDouble * oldFaceCenterZ = this->GetOldFaceCenterZ();
+
+    RDouble * faceArea    = unstructGrid->GetFaceArea();
+    RDouble * oldFaceArea = this->GetOldFaceArea();
+
+    int *faceNodeIndex  = unstructGrid->GetFace2Node();
+    int *faceNodeNumber = unstructGrid->GetNodeNumberOfEachFace();
+
+    int numberOfFaces         = unstructGrid->GetNTotalFace();
+    RDouble * newFaceNormalVelocity = this->GetNewFaceNormalVelocity();
+    RDouble * newFaceVelocityX      = this->GetNewFaceVelocityX();
+    RDouble * newFaceVelocityY      = this->GetNewFaceVelocityY();
+    RDouble * newFaceVelocityZ      = this->GetNewFaceVelocityZ();
+
+    RDouble * faceNormalVelocity = unstructGrid->GetFaceNormalVelocity();
+    RDouble * faceVelocityX      = unstructGrid->GetFaceVelocityX();
+    RDouble * faceVelocityY      = unstructGrid->GetFaceVelocityY();
+    RDouble * faceVelocityZ      = unstructGrid->GetFaceVelocityZ();
+
+    RDouble * oldFaceNormalVelocity = this->GetOldFaceNormalVelocity();
+    RDouble * oldFaceVelocityX      = this->GetOldFaceVelocityX();
+    RDouble * oldFaceVelocityY      = this->GetOldFaceVelocityY();
+    RDouble * oldFaceVelocityZ      = this->GetOldFaceVelocityZ();
+
+    RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+    int nodePosition = 0;
+
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        RDouble dvol  = 0.0;
+        int p0  = faceNodeIndex[ nodePosition ];
+        int nodeNumberEachFace = faceNodeNumber[iFace];
+
+        RDouble newFcX = faceCenterX[ iFace ];
+        RDouble newFcY = faceCenterY[ iFace ];
+        RDouble newFcZ = faceCenterZ[ iFace ];
+        RDouble oldFcX = oldFaceCenterX[ iFace ];
+        RDouble oldFcY = oldFaceCenterY[ iFace ];
+        RDouble oldFcZ = oldFaceCenterZ[ iFace ];
+
+        for (int iNodeInFace = 0; iNodeInFace < nodeNumberEachFace; ++ iNodeInFace)
+        {
+            int p1, p2;
+            if (iNodeInFace == nodeNumberEachFace - 1)
+            {
+                p1 = faceNodeIndex[ nodePosition ++ ];
+                p2 = p0;
+            }
+            else
+            {
+                p1 = faceNodeIndex[ nodePosition ++ ];
+                p2 = faceNodeIndex[ nodePosition    ];
+            }
+
+            RDouble oldX1 = oldX[ p1 ];
+            RDouble oldY1 = oldY[ p1 ];
+            RDouble oldZ1 = oldZ[ p1 ];
+
+            RDouble oldX2 = oldX[ p2 ];
+            RDouble oldY2 = oldY[ p2 ];
+            RDouble oldZ2 = oldZ[ p2 ];
+
+            RDouble newX1 = x[ p1 ];
+            RDouble newY1 = y[ p1 ];
+            RDouble newZ1 = z[ p1 ];
+
+            RDouble newX2 = x[ p2 ];
+            RDouble newY2 = y[ p2 ];
+            RDouble newZ2 = z[ p2 ];
+            RDouble xm    = 0.25 * (oldX1 + oldX2 + newX1 + newX2);
+            RDouble ym    = 0.25 * (oldY1 + oldY2 + newY1 + newY2);
+            RDouble zm    = 0.25 * (oldZ1 + oldZ2 + newZ1 + newZ2);
+
+            dvol += ComputeVolume4P(newFcX, newFcY, newFcZ, xm, ym, zm, oldX1, oldY1, oldZ1, oldX2, oldY2, oldZ2)
+                  + ComputeVolume4P(newFcX, newFcY, newFcZ, xm, ym, zm, newX1, newY1, newZ1, oldX1, oldY1, oldZ1)
+                  + ComputeVolume4P(newFcX, newFcY, newFcZ, xm, ym, zm, newX2, newY2, newZ2, newX1, newY1, newZ1)
+                  + ComputeVolume4P(newFcX, newFcY, newFcZ, xm, ym, zm, oldX2, oldY2, oldZ2, newX2, newY2, newZ2)
+                  + ComputeVolume4P(oldFcX, oldFcY, oldFcZ, newFcX, newFcY, newFcZ, oldX1, oldY1, oldZ1, oldX2, oldY2, oldZ2);
+        }
+        newFaceNormalVelocity[ iFace ] = dvol / physicalTimeStep / (faceArea[iFace] + TINY);
+        newFaceVelocityX[ iFace ] = (newFcX - oldFcX) / physicalTimeStep;
+        newFaceVelocityY[ iFace ] = (newFcY - oldFcY) / physicalTimeStep;
+        newFaceVelocityZ[ iFace ] = (newFcZ - oldFcZ) / physicalTimeStep;
+    }
+
+    RDouble a = 1.0;
+    RDouble b = 0.0;
+
+    int linearTwoStepMethods = PHSPACE::GlobalDataBase::GetIntParaFromDB("linearTwoStepMethods");
+    if (linearTwoStepMethods == 1)
+    {
+        //linearTwoStepMethods == 1
+        //Backward Euler                          : Order 1
+        a = 1.0;
+        b = 0.0;
+    }
+    else if (linearTwoStepMethods == 3)
+    {
+        //linearTwoStepMethods == 3
+        //Backward differentiation                : Order 2
+        a = 1.5;
+        b = 0.5;
+    }
+
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        //! faceVelocity is combined by the one order face velocities of the two times(old and new).
+        faceNormalVelocity[ iFace ] = a * newFaceNormalVelocity[ iFace ] - b * oldFaceNormalVelocity[ iFace ] * (oldFaceArea[ iFace ] / (faceArea[ iFace ] + TINY));
+        faceVelocityX     [ iFace ] = a * newFaceVelocityX     [ iFace ] - b * oldFaceVelocityX     [ iFace ];
+        faceVelocityY     [ iFace ] = a * newFaceVelocityY     [ iFace ] - b * oldFaceVelocityY     [ iFace ];
+        faceVelocityZ     [ iFace ] = a * newFaceVelocityZ     [ iFace ] - b * oldFaceVelocityZ     [ iFace ];
+    }
+}
+
+void GridManager::ComputeLocalToGlobalNodeIndexMappingDirectly()
+{
+    int numberOfNodes = unstructGrid->GetNTotalNode();
+
+    int *localToGlobalNodeIndexMapping = this->GetLocalToGlobalNodeIndexMapping();
+
+    localToGlobalNodeIndexMapping = new int[numberOfNodes]();
+
+    for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        localToGlobalNodeIndexMapping[ iNode ] = iNode;
+    }
+}
+
+void GridManager::SkipReadLayoutFile(fstream & file, int targetZone)
+{
+    PHSPACE::PHSkipRead< int >(file, 3);
+
+    for (int iZone = 0; iZone < targetZone; ++ iZone)
+    {
+        int numberOfNodes;
+        int numberOfFaces;
+        int numberOfCells;
+
+        PHSPACE::PHRead(file, numberOfNodes); 
+        PHSPACE::PHRead(file, numberOfFaces);
+        PHSPACE::PHRead(file, numberOfCells);
+
+        PHSPACE::PHSkipRead< int >(file, numberOfNodes);
+        PHSPACE::PHSkipRead< int >(file, numberOfFaces);
+        PHSPACE::PHSkipRead< int >(file, numberOfCells);
+    }
+}
+
+void GridManager::ComputeLocalToGlobalNodeIndexMappingByReadingLayoutFile(int targetZone)
+{
+    fstream infile;
+    string originalGridLayoutFileName = GlobalDataBase::GetStrParaFromDB("originalGridLayoutFileName");
+
+    PHSPACE::OpenFile(infile, originalGridLayoutFileName, ios_base::in|ios_base::binary);
+
+    int numberOfNodes = unstructGrid->GetNTotalNode();
+    int numberOfCells = unstructGrid->GetNTotalCell();
+    int numberOfFaces = unstructGrid->GetNTotalFace();
+
+    SkipReadLayoutFile(infile, targetZone);
+
+    int numberOfNodesRead;
+    int numberOfFacesRead;
+    int numberOfCellsRead;
+
+    PHSPACE::PHRead(infile, numberOfNodesRead);
+    PHSPACE::PHRead(infile, numberOfFacesRead);
+    PHSPACE::PHRead(infile, numberOfCellsRead);
+
+    if ((numberOfNodesRead != numberOfNodes) ||
+         (numberOfFacesRead != numberOfFaces) ||
+         (numberOfCellsRead != numberOfCells))
+    {
+        TK_Exit::ExceptionExit("The number of nodes/faces/cells is not patch! \n");
+    }
+
+    int *localToGlobalNodeIndexMapping = this->GetLocalToGlobalNodeIndexMapping();
+    if (IsNotAllocated(localToGlobalNodeIndexMapping)) localToGlobalNodeIndexMapping = new int [numberOfNodes]();
+
+    PHSPACE::PHRead(infile, localToGlobalNodeIndexMapping, numberOfNodes);
+
+    if (localToGlobalNodeIndexMapping != NULL)
+    {
+        delete [] localToGlobalNodeIndexMapping;    localToGlobalNodeIndexMapping = NULL;
+    }
+    PHSPACE::CloseFile(infile);
+
+}
+
+void GridManager::ReadNewCoordinate()
+{
+    using namespace PHMPI;
+    int numberOfDymamicGridStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("numberOfDymamicGridStep");
+
+    int iStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("outnstep");
+    if (iStep > numberOfDymamicGridStep)
+    {
+        iStep = (iStep - 1) % (numberOfDymamicGridStep) + 1;
+    }
+
+    string existentMovingGridFileFolder = PHSPACE::GlobalDataBase::GetStrParaFromDB("existentMovingGridFileFolder");
+    string newNodeFileName = PHSPACE::AggregateGeneralString(existentMovingGridFileFolder, "step", iStep, "/mmgrid.in");
+    fstream infile;
+    PHSPACE::OpenFile(infile, newNodeFileName, ios_base::in|ios_base::binary);
+
+    int numberOfGlobalNodes;
+    PHSPACE::PHRead(infile, numberOfGlobalNodes);
+
+    int count = 3 * numberOfGlobalNodes;
+
+    globalCoordinateNew = new RDouble[count];
+    PHSPACE::PHRead(infile, globalCoordinateNew, count);
+
+    PHSPACE::CloseFile(infile);
+}
+
+void GridManager::UpdateGridNode()
+{
+    SimpleGrid * oldGrid = this->unstructGrid->GetOldGrid();
+
+    RDouble * newX = this->unstructGrid->GetX();
+    RDouble * newY = this->unstructGrid->GetY();
+    RDouble * newZ = this->unstructGrid->GetZ();
+
+    RDouble * oldX = oldGrid->GetX();
+    RDouble * oldY = oldGrid->GetY();
+    RDouble * oldZ = oldGrid->GetZ();
+
+    int numberOfNodes = this->unstructGrid->GetNTotalNode();
+    int *localToGlobalNodeIndexMapping = this->GetLocalToGlobalNodeIndexMapping();
+
+    RDouble maxDx = 0;
+    RDouble maxDY = 0;
+    RDouble maxDZ = 0;
+    for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        int globalNodeIndex = localToGlobalNodeIndexMapping[ iNode ];
+
+        newX[ iNode ] = globalCoordinateNew[ globalNodeIndex * 3     ];
+        newY[ iNode ] = globalCoordinateNew[ globalNodeIndex * 3 + 1 ];
+        newZ[ iNode ] = globalCoordinateNew[ globalNodeIndex * 3 + 2 ];
+
+        maxDx = PHSPACE::MAX(maxDx, PHSPACE::ABS(newX[ iNode ] - oldX[ iNode ]));
+        maxDY = PHSPACE::MAX(maxDY, PHSPACE::ABS(newY[ iNode ] - oldY[ iNode ]));
+        maxDZ = PHSPACE::MAX(maxDZ, PHSPACE::ABS(newZ[ iNode ] - oldZ[ iNode ]));
+    }
+
+    cout << "<oldGrid, newGrid> max dx, dy, dz = " << maxDx << "	" << maxDY << "	" << maxDZ << endl;
+}
+
+void GridManager::UpdateGridCoordinateByReadingFile(int targetZone)
+{
+    int innerIterationSteps = GlobalDataBase::GetIntParaFromDB("innstep");
+    if (innerIterationSteps != 1) return;
+
+    if (PHMPI::GetNumberofGlobalZones() == 1)
+    {
+        this->ComputeLocalToGlobalNodeIndexMappingDirectly();
+    }
+    else
+    {
+        this->ComputeLocalToGlobalNodeIndexMappingByReadingLayoutFile(targetZone);
+    }
+
+    this->ReadNewCoordinate();
+
+    this->UpdateGridNode();
+}
+
+void GridManager::InitializeMovingGrids()
+{
+    this->InitializeOldFaceNormalVelocity();
+    this->InitializeOldCellVolume();
+}
+
+void GridManager::InitializeOldFaceNormalVelocity()
+{
+    int numberOfFaces = this->unstructGrid->GetNTotalFace();
+
+    GridManager * gridManager = this->unstructGrid->GetGridManager();
+
+    RDouble * faceNormalVelocity    = gridManager-> GetFaceNormalVelocity();
+    RDouble * oldFaceNormalVelocity = gridManager-> GetOldFaceNormalVelocity();
+
+    PHSPACE::SetField(oldFaceNormalVelocity, faceNormalVelocity, numberOfFaces);
+}
+
+void GridManager::InitializeOldCellVolume()
+{
+    int numberOfCells = this->unstructGrid->GetNTotalCell();
+    int numberOfBoundaryFaces = this->unstructGrid->GetNBoundFace();
+    int numberOfTotalCells = numberOfCells + numberOfBoundaryFaces;
+
+    GridManager * gridManager = this->unstructGrid->GetGridManager();
+
+    RDouble *cellVolume   = gridManager->GetCellVolume();
+    RDouble *cellVolumeN1 = gridManager->GetCellVolume(1);
+    RDouble *cellVolumeN2 = gridManager->GetCellVolume(2);
+
+    PHSPACE::SetField(cellVolumeN2, cellVolume, numberOfTotalCells);
+    PHSPACE::SetField(cellVolumeN1, cellVolume, numberOfTotalCells);
+}
+
+void GridManager::ReadMovingGrid()
+{
+    string fileName = PHSPACE::AggregateGeneralString("moveGrid", this->unstructGrid->GetZoneID(), ".dat");
+
+    RDouble * x    = this->unstructGrid->GetX();
+    RDouble * y    = this->unstructGrid->GetY();
+    RDouble * z    = this->unstructGrid->GetZ();
+
+    RDouble * oldCellVolumeN1Container = this->GetOldCellVolume();
+
+    int numberOfNodes = unstructGrid->GetNTotalNode();
+    int numberOfCells = this->unstructGrid->GetNTotalCell();
+    int numberOfBoundaryFaces = this->unstructGrid->GetNBoundFace();
+    int numberOfTotalCells = numberOfCells + numberOfBoundaryFaces;
+    fstream file;
+    OpenFile(file, fileName, ios_base::in|ios_base::binary);
+
+    PHMPI::PH_Read(file, & x[ 0 ], numberOfNodes     );
+    PHMPI::PH_Read(file, & y[ 0 ], numberOfNodes     );
+    PHMPI::PH_Read(file, & z[ 0 ], numberOfNodes     );
+    PHMPI::PH_Read(file, oldCellVolumeN1Container, numberOfTotalCells);
+
+    CloseFile(file);
+}
+
+void GridManager::UpdateOldCellVolume()
+{  
+    int numberOfCells = this->unstructGrid->GetNTotalCell();
+    int numberOfBoundaryFaces = this->unstructGrid->GetNBoundFace();
+    int numberOfTotalCells = numberOfCells + numberOfBoundaryFaces;
+
+    GridManager * gridManager = this->unstructGrid->GetGridManager();
+
+    RDouble* cellVolume = gridManager->GetCellVolume();
+    RDouble* cellVolumeN1 = gridManager->GetCellVolume(1);
+    RDouble* cellVolumeN2 = gridManager->GetCellVolume(2);
+
+    PHSPACE::SetField(cellVolumeN2, cellVolumeN1, numberOfTotalCells);
+    PHSPACE::SetField(cellVolumeN1, cellVolume  , numberOfTotalCells);
+}
+
+void GridManager::ConvergenceNorm(FieldProxy * q1Proxy, FieldProxy * q0Proxy, int numberOfEquations, RFloat & norm)
+{
+    int numberOfCells         = this->unstructGrid->GetNTotalCell();
+
+    RDouble** q1 = q1Proxy->GetField_UNS();
+    RDouble** q0 = q0Proxy->GetField_UNS();
+
+    norm = zero;
+    for (int iEquation = 0; iEquation < numberOfEquations; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+        {
+            RFloat diff = q1[ iEquation ][ iCell ] - q0[ iEquation ][ iCell ];
+            norm += PHSPACE::SQR(diff);
+        }
+    }
+    
+    norm = sqrt(norm / (numberOfCells * numberOfEquations));
+}
+
+RDouble ComputeVolume4P(RDouble x1, RDouble y1, RDouble z1, RDouble x2, RDouble y2, RDouble z2, RDouble x3, RDouble y3, RDouble z3, RDouble x4, RDouble y4, RDouble z4)
+{
+    RDouble xx1, yy1, zz1, xx2, yy2, zz2, xx3, yy3, zz3, vol;
+
+    xx1 = x2 - x1;
+    yy1 = y2 - y1;
+    zz1 = z2 - z1;
+    xx2 = x3 - x1;
+    yy2 = y3 - y1;
+    zz2 = z3 - z1;
+    xx3 = x4 - x1;
+    yy3 = y4 - y1;
+    zz3 = z4 - z1;
+
+    vol = xx1 * yy2 * zz3 + xx2 * yy3 * zz1 + xx3 * yy1 * zz2 - xx3 * yy2 * zz1 - xx2 * yy1 * zz3 - xx1 * yy3 * zz2;
+    vol /= 6.0;
+
+    return vol;
+}
+
+bool IsNotAllocated(void* pointer)
+{
+    if (pointer) return false;
+    return true;
+}
+
+}
+
diff --git a/API/Geometry/src/Geo_Interface.cpp b/API/Geometry/src/Geo_Interface.cpp
new file mode 100644
index 0000000..43fb0fb
--- /dev/null
+++ b/API/Geometry/src/Geo_Interface.cpp
@@ -0,0 +1,664 @@
+#include "Geo_Interface.h"
+#include "PHMatrix.h"
+#include "PHHeader.h"
+#include "TK_Exit.h"
+#include "GridType.h"
+#include "Geo_SimpleGrid.h"
+#include "Constants.h"
+
+namespace PHSPACE
+{
+InterfacePatch::InterfacePatch()
+{
+    zoneid = 0;
+    zoneIndexOfNeighbor = 0;
+    faceNumberOfPatch = 0;
+    faceIndexForRecv = NULL;
+    faceIndexForSend = NULL;
+
+    dataStorageSend = new Data_ParamFieldSuite();
+    dataStorageRecv = new Data_ParamFieldSuite();
+}
+
+InterfacePatch::InterfacePatch(const InterfacePatch &interPatchchIN)
+{
+    zoneid = interPatchchIN.GetZoneID();
+    zoneIndexOfNeighbor = interPatchchIN.GetZoneIndexOfNeighbor();
+    faceNumberOfPatch = interPatchchIN.GetNumberOfFace();
+
+    if (interPatchchIN.GetFaceIndexForRecv())
+    {
+        faceIndexForRecv = new int [faceNumberOfPatch];
+        PHSPACE::CopyField(faceIndexForRecv, interPatchchIN.GetFaceIndexForRecv(), faceNumberOfPatch);
+    }
+
+    if (interPatchchIN.GetFaceIndexForSend())
+    {
+        faceIndexForSend = new int [faceNumberOfPatch];
+        PHSPACE::CopyField(faceIndexForSend, interPatchchIN.GetFaceIndexForSend(), faceNumberOfPatch);
+    }
+
+    dataStorageSend = new Data_ParamFieldSuite();
+    dataStorageRecv = new Data_ParamFieldSuite();
+}
+
+InterfacePatch & InterfacePatch::operator = (const InterfacePatch &interPatchchIN)
+{
+    if (this == &interPatchchIN)
+    {
+        return *this;
+    }
+
+    this->zoneid = interPatchchIN.GetZoneID();
+    this->zoneIndexOfNeighbor = interPatchchIN.GetZoneIndexOfNeighbor();
+    this->faceNumberOfPatch = interPatchchIN.GetNumberOfFace();
+
+    if (interPatchchIN.GetFaceIndexForRecv())
+    {
+        if (faceIndexForRecv) delete [] faceIndexForRecv;
+        faceIndexForRecv = new int [faceNumberOfPatch];
+        PHSPACE::CopyField(faceIndexForRecv, interPatchchIN.GetFaceIndexForRecv(), faceNumberOfPatch);
+    }
+
+    if (interPatchchIN.GetFaceIndexForSend())
+    {
+        if (faceIndexForSend) delete [] faceIndexForSend;
+        this->faceIndexForSend = new int [faceNumberOfPatch];
+        PHSPACE::CopyField(faceIndexForSend, interPatchchIN.GetFaceIndexForSend(), faceNumberOfPatch);
+    }
+
+    delete dataStorageSend;
+    delete dataStorageRecv;
+    dataStorageSend = new Data_ParamFieldSuite();
+    dataStorageRecv = new Data_ParamFieldSuite();
+    dataStorageSend = interPatchchIN.dataStorageSend;
+    dataStorageRecv = interPatchchIN.dataStorageRecv;
+
+    return *this;
+}
+
+InterfacePatch::~InterfacePatch()
+{
+    delete dataStorageSend;
+    delete dataStorageRecv;
+    if (faceIndexForRecv) delete [] faceIndexForRecv;
+    if (faceIndexForSend) delete [] faceIndexForSend;
+}
+
+void InterfacePatch::AllocateData()
+{
+    int faceNumberOfPatch = this->GetNumberOfFace();
+
+    int *recvface = new int [faceNumberOfPatch];
+    int *sendface = new int [faceNumberOfPatch];
+
+    //! GMRESParallel
+    int *cellindexLocal = new int[faceNumberOfPatch];
+    int *cellindexNeighbor = new int[faceNumberOfPatch];
+    int *cellindexLocalGhost = new int[faceNumberOfPatch];
+
+    this->SetFaceIndexForRecv(recvface);
+    this->SetFaceIndexForSend(sendface);
+    
+    //! GMRESParallel
+    this->SetCellIndexOfLocal(cellindexLocal);
+    this->SetCellIndexOfNeighbor(cellindexNeighbor);
+    this->SetCellIndexOfLocalGhost(cellindexLocalGhost);
+}
+
+InterfaceInfo::InterfaceInfo()
+{
+    nIFace                 = 0;
+    numberOfNeighbor       = 0;
+    interFace2ZoneID       = NULL;
+    interFace2CellID       = NULL;
+    interFace2InterFaceID  = NULL;
+    interFace2BoundaryFace = NULL;
+    interFaceDirection     = NULL;
+    //! GMRESParallel
+    globalNeighborCellIndex = NULL;
+    localInterfaceCellIndex = NULL;
+    localInterfacePhysicalCellIndex = NULL;
+    parent                 = NULL;
+
+    dsend = new Data_ParamFieldSuite [GetNumberOfGhostCellLayers()];
+    drecv = new Data_ParamFieldSuite [GetNumberOfGhostCellLayers()];
+
+    interFacePatch.resize(0);
+
+    isNeighborInterfaceFound = 0;
+}
+
+InterfaceInfo::InterfaceInfo(const InterfaceInfo &inforIn)
+{
+    nIFace = inforIn.GetNIFace();
+    numberOfNeighbor = inforIn.GetNumberOfNeighbor();
+
+    if (inforIn.GetInterFace2ZoneID())
+    {
+        interFace2ZoneID = new int [nIFace];
+        PHSPACE::CopyField(interFace2ZoneID, inforIn.GetInterFace2ZoneID(), nIFace);
+    }
+
+    if (inforIn.GetInterFace2CellID())
+    {
+        interFace2CellID = new int [nIFace];
+        PHSPACE::CopyField(interFace2CellID, inforIn.GetInterFace2CellID(), nIFace);
+    }
+
+    if (inforIn.GetInterFace2InterFaceID())
+    {
+        interFace2InterFaceID = new int [nIFace];
+        PHSPACE::CopyField(interFace2InterFaceID, inforIn.GetInterFace2InterFaceID(), nIFace);
+    }
+
+    if (inforIn.GetInterFace2BoundaryFace())
+    {
+        interFace2BoundaryFace = new int [nIFace];
+        PHSPACE::CopyField(interFace2BoundaryFace, inforIn.GetInterFace2BoundaryFace(), nIFace);
+    }
+
+    if (inforIn.GetInterFaceDirection())
+    {
+        interFaceDirection = new int [nIFace];
+        PHSPACE::CopyField(interFaceDirection, inforIn.GetInterFaceDirection(), nIFace);
+    }
+    // GMRESParallel
+    if(inforIn.GetGlobalNeighborCellIndex())
+    {
+        globalNeighborCellIndex = new int[nIFace];
+        PHSPACE::CopyField(globalNeighborCellIndex, inforIn.GetGlobalNeighborCellIndex(), nIFace);
+    }
+
+    if(inforIn.GetLocalInterfaceCellIndex())
+    {
+        localInterfaceCellIndex = new int[nIFace];
+        PHSPACE::CopyField(localInterfaceCellIndex, inforIn.GetLocalInterfaceCellIndex(), nIFace);
+    }
+
+    if(inforIn.GetLocalInterfacePhysicalCellIndex())
+    {
+        localInterfacePhysicalCellIndex = new int[nIFace];
+        PHSPACE::CopyField(localInterfacePhysicalCellIndex, inforIn.GetLocalInterfacePhysicalCellIndex(), nIFace);
+    }
+
+    if (inforIn.GetInterfacePatch().size() != 0)
+    {
+        int numberOfNeighbor = this->GetNumberOfNeighbor();
+        interFacePatch.resize(0);
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            InterfacePatch *interFacePatchNew = new InterfacePatch(* inforIn.GetInterfacePatch(iNeighbor));
+            interFacePatch.push_back(interFacePatchNew);
+        }
+    }
+
+    dsend = new Data_ParamFieldSuite [GetNumberOfGhostCellLayers()];
+    drecv = new Data_ParamFieldSuite [GetNumberOfGhostCellLayers()];
+
+    parent = 0;
+
+    isNeighborInterfaceFound = 0;
+}
+
+InterfaceInfo::InterfaceInfo(int nIFace, Grid *parent)
+{
+    this->nIFace = nIFace;
+    numberOfNeighbor = 0;
+
+    interFace2ZoneID       = new int [nIFace];
+    interFace2CellID       = new int [nIFace];
+    interFace2InterFaceID  = new int [nIFace];
+    interFace2BoundaryFace = new int [nIFace];
+    interFaceDirection     = new int [nIFace];
+    //! GMRESParallel
+    globalNeighborCellIndex = new int[nIFace];
+    localInterfaceCellIndex = new int[nIFace];
+    localInterfacePhysicalCellIndex = new int[nIFace];
+
+    this->parent = parent;
+
+    dsend = new Data_ParamFieldSuite [GetNumberOfGhostCellLayers()];
+    drecv = new Data_ParamFieldSuite [GetNumberOfGhostCellLayers()];
+
+    interFacePatch.resize(0);
+
+    isNeighborInterfaceFound = 0;
+}
+
+InterfaceInfo::~InterfaceInfo()
+{
+    if (interFace2ZoneID != NULL) delete [] interFace2ZoneID;
+    if (interFace2CellID != NULL) delete [] interFace2CellID;
+    if (interFace2InterFaceID != NULL) delete [] interFace2InterFaceID;
+    if (interFace2BoundaryFace != NULL) delete [] interFace2BoundaryFace;
+    if (interFaceDirection != NULL) delete [] interFaceDirection;
+    //! GMRESParallel
+    if (globalNeighborCellIndex!=NULL) delete[] globalNeighborCellIndex;
+    if(localInterfaceCellIndex!=NULL) delete[] localInterfaceCellIndex;
+    if(localInterfacePhysicalCellIndex!=NULL) delete localInterfacePhysicalCellIndex;
+
+    if (dsend != NULL) delete [] dsend;
+    if (drecv != NULL) delete [] drecv;
+
+    for (vector<InterfacePatch *>::iterator iter = interFacePatch.begin(); iter != interFacePatch.end(); ++ iter)
+    {
+        if (NULL != *iter)
+        {
+            delete *iter;
+            *iter = NULL;
+        }
+    }
+    interFacePatch.clear();
+
+    if (isNeighborInterfaceFound != NULL) delete [] isNeighborInterfaceFound;
+}
+
+void InterfaceInfo::AllocateNeighborInfo()
+{
+    int numberOfNeighbor = this->GetNumberOfNeighbor();
+    interFacePatch.resize(0);
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+    {
+        InterfacePatch *interFacePatchNew = new InterfacePatch();
+        interFacePatch.push_back(interFacePatchNew);
+    }
+}
+
+int InterfaceInfo::ComputeNumberOfNeighbor(int *zoneflag)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    int *interFace2ZoneID = this->GetInterFace2ZoneID();
+    int nIFace = this->GetNIFace();
+
+    //! Set zoneflag to zero, assuming that the current zone has no neighbor.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        zoneflag[iZone] = 0;
+    }
+
+    //! Find out all the neighbors of current zone,and set their zoneflag to one.
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        zoneflag[interFace2ZoneID[iFace]] = 1;
+    }
+
+    //! Compute the number of neighbor zones of the current zone,including itself.
+    int numberOfNeighbor = 0;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        numberOfNeighbor += zoneflag[iZone];
+    }
+
+    return numberOfNeighbor;
+}
+
+void InterfaceInfo::FindNeighbors()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    int *zoneflag = new int [nZones];
+
+    int numberOfNeighbor = ComputeNumberOfNeighbor(zoneflag);
+
+    this->SetNumberOfNeighbor(numberOfNeighbor);
+    this->AllocateNeighborInfo();
+
+    int ineighbor = 0;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        if (zoneflag[iZone])
+        {
+            InterfacePatch *interFacePatchNew = this->GetInterfacePatch(ineighbor ++);
+            interFacePatchNew->SetZoneIndexOfNeighbor(iZone);
+        }
+    }
+
+    delete [] zoneflag;
+}
+
+void InterfaceInfo::ComputeFaceIndexForRecv(int ineighbor)
+{
+    int nIFace = this->GetNIFace();
+
+    int *interFace2ZoneID = this->GetInterFace2ZoneID();
+    int zone_id = this->GetZoneIndexOfNeighbor(ineighbor);
+
+    InterfacePatch *interFacePatch = this->GetInterfacePatch(ineighbor);
+    int *faceIndexForRecv = interFacePatch->GetFaceIndexForRecv();
+    int count = 0;
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        if (interFace2ZoneID[iFace] == zone_id)
+        {
+            //! It means that faceIndexForRecv is count locally based on the interfaces of current zone.
+            faceIndexForRecv[count] = iFace;
+            ++ count;
+        }
+    }
+}
+
+int InterfaceInfo::ComputeNIFaceOfNeighbor(int ineighbor)
+{
+    int nIFace = this->GetNIFace();
+    int *interFace2ZoneID = this->GetInterFace2ZoneID();
+    int zone_id = this->GetZoneIndexOfNeighbor(ineighbor);
+    int nIFaceOfNeighbor = 0;
+
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        if (interFace2ZoneID[iFace] == zone_id)
+        {
+            ++ nIFaceOfNeighbor;
+        }
+    }
+
+    return nIFaceOfNeighbor;
+}
+
+void InterfaceInfo::AllocateSendRecv(int ineighbor)
+{
+    int nIFaceOfNeighbor = this->ComputeNIFaceOfNeighbor(ineighbor);
+
+    InterfacePatch *interFacePatch = this->GetInterfacePatch(ineighbor);
+    interFacePatch->SetNumberOfFace(nIFaceOfNeighbor);
+    interFacePatch->AllocateData();
+}
+
+void InterfaceInfo::InitNeighbors(int ineighbor)
+{
+    this->AllocateSendRecv(ineighbor);
+    this->ComputeFaceIndexForRecv(ineighbor);
+}
+
+void InterfaceInfo::InitNeighbors()
+{
+    FindNeighbors();
+
+    int numberOfNeighbor = this->GetNumberOfNeighbor();
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+    {
+        InitNeighbors(iNeighbor);
+    }
+}
+
+int InterfaceInfo::FindIthNeighbor(int zone)
+{
+    int idx = -1;
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+    {
+        if (zone == this->GetZoneIndexOfNeighbor(iNeighbor))
+        {
+            idx = iNeighbor;
+            break;
+        }
+    }
+    return idx;
+}
+
+int * InterfaceInfo::ComputeFaceIndexForSend(int ineighbor)
+{
+    int *faceIndexForSend = new int [this->GetNIFaceOfNeighbor(ineighbor)];
+    int *interFace2InterFaceID = this->GetInterFace2InterFaceID();
+    int zone_id = this->GetZoneIndexOfNeighbor(ineighbor);
+
+    int count = 0;
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        if (interFace2ZoneID[iFace] == zone_id)
+        {
+            faceIndexForSend[count] = interFace2InterFaceID[iFace];
+            ++ count;
+        }
+    }
+    return faceIndexForSend;
+}
+
+void InterfaceInfo::FillFaceIndexForSend(int zone, int *faceIndexForSend_in)
+{
+    int ineighbor = this->FindIthNeighbor(zone);
+    InterfacePatch *interFacePatch = this->GetInterfacePatch(ineighbor);
+    int *faceIndexForSend = interFacePatch->GetFaceIndexForSend();
+    int faceNumberOfPatch = interFacePatch->GetNumberOfFace();
+    for (int iFace = 0; iFace < faceNumberOfPatch; ++ iFace)
+    {
+        //! Here we can make out that faceIndexForSend is corresponds to the neighbor zone.
+        //! That is to say, it comes according to the corresponding sequence of corresponding neighbor zone.
+        faceIndexForSend[iFace] = faceIndexForSend_in[iFace];
+    }
+}
+
+void InterfaceInfo::ReSize(int numberOfNewInterfaces)
+{
+    if (this->nIFace == numberOfNewInterfaces) return;
+
+    delete [] interFace2ZoneID;
+    delete [] interFace2CellID;
+    delete [] interFace2InterFaceID;
+    delete [] interFace2BoundaryFace;
+    delete [] interFaceDirection;
+
+    this->nIFace = numberOfNewInterfaces;
+
+    interFace2ZoneID       = new int [nIFace];
+    interFace2CellID       = new int [nIFace];
+    interFace2InterFaceID  = new int [nIFace];
+    interFace2BoundaryFace = new int [nIFace];
+    interFaceDirection     = new int [nIFace];
+}
+
+InterfaceFields::InterfaceFields(InterfaceInfo *dataIn)
+{
+    this->interfaceInfo = dataIn;
+}
+
+InterfaceFields::~InterfaceFields()
+{
+    //! The send && receive data are allocated by InterfaceFields,
+    //! so, they should be free by InterfaceFields.
+    if (this->Size() == 0) return;
+    FreeInterfaceVar();
+}
+
+void InterfaceFields::RegisterField(const string &name, const int type, const int dimesion, const int solverID)
+{
+    variableNames.push_back(name);
+    variableTypes.push_back(type);
+    variableDimensions.push_back(dimesion);
+    solverIndex.push_back(solverID);
+
+    for (int iGhost = GetNumberOfGhostCellLayers() - 1; iGhost >= 0; -- iGhost)
+    {
+        AllocateInterfaceVar(name, type, dimesion, interfaceInfo->GetSendDataStorage(iGhost));
+        AllocateInterfaceVar(name, type, dimesion, interfaceInfo->GetRecvDataStorage(iGhost));
+    }
+}
+
+void InterfaceFields::AllocateInterfaceVar(const string &name, const int type, const int dimesion, Data_ParamFieldSuite *datastore)
+{
+    int nIFace = interfaceInfo->GetNIFace();
+
+    switch (type)
+    {
+        case PHINT:
+        {
+            int **qInt = NewPointer2< int >(dimesion, nIFace);
+            for (int iDim = 0; iDim < dimesion; ++ iDim)
+            {
+                for (int jDim = 0; jDim < nIFace; ++ jDim)
+                {
+                    qInt[iDim][jDim] = 0;
+                }
+            }
+            datastore->UpdateDataPtr(name, qInt);
+            break;
+        }
+        case PHFLOAT:
+        {
+            RFloat **qFloat = NewPointer2< RFloat >(dimesion, nIFace);
+            for (int iDim = 0; iDim < dimesion; ++ iDim)
+            {
+                for (int jDim = 0; jDim < nIFace; ++ jDim)
+                {
+                    qFloat[iDim][jDim] = 0.0;
+                }
+            }
+            datastore->UpdateDataPtr(name, qFloat);
+            break;
+        }
+        case PHDOUBLE:
+        {
+            RDouble **qDouble = NewPointer2< RDouble >(dimesion, nIFace);
+            for (int iDim = 0; iDim < dimesion; ++ iDim)
+            {
+                for (int jDim = 0; jDim < nIFace; ++ jDim)
+                {
+                    qDouble[iDim][jDim] = 0.0;
+                }
+            }
+            datastore->UpdateDataPtr(name, qDouble);
+            break;
+        }
+        case PHBOOL:
+        {
+            bool **qBool = NewPointer2< bool >(dimesion, nIFace);
+            for (int iDim = 0; iDim < dimesion; ++ iDim)
+            {
+                for (int jDim = 0; jDim < nIFace; ++ jDim)
+                {
+                    qBool[iDim][jDim] = 0;
+                }
+            }
+            datastore->UpdateDataPtr(name, qBool);
+            break;
+        }
+        default:
+        {
+            TK_Exit::UnexpectedVarValue("type", type);
+            break;
+        }
+    }
+}
+
+void InterfaceFields::RemoveAllField()
+{
+    for (int iVar = 0; iVar < Size(); ++ iVar)
+    {
+        string varName = variableNames[iVar];
+        RemoveInterfaceVar(varName);
+    }
+    variableNames.clear();
+    variableTypes.clear();
+    variableDimensions.clear();
+    solverIndex.clear();
+}
+
+void InterfaceFields::RemoveAnVariable(string varName)
+{
+    RemoveInterfaceVar(varName);
+
+    int varIndex = static_cast<int>(find(variableNames.begin(), variableNames.end(), varName) - variableNames.begin());
+    vector< string >::iterator varNameIndexBegin = variableNames.begin();
+    vector< int >::iterator varTypeIndexBegin = variableTypes.begin();
+    vector< int >::iterator varDimIndexBegin = variableDimensions.begin();
+    vector< int >::iterator varSolverIndexBegin = solverIndex.begin();
+
+    variableNames.erase(varNameIndexBegin + varIndex);
+    variableTypes.erase(varTypeIndexBegin + varIndex);
+    variableDimensions.erase(varDimIndexBegin + varIndex);
+    solverIndex.erase(varSolverIndexBegin + varIndex);
+}
+
+void InterfaceFields::FreeInterfaceVar()
+{
+    for (int iGhost = GetNumberOfGhostCellLayers() - 1; iGhost >= 0; -- iGhost)
+    {
+        if (interfaceInfo->GetSendDataStorage(iGhost) != 0) FreeInterfaceVar(interfaceInfo->GetSendDataStorage(iGhost));
+        if (interfaceInfo->GetRecvDataStorage(iGhost) != 0) FreeInterfaceVar(interfaceInfo->GetRecvDataStorage(iGhost));
+    }
+    interfaceInfo = NULL;
+}
+
+void InterfaceFields::FreeInterfaceVar(Data_ParamFieldSuite *datastore)
+{
+    for (int iVar = 0; iVar < Size(); ++ iVar)
+    {
+        string varName = variableNames[iVar];
+        void **q = reinterpret_cast<void **> (datastore->GetDataPtr(varName));
+        if (q != NULL)
+        {
+            DelPointer2(q);
+            datastore->DeleteDataPtr(varName);
+        }
+    }
+    datastore = NULL;
+}
+
+void InterfaceFields::RemoveInterfaceVar(const string &name)
+{
+    Data_ParamFieldSuite *datastore;
+    for (int iGhost = GetNumberOfGhostCellLayers() - 1; iGhost >= 0; -- iGhost)
+    {
+        if (interfaceInfo->GetSendDataStorage(iGhost) != 0)
+        {
+            datastore = interfaceInfo->GetSendDataStorage(iGhost);
+            void **q = reinterpret_cast<void **> (datastore->GetDataPtr(name));
+            if (q != NULL)
+            {
+                DelPointer2(q);
+                datastore->DeleteDataPtr(name);
+            }
+        }
+
+        if (interfaceInfo->GetRecvDataStorage(iGhost) != 0)
+        {
+            datastore = interfaceInfo->GetRecvDataStorage(iGhost);
+            void **q = reinterpret_cast<void **> (datastore->GetDataPtr(name));
+            if (q != NULL)
+            {
+                DelPointer2(q);
+                datastore->DeleteDataPtr(name);
+            }
+        }
+    }
+}
+
+template< typename T >
+T ** InterfaceFields::GetSendVariable(const string &name, const int iGhost)
+{
+     return reinterpret_cast< T ** > (interfaceInfo->GetSendDataStorage(iGhost)->GetDataPtr(name));
+}
+
+template< typename T >
+T ** InterfaceFields::GetRecvVariable(const string &name, const int iGhost)
+{
+    return reinterpret_cast< T ** > (interfaceInfo->GetRecvDataStorage(iGhost)->GetDataPtr(name));
+}
+
+InterfaceDataProxy::InterfaceDataProxy()
+{
+}
+
+InterfaceDataProxy::~InterfaceDataProxy()
+{
+}
+
+vector< RDouble ** > & InterfaceDataProxy::GetVectorData()
+{
+    return vdata;
+}
+
+vector<int> & InterfaceDataProxy::GetVectorDimension()
+{
+    return vdim;
+}
+
+vector<string> & InterfaceDataProxy::GetVectorName()
+{
+    return dataName;
+}
+
+}
diff --git a/API/Geometry/src/Geo_Interpoint.cpp b/API/Geometry/src/Geo_Interpoint.cpp
new file mode 100644
index 0000000..3448a46
--- /dev/null
+++ b/API/Geometry/src/Geo_Interpoint.cpp
@@ -0,0 +1,532 @@
+#include "Geo_Interpoint.h"
+#include "PHMatrix.h"
+#include "PHHeader.h"
+#include "TK_Exit.h"
+#include "Geo_SimpleGrid.h"
+#include "Geo_Interface.h"
+#include "Constants.h"
+
+namespace PHSPACE
+{
+InterpointPatch::InterpointPatch()
+{
+    pointIndexForReceive = NULL;
+    pointIndexForSend = NULL;
+    dataStorageSend = new Data_ParamFieldSuite();
+    dataStorageReceive = new Data_ParamFieldSuite();
+    zoneID = 0;
+    zoneIndexOfNeighbor = 0;
+    pointNumberOfPatch = 0;
+}
+
+InterpointPatch::InterpointPatch(const InterpointPatch &interPatchIn)
+{
+    zoneID = interPatchIn.GetZoneID();
+    zoneIndexOfNeighbor = interPatchIn.GetZoneIndexOfNeighbor();
+    pointNumberOfPatch = interPatchIn.GetNumberOfPoint();
+
+    if (interPatchIn.GetPointIndexForReceive())
+    {
+        pointIndexForReceive = new int[pointNumberOfPatch];
+        PHSPACE::CopyField(pointIndexForReceive, interPatchIn.GetPointIndexForReceive(), pointNumberOfPatch);
+    }
+
+    if (interPatchIn.GetPointIndexForSend())
+    {
+        pointIndexForSend = new int[pointNumberOfPatch];
+        PHSPACE::CopyField(pointIndexForSend, interPatchIn.GetPointIndexForSend(), pointNumberOfPatch);
+    }
+
+    dataStorageSend = new Data_ParamFieldSuite();
+    dataStorageReceive = new Data_ParamFieldSuite();
+}
+
+InterpointPatch::~InterpointPatch()
+{
+    delete dataStorageSend;
+    delete dataStorageReceive;
+    if (pointIndexForReceive)
+    {
+        delete []pointIndexForReceive;
+    }
+    if (pointIndexForSend)
+    {
+        delete []pointIndexForSend;
+    }
+}
+
+void InterpointPatch::AllocateData()
+{
+    int pointNumberOfPatch = this->GetNumberOfPoint();
+
+    int *receivePoint = new int[pointNumberOfPatch];
+    int *sendPoint = new int[pointNumberOfPatch];
+
+    this->SetPointIndexForReceive(receivePoint);
+    this->SetPointIndexForSend(sendPoint);
+}
+
+InterpointInformation::InterpointInformation()
+{
+    numberOfInterpoints = 0;
+    numberOfNeighbor = 0;
+    cellNumberOfInterPoint = NULL;
+    totalZonesOfInterPoint = NULL;
+    labelOfInterPoint = NULL;
+    parent = NULL;
+    interPoint2ZoneID = NULL;
+    interPoint2InterPointID = NULL;
+    interPoint2GlobalPoint = NULL;
+
+    dataForSend = new Data_ParamFieldSuite[GetNumberOfGhostCellLayers()];
+    dataForReceive = new Data_ParamFieldSuite[GetNumberOfGhostCellLayers()];
+
+    interPointPatch = NULL;
+    isNeighborInterpointFound = NULL;
+}
+
+InterpointInformation::InterpointInformation(const InterpointInformation &interpointInformationIn)
+{
+    numberOfInterpoints = interpointInformationIn.GetNumberOfInterpoints();
+    numberOfNeighbor = interpointInformationIn.GetNumberOfNeighbor();
+    if (interpointInformationIn.GetInterPoint2ZoneID())
+    {
+        interPoint2ZoneID = new int[numberOfInterpoints];
+        PHSPACE::CopyField(interPoint2ZoneID, interpointInformationIn.GetInterPoint2ZoneID(), numberOfInterpoints);
+    }
+
+    if (interpointInformationIn.GetInterPoint2InterPointID())
+    {
+        interPoint2InterPointID = new int[numberOfInterpoints];
+        PHSPACE::CopyField(interPoint2InterPointID, interpointInformationIn.GetInterPoint2InterPointID(), numberOfInterpoints);
+    }
+
+    if (interpointInformationIn.GetInterPoint2GlobalPoint())
+    {
+        interPoint2GlobalPoint = new int[numberOfInterpoints];
+        PHSPACE::CopyField(interPoint2GlobalPoint, interpointInformationIn.GetInterPoint2GlobalPoint(), numberOfInterpoints);
+    }
+
+    if (interpointInformationIn.GetCellNumberOfInterPoint())
+    {
+        cellNumberOfInterPoint = new int[numberOfInterpoints];
+        PHSPACE::CopyField(cellNumberOfInterPoint, interpointInformationIn.GetCellNumberOfInterPoint(), numberOfInterpoints);
+    }
+
+    if (interpointInformationIn.GetTotalZonesOfInterPoint())
+    {
+        totalZonesOfInterPoint = new int[numberOfInterpoints];
+        PHSPACE::CopyField(totalZonesOfInterPoint, interpointInformationIn.GetTotalZonesOfInterPoint(), numberOfInterpoints);
+    }
+
+    if (interpointInformationIn.GetLabelOfInterPoint())
+    {
+        labelOfInterPoint = new int[numberOfInterpoints];
+        PHSPACE::CopyField(labelOfInterPoint, interpointInformationIn.GetLabelOfInterPoint(), numberOfInterpoints);
+    }
+    
+    if (interpointInformationIn.GetInterpointPatch())
+    {
+        int numberOfNeighbor = this->GetNumberOfNeighbor();
+        interPointPatch = new InterpointPatch *[numberOfNeighbor];
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            interPointPatch[iNeighbor] = new InterpointPatch(*interpointInformationIn.GetInterpointPatch(iNeighbor));
+        }
+    }
+
+    dataForSend = new Data_ParamFieldSuite[GetNumberOfGhostCellLayers()];
+    dataForReceive = new Data_ParamFieldSuite[GetNumberOfGhostCellLayers()];
+
+    parent = 0;
+
+    isNeighborInterpointFound = 0;
+}
+
+InterpointInformation::InterpointInformation(int numberOfInterpoints, Grid *parent)
+{
+    this->numberOfInterpoints = numberOfInterpoints;
+    interPoint2ZoneID = new int[numberOfInterpoints];
+    interPoint2InterPointID = new int[numberOfInterpoints];
+    interPoint2GlobalPoint = new int[numberOfInterpoints];
+    cellNumberOfInterPoint = new int[numberOfInterpoints];
+    totalZonesOfInterPoint = new int[numberOfInterpoints];
+    labelOfInterPoint = new int[numberOfInterpoints];
+
+    dataForSend = new Data_ParamFieldSuite[GetNumberOfGhostCellLayers()];
+    dataForReceive = new Data_ParamFieldSuite[GetNumberOfGhostCellLayers()];
+    this->parent = parent;
+
+    interPointPatch = 0;
+
+    isNeighborInterpointFound = 0;
+    numberOfNeighbor = 0;
+}
+
+InterpointInformation::~InterpointInformation()
+{
+    delete []interPoint2ZoneID;
+    delete []interPoint2InterPointID;
+    delete []interPoint2GlobalPoint;
+    delete []cellNumberOfInterPoint;
+    delete []totalZonesOfInterPoint;
+    delete []labelOfInterPoint;
+    delete []dataForSend;
+    delete []dataForReceive;
+
+    if (interPointPatch)
+    {
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            delete interPointPatch[iNeighbor];
+        }
+        delete []interPointPatch;
+    }
+
+    delete []isNeighborInterpointFound;
+}
+
+void InterpointInformation::AllocateNeighborInfo()
+{
+    int numberOfNeighbor = this->GetNumberOfNeighbor();
+    interPointPatch = new InterpointPatch *[numberOfNeighbor];
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+    {
+        interPointPatch[iNeighbor] = new InterpointPatch();
+    }
+}
+
+int InterpointInformation::ComputeNumberOfNeighbor(int *zoneFlag)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    int *interPoint2ZoneID = this->GetInterPoint2ZoneID();
+    int numberOfInterpoints = this->GetNumberOfInterpoints();
+
+    //! Set zoneflag to zero,assuming that the current zone has no neighbor.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        zoneFlag[iZone] = 0;
+    }
+
+    //! Set zoneflag to zero,assuming that the current zone has no neighbor.
+    for (int iPoint = 0; iPoint < numberOfInterpoints; ++ iPoint)
+    {
+        zoneFlag[interPoint2ZoneID[iPoint]] = 1;
+    }
+
+    //! Compute the number of neighbor zones of the current zone,including itself.
+    int numberOfNeighbor = 0;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        numberOfNeighbor += zoneFlag[iZone];
+    }
+
+    return numberOfNeighbor;
+}
+
+void InterpointInformation::FindNeighbors()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    int *zoneFlag = new int[nZones];
+
+    int numberOfNeighbor = ComputeNumberOfNeighbor(zoneFlag);
+
+    this->SetNumberOfNeighbor(numberOfNeighbor);
+    this->AllocateNeighborInfo();
+
+    int iNeighbor = 0;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        if (zoneFlag[iZone])
+        {
+            InterpointPatch *interPointPatch = this->GetInterpointPatch(iNeighbor ++);
+            interPointPatch->SetZoneIndexOfNeighbor(iZone);
+        }
+    }
+
+    delete []zoneFlag;
+}
+
+void InterpointInformation::ComputePointIndexForReceive(int iNeighbor)
+{
+    int numberOfInterpoints = this->GetNumberOfInterpoints();
+
+    int *interPoint2ZoneID = this->GetInterPoint2ZoneID();
+    int zoneIDOfNeighbor = this->GetZoneIndexOfNeighbor(iNeighbor);
+
+    InterpointPatch *interPointPatch = this->GetInterpointPatch(iNeighbor);
+    int *pointIndexForReceive = interPointPatch->GetPointIndexForReceive();
+    int count = 0;
+    for (int iPoint = 0; iPoint < numberOfInterpoints; ++ iPoint)
+    {
+        if (interPoint2ZoneID[iPoint] == zoneIDOfNeighbor)
+        {
+            //! It means that pointIndexForReceive is count locally  based on the interfaces of current zone.
+            pointIndexForReceive[count] = iPoint;
+            ++ count;
+        }
+    }
+}
+
+int InterpointInformation::ComputeNumberOfInterpointsForNeighbor(int iNeighbor)
+{
+    int numberOfInterpoints = this->GetNumberOfInterpoints();
+    int *interPoint2ZoneID = this->GetInterPoint2ZoneID();
+    int zoneIDOfNeighbor = this->GetZoneIndexOfNeighbor(iNeighbor);
+    int NumberOfInterpointsForNeighbor = 0;
+
+    for (int iPoint = 0; iPoint < numberOfInterpoints; ++ iPoint)
+    {
+        if (interPoint2ZoneID[iPoint] == zoneIDOfNeighbor)
+        {
+            ++ NumberOfInterpointsForNeighbor;
+        }
+    }
+
+    return NumberOfInterpointsForNeighbor;
+}
+
+void InterpointInformation::AllocateSendReceive(int iNeighbor)
+{
+    int NumberOfInterpointsForNeighbor = this->ComputeNumberOfInterpointsForNeighbor(iNeighbor);
+
+    InterpointPatch *interPointPatch = this->GetInterpointPatch(iNeighbor);
+    interPointPatch->SetNumberOfPoint(NumberOfInterpointsForNeighbor);
+    interPointPatch->AllocateData();
+}
+
+void InterpointInformation::InitNeighbors(int iNeighbor)
+{
+    this->AllocateSendReceive(iNeighbor);
+    this->ComputePointIndexForReceive(iNeighbor);
+}
+
+void InterpointInformation::InitNeighbors()
+{
+    FindNeighbors();
+
+    int numberOfNeighbor = this->GetNumberOfNeighbor();
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+    {
+        InitNeighbors(iNeighbor);
+    }
+}
+
+int InterpointInformation::FindIthNeighbor(int zone)
+{
+    int idx = -1;
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+    {
+        if (zone == this->GetZoneIndexOfNeighbor(iNeighbor))
+        {
+            idx = iNeighbor;
+            break;
+        }
+    }
+    return idx;
+}
+
+int *InterpointInformation::ComputePointIndexForSend(int iNeighbor)
+{
+    int *pointIndexForSend = new int[this->GetNumberOfInterpointsForNeighbor(iNeighbor)];
+    int *interPoint2InterPointID = this->GetInterPoint2InterPointID();
+    int zoneIDOfNeighbor = this->GetZoneIndexOfNeighbor(iNeighbor);
+
+    int count = 0;
+    for (int iPoint = 0; iPoint < numberOfInterpoints; ++ iPoint)
+    {
+        if (interPoint2ZoneID[iPoint] == zoneIDOfNeighbor)
+        {
+            pointIndexForSend[count] = interPoint2InterPointID[iPoint];
+            ++ count;
+        }
+    }
+    return pointIndexForSend;
+}
+
+void InterpointInformation::FillPointIndexForSend(int zone, int *pointIndexForSendIn)
+{
+    int iNeighbor = this->FindIthNeighbor(zone);
+    InterpointPatch *interPointPatch = this->GetInterpointPatch(iNeighbor);
+    int *pointIndexForSend = interPointPatch->GetPointIndexForSend();
+    int pointNumberOfPatch = interPointPatch->GetNumberOfPoint();
+    for (int iPoint = 0; iPoint < pointNumberOfPatch; ++ iPoint)
+    {
+        //! Here we can make out that pointIndexForSend is corresponds to the neighbor zone.
+        //! That is to say,it comes according to the corresponding sequence of corresponding neighbor zone.
+        pointIndexForSend[iPoint] = pointIndexForSendIn[iPoint];
+    }
+}
+
+void InterpointInformation::ReSize(int numberOfNewInterpoints)
+{
+    if (this->numberOfInterpoints == numberOfNewInterpoints)
+    {
+        return;
+    }
+
+    delete []interPoint2ZoneID;
+    delete []interPoint2InterPointID;
+    delete []interPoint2GlobalPoint;
+    delete []cellNumberOfInterPoint;
+    delete []totalZonesOfInterPoint;
+    delete []labelOfInterPoint;
+
+    this->numberOfInterpoints = numberOfNewInterpoints;
+
+    interPoint2ZoneID = new int[numberOfInterpoints];
+    interPoint2InterPointID = new int[numberOfInterpoints];
+    interPoint2GlobalPoint = new int[numberOfInterpoints];
+    cellNumberOfInterPoint = new int[numberOfInterpoints];
+    totalZonesOfInterPoint = new int[numberOfInterpoints];
+    labelOfInterPoint = new int[numberOfInterpoints];
+}
+
+InterpointFields::InterpointFields(InterpointInformation *interpointInformationIn)
+{
+    this->interpointInformation = interpointInformationIn;
+}
+
+InterpointFields::~InterpointFields()
+{
+    //! The send &&receive data are allocated by InterpointFields,
+    //! so, they should be free by InterpointFields.
+    FreeInterpointVariable();
+}
+
+void InterpointFields::RegisterField(const string &name, const int type, const int dimesion, const int solverID)
+{
+    variableNames.push_back(name);
+    variableTypes.push_back(type);
+    variableDimensions.push_back(dimesion);
+    solverIndex.push_back(solverID);
+
+    for (int iGhost = GetNumberOfGhostCellLayers() - 1; iGhost >= 0; -- iGhost)
+    {
+        AllocateInterpointVariable(name, type, dimesion, interpointInformation->GetSendDataStorage(iGhost));
+        AllocateInterpointVariable(name, type, dimesion, interpointInformation->GetReceiveDataStorage(iGhost));
+    }
+}
+
+void InterpointFields::AllocateInterpointVariable(const string &name, const int type, const int dimesion, Data_ParamFieldSuite *datastore)
+{
+    int numberOfInterpoints = interpointInformation->GetNumberOfInterpoints();
+
+    switch (type)
+    {
+    case PHINT:
+        {
+            int **qInt = NewPointer2<int>(dimesion, numberOfInterpoints);
+            for (int iDim = 0; iDim < dimesion; ++ iDim)
+            {
+                for (int jDim = 0; jDim < numberOfInterpoints; ++ jDim)
+                {
+                    qInt[iDim][jDim] = 0;
+                }
+            }
+            datastore->UpdateDataPtr(name, qInt);
+            break;
+        }
+    case PHFLOAT:
+        {
+            float **qFloat = NewPointer2<float>(dimesion, numberOfInterpoints);
+            for (int iDim = 0; iDim < dimesion; ++ iDim)
+            {
+                for (int jDim = 0; jDim < numberOfInterpoints; ++ jDim)
+                {
+                    qFloat[iDim][jDim] = 0.0;
+                }
+            }
+            datastore->UpdateDataPtr(name, qFloat);
+            break;
+        }
+    case PHDOUBLE:
+        {
+            RDouble **qDouble = NewPointer2<RDouble>(dimesion, numberOfInterpoints);
+            for (int iDim = 0; iDim < dimesion; ++ iDim)
+            {
+                for (int jDim = 0; jDim < numberOfInterpoints; ++ jDim)
+                {
+                    qDouble[iDim][jDim] = 0.0;
+                }
+            }
+            datastore->UpdateDataPtr(name, qDouble);
+            break;
+        }
+    case PHBOOL:
+        {
+            bool **qBool = NewPointer2<bool>(dimesion, numberOfInterpoints);
+            for (int iDim = 0; iDim < dimesion; ++ iDim)
+            {
+                for (int jDim = 0; jDim < numberOfInterpoints; ++ jDim)
+                {
+                    qBool[iDim][jDim] = 0;
+                }
+            }
+            datastore->UpdateDataPtr(name, qBool);
+            break;
+        }
+    default:
+        {
+            TK_Exit::UnexpectedVarValue("type", type);
+            break;
+        }
+    }
+}
+
+void InterpointFields::FreeInterpointVariable()
+{
+    for (int iGhost = GetNumberOfGhostCellLayers() - 1; iGhost >= 0; -- iGhost)
+    {
+        FreeInterpointVariable(interpointInformation->GetSendDataStorage(iGhost));
+        FreeInterpointVariable(interpointInformation->GetReceiveDataStorage(iGhost));
+    }
+}
+
+void InterpointFields::FreeInterpointVariable(Data_ParamFieldSuite *dataStore)
+{
+    for (int iVar = 0; iVar < Size(); ++ iVar)
+    {
+        string variableName = variableNames[iVar];
+        void **q = reinterpret_cast<void **> (dataStore->GetDataPtr(variableName));
+        DelPointer2(q);
+    }
+}
+
+template<typename T>
+T **InterpointFields::GetSendVariable(const string &name, const int IDOfGhostLayer)
+{
+     return reinterpret_cast<T **> (interpointInformation->GetSendDataStorage(IDOfGhostLayer)->GetDataPtr(name));
+}
+
+template<typename T>
+T **InterpointFields::GetReceiveVariable(const string &name, const int IDOfGhostLayer)
+{
+    return reinterpret_cast<T **> (interpointInformation->GetReceiveDataStorage(IDOfGhostLayer)->GetDataPtr(name));
+}
+
+InterpointDataProxy::InterpointDataProxy()
+{
+    ;
+}
+
+InterpointDataProxy::~InterpointDataProxy()
+{
+}
+
+vector<RDouble **> &InterpointDataProxy::GetVectorData()
+{
+    return vdata;
+}
+
+
+vector<int> &InterpointDataProxy::GetVectorDimension()
+{
+    return vdim;
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_LSQWeight_Unstruct.cpp b/API/Geometry/src/Geo_LSQWeight_Unstruct.cpp
new file mode 100644
index 0000000..4f46a13
--- /dev/null
+++ b/API/Geometry/src/Geo_LSQWeight_Unstruct.cpp
@@ -0,0 +1,33 @@
+#include "Geo_LSQWeight_Unstruct.h"
+
+namespace PHSPACE
+{
+LIB_EXPORT Geo_LSQWeight_Unstruct::Geo_LSQWeight_Unstruct()
+{
+    iwt = NULL;
+
+    ixx = NULL;
+    iyy = NULL;
+    izz = NULL;
+    ixy = NULL;
+    ixz = NULL;
+    iyz = NULL;
+
+    fMark = NULL;
+}
+
+LIB_EXPORT Geo_LSQWeight_Unstruct::~Geo_LSQWeight_Unstruct()
+{
+    delete [] iwt;
+
+    delete [] ixx;
+    delete [] iyy;
+    delete [] izz;
+    delete [] ixy;
+    delete [] ixz;
+    delete [] iyz;
+
+    delete [] fMark;
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_LineTopo_Unstruct.cpp b/API/Geometry/src/Geo_LineTopo_Unstruct.cpp
new file mode 100644
index 0000000..e258111
--- /dev/null
+++ b/API/Geometry/src/Geo_LineTopo_Unstruct.cpp
@@ -0,0 +1,37 @@
+#include "Geo_LineTopo_Unstruct.h"
+
+namespace PHSPACE
+{
+    LIB_EXPORT Geo_LineTopo_Unstruct::Geo_LineTopo_Unstruct()
+    {
+        nLine = 0;
+        nCellsInLines = NULL;
+        CellOfLine = NULL;
+        FaceOfLine = NULL;
+        LineOfCell = NULL;
+    }
+
+    LIB_EXPORT Geo_LineTopo_Unstruct::~Geo_LineTopo_Unstruct()
+    {
+        if (nCellsInLines != NULL)
+        {
+            DelPointer(nCellsInLines);
+        }
+
+        if (CellOfLine != NULL)
+        {
+            DelPointer2(CellOfLine);
+        }
+        
+        if (FaceOfLine != NULL)
+        {
+            DelPointer2(FaceOfLine);
+        }
+
+        if (LineOfCell != NULL)
+        {
+            DelPointer(LineOfCell);
+        }
+    }
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_MultiGridInfo_Struct.cpp b/API/Geometry/src/Geo_MultiGridInfo_Struct.cpp
new file mode 100644
index 0000000..8472a13
--- /dev/null
+++ b/API/Geometry/src/Geo_MultiGridInfo_Struct.cpp
@@ -0,0 +1,16 @@
+#include "Geo_MultiGridInfo_Struct.h"
+
+namespace PHSPACE
+{
+Geo_MultiGridInfo_Struct::Geo_MultiGridInfo_Struct()
+{
+    istp = 0;
+    jstp = 0;
+    kstp = 0;    //! multigrid step;
+}
+
+Geo_MultiGridInfo_Struct::~Geo_MultiGridInfo_Struct()
+{
+
+}
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_NodeTopo_Struct.cpp b/API/Geometry/src/Geo_NodeTopo_Struct.cpp
new file mode 100644
index 0000000..5ca529e
--- /dev/null
+++ b/API/Geometry/src/Geo_NodeTopo_Struct.cpp
@@ -0,0 +1,484 @@
+#include "Geo_NodeTopo_Struct.h"
+#include "GlobalDataBase.h"
+#include "TypeDefine.h"
+#include "Constants.h"
+namespace PHSPACE
+{
+
+Geo_NodeTopo_Struct::Geo_NodeTopo_Struct()
+{
+    ni = 0;
+    nj = 0;
+    nk = 0;
+    structx = NULL;
+    structy = NULL;
+    structz = NULL;
+}
+
+Geo_NodeTopo_Struct::~Geo_NodeTopo_Struct()
+{
+    DeallocateAll();
+}
+
+void Geo_NodeTopo_Struct::SetArrayLayout(RDouble *x, RDouble *y, RDouble *z)
+{
+    int nsimutask = -1;
+    nsimutask = GlobalDataBase::GetIntParaFromDB("nsimutask");
+    if (nsimutask == 0)
+    {
+        int isFVMOrFDM = PHSPACE::GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+        if (isFVMOrFDM == FD_METHOD)
+        {
+            //! struct hight order, xyz ghost more layers.
+            SetArrayLayoutStructHighOrder(x, y, z);
+            return;
+        }
+
+        int compressible = COMPRESSIBLE;
+        compressible = GlobalDataBase::GetIntParaFromDB("compressible");
+        if (compressible == INCOMPRESSIBLE)
+        {
+            Range I(1, ni);
+            Range J(1, nj);
+            Range K(1, nk);
+            DeallocateAll();
+            RDouble3D *strx = new RDouble3D(x, I, J, K, neverDeleteData, fortranArray);
+            RDouble3D *stry = new RDouble3D(y, I, J, K, neverDeleteData, fortranArray);
+            RDouble3D *strz = new RDouble3D(z, I, J, K, neverDeleteData, fortranArray);
+
+            Range II(0, ni+1);
+            Range JJ(0, nj+1);
+            Range KK(0, nk+1);
+            if (nk == 1) KK.setRange(1, 1);
+            structx = new RDouble3D(II, JJ, KK, fortranArray);
+            structy = new RDouble3D(II, JJ, KK, fortranArray);
+            structz = new RDouble3D(II, JJ, KK, fortranArray);
+
+            (*structx)(I, J, K) = (*strx)(I, J, K);
+            (*structy)(I, J, K) = (*stry)(I, J, K);
+            (*structz)(I, J, K) = (*strz)(I, J, K);
+            return;
+        }
+
+        bool Rwithghost = true;
+        
+        int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+        //int systemGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+        int isOverset = PHSPACE::GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+        //int nMGLevel = PHSPACE::GlobalDataBase::GetIntParaFromDB("nMGLevel");
+        int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+        int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+        int ifLowSpeedPrecon = GlobalDataBase::GetIntParaFromDB("ifLowSpeedPrecon");
+        int wallFunctionType = GlobalDataBase::GetIntParaFromDB("wallFunctionType");
+
+        if (tscheme != 4) Rwithghost = false;
+        //if (systemGridType != 1) Rwithghost = false;
+        if (isOverset) Rwithghost = false;
+        //if (nMGLevel != 1) Rwithghost = false;
+        if (compressible != COMPRESSIBLE) Rwithghost = false;
+        if (isUnsteady) Rwithghost = false;
+        if (nChemical != 0) Rwithghost = false;
+        if (ifLowSpeedPrecon != 0) Rwithghost = false;
+        if (wallFunctionType != WALLFUNCTION::NONE) Rwithghost = false;
+
+        if (Rwithghost)
+        {
+            Range I(1, ni);
+            Range J(1, nj);
+            Range K(1, nk);
+            DeallocateAll();
+            RDouble3D *strx = new RDouble3D(x, I, J, K, neverDeleteData, fortranArray);
+            RDouble3D *stry = new RDouble3D(y, I, J, K, neverDeleteData, fortranArray);
+            RDouble3D *strz = new RDouble3D(z, I, J, K, neverDeleteData, fortranArray);
+            
+            Range II(0, ni+1);
+            Range JJ(0, nj+1);
+            Range KK(0, nk+1);
+            if (nk == 1) KK.setRange(1, 1);
+            structx = new RDouble3D(II, JJ, KK, fortranArray);
+            structy = new RDouble3D(II, JJ, KK, fortranArray);
+            structz = new RDouble3D(II, JJ, KK, fortranArray);
+            
+            (*structx)(I, J, K) = (*strx)(I, J, K);
+            (*structy)(I, J, K) = (*stry)(I, J, K);
+            (*structz)(I, J, K) = (*strz)(I, J, K);
+
+            for (int k = 1; k <= nk; ++ k)
+            {
+                for (int j = 1; j <= nj; ++ j)
+                {
+                    (*structx)(0, j, k) = 2.0 * (*structx)(1, j, k) - (*structx)(2, j, k);
+                    (*structy)(0, j, k) = 2.0 * (*structy)(1, j, k) - (*structy)(2, j, k);
+                    (*structz)(0, j, k) = 2.0 * (*structz)(1, j, k) - (*structz)(2, j, k);
+                    
+                    (*structx)(ni+1, j, k) = 2.0 * (*structx)(ni, j, k) - (*structx)(ni-1, j, k);
+                    (*structy)(ni+1, j, k) = 2.0 * (*structy)(ni, j, k) - (*structy)(ni-1, j, k);
+                    (*structz)(ni+1, j, k) = 2.0 * (*structz)(ni, j, k) - (*structz)(ni-1, j, k);
+                }
+            }
+            for (int k = 1; k <= nk; ++ k)
+            {
+                for (int i = 1; i <= ni; ++ i)
+                {
+                    (*structx)(i, 0, k) = 2.0 * (*structx)(i, 1, k) - (*structx)(i, 2, k);
+                    (*structy)(i, 0, k) = 2.0 * (*structy)(i, 1, k) - (*structy)(i, 2, k);
+                    (*structz)(i, 0, k) = 2.0 * (*structz)(i, 1, k) - (*structz)(i, 2, k);
+                    
+                    (*structx)(i, nj+1, k) = 2.0 * (*structx)(i, nj, k) - (*structx)(i, nj-1, k);
+                    (*structy)(i, nj+1, k) = 2.0 * (*structy)(i, nj, k) - (*structy)(i, nj-1, k);
+                    (*structz)(i, nj+1, k) = 2.0 * (*structz)(i, nj, k) - (*structz)(i, nj-1, k);
+                }
+            }
+            if (nk != 1)
+            {
+                for (int j = 1; j <= nj; ++ j)
+                {
+                    for (int i = 1; i <= ni; ++ i)
+                    {
+                        (*structx)(i, j, 0) = 2.0 * (*structx)(i, j, 1) - (*structx)(i, j, 2);
+                        (*structy)(i, j, 0) = 2.0 * (*structy)(i, j, 1) - (*structy)(i, j, 2);
+                        (*structz)(i, j, 0) = 2.0 * (*structz)(i, j, 1) - (*structz)(i, j, 2);
+                        
+                        (*structx)(i, j, nk+1) = 2.0 * (*structx)(i, j, nk) - (*structx)(i, j, nk-1);
+                        (*structy)(i, j, nk+1) = 2.0 * (*structy)(i, j, nk) - (*structy)(i, j, nk-1);
+                        (*structz)(i, j, nk+1) = 2.0 * (*structz)(i, j, nk) - (*structz)(i, j, nk-1);
+                    }
+                }
+            }
+            delete strx;    strx = NULL;
+            delete stry;    stry = NULL;
+            delete strz;    strz = NULL;
+            return;
+        }
+    }
+
+    Range I(1, ni);
+    Range J(1, nj);
+    Range K(1, nk);
+    DeallocateAll();
+    structx = new RDouble3D(x, I, J, K, neverDeleteData, fortranArray);
+    structy = new RDouble3D(y, I, J, K, neverDeleteData, fortranArray);
+    structz = new RDouble3D(z, I, J, K, neverDeleteData, fortranArray);
+}
+
+void Geo_NodeTopo_Struct::SetArrayLayoutStructHighOrder(RDouble *x, RDouble *y, RDouble *z)
+{
+    string highordersolvername = GlobalDataBase::GetStrParaFromDB("str_highorder_solver");
+    if (highordersolvername.substr(0, 4) == "WCNS")
+    {
+        Range I(1, ni);
+        Range J(1, nj);
+        Range K(1, nk);
+        DeallocateAll();
+        
+        RDouble3D *strx = new RDouble3D(x, I, J, K, neverDeleteData, fortranArray);
+        RDouble3D *stry = new RDouble3D(y, I, J, K, neverDeleteData, fortranArray);
+        RDouble3D *strz = new RDouble3D(z, I, J, K, neverDeleteData, fortranArray);
+        
+        Range II(0, ni+1);
+        Range JJ(0, nj+1);
+        Range KK(0, nk+1);
+        if (nk == 1) KK.setRange(1, 1);
+        structx = new RDouble3D(II, JJ, KK, fortranArray);
+        structy = new RDouble3D(II, JJ, KK, fortranArray);
+        structz = new RDouble3D(II, JJ, KK, fortranArray);
+        
+        (*structx)(I, J, K) = (*strx)(I, J, K);
+        (*structy)(I, J, K) = (*stry)(I, J, K);
+        (*structz)(I, J, K) = (*strz)(I, J, K);
+        
+        delete strx;
+        delete stry;
+        delete strz;
+        
+        for (int k = 1; k <= nk; ++ k)
+        {
+            for (int j = 1; j <= nj; ++ j)
+            {
+                (*structx)(0, j, k) = 2.0 * (*structx)(1, j, k) - (*structx)(2, j, k);
+                (*structy)(0, j, k) = 2.0 * (*structy)(1, j, k) - (*structy)(2, j, k);
+                (*structz)(0, j, k) = 2.0 * (*structz)(1, j, k) - (*structz)(2, j, k);
+                
+                (*structx)(ni + 1, j, k) = 2.0 * (*structx)(ni, j, k) - (*structx)(ni - 1, j, k);
+                (*structy)(ni + 1, j, k) = 2.0 * (*structy)(ni, j, k) - (*structy)(ni - 1, j, k);
+                (*structz)(ni + 1, j, k) = 2.0 * (*structz)(ni, j, k) - (*structz)(ni - 1, j, k);
+            }
+        }
+        
+        for (int k = 1; k <= nk; ++ k)
+        {
+            for (int i = 1; i <= ni; ++ i)
+            {
+                (*structx)(i, 0, k) = 2.0 * (*structx)(i, 1, k) - (*structx)(i, 2, k);
+                (*structy)(i, 0, k) = 2.0 * (*structy)(i, 1, k) - (*structy)(i, 2, k);
+                (*structz)(i, 0, k) = 2.0 * (*structz)(i, 1, k) - (*structz)(i, 2, k);
+                
+                (*structx)(i, nj + 1, k) = 2.0 * (*structx)(i, nj, k) - (*structx)(i, nj - 1, k);
+                (*structy)(i, nj + 1, k) = 2.0 * (*structy)(i, nj, k) - (*structy)(i, nj - 1, k);
+                (*structz)(i, nj + 1, k) = 2.0 * (*structz)(i, nj, k) - (*structz)(i, nj - 1, k);
+            }
+        }
+        
+        if (nk == 1)
+        {
+            int k = 1;
+            (*structx)(0, 0, k) = 2.0 * (*structx)(1, 0, k) - (*structx)(2, 0, k);
+            (*structy)(0, 0, k) = 2.0 * (*structy)(1, 0, k) - (*structy)(2, 0, k);
+            (*structz)(0, 0, k) = 2.0 * (*structz)(1, 0, k) - (*structz)(2, 0, k);
+            
+            (*structx)(ni + 1, 0, k) = 2.0 * (*structx)(ni, 0, k) - (*structx)(ni - 1, 0, k);
+            (*structy)(ni + 1, 0, k) = 2.0 * (*structy)(ni, 0, k) - (*structy)(ni - 1, 0, k);
+            (*structz)(ni + 1, 0, k) = 2.0 * (*structz)(ni, 0, k) - (*structz)(ni - 1, 0, k);
+            
+            (*structx)(0, nj + 1, k) = 2.0 * (*structx)(1, nj + 1, k) - (*structx)(2, nj + 1, k);
+            (*structy)(0, nj + 1, k) = 2.0 * (*structy)(1, nj + 1, k) - (*structy)(2, nj + 1, k);
+            (*structz)(0, nj + 1, k) = 2.0 * (*structz)(1, nj + 1, k) - (*structz)(2, nj + 1, k);
+            
+            (*structx)(ni + 1, nj + 1, k) = 2.0 * (*structx)(ni, nj + 1, k) - (*structx)(ni - 1, nj + 1, k);
+            (*structy)(ni + 1, nj + 1, k) = 2.0 * (*structy)(ni, nj + 1, k) - (*structy)(ni - 1, nj + 1, k);
+            (*structz)(ni + 1, nj + 1, k) = 2.0 * (*structz)(ni, nj + 1, k) - (*structz)(ni - 1, nj + 1, k);
+        
+            return;
+        }
+        
+        for (int j = 1; j <= nj; ++ j)
+        {
+            for (int i = 1; i <= ni; ++ i)
+            {
+                (*structx)(i, j, 0) = 2.0 * (*structx)(i, j, 1) - (*structx)(i, j, 2);
+                (*structy)(i, j, 0) = 2.0 * (*structy)(i, j, 1) - (*structy)(i, j, 2);
+                (*structz)(i, j, 0) = 2.0 * (*structz)(i, j, 1) - (*structz)(i, j, 2);
+                
+                (*structx)(i, j, nk + 1) = 2.0 * (*structx)(i, j, nk) - (*structx)(i, j, nk - 1);
+                (*structy)(i, j, nk + 1) = 2.0 * (*structy)(i, j, nk) - (*structy)(i, j, nk - 1);
+                (*structz)(i, j, nk + 1) = 2.0 * (*structz)(i, j, nk) - (*structz)(i, j, nk - 1);
+            }
+        }
+        
+        for (int j = 1; j <= nj; ++ j)
+        {
+            int i = 0;
+            (*structx)(i, j, 0) = 2.0 * (*structx)(i, j, 1) - (*structx)(i, j, 2);
+            (*structy)(i, j, 0) = 2.0 * (*structy)(i, j, 1) - (*structy)(i, j, 2);
+            (*structz)(i, j, 0) = 2.0 * (*structz)(i, j, 1) - (*structz)(i, j, 2);
+            
+            (*structx)(i, j, nk + 1) = 2.0 * (*structx)(i, j, nk) - (*structx)(i, j, nk - 1);
+            (*structy)(i, j, nk + 1) = 2.0 * (*structy)(i, j, nk) - (*structy)(i, j, nk - 1);
+            (*structz)(i, j, nk + 1) = 2.0 * (*structz)(i, j, nk) - (*structz)(i, j, nk - 1);
+        
+            i = ni + 1;
+            (*structx)(i, j, 0) = 2.0 * (*structx)(i, j, 1) - (*structx)(i, j, 2);
+            (*structy)(i, j, 0) = 2.0 * (*structy)(i, j, 1) - (*structy)(i, j, 2);
+            (*structz)(i, j, 0) = 2.0 * (*structz)(i, j, 1) - (*structz)(i, j, 2);
+            
+            (*structx)(i, j, nk + 1) = 2.0 * (*structx)(i, j, nk) - (*structx)(i, j, nk - 1);
+            (*structy)(i, j, nk + 1) = 2.0 * (*structy)(i, j, nk) - (*structy)(i, j, nk - 1);
+            (*structz)(i, j, nk + 1) = 2.0 * (*structz)(i, j, nk) - (*structz)(i, j, nk - 1);
+        }
+
+        for (int k = 1; k <= nk; ++ k)
+        {
+            int i = 0;
+            (*structx)(i, 0, k) = 2.0 * (*structx)(i, 1, k) - (*structx)(i, 2, k);
+            (*structy)(i, 0, k) = 2.0 * (*structy)(i, 1, k) - (*structy)(i, 2, k);
+            (*structz)(i, 0, k) = 2.0 * (*structz)(i, 1, k) - (*structz)(i, 2, k);
+            
+            (*structx)(i, nj + 1, k) = 2.0 * (*structx)(i, nj, k) - (*structx)(i, nj - 1, k);
+            (*structy)(i, nj + 1, k) = 2.0 * (*structy)(i, nj, k) - (*structy)(i, nj - 1, k);
+            (*structz)(i, nj + 1, k) = 2.0 * (*structz)(i, nj, k) - (*structz)(i, nj - 1, k);
+        
+            i = ni + 1;
+            (*structx)(i, 0, k) = 2.0 * (*structx)(i, 1, k) - (*structx)(i, 2, k);
+            (*structy)(i, 0, k) = 2.0 * (*structy)(i, 1, k) - (*structy)(i, 2, k);
+            (*structz)(i, 0, k) = 2.0 * (*structz)(i, 1, k) - (*structz)(i, 2, k);
+            
+            (*structx)(i, nj + 1, k) = 2.0 * (*structx)(i, nj, k) - (*structx)(i, nj - 1, k);
+            (*structy)(i, nj + 1, k) = 2.0 * (*structy)(i, nj, k) - (*structy)(i, nj - 1, k);
+            (*structz)(i, nj + 1, k) = 2.0 * (*structz)(i, nj, k) - (*structz)(i, nj - 1, k);
+        }
+        
+        for (int i = 1; i <= ni; ++ i)
+        {
+            int j = 0;
+            (*structx)(i, j, 0) = 2.0 * (*structx)(i, j, 1) - (*structx)(i, j, 2);
+            (*structy)(i, j, 0) = 2.0 * (*structy)(i, j, 1) - (*structy)(i, j, 2);
+            (*structz)(i, j, 0) = 2.0 * (*structz)(i, j, 1) - (*structz)(i, j, 2);
+            
+            (*structx)(i, j, nk + 1) = 2.0 * (*structx)(i, j, nk) - (*structx)(i, j, nk - 1);
+            (*structy)(i, j, nk + 1) = 2.0 * (*structy)(i, j, nk) - (*structy)(i, j, nk - 1);
+            (*structz)(i, j, nk + 1) = 2.0 * (*structz)(i, j, nk) - (*structz)(i, j, nk - 1);
+        
+            j = nj + 1;
+            (*structx)(i, j, 0) = 2.0 * (*structx)(i, j, 1) - (*structx)(i, j, 2);
+            (*structy)(i, j, 0) = 2.0 * (*structy)(i, j, 1) - (*structy)(i, j, 2);
+            (*structz)(i, j, 0) = 2.0 * (*structz)(i, j, 1) - (*structz)(i, j, 2);
+            
+            (*structx)(i, j, nk + 1) = 2.0 * (*structx)(i, j, nk) - (*structx)(i, j, nk - 1);
+            (*structy)(i, j, nk + 1) = 2.0 * (*structy)(i, j, nk) - (*structy)(i, j, nk - 1);
+            (*structz)(i, j, nk + 1) = 2.0 * (*structz)(i, j, nk) - (*structz)(i, j, nk - 1);
+        }
+
+        for (int k = 1; k <= nk; ++ k)
+        {
+            int j = 0;
+            (*structx)(0, j, k) = 2.0 * (*structx)(1, j, k) - (*structx)(2, j, k);
+            (*structy)(0, j, k) = 2.0 * (*structy)(1, j, k) - (*structy)(2, j, k);
+            (*structz)(0, j, k) = 2.0 * (*structz)(1, j, k) - (*structz)(2, j, k);
+            
+            (*structx)(ni + 1, j, k) = 2.0 * (*structx)(ni, j, k) - (*structx)(ni - 1, j, k);
+            (*structy)(ni + 1, j, k) = 2.0 * (*structy)(ni, j, k) - (*structy)(ni - 1, j, k);
+            (*structz)(ni + 1, j, k) = 2.0 * (*structz)(ni, j, k) - (*structz)(ni - 1, j, k);
+        
+            j = nj + 1;
+            (*structx)(0, j, k) = 2.0 * (*structx)(1, j, k) - (*structx)(2, j, k);
+            (*structy)(0, j, k) = 2.0 * (*structy)(1, j, k) - (*structy)(2, j, k);
+            (*structz)(0, j, k) = 2.0 * (*structz)(1, j, k) - (*structz)(2, j, k);
+            
+            (*structx)(ni + 1, j, k) = 2.0 * (*structx)(ni, j, k) - (*structx)(ni - 1, j, k);
+            (*structy)(ni + 1, j, k) = 2.0 * (*structy)(ni, j, k) - (*structy)(ni - 1, j, k);
+            (*structz)(ni + 1, j, k) = 2.0 * (*structz)(ni, j, k) - (*structz)(ni - 1, j, k);
+        }
+        
+        for (int i = 1; i <= ni; ++ i)
+        {
+            int k = 0;
+            (*structx)(i, 0, k) = 2.0 * (*structx)(i, 1, k) - (*structx)(i, 2, k);
+            (*structy)(i, 0, k) = 2.0 * (*structy)(i, 1, k) - (*structy)(i, 2, k);
+            (*structz)(i, 0, k) = 2.0 * (*structz)(i, 1, k) - (*structz)(i, 2, k);
+            
+            (*structx)(i, nj + 1, k) = 2.0 * (*structx)(i, nj, k) - (*structx)(i, nj - 1, k);
+            (*structy)(i, nj + 1, k) = 2.0 * (*structy)(i, nj, k) - (*structy)(i, nj - 1, k);
+            (*structz)(i, nj + 1, k) = 2.0 * (*structz)(i, nj, k) - (*structz)(i, nj - 1, k);
+        
+            k = nk + 1;
+            (*structx)(i, 0, k) = 2.0 * (*structx)(i, 1, k) - (*structx)(i, 2, k);
+            (*structy)(i, 0, k) = 2.0 * (*structy)(i, 1, k) - (*structy)(i, 2, k);
+            (*structz)(i, 0, k) = 2.0 * (*structz)(i, 1, k) - (*structz)(i, 2, k);
+            
+            (*structx)(i, nj + 1, k) = 2.0 * (*structx)(i, nj, k) - (*structx)(i, nj - 1, k);
+            (*structy)(i, nj + 1, k) = 2.0 * (*structy)(i, nj, k) - (*structy)(i, nj - 1, k);
+            (*structz)(i, nj + 1, k) = 2.0 * (*structz)(i, nj, k) - (*structz)(i, nj - 1, k);
+        }
+
+        for (int j = 1; j <= nj; ++ j)
+        {
+            int k = 0;
+            (*structx)(0, j, k) = 2.0 * (*structx)(1, j, k) - (*structx)(2, j, k);
+            (*structy)(0, j, k) = 2.0 * (*structy)(1, j, k) - (*structy)(2, j, k);
+            (*structz)(0, j, k) = 2.0 * (*structz)(1, j, k) - (*structz)(2, j, k);
+            
+            (*structx)(ni + 1, j, k) = 2.0 * (*structx)(ni, j, k) - (*structx)(ni - 1, j, k);
+            (*structy)(ni + 1, j, k) = 2.0 * (*structy)(ni, j, k) - (*structy)(ni - 1, j, k);
+            (*structz)(ni + 1, j, k) = 2.0 * (*structz)(ni, j, k) - (*structz)(ni - 1, j, k);
+        
+            k = nk + 1;
+            (*structx)(0, j, k) = 2.0 * (*structx)(1, j, k) - (*structx)(2, j, k);
+            (*structy)(0, j, k) = 2.0 * (*structy)(1, j, k) - (*structy)(2, j, k);
+            (*structz)(0, j, k) = 2.0 * (*structz)(1, j, k) - (*structz)(2, j, k);
+            
+            (*structx)(ni + 1, j, k) = 2.0 * (*structx)(ni, j, k) - (*structx)(ni - 1, j, k);
+            (*structy)(ni + 1, j, k) = 2.0 * (*structy)(ni, j, k) - (*structy)(ni - 1, j, k);
+            (*structz)(ni + 1, j, k) = 2.0 * (*structz)(ni, j, k) - (*structz)(ni - 1, j, k);
+        }
+    }
+    else if (highordersolvername.substr(0, 4) == "HDCS")
+    {
+        Range I(1, ni);
+        Range J(1, nj);
+        Range K(1, nk);
+        DeallocateAll();
+        
+        RDouble3D *strx = new RDouble3D(x, I, J, K, neverDeleteData, fortranArray);
+        RDouble3D *stry = new RDouble3D(y, I, J, K, neverDeleteData, fortranArray);
+        RDouble3D *strz = new RDouble3D(z, I, J, K, neverDeleteData, fortranArray);
+        
+        Range II(-1, ni+2);
+        Range JJ(-1, nj+2);
+        Range KK(-1, nk+2);
+        if (nk == 1) KK.setRange(1, 1);
+        structx = new RDouble3D(II, JJ, KK, fortranArray);
+        structy = new RDouble3D(II, JJ, KK, fortranArray);
+        structz = new RDouble3D(II, JJ, KK, fortranArray);
+        
+        (*structx)(I, J, K) = (*strx)(I, J, K);
+        (*structy)(I, J, K) = (*stry)(I, J, K);
+        (*structz)(I, J, K) = (*strz)(I, J, K);
+        
+        delete strx;
+        delete stry;
+        delete strz;
+        
+        for (int k = 1; k <= nk; ++ k)
+        {
+            for (int j = 1; j <= nj; ++ j)
+            {
+                (*structx)(0, j, k) = 2.0 * (*structx)(1, j, k) - (*structx)(2, j, k);
+                (*structy)(0, j, k) = 2.0 * (*structy)(1, j, k) - (*structy)(2, j, k);
+                (*structz)(0, j, k) = 2.0 * (*structz)(1, j, k) - (*structz)(2, j, k);
+
+                (*structx)(-1, j, k) = 2.0 * (*structx)(0, j, k) - (*structx)(1, j, k);
+                (*structy)(-1, j, k) = 2.0 * (*structy)(0, j, k) - (*structy)(1, j, k);
+                (*structz)(-1, j, k) = 2.0 * (*structz)(0, j, k) - (*structz)(1, j, k);
+                
+                (*structx)(ni + 1, j, k) = 2.0 * (*structx)(ni, j, k) - (*structx)(ni - 1, j, k);
+                (*structy)(ni + 1, j, k) = 2.0 * (*structy)(ni, j, k) - (*structy)(ni - 1, j, k);
+                (*structz)(ni + 1, j, k) = 2.0 * (*structz)(ni, j, k) - (*structz)(ni - 1, j, k);
+
+                (*structx)(ni + 2, j, k) = 2.0 * (*structx)(ni + 1, j, k) - (*structx)(ni, j, k);
+                (*structy)(ni + 2, j, k) = 2.0 * (*structy)(ni + 1, j, k) - (*structy)(ni, j, k);
+                (*structz)(ni + 2, j, k) = 2.0 * (*structz)(ni + 1, j, k) - (*structz)(ni, j, k);
+            }
+        }
+
+        for (int k = 1; k <= nk; ++ k)
+        {
+            for (int i = -1; i <= ni+2; ++ i)
+            {
+                (*structx)(i, 0, k) = 2.0 * (*structx)(i, 1, k) - (*structx)(i, 2, k);
+                (*structy)(i, 0, k) = 2.0 * (*structy)(i, 1, k) - (*structy)(i, 2, k);
+                (*structz)(i, 0, k) = 2.0 * (*structz)(i, 1, k) - (*structz)(i, 2, k);
+
+                (*structx)(i, -1, k) = 2.0 * (*structx)(i, 0, k) - (*structx)(i, 1, k);
+                (*structy)(i, -1, k) = 2.0 * (*structy)(i, 0, k) - (*structy)(i, 1, k);
+                (*structz)(i, -1, k) = 2.0 * (*structz)(i, 0, k) - (*structz)(i, 1, k);
+                
+                (*structx)(i, nj + 1, k) = 2.0 * (*structx)(i, nj, k) - (*structx)(i, nj - 1, k);
+                (*structy)(i, nj + 1, k) = 2.0 * (*structy)(i, nj, k) - (*structy)(i, nj - 1, k);
+                (*structz)(i, nj + 1, k) = 2.0 * (*structz)(i, nj, k) - (*structz)(i, nj - 1, k);
+
+                (*structx)(i, nj + 2, k) = 2.0 * (*structx)(i, nj + 1, k) - (*structx)(i, nj, k);
+                (*structy)(i, nj + 2, k) = 2.0 * (*structy)(i, nj + 1, k) - (*structy)(i, nj, k);
+                (*structz)(i, nj + 2, k) = 2.0 * (*structz)(i, nj + 1, k) - (*structz)(i, nj, k);
+            }
+        }
+        
+        if (nk == 1)
+        {
+            return;
+        }
+        
+        for (int j = -1; j <= nj+2; ++ j)
+        {
+            for (int i = -1; i <= ni+2; ++ i)
+            {
+                (*structx)(i, j, 0) = 2.0 * (*structx)(i, j, 1) - (*structx)(i, j, 2);
+                (*structy)(i, j, 0) = 2.0 * (*structy)(i, j, 1) - (*structy)(i, j, 2);
+                (*structz)(i, j, 0) = 2.0 * (*structz)(i, j, 1) - (*structz)(i, j, 2);
+
+                (*structx)(i, j, -1) = 2.0 * (*structx)(i, j, 0) - (*structx)(i, j, 1);
+                (*structy)(i, j, -1) = 2.0 * (*structy)(i, j, 0) - (*structy)(i, j, 1);
+                (*structz)(i, j, -1) = 2.0 * (*structz)(i, j, 0) - (*structz)(i, j, 1);
+
+                (*structx)(i, j, nk + 1) = 2.0 * (*structx)(i, j, nk) - (*structx)(i, j, nk - 1);
+                (*structy)(i, j, nk + 1) = 2.0 * (*structy)(i, j, nk) - (*structy)(i, j, nk - 1);
+                (*structz)(i, j, nk + 1) = 2.0 * (*structz)(i, j, nk) - (*structz)(i, j, nk - 1);
+
+                (*structx)(i, j, nk + 2) = 2.0 * (*structx)(i, j, nk + 1) - (*structx)(i, j, nk);
+                (*structy)(i, j, nk + 2) = 2.0 * (*structy)(i, j, nk + 1) - (*structy)(i, j, nk);
+                (*structz)(i, j, nk + 2) = 2.0 * (*structz)(i, j, nk + 1) - (*structz)(i, j, nk);
+            }
+        }
+    }
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_NodeTopo_Unstruct.cpp b/API/Geometry/src/Geo_NodeTopo_Unstruct.cpp
new file mode 100644
index 0000000..abab43b
--- /dev/null
+++ b/API/Geometry/src/Geo_NodeTopo_Unstruct.cpp
@@ -0,0 +1,33 @@
+#include "Geo_NodeTopo_Unstruct.h"
+
+namespace PHSPACE
+{
+LIB_EXPORT Geo_NodeTopo_Unstruct::Geo_NodeTopo_Unstruct()
+{
+    cell_number_of_each_node = 0;
+    node2cell = 0;
+    node2CellArray = 0;
+}
+
+LIB_EXPORT Geo_NodeTopo_Unstruct::~Geo_NodeTopo_Unstruct()
+{
+    if (cell_number_of_each_node != 0)
+    {
+        delete [] cell_number_of_each_node;
+        cell_number_of_each_node = 0;
+    }
+
+    if (node2cell != 0)
+    {
+        delete [] node2cell;
+        node2cell = 0;
+    }
+
+    if (node2CellArray != 0)
+    {
+        delete [] node2CellArray;
+        node2CellArray = 0;
+    }
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_OversetGrid.cpp b/API/Geometry/src/Geo_OversetGrid.cpp
new file mode 100644
index 0000000..01b9f7d
--- /dev/null
+++ b/API/Geometry/src/Geo_OversetGrid.cpp
@@ -0,0 +1,155 @@
+#include "Geo_OversetGrid.h"
+#include "Geo_UnstructGrid.h"
+#include "PHMatrix.h"
+#include "PHIO.h"
+#include "TK_Exit.h"
+using namespace std;
+
+namespace PHSPACE
+{
+Geo_OversetGrid::Geo_OversetGrid(Grid *grid_in, int rank, int nBlocks)
+{
+    grid                  = grid_in;
+    this->rank            = rank;
+    this->nBlocks         = nBlocks;
+    xb                    = 0;
+    yb                    = 0;
+    zb                    = 0;
+    numberOfBoundaryPoints = 0;
+
+    oversetInfoProxy  = new OversetInfoProxy();
+    //! Transfer oversetInfoProxy release right to grid.
+    grid->SetOversetInfoProxy(oversetInfoProxy);
+}
+
+Geo_OversetGrid::~Geo_OversetGrid()
+{
+    delete [] xb;
+    delete [] yb;
+    delete [] zb;
+}
+
+bool Geo_OversetGrid::IsExteriorPoint(int flagOfPoint)
+{
+    return flagOfPoint == ExteriorPoint;
+}
+
+void Geo_OversetGrid::InitReceivingInformation(vector<int> &cellIndexRef1, vector<int> &zoneIndexRef2, vector<int> &cellIndexRef2)
+{
+    oversetInfoProxy->InitReceivingInformation(cellIndexRef1, zoneIndexRef2, cellIndexRef2);
+}
+
+void Geo_OversetGrid::PrepareSendingInformation(Geo_OversetGrid **oversetGrids)
+{
+    oversetInfoProxy->PrepareSendingInformation(oversetGrids);
+}
+
+void Geo_OversetGrid::PreProcess()
+{
+    Grid *grid = this->GetGrid();
+    grid->ComputeMetrics();
+}
+
+void Geo_OversetGrid::PostProcess(Geo_OversetGrid **oversetGrids)
+{
+    oversetInfoProxy->PostProcess(oversetGrids);
+}
+
+void Geo_OversetGrid::DumpOversetGrid(fstream &file)
+{
+    DataContainer *cdata = new DataContainer();
+
+    grid->Encode(cdata, 1);
+    WriteFile(file, cdata);
+
+    delete cdata;
+}
+
+bool InBox(RDouble &xb, RDouble &yb, RDouble &zb, RDouble *pmin, RDouble *pmax)
+{
+    if (xb < pmin[0] || xb > pmax[0]) return false;
+    if (yb < pmin[1] || yb > pmax[1]) return false;
+    if (zb < pmin[2] || zb > pmax[2]) return false;
+    return true;
+}
+
+bool p_On_RHSide(RDouble &x, RDouble &y, RDouble &z, RDouble *p1, RDouble *p2)
+{
+    RDouble dx1,dy1,dz1,dx2,dy2,dz2;
+    dx1 = x - p1[0];
+    dy1 = y - p1[1];
+    dz1 = z - p1[2];
+
+    dx2 = p2[0] - p1[0];
+    dy2 = p2[1] - p1[1];
+    dz2 = p2[2] - p1[2];
+
+    //RDouble sx = dy1 * dz2 - dy2 * dz1;
+    //RDouble sy = dz1 * dx2 - dz2 * dx1;
+    RDouble sz = dx1 * dy2 - dx2 * dy1;
+
+    if (sz <= 0.0) return false;
+    return true;
+}
+
+bool RightSide(RDouble &xm, RDouble &ym, RDouble &zm, RDouble &xfc, RDouble &yfc, RDouble &zfc, RDouble &xfn, RDouble &yfn, RDouble &zfn)
+{
+    RDouble dx = xm - xfc;
+    RDouble dy = ym - yfc;
+    RDouble dz = zm - zfc;
+
+    RDouble result = dx * xfn + dy * yfn + dz * zfn;
+
+    if (result > 0) return true;
+    return false;
+}
+
+vector<string> GetTecplotTitle(const string &field_name)
+{
+    vector<string> title_tecplot;
+    title_tecplot.push_back("title=\"Flow Fields of PHengLEI\"");
+    title_tecplot.push_back("variables = ");
+    title_tecplot.push_back("\"x\"");
+    title_tecplot.push_back("\"y\"");
+    title_tecplot.push_back("\"z\"");
+
+    string str = "\"" + field_name + "\"";
+    title_tecplot.push_back(str);
+
+    return title_tecplot;
+}
+
+void DumpField(UnstructGrid *grid, fstream &file, RDouble *field, const string &name)
+{
+    int nTotalNode = grid->GetNTotalNode();
+
+    int nplot = 1;
+    std::ostringstream oss;
+
+    RDouble ** qv = NewPointer2<RDouble>(nplot, nTotalNode);
+
+    CompNodeVar(grid, qv[0], field);
+
+    vector<string> title_tecplot = GetTecplotTitle(name);
+    FieldVisualization(grid, oss, title_tecplot, qv, nplot);
+
+    DelPointer2(qv);
+
+    file << oss.str();
+}
+
+void Visualization(UnstructGrid *grid, RDouble *field, const string &filename, const string &fieldname)
+{
+    fstream file;
+    file.open(filename.c_str(),ios_base::out|ios_base::trunc);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(filename);
+    }
+    DumpField(grid, file, field, fieldname);
+    file.close();
+    file.clear();
+}
+
+
+}
diff --git a/API/Geometry/src/Geo_OversetGridTopo_Struct.cpp b/API/Geometry/src/Geo_OversetGridTopo_Struct.cpp
new file mode 100644
index 0000000..7f59d62
--- /dev/null
+++ b/API/Geometry/src/Geo_OversetGridTopo_Struct.cpp
@@ -0,0 +1,68 @@
+#include "Geo_OversetGridTopo_Struct.h"
+#include "OversetGridFactory.h"
+
+namespace PHSPACE
+{
+
+Geo_OversetGridTopo_Struct::Geo_OversetGridTopo_Struct()
+{
+    numberOfCores = 0;
+    zoneStartPointLabel = 0;
+    iLinkPointLabel = 0;
+    jLinkPointLabel = 0;
+    kLinkPointLabel = 0;
+    iBlank = 0;
+    zoneStartCenterLabel = 0;
+    hingedPointContainer = 0;
+    xCoreContainer = 0;
+    yCoreContainer = 0;
+    zCoreContainer = 0;
+}
+
+Geo_OversetGridTopo_Struct::~Geo_OversetGridTopo_Struct()
+{
+    if (iLinkPointLabel) delete [] iLinkPointLabel;
+    if (jLinkPointLabel) delete [] jLinkPointLabel;
+    if (kLinkPointLabel) delete [] kLinkPointLabel;
+    //if (iBlank) delete [] iBlank;
+    if (hingedPointContainer) delete [] hingedPointContainer;
+    if (xCoreContainer) delete [] xCoreContainer;
+    if (yCoreContainer) delete [] yCoreContainer;
+    if (zCoreContainer) delete [] zCoreContainer;
+}
+
+void Geo_OversetGridTopo_Struct::CreateLinkPointStructure(int nTotalNode)
+{
+    if (iLinkPointLabel) delete [] iLinkPointLabel;
+    if (jLinkPointLabel) delete [] jLinkPointLabel;
+    if (kLinkPointLabel) delete [] kLinkPointLabel;
+    iLinkPointLabel = new int [nTotalNode];
+    jLinkPointLabel = new int [nTotalNode];
+    kLinkPointLabel = new int [nTotalNode];
+}
+
+void Geo_OversetGridTopo_Struct::CreateCellContainer(int nTotalCell)
+{
+    if (iBlank) delete [] iBlank;
+    iBlank = new int [nTotalCell];
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        iBlank[iCell] = GENERIC_COLOR;
+    }
+}
+
+void Geo_OversetGridTopo_Struct::CreateCoreParameterContainer(int numberOfCores)
+{
+    if (hingedPointContainer) delete [] hingedPointContainer;
+    if (xCoreContainer) delete [] xCoreContainer;
+    if (yCoreContainer) delete [] yCoreContainer;
+    if (zCoreContainer) delete [] zCoreContainer;
+
+    hingedPointContainer = new int [numberOfCores];
+    xCoreContainer = new RDouble [numberOfCores];
+    yCoreContainer = new RDouble [numberOfCores];
+    zCoreContainer = new RDouble [numberOfCores];
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_PointFactory.cpp b/API/Geometry/src/Geo_PointFactory.cpp
new file mode 100644
index 0000000..32ed711
--- /dev/null
+++ b/API/Geometry/src/Geo_PointFactory.cpp
@@ -0,0 +1,191 @@
+#include "Geo_PointFactory.h"
+#include "Constants.h"
+using namespace std;
+
+namespace PHSPACE
+{
+
+Geo_PointFactory::Geo_PointFactory()
+{
+    computationalToGlobalNodeIndexMapping = new PHVectorInt1D;
+    globalToComputationalNodeIndexMapping = new PHVectorInt1D;
+    minDistance = 1.0e-10;
+    oldNumberOfComputationalNodes = 0;
+}
+
+Geo_PointFactory::~Geo_PointFactory()
+{
+    delete computationalToGlobalNodeIndexMapping;
+    delete globalToComputationalNodeIndexMapping;
+
+    pointList.clear();
+}
+
+Geo_PointFactory::point_type Geo_PointFactory::CirclePoint(PHVectorInt1D & element, PHVectorInt1D & pointList)
+{
+    RDouble xc = zero;
+    RDouble yc = zero;
+    RDouble zc = zero;
+
+    RDouble radius = one;
+
+    uint_t nodeNumber = pointList.size();
+
+    for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+    {
+        Geo_PointFactory::point_type pt = GetPoint(element[ pointList[ iNode ] ]);
+        xc += pt.X();
+        yc += pt.Y();
+        zc += pt.Z();
+    }
+
+    RDouble oNodeNumber = one / (nodeNumber + SMALL);
+
+    xc *= oNodeNumber;
+    yc *= oNodeNumber;
+    zc *= oNodeNumber;
+
+    RDouble osc = one / (DISTANCE(xc, yc, zc) + SMALL);
+
+    RDouble x0 = xc * osc * radius;
+    RDouble y0 = yc * osc * radius;
+    RDouble z0 = zc * osc * radius;
+
+    Geo_PointFactory::point_type center_point(x0, y0, z0);
+    return center_point;
+}
+
+void Geo_PointFactory::SetBoundaryPoint(set< int > & bcVertex, int boundaryConditionType)
+{
+    for (set< int >::iterator iter = bcVertex.begin(); iter != bcVertex.end(); ++ iter)
+    {
+        pointBoundaryConditionType[* iter ].insert(boundaryConditionType);  //! Are the  point boundary condition type allowed to be repeated?
+    }
+}
+
+bool Geo_PointFactory::PointWithBoundary(int index, int boundaryConditionType)
+{
+    set< int >::iterator iter = pointBoundaryConditionType[ index ].find(boundaryConditionType);
+    if (iter != pointBoundaryConditionType[ index ].end())
+    {
+        return true;
+    }
+    return false;
+}
+
+void Geo_PointFactory::InsertPointBoundaryConditionType(int index, int boundaryConditionType)
+{
+    pointBoundaryConditionType[ index ].insert(boundaryConditionType);
+}
+
+
+Geo_PointFactory::point_type * Geo_PointFactory::GetCenterPoint(PHVectorInt1D & element, vector< int > & pointList)
+{
+    RDouble xc = zero;
+    RDouble yc = zero;
+    RDouble zc = zero;
+
+    uint_t nodeNumber = pointList.size(); //! The node number of the center point.
+
+    //! New
+    //! Reorder the point, so that the point start from lower to super.
+    set<int> orderedPoints;
+    for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+    {
+        int point = element[ pointList[ iNode ] ];
+        orderedPoints.insert(point);
+    }
+    for (set<int>::iterator iter = orderedPoints.begin(); iter != orderedPoints.end(); ++ iter)
+    {
+        int point = * iter;
+        Geo_PointFactory::point_type pt = GetPoint(point); //! Find out the vertex.
+        xc += pt.X();
+        yc += pt.Y();
+        zc += pt.Z();
+    }
+    //*/
+
+    RDouble oNodeNumber = one / (nodeNumber + SMALL);
+
+    xc *= oNodeNumber;    //! Average.
+    yc *= oNodeNumber;
+    zc *= oNodeNumber;
+
+    Geo_PointFactory::point_type * center_point = new Geo_PointFactory::point_type(xc, yc, zc);
+    return center_point;
+}
+
+bool Geo_PointFactory::FindPoint(point_type & point, iterator & iter)
+{
+    return pointList.search(&point) == 0 ? false : true;
+}
+
+void Geo_PointFactory::AddPointDirectly(point_type & point, int boundaryConditionType)
+{
+    pointArray.push_back(point);
+}
+
+int Geo_PointFactory::AddPoint(point_type *& point, bool & isNodeExist)
+{
+    //! Insert the node into the tetNode, which is a hash table.
+    int localIndex = pointList.insert(point, isNodeExist) - 1;
+
+    //! Push the node into node list of GRAdvanceFront.
+    if (isNodeExist)
+    {
+        //! Exist old node.
+        delete point;
+        point = pointList[localIndex];
+    }else
+    {
+        //! The nodeIn is a new node.
+        value_type tolerance = this->GetMinDistance();
+        tolerance = MIN(tolerance / 1.0e10, 1.0e-13);
+        point->SetTolerance(tolerance);
+
+        //int index = this->GetNumberOfPoints();
+        //point->SetID(index);
+
+        point->SetID(localIndex);
+
+        AddPointDirectly(*point);
+    }
+
+    return localIndex;
+}
+
+int Geo_PointFactory::AddPointTest(point_type & point, int iNode, int numberOfNodes)
+{
+    Geo_PointFactory::iterator iter;   //! Firstly,check whether the point exists, add in if it does not exist in order to avoid repetition.
+    int resultsID;
+    if (FindPoint(point, iter))
+    {
+        //cout << " iNode = " << iNode << " numberOfNodes = " << numberOfNodes << "\n";
+        //cout << " Point Has Existed ! Point ID = " << iter->ID() << " " << point.ID() << "\n";
+        resultsID = iter->ID();
+        //return iter->ID();
+    }
+    else
+    {
+        int index = static_cast<int>(this->GetNumberOfPoints());
+        point.SetID(index);
+        AddPointDirectly(point);
+        resultsID = index;
+        //return index;
+    }
+
+    return resultsID;
+}
+
+void Geo_PointFactory::SetOldNumberOfComputationalNodes(int oldNumberOfComputationalNodes)
+{
+    this->oldNumberOfComputationalNodes = oldNumberOfComputationalNodes;
+}
+
+int Geo_PointFactory::GetOldNumberOfComputationalNodes()
+{
+    return oldNumberOfComputationalNodes;
+}
+
+}
+
diff --git a/API/Geometry/src/Geo_Sample.cpp b/API/Geometry/src/Geo_Sample.cpp
new file mode 100644
index 0000000..94f5fcf
--- /dev/null
+++ b/API/Geometry/src/Geo_Sample.cpp
@@ -0,0 +1,1780 @@
+#include "Geo_Sample.h"
+#include "IO_FileName.h"
+#include "GridType.h"
+#include "TK_Parse.h"
+#include "PHIO.h"
+#include "TK_Log.h"
+#include "TK_Exit.h"
+#include "Glb_Dimension.h"
+#include "Geo_MultiGridInfo_Struct.h"
+#ifdef PH_PARALLEL
+#endif
+
+#include "PHMpi.h"
+
+using namespace std;
+using namespace PHSPACE;
+using namespace PHMPI;
+
+namespace PHSPACE
+{
+
+ProbeData::ProbeData()
+{
+    probeToCellDistance =1.0e10;
+    probeCellType = -1;
+    probeCellZoneID = -1;
+    probeCellID = -1;
+    probeCellNI = -1;
+    probeCellNJ = -1;
+    probeCellNK = -1;
+    probeGlobalID = -1;
+    probeSurfaceID = -1;
+    probeLineID = -1;
+    isProbeValid = false;
+    probeCoordinates.resize(0);
+}
+
+ProbeData::~ProbeData()
+{
+    probeCoordinates.clear();
+}
+
+void ProbeData::SetProbeCoordinates(const vector <RDouble> &probeCoordinates)
+{
+    this->probeCoordinates = probeCoordinates;
+}
+
+void ProbeData::SetProbeGlobalID(const int &probeGlobalID)
+{
+    this->probeGlobalID = probeGlobalID;
+}
+
+void ProbeData::SetProbeLineID(const int &probeLineID)
+{
+    this->probeLineID = probeLineID;
+}
+
+void ProbeData::SetProbeSurfaceID(const int &probeSurfaceID)
+{
+    this->probeSurfaceID = probeSurfaceID;
+}
+
+void ProbeData::SetProbeValidity(const bool &isProbeValid)
+{
+    this->isProbeValid = isProbeValid;
+}
+
+void ProbeData::SetProbeToCellDistance(const RDouble &probeToCellDistance)
+{
+    this->probeToCellDistance = probeToCellDistance;
+}
+
+void ProbeData::SetProbeCellType(const int &probeCellType)
+{
+    this->probeCellType = probeCellType;
+}
+
+void ProbeData::SetProbeCellZoneID(const int &probeCellZoneID)
+{
+    this->probeCellZoneID = probeCellZoneID;
+}
+
+void ProbeData::SetProbeCellID(const int &probeCellID)
+{
+    this->probeCellID = probeCellID;
+}
+
+void ProbeData::SetProbeCellNI(const int &probeCellNI)
+{
+    this->probeCellNI = probeCellNI;
+}
+
+void ProbeData::SetProbeCellNJ(const int &probeCellNJ)
+{
+    this->probeCellNJ = probeCellNJ;
+}
+
+void ProbeData::SetProbeCellNK(const int &probeCellNK)
+{
+    this->probeCellNK = probeCellNK;
+}
+
+vector <RDouble> ProbeData::GetProbeCoordinates()
+{
+    return this->probeCoordinates;
+}
+
+int ProbeData::GetProbeGlobalID()
+{
+    return this->probeGlobalID;
+}
+
+int ProbeData::GetProbeLineID()
+{
+    return this->probeLineID;
+}
+
+int ProbeData::GetProbeSurfaceID()
+{
+    return this->probeSurfaceID;
+}
+
+bool ProbeData::GetProbeValidity()
+{
+    return this->isProbeValid;
+}
+
+RDouble ProbeData::GetProbeToCellDistance()
+{
+    return this->probeToCellDistance;
+}
+
+int ProbeData::GetProbeCellType()
+{
+    return this->probeCellType;
+}
+
+int ProbeData::GetProbeCellZoneID()
+{
+    return this->probeCellZoneID;
+}
+
+int ProbeData::GetProbeCellID()
+{
+    return this->probeCellID;
+}
+
+int ProbeData::GetProbeCellNI()
+{
+    return this->probeCellNI;
+}
+
+int ProbeData::GetProbeCellNJ()
+{
+    return this->probeCellNJ;
+}
+
+int ProbeData::GetProbeCellNK()
+{
+    return this->probeCellNK;
+}
+
+void ProbeData::SearchNearestCell(Grid *grid)
+{
+    if (grid->Type() == PHSPACE::STRUCTGRID)
+    {
+        StructGrid * structGrid = StructGridCast(grid);
+        SearchNearestCell(structGrid);
+    }
+    else
+    {
+        UnstructGrid * unstructGrid = UnstructGridCast(grid);
+        SearchNearestCell(unstructGrid);
+    }
+}
+
+void ProbeData::SearchNearestCell(StructGrid * grid)
+{
+    int gridtype = grid->Type();
+    int zoneID = grid->GetGridID()->GetIndex();
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble3D &xcc = *(grid->GetCellCenterX());
+    RDouble3D &ycc = *(grid->GetCellCenterY());
+    RDouble3D &zcc = *(grid->GetCellCenterZ());
+
+    RDouble maxDistance = grid->CalMaxEdgeLength();
+
+    vector <RDouble> coordinates = GetProbeCoordinates();
+    bool isValid = GetProbeValidity();
+    RDouble nearestCellDistance = GetProbeToCellDistance();
+    int nearestCellZoneID = GetProbeCellZoneID();
+    int nearestCellNI = GetProbeCellNI();
+    int nearestCellNJ = GetProbeCellNJ();
+    int nearestCellNK = GetProbeCellNK();
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble CurrentDistance = DISTANCE(xcc(i, j, k) - coordinates[0], ycc(i, j, k) - coordinates[1], zcc(i, j, k) - coordinates[2]);
+                if (CurrentDistance < nearestCellDistance)
+                {
+                    nearestCellDistance = CurrentDistance;
+                    nearestCellNI = i;
+                    nearestCellNJ = j;
+                    nearestCellNK = k;
+                    nearestCellZoneID = zoneID;
+                    if (nearestCellDistance <= maxDistance) isValid = true;
+                }
+            }
+        }
+    }
+
+    SetProbeCellType(gridtype);
+    SetProbeValidity(isValid);
+    SetProbeToCellDistance(nearestCellDistance);
+    SetProbeCellZoneID(nearestCellZoneID);
+    SetProbeCellNI(nearestCellNI);
+    SetProbeCellNJ(nearestCellNJ);
+    SetProbeCellNK(nearestCellNK);
+}
+
+void ProbeData::SearchNearestCell(UnstructGrid * grid)
+{
+    int gridtype = grid->Type();
+    int zoneID = grid->GetGridID()->GetIndex();
+
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble * xcc = grid->GetCellCenterX();
+    RDouble * ycc = grid->GetCellCenterY();
+    RDouble * zcc = grid->GetCellCenterZ();
+
+    RDouble maxDistance = grid->CalMaxEdgeLength();
+
+    vector <RDouble> coordinates = GetProbeCoordinates();
+    bool isValid = GetProbeValidity();
+    RDouble nearestCellDistance = GetProbeToCellDistance();
+    int nearestCellID = GetProbeCellID();
+    int nearestCellZoneID = GetProbeCellZoneID();
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        RDouble CurrentDistance = DISTANCE(xcc[iCell]-coordinates[0], ycc[iCell]-coordinates[1], zcc[iCell]-coordinates[2]);
+        if (CurrentDistance < nearestCellDistance)
+        {
+            nearestCellDistance = CurrentDistance;
+            nearestCellID = iCell;
+            nearestCellZoneID = zoneID;
+            if (nearestCellDistance <= maxDistance) isValid = true;
+        }
+    }
+
+    SetProbeCellType(gridtype);
+    SetProbeValidity(isValid);
+    SetProbeToCellDistance(nearestCellDistance);
+    SetProbeCellZoneID(nearestCellZoneID);
+    SetProbeCellID(nearestCellID);
+
+}
+
+void ProbeData::SearchRealCell(Grid *grid, bool &flag)
+{
+    if (grid->Type() == PHSPACE::STRUCTGRID)
+    {
+        StructGrid * structGrid = StructGridCast(grid);
+        SearchRealCell(structGrid, flag);
+    }
+    else
+    {
+        UnstructGrid * unstructGrid = UnstructGridCast(grid);
+        SearchRealCell(unstructGrid, flag);
+    }
+}
+
+void ProbeData::SearchRealCell(StructGrid * grid, bool &flag)
+{
+    int gridtype = grid->Type();
+    int zoneID = grid->GetGridID()->GetIndex();
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble3D &xcc = *(grid->GetCellCenterX());
+    RDouble3D &ycc = *(grid->GetCellCenterY());
+    RDouble3D &zcc = *(grid->GetCellCenterZ());
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    vector <RDouble> coordinates = GetProbeCoordinates();
+    RDouble realCellDistance = GetProbeToCellDistance();
+    bool isValid = GetProbeValidity();
+    int realCellZoneID = GetProbeCellZoneID();
+    int realCellNI = GetProbeCellNI();
+    int realCellNJ = GetProbeCellNJ();
+    int realCellNK = GetProbeCellNK();
+
+    int nDim = GetDim();
+    int il, jl, kl;
+    RDouble small = 1.0e-8;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int iSurf = 1; iSurf <= nDim; ++ iSurf)
+                { 
+                    int il1, jl1, kl1;
+                    GetNsurfIndex(iSurf, il1, jl1, kl1);
+
+                    il = i + il1;
+                    jl = j + jl1;
+                    kl = k + kl1;
+
+
+                    RDouble xfn1 = xfn(i, j, k, iSurf);
+                    RDouble yfn1 = yfn(i, j, k, iSurf);
+                    RDouble zfn1 = zfn(i, j, k, iSurf);
+
+                    RDouble xfn2 = xfn(il, jl, kl, iSurf);
+                    RDouble yfn2 = yfn(il, jl, kl, iSurf);
+                    RDouble zfn2 = zfn(il, jl, kl, iSurf);
+
+                    RDouble xfc1, yfc1, zfc1, xfc2, yfc2, zfc2;
+                    grid->FaceCoor(i, j, k, iSurf, xfc1, yfc1, zfc1);
+
+                    RDouble probeToFaceVecX1 = coordinates[0] - xfc1;
+                    RDouble probeToFaceVecY1 = coordinates[1] - yfc1;
+                    RDouble probeToFaceVecZ1 = coordinates[2] - zfc1;
+                    RDouble probeToFaceDistance1 = DISTANCE(probeToFaceVecX1, probeToFaceVecY1, probeToFaceVecZ1);
+                    RDouble dotProduct11 = probeToFaceVecX1 * xfn1 + probeToFaceVecY1 * yfn1 + probeToFaceVecZ1 * zfn1;
+
+                    RDouble centerToFaceVecX1 = xcc(i, j, k) - xfc1;
+                    RDouble centerToFaceVecY1 = ycc(i, j, k) - yfc1;
+                    RDouble centerToFaceVecZ1 = zcc(i, j, k) - zfc1;
+                    RDouble dotProduct21 = centerToFaceVecX1 * xfn1 + centerToFaceVecY1 * yfn1 + centerToFaceVecZ1 * zfn1;
+
+                    grid->FaceCoor(il ,jl ,kl, iSurf, xfc2, yfc2, zfc2);
+
+                    RDouble probeToFaceVecX2 = coordinates[0] - xfc2;
+                    RDouble probeToFaceVecY2 = coordinates[1] - yfc2;
+                    RDouble probeToFaceVecZ2 = coordinates[2] - zfc2;
+                    RDouble probeToFaceDistance2 = DISTANCE(probeToFaceVecX2, probeToFaceVecY2, probeToFaceVecZ2);
+                    RDouble dotProduct12 = probeToFaceVecX2 * xfn2 + probeToFaceVecY2 * yfn2 + probeToFaceVecZ2 * zfn2;
+
+                    RDouble centerToFaceVecX2 = xcc(i, j, k) - xfc2;
+                    RDouble centerToFaceVecY2 = ycc(i, j, k) - yfc2;
+                    RDouble centerToFaceVecZ2 = zcc(i, j, k) - zfc2;
+                    RDouble dotProduct22 = centerToFaceVecX2 * xfn2 + centerToFaceVecY2 * yfn2 + centerToFaceVecZ2 * zfn2;
+
+                    // Judge if the probe and cell center at the same side of the current face.
+                    // First face.
+
+                    if (ABS(dotProduct11 / (probeToFaceDistance1 + TINY)) < small)
+                    {
+                        flag = true;
+                    }
+                    else if (dotProduct11 * dotProduct21 > zero)
+                    {
+                        flag = true;
+                    }
+                    else
+                    {
+                        flag = false;
+                        break;
+                    }
+
+                    // Second face.
+                    if (ABS(dotProduct12 / (probeToFaceDistance2 + TINY)) < small)
+                    {
+                        flag = true;
+                    }
+                    else if (dotProduct12 * dotProduct22 > zero)
+                    {
+                        flag = true;
+                    }
+                    else
+                    {
+                        flag = false;
+                        break;
+                    }
+                }
+
+                if (flag)
+                {
+                    isValid = true;
+                    realCellNI = i;
+                    realCellNJ = j;
+                    realCellNK = k;
+                    realCellZoneID = zoneID;
+                    realCellDistance = DISTANCE(xcc(i, j, k) - coordinates[0], ycc(i, j, k) - coordinates[1], zcc(i, j, k) - coordinates[2]); 
+                    break;
+                }
+            }
+
+            if (flag) break;
+        }
+
+        if (flag) break;
+    }
+
+    SetProbeCellType(gridtype);
+    SetProbeToCellDistance(realCellDistance);
+    SetProbeCellZoneID(realCellZoneID);
+    SetProbeCellNI(realCellNI);
+    SetProbeCellNJ(realCellNJ);
+    SetProbeCellNK(realCellNK);
+    SetProbeValidity(isValid);
+}
+
+void ProbeData::SearchRealCell(UnstructGrid * grid, bool &flag)
+{
+    int gridtype = grid->Type();
+    int zoneID = grid->GetGridID()->GetIndex();
+
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+
+    int ** cell2face = grid->GetCell2Face();
+    int * faceNumberOfEachCell = grid->GetFaceNumberOfEachCell();
+
+    vector <RDouble> coordinates = GetProbeCoordinates();
+    RDouble realCellDistance = GetProbeToCellDistance();
+    bool isValid = GetProbeValidity();
+    int realCellID = GetProbeCellID();
+    int realCellZoneID = GetProbeCellZoneID();
+
+    RDouble small = 1.0e-8;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        for (int iFace = 0; iFace < faceNumberOfEachCell[iCell]; ++ iFace)
+        {
+            int faceID = cell2face[iCell][iFace];
+
+            RDouble probeToFaceVecX = coordinates[0] - xfc[faceID];
+            RDouble probeToFaceVecY = coordinates[1] - yfc[faceID];
+            RDouble probeToFaceVecZ = coordinates[2] - zfc[faceID];
+            RDouble probeToFaceDistance = DISTANCE(probeToFaceVecX, probeToFaceVecY, probeToFaceVecZ);
+            RDouble dotProduct1 = probeToFaceVecX * xfn[faceID] + probeToFaceVecY * yfn[faceID] + probeToFaceVecZ * zfn[faceID];
+
+            RDouble centerToFaceVecX = xcc[iCell] - xfc[faceID];
+            RDouble centerToFaceVecY = ycc[iCell] - yfc[faceID];
+            RDouble centerToFaceVecZ = zcc[iCell] - zfc[faceID];
+            RDouble dotProduct2 = centerToFaceVecX * xfn[faceID] + centerToFaceVecY * yfn[faceID] + centerToFaceVecZ * zfn[faceID];
+
+            // Judge if the probe and cell center at the same side of the current face.
+            if (ABS(dotProduct1 / (probeToFaceDistance + TINY)) < small)
+            {
+                flag = true;
+            }
+            else if (dotProduct1 * dotProduct2 > zero)
+            {
+                flag = true;
+            }
+            else
+            {
+                flag = false;
+                break;
+            }
+        }
+
+        if (flag) 
+        {
+            isValid = true;
+            realCellID = iCell;
+            realCellZoneID = zoneID;
+            realCellDistance = DISTANCE(xcc[realCellID] - coordinates[0], ycc[realCellID] - coordinates[1], zcc[realCellID] - coordinates[2]);
+            break;
+        }
+    }
+
+    SetProbeCellType(gridtype);
+    SetProbeToCellDistance(realCellDistance);
+    SetProbeCellZoneID(realCellZoneID);
+    SetProbeCellID(realCellID);
+    SetProbeValidity(isValid);
+}
+
+void ProbeData::WriteStructProbeCellInfo(fstream &file)
+{
+    int dataMonitorType = GlobalDataBase::GetIntParaFromDB("dataMonitorType");
+    ostringstream oss;
+
+    oss << setiosflags(ios::left);
+    oss << setiosflags(ios::scientific);
+    oss << setprecision(10);
+
+    vector <RDouble> coordinates = GetProbeCoordinates();
+    int probeID = GetProbeGlobalID();
+    int lineID = GetProbeLineID();
+    int surfaceID = GetProbeSurfaceID();
+    //int probeNumber = probeID + 1;
+
+    RDouble distance = GetProbeToCellDistance();
+    int cellNI = GetProbeCellNI();
+    int cellNJ = GetProbeCellNJ();
+    int cellNK = GetProbeCellNK();
+
+    int cellZoneID   = GetProbeCellZoneID();
+    int cellType = GetProbeCellType(); 
+
+    int wordWidth = 7;
+
+    oss << setw(wordWidth) << probeID << "	";
+    if (dataMonitorType == LINESMONITOR)
+    {
+        oss << setw(wordWidth) << lineID << "	";
+    }
+    if (dataMonitorType == SURFACESMONITOR)
+    {
+        oss << setw(wordWidth) << surfaceID << "\t";
+    }
+    oss << setw(wordWidth) << distance << "\t";
+    oss << " ( " << cellNI << " , " << cellNJ << " , " << cellNK << " ) " << "\t";
+    oss << setw(wordWidth) << cellType << "\t";
+    oss << setw(wordWidth) << cellZoneID << "\t";
+    oss << "\n";
+
+    WriteASCIIFile(file, oss.str());
+}
+
+void ProbeData::WriteUnstructProbeCellInfo(fstream &file)
+{
+    int dataMonitorType = GlobalDataBase::GetIntParaFromDB("dataMonitorType");
+    ostringstream oss;
+
+    oss << setiosflags(ios::left);
+    oss << setiosflags(ios::scientific);
+    oss << setprecision(10);
+
+    
+    vector <RDouble> coordinates = GetProbeCoordinates();
+    int probeID = GetProbeGlobalID();
+    int lineID = GetProbeLineID();
+    int surfaceID = GetProbeSurfaceID();
+
+    RDouble distance = GetProbeToCellDistance();
+    int cellID       = GetProbeCellID();
+    int cellZoneID   = GetProbeCellZoneID();
+    int cellType = GetProbeCellType();
+    
+    int wordWidth = 7;
+    oss << setw(wordWidth) << probeID << "	";
+    if (dataMonitorType == LINESMONITOR)
+    {
+        oss << setw(wordWidth) << lineID << "	";
+    }
+    if (dataMonitorType == SURFACESMONITOR)
+    {
+        oss << setw(wordWidth) << surfaceID << "	";
+    }
+    oss << setw(wordWidth) << distance << "	";
+    oss << setw(wordWidth) << cellID << "	";
+    oss << setw(wordWidth) << cellType << "	";
+    oss << setw(wordWidth) << cellZoneID << "	";
+    oss << "\n";
+
+    WriteASCIIFile(file, oss.str());
+}
+
+void ProbeData::CompressUnstructProbeCellInfo(DataContainer *cdata)
+{
+    vector <RDouble> coordinates = GetProbeCoordinates();
+    int probeID = GetProbeGlobalID();
+    int lineID = GetProbeLineID();
+    int surfaceID = GetProbeSurfaceID();
+    bool isValid = GetProbeValidity();
+    int cellType = GetProbeCellType();
+    int cellZoneID = GetProbeCellZoneID();
+    int cellID = GetProbeCellID();
+    RDouble distance = GetProbeToCellDistance();
+
+    int nDim =static_cast<int>(coordinates.size());
+    PHWrite(cdata, nDim);
+    for (int iDim = 0; iDim < nDim; ++ iDim)
+    {
+        PHWrite(cdata,coordinates[iDim]);
+    }
+
+    PHWrite(cdata, probeID);
+    PHWrite(cdata, lineID);
+    PHWrite(cdata, surfaceID);
+    PHWrite(cdata, isValid);
+    PHWrite(cdata, cellType);
+    PHWrite(cdata, cellZoneID);
+    PHWrite(cdata, cellID);
+    PHWrite(cdata, distance);
+}
+
+void ProbeData::CompressStructProbeCellInfo(DataContainer *cdata)
+{
+    vector <RDouble> coordinates = GetProbeCoordinates();
+    int probeID = GetProbeGlobalID();
+    int lineID = GetProbeLineID();
+    int surfaceID = GetProbeSurfaceID();
+    bool isValid = GetProbeValidity();
+    int cellType = GetProbeCellType();
+    int cellZoneID = GetProbeCellZoneID();
+    int cellNI = GetProbeCellNI();
+    int cellNJ = GetProbeCellNJ();
+    int cellNK = GetProbeCellNK();
+    RDouble distance = GetProbeToCellDistance();
+
+    int nDim =static_cast<int>(coordinates.size());
+    PHWrite(cdata, nDim);
+
+    for (int iDim = 0; iDim < nDim; ++ iDim)
+    {
+        PHWrite(cdata,coordinates[iDim]);
+    }
+    PHWrite(cdata, probeID);
+    PHWrite(cdata, lineID);
+    PHWrite(cdata, surfaceID);
+    PHWrite(cdata, isValid);
+    PHWrite(cdata, cellType);
+    PHWrite(cdata, cellZoneID);
+    PHWrite(cdata, cellNI);
+    PHWrite(cdata, cellNJ);
+    PHWrite(cdata, cellNK);
+    PHWrite(cdata, distance);
+
+}
+
+void ProbeData::DecompressStructProbeCellInfo(DataContainer *cdata)
+{
+    RDouble distanceRecv;
+    int cellZoneIDRecv, cellTypeRecv, cellNIRecv, cellNJRecv, cellNKRecv;
+    vector <RDouble> coordinatesRecv;
+    int nDimRecv, probeIDRecv, lineIDRecv, surfaceIDRecv;
+    bool isValidRecv;
+
+    PHRead(cdata, nDimRecv);
+    coordinatesRecv.resize(nDimRecv);
+
+    for (int iDim = 0; iDim < nDimRecv; ++ iDim)
+    {
+        PHRead(cdata,coordinatesRecv[iDim]);
+    }
+
+    PHRead(cdata, probeIDRecv);
+    PHRead(cdata, lineIDRecv);
+    PHRead(cdata, surfaceIDRecv);
+    PHRead(cdata, isValidRecv);
+    PHRead(cdata, cellTypeRecv);
+    PHRead(cdata, cellZoneIDRecv);
+    PHRead(cdata, cellNIRecv);
+    PHRead(cdata, cellNJRecv);
+    PHRead(cdata, cellNKRecv);
+    PHRead(cdata, distanceRecv);
+
+    SetProbeCoordinates(coordinatesRecv);
+    SetProbeGlobalID(probeIDRecv);
+    SetProbeLineID(lineIDRecv);
+    SetProbeSurfaceID(surfaceIDRecv);
+    SetProbeValidity(isValidRecv);
+    SetProbeCellType(cellTypeRecv);
+    SetProbeCellZoneID(cellZoneIDRecv);
+    SetProbeCellNI(cellNIRecv);
+    SetProbeCellNJ(cellNJRecv);
+    SetProbeCellNK(cellNKRecv);
+    SetProbeToCellDistance(distanceRecv);
+}
+
+void ProbeData::DecompressUnstructProbeCellInfo(DataContainer *cdata)
+{
+    RDouble distanceRecv;
+    int cellZoneIDRecv, cellTypeRecv, cellIDRecv;
+    vector <RDouble> coordinatesRecv;
+    int nDimRecv, probeIDRecv, lineIDRecv, surfaceIDRecv;
+    bool isValidRecv;
+
+    PHRead(cdata, nDimRecv);
+    coordinatesRecv.resize(nDimRecv);
+    for (int iDim = 0; iDim < nDimRecv; ++ iDim)
+    {
+        PHRead(cdata,coordinatesRecv[iDim]);
+    }
+
+    PHRead(cdata, probeIDRecv);
+    PHRead(cdata, lineIDRecv);
+    PHRead(cdata, surfaceIDRecv);
+    PHRead(cdata, isValidRecv);
+    PHRead(cdata, cellTypeRecv);
+    PHRead(cdata, cellZoneIDRecv);
+    PHRead(cdata, cellIDRecv);
+    PHRead(cdata, distanceRecv);
+
+
+    SetProbeCoordinates(coordinatesRecv);
+    SetProbeGlobalID(probeIDRecv);
+    SetProbeLineID(lineIDRecv);
+    SetProbeSurfaceID(surfaceIDRecv);
+    SetProbeValidity(isValidRecv);
+    SetProbeCellType(cellTypeRecv);
+    SetProbeCellZoneID(cellZoneIDRecv);
+    SetProbeCellID(cellIDRecv);
+    SetProbeToCellDistance(distanceRecv);
+}
+
+SampleLocationInfo::SampleLocationInfo()
+{
+
+    numberToMonitor = 0;
+    numberOfTotalProbes    = 0;
+    numberOfProbes.resize(0);
+    surfaceProbes_ni.resize(0);
+    surfaceProbes_nj.resize(0);
+    typeOfTotalProbes.resize(0);
+    sampleLocationInfo.resize(0);
+    defineFileExist = false;
+}
+
+SampleLocationInfo::~SampleLocationInfo()
+{
+    for (vector<ProbeData *>::iterator iter = sampleLocationInfo.begin(); iter != sampleLocationInfo.end(); ++ iter)
+    {
+        if (NULL != *iter)
+        {
+            delete *iter;
+            *iter = NULL;
+        }
+    }
+    sampleLocationInfo.clear();
+}
+
+void SampleLocationInfo::Run()
+{
+    int dataMonitorType = GlobalDataBase::GetIntParaFromDB("dataMonitorType");
+
+    if (dataMonitorType == PROBESMONITOR)
+    {
+        string probesDefineFile = GlobalDataBase::GetStrParaFromDB("probesDefineFile");
+        SetDefineFileName(probesDefineFile);
+
+        CheckIfDefineFileExist();
+
+        if (IfDefineFileExist())
+        {
+            ReadProbesData();
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("Error: the file used to define probes location information does not exist !\n");
+            return;
+        }
+    }
+    else if (dataMonitorType == LINESMONITOR)
+    {
+        string linesDefineFile = GlobalDataBase::GetStrParaFromDB("linesDefineFile");
+        SetDefineFileName(linesDefineFile);
+
+        CheckIfDefineFileExist();
+
+        if (IfDefineFileExist())
+        {
+            int nLines = GlobalDataBase::GetIntParaFromDB("nLines");
+            SetNumberToMonitor(nLines);
+
+            ReadLinesData();
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("Error: the file used to define lines location information does not exist !\n");
+            return;
+        }
+    }
+    else if (dataMonitorType == SURFACESMONITOR)
+    {
+        string surfacesDefineFile = GlobalDataBase::GetStrParaFromDB("surfacesDefineFile");
+        SetDefineFileName(surfacesDefineFile);
+
+        CheckIfDefineFileExist();
+        if (IfDefineFileExist())
+        {
+            int nSurfaces = GlobalDataBase::GetIntParaFromDB("nSurfaces");
+            SetNumberToMonitor(nSurfaces);
+
+            ReadSurfacesData();
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("Error: the file used to define surfaces location information does not exist !\n");
+            return;
+        }
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("dataMonitorType", dataMonitorType);
+    }
+
+    UpdateAllProbesData();
+
+    UpdateProbesGlobalPara();
+
+    ServerCollectionProbesData();
+
+    int currentProcessorID = GetCurrentProcessorID();
+    if (currentProcessorID == server)
+    {
+        CheckInvalidProbesData();
+
+        string gridfile = GlobalDataBase::GetStrParaFromDB("gridfile");
+        string probesCellFileName = PHSPACE::AddSymbolToFileName(gridfile, '_', currentProcessorID);
+        WriteProbesCellInfo(probesCellFileName);
+    }
+
+    BroadcastProbesData();
+
+    SampleLocationInfoToGrid();
+}
+
+void SampleLocationInfo::SetNumberToMonitor(const int &numberToMonitor)
+{
+    this->numberToMonitor = numberToMonitor;
+}
+
+int SampleLocationInfo::GetNumberToMonitor()
+{
+    return this->numberToMonitor;
+}
+
+void SampleLocationInfo::SetDefineFileName(const string &defineFileName)
+{
+    this->defineFileName = defineFileName;
+}
+void SampleLocationInfo::SetTotalProbesNumber(const int &numberOfTotalProbes)
+{
+    this->numberOfTotalProbes = numberOfTotalProbes;
+}
+
+void SampleLocationInfo::SetProbesNumber(const vector <int> &numberOfProbes)
+{
+    this->numberOfProbes = numberOfProbes;
+}
+
+void SampleLocationInfo::SetSurfaceProbesNI(const vector <int> &surfaceProbes_ni)
+{
+    this->surfaceProbes_ni = surfaceProbes_ni;
+}
+
+void SampleLocationInfo::SetSurfaceProbesNJ(const vector <int> &surfaceProbes_nj)
+{
+    this->surfaceProbes_nj = surfaceProbes_nj;
+}
+
+void SampleLocationInfo::SetTotalProbesType(const vector <int> &typeOfTotalProbes)
+{
+    this->typeOfTotalProbes = typeOfTotalProbes;
+}
+
+string SampleLocationInfo::GetDefineFileName()
+{
+    return this->defineFileName;
+}
+
+int SampleLocationInfo::GetTotalProbesNumber()
+{
+    return this->numberOfTotalProbes;
+}
+
+vector <int> SampleLocationInfo::GetProbesNumber()
+{
+    return this->numberOfProbes;
+}
+
+vector <int> SampleLocationInfo::GetSurfaceProbesNI()
+{
+    return this->surfaceProbes_ni;
+}
+
+vector <int> SampleLocationInfo::GetSurfaceProbesNJ()
+{
+    return this->surfaceProbes_nj;
+}
+
+vector <int> SampleLocationInfo::GetTotalProbesType()
+{
+    return this->typeOfTotalProbes;
+}
+
+vector <ProbeData*> SampleLocationInfo::GetSampleLocationInfo()
+{
+    return this->sampleLocationInfo;
+}
+
+bool SampleLocationInfo::IfDefineFileExist()
+{
+    return defineFileExist;
+}
+
+void SampleLocationInfo::Nondimensional()
+{
+    RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+    for (int iProbe = 0; iProbe < numberOfTotalProbes; ++ iProbe)
+    {
+        vector <RDouble> coordinates = sampleLocationInfo[iProbe]->GetProbeCoordinates();
+
+        for (int iDim = 0; iDim < coordinates.size(); ++ iDim)
+        {
+            coordinates[iDim] *= gridScaleFactor;
+        }
+
+        sampleLocationInfo[iProbe]->SetProbeCoordinates(coordinates);
+    }
+}
+
+void SampleLocationInfo::CheckIfDefineFileExist()
+{
+    defineFileExist = false;
+
+    fstream file;
+    string keyFile = GetDefineFileName();
+    file.open(keyFile.c_str(), ios_base::in);
+
+    if (!file)
+    {
+        return;
+    }
+
+    defineFileExist = true;
+}
+
+void SampleLocationInfo::ReadProbesData()
+{
+    fstream file;
+    string keyFile = GetDefineFileName();
+    file.open(keyFile.c_str(), ios_base::in);
+
+    string line, word;
+    string separator  = " =\t\r\n#$,;\"'";
+    string sep1 = "\r\n";
+
+    while (!file.eof())
+    {
+        getline(file, line);
+
+        if (line == "") continue;
+        FindNextWord(line, word, sep1);
+        if (word.substr(0, 1) == "#" || word.substr(0, 2) == "//") continue;
+        line = FindNextWord(line, word, separator);
+
+        int nProbesIn;
+        from_string <int> (nProbesIn, word, std::dec);
+        numberOfTotalProbes = nProbesIn;
+        break;
+    }
+
+    const int nDim = 3;
+    vector<vector<RDouble> > coordinatesList;
+
+    while (!file.eof())
+    {
+        getline(file, line);
+
+        if (line == "") continue;
+        FindNextWord(line, word, sep1);
+        if (word.substr(0, 1) == "#" || word.substr(0, 2) == "//") continue;
+
+        vector <RDouble> coordinates;
+        for (int iDim = 0; iDim < nDim; ++ iDim)
+        {
+            line = FindNextWord(line, word, separator);
+            RDouble coordinatesIn;
+            from_string <RDouble> (coordinatesIn, word, std::dec);
+            coordinates.push_back(coordinatesIn);
+        }
+        coordinatesList.push_back(coordinates);
+    }
+
+    if (coordinatesList.size() == numberOfTotalProbes)
+    {
+        for (int iProbe = 0; iProbe < numberOfTotalProbes; ++ iProbe)
+        {
+            ProbeData *probe = new ProbeData();
+
+            probe->SetProbeCoordinates(coordinatesList[iProbe]);
+            probe->SetProbeGlobalID(iProbe);
+
+            sampleLocationInfo.push_back(probe);
+        }
+    }
+    else
+    {
+        ostringstream oss;
+        oss<<"Error: the total number of monitored probes does not match the number of coordinates !" <<endl;
+        TK_Exit::ExceptionExit(oss);
+    }
+
+    file.close();
+    file.clear();
+}
+
+void SampleLocationInfo::ReadLinesData()
+{
+    fstream file;
+    string keyFile = GetDefineFileName();
+    file.open(keyFile.c_str(), ios_base::in);
+
+    string line, word;
+    string separator  = " =\t\r\n#$,;\"'";
+
+    const int nDim = 3;
+
+    vector<vector<RDouble> > coordinatesList;
+    vector <int> probeIDList;
+    vector <int> lineIDList;
+    for (int iLine = 0; iLine < numberToMonitor; ++ iLine)
+    {
+        getline(file, line);
+
+        line = FindNextWord(line, word, separator);
+        int nProbesIn;
+        from_string <int> (nProbesIn, word, std::dec);
+        numberOfProbes.push_back(nProbesIn);
+
+        for (int iProbe = 0; iProbe < nProbesIn; ++ iProbe)
+        {
+            getline(file, line);
+
+            vector <RDouble> coordinates;
+            for (int iDim = 0; iDim < nDim; ++ iDim)
+            {
+                line = FindNextWord(line, word, separator);
+                RDouble coordinatesIn;
+                from_string <RDouble> (coordinatesIn, word, std::dec);
+                coordinates.push_back(coordinatesIn);
+            }
+            coordinatesList.push_back(coordinates);
+            probeIDList.push_back(iProbe);
+            lineIDList.push_back(iLine);
+        }
+
+        numberOfTotalProbes += nProbesIn;
+    }
+
+    if (coordinatesList.size() == numberOfTotalProbes)
+    {
+        for (int iProbe = 0; iProbe < numberOfTotalProbes; ++ iProbe)
+        {
+            ProbeData *probe = new ProbeData();
+
+            probe->SetProbeCoordinates(coordinatesList[iProbe]);
+            probe->SetProbeGlobalID(probeIDList[iProbe]);
+            probe->SetProbeLineID(lineIDList[iProbe]);
+
+            sampleLocationInfo.push_back(probe);
+        }
+    }
+    else
+    {
+        ostringstream oss;
+        oss<<"Error: the total number of monitored probes does not match the number of coordinates !" <<endl;
+        TK_Exit::ExceptionExit(oss);
+    }
+
+    file.close();
+    file.clear();
+}
+
+void SampleLocationInfo::ReadSurfacesData()
+{
+    fstream file;
+    string keyFile = GetDefineFileName();
+    file.open(keyFile.c_str(), ios_base::in);
+
+    string line, word;
+    string separator  = " =\t\r\n#$,;\"'";
+    string sep1 = "\r\n";
+
+    const int nDim = 3;
+
+    vector<vector<RDouble> > coordinatesList;
+    vector <int> probeIDList;
+    vector <int> surfaceIDList;
+
+    for (int iSurf = 0; iSurf < numberToMonitor; ++ iSurf)
+    {
+        getline(file, line);
+        line = FindNextWord(line, word, separator);
+        int nProbesIn_i;
+        from_string <int> (nProbesIn_i, word, std::dec);
+        surfaceProbes_ni.push_back(nProbesIn_i);
+
+        int nProbesIn_j;
+        line = FindNextWord(line, word, separator);
+        from_string <int> (nProbesIn_j, word, std::dec);
+        surfaceProbes_nj.push_back(nProbesIn_j);
+
+        int nProbesIn = nProbesIn_i * nProbesIn_j;
+        numberOfProbes.push_back(nProbesIn);
+
+        for (int iProbe = 0; iProbe < nProbesIn; ++ iProbe)
+        {
+            getline(file, line);
+            vector <RDouble> coordinates;
+            for (int iDim = 0; iDim < nDim; ++ iDim)
+            {
+                line = FindNextWord(line, word, separator);
+                RDouble coordinatesIn;
+                from_string <RDouble> (coordinatesIn, word, std::dec);
+                coordinates.push_back(coordinatesIn);
+            }
+            coordinatesList.push_back(coordinates);
+            probeIDList.push_back(iProbe);
+            surfaceIDList.push_back(iSurf);
+        }
+
+        numberOfTotalProbes += nProbesIn;
+    }
+
+    if (coordinatesList.size() == numberOfTotalProbes)
+    {
+        for (int iProbe = 0; iProbe < numberOfTotalProbes; ++ iProbe)
+        {
+            ProbeData *probe = new ProbeData();
+
+            probe->SetProbeCoordinates(coordinatesList[iProbe]);
+            probe->SetProbeGlobalID(probeIDList[iProbe]);
+            probe->SetProbeSurfaceID(surfaceIDList[iProbe]);
+
+            sampleLocationInfo.push_back(probe);
+        }
+    }
+    else
+    {
+        ostringstream oss;
+        oss<<"Error: the total number of monitored probes does not match the number of coordinates !" <<endl;
+        TK_Exit::ExceptionExit(oss);
+    }
+
+    file.close();
+    file.clear();
+}
+
+void SampleLocationInfo::UpdateAllProbesData()
+{
+    int searchCellsMethod = GlobalDataBase::GetIntParaFromDB("searchCellsMethod");
+
+    if (searchCellsMethod == NEARESTCELLDATA)
+    {
+        UpdateNearestCellsData();
+    }
+    else if (searchCellsMethod == REALCELLDATA)
+    {
+        UpdateRealCellsData();
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("searchCellsMethod", searchCellsMethod);
+    }
+
+}
+
+void SampleLocationInfo::UpdateNearestCellsData()
+{
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iProbe = 0; iProbe < numberOfTotalProbes; ++ iProbe)
+    {
+        vector <RDouble> coordinates = sampleLocationInfo[iProbe]->GetProbeCoordinates();
+        for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+        {
+            int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+            Grid *grid = GetGrid(zoneID, 0);
+
+            RDouble *pmin = grid->GetMinBox();
+            RDouble *pmax = grid->GetMaxBox();
+
+            bool ProbeInMinMaxBox = CheckIfProbeInMinMaxBox(coordinates[0],coordinates[1],coordinates[2],pmin,pmax);
+            if (!ProbeInMinMaxBox) continue;
+            sampleLocationInfo[iProbe]->SearchNearestCell(grid);
+        }
+    }
+}
+
+void SampleLocationInfo::UpdateRealCellsData()
+{
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+
+    for (int iProbe = 0; iProbe < numberOfTotalProbes; ++ iProbe)
+    {
+        bool flag = false;
+        vector <RDouble> coordinates = sampleLocationInfo[iProbe]->GetProbeCoordinates();
+
+        for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+        {
+            int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+            Grid *grid = GetGrid(zoneID, 0);
+
+            RDouble *pmin = grid->GetMinBox();
+            RDouble *pmax = grid->GetMaxBox();
+
+            bool ProbeInMinMaxBox = CheckIfProbeInMinMaxBox(coordinates[0],coordinates[1],coordinates[2],pmin,pmax);
+            if (!ProbeInMinMaxBox) continue;
+            sampleLocationInfo[iProbe]->SearchRealCell(grid, flag);
+            if (flag) break;
+        }
+    }
+}
+
+void SampleLocationInfo::UpdateProbesGlobalPara()
+{
+    int dataMonitorType = GlobalDataBase::GetIntParaFromDB("dataMonitorType");
+    int nTotalProbes = GetTotalProbesNumber();
+    vector <int> np = GetProbesNumber();
+    GlobalDataBase::UpdateData("nTotalProbes", &nTotalProbes, PHINT, 1);
+
+    if (dataMonitorType == LINESMONITOR)
+    {
+        int nLines = GetNumberToMonitor();
+        GlobalDataBase::UpdateData("nLines", &nLines, PHINT, 1);
+
+        int *nProbesOfLine = new int [nLines];
+        for (int iLine = 0; iLine < nLines; ++ iLine)
+        {
+            nProbesOfLine[iLine] = np[iLine];
+        }
+        GlobalDataBase::UpdateDataPtr("nProbesOfLine", nProbesOfLine);
+    }
+
+    if (dataMonitorType == SURFACESMONITOR)
+    {
+        int nSurface = GetNumberToMonitor();
+        GlobalDataBase::UpdateData("nSurface", &nSurface, PHINT, 1);
+
+        int *nProbesOfSurface = new int [nSurface];
+
+        for (int iSurf = 0; iSurf < nSurface; ++ iSurf)
+        {
+            nProbesOfSurface[iSurf] = np[iSurf];
+        }
+
+        GlobalDataBase::UpdateDataPtr("nProbesOfSurface", nProbesOfSurface);
+    }
+
+
+}
+
+void SampleLocationInfo::ServerCollectionProbesData()
+{
+    int searchCellsMethod = GlobalDataBase::GetIntParaFromDB("searchCellsMethod");
+    int serverTmp = GetServerProcessorID();
+    int myid   = GetCurrentProcessorID();
+    int numberOfProcessor = GetNumberOfProcessor();
+    DataContainer *cdata = new DataContainer();
+    int nTotalProbes = GetTotalProbesNumber();
+
+    cdata->moveto_begin();
+    RDouble distance;
+    int cellZoneID, cellType, cellID, cellNI, cellNJ, cellNK;
+    vector <RDouble> coordinates;
+    int nDim, probeID, lineID, surfaceID;
+    bool isValid;
+
+    for (int iProbe = 0; iProbe < nTotalProbes; ++ iProbe)
+    {
+        coordinates = sampleLocationInfo[iProbe]->GetProbeCoordinates();
+        probeID = sampleLocationInfo[iProbe]->GetProbeGlobalID();
+        lineID = sampleLocationInfo[iProbe]->GetProbeLineID();
+        surfaceID = sampleLocationInfo[iProbe]->GetProbeSurfaceID();
+        isValid = sampleLocationInfo[iProbe]->GetProbeValidity();
+        cellType = sampleLocationInfo[iProbe]->GetProbeCellType();
+        cellZoneID = sampleLocationInfo[iProbe]->GetProbeCellZoneID();
+        cellID = sampleLocationInfo[iProbe]->GetProbeCellID();
+        cellNI = sampleLocationInfo[iProbe]->GetProbeCellNI();
+        cellNJ = sampleLocationInfo[iProbe]->GetProbeCellNJ();
+        cellNK = sampleLocationInfo[iProbe]->GetProbeCellNK();
+        distance = sampleLocationInfo[iProbe]->GetProbeToCellDistance();
+
+        nDim =static_cast<int>(coordinates.size());
+
+        PHWrite(cdata, myid);
+        PHWrite(cdata, nDim);
+        for (int iDim = 0; iDim < nDim; ++ iDim)
+        {
+            PHWrite(cdata,coordinates[iDim]);
+        }
+        PHWrite(cdata, probeID);
+        PHWrite(cdata, lineID);
+        PHWrite(cdata, surfaceID);
+        PHWrite(cdata, isValid);
+        PHWrite(cdata, cellType);
+        PHWrite(cdata, cellZoneID);
+        PHWrite(cdata, cellID);
+        PHWrite(cdata, cellNI);
+        PHWrite(cdata, cellNJ);
+        PHWrite(cdata, cellNK);
+        PHWrite(cdata, distance);
+    }
+
+    if (myid != serverTmp)
+    {
+        int tag = myid;
+        send(cdata, serverTmp, tag);
+        delete cdata;
+    }
+    else
+    {
+        for (int iProc = 0; iProc < numberOfProcessor; ++ iProc)
+        {
+            int tag = iProc;
+
+            if (serverTmp != iProc)
+            {
+                if (cdata != NULL)
+                {
+                    delete cdata;
+                }
+                cdata = new DataContainer();
+                receive(cdata, iProc, tag);
+            }
+            else
+            {
+                continue;
+            }
+            int nTotalProbesOfProcessor = GetTotalProbesNumber();
+            cdata->moveto_begin();
+
+            int processorOfminDisResRecv = 0;
+            RDouble distanceRecv;
+            int cellZoneIDRecv, cellTypeRecv, cellIDRecv, cellNIRecv, cellNJRecv, cellNKRecv;
+            vector <RDouble> coordinatesRecv;
+            int nDimRecv,probeIDRecv, lineIDRecv, surfaceIDRecv;
+            bool isValidRecv;
+            for (int iProbe = 0; iProbe < nTotalProbesOfProcessor; ++ iProbe)
+            {
+                PHRead(cdata, processorOfminDisResRecv);
+                PHRead(cdata, nDimRecv);
+                coordinatesRecv.resize(nDimRecv);
+                for (int iDim = 0; iDim < nDimRecv; ++ iDim)
+                {
+                    PHRead(cdata,coordinatesRecv[iDim]);
+                }
+                PHRead(cdata, probeIDRecv);
+                PHRead(cdata, lineIDRecv);
+                PHRead(cdata, surfaceIDRecv);
+                PHRead(cdata, isValidRecv);
+                PHRead(cdata, cellTypeRecv);
+                PHRead(cdata, cellZoneIDRecv);
+                PHRead(cdata, cellIDRecv);
+                PHRead(cdata, cellNIRecv);
+                PHRead(cdata, cellNJRecv);
+                PHRead(cdata, cellNKRecv);
+                PHRead(cdata, distanceRecv);
+
+                double distanceTemp = sampleLocationInfo[iProbe]->GetProbeToCellDistance();
+                int cellZoneIDTemp = sampleLocationInfo[iProbe]->GetProbeCellZoneID();
+
+                if (searchCellsMethod == 0)
+                {
+                    if (distanceRecv < distanceTemp)
+                    {
+                        sampleLocationInfo[iProbe]->SetProbeCoordinates(coordinatesRecv);
+                        sampleLocationInfo[iProbe]->SetProbeGlobalID(probeIDRecv);
+                        sampleLocationInfo[iProbe]->SetProbeLineID(lineIDRecv);
+                        sampleLocationInfo[iProbe]->SetProbeSurfaceID(surfaceIDRecv);
+                        sampleLocationInfo[iProbe]->SetProbeValidity(isValidRecv);
+                        sampleLocationInfo[iProbe]->SetProbeCellType(cellTypeRecv);
+                        sampleLocationInfo[iProbe]->SetProbeCellZoneID(cellZoneIDRecv);
+                        sampleLocationInfo[iProbe]->SetProbeCellID(cellIDRecv);
+                        sampleLocationInfo[iProbe]->SetProbeCellNI(cellNIRecv);
+                        sampleLocationInfo[iProbe]->SetProbeCellNJ(cellNJRecv);
+                        sampleLocationInfo[iProbe]->SetProbeCellNK(cellNKRecv);
+                        sampleLocationInfo[iProbe]->SetProbeToCellDistance(distanceRecv);
+                    }
+                }
+                else
+                {
+                    if (cellZoneIDTemp < 0)
+                    {
+                        if (cellZoneIDRecv > 0)
+                        {
+                            sampleLocationInfo[iProbe]->SetProbeCoordinates(coordinatesRecv);
+                            sampleLocationInfo[iProbe]->SetProbeGlobalID(probeIDRecv);
+                            sampleLocationInfo[iProbe]->SetProbeLineID(lineIDRecv);
+                            sampleLocationInfo[iProbe]->SetProbeSurfaceID(surfaceIDRecv);
+                            sampleLocationInfo[iProbe]->SetProbeValidity(isValidRecv);
+                            sampleLocationInfo[iProbe]->SetProbeCellType(cellTypeRecv);
+                            sampleLocationInfo[iProbe]->SetProbeCellZoneID(cellZoneIDRecv);
+                            sampleLocationInfo[iProbe]->SetProbeCellID(cellIDRecv);
+                            sampleLocationInfo[iProbe]->SetProbeCellNI(cellNIRecv);
+                            sampleLocationInfo[iProbe]->SetProbeCellNJ(cellNJRecv);
+                            sampleLocationInfo[iProbe]->SetProbeCellNK(cellNKRecv);
+                            sampleLocationInfo[iProbe]->SetProbeToCellDistance(distanceRecv);
+                        }
+                    }
+                    else
+                    {
+                        if (cellZoneIDRecv > 0 && cellZoneIDRecv < cellZoneIDTemp)
+                        {
+                            sampleLocationInfo[iProbe]->SetProbeCoordinates(coordinatesRecv);
+                            sampleLocationInfo[iProbe]->SetProbeGlobalID(probeIDRecv);
+                            sampleLocationInfo[iProbe]->SetProbeLineID(lineIDRecv);
+                            sampleLocationInfo[iProbe]->SetProbeSurfaceID(surfaceIDRecv);
+                            sampleLocationInfo[iProbe]->SetProbeValidity(isValidRecv);
+                            sampleLocationInfo[iProbe]->SetProbeCellType(cellTypeRecv);
+                            sampleLocationInfo[iProbe]->SetProbeCellZoneID(cellZoneIDRecv);
+                            sampleLocationInfo[iProbe]->SetProbeCellID(cellIDRecv);
+                            sampleLocationInfo[iProbe]->SetProbeCellNI(cellNIRecv);
+                            sampleLocationInfo[iProbe]->SetProbeCellNJ(cellNJRecv);
+                            sampleLocationInfo[iProbe]->SetProbeCellNK(cellNKRecv);
+                            sampleLocationInfo[iProbe]->SetProbeToCellDistance(distanceRecv);
+                        }
+                    }
+                }
+            }
+        }
+        delete cdata;
+        cdata = NULL;
+    }
+}
+
+void SampleLocationInfo::CheckInvalidProbesData()
+{
+    int dataMonitorType = GlobalDataBase::GetIntParaFromDB("dataMonitorType");
+    int nTotalProbes = GetTotalProbesNumber();
+    vector<ProbeData *> probesLocationInfo = GetSampleLocationInfo();
+
+    int count = 0;
+    for (int iProbe = 0; iProbe < nTotalProbes; ++ iProbe)
+    {
+        vector <RDouble> coordinates = probesLocationInfo[iProbe]->GetProbeCoordinates();
+        int lineID = probesLocationInfo[iProbe]->GetProbeLineID();
+        int surfaceID = probesLocationInfo[iProbe]->GetProbeSurfaceID();
+        bool isValid = probesLocationInfo[iProbe]->GetProbeValidity();
+        if (!isValid)
+        {
+            std::ostringstream oss;
+            if (dataMonitorType == PROBESMONITOR)
+            {
+                oss << " Warning: the monitored probe " << "(x, y, z) = " << coordinates[0] << " " << coordinates[1] << " " << coordinates[2] << " " << " is not in the computational domain! "<< endl;
+            }
+            else if (dataMonitorType == LINESMONITOR)
+            {
+                oss << " Warning: the monitored probe " << "(x, y, z) = " << coordinates[0] << " " << coordinates[1] << " " << coordinates[2] << " " << " of line "<< lineID <<" is not in the computational domain! "<< endl;
+            }
+            else if (dataMonitorType == SURFACESMONITOR)
+            {
+                oss << " Warning: the monitored probe " << "(x, y, z) = " << coordinates[0] << " " << coordinates[1] << " " << coordinates[2] << " " << " of surface "<< surfaceID <<" is not in the computational domain! "<< endl;
+            }
+            else
+            {
+                TK_Exit::UnexpectedVarValue("dataMonitorType", dataMonitorType);
+            }
+
+            PrintToWindow(oss);
+            count ++;
+        }
+    }
+
+    if (count > 0)
+    {
+        std::ostringstream oss;
+        if (dataMonitorType == PROBESMONITOR)
+        {
+            oss << " Error: there are " << count << " invalid probes, please modify the probes define file!"<< endl;
+        }
+        else if (dataMonitorType == LINESMONITOR)
+        {
+            oss << " Error: there are " << count << " invalid probes, please modify the lines define file!"<< endl;
+        }
+        else if (dataMonitorType == SURFACESMONITOR)
+        {
+            oss << " Error: there are " << count << " invalid probes, please modify the surfaces define file!"<< endl;
+        }
+        else
+        {
+            TK_Exit::UnexpectedVarValue("dataMonitorType", dataMonitorType);
+        }
+
+        TK_Exit::ExceptionExit(oss);
+    }
+}
+
+void SampleLocationInfo::BroadcastProbesData()
+{
+
+    int serverTmp = GetServerProcessorID();
+    int myid   = GetCurrentProcessorID();
+
+    DataContainer *cdata = new DataContainer();
+
+    if (myid == serverTmp)
+    {
+        CompressProbesData(cdata);
+    }
+
+    PH_Bcast(cdata, serverTmp);
+
+    if (myid != serverTmp)
+    {
+        DecompressProbesData(cdata);
+    }
+
+    delete cdata;
+}
+
+void SampleLocationInfo::CompressProbesData(DataContainer *cdata)
+{
+    cdata->moveto_begin();
+
+    int nTotalProbes = GetTotalProbesNumber();
+    PHWrite(cdata, nTotalProbes);
+
+    for (int iProbe = 0; iProbe < nTotalProbes; ++ iProbe)
+    {
+        int gridType = sampleLocationInfo[iProbe]->GetProbeCellType();
+
+        typeOfTotalProbes.push_back(gridType);
+        PHWrite(cdata, typeOfTotalProbes[iProbe]);
+
+        if (gridType == PHSPACE::STRUCTGRID)
+        {
+            sampleLocationInfo[iProbe]->CompressStructProbeCellInfo(cdata);
+        }
+        else
+        {
+            sampleLocationInfo[iProbe]->CompressUnstructProbeCellInfo(cdata);
+        }
+    }
+}
+
+void SampleLocationInfo::DecompressProbesData(DataContainer *cdata)
+{
+    cdata->moveto_begin();
+    sampleLocationInfo.resize(0);
+
+    int nTotalProbesRecv;
+    PHRead(cdata, nTotalProbesRecv);
+
+    vector <int> probesTypeRecv;
+    probesTypeRecv.resize(nTotalProbesRecv);
+
+    for (int iProbe = 0; iProbe < nTotalProbesRecv; ++ iProbe)
+    {
+        ProbeData *sampleLocationOnProcessor = new ProbeData();
+
+        PHRead(cdata, probesTypeRecv[iProbe]);
+
+        int gridType = probesTypeRecv[iProbe];
+
+        if (gridType == PHSPACE::STRUCTGRID)
+        {
+            sampleLocationOnProcessor->DecompressStructProbeCellInfo(cdata);
+        }
+        else
+        {
+            sampleLocationOnProcessor->DecompressUnstructProbeCellInfo(cdata);
+        }
+
+        sampleLocationInfo.push_back(sampleLocationOnProcessor);
+    }
+
+}
+
+void SampleLocationInfo::SampleLocationInfoToGrid()
+{
+    int nLocalZones = GetNumberofLocalZones();
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+        Grid *grid = GetGrid(zoneID, 0);
+
+        int nTotalProbes= GetTotalProbesNumber();
+        vector<ProbeData *> probesSampleLocation = GetSampleLocationInfo();
+
+        if (grid->Type() == PHSPACE::UNSTRUCTGRID)
+        {
+            UnstructGrid * unstructGrid = UnstructGridCast(grid);
+
+            vector <int> probesCellID;
+            vector <int> probesGlobalID;
+            vector <int> probesLineID;
+            vector <int> probesSurfaceID;
+            vector <vector<RDouble> > probesCoordinates;
+            int count = 0;
+            for (int iProbe = 0; iProbe < nTotalProbes; ++ iProbe)
+            {
+                int cellZoneID = probesSampleLocation[iProbe]->GetProbeCellZoneID();
+                bool isValid = probesSampleLocation[iProbe]->GetProbeValidity();
+                if (cellZoneID != zoneID || !isValid) continue;
+                int cellID = probesSampleLocation[iProbe]->GetProbeCellID();
+                vector<RDouble> coordinates = probesSampleLocation[iProbe]->GetProbeCoordinates();
+                int probeID = probesSampleLocation[iProbe]->GetProbeGlobalID();
+                int lineID = probesSampleLocation[iProbe]->GetProbeLineID();
+                int surfaceID = probesSampleLocation[iProbe]->GetProbeSurfaceID();
+                probesCellID.push_back(cellID);
+                probesGlobalID.push_back(probeID);
+                probesLineID.push_back(lineID);
+                probesSurfaceID.push_back(surfaceID);
+                probesCoordinates.push_back(coordinates);
+                count++;
+            }
+
+            unstructGrid->SetZoneProbesNumber(count);
+            unstructGrid->SetZoneProbesCellID(probesCellID);
+            unstructGrid->SetZoneProbesCoordinates(probesCoordinates);
+            unstructGrid->SetZoneProbesGlobalID(probesGlobalID);
+            unstructGrid->SetZoneProbesLineID(probesLineID);
+            unstructGrid->SetZoneProbesSurfaceID(probesSurfaceID);
+
+            probesCellID.clear();
+            probesGlobalID.clear();
+            probesLineID.clear();
+            probesSurfaceID.clear();
+            probesCoordinates.clear();
+        }
+        else
+        {
+            StructGrid * structGrid = StructGridCast(grid);
+
+            vector <int> probesCellNI;
+            vector <int> probesCellNJ;
+            vector <int> probesCellNK;
+            vector <int> probesGlobalID;
+            vector <int> probesLineID;
+            vector <int> probesSurfaceID;
+            vector <vector<RDouble> > probesCoordinates;
+
+            int count = 0;
+            for (int iProbe = 0; iProbe < nTotalProbes; ++ iProbe)
+            {
+                int cellZoneID = probesSampleLocation[iProbe]->GetProbeCellZoneID();
+                bool isValid = probesSampleLocation[iProbe]->GetProbeValidity();
+                if (cellZoneID != zoneID || !isValid) continue;
+                int cellNI = probesSampleLocation[iProbe]->GetProbeCellNI();
+                int cellNJ = probesSampleLocation[iProbe]->GetProbeCellNJ();
+                int cellNK = probesSampleLocation[iProbe]->GetProbeCellNK();
+                vector<RDouble> coordinates = probesSampleLocation[iProbe]->GetProbeCoordinates();
+                int probeID = probesSampleLocation[iProbe]->GetProbeGlobalID();
+                int lineID = probesSampleLocation[iProbe]->GetProbeLineID();
+                int surfaceID = probesSampleLocation[iProbe]->GetProbeSurfaceID();
+
+                probesCellNI.push_back(cellNI);
+                probesCellNJ.push_back(cellNJ);
+                probesCellNK.push_back(cellNK);
+
+                probesGlobalID.push_back(probeID);
+                probesLineID.push_back(lineID);
+                probesSurfaceID.push_back(surfaceID);
+                probesCoordinates.push_back(coordinates); 
+                count++;
+            }
+            structGrid->SetZoneProbesNumber(count);
+            structGrid->SetZoneProbesCellNI(probesCellNI);
+            structGrid->SetZoneProbesCellNJ(probesCellNJ);
+            structGrid->SetZoneProbesCellNK(probesCellNK);
+            structGrid->SetZoneProbesCoordinates(probesCoordinates);
+            structGrid->SetZoneProbesGlobalID(probesGlobalID);
+            structGrid->SetZoneProbesLineID(probesLineID);
+            structGrid->SetZoneProbesSurfaceID(probesSurfaceID);
+
+            probesCellNI.clear();
+            probesCellNJ.clear();
+            probesCellNK.clear();
+            probesCoordinates.clear();
+            probesGlobalID.clear();
+            probesLineID.clear();
+            probesSurfaceID.clear();
+        }
+    }
+}
+
+void SampleLocationInfo::WriteProbesCellInfo(const string &filename)
+{
+    string nearestCellInfoFileName = ChangeExtensionOfFileName(filename, "p2c");
+    ios_base::openmode openmode = ios_base::out|ios_base::trunc;
+    fstream file;
+    ParallelOpenFile(file, nearestCellInfoFileName, openmode);
+
+    int nTotalProbes = GetTotalProbesNumber();
+
+    vector<ProbeData *> probesSampleLocation = GetSampleLocationInfo();
+
+    WriteProbesCellInfoHeader(file);
+
+    for (int iProbe = 0; iProbe < nTotalProbes; ++ iProbe)
+    {
+        int gridType = probesSampleLocation[iProbe]->GetProbeCellType();
+
+        if (gridType == PHSPACE::STRUCTGRID)
+        {
+            probesSampleLocation[iProbe]->WriteStructProbeCellInfo(file);
+        }
+        else
+        {
+            probesSampleLocation[iProbe]->WriteUnstructProbeCellInfo(file);
+        }
+
+    }
+
+    ParallelCloseFile(file);
+
+    PrintToWindow("Finally, ", nTotalProbes," probes will be successfully monitored!\n");
+}
+
+bool CheckIfProbeInMinMaxBox(RDouble coordX,RDouble coordY,RDouble coordZ,RDouble *pmin,RDouble *pmax)
+{
+    if (coordX < pmin[0] || coordX > pmax[0]) return false;
+    if (coordY < pmin[1] || coordY > pmax[1]) return false;
+    if (coordZ < pmin[2] || coordZ > pmax[2]) return false;
+    return true;
+}
+
+void WriteProbesCellInfoHeader(fstream &file)
+{
+    int dataMonitorType = GlobalDataBase::GetIntParaFromDB("dataMonitorType");
+
+    ostringstream oss;
+
+    if (IfFileEmpty(file))
+    {
+        oss << "Title=\"THE CELL INFORMATION OF PROBE\"" << endl;
+        oss << "Notice : ProbeCellID means (i, j, k) for structured grid." << endl;
+        oss << "Variables=" << endl;
+        oss << "ProbeID" << endl;
+        if (dataMonitorType == LINESMONITOR)
+        {
+            oss << "ProbeLineID" << endl;
+        }
+        if (dataMonitorType == SURFACESMONITOR)
+        {
+            oss << "ProbeSurfaceID" << endl;
+        }
+
+        oss << "ProbeToCellDistance" << endl;
+        oss << "ProbeCellID" << endl;
+        oss << "ZoneGridType" << endl;
+        oss << "ZoneID" << endl;
+
+    }
+
+    WriteASCIIFile(file, oss.str());
+
+}
+
+}
diff --git a/API/Geometry/src/Geo_SimpleBC.cpp b/API/Geometry/src/Geo_SimpleBC.cpp
new file mode 100644
index 0000000..6f24733
--- /dev/null
+++ b/API/Geometry/src/Geo_SimpleBC.cpp
@@ -0,0 +1,2724 @@
+#include "GridType.h"
+#include "Geo_Interface.h"
+#include "Geo_FaceTopo_Unstruct.h"
+#include "Geo_StructGrid.h"
+#include "Geo_MultiGridInfo_Struct.h"
+#include "Geo_UnstructGrid.h"
+#include "Geo_FaceMetrics_Unstruct.h"
+#include "Geo_CellMetrics_Unstruct.h"
+#include "Geo_DynamicGridMetrics_Unstruct.h"
+#include "Geo_LSQWeight_Unstruct.h"
+#include "PHIO.h"
+#include "IO_FileName.h"
+#include "Constants.h"
+#include "TK_Exit.h"
+#include "TK_Parse.h"
+#include "Glb_Dimension.h"
+#include "Geo_StructBC.h"
+#include "Geo_Interpoint.h"
+#include "Geo_NodeTopo_Struct.h"
+#include "Geo_FaceMetrics_Struct.h"
+#include "Geo_CellMetrics_Struct.h"
+#include "Geo_DynamicGridMetrics_Struct.h"
+#include "Geo_OversetGridTopo_Struct.h"
+#include "Geo_UnstructBC.h"
+#include "Constants.h"
+#include "Gas.h"
+using namespace std;
+
+namespace PHSPACE
+{
+vector<SimpleBC *> * GlobalBoundaryCondition::globalBCList = 0;
+map < int, int > *GlobalBoundaryCondition::bodyMap = 0;
+set < string > * GlobalBoundaryCondition::bodyList = 0;
+
+Data_Param * SimpleBC::GetBCParamDataBase()
+{
+    return bcParamDataBase;
+}
+
+Data_Field * SimpleBC::GetBCFieldDataBase()
+{
+    return bcFieldDataBase;
+}
+
+GlobalBoundaryCondition::GlobalBoundaryCondition() 
+{
+
+}
+
+GlobalBoundaryCondition::~GlobalBoundaryCondition()
+{
+    //! No used for static class.
+     vector<SimpleBC *>::iterator iter;
+     for (iter = globalBCList->begin(); iter != globalBCList->end(); ++ iter)
+     {
+         delete (*iter);
+     }
+     globalBCList->clear();
+}
+
+void GlobalBoundaryCondition::ReadGlobalBoundaryCondition()
+{
+    fstream file;
+    string bcFile = "./bin/boundary_condition.hypara";
+
+    if (!FileExist(bcFile))
+    {
+        //! To compatible the old version.
+        SetDefaultSolidBoundaryCondition();
+        return;
+    }
+
+    OpenFile(file, bcFile, ios::in);
+
+    ParseBCFromFile(file);
+
+    BuildBodyMap();
+
+    CloseFile(file);
+
+    ChangeBCTypeByGlobalBC();
+}
+
+void GlobalBoundaryCondition::SetDefaultSolidBoundaryCondition()
+{
+    if (globalBCList != 0) return;
+
+    globalBCList = new vector<SimpleBC *>;
+    set < pair<string, int> > bcNameSet;
+
+    map<int, string> bcnameMap;
+    bcnameMap.insert(pair<int, string>(0 , "NO_BOUNDARY_CONDITION"));
+    bcnameMap.insert(pair<int, string>(1 , "EXTRAPOLATION"));
+    bcnameMap.insert(pair<int, string>(2 , "SOLID_SURFACE"));
+    bcnameMap.insert(pair<int, string>(3 , "SYMMETRY"));
+    bcnameMap.insert(pair<int, string>(4 , "FARFIELD"));
+    bcnameMap.insert(pair<int, string>(5 , "INFLOW"));
+    bcnameMap.insert(pair<int, string>(6 , "OUTFLOW"));
+    bcnameMap.insert(pair<int, string>(7 , "POLE"));
+    bcnameMap.insert(pair<int, string>(8 , "GENERIC_1"));
+    bcnameMap.insert(pair<int, string>(9 , "GENERIC_2"));
+    bcnameMap.insert(pair<int, string>(10, "GENERIC_3"));
+    bcnameMap.insert(pair<int, string>(52, "PRESSURE_INLET"));
+    bcnameMap.insert(pair<int, string>(62, "PRESSURE_OUTLET"));
+    bcnameMap.insert(pair<int, string>(61, "OUTFLOW_CONFINED"));
+
+    using namespace PHMPI;
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    int myid = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int procID = PHMPI::GetZoneProcessorID(iZone);
+        if (myid == procID)
+        {
+            Grid *gridofThisProcessor = GetGrid(iZone, 0);
+
+            int gridtype = gridofThisProcessor->Type();
+            if (gridtype == PHSPACE::STRUCTGRID)
+            {
+                StructGrid *grid = StructGridCast(gridofThisProcessor);
+
+                StructBCSet *structBCSet = grid->GetStructBCSet();
+                int nBCRegion = structBCSet->GetnBCRegion();
+               
+                for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+                {
+                    
+                    StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+                    string bcName = bcregion->GetBCName();
+                    int bcType = bcregion->GetBCType();
+                    if (bcType == PHENGLEI::INTERFACE)
+                    {
+                        continue;
+                    }
+
+                    if (bcName.empty())
+                    {
+                        bcName = bcnameMap[bcType];
+                        bcregion->SetBCName(bcName);
+                    }
+
+                    pair<string,int> bcNamePair(bcName ,bcType);
+                    bcNameSet.insert(bcNamePair);
+                }
+            }
+            else
+            {
+                UnstructGrid *grid = UnstructGridCast(gridofThisProcessor);
+
+                UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+                if (!unstructBCSet) continue;
+                int nBCRegion = unstructBCSet->GetnBCRegion();
+           
+                for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+                {
+                    UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+                    string bcName = bcRegion->GetBCName();
+                    int bcType = bcRegion->GetBCType();
+                    if (bcType == PHENGLEI::INTERFACE)
+                    {
+                        continue;
+                    }
+
+                    if (bcName.empty())
+                    {
+                        bcName = bcnameMap[bcType];
+                        bcRegion->SetBCName(bcName);
+                    }
+
+                    pair<string,int> bcNamePair(bcName ,bcType);
+                    bcNameSet.insert(bcNamePair);
+                }
+
+            }
+        }
+    }
+
+    vector<DataContainer *> dataList;
+
+    int nProc  = PHMPI::GetNumberOfProcessor();
+    int serverTmp = PHMPI::GetServerProcessorID();
+    for (int iProc = 0; iProc < nProc; ++ iProc)
+    {
+        DataContainer *eachProc2Server = new DataContainer();
+
+        if (myid == iProc)
+        {
+            eachProc2Server->moveto_begin();
+
+            int bcNameSetSize = static_cast<int>(bcNameSet.size());
+            PHWrite(eachProc2Server, bcNameSetSize);
+
+            set < pair<string, int> >::iterator bcNameSetIter;
+            for (bcNameSetIter = bcNameSet.begin(); bcNameSetIter != bcNameSet.end(); ++ bcNameSetIter)
+            {
+                string bcName = (*bcNameSetIter).first;
+                int bcType = (*bcNameSetIter).second;
+
+                eachProc2Server->write_string(bcName);
+                PHWrite(eachProc2Server, bcType);
+            }
+        }
+
+        PH_Trade(eachProc2Server, iProc, serverTmp, iProc);
+
+        if (myid == serverTmp)
+        {
+            dataList.push_back(eachProc2Server);
+            eachProc2Server = new DataContainer();
+        }
+        delete eachProc2Server;
+    }
+
+    bcNameSet.clear();
+    for (int iData = 0; iData < dataList.size(); ++ iData)
+    {
+        DataContainer *iBcNameData = dataList[iData];
+        iBcNameData->moveto_begin();
+
+        int bcNameSetSize = 0;
+        PHRead(iBcNameData, bcNameSetSize);
+
+        for (int iBC = 0; iBC < bcNameSetSize; ++ iBC)
+        {
+            string bcName;
+            int bcType;
+
+            iBcNameData->read_string(bcName);
+            PHRead(iBcNameData, bcType);
+
+            pair<string,int> bcNamePair(bcName ,bcType);
+            bcNameSet.insert(bcNamePair);
+        }
+    }
+
+    for (int iData = 0; iData < dataList.size(); ++ iData)
+    {
+        delete dataList[iData];
+    }
+
+    DataContainer *server2EachProc = new DataContainer();
+    if (myid == serverTmp)
+    {
+        server2EachProc->moveto_begin();
+
+        int bcNameSetSize = static_cast<int>(bcNameSet.size());
+        PHWrite(server2EachProc, bcNameSetSize);
+
+        set < pair<string, int> >::iterator bcNameSetIter;
+        for (bcNameSetIter = bcNameSet.begin(); bcNameSetIter != bcNameSet.end(); ++ bcNameSetIter)
+        {
+            string bcName = (*bcNameSetIter).first;
+            int bcType = (*bcNameSetIter).second;
+
+            server2EachProc->write_string(bcName);
+            PHWrite(server2EachProc, bcType);
+        }
+
+        for (int iProc = 0; iProc < nProc; ++ iProc)
+        {
+            if (iProc == myid)
+            {
+                continue;
+            }
+            send(server2EachProc, iProc, iProc);
+        }
+    }
+    else
+    {
+        receive(server2EachProc, serverTmp, myid);
+        server2EachProc->moveto_begin();
+
+        int bcNameSetSize = 0;
+        PHRead(server2EachProc, bcNameSetSize);
+
+        for (int iBC= 0; iBC < bcNameSetSize; ++ iBC)
+        {
+            string bcName;
+            int bcType;
+
+            server2EachProc->read_string(bcName);
+            PHRead(server2EachProc, bcType);
+
+            pair<string,int> bcNamePair(bcName ,bcType);
+            bcNameSet.insert(bcNamePair);
+        }
+    }
+    delete server2EachProc;
+
+    set < pair<string, int> >::iterator bcNameSetIter;
+    for (bcNameSetIter = bcNameSet.begin(); bcNameSetIter != bcNameSet.end(); ++ bcNameSetIter)
+    {
+        string bcName = (*bcNameSetIter).first;
+        int bcType = (*bcNameSetIter).second;
+
+        SimpleBC *boundaryCondition = new SimpleBC();
+        boundaryCondition->SetBCName(bcName);
+        boundaryCondition->SetBCType(bcType);
+
+        Data_Param *bcParamDataBase = new Data_Param();
+        bcParamDataBase->UpdateData("bcType", &bcType, PHINT, 1);
+
+        if (bcType == PHENGLEI::SOLID_SURFACE)
+        {
+            string bodyName = "body";
+            if (!bcParamDataBase->CheckDataExist("bodyName"))
+            {
+                bcParamDataBase->UpdateData("bodyName", &bodyName, PHSTRING, 1);
+            }
+
+            int taskType = GetTaskCode();
+            if (taskType == SOLVE_FIELD || taskType == POST_PROCESSING)
+            {
+                //! For solid wall BC, set the default reference geometry scale.
+                RDouble partForceReferenceArea, partForceReferenceLength, partForceReferenceLength_B;
+                RDouble partForceReferenceX, partForceReferenceY, partForceReferenceZ;
+
+                //! This judgement is not enough, and needs to be improved. In fact, judgements of the five reference variables should all exist.
+
+                partForceReferenceArea = GlobalDataBase::GetDoubleParaFromDB("forceReferenceArea");
+                partForceReferenceLength = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLength");
+                partForceReferenceLength_B = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLengthSpanWise");
+                partForceReferenceX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+                partForceReferenceY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+                partForceReferenceZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+
+                bcParamDataBase->UpdateData("forceReferenceArea", &partForceReferenceArea, PHDOUBLE, 1);
+                bcParamDataBase->UpdateData("forceReferenceLength", &partForceReferenceLength, PHDOUBLE, 1);
+                bcParamDataBase->UpdateData("forceReferenceLengthSpanWise", &partForceReferenceLength_B, PHDOUBLE, 1);
+                bcParamDataBase->UpdateData("TorqueRefX", &partForceReferenceX, PHDOUBLE, 1);
+                bcParamDataBase->UpdateData("TorqueRefY", &partForceReferenceY, PHDOUBLE, 1);
+                bcParamDataBase->UpdateData("TorqueRefZ", &partForceReferenceZ, PHDOUBLE, 1);
+
+                int dumpHingeMoment = 0;
+                RDouble localCoordAxis0[3] = { 0, 0, 0 };
+                RDouble localCoordAxis1[3] = { 0, 0, 0 };
+
+                bcParamDataBase->UpdateData("dumpHingeMoment", &dumpHingeMoment, PHINT, 1);
+                bcParamDataBase->UpdateData("localCoordAxis0", localCoordAxis0, PHDOUBLE, 3);
+                bcParamDataBase->UpdateData("localCoordAxis1", localCoordAxis1, PHDOUBLE, 3);
+            }
+        }
+
+        boundaryCondition->SetBCParamDataBase(bcParamDataBase);
+        globalBCList->push_back(boundaryCondition);
+    }
+}
+
+void GlobalBoundaryCondition::BuildBodyMap()
+{
+    vector<SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+    if (globalBCList == 0)
+    {
+        return;
+    }
+
+    set < pair<int, string> > bodyNameSet;
+    if (bodyList)
+    {
+        delete bodyList;
+    }
+    bodyList = new set< string >;
+
+    if (bodyMap)
+    {
+        delete bodyMap;
+    }
+    bodyMap = new map < int, int >;
+
+    for (int iBC = 0; iBC < globalBCList->size(); ++ iBC)
+    {
+        SimpleBC *boundaryCondition = (*globalBCList)[iBC];
+        int bcType = boundaryCondition->GetBCType();
+
+        if (bcType != PHENGLEI::SOLID_SURFACE && bcType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        bool isSetBodyName = boundaryCondition->CheckParamData("bodyName");
+        string bodyName = "body";
+        if (isSetBodyName)
+        {
+            boundaryCondition->GetBCParamDataBase()->GetData("bodyName", &bodyName, PHSTRING, 1);
+        }
+        pair<int,string> bodyNamePair(iBC ,bodyName);
+        bodyNameSet.insert(bodyNamePair);
+        bodyList->insert(bodyName);
+    }
+
+    set < pair<int, string> >::iterator bodyNameSetIter;
+    for (bodyNameSetIter = bodyNameSet.begin(); bodyNameSetIter != bodyNameSet.end(); ++ bodyNameSetIter)
+    {
+        int iBC = (*bodyNameSetIter).first;
+        string bodyName = (*bodyNameSetIter).second;
+
+        set < string >::iterator bodyListIter;
+        int bodyIndex = 0;
+        for (bodyListIter = bodyList->begin(); bodyListIter != bodyList->end(); ++ bodyListIter)
+        {
+            string bodyNameInList = *bodyListIter;
+            if (bodyNameInList == bodyName)
+            {
+                bodyMap->insert(pair<int,int>(iBC, bodyIndex));
+                break;
+            }
+            bodyIndex ++;
+        }
+    }
+}
+
+void GlobalBoundaryCondition::InitMassFlowBoundary()
+{
+    vector<SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+    if (globalBCList == 0)
+    {
+        return;
+    }
+
+    for (int iBC = 0; iBC < globalBCList->size(); ++ iBC)
+    {
+        SimpleBC *boundaryCondition = (*globalBCList)[iBC];
+        int bcType = boundaryCondition->GetBCType();
+
+        if (bcType == PHENGLEI::MASS_FLOW_INLET || bcType == PHENGLEI::MASS_FLOW_OUTLET)
+        {
+            RDouble BCTotalArea = 0.0;
+            string bcName = boundaryCondition->GetBCName();
+
+            int nLocalZones = PHMPI::GetNumberofLocalZones();
+            for (int iZone = 0; iZone < nLocalZones; iZone++)
+            {
+                int iZoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+                Grid *iGrid = PHSPACE::GetGrid(iZoneID);
+
+                int gridType = iGrid->Type();
+                if (gridType == UNSTRUCTGRID)
+                {
+                    UnstructGrid *grid = UnstructGridCast(iGrid);
+
+                    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+                    int nBCRegion = unstructBCSet->GetnBCRegion();
+                    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+                    {
+                        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+                        string jBCName = bcRegion->GetBCName();
+
+                        if (jBCName == bcName)
+                        {
+                            int iFace;
+                            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                            RDouble     *area      = grid->GetFaceArea();
+                            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                            {
+                                iFace = *iter;
+                                BCTotalArea += area[iFace];
+                            }
+                        }
+                    }
+                }
+                else
+                {
+                    StructGrid *grid = StructGridCast(iGrid);
+
+                    StructBCSet *structBCSet = grid->GetStructBCSet();
+                    int nBCRegion = structBCSet->GetnBCRegion();
+                    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+                    {
+                        StructBC *jBCRegion = structBCSet->GetBCRegion(iBCRegion);
+                        string jBCName = jBCRegion->GetBCName();
+
+                        //! Judge the same BC region according the BC name.
+                        if (jBCName == bcName)
+                        {
+                            int ist, ied, jst, jed, kst, ked;
+                            int in, jn, kn;
+                            jBCRegion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+                            int iSurface = jBCRegion->GetFaceDirection() + 1;
+                            RDouble4D &area = *(grid->GetFaceArea());
+
+                            for (int k = kst; k <= ked; ++ k)
+                            {
+                                for (int j = jst; j <= jed; ++ j)
+                                {
+                                    for (int i = ist; i <= ied; ++ i)
+                                    {
+                                        jBCRegion->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+                                        BCTotalArea += area(in, jn, kn, iSurface);
+                                    }
+                                }
+                            }
+                        }
+                    }
+                }
+            }
+
+
+            RDouble GLB_BCTotalArea;
+            PH_AllReduce(&BCTotalArea, &GLB_BCTotalArea, 1, MPI_SUM);
+            BCTotalArea = GLB_BCTotalArea;
+
+            boundaryCondition->UpdateParamData("BCTotalArea", &BCTotalArea, PHDOUBLE, 1);
+        }
+    }
+}
+
+void GlobalBoundaryCondition::SetGlobalBCByGlobalDataBase()
+{
+    vector<SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+    if (globalBCList == 0) return;
+
+    int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    int ntmodel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+    int nEquation = 5;
+    if (nchem > 0)
+    {
+        nEquation = nl + nchem + ntmodel - 1;
+    }
+
+    for (int iBC = 0; iBC < globalBCList->size(); ++ iBC)
+    {
+        SimpleBC *boundaryCondition = (*globalBCList)[iBC];
+        int bcType = boundaryCondition->GetBCType();
+        Data_Param *bcParamDB = boundaryCondition->GetBCParamDataBase();
+
+        if (IsInterface(bcType))
+        {
+            continue;
+        }
+        else if (bcType == PHENGLEI::INFLOW || bcType == PHENGLEI::FARFIELD)
+        {
+            RDouble *prim_inf = new RDouble [nEquation];
+            if (bcParamDB->IsExist("inflowParaType", PHINT, 1))
+            {
+                int inflowParaType;
+                bcParamDB->GetData("inflowParaType", &inflowParaType, PHINT, 1);
+
+                if (inflowParaType == NONDIMENSIONCONDITION)
+                {
+                    SetBCInitialValuesByReynolds(bcParamDB, prim_inf);
+                }
+                else if (inflowParaType == FLIGHTCONDITION)
+                {
+                    SetBCInitialValuesByHeight(bcParamDB, prim_inf);
+                    boundaryCondition->UpdateParamData("primitiveVarFarfield", prim_inf, PHDOUBLE, nEquation);
+                }
+                else if (inflowParaType == EXPERIMENTCONDITION)
+                {
+                    SetBCInitialValuesByTotalPressure(bcParamDB, prim_inf);
+                }
+                else if (inflowParaType == TEMPERATURE_DENSITY)
+                {
+                    SetBCInitialValuesByDensity(bcParamDB, prim_inf);
+                }
+                else if (inflowParaType == TEMPERATURE_PRESSURE)
+                {
+                    SetBCInitialValuesByPressure(bcParamDB, prim_inf);
+                }
+                else if (inflowParaType == MACH_TEMP_PRE)
+                {
+                    SetBCInitialValuesByMachNumberTemperaturePressure(bcParamDB, prim_inf);
+                }
+                else if (inflowParaType == WEATHERCONDITION)
+                {
+                    SetBCInitialValuesByWRFData(bcParamDB, prim_inf);
+                }
+                else if (inflowParaType == PRIMITIVE_VARIABLES)
+                {
+                    SetBCInitialValuesByPrimitive(bcParamDB, prim_inf);
+                }
+                else if (inflowParaType == TRAJECTORY)
+                {
+                    RDouble *primitiveVarFarfield = reinterpret_cast <RDouble *> (GlobalDataBase::GetDataPtr("prim_inf"));
+                    for (int s = 0; s < nEquation; ++ s)
+                    {
+                        prim_inf[s] = primitiveVarFarfield[s];
+                    }
+                    SetSpeedDrictionForBC(bcParamDB, 1.0, prim_inf);
+                }
+                else
+                {
+                    TK_Exit::UnexpectedVarValue("inflowParaType", inflowParaType);
+                }
+                bcParamDB->UpdateData("primitiveVarFarfield", prim_inf, PHDOUBLE, nEquation);
+            }
+            else
+            {
+                RDouble *primitiveVarFarfield = reinterpret_cast <RDouble *> (GlobalDataBase::GetDataPtr("prim_inf"));
+                for (int s = 0; s < nEquation; ++ s)
+                {
+                    prim_inf[s] = primitiveVarFarfield[s];
+                }
+                SetSpeedDrictionForBC(bcParamDB, 1.0, prim_inf);
+                boundaryCondition->UpdateParamData("primitiveVarFarfield", prim_inf, PHDOUBLE, nEquation);
+
+            }
+            delete [] prim_inf;
+        }
+        else if (bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::ABLATION_SURFACE)
+        {
+            int viscousType;
+            RDouble wallTemperature;
+            RDouble catalyticCoef;
+
+            if (!bcParamDB->IsExist("catalyticCoef", PHDOUBLE, 1))
+            {
+                catalyticCoef = GlobalDataBase::GetDoubleParaFromDB("catalyticCoef");
+                bcParamDB->UpdateData("catalyticCoef", &catalyticCoef, PHDOUBLE, 1);
+            }
+
+            if (!bcParamDB->IsExist("viscousType", PHINT, 1))
+            {
+                GlobalDataBase::GetData("viscousType", &viscousType, PHINT, 1);
+                boundaryCondition->UpdateParamData("viscousType", &viscousType, PHINT, 1);
+            }
+
+            if (!bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+            {
+                GlobalDataBase::GetData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+                boundaryCondition->UpdateParamData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+            }
+            /*else
+            {
+                boundaryCondition->GetParamData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+                GlobalDataBase::UpdateData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+            }*/
+        }
+        else if (bcType == PHENGLEI::PRESSURE_INLET)
+        {
+            //RDouble *primitiveVarFarfield = reinterpret_cast <RDouble *> (GlobalDataBase::GetDataPtr("prim_inf"));
+            //bcParamDB->UpdateData("primitiveVarFarfield", primitiveVarFarfield, PHDOUBLE, nEquation);
+            //SetMaximumSpeciesForBC(bcParamDB);
+
+             RDouble *prim_inf = new RDouble [nEquation];
+             SetBCInitialValuesByTotalPressure(bcParamDB, prim_inf);
+             boundaryCondition->UpdateParamData("primitiveVarFarfield", prim_inf, PHDOUBLE, nEquation);
+             delete [] prim_inf;
+        }
+    }
+
+    //for (iter = globalBCList->begin(); iter != globalBCList->end(); ++ iter)
+    //{
+    //    SimpleBC *bc = *iter;
+    //    bcnameMap.insert(pair<string, int>(bc->GetBCName(), bc->GetBCType()));
+    //
+    //    Data_Param *bcParamDB = bc->GetBCParamDataBase();
+    //
+    //    if (bcParamDB->IsExist("refMachNumber", PHDOUBLE, 1))
+    //    {
+    //        RDouble refMachNumber;
+    //        bcParamDB->GetData("refMachNumber", &refMachNumber, PHDOUBLE, 1);
+    //        GlobalDataBase::UpdateData("refMachNumber", &refMachNumber, PHDOUBLE, 1);
+    //    }
+    //
+    //    if (bcParamDB->IsExist("attackd", PHDOUBLE, 1))
+    //    {
+    //        RDouble attackd;
+    //        bcParamDB->GetData("attackd", &attackd, PHDOUBLE, 1);
+    //        GlobalDataBase::UpdateData("attackd", &attackd, PHDOUBLE, 1);
+    //    }
+    //
+    //    if (bcParamDB->IsExist("angleSlide", PHDOUBLE, 1))
+    //    {
+    //        RDouble angleSlide;
+    //        bcParamDB->GetData("angleSlide", &angleSlide, PHDOUBLE, 1);
+    //        GlobalDataBase::UpdateData("angleSlide", &angleSlide, PHDOUBLE, 1);
+    //    }
+    //
+    //    if (bcParamDB->IsExist("refReNumber", PHDOUBLE, 1))
+    //    {
+    //        RDouble refReNumber;
+    //        bcParamDB->GetData("refReNumber", &refReNumber, PHDOUBLE, 1);
+    //        GlobalDataBase::UpdateData("refReNumber", &refReNumber, PHDOUBLE, 1);
+    //    }
+    //
+    //    if (bcParamDB->IsExist("refDimensionalTemperature", PHDOUBLE, 1))
+    //    {
+    //        RDouble refDimensionalTemperature;
+    //        bcParamDB->GetData("refDimensionalTemperature", &refDimensionalTemperature, PHDOUBLE, 1);
+    //        GlobalDataBase::UpdateData("refDimensionalTemperature", &refDimensionalTemperature, PHDOUBLE, 1);
+    //    }
+    //
+    //    if (bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+    //    {
+    //        RDouble wallTemperature;
+    //        bcParamDB->GetData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+    //        GlobalDataBase::UpdateData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+    //    }
+    //
+    //    if (bcParamDB->IsExist("height", PHDOUBLE, 1))
+    //    {
+    //        RDouble height;
+    //        bcParamDB->GetData("height", &height, PHDOUBLE, 1);
+    //        GlobalDataBase::UpdateData("height", &height, PHDOUBLE, 1);
+    //    }
+    //
+    //    if (bcParamDB->IsExist("inflowParaType", PHINT, 1))
+    //    {
+    //        RDouble inflowParaType;
+    //        bcParamDB->GetData("inflowParaType", &inflowParaType, PHINT, 1);
+    //        GlobalDataBase::UpdateData("inflowParaType", &inflowParaType, PHINT, 1);
+    //    }
+    //}
+}
+
+void GlobalBoundaryCondition::SetBCInitialValuesByReynolds(Data_Param *bcParamDB, RDouble *primitiveVar)
+{
+    using namespace GAS_SPACE;
+    RDouble localMachNumber = 0, localReNumber = 0, localDimensionalTemperature = 0, localVibrationTemperature = 0;
+    //! Obtain the local parameters on boundary.
+    if (bcParamDB->IsExist("refMachNumber", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refMachNumber", &localMachNumber, PHDOUBLE, 1);
+    }
+    else
+    {
+        localMachNumber = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+    }
+    if (bcParamDB->IsExist("refReNumber", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refReNumber", &localReNumber, PHDOUBLE, 1);
+    }
+    else
+    {
+        localReNumber = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+    }
+    if (bcParamDB->IsExist("refDimensionalTemperature", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refDimensionalTemperature", &localDimensionalTemperature, PHDOUBLE, 1);
+    }
+    else
+    {
+        localDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+    }
+
+    int nTvChange = GlobalDataBase::GetIntParaFromDB("nTvChange");
+    if(nTvChange == 0)
+    {
+        if (bcParamDB->IsExist("refDimensionalVibrationTemperature", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("refDimensionalVibrationTemperature", &localVibrationTemperature, PHDOUBLE, 1);
+        }
+        else
+        {
+            localVibrationTemperature = GlobalDataBase::GetDoubleParaFromDB("freestream_vibration_temperature");
+        }
+    }
+
+    //! Obtain the reference parameters.
+    RDouble refDimensionalDensity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+    RDouble refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+    RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+    RDouble localDimensionalDensity, localDimensionalVelocity, localDimensionalPressure;
+    RDouble nonDimTtr = localDimensionalTemperature / refDimensionalTemperature;
+    RDouble nonDimTv  = localVibrationTemperature / refDimensionalTemperature;
+
+    int nchem = gas->GetChemicalType();
+    RDouble refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+    if (bcParamDB->IsExist("refGama", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refGama", &refGama, PHDOUBLE, 1);
+    }
+
+    if (nchem == 0)
+    {
+        RDouble t0i  = 288.15;
+        RDouble tsi  = 110.4;
+        RDouble mu0i = 1.7894E-05;
+
+        RDouble local_viscosity_dimensional = (t0i + tsi) / (localDimensionalTemperature + tsi) * pow(localDimensionalTemperature / t0i, 1.5) * mu0i;        
+        RDouble reference_general_gas_constant = GlobalDataBase::GetDoubleParaFromDB("reference_average_general_gas_constant");
+
+        RDouble localDimensionalSonicSpeed = sqrt(refGama * reference_general_gas_constant * localDimensionalTemperature);
+        localDimensionalVelocity = localDimensionalSonicSpeed * localMachNumber;
+
+        localDimensionalDensity = localReNumber * local_viscosity_dimensional / localDimensionalVelocity;
+        localDimensionalPressure = localDimensionalDensity * reference_general_gas_constant * localDimensionalTemperature;
+    }
+    else
+    {
+        int nNSEqn = gas->GetNSEquationNumber();
+        int numberOfSpecies = gas->GetNumberOfSpecies();
+        RDouble initMassFraction[MAX_SPECIES_NUM] = {0}, speciesCv[MAX_SPECIES_NUM] = {0}, primVars[MAX_SPECIES_NUM] = {0}, speciesViscosity[MAX_SPECIES_NUM] = {0};
+        RDouble speciesWeight[MAX_SPECIES_NUM] = {0}, moleFractions[MAX_SPECIES_NUM] = {0};
+        if (bcParamDB->IsExist("initMassFraction", PHDOUBLE, numberOfSpecies))
+        {
+            bcParamDB->GetData("initMassFraction", &initMassFraction, PHDOUBLE, numberOfSpecies);
+            gas->MassFractionConversion(initMassFraction);
+            gas->SetMaximumSpecies(initMassFraction);
+        }
+        else
+        {
+            RDouble *mass_fraction_reference = gas->GetInitMassFraction();
+            for (int s = 0; s < numberOfSpecies; ++ s)
+            {
+                initMassFraction[s] = mass_fraction_reference[s];
+            }
+        }
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primVars[nNSEqn + s] = initMassFraction[s];
+        }
+
+        RDouble oMass = 0.0, gasR = 0.0;
+        gas->ComputeMolecularWeightReciprocalDimensional(primVars, oMass);
+        gas->ComputeMoleFractionByMassFraction(initMassFraction, moleFractions);
+        gasR = rjmk * oMass;
+
+        RDouble cp = 0.0, cv = 0.0;
+        int ntmodel = gas->GetTemperatureModel();
+        if (ntmodel > 1)    //! multi-temperature model.
+        {
+            gas->ComputeDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(speciesCv);
+            gas->ComputeMixtureByMassFraction(initMassFraction, speciesCv, cv);
+            cp = cv + gasR;
+            refGama = cp / cv;
+            gas->ComputeSpeciesDimensionalViscosityWithCurveFitMethod(nonDimTtr, nonDimTv, speciesViscosity);
+
+            RDouble vibrationEnergy = gas->GetMixedGasDimensionalVibrationEnergy(nonDimTv, initMassFraction);
+            RDouble electronEnergy  = gas->GetMixedGasDimensionalElectronEnergy(nonDimTv, initMassFraction);
+            vibrationEnergy = vibrationEnergy / (refDimensionalVelocity * refDimensionalVelocity);
+            electronEnergy  = electronEnergy / (refDimensionalVelocity * refDimensionalVelocity);
+            if (ntmodel == 2)
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy + electronEnergy;
+            }
+            else
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy;
+                primitiveVar[nNSEqn + numberOfSpecies + 1] = electronEnergy;
+            }
+        }
+        else    //! one-temperature model.
+        {
+            gas->ComputeSpeciesConstantPressureSpecificHeatDimensional(nonDimTtr, speciesCv);
+            gas->ComputeMixtureByMassFraction(initMassFraction, speciesCv, cp);
+            cv = cp - gasR;
+            refGama = cp / cv;
+            gas->ComputeOneTemperatureModelSpeciesViscosityDimensional(nonDimTtr, speciesViscosity);
+        }
+
+        RDouble localDimensionalSonicSpeed = sqrt(refGama * gasR * localDimensionalTemperature);
+        localDimensionalVelocity = localDimensionalSonicSpeed * localMachNumber;
+
+        RDouble *MolecularWeight = gas->GetMolecularWeightDimensional();
+        gas->GetPartitionFunctionValues(speciesViscosity, MolecularWeight, moleFractions, speciesWeight);
+        RDouble local_viscosity_dimensional = gas->GetMixedGasViscosityWithWilkeFormula(moleFractions, speciesViscosity, speciesWeight);
+
+        localDimensionalDensity = localReNumber * local_viscosity_dimensional / localDimensionalVelocity;
+        localDimensionalPressure = localDimensionalDensity * gasR * localDimensionalTemperature;
+
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primitiveVar[nNSEqn + s] = initMassFraction[s];
+        }
+    }
+
+    using namespace IDX;
+
+    primitiveVar[IR] = localDimensionalDensity / refDimensionalDensity;
+
+    SetSpeedDrictionForBC(bcParamDB,localDimensionalVelocity / refDimensionalVelocity, primitiveVar);
+
+    primitiveVar[IP] = localDimensionalPressure / (refDimensionalDensity * refDimensionalVelocity * refDimensionalVelocity);
+
+    bcParamDB->UpdateData("refGama", &refGama, PHDOUBLE, 1);
+
+}
+
+void GlobalBoundaryCondition::SetBCInitialValuesByHeight(Data_Param *bcParamDB, RDouble *primitiveVar)
+{
+    using namespace GAS_SPACE;
+    RDouble localMachNumber = 0, height = 0, localDimensionalTemperature = 0, localVibrationTemperature = 0;
+    //! Obtain the local parameters on boundary.
+    if (bcParamDB->IsExist("refMachNumber", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refMachNumber", &localMachNumber, PHDOUBLE, 1);
+    }
+    else
+    {
+        localMachNumber = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+    }
+    if (bcParamDB->IsExist("height", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("height", &height, PHDOUBLE, 1);
+    }
+    else
+    {
+        height = GlobalDataBase::GetDoubleParaFromDB("height");
+    }
+    RDouble localDimensionalDensity, localDimensionalVelocity, localDimensionalPressure = 1.0, localDimensionalSonicSpeed;
+    int nGasModel = GlobalDataBase::GetIntParaFromDB("nGasModel");
+   
+    gas->GetAirInfo(height, localDimensionalTemperature, localDimensionalPressure, localDimensionalDensity, localDimensionalSonicSpeed);
+   
+    int nTvChange = GlobalDataBase::GetIntParaFromDB("nTvChange");
+    if(nTvChange == 0)
+    {
+        if (bcParamDB->IsExist("refDimensionalVibrationTemperature", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("refDimensionalVibrationTemperature", &localVibrationTemperature, PHDOUBLE, 1);
+        }
+        else
+        {
+            localVibrationTemperature = localDimensionalTemperature;
+        }
+    }
+
+    //! Obtain the reference parameters.
+    RDouble refDimensionalDensity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+    RDouble refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+    RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+    RDouble nonDimTtr = localDimensionalTemperature / refDimensionalTemperature;
+    RDouble nonDimTv  = localVibrationTemperature / refDimensionalTemperature;
+
+    int nchem = gas->GetChemicalType();
+    RDouble refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+    if (bcParamDB->IsExist("refGama", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refGama", &refGama, PHDOUBLE, 1);
+    }
+
+    if (nchem == 0)
+    {
+        RDouble reference_general_gas_constant = GlobalDataBase::GetDoubleParaFromDB("reference_average_general_gas_constant");
+
+        //! unit: m/s.
+        localDimensionalSonicSpeed = sqrt(refGama * reference_general_gas_constant * localDimensionalTemperature);
+        localDimensionalVelocity = localDimensionalSonicSpeed * localMachNumber;
+        localDimensionalDensity = localDimensionalPressure / reference_general_gas_constant / localDimensionalTemperature;
+    }
+    else
+    {
+        int nNSEqn = gas->GetNSEquationNumber();
+        int numberOfSpecies = gas->GetNumberOfSpecies();
+        RDouble initMassFraction[MAX_SPECIES_NUM] = {0}, speciesCv[MAX_SPECIES_NUM] = {0}, primVars[MAX_SPECIES_NUM] = {0};
+        if (bcParamDB->IsExist("initMassFraction", PHDOUBLE, numberOfSpecies))
+        {
+            bcParamDB->GetData("initMassFraction", &initMassFraction, PHDOUBLE, numberOfSpecies);
+            gas->MassFractionConversion(initMassFraction);
+            gas->SetMaximumSpecies(initMassFraction);
+        }
+        else
+        {
+            RDouble *mass_fraction_reference = gas->GetInitMassFraction();
+            for (int s = 0; s < numberOfSpecies; ++ s)
+            {
+                initMassFraction[s] = mass_fraction_reference[s];
+            }
+        }
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primVars[nNSEqn + s] = initMassFraction[s];
+        }
+
+        RDouble oMass = 0.0, gasR = 0.0;
+        gas->ComputeMolecularWeightReciprocalDimensional(primVars, oMass);
+        gasR = rjmk * oMass;
+
+        RDouble cp = 0.0, cv = 0.0;
+        int ntmodel = gas->GetTemperatureModel();
+        if (ntmodel > 1)    //! multi-temperature model.
+        {
+            gas->ComputeDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(speciesCv);
+            gas->ComputeMixtureByMassFraction(initMassFraction, speciesCv, cv);
+            cp = cv + gasR;
+            refGama = cp / cv;
+
+            RDouble vibrationEnergy = gas->GetMixedGasDimensionalVibrationEnergy(nonDimTv, initMassFraction);
+            RDouble electronEnergy  = gas->GetMixedGasDimensionalElectronEnergy(nonDimTv, initMassFraction);
+            vibrationEnergy = vibrationEnergy / (refDimensionalVelocity * refDimensionalVelocity);
+            electronEnergy  = electronEnergy / (refDimensionalVelocity * refDimensionalVelocity);
+            if (ntmodel == 2)
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy + electronEnergy;
+            }
+            else
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy;
+                primitiveVar[nNSEqn + numberOfSpecies + 1] = electronEnergy;
+            }
+        }
+        else    //! one-temperature model.
+        {
+            gas->ComputeSpeciesConstantPressureSpecificHeatDimensional(nonDimTtr, speciesCv);
+            gas->ComputeMixtureByMassFraction(initMassFraction, speciesCv, cp);
+            cv = cp - gasR;
+            refGama = cp / cv;
+        }
+
+        localDimensionalSonicSpeed = sqrt(refGama * gasR * localDimensionalTemperature);
+        localDimensionalVelocity = localDimensionalSonicSpeed * localMachNumber;
+        localDimensionalDensity = localDimensionalPressure / (gasR * localDimensionalTemperature);
+
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primitiveVar[nNSEqn + s] = initMassFraction[s];
+        }
+    }
+
+    using namespace IDX;
+    primitiveVar[IR] = localDimensionalDensity / refDimensionalDensity;
+
+    SetSpeedDrictionForBC(bcParamDB,localDimensionalVelocity / refDimensionalVelocity, primitiveVar);
+
+    primitiveVar[IP] = localDimensionalPressure / (refDimensionalDensity * refDimensionalVelocity * refDimensionalVelocity);
+
+    bcParamDB->UpdateData("refGama", &refGama, PHDOUBLE, 1);
+}
+
+void GlobalBoundaryCondition::SetMaximumSpeciesForBC(Data_Param *bcParamDB)
+{
+    using namespace GAS_SPACE;
+    int nchem = gas->GetChemicalType();
+    if (nchem > 0)
+    {
+        int numberOfSpecies = gas->GetNumberOfSpecies();
+        RDouble initMassFraction[MAX_SPECIES_NUM] = {0};
+        if (bcParamDB->IsExist("initMassFraction", PHDOUBLE, numberOfSpecies))
+        {
+            bcParamDB->GetData("initMassFraction", &initMassFraction, PHDOUBLE, numberOfSpecies);
+            gas->SetMaximumSpecies(initMassFraction);
+        }
+    }
+}
+
+void GlobalBoundaryCondition::SetSpeedDrictionForBC(Data_Param *bcParamDB, RDouble localNonDimensionalVelocity, RDouble *primitiveVar)
+{
+    using namespace GAS_SPACE;
+    using namespace IDX;
+    using namespace INIFLOW_SPACE;
+  /*const int CUSTOM_ANGLE           = 0;
+    const int CUSTOM_VECTOR          = 1;
+  */
+    int directionMethod = CUSTOM_ANGLE;
+    if (bcParamDB->IsExist("directionMethod", PHINT, 1))
+    {
+        bcParamDB->GetData("directionMethod", &directionMethod, PHINT, 1);
+    }
+
+    RDouble direction_inlet[3] = {1.0,0.0,0.0};
+
+    if(directionMethod == CUSTOM_VECTOR )
+    {
+        if (bcParamDB->IsExist("direction_inlet", PHDOUBLE, 3))
+        {
+            bcParamDB->GetData("direction_inlet", &direction_inlet, PHDOUBLE, 3);
+
+            RDouble sum = sqrt( direction_inlet[0] * direction_inlet[0] + direction_inlet[1] * direction_inlet[1] + direction_inlet[2] * direction_inlet[2]);
+            if(sum < SMALL)
+            {
+                direction_inlet[0] = 1.0;
+                direction_inlet[1] = 0.0;
+                direction_inlet[2] = 0.0;
+            }
+            else
+            {
+                sum = 1.0 / sum;
+                direction_inlet[0] *= sum;
+                direction_inlet[1] *= sum;
+                direction_inlet[2] *= sum;
+            }
+        }
+        else
+        {
+            if(GlobalDataBase::GetIntParaFromDB("directionMethod") == CUSTOM_VECTOR)
+            {
+                GlobalDataBase::GetData("direction_inlet", &direction_inlet, PHDOUBLE, 3);
+            }
+            else
+            {
+                RDouble attack   =  PI / 180.0 * GlobalDataBase::GetDoubleParaFromDB("attackd");
+                RDouble sideslip =  PI / 180.0 * GlobalDataBase::GetDoubleParaFromDB("angleSlide");
+
+                direction_inlet[0] = cos(attack) * cos(sideslip);
+                direction_inlet[1] = sin(attack) * cos(sideslip);
+                direction_inlet[2] = sin(sideslip);
+            }
+        }
+    }
+    else    //! Attackd and angleSlide
+    {
+        RDouble attackd = 0.0, angleSlide = 0.0;
+        if (bcParamDB->IsExist("attackd", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("attackd", &attackd, PHDOUBLE, 1);
+            if (bcParamDB->IsExist("angleSlide", PHDOUBLE, 1))
+            {
+                bcParamDB->GetData("angleSlide", &angleSlide, PHDOUBLE, 1);
+            }
+
+            attackd    *= PI / 180.0;
+            angleSlide *= PI / 180.0;
+
+            direction_inlet[0] = cos(attackd) * cos(angleSlide);
+            direction_inlet[1] = sin(attackd) * cos(angleSlide);
+            direction_inlet[2] = sin(angleSlide);
+        }
+        else
+        {
+            if(GlobalDataBase::GetIntParaFromDB("directionMethod") == CUSTOM_VECTOR)
+            {
+                GlobalDataBase::GetData("direction_inlet", &direction_inlet, PHDOUBLE, 3);
+            }
+            else
+            {
+                RDouble attack   =  PI / 180.0 * GlobalDataBase::GetDoubleParaFromDB("attackd");
+                RDouble sideslip =  PI / 180.0 * GlobalDataBase::GetDoubleParaFromDB("angleSlide");
+
+                direction_inlet[0] = cos(attack) * cos(sideslip);
+                direction_inlet[1] = sin(attack) * cos(sideslip);
+                direction_inlet[2] = sin(sideslip);
+            }
+        }
+    }
+
+    bcParamDB->UpdateData("direction_inlet", &direction_inlet, PHDOUBLE, 3);
+    primitiveVar[IU] = localNonDimensionalVelocity * direction_inlet[0];
+    primitiveVar[IV] = localNonDimensionalVelocity * direction_inlet[1];
+    primitiveVar[IW] = localNonDimensionalVelocity * direction_inlet[2];
+}
+
+void GlobalBoundaryCondition::SetSpeedDrictionForReferenceVar(RDouble localNonDimensionalVelocity, RDouble *primitiveVar)
+{
+    using namespace GAS_SPACE;
+    using namespace IDX;
+    using namespace INIFLOW_SPACE;
+  /*const int CUSTOM_ANGLE           = 0;
+    const int CUSTOM_VECTOR          = 1;
+  */
+    int directionMethod = CUSTOM_ANGLE;
+    if (GlobalDataBase::IsExist("directionMethod", PHINT, 1))
+    {
+        GlobalDataBase::GetData("directionMethod", &directionMethod, PHINT, 1);
+    }
+    else
+    {
+        GlobalDataBase::UpdateData("directionMethod", &directionMethod, PHINT, 1);
+    }
+
+    RDouble attackd = 0.0, angleSlide = 0.0;
+    RDouble direction_inlet[3] = {1.0,0.0,0.0};
+
+    if(directionMethod == CUSTOM_VECTOR )  //! VECTOR
+    {
+        if (GlobalDataBase::IsExist("direction_inlet", PHDOUBLE, 3))
+        {
+            GlobalDataBase::GetData("direction_inlet", &direction_inlet, PHDOUBLE, 3);
+
+            RDouble sum = sqrt( direction_inlet[0] * direction_inlet[0] + direction_inlet[1] * direction_inlet[1] + direction_inlet[2] * direction_inlet[2]);
+            if(sum < SMALL)
+            {
+                direction_inlet[0] = 1.0;
+                direction_inlet[1] = 0.0;
+                direction_inlet[2] = 0.0;
+            }
+            else
+            {
+                sum = 1.0 / sum;
+                direction_inlet[0] *= sum;
+                direction_inlet[1] *= sum;
+                direction_inlet[2] *= sum;
+            }
+        }
+
+        RDouble sideslip = asin( min(one, direction_inlet[2]) );
+        RDouble attack   = asin( min(one, direction_inlet[1] / max(SMALL, cos(sideslip))) );
+
+        GlobalDataBase::UpdateData("attack", &attack, PHDOUBLE, 1);
+        GlobalDataBase::UpdateData("sideslip", &sideslip, PHDOUBLE, 1);
+
+        attackd = attack * 180.0 / PI;
+        angleSlide = sideslip * 180.0 / PI;
+
+        GlobalDataBase::UpdateData("attackd", &attackd, PHDOUBLE, 1);
+        GlobalDataBase::UpdateData("angleSlide", &angleSlide, PHDOUBLE, 1);
+    }
+    else  //! Attackd and angleSlide
+    {
+        if (GlobalDataBase::IsExist("attackd", PHDOUBLE, 1))
+        {
+            GlobalDataBase::GetData("attackd", &attackd, PHDOUBLE, 1);
+        }
+        else
+        {
+            GlobalDataBase::UpdateData("attackd", &attackd, PHDOUBLE, 1);
+        }
+
+        if (GlobalDataBase::IsExist("angleSlide", PHDOUBLE, 1))
+        {
+            GlobalDataBase::GetData("angleSlide", &angleSlide, PHDOUBLE, 1);
+        }
+        else
+        {
+            GlobalDataBase::UpdateData("angleSlide", &angleSlide, PHDOUBLE, 1);
+        }
+        RDouble attack   = attackd * PI / 180.0;
+        RDouble sideslip = angleSlide * PI / 180.0;
+
+        GlobalDataBase::UpdateData("attack", &attack, PHDOUBLE, 1);
+        GlobalDataBase::UpdateData("sideslip", &sideslip, PHDOUBLE, 1);
+
+        direction_inlet[0] = cos(attack) * cos(sideslip);
+        direction_inlet[1] = sin(attack) * cos(sideslip);
+        direction_inlet[2] = sin(sideslip);
+    }
+
+    GlobalDataBase::UpdateData("direction_inlet", &direction_inlet, PHDOUBLE, 3);
+
+    primitiveVar[IU] = localNonDimensionalVelocity * direction_inlet[0];
+    primitiveVar[IV] = localNonDimensionalVelocity * direction_inlet[1];
+    primitiveVar[IW] = localNonDimensionalVelocity * direction_inlet[2];
+}
+
+void GlobalBoundaryCondition::SetBCInitialValuesByDensity(Data_Param *bcParamDB, RDouble *primitiveVar)
+{
+    using namespace GAS_SPACE;
+    RDouble localDimensionalVelocity = 0, localDimensionalDensity = 0, localDimensionalPressure = 0;
+    RDouble localDimensionalTemperature = 0, localVibrationTemperature = 0;
+    //! Obtain the local parameters on boundary.
+    if (bcParamDB->IsExist("refDimensionalVelocity", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refDimensionalVelocity", &localDimensionalVelocity, PHDOUBLE, 1);
+    }
+    else
+    {
+        localDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+    }
+    if (bcParamDB->IsExist("refDimensionalDensity", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refDimensionalDensity", &localDimensionalDensity, PHDOUBLE, 1);
+    }
+    else
+    {
+        localDimensionalDensity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+    }
+    if (bcParamDB->IsExist("refDimensionalTemperature", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refDimensionalTemperature", &localDimensionalTemperature, PHDOUBLE, 1);
+    }
+    else
+    {
+        localDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+    }
+
+    int nTvChange = GlobalDataBase::GetIntParaFromDB("nTvChange");
+    if(nTvChange == 0)
+    {
+        if (bcParamDB->IsExist("refDimensionalVibrationTemperature", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("refDimensionalVibrationTemperature", &localVibrationTemperature, PHDOUBLE, 1);
+        }
+        else
+        {
+            localVibrationTemperature = GlobalDataBase::GetDoubleParaFromDB("freestream_vibration_temperature");
+        }
+    }
+
+    //! Obtain the reference parameters.
+    RDouble refDimensionalDensity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+    RDouble refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+    RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+
+    int nchem = gas->GetChemicalType();
+    RDouble refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+    if (bcParamDB->IsExist("refGama", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refGama", &refGama, PHDOUBLE, 1);
+    }
+
+    if (nchem == 0)
+    {
+        RDouble reference_general_gas_constant = GlobalDataBase::GetDoubleParaFromDB("reference_average_general_gas_constant");
+        localDimensionalPressure = localDimensionalDensity * reference_general_gas_constant * localDimensionalTemperature;
+    }
+    else
+    {
+        int nNSEqn = gas->GetNSEquationNumber();
+        int numberOfSpecies = gas->GetNumberOfSpecies();
+        RDouble initMassFraction[MAX_SPECIES_NUM] = {0}, primVars[MAX_SPECIES_NUM] = {0};
+        if (bcParamDB->IsExist("initMassFraction", PHDOUBLE, numberOfSpecies))
+        {
+            bcParamDB->GetData("initMassFraction", &initMassFraction, PHDOUBLE, numberOfSpecies);
+            gas->MassFractionConversion(initMassFraction);
+            gas->SetMaximumSpecies(initMassFraction);
+        }
+        else
+        {
+            RDouble *mass_fraction_reference = gas->GetInitMassFraction();
+            for (int s = 0; s < numberOfSpecies; ++ s)
+            {
+                initMassFraction[s] = mass_fraction_reference[s];
+            }
+        }
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primVars[nNSEqn + s] = initMassFraction[s];
+        }
+
+        RDouble oMass = 0.0, gasR = 0.0;
+        gas->ComputeMolecularWeightReciprocalDimensional(primVars, oMass);
+        gasR = rjmk * oMass;
+
+        localDimensionalPressure = localDimensionalDensity * gasR * localDimensionalTemperature;
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primitiveVar[nNSEqn + s] = initMassFraction[s];
+        }
+
+        RDouble cp = 0.0, cv = 0.0, speciesCv[MAX_SPECIES_NUM] = {0};
+        int ntmodel = gas->GetTemperatureModel();
+        if (ntmodel > 1)    //! multi-temperature model.
+        {
+            gas->ComputeDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(speciesCv);
+            gas->ComputeMixtureByMassFraction(initMassFraction, speciesCv, cv);
+            cp = cv + gasR;
+            refGama = cp / cv;
+
+            RDouble nonDimTv = localVibrationTemperature / refDimensionalTemperature;
+            RDouble vibrationEnergy = gas->GetMixedGasDimensionalVibrationEnergy(nonDimTv, initMassFraction);
+            RDouble electronEnergy  = gas->GetMixedGasDimensionalElectronEnergy(nonDimTv, initMassFraction);
+            vibrationEnergy = vibrationEnergy / (refDimensionalVelocity * refDimensionalVelocity);
+            electronEnergy  = electronEnergy / (refDimensionalVelocity * refDimensionalVelocity);
+            if (ntmodel == 2)
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy + electronEnergy;
+            }
+            else
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy;
+                primitiveVar[nNSEqn + numberOfSpecies + 1] = electronEnergy;
+            }
+        }
+        else    //! one-temperature model.
+        {
+            RDouble nonDimTtr = localDimensionalTemperature / refDimensionalTemperature;
+            gas->ComputeSpeciesConstantPressureSpecificHeatDimensional(nonDimTtr, speciesCv);
+            gas->ComputeMixtureByMassFraction(initMassFraction, speciesCv, cp);
+            cv = cp - gasR;
+            refGama = cp / cv;
+        }
+    }
+
+    using namespace IDX;
+    primitiveVar[IR] = localDimensionalDensity / refDimensionalDensity;
+
+    SetSpeedDrictionForBC(bcParamDB,localDimensionalVelocity / refDimensionalVelocity, primitiveVar);
+
+    primitiveVar[IP] = localDimensionalPressure / (refDimensionalDensity * refDimensionalVelocity * refDimensionalVelocity);
+
+    bcParamDB->UpdateData("refGama", &refGama, PHDOUBLE, 1);
+}
+
+void GlobalBoundaryCondition::SetBCInitialValuesByPressure(Data_Param *bcParamDB, RDouble *primitiveVar)
+{
+    using namespace GAS_SPACE;
+    RDouble localDimensionalVelocity = 0, localDimensionalDensity = 0, localDimensionalPressure = 0;
+    RDouble localDimensionalTemperature = 0, localVibrationTemperature = 0;
+    //! Obtain the local Velocity.
+    if (bcParamDB->IsExist("refDimensionalVelocity", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refDimensionalVelocity", &localDimensionalVelocity, PHDOUBLE, 1);
+    }
+    else
+    {
+        localDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+    }
+
+    //! Obtain the local Pressure.
+    if (bcParamDB->IsExist("refDimensionalPressure", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refDimensionalPressure", &localDimensionalPressure, PHDOUBLE, 1);
+    }
+    else
+    {
+        localDimensionalPressure = GlobalDataBase::GetDoubleParaFromDB("refDimensionalPressure");
+    }
+
+    if (GlobalDataBase::IsExist("sprayFactor", PHDOUBLE, 1))
+    {
+        RDouble sprayFactor = GlobalDataBase::GetDoubleParaFromDB("sprayFactor");
+        localDimensionalPressure *= (1.0 + sprayFactor);
+    }
+
+    //! Obtain the local Temperature.
+    if (bcParamDB->IsExist("refDimensionalTemperature", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refDimensionalTemperature", &localDimensionalTemperature, PHDOUBLE, 1);
+    }
+    else
+    {
+        localDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+    }
+
+    //! Obtain the local VibrationTemperature.
+    int nTvChange = GlobalDataBase::GetIntParaFromDB("nTvChange");
+    if(nTvChange == 0)
+    {
+        if (bcParamDB->IsExist("refDimensionalVibrationTemperature", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("refDimensionalVibrationTemperature", &localVibrationTemperature, PHDOUBLE, 1);
+        }
+        else
+        {
+            localVibrationTemperature = GlobalDataBase::GetDoubleParaFromDB("freestream_vibration_temperature");
+        }
+    }
+
+    //! Obtain the reference parameters.
+    RDouble refDimensionalDensity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+    RDouble refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+    RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+
+    int nchem = gas->GetChemicalType();
+    RDouble refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+    if (bcParamDB->IsExist("refGama", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refGama", &refGama, PHDOUBLE, 1);
+    }
+    if (nchem == 0)
+    {
+        RDouble reference_general_gas_constant = GlobalDataBase::GetDoubleParaFromDB("reference_average_general_gas_constant");
+        localDimensionalDensity = localDimensionalPressure / reference_general_gas_constant / localDimensionalTemperature;
+    }
+    else
+    {
+        int nNSEqn = gas->GetNSEquationNumber();
+        int numberOfSpecies = gas->GetNumberOfSpecies();
+        RDouble initMassFraction[MAX_SPECIES_NUM] = {0}, primVars[MAX_SPECIES_NUM] = {0};
+        if (bcParamDB->IsExist("initMassFraction", PHDOUBLE, numberOfSpecies))
+        {
+            bcParamDB->GetData("initMassFraction", &initMassFraction, PHDOUBLE, numberOfSpecies);
+            gas->MassFractionConversion(initMassFraction);
+            gas->SetMaximumSpecies(initMassFraction);
+        }
+        else
+        {
+            RDouble *mass_fraction_reference = gas->GetInitMassFraction();
+            for (int s = 0; s < numberOfSpecies; ++ s)
+            {
+                initMassFraction[s] = mass_fraction_reference[s];
+            }
+        }
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primVars[nNSEqn + s] = initMassFraction[s];
+        }
+
+        RDouble oMass = 0.0, gasR = 0.0;
+        gas->ComputeMolecularWeightReciprocalDimensional(primVars, oMass);
+        gasR = rjmk * oMass;
+
+        localDimensionalDensity = localDimensionalPressure / (gasR * localDimensionalTemperature);
+
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primitiveVar[nNSEqn + s] = initMassFraction[s];
+        }
+
+        int ntmodel = gas->GetTemperatureModel();
+        RDouble cp = 0.0, cv = 0.0, speciesCv[MAX_SPECIES_NUM] = {0};
+
+        if (ntmodel > 1)    //! multi-temperature model.
+        {
+            gas->ComputeDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(speciesCv);
+            gas->ComputeMixtureByMassFraction(initMassFraction, speciesCv, cv);
+            cp = cv + gasR;
+            refGama = cp / cv;
+
+            RDouble nonDimTv = localVibrationTemperature / refDimensionalTemperature;
+            RDouble vibrationEnergy = gas->GetMixedGasDimensionalVibrationEnergy(nonDimTv, initMassFraction);
+            RDouble electronEnergy  = gas->GetMixedGasDimensionalElectronEnergy(nonDimTv, initMassFraction);
+            vibrationEnergy = vibrationEnergy / (refDimensionalVelocity * refDimensionalVelocity);
+            electronEnergy  = electronEnergy / (refDimensionalVelocity * refDimensionalVelocity);
+            if (ntmodel == 2)
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy + electronEnergy;
+            }
+            else
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy;
+                primitiveVar[nNSEqn + numberOfSpecies + 1] = electronEnergy;
+            }
+        }
+        else    //! one-temperature model.
+        {
+            RDouble nonDimTtr = localDimensionalTemperature / refDimensionalTemperature;
+            gas->ComputeSpeciesConstantPressureSpecificHeatDimensional(nonDimTtr, speciesCv);
+            gas->ComputeMixtureByMassFraction(initMassFraction, speciesCv, cp);
+            cv = cp - gasR;
+            refGama = cp / cv;
+        }
+    }
+
+    using namespace IDX;
+    primitiveVar[IR] = localDimensionalDensity / refDimensionalDensity;
+
+    SetSpeedDrictionForBC(bcParamDB,localDimensionalVelocity / refDimensionalVelocity, primitiveVar);
+
+    primitiveVar[IP] = localDimensionalPressure / (refDimensionalDensity * refDimensionalVelocity * refDimensionalVelocity);
+
+    bcParamDB->UpdateData("refGama", &refGama, PHDOUBLE, 1);
+}
+
+void GlobalBoundaryCondition::SetBCInitialValuesByTotalPressure(Data_Param *bcParamDB, RDouble *primitiveVar)
+{
+    using namespace GAS_SPACE;
+    RDouble localMachNumber = 0, localDimensionalDensity = 0, localDimensionalPressure = 0, localDimensionalVelocity = 0;
+    RDouble localDimensionalTemperature = 0, localVibrationTemperature = 0;
+    RDouble totalPressure = 0, totalTemperature = 0;
+    //! Obtain the local Velocity.
+    if (bcParamDB->IsExist("refMachNumber", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refMachNumber", &localMachNumber, PHDOUBLE, 1);
+    }
+    else
+    {
+        localMachNumber = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+    }
+
+    //! Obtain the local Pressure.
+    if (bcParamDB->IsExist("totalPressure", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("totalPressure", &totalPressure, PHDOUBLE, 1);
+    }
+    else
+    {
+        totalPressure = GlobalDataBase::GetDoubleParaFromDB("refDimensionalPressure");
+    }
+    //! Obtain the local Temperature.
+    if (bcParamDB->IsExist("totalTemperature", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("totalTemperature", &totalTemperature, PHDOUBLE, 1);
+    }
+    else
+    {
+        totalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+    }
+
+    //! Obtain the reference parameters.
+    RDouble refDimensionalDensity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+    RDouble refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+    RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+
+    int nchem = gas->GetChemicalType();
+    RDouble refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+    if (bcParamDB->IsExist("refGama", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refGama", &refGama, PHDOUBLE, 1);
+    }
+
+    if (nchem == 0)
+    {
+        RDouble reference_general_gas_constant = GlobalDataBase::GetDoubleParaFromDB("reference_average_general_gas_constant");
+
+        RDouble localDimensionalSonicSpeed = sqrt(refGama * reference_general_gas_constant * localDimensionalTemperature);
+        localDimensionalVelocity = localDimensionalSonicSpeed * localMachNumber;
+
+        localDimensionalTemperature = totalTemperature /(1.0 + 0.5 * (refGama - 1.0) * localMachNumber * localMachNumber);
+        localDimensionalPressure = totalPressure * pow(localDimensionalTemperature / totalTemperature, refGama /(refGama - 1.0));
+
+        localDimensionalDensity = localDimensionalPressure / (reference_general_gas_constant * localDimensionalTemperature);
+
+    }
+    else
+    {
+        int nNSEqn = gas->GetNSEquationNumber();
+        int numberOfSpecies = gas->GetNumberOfSpecies();
+
+        RDouble initMassFraction[MAX_SPECIES_NUM] = {0}, primVars[MAX_REACTION_NUM] = {0};
+        if (bcParamDB->IsExist("initMassFraction", PHDOUBLE, numberOfSpecies))
+        {
+            bcParamDB->GetData("initMassFraction", &initMassFraction, PHDOUBLE, numberOfSpecies);
+            gas->MassFractionConversion(initMassFraction);
+            gas->SetMaximumSpecies(initMassFraction);
+        }
+        else
+        {
+            RDouble *mass_fraction_reference = gas->GetInitMassFraction();
+            for (int s = 0; s < numberOfSpecies; ++ s)
+            {
+                initMassFraction[s] = mass_fraction_reference[s];
+            }
+        }
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primVars[nNSEqn + s] = initMassFraction[s];
+        }
+
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primitiveVar[nNSEqn + s] = initMassFraction[s];
+        }
+
+        gas->ComputeTemperatureFromTotalTemperature(initMassFraction, totalTemperature, localMachNumber, localDimensionalTemperature, refGama, 1);  // localDimensionalTemperature  and  refGama
+
+        localDimensionalPressure = totalPressure * pow(localDimensionalTemperature / totalTemperature, refGama /(refGama - 1.0));
+
+        int nTvChange = GlobalDataBase::GetIntParaFromDB("nTvChange");
+        if(nTvChange == 0)
+        {
+            if (bcParamDB->IsExist("refDimensionalVibrationTemperature", PHDOUBLE, 1))
+            {
+                bcParamDB->GetData("refDimensionalVibrationTemperature", &localVibrationTemperature, PHDOUBLE, 1);
+            }
+            else
+            {
+                localVibrationTemperature = localDimensionalTemperature;
+            }
+        }
+
+        RDouble oMass = 0.0, gasR = 0.0;
+        gas->ComputeMolecularWeightReciprocalDimensional(primVars, oMass);
+        gasR = rjmk * oMass;
+
+        localDimensionalDensity = localDimensionalPressure / (gasR * localDimensionalTemperature);
+
+        localDimensionalVelocity = localMachNumber * sqrt(refGama * gasR * localDimensionalTemperature);
+
+        int ntmodel = gas->GetTemperatureModel();
+        if (ntmodel > 1)    //! multi-temperature model.
+        {
+            RDouble nonDimTv = localVibrationTemperature / refDimensionalTemperature;
+            RDouble vibrationEnergy = gas->GetMixedGasDimensionalVibrationEnergy(nonDimTv, initMassFraction);
+            RDouble electronEnergy  = gas->GetMixedGasDimensionalElectronEnergy(nonDimTv, initMassFraction);
+            vibrationEnergy = vibrationEnergy / (refDimensionalVelocity * refDimensionalVelocity);
+            electronEnergy  = electronEnergy / (refDimensionalVelocity * refDimensionalVelocity);
+            if (ntmodel == 2)
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy + electronEnergy;
+            }
+            else
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy;
+                primitiveVar[nNSEqn + numberOfSpecies + 1] = electronEnergy;
+            }
+        }
+    }
+
+    using namespace IDX;
+    primitiveVar[IR] = localDimensionalDensity / refDimensionalDensity;
+
+    SetSpeedDrictionForBC(bcParamDB,localDimensionalVelocity / refDimensionalVelocity, primitiveVar);
+
+    primitiveVar[IP] = localDimensionalPressure / (refDimensionalDensity * refDimensionalVelocity * refDimensionalVelocity);
+
+    RDouble localNonDimensionalTemperature = localDimensionalTemperature / refDimensionalTemperature;
+
+    bcParamDB->UpdateData("refGama", &refGama, PHDOUBLE, 1);
+    bcParamDB->UpdateData("localNonDimensionalTemperature", &localNonDimensionalTemperature, PHDOUBLE, 1);
+
+}
+
+void GlobalBoundaryCondition::SetBCInitialValuesByMachNumberTemperaturePressure(Data_Param *bcParamDB, RDouble *primitiveVar)
+{
+    using namespace GAS_SPACE;
+    RDouble localMachNumber = 0, localDimensionalDensity = 0, localDimensionalPressure = 0;
+    RDouble localDimensionalTemperature = 0, localVibrationTemperature = 0;
+    //! Obtain the local parameters on boundary.
+    if (bcParamDB->IsExist("refMachNumber", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refMachNumber", &localMachNumber, PHDOUBLE, 1);
+    }
+    else
+    {
+        localMachNumber = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+    }
+    if (bcParamDB->IsExist("refDimensionalPressure", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refDimensionalPressure", &localDimensionalPressure, PHDOUBLE, 1);
+    }
+    else
+    {
+        localDimensionalPressure = GlobalDataBase::GetDoubleParaFromDB("refDimensionalPressure");
+    }
+    
+    if (bcParamDB->IsExist("refDimensionalTemperature", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refDimensionalTemperature", &localDimensionalTemperature, PHDOUBLE, 1);
+    }
+    else
+    {
+        localDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+    }
+
+    int nTvChange = GlobalDataBase::GetIntParaFromDB("nTvChange");
+    if(nTvChange == 0)
+    {
+        if (bcParamDB->IsExist("refDimensionalVibrationTemperature", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("refDimensionalVibrationTemperature", &localVibrationTemperature, PHDOUBLE, 1);
+        }
+        else
+        {
+            localVibrationTemperature = GlobalDataBase::GetDoubleParaFromDB("freestream_vibration_temperature");
+        }
+    }
+
+    //! Obtain the reference parameters.
+    RDouble refDimensionalDensity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+    RDouble refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+    RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+    RDouble localReNumber, localDimensionalVelocity;
+    RDouble nonDimTtr = localDimensionalTemperature / refDimensionalTemperature;
+    RDouble nonDimTv  = localVibrationTemperature / refDimensionalTemperature;
+
+    int nchem = gas->GetChemicalType();
+    RDouble refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+    if (bcParamDB->IsExist("refGama", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refGama", &refGama, PHDOUBLE, 1);
+    }
+
+    if (nchem == 0)
+    {
+        RDouble t0i  = 288.15;
+        RDouble tsi  = 110.4;
+        RDouble mu0i = 1.7894E-05;
+
+        RDouble local_viscosity_dimensional = (t0i + tsi) / (localDimensionalTemperature + tsi) * pow(localDimensionalTemperature / t0i, 1.5) * mu0i;
+        
+        RDouble reference_general_gas_constant = GlobalDataBase::GetDoubleParaFromDB("reference_average_general_gas_constant");
+
+        RDouble localDimensionalSonicSpeed = sqrt(refGama * reference_general_gas_constant * localDimensionalTemperature);
+        localDimensionalVelocity = localDimensionalSonicSpeed * localMachNumber;
+
+        localDimensionalDensity = localDimensionalPressure / reference_general_gas_constant / localDimensionalTemperature;
+        localReNumber = localDimensionalDensity * localDimensionalVelocity / local_viscosity_dimensional;
+    }
+    else
+    {
+        int nNSEqn = gas->GetNSEquationNumber();
+        int numberOfSpecies = gas->GetNumberOfSpecies();
+        RDouble initMassFraction[MAX_SPECIES_NUM] = {0}, speciesCv[MAX_SPECIES_NUM] = {0}, primVars[MAX_SPECIES_NUM] = {0}, speciesViscosity[MAX_SPECIES_NUM] = {0};
+        RDouble speciesWeight[MAX_SPECIES_NUM] = {0}, moleFractions[MAX_SPECIES_NUM] = {0};
+        if (bcParamDB->IsExist("initMassFraction", PHDOUBLE, numberOfSpecies))
+        {
+            bcParamDB->GetData("initMassFraction", &initMassFraction, PHDOUBLE, numberOfSpecies);
+            gas->MassFractionConversion(initMassFraction);
+            gas->SetMaximumSpecies(initMassFraction);
+        }
+        else
+        {
+            RDouble *mass_fraction_reference = gas->GetInitMassFraction();
+            for (int s = 0; s < numberOfSpecies; ++ s)
+            {
+                initMassFraction[s] = mass_fraction_reference[s];
+            }
+        }
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primVars[nNSEqn + s] = initMassFraction[s];
+        }
+
+        RDouble oMass = 0.0, gasR = 0.0;
+        gas->ComputeMolecularWeightReciprocalDimensional(primVars, oMass);
+        gas->ComputeMoleFractionByMassFraction(initMassFraction, moleFractions);
+        gasR = rjmk * oMass;
+
+        RDouble cp = 0.0, cv = 0.0;
+        int ntmodel = gas->GetTemperatureModel();
+        if (ntmodel > 1)    //! multi-temperature model.
+        {
+            gas->ComputeDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(speciesCv);
+            gas->ComputeMixtureByMassFraction(initMassFraction, speciesCv, cv);
+            cp = cv + gasR;
+            refGama = cp / cv;
+            gas->ComputeSpeciesDimensionalViscosityWithCurveFitMethod(nonDimTtr, nonDimTv, speciesViscosity);
+
+            RDouble vibrationEnergy = gas->GetMixedGasDimensionalVibrationEnergy(nonDimTv, initMassFraction);
+            RDouble electronEnergy  = gas->GetMixedGasDimensionalElectronEnergy(nonDimTv, initMassFraction);
+            vibrationEnergy = vibrationEnergy / (refDimensionalVelocity * refDimensionalVelocity);
+            electronEnergy  = electronEnergy / (refDimensionalVelocity * refDimensionalVelocity);
+            if (ntmodel == 2)
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy + electronEnergy;
+            }
+            else
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy;
+                primitiveVar[nNSEqn + numberOfSpecies + 1] = electronEnergy;
+            }
+        }
+        else    //! one-temperature model.
+        {
+            gas->ComputeSpeciesConstantPressureSpecificHeatDimensional(nonDimTtr, speciesCv);
+            gas->ComputeMixtureByMassFraction(initMassFraction, speciesCv, cp);
+            cv = cp - gasR;
+            refGama = cp / cv;
+            gas->ComputeOneTemperatureModelSpeciesViscosityDimensional(nonDimTtr, speciesViscosity);
+        }
+
+        RDouble localDimensionalSonicSpeed = sqrt(refGama * gasR * localDimensionalTemperature);
+        localDimensionalVelocity = localDimensionalSonicSpeed * localMachNumber;
+
+        RDouble *MolecularWeight = gas->GetMolecularWeightDimensional();
+        gas->GetPartitionFunctionValues(speciesViscosity, MolecularWeight, moleFractions, speciesWeight);
+        RDouble local_viscosity_dimensional = gas->GetMixedGasViscosityWithWilkeFormula(moleFractions, speciesViscosity, speciesWeight);
+
+        localDimensionalDensity = localDimensionalPressure / gasR / localDimensionalTemperature;
+        localReNumber = localDimensionalDensity * localDimensionalVelocity / local_viscosity_dimensional;
+
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primitiveVar[nNSEqn + s] = initMassFraction[s];
+        }
+    }
+    using namespace IDX;
+    primitiveVar[IR] = localDimensionalDensity / refDimensionalDensity;
+
+    SetSpeedDrictionForBC(bcParamDB,localDimensionalVelocity / refDimensionalVelocity, primitiveVar);
+
+    primitiveVar[IP] = localDimensionalPressure / (refDimensionalDensity * refDimensionalVelocity * refDimensionalVelocity);
+
+    bcParamDB->UpdateData("refGama", &refGama, PHDOUBLE, 1);
+}
+
+void GlobalBoundaryCondition::SetBCInitialValuesByWRFData(Data_Param *bcParamDB, RDouble *primitiveVar)
+{
+    using namespace GAS_SPACE;
+    string localFilePath;
+    RDouble localLongitude = 0, localLatitude = 0, localVibrationTemperature = 0;
+    //! Obtain the local parameters on boundary.
+    if (bcParamDB->IsExist("weatherDataFilePath", PHSTRING, 1))
+    {
+        bcParamDB->GetData("weatherDataFilePath", &localFilePath, PHSTRING, 1);
+    }
+    else
+    {
+        localFilePath = GlobalDataBase::GetStrParaFromDB("weatherDataFilePath");
+    }
+    if (bcParamDB->IsExist("longitude", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("longitude", &localLongitude, PHDOUBLE, 1);
+    }
+    else
+    {
+        localLongitude = GlobalDataBase::GetDoubleParaFromDB("longitude");
+    }
+
+    if (bcParamDB->IsExist("latitude", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("latitude", &localLatitude, PHDOUBLE, 1);
+    }
+    else
+    {
+        localLatitude = GlobalDataBase::GetDoubleParaFromDB("latitude");
+    }
+
+    RDouble localDimensionalDensity, localDimensionalVelocity, localDimensionalPressure, localDimensionalTemperature, localDimensionalSonicSpeed,localAngleSlide;
+
+    gas->ReadAirInfo(localFilePath, localLongitude, localLatitude, localDimensionalTemperature, localDimensionalPressure, localDimensionalDensity,localAngleSlide, localDimensionalVelocity, localDimensionalSonicSpeed);
+
+    int nTvChange = GlobalDataBase::GetIntParaFromDB("nTvChange");
+    if(nTvChange == 0)
+    {
+        if (bcParamDB->IsExist("refDimensionalVibrationTemperature", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("refDimensionalVibrationTemperature", &localVibrationTemperature, PHDOUBLE, 1);
+        }
+        else
+        {
+            localVibrationTemperature = GlobalDataBase::GetDoubleParaFromDB("freestream_vibration_temperature");
+        }
+    }
+   
+
+    //! Obtain the reference parameters.
+    RDouble refDimensionalDensity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+    RDouble refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+    RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+
+    int nchem = gas->GetChemicalType();
+    RDouble refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+    if (bcParamDB->IsExist("refGama", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refGama", &refGama, PHDOUBLE, 1);
+    }
+    if (nchem == 0)
+    {
+        RDouble reference_general_gas_constant = GlobalDataBase::GetDoubleParaFromDB("reference_average_general_gas_constant");
+        localDimensionalDensity = localDimensionalPressure / reference_general_gas_constant / localDimensionalTemperature;
+    }
+    else
+    {
+        int nNSEqn = gas->GetNSEquationNumber();
+        int numberOfSpecies = gas->GetNumberOfSpecies();
+        RDouble initMassFraction[MAX_SPECIES_NUM] = {0}, primVars[MAX_SPECIES_NUM] = {0};
+        if (bcParamDB->IsExist("initMassFraction", PHDOUBLE, numberOfSpecies))
+        {
+            bcParamDB->GetData("initMassFraction", &initMassFraction, PHDOUBLE, numberOfSpecies);
+            gas->MassFractionConversion(initMassFraction);
+            gas->SetMaximumSpecies(initMassFraction);
+        }
+        else
+        {
+            RDouble *mass_fraction_reference = gas->GetInitMassFraction();
+            for (int s = 0; s < numberOfSpecies; ++ s)
+            {
+                initMassFraction[s] = mass_fraction_reference[s];
+            }
+        }
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primVars[nNSEqn + s] = initMassFraction[s];
+        }
+
+        RDouble oMass = 0.0, gasR = 0.0;
+        gas->ComputeMolecularWeightReciprocalDimensional(primVars, oMass);
+        gasR = rjmk * oMass;
+
+        localDimensionalDensity = localDimensionalPressure / (gasR * localDimensionalTemperature);
+
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primitiveVar[nNSEqn + s] = initMassFraction[s];
+        }
+
+        int ntmodel = gas->GetTemperatureModel();
+        RDouble cp = 0.0, cv = 0.0, speciesCv[MAX_SPECIES_NUM] = {0};
+
+        if (ntmodel > 1)    //! multi-temperature model.
+        {
+            gas->ComputeDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(speciesCv);
+            gas->ComputeMixtureByMassFraction(initMassFraction, speciesCv, cv);
+            cp = cv + gasR;
+            refGama = cp / cv;
+
+            RDouble nonDimTv = localVibrationTemperature / refDimensionalTemperature;
+            RDouble vibrationEnergy = gas->GetMixedGasDimensionalVibrationEnergy(nonDimTv, initMassFraction);
+            RDouble electronEnergy  = gas->GetMixedGasDimensionalElectronEnergy(nonDimTv, initMassFraction);
+            vibrationEnergy = vibrationEnergy / (refDimensionalVelocity * refDimensionalVelocity);
+            electronEnergy  = electronEnergy / (refDimensionalVelocity * refDimensionalVelocity);
+            if (ntmodel == 2)
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy + electronEnergy;
+            }
+            else
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy;
+                primitiveVar[nNSEqn + numberOfSpecies + 1] = electronEnergy;
+            }
+        }
+        else    //! one-temperature model.
+        {
+            RDouble nonDimTtr = localDimensionalTemperature / refDimensionalTemperature;
+            gas->ComputeSpeciesConstantPressureSpecificHeatDimensional(nonDimTtr, speciesCv);
+            gas->ComputeMixtureByMassFraction(initMassFraction, speciesCv, cp);
+            cv = cp - gasR;
+            refGama = cp / cv;
+        }
+    }
+
+    using namespace IDX;
+    primitiveVar[IR] = localDimensionalDensity / refDimensionalDensity;
+
+    SetSpeedDrictionForBC(bcParamDB,localDimensionalVelocity / refDimensionalVelocity, primitiveVar);
+
+    primitiveVar[IP] = localDimensionalPressure / (refDimensionalDensity * refDimensionalVelocity * refDimensionalVelocity);
+
+    bcParamDB->UpdateData("refGama", &refGama, PHDOUBLE, 1);
+}
+
+void GlobalBoundaryCondition::SetBCInitialValuesByPrimitive(Data_Param *bcParamDB, RDouble *primitiveVar)
+{
+    using namespace GAS_SPACE;
+    using namespace IDX;
+    bool bFlag = false;
+    RDouble primDensity = 0, primU = 0 , primV = 0, primW = 0, primPressure = 0;
+    //! Obtain the local parameters on boundary.
+    if (bcParamDB->IsExist("primDensity", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("primDensity", &primDensity, PHDOUBLE, 1);
+    }
+    else
+    {
+        bFlag = true;
+    }
+    if (bcParamDB->IsExist("primU", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("primU", &primU, PHDOUBLE, 1);
+    }
+    else
+    {
+        bFlag = true;
+    }
+    if (bcParamDB->IsExist("primV", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("primV", &primV, PHDOUBLE, 1);
+    }
+    else
+    {
+        bFlag = true;
+    }
+    if (bcParamDB->IsExist("primW", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("primW", &primW, PHDOUBLE, 1);
+    }
+    else
+    {
+        bFlag = true;
+    }
+    if (bcParamDB->IsExist("primPressure", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("primPressure", &primPressure, PHDOUBLE, 1);
+    }
+    else
+    {
+        bFlag = true;
+    }
+
+    RDouble refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+    if (bcParamDB->IsExist("refGama", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refGama", &refGama, PHDOUBLE, 1);
+    }
+
+    RDouble initMassFraction[MAX_SPECIES_NUM] = {0}, primVars[MAX_SPECIES_NUM] = {0};
+    int nchem = gas->GetChemicalType();
+    int nNSEqn = gas->GetNSEquationNumber();
+    int numberOfSpecies = gas->GetNumberOfSpecies();
+    int ntmodel = gas->GetTemperatureModel();
+    int nEquation = nNSEqn;
+    if (nchem > 0 && bFlag == false)
+    {
+        nEquation = nNSEqn + numberOfSpecies + ntmodel - 1;
+
+        if (bcParamDB->IsExist("initMassFraction", PHDOUBLE, numberOfSpecies))
+        {
+            bcParamDB->GetData("initMassFraction", &initMassFraction, PHDOUBLE, numberOfSpecies);
+            gas->MassFractionConversion(initMassFraction);
+            gas->SetMaximumSpecies(initMassFraction);
+        }
+        else
+        {
+            RDouble *mass_fraction_reference = gas->GetInitMassFraction();
+            for (int s = 0; s < numberOfSpecies; ++ s)
+            {
+                initMassFraction[s] = mass_fraction_reference[s];
+            }
+        }
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primVars[nNSEqn + s] = initMassFraction[s];
+        }
+
+        RDouble oMass = 0.0, gasR = 0.0;
+        gas->ComputeMolecularWeightReciprocalDimensional(primVars, oMass);
+        gasR = rjmk * oMass;
+
+        RDouble cp = 0.0, cv = 0.0, speciesCv[MAX_SPECIES_NUM] = {0};
+
+        RDouble refDimensionalDensity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+        RDouble refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+        RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+
+        RDouble squareVelocity = refDimensionalVelocity * refDimensionalVelocity;
+        RDouble dimDensity = primDensity * refDimensionalDensity;
+        RDouble dimPressure = primPressure * refDimensionalDensity * squareVelocity;
+        RDouble dimTemperature = dimPressure / (gasR * dimDensity);
+        RDouble nonDimTv = dimTemperature / refDimensionalTemperature;
+
+        if (ntmodel > 1)    //! multi-temperature model.
+        {
+            gas->ComputeDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(speciesCv);
+            gas->ComputeMixtureByMassFraction(initMassFraction, speciesCv, cv);
+            cp = cv + gasR;
+            refGama = cp / cv;
+
+            //! Obtain the reference parameters.
+            RDouble vibrationEnergy = gas->GetMixedGasDimensionalVibrationEnergy(nonDimTv, initMassFraction);
+            RDouble electronEnergy  = gas->GetMixedGasDimensionalElectronEnergy(nonDimTv, initMassFraction);
+            vibrationEnergy = vibrationEnergy / squareVelocity;
+            electronEnergy  = electronEnergy  / squareVelocity;
+            if (ntmodel == 2)
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy + electronEnergy;
+            }
+            else
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy;
+                primitiveVar[nNSEqn + numberOfSpecies + 1] = electronEnergy;
+            }
+        }
+        else    //! one-temperature model.
+        {
+            gas->ComputeSpeciesConstantPressureSpecificHeatDimensional(nonDimTv, speciesCv);
+            gas->ComputeMixtureByMassFraction(initMassFraction, speciesCv, cp);
+            cv = cp - gasR;
+            refGama = cp / cv;
+        }
+    }
+
+    if (bFlag)
+    {
+        RDouble *primitiveVarFarfield = reinterpret_cast <RDouble *> (GlobalDataBase::GetDataPtr("prim_inf"));
+        for (int s = 0; s < nEquation; ++ s)
+        {
+            primitiveVar[s] = primitiveVarFarfield[s];
+        }
+    }
+    else
+    {
+        primitiveVar[IR] = primDensity;
+        primitiveVar[IU] = primU;
+        primitiveVar[IV] = primV;
+        primitiveVar[IW] = primW;
+        primitiveVar[IP] = primPressure;
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primitiveVar[nNSEqn + s] = initMassFraction[s];
+        }
+    }
+    bcParamDB->UpdateData("refGama", &refGama, PHDOUBLE, 1);
+}
+
+void GlobalBoundaryCondition::SetBCInitialValuesByMolecularWeightGama(Data_Param *bcParamDB, RDouble *primitiveVar)
+{
+    using namespace GAS_SPACE;
+    RDouble localDimensionalVelocity, localDimensionalPressure, localDimensionalDensity;
+    RDouble localDimensionalTemperature, localVibrationTemperature;
+    //! Obtain the local parameters on boundary.
+    if (bcParamDB->IsExist("refDimensionalVelocity", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refDimensionalVelocity", &localDimensionalVelocity, PHDOUBLE, 1);
+    }
+    else
+    {
+        localDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+    }
+    if (bcParamDB->IsExist("refDimensionalPressure", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refDimensionalPressure", &localDimensionalPressure, PHDOUBLE, 1);
+    }
+    else
+    {
+        localDimensionalPressure = GlobalDataBase::GetDoubleParaFromDB("refDimensionalPressure");
+    }
+
+    if (bcParamDB->IsExist("refDimensionalTemperature", PHDOUBLE, 1))
+    {
+        bcParamDB->GetData("refDimensionalTemperature", &localDimensionalTemperature, PHDOUBLE, 1);
+    }
+    else
+    {
+        localDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+    }
+    
+    int nTvChange = GlobalDataBase::GetIntParaFromDB("nTvChange");
+    if(nTvChange == 0)
+    {
+        if (bcParamDB->IsExist("refDimensionalVibrationTemperature", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("refDimensionalVibrationTemperature", &localVibrationTemperature, PHDOUBLE, 1);
+        }
+        else
+        {
+            localVibrationTemperature = GlobalDataBase::GetDoubleParaFromDB("freestream_vibration_temperature");
+        }
+    }
+   
+
+    //! Obtain the reference parameters.
+    RDouble refDimensionalDensity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+    RDouble refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+    RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+
+    int nchem = gas->GetChemicalType();
+    if (nchem == 0)
+    {
+        RDouble reference_general_gas_constant = GlobalDataBase::GetDoubleParaFromDB("reference_average_general_gas_constant");
+        localDimensionalDensity = localDimensionalPressure / reference_general_gas_constant / localDimensionalTemperature;
+    }
+
+    else
+    {
+        int nNSEqn = gas->GetNSEquationNumber();
+        int numberOfSpecies = gas->GetNumberOfSpecies();
+        RDouble initMassFraction[MAX_SPECIES_NUM], primVars[MAX_SPECIES_NUM];
+        RDouble localGama;
+        if (bcParamDB->IsExist("initMassFraction", PHDOUBLE, numberOfSpecies))
+        {
+            bcParamDB->GetData("initMassFraction", &initMassFraction, PHDOUBLE, numberOfSpecies);
+            gas->SetMaximumSpecies(initMassFraction);
+        }
+        else
+        {
+            RDouble *mass_fraction_reference = gas->GetInitMassFraction();
+            for (int s = 0; s < numberOfSpecies; ++ s)
+            {
+                initMassFraction[s] = mass_fraction_reference[s];
+            }
+        }
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primVars[nNSEqn + s] = initMassFraction[s];
+        }
+        
+        if (bcParamDB->IsExist("refGama", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("refGama", &localGama, PHDOUBLE, 1);
+        }
+        else
+        {
+            
+        }
+
+        RDouble oMass = 0.0, gasR = 0.0;
+        gas->ComputeMolecularWeightReciprocalDimensional(primVars, oMass);
+        gasR = rjmk * oMass;
+
+        localDimensionalDensity = localDimensionalPressure / (gasR * localDimensionalTemperature);
+
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primitiveVar[nNSEqn + s] = initMassFraction[s];
+        }
+
+        int ntmodel = gas->GetTemperatureModel();
+        if (ntmodel > 1)       //! multi-temperature model.
+        {
+            RDouble nonDimTv = localVibrationTemperature / refDimensionalTemperature;
+            RDouble vibrationEnergy = gas->GetMixedGasDimensionalVibrationEnergy(nonDimTv, initMassFraction);
+            RDouble electronEnergy  = gas->GetMixedGasDimensionalElectronEnergy(nonDimTv, initMassFraction);
+            vibrationEnergy = vibrationEnergy / (refDimensionalVelocity * refDimensionalVelocity);
+            electronEnergy  = electronEnergy / (refDimensionalVelocity * refDimensionalVelocity);
+            if (ntmodel == 2)
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy + electronEnergy;
+            }
+            else
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy;
+                primitiveVar[nNSEqn + numberOfSpecies + 1] = electronEnergy;
+            }
+        }
+    }
+
+    using namespace IDX;
+    primitiveVar[IR] = localDimensionalDensity / refDimensionalDensity;
+
+    SetSpeedDrictionForBC(bcParamDB,localDimensionalVelocity / refDimensionalVelocity, primitiveVar);
+
+    primitiveVar[IP] = localDimensionalPressure / (refDimensionalDensity * refDimensionalVelocity * refDimensionalVelocity);
+}
+
+void GlobalBoundaryCondition::SetBCDataBaseByGlobalBC()
+{
+    vector <SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+    if (globalBCList == 0) return;
+
+    using namespace PHMPI;
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    int myid   = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int procID = PHMPI::GetZoneProcessorID(iZone);
+
+        if (myid == procID)
+        {
+            Grid *gridofThisProcessor = GetGrid(iZone, 0);
+
+            while (gridofThisProcessor)
+            {
+                int gridtype = gridofThisProcessor->Type();
+
+                if (gridtype == PHSPACE::STRUCTGRID)
+                {
+                    StructGrid *grid = StructGridCast(gridofThisProcessor);
+                    StructBCSet *structBCSet = grid->GetStructBCSet();
+                    int nBCRegion = structBCSet->GetnBCRegion();
+                    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+                    {
+                        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+                        string bcRegionName = bcregion->GetBCName();
+                        int bcRegionType = bcregion->GetBCType();
+    
+                        vector <SimpleBC *> :: iterator iter;
+                        for (iter = globalBCList->begin(); iter != globalBCList->end(); iter ++)
+                        {
+                            string globalBCName = (*iter)->GetBCName();
+                            int globalBCType = (*iter)->GetBCType();
+                            Data_Param *globalBCParam = (*iter)->GetBCParamDataBase();
+                            Data_Param *bcParamDataBase = new Data_Param(*globalBCParam);
+                            if (globalBCName == bcRegionName && bcRegionType == globalBCType)
+                            {
+                                bcregion->SetBCParamDataBase(bcParamDataBase);
+                                break;
+                            }
+                        }
+                    }
+                }
+                else if (gridtype == PHSPACE::UNSTRUCTGRID)
+                {
+                    UnstructGrid *grid = UnstructGridCast(gridofThisProcessor);
+
+                    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+                    int nBCRegion = unstructBCSet->GetnBCRegion();
+                    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++iBCRegion)
+                    {
+                        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+                        string bcRegionName = bcRegion->GetBCName();
+                        int bcRegionType = bcRegion->GetBCType();
+
+                        vector <SimpleBC *> :: iterator iter;
+                        for (iter = globalBCList->begin(); iter != globalBCList->end(); iter ++)
+                        {
+                            string globalBCName = (*iter)->GetBCName();
+                            int globalBCType = (*iter)->GetBCType();
+                            Data_Param *globalBCParam = (*iter)->GetBCParamDataBase();
+                            Data_Param *bcParamDataBase = new Data_Param(*globalBCParam);
+                            if (globalBCName == bcRegionName && bcRegionType == globalBCType)
+                            {
+                                bcRegion->SetBCParamDataBase(bcParamDataBase);
+                                break;
+                            }
+                        }
+                    }
+
+                } 
+                gridofThisProcessor = gridofThisProcessor->GetCoarseGrid();
+            }
+        }
+    }
+}
+
+void GlobalBoundaryCondition::ChangeBCTypeByGlobalBC()
+{
+    vector<SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+    if (globalBCList == 0) return;
+
+    set< pair<string, int> > bcnameMap;
+    vector<SimpleBC *>::iterator iter1;
+    for (iter1 = globalBCList->begin(); iter1 != globalBCList->end(); ++ iter1)
+    {
+        SimpleBC *boundaryCondition = *iter1;
+        bcnameMap.insert(pair<string, int>(boundaryCondition->GetBCName(), boundaryCondition->GetBCType()));
+    }
+
+    using namespace PHMPI;
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    int myid   = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int procID = PHMPI::GetZoneProcessorID(iZone);
+
+        if (myid == procID)
+        {
+            Grid *gridofThisProcessor = GetGrid(iZone, 0);
+
+            int gridtype = gridofThisProcessor->Type();
+
+            if (gridtype == PHSPACE::STRUCTGRID)
+            {
+                StructGrid *grid = StructGridCast(gridofThisProcessor);
+
+                StructBCSet *structBCSet = grid->GetStructBCSet();
+                int nBCRegion = structBCSet->GetnBCRegion();
+                for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+                {
+                    StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+                    string bcname = bcregion->GetBCName();
+
+                    set< pair<string, int> >::iterator iter2;
+                    for (iter2 = bcnameMap.begin(); iter2 != bcnameMap.end(); ++ iter2)
+                    {
+                        if ((*iter2).first != bcname) continue;
+
+                        bcregion->SetBCType((*iter2).second);
+                        break;
+                    }
+                }
+            }
+            else if (gridtype == PHSPACE::UNSTRUCTGRID)
+            {
+                UnstructGrid *grid = UnstructGridCast(gridofThisProcessor);
+
+                UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+                if (!unstructBCSet) continue;
+                int nBCRegion = unstructBCSet->GetnBCRegion();
+
+                for (int iBCRegion = 0; iBCRegion < nBCRegion; ++iBCRegion)
+                {
+                    UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+                    string bcName = bcRegion->GetBCName();
+
+                    set< pair<string, int> >::iterator iter3;
+                    for (iter3 = bcnameMap.begin(); iter3 != bcnameMap.end(); ++ iter3)
+                    {
+                        if ((*iter3).first != bcName) continue;
+
+                        bcRegion->SetBCType((*iter3).second);
+                        break;
+                    }
+                }
+
+                int nBoundFace = grid->GetNBoundFace();
+                UnstructBCSet **bcr = grid->GetBCRecord();
+                for (int iFace = 0; iFace < nBoundFace; ++iFace)
+                {
+                    string bcName = bcr[iFace]->GetBCName();
+
+                    set< pair<string, int> >::iterator iter4;
+                    for (iter4 = bcnameMap.begin(); iter4 != bcnameMap.end(); ++ iter4)
+                    {
+                        if ((*iter4).first != bcName) continue;
+
+                        bcr[iFace]->SetKey((*iter4).second);
+                        break;
+                    }
+                }
+
+            }
+        }
+    }
+}
+
+void GlobalBoundaryCondition::ParseBCFromFile(fstream &file)
+{
+    string line, keyword, name, word;
+    string *value=NULL;
+    //string separator  = " =\t\r\n#$,;\"";
+    //! \t is tab key.
+    string separator = " =\r\n\t#$,;\"";
+    //string bcNameSeparator  = "=\r\n\t#$,;\"";
+    string sep1 = "\r\n";
+    //string section    = "{}";
+    string errMsg = "error in boundary condition file";
+
+    map < string, int > keywordmap;
+
+    keywordmap.insert(pair<string, int>("int"   , PHINT  ));
+    keywordmap.insert(pair<string, int>("float" , PHFLOAT));
+    keywordmap.insert(pair<string, int>("double", PHDOUBLE));
+    keywordmap.insert(pair<string, int>("string", PHSTRING));
+
+    int taskType = GetTaskCode();
+
+    int nBoundaryConditions = 0;
+    while (!file.eof())
+    {
+        getline(file, line);
+        if (line == "") continue;
+        FindNextWord(line, word, sep1);
+        if (word.substr(0, 1) == "#" || word.substr(0, 2) == "//") continue;
+
+        line = FindNextWord(line, keyword, separator);
+        if (keyword == "") continue;
+
+        line = FindNextWord(line, name, separator);
+
+        int count = 0;
+        int arraysize = 1;
+        //! Do not consider array here, so count = 0.
+        if (count == 0)
+        {
+            value = new string[1]();
+            if (name == "bcName")
+            {
+                //! For value of bcName, blank space is not used as separator!
+                string::size_type firstindex, nextindex;
+                firstindex = line.find_first_of("\"");
+                nextindex  = line.find_last_of("\"");
+                value[0] = line.substr(firstindex + 1, nextindex-firstindex-1);
+            }
+            else
+            {
+                line = FindNextWord(line, value[0], separator);
+            }
+        }
+        else
+        {
+            ostringstream oss;
+            oss << errMsg << "\n";
+            TK_Exit::ExceptionExit(oss.str(), true);
+        }
+
+        int type, size = arraysize;
+        type = keywordmap[keyword];
+        if (type == PHINT && name != "nBoundaryConditions")
+        {
+            TK_Exit::ExceptionExit("Error: the first line must be format \"int nBoundaryConditions = INTEGER\"!", true);
+        }
+        if (type == PHSTRING && name != "bcName")
+        {
+            TK_Exit::ExceptionExit("Error: BC name must be format string bcName = \" DownWall\" !", true);
+        }
+        if (type == PHINT)
+        {
+            int *data = new int [size];
+            for (int i = 0 ; i < size; ++ i)
+            {
+                from_string< int >(data[i], value[i], std::dec);
+            }
+
+            nBoundaryConditions = data[0];
+            delete [] data;
+
+            if (nBoundaryConditions == 0)
+            {
+                //! To compatible the old version.
+                SetDefaultSolidBoundaryCondition();
+                delete [] value;
+                break;
+            }
+            else
+            {
+                globalBCList = new vector <SimpleBC *>;
+            }
+        }
+        else if (type == PHSTRING)
+        {
+            //! Parse out the parameters into data base in each Boundary Condition.
+            SimpleBC *boundaryCondition = new SimpleBC();
+            boundaryCondition->SetBCName(*value);
+
+            Data_Param *bcParamDataBase = new Data_Param();
+            TK_Parse::ReadBasicData(file, bcParamDataBase);
+            boundaryCondition->SetBCParamDataBase(bcParamDataBase);
+
+            int bcType;
+            bcParamDataBase->GetData("bcType", &bcType, PHINT, 1);
+            boundaryCondition->SetBCType(bcType);
+
+            if (bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::ABLATION_SURFACE)
+            {
+                string bodyName = "body";
+                if (bcParamDataBase->CheckDataExist("bodyName"))
+                {
+                    bcParamDataBase->GetData("bodyName", &bodyName, PHSTRING, 1);
+                }
+                else
+                {
+                    bcParamDataBase->UpdateData("bodyName", &bodyName, PHSTRING, 1);
+                }
+
+                boundaryCondition->SetBodyName(bodyName);
+                if (taskType == SOLVE_FIELD || taskType == POST_PROCESSING)
+                {
+                    RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+
+                    //! For solid wall BC, set the default reference geometry scale.
+                    RDouble partForceReferenceArea, partForceReferenceLength, partForceReferenceLength_B;
+                    RDouble partForceReferenceX, partForceReferenceY, partForceReferenceZ;
+
+                    //! This judgement is not enough, and needs to be improved. In fact, judgements of the five reference variables should all exist.
+                    bool isPartReferenceScaleExist = bcParamDataBase->IsExist("forceReferenceArea", PHDOUBLE, 1);
+
+                    if (isPartReferenceScaleExist)
+                    {
+                        bcParamDataBase->GetData("forceReferenceArea",   &partForceReferenceArea, PHDOUBLE, 1);
+                        bcParamDataBase->GetData("forceReferenceLength", &partForceReferenceLength, PHDOUBLE, 1);
+                        bcParamDataBase->GetData("forceReferenceLengthSpanWise", &partForceReferenceLength_B, PHDOUBLE, 1);
+
+                        bcParamDataBase->GetData("TorqueRefX", &partForceReferenceX, PHDOUBLE, 1);
+                        bcParamDataBase->GetData("TorqueRefY", &partForceReferenceY, PHDOUBLE, 1);
+                        bcParamDataBase->GetData("TorqueRefZ", &partForceReferenceZ, PHDOUBLE, 1);
+                    }
+                    else
+                    {
+                        partForceReferenceArea     = GlobalDataBase::GetDoubleParaFromDB("forceReferenceArea");
+                        partForceReferenceLength   = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLength");
+                        partForceReferenceLength_B = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLengthSpanWise");
+                        partForceReferenceX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+                        partForceReferenceY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+                        partForceReferenceZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+                    }
+
+                    bcParamDataBase->UpdateData("forceReferenceArea", &partForceReferenceArea, PHDOUBLE, 1);
+                    bcParamDataBase->UpdateData("forceReferenceLength", &partForceReferenceLength, PHDOUBLE, 1);
+                    bcParamDataBase->UpdateData("forceReferenceLengthSpanWise", &partForceReferenceLength_B, PHDOUBLE, 1);
+                    bcParamDataBase->UpdateData("TorqueRefX", &partForceReferenceX, PHDOUBLE, 1);
+                    bcParamDataBase->UpdateData("TorqueRefY", &partForceReferenceY, PHDOUBLE, 1);
+                    bcParamDataBase->UpdateData("TorqueRefZ", &partForceReferenceZ, PHDOUBLE, 1);
+
+                    bool isDumpHingeMomentExist = bcParamDataBase->IsExist("dumpHingeMoment", PHINT, 1);
+                    int dumpHingeMoment = 0;
+                    RDouble localCoordAxis0[3] = {0, 0, 0};
+                    RDouble localCoordAxis1[3] = {0, 0, 0};
+                    if (isDumpHingeMomentExist)
+                    {
+                        bcParamDataBase->GetData("dumpHingeMoment", &dumpHingeMoment, PHINT, 1);
+                        if (dumpHingeMoment != 0)
+                        {
+                            bcParamDataBase->GetData("localCoordAxis0", localCoordAxis0, PHDOUBLE, 3);
+                            bcParamDataBase->GetData("localCoordAxis1", localCoordAxis1, PHDOUBLE, 3);
+                        }
+                    }
+
+                    //! keep consistend in grid unit:
+                    for (int idx = 0; idx < 3; idx ++)
+                    {
+                        localCoordAxis0[idx] /= gridScaleFactor;
+                        localCoordAxis1[idx] /= gridScaleFactor;
+                    }
+                    bcParamDataBase->UpdateData("dumpHingeMoment", &dumpHingeMoment, PHINT, 1);
+                    bcParamDataBase->UpdateData("localCoordAxis0", localCoordAxis0, PHDOUBLE, 3);
+                    bcParamDataBase->UpdateData("localCoordAxis1", localCoordAxis1, PHDOUBLE, 3);
+                }
+                else if (taskType == CREATE_GRID)
+                {
+                    int gridobj = GlobalDataBase::GetIntParaFromDB("gridobj");
+                    const int GRID_ADAPTATION = 2;
+                    if (gridobj == GRID_ADAPTATION)
+                    {
+                        string geometryFileName;
+                        bool isGeoemetryFileNameExist = bcParamDataBase->IsExist("geometryFileName", PHSTRING, 1);
+
+                        if (!isGeoemetryFileNameExist)
+                        {
+                            geometryFileName = "";
+                            bcParamDataBase->UpdateData("geometryFileName", &geometryFileName, PHSTRING, 1);
+                        }
+                    }
+                }
+            }
+
+            globalBCList->push_back(boundaryCondition);
+        }
+
+        delete [] value;
+    }
+}
+
+int GlobalBoundaryCondition::GetNumberOfSolidWallPart()
+{
+    if (globalBCList == 0) return 0;
+
+    int nSolidWallPart = 0;
+    vector<SimpleBC *>::iterator iter;
+    for (iter = globalBCList->begin(); iter != globalBCList->end(); ++ iter)
+    {
+        int bcType = (*iter)->GetBCType();
+        if (bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::ABLATION_SURFACE)
+        {
+            ++ nSolidWallPart;
+        }
+    }
+
+    return nSolidWallPart;
+}
+
+bool IsInterface(const int &boundaryConditionType)
+{
+    if (boundaryConditionType == PHENGLEI::INTERFACE)
+    {
+        return true;
+    }
+    return false;
+}
+
+map<int,string> CreatFantasybctype()
+{
+    map<int,string> Fantasybctype;
+
+    Fantasybctype[-3]   = "USER_DEFINED";
+    Fantasybctype[-2]   = "WAKE";
+    Fantasybctype[-1]   = "INTERFACE";
+    Fantasybctype[0]    = "NO_BOUNDARY_CONDITION";
+    Fantasybctype[1]    = "EXTRAPOLATION";
+    Fantasybctype[2]    = "SOLID_SURFACE";
+    Fantasybctype[3]    = "SYMMETRY";
+    Fantasybctype[4]    = "FARFIELD";
+
+    Fantasybctype[119]  = "ABLATION_SURFACE";
+
+    Fantasybctype[5]    = "INFLOW";
+    Fantasybctype[52]   = "PRESSURE_INLET";
+
+    Fantasybctype[6]    = "OUTFLOW";
+    Fantasybctype[61]   = "OUTFLOW_CONFINED";
+    Fantasybctype[62]   = "PRESSURE_OUTLET";
+
+    Fantasybctype[7]    = "POLE";
+    Fantasybctype[71]   = "POLE1";
+    Fantasybctype[72]   = "POLE2";
+    Fantasybctype[73]   = "POLE3";
+
+    Fantasybctype[8]    = "GENERIC_1";
+    Fantasybctype[9]    = "GENERIC_2";
+    Fantasybctype[10]   = "GENERIC_3";
+
+    Fantasybctype[11]   = "StartNumberOfBodyOfHyperFLOW";
+
+    Fantasybctype[12]   = "BODY";
+    Fantasybctype[13]   = "BODY";
+    Fantasybctype[14]   = "BODY";
+    Fantasybctype[15]   = "BODY";
+    Fantasybctype[16]   = "BODY";
+    Fantasybctype[17]   = "BODY";
+    Fantasybctype[18]   = "BODY";
+    Fantasybctype[19]   = "BODY";
+    Fantasybctype[20]   = "BODY";
+    Fantasybctype[21]   = "BODY";
+    Fantasybctype[22]   = "BODY";
+    Fantasybctype[23]   = "BODY";
+    Fantasybctype[24]   = "BODY";
+    Fantasybctype[25]   = "BODY";
+    Fantasybctype[26]   = "BODY";
+    Fantasybctype[27]   = "BODY";
+    Fantasybctype[28]   = "BODY";
+    Fantasybctype[29]   = "BODY";
+    Fantasybctype[30]   = "ENDNumberOfBodyOfHyperFLOW";
+    Fantasybctype[100]  = "INTERIOR";
+    Fantasybctype[1001] = "PRESSURE_INLET_PLATE";
+    Fantasybctype[1002] = "PRESSURE_OUTLET_PLATE";
+    Fantasybctype[1000] = "OVERSET";
+
+    Fantasybctype[53]   = "MASS_FLOW_INLET";
+    Fantasybctype[63]   = "MASS_FLOW_OUTLET";
+
+    //const int EXTERNAL_BC           =   9;
+    ////Added by Guo Yongheng 20160815: external overlap cells label
+
+    return Fantasybctype;
+}
+}
diff --git a/API/Geometry/src/Geo_SimpleGrid.cpp b/API/Geometry/src/Geo_SimpleGrid.cpp
new file mode 100644
index 0000000..2cd852b
--- /dev/null
+++ b/API/Geometry/src/Geo_SimpleGrid.cpp
@@ -0,0 +1,160 @@
+#include "Geo_SimpleGrid.h"
+#include "Math_BasisFunction.h"
+#include "PHMpi.h"
+using namespace std;
+
+#pragma warning (disable:913)
+namespace PHSPACE
+{
+
+SimpleGrid::SimpleGrid()
+{
+    x = NULL;
+    y = NULL;
+    z = NULL;
+
+    pmin = new RDouble [3];
+    pmax = new RDouble [3];
+
+    pmin[0] = 0.0;
+    pmin[1] = 0.0;
+    pmin[2] = 0.0;
+
+    pmax[0] = 1.0;
+    pmax[1] = 1.0;
+    pmax[2] = 1.0;
+
+    this->has_cal_minmax = false;
+
+    this->minEdgeLength = -1.0;
+    this->maxEdgeLength = -1.0;
+    this->materialType  = 0;
+
+    nTotalNode = 0;
+}
+
+SimpleGrid::~SimpleGrid()
+{
+    FreeMemory();
+}
+
+SimpleGrid::SimpleGrid(const SimpleGrid &rhs)
+{
+    Copy(rhs);
+    this->minEdgeLength = -1.0;
+    this->maxEdgeLength = -1.0;
+}
+
+void SimpleGrid::FreeMemory()
+{
+    if (x != NULL) { delete [] x; x=NULL; }
+    if (y != NULL) { delete [] y; y=NULL; }
+    if (z != NULL) { delete [] z; z=NULL; }
+
+    if (pmin != NULL) { delete [] pmin; pmin=NULL; }
+    if (pmax != NULL) { delete [] pmax; pmax=NULL; }
+}
+
+void SimpleGrid::Copy(const SimpleGrid &rhs)
+{
+    nTotalNode = rhs.GetNTotalNode();
+
+    if (nTotalNode <= 0)
+    {
+        PHMPI::FreeBlockData();
+        cout << " FATAL Error for nTotalNode <= 0 in SimpleGrid Copy!\n" << endl;
+        MPI_Abort(MPI_COMM_WORLD, -1);
+    }
+
+    x = new RDouble [nTotalNode];
+    y = new RDouble [nTotalNode];
+    z = new RDouble [nTotalNode];
+
+    std::copy(rhs.x, rhs.x+nTotalNode, x);
+    std::copy(rhs.y, rhs.y+nTotalNode, y);
+    std::copy(rhs.z, rhs.z+nTotalNode, z);
+
+    pmin = new RDouble [3];
+    pmax = new RDouble [3];
+
+    std::copy(rhs.pmin, rhs.pmin+3, pmin);
+    std::copy(rhs.pmax, rhs.pmax+3, pmax);
+}
+
+SimpleGrid & SimpleGrid::operator = (const SimpleGrid &rhs)
+{
+    if (this == &rhs) return *this;
+
+    FreeMemory();
+
+    Copy(rhs);
+
+    return *this;
+}
+
+RDouble * SimpleGrid::GetMinBox()
+{
+    if (!has_cal_minmax)
+    {
+        ComputeMinMaxBox();
+    }
+    return pmin;
+};
+
+RDouble * SimpleGrid::GetMaxBox()
+{
+    if (!has_cal_minmax)
+    {
+        ComputeMinMaxBox();
+    }
+    return pmax;
+};
+
+LIB_EXPORT void SimpleGrid::ComputeMinMaxBox()
+{
+    this->has_cal_minmax = true;
+
+    int nTotalNode = this->GetNTotalNode();
+
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+
+    RDouble xmin, ymin, zmin, xmax, ymax, zmax;
+    xmin = ymin = zmin =   LARGE;
+    xmax = ymax = zmax = - LARGE;
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        xmin = MIN(xmin, x[iNode]);
+        ymin = MIN(ymin, y[iNode]);
+        zmin = MIN(zmin, z[iNode]);
+
+        xmax = MAX(xmax, x[iNode]);
+        ymax = MAX(ymax, y[iNode]);
+        zmax = MAX(zmax, z[iNode]);
+    }
+
+    RDouble *pmin = this->GetMinBox();
+    RDouble *pmax = this->GetMaxBox();
+
+    pmin[0] = xmin;
+    pmin[1] = ymin;
+    pmin[2] = zmin;
+
+    pmax[0] = xmax;
+    pmax[1] = ymax;
+    pmax[2] = zmax;
+}
+
+LIB_EXPORT RDouble SimpleGrid::CalMinEdgeLength()
+{
+    return 0.0;
+}
+
+LIB_EXPORT RDouble SimpleGrid::CalMaxEdgeLength()
+{
+    return 0.0;
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_SimpleVC.cpp b/API/Geometry/src/Geo_SimpleVC.cpp
new file mode 100644
index 0000000..747d246
--- /dev/null
+++ b/API/Geometry/src/Geo_SimpleVC.cpp
@@ -0,0 +1,204 @@
+#include "Geo_SimpleVC.h"
+#include "PHIO.h"
+#include "Constants.h"
+#include "TK_Parse.h"
+#include "TK_Exit.h"
+#include "Geo_GridIndex.h"
+#include "Geo_Grid.h"
+
+namespace PHSPACE
+{
+vector<SimpleVC *> * GlobalVolumeCondition::globalVCList = 0;
+
+Data_Param *SimpleVC::GetVCParamDataBase()
+{
+    return vcParamDataBase;
+}
+
+void SimpleVC::SetVCParamDataBase(Data_Param *paraDB)
+{
+    if (vcParamDataBase)
+    {
+        delete vcParamDataBase;
+    }
+    this->vcParamDataBase = paraDB;
+}
+
+
+GlobalVolumeCondition::GlobalVolumeCondition()
+{
+
+}
+
+GlobalVolumeCondition::~GlobalVolumeCondition()
+{
+
+}
+
+void GlobalVolumeCondition::ReadGlobalVolumeCondition()
+{
+    fstream file;
+    string bcFile = "./bin/volume_condition.hypara";
+
+    if (!FileExist(bcFile))
+    {
+        //! To compatible the old version.
+        //SetDefaultSolidBoundaryCondition();
+        return;
+    }
+
+    OpenFile(file, bcFile, ios::in);
+
+    ParseVCFromFile(file);
+
+    CloseFile(file);
+}
+
+void GlobalVolumeCondition::ParseVCFromFile(fstream &file)
+{
+    string line, keyword, name, word;
+    string *value;
+    string separator = " =\r\n\t#$,;\"";
+    string sep1 = "\r\n";
+    string errMsg = "error in volume condition file";
+
+    map < string, int > keywordmap;
+
+    keywordmap.insert(pair<string, int>("int"   , PHINT  ));
+    keywordmap.insert(pair<string, int>("float" , PHFLOAT));
+    keywordmap.insert(pair<string, int>("double", PHDOUBLE));
+    keywordmap.insert(pair<string, int>("string", PHSTRING));
+
+    int nVolumeConditions = 0;
+    while (!file.eof())
+    {
+        getline(file, line);
+        if (line == "") continue;
+        FindNextWord(line, word, sep1);
+        if (word.substr(0, 1) == "#" || word.substr(0, 2) == "//") continue;
+
+        line = FindNextWord(line, keyword, separator);
+        if (keyword == "") continue;
+
+        line = FindNextWord(line, name, separator);
+
+        value = new string[1]();
+        if (name == "vcName")
+        {
+            //! For value of bcName, blank space is not used as separator!
+            string::size_type firstindex, nextindex;
+            firstindex = line.find_first_of("\"");
+            nextindex  = line.find_last_of("\"");
+            value[0] = line.substr(firstindex + 1, nextindex-firstindex-1);
+        }
+        else
+        {
+            line = FindNextWord(line, value[0], separator);
+        }
+
+        int type, size = 1;
+        type = keywordmap[keyword];
+        if (type == PHINT && name != "nVolumeConditions")
+        {
+            TK_Exit::ExceptionExit("Error: the first line must be format \"int nVolumeConditions = INTEGER\"!", true);
+        }
+        if (type == PHSTRING && name != "vcName")
+        {
+            TK_Exit::ExceptionExit("Error: VC name must be format string vcName = \" FLUID\" !", true);
+        }
+        if (type == PHINT)
+        {
+            int *data = new int [size];
+            for (int i = 0 ; i < size; ++ i)
+            {
+                from_string< int >(data[i], value[i], std::dec);
+            }
+
+            nVolumeConditions = data[0];
+            delete []data;
+
+            if (nVolumeConditions == 0)
+            {
+                break;
+            }
+            else
+            {
+                globalVCList = new vector <SimpleVC *>;
+            }
+        }
+        else if (type == PHSTRING)
+        {
+            //! Parse out the parameters into data base in each Boundary Condition.
+            SimpleVC *volumeCondition = new SimpleVC();
+            volumeCondition->SetVCName(*value);
+
+            Data_Param *vcParamDataBase = new Data_Param();
+            TK_Parse::ReadBasicData(file, vcParamDataBase);
+            volumeCondition->SetVCParamDataBase(vcParamDataBase);
+
+            int vcType;
+            vcParamDataBase->GetData("vcType", &vcType, PHINT, 1);
+            volumeCondition->SetVCType(vcType);
+
+            globalVCList->push_back(volumeCondition);
+        }
+
+        delete[] value;    value = nullptr;
+    }
+}
+
+void GlobalVolumeCondition::SetVCDataByGlobalVC()
+{
+    vector <SimpleVC *> *globalVCList = GlobalVolumeCondition::GetGlobalVolumeConditionList();
+    if (globalVCList == 0) return;
+
+    string errInfo = " Error: The volume_condition.hypara does not match the grid file!!!\n";
+
+    using namespace PHMPI;
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    int myid   = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int procID = PHMPI::GetZoneProcessorID(iZone);
+
+        if (myid == procID)
+        {
+            Grid *gridofThisProcessor = GetGrid(iZone, 0);
+            SimpleVC *volumeCondition = gridofThisProcessor->GetVolumeConditionIn();
+            if (!volumeCondition)
+            {
+                TK_Exit::ExceptionExit(errInfo);
+            }
+
+            string vcName = volumeCondition->GetVCName();
+
+            vector <SimpleVC *> :: iterator iter;
+            bool matchConditionFind = false;
+            for (iter = globalVCList->begin(); iter != globalVCList->end(); iter ++)
+            {
+                string globalVCName = (*iter)->GetVCName();
+                if (globalVCName == vcName)
+                {
+                    Data_Param *globalVCParam = (*iter)->GetVCParamDataBase();
+                    Data_Param *vcParamDataBase = new Data_Param(*globalVCParam);
+                    volumeCondition->SetVCParamDataBase(vcParamDataBase);
+
+                    int globalVCType = (*iter)->GetVCType();
+                    volumeCondition->SetVCType(globalVCType);
+
+                    matchConditionFind = true;
+                    break;
+                }
+            }
+
+            if (!matchConditionFind)
+            {
+                TK_Exit::ExceptionExit(errInfo);
+            }
+        }
+    }
+}
+
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_StructBC.cpp b/API/Geometry/src/Geo_StructBC.cpp
new file mode 100644
index 0000000..41ca3d0
--- /dev/null
+++ b/API/Geometry/src/Geo_StructBC.cpp
@@ -0,0 +1,773 @@
+#include "Geo_StructBC.h"
+#include "Glb_Dimension.h"
+#include "Math_BasisFunction.h"
+#include "OversetGridFactory.h"
+#include "Geo_SimpleBC.h"
+
+namespace PHSPACE
+{
+StructBC::StructBC(int zoneID, uint_t regionID)
+{ 
+    this->nbs = zoneID; 
+    this->nr = regionID; 
+
+    for (int i = 0; i < 3; i ++)
+    {
+        t_st[i] = 0;
+        t_ed[i] = 0;
+        stam[i] = 0;
+        rate[i] = 0;
+        s_lr3d[i] = 0;
+        t_lr3d[i] = 0;
+        s_st[i] = 0;
+        s_ed[i] = 0;
+        s_dir3d[i] = 0;
+    }
+    s_nd = -1;
+    t_nd = -1;
+    //s_nd = 0;
+    //t_nd = 0;
+    s_lr = 0;
+    t_lr = 0;
+    nbs = 0;
+    nbt = 0;
+}
+
+StructBC::~StructBC()
+{
+}
+
+void StructBC::ComputeRelativeParameters()
+{
+    vector< int > slam(3), ltam(3), cs(3), ct(3);
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        if ((GetFaceDirection() == -1 && s_st[m] == s_ed[m]) || GetFaceDirection() == m)
+        //if (s_st[m] == s_ed[m])
+        {
+            slam[m] = 0; 
+
+            if (s_st[m] == 1)
+            {
+                cs[m] = 1;
+            }
+            else
+            {
+                cs[m] = -1;
+            }
+        }
+        else if (s_st[m] < 0)
+        {
+            slam[m] = 1;
+
+            if (s_st[m] < s_ed[m])
+            {
+                cs[m] = -1; 
+            }
+            else
+            {
+                cs[m] = 1;
+            }
+        }
+        else
+        {
+            slam[m] = 2; 
+
+            if (s_st[m] > s_ed[m])
+            {
+                cs[m] = -1;
+            }
+            else
+            {
+                cs[m] = 1;
+            }
+        }
+
+        if ((GetFaceDirectionOfTargetBlock() == -1 && t_st[m] == t_ed[m]) || GetFaceDirectionOfTargetBlock() == m)
+        //if (t_st[m] == t_ed[m])
+        {
+            ltam[0] = m;
+
+            if (t_st[m] == 1)
+            {
+                ct[m] = -1;
+            }
+            else
+            {
+                ct[m] = 1;
+            }
+        }
+        else if (t_st[m] < 0)
+        {
+            ltam[1] = m; 
+
+            if (t_st[m] < t_ed[m])
+            {
+                ct[m] = -1;
+            }
+            else
+            {
+                ct[m] = 1;
+            }
+        }
+        else
+        {
+            ltam[2] = m;
+
+            if (t_st[m] > t_ed[m])
+            {
+                ct[m] = -1;
+            }
+            else
+            {
+                ct[m] = 1;
+            }
+        }
+    }
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        int i = slam[m];
+        int j = ltam[i];
+
+        stam[m] = j;
+        
+        if (cs[m] == ct[j])
+        {
+            rate[m] = 1;
+        }
+        else
+        {
+            rate[m] = -1;
+        }
+    }
+    return;
+}
+
+void StructBC::ProbeExternalOverlapCells(int *iBlank, int nci, int ncj, int &counter)
+{
+    vector <int> mst(3), med(3);
+    for (int m = 0; m < 3; ++ m)
+    {
+        if (s_st[m] == s_ed[m])
+        {
+            if (s_st[m] == 1)
+            {
+                mst[m] = s_st[m] - 1;
+                med[m] = s_st[m];
+            }
+            else
+            {
+                mst[m] = s_ed[m] - 2;
+                med[m] = s_ed[m] - 1;
+            }
+        }
+        else
+        {
+            mst[m] = s_st[m] - 1;
+            med[m] = s_ed[m] - 1;
+        }
+    }
+
+    for (int kCell = mst[2]; kCell <= med[2]; ++ kCell)
+    {
+        for (int jCell = mst[1]; jCell <= med[1]; ++ jCell)
+        {
+            for (int iCell = mst[0]; iCell <= med[0]; ++ iCell)
+            {
+                int mm = nci * ncj * kCell + nci * jCell + iCell;
+
+                if (iBlank[mm] == GENERIC_COLOR)
+                {
+                    iBlank[mm] = OVERSET_COLOR;
+                    counter += 1;
+                }
+            }
+        }
+    }
+
+    return;
+}
+
+StructBC & StructBC::operator = (const StructBC &rhs)
+{
+    if (this == &rhs) return *this;
+
+    this->s_st[0] = rhs.s_st[0];
+    this->s_ed[0] = rhs.s_ed[0];
+    this->s_st[1] = rhs.s_st[1];
+    this->s_ed[1] = rhs.s_ed[1];
+    this->s_st[2] = rhs.s_st[2];
+    this->s_ed[2] = rhs.s_ed[2];
+    this->SetBCType(rhs.GetBCType());
+    this->SetFaceLeftOrRightIndex(rhs.GetFaceLeftOrRightIndex());
+    this->SetFaceDirection(rhs.GetFaceDirection());
+    this->s_lr3d[0] = rhs.s_lr3d[0];
+    this->s_lr3d[1] = rhs.s_lr3d[1];
+    this->s_lr3d[2] = rhs.s_lr3d[2];
+
+    this->t_st[0] = rhs.t_st[0];
+    this->t_ed[0] = rhs.t_ed[0];
+    this->t_st[1] = rhs.t_st[1];
+    this->t_ed[1] = rhs.t_ed[1];
+    this->t_st[2] = rhs.t_st[2];
+    this->t_ed[2] = rhs.t_ed[2];
+
+    this->SetRegionBlock(rhs.GetRegionBlock());
+    this->SetTargetRegionBlock(rhs.GetTargetRegionBlock());
+    this->SetFaceDirectionOfTargetBlock(rhs.GetFaceDirectionOfTargetBlock());
+    this->SetFaceLeftOrRightIndexOfTargetBlock(rhs.GetFaceLeftOrRightIndexOfTargetBlock());
+    this->t_lr3d[0] = rhs.t_lr3d[0];
+    this->t_lr3d[1] = rhs.t_lr3d[1];
+    this->t_lr3d[2] = rhs.t_lr3d[2];
+    this->stam[0] = rhs.stam[0];
+    this->stam[1] = rhs.stam[1];
+    this->stam[2] = rhs.stam[2];
+    this->rate[0] = rhs.rate[0];
+    this->rate[1] = rhs.rate[1];
+    this->rate[2] = rhs.rate[2];
+    this->SimpleBC::SetBCName (rhs.SimpleBC::GetBCName());
+
+    return *this;
+}
+
+void StructBC::GetNormalizeIJKRegion(int &ist, int &ied, int &jst, int &jed, int &kst, int &ked)
+{
+    ist = MIN(ABS(this->s_st[0]), ABS(this->s_ed[0]));
+    ied = MAX(ABS(this->s_st[0]), ABS(this->s_ed[0]));
+    jst = MIN(ABS(this->s_st[1]), ABS(this->s_ed[1]));
+    jed = MAX(ABS(this->s_st[1]), ABS(this->s_ed[1]));
+    kst = MIN(ABS(this->s_st[2]), ABS(this->s_ed[2]));
+    ked = MAX(ABS(this->s_st[2]), ABS(this->s_ed[2]));
+}
+
+void StructBC::ComputeMultiGridIJKRegion(int imin, int imax, int jmin, int jmax, int kmin, int kmax, int istp, int jstp, int kstp, int nsurf)
+{
+    s_st[0] = (imin - 1) / istp + 1;
+    s_ed[0] = MAX(imax / istp, 1);
+
+    s_st[1] = (jmin - 1) / jstp + 1;
+    s_ed[1] = MAX(jmax / jstp, 1);
+
+    s_st[2] = (kmin - 1) / kstp + 1;
+    s_ed[2] = MAX(kmax / kstp, 1);
+
+    s_ed[nsurf-1] = s_st[nsurf-1];
+}
+
+void StructBC::InitFaceDirectionIndex()
+{
+    this->s_lr3d[0] = 0;
+    this->s_lr3d[1] = 0;
+    this->s_lr3d[2] = 0;
+    //! Here do some special handling.
+    this->s_lr3d[s_nd] = s_lr;
+}
+
+void StructBC::SetLnkInfo()
+{
+    if (GetBCType() != PHENGLEI::INTERFACE)
+    {
+        return;
+    }
+
+    int index = 0;
+    for (int m = 0; m < 3; ++ m)
+    {
+        lnkInfo[index++] = s_st[m];
+        lnkInfo[index++] = s_ed[m];
+    }
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        lnkInfo[index++] = t_st[m];
+        lnkInfo[index++] = t_ed[m];
+    }
+}
+
+void StructBC::ProcessBCInfo()
+{
+    using namespace PHSPACE;
+
+    int s_st_local[3], s_ed_local[3];
+    int t_st_local[3], t_ed_local[3];
+    int s_fix;
+
+    int nDim = GetDim();
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        s_st_local[m] = this->s_st[m];
+        s_ed_local[m] = this->s_ed[m];
+
+        t_st_local[m] = this->t_st[m];
+        t_ed_local[m] = this->t_ed[m];
+    }
+
+    if (IsInterface(SimpleBC::GetBCType()) && nDim == THREE_D)
+    {
+        for (int m = 0; m < 3; ++ m)
+        {
+            if (s_st_local[m] == s_ed_local[m])
+            {
+                for (int n = 0; n < 3; ++ n)
+                {
+                    if (t_st_local[n] == t_ed_local[n])
+                    {
+                        if (((s_st_local[m] == 1) && (t_st_local[n] == 1)) || ((s_st_local[m] != 1) && (t_st_local[n] != 1)))
+                        {
+                            s_dir3d[m] = - n - 1;
+                        }
+                        else
+                        {
+                            s_dir3d[m] = n + 1;
+                        }
+                        break;
+                    }
+                    else
+                    {
+                        continue;
+                    }
+                }
+            }
+            else
+            {
+                for (int n = 0; n < 3; ++ n)
+                {
+                    if ((t_st_local[n] == t_ed_local[n]) || (t_st_local[n] * s_st_local[m] < 0))
+                    {
+                        continue;
+                    }
+                    else
+                    {
+                        if (((s_st_local[m] < s_ed_local[m]) && (t_st_local[n] < t_ed_local[n])) || ((s_st_local[m] > s_ed_local[m]) && (t_st_local[n] > t_ed_local[n])))
+                        {
+                            s_dir3d[m] = n + 1;
+                        }
+                        else
+                        {
+                            s_dir3d[m] = - n - 1;
+                        }
+                        break;
+                    }
+                }
+            }
+        }
+    }
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        if (ABS(s_st_local[m]) > ABS(s_ed_local[m]))
+        {
+            this->s_st[m] = ABS(s_ed_local[m]);
+            this->s_ed[m] = ABS(s_st_local[m]);
+
+            this->t_st[m] = ABS(t_ed_local[m]);
+            this->t_ed[m] = ABS(t_st_local[m]);
+        }
+        else
+        {
+            this->s_st[m] = ABS(s_st_local[m]);
+            this->s_ed[m] = ABS(s_ed_local[m]);
+
+            this->t_st[m] = ABS(t_st_local[m]);
+            this->t_ed[m] = ABS(t_ed_local[m]);
+        }
+
+        this->s_lr3d[m] = 0;
+    }
+
+
+    for (int m = 0; m < nDim; ++ m)
+    {
+        if ((GetFaceDirection() == -1 && s_st_local[m] == s_ed_local[m]) || GetFaceDirection() == m)
+        //if (s_st[m] == s_ed[m])
+        {
+            this->SetFaceDirection(m);
+            if (s_st_local[m] == 1)
+            {
+                this->SetFaceLeftOrRightIndex(- 1);
+                this->s_lr3d[m] = - 1;
+            }
+            else
+            {
+                this->SetFaceLeftOrRightIndex(1);
+                this->s_lr3d[m] = 1;
+            }
+            s_fix = s_st_local[m];
+
+            if (this->GetFaceLeftOrRightIndex() == 1)
+            {
+                s_st_local[m] -= 1;
+                s_ed_local[m] -= 1;
+                this->s_st[m] -= 1;
+                this->s_ed[m] -= 1;
+            }
+        }
+        else
+        {
+            this->s_ed[m] -= 1;
+        }
+    }
+
+    if (!IsInterface(SimpleBC::GetBCType()) || nDim == TWO_D) return;
+
+    int tst[3], ted[3];
+    for (int m = 0; m < 3; ++ m)
+    {
+        tst[m] = t_st_local[m];
+        ted[m] = t_ed_local[m];
+    }
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        this->t_st[m] = min(abs(tst[m]), abs(ted[m]));
+        this->t_ed[m] = max(abs(tst[m]), abs(ted[m]));
+        this->t_lr3d[m] = 0;
+    }
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        if ((GetFaceDirectionOfTargetBlock() == -1 && tst[m] == ted[m]) || GetFaceDirectionOfTargetBlock() == m)
+        //if (tst[m] == ted[m])
+        {
+            //this->t_nd = m;
+            this->SetFaceDirectionOfTargetBlock(m);
+            if (tst[m] == 1)
+            {
+                this->t_lr = -1;
+                this->t_lr3d[m] = -1;
+            }
+            else
+            {
+                this->t_lr = 1;
+                this->t_lr3d[m] = 1;
+            }
+
+            if (this->t_lr == 1)
+            {
+                this->t_st[m] -= 1;
+                this->t_ed[m] -= 1;
+            }
+        }
+        else
+        {
+            this->t_ed[m] -= 1;
+        }
+    }
+
+    return;
+}
+
+StructBCSet::StructBCSet(int zoneID)
+{
+    this->zoneID = zoneID;
+    bcRegions = 0;
+    iID = 0;
+    jID = 0;
+    kID = 0;
+    bcRegionIDofIFace = 0;
+
+    InitBoundaryName();
+}
+
+StructBCSet::~StructBCSet()
+{
+    if (bcRegions)
+    {
+        for (std::size_t i = 0; i < bcRegions->size(); ++ i)
+        {
+            delete (*bcRegions)[i];
+        }
+    }
+    delete bcRegions;
+
+    DeleteIndex();
+}
+
+void StructBCSet::CopyStructBCSet(StructBCSet *rightHandSide)
+{
+    int nBCRegion = rightHandSide->GetnBCRegion();
+
+    CreateBCRegion(nBCRegion);
+
+    for (uint_t iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = new StructBC(zoneID, iBCRegion);
+
+        this->SetBCRegion(iBCRegion, bcregion);
+        *bcregion = * rightHandSide->GetBCRegion(iBCRegion);
+    }
+}
+
+StructBC * StructBCSet::GetBCRegion(uint_t iBCRegion) const
+{
+    return (*bcRegions)[iBCRegion];
+}
+
+void StructBCSet::DeleteIndex()
+{
+    delete [] iID;
+    delete [] jID;
+    delete [] kID;
+    delete [] bcRegionIDofIFace;
+
+    //! The reason for setting zero is that DeleteIndex may be called many times.
+    iID = NULL;
+    jID = NULL;
+    kID = NULL;
+    bcRegionIDofIFace = NULL;
+}
+
+void StructBCSet::DecodeIJK(int index, int &i, int &j, int &k)
+{
+    i = iID[index];
+    j = jID[index];
+    k = kID[index];
+}
+
+
+void StructBCSet::GetSourceIndexIJK(int iFace, int ipos, int &i, int &j, int &k)
+{
+    int iBCRegion = bcRegionIDofIFace[iFace];
+    StructBC *bcregion = this->GetBCRegion(iBCRegion);
+
+    int is, js, ks;
+    DecodeIJK(iFace, is, js, ks);
+
+    int *s_lr3d = bcregion->GetFaceDirectionIndex();
+
+    i = is - s_lr3d[0] * (ipos - 1);
+    j = js - s_lr3d[1] * (ipos - 1);
+    k = ks - s_lr3d[2] * (ipos - 1);
+}
+
+
+void StructBCSet::GetSourceIndexIJK_Nsurf_LR(int iFace, int ipos, int &i, int &j, int &k, int &nsurf, int &s_lr)
+{
+    if (!bcRegionIDofIFace) SetIFaceInfo();
+
+    int iBCRegion = bcRegionIDofIFace[iFace];
+    StructBC *bcregion = this->GetBCRegion(iBCRegion);
+
+    int is, js, ks;
+    DecodeIJK(iFace, is, js, ks);
+
+    int *s_lr3d = bcregion->GetFaceDirectionIndex();
+
+    i = is - s_lr3d[0] * (ipos - 1);
+    j = js - s_lr3d[1] * (ipos - 1);
+    k = ks - s_lr3d[2] * (ipos - 1);
+
+    s_lr = bcregion->GetFaceLeftOrRightIndex();
+    nsurf = bcregion->GetFaceDirection() + 1;
+}
+
+void StructBCSet::GetTargetIndexIJK(int iFace, int ipos, int &i, int &j, int &k)
+{
+    int iBCRegion = bcRegionIDofIFace[iFace];
+    StructBC *bcregion = this->GetBCRegion(iBCRegion);
+
+    int is, js, ks;
+    DecodeIJK(iFace, is, js, ks);
+
+    int *s_lr3d = bcregion->GetFaceDirectionIndex();
+
+    i = is + s_lr3d[0] * (ipos);
+    j = js + s_lr3d[1] * (ipos);
+    k = ks + s_lr3d[2] * (ipos);
+}
+
+void StructBCSet::GetSourceIndexIJK_fornodetransfer(int iFace, int &id, int &jd, int &kd, int &i_lr, int &j_lr, int &k_lr)
+{
+    int iBCRegion = bcRegionIDofIFace[iFace];
+    StructBC *bcregion = this->GetBCRegion(iBCRegion);
+    
+    int *s_lr3d = bcregion->GetFaceDirectionIndex();
+
+    i_lr = s_lr3d[0];
+    j_lr = s_lr3d[1];
+    k_lr = s_lr3d[2];
+    
+    id = 0;
+    jd = 0;
+    kd = 0;
+
+    if (s_lr3d[0] == 1)
+    {
+        id = 1;
+    }
+    else if (s_lr3d[1] == 1)
+    {
+        jd = 1;
+    }
+    else if (s_lr3d[2] == 1)
+    {
+        kd = 1;
+    }
+}
+
+void StructBCSet::GetTargetIndexIJK_fornodetransfer(int iFace, int &id, int &jd, int &kd, int &i_lr, int &j_lr, int &k_lr)
+{
+    int iBCRegion = bcRegionIDofIFace[iFace];
+    StructBC *bcregion = this->GetBCRegion(iBCRegion);
+
+    int *s_lr3d = bcregion->GetFaceDirectionIndex();
+
+    i_lr = s_lr3d[0];
+    j_lr = s_lr3d[1];
+    k_lr = s_lr3d[2];
+
+    id = 0;
+    jd = 0;
+    kd = 0;
+
+    if (s_lr3d[0] == -1)
+    {
+        id = 1;
+    }
+    else if (s_lr3d[1] == -1)
+    {
+        jd = 1;
+    }
+    else if (s_lr3d[2] == -1)
+    {
+        kd = 1;
+    }
+}
+
+void StructBCSet::SetIFaceInfo()
+{
+    using namespace PHSPACE;
+
+    DeleteIndex();
+
+    int nBCRegion = this->GetnBCRegion();
+    int imin = 0, imax = 0, jmin = 0, jmax = 0, kmin = 0, kmax = 0, bcType = 0;
+    int nIFace = 0;
+
+     for (uint_t iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcRegion = this->GetBCRegion(iBCRegion);
+
+        bcRegion->GetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+        bcType = bcRegion->GetBCType();
+
+        if (IsInterface(bcType))
+        {
+            nIFace += (imax - imin + 1) * (jmax - jmin + 1) * (kmax - kmin + 1);
+        }
+    }
+
+    if (nIFace == 0) return;
+
+    iID = new int [nIFace];
+    jID = new int [nIFace];
+    kID = new int [nIFace];
+    bcRegionIDofIFace = new int [nIFace];
+
+    int iiface = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = this->GetBCRegion(iBCRegion);
+        bcType = bcregion->GetBCType();
+        bcregion->GetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+
+        if (IsInterface(bcType))
+        {
+            for (int k = kmin; k <= kmax; ++ k)
+            {
+                for (int j = jmin; j <= jmax; ++ j)
+                {
+                    for (int i = imin; i <= imax; ++ i)
+                    {
+                        iID[iiface] = i;
+                        jID[iiface] = j;
+                        kID[iiface] = k;
+                        bcRegionIDofIFace[iiface] = iBCRegion;
+                        ++ iiface;
+                    }
+                }
+            }
+        }
+    }
+}
+
+int * StructBCSet::GetIFaceInfo()
+{
+    return bcRegionIDofIFace;
+}
+
+void StructBCSet::ProcessBCInfo()
+{
+    using namespace PHSPACE;
+    int nBCRegion = this->GetnBCRegion();
+
+ 
+    for (uint_t iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+
+        StructBC *bcregion = this->GetBCRegion(iBCRegion);
+        bcregion->ProcessBCInfo();
+    }
+}
+
+
+void StructBCSet::SetLnkInfo()
+{
+    using namespace PHSPACE;
+    int nBCRegion = this->GetnBCRegion();
+
+    for (uint_t iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        
+        StructBC *bcregion = this->GetBCRegion(iBCRegion);
+        bcregion->SetLnkInfo();
+    }
+}
+
+
+void StructBCSet::InitBoundaryName()
+{
+    string boundaryName[100] = {"NO_BOUNDARY_CONDITION", "EXTRAPOLATION", "SOLID_SURFACE", "SYMMETRY", 
+                                "FARFIELD", "INFLOW", "OUTFLOW", "POLE", "Wall_8", "Wall_9", "Wall_10", "Wall_11", 
+                                "Wall_12", "Wall_13", "Wall_14", "Wall_15", "Wall_16", "Wall_17", "Wall_18", "Wall_19",
+                                "Wall_20", "Wall_21", "Wall_22", "Wall_23", "Wall_24", "Wall_25", "Wall_26", "Wall_27", 
+                                "Wall_28", "Wall_29", "Wall_30", "Wall_31", "Wall_32", "Wall_33", "Wall_34", "Wall_35",
+                                "Wall_36", "Wall_37", "Wall_38", "Wall_39", "Wall_40", "Wall_41", "Wall_42", "Wall_43",
+                                "Wall_44", "Wall_45", "Wall_46", "Wall_47", "Wall_48", "Wall_49", "Wall_50"};
+
+    boundaryName[52] = "PRESSURE_INLET";
+    boundaryName[62] = "PRESSURE_OUTLET";
+    boundaryName[71] = "POLE1";
+    boundaryName[72] = "POLE2";
+    boundaryName[73] = "POLE3";
+
+    for (size_t iName = 0; iName < boundaryName->size(); ++ iName)
+    {
+        this->boundaryName[iName] = boundaryName[iName];
+    }
+}
+
+void GetBCFaceIDX(int *s_lr3d, int &id, int &jd, int &kd)
+{
+    id = 0;
+    jd = 0;
+    kd = 0;
+
+    if (s_lr3d[0] == 1)
+    {
+        id = 1;
+    }
+    else if (s_lr3d[1] == 1)
+    {
+        jd = 1;
+    }
+    else if (s_lr3d[2] == 1)
+    {
+        kd = 1;
+    }
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_StructGrid.cpp b/API/Geometry/src/Geo_StructGrid.cpp
new file mode 100644
index 0000000..d8175e5
--- /dev/null
+++ b/API/Geometry/src/Geo_StructGrid.cpp
@@ -0,0 +1,8094 @@
+#include "Geo_MultiGridInfo_Struct.h"
+#include "Geo_SimpleBC.h"
+#include "GridType.h"
+#include "Geo_NodeTopo_Struct.h"
+#include "Geo_FaceMetrics_Struct.h"
+#include "Geo_CellMetrics_Struct.h"
+#include "Geo_DynamicGridMetrics_Struct.h"
+#include "Geo_OversetGridTopo_Struct.h"
+#include "PHIO.h"
+#include "LinkStruct.h"
+#include "Glb_Dimension.h"
+#include "Constants.h"
+#include "Math_Limiter.h"
+#include "PHHeader.h"
+#include "OversetGridFactory.h"
+#include "Geo_StructBC.h"
+#include "Geo_Interface.h"
+#include "Geo_Interpoint.h"
+#include "TK_Log.h"
+#include "TK_Parse.h"
+#include "FieldProxy.h"
+using namespace std;
+
+#pragma warning (disable:913)
+#pragma warning (disable:4100)
+#pragma warning (disable:26451)
+#pragma warning(disable:6386)
+#pragma warning(disable:6385)
+namespace PHSPACE
+{
+int mide[3][3];
+
+class InitializingClass
+{
+public:
+    InitializingClass();
+    ~InitializingClass();
+public:
+    void InitConstants();
+};
+
+InitializingClass::InitializingClass()
+{
+    InitConstants();
+}
+
+InitializingClass::~InitializingClass()
+{
+}
+
+void InitializingClass::InitConstants()
+{
+    for (int i = 0; i < 3; ++ i)
+    {
+        for (int j = 0; j < 3; ++ j)
+        {
+            mide[i][j] = 0;
+        }
+    }
+    mide[0][0] = 1;
+    mide[1][1] = 1;
+    mide[2][2] = 1;
+}
+
+InitializingClass AnInstance;
+
+StructGrid * StructGridCast(Grid *gridIn)
+{
+    return static_cast <StructGrid *> (gridIn);
+}
+
+LIB_EXPORT StructGrid::StructGrid()
+{
+    nodeTopology = NULL;
+    faceMetrics = NULL;
+    cellMetrics = NULL;
+    multigridInfo = NULL;
+    dynamicGridMetrics = NULL;
+    walldist = NULL;
+    nearestwallfacenormalx = NULL;
+    nearestwallfacenormaly = NULL;
+    nearestwallfacenormalz = NULL;
+    iBlank3D = NULL;
+    gridUnstr = NULL;
+    wallCellLabel = NULL;
+    cellBoundaryType = NULL;
+    structBCSet = NULL;
+    oversetGridTopology = NULL;
+
+    DiscretePrecisionKXI = NULL;
+    DiscretePrecisionETA = NULL;
+    DiscretePrecisionCTA = NULL;
+
+    zoneProbesCellNI.resize(0);
+    zoneProbesCellNJ.resize(0);
+    zoneProbesCellNK.resize(0);
+
+    partialCFL = GlobalDataBase::GetDoubleParaFromDB("CFLEnd");
+
+
+ //   ordinaryGridIndex = -1;
+ //   for (int iDim = 0; iDim < THREE_D; ++ iDim)
+ //   {
+ //       ordinaryDimStartIndex[iDim] = 0;
+ //       ordinaryDimEndIndex  [iDim] = 0;
+ //   }
+    ordinaryGridIndex = -1;
+    for (int iDim = 0; iDim < THREE_D; ++ iDim)
+    {
+        ordinaryDimStartIndex[iDim] = 0;
+        ordinaryDimEndIndex  [iDim] = 0;
+    }
+}
+
+LIB_EXPORT void StructGrid::InitGrid(GridID *index, int level, int dim, int type)
+{
+    Grid::InitGrid(index, level, dim, STRUCTGRID);
+
+    nodeTopology  = new Geo_NodeTopo_Struct();
+    faceMetrics   = new Geo_FaceMetrics_Struct();
+    cellMetrics   = new Geo_CellMetrics_Struct();
+    multigridInfo = new Geo_MultiGridInfo_Struct();
+    dynamicGridMetrics = new Geo_DynamicGridMetrics_Struct();
+
+    int isOverset = GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+    if (isOverset)
+    {
+        gridUnstr = new UnstructGrid();
+    }
+
+    walldist = 0;
+    structBCSet = 0;
+    oversetGridTopology = new Geo_OversetGridTopo_Struct();
+}
+
+LIB_EXPORT StructGrid::~StructGrid()
+{
+    if (nodeTopology) { delete nodeTopology; nodeTopology = NULL; }
+    if (faceMetrics) { delete faceMetrics; faceMetrics = NULL; }
+    if (cellMetrics) { delete cellMetrics; cellMetrics = NULL; }
+    if (multigridInfo) { delete multigridInfo; multigridInfo = NULL; }
+    if (dynamicGridMetrics) { delete dynamicGridMetrics; dynamicGridMetrics = NULL; }
+    if (gridUnstr) { delete gridUnstr; gridUnstr = NULL; }
+    if (cellBoundaryType) { delete cellBoundaryType; cellBoundaryType = NULL; }
+    if (oversetGridTopology) { delete oversetGridTopology; oversetGridTopology = NULL; }
+    delete walldist;
+    if (nearestwallfacenormalx != NULL)
+    {
+        delete nearestwallfacenormalx;
+        nearestwallfacenormalx = NULL;
+    }
+
+    if (nearestwallfacenormaly != NULL)
+    {
+        delete nearestwallfacenormaly;
+        nearestwallfacenormaly = NULL;
+    }
+
+    if (nearestwallfacenormalz != NULL)
+    {
+        delete nearestwallfacenormalz;
+        nearestwallfacenormalz = NULL;
+    }
+    delete structBCSet;
+
+    if (DiscretePrecisionKXI) { delete DiscretePrecisionKXI; DiscretePrecisionKXI = NULL; }
+    if (DiscretePrecisionETA) { delete DiscretePrecisionETA; DiscretePrecisionETA = NULL; }
+    if (DiscretePrecisionCTA) { delete DiscretePrecisionCTA; DiscretePrecisionCTA = NULL; }
+
+    zoneProbesCellNI.clear();
+    zoneProbesCellNJ.clear();
+    zoneProbesCellNK.clear();
+
+    //! Added by Guo Yongheng 20160818.
+    //DeleteLinkPointStructure();
+    //DeleteCellContainer();
+    //DeleteCoreParameterContainer();
+}
+
+LIB_EXPORT void StructGrid::CreateCompositeBCRegion(int nBCRegion)
+{
+    if (!structBCSet)
+    {
+        structBCSet = new StructBCSet(this->GetZoneID());
+    }
+
+    structBCSet->CreateBCRegion(nBCRegion);
+}
+
+LIB_EXPORT void StructGrid::SetBCFaceInfo()
+{  
+    StructBCSet *structBCSet = this->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    
+    int imin, imax, jmin, jmax, kmin, kmax, bcType;
+    int nBoundFace = 0, nIFace = 0;
+
+    for (uint_t ibcregion = 0; ibcregion < nBCRegion; ++ ibcregion)
+    {
+        StructBC *bcRegion = structBCSet->GetBCRegion(ibcregion);
+        
+        bcRegion->GetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+        bcType = bcRegion->GetBCType();
+       
+        nBoundFace += (imax - imin + 1) * (jmax - jmin + 1) * (kmax - kmin + 1);
+       
+        if (IsInterface(bcType))
+        {
+            nIFace += (imax - imin + 1) * (jmax - jmin + 1) * (kmax - kmin + 1);
+        }
+    }
+
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+    int ndim = GetDim();
+
+    if (ndim == 2)
+    {
+        if (nBoundFace != 2 * ((ni-1) + (nj-1)))
+        {
+            PHMPI::FreeBlockData();
+            cout << "����region����ı߽�����nBoundFace������鱾���߽�������һ��!\n" << endl;
+            MPI_Abort(MPI_COMM_WORLD, -1);
+        }
+    }
+    else if (ndim == 3)
+    {
+        if (nBoundFace != 2 * ((ni-1)*(nj-1) + (ni-1)*(nk-1) + (nj-1)*(nk-1)))
+        {
+            PHMPI::FreeBlockData();
+            cout << "����region����ı߽�����nBoundFace������鱾���߽�������һ��!\n" << endl;
+            MPI_Abort(MPI_COMM_WORLD, -1);
+        }
+    }
+    this->SetNIFace(nIFace);
+    if (!structBCSet->GetIFaceInfo())structBCSet->SetIFaceInfo();
+    this->SetNBoundFace(nBoundFace);
+}
+
+LIB_EXPORT void StructGrid::CopyStructBCSet(StructBCSet *structBCSet)
+{
+    if (!this->structBCSet)
+    {
+        this->structBCSet = new StructBCSet(this->GetZoneID());
+    }
+    this->structBCSet->CopyStructBCSet(structBCSet);
+}
+
+LIB_EXPORT void StructGrid::CopyGrid(StructGrid *grid)
+{
+    CopyXYZ(grid->GetNI(), grid->GetNJ(), grid->GetNK(), grid->GetX(), grid->GetY(), grid->GetZ());
+    CopyStructBCSet(grid->GetStructBCSet());
+}
+
+
+LIB_EXPORT void StructGrid::GetSourceIndexIJK(int iFace, int ipos, int &i, int &j, int &k)
+{
+    this->structBCSet->GetSourceIndexIJK(iFace, ipos, i, j, k);
+}
+
+
+LIB_EXPORT void StructGrid::GetSourceIndexIJK_Nsurf_LR(int iFace, int ipos, int &i, int &j, int &k, int &nsurf, int &s_lr)
+{
+
+    this->structBCSet->GetSourceIndexIJK_Nsurf_LR(iFace, ipos, i, j, k, nsurf, s_lr);
+}
+
+LIB_EXPORT void StructGrid::GetTargetIndexIJK(int iFace, int ipos, int &i, int &j, int &k)
+{
+    this->structBCSet->GetTargetIndexIJK(iFace, ipos, i, j, k);
+}
+
+LIB_EXPORT void StructGrid::CopyXYZ(int ni, int nj, int nk, RDouble *xx, RDouble *yy, RDouble *zz)
+{
+    this->SetNI(ni);
+    this->SetNJ(nj);
+    this->SetNK(nk);
+
+    this->SetBasicDimension();
+
+    int nTotalNode = this->GetNTotalNode();
+
+    RDouble *x = new RDouble [nTotalNode];
+    RDouble *y = new RDouble [nTotalNode];
+    RDouble *z = new RDouble [nTotalNode];
+
+    this->SetX(x);
+    this->SetY(y);
+    this->SetZ(z);
+    this->SetArrayLayout();
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        x[iNode] = xx[iNode];
+        y[iNode] = yy[iNode];
+        z[iNode] = zz[iNode];
+    }
+    cout << "ni, nj, nk = " << ni << " " << nj  << " " << nk << "\n";
+    ComputeMinMaxBox();
+}
+
+LIB_EXPORT RDouble3D & StructGrid::GetVolume(int istep) const
+{
+    return * GetCellVolume();
+}
+
+LIB_EXPORT void StructGrid::Action(ActionKey *actkey)
+{
+    switch (actkey->action)
+    {
+    case WRITE_WALL_DIST:
+        DumpWalldist(actkey);
+        break;
+    case COMMCELLCENTERDATA:
+        GetCellCenter(actkey);
+        break;
+    case COMMCELLIBLANK:
+        GetCellIBlank(actkey);
+        break;
+    case SIMPLE_ACTION:
+        SimpleAction(actkey);
+        break;
+    case ALLOCATE_WALL_DIST:
+        AllocateWalldist();
+        break;
+    default:
+        break;
+    }
+}
+
+void StructGrid::SimpleAction(ActionKey *actkey)
+{
+    RDouble value;
+    GetData(actkey->taskname, &value, PHDOUBLE, 1);
+
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+    cdata->write(&value, sizeof(RDouble));
+}
+
+LIB_EXPORT void StructGrid::ActionReflect(ActionTag *acttag)
+{
+}
+
+LIB_EXPORT void StructGrid::TranslateAction(ActionKey *actkey)
+{
+    if (actkey->action == COMMCELLCENTERDATA)
+    {
+        TranslateCellCenter(actkey);
+    }
+    else if (actkey->action == COMMCELLIBLANK)
+    {
+        TranslateCellIBlank(actkey);
+    }
+}
+
+LIB_EXPORT streamsize StructGrid::TranslateActionLength(ActionKey *actkey)
+{
+    if (actkey->action == COMMCELLCENTERDATA)
+    {
+        return TranslateCellCenterLength(actkey);
+    }
+    return 0;
+}
+
+LIB_EXPORT void StructGrid::AllocateWalldist()
+{
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    walldist = new RDouble3D(I, J, K, fortranArray);
+    nearestwallfacenormalx = new RDouble3D(I, J, K, fortranArray);
+    nearestwallfacenormaly = new RDouble3D(I, J, K, fortranArray);
+    nearestwallfacenormalz = new RDouble3D(I, J, K, fortranArray);
+}
+
+void StructGrid::ReadWalldist(RDouble *wallDistIn)
+{
+    RDouble3D &walldist = * this->GetWallDist();
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int count = 0;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                walldist(i, j, k) = wallDistIn[count];
+                count ++;
+            }
+        }
+    }
+}
+
+void StructGrid::ReadNearestwallfacenormalx(RDouble* nearestwallfaceNormalxIn)
+{
+    RDouble3D& nearestwallfacenormalx = *this->GetNearestWallFaceNormalX();
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int count = 0;
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                nearestwallfacenormalx(i, j, k) = nearestwallfaceNormalxIn[count];
+                count++;
+            }
+        }
+    }
+}
+
+void StructGrid::ReadNearestwallfacenormaly(RDouble* nearestwallfaceNormalyIn)
+{
+    RDouble3D& nearestwallfacenormaly = *this->GetNearestWallFaceNormalY();
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int count = 0;
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                nearestwallfacenormaly(i, j, k) = nearestwallfaceNormalyIn[count];
+                count++;
+            }
+        }
+    }
+}
+
+void StructGrid::ReadNearestwallfacenormalz(RDouble* nearestwallfaceNormalzIn)
+{
+    RDouble3D& nearestwallfacenormalz = *this->GetNearestWallFaceNormalZ();
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int count = 0;
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                nearestwallfacenormalz(i, j, k) = nearestwallfaceNormalzIn[count];
+                count++;
+            }
+        }
+    }
+}
+LIB_EXPORT void StructGrid::WriteFaceBC(fstream &file)
+{
+    VirtualFile *virtualFile = new VirtualFile(&file);
+    virtualFile->BeginWriteWork();
+
+    int iZone = this->GetGridID()->GetIndex();
+    PHWrite(virtualFile, iZone);
+
+    StructBCSet *structBCSet = this->GetStructBCSet();
+
+    int nBCRegion = static_cast<int> (structBCSet->GetnBCRegion());
+
+    PHWrite(virtualFile, nBCRegion);
+
+    string *bcNameList = new string [nBCRegion];
+
+    //StringSizeType totalSize = 0;
+    uint_long totalSize = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion ++)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+        string bcName = structBC->GetBCName();
+        int bctype = structBC->GetBCType();
+        if (bcName == "")
+        {
+            if (bctype == -1)
+            {
+                bcName = "Connection";
+            }
+            else
+            {
+               
+                bcName = structBCSet->GetBCName(bctype);
+                if ((bctype > 7) && (bctype < 51))
+                {
+                    bctype = 2;
+                    structBC->SetBCType(bctype);
+                }
+            }
+            structBC->SetBCName(bcName);
+        }
+
+        bcNameList[iBCRegion] = bcName;
+
+        //totalSize += bcNameList[iBCRegion].size();
+        totalSize += static_cast< uint_long > (bcNameList[iBCRegion].size());
+        totalSize += 1;
+    }
+
+    char *bcNameChar = new char [totalSize];
+    unsigned int count = 0;
+  
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        string &bcName = bcNameList[iBCRegion];
+        streamsize nameSize = bcName.size();
+        for (unsigned int iChar = 0; iChar < nameSize; ++ iChar)
+        {
+            bcNameChar[count ++] = bcName[iChar];
+        }
+        bcNameChar[count ++] = '\0';
+    }
+
+    PHWrite(virtualFile, totalSize);
+    PHWrite(virtualFile, bcNameChar, static_cast<int>(totalSize));
+
+    delete [] bcNameList;
+    delete [] bcNameChar;
+
+    virtualFile->EndWriteWork();
+
+    delete virtualFile;
+}
+
+void StructGrid::DumpWalldist(ActionKey *actkey)
+{
+    int nTotalCell = this->GetNTotalCell();
+
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+
+    RDouble3D &walldist = * this->GetWallDist();
+    RDouble3D &nearestwallfacenormalx = * this->GetNearestWallFaceNormalX();
+    RDouble3D &nearestwallfacenormaly = * this->GetNearestWallFaceNormalY();
+    RDouble3D &nearestwallfacenormalz = * this->GetNearestWallFaceNormalZ();
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    cdata->write(&nTotalCell, sizeof(int));
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                cdata->write(&walldist(i, j, k), sizeof(RDouble));
+            }
+        }
+    }
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                cdata->write(&nearestwallfacenormalx(i, j, k), sizeof(RDouble));
+            }
+        }
+    }
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                cdata->write(&nearestwallfacenormaly(i, j, k), sizeof(RDouble));
+            }
+        }
+    }
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                cdata->write(&nearestwallfacenormalz(i, j, k), sizeof(RDouble));
+            }
+        }
+    }
+}
+
+LIB_EXPORT void StructGrid::CompNodeVar(RDouble4D &q_n, RDouble4D &q)
+{
+    int nk = this->GetNK();
+
+    int nl = 5;
+    GetData("nl", &nl, PHINT, 1);
+
+    int il1 = 1;
+    int jl1 = 1;
+    int kl1 = 1;
+    if (nk == 1) kl1 = 0;
+
+    int il, jl, kl;
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetNodeIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    Range M(0, nl-1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    il = i - il1;
+                    jl = j - jl1;
+                    kl = k - kl1;
+                    q_n(i, j, k, m) = eighth * (q(il, jl, kl, m) + q(il, j, kl, m) + q(i, jl, kl, m) + q(i, j, kl, m) +
+                                                q(il, jl, k , m) + q(il, j, k , m) + q(i, jl, k , m) + q(i, j, k , m));
+                }
+            }
+        }
+    }
+}
+
+LIB_EXPORT void StructGrid::FaceCoor(int i, int j, int k, int nsurf, RDouble &xc, RDouble &yc, RDouble &zc)
+{
+    int nk = GetNK();
+    int il1 = 1;
+    int jl1 = 1;
+    int kl1 = 1;
+    if (nk == 1) kl1 = 0;
+
+    int il, jl, kl;
+
+    il = i + il1;
+    jl = j + jl1;
+    kl = k + kl1;
+
+    RDouble3D &structx = * this->GetStructX();
+    RDouble3D &structy = * this->GetStructY();
+    RDouble3D &structz = * this->GetStructZ();
+
+    if (nsurf == 1)
+    {
+        xc = fourth * (structx(i, j, k) + structx(i, jl, k) + structx(i, jl, kl) + structx(i, j, kl));
+        yc = fourth * (structy(i, j, k) + structy(i, jl, k) + structy(i, jl, kl) + structy(i, j, kl));
+        zc = fourth * (structz(i, j, k) + structz(i, jl, k) + structz(i, jl, kl) + structz(i, j, kl));
+    }
+    else if (nsurf == 2)
+    {
+        xc = fourth * (structx(i, j, k) + structx(il, j, k) + structx(il, j, kl) + structx(i, j, kl));
+        yc = fourth * (structy(i, j, k) + structy(il, j, k) + structy(il, j, kl) + structy(i, j, kl));
+        zc = fourth * (structz(i, j, k) + structz(il, j, k) + structz(il, j, kl) + structz(i, j, kl));
+    }
+    else if (nsurf == 3)
+    {
+        xc = fourth * (structx(i, j, k) + structx(il, j, k) + structx(il, jl, k) + structx(i, jl, k));
+        yc = fourth * (structy(i, j, k) + structy(il, j, k) + structy(il, jl, k) + structy(i, jl, k));
+        zc = fourth * (structz(i, j, k) + structz(il, j, k) + structz(il, jl, k) + structz(i, jl, k));
+    }
+}
+
+LIB_EXPORT void StructGrid::CenterCoor(int i, int j, int k, RDouble &xc, RDouble &yc, RDouble &zc)
+{
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+    int nk = GetNK();
+
+    int il1 = 1;
+    int jl1 = 1;
+    int kl1 = 1;
+    if (nk == 1) kl1 = 0;
+
+    int il, jl, kl;
+
+    il = i + il1;
+    jl = j + jl1;
+    kl = k + kl1;
+
+    xc = eighth * (xx(i, j, k) + xx(il, j, k) + xx(il, jl, k) + xx(i, jl, k)
+                  + xx(i, j, kl) + xx(il, j, kl) + xx(il, jl, kl) + xx(i, jl, kl));
+    yc = eighth * (yy(i, j, k) + yy(il, j, k) + yy(il, jl, k) + yy(i, jl, k)
+                  + yy(i, j, kl) + yy(il, j, kl) + yy(il, jl, kl) + yy(i, jl, kl));
+    zc = eighth * (zz(i, j, k) + zz(il, j, k) + zz(il, jl, k) + zz(i, jl, k)
+                  + zz(i, j, kl) + zz(il, j, kl) + zz(il, jl, kl) + zz(i, jl, kl));
+}
+
+LIB_EXPORT void StructGrid::SetArrayLayout()
+{
+    RDouble *x = GetX();
+    RDouble *y = GetY();
+    RDouble *z = GetZ();
+    if (x && y && z)
+    {
+        nodeTopology->SetArrayLayout(x, y ,z);
+    }
+}
+
+LIB_EXPORT void StructGrid::AllocateMetrics(ActionKey *actkey)
+{
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+    Range D(1, 3);
+
+    faceMetrics->AllocateMetrics(I, J, K, D);
+    cellMetrics->AllocateMetrics(I, J, K);
+
+    RDouble4D *vgn = dynamicGridMetrics->GetFaceNormalVelocity();
+    if (vgn == NULL) vgn = new RDouble4D(I, J, K, Range(1, 3), fortranArray);
+
+    AllocateMetricsALE(actkey);
+
+    (*vgn) = zero;
+    dynamicGridMetrics->SetFaceNormalVelocity(vgn);
+}
+
+void StructGrid::AllocateMetricsALE(ActionKey *actkey)
+{
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    Range IFACE, JFACE, KFACE;
+    GetRange(ni, nj, nk, -2, 2, IFACE, JFACE, KFACE);
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+    Range D(1, 3);
+
+    //! codeOfAleModel = 0: no ALE method;
+    //!        1: ALE method for non-moving grids;
+    //!        2: ALE method for moving grids;
+    //!        3: ALE method for deforming grids.
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+
+    RDouble4D *faceVelocityX = dynamicGridMetrics->GetFaceVelocityX();
+    RDouble4D *faceVelocityY = dynamicGridMetrics->GetFaceVelocityY();
+    RDouble4D *faceVelocityZ = dynamicGridMetrics->GetFaceVelocityZ();
+    RDouble3D *voln = dynamicGridMetrics->GetCellVolumeOld();
+
+    if (isUnsteady && isAle)
+    {
+        if (faceVelocityX == NULL)
+        {
+            faceVelocityX = new RDouble4D(I, J, K, Range(1, 3), fortranArray);
+            (*faceVelocityX) = zero;
+        }
+        if (faceVelocityY == NULL)
+        {
+            faceVelocityY = new RDouble4D(I, J, K, Range(1, 3), fortranArray);
+            (*faceVelocityY) = zero;
+        }
+        if (faceVelocityZ == NULL)
+        {
+            faceVelocityZ = new RDouble4D(I, J, K, Range(1, 3), fortranArray);
+            (*faceVelocityZ) = zero;
+        }
+    }
+
+    if (isUnsteady && isAle)
+    {
+        if (voln == NULL) voln = new RDouble3D(I, J, K, fortranArray);
+    }
+    else
+    {
+        if (!isAle)
+        {
+            //voln = vol;
+            voln = 0;    //! This is not sure.
+        }
+    }
+
+    dynamicGridMetrics->SetFaceVelocityX(faceVelocityX);
+    dynamicGridMetrics->SetFaceVelocityY(faceVelocityY);
+    dynamicGridMetrics->SetFaceVelocityZ(faceVelocityZ);
+    dynamicGridMetrics->SetCellVolumeOld(voln);
+}
+
+void ModifyWallTemperature(const string& name, Grid *grid_in, RDouble4D &qn)
+{
+    if ((name != "temperature") && (name != "temperature_Dim"))
+    {
+        return;
+    }
+
+    if (GetDim() == TWO_D)
+    {
+        return;
+    }
+
+    StructGrid *grid = StructGridCast(grid_in);
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!(IsWall(BCType)))
+        {
+            continue;
+        }
+
+        RDouble wallTemperature;
+        structBC->GetParamData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+
+        bool wallTempArrayExist = false;
+        RDouble3D* wallTempArray = NULL;
+        if (structBC->CheckFieldData("wallTempArray"))
+        {
+            wallTempArrayExist = true;
+            wallTempArray = reinterpret_cast <RDouble3D*> (structBC->GetFieldDataPtr("wallTempArray"));
+        }
+
+        if ((wallTemperature <= 0.0) && (!wallTempArrayExist))
+        {
+            continue;
+        }
+
+        if (name == "temperature")
+        {
+            RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+            wallTemperature = wallTemperature / refDimensionalTemperature;
+        }
+
+        int *s_st = structBC->GetStartPoint();
+        int *s_ed = structBC->GetEndPoint();
+        int *s_lr3d = structBC->GetFaceDirectionIndex();
+
+        int nodeIndexStart[3];
+        int nodeIndexEnd[3];
+
+        for (int iDim = 0; iDim < 3; ++ iDim)
+        {
+            nodeIndexStart[iDim] = s_st[iDim];
+            nodeIndexEnd  [iDim] = s_ed[iDim];
+        }
+
+        for (int m = 0; m < GetDim(); ++m)
+        {
+            if (structBC->GetFaceDirection() == m)
+            {
+                if (s_st[m] > 1 || s_lr3d[m] == 1)
+                {
+                    nodeIndexStart[m] += 1;
+                    nodeIndexEnd[m] += 1;
+                }
+            }
+            else
+            {
+                nodeIndexEnd[m] += 1;
+            }
+        }
+
+        if (!wallTempArrayExist)
+        {
+            for (int kNode = nodeIndexStart[2]; kNode <= nodeIndexEnd[2]; ++kNode)
+            {
+                for (int jNode = nodeIndexStart[1]; jNode <= nodeIndexEnd[1]; ++jNode)
+                {
+                    for (int iNode = nodeIndexStart[0]; iNode <= nodeIndexEnd[0]; ++iNode)
+                    {
+                        qn(iNode, jNode, kNode, 0) = wallTemperature;
+                    }
+                }
+            }
+        }
+        else
+        {
+            int nSurface = structBC->GetFaceDirection() + 1;
+
+            int id, jd, kd;
+            GetBCFaceIDX(s_lr3d, id, jd, kd);
+
+            for (int kNode = nodeIndexStart[2]; kNode <= nodeIndexEnd[2]; ++kNode)
+            {
+                for (int jNode = nodeIndexStart[1]; jNode <= nodeIndexEnd[1]; ++jNode)
+                {
+                    for (int iNode = nodeIndexStart[0]; iNode <= nodeIndexEnd[0]; ++iNode)
+                    {
+                        int iLeftCell, iRightCell, jLeftCell, jRightCell, kLeftCell, kRightCell;
+
+                        if (iNode == nodeIndexStart[0])
+                        {
+                            iLeftCell = iNode;
+                        }
+                        else
+                        {
+                            iLeftCell = iNode - 1;
+                        }
+
+                        if (iNode == nodeIndexEnd[0])
+                        {
+                            iRightCell = iNode - 1;
+                        }
+                        else
+                        {
+                            iRightCell = iNode;
+                        }
+
+                        if (nSurface == 1)
+                        {
+                            iLeftCell = iNode - id;
+                            iRightCell = iNode - id;
+                        }
+
+                        if (jNode == nodeIndexStart[1])
+                        {
+                            jLeftCell = jNode;
+                        }
+                        else
+                        {
+                            jLeftCell = jNode - 1;
+                        }
+
+                        if (jNode == nodeIndexEnd[1])
+                        {
+                            jRightCell = jNode - 1;
+                        }
+                        else
+                        {
+                            jRightCell = jNode;
+                        }
+
+                        if (nSurface == 2)
+                        {
+                            jLeftCell = jNode - jd;
+                            jRightCell = jNode - jd;
+                        }
+
+                        if (GetDim() == THREE_D)
+                        {
+                            if (kNode == nodeIndexStart[2])
+                            {
+                                kLeftCell = kNode;
+                            }
+                            else
+                            {
+                                kLeftCell = kNode - 1;
+                            }
+
+                            if (kNode == nodeIndexEnd[2])
+                            {
+                                kRightCell = kNode - 1;
+                            }
+                            else
+                            {
+                                kRightCell = kNode;
+                            }
+
+                            if (nSurface == 3)
+                            {
+                                kLeftCell = kNode - kd;
+                                kRightCell = kNode - kd;
+                            }
+                        }
+                        else
+                        {
+                            kLeftCell = 1;
+                            kRightCell = 1;
+                        }
+
+                        qn(iNode, jNode, kNode, 0) = eighth * ((*wallTempArray)(iLeftCell, jLeftCell, kLeftCell) + (*wallTempArray)(iLeftCell, jRightCell, kLeftCell) +
+                            (*wallTempArray)(iLeftCell , jLeftCell, kRightCell) + (*wallTempArray)(iLeftCell , jRightCell, kRightCell) +
+                            (*wallTempArray)(iRightCell, jLeftCell, kLeftCell ) + (*wallTempArray)(iRightCell, jRightCell, kLeftCell ) +
+                            (*wallTempArray)(iRightCell, jLeftCell, kRightCell) + (*wallTempArray)(iRightCell, jRightCell, kRightCell));
+                    }
+                }
+            }
+        }
+
+        /*for (int m = 0; m < GetDim(); ++ m)
+        {
+            if (structBC->GetFaceDirection() == m)
+            {
+                if (s_st[m] > 1 || s_lr3d[m] == 1)
+                {
+                    nodeIndexStart[m] += 1;
+                    nodeIndexEnd  [m] += 1;
+                }
+            }
+            else
+            {
+                nodeIndexEnd[m] += 1;
+            }
+        }
+
+        int ist = nodeIndexStart[0];
+        int ied = nodeIndexEnd  [0];
+
+        int jst = nodeIndexStart[1];
+        int jed = nodeIndexEnd  [1];
+
+        int kst = nodeIndexStart[2];
+        int ked = nodeIndexEnd  [2];
+
+        int nsurf = structBC->GetFaceDirection();
+        if (nsurf == 0)
+        {
+            for (int iNode = jst; iNode <= jed; ++ iNode)
+            {
+                qn(ist, iNode, kst, 0) = qn(ist, iNode, kst + 1, 0);
+                qn(ist, iNode, ked, 0) = qn(ist, iNode, ked - 1, 0);
+            }
+
+            for (int iNode = kst; iNode <= ked; ++ iNode)
+            {
+                qn(ist, jst, iNode, 0) = qn(ist, jst + 1, iNode, 0);
+                qn(ist, jed, iNode, 0) = qn(ist, jed - 1, iNode, 0);
+            }
+
+            qn(ist, jst, kst, 0) = qn(ist, jst + 1, kst + 1, 0);
+            qn(ist, jed, kst, 0) = qn(ist, jed - 1, kst + 1, 0);
+            qn(ist, jst, ked, 0) = qn(ist, jst + 1, ked - 1, 0);
+            qn(ist, jed, ked, 0) = qn(ist, jed - 1, ked - 1, 0);
+        }
+
+        if (nsurf == 1)
+        {
+            for (int iNode = ist; iNode <= ied; ++ iNode)
+            {
+                qn(iNode, jst, kst, 0) = qn(iNode, jst, kst + 1, 0);
+                qn(iNode, jst, ked, 0) = qn(iNode, jst, ked - 1, 0);
+            }
+
+            for (int iNode = kst; iNode <= ked; ++ iNode)
+            {
+                qn(ist, jst, iNode, 0) = qn(ist + 1, jst, iNode, 0);
+                qn(ied, jst, iNode, 0) = qn(ied - 1, jst, iNode, 0);
+            }
+
+            qn(ist, jst, kst, 0) = qn(ist + 1, jst, kst + 1, 0);
+            qn(ied, jst, kst, 0) = qn(ied - 1, jst, kst + 1, 0);
+            qn(ist, jst, ked, 0) = qn(ist + 1, jst, ked - 1, 0);
+            qn(ied, jst, ked, 0) = qn(ied - 1, jst, ked - 1, 0);
+        }
+
+        if (nsurf == 2)
+        {
+            for (int iNode = ist; iNode <= ied; ++ iNode)
+            {
+                qn(iNode, jst, kst, 0) = qn(iNode, jst + 1, kst, 0);
+                qn(iNode, jed, kst, 0) = qn(iNode, jed - 1, kst, 0);
+            }
+
+            for (int iNode = jst; iNode <= jed; ++ iNode)
+            {
+                qn(ist, iNode, kst, 0) = qn(ist + 1, iNode, kst, 0);
+                qn(ied, iNode, kst, 0) = qn(ied - 1, iNode, kst, 0);
+            }
+
+            qn(ist, jst, kst, 0) = qn(ist + 1, jst + 1, kst, 0);
+            qn(ied, jst, kst, 0) = qn(ied - 1, jst + 1, kst, 0);
+            qn(ist, jed, kst, 0) = qn(ist + 1, jed - 1, kst, 0);
+            qn(ied, jed, kst, 0) = qn(ied - 1, jed - 1, kst, 0);
+        }*/
+    }
+}
+
+void ModifyBoundaryNodeValue(const string &name, Grid *grid_in, RDouble4D &qn, RDouble3D &cellCenterData, int bcType)
+{
+    StructGrid* grid_str = StructGridCast(grid_in);
+    int ni = grid_str->GetNI();
+    int nj = grid_str->GetNJ();
+    int nk = grid_str->GetNK();
+
+    Range I(-1, ni + 1);
+    Range J(-1, nj + 1);
+    Range K(-1, nk + 1);
+    if (nk == 1) K.setRange(1, 1);
+
+    RDouble3D* faceData = new RDouble3D(I, J, K, fortranArray);
+    string faceDataName = name + "_face";
+
+    StructBCSet *compositeBCRegion = grid_str->GetStructBCSet();
+    int nBCRegion = compositeBCRegion->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++iBCRegion)
+    {
+        StructBC* structBC = compositeBCRegion->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+        if (BCType != bcType)
+        {
+            continue;
+        }
+
+        int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    int iCellGhostLayer = 0;
+                    int jCellGhostLayer = 0;
+                    int kCellGhostLayer = 0;
+
+                    structBC->GetGhostCellIndex(i, j, k, iCellGhostLayer, jCellGhostLayer, kCellGhostLayer, ONE_GHOST_LAYER);
+
+                    (*faceData)(i, j, k) = half * (cellCenterData(i, j, k) + cellCenterData(iCellGhostLayer, jCellGhostLayer, kCellGhostLayer));
+                }
+            }
+        }
+    }
+
+    GhostCell3D(*faceData, ni, nj, nk);
+    CommunicateInterfaceValue(grid_str, faceData, faceDataName);
+
+    Int3D& cellType = *grid_str->GetCellBoundaryType();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++iBCRegion)
+    {
+        StructBC* structBC = compositeBCRegion->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+        if (BCType != bcType)
+        {
+            continue;
+        }
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        int s_nd = structBC->GetFaceDirection();
+        if (s_nd == 0)
+        {
+            ked++;
+            jed++;
+        }
+        else if (s_nd == 1)
+        {
+            ied++;
+            ked++;
+        }
+        else
+        {
+            ied++;
+            jed++;
+        }
+
+        if (GetDim() == TWO_D)
+        {
+            ked = 1;
+        }
+
+        int* s_lr3d = structBC->GetFaceDirectionIndex();
+        int nSurface = structBC->GetFaceDirection() + 1;
+        int id, jd, kd;
+        GetBCFaceIDX(s_lr3d, id, jd, kd);
+
+        kst += kd;
+        ked += kd;
+        jst += jd;
+        jed += jd;
+        ist += id;
+        ied += id;
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    int iIndex = i - id;
+                    int jIndex = j - jd;
+                    int kIndex = k - kd;
+                    if (i == ied && nSurface != 1) iIndex = i - 1;
+                    if (j == jed && nSurface != 2) jIndex = j - 1;
+                    if (k == ked && nSurface != 3) kIndex = k - 1;
+                    if (GetDim() == TWO_D) kIndex = 1;
+
+                    int iLeftCell, iRightCell, jLeftCell, jRightCell, kLeftCell, kRightCell;
+                    if ((i == ist) && (cellType(i - 1, jIndex, kIndex) != BCType))
+                    {
+                        iLeftCell = i;
+                    }
+                    else
+                    {
+                        iLeftCell = i - 1;
+                    }
+
+                    if (i == ied && cellType(i, jIndex, kIndex) != BCType)
+                    {
+                        iRightCell = i - 1;
+                    }
+                    else
+                    {
+                        iRightCell = i;
+                    }
+
+                    if (nSurface == 1)
+                    {
+                        iLeftCell = i - id;
+                        iRightCell = i - id;
+                    }
+
+                    if (j == jst && cellType(iIndex, j - 1, kIndex) != BCType)
+                    {
+                        jLeftCell = j;
+                    }
+                    else
+                    {
+                        jLeftCell = j - 1;
+                    }
+
+                    if (j == jed && cellType(iIndex, j, kIndex) != BCType)
+                    {
+                        jRightCell = j - 1;
+                    }
+                    else
+                    {
+                        jRightCell = j;
+                    }
+
+                    if (nSurface == 2)
+                    {
+                        jLeftCell = j - jd;
+                        jRightCell = j - jd;
+                    }
+
+                    if (GetDim() == 3)
+                    {
+                        if (k == kst && cellType(iIndex, jIndex, k - 1) != BCType)
+                        {
+                            kLeftCell = k;
+                        }
+                        else
+                        {
+                            kLeftCell = k - 1;
+                        }
+
+                        if (k == ked && cellType(iIndex, jIndex, k) != BCType)
+                        {
+                            kRightCell = k - 1;
+                        }
+                        else
+                        {
+                            kRightCell = k;
+                        }
+
+                        if (nSurface == 3)
+                        {
+                            kLeftCell = k - kd;
+                            kRightCell = k - kd;
+                        }
+                    }
+                    else
+                    {
+                        kLeftCell = 1;
+                        kRightCell = 1;
+                    }
+
+                    qn(i, j, k, 0) = eighth * ((*faceData)(iLeftCell, jLeftCell, kLeftCell) + (*faceData)(iLeftCell, jRightCell, kLeftCell) +
+                        (*faceData)(iLeftCell, jLeftCell, kRightCell) + (*faceData)(iLeftCell, jRightCell, kRightCell) +
+                        (*faceData)(iRightCell, jLeftCell, kLeftCell) + (*faceData)(iRightCell, jRightCell, kLeftCell) +
+                        (*faceData)(iRightCell, jLeftCell, kRightCell) + (*faceData)(iRightCell, jRightCell, kRightCell));
+                }
+            }
+        }
+    }
+
+    delete faceData;
+}
+
+void ModifyBoundaryNodeValue(const string &name, Grid *grid_in, RDouble4D &qn, RDouble4D &cellCenterData, int index, int bcType)
+{
+    StructGrid *grid_str = StructGridCast(grid_in);
+    int ni = grid_str->GetNI();
+    int nj = grid_str->GetNJ();
+    int nk = grid_str->GetNK();
+
+    Range I(-1, ni + 1);
+    Range J(-1, nj + 1);
+    Range K(-1, nk + 1);
+    if (nk == 1) K.setRange(1, 1);
+
+    RDouble3D *faceData = new RDouble3D(I, J, K, fortranArray);
+    string faceDataName = name + "_face";
+
+    StructBCSet *compositeBCRegion = grid_str->GetStructBCSet();
+    int nBCRegion = compositeBCRegion->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = compositeBCRegion->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+        if (BCType != bcType)
+        {
+            continue;
+        }
+
+        int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    int iCellGhostLayer = 0;
+                    int jCellGhostLayer = 0;
+                    int kCellGhostLayer = 0;
+
+                    structBC->GetGhostCellIndex(i, j, k, iCellGhostLayer, jCellGhostLayer, kCellGhostLayer, ONE_GHOST_LAYER);
+
+                    (*faceData)(i, j, k) = half * (cellCenterData(i, j, k, index) + cellCenterData(iCellGhostLayer, jCellGhostLayer, kCellGhostLayer, index));
+                }
+            }
+        }
+    }
+
+    GhostCell3D(*faceData, ni, nj, nk);
+    CommunicateInterfaceValue(grid_str, faceData, faceDataName);
+
+    Int3D &cellType = *grid_str->GetCellBoundaryType();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC* structBC = compositeBCRegion->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+        if (BCType != bcType)
+        {
+            continue;
+        }
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        int s_nd = structBC->GetFaceDirection();
+        if (s_nd == 0)
+        {
+            ked ++;
+            jed ++;
+        }
+        else if (s_nd == 1)
+        {
+            ied ++;
+            ked ++;
+        }
+        else
+        {
+            ied ++;
+            jed ++;
+        }
+
+        if (GetDim() == TWO_D)
+        {
+            ked = 1;
+        }
+
+        int *s_lr3d = structBC->GetFaceDirectionIndex();
+        int nSurface = structBC->GetFaceDirection() + 1;
+        int id, jd, kd;
+        GetBCFaceIDX(s_lr3d, id, jd, kd);
+
+        kst += kd;
+        ked += kd;
+        jst += jd;
+        jed += jd;
+        ist += id;
+        ied += id;
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    int iIndex = i - id;
+                    int jIndex = j - jd;
+                    int kIndex = k - kd;
+                    if (i == ied && nSurface != 1) iIndex = i - 1;
+                    if (j == jed && nSurface != 2) jIndex = j - 1;
+                    if (k == ked && nSurface != 3) kIndex = k - 1;
+                    if (GetDim() == TWO_D) kIndex = 1;
+
+                    int iLeftCell, iRightCell, jLeftCell, jRightCell, kLeftCell, kRightCell;
+                    if ((i == ist) && (cellType(i - 1, jIndex, kIndex) != BCType))
+                    {
+                        iLeftCell = i;
+                    }
+                    else
+                    {
+                        iLeftCell = i - 1;
+                    }
+
+                    if (i == ied && cellType(i, jIndex, kIndex) != BCType)
+                    {
+                        iRightCell = i - 1;
+                    }
+                    else
+                    {
+                        iRightCell = i;
+                    }
+
+                    if (nSurface == 1)
+                    {
+                        iLeftCell = i - id;
+                        iRightCell = i - id;
+                    }
+
+                    if (j == jst && cellType(iIndex, j - 1, kIndex) != BCType)
+                    {
+                        jLeftCell = j;
+                    }
+                    else
+                    {
+                        jLeftCell = j - 1;
+                    }
+
+                    if (j == jed && cellType(iIndex, j, kIndex) != BCType)
+                    {
+                        jRightCell = j - 1;
+                    }
+                    else
+                    {
+                        jRightCell = j;
+                    }
+
+                    if (nSurface == 2)
+                    {
+                        jLeftCell = j - jd;
+                        jRightCell = j - jd;
+                    }
+
+                    if (GetDim() == 3)
+                    {
+                        if (k == kst && cellType(iIndex, jIndex, k - 1) != BCType)
+                        {
+                            kLeftCell = k;
+                        }
+                        else
+                        {
+                            kLeftCell = k - 1;
+                        }
+
+                        if (k == ked && cellType(iIndex, jIndex, k) != BCType)
+                        {
+                            kRightCell = k - 1;
+                        }
+                        else
+                        {
+                            kRightCell = k;
+                        }
+
+                        if (nSurface == 3)
+                        {
+                            kLeftCell = k - kd;
+                            kRightCell = k - kd;
+                        }
+                    }
+                    else
+                    {
+                        kLeftCell = 1;
+                        kRightCell = 1;
+                    }
+
+                    qn(i, j, k, 0) = eighth * ((*faceData)(iLeftCell, jLeftCell, kLeftCell) + (*faceData)(iLeftCell, jRightCell, kLeftCell) +
+                        (*faceData)(iLeftCell, jLeftCell, kRightCell) + (*faceData)(iLeftCell, jRightCell, kRightCell) +
+                        (*faceData)(iRightCell, jLeftCell, kLeftCell) + (*faceData)(iRightCell, jRightCell, kLeftCell) +
+                        (*faceData)(iRightCell, jLeftCell, kRightCell) + (*faceData)(iRightCell, jRightCell, kRightCell));
+                }
+            }
+        }
+    }
+
+    delete faceData;
+}
+
+void StructGrid::ComputeCellBoundaryType()
+{
+    if (cellBoundaryType == NULL)
+    {
+        int ni = this->GetNI();
+        int nj = this->GetNJ();
+        int nk = this->GetNK();
+
+        Range I, J, K;
+        GetRange(ni, nj, nk, -2, 1, I, J, K);
+        cellBoundaryType = new Int3D(I, J, K, fortranArray);
+        Int3D &cellType = *this->cellBoundaryType;
+
+        cellType(I, J, K) = 0;
+
+        StructBCSet *compositeBCRegion = this->GetStructBCSet();
+        int nBCRegion = compositeBCRegion->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            StructBC* structBC = compositeBCRegion->GetBCRegion(iBCRegion);
+            int BCType = structBC->GetBCType();
+
+            if (BCType == PHENGLEI::INTERFACE
+             || BCType == PHENGLEI::SOLID_SURFACE
+             || BCType == PHENGLEI::ABLATION_SURFACE
+             || BCType == PHENGLEI::SYMMETRY)
+            {
+                continue;
+            }
+
+            int is, js, ks;
+            int iStart, iEnd, jStart, jEnd, kStart, kEnd;
+            structBC->GetIJKRegion(iStart, iEnd, jStart, jEnd, kStart, kEnd);
+
+            for (int k = kStart; k <= kEnd; ++k)
+            {
+                for (int j = jStart; j <= jEnd; ++j)
+                {
+                    for (int i = iStart; i <= iEnd; ++i)
+                    {
+                        //! First cell index inside flowfield.
+                        structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+                        RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+
+                        cellType(is, js, ks) = BCType;
+                    }
+                }
+            }
+        }
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++iBCRegion)
+        {
+            StructBC* structBC = compositeBCRegion->GetBCRegion(iBCRegion);
+            int BCType = structBC->GetBCType();
+
+            if (BCType != PHENGLEI::SYMMETRY)
+            {
+                continue;
+            }
+
+            int is, js, ks;
+            int iStart, iEnd, jStart, jEnd, kStart, kEnd;
+            structBC->GetIJKRegion(iStart, iEnd, jStart, jEnd, kStart, kEnd);
+
+            for (int k = kStart; k <= kEnd; ++k)
+            {
+                for (int j = jStart; j <= jEnd; ++j)
+                {
+                    for (int i = iStart; i <= iEnd; ++i)
+                    {
+                        //! First cell index inside flowfield.
+                        structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+                        RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+
+                        cellType(is, js, ks) = BCType;
+                    }
+                }
+            }
+        }
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++iBCRegion)
+        {
+            StructBC* structBC = compositeBCRegion->GetBCRegion(iBCRegion);
+            int BCType = structBC->GetBCType();
+
+            if ((BCType != PHENGLEI::SOLID_SURFACE) && (BCType != PHENGLEI::ABLATION_SURFACE))
+            {
+                continue;
+            }
+
+            int is, js, ks;
+            int iStart, iEnd, jStart, jEnd, kStart, kEnd;
+            structBC->GetIJKRegion(iStart, iEnd, jStart, jEnd, kStart, kEnd);
+
+            for (int k = kStart; k <= kEnd; ++k)
+            {
+                for (int j = jStart; j <= jEnd; ++j)
+                {
+                    for (int i = iStart; i <= iEnd; ++i)
+                    {
+                        //! First cell index inside flowfield.
+                        structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+                        RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+
+                        cellType(is, js, ks) = BCType;
+                    }
+                }
+            }
+        }
+    }
+}
+
+void StructGrid::CompressSpecificArrayToInterface(DataContainer *&dataContainer, const string &fieldName, const int &neighborZoneIndex, const int &nEquation)
+{
+    int level = this->GetLevel();
+    InterfaceInfo *interfaceInformation = this->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(this->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    if (0 == nEquation)
+    {
+        RDouble3D &fieldSend = *reinterpret_cast <RDouble3D *> (this->GetDataPtr(fieldName));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int iFace = interfaceIndexContainerForSend[iLocalFace];
+                int is, js, ks;
+                finestGrid->GetSourceIndexIJK(iFace, iGhostLayer + 1, is, js, ks);
+                finestGrid->RemapMultigridIJK(level, is, js, ks);
+                PHWrite(dataContainer, fieldSend(is, js, ks));
+            }
+        }
+    }
+    else
+    {
+        RDouble4D &fieldSend = *reinterpret_cast <RDouble4D *> (this->GetDataPtr(fieldName));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int iFace = interfaceIndexContainerForSend[iLocalFace];
+                int is, js, ks;
+                finestGrid->GetSourceIndexIJK(iFace, iGhostLayer + 1, is, js, ks);
+                finestGrid->RemapMultigridIJK(level, is, js, ks);
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    PHWrite(dataContainer, fieldSend(is, js, ks, m));
+                }
+            }
+        }
+    }
+}
+
+void StructGrid::DecompressArrayFromInterface(DataContainer *&dataContainer, const string &fieldName, const int &neighborZoneIndex, const int &nEquation)
+{
+    int level = this->GetLevel();
+    InterfaceInfo *interfaceInformation = this->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(this->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    if (0 == nEquation)
+    {
+        RDouble3D &fieldRecv = *reinterpret_cast <RDouble3D *> (this->GetDataPtr(fieldName));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int iFace = interfaceIndexContainerForReceive[iLocalFace];
+                int it, jt, kt;
+                finestGrid->GetTargetIndexIJK(iFace, iGhostLayer + 1, it, jt, kt);
+                finestGrid->RemapMultigridIJK(level, it, jt, kt);
+                PHRead(dataContainer, fieldRecv(it, jt, kt));
+            }
+        }
+    }
+    else
+    {
+        RDouble4D &fieldRecv = *reinterpret_cast <RDouble4D *> (this->GetDataPtr(fieldName));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int iFace = interfaceIndexContainerForReceive[iLocalFace];
+                int it, jt, kt;
+                finestGrid->GetTargetIndexIJK(iFace, iGhostLayer + 1, it, jt, kt);
+                finestGrid->RemapMultigridIJK(level, it, jt, kt);
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    PHRead(dataContainer, fieldRecv(it, jt, kt, m));
+                }
+            }
+        }
+    }
+}
+
+LIB_EXPORT void StructGrid::ComputeMetrics(ActionKey *actkey)
+{
+    int isFVMOrFDM = PHSPACE::GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+
+    if (isFVMOrFDM == FD_METHOD)
+    {
+        AllocateMetricsStructHighOrder(actkey);
+        if (GetDim() == TWO_D)
+        {
+            ComputeMetricsStructHighOrder2D(actkey);
+            GhostMetricsStructHighOrder2D();
+        }
+        else
+        {
+            ComputeMetricsStructHighOrder3D(actkey);
+            GhostMetricsStructHighOrder3D();
+        }
+    }
+    else
+    {
+        AllocateMetrics(actkey);
+        if (GetDim() == TWO_D)
+        {
+            ComputeMetrics2D(actkey);
+        }
+        else
+        {
+            ComputeMetrics3D(actkey);
+        }
+    }
+}
+
+void StructGrid::ComputeMetrics3D(ActionKey *actkey)
+{
+    RDouble r1[3], r2[3], r3[3], r4[3], r5[3], r6[3], r7[3], r8[3];
+    RDouble vkc[3], vet[3], vct[3], vkcn[4], vetn[4], vctn[4];
+    RDouble v1, v2, v3, v4, v5, v6, vv;
+    int i, j, k;
+    int ni = GetNI();
+    int nj = GetNJ();
+    int nk = GetNK();
+
+    RDouble volmin = LARGE;
+    RDouble volmax = - LARGE;
+    int imin = 1;
+    int jmin = 1;
+    int kmin = 1;
+    int imax = 1;
+    int jmax = 1;
+    int kmax = 1;
+
+    //! Set surfaces and volume to zero.
+    RDouble4D *xfn  = GetFaceNormalX();
+    RDouble4D *yfn  = GetFaceNormalY();
+    RDouble4D *zfn  = GetFaceNormalZ();
+    RDouble4D *area = GetFaceArea();
+    RDouble3D *vol  = GetCellVolume();
+    RDouble4D *xfv  = GetFaceVectorX();
+    RDouble4D *yfv  = GetFaceVectorY();
+    RDouble4D *zfv  = GetFaceVectorZ();
+    (*xfn) = 0.0;
+    (*yfn) = 0.0;
+    (*zfn) = 0.0;
+    (*area) = 0.0;
+    (*vol) = 0.0;
+    (*xfv) = 0.0;
+    (*yfv) = 0.0;
+    (*zfv) = 0.0;
+
+    std::ostringstream oss;
+
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+
+    int zIndex = this->GetZoneID();
+    for (k = 1; k <= nk - 1; ++ k)
+    {
+        for (j = 1; j <= nj - 1; ++ j)
+        {
+            for (i = 1; i <= ni - 1; ++ i)
+            {
+                r1[0] = xx(i  , j  , k );
+                r1[1] = yy(i  , j  , k );
+                r1[2] = zz(i  , j  , k );
+
+                r2[0] = xx(i+1, j  , k );
+                r2[1] = yy(i+1, j  , k );
+                r2[2] = zz(i+1, j  , k );
+
+                r3[0] = xx(i  , j+1, k );
+                r3[1] = yy(i  , j+1, k );
+                r3[2] = zz(i  , j+1, k );
+
+                r4[0] = xx(i  , j  , k+1);
+                r4[1] = yy(i  , j  , k+1);
+                r4[2] = zz(i  , j  , k+1);
+
+                r5[0] = xx(i+1, j+1, k );
+                r5[1] = yy(i+1, j+1, k );
+                r5[2] = zz(i+1, j+1, k );
+
+                r6[0] = xx(i  , j+1, k+1);
+                r6[1] = yy(i  , j+1, k+1);
+                r6[2] = zz(i  , j+1, k+1);
+
+                r7[0] = xx(i+1, j  , k+1);
+                r7[1] = yy(i+1, j  , k+1);
+                r7[2] = zz(i+1, j  , k+1);
+
+                r8[0] = xx(i+1, j+1, k+1);
+                r8[1] = yy(i+1, j+1, k+1);
+                r8[2] = zz(i+1, j+1, k+1);
+
+                Vol_Tetrahedron(r1, r2, r5, r8, v1);
+                Vol_Tetrahedron(r1, r2, r8, r7, v2);
+                Vol_Tetrahedron(r1, r3, r8, r5, v3);
+                Vol_Tetrahedron(r1, r3, r6, r8, v4);
+                Vol_Tetrahedron(r1, r4, r8, r6, v5);
+                Vol_Tetrahedron(r1, r4, r7, r8, v6);
+
+                vv = sixth * (ABS(v1) + ABS(v2) + ABS(v3) + ABS(v4) + ABS(v5) + ABS(v6));
+
+                (*vol)(i, j, k) = vv;
+                if (vv <= SMALL)
+                {
+                    oss << " vol < 0 " << zIndex << " " << i << " " << j << " " << k << vv << "\n";
+                }
+
+                if (vv < volmin)
+                {
+                    volmin = vv;
+                    imin = i;
+                    jmin = j;
+                    kmin = k;
+                }
+
+                if (vv > volmax)
+                {
+                    volmax = vv;
+                    imax = i;
+                    jmax = j;
+                    kmax = k;
+                }
+
+                FaceNormal3D(r1, r3, r6, r4, vkc);
+                FaceNormal3D(r1, r4, r7, r2, vet);
+                FaceNormal3D(r1, r2, r5, r3, vct);
+
+                NormalizeVector(vkc, vkcn, 3);
+                NormalizeVector(vet, vetn, 3);
+                NormalizeVector(vct, vctn, 3);
+
+                (*xfn)(i, j, k, 1) = vkcn[0];
+                (*yfn)(i, j, k, 1) = vkcn[1];
+                (*zfn)(i, j, k, 1) = vkcn[2];
+                (*area)(i, j, k, 1) = vkcn[3];
+                (*xfv)(i, j, k, 1) = vkc[0];
+                (*yfv)(i, j, k, 1) = vkc[1];
+                (*zfv)(i, j, k, 1) = vkc[2];
+
+                (*xfn)(i, j, k, 2) = vetn[0];
+                (*yfn)(i, j, k, 2) = vetn[1];
+                (*zfn)(i, j, k, 2) = vetn[2];
+                (*area)(i, j, k, 2) = vetn[3];
+                (*xfv)(i, j, k, 2) = vet[0];
+                (*yfv)(i, j, k, 2) = vet[1];
+                (*zfv)(i, j, k, 2) = vet[2];
+
+                (*xfn)(i, j, k, 3) = vctn[0];
+                (*yfn)(i, j, k, 3) = vctn[1];
+                (*zfn)(i, j, k, 3) = vctn[2];
+                (*area)(i, j, k, 3) = vctn[3];
+                (*xfv)(i, j, k, 3) = vct[0];
+                (*yfv)(i, j, k, 3) = vct[1];
+                (*zfv)(i, j, k, 3) = vct[2];
+            }
+        }
+    }
+
+    //! Compute the grid derivatives on the face of i + 1 = ni.
+    i = ni - 1;
+    for (k = 1; k <= nk - 1; ++ k)
+    {
+        for (j = 1; j <= nj - 1; ++ j)
+        {
+            r2[0] = xx(i + 1, j    , k   );
+            r2[1] = yy(i + 1, j    , k   );
+            r2[2] = zz(i + 1, j    , k   );
+
+            r5[0] = xx(i + 1, j + 1, k   );
+            r5[1] = yy(i + 1, j + 1, k   );
+            r5[2] = zz(i + 1, j + 1, k   );
+
+            r7[0] = xx(i + 1, j    , k + 1);
+            r7[1] = yy(i + 1, j    , k + 1);
+            r7[2] = zz(i + 1, j    , k + 1);
+
+            r8[0] = xx(i + 1, j + 1, k + 1);
+            r8[1] = yy(i + 1, j + 1, k + 1);
+            r8[2] = zz(i + 1, j + 1, k + 1);
+
+            FaceNormal3D(r2, r5, r8, r7, vkc);
+            NormalizeVector(vkc, vkcn, 3);
+
+            (*xfn)(i+1, j, k, 1) = vkcn[0];
+            (*yfn)(i+1, j, k, 1) = vkcn[1];
+            (*zfn)(i+1, j, k, 1) = vkcn[2];
+            (*area)(i+1, j, k, 1) = vkcn[3];
+            (*xfv)(i+1, j, k, 1) = vkc[0];
+            (*yfv)(i+1, j, k, 1) = vkc[1];
+            (*zfv)(i+1, j, k, 1) = vkc[2];
+        }
+    }
+
+    //! Compute the grid derivatives on the face of j + 1 = nj.
+    j = nj - 1;
+    for (k = 1; k <= nk - 1; ++ k)
+    {
+        for (i = 1; i <= ni - 1; ++ i)
+        {
+            r3[0] = xx(i    , j + 1, k   );
+            r3[1] = yy(i    , j + 1, k   );
+            r3[2] = zz(i    , j + 1, k   );
+
+            r5[0] = xx(i + 1, j + 1, k   );
+            r5[1] = yy(i + 1, j + 1, k   );
+            r5[2] = zz(i + 1, j + 1, k   );
+
+            r6[0] = xx(i    , j + 1, k + 1);
+            r6[1] = yy(i    , j + 1, k + 1);
+            r6[2] = zz(i    , j + 1, k + 1);
+
+            r8[0] = xx(i + 1, j + 1, k + 1);
+            r8[1] = yy(i + 1, j + 1, k + 1);
+            r8[2] = zz(i + 1, j + 1, k + 1);
+
+            FaceNormal3D(r3, r6, r8, r5, vet);
+            NormalizeVector(vet, vetn, 3);
+
+            (*xfn)(i, j+1, k, 2) = vetn[0];
+            (*yfn)(i, j+1, k, 2) = vetn[1];
+            (*zfn)(i, j+1, k, 2) = vetn[2];
+            (*area)(i, j+1, k, 2) = vetn[3];
+            (*xfv)(i, j+1, k, 2) = vet[0];
+            (*yfv)(i, j+1, k, 2) = vet[1];
+            (*zfv)(i, j+1, k, 2) = vet[2];
+        }
+    }
+
+    //! Compute the grid derivatives on the face of k + 1 = nk.
+    k = nk - 1;
+    for (j = 1; j <= nj - 1; ++ j)
+    {
+        for (i = 1; i <= ni - 1; ++ i)
+        {
+            r4[0] = xx(i    , j    , k + 1);
+            r4[1] = yy(i    , j    , k + 1);
+            r4[2] = zz(i    , j    , k + 1);
+
+            r6[0] = xx(i    , j + 1, k + 1);
+            r6[1] = yy(i    , j + 1, k + 1);
+            r6[2] = zz(i    , j + 1, k + 1);
+
+            r7[0] = xx(i + 1, j    , k + 1);
+            r7[1] = yy(i + 1, j    , k + 1);
+            r7[2] = zz(i + 1, j    , k + 1);
+
+            r8[0] = xx(i + 1, j + 1, k + 1);
+            r8[1] = yy(i + 1, j + 1, k + 1);
+            r8[2] = zz(i + 1, j + 1, k + 1);
+
+            FaceNormal3D(r4, r7, r8, r6, vct);
+            NormalizeVector(vct, vctn, 3);
+
+            (*xfn)(i, j, k+1, 3) = vctn[0];
+            (*yfn)(i, j, k+1, 3) = vctn[1];
+            (*zfn)(i, j, k+1, 3) = vctn[2];
+            (*area)(i, j, k+1, 3) = vctn[3];
+            (*xfv)(i, j, k+1, 3) = vct[0];
+            (*yfv)(i, j, k+1, 3) = vct[1];
+            (*zfv)(i, j, k+1, 3) = vct[2];
+        }
+    }
+
+    GhostCell3D(*vol, ni, nj, nk);
+    GhostMetrics3D();
+
+    ComputeCellCenter();
+
+    StreamToActionKey(actkey, oss);
+}
+
+void StructGrid::ComputeCellCenter()
+{
+    RDouble3D &xcc = * this->GetCellCenterX();
+    RDouble3D &ycc = * this->GetCellCenterY();
+    RDouble3D &zcc = * this->GetCellCenterZ();
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                CenterCoor(i, j, k, xcc(i, j, k), ycc(i, j, k), zcc(i, j, k));
+            }
+        }
+    }
+
+    RDouble xfc, yfc, zfc;
+
+    int nsurf;
+    nsurf = 1;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            int i;
+            i = ist;
+
+            FaceCoor(i, j, k, nsurf, xfc, yfc, zfc);
+            
+            xcc(i-1, j, k) = two * xfc - xcc(i, j, k);
+            ycc(i-1, j, k) = two * yfc - ycc(i, j, k);
+            zcc(i-1, j, k) = two * zfc - zcc(i, j, k);
+
+            i = ied;
+
+            FaceCoor(i+1, j, k, nsurf, xfc, yfc, zfc);
+            
+            xcc(i+1, j, k) = two * xfc - xcc(i, j, k);
+            ycc(i+1, j, k) = two * yfc - ycc(i, j, k);
+            zcc(i+1, j, k) = two * zfc - zcc(i, j, k);
+        }
+    }
+
+    nsurf = 2;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int i = ist; i <= ied; ++ i)
+        {
+            int j;
+            j = jst;
+
+            FaceCoor(i, j, k, nsurf, xfc, yfc, zfc);
+            
+            xcc(i, j-1, k) = two * xfc - xcc(i, j, k);
+            ycc(i, j-1, k) = two * yfc - ycc(i, j, k);
+            zcc(i, j-1, k) = two * zfc - zcc(i, j, k);
+
+            j = jed;
+
+            FaceCoor(i, j+1, k, nsurf, xfc, yfc, zfc);
+            
+            xcc(i, j+1, k) = two * xfc - xcc(i, j, k);
+            ycc(i, j+1, k) = two * yfc - ycc(i, j, k);
+            zcc(i, j+1, k) = two * zfc - zcc(i, j, k);
+        }
+    }
+
+    if (this->GetDim() == THREE_D)
+    {
+        nsurf = 3;
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int k;
+                k = kst;
+
+                FaceCoor(i, j, k, nsurf, xfc, yfc, zfc);
+                
+                xcc(i, j, k-1) = two * xfc - xcc(i, j, k);
+                ycc(i, j, k-1) = two * yfc - ycc(i, j, k);
+                zcc(i, j, k-1) = two * zfc - zcc(i, j, k);
+
+                k = ked;
+
+                FaceCoor(i, j, k+1, nsurf, xfc, yfc, zfc);
+                
+                xcc(i, j, k+1) = two * xfc - xcc(i, j, k);
+                ycc(i, j, k+1) = two * yfc - ycc(i, j, k);
+                zcc(i, j, k+1) = two * zfc - zcc(i, j, k);
+            }
+        }
+    }
+}
+
+void StructGrid::ComputeMetrics2D(ActionKey *actkey)
+{
+    RDouble4D &xfn  = * (this->GetFaceNormalX());
+    RDouble4D &yfn  = * (this->GetFaceNormalY());
+    RDouble4D &zfn  = * (this->GetFaceNormalZ());
+    RDouble4D &area = * (this->GetFaceArea());
+    RDouble3D &vol  = * (this->GetCellVolume());
+    RDouble4D &xfv  = * (this->GetFaceVectorX());
+    RDouble4D &yfv  = * (this->GetFaceVectorY());
+    RDouble4D &zfv  = * (this->GetFaceVectorZ());
+
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+
+    zfn = 0.0;
+    zfv = 0.0;
+
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+
+    RDouble r1[3], r2[3], r3[3], r4[3];
+    RDouble vkc[3], vet[3];
+    RDouble vvol;
+    int i, j;
+
+    RDouble volmin, volmax;
+    volmin = LARGE;
+    volmax = - LARGE;
+    int imin, jmin, imax, jmax;
+    imin = 1;
+    jmin = 1;
+    imax = 1;
+    jmax = 1;
+
+    std::ostringstream oss;
+
+    int k = 1;
+    int negativecell = 0;
+    for (j = 1; j <= nj - 1; ++ j)
+    {
+        for (i = 1; i <= ni - 1; ++ i)
+        {
+            r1[0] = xx(i  , j, k);
+            r1[1] = yy(i  , j, k);
+            r1[2] = 0.0;
+
+            r2[0] = xx(i+1, j, k);
+            r2[1] = yy(i+1, j, k);
+            r2[2] = 0.0;
+
+            r3[0] = xx(i+1, j+1, k);
+            r3[1] = yy(i+1, j+1, k);
+            r3[2] = 0.0;
+
+            r4[0] = xx(i, j+1, k);
+            r4[1] = yy(i, j+1, k);
+            r4[2] = 0.0;
+
+            UnitFaceNormal2D(r4, r1, vkc);
+            xfn (i, j, k, 1) = - vkc[0];
+            yfn (i, j, k, 1) = - vkc[1];
+            area(i, j, k, 1) =   vkc[2];
+            xfv (i, j, k, 1) = - vkc[0] * vkc[2];
+            yfv (i, j, k, 1) = - vkc[1] * vkc[2];
+
+            UnitFaceNormal2D(r1, r2, vet);
+            xfn (i, j, k, 2) = - vet[0];
+            yfn (i, j, k, 2) = - vet[1];
+            area(i, j, k, 2) =   vet[2];
+            xfv (i, j, k, 2) = - vet[0] * vet[2];
+            yfv (i, j, k, 2) = - vet[1] * vet[2];
+
+            Area2D(r1, r2, r3, r4, vvol);
+            vol(i, j, k) = vvol;
+
+            if (vvol <= 0.0)
+            {
+                vvol = - vvol;
+                vol(i, j, k) = vvol;
+                ++ negativecell;
+                oss << "  Warning: negative volume cell index (i, j, k) " << i << " " << j << " " << k << " !\n";
+                if (PHMPI::GetCurrentProcessorID() == PHMPI::GetServerProcessorID())
+                {
+                    PrintToWindow(oss);
+                }
+            }
+
+            if (vvol < volmin)
+            {
+                volmin = vvol;
+                imin = i;
+                jmin = j;
+            }
+
+            if (vvol > volmax)
+            {
+                volmax = vvol;
+                imax = i;
+                jmax = j;
+            }
+        }
+    }
+
+    int numberOfTotalCell = this->GetNTotalCell();
+    if (negativecell == numberOfTotalCell)
+    {
+        //oss << cell << " cells have negative vols \n";
+        PHMPI::FreeBlockData();
+        cout << "ERROR: cells have negative vols, maybe the i j k normal direction has set error! " << endl;
+        MPI_Abort(MPI_COMM_WORLD, -1);
+    }
+
+    //GhostCell2D(vol, ni, nj, 1);
+    GhostCell3D(vol, ni, nj, 1);
+
+    //! Compute the grid derivatives on the face of i = ni (value range of i is 1 : ni).
+    i = ni;
+    for (j = 1; j <= nj - 1; ++ j)
+    {
+        r1[0] = xx(i, j, k);
+        r1[1] = yy(i, j, k);
+        r1[2] = 0.0;
+
+        r4[0] = xx(i, j+1, k);
+        r4[1] = yy(i, j+1, k);
+        r4[2] = 0.0;
+
+        UnitFaceNormal2D(r4, r1, vkc);
+
+        xfn (i, j, k, 1) = - vkc[0];
+        yfn (i, j, k, 1) = - vkc[1];
+        area(i, j, k, 1) =   vkc[2];
+        xfv (i, j, k, 1) = - vkc[0] * vkc[2];
+        yfv (i, j, k, 1) = - vkc[1] * vkc[2];
+    }
+
+    //! Compute the grid derivatives on the face of j = nj (value range of j is 1 : nj).
+    j = nj;
+    for (i = 1; i <= ni - 1; ++ i)
+    {
+        r1[0] = xx(i, j, k);
+        r1[1] = yy(i, j, k);
+        r1[2] = 0.0;
+
+        r2[0] = xx(i+1, j, k);
+        r2[1] = yy(i+1, j, k);
+        r2[2] = 0.0;
+
+        UnitFaceNormal2D(r1, r2, vet);
+
+        xfn (i, j, k, 2) = - vet[0];
+        yfn (i, j, k, 2) = - vet[1];
+        area(i, j, k, 2) =   vet[2];
+        xfv (i, j, k, 2) = - vet[0] * vet[2];
+        yfv (i, j, k, 2) = - vet[1] * vet[2];
+    }
+    GhostMetrics2D();
+    ComputeCellCenter();
+
+//    oss << "Block " << zIndex << "\n";
+//    oss << "min volume is " << imin << " " << jmin << " " << ": " << volmin << "\n";
+//    oss << "max volume is " << imax << " " << jmax << " " << ": " << volmax << "\n";
+
+    //StreamToActionKey(actkey, oss);
+}
+
+void StructGrid::GhostMetrics2D()
+{
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+
+    RDouble4D &xfn  = * (this->GetFaceNormalX());
+    RDouble4D &yfn  = * (this->GetFaceNormalY());
+    RDouble4D &area = * (this->GetFaceArea());
+    RDouble4D &xfv  = * (this->GetFaceVectorX());
+    RDouble4D &yfv  = * (this->GetFaceVectorY());
+
+    int k = 1;
+    int i, j;
+    RDouble nx, ny, ns, ons;
+    //! Assign initial value to the virtual points, and introduce the Green formula to modify.
+    for (j = 1; j <= nj; ++ j)
+    {
+        xfn (0, j, k, 2) = xfn (1, j, k, 2);
+        yfn (0, j, k, 2) = yfn (1, j, k, 2);
+        area(0, j, k, 2) = area(1, j, k, 2);
+        xfv (0, j, k, 2) = xfv (1, j, k, 2);
+        yfv (0, j, k, 2) = yfv (1, j, k, 2);
+
+        xfn (ni, j, k, 2) = xfn (ni-1, j, k, 2);
+        yfn (ni, j, k, 2) = yfn (ni-1, j, k, 2);
+        area(ni, j, k, 2) = area(ni-1, j, k, 2);
+        xfv (ni, j, k, 2) = xfv (ni-1, j, k, 2);
+        yfv (ni, j, k, 2) = yfv (ni-1, j, k, 2);
+    }
+
+    for (i = 1; i <= ni; ++ i)
+    {
+        xfn (i, 0, k, 1) = xfn (i, 1, k, 1);
+        yfn (i, 0, k, 1) = yfn (i, 1, k, 1);
+        area(i, 0, k, 1) = area(i, 1, k, 1);
+        xfv (i, 0, k, 1) = xfv (i, 1, k, 1);
+        yfv (i, 0, k, 1) = yfv (i, 1, k, 1);
+
+        xfn (i, nj, k, 1) = xfn (i, nj-1, k, 1);
+        yfn (i, nj, k, 1) = yfn (i, nj-1, k, 1);
+        area(i, nj, k, 1) = area(i, nj-1, k, 1);
+        xfv (i, nj, k, 1) = xfv (i, nj-1, k, 1);
+        yfv (i, nj, k, 1) = yfv (i, nj-1, k, 1);
+    }
+
+    //! Introduce the Green formula to modify.
+    for (j = 1; j <= nj - 1; ++ j)
+    {
+        nx = xfn(1, j,   k, 1) * area(1, j,   k, 1)
+           - xfn(0, j,   k, 2) * area(0, j,   k, 2)
+           + xfn(0, j+1, k, 2) * area(0, j+1, k, 2);
+        ny = yfn(1, j,   k, 1) * area(1, j,   k, 1)
+           - yfn(0, j,   k, 2) * area(0, j,   k, 2)
+           + yfn(0, j+1, k, 2) * area(0, j+1, k, 2);
+
+        ns = sqrt(nx * nx + ny * ny);
+        ons = 1.0 / (ns + TINY);
+
+        xfn (0, j, k, 1) = nx * ons;
+        yfn (0, j, k, 1) = ny * ons;
+        area(0, j, k, 1) = ns;
+        xfv (0, j, k, 1) = nx;
+        yfv (0, j, k, 1) = ny;
+
+        nx = xfn(ni, j,   k, 1) * area(ni, j,   k, 1)
+           + xfn(ni, j,   k, 2) * area(ni, j,   k, 2)
+           - xfn(ni, j+1, k, 2) * area(ni, j+1, k, 2);
+        ny = yfn(ni, j,   k, 1) * area(ni, j,   k, 1)
+           + yfn(ni, j,   k, 2) * area(ni, j,   k, 2)
+           - yfn(ni, j+1, k, 2) * area(ni, j+1, k, 2);
+        ns = sqrt(nx * nx + ny * ny);
+        ons = 1.0 / (ns + TINY);
+
+        xfn (ni+1, j, k, 1) = nx * ons;
+        yfn (ni+1, j, k, 1) = ny * ons;
+        area(ni+1, j, k, 1) = ns;
+        xfv (ni+1, j, k, 1) = nx;
+        yfv (ni+1, j, k, 1) = ny;
+    }
+
+    for (i = 1; i <= ni - 1; ++ i)
+    {
+        nx = xfn(i,   1, k, 2) * area(i,   1, k, 2)
+           - xfn(i,   0, k, 1) * area(i,   0, k, 1)
+           + xfn(i+1, 0, k, 1) * area(i+1, 0, k, 1);
+        ny = yfn(i,   1, k, 2) * area(i,   1, k, 2)
+           - yfn(i,   0, k, 1) * area(i,   0, k, 1)
+           + yfn(i+1, 0, k, 1) * area(i+1, 0, k, 1);
+        ns = sqrt(nx * nx + ny * ny);
+        ons = 1.0 / (ns + TINY);
+
+        xfn (i, 0, k, 2) = nx * ons;
+        yfn (i, 0, k, 2) = ny * ons;
+        area(i, 0, k, 2) = ns;
+        xfv (i, 0, k, 2) = nx;
+        yfv (i, 0, k, 2) = ny;
+
+        nx = xfn(i,   nj, k, 2) * area(i,   nj, k, 2)
+           + xfn(i,   nj, k, 1) * area(i,   nj, k, 1)
+           - xfn(i+1, nj, k, 1) * area(i+1, nj, k, 1);
+        ny = yfn(i,   nj, k, 2) * area(i,   nj, k, 2)
+           + yfn(i,   nj, k, 1) * area(i,   nj, k, 1)
+           - yfn(i+1, nj, k, 1) * area(i+1, nj, k, 1);
+        ns = sqrt(nx * nx + ny * ny);
+        ons = 1.0 / (ns + TINY);
+
+        xfn (i, nj+1, k, 2) = nx * ons;
+        yfn (i, nj+1, k, 2) = ny * ons;
+        area(i, nj+1, k, 2) = ns;
+        xfv (i, nj+1, k, 2) = nx;
+        yfv (i, nj+1, k, 2) = ny;
+    }
+}
+
+void StructGrid::ReadMovingGrid()
+{
+    fstream file;
+    std::ostringstream oss;
+    oss << "move_grid" << this->GetZoneID() << ".dat";
+    string filename = oss.str();
+
+    file.open(filename.c_str(), ios_base::in|ios_base::binary);
+
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+    RDouble3D &voln = * this->GetCellVolumeOld();
+
+    int nTotalNode = this->GetNTotalNode();
+    file.read(reinterpret_cast<char*>(x), nTotalNode * sizeof(RDouble));
+    file.read(reinterpret_cast<char*>(y), nTotalNode * sizeof(RDouble));
+    file.read(reinterpret_cast<char*>(z), nTotalNode * sizeof(RDouble));
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                file.read(reinterpret_cast<char*>(&voln(i, j, k)), sizeof(RDouble));
+            }
+        }
+    }
+    file.close();
+}
+
+LIB_EXPORT void StructGrid::CVGNorm(FieldProxy *q_1_proxy, FieldProxy *q_0_proxy, int neqn, RDouble &norm)
+{
+    int nTotalCell = this->GetNTotalCell();
+
+    RDouble diff;
+
+    RDouble4D &q_1 = q_1_proxy->GetField_STR();
+    RDouble4D &q_0 = q_0_proxy->GetField_STR();
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    norm = zero;
+    for (int m = 0; m < neqn; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    diff = q_1(i, j, k, m) - q_0(i, j, k, m);
+                    norm = norm + diff * diff;
+                }
+            }
+        }
+    }
+
+    norm = sqrt(norm / (nTotalCell * neqn));
+}
+
+void StructGrid::UpdateVolold()
+{
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+
+    if (!isUnsteady || !isAle) return;
+    
+    RDouble3D &vol  = * this->GetCellVolume();
+    RDouble3D &voln = * this->GetCellVolumeOld();
+
+    voln = vol;
+}
+
+void StructGrid::GhostMetrics3D()
+{
+    //! Assign initial value to the virtual points.
+    RDouble nx, ny, nz, ns, ons;
+
+    int i, j, k;
+    int ni = GetNI();
+    int nj = GetNJ();
+    int nk = GetNK();
+    RDouble4D *xfn = GetFaceNormalX();
+    RDouble4D *yfn = GetFaceNormalY();
+    RDouble4D *zfn = GetFaceNormalZ();
+    RDouble4D *area = GetFaceArea();
+    RDouble4D *xfv = GetFaceVectorX();
+    RDouble4D *yfv = GetFaceVectorY();
+    RDouble4D *zfv = GetFaceVectorZ();
+    for (k = 1; k <= nk; ++ k)
+    {
+        for (j = 1; j <= nj; ++ j)
+        {
+            (*xfn)(0 , j, k, 2) = (*xfn)(1   , j, k, 2);
+            (*yfn)(0 , j, k, 2) = (*yfn)(1   , j, k, 2);
+            (*zfn)(0 , j, k, 2) = (*zfn)(1   , j, k, 2);
+            (*area)(0 , j, k, 2) = (*area)(1   , j, k, 2);
+            (*xfv)(0 , j, k, 2) = (*xfv)(1   , j, k, 2);
+            (*yfv)(0 , j, k, 2) = (*yfv)(1   , j, k, 2);
+            (*zfv)(0 , j, k, 2) = (*zfv)(1   , j, k, 2);
+
+            (*xfn)(ni, j, k, 2) = (*xfn)(ni-1, j, k, 2);
+            (*yfn)(ni, j, k, 2) = (*yfn)(ni-1, j, k, 2);
+            (*zfn)(ni, j, k, 2) = (*zfn)(ni-1, j, k, 2);
+            (*area)(ni, j, k, 2) = (*area)(ni-1, j, k, 2);
+            (*xfv)(ni, j, k, 2) = (*xfv)(ni-1, j, k, 2);
+            (*yfv)(ni, j, k, 2) = (*yfv)(ni-1, j, k, 2);
+            (*zfv)(ni, j, k, 2) = (*zfv)(ni-1, j, k, 2);
+
+            (*xfn)(0 , j, k, 3) = (*xfn)(1   , j, k, 3);
+            (*yfn)(0 , j, k, 3) = (*yfn)(1   , j, k, 3);
+            (*zfn)(0 , j, k, 3) = (*zfn)(1   , j, k, 3);
+            (*area)(0 , j, k, 3) = (*area)(1   , j, k, 3);
+            (*xfv)(0 , j, k, 3) = (*xfv)(1   , j, k, 3);
+            (*yfv)(0 , j, k, 3) = (*yfv)(1   , j, k, 3);
+            (*zfv)(0 , j, k, 3) = (*zfv)(1   , j, k, 3);
+
+            (*xfn)(ni, j, k, 3) = (*xfn)(ni-1, j, k, 3);
+            (*yfn)(ni, j, k, 3) = (*yfn)(ni-1, j, k, 3);
+            (*zfn)(ni, j, k, 3) = (*zfn)(ni-1, j, k, 3);
+            (*area)(ni, j, k, 3) = (*area)(ni-1, j, k, 3);
+            (*xfv)(ni, j, k, 3) = (*xfv)(ni-1, j, k, 3);
+            (*yfv)(ni, j, k, 3) = (*yfv)(ni-1, j, k, 3);
+            (*zfv)(ni, j, k, 3) = (*zfv)(ni-1, j, k, 3);
+        }
+    }
+
+    for (i = 1; i <= ni; ++ i)
+    {
+        for (k = 1; k <= nk; ++ k)
+        {
+            (*xfn)(i, 0, k, 1) = (*xfn)(i, 1, k, 1);
+            (*yfn)(i, 0, k, 1) = (*yfn)(i, 1, k, 1);
+            (*zfn)(i, 0, k, 1) = (*zfn)(i, 1, k, 1);
+            (*area)(i, 0, k, 1) = (*area)(i, 1, k, 1);
+            (*xfv)(i, 0, k, 1) = (*xfv)(i, 1, k, 1);
+            (*yfv)(i, 0, k, 1) = (*yfv)(i, 1, k, 1);
+            (*zfv)(i, 0, k, 1) = (*zfv)(i, 1, k, 1);
+
+            (*xfn)(i, nj, k, 1) = (*xfn)(i, nj-1, k, 1);
+            (*yfn)(i, nj, k, 1) = (*yfn)(i, nj-1, k, 1);
+            (*zfn)(i, nj, k, 1) = (*zfn)(i, nj-1, k, 1);
+            (*area)(i, nj, k, 1) = (*area)(i, nj-1, k, 1);
+            (*xfv)(i, nj, k, 1) = (*xfv)(i, nj-1, k, 1);
+            (*yfv)(i, nj, k, 1) = (*yfv)(i, nj-1, k, 1);
+            (*zfv)(i, nj, k, 1) = (*zfv)(i, nj-1, k, 1);
+
+            (*xfn)(i, 0, k, 3) = (*xfn)(i, 1, k, 3);
+            (*yfn)(i, 0, k, 3) = (*yfn)(i, 1, k, 3);
+            (*zfn)(i, 0, k, 3) = (*zfn)(i, 1, k, 3);
+            (*area)(i, 0, k, 3) = (*area)(i, 1, k, 3);
+            (*xfv)(i, 0, k, 3) = (*xfv)(i, 1, k, 3);
+            (*yfv)(i, 0, k, 3) = (*yfv)(i, 1, k, 3);
+            (*zfv)(i, 0, k, 3) = (*zfv)(i, 1, k, 3);
+
+            (*xfn)(i, nj, k, 3) = (*xfn)(i, nj-1, k, 3);
+            (*yfn)(i, nj, k, 3) = (*yfn)(i, nj-1, k, 3);
+            (*zfn)(i, nj, k, 3) = (*zfn)(i, nj-1, k, 3);
+            (*area)(i, nj, k, 3) = (*area)(i, nj-1, k, 3);
+            (*xfv)(i, nj, k, 3) = (*xfv)(i, nj-1, k, 3);
+            (*yfv)(i, nj, k, 3) = (*yfv)(i, nj-1, k, 3);
+            (*zfv)(i, nj, k, 3) = (*zfv)(i, nj-1, k, 3);
+        }
+    }
+
+    for (j = 1; j <= nj; ++ j)
+    {
+        for (i = 1; i <= ni; ++ i)
+        {
+            (*xfn)(i, j, 0, 1) = (*xfn)(i, j, 1, 1);
+            (*yfn)(i, j, 0, 1) = (*yfn)(i, j, 1, 1);
+            (*zfn)(i, j, 0, 1) = (*zfn)(i, j, 1, 1);
+            (*area)(i, j, 0, 1) = (*area)(i, j, 1, 1);
+            (*xfv)(i, j, 0, 1) = (*xfv)(i, j, 1, 1);
+            (*yfv)(i, j, 0, 1) = (*yfv)(i, j, 1, 1);
+            (*zfv)(i, j, 0, 1) = (*zfv)(i, j, 1, 1);
+
+            (*xfn)(i, j, nk, 1) = (*xfn)(i, j, nk-1, 1);
+            (*yfn)(i, j, nk, 1) = (*yfn)(i, j, nk-1, 1);
+            (*zfn)(i, j, nk, 1) = (*zfn)(i, j, nk-1, 1);
+            (*area)(i, j, nk, 1) = (*area)(i, j, nk-1, 1);
+            (*xfv)(i, j, nk, 1) = (*xfv)(i, j, nk-1, 1);
+            (*yfv)(i, j, nk, 1) = (*yfv)(i, j, nk-1, 1);
+            (*zfv)(i, j, nk, 1) = (*zfv)(i, j, nk-1, 1);
+
+            (*xfn)(i, j, 0, 2) = (*xfn)(i, j, 1, 2);
+            (*yfn)(i, j, 0, 2) = (*yfn)(i, j, 1, 2);
+            (*zfn)(i, j, 0, 2) = (*zfn)(i, j, 1, 2);
+            (*area)(i, j, 0, 2) = (*area)(i, j, 1, 2);
+            (*xfv)(i, j, 0, 2) = (*xfv)(i, j, 1, 2);
+            (*yfv)(i, j, 0, 2) = (*yfv)(i, j, 1, 2);
+            (*zfv)(i, j, 0, 2) = (*zfv)(i, j, 1, 2);
+
+            (*xfn)(i, j, nk, 2) = (*xfn)(i, j, nk-1, 2);
+            (*yfn)(i, j, nk, 2) = (*yfn)(i, j, nk-1, 2);
+            (*zfn)(i, j, nk, 2) = (*zfn)(i, j, nk-1, 2);
+            (*area)(i, j, nk, 2) = (*area)(i, j, nk-1, 2);
+            (*xfv)(i, j, nk, 2) = (*xfv)(i, j, nk-1, 2);
+            (*yfv)(i, j, nk, 2) = (*yfv)(i, j, nk-1, 2);
+            (*zfv)(i, j, nk, 2) = (*zfv)(i, j, nk-1, 2);
+        }
+    }
+
+    //! Introduce the Green formula to modify.
+    for (k = 1; k < nk; ++ k)
+    {
+        for (j = 1; j < nj; ++ j)
+        {
+            nx = (*xfn)(1, j  , k  , 1) * (*area)(1, j  , k  , 1)
+               + (*xfn)(0, j+1, k  , 2) * (*area)(0, j+1, k  , 2)
+               - (*xfn)(0, j  , k  , 2) * (*area)(0, j  , k  , 2)
+               + (*xfn)(0, j  , k+1, 3) * (*area)(0, j  , k+1, 3)
+               - (*xfn)(0, j  , k  , 3) * (*area)(0, j  , k  , 3);
+
+            ny = (*yfn)(1, j  , k  , 1) * (*area)(1, j  , k  , 1)
+               + (*yfn)(0, j+1, k  , 2) * (*area)(0, j+1, k  , 2)
+               - (*yfn)(0, j  , k  , 2) * (*area)(0, j  , k  , 2)
+               + (*yfn)(0, j  , k+1, 3) * (*area)(0, j  , k+1, 3)
+               - (*yfn)(0, j  , k  , 3) * (*area)(0, j  , k  , 3);
+
+            nz = (*zfn)(1, j  , k  , 1) * (*area)(1, j  , k  , 1)
+               + (*zfn)(0, j+1, k  , 2) * (*area)(0, j+1, k  , 2)
+               - (*zfn)(0, j  , k  , 2) * (*area)(0, j  , k  , 2)
+               + (*zfn)(0, j  , k+1, 3) * (*area)(0, j  , k+1, 3)
+               - (*zfn)(0, j  , k  , 3) * (*area)(0, j  , k  , 3);
+
+            ns  = sqrt(nx * nx + ny * ny + nz * nz);
+            ons = 1.0 / (ns + TINY);
+
+            (*xfn)(0, j, k, 1) = nx * ons;
+            (*yfn)(0, j, k, 1) = ny * ons;
+            (*zfn)(0, j, k, 1) = nz * ons;
+            (*area)(0, j, k, 1) = ns;
+            (*xfv)(0, j, k, 1) = nx;
+            (*yfv)(0, j, k, 1) = ny;
+            (*zfv)(0, j, k, 1) = nz;
+
+            nx = (*xfn)(ni, j  , k  , 1) * (*area)(ni, j  , k  , 1)
+               - (*xfn)(ni, j+1, k  , 2) * (*area)(ni, j+1, k  , 2)
+               + (*xfn)(ni, j  , k  , 2) * (*area)(ni, j  , k  , 2)
+               - (*xfn)(ni, j  , k+1, 3) * (*area)(ni, j  , k+1, 3)
+               + (*xfn)(ni, j  , k  , 3) * (*area)(ni, j  , k  , 3);
+
+            ny = (*yfn)(ni, j  , k  , 1) * (*area)(ni, j  , k  , 1)
+               - (*yfn)(ni, j+1, k  , 2) * (*area)(ni, j+1, k  , 2)
+               + (*yfn)(ni, j  , k  , 2) * (*area)(ni, j  , k  , 2)
+               - (*yfn)(ni, j  , k+1, 3) * (*area)(ni, j  , k+1, 3)
+               + (*yfn)(ni, j  , k  , 3) * (*area)(ni, j  , k  , 3);
+
+            nz = (*zfn)(ni, j  , k  , 1) * (*area)(ni, j  , k  , 1)
+               - (*zfn)(ni, j+1, k  , 2) * (*area)(ni, j+1, k  , 2)
+               + (*zfn)(ni, j  , k  , 2) * (*area)(ni, j  , k  , 2)
+               - (*zfn)(ni, j  , k+1, 3) * (*area)(ni, j  , k+1, 3)
+               + (*zfn)(ni, j  , k  , 3) * (*area)(ni, j  , k  , 3);
+
+            ns  = sqrt(nx * nx + ny * ny + nz * nz);
+            ons = 1.0 / (ns + TINY);
+
+            (*xfn)(ni+1, j, k, 1) = nx * ons;
+            (*yfn)(ni+1, j, k, 1) = ny * ons;
+            (*zfn)(ni+1, j, k, 1) = nz * ons;
+            (*area)(ni+1, j, k, 1) = ns;
+            (*xfv)(ni+1, j, k, 1) = nx;
+            (*yfv)(ni+1, j, k, 1) = ny;
+            (*zfv)(ni+1, j, k, 1) = nz;
+        }
+    }
+
+    for (i = 1; i <= ni; ++ i)
+    {
+        for (k = 1; k <= nk; ++ k)
+        {
+            nx = (*xfn)(i  , 1, k  , 2) * (*area)(i  , 1, k  , 2)
+               + (*xfn)(i  , 0, k+1, 3) * (*area)(i  , 0, k+1, 3)
+               - (*xfn)(i  , 0, k  , 3) * (*area)(i  , 0, k  , 3)
+               + (*xfn)(i+1, 0, k  , 1) * (*area)(i+1, 0, k  , 1)
+               - (*xfn)(i  , 0, k  , 1) * (*area)(i  , 0, k  , 1);
+
+            ny = (*yfn)(i  , 1, k  , 2) * (*area)(i  , 1, k  , 2)
+               + (*yfn)(i  , 0, k+1, 3) * (*area)(i  , 0, k+1, 3)
+               - (*yfn)(i  , 0, k  , 3) * (*area)(i  , 0, k  , 3)
+               + (*yfn)(i+1, 0, k  , 1) * (*area)(i+1, 0, k  , 1)
+               - (*yfn)(i  , 0, k  , 1) * (*area)(i  , 0, k  , 1);
+
+            nz = (*zfn)(i  , 1, k  , 2) * (*area)(i  , 1, k  , 2)
+               + (*zfn)(i  , 0, k+1, 3) * (*area)(i  , 0, k+1, 3)
+               - (*zfn)(i  , 0, k  , 3) * (*area)(i  , 0, k  , 3)
+               + (*zfn)(i+1, 0, k  , 1) * (*area)(i+1, 0, k  , 1)
+               - (*zfn)(i  , 0, k  , 1) * (*area)(i  , 0, k  , 1);
+
+            ns  = sqrt(nx * nx + ny * ny + nz * nz);
+            ons = 1.0 / (ns + TINY);
+
+            (*xfn)(i, 0, k, 2) = nx * ons;
+            (*yfn)(i, 0, k, 2) = ny * ons;
+            (*zfn)(i, 0, k, 2) = nz * ons;
+            (*area)(i, 0, k, 2) = ns;
+            (*xfv)(i, 0, k, 2) = nx;
+            (*yfv)(i, 0, k, 2) = ny;
+            (*zfv)(i, 0, k, 2) = nz;
+
+            nx = (*xfn)(i  , nj, k  , 2) * (*area)(i  , nj, k  , 2)
+               - (*xfn)(i  , nj, k+1, 3) * (*area)(i  , nj, k+1, 3)
+               + (*xfn)(i  , nj, k  , 3) * (*area)(i  , nj, k  , 3)
+               - (*xfn)(i+1, nj, k  , 1) * (*area)(i+1, nj, k  , 1)
+               + (*xfn)(i  , nj, k  , 1) * (*area)(i  , nj, k  , 1);
+
+            ny = (*yfn)(i  , nj, k  , 2) * (*area)(i  , nj, k  , 2)
+               - (*yfn)(i  , nj, k+1, 3) * (*area)(i  , nj, k+1, 3)
+               + (*yfn)(i  , nj, k  , 3) * (*area)(i  , nj, k  , 3)
+               - (*yfn)(i+1, nj, k  , 1) * (*area)(i+1, nj, k  , 1)
+               + (*yfn)(i  , nj, k  , 1) * (*area)(i  , nj, k  , 1);
+
+            nz = (*zfn)(i  , nj, k  , 2) * (*area)(i  , nj, k  , 2)
+               - (*zfn)(i  , nj, k+1, 3) * (*area)(i  , nj, k+1, 3)
+               + (*zfn)(i  , nj, k  , 3) * (*area)(i  , nj, k  , 3)
+               - (*zfn)(i+1, nj, k  , 1) * (*area)(i+1, nj, k  , 1)
+               + (*zfn)(i  , nj, k  , 1) * (*area)(i  , nj, k  , 1);
+
+            ns  = sqrt(nx * nx + ny * ny + nz * nz);
+            ons = 1.0 / (ns + TINY);
+
+            (*xfn)(i, nj+1, k, 2) = nx * ons;
+            (*yfn)(i, nj+1, k, 2) = ny * ons;
+            (*zfn)(i, nj+1, k, 2) = nz * ons;
+            (*area)(i, nj+1, k, 2) = ns;
+            (*xfv)(i, nj+1, k, 2) = nx;
+            (*yfv)(i, nj+1, k, 2) = ny;
+            (*zfv)(i, nj+1, k, 2) = nz;
+        }
+    }
+
+    for (j = 1; j <= nj; ++ j)
+    {
+        for (i = 1; i <= ni; ++ i)
+        {
+            nx = (*xfn)(i  , j  , 1, 3) * (*area)(i  , j  , 1, 3)
+               + (*xfn)(i+1, j  , 0, 1) * (*area)(i+1, j  , 0, 1)
+               - (*xfn)(i  , j  , 0, 1) * (*area)(i  , j  , 0, 1)
+               + (*xfn)(i  , j+1, 0, 2) * (*area)(i  , j+1, 0, 2)
+               - (*xfn)(i  , j  , 0, 2) * (*area)(i  , j  , 0, 2);
+
+            ny = (*yfn)(i  , j  , 1, 3) * (*area)(i  , j  , 1, 3)
+               + (*yfn)(i+1, j  , 0, 1) * (*area)(i+1, j  , 0, 1)
+               - (*yfn)(i  , j  , 0, 1) * (*area)(i  , j  , 0, 1)
+               + (*yfn)(i  , j+1, 0, 2) * (*area)(i  , j+1, 0, 2)
+               - (*yfn)(i  , j  , 0, 2) * (*area)(i  , j  , 0, 2);
+
+            nz = (*zfn)(i  , j  , 1, 3) * (*area)(i  , j  , 1, 3)
+               + (*zfn)(i+1, j  , 0, 1) * (*area)(i+1, j  , 0, 1)
+               - (*zfn)(i  , j  , 0, 1) * (*area)(i  , j  , 0, 1)
+               + (*zfn)(i  , j+1, 0, 2) * (*area)(i  , j+1, 0, 2)
+               - (*zfn)(i  , j  , 0, 2) * (*area)(i  , j  , 0, 2);
+
+            ns = sqrt(nx * nx + ny * ny + nz * nz);
+            ons = 1.0 / (ns + TINY);
+
+            (*xfn)(i, j, 0, 3) = nx * ons;
+            (*yfn)(i, j, 0, 3) = ny * ons;
+            (*zfn)(i, j, 0, 3) = nz * ons;
+            (*area)(i, j, 0, 3) = ns;
+            (*xfv)(i, j, 0, 3) = nx;
+            (*yfv)(i, j, 0, 3) = ny;
+            (*zfv)(i, j, 0, 3) = nz;
+
+            nx = (*xfn)(i  , j  , nk, 3) * (*area)(i  , j  , nk, 3)
+               - (*xfn)(i+1, j  , nk, 1) * (*area)(i+1, j  , nk, 1)
+               + (*xfn)(i  , j  , nk, 1) * (*area)(i  , j  , nk, 1)
+               - (*xfn)(i  , j+1, nk, 2) * (*area)(i  , j+1, nk, 2)
+               + (*xfn)(i  , j  , nk, 2) * (*area)(i  , j  , nk, 2);
+
+            ny = (*yfn)(i  , j  , nk, 3) * (*area)(i  , j  , nk, 3)
+               - (*yfn)(i+1, j  , nk, 1) * (*area)(i+1, j  , nk, 1)
+               + (*yfn)(i  , j  , nk, 1) * (*area)(i  , j  , nk, 1)
+               - (*yfn)(i  , j+1, nk, 2) * (*area)(i  , j+1, nk, 2)
+               + (*yfn)(i  , j  , nk, 2) * (*area)(i  , j  , nk, 2);
+
+            nz = (*zfn)(i  , j  , nk, 3) * (*area)(i  , j  , nk, 3)
+               - (*zfn)(i+1, j  , nk, 1) * (*area)(i+1, j  , nk, 1)
+               + (*zfn)(i  , j  , nk, 1) * (*area)(i  , j  , nk, 1)
+               - (*zfn)(i  , j+1, nk, 2) * (*area)(i  , j+1, nk, 2)
+               + (*zfn)(i  , j  , nk, 2) * (*area)(i  , j  , nk, 2);
+
+            ns  = sqrt(nx * nx + ny * ny + nz * nz);
+            ons = 1.0 / (ns + TINY);
+
+            (*xfn)(i, j, nk+1, 3) = nx * ons;
+            (*yfn)(i, j, nk+1, 3) = ny * ons;
+            (*zfn)(i, j, nk+1, 3) = nz * ons;
+            (*area)(i, j, nk+1, 3) = ns;
+            (*xfv)(i, j, nk+1, 3) = nx;
+            (*yfv)(i, j, nk+1, 3) = ny;
+            (*zfv)(i, j, nk+1, 3) = nz;
+        }
+    }
+}
+
+LIB_EXPORT void StructGrid::SetLnkInfo()
+{
+    this->structBCSet->SetLnkInfo();
+}
+
+LIB_EXPORT void StructGrid::ProcessBCInfo()
+{
+    this->structBCSet->ProcessBCInfo();
+    this->SetBCFaceInfo();
+}
+
+LIB_EXPORT void StructGrid::CoarseGrids(int nlmax)
+{
+    //++++++++++++++++++++++++++++++++++++++++++++++
+    //+ The finest grid level = 0
+    //+ The coarse grid level = 1, 2, 3, ...
+    //++++++++++++++++++++++++++++++++++++++++++++++
+
+    int iLevel = this->GetLevel();
+    if (iLevel > nlmax)
+    {
+        this->SetCoarseGrid(0);
+        return;
+    }
+
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    //++++++++++++++++++++++++++++++++++++++++++++++
+    //+ Take a look at the rules: ni = 3
+    //+                           ni/2 + 1 = 2
+    //+                           ni/2 + 1 = 2
+    //+                           ni = 5
+    //+                           ni/2 + 1 = 3
+    //+                           ni/2 + 1 = 2
+    //+                           ni/2 + 1 = 2
+    //+                           ni = 11
+    //+                           ni/2 + 1 = 6
+    //+                           ni/2 + 1 = 4
+    //++++++++++++++++++++++++++++++++++++++++++++++
+
+    //! mgconst(6) = 1 standard multigrid - window and grid sizes need
+    //                 to be a multiple of 2.
+    //               2 heterogeneous multigrid.
+    //               3 anisotropic multigrid.
+
+    int mgtype = 2;
+
+    int istp, jstp, kstp;
+    istp = 2;
+    jstp = 2;
+    kstp = 2;
+
+    if (MAX((ni - 1), 1) % 2 != 0)
+    {
+        if (mgtype <= 1) return;
+        istp = 1;
+    }
+
+    if (MAX((nj - 1), 1) % 2 != 0)
+    {
+        if (mgtype <= 1) return;
+        jstp = 1;
+    }
+
+    if (MAX((nk - 1), 1) % 2 != 0)
+    {
+        if (mgtype <= 1) return;
+        kstp = 1;
+    }
+
+    int imin, jmin, kmin, imax, jmax, kmax;
+
+    StructBCSet *structBCSet = this->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+
+        bcregion->GetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+
+        int nsurf = bcregion->GetFaceDirection() + 1;
+
+        if (nsurf == 1)
+        {
+            if ((jmin - 1) % 2 != 0)
+            {
+                if (mgtype <= 1) return;
+                jstp = 1;
+            }
+            if (jmax % 2 != 0)
+            {
+                if (mgtype <= 1) return;
+                jstp = 1;
+            }
+
+            if ((kmin - 1) % 2 != 0)
+            {
+                if (mgtype <= 1) return;
+                kstp = 1;
+            }
+            if (kmax % 2 != 0)
+            {
+                if (mgtype <= 1) return;
+                kstp = 1;
+            }
+        }
+        else if (nsurf == 2)
+        {
+            if ((kmin - 1) % 2 != 0)
+            {
+                if (mgtype <= 1) return;
+                kstp = 1;
+            }
+            if (kmax % 2 != 0)
+            {
+                if (mgtype <= 1) return;
+                kstp = 1;
+            }
+
+            if ((imin - 1) % 2 != 0)
+            {
+                if (mgtype <= 1) return;
+                istp = 1;
+            }
+            if (imax % 2 != 0)
+            {
+                if (mgtype <= 1) return;
+                istp = 1;
+            }
+        }
+        else if (nsurf == 3)
+        {
+            if ((imin - 1) % 2 != 0)
+            {
+                if (mgtype <= 1) return;
+                istp = 1;
+            }
+            if (imax % 2 != 0)
+            {
+                if (mgtype <= 1) return;
+                istp = 1;
+            }
+
+            if ((jmin - 1) % 2 != 0)
+            {
+                if (mgtype <= 1) return;
+                jstp = 1;
+            }
+            if (jmax % 2 != 0)
+            {
+                if (mgtype <= 1) return;
+                jstp = 1;
+            }
+        }
+        else
+        {
+            PHMPI::FreeBlockData();
+            cout << "FATAL error in void StructGrid::CoarseGrids(int nlmax)!\n" << endl;
+            MPI_Abort(MPI_COMM_WORLD, -1);
+        }
+    }
+
+    this->SetMultigridStepI(istp);
+    this->SetMultigridStepJ(jstp);
+    this->SetMultigridStepK(kstp);
+
+    //! After the previous process, the program runs here, it must meet the needs.
+    int cni, cnj, cnk;
+    cni = (ni - 1) / istp + 1;
+    cnj = (nj - 1) / jstp + 1;
+    cnk = (nk - 1) / kstp + 1;
+
+    StructGrid *cgrid = new StructGrid();
+    cgrid->InitGrid(new GridID(* this->GetGridID()), level + 1, this->GetDim(), STRUCTGRID);
+
+    //! coor1 = Coordinates of the corner points of the control
+    //!         volumes of the fine grid.
+    //! n11   = Number of cells in I-direction of the fine grid.
+    //! n21   = Number of cells in J-direction of the fine grid.
+    //! n31   = Number of cells in K-direction of the fine grid.
+    //! n10   = Number of cells in I-direction of the coarse grid.
+    //! n20   = Number of cells in J-direction of the coarse grid.
+    //! n30   = Number of cells in K-direction of the coarse grid.
+
+    int cnTNode = cni * cnj * cnk;
+    Range cIC(1, cni-1);
+    Range cJC(1, cnj-1);
+    Range cKC(1, cnk-1);
+
+    if (cgrid->GetDim() == TWO_D) cKC.setRange(1, 1);
+    int cnTCell = cIC.length() * cJC.length() * cKC.length();
+    int cnTFace = (cnj - 1) * (cnk - 1) * cni + (cnk - 1) * (cni - 1) * cnj + (cni - 1) * (cnj - 1) * cnk;
+
+    cgrid->SetNTotalNode(cnTNode);
+    cgrid->SetNTotalFace(cnTFace);
+    cgrid->SetNTotalCell(cnTCell);
+
+    RDouble *cx = new RDouble [cnTNode];
+    RDouble *cy = new RDouble [cnTNode];
+    RDouble *cz = new RDouble [cnTNode];
+
+    cgrid->SetX(cx);
+    cgrid->SetY(cy);
+    cgrid->SetZ(cz);
+
+    cgrid->SetNI(cni);
+    cgrid->SetNJ(cnj);
+    cgrid->SetNK(cnk);
+
+    cgrid->SetArrayLayout();
+    RDouble3D &xx = * (this->GetStructX());
+    RDouble3D &yy = * (this->GetStructY());
+    RDouble3D &zz = * (this->GetStructZ());
+
+    RDouble3D &cxx = * (cgrid->GetStructX());
+    RDouble3D &cyy = * (cgrid->GetStructY());
+    RDouble3D &czz = * (cgrid->GetStructZ());
+
+    int i0, j0, k0;
+
+    k0 = 1;
+    for (int k = 1; k <= nk; k += kstp)
+    {
+        j0 = 1;
+        for (int j = 1; j <= nj; j += jstp)
+        {
+            i0 = 1;
+            for (int i = 1; i <= ni; i += istp)
+            {
+                cxx(i0, j0, k0) = xx(i, j, k);
+                cyy(i0, j0, k0) = yy(i, j, k);
+                czz(i0, j0, k0) = zz(i, j, k);
+                i0 += 1;
+            }
+            j0 += 1;
+        }
+        k0 += 1;
+    }
+
+    int nb = this->GetZoneID();
+
+    cgrid->CreateCompositeBCRegion(nBCRegion);
+    StructBCSet *cstructBCSet = cgrid->GetStructBCSet();
+
+    int bctype;
+    string bcname;
+    int s_lr, s_nd;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+
+        bcregion->GetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+        bctype = bcregion->GetBCType();
+        bcname = bcregion->GetBCName();
+        s_lr   = bcregion->GetFaceLeftOrRightIndex();
+        s_nd   = bcregion->GetFaceDirection();
+
+        int nsurf = bcregion->GetFaceDirection() + 1;
+        StructBC *cbcregion = new StructBC(nb, iBCRegion);
+        cstructBCSet->SetBCRegion(iBCRegion, cbcregion);
+
+        cbcregion->ComputeMultiGridIJKRegion(imin, imax, jmin, jmax, kmin, kmax, istp, jstp, kstp, nsurf);
+        cbcregion->SetBCType(bctype);
+        cbcregion->SetBCName(bcname);
+        cbcregion->SetFaceLeftOrRightIndex(s_lr);
+        cbcregion->SetFaceDirection(s_nd);
+        cbcregion->InitFaceDirectionIndex();
+    }
+
+    cgrid->SetBCFaceInfo();
+    cgrid->SetVolumeCondition(this->GetVolumeConditionIn());
+
+    this->SetCoarseGrid(cgrid);
+    cgrid->SetFineGrid(this);
+    cgrid->SetLevel(this->GetLevel() + 1);
+
+    cgrid->ComputeMetrics();
+}
+
+LIB_EXPORT void StructGrid::ReadXYZ(fstream &file)
+{
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetNodeIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int fileFormat = GlobalDataBase::GetIntParaFromDB("fileformat");
+    //! fileformat : Grid file format.
+    //!              0 -- BINARY
+    //!              1 -- ASCII
+    if (fileFormat == 1)
+    {
+        ReadXYZASCII(file, xx, ist, ied, jst, jed, kst, ked);
+        ReadXYZASCII(file, yy, ist, ied, jst, jed, kst, ked);
+        ReadXYZASCII(file, zz, ist, ied, jst, jed, kst, ked);
+    }
+    else if (fileFormat == 0)
+    {
+        ReadXYZ(file, xx, ist, ied, jst, jed, kst, ked);
+        ReadXYZ(file, yy, ist, ied, jst, jed, kst, ked);
+        ReadXYZ(file, zz, ist, ied, jst, jed, kst, ked);
+    }
+
+    ComputeMinMaxBox();
+}
+
+void StructGrid::ReadXYZ(fstream &file, RDouble3D &coor, int ist, int ied, int jst, int jed, int kst, int ked)
+{
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                file.read(reinterpret_cast<char *>(&coor(i, j, k)), sizeof(RDouble));
+            }
+        }
+    }
+}
+
+void StructGrid::ReadXYZASCII(fstream &file, RDouble3D &coor, int ist, int ied, int jst, int jed, int kst, int ked)
+{
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                file >> coor(i, j, k);
+            }
+        }
+    }
+}
+
+void StructGrid::WriteXYZ(fstream &file, RDouble3D &coor, int ist, int ied, int jst, int jed, int kst, int ked)
+{
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                file.write(reinterpret_cast<char *>(&coor(i, j, k)), sizeof(RDouble));
+            }
+        }
+    }
+}
+
+LIB_EXPORT void StructGrid::WriteXYZ(fstream &file, int ist, int ied, int jst, int jed, int kst, int ked)
+{
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+
+    WriteXYZ(file, xx, ist, ied, jst, jed, kst, ked);
+    WriteXYZ(file, yy, ist, ied, jst, jed, kst, ked);
+    WriteXYZ(file, zz, ist, ied, jst, jed, kst, ked);
+}
+
+LIB_EXPORT void StructGrid::SetBasicDimension()
+{
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    Range IC, JC, KC;
+    GetRange(ni, nj, nk, 0, -1, IC, JC, KC);
+
+    int nTotalNode, nTotalFace, nTotalCell;
+
+    nTotalNode = ni * nj * nk;
+    nTotalCell = IC.length() * JC.length() * KC.length();
+
+    nTotalFace = (nj - 1) * (nk - 1) * ni + (nk - 1) * (ni - 1) * nj + (ni - 1) * (nj - 1) * nk;
+
+    if (this->GetDim() == TWO_D)
+    {
+        nTotalFace = (nj - 1) * ni + (ni - 1) * nj;
+    }
+
+    this->SetNTotalNode(nTotalNode);
+    this->SetNTotalFace(nTotalFace);
+    this->SetNTotalCell(nTotalCell);
+
+    if (PHMPI::GetCurrentProcessorID() == 0)
+    {
+        ostringstream oss;
+        oss << "  Grid Dimension  : " << " " << this->GetDim() << " " << "\n";
+        oss << "  Number of Points: " << " " << nTotalNode << " " << "\n";
+        oss << "  Number of Faces : " << " " << nTotalFace << " " << "\n";
+        oss << "  Number of Cells : " << " " << nTotalCell << " " << "\n";
+        cout << oss.str();
+    }
+}
+
+LIB_EXPORT void StructGrid::SetBasicDimension(int ni, int nj, int nk)
+{
+    this->SetNI(ni);
+    this->SetNJ(nj);
+    this->SetNK(nk);
+    Range I(1, ni - 1), J(1, nj - 1), K(1, nk - 1);
+
+    nTotalNode = ni * nj * nk;
+    nTotalCell = I.length() * J.length() * K.length();
+    nBoundFace = (ni - 1) * (nj - 1) * nk + (ni - 1) * nj * (nk - 1) + ni * (nj - 1) * (nk - 1);
+
+    return;
+}
+
+LIB_EXPORT void StructGrid::ReadGrid(fstream &file)
+{
+    VirtualFile *vfile = new VirtualFile(&file);
+
+    vfile->BeginReadWork();
+
+    ReadGrid(vfile);
+
+    vfile->EndReadWork();
+
+    delete vfile;
+}
+
+LIB_EXPORT void StructGrid::WriteGrid(fstream &file)
+{
+    VirtualFile *vfile = new VirtualFile(&file);
+
+    vfile->BeginWriteWork();
+
+    WriteGrid(vfile);
+
+    vfile->EndWriteWork();
+
+    delete vfile;
+}
+
+void StructGrid::DecodeGrid(DataContainer *cdata)
+{
+    VirtualFile *vfile = new VirtualFile(cdata);
+
+    vfile->BeginReadWork();
+
+    ReadGrid(vfile);
+
+    vfile->EndReadWork();
+
+    delete vfile;
+}
+
+void StructGrid::EncodeGrid(DataContainer *cdata)
+{
+    VirtualFile *vfile = new VirtualFile(cdata);
+
+    vfile->BeginWriteWork();
+
+    WriteGrid(vfile);
+
+    vfile->EndWriteWork();
+
+    delete vfile;
+}
+
+void StructGrid::ReadGrid(VirtualFile *vfile)
+{
+    if (PHMPI::GetCurrentProcessorID() == 0)
+    {
+        ostringstream oss;
+        oss << "Reading Structured Grid Of Zone " << " " << GetZoneID() << " " << "...\n";
+        cout << oss.str();
+    }
+    
+    int ni = 0;
+    int nj = 0;
+    int nk = 0;
+
+    vfile->read(reinterpret_cast<char*>(&ni), sizeof(int));
+    vfile->read(reinterpret_cast<char*>(&nj), sizeof(int));
+    vfile->read(reinterpret_cast<char*>(&nk), sizeof(int));
+    SetNI(ni);
+    SetNJ(nj);
+    SetNK(nk);
+    SetBasicDimension();
+
+    int nTotalNode = this->GetNTotalNode();
+
+    RDouble *x, *y, *z;
+    x = new RDouble [nTotalNode];
+    y = new RDouble [nTotalNode];
+    z = new RDouble [nTotalNode];
+
+    this->SetX(x);
+    this->SetY(y);
+    this->SetZ(z);
+
+    vfile->read(reinterpret_cast<char*>(x), nTotalNode * sizeof(RDouble));
+    vfile->read(reinterpret_cast<char*>(y), nTotalNode * sizeof(RDouble));
+    vfile->read(reinterpret_cast<char*>(z), nTotalNode * sizeof(RDouble));
+
+    RotateAboutAxis();
+
+    ComputeMinMaxBox();
+    SetArrayLayout();
+
+    int sizeint = sizeof(int);
+    int nBCRegion;
+    vfile->read(reinterpret_cast<char*>(&nBCRegion), sizeint);
+
+    this->CreateCompositeBCRegion(nBCRegion);
+    StructBCSet *structBCSet = this->GetStructBCSet();
+
+    int nb = this->GetZoneID();
+    int imin, imax, jmin, jmax, kmin, kmax, bctype;
+    int s_lr, s_nd;
+    //! Read the source region imin, imax, jmin, jmax, kmin, kmax, bctype.
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = new StructBC(nb, iBCRegion);
+        structBCSet->SetBCRegion(iBCRegion, bcregion);
+        vfile->read(reinterpret_cast<char*>(&imin), sizeint);
+        vfile->read(reinterpret_cast<char*>(&imax), sizeint);
+        vfile->read(reinterpret_cast<char*>(&jmin), sizeint);
+        vfile->read(reinterpret_cast<char*>(&jmax), sizeint);
+        vfile->read(reinterpret_cast<char*>(&kmin), sizeint);
+        vfile->read(reinterpret_cast<char*>(&kmax), sizeint);
+
+        vfile->read(reinterpret_cast<char*>(&bctype), sizeint);
+        vfile->read(reinterpret_cast<char*>(&s_lr), sizeint);
+        vfile->read(reinterpret_cast<char*>(&s_nd), sizeint);
+
+        bcregion->SetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+        bcregion->SetBCType(bctype);
+        bcregion->SetFaceLeftOrRightIndex(s_lr);
+        bcregion->SetFaceDirection(s_nd);
+        bcregion->InitFaceDirectionIndex();
+    }
+    this->SetBCFaceInfo();
+
+    int nIFace;
+    vfile->read(reinterpret_cast<char*>(&nIFace), sizeint);
+    InterfaceInfo *interfaceInfo = 0;
+    this->SetInterfaceInfo(interfaceInfo);
+
+    if (nIFace > 0)
+    {
+        interfaceInfo = new InterfaceInfo(nIFace, this);
+        this->SetInterfaceInfo(interfaceInfo);
+        int *interFace2ZoneID       = interfaceInfo->GetInterFace2ZoneID();
+        int *interFace2InterFaceID  = interfaceInfo->GetInterFace2InterFaceID();
+        int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+
+        vfile->read(reinterpret_cast<char*>(interFace2ZoneID      ), nIFace * sizeof(int));
+        vfile->read(reinterpret_cast<char*>(interFace2InterFaceID ), nIFace * sizeof(int));
+        vfile->read(reinterpret_cast<char*>(interFace2BoundaryFace), nIFace * sizeof(int));
+    }
+}
+
+void StructGrid::WriteGrid(VirtualFile *vfile)
+{
+    int ni = GetNI();
+    int nj = GetNJ();
+    int nk = GetNK();
+    vfile->write(reinterpret_cast<char*>(&ni), sizeof(int));
+    vfile->write(reinterpret_cast<char*>(&nj), sizeof(int));
+    vfile->write(reinterpret_cast<char*>(&nk), sizeof(int));
+
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+
+    int nTotalNode = this->GetNTotalNode();
+
+    RotateAboutAxis();
+
+    vfile->write(reinterpret_cast<char*>(x), nTotalNode * sizeof(RDouble));
+    vfile->write(reinterpret_cast<char*>(y), nTotalNode * sizeof(RDouble));
+    vfile->write(reinterpret_cast<char*>(z), nTotalNode * sizeof(RDouble));
+
+    int imin, imax, jmin, jmax, kmin, kmax, bctype;
+    int s_lr, s_nd;
+
+    StructBCSet *structBCSet = this->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    vfile->write(reinterpret_cast<char*>(&nBCRegion), sizeof(int));
+
+    //! Read the source region imin,imax,jmin,jmax,kmin,kmax,bctype.
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        bcregion->GetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+        bctype = bcregion->GetBCType();
+        s_lr = bcregion->GetFaceLeftOrRightIndex();
+        s_nd = bcregion->GetFaceDirection();
+
+        vfile->write(reinterpret_cast<char*>(&imin), sizeof(int));
+        vfile->write(reinterpret_cast<char*>(&imax), sizeof(int));
+        vfile->write(reinterpret_cast<char*>(&jmin), sizeof(int));
+        vfile->write(reinterpret_cast<char*>(&jmax), sizeof(int));
+        vfile->write(reinterpret_cast<char*>(&kmin), sizeof(int));
+        vfile->write(reinterpret_cast<char*>(&kmax), sizeof(int));
+        vfile->write(reinterpret_cast<char*>(&bctype), sizeof(int));
+        vfile->write(reinterpret_cast<char*>(&s_lr), sizeof(int));
+        vfile->write(reinterpret_cast<char*>(&s_nd), sizeof(int));
+    }
+
+    InterfaceInfo *interfaceInfo = this->GetInterfaceInfo();
+
+    int nIFace = 0;
+    if (interfaceInfo)
+    {
+        nIFace = interfaceInfo->GetNIFace();
+    }
+
+    vfile->write(reinterpret_cast<char*>(&nIFace), sizeof(int));
+    if (interfaceInfo)
+    {
+        int *interFace2ZoneID       = interfaceInfo->GetInterFace2ZoneID();
+        int *interFace2InterFaceID  = interfaceInfo->GetInterFace2InterFaceID();
+        int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+
+        vfile->write(reinterpret_cast<char*>(interFace2ZoneID      ), nIFace * sizeof(int));
+        vfile->write(reinterpret_cast<char*>(interFace2InterFaceID ), nIFace * sizeof(int));
+        vfile->write(reinterpret_cast<char*>(interFace2BoundaryFace), nIFace * sizeof(int));
+    }
+}
+
+LIB_EXPORT void StructGrid::AllocateOversetGrid()
+{
+    oversetGridTopology->CreateCellContainer(nTotalCell);
+    UnstructGrid *gridUnstr = this->GetUnstrGrid();
+    if (!gridUnstr)
+    {
+        return;
+    }
+    gridUnstr->AllocateOversetGrid();
+    int *iBlank = gridUnstr->GetBlankIndex();
+    oversetGridTopology->SetCellContainer(iBlank);
+}
+
+LIB_EXPORT void StructGrid::CopyOversetFromUnstructGrid()
+{
+    UnstructGrid *gridUnstr = this->GetUnstrGrid();
+    if (!gridUnstr) return;
+
+    int *iBlank = gridUnstr->GetBlankIndex();
+    CopyIBlank3D(iBlank);
+}
+
+LIB_EXPORT int *StructGrid::GetCellTypeContainer()
+{
+    return oversetGridTopology->GetCellTypeContainer();
+}
+
+LIB_EXPORT void StructGrid::GetBoundaryMinMax(RDouble *pmin, RDouble *pmax)
+{
+    using namespace PHSPACE;
+
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+
+    pmin[0] = LARGE;
+    pmin[1] = LARGE;
+    pmin[2] = LARGE;
+
+    pmax[0] = - LARGE;
+    pmax[1] = - LARGE;
+    pmax[2] = - LARGE;
+
+    int imin, imax, jmin, jmax, kmin, kmax, bctype;
+
+    StructBCSet *structBCSet = this->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        bcregion->GetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+        bctype = bcregion->GetBCType();
+
+        int nsurf = bcregion->GetFaceDirection() + 1;
+
+        int il1, jl1, kl1;
+        this->GetNsurfIndex( il1, jl1, kl1, nsurf);
+
+        Range I(imin, imax + il1);
+        Range J(jmin, jmax + jl1);
+        Range K(kmin, kmax + kl1);
+
+        int ist, ied, jst, jed, kst, ked;
+        GetIJKRegion(I, J, K, ist, ied, jst, jed, kst, ked);
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble xm, ym, zm;
+                    xm = xx(i, j, k);
+                    ym = yy(i, j, k);
+                    zm = zz(i, j, k);
+                    pmin[0] = MIN(static_cast<RDouble>(pmin[0]), xm);
+                    pmin[1] = MIN(static_cast<RDouble>(pmin[1]), ym);
+                    pmin[2] = MIN(static_cast<RDouble>(pmin[2]), zm);
+
+                    pmax[0] = MAX(static_cast<RDouble>(pmax[0]), xm);
+                    pmax[1] = MAX(static_cast<RDouble>(pmax[1]), ym);
+                    pmax[2] = MAX(static_cast<RDouble>(pmax[2]), zm);
+                }
+            }
+        }
+    }
+}
+
+LIB_EXPORT void StructGrid::GetMinMaxDS(RDouble &dismin, RDouble &dismax)
+{
+    using namespace PHSPACE;
+    //! Check the minimum grid distance.
+    dismin =   LARGE;
+    dismax = - LARGE;
+
+    RDouble3D &xs = * this->GetStructX();
+    RDouble3D &ys = * this->GetStructY();
+    RDouble3D &zs = * this->GetStructZ();
+
+    int nDim = GetDim();
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble dx[12], dy[12], dz[12];
+    if (nDim == THREE_D)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    dx[0]  = xs(i+1, j  , k ) - xs(i  , j  , k );
+                    dy[0]  = ys(i+1, j  , k ) - ys(i  , j  , k );
+                    dz[0]  = zs(i+1, j  , k ) - zs(i  , j  , k );
+
+                    dx[1]  = xs(i+1, j+1, k ) - xs(i+1, j  , k );
+                    dy[1]  = ys(i+1, j+1, k ) - ys(i+1, j  , k );
+                    dz[1]  = zs(i+1, j+1, k ) - zs(i+1, j  , k );
+
+                    dx[2]  = xs(i  , j+1, k ) - xs(i+1, j+1, k );
+                    dy[2]  = ys(i  , j+1, k ) - ys(i+1, j+1, k );
+                    dz[2]  = zs(i  , j+1, k ) - zs(i+1, j+1, k );
+
+                    dx[3]  = xs(i  , j  , k ) - xs(i  , j+1, k );
+                    dy[3]  = ys(i  , j  , k ) - ys(i  , j+1, k );
+                    dz[3]  = zs(i  , j  , k ) - zs(i  , j+1, k );
+
+                    dx[4]  = xs(i+1, j  , k+1) - xs(i  , j  , k+1);
+                    dy[4]  = ys(i+1, j  , k+1) - ys(i  , j  , k+1);
+                    dz[4]  = zs(i+1, j  , k+1) - zs(i  , j  , k+1);
+
+                    dx[5]  = xs(i+1, j+1, k+1) - xs(i+1, j  , k+1);
+                    dy[5]  = ys(i+1, j+1, k+1) - ys(i+1, j  , k+1);
+                    dz[5]  = zs(i+1, j+1, k+1) - zs(i+1, j  , k+1);
+
+                    dx[6]  = xs(i  , j+1, k+1) - xs(i+1, j+1, k+1);
+                    dy[6]  = ys(i  , j+1, k+1) - ys(i+1, j+1, k+1);
+                    dz[6]  = zs(i  , j+1, k+1) - zs(i+1, j+1, k+1);
+
+                    dx[7]  = xs(i  , j  , k+1) - xs(i  , j+1, k+1);
+                    dy[7]  = ys(i  , j  , k+1) - ys(i  , j+1, k+1);
+                    dz[7]  = zs(i  , j  , k+1) - zs(i  , j+1, k+1);
+
+                    dx[8]  = xs(i  , j  , k+1) - xs(i  , j  , k );
+                    dy[8]  = ys(i  , j  , k+1) - ys(i  , j  , k );
+                    dz[8]  = zs(i  , j  , k+1) - zs(i  , j  , k );
+
+                    dx[9]  = xs(i+1, j  , k+1) - xs(i+1, j  , k );
+                    dy[9]  = ys(i+1, j  , k+1) - ys(i+1, j  , k );
+                    dz[9]  = zs(i+1, j  , k+1) - zs(i+1, j  , k );
+
+                    dx[10] = xs(i+1, j+1, k+1) - xs(i+1, j+1, k );
+                    dy[10] = ys(i+1, j+1, k+1) - ys(i+1, j+1, k );
+                    dz[10] = zs(i+1, j+1, k+1) - zs(i+1, j+1, k );
+
+                    dx[11] = xs(i  , j+1, k+1) - xs(i  , j+1, k );
+                    dy[11] = ys(i  , j+1, k+1) - ys(i  , j+1, k );
+                    dz[11] = zs(i  , j+1, k+1) - zs(i  , j+1, k );
+
+                    for (int m = 0; m < 12; ++ m)
+                    {
+                        RDouble ds = sqrt(dx[m] * dx[m] + dy[m] * dy[m] + dz[m] * dz[m]);
+                        if (ds <= SAME_POINT_TOL) continue;
+                        dismin = MIN(dismin, ds);
+                        dismax = MAX(dismax, ds);
+                    }
+                }
+            }
+        }
+    }
+    else
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    dx[0] = xs(i+1, j  , k) - xs(i  , j  , k);
+                    dy[0] = ys(i+1, j  , k) - ys(i  , j  , k);
+
+                    dx[1] = xs(i+1, j+1, k) - xs(i+1, j  , k);
+                    dy[1] = ys(i+1, j+1, k) - ys(i+1, j  , k);
+
+                    dx[2] = xs(i  , j+1, k) - xs(i+1, j+1, k);
+                    dy[2] = ys(i  , j+1, k) - ys(i+1, j+1, k);
+
+                    dx[3] = xs(i  , j  , k) - xs(i  , j+1, k);
+                    dy[3] = ys(i  , j  , k) - ys(i  , j+1, k);
+                    for (int m = 0; m < 4; ++ m)
+                    {
+                        RDouble ds = sqrt(dx[m] * dx[m] + dy[m] * dy[m]);
+                        if (ds <= SAME_POINT_TOL) continue;
+                        dismin = MIN(dismin, ds);
+                        dismax = MAX(dismax, ds);
+                    }
+                }
+            }
+        }
+    }
+}
+
+LIB_EXPORT void StructGrid::ToTecplot()
+{
+    fstream file;
+
+    file.open("teststructgrid.plt", ios_base::out);
+
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    file << "variables = \"x\" \"y\" \"z\" \n";
+
+    file << "zone i = " << ni << " j = " << nj << " k = " << nk << " f = block \n";
+
+    RDouble3D &xx = * GetStructX();
+    RDouble3D &yy = * GetStructY();
+    RDouble3D &zz = * GetStructZ();
+    int count = 0;
+    for (int k = 1; k <= nk; ++ k)
+    {
+        for (int j = 1; j <= nj; ++ j)
+        {
+            for (int i = 1; i <= ni; ++ i)
+            {
+                file << xx(i, j, k) << " ";
+                ++ count;
+                if (count % 5 == 0) file << "\n";
+            }
+        }
+    }
+
+    for (int k = 1; k <= nk; ++ k)
+    {
+        for (int j = 1; j <= nj; ++ j)
+        {
+            for (int i = 1; i <= ni; ++ i)
+            {
+                file << yy(i, j, k) << " ";
+                ++ count;
+                if (count % 5 == 0) file << "\n";
+            }
+        }
+    }
+
+    for (int k = 1; k <= nk; ++ k)
+    {
+        for (int j = 1; j <= nj; ++ j)
+        {
+            for (int i = 1; i <= ni; ++ i)
+            {
+                file << zz(i, j, k) << " ";
+                ++ count;
+                if (count % 5 == 0) file << "\n";
+            }
+        }
+    }
+
+    file.close();
+    file.clear();
+
+    PHMPI::FreeBlockData();
+    cout << " " << endl;
+    MPI_Abort(MPI_COMM_WORLD, -1);
+}
+
+LIB_EXPORT void StructGrid::GridSurfaceVelocity(RDouble *xt, RDouble *yt, RDouble *zt)
+{
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    int ndim = GetDim();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, 0, I, J, K);
+
+    Range M(1, ndim);
+
+    RDouble3D xxt(xt, I, J, K, neverDeleteData, fortranArray);
+    RDouble3D yyt(yt, I, J, K, neverDeleteData, fortranArray);
+    RDouble3D zzt(zt, I, J, K, neverDeleteData, fortranArray);
+
+    RDouble4D &faceNormalX = *(this->GetFaceNormalX());
+    RDouble4D &faceNormalY = *(this->GetFaceNormalY());
+    RDouble4D &faceNormalZ = *(this->GetFaceNormalZ());
+
+    RDouble4D &faceVelocityX = *(this->GetFaceVelocityX());
+    RDouble4D &faceVelocityY = *(this->GetFaceVelocityY());
+    RDouble4D &faceVelocityZ = *(this->GetFaceVelocityZ());
+    RDouble4D &faceNormalVelocity = *(this->GetFaceNormalVelocity());
+
+    int ist, ied, jst, jed, kst, ked;
+    ist = 1;
+    ied = ni;
+    jst = 1;
+    jed = nj;
+    kst = 1;
+    ked = nk;
+
+    if (nk == 1) ked = 1;
+
+    int i1 = 1;
+    int j1 = 1;
+    int k1 = 1;
+
+    if (nk == 1) k1 = 0;
+    if (ndim == THREE_D)
+    {
+        int nd = 1;
+        for (int k = kst; k < ked; ++ k)
+        {
+            for (int j = jst; j < jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! Face 1: (i,j,k), (i,j,k+1), (i,j+1,k), (i,j+1,k+1).
+                    RDouble nx = faceNormalX(i, j, k, nd);
+                    RDouble ny = faceNormalY(i, j, k, nd);
+                    RDouble nz = faceNormalZ(i, j, k, nd);
+
+                    RDouble a  = fourth * (xxt(i, j, k) + xxt(i, j, k + k1) + xxt(i, j + j1, k) + xxt(i, j + j1, k + k1));
+                    RDouble b  = fourth * (yyt(i, j, k) + yyt(i, j, k + k1) + yyt(i, j + j1, k) + yyt(i, j + j1, k + k1));
+                    RDouble c  = fourth * (zzt(i, j, k) + zzt(i, j, k + k1) + zzt(i, j + j1, k) + zzt(i, j + j1, k + k1));
+                    RDouble d  =  (a * nx + b * ny + c * nz);
+
+                    faceVelocityX(i, j, k, nd) = a;
+                    faceVelocityY(i, j, k, nd) = b;
+                    faceVelocityZ(i, j, k, nd) = c;
+                    faceNormalVelocity(i, j, k, nd) = d;
+                }
+            }
+        }
+
+        //! Face 2: (i,j,k), (i,j,k+1), (i+1,j,k), (i+1,j,k+1).
+        nd = 2;
+        for (int k = kst; k < ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i < ied; ++ i)
+                {
+                    RDouble nx = faceNormalX(i, j, k, nd);
+                    RDouble ny = faceNormalY(i, j, k, nd);
+                    RDouble nz = faceNormalZ(i, j, k, nd);
+
+                    RDouble a = fourth * (xxt(i, j, k) + xxt(i, j, k + k1) + xxt(i + i1, j, k) + xxt(i + i1, j, k + k1));
+                    RDouble b = fourth * (yyt(i, j, k) + yyt(i, j, k + k1) + yyt(i + i1, j, k) + yyt(i + i1, j, k + k1));
+                    RDouble c = fourth * (zzt(i, j, k) + zzt(i, j, k + k1) + zzt(i + i1, j, k) + zzt(i + i1, j, k + k1));
+                    RDouble d  =  (a * nx + b * ny + c * nz);
+
+                    faceVelocityX(i, j, k, nd) = a;
+                    faceVelocityY(i, j, k, nd) = b;
+                    faceVelocityZ(i, j, k, nd) = c;
+                    faceNormalVelocity(i, j, k, nd) = d;
+                }
+            }
+        }
+
+        //! Face 3: (i,j,k), (i+1,j,k), (i,j+1,k), (i+1,j+1,k).
+        nd = 3;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j < jed; ++ j)
+            {
+                for (int i = ist; i < ied; ++ i)
+                {
+                    RDouble nx = faceNormalX(i, j, k, nd);
+                    RDouble ny = faceNormalY(i, j, k, nd);
+                    RDouble nz = faceNormalZ(i, j, k, nd);
+
+                    RDouble a = fourth * (xxt(i, j, k) + xxt(i + i1, j, k) + xxt(i, j + j1, k) + xxt(i + i1, j + j1, k));
+                    RDouble b = fourth * (yyt(i, j, k) + yyt(i + i1, j, k) + yyt(i, j + j1, k) + yyt(i + i1, j + j1, k));
+                    RDouble c = fourth * (zzt(i, j, k) + zzt(i + i1, j, k) + zzt(i, j + j1, k) + zzt(i + i1, j + j1, k));
+                    RDouble d  =  (a * nx + b * ny + c * nz);
+
+                    faceVelocityX(i, j, k, nd) = a;
+                    faceVelocityY(i, j, k, nd) = b;
+                    faceVelocityZ(i, j, k, nd) = c;
+                    faceNormalVelocity(i, j, k, nd) = d;
+                }
+            }
+        }
+    }
+    else if (ndim == TWO_D)
+    {
+        int nd = 1;
+        int k = 1;
+        {
+            for (int j = jst; j < jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! Face 1: (i,j,k), (i,j,k+1), (i,j+1,k), (i,j+1,k+1).
+                    RDouble nx = faceNormalX(i, j, k, nd);
+                    RDouble ny = faceNormalY(i, j, k, nd);
+                    RDouble nz = faceNormalZ(i, j, k, nd);
+
+                    RDouble a = fourth * (xxt(i, j, k) + xxt(i, j, k + k1) + xxt(i, j + j1, k) + xxt(i, j + j1, k + k1));
+                    RDouble b = fourth * (yyt(i, j, k) + yyt(i, j, k + k1) + yyt(i, j + j1, k) + yyt(i, j + j1, k + k1));
+                    RDouble c = fourth * (zzt(i, j, k) + zzt(i, j, k + k1) + zzt(i, j + j1, k) + zzt(i, j + j1, k + k1));
+                    RDouble d  =  (a * nx + b * ny + c * nz);
+
+                    faceVelocityX(i, j, k, nd) = a;
+                    faceVelocityY(i, j, k, nd) = b;
+                    faceVelocityZ(i, j, k, nd) = c;
+                    faceNormalVelocity(i, j, k, nd) = d;
+                }
+            }
+        }
+        //! Face 2: (i,j,k), (i,j,k+1), (i+1,j,k), (i+1,j,k+1).
+        nd = 2;
+        k = 1;
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i < ied; ++ i)
+                {
+                    RDouble nx = faceNormalX(i, j, k, nd);
+                    RDouble ny = faceNormalY(i, j, k, nd);
+                    RDouble nz = faceNormalZ(i, j, k, nd);
+
+                    RDouble a = fourth * (xxt(i, j, k) + xxt(i, j, k + k1) + xxt(i + i1, j, k) + xxt(i + i1, j, k + k1));
+                    RDouble b = fourth * (yyt(i, j, k) + yyt(i, j, k + k1) + yyt(i + i1, j, k) + yyt(i + i1, j, k + k1));
+                    RDouble c = fourth * (zzt(i, j, k) + zzt(i, j, k + k1) + zzt(i + i1, j, k) + zzt(i + i1, j, k + k1));
+                    RDouble d  =  (a * nx + b * ny + c * nz);
+
+                    faceVelocityX(i, j, k, nd) = a;
+                    faceVelocityY(i, j, k, nd) = b;
+                    faceVelocityZ(i, j, k, nd) = c;
+                    faceNormalVelocity(i, j, k, nd) = d;
+                }
+            }
+        }
+    }
+}
+
+LIB_EXPORT void StructGrid::ComputeGridFaceVelocity()
+{
+    int nTotalNode = this->GetNTotalNode();
+    RDouble *xt = new RDouble[nTotalNode];
+    RDouble *yt = new RDouble[nTotalNode];
+    RDouble *zt = new RDouble[nTotalNode];
+
+    GridVerticeVelocity(xt, yt, zt);
+    GridSurfaceVelocity(xt, yt, zt);
+
+    delete [] xt;
+    delete [] yt;
+    delete [] zt;
+}
+
+LIB_EXPORT void StructGrid::EncodeOversetGrid(DataContainer *cdata)
+{
+
+}
+
+LIB_EXPORT void StructGrid::Encode(DataContainer *cdata, int flag)
+{
+    if (flag == 0)
+    {
+        EncodeGrid(cdata);
+    }
+    else if (flag == 1)
+    {
+        EncodeOversetGrid(cdata);
+    }
+}
+
+LIB_EXPORT void StructGrid::Decode(DataContainer *cdata, int flag)
+{
+    if (flag == 0)
+    {
+        DecodeGrid(cdata);
+    }
+    else if (flag == 1)
+    {
+        DecodeOversetGrid(cdata);
+    }
+}
+
+LIB_EXPORT void StructGrid::ReviseNeighborZoneIndex(int zoneStart)
+{
+    InterfaceInfo *interfaceInfo = this->GetInterfaceInfo();
+
+    if (!interfaceInfo) return;
+
+    int nIFace = interfaceInfo->GetNIFace();
+
+    int *interFace2ZoneID = interfaceInfo->GetInterFace2ZoneID();
+
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        interFace2ZoneID[iFace] += zoneStart;
+    }
+
+    InterpointInformation *interpointInformation = this->GetInterpointInfo();
+
+    if (!interpointInformation) return;
+
+    int nIPoint = interpointInformation->GetNumberOfInterpoints();
+
+    int *interPoint2ZoneID = interpointInformation->GetInterPoint2ZoneID();
+
+    for (int iPoint = 0; iPoint < nIPoint; ++ iPoint)
+    {
+        interPoint2ZoneID[iPoint] += zoneStart;
+    }
+}
+
+LIB_EXPORT void StructGrid::DecodeOversetGrid(DataContainer *cdata)
+{
+
+}
+
+LIB_EXPORT void StructGrid::UpdateCoordinate(DataContainer *cdata)
+{
+    cdata->moveto_begin();
+    cout << "����ṹ�������������ļ�......\n";
+
+    int nTotalNode = this->GetNTotalNode();
+
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+
+    cdata->read(reinterpret_cast<char *>(x), nTotalNode * sizeof(RDouble));
+    cdata->read(reinterpret_cast<char *>(y), nTotalNode * sizeof(RDouble));
+    cdata->read(reinterpret_cast<char *>(z), nTotalNode * sizeof(RDouble));
+
+    ComputeMinMaxBox();
+}
+
+void StructGrid::GetCellCenter(ActionKey *actkey)
+{
+    InterfaceInfo *interfaceInfo = this->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    StructGrid *fgrid = StructGridCast(this->GetFinestGrid());
+    InterfaceInfo *fiinfo = fgrid->GetInterfaceInfo();
+
+    int level = this->GetLevel();
+
+    RDouble3D &vol = * this->GetCellVolume();
+    RDouble3D &xcc = * this->GetCellCenterX();
+    RDouble3D &ycc = * this->GetCellCenterY();
+    RDouble3D &zcc = * this->GetCellCenterZ();
+
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+
+    Int3D &cellType = *this->GetCellBoundaryType();
+
+    int ineighbor = fiinfo->FindIthNeighbor(actkey->ipos);
+    int *faceIndexForSend = fiinfo->GetFaceIndexForSend(ineighbor);
+    int nIFaceOfNeighbor = fiinfo->GetNIFaceOfNeighbor(ineighbor);
+
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+
+    int iFace, is, js, ks;
+    bool ifCommunicateNodeLocation = CommunicateNodeLocation();
+    int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    for (int iLocalFace = 0; iLocalFace < nIFaceOfNeighbor; ++ iLocalFace)
+    {
+        iFace = faceIndexForSend[iLocalFace];
+        fgrid->GetSourceIndexIJK(iFace, 1 , is, js, ks);
+        fgrid->RemapMultigridIJK(level, is, js, ks);
+
+        cdata->write(&xcc(is, js, ks), sizeof(RDouble));
+        cdata->write(&ycc(is, js, ks), sizeof(RDouble));
+        cdata->write(&zcc(is, js, ks), sizeof(RDouble));
+        cdata->write(&vol(is, js, ks), sizeof(RDouble));
+
+        if (!ifCommunicateNodeLocation)
+        {
+            continue;
+        }
+
+        if (level == 0)
+        {
+            cdata->write(&cellType(is, js, ks), sizeof(int));
+        }
+
+        if (nChemical != 0)
+        {
+            continue;
+        }
+
+        int IJKofNodes_1st_Layer[4][3];
+        int IJKofNodes_2nd_Layer[4][3];
+
+        GetNodeIJKfromSourceIndex(fgrid, iFace, 1, IJKofNodes_1st_Layer);
+        GetNodeIJKfromSourceIndex(fgrid, iFace, 2, IJKofNodes_2nd_Layer);
+        
+        for (int nodeID = 0; nodeID < 4; ++ nodeID)
+        {
+            cdata->write(&xx(IJKofNodes_1st_Layer[nodeID][0], IJKofNodes_1st_Layer[nodeID][1], IJKofNodes_1st_Layer[nodeID][2]), sizeof(RDouble));
+            cdata->write(&yy(IJKofNodes_1st_Layer[nodeID][0], IJKofNodes_1st_Layer[nodeID][1], IJKofNodes_1st_Layer[nodeID][2]), sizeof(RDouble));
+            cdata->write(&zz(IJKofNodes_1st_Layer[nodeID][0], IJKofNodes_1st_Layer[nodeID][1], IJKofNodes_1st_Layer[nodeID][2]), sizeof(RDouble));
+
+            cdata->write(&xx(IJKofNodes_2nd_Layer[nodeID][0], IJKofNodes_2nd_Layer[nodeID][1], IJKofNodes_2nd_Layer[nodeID][2]), sizeof(RDouble));
+            cdata->write(&yy(IJKofNodes_2nd_Layer[nodeID][0], IJKofNodes_2nd_Layer[nodeID][1], IJKofNodes_2nd_Layer[nodeID][2]), sizeof(RDouble));
+            cdata->write(&zz(IJKofNodes_2nd_Layer[nodeID][0], IJKofNodes_2nd_Layer[nodeID][1], IJKofNodes_2nd_Layer[nodeID][2]), sizeof(RDouble));
+        }
+    }
+}
+
+void StructGrid::TranslateCellCenter(ActionKey *actkey)
+{
+    InterfaceInfo *interfaceInfo = this->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    StructGrid *fgrid = StructGridCast(this->GetFinestGrid());
+    int level = this->GetLevel();
+
+    StructBCSet *structBCSet = fgrid->GetStructBCSet();
+    int periodicType = PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType");
+    double rotationAngle = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+    rotationAngle = rotationAngle * PI / 180;
+
+    RDouble3D &vol = * this->GetCellVolume();
+    RDouble3D &xcc = * this->GetCellCenterX();
+    RDouble3D &ycc = * this->GetCellCenterY();
+    RDouble3D &zcc = * this->GetCellCenterZ();
+
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+
+    Int3D &cellType = *this->GetCellBoundaryType();
+
+    InterfaceInfo *fiinfo = fgrid->GetInterfaceInfo();
+    int ineighbor = fiinfo->FindIthNeighbor(actkey->ipos);
+    int nIFaceOfNeighbor = fiinfo->GetNIFaceOfNeighbor(ineighbor);
+    int *faceIndexForRecv = fiinfo->GetFaceIndexForRecv(ineighbor);
+
+    int iFace, it, jt, kt;
+
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+
+    bool ifCommunicateNodeLocation = CommunicateNodeLocation();
+    int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    for (int iLocalFace = 0; iLocalFace < nIFaceOfNeighbor; ++ iLocalFace)
+    {
+        iFace = faceIndexForRecv[iLocalFace];
+        fgrid->GetTargetIndexIJK(iFace, 1 , it, jt, kt);
+        fgrid->RemapMultigridIJK(level, it, jt, kt);
+
+        cdata->read(&xcc(it, jt, kt), sizeof(RDouble));
+        cdata->read(&ycc(it, jt, kt), sizeof(RDouble));
+        cdata->read(&zcc(it, jt, kt), sizeof(RDouble));
+        cdata->read(&vol(it, jt, kt), sizeof(RDouble));
+
+        int *ibcregions = structBCSet->GetIFaceInfo();
+        int ibcregion = ibcregions[iFace];
+        StructBC *bcregion = structBCSet->GetBCRegion(ibcregion);
+        string bcName = bcregion->GetBCName();
+        if (periodicType == ROTATIONAL_PERIODICITY)
+        {
+            RDouble rotcell[3] = {0.0, 0.0, 0.0};
+            if (bcName == "Periodic_up")
+            {
+                rotcell[1] = ycc(it, jt, kt) * cos(2 * PI - rotationAngle) - zcc(it, jt, kt) * sin(2 * PI - rotationAngle);
+                rotcell[2] = ycc(it, jt, kt) * sin(2 * PI - rotationAngle) + zcc(it, jt, kt) * cos(2 * PI - rotationAngle);
+            }
+            else if (bcName == "Periodic_down")
+            {
+                rotcell[1] = ycc(it, jt, kt) * cos(rotationAngle) - zcc(it, jt, kt) * sin(rotationAngle);
+                rotcell[2] = ycc(it, jt, kt) * sin(rotationAngle) + zcc(it, jt, kt) * cos(rotationAngle);
+            }
+            ycc(it, jt, kt) = rotcell[1];
+            zcc(it, jt, kt) = rotcell[2];
+        }
+
+        if (!ifCommunicateNodeLocation)
+        {
+            continue;
+        }
+
+        if (level == 0)
+        {
+            int iCellType = -1;
+            PHRead(cdata, iCellType);
+            cellType(it, jt, kt) = iCellType;
+        }
+
+        if (nChemical != 0)
+        {
+            continue;
+        }
+
+        RDouble Data_1st_Layer[4][3] = {0.0};
+        RDouble Data_2nd_Layer[4][3] = {0.0};
+
+        for (int nodeID = 0; nodeID < 4; ++ nodeID)
+        {
+            cdata->read(&Data_1st_Layer[nodeID][0], sizeof(RDouble));
+            cdata->read(&Data_1st_Layer[nodeID][1], sizeof(RDouble));
+            cdata->read(&Data_1st_Layer[nodeID][2], sizeof(RDouble));
+
+            cdata->read(&Data_2nd_Layer[nodeID][0], sizeof(RDouble));
+            cdata->read(&Data_2nd_Layer[nodeID][1], sizeof(RDouble));
+            cdata->read(&Data_2nd_Layer[nodeID][2], sizeof(RDouble));
+            if (periodicType == ROTATIONAL_PERIODICITY)
+            {
+                RDouble rotData_1st[3] = {0.0};
+                RDouble rotData_2nd[3] = {0.0};
+
+                if (bcName == "Periodic_up")
+                {
+                    rotData_1st[1] = Data_1st_Layer[nodeID][1] * cos(2 * PI - rotationAngle) - Data_1st_Layer[nodeID][2] * sin(2 * PI - rotationAngle);
+                    rotData_1st[2] = Data_1st_Layer[nodeID][1] * sin(2 * PI - rotationAngle) + Data_1st_Layer[nodeID][2] * cos(2 * PI - rotationAngle);
+
+                    rotData_2nd[1] = Data_2nd_Layer[nodeID][1] * cos(2 * PI - rotationAngle) - Data_2nd_Layer[nodeID][2] * sin(2 * PI - rotationAngle);
+                    rotData_2nd[2] = Data_2nd_Layer[nodeID][1] * sin(2 * PI - rotationAngle) + Data_2nd_Layer[nodeID][2] * cos(2 * PI - rotationAngle);
+                }
+                else if (bcName == "Periodic_down")
+                {
+                    rotData_1st[1] = Data_1st_Layer[nodeID][1] * cos(rotationAngle) - Data_1st_Layer[nodeID][2] * sin(rotationAngle);
+                    rotData_1st[2] = Data_1st_Layer[nodeID][1] * sin(rotationAngle) + Data_1st_Layer[nodeID][2] * cos(rotationAngle);
+
+                    rotData_2nd[1] = Data_2nd_Layer[nodeID][1] * cos(rotationAngle) - Data_2nd_Layer[nodeID][2] * sin(rotationAngle);
+                    rotData_2nd[2] = Data_2nd_Layer[nodeID][1] * sin(rotationAngle) + Data_2nd_Layer[nodeID][2] * cos(rotationAngle);
+
+                }
+                Data_1st_Layer[nodeID][1] = rotData_1st[1];
+                Data_1st_Layer[nodeID][2] = rotData_1st[2];
+
+                Data_2nd_Layer[nodeID][1] = rotData_2nd[1];
+                Data_2nd_Layer[nodeID][2] = rotData_2nd[2];
+            }
+        }  
+
+        int IJKofNodes_1st_Layer[4][3];
+        int IJKofNodes_2nd_Layer[4][3];
+        GetNodeIJKfromTargetIndex(fgrid, iFace, 1, IJKofNodes_1st_Layer);
+        GetNodeIJKfromTargetIndex(fgrid, iFace, 2, IJKofNodes_2nd_Layer);
+
+        RDouble XYZofNodes_1st_Layer[4][3];
+        for (int nodeID = 0; nodeID < 4; ++ nodeID)
+        {
+            XYZofNodes_1st_Layer[nodeID][0] = xx(IJKofNodes_1st_Layer[nodeID][0], IJKofNodes_1st_Layer[nodeID][1], IJKofNodes_1st_Layer[nodeID][2]);
+            XYZofNodes_1st_Layer[nodeID][1] = yy(IJKofNodes_1st_Layer[nodeID][0], IJKofNodes_1st_Layer[nodeID][1], IJKofNodes_1st_Layer[nodeID][2]);
+            XYZofNodes_1st_Layer[nodeID][2] = zz(IJKofNodes_1st_Layer[nodeID][0], IJKofNodes_1st_Layer[nodeID][1], IJKofNodes_1st_Layer[nodeID][2]);
+        }
+        
+        int RelationBetweenTwoPairsofNodes[4];
+        GetRelationBetweenTwoPairsofNodes(RelationBetweenTwoPairsofNodes, XYZofNodes_1st_Layer, Data_1st_Layer);
+        
+        for (int nodeID = 0; nodeID < 4; ++ nodeID)
+        {
+            int abcdID = RelationBetweenTwoPairsofNodes[nodeID];
+            xx(IJKofNodes_2nd_Layer[nodeID][0], IJKofNodes_2nd_Layer[nodeID][1], IJKofNodes_2nd_Layer[nodeID][2]) = Data_2nd_Layer[abcdID][0];
+            yy(IJKofNodes_2nd_Layer[nodeID][0], IJKofNodes_2nd_Layer[nodeID][1], IJKofNodes_2nd_Layer[nodeID][2]) = Data_2nd_Layer[abcdID][1];
+            zz(IJKofNodes_2nd_Layer[nodeID][0], IJKofNodes_2nd_Layer[nodeID][1], IJKofNodes_2nd_Layer[nodeID][2]) = Data_2nd_Layer[abcdID][2];
+        }
+    }
+}
+
+void StructGrid::GetCellIBlank(ActionKey *actkey)
+{
+    GetUnstrGrid()->GetCellIBlank(actkey);
+    return;
+}
+
+void StructGrid::TranslateCellIBlank(ActionKey *actkey)
+{
+    GetUnstrGrid()->TranslateCellIBlank(actkey);
+    return;
+
+    //InterfaceInfo * interfaceInfo = this->GetInterfaceInfo();
+    //if (!interfaceInfo) return;
+
+    //int ineighbor = interfaceInfo->FindIthNeighbor(actkey->ipos);
+
+    //int nIFaceOfNeighbor = interfaceInfo->GetNIFaceOfNeighbor(ineighbor) / 2;
+    //int *faceIndexForRecv = interfaceInfo->GetFaceIndexForRecv(ineighbor);
+
+    //int *iBlank = this->GetUnstrGrid()->GetBlankIndex();
+    //Int3D &cellMapStrToUns = *reinterpret_cast<Int3D *> (GetDataPtr("cellMapStrToUns"));
+
+    //DataContainer *cdata = actkey->GetData();
+    //cdata->moveto_begin();
+
+    //int iFace, it, jt, kt;
+    //for (int iLocalFace = 0; iLocalFace < nIFaceOfNeighbor; ++ iLocalFace)
+    //{
+    //    iFace = faceIndexForRecv[iLocalFace];
+    //    this->GetTargetIndexIJK(iFace, 1 , it, jt, kt);
+    //    int iCell = cellMapStrToUns(it, jt, kt);
+
+    //    cdata->read(&iBlank[iCell], sizeof(int));
+    //}
+}
+
+bool StructGrid::CommunicateNodeLocation()
+{
+    bool Rwithghost = true;
+
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+    if (tscheme != LU_SGS)
+    {
+        Rwithghost = false;
+        return Rwithghost;
+    }
+
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+    if (isFVMOrFDM != FV_METHOD)
+    {
+        Rwithghost = false;
+        return Rwithghost;
+    }
+
+    int systemGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if (systemGridType != STRUCTGRID)
+    {
+        Rwithghost = false;
+        return Rwithghost;
+    }
+
+    int isOverset = PHSPACE::GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+    if (isOverset)
+    {
+        Rwithghost = false;
+        return Rwithghost;
+    }
+
+    int nMGLevel = PHSPACE::GlobalDataBase::GetIntParaFromDB("nMGLevel");
+    if (nMGLevel != 1)
+    {
+        Rwithghost = false;
+        return Rwithghost;
+    }
+
+    int compressible = GlobalDataBase::GetIntParaFromDB("compressible");
+    if (compressible != COMPRESSIBLE)
+    {
+        Rwithghost = false;
+        return Rwithghost;
+    }
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady)
+    {
+        Rwithghost = false;
+        return Rwithghost;
+    }
+    //int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    //if (nChemical != 0)
+    //{
+    //    Rwithghost = false;
+    //    return Rwithghost;
+    //}
+
+    int ifLowSpeedPrecon = GlobalDataBase::GetIntParaFromDB("ifLowSpeedPrecon");
+    if (ifLowSpeedPrecon != 0)
+    {
+        Rwithghost = false;
+        return Rwithghost;
+    }
+    int wallFunctionType = GlobalDataBase::GetIntParaFromDB("wallFunctionType");
+    if (wallFunctionType != WALLFUNCTION::NONE)
+    {
+        Rwithghost = false;
+        return Rwithghost;
+    }
+    return Rwithghost;
+}
+
+void StructGrid::GetNodeIJKfromSourceIndex(StructGrid *fgrid, int iFace, int layer, int IJKofNodes[4][3])
+{
+    int is, js, ks;
+    fgrid->GetSourceIndexIJK(iFace, layer, is, js, ks);
+
+    int id, jd, kd;
+    int i_lr, j_lr, k_lr;
+    fgrid->GetSourceIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+
+    int dijk1[3];
+    int dijk2[3];
+    int dijk3[3];
+
+    if (i_lr != 0)
+    {
+        //! I_face.
+        dijk1[0] = 0;
+        dijk1[1] = 1;
+        dijk1[2] = 0;
+
+        dijk2[0] = 0;
+        dijk2[1] = 0;
+        dijk2[2] = 1;
+    }
+    else if (j_lr != 0)
+    {
+        //! J_face.
+        dijk1[0] = 1;
+        dijk1[1] = 0;
+        dijk1[2] = 0;
+
+        dijk2[0] = 0;
+        dijk2[1] = 0;
+        dijk2[2] = 1;
+    }
+    else
+    {
+        //! K_face.
+        dijk1[0] = 1;
+        dijk1[1] = 0;
+        dijk1[2] = 0;
+
+        dijk2[0] = 0;
+        dijk2[1] = 1;
+        dijk2[2] = 0;
+    }
+
+    if (GetDim() == 2)
+    {
+        dijk1[2] = 0;
+        dijk2[2] = 0;
+    }
+
+    dijk3[0] = dijk1[0] + dijk2[0];
+    dijk3[1] = dijk1[1] + dijk2[1];
+    dijk3[2] = dijk1[2] + dijk2[2];
+
+    IJKofNodes[0][0] = is + id;
+    IJKofNodes[0][1] = js + jd;
+    IJKofNodes[0][2] = ks + kd;
+
+    IJKofNodes[1][0] = IJKofNodes[0][0] + dijk1[0];
+    IJKofNodes[1][1] = IJKofNodes[0][1] + dijk1[1];
+    IJKofNodes[1][2] = IJKofNodes[0][2] + dijk1[2];
+
+    IJKofNodes[2][0] = IJKofNodes[0][0] + dijk2[0];
+    IJKofNodes[2][1] = IJKofNodes[0][1] + dijk2[1];
+    IJKofNodes[2][2] = IJKofNodes[0][2] + dijk2[2];
+
+    IJKofNodes[3][0] = IJKofNodes[0][0] + dijk3[0];
+    IJKofNodes[3][1] = IJKofNodes[0][1] + dijk3[1];
+    IJKofNodes[3][2] = IJKofNodes[0][2] + dijk3[2];
+}
+
+void StructGrid::GetNodeIJKfromTargetIndex(StructGrid *fgrid, int iFace, int layer, int IJKofNodes[4][3])
+{
+    int it, jt, kt;
+    fgrid->GetTargetIndexIJK(iFace, layer, it, jt, kt);
+
+    int id, jd, kd;
+    int i_lr, j_lr, k_lr;
+    fgrid->GetTargetIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+
+    int dijk1[3];
+    int dijk2[3];
+    int dijk3[3];
+
+    if (i_lr != 0)
+    {
+        //! I_face.
+        dijk1[0] = 0;
+        dijk1[1] = 1;
+        dijk1[2] = 0;
+
+        dijk2[0] = 0;
+        dijk2[1] = 0;
+        dijk2[2] = 1;
+    }
+    else if (j_lr != 0)
+    {
+        //! J_face.
+        dijk1[0] = 1;
+        dijk1[1] = 0;
+        dijk1[2] = 0;
+
+        dijk2[0] = 0;
+        dijk2[1] = 0;
+        dijk2[2] = 1;
+    }
+    else
+    {
+        //! K_face.
+        dijk1[0] = 1;
+        dijk1[1] = 0;
+        dijk1[2] = 0;
+
+        dijk2[0] = 0;
+        dijk2[1] = 1;
+        dijk2[2] = 0;
+    }
+
+    if (GetDim() == 2)
+    {
+        dijk1[2] = 0;
+        dijk2[2] = 0;
+    }
+
+    dijk3[0] = dijk1[0] + dijk2[0];
+    dijk3[1] = dijk1[1] + dijk2[1];
+    dijk3[2] = dijk1[2] + dijk2[2];
+
+    IJKofNodes[0][0] = it + id;
+    IJKofNodes[0][1] = jt + jd;
+    IJKofNodes[0][2] = kt + kd;
+
+    IJKofNodes[1][0] = IJKofNodes[0][0] + dijk1[0];
+    IJKofNodes[1][1] = IJKofNodes[0][1] + dijk1[1];
+    IJKofNodes[1][2] = IJKofNodes[0][2] + dijk1[2];
+
+    IJKofNodes[2][0] = IJKofNodes[0][0] + dijk2[0];
+    IJKofNodes[2][1] = IJKofNodes[0][1] + dijk2[1];
+    IJKofNodes[2][2] = IJKofNodes[0][2] + dijk2[2];
+
+    IJKofNodes[3][0] = IJKofNodes[0][0] + dijk3[0];
+    IJKofNodes[3][1] = IJKofNodes[0][1] + dijk3[1];
+    IJKofNodes[3][2] = IJKofNodes[0][2] + dijk3[2];
+}
+
+void StructGrid::GetRelationBetweenTwoPairsofNodes(int RelationBetweenTwoPairsofNodes[4], RDouble Nodes_ABCD[4][3], RDouble Nodes_abcd[4][3])
+{
+    for (int nodeID = 0; nodeID < 4; ++ nodeID)
+    {
+        RDouble length2_Aa = 0.0;
+        RDouble length2_Ab = 0.0;
+        RDouble length2_Ac = 0.0;
+        RDouble length2_Ad = 0.0;
+
+        for (int m = 0; m <= 2; ++ m)
+        {
+            length2_Aa += (Nodes_ABCD[nodeID][m] - Nodes_abcd[0][m]) * (Nodes_ABCD[nodeID][m] - Nodes_abcd[0][m]);
+            length2_Ab += (Nodes_ABCD[nodeID][m] - Nodes_abcd[1][m]) * (Nodes_ABCD[nodeID][m] - Nodes_abcd[1][m]);
+            length2_Ac += (Nodes_ABCD[nodeID][m] - Nodes_abcd[2][m]) * (Nodes_ABCD[nodeID][m] - Nodes_abcd[2][m]);
+            length2_Ad += (Nodes_ABCD[nodeID][m] - Nodes_abcd[3][m]) * (Nodes_ABCD[nodeID][m] - Nodes_abcd[3][m]);
+        }
+
+        RDouble length2_Min = length2_Aa;
+        RelationBetweenTwoPairsofNodes[nodeID] = 0;
+        
+        if (length2_Ab < length2_Min)
+        {
+            length2_Min = length2_Ab;
+            RelationBetweenTwoPairsofNodes[nodeID] = 1;
+        }
+        if (length2_Ac < length2_Min)
+        {
+            length2_Min = length2_Ac;
+            RelationBetweenTwoPairsofNodes[nodeID] = 2;
+        }
+        if (length2_Ad < length2_Min)
+        {
+            length2_Min = length2_Ad;
+            RelationBetweenTwoPairsofNodes[nodeID] = 3;
+        }
+    }
+}
+
+LIB_EXPORT void StructGrid::GetSourceIndexIJK_fornodetransfer(int iFace, int &id, int &jd, int &kd, int &i_lr, int &j_lr, int &k_lr)
+{
+    this->structBCSet->GetSourceIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+}
+
+LIB_EXPORT void StructGrid::GetTargetIndexIJK_fornodetransfer(int iFace, int &id, int &jd, int &kd, int &i_lr, int &j_lr, int &k_lr)
+{
+    this->structBCSet->GetTargetIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+}
+
+void StructGrid::ComputeMetrics_BC()
+{
+    if (GetDim() == 2)
+    {
+        ComputeMetrics_BC_2D();
+    }
+    else
+    {
+        ComputeMetrics_BC_3D();
+    }
+}
+
+void StructGrid::ComputeMetrics_BC_2D()
+{
+    RDouble4D &xfn  = * (this->GetFaceNormalX());
+    RDouble4D &yfn  = * (this->GetFaceNormalY());
+    RDouble4D &zfn  = * (this->GetFaceNormalZ());
+    RDouble4D &area = * (this->GetFaceArea());
+    RDouble4D &xfv  = * (this->GetFaceVectorX());
+    RDouble4D &yfv  = * (this->GetFaceVectorY());
+    RDouble4D &zfv  = * (this->GetFaceVectorZ());
+
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+
+    zfn = 0.0;
+    zfv = 0.0;
+
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+
+    RDouble r1[3], r2[3], r4[3];
+    RDouble vkc[3], vet[3];
+    int i, j;
+    const int k = 1;
+
+    i = 0;
+    for (j = 1; j <= nj - 1; ++ j)
+    {
+        r1[0] = xx(i, j, k);
+        r1[1] = yy(i, j, k);
+        r1[2] = 0.0;
+
+        r4[0] = xx(i, j+1, k);
+        r4[1] = yy(i, j+1, k);
+        r4[2] = 0.0;
+
+        UnitFaceNormal2D(r4, r1, vkc);
+
+        xfn (i, j, k, 1) = - vkc[0];
+        yfn (i, j, k, 1) = - vkc[1];
+        area(i, j, k, 1) =   vkc[2];
+        xfv (i, j, k, 1) = - vkc[0] * vkc[2];
+        yfv (i, j, k, 1) = - vkc[1] * vkc[2];
+    }
+
+    i = ni+1;
+    for (j = 1; j <= nj - 1; ++ j)
+    {
+        r1[0] = xx(i, j, k);
+        r1[1] = yy(i, j, k);
+        r1[2] = 0.0;
+
+        r4[0] = xx(i, j+1, k);
+        r4[1] = yy(i, j+1, k);
+        r4[2] = 0.0;
+
+        UnitFaceNormal2D(r4, r1, vkc);
+
+        xfn (i, j, k, 1) = - vkc[0];
+        yfn (i, j, k, 1) = - vkc[1];
+        area(i, j, k, 1) =   vkc[2];
+        xfv (i, j, k, 1) = - vkc[0] * vkc[2];
+        yfv (i, j, k, 1) = - vkc[1] * vkc[2];
+    }
+
+    i = 0;
+    for (j = 1; j <= nj; ++ j)
+    {
+        r1[0] = xx(i, j, k);
+        r1[1] = yy(i, j, k);
+        r1[2] = 0.0;
+
+        r2[0] = xx(i+1, j, k);
+        r2[1] = yy(i+1, j, k);
+        r2[2] = 0.0;
+
+        UnitFaceNormal2D(r1, r2, vet);
+
+        xfn (i, j, k, 2) = - vet[0];
+        yfn (i, j, k, 2) = - vet[1];
+        area(i, j, k, 2) =   vet[2];
+        xfv (i, j, k, 2) = - vet[0] * vet[2];
+        yfv (i, j, k, 2) = - vet[1] * vet[2];
+    }
+
+    i = ni;
+    for (j = 1; j <= nj; ++ j)
+    {
+        r1[0] = xx(i, j, k);
+        r1[1] = yy(i, j, k);
+        r1[2] = 0.0;
+
+        r2[0] = xx(i+1, j, k);
+        r2[1] = yy(i+1, j, k);
+        r2[2] = 0.0;
+
+        UnitFaceNormal2D(r1, r2, vet);
+
+        xfn (i, j, k, 2) = - vet[0];
+        yfn (i, j, k, 2) = - vet[1];
+        area(i, j, k, 2) =   vet[2];
+        xfv (i, j, k, 2) = - vet[0] * vet[2];
+        yfv (i, j, k, 2) = - vet[1] * vet[2];
+    }
+
+    j = 0;
+    for (i = 1; i <= ni - 1; ++ i)
+    {
+        r1[0] = xx(i, j, k);
+        r1[1] = yy(i, j, k);
+        r1[2] = 0.0;
+
+        r2[0] = xx(i+1, j, k);
+        r2[1] = yy(i+1, j, k);
+        r2[2] = 0.0;
+
+        UnitFaceNormal2D(r1, r2, vet);
+
+        xfn (i, j, k, 2) = - vet[0];
+        yfn (i, j, k, 2) = - vet[1];
+        area(i, j, k, 2) =   vet[2];
+        xfv (i, j, k, 2) = - vet[0] * vet[2];
+        yfv (i, j, k, 2) = - vet[1] * vet[2];
+    }
+
+    j = nj+1;
+    for (i = 1; i <= ni - 1; ++ i)
+    {
+        r1[0] = xx(i, j, k);
+        r1[1] = yy(i, j, k);
+        r1[2] = 0.0;
+
+        r2[0] = xx(i+1, j, k);
+        r2[1] = yy(i+1, j, k);
+        r2[2] = 0.0;
+
+        UnitFaceNormal2D(r1, r2, vet);
+
+        xfn (i, j, k, 2) = - vet[0];
+        yfn (i, j, k, 2) = - vet[1];
+        area(i, j, k, 2) =   vet[2];
+        xfv (i, j, k, 2) = - vet[0] * vet[2];
+        yfv (i, j, k, 2) = - vet[1] * vet[2];
+    }
+
+    j = 0;
+    for (i = 1; i <= ni; ++ i)
+    {
+        r1[0] = xx(i, j, k);
+        r1[1] = yy(i, j, k);
+        r1[2] = 0.0;
+
+        r4[0] = xx(i, j+1, k);
+        r4[1] = yy(i, j+1, k);
+        r4[2] = 0.0;
+
+        UnitFaceNormal2D(r4, r1, vkc);
+
+        xfn (i, j, k, 1) = - vkc[0];
+        yfn (i, j, k, 1) = - vkc[1];
+        area(i, j, k, 1) =   vkc[2];
+        xfv (i, j, k, 1) = - vkc[0] * vkc[2];
+        yfv (i, j, k, 1) = - vkc[1] * vkc[2];
+    }
+
+    j = nj;
+    for (i = 1; i <= ni; ++ i)
+    {
+        r1[0] = xx(i, j, k);
+        r1[1] = yy(i, j, k);
+        r1[2] = 0.0;
+
+        r4[0] = xx(i, j+1, k);
+        r4[1] = yy(i, j+1, k);
+        r4[2] = 0.0;
+
+        UnitFaceNormal2D(r4, r1, vkc);
+
+        xfn (i, j, k, 1) = - vkc[0];
+        yfn (i, j, k, 1) = - vkc[1];
+        area(i, j, k, 1) =   vkc[2];
+        xfv (i, j, k, 1) = - vkc[0] * vkc[2];
+        yfv (i, j, k, 1) = - vkc[1] * vkc[2];
+    }
+}
+
+void StructGrid::ComputeMetrics_BC_3D()
+{
+    RDouble4D &xfn  = * (this->GetFaceNormalX());
+    RDouble4D &yfn  = * (this->GetFaceNormalY());
+    RDouble4D &zfn  = * (this->GetFaceNormalZ());
+    RDouble4D &area = * (this->GetFaceArea());
+    RDouble4D &xfv  = * (this->GetFaceVectorX());
+    RDouble4D &yfv  = * (this->GetFaceVectorY());
+    RDouble4D &zfv  = * (this->GetFaceVectorZ());
+
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    RDouble r2[3], r3[3], r4[3], r5[3], r6[3], r7[3], r8[3];
+    RDouble vkc[3], vet[3], vct[3], vkcn[4], vetn[4], vctn[4];
+
+    int ibc[2];
+    int jbc[2];
+    int kbc[2];
+
+    ibc[0] = 0;
+    ibc[1] = ni+1;
+    
+    jbc[0] = 0;
+    jbc[1] = nj+1;
+    
+    kbc[0] = 0;
+    kbc[1] = nk+1;
+
+    for (int bcindex = 0; bcindex <= 1; ++ bcindex)
+    {
+        int i = ibc[bcindex];
+        for (int k = 1; k <= nk - 1; ++ k)
+        {
+            for (int j = 1; j <= nj - 1; ++ j)
+            {
+                r2[0] = xx(i, j    , k   );
+                r2[1] = yy(i, j    , k   );
+                r2[2] = zz(i, j    , k   );
+                                     
+                r5[0] = xx(i, j + 1, k   );
+                r5[1] = yy(i, j + 1, k   );
+                r5[2] = zz(i, j + 1, k   );
+                                     
+                r7[0] = xx(i, j    , k + 1);
+                r7[1] = yy(i, j    , k + 1);
+                r7[2] = zz(i, j    , k + 1);
+                                     
+                r8[0] = xx(i, j + 1, k + 1);
+                r8[1] = yy(i, j + 1, k + 1);
+                r8[2] = zz(i, j + 1, k + 1);
+                
+                FaceNormal3D(r2, r5, r8, r7, vkc);
+                NormalizeVector(vkc, vkcn, 3);
+                
+                xfn (i, j, k, 1) = vkcn[0];
+                yfn (i, j, k, 1) = vkcn[1];
+                zfn (i, j, k, 1) = vkcn[2];
+                area(i, j, k, 1) = vkcn[3];
+                xfv (i, j, k, 1) = vkc[0];
+                yfv (i, j, k, 1) = vkc[1];
+                zfv (i, j, k, 1) = vkc[2];
+            }
+        } 
+    }
+
+    for (int bcindex = 0; bcindex <= 1; ++ bcindex)
+    {
+        int j = jbc[bcindex];        
+        for (int k = 1; k <= nk - 1; ++ k)
+        {
+            for (int i = 1; i <= ni - 1; ++ i)
+            {
+                r3[0] = xx(i    , j, k   );
+                r3[1] = yy(i    , j, k   );
+                r3[2] = zz(i    , j, k   );
+                                     
+                r5[0] = xx(i + 1, j, k   );
+                r5[1] = yy(i + 1, j, k   );
+                r5[2] = zz(i + 1, j, k   );
+                                     
+                r6[0] = xx(i    , j, k + 1);
+                r6[1] = yy(i    , j, k + 1);
+                r6[2] = zz(i    , j, k + 1);
+                                     
+                r8[0] = xx(i + 1, j, k + 1);
+                r8[1] = yy(i + 1, j, k + 1);
+                r8[2] = zz(i + 1, j, k + 1);
+                
+                FaceNormal3D(r3, r6, r8, r5, vet);
+                NormalizeVector(vet, vetn, 3);
+                
+                xfn (i, j, k, 2) = vetn[0];
+                yfn (i, j, k, 2) = vetn[1];
+                zfn (i, j, k, 2) = vetn[2];
+                area(i, j, k, 2) = vetn[3];
+                xfv (i, j, k, 2) = vet[0];
+                yfv (i, j, k, 2) = vet[1];
+                zfv (i, j, k, 2) = vet[2];
+            }
+        }
+    }
+
+    for (int bcindex = 0; bcindex <= 1; ++ bcindex)
+    {
+        int k = kbc[bcindex];
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            for (int i = 1; i <= ni - 1; ++ i)
+            {
+                r4[0] = xx(i    , j    , k);
+                r4[1] = yy(i    , j    , k);
+                r4[2] = zz(i    , j    , k);
+                                         
+                r6[0] = xx(i    , j + 1, k);
+                r6[1] = yy(i    , j + 1, k);
+                r6[2] = zz(i    , j + 1, k);
+                                         
+                r7[0] = xx(i + 1, j    , k);
+                r7[1] = yy(i + 1, j    , k);
+                r7[2] = zz(i + 1, j    , k);
+                                         
+                r8[0] = xx(i + 1, j + 1, k);
+                r8[1] = yy(i + 1, j + 1, k);
+                r8[2] = zz(i + 1, j + 1, k);
+                
+                FaceNormal3D(r4, r7, r8, r6, vct);
+                NormalizeVector(vct, vctn, 3);
+                
+                xfn (i, j, k, 3) = vctn[0];
+                yfn (i, j, k, 3) = vctn[1];
+                zfn (i, j, k, 3) = vctn[2];
+                area(i, j, k, 3) = vctn[3];
+                xfv (i, j, k, 3) = vct[0];
+                yfv (i, j, k, 3) = vct[1];
+                zfv (i, j, k, 3) = vct[2];
+            }
+        }
+    }
+
+    ibc[0] = 0;
+    ibc[1] = ni;
+    
+    jbc[0] = 0;
+    jbc[1] = nj;
+    
+    kbc[0] = 0;
+    kbc[1] = nk;
+
+    for (int bcindex = 0; bcindex <= 1; ++ bcindex)
+    {
+        int i = ibc[bcindex];       
+        
+        for (int k = 1; k <= nk - 1; ++ k)
+        {
+            for (int j = 1; j <= nj; ++ j)
+            {
+                r3[0] = xx(i    , j, k   );
+                r3[1] = yy(i    , j, k   );
+                r3[2] = zz(i    , j, k   );
+                                     
+                r5[0] = xx(i + 1, j, k   );
+                r5[1] = yy(i + 1, j, k   );
+                r5[2] = zz(i + 1, j, k   );
+                                     
+                r6[0] = xx(i    , j, k + 1);
+                r6[1] = yy(i    , j, k + 1);
+                r6[2] = zz(i    , j, k + 1);
+                                     
+                r8[0] = xx(i + 1, j, k + 1);
+                r8[1] = yy(i + 1, j, k + 1);
+                r8[2] = zz(i + 1, j, k + 1);
+                
+                FaceNormal3D(r3, r6, r8, r5, vet);
+                NormalizeVector(vet, vetn, 3);
+                
+                xfn (i, j, k, 2) = vetn[0];
+                yfn (i, j, k, 2) = vetn[1];
+                zfn (i, j, k, 2) = vetn[2];
+                area(i, j, k, 2) = vetn[3];
+                xfv (i, j, k, 2) = vet[0];
+                yfv (i, j, k, 2) = vet[1];
+                zfv (i, j, k, 2) = vet[2];
+            }
+        }
+        
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            for (int k = 1; k <= nk; ++ k)
+            {
+                r4[0] = xx(i    , j    , k);
+                r4[1] = yy(i    , j    , k);
+                r4[2] = zz(i    , j    , k);
+                                         
+                r6[0] = xx(i    , j + 1, k);
+                r6[1] = yy(i    , j + 1, k);
+                r6[2] = zz(i    , j + 1, k);
+                                         
+                r7[0] = xx(i + 1, j    , k);
+                r7[1] = yy(i + 1, j    , k);
+                r7[2] = zz(i + 1, j    , k);
+                                         
+                r8[0] = xx(i + 1, j + 1, k);
+                r8[1] = yy(i + 1, j + 1, k);
+                r8[2] = zz(i + 1, j + 1, k);
+                
+                FaceNormal3D(r4, r7, r8, r6, vct);
+                NormalizeVector(vct, vctn, 3);
+                
+                xfn (i, j, k, 3) = vctn[0];
+                yfn (i, j, k, 3) = vctn[1];
+                zfn (i, j, k, 3) = vctn[2];
+                area(i, j, k, 3) = vctn[3];
+                xfv (i, j, k, 3) = vct[0];
+                yfv (i, j, k, 3) = vct[1];
+                zfv (i, j, k, 3) = vct[2];
+            }
+        }
+    }
+
+    for (int bcindex = 0; bcindex <= 1; ++ bcindex)
+    {
+        int j = jbc[bcindex];
+        for (int k = 1; k <= nk - 1; ++ k)
+        {
+            for (int i = 1; i <= ni; ++ i)
+            {
+                r2[0] = xx(i, j    , k   );
+                r2[1] = yy(i, j    , k   );
+                r2[2] = zz(i, j    , k   );
+                                     
+                r5[0] = xx(i, j + 1, k   );
+                r5[1] = yy(i, j + 1, k   );
+                r5[2] = zz(i, j + 1, k   );
+                                     
+                r7[0] = xx(i, j    , k + 1);
+                r7[1] = yy(i, j    , k + 1);
+                r7[2] = zz(i, j    , k + 1);
+                                     
+                r8[0] = xx(i, j + 1, k + 1);
+                r8[1] = yy(i, j + 1, k + 1);
+                r8[2] = zz(i, j + 1, k + 1);
+                
+                FaceNormal3D(r2, r5, r8, r7, vkc);
+                NormalizeVector(vkc, vkcn, 3);
+                
+                xfn (i, j, k, 1) = vkcn[0];
+                yfn (i, j, k, 1) = vkcn[1];
+                zfn (i, j, k, 1) = vkcn[2];
+                area(i, j, k, 1) = vkcn[3];
+                xfv (i, j, k, 1) = vkc[0];
+                yfv (i, j, k, 1) = vkc[1];
+                zfv (i, j, k, 1) = vkc[2];
+            }
+        }    
+        
+        for (int i = 1; i <= ni - 1; ++ i)
+        {
+            for (int k = 1; k <= nk; ++ k)
+            {
+                r4[0] = xx(i    , j    , k);
+                r4[1] = yy(i    , j    , k);
+                r4[2] = zz(i    , j    , k);
+                                         
+                r6[0] = xx(i    , j + 1, k);
+                r6[1] = yy(i    , j + 1, k);
+                r6[2] = zz(i    , j + 1, k);
+                                         
+                r7[0] = xx(i + 1, j    , k);
+                r7[1] = yy(i + 1, j    , k);
+                r7[2] = zz(i + 1, j    , k);
+                                         
+                r8[0] = xx(i + 1, j + 1, k);
+                r8[1] = yy(i + 1, j + 1, k);
+                r8[2] = zz(i + 1, j + 1, k);
+                
+                FaceNormal3D(r4, r7, r8, r6, vct);
+                NormalizeVector(vct, vctn, 3);
+                
+                xfn (i, j, k, 3) = vctn[0];
+                yfn (i, j, k, 3) = vctn[1];
+                zfn (i, j, k, 3) = vctn[2];
+                area(i, j, k, 3) = vctn[3];
+                xfv (i, j, k, 3) = vct[0];
+                yfv (i, j, k, 3) = vct[1];
+                zfv (i, j, k, 3) = vct[2];
+            }
+        }
+    }
+
+    for (int bcindex = 0; bcindex <= 1; ++ bcindex)
+    {
+        int k = kbc[bcindex];
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            for (int i = 1; i <= ni; ++ i)
+            {
+                r2[0] = xx(i, j    , k   );
+                r2[1] = yy(i, j    , k   );
+                r2[2] = zz(i, j    , k   );
+                                     
+                r5[0] = xx(i, j + 1, k   );
+                r5[1] = yy(i, j + 1, k   );
+                r5[2] = zz(i, j + 1, k   );
+                                     
+                r7[0] = xx(i, j    , k + 1);
+                r7[1] = yy(i, j    , k + 1);
+                r7[2] = zz(i, j    , k + 1);
+                                     
+                r8[0] = xx(i, j + 1, k + 1);
+                r8[1] = yy(i, j + 1, k + 1);
+                r8[2] = zz(i, j + 1, k + 1);
+                
+                FaceNormal3D(r2, r5, r8, r7, vkc);
+                NormalizeVector(vkc, vkcn, 3);
+                
+                xfn (i, j, k, 1) = vkcn[0];
+                yfn (i, j, k, 1) = vkcn[1];
+                zfn (i, j, k, 1) = vkcn[2];
+                area(i, j, k, 1) = vkcn[3];
+                xfv (i, j, k, 1) = vkc[0];
+                yfv (i, j, k, 1) = vkc[1];
+                zfv (i, j, k, 1) = vkc[2];
+            }
+        }
+        
+        for (int j = 1; j <= nj; ++ j)
+        {
+            for (int i = 1; i <= ni - 1; ++ i)
+            {
+                r3[0] = xx(i    , j, k   );
+                r3[1] = yy(i    , j, k   );
+                r3[2] = zz(i    , j, k   );
+                                     
+                r5[0] = xx(i + 1, j, k   );
+                r5[1] = yy(i + 1, j, k   );
+                r5[2] = zz(i + 1, j, k   );
+                                     
+                r6[0] = xx(i    , j, k + 1);
+                r6[1] = yy(i    , j, k + 1);
+                r6[2] = zz(i    , j, k + 1);
+                                     
+                r8[0] = xx(i + 1, j, k + 1);
+                r8[1] = yy(i + 1, j, k + 1);
+                r8[2] = zz(i + 1, j, k + 1);
+                
+                FaceNormal3D(r3, r6, r8, r5, vet);
+                NormalizeVector(vet, vetn, 3);
+                
+                xfn (i, j, k, 2) = vetn[0];
+                yfn (i, j, k, 2) = vetn[1];
+                zfn (i, j, k, 2) = vetn[2];
+                area(i, j, k, 2) = vetn[3];
+                xfv (i, j, k, 2) = vet[0];
+                yfv (i, j, k, 2) = vet[1];
+                zfv (i, j, k, 2) = vet[2];
+            }
+        }
+    }
+}
+
+streamsize StructGrid::TranslateCellCenterLength(ActionKey *actkey)
+{
+    InterfaceInfo *interfaceInfo = this->GetInterfaceInfo();
+    if (!interfaceInfo) return 0;
+
+    StructGrid *fgrid = StructGridCast(this->GetFinestGrid());
+
+    InterfaceInfo *fiinfo = fgrid->GetInterfaceInfo();
+    int ineighbor = fiinfo->FindIthNeighbor(actkey->ipos);
+    int nIFaceOfNeighbor = fiinfo->GetNIFaceOfNeighbor(ineighbor);
+
+    streamsize nlen = nIFaceOfNeighbor * sizeof(RDouble) * 4;
+    return nlen;
+
+// for (int iLocalFace = 0; iLocalFace < nIFaceOfNeighbor; ++ iLocalFace)
+// {
+//     iFace = faceIndexForRecv[iLocalFace];
+//     fgrid->GetTargetIndexIJK(iFace, 1, it, jt, kt);
+//     fgrid->RemapMultigridIJK(level, it, jt, kt);
+// 
+//     cdata->read(&xcc(it, jt, kt), sizeof(RDouble));
+//     cdata->read(&ycc(it, jt, kt), sizeof(RDouble));
+//     cdata->read(&zcc(it, jt, kt), sizeof(RDouble));
+//     RDouble tmp;
+//     cdata->read(&tmp, sizeof(RDouble));
+// }
+}
+
+LIB_EXPORT void StructGrid::ChangeBCType(int from_bctype, int to_bctype)
+{
+    StructBCSet *structBCSet = this->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+
+        if (bcregion->GetBCType() == from_bctype)
+        {
+            bcregion->SetBCType(to_bctype);
+        }
+    }
+}
+
+int StructGrid::CompNIFace()
+{
+    int nIFace = 0;
+    int imin, imax, jmin, jmax, kmin, kmax, bctype;
+
+    StructBCSet *structBCSet = this->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        bcregion->GetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+        bctype = bcregion->GetBCType();
+
+        if (IsInterface(bctype))
+        {
+            nIFace += (imax - imin + 1) * (jmax - jmin + 1) * (kmax - kmin + 1);
+        }
+    }
+
+    return nIFace;
+}
+
+void StructGrid::DecodeWallDist(DataContainer *cdata)
+{
+    cdata->moveto_begin();
+
+    RDouble3D &walldist = * this->GetWallDist();
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                cdata->read(&walldist(i, j, k), sizeof(RDouble));
+            }
+        }
+    }
+}
+
+LIB_EXPORT void StructGrid::RemapMultigridIJK(int level, int &i, int &j, int &k)
+{
+    StructGrid *grid = this;
+    while (grid->GetCoarseGrid() && grid->GetLevel() < level)
+    {
+        int istp = grid->GetMultigridStepI();
+        int jstp = grid->GetMultigridStepJ();
+        int kstp = grid->GetMultigridStepK();
+
+        i = MIN((i + 1) / istp, i);
+        j = MIN((j + 1) / jstp, j);
+        k = MIN((k + 1) / kstp, k);
+
+        grid = StructGridCast(grid->GetCoarseGrid());
+    };
+}
+
+Int3D * StructGrid::GetWallCellLabel()
+{
+    if (wallCellLabel == NULL)
+    {
+        int ni = this->GetNI();
+        int nj = this->GetNJ();
+        int nk = this->GetNK();
+        Range I, J, K;
+        GetRange(ni, nj, nk, 0, -1, I, J, K);
+        wallCellLabel = new Int3D(I, J, K, fortranArray);
+        Int3D &wallLabel = *this->wallCellLabel;
+
+        wallLabel(I, J, K) = 0;
+
+        StructBCSet *structBCSet = this->GetStructBCSet();
+        int nBCRegion = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+            int is, js, ks;
+            int iStart, iEnd, jStart, jEnd, kStart, kEnd;
+            structBC->GetIJKRegion(iStart, iEnd, jStart, jEnd, kStart, kEnd);
+
+            for (int k = kStart; k <= kEnd; ++ k)
+            {
+                for (int j = jStart; j <= jEnd; ++ j)
+                {
+                    for (int i = iStart; i <= iEnd; ++ i)
+                    {
+                        //! First cell index inside flowfield.
+                        structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+                        RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+
+                        wallLabel(is, js, ks) = 1;
+                    }
+                }
+            }
+        }
+    }
+    return wallCellLabel;
+}
+
+void StructGrid::InitWallDist()
+{
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    Range I(1, ni-1);
+    Range J(1, nj-1);
+    Range K(1, nk-1);
+
+    if (nk == 1) K.setRange(1,1);
+
+    walldist = new RDouble3D(I, J, K, fortranArray);
+    nearestwallfacenormalx = new RDouble3D(I, J, K, fortranArray);
+    nearestwallfacenormaly = new RDouble3D(I, J, K, fortranArray);
+    nearestwallfacenormalz = new RDouble3D(I, J, K, fortranArray);
+}
+
+void StructGrid::InitIBlank3D()
+{
+    if (iBlank3D) delete iBlank3D;
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -1, 0, I, J, K);
+
+    iBlank3D = new Int3D(I, J, K, fortranArray);
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, ONE_GHOST_LAYER);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                (*iBlank3D)(i, j, k) = GENERIC_COLOR;
+            }
+        }
+    }
+}
+
+void StructGrid::CopyIBlank3D(int *iBlank)
+{
+    int ni = GetNI();
+    int nj = GetNJ();
+    int nk = GetNK();
+    Range I, J, K;
+    GetRange(ni, nj, nk, -1, 0, I, J, K);
+
+    Int3D &cellMapStrToUns = *reinterpret_cast<Int3D *> (GetDataPtr("cellMapStrToUns"));
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, ONE_GHOST_LAYER);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int iCell = cellMapStrToUns(i, j, k);
+                (*iBlank3D)(i, j, k) = iBlank[iCell];
+
+            }
+        }
+    }
+}
+void StructGrid::SetIBlank(int *iBlank)
+{
+    int ni = GetNI();
+    int nj = GetNJ();
+    int nk = GetNK();
+    Int3D &cellMapStrToUns = *reinterpret_cast<Int3D *> (GetDataPtr("cellMapStrToUns"));
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -1, 0, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, ONE_GHOST_LAYER);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int iCell = cellMapStrToUns(i, j, k);
+                iBlank[iCell] = (*iBlank3D)(i, j, k);
+
+            }
+        }
+    }
+}
+
+Int3D *StructGrid::GetIBlank3D()
+{
+    return this->iBlank3D;
+}
+
+void StructGrid::FillCoreIndex(vector< int > &core_index, int iCore, int jCore, int kCore)
+{
+    int ni = GetNI();
+    int nj = GetNJ();
+
+    int ic = ni + 1;
+    int jc = nj + 1;
+    core_index[0] = ic * jc * kCore + ic * jCore + iCore;
+    core_index[1] = ic * jc * kCore + ic * jCore + (iCore + 1);
+    core_index[2] = ic * jc * kCore + ic * (jCore + 1) + iCore;
+    core_index[3] = ic * jc * (kCore + 1) + ic * jCore + iCore;
+    core_index[4] = ic * jc * kCore + ic * (jCore + 1) + (iCore + 1);
+    core_index[5] = ic * jc * (kCore + 1) + ic * jCore + (iCore + 1);
+    core_index[6] = ic * jc * (kCore + 1) + ic * (jCore + 1) + iCore;
+    core_index[7] = ic * jc * (kCore + 1) + ic * (jCore + 1) + (iCore + 1);
+
+    return;
+}
+
+void StructGrid::ComputePhysicalCoordinate(vector< vector< RDouble > > &amer, vector< int > &core_index, vector< RDouble > &xx, vector< RDouble > &yy,  vector< RDouble > &zz)
+{
+    RDouble *xCoreContainer = GetXCoreContainer();
+    RDouble *yCoreContainer = GetYCoreContainer();
+    RDouble *zCoreContainer = GetZCoreContainer();
+    for (int m = 0; m < 8; ++ m)
+    {
+        RDouble xg = xCoreContainer[core_index[m]];
+        RDouble yg = yCoreContainer[core_index[m]];
+        RDouble zg = zCoreContainer[core_index[m]];
+
+        xx[m] = localFrame[0][0] + xg * localFrame[0][1] + yg * localFrame[0][2] + zg * localFrame[0][3];
+        yy[m] = localFrame[1][0] + xg * localFrame[1][1] + yg * localFrame[1][2] + zg * localFrame[1][3];
+        zz[m] = localFrame[2][0] + xg * localFrame[2][1] + yg * localFrame[2][2] + zg * localFrame[2][3];
+    }
+
+    return;
+}
+
+void StructGrid::ComputePhysicalCoordinate(vector< vector< RDouble > > &localFrame, RDouble xx, RDouble yy, RDouble zz, vector< RDouble > &globalCoordinate)
+{
+    for (int i = 0; i < 3; ++ i)
+    {
+        globalCoordinate[i] = localFrame[i][0] + xx * localFrame[i][1] + yy * localFrame[i][2] + zz * localFrame[i][3];
+    }
+    return;
+}
+
+void StructGrid::GaussElimination(vector< vector< RDouble > > &a, vector< RDouble > &b, int n, vector< RDouble > &x, int &flag)
+{
+    int is = 0;
+    flag = 1;
+    vector< int > js(n);
+
+    for (int k = 0; k < n-1; ++ k)
+    {
+        RDouble d = 0.0;
+        for (int i = k; i < n; ++ i)
+        {
+            for (int j = k; j < n; ++ j)
+            {
+                if (abs(a[i][j]) > d)
+                {
+                    d = abs(a[i][j]);
+                    js[k] = j;
+                    is = i;
+                }
+            }
+        }
+
+        if (d < SMALL)
+        {
+            flag = 0;
+        }
+        else
+        {
+            if (js[k] != k)
+            {
+                for (int i = 0; i < n; ++ i)
+                {
+                    RDouble t = a[i][k];
+                    a[i][k] = a[i][js[k]];
+                    a[i][js[k]] = t;
+                }
+            }
+
+            if (is != k)
+            {
+                for (int j = k; j < n; ++ j)
+                {
+                    RDouble t = a[k][j];
+                    a[k][j] = a[is][j];
+                    a[is][j] = t;
+                }
+
+                RDouble t = b[k];
+                b[k] = b[is];
+                b[is] = t;
+            }
+        }
+
+        if (flag == 0) return;
+
+        RDouble sfn = 1.0 / a[k][k];
+        for (int j = k+1; j < n; ++ j)
+        {
+            a[k][j] *= sfn;
+        }
+
+        b[k] *= sfn;
+
+        for (int i = k+1; i < n; ++ i)
+        {
+            for (int j = k+1; j < n; ++ j)
+            {
+                a[i][j] -= a[i][k] * a[k][j];
+            }
+            b[i] -= a[i][k] * b[k];
+        }
+    }
+
+    if (abs(a[n-1][n-1]) < SMALL)
+    {
+        flag = 0;
+        return;
+    }
+
+    x[n-1] = b[n-1] / a[n-1][n-1];
+    for (int i = n-2; i >= 0; -- i)
+    {
+        RDouble t = 0;
+        for (int j = i+1; j < n; ++ j)
+        {
+            t += a[i][j] * x[j];
+        }
+        x[i] = b[i] - t;
+    }
+
+    js[n-1] = n - 1;
+    for (int k = n-1; k >= 0; -- k)
+    {
+        if (js[k] != k)
+        {
+            RDouble t = x[k];
+            x[k] = x[js[k]];
+            x[js[k]] = t;
+        }
+    }
+
+    return;
+}
+
+void StructGrid::ComputeJacobiMatrix(vector< RDouble > &a, vector< RDouble > &b, vector< RDouble > &c, vector< RDouble > &ksai, vector< vector< RDouble > > &amer)
+{
+    amer[0][0] = a[1] + a[4] * ksai[1] + a[5] * ksai[2] + a[7] * ksai[1] * ksai[2];
+    amer[0][1] = a[2] + a[4] * ksai[0] + a[6] * ksai[2] + a[7] * ksai[0] * ksai[2];
+    amer[0][2] = a[3] + a[5] * ksai[0] + a[6] * ksai[1] + a[7] * ksai[0] * ksai[1];
+
+    amer[1][0] = b[1] + b[4] * ksai[1] + b[5] * ksai[2] + b[7] * ksai[1] * ksai[2];
+    amer[1][1] = b[2] + b[4] * ksai[0] + b[6] * ksai[2] + b[7] * ksai[0] * ksai[2];
+    amer[1][2] = b[3] + b[5] * ksai[0] + b[6] * ksai[1] + b[7] * ksai[0] * ksai[1];
+
+    amer[2][0] = c[1] + c[4] * ksai[1] + c[5] * ksai[2] + c[7] * ksai[1] * ksai[2];
+    amer[2][1] = c[2] + c[4] * ksai[0] + c[6] * ksai[2] + c[7] * ksai[0] * ksai[2];
+    amer[2][2] = c[3] + c[5] * ksai[0] + c[6] * ksai[1] + c[7] * ksai[0] * ksai[1];
+
+    return;
+}
+
+void StructGrid::ComputeTempContainer(vector< RDouble > &ksai, vector< RDouble > &temp)
+{
+    temp[0] = 1.0;
+    temp[1] = ksai[0];
+    temp[2] = ksai[1];
+    temp[3] = ksai[2];
+    temp[4] = ksai[0] * ksai[1];
+    temp[5] = ksai[0] * ksai[2];
+    temp[6] = ksai[1] * ksai[2];
+    temp[7] = ksai[0] * ksai[1] * ksai[2];
+
+    return;
+}
+
+void StructGrid::FillCoefficientContainer(vector< vector< RDouble > > &source, vector< RDouble > &target, int i)
+{
+    target[0] =  source[0][i];
+    target[1] = -source[0][i] + source[1][i];
+    target[2] = -source[0][i] + source[2][i];
+    target[3] = -source[0][i] + source[3][i];
+    target[4] =  source[0][i] - source[1][i] + source[4][i] - source[2][i];
+    target[5] =  source[0][i] - source[1][i] - source[3][i] + source[5][i];
+    target[6] =  source[0][i] - source[2][i] - source[3][i] + source[6][i];
+    target[7] = -source[0][i] + source[1][i] - source[4][i] + source[2][i] + source[3][i] - source[5][i] + source[7][i] - source[6][i];
+
+    return;
+}
+
+/*LIB_EXPORT void StructGrid::InitLinkPointLabel()
+{
+    iLinkPointLabel = 0;
+    jLinkPointLabel = 0;
+    kLinkPointLabel = 0;
+}*/
+
+LIB_EXPORT void StructGrid::CreateLinkPointStructure()
+{
+    oversetGridTopology->CreateLinkPointStructure(nTotalNode);
+}
+
+LIB_EXPORT void StructGrid::SetLinkPointLabel(int *iLabel, int iDirection)
+{
+    int *iLinkPointLabel = GetILinkPointLabel();
+    int *jLinkPointLabel = GetJLinkPointLabel();
+    int *kLinkPointLabel = GetKLinkPointLabel();
+    if (iDirection == 0)
+    {
+        for (int ip = 0; ip < nTotalNode; ++ ip)
+        {
+            iLinkPointLabel[ip] = iLabel[ip];
+        }
+    }
+    else if (iDirection == 1)
+    {
+        for (int ip = 0; ip < nTotalNode; ++ ip)
+        {
+            jLinkPointLabel[ip] = iLabel[ip];
+        }
+    }
+    else
+    {
+        for (int ip = 0; ip < nTotalNode; ++ ip)
+        {
+            kLinkPointLabel[ip] = iLabel[ip];
+        }
+    }
+}
+
+LIB_EXPORT void StructGrid::SetHingedPointContainer(int *iLabel)
+{
+    int numberOfCores = GetNumberOfCores();
+    int *hingedPointContainer = GetHingedPointContainer();
+    for (int iCore = 0; iCore < numberOfCores; ++ iCore)
+    {
+        hingedPointContainer[iCore] = iLabel[iCore];
+    }
+}
+
+LIB_EXPORT void StructGrid::SetCoreCoordinateContainer(RDouble *sLabel, int iDirection)
+{
+    int numberOfCores = GetNumberOfCores();
+    RDouble *xCoreContainer = GetXCoreContainer();
+    RDouble *yCoreContainer = GetYCoreContainer();
+    RDouble *zCoreContainer = GetZCoreContainer();
+
+    if (iDirection == 0)
+    {
+        for (int iCore = 0; iCore < numberOfCores; ++ iCore)
+        {
+            xCoreContainer[iCore] = sLabel[iCore];
+        }
+    }
+    else if (iDirection == 1)
+    {
+        for (int iCore = 0; iCore < numberOfCores; ++ iCore)
+        {
+            yCoreContainer[iCore] = sLabel[iCore];
+        }
+    }
+    else
+    {
+        for (int iCore = 0; iCore < numberOfCores; ++ iCore)
+        {
+            zCoreContainer[iCore] = sLabel[iCore];
+        }
+    }
+}
+
+LIB_EXPORT void StructGrid::CreateCoreParameterContainer()
+{
+    int ni = GetNI();
+    int nj = GetNJ();
+    int nk = GetNK();
+    int numberOfCores = (ni+1) * (nj+1) * (nk+1);
+    oversetGridTopology->SetNumberOfCores(numberOfCores);
+    oversetGridTopology->CreateCoreParameterContainer(numberOfCores);
+}
+
+LIB_EXPORT void StructGrid::GatherCellsByColor(int &pCell, int color)
+{
+    int *iBlank = GetCellTypeContainer();
+    for (int i = 0; i < nTotalCell; ++ i)
+    {
+        if (iBlank[i] == color)
+        {
+            pCell += 1;
+        }
+    }
+
+    return;
+}
+
+LIB_EXPORT void StructGrid::ResetCellType()
+{
+    int *iBlank = GetCellTypeContainer();
+    for (int pCounter = 0; pCounter < nTotalCell; ++ pCounter)
+    {
+        if (iBlank[pCounter] == SECOND_COLOR)
+        {
+            iBlank[pCounter] = OVERSET_COLOR;
+        }
+    }
+
+    return;
+}
+
+LIB_EXPORT void StructGrid::ProbeExternalOverlapCells(int &counter)
+{
+    using namespace PHENGLEI;
+    int ni = GetNI();
+    int nj = GetNJ();
+    int *iBlank = GetCellTypeContainer();
+    int nBcRegions = structBCSet->GetnBCRegion();
+    for (int i = 0; i < nBcRegions; ++ i)
+    {
+        StructBC *bcRegion = structBCSet->GetBCRegion(i);
+
+        int bcType = bcRegion->GetBCType();
+
+        if (bcType != EXTERNAL_BC) continue;
+
+        bcRegion->ProbeExternalOverlapCells(iBlank, ni - 1, nj - 1, counter);
+    }
+
+    return;
+}
+
+LIB_EXPORT void StructGrid::ProbeHoleCell(HoleGrid *holeGrid)
+{
+    RDouble3D *xcc = GetCellCenterX();
+    RDouble3D *ycc = GetCellCenterY();
+    RDouble3D *zcc = GetCellCenterZ();
+    int *iBlank = GetCellTypeContainer();
+
+    RDouble *holeBox = holeGrid->GetBox();
+    for (int i = 0; i < 3; ++ i)
+    {
+        if (holeBox[2*i] > pmax[i] || holeBox[2*i+1] < pmin[i]) return;
+    }
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble y_far = 2.0 * pmax[1] - pmin[1];
+
+    int ic = 0;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble xx = (* xcc)(i, j, k);
+                RDouble yy = (* ycc)(i, j, k);
+                RDouble zz = (* zcc)(i, j, k);
+
+                iBlank[ic] = holeGrid->GetCellColor(xx, yy, zz, y_far);
+
+                ic += 1;
+            }
+        }
+    }
+}
+
+LIB_EXPORT void StructGrid::ProbeBorderCell(int iType, int jType, vector< int > *friendPoint, vector< int > *friendZone)
+{
+    using namespace PHMPI;
+    int ni = GetNI();
+    int nj = GetNJ();
+
+    int *iLinkPointLabel = GetILinkPointLabel();
+    int *jLinkPointLabel = GetJLinkPointLabel();
+    int *kLinkPointLabel = GetKLinkPointLabel();
+    int *iBlank = GetCellTypeContainer();
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int ip, jp, kp;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int cellLabel = (ni-1) * (nj-1) * (k-1) + (ni-1) * (j-1) + (i-1);
+                int pointLabel = ni * nj * k + ni * j + i;
+                if (iBlank[cellLabel] == iType)
+                {
+                    ip = i-1;
+                    jp = j;
+                    kp = k;
+
+                    if (i == 1)
+                    {
+                        if (iLinkPointLabel[pointLabel] >= 0)
+                        {
+                            int globalPointLabel = iLinkPointLabel[pointLabel];
+                            int zoneIndex = GetZoneIndexAccordingToGlobalPointLabel(globalPointLabel);
+                            StructGrid *grid = PHSPACE::GetStructGrid(zoneIndex);
+                                
+                            if (grid)
+                            {
+                                grid->ColorOverlapCell(globalPointLabel, jType);
+                            }
+                            else
+                            {
+                                int processorIndex = GetZoneProcessorID(zoneIndex);
+                                friendPoint[processorIndex].push_back(globalPointLabel);
+                                friendZone[processorIndex].push_back(zoneIndex);
+                            }
+                        }
+                    }
+                    else
+                    {
+                        int twinCell = (ni-1) * (nj-1) * (kp-1) + (ni-1) * (jp-1) + (ip-1);
+                        if (iBlank[twinCell] == GENERIC_COLOR)
+                        {
+                            iBlank[twinCell] = jType;
+                        }
+                    }
+
+                    ip = i+1;
+                    jp = j;
+                    kp = k;
+
+                    if (i == ied)
+                    {
+                        if (iLinkPointLabel[pointLabel] >= 0)
+                        {
+                            int globalPointLabel = iLinkPointLabel[pointLabel];
+                            int zoneIndex = GetZoneIndexAccordingToGlobalPointLabel(globalPointLabel);
+                                
+                            StructGrid *grid = PHSPACE::GetStructGrid(zoneIndex);
+
+                            if (grid)
+                            {
+                                grid->ColorOverlapCell(globalPointLabel, jType);
+                            }
+                            else
+                            {
+                                int processorIndex = GetZoneProcessorID(zoneIndex);
+                                friendPoint[processorIndex].push_back(globalPointLabel);
+                                friendZone[processorIndex].push_back(zoneIndex);
+                            }
+                        }
+                    }
+                    else
+                    {
+                        int twinCell = (ni-1) * (nj-1) * (kp-1) + (ni-1) * (jp-1) + (ip-1);
+                        if (iBlank[twinCell] == GENERIC_COLOR)
+                        {
+                            iBlank[twinCell] = jType;
+                        }
+                    }
+
+                    ip = i;
+                    jp = j-1;
+                    kp = k;
+
+                    if (j == 1)
+                    {
+                        if (jLinkPointLabel[pointLabel] >= 0)
+                        {
+                            int globalPointLabel = jLinkPointLabel[pointLabel];
+                            int zoneIndex = GetZoneIndexAccordingToGlobalPointLabel(globalPointLabel);
+                                
+                            StructGrid *grid = PHSPACE::GetStructGrid(zoneIndex);
+
+                            if (grid)
+                            {
+                                grid->ColorOverlapCell(globalPointLabel, jType);
+                            }
+                            else
+                            {
+                                int processorIndex = GetZoneProcessorID(zoneIndex);
+                                friendPoint[processorIndex].push_back(globalPointLabel);
+                                friendZone[processorIndex].push_back(zoneIndex);
+                            }
+                        }
+                    }
+                    else
+                    {
+                        int twinCell = (ni-1) * (nj-1) * (kp-1) + (ni-1) * (jp-1) + (ip-1);
+                        if (iBlank[twinCell] == GENERIC_COLOR)
+                        {
+                            iBlank[twinCell] = jType;
+                        }
+                    }
+
+                    ip = i;
+                    jp = j+1;
+                    kp = k;
+
+                    if (j == jed)
+                    {
+                        if (jLinkPointLabel[pointLabel] >= 0)
+                        {
+                            int globalPointLabel = jLinkPointLabel[pointLabel];
+                            int zoneIndex = GetZoneIndexAccordingToGlobalPointLabel(globalPointLabel);
+                                
+                            StructGrid *grid = PHSPACE::GetStructGrid(zoneIndex);
+
+                            if (grid)
+                            {
+                                grid->ColorOverlapCell(globalPointLabel, jType);
+                            }
+                            else
+                            {
+                                int processorIndex = GetZoneProcessorID(zoneIndex);
+                                friendPoint[processorIndex].push_back(globalPointLabel);
+                                friendZone[processorIndex].push_back(zoneIndex);
+                            }
+                        }
+                    }
+                    else
+                    {
+                        int twinCell = (ni-1) * (nj-1) * (kp-1) + (ni-1) * (jp-1) + (ip-1);
+                        if (iBlank[twinCell] == GENERIC_COLOR)
+                        {
+                            iBlank[twinCell] = jType;
+                        }
+                    }
+
+                    ip = i;
+                    jp = j;
+                    kp = k-1;
+
+                    if (k == 1)
+                    {
+                        if (kLinkPointLabel[pointLabel] >= 0)
+                        {
+                            int globalPointLabel = kLinkPointLabel[pointLabel];
+                            int zoneIndex = GetZoneIndexAccordingToGlobalPointLabel(globalPointLabel);
+                                
+                            StructGrid *grid = PHSPACE::GetStructGrid(zoneIndex);
+
+                            if (grid)
+                            {
+                                grid->ColorOverlapCell(globalPointLabel, jType);
+                            }
+                            else
+                            {
+                                int processorIndex = GetZoneProcessorID(zoneIndex);
+                                friendPoint[processorIndex].push_back(globalPointLabel);
+                                friendZone[processorIndex].push_back(zoneIndex);
+                            }
+                        }
+                    }
+                    else
+                    {
+                        int twinCell = (ni-1) * (nj-1) * (kp-1) + (ni-1) * (jp-1) + (ip-1);
+                        if (iBlank[twinCell] == GENERIC_COLOR)
+                        {
+                            iBlank[twinCell] = jType;
+                        }
+                    }
+
+                    ip = i;
+                    jp = j;
+                    kp = k+1;
+
+                    if (k == ked)
+                    {
+                        if (kLinkPointLabel[pointLabel] >= 0)
+                        {
+                            int globalPointLabel = kLinkPointLabel[pointLabel];
+                            int zoneIndex = GetZoneIndexAccordingToGlobalPointLabel(globalPointLabel);
+                                
+                            StructGrid *grid = PHSPACE::GetStructGrid(zoneIndex);
+
+                            if (grid)
+                            {
+                                grid->ColorOverlapCell(globalPointLabel, jType);
+                            }
+                            else
+                            {
+                                int processorIndex = GetZoneProcessorID(zoneIndex);
+                                friendPoint[processorIndex].push_back(globalPointLabel);
+                                friendZone[processorIndex].push_back(zoneIndex);
+                            }
+                        }
+                    }
+                    else
+                    {
+                        int twinCell = (ni-1) * (nj-1) * (kp-1) + (ni-1) * (jp-1) + (ip-1);
+                        if (iBlank[twinCell] == GENERIC_COLOR)
+                        {
+                            iBlank[twinCell] = jType;
+                        }
+                    }
+                }
+            }
+        }
+    }
+}
+
+LIB_EXPORT void StructGrid::ColorOverlapCell(int gp, int type)
+{
+    int zoneStartPointLabel = GetZoneStartPointLabel();
+    int *iBlank = GetCellTypeContainer();
+    int ni = GetNI();
+    int nj = GetNJ();
+    int mm = ni * nj;
+    int ms = gp - zoneStartPointLabel;
+    int kPoint = ms / mm;
+    int other = ms % mm;
+    int jPoint = other / ni;
+    int iPoint = other % ni;
+    int cellLabel = (ni-1) * (nj-1) * (kPoint-1) + (ni-1) * (jPoint-1) + (iPoint-1);
+    if (iBlank[cellLabel] == GENERIC_COLOR)
+    {
+        iBlank[cellLabel] = type;
+    }
+}
+
+LIB_EXPORT PHDouble2D & StructGrid::GetLocalFrame()
+{
+    int ni = GetNI();
+    int nj = GetNJ();
+    int nk = GetNK();
+    localFrame.resize(3);
+    for (int i = 0; i < 3; ++ i)
+    {
+        localFrame[i].resize(4);
+    }
+
+    int iHarf = ni / 2;
+    int jHarf = nj / 2;
+    int kHarf = nk / 2;
+
+    int originalLabel = 0;
+    int iDirectLabel = iHarf;
+    int jDirectLabel = ni * jHarf;
+    int kDirectLabel = ni * nj * kHarf;
+
+    localFrame[0][0] = x[originalLabel];
+    localFrame[0][1] = x[iDirectLabel] - x[originalLabel];
+    localFrame[0][2] = x[jDirectLabel] - x[originalLabel];
+    localFrame[0][3] = x[kDirectLabel] - x[originalLabel];
+
+    localFrame[1][0] = y[originalLabel];
+    localFrame[1][1] = y[iDirectLabel] - y[originalLabel];
+    localFrame[1][2] = y[jDirectLabel] - y[originalLabel];
+    localFrame[1][3] = y[kDirectLabel] - y[originalLabel];
+
+    localFrame[2][0] = z[originalLabel];
+    localFrame[2][1] = z[iDirectLabel] - z[originalLabel];
+    localFrame[2][2] = z[jDirectLabel] - z[originalLabel];
+    localFrame[2][3] = z[kDirectLabel] - z[originalLabel];
+
+    return localFrame;
+}
+
+LIB_EXPORT void StructGrid::BuildGridLink(LinkStruct *link)
+{
+    using namespace PHSPACE;
+    int zoneIndex = this->GetZoneID();
+
+    cout << " zoneIndex = " << zoneIndex << "\n";
+    int nIFace = this->CompNIFace();
+
+    InterfaceInfo *interfaceInfo = 0;
+    if (nIFace == 0)
+    {
+        this->SetInterfaceInfo(interfaceInfo);
+        return;
+    }
+
+    interfaceInfo = new InterfaceInfo(nIFace);
+    this->SetInterfaceInfo(interfaceInfo);
+    int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+
+    VVInt &facemap = link->GetFaceMap();
+
+    facemap[zoneIndex].resize(nIFace);
+
+    int ijk[4][3] = {0};
+    int irot[3] = {0}, jrot[3] = {0}, krot[3] = {0};
+
+    GetIJKROT(ijk, irot, jrot, krot);
+    RDouble xlist[4] = {0}, ylist[4] = {0}, zlist[4] = {0};
+
+    int il, jl, kl;
+    int ir, jr, kr;
+
+    int nlist = 4;
+    if (this->GetDim() == 2) nlist = 2;
+
+    vector<int> pindex(nlist);
+
+    int imin, imax, jmin, jmax, kmin, kmax, bctype;
+
+    int nsurf;
+
+    LinkStruct::AdtTree &coor_tree = link->GetCoordinateTree();
+    set < DataStruct_Sort< VInt > > &facelist = link->GetFaceList();
+    VVInt &zoneid = link->GetZoneID();
+    VVInt &faceid = link->GetFaceID();
+    RDouble tol = link->GetTolerance();
+
+    int iFace = 0;
+    uint_t fcount = zoneid.size();
+    int pcount = coor_tree.GetNodeNum();
+
+    int ibface = 0;
+
+    int periodicType = PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType");
+    RDouble translationLength[3] = {0.0};
+    GlobalDataBase::GetData("translationLength", &translationLength, PHDOUBLE, 3);
+    RDouble rotationAngle = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+    rotationAngle = rotationAngle * PI / 180;
+
+    StructBCSet *structBCSet = this->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        bcregion->GetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+        bctype = bcregion->GetBCType();
+        nsurf  = bcregion->GetFaceDirection() + 1;
+
+        if (!IsInterface(bctype))
+        {
+            ibface += (imax - imin + 1) * (jmax - jmin + 1) * (kmax - kmin + 1);
+            continue;
+        }
+
+        for (int k = kmin; k <= kmax; ++ k)
+        {
+            for (int j = jmin; j <= jmax; ++ j)
+            {
+                for (int i = imin; i <= imax; ++ i)
+                {
+                    bcregion->GetBoundaryFaceIndex(i, j, k, il, jl, kl);
+                
+                    ir = irot[nsurf - 1];
+                    jr = jrot[nsurf - 1];
+                    kr = krot[nsurf - 1];
+
+                    GetFaceCoorList(il, jl, kl, ir, jr, kr, ijk, nlist, xlist, ylist, zlist, xx, yy, zz);
+                    
+                    if (bcregion->GetBCName() == "Periodic_up")
+                    {
+                        if (periodicType == TRANSLATIONAL_PERIODICITY)
+                        {
+                            for (int m = 0; m < nlist; ++ m)
+                            {
+                                xlist[m] += translationLength[0];
+                                ylist[m] += translationLength[1];
+                                zlist[m] += translationLength[2];
+                            }
+                        }
+                        else if (periodicType == ROTATIONAL_PERIODICITY)
+                        {
+                            RDouble rotPoint[3]={0.0, 0.0, 0.0};
+                            for (int m = 0; m < nlist; ++ m)
+                            {
+                                rotPoint[0] = xlist[m];
+                                rotPoint[1] = ylist[m] * cos(rotationAngle) - zlist[m] * sin(rotationAngle);
+                                rotPoint[2] = ylist[m] * sin(rotationAngle) + zlist[m] * cos(rotationAngle);
+                                xlist[m] = rotPoint[0];
+                                ylist[m] = rotPoint[1];
+                                zlist[m] = rotPoint[2];
+                            }
+                        }
+                    }
+
+                    GetCoorIndexList(&coor_tree, tol, pcount, xlist, ylist, zlist, nlist, pindex);
+                    Create_Link_Info(pindex, zoneIndex, iFace, fcount, facelist, zoneid, faceid, link);
+
+                    interFace2BoundaryFace[iFace] = ibface;
+
+                    ++ ibface;
+                    ++ iFace;
+                }
+            }
+        }
+    }
+
+    cout << "iface = " << iFace << "\n";
+}
+
+LIB_EXPORT int StructGrid::GetNumberOfWallCell()
+{
+    int nsolid_surface = 0;
+
+    StructBCSet *structBCSet = this->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int bctype = bcregion->GetBCType();
+
+        if (IsWall(bctype) || bctype == PHENGLEI::ABLATION_SURFACE)
+        {
+            int ist, ied, jst, jed, kst, ked;
+            bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+            nsolid_surface += (ied - ist + 1) * (jed - jst + 1) * (ked - kst + 1);
+        }
+    }
+
+    return nsolid_surface;
+}
+
+LIB_EXPORT void StructGrid::GetWallBCInfo(int &wallBCNum, int &maxCellNum)
+{
+    int nCell = 0;
+    wallBCNum = 0;
+    maxCellNum = 0;
+    StructBCSet *structBCSet = this->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int bctype = bcregion->GetBCType();
+
+        if (IsWall(bctype) || bctype == PHENGLEI::ABLATION_SURFACE)
+        {
+            int ist, ied, jst, jed, kst, ked;
+            bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+            nCell = (ied - ist + 1) * (jed - jst + 1) * (ked - kst + 1);
+            wallBCNum ++;
+            maxCellNum = MAX(maxCellNum, nCell);
+        }
+    }
+}
+
+LIB_EXPORT void StructGrid::ComputeWeight()
+{
+
+}
+
+LIB_EXPORT void StructGrid::ComputeUnitCellCapsule(BackgroundTree *backgroundTree, int &iUnitCell)
+{
+    vector< int > core_index(8);
+    vector< RDouble > xx(8), yy(8), zz(8);
+
+    vector< vector< RDouble > > &amer = this->GetLocalFrame();
+
+    int iZone = GetZoneID();
+    int ni = GetNI();
+    int nj = GetNJ();
+    int nk = GetNK();
+    for (int kCore = 0; kCore < nk; ++ kCore)
+    {
+        for (int jCore = 0; jCore < nj; ++ jCore)
+        {
+            for (int iCore = 0; iCore < ni; ++ iCore)
+            {
+                backgroundTree->SetUnitCellLocation(iUnitCell, iZone, iCore, jCore, kCore);
+
+                FillCoreIndex(core_index, iCore, jCore, kCore);
+
+                ComputePhysicalCoordinate(amer, core_index, xx, yy, zz);
+
+                backgroundTree->SetUnitCellParameter(iUnitCell, xx, yy, zz);
+
+                iUnitCell += 1;
+            }
+        }
+    }
+    
+    return;
+}
+
+LIB_EXPORT void StructGrid::CollectOversetCells(OversetCellCollector *oversetCellCollector, int myid)
+{
+    int *iBlank = GetCellTypeContainer();
+    RDouble3D &xx = * this->GetCellCenterX();
+    RDouble3D &yy = * this->GetCellCenterY();
+    RDouble3D &zz = * this->GetCellCenterZ();
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    vector< int > localCellIndex;
+    vector< RDouble > xCellContainer, yCellContainer, zCellContainer;
+
+    int counter = 0;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                if (iBlank[counter] == OVERSET_COLOR)
+                {
+                    localCellIndex.push_back(counter);
+
+                    xCellContainer.push_back(xx(i, j, k));
+                    yCellContainer.push_back(yy(i, j, k));
+                    zCellContainer.push_back(zz(i, j, k));
+                }
+                counter += 1;
+            }
+        }
+    }
+
+    int zoneIndex = GetZoneID();
+    oversetCellCollector->CollectOversetCells(zoneIndex, localCellIndex, xCellContainer, yCellContainer, zCellContainer);
+}
+
+LIB_EXPORT void StructGrid::ProbeNearestPoint(RDouble xx, RDouble yy, RDouble zz, vector< RDouble > &ss, vector< int > &gp)
+{
+    int zoneStartPointLabel = GetZoneStartPointLabel();
+    RDouble *xCoreContainer = GetXCoreContainer();
+    RDouble *yCoreContainer = GetYCoreContainer();
+    RDouble *zCoreContainer = GetZCoreContainer();
+    vector< RDouble > globalCoordinate(3);
+    vector< vector< RDouble > > &localFrame = this->GetLocalFrame();
+    int ni = GetNI();
+    int nj = GetNJ();
+    int nk = GetNK();
+    int delta_k = max(1, nk-2);
+    for (int kCore = 1; kCore < nk; kCore += delta_k)
+    {
+        for (int jCore = 1; jCore < nj; ++ jCore)
+        {
+            for (int iCore = 1; iCore < ni; ++ iCore)
+            {
+                int coreLabel = (ni+1) * (nj+1) * kCore + (ni+1) * jCore + iCore;
+                int nodeLabel = zoneStartPointLabel + ni * nj * kCore + ni * jCore + iCore;
+
+                gp.push_back(nodeLabel);
+
+                RDouble xCore = xCoreContainer[coreLabel];
+                RDouble yCore = yCoreContainer[coreLabel];
+                RDouble zCore = zCoreContainer[coreLabel];
+
+                ComputePhysicalCoordinate(localFrame, xCore, yCore, zCore, globalCoordinate);
+
+                RDouble dX = globalCoordinate[0] - xx;
+                RDouble dY = globalCoordinate[1] - yy;
+                RDouble dZ = globalCoordinate[2] - zz;
+                RDouble distance = sqrt(dX * dX + dY * dY + dZ * dZ);
+
+                ss.push_back(distance);
+            }
+        }
+    }
+
+    int delta_j = max(1, nj-2);
+    for (int jCore = 1; jCore < nj; jCore += delta_j)
+    {
+        for (int kCore = 1; kCore < nk; ++ kCore)
+        {
+            for (int iCore = 1; iCore < ni; ++ iCore)
+            {
+                int coreLabel = (ni+1) * (nj+1) * kCore + (ni+1) * jCore + iCore;
+                int nodeLabel = zoneStartPointLabel + ni * nj * kCore + ni * jCore + iCore;
+
+                gp.push_back(nodeLabel);
+
+                RDouble xCore = xCoreContainer[coreLabel];
+                RDouble yCore = yCoreContainer[coreLabel];
+                RDouble zCore = zCoreContainer[coreLabel];
+
+                ComputePhysicalCoordinate(localFrame, xCore, yCore, zCore, globalCoordinate);
+
+                RDouble dX = globalCoordinate[0] - xx;
+                RDouble dY = globalCoordinate[1] - yy;
+                RDouble dZ = globalCoordinate[2] - zz;
+                RDouble distance = sqrt(dX * dX + dY * dY + dZ * dZ);
+
+                ss.push_back(distance);
+            }
+        }
+    }
+
+    int delta_i = max(1, ni-2);
+    for (int iCore = 1; iCore < ni; iCore += delta_i)
+    {
+        for (int kCore = 1; kCore < nk; ++ kCore)
+        {
+            for (int jCore = 1; jCore < nj; ++ jCore)
+            {
+                int coreLabel = (ni+1) * (nj+1) * kCore + (ni+1) * jCore + iCore;
+                int nodeLabel = zoneStartPointLabel + ni * nj * kCore + ni * jCore + iCore;
+
+                gp.push_back(nodeLabel);
+
+                RDouble xCore = xCoreContainer[coreLabel];
+                RDouble yCore = yCoreContainer[coreLabel];
+                RDouble zCore = zCoreContainer[coreLabel];
+
+                ComputePhysicalCoordinate(localFrame, xCore, yCore, zCore, globalCoordinate);
+
+                RDouble dX = globalCoordinate[0] - xx;
+                RDouble dY = globalCoordinate[1] - yy;
+                RDouble dZ = globalCoordinate[2] - zz;
+                RDouble distance = sqrt(dX * dX + dY * dY + dZ * dZ);
+
+                ss.push_back(distance);
+            }
+        }
+    }
+
+    return;
+}
+
+LIB_EXPORT void StructGrid::ComputeLocalCoordinateByNewtonMethod(int iCore, int jCore, int kCore, RDouble xx, RDouble yy, RDouble zz, vector< RDouble > &ss, vector< int > &node)
+{
+    RDouble *xCoreContainer = GetXCoreContainer();
+    RDouble *yCoreContainer = GetYCoreContainer();
+    RDouble *zCoreContainer = GetZCoreContainer();
+    int *hingedPointContainer = GetHingedPointContainer();
+    const RDouble LOWER = -0.001, UPPER = 1.001, EPS = 1.e-4;
+    const int ITERATION_NUM = 20, NODE_NUM = 8;
+
+    vector< vector< RDouble > > globalCoordinate(8, vector< RDouble >(3));
+    vector< RDouble > a(8), b(8), c(8), temp(8);
+
+    vector< int > core_index(NODE_NUM);
+    FillCoreIndex(core_index, iCore, jCore, kCore);
+
+    vector< vector< RDouble > > &localFrame = this->GetLocalFrame();
+    for (int i = 0; i < NODE_NUM; ++ i)
+    {
+        int coreLabel = core_index[i];
+        ComputePhysicalCoordinate(localFrame, xCoreContainer[coreLabel], yCoreContainer[coreLabel], zCoreContainer[coreLabel], globalCoordinate[i]);
+    }
+
+    FillCoefficientContainer(globalCoordinate, a, 0);
+    FillCoefficientContainer(globalCoordinate, b, 1);
+    FillCoefficientContainer(globalCoordinate, c, 2);
+
+    vector< RDouble > ksai(3, 0.5), delta(3), rhs(3);
+    vector< vector< RDouble > > amer(3, vector<RDouble>(3));
+
+    int flag = 0;
+    for (int iter = 0; iter < ITERATION_NUM; ++ iter)
+    {
+        ComputeTempContainer(ksai, temp);
+
+        rhs[0] = -inner_product(a.begin(), a.end(), temp.begin(), -xx);
+        rhs[1] = -inner_product(b.begin(), b.end(), temp.begin(), -yy);
+        rhs[2] = -inner_product(c.begin(), c.end(), temp.begin(), -zz);
+
+        ComputeJacobiMatrix(a, b, c, ksai, amer);
+
+        GaussElimination(amer, rhs, 3, delta, flag);
+
+        for (int i = 0; i < 3; ++ i)
+        {
+            ksai[i] += delta[i];
+        }
+
+        if (abs(delta[0]) + abs(delta[1]) + abs(delta[2]) < EPS) break;
+    }
+
+    if (flag == 1 && LOWER < ksai[0] && ksai[0] < UPPER && LOWER < ksai[1] && ksai[1] < UPPER && LOWER < ksai[2] && ksai[2] < UPPER)
+    {
+        ss = ksai;
+        node.resize(NODE_NUM);
+        for (int iCell = 0; iCell < NODE_NUM; ++ iCell)
+        {
+            node[iCell] = hingedPointContainer[core_index[iCell]];
+        }
+    }
+
+    return;
+}
+
+LIB_EXPORT RDouble StructGrid::CalMinEdgeLength()
+{
+    if (this->minEdgeLength > 0.0)
+    {
+        return this->minEdgeLength;
+    }
+
+    PHMPI::FreeBlockData();
+    cout << "    Error: have not calculate the edge length for structured grid!\n" << endl;
+    MPI_Abort(MPI_COMM_WORLD, -1);
+
+    return 0;
+}
+
+LIB_EXPORT RDouble StructGrid::CalMaxEdgeLength()
+{
+    if (this->maxEdgeLength > 0.0)
+    {
+        return this->maxEdgeLength;
+    }
+
+    maxEdgeLength = PHSPACE::SMALL;
+
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    RDouble3D &xx = *this->GetStructX();
+    RDouble3D &yy = *this->GetStructY();
+    RDouble3D &zz = *this->GetStructZ();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+    int ist, ied, jst, jed, kst, ked;
+    this->GetNodeIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int il1 = 1;
+    int jl1 = 1;
+    int kl1 = 1;
+
+    RDouble dx, dy, dz, ds;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int il = i + il1;
+                if (il <= ied)
+                {
+                    dx = xx(i, j, k) - xx(il, j, k);
+                    dy = yy(i, j, k) - yy(il, j, k);
+                    dz = zz(i, j, k) - zz(il, j, k);
+                    ds = DISTANCE(dx, dy, dz);
+                    maxEdgeLength = MAX(maxEdgeLength, ds);
+                }
+
+                int jl = j + jl1;
+                if (jl <= jed)
+                {
+                    dx = xx(i, j, k) - xx(i, jl, k);
+                    dy = yy(i, j, k) - yy(i, jl, k);
+                    dz = zz(i, j, k) - zz(i, jl, k);
+                    ds = DISTANCE(dx, dy, dz);
+                    maxEdgeLength = MAX(maxEdgeLength, ds);
+
+                }
+
+                if (ked == 1) continue;
+                int kl = k + kl1;
+                if (kl <= ked)
+                {
+                    dx = xx(i, j, k) - xx(i, j, kl);
+                    dy = yy(i, j, k) - yy(i, j, kl);
+                    dz = zz(i, j, k) - zz(i, j, kl);
+                    ds = DISTANCE(dx, dy, dz);
+                    maxEdgeLength = MAX(maxEdgeLength, ds);
+                }
+            }
+        }
+    }
+
+    return maxEdgeLength;
+}
+
+void StructGrid::DecodeBCFace(DataContainer *cdata)
+{
+    VirtualFile *virtualFile = new VirtualFile(cdata);
+
+    virtualFile->BeginReadWork();
+
+    int zoneIndex;
+    PHRead(virtualFile, zoneIndex);
+
+    int numberOfBCRegions;
+    PHRead(virtualFile, numberOfBCRegions);
+    ASSERT(numberOfBCRegions == this->GetStructBCSet()->GetnBCRegion());
+
+    uint_long totalSize;
+    PHRead(virtualFile, totalSize);
+
+    char *bcNameChar = new char [totalSize];
+    PHRead(virtualFile, bcNameChar, static_cast<int>(totalSize));
+    
+    string *bcNameList = new string [numberOfBCRegions];
+    uint_long count = 0;
+    for (int iBCRegion = 0; iBCRegion < numberOfBCRegions; ++ iBCRegion)
+    {
+        if (count < totalSize)
+        {
+            while (bcNameChar[count] != '\0')
+            {
+                bcNameList[iBCRegion].push_back(bcNameChar[count]);
+                ++ count;
+            }
+            ++ count;
+        }
+    }
+
+    //PHRead(virtualFile, numberOfBCRegions);
+    //int *bcTypeList = new int [numberOfBCRegions];
+    //PHRead(virtualFile, bcTypeList, numberOfBCRegions);
+
+    virtualFile->EndReadWork();
+
+    StructBCSet *structBCSet = this->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        bcregion->SetBCName(bcNameList[iBCRegion]);
+
+        int bctype = bcregion->GetBCType();
+        if ((bctype > 7) && (bctype < 51))
+        {
+            bctype = 2;
+            bcregion->SetBCType(bctype);
+        }
+    }
+
+    //delete [] bcTypeList;
+    delete [] bcNameList;
+    delete [] bcNameChar;
+    delete virtualFile;
+}
+
+void StructGrid::DecodeBcDirFace(DataContainer *cdata)
+{
+    VirtualFile *virtualFile = new VirtualFile(cdata);
+
+    virtualFile->BeginReadWork();
+
+    int zoneIndex;
+    PHRead(virtualFile, zoneIndex);
+
+    int numberOfBCRegions;
+    PHRead(virtualFile, numberOfBCRegions);
+
+    StructBCSet *structBCSet = this->GetStructBCSet();
+    ASSERT(numberOfBCRegions == structBCSet->GetnBCRegion());
+
+    for (int iBCRegion = 0; iBCRegion < numberOfBCRegions; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int *s_dir3d = structBC->GetFaceMatchingTargetDirIndex();
+        virtualFile->read(reinterpret_cast<char*>(s_dir3d), 3 * sizeof(int));
+    }
+
+    virtualFile->EndReadWork();
+
+    delete virtualFile;
+}
+
+void StructGrid::GhostCell3DExceptInterface(RDouble3D &TargetArray3D)
+{
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    StructBCSet *structBCSet = this->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        //int BCType = structBC->GetBCType();
+        //if (IsInterface(BCType))
+        //{
+        //    continue;
+        //}
+
+        int iStart, iEnd, jStart, jEnd, kStart, kEnd;
+        structBC->GetIJKRegion(iStart, iEnd, jStart, jEnd, kStart, kEnd);
+
+        int *faceDirectionIndex3d = structBC->GetFaceDirectionIndex();
+        for (int k = kStart; k <= kEnd; ++ k)
+        {
+            for (int j = jStart; j <= jEnd; ++ j)
+            {
+                for (int i = iStart; i <= iEnd; ++ i)
+                {
+                    //! First cell index inside flowfield.
+                    int firstInsideLayer = 0;
+                    int iStartInsideLayer1 = i - faceDirectionIndex3d[0] * firstInsideLayer;
+                    int jStartInsideLayer1 = j - faceDirectionIndex3d[1] * firstInsideLayer;
+                    int kStartInsideLayer1 = k - faceDirectionIndex3d[2] * firstInsideLayer;
+
+                    RestrictIndex(iStartInsideLayer1, jStartInsideLayer1, kStartInsideLayer1, ni-1, nj-1, nk-1);
+                    for (int iGhost = 1; iGhost <= 2; ++ iGhost)
+                    {
+                        int iGhostLayer = i + faceDirectionIndex3d[0] * iGhost;
+                        int jGhostLayer = j + faceDirectionIndex3d[1] * iGhost;
+                        int kGhostLayer = k + faceDirectionIndex3d[2] * iGhost;
+
+                        TargetArray3D(iGhostLayer, jGhostLayer, kGhostLayer) = TargetArray3D(iStartInsideLayer1, jStartInsideLayer1, kStartInsideLayer1);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void StructGrid::GhostCell3DExceptInterface(RDouble4D &TargetArray4D, const int &nVariables)
+{
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    StructBCSet *structBCSet = this->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        //int BCType = structBC->GetBCType();
+        //if (IsInterface(BCType))
+        //{
+        //    continue;
+        //}
+
+        int iStart, iEnd, jStart, jEnd, kStart, kEnd;
+        structBC->GetIJKRegion(iStart, iEnd, jStart, jEnd, kStart, kEnd);
+
+        int *faceDirectionIndex3d = structBC->GetFaceDirectionIndex();
+        for (int k = kStart; k <= kEnd; ++ k)
+        {
+            for (int j = jStart; j <= jEnd; ++ j)
+            {
+                for (int i = iStart; i <= iEnd; ++ i)
+                {
+                    //! First cell index inside flowfield.
+                    int firstInsideLayer = 0;
+                    int iStartInsideLayer1 = i - faceDirectionIndex3d[0] * firstInsideLayer;
+                    int jStartInsideLayer1 = j - faceDirectionIndex3d[1] * firstInsideLayer;
+                    int kStartInsideLayer1 = k - faceDirectionIndex3d[2] * firstInsideLayer;
+
+                    RestrictIndex(iStartInsideLayer1, jStartInsideLayer1, kStartInsideLayer1, ni-1, nj-1, nk-1);
+
+                    for (int iGhost = 1; iGhost <= 2; ++ iGhost)
+                    {
+                        int iGhostLayer = i + faceDirectionIndex3d[0] * iGhost;
+                        int jGhostLayer = j + faceDirectionIndex3d[1] * iGhost;
+                        int kGhostLayer = k + faceDirectionIndex3d[2] * iGhost;
+                        for (int iVar = 0; iVar < nVariables; ++ iVar)
+                        {
+                            TargetArray4D(iGhostLayer, jGhostLayer, kGhostLayer, iVar) = 
+                            TargetArray4D(iStartInsideLayer1, jStartInsideLayer1, kStartInsideLayer1, iVar);
+                        }
+                    }
+                }
+            }
+        }
+    }
+}
+
+void StructGrid::GetBcNamePair(set< pair<int, string> > &bcNamePairSet)
+{
+    StructBCSet *structBCSet = this->GetStructBCSet();
+    int  nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion ++)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+        string bcName = structBC->GetBCName();
+        int bctype = structBC->GetBCType();
+
+        if (bctype == PHENGLEI::INTERFACE) continue;
+        pair<int, string> bcNamePair(bctype, bcName);
+        bcNamePairSet.insert(bcNamePair);
+    }
+}
+
+void StructGrid::DumpWallFaceCenter(ActionKey *actkey)
+{
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+
+    std::ostringstream oss;
+
+    int girdIndex = this->GetZoneID();
+    if (girdIndex == 0)
+    {
+        int globalTotalWallFace = GlobalDataBase::GetIntParaFromDB("GlobalTotalWallFace");
+        oss << globalTotalWallFace << "\n";
+    }
+
+    int nsolid_surface = this->GetNumberOfWallCell();
+    if ((nsolid_surface == 0) || (level != 0))
+    {
+        string str = oss.str();
+        cdata->write(const_cast <char *> (str.data()), str.size() * sizeof(char));
+        return;
+    }
+
+    oss << setiosflags(ios::left);
+    oss << setprecision(5);
+    oss << setiosflags(ios::scientific);
+    oss << setiosflags(ios::showpoint);
+
+    StructBCSet *structBCSet = this->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!IsWall(BCType))
+        {
+            continue;
+        }
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+        int nSurface = structBC->GetFaceDirection() + 1;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int iWall, jWall, kWall;
+                    structBC->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                    RDouble xCenterWall, yCenterWall, zCenterWall;
+                    this->FaceCoor(iWall, jWall, kWall, nSurface, xCenterWall, yCenterWall, zCenterWall);
+
+                    oss << xCenterWall << "	";
+                    oss << yCenterWall << "	";
+                    oss << zCenterWall << "	";
+                    oss <<"\n";
+                }
+            }
+        }
+    }
+
+    string str = oss.str();
+    cdata->write(const_cast <char *> (str.data()), str.size() * sizeof(char));
+}
+
+void CommunicateInterfaceValue(StructGrid *grid, RDouble4D *variable, const string &variableName, int variableDimension)
+{
+    //! Upload the interface data to the buffer.
+    PHSPACE::UploadInterfaceValue(grid, variable, variableName, variableDimension);
+
+    //! Download the interface data from the buffer.
+    PHSPACE::DownloadInterfaceValue(grid, variable, variableName, variableDimension);
+}
+
+void CommunicateInterfaceValue(StructGrid *grid, RDouble3D *variable, const string &variableName)
+{
+    //! Upload the interface data to the buffer.
+    PHSPACE::UploadInterfaceValue(grid, variable, variableName);
+
+    //! Download the interface data from the buffer.
+    PHSPACE::DownloadInterfaceValue(grid, variable, variableName);
+}
+
+void UploadInterfaceValue(StructGrid *grid, RDouble4D *f, const string &name, int neqn)
+{
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    StructGrid *fgrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *fiinfo = fgrid->GetInterfaceInfo();
+    int level = grid->GetLevel();
+
+    for (int iGhost = GetNumberOfGhostCellLayers() - 1; iGhost >= 0; -- iGhost)
+    {
+        Data_ParamFieldSuite *dsend = interfaceInfo->GetSendDataStorage(iGhost);
+        RDouble **fg = reinterpret_cast<RDouble **> (dsend->GetDataPtr(name));
+        if (fg == NULL)
+        {
+            cout<<name<<" is null"<<endl;
+        }
+
+        int nIFace = fiinfo->GetNIFace();
+        
+        for (int iFace = 0; iFace < nIFace; ++ iFace)
+        {
+            int is, js, ks;
+            fgrid->GetSourceIndexIJK(iFace, iGhost + 1, is, js, ks);
+            fgrid->RemapMultigridIJK(level, is, js, ks);
+
+            for (int m = 0; m < neqn; ++ m)
+            {
+                fg[m][iFace] = (*f)(is, js, ks, m);
+            }
+        }
+    }
+}
+
+void UploadInterfaceValue(StructGrid *grid, RDouble3D *f, const string &name)
+{
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    StructGrid *fgrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *fiinfo = fgrid->GetInterfaceInfo();
+    int level = grid->GetLevel();
+
+    int m = 0;
+    for (int iGhost = GetNumberOfGhostCellLayers() - 1; iGhost >= 0; -- iGhost)
+    {
+        Data_ParamFieldSuite *dsend = interfaceInfo->GetSendDataStorage(iGhost);
+        RDouble **fg = reinterpret_cast<RDouble **> (dsend->GetDataPtr(name));
+
+        int nIFace = fiinfo->GetNIFace();
+        
+        for (int iFace = 0; iFace < nIFace; ++ iFace)
+        {
+            int is, js, ks;
+            fgrid->GetSourceIndexIJK(iFace, iGhost + 1, is, js, ks);
+            fgrid->RemapMultigridIJK(level, is, js, ks);
+
+            fg[m][iFace] = (*f)(is, js, ks);
+        }
+    }
+}
+
+void DownloadInterfaceValue(StructGrid *grid, RDouble4D *f, const string &name, int neqn)
+{
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    StructGrid *fgrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *fiinfo = fgrid->GetInterfaceInfo();
+    int level = grid->GetLevel();
+
+    StructBCSet *structBCSet = fgrid->GetStructBCSet();
+    int periodicType = PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType");
+    double rotationAngle = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+    rotationAngle = rotationAngle * PI / 180;
+
+    for (int iGhost = GetNumberOfGhostCellLayers() - 1; iGhost >= 0; -- iGhost)
+    {
+        Data_ParamFieldSuite *drecv = interfaceInfo->GetRecvDataStorage(iGhost);
+
+        RDouble **fg = reinterpret_cast<RDouble **> (drecv->GetDataPtr(name));
+
+        int nIFace = fiinfo->GetNIFace();
+        for (int iFace = 0; iFace < nIFace; ++ iFace)
+        {
+            int it, jt, kt;
+            fgrid->GetTargetIndexIJK(iFace, iGhost+1, it, jt, kt);
+            fgrid->RemapMultigridIJK(level, it, jt, kt);
+
+            //! Rotate vector for periodic boundary at the end of communication for InterfaceValue.
+            int *ibcregions = structBCSet->GetIFaceInfo();
+            int iBCRegion = ibcregions[iFace];
+            StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+            string bcName = bcregion->GetBCName();
+            //! Rotate process only for vector in rotational periodicity.
+            if (neqn >= 4 && periodicType == ROTATIONAL_PERIODICITY)
+            {
+                if (bcName == "Periodic_up" || bcName == "Periodic_down")
+                {
+                    RDouble rotfg[3] = {0.0, 0.0, 0.0};
+                    if (bcName == "Periodic_up")
+                    {
+                        rotfg[0] = fg[1][iFace];
+                        rotfg[1] = fg[2][iFace] * cos(2 * PI - rotationAngle) - fg[3][iFace] * sin(2 * PI - rotationAngle);
+                        rotfg[2] = fg[2][iFace] * sin(2 * PI - rotationAngle) + fg[3][iFace] * cos(2 * PI - rotationAngle);
+                    }
+                    else if (bcName == "Periodic_down")
+                    {
+                        rotfg[0] = fg[1][iFace];
+                        rotfg[1] = fg[2][iFace] * cos(rotationAngle) - fg[3][iFace] * sin(rotationAngle);
+                        rotfg[2] = fg[2][iFace] * sin(rotationAngle) + fg[3][iFace] * cos(rotationAngle);
+                    }
+
+                    for (int m = 1; m <= 3; ++ m)
+                    {
+                        fg[m][iFace] = rotfg[m-1];
+                    }
+                }
+            }
+            for (int m = 0; m < neqn; ++ m)
+            {
+                (*f)(it, jt, kt, m) = fg[m][iFace];
+            }
+        }
+    }
+}
+
+void DownloadInterfaceValue(StructGrid *grid, RDouble3D *f, const string &name)
+{
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    StructGrid *fgrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *fiinfo = fgrid->GetInterfaceInfo();
+    int level = grid->GetLevel();
+
+    int m = 0;
+    for (int iGhost = GetNumberOfGhostCellLayers() - 1; iGhost >= 0; -- iGhost)
+    {
+        Data_ParamFieldSuite *drecv = interfaceInfo->GetRecvDataStorage(iGhost);
+
+        RDouble **fg = reinterpret_cast<RDouble **> (drecv->GetDataPtr(name));
+        int nIFace = fiinfo->GetNIFace();
+        for (int iFace = 0; iFace < nIFace; ++ iFace)
+        {
+            int it, jt, kt;
+            fgrid->GetTargetIndexIJK(iFace, iGhost + 1, it, jt, kt);
+            fgrid->RemapMultigridIJK(level, it, jt, kt);
+            (*f)(it, jt, kt) = fg[m][iFace];
+        }
+    }
+}
+
+void UploadOversetValue(StructGrid *grid, RDouble4D *field, const string &name, int neqn)
+{
+    StructGrid *fgrid = StructGridCast(grid->GetFinestGrid());
+    OversetInformationProxy * oversetInformationProxy = grid->GetUnstrGrid()->GetOversetInformationProxy();
+    OversetDataProxy * oversetDataProxy = oversetInformationProxy->GetOversetDataProxyForSend();
+
+    int ni = fgrid->GetNI();
+    int nj = fgrid->GetNJ();
+
+    Data_ParamFieldSuite * dataStorage = oversetDataProxy->GetDataStorage();
+
+    RDouble **fieldStorage = reinterpret_cast<RDouble **> (dataStorage->GetDataPtr(name));
+    int numberOfNeighbors = oversetDataProxy->GetNumberOfNeighbors();
+
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbors; ++ iNeighbor)
+    {
+        int   numberOfCells           = oversetDataProxy->GetNumberOfCells          (iNeighbor);
+        int * cellIndexContainer      = oversetDataProxy->GetCellIndexContainer     (iNeighbor);
+        int * cellStorageIndexMapping = oversetDataProxy->GetCellStorageIndexMapping(iNeighbor);
+
+        for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+        {
+            int storageAddress = cellStorageIndexMapping[iCell];
+            int cellIndex = cellIndexContainer[iCell];
+            int i, j, k;
+
+            DecodeIJK(cellIndex, i, j, k, ni-1, nj-1);
+
+            for (int iEquation = 0; iEquation < neqn; ++ iEquation)
+            {
+                fieldStorage[ iEquation ][ storageAddress ] = (*field)(i, j, k, iEquation);
+            }
+        }
+    }
+}
+
+void UploadOversetValue(StructGrid *grid, RDouble3D *field, const string &name)
+{
+    StructGrid *fgrid = StructGridCast(grid->GetFinestGrid());
+    OversetInformationProxy * oversetInformationProxy = grid->GetUnstrGrid()->GetOversetInformationProxy();
+    OversetDataProxy * oversetDataProxy = oversetInformationProxy->GetOversetDataProxyForSend();
+
+    int ni = fgrid->GetNI();
+    int nj = fgrid->GetNJ();
+
+    Data_ParamFieldSuite * dataStorage = oversetDataProxy->GetDataStorage();
+
+    RDouble **fieldStorage = reinterpret_cast<RDouble **> (dataStorage->GetDataPtr(name));
+    int numberOfNeighbors = oversetDataProxy->GetNumberOfNeighbors();
+
+    int iEquation = 0;
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbors; ++ iNeighbor)
+    {
+        int  numberOfCells           = oversetDataProxy->GetNumberOfCells          (iNeighbor);
+        int *cellIndexContainer      = oversetDataProxy->GetCellIndexContainer     (iNeighbor);
+        int *cellStorageIndexMapping = oversetDataProxy->GetCellStorageIndexMapping(iNeighbor);
+
+        for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+        {
+            int storageAddress = cellStorageIndexMapping[iCell];
+            int cellIndex = cellIndexContainer[iCell];
+            int i, j, k;
+
+            DecodeIJK(cellIndex, i, j, k, ni-1, nj-1);
+
+            fieldStorage[ iEquation ][ storageAddress ] = (*field)(i, j, k);
+        }
+    }
+}
+
+void DownloadOversetValue(StructGrid *grid, RDouble4D *field, const string &name, int neqn)
+{
+    if (field == 0) return;
+    StructGrid *fgrid = StructGridCast(grid->GetFinestGrid());
+    OversetInformationProxy * oversetInformationProxy = grid->GetUnstrGrid()->GetOversetInformationProxy();
+
+    int ni = fgrid->GetNI();
+    int nj = fgrid->GetNJ();
+
+    OversetDataProxy * oversetDataProxy = oversetInformationProxy->GetOversetDataProxyForReceive();
+
+    Data_ParamFieldSuite * dataStorage = oversetDataProxy->GetDataStorage();
+
+    RDouble **fieldStorage = reinterpret_cast<RDouble **> (dataStorage->GetDataPtr(name));
+
+    int numberOfNeighborZones = oversetDataProxy->GetNumberOfNeighbors();
+
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighborZones; ++ iNeighbor)
+    {
+        int  numberOfCells           = oversetDataProxy->GetNumberOfCells          (iNeighbor);
+        int *cellIndexContainer      = oversetDataProxy->GetCellIndexContainer     (iNeighbor);
+        int *cellStorageIndexMapping = oversetDataProxy->GetCellStorageIndexMapping(iNeighbor);
+
+        for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+        {
+            int storageAddress = cellStorageIndexMapping[ iCell ];
+            int cellIndex      = cellIndexContainer     [ iCell ];
+            int i, j, k;
+
+            DecodeIJK(cellIndex, i, j, k, ni-1, nj-1);
+
+            for (int iEquation = 0; iEquation < neqn; ++ iEquation)
+            {
+                (*field)(i, j, k, iEquation) = fieldStorage[ iEquation ][ storageAddress ];
+            }
+        }
+    }
+}
+
+void DownloadOversetValue(StructGrid *grid, RDouble3D *field, const string &name)
+{
+    if (field == 0) return;
+    StructGrid *fgrid = StructGridCast(grid->GetFinestGrid());
+    OversetInformationProxy * oversetInformationProxy = grid->GetUnstrGrid()->GetOversetInformationProxy();
+
+    int ni = fgrid->GetNI();
+    int nj = fgrid->GetNJ();
+
+    OversetDataProxy * oversetDataProxy = oversetInformationProxy->GetOversetDataProxyForReceive();
+
+    Data_ParamFieldSuite * dataStorage = oversetDataProxy->GetDataStorage();
+
+    RDouble **fieldStorage = reinterpret_cast<RDouble **> (dataStorage->GetDataPtr(name));
+
+    int numberOfNeighborZones = oversetDataProxy->GetNumberOfNeighbors();
+    int iEquation = 0;
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighborZones; ++ iNeighbor)
+    {
+        int  numberOfCells           = oversetDataProxy->GetNumberOfCells          (iNeighbor);
+        int *cellIndexContainer      = oversetDataProxy->GetCellIndexContainer     (iNeighbor);
+        int *cellStorageIndexMapping = oversetDataProxy->GetCellStorageIndexMapping(iNeighbor);
+
+        for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+        {
+            int storageAddress = cellStorageIndexMapping[ iCell ];
+            int cellIndex      = cellIndexContainer     [ iCell ];
+            int i, j, k;
+
+            DecodeIJK(cellIndex, i, j, k, ni-1, nj-1);
+
+            (*field)(i, j, k) = fieldStorage[ iEquation ][ storageAddress ];
+        }
+    }
+}
+
+void MinMaxDiffINF(StructGrid *grid, int ig, RDouble *dmin, RDouble *dmax, RDouble4D *q, int m)
+{
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    StructGrid *fgrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *fiinfo = fgrid->GetInterfaceInfo();
+
+    int level = grid->GetLevel();
+    int nIFace = fiinfo->GetNIFace();
+
+    int ndim = GetDim();
+    int id = 1;
+    int jd = 1;
+    int kd = 1;
+    if (ndim == TWO_D) kd = 0;
+
+    int idx[6], jdx[6], kdx[6];
+
+    //! Find the maximum and minimum in the neighbor of each cell.
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        int is, js, ks;
+        fgrid->GetSourceIndexIJK(iFace, ig+1, is, js, ks);
+        fgrid->RemapMultigridIJK(level, is, js, ks);
+
+        dmin[iFace] = (*q)(is, js, ks, m);
+        dmax[iFace] = (*q)(is, js, ks, m);
+
+        idx[0] = is + id;
+        jdx[0] = js;
+        kdx[0] = ks;
+
+        idx[1] = is - id;
+        jdx[1] = js;
+        kdx[1] = ks;
+
+        idx[2] = is;
+        jdx[2] = js + jd;
+        kdx[2] = ks;
+
+        idx[3] = is;
+        jdx[3] = js - jd;
+        kdx[3] = ks;
+
+        idx[4] = is;
+        jdx[4] = js;
+        kdx[4] = ks + kd;
+
+        idx[5] = is;
+        jdx[5] = js;
+        kdx[5] = ks - kd;
+
+        for (int n = 0; n < 6; ++ n)
+        {
+            dmin[iFace] = MIN(dmin[iFace], (*q)(idx[n], jdx[n], kdx[n], m));
+            dmax[iFace] = MAX(dmax[iFace], (*q)(idx[n], jdx[n], kdx[n], m));
+        }
+
+        dmin[iFace] -= (*q)(is, js, ks, m);
+        dmax[iFace] -= (*q)(is, js, ks, m);
+    }
+}
+
+void BarthLimiterINF(StructGrid *grid, int ig, RDouble *limit, RDouble4D *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, int m)
+{
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    StructGrid *fgrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *fiinfo = fgrid->GetInterfaceInfo();
+
+    int level = grid->GetLevel();
+    int nIFace = fiinfo->GetNIFace();
+
+    //! Need temporary arrays for the differences between the value in every cell and
+    //! maximum/minimum in the neighboring cells.
+    RDouble *dmin = new RDouble [nIFace];
+    RDouble *dmax = new RDouble [nIFace];
+
+    //! Find the the differences for q.
+    MinMaxDiffINF(grid, ig, dmin, dmax, q, m);
+
+    RDouble4D &gxfn = * (grid->GetFaceNormalX());
+    RDouble4D &gyfn = * (grid->GetFaceNormalY());
+    RDouble4D &gzfn = * (grid->GetFaceNormalZ());
+
+    RDouble dx, dy, dz, ds, dot;
+    RDouble dq_face;
+
+    RDouble xcc, ycc, zcc, xfc, yfc, zfc, xfn, yfn, zfn;
+
+    int ndim = GetDim();
+    int id = 1;
+    int jd = 1;
+    int kd = 1;
+    if (ndim == TWO_D) kd = 0;
+
+    int ndmax = 6;
+    if (ndim == TWO_D) ndmax = 4;
+
+    int idx[6], jdx[6], kdx[6], ndx[6], ipn[6];
+
+    //! Find the maximum and minimum in the neighbor of each cell.
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        int is, js, ks;
+        fgrid->GetSourceIndexIJK(iFace, ig + 1, is, js, ks);
+        fgrid->RemapMultigridIJK(level, is, js, ks);
+
+        grid->CenterCoor(is, js, ks, xcc, ycc, zcc);
+
+        idx[0] = is;
+        jdx[0] = js;
+        kdx[0] = ks;
+        ndx[0] = 1;
+        ipn[0] = -1;
+
+        idx[1] = is + id;
+        jdx[1] = js;
+        kdx[1] = ks;
+        ndx[1] = 1;
+        ipn[1] = 1;
+
+        idx[2] = is;
+        jdx[2] = js;
+        kdx[2] = ks;
+        ndx[2] = 2;
+        ipn[2] = -1;
+
+        idx[3] = is;
+        jdx[3] = js + jd;
+        kdx[3] = ks;
+        ndx[3] = 2;
+        ipn[3] = 1;
+
+        if (ndim == THREE_D)
+        {
+            idx[4] = is;
+            jdx[4] = js;
+            kdx[4] = ks;
+            ndx[4] = 3;
+            ipn[4] = -1;
+
+            idx[5] = is;
+            jdx[5] = js;
+            kdx[5] = ks + kd;
+            ndx[5] = 3;
+            ipn[5] = 1;
+        }
+
+        for (int n = 0; n < ndmax; ++ n)
+        {
+            grid->FaceCoor(idx[n], jdx[n], kdx[n], ndx[n], xfc, yfc, zfc);
+
+            xfn = gxfn(idx[n], jdx[n], kdx[n], ndx[n]);
+            yfn = gyfn(idx[n], jdx[n], kdx[n], ndx[n]);
+            zfn = gzfn(idx[n], jdx[n], kdx[n], ndx[n]);
+
+            dx = xfc - xcc;
+            dy = yfc - ycc;
+            dz = zfc - zcc;
+            dq_face = dqdx[iFace] * dx + dqdy[iFace] * dy + dqdz[iFace] * dz;
+
+            ds  = sqrt(dx * dx + dy * dy + dz * dz);
+            dot = ipn[n] * (xfn * dx + yfn * dy + zfn * dz) / (ds + SMALL);
+
+            if (dot < 0.0) limit[iFace] = 0.0;
+
+            if (dq_face > dmax[iFace])
+            {
+                limit[iFace] = MIN(limit[iFace], dmax[iFace] / dq_face);
+            }
+            else if (dq_face < dmin[iFace])
+            {
+                limit[iFace] = MIN(limit[iFace], dmin[iFace] / dq_face);
+            }
+        }
+
+    }
+    delete [] dmin;
+    delete [] dmax;
+}
+
+void VencatLimiterINF(StructGrid *grid, int ig, RDouble *limit, RDouble4D *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, int m)
+{
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    StructGrid *fgrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *fiinfo = fgrid->GetInterfaceInfo();
+
+    int level = grid->GetLevel();
+    int nIFace = fiinfo->GetNIFace();
+
+    //! Need temporary arrays for the differences between the value in every cell and
+    //! maximum/minimum in the neighboring cells.
+    RDouble *dmin = new RDouble [nIFace];
+    RDouble *dmax = new RDouble [nIFace];
+
+    // Find the the differences for q
+    MinMaxDiffINF(grid, ig, dmin, dmax, q, m);
+
+    RDouble4D &gxfn = * (grid->GetFaceNormalX());
+    RDouble4D &gyfn = * (grid->GetFaceNormalY());
+    RDouble4D &gzfn = * (grid->GetFaceNormalZ());
+
+    RDouble dx, dy, dz, ds, dot;
+    RDouble dq_face, eps, tmp;
+
+    RDouble xcc, ycc, zcc, xfc, yfc, zfc, xfn, yfn, zfn;
+
+    RDouble venkatCoeff = 1.0e-5;
+    GlobalDataBase::GetData("venkatCoeff", &venkatCoeff, PHDOUBLE, 1);
+
+    int ndim = GetDim();
+    int id = 1;
+    int jd = 1;
+    int kd = 1;
+    if (ndim == TWO_D) kd = 0;
+
+    int ndmax = 6;
+    if (ndim == TWO_D) ndmax = 4;
+
+    int idx[6], jdx[6], kdx[6], ndx[6], ipn[6];
+
+    //! Find the maximum and minimum in the neighbor of each cell.
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        int is, js, ks;
+        fgrid->GetSourceIndexIJK(iFace, ig + 1, is, js, ks);
+        fgrid->RemapMultigridIJK(level, is, js, ks);
+
+        grid->CenterCoor(is, js, ks, xcc, ycc, zcc);
+
+        idx[0] = is;
+        jdx[0] = js;
+        kdx[0] = ks;
+        ndx[0] = 1;
+        ipn[0] = -1;
+
+        idx[1] = is + id;
+        jdx[1] = js;
+        kdx[1] = ks;
+        ndx[1] = 1;
+        ipn[1] = 1;
+
+        idx[2] = is;
+        jdx[2] = js;
+        kdx[2] = ks;
+        ndx[2] = 2;
+        ipn[2] = -1;
+
+        idx[3] = is;
+        jdx[3] = js + jd;
+        kdx[3] = ks;
+        ndx[3] = 2;
+        ipn[3] = 1;
+
+        if (ndim == THREE_D)
+        {
+            idx[4] = is;
+            jdx[4] = js;
+            kdx[4] = ks;
+            ndx[4] = 3;
+            ipn[4] = -1;
+
+            idx[5] = is;
+            jdx[5] = js;
+            kdx[5] = ks + kd;
+            ndx[5] = 3;
+            ipn[5] = 1;
+        }
+
+        for (int n = 0; n < ndmax; ++ n)
+        {
+            grid->FaceCoor(idx[n], jdx[n], kdx[n], ndx[n], xfc, yfc, zfc);
+
+            xfn = gxfn(idx[n], jdx[n], kdx[n], ndx[n]);
+            yfn = gyfn(idx[n], jdx[n], kdx[n], ndx[n]);
+            zfn = gzfn(idx[n], jdx[n], kdx[n], ndx[n]);
+
+            dx = xfc - xcc;
+            dy = yfc - ycc;
+            dz = zfc - zcc;
+            dq_face = dqdx[iFace] * dx + dqdy[iFace] * dy + dqdz[iFace] * dz;
+
+            ds = sqrt(dx * dx + dy * dy + dz * dz);
+            dot = ipn[n] * (xfn * dx + yfn * dy + zfn * dz) / (ds + SMALL);
+
+            if (dot < 0.0) limit[iFace] = 0.0;
+
+            eps = venkatCoeff * ds;
+            eps = eps * eps * eps;
+
+            if (dq_face > SMALL)
+            {
+                tmp = VenFun(dmax[iFace], dq_face, eps);
+                limit[iFace] = MIN(limit[iFace], tmp);
+            }
+            else if (dq_face < - SMALL)
+            {
+                tmp = VenFun(dmin[iFace], dq_face, eps);
+                limit[iFace] = MIN(limit[iFace], tmp);
+            }
+        }
+    }
+    delete [] dmin;
+    delete [] dmax;
+}
+
+void EncodeIJK(int &index, int i, int j, int k, int ni, int nj)
+{
+    index = (i - 1) + (j - 1) * ni + (k - 1) * (ni * nj);
+}
+
+void DecodeIJK(int index, int &i, int &j, int &k, int ni, int nj)
+{
+    k = index / (ni * nj) + 1;
+    index -= (k - 1) * ni * nj;
+    j = index / ni + 1;
+    i = index - (j - 1) * ni + 1;
+}
+
+void GetIJKRegion(const Range &I, const Range &J, const Range &K, int &ist, int &ied, int &jst, int &jed, int &kst, int &ked)
+{
+    ist = I.first();
+    ied = I.last();
+    jst = J.first();
+    jed = J.last();
+    kst = K.first();
+    ked = K.last();
+}
+
+void GetNsurfIndex(int nsurf, int &i, int &j, int &k)
+{
+    i = mide[0][nsurf-1];
+    j = mide[1][nsurf-1];
+    k = mide[2][nsurf-1];
+}
+
+void GetRange(int ni, int nj, int nk, int startShift, int endShift, Range &I, Range &J, Range &K)
+{
+    I.setRange(1 + startShift, ni + endShift);
+    J.setRange(1 + startShift, nj + endShift);
+    K.setRange(1 + startShift, nk + endShift);
+
+    if (nk == 1)
+    {
+        K.setRange(1, 1);
+    }
+
+    return;
+}
+
+void GetRange(Range &I, Range &J, Range &K, int ist, int ied, int jst, int jed, int kst, int ked)
+{
+    I.setRange(ist, ied);
+    J.setRange(jst, jed);
+    K.setRange(kst, ked);
+
+    return;
+}
+
+void StructGrid::SetOrdinaryGridIndex(int ordinaryGridIndexIn)
+{
+    this->ordinaryGridIndex = ordinaryGridIndexIn;
+}
+
+void StructGrid::SetOrdinaryDimStartIndex(int *ordinaryDimStartIndexIn)
+{
+    for (int iDim = 0; iDim < THREE_D; ++ iDim)
+    {
+        this->ordinaryDimStartIndex[iDim] = ordinaryDimStartIndexIn[iDim];
+    }
+}
+
+void StructGrid::SetOrdinaryDimEndIndex(int *ordinaryDimEndIndexIn)
+{
+    for (int iDim = 0; iDim < THREE_D; ++ iDim)
+    {
+        this->ordinaryDimEndIndex[iDim] = ordinaryDimEndIndexIn[iDim];
+    }
+}
+
+int StructGrid::GetOrdinaryGridIndex()
+{
+    return this->ordinaryGridIndex;
+}
+
+RDouble StructGrid::GetPartialCFL()
+{
+    return this->partialCFL;
+}
+
+int *StructGrid::GetOrdinaryDimStartIndex()
+{
+    return ordinaryDimStartIndex;
+}
+
+int *StructGrid::GetOrdinaryDimEndIndex()
+{
+    return ordinaryDimEndIndex;
+}
+
+void StructGrid::GetOrdinaryNodeIndex(int iIndexIn, int jIndexIn,int kIndexIn,int &iOrdinaryIndexOut,int &jOrdinaryIndexOut,int &kOrdinaryIndexOut)
+{
+    int ii, jj, kk;
+    ii = ordinaryDimStartIndex[0] - 1;
+    jj = ordinaryDimStartIndex[0] - 1;
+    kk = ordinaryDimStartIndex[0] - 1;
+
+    iOrdinaryIndexOut = ii + iIndexIn;
+    jOrdinaryIndexOut = ii + jIndexIn;
+    kOrdinaryIndexOut = ii + kIndexIn;
+}
+
+void StructGrid::GetOrdinaryCellIndex(int iIndexIn, int jIndexIn,int kIndexIn,int &iOrdinaryIndexOut,int &jOrdinaryIndexOut,int &kOrdinaryIndexOut)
+{
+    int ii, jj, kk;
+    ii = ordinaryDimStartIndex[0] - 1;
+    jj = ordinaryDimStartIndex[0] - 1;
+    kk = ordinaryDimStartIndex[0] - 1;
+
+    iOrdinaryIndexOut = ii + iIndexIn;
+    jOrdinaryIndexOut = ii + jIndexIn;
+    kOrdinaryIndexOut = ii + kIndexIn;
+}
+
+void StructGrid::GetLocalIndex(int gp, int &ip, int &jp, int &kp) const
+{
+    int zoneStartPointLabel = GetZoneStartPointLabel();
+    int ni = nodeTopology->GetNI();
+    int nj = nodeTopology->GetNJ();
+    int mm = ni * nj;
+    int ms = gp - zoneStartPointLabel;
+    kp = ms / mm;
+    int other = ms % mm;
+    jp = other / ni;
+    ip = other % ni;
+}
+
+LIB_EXPORT RDouble3D * StructGrid::GetLargestLocalGridLength()
+{
+    if (!cellMetrics->GetLargestLocalGridLength())
+    {
+        ComputeLargestLocalGridLength();
+    }
+    return cellMetrics->GetLargestLocalGridLength();
+}
+
+LIB_EXPORT RDouble3D * StructGrid::GetSmallestLocalGridLength()
+{
+    if (!cellMetrics->GetSmallestLocalGridLength())
+    {
+        ComputeSmallestLocalGridLength();
+    }
+    return cellMetrics->GetSmallestLocalGridLength();
+}
+
+LIB_EXPORT RDouble3D * StructGrid::GetSubgridLength()
+{
+    if (!cellMetrics->GetSubgridLength())
+    {
+        ComputeSubgridLength();
+    }
+    return cellMetrics->GetSubgridLength();
+}
+
+void StructGrid::ComputeLargestLocalGridLength()
+{
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble3D *xcc = this->GetCellCenterX();
+    RDouble3D *ycc = this->GetCellCenterY();
+    RDouble3D *zcc = this->GetCellCenterZ();
+
+    RDouble3D *largestLocalGridLength = new RDouble3D(I, J, K, fortranArray);
+    PHSPACE::SetField(largestLocalGridLength, -LARGE, ist, ied, jst, jed, kst, ked);
+
+    RDouble dist = 0.0;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                if (i < ied)
+                {
+                    dist = DISTANCE((*xcc)(i, j, k) - (*xcc)(i+1, j, k), (*ycc)(i, j, k) - (*ycc)(i+1, j, k), (*zcc)(i, j, k) - (*zcc)(i+1, j, k));
+                    (*largestLocalGridLength)(i,   j, k) = MAX((*largestLocalGridLength)(i,   j, k), dist);
+                    (*largestLocalGridLength)(i+1, j, k) = MAX((*largestLocalGridLength)(i+1, j, k), dist);
+                }
+                if (j < jed)
+                {
+                    dist = DISTANCE((*xcc)(i, j, k) - (*xcc)(i, j+1, k), (*ycc)(i, j, k) - (*ycc)(i, j+1, k), (*zcc)(i, j, k) - (*zcc)(i, j+1, k));
+                    (*largestLocalGridLength)(i, j,   k) = MAX((*largestLocalGridLength)(i, j,   k), dist);
+                    (*largestLocalGridLength)(i, j+1, k) = MAX((*largestLocalGridLength)(i, j+1, k), dist);
+                }
+                if (k < ked)
+                {
+                    dist = DISTANCE((*xcc)(i, j, k) - (*xcc)(i, j, k+1), (*ycc)(i, j, k) - (*ycc)(i, j, k+1), (*zcc)(i, j, k) - (*zcc)(i, j, k+1));
+                    (*largestLocalGridLength)(i, j,   k) = MAX((*largestLocalGridLength)(i, j,   k), dist);
+                    (*largestLocalGridLength)(i, j, k+1) = MAX((*largestLocalGridLength)(i, j, k+1), dist);
+                }
+            }
+        }
+    }
+    this->cellMetrics->SetLargestLocalGridLength(largestLocalGridLength);
+}
+
+void StructGrid::ComputeSmallestLocalGridLength()
+{
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble3D *xcc = this->GetCellCenterX();
+    RDouble3D *ycc = this->GetCellCenterY();
+    RDouble3D *zcc = this->GetCellCenterZ();
+
+    RDouble3D *smallestLocalGridLength = new RDouble3D(I, J, K, fortranArray);
+    PHSPACE::SetField(smallestLocalGridLength, LARGE, ist, ied, jst, jed, kst, ked);
+
+    RDouble dist = 0.0;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                if (i < ied)
+                {
+                    dist = DISTANCE((*xcc)(i, j, k) - (*xcc)(i+1, j, k), (*ycc)(i, j, k) - (*ycc)(i+1, j, k), (*zcc)(i, j, k) - (*zcc)(i+1, j, k));
+                    (*smallestLocalGridLength)(i,   j, k) = MIN((*smallestLocalGridLength)(i,   j, k), dist);
+                    (*smallestLocalGridLength)(i+1, j, k) = MIN((*smallestLocalGridLength)(i+1, j, k), dist);
+                }
+                if (j < jed)
+                {
+                    dist = DISTANCE((*xcc)(i, j, k) - (*xcc)(i, j+1, k), (*ycc)(i, j, k) - (*ycc)(i, j+1, k), (*zcc)(i, j, k) - (*zcc)(i, j+1, k));
+                    (*smallestLocalGridLength)(i, j,   k) = MIN((*smallestLocalGridLength)(i, j,   k), dist);
+                    (*smallestLocalGridLength)(i, j+1, k) = MIN((*smallestLocalGridLength)(i, j+1, k), dist);
+                }
+                if (k < ked)
+                {
+                    dist = DISTANCE((*xcc)(i, j, k) - (*xcc)(i, j, k+1), (*ycc)(i, j, k) - (*ycc)(i, j, k+1), (*zcc)(i, j, k) - (*zcc)(i, j, k+1));
+                    (*smallestLocalGridLength)(i, j,   k) = MIN((*smallestLocalGridLength)(i, j,   k), dist);
+                    (*smallestLocalGridLength)(i, j, k+1) = MIN((*smallestLocalGridLength)(i, j, k+1), dist);
+                }
+            }
+        }
+    }
+    this->cellMetrics->SetSmallestLocalGridLength(smallestLocalGridLength);
+}
+
+void StructGrid::ComputeSubgridLength()
+{
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    this->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble3D *walldist = this->GetWallDist();
+    RDouble3D *largestLocalGridLength = this->GetLargestLocalGridLength();
+    RDouble3D *smallestLocalGridLength = this->GetSmallestLocalGridLength();
+
+    RDouble3D *subgridLength = new RDouble3D(I, J, K, fortranArray);
+
+    const RDouble cw = 0.15;
+    RDouble wallDistance, largestLocalGridSpacing, smallestLocalGridSpacing, subgridLengthScale;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                wallDistance = (*walldist)(i, j, k);
+                largestLocalGridSpacing = (*largestLocalGridLength)(i, j, k);
+                smallestLocalGridSpacing = (*smallestLocalGridLength)(i, j, k);
+
+                //! The change ratio of the normal distance is ignored bellow!!! Re-consider it future!
+                subgridLengthScale = MIN(MAX(cw * MAX(wallDistance, largestLocalGridSpacing), smallestLocalGridSpacing), largestLocalGridSpacing);
+
+                (*subgridLength)(i, j, k) = subgridLengthScale;
+            }
+        }
+    }
+
+    this->cellMetrics->SetSubgridLength(subgridLength);
+}
+
+void StructGrid::InitVariableWallTemperature()
+{
+    fstream file;
+    string wallTemperatureFile = "";
+    GlobalDataBase::GetData("wallTemperaturefile", &wallTemperatureFile, PHSTRING, 1);
+    OpenFile(file, wallTemperatureFile, ios_base::in|ios_base::binary);
+
+    int dataNumber = 0;
+    PHRead(file, dataNumber);
+
+    int varNumber = 0;
+    PHRead(file, varNumber);
+
+    RDouble *pmin = this->GetMinBox();
+    RDouble *pmax = this->GetMaxBox();
+    vector < vector <RDouble> > dataInCurrentGrid;
+    dataInCurrentGrid.resize(0);
+
+    for (int iData = 0; iData < dataNumber; ++ iData)
+    {
+        float xCoor, yCoor, zCoor;
+        float tWall;
+
+        PHRead(file, xCoor);
+        PHRead(file, yCoor);
+        PHRead(file, zCoor);
+        PHRead(file, tWall);
+
+        RDouble coordX = (double)xCoor;
+        RDouble coordY = (double)yCoor;
+        RDouble coordZ = (double)zCoor;
+
+        if (coordX < pmin[0] || coordX > pmax[0]) continue;
+        if (coordY < pmin[1] || coordY > pmax[1]) continue;
+        if (coordZ < pmin[2] || coordZ > pmax[2]) continue;
+
+        vector <RDouble> currentData;
+        currentData.push_back(coordX);
+        currentData.push_back(coordY);
+        currentData.push_back(coordZ);
+        currentData.push_back((double)tWall);
+
+        dataInCurrentGrid.push_back(currentData);
+    }
+
+    CloseFile(file);
+
+    int dataNumberInCurrentGrid = static_cast<int>(dataInCurrentGrid.size());
+    if (dataNumberInCurrentGrid == 0)
+    {
+        return;
+    }
+
+    int *dataUsed = new int[dataNumberInCurrentGrid];
+    std::fill_n(dataUsed, dataNumberInCurrentGrid, 0);
+
+    RDouble3D &structx = * this->GetStructX();
+    RDouble3D &structy = * this->GetStructY();
+    RDouble3D &structz = * this->GetStructZ();
+    RDouble4D &faceArea= *(this->GetFaceArea());
+
+    StructBCSet *structBCSet = this->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!IsWall(BCType) && BCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+        Range I(ist, ied);
+        Range J(jst, jed);
+        Range K(kst, ked);
+        RDouble3D *wallTempArray = new RDouble3D(I, J, K, fortranArray);
+
+        int nk = GetNK();
+        int il1 = 1;
+        int jl1 = 1;
+        int kl1 = 1;
+        if (nk == 1) kl1 = 0;
+        int faceDirection = structBC->GetFaceDirection() + 1;
+
+        int il, jl, kl;
+
+        int findData = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    bool flag = false;
+
+                    int iWall, jWall, kWall;
+                    structBC->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+                    RDouble surfaceArea = faceArea(iWall, jWall, kWall, faceDirection);
+
+                    il = i + il1;
+                    jl = j + jl1;
+                    kl = k + kl1;
+                    vector <vector <RDouble> > nodeCoor;
+                    if (faceDirection == 1)
+                    {
+                        vector <RDouble> oneNode;
+                        oneNode.push_back(structx(i, j, k));
+                        oneNode.push_back(structy(i, j, k));
+                        oneNode.push_back(structz(i, j, k));
+                        nodeCoor.push_back(oneNode);
+
+                        oneNode.resize(0);
+                        oneNode.push_back(structx(i, jl, k));
+                        oneNode.push_back(structy(i, jl, k));
+                        oneNode.push_back(structz(i, jl, k));
+                        nodeCoor.push_back(oneNode);
+
+                        oneNode.resize(0);
+                        oneNode.push_back(structx(i, jl, kl));
+                        oneNode.push_back(structy(i, jl, kl));
+                        oneNode.push_back(structz(i, jl, kl));
+                        nodeCoor.push_back(oneNode);
+
+                        oneNode.resize(0);
+                        oneNode.push_back(structx(i, j, kl));
+                        oneNode.push_back(structy(i, j, kl));
+                        oneNode.push_back(structz(i, j, kl));
+                        nodeCoor.push_back(oneNode);
+                    }
+                    else if (faceDirection == 2)
+                    {
+                        vector <RDouble> oneNode;
+                        oneNode.push_back(structx(i, j, k));
+                        oneNode.push_back(structy(i, j, k));
+                        oneNode.push_back(structz(i, j, k));
+                        nodeCoor.push_back(oneNode);
+
+                        oneNode.resize(0);
+                        oneNode.push_back(structx(il, j, k));
+                        oneNode.push_back(structy(il, j, k));
+                        oneNode.push_back(structz(il, j, k));
+                        nodeCoor.push_back(oneNode);
+
+                        oneNode.resize(0);
+                        oneNode.push_back(structx(il, j, kl));
+                        oneNode.push_back(structy(il, j, kl));
+                        oneNode.push_back(structz(il, j, kl));
+                        nodeCoor.push_back(oneNode);
+
+                        oneNode.resize(0);
+                        oneNode.push_back(structx(i, j, kl));
+                        oneNode.push_back(structy(i, j, kl));
+                        oneNode.push_back(structz(i, j, kl));
+                        nodeCoor.push_back(oneNode);
+                    }
+                    else if (faceDirection == 3)
+                    {
+                        vector <RDouble> oneNode;
+                        oneNode.push_back(structx(i, j, k));
+                        oneNode.push_back(structy(i, j, k));
+                        oneNode.push_back(structz(i, j, k));
+                        nodeCoor.push_back(oneNode);
+
+                        oneNode.resize(0);
+                        oneNode.push_back(structx(il, j, k));
+                        oneNode.push_back(structy(il, j, k));
+                        oneNode.push_back(structz(il, j, k));
+                        nodeCoor.push_back(oneNode);
+
+                        oneNode.resize(0);
+                        oneNode.push_back(structx(il, jl, k));
+                        oneNode.push_back(structy(il, jl, k));
+                        oneNode.push_back(structz(il, jl, k));
+                        nodeCoor.push_back(oneNode);
+
+                        oneNode.resize(0);
+                        oneNode.push_back(structx(i, jl, k));
+                        oneNode.push_back(structy(i, jl, k));
+                        oneNode.push_back(structz(i, jl, k));
+                        nodeCoor.push_back(oneNode);
+                    }
+
+                    for (int iData = 0; iData < dataNumberInCurrentGrid; ++ iData)
+                    {
+                        if (dataUsed[iData])
+                        {
+                            continue;
+                        }
+
+                        RDouble coordX = dataInCurrentGrid[iData][0];
+                        RDouble coordY = dataInCurrentGrid[iData][1];
+                        RDouble coordZ = dataInCurrentGrid[iData][2];
+
+                        vector <vector <RDouble> > lineVec;
+                        lineVec.resize(4);
+
+                        for (int iNode = 0; iNode < 4; ++ iNode)
+                        {
+                            RDouble dx = nodeCoor[iNode][0] - coordX;
+                            RDouble dy = nodeCoor[iNode][1] - coordY;
+                            RDouble dz = nodeCoor[iNode][2] - coordZ;
+
+                            lineVec[iNode].push_back(dx);
+                            lineVec[iNode].push_back(dy);
+                            lineVec[iNode].push_back(dz);
+                        }
+
+                        RDouble areaSum = 0.0;
+                        for (int iTri = 0; iTri < 4; ++ iTri)
+                        {
+                            int lineIndex1 =  iTri;
+                            int lineIndex2 = (iTri + 1) % 4;
+
+                            RDouble p[3];
+                            CrossProduct(&lineVec[lineIndex1][0], &lineVec[lineIndex2][0], p);
+                            RDouble areaCurrent = DISTANCE(p[0], p[1], p[2]);
+
+                            areaSum += ABS(areaCurrent);
+                        }
+
+                        areaSum = half * areaSum;
+
+                        RDouble eps = (areaSum - surfaceArea) / surfaceArea;
+                        if (ABS(eps) < 1e-4)
+                        {
+                            flag = true;
+                        }
+
+                        if (flag)
+                        {
+                            dataUsed[iData] = 1;
+                            RDouble tWall = dataInCurrentGrid[iData][3];
+                            (*wallTempArray)(i, j, k) = tWall;
+                            findData ++;
+                            break;
+                        }
+                    }
+                }
+            }
+        }
+
+        /*int dataSize = (ied - ist + 1)
+                     * (jed - jst + 1)
+                     * (ked - kst + 1);
+
+        if (dataSize != findData)
+        {
+            WriteLogFile("Error !!!!");
+        }*/
+
+        structBC->UpdateFieldDataPtr("wallTempArray" , wallTempArray);
+    }
+
+    delete []dataUsed;
+}
+
+void CompNodeVar(Grid *grid_in, RDouble4D &qn, int m, RDouble4D &q, int n, bool isVelocityForPostVisual)
+{
+    StructGrid *grid = StructGridCast(grid_in);
+    int nk = grid->GetNK();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetNodeIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int il1 = 1;
+    int jl1 = 1;
+    int kl1 = 1;
+    if (nk == 1) kl1 = 0;
+
+    int il, jl, kl;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                il = i - il1;
+                jl = j - jl1;
+                kl = k - kl1;
+                qn(i, j, k, m) = eighth * (q(il, jl, kl, n) + q(il, j, kl, n) + q(i, jl, kl, n) + q(i, j, kl, n) +
+                                           q(il, jl, k,  n) + q(il, j, k , n) + q(i, jl, k,  n) + q(i, j, k,  n));
+            }
+        }
+    }
+
+    if (!isVelocityForPostVisual)
+    {
+        return;
+    }
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int bctype = bcregion->GetBCType();
+
+        if (!IsWall(bctype) && bctype != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        int nsurf = bcregion->GetFaceDirection() + 1;
+
+        int iNode, jNode, kNode;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    bcregion->GetBoundaryFaceIndex(i, j, k, iNode, jNode, kNode);
+
+                    il = iNode + il1;
+                    jl = jNode + jl1;
+                    kl = kNode + kl1;
+
+                    if (nsurf == 1)
+                    {
+                        qn(iNode, jNode, kNode, m) = q(i, j, k, n);
+                        qn(iNode, jl   , kNode, m) = q(i, j, k, n);
+                        qn(iNode, jl   , kl   , m) = q(i, j, k, n);
+                        qn(iNode, jNode, kl   , m) = q(i, j, k, n);
+                    }
+                    else if (nsurf == 2)
+                    {
+                        qn(iNode, jNode, kNode, m) = q(i, j, k, n);
+                        qn(il   , jNode, kNode, m) = q(i, j, k, n);
+                        qn(il   , jNode, kl   , m) = q(i, j, k, n);
+                        qn(iNode, jNode, kl   , m) = q(i, j, k, n);
+                    }
+                    else if (nsurf == 3)
+                    {
+                        qn(iNode, jNode, kNode, m) = q(i, j, k, n);
+                        qn(il   , jNode, kNode, m) = q(i, j, k, n);
+                        qn(il   , jl   , kNode, m) = q(i, j, k, n);
+                        qn(iNode, jl   , kNode, m) = q(i, j, k, n);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void CompNodeVar(Grid *grid_in, RDouble4D &qn, int m, RDouble3D &q)
+{
+    StructGrid *grid = StructGridCast(grid_in);
+    int nk = grid->GetNK();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetNodeIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int il1 = 1;
+    int jl1 = 1;
+    int kl1 = 1;
+    if (nk == 1) kl1 = 0;
+
+    int il, jl, kl;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                il = i - il1;
+                jl = j - jl1;
+                kl = k - kl1;
+                qn(i, j, k, m) = eighth * (q(il, jl, kl) + q(il, j, kl) + q(i, jl, kl) + q(i, j, kl) +
+                                           q(il, jl, k) + q(il, j, k) + q(i, jl, k) + q(i, j, k));
+            }
+        }
+    }
+}
+
+void GetIJKROT(int ijk[4][3], int *irot, int *jrot, int *krot)
+{
+    ijk[0][0] = 0;
+    ijk[0][1] = 0;
+    ijk[0][2] = 0;
+
+    ijk[1][0] = 0;
+    ijk[1][1] = 1;
+    ijk[1][2] = 0;
+
+    ijk[2][0] = 0;
+    ijk[2][1] = 1;
+    ijk[2][2] = 1;
+
+    ijk[3][0] = 0;
+    ijk[3][1] = 0;
+    ijk[3][2] = 1;
+
+    irot[0] = 0;
+    jrot[0] = 1;
+    krot[0] = 2;
+
+    irot[1] = 1;
+    jrot[1] = 0;
+    krot[1] = 2;
+
+    irot[2] = 1;
+    jrot[2] = 2;
+    krot[2] = 0;
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/Geo_UnstructBC.cpp b/API/Geometry/src/Geo_UnstructBC.cpp
new file mode 100644
index 0000000..a0859f5
--- /dev/null
+++ b/API/Geometry/src/Geo_UnstructBC.cpp
@@ -0,0 +1,18 @@
+#include "Geo_UnstructBC.h"
+#include "TK_Exit.h"
+
+namespace PHSPACE
+{
+    SimpleBC * UnstructBCSet::GetBoundaryCondition() const 
+    {
+        if (!this->boundaryCondition)
+        {
+            TK_Exit::ExceptionExit("Error: boundary file of .bc does not exit!");
+            return this->boundaryCondition;
+        }
+        else
+        {
+            return this->boundaryCondition;
+        }
+    }
+}
diff --git a/API/Geometry/src/Geo_UnstructGrid.cpp b/API/Geometry/src/Geo_UnstructGrid.cpp
new file mode 100644
index 0000000..46d92a3
--- /dev/null
+++ b/API/Geometry/src/Geo_UnstructGrid.cpp
@@ -0,0 +1,11760 @@
+#include <list>
+#include "cgnslib.h"
+#include "GridType.h"
+#include "Geo_FaceTopo_Unstruct.h"
+#include "Geo_NodeTopo_Unstruct.h"
+#include "LinkStruct.h"
+#include "PHMatrix.h"
+#include "Glb_Dimension.h"
+#include "Constants.h"
+#include "Math_Limiter.h"
+#include "PHIO.h"
+#include "HyList.h"
+#include "GRHash.h"
+#include "TK_Exit.h"
+#include "Geo_UnstructBC.h"
+#include "Geo_GridManager.h"
+#include "Geo_Interface.h"
+#include "Geo_Interpoint.h"
+#include "Geo_FaceMetrics_Unstruct.h"
+#include "Geo_CellMetrics_Unstruct.h"
+#include "Geo_DynamicGridMetrics_Unstruct.h"
+#include "Geo_LSQWeight_Unstruct.h"
+#include "MeshAgglomeration.h"
+#include "FieldProxy.h"
+#include "Geo_UnstructGrid.h"
+#include "Geo_StructGrid.h"
+#include "TK_Log.h"
+#include "PHHeapSort.h"
+#include "../../../CFD/Solver/include/CFDSolver.h"
+using namespace std;
+#pragma warning (disable:4100)
+#pragma warning (disable:913)
+namespace PHSPACE
+{
+struct linkbase
+{
+    int ic;
+    struct linkbase *next;
+};
+
+Connectivity::Connectivity()
+{
+    data  = 0;
+    index = 0;
+    n     = 0;
+}
+
+Connectivity::~Connectivity()
+{
+    delete [] data;
+    delete [] index;
+}
+
+UnstructGrid * UnstructGridCast(Grid *grid_in)
+{
+    if (!grid_in) return NULL;
+
+    if (grid_in->Type() == PHSPACE::STRUCTGRID)
+    {
+        StructGrid *strGrid = StructGridCast(grid_in);
+        return strGrid->GetUnstrGrid();
+    }
+    return static_cast<UnstructGrid *>(grid_in);
+}
+
+LIB_EXPORT UnstructGrid::UnstructGrid()
+{
+    wallCellLabel = NULL;
+    unstructBCSet = NULL;
+    cell2coarsegridcell  = 0;
+    averageVolume = -1.0;
+    zoneProbesCellID.resize(0);
+    normalDistanceC2C = NULL;
+    lineTopology = NULL;
+    gridManager = NULL;
+    iBlank = NULL;
+    walldistNode = NULL;
+    JacOrder    =   1; //GMRESJac1st
+    nearestwallfacenormalx = NULL;
+    nearestwallfacenormaly = NULL;
+    nearestwallfacenormalz = NULL;
+
+#ifdef USE_INCOMSOLVER
+    cellCenterVector = NULL;
+    faceNormalVector = NULL;
+    localCell2GlobalMap = NULL;
+    localCell2LocalMap = NULL;
+    cell2ZoneIDMap = NULL;
+#endif
+
+    ordinaryGridIndex = -1;
+    ordinaryNodeIndex = NULL;
+    ordinaryFaceIndex = NULL;
+    ordinaryCellIndex = NULL;
+}
+
+LIB_EXPORT UnstructGrid::~UnstructGrid()
+{
+    if (nodeTopology != NULL)
+    {
+        delete nodeTopology;
+        nodeTopology = NULL;
+    }
+    if (faceTopology != NULL)
+    {
+        delete faceTopology;
+        faceTopology = NULL;
+    }
+    if (cellTopology != NULL)
+    {
+        delete cellTopology;
+        cellTopology = NULL;
+    }
+
+    if (faceMetrics != NULL)
+    {
+        delete faceMetrics;
+        faceMetrics = NULL;
+    }
+    if (cellMetrics != NULL)
+    {
+        delete cellMetrics;
+        cellMetrics = NULL;
+    }
+    if (dynamicGridMetrics != NULL)
+    {
+        delete dynamicGridMetrics;
+        dynamicGridMetrics = NULL;
+    }
+    if (leastSquareWeights != NULL)
+    {
+        delete leastSquareWeights;
+        leastSquareWeights = NULL;
+    }
+
+    if (gridManager != NULL)
+    {
+        delete gridManager;
+        gridManager = NULL;
+    }
+    //if (iBlank != NULL)
+    //{
+    //    delete []iBlank;
+    //    iBlank = NULL;
+    //}
+
+    delete cell2cell_connectivity;
+
+    DelPointer(walldist);
+
+    if (nearestwallfacenormalx != NULL)
+    {
+        DelPointer(nearestwallfacenormalx);
+        nearestwallfacenormalx = NULL;
+    }
+   
+    if (nearestwallfacenormaly != NULL)
+    {
+        DelPointer(nearestwallfacenormaly);
+        nearestwallfacenormaly = NULL;
+    }
+
+    if (nearestwallfacenormalz != NULL)
+    {
+        DelPointer(nearestwallfacenormalz);
+        nearestwallfacenormalz = NULL;
+    }
+
+    DelPointer(walldistNode);
+
+    delete [] lamdax;
+    delete [] lamday;
+    delete [] lamdaz;
+    delete [] knode;
+
+    if (bcr && IsFinestGrid())
+    {
+        int nBoundFace = this->GetNBoundFace();
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            delete bcr[iFace];
+        }
+        delete [] bcr;
+    }
+
+    boundaryPointLabel.clear();
+
+    if (wallCellLabel != NULL)
+    {
+        delete [] wallCellLabel;
+    }
+
+    delete [] cell2coarsegridcell;
+
+    if (unstructBCSet != NULL && IsFinestGrid())
+    {
+        delete unstructBCSet;
+        unstructBCSet = NULL;
+    }
+    zoneProbesCellID.clear();
+
+    if (normalDistanceC2C != NULL)
+    {
+        delete [] normalDistanceC2C;
+    }
+    if (lineTopology != NULL)
+    {
+        delete lineTopology;
+    }
+#ifdef USE_INCOMSOLVER
+    //! This is values for SIMPLE algorithm.
+    //! cellCenterVector container the three coordinates of the cells center. 
+    if (cellCenterVector != NULL)
+    {
+        delete cellCenterVector;
+    }
+
+    if (faceNormalVector != NULL)
+    {
+        delete faceNormalVector;
+    }
+
+    if (localCell2GlobalMap != NULL)
+    {
+        delete localCell2GlobalMap;
+    }
+    if (localCell2LocalMap != NULL)
+
+    {
+        delete localCell2LocalMap;
+    }
+
+    if (cell2ZoneIDMap != NULL)
+    {
+        delete cell2ZoneIDMap;
+    }
+#endif
+
+    if (ordinaryNodeIndex != NULL)
+    {
+        delete []ordinaryNodeIndex;
+    }
+
+    if (ordinaryFaceIndex != NULL)
+    {
+        delete []ordinaryFaceIndex;
+    }
+
+    if (ordinaryCellIndex != NULL)
+    {
+        delete []ordinaryCellIndex;
+    }
+}
+
+LIB_EXPORT void UnstructGrid::InitGrid(GridID *index, int level, int dim, int type)
+{
+    Grid::InitGrid(index, level, dim, UNSTRUCTGRID);
+    nodeTopology = new Geo_NodeTopo_Unstruct();
+    faceTopology = new Geo_FaceTopo_Unstruct();
+    cellTopology = new Geo_CellTopo_Unstruct();
+
+    faceMetrics = new Geo_FaceMetrics_Unstruct();
+    cellMetrics = new Geo_CellMetrics_Unstruct();
+    dynamicGridMetrics = new Geo_DynamicGridMetrics_Unstruct();
+    leastSquareWeights = new Geo_LSQWeight_Unstruct();
+
+    bcr = NULL;
+
+    cell2cell_connectivity = NULL;
+    fc2cL = NULL;
+    fc2cR = NULL;
+    walldist = NULL;
+
+    lamdax = NULL;
+    lamday = NULL;
+    lamdaz = NULL;
+    knode  = NULL;
+
+    iBlank = NULL;
+}
+
+LIB_EXPORT int * UnstructGrid::GetNodeNumberOfEachCell()
+{
+    if (!cellTopology->GetNodeNumberOfEachCell())
+    {
+        bool err = ComputeCellNodeTopo();
+        if (!err)
+        {
+            ComputeCell2Node();
+        }
+    }
+    return cellTopology->GetNodeNumberOfEachCell();
+}
+
+LIB_EXPORT int * UnstructGrid::GetCell2Node()
+{
+    if (!cellTopology->GetCell2Node()) 
+    {
+        bool err = ComputeCellNodeTopo();
+        if (!err)
+        {
+            ComputeCell2Node();
+        }
+    }
+    return cellTopology->GetCell2Node();
+}
+
+LIB_EXPORT bool UnstructGrid::ExistCell2Node()
+{
+    if (!cellTopology) return false;
+
+    if (!cellTopology->GetCell2Node())
+    {
+        return false;
+    }
+    return true;
+}
+
+LIB_EXPORT int ** UnstructGrid::GetCell2NodeArray()
+{
+    if (!cellTopology->GetCell2NodeArray()) 
+    {
+        ComputeCell2NodeArray();
+    }
+    return cellTopology->GetCell2NodeArray();
+}
+
+LIB_EXPORT int ** UnstructGrid::GetFace2NodeArray()
+{
+    if (!faceTopology->GetFace2NodeArray()) 
+    {
+        ComputeFace2NodeArray();
+    }
+    return faceTopology->GetFace2NodeArray();
+}
+
+LIB_EXPORT long long int * UnstructGrid::GetFace2NodeSubscript()
+{
+    if (!faceTopology->GetFace2NodeSubscript())
+    {
+        ComputeFace2NodeSubscript();
+    }
+    return faceTopology->GetFace2NodeSubscript();
+}
+
+LIB_EXPORT bool UnstructGrid::IsCell2NodeExist()
+{
+    if (cellTopology->GetCell2Node()) 
+    {
+        return true;
+    }else
+    {
+        return false;
+    }
+}
+
+int* UnstructGrid::GetWallCellLabel()
+{
+    if (wallCellLabel == NULL)
+    {
+        int * leftCellOfFace = this->GetLeftCellOfFace();
+        wallCellLabel = new int [nTotalCell];
+
+        for (int iCell = 0; iCell < nTotalCell; ++iCell)
+        {
+            wallCellLabel[iCell] = 0;
+        }
+
+        UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+        int nBCRegion = unstructBCSet->GetnBCRegion();
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+            int bcType = bcRegion->GetBCType();
+            if (IsWall(bcType))
+            {
+                vector<int>* faceIndex = bcRegion->GetFaceIndex();
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    // iFace is the face number in the set of faceIndex.
+                    int iFace = *iter;
+                    int le = leftCellOfFace[ iFace ];
+                    wallCellLabel[le] = 1;
+                }
+            }
+        }
+    }
+    return wallCellLabel;
+}
+
+void UnstructGrid::InitWallDist()
+{
+    int nTotalCell = this->GetNTotalCell();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotal = nBoundFace + nTotalCell;
+
+    this->walldist = new RDouble [nTotal];
+    this->nearestwallfacenormalx = new RDouble[nTotal];
+    this->nearestwallfacenormaly = new RDouble[nTotal];
+    this->nearestwallfacenormalz = new RDouble[nTotal];
+}
+
+ElementType UnstructGrid::CellFaceVertex(int  icel,
+                                              int *cell_vtx_edge,
+                                              int *cell_vtx_tria,
+                                              int *cell_vtx_quad)
+{
+    int  *nodeNumberOfEachFace = this->GetNodeNumberOfEachFace();
+    int **face2node            = this->GetFace2NodeArray();
+    int  *faceNumberOfEachCell = this->GetFaceNumberOfEachCell();
+    int **cell2face            = this->GetCell2Face();
+    int *leftCellOfFace        = this->GetLeftCellOfFace();
+
+    int n_edges = 0;
+    int n_trias = 0;
+    int n_quads = 0;
+    int nface   = faceNumberOfEachCell[icel];
+
+    for (int iface = 0; iface < nface; ++iface)
+    {
+        int face_id = cell2face[icel][iface];
+        int nvertex = nodeNumberOfEachFace[face_id];
+        if (nvertex == 2 && n_edges < 4)
+        {
+            if (cell_vtx_edge)
+            {
+                int leftindex = leftCellOfFace[face_id];
+                if (leftindex == icel)
+                {
+                    int nodeCount = 0;
+                    for (int vtx = 0; vtx < nvertex; vtx ++)
+                    {
+                        cell_vtx_edge[n_edges * 2 + nodeCount] = face2node[face_id][vtx];
+                        nodeCount ++;
+                    }
+                }
+                else
+                {
+                    int nodeCount = 0;
+                    for (int vtx = nvertex - 1; vtx >= 0; vtx --)
+                    {
+                        cell_vtx_edge[n_edges * 2 + nodeCount] = face2node[face_id][vtx];
+                        nodeCount ++;
+                    }
+                }
+            }
+            n_edges += 1;
+        }
+        else if (nvertex == 3 && n_trias < 4)
+        {
+            if (cell_vtx_tria)
+            {
+                for (int vtx = 0; vtx < nvertex; vtx++)
+                    cell_vtx_tria[n_trias * 3 + vtx] = face2node[face_id][vtx];
+            }
+            n_trias += 1;
+        }
+        else if (nvertex == 4 && n_quads < 6)
+        {
+            if (cell_vtx_quad)
+            {
+                for (int vtx = 0; vtx < nvertex; vtx++)
+                    cell_vtx_quad[n_quads * 4 + vtx] = face2node[face_id][vtx];
+            }
+            n_quads += 1;
+        }
+    }
+
+    ElementType cell_type = TYPE_NOT_CONSIDERED;
+    if (n_edges == 3)
+        cell_type = TYPE_FACE_TRIA;
+    else if (n_edges == 4)
+        cell_type = TYPE_FACE_QUAD;
+    else if (n_trias == 0 && n_quads == 6)
+        cell_type = TYPE_CELL_HEXA;
+    else if (n_trias == 2 && n_quads == 3)
+        cell_type = TYPE_CELL_PRISM;
+    else if (n_trias == 4)
+    {
+        if (n_quads == 0)
+            cell_type = TYPE_CELL_TETRA;
+        else if (n_quads == 1)
+            cell_type = TYPE_CELL_PYRAM;
+    }
+    return cell_type;
+}
+
+int UnstructGrid::nodal_from_cel_hexa(const int *cell_vtx_quad, int *cell_vtx_hexa)
+{
+    int vertex_id, face_id;
+    int ipass, direction;
+    int vtx_num, vtx_num_1, vtx_num_2;
+
+    bool warn_orient = false;
+
+    cell_vtx_hexa[0] = cell_vtx_quad[3];
+    cell_vtx_hexa[1] = cell_vtx_quad[2];
+    cell_vtx_hexa[2] = cell_vtx_quad[1];
+    cell_vtx_hexa[3] = cell_vtx_quad[0];
+
+    for (ipass = 0; ipass < 2; ipass++)
+    {
+        vtx_num_1 = cell_vtx_hexa[ipass * 2];
+        vtx_num_2 = cell_vtx_hexa[1 + (ipass * 2)];
+
+        direction = 0;
+
+        for (face_id = 1; face_id < 6; face_id++)
+        {
+            for (vertex_id = 0; vertex_id < 4; vertex_id++)
+            {
+                vtx_num = cell_vtx_quad[face_id * 4 + vertex_id];
+
+                if (vtx_num == vtx_num_1)
+                {
+                    if (cell_vtx_quad[face_id * 4 + ((vertex_id + 1) % 4)] == vtx_num_2)
+                    {
+                        direction = 1;
+                        break;
+                    }
+                    else if (cell_vtx_quad[face_id * 4 + ((vertex_id - 1 + 4) % 4)] ==
+                        vtx_num_2)
+                    {
+                        direction = -1;
+                        break;
+                    }
+                }
+            }
+
+            if (direction != 0)
+                break;
+        }
+
+        if (direction == -1)
+            warn_orient = true;
+        else if (direction == 0)
+            return -1;
+
+        cell_vtx_hexa[4 + (ipass * 2)] =
+            cell_vtx_quad[face_id * 4 + ((vertex_id + (4 + (3 * direction))) % 4)];
+
+        cell_vtx_hexa[5 + (ipass * 2)] =
+            cell_vtx_quad[face_id * 4 + ((vertex_id + (4 + (2 * direction))) % 4)];
+    }
+
+    if (warn_orient == true)
+        return 0;
+    else
+        return 1;
+}
+
+int UnstructGrid::nodal_from_cel_prism(const int *cell_vtx_tria, const int *cell_vtx_quad, int *cell_vtx_prism)
+{
+    int vertex_id, face_id;
+    int ipass, direction;
+    int vtx_num, vtx_num_1, vtx_num_2;
+
+    bool warn_orient = false;
+
+    cell_vtx_prism[0] = cell_vtx_tria[2];
+    cell_vtx_prism[1] = cell_vtx_tria[1];
+    cell_vtx_prism[2] = cell_vtx_tria[0];
+
+    for (ipass = 0; ipass < 2; ipass++)
+    {
+        vtx_num_1 = cell_vtx_prism[ipass];
+        vtx_num_2 = cell_vtx_prism[1 + ipass];
+
+        direction = 0;
+
+        for (face_id = 0; face_id < 4; face_id++)
+        {
+            for (vertex_id = 0; vertex_id < 4; vertex_id++)
+            {
+                vtx_num = cell_vtx_quad[face_id * 4 + vertex_id];
+
+                if (vtx_num == vtx_num_1)
+                {
+                    if (cell_vtx_quad[face_id * 4 + ((vertex_id + 1) % 4)] == vtx_num_2)
+                    {
+                        direction = 1;
+                        break;
+                    }
+                    else if (cell_vtx_quad[face_id * 4 + ((vertex_id - 1 + 4) % 4)] ==
+                        vtx_num_2)
+                    {
+                        direction = -1;
+                        break;
+                    }
+                }
+            }
+
+            if (direction != 0)
+                break;
+        }
+
+        if (direction == -1)
+            warn_orient = true;
+        else if (direction == 0)
+            return -1;
+
+        cell_vtx_prism[3 + ipass] =
+            cell_vtx_quad[face_id * 4 + ((vertex_id + (4 + (3 * direction))) % 4)];
+
+        cell_vtx_prism[4 + ipass] =
+            cell_vtx_quad[face_id * 4 + ((vertex_id + (4 + (2 * direction))) % 4)];
+    }
+
+    if (warn_orient == true)
+        return 0;
+    else
+        return 1;
+}
+
+int UnstructGrid::nodal_from_cel_pyram(const int *cell_vtx_tria, const int *cell_vtx_quad, int *cell_vtx_pyram)
+{
+    int vertex_id, face_id;
+    int direction;
+    int vtx_num, vtx_num_1, vtx_num_2;
+
+    bool warn_orient = false;
+
+    cell_vtx_pyram[0] = cell_vtx_quad[3];
+    cell_vtx_pyram[1] = cell_vtx_quad[2];
+    cell_vtx_pyram[2] = cell_vtx_quad[1];
+    cell_vtx_pyram[3] = cell_vtx_quad[0];
+
+    vtx_num_1 = cell_vtx_pyram[0];
+    vtx_num_2 = cell_vtx_pyram[1];
+
+    direction = 0;
+
+    for (face_id = 0; face_id < 4; face_id++)
+    {
+        for (vertex_id = 0; vertex_id < 3; vertex_id++)
+        {
+            vtx_num = cell_vtx_tria[face_id * 3 + vertex_id];
+
+            if (vtx_num == vtx_num_1)
+            {
+                if (cell_vtx_tria[face_id * 3 + ((vertex_id + 1) % 3)] == vtx_num_2)
+                {
+                    direction = 1;
+                    break;
+                }
+                else if (cell_vtx_tria[face_id * 3 + ((vertex_id - 1 + 3) % 3)] == vtx_num_2)
+                {
+                    direction = -1;
+                    break;
+                }
+            }
+        }
+
+        if (direction != 0)
+            break;
+    }
+
+    if (direction == -1)
+        warn_orient = true;
+    else if (direction == 0)
+        return -1;
+
+    cell_vtx_pyram[4] = cell_vtx_tria[face_id * 3 + ((vertex_id + (3 + (2 * direction))) % 3)];
+
+    if (warn_orient == true)
+        return 0;
+    else
+        return 1;
+}
+
+int UnstructGrid::nodal_from_cel_tetra(const int *cell_vtx_tria, int *cell_vtx_tetra)
+{
+    int vertex_id, face_id;
+    int direction;
+    int vtx_num, vtx_num_1, vtx_num_2;
+
+    bool warn_orient = false;
+
+    cell_vtx_tetra[0] = cell_vtx_tria[2];
+    cell_vtx_tetra[1] = cell_vtx_tria[1];
+    cell_vtx_tetra[2] = cell_vtx_tria[0];
+
+    vtx_num_1 = cell_vtx_tetra[0];
+    vtx_num_2 = cell_vtx_tetra[1];
+
+    direction = 0;
+
+    for (face_id = 1; face_id < 4; face_id++)
+    {
+        for (vertex_id = 0; vertex_id < 3; vertex_id++)
+        {
+            vtx_num = cell_vtx_tria[face_id * 3 + vertex_id];
+            if (vtx_num == vtx_num_1)
+            {
+                if (cell_vtx_tria[face_id * 3 + ((vertex_id + 1) % 3)] == vtx_num_2)
+                {
+                    direction = 1;
+                    break;
+                }
+                else if (cell_vtx_tria[face_id * 3 + ((vertex_id - 1 + 3) % 3)] == vtx_num_2)
+                {
+                    direction = -1;
+                    break;
+                }
+            }
+        }
+        if (direction != 0)
+            break;
+    }
+
+    if (direction == -1)
+        warn_orient = true;
+    else if (direction == 0)
+        return -1;
+
+    cell_vtx_tetra[3] = cell_vtx_tria[face_id * 3 + ((vertex_id + (3 + (2 * direction))) % 3)];
+
+    if (warn_orient == true)
+        return 0;
+    else
+        return 1;
+}
+
+int UnstructGrid::nodal_from_face_quad(const int *cell_vtx_edge, int *cell_vtx_quad)
+{
+    int face_id;
+    int vtx_num_2;
+
+    cell_vtx_quad[0] = cell_vtx_edge[0];
+    cell_vtx_quad[1] = cell_vtx_edge[1];
+
+    vtx_num_2     = cell_vtx_quad[1];
+    int k         = 0;
+    int face_id_s = 0;
+    do
+    {
+        for (face_id = 1; face_id < 4; face_id++)
+        {
+            int vtx_num_t_1 = cell_vtx_edge[face_id * 2 + 0];
+            int vtx_num_t_2 = cell_vtx_edge[face_id * 2 + 1];
+
+            if (vtx_num_2 == vtx_num_t_1 && face_id != face_id_s)
+            {
+                cell_vtx_quad[k + 2] = vtx_num_t_2;
+                vtx_num_2            = cell_vtx_quad[k + 2];
+                k += 1;
+                face_id_s = face_id;
+                break;
+            }
+            else if (vtx_num_2 == vtx_num_t_2 && face_id != face_id_s)
+            {
+                cell_vtx_quad[k + 2] = vtx_num_t_1;
+                vtx_num_2            = cell_vtx_quad[k + 2];
+                k += 1;
+                face_id_s = face_id;
+                break;
+            }
+        }
+    }
+    while (k < 2);
+    return 1;
+}
+
+int UnstructGrid::nodal_from_face_tria(const int *cell_vtx_edge, int *cell_vtx_tria)
+{
+    int vertex_id, face_id;
+    int direction;
+    int vtx_num, vtx_num_1, vtx_num_2;
+
+    cell_vtx_tria[0] = cell_vtx_edge[0];
+    cell_vtx_tria[1] = cell_vtx_edge[1];
+
+    vtx_num_1 = cell_vtx_tria[0];
+    vtx_num_2 = cell_vtx_tria[1];
+    direction = 0;
+
+    for (face_id = 1; face_id < 3; face_id++)
+    {
+        for (vertex_id = 0; vertex_id < 2; vertex_id++)
+        {
+            vtx_num = cell_vtx_edge[face_id * 2 + vertex_id];
+            if (vtx_num == vtx_num_1 || vtx_num == vtx_num_2)
+            {
+                cell_vtx_tria[2] = cell_vtx_edge[face_id * 2 + (vertex_id + 1) % 2];
+                break;
+            }
+        }
+    }
+
+    return 1;
+}
+
+bool UnstructGrid::ComputeCellNodeTopo()
+{
+    if (this->GetLevel() > 0)
+    {
+        return false;
+    }
+
+    int  nTotalCell = this->GetNTotalCell();
+
+    //! Compute node number of each cell.
+    int *cellNodeNumber = new int[nTotalCell];
+    for (int iCell = 0; iCell < nTotalCell; iCell ++)
+    {
+        ElementType ele_t = CellFaceVertex(iCell, NULL, NULL, NULL);
+        switch (ele_t)
+        {
+        case TYPE_FACE_TRIA:
+            cellNodeNumber[iCell] = 3;
+            break;
+        case TYPE_FACE_QUAD:
+            cellNodeNumber[iCell] = 4;
+            break;
+        case TYPE_CELL_TETRA:
+            cellNodeNumber[iCell] = 4;
+            break;
+        case TYPE_CELL_PYRAM:
+            cellNodeNumber[iCell] = 5;
+            break;
+        case TYPE_CELL_PRISM:
+            cellNodeNumber[iCell] = 6;
+            break;
+        case TYPE_CELL_HEXA:
+            cellNodeNumber[iCell] = 8;
+            break;
+        case TYPE_NOT_CONSIDERED:
+            WriteLogFile("\n  Warning: The cell type in grid is not commom, do not dump flow field in Ensight file!\n");
+            PrintToWindow("\n  Warning: The cell type in grid is not commom, do not dump flow field in Ensight file!\n");
+            delete []cellNodeNumber;
+            return false;
+            break;
+        default:
+            cellNodeNumber[iCell] = 0;
+            break;
+        }
+    }
+    cellTopology->SetNodeNumberOfEachCell(cellNodeNumber);
+
+    //! Compute cell 2 node array
+    int **cellNodeIndexContainer = NewPointer2<int>(nTotalCell, cellNodeNumber);
+    int retcode;
+    int cell_vtx_edge[2 * 4];
+    int cell_vtx_tria[3 * 4];
+    int cell_vtx_quad[4 * 6];
+    for (int iCell = 0; iCell < nTotalCell; iCell ++)
+    {
+        ElementType ele_t = CellFaceVertex(iCell, cell_vtx_edge, cell_vtx_tria, cell_vtx_quad);
+        switch (ele_t)
+        {
+        case TYPE_FACE_TRIA:
+            retcode = nodal_from_face_tria(cell_vtx_edge, cellNodeIndexContainer[iCell]);
+            break;
+        case TYPE_FACE_QUAD:
+            retcode = nodal_from_face_quad(cell_vtx_edge, cellNodeIndexContainer[iCell]);
+            break;
+        case TYPE_CELL_TETRA:
+            retcode = nodal_from_cel_tetra(cell_vtx_tria, cellNodeIndexContainer[iCell]);
+            break;
+        case TYPE_CELL_PYRAM:
+            retcode = nodal_from_cel_pyram(cell_vtx_tria, cell_vtx_quad, cellNodeIndexContainer[iCell]);
+            break;
+        case TYPE_CELL_PRISM:
+            retcode = nodal_from_cel_prism(cell_vtx_tria, cell_vtx_quad, cellNodeIndexContainer[iCell]);
+            break;
+        case TYPE_CELL_HEXA:
+            retcode = nodal_from_cel_hexa(cell_vtx_quad, cellNodeIndexContainer[iCell]);
+            break;
+        default:
+            retcode = 0;
+            break;
+        }
+    }
+    cellTopology->SetCell2NodeArray(cellNodeIndexContainer);
+
+
+    //! Compute cell 2 node.
+    int nodeCount = 0;
+    for (int iCell = 0; iCell < nTotalCell; iCell ++)
+    {
+        nodeCount += cellNodeNumber[iCell];
+    }
+
+    int *cell2node = new int[nodeCount];
+    nodeCount = 0;
+    for (int iCell = 0; iCell < nTotalCell; iCell ++)
+    {
+        for (int iNode = 0; iNode < cellNodeNumber[iCell]; ++ iNode)
+        {
+            cell2node[nodeCount ++] = cellNodeIndexContainer[iCell][iNode];
+        }
+    }
+    cellTopology->SetCell2Node(cell2node);
+
+    return true;
+}
+
+void UnstructGrid::ComputeCell2NodeArray()
+{
+    if (!cellTopology->GetCell2Node()) 
+    {
+        bool err = ComputeCellNodeTopo();
+        if (!err)
+        {
+            ComputeCell2Node();
+        }
+        else
+        {
+            return;
+        }
+    }
+
+    int  nTotalCell     = this->GetNTotalCell();
+    int *cell2node      = this->GetCell2Node();
+    int *cellNodeNumber = this->GetNodeNumberOfEachCell();
+
+    int   nodeCount              = 0;
+    int **cellNodeIndexContainer = NewPointer2<int>(nTotalCell, cellNodeNumber);
+    for (int iCell = 0; iCell < nTotalCell; iCell ++)
+    {
+        for (int iNode = 0; iNode < cellNodeNumber[iCell]; ++ iNode)
+        {
+            cellNodeIndexContainer[iCell][iNode] = cell2node[nodeCount ++];
+        }
+    }
+    cellTopology->SetCell2NodeArray(cellNodeIndexContainer);
+}
+
+void UnstructGrid::ComputeCell2Node()
+{
+    set<int> *cell2node_set;
+    ComputeCell2Node(cell2node_set);
+
+    int nTotalCell = this->GetNTotalCell();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotal = nBoundFace + nTotalCell;
+
+    uint_t count = 0;
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        count += cell2node_set[iCell].size();
+    }
+
+    int * cell2node = new int [count];
+
+    int * npc = new int [nTotal];
+
+    count = 0;
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        npc[iCell] = static_cast<int>(cell2node_set[iCell].size());
+        for (set<int>::iterator iter = cell2node_set[iCell].begin(); iter != cell2node_set[iCell].end(); ++ iter)
+        {
+            cell2node[count ++] = (*iter);
+        }
+    }
+
+    cellTopology->SetNodeNumberOfEachCell(npc);
+    cellTopology->SetCell2Node(cell2node);
+
+    delete [] cell2node_set;
+}
+
+void UnstructGrid::ComputeCell2Node(set<int> *&cell2nodeSet)
+{
+    int nTotalCell = this->GetNTotalCell();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalFace = this->GetNTotalFace();
+    int nTotal = nBoundFace + nTotalCell;
+
+    int *leftCellOfFace  = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+
+    int *nodeNumberOfEachFace = this->GetNodeNumberOfEachFace();
+    int *face2node = this->GetFace2Node();
+
+    cell2nodeSet = new set<int>[nTotal];
+
+    int nodePosition = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace [ iFace ];
+        int re = rightCellOfFace[ iFace ];
+        for (int iNode = 0; iNode < nodeNumberOfEachFace[iFace]; ++ iNode)
+        {
+            if (le >= 0 && le < nTotalCell)
+            {
+                cell2nodeSet[le].insert(face2node[nodePosition + iNode]);
+            }
+
+            if (re >= 0 && re < nTotalCell)
+            {
+                //! The re is in the interior field.
+                cell2nodeSet[re].insert(face2node[nodePosition + iNode]);
+            }
+        }
+        nodePosition += nodeNumberOfEachFace[iFace];
+    }
+}
+
+void UnstructGrid::ComputeFace2NodeArray()
+{
+    int numberOfFaces = GetNTotalFace();
+
+    int *  nodeNumberOfEachFace = faceTopology->GetNodeNumberOfEachFace();
+    int *  face2Node            = faceTopology->GetFace2Node();
+    int ** face2NodeArray       = faceTopology->GetFace2NodeArray();
+
+    face2NodeArray = new int * [numberOfFaces];
+
+    face2NodeArray[0] = face2Node;
+    for (int iFace = 1; iFace < numberOfFaces; ++ iFace)
+    {
+        face2NodeArray[iFace] = &(face2NodeArray[iFace-1][nodeNumberOfEachFace[iFace-1]]);
+    }
+
+    faceTopology->SetFace2NodeArray(face2NodeArray);
+}
+
+
+void UnstructGrid::ComputeFace2NodeSubscript()
+{
+    int numberOfFaces = GetNTotalFace();
+
+    int *  nodeNumberOfEachFace = faceTopology->GetNodeNumberOfEachFace();
+    long long int *  face2NodeSubscript   = faceTopology->GetFace2NodeSubscript();
+
+    //! Considering that it is often used as follows.
+    //for (iFace = 0; iFace < nTotalFace; ++iFace){
+    //    g = f(face2NodeSubscript[iFace]) + f(face2NodeSubscript[iFace+1]);
+    //}
+    //! So we set the array length is numberOfFaces + 1.
+
+    face2NodeSubscript = new long long int[numberOfFaces + 1]; 
+
+    face2NodeSubscript[0] = 0;
+    for (int iFace = 1; iFace <= numberOfFaces; ++ iFace)
+    {
+        face2NodeSubscript[iFace] = face2NodeSubscript[iFace-1] + nodeNumberOfEachFace[iFace-1];
+    }
+
+    faceTopology->SetFace2NodeSubscript(face2NodeSubscript);
+}
+
+LIB_EXPORT vector<int> * UnstructGrid::GetCell2Cell()
+{
+    if (!cellTopology) return NULL;
+
+    if (!cellTopology->GetCell2Cell())
+    {
+        ComputeCell2Cell();
+    }
+
+    return cellTopology->GetCell2Cell();
+}
+#ifdef USE_GMRESSOLVER
+//! GMRESVis
+LIB_EXPORT vector<int> * UnstructGrid::GMRESGetNeighborCells()
+{
+    if (!cellTopology) return NULL;
+    return cellTopology->GMRESGetNeighborCells();
+}
+
+//! GMRESVis
+LIB_EXPORT vector<int> * UnstructGrid::GMRESGetNeighborFaces()
+{
+    if (!cellTopology) return NULL;
+    return cellTopology->GMRESGetNeighborFaces();
+}
+
+//! GMRESVis
+LIB_EXPORT vector<int> * UnstructGrid::GMRESGetNeighborLR()
+{
+    if (!cellTopology) return NULL;
+    return cellTopology->GMRESGetNeighborLR();
+}
+#endif
+
+void UnstructGrid::ComputeCell2Cell()
+{
+    int nTotalCell = this->GetNTotalCell();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalFace = this->GetNTotalFace();
+    int * leftCellOfFace = this->GetLeftCellOfFace();
+    int * rightCellOfFace = this->GetRightCellOfFace();
+
+    vector<int> * cell2cell = new vector<int>[ nTotalCell ];
+    int le,re;
+
+    //! If boundary is an INTERFACE, need to count ghost cell
+    UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        int taskType = GetTaskCode();
+
+        if (taskType != PARTITION_GRID)
+        {
+            UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+            int bcType = bcRegion->GetBCType();
+            if (IsInterface(bcType))
+            {
+                vector<int>* faceIndex = bcRegion->GetFaceIndex();
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    //! iFace is the face number in the set of faceIndex.
+                    int iFace = *iter;
+                    le      = leftCellOfFace[ iFace ];
+                    re      = iFace + nTotalCell;
+                    cell2cell[le].push_back(re);
+                }
+            }
+        }
+    }
+
+    //! Interior faces
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        cell2cell[le].push_back(re);
+        cell2cell[re].push_back(le);
+    }
+
+    cellTopology->SetCell2Cell(cell2cell);
+}
+
+#ifdef USE_GMRESSOLVER
+//! GMRESVis
+void UnstructGrid::ComputeNeighborinfo()
+{
+
+    int nTotalCell = this->GetNTotalCell();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotal     = nTotalCell + nBoundFace;
+    int nTotalFace = this->GetNTotalFace();
+    int *leftCellOfFace = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+
+    vector<int> * neighborCells     = new vector<int>[ nTotal ];
+    vector<int> * neighborFaces     = new vector<int>[ nTotal ];
+    vector<int> * neighborLR        = new vector<int>[ nTotal ];
+
+    //! GMRES2ndCorrection
+    vector<int> BCLeftCells;
+    vector<int> BCRightCells;
+    vector<int> BCFaces;
+
+    int le,re;
+
+    //! Boundary faces
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le      = leftCellOfFace[ iFace ];
+        re      = iFace + nTotalCell;
+        neighborCells[le].push_back(re);
+        neighborFaces[le].push_back(iFace);
+        neighborLR[le].push_back(1);
+
+        neighborCells[re].push_back(le);
+        neighborFaces[re].push_back(iFace);
+        neighborLR[re].push_back(-1);
+
+        //! GMRES2ndCorrection
+        BCLeftCells.push_back(le);
+        BCRightCells.push_back(re);
+        BCFaces.push_back(iFace);
+
+    }
+
+    //! Interior faces
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        neighborCells[le].push_back(re);
+        neighborFaces[le].push_back(iFace);
+        neighborLR[le].push_back(1);
+
+        neighborCells[re].push_back(le);
+        neighborFaces[re].push_back(iFace);
+        neighborLR[re].push_back(-1);
+    }
+
+
+    cellTopology->GMRESSetNeighborCells(neighborCells);
+    cellTopology->GMRESSetNeighborFaces(neighborFaces);
+    cellTopology->GMRESSetNeighborLR(neighborLR);
+
+    //! GMRES2ndCorrection
+    this->SetBCLeftCells(BCLeftCells);
+    this->SetBCRightCells(BCRightCells);
+    this->SetBCFaces(BCFaces);
+
+}
+#endif
+LIB_EXPORT int * UnstructGrid::GetFaceNumberOfEachCell()
+{
+    if (!cellTopology->GetFaceNumberOfEachCell())
+    {
+        ComputeCell2Face();
+    }
+    return cellTopology->GetFaceNumberOfEachCell();
+}
+
+LIB_EXPORT int ** UnstructGrid::GetCell2Face()
+{
+    if (!cellTopology->GetCell2Face())
+    {
+        ComputeCell2Face();
+    }
+
+    return cellTopology->GetCell2Face();
+}
+
+void UnstructGrid::ComputeCell2Face()
+{
+    int **cell2face = cellTopology->GetCell2Face();
+    
+    int nTotalCell = this->GetNTotalCell();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalFace = this->GetNTotalFace();
+
+    int *leftCellOfFace  = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+
+    vector<int> *vcell2face = new vector<int> [ nTotalCell ];
+    int le,re;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace[ iFace ];
+        vcell2face[le].push_back(iFace);
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [ iFace ];
+        re = rightCellOfFace[ iFace ];
+        vcell2face[le].push_back(iFace);
+        vcell2face[re].push_back(iFace);
+    }
+
+    int *face_number_of_each_cell = new int [nTotalCell];
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        face_number_of_each_cell[iCell] = static_cast<int>(vcell2face[iCell].size());
+    }
+
+    cell2face = NewPointer2<int>(nTotalCell, face_number_of_each_cell); 
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        for (std::size_t j = 0; j < vcell2face[iCell].size(); ++ j)
+        {
+            cell2face[iCell][j] = vcell2face[iCell][j];
+        }
+    }
+
+    delete [] vcell2face;
+
+    cellTopology->SetCell2Face(cell2face);
+    cellTopology->SetFaceNumberOfEachCell(face_number_of_each_cell);
+}
+
+LIB_EXPORT int * UnstructGrid::GetNumberOfNeighborCell() 
+{
+    if (!cellTopology->GetNumberOfNeighborCell())
+    {
+        ComputeNumberOfNeighborCell();
+    }
+    return cellTopology->GetNumberOfNeighborCell(); 
+}
+
+//calculate number_of_neighbor_cell(number of neighboring cells in each cell without including itself)
+void UnstructGrid::ComputeNumberOfNeighborCell()
+{
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalFace = this->GetNTotalFace();
+    int nTotalCell = this->GetNTotalCell();
+    int *leftCellOfFace  = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+    
+    UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    // Allocate memories for number of cells per cell
+    int * number_of_neighbor_cell = new int[ nTotalCell ];
+
+    // set number_of_neighbor_cell to be 0 without including itself
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        number_of_neighbor_cell[iCell] = 0;
+    }
+
+    int le = 0, re = 0;
+
+    // If boundary is an INTERFACE, need to count ghost cell
+    // Note: Symmetry???
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        if (IsInterface(bcType))
+        {
+            vector<int>* faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                // iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+                le      = leftCellOfFace[ iFace ];
+                number_of_neighbor_cell[le] ++;
+            }
+        }
+    }
+ 
+    // Interior faces
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [ iFace ];
+        re = rightCellOfFace[ iFace ];
+        number_of_neighbor_cell[le] ++;
+        number_of_neighbor_cell[re] ++;
+    }
+
+    cellTopology->SetNumberOfNeighborCell(number_of_neighbor_cell);
+}
+
+LIB_EXPORT Connectivity * UnstructGrid::GetCell2CellConnectivity()
+{
+    if (!cell2cell_connectivity)
+    {
+        ComputeCell2CellConnectivity();
+    }
+
+    return cell2cell_connectivity;
+}
+
+LIB_EXPORT int * UnstructGrid::GetCellNumberOfEachNode()
+{
+    if (!nodeTopology->GetCellNumberOfEachNode())
+    {
+        ComputeNode2Cell();
+    }
+    return nodeTopology->GetCellNumberOfEachNode();
+}
+
+LIB_EXPORT int * UnstructGrid::GetNode2Cell()
+{
+    if (!nodeTopology->GetNode2Cell())
+    {
+        ComputeNode2Cell();
+    }
+    return nodeTopology->GetNode2Cell();
+}
+
+LIB_EXPORT int ** UnstructGrid::GetNode2CellArray()
+{
+    if (!nodeTopology->GetNode2CellArray())
+    {
+        ComputeNode2CellArray();
+    }
+    return nodeTopology->GetNode2CellArray();
+
+}
+
+LIB_EXPORT RDouble * UnstructGrid::GetLargestLocalGridLength()
+{
+    if (!cellMetrics->GetLargestLocalGridLength())
+    {
+        ComputeLargestLocalGridLength();
+    }
+    return cellMetrics->GetLargestLocalGridLength();
+}
+
+LIB_EXPORT RDouble * UnstructGrid::GetSubgridLength()
+{
+    if (!cellMetrics->GetSubgridLength())
+    {
+        ComputeSubgridLength();
+    }
+    return cellMetrics->GetSubgridLength();
+}
+
+void UnstructGrid::computeBoundaryPointLabel()
+{
+    int* face2node = GetFace2Node();
+    int *node_number_of_each_face   = this->GetNodeNumberOfEachFace();
+
+    UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    int pt, bcType;
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; iFace++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        bcType    = bcRegion->GetBCType();
+        if (bcType != PHENGLEI::INTERFACE)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt = face2node[ nodepos + j ];
+                boundaryPointLabel.insert(pair<int,int>(pt,1));
+            }
+        }        
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; iFace++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        bcType    = bcRegion->GetBCType();
+        if (bcType == PHENGLEI::SYMMETRY)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt = face2node[ nodepos + j ];
+                boundaryPointLabel[pt] = PHENGLEI::SYMMETRY;
+            }
+        }        
+        nodepos += node_number_of_each_face[iFace];
+    }
+    nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; iFace++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        bcType    = bcRegion->GetBCType();
+
+        if (bcType == PHENGLEI::FARFIELD)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt = face2node[ nodepos + j ];
+                boundaryPointLabel[pt] = PHENGLEI::FARFIELD;
+            }
+        }        
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; iFace++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        bcType    = bcRegion->GetBCType();
+
+        if (bcType == PHENGLEI::SOLID_SURFACE)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt = face2node[ nodepos + j ];
+                boundaryPointLabel[pt] = PHENGLEI::SOLID_SURFACE;
+            }
+        }        
+        nodepos += node_number_of_each_face[iFace];
+    }
+}
+
+vector <int> & UnstructGrid::GetLocalToGlobalNodesMap()
+{
+    if (localToGlobalNodesMap.size() != 0) return localToGlobalNodesMap;
+
+    int numberOfNodesNow = GetNTotalNode();
+
+    localToGlobalNodesMap.resize(numberOfNodesNow);
+
+    for (int iNode = 0; iNode < numberOfNodesNow; ++ iNode)
+    {
+        localToGlobalNodesMap[iNode] = iNode;
+    }
+
+    return localToGlobalNodesMap;
+}
+
+vector <int> & UnstructGrid::GetBoundaryConditionType()
+{
+    if (boundaryConditionType.size() != 0) return boundaryConditionType;
+
+    boundaryConditionType.resize(nBoundFace);
+
+    UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcTypeOld = bcRegion->GetBCType();
+        vector<int>* faceIndex = bcRegion->GetFaceIndex();
+
+        if (bcTypeOld == PHENGLEI::INTERFACE)
+        {
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                // iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+                boundaryConditionType[iFace] = 0;
+            }
+        }
+        else if (bcTypeOld == PHENGLEI::SOLID_SURFACE)
+        {
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                // iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+                boundaryConditionType[iFace] = 1;
+            }
+        }
+        else if (bcTypeOld == PHENGLEI::OVERSET)
+        {
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                // iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+                boundaryConditionType[iFace] = 2;
+            }
+        }
+        else if (bcTypeOld == PHENGLEI::SYMMETRY)
+        {
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                // iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+                boundaryConditionType[iFace] = 3;
+            }
+        }
+        else 
+        {
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                // iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+                boundaryConditionType[iFace] = 9;
+            }
+        }
+    }
+
+    return boundaryConditionType;
+}
+
+//! Compute the minimum distance of the grid edges.
+LIB_EXPORT RDouble UnstructGrid::CalMinEdgeLength()
+{
+    if (this->minEdgeLength > 0.0)
+    {
+        return this->minEdgeLength;
+    }
+
+    minEdgeLength = PHSPACE::LARGE;
+
+    int * node_number_of_each_face = this->GetNodeNumberOfEachFace();
+    int * face2node = this->GetFace2Node();
+
+    int nodePosition = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        int nNode = node_number_of_each_face[iFace];
+        for (int iNode = 0; iNode < nNode; ++ iNode)
+        {
+            int node1 = face2node[nodePosition + iNode];
+            int node2 = face2node[nodePosition + (iNode + 1) % nNode];
+
+            RDouble dx = x[ node2 ] - x[ node1 ];
+            RDouble dy = y[ node2 ] - y[ node1 ];
+            RDouble dz = z[ node2 ] - z[ node1 ];
+            RDouble ds = DISTANCE(dx, dy, dz);
+
+            minEdgeLength = MIN(minEdgeLength, ds);
+        }
+        
+        nodePosition += nNode;
+    }
+
+    return minEdgeLength;
+}
+
+//! Compute the maximum distance of the grid edges.
+LIB_EXPORT RDouble UnstructGrid::CalMaxEdgeLength()
+{
+    if (this->maxEdgeLength > 0.0)
+    {
+        return this->maxEdgeLength;
+    }
+
+    maxEdgeLength = PHSPACE::SMALL;
+
+    int *node_number_of_each_face = this->GetNodeNumberOfEachFace();
+    int *face2node = this->GetFace2Node();
+
+    int nodePosition = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        int nNode = node_number_of_each_face[iFace];
+        for (int iNode = 0; iNode < nNode; ++ iNode)
+        {
+            int node1 = face2node[nodePosition + iNode];
+            int node2 = face2node[nodePosition + (iNode + 1) % nNode];
+
+            RDouble dx = x[ node2 ] - x[ node1 ];
+            RDouble dy = y[ node2 ] - y[ node1 ];
+            RDouble dz = z[ node2 ] - z[ node1 ];
+            RDouble ds = DISTANCE(dx, dy, dz);
+
+            maxEdgeLength = MAX(maxEdgeLength, ds);
+        }
+
+        nodePosition += nNode;
+    }
+
+    return maxEdgeLength;
+}
+
+LIB_EXPORT void UnstructGrid::ReSpecifyBC()
+{
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalCell = this->GetNTotalCell();
+    int * leftCellOfFace  = this->GetLeftCellOfFace();
+    int * rightCellOfFace = this->GetRightCellOfFace();
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        if (rightCellOfFace[iFace] >= nTotalCell)
+        {
+            rightCellOfFace[iFace] = -1;
+        }
+        if (leftCellOfFace[iFace] >= nTotalCell)
+        {
+            leftCellOfFace[iFace] = -1;
+        }
+    }
+}
+
+//Get node to cell information(cxh, 2012.12.12)
+void UnstructGrid::ComputeNode2Cell()
+{
+    int i,j,node,ip,le,re;
+    int nTotalNode = this->GetNTotalNode();
+    int nTotalFace = this->GetNTotalFace();
+    int *leftCellOfFace  = this->GetLeftCellOfFace();
+    int *rightCellOfFace  = this->GetRightCellOfFace();
+    int * node_number_of_each_face = this->GetNodeNumberOfEachFace();
+    int * face2node = this->GetFace2Node();
+
+    struct linkbase **nc;
+    struct linkbase *link, *tmp;
+
+    int * nCPN = new int[ nTotalNode ];
+    nc = new struct linkbase * [ nTotalNode ];
+
+    for (i = 0; i < nTotalNode; ++ i)
+    {
+        nCPN[i] = 0;
+        nc[i] = NULL;
+    }
+    //firstly, search all the face
+    node=0;
+    for (i = 0; i < nTotalFace; ++ i)
+    {
+        le = leftCellOfFace[ i ];
+        re = rightCellOfFace[ i ];
+        for (j = 0; j < node_number_of_each_face[ i ]; ++ j)
+        {
+            ip = face2node[ node  ++  ];
+            addn2c(le, ip, nCPN, nc);
+            addn2c(re, ip, nCPN, nc);
+        }
+    }
+
+    //change date from linkbase to array
+    long long int count;
+    count = 0;
+    for(i = 0; i < nTotalNode; ++ i)
+    {
+        count = count + nCPN[ i ];
+    }
+    int * n2c = new int [count];
+
+    count = 0;
+    for (i = 0; i < nTotalNode; ++ i)
+    {
+        for (link = nc[ i ]; link != NULL; link = link->next)
+        {
+            n2c[ count++ ] = link->ic;
+        }
+    }
+
+    //delete linkbase
+    for (i = 0; i < nTotalNode; ++ i)
+    {
+        link = nc[ i ];
+        while (link != NULL)
+        {
+            tmp = link->next;
+            delete link;
+            link = tmp;
+        }
+    }
+
+    delete [] nc;
+
+    nodeTopology->SetCellNumberOfEachNode(nCPN);
+    nodeTopology->SetNode2Cell(n2c);
+}
+
+void UnstructGrid::ComputeNode2CellArray()
+{
+    int nTotalNode = this->GetNTotalNode();    
+
+    int *node2Cell    = this->GetNode2Cell();
+    int *nCellPerNode = this->GetCellNumberOfEachNode();
+
+    int **node2CellArray = new int * [nTotalNode];
+
+    node2CellArray[0] = node2Cell;
+    for (int iNode = 1; iNode < nTotalNode; ++iNode)
+    {
+        node2CellArray[iNode] = &(node2CellArray[iNode-1][nCellPerNode[iNode-1]]);
+    }
+
+    nodeTopology->SetNode2CellArray(node2CellArray);
+
+    cout<<"Get Node2CellArray, well down!"<<endl;
+}
+
+void UnstructGrid::GetSourceIndex(int iFace,int ipos, int &s)
+{
+    InterfaceInfo *interfaceInfo = this->GetInterfaceInfo();
+    int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+    int *leftCellOfFace = this->GetLeftCellOfFace();
+    s = leftCellOfFace[interFace2BoundaryFace[iFace]];
+}
+
+void UnstructGrid::GetSourcePointIndex(int ipoint,int ipos,int &s)
+{
+    InterpointInformation *interpointInformation = this->GetInterpointInfo();
+    int *interPoint2GlobalPoint = interpointInformation->GetInterPoint2GlobalPoint();
+    s = interPoint2GlobalPoint[ipoint];
+}
+void UnstructGrid::GetTargetIndex(int iFace,int ipos, int &t)
+{
+    InterfaceInfo *interfaceInfo = this->GetInterfaceInfo();
+    int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+    t = rightCellOfFace[interFace2BoundaryFace[iFace]];
+}
+
+void UnstructGrid::GetTargetPointIndex(int ipoint,int ipos,int &t)
+{
+    InterpointInformation *interpointInformation = this->GetInterpointInfo();
+    int *interPoint2GlobalPoint = interpointInformation->GetInterPoint2GlobalPoint();
+    t = interPoint2GlobalPoint[ipoint];
+}
+
+void UnstructGrid::SetGhostCellExceptInterface(RDouble * f)
+{
+    int *leftCellOfFace = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+    int le, re;
+    UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        vector<int>* faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            // iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            if (bcType == PHENGLEI::INTERFACE)
+            {
+                continue;
+            }
+            le = leftCellOfFace [iFace];
+            re = rightCellOfFace[iFace];
+            f[re] = f[le];
+        }
+    }
+}
+
+void UnstructGrid::SetGhostCell(RDouble *field)
+{
+    int nBoundFace = this->GetNBoundFace();
+    int *leftCellOfFace = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+    int le, re;
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+        field[re] = field[le];
+    }
+}
+
+void UnstructGrid::SetGhostCell(RDouble **field, const int &nVariables)
+{
+    int nBoundFace = this->GetNBoundFace();
+    int *leftCellOfFace = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+    int le, re;
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+        for (int iVar = 0; iVar < nVariables; ++ iVar)
+        {
+            field[iVar][re] = field[iVar][le];
+        }
+    }
+}
+void UnstructGrid::SetGhostCell(RDouble *field, RDouble value)
+{
+    int nBoundFace = this->GetNBoundFace();
+    int *leftCellOfFace = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+    int le, re;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+        field[re] = value;
+    }
+}
+
+RDouble *UnstructGrid::GetVolume(int istep) const
+{
+    //! This will do for now.
+    cout << "Warning: this function may be wrong!" << endl;
+    return this->GetCellVolume();
+}
+
+void UnstructGrid::Action(ActionKey *actkey)
+{
+    switch (actkey->action)
+    {
+    case WRITE_WALL_DIST:
+        DumpWalldist(actkey);
+        break;
+    case COMMCELLCENTERDATA:
+        GetCellCenter(actkey);
+        break;
+    case COMMCELLIBLANK:
+        GetCellIBlank(actkey);
+        break;
+    case SIMPLE_ACTION:
+        SimpleAction(actkey);
+        break;
+    case ALLOCATE_WALL_DIST:
+        AllocateWalldist();
+        break;
+    case TEST_RECONSTRUCTION:
+        SkewnessSummary(actkey);
+        break;
+    default:
+        break;
+    }
+}
+
+void UnstructGrid::SimpleAction(ActionKey *actkey)
+{
+    RDouble value;
+    GetData(actkey->taskname, &value, PHDOUBLE, 1);
+
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+    cdata->write(&value, sizeof(RDouble));
+}
+
+void UnstructGrid::TranslateAction(ActionKey *actkey)
+{
+    if (actkey->action == COMMCELLCENTERDATA)
+    {
+        TranslateCellCenter(actkey);
+    }
+    if (actkey->action == COMMCELLIBLANK)
+    {
+        TranslateCellIBlank(actkey);
+    }
+}
+
+streamsize UnstructGrid::TranslateActionLength(ActionKey *actkey)
+{
+    if (actkey->action == COMMCELLCENTERDATA)
+    {
+        return TranslateCellCenterLength(actkey);
+    }
+    if (actkey->action == COMMCELLIBLANK)
+    {
+        return TranslateCellIBlankLength(actkey);
+    }
+    return 0;
+}
+
+void UnstructGrid::SpecifyRightCellofBC()
+{
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalCell = this->GetNTotalCell();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        rightCellOfFace[iFace] = iFace + nTotalCell;
+    }
+}
+
+//! Get laplacian weitht of nodes(cxh, 2012.12.12).
+void UnstructGrid::CalcLaplacianWeitht()
+{
+    int iNode,j,count,iCell;
+    int nTotalNode = this->GetNTotalNode();
+    RDouble xn,yn,zn;
+    RDouble xc,yc,zc;
+    RDouble *xp = this->GetX();
+    RDouble *yp = this->GetY();
+    RDouble *zp = this->GetZ();
+
+    RDouble *xcc = this->GetCellCenterX();
+    RDouble *ycc = this->GetCellCenterY();
+    RDouble *zcc = this->GetCellCenterZ();
+
+    RDouble Rx,Ry,Rz,Ixx,Iyy,Izz,Ixy,Ixz,Iyz,D,weight;
+
+    int *nCPN = GetCellNumberOfEachNode();
+    int *n2c  = GetNode2Cell();
+
+    if (nCPN == NULL || n2c == NULL) this->ComputeNode2Cell();
+
+    if (xcc == NULL || xp == NULL)
+    {
+        printf("Pease get the cell center information first!\n");
+        exit(0);
+    }
+
+    lamdax = new RDouble [ nTotalNode ];
+    lamday = new RDouble [ nTotalNode ];
+    lamdaz = new RDouble [ nTotalNode ];
+
+    count = 0;
+
+    for (iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        Rx = Ry = Rz = Ixx = Iyy = Izz = Ixy = Ixz = Iyz = 0.0;
+        xn = xp[ iNode ];
+        yn = yp[ iNode ];
+        zn = zp[ iNode ];
+        for (j = 0; j < nCPN[ iNode ]; ++ j)
+        {
+            xc = xcc[ n2c[ count ] ];
+            yc = ycc[ n2c[ count ] ];
+            zc = zcc[ n2c[ count ] ];
+            count ++;
+
+            Rx += xc - xn;
+            Ry += yc - yn;
+            Rz += zc - zn;
+
+            Ixx += (xc - xn) * (xc - xn);
+            Iyy += (yc - yn) * (yc - yn);
+            Izz += (zc - zn) * (zc - zn);
+
+            Ixy += (xc - xn) * (yc - yn);
+            Ixz += (xc - xn) * (zc - zn);
+            Iyz += (yc - yn) * (zc - zn);
+        }
+
+        if (this->GetDim() == TWO_D)
+        {
+            D = Ixx *  Iyy - Ixy * Ixy;
+
+            lamdax[ iNode ] = (Ry * Ixy - Rx * Iyy) / D;
+
+            lamday[ iNode ] = (Rx * Ixy - Ry * Ixx) / D;
+
+            lamdaz[ iNode ] = 0.0;
+        } 
+        else 
+        {
+            D = Ixx * (Iyy * Izz - Iyz * Iyz) - 
+                Ixy * (Ixy * Izz - Ixz * Iyz) +
+                Ixz * (Ixy * Iyz - Iyy * Ixz);
+
+            lamdax[ iNode ] = (-Rx * (Iyy * Izz - Iyz * Iyz)
+                                +Ry * (Ixy * Izz - Ixz * Iyz)
+                                -Rz * (Ixy * Iyz - Iyy * Ixz)) / D;
+
+            lamday[ iNode ] = ( Rx * (Ixy * Izz - Ixz * Iyz)
+                                -Ry * (Ixx * Izz - Ixz * Ixz)
+                                +Rz * (Ixx * Iyz - Ixy * Ixz)) / D;
+
+            lamdaz[ iNode ] = (-Rx * (Ixy * Iyz - Iyy * Ixz)
+                                +Ry * (Ixx * Iyz - Ixy * Ixz)
+                                -Rz * (Ixx * Iyy - Ixy * Ixy)) / D;
+        }
+    }
+        
+    if (knode == NULL) knode = new int [nTotalNode];
+    for (iNode = 0; iNode < nTotalNode; ++ iNode) knode[iNode] = 0;
+
+    count = 0;
+    for (iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        for (j = 0; j < nCPN[iNode]; ++ j)
+        {
+            iCell = n2c[ count++ ];
+            weight = 1 + lamdax[ iNode ] * (xcc[ iCell ] - xp[ iNode ]) + lamday[ iNode ] * (ycc[ iCell ] - yp[ iNode ]) + lamdaz[ iNode ] * (zcc[ iCell ] - zp[ iNode ]);
+            if (weight <= 0.0) knode[ iNode ] = 1;
+        }
+    }
+
+    count = 0;
+    for (iNode = 0; iNode < nTotalNode; ++ iNode) 
+    {
+        if (knode[ iNode ] == 1) count ++;
+    }
+    printf(" Number of negative weight cells : %d  %f\n", count, static_cast<RDouble>(count)/nTotalNode);
+}
+
+void UnstructGrid::ComputeCell2CellConnectivity()
+{
+    int nTotalCell = this->GetNTotalCell();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalFace = this->GetNTotalFace();
+    int * leftCellOfFace = this->GetLeftCellOfFace();
+    int * rightCellOfFace = this->GetRightCellOfFace();
+
+    cell2cell_connectivity = new Connectivity();
+
+    int *nnpc = new int [nTotalCell];
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        nnpc[iCell] = 0;
+    }
+
+    int le,re;
+
+    //! If boundary is an INTERFACE, need to count ghost cell.
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int bctype  = bcr[iFace]->GetKey();
+        if (IsInterface(bctype))
+        {
+            le      = leftCellOfFace[ iFace ];
+            nnpc[le] ++;
+        }
+    }
+
+    //! Interior faces.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        nnpc[le] ++;
+        nnpc[re] ++;
+    }
+
+    int *index = new int [nTotalCell + 1];
+
+    index[0] = 0;
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        index[iCell+1] = index[iCell] + nnpc[iCell];
+    }
+
+    cell2cell_connectivity->index = index;
+    
+    cell2cell_connectivity->n = index[nTotalCell];
+
+    cell2cell_connectivity->data = new int [cell2cell_connectivity->n];
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        nnpc[iCell] = 0;
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int bctype  = bcr[iFace]->GetKey();
+        if (IsInterface(bctype))
+        {
+            le      = leftCellOfFace[ iFace ];
+            re      = iFace + nTotalCell;
+            cell2cell_connectivity->data[ index[le] + nnpc[le]++ ] = re;
+        }
+    }
+
+    //! Interior faces.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        cell2cell_connectivity->data[ index[le] + nnpc[le]++ ] = re;
+        cell2cell_connectivity->data[ index[re] + nnpc[re]++ ] = le;
+    }
+
+    delete [] nnpc;
+}
+
+LIB_EXPORT RDouble UnstructGrid::SkewnessSummary(ActionKey *actkey)
+{
+    int angleC[18];
+    RDouble dotp1,x1,y1,z1,dis1,dotp2,x2,y2,z2,dis2,angle;
+    RDouble minAng = straightAngle;
+    RDouble maxAng = 0.0;
+    RDouble area_scale = TINY;
+    RDouble criticalAngle = 89.9;
+
+    int le, re;
+
+    for (int i = 0; i < 18; ++ i)
+    {
+        angleC[i] = 0;
+    }
+    int *leftCellOfFace  = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+    RDouble *xcc = this->GetCellCenterX();
+    RDouble *ycc = this->GetCellCenterY();
+    RDouble *zcc = this->GetCellCenterZ();
+
+    RDouble *xfc = this->GetFaceCenterX();
+    RDouble *yfc = this->GetFaceCenterY();
+    RDouble *zfc = this->GetFaceCenterZ();
+
+    RDouble *nxs = this->GetFaceNormalX();
+    RDouble *nys = this->GetFaceNormalY();
+    RDouble *nzs = this->GetFaceNormalZ();
+    RDouble *ns  = this->GetFaceArea();
+
+    int nTotalFace = this->GetNTotalFace();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalCell = this->GetNTotalCell();
+    //#define  QUALYTY_DEBUG
+#ifdef QUALYTY_DEBUG
+    int * negativeCell = new int [nTotalCell];
+    SetField(negativeCell, 0, nTotalCell);
+    int nNegativeCell = 0;
+#endif
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        if (ns[iFace] <= area_scale) continue;
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        x1 = xfc[iFace] - xcc[le];
+        y1 = yfc[iFace] - ycc[le];
+        z1 = zfc[iFace] - zcc[le];
+        dis1  = sqrt(x1*x1 + y1*y1 + z1*z1);
+        dotp1 = (nxs[iFace] * x1 + nys[iFace] * y1 + nzs[iFace] * z1) / (dis1 + TINY);
+        if (dotp1 >  one) dotp1 =   one;
+        if (dotp1 < -one) dotp1 = - one;
+
+        x2 = xcc[re] - xfc[iFace];
+        y2 = ycc[re] - yfc[iFace];
+        z2 = zcc[re] - zfc[iFace];
+        dis2  = sqrt(x2*x2 + y2*y2 + z2*z2);
+        dotp2 = (nxs[iFace] * x2 + nys[iFace] * y2 + nzs[iFace] * z2) / (dis2 + TINY);      
+        if (dotp2 >  one) dotp2 =   one;
+        if (dotp2 < -one) dotp2 = - one;
+
+        angle = MIN(asin(dotp1), asin(dotp2)) * straightAngle / PI;
+
+#ifdef QUALYTY_DEBUG
+        if (le == 8516 && re == 8517)
+        {
+            PrintToWindow("\nle, re ", le, re);
+            PrintToWindow("\nx1, y1, z1 ", x1, y1, z1);
+            PrintToWindow("\nxfc[iFace] ", xfc[iFace], yfc[iFace], zfc[iFace]);
+            PrintToWindow("\nxcc[le] ", xcc[le], ycc[le], zcc[le]);
+            PrintToWindow("\nnxs[iFace] ", nxs[iFace], nys[iFace], nzs[iFace]);
+            PrintToWindow("\ndis1, dotp1, asin(dotp1) ", dis1, dotp1, asin(dotp1) * straightAngle / PI);
+            PrintToWindow("\nx2, y2, z2 ", x2, y2, z2);
+            PrintToWindow("\ndis2, dotp2, asin(dotp2) ", dis2, dotp2, asin(dotp2) * straightAngle / PI);
+            negativeCell[le] = 1;
+            negativeCell[re] = 1;
+            nNegativeCell += 2;
+        }
+#endif
+
+        minAng = MIN(minAng, angle);
+        maxAng = MAX(maxAng, angle);
+
+        if (angle > criticalAngle) angle = criticalAngle;
+        if (angle < -criticalAngle) angle = -criticalAngle;
+        if (angle < 0) angle -= ten;
+        angleC[static_cast<int>(angle / ten) + 9] ++;
+    }
+
+    int nodepos = 0;
+    int *node_number_of_each_face = this->GetNodeNumberOfEachFace();
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        if (ns[iFace] <= area_scale) continue;
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        x1 = xfc[iFace] - xcc[le];
+        y1 = yfc[iFace] - ycc[le];
+        z1 = zfc[iFace] - zcc[le];
+        dis1  = sqrt(x1 * x1 + y1 * y1 + z1 * z1);
+        dotp1 = (nxs[iFace] * x1 + nys[iFace] * y1 + nzs[iFace] * z1) / (dis1 + TINY);
+        if (dotp1 >  one) dotp1 =   one;
+        if (dotp1 < -one) dotp1 = - one;
+
+        angle = asin(dotp1) * straightAngle / PI;
+
+        nodepos += node_number_of_each_face[iFace];
+
+        minAng = MIN(minAng, angle);
+        maxAng = MAX(maxAng, angle);
+
+        if (angle > criticalAngle) angle = criticalAngle;
+        if (angle < -criticalAngle) angle = -criticalAngle;
+        if (angle < zero) angle -= 10;
+        angleC[static_cast<int>(angle / 10) + 9] ++;
+    }
+    int total = 0;
+    for (int i = 0; i < 18; ++ i)
+    {
+        total += angleC[i];
+    }
+
+    ostringstream oss;
+    oss << "Zone Index :" << this->GetZoneID() << "\n";
+    oss << "=====================================================" << "\n";
+    oss << "Skewness Summary (angle of 90 degrees being the best)" << "\n";
+    oss << "  Level = " << this->GetLevel() << "\n";
+    oss << "=====================================================" << "\n";
+
+    oss << "  Total number of cells " << nTotalCell << "\n";
+    oss << "  Total number of faces " << nTotalFace << "\n";
+    oss << "  Total number of checked Faces " << total << "\n";
+    oss << "  Face scale used (area_scale) = " << area_scale << "\n";
+    oss << "  Total number of faces whose areas <= area_scale " << nTotalFace - total << "\n";
+
+    oss << "  Minimum skewness angle is " << minAng << endl;
+    oss << "  Maximum skewness angle is " << maxAng << endl;
+    for (int i = 0; i < 18; ++ i)
+    {
+        oss << "  Face angle between " ;
+        oss << setiosflags(ios::right);
+        oss << setw(3) << - 90 + i * 10;
+        oss << " and ";
+        oss << setiosflags(ios::right);
+        oss << setw(3) << - 80 + i * 10;
+        oss << " is ";
+
+        oss << resetiosflags(ios_base::scientific);
+        oss << setiosflags(ios::fixed);
+        oss << setw(5);
+        oss << setprecision(2);
+        oss <<  angleC[i] / (static_cast<RDouble>(total) + SMALL) * 100;
+        oss <<  " Percent (";
+        oss << setw(8)<< angleC[i] << ")\n";
+    }  
+    oss << "====================================================" << "\n";
+
+    //! It is necessary to reset, otherwise there will be some unexpected output elsewhere.
+    //! This is due to the setting of cout << setiosflags(ios::fixed),the specific reason are to be considered later.
+    oss << resetiosflags(ios::fixed);
+    oss << setiosflags(ios_base::scientific);
+
+    PrintToWindow(oss);
+
+    RDouble globalMinAng = 0.0;
+    int systemGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if (PHMPI::GetNumberOfProcessor() == PHMPI::GetNumberofGlobalZones() && UNSTRUCTGRID == systemGridType)
+    {
+        //! "UNSTRUCTGRID == systemGridType" is added by myk 20200922, for parral-running with MixGrid.
+        //! SkewnessSummary() in StructGrid zone is an empty function, no PH_Reduce() corresponding with the following one.
+
+        //PH_CompareMaxMin(minAng, 2);
+        PH_Reduce(&minAng, &globalMinAng, 1, MPI_MIN);
+
+        if (PHMPI::GetCurrentProcessorID() == PHMPI::GetServerProcessorID())
+        {
+            ostringstream oss1;
+            oss1 << resetiosflags(ios_base::scientific);
+            oss1 << setprecision(4);
+            oss1  << "Global minimum skewness angle is " << globalMinAng << endl;
+            PrintToWindow("    Global minimum skewness angle is ", globalMinAng, "\n");
+            PHSPACE::WriteLogFile(oss1.str());
+        }
+    }
+
+#ifdef QUALYTY_DEBUG
+    if (nNegativeCell)
+    {
+        int iZone = this->GetGridID()->GetIndex();
+        Grid * grid_slice = CreateGridGeneral(UNSTRUCTGRID, new GridID(iZone), 0, GetDim());
+        ExtractSubGridFromGrid(this, UnstructGridCast(grid_slice), negativeCell);
+        ostringstream newfile;
+        newfile << "./grid/NegativeCells" << iZone << ".plt";
+        VisualizationMesh2D(UnstructGridCast(grid_slice), newfile.str());
+        delete grid_slice;
+    }
+    delete [] negativeCell;
+#endif
+
+    return globalMinAng;
+}
+
+//! Compute the weights used to average dqdx, dqdy, etc.
+void UnstructGrid::FaceWeight(RDouble *deltL, RDouble *deltR, int localStart, int localEnd)
+{
+    int nBoundFace = this->GetNBoundFace();
+    int *leftCellOfFace = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+
+    RDouble *xfc = this->GetFaceCenterX();
+    RDouble *yfc = this->GetFaceCenterY();
+    RDouble *zfc = this->GetFaceCenterZ();
+    RDouble *xcc = this->GetCellCenterX();
+    RDouble *ycc = this->GetCellCenterY();
+    RDouble *zcc = this->GetCellCenterZ();
+
+    for (int iFace = localStart; iFace < localEnd; ++ iFace)
+    {
+        int le = leftCellOfFace [ iFace ];
+        int re = rightCellOfFace[ iFace ];
+
+        RDouble dxL = xfc[iFace] - xcc[le];
+        RDouble dyL = yfc[iFace] - ycc[le];
+        RDouble dzL = zfc[iFace] - zcc[le];
+
+        RDouble dxR = xfc[iFace] - xcc[re];
+        RDouble dyR = yfc[iFace] - ycc[re];
+        RDouble dzR = zfc[iFace] - zcc[re];
+
+        //! Left
+        RDouble delta1 = DISTANCE(dxL, dyL, dzL);
+        RDouble delta2 = DISTANCE(dxR, dyR, dzR);
+        RDouble delta = one / (delta1 + delta2 + SMALL);
+
+        int jFace = iFace - localStart;
+        deltL[jFace] = delta2 * delta;
+        deltR[jFace] = delta1 * delta;
+    }
+
+    //! If there are some boundary faces, make modifications.
+    if (localStart < nBoundFace)
+    {
+        UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+        int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+        int nMid = nBoundFace;
+        if (localEnd < nBoundFace) nMid = localEnd;
+
+        for(int iFace = localStart; iFace < nMid; ++ iFace)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+            int bcType = bcRegion->GetBCType();
+
+            if (!IsInterface(bcType))
+            {
+                int jFace = iFace - localStart;
+                deltL[jFace] = 1.0;
+                deltR[jFace] = 0.0;
+            }
+        }
+    }
+}
+
+
+void UnstructGrid::CVGNorm(FieldProxy *q_1_proxy, FieldProxy *q_0_proxy, int neqn, RDouble &norm)
+{
+    int nTotalCell = this->GetNTotalCell();
+
+    RDouble diff = 0.0;
+
+    RDouble **q_1 = q_1_proxy->GetField_UNS();
+    RDouble **q_0 = q_0_proxy->GetField_UNS();
+
+    norm = zero;
+    for (int m = 0; m < neqn; ++ m)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            diff = q_1[m][iCell] - q_0[m][iCell];
+            norm = norm + diff * diff;
+        }
+    }
+    
+    norm = sqrt(norm / (nTotalCell * neqn));
+}
+
+void UnstructGrid::UpdateVolold()
+{
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+
+    if (!isUnsteady || !isAle) return;
+    
+    int nTotalCell = this->GetNTotalCell();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble *vol  = this->GetCellVolume();
+    RDouble *voln = this->GetCellVolumeOld();
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        voln[iCell] = vol[iCell];
+    }
+}
+
+void UnstructGrid::ClosureCheck(RDouble *xfn, RDouble *area)
+{
+    RDouble  *sum, total;
+    int  nTotalCell = this->GetNTotalCell();
+    int  nTotalFace = this->GetNTotalFace();
+    int *leftCellOfFace = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+
+    sum = new RDouble[ nTotalCell ];
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        sum[iCell] = 0.0;
+    }
+
+    int count, le, re;
+    count = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        sum[le] += xfn[iFace] * area[iFace];
+        if (re < 0 || re >= nTotalCell) continue;
+        sum[re] -= xfn[iFace] * area[iFace];
+    }
+
+    total = 0.0;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        total += ABS(sum[iCell]);
+        if (ABS(sum[iCell]) > 1.0e-8)
+        {
+        }
+    }
+    delete [] sum;
+}
+
+void UnstructGrid::AllocateMetrics(ActionKey *actkey)
+{
+    GridManager *gridManager = this->GetGridManager();
+    gridManager->AllocateMetrics();
+
+    int nTotalCell = this->GetNTotalCell();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalFace = this->GetNTotalFace();
+    int nTotal = nTotalCell + nBoundFace;     //! interior cells + ghost cells.
+
+    RDouble *xfc = this->GetFaceCenterX();
+    RDouble *yfc = this->GetFaceCenterY();
+    RDouble *zfc = this->GetFaceCenterZ();
+
+    RDouble *xfn = this->GetFaceNormalX();
+    RDouble *yfn = this->GetFaceNormalY();
+    RDouble *zfn = this->GetFaceNormalZ();
+
+    RDouble *xcc = this->GetCellCenterX();
+    RDouble *ycc = this->GetCellCenterY();
+    RDouble *zcc = this->GetCellCenterZ();
+
+    RDouble *vol = this->GetCellVolume();
+
+    RDouble *area = this->GetFaceArea();
+
+    RDouble *vgn = this->GetFaceNormalVelocity();
+
+    if (xcc == 0)
+    {
+        xcc  = new RDouble[nTotal];
+        cellMetrics->SetCellCenterX(xcc);
+    }
+    if (ycc == 0)
+    {
+        ycc = new RDouble[nTotal];
+        cellMetrics->SetCellCenterY(ycc);
+    }
+    if (zcc == 0)
+    {
+        zcc = new RDouble[nTotal];
+        cellMetrics->SetCellCenterZ(zcc);
+    }
+    if (vol == 0)
+    {
+        vol = new RDouble[nTotal];
+        cellMetrics->SetCellVolume(vol);
+    }
+
+    if (xfc == 0)
+    {
+        xfc = new RDouble[nTotalFace];
+        faceMetrics->SetFaceCenterX(xfc);
+    }
+    if (yfc == 0)
+    {
+        yfc = new RDouble[nTotalFace];
+        faceMetrics->SetFaceCenterY(yfc);
+    }
+    if (zfc == 0)
+    {
+        zfc = new RDouble[nTotalFace];
+        faceMetrics->SetFaceCenterZ(zfc);
+    }
+
+    if (xfn == 0)
+    {
+        xfn = new RDouble[nTotalFace];
+        faceMetrics->SetFaceNormalX(xfn);
+    }
+    if (yfn == 0)
+    {
+        yfn  = new RDouble[nTotalFace];
+        faceMetrics->SetFaceNormalY(yfn);
+    }
+    if (zfn == 0)
+    {
+        zfn = new RDouble[nTotalFace];
+        faceMetrics->SetFaceNormalZ(zfn);
+    }
+    if (area == 0)
+    {
+        area = new RDouble[nTotalFace];
+        faceMetrics->SetFaceArea(area);
+    }
+
+    if (vgn  == 0)
+    {
+        vgn = new RDouble[nTotalFace];
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            vgn[iFace] = zero;
+        }
+        dynamicGridMetrics->SetFaceNormalVelocity(vgn);
+    }
+
+    AllocateMetricsALE(actkey);
+}
+
+void UnstructGrid::AllocateMetricsALE(ActionKey *actkey)
+{
+    GridManager *gridManager = this->GetGridManager();
+    gridManager->AllocateALEMetrics();
+
+    int nTotalCell = this->GetNTotalCell();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalFace = this->GetNTotalFace();
+    int nTotal = nTotalCell + nBoundFace;    //! interior cells + ghost cells.
+
+    //! codeOfAleModel = 0: no ALE method;
+    //!                  1: ALE method for non-moving grids;
+    //!                  2: ALE method for moving grids;
+    //!                  3: ALE method for deforming grids.
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+
+    RDouble *xfv = this->GetFaceVelocityX();
+    RDouble *yfv = this->GetFaceVelocityY();
+    RDouble *zfv = this->GetFaceVelocityZ();
+
+    if (xfv == 0)
+    {
+        xfv = new RDouble[nTotalFace];
+    }
+
+    if (yfv == 0)
+    {
+        yfv = new RDouble[nTotalFace];
+    }
+
+    if (zfv == 0)
+    {
+        zfv = new RDouble[nTotalFace];
+    }
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        xfv[iFace] = 0.0;
+        yfv[iFace] = 0.0;
+        zfv[iFace] = 0.0;
+    }
+    dynamicGridMetrics->SetFaceVelocityX(xfv);
+    dynamicGridMetrics->SetFaceVelocityY(yfv);
+    dynamicGridMetrics->SetFaceVelocityZ(zfv);
+
+    RDouble *voln = this->GetCellVolumeOld();
+
+    if (isUnsteady)
+    {
+        if (!isAle)
+        {
+            voln = 0;
+        }
+        else
+        {
+            if (voln == 0)
+            {
+                voln = new RDouble[nTotal];
+                ZeroField(voln, nTotal);
+            }
+
+            int nstart = 0;
+            if (!(nstart == 0 || nstart == 3))
+            {
+                //! nstart==0: start all over again.
+                //! nstart==3: Unsteady-->Dynamics mesh.
+                ReadMovingGrid();
+            }
+        }
+        dynamicGridMetrics->SetCellVolumeOld(voln);
+    }
+}
+
+void UnstructGrid::GetBcNamePair(set< pair<int, string> > &bcNamePairSet)
+{
+    UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        string bcName = bcRegion->GetBCName();
+        int bcType = bcRegion->GetBCType();
+
+        pair<int, string> bcNamePair(bcType, bcName);
+        bcNamePairSet.insert(bcNamePair);
+    }
+}
+
+void UnstructGrid::DumpWallFaceCenter(ActionKey *actkey)
+{
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+
+    std::ostringstream oss;
+
+    int girdIndex = this->GetZoneID();
+    if (girdIndex == 0)
+    {
+        int globalTotalWallFace = GlobalDataBase::GetIntParaFromDB("GlobalTotalWallFace");
+        oss << globalTotalWallFace << "\n";
+    }
+
+    int nsolid_surface = this->GetNumberOfWallCell();
+    if ((nsolid_surface == 0) || (level != 0))
+    {
+        string str = oss.str();
+        cdata->write(const_cast <char *> (str.data()), str.size() * sizeof(char));
+        return;
+    }
+
+    oss << setiosflags(ios::left);
+    oss << setprecision(5);
+    oss << setiosflags(ios::scientific);
+    oss << setiosflags(ios::showpoint);
+
+    RDouble *xfc = this->GetFaceCenterX();
+    RDouble *yfc = this->GetFaceCenterY();
+    RDouble *zfc = this->GetFaceCenterZ();
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int bctype = bcr[iFace]->GetKey();
+        if (!IsWall(bctype))
+        {
+            continue;
+        }
+
+        oss << xfc[iFace] << "	";
+        oss << yfc[iFace] << "	";
+        oss << zfc[iFace] << "	";
+        oss <<"\n";
+    }
+
+    string str = oss.str();
+    cdata->write(const_cast <char *> (str.data()), str.size() * sizeof(char));
+}
+
+void UnstructGrid::InitVariableWallTemperature()
+{
+    fstream file;
+    string wallTemperatureFile = "";
+    GlobalDataBase::GetData("wallTemperaturefile", &wallTemperatureFile, PHSTRING, 1);
+    OpenFile(file, wallTemperatureFile, ios_base::in|ios_base::binary);
+
+    int dataNumber = 0;
+    PHRead(file, dataNumber);
+
+    int varNumber = 0;
+    PHRead(file, varNumber);
+
+    RDouble *pmin = this->GetMinBox();
+    RDouble *pmax = this->GetMaxBox();
+    vector < vector <RDouble> > dataInCurrentGrid;
+    dataInCurrentGrid.resize(0);
+
+    for (int iData = 0; iData < dataNumber; ++ iData)
+    {
+        float xCoor, yCoor, zCoor;
+        float tWall;
+
+        PHRead(file, xCoor);
+        PHRead(file, yCoor);
+        PHRead(file, zCoor);
+        PHRead(file, tWall);
+
+        RDouble coordX = static_cast<RDouble>(xCoor);
+        RDouble coordY = static_cast<RDouble>(yCoor);
+        RDouble coordZ = static_cast<RDouble>(zCoor);
+
+        if (coordX < pmin[0] || coordX > pmax[0]) continue;
+        if (coordY < pmin[1] || coordY > pmax[1]) continue;
+        if (coordZ < pmin[2] || coordZ > pmax[2]) continue;
+
+        vector <RDouble> currentData;
+        currentData.push_back(coordX);
+        currentData.push_back(coordY);
+        currentData.push_back(coordZ);
+        currentData.push_back(static_cast<RDouble>(tWall));
+
+        dataInCurrentGrid.push_back(currentData);
+    }
+
+    CloseFile(file);
+
+    int dataNumberInCurrentGrid = static_cast<int>(dataInCurrentGrid.size());
+    if (dataNumberInCurrentGrid == 0)
+    {
+        return;
+    }
+
+    int *dataUsed = new int[dataNumberInCurrentGrid];
+    std::fill_n(dataUsed, dataNumberInCurrentGrid, 0);
+
+    RDouble *xCoor    = this->GetX();
+    RDouble *yCoor    = this->GetY();
+    RDouble *zCoor    = this->GetZ();
+    RDouble *faceArea = this->GetFaceArea();
+
+    long long int *nodePosi  = this->GetFace2NodeSubscript();
+    int *face2node = this->GetFace2Node();
+
+    UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        
+        if (!IsWall(bcType) && bcType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        vector<int> *faceIndexArray = bcRegion->GetFaceIndex();
+        int faceNum = static_cast<int>(faceIndexArray->size());
+        RDouble *wallTempArray = new RDouble[faceNum];
+
+        int findData = 0;
+        for (int iFace = 0; iFace < faceNum; ++ iFace)
+        {
+            bool flag = false;
+            vector <vector <RDouble> > nodeCoor;
+
+            int faceIndex = (*faceIndexArray)[iFace];
+            for (int iNode = static_cast<int>(nodePosi[faceIndex]); iNode < nodePosi[faceIndex+1]; ++ iNode)
+            {
+                int nodeIndex = face2node[iNode];
+
+                vector <RDouble> oneNode;
+                oneNode.push_back(xCoor[nodeIndex]);
+                oneNode.push_back(yCoor[nodeIndex]);
+                oneNode.push_back(zCoor[nodeIndex]);
+                nodeCoor.push_back(oneNode);
+            }
+            int nTri = static_cast<int>(nodeCoor.size());
+
+            for (int iData = 0; iData < dataNumberInCurrentGrid; ++ iData)
+            {
+                if (dataUsed[iData])
+                {
+                    continue;
+                }
+
+                RDouble coordX = dataInCurrentGrid[iData][0];
+                RDouble coordY = dataInCurrentGrid[iData][1];
+                RDouble coordZ = dataInCurrentGrid[iData][2];
+
+                vector <vector <RDouble> > lineVec;
+                lineVec.resize(nTri);
+
+                for (int iNode = 0; iNode < nTri; ++ iNode)
+                {
+                    RDouble dx = nodeCoor[iNode][0] - coordX;
+                    RDouble dy = nodeCoor[iNode][1] - coordY;
+                    RDouble dz = nodeCoor[iNode][2] - coordZ;
+
+                    lineVec[iNode].push_back(dx);
+                    lineVec[iNode].push_back(dy);
+                    lineVec[iNode].push_back(dz);
+                }
+
+                RDouble areaSum = 0.0;
+                for (int iTri = 0; iTri < nTri; ++ iTri)
+                {
+                    int lineIndex1 =  iTri;
+                    int lineIndex2 = (iTri + 1) % nTri;
+
+                    RDouble p[3];
+                    CrossProduct(&lineVec[lineIndex1][0], &lineVec[lineIndex2][0], p);
+                    RDouble areaCurrent = DISTANCE(p[0], p[1], p[2]);
+
+                    areaSum += ABS(areaCurrent);
+                }
+                areaSum = half * areaSum;
+
+                RDouble eps = (areaSum - faceArea[faceIndex]) / faceArea[faceIndex];
+                if (ABS(eps) < 1e-4)
+                {
+                    flag = true;
+                }
+
+                if (flag)
+                {
+                    dataUsed[iData] = 1;
+                    RDouble tWall = dataInCurrentGrid[iData][3];
+                    wallTempArray[iFace] = tWall;
+                    findData ++;
+                    break;
+                }
+            }
+        }
+
+        if (faceNum != findData)
+        {
+            WriteLogFile("Error !!!!");
+        }
+
+       bcRegion->UpdateFieldDataPtr("wallTempArray" , wallTempArray);
+
+    }
+
+    delete []dataUsed;
+}
+
+void UnstructGrid::ReadMovingGrid()
+{
+    int nTotalCell = this->GetNTotalCell();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;    //! interior cells + ghost cells.
+
+    fstream file;
+    std::ostringstream oss;
+    oss << "move_grid" << this->GetZoneID() << ".dat";
+    string filename = oss.str();
+
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+    RDouble *voln = this->GetCellVolumeOld();
+
+    int nTotalNode = this->GetNTotalNode();
+
+    file.open(filename.c_str(), ios_base::in|ios_base::binary);
+
+    file.read(reinterpret_cast<char*>(x  ),nTotalNode * sizeof(RDouble));
+    file.read(reinterpret_cast<char*>(y  ),nTotalNode * sizeof(RDouble));
+    file.read(reinterpret_cast<char*>(z  ),nTotalNode * sizeof(RDouble));
+    file.read(reinterpret_cast<char*>(voln),nTotal * sizeof(RDouble));
+
+    file.close();
+}
+
+//! Corrected GG Method: on the basis of GG-Cell, the face center value is corrected once,so that the gradient reconstruction can reach the first order accuracy.
+void UnstructGrid::CompGradientGGModified2(RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    RDouble *nxs,*nys,*nzs,*ns,*vol;
+
+    nxs = this->GetFaceNormalX();
+    nys = this->GetFaceNormalY();
+    nzs = this->GetFaceNormalZ();
+    ns  = this->GetFaceArea() ;
+    vol = this->GetCellVolume();
+
+    int * leftCellOfFace = this->GetLeftCellOfFace();
+    int * rightCellOfFace = this->GetRightCellOfFace();
+
+    RDouble *xfc  = this->GetFaceCenterX();
+    RDouble *yfc  = this->GetFaceCenterY();
+    RDouble *zfc  = this->GetFaceCenterZ();
+    RDouble *xcc  = this->GetCellCenterX();
+    RDouble *ycc  = this->GetCellCenterY();
+    RDouble *zcc  = this->GetCellCenterZ();
+
+    int nTotalCell = this->GetNTotalCell();
+    int nTotalFace = this->GetNTotalFace();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        dqdx[iCell] = 0.0;
+        dqdy[iCell] = 0.0;
+        dqdz[iCell] = 0.0;
+    }
+
+    //! Initial value of gradient.
+    vector< RDouble > dqdx0(nTotal);
+    vector< RDouble > dqdy0(nTotal);
+    vector< RDouble > dqdz0(nTotal);
+
+    //! Solve the initial gradient field.
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellOfFace[ iFace ];
+        int re = iFace + nTotalCell;
+
+        RDouble qfc = half * (q[le] + q[re]);
+        RDouble nx  = nxs[iFace] * ns[iFace];
+        RDouble ny  = nys[iFace] * ns[iFace];
+        RDouble nz  = nzs[iFace] * ns[iFace];
+        dqdx0[le] += qfc * nx;
+        dqdy0[le] += qfc * ny;
+        dqdz0[le] += qfc * nz;
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace [ iFace ];
+        int re = rightCellOfFace[ iFace ];
+
+        RDouble qfc = half * (q[le] + q[re]);
+        RDouble nx  = nxs[iFace] * ns[iFace];
+        RDouble ny  = nys[iFace] * ns[iFace];
+        RDouble nz  = nzs[iFace] * ns[iFace];
+
+        dqdx0[le] += qfc * nx;
+        dqdy0[le] += qfc * ny;
+        dqdz0[le] += qfc * nz;
+        dqdx0[re] -= qfc * nx;
+        dqdy0[re] -= qfc * ny;
+        dqdz0[re] -= qfc * nz;
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        RDouble ovol = one / vol[iCell];
+        dqdx0[iCell] *= ovol;
+        dqdy0[iCell] *= ovol;
+        dqdz0[iCell] *= ovol;
+    }    
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellOfFace[ iFace ];
+        int re = iFace + nTotalCell;
+
+        dqdx0[re] = dqdx0[le];
+        dqdy0[re] = dqdy0[le];
+        dqdz0[re] = dqdz0[le];
+    } 
+
+    //! After the initial gradient field is solved,correct the face center value and update the gradient.
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellOfFace[ iFace ];
+        int re = iFace + nTotalCell;
+
+        RDouble faceCenterX = xfc[ iFace ];
+        RDouble faceCenterY = yfc[ iFace ];
+        RDouble faceCenterZ = zfc[ iFace ];
+
+        //! The vector of ff.
+        vector< RDouble > fcFVector(3);
+        fcFVector[ 0 ] = faceCenterX - half * (xcc[ le ] + xcc[ re ]);
+        fcFVector[ 1 ] = faceCenterY - half * (ycc[ le ] + ycc[ re ]);
+        fcFVector[ 2 ] = faceCenterZ - half * (zcc[ le ] + zcc[ re ]);
+
+        //! The gradient of f.
+        RDouble dqdxf = half * (dqdx0[ le ] + dqdx0[ re ]);
+        RDouble dqdyf = half * (dqdy0[ le ] + dqdy0[ re ]);
+        RDouble dqdzf = half * (dqdz0[ le ] + dqdz0[ re ]);
+
+        //! Correct the face center value.
+        RDouble qfc0 = half * (q[le] + q[re]);
+        RDouble qfc = qfc0 + dqdxf * fcFVector[ 0 ] + dqdyf * fcFVector[ 1 ] + dqdzf * fcFVector[ 2 ];
+
+        RDouble nx  = nxs[iFace] * ns[iFace];
+        RDouble ny  = nys[iFace] * ns[iFace];
+        RDouble nz  = nzs[iFace] * ns[iFace];
+
+        dqdx[le] += qfc * nx;
+        dqdy[le] += qfc * ny;
+        dqdz[le] += qfc * nz;
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace [ iFace ];
+        int re = rightCellOfFace[ iFace ];
+
+        RDouble faceCenterX = xfc[ iFace ];
+        RDouble faceCenterY = yfc[ iFace ];
+        RDouble faceCenterZ = zfc[ iFace ];
+
+        //! The vector of ff.
+        vector< RDouble > fcFVector(3);
+        fcFVector[ 0 ] = faceCenterX - half * (xcc[ le ] + xcc[ re ]);
+        fcFVector[ 1 ] = faceCenterY - half * (ycc[ le ] + ycc[ re ]);
+        fcFVector[ 2 ] = faceCenterZ - half * (zcc[ le ] + zcc[ re ]);
+
+        //! The gradient of f.
+        RDouble dqdxf = half * (dqdx0[ le ] + dqdx0[ re ]);
+        RDouble dqdyf = half * (dqdy0[ le ] + dqdy0[ re ]);
+        RDouble dqdzf = half * (dqdz0[ le ] + dqdz0[ re ]);
+
+        ///! Correct the face center value.
+        RDouble qfc0 = half * (q[le] + q[re]);
+        RDouble qfc = qfc0 + dqdxf * fcFVector[ 0 ] + dqdyf * fcFVector[ 1 ] + dqdzf * fcFVector[ 2 ];
+
+        RDouble nx  = nxs[iFace] * ns[iFace];
+        RDouble ny  = nys[iFace] * ns[iFace];
+        RDouble nz  = nzs[iFace] * ns[iFace];
+
+        dqdx[le] += qfc * nx;
+        dqdy[le] += qfc * ny;
+        dqdz[le] += qfc * nz;
+        dqdx[re] -= qfc * nx;
+        dqdy[re] -= qfc * ny;
+        dqdz[re] -= qfc * nz;
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {       
+        RDouble ovol = one / vol[iCell];
+        dqdx[iCell] *= ovol;
+        dqdy[iCell] *= ovol;
+        dqdz[iCell] *= ovol;
+    }    
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellOfFace[ iFace ];
+        int re = iFace + nTotalCell;
+
+        dqdx[re] = dqdx[le];
+        dqdy[re] = dqdy[le];
+        dqdz[re] = dqdz[le];
+    } 
+}
+
+void UnstructGrid::CompGradientGGCell(RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, int setting)
+{
+    RDouble *nxs,*nys,*nzs,*ns,*vol;
+
+    nxs = this->GetFaceNormalX();
+    nys = this->GetFaceNormalY();
+    nzs = this->GetFaceNormalZ();
+    ns  = this->GetFaceArea() ;
+    vol = this->GetCellVolume();
+
+    int * leftCellofFace = this->GetLeftCellOfFace();
+    int * rightCellofFace = this->GetRightCellOfFace();
+
+    int nTotalCell = this->GetNTotalCell();
+    int nTotalFace = this->GetNTotalFace();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        dqdx[iCell] = 0.0;
+        dqdy[iCell] = 0.0;
+        dqdz[iCell] = 0.0;
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellofFace[ iFace ];
+        int re = iFace + nTotalCell;
+
+        RDouble qfc = half * (q[le] + q[re]);
+        RDouble nx  = nxs[iFace] * ns[iFace];
+        RDouble ny  = nys[iFace] * ns[iFace];
+        RDouble nz  = nzs[iFace] * ns[iFace];
+        dqdx[le] += qfc * nx;
+        dqdy[le] += qfc * ny;
+        dqdz[le] += qfc * nz;
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellofFace [ iFace ];
+        int re = rightCellofFace[ iFace ];
+
+        RDouble qfc = half * (q[le] + q[re]);
+        RDouble nx  = nxs[iFace] * ns[iFace];
+        RDouble ny  = nys[iFace] * ns[iFace];
+        RDouble nz  = nzs[iFace] * ns[iFace];
+
+        dqdx[le] += qfc * nx;
+        dqdy[le] += qfc * ny;
+        dqdz[le] += qfc * nz;
+        dqdx[re] -= qfc * nx;
+        dqdy[re] -= qfc * ny;
+        dqdz[re] -= qfc * nz;
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        RDouble ovol = one / vol[iCell];
+        dqdx[iCell] *= ovol;
+        dqdy[iCell] *= ovol;
+        dqdz[iCell] *= ovol;
+    }
+}
+
+void UnstructGrid::CompGradientGGCell2(RDouble *q, RDouble *wfL, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    RDouble *nxs, *nys, *nzs, *ns, *vol;
+
+    nxs = this->GetFaceNormalX();
+    nys = this->GetFaceNormalY();
+    nzs = this->GetFaceNormalZ();
+    ns = this->GetFaceArea();
+    vol = this->GetCellVolume();
+
+    int *leftCellofFace = this->GetLeftCellOfFace();
+    int *rightCellofFace = this->GetRightCellOfFace();
+
+    int nTotalCell = this->GetNTotalCell();
+    int nTotalFace = this->GetNTotalFace();
+    int nBoundFace = this->GetNBoundFace();
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        dqdx[iCell] = 0.0;
+        dqdy[iCell] = 0.0;
+        dqdz[iCell] = 0.0;
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellofFace[iFace];
+        int re = iFace + nTotalCell;
+
+        RDouble qfc = q[re]; 
+        int bcType = bcr[iFace]->GetKey();
+        if (bcType == PHENGLEI::INTERFACE)
+        {
+            qfc = wfL[iFace] * q[le] + (1.0 - wfL[iFace]) * q[re];
+        }
+        RDouble nx = nxs[iFace] * ns[iFace];
+        RDouble ny = nys[iFace] * ns[iFace];
+        RDouble nz = nzs[iFace] * ns[iFace];
+        dqdx[le] += qfc * nx;
+        dqdy[le] += qfc * ny;
+        dqdz[le] += qfc * nz;
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellofFace[iFace];
+        int re = rightCellofFace[iFace];
+
+        RDouble nx = nxs[iFace] * ns[iFace];
+        RDouble ny = nys[iFace] * ns[iFace];
+        RDouble nz = nzs[iFace] * ns[iFace];
+
+        RDouble qfc = wfL[iFace] * q[le] + (1.0 - wfL[iFace]) * q[re];
+        dqdx[le] += qfc * nx;
+        dqdy[le] += qfc * ny;
+        dqdz[le] += qfc * nz;
+        dqdx[re] -= qfc * nx;
+        dqdy[re] -= qfc * ny;
+        dqdz[re] -= qfc * nz;
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        RDouble ovol = one / vol[iCell];
+        dqdx[iCell] *= ovol;
+        dqdy[iCell] *= ovol;
+        dqdz[iCell] *= ovol;
+    }
+
+    UnstructBCSet **bcr = this->GetBCRecord();
+    for (int iFace = 0; iFace < nBoundFace; iFace++)
+    {
+        int bcType = bcr[iFace]->GetKey();
+        if (bcType == PHENGLEI::INTERFACE)
+        {
+            continue;
+        }
+        int le = leftCellofFace[iFace];
+        int re = rightCellofFace[iFace];
+        dqdx[re] = dqdx[le];
+        dqdy[re] = dqdy[le];
+        dqdz[re] = dqdz[le];
+    }
+}
+
+void UnstructGrid::CompGradientGGCellNew(RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    RDouble *nxs,*nys,*nzs,*ns,*vol;
+
+    nxs = this->GetFaceNormalX();
+    nys = this->GetFaceNormalY();
+    nzs = this->GetFaceNormalZ();
+    ns  = this->GetFaceArea() ;
+    vol = this->GetCellVolume();
+
+    int * leftCellOfFace = this->GetLeftCellOfFace();
+    int * rightCellOfFace = this->GetRightCellOfFace();
+
+    int nTotalCell = this->GetNTotalCell();
+    int nTotalFace = this->GetNTotalFace();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        dqdx[iCell] = 0.0;
+        dqdy[iCell] = 0.0;
+        dqdz[iCell] = 0.0;
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellOfFace[ iFace ];
+        int re = iFace + nTotalCell;
+
+        RDouble qfc = half * (q[le] + q[re]);
+        RDouble nx  = nxs[iFace] * ns[iFace];
+        RDouble ny  = nys[iFace] * ns[iFace];
+        RDouble nz  = nzs[iFace] * ns[iFace];
+        dqdx[le] += qfc * nx;
+        dqdy[le] += qfc * ny;
+        dqdz[le] += qfc * nz;
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace [ iFace ];
+        int re = rightCellOfFace[ iFace ];
+
+        RDouble qfc = half * (q[le] + q[re]);
+
+        RDouble qfl = qfc;
+        RDouble qfr = qfc;
+
+        if (ABS(q[re] - q[le]) > 1.0e-1)
+        {
+            qfl = q[le];
+            qfr = q[re];
+        }
+
+        RDouble nx  = nxs[iFace] * ns[iFace];
+        RDouble ny  = nys[iFace] * ns[iFace];
+        RDouble nz  = nzs[iFace] * ns[iFace];
+
+        dqdx[le] += qfl * nx;
+        dqdy[le] += qfl * ny;
+        dqdz[le] += qfl * nz;
+        dqdx[re] -= qfr * nx;
+        dqdy[re] -= qfr * ny;
+        dqdz[re] -= qfr * nz;
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        RDouble ovol = one / vol[iCell];
+        dqdx[iCell] *= ovol;
+        dqdy[iCell] *= ovol;
+        dqdz[iCell] *= ovol;
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellOfFace[ iFace ];
+        int re = iFace + nTotalCell;
+
+        dqdx[re] = dqdx[le];
+        dqdy[re] = dqdy[le];
+        dqdz[re] = dqdz[le];
+    }
+
+}
+
+void UnstructGrid::CompGradientGGCellW(RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    int nTotalCell = this->GetNTotalCell();
+    int nTotalFace = this->GetNTotalFace();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble *xfn  = this->GetFaceNormalX();
+    RDouble *yfn  = this->GetFaceNormalY();
+    RDouble *zfn  = this->GetFaceNormalZ();
+    RDouble *area = this->GetFaceArea();
+    RDouble *vol  = this->GetCellVolume();
+
+    RDouble *xfc  = this->GetFaceCenterX();
+    RDouble *yfc  = this->GetFaceCenterY();
+    RDouble *zfc  = this->GetFaceCenterZ();
+    RDouble *xcc  = this->GetCellCenterX();
+    RDouble *ycc  = this->GetCellCenterY();
+    RDouble *zcc  = this->GetCellCenterZ();
+
+    int * leftCellOfFace = this->GetLeftCellOfFace();
+    int * rightCellOfFace = this->GetRightCellOfFace();
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        dqdx[iCell] = 0.0;
+        dqdy[iCell] = 0.0;
+        dqdz[iCell] = 0.0;
+    }
+
+    RDouble dxl,dyl,dzl,dxr,dyr,dzr;
+    RDouble delt1,delt2,delta,cl,cr;
+    RDouble fc;
+    RDouble ovol;
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace [ iFace ];
+        int re = rightCellOfFace[ iFace ];
+
+        dxl = xfc[iFace] - xcc[le];
+        dyl = yfc[iFace] - ycc[le];
+        dzl = zfc[iFace] - zcc[le];
+
+        dxr = xfc[iFace] - xcc[re];
+        dyr = yfc[iFace] - ycc[re];
+        dzr = zfc[iFace] - zcc[re];
+
+        delt1  = sqrt(dxl * dxl + dyl * dyl + dzl * dzl);
+        delt2  = sqrt(dxr * dxr + dyr * dyr + dzr * dzr);
+        delta  = one / (delt1 + delt2 + SMALL);
+        cl    = delt2 * delta;
+        cr    = delt1 * delta;
+
+        fc = cl * q[le] + cr * q[re];
+        RDouble nx  = xfn[iFace] * area[iFace];
+        RDouble ny  = yfn[iFace] * area[iFace];
+        RDouble nz  = zfn[iFace] * area[iFace];
+
+        dqdx[le] += nx * fc;
+        dqdy[le] += ny * fc;
+        dqdz[le] += nz * fc;
+
+        if (iFace >= nBoundFace)
+        {
+            dqdx[re] -= nx * fc;
+            dqdy[re] -= ny * fc;
+            dqdz[re] -= nz * fc;
+        }
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        ovol = one / vol[iCell];
+        dqdx[iCell] *= ovol;
+        dqdy[iCell] *= ovol;
+        dqdz[iCell] *= ovol;
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellOfFace[ iFace ];
+        int re = iFace + nTotalCell;
+
+        dqdx[re] = dqdx[le];
+        dqdy[re] = dqdy[le];
+        dqdz[re] = dqdz[le];
+    }
+}
+
+void UnstructGrid::CompFaceGradient(RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    int nTotalNode = this->GetNTotalNode();
+    RDouble *qn = new RDouble [nTotalNode];
+
+    CompNodeVar(this, qn, q);
+
+    if (this->GetDim() == TWO_D)
+    {
+        CompFaceGradientGauss2D(q, qn, dqdx, dqdy, dqdz);
+    }
+    else
+    {
+        CompFaceGradientGauss(q, qn, dqdx, dqdy, dqdz);
+    }
+
+    delete [] qn;
+}
+
+void UnstructGrid::CompFaceGradientGauss2D(RDouble *q, RDouble *qn, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    int * leftCellOfFace = this->GetLeftCellOfFace();
+    int * rightCellOfFace = this->GetRightCellOfFace();
+
+    int nTotalFace = this->GetNTotalFace();
+
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    int *face2node = this->GetFace2Node();
+    int *node_number_of_each_face = this->GetNodeNumberOfEachFace();
+
+    RDouble * xfn  = this->GetFaceNormalX();
+    RDouble * yfn  = this->GetFaceNormalY();
+    RDouble * zfn  = this->GetFaceNormalZ();
+    RDouble * area = this->GetFaceArea();
+
+    RDouble * xcc  = this->GetCellCenterX();
+    RDouble * ycc  = this->GetCellCenterY();
+    RDouble * zcc  = this->GetCellCenterZ();
+
+    RDouble dx, dy, dz, dh, ovol;
+    RDouble anx,any,anz;
+    RDouble qfc;
+    int le,re,p1,p2;
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [ iFace ];
+        re = rightCellOfFace[ iFace ];
+
+        dx = xcc[re] - xcc[le];
+        dy = ycc[re] - ycc[le];
+        dz = zcc[re] - zcc[le];
+
+        dh = dx * xfn[iFace] + dy * yfn[iFace] + dz * zfn[iFace];
+        ovol = one / (half * area[iFace] * dh);
+
+        dqdx[iFace] = 0.0;
+        dqdy[iFace] = 0.0;
+        dqdz[iFace] = 0.0;
+
+        p1 = face2node[ nodepos + 0 ];
+        p2 = face2node[ nodepos + 1 ];
+
+        qfc = half * (qn[p1] + q[re]);
+
+        anx = ycc[re] - y[p1];
+        any = x[p1] - xcc[re];
+        anz = 0.0;
+
+        dqdx[iFace] += qfc * anx;
+        dqdy[iFace] += qfc * any;
+        dqdz[iFace] += qfc * anz;
+
+        qfc = half * (qn[p2] + q[re]);
+
+        anx = y[p2] - ycc[re];
+        any = xcc[re] - x[p2];
+        anz = 0.0;
+
+        dqdx[iFace] += qfc * anx;
+        dqdy[iFace] += qfc * any;
+        dqdz[iFace] += qfc * anz;
+
+        qfc = half * (qn[p1] + q[le]);
+
+        anx = ycc[le] - y[p1];
+        any = x[p1] - xcc[le];
+        anz = 0.0;
+
+        dqdx[iFace] -= qfc * anx;
+        dqdy[iFace] -= qfc * any;
+        dqdz[iFace] -= qfc * anz;
+
+        qfc = half * (qn[p2] + q[le]);
+
+        anx = y[p2] - ycc[le];
+        any = xcc[le] - x[p2];
+        anz = 0.0;
+
+        dqdx[iFace] -= qfc * anx;
+        dqdy[iFace] -= qfc * any;
+        dqdz[iFace] -= qfc * anz;
+
+        dqdx[iFace] *= ovol;
+        dqdy[iFace] *= ovol;
+        dqdz[iFace] *= ovol;
+        nodepos += node_number_of_each_face[iFace];
+    }
+}
+
+void UnstructGrid::CompFaceGradientGauss(RDouble *q, RDouble *qn, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    int * leftCellOfFace = this->GetLeftCellOfFace();
+    int * rightCellOfFace = this->GetRightCellOfFace();
+
+    int nTotalFace = this->GetNTotalFace();
+
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+    int *face2node = this->GetFace2Node();
+    int *node_number_of_each_face = this->GetNodeNumberOfEachFace();
+
+    RDouble * xcc  = this->GetCellCenterX();
+    RDouble * ycc  = this->GetCellCenterY();
+    RDouble * zcc  = this->GetCellCenterZ();
+
+    RDouble vvol = 0.0;
+    RDouble dx1 = 0.0, dy1 = 0.0, dz1 = 0.0, dx2 = 0.0, dy2 = 0.0, dz2 = 0.0;
+    RDouble xc = 0.0, yc = 0.0, zc = 0.0, anx = 0.0, any = 0.0, anz = 0.0;
+    RDouble fc = 0.0, tmp = 0.0, coef = 0.0;
+    int le = 0, re = 0, p1 = 0, p2 = 0, id1 = 0, id2 = 0;
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [ iFace ];
+        re = rightCellOfFace[ iFace ];
+
+        vvol        = 0.0;
+        dqdx[iFace] = 0.0;
+        dqdy[iFace] = 0.0;
+        dqdz[iFace] = 0.0;
+
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            id1 = j;
+            id2 = (j + 1) % node_number_of_each_face[iFace];
+            p1 = face2node[ nodepos + id1 ];
+            p2 = face2node[ nodepos + id2 ];
+
+            dx1 = x[p2] - x[p1];
+            dy1 = y[p2] - y[p1];
+            dz1 = z[p2] - z[p1];
+
+            dx2 = x[p1] - xcc[le];
+            dy2 = y[p1] - ycc[le];
+            dz2 = z[p1] - zcc[le];
+
+            anx = dy1 * dz2 - dy2 * dz1;
+            any = dz1 * dx2 - dz2 * dx1;
+            anz = dx1 * dy2 - dx2 * dy1;
+
+            fc = qn[p1] + qn[p2] + q[le];
+
+            //! Face centers.
+            xc = xcc[le] + x[p1] + x[p2];
+            yc = ycc[le] + y[p1] + y[p2];
+            zc = zcc[le] + z[p1] + z[p2];
+
+            tmp   = anx * xc + any * yc + anz * zc;
+            vvol -= tmp;
+
+            dqdx[iFace] += anx * fc;
+            dqdy[iFace] += any * fc;
+            dqdz[iFace] += anz * fc;
+
+
+            dx1 = x[p2] - x[p1];
+            dy1 = y[p2] - y[p1];
+            dz1 = z[p2] - z[p1];
+
+            dx2 = xcc[re] - x[p1];
+            dy2 = ycc[re] - y[p1];
+            dz2 = zcc[re] - z[p1];
+
+            fc = qn[p1] + qn[p2] + q[le];
+
+            //! Face centers.
+            xc = xcc[re] + x[p1] + x[p2];
+            yc = ycc[re] + y[p1] + y[p2];
+            zc = zcc[re] + z[p1] + z[p2];
+
+            anx = dy1 * dz2 - dy2 * dz1;
+            any = dz1 * dx2 - dz2 * dx1;
+            anz = dx1 * dy2 - dx2 * dy1;
+
+            tmp   = anx * xc + any * yc + anz * zc;
+            vvol -= tmp;
+
+            dqdx[iFace] += anx * fc;
+            dqdy[iFace] += any * fc;
+            dqdz[iFace] += anz * fc;
+        }
+
+        coef = three / vvol;
+        dqdx[iFace] *= coef;
+        dqdy[iFace] *= coef;
+        dqdz[iFace] *= coef;
+        nodepos += node_number_of_each_face[iFace];
+    }
+}
+
+void UnstructGrid::ComputeWeight()
+{
+    string gradientName = "lsq";
+    GetData("gradientName", &gradientName, PHSTRING, 1);
+    if (gradientName != "lsq") return;
+    int nTotalCell = this->GetNTotalCell();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalFace = this->GetNTotalFace();
+
+    RDouble *xcc = this->GetCellCenterX();
+    RDouble *ycc = this->GetCellCenterY();
+    RDouble *zcc = this->GetCellCenterZ();
+
+    if (!this->GetLeastSquareIWT()) this->SetLeastSquareIWT(new RDouble [ nTotalFace ]);
+    if (!this->GetLeastSquareIXX()) this->SetLeastSquareIXX(new RDouble [ nTotalCell ]);
+    if (!this->GetLeastSquareIYY()) this->SetLeastSquareIYY(new RDouble [ nTotalCell ]);
+    if (!this->GetLeastSquareIZZ()) this->SetLeastSquareIZZ(new RDouble [ nTotalCell ]);
+    if (!this->GetLeastSquareIXY()) this->SetLeastSquareIXY(new RDouble [ nTotalCell ]);
+    if (!this->GetLeastSquareIXZ()) this->SetLeastSquareIXZ(new RDouble [ nTotalCell ]);
+    if (!this->GetLeastSquareIYZ()) this->SetLeastSquareIYZ(new RDouble [ nTotalCell ]);
+    if (!this->GetFaceMark()) this->SetFaceMark(new char [ nTotalFace ]);
+
+    RDouble *iwt   = this->GetLeastSquareIWT();
+    RDouble *ixx   = this->GetLeastSquareIXX();
+    RDouble *iyy   = this->GetLeastSquareIYY();
+    RDouble *izz   = this->GetLeastSquareIZZ();
+    RDouble *ixy   = this->GetLeastSquareIXY();
+    RDouble *ixz   = this->GetLeastSquareIXZ();
+    RDouble *iyz   = this->GetLeastSquareIYZ();
+    char    *fMark = this->GetFaceMark();
+
+    int *leftCellOfFace   = this->GetLeftCellOfFace();
+    int *rightCellOfFace  = this->GetRightCellOfFace();
+    
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        fMark[iFace] = 1;
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        ixx[iCell] = 0.0;
+        iyy[iCell] = 0.0;
+        izz[iCell] = 0.0;
+        ixy[iCell] = 0.0;
+        ixz[iCell] = 0.0;
+        iyz[iCell] = 0.0;
+    }
+
+    int le, re;
+
+    RDouble dx,dy,dz,txx,tyy,tzz,txy,txz,tyz;
+    RDouble ods;
+  
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace[ iFace ];
+        re = iFace + nTotalCell;
+
+        dx = (xcc[re] - xcc[le]) * fMark[iFace];
+        dy = (ycc[re] - ycc[le]) * fMark[iFace];
+        dz = (zcc[re] - zcc[le]) * fMark[iFace];
+
+        ods = one / (dx * dx + dy * dy + dz * dz + SMALL);
+
+        txx = ods * dx * dx;
+        tyy = ods * dy * dy;
+        tzz = ods * dz * dz;
+        txy = ods * dx * dy;
+        txz = ods * dx * dz;
+        tyz = ods * dy * dz;
+
+        iwt[iFace]  = ods;
+        ixx[le] += txx;
+        iyy[le] += tyy;
+        izz[le] += tzz;
+        ixy[le] += txy;
+        ixz[le] += txz;
+        iyz[le] += tyz;
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le       = leftCellOfFace [ iFace ];
+        re       = rightCellOfFace[ iFace ];
+
+        dx       = (xcc[re] - xcc[le]) * fMark[iFace];
+        dy       = (ycc[re] - ycc[le]) * fMark[iFace];
+        dz       = (zcc[re] - zcc[le]) * fMark[iFace];
+
+        ods = one / (dx * dx + dy * dy + dz * dz + SMALL);
+
+        txx      = ods * dx * dx;
+        tyy      = ods * dy * dy;
+        tzz      = ods * dz * dz;
+        txy      = ods * dx * dy;
+        txz      = ods * dx * dz;
+        tyz      = ods * dy * dz;
+
+        iwt[iFace]  = ods;
+
+        ixx[le] += txx;
+        iyy[le] += tyy;
+        izz[le] += tzz;
+        ixy[le] += txy;
+        ixz[le] += txz;
+        iyz[le] += tyz;
+
+        ixx[re] += txx;
+        iyy[re] += tyy;
+        izz[re] += tzz;
+        ixy[re] += txy;
+        ixz[re] += txz;
+        iyz[re] += tyz;
+    }
+
+    RDouble delt = 0.0, odelt = 0.0;
+
+    if (this->GetDim() == THREE_D)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            txx = ixx[iCell];
+            tyy = iyy[iCell];
+            tzz = izz[iCell];
+            txy = ixy[iCell];
+            txz = ixz[iCell];
+            tyz = iyz[iCell];
+          
+            delt = (txx * tyy * tzz
+                  + 2.0 * txy * txz * tyz 
+                  - txx * tyz * tyz
+                  - tyy * txz * txz
+                  - tzz * txy * txy);
+
+            if (ABS(delt) < SMALL)
+            {
+                ixx[iCell] = 0.0;
+                iyy[iCell] = 0.0;
+                izz[iCell] = 0.0;
+                ixy[iCell] = 0.0;
+                ixz[iCell] = 0.0;
+                iyz[iCell] = 0.0;
+            }
+            else
+            {
+                odelt = one / delt;
+                ixx[iCell] = (tyy * tzz - tyz * tyz) * odelt;
+                iyy[iCell] = (txx * tzz - txz * txz) * odelt;
+                izz[iCell] = (txx * tyy - txy * txy) * odelt;
+                ixy[iCell] = (txz * tyz - txy * tzz) * odelt;
+                ixz[iCell] = (txy * tyz - txz * tyy) * odelt;
+                iyz[iCell] = (txy * txz - tyz * txx) * odelt;
+           }
+        }
+    }
+    else
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            txx = ixx[iCell];
+            tyy = iyy[iCell];
+            txy = ixy[iCell];
+
+            delt = txx * tyy - txy * txy;
+
+            if (ABS(delt) < SMALL)
+            {
+                ixx[iCell] = 0.0;
+                iyy[iCell] = 0.0;
+                izz[iCell] = 0.0;
+                ixy[iCell] = 0.0;
+                ixz[iCell] = 0.0;
+                iyz[iCell] = 0.0;
+            }
+            else
+            {
+                odelt = one / delt;
+
+                ixx[iCell] = (  tyy) * odelt;
+                iyy[iCell] = (  txx) * odelt;
+                ixy[iCell] = (- txy) * odelt;
+                izz[iCell] = 0.0;
+                ixz[iCell] = 0.0;
+                iyz[iCell] = 0.0;
+            }
+        }
+    }
+}
+
+LIB_EXPORT void UnstructGrid::ComputeNodeBCType()
+{
+    long long int *face2NodeSubscript = this->GetFace2NodeSubscript();
+    int *face2node = this->GetFace2Node();
+
+    int *nodeBCType = reinterpret_cast <int *> (this->GetDataPtr("nodeBCType"));
+    int *nodeBCTypeIndex = new int[nTotalNode];
+    PHSPACE::SetField(nodeBCTypeIndex, 0, nTotalNode);
+
+    using namespace PHENGLEI;
+
+    map<int, int> bcTypeMap;
+    bcTypeMap.insert(pair<int,int>(SOLID_SURFACE   , 4));
+    bcTypeMap.insert(pair<int,int>(FARFIELD        , 3));
+    bcTypeMap.insert(pair<int,int>(SYMMETRY        , 2));
+    bcTypeMap.insert(pair<int,int>(INTERFACE       , 1));
+    bcTypeMap.insert(pair<int,int>(INFLOW          , 1));
+    bcTypeMap.insert(pair<int,int>(OUTFLOW         , 1));
+    bcTypeMap.insert(pair<int,int>(PRESSURE_INLET  , 1));
+    bcTypeMap.insert(pair<int,int>(PRESSURE_OUTLET , 1));
+    bcTypeMap.insert(pair<int,int>(OUTFLOW_CONFINED, 1));
+
+    UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+
+        int bcType = bcRegion->GetBCType();
+        int bcTypeIndex = bcTypeMap[bcType];
+
+        for (int iNode = static_cast<int>(face2NodeSubscript[iFace]); iNode < face2NodeSubscript[iFace + 1]; ++ iNode)
+        {
+            int nodeIndex = face2node[iNode];
+            if (bcTypeIndex > nodeBCTypeIndex[nodeIndex])
+            {
+                nodeBCType[nodeIndex]      = bcType;
+                nodeBCTypeIndex[nodeIndex] = bcTypeIndex;
+            }
+        }
+    }
+
+    delete[] nodeBCTypeIndex;    nodeBCTypeIndex = nullptr;
+}
+
+void UnstructGrid::CompGradientLSQ(RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    RDouble *xcc = this->GetCellCenterX();
+    RDouble *ycc = this->GetCellCenterY();
+    RDouble *zcc = this->GetCellCenterZ();
+    RDouble *iwt = this->GetLeastSquareIWT();
+    RDouble *ixx = this->GetLeastSquareIXX();
+    RDouble *iyy = this->GetLeastSquareIYY();
+    RDouble *izz = this->GetLeastSquareIZZ();
+    RDouble *ixy = this->GetLeastSquareIXY();
+    RDouble *ixz = this->GetLeastSquareIXZ();
+    RDouble *iyz = this->GetLeastSquareIYZ();
+    char * fMark  = this->GetFaceMark();
+
+    int *leftCellOfFace = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+
+    int nTotalCell = this->GetNTotalCell();
+    int nTotalFace = this->GetNTotalFace();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        dqdx[iCell] = 0.0;
+        dqdy[iCell] = 0.0;
+        dqdz[iCell] = 0.0;
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellOfFace[ iFace ];
+        int re = iFace + nTotalCell;
+        RDouble dx = xcc[re] - xcc[le];
+        RDouble dy = ycc[re] - ycc[le];
+        RDouble dz = zcc[re] - zcc[le];
+ 
+        RDouble dq   = iwt[iFace] * (q[re] - q[le]) * fMark[iFace];
+        RDouble tmpx = dq * dx;
+        RDouble tmpy = dq * dy;
+        RDouble tmpz = dq * dz;
+        dqdx[le] += tmpx;
+        dqdy[le] += tmpy;
+        dqdz[le] += tmpz;
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace [ iFace ];
+        int re = rightCellOfFace[ iFace ];
+
+        RDouble dx = xcc[re] - xcc[le];
+        RDouble dy = ycc[re] - ycc[le];
+        RDouble dz = zcc[re] - zcc[le];
+ 
+        RDouble dq = iwt[iFace] * (q[re] - q[le]) * fMark[iFace];
+
+        RDouble tmpx = dq * dx;
+        RDouble tmpy = dq * dy;
+        RDouble tmpz = dq * dz;
+
+        dqdx[le] += tmpx;
+        dqdy[le] += tmpy;
+        dqdz[le] += tmpz;
+
+        dqdx[re] += tmpx;
+        dqdy[re] += tmpy;
+        dqdz[re] += tmpz;
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        RDouble tmpx    = dqdx[iCell];
+        RDouble tmpy    = dqdy[iCell];
+        RDouble tmpz    = dqdz[iCell];
+
+        dqdx[iCell] = ixx[iCell] * tmpx + ixy[iCell] * tmpy + ixz[iCell] * tmpz;
+        dqdy[iCell] = ixy[iCell] * tmpx + iyy[iCell] * tmpy + iyz[iCell] * tmpz;
+        dqdz[iCell] = ixz[iCell] * tmpx + iyz[iCell] * tmpy + izz[iCell] * tmpz;
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellOfFace[ iFace ];
+        int re = iFace + nTotalCell;
+        dqdx[re] = dqdx[le];
+        dqdy[re] = dqdy[le];
+        dqdz[re] = dqdz[le];
+    }
+}
+
+void UnstructGrid::CompGradientGGNode(RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    RDouble *faceNormalX = this->GetFaceNormalX();
+    RDouble *faceNormalY = this->GetFaceNormalY();
+    RDouble *faceNormalZ = this->GetFaceNormalZ();
+    RDouble *faceArea  = this->GetFaceArea() ;
+    RDouble *volume   = this->GetCellVolume();
+
+    int *leftCellOfFace  = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+
+    int *nodeNumberOfEachFace = this->GetNodeNumberOfEachFace();
+    int *face2node = this->GetFace2Node();
+
+    int nTotalNode = this->GetNTotalNode();
+    int nTotalCell = this->GetNTotalCell();
+    int nTotalFace = this->GetNTotalFace();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;    
+
+    RDouble *qNode = new RDouble [nTotalNode]();
+
+    string gradientName = GlobalDataBase::GetStrParaFromDB("gradientName");
+    if (gradientName == "ggnode")
+    {
+        CompNodeVar(this, qNode, q);
+    }
+    else if (gradientName == "ggnodelaplacian")
+    {
+        CompNodeVar_new(this, qNode, q);
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("gradientName", gradientName);
+    }
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        dqdx[iCell] = 0.0;
+        dqdy[iCell] = 0.0;
+        dqdz[iCell] = 0.0;
+    }
+
+    int nodePosition = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellOfFace [iFace];
+
+        RDouble qFaceCenter = 0.0;
+        for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+        {
+            int nodeID = face2node[nodePosition + jNode];
+            qFaceCenter += qNode[nodeID];
+        }
+        nodePosition += nodeNumberOfEachFace[iFace];
+        qFaceCenter /= nodeNumberOfEachFace[iFace];
+
+        RDouble area = faceArea[iFace];
+        RDouble nx = faceNormalX[iFace] * area;
+        RDouble ny = faceNormalY[iFace] * area;
+        RDouble nz = faceNormalZ[iFace] * area;
+
+        dqdx[le] += qFaceCenter * nx;
+        dqdy[le] += qFaceCenter * ny;
+        dqdz[le] += qFaceCenter * nz;
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace [iFace];
+        int re = rightCellOfFace[iFace];
+
+        RDouble qFaceCenter = 0.0;
+        for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+        {
+            int nodeID = face2node[nodePosition + jNode];
+            qFaceCenter += qNode[nodeID];
+        }
+        nodePosition += nodeNumberOfEachFace[iFace];
+        qFaceCenter /= nodeNumberOfEachFace[iFace];
+
+        RDouble area = faceArea[iFace];
+        RDouble nx = faceNormalX[iFace] * area;
+        RDouble ny = faceNormalY[iFace] * area;
+        RDouble nz = faceNormalZ[iFace] * area;
+
+        dqdx[le] += qFaceCenter * nx;
+        dqdy[le] += qFaceCenter * ny;
+        dqdz[le] += qFaceCenter * nz;
+
+        dqdx[re] -= qFaceCenter * nx;
+        dqdy[re] -= qFaceCenter * ny;
+        dqdz[re] -= qFaceCenter * nz;
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        dqdx[iCell] /= volume[iCell];
+        dqdy[iCell] /= volume[iCell];
+        dqdz[iCell] /= volume[iCell];
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellOfFace [iFace];
+        int re = rightCellOfFace[iFace];
+
+        dqdx[re] = dqdx[le];
+        dqdy[re] = dqdy[le];
+        dqdz[re] = dqdz[le];
+    }
+
+    delete []qNode;    qNode = NULL;
+}
+
+void UnstructGrid::CompGradientGGNode_NEW(RDouble *q, RDouble *qnode, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    RDouble *nxs,*nys,*nzs,*ns,*vol;
+
+    nxs = this->GetFaceNormalX();
+    nys = this->GetFaceNormalY();
+    nzs = this->GetFaceNormalZ();
+    ns  = this->GetFaceArea();
+    vol = this->GetCellVolume();
+
+    int * left_cell_of_face = this->GetLeftCellOfFace();
+    int * right_cell_of_face = this->GetRightCellOfFace();
+
+    int *node_number_of_each_face = this->GetNodeNumberOfEachFace();
+    int **face2nodeArray          = this->GetFace2NodeArray();
+
+    int nTotalCell = this->GetNTotalCell();
+    int nTotalFace = this->GetNTotalFace();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        dqdx[iCell] = 0.0;
+        dqdy[iCell] = 0.0;
+        dqdz[iCell] = 0.0;
+    }
+
+    UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = left_cell_of_face[ iFace ];
+        int re = iFace + nTotalCell;
+
+        RDouble qFace = 0.0;
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        int bcType = bcRegion->GetBCType();
+       
+        if (bcType == PHENGLEI::SYMMETRY || bcType == PHENGLEI::INTERFACE)
+        {
+            for (int jNode = 0; jNode < node_number_of_each_face[iFace]; ++ jNode)
+            {
+                int index = face2nodeArray[iFace][jNode];
+                qFace += qnode[index];
+            }
+            qFace /= node_number_of_each_face[iFace];
+        }
+        else
+        {
+            qFace = half * (q[le] + q[re]);
+        }
+
+        RDouble nx  = nxs[iFace] * ns[iFace];
+        RDouble ny  = nys[iFace] * ns[iFace];
+        RDouble nz  = nzs[iFace] * ns[iFace];
+
+        dqdx[le] += qFace * nx;
+        dqdy[le] += qFace * ny;
+        dqdz[le] += qFace * nz;
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = left_cell_of_face [ iFace ];
+        int re = right_cell_of_face[ iFace ];
+
+        RDouble qFace = 0.0;
+        for (int jNode = 0; jNode < node_number_of_each_face[iFace]; ++ jNode)
+        {
+            int index = face2nodeArray[iFace][jNode];
+            qFace += qnode[index];
+        }
+        qFace /= node_number_of_each_face[iFace];
+
+        RDouble nx = nxs[iFace] * ns[iFace];
+        RDouble ny = nys[iFace] * ns[iFace];
+        RDouble nz = nzs[iFace] * ns[iFace];
+
+        dqdx[le] += qFace * nx;
+        dqdy[le] += qFace * ny;
+        dqdz[le] += qFace * nz;
+
+        dqdx[re] -= qFace * nx;
+        dqdy[re] -= qFace * ny;
+        dqdz[re] -= qFace * nz;
+    } 
+
+
+    //! Average volume.
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        dqdx[iCell] /= vol[iCell];
+        dqdy[iCell] /= vol[iCell];
+        dqdz[iCell] /= vol[iCell];
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = left_cell_of_face[ iFace ];
+        int re = iFace + nTotalCell;
+
+        dqdx[re] = dqdx[le];
+        dqdy[re] = dqdy[le];
+        dqdz[re] = dqdz[le];
+    }
+}
+
+void UnstructGrid::CompGradient(RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    string gradientName = GlobalDataBase::GetStrParaFromDB("gradientName");
+    if (gradientName == "ggnode" || gradientName == "ggnodelaplacian")
+    {
+        CompGradientGGNode(q, dqdx, dqdy, dqdz);
+    }
+    else if (gradientName == "ggcell")
+    {
+        CompGradientGGCell(q, dqdx, dqdy, dqdz);
+    }
+    else if (gradientName == "lsq")
+    {
+        CompGradientLSQ(q, dqdx, dqdy, dqdz);
+    }
+    else if (gradientName == "ggnode_weight")
+    {
+        CompGradientGGNodeWeight(q, dqdx, dqdy, dqdz);
+    }
+    else if (gradientName == "gg_m2")
+    {
+        CompGradientGGModified2(q, dqdx, dqdy, dqdz);
+    }
+    else if (gradientName == "ggcellnew")
+    {
+        CompGradientGGCellNew(q, dqdx, dqdy, dqdz);
+    }
+    else if (gradientName == "ggcellw")
+    {
+        CompGradientGGCellW(q, dqdx, dqdy, dqdz);
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("No reconstruction method has been choosed ! /n");
+    }
+}
+
+/************************************************************************/
+/*             Green-Gausse node based method reconstruction            */
+/*                       ggnode weighted by distance                    */
+/*                          Bell 20121220 add                           */
+/************************************************************************/
+//! There is no distance weight when face to node.
+void UnstructGrid::CompGradientGGNodeWeight(RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    RDouble *nxs, *nys, *nzs, *ns, *vol;
+
+    nxs = this->GetFaceNormalX();
+    nys = this->GetFaceNormalY();
+    nzs = this->GetFaceNormalZ();
+    ns  = this->GetFaceArea();
+    vol = this->GetCellVolume();
+
+    int *leftCellOfFace = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+
+    int *node_number_of_each_face = this->GetNodeNumberOfEachFace();
+    int *face2node = this->GetFace2Node();
+
+    int nTotalCell = this->GetNTotalCell();
+    int nTotalFace = this->GetNTotalFace();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    int nTotalNode = this->GetNTotalNode();
+
+    RDouble *q_n = new RDouble [nTotalNode];
+    CompNodeVarWeight(this, q_n, q);
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        dqdx[iCell] = 0.0;
+        dqdy[iCell] = 0.0;
+        dqdz[iCell] = 0.0;
+    }
+
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellOfFace[iFace];
+
+        RDouble qfc = 0.0;
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            int index = face2node[nodepos + j];
+            qfc += q_n[index];
+        }
+        nodepos += node_number_of_each_face[iFace];
+        qfc /= node_number_of_each_face[iFace];
+
+        RDouble nx = nxs[iFace] * ns[iFace];
+        RDouble ny = nys[iFace] * ns[iFace];
+        RDouble nz = nzs[iFace] * ns[iFace];
+
+        dqdx[le] += qfc * nx;
+        dqdy[le] += qfc * ny;
+        dqdz[le] += qfc * nz;
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace [ iFace ];
+        int re = rightCellOfFace[ iFace ];
+
+        RDouble qfc = 0.0;
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            int index = face2node[nodepos + j];
+            qfc += q_n[index];
+        }
+        nodepos += node_number_of_each_face[iFace];
+        qfc /= node_number_of_each_face[iFace];
+
+        RDouble nx = nxs[iFace] * ns[iFace];
+        RDouble ny = nys[iFace] * ns[iFace];
+        RDouble nz = nzs[iFace] * ns[iFace];
+
+        dqdx[le] += qfc * nx;
+        dqdy[le] += qfc * ny;
+        dqdz[le] += qfc * nz;
+
+        dqdx[re] -= qfc * nx;
+        dqdy[re] -= qfc * ny;
+        dqdz[re] -= qfc * nz;
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        dqdx[iCell] /= vol[iCell];
+        dqdy[iCell] /= vol[iCell];
+        dqdz[iCell] /= vol[iCell];
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellOfFace[iFace];
+        int re = iFace + nTotalCell;
+
+        dqdx[re] = dqdx[le];
+        dqdy[re] = dqdy[le];
+        dqdz[re] = dqdz[le];
+    }
+
+    delete [] q_n;
+}
+
+void UnstructGrid::GetCellCenter(ActionKey *actkey)
+{
+    InterfaceInfo * interfaceInfo = this->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    int ineighbor = interfaceInfo->FindIthNeighbor(actkey->ipos);
+    int nIFaceOfNeighbor = interfaceInfo->GetNIFaceOfNeighbor(ineighbor);
+    int *faceIndexForSend = interfaceInfo->GetFaceIndexForSend(ineighbor);
+
+    DataContainer * cdata = actkey->GetData();
+    cdata->moveto_begin();
+
+    RDouble * xcc = this->GetCellCenterX();
+    RDouble * ycc = this->GetCellCenterY();
+    RDouble * zcc = this->GetCellCenterZ();
+    RDouble * vol = this->GetCellVolume();
+
+    int iFace,s1;
+    for (int iLocalFace = 0; iLocalFace < nIFaceOfNeighbor; ++ iLocalFace)
+    {
+        iFace = faceIndexForSend[iLocalFace];
+        this->GetSourceIndex(iFace, 1, s1);
+
+        cdata->write(&xcc[s1], sizeof(RDouble));
+        cdata->write(&ycc[s1], sizeof(RDouble));
+        cdata->write(&zcc[s1], sizeof(RDouble));
+        cdata->write(&vol[s1], sizeof(RDouble));
+    }
+}
+
+void UnstructGrid::TranslateCellCenter(ActionKey *actkey)
+{
+    InterfaceInfo *interfaceInfo = this->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    int ineighbor = interfaceInfo->FindIthNeighbor(actkey->ipos);
+    int iFace, t1;
+
+    int nIFaceOfNeighbor = interfaceInfo->GetNIFaceOfNeighbor(ineighbor);
+    int *faceIndexForRecv = interfaceInfo->GetFaceIndexForRecv(ineighbor);
+
+    RDouble *xcc = this->GetCellCenterX();
+    RDouble *ycc = this->GetCellCenterY();
+    RDouble *zcc = this->GetCellCenterZ();
+    RDouble *vol = this->GetCellVolume();
+
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+
+    int periodicType = PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType");
+    RDouble translationLength[3] = { 0.0 };
+    GlobalDataBase::GetData("translationLength", &translationLength, PHDOUBLE, 3);
+    RDouble rotationAngle = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+    rotationAngle = rotationAngle * PI / 180.0;
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+
+    int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+    UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+    int *leftCellofFace = this->GetLeftCellOfFace();
+    int *rightCellofFace = this->GetRightCellOfFace();
+    int count = 0;
+
+
+    for (int iLocalFace = 0; iLocalFace < nIFaceOfNeighbor; ++ iLocalFace)
+    {
+        iFace = faceIndexForRecv[iLocalFace];
+        this->GetTargetIndex(iFace, 1, t1);
+
+        cdata->read(&xcc[t1], sizeof(RDouble));
+        cdata->read(&ycc[t1], sizeof(RDouble));
+        cdata->read(&zcc[t1], sizeof(RDouble));
+        cdata->read(&vol[t1], sizeof(RDouble));
+
+        int iBFace = interFace2BoundaryFace[iFace];
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iBFace]);
+        int bcType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+
+        if (referenceFrame == ROTATIONAL_FRAME)
+        {
+            //! nTurboZone
+            int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+            //! PeriodicRotationAngle
+            RDouble PeriodicRotationAngle[100];
+            GlobalDataBase::GetData("PeriodicRotationAngle", &PeriodicRotationAngle, PHDOUBLE, nTurboZone);
+
+            //! Periodic_Name
+            string Periodic_Name[100];
+            GlobalDataBase::GetData("Periodic_Name", &Periodic_Name, PHSTRING, 2 * nTurboZone);
+
+            for (int iTurboZone = 0; iTurboZone < nTurboZone; iTurboZone++)
+            {
+                PeriodicRotationAngle[iTurboZone] = PeriodicRotationAngle[iTurboZone] * PI / 180.0;
+                rotationAngle = PeriodicRotationAngle[iTurboZone];
+
+                RDouble rotcell[3] = { 0.0, 0.0, 0.0 };
+                if (bcName == Periodic_Name[2 * iTurboZone])
+                {
+                    rotcell[1] = ycc[t1] * cos(2.0 * PI - rotationAngle) - zcc[t1] * sin(2.0 * PI - rotationAngle);
+                    rotcell[2] = ycc[t1] * sin(2.0 * PI - rotationAngle) + zcc[t1] * cos(2.0 * PI - rotationAngle);
+
+                    ycc[t1] = rotcell[1];
+                    zcc[t1] = rotcell[2];
+                }
+                else if (bcName == Periodic_Name[2 * iTurboZone + 1])
+                {
+                    rotcell[1] = ycc[t1] * cos(rotationAngle) - zcc[t1] * sin(rotationAngle);
+                    rotcell[2] = ycc[t1] * sin(rotationAngle) + zcc[t1] * cos(rotationAngle);
+
+                    ycc[t1] = rotcell[1];
+                    zcc[t1] = rotcell[2];
+                }
+            }
+        }
+        else
+        {
+            if (periodicType == TRANSLATIONAL_PERIODICITY)
+            {
+                if (bcName == "Periodic_up")
+                {
+                    xcc[t1] = xcc[t1] - translationLength[0];
+                    ycc[t1] = ycc[t1] - translationLength[1];
+                    zcc[t1] = zcc[t1] - translationLength[2];
+                }
+                else if (bcName == "Periodic_down")
+                {
+                    xcc[t1] = xcc[t1] + translationLength[0];
+                    ycc[t1] = ycc[t1] + translationLength[1];
+                    zcc[t1] = zcc[t1] + translationLength[2];
+                }
+            }
+            else if (periodicType == ROTATIONAL_PERIODICITY)
+            {
+                RDouble rotcell[3] = { 0.0, 0.0, 0.0 };
+
+                if (bcName == "Periodic_up")
+                {   //! cell center coordinate
+                    rotcell[1] = ycc[t1] * cos(2.0 * PI - rotationAngle) - zcc[t1] * sin(2.0 * PI - rotationAngle);
+                    rotcell[2] = ycc[t1] * sin(2.0 * PI - rotationAngle) + zcc[t1] * cos(2.0 * PI - rotationAngle);
+
+                    //! coordinate matching
+                    ycc[t1] = rotcell[1];
+                    zcc[t1] = rotcell[2];
+                }
+                else if (bcName == "Periodic_down")
+                {
+                    rotcell[1] = ycc[t1] * cos(rotationAngle) - zcc[t1] * sin(rotationAngle);
+                    rotcell[2] = ycc[t1] * sin(rotationAngle) + zcc[t1] * cos(rotationAngle);
+
+                    //! coordinate matching
+                    ycc[t1] = rotcell[1];
+                    zcc[t1] = rotcell[2];
+                }
+            }
+        }
+    }
+}
+
+void UnstructGrid::GetCellIBlank(ActionKey *actkey)
+{
+    InterfaceInfo * interfaceInfo = this->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    int ineighbor = interfaceInfo->FindIthNeighbor(actkey->ipos);
+    int nIFaceOfNeighbor = interfaceInfo->GetNIFaceOfNeighbor(ineighbor);
+    int *faceIndexForSend = interfaceInfo->GetFaceIndexForSend(ineighbor);
+
+    DataContainer * cdata = actkey->GetData();
+    cdata->moveto_begin();
+
+    int * iBlank = this->GetBlankIndex();
+
+    int iFace,s1;
+    for (int iLocalFace = 0; iLocalFace < nIFaceOfNeighbor; ++ iLocalFace)
+    {
+        iFace = faceIndexForSend[iLocalFace];
+        this->GetSourceIndex(iFace, 1, s1);
+
+        cdata->write(&iBlank[s1], sizeof(int));
+    }
+}
+
+void UnstructGrid::TranslateCellIBlank(ActionKey *actkey)
+{
+    InterfaceInfo *interfaceInfo = this->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    int ineighbor = interfaceInfo->FindIthNeighbor(actkey->ipos);
+    int iFace, t1;
+
+    int nIFaceOfNeighbor = interfaceInfo->GetNIFaceOfNeighbor(ineighbor);
+    int *faceIndexForRecv = interfaceInfo->GetFaceIndexForRecv(ineighbor);
+
+    int *iBlank = this->GetBlankIndex();
+
+    DataContainer * cdata = actkey->GetData();
+    cdata->moveto_begin();
+
+    for (int iLocalFace = 0; iLocalFace < nIFaceOfNeighbor; ++ iLocalFace)
+    {
+        iFace = faceIndexForRecv[iLocalFace];
+        this->GetTargetIndex(iFace, 1, t1);
+
+        cdata->read(&iBlank[t1], sizeof(int));
+    }
+}
+
+streamsize UnstructGrid::TranslateCellCenterLength(ActionKey *actkey)
+{
+    streamsize nlen = 0;
+
+    InterfaceInfo * interfaceInfo = this->GetInterfaceInfo();
+    if (!interfaceInfo) return nlen;
+
+    int ineighbor = interfaceInfo->FindIthNeighbor(actkey->ipos);
+    int iFace,t1;
+
+    int nIFaceOfNeighbor = interfaceInfo->GetNIFaceOfNeighbor(ineighbor);
+    int *faceIndexForRecv = interfaceInfo->GetFaceIndexForRecv(ineighbor);
+
+    for (int iLocalFace = 0; iLocalFace < nIFaceOfNeighbor; ++ iLocalFace)
+    {
+        iFace = faceIndexForRecv[iLocalFace];
+        this->GetTargetIndex(iFace, 1, t1);
+
+        nlen += sizeof(RDouble) * 4;
+    }
+
+    return nlen;
+}
+
+streamsize UnstructGrid::TranslateCellIBlankLength(ActionKey *actkey)
+{
+    streamsize nlen = 0;
+
+    InterfaceInfo * interfaceInfo = this->GetInterfaceInfo();
+    if (!interfaceInfo) return nlen;
+
+    int ineighbor = interfaceInfo->FindIthNeighbor(actkey->ipos);
+    int iFace,t1;
+
+    int nIFaceOfNeighbor = interfaceInfo->GetNIFaceOfNeighbor(ineighbor);
+    int *faceIndexForRecv = interfaceInfo->GetFaceIndexForRecv(ineighbor);
+
+    for (int iLocalFace = 0; iLocalFace < nIFaceOfNeighbor; ++ iLocalFace)
+    {
+        iFace = faceIndexForRecv[iLocalFace];
+        this->GetTargetIndex(iFace, 1, t1);
+
+        nlen += sizeof(int) * 1;
+    }
+
+    return nlen;
+}
+
+void UnstructGrid::CompressSpecificArrayToInterface(DataContainer *&dataContainer, const string &fieldName, const int &neighborZoneIndex, const int &nEquation)
+{
+    InterfaceInfo *interfaceInformation = this->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = interfaceInformation->GetFaceIndexForSend(iNeighborZone);
+    dataContainer->moveto_begin();
+    if (nEquation == 0)
+    {
+        RDouble *fieldSend = reinterpret_cast <RDouble *> (this->GetDataPtr(fieldName));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int sourceCell;
+                int iFace = interfaceIndexContainerForSend[iLocalFace];
+                this->GetSourceIndex(iFace, iGhostLayer + 1, sourceCell);
+                PHWrite(dataContainer, fieldSend[sourceCell]);
+            }
+        }
+    }
+    else
+    {
+        RDouble **fieldSend = reinterpret_cast <RDouble **> (this->GetDataPtr(fieldName));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int sourceCell;
+                int iFace = interfaceIndexContainerForSend[iLocalFace];
+                this->GetSourceIndex(iFace, iGhostLayer + 1, sourceCell);
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    PHWrite(dataContainer, fieldSend[m][sourceCell]);
+                }
+            }
+        }
+    }
+}
+
+void UnstructGrid::DecompressArrayFromInterface(DataContainer *&dataContainer, const string &fieldName, const int &neighborZoneIndex, const int &nEquation)
+{
+    InterfaceInfo *interfaceInformation = this->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = interfaceInformation->GetFaceIndexForRecv(iNeighborZone);
+    dataContainer->moveto_begin();
+    if (nEquation == 0)
+    {
+        RDouble *fieldRecv = reinterpret_cast <RDouble *> (this->GetDataPtr(fieldName));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int targetCell;
+                int iFace = interfaceIndexContainerForReceive[iLocalFace];
+                this->GetTargetIndex(iFace, iGhostLayer + 1, targetCell);
+                PHRead(dataContainer, fieldRecv[targetCell]);
+            }
+        }
+    }
+    else
+    {
+        RDouble **fieldRecv = reinterpret_cast <RDouble **> (this->GetDataPtr(fieldName));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int iFace = interfaceIndexContainerForReceive[iLocalFace];
+                int targetCell;
+                this->GetTargetIndex(iFace, iGhostLayer + 1, targetCell);
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    PHRead(dataContainer, fieldRecv[m][targetCell]);
+                }
+            }
+        }
+    }
+}
+
+void UnstructGrid::SetOrdinaryGridIndex(int ordinaryGridIndexIn)
+{
+    this->ordinaryGridIndex = ordinaryGridIndexIn;
+}
+
+void UnstructGrid::SetOrdinaryNodeIndex(int *ordinaryNodeIndexIn)
+{
+    if (this->ordinaryNodeIndex != NULL)
+    {
+        delete []this->ordinaryNodeIndex;
+    }
+
+    this->ordinaryNodeIndex = ordinaryNodeIndexIn;
+}
+
+void UnstructGrid::SetOrdinaryFaceIndex(int *ordinaryFaceIndexIn)
+{
+    if (this->ordinaryFaceIndex != NULL)
+    {
+        delete []this->ordinaryFaceIndex;
+    }
+
+    this->ordinaryFaceIndex = ordinaryFaceIndexIn;
+}
+
+void UnstructGrid::SetOrdinaryCellIndex(int *ordinaryCellIndexIn)
+{
+    if (this->ordinaryCellIndex != NULL)
+    {
+        delete []this->ordinaryCellIndex;
+    }
+
+    this->ordinaryCellIndex = ordinaryCellIndexIn;
+}
+
+int  UnstructGrid::GetOrdinaryGridIndex()
+{
+    return this->ordinaryGridIndex;
+}
+
+int *UnstructGrid::GetOrdinaryNodeIndex()
+{
+    return this->ordinaryNodeIndex;
+}
+
+int *UnstructGrid::GetOrdinaryFaceIndex()
+{
+    return this->ordinaryFaceIndex;
+}
+
+int *UnstructGrid::GetOrdinaryCellIndex()
+{
+    return this->ordinaryCellIndex;
+}
+
+LIB_EXPORT void UnstructGrid::FindOutWallPoints(bool * isWallPoint, int & nWallPoints)
+{
+    UnstructBCSet **bcr = this->GetBCRecord();
+
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalNode = this->GetNTotalNode();
+
+    int *face2node = this->GetFace2Node();
+    int *node_number_of_each_face = this->GetNodeNumberOfEachFace();
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        isWallPoint[iNode] = false;
+    }
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int bcType = bcr[iFace]->GetKey();
+        if (IsWall(bcType))
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                int index = face2node[ nodepos + j ];
+                isWallPoint[index] = true;
+            }
+        }
+
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    nWallPoints = 0;
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        if (isWallPoint[iNode])
+        {
+            ++ nWallPoints;
+        }
+    }
+}
+
+LIB_EXPORT void UnstructGrid::FindOutWallFaces(bool * isWallFace, int & nWallFaces)
+{
+    UnstructBCSet **bcr = this->GetBCRecord();
+    int nBoundFace = this->GetNBoundFace();
+
+    nWallFaces = 0;
+
+    //! Compute the number of the wall faces.
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        isWallFace[iFace] = false;
+
+        int bctype = bcr[iFace]->GetKey();
+        if (IsWall(bctype))
+        {
+            isWallFace[iFace] = true;
+            ++ nWallFaces;
+        }
+    }
+}
+
+void UnstructGrid::AllocateWalldist()
+{
+    int nTotalNode = this->GetNTotalNode();
+    int nTotalCell = this->GetNTotalCell();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    walldist = new RDouble[nTotal];
+    walldistNode = new RDouble[nTotalNode];
+    nearestwallfacenormalx = new RDouble[nTotal];
+    nearestwallfacenormaly = new RDouble[nTotal];
+    nearestwallfacenormalz = new RDouble[nTotal];
+}
+
+void UnstructGrid::ReadWalldist(RDouble *wallDistIn)
+{
+    int nTotalCell = this->GetNTotalCell();
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        walldist[iCell] = wallDistIn[iCell];
+    }
+}
+
+void UnstructGrid::ReadNearestwallfacenormalx(RDouble *nearestwallfaceNormalxIn)
+{
+    int nTotalCell = this->GetNTotalCell();
+
+    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+    {
+        nearestwallfacenormalx[iCell] = nearestwallfaceNormalxIn[iCell];
+    }
+}
+
+void UnstructGrid::ReadNearestwallfacenormaly(RDouble* nearestwallfaceNormalyIn)
+{
+    int nTotalCell = this->GetNTotalCell();
+
+    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+    {
+        nearestwallfacenormaly[iCell] = nearestwallfaceNormalyIn[iCell];
+    }
+}
+
+void UnstructGrid::ReadNearestwallfacenormalz(RDouble* nearestwallfaceNormalzIn)
+{
+    int nTotalCell = this->GetNTotalCell();
+
+    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+    {
+        nearestwallfacenormalz[iCell] = nearestwallfaceNormalzIn[iCell];
+    }
+}
+
+void UnstructGrid::DumpWalldist(ActionKey *actkey)
+{
+    int nTotalCell = this->GetNTotalCell();
+
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+
+    cdata->write(&nTotalCell, sizeof(int));
+    cdata->write(walldist,sizeof(RDouble) * nTotalCell);
+    cdata->write(nearestwallfacenormalx, sizeof(RDouble) * nTotalCell);
+    cdata->write(nearestwallfacenormaly, sizeof(RDouble) * nTotalCell);
+    cdata->write(nearestwallfacenormalz, sizeof(RDouble) * nTotalCell);
+}
+
+void UnstructGrid::GetBoundaryMinMax(RDouble *pmin, RDouble *pmax)
+{
+    using namespace PHSPACE;
+
+    int nBoundFace = this->GetNBoundFace();
+
+    RDouble * x = this->GetX();
+    RDouble * y = this->GetY();
+    RDouble * z = this->GetZ();
+
+    pmin[0] = LARGE;
+    pmin[1] = LARGE;
+    pmin[2] = LARGE;
+
+    pmax[0] = - LARGE;
+    pmax[1] = - LARGE;
+    pmax[2] = - LARGE;
+
+    int * face2node  = this->GetFace2Node();
+    int * node_number_of_each_face = this->GetNodeNumberOfEachFace();
+
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            int index = face2node[ nodepos + j ];
+            pmin[0] = MIN(static_cast<RDouble>(pmin[0]), x[index]);
+            pmin[1] = MIN(static_cast<RDouble>(pmin[1]), y[index]);
+            pmin[2] = MIN(static_cast<RDouble>(pmin[2]), z[index]);
+
+            pmax[0] = MAX(static_cast<RDouble>(pmax[0]), x[index]);
+            pmax[1] = MAX(static_cast<RDouble>(pmax[1]), y[index]);
+            pmax[2] = MAX(static_cast<RDouble>(pmax[2]), z[index]);
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+}
+
+void UnstructGrid::GetMinMaxDS(RDouble &dismin, RDouble &dismax)
+{
+    using namespace PHSPACE;
+    //! Check the minimum grid distance.
+    dismin =   LARGE;
+    dismax = - LARGE;
+
+    RDouble * x = this->GetX();
+    RDouble * y = this->GetY();
+    RDouble * z = this->GetZ();
+
+    int nTotalFace = this->GetNTotalFace();
+    int * face2node = this->GetFace2Node();
+    int *node_number_of_each_face = this->GetNodeNumberOfEachFace();
+    int nodepos = 0;
+
+    RDouble dx,dy,dz,ds;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        for (int iNode = 0; iNode < node_number_of_each_face[iFace]; ++ iNode)
+        {
+            int p1 = face2node[ nodepos + iNode ];
+            int p2 = face2node[ nodepos + (iNode + 1)%node_number_of_each_face[iFace] ];
+            dx = x[ p2 ] - x[ p1 ];
+            dy = y[ p2 ] - y[ p1 ];
+            dz = z[ p2 ] - z[ p1 ];
+            ds = sqrt(dx * dx + dy * dy + dz * dz);
+
+            if (ds <= SAME_POINT_TOL) continue;
+            dismin = MIN(dismin, ds);
+            dismax = MAX(dismin, ds);
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+}
+
+void UnstructGrid::Encode(DataContainer *cdata, int flag)
+{
+    if (flag == 0)
+    {
+        EncodeGrid(cdata);
+    }
+    else if (flag == 1)
+    {
+        EncodeOversetGrid(cdata);
+    }
+}
+
+void UnstructGrid::Decode(DataContainer *cdata, int flag)
+{
+    if (flag == 0)
+    {
+        DecodeGrid(cdata);
+    }
+    else if (flag == 1)
+    {
+        DecodeOversetGrid(cdata);
+    }
+}
+
+void UnstructGrid::ReviseNeighborZoneIndex(int zoneStart)
+{
+    InterfaceInfo * interfaceInfo = this->GetInterfaceInfo();
+
+    if(! interfaceInfo) return;
+
+    int nIFace = interfaceInfo->GetNIFace();
+
+    int * interFace2ZoneID = interfaceInfo->GetInterFace2ZoneID();
+
+    for(int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        interFace2ZoneID[ iFace ] += zoneStart;
+    }
+
+    InterpointInformation *interpointInformation = this->GetInterpointInfo();
+
+    if(! interpointInformation) return;
+
+    int nIPoint = interpointInformation->GetNumberOfInterpoints();
+
+    int *interPoint2ZoneID = interpointInformation->GetInterPoint2ZoneID();
+
+    for(int iPoint = 0; iPoint < nIPoint; ++ iPoint)
+    {
+        interPoint2ZoneID[iPoint] += zoneStart;
+    }
+}
+
+void UnstructGrid::EncodeOversetGrid(DataContainer *cdata)
+{
+    int nTotalCell = this->GetNTotalCell();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;     //! interior cells + ghost cells.
+
+    int *iBlank = this->iBlank;
+
+    cdata->moveto_begin();
+
+    cdata->write(reinterpret_cast<char *>(&nTotal),sizeof(int)); 
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        cdata->write(reinterpret_cast<char *>(&iBlank[iCell]),sizeof(int)); 
+    }
+    this->GetOversetInformationProxy()->EncodeOversetInformation(cdata);
+}
+
+void UnstructGrid::DecodeOversetGrid(DataContainer *cdata)
+{
+    int nTotalCell = this->GetNTotalCell();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;    //! interior cells + ghost cells.
+
+    if (!iBlank) iBlank = new int[nTotal];
+
+    int *iBlank = this->iBlank;
+
+    cdata->moveto_begin();
+
+    cdata->read(reinterpret_cast<char *>(&nTotal),sizeof(int)); 
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        cdata->read(reinterpret_cast<char *>(&iBlank[iCell]),sizeof(int)); 
+    }
+
+    OversetInformationProxy * oversetInformationProxy = new OversetInformationProxy();
+
+    this->SetOversetInformationProxy(oversetInformationProxy);
+
+    oversetInformationProxy->DecodeOversetInformation(cdata);
+}
+
+void UnstructGrid::DecodeWallDist(DataContainer * cdata)
+{
+    VirtualFile * virtualFile = new VirtualFile(cdata);
+
+    virtualFile->BeginReadWork();
+
+    int nTotalCell = this->GetNTotalCell();
+    
+    RDouble *walldist = GetWallDist();
+
+    PHRead(virtualFile, walldist, nTotalCell);
+
+    virtualFile->EndReadWork();
+
+    delete virtualFile;
+}
+
+void UnstructGrid::DecodeCellNode(DataContainer * cdata)
+{
+    VirtualFile * virtualFile = new VirtualFile(cdata);
+
+    virtualFile->BeginReadWork();
+
+    int zoneIndex;
+    PHRead(virtualFile, zoneIndex);
+
+    int numberOfCells;
+    PHRead(virtualFile, numberOfCells);
+
+    vector< vector< int > > cellToNode;
+    cellToNode.resize(numberOfCells);
+
+    int count = 0;
+    for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+    {
+        int nodeNumber;
+        PHRead(virtualFile, nodeNumber);
+
+        cellToNode[ iCell ].resize(nodeNumber);
+
+        for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+        {
+            PHRead(virtualFile, cellToNode[ iCell ][ iNode ]);
+            ++ count;
+        }
+    }
+
+    virtualFile->EndReadWork();
+
+    int * cellNodeNumberContainer = new int [ numberOfCells ];
+    int * cellNodeIndexContainer  = new int [ count ];
+
+    count = 0;
+    for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+    {
+        int nodeNumber = static_cast<int>(cellToNode[ iCell ].size());
+        cellNodeNumberContainer[ iCell ] = nodeNumber;
+
+        for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+        {
+            cellNodeIndexContainer[ count ++ ] = cellToNode[ iCell ][ iNode ];
+        }
+    }
+
+    delete virtualFile;
+
+    this->SetNodeNumberOfEachCell(cellNodeNumberContainer);
+    this->SetCell2Node(cellNodeIndexContainer);
+}
+
+void UnstructGrid::DecodeInterpointInfo(DataContainer *cdata)
+{
+    InterpointInformation *interpointInformation = 0;
+    this->SetInterpointInfo(interpointInformation);
+    
+    VirtualFile *virtualFile = new VirtualFile(cdata);
+    
+    virtualFile->BeginReadWork();
+    
+    int iZone;
+    PHRead(virtualFile, iZone);
+
+    int i_nIPoint; 
+    PHRead(virtualFile, i_nIPoint);
+    
+    if (i_nIPoint > 0)
+    {
+        interpointInformation = new InterpointInformation(i_nIPoint,this);
+        this->SetInterpointInfo(interpointInformation);
+        
+        int *interPoint2ZoneID = interpointInformation->GetInterPoint2ZoneID();
+        int *interPoint2InterPointID = interpointInformation->GetInterPoint2InterPointID();
+        int *interPoint2GlobalPoint = interpointInformation->GetInterPoint2GlobalPoint();
+        int *cellNumberOfInterPoint = interpointInformation->GetCellNumberOfInterPoint();
+        int *totalZonesOfInterPoint = interpointInformation->GetTotalZonesOfInterPoint();
+        int *labelOfInterPoint = interpointInformation->GetLabelOfInterPoint();
+
+        for (int iPoint = 0; iPoint < i_nIPoint; iPoint++)
+        {
+            PHRead(virtualFile, interPoint2ZoneID[iPoint]);
+            PHRead(virtualFile, interPoint2InterPointID[iPoint]);
+            PHRead(virtualFile, interPoint2GlobalPoint[iPoint]);
+            PHRead(virtualFile, cellNumberOfInterPoint[iPoint]);
+            PHRead(virtualFile, totalZonesOfInterPoint[iPoint]);
+            PHRead(virtualFile, labelOfInterPoint[iPoint]);
+        }
+    }
+
+    virtualFile->EndReadWork();
+
+    delete virtualFile;
+}
+
+void UnstructGrid::DecodeBCFace(DataContainer * cdata)
+{
+    VirtualFile *virtualFile = new VirtualFile(cdata);
+
+    virtualFile->BeginReadWork();
+
+    int zoneIndex;
+    PHRead(virtualFile, zoneIndex);
+
+    int numberOfBCFaces;
+    PHRead(virtualFile, numberOfBCFaces);
+    ASSERT(numberOfBCFaces == this->GetNBoundFace());
+
+    uint_long totalSize;
+    PHRead(virtualFile, totalSize);
+
+    char *bcNameChar = new char[totalSize];
+    PHRead(virtualFile, bcNameChar, static_cast<int>(totalSize));
+    
+    string *bcNameList = new string[numberOfBCFaces];
+    int count = 0;
+    for (int iFace = 0; iFace < numberOfBCFaces; ++ iFace)
+    {
+        if(count < totalSize)
+        {
+            while (bcNameChar[count] != '\0')
+            {
+                bcNameList[iFace].push_back(bcNameChar[count]);
+                ++ count;
+            }
+            ++ count;
+        }
+    }
+
+    PHRead(virtualFile, numberOfBCFaces);
+    int *bcTypeList = new int[numberOfBCFaces];
+    PHRead(virtualFile, bcTypeList, numberOfBCFaces);
+
+    virtualFile->EndReadWork();
+
+    //! Create UnstructbcRegion.
+    set<string> bcNameSet;
+    UnstructBCSet **bcr = this->GetBCRecord();
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        bcr[iFace]->SetBCName(bcNameList[iFace]);
+        bcNameSet.insert(bcNameList[iFace]);
+    }
+
+    int nBCRegionUnstruct = static_cast<int>(bcNameSet.size());
+    this->CreateUnstructBCSet(nBCRegionUnstruct);
+
+    UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = new int[nBoundFace];
+
+    set<string>::iterator iter;
+    count = 0;
+    for (iter = bcNameSet.begin(); iter != bcNameSet.end(); ++ iter)
+    {
+        UnstructBC *unstructBC = new UnstructBC(count);
+        unstructBCSet->SetBCRegion(count, unstructBC);
+        unstructBC->SetBCName(*iter);
+
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            if (bcNameList[iFace] == unstructBC->GetBCName())
+            {
+                unstructBC->SetBCType(bcTypeList[iFace]);
+                bcRegionIDofBCFace[iFace] = count;
+                vector<int> *faceIndex = unstructBC->GetFaceIndex();
+                faceIndex->push_back(iFace);
+            }
+        }
+        count ++;
+    }
+    unstructBCSet->SetBCFaceInfo(bcRegionIDofBCFace);
+ 
+    delete []bcTypeList;
+    delete []bcNameList;
+    delete []bcNameChar;
+    delete virtualFile;
+}
+
+void UnstructGrid::UpdateCoordinate(DataContainer *cdata)
+{
+    cdata->moveto_begin();
+    cout << "读入非结构网格动网格数据文件......\n";
+
+    int nTotalNode = this->GetNTotalNode();
+
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+
+    cdata->read(reinterpret_cast<char*>(x), nTotalNode*sizeof(RDouble));
+    cdata->read(reinterpret_cast<char*>(y), nTotalNode*sizeof(RDouble));
+    cdata->read(reinterpret_cast<char*>(z), nTotalNode*sizeof(RDouble));
+
+    ComputeMinMaxBox();
+}
+
+LIB_EXPORT void UnstructGrid::AllocateOversetGrid()
+{
+    int nTotalCell = this->GetNTotalCell();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;    //! interior cells + ghost cells.
+
+    if ((this->iBlank))
+    {
+        delete iBlank;
+        iBlank = nullptr;
+    }
+    this->iBlank = new int[nTotal];
+
+    int *iBlank = this->iBlank;
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        iBlank[iCell] = 1;
+    }
+}
+
+LIB_EXPORT void UnstructGrid::CalNormalDistanceOfC2C() 
+{
+    if (normalDistanceC2C != NULL)
+    {
+        cout << "norm_dist_c2c has been existed." << endl;
+        return;
+    }
+
+    int le, re;
+    int * leftCellOfFace = this->GetLeftCellOfFace();
+    int * rightCellOfFace = this->GetRightCellOfFace();
+    RDouble * xfn = this->GetFaceNormalX();
+    RDouble * yfn = this->GetFaceNormalY();
+    RDouble * zfn = this->GetFaceNormalZ();
+    RDouble * xcc = this->GetCellCenterX();
+    RDouble * ycc = this->GetCellCenterY();
+    RDouble * zcc = this->GetCellCenterZ();
+
+    normalDistanceC2C = NewPointer<RDouble>(nTotalFace);
+    for (int iFace = 0; iFace < nTotalFace; iFace++) 
+    {
+        le = leftCellOfFace[iFace];
+        re = rightCellOfFace[iFace];
+
+        normalDistanceC2C[iFace] = ABS(xfn[iFace] * (xcc[re] - xcc[le])
+            + yfn[iFace] * (ycc[re] - ycc[le]) + zfn[iFace] * (zcc[re] - zcc[le]));
+    }
+}
+void UnstructGrid::ReadGrid(fstream &file)
+{
+    VirtualFile *vfile = new VirtualFile(&file);
+
+    vfile->BeginReadWork();
+
+    ReadGrid(vfile);
+
+    vfile->EndReadWork();
+
+    delete vfile;
+}
+
+LIB_EXPORT void UnstructGrid::WriteGrid(fstream &file)
+{
+    VirtualFile *vfile = new VirtualFile(&file);
+
+    vfile->BeginWriteWork();
+
+    WriteGrid(vfile);
+
+    vfile->EndWriteWork();
+
+    delete vfile;
+}
+
+void UnstructGrid::DecodeGrid(DataContainer *cdata)
+{
+    VirtualFile *vfile = new VirtualFile(cdata);
+
+    vfile->BeginReadWork();
+
+    ReadGrid(vfile);
+
+    vfile->EndReadWork();
+
+    delete vfile;
+}
+
+void UnstructGrid::EncodeGrid(DataContainer *cdata)
+{
+    VirtualFile *vfile = new VirtualFile(cdata);
+
+    vfile->BeginWriteWork();
+
+    WriteGrid(vfile);
+
+    vfile->EndWriteWork();
+
+    delete vfile;
+}
+
+void UnstructGrid::ReadGrid(VirtualFile *vfile)
+{
+    int nTotalNode, nTotalFace, nTotalCell, nIFace, nBoundFace;
+
+    PrintToWindow("Reading Unstructured Grid of Zone ", GetZoneID(), "...\n");
+    //! Read the total nodes,total faces and total cells.
+
+    vfile->read(reinterpret_cast<char*>(&nTotalNode),sizeof(int));
+    vfile->read(reinterpret_cast<char*>(&nTotalFace),sizeof(int));
+    vfile->read(reinterpret_cast<char*>(&nTotalCell),sizeof(int));
+
+    PrintToWindow("  Grid Dimension  : ", this->GetDim(), "\n");
+    PrintToWindow("  Number of Points: ", nTotalNode, "\n");
+    PrintToWindow("  Number of Faces : ", nTotalFace, "\n");
+    PrintToWindow("  Number of Cells : ", nTotalCell, "\n");
+
+    this->SetNTotalNode(nTotalNode);
+    this->SetNTotalFace(nTotalFace);
+    this->SetNTotalCell(nTotalCell);
+
+    RDouble *x,*y,*z;
+    x = new RDouble[ nTotalNode ];
+    y = new RDouble[ nTotalNode ];
+    z = new RDouble[ nTotalNode ];
+
+    this->SetX(x);
+    this->SetY(y);
+    this->SetZ(z);
+
+    vfile->read(reinterpret_cast<char*>(x),nTotalNode * sizeof(RDouble));
+    vfile->read(reinterpret_cast<char*>(y),nTotalNode * sizeof(RDouble));
+    vfile->read(reinterpret_cast<char*>(z),nTotalNode * sizeof(RDouble));
+
+    RotateAboutAxis();
+
+    ComputeMinMaxBox();
+
+    int * node_number_of_each_face = new int[ nTotalFace ];
+    //! Assign a value to node_number_of_each_face.
+    vfile->read(reinterpret_cast<char*>(node_number_of_each_face),nTotalFace * sizeof(int));
+    this->SetNodeNumberOfEachFace(node_number_of_each_face);
+
+    int * nodePosi = new int[ nTotalFace + 1 ];
+    int nsum = 0;
+    nodePosi[0] = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        nsum += node_number_of_each_face[iFace];
+        nodePosi[iFace+1] = nsum;
+    }
+    
+    //! The connected relationship of face to node.
+    int * face2node = new int [ nsum ];
+    this->SetFace2Node(face2node);
+
+    vfile->read(reinterpret_cast<char*>(face2node), nsum * sizeof(int));
+
+    int * leftCellOfFace  = new int[ nTotalFace ];
+    int * rightCellOfFace = new int[ nTotalFace ];
+    this->SetLeftCellOfFace (leftCellOfFace);
+    this->SetRightCellOfFace(rightCellOfFace);
+
+    vfile->read(reinterpret_cast<char*>(leftCellOfFace),nTotalFace*sizeof(int));
+    vfile->read(reinterpret_cast<char*>(rightCellOfFace),nTotalFace*sizeof(int));
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        if (leftCellOfFace[ iFace ] < 0)
+        {
+            //! Need to reverse the node ordering.
+            //! This problem is very hidden,mainly cause by the unclear definition of reverse.
+            //! The bottom line is wrong.
+            //std::reverse(face2node + nodePosi[iFace], face2node + nodePosi[iFace+1] - 1);
+            std::reverse(face2node + nodePosi[iFace], face2node + nodePosi[iFace+1]);
+
+            // now reverse le and re
+            SWAP(leftCellOfFace[ iFace ], rightCellOfFace[ iFace ]);
+        }
+
+
+    }
+    delete [] nodePosi;
+
+    vfile->read(reinterpret_cast<char*>(&nBoundFace),sizeof(int));
+    this->SetNBoundFace(nBoundFace);
+
+    PrintToWindow("  Number of Boundary Faces : ", nBoundFace, "\n");
+
+    //! Set the boundary condition.
+    UnstructBCSet **bcr = new UnstructBCSet * [ nBoundFace ];
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int bctype;
+        vfile->read(reinterpret_cast<char*>(&bctype),sizeof(int));
+        bcr[iFace] = new UnstructBCSet();
+        bcr[iFace]->SetKey(bctype);
+    }
+    this->SetBCRecord(bcr);
+    vfile->read(reinterpret_cast<char*>(&nIFace),sizeof(int));
+
+    InterfaceInfo * interfaceInfo = 0;
+    this->SetInterfaceInfo(interfaceInfo);
+    if (nIFace > 0)
+    {
+        interfaceInfo = new InterfaceInfo(nIFace,this);
+        this->SetInterfaceInfo(interfaceInfo);
+
+        int *interFace2ZoneID       = interfaceInfo->GetInterFace2ZoneID();
+        int *interFace2InterFaceID  = interfaceInfo->GetInterFace2InterFaceID();
+        int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+
+        vfile->read(reinterpret_cast<char*>(interFace2ZoneID     ), nIFace*sizeof(int));
+        vfile->read(reinterpret_cast<char*>(interFace2InterFaceID), nIFace*sizeof(int));
+        vfile->read(reinterpret_cast<char*>(interFace2BoundaryFace), nIFace*sizeof(int));
+    }
+    SpecifyRightCellofBC();
+    PrintToWindow("\n");
+}
+
+void UnstructGrid::WriteGrid(VirtualFile *vfile)
+{
+    int nTotalNode = this->GetNTotalNode();
+    int nTotalFace = this->GetNTotalFace();
+    int nTotalCell = this->GetNTotalCell();
+
+    //! Write the number of nodes, faces, cells.
+    vfile->write(reinterpret_cast<char*>(&nTotalNode),sizeof(int));
+    vfile->write(reinterpret_cast<char*>(&nTotalFace),sizeof(int));
+    vfile->write(reinterpret_cast<char*>(&nTotalCell),sizeof(int));
+
+    RDouble * x = this->GetX();
+    RDouble * y = this->GetY();
+    RDouble * z = this->GetZ();
+
+    RotateAboutAxis();
+
+    vfile->write(reinterpret_cast<char*>(x),nTotalNode * sizeof(RDouble));
+    vfile->write(reinterpret_cast<char*>(y),nTotalNode * sizeof(RDouble));
+    vfile->write(reinterpret_cast<char*>(z),nTotalNode * sizeof(RDouble));
+
+    int * node_number_of_each_face = this->GetNodeNumberOfEachFace();
+
+    //! Write the number of nodes per face.
+    vfile->write(reinterpret_cast<char*>(node_number_of_each_face),nTotalFace * sizeof(int));
+
+    int nsum = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        nsum += node_number_of_each_face[iFace];
+    }
+
+    //! Write the nodes of each face.
+    int * face2node = this->GetFace2Node();
+    vfile->write(reinterpret_cast<char*>(face2node), nsum*sizeof(int));
+
+    int * leftCellOfFace  = this->GetLeftCellOfFace();
+    int * rightCellOfFace = this->GetRightCellOfFace();
+
+    vfile->write(reinterpret_cast<char*>(leftCellOfFace), nTotalFace*sizeof(int));
+    vfile->write(reinterpret_cast<char*>(rightCellOfFace), nTotalFace*sizeof(int));
+
+    int nBoundFace = this->GetNBoundFace();
+    vfile->write(reinterpret_cast<char*>(&nBoundFace),sizeof(int));
+
+    //! Write the boundary condition.
+    UnstructBCSet **bcr = this->GetBCRecord();
+    int *tmpbctype = new int [nBoundFace];
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        tmpbctype[iFace] = bcr[iFace]->GetKey();
+    }
+    vfile->write(reinterpret_cast<char*>(tmpbctype), nBoundFace*sizeof(int));
+    delete [] tmpbctype;
+
+    int nIFace = 0;
+    InterfaceInfo * interfaceInfo = this->GetInterfaceInfo();
+    if (interfaceInfo)
+    {
+        nIFace = interfaceInfo->GetNIFace();
+    }
+    vfile->write(reinterpret_cast<char*>(&nIFace),sizeof(int));
+
+    if (interfaceInfo)
+    {
+        int *interFace2ZoneID       = interfaceInfo->GetInterFace2ZoneID();
+        //int *interFace2CellID       = interfaceInfo->GetInterFace2CellID();
+        int *interFace2InterFaceID  = interfaceInfo->GetInterFace2InterFaceID();
+        int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+        vfile->write(reinterpret_cast<char*>(interFace2ZoneID     ), nIFace*sizeof(int));
+        //vfile->write(reinterpret_cast<char*>(interFace2CellID     ), nIFace*sizeof(int));
+        vfile->write(reinterpret_cast<char*>(interFace2InterFaceID), nIFace*sizeof(int));
+        vfile->write(reinterpret_cast<char*>(interFace2BoundaryFace), nIFace*sizeof(int));
+    }
+}
+
+void UnstructGrid::ComputeMetrics(ActionKey *actkey)
+{
+    AllocateMetrics(actkey);
+    if (GetDim() == 2)
+    {
+        ComputeFaceNormal2D();
+        ComputeFaceCenter2D(actkey);
+        ComputeCellCenterVol2D(actkey);
+    }
+    else
+    {
+        ComputeFaceCenterAreaNormal3DNew2(actkey);
+        ComputeCellCenterVol3DNew2(actkey);
+    }
+}
+
+void UnstructGrid::ComputeFaceNormal3DNew()
+{
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+    int *face2node = this->GetFace2Node();
+    int nTotalFace = this->GetNTotalFace();
+    int *node_number_of_each_face = this->GetNodeNumberOfEachFace();
+
+    RDouble *xfn  = this->GetFaceNormalX();
+    RDouble *yfn  = this->GetFaceNormalY();
+    RDouble *zfn  = this->GetFaceNormalZ();
+    RDouble *area = this->GetFaceArea();
+
+    int p1,p2,pt;
+    RDouble xct,yct,zct;
+    RDouble dx1,dy1,dz1,dx2,dy2,dz2;
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        xct = 0.0;
+        yct = 0.0;
+        zct = 0.0;
+
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            pt = face2node[ nodepos + j ];
+            xct += x[pt];
+            yct += y[pt];
+            zct += z[pt];
+        }
+        xct /= node_number_of_each_face[iFace];
+        yct /= node_number_of_each_face[iFace];
+        zct /= node_number_of_each_face[iFace];
+
+        xfn[iFace] = 0.0;
+        yfn[iFace] = 0.0;
+        zfn[iFace] = 0.0;
+
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            p1 = face2node[ nodepos + j ];
+            p2 = face2node[ nodepos + (j + 1) % node_number_of_each_face[iFace] ];
+
+            dx1 = xct - x[p1];
+            dy1 = yct - y[p1];
+            dz1 = zct - z[p1];
+
+            dx2 = xct - x[p2];
+            dy2 = yct - y[p2];
+            dz2 = zct - z[p2];
+
+            xfn[iFace] += dy1 * dz2 - dy2 * dz1;
+            yfn[iFace] += dz1 * dx2 - dz2 * dx1;
+            zfn[iFace] += dx1 * dy2 - dx2 * dy1;
+        }
+
+        xfn[iFace] *= half;
+        yfn[iFace] *= half;
+        zfn[iFace] *= half;
+
+        area[iFace] = sqrt(xfn[iFace] * xfn[iFace] + yfn[iFace] * yfn[iFace] + zfn[iFace] * zfn[iFace]);
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        RDouble oarea = 1.0 / (area[iFace] + SMALL);
+        xfn[iFace] *= oarea;
+        yfn[iFace] *= oarea;
+        zfn[iFace] *= oarea;
+    }
+}
+
+GridManager *UnstructGrid::GetGridManager()
+{
+    if (!gridManager)
+    {
+        gridManager = new GridManager(this);
+    }
+    return gridManager;
+}
+
+void UnstructGrid::ComputeGridFaceVelocity()
+{
+    GridManager *gridManager = this->GetGridManager();
+    gridManager->ComputeGridFaceVelocity();
+}
+
+void UnstructGrid::BackUpOldGrid()
+{
+    GridManager *gridManager = this->GetGridManager();
+    gridManager->BackUpOldGrid();
+}
+
+void UnstructGrid::ComputeFaceNormal3D()
+{
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+    int *face2node = this->GetFace2Node();
+    int nTotalFace = this->GetNTotalFace();
+    int *node_number_of_each_face = this->GetNodeNumberOfEachFace();
+
+    RDouble *xfn  = this->GetFaceNormalX();
+    RDouble *yfn  = this->GetFaceNormalY();
+    RDouble *zfn  = this->GetFaceNormalZ();
+    RDouble *area = this->GetFaceArea();
+
+    int p1, p2;
+    RDouble dx1, dy1, dz1, dx2, dy2, dz2;
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        xfn[iFace] = 0.0;
+        yfn[iFace] = 0.0;
+        zfn[iFace] = 0.0;
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            int index1 = j;
+            int index2 = (j + 1) % node_number_of_each_face[iFace];
+            p1 = face2node[nodepos + index1];
+            p2 = face2node[nodepos + index2];
+
+            dx1 = x[p1];
+            dy1 = y[p1];
+            dz1 = z[p1];
+
+            dx2 = x[p2];
+            dy2 = y[p2];
+            dz2 = z[p2];
+
+            xfn[iFace] += half * (dy1 * dz2 - dy2 * dz1);
+            yfn[iFace] += half * (dz1 * dx2 - dz2 * dx1);
+            zfn[iFace] += half * (dx1 * dy2 - dx2 * dy1);
+        }
+        area[iFace] = sqrt(xfn[iFace] * xfn[iFace] + yfn[iFace] * yfn[iFace] + zfn[iFace] * zfn[iFace]);
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        RDouble oarea = 1.0 / (area[iFace] + SMALL);
+        xfn[iFace] *= oarea;
+        yfn[iFace] *= oarea;
+        zfn[iFace] *= oarea;
+    }
+}
+
+void UnstructGrid::ComputeFaceCenterAreaNormal3DNew2(ActionKey *actkey)
+{
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+    int nTotalFace = this->GetNTotalFace();
+    int *face2node = this->GetFace2Node();
+    int *node_number_of_each_face = this->GetNodeNumberOfEachFace();
+
+    RDouble *xfn  = this->GetFaceNormalX();
+    RDouble *yfn  = this->GetFaceNormalY();
+    RDouble *zfn  = this->GetFaceNormalZ();
+    RDouble *xfc  = this->GetFaceCenterX();
+    RDouble *yfc  = this->GetFaceCenterY();
+    RDouble *zfc  = this->GetFaceCenterZ();
+    RDouble *area = this->GetFaceArea();
+
+    //! Compute rotating velocity.
+    RDouble *vgn = this->GetFaceNormalVelocity();
+    RDouble *vgx = this->GetFaceVelocityX();
+    RDouble *vgy = this->GetFaceVelocityY();
+    RDouble *vgz = this->GetFaceVelocityZ();
+
+    int iFace, j, p1, p2, index1, index2, nodepos;
+    RDouble coef, x00, y00, z00, dx1, dy1, dz1, dx2, dy2, dz2, anx, any, anz, areaTemp, oareaTemp;
+
+    nodepos = 0;
+    for (iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        xfc[iFace] = 0.0;
+        yfc[iFace] = 0.0;
+        zfc[iFace] = 0.0;
+
+        for (j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            index1 = face2node[ nodepos + j ];
+            xfc[iFace] += x[index1];
+            yfc[iFace] += y[index1];
+            zfc[iFace] += z[index1];
+        }
+
+        coef = 1.0 / node_number_of_each_face[iFace];
+
+        xfc[iFace] *= coef;
+        yfc[iFace] *= coef;
+        zfc[iFace] *= coef;
+
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    RDouble *xfct  = new RDouble[nTotalFace];
+    RDouble *yfct  = new RDouble[nTotalFace];
+    RDouble *zfct  = new RDouble[nTotalFace];
+    RDouble *areat = new RDouble[nTotalFace];
+
+    int numberCycle = 4;
+    for(int iCycle = 0; iCycle < numberCycle; ++ iCycle)
+    {
+        nodepos = 0;
+        for (iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            xfct[iFace]  = 0.0;
+            yfct[iFace]  = 0.0;
+            zfct[iFace]  = 0.0;
+            areat[iFace] = 0.0;
+
+            for (j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                index1 = j;
+                index2 = (j + 1) % node_number_of_each_face[iFace];
+                p1 = face2node[ nodepos + index1 ];
+                p2 = face2node[ nodepos + index2 ];
+
+                dx1 = x[p1] - xfc[iFace];
+                dy1 = y[p1] - yfc[iFace];
+                dz1 = z[p1] - zfc[iFace];
+
+                dx2 = x[p2] - xfc[iFace];
+                dy2 = y[p2] - yfc[iFace];
+                dz2 = z[p2] - zfc[iFace];
+
+                anx = dy1 * dz2 - dy2 * dz1;
+                any = dz1 * dx2 - dz2 * dx1;
+                anz = dx1 * dy2 - dx2 * dy1;
+
+                areaTemp = sqrt(anx * anx + any * any + anz * anz);
+
+                x00 = x[p1] + x[p2] + xfc[iFace];
+                y00 = y[p1] + y[p2] + yfc[iFace];
+                z00 = z[p1] + z[p2] + zfc[iFace];
+
+                areat[iFace] += areaTemp;
+                xfct[iFace]  += areaTemp * x00;
+                yfct[iFace]  += areaTemp * y00;
+                zfct[iFace]  += areaTemp * z00;
+            }
+
+            if(areat[iFace] > SMALL)
+            {
+                areaTemp = 1.0/areat[iFace]/3.0;
+                xfc[iFace] = xfct[iFace] * areaTemp;
+                yfc[iFace] = yfct[iFace] * areaTemp;
+                zfc[iFace] = zfct[iFace] * areaTemp;
+            }
+
+            nodepos += node_number_of_each_face[iFace];
+        }
+    }
+
+    nodepos = 0;
+    for (iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        xfct[iFace]  = 0.0;
+        yfct[iFace]  = 0.0;
+        zfct[iFace]  = 0.0;
+        areat[iFace] = 0.0;
+        xfn[iFace]   = 0.0;
+        yfn[iFace]   = 0.0;
+        zfn[iFace]   = 0.0;
+
+        for (j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            index1 = j;
+            index2 = (j + 1) % node_number_of_each_face[iFace];
+            p1 = face2node[ nodepos + index1 ];
+            p2 = face2node[ nodepos + index2 ];
+
+            dx1 = x[p1] - xfc[iFace];
+            dy1 = y[p1] - yfc[iFace];
+            dz1 = z[p1] - zfc[iFace];
+
+            dx2 = x[p2] - xfc[iFace];
+            dy2 = y[p2] - yfc[iFace];
+            dz2 = z[p2] - zfc[iFace];
+
+            anx = dy1 * dz2 - dy2 * dz1;
+            any = dz1 * dx2 - dz2 * dx1;
+            anz = dx1 * dy2 - dx2 * dy1;
+
+            areaTemp = sqrt(anx * anx + any * any + anz * anz);
+
+            x00 = x[p1] + x[p2] + xfc[iFace];
+            y00 = y[p1] + y[p2] + yfc[iFace];
+            z00 = z[p1] + z[p2] + zfc[iFace];
+
+            areat[iFace] += areaTemp;
+            xfct[iFace]  += areaTemp * x00;
+            yfct[iFace]  += areaTemp * y00;
+            zfct[iFace]  += areaTemp * z00;
+            xfn[iFace]   += anx;
+            yfn[iFace]   += any;
+            zfn[iFace]   += anz;
+        }
+
+        if(areat[iFace] > SMALL)
+        {
+            areaTemp = 1.0/areat[iFace]/3.0;
+            xfc[iFace] = xfct[iFace] * areaTemp;
+            yfc[iFace] = yfct[iFace] * areaTemp;
+            zfc[iFace] = zfct[iFace] * areaTemp;
+        }
+
+        areaTemp    = sqrt(xfn[iFace]*xfn[iFace]+yfn[iFace]*yfn[iFace]+zfn[iFace]*zfn[iFace]);
+        area[iFace] = areaTemp * 0.5;
+        oareaTemp   = 1.0 / (areaTemp + SMALL);
+        xfn[iFace] *= oareaTemp;
+        yfn[iFace] *= oareaTemp;
+        zfn[iFace] *= oareaTemp;
+        
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+
+    if (referenceFrame == ROTATIONAL_FRAME)
+    {
+        int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+
+        //! angular velocity
+        RDouble Omega[100];
+        GlobalDataBase::GetData("Omega", &Omega, PHDOUBLE, nTurboZone);
+
+        string shroud[100];
+        GlobalDataBase::GetData("shroud", &shroud, PHSTRING, nTurboZone);
+
+        RDouble refMach = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+        RDouble refTemp = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+
+        RDouble refGama = 1.4;
+        RDouble refGasConstant = 287.15;
+        RDouble refVel = refMach * sqrt(refGama * refGasConstant * refTemp);
+
+        //! Parallel
+        int iTurboZone = this->GetOrdinaryGridIndex();
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = this->GetZoneID();
+        }
+
+        Omega[iTurboZone] /= refVel;
+
+        for (iFace = 0; iFace < nTotalFace; ++iFace)
+        {
+            vgx[iFace] = 0.0;
+            vgy[iFace] = 0.0;
+            vgz[iFace] = 0.0;
+
+            //! Compute velocity of each face.
+            vgy[iFace] = - Omega[iTurboZone] * zfc[iFace];
+            vgz[iFace] =   Omega[iTurboZone] * yfc[iFace];
+
+            //! Set velocity of each face.
+            vgn[iFace] = vgx[iFace] * xfn[iFace] + vgy[iFace] * yfn[iFace] + vgz[iFace] * zfn[iFace];
+        }
+
+        //! rotating speed of shroud is 0.
+        for (iFace = 0; iFace < nBoundFace; iFace++)
+        {
+            UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+            int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+            string bcName = bcRegion->GetBCName();
+            int bcType = bcRegion->GetBCType();
+
+            for (int iTurboZone = 0; iTurboZone < nTurboZone; iTurboZone++)
+            {
+                if (bcName == shroud[iTurboZone])
+                {
+                    vgx[iFace] = 0;
+                    vgy[iFace] = 0;
+                    vgz[iFace] = 0;
+
+                    //! Set velocity of each face.
+                    vgn[iFace] = 0;
+                }
+            }
+        }
+    }
+
+    delete []xfct;
+    delete []yfct;
+    delete []zfct;
+    delete []areat;
+}
+
+void UnstructGrid::ComputeFaceNormal2D()
+{
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    int *face2node = this->GetFace2Node();
+    int nTotalFace = this->GetNTotalFace();
+
+    RDouble *xfn  = this->GetFaceNormalX();
+    RDouble *yfn  = this->GetFaceNormalY();
+    RDouble *zfn  = this->GetFaceNormalZ();
+    RDouble *area = this->GetFaceArea();
+
+    RDouble oarea;
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        int p1  = face2node[ 2 * iFace     ];
+        int p2  = face2node[ 2 * iFace + 1 ];
+
+        xfn[iFace]  = y[p2] - y[p1];
+        yfn[iFace]  = x[p1] - x[p2];
+        zfn[iFace]  = 0.0;
+
+        area[iFace] = sqrt(xfn[iFace] * xfn[iFace] + yfn[iFace] * yfn[iFace] + zfn[iFace] * zfn[iFace]);
+        oarea   = one / (area[iFace] + SMALL);
+        xfn[iFace] *= oarea;
+        yfn[iFace] *= oarea;
+        zfn[iFace] *= oarea;
+    }
+}
+
+void UnstructGrid::ComputeFaceCenter3D(ActionKey *actkey)
+{
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+    int *face2node = this->GetFace2Node();
+    int nTotalFace = this->GetNTotalFace();
+    int *node_number_of_each_face = this->GetNodeNumberOfEachFace();
+
+    RDouble *xfc = this->GetFaceCenterX();
+    RDouble *yfc = this->GetFaceCenterY();
+    RDouble *zfc = this->GetFaceCenterZ();
+
+    RDouble *xfn = this->GetFaceNormalX();
+    RDouble *yfn = this->GetFaceNormalY();
+    RDouble *zfn = this->GetFaceNormalZ();
+
+    RDouble x0,y0,z0,x00,y00,z00;
+    RDouble dx1,dy1,dz1,dx2,dy2,dz2,anx,any,anz,area,sarea,osarea,norm;
+
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        x0 = 0.0;
+        y0 = 0.0;
+        z0 = 0.0;
+
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            int index = face2node[ nodepos + j ];
+            x0 += x[ index ];
+            y0 += y[ index ];
+            z0 += z[ index ];
+        }
+
+        RDouble coef = one / node_number_of_each_face[iFace];
+
+        x0 *= coef;
+        y0 *= coef;
+        z0 *= coef;
+
+        xfc[iFace] = 0.0;
+        yfc[iFace] = 0.0;
+        zfc[iFace] = 0.0;
+        sarea  = 0.0;
+
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            int index1 = j;
+            int index2 = (j + 1) % node_number_of_each_face[iFace];
+            int p1 = face2node[ nodepos + index1 ];
+            int p2 = face2node[ nodepos + index2 ];
+
+            dx1 = x[p1] - x0;
+            dy1 = y[p1] - y0;
+            dz1 = z[p1] - z0;
+
+            dx2 = x[p2] - x0;
+            dy2 = y[p2] - y0;
+            dz2 = z[p2] - z0;
+
+            x00 = third * (x[p1] + x[p2] + x0);
+            y00 = third * (y[p1] + y[p2] + y0);
+            z00 = third * (z[p1] + z[p2] + z0);
+
+            anx = dy1 * dz2 - dy2 * dz1;
+            any = dz1 * dx2 - dz2 * dx1;
+            anz = dx1 * dy2 - dx2 * dy1;
+
+            area = half * sqrt(anx * anx + any * any + anz * anz);
+            norm = anx * xfn[iFace] + any * yfn[iFace] + anz * zfn[iFace];
+
+            if (norm < 0.0) area  = - area;
+            sarea += area;
+
+            xfc[iFace] += area * x00;
+            yfc[iFace] += area * y00;
+            zfc[iFace] += area * z00;
+        }
+
+        osarea = 1.0 / (sarea + SMALL);
+
+        xfc[iFace] *= osarea;
+        yfc[iFace] *= osarea;
+        zfc[iFace] *= osarea;
+
+        nodepos += node_number_of_each_face[iFace];
+    }
+}
+
+void UnstructGrid::ComputeFaceCenter3DNew(ActionKey *actkey)
+{
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+    int *face2node = this->GetFace2Node();
+    int nTotalFace = this->GetNTotalFace();
+    int *node_number_of_each_face = this->GetNodeNumberOfEachFace();
+
+    RDouble *xfc = this->GetFaceCenterX();
+    RDouble *yfc = this->GetFaceCenterY();
+    RDouble *zfc = this->GetFaceCenterZ();
+
+    RDouble * xfn = this->GetFaceNormalX();
+    RDouble * yfn = this->GetFaceNormalY();
+    RDouble * zfn = this->GetFaceNormalZ();
+
+    RDouble xct,yct,zct,x00,y00,z00;
+    RDouble dx1,dy1,dz1,dx2,dy2,dz2,anx,any,anz,sss,suma,norm;
+    RDouble tmp;
+
+    int p1,p2,pt;
+
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        xct = 0.0;
+        yct = 0.0;
+        zct = 0.0;
+
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            pt = face2node[ nodepos + j ];
+            xct += x[ pt ];
+            yct += y[ pt ];
+            zct += z[ pt ];
+        }
+
+        tmp = 1.0 / node_number_of_each_face[iFace];
+
+        xct *= tmp;
+        yct *= tmp;
+        zct *= tmp;
+
+        xfc[iFace] = 0.0;
+        yfc[iFace] = 0.0;
+        zfc[iFace] = 0.0;
+        suma   = 0.0;
+
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            p1 = face2node[ nodepos + j ];
+            p2 = face2node[ nodepos + (j + 1) % node_number_of_each_face[iFace] ];
+
+            dx1 = xct - x[p1];
+            dy1 = yct - y[p1];
+            dz1 = zct - z[p1];
+
+            dx2 = xct - x[p2];
+            dy2 = yct - y[p2];
+            dz2 = zct - z[p2];
+
+            x00 = x[p1] + x[p2] + xct;
+            y00 = y[p1] + y[p2] + yct;
+            z00 = z[p1] + z[p2] + zct;
+
+            anx = dy1 * dz2 - dy2 * dz1;
+            any = dz1 * dx2 - dz2 * dx1;
+            anz = dx1 * dy2 - dx2 * dy1;
+
+            sss  = sqrt(anx * anx + any * any + anz * anz);
+            norm = anx * xfn[iFace] + any * yfn[iFace] + anz * zfn[iFace];
+
+            if (norm < 0.0) sss = - sss;
+            suma += sss;
+
+            xfc[iFace] += sss * x00;
+            yfc[iFace] += sss * y00;
+            zfc[iFace] += sss * z00;
+        }
+
+        tmp = third / (suma + SMALL);
+
+        xfc[iFace] *= tmp;
+        yfc[iFace] *= tmp;
+        zfc[iFace] *= tmp;
+
+        nodepos += node_number_of_each_face[iFace];
+    }
+}
+
+void UnstructGrid::ComputeFaceCenter2D(ActionKey *actkey)
+{
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+    int *face2node = this->GetFace2Node();
+    int nTotalFace = this->GetNTotalFace();
+
+    RDouble *xfc = this->GetFaceCenterX();
+    RDouble *yfc = this->GetFaceCenterY();
+    RDouble *zfc = this->GetFaceCenterZ();
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        int p1  = face2node[ 2 * iFace     ];
+        int p2  = face2node[ 2 * iFace + 1 ];
+        xfc[iFace] = half * (x[p1] + x[p2]);
+        yfc[iFace] = half * (y[p1] + y[p2]);
+        zfc[iFace] = half * (z[p1] + z[p2]);
+    }
+}
+
+void UnstructGrid::ComputeCellCenterVol3D(ActionKey *actkey)
+{
+    int cell, le, re, p2, p3;
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalFace = this->GetNTotalFace();
+    int nTotalCell = this->GetNTotalCell();
+    int nTotal = nTotalCell + nBoundFace;
+    int *leftCellOfFace = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+    int *face2node = this->GetFace2Node();
+    int *node_number_of_each_face = this->GetNodeNumberOfEachFace();
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+
+    RDouble *xcc = this->GetCellCenterX();
+    RDouble *ycc = this->GetCellCenterY();
+    RDouble *zcc = this->GetCellCenterZ();
+
+    RDouble *xfc = this->GetFaceCenterX();
+    RDouble *yfc = this->GetFaceCenterY();
+    RDouble *zfc = this->GetFaceCenterZ();
+
+    RDouble *nxs = this->GetFaceNormalX();
+    RDouble *nys = this->GetFaceNormalY();
+    RDouble *nzs = this->GetFaceNormalZ();
+    RDouble *ns  = this->GetFaceArea();
+
+    RDouble *vol = this->GetCellVolume();
+
+    RDouble x21, y21, z21, x31, y31, z31, nx, ny, nz;
+    RDouble xc,  yc,  zc,  tmp;
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        xcc[iCell] = 0.0;
+        ycc[iCell] = 0.0;
+        zcc[iCell] = 0.0;
+    }
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        vol[iCell] = 0.0;
+    }
+
+    int nodepos = 0;
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+        if (iFace < nBoundFace) re = iFace + nTotalCell;
+
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            int index1 = j;
+            int index2 = (j + 1) % node_number_of_each_face[iFace];
+            p2 = face2node[ nodepos + index1 ];
+            p3 = face2node[ nodepos + index2 ];
+
+            x21 = x[p2] - xfc[iFace];
+            y21 = y[p2] - yfc[iFace];
+            z21 = z[p2] - zfc[iFace];
+
+            x31 = x[p3] - xfc[iFace];
+            y31 = y[p3] - yfc[iFace];
+            z31 = z[p3] - zfc[iFace];
+
+            nx  = y21 * z31 - y31 * z21;
+            ny  = z21 * x31 - z31 * x21;
+            nz  = x21 * y31 - x31 * y21;
+
+            xc  = xfc[iFace] + x[p2] + x[p3];
+            yc  = yfc[iFace] + y[p2] + y[p3];
+            zc  = zfc[iFace] + z[p2] + z[p3];
+
+            //! Cell Center and Volume.
+            tmp     = nx * xc + ny * yc + nz * zc;
+            xc      *= tmp;
+            yc      *= tmp;
+            zc      *= tmp;
+            xcc[le] += xc;
+            ycc[le] += yc;
+            zcc[le] += zc;
+            vol[le] += tmp;
+
+            xcc[re] -= xc;
+            ycc[re] -= yc;
+            zcc[re] -= zc;
+            vol[re] -= tmp;
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    std::ostringstream oss;
+
+    //! Don't forget the coefficients.
+    cell = 0;
+    RDouble minvol = LARGE, maxvol = 0.0;
+    int index_minv = 0,index_maxv = 0;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        tmp     = 1.0 / (4.0 * vol[iCell] + SMALL);
+        xcc[iCell] *= tmp;
+        ycc[iCell] *= tmp;
+        zcc[iCell] *= tmp;
+        vol[iCell] /= 18.0;
+        if (minvol > vol[iCell])
+        {
+            minvol     = vol[iCell];
+            index_minv = iCell;
+        }
+        if (maxvol < vol[iCell])
+        {
+            maxvol     = vol[iCell];
+            index_maxv = iCell;
+        }
+
+        if (vol[iCell] <= 0.0)
+        {
+            ++ cell;
+            oss << "  Warning: negative volume cell index " << iCell << ", (x, y, z) " << xcc[iCell] << " " << ycc[iCell] << " " << zcc[iCell] << " !\n";
+        }
+    }
+
+    if (cell) oss << cell << " cells have negative vols \n";
+
+    //! For ghost cells.
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le         = leftCellOfFace[ iFace ];
+        //re         = rightCellOfFace[ iFace ];
+        re         = iFace + nTotalCell;
+
+        if (ns[iFace] > SMALL)
+        {
+           tmp     = 2.0 * ((xcc[le] - xfc[iFace]) * nxs[iFace] + (ycc[le] - yfc[iFace]) * nys[iFace] + (zcc[le] - zfc[iFace]) * nzs[iFace]);
+           xcc[re] = xcc[le] - nxs[iFace] * tmp;
+           ycc[re] = ycc[le] - nys[iFace] * tmp;
+           zcc[re] = zcc[le] - nzs[iFace] * tmp;
+
+        }
+        else
+        {
+            //! Degenerated faces.
+           xcc[re] = - xcc[le] + 2.0 * xfc[iFace];
+           ycc[re] = - ycc[le] + 2.0 * yfc[iFace];
+           zcc[re] = - zcc[le] + 2.0 * zfc[iFace];
+       }
+       vol[re] = vol[le];
+    }
+}
+
+void UnstructGrid::ComputeCellCenterVol3DNew2(ActionKey *actkey)
+{
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalFace = this->GetNTotalFace();
+    int nTotalCell = this->GetNTotalCell();
+    int *leftCellOfFace  = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+    int *face2node = this->GetFace2Node();
+    int *node_number_of_each_face = this->GetNodeNumberOfEachFace();
+    int *cell2node = this->GetCell2Node();
+    int *node_number_of_each_cell = this->GetNodeNumberOfEachCell();
+    RDouble *x   = this->GetX();
+    RDouble *y   = this->GetY();
+    RDouble *z   = this->GetZ();
+
+    RDouble *xcc = this->GetCellCenterX();
+    RDouble *ycc = this->GetCellCenterY();
+    RDouble *zcc = this->GetCellCenterZ();
+
+    RDouble *xfc = this->GetFaceCenterX();
+    RDouble *yfc = this->GetFaceCenterY();
+    RDouble *zfc = this->GetFaceCenterZ();
+
+    RDouble *nxs = this->GetFaceNormalX();
+    RDouble *nys = this->GetFaceNormalY();
+    RDouble *nzs = this->GetFaceNormalZ();
+    RDouble *ns  = this->GetFaceArea();
+
+    RDouble *vol = this->GetCellVolume();
+
+    int iFace, iCell, le, re, j, p2, p3, nodepos, index1, index2, cell;
+    RDouble x21, y21, z21, x31, y31, z31, x41, y41, z41, nx, ny, nz;
+    RDouble xc,  yc,  zc,  tmp;
+    std::ostringstream oss;
+
+    nodepos = 0;
+    for (iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        xcc[iCell] = 0.0;
+        ycc[iCell] = 0.0;
+        zcc[iCell] = 0.0;
+
+        for (j = 0; j < node_number_of_each_cell[iCell]; ++ j)
+        {
+            p2 = cell2node[ nodepos + j ];
+            xcc[iCell] += x[p2];
+            ycc[iCell] += y[p2];
+            zcc[iCell] += z[p2];
+        }
+
+        xcc[iCell] /= node_number_of_each_cell[iCell];
+        ycc[iCell] /= node_number_of_each_cell[iCell];
+        zcc[iCell] /= node_number_of_each_cell[iCell];
+
+        nodepos += node_number_of_each_cell[iCell];
+    }
+    
+    RDouble *xcct = new RDouble[nTotalCell];
+    RDouble *ycct = new RDouble[nTotalCell];
+    RDouble *zcct = new RDouble[nTotalCell];
+    for (iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        xcct[iCell] = 0.0;
+        ycct[iCell] = 0.0;
+        zcct[iCell] = 0.0;
+        vol [iCell] = 0.0;
+    }
+
+    nodepos = 0;
+    for (iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace [ iFace ];
+       
+        for (j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            index1 = j;
+            index2 = (j + 1) % node_number_of_each_face[iFace];
+            p2 = face2node[ nodepos + index1 ];
+            p3 = face2node[ nodepos + index2 ];
+
+            x21 = x[p2] - xfc[iFace];
+            y21 = y[p2] - yfc[iFace];
+            z21 = z[p2] - zfc[iFace];
+
+            x31 = x[p3] - xfc[iFace];
+            y31 = y[p3] - yfc[iFace];
+            z31 = z[p3] - zfc[iFace];
+
+            nx  = y21 * z31 - y31 * z21;
+            ny  = z21 * x31 - z31 * x21;
+            nz  = x21 * y31 - x31 * y21;
+
+            x41 = xcc[le] - xfc[iFace];
+            y41 = ycc[le] - yfc[iFace];
+            z41 = zcc[le] - zfc[iFace];
+
+            xc  = xfc[iFace] + x[p2] + x[p3] + xcc[le];
+            yc  = yfc[iFace] + y[p2] + y[p3] + ycc[le];
+            zc  = zfc[iFace] + z[p2] + z[p3] + zcc[le];
+
+            tmp       = nx * x41 + ny * y41 + nz * z41;
+            tmp       = -tmp;
+            xc       *= tmp;
+            yc       *= tmp;
+            zc       *= tmp;
+            xcct[le] += xc;
+            ycct[le] += yc;
+            zcct[le] += zc;
+            vol[le]  += tmp;
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+    for (iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [ iFace ];
+        re = rightCellOfFace[ iFace ];
+       
+        for (j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            index1 = j;
+            index2 = (j + 1) % node_number_of_each_face[iFace];
+            p2 = face2node[ nodepos + index1 ];
+            p3 = face2node[ nodepos + index2 ];
+
+            x21 = x[p2] - xfc[iFace];
+            y21 = y[p2] - yfc[iFace];
+            z21 = z[p2] - zfc[iFace];
+
+            x31 = x[p3] - xfc[iFace];
+            y31 = y[p3] - yfc[iFace];
+            z31 = z[p3] - zfc[iFace];
+
+            nx  = y21 * z31 - y31 * z21;
+            ny  = z21 * x31 - z31 * x21;
+            nz  = x21 * y31 - x31 * y21;
+
+            x41 = xcc[le] - xfc[iFace];
+            y41 = ycc[le] - yfc[iFace];
+            z41 = zcc[le] - zfc[iFace];
+
+            xc  = xfc[iFace] + x[p2] + x[p3] + xcc[le];
+            yc  = yfc[iFace] + y[p2] + y[p3] + ycc[le];
+            zc  = zfc[iFace] + z[p2] + z[p3] + zcc[le];
+
+            tmp       = nx * x41 + ny * y41 + nz * z41;
+            tmp       = -tmp;
+            xc       *= tmp;
+            yc       *= tmp;
+            zc       *= tmp;
+            xcct[le] += xc;
+            ycct[le] += yc;
+            zcct[le] += zc;
+            vol[le]  += tmp;
+
+            x41 = xcc[re] - xfc[iFace];
+            y41 = ycc[re] - yfc[iFace];
+            z41 = zcc[re] - zfc[iFace];
+
+            xc  = xfc[iFace] + x[p2] + x[p3] + xcc[re];
+            yc  = yfc[iFace] + y[p2] + y[p3] + ycc[re];
+            zc  = zfc[iFace] + z[p2] + z[p3] + zcc[re];
+
+            tmp       = nx * x41 + ny * y41 + nz * z41;
+            xc       *= tmp;
+            yc       *= tmp;
+            zc       *= tmp;
+            xcct[re] += xc;
+            ycct[re] += yc;
+            zcct[re] += zc;
+            vol[re]  += tmp;
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+    
+    cell = 0;
+    RDouble minvol = LARGE, maxvol = 0.0;
+    int index_minv = 0,index_maxv = 0;
+    for (iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        tmp          = 1.0 / (4.0 * vol[iCell] + SMALL);
+        xcct[iCell] *= tmp;
+        ycct[iCell] *= tmp;
+        zcct[iCell] *= tmp;
+        vol[iCell]  /= 6.0;
+        if (minvol > vol[iCell])
+        {
+            minvol     = vol[iCell];
+            index_minv = iCell;
+        }
+        if (maxvol < vol[iCell])
+        {
+            maxvol     = vol[iCell];
+            index_maxv = iCell;
+        }
+
+        if (vol[iCell] <= 0.0)
+        {
+            ++ cell;
+            oss << "  Warning: negative volume cell index " << iCell << ", (x, y, z) " << xcc[iCell] << " " << ycc[iCell] << " " << zcc[iCell] << " !\n";
+        }
+    }
+
+    if (cell) oss << cell << " cells have negative vols \n";
+    
+    int *mark = new int[nTotalCell];
+    for (iCell = 0; iCell < nTotalCell; ++ iCell) mark[iCell] = 1;
+    
+    for (iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace[iFace];
+
+        x21 = xcct[le] - xfc[iFace];
+        y21 = ycct[le] - yfc[iFace];
+        z21 = zcct[le] - zfc[iFace];
+        tmp = x21 * nxs[iFace] + y21 * nys[iFace] + z21 * nzs[iFace];
+        if(tmp > 0.0) mark[le] = 0;
+    }
+    for (iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace[iFace];
+        re = rightCellOfFace[iFace];
+
+        x21 = xcct[le] - xfc[iFace];
+        y21 = ycct[le] - yfc[iFace];
+        z21 = zcct[le] - zfc[iFace];  
+        tmp = x21 * nxs[iFace] + y21 * nys[iFace] + z21 * nzs[iFace];
+        if(tmp > 0.0) mark[le] = 0;
+
+        x21 = xcct[re] - xfc[iFace];
+        y21 = ycct[re] - yfc[iFace];
+        z21 = zcct[re] - zfc[iFace];  
+        tmp = x21 * nxs[iFace] + y21 * nys[iFace] + z21 * nzs[iFace];
+        if(tmp < 0.0) mark[re] = 0;
+    }
+
+    for (iCell = 0; iCell < nTotalCell; ++iCell)
+    {
+        if (mark[iCell])
+        {
+            xcc[iCell] = xcct[iCell];
+            ycc[iCell] = ycct[iCell];
+            zcc[iCell] = zcct[iCell];
+        }
+    }
+
+    delete [] mark;
+    delete [] xcct;
+    delete [] ycct;
+    delete [] zcct;
+
+    //! For ghost cells.
+    for (iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace[ iFace ];
+        //re = rightCellOfFace[ iFace ];
+        re = iFace + nTotalCell;
+
+        if (ns[iFace] > SMALL)
+        {
+           tmp     = 2.0 * ((xcc[le] - xfc[iFace]) * nxs[iFace] + (ycc[le] - yfc[iFace]) * nys[iFace] + (zcc[le] - zfc[iFace]) * nzs[iFace]);
+           xcc[re] = xcc[le] - nxs[iFace] * tmp;
+           ycc[re] = ycc[le] - nys[iFace] * tmp;
+           zcc[re] = zcc[le] - nzs[iFace] * tmp;
+
+        }
+        else
+        {
+            //! Degenerated faces.
+           xcc[re] = - xcc[le] + 2.0 * xfc[iFace];
+           ycc[re] = - ycc[le] + 2.0 * yfc[iFace];
+           zcc[re] = - zcc[le] + 2.0 * zfc[iFace];
+       }
+       vol[re] = vol[le];
+    }
+}
+
+void UnstructGrid::ComputeCellCenterVol3DNew(ActionKey *actkey)
+{
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalFace = this->GetNTotalFace();
+    int nTotalCell = this->GetNTotalCell();
+    int nTotal = nTotalCell + nBoundFace;
+    int *leftCellOfFace = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+    int *face2node = this->GetFace2Node();
+    int *node_number_of_each_face = this->GetNodeNumberOfEachFace();
+    RDouble *x    = this->GetX();
+    RDouble *y    = this->GetY();
+    RDouble *z    = this->GetZ();
+
+    RDouble *xcc  = this->GetCellCenterX();
+    RDouble *ycc  = this->GetCellCenterY();
+    RDouble *zcc  = this->GetCellCenterZ();
+
+    RDouble *xfc  = this->GetFaceCenterX();
+    RDouble *yfc  = this->GetFaceCenterY();
+    RDouble *zfc  = this->GetFaceCenterZ();
+
+    RDouble *xfn  = this->GetFaceNormalX();
+    RDouble *yfn  = this->GetFaceNormalY();
+    RDouble *zfn  = this->GetFaceNormalZ();
+    RDouble *area = this->GetFaceArea();
+    RDouble *vol  = this->GetCellVolume();
+
+    RDouble x21, y21, z21, x31, y31, z31, nx, ny, nz;
+    RDouble vvol, vvoll,vvolr,tmp;
+    RDouble xc,yc,zc,xcl,ycl,zcl,xcr,ycr,zcr;
+    RDouble hxcl,hycl,hzcl,hxcr,hycr,hzcr;
+
+    int cell, le, re, p2, p3;
+    RDouble c34 = 3.0 / 4.0;
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        xcc[iCell] = 0.0;
+        ycc[iCell] = 0.0;
+        zcc[iCell] = 0.0;
+    }
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        vol[iCell] = 0.0;
+    }
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        le     = leftCellOfFace [ iFace ];
+        re     = rightCellOfFace[ iFace ];
+        if (iFace < nBoundFace) re = iFace + nTotalCell;
+
+        xc = xfc[iFace];
+        yc = yfc[iFace];
+        zc = zfc[iFace];
+
+        vvol = third * (xfn[iFace] * xc + yfn[iFace] * yc + zfn[iFace] * zc) * area[iFace];
+        xc *= c34 * vvol;
+        yc *= c34 * vvol;
+        zc *= c34 * vvol;
+
+        xcc[le] += xc;
+        ycc[le] += yc;
+        zcc[le] += zc;
+        vol[le] += vvol;
+
+        xcc[re] -= xc;
+        ycc[re] -= yc;
+        zcc[re] -= zc;
+        vol[re] -= vvol;
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        tmp = 1.0 / (vol[iCell] + SMALL);
+        xcc[iCell] *= tmp;
+        ycc[iCell] *= tmp;
+        zcc[iCell] *= tmp;
+    }
+
+    RDouble *txc = new RDouble[nTotal];
+    RDouble *tyc = new RDouble[nTotal];
+    RDouble *tzc = new RDouble[nTotal];
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        txc[iCell] = xcc[iCell];
+        tyc[iCell] = ycc[iCell];
+        tzc[iCell] = zcc[iCell];
+    }
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        xcc[iCell] = 0.0;
+        ycc[iCell] = 0.0;
+        zcc[iCell] = 0.0;
+    }
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        vol[iCell] = 0.0;
+    }
+
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        le     = leftCellOfFace [ iFace ];
+        re     = rightCellOfFace[ iFace ];
+        if (iFace < nBoundFace) re = iFace + nTotalCell;
+
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            p2 = face2node[ nodepos + j ];
+            p3 = face2node[ nodepos + (j + 1) % node_number_of_each_face[iFace] ];
+
+            x21 = x[p2] - xfc[iFace];
+            y21 = y[p2] - yfc[iFace];
+            z21 = z[p2] - zfc[iFace];
+
+            x31 = x[p3] - xfc[iFace];
+            y31 = y[p3] - yfc[iFace];
+            z31 = z[p3] - zfc[iFace];
+
+            nx  = half * (y21 * z31 - y31 * z21);
+            ny  = half * (z21 * x31 - z31 * x21);
+            nz  = half * (x21 * y31 - x31 * y21);
+
+            xc  = third * (xfc[iFace] + x[p2] + x[p3]);
+            yc  = third * (yfc[iFace] + y[p2] + y[p3]);
+            zc  = third * (zfc[iFace] + z[p2] + z[p3]);
+
+            hxcl = xc - txc[le];
+            hycl = yc - tyc[le];
+            hzcl = zc - tzc[le];
+
+            hxcr = xc - txc[re];
+            hycr = yc - tyc[re];
+            hzcr = zc - tzc[re];
+
+            //! Cell Center and Volume.
+            vvoll = third * (nx * hxcl + ny * hycl + nz * hzcl);
+            vvolr = third * (nx * hxcr + ny * hycr + nz * hzcr);
+
+            xcl = xc - fourth * hxcl;
+            ycl = yc - fourth * hycl;
+            zcl = zc - fourth * hzcl;
+            xcl *= vvoll;
+            ycl *= vvoll;
+            zcl *= vvoll;
+
+            xcc[le] += xcl;
+            ycc[le] += ycl;
+            zcc[le] += zcl;
+            vol[le] += vvoll;
+
+            xcr = xc - fourth * hxcr;
+            ycr = yc - fourth * hycr;
+            zcr = zc - fourth * hzcr;
+            xcr  *= vvolr;
+            ycr  *= vvolr;
+            zcr  *= vvolr;
+
+            xcc[re] -= xcr;
+            ycc[re] -= ycr;
+            zcc[re] -= zcr;
+            vol[re] -= vvolr;
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    delete [] txc;
+    delete [] tyc;
+    delete [] tzc;
+
+    std::ostringstream oss;
+
+    //! Don't forget the coefficients.
+    cell = 0;
+    RDouble minvol = LARGE, maxvol = 0.0;
+    int index_minv = 0,index_maxv = 0;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        tmp = 1.0 / (vol[iCell] + SMALL);
+        xcc[iCell] *= tmp;
+        ycc[iCell] *= tmp;
+        zcc[iCell] *= tmp;
+
+        if (minvol > vol[iCell])
+        {
+            minvol = vol[iCell];
+            index_minv = iCell;
+        }
+        if (maxvol < vol[iCell])
+        {
+            maxvol = vol[iCell];
+            index_maxv = iCell;
+        }
+
+        //minvol = MIN(minvol, vol[iCell]);
+        //maxvol = MAX(maxvol, vol[iCell]);
+        if (vol[iCell] <= 0.0)
+        {
+            vol[iCell] = - vol[iCell];
+            ++ cell;
+            oss << "  Warning: negative volume cell index " << iCell << ", (x, y, z) " << xcc[iCell] << " " << ycc[iCell] << " " << zcc[iCell] << " !\n";
+        }
+    }
+
+    if (cell) oss << cell << " cells have negative vols \n";
+
+    //! For ghost cells.
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace[ iFace ];
+        re = iFace + nTotalCell;
+
+        if (area[iFace] > SMALL)
+        {
+           tmp = 2.0 * ((xcc[le] - xfc[iFace]) * xfn[iFace] + (ycc[le] - yfc[iFace]) * yfn[iFace] + (zcc[le] - zfc[iFace]) * zfn[iFace]);
+           xcc[re] = xcc[le] - xfn[iFace] * tmp;
+           ycc[re] = ycc[le] - yfn[iFace] * tmp;
+           zcc[re] = zcc[le] - zfn[iFace] * tmp;
+
+        }
+        else
+        {
+            //! Degenerated faces.
+           xcc[re] = - xcc[le] + 2.0 * xfc[iFace];
+           ycc[re] = - ycc[le] + 2.0 * yfc[iFace];
+           zcc[re] = - zcc[le] + 2.0 * zfc[iFace];
+       }
+       vol[re] = vol[le];
+    }
+}
+
+void UnstructGrid::ComputeCellCenterVol2D(ActionKey *actkey)
+{
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalFace = this->GetNTotalFace();
+    int nTotalCell = this->GetNTotalCell();
+    int nTotal = nTotalCell + nBoundFace;
+    int *leftCellOfFace = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+
+    RDouble * xcc  = this->GetCellCenterX();
+    RDouble * ycc  = this->GetCellCenterY();
+    RDouble * zcc  = this->GetCellCenterZ();
+
+    RDouble * xfc  = this->GetFaceCenterX();
+    RDouble * yfc  = this->GetFaceCenterY();
+    RDouble * zfc  = this->GetFaceCenterZ();
+
+    RDouble * nxs  = this->GetFaceNormalX();
+    RDouble * nys  = this->GetFaceNormalY();
+    RDouble * nzs  = this->GetFaceNormalZ();
+    RDouble * ns   = this->GetFaceArea();
+    RDouble * vol  = this->GetCellVolume();
+
+    int negativecell, le, re;
+    RDouble dot, tmp;
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        xcc[iCell] = 0.0;
+        ycc[iCell] = 0.0;
+        zcc[iCell] = 0.0;
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        vol[iCell] = 0.0;
+    }
+
+    //! Now the cell center and volume.
+    //! For each face, boundary faces first.
+    //! For boundary faces.
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le       = leftCellOfFace[ iFace ];
+        dot      = (xfc[iFace] * nxs[iFace] + yfc[iFace] * nys[iFace] + zfc[iFace] * nzs[iFace]) * ns[iFace];
+        xcc[le] += xfc[iFace] * dot;
+        ycc[le] += yfc[iFace] * dot;
+        zcc[le] += zfc[iFace] * dot;
+        vol[le] += dot;
+    }
+    //! For interior cell faces.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le       = leftCellOfFace [ iFace ];
+        re       = rightCellOfFace[ iFace ];
+        dot      = (xfc[iFace] * nxs[iFace] + yfc[iFace] * nys[iFace] + zfc[iFace] * nzs[iFace]) * ns[iFace];
+        xcc[le] += xfc[iFace] * dot;
+        ycc[le] += yfc[iFace] * dot;
+        zcc[le] += zfc[iFace] * dot;
+        vol[le] += dot;
+        xcc[re] -= xfc[iFace] * dot;
+        ycc[re] -= yfc[iFace] * dot;
+        zcc[re] -= zfc[iFace] * dot;
+        vol[re] -= dot;
+    }
+
+    //! Don't forget the coefficients.
+    negativecell = 0;
+    RDouble minvol = LARGE, maxvol = 0.0;
+    int index_minv = 0, index_maxv = 0;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        tmp = 1.0 / (1.5 * vol[iCell] + SMALL);
+        xcc[iCell] *= tmp;
+        ycc[iCell] *= tmp;
+        zcc[iCell] *= tmp;
+        vol[iCell] *= half;
+
+        if (minvol > vol[iCell])
+        {
+            minvol = vol[iCell];
+            index_minv = iCell;
+        }
+        if (maxvol < vol[iCell])
+        {
+            maxvol = vol[iCell];
+            index_maxv = iCell;
+        }
+        //minvol = MIN(minvol, vol[iCell]);
+        //maxvol = MAX(maxvol, vol[iCell]);
+        if (vol[iCell] <= 0.0)
+        {
+            vol[iCell] = - vol[iCell];
+            ++ negativecell;
+            std::ostringstream oss;
+            oss << "  Warning: negative volume cell index " << iCell << ", (x, y) " << xcc[iCell] << " " << ycc[iCell] << " !\n";
+            if (PHMPI::GetCurrentProcessorID() == PHMPI::GetServerProcessorID())
+            {
+                cout << oss.str();
+            }
+        }
+    }
+
+    //if (cell) oss << cell << " cells have negative vols \n";
+    if (negativecell == nTotalCell)
+    {
+        //oss << cell << " cells have negative vols \n";
+        TK_Exit::ExceptionExit("ERROR: cells have negative vols, maybe the i j k normal direction has set error! ");
+    }
+
+    //! For ghost cells.
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace[ iFace ];
+        re = iFace + nTotalCell;
+        if (ns[iFace] > SMALL)
+        {
+            tmp = 2.0 * ((xcc[le] - xfc[iFace]) * nxs[iFace] + (ycc[le] - yfc[iFace]) * nys[iFace] + (zcc[le] - zfc[iFace]) * nzs[iFace]);
+            xcc[iFace+nTotalCell] = xcc[le] - nxs[iFace] * tmp;
+            ycc[iFace+nTotalCell] = ycc[le] - nys[iFace] * tmp;
+            zcc[iFace+nTotalCell] = zcc[le] - nzs[iFace] * tmp;
+        }
+        else
+        {
+            //! Degenerated faces.
+            xcc[iFace+nTotalCell] = - xcc[le] + 2.0 * xfc[iFace];
+            ycc[iFace+nTotalCell] = - ycc[le] + 2.0 * yfc[iFace];
+            zcc[iFace+nTotalCell] = - zcc[le] + 2.0 * zfc[iFace];
+        }
+        vol[re] = vol[le];
+    }
+
+//  oss << "Zone Index : " << this->GetZoneID() << ", min and max volumes are " 
+//      << index_minv << ": " << minvol << " " << index_maxv << ": " << maxvol << "\n";
+//
+//  StreamToActionKey(actkey, oss);
+}
+
+void UnstructGrid::ComputeLargestLocalGridLength()
+{
+    int nTotalCell = this->GetNTotalCell();
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalFace = this->GetNTotalFace();
+
+    int * leftCellOfFace  = this->GetLeftCellOfFace();
+    int * rightCellOfFace = this->GetRightCellOfFace();
+
+    RDouble * xcc = this->GetCellCenterX();
+    RDouble * ycc = this->GetCellCenterY();
+    RDouble * zcc = this->GetCellCenterZ();
+
+    RDouble * largestLocalGridLength = new RDouble [ nTotalCell ];
+    PHSPACE::SetField(largestLocalGridLength, -LARGE, nTotalCell);
+
+    int le, re;
+    RDouble dist;
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace[iFace];
+        re = rightCellOfFace[iFace];
+
+        dist = DISTANCE(xcc[le] - xcc[re], ycc[le] - ycc[re], zcc[le] - zcc[re]);
+
+        largestLocalGridLength[le] = MAX(largestLocalGridLength[le], dist);
+        largestLocalGridLength[re] = MAX(largestLocalGridLength[re], dist);
+    }
+
+    this->cellMetrics->SetLargestLocalGridLength(largestLocalGridLength);
+}
+
+void UnstructGrid::ComputeSubgridLength()
+{
+    int nTotalCell = this->GetNTotalCell();
+
+    RDouble * walldist = this->GetWallDist();
+    RDouble * largestLocalGridLength = this->GetLargestLocalGridLength();
+
+    RDouble * subgridLength = new RDouble [ nTotalCell ];
+
+    const RDouble cw = 0.15;
+    RDouble wallDistance, largestLocalGridSpacing, subgridLengthScale;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell) 
+    {
+        wallDistance = walldist[iCell];
+        largestLocalGridSpacing = largestLocalGridLength[iCell];
+
+        //! The change ratio of the normal distance is ignored bellow!!! Re-consider it future, Please!
+        subgridLengthScale = MIN( cw * MAX(wallDistance, largestLocalGridSpacing),  largestLocalGridSpacing );
+
+        subgridLength[ iCell ] = subgridLengthScale;
+    }
+
+    this->cellMetrics->SetSubgridLength(subgridLength);
+}
+
+void UnstructGrid::DXDYDZ(RDouble *f, int ie, RDouble &dfdx, RDouble &dfdy, RDouble &dfdz)
+{
+    string gradientName;
+    GetData("gradientName", &gradientName, PHSTRING, 1);
+
+    if (gradientName == "lsq")
+    {
+        DXDYDZ_LSQ(f, ie, dfdx, dfdy, dfdz);
+    }
+    else
+    {
+        DXDYDZ_GG(f, ie, dfdx, dfdy, dfdz);
+    }
+}
+
+void UnstructGrid::DXDYDZ_GG(RDouble *f, int ie, RDouble &dfdx, RDouble &dfdy, RDouble &dfdz)
+{
+    int **cell2face  = this->GetCell2Face();
+    int * face_number_of_each_cell = this->GetFaceNumberOfEachCell();
+
+    RDouble * xfn = this->GetFaceNormalX();
+    RDouble * yfn = this->GetFaceNormalY();
+    RDouble * zfn = this->GetFaceNormalZ();
+
+    RDouble * vol = this->GetCellVolume();
+
+    RDouble * area = this->GetFaceArea();
+
+    int * leftCellOfFace  = this->GetLeftCellOfFace();
+    int * rightCellOfFace = this->GetRightCellOfFace();
+    RDouble nx,ny,nz;
+    RDouble fi;
+    int face,le,re;
+
+    dfdx = 0.0;
+    dfdy = 0.0;
+    dfdz = 0.0;
+
+    for (int iFace = 0; iFace < face_number_of_each_cell[ie]; ++ iFace)
+    {
+        face = cell2face[ie][iFace];
+        le   = leftCellOfFace[ face ];
+        re   = rightCellOfFace[ face ];
+        fi   =  half * (f[le] + f[re]);
+
+        nx   = xfn[face] * area[face];
+        ny   = yfn[face] * area[face];
+        nz   = zfn[face] * area[face];
+
+        if (le == ie)
+        {
+            dfdx += fi * nx;
+            dfdy += fi * ny;
+            dfdz += fi * nz;
+        }
+        else
+        {
+            dfdx -= fi * nx;
+            dfdy -= fi * ny;
+            dfdz -= fi * nz;
+        }
+    }
+
+    RDouble ovol = 1.0 / vol[ie];
+
+    dfdx *= ovol;
+    dfdy *= ovol;
+    dfdz *= ovol;
+}
+
+void UnstructGrid::DXDYDZ_LSQ(RDouble *f, int ie, RDouble &dfdx, RDouble &dfdy, RDouble &dfdz)
+{
+    int **cell2face  = this->GetCell2Face();
+    int * face_number_of_each_cell = this->GetFaceNumberOfEachCell();
+
+    int * leftCellOfFace = this->GetLeftCellOfFace();
+    int * rightCellOfFace = this->GetRightCellOfFace();
+
+    RDouble * xcc = this->GetCellCenterX();
+    RDouble * ycc = this->GetCellCenterY();
+    RDouble * zcc = this->GetCellCenterZ();
+
+    RDouble dx,dy,dz;
+    RDouble dq,tmpx,tmpy,tmpz;
+    int face,le,re;
+
+    dfdx = 0.0;
+    dfdy = 0.0;
+    dfdz = 0.0;
+
+    RDouble * iwt = this->GetLeastSquareIWT();
+    RDouble * ixx = this->GetLeastSquareIXX();
+    RDouble * iyy = this->GetLeastSquareIYY();
+    RDouble * izz = this->GetLeastSquareIZZ();
+    RDouble * ixy = this->GetLeastSquareIXY();
+    RDouble * ixz = this->GetLeastSquareIXZ();
+    RDouble * iyz = this->GetLeastSquareIYZ();
+    char * fMark  = this->GetFaceMark();
+
+    for (int iFace = 0; iFace < face_number_of_each_cell[ie]; ++ iFace)
+    {
+        face = cell2face[ie][iFace];
+        le   = leftCellOfFace[ face ];
+        re   = rightCellOfFace[ face ];
+
+        dx  = xcc[re] - xcc[le];
+        dy  = ycc[re] - ycc[le];
+        dz  = zcc[re] - zcc[le];
+ 
+        dq  = iwt[face] * (f[re] - f[le]) * fMark[face];
+
+        tmpx = dq * dx;
+        tmpy = dq * dy;
+        tmpz = dq * dz;
+
+        dfdx += tmpx;
+        dfdy += tmpy;
+        dfdz += tmpz;
+    }
+
+    tmpx    = dfdx;
+    tmpy    = dfdy;
+    tmpz    = dfdz;
+
+    dfdx = ixx[ie] * tmpx + ixy[ie] * tmpy + ixz[ie] * tmpz;
+    dfdy = ixy[ie] * tmpx + iyy[ie] * tmpy + iyz[ie] * tmpz;
+    dfdz = ixz[ie] * tmpx + iyz[ie] * tmpy + izz[ie] * tmpz;
+}
+
+void UnstructGrid::DXDYDZ(RDouble *f, int ie, int ** cell2face, int *face_number_of_each_cell, RDouble &dfdx, RDouble &dfdy, RDouble &dfdz)
+{
+    int * leftCellOfFace = this->GetLeftCellOfFace();
+    int * rightCellOfFace = this->GetRightCellOfFace();
+    RDouble nx,ny,nz;
+    RDouble fi;
+    int face,le,re;
+
+    RDouble * xfn = this->GetFaceNormalX();
+    RDouble * yfn = this->GetFaceNormalY();
+    RDouble * zfn = this->GetFaceNormalZ();
+
+    RDouble * vol = this->GetCellVolume();
+
+    RDouble * area = this->GetFaceArea();
+
+    dfdx = 0.0;
+    dfdy = 0.0;
+    dfdz = 0.0;
+
+    for (int iFace = 0; iFace < face_number_of_each_cell[ie]; ++ iFace)
+    {
+        face = cell2face[ie][iFace];
+        le   = leftCellOfFace[ face ];
+        re   = rightCellOfFace[ face ];
+        fi   =  half * (f[le] + f[re]);
+
+        nx   = xfn[face] * area[face];
+        ny   = yfn[face] * area[face];
+        nz   = zfn[face] * area[face];
+
+        if (le == ie)
+        {
+            dfdx += fi * nx;
+            dfdy += fi * ny;
+            dfdz += fi * nz;
+        }
+        else
+        {
+            dfdx -= fi * nx;
+            dfdy -= fi * ny;
+            dfdz -= fi * nz;
+        }
+    }
+
+    RDouble ovol = 1.0 / vol[ie];
+
+    dfdx *= ovol;
+    dfdy *= ovol;
+    dfdz *= ovol;
+}
+
+void UnstructGrid::DXDYDZ_Face(RDouble *f, int iFace, int nodepos, RDouble fl, RDouble fr, RDouble &dfdx, RDouble &dfdy, RDouble &dfdz)
+{
+    int * leftCellOfFace = this->GetLeftCellOfFace();
+    int * rightCellOfFace = this->GetRightCellOfFace();
+
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+    int *node_number_of_each_face = this->GetNodeNumberOfEachFace();
+    int *face2node = this->GetFace2Node();
+    int le, re;
+    le = leftCellOfFace[iFace];
+    re = rightCellOfFace[iFace];
+
+    RDouble *xcc = this->GetCellCenterX();
+    RDouble *ycc = this->GetCellCenterY();
+    RDouble *zcc = this->GetCellCenterZ();
+
+    RDouble nx, ny, nz, vvol, tmp;
+    RDouble dx1, dy1, dz1, dx2, dy2, dz2;
+    RDouble xc, yc, zc;
+
+    RDouble fc;
+
+    dfdx = 0.0;
+    dfdy = 0.0;
+    dfdz = 0.0;
+    vvol = 0.0;
+
+    for (int i = 0; i < node_number_of_each_face[iFace]; ++ i)
+    {
+        int p1 = face2node[ nodepos + i ];
+        int p2 = face2node[ nodepos + (i + 1)%node_number_of_each_face[iFace] ];
+
+        //! Left.
+        dx1 = x[p2] - x[p1];
+        dy1 = y[p2] - y[p1];
+        dz1 = z[p2] - z[p1];
+
+        dx2 = x[p1] - xcc[le];
+        dy2 = y[p1] - ycc[le];
+        dz2 = z[p1] - zcc[le];
+
+        nx = dy1 * dz2 - dy2 * dz1;
+        ny = dz1 * dx2 - dz2 * dx1;
+        nz = dx1 * dy2 - dx2 * dy1;
+
+        fc = fl + f[p1] + f[p2];
+
+        //! Face centers.
+        xc = xcc[le] + x[p1] + x[p2];
+        yc = ycc[le] + y[p1] + y[p2];
+        zc = zcc[le] + z[p1] + z[p2];
+
+        tmp   = nx * xc + ny * yc + nz * zc;
+        vvol -= tmp;
+
+        dfdx += nx * fc;
+        dfdy += ny * fc;
+        dfdz += nz * fc;
+
+        //! Right.
+        dx1 = x[p2] - x[p1];
+        dy1 = y[p2] - y[p1];
+        dz1 = z[p2] - z[p1];
+
+        dx2 = xcc[re] - x[p1];
+        dy2 = ycc[re] - y[p1];
+        dz2 = zcc[re] - z[p1];
+
+        nx = dy1 * dz2 - dy2 * dz1;
+        ny = dz1 * dx2 - dz2 * dx1;
+        nz = dx1 * dy2 - dx2 * dy1;
+
+        fc = fr + f[p1] + f[p2];
+
+        dfdx += nx * fc;
+        dfdy += ny * fc;
+        dfdz += nz * fc;
+
+        //! Face centers.
+        xc = xcc[re] + x[p1] + x[p2];
+        yc = ycc[re] + y[p1] + y[p2];
+        zc = zcc[re] + z[p1] + z[p2];
+
+        tmp   = nx * xc + ny * yc + nz * zc;
+        vvol -= tmp;
+    }
+
+    //! Here dfdx should be divided by 6,and vol should be divided by(3*2*3)
+    //! (dfdx/6)/(vol/18)=dfdx/(vol/3).
+
+    //! Notice: this is not to say that the real vol is vvol/3,just for convenience.
+
+    RDouble coef = 3.0 / vvol;
+
+    dfdx *= coef;
+    dfdy *= coef;
+    dfdz *= coef;
+
+}
+
+LIB_EXPORT void UnstructGrid::WriteFaceBC(fstream & file)
+{
+    VirtualFile * virtualFile = new VirtualFile(&file);
+    virtualFile->BeginWriteWork();
+
+    int iZone = this->GetGridID()->GetIndex();
+
+    int nBoundFace = this->GetNBoundFace();
+
+    PHWrite(virtualFile, iZone);
+    int * bcTypeList    = new int [nBoundFace];
+    string * bcNameList = new string [nBoundFace];
+
+    UnstructBCSet **bcr = this->GetBCRecord();
+    
+    uint_long totalSize = 0;
+    for (cgsize_t iFace = 0; iFace < nBoundFace; iFace ++)
+    {
+        int bcType = bcr[iFace]->GetKey();
+        const string &bcName = bcr[iFace]->GetBCName();
+
+        bcTypeList[iFace] = bcType;
+        bcNameList[iFace] = bcName;
+
+        totalSize += static_cast< uint_long > (bcName.size());
+        totalSize += 1;
+    }
+
+    char * bcNameChar = new char [totalSize];
+    unsigned int count = 0;
+    for (cgsize_t iFace = 0; iFace < nBoundFace; iFace ++)
+    {
+        string & bcName = bcNameList[iFace];
+        streamsize nameSize = bcName.size();
+        for (unsigned int iChar = 0; iChar < nameSize; ++ iChar)
+        {
+            bcNameChar[count ++] = bcName[iChar];
+        }
+        bcNameChar[count ++] = '\0';
+    }
+    PHWrite(virtualFile, nBoundFace);
+    PHWrite(virtualFile, totalSize);
+    PHWrite(virtualFile, bcNameChar, static_cast<int>(totalSize));
+
+    PHWrite(virtualFile, nBoundFace);
+    PHWrite(virtualFile, bcTypeList, nBoundFace);
+
+    delete [] bcTypeList;
+    delete [] bcNameList;
+    delete [] bcNameChar;
+
+    virtualFile->EndWriteWork();
+
+    delete virtualFile;
+}
+
+LIB_EXPORT void UnstructGrid::CoarseGrids(int maxLevel)
+{
+    //++++++++++++++++++++++++++++++++++++++++++++++
+    //+ level = 0, the most fine grid.
+    //+ level = 1, 2, 3, ..., the coarser grid.
+    //++++++++++++++++++++++++++++++++++++++++++++++
+    int level = this->GetLevel();
+    WriteLogFile("Start coarsen grids of level: ", level + 1);
+
+    if (level > maxLevel)
+    {
+        this->SetCoarseGrid(0);
+        return;
+    }
+    
+    const int MY_METHOD       = 1;
+    const int MGRIDGEN_METHOD = 2;
+    int coarseMethod = MGRIDGEN_METHOD;
+
+    int nTotalCell = this->GetNTotalCell();
+
+    UnstructGrid * coarseGrid = 0;
+    UnstructGrid * preGrid = this;
+
+    int nDim = PHSPACE::GetDim();
+    ASSERT(nDim > 1);
+
+    RDouble MinCellNumberRatio = pow(2.0, nDim) * 0.85;
+
+    RDouble cellNumberRatio = 0.0;
+    for (int iDim = 0; cellNumberRatio < MinCellNumberRatio; ++ iDim)
+    {
+        WriteLogFile("Coarse time:", iDim);
+
+        Mesh_Agglomeration * meshAgglomeration = new Mesh_Agglomeration(preGrid, level);
+        if(coarseMethod == MGRIDGEN_METHOD)
+        {
+            meshAgglomeration->CoarsenGridOncebyMGridgen();
+        }
+        else
+        {
+            meshAgglomeration->CoarsenGridOnce();
+        }
+        
+        
+        UnstructGrid * agglomeratedGrid = meshAgglomeration->GetCoarseGrid();
+        delete meshAgglomeration;
+
+        CoarseGridConnectUNMergeFace(preGrid, agglomeratedGrid);
+        agglomeratedGrid->ComputeMetrics();
+
+        agglomeratedGrid->SetFineGrid(this);
+        agglomeratedGrid->SetLevel(this->GetLevel()+1);
+        agglomeratedGrid->SetBCRecord(this->GetBCRecord());
+        agglomeratedGrid->SetUnstructBCSet(this->GetUnstructBCSet());
+        agglomeratedGrid->SetVolumeCondition(this->GetVolumeConditionIn());
+
+        if(preGrid != this)
+        {
+            int *pre_cell2coarsegridcell = preGrid->GetCell2CoarseGridCell();
+            for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+            {
+                int preGridCellID = cell2coarsegridcell[iCell];
+                cell2coarsegridcell[iCell] = pre_cell2coarsegridcell[preGridCellID];
+            }
+        }
+
+        bool isCoarsenLimit = (preGrid->GetNTotalCell() == agglomeratedGrid->GetNTotalCell()) || (iDim > 10);
+
+        UnstructGrid * tempGrid = preGrid;
+        preGrid = agglomeratedGrid;
+        coarseGrid = agglomeratedGrid;
+
+        cellNumberRatio = (nTotalCell * 1.0) / (coarseGrid->GetNTotalCell() * 1.0);
+
+        if(iDim > 0)
+        {
+            delete tempGrid;
+        }
+
+        if(isCoarsenLimit || coarseMethod == MGRIDGEN_METHOD)
+        {
+             //! MGridgen lib will controll the ratio automatically.
+            break;
+        }
+    }
+
+    coarseGrid->SetLevel(this->GetLevel() + 1);
+    coarseGrid->SetFineGrid(this);
+    this->SetCoarseGrid(coarseGrid);
+
+    coarseGrid->SkewnessSummary();
+
+    if(PHMPI::GetNumberofGlobalZones() == PHMPI::GetNumberOfProcessor())
+    {
+        RDouble globalMinCellNumberRatio = cellNumberRatio, globalMaxCellNumberRatio = cellNumberRatio;
+        PH_CompareMaxMin(globalMaxCellNumberRatio, 1);
+        PH_CompareMaxMin(globalMinCellNumberRatio, 2);
+
+        ostringstream oss;
+        oss << "number of cell in level " << this->GetLevel() << ": " << nTotalCell << endl;
+        oss << "number of cell in level " << this->GetLevel() + 1 << ": " << this->GetCoarseGrid()->GetNTotalCell() << endl;
+        oss << "Global Min && Max cell number ratio of coarse to fine grid: " 
+            << globalMinCellNumberRatio << ", " << globalMaxCellNumberRatio << endl;
+        PrintToWindow(oss);
+        WriteLogFile(oss);
+
+    }
+}
+
+//! Generate 3D grid connectivity based on cell2coarsegridcell without merging faces.
+void CoarseGridConnectUNMergeFace(UnstructGrid *fgrid, UnstructGrid *cgrid)
+{
+    int nTotalFace = fgrid->GetNTotalFace();
+    int nBoundFace = fgrid->GetNBoundFace();
+    int * leftCellOfFace = fgrid->GetLeftCellOfFace();
+    int * rightCellOfFace = fgrid->GetRightCellOfFace();
+    int * cell2coarsegridcell = fgrid->GetCell2CoarseGridCell();
+    int cnTCell = cgrid->GetNTotalCell();
+
+    cgrid->SetNBoundFace(fgrid->GetNBoundFace());
+
+    int * fmark = new int[ nTotalFace ];
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        fmark[iFace] = 1;
+    }
+
+    int le, re;
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [ iFace ];
+        re = rightCellOfFace[ iFace ];
+        if (cell2coarsegridcell[le] == cell2coarsegridcell[re])
+        {
+            fmark[iFace] = 0;
+        }
+    }
+
+    int cnTFace = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        if (fmark[iFace] == 1) 
+        {
+            ++ cnTFace;
+        }
+    }
+
+    cgrid->SetNTotalFace(cnTFace);
+    int * node_number_of_each_face  = fgrid->GetNodeNumberOfEachFace();
+    int * face2node = fgrid->GetFace2Node();
+
+    int * cnode_number_of_each_face = new int[ cnTFace ];
+    cgrid->SetNodeNumberOfEachFace(cnode_number_of_each_face);
+    int * cleft_cell_of_face = new int[ cnTFace ];
+    int * cright_cell_of_face = new int[ cnTFace ];
+    cgrid->SetLeftCellOfFace(cleft_cell_of_face);
+    cgrid->SetRightCellOfFace(cright_cell_of_face);
+
+    int count = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace[ iFace ];
+        cnode_number_of_each_face[ count ] = node_number_of_each_face[ iFace ];
+
+        cleft_cell_of_face [ count ] = cell2coarsegridcell[le];
+        cright_cell_of_face[ count ] = cnTCell + iFace;
+        ++ count;
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        if (fmark[iFace] == 1)
+        {
+            le = leftCellOfFace [ iFace ];
+            re = rightCellOfFace[ iFace ];
+            cnode_number_of_each_face[ count ] = node_number_of_each_face[iFace];
+            cleft_cell_of_face [ count ] = cell2coarsegridcell[ le ];
+            cright_cell_of_face[ count ] = cell2coarsegridcell[ re ];
+            ++ count;
+        }
+    }
+
+    count = 0;
+    for (int i = 0; i < cnTFace; ++ i) count += cnode_number_of_each_face[i];
+
+    int * cface2node = new int[count];
+    cgrid->SetFace2Node(cface2node);
+
+    count = 0;
+    int countf = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            cface2node[ count ++ ] = face2node[ countf ++ ];
+        }
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        if (fmark[iFace] == 1)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                cface2node[ count ++ ] = face2node[ countf ++ ];
+            }
+        }
+        else
+        {
+            countf += node_number_of_each_face[iFace];
+        }
+    }
+
+    delete [] fmark;
+}
+
+void FieldVisualizationForVTK(Grid *grid_in, std::ostringstream &oss, vector<string> &title, RDouble **qn, int nl)
+{
+    UnstructGrid *grid = UnstructGridCast(grid_in);
+
+    int nTotalNode = grid->GetNTotalNode();
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+
+    int nvarplot = nl;
+
+    int * face2node = grid->GetFace2Node();
+    int * leftCellOfFace = grid->GetLeftCellOfFace();
+    int * rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble * x = grid->GetX();
+    RDouble * y = grid->GetY();
+    RDouble * z = grid->GetZ();
+
+    //! Find out cellToFace.
+    HyList < int > * cell2face = new HyList < int > [ nTotalCell ];
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        cell2face[ iCell ].SetAverNnode(4);
+    }
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellOfFace[ iFace ];
+        cell2face[ le ].insert(iFace);
+    }
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace[ iFace ];
+        int re = rightCellOfFace[ iFace ];
+        cell2face[ le ].insert(iFace);
+        cell2face[ re ].insert(iFace);
+    }
+
+    //! Find out cellToNode.
+    HyList < int > * cell2node = new HyList < int > [ nTotalCell ];
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        cell2node[ iCell ].SetAverNnode(4);
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        int face0 = cell2face[ iCell ][ 0 ];
+        int ip1 = face2node[ 2 * face0 ];
+        int ip2 = face2node[ 2 * face0 + 1 ];
+        cell2node[ iCell ].insert(ip1);
+        cell2node[ iCell ].insert(ip2);
+
+        int targetNode = ip2;
+        int checkNode  = ip1;
+        
+        int nFaceOfCell = cell2face[ iCell ].size();
+        bool isClockWise = false;
+        while (! isClockWise)
+        {
+            for (int iFace = 1; iFace < nFaceOfCell; ++ iFace)
+            {
+                int face  = cell2face[ iCell ][ iFace ];
+                int node1 = face2node[ 2 * face ];
+                int node2 = face2node[ 2 * face + 1 ];
+
+                if (node1 == targetNode)
+                {
+                    if(node2 != checkNode)
+                    {
+                        cell2node[ iCell ].insert(node2);
+                        targetNode = node2;
+                    }
+                    else
+                    {
+                        isClockWise = true;
+                        break;
+                    }
+                }
+                else if (node2 == targetNode)
+                {
+                    if(node1 != checkNode)
+                    {
+                        cell2node[ iCell ].insert(node1);
+                        targetNode = node1;
+                    }
+                    else
+                    {
+                        isClockWise = true;
+                        break;
+                    }
+                    
+                }
+
+            }    //! Iterate over all faces of cell.
+
+        }        //! Judge whether the nodes of cell have searched closed.
+
+    }            //! iCell.
+
+    //! Output to file.
+    using namespace PHENGLEI;
+    int zoneid = grid->GetZoneID();
+
+    if (zoneid == 0)
+    {
+        for (std::size_t i = 0; i < title.size(); ++ i)
+        {
+            oss << title[i] << "\n";
+        }
+    }    
+
+    std::ostringstream os_zone;
+    os_zone << "\"zone = " << grid->GetZoneID() << "\" ";
+    string zone_title = os_zone.str();
+
+    oss << "zone T = " << zone_title << " N = " << nTotalNode << "  E = " << nTotalCell  << " f = FEPOINT, ET = quadrilateral\n";
+    int wordwidth = 20;
+    for (int i = 0; i < nTotalNode; ++ i)
+    {
+        int it = i;
+        oss << setiosflags(ios::left);
+        oss << setiosflags(ios::scientific);
+        oss << setprecision(10);
+        oss << setw(wordwidth) << x[it]
+        << setw(wordwidth) << y[it]
+        << setw(wordwidth) << z[it];
+        for (int m = 0; m < nvarplot; ++ m)
+        {
+            oss << setw(wordwidth) << qn[m][it];
+        }
+        oss << "\n";
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        if (cell2node[ iCell ].size() == 3)
+        {
+            for (int m = 0; m < 3; ++ m)
+            {
+                oss << cell2node[iCell].GetData(m) + 1<< "  ";
+            }
+            oss << cell2node[iCell].GetData(2) + 1;
+        }
+        else if (cell2node[ iCell ].size() == 4)
+        {
+            for (int m = 0; m < 4; ++ m)
+            {
+                oss << cell2node[iCell].GetData(m) + 1<< "  ";
+            }
+        }
+        else
+        {
+            cout << "Error: this function only support triangle and quad !\n";
+            exit(0);
+        }
+        oss << endl;
+    }
+
+    delete [] cell2node;
+    delete [] cell2face;
+}
+void SaveDataForTecio_bac(Grid *grid_in, ActionKey *actkey, RDouble **qn, int nvarplot)
+{
+    DataContainer * cdata = actkey->GetTecData();
+
+    UnstructGrid * grid = UnstructGridCast(grid_in);
+
+    int TecioMission = WriteBlock;
+    PHWrite(cdata, &TecioMission, 1);
+    
+    int IMxOrNumPts, JMxOrNumElements, KMxOrNumFaces;
+    IMxOrNumPts      = grid->GetNTotalNode();
+    JMxOrNumElements = grid->GetNTotalCell();
+    KMxOrNumFaces    = grid->GetNTotalFace();
+    PHWrite(cdata, &IMxOrNumPts, 1);
+    PHWrite(cdata, &JMxOrNumElements, 1);
+    PHWrite(cdata, &KMxOrNumFaces, 1);
+
+    int *node_number_of_each_face  = grid->GetNodeNumberOfEachFace();
+    int TotalNumFaceNodes_Rect = 0;
+    for (int iFace = 0; iFace < KMxOrNumFaces; ++ iFace)
+    {
+        TotalNumFaceNodes_Rect += node_number_of_each_face[iFace];
+    }
+    PHWrite(cdata, &TotalNumFaceNodes_Rect, 1);
+    PHWrite(cdata, node_number_of_each_face, KMxOrNumFaces);
+
+    int nTotalNode = grid->GetNTotalNode();
+    PHWrite(cdata, &nTotalNode, 1);
+
+    RDouble * x = grid->GetX();
+    RDouble * y = grid->GetY();
+    RDouble * z = grid->GetZ();
+    PHWrite(cdata, x, nTotalNode);
+    PHWrite(cdata, y, nTotalNode);
+    PHWrite(cdata, z, nTotalNode);
+
+
+    for (int m = 0; m < nvarplot; ++ m)
+    {
+        RDouble *qq = qn[m];
+        PHWrite(cdata, qq, nTotalNode);
+    }
+    
+    int * face2node = grid->GetFace2Node();
+    
+    PHWrite(cdata, face2node, TotalNumFaceNodes_Rect);
+
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    PHWrite(cdata, leftCellOfFace, KMxOrNumFaces);
+    PHWrite(cdata, rightCellOfFace, KMxOrNumFaces);
+}
+
+void SaveDataForTecio(Grid *grid_in, ActionKey *actkey, RDouble **qn, int nvarplot)
+{
+    DataContainer * cdata = actkey->GetTecData();
+
+    UnstructGrid * grid = UnstructGridCast(grid_in);
+
+    int numberOfNodes = grid->GetNTotalNode();
+    int numberOfCells = grid->GetNTotalCell();
+    int numberOfFaces = grid->GetNTotalFace();
+
+    int numberOfNodesInZone = 0;
+    int numberOfFacesInZone = 0;
+    int numberOfCellsInZone = 0;
+
+    vector< int > keyNodes;
+    vector< int > keyFaces;
+    vector< int > nodeList;
+    vector< int > cellList;
+
+    keyNodes.resize (numberOfNodes);
+    keyFaces.resize (numberOfFaces);
+    nodeList.resize (numberOfNodes);
+    cellList.resize (numberOfCells);
+
+    SetField(keyNodes,  0, numberOfNodes);
+    SetField(keyFaces,  0, numberOfFaces);
+    SetField(nodeList, -1, numberOfNodes);
+    SetField(cellList, -1, numberOfCells);
+
+    int *  keyActiveOfCells        = grid->GetBlankIndex();
+    
+    int ** cellNodeIndexContainer  = grid->GetCell2NodeArray();
+    int *  cellNodeNumberContainer = grid->GetNodeNumberOfEachCell();
+
+    int ** cellFaceIndexContainer  = grid->GetCell2Face();
+    int *  cellFaceNumberContainer = grid->GetFaceNumberOfEachCell();
+
+    int *  faceNodeNumberContainer = grid->GetNodeNumberOfEachFace();
+    int *  faceNodeIndexContainer  = grid->GetFace2Node();
+
+    int * leftCellIndexContainer   = grid->GetLeftCellOfFace();
+    int * rightCellIndexContainer  = grid->GetRightCellOfFace();
+
+    for(int iCell = 0; iCell < numberOfCells; ++ iCell)
+    {
+        //if(keyActiveOfCells[ iCell ] == -1)
+        if (keyActiveOfCells[iCell] == 1)
+        {
+            cellList[ iCell ] = numberOfCellsInZone;
+
+            for(int iNodes = 0; iNodes < cellNodeNumberContainer[ iCell ]; ++ iNodes)
+            {
+                keyNodes[ cellNodeIndexContainer[ iCell ][ iNodes ] ] = 1;
+            }
+
+            for(int iFaces = 0; iFaces < cellFaceNumberContainer[ iCell ]; ++ iFaces)
+            {
+                keyFaces[ cellFaceIndexContainer[ iCell ][ iFaces ] ] = 1;
+            }
+            numberOfCellsInZone ++;
+        }
+    }
+
+    for(int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        if(keyNodes[ iNode ] == 1)
+        {
+            nodeList[ iNode ] = numberOfNodesInZone;
+            numberOfNodesInZone ++;
+        }
+    }
+
+    for(int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        if(keyFaces[ iFace ] == 1)
+        {
+            numberOfFacesInZone ++;
+        }
+    }
+
+    int totalNumFaceNodes = 0;
+    for(int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        if(keyFaces[ iFace ] != 1) continue;
+        totalNumFaceNodes += faceNodeNumberContainer[ iFace ];
+    }
+
+    if(numberOfNodesInZone == 0)
+    {
+        return;
+    }
+
+    int TecioMission = WriteBlock;
+
+    PHWrite(cdata, TecioMission);
+    PHWrite(cdata, numberOfNodesInZone);
+    PHWrite(cdata, numberOfCellsInZone);
+    PHWrite(cdata, numberOfFacesInZone);
+
+    PHWrite(cdata, totalNumFaceNodes);
+
+    int count = 0;
+    for(int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        if(keyFaces[ iFace ] != 1) continue;
+
+        int faceNodeNumber = faceNodeNumberContainer[ iFace ];
+        PHWrite(cdata, faceNodeNumber);
+    }
+
+    PHWrite(cdata, numberOfNodesInZone);
+
+    RDouble * x = grid->GetX();
+    RDouble * y = grid->GetY();
+    RDouble * z = grid->GetZ();
+
+    for(int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        if(keyNodes[ iNode ] != 1) continue;
+        PHWrite(cdata, x[iNode]);
+    }
+
+    for(int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        if(keyNodes[ iNode ] != 1) continue;
+        PHWrite(cdata, y[iNode]);
+    }
+
+    for(int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        if(keyNodes[ iNode ] != 1) continue;
+        PHWrite(cdata, z[iNode]);
+    }
+
+    for (int iVar = 0; iVar < nvarplot; ++ iVar)
+    {
+        RDouble *qq = qn[iVar];
+        for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+        {
+            if (keyNodes[iNode] != 1) continue;
+            PHWrite(cdata, qq[iNode]);
+        }
+    }
+    
+    count = 0;
+
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        int faceNodeNumber = faceNodeNumberContainer[iFace];
+
+        if (keyFaces[iFace] != 1)
+        {
+            count += faceNodeNumber;
+            continue;
+        }
+
+        for (int iNode = 0; iNode < faceNodeNumberContainer[iFace]; ++ iNode)
+        {
+            int nodeIndex = nodeList[faceNodeIndexContainer[count ++]];
+            PHWrite(cdata, nodeIndex);
+        }
+    }
+
+    //! Left cell.
+    for(int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        if(keyFaces[ iFace ] != 1) continue;
+
+        int cellIndex = cellList[ leftCellIndexContainer[ iFace ] ];
+        PHWrite(cdata, cellIndex);
+    }
+
+    //! Right cell.
+    for(int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        int cellIndex;
+
+        if(keyFaces[ iFace ] == 0) continue;
+
+        int rightCell = rightCellIndexContainer[ iFace ];
+
+        if(rightCell >= numberOfCells || rightCell < 0)
+        {
+            cellIndex = -1;
+        }
+        else
+        {
+            cellIndex = cellList[ rightCell ];
+        }
+
+        PHWrite(cdata, cellIndex);
+    }
+}
+
+void FieldVisualization(Grid *grid_in, std::ostringstream &oss, vector<string> &title, RDouble **qn, int nl)
+{
+    if (GetDim() == PHSPACE::TWO_D)
+    {
+        FieldVisualizationForVTK(grid_in, oss, title, qn, nl);
+        return;
+    }
+
+    UnstructGrid * grid = UnstructGridCast(grid_in);
+
+    RDouble * x = grid->GetX();
+    RDouble * y = grid->GetY();
+    RDouble * z = grid->GetZ();
+
+    int nTotalNode = grid->GetNTotalNode();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+
+    int * node_number_of_each_face = grid->GetNodeNumberOfEachFace();
+    int * leftCellOfFace = grid->GetLeftCellOfFace();
+    int * rightCellOfFace = grid->GetRightCellOfFace();
+    int * face2node = grid->GetFace2Node();
+
+    for (std::size_t i = 0; i < title.size(); ++ i)
+    {
+        oss << title[i] << "\n";
+    }
+
+    int count = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        count += node_number_of_each_face[iFace];
+    }
+
+    int nword_of_line = 5;
+
+    //! Output for Tecplot.
+    oss << "ZONE\n";
+    if (grid->GetDim() == THREE_D)
+    {
+        oss << "ZoneType = FEPolyhedron\n";
+    }
+    else
+    {
+        oss << "ZoneType = FEPolygon\n";
+    }
+    oss << "Nodes    = " << nTotalNode << "\n";
+    oss << "Faces    = " << nTotalFace << "\n";
+    oss << "Elements = " << nTotalCell << "\n";
+    oss << "TotalNumFaceNodes = " << count << "\n";
+    oss << "NumConnectedBoundaryFaces = 0\n";
+    oss << "TotalNumBoundaryConnections = 0\n";
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        oss << x[iNode] << " ";
+        if ((iNode + 1) % nword_of_line == 0) oss << "\n";
+    }
+    if (nTotalNode % nword_of_line != 0) oss << "\n";
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        oss << y[iNode] << " ";
+        if ((iNode + 1) % nword_of_line == 0) oss << "\n";
+    }
+    if (nTotalNode % nword_of_line != 0) oss << "\n";
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        oss << z[iNode] << " ";
+        if ((iNode + 1) % nword_of_line == 0) oss << "\n";
+    }
+    if (nTotalNode % nword_of_line != 0) oss << "\n";
+
+    for (int m = 0; m < nl; ++ m)
+    {
+        RDouble *qq = qn[m];
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            oss << qq[iNode] << " ";
+            if ((iNode + 1) % nword_of_line == 0) oss << "\n";
+        }
+        if (nTotalNode % nword_of_line != 0) oss << "\n";
+    }
+
+    if (grid->GetDim() == THREE_D)
+    {
+        //! Geometry.
+        //! First the node_number_of_each_face(n poin pf face).
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            oss << node_number_of_each_face[iFace] << " ";
+            if ((iFace + 1) % nword_of_line == 0) oss << "\n";
+        }
+        if (nTotalFace % nword_of_line == 0) oss << "\n";
+    }
+
+    //! Second the points to face.
+    count = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            oss << face2node[count ++] + 1 << " ";
+        }
+        oss << "\n";
+    }
+
+    //! Third the f2c:left.
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        oss << leftCellOfFace[iFace] + 1 << " ";
+        if ((iFace + 1) % nword_of_line == 0) oss << "\n";
+    }
+    if (nTotalFace % nword_of_line == 0) oss << "\n";
+
+    //! Third the f2c:right.
+    int right;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        right = rightCellOfFace[iFace] + 1;
+        if (right > nTotalCell || right < 0) right = 0;
+        oss << right << " ";
+        if ((iFace + 1) % nword_of_line == 0) oss << "\n";
+    }
+    if (nTotalFace % nword_of_line == 0) oss << "\n";
+}
+
+void FixBCNodeVar(UnstructGrid *grid, RDouble *q, RDouble *q_n, int *n_count, int bctype_in, bool twoside)
+{
+    int nTotalNode = grid->GetNTotalNode();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *face2node = grid->GetFace2Node();
+    int *node_number_of_each_face = grid->GetNodeNumberOfEachFace();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    //! Bell 20140409 add.
+    //! Find out the corner points(corner_point = 2) of boundary conditions with both interface and solid wall attributes.For this kind of corner points,do not fix.
+    //! In order to ensure the values continuity at the interface between solid wall and interface.
+    int * corner_point = new int [ nTotalNode ];
+    if (bctype_in == PHENGLEI::INTERFACE)
+    {
+        for (int ipoint = 0; ipoint < nTotalNode; ++ ipoint)
+        {
+            corner_point[ ipoint ] = 0;
+        }
+
+        int nodepos = 0;
+        int bcType, pt;
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+            bcType = bcRegion->GetBCType();
+            if (bcType == PHENGLEI::INTERFACE)
+            {
+                for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+                {
+                    pt = face2node[ nodepos + j ];
+                    corner_point[ pt ] = 1;
+                }
+            }
+            nodepos += node_number_of_each_face[iFace];
+        }
+
+        nodepos = 0;
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+            bcType = bcRegion->GetBCType();
+            if (bcType == PHENGLEI::SOLID_SURFACE)
+            {
+                for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+                {
+                    pt = face2node[ nodepos + j ];
+                    if (corner_point[ pt ] == 1)
+                    {
+                        corner_point[ pt ] = 2;
+                    }
+                }
+            }
+            nodepos += node_number_of_each_face[iFace];
+        }
+    }
+
+    //! Reprocessing the points of interface.
+    int le,re,pt,bcType;
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace[ iFace ];
+        re = iFace + nTotalCell;
+
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        bcType = bcRegion->GetBCType();
+
+        if (bcType == bctype_in)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt = face2node[ nodepos + j ];
+
+                if ((bctype_in == PHENGLEI::INTERFACE) && (corner_point[ pt ] == 2)) continue;    //! Bell 20140409 add.
+
+                q_n[ pt ] = 0.0;
+                n_count[ pt ] = 0;
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace[ iFace ];
+        re = iFace + nTotalCell;
+
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        bcType = bcRegion->GetBCType();
+
+        if (bcType == bctype_in)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt = face2node[ nodepos + j ];
+
+                if ((bctype_in == PHENGLEI::INTERFACE) && (corner_point[ pt ] == 2)) continue;    //! Bell 20140409 add.
+
+                q_n[ pt ] += q[ le ];
+                ++ n_count[ pt ];
+                if (twoside)
+                {
+                    q_n[ pt ] += q[ re ];
+                    ++ n_count[ pt ];
+                }
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    //! A corrected method of points on solid wall.
+    //! In the case of poor grid quality at the trailing edge of the naca0012 airfoil ,the computation can converge with this method, 
+    //! otherwise, the computation divergent.
+    //! However, due to the lack of strict assessment,just note here.
+
+    delete [] corner_point;
+}
+
+//! Bell 20121220 add.
+void FixBCNodeVar(UnstructGrid *grid, RDouble *q, RDouble *q_n, RDouble *n_count, int bctype_in, bool twoside)
+{
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *face2node = grid->GetFace2Node();
+    int *node_number_of_each_face = grid->GetNodeNumberOfEachFace();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    //! Reprocessing the points of interface.
+    int le,re,pt,bcType;
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace[ iFace ];
+        re = iFace + nTotalCell;
+
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        bcType = bcRegion->GetBCType();
+
+        if (bcType == bctype_in)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt = face2node[ nodepos + j ];
+                q_n[ pt ] = 0.0;
+                n_count[ pt ] = 0.0;
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace[ iFace ];
+        re = iFace + nTotalCell;
+
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        bcType = bcRegion->GetBCType();
+
+        if (bcType == bctype_in)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt = face2node[ nodepos + j ];
+                q_n[ pt ] += q[ le ];
+                ++ n_count[ pt ];
+                if (twoside)
+                {
+                    q_n[ pt ] += q[ re ];
+                    ++ n_count[ pt ];
+                }
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+}
+
+void CompNodeVar(UnstructGrid *grid, RDouble *qNode, RDouble *q, bool isVelocityForPostVisual)
+{
+    int nTotalNode = grid->GetNTotalNode();
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+
+    RDouble *xCoor = grid->GetX();
+    RDouble *yCoor = grid->GetY();
+    RDouble *zCoor = grid->GetZ();
+
+    RDouble *xCellCenter = grid->GetCellCenterX();
+    RDouble *yCellCenter = grid->GetCellCenterY();
+    RDouble *zCellCenter = grid->GetCellCenterZ();
+
+    RDouble *nodeWeight = new RDouble[nTotalNode]();
+    PHSPACE::SetField(nodeWeight, 0.0, nTotalNode);
+    PHSPACE::SetField(qNode, 0.0, nTotalNode);
+
+    //! Cell center data insert in node
+    int ** cell2NodeArray       = grid->GetCell2NodeArray();
+    int *  nodeNumberOfEachCell = grid->GetNodeNumberOfEachCell();
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        int nNodes = nodeNumberOfEachCell[iCell];
+        for (int jNode = 0; jNode < nNodes; ++ jNode)
+        {
+            int nodeIndex = cell2NodeArray[iCell][jNode];
+
+            RDouble dx = xCoor[nodeIndex] - xCellCenter[iCell];
+            RDouble dy = yCoor[nodeIndex] - yCellCenter[iCell];
+            RDouble dz = zCoor[nodeIndex] - zCellCenter[iCell];
+            RDouble dist = DISTANCE(dx, dy, dz);
+            RDouble weightTemp = 1.0 / dist;
+
+            RDouble cellQtemp = q[iCell];
+            qNode[nodeIndex] += cellQtemp * weightTemp;
+            nodeWeight[nodeIndex] += weightTemp;
+        }
+    }
+
+    //! Boundary
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    int *nodeNumberOfEachFace = grid->GetNodeNumberOfEachFace();
+    int **face2nodeArray      = grid->GetFace2NodeArray();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        int bcType = bcRegion->GetBCType();
+
+        if (bcType == PHENGLEI::SYMMETRY)
+        {
+            continue;
+        }
+
+        if ((bcType == PHENGLEI::SOLID_SURFACE) && isVelocityForPostVisual)
+        {
+            continue;
+        }
+
+        int cellIndex = rightCellOfFace[iFace];
+        for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+        {
+            int nodeIndex = face2nodeArray[iFace][jNode];
+
+            RDouble dx = xCoor[nodeIndex] - xCellCenter[cellIndex];
+            RDouble dy = yCoor[nodeIndex] - yCellCenter[cellIndex];
+            RDouble dz = zCoor[nodeIndex] - zCellCenter[cellIndex];
+            RDouble dist = DISTANCE(dx, dy, dz);
+            RDouble weightTemp = 1.0 / dist;
+
+            RDouble cellQtemp = q[cellIndex];
+            qNode[nodeIndex] += cellQtemp * weightTemp;
+            nodeWeight[nodeIndex] += weightTemp;
+        }
+    }
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        if (nodeWeight[iNode] > SMALL)
+        {
+            qNode[iNode] /= nodeWeight[iNode];
+        }
+        else
+        {
+            qNode[iNode] = 0.0;
+        }
+    }
+
+    delete [] nodeWeight;    nodeWeight = NULL;
+}
+
+//! Compute node values from cell information (cxh, 2012.12.12).
+void CompNodeVar_new(UnstructGrid *grid, RDouble *q_n, RDouble *q)
+{
+    //! Get necessary geometry information.
+    int nTotalNode = grid->GetNTotalNode();
+    int *nCPN = grid->GetCellNumberOfEachNode();
+    int *n2c  = grid->GetNode2Cell();
+    int iNode, j, iCell, count;
+    int *knode;
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+    RDouble *xn  = grid->GetX();
+    RDouble *yn  = grid->GetY();
+    RDouble *zn  = grid->GetZ();
+
+    RDouble weight, weight1, weight2, *n_count;
+    RDouble *lamdax = grid->GetLamdax();
+    RDouble *lamday = grid->GetLamday();
+    RDouble *lamdaz = grid->GetLamdaz();
+
+    if (lamdax == NULL || lamday == NULL || lamdaz == NULL)
+    {
+        grid->CalcLaplacianWeitht();
+        lamdax = grid->GetLamdax();
+        lamday = grid->GetLamday();
+        lamdaz = grid->GetLamdaz();
+    }
+
+    knode = grid->Getknode();
+
+    n_count = new RDouble [ nTotalNode ];
+    for (iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        q_n[ iNode ]     = 0.0;
+        n_count[ iNode ] = 0.0;
+    }
+    count = 0;
+    for (iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        for (j = 0; j < nCPN[ iNode ]; ++j)
+        {
+            iCell = n2c[ count++ ];
+            weight1 = 1 + lamdax[ iNode ] * (xcc[ iCell ] - xn[ iNode ])
+                        + lamday[ iNode ] * (ycc[ iCell ] - yn[ iNode ])
+                        + lamdaz[ iNode ] * (zcc[ iCell ] - zn[ iNode ]);
+            weight2 = 1 / sqrt((xcc[ iCell ] - xn[ iNode ]) * (xcc[ iCell ] - xn[ iNode ])
+                              + (ycc[ iCell ] - yn[ iNode ]) * (ycc[ iCell ] - yn[ iNode ])
+                              + (zcc[ iCell ] - zn[ iNode ]) * (zcc[ iCell ] - zn[ iNode ]));
+            weight  = weight1 * (1 - knode[ iNode ]) + weight2 * knode[ iNode ];
+
+            q_n[ iNode ] += weight * q[ iCell ];
+            n_count[ iNode ] += weight;
+        }
+    }
+
+    for (iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        q_n[iNode] /= n_count[iNode] + TINY;
+    }
+
+    delete [] n_count;
+}
+
+void ComputeNodeVariable(UnstructGrid *grid, RDouble **q_n, RDouble **q, int nEquation)
+{
+    int nTotalNode = grid->GetNTotalNode();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    int *face2node = grid->GetFace2Node();
+    int *node_number_of_each_face  = grid->GetNodeNumberOfEachFace();
+
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    //! Get gradients.
+
+    RDouble *n_count = new RDouble [nTotalNode];
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)    
+    {
+        n_count[iNode] = 0.0;
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q_n[m][iNode] = 0.0;
+        }
+    }
+
+    RDouble dx, dy, dz, dd;
+    int le, re, pt;
+
+    //! Boundary faces.
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            pt = face2node[nodepos + j];
+            dx = x[pt] - xcc[le];
+            dy = y[pt] - ycc[le];
+            dz = z[pt] - zcc[le];
+            dd = 1.0 / (sqrt(dx * dx + dy * dy + dz * dz) + TINY);
+            n_count[pt] += dd;
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                q_n[m][pt] += q[m][le] * dd;
+            }
+
+            dx = x[pt] - xcc[re];
+            dy = y[pt] - ycc[re];
+            dz = z[pt] - zcc[re];
+            dd = 1.0 / (sqrt(dx * dx + dy * dy + dz * dz) + TINY);
+            n_count[pt] += dd;
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                q_n[m][pt] += q[m][re] * dd;
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    //! Interior faces.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            //! From left.
+            pt = face2node[nodepos + j];
+            dx = x[pt] - xcc[le];
+            dy = y[pt] - ycc[le];
+            dz = z[pt] - zcc[le];
+            dd = 1.0 / (sqrt(dx * dx + dy * dy + dz * dz) + TINY);
+            n_count[pt] += dd;
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                q_n[m][pt] += q[m][le] * dd;
+            }
+
+            //! From right.
+            dx = x[pt] - xcc[re];
+            dy = y[pt] - ycc[re];
+            dz = z[pt] - zcc[re];
+            dd = 1.0 / (sqrt(dx * dx + dy * dy + dz * dz) + TINY);
+            n_count[pt] += dd;
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                q_n[m][pt] += q[m][re] * dd;
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        FixBCNodeVar(grid, q[m], q_n[m], n_count, PHENGLEI::SYMMETRY     , true);
+        FixBCNodeVar(grid, q[m], q_n[m], n_count, PHENGLEI::SOLID_SURFACE, true);
+        FixBCNodeVar(grid, q[m], q_n[m], n_count, PHENGLEI::INTERFACE    , true);
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            q_n[m][iNode] /= (n_count[iNode] + SMALL);
+        }
+    }
+
+    delete [] n_count;
+}
+
+/************************************************************************/
+/*                Compute node value with distance weighted             */
+/*                           Bell 20121220 add                          */
+/************************************************************************/
+void CompNodeVarWeight(UnstructGrid *grid, RDouble *q_n, RDouble *q)
+{
+    int nTotalNode = grid->GetNTotalNode();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+    int nTotalCell = grid->GetNTotalCell();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    int *face2node = grid->GetFace2Node();
+    int *node_number_of_each_face  = grid->GetNodeNumberOfEachFace();
+
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    RDouble *n_count = new RDouble [nTotalNode];
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        n_count[iNode] = 0.0;
+        q_n[iNode]     = 0.0;
+    }
+
+    RDouble dx, dy, dz, dd;
+    int le, re, point;
+
+    //! Boundary faces.
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace[iFace];
+        re = iFace + nTotalCell;
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            point = face2node[nodepos + j];
+
+            dx = x[point] - xcc[le];
+            dy = y[point] - ycc[le];
+            dz = z[point] - zcc[le];
+            dd = 1.0 / (sqrt(dx * dx + dy * dy + dz * dz) + TINY);
+            q_n[point] += q[le] * dd;
+            n_count[point] += dd;
+
+            dx         = x[ point ] - xcc[ re ];
+            dy         = y[ point ] - ycc[ re ];
+            dz         = z[ point ] - zcc[ re ];
+            dd         = 1.0 / (sqrt(dx * dx + dy * dy + dz * dz) + TINY);
+            q_n[ point ]   += q[ re ] * dd;
+            n_count[point] += dd;
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    //! Interior faces.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le  = leftCellOfFace [ iFace ];
+        re  = rightCellOfFace[ iFace ];
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            point      = face2node[ nodepos + j ];
+
+            dx         = x[ point ] - xcc[ le ];
+            dy         = y[ point ] - ycc[ le ];
+            dz         = z[ point ] - zcc[ le ];
+            dd         = 1.0 / (sqrt(dx * dx + dy * dy + dz * dz) + TINY);
+            q_n[ point ]   += q[ le ] * dd;
+            n_count[point] += dd;
+
+            dx         = x[ point ] - xcc[ re ];
+            dy         = y[ point ] - ycc[ re ];
+            dz         = z[ point ] - zcc[ re ];
+            dd         = 1.0 / (sqrt(dx * dx + dy * dy + dz * dz) + TINY);
+            q_n[ point ]   += q[ re ] * dd;
+            n_count[point] += dd;
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    FixBCNodeVar(grid, q, q_n, n_count, PHENGLEI::SYMMETRY     , true);
+    FixBCNodeVar(grid, q, q_n, n_count, PHENGLEI::SOLID_SURFACE, true);
+    FixBCNodeVar(grid, q, q_n, n_count, PHENGLEI::INTERFACE    , true);
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        q_n[iNode] /= (n_count[iNode] + SMALL);
+    }
+
+    delete [] n_count;
+}
+
+void CompNodeVarForVisual(UnstructGrid *grid, RDouble *q_n, RDouble *q)
+{
+    int nTotalNode = grid->GetNTotalNode();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+    int * leftCellOfFace = grid->GetLeftCellOfFace();
+    int * rightCellOfFace = grid->GetRightCellOfFace();
+    int *face2node = grid->GetFace2Node();
+    int *node_number_of_each_face  = grid->GetNodeNumberOfEachFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotal = nBoundFace + nTotalCell;
+
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    //! Get gradients.
+    RDouble *dqdx = new RDouble[nTotal];
+    RDouble *dqdy = new RDouble[nTotal];
+    RDouble *dqdz = new RDouble[nTotal];
+
+    int order;
+    GlobalDataBase::GetData("order", &order, PHINT, 1);
+
+    int *n_count = new int [nTotalNode];
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        n_count[iNode] = 0;
+        q_n[iNode]     = 0.0;
+    }
+
+    RDouble dx, dy, dz;
+    int le, re, pt;
+
+    //! Boundary faces.
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace [ iFace ];
+        re = rightCellOfFace[ iFace ];
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            pt         = face2node[ nodepos + j ];
+            dx         = x[ pt ] - xcc[ le ];
+            dy         = y[ pt ] - ycc[ le ];
+            dz         = z[ pt ] - zcc[ le ];
+            q_n[ pt ] += q[ le ];
+            ++ n_count[ pt ];
+            q_n[ pt ] += q[ re ];
+            ++ n_count[ pt ];
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    //! Interior faces.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le  = leftCellOfFace [ iFace ];
+        re  = rightCellOfFace[ iFace ];
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            //! From left.
+            pt = face2node[ nodepos + j ];
+            q_n[ pt ] += q[ le ];
+            ++ n_count[ pt ];
+
+            //! From right.
+            q_n[ pt ] += q[ re ];
+            ++ n_count[ pt ];
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    FixBCNodeVar(grid, q, q_n, n_count, PHENGLEI::SYMMETRY     , true);
+    FixBCNodeVar(grid, q, q_n, n_count, PHENGLEI::SOLID_SURFACE, false);
+    FixBCNodeVar(grid, q, q_n, n_count, PHENGLEI::INTERFACE    , true);
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        q_n[iNode] /= (n_count[iNode] + SMALL);
+    }
+
+    delete [] n_count;
+    delete [] dqdx;
+    delete [] dqdy;
+    delete [] dqdz;
+}
+
+void CompNodeVarLimit(UnstructGrid *grid, RDouble *q_n, RDouble *q)
+{
+    int        nTotalNode = grid->GetNTotalNode();
+    int        nBoundFace = grid->GetNBoundFace();
+    int        nTotalFace = grid->GetNTotalFace();
+    int        * leftCellOfFace = grid->GetLeftCellOfFace();
+    int        * rightCellOfFace = grid->GetRightCellOfFace();
+    int        *face2node = grid->GetFace2Node();
+    int        *node_number_of_each_face  = grid->GetNodeNumberOfEachFace();
+    int        nTotalCell = grid->GetNTotalCell();
+    int        nTotal = nBoundFace + nTotalCell;
+
+    RDouble * x = grid->GetX();
+    RDouble * y = grid->GetY();
+    RDouble * z = grid->GetZ();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    //! Get gradients.
+    RDouble * dqdx = new RDouble[nTotal];
+    RDouble * dqdy = new RDouble[nTotal];
+    RDouble * dqdz = new RDouble[nTotal];
+
+    int order;
+    GlobalDataBase::GetData("order", &order, PHINT, 1);
+
+    int *n_count = new int [nTotalNode];
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        n_count[iNode] = 0;
+        q_n[iNode]     = 0.0;
+    }
+
+    RDouble dx, dy, dz;
+    int le, re, pt;
+
+    //! Boundary faces.
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace [ iFace ];
+        re = rightCellOfFace[ iFace ];
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            pt         = face2node[ nodepos + j ];
+            dx         = x[ pt ] - xcc[ le ];
+            dy         = y[ pt ] - ycc[ le ];
+            dz         = z[ pt ] - zcc[ le ];
+            q_n[ pt ] += q[ le ];
+            ++ n_count[ pt ];
+            q_n[ pt ] += q[ re ];
+            ++ n_count[ pt ];
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    //! Interior faces.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le  = leftCellOfFace [ iFace ];
+        re  = rightCellOfFace[ iFace ];
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            //! From left.
+            pt = face2node[ nodepos + j ];
+            q_n[ pt ] += q[ le ];
+            ++ n_count[ pt ];
+
+            //! From right.
+            q_n[ pt ] += q[ re ];
+            ++ n_count[ pt ];
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    //! Reprocessing the points of interface.
+    nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace [ iFace ];
+        re = rightCellOfFace[ iFace ];
+
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        int bcType = bcRegion->GetBCType();
+       
+        if (IsInterface(bcType))
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt         = face2node[ nodepos + j ];
+                q_n[ pt ] = 0.0;
+                n_count[ pt ] = 0;
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace [ iFace ];
+        re = rightCellOfFace[ iFace ];
+
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        int bcType = bcRegion->GetBCType();
+
+        if (IsInterface(bcType))
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt         = face2node[ nodepos + j ];
+                dx         = x[ pt ] - xcc[ le ];
+                dy         = y[ pt ] - ycc[ le ];
+                dz         = z[ pt ] - zcc[ le ];
+                q_n[ pt ] += q[ le ];
+                ++ n_count[ pt ];
+                q_n[ pt ] += q[ re ];
+                ++ n_count[ pt ];
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        q_n[iNode] /= (n_count[iNode] + SMALL);
+    }
+
+    delete [] n_count;
+    delete [] dqdx;
+    delete [] dqdy;
+    delete [] dqdz;
+}
+
+void CompNodeVarForVelocity(UnstructGrid *grid, RDouble *qNode, RDouble *q)
+{
+    int        nTotalNode = grid->GetNTotalNode();
+    int        nBoundFace = grid->GetNBoundFace();
+    int        nTotalFace = grid->GetNTotalFace();
+    int        * leftCellOfFace = grid->GetLeftCellOfFace();
+    int        * rightCellOfFace = grid->GetRightCellOfFace();
+    int        *face2node = grid->GetFace2Node();
+    int        *node_number_of_each_face  = grid->GetNodeNumberOfEachFace();
+
+    RDouble * x = grid->GetX();
+    RDouble * y = grid->GetY();
+    RDouble * z = grid->GetZ();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    RDouble *weight = new RDouble [nTotalNode];
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        weight[iNode] = 0;
+        qNode[iNode]  = 0.0;
+    }
+
+    int le, re, pt;
+
+    //! Boundary faces.
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace [ iFace ];
+        re = rightCellOfFace[ iFace ];
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            int point = face2node[ nodepos + j ];
+            RDouble dx = x[point] - xcc[le];
+            RDouble dy = y[point] - ycc[le];
+            RDouble dz = z[point] - zcc[le];
+            RDouble dist = DISTANCE(dx, dy, dz);
+            RDouble weightTemp = 1.0 / dist;
+            qNode[ point ] += weightTemp * q[le];
+            weight[point] += weightTemp;
+            
+            dx = x[point] - xcc[re];
+            dy = y[point] - ycc[re];
+            dz = z[point] - zcc[re];
+            dist = DISTANCE(dx, dy, dz);
+            weightTemp = 1.0 / dist;
+            qNode[point] += weightTemp * q[re];
+            weight[point] += weightTemp;
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+
+    //! Interior faces.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le  = leftCellOfFace [ iFace ];
+        re  = rightCellOfFace[ iFace ];
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            int point = face2node[ nodepos + j ];
+
+            //! From left.
+            RDouble dx = x[point] - xcc[le];
+            RDouble dy = y[point] - ycc[le];
+            RDouble dz = z[point] - zcc[le];
+            RDouble dist = DISTANCE(dx, dy, dz);
+            RDouble weightTemp = 1.0 / dist;
+            qNode[point] += weightTemp * q[le];
+            weight[point] += weightTemp;
+
+            //! From right.
+            dx = x[point] - xcc[re];
+            dy = y[point] - ycc[re];
+            dz = z[point] - zcc[re];
+            dist = DISTANCE(dx, dy, dz);
+            weightTemp = 1.0 / dist;
+            qNode[point] += weightTemp * q[re];
+            weight[point] += weightTemp;
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        if (weight[iNode] > SMALL)
+        {
+            qNode[iNode] /= weight[iNode];
+        }        
+    }
+
+    //! Reset wall and symmetry faces.
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+    nodepos = 0;
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        int bcType = bcRegion->GetBCType();
+
+        if(bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::SYMMETRY)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt = face2node[ nodepos + j ];
+
+                qNode[ pt ] = 0.0;
+            }
+        }
+
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace [ iFace ];
+
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        int bcType = bcRegion->GetBCType();
+
+        if(bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::SYMMETRY)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt = face2node[ nodepos + j ];
+
+                qNode[ pt ] = q[ le ];
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    delete [] weight;
+}
+
+//! Bell 20131123 add.
+void UnstructGrid::CompareMaxMinValue(RDouble &local_data, int flag)
+{
+    using namespace PHMPI;
+    int numberOfProcessor =  GetNumberOfProcessor();
+    int nZones = GetNumberofGlobalZones();
+    if (nZones > numberOfProcessor)
+    {
+        return;
+    }
+    else
+    {
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            int gridtype = GetZoneGridType(iZone);
+            if (gridtype != PHSPACE::UNSTRUCTGRID)
+            {
+                return;
+            }
+        }
+    }
+
+    PH_CompareMaxMin(local_data, flag);
+}
+
+void UnstructGrid::ChangeBCType(int from_bctype, int to_bctype)
+{
+    UnstructBCSet **bcr = this->GetBCRecord();
+    UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+    int periodicType = PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType");
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        if (bcType == from_bctype)
+        {
+            bcRegion->SetBCType(to_bctype);
+            if (periodicType == NO_PERIODICITY)
+            {
+               bcRegion->SetBCName("INTERFACE");
+            }
+
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter ++)
+            {
+                int faceIndexTmp = *iter;
+                bcr[faceIndexTmp]->SetKey(to_bctype);
+                if (periodicType == NO_PERIODICITY)
+                {
+                   bcr[faceIndexTmp]->SetBCName("INTERFACE");
+                }
+            }
+        }
+    }
+}
+
+int UnstructGrid::CompNIFace()
+{
+    UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    int nIFace = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        if (IsInterface(bcType))
+        {
+            vector<int>* faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                // iFace is the face number in the set of faceIndex.
+                ++ nIFace;
+            }
+        }
+    }
+
+    return nIFace;
+}
+
+void UnstructGrid::BuildGridLink(LinkStruct * link)
+{
+    cout << "Interface Construction ..." << endl;
+
+    using namespace PHSPACE;
+    int zoneIndex = this->GetZoneID();
+
+    int nBoundFace = this->GetNBoundFace();
+
+    UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    int * face2node = this->GetFace2Node();
+    int * node_number_of_each_face = this->GetNodeNumberOfEachFace();
+
+    int nIFace = this->CompNIFace();
+    cout << "Number of Inter Faces: " << nIFace << "\n";
+
+    InterfaceInfo * interfaceInfo = 0;
+    if (nIFace == 0)
+    {
+        this->SetInterfaceInfo(interfaceInfo);
+        return;
+    }
+
+    interfaceInfo = new InterfaceInfo(nIFace);
+    this->SetInterfaceInfo(interfaceInfo);
+
+    VVInt &facemap = link->GetFaceMap();
+    facemap[zoneIndex].resize(nIFace);
+
+    RDouble * x = this->GetX();
+    RDouble * y = this->GetY();
+    RDouble * z = this->GetZ();
+
+    //! Find out the maximum value of node_number_of_each_face on the boundary face.
+    int maxlist = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        maxlist = MAX(maxlist, node_number_of_each_face[iFace]);
+    }
+
+    RDouble *xlist = new RDouble[maxlist];
+    RDouble *ylist = new RDouble[maxlist];
+    RDouble *zlist = new RDouble[maxlist];
+
+    vector<int> index(maxlist),pindex(maxlist);
+
+    LinkStruct::AdtTree &coor_tree = link->GetCoordinateTree();
+    set < DataStruct_Sort< VInt > > &facelist = link->GetFaceList();
+    VVInt &zoneid = link->GetZoneID();
+    VVInt &faceid = link->GetFaceID();
+    RDouble tol   = link->GetTolerance();
+
+    int iFace = 0;
+    uint_t fcount = zoneid.size();
+    int pcount = coor_tree.GetNodeNum();
+    int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+
+    int periodicType = PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType");
+    RDouble translationLength[3] = { 0.0 };
+    GlobalDataBase::GetData("translationLength", &translationLength, PHDOUBLE, 3);
+    RDouble rotationAngle = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+    rotationAngle = rotationAngle * PI / 180.0;
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+
+    int nodepos = 0;
+    for (int iBFace = 0; iBFace < nBoundFace; ++ iBFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iBFace]);
+        int bcType = bcRegion->GetBCType();
+
+        if (!IsInterface(bcType))
+        {
+            nodepos += node_number_of_each_face[iBFace];
+            continue;
+        }
+        for (int m = 0; m < node_number_of_each_face[iBFace]; ++ m)
+        {
+            index[m] = face2node[ nodepos + m ];
+        }
+        nodepos += node_number_of_each_face[iBFace];
+
+        int nlist = node_number_of_each_face[iBFace];
+        pindex.resize(nlist);
+
+        GetFaceCoorList(index, nlist, xlist, ylist, zlist, x, y, z);
+        string bcName = bcRegion->GetBCName();
+
+        if (referenceFrame == ROTATIONAL_FRAME)
+        {
+            int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+            RDouble PeriodicRotationAngle[100];
+            GlobalDataBase::GetData("PeriodicRotationAngle", &PeriodicRotationAngle, PHDOUBLE, nTurboZone);
+            string Periodic_Name[100];
+            GlobalDataBase::GetData("Periodic_Name", &Periodic_Name, PHSTRING, 2 * nTurboZone);
+
+            for (int iTurboZone = 0; iTurboZone < nTurboZone; iTurboZone++)
+            {
+                if (bcName == Periodic_Name[2 * iTurboZone])
+                {
+                    PeriodicRotationAngle[iTurboZone] = PeriodicRotationAngle[iTurboZone] * PI / 180;
+                    rotationAngle = PeriodicRotationAngle[iTurboZone];
+
+                    for (int m = 0; m < node_number_of_each_face[iBFace]; ++m)
+                    {
+                        RDouble rotPoint[3] = { 0.0, 0.0, 0.0 };
+                        rotPoint[0] = xlist[m];
+                        rotPoint[1] = ylist[m] * cos(rotationAngle) - zlist[m] * sin(rotationAngle);
+                        rotPoint[2] = ylist[m] * sin(rotationAngle) + zlist[m] * cos(rotationAngle);
+                        xlist[m] = rotPoint[0];
+                        ylist[m] = rotPoint[1];
+                        zlist[m] = rotPoint[2];
+                    }
+                }
+            }
+        }
+        else
+        {
+            if (bcName == "Periodic_up")
+            {
+                if (periodicType == TRANSLATIONAL_PERIODICITY)
+                {
+                    for (int m = 0; m < node_number_of_each_face[iBFace]; ++m)
+                    {
+                        xlist[m] += translationLength[0];
+                        ylist[m] += translationLength[1];
+                        zlist[m] += translationLength[2];
+                    }
+                }
+                else if (periodicType == ROTATIONAL_PERIODICITY)
+                {
+                    for (int m = 0; m < node_number_of_each_face[iBFace]; ++m)
+                    {
+                        RDouble rotPoint[3] = { 0.0, 0.0, 0.0 };
+                        rotPoint[0] = xlist[m];
+                        rotPoint[1] = ylist[m] * cos(rotationAngle) - zlist[m] * sin(rotationAngle);
+                        rotPoint[2] = ylist[m] * sin(rotationAngle) + zlist[m] * cos(rotationAngle);
+                        xlist[m] = rotPoint[0];
+                        ylist[m] = rotPoint[1];
+                        zlist[m] = rotPoint[2];
+                    }
+                }
+            }
+        }
+        GetCoorIndexList(&coor_tree, tol, pcount, xlist, ylist, zlist, nlist, pindex);
+        Create_Link_Info(pindex, zoneIndex, iFace, fcount, facelist, zoneid, faceid, link);
+
+        interFace2BoundaryFace[iFace] = iBFace;
+        ++ iFace;
+    }
+    cout << "iFace = " << iFace << "\n";
+    delete [] xlist;    xlist = NULL;
+    delete [] ylist;    ylist = NULL;
+    delete [] zlist;    zlist = NULL;
+}
+
+//! Compute fcptr (There are two cells for each cell face. Which cell 
+//! number is a cell in its neighboring cell).
+void UnstructGrid::CalCNNCF()
+{
+    int nTotalFace = this->GetNTotalFace();
+    //! If fcptr has already existed.
+    int *fc2cL = this->Getfc2cL();
+    int *fc2cR = this->Getfc2cR();
+    if (fc2cL) return;
+    
+    int nBoundFace = this->GetNBoundFace();
+    int nTotalCell = this->GetNTotalCell();
+    int *leftCellOfFace  = this->GetLeftCellOfFace();
+    int *rightCellOfFace = this->GetRightCellOfFace();
+
+    UnstructBCSet *unstructBCSet = this->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    int *number_of_neighbor_cell = this->GetNumberOfNeighborCell();
+    
+    //! Allocate memories for number of cells per cell.
+    fc2cL = new int[nTotalFace];
+    fc2cR = new int[nTotalFace];
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        fc2cL[iFace] = - 1;
+        fc2cR[iFace] = - 1;
+    }
+    
+    int le, re;
+    
+    //! Need to reset number_of_neighbor_cell to zero and recover it later.
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        number_of_neighbor_cell[iCell] = 0;
+    }
+
+    //! If boundary is an INTERFACE, need to count ghost cell.
+    //! Note: Symmetry???
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        if (IsInterface(bcType))
+        {
+            vector<int>* faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                // iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+                le = leftCellOfFace[iFace];
+                number_of_neighbor_cell[le] ++;
+                fc2cL[iFace] = number_of_neighbor_cell[le];
+            }
+        }
+    }
+
+    //! Interior faces.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [ iFace ];
+        re = rightCellOfFace[ iFace ];
+
+        number_of_neighbor_cell[le] ++;
+        number_of_neighbor_cell[re] ++;
+
+        fc2cL[iFace] = number_of_neighbor_cell[le];
+        fc2cR[iFace] = number_of_neighbor_cell[re];
+    }
+
+    this->Setfc2cL(fc2cL);
+    this->Setfc2cR(fc2cR);
+}
+
+int UnstructGrid::GetNumberOfWallCell()
+{
+    UnstructBCSet **bcr = this->GetBCRecord();
+
+    int nBoundFace = this->GetNBoundFace();
+
+    int nsolid_surface = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int bctype = bcr[iFace]->GetKey();
+        if (IsWall(bctype))
+        {
+            ++ nsolid_surface;
+        }
+    }
+
+    return nsolid_surface;
+}
+
+void UnstructGrid::ProcessBCInfo()
+{
+
+}
+
+void UnstructGrid::GridSurfaceVelocity(RDouble *xt, RDouble *yt, RDouble *zt)
+{
+
+}
+
+void UnstructGrid::ReSetBoundaryConditionByGlobalBC()
+{
+    vector<SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+
+    map<string, SimpleBC *> globalBCMap;
+    
+    vector<SimpleBC *>::iterator iter;
+    for (iter = globalBCList->begin(); iter != globalBCList->end(); ++ iter)
+    {
+        SimpleBC *bc = *iter;
+        pair<string, SimpleBC *> bcPair(bc->GetBCName(), bc);
+        globalBCMap.insert(bcPair);
+    }
+
+    int nBoundFace = this->GetNBoundFace();
+
+    UnstructBCSet **bcr = this->GetBCRecord();
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        const string &bcName = bcr[iFace]->GetBCName();
+        SimpleBC *bc = 0;
+        map<string, SimpleBC *>::iterator iter1 = globalBCMap.find(bcName);
+
+        if (iter1 != globalBCMap.end())
+        {
+            bc = iter1->second;
+        }
+
+        bcr[iFace]->SetBoundaryCondition(bc);
+    }
+}
+
+void GetFace2NodeList(UnstructGrid *grid, int bcType, vector<int> &linkmap, vector < vector < int > > &face2nodelist)
+{
+    int nTotalNode = grid->GetNTotalNode();
+    int nBoundFace = grid->GetNBoundFace();
+
+    int *node_number_of_each_face = grid->GetNodeNumberOfEachFace();
+    int *face2node = grid->GetFace2Node();
+
+    //! Build point set of binary tree for searching.
+    vector < int > loc_face2node(4);
+    set< DataStruct_Sort<int> > iset;
+    set< DataStruct_Sort<int> >::iterator ifind;
+    DataStruct_Sort<int> fysort;
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    face2nodelist.resize(0);
+    linkmap.resize(0);
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+
+        if (bcType != bcRegion->GetBCType())
+        {
+            nodepos += node_number_of_each_face[iFace];
+            continue;
+        }
+
+        if (node_number_of_each_face[iFace] <= 4)
+        {
+            loc_face2node.resize(0);
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                int index = face2node[nodepos + j];
+
+                fysort.value = index;
+                ifind = iset.find(fysort);
+
+                if (ifind == iset.end())
+                {
+                    linkmap.push_back(index);
+                    fysort.index = static_cast<int>(linkmap.size() - 1);
+
+                    iset.insert(fysort);
+                    loc_face2node.push_back(fysort.index);
+                }
+                else
+                {
+                    loc_face2node.push_back(ifind->index);
+                }
+
+            }
+            nodepos += node_number_of_each_face[iFace];
+            face2nodelist.push_back(loc_face2node);
+        }
+        else
+        {
+            int nodesWrite = 0;
+            while (nodesWrite < node_number_of_each_face[iFace])
+            {
+                loc_face2node.resize(0);
+
+                //! Write face center.
+                int index = iFace + nTotalNode;
+
+                fysort.value = index;
+                ifind = iset.find(fysort);
+
+                if (ifind == iset.end())
+                {
+                    linkmap.push_back(index);
+                    fysort.index = static_cast<int>(linkmap.size() - 1);
+
+                    iset.insert(fysort);
+                    loc_face2node.push_back(fysort.index);
+                }
+                else
+                {
+                    loc_face2node.push_back(ifind->index);
+                }
+
+                //! Write node.
+                for (int iNode = 0; iNode < 2; ++ iNode)
+                {
+                    int index1 = (iNode + nodesWrite) % node_number_of_each_face[iFace];
+                    int nodeIndex = face2node[nodepos + index1];
+
+                    fysort.value = nodeIndex;
+                    ifind = iset.find(fysort);
+
+                    if (ifind == iset.end())
+                    {
+                        linkmap.push_back(nodeIndex);
+                        fysort.index = static_cast<int>(linkmap.size() - 1);
+
+                        iset.insert(fysort);
+                        loc_face2node.push_back(fysort.index);
+                    }
+                    else
+                    {
+                        loc_face2node.push_back(ifind->index);
+                    }
+                }
+
+                ++ nodesWrite;
+                face2nodelist.push_back(loc_face2node);
+            }
+            nodepos += node_number_of_each_face[iFace];
+        }
+    }
+}
+
+void GetFace2NodeList(UnstructGrid *grid, pair<int, string> iter, vector<int> &linkmap, vector < vector < int > > &face2nodelist)
+{
+    int bcType = (iter).first;
+    string bcName = (iter).second;
+
+    int nTotalNode = grid->GetNTotalNode();
+    int nBoundFace = grid->GetNBoundFace();
+
+    int * node_number_of_each_face = grid->GetNodeNumberOfEachFace();
+    int * face2node = grid->GetFace2Node();
+
+    //! Build point set of binary tree for searching.
+    vector < int > loc_face2node(4);
+    set< DataStruct_Sort<int> > iset;
+    set< DataStruct_Sort<int> >::iterator ifind;
+    DataStruct_Sort<int> fysort;
+
+    UnstructBCSet **bcr = grid->GetBCRecord();
+
+    face2nodelist.resize(0);
+    linkmap.resize(0);
+
+    int * leftCellIndexContainer = grid->GetLeftCellOfFace();
+    int * keyActiveOfCells       = grid->GetBlankIndex();
+    int nodepos = 0;
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        if (bcType != bcr[iFace]->GetKey())
+        {
+            nodepos += node_number_of_each_face[iFace];
+            continue;
+        }
+
+        if (bcr[iFace]->GetBCName() != bcName)
+        {
+            nodepos += node_number_of_each_face[iFace];
+            continue;
+        }
+
+        if (keyActiveOfCells[leftCellIndexContainer[iFace]] != 1)
+        {
+            nodepos += node_number_of_each_face[iFace];
+            continue;
+        }
+
+        if (node_number_of_each_face[iFace] <= 4)
+        {
+            loc_face2node.resize(0);
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                int index = face2node[ nodepos + j ];
+
+                fysort.value = index;
+                ifind = iset.find(fysort);
+
+                if (ifind == iset.end())
+                {
+                    linkmap.push_back(index);
+                    fysort.index = static_cast<int>(linkmap.size() - 1);
+
+                    iset.insert(fysort);
+                    loc_face2node.push_back(fysort.index);
+                }
+                else
+                {
+                    loc_face2node.push_back(ifind->index);
+                }
+
+            }
+            nodepos += node_number_of_each_face[iFace];
+            face2nodelist.push_back(loc_face2node);
+        }
+        else
+        {
+            int nodesWrite = 0;
+            while (nodesWrite < node_number_of_each_face[iFace])
+            {
+                loc_face2node.resize(0);
+
+                //! Write face center.
+                int index = iFace + nTotalNode;
+
+                fysort.value = index;
+                ifind = iset.find(fysort);
+
+                if (ifind == iset.end())
+                {
+                    linkmap.push_back(index);
+                    fysort.index = static_cast<int>(linkmap.size() - 1);
+
+                    iset.insert(fysort);
+                    loc_face2node.push_back(fysort.index);
+                }
+                else
+                {
+                    loc_face2node.push_back(ifind->index);
+                }
+
+                //! Write node.
+                for (int iNode = 0; iNode < 2; ++ iNode)
+                {
+                    int index1 = (iNode + nodesWrite) % node_number_of_each_face[iFace];
+                    int nodeIndex = face2node[nodepos + index1];
+
+                    fysort.value = nodeIndex;
+                    ifind = iset.find(fysort);
+
+                    if (ifind == iset.end())
+                    {
+                        linkmap.push_back(nodeIndex);
+                        fysort.index = static_cast<int>(linkmap.size() - 1);
+
+                        iset.insert(fysort);
+                        loc_face2node.push_back(fysort.index);
+                    }
+                    else
+                    {
+                        loc_face2node.push_back(ifind->index);
+                    }
+                }
+
+                ++ nodesWrite;
+                face2nodelist.push_back(loc_face2node);
+            }
+            nodepos += node_number_of_each_face[iFace];
+        }
+    }
+}
+
+void MinMaxDiffINF(Grid *grid_in, int ig, RDouble *dmin, RDouble *dmax, RDouble *q)
+{
+    UnstructGrid *grid = UnstructGridCast(grid_in);
+    InterfaceInfo * interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    int **cell2face  = grid->GetCell2Face();
+    int * face_number_of_each_cell = grid->GetFaceNumberOfEachCell();
+    int * leftCellOfFace = grid->GetLeftCellOfFace();
+    int * rightCellOfFace = grid->GetRightCellOfFace();
+
+    int nIFace = interfaceInfo->GetNIFace();
+    //! Find the maximum and minimum in the neighbor of each cell.
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        int ie,face,le,re;
+        grid->GetSourceIndex(iFace,ig+1,ie);
+        dmin[iFace] = q[ie];
+        dmax[iFace] = q[ie];
+        for (int jFace = 0; jFace < face_number_of_each_cell[ie]; ++ jFace)
+        {
+            face = cell2face[ie][jFace];
+            le   = leftCellOfFace[face];
+            re   = rightCellOfFace[face];
+            dmin[iFace] = MIN(dmin[iFace], q[le]);
+            dmin[iFace] = MIN(dmin[iFace], q[re]);
+
+            dmax[iFace] = MAX(dmax[iFace], q[le]);
+            dmax[iFace] = MAX(dmax[iFace], q[re]);
+        }
+        dmin[iFace] -= q[ie];
+        dmax[iFace] -= q[ie];
+    }
+}
+
+void SetLimitBoundary(Grid *grid_in, RDouble *limit)
+{
+    UnstructGrid *grid = UnstructGridCast(grid_in);
+
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        if (bcType != PHENGLEI::INTERFACE && 
+            bcType != PHENGLEI::SYMMETRY  &&
+            !IsWall(bcType) &&
+            bcType != PHENGLEI::OUTFLOW)
+        {
+            vector<int>* faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                // iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+                int le = leftCellOfFace [iFace];
+                int re = rightCellOfFace[iFace];
+
+                limit[le] = zero;
+                limit[re] = zero;
+            }
+        }
+    }
+}
+
+void CommunicateInterfaceValue(UnstructGrid * grid, RDouble ** variable, const string & variableName, int variableDimension)
+{
+    //! Upload the interface data to the buffer.
+    PHSPACE::UploadInterfaceValue(grid, variable, variableName, variableDimension);
+
+    //! Download the interface data from the buffer.
+    PHSPACE::DownloadInterfaceValue(grid, variable, variableName, variableDimension);
+}
+
+void CommunicateInterfaceValue(UnstructGrid *grid, RDouble *variable, const string &variableName)
+{
+    //! Upload the interface data to the buffer.
+    PHSPACE::UploadInterfaceValue(grid, variable, variableName);
+
+    //PHSPACE::UpdateInterfaceData();
+
+    //! Download the interface data from the buffer.
+    PHSPACE::DownloadInterfaceValue(grid, variable, variableName);
+}
+
+void UploadInterfaceValue(UnstructGrid *grid, RDouble **f, const string &name, int neqn)
+{
+    InterfaceInfo * interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    int nIFace = interfaceInfo->GetNIFace();
+    for (int iGhost = GetNumberOfGhostCellLayers() - 1; iGhost >= 0; -- iGhost)
+    {
+        Data_ParamFieldSuite *sendData = interfaceInfo->GetSendDataStorage(iGhost);
+
+        RDouble **fg = reinterpret_cast< RDouble ** > (sendData->GetDataPtr(name));
+        if(!fg)
+        {
+            ostringstream oss;
+            oss << "    Error: Parallel interface variable has not been register, name: " << name;
+            TK_Exit::ExceptionExit(oss.str());
+        }
+        for (int iFace = 0; iFace < nIFace; ++ iFace)
+        {
+            int sourceCell;
+            grid->GetSourceIndex(iFace, iGhost + 1, sourceCell);
+            for (int m = 0; m < neqn; ++ m)
+            {
+                fg[m][iFace] = f[m][sourceCell];
+            }
+        }
+    }
+}
+
+void UploadInterfaceValue(UnstructGrid *grid, RDouble *f, const string &name)
+{
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo)
+    {
+        return;
+    }
+
+    int nIFace = interfaceInfo->GetNIFace();
+    for (int iGhost = GetNumberOfGhostCellLayers() - 1; iGhost >= 0; -- iGhost)
+    {
+        Data_ParamFieldSuite *sendData = interfaceInfo->GetSendDataStorage(iGhost);
+
+        RDouble **fg = reinterpret_cast <RDouble **> (sendData->GetDataPtr(name));
+        if(!fg)
+        {
+            ostringstream oss;
+            oss << "    Error: Parallel interface variable has not been register, name: " << name;
+            TK_Exit::ExceptionExit(oss.str());
+        }
+        for (int iFace = 0; iFace < nIFace; ++ iFace)
+        {
+            int sourceCell;
+            grid->GetSourceIndex(iFace, iGhost + 1, sourceCell);
+            fg[0][iFace] = f[sourceCell];
+        }
+    }
+}
+
+void DownloadInterfaceValue(UnstructGrid *grid, RDouble **f, const string &name, int neqn)
+{
+    InterfaceInfo * interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    int nIFace = interfaceInfo->GetNIFace();
+
+    int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int periodicType = PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType");
+    double rotationAngle = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+    rotationAngle = rotationAngle / 180.0 * PI;
+    int nBoundFace = grid->GetNBoundFace();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+
+    if (referenceFrame == ROTATIONAL_FRAME)
+    {
+        int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+        RDouble PeriodicRotationAngle[100];
+        GlobalDataBase::GetData("PeriodicRotationAngle", &PeriodicRotationAngle, PHDOUBLE, nTurboZone);
+
+        //! Parallel
+        int iTurboZone = grid->GetOrdinaryGridIndex();
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = grid->GetZoneID();
+        }
+
+        PeriodicRotationAngle[iTurboZone] = PeriodicRotationAngle[iTurboZone] * PI / 180;
+        rotationAngle = PeriodicRotationAngle[iTurboZone];
+    }
+
+    for (int iGhost = GetNumberOfGhostCellLayers() - 1; iGhost >= 0; -- iGhost)
+    {
+        Data_ParamFieldSuite *recieveData = interfaceInfo->GetRecvDataStorage(iGhost);
+
+        RDouble **fg = reinterpret_cast< RDouble ** > (recieveData->GetDataPtr(name));
+
+        for (int iFace = 0; iFace < nIFace; ++ iFace)
+        {
+            int targetCell;
+            grid->GetTargetIndex(iFace, iGhost + 1, targetCell);
+
+            int iBFace = interFace2BoundaryFace[iFace];
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iBFace]);
+            string bcName = bcRegion->GetBCName();
+
+            if (neqn >= 4 && periodicType == ROTATIONAL_PERIODICITY)
+            {
+                RDouble rotfg[3] = { 0.0, 0.0, 0.0 };
+
+                if (referenceFrame == ROTATIONAL_FRAME)
+                {
+                    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+                    string Periodic_Name[100];
+                    GlobalDataBase::GetData("Periodic_Name", &Periodic_Name, PHSTRING, 2 * nTurboZone);
+
+                    //! Parallel
+                    int iTurboZone = grid->GetOrdinaryGridIndex();
+                    //! Serial
+                    if (iTurboZone == -1)
+                    {
+                        iTurboZone = grid->GetZoneID();
+                    }
+
+                    if (bcName == Periodic_Name[2 * iTurboZone])
+                    {
+                        rotfg[0] = fg[1][iFace];
+                        rotfg[1] = fg[2][iFace] * cos(2.0 * PI - rotationAngle) - fg[3][iFace] * sin(2.0 * PI - rotationAngle);
+                        rotfg[2] = fg[2][iFace] * sin(2.0 * PI - rotationAngle) + fg[3][iFace] * cos(2.0 * PI - rotationAngle);
+
+                        fg[1][iFace] = rotfg[0];
+                        fg[2][iFace] = rotfg[1];
+                        fg[3][iFace] = rotfg[2];
+                    }
+                    if (bcName == Periodic_Name[2 * iTurboZone + 1])
+                    {
+                        rotfg[0] = fg[1][iFace];
+                        rotfg[1] = fg[2][iFace] * cos(rotationAngle) - fg[3][iFace] * sin(rotationAngle);
+                        rotfg[2] = fg[2][iFace] * sin(rotationAngle) + fg[3][iFace] * cos(rotationAngle);
+
+                        fg[1][iFace] = rotfg[0];
+                        fg[2][iFace] = rotfg[1];
+                        fg[3][iFace] = rotfg[2];
+                    }
+                }
+                else
+                {
+                    if (bcName == "Periodic_up" || bcName == "Periodic_down")
+                    {
+                        if (bcName == "Periodic_up")
+                        {
+                            rotfg[0] = fg[1][iFace];
+                            rotfg[1] = fg[2][iFace] * cos(2.0 * PI - rotationAngle) - fg[3][iFace] * sin(2.0 * PI - rotationAngle);
+                            rotfg[2] = fg[2][iFace] * sin(2.0 * PI - rotationAngle) + fg[3][iFace] * cos(2.0 * PI - rotationAngle);
+                        }
+                        if (bcName == "Periodic_down")
+                        {
+                            rotfg[0] = fg[1][iFace];
+                            rotfg[1] = fg[2][iFace] * cos(rotationAngle) - fg[3][iFace] * sin(rotationAngle);
+                            rotfg[2] = fg[2][iFace] * sin(rotationAngle) + fg[3][iFace] * cos(rotationAngle);
+                        }
+                        fg[1][iFace] = rotfg[0];
+                        fg[2][iFace] = rotfg[1];
+                        fg[3][iFace] = rotfg[2];
+                    }
+                }
+            }
+
+            for (int m = 0; m < neqn; ++ m)
+            {
+                f[m][targetCell] = fg[m][iFace];
+            }
+        }
+    }
+}
+
+void DownloadInterfaceValue(UnstructGrid *grid, RDouble *f, const string &name)
+{
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo)
+    {
+        return;
+    }
+
+    int nIFace = interfaceInfo->GetNIFace();
+
+    for (int iGhost = GetNumberOfGhostCellLayers() - 1; iGhost >= 0; -- iGhost)
+    {
+        Data_ParamFieldSuite *recieveData = interfaceInfo->GetRecvDataStorage(iGhost);
+        
+        RDouble **fg = reinterpret_cast <RDouble **> (recieveData->GetDataPtr(name));
+        
+        for (int iFace = 0; iFace < nIFace; ++ iFace)
+        {
+            int targetCell;
+            grid->GetTargetIndex(iFace, iGhost + 1, targetCell);
+            f[targetCell] = fg[0][iFace];
+        }
+    }
+}
+void UploadInterpointValue(UnstructGrid *grid, RDouble **f, const string &name, int nEquation)
+{
+    InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+    if (!interpointInformation)
+    {
+        return;
+    }
+
+    int numberOfInterpoints = interpointInformation->GetNumberOfInterpoints();
+    for (int iGhost = GetNumberOfGhostCellLayers() - 1; iGhost >= 0; -- iGhost)
+    {
+        Data_ParamFieldSuite *sendData = interpointInformation->GetSendDataStorage(iGhost);
+
+        RDouble **fg = reinterpret_cast<RDouble **>(sendData->GetDataPtr(name));
+        
+        for (int iPoint = 0; iPoint < numberOfInterpoints; ++ iPoint)
+        {
+            int sourcePoint;
+            grid->GetSourcePointIndex(iPoint, iGhost + 1, sourcePoint);
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                fg[m][iPoint] = f[m][sourcePoint];
+            }
+        }
+    }
+}
+
+void DownloadInterpointValue(UnstructGrid *grid, RDouble **f, const string &name, int nEquation)
+{
+    InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+    if (!interpointInformation)
+    {
+        return;
+    }
+    int numberOfInterpoints = interpointInformation->GetNumberOfInterpoints();
+    int *interPoint2GlobalPoint = interpointInformation->GetInterPoint2GlobalPoint();
+    //for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+    {
+        Data_ParamFieldSuite *recieveData = interpointInformation->GetReceiveDataStorage(0);
+        RDouble **fg = reinterpret_cast<RDouble **>(recieveData->GetDataPtr(name));
+
+        int GlobalPoint;
+        for (int iPoint = 0; iPoint < numberOfInterpoints; ++ iPoint)
+        {
+            GlobalPoint = interPoint2GlobalPoint[iPoint];
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                f[m][GlobalPoint] += fg[m][iPoint];
+            }
+        }
+    }
+}
+
+void UploadOversetValueDefault(UnstructGrid *grid, RDouble **field, const string &name, int neqn)
+{
+    OversetInformationProxy * oversetInformationProxy = grid->GetOversetInformationProxy();
+
+    if (field == 0) return;
+    
+    OversetDataProxy *oversetDataProxy = oversetInformationProxy->GetOversetDataProxyForSend();
+
+    Data_ParamFieldSuite *dataStorage = oversetDataProxy->GetDataStorage();
+
+    RDouble **fieldStorage = reinterpret_cast< RDouble ** > (dataStorage->GetDataPtr(name));
+
+    int numberOfNeighbors = oversetDataProxy->GetNumberOfNeighbors();
+
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbors; ++ iNeighbor)
+    {
+        int  numberOfCells           = oversetDataProxy->GetNumberOfCells          (iNeighbor);
+        int *cellIndexContainer      = oversetDataProxy->GetCellIndexContainer     (iNeighbor);
+        int *cellStorageIndexMapping = oversetDataProxy->GetCellStorageIndexMapping(iNeighbor);
+
+        for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+        {
+            int storageAddress = cellStorageIndexMapping[ iCell ];
+            int cellIndex      = cellIndexContainer[ iCell ];
+
+            for (int iEquation = 0; iEquation < neqn; ++ iEquation)
+            {
+                fieldStorage[ iEquation ][ storageAddress ] = field[ iEquation ][ cellIndex ];
+            }
+        }
+    }
+}
+
+void UploadOversetValueByWeight(UnstructGrid *grid, RDouble **field, const string &name, int numberOfEquations)
+{
+    OversetInformationProxy *oversetInformationProxy = grid->GetOversetInformationProxy();
+
+    if (field == 0) return;
+
+    OversetDataProxy *oversetDataProxy = oversetInformationProxy->GetOversetDataProxyForSend();
+    Data_ParamFieldSuite *dataStorage = oversetDataProxy->GetDataStorage();
+
+    RDouble **fieldStorage = reinterpret_cast<RDouble **> (dataStorage->GetDataPtr(name));
+
+    int numberOfNeighbors = oversetDataProxy->GetNumberOfNeighbors();
+
+    int numberOfNodes = grid->GetNTotalNode();
+    RDouble **qNodeField = NewPointer2<RDouble>(numberOfEquations, numberOfNodes);
+
+    ComputeNodeVariable(grid, qNodeField, field, numberOfEquations);
+
+    int **cell2Node = grid->GetCell2NodeArray();
+    int *nodeNumberOfEachCell = grid->GetNodeNumberOfEachCell();
+
+    RDouble *xNode = grid->GetX();
+    RDouble *yNode = grid->GetY();
+    RDouble *zNode = grid->GetZ();
+
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbors; ++ iNeighbor)
+    {
+        int  numberOfCells           = oversetDataProxy->GetNumberOfCells          (iNeighbor);
+        int *cellIndexContainer      = oversetDataProxy->GetCellIndexContainer     (iNeighbor);
+        int *cellStorageIndexMapping = oversetDataProxy->GetCellStorageIndexMapping(iNeighbor);
+
+        RDouble *interCellCenterX    = oversetDataProxy->GetInterCellCenterX(iNeighbor);
+        RDouble *interCellCenterY    = oversetDataProxy->GetInterCellCenterY(iNeighbor);
+        RDouble *interCellCenterZ    = oversetDataProxy->GetInterCellCenterZ(iNeighbor);
+
+        vector< RDouble > nodeValue(numberOfEquations);
+
+        for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+        {
+            int storageAddress = cellStorageIndexMapping[ iCell ];
+            int cellIndex      = cellIndexContainer[ iCell ];
+
+            RDouble x = interCellCenterX[iCell];
+            RDouble y = interCellCenterY[iCell];
+            RDouble z = interCellCenterZ[iCell];
+
+            SetField(nodeValue, zero, numberOfEquations);
+            RDouble weight = 0.0;
+
+            for(int iNode = 0; iNode < nodeNumberOfEachCell[ cellIndex ]; ++ iNode)
+            {
+                int &nodeIndex = cell2Node[cellIndex][iNode];
+
+                RDouble dx = x - xNode[nodeIndex];
+                RDouble dy = y - yNode[nodeIndex];
+                RDouble dz = z - zNode[nodeIndex];
+
+                RDouble dist = DISTANCE(dx, dy, dz) + SMALL;
+
+                for (int iEquation = 0; iEquation < numberOfEquations; ++ iEquation)
+                {
+                    nodeValue[iEquation] += (1 / dist) * qNodeField[iEquation][nodeIndex];
+                }
+                weight += 1 / dist;
+            }
+            
+            for (int iEquation = 0; iEquation < numberOfEquations; ++ iEquation)
+            {
+                nodeValue[iEquation] /= (weight + SMALL);
+                fieldStorage[iEquation][storageAddress] = nodeValue[iEquation];
+            }
+        }
+    }
+    DelPointer2(qNodeField);
+}
+
+void UploadOversetValue(UnstructGrid *grid, RDouble **field, const string &name, int neqn)
+{
+    int  oversetInterpolationMethod = 0;
+    if(GlobalDataBase::IsExist("oversetInterpolationMethod", PHINT, 1))
+    {
+        oversetInterpolationMethod = GlobalDataBase::GetIntParaFromDB("oversetInterpolationMethod");
+    }
+
+    if (oversetInterpolationMethod == 0)
+    {
+        UploadOversetValueDefault(grid, field, name, neqn);
+    }
+    else if (oversetInterpolationMethod == 1)
+    {
+        UploadOversetValueByWeight(grid, field, name, neqn);
+    }
+}
+
+void DownloadOversetValue(UnstructGrid *grid, RDouble **field, const string &name, int neqn)
+{
+    OversetInformationProxy * oversetInformationProxy = grid->GetOversetInformationProxy();
+
+    if (field == 0) return;
+
+    OversetDataProxy * oversetDataProxy = oversetInformationProxy->GetOversetDataProxyForReceive();
+
+    Data_ParamFieldSuite * dataStorage = oversetDataProxy->GetDataStorage();
+
+    RDouble ** fieldStorage = reinterpret_cast< RDouble ** > (dataStorage->GetDataPtr(name));
+
+    int numberOfNeighborZones = oversetDataProxy->GetNumberOfNeighbors();
+
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighborZones; ++ iNeighbor)
+    {
+        int  numberOfCells           = oversetDataProxy->GetNumberOfCells          (iNeighbor);
+        int *cellIndexContainer      = oversetDataProxy->GetCellIndexContainer     (iNeighbor);
+        int *cellStorageIndexMapping = oversetDataProxy->GetCellStorageIndexMapping(iNeighbor);
+
+        for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+        {
+            int storageAddress = cellStorageIndexMapping[ iCell ];
+            int cellIndex      = cellIndexContainer     [ iCell ];
+
+            for (int iEquation = 0; iEquation < neqn; ++ iEquation)
+            {
+                field[ iEquation ][ cellIndex ] = fieldStorage[ iEquation ][ storageAddress ];
+            }
+        }
+    }
+}
+
+void BarthLimiterINF(Grid *grid_in, int ig, RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    UnstructGrid *grid = UnstructGridCast(grid_in);
+    InterfaceInfo * interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    int        * leftCellOfFace = grid->GetLeftCellOfFace();
+    int        * rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble   * xfc  = grid->GetFaceCenterX();
+    RDouble   * yfc  = grid->GetFaceCenterY();
+    RDouble   * zfc  = grid->GetFaceCenterZ();
+    RDouble   * xcc  = grid->GetCellCenterX();
+    RDouble   * ycc  = grid->GetCellCenterY();
+    RDouble   * zcc  = grid->GetCellCenterZ();
+    RDouble   * xfn  = grid->GetFaceNormalX();
+    RDouble   * yfn  = grid->GetFaceNormalY();
+    RDouble   * zfn  = grid->GetFaceNormalZ();
+
+    int **cell2face  = grid->GetCell2Face();
+    int * face_number_of_each_cell = grid->GetFaceNumberOfEachCell();
+
+    RDouble   dx, dy, dz, ds, dot;
+    RDouble   dq_face;
+
+    int nIFace = interfaceInfo->GetNIFace();
+
+    //! Need temporary arrays for the differences between the value in every cell and 
+    //! maximum/minimum in the neighboring cells.
+    RDouble *dmin = new RDouble[ nIFace ];
+    RDouble *dmax = new RDouble[ nIFace ];
+
+    //! Find the the differences for q.
+    MinMaxDiffINF(grid, ig, dmin, dmax, q);
+
+    //! Find the maximum and minimum in the neighbor of each cell.
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        int ie,face,le,re,iflag;
+        grid->GetSourceIndex(iFace,ig+1,ie);
+        for (int jFace = 0; jFace < face_number_of_each_cell[ie]; ++ jFace)
+        {
+            face = cell2face[ie][jFace];
+            le   = leftCellOfFace[face];
+            re   = rightCellOfFace[face];
+
+            iflag = 1;
+
+            if (re == ie) iflag = - 1;
+
+            dx      = xfc[face] - xcc[ie];
+            dy      = yfc[face] - ycc[ie];
+            dz      = zfc[face] - zcc[ie];
+            dq_face = dqdx[iFace] * dx + dqdy[iFace] * dy + dqdz[iFace] * dz;
+
+            ds  = sqrt(dx * dx + dy * dy + dz * dz);
+            dot = iflag * (xfn[face] * dx + yfn[face] * dy + zfn[face] * dz) / (ds + SMALL);
+
+            if (dot < 0.0) limit[iFace] = 0.0;
+
+            if (dq_face > dmax[iFace])
+            {
+                limit[iFace] = MIN(limit[iFace], dmax[iFace]/dq_face);
+            }
+            else if (dq_face < dmin[iFace])
+            {
+                limit[iFace] = MIN(limit[iFace], dmin[iFace]/dq_face);
+            }
+        }
+    }
+    delete [] dmin;
+    delete [] dmax;
+}
+
+//! Set values for vencat limiters in 3D.
+void VencatLimiterINF(Grid *grid_in, int ig, RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    UnstructGrid *grid = UnstructGridCast(grid_in);
+    InterfaceInfo * interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    int        * leftCellOfFace = grid->GetLeftCellOfFace();
+    int        * rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble   * xfc  = grid->GetFaceCenterX();
+    RDouble   * yfc  = grid->GetFaceCenterY();
+    RDouble   * zfc  = grid->GetFaceCenterZ();
+    RDouble   * xcc  = grid->GetCellCenterX();
+    RDouble   * ycc  = grid->GetCellCenterY();
+    RDouble   * zcc  = grid->GetCellCenterZ();
+    RDouble   * xfn  = grid->GetFaceNormalX();
+    RDouble   * yfn  = grid->GetFaceNormalY();
+    RDouble   * zfn  = grid->GetFaceNormalZ();
+
+    int **cell2face  = grid->GetCell2Face();
+    int * face_number_of_each_cell = grid->GetFaceNumberOfEachCell();
+
+    RDouble   dx, dy, dz, ds, dot;
+    RDouble   dq_face, eps, tmp;
+
+    int nIFace = interfaceInfo->GetNIFace();
+
+    //! Need temporary arrays for the differences between the value in every cell and
+    //! maximum/minimum in the neighboring cells.
+    RDouble *dmin = new RDouble[ nIFace ];
+    RDouble *dmax = new RDouble[ nIFace ];
+
+    // Find the the differences for q
+    MinMaxDiffINF(grid, ig, dmin, dmax, q);
+
+    //! Find the maximum and minimum of dq in the field to set epsilons.
+    RDouble dq_min = dmin[0], dq_max = dmax[0];
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        dq_min = MIN(dq_min, dmin[iFace]);
+        dq_max = MAX(dq_max, dmax[iFace]);
+    }
+
+    RDouble venkatCoeff = 1.0e-5;
+    GlobalDataBase::GetData("venkatCoeff", &venkatCoeff, PHDOUBLE, 1);
+
+    eps = venkatCoeff * (dq_max - dq_min);
+    eps = eps * eps + SMALL;
+
+    //! Find the maximum and minimum in the neighbor of each cell.
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        int ie,face,le,re,iflag;
+        grid->GetSourceIndex(iFace,ig+1,ie);
+        for (int jFace = 0; jFace < face_number_of_each_cell[ie]; ++ jFace)
+        {
+            face = cell2face[ie][jFace];
+            le   = leftCellOfFace[face];
+            re   = rightCellOfFace[face];
+
+            dx = xcc[re] - xcc[le];
+            dy = ycc[re] - ycc[le];
+            dz = zcc[re] - zcc[le];
+            
+            ds  = sqrt(dx * dx + dy * dy + dz * dz);
+            eps = venkatCoeff * ds;
+            eps = eps * eps * eps;
+
+            iflag = 1;
+
+            if (re == ie) iflag = - 1;
+
+            dx      = xfc[face] - xcc[ie];
+            dy      = yfc[face] - ycc[ie];
+            dz      = zfc[face] - zcc[ie];
+            dq_face = dqdx[iFace] * dx + dqdy[iFace] * dy + dqdz[iFace] * dz;
+
+            ds  = sqrt(dx * dx + dy * dy + dz * dz);
+            dot = iflag * (xfn[face] * dx + yfn[face] * dy + zfn[face] * dz) / (ds + SMALL);
+
+            //if (dot < 0.0) limit[iFace] = 0.0;
+
+            if (dq_face > SMALL)
+            {
+                tmp = VenFun(dmax[iFace], dq_face, eps);
+                limit[iFace] = MIN(limit[iFace], tmp);
+            }
+            else if (dq_face < - SMALL)
+            {
+                tmp = VenFun(dmin[iFace], dq_face, eps);
+                limit[iFace] = MIN(limit[iFace], tmp);
+            }
+        }
+    }
+
+    delete [] dmin;
+    delete [] dmax;
+}
+
+void SmoothField(UnstructGrid *grid, RDouble *q)
+{
+    int nTotalCell = grid->GetNTotalCell();
+    int **cell2face  = grid->GetCell2Face();
+    int * face_number_of_each_cell = grid->GetFaceNumberOfEachCell();
+    int * leftCellOfFace = grid->GetLeftCellOfFace();
+    int * rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *vol   = grid->GetCellVolume();
+
+    RDouble *tmp = new RDouble[nTotalCell];
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        q  [iCell] *= vol[iCell];
+        tmp[iCell]  = q[iCell];
+    }
+
+    RDouble epsl = 0.2;
+    int nsmooth = 0;
+    do
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            RDouble sum = 0.0;
+            int count = 0;
+            for (int iFace = 0; iFace < face_number_of_each_cell[iCell]; ++ iFace)
+            {
+                int face = cell2face[iCell][iFace];
+                int le   = leftCellOfFace [ face ];
+                int re   = rightCellOfFace[ face ];
+                int ie   = le;
+                if (le == iCell) ie = re;
+
+                if (ie >= nTotalCell) continue;
+
+                sum += tmp[ie];
+                ++ count;
+            }
+            RDouble coef = one / (one + epsl * count);
+            tmp[iCell] = (q[iCell] + epsl * sum) * coef;
+        }
+        ++ nsmooth;
+    } while (nsmooth < 3);
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        RDouble ovol = 1.0 / vol[iCell];
+        q[iCell] = tmp[iCell] * ovol;
+    }
+    delete [] tmp;
+}
+
+void addn2c(int ie, int ip, int *nCPN, struct linkbase **nc)
+{
+    int find = 0;
+
+    struct linkbase *link;
+    struct linkbase *newie;
+
+    for(link = nc[ip]; link != NULL; link = link->next)
+    {
+        if(link->ic == ie)
+        {
+            find = 1;
+            break;
+        }
+    }
+
+    if(find == 0)
+    {
+        nCPN[ ip ] ++;
+        newie = new struct linkbase;
+        newie->ic = ie;
+        newie->next = nc[ ip ];
+        nc[ ip ] = newie;
+    }
+}
+
+LIB_EXPORT void ConstructFace2Node(int * nPointPerFace, int * nodesOfPerFace, uint_t nFaces, vector< vector<int> > & face2node)
+{
+    face2node.resize(nFaces);
+
+    int count = 0;
+    for (uint_t iFace = 0; iFace < nFaces; ++ iFace)
+    {
+        int nNode = nPointPerFace[iFace];
+        face2node[iFace].resize(nNode);
+        for (int iNode = 0; iNode < nNode; ++ iNode)
+        {
+            int nodeIndex = nodesOfPerFace[count++];
+            face2node[iFace][iNode] = nodeIndex;
+        }
+    }
+}
+
+void GetFaceToNodeList(UnstructGrid * grid, int boundaryConditionType, PHVectorInt1D & linkMap, PHVectorInt2D & faceToNodeList)
+{
+    int numberOfBoundaryFaces = grid->GetNBoundFace();
+
+    int * faceNodeNumberContainer = grid->GetNodeNumberOfEachFace();
+    int * faceNodeIndexContainer  = grid->GetFace2Node();
+
+    //! Build point set of binary tree for searching.
+    PHVectorInt1D locFaceToNode(4);
+    set< DataStruct_Sort< int > > setForSorting;
+    DataStruct_Sort< int > dataForSorting;
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    faceToNodeList.resize(0);
+    linkMap.resize(0);
+
+    int nodePosition = 0;
+    for (int iFace = 0; iFace < numberOfBoundaryFaces; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+
+        int faceNodeNumber = faceNodeNumberContainer[ iFace ];
+        if (boundaryConditionType != bcRegion->GetBCType())
+        {
+            nodePosition += faceNodeNumber;
+            continue;
+        }
+        locFaceToNode.resize(0);
+        for (int iNodeInFace = 0; iNodeInFace < faceNodeNumber; ++ iNodeInFace)
+        {
+            int index = faceNodeIndexContainer[ nodePosition + iNodeInFace ];
+
+            dataForSorting.value = index;
+            set< DataStruct_Sort< int > >::iterator iter = setForSorting.find(dataForSorting);
+
+            if (iter == setForSorting.end())
+            {
+                linkMap.push_back(index);
+                dataForSorting.index = static_cast<int>(linkMap.size() - 1);
+
+                setForSorting.insert(dataForSorting);
+                locFaceToNode.push_back(dataForSorting.index);
+            }
+            else
+            {
+                locFaceToNode.push_back(iter->index);
+            }
+
+        }
+        nodePosition += faceNodeNumber;
+        faceToNodeList.push_back(locFaceToNode);
+    }
+}
+
+
+void VisualizationMesh2D(UnstructGrid * grid, const string & fileName)
+{
+    RDouble * x = grid->GetX();
+    RDouble * y = grid->GetY();
+    RDouble * z = grid->GetZ();
+
+    int numberOfNodes         = grid->GetNTotalNode();
+    int numberOfCells         = grid->GetNTotalCell();
+    int numberOfFaces         = grid->GetNTotalFace();
+
+    int * faceNodeNumberContainer = grid->GetNodeNumberOfEachFace();
+    int * faceNodeIndexContainer  = grid->GetFace2Node();
+
+    int * leftCellIndexContainer  = grid->GetLeftCellOfFace();
+    int * rightCellIndexContainer = grid->GetRightCellOfFace();
+
+    PHVectorString1D titleOfTecplot;
+    titleOfTecplot.push_back("title=\"Unstructured Grid\"");
+    titleOfTecplot.push_back("variables=");
+    titleOfTecplot.push_back("\"x\"");
+    titleOfTecplot.push_back("\"y\"");
+    titleOfTecplot.push_back("\"z\"");
+
+    fstream file;
+    PHSPACE::OpenFile(file, fileName, ios_base::out);
+
+    for (size_t i = 0; i < titleOfTecplot.size(); ++ i)
+    {
+        file << titleOfTecplot[ i ] << "\n";
+    }
+
+
+    int iCount = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        iCount += faceNodeNumberContainer[ iFace ];
+    }
+
+    int numberOfWordsInEachLine = 5;
+
+    //! Output for Tecplot.
+    file << "ZONE\n";
+    if (GetDim() == THREE_D)
+    {
+        file << "ZoneType = FEPolyhedron\n";
+    }
+    else
+    {
+        file << "ZoneType = FEPolygon\n";
+    }
+    file << "Nodes    = " << numberOfNodes << "\n";
+    file << "Faces    = " << numberOfFaces << "\n";
+    file << "Elements = " << numberOfCells << "\n";
+    file << "TotalNumFaceNodes = " << iCount << "\n";
+    file << "NumConnectedBoundaryFaces = 0\n";
+    file << "TotalNumBoundaryConnections = 0\n";
+
+    file.setf(ios::scientific);
+    file.precision(6);
+
+    for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        file << x[ iNode ] << " ";
+        if ((iNode + 1) % numberOfWordsInEachLine == 0) file << "\n";
+    }
+    if (numberOfNodes % numberOfWordsInEachLine != 0) file << "\n";
+
+    for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        file << y[ iNode ] << " ";
+        if ((iNode + 1) % numberOfWordsInEachLine == 0) file << "\n";
+    }
+    if (numberOfNodes % numberOfWordsInEachLine != 0) file << "\n";
+
+    for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        file << z[ iNode ] << " ";
+        if ((iNode + 1) % numberOfWordsInEachLine == 0) file << "\n";
+    }
+    if (numberOfNodes % numberOfWordsInEachLine != 0) file << "\n";
+
+    if (GetDim() == THREE_D)
+    {
+        //! Geometry
+        //! First the faceNodeNumberContainer(n poin pf face).
+        for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+        {
+            file << faceNodeNumberContainer[ iFace ] << " ";
+            if ((iFace + 1) % numberOfWordsInEachLine == 0) file << "\n";
+        }
+        if (numberOfFaces % numberOfWordsInEachLine == 0) file << "\n";
+    }
+
+    //! Second the points to face.
+    iCount = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        int faceNodeNumber = faceNodeNumberContainer[ iFace ];
+        for (int iNodeInFace = 0; iNodeInFace < faceNodeNumber; ++ iNodeInFace)
+        {
+            file << faceNodeIndexContainer[ iCount ++ ] + 1 << " ";
+        }
+        file << "\n";
+    }
+
+    //! Third the f2c:left.
+    int left;
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        left = leftCellIndexContainer[ iFace ] + 1;
+        file << left << " ";
+        if ((iFace + 1) % numberOfWordsInEachLine == 0) file << "\n";
+    }
+    if (numberOfFaces % numberOfWordsInEachLine == 0) file << "\n";
+
+    //! Third the f2c:right.
+    int right;
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        right = rightCellIndexContainer[ iFace ] + 1;
+        if (right > numberOfCells || right < 0) right = 0;
+        file << right << " ";
+        if ((iFace + 1) % numberOfWordsInEachLine == 0) file << "\n";
+    }
+    if (numberOfFaces % numberOfWordsInEachLine == 0) file << "\n";
+
+    PHSPACE::CloseFile(file);
+}
+
+void VisualizationMesh3D(UnstructGrid * gridIn, const string & fileName)
+{
+    UnstructGrid * grid = UnstructGridCast(gridIn);
+
+    RDouble * x = grid->GetX();
+    RDouble * y = grid->GetY();
+    RDouble * z = grid->GetZ();
+
+    int numberOfBoundaryFaces = grid->GetNBoundFace();
+    int numberOfFaces         = grid->GetNTotalFace();
+
+    int * faceNodeNumberContainer = grid->GetNodeNumberOfEachFace();
+
+    PHVectorString1D titleOfTecplot;
+    titleOfTecplot.push_back("title=\"Unstructured Grid\"");
+    titleOfTecplot.push_back("variables=");
+    titleOfTecplot.push_back("\"x\"");
+    titleOfTecplot.push_back("\"y\"");
+    titleOfTecplot.push_back("\"z\"");
+
+
+    int iCount = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        iCount += faceNodeNumberContainer[ iFace ];
+    }
+
+    using namespace PHENGLEI;
+    PHVectorInt2D faceToNodeList(numberOfBoundaryFaces);
+    PHVectorInt1D linkMap;
+    set< int > bcList;
+    bool doseNeedDump = false;
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        bcList.insert(bcType);
+
+        if (bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::SYMMETRY
+            || bcType == PHENGLEI::INFLOW || bcType == PHENGLEI::OUTFLOW)
+        {
+            doseNeedDump = true;
+        }
+    }
+
+    if (PHMPI::GetNumberofGlobalZones() >= 256)
+    {
+        doseNeedDump = false;
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+            int bcType = bcRegion->GetBCType();
+          
+            if (bcType == PHENGLEI::SOLID_SURFACE)
+            {
+                doseNeedDump = true;
+                break;
+            }
+        }
+    }
+
+    if (!doseNeedDump)
+    {
+        return;
+    }
+
+    fstream file;
+    PHSPACE::OpenFile(file, fileName, ios_base::out);
+
+    for (size_t i = 0; i < titleOfTecplot.size(); ++ i)
+    {
+        file << titleOfTecplot[ i ] << "\n";
+    }
+
+    for (set< int >::iterator iter = bcList.begin(); iter != bcList.end(); ++ iter)
+    {
+        if (* iter < 0 ) continue;
+        if (* iter != PHENGLEI::SOLID_SURFACE && * iter != PHENGLEI::SYMMETRY 
+            && * iter != PHENGLEI::OUTFLOW && * iter != PHENGLEI::INFLOW) continue;
+
+        faceToNodeList.resize(0);
+        linkMap.resize(0);
+
+        GetFaceToNodeList(grid, * iter, linkMap, faceToNodeList);
+        ostringstream osZone;
+        osZone << "\"" << grid->GetGridID()->GetIndex()<< "BC=" << * iter << "\" ";
+        string zoneTitle = osZone.str();
+
+        file << "zone T = " << zoneTitle << " N = " << linkMap.size() << "  E = " << faceToNodeList.size()  << " f = FEPOINT, ET = QUADRILATERAL\n";
+        int wordWidth = 20;
+        for (std::size_t i = 0; i < linkMap.size(); ++ i)
+        {
+            int it = linkMap[ i ];
+            file << setiosflags(ios::left);
+            file << setiosflags(ios::scientific);
+            file << setprecision(10);
+            file << setw(wordWidth) << x[ it ]
+            << setw(wordWidth) << y[ it ]
+            << setw(wordWidth) << z[ it ];
+            file << "\n";
+        }
+
+        for (std::size_t i = 0; i < faceToNodeList.size(); ++ i)
+        {
+            //! Number of vertices on the cell face.
+            uint_t np     = faceToNodeList[ i ].size();
+            int index0 = faceToNodeList[ i ][ 0 ];
+            for (uint_t ip = 0; ip < np; ++ ip)
+            {
+                file << faceToNodeList[ i ][ ip ] + 1;
+                if (ip != np - 1) file << " ";
+            }
+
+            for (uint_t ip = np; ip < 4; ++ ip)
+            {
+                file << " " << index0 + 1;
+            }
+            file << "\n";
+        }
+    }
+
+    PHSPACE::CloseFile(file);
+}
+
+
+void ExtractSubGridFromGrid(UnstructGrid * grid, UnstructGrid * grid_Slice, int * isThisCellNeedExtract)
+{
+    int count;
+    int nTotalCell_Slice, nTNode_Slice, nTFace_Slice, nBFace_Slice;
+    int nTotalNode = grid->GetNTotalNode();
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+
+    int * nNPF = grid->GetNodeNumberOfEachFace();
+    int * f2n  = grid->GetFace2Node();
+
+    int * f2cL  = grid->GetLeftCellOfFace();
+    int * f2cR  = grid->GetRightCellOfFace();
+
+    RDouble * x = grid->GetX();
+    RDouble * y = grid->GetY();
+    RDouble * z = grid->GetZ();
+
+    int * lable_cell = new int [nTotalCell];
+    for(int iCell = 0; iCell < nTotalCell; ++ iCell) 
+    {
+        lable_cell[iCell] = 0;
+    }
+
+    //! Find out the total number of nodes,faces and cells on the slice.
+    int * c_to_sc = new int [nTotalCell];
+    count = 0;
+    for(int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        if(isThisCellNeedExtract[iCell])
+        {
+            lable_cell[iCell] = 1;
+            c_to_sc[iCell]    = count;
+            count ++;
+        }
+    }
+    nTotalCell_Slice = count;
+    grid_Slice->SetNTotalCell(nTotalCell_Slice);
+
+    int *lable_face = new int [nTotalFace];
+    for(int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        lable_face[iFace] = 0;
+    }
+    count = 0;
+    for(int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int c1 = f2cL[iFace];
+        if(lable_cell[c1])
+        {
+            ++ count;
+            lable_face[iFace] = 1;
+        }
+    }
+    for(int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int c1 = f2cL[iFace];
+        int c2 = f2cR[iFace];
+        if(lable_cell[c1] || lable_cell[c2])
+        {
+            count ++;
+            lable_face[iFace] = 1;
+        }
+    }
+    nTFace_Slice = count;
+    grid_Slice->SetNTotalFace(nTFace_Slice);
+
+    count = 0;
+    for(int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int c1 = f2cL[iFace];
+        if(lable_cell[c1])
+            ++ count;
+    }
+    for(int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int c1 = f2cL[iFace];
+        int c2 = f2cR[iFace];
+        if((lable_cell[c1] && !lable_cell[c2]) || (!lable_cell[c1] && lable_cell[c2]))
+            count ++;
+    }
+    nBFace_Slice = count;
+    grid_Slice->SetNBoundFace(nBFace_Slice);
+
+    int *lable_point = new int [nTotalNode];
+    for(int iFace = 0; iFace < nTotalNode; ++ iFace)
+    {
+        lable_point[iFace] = 0;
+    }
+    set<int> Slice_node;
+    count = 0;
+    for(int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        if(!lable_face[iFace]) 
+        {
+            for(int j = 0; j < nNPF[iFace]; ++ j)
+                count ++;
+            continue;
+        }
+        for(int j = 0; j < nNPF[iFace]; ++ j)
+        {
+            int ip = f2n[count ++];
+            lable_point[ip] = 1;
+            Slice_node.insert(ip);
+        }
+    }
+    nTNode_Slice = static_cast<int>(Slice_node.size());
+    grid_Slice->SetNTotalNode(nTNode_Slice);
+
+    //! Find out the coordinates of sub-grid nodes.
+    RDouble * x_Slice = new RDouble[nTNode_Slice];
+    RDouble * y_Slice = new RDouble[nTNode_Slice];
+    RDouble * z_Slice = new RDouble[nTNode_Slice];
+    int     * p_to_sp = new int [nTotalNode];
+
+    count = 0;
+    for(int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        if(lable_point[iNode])
+        {
+            x_Slice[count] = x[iNode];
+            y_Slice[count] = y[iNode];
+            z_Slice[count] = z[iNode];
+
+            p_to_sp[iNode] = count;
+
+            count ++;
+        }
+    }
+    grid_Slice->SetX(x_Slice);
+    grid_Slice->SetY(y_Slice);
+    grid_Slice->SetZ(z_Slice);
+
+    //! Faces.
+    int * nNPF_Slice = new int [nTFace_Slice];
+    int * sf_to_f    = new int [nTFace_Slice];
+    int * f2cL_Slice  = new int [nTFace_Slice];
+    int * f2cR_Slice  = new int [nTFace_Slice];
+    count = 0;
+    for(int iFace = 0; iFace < nTotalFace; ++ iFace) 
+    {
+        if(lable_face[iFace])
+            count += nNPF[iFace];
+    }
+    int *f2n_Slice  = new int [count];
+
+    //! The f2c and nNPF of the sub-grid faces.
+    count = 0;
+    int countL = 0;
+    int countR = 0;
+    for(int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        if(lable_face[iFace])
+        {
+            int c1 = f2cL[iFace];
+            int c2 = f2cR[iFace];
+
+            if(c2 >= nTotalCell || c2 < 0)
+            {
+                if(!lable_cell[c1]) 
+                    f2cL_Slice[countL++] = -1;
+                else
+                    f2cL_Slice[countL++] = c_to_sc[c1];
+
+                f2cR_Slice[countR++] = -1;
+            }
+            else
+            {
+                if(!lable_cell[c1]) 
+                    c_to_sc[c1] = -1;
+                if(!lable_cell[c2]) 
+                    c_to_sc[c2] = -1;
+
+                f2cL_Slice[countL++] = c_to_sc[c1];
+                f2cR_Slice[countR++] = c_to_sc[c2];
+            }
+
+            nNPF_Slice[count] = nNPF[iFace];
+
+            sf_to_f[count] = iFace;
+
+            count ++;
+        }
+    }
+
+    //! The f2n and nNPF of the sub-grid faces.
+    count = 0;
+    int count2 = 0;
+    for(int iFace =0; iFace < nTotalFace; ++ iFace)
+    {
+        if(!lable_face[iFace])
+        {
+            for(int j = 0; j < nNPF[iFace]; ++ j) count ++;
+        }
+        else
+        {
+            for(int j = 0; j < nNPF[iFace]; ++j)
+            {
+                int ip = f2n[count ++];
+                f2n_Slice[count2++] = p_to_sp[ip];
+            }
+        }
+    }
+    grid_Slice->SetNodeNumberOfEachFace(nNPF_Slice);
+    grid_Slice->SetFace2Node(f2n_Slice);
+
+    grid_Slice->SetLeftCellOfFace(f2cL_Slice);
+    grid_Slice->SetRightCellOfFace(f2cR_Slice);
+
+    delete [] lable_cell;
+    delete [] lable_face;
+    delete [] lable_point;
+    delete [] sf_to_f;
+    delete [] c_to_sc;
+    delete [] p_to_sp;
+}
+
+void DumpSliceGrid(UnstructGrid *unstructGrid, int sliceAxis, RDouble slicePosition, string fileName)
+{
+    //PrintToWindow("Start dump slice grid ...\n");
+    int nTotalFace = unstructGrid->GetNTotalFace();
+    int nTotalNode = unstructGrid->GetNTotalNode();
+    int nTotalCell = unstructGrid->GetNTotalCell();
+
+    int *lable_point = new int [nTotalNode];
+    int *lable_face  = new int [nTotalFace];
+    int *lable_cell  = new int [nTotalCell];
+
+    PHSPACE::SetField(lable_point, 0, nTotalNode);
+    PHSPACE::SetField(lable_face,  0, nTotalFace);
+    PHSPACE::SetField(lable_cell,  0, nTotalCell);
+
+    int *face2node = unstructGrid->GetFace2Node();
+    int *leftCellOfFace  = unstructGrid->GetLeftCellOfFace();
+    int *rightCellOfFace = unstructGrid->GetRightCellOfFace();
+    RDouble *coord = 0;
+    if (sliceAxis == 0) 
+        coord = unstructGrid->GetX();
+    else if (sliceAxis == 1) 
+        coord = unstructGrid->GetY();
+    else 
+        coord = unstructGrid->GetZ();
+
+    long long int *face2NodeSubscript = unstructGrid->GetFace2NodeSubscript();
+    int ip;
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        RDouble rmin =  1.0e30;
+        RDouble rmax = -1.0e30;
+
+        for (int j = static_cast<int>(face2NodeSubscript[iFace]); j < face2NodeSubscript[iFace+1]; ++ j)
+        {
+            ip = face2node[j];
+            if (coord[ip] > rmax)
+            {
+                rmax = coord[ip];
+            }
+
+            if (coord[ip] < rmin)
+            {
+                rmin = coord[ip];
+            }
+        }
+
+        if ((rmax - slicePosition) * (rmin - slicePosition) <= 0.0)
+        {
+            int le = leftCellOfFace[iFace];
+            int re = rightCellOfFace[iFace];
+
+            lable_cell[le] = 1;
+            if (re >= 0 && re < nTotalCell) 
+            {
+                lable_cell[re] = 1;
+            }
+        }
+    }
+    int dumpCellCount = 0;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        if(lable_cell[iCell] == 1)
+        {
+            ++ dumpCellCount;
+            break;
+        }
+    }
+
+    if(dumpCellCount != 0)
+    {
+        int iZone = unstructGrid->GetGridID()->GetIndex();
+        Grid * grid_slice = CreateGridGeneral(UNSTRUCTGRID, new GridID(iZone), 0, PHSPACE::GetDim());
+        ExtractSubGridFromGrid(unstructGrid, UnstructGridCast(grid_slice), lable_cell);
+
+        VisualizationMesh2D(UnstructGridCast(grid_slice), fileName);
+        delete grid_slice;
+    }
+
+    delete [] lable_point;
+    delete [] lable_face;
+    delete [] lable_cell;
+
+    //PrintToWindow("End dump slice grid ...\n");
+}
+
+void VisualizationEigenMeshofCoarseGrid3D(UnstructGrid * grid, const string & fileName)
+{
+    if(GetDim() < 3) return;
+
+    UnstructGrid * coarseGrid = grid;
+    grid = (UnstructGrid *)coarseGrid->GetFineGrid();
+
+    RDouble * x = grid->GetX();
+    RDouble * y = grid->GetY();
+    RDouble * z = grid->GetZ();
+
+    int nTotalNode = grid->GetNTotalNode();
+    int nBoundFace = grid->GetNBoundFace();
+
+    int * nNPF = grid->GetNodeNumberOfEachFace();
+    int * f2n  = grid->GetFace2Node();
+
+    int * leftCellIndexContainer  = grid->GetLeftCellOfFace();
+    int * rightCellIndexContainer = grid->GetRightCellOfFace();
+    
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    int *mark = NULL;
+    int node = 0, n = 0, i = 0, j = 0, bcType = 0, nline = 0;
+
+    int nTotalCell = 0;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        bcType = bcRegion->GetBCType();
+        if (bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::SYMMETRY)
+        {
+            vector<int>* faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                nTotalCell ++;
+            }
+        }
+    }
+
+    if (nTotalCell == 0) return;
+
+    mark = new int[nTotalNode]();
+
+    //! Write fine grid first.
+    fstream file;
+    PHSPACE::OpenFile(file, fileName, ios_base::out);
+
+    file << "TITLE     = \"Grids of MultiGrid in 3D\"" << endl;
+    file << "VARIABLES = \"X\", \"Y\", \"Z\"" << endl;
+
+    file << "ZONE T=\"Level " << grid->GetLevel() << " \"" << endl;
+    file << " N= " << nTotalNode << ", E= " << nTotalCell << ", F=FEPOINT, ET=Quadrilateral" << endl;
+    for(i=0; i<nTotalNode; i++)
+    {
+        file << x[i] << " " << y[i] << " " << z[i] << endl;
+    }
+    for(node=i=0; i<nBoundFace; i++) 
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[i]);
+        bcType = bcRegion->GetBCType();
+
+        if(bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::SYMMETRY)
+        {
+            for(j=0; j<nNPF[i]; j++) 
+            {
+                n = f2n[node++];
+                file << n + 1 << " ";
+            }
+            if(nNPF[i] == 3) 
+            {   //triangle
+                file << n + 1 << " " << endl;
+            } 
+            else if(nNPF[i] == 4)
+            { // quad
+                file << endl;
+            } else 
+            {
+                cout << "Can't out this element type." << endl;
+            }
+        }else
+        {
+            for(j=0; j<nNPF[i]; ++j) node ++;
+        }
+    }
+
+    //! Compute the information of line to point on finest grid boundary.
+    int *fpmark = new int [nTotalNode]();
+    for (i = 0; i < nTotalNode; ++ i) fpmark[i] = -1;
+    int fnBDNode = 0;
+    for (node=i=0; i<nBoundFace; ++i)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[i]);
+        bcType = bcRegion->GetBCType();
+
+        if(!(bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::SYMMETRY))
+        {
+            node += nNPF[i];
+            continue;
+        }
+        for(j=0; j<nNPF[i]; ++j)
+        {
+            int ip     = f2n[node++];
+            fpmark[ip] = 1;
+        }
+    }
+    for(node=i=0; i<nTotalNode; ++i)
+    {
+        if(fpmark[i] == 1)
+        {
+            fpmark[i] = node++;
+        }
+    }
+    fnBDNode = node;
+    int *fpmarkrever = new int [fnBDNode];
+    for(i=0; i<nTotalNode; ++i)
+    {
+        if(fpmark[i] != -1)
+        {
+            int ip = fpmark[i];
+            fpmarkrever[ip] = i;
+        }
+    }
+
+    int (*l2p)[2] = new int [3*nBoundFace][2](); 
+    int fnBDLine   = 0;
+    int *p2l      = new int [fnBDNode]();
+    for(i=0; i<fnBDNode; ++i) p2l[i] = -1;
+    for(node=i=0; i<nBoundFace; ++i)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[i]);
+        bcType = bcRegion->GetBCType();
+
+        if(!(bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::SYMMETRY))
+        {
+            node += nNPF[i];
+            continue;
+        }
+        int p1, p2;
+        for(j=0; j<nNPF[i]; ++j)
+        {
+            if(j==0)
+            {
+                p1 = f2n[ node+nNPF[i]-1 ];
+                p2 = f2n[node++];
+            }else
+            {
+                p1 = f2n[node-1];
+                p2 = f2n[node++];
+            }
+
+            p1 = fpmark[p1]; 
+            p2 = fpmark[p2];
+
+            if(p2l[p1] == -1 || p2l[p2] == -1)
+            {
+                l2p[fnBDLine][0] = p1;
+                l2p[fnBDLine][1] = p2;
+
+                if(p2l[p1] == -1) p2l[p1] = fnBDLine;
+                if(p2l[p2] == -1) p2l[p2] = fnBDLine;
+
+                fnBDLine ++;
+
+                if(fnBDLine > 3*nBoundFace)
+                {
+                    cout << "Error: Please increase the length of p2l[][2]!" << endl;
+                    return;
+                }
+            }else if(p2l[p1] != p2l[p2])
+            {
+                bool flag = true;
+                for(int k=0; k<fnBDLine; ++k)
+                {
+                    int n1 = l2p[k][0], n2 = l2p[k][1];
+                    if((n1 == p1 && n2 == p2) || (n1 == p2 && n2 == p1))
+                    {
+                        flag = false;
+                        break;
+                    }
+                }
+                if(flag)
+                {
+                    l2p[fnBDLine][0] = p1;
+                    l2p[fnBDLine][1] = p2;
+                    fnBDLine ++;
+
+                    if(fnBDLine > 3*nBoundFace)
+                    {
+                        cout << "Error: Please increase the length of p2l[][2]!" << endl;
+                        return;
+                    }
+                }
+            }
+        }
+    }
+    delete []p2l;    p2l = NULL;
+
+    //! Compute the information of point to cell on finest grid boundary.
+    vector< set<int> > p2c(fnBDNode);
+    for(node=i=0; i<nBoundFace; ++i)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[i]);
+        bcType = bcRegion->GetBCType();
+
+        if(!(bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::SYMMETRY))
+        {
+            node += nNPF[i];
+            continue;
+        }
+        for(j=0; j<nNPF[i]; ++j)
+        {
+            int ip = f2n[node++];
+            ip     = fpmark[ip];
+            p2c[ip].insert(i);
+        }
+    }
+
+    //! Compute the information of line to cell on finest grid boundary.
+    int (*l2c)[2] = new int [fnBDLine][2]();
+    int *nCPL     = new int [fnBDLine]();
+    int l;
+    for(l=0; l<fnBDLine; ++l) nCPL[l] = 0;
+
+    set<int>::iterator iter1, iter2;
+    for(l=0; l<fnBDLine; ++l)
+    {
+        int c1, c2;
+        int p1 = l2p[l][0], p2 = l2p[l][1];
+        for(iter1=p2c[p1].begin(); iter1!= p2c[p1].end(); ++iter1)
+        {
+            c1 = *iter1;
+            for(iter2=p2c[p2].begin(); iter2!=p2c[p2].end(); ++iter2)
+            {
+                c2 = *iter2;
+
+                if(c1 == c2)
+                {
+                    if(nCPL[l] == 2)
+                    {
+                        cout << "Warning: this line has had two cells!\n";
+                        return;
+                    }
+                    l2c[l][ nCPL[l]++ ] = c1;
+                }
+            }
+        }
+    }
+
+    //! For coarse grid.
+    int *lmark = new int [fnBDLine]();
+    grid     = coarseGrid;
+    
+    leftCellIndexContainer  = grid->GetLeftCellOfFace();
+    rightCellIndexContainer = grid->GetRightCellOfFace();
+
+    //! Compute the border of cells on boundary.
+    int *bdf2cc = new int [nBoundFace]();
+    for(i=0; i<nBoundFace; ++i) bdf2cc[i] = -1;
+
+    for(i=0; i<fnBDLine; ++i) lmark[i] = 0;
+    for(i=0; i<fnBDLine; ++i)
+    {
+        if(nCPL[i] == 2)
+        {
+            int c1 = l2c[i][0], c2 = l2c[i][1];
+            if(leftCellIndexContainer[c1] != leftCellIndexContainer[c2])
+            {
+                lmark[i] = 1;
+            }
+            
+        }else if(nCPL[i] == 1)
+        {
+            lmark[i] = 1;
+        }else
+        {
+            cout << "Error: this line has wrong cells!\n";
+            return;
+        }
+
+    }
+    delete []bdf2cc;    bdf2cc = NULL;
+
+    //! Compute the line(l2n) to count.
+    nline = 0;
+    for(i=0; i<fnBDLine; ++i)
+    {
+        if (lmark[i])
+        {
+            ++ nline;
+        }
+    }
+
+    file << "ZONE T=\"Level " << grid->GetLevel() << "\"" << endl;
+    file <<" N= " << fnBDNode << ", E= "  << nline << ", F=FEPOINT, ET=Quadrilateral\n";
+    for(i=0; i<nTotalNode; i++)
+    {
+        if(fpmark[i] != -1) 
+        {
+            file << x[i] << " " << y[i] << " " << z[i] << endl;
+        }
+    }
+
+    for(i=0; i<fnBDLine; ++i)
+    {
+        if(lmark[i])
+        {
+            int n1 = l2p[i][0], n2 = l2p[i][1];
+            file << n1 + 1 << " " << n1 + 1 << " " << n2 + 1 << " " << n2 + 1 << endl;
+        }
+    }
+
+    delete []lmark;    lmark = NULL;
+    delete []fpmark;    fpmark = NULL;
+    delete []fpmarkrever;    fpmarkrever = NULL;
+
+    delete []l2c;    l2c = NULL;
+    delete []nCPL;    nCPL = NULL;
+    delete []l2p;    l2p = NULL;
+
+    delete [] mark;    mark = NULL;
+
+    CloseFile(file);
+}
+
+vector< RDouble > & UnstructGrid::GetNodeWallDist()
+{
+    return nodeWalldistDistance;
+}
+
+vector< RDouble > & UnstructGrid::GetNodeWallDistInOtherBlock()
+{
+    return nodeWalldistDistanceInOtherBlock;
+}
+
+LIB_EXPORT void UnstructGrid::RegisterOversetField(const string & name, const int type, const int dimesion)
+{
+    //! Field for send
+    OversetDonorCellManager * oversetDonorCellManager = oversetInformationProxy->GetOversetDonorCellManager();
+
+    int numberOfDonorCells = oversetDonorCellManager->GetTotalNumberOfOversetDonorCells();
+
+    Data_ParamFieldSuite * dataStorageForSend = oversetDonorCellManager->GetDataStorage();
+
+    RDouble ** fieldForSend = NewPointer2< RDouble >(dimesion, numberOfDonorCells);
+
+    for(int iDim = 0; iDim < dimesion; ++ iDim)
+    {
+        for (int jDim = 0; jDim < numberOfDonorCells; ++ jDim)
+        {
+            fieldForSend[ iDim ][ jDim ] = 0.0;
+        }
+    }
+
+    dataStorageForSend->UpdateDataPtr(name, fieldForSend);
+
+    //! Field for receive.
+    OversetInterplateCellManager *  oversetInterplateCellManager = oversetInformationProxy->GetOversetInterplateCellManager();
+
+    int numberOfInterplateCells = oversetInterplateCellManager->GetTotalNumberOfOversetInterplateCells();
+
+    Data_ParamFieldSuite * dataStorageForReceive = oversetInterplateCellManager->GetDataStorage();
+
+    RDouble ** fieldForReceive = NewPointer2< RDouble >(dimesion, numberOfInterplateCells);
+
+    for(int iDim = 0; iDim < dimesion; ++ iDim)
+    {
+        for (int jDim = 0; jDim < numberOfInterplateCells; ++ jDim)
+        {
+            fieldForReceive[ iDim ][ jDim ] = 0.0;
+        }
+    }
+
+    dataStorageForReceive->UpdateDataPtr(name, fieldForReceive);
+}
+
+LIB_EXPORT RDouble UnstructGrid::GetAverageVolume()
+{
+    if(averageVolume < 0.0)
+    {
+        cout<<endl<<"Error! averageVolume < 0.0"<<endl;
+        exit(0);
+    }
+    return averageVolume;
+}
+
+void UnstructGrid::Output(const string & fileName)
+{
+    RDouble * x = this->GetX();
+    RDouble * y = this->GetY();
+    RDouble * z = this->GetZ();
+
+    int numberOfBoundaryFaces = this->GetNBoundFace();
+    int numberOfFaces         = this->GetNTotalFace();
+
+    int *faceNodeNumberContainer = this->GetNodeNumberOfEachFace();
+
+    PHVectorString1D titleOfTecplot;
+    titleOfTecplot.push_back("title=\"Unstructured Grid\"");
+    titleOfTecplot.push_back("variables=");
+    titleOfTecplot.push_back("\"x\"");
+    titleOfTecplot.push_back("\"y\"");
+    titleOfTecplot.push_back("\"z\"");
+
+
+    int iCount = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        iCount += faceNodeNumberContainer[ iFace ];
+    }
+
+    using namespace PHENGLEI;
+    PHVectorInt2D faceToNodeList(numberOfBoundaryFaces);
+    PHVectorInt1D linkMap;
+    set< int > bcList;
+
+    UnstructBCSet **bcr = this->GetBCRecord();
+
+    bool doseNeedDump = false;
+    for (int iFace = 0; iFace < numberOfBoundaryFaces; ++ iFace)
+    {
+        int boundaryConditionType = bcr[iFace]->GetKey();
+        bcList.insert(boundaryConditionType);
+        if (boundaryConditionType == PHENGLEI::SOLID_SURFACE || boundaryConditionType == PHENGLEI::SYMMETRY
+            || boundaryConditionType == PHENGLEI::INFLOW || boundaryConditionType == PHENGLEI::OUTFLOW)
+        {
+            doseNeedDump = true;
+        }
+    }
+
+    if (PHMPI::GetNumberofGlobalZones() >= 256)
+    {
+        doseNeedDump = false;
+        for (int iFace = 0; iFace < numberOfBoundaryFaces; ++ iFace)
+        {
+            int boundaryConditionType = bcr[iFace]->GetKey();
+            if(boundaryConditionType == PHENGLEI::SOLID_SURFACE)
+            {
+                doseNeedDump = true;
+                break;
+            }
+        }
+    }
+
+    if (!doseNeedDump)
+    {
+        return;
+    }
+
+    fstream file;
+    PHSPACE::OpenFile(file, fileName, ios_base::out);
+
+    for (size_t i = 0; i < titleOfTecplot.size(); ++ i)
+    {
+        file << titleOfTecplot[ i ] << "\n";
+    }
+
+    for (set< int >::iterator iter = bcList.begin(); iter != bcList.end(); ++ iter)
+    {
+        if (* iter < 0 ) continue;
+        if (* iter != PHENGLEI::SOLID_SURFACE && * iter != PHENGLEI::SYMMETRY 
+            && * iter != PHENGLEI::OUTFLOW && * iter != PHENGLEI::INFLOW) continue;
+
+        faceToNodeList.resize(0);
+        linkMap.resize(0);
+
+        GetFaceToNodeList(this, * iter, linkMap, faceToNodeList);
+        ostringstream osZone;
+        osZone << "\"" << this->GetGridID()->GetIndex()<< "BC=" << * iter << "\" ";
+        string zoneTitle = osZone.str();
+
+        file << "zone T = " << zoneTitle << " N = " << linkMap.size() << "  E = " << faceToNodeList.size()  << " f = FEPOINT, ET = QUADRILATERAL\n";
+        int wordWidth = 20;
+        for (std::size_t i = 0; i < linkMap.size(); ++ i)
+        {
+            int it = linkMap[ i ];
+            file << setiosflags(ios::left);
+            file << setiosflags(ios::scientific);
+            file << setprecision(10);
+            file << setw(wordWidth) << x[ it ]
+                << setw(wordWidth) << y[ it ]
+                << setw(wordWidth) << z[ it ];
+            file << "\n";
+        }
+
+        for (std::size_t i = 0; i < faceToNodeList.size(); ++ i)
+        {
+            //! Number of vertices on the cell face.
+            uint_t np     = faceToNodeList[ i ].size();
+            int index0 = faceToNodeList[ i ][ 0 ];
+            for (uint_t ip = 0; ip < np; ++ ip)
+            {
+                file << faceToNodeList[ i ][ ip ] + 1;
+                if (ip != np - 1) file << " ";
+            }
+
+            for (uint_t ip = np; ip < 4; ++ ip)
+            {
+                file << " " << index0 + 1;
+            }
+            file << "\n";
+        }
+    }
+
+    PHSPACE::CloseFile(file);
+}
+
+RDouble AspectRatio(RDouble dist, RDouble area, int nodeNumOfPerFace)
+{
+    const RDouble SQRT3 = 1.732050807568877;
+
+    RDouble length = 1.0;
+
+    if (GetDim() == TWO_D)
+    {
+        if (nodeNumOfPerFace == 2)
+        {  //quadrilateral
+            length = area;
+        }
+        else
+        {
+            cout << endl << "Need new code in function aspect ratio!" << endl;
+        }
+    }
+    else
+    {
+        if (nodeNumOfPerFace == 3)
+        {  //triangle
+            length = sqrt(area * four / SQRT3);
+        }
+        else if (nodeNumOfPerFace == 4)
+        {  //quadrilateral
+            length = sqrt(area);
+        }
+        else
+        {
+            cout << endl << "Need new code in function aspect ratio!" << endl;
+        }
+    }
+
+    return length / (dist + TINY);
+}
+
+void Get_Xadj_Adjncy(UnstructGrid *grid, idx_t *xadj, idx_t *adjncy)
+{   
+    int  nTotalCell = grid->GetNTotalCell();
+    vector<int> *c2c = grid->GetCell2Cell();
+
+    xadj[0]   = 0;
+    int count = 0;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        xadj[iCell+1] = xadj[iCell] + c2c[iCell].size();
+        for (std::size_t j = 0; j < c2c[iCell].size(); ++ j)
+        {
+            adjncy[count ++] = c2c[iCell][j];
+        }
+    }
+}
+
+void Get_Xadj_Adjncy(UnstructGrid *grid, idx_t *xadj, idx_t *adjncy, int *neighborCell, idx_t *vtxdist)
+{   
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+    
+    int *left_cell_of_face = grid->GetLeftCellOfFace();
+    int *right_cell_of_face = grid->GetRightCellOfFace();
+
+    idx_t startGlobalIndex = 0;
+
+    // First: compute the cell-to-cell connectivity relationship, include interface.
+    set<idx_t> *c2c = new set<idx_t>[nTotalCell];
+    idx_t le, re;
+
+    // If boundary is an INTERFACE
+    if (vtxdist && neighborCell)
+    {
+        //! Parallel
+        int nIFace = grid->GetNIFace();
+        InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+        int *interFace2ZoneID = interfaceInfo->GetInterFace2ZoneID();
+        int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+
+        for (int iFace = 0; iFace < nIFace; ++ iFace)
+        {
+            int neighborZone = interFace2ZoneID[iFace];
+            int bcFace = interFace2BoundaryFace[iFace];
+            le = left_cell_of_face[bcFace];
+            re = neighborCell[iFace];
+            re += vtxdist[neighborZone];
+            c2c[le].insert(re);
+        }
+
+        int myid = PHMPI::GetCurrentProcessorID();
+        startGlobalIndex = vtxdist[myid];
+    }
+
+    // Interior faces
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = left_cell_of_face [iFace];
+        re = right_cell_of_face[iFace];
+
+        c2c[le].insert(re + startGlobalIndex);
+        c2c[re].insert(le + startGlobalIndex);
+    }
+
+    // Second: compute the xadj and adjncy.
+    xadj[0]   = 0;
+    int count = 0;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        xadj[iCell+1] = xadj[iCell] + c2c[iCell].size();
+        for (set<idx_t>::iterator iter = c2c[iCell].begin(); iter != c2c[iCell].end(); ++ iter)
+        {
+            adjncy[count ++] = (*iter);
+        }
+    }
+
+    // Free memory.
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        c2c[iCell].clear();
+    }
+    delete []c2c;
+}
+
+
+void Get_Xadj_Adjncy_Weight(UnstructGrid *grid, idx_t *xadj, idx_t *adjncy, RDouble *adjncyWeight)
+{   
+    int  nTotalCell = grid->GetNTotalCell();
+    int ** cell2face = grid->GetCell2Face();
+    int *  nFaceCell = grid->GetFaceNumberOfEachCell();
+
+    int * leftCellOfFace  = grid->GetLeftCellOfFace();
+    int * rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble *area = grid->GetFaceArea();
+
+    int count = 0;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        int nNeighbor = static_cast<int>(xadj[iCell + 1] - xadj[iCell]);
+
+        
+        for (int j = 0; j < nNeighbor; ++ j)
+        {
+            int neighborCell = static_cast<int>(adjncy[count]);
+
+            RDouble weightArea = -1.0;
+            int nFace = nFaceCell[iCell];
+            for (int iNeighFace = 0; iNeighFace < nFace; ++ iNeighFace)
+            {
+                int neighFace = cell2face[iCell][iNeighFace];
+
+                int le = leftCellOfFace[neighFace];
+                int re = rightCellOfFace[neighFace];
+
+                if( (le == iCell && re == neighborCell) ||
+                    (le == neighborCell && re == iCell) )
+                {
+                    weightArea = area[neighFace];
+                    break;
+                }
+            } // neighbor face.
+
+            if(weightArea < 0.0)
+            {
+                TK_Exit::PrintDebugInfoExit("Error: can not find the patched face!");
+            }
+
+            adjncyWeight[count] = weightArea;
+            count ++;
+        }// neighbor cell
+    }
+}
+
+}
+
+
diff --git a/API/Geometry/src/GeomProxy.cpp b/API/Geometry/src/GeomProxy.cpp
new file mode 100644
index 0000000..4b87358
--- /dev/null
+++ b/API/Geometry/src/GeomProxy.cpp
@@ -0,0 +1,58 @@
+#include "GeomProxy.h"
+
+using namespace std;
+namespace PHSPACE
+{
+    GeomProxy::GeomProxy()
+    {
+        xfn  = NULL;
+        yfn  = NULL;
+        zfn  = NULL;
+        vgn  = NULL;
+        area = NULL;
+    }
+
+    GeomProxy::~GeomProxy()
+    {
+        delete [] xfn;
+        delete [] yfn;
+        delete [] zfn;
+        delete [] vgn;
+        delete [] area;
+    }
+
+    void GeomProxy::Create(int nsize)
+    {
+        xfn  = new value_type[nsize];
+        yfn  = new value_type[nsize];
+        zfn  = new value_type[nsize];
+        vgn  = new value_type[nsize];
+        area = new value_type[nsize];
+    }
+
+    GeomProxy::iterator GeomProxy::GetFaceNormalX()
+    {
+        return xfn;
+    }
+
+    GeomProxy::iterator GeomProxy::GetFaceNormalY()
+    {
+        return yfn;
+    }
+
+    GeomProxy::iterator GeomProxy::GetFaceNormalZ()
+    {
+        return zfn;
+    }
+
+    GeomProxy::iterator GeomProxy::GetFaceArea()
+    {
+        return area;
+    }
+
+    GeomProxy::iterator GeomProxy::GetFaceVelocity()
+    {
+        return vgn;
+    }
+}
+
diff --git a/API/Geometry/src/Geometry.cpp b/API/Geometry/src/Geometry.cpp
new file mode 100644
index 0000000..b0fe74b
--- /dev/null
+++ b/API/Geometry/src/Geometry.cpp
@@ -0,0 +1,36 @@
+#include "Geometry.h"
+#include "Geo_Grid.h"
+
+namespace PHSPACE
+{
+
+PHGeometry::PHGeometry(vector < Grid * > *grids)
+{
+    this->grids = grids;
+}
+
+PHGeometry::~PHGeometry()
+{
+    for (std::size_t i = 0; i < grids->size(); ++ i)
+    {
+        delete (*grids)[i];
+    }
+    delete grids;
+}
+
+Grid * PHGeometry::GetGrid(int level)
+{
+    return (*grids)[level];
+}
+
+void PHGeometry::AddGrid(Grid *grid)
+{
+    this->grids->push_back(grid);
+}
+
+vector < Grid * > * PHGeometry::GetVectorGrid()
+{
+    return grids;
+}
+
+}
diff --git a/API/Geometry/src/GeometryUnit.cpp b/API/Geometry/src/GeometryUnit.cpp
new file mode 100644
index 0000000..61d2c03
--- /dev/null
+++ b/API/Geometry/src/GeometryUnit.cpp
@@ -0,0 +1,40 @@
+#include "GeometryUnit.h"
+#include <cstddef>
+
+namespace PHSPACE
+{
+DYNode::DYNode()
+{
+    node2node  = NULL;
+    node2nodeK = NULL;
+}
+
+DYNode::~DYNode()
+{
+    delete [] node2node;
+    delete [] node2nodeK;
+}
+
+DYFace::DYFace()
+{
+    face2node = NULL;
+}
+DYFace::~DYFace()
+{
+    delete [] face2node;
+}
+
+DYCell::DYCell()
+{
+    cell2face = NULL;
+    cell2node = NULL;
+    cell2cell = NULL;
+}
+DYCell::~DYCell()
+{
+    delete []cell2face;
+    delete []cell2node;
+    delete []cell2cell;
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/GridType.cpp b/API/Geometry/src/GridType.cpp
new file mode 100644
index 0000000..bdfd08b
--- /dev/null
+++ b/API/Geometry/src/GridType.cpp
@@ -0,0 +1,39 @@
+#include "GridType.h"
+#include "Geo_StructGrid.h"
+#include "Geo_UnstructGrid.h"
+
+namespace PHSPACE
+{
+
+Grid * CreateGridGeneral(int gridtype, GridID *index, int level, int nDim)
+{
+    if (gridtype == UNSTRUCTGRID)
+    {
+        Grid *grid = new UnstructGrid();
+        grid->InitGrid(index,level,nDim,UNSTRUCTGRID);
+        return grid;
+    }
+    else if (gridtype == STRUCTGRID)
+    {
+        Grid *grid = new StructGrid();
+        grid->InitGrid(index,level,nDim,STRUCTGRID);
+        return grid;
+    }
+    cout << "no this type grid\n";
+    return 0;
+}
+
+
+int GetSystemGridType(set<int> &grid_type)
+{
+    if (grid_type.size() > 1)
+    {
+        return MIXGRID;
+    }
+    else
+    {
+        return *grid_type.begin();
+    }
+}
+
+}
diff --git a/API/Geometry/src/MeshAgglomeration.cpp b/API/Geometry/src/MeshAgglomeration.cpp
new file mode 100644
index 0000000..7bf8e99
--- /dev/null
+++ b/API/Geometry/src/MeshAgglomeration.cpp
@@ -0,0 +1,616 @@
+#include <list>
+#include "MeshAgglomeration.h"
+#include "GridType.h"
+#include "Geo_Interface.h"
+#include "Geo_Interpoint.h"
+#include "Geo_FaceMetrics_Unstruct.h"
+#include "Geo_CellMetrics_Unstruct.h"
+#include "Geo_DynamicGridMetrics_Unstruct.h"
+#include "Geo_LSQWeight_Unstruct.h"
+#include "Geo_UnstructBC.h"
+#include "Geo_Face.h"
+#include "GRHash.h"
+#include "Geo_FaceTopo_Unstruct.h"
+#include "mgridgen.h"
+#include "Glb_Dimension.h"
+
+namespace PHSPACE{
+LIB_EXPORT Mesh_Agglomeration::Mesh_Agglomeration(UnstructGrid * fineGridIn, int fineGridLevelIn)
+{
+    this->fineGrid = fineGridIn;
+    this->fineGridLevel = fineGridLevelIn;
+
+    this->coarseGrid = 0;
+}
+
+LIB_EXPORT Mesh_Agglomeration::~Mesh_Agglomeration()
+{
+}
+
+LIB_EXPORT void Mesh_Agglomeration::CoarsenGridOnce()
+{
+    int nTotalFace = fineGrid->GetNTotalFace();
+    int nBoundFace = fineGrid->GetNBoundFace();
+    int nTotalCell = fineGrid->GetNTotalCell();
+    int *left_cell_of_face = fineGrid->GetLeftCellOfFace();
+    int *right_cell_of_face = fineGrid->GetRightCellOfFace();
+
+    RDouble * vol = fineGrid->GetCellVolume();
+    RDouble * ns  = fineGrid->GetFaceArea();
+
+    RDouble * xcc = fineGrid->GetCellCenterX();
+    RDouble * ycc = fineGrid->GetCellCenterY();
+    RDouble * zcc = fineGrid->GetCellCenterZ();
+
+    RDouble * virtualCellCenterX = new RDouble [nTotalFace];
+    RDouble * virtualCellCenterY = new RDouble [nTotalFace];
+    RDouble * virtualCellCenterZ = new RDouble [nTotalFace];
+    PHSPACE::SetField(virtualCellCenterX, 0.0, nTotalFace);
+    PHSPACE::SetField(virtualCellCenterY, 0.0, nTotalFace);
+    PHSPACE::SetField(virtualCellCenterZ, 0.0, nTotalFace);
+
+
+    RDouble *tarea = new RDouble[nTotalCell];   // total area of each cell
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        tarea[iCell] = 0.0;
+    }
+
+    int le = 0, re = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = left_cell_of_face[iFace];
+        tarea[le] += ns[iFace];
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = left_cell_of_face [iFace];
+        re = right_cell_of_face[iFace];
+        tarea[le] += ns[iFace];
+        tarea[re] += ns[iFace];
+    }
+
+    int *fmark = new int[nTotalFace];
+
+    SetField(fmark, -1, nTotalFace);
+    int cnTFace = 0;
+
+    //! Prepare the inner-faces that have same left&&right cell, on coarse grid.
+    //! fmark: mapping face on fine grid to face on coarse grid.
+    //! fmark = -1: the two neighbor cells would not been agglomerated.
+    using namespace GRIDER_SPACE;
+    int nInteriorFace = nTotalFace - nBoundFace;
+    FaceHash faceHash;
+    vector<Geo_Face *> faceList;
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = left_cell_of_face [iFace];
+        re = right_cell_of_face[iFace];
+
+        Geo_Face *face = new Geo_Face(le, re, iFace, nInteriorFace);
+
+        bool isFaceExist;
+
+        // Insert the node into the tetNode, which is a hash table.
+        int faceIndexinHash = faceHash.insert(face, isFaceExist) - 1;
+
+        // Push the node into node list of GRAdvanceFront.
+        if(isFaceExist)
+        {
+            // the coarse face have been built.
+            delete face;
+            face = faceHash[faceIndexinHash];
+            fmark[iFace] = face->GetID();
+        }else
+        {
+            // build new coarse face.
+            face->SetID(cnTFace);
+            fmark[iFace] = cnTFace;
+            cnTFace ++;
+
+            faceList.push_back(face);
+        }
+    }
+    faceHash.clear();
+    vector<Geo_Face *>::iterator faceIter;
+    for (faceIter = faceList.begin(); faceIter != faceList.end(); ++ faceIter)
+    {
+        delete (* faceIter);
+    }
+    faceList.clear();
+
+
+    // barea: total area between two cells, may be more than one face between two cells on coarse grid.
+    RDouble *barea = new RDouble[ cnTFace ];
+    for (int i = 0; i < cnTFace; ++ i)
+    {
+        barea[i] = 0.0;
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        barea[fmark[iFace]] += ns[iFace];
+    }
+
+    RDouble *ratio = new RDouble[nTotalFace];
+    int fno;
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = left_cell_of_face [iFace];
+        re = right_cell_of_face[iFace];
+        fno = fmark[iFace];
+
+        ratio[iFace] = pow((tarea[le] + tarea[re] - 2.0 * barea[fno]), 1.5) / (vol[le] + vol[re]);
+
+        virtualCellCenterX[iFace] = (vol[le] * xcc[le] + vol[re] * xcc[re]) / (vol[le] + vol[re]);
+        virtualCellCenterY[iFace] = (vol[le] * ycc[le] + vol[re] * ycc[re]) / (vol[le] + vol[re]);
+        virtualCellCenterZ[iFace] = (vol[le] * zcc[le] + vol[re] * zcc[re]) / (vol[le] + vol[re]);
+    }
+
+
+    delete [] barea;
+    delete [] tarea;
+
+    RDouble limitAngle = -90.0;
+    AspectRatioModifyBySkewness(ratio, virtualCellCenterX, virtualCellCenterY, virtualCellCenterZ, limitAngle);
+
+    typedef pair<RDouble,int> TRatioIndex;
+    typedef set<TRatioIndex,less<TRatioIndex> > Tset;
+
+    Tset myset;
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        myset.insert(TRatioIndex(ratio[iFace], iFace));
+    }
+
+    Tset::iterator curr = myset.begin();
+
+    typedef list<int> Tlist;
+    Tlist mylist;
+
+    bool * unMerged = new bool [nTotalCell];
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        unMerged[iCell] = true;
+    }
+
+    for (curr = myset.begin(); curr != myset.end(); ++ curr)
+    {
+        fno = (*curr).second;
+        le = left_cell_of_face[ fno ];
+        re = right_cell_of_face[ fno ];
+        if (unMerged[le] && unMerged[re] && ratio[fno] >= 0.0)
+        {
+            mylist.push_back(fno);
+            unMerged[le] = false;
+            unMerged[re] = false;
+        }
+    }
+
+    delete [] virtualCellCenterX;
+    delete [] virtualCellCenterY;
+    delete [] virtualCellCenterZ;
+
+    // now merging
+    int *cell2coarsegridcell = new int[ nTotalCell ];
+    fineGrid->SetCell2CoarseGridCell(cell2coarsegridcell);
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        cell2coarsegridcell[iCell] = - 1;
+    }
+
+    int cnTCell = 0;
+    Tlist::iterator lcurr;
+    for (lcurr = mylist.begin(); lcurr != mylist.end(); ++ lcurr)
+    {
+        fno =  * lcurr;
+        le = left_cell_of_face[ fno ];
+        re = right_cell_of_face[ fno ];
+        cell2coarsegridcell[le] = cnTCell;
+        cell2coarsegridcell[re] = cnTCell ++;
+    }
+
+    // some cells may not have been merged, merge them now
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        if(cell2coarsegridcell[iCell] == -1)
+        {
+            cell2coarsegridcell[iCell] = cnTCell ++;
+        }
+    }
+
+    delete [] ratio;
+    delete [] unMerged;
+    delete [] fmark;
+
+    coarseGrid = new UnstructGrid();
+    coarseGrid->InitGrid(new GridID(*fineGrid->GetGridID()), fineGridLevel + 1, fineGrid->GetDim(), UNSTRUCTGRID);
+
+    coarseGrid->SetNTotalCell(cnTCell);
+    int nTotalNode = fineGrid->GetNTotalNode();
+    coarseGrid->SetNTotalNode(nTotalNode);
+    RDouble *x, *y, *z;
+    RDouble * xx = fineGrid->GetX();
+    RDouble * yy = fineGrid->GetY();
+    RDouble * zz = fineGrid->GetZ();
+
+    x = new RDouble[ nTotalNode ];
+    y = new RDouble[ nTotalNode ];
+    z = new RDouble[ nTotalNode ];
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        x[iNode] = xx[iNode];
+        y[iNode] = yy[iNode];
+        z[iNode] = zz[iNode];
+    }
+    coarseGrid->SetX(x);
+    coarseGrid->SetY(y);
+    coarseGrid->SetZ(z);
+}
+
+LIB_EXPORT void Mesh_Agglomeration::CoarsenGridOncebyMGridgen()
+{
+    int nTotalFace = fineGrid->GetNTotalFace();
+    int nBoundFace = fineGrid->GetNBoundFace();
+    int nTotalCell = fineGrid->GetNTotalCell();
+    int *left_cell_of_face = fineGrid->GetLeftCellOfFace();
+
+    RDouble * vol = fineGrid->GetCellVolume();
+    RDouble * area= fineGrid->GetFaceArea();
+
+    //! bcArea: BC face area of each cell.
+    RDouble *bcArea = new RDouble [nTotalCell];
+    PHSPACE::SetField(bcArea, 0.0, nTotalCell);
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = left_cell_of_face[iFace];
+        bcArea[le] += area[iFace];
+    }
+
+    // now merging
+    const int NON_COARSED = -1;
+    int *cell2coarsegridcell = new int[ nTotalCell ];
+    fineGrid->SetCell2CoarseGridCell(cell2coarsegridcell);
+    PHSPACE::SetField(cell2coarsegridcell, NON_COARSED, nTotalCell);
+    
+    //! From the view of graph theory, each face connection is defined by two neighbor cells.
+    //! so, number of connection equal to the two times of interior faces.
+    int nConnection = 2 * (nTotalFace - nBoundFace);
+
+    //! Adjacent connection of cells, using CSR format which is same to METIS. 
+    idx_t *xadj   = new idx_t[nTotalCell + 1];
+    idx_t *adjncy = new idx_t[nConnection];
+    Get_Xadj_Adjncy(fineGrid, xadj, adjncy, 0, 0);
+
+    RDouble *adjncywgt = new RDouble [nConnection];
+    Get_Xadj_Adjncy_Weight(fineGrid, xadj, adjncy, adjncywgt);
+
+    //! Convert the metis type to mgrid type.
+    idxtype *xadjNew   = new idxtype[nTotalCell + 1];
+    idxtype *adjncyNew = new idxtype[nConnection];
+    for (int iCell = 0; iCell < nTotalCell + 1; ++ iCell)
+    {
+        xadjNew[iCell] = static_cast<idxtype>(xadj[iCell]);
+    }
+    for (int iFace = 0; iFace < nConnection; ++ iFace)
+    {
+        adjncyNew[iFace] = static_cast<idxtype>(adjncy[iFace]);
+    }
+    delete []xadj;
+    delete []adjncy;
+
+    int nDim = PHSPACE::GetDim();
+    int minCoarseCellNumber = 1;
+    int maxCoarseCellNumber = 6;
+    if(nDim == PHSPACE::THREE_D)
+    {
+        minCoarseCellNumber = 4;
+        maxCoarseCellNumber = 10;
+    }
+
+    int options[4] = {4, 6, 0, nDim};
+    int nmove, nparts;
+    MGridGen(nTotalCell, xadjNew, vol, bcArea, adjncyNew, adjncywgt, minCoarseCellNumber, maxCoarseCellNumber,
+        options, &nmove, &nparts, cell2coarsegridcell);
+
+    //! For better grid quality in parallel,
+    //! ParMGridgen should be used in future, then, the parMetis should be followed.
+    //! For now, the serial version of mgridgen is used even in parallel.
+
+    delete []xadjNew;
+    delete []adjncyNew;   
+    delete []adjncywgt; 
+    delete []bcArea;
+
+    //! Now, construct the basic geometry information of coarse grid.
+    int cnTCell = nparts;
+
+    coarseGrid = new UnstructGrid();
+    coarseGrid->InitGrid(new GridID(*fineGrid->GetGridID()), fineGridLevel + 1, fineGrid->GetDim(), UNSTRUCTGRID);
+
+    coarseGrid->SetNTotalCell(cnTCell);
+    int nTotalNode = fineGrid->GetNTotalNode();
+    coarseGrid->SetNTotalNode(nTotalNode);
+    RDouble *x, *y, *z;
+    RDouble * xx = fineGrid->GetX();
+    RDouble * yy = fineGrid->GetY();
+    RDouble * zz = fineGrid->GetZ();
+
+    x = new RDouble[ nTotalNode ];
+    y = new RDouble[ nTotalNode ];
+    z = new RDouble[ nTotalNode ];
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        x[iNode] = xx[iNode];
+        y[iNode] = yy[iNode];
+        z[iNode] = zz[iNode];
+    }
+    coarseGrid->SetX(x);
+    coarseGrid->SetY(y);
+    coarseGrid->SetZ(z);
+}
+
+
+//global agglomeration method used to coarsen the grid to generate cell2coarsegridcell only
+LIB_EXPORT void Mesh_Agglomeration::CoarsenGridOnceWithoutSkewnessLimit()
+{
+    int nTotalFace = fineGrid->GetNTotalFace();
+    int nBoundFace = fineGrid->GetNBoundFace();
+    int nTotalCell = fineGrid->GetNTotalCell();
+    int *left_cell_of_face = fineGrid->GetLeftCellOfFace();
+    int *right_cell_of_face = fineGrid->GetRightCellOfFace();
+
+    RDouble * vol = fineGrid->GetCellVolume();
+    RDouble * ns  = fineGrid->GetFaceArea();
+
+    int le = 0, re = 0;
+
+    RDouble *tarea = new RDouble[nTotalCell];   // total area of each cell
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        tarea[iCell] = 0.0;
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = left_cell_of_face[iFace];
+        tarea[le] += ns[iFace];
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = left_cell_of_face [iFace];
+        re = right_cell_of_face[iFace];
+        tarea[le] += ns[iFace];
+        tarea[re] += ns[iFace];
+    }
+
+    int *fmark = new int[nTotalFace];
+    SetField(fmark, -1, nTotalFace);
+    int cnTFace = 0;
+
+    //! Prepare the inner-faces that have same left&&right cell, on coarse grid.
+    //! fmark: mapping face on fine grid to face on coarse grid.
+    //! fmark = -1: the two neighbor cells would not been agglomerated.
+    using namespace GRIDER_SPACE;
+    int nInteriorFace = nTotalFace - nBoundFace;
+    FaceHash faceHash;
+    vector<Geo_Face *> faceList;
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = left_cell_of_face [iFace];
+        re = right_cell_of_face[iFace];
+
+        Geo_Face *face = new Geo_Face(le, re, iFace, nInteriorFace);
+
+        bool isFaceExist;
+
+        // Insert the node into the tetNode, which is a hash table.
+        int faceIndexinHash = faceHash.insert(face, isFaceExist) - 1;
+
+        // Push the node into node list of GRAdvanceFront.
+        if (isFaceExist)
+        {
+            // the coarse face have been built.
+            delete face;
+            face = faceHash[faceIndexinHash];
+            fmark[iFace] = face->GetID();
+        }
+        else
+        {
+            // build new coarse face.
+            face->SetID(cnTFace);
+            fmark[iFace] = cnTFace;
+            cnTFace ++;
+        }
+    }
+    faceHash.clear();
+    vector<Geo_Face *>::iterator faceIter;
+    for (faceIter = faceList.begin(); faceIter != faceList.end(); ++ faceIter)
+    {
+        delete (*faceIter);
+    }
+    faceList.clear();
+
+    // barea: total area between two cells, may be more than one face between two cells on coarse grid.
+    RDouble *barea = new RDouble[ cnTFace ];
+    for (int i = 0; i < cnTFace; ++ i)
+    {
+        barea[i] = 0.0;
+    }
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        barea[fmark[iFace]] += ns[iFace];
+    }
+
+    RDouble * ratio = new RDouble[nTotalFace];
+    int fno;
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = left_cell_of_face [iFace];
+        re = right_cell_of_face[iFace];
+        fno = fmark[iFace];
+        ratio[iFace] = pow((tarea[le] + tarea[re] - 2.0 * barea[fno]), 1.5) / (vol[le] + vol[re]);
+    }
+    delete [] barea;
+    delete [] tarea;
+
+    typedef pair<RDouble,int> TRatioIndex;
+    typedef set<TRatioIndex,less<TRatioIndex> > Tset;
+    Tset myset;
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        myset.insert(TRatioIndex(ratio[iFace], iFace));
+    }
+
+    Tset::iterator curr = myset.begin();
+    typedef list<int> Tlist;
+    Tlist mylist;
+    bool * unMerged = new bool [nTotalCell];
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        unMerged[iCell] = true;
+    }
+    for (curr = myset.begin(); curr != myset.end(); ++ curr)
+    {
+        fno = (*curr).second;
+        le = left_cell_of_face[ fno ];
+        re = right_cell_of_face[ fno ];
+        if (unMerged[le] && unMerged[re])
+        {
+            mylist.push_back(fno);
+            unMerged[le] = false;
+            unMerged[re] = false;
+        }
+    }
+
+    // now merging
+    int *cell2coarsegridcell = new int[ nTotalCell ];
+    fineGrid->SetCell2CoarseGridCell(cell2coarsegridcell);
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        cell2coarsegridcell[iCell] = - 1;
+    }
+
+    int cnTCell = 0;
+    Tlist::iterator lcurr;
+    for (lcurr = mylist.begin(); lcurr != mylist.end(); ++ lcurr)
+    {
+        fno =  * lcurr;
+        le = left_cell_of_face[ fno ];
+        re = right_cell_of_face[ fno ];
+        cell2coarsegridcell[le] = cnTCell;
+        cell2coarsegridcell[re] = cnTCell ++;
+    }
+
+    // some cells may not have been merged, merge them now
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        if(cell2coarsegridcell[iCell] == -1)
+        {
+            cell2coarsegridcell[iCell] = cnTCell ++;
+        }
+    }
+
+    delete [] ratio;
+    delete [] unMerged;
+    delete [] fmark;
+
+    coarseGrid = new UnstructGrid();
+    coarseGrid->InitGrid(new GridID(*fineGrid->GetGridID()), fineGridLevel + 1, fineGrid->GetDim(), UNSTRUCTGRID);
+
+    coarseGrid->SetNTotalCell(cnTCell);
+    int nTotalNode = fineGrid->GetNTotalNode();
+    coarseGrid->SetNTotalNode(nTotalNode);
+    RDouble *x, *y, *z;
+    RDouble * xx = fineGrid->GetX();
+    RDouble * yy = fineGrid->GetY();
+    RDouble * zz = fineGrid->GetZ();
+
+    x = new RDouble[ nTotalNode ];
+    y = new RDouble[ nTotalNode ];
+    z = new RDouble[ nTotalNode ];
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        x[iNode] = xx[iNode];
+        y[iNode] = yy[iNode];
+        z[iNode] = zz[iNode];
+    }
+    coarseGrid->SetX(x);
+    coarseGrid->SetY(y);
+    coarseGrid->SetZ(z);
+}
+
+
+void Mesh_Agglomeration::AspectRatioModifyBySkewness(RDouble *ratio, RDouble * xcc, RDouble * ycc, RDouble * zcc, const RDouble & limitAngle)
+{
+    int nTotalFace = fineGrid->GetNTotalFace();
+    int nBoundFace = fineGrid->GetNBoundFace();
+    int *left_cell_of_face = fineGrid->GetLeftCellOfFace();
+    int *right_cell_of_face = fineGrid->GetRightCellOfFace();
+
+    RDouble * xfc = fineGrid->GetFaceCenterX();
+    RDouble * yfc = fineGrid->GetFaceCenterY();
+    RDouble * zfc = fineGrid->GetFaceCenterZ();
+
+    RDouble * nxs  = fineGrid->GetFaceNormalX();
+    RDouble * nys  = fineGrid->GetFaceNormalY();
+    RDouble * nzs  = fineGrid->GetFaceNormalZ();
+
+    int * face_number_of_each_cell = fineGrid->GetFaceNumberOfEachCell();
+    int ** cell2face = fineGrid->GetCell2Face();
+
+    int LRCell[2];
+    RDouble dx, dy, dz, dist, dot;
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        LRCell[0] = left_cell_of_face[iFace];
+        LRCell[1] = right_cell_of_face[iFace];
+
+
+        RDouble minAngle = 100.0;
+        for (int iCell = 0; iCell < 2; ++ iCell)
+        {
+            int cellID = LRCell[iCell];
+
+            int nFace = face_number_of_each_cell[cellID];
+            for (int jFace = 0; jFace < nFace; ++ jFace)
+            {
+                int faceID = cell2face[cellID][jFace];
+                if(faceID == iFace) continue;
+
+                dx = xfc[faceID] - xcc[iFace];
+                dy = yfc[faceID] - ycc[iFace];
+                dz = zfc[faceID] - zcc[iFace];
+                dist  = DISTANCE(dx, dy, dz);
+                dot = (nxs[faceID] * dx + nys[faceID] * dy + nzs[faceID] * dz) / (dist + TINY);
+                if (dot >  1.0) dot =   1.0;
+                if (dot < -1.0) dot = - 1.0;
+
+                if(right_cell_of_face[faceID] == cellID)
+                {
+                    dot *= -1;
+                }
+
+                RDouble angle  = asin(dot) * 180.0 / PI;
+                minAngle = MIN(angle, minAngle);
+            }
+        }
+
+        RDouble factor = minAngle / 90.0;
+
+        factor = 1.0 - factor;
+
+        ratio[iFace] *= factor;
+
+        if(minAngle < limitAngle) ratio[iFace] = -1;
+    }
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/MultigridFactory.cpp b/API/Geometry/src/MultigridFactory.cpp
new file mode 100644
index 0000000..8e5ce07
--- /dev/null
+++ b/API/Geometry/src/MultigridFactory.cpp
@@ -0,0 +1,2257 @@
+#include <cmath>
+#include "OversetGridFactory.h"
+#include "Geo_MultiGridInfo_Struct.h"
+#include "Geo_SimpleBC.h"
+#include "MultigridFactory.h"
+#include "Geo_NodeTopo_Struct.h"
+#include "Geo_FaceMetrics_Struct.h"
+#include "Geo_CellMetrics_Struct.h"
+#include "Geo_DynamicGridMetrics_Struct.h"
+#include "Geo_OversetGridTopo_Struct.h"
+#include "TK_Exit.h"
+#include "Geo_StructBC.h"
+#include "Geo_Interface.h"
+#include "Constants.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+PHSurface::PHSurface(Range I, Range J, Range K)
+{
+    ist = I.first();
+    jst = J.first();
+    kst = K.first();
+
+    ni = I.length();
+    nj = J.length();
+    nk = K.length();
+
+    np = ni * nj * nk;
+    data = new int [np];
+}
+
+PHSurface::~PHSurface()
+{
+    delete [] data;
+    data = NULL;
+}
+
+int & PHSurface::operator()(int i, int j, int k)
+{
+    return data[ni * nj * (k - kst) + ni * (j - jst) + (i - ist)];
+}
+
+int * PHSurface::GetData()
+{
+    return data;
+}
+
+int PHSurface::GetNumberOfFaces()
+{
+    return np;
+}
+
+StructFace::StructFace(StructGrid * structGrid)
+{
+    this->structGrid                         = structGrid;
+
+    neighborZoneIndexContainer               = new vector< PHSurface * >(6, NULL);
+    neighborZoneLocalInterfaceIndexContainer = new vector< PHSurface * >(6, NULL);
+    localInterfaceIndexContainer             = new vector< PHSurface * >(6, NULL);
+    localBoundaryFaceIndexContainer          = new vector< PHSurface * >(6, NULL);
+
+    numberOfFaceElements.resize(6);
+
+    Init();
+
+    structFaceGroup = NULL;
+}
+
+StructFace::~StructFace()
+{
+    for (int m = 0; m < 6; ++ m)
+    {
+        delete (* neighborZoneIndexContainer)[m];
+        delete (* neighborZoneLocalInterfaceIndexContainer)[m];
+        delete (* localInterfaceIndexContainer)[m];
+        delete (* localBoundaryFaceIndexContainer)[m];
+    }
+    delete neighborZoneIndexContainer;               neighborZoneIndexContainer               = NULL;
+    delete neighborZoneLocalInterfaceIndexContainer; neighborZoneLocalInterfaceIndexContainer = NULL;
+    delete localInterfaceIndexContainer;             localInterfaceIndexContainer             = NULL;
+    delete localBoundaryFaceIndexContainer;          localBoundaryFaceIndexContainer          = NULL;
+}
+
+void StructFace::PaintSelf()
+{
+    const int GHOST_INDEX = -1;
+    StructBCSet *structBCSet = structGrid->GetStructBCSet();
+    
+    int iBoundaryFace = 0, iInterface = 0;
+    int nBCRegion = structBCSet->GetnBCRegion();
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC * bcRegion = structBCSet->GetBCRegion(iBCRegion);
+        
+        int fds = bcRegion->GetFaceDirection();
+        int fns = bcRegion->GetFaceLeftOrRightIndex();
+
+        int delta = (fns + 1) / 2;
+        int mfds = fds * 2 + delta;
+
+        PHSurface &localBoundaryFace = this->GetLocalBoundaryFaceIndexContainer(mfds);
+        PHSurface &localInterface    = this->GetLocalInterfaceIndexContainer(mfds);
+        vector< int > sst(3), sed(3);
+        for (int m = 0; m < 3; ++ m)
+        {
+            sst[m] = bcRegion->GetStartPoint(m);
+            sed[m] = bcRegion->GetEndPoint(m);
+        }
+
+        sst[fds] += delta;
+        sed[fds] += delta;
+
+        for (int k = sst[2]; k <= sed[2]; ++ k)
+        {
+            for (int j = sst[1]; j <= sed[1]; ++ j)
+            {
+                for (int i = sst[0]; i <= sed[0]; ++ i)
+                {
+                    localBoundaryFace(i, j, k) = iBoundaryFace;
+                    localInterface(i, j, k) = GHOST_INDEX;
+                    iBoundaryFace += 1;
+                }
+            }
+        }
+
+        int bc_type = bcRegion->GetBCType();
+
+        if (! IsInterface(bc_type)) continue;
+
+        int targetZoneIndex = bcRegion->GetTargetRegionBlock();
+        PHSurface & neighborZone = this->GetNeighborZoneIndexContainer(mfds);
+
+        for (int k = sst[2]; k <= sed[2]; ++ k)
+        {
+            for (int j = sst[1]; j <= sed[1]; ++ j)
+            {
+                for (int i = sst[0]; i <= sed[0]; ++ i)
+                {
+                    localInterface(i, j, k) = iInterface;
+                    neighborZone(i, j, k) = targetZoneIndex;
+                    iInterface += 1;
+                }
+            }
+        }
+    }
+
+    return;
+}
+
+void StructFace::PaintNeighbor()
+{
+    vector< int > ti(3), di(3);
+    StructBCSet * structBCSet = structGrid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC * bcRegion = structBCSet->GetBCRegion(iBCRegion);
+        int bc_type = bcRegion->GetBCType();
+        if (! IsInterface(bc_type)) continue;
+
+        int *st_map = bcRegion->GetStam();
+        int *rate   = bcRegion->GetRate();
+
+        int fds = bcRegion->GetFaceDirection();
+        int fns = bcRegion->GetFaceLeftOrRightIndex();
+
+        int ds = (fns + 1) / 2;
+        int ms = fds * 2 + ds;
+
+        vector< int > sst(3), sed(3);
+        for (int m = 0; m < 3; ++ m)
+        {
+            sst[m] = bcRegion->GetStartPoint(m);
+            sed[m] = bcRegion->GetEndPoint(m);
+        }
+
+        sst[fds] += ds;
+        sed[fds] += ds;
+
+        int fdt = bcRegion->GetFaceDirectionOfTargetBlock();
+        int fnt = bcRegion->GetFaceLeftOrRightIndexOfTargetBlock();
+
+        int dt = (fnt + 1) / 2;
+        int mt = fdt * 2 + dt;
+
+        vector< int > tst(3), ted(3);
+        for (int m = 0; m < 3; ++ m)
+        {
+            tst[m] = bcRegion->GetTargetStart(m);
+            ted[m] = bcRegion->GetTargetEnd(m);
+        }
+
+        tst[fdt] += dt;
+        ted[fdt] += dt;
+
+        int targetZoneIndex = bcRegion->GetTargetRegionBlock();
+        StructFace * neighbor = GetStructFaceGroup(targetZoneIndex);
+        PHSurface & lid = neighbor->GetLocalInterfaceIndexContainer(mt);
+        PHSurface & nid = this->GetNeighborZoneLocalInterfaceIndexContainer(ms);
+        
+        for (int k = sst[2]; k <= sed[2]; ++ k)
+        {
+            di[2] = k - sst[2];
+            for (int j = sst[1]; j <= sed[1]; ++ j)
+            {
+                di[1] = j - sst[1];
+                for (int i = sst[0]; i <= sed[0]; ++ i)
+                {
+                    di[0] = i - sst[0];
+                    for (int m = 0; m < 3; ++ m)
+                    {
+                        int n = st_map[m];
+                        ti[n] = (tst[n] + ted[n] + rate[m] * (tst[n] - ted[n])) / 2 + rate[m] * di[m];
+                    }
+                    nid(i, j, k) = lid(ti[0], ti[1], ti[2]);
+                }
+            }
+        }
+    }
+
+    return;
+}
+
+int StructFace::ComputeNumberOfInterfaces()
+{
+    const int GHOST_INDEX = -1;
+
+    int numberOfInterfaces = 0;
+    for (int m = 0; m < 6; ++ m)
+    {
+        PHSurface & localInterface = GetLocalInterfaceIndexContainer(m);
+
+        int * data = localInterface.GetData();
+
+        int numberOfElements = localInterface.GetNumberOfFaces();
+ 
+        for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+        {
+            if (data[iElement] == GHOST_INDEX) continue;
+
+            numberOfInterfaces += 1;
+        }
+    }
+
+    return numberOfInterfaces;
+}
+
+void StructFace::CollectInterfaceInformation(InterfaceInfo * interfaceInformation)
+{
+    if (!interfaceInformation) return;
+
+    const int GHOST_INDEX = -1;
+
+    int * neighborZoneIndexContainer                 = interfaceInformation->GetInterFace2ZoneID();
+    int * neighborZoneLocalInterfaceIndexContainer   = interfaceInformation->GetInterFace2InterFaceID();
+    int * localInterfaceToBoundaryFaceIndexesMapping = interfaceInformation->GetInterFace2BoundaryFace();
+
+    for (int m = 0; m < 6; ++ m)
+    {
+        int * sa = this->GetNeighborZoneIndex(m);
+        int * sb = this->GetNeighborZoneLocalInterfaceIndex(m);
+        int * sc = this->GetLocalInterfaceIndex(m);
+        int * sd = this->GetLocalBoundaryFaceIndex(m);
+
+        int numberOfElements = numberOfFaceElements[m];
+        for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+        {
+            if (sc[iElement] == GHOST_INDEX) continue;
+            
+            int jZone           = sa[iElement];
+            int jLocalInterface = sb[iElement];
+            int iLocalInterface = sc[iElement];
+            int iBoundaryFace   = sd[iElement];
+            
+            neighborZoneIndexContainer[iLocalInterface]                 = jZone;
+            neighborZoneLocalInterfaceIndexContainer[iLocalInterface]   = jLocalInterface;
+            localInterfaceToBoundaryFaceIndexesMapping[iLocalInterface] = iBoundaryFace;
+        }
+    }
+
+    return;
+}
+
+void StructFace::Init()
+{
+    this->ni = structGrid->GetNI();
+    this->nj = structGrid->GetNJ();
+    this->nk = structGrid->GetNK();
+
+    numberOfFaceElements[0] = (nj - 1) * (nk - 1); numberOfFaceElements[1] = (nj - 1) * (nk - 1);
+    numberOfFaceElements[2] = (ni - 1) * (nk - 1); numberOfFaceElements[3] = (ni - 1) * (nk - 1);
+    numberOfFaceElements[4] = (ni - 1) * (nj - 1); numberOfFaceElements[5] = (ni - 1) * (nj - 1);
+
+    IST.setRange(1, 1); ISE.setRange(1, ni - 1); IED.setRange(ni, ni);
+    JST.setRange(1, 1); JSE.setRange(1, nj - 1); JED.setRange(nj, nj);
+    KST.setRange(1, 1); KSE.setRange(1, nk - 1); KED.setRange(nk, nk);
+
+    GenerateSubspace(neighborZoneIndexContainer);
+    GenerateSubspace(neighborZoneLocalInterfaceIndexContainer);
+    GenerateSubspace(localInterfaceIndexContainer);
+    GenerateSubspace(localBoundaryFaceIndexContainer);
+
+    return;
+}
+
+void StructFace::GenerateSubspace(vector< PHSurface * > * micro)
+{
+    vector< PHSurface * > & smile = * micro;
+
+    smile[0] = new PHSurface(IST, JSE, KSE);
+    smile[1] = new PHSurface(IED, JSE, KSE);
+
+    smile[2] = new PHSurface(ISE, JST, KSE);
+    smile[3] = new PHSurface(ISE, JED, KSE);
+
+    smile[4] = new PHSurface(ISE, JSE, KST);
+    smile[5] = new PHSurface(ISE, JSE, KED);
+
+    return;
+}
+
+MultigridManager::MultigridManager(Grid ** OrdinaryGrid, int isOverset, int globalBlockNumber)
+{
+    this->OrdinaryGrid      = OrdinaryGrid;
+    this->isOverset         = isOverset;
+    this->globalBlockNumber = globalBlockNumber;
+}
+
+MultigridManager::~MultigridManager()
+{
+
+}
+
+void MultigridManager::Run()
+{
+    if(!isOverset) return;
+
+    GenerateLinkStructure();
+
+    GenerateHoleStructure();
+
+    return;
+}
+
+void MultigridManager::GenerateGlobalBlockSpace()
+{
+    startCenterLabel.resize(globalBlockNumber);
+    iCenterDimension.resize(globalBlockNumber);
+    jCenterDimension.resize(globalBlockNumber);
+    kCenterDimension.resize(globalBlockNumber);
+}
+
+void MultigridManager::GenerateGlobalCellLinkStructure()
+{
+    ReadGridCoordinate();
+    GridExtend();
+}
+
+void MultigridManager::GridExtend()
+{
+    ComputeCellCenter();
+    FaceExtend();
+    PrismLineExtend();
+    CornerExtend();
+}
+
+void MultigridManager::ComputeCellCenter()
+{
+    const RDouble SMALLTmp = -1.e9, EIGHTH = 0.125;
+    int np0, np1, np2, np3, np4, np5, np6, np7;
+
+    for(int iCenter = 0; iCenter < globalCenterNumber; ++ iCenter)
+    {
+        cellCenterX[ iCenter ] = SMALLTmp;
+        cellCenterY[ iCenter ] = SMALLTmp;
+        cellCenterZ[ iCenter ] = SMALLTmp;
+    }
+
+    for(int iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        for(int k = 1; k < kDimension[ iBlock ]; ++ k)
+        {
+            for(int j = 1; j < jDimension[ iBlock ]; ++ j)
+            {
+                for(int i = 1; i < iDimension[ iBlock ]; ++ i)
+                {
+                    np0 = startPointLabel[ iBlock ]+jDimension[ iBlock ]*iDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+                    np1 = startPointLabel[ iBlock ]+jDimension[ iBlock ]*iDimension[ iBlock ]*k+iDimension[ iBlock ]*j+(i-1);
+                    np2 = startPointLabel[ iBlock ]+jDimension[ iBlock ]*iDimension[ iBlock ]*k+iDimension[ iBlock ]*(j-1)+i;
+                    np3 = startPointLabel[ iBlock ]+jDimension[ iBlock ]*iDimension[ iBlock ]*(k-1)+iDimension[ iBlock ]*j+i;
+                    np4 = startPointLabel[ iBlock ]+jDimension[ iBlock ]*iDimension[ iBlock ]*k+iDimension[ iBlock ]*(j-1)+(i-1);
+                    np5 = startPointLabel[ iBlock ]+jDimension[ iBlock ]*iDimension[ iBlock ]*(k-1)+iDimension[ iBlock ]*j+(i-1);
+                    np6 = startPointLabel[ iBlock ]+jDimension[ iBlock ]*iDimension[ iBlock ]*(k-1)+iDimension[ iBlock ]*(j-1)+i;
+                    np7 = startPointLabel[ iBlock ]+jDimension[ iBlock ]*iDimension[ iBlock ]*(k-1)+iDimension[ iBlock ]*(j-1)+(i-1);
+                    
+                    int iCenter = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+                    cellCenterX[ iCenter ] = EIGHTH*(coordinateX[ np0 ]+coordinateX[ np1 ]+coordinateX[ np2 ]+coordinateX[ np3 ]+coordinateX[ np4 ]+coordinateX[ np5 ]+coordinateX[ np6 ]+coordinateX[ np7 ]);
+                    cellCenterY[ iCenter ] = EIGHTH*(coordinateY[ np0 ]+coordinateY[ np1 ]+coordinateY[ np2 ]+coordinateY[ np3 ]+coordinateY[ np4 ]+coordinateY[ np5 ]+coordinateY[ np6 ]+coordinateY[ np7 ]);
+                    cellCenterZ[ iCenter ] = EIGHTH*(coordinateZ[ np0 ]+coordinateZ[ np1 ]+coordinateZ[ np2 ]+coordinateZ[ np3 ]+coordinateZ[ np4 ]+coordinateZ[ np5 ]+coordinateZ[ np6 ]+coordinateZ[ np7 ]);
+                
+                    characterPoint[ iCenter ] = np0;
+                }
+            }
+        }
+    }
+}
+
+void MultigridManager::FaceExtend()
+{
+    int iBlock, i, j, k, ic, jc, kc, nPointExtend, nPointCorner;
+    int nPointPatch, nBlockPatch, iPatch, jPatch, kPatch, nPointTarget;
+
+    for(iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        for(k = 1; k < kDimension[ iBlock ]; ++ k)
+        {
+            for(j = 1; j < jDimension[ iBlock ]; ++ j)
+            {
+                i = 1;
+                ic = 0;
+                nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+ic;
+                nPointCorner = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+                if(patchIPoint[ nPointCorner ] >= 0)
+                {
+                    nPointPatch = patchIPoint[ nPointCorner ];
+                    nBlockPatch = blockLocation[ nPointPatch ];
+                    iPatch = iLocation[ nPointPatch ];
+                    jPatch = jLocation[ nPointPatch ];
+                    kPatch = kLocation[ nPointPatch ];
+                    nPointTarget = startCenterLabel[ nBlockPatch ]+iCenterDimension[ nBlockPatch ]*jCenterDimension[ nBlockPatch ]*kPatch+iCenterDimension[ nBlockPatch ]*jPatch+iPatch;
+                    characterPoint[ nPointExtend ] = patchIPoint[ nPointCorner ];
+                }
+                else
+                {
+                    nPointTarget = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+                    characterPoint[ nPointExtend ] = nPointCorner;
+                }
+                cellCenterX[ nPointExtend ] = cellCenterX[ nPointTarget ];
+                cellCenterY[ nPointExtend ] = cellCenterY[ nPointTarget ];
+                cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointTarget ];
+
+                i  = iCenterDimension[ iBlock ]-2;
+                ic = iCenterDimension[ iBlock ]-1;
+                
+                nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+ic;
+                nPointCorner = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+                if(patchIPoint[ nPointCorner ] >= 0)
+                {
+                    nPointPatch = patchIPoint[ nPointCorner ];
+                    nBlockPatch = blockLocation[ nPointPatch ];
+                    iPatch = iLocation[ nPointPatch ];
+                    jPatch = jLocation[ nPointPatch ];
+                    kPatch = kLocation[ nPointPatch ];
+                    nPointTarget = startCenterLabel[ nBlockPatch ]+iCenterDimension[ nBlockPatch ]*jCenterDimension[ nBlockPatch ]*kPatch+iCenterDimension[ nBlockPatch ]*jPatch+iPatch;
+                    characterPoint[ nPointExtend ] = patchIPoint[ nPointCorner ];
+                }
+                else
+                {
+                    nPointTarget = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+                    characterPoint[ nPointExtend ] = nPointCorner;
+                }
+                cellCenterX[ nPointExtend ] = cellCenterX[ nPointTarget ];
+                cellCenterY[ nPointExtend ] = cellCenterY[ nPointTarget ];
+                cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointTarget ];
+            }
+        }
+
+        for(i = 1; i < iDimension[ iBlock ]; ++ i)
+        {
+            for(k = 1; k < kDimension[ iBlock ]; ++ k)
+            {
+                j = 1;
+                jc = 0;
+
+                nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*jc+i;
+                nPointCorner = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+
+                if(patchJPoint[ nPointCorner ] >= 0)
+                {
+                    nPointPatch = patchJPoint[ nPointCorner ];
+                    nBlockPatch = blockLocation[ nPointPatch ];
+                    iPatch = iLocation[ nPointPatch ];
+                    jPatch = jLocation[ nPointPatch ];
+                    kPatch = kLocation[ nPointPatch ];
+                    nPointTarget = startCenterLabel[ nBlockPatch ]+iCenterDimension[ nBlockPatch ]*jCenterDimension[ nBlockPatch ]*kPatch+iCenterDimension[ nBlockPatch ]*jPatch+iPatch;
+                    characterPoint[ nPointExtend ] = patchJPoint[ nPointCorner ];
+                }
+                else
+                {
+                    nPointTarget = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+                    characterPoint[ nPointExtend ] = nPointCorner;
+                }
+                cellCenterX[ nPointExtend ] = cellCenterX[ nPointTarget ];
+                cellCenterY[ nPointExtend ] = cellCenterY[ nPointTarget ];
+                cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointTarget ];
+
+                j  = jCenterDimension[ iBlock ]-2;
+                jc = jCenterDimension[ iBlock ]-1;
+
+                nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*jc+i;
+                nPointCorner = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+
+                if(patchJPoint[ nPointCorner ] >= 0)
+                {
+                    nPointPatch = patchJPoint[ nPointCorner ];
+                    nBlockPatch = blockLocation[ nPointPatch ];
+                    iPatch = iLocation[ nPointPatch ];
+                    jPatch = jLocation[ nPointPatch ];
+                    kPatch = kLocation[ nPointPatch ];
+                    nPointTarget = startCenterLabel[ nBlockPatch ]+iCenterDimension[ nBlockPatch ]*jCenterDimension[ nBlockPatch ]*kPatch+iCenterDimension[ nBlockPatch ]*jPatch+iPatch;
+                    characterPoint[ nPointExtend ] = patchJPoint[ nPointCorner ];
+                }
+                else
+                {
+                    nPointTarget = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+                    characterPoint[ nPointExtend ] = nPointCorner;
+                }
+                cellCenterX[ nPointExtend ] = cellCenterX[ nPointTarget ];
+                cellCenterY[ nPointExtend ] = cellCenterY[ nPointTarget ];
+                cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointTarget ];
+            }
+        }
+
+        for(j = 1; j < jDimension[ iBlock ]; ++ j)
+        {
+            for(i = 1; i < iDimension[ iBlock ]; ++ i)
+            {
+                k = 1;
+                kc = 0;
+
+                nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*kc+iCenterDimension[ iBlock ]*j+i;
+                nPointCorner = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+
+                if(patchKPoint[ nPointCorner ] >= 0)
+                {
+                    nPointPatch = patchKPoint[ nPointCorner ];
+                    nBlockPatch = blockLocation[ nPointPatch ];
+                    iPatch = iLocation[ nPointPatch ];
+                    jPatch = jLocation[ nPointPatch ];
+                    kPatch = kLocation[ nPointPatch ];
+                    nPointTarget = startCenterLabel[ nBlockPatch ]+iCenterDimension[ nBlockPatch ]*jCenterDimension[ nBlockPatch ]*kPatch+iCenterDimension[ nBlockPatch ]*jPatch+iPatch;
+                    characterPoint[ nPointExtend ] = patchKPoint[ nPointCorner ];
+                }
+                else
+                {
+                    nPointTarget = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+                    characterPoint[ nPointExtend ] = nPointCorner;
+                }
+                cellCenterX[ nPointExtend ] = cellCenterX[ nPointTarget ];
+                cellCenterY[ nPointExtend ] = cellCenterY[ nPointTarget ];
+                cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointTarget ];
+
+                k  = kCenterDimension[ iBlock ]-2;
+                kc = kCenterDimension[ iBlock ]-1;
+
+                nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*kc+iCenterDimension[ iBlock ]*j+i;
+                nPointCorner = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+
+                if(patchKPoint[ nPointCorner ] >= 0)
+                {
+                    nPointPatch = patchKPoint[ nPointCorner ];
+                    nBlockPatch = blockLocation[ nPointPatch ];
+                    iPatch = iLocation[ nPointPatch ];
+                    jPatch = jLocation[ nPointPatch ];
+                    kPatch = kLocation[ nPointPatch ];
+                    nPointTarget = startCenterLabel[ nBlockPatch ]+iCenterDimension[ nBlockPatch ]*jCenterDimension[ nBlockPatch ]*kPatch+iCenterDimension[ nBlockPatch ]*jPatch+iPatch;
+                    characterPoint[ nPointExtend ] = patchKPoint[ nPointCorner ];
+                }
+                else
+                {
+                    nPointTarget = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+                    characterPoint[ nPointExtend ] = nPointCorner;
+                }
+                cellCenterX[ nPointExtend ] = cellCenterX[ nPointTarget ];
+                cellCenterY[ nPointExtend ] = cellCenterY[ nPointTarget ];
+                cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointTarget ];
+            }
+        }
+    }
+}
+
+void MultigridManager::PrismLineExtend()
+{
+    RDouble xx,yy,zz;
+    int iBlock, i, j, k, nPointer, iC, jC, kC, nPointExtend, nPointCorner;
+    int nFlap, nPointBy, nBlock, iPoint, jPoint, kPoint, nPointG;
+    int iCounter = 0;
+
+    for(iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        //! 1.
+        for(k = 1; k < kDimension[ iBlock ]; ++ k)
+        {
+            j = 1;
+            i = 1;
+            nPointer = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+            iC = 0;
+            jC = 0;
+            kC = k;
+            nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*kC+iCenterDimension[ iBlock ]*jC+iC;
+            nPointCorner = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+            cellCenterX[ nPointExtend ] = cellCenterX[ nPointCorner ];
+            cellCenterY[ nPointExtend ] = cellCenterY[ nPointCorner ];
+            cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointCorner ];
+            characterPoint[ nPointExtend ] = characterPoint[ nPointCorner ];
+            if(patchIPoint[ nPointer ] >= 0 && patchJPoint[ nPointer ] >= 0)
+            {
+                nFlap = 0;
+                GetCrossPoint(patchIPoint[ nPointer ], patchJPoint[ nPointer ], cellCenterX[ nPointCorner ], cellCenterY[ nPointCorner ], cellCenterZ[ nPointCorner ], xx, yy, zz, nFlap, nPointBy, nBlock, iPoint, jPoint, kPoint);
+                if(nFlap == 1)
+                {
+                    cellCenterX[ nPointExtend ] = xx;
+                    cellCenterY[ nPointExtend ] = yy;
+                    cellCenterZ[ nPointExtend ] = zz;
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointBy ];
+                }
+                else
+                {
+                    nPointG = startCenterLabel[ nBlock ]+iCenterDimension[ nBlock ]*jCenterDimension[ nBlock ]*kPoint+iCenterDimension[ nBlock ]*jPoint+iPoint;
+                    cellCenterX[ nPointExtend ] = cellCenterX[ nPointG ];
+                    cellCenterY[ nPointExtend ] = cellCenterY[ nPointG ];
+                    cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointG ];
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointG ];
+                    iCounter += 1;
+                }
+            }
+        }
+
+        //! 2.
+        for(k = 1; k < kDimension[ iBlock ]; ++ k)
+        {
+            i = 1;
+            j = jDimension[ iBlock ]-1;
+            nPointer = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+            iC = 0;
+            jC = jCenterDimension[ iBlock ]-1;
+            kC = k;
+            nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*kC+iCenterDimension[ iBlock ]*jC+iC;
+            nPointCorner = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+            cellCenterX[ nPointExtend ] = cellCenterX[ nPointCorner ];
+            cellCenterY[ nPointExtend ] = cellCenterY[ nPointCorner ];
+            cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointCorner ];
+            characterPoint[ nPointExtend ] = characterPoint[ nPointCorner ];
+            if(patchIPoint[ nPointer ] >= 0 && patchJPoint[ nPointer ] >= 0)
+            {
+                nFlap = 0;
+                GetCrossPoint(patchIPoint[ nPointer ], patchJPoint[ nPointer ], cellCenterX[ nPointCorner ], cellCenterY[ nPointCorner ], cellCenterZ[ nPointCorner ], xx, yy, zz, nFlap, nPointBy, nBlock, iPoint, jPoint, kPoint);
+                if(nFlap == 1)
+                {
+                    cellCenterX[ nPointExtend ] = xx;
+                    cellCenterY[ nPointExtend ] = yy;
+                    cellCenterZ[ nPointExtend ] = zz;
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointBy ];
+                }
+                else
+                {
+                    nPointG = startCenterLabel[ nBlock ]+iCenterDimension[ nBlock ]*jCenterDimension[ nBlock ]*kPoint+iCenterDimension[ nBlock ]*jPoint+iPoint;
+                    cellCenterX[ nPointExtend ] = cellCenterX[ nPointG ];
+                    cellCenterY[ nPointExtend ] = cellCenterY[ nPointG ];
+                    cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointG ];
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointG ];
+                    iCounter += 1;
+                }
+            }
+        }
+
+        //! 3.
+        for(k = 1; k < kDimension[ iBlock ]; ++ k)
+        {
+            i = iDimension[ iBlock ]-1;
+            j = 1;
+            nPointer = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+            iC = iCenterDimension[ iBlock ]-1;
+            jC = 0;
+            kC = k;
+            nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*kC+iCenterDimension[ iBlock ]*jC+iC;
+            nPointCorner = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+            cellCenterX[ nPointExtend ] = cellCenterX[ nPointCorner ];
+            cellCenterY[ nPointExtend ] = cellCenterY[ nPointCorner ];
+            cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointCorner ];
+            characterPoint[ nPointExtend ] = characterPoint[ nPointCorner ];
+            if(patchIPoint[ nPointer ] >= 0 && patchJPoint[ nPointer ] >= 0)
+            {
+                nFlap = 0;
+                GetCrossPoint(patchIPoint[ nPointer ], patchJPoint[ nPointer ], cellCenterX[ nPointCorner ], cellCenterY[ nPointCorner ], cellCenterZ[ nPointCorner ], xx, yy, zz, nFlap, nPointBy, nBlock, iPoint, jPoint, kPoint);
+                if(nFlap == 1)
+                {
+                    cellCenterX[ nPointExtend ] = xx;
+                    cellCenterY[ nPointExtend ] = yy;
+                    cellCenterZ[ nPointExtend ] = zz;
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointBy ];
+                }
+                else
+                {
+                    nPointG = startCenterLabel[ nBlock ]+iCenterDimension[ nBlock ]*jCenterDimension[ nBlock ]*kPoint+iCenterDimension[ nBlock ]*jPoint+iPoint;
+                    cellCenterX[ nPointExtend ] = cellCenterX[ nPointG ];
+                    cellCenterY[ nPointExtend ] = cellCenterY[ nPointG ];
+                    cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointG ];
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointG ];
+                    iCounter += 1;
+                }
+            }
+        }
+
+        //! 4.
+        for(k = 1; k < kDimension[ iBlock ]; ++ k)
+        {
+            i = iDimension[ iBlock ]-1;
+            j = jDimension[ iBlock ]-1;
+            nPointer = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+            iC = iCenterDimension[ iBlock ]-1;
+            jC = jCenterDimension[ iBlock ]-1;
+            kC = k;
+            nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*kC+iCenterDimension[ iBlock ]*jC+iC;
+            nPointCorner = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+            cellCenterX[ nPointExtend ] = cellCenterX[ nPointCorner ];
+            cellCenterY[ nPointExtend ] = cellCenterY[ nPointCorner ];
+            cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointCorner ];
+            characterPoint[ nPointExtend ] = characterPoint[ nPointCorner ];
+            if(patchIPoint[ nPointer ] >= 0 && patchJPoint[ nPointer ] >= 0)
+            {
+                nFlap = 0;
+                GetCrossPoint(patchIPoint[ nPointer ], patchJPoint[ nPointer ], cellCenterX[ nPointCorner ], cellCenterY[ nPointCorner ], cellCenterZ[ nPointCorner ], xx, yy, zz, nFlap, nPointBy, nBlock, iPoint, jPoint, kPoint);
+                if(nFlap == 1)
+                {
+                    cellCenterX[ nPointExtend ] = xx;
+                    cellCenterY[ nPointExtend ] = yy;
+                    cellCenterZ[ nPointExtend ] = zz;
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointBy ];
+                }
+                else
+                {
+                    nPointG = startCenterLabel[ nBlock ]+iCenterDimension[ nBlock ]*jCenterDimension[ nBlock ]*kPoint+iCenterDimension[ nBlock ]*jPoint+iPoint;
+                    cellCenterX[ nPointExtend ] = cellCenterX[ nPointG ];
+                    cellCenterY[ nPointExtend ] = cellCenterY[ nPointG ];
+                    cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointG ];
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointG ];
+                    iCounter += 1;
+                }
+            }
+        }
+
+        //! 5.
+        for(j = 1; j < jDimension[ iBlock ]; ++ j)
+        {
+            i = 1;
+            k = 1;
+            nPointer = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+            iC = 0;
+            jC = j;
+            kC = 0;
+            nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*kC+iCenterDimension[ iBlock ]*jC+iC;
+            nPointCorner = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+            cellCenterX[ nPointExtend ] = cellCenterX[ nPointCorner ];
+            cellCenterY[ nPointExtend ] = cellCenterY[ nPointCorner ];
+            cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointCorner ];
+            characterPoint[ nPointExtend ] = characterPoint[ nPointCorner ];
+            if(patchIPoint[ nPointer ] >= 0 && patchKPoint[ nPointer ] >= 0)
+            {
+                nFlap = 0;
+                GetCrossPoint(patchIPoint[ nPointer ], patchKPoint[ nPointer ], cellCenterX[ nPointCorner ], cellCenterY[ nPointCorner ], cellCenterZ[ nPointCorner ], xx, yy, zz, nFlap, nPointBy, nBlock, iPoint, jPoint, kPoint);
+                if(nFlap == 1)
+                {
+                    cellCenterX[ nPointExtend ] = xx;
+                    cellCenterY[ nPointExtend ] = yy;
+                    cellCenterZ[ nPointExtend ] = zz;
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointBy ];
+                }
+                else
+                {
+                    nPointG = startCenterLabel[ nBlock ]+iCenterDimension[ nBlock ]*jCenterDimension[ nBlock ]*kPoint+iCenterDimension[ nBlock ]*jPoint+iPoint;
+                    cellCenterX[ nPointExtend ] = cellCenterX[ nPointG ];
+                    cellCenterY[ nPointExtend ] = cellCenterY[ nPointG ];
+                    cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointG ];
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointG ];
+                    iCounter += 1;
+                }
+            }
+        }
+
+        //! 6.
+        for(j = 1; j < jDimension[ iBlock ]; ++ j)
+        {
+            i = 1;
+            k = kDimension[ iBlock ]-1;
+            nPointer = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+            iC = 0;
+            jC = j;
+            kC = kCenterDimension[ iBlock ]-1;
+            nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*kC+iCenterDimension[ iBlock ]*jC+iC;
+            nPointCorner = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+            cellCenterX[ nPointExtend ] = cellCenterX[ nPointCorner ];
+            cellCenterY[ nPointExtend ] = cellCenterY[ nPointCorner ];
+            cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointCorner ];
+            characterPoint[ nPointExtend ] = characterPoint[ nPointCorner ];
+            if(patchIPoint[ nPointer ] >= 0 && patchKPoint[ nPointer ] >= 0)
+            {
+                nFlap = 0;
+                GetCrossPoint(patchIPoint[ nPointer ], patchKPoint[ nPointer ], cellCenterX[ nPointCorner ], cellCenterY[ nPointCorner ], cellCenterZ[ nPointCorner ], xx, yy, zz, nFlap, nPointBy, nBlock, iPoint, jPoint, kPoint);
+                if(nFlap == 1)
+                {
+                    cellCenterX[ nPointExtend ] = xx;
+                    cellCenterY[ nPointExtend ] = yy;
+                    cellCenterZ[ nPointExtend ] = zz;
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointBy ];
+                }
+                else
+                {
+                    nPointG = startCenterLabel[ nBlock ]+iCenterDimension[ nBlock ]*jCenterDimension[ nBlock ]*kPoint+iCenterDimension[ nBlock ]*jPoint+iPoint;
+                    cellCenterX[ nPointExtend ] = cellCenterX[ nPointG ];
+                    cellCenterY[ nPointExtend ] = cellCenterY[ nPointG ];
+                    cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointG ];
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointG ];
+                    iCounter += 1;
+                }
+            }
+        }
+
+        //! 7.
+        for(j = 1; j < jDimension[ iBlock ]; ++ j)
+        {
+            k = 1;
+            i = iDimension[ iBlock ]-1;
+            nPointer = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+            iC = iCenterDimension[ iBlock ]-1;
+            jC = j;
+            kC = 0;
+            nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*kC+iCenterDimension[ iBlock ]*jC+iC;
+            nPointCorner = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+            cellCenterX[ nPointExtend ] = cellCenterX[ nPointCorner ];
+            cellCenterY[ nPointExtend ] = cellCenterY[ nPointCorner ];
+            cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointCorner ];
+            characterPoint[ nPointExtend ] = characterPoint[ nPointCorner ];
+            if(patchIPoint[ nPointer ] >= 0 && patchKPoint[ nPointer ] >= 0)
+            {
+                nFlap = 0;
+                GetCrossPoint(patchIPoint[ nPointer ], patchKPoint[ nPointer ], cellCenterX[ nPointCorner ], cellCenterY[ nPointCorner ], cellCenterZ[ nPointCorner ], xx, yy, zz, nFlap, nPointBy, nBlock, iPoint, jPoint, kPoint);
+                if(nFlap == 1)
+                {
+                    cellCenterX[ nPointExtend ] = xx;
+                    cellCenterY[ nPointExtend ] = yy;
+                    cellCenterZ[ nPointExtend ] = zz;
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointBy ];
+                }
+                else
+                {
+                    nPointG = startCenterLabel[ nBlock ]+iCenterDimension[ nBlock ]*jCenterDimension[ nBlock ]*kPoint+iCenterDimension[ nBlock ]*jPoint+iPoint;
+                    cellCenterX[ nPointExtend ] = cellCenterX[ nPointG ];
+                    cellCenterY[ nPointExtend ] = cellCenterY[ nPointG ];
+                    cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointG ];
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointG ];
+                    iCounter += 1;
+                }
+            }
+        }
+        //! 8.
+        for(j = 1; j < jDimension[ iBlock ]; ++ j)
+        {
+            k = kDimension[ iBlock ]-1;
+            i = iDimension[ iBlock ]-1;
+            nPointer = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+            iC = iCenterDimension[ iBlock ]-1;
+            jC = j;
+            kC = kCenterDimension[ iBlock ]-1;
+            nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*kC+iCenterDimension[ iBlock ]*jC+iC;
+            nPointCorner = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+            cellCenterX[ nPointExtend ] = cellCenterX[ nPointCorner ];
+            cellCenterY[ nPointExtend ] = cellCenterY[ nPointCorner ];
+            cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointCorner ];
+            characterPoint[ nPointExtend ] = characterPoint[ nPointCorner ];
+            if(patchIPoint[ nPointer ] >= 0 && patchKPoint[ nPointer ] >= 0)
+            {
+                nFlap = 0;
+                GetCrossPoint(patchIPoint[ nPointer ], patchKPoint[ nPointer ], cellCenterX[ nPointCorner ], cellCenterY[ nPointCorner ], cellCenterZ[ nPointCorner ], xx, yy, zz, nFlap, nPointBy, nBlock, iPoint, jPoint, kPoint);
+                if(nFlap == 1)
+                {
+                    cellCenterX[ nPointExtend ] = xx;
+                    cellCenterY[ nPointExtend ] = yy;
+                    cellCenterZ[ nPointExtend ] = zz;
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointBy ];
+                }
+                else
+                {
+                    nPointG = startCenterLabel[ nBlock ]+iCenterDimension[ nBlock ]*jCenterDimension[ nBlock ]*kPoint+iCenterDimension[ nBlock ]*jPoint+iPoint;
+                    cellCenterX[ nPointExtend ] = cellCenterX[ nPointG ];
+                    cellCenterY[ nPointExtend ] = cellCenterY[ nPointG ];
+                    cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointG ];
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointG ];
+                    iCounter += 1;
+                }
+            }
+        }
+
+        //! 9.
+        for(i = 1; i < iDimension[ iBlock ]; ++ i)
+        {
+            k = kDimension[ iBlock ]-1;
+            j = jDimension[ iBlock ]-1;
+            nPointer = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+            iC = i;
+            jC = jCenterDimension[ iBlock ]-1;
+            kC = kCenterDimension[ iBlock ]-1;
+            nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*kC+iCenterDimension[ iBlock ]*jC+iC;
+            nPointCorner = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+            cellCenterX[ nPointExtend ] = cellCenterX[ nPointCorner ];
+            cellCenterY[ nPointExtend ] = cellCenterY[ nPointCorner ];
+            cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointCorner ];
+            characterPoint[ nPointExtend ] = characterPoint[ nPointCorner ];
+            if(patchJPoint[ nPointer ] >= 0 && patchKPoint[ nPointer ] >= 0)
+            {
+                nFlap = 0;
+                GetCrossPoint(patchJPoint[ nPointer ], patchKPoint[ nPointer ], cellCenterX[ nPointCorner ], cellCenterY[ nPointCorner ], cellCenterZ[ nPointCorner ], xx, yy, zz, nFlap, nPointBy, nBlock, iPoint, jPoint, kPoint);
+                if(nFlap == 1)
+                {
+                    cellCenterX[ nPointExtend ] = xx;
+                    cellCenterY[ nPointExtend ] = yy;
+                    cellCenterZ[ nPointExtend ] = zz;
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointBy ];
+                }
+                else
+                {
+                    nPointG = startCenterLabel[ nBlock ]+iCenterDimension[ nBlock ]*jCenterDimension[ nBlock ]*kPoint+iCenterDimension[ nBlock ]*jPoint+iPoint;
+                    cellCenterX[ nPointExtend ] = cellCenterX[ nPointG ];
+                    cellCenterY[ nPointExtend ] = cellCenterY[ nPointG ];
+                    cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointG ];
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointG ];
+                    iCounter += 1;
+                }
+            }
+        }
+
+        //! 10.
+        for(i = 1; i < iDimension[ iBlock ]; ++ i)
+        {
+            k = 1;
+            j = jDimension[ iBlock ]-1;
+            nPointer = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+            iC = i;
+            jC = jCenterDimension[ iBlock ]-1;
+            kC = 0;
+            nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*kC+iCenterDimension[ iBlock ]*jC+iC;
+            nPointCorner = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+            cellCenterX[ nPointExtend ] = cellCenterX[ nPointCorner ];
+            cellCenterY[ nPointExtend ] = cellCenterY[ nPointCorner ];
+            cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointCorner ];
+            characterPoint[ nPointExtend ] = characterPoint[ nPointCorner ];
+            if(patchJPoint[ nPointer ] >= 0 && patchKPoint[ nPointer ] >= 0)
+            {
+                nFlap = 0;
+                GetCrossPoint(patchJPoint[ nPointer ], patchKPoint[ nPointer ], cellCenterX[ nPointCorner ], cellCenterY[ nPointCorner ], cellCenterZ[ nPointCorner ], xx, yy, zz, nFlap, nPointBy, nBlock, iPoint, jPoint, kPoint);
+                if(nFlap == 1)
+                {
+                    cellCenterX[ nPointExtend ] = xx;
+                    cellCenterY[ nPointExtend ] = yy;
+                    cellCenterZ[ nPointExtend ] = zz;
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointBy ];
+                }
+                else
+                {
+                    nPointG = startCenterLabel[ nBlock ]+iCenterDimension[ nBlock ]*jCenterDimension[ nBlock ]*kPoint+iCenterDimension[ nBlock ]*jPoint+iPoint;
+                    cellCenterX[ nPointExtend ] = cellCenterX[ nPointG ];
+                    cellCenterY[ nPointExtend ] = cellCenterY[ nPointG ];
+                    cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointG ];
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointG ];
+                    iCounter += 1;
+                }
+            }
+        }
+
+        //! 11.
+        for(i = 1; i < iDimension[ iBlock ]; ++ i)
+        {
+            j = 1;
+            k = kDimension[ iBlock ]-1;
+            nPointer = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+            iC = i;
+            jC = 0;
+            kC = kCenterDimension[ iBlock ]-1;
+            nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*kC+iCenterDimension[ iBlock ]*jC+iC;
+            nPointCorner = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+            cellCenterX[ nPointExtend ] = cellCenterX[ nPointCorner ];
+            cellCenterY[ nPointExtend ] = cellCenterY[ nPointCorner ];
+            cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointCorner ];
+            characterPoint[ nPointExtend ] = characterPoint[ nPointCorner ];
+            if(patchJPoint[ nPointer ] >= 0 && patchKPoint[ nPointer ] >= 0)
+            {
+                nFlap = 0;
+                GetCrossPoint(patchJPoint[ nPointer ], patchKPoint[ nPointer ], cellCenterX[ nPointCorner ], cellCenterY[ nPointCorner ], cellCenterZ[ nPointCorner ], xx, yy, zz, nFlap, nPointBy, nBlock, iPoint, jPoint, kPoint);
+                if(nFlap == 1)
+                {
+                    cellCenterX[ nPointExtend ] = xx;
+                    cellCenterY[ nPointExtend ] = yy;
+                    cellCenterZ[ nPointExtend ] = zz;
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointBy ];
+                }
+                else
+                {
+                    nPointG = startCenterLabel[ nBlock ]+iCenterDimension[ nBlock ]*jCenterDimension[ nBlock ]*kPoint+iCenterDimension[ nBlock ]*jPoint+iPoint;
+                    cellCenterX[ nPointExtend ] = cellCenterX[ nPointG ];
+                    cellCenterY[ nPointExtend ] = cellCenterY[ nPointG ];
+                    cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointG ];
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointG ];
+                    iCounter += 1;
+                }
+            }
+        }
+
+        //! 12.
+        for(i = 1; i < iDimension[ iBlock ]; ++ i)
+        {
+            j = 1;
+            k = 1;
+            nPointer = startPointLabel[ iBlock ]+iDimension[ iBlock ]*jDimension[ iBlock ]*k+iDimension[ iBlock ]*j+i;
+            iC = i;
+            jC = 0;
+            kC = 0;
+            nPointExtend = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*kC+iCenterDimension[ iBlock ]*jC+iC;
+            nPointCorner = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+            cellCenterX[ nPointExtend ] = cellCenterX[ nPointCorner ];
+            cellCenterY[ nPointExtend ] = cellCenterY[ nPointCorner ];
+            cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointCorner ];
+            characterPoint[ nPointExtend ] = characterPoint[ nPointCorner ];
+            if(patchJPoint[ nPointer ] >= 0 && patchKPoint[ nPointer ] >= 0)
+            {
+                nFlap = 0;
+                GetCrossPoint(patchJPoint[ nPointer ], patchKPoint[ nPointer ], cellCenterX[ nPointCorner ], cellCenterY[ nPointCorner ], cellCenterZ[ nPointCorner ], xx, yy, zz, nFlap, nPointBy, nBlock, iPoint, jPoint, kPoint);
+                if(nFlap == 1)
+                {
+                    cellCenterX[ nPointExtend ] = xx;
+                    cellCenterY[ nPointExtend ] = yy;
+                    cellCenterZ[ nPointExtend ] = zz;
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointBy ];
+                }
+                else
+                {
+                    nPointG = startCenterLabel[ nBlock ]+iCenterDimension[ nBlock ]*jCenterDimension[ nBlock ]*kPoint+iCenterDimension[ nBlock ]*jPoint+iPoint;
+                    cellCenterX[ nPointExtend ] = cellCenterX[ nPointG ];
+                    cellCenterY[ nPointExtend ] = cellCenterY[ nPointG ];
+                    cellCenterZ[ nPointExtend ] = cellCenterZ[ nPointG ];
+                    characterPoint[ nPointExtend ] = characterPoint[ nPointG ];
+                    iCounter += 1;
+                }
+            }
+        }
+    }
+}
+
+void MultigridManager::GetCrossPoint(int mPatch, int nPatch, RDouble x, RDouble y, RDouble z, RDouble & xx, RDouble & yy, RDouble & zz, int & nFlap, int & nPointBy, int & nBlock, int & iPoint, int & jPoint, int & kPoint)
+{
+    const RDouble EPS = 1.e-4;
+    int iBym[ 6 ], jBym[ 6 ], kBym[ 6 ], nPointBym[ 6 ], iByn[ 6 ], jByn[ 6 ], kByn[ 6 ], nPointByn[ 6 ];
+    RDouble xBym[ 6 ], yBym[ 6 ], zBym[ 6 ], xByn[ 6 ], yByn[ 6 ], zByn[ 6 ];
+    RDouble dx, dy, dz, p, q, r, distance;
+    int mBlock, ipm, jpm, kpm;
+    mBlock = blockLocation[ mPatch ];
+    ipm = iLocation[ mPatch ];
+    jpm = jLocation[ mPatch ];
+    kpm = kLocation[ mPatch ];
+    nBlock = blockLocation[ nPatch ];
+    iPoint = iLocation[ nPatch ];
+    jPoint = jLocation[ nPatch ];
+    kPoint = kLocation[ nPatch ];
+
+    iBym[ 0 ] = ipm-1; iBym[ 1 ] = ipm+1;  iBym[ 2 ] = ipm;
+    jBym[ 0 ] = jpm;   jBym[ 1 ] = jpm;    jBym[ 2 ] = jpm-1;
+    kBym[ 0 ] = kpm;   kBym[ 1 ] = kpm;    kBym[ 2 ] = kpm;
+
+    iBym[ 3 ] = ipm;   iBym[ 4 ] = ipm;    iBym[ 5 ] = ipm;
+    jBym[ 3 ] = jpm+1; jBym[ 4 ] = jpm;    jBym[ 5 ] = jpm;
+    kBym[ 3 ] = kpm;   kBym[ 4 ] = kpm-1;  kBym[ 5 ] = kpm+1;
+
+    iByn[ 0 ] = iPoint-1;iByn[ 1 ] = iPoint+1;iByn[ 2 ] = iPoint;
+    jByn[ 0 ] = jPoint;jByn[ 1 ] = jPoint;jByn[ 2 ] = jPoint-1;
+    kByn[ 0 ] = kPoint;kByn[ 1 ] = kPoint;kByn[ 2 ] = kPoint;
+
+    iByn[ 3 ] = iPoint;iByn[ 4 ] = iPoint;iByn[ 5 ] = iPoint;
+    jByn[ 3 ] = jPoint+1;jByn[ 4 ] = jPoint;jByn[ 5 ] = jPoint;
+    kByn[ 3 ] = kPoint;kByn[ 4 ] = kPoint-1;kByn[ 5 ] = kPoint+1;
+
+    for(int i = 0; i < 6; ++ i)
+    {
+        nPointBym[ i ] = startCenterLabel[ mBlock ]+iCenterDimension[ mBlock ]*jCenterDimension[ mBlock ]*kBym[ i ]+iCenterDimension[ mBlock ]*jBym[ i ]+iBym[ i ];
+        xBym[ i ] = cellCenterX[ nPointBym[ i ] ];
+        yBym[ i ] = cellCenterY[ nPointBym[ i ] ];
+        zBym[ i ] = cellCenterZ[ nPointBym[ i ] ];
+
+        nPointByn[ i ] = startCenterLabel[ nBlock ]+iCenterDimension[ nBlock ]*jCenterDimension[ nBlock ]*kByn[ i ]+iCenterDimension[ nBlock ]*jByn[ i ]+iByn[ i ];
+        xByn[ i ] = cellCenterX[ nPointByn[ i ] ];
+        yByn[ i ] = cellCenterY[ nPointByn[ i ] ];
+        zByn[ i ] = cellCenterZ[ nPointByn[ i ] ];
+    }
+
+    for(int m = 0; m < 6; ++ m)
+    {
+        for(int n = 0; n < 6; ++ n)
+        {
+            dx = abs(xBym[ m ]-xByn[ n ]);
+            dy = abs(yBym[ m ]-yByn[ n ]);
+            dz = abs(zBym[ m ]-zByn[ n ]);
+            if(dx < EPS && dy < EPS && dz < EPS)
+            {
+                p = x-xByn[ n ];
+                q = y-yByn[ n ];
+                r = z-zByn[ n ];
+                distance = sqrt(p*p+q*q+r*r);
+                if(distance > EPS)
+                {
+                    xx = xByn[ n ];
+                    yy = yByn[ n ];
+                    zz = zByn[ n ];
+                    nPointBy = nPointByn[ n ];
+                    nFlap = 1;
+                    return;
+                }
+            }
+        }
+    }
+
+    nFlap = 0;
+    return;
+}
+
+void MultigridManager::CornerExtend()
+{
+    int iBlock, i, j, k, mPoint, nPoint;
+    for(iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        //! p1.
+        i = 0;
+        j = 0;
+        k = 0;
+        mPoint = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*(k+1)+iCenterDimension[ iBlock ]*j+i;
+        nPoint = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+        cellCenterX[ nPoint ] = cellCenterX[ mPoint ];
+        cellCenterY[ nPoint ] = cellCenterY[ mPoint ];
+        cellCenterZ[ nPoint ] = cellCenterZ[ mPoint ];
+        characterPoint[ nPoint ] = characterPoint[ mPoint ];
+
+        //! p2.
+        i = iCenterDimension[ iBlock ]-1;
+        j = 0;
+        k = 0;
+        mPoint = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*(k+1)+iCenterDimension[ iBlock ]*j+i;
+        nPoint = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+        cellCenterX[ nPoint ] = cellCenterX[ mPoint ];
+        cellCenterY[ nPoint ] = cellCenterY[ mPoint ];
+        cellCenterZ[ nPoint ] = cellCenterZ[ mPoint ];
+        characterPoint[ nPoint ] = characterPoint[ mPoint ];
+
+        //! p3.
+        i = 0;
+        j = jCenterDimension[ iBlock ]-1;
+        k = 0;
+        mPoint = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*(k+1)+iCenterDimension[ iBlock ]*j+i;
+        nPoint = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+        cellCenterX[ nPoint ] = cellCenterX[ mPoint ];
+        cellCenterY[ nPoint ] = cellCenterY[ mPoint ];
+        cellCenterZ[ nPoint ] = cellCenterZ[ mPoint ];
+        characterPoint[ nPoint ] = characterPoint[ mPoint ];
+
+        //! p4.
+        i = 0;
+        j = 0;
+        k = kCenterDimension[ iBlock ]-1;
+        mPoint = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*(k-1)+iCenterDimension[ iBlock ]*j+i;
+        nPoint = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+        cellCenterX[ nPoint ] = cellCenterX[ mPoint ];
+        cellCenterY[ nPoint ] = cellCenterY[ mPoint ];
+        cellCenterZ[ nPoint ] = cellCenterZ[ mPoint ];
+        characterPoint[ nPoint ] = characterPoint[ mPoint ];
+
+        //! p5.
+        i = iCenterDimension[ iBlock ]-1;
+        j = jCenterDimension[ iBlock ]-1;
+        k = 0;
+        mPoint = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*(k+1)+iCenterDimension[ iBlock ]*j+i;
+        nPoint = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+        cellCenterX[ nPoint ] = cellCenterX[ mPoint ];
+        cellCenterY[ nPoint ] = cellCenterY[ mPoint ];
+        cellCenterZ[ nPoint ] = cellCenterZ[ mPoint ];
+        characterPoint[ nPoint ] = characterPoint[ mPoint ];
+
+        //! p6.
+        i = iCenterDimension[ iBlock ]-1;
+        j = 0;
+        k = kCenterDimension[ iBlock ]-1;
+        mPoint = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*(k-1)+iCenterDimension[ iBlock ]*j+i;
+        nPoint = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+        cellCenterX[ nPoint ] = cellCenterX[ mPoint ];
+        cellCenterY[ nPoint ] = cellCenterY[ mPoint ];
+        cellCenterZ[ nPoint ] = cellCenterZ[ mPoint ];
+        characterPoint[ nPoint ] = characterPoint[ mPoint ];
+
+        //! p7.
+        i = 0;
+        j = jCenterDimension[ iBlock ]-1;
+        k = kCenterDimension[ iBlock ]-1;
+        mPoint = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*(k-1)+iCenterDimension[ iBlock ]*j+i;
+        nPoint = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+        cellCenterX[ nPoint ] = cellCenterX[ mPoint ];
+        cellCenterY[ nPoint ] = cellCenterY[ mPoint ];
+        cellCenterZ[ nPoint ] = cellCenterZ[ mPoint ];
+        characterPoint[ nPoint ] = characterPoint[ mPoint ];
+
+        //! p8.
+        i = iCenterDimension[ iBlock ]-1;
+        j = jCenterDimension[ iBlock ]-1;
+        k = kCenterDimension[ iBlock ]-1;
+        mPoint = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*(k-1)+iCenterDimension[ iBlock ]*j+i;
+        nPoint = startCenterLabel[ iBlock ]+iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*k+iCenterDimension[ iBlock ]*j+i;
+        cellCenterX[ nPoint ] = cellCenterX[ mPoint ];
+        cellCenterY[ nPoint ] = cellCenterY[ mPoint ];
+        cellCenterZ[ nPoint ] = cellCenterZ[ mPoint ];
+        characterPoint[ nPoint ] = characterPoint[ mPoint ];
+    }
+}
+
+void MultigridManager::GenerateGlobalPointSpace()
+{
+    coordinateX.resize(globalPointNumber);
+    coordinateY.resize(globalPointNumber);
+    coordinateZ.resize(globalPointNumber);
+}
+
+void MultigridManager::GenerateGlobalCenterSpace()
+{
+    characterPoint.resize(globalCenterNumber);
+    cellCenterX.resize(globalCenterNumber);
+    cellCenterY.resize(globalCenterNumber);
+    cellCenterZ.resize(globalCenterNumber);
+}
+
+void MultigridManager::GenerateLocalPointSpace()
+{
+    blockLocation.resize(globalPointNumber);
+    iLocation.resize(globalPointNumber);
+    jLocation.resize(globalPointNumber);
+    kLocation.resize(globalPointNumber);
+}
+
+void MultigridManager::ReadGridCoordinate()
+{
+    GenerateGlobalBlockSpace();
+
+    int pCounter = 0;
+    for(int iBlock = 0; iBlock < globalBlockNumber; ++iBlock)
+    {
+        startPointLabel[iBlock] = pCounter;
+        pCounter += OrdinaryGrid[iBlock]->GetNTotalNode();
+    }
+    globalPointNumber = pCounter;
+    GenerateGlobalPointSpace();
+
+    int iCounter = 0;
+    for(int iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        startCenterLabel[ iBlock ] = iCounter;
+        iCenterDimension[ iBlock ] = iDimension[ iBlock ]+1;
+        jCenterDimension[ iBlock ] = jDimension[ iBlock ]+1;
+        kCenterDimension[ iBlock ] = kDimension[ iBlock ]+1;
+        iCounter += iCenterDimension[ iBlock ]*jCenterDimension[ iBlock ]*kCenterDimension[ iBlock ];
+    }
+    globalCenterNumber = iCounter;
+    GenerateGlobalCenterSpace();
+
+    for(int iBlock = 0; iBlock < globalBlockNumber; ++iBlock)
+    {
+        RDouble *x = OrdinaryGrid[iBlock]->GetX();
+        RDouble *y = OrdinaryGrid[iBlock]->GetY();
+        RDouble *z = OrdinaryGrid[iBlock]->GetZ();
+
+        int localPointNumber = OrdinaryGrid[iBlock]->GetNTotalNode();
+        for(pCounter = 0; pCounter < localPointNumber; ++ pCounter)
+        {
+            int globalPointLabel = startPointLabel[iBlock] + pCounter;
+            coordinateX[globalPointLabel] = x[pCounter];
+            coordinateY[globalPointLabel] = y[pCounter];
+            coordinateZ[globalPointLabel] = z[pCounter];
+
+        }
+    }
+
+    GenerateLocalPointSpace();
+
+    int globalPointLabel = 0;
+    for(int iBlock = 0; iBlock < globalBlockNumber; ++iBlock)
+    {
+        for(int k = 0; k < kDimension[iBlock]; ++k)
+        {
+            for(int j = 0; j < jDimension[iBlock]; ++j)
+            {
+                for(int i = 0; i < iDimension[iBlock]; ++i)
+                {
+                    blockLocation[globalPointLabel] = iBlock;
+                    iLocation[globalPointLabel] = i;
+                    jLocation[globalPointLabel] = j;
+                    kLocation[globalPointLabel] = k;
+                    globalPointLabel += 1;
+                }
+            }
+        }
+    }
+}
+
+void MultigridManager::GenerateGlobalNodeLinkStructure()
+{
+    ReadBoundaryCondition();
+    InitialNodeLinksData();
+    SetNewPatchModel();
+}
+
+void MultigridManager::ReadBoundaryCondition()
+{
+    GenerateGlobalFaceSpace();
+
+    maxLocalFaceNumber = 0;
+    specialBlockLabel = -1;
+
+    for(int iBlock = 0; iBlock < globalBlockNumber; ++iBlock)
+    {
+        StructGrid * grid = StructGridCast(OrdinaryGrid[iBlock]);
+
+        StructBCSet * structBCSet = grid->GetStructBCSet();
+        overallFaceNumber[iBlock] = structBCSet->GetnBCRegion();
+        
+        int patchCounter = 0, innerCounter = 0, ComparePatchInner;
+        int boundaryLabel;
+        
+        iDimension[iBlock] = grid->GetNI();
+        jDimension[iBlock] = grid->GetNJ();
+        kDimension[iBlock] = grid->GetNK();
+        
+        for (int iBCRegion = 0; iBCRegion < overallFaceNumber[iBlock]; ++ iBCRegion)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+            boundaryLabel = structBC->GetBCType();
+            if (boundaryLabel < 0)
+            {
+                patchCounter += 1;
+            }
+            else
+            {
+                innerCounter += 1;
+            }
+        }
+
+        ComparePatchInner = max(patchCounter, innerCounter);
+        if (ComparePatchInner > maxLocalFaceNumber)
+        {
+            maxLocalFaceNumber = ComparePatchInner;
+            specialBlockLabel = iBlock;
+        }
+    }
+
+    cout << " Grid Information :" << endl;
+    cout << " maxLocalFaceNumber = " << maxLocalFaceNumber << endl;
+    cout << " specialblockLabel  = " << specialBlockLabel << endl;
+
+    GenerateLocalFaceSpace();
+    
+    for(int iBlock = 0; iBlock < globalBlockNumber; ++iBlock)
+    {
+        StructGrid * grid = StructGridCast(OrdinaryGrid[iBlock]);
+
+        StructBCSet * structBCSet = grid->GetStructBCSet();
+
+        int patchLabel = 0, innerLabel = 0;
+        int imin, imax, jmin, jmax, kmin, kmax, boundaryLabel, targetLabel;
+
+        for(int iBCRegion = 0; iBCRegion < overallFaceNumber[iBlock]; ++ iBCRegion)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+            int * s_st = structBC->GetStartPoint();
+            int * s_ed = structBC->GetEndPoint();
+
+            imin = s_st[0];
+            jmin = s_st[1];
+            kmin = s_st[2];
+
+            imax = s_ed[0];
+            jmax = s_ed[1];
+            kmax = s_ed[2];
+
+            boundaryLabel = structBC->GetBCType();
+            if(boundaryLabel < 0)
+            {
+                iminMaster[iBlock][patchLabel] = imin;
+                imaxMaster[iBlock][patchLabel] = imax;
+                jminMaster[iBlock][patchLabel] = jmin;
+                jmaxMaster[iBlock][patchLabel] = jmax;
+                kminMaster[iBlock][patchLabel] = kmin;
+                kmaxMaster[iBlock][patchLabel] = kmax;
+
+
+                int * t_st = structBC->GetTargetStart();
+                int * t_ed = structBC->GetTargetEnd();
+
+                imin = t_st[0];
+                jmin = t_st[1];
+                kmin = t_st[2];
+
+                imax = t_ed[0];
+                jmax = t_ed[1];
+                kmax = t_ed[2];
+
+                targetLabel = structBC->GetTargetRegionBlock();
+                
+
+                iminSlave[iBlock][patchLabel] = imin;
+                imaxSlave[iBlock][patchLabel] = imax;
+                jminSlave[iBlock][patchLabel] = jmin;
+                jmaxSlave[iBlock][patchLabel] = jmax;
+                kminSlave[iBlock][patchLabel] = kmin;
+                kmaxSlave[iBlock][patchLabel] = kmax;
+                tarPatch[iBlock][patchLabel] = targetLabel;
+                patchLabel += 1;
+            }
+            else
+            {
+                iminInner[iBlock][innerLabel] = min(imin, imax);
+                imaxInner[iBlock][innerLabel] = max(imin, imax);
+                jminInner[iBlock][innerLabel] = min(jmin, jmax);
+                jmaxInner[iBlock][innerLabel] = max(jmin, jmax);
+                kminInner[iBlock][innerLabel] = min(kmin, kmax);
+                kmaxInner[iBlock][innerLabel] = max(kmin, kmax);
+                faceType[iBlock][innerLabel] = boundaryLabel;
+                innerLabel += 1;
+            }
+        }
+        externalFaceNumber[iBlock] = patchLabel;
+        internalFaceNumber[iBlock] = innerLabel;
+    }
+
+    return;
+}
+
+void MultigridManager::GenerateGlobalFaceSpace()
+{
+    startPointLabel.resize(globalBlockNumber);
+    iDimension.resize(globalBlockNumber);
+    jDimension.resize(globalBlockNumber);
+    kDimension.resize(globalBlockNumber);
+    overallFaceNumber.resize(globalBlockNumber);
+    externalFaceNumber.resize(globalBlockNumber);
+    internalFaceNumber.resize(globalBlockNumber);
+    processLabel.resize(globalBlockNumber);
+}
+
+void MultigridManager::InitialNodeLinksData()
+{
+    int iCounter = 0;
+    for(int iBlock = 0; iBlock < globalBlockNumber; ++iBlock)
+    {
+        startPointLabel[iBlock] = iCounter;
+        iCounter += iDimension[iBlock]*jDimension[iBlock]*kDimension[iBlock];
+    }
+    globalPointNumber = iCounter;
+
+    for(int iPoint = 0; iPoint < globalPointNumber; ++iPoint)
+    {
+        patchIPoint.push_back(-1);
+        patchJPoint.push_back(-1);
+        patchKPoint.push_back(-1);
+    }     //! Different from the initialization of PMB3D.
+}
+
+void MultigridManager::GenerateLocalFaceSpace()
+{
+    InitializeLocalFaceSpace(iminMaster, 0);
+    InitializeLocalFaceSpace(imaxMaster, 0);
+    InitializeLocalFaceSpace(jminMaster, 0);
+    InitializeLocalFaceSpace(jmaxMaster, 0);
+    InitializeLocalFaceSpace(kminMaster, 0);
+    InitializeLocalFaceSpace(kmaxMaster, 0);
+
+    InitializeLocalFaceSpace(iminSlave, 0);
+    InitializeLocalFaceSpace(imaxSlave, 0);
+    InitializeLocalFaceSpace(jminSlave, 0);
+    InitializeLocalFaceSpace(jmaxSlave, 0);
+    InitializeLocalFaceSpace(kminSlave, 0);
+    InitializeLocalFaceSpace(kmaxSlave, 0);
+
+    InitializeLocalFaceSpace(iminInner, 0);
+    InitializeLocalFaceSpace(imaxInner, 0);
+    InitializeLocalFaceSpace(jminInner, 0);
+    InitializeLocalFaceSpace(jmaxInner, 0);
+    InitializeLocalFaceSpace(kminInner, 0);
+    InitializeLocalFaceSpace(kmaxInner, 0);
+
+    InitializeLocalFaceSpace(faceType, -1000);
+    InitializeLocalFaceSpace(tarPatch, -1000);
+}
+
+void MultigridManager::InitializeLocalFaceSpace(PHInt2D & myInt2D, int value)
+{
+    myInt2D.resize(globalBlockNumber);
+    for(int iBlock = 0; iBlock < globalBlockNumber; ++iBlock)
+    {
+        myInt2D[iBlock].resize(maxLocalFaceNumber);
+        for(int iFace = 0; iFace < maxLocalFaceNumber; ++iFace)
+        {
+            myInt2D[iBlock][iFace] = value;
+        }
+    }
+}
+
+void MultigridManager::SetNewPatchModel()
+{
+    vector< int > sourceToLocalAspectMapping(3), localToTargetAspectMapping(3), sourceToTargetAspectMapping(3);
+    vector< int > relativeRate(3), colorSource(3), colorTarget(3), sst(3), sed(3), tst(3), ted(3), maps(3);
+    int sside = 0, tside = 0;
+    const int NEGATIVE_UNIT = -1, POSITIVE_UNIT = 1;
+
+    for(int iBlock = 0; iBlock < globalBlockNumber; ++iBlock)
+    {
+        for(int iPatch = 0; iPatch < externalFaceNumber[iBlock]; ++iPatch)
+        {
+            sst[0] = iminMaster[iBlock][iPatch];
+            sed[0] = imaxMaster[iBlock][iPatch];
+            sst[1] = jminMaster[iBlock][iPatch];
+            sed[1] = jmaxMaster[iBlock][iPatch];
+            sst[2] = kminMaster[iBlock][iPatch];
+            sed[2] = kmaxMaster[iBlock][iPatch];
+
+            tst[0] = iminSlave[iBlock][iPatch];
+            ted[0] = imaxSlave[iBlock][iPatch];
+            tst[1] = jminSlave[iBlock][iPatch];
+            ted[1] = jmaxSlave[iBlock][iPatch];
+            tst[2] = kminSlave[iBlock][iPatch];
+            ted[2] = kmaxSlave[iBlock][iPatch];
+
+            //! Local analysis of the source grid block.
+            for (int m = 0; m < 3; ++ m)
+            {
+                if (sst[m] == sed[m])
+                {
+                    sourceToLocalAspectMapping[m] = 0; //! The m-th axis is the relative main axis of the source grid block.
+
+                    if (sst[m] == 1)
+                    {
+                        sside = 2 * m;
+                        colorSource[m] = POSITIVE_UNIT; //! The patching face is the start point of the source grid block relative main axis. 
+                    }
+                    else
+                    {
+                        sside = 2 * m + 1;
+                        colorSource[m] = NEGATIVE_UNIT; //! The patching face is the end point of the source grid block relative main axis. 
+                    }
+                }
+                else if (sst[m] < 0)
+                {
+                    sourceToLocalAspectMapping[m] = 1; //! The m-th axis is the relative negative axis of the source grid block.
+
+                    if (sst[m] < sed[m])
+                    {
+                        colorSource[m] = NEGATIVE_UNIT; //! The index on the the relative negative axis of the source grid block is from small to large.
+                    }
+                    else
+                    {
+                        colorSource[m] = POSITIVE_UNIT; //! The index on the the relative negative axis of the source grid block is from large to small.
+                    }
+                }
+                else
+                {
+                    sourceToLocalAspectMapping[m] = 2; //! The m-th axis is the relative positive axis of the source grid block.
+
+                    if (sst[m] > sed[m])
+                    {
+                        colorSource[m] = NEGATIVE_UNIT; //! The index on the the relative positive axis of the source grid block is from large to small.
+                    }
+                    else
+                    {
+                        colorSource[m] = POSITIVE_UNIT; //! The index on the the relative positive axis of the source grid block is from small to large.
+                    }
+                }
+
+                //! Local analysis of the target grid block.
+                if (tst[m] == ted[m])
+                {
+                    localToTargetAspectMapping[0] = m; //! The m-th axis is the relative main axis of the target grid block.
+
+                    if (tst[m] == 1)
+                    {
+                        tside = 2 * m;
+                        colorTarget[m] = NEGATIVE_UNIT; //! The patching face is the start point of the target grid block relative main axis.
+                    }
+                    else
+                    {
+                        tside = 2 * m + 1;
+                        colorTarget[m] = POSITIVE_UNIT; //! The patching face is the end point of the target grid block relative main axis.
+                    }
+                }
+                else if (tst[m] < 0)
+                {
+                    localToTargetAspectMapping[1] = m; //! The m-th axis is the relative negative axis of the target grid block.
+
+                    if (tst[m] < ted[m])
+                    {
+                        colorTarget[m] = NEGATIVE_UNIT; //! The index on the the relative negative axis of the target grid block is from small to large.
+                    }
+                    else
+                    {
+                        colorTarget[m] = POSITIVE_UNIT; //! The index on the the relative negative axis of the target grid block is from large to small.
+                    }
+                }
+                else
+                {
+                    localToTargetAspectMapping[2] = m; //! The m-th axis is the relative positive axis of the target grid block.
+
+                    if (tst[m] > ted[m])
+                    {
+                        colorTarget[m] = NEGATIVE_UNIT; //! The index on the the relative positive axis of the target grid block is from large to small.
+                    }
+                    else
+                    {
+                        colorTarget[m] = POSITIVE_UNIT; //! The index on the the relative positive axis of the target grid block is from small to large.
+                    }
+                }
+            }
+
+            //! The analysis from source to target.
+            for (int m = 0; m < 3; ++ m)
+            {
+                int i = sourceToLocalAspectMapping[m];
+                int j = localToTargetAspectMapping[i];
+
+                sourceToTargetAspectMapping[m] = j;
+        
+                //! Main axis analysis takes (s start-t end) and (s end-t start)as true, (s start-t start) and (s end-t end) as false.
+                //! Negative axis analysis takes (s increase-t increase) and (s decrease-t decrease)as true, (s increase-t decrease) and (s decrease-t increase) as false.
+                //! Positive axis analysis takes (s increase-t increase) and (s decrease-t decrease)as true, (s increase-t decrease) and (s decrease-t increase) as false.
+                //! It can be concluded that taking colorSource equals colorTarget as true, colorSource unequals colorTarget as false.
+                if (colorSource[m] == colorTarget[j])
+                {
+                    relativeRate[m] = POSITIVE_UNIT;
+                }
+                else
+                {
+                    relativeRate[m] = NEGATIVE_UNIT;
+                }
+            }
+
+            PHSPACE::Standardize(sst, sed, sside);
+            PHSPACE::Standardize(tst, ted, tside);
+
+            int nbpat = tarPatch[iBlock][iPatch];
+            int mk = sourceToTargetAspectMapping[2];
+            int mj = sourceToTargetAspectMapping[1];
+            int mi = sourceToTargetAspectMapping[0];
+
+            for (int k = sst[2]; k <= sed[2]; ++ k)
+            {
+                int ks = k + 1;
+                maps[mk] = (1 + relativeRate[2]) / 2 * tst[mk] + (1 - relativeRate[2]) / 2 * ted[mk] + relativeRate[2] * (k - sst[2]);
+                for (int j = sst[1]; j <= sed[1]; ++ j)
+                {
+                    int js = j + 1; 
+                    maps[mj] = (1 + relativeRate[1]) / 2 * tst[mj] + (1 - relativeRate[1]) / 2 * ted[mj] + relativeRate[1] * (j - sst[1]);
+                    for (int i = sst[0]; i <= sed[0]; ++ i)
+                    {
+                        int is = i + 1;
+                        maps[mi] = (1 + relativeRate[0]) / 2 * tst[mi] + (1 - relativeRate[0]) / 2 * ted[mi] + relativeRate[0] * (i - sst[0]);
+
+                        int kt = maps[2] + 1;
+                        int jt = maps[1] + 1;
+                        int it = maps[0] + 1;
+
+                        int ps = startPointLabel[iBlock] + iDimension[iBlock] * jDimension[iBlock] * ks + iDimension[iBlock] * js + is;
+                        int pt = startPointLabel[nbpat]  + iDimension[nbpat]  * jDimension[nbpat]  * kt + iDimension[nbpat]  * jt + it;
+
+                        int id = sside / 2;
+                        if (id == 0)
+                        {
+                            patchIPoint[ps] = pt;
+                        }
+                        else if (id == 1)
+                        {
+                            patchJPoint[ps] = pt;
+                        }
+                        else
+                        {
+                            patchKPoint[ps] = pt;
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    return;
+}
+
+void MultigridManager::GetOtherBlockDirections(int id1, int & id2, int & id3)
+{
+    if(id1 == 1)
+    {
+        id2 = 2;
+        id3 = 3;
+    } 
+
+    if(id1 == 2)
+    {
+        id2 = 3;
+        id3 = 1;
+    } 
+
+    if(id1 == 3)
+    {
+        id2 = 1;
+        id3 = 2;
+    }
+}
+
+void MultigridManager::ComputeContravariantComponent()
+{
+    PHDouble2D amer(3), aa;
+    PHDouble1D xx(3), bb(3);
+    for(int i = 0; i < 3; ++i)
+    {
+        amer[i].resize(3);
+    }
+
+    for(int iBlock = 0; iBlock < globalBlockNumber; ++iBlock)
+    {
+        int iHarf = iDimension[iBlock]/2;
+        int jHarf = jDimension[iBlock]/2;
+        int kHarf = kDimension[iBlock]/2;
+
+        int originalLabel = startPointLabel[iBlock];
+        int iDirectLabel = originalLabel+iHarf;
+        int jDirectLabel = originalLabel+iDimension[iBlock]*jHarf;
+        int kDirectLabel = originalLabel+iDimension[iBlock]*jDimension[iBlock]*kHarf;
+
+        amer[0][0] = coordinateX[iDirectLabel]-coordinateX[originalLabel];
+        amer[0][1] = coordinateX[jDirectLabel]-coordinateX[originalLabel];
+        amer[0][2] = coordinateX[kDirectLabel]-coordinateX[originalLabel];
+
+        amer[1][0] = coordinateY[iDirectLabel]-coordinateY[originalLabel];
+        amer[1][1] = coordinateY[jDirectLabel]-coordinateY[originalLabel];
+        amer[1][2] = coordinateY[kDirectLabel]-coordinateY[originalLabel];
+
+        amer[2][0] = coordinateZ[iDirectLabel]-coordinateZ[originalLabel];
+        amer[2][1] = coordinateZ[jDirectLabel]-coordinateZ[originalLabel];
+        amer[2][2] = coordinateZ[kDirectLabel]-coordinateZ[originalLabel];
+
+        for(int k = 0; k < kCenterDimension[iBlock]; ++k)
+        {
+            for(int j = 0; j < jCenterDimension[iBlock]; ++j)
+            {
+                for(int i = 0; i < iCenterDimension[iBlock]; ++i)
+                {
+                    int core = startCenterLabel[iBlock]+iCenterDimension[iBlock]*jCenterDimension[iBlock]*k+iCenterDimension[iBlock]*j+i;
+                    bb[0] = cellCenterX[core]-coordinateX[originalLabel];
+                    bb[1] = cellCenterY[core]-coordinateY[originalLabel];
+                    bb[2] = cellCenterZ[core]-coordinateZ[originalLabel];
+                    aa = amer;
+                    int flag;
+                    GaussElimination(aa, bb, 3, xx, flag);
+                    if(flag == 0)
+                    {
+                        TK_Exit::ExceptionExit("Linear correlation !\n");
+                    }
+
+                    cellCenterX[core] = xx[0];
+                    cellCenterY[core] = xx[1];
+                    cellCenterZ[core] = xx[2];
+                }
+            }
+        }
+    }
+
+    return;
+}
+
+void MultigridManager::OutputLinkData()
+{
+    string linkFileName = GetLinkFileName();
+    ofstream outfile(linkFileName.c_str(), ios_base::binary);
+    outfile.write((char*)&globalBlockNumber, sizeof(int));
+
+    for(int iBlock = 0; iBlock < globalBlockNumber; ++iBlock)
+    {
+        outfile.write((char*)&startPointLabel[iBlock], sizeof(int));
+    }
+
+    outfile.write((char*)&globalPointNumber, sizeof(int));
+    
+    for(int ip = 0; ip < globalPointNumber; ++ip)
+    {
+        outfile.write((char*)&patchIPoint[ip], sizeof(int));
+    }
+
+    for(int ip = 0; ip < globalPointNumber; ++ip)
+    {
+        outfile.write((char*)&patchJPoint[ip], sizeof(int));
+    }
+
+    for(int ip = 0; ip < globalPointNumber; ++ip)
+    {
+        outfile.write((char*)&patchKPoint[ip], sizeof(int));
+    }
+
+    for(int iBlock = 0; iBlock < globalBlockNumber; ++iBlock)
+    {
+        outfile.write((char*)&startCenterLabel[iBlock], sizeof(int));
+    }
+
+    outfile.write((char*)&globalCenterNumber, sizeof(int));
+
+    for(int iCenter = 0; iCenter < globalCenterNumber; ++iCenter)
+    {
+        outfile.write((char*)&characterPoint[iCenter], sizeof(int));
+    }
+
+    for(int iCenter = 0; iCenter < globalCenterNumber; ++iCenter)
+    {
+        outfile.write((char*)&cellCenterX[iCenter], sizeof(RDouble));
+    }
+
+    for(int iCenter = 0; iCenter < globalCenterNumber; ++iCenter)
+    {
+        outfile.write((char*)&cellCenterY[iCenter], sizeof(RDouble));
+    }
+
+    for(int iCenter = 0; iCenter < globalCenterNumber; ++iCenter)
+    {
+        outfile.write((char*)&cellCenterZ[iCenter], sizeof(RDouble));
+    }
+
+    outfile.close();
+}
+
+string MultigridManager::GetLinkFileName()
+{
+    string linkFileName;
+
+    GlobalDataBase::GetData("linkFileName", &linkFileName, PHSTRING,1);
+
+    return linkFileName;
+}
+
+void MultigridManager::GenerateLinkStructure()
+{
+    GenerateGlobalNodeLinkStructure();
+
+    GenerateGlobalCellLinkStructure();
+
+    ComputeContravariantComponent();    //! Very important part Guo Yongheng 20151204. Contravariant Component Transformation.
+
+    OutputLinkData();
+
+    return;
+}
+
+void MultigridManager::GenerateHoleStructure()
+{
+    int codeOfDigHoles;
+    GlobalDataBase::GetData("codeOfDigHoles", &codeOfDigHoles, PHINT,1);
+    if(codeOfDigHoles == 0) return;
+
+    ReadZoneInverseMapping();
+
+    ReadOriginalHoleFile();
+
+    ComputeLocalCoordinate();
+
+    OutputNewHoleFile();
+
+    return;
+}
+
+void MultigridManager::GenerateHoleGridStructure()
+{
+    if (! GlobalDataBase::GetIntParaFromDB("codeOfDigHoles")) return;
+
+    ReadZoneInverseMapping();
+
+    ReadOriginalHoleGrid();
+
+    ComputeLocalHoleGrid();
+
+    OutputNewHoleGrid();
+
+    return;
+}
+
+void MultigridManager::OutputNewHoleGrid()
+{
+    string holeFullFileName = GlobalDataBase::GetStrParaFromDB("holeFullFileName");
+    fstream file(holeFullFileName.c_str(), ios_base::out|ios_base::binary);
+
+    file.write((char*)&numberOfHoles, sizeof(int));
+
+    file.close();
+    file.clear();
+    return;
+}
+
+void MultigridManager::ComputeLocalHoleGrid()
+{
+
+}
+
+void MultigridManager::ReadOriginalHoleGrid()
+{
+
+}
+
+void MultigridManager::ReadOriginalHoleFile()
+{
+    string holeGridFileName;
+    string holeBasicFileName = PHSPACE::GetHoleBasicFileName();
+    fstream basicFile(holeBasicFileName.c_str(), ios_base::in);
+    basicFile>>numberOfHoles;
+
+    holeZoneStart.resize(numberOfHoles);
+    holeZoneEnd.resize(numberOfHoles);
+    holeZoneAttached.resize(numberOfHoles);
+    numberOfHoleSurfaces.resize(numberOfHoles);
+    nsi.resize(numberOfHoles);
+    nsj.resize(numberOfHoles);
+    spst.resize(numberOfHoles);
+    numberOfHolePoints.resize(numberOfHoles);
+    xsurf.resize(numberOfHoles);
+    ysurf.resize(numberOfHoles);
+    zsurf.resize(numberOfHoles);
+
+    for(int iHole = 0; iHole < numberOfHoles; ++iHole)
+    {
+        basicFile>>holeGridFileName;
+        basicFile>>holeZoneStart[iHole]>>holeZoneEnd[iHole]>>holeZoneAttached[iHole];
+
+        fstream holeFile(holeGridFileName.c_str(), ios_base::in|ios_base::binary);
+        holeFile.read((char*)&numberOfHoleSurfaces[iHole], sizeof(int));
+        nsi[iHole].resize(numberOfHoleSurfaces[iHole]);
+        nsj[iHole].resize(numberOfHoleSurfaces[iHole]);
+        spst[iHole].resize(numberOfHoleSurfaces[iHole]);
+        
+        int kSurfaceDimension, pCounter = 0;
+        for(int iSurf = 0; iSurf < numberOfHoleSurfaces[iHole]; ++iSurf)
+        {
+            holeFile.read((char*)&nsi[iHole][iSurf], sizeof(int));
+            holeFile.read((char*)&nsj[iHole][iSurf], sizeof(int));
+            holeFile.read((char*)&kSurfaceDimension, sizeof(int));
+            spst[iHole][iSurf] = pCounter;
+            pCounter += nsi[iHole][iSurf]*nsj[iHole][iSurf];
+        }
+
+        numberOfHolePoints[iHole] = pCounter;
+        xsurf[iHole].resize(numberOfHolePoints[iHole]);
+        ysurf[iHole].resize(numberOfHolePoints[iHole]);
+        zsurf[iHole].resize(numberOfHolePoints[iHole]);
+
+        for(int iSurf = 0; iSurf < numberOfHoleSurfaces[iHole]; ++iSurf)
+        {
+            int surfNodeNumber = nsi[iHole][iSurf]*nsj[iHole][iSurf];
+            int startNode = spst[iHole][iSurf];
+            for(int ip = 0; ip < surfNodeNumber; ++ip)
+            {
+                holeFile.read((char*)&xsurf[iHole][startNode+ip], sizeof(RDouble));
+            }
+
+            for(int ip = 0; ip < surfNodeNumber; ++ip)
+            {
+                holeFile.read((char*)&ysurf[iHole][startNode+ip], sizeof(RDouble));
+            }
+
+            for(int ip = 0; ip < surfNodeNumber; ++ip)
+            {
+                holeFile.read((char*)&zsurf[iHole][startNode+ip], sizeof(RDouble));
+            }
+        }
+        holeFile.close();
+    }
+    basicFile.close();
+
+    return;
+}
+
+void MultigridManager::ReadZoneInverseMapping()
+{
+    int nZones = globalBlockNumber;
+    zoneInverseIndex.resize(nZones);
+    string zoneInverseFileName = GlobalDataBase::GetStrParaFromDB("zoneInverseFileName");
+    fstream file(zoneInverseFileName.c_str(), ios_base::in|ios_base::binary);
+    file.read((char*)&zoneInverseIndex[0], nZones * sizeof(int));
+    file.close();
+    file.clear();
+    return;
+}
+
+void MultigridManager::ComputeLocalCoordinate()
+{
+    PHDouble1D bb(3), xx(3);
+    PHDouble2D amer(3), aa;
+    for(int i = 0; i < 3; ++i)
+    {
+        amer[i].resize(3);
+    }
+
+    for(int iHole = 0; iHole < numberOfHoles; ++iHole)
+    {
+        int iZone = zoneInverseIndex[holeZoneAttached[iHole]];
+        Grid * gridIn = OrdinaryGrid[iZone];
+        StructGrid * grid = PHSPACE::StructGridCast(gridIn);
+        PHDouble2D & localFrame = grid->GetLocalFrame();
+
+        for(int i = 0; i < 3; ++i)
+        {
+            for(int j = 0; j < 3; ++j)
+            {
+                amer[i][j] = localFrame[i][j+1];
+            }
+        }
+
+        for(int ip = 0; ip < numberOfHolePoints[iHole]; ++ip)
+        {
+            bb[0] = xsurf[iHole][ip]-localFrame[0][0];
+            bb[1] = ysurf[iHole][ip]-localFrame[1][0];
+            bb[2] = zsurf[iHole][ip]-localFrame[2][0];
+
+            aa = amer;
+            int flag;
+            GaussElimination(aa, bb, 3, xx, flag);
+            if(flag == 0)
+            {
+                TK_Exit::ExceptionExit("Linear correlation !\n");
+            }
+
+            xsurf[iHole][ip] = xx[0];
+            ysurf[iHole][ip] = xx[1];
+            zsurf[iHole][ip] = xx[2];
+        }
+    }
+    return;
+}
+
+void MultigridManager::OutputNewHoleFile()
+{
+    string holeFullFileName;
+    GlobalDataBase::GetData("holeFullFileName", &holeFullFileName, PHSTRING, 1);
+    fstream file(holeFullFileName.c_str(), ios_base::out|ios_base::binary);
+    file.write((char*)&numberOfHoles, sizeof(int));
+
+    for(int iHole = 0; iHole < numberOfHoles; ++iHole)
+    {
+        file.write((char*)&holeZoneStart[iHole], sizeof(int));
+    }
+
+    for(int iHole = 0; iHole < numberOfHoles; ++iHole)
+    {
+        file.write((char*)&holeZoneEnd[iHole], sizeof(int));
+    }
+
+    for(int iHole = 0; iHole < numberOfHoles; ++iHole)
+    {
+        file.write((char*)&holeZoneAttached[iHole], sizeof(int));
+    }
+
+    for(int iHole = 0; iHole < numberOfHoles; ++iHole)
+    {
+        file.write((char*)&numberOfHoleSurfaces[iHole], sizeof(int));
+    }
+
+    for(int iHole = 0; iHole < numberOfHoles; ++iHole)
+    {
+        file.write((char*)&numberOfHolePoints[iHole], sizeof(int));
+    }
+
+    for(int iHole = 0; iHole < numberOfHoles; ++iHole)
+    {
+        for(int is = 0; is < numberOfHoleSurfaces[iHole]; ++is)
+        {
+            file.write((char*)&nsi[iHole][is], sizeof(int));
+        }
+
+        for(int is = 0; is < numberOfHoleSurfaces[iHole]; ++is)
+        {
+            file.write((char*)&nsj[iHole][is], sizeof(int));
+        }
+
+        for(int is = 0; is < numberOfHoleSurfaces[iHole]; ++is)
+        {
+            file.write((char*)&spst[iHole][is], sizeof(int));
+        }
+
+        for(int ip = 0; ip < numberOfHolePoints[iHole]; ++ip)
+        {
+            file.write((char*)&xsurf[iHole][ip], sizeof(RDouble));
+        }
+
+        for(int ip = 0; ip < numberOfHolePoints[iHole]; ++ip)
+        {
+            file.write((char*)&ysurf[iHole][ip], sizeof(RDouble));
+        }
+
+        for(int ip = 0; ip < numberOfHolePoints[iHole]; ++ip)
+        {
+            file.write((char*)&zsurf[iHole][ip], sizeof(RDouble));
+        }
+    }
+    file.close();
+    return;
+}
+
+void Standardize(vector< int > & st, vector< int > & ed, int side)
+{
+    for (int i = 0; i < 3; ++ i)
+    {
+        st[i] = abs(st[i]) - 1;
+        ed[i] = abs(ed[i]) - 1;
+
+        if (st[i] > ed[i])
+        {
+            int se = st[i];
+            st[i]  = ed[i];
+            ed[i]  = se;
+        }
+        ed[i] -= 1;
+    }
+
+    int id = side / 2;
+    int ic = side % 2;
+
+    if (ic == 0)
+    {
+        ed[id] += 1;
+    }
+    else
+    {
+        st[id] -= 1;
+    }
+
+    return;
+}
+
+string GetHoleBasicFileName()
+{
+    string holeBasicFileName;
+    GlobalDataBase::GetData("holeBasicFileName", &holeBasicFileName, PHSTRING,1);
+    return holeBasicFileName;
+}
+
+void GaussElimination(PHDouble2D & a, PHDouble1D & b, int n, PHDouble1D & x, int & flag)
+{
+    int is = 0;
+    flag = 1;
+    PHInt1D js(n);
+
+    for(int k = 0; k < n-1; ++k)
+    {
+        RDouble d = 0.0;
+        for(int i = k; i < n; ++i)
+        {
+            for(int j = k; j < n; ++j)
+            {
+                if (abs(a[i][j]) > d)
+                {
+                    d = abs(a[i][j]);
+                    js[k] = j;
+                    is = i;
+                }
+            }
+        }
+
+        if (d < SMALL)
+        {
+            flag = 0;
+        }
+        else
+        {
+            if(js[k] != k)
+            {
+                for(int i = 0; i < n; ++i)
+                {
+                    RDouble t = a[i][k];
+                    a[i][k] = a[i][js[k]];
+                    a[i][js[k]] = t;
+                }
+            }
+
+            if(is != k)
+            {
+                for(int j = k; j < n; ++j)
+                {
+                    RDouble t = a[k][j];
+                    a[k][j] = a[is][j];
+                    a[is][j] = t;
+                }
+
+                RDouble t = b[k];
+                b[k] = b[is];
+                b[is] = t;
+            }
+        }
+
+        if(flag == 0)
+        {
+            return;
+        }
+
+        RDouble sfn = 1.0/a[k][k];
+        for(int j = k+1; j < n; ++j)
+        {
+            a[k][j] *= sfn;
+        }
+
+        b[k] *= sfn;
+
+        for(int i = k+1; i < n; ++i)
+        {
+            for(int j = k+1; j < n; ++j)
+            {
+                a[i][j] -= a[i][k]*a[k][j];
+            }
+            b[i] -= a[i][k]*b[k];
+        }
+    }
+
+    if(abs(a[n-1][n-1]) < SMALL)
+    {
+        flag = 0;
+        return;
+    }
+
+    x[n-1] = b[n-1]/a[n-1][n-1];
+    for(int i = n-2; i >= 0; --i)
+    {
+        RDouble t = 0;
+        for(int j = i+1; j < n; ++j)
+        {
+            t += a[i][j]*x[j];
+        }
+        x[i] = b[i]-t;
+    }
+
+    js[n-1] = n-1;
+    for(int k = n-1; k >= 0; --k)
+    {
+        if(js[k] != k)
+        {
+            RDouble t = x[k];
+            x[k] = x[js[k]];
+            x[js[k]] = t;
+        }
+    }
+
+    return;
+}
+
+}
+
+
diff --git a/API/Geometry/src/OverLappingGrid.cpp b/API/Geometry/src/OverLappingGrid.cpp
new file mode 100644
index 0000000..ddb0264
--- /dev/null
+++ b/API/Geometry/src/OverLappingGrid.cpp
@@ -0,0 +1,44 @@
+#include "OverLappingGrid.h"
+#include "Geo_OversetGrid.h"
+#include "TK_Exit.h"
+using namespace std;
+
+namespace PHSPACE
+{
+void DumpFlags(Geo_OversetGrid **oversetGrids, int nBlocks, const string &filename)
+{
+    fstream file;
+    file.open(filename.c_str(),ios_base::out);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(filename);
+    }
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        file << " iZone = " << iZone << " nBlocks = " << nBlocks << "\n";
+        oversetGrids[iZone]->DumpFlags(file);
+        //file << "\n";
+    }
+    file.close();
+    file.clear();
+}
+
+void DumpOversetGrid(Geo_OversetGrid **oversetGrids, int nBlocks, const string &filename)
+{
+    fstream file;
+    file.open(filename.c_str(), ios_base::out|ios_base::binary);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(filename);
+    }
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        oversetGrids[iZone]->DumpOversetGrid(file);
+    }
+    file.close();
+    file.clear();
+}
+
+}
diff --git a/API/Geometry/src/OversetGridFactory.cpp b/API/Geometry/src/OversetGridFactory.cpp
new file mode 100644
index 0000000..021c620
--- /dev/null
+++ b/API/Geometry/src/OversetGridFactory.cpp
@@ -0,0 +1,2193 @@
+#include <cmath>
+#include "OversetGridFactory.h"
+#include "Geo_Interface.h"
+#include "Geo_Interpoint.h"
+#include "Geo_MultiGridInfo_Struct.h"
+#include "PHIO.h"
+#include "Geo_NodeTopo_Struct.h"
+#include "Geo_FaceMetrics_Struct.h"
+#include "Geo_CellMetrics_Struct.h"
+#include "Geo_DynamicGridMetrics_Struct.h"
+#include "Geo_OversetGridTopo_Struct.h"
+using namespace std;
+
+namespace PHSPACE
+{
+int GetCodeOfDigHoles()
+{
+    return GlobalDataBase::GetIntParaFromDB("codeOfDigHoles");
+}
+
+int GetCodeOfTurbulenceModel()
+{
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+
+    int codeOfTurbulenceModel = 0;
+    if (viscousType != INVISCID && viscousType != LAMINAR)
+    {
+        codeOfTurbulenceModel = 1;
+    }
+    
+    return codeOfTurbulenceModel;
+}
+
+//---------------------------------------------------------------------------------
+vector< StructGrid * > * structGridTable = NULL;
+
+LIB_EXPORT void GenerateStructGridTable()
+{
+    using namespace PHMPI;
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    structGridTable = new vector< StructGrid * >(nZones, NULL);
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Grid *grid = PHSPACE::GetGrid(iZone, 0);
+        if (! grid) continue;
+        (* structGridTable)[iZone] = PHSPACE::StructGridCast(grid);
+    }
+
+    return;
+}
+
+LIB_EXPORT void DeleteStructGridTable()
+{
+    using namespace PHMPI;
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        (* structGridTable)[iZone] = NULL;
+    }
+
+    delete structGridTable; structGridTable = NULL;
+
+    return;
+}
+
+LIB_EXPORT StructGrid * GetStructGrid(int i)
+{
+    return (* structGridTable)[i];
+}
+
+
+LIB_EXPORT HoleGrid::HoleGrid()
+{
+    nsi = NULL;
+    nsj = NULL;
+    nsp = NULL;
+
+    x = NULL;
+    y = NULL;
+    z = NULL;
+
+    box = NULL;
+
+    capsule = NULL;
+    zone_st = 0;
+    zone_ed = 0;
+    zone_at = 0;
+    ns = 0;
+    np = 0;
+}
+
+LIB_EXPORT HoleGrid::~HoleGrid()
+{
+    delete x; x = NULL;
+    delete y; y = NULL;
+    delete z; z = NULL;
+
+    delete box; box = NULL;
+
+    delete nsi; nsi = NULL;
+    delete nsj; nsj = NULL;
+    delete nsp; nsp = NULL;
+
+    uint_t size = capsule->size();
+    for (int i = 0; i < size; ++ i)
+    {
+        delete (* capsule)[i]; (* capsule)[i] = NULL;
+    }
+    delete capsule; capsule = NULL;
+}
+LIB_EXPORT void HoleGrid::DigHoles()
+{
+    GenerateCapsualSpace();
+
+    MeasureBoxAndCapsual();
+
+    ProbeCellsInHole();
+
+    ProbeBorderCell(IN_HOLE_COLOR, SECOND_COLOR);
+
+    ProbeBorderCell(SECOND_COLOR, OVERSET_COLOR);
+
+    return;
+}
+
+LIB_EXPORT void HoleGrid::GenerateSurfaceSpace()
+{
+    nsi = new vector< int >(ns);
+    nsj = new vector< int >(ns);
+    nsp = new vector< int >(ns);
+
+    return;
+}
+
+LIB_EXPORT void HoleGrid::GeneratePointSpace()
+{
+    x = new vector< RDouble >(np);
+    y = new vector< RDouble >(np);
+    z = new vector< RDouble >(np);
+
+    box = new vector< RDouble >(6);
+
+    return;
+}
+
+void HoleGrid::GenerateCapsualSpace()
+{
+    int numberOfCapsules = 0;
+    for (int is = 0; is < ns; ++ is)
+    {
+        numberOfCapsules += ((* nsi)[is] - 1) * ((* nsj)[is] - 1);
+    }
+
+    capsule = new vector< vector< RDouble > * >(numberOfCapsules, NULL);
+
+    for (int ic = 0; ic < numberOfCapsules; ++ ic)
+    {
+        (* capsule)[ic] = new vector< RDouble >(6);
+    }
+
+    return;
+}
+
+void HoleGrid::MeasureBoxAndCapsual()
+{
+    using namespace PHMPI;
+    vector< vector< RDouble > > holeLocalFrame(3, vector< RDouble >(4));
+    phy.resize(3, vector< RDouble >(np));
+
+    int iZone = PHSPACE::GetZoneInverseIndex(zone_at);
+    int iProc = PHMPI::GetZoneProcessorID(iZone);
+    int jProc = PHMPI::GetCurrentProcessorID();
+
+    if (iProc == jProc)
+    {
+        StructGrid * grid = PHSPACE::GetStructGrid(iZone);
+        holeLocalFrame = grid->GetLocalFrame();
+    }
+
+    for(int i = 0; i < 3; ++i)
+    {
+        PH_Bcast(& holeLocalFrame[i][0], 4 * sizeof(RDouble), iProc, 0);
+    }
+
+    vector< RDouble > ss(3);
+    for (int i = 0; i < np; ++ i)
+    {
+        PHSPACE::ComputePhysicalCoordinate(holeLocalFrame, (* x)[i], (* y)[i], (* z)[i], ss);
+        phy[0][i] = ss[0]; phy[1][i] = ss[1]; phy[2][i] = ss[2];
+    }
+
+    for (int i = 0; i < 3; ++ i)
+    {
+        (* box)[i*2  ] = * min_element(phy[i].begin(), phy[i].end());
+        (* box)[i*2+1] = * max_element(phy[i].begin(), phy[i].end());
+    }
+
+    vector< int > nd(4);
+    vector< vector< RDouble > > nodeCoordinate(3, vector< RDouble >(4));
+    int iCapsule = 0;
+    for (int m = 0; m < ns; ++ m)
+    {
+        int spst = (* nsp)[m];
+        int js = (* nsj)[m];
+        for (int j = 0; j < js - 1; ++ j)
+        {
+            int is = (* nsi)[m];
+            for (int i = 0; i < is - 1; ++ i)
+            {
+                nd[0] = spst + is * j + i;
+                nd[1] = spst + is * j + (i + 1);
+                nd[2] = spst + is * (j + 1) + i;
+                nd[3] = spst + is * (j + 1) + (i + 1);
+
+                CopyNodeCoordinate(nodeCoordinate, phy, nd);
+
+                ProduceCasing(nodeCoordinate, iCapsule);
+
+                iCapsule += 1;
+            }
+        }
+    }
+
+    return;
+}
+
+void HoleGrid::ProbeCellsInHole()
+{
+    using namespace PHMPI;
+
+    for (int iSmile = zone_st; iSmile <= zone_ed; ++ iSmile)
+    {
+        int iZone = PHSPACE::GetZoneInverseIndex(iSmile);
+
+        StructGrid * grid = PHSPACE::GetStructGrid(iZone);
+
+        if (! grid) continue;
+
+        grid->ProbeHoleCell(this);
+    }
+}
+
+void HoleGrid::ProbeBorderCell(int iType, int jType)
+{
+    using namespace PHMPI;
+    int numberOfProcessors = PHMPI::GetNumberOfProcessor();
+    vector< int > * friendPoint = new vector< int > [numberOfProcessors];
+    vector< int > * friendZone  = new vector< int > [numberOfProcessors];
+
+    vector< int > myPoint, myZone;
+
+    for (int iSmile = zone_st; iSmile <= zone_ed; ++ iSmile)
+    {
+        int iZone = PHSPACE::GetZoneInverseIndex(iSmile);
+        StructGrid * grid = PHSPACE::GetStructGrid(iZone);
+        if (! grid) continue;
+        grid->ProbeBorderCell(iType, jType, friendPoint, friendZone);
+    }
+        
+    int myid = PHMPI::GetCurrentProcessorID();
+
+    //std_mm
+    for (int ip = 0; ip < numberOfProcessors; ++ ip)
+    {
+        if (ip != myid)
+        {
+            int nfps = static_cast<int>(friendPoint[ip].size());
+            PH_Send(& nfps, sizeof(int), ip, 0);
+
+            if (nfps == 0) continue;
+
+            PH_Send(& friendPoint[ip][0], nfps * sizeof(int), ip, 0);
+            PH_Send(& friendZone[ip][0],  nfps * sizeof(int), ip, 0);
+        }
+        else
+        {
+            int nfps = 0;
+            for (int jp = 0; jp < numberOfProcessors; ++ jp)
+            {
+                if (jp == myid) continue;
+                PH_Receive(& nfps, sizeof(int), jp, 0);
+
+                if (nfps == 0) continue;
+                vector< int > carrier(nfps);
+
+                PH_Receive(& carrier[0], nfps * sizeof(int), jp, 0);
+                myPoint.insert(myPoint.end(), carrier.begin(), carrier.end());
+
+                PH_Receive(& carrier[0], nfps * sizeof(int), jp, 0);
+                myZone.insert(myZone.end(), carrier.begin(), carrier.end());
+            }
+        }
+    }
+
+    delete [] friendPoint; friendPoint = NULL;
+    delete [] friendZone ; friendZone  = NULL;
+
+    uint_t numberOfPoints = myPoint.size();
+    for(int pCounter = 0; pCounter < numberOfPoints; ++ pCounter)
+    {
+        int zoneIndex = myZone[pCounter];
+        int globalPointLabel = myPoint[pCounter];
+        StructGrid * grid = PHSPACE::GetStructGrid(zoneIndex);
+        grid->ColorOverlapCell(globalPointLabel, jType);
+    }
+
+    return;
+}
+
+LIB_EXPORT int HoleGrid::GetCellColor(RDouble x, RDouble y, RDouble z, RDouble far)
+{
+    vector< RDouble > pst(3), ped(3), xqd(4), yqd(4), zqd(4), pp_ist(6);
+    vector< RDouble > xi, yi, zi, xs, ys, zs;
+
+    vector< RDouble > & box = * this->box;
+    if(x < box[0] || x > box[1] || y < box[2] || y > box[3] || z < box[4] || z > box[5])
+    {
+        return GENERIC_COLOR;
+    }
+
+    pst[0] = x; ped[0] = x;
+    pst[1] = y; ped[1] = far;
+    pst[2] = z; ped[2] = z;
+
+    vector< int > nd(4);
+    int i_cap = -1;
+    for (int m = 0; m < ns; ++ m)
+    {
+        int spst = (* nsp)[m];
+
+        int js = (* nsj)[m];
+        for (int j = 0; j < js - 1; ++ j)
+        {
+            int is = (* nsi)[m];
+            for (int i = 0; i < is - 1; ++ i)
+            {
+                nd[0] = spst + is * j + i;
+                nd[1] = spst + is * j + (i + 1);
+                nd[2] = spst + is * (j + 1) + i;
+                nd[3] = spst + is * (j + 1) + (i + 1);
+
+                i_cap += 1; //very important part!
+
+                RDouble xqmin = (* (* capsule)[i_cap])[0];
+                RDouble xqmax = (* (* capsule)[i_cap])[1];
+                if (x < xqmin || x > xqmax) continue;
+
+                RDouble zqmin = (* (* capsule)[i_cap])[4];
+                RDouble zqmax = (* (* capsule)[i_cap])[5];
+                if (z < zqmin || z > zqmax) continue;
+
+                for (int k = 0; k < 4; ++ k)
+                {
+                    xqd[k] = phy[0][nd[k]];
+                    yqd[k] = phy[1][nd[k]];
+                    zqd[k] = phy[2][nd[k]];
+                }
+
+                int pCounter = 0;
+                Radial_Triangle_Intersect(pst, ped, xqd, yqd, zqd, pp_ist, pCounter);
+
+                for (int ie = 0; ie < pCounter; ++ ie)
+                {
+                    xi.push_back(pp_ist[ie * 3 + 0]);
+                    yi.push_back(pp_ist[ie * 3 + 1]); 
+                    zi.push_back(pp_ist[ie * 3 + 2]);
+                }
+            }
+        }
+    }
+
+    uint_t microPoints = xi.size();
+    if (microPoints != 0)
+    {
+        xs.push_back(xi[0]); ys.push_back(yi[0]); zs.push_back(zi[0]);
+
+        for (int i = 1; i < microPoints; ++ i)
+        {
+            uint_t search_size = xs.size();
+            bool ifpushback = true;
+            for (int j = 0; j < search_size; ++ j)
+            {
+                RDouble distance = abs(xs[j] - xi[i]) + abs(ys[j] - yi[i]) + abs(zs[j] - zi[i]);
+                if (distance < 1.e-13)
+                {
+                    ifpushback = false;
+                    break;
+                }
+            }
+
+            if (ifpushback) 
+            {
+                xs.push_back(xi[i]); ys.push_back(yi[i]); zs.push_back(zi[i]);
+            }
+        }
+    }
+
+    uint_t numberOfViewPoints = xs.size();
+
+    if (numberOfViewPoints % 2 == 0)
+    {
+        return GENERIC_COLOR;
+    }
+    else
+    {
+        return IN_HOLE_COLOR;
+    }
+}
+
+void HoleGrid::CopyNodeCoordinate(vector< vector< RDouble > > & r, vector< vector< RDouble > > & s, vector< int > & node)
+{
+    for (int j = 0; j < 3; ++ j)
+    {
+        for (int i = 0; i < 4; ++ i)
+        {
+            int node_i = node[i];
+
+            r[j][i] = s[j][node_i];
+        }
+    }
+    return;
+}
+
+void HoleGrid::ProduceCasing(vector< vector< RDouble > > & nodeCoordinate, int i)
+{
+    vector< RDouble > & ss = * (* capsule)[i];
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        ss[2*m  ] = * min_element(nodeCoordinate[m].begin(), nodeCoordinate[m].end());
+        ss[2*m+1] = * max_element(nodeCoordinate[m].begin(), nodeCoordinate[m].end());
+    }
+
+    return;
+}
+
+void HoleGrid::Radial_Triangle_Intersect(vector<RDouble> & pst, vector<RDouble> & ped, vector<RDouble> & xqd, vector<RDouble> & yqd, vector<RDouble> & zqd, vector<RDouble> & pp_ist, int & pCounter)
+{
+    const int numberOfTriangles = 2;
+    int flag = 0;
+    vector<RDouble> direct(3), xx(4), bb(4);
+    vector< vector<RDouble> > amer(4, vector<RDouble>(4));
+
+    RDouble accumulator = 0.0;
+    for(int i = 0; i < 3; ++ i)
+    {
+        direct[i] = ped[i] - pst[i];
+        accumulator += direct[i] * direct[i];
+    }
+    accumulator = 1.0 / sqrt(accumulator);
+    for(int i = 0; i < 3; ++i)
+    {
+        direct[i] *= accumulator;
+    }
+
+    for(int iTriangle = 0; iTriangle < numberOfTriangles; ++iTriangle)
+    {
+        for(int j = 0; j < 3; ++j)
+        {
+            amer[0][j] = xqd[j+iTriangle];
+            amer[1][j] = yqd[j+iTriangle];
+            amer[2][j] = zqd[j+iTriangle];
+            amer[3][j] = 1.0;
+        }
+
+        for(int i = 0; i < 3; ++i)
+        {
+            amer[i][3] = -direct[i];
+            bb[i] = pst[i];
+        }
+        amer[3][3] = 0.0;
+        bb[3] = 1.0;
+
+        GaussElimination(amer, bb, 4, xx, flag);
+        if (flag == 0) continue;
+
+        if(xx[0] > 0.0 &&  xx[1] > 0.0 &&  xx[2] > 0.0 &&  xx[3] > 0.0)
+        {
+            for(int i = 0; i < 3; ++i)
+            {
+                pp_ist[3 * pCounter + i] = pst[i] + direct[i] * xx[3];
+            }
+            pCounter += 1;
+        }
+    }
+
+    return;
+}
+
+void HoleGrid::GaussElimination(vector< vector< RDouble > > & a, vector< RDouble > & b, int n, vector< RDouble > & x, int & flag)
+{
+    int is = 0;
+    flag = 1;
+    vector< int > js(n);
+
+    for(int k = 0; k < n-1; ++k)
+    {
+        RDouble d = 0.0;
+        for(int i = k; i < n; ++i)
+        {
+            for(int j = k; j < n; ++j)
+            {
+                if(abs(a[i][j]) > d)
+                {
+                    d = abs(a[i][j]);
+                    js[k] = j;
+                    is = i;
+                }
+            }
+        }
+
+        if (d < SMALL)
+        {
+            flag = 0;
+        }
+        else
+        {
+            if (js[k] != k)
+            {
+                for(int i = 0; i < n; ++i)
+                {
+                    RDouble t = a[i][k];
+                    a[i][k] = a[i][js[k]];
+                    a[i][js[k]] = t;
+                }
+            }
+
+            if(is != k)
+            {
+                for(int j = k; j < n; ++j)
+                {
+                    RDouble t = a[k][j];
+                    a[k][j] = a[is][j];
+                    a[is][j] = t;
+                }
+
+                RDouble t = b[k];
+                b[k] = b[is];
+                b[is] = t;
+            }
+        }
+
+        if(flag == 0) return;
+
+        RDouble sfn = 1.0/a[k][k];
+        for(int j = k+1; j < n; ++j)
+        {
+            a[k][j] *= sfn;
+        }
+
+        b[k] *= sfn;
+
+        for(int i = k+1; i < n; ++i)
+        {
+            for(int j = k+1; j < n; ++j)
+            {
+                a[i][j] -= a[i][k]*a[k][j];
+            }
+            b[i] -= a[i][k]*b[k];
+        }
+    }
+
+    if (abs(a[n-1][n-1]) < SMALL)
+    {
+        flag = 0;
+        return;
+    }
+
+    x[n-1] = b[n-1]/a[n-1][n-1];
+    for(int i = n-2; i >= 0; --i)
+    {
+        RDouble t = 0;
+        for(int j = i+1; j < n; ++j)
+        {
+            t += a[i][j]*x[j];
+        }
+        x[i] = b[i]-t;
+    }
+
+    js[n-1] = n-1;
+    for(int k = n-1; k >= 0; --k)
+    {
+        if(js[k] != k)
+        {
+            RDouble t = x[k];
+            x[k] = x[js[k]];
+            x[js[k]] = t;
+        }
+    }
+
+    return;
+}
+
+LIB_EXPORT Stainer::Stainer()
+{
+    holeGridContainer = NULL;
+    numberOfHoles = 0;
+}
+
+LIB_EXPORT Stainer::~Stainer()
+{
+    for (int iHole = 0; iHole < numberOfHoles; ++ iHole)
+    {
+        delete (* holeGridContainer)[iHole]; (* holeGridContainer)[iHole] = NULL;
+    }
+    delete holeGridContainer; holeGridContainer = NULL;
+}
+
+LIB_EXPORT void Stainer::ReadHoleData()
+{
+    using namespace PHMPI;
+    if(! PHSPACE::GetCodeOfDigHoles()) return;
+
+    int serverTmp = GetServerProcessorID();
+    fstream file;
+    string fileName = GlobalDataBase::GetStrParaFromDB("holeFullFileName");
+    ParallelOpenFile(file, fileName, ios_base::in|ios_base::binary);
+
+    PH_Read_Bcast(file, & numberOfHoles, sizeof(int), serverTmp);
+    holeGridContainer = new vector< HoleGrid* >(numberOfHoles, NULL);
+
+    vector< int > holeZoneStart(numberOfHoles), holeZoneEnd(numberOfHoles), holeZoneAttached(numberOfHoles), numberOfHoleSurfaces(numberOfHoles), numberOfHolePoints(numberOfHoles);
+    PH_Read_Bcast(file, & holeZoneStart[0],        numberOfHoles * sizeof(int), serverTmp);
+    PH_Read_Bcast(file, & holeZoneEnd[0],          numberOfHoles * sizeof(int), serverTmp);
+    PH_Read_Bcast(file, & holeZoneAttached[0],     numberOfHoles * sizeof(int), serverTmp);
+    PH_Read_Bcast(file, & numberOfHoleSurfaces[0], numberOfHoles * sizeof(int), serverTmp);
+    PH_Read_Bcast(file, & numberOfHolePoints[0],   numberOfHoles * sizeof(int), serverTmp);
+
+    for (int iHole = 0; iHole < numberOfHoles; ++ iHole)
+    {
+        HoleGrid* holeGrid = new HoleGrid();
+        holeGrid->SetZoneStart      (holeZoneStart[iHole]       );
+        holeGrid->SetZoneEnd        (holeZoneEnd[iHole]         );
+        holeGrid->SetZoneAttached   (holeZoneAttached[iHole]    );
+        holeGrid->SetNumberOfSurface(numberOfHoleSurfaces[iHole]);
+        holeGrid->SetNumberOfPoints (numberOfHolePoints[iHole]  );
+
+        holeGrid->GenerateSurfaceSpace();
+        PH_Read_Bcast(file, holeGrid->GetNSI(), numberOfHoleSurfaces[iHole] * sizeof(int), serverTmp);
+        PH_Read_Bcast(file, holeGrid->GetNSJ(), numberOfHoleSurfaces[iHole] * sizeof(int), serverTmp);
+        PH_Read_Bcast(file, holeGrid->GetNSP(), numberOfHoleSurfaces[iHole] * sizeof(int), serverTmp);
+
+        holeGrid->GeneratePointSpace();
+        PH_Read_Bcast(file, holeGrid->GetX(), numberOfHolePoints[iHole] * sizeof(RDouble), serverTmp);
+        PH_Read_Bcast(file, holeGrid->GetY(), numberOfHolePoints[iHole] * sizeof(RDouble), serverTmp);
+        PH_Read_Bcast(file, holeGrid->GetZ(), numberOfHolePoints[iHole] * sizeof(RDouble), serverTmp);
+
+        (* holeGridContainer)[iHole] = holeGrid;
+    }
+
+    ParallelCloseFile(file);
+}
+
+LIB_EXPORT void Stainer::ProbeOversetCells()
+{
+    PaintGenericColor();
+
+    ProbeInternalOverlapCells();
+
+    ProbeExternalOverlapCells();
+}
+
+void Stainer::PaintGenericColor()
+{
+    using namespace PHMPI;
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        StructGrid * grid = (* structGridTable)[iZone];
+        
+        if (! grid) continue;
+
+        int * iBlank = grid->GetCellTypeContainer();
+        int numberOfCells       = grid->GetNTotalCell();
+        for(int iCell = 0; iCell < numberOfCells; ++iCell)
+        {
+            iBlank[iCell] = GENERIC_COLOR;
+        }
+    }
+
+    return;
+}
+
+void Stainer::ProbeInternalOverlapCells()
+{
+    using namespace PHMPI;
+
+    if (! PHSPACE::GetCodeOfDigHoles()) return;
+    for (int iHole = 0; iHole < numberOfHoles; ++ iHole)
+    {
+        HoleGrid* holeGrid = (* holeGridContainer)[iHole];
+        holeGrid->DigHoles();
+    }
+    EraseSecondColor();
+
+    int numberOfInternalOversetCells = 0;
+    int numberOfCellsInHole          = 0;
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        StructGrid * grid = PHSPACE::GetStructGrid(iZone);
+        if(! grid) continue;
+        grid->GatherCellsByColor(numberOfCellsInHole, IN_HOLE_COLOR);
+        grid->GatherCellsByColor(numberOfInternalOversetCells, OVERSET_COLOR);
+    }
+
+    cout << "number of internal overset cells = " << numberOfInternalOversetCells << endl;
+    cout << "number of cells in hole          = " << numberOfCellsInHole << endl;
+
+    return;
+}
+
+void Stainer::ProbeExternalOverlapCells()
+{
+    using namespace PHMPI;
+
+    int borderCellCounter = 0;
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        StructGrid * grid = PHSPACE::GetStructGrid(iZone);
+
+        if (! grid) continue;
+
+        grid->ProbeExternalOverlapCells(borderCellCounter);
+    }
+
+    cout << "number of external overset cells = " << borderCellCounter << endl;
+
+    return;
+}
+
+void Stainer::EraseSecondColor()
+{
+    using namespace PHMPI;
+    
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        StructGrid * grid = PHSPACE::GetStructGrid(iZone);
+        if (! grid) continue;
+        grid->ResetCellType();
+    }
+
+    return;
+}
+
+
+LIB_EXPORT BackgroundTree :: BackgroundTree ()
+{
+    unitCellCapsule = NULL;
+
+    inf_plane = NULL;
+    sup_plane = NULL;
+
+    zone_location = NULL;
+    i_location    = NULL;
+    j_location    = NULL;
+    k_location    = NULL;
+
+    fruitLevel = NULL;
+    fruitInheritMapping = NULL;
+
+    isEmptyBinaryTree = false;
+    zone_st = 0;
+    zone_ed = 0;
+    numberOfUnitCells = 0;
+}
+
+LIB_EXPORT BackgroundTree ::~BackgroundTree ()
+{
+    delete [] unitCellCapsule; unitCellCapsule = NULL;
+
+    delete [] inf_plane; inf_plane = NULL;
+    delete [] sup_plane; sup_plane = NULL;
+
+    delete [] zone_location; zone_location = NULL;
+    delete [] i_location; i_location = NULL;
+    delete [] j_location; j_location = NULL;
+    delete [] k_location; k_location = NULL;
+
+    delete [] fruitLevel; fruitLevel = NULL;
+    delete [] fruitInheritMapping; fruitInheritMapping = NULL;
+}
+
+LIB_EXPORT void BackgroundTree ::Generate(int zone_st, int zone_ed)
+{
+    SetZoneViewRange(zone_st, zone_ed);
+
+    ComputeNumberOfUnitCells();
+
+    if (IsEmpty()) return;
+
+    GenerateSourceSpace();
+
+    ComputeUnitCellCapsule();
+
+    InitFruitLevelAndInheritMapping();
+
+    ComputeRootSpaceParameter();
+
+    AppendNewFruit();
+
+    return;
+}
+
+void BackgroundTree ::ComputeNumberOfUnitCells()
+{
+    using namespace PHMPI;
+
+    int counter = 0;
+    for(int iSmile = zone_st; iSmile <= zone_ed; ++iSmile)
+    {
+        int iZone = PHSPACE::GetZoneInverseIndex(iSmile);
+
+        StructGrid * grid = PHSPACE::GetStructGrid(iZone);
+
+        if(! grid) continue;
+
+        counter += grid->GetNTotalNode();
+    }
+
+    numberOfUnitCells = counter;// unitCell(i,j,k)<-->node(i,j,k)
+
+    if (numberOfUnitCells == 0) isEmptyBinaryTree = true; //very important part!
+
+    return;
+}
+
+void BackgroundTree ::GenerateSourceSpace()
+{
+    zone_location = new int [numberOfUnitCells];
+    i_location    = new int [numberOfUnitCells];
+    j_location    = new int [numberOfUnitCells];
+    k_location    = new int [numberOfUnitCells];
+
+    unitCellCapsule = new vector< RDouble >[numberOfUnitCells];
+    inf_plane = new vector< RDouble >[numberOfUnitCells];
+    sup_plane = new vector< RDouble >[numberOfUnitCells];
+
+    fruitLevel    = new int [numberOfUnitCells];
+    fruitInheritMapping = new vector< int >[numberOfUnitCells];
+
+    for (int iUnitCell = 0; iUnitCell < numberOfUnitCells; ++ iUnitCell)
+    {
+        unitCellCapsule[iUnitCell].resize(6);
+        inf_plane[iUnitCell].resize(6);
+        sup_plane[iUnitCell].resize(6);
+        fruitInheritMapping[iUnitCell].resize(3);
+    }
+    return;
+}
+
+void BackgroundTree ::ComputeUnitCellCapsule()
+{
+    using namespace PHMPI;
+    int iUnitCell = 0;
+    for (int iSmile = zone_st; iSmile <= zone_ed; ++ iSmile)
+    {
+        int iZone = PHSPACE::GetZoneInverseIndex(iSmile);
+
+        StructGrid * grid = PHSPACE::GetStructGrid(iZone);
+
+        if(! grid) continue;
+
+        grid->ComputeUnitCellCapsule(this, iUnitCell);
+    }
+
+    return;
+}
+
+LIB_EXPORT void BackgroundTree ::SetUnitCellParameter(int iUnitCell, vector< RDouble > & xx, vector< RDouble > & yy, vector< RDouble > & zz)
+{
+    unitCellCapsule[iUnitCell][0] = * min_element(xx.begin(), xx.end());
+    unitCellCapsule[iUnitCell][1] = * min_element(yy.begin(), yy.end());
+    unitCellCapsule[iUnitCell][2] = * min_element(zz.begin(), zz.end());
+
+    unitCellCapsule[iUnitCell][3] = * max_element(xx.begin(), xx.end());
+    unitCellCapsule[iUnitCell][4] = * max_element(yy.begin(), yy.end());
+    unitCellCapsule[iUnitCell][5] = * max_element(zz.begin(), zz.end());
+
+    return;
+}
+
+void BackgroundTree ::InitFruitLevelAndInheritMapping()
+{
+    for(int iUnitCell = 0; iUnitCell < numberOfUnitCells; ++iUnitCell)
+    {
+        fruitLevel[iUnitCell] = 0;
+
+        for(int j = 0; j < 3; ++j)
+        {
+            fruitInheritMapping[iUnitCell][j] = 0;
+        }
+    }
+
+    return;
+}
+
+void BackgroundTree ::ComputeRootSpaceParameter()
+{
+    const int ROOT_NODE_INDEX = 0;
+
+    vector< RDouble > infimumOfRootSpace(3), supremumOfRootSpace(3);
+    vector< RDouble > carrier(numberOfUnitCells);
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        for (int iUnitCell = 0; iUnitCell < numberOfUnitCells; ++ iUnitCell)
+        {
+            carrier[iUnitCell] = unitCellCapsule[iUnitCell][m];
+        }
+        infimumOfRootSpace[m] = * min_element(carrier.begin(), carrier.end());
+
+        for (int iUnitCell = 0; iUnitCell < numberOfUnitCells; ++ iUnitCell)
+        {
+            carrier[iUnitCell] = unitCellCapsule[iUnitCell][m + 3];
+        }
+        supremumOfRootSpace[m] = * max_element(carrier.begin(), carrier.end());
+    }
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        inf_plane[ROOT_NODE_INDEX][m] = infimumOfRootSpace[m];
+        sup_plane[ROOT_NODE_INDEX][m] = supremumOfRootSpace[m];
+
+        inf_plane[ROOT_NODE_INDEX][m + 3] = infimumOfRootSpace[m];
+        sup_plane[ROOT_NODE_INDEX][m + 3] = supremumOfRootSpace[m];
+    }
+
+    cout << "Root node coordinate: " << endl;
+    cout << "(xmin, ymin, zmin) = " << "(" << infimumOfRootSpace[0]  << ", " << infimumOfRootSpace[1]  << ", " << infimumOfRootSpace[2]  << ")" << endl;
+    cout << "(xmax, ymax, zmax) = " << "(" << supremumOfRootSpace[0] << ", " << supremumOfRootSpace[1] << ", " << supremumOfRootSpace[2] << ")" << endl;
+
+    return;
+}
+
+bool BackgroundTree ::UnitCellCapsuleBelongsToNewNode(vector< RDouble > & capsule, vector< RDouble > & inf_plane, vector< RDouble > & sup_plane)
+{
+    if(inf_plane[0] <= capsule[0] && capsule[0] <= sup_plane[0] && 
+        inf_plane[1] <= capsule[1] && capsule[1] <= sup_plane[1] &&
+        inf_plane[2] <= capsule[2] && capsule[2] <= sup_plane[2] &&
+        inf_plane[3] <= capsule[3] && capsule[3] <= sup_plane[3] &&
+        inf_plane[4] <= capsule[4] && capsule[4] <= sup_plane[4] &&
+        inf_plane[5] <= capsule[5] && capsule[5] <= sup_plane[5])
+    {
+        return true;
+    }
+    else
+    {
+        return false;
+    }
+}
+
+bool BackgroundTree ::PointBelongsToUnitCellCapsule(RDouble xx, RDouble yy, RDouble zz, vector< RDouble > & capsule)
+{
+    const RDouble EPS = 1.e-20;
+    if (capsule[0] <= xx+EPS && xx <= capsule[3]+EPS &&
+         capsule[1] <= yy+EPS && yy <= capsule[4]+EPS &&
+         capsule[2] <= zz+EPS && zz <= capsule[5]+EPS)
+    {
+        return true;
+    }
+    else
+    {
+        return false;
+    }
+}
+
+bool BackgroundTree ::PointBelongsToNewNode(RDouble xx, RDouble yy, RDouble zz, int kNode)
+{
+    if (kNode == 0) return false;
+
+    if (inf_plane[kNode][0] <= xx && xx <= sup_plane[kNode][3] &&
+         inf_plane[kNode][1] <= yy && yy <= sup_plane[kNode][4] &&
+         inf_plane[kNode][2] <= zz && zz <= sup_plane[kNode][5])
+    {
+        return true;
+    }
+    else
+    {
+        return false;
+    }
+}
+
+void BackgroundTree ::ProduceNewLeftNode(int kNode, vector< RDouble > & inf_left, vector< RDouble > & sup_left)
+{
+    int j = (fruitLevel[kNode] + 1) % 6;
+
+    for (int i = 0; i < 6; ++ i)
+    {
+        inf_left[i] = inf_plane[kNode][i];
+        if (i == j)
+        {
+            sup_left[i] = 0.5 * (inf_plane[kNode][i] + sup_plane[kNode][i]);
+        }
+        else
+        {
+            sup_left[i] = sup_plane[kNode][i];
+        }
+    }
+
+    return;
+}
+
+void BackgroundTree ::ProduceNewRightNode(int kNode, vector< RDouble > & inf_right, vector< RDouble > & sup_right)
+{
+    int j = (fruitLevel[kNode] + 1) % 6;
+    for(int i = 0; i < 6; ++ i)
+    {
+        if(i == j)
+        {
+            inf_right[i] = 0.5 * (inf_plane[kNode][i] + sup_plane[kNode][i]);
+        }
+        else
+        {
+            inf_right[i] = inf_plane[kNode][i];
+        }
+        sup_right[i] = sup_plane[kNode][i];
+    }
+
+    return;
+}
+
+void BackgroundTree ::AppendNewLeftNode(int iUnitCell, int kNode, vector< RDouble > & inf_new_node, vector< RDouble > & sup_new_node)
+{
+    const int LEFT = 0, PARENT = 1;
+
+    fruitInheritMapping[kNode][LEFT] = iUnitCell;
+    fruitInheritMapping[iUnitCell][PARENT] = kNode;
+    fruitLevel[iUnitCell] = fruitLevel[kNode] + 1;
+    inf_plane[iUnitCell] = inf_new_node;
+    sup_plane[iUnitCell] = sup_new_node;
+
+    return;
+}
+
+void BackgroundTree ::AppendNewRightNode(int iUnitCell, int kNode, vector< RDouble > & inf_new_node, vector< RDouble > & sup_new_node)
+{
+    const int PARENT = 1, RIGHT = 2;
+
+    fruitInheritMapping[kNode][RIGHT] = iUnitCell;
+    fruitInheritMapping[iUnitCell][PARENT] = kNode;
+    fruitLevel[iUnitCell] = fruitLevel[kNode] + 1;
+    inf_plane[iUnitCell] = inf_new_node;
+    sup_plane[iUnitCell] = sup_new_node;
+
+    return;
+}
+
+void BackgroundTree ::ComputeLocalCoordinateByNewtonMethod(RDouble xx, RDouble yy, RDouble zz, vector< RDouble > & ss, vector< int > & node)
+{
+    uint_t node_size = fruitIndexStorage.size();
+
+    for(int i = 0; i < node_size; ++ i)
+    {
+        int nodeIndex = fruitIndexStorage[i];
+        int iZone = zone_location[nodeIndex];
+        int iCore = i_location[nodeIndex];
+        int jCore = j_location[nodeIndex];
+        int kCore = k_location[nodeIndex];
+
+        StructGrid * grid = PHSPACE::GetStructGrid(iZone);
+        grid->ComputeLocalCoordinateByNewtonMethod(iCore, jCore, kCore, xx, yy, zz, ss, node);
+
+        if (! ss.empty()) break;
+    }
+
+    return;
+}
+
+LIB_EXPORT void BackgroundTree ::ProbeNearestPoint(RDouble xx, RDouble yy, RDouble zz, RDouble & distance, int & index)
+{
+    vector< RDouble > ss;
+    vector< int > globalPointIndex;
+
+    for(int iSmile = zone_st; iSmile <= zone_ed; ++ iSmile)
+    {
+        int iZone = PHSPACE::GetZoneInverseIndex(iSmile);
+
+        StructGrid * grid = PHSPACE::GetStructGrid(iZone);
+
+        if(! grid) continue;
+
+        grid->ProbeNearestPoint(xx, yy, zz, ss, globalPointIndex);
+    }
+
+    distance = ss[0];
+    index = globalPointIndex[0];
+
+    uint_t numberOfPoints = globalPointIndex.size();
+    for (int i = 1; i < numberOfPoints; ++ i)
+    {
+        if (ss[i] < distance)
+        {
+            distance = ss[i];
+            index = globalPointIndex[i];
+        }
+    }
+
+    return;
+}
+
+void BackgroundTree ::AppendNewFruit()
+{
+    for (int iUnitCell = 0; iUnitCell < numberOfUnitCells; ++ iUnitCell)
+    {
+        AppendNewFruit(iUnitCell);
+    }
+
+    return;
+}
+
+LIB_EXPORT void BackgroundTree ::SearchNodes(OversetCellCollector  * oversetCellCollector, RDouble xx, RDouble yy, RDouble zz, int ip, int iElement)
+{
+    fruitIndexStorage.clear();
+
+    SearchNodes(xx, yy, zz, 0);
+
+    if(fruitIndexStorage.empty())
+    {
+        RDouble distance = 0.0;
+        int index = -1;
+        ProbeNearestPoint(xx, yy, zz, distance, index);
+        oversetCellCollector->SetNearestPointParameter(ip, iElement, distance, index);
+    }
+    else
+    {
+        vector< int > node;
+        vector< RDouble > ss;
+        ComputeLocalCoordinateByNewtonMethod(xx, yy, zz, ss, node);
+        if (! ss.empty())
+        {
+            oversetCellCollector->SetOptimalPointParameter(ip, iElement, ss, node);
+        }
+        else
+        {
+            RDouble distance = 0.0;
+            int index = -1;
+            ProbeNearestPoint(xx, yy, zz, distance, index);
+            oversetCellCollector->SetNearestPointParameter(ip, iElement, distance, index);
+        }
+    }
+
+    return;
+}
+
+void BackgroundTree ::SearchNodes(RDouble xx, RDouble yy, RDouble zz, int n)
+{
+    const int LEFT = 0, RIGHT = 2;
+
+    vector< RDouble > & capsule = unitCellCapsule[n];
+    if (PointBelongsToUnitCellCapsule(xx, yy, zz, capsule))
+    {
+        fruitIndexStorage.push_back(n);
+    }
+
+    int leftNodeIndex = fruitInheritMapping[n][LEFT];
+    if (PointBelongsToNewNode(xx, yy, zz, leftNodeIndex))
+    {
+        SearchNodes(xx, yy, zz, leftNodeIndex);
+    }
+
+    int rightNodeIndex = fruitInheritMapping[n][RIGHT];
+    if (PointBelongsToNewNode(xx, yy, zz, rightNodeIndex))
+    {
+        SearchNodes(xx, yy, zz, rightNodeIndex);
+    }
+
+    return;
+}
+
+void BackgroundTree ::AppendNewFruit(int iUnitCell)
+{
+    const int ROOT_NODE_INDEX = 0;
+    const int LEFT = 0, RIGHT = 2;
+
+    vector< RDouble > inf_new_node(6), sup_new_node(6);
+
+    if (iUnitCell == ROOT_NODE_INDEX) return;
+
+    int kNode = ROOT_NODE_INDEX;
+    vector< RDouble > & capsule = unitCellCapsule[iUnitCell];
+
+    while (true)
+    {
+        int kLeftNode = fruitInheritMapping[kNode][LEFT];
+        if (kLeftNode != 0)
+        {
+            if (UnitCellCapsuleBelongsToNewNode(capsule, inf_plane[kLeftNode], sup_plane[kLeftNode]))
+            {
+                kNode = kLeftNode;
+                continue;
+            }
+        }
+        else
+        {
+            ProduceNewLeftNode(kNode, inf_new_node, sup_new_node);
+
+            if (UnitCellCapsuleBelongsToNewNode(capsule, inf_new_node, sup_new_node))
+            {
+                AppendNewLeftNode(iUnitCell, kNode, inf_new_node, sup_new_node);
+                
+                break;
+            }
+        }
+
+        int kRightNode = fruitInheritMapping[kNode][RIGHT];
+        if (kRightNode != 0)
+        {
+            if (UnitCellCapsuleBelongsToNewNode(capsule, inf_plane[kRightNode], sup_plane[kRightNode]))
+            {
+                kNode = kRightNode;
+                continue;
+            }
+        }
+        else
+        {
+            ProduceNewRightNode(kNode, inf_new_node, sup_new_node);
+
+            if (UnitCellCapsuleBelongsToNewNode(capsule, inf_new_node, sup_new_node))
+            {
+                AppendNewRightNode(iUnitCell, kNode, inf_new_node, sup_new_node);
+                
+                break;
+            }
+        }
+    }
+
+    return;
+}
+
+LIB_EXPORT OversetCellCollector ::OversetCellCollector ()
+{
+    localCellIndex = NULL;
+    zoneIndex      = NULL;
+    xCenter        = NULL;
+    yCenter        = NULL;
+    zCenter        = NULL;
+
+    spaceLattice   = NULL;
+    xLocal         = NULL;
+    yLocal         = NULL;
+    zLocal         = NULL;
+    radius         = NULL;
+    zone_st        = 0;
+    zone_ed        = 0;
+}
+
+LIB_EXPORT OversetCellCollector ::~OversetCellCollector ()
+{
+    delete [] localCellIndex; localCellIndex = NULL;
+    delete [] zoneIndex; zoneIndex = NULL;
+    delete [] xCenter; xCenter = NULL;
+    delete [] yCenter; yCenter = NULL;
+    delete [] zCenter; zCenter = NULL;
+
+    delete [] spaceLattice; spaceLattice = NULL;
+    delete [] xLocal; xLocal = NULL;
+    delete [] yLocal; yLocal = NULL;
+    delete [] zLocal; zLocal = NULL;
+    delete [] radius; radius = NULL;
+}
+
+void OversetCellCollector ::GenerateServiceSpace()
+{
+    using namespace PHMPI;
+    const int NODE_NUM = 8;
+    int numberOfProcessors = PHMPI::GetNumberOfProcessor();
+
+    spaceLattice = new vector< int > [numberOfProcessors];
+    xLocal       = new vector< RDouble > [numberOfProcessors];
+    yLocal       = new vector< RDouble > [numberOfProcessors];
+    zLocal       = new vector< RDouble > [numberOfProcessors];
+    radius       = new vector< RDouble > [numberOfProcessors];
+
+    for (int ip = 0; ip < numberOfProcessors; ++ ip)
+    {
+        int numberOfOversetCells = elementNumberRecorder[ip];
+
+        spaceLattice[ip].resize(numberOfOversetCells * NODE_NUM);
+
+        xLocal[ip].resize(numberOfOversetCells);
+        yLocal[ip].resize(numberOfOversetCells);
+        zLocal[ip].resize(numberOfOversetCells);
+        radius[ip].resize(numberOfOversetCells);
+    }
+    
+    return;
+}
+
+LIB_EXPORT void OversetCellCollector ::SearchOptimalUnitCell(BackgroundTree  * backgroundTree)
+{
+    using namespace PHMPI;
+
+    if (! backgroundTree->IsEmpty())
+    {
+        int numberOfProcessors = PHMPI::GetNumberOfProcessor();
+        for (int ip = 0; ip < numberOfProcessors; ++ ip)
+        {
+            int numberOfElements = elementNumberRecorder[ip];
+            for(int iElement = 0; iElement < numberOfElements; ++ iElement)
+            {
+                RDouble xx = xCenter[ip][iElement];
+                RDouble yy = yCenter[ip][iElement];
+                RDouble zz = zCenter[ip][iElement];
+
+                backgroundTree->SearchNodes(this, xx, yy, zz, ip, iElement);
+            }
+        }
+    }
+    else
+    {
+        SetVirtualPointParameter();
+    }
+
+    return;
+}
+
+void OversetCellCollector ::GenerateTargetSpace()
+{
+    using namespace PHMPI;
+
+    int numberOfProcessors = PHMPI::GetNumberOfProcessor();
+
+    localCellIndex = new vector< int > [numberOfProcessors];
+    zoneIndex      = new vector< int > [numberOfProcessors];
+
+    xCenter = new vector< RDouble > [numberOfProcessors];
+    yCenter = new vector< RDouble > [numberOfProcessors];
+    zCenter = new vector< RDouble > [numberOfProcessors];
+
+    elementNumberRecorder = vector< int >(numberOfProcessors, 0);
+
+    return;
+}
+
+LIB_EXPORT void OversetCellCollector ::RunGeometricAnalysis(int zone_st, int zone_ed)
+{
+    SetZoneViewRange(zone_st, zone_ed);
+
+    GenerateTargetSpace();
+
+    CollectOversetCells();
+
+    BcastOversetCells();
+
+    GenerateServiceSpace();
+
+    return;
+}
+
+void OversetCellCollector ::BcastOversetCells()
+{
+    using namespace PHMPI;
+
+    int numberOfProcessors = PHMPI::GetNumberOfProcessor();
+    for (int ip = 0; ip < numberOfProcessors; ++ ip)
+    {
+        int numberOfOversetCells = static_cast<int>(localCellIndex[ip].size());
+        PH_Bcast(& numberOfOversetCells, sizeof(int), ip, 0);
+        elementNumberRecorder[ip] = numberOfOversetCells;
+
+        if (numberOfOversetCells == 0) continue;
+
+        localCellIndex[ip].resize(numberOfOversetCells);
+        PH_Bcast(& localCellIndex[ip][0], numberOfOversetCells * sizeof(int), ip, 0);
+
+        zoneIndex[ip].resize(numberOfOversetCells);
+        PH_Bcast(& zoneIndex[ip][0], numberOfOversetCells * sizeof(int), ip, 0);
+
+        xCenter[ip].resize(numberOfOversetCells);
+        PH_Bcast(& xCenter[ip][0], numberOfOversetCells * sizeof(RDouble), ip, 0);
+
+        yCenter[ip].resize(numberOfOversetCells);
+        PH_Bcast(& yCenter[ip][0], numberOfOversetCells * sizeof(RDouble), ip, 0);
+
+        zCenter[ip].resize(numberOfOversetCells);
+        PH_Bcast(& zCenter[ip][0], numberOfOversetCells * sizeof(RDouble), ip, 0);
+    }
+
+    return;
+}
+
+void OversetCellCollector ::CollectOversetCells()
+{
+    using namespace PHMPI;
+
+    int myid = PHMPI::GetCurrentProcessorID();
+
+    for(int iSmile = zone_st; iSmile <= zone_ed; ++ iSmile)
+    {
+        int iZone = PHSPACE::GetZoneInverseIndex(iSmile);
+
+        StructGrid * grid = PHSPACE::GetStructGrid(iZone);
+
+        if (! grid) continue;
+
+        grid->CollectOversetCells(this, myid);
+    }
+
+    return;
+}
+
+void OversetCellCollector ::ProbeNearestPoint(BackgroundTree  * backgroundTree, RDouble xx, RDouble yy, RDouble zz, int ip, int iElement)
+{
+    const int NODE_NUM = 8;
+    RDouble distance = 0.0;
+    int globalPointIndex = -1;
+
+    backgroundTree->ProbeNearestPoint(xx, yy, zz, distance, globalPointIndex);
+
+    xLocal[ip][iElement] = 0.0;
+    yLocal[ip][iElement] = 0.0;
+    zLocal[ip][iElement] = 0.0;
+
+    radius[ip][iElement] = distance;
+    
+    for(int iCell = 0; iCell < NODE_NUM; ++ iCell)
+    {
+        spaceLattice[ip][iElement * NODE_NUM + iCell] = globalPointIndex;
+    }
+
+    return;
+}
+
+LIB_EXPORT void OversetCellCollector ::ResizeSourceIndexContainer()
+{
+    using namespace PHMPI;
+
+    int myid = PHMPI::GetCurrentProcessorID();
+
+    int numberOfOversetCells = elementNumberRecorder[myid];
+
+    sourceProcessorIndex.resize(numberOfOversetCells);
+
+    int numberOfProcessors = PHMPI::GetNumberOfProcessor();
+
+    vector< RDouble > * trans = new vector< RDouble > [numberOfProcessors];
+    for (int ip = 0; ip < numberOfProcessors; ++ ip)
+    {
+        trans[ip].resize(numberOfOversetCells);
+    }
+
+    trans[myid] = radius[myid];
+
+    for (int ip = 0; ip < numberOfProcessors; ++ ip)
+    {
+        if (ip != myid)
+        {
+            int numberOfElements = elementNumberRecorder[ip];
+            PH_Send(& numberOfElements, sizeof(int), ip, 0);
+
+            if (numberOfElements == 0) continue;
+            PH_Send(&radius[ip][0], numberOfElements * sizeof(RDouble), ip, 0);
+        }
+        else
+        {
+            int numberOfElements = 0;
+            for (int jp = 0; jp < numberOfProcessors; ++ jp)
+            {
+                if (jp == myid) continue;
+                PH_Receive(& numberOfElements, sizeof(int), jp, 0);
+
+                if (numberOfElements == 0) continue;
+
+                PH_Receive(& trans[jp][0], numberOfElements * sizeof(RDouble), jp, 0);
+            }
+        }
+    }
+
+    for (int iElement = 0; iElement < numberOfOversetCells; ++ iElement)
+    {
+        RDouble distance = trans[0][iElement];
+        for (int ip = 1; ip < numberOfProcessors; ++ ip)
+        {
+            if (trans[ip][iElement] < distance)
+            {
+                distance = trans[ip][iElement];
+
+                sourceProcessorIndex[iElement] = ip;
+            }
+        }
+    }
+
+    delete [] trans; trans = NULL;
+
+    return;
+}
+
+
+LIB_EXPORT void OversetCellCollector ::CollectOversetCells(int iZone, vector< int > & cell, vector< RDouble > & xx, vector< RDouble > & yy, vector< RDouble > & zz)
+{
+    using namespace PHMPI;
+
+    int myid = PHMPI::GetCurrentProcessorID();
+    uint_t numberOfOversetCells = cell.size();
+
+    zoneIndex[myid].insert(zoneIndex[myid].end(), numberOfOversetCells, iZone);
+    localCellIndex[myid].insert(localCellIndex[myid].end(), cell.begin(), cell.end());
+    xCenter[myid].insert(xCenter[myid].end(), xx.begin(), xx.end());
+    yCenter[myid].insert(yCenter[myid].end(), yy.begin(), yy.end());
+    zCenter[myid].insert(zCenter[myid].end(), zz.begin(), zz.end());
+
+    return;
+}
+
+LIB_EXPORT void OversetCellCollector ::SetNearestPointParameter(int ip, int iElement, RDouble distance, int index)
+{
+    const int NODE_NUM = 8;
+
+    xLocal[ip][iElement] = 0.0;
+    yLocal[ip][iElement] = 0.0;
+    zLocal[ip][iElement] = 0.0;
+
+    radius[ip][iElement] = distance;
+    
+    for(int iCell = 0; iCell < NODE_NUM; ++ iCell)
+    {
+        spaceLattice[ip][iElement * NODE_NUM + iCell] = index;
+    }
+
+    return;
+}
+
+LIB_EXPORT void OversetCellCollector ::SetOptimalPointParameter(int ip, int iElement, vector< RDouble > & ss, vector< int > & node)
+{
+    const int NODE_NUM = 8;
+
+    xLocal[ip][iElement] = ss[0];
+    yLocal[ip][iElement] = ss[1];
+    zLocal[ip][iElement] = ss[2];
+
+    //WriteLogFile("ksai = ",ss[0],ss[1],ss[2]);
+
+    radius[ip][iElement] = 0.0;
+
+    for(int iCell = 0; iCell < NODE_NUM; ++ iCell)
+    {
+        spaceLattice[ip][iElement * NODE_NUM + iCell] = node[iCell];
+    }
+
+    return;
+}
+
+void OversetCellCollector ::SetVirtualPointParameter()
+{
+    using namespace PHMPI;
+
+    const int NODE_NUM = 8, VIRTUAL_POINT_LABEL = -1;
+    const RDouble FAR = 1.e20, RELATIVE_LOCATION = 0.0;
+
+    int numberOfProcessors = PHMPI::GetNumberOfProcessor();
+    for (int ip = 0; ip < numberOfProcessors; ++ ip)
+    {
+        int numberOfElements = elementNumberRecorder[ip];
+        for(int iElement = 0; iElement < numberOfElements; ++ iElement)
+        {
+            xLocal[ip][iElement] = RELATIVE_LOCATION;
+            yLocal[ip][iElement] = RELATIVE_LOCATION;
+            zLocal[ip][iElement] = RELATIVE_LOCATION;
+
+            radius[ip][iElement] = FAR;
+
+            for(int iCell = 0; iCell < NODE_NUM; ++ iCell)
+            {
+                spaceLattice[ip][iElement * NODE_NUM + iCell] = VIRTUAL_POINT_LABEL;
+            }
+        }
+    }
+
+    return;
+}
+
+LIB_EXPORT void OversetCellCollector ::InsertOversetParameter(vector< int > * zoneContainer, vector< int > * cellContainer)
+{
+    using namespace PHMPI;
+
+    int myid = PHMPI::GetCurrentProcessorID();
+
+    zoneContainer->insert(zoneContainer->end(), zoneIndex[myid].begin(),      zoneIndex[myid].end()     );
+    cellContainer->insert(cellContainer->end(), localCellIndex[myid].begin(), localCellIndex[myid].end());
+
+    return;
+}
+
+LIB_EXPORT void OversetCellCollector ::InsertServiceParameter(vector< RDouble > * ksai, vector< int > * waiter)
+{
+    using namespace PHMPI;
+
+    const int NODE_NUM = 8;
+
+    int numberOfProcessors = PHMPI::GetNumberOfProcessor();
+    int myid = PHMPI::GetCurrentProcessorID();
+    int numberOfOversetCells = elementNumberRecorder[myid];
+
+    vector< RDouble > xgroup(numberOfOversetCells), ygroup(numberOfOversetCells), zgroup(numberOfOversetCells);
+    vector< int > node_g(numberOfOversetCells * NODE_NUM);
+
+    vector< RDouble > * x_trans = new vector< RDouble > [numberOfProcessors];
+    vector< RDouble > * y_trans = new vector< RDouble > [numberOfProcessors];
+    vector< RDouble > * z_trans = new vector< RDouble > [numberOfProcessors];
+    vector< int > * node_trans = new vector< int >    [numberOfProcessors];
+
+    
+    for (int ip = 0; ip < numberOfProcessors; ++ ip)
+    {
+        x_trans[ip].resize(numberOfOversetCells);
+        y_trans[ip].resize(numberOfOversetCells);
+        z_trans[ip].resize(numberOfOversetCells);
+
+        node_trans[ip].resize(numberOfOversetCells * NODE_NUM);
+    }
+
+    x_trans[myid] = xLocal[myid];
+    y_trans[myid] = yLocal[myid];
+    z_trans[myid] = zLocal[myid];
+
+    node_trans[myid] = spaceLattice[myid];
+
+    for (int ip = 0; ip < numberOfProcessors; ++ ip)
+    {
+        if (ip != myid)
+        {
+            int numberOfElements = elementNumberRecorder[ip];
+            PH_Send(& numberOfElements, sizeof(int), ip, 0);
+
+            if (numberOfElements == 0) continue;
+
+            PH_Send(&xLocal[ip][0], numberOfElements * sizeof(RDouble), ip, 0);
+            PH_Send(&yLocal[ip][0], numberOfElements * sizeof(RDouble), ip, 0);
+            PH_Send(&zLocal[ip][0], numberOfElements * sizeof(RDouble), ip, 0);
+
+            PH_Send(&spaceLattice[ip][0], numberOfElements * NODE_NUM * sizeof(int), ip, 0);
+        }
+        else
+        {
+            int numberOfElements = 0;
+            for (int jp = 0; jp < numberOfProcessors; ++ jp)
+            {
+                if (jp == myid) continue;
+                PH_Receive(& numberOfElements, sizeof(int), jp, 0);
+
+                if (numberOfElements == 0) continue;
+
+                PH_Receive(& x_trans[jp][0], numberOfElements * sizeof(RDouble), jp, 0);
+                PH_Receive(& y_trans[jp][0], numberOfElements * sizeof(RDouble), jp, 0);
+                PH_Receive(& z_trans[jp][0], numberOfElements * sizeof(RDouble), jp, 0);
+
+                PH_Receive(& node_trans[jp][0], numberOfElements * NODE_NUM * sizeof(int), jp, 0);
+            }
+        }
+    }
+
+
+    for (int iElement = 0; iElement < numberOfOversetCells; ++ iElement)
+    {
+        int ip = sourceProcessorIndex[iElement];
+
+        xgroup[iElement] = x_trans[ip][iElement];
+        ygroup[iElement] = y_trans[ip][iElement];
+        zgroup[iElement] = z_trans[ip][iElement];
+
+        for (int iCell = 0; iCell < NODE_NUM; ++ iCell)
+        {
+            node_g[iElement * NODE_NUM + iCell] = node_trans[ip][iElement * NODE_NUM + iCell];
+        }
+    }
+
+    delete [] x_trans; x_trans = NULL;
+    delete [] y_trans; y_trans = NULL;
+    delete [] z_trans; z_trans = NULL;
+    delete [] node_trans; node_trans = NULL;
+
+    ksai[0].insert(ksai[0].end(), xgroup.begin(), xgroup.end());
+    ksai[1].insert(ksai[1].end(), ygroup.begin(), ygroup.end());
+    ksai[2].insert(ksai[2].end(), zgroup.begin(), zgroup.end());
+
+    waiter->insert(waiter->end(), node_g.begin(), node_g.end());
+
+    return;
+}
+
+
+LIB_EXPORT OversetStructGrid::OversetStructGrid()
+{
+    zoneContainer = NULL;
+    cellContainer = NULL;
+
+    ksai          = NULL;
+    waiter        = NULL;
+
+    nodeSend      = NULL;
+    nodeRecv      = NULL;
+
+    field         = NULL;
+    dataSend      = NULL;
+    dataRecv      = NULL;
+    searchTimes   = 0;
+}
+
+LIB_EXPORT OversetStructGrid::~OversetStructGrid()
+{
+    delete zoneContainer; zoneContainer = NULL;
+    delete cellContainer; cellContainer = NULL;
+
+    delete [] ksai; ksai   = NULL;
+    delete waiter;  waiter = NULL;
+
+    delete [] nodeSend; nodeSend = NULL;
+    delete [] nodeRecv; nodeRecv = NULL;
+
+    delete [] field;    field    = NULL;
+    delete [] dataSend; dataSend = NULL;
+    delete [] dataRecv; dataRecv = NULL;
+}
+
+void OversetStructGrid::ProbeOversetCells()
+{
+    Stainer *stainer = new Stainer();
+
+    stainer->ReadHoleData();
+
+    stainer->ProbeOversetCells();
+
+    delete stainer;
+
+    return;
+}
+
+LIB_EXPORT void OversetStructGrid::RunGeometricAnalysis()
+{
+    ReadBasicParameter();
+
+    ProbeOversetCells();
+
+    GenerateSourceAndTargetSpace();
+
+    ProbeRelativeOversetLocation();
+    
+    FillNodeIndexContainer();
+
+    return;
+}
+
+void OversetStructGrid::ReadBasicParameter()
+{
+    using namespace PHMPI;
+    int serverTmp = PHMPI::GetServerProcessorID();
+    int thisip = PHMPI::GetCurrentProcessorID();
+
+    fstream file0;
+    string fileName0 = PHSPACE::GlobalDataBase::GetStrParaFromDB("masterFileName");
+    ParallelOpenFile(file0, fileName0, ios_base::in);
+    if (thisip == serverTmp) file0 >> searchTimes;
+    PH_Bcast(& searchTimes, sizeof(int), serverTmp);
+
+    sourceZoneStart.resize(searchTimes); sourceZoneEnd.resize(searchTimes);
+    targetZoneStart.resize(searchTimes); targetZoneEnd.resize(searchTimes);
+
+    if(thisip == serverTmp)
+    {
+        for(int iSearch = 0; iSearch < searchTimes; ++iSearch)
+        {
+            file0 >> sourceZoneStart[iSearch] >> sourceZoneEnd[iSearch] >> targetZoneStart[iSearch] >> targetZoneEnd[iSearch];
+        }
+    }
+
+    PH_Bcast(& sourceZoneStart[0], searchTimes * sizeof(int), serverTmp);
+    PH_Bcast(& sourceZoneEnd[0],   searchTimes * sizeof(int), serverTmp);
+    PH_Bcast(& targetZoneStart[0], searchTimes * sizeof(int), serverTmp);
+    PH_Bcast(& targetZoneEnd[0],   searchTimes * sizeof(int), serverTmp);
+    ParallelCloseFile(file0);
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    zoneInverseIndex.resize(nZones);
+
+    fstream file1;
+    string fileName1 = PHSPACE::GlobalDataBase::GetStrParaFromDB("zoneInverseFileName");
+    ParallelOpenFile(file1, fileName1, ios_base::in|ios_base::binary);
+    PH_Read_Bcast(file1, & zoneInverseIndex[0], nZones * sizeof(int), serverTmp);
+    ParallelCloseFile(file1);
+
+    return;
+}
+
+void OversetStructGrid::ProbeRelativeOversetLocation()
+{
+    for (int iSearch = 0; iSearch < searchTimes; ++ iSearch)
+    {
+        BackgroundTree  * backgroundTree = new BackgroundTree ();
+
+        backgroundTree->Generate(sourceZoneStart[iSearch], sourceZoneEnd[iSearch]);
+
+        OversetCellCollector  * oversetCellCollector = new OversetCellCollector ();
+
+        oversetCellCollector->RunGeometricAnalysis(targetZoneStart[iSearch], targetZoneEnd[iSearch]);
+
+        oversetCellCollector->SearchOptimalUnitCell(backgroundTree);
+
+        InsertOversetAndServiceParameter(oversetCellCollector);
+
+        delete oversetCellCollector; oversetCellCollector = NULL;
+
+        delete backgroundTree; backgroundTree = NULL;
+    }
+
+    //cout<<"ksai[0].size() = "<< ksai[0].size() << endl;
+    //cout<<"ksai[1].size() = "<< ksai[1].size() << endl;
+    //cout<<"ksai[2].size() = "<< ksai[2].size() << endl;
+
+    //cout<<"waiter->size() = "<< waiter->size() << endl;
+
+    //int numberOfOversetCells = ksai[0].size();
+    //for (int i = 0; i < numberOfOversetCells; ++ i)
+    //{
+    //    WriteLogFile("ksai = ", ksai[0][i], ksai[1][i], ksai[2][i]);
+    //}
+
+    //for (int i = 0; i < 8 * numberOfOversetCells; ++ i)
+    //{
+    //    WriteLogFile("waitress = ", (* waiter)[i]);
+    //}
+
+    return;
+}
+
+void OversetStructGrid::InsertOversetAndServiceParameter(OversetCellCollector  * oversetCellCollector)
+{
+    oversetCellCollector->ResizeSourceIndexContainer();
+
+    oversetCellCollector->InsertOversetParameter(zoneContainer, cellContainer);
+
+    oversetCellCollector->InsertServiceParameter(ksai, waiter);
+
+    return;
+}
+
+void OversetStructGrid::LinearInsertValue(int numberOfEquations, vector< RDouble > & backdrop, RDouble xx, RDouble yy, RDouble zz, vector< RDouble > & newCellValue)
+{
+    const int NODE_NUM = 8;
+    vector< RDouble > a(NODE_NUM), dq(NODE_NUM);
+
+    for(int m = 0; m < numberOfEquations; ++ m)
+    {
+        for(int iCell = 0; iCell < NODE_NUM; ++ iCell)
+        {
+            dq[iCell] = backdrop[m * NODE_NUM + iCell ];
+        }
+
+        a[0] =  dq[0];
+        a[1] = -dq[0] + dq[1];
+        a[2] = -dq[0] + dq[2];
+        a[3] = -dq[0] + dq[3];
+        a[4] =  dq[0] - dq[1] + dq[4] - dq[2];
+        a[5] =  dq[0] - dq[1] - dq[3] + dq[5];
+        a[6] =  dq[0] - dq[2] - dq[3] + dq[6];
+        a[7] = -dq[0] + dq[1] - dq[4] + dq[2] + dq[3] - dq[5] + dq[7] - dq[6];
+        
+        newCellValue[m] = a[0] + a[1] * xx + a[2] * yy + a[3] * zz + a[4] * xx * yy + a[5] * xx * zz + a[6] * yy * zz + a[7] * xx * yy * zz;
+    }
+
+    return;
+}
+
+void OversetStructGrid::GenerateSourceAndTargetSpace()
+{
+    using namespace PHMPI;
+
+    int numberOfProcessors = PHMPI::GetNumberOfProcessor(); 
+
+    zoneContainer = new vector< int >();
+    cellContainer = new vector< int >();
+
+    ksai = new vector< RDouble >[3];
+    waiter = new vector< int >();
+
+    nodeSend = new vector< int > [numberOfProcessors];
+    nodeRecv = new vector< int > [numberOfProcessors];
+
+    dataSend = new vector< RDouble > * [numberOfProcessors];
+    dataRecv = new vector< RDouble > * [numberOfProcessors];
+
+    for (int ip = 0; ip < numberOfProcessors; ++ ip)
+    {
+        dataSend[ip] = NULL;
+        dataRecv[ip] = NULL;
+    }
+
+    return;
+}
+
+void OversetStructGrid::FillNodeIndexContainer()
+{
+    using namespace PHMPI;
+
+    uint_t numberOfPorts = waiter->size();
+    indexGroup.resize(numberOfPorts);
+    processGroup.resize(numberOfPorts);
+
+    for (int iPort = 0; iPort < numberOfPorts; ++ iPort)
+    {
+        int globalNodeIndex = (* waiter)[iPort];
+
+        int zoneIndex = PHMPI::GetZoneIndexAccordingToGlobalPointLabel(globalNodeIndex);
+
+        int processorIndex = PHMPI::GetZoneProcessorID(zoneIndex);
+
+        nodeSend[processorIndex].push_back(globalNodeIndex);
+
+        indexGroup[iPort] = static_cast<int>(nodeSend[processorIndex].size()) - 1;
+
+        processGroup[iPort] = processorIndex;
+    }
+
+    int numberOfProcessors = PHMPI::GetNumberOfProcessor();
+    int myid = PHMPI::GetCurrentProcessorID();
+
+    nodeRecv[myid] = nodeSend[myid];
+
+    for (int ip = 0; ip < numberOfProcessors; ++ ip)
+    {
+        if (ip != myid)
+        {
+            int numberOfElements = static_cast<int>(nodeSend[ip].size());
+
+            PH_Send(& numberOfElements, sizeof(int), ip, 0);
+
+            if (numberOfElements == 0) continue;
+
+            PH_Send(& nodeSend[ip][0], numberOfElements * sizeof(int), ip, 0);
+        }
+        else
+        {
+            for (int jp = 0; jp < numberOfProcessors; ++ jp)
+            {
+                if (jp == myid) continue;
+
+                int numberOfElements;
+
+                PH_Receive(& numberOfElements, sizeof(int), jp, 0);
+
+                if (numberOfElements == 0) continue;
+
+                nodeRecv[jp].resize(numberOfElements);
+
+                PH_Receive(& nodeRecv[jp][0], numberOfElements * sizeof(int), jp, 0);
+            }
+        }
+    }
+
+    return;
+}
+
+LIB_EXPORT void OversetStructGrid::FillSolverContainer()
+{
+    solverNameContainer.clear();
+    equationNumberContainer.clear();
+
+    solverNameContainer.push_back("q");
+
+    int nl = PHSPACE::GlobalDataBase::GetIntParaFromDB("nl");
+    equationNumberContainer.push_back(nl);
+
+    if(PHSPACE::GetCodeOfTurbulenceModel())
+    {
+        solverNameContainer.push_back("q_turb");
+
+        int n_turb = PHSPACE::GlobalDataBase::GetIntParaFromDB("n_turb");
+        equationNumberContainer.push_back(n_turb);
+    }
+
+    return;
+}
+
+LIB_EXPORT void OversetStructGrid::InitFieldNew()
+{
+    using namespace PHMPI;
+    
+    uint_t numberOfSolvers = solverNameContainer.size();
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+
+    field = new vector< RDouble4D * > [nZones];
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        field[iZone].resize(numberOfSolvers, NULL);
+
+        StructGrid * grid = PHSPACE::GetStructGrid(iZone);
+        if (! grid) continue;
+
+        for (int iSolver = 0; iSolver < numberOfSolvers; ++ iSolver)
+        {
+            string name = solverNameContainer[iSolver];
+            field[iZone][iSolver] = reinterpret_cast< RDouble4D * >(grid->GetDataPtr(name));
+        }
+    }
+    return;
+}
+
+LIB_EXPORT void OversetStructGrid::InitField()
+{
+    using namespace PHMPI;
+    
+    uint_t numberOfSolvers = solverNameContainer.size();
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+
+    field = new vector< RDouble4D * > [nZones];
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        field[iZone].resize(numberOfSolvers, NULL);
+
+        Grid *grid = PHSPACE::GetGrid(iZone);
+
+        if (! grid) continue;
+
+        for (int iSolver = 0; iSolver < numberOfSolvers; ++ iSolver)
+        {
+            string name = solverNameContainer[iSolver];
+            field[iZone][iSolver] = static_cast< RDouble4D * >(grid->GetDataPtr(name));
+        }
+    }
+    return;
+}
+
+LIB_EXPORT void OversetStructGrid::CommunicateOversetField(int iSolver)
+{
+    using namespace PHMPI;
+    int iLocal, jLocal, kLocal;
+
+    int numberOfEquations = equationNumberContainer[iSolver];
+    int numberOfProcessors = PHMPI::GetNumberOfProcessor();
+
+    for (int ip = 0; ip < numberOfProcessors; ++ ip)
+    {
+        dataSend[ip] = new vector< RDouble >();
+        dataRecv[ip] = new vector< RDouble >();
+    }
+
+    for (int ip = 0; ip < numberOfProcessors; ++ ip)
+    {
+        uint_t numberOfElements = nodeRecv[ip].size();
+        for(int iElement = 0; iElement < numberOfElements; ++iElement)
+        {
+            int globalNodeLabel = nodeRecv[ip][iElement];
+
+            int zoneIndex = PHMPI::GetZoneIndexAccordingToGlobalPointLabel(globalNodeLabel);
+
+            StructGrid * grid = PHSPACE::GetStructGrid(zoneIndex);
+
+            grid->GetLocalIndex(globalNodeLabel, iLocal, jLocal, kLocal);
+
+            RDouble4D & myField = * (field[zoneIndex][iSolver]);
+
+            for(int iEquation = 0; iEquation < numberOfEquations; ++ iEquation)
+            {
+                (* dataSend[ip]).push_back(myField(iLocal, jLocal, kLocal, iEquation));
+            }
+        }
+    }
+
+    int myid = PHMPI::GetCurrentProcessorID();
+
+    * dataRecv[myid] = * dataSend[myid];
+
+    for (int ip = 0; ip < numberOfProcessors; ++ ip)
+    {
+        if (ip != myid)
+        {
+            int numberOfElements = static_cast<int>((* dataSend[ip]).size());
+            PH_Send(& numberOfElements, sizeof(int), ip, 0);
+
+            if (numberOfElements == 0) continue;
+
+            PH_Send(& (* dataSend[ip])[0], numberOfElements * sizeof(RDouble), ip, 0);
+        }
+        else
+        {
+            for(int jp = 0; jp < numberOfProcessors; ++ jp)
+            {
+                if (jp == myid) continue;
+
+                int numberOfElements;
+                PH_Receive(& numberOfElements, sizeof(int), jp, 0);
+
+                if (numberOfElements == 0) continue;
+
+                dataRecv[jp]->resize(numberOfElements);
+
+                PH_Receive(& (* dataRecv[jp])[0], numberOfElements * sizeof(RDouble), jp, 0);
+            }
+        }
+    }
+
+    return;
+}
+
+LIB_EXPORT void OversetStructGrid::CorrectOversetField(int iSolver)
+{
+    using namespace PHMPI;
+
+    int ic, jc, kc;
+    const int NODE_NUM = 8;
+    int numberOfEquations = equationNumberContainer[iSolver];
+
+    vector< RDouble > backdrop(numberOfEquations * NODE_NUM), newCellValue(numberOfEquations);
+
+    uint_t numberOfOversetCells = cellContainer->size();
+    for(int iOversetCell = 0; iOversetCell < numberOfOversetCells; ++ iOversetCell)
+    {
+        int iZone = (* zoneContainer)[iOversetCell];
+
+        StructGrid * grid = PHSPACE::GetStructGrid(iZone);
+
+        if(! grid) continue; //Maybe no use!
+
+        RDouble4D & myField = * field[iZone][iSolver];
+
+        grid->GetLocalCenter((* cellContainer)[iOversetCell], ic, jc, kc);
+
+        for(int iNeighbor = 0; iNeighbor < NODE_NUM; ++ iNeighbor)
+        {
+            int neighborCellLabel = NODE_NUM * iOversetCell + iNeighbor;
+
+            int iProcessor = processGroup[neighborCellLabel];
+
+            int iElement = indexGroup[neighborCellLabel];
+
+            for(int iEquation = 0; iEquation < numberOfEquations; ++iEquation)
+            {
+                backdrop[NODE_NUM * iEquation + iNeighbor] = (* dataRecv[iProcessor])[numberOfEquations * iElement + iEquation];
+            }
+        }
+
+        LinearInsertValue(numberOfEquations, backdrop, ksai[0][iOversetCell], ksai[1][iOversetCell], ksai[2][iOversetCell], newCellValue);
+
+        for(int iEquation = 0; iEquation < numberOfEquations; ++ iEquation)
+        {
+            myField(ic + 1, jc + 1, kc + 1, iEquation) = newCellValue[iEquation];
+        }
+    }
+
+    int numberOfProcessors = PHMPI::GetNumberOfProcessor();
+    for (int ip = 0; ip < numberOfProcessors; ++ ip)
+    {
+        delete dataSend[ip]; dataSend[ip] = NULL;
+        delete dataRecv[ip]; dataRecv[ip] = NULL;
+    }
+
+    return;
+}
+
+OversetStructGrid * oversetStructGrid = NULL;
+
+LIB_EXPORT OversetStructGrid * GetOversetStructGrid()
+{
+    return oversetStructGrid;
+}
+
+LIB_EXPORT void CreateOversetStructGrid()
+{
+    oversetStructGrid = new OversetStructGrid();
+}
+
+LIB_EXPORT void DeleteOversetStructGrid()
+{
+    delete oversetStructGrid; oversetStructGrid = NULL;
+}
+
+LIB_EXPORT int GetZoneInverseIndex(int i_view)
+{
+    return oversetStructGrid->GetZoneInverseIndex(i_view);
+}
+
+LIB_EXPORT void ComputePhysicalCoordinate(vector< vector< RDouble > > & frame, RDouble x, RDouble y, RDouble z, vector< RDouble > & r)
+{
+    for(int i = 0; i < 3; ++ i)
+    {
+        r[i] = frame[i][0] + x * frame[i][1] + y * frame[i][2] + z * frame[i][3];
+    }
+    return;
+}
+
+}
\ No newline at end of file
diff --git a/API/Geometry/src/OversetInformation.cpp b/API/Geometry/src/OversetInformation.cpp
new file mode 100644
index 0000000..9432425
--- /dev/null
+++ b/API/Geometry/src/OversetInformation.cpp
@@ -0,0 +1,995 @@
+#include "PHMpi.h"
+#include "OversetInformation.h"
+#include "Geo_Interface.h"
+#include "Geo_Interpoint.h"
+#include "Geo_FaceMetrics_Unstruct.h"
+#include "Geo_CellMetrics_Unstruct.h"
+#include "Geo_DynamicGridMetrics_Unstruct.h"
+#include "Geo_LSQWeight_Unstruct.h"
+#include "Geo_UnstructBC.h"
+#include "Geo_UnstructGrid.h"
+#include "Geo_StructGrid.h"
+#include "Geo_FaceTopo_Unstruct.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+OversetInformationProxy *GetOversetInformationProxy(int iZone, int gridLevelIndex)
+{
+    Grid *grid = GetGrid(iZone, gridLevelIndex);
+    if (! grid) return 0;
+    UnstructGrid *gridUnstr = UnstructGridCast(grid);
+    return gridUnstr->GetOversetInformationProxy();
+}
+
+OversetSwapManager::OversetSwapManager()
+{
+    oversetInterplateCellManager = new OversetInterplateCellManager();
+    oversetDonorCellManager = new OversetDonorCellManager();
+}
+
+OversetSwapManager::~OversetSwapManager()
+{
+    delete oversetInterplateCellManager;
+    delete oversetDonorCellManager;
+};
+
+void OversetSwapManager::AddOversetInterplateCell(OversetInterplateCell *oversetInterplateCell)
+{
+    OversetInterplateCellManager *oversetInterplateCellManager = this->GetOversetInterplateCellManager();
+    oversetInterplateCellManager->AddOversetInterplateCell(oversetInterplateCell);
+}
+
+void OversetSwapManager::AddOversetDonorCell(OversetDonorCell *oversetDonorCell)
+{
+    OversetDonorCellManager *oversetDonorCellManager = this->GetOversetDonorCellManager();
+    oversetDonorCellManager->AddOversetDonorCell(oversetDonorCell);
+}
+
+void OversetSwapManager::PostProcessReceivingOversetInformation()
+{
+    OversetInterplateCellManager *oversetInterplateCellManager = this->GetOversetInterplateCellManager();
+    oversetInterplateCellManager->PostProcessReceivingOversetInformation();
+}
+
+void OversetSwapManager::PostProcessSendingOversetInformation()
+{
+    OversetDonorCellManager *oversetDonorCellManager = this->GetOversetDonorCellManager();
+    oversetDonorCellManager->PostProcessSendingOversetInformation();
+}
+
+void OversetSwapManager::EncodeOversetInterplateCellInformation(DataContainer *dataContainer)
+{
+    OversetInterplateCellManager *oversetInterplateCellManager = this->GetOversetInterplateCellManager();
+    oversetInterplateCellManager->EncodeOversetInterplateCellInformation(dataContainer);
+}
+
+void OversetSwapManager::EncodeOversetDonorCellInformation(DataContainer *dataContainer)
+{
+    OversetDonorCellManager *oversetDonorCellManager = this->GetOversetDonorCellManager();
+    oversetDonorCellManager->EncodeOversetDonorCellInformation(dataContainer);
+}
+
+void OversetSwapManager::DecodeOversetInterplateCellInformation(DataContainer *dataContainer)
+{
+    OversetInterplateCellManager *oversetInterplateCellManager = this->GetOversetInterplateCellManager();
+    oversetInterplateCellManager->DecodeOversetInterplateCellInformation(dataContainer);
+}
+
+void OversetSwapManager::DecodeOversetDonorCellInformation(DataContainer *dataContainer)
+{
+    OversetDonorCellManager *oversetDonorCellManager = this->GetOversetDonorCellManager();
+    oversetDonorCellManager->DecodeOversetDonorCellInformation(dataContainer);
+}
+
+void OversetSwapManager::EncodeOversetInformation(DataContainer *dataContainer)
+{
+    this->EncodeOversetInterplateCellInformation(dataContainer);
+    this->EncodeOversetDonorCellInformation(dataContainer);
+}
+
+void OversetSwapManager::DecodeOversetInformation(DataContainer *dataContainer)
+{
+    this->DecodeOversetInterplateCellInformation(dataContainer);
+    this->DecodeOversetDonorCellInformation(dataContainer);
+}
+
+OversetDataProxy::OversetDataProxy()
+{
+    ;
+}
+
+OversetDataProxy::~OversetDataProxy()
+{
+    ;
+}
+
+void OversetDataProxy::Initialize(OversetSwapManager *oversetSwapManager, int sendReceiveFlag)
+{
+    this->oversetSwapManager = oversetSwapManager;
+    this->sendReceiveFlag = sendReceiveFlag;
+}
+
+int OversetDataProxy::GetNumberOfNeighbors()
+{
+    if (sendReceiveFlag == 0)     //! Send.
+    {
+        return oversetSwapManager->GetOversetDonorCellManager()->GetNumberOfNeighbors();
+    }
+    else     //! Receive.
+    {
+        return oversetSwapManager->GetOversetInterplateCellManager()->GetNumberOfNeighbors();
+    }
+};
+
+int OversetDataProxy::GetNumberOfCells()
+{
+    if (sendReceiveFlag == 0)     //! Send.
+    {
+        return oversetSwapManager->GetOversetDonorCellManager()->GetTotalNumberOfOversetDonorCells();
+    }
+    else     //! Receive.
+    {
+        return oversetSwapManager->GetOversetInterplateCellManager()->GetTotalNumberOfOversetInterplateCells();
+    }
+}
+
+int OversetDataProxy::GetNumberOfCells(int neighborIndex)
+{
+    if (sendReceiveFlag == 0)     //! Send.
+    {
+        return oversetSwapManager->GetOversetDonorCellManager()->GetNumberOfOversetDonorCells(neighborIndex);
+    }
+    else      //! Receive.
+    {
+        return oversetSwapManager->GetOversetInterplateCellManager()->GetNumberOfOversetInterplateCells(neighborIndex);
+    }
+};
+
+RDouble *OversetDataProxy::GetInterCellCenterX(int neighborIndex)
+{
+    return oversetSwapManager->GetOversetDonorCellManager()->GetInterCellCenterX(neighborIndex);
+}
+
+RDouble *OversetDataProxy::GetInterCellCenterY(int neighborIndex)
+{
+    return oversetSwapManager->GetOversetDonorCellManager()->GetInterCellCenterY(neighborIndex);
+}
+
+RDouble *OversetDataProxy::GetInterCellCenterZ(int neighborIndex)
+{
+    return oversetSwapManager->GetOversetDonorCellManager()->GetInterCellCenterZ(neighborIndex);
+}
+
+int *OversetDataProxy::GetCellIndexContainer(int neighborIndex)
+{
+    if (sendReceiveFlag == 0)     //! Send.
+    {
+        return oversetSwapManager->GetOversetDonorCellManager()->GetOversetDonorCell(neighborIndex);
+    }
+    else      //! Receive.
+    {
+        return oversetSwapManager->GetOversetInterplateCellManager()->GetOversetInterplateCell(neighborIndex);
+    }
+};
+
+int *OversetDataProxy::GetCellStorageIndexMapping(int neighborIndex)
+{
+    if (sendReceiveFlag == 0)      //! Send.
+    {
+        return oversetSwapManager->GetOversetDonorCellManager()->GetDonorCellStorageIndex(neighborIndex);
+    }
+    else      //! Receive.
+    {
+        return oversetSwapManager->GetOversetInterplateCellManager()->GetInterplateCellStorageIndex(neighborIndex);
+    }
+};
+
+Data_ParamFieldSuite *OversetDataProxy::GetDataStorage()
+{
+    if (sendReceiveFlag == 0)     //! Send.
+    {
+        return oversetSwapManager->GetOversetDonorCellManager()->GetDataStorage();
+    }
+    else      //! Receive.
+    {
+        return oversetSwapManager->GetOversetInterplateCellManager()->GetDataStorage();
+    }
+};
+
+PHVectorInt1D OversetDataProxy::GetNeighborZoneIndexArray()
+{
+    if (sendReceiveFlag == 0)
+    {
+        PHVectorInt1D zoneIndexArray = this->oversetSwapManager->GetOversetDonorCellManager()->GetNeighborInterplateZoneIndexArray();
+        return zoneIndexArray;
+    }
+    else
+    {
+        PHVectorInt1D zoneIndexArray = this->oversetSwapManager->GetOversetInterplateCellManager()->GetNeighborDonorZoneIndexArray();
+        return zoneIndexArray;
+    }
+}
+
+int OversetDataProxy::FindNeighborIndex(int zoneIndex)
+{
+    PHVectorInt1D zoneIndexArray = GetNeighborZoneIndexArray();
+
+    return this->FindNeighborIndex(zoneIndexArray, zoneIndex);
+}
+
+int OversetDataProxy::FindNeighborIndex(PHVectorInt1D &neighborZoneIndexArray, int neighborZoneIndexForSearching)
+{
+    uint_t numberOfNeighborZones = neighborZoneIndexArray.size();
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighborZones; ++ iNeighbor)
+    {
+        int currentNeighborZoneIndex = neighborZoneIndexArray[iNeighbor];
+        if (currentNeighborZoneIndex == neighborZoneIndexForSearching)
+        {
+            return iNeighbor;
+        }
+    }
+    return - 1;
+};
+
+OversetInformationProxy::OversetInformationProxy()
+{
+    grid = 0;
+    oversetCellContainer = 0;
+    oversetSwapManager = new OversetSwapManager();
+
+    oversetDataProxyForSend = new OversetDataProxy();
+    oversetDataProxyForReceive = new OversetDataProxy();
+
+    oversetDataProxyForSend->Initialize(oversetSwapManager, 0);
+    oversetDataProxyForReceive->Initialize(oversetSwapManager, 1);
+}
+
+OversetInformationProxy::~OversetInformationProxy()
+{
+    FreeOversetCellContainer(oversetCellContainer);
+    delete oversetSwapManager;
+
+    delete oversetDataProxyForSend;
+    delete oversetDataProxyForReceive;
+}
+
+int OversetInformationProxy::GetZoneIndex()
+{
+    return grid->GetZoneID();
+}
+
+PHVectorInt1D OversetInformationProxy::GetNeighborZoneIndexArray()
+{
+    return oversetSwapManager->GetOversetDonorCellManager()->GetNeighborInterplateZoneIndexArray();
+}
+
+void OversetInformationProxy::FreeOversetCellContainer(PHVector1D < OversetCell * > *oversetCellContainer)
+{
+    if (! oversetCellContainer) return;
+
+    uint_t numberOfElements = oversetCellContainer->size();
+    for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+    {
+        delete (* oversetCellContainer)[iElement];
+    }
+    delete oversetCellContainer;
+}
+
+void OversetInformationProxy::EncodeOversetInformation(DataContainer *dataContainer)
+{
+    OversetSwapManager *oversetSwapManager = this->GetOversetSwapManager();
+    oversetSwapManager->EncodeOversetInformation(dataContainer);
+}
+
+void OversetInformationProxy::DecodeOversetInformation(DataContainer *dataContainer)
+{
+    OversetSwapManager *oversetSwapManager = this->GetOversetSwapManager();
+    oversetSwapManager->DecodeOversetInformation(dataContainer);
+}
+
+void OversetInformationProxy::GetCellIndexContainer(int donorZoneIndexIn, PHVectorInt1D &cellIndexContainer)
+{
+    PHVector1D < OversetCell * > *oversetCellContainer = this->GetOversetCellContainer();
+    cellIndexContainer.resize(0);
+
+    uint_t numberOfElements = oversetCellContainer->size();
+    for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+    {
+        OversetCell *oversetCell = (* oversetCellContainer)[iElement];
+        int cellIndex = oversetCell->GetCellIndex();
+        int donorZoneIndex = oversetCell->GetDonorZoneIndex();
+
+        if (donorZoneIndex == donorZoneIndexIn)
+        {
+            cellIndexContainer.push_back(cellIndex);
+        }
+    }
+}
+
+void OversetInformationProxy::GetDonorCellIndexContainer(int donorZoneIndexIn, PHVectorInt1D &donorCellIndexContainer,
+    PHVectorRDouble1D &interCellCenterX,
+    PHVectorRDouble1D &interCellCenterY,
+    PHVectorRDouble1D &interCellCenterZ)
+{
+    //! Need further revise for structure mesh.
+    UnstructGrid *unstructuredGrid = PHSPACE::UnstructGridCast(grid);
+    RDouble *xc = unstructuredGrid->GetCellCenterX();
+    RDouble *yc = unstructuredGrid->GetCellCenterY();
+    RDouble *zc = unstructuredGrid->GetCellCenterZ();
+
+    PHVector1D < OversetCell * > *oversetCellContainer = this->GetOversetCellContainer();
+    donorCellIndexContainer.resize(0);
+
+    uint_t numberOfElements = oversetCellContainer->size();
+    for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+    {
+        OversetCell *oversetCell = (* oversetCellContainer)[iElement];
+        int cellIndex = oversetCell->GetCellIndex();
+        int donorCellIndex = oversetCell->GetDonorCellIndex();
+        int donorZoneIndex = oversetCell->GetDonorZoneIndex();
+
+        if (donorZoneIndex == donorZoneIndexIn)
+        {
+            donorCellIndexContainer.push_back(donorCellIndex);
+            interCellCenterX.push_back(xc[cellIndex]);
+            interCellCenterY.push_back(yc[cellIndex]);
+            interCellCenterZ.push_back(zc[cellIndex]);
+        }
+    }
+}
+
+void OversetInformationProxy::InitializeReceivingInformation(PHVector1D < OversetCell * > *oversetCellContainer)
+{
+    this->SetOversetCellContainer(oversetCellContainer);
+}
+
+void OversetInformationProxy::PostProcessReceivingOversetInformation()
+{
+    OversetSwapManager *oversetSwapManager = this->GetOversetSwapManager();
+    oversetSwapManager->PostProcessReceivingOversetInformation();
+}
+
+void OversetInformationProxy::PostProcessSendingOversetInformation()
+{
+    OversetSwapManager *oversetSwapManager = this->GetOversetSwapManager();
+    oversetSwapManager->PostProcessSendingOversetInformation();
+}
+
+void OversetInformationProxy::PostProcessOversetInformation()
+{
+    this->PostProcessReceivingOversetInformation();
+    this->PostProcessSendingOversetInformation();
+}
+
+void OversetInformationProxy::GenerateNeighborZoneIndexSet(set< int > &neighborZoneIndexSet)
+{
+    PHVector1D < OversetCell * > *oversetCellContainer = this->GetOversetCellContainer();
+
+    uint_t numberOfElements = oversetCellContainer->size();
+    for (int iElement = 0; iElement < numberOfElements; ++ iElement)
+    {
+        OversetCell *oversetCell = (* oversetCellContainer)[iElement];
+        int donorZoneIndex = oversetCell->GetDonorZoneIndex();
+        neighborZoneIndexSet.insert(donorZoneIndex);
+    }
+}
+
+void OversetInformationProxy::GetNeighborZoneIndexContainer(PHVectorInt1D &neighborZoneIndexContainer)
+{
+    set< int > neighborZoneIndexSet;
+    this->GenerateNeighborZoneIndexSet(neighborZoneIndexSet);
+
+    for (set< int >::iterator iter = neighborZoneIndexSet.begin(); iter != neighborZoneIndexSet.end(); ++ iter)
+    {
+        neighborZoneIndexContainer.push_back(* iter);
+    }
+}
+
+OversetTopologyManager oversetTopologyManager;
+
+OversetTopologyManager *GetOversetTopologyManager()
+{
+    return & oversetTopologyManager;
+}
+
+void InitializeOversetInterfaceTopology()
+{
+    OversetTopologyManager *oversetTopologyManagerTmp = PHSPACE::GetOversetTopologyManager();
+    oversetTopologyManagerTmp->InitializeOversetInterfaceTopology();
+}
+
+OversetTopologyManager::OversetTopologyManager()
+{
+    ;
+}
+
+OversetTopologyManager::~OversetTopologyManager()
+{
+    ;
+}
+
+PHVectorInt2D &OversetTopologyManager::GetOversetTopology()
+{
+    return oversetTopology;
+};
+
+PHVectorInt2D &OversetTopologyManager::GetOversetTopologyForSend()
+{
+    return oversetTopologyForSend;
+};
+
+PHVectorInt2D &OversetTopologyManager::GetOversetTopologyForReceive()
+{
+    return oversetTopologyForReceive;
+};
+
+uint_t OversetTopologyManager::GetNumberOfOversetNeighbors(int zoneIndex)
+{
+    PHVectorInt2D &oversetTopology = this->GetOversetTopology();
+    return oversetTopology[zoneIndex].size();
+}
+
+int OversetTopologyManager::GetNeighborOversetZoneIndex(int zoneIndex, int ithOversetNeighbor)
+{
+    PHVectorInt2D &oversetTopology = this->GetOversetTopology();
+    return oversetTopology[zoneIndex][ithOversetNeighbor];
+}
+
+void OversetTopologyManager::InitializeOversetInterfaceTopology()
+{
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    PHVectorInt2D &oversetTopology = this->GetOversetTopology();
+    PHVectorInt2D &oversetTopologyForSend = this->GetOversetTopologyForSend();
+    PHVectorInt2D &oversetTopologyForReceive = this->GetOversetTopologyForReceive();
+
+    oversetTopologyForSend.resize(nZones);
+    oversetTopologyForReceive.resize(nZones);
+
+    oversetTopology.resize(nZones);
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        int currentProcessor = PHMPI::GetCurrentProcessorID();
+
+        if (processorIndex != currentProcessor) continue;
+
+        OversetInformationProxy *oversetInformationProxy = GetOversetInformationProxy(iZone, 0);
+        if (oversetInformationProxy == 0) continue;
+
+        OversetDataProxy *oversetDataProxy = oversetInformationProxy->GetOversetDataProxyForSend();
+
+        PHVectorInt1D neighborZoneIndexArray = oversetDataProxy->GetNeighborZoneIndexArray();
+
+        oversetTopology[iZone] = neighborZoneIndexArray;
+    }
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+
+        int numberOfNeighbors = static_cast<int>(oversetTopology[iZone].size());
+
+        PHMPI::PH_Bcast(&numberOfNeighbors, sizeof(int), processorIndex);
+
+        oversetTopology[iZone].resize(numberOfNeighbors);
+
+        if (numberOfNeighbors <= 0) continue;
+
+        PHMPI::PH_Bcast(&oversetTopology[iZone][0], numberOfNeighbors * sizeof(int), processorIndex);
+    }
+}
+
+void OversetTopologyManager::InitializeOversetInterfaceTopologyServerCollectAndBcast()
+{
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    int serverProcessor = PHMPI::GetServerSepMode();
+
+    PHVectorInt2D &oversetTopology = this->GetOversetTopology();
+    PHVectorInt2D &oversetTopologyForSend = this->GetOversetTopologyForSend();
+    PHVectorInt2D &oversetTopologyForReceive = this->GetOversetTopologyForReceive();
+
+    oversetTopologyForSend.resize(nZones);
+    oversetTopologyForReceive.resize(nZones);
+    oversetTopology.resize(nZones);
+
+    DataContainer *dataContainerLocal = new DataContainer();
+    DataContainer *dataContainerGlobal = new DataContainer();
+
+    int nZonesInThisProc = 0;
+
+    //! Get the number of blocks in each process nZonesInThisProc.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorIDSepMode(iZone);
+
+        if (currentProcessor == processorIndex)
+        {
+            ++ nZonesInThisProc;
+        }
+    }
+
+    PHSPACE::PHWrite(dataContainerLocal, nZonesInThisProc);
+
+    //! For each process,get the interCell information of all zones and write into dataContainer.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorIDSepMode(iZone);
+
+        if (currentProcessor == processorIndex)
+        {
+            OversetInformationProxy *oversetInformationProxy = GetOversetInformationProxy(iZone, 0);
+
+            OversetDataProxy *oversetDataProxy = oversetInformationProxy->GetOversetDataProxyForSend();
+
+            PHVectorInt1D neighborZoneIndexArray = oversetDataProxy->GetNeighborZoneIndexArray();
+
+            int numberOfNeigibors = static_cast<int>( neighborZoneIndexArray.size() );
+
+            PHSPACE::PHWrite(dataContainerLocal, iZone);
+
+            PHSPACE::PHWrite(dataContainerLocal, numberOfNeigibors);
+
+            if (numberOfNeigibors != 0)
+            {
+                PHSPACE::PHWrite(dataContainerLocal, & neighborZoneIndexArray[0], numberOfNeigibors);
+            }
+        }
+    }
+
+    //! The main process collects and read information.
+    int numberOfprocessors = PHMPI::GetNumberOfProcessor();
+
+    if (currentProcessor != serverProcessor)
+    {
+        send(dataContainerLocal, serverProcessor, currentProcessor);
+    }
+
+    if (currentProcessor == serverProcessor)
+    {
+        dataContainerLocal->moveto_begin();
+
+        dataContainerGlobal->write(dataContainerLocal);
+
+        for (int iProc = 0; iProc < numberOfprocessors; ++ iProc)
+        {
+            if (iProc == serverProcessor)
+            {
+                continue;
+            }
+
+            DataContainer *dataContainerRevc = new DataContainer();
+
+            receive(dataContainerRevc, iProc, iProc);
+
+            dataContainerRevc->moveto_begin();
+
+            dataContainerGlobal->write(dataContainerRevc);
+
+            delete dataContainerRevc;
+        }
+    }
+
+    delete dataContainerLocal;
+
+    PHMPI::PH_BcastByServerSepMode(dataContainerGlobal);
+    dataContainerGlobal->moveto_begin();
+
+    for (int iProc = 0; iProc < numberOfprocessors; ++ iProc)
+    {
+        PHSPACE::PHRead(dataContainerGlobal, nZonesInThisProc);
+
+        for (int iZone = 0; iZone < nZonesInThisProc; ++ iZone)
+        {
+            int zoneIndex;
+            int numberOfNeigibors;
+
+            PHSPACE::PHRead(dataContainerGlobal, zoneIndex);
+            PHSPACE::PHRead(dataContainerGlobal, numberOfNeigibors);
+
+            if (numberOfNeigibors != 0)
+            {
+                PHVectorInt1D neighborList;
+                neighborList.resize(numberOfNeigibors);
+                PHSPACE::PHRead(dataContainerGlobal, &neighborList[0], numberOfNeigibors);
+                oversetTopology[zoneIndex] = neighborList;
+            }
+        }
+    }
+
+    delete dataContainerGlobal;
+}
+
+OversetCell::OversetCell()
+{
+    ;
+}
+
+OversetCell::~OversetCell()
+{
+    ;
+}
+
+OversetInterplateCell::OversetInterplateCell()
+{
+    dataStorage = new Data_ParamFieldSuite();
+}
+
+OversetInterplateCell::~OversetInterplateCell()
+{
+    delete dataStorage;
+}
+
+void OversetInterplateCell::EncodeOversetInterplateCellInformation(DataContainer *dataContainer)
+{
+    int donorZoneIndex = this->GetDonorZoneIndex();
+
+    PHSPACE::PHWrite(dataContainer, donorZoneIndex);
+
+    int numberOfOversetInterplateCells = this->GetNumberOfOversetInterplateCells();
+    PHSPACE::PHWrite(dataContainer, numberOfOversetInterplateCells);
+
+    PHVectorInt1D &cellIndexContainer = this->GetCellIndexContainer();
+
+    PHSPACE::PHWrite(dataContainer, cellIndexContainer, numberOfOversetInterplateCells);
+
+    PHVectorInt1D &storageIndexContainer = this->GetStorageIndexContainer();
+
+    PHSPACE::PHWrite(dataContainer, storageIndexContainer, numberOfOversetInterplateCells);
+}
+
+void OversetInterplateCell::DecodeOversetInterplateCellInformation(DataContainer *dataContainer)
+{
+    int donorZoneIndex = - 1;
+
+    PHSPACE::PHRead(dataContainer, donorZoneIndex);
+
+    this->SetDonorZoneIndex(donorZoneIndex);
+
+    int numberOfOversetInterplateCells;
+    PHSPACE::PHRead(dataContainer, numberOfOversetInterplateCells);
+
+    PHVectorInt1D &cellIndexContainer = this->GetCellIndexContainer();
+    cellIndexContainer.resize(numberOfOversetInterplateCells);
+
+    PHSPACE::PHRead(dataContainer, cellIndexContainer, numberOfOversetInterplateCells);
+
+    PHVectorInt1D &storageIndexContainer = this->GetStorageIndexContainer();
+    storageIndexContainer.resize(numberOfOversetInterplateCells);
+
+    PHSPACE::PHRead(dataContainer, storageIndexContainer, numberOfOversetInterplateCells);
+}
+
+OversetDonorCell::OversetDonorCell()
+{
+    dataStorage = new Data_ParamFieldSuite();
+}
+
+OversetDonorCell::~OversetDonorCell()
+{
+    delete dataStorage;
+}
+
+void OversetDonorCell::EncodeOversetDonorCellInformation(DataContainer *dataContainer)
+{
+    int interplateZoneIndex = this->GetInterplateZoneIndex();
+
+    PHSPACE::PHWrite(dataContainer, interplateZoneIndex);
+
+    int numberOfOversetDonorCells = this->GetNumberOfOversetDonorCells();
+    PHSPACE::PHWrite(dataContainer, numberOfOversetDonorCells);
+
+    PHVectorInt1D &donorCellIndexContainer = this->GetDonorCellIndexContainer();
+
+    PHSPACE::PHWrite(dataContainer, donorCellIndexContainer, numberOfOversetDonorCells);
+
+    PHSPACE::PHWrite(dataContainer, interCellCenterX, numberOfOversetDonorCells);
+    PHSPACE::PHWrite(dataContainer, interCellCenterY, numberOfOversetDonorCells);
+    PHSPACE::PHWrite(dataContainer, interCellCenterZ, numberOfOversetDonorCells);
+
+    PHVectorInt1D &storageIndexContainer = this->GetStorageIndexContainer();
+
+    PHSPACE::PHWrite(dataContainer, storageIndexContainer, numberOfOversetDonorCells);
+}
+
+void OversetDonorCell::DecodeOversetDonorCellInformation(DataContainer *dataContainer)
+{
+    int interplateZoneIndex = - 1;
+
+    PHSPACE::PHRead(dataContainer, interplateZoneIndex);
+
+    this->SetInterplateZoneIndex(interplateZoneIndex);
+
+    int numberOfOversetDonorCells;
+    PHSPACE::PHRead(dataContainer, numberOfOversetDonorCells);
+
+    PHVectorInt1D &donorCellIndexContainer = this->GetDonorCellIndexContainer();
+
+    donorCellIndexContainer.resize(numberOfOversetDonorCells);
+
+    interCellCenterX.resize(numberOfOversetDonorCells);
+    interCellCenterY.resize(numberOfOversetDonorCells);
+    interCellCenterZ.resize(numberOfOversetDonorCells);
+
+    PHSPACE::PHRead(dataContainer, donorCellIndexContainer, numberOfOversetDonorCells);
+
+    PHSPACE::PHRead(dataContainer, interCellCenterX, numberOfOversetDonorCells);
+    PHSPACE::PHRead(dataContainer, interCellCenterY, numberOfOversetDonorCells);
+    PHSPACE::PHRead(dataContainer, interCellCenterZ, numberOfOversetDonorCells);
+
+    PHVectorInt1D &storageIndexContainer = this->GetStorageIndexContainer();
+    storageIndexContainer.resize(numberOfOversetDonorCells);
+
+    PHSPACE::PHRead(dataContainer, storageIndexContainer, numberOfOversetDonorCells);
+}
+
+OversetInterplateCellManager::OversetInterplateCellManager()
+{
+    dataStorage = new Data_ParamFieldSuite();
+    totalNumberOfOversetInterplateCells = 0;
+}
+
+OversetInterplateCellManager::~OversetInterplateCellManager()
+{
+    for (unsigned int i = 0; i < oversetInterplateCellContainer.size(); ++ i)
+    {
+        delete oversetInterplateCellContainer[i];
+    }
+    delete dataStorage;
+}
+
+int OversetInterplateCellManager::GetNumberOfOversetInterplateCells(int iNeighbor)
+{
+    return oversetInterplateCellContainer[iNeighbor]->GetNumberOfOversetInterplateCells();
+}
+
+int *OversetInterplateCellManager::GetOversetInterplateCell(int iNeighbor)
+{
+    PHVectorInt1D &cellIndexContainer = oversetInterplateCellContainer[iNeighbor]->GetCellIndexContainer();
+    return & cellIndexContainer[0];
+}
+
+int *OversetInterplateCellManager::GetInterplateCellStorageIndex(int iNeighbor)
+{
+    PHVectorInt1D &storageIndexContainer = oversetInterplateCellContainer[iNeighbor]->GetStorageIndexContainer();
+    return & storageIndexContainer[0];
+}
+
+PHVectorInt1D OversetInterplateCellManager::GetNeighborDonorZoneIndexArray()
+{
+    PHVectorInt1D neighborDonorZoneIndexArray;
+
+    uint_t numberOfNeighbors = this->GetNumberOfNeighbors();
+
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbors; ++ iNeighbor)
+    {
+        int donorZoneIndex = oversetInterplateCellContainer[iNeighbor]->GetDonorZoneIndex();
+        neighborDonorZoneIndexArray.push_back(donorZoneIndex);
+    }
+
+    return neighborDonorZoneIndexArray;
+}
+
+void OversetInterplateCellManager::PostProcessReceivingOversetInformation()
+{
+    PHVector1D < OversetInterplateCell * > &oversetInterplateCellContainer = this->GetOversetInterplateCellContainer();
+    uint_t numberOfNeighbors = oversetInterplateCellContainer.size();
+
+    int totalNumberOfOversetInterplateCells = 0;
+
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbors; ++ iNeighbor)
+    {
+        OversetInterplateCell *oversetInterplateCell = oversetInterplateCellContainer[iNeighbor];
+
+        PHVectorInt1D &storageIndexContainer = oversetInterplateCell->GetStorageIndexContainer();
+        uint_t numberOfOversetInterplateCells = oversetInterplateCell->GetNumberOfOversetInterplateCells();
+
+        for (int iOversetInterplateCells = 0; iOversetInterplateCells < numberOfOversetInterplateCells; ++ iOversetInterplateCells)
+        {
+            storageIndexContainer.push_back(totalNumberOfOversetInterplateCells ++);
+        }
+    }
+
+    this->SetTotalNumberOfOversetInterplateCells(totalNumberOfOversetInterplateCells);
+}
+
+void OversetInterplateCellManager::EncodeOversetInterplateCellInformation(DataContainer *dataContainer)
+{
+    PHVector1D < OversetInterplateCell * > &oversetInterplateCellContainer = this->GetOversetInterplateCellContainer();
+
+    int numberOfOversetNeighbors = static_cast<int>( oversetInterplateCellContainer.size() );
+    PHSPACE::PHWrite(dataContainer, numberOfOversetNeighbors);
+
+    int totalNumberOfOversetInterplateCells = this->GetTotalNumberOfOversetInterplateCells();
+    PHSPACE::PHWrite(dataContainer, totalNumberOfOversetInterplateCells);
+
+    for (int iOversetNeighbor = 0; iOversetNeighbor < numberOfOversetNeighbors; ++ iOversetNeighbor)
+    {
+        OversetInterplateCell *oversetInterplateCell = oversetInterplateCellContainer[iOversetNeighbor];
+        oversetInterplateCell->EncodeOversetInterplateCellInformation(dataContainer);
+    }
+}
+
+void OversetInterplateCellManager::DecodeOversetInterplateCellInformation(DataContainer *dataContainer)
+{
+    PHVector1D < OversetInterplateCell * > &oversetInterplateCellContainer = this->GetOversetInterplateCellContainer();
+
+    int numberOfOversetNeighbors;
+    PHSPACE::PHRead(dataContainer, numberOfOversetNeighbors);
+
+    oversetInterplateCellContainer.resize(numberOfOversetNeighbors);
+
+    int totalNumberOfOversetInterplateCells;
+    PHSPACE::PHRead(dataContainer, totalNumberOfOversetInterplateCells);
+
+    this->SetTotalNumberOfOversetInterplateCells(totalNumberOfOversetInterplateCells);
+
+    for (int iOversetNeighbor = 0; iOversetNeighbor < numberOfOversetNeighbors; ++ iOversetNeighbor)
+    {
+        OversetInterplateCell *oversetInterplateCell = new OversetInterplateCell();
+
+        oversetInterplateCell->DecodeOversetInterplateCellInformation(dataContainer);
+
+        oversetInterplateCellContainer[iOversetNeighbor] = oversetInterplateCell;
+    }
+}
+
+void OversetInterplateCellManager::AddOversetInterplateCell(OversetInterplateCell *oversetInterplateCell)
+{
+    PHVector1D < OversetInterplateCell * > &oversetInterplateCellContainer = this->GetOversetInterplateCellContainer();
+    oversetInterplateCellContainer.push_back(oversetInterplateCell);
+}
+
+OversetDonorCellManager::OversetDonorCellManager()
+{
+    dataStorage = new Data_ParamFieldSuite();
+    totalNumberOfOversetDonorCells = 0;
+}
+
+OversetDonorCellManager::~OversetDonorCellManager()
+{
+    for (unsigned int i = 0; i < oversetDonorCellContainer.size(); ++ i)
+    {
+        delete oversetDonorCellContainer[i];
+    }
+    delete dataStorage;
+}
+
+int OversetDonorCellManager::GetNumberOfOversetDonorCells(int iNeighbor)
+{
+    return oversetDonorCellContainer[iNeighbor]->GetNumberOfOversetDonorCells();
+}
+
+int *OversetDonorCellManager::GetOversetDonorCell(int iNeighbor)
+{
+    PHVectorInt1D &donorCellIndexContainer = oversetDonorCellContainer[iNeighbor]->GetDonorCellIndexContainer();
+    return & donorCellIndexContainer[0];
+}
+
+RDouble *OversetDonorCellManager::GetInterCellCenterX(int iNeighbor)
+{
+    PHVectorRDouble1D &interCellCenterX = oversetDonorCellContainer[iNeighbor]->GetInterCellCenterX();
+    return & interCellCenterX[0];
+}
+
+RDouble *OversetDonorCellManager::GetInterCellCenterY(int iNeighbor)
+{
+    PHVectorRDouble1D &interCellCenterY = oversetDonorCellContainer[iNeighbor]->GetInterCellCenterY();
+    return & interCellCenterY[0];
+}
+
+RDouble *OversetDonorCellManager::GetInterCellCenterZ(int iNeighbor)
+{
+    PHVectorRDouble1D &interCellCenterZ = oversetDonorCellContainer[iNeighbor]->GetInterCellCenterZ();
+    return & interCellCenterZ[0];
+}
+
+int *OversetDonorCellManager::GetDonorCellStorageIndex(int iNeighbor)
+{
+    PHVectorInt1D &storageIndexContainer = oversetDonorCellContainer[iNeighbor]->GetStorageIndexContainer();
+    return & storageIndexContainer[0];
+}
+
+PHVectorInt1D OversetDonorCellManager::GetNeighborInterplateZoneIndexArray()
+{
+    PHVectorInt1D neighborInterplateZoneIndexArray;
+
+    uint_t numberOfNeighbors = this->GetNumberOfNeighbors();
+
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbors; ++ iNeighbor)
+    {
+        int interplateZoneIndex = oversetDonorCellContainer[iNeighbor]->GetInterplateZoneIndex();
+        neighborInterplateZoneIndexArray.push_back(interplateZoneIndex);
+    }
+
+    return neighborInterplateZoneIndexArray;
+}
+
+void OversetDonorCellManager::PostProcessSendingOversetInformation()
+{
+    PHVector1D < OversetDonorCell * > &oversetDonorCellContainer = this->GetOversetDonorCellContainer();
+    uint_t numberOfNeighbors = oversetDonorCellContainer.size();
+
+    int totalNumberOfOversetDonorCells = 0;
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbors; ++ iNeighbor)
+    {
+        OversetDonorCell *oversetDonorCell = oversetDonorCellContainer[iNeighbor];
+
+        PHVectorInt1D &storageIndexContainer = oversetDonorCell->GetStorageIndexContainer();
+        int numberOfOversetDonorCells = oversetDonorCell->GetNumberOfOversetDonorCells();
+
+        for (int iOversetDonorCell = 0; iOversetDonorCell < numberOfOversetDonorCells; ++ iOversetDonorCell)
+        {
+            storageIndexContainer.push_back(totalNumberOfOversetDonorCells ++);
+        }
+    }
+
+    this->SetTotalNumberOfOversetDonorCells(totalNumberOfOversetDonorCells);
+}
+
+void OversetDonorCellManager::EncodeOversetDonorCellInformation(DataContainer *dataContainer)
+{
+    PHVector1D < OversetDonorCell * > &oversetDonorCellContainer = this->GetOversetDonorCellContainer();
+
+    int numberOfOversetNeighbors = static_cast<int>( oversetDonorCellContainer.size() );
+    PHSPACE::PHWrite(dataContainer, numberOfOversetNeighbors);
+
+    int totalNumberOfOversetDonorCells = this->GetTotalNumberOfOversetDonorCells();
+    PHSPACE::PHWrite(dataContainer, totalNumberOfOversetDonorCells);
+
+    for (int iOversetNeighbor = 0; iOversetNeighbor < numberOfOversetNeighbors; ++ iOversetNeighbor)
+    {
+        OversetDonorCell *oversetDonorCell = oversetDonorCellContainer[iOversetNeighbor];
+        oversetDonorCell->EncodeOversetDonorCellInformation(dataContainer);
+    }
+}
+
+void OversetDonorCellManager::DecodeOversetDonorCellInformation(DataContainer *dataContainer)
+{
+    PHVector1D < OversetDonorCell * > &oversetDonorCellContainer = this->GetOversetDonorCellContainer();
+
+    int numberOfOversetNeighbors;
+    PHSPACE::PHRead(dataContainer, numberOfOversetNeighbors);
+
+    oversetDonorCellContainer.resize(numberOfOversetNeighbors);
+
+    int totalNumberOfOversetDonorCells;
+    PHSPACE::PHRead(dataContainer, totalNumberOfOversetDonorCells);
+
+    this->SetTotalNumberOfOversetDonorCells(totalNumberOfOversetDonorCells);
+
+    for (int iOversetNeighbor = 0; iOversetNeighbor < numberOfOversetNeighbors; ++ iOversetNeighbor)
+    {
+        OversetDonorCell *oversetDonorCell = new OversetDonorCell();
+
+        oversetDonorCell->DecodeOversetDonorCellInformation(dataContainer);
+
+        oversetDonorCellContainer[iOversetNeighbor] = oversetDonorCell;
+    }
+}
+
+void OversetDonorCellManager::AddOversetDonorCell(OversetDonorCell *oversetDonorCell)
+{
+    PHVector1D < OversetDonorCell * > &oversetDonorCellContainer = GetOversetDonorCellContainer();
+    oversetDonorCellContainer.push_back(oversetDonorCell);
+}
+
+uint_t GetNumberOfOversetNeighbors(int zoneIndex)
+{
+    OversetTopologyManager *oversetTopologyManagerTmp = PHSPACE::GetOversetTopologyManager();
+    uint_t numberOfOversetNeighbors = oversetTopologyManagerTmp->GetNumberOfOversetNeighbors(zoneIndex);
+    return numberOfOversetNeighbors;
+}
+
+int GetNeighborOversetZoneIndex(int zoneIndex, int iNeighbor)
+{
+    OversetTopologyManager *oversetTopologyManagerTmp = PHSPACE::GetOversetTopologyManager();
+    int neighborOversetZoneIndex = oversetTopologyManagerTmp->GetNeighborOversetZoneIndex(zoneIndex, iNeighbor);
+    return neighborOversetZoneIndex;
+}
+
+}
diff --git a/API/Geometry/src/StructGridFD.cpp b/API/Geometry/src/StructGridFD.cpp
new file mode 100644
index 0000000..a84a4e1
--- /dev/null
+++ b/API/Geometry/src/StructGridFD.cpp
@@ -0,0 +1,5473 @@
+#include "Geo_StructGrid.h"
+#include "Geo_UnstructGrid.h"
+#include "Constants.h"
+#include "Geo_MultiGridInfo_Struct.h"
+#include "Geo_SimpleBC.h"
+#include "Geo_StructBC.h"
+#include "Geo_Interface.h"
+#include "Geo_Interpoint.h"
+#include "Geo_NodeTopo_Struct.h"
+#include "Geo_FaceMetrics_Struct.h"
+#include "Geo_CellMetrics_Struct.h"
+#include "Geo_DynamicGridMetrics_Struct.h"
+#include "Geo_OversetGridTopo_Struct.h"
+#include "LinkStruct.h"
+#include "PHMpi.h"
+
+namespace PHSPACE
+{
+void StructGrid::AllocateMetricsStructHighOrder(ActionKey *actkey)
+{
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+    
+    Range I, J, K;
+    GetRange(ni, nj, nk, -4, 3, I, J, K);
+    Range D(1, 3);
+    
+    faceMetrics->AllocateMetrics(I, J, K, D);
+    cellMetrics->AllocateMetrics(I, J, K);
+    
+    RDouble4D *vgn = dynamicGridMetrics->GetFaceNormalVelocity();
+    if (vgn == 0) vgn = new RDouble4D(I, J, K, Range(1, 3), fortranArray);
+    
+    AllocateMetricsALE(actkey);
+    
+    (*vgn) = zero;
+    dynamicGridMetrics->SetFaceNormalVelocity(vgn);
+}
+
+void StructGrid::ComputeMetricsStructHighOrder2D(ActionKey *actkey)
+{
+    string highordersolvername = GlobalDataBase::GetStrParaFromDB("str_highorder_solver");
+    if(highordersolvername.substr(0, 4) == "HDCS")
+    {
+        ComputeMetricsStructHighOrder2D_HDCS();
+        return;
+    }
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    int ist =  1;
+    int ied = ni;
+    int jst =  1;
+    int jed = nj;
+
+    int ni2 = 2 * ni - 1;
+    int nj2 = 2 * nj - 1;
+    int nk2 = 2 * nk - 1;
+
+    int i2st =   1;
+    int i2ed = ni2;
+    int j2st =   1;
+    int j2ed = nj2;
+
+    RDouble3D &x2 = *new RDouble3D(Range(1, ni2), Range(1, nj2), Range(1, nk2), fortranArray);
+    RDouble3D &y2 = *new RDouble3D(Range(1, ni2), Range(1, nj2), Range(1, nk2), fortranArray);
+    RDouble3D &z2 = *new RDouble3D(Range(1, ni2), Range(1, nj2), Range(1, nk2), fortranArray);
+    
+    RDouble3D &xx = *this->GetStructX();
+    RDouble3D &yy = *this->GetStructY();
+    RDouble3D &zz = *this->GetStructZ();
+
+    //! grid refined block by block
+
+    int i, j, k, i2, j2, k2;
+    
+    k  = 1;
+    k2 = 1;
+
+    //! grid refined : copy primitive grid
+
+    for (j = jst; j <= jed; ++ j)
+    {
+        j2 = 2 * j - 1;
+        for (i = ist; i <= ied; ++ i)
+        {
+            i2 = 2 * i - 1;
+            x2(i2, j2, k2) = xx(i, j, k);
+            y2(i2, j2, k2) = yy(i, j, k);
+            z2(i2, j2, k2) = zz(i, j, k);
+        }
+    }
+
+    //! grid refined : I direction
+
+    for (j = jst; j <= jed; ++ j)
+    {
+        j2 = 2 * j - 1;
+        for (i = ist; i <= ied - 1; ++ i)
+        {
+            i2 = 2 * i;
+            x2(i2, j2, k2) = half * (x2(i2 - 1, j2, k2) + x2(i2 + 1, j2, k2));
+            y2(i2, j2, k2) = half * (y2(i2 - 1, j2, k2) + y2(i2 + 1, j2, k2));
+            z2(i2, j2, k2) = half * (z2(i2 - 1, j2, k2) + z2(i2 + 1, j2, k2));
+        }
+    }
+
+    //! grid refined : J direction
+
+    for (j = jst; j <= jed - 1; ++ j)
+    {
+        j2 = 2 * j;
+        for (i2 = i2st; i2 <= i2ed; ++ i2)
+        {
+            x2(i2, j2, k2) = half * (x2(i2, j2 - 1, k2) + x2(i2, j2 + 1, k2));
+            y2(i2, j2, k2) = half * (y2(i2, j2 - 1, k2) + y2(i2, j2 + 1, k2));
+            z2(i2, j2, k2) = half * (z2(i2, j2 - 1, k2) + z2(i2, j2 + 1, k2));
+        }
+    }
+
+    //! calculate mesh transform metrics
+
+    RDouble2D * lineData1,* lineData2;
+
+    //! calculate mesh transform metrics : first grid delta
+
+    RDouble4D &gridDeltaFirst = * new RDouble4D(Range(1, 4), Range(1, ni2), Range(1, nj2), Range(1, nk2), fortranArray);
+
+    //! calculate mesh transform metrics : first grid delta (I direction)
+
+    lineData1 = new RDouble2D(Range(1, 2), Range(1, ni2), fortranArray);
+    lineData2 = new RDouble2D(Range(1, 2), Range(1, ni2), fortranArray);
+
+    for (j2 = j2st; j2 <= j2ed; ++ j2)
+    {
+            
+        for (i2 = i2st; i2 <= i2ed; ++ i2)
+        {
+            (*lineData1)(1, i2) = x2(i2, j2, k2);
+            (*lineData1)(2, i2) = y2(i2, j2, k2);
+        }
+            
+        GridDelta(Range(1, 2), Range(1, ni2), lineData1, lineData2);
+
+        for (i2 = i2st; i2 <= i2ed; ++ i2)
+        {
+            gridDeltaFirst(1, i2, j2, k2) = (*lineData2)(1, i2);
+            gridDeltaFirst(2, i2, j2, k2) = (*lineData2)(2, i2);
+        }
+
+    }
+
+    delete lineData1;
+    delete lineData2;
+
+    //! calculate mesh transform metrics : first grid delta (J direction)
+
+    lineData1 = new RDouble2D(Range(1, 2), Range(1, nj2), fortranArray);
+    lineData2 = new RDouble2D(Range(1, 2), Range(1, nj2), fortranArray);
+
+    for (i2 = i2st; i2 <= i2ed; ++ i2)
+    {
+            
+        for (j2 = j2st; j2 <= j2ed; ++ j2)
+        {
+            (*lineData1)(1, j2) = x2(i2, j2, k2);
+            (*lineData1)(2, j2) = y2(i2, j2, k2);
+        }
+            
+        GridDelta(Range(1, 2), Range(1, nj2), lineData1, lineData2);
+
+        for (j2 = j2st; j2 <= j2ed; ++ j2)
+        {
+            gridDeltaFirst(3, i2, j2, k2) = (*lineData2)(1, j2);
+            gridDeltaFirst(4, i2, j2, k2) = (*lineData2)(2, j2);
+        }
+
+    }
+
+    delete lineData1;
+    delete lineData2;
+
+    //! calculate mesh transform metrics by grid delta
+
+    RDouble4D &xfn  = *(this->GetFaceNormalX());
+    RDouble4D &yfn  = *(this->GetFaceNormalY());
+    RDouble4D &zfn  = *(this->GetFaceNormalZ());
+    RDouble4D &area = *(this->GetFaceArea());
+    RDouble4D &xfv  = *(this->GetFaceVectorX());
+    RDouble4D &yfv  = *(this->GetFaceVectorY());
+    RDouble4D &zfv  = *(this->GetFaceVectorZ());
+
+    xfn = 0.0;
+    yfn = 0.0;
+    zfn = 0.0;
+    area= 0.0;
+    xfv = 0.0;
+    yfv = 0.0;
+    zfv = 0.0;
+
+    RDouble vkc[2],vet[2],vkcn[3],vetn[3];
+
+    //! calculate mesh transform metrics by grid delta (I direction)
+
+    for (j = 1; j <= nj - 1; ++ j)
+    {
+        j2 = 2 * j;
+
+        for (i = 1; i <= ni; ++ i)
+        {
+
+            i2 = 2 * i - 1;
+
+            vkc[0] =   gridDeltaFirst(4, i2, j2, k2);
+            vkc[1] = - gridDeltaFirst(3, i2, j2, k2);
+
+            xfv(i, j, k, IDX::IKES) = vkc[0];
+            yfv(i, j, k, IDX::IKES) = vkc[1];
+            zfv(i, j, k, IDX::IKES) = zero  ;
+            
+            NormalizeVector(vkc,vkcn, 2);
+
+            area(i, j, k, IDX::IKES) = vkcn[2];
+            xfn (i, j, k, IDX::IKES) = vkcn[0];
+            yfn (i, j, k, IDX::IKES) = vkcn[1];
+            zfn (i, j, k, IDX::IKES) = zero   ;
+
+        }
+    }
+
+    //! calculate mesh transform metrics by grid delta (J direction)
+
+    for (i = 1; i <= ni - 1; ++ i)
+    {
+        i2 = 2 * i;
+
+        for (j = 1; j <= nj; ++ j)
+        {
+
+            j2 = 2 * j - 1;
+
+            vet[0] = - gridDeltaFirst(2, i2, j2, k2);
+            vet[1] =   gridDeltaFirst(1, i2, j2, k2);
+
+            xfv(i, j, k, IDX::IETA) = vet[0];
+            yfv(i, j, k, IDX::IETA) = vet[1];
+            zfv(i, j, k, IDX::IETA) = zero  ;
+
+            NormalizeVector(vet,vetn, 2);
+
+            area(i, j, k, IDX::IETA) = vetn[2];
+            xfn (i, j, k, IDX::IETA) = vetn[0];
+            yfn (i, j, k, IDX::IETA) = vetn[1];
+            zfn (i, j, k, IDX::IETA) = zero   ;
+
+        }
+    }
+
+    //! calculate mesh transform Jacobian : second grid delta
+
+    RDouble4D &gridDeltaSecond = * new RDouble4D(Range(1, 2),Range(1, ni2),Range(1, nj2),Range(1, nk2), fortranArray);
+
+    //! calculate mesh transform Jacobian : second grid delta (I direction)
+
+    lineData1 = new RDouble2D(Range(1, 1), Range(1, ni2), fortranArray);
+    lineData2 = new RDouble2D(Range(1, 1), Range(1, ni2), fortranArray);
+
+    for (j2 = j2st; j2 <= j2ed; ++ j2)
+    {
+            
+        for (i2 = i2st; i2 <= i2ed; ++ i2)
+        {
+            (*lineData1)(1, i2) =   x2(i2, j2, k2) * gridDeltaFirst(4, i2, j2, k2)
+                                 - y2(i2, j2, k2) * gridDeltaFirst(3, i2, j2, k2);
+        }
+            
+        GridDelta(Range(1, 1), Range(1, ni2), lineData1, lineData2);
+
+        for (i2 = i2st; i2 <= i2ed; ++ i2)
+        {
+            gridDeltaSecond(1, i2, j2, k2) = (*lineData2)(1, i2);
+        }
+
+    }
+
+    delete lineData1;
+    delete lineData2;
+
+    //! calculate mesh transform Jacobian : second grid delta (J direction)
+
+    lineData1 = new RDouble2D(Range(1, 1), Range(1, nj2), fortranArray);
+    lineData2 = new RDouble2D(Range(1, 1), Range(1, nj2), fortranArray);
+
+    for (i2 = i2st; i2 <= i2ed; ++ i2)
+    {
+            
+        for (j2 = j2st; j2 <= j2ed; ++ j2)
+        {
+            (*lineData1)(1, j2) = - x2(i2, j2, k2) * gridDeltaFirst(2, i2, j2, k2)
+                                 + y2(i2, j2, k2) * gridDeltaFirst(1, i2, j2, k2);
+        }
+            
+        GridDelta(Range(1, 1), Range(1, nj2), lineData1, lineData2);
+
+        for (j2 = j2st; j2 <= j2ed; ++ j2)
+        {
+            gridDeltaSecond(2, i2, j2, k2) = (*lineData2)(1, j2);
+        }
+
+    }
+
+    delete lineData1;
+    delete lineData2;
+
+    delete &x2;
+    delete &y2;
+    delete &z2;
+
+    delete &gridDeltaFirst;
+
+    //! calculate mesh transform Jacobian by second grid delta
+
+    RDouble3D &vol  = *(this->GetCellVolume());
+    int ZoneID = this->GetZoneID();
+    int imin, jmin, kmin, imax, jmax, kmax;
+    RDouble vv,volmin,volmax;
+
+    volmin =   LARGE;
+    volmax = - LARGE;
+
+    std::ostringstream oss;
+
+    for (j = 1; j <= nj - 1; ++ j)
+    {
+        j2 = 2 * j;
+        for (i = 1; i <= ni - 1; ++ i)
+        {
+            i2 = 2 * i;
+            vv = half * (gridDeltaSecond(1, i2, j2, k2) + gridDeltaSecond(2, i2, j2, k2));
+            vol(i, j, k) = vv;
+
+            if (vv <= zero)
+            {
+                oss << " vol < 0 " << " ZoneID = " << ZoneID << " i = " << i << " j = " << j << " vol = " << vv << "\n";
+            }           
+
+            if (vv < volmin)
+            {
+                volmin = vv;
+                imin = i;
+                jmin = j;
+                kmin = k;
+            }
+
+            if (vv > volmax)
+            {
+                volmax = vv;
+                imax = i;
+                jmax = j;
+                kmax = k;
+            }
+
+        }
+    }
+
+    delete &gridDeltaSecond;
+    GhostCell3D(vol, ni, nj, 1);
+    GhostMetrics2D();
+    ComputeCellCenter();
+    StreamToActionKey(actkey, oss);
+}
+
+void StructGrid::ComputeMetricsStructHighOrder3D(ActionKey *actkey)
+{
+    string highordersolvername = GlobalDataBase::GetStrParaFromDB("str_highorder_solver");
+    if(highordersolvername.substr(0, 4) == "HDCS")
+    {
+        ComputeMetricsStructHighOrder3D_HDCS();
+        return;
+    }
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    int ist =  1;
+    int ied = ni;
+    int jst =  1;
+    int jed = nj;
+    int kst =  1;
+    int ked = nk;
+
+    int ni2 = 2 * ni - 1;
+    int nj2 = 2 * nj - 1;
+    int nk2 = 2 * nk - 1;
+
+    int i2st =   1;
+    int i2ed = ni2;
+    int j2st =   1;
+    int j2ed = nj2;
+    int k2st =   1;
+    int k2ed = nk2;
+    
+    RDouble3D &x2 = * new RDouble3D(Range(1, ni2), Range(1, nj2), Range(1, nk2), fortranArray);
+    RDouble3D &y2 = * new RDouble3D(Range(1, ni2), Range(1, nj2), Range(1, nk2), fortranArray);
+    RDouble3D &z2 = * new RDouble3D(Range(1, ni2), Range(1, nj2), Range(1, nk2), fortranArray);
+    
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+
+    //! grid refined block by block
+
+    int i, j, k, i2, j2, k2;
+
+    //! grid refined : copy primitive grid
+
+    for (k = kst; k <= ked; ++ k)
+    {
+        k2 = 2 * k - 1;
+        for (j = jst; j <= jed; ++ j)
+        {
+            j2 = 2 * j - 1;
+            for (i = ist; i <= ied; ++ i)
+            {
+                i2 = 2 * i - 1;
+                x2(i2, j2, k2) = xx(i, j, k);
+                y2(i2, j2, k2) = yy(i, j, k);
+                z2(i2, j2, k2) = zz(i, j, k);
+            }
+        }
+    }
+
+    //! grid refined : I direction
+
+    for (k = kst; k <= ked; ++ k)
+    {
+        k2 = 2 * k - 1;
+        for (j = jst; j <= jed; ++ j)
+        {
+            j2 = 2 * j - 1;
+            for (i = ist; i <= ied - 1; ++ i)
+            {
+                i2 = 2 * i;
+                x2(i2, j2, k2) = half * (x2(i2 - 1, j2, k2) + x2(i2 + 1, j2, k2));
+                y2(i2, j2, k2) = half * (y2(i2 - 1, j2, k2) + y2(i2 + 1, j2, k2));
+                z2(i2, j2, k2) = half * (z2(i2 - 1, j2, k2) + z2(i2 + 1, j2, k2));
+            }
+        }
+    }
+
+    //! grid refined : J direction
+
+    for (k = kst; k <= ked; ++ k)
+    {
+        k2 = 2 * k - 1;
+        for (j = jst; j <= jed - 1; ++ j)
+        {
+            j2 = 2 * j;
+            for (i2 = i2st; i2 <= i2ed; ++ i2)
+            {
+                x2(i2, j2, k2) = half * (x2(i2, j2 - 1, k2) + x2(i2, j2 + 1, k2));
+                y2(i2, j2, k2) = half * (y2(i2, j2 - 1, k2) + y2(i2, j2 + 1, k2));
+                z2(i2, j2, k2) = half * (z2(i2, j2 - 1, k2) + z2(i2, j2 + 1, k2));
+            }
+        }
+    }
+
+    //! grid refined : K direction
+
+    for (k = kst; k <= ked - 1; ++ k)
+    {
+        k2 = 2 * k;
+        for (j2 = j2st; j2 <= j2ed; ++ j2)
+        {
+            for (i2 = i2st; i2 <= i2ed; ++ i2)
+            {
+                x2(i2, j2, k2) = half * (x2(i2, j2, k2-1) + x2(i2, j2, k2+1));
+                y2(i2, j2, k2) = half * (y2(i2, j2, k2-1) + y2(i2, j2, k2+1));
+                z2(i2, j2, k2) = half * (z2(i2, j2, k2-1) + z2(i2, j2, k2+1));
+            }
+        }
+    }
+
+    //! calculate mesh transform metrics
+
+    RDouble2D * lineData1,* lineData2;
+
+    //! calculate mesh transform metrics : first grid delta
+
+    RDouble4D &gridDeltaFirst = * new RDouble4D(Range(1, 9), Range(1, ni2), Range(1, nj2), Range(1, nk2), fortranArray);
+
+    //! calculate mesh transform metrics : first grid delta (I direction)
+
+    lineData1 = new RDouble2D(Range(1, 3), Range(1, ni2), fortranArray);
+    lineData2 = new RDouble2D(Range(1, 3), Range(1, ni2), fortranArray);
+
+    for (k2 = k2st; k2 <= k2ed; ++ k2)
+    {
+        for (j2 = j2st; j2 <= j2ed; ++ j2)
+        {
+            
+            for (i2 = i2st; i2 <= i2ed; ++ i2)
+            {
+                (*lineData1)(1, i2) = x2(i2, j2, k2);
+                (*lineData1)(2, i2) = y2(i2, j2, k2);
+                (*lineData1)(3, i2) = z2(i2, j2, k2);
+            }
+            
+            GridDelta(Range(1, 3), Range(1, ni2), lineData1, lineData2);
+
+            for (i2 = i2st; i2 <= i2ed; ++ i2)
+            {
+                gridDeltaFirst(1, i2, j2, k2) = (*lineData2)(1, i2);
+                gridDeltaFirst(2, i2, j2, k2) = (*lineData2)(2, i2);
+                gridDeltaFirst(3, i2, j2, k2) = (*lineData2)(3, i2);
+            }
+
+        }
+    }
+
+    delete lineData1;
+    delete lineData2;
+
+    //! calculate mesh transform metrics : first grid delta (J direction)
+
+    lineData1 = new RDouble2D(Range(1, 3), Range(1, nj2), fortranArray);
+    lineData2 = new RDouble2D(Range(1, 3), Range(1, nj2), fortranArray);
+
+    for (k2 = k2st; k2 <= k2ed; ++ k2)
+    {
+        for (i2 = i2st; i2 <= i2ed; ++ i2)
+        {
+            
+            for (j2 = j2st; j2 <= j2ed; ++ j2)
+            {
+                (*lineData1)(1, j2) = x2(i2, j2, k2);
+                (*lineData1)(2, j2) = y2(i2, j2, k2);
+                (*lineData1)(3, j2) = z2(i2, j2, k2);
+            }
+            
+            GridDelta(Range(1, 3), Range(1, nj2), lineData1, lineData2);
+
+            for (j2 = j2st; j2 <= j2ed; ++ j2)
+            {
+                gridDeltaFirst(4, i2, j2, k2) = (*lineData2)(1, j2);
+                gridDeltaFirst(5, i2, j2, k2) = (*lineData2)(2, j2);
+                gridDeltaFirst(6, i2, j2, k2) = (*lineData2)(3, j2);
+            }
+
+        }
+    }
+
+    delete lineData1;
+    delete lineData2;
+
+    //! calculate mesh transform metrics : first grid delta (K direction)
+
+    lineData1 = new RDouble2D(Range(1, 3), Range(1, nk2), fortranArray);
+    lineData2 = new RDouble2D(Range(1, 3), Range(1, nk2), fortranArray);
+
+    for (j2 = j2st; j2 <= j2ed; ++ j2)
+    {
+        for (i2 = i2st; i2 <= i2ed; ++ i2)
+        {
+            
+            for (k2 = k2st; k2 <= k2ed; ++ k2)
+            {
+                (*lineData1)(1, k2) = x2(i2, j2, k2);
+                (*lineData1)(2, k2) = y2(i2, j2, k2);
+                (*lineData1)(3, k2) = z2(i2, j2, k2);
+            }
+            
+            GridDelta(Range(1, 3), Range(1, nk2), lineData1, lineData2);
+
+            for (k2 = k2st; k2 <= k2ed; ++ k2)
+            {
+                gridDeltaFirst(7, i2, j2, k2) = (*lineData2)(1, k2);
+                gridDeltaFirst(8, i2, j2, k2) = (*lineData2)(2, k2);
+                gridDeltaFirst(9, i2, j2, k2) = (*lineData2)(3, k2);
+            }
+
+        }
+    }
+
+    delete lineData1;
+    delete lineData2;
+
+    //! calculate mesh transform metrics : second grid delta
+
+    RDouble4D &gridDeltaSecond = * new RDouble4D(Range(1, 18), Range(1, ni2), Range(1, nj2), Range(1, nk2), fortranArray);
+    
+    //! calculate mesh transform metrics : second grid delta (I direction)
+
+    lineData1 = new RDouble2D(Range(1, 6), Range(1, ni2), fortranArray);
+    lineData2 = new RDouble2D(Range(1, 6), Range(1, ni2), fortranArray);
+
+    for (k2 = k2st; k2 <= k2ed; ++ k2)
+    {
+        for (j2 = j2st; j2 <= j2ed; ++ j2)
+        {
+            
+            for (i2 = i2st; i2 <= i2ed; ++ i2)
+            {
+                (*lineData1)(1, i2) = half * (z2(i2, j2, k2) * gridDeltaFirst(8, i2, j2, k2) - y2(i2, j2, k2) * gridDeltaFirst(9, i2, j2, k2));
+                (*lineData1)(2, i2) = half * (x2(i2, j2, k2) * gridDeltaFirst(9, i2, j2, k2) - z2(i2, j2, k2) * gridDeltaFirst(7, i2, j2, k2));
+                (*lineData1)(3, i2) = half * (y2(i2, j2, k2) * gridDeltaFirst(7, i2, j2, k2) - x2(i2, j2, k2) * gridDeltaFirst(8, i2, j2, k2));
+                (*lineData1)(4, i2) = half * (y2(i2, j2, k2) * gridDeltaFirst(6, i2, j2, k2) - z2(i2, j2, k2) * gridDeltaFirst(5, i2, j2, k2));
+                (*lineData1)(5, i2) = half * (z2(i2, j2, k2) * gridDeltaFirst(4, i2, j2, k2) - x2(i2, j2, k2) * gridDeltaFirst(6, i2, j2, k2));
+                (*lineData1)(6, i2) = half * (x2(i2, j2, k2) * gridDeltaFirst(5, i2, j2, k2) - y2(i2, j2, k2) * gridDeltaFirst(4, i2, j2, k2));
+            }
+            
+            GridDelta(Range(1, 6), Range(1, ni2), lineData1, lineData2);
+
+            for (i2 = i2st; i2 <= i2ed; ++ i2)
+            {
+                for (int n = 1; n <= 6; ++ n)
+                {
+                    gridDeltaSecond(n, i2, j2, k2) = (*lineData2)(n, i2);
+                }
+            }
+
+        }
+    }
+
+    delete lineData1;
+    delete lineData2;
+
+    //! calculate mesh transform metrics : second grid delta (J direction)
+
+    lineData1 = new RDouble2D(Range(1, 6), Range(1, nj2), fortranArray);
+    lineData2 = new RDouble2D(Range(1, 6), Range(1, nj2), fortranArray);
+
+    for (k2 = k2st; k2 <= k2ed; ++ k2)
+    {
+        for (i2 = i2st; i2 <= i2ed; ++ i2)
+        {
+            
+            for (j2 = j2st; j2 <= j2ed; ++ j2)
+            {
+                (*lineData1)(1, j2) = half * (y2(i2, j2, k2) * gridDeltaFirst(9, i2, j2, k2) - z2(i2, j2, k2) * gridDeltaFirst(8, i2, j2, k2));
+                (*lineData1)(2, j2) = half * (z2(i2, j2, k2) * gridDeltaFirst(7, i2, j2, k2) - x2(i2, j2, k2) * gridDeltaFirst(9, i2, j2, k2));
+                (*lineData1)(3, j2) = half * (x2(i2, j2, k2) * gridDeltaFirst(8, i2, j2, k2) - y2(i2, j2, k2) * gridDeltaFirst(7, i2, j2, k2));
+                (*lineData1)(4, j2) = half * (z2(i2, j2, k2) * gridDeltaFirst(2, i2, j2, k2) - y2(i2, j2, k2) * gridDeltaFirst(3, i2, j2, k2));
+                (*lineData1)(5, j2) = half * (x2(i2, j2, k2) * gridDeltaFirst(3, i2, j2, k2) - z2(i2, j2, k2) * gridDeltaFirst(1, i2, j2, k2));
+                (*lineData1)(6, j2) = half * (y2(i2, j2, k2) * gridDeltaFirst(1, i2, j2, k2) - x2(i2, j2, k2) * gridDeltaFirst(2, i2, j2, k2));
+            }
+            
+            GridDelta(Range(1, 6), Range(1, nj2), lineData1, lineData2);
+
+            for (j2 = j2st; j2 <= j2ed; ++ j2)
+            {
+                for (int n = 1; n <= 6; ++ n)
+                {
+                    gridDeltaSecond(n + 6, i2, j2, k2) = (*lineData2)(n, j2);
+                }
+            }
+
+        }
+    }
+
+    delete lineData1;
+    delete lineData2;
+
+    //! calculate mesh transform metrics : second grid delta (K direction)
+
+    lineData1 = new RDouble2D(Range(1, 6), Range(1, nk2), fortranArray);
+    lineData2 = new RDouble2D(Range(1, 6), Range(1, nk2), fortranArray);
+
+    for (j2 = j2st; j2 <= j2ed; ++ j2)
+    {
+        for (i2 = i2st; i2 <= i2ed; ++ i2)
+        {
+            for (k2 = k2st; k2 <= k2ed; ++ k2)
+            {
+                (*lineData1)(1, k2) = half * (z2(i2, j2, k2) * gridDeltaFirst(5, i2, j2, k2) - y2(i2, j2, k2) * gridDeltaFirst(6, i2, j2, k2));
+                (*lineData1)(2, k2) = half * (x2(i2, j2, k2) * gridDeltaFirst(6, i2, j2, k2) - z2(i2, j2, k2) * gridDeltaFirst(4, i2, j2, k2));
+                (*lineData1)(3, k2) = half * (y2(i2, j2, k2) * gridDeltaFirst(4, i2, j2, k2) - x2(i2, j2, k2) * gridDeltaFirst(5, i2, j2, k2));
+                (*lineData1)(4, k2) = half * (y2(i2, j2, k2) * gridDeltaFirst(3, i2, j2, k2) - z2(i2, j2, k2) * gridDeltaFirst(2, i2, j2, k2));
+                (*lineData1)(5, k2) = half * (z2(i2, j2, k2) * gridDeltaFirst(1, i2, j2, k2) - x2(i2, j2, k2) * gridDeltaFirst(3, i2, j2, k2));
+                (*lineData1)(6, k2) = half * (x2(i2, j2, k2) * gridDeltaFirst(2, i2, j2, k2) - y2(i2, j2, k2) * gridDeltaFirst(1, i2, j2, k2));
+            }
+            
+            GridDelta(Range(1, 6), Range(1, nk2), lineData1, lineData2);
+
+            for (k2 = k2st; k2 <= k2ed; ++ k2)
+            {
+                for (int n = 1; n <= 6; ++ n)
+                {
+                    gridDeltaSecond(n + 12, i2, j2, k2) = (*lineData2)(n, k2);
+                }
+            }
+
+        }
+    }
+
+    delete lineData1;
+    delete lineData2;
+
+    delete &gridDeltaFirst;
+
+    //! calculate mesh transform metrics by second grid delta
+
+    RDouble4D &xfn  = *(this->GetFaceNormalX());
+    RDouble4D &yfn  = *(this->GetFaceNormalY());
+    RDouble4D &zfn  = *(this->GetFaceNormalZ());
+    RDouble4D &area = *(this->GetFaceArea());
+    RDouble4D &xfv  = *(this->GetFaceVectorX());
+    RDouble4D &yfv  = *(this->GetFaceVectorY());
+    RDouble4D &zfv  = *(this->GetFaceVectorZ());
+
+    xfn = 0.0;
+    yfn = 0.0;
+    zfn = 0.0;
+    area= 0.0;
+    xfv = 0.0;
+    yfv = 0.0;
+    zfv = 0.0;
+
+    RDouble vkc[3],vet[3],vct[3],vkcn[4],vetn[4],vctn[4];
+
+    //! calculate mesh transform metrics by second grid delta (I direction)
+
+    for (k = 1; k <= nk - 1; ++ k)
+    {
+        k2 = 2 * k;
+
+        for (j = 1; j <= nj - 1; ++ j)
+        {
+            j2 = 2 * j;
+
+            for (i = 1; i <= ni; ++ i)
+            {
+
+                i2 = 2 * i - 1;
+
+                vkc[0] = gridDeltaSecond(7, i2, j2, k2) + gridDeltaSecond(13, i2, j2, k2);
+                vkc[1] = gridDeltaSecond(8, i2, j2, k2) + gridDeltaSecond(14, i2, j2, k2);
+                vkc[2] = gridDeltaSecond(9, i2, j2, k2) + gridDeltaSecond(15, i2, j2, k2);
+
+                xfv(i, j, k, IDX::IKES) = vkc[0];
+                yfv(i, j, k, IDX::IKES) = vkc[1];
+                zfv(i, j, k, IDX::IKES) = vkc[2];
+
+                NormalizeVector(vkc,vkcn, 3);
+
+                area(i, j, k, IDX::IKES) = vkcn[3];
+                xfn (i, j, k, IDX::IKES) = vkcn[0];
+                yfn (i, j, k, IDX::IKES) = vkcn[1];
+                zfn (i, j, k, IDX::IKES) = vkcn[2];
+
+            }
+        }
+    }
+
+    //! calculate mesh transform metrics by second grid delta (J direction)
+
+    for (k = 1; k <= nk - 1; ++ k)
+    {
+        k2 = 2 * k;
+
+        for (i = 1; i <= ni - 1; ++ i)
+        {
+            i2 = 2 * i;
+
+            for (j = 1; j <= nj; ++ j)
+            {
+
+                j2 = 2 * j - 1;
+
+                vet[0] = gridDeltaSecond(1, i2, j2, k2) + gridDeltaSecond(16, i2, j2, k2);
+                vet[1] = gridDeltaSecond(2, i2, j2, k2) + gridDeltaSecond(17, i2, j2, k2);
+                vet[2] = gridDeltaSecond(3, i2, j2, k2) + gridDeltaSecond(18, i2, j2, k2);
+
+                xfv(i, j, k, IDX::IETA) = vet[0];
+                yfv(i, j, k, IDX::IETA) = vet[1];
+                zfv(i, j, k, IDX::IETA) = vet[2];
+
+                NormalizeVector(vet,vetn, 3);
+
+                area(i, j, k, IDX::IETA) = vetn[3];
+                xfn (i, j, k, IDX::IETA) = vetn[0];
+                yfn (i, j, k, IDX::IETA) = vetn[1];
+                zfn (i, j, k, IDX::IETA) = vetn[2];
+
+            }
+        }
+    }
+
+    //! calculate mesh transform metrics by second grid delta (K direction)
+
+    for (j = 1; j <= nj - 1; ++ j)
+    {
+        j2 = 2 * j;
+
+        for (i = 1; i <= ni - 1; ++ i)
+        {
+            i2 = 2 * i;
+
+            for (k = 1; k <= nk; ++ k)
+            {
+
+                k2 = 2 * k - 1;
+
+                vct[0] = gridDeltaSecond(4, i2, j2, k2) + gridDeltaSecond(10, i2, j2, k2);
+                vct[1] = gridDeltaSecond(5, i2, j2, k2) + gridDeltaSecond(11, i2, j2, k2);
+                vct[2] = gridDeltaSecond(6, i2, j2, k2) + gridDeltaSecond(12, i2, j2, k2);
+
+                xfv(i, j, k, IDX::IZTA) = vct[0];
+                yfv(i, j, k, IDX::IZTA) = vct[1];
+                zfv(i, j, k, IDX::IZTA) = vct[2];
+
+                NormalizeVector(vct,vctn, 3);
+
+                area(i, j, k, IDX::IZTA) = vctn[3];
+                xfn (i, j, k, IDX::IZTA) = vctn[0];
+                yfn (i, j, k, IDX::IZTA) = vctn[1];
+                zfn (i, j, k, IDX::IZTA) = vctn[2];
+
+            }
+        }
+    }
+
+    //! calculate mesh transform Jacobian : third grid delta
+
+    RDouble4D &gridDeltaThird = * new RDouble4D(Range(1, 3), Range(1, ni2), Range(1, nj2), Range(1, nk2), fortranArray);
+
+    //! calculate mesh transform Jacobian : third grid delta (I direction)
+
+    lineData1 = new RDouble2D(Range(1, 1), Range(1, ni2), fortranArray);
+    lineData2 = new RDouble2D(Range(1, 1), Range(1, ni2), fortranArray);
+
+    for (k2 = k2st; k2 <= k2ed; ++ k2)
+    {
+        for (j2 = j2st; j2 <= j2ed; ++ j2)
+        {
+            
+            for (i2 = i2st; i2 <= i2ed; ++ i2)
+            {
+                (*lineData1)(1, i2) =   x2(i2, j2, k2) * (gridDeltaSecond(7, i2, j2, k2) + gridDeltaSecond(13, i2, j2, k2))
+                                     + y2(i2, j2, k2) * (gridDeltaSecond(8, i2, j2, k2) + gridDeltaSecond(14, i2, j2, k2))
+                                     + z2(i2, j2, k2) * (gridDeltaSecond(9, i2, j2, k2) + gridDeltaSecond(15, i2, j2, k2));
+            }
+            
+            GridDelta(Range(1, 1), Range(1, ni2), lineData1, lineData2);
+
+            for (i2 = i2st; i2 <= i2ed; ++ i2)
+            {
+                gridDeltaThird(1, i2, j2, k2) = (*lineData2)(1, i2);
+            }
+
+        }
+    }
+
+    delete lineData1;
+    delete lineData2;
+
+    //! calculate mesh transform Jacobian : third grid delta (J direction)
+
+    lineData1 = new RDouble2D(Range(1, 1), Range(1, nj2), fortranArray);
+    lineData2 = new RDouble2D(Range(1, 1), Range(1, nj2), fortranArray);
+
+    for (k2 = k2st; k2 <= k2ed; ++ k2)
+    {
+        for (i2 = i2st; i2 <= i2ed; ++ i2)
+        {
+            
+            for (j2 = j2st; j2 <= j2ed; ++ j2)
+            {
+                (*lineData1)(1, j2) =   x2(i2, j2, k2) * (gridDeltaSecond(1, i2, j2, k2) + gridDeltaSecond(16, i2, j2, k2))
+                                     + y2(i2, j2, k2) * (gridDeltaSecond(2, i2, j2, k2) + gridDeltaSecond(17, i2, j2, k2))
+                                     + z2(i2, j2, k2) * (gridDeltaSecond(3, i2, j2, k2) + gridDeltaSecond(18, i2, j2, k2));
+            }
+            
+            GridDelta(Range(1, 1), Range(1, nj2), lineData1, lineData2);
+
+            for (j2 = j2st; j2 <= j2ed; ++ j2)
+            {
+                gridDeltaThird(2, i2, j2, k2) = (*lineData2)(1, j2);
+            }
+
+        }
+    }
+
+    delete lineData1;
+    delete lineData2;
+
+    //! calculate mesh transform Jacobian : third grid delta (K direction)
+
+    lineData1 = new RDouble2D(Range(1, 1), Range(1, nk2), fortranArray);
+    lineData2 = new RDouble2D(Range(1, 1), Range(1, nk2), fortranArray);
+
+    for (j2 = j2st; j2 <= j2ed; ++ j2)
+    {
+        for (i2 = i2st; i2 <= i2ed; ++ i2)
+        {
+            
+            for (k2 = k2st; k2 <= k2ed; ++ k2)
+            {
+                (*lineData1)(1, k2) =   x2(i2, j2, k2) * (gridDeltaSecond(4, i2, j2, k2) + gridDeltaSecond(10, i2, j2, k2))
+                                     + y2(i2, j2, k2) * (gridDeltaSecond(5, i2, j2, k2) + gridDeltaSecond(11, i2, j2, k2))
+                                     + z2(i2, j2, k2) * (gridDeltaSecond(6, i2, j2, k2) + gridDeltaSecond(12, i2, j2, k2));
+            }
+            
+            GridDelta(Range(1, 1), Range(1, nk2), lineData1, lineData2);
+
+            for (k2 = k2st; k2 <= k2ed; ++ k2)
+            {
+                gridDeltaThird(3, i2, j2, k2) = (*lineData2)(1, k2);
+            }
+
+        }
+    }
+
+    delete lineData1;
+    delete lineData2;
+    
+    delete &x2;
+    delete &y2;
+    delete &z2;
+
+    delete &gridDeltaSecond;
+
+    //! calculate mesh transform Jacobian by third grid delta
+
+    RDouble3D &vol = * this->GetCellVolume();
+    int ZoneID = this->GetZoneID();
+    int imin, jmin, kmin, imax, jmax, kmax;
+    RDouble vv,volmin,volmax;
+
+    volmin =   LARGE;
+    volmax = - LARGE;
+
+    std::ostringstream oss;
+
+    for (k = 1; k <= nk - 1; ++ k)
+    {
+        k2 = 2 * k;
+        for (j = 1; j <= nj - 1; ++ j)
+        {
+            j2 = 2 * j;
+            for (i = 1; i <= ni - 1; ++ i)
+            {
+                i2 = 2 * i;
+                vv = third * (gridDeltaThird(1, i2, j2, k2) + gridDeltaThird(2, i2, j2, k2) + gridDeltaThird(3, i2, j2, k2));
+                vol(i, j, k) = vv;
+
+                if (vv <= zero)
+                {
+                    //oss << " vol < 0 " << ZoneID << " " << i << " " << j << " " << k << vv << "\n";
+                    oss << " vol < 0 " << " ZoneID = " << ZoneID << " i = " << i << " j = " << j << " k = " << k << " vol = " << vv << "\n";
+                }
+
+                if (vv < volmin)
+                {
+                    volmin = vv;
+                    imin = i;
+                    jmin = j;
+                    kmin = k;
+                }
+
+                if (vv > volmax)
+                {
+                    volmax = vv;
+                    imax = i;
+                    jmax = j;
+                    kmax = k;
+                }
+
+            }
+        }
+    }
+
+    delete &gridDeltaThird;
+
+    GhostCell3D(vol, ni, nj, nk);
+    GhostMetrics3D();
+    ComputeCellCenter();
+    StreamToActionKey(actkey, oss);
+}
+
+void StructGrid::GridDelta(const Range &NP, const Range &NI, RDouble2D *lineData1, RDouble2D *lineData2)
+{
+    int nst = NP.first();
+    int ned = NP.last();
+    int ist = NI.first();
+    int ied = NI.last();
+    
+    int i, n;
+    
+    i = ist;
+    for (n = nst; n <= ned; ++ n)
+    {
+        (*lineData2)(n, i) = - 3.0 * (*lineData1)(n, i) + 4.0 * (*lineData1)(n, i + 1) - (*lineData1)(n, i + 2);
+    }
+
+    i = ist + 1;
+    for (n = nst; n <= ned; ++ n)
+    {
+        (*lineData2)(n, i) = (*lineData1)(n, i + 1) - (*lineData1)(n, i - 1);
+    }
+
+    i = ist + 2;
+    for (n = nst; n <= ned; ++ n)
+    {
+        (*lineData2)(n, i) = (*lineData1)(n, i + 1) - (*lineData1)(n, i - 1);
+    }
+
+    for (i = ist + 3; i <= ied - 3; ++ i)
+    {
+        for (n = nst; n <= ned; ++ n)
+        {
+            
+            //! 2nd order
+            //(*lineData2)(n, i) = (*lineData1)(n, i + 1) - (*lineData1)(n, i - 1);
+            
+            //! 4th order
+            (*lineData2)(n, i) =   9.0 * ((*lineData1)(n, i + 1) - (*lineData1)(n, i - 1)) /  8.0
+                               -         ((*lineData1)(n, i + 3) - (*lineData1)(n, i - 3)) / 24.0;
+        
+        }
+    }
+
+    i = ied - 2;
+    for (n = nst; n <= ned; ++ n)
+    {
+        (*lineData2)(n, i) = (*lineData1)(n, i + 1) - (*lineData1)(n, i - 1);
+    }
+
+    i = ied - 1;
+    for (n = nst; n <= ned; ++ n)
+    {
+        (*lineData2)(n, i) = (*lineData1)(n, i + 1) - (*lineData1)(n, i - 1);
+    }
+
+    i = ied;
+    for (n = nst; n <= ned; ++ n)
+    {
+        (*lineData2)(n, i) = 3.0 * (*lineData1)(n, i) - 4.0 * (*lineData1)(n, i - 1) + (*lineData1)(n, i - 2);
+    }
+
+}
+
+void StructGrid::ComputeMetricsStructHighOrder2D_HDCS()
+{
+    RDouble4D &xfn  = *(this->GetFaceNormalX());
+    RDouble4D &yfn  = *(this->GetFaceNormalY());
+    RDouble4D &zfn  = *(this->GetFaceNormalZ());
+    RDouble4D &area = *(this->GetFaceArea());
+    RDouble4D &xfv  = *(this->GetFaceVectorX());
+    RDouble4D &yfv  = *(this->GetFaceVectorY());
+    RDouble4D &zfv  = *(this->GetFaceVectorZ());
+
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+
+    zfn = 0.0;
+    zfv = 0.0;
+
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    const int k = 1;
+    
+    const RDouble alfa_sixth =  64.0 / 45.0;
+    const RDouble    a_sixth = - 2.0 / 9.0;
+    const RDouble    b_sixth =   1.0 / 180.0;
+
+    for (int i = -1; i <= ni + 2; ++ i)
+    {
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            RDouble xeta, yeta;
+
+            RDouble x_CR2 = half * (xx(i, j + 2, k) + xx(i, j + 3, k));
+            RDouble x_CR1 = half * (xx(i, j + 1, k) + xx(i, j + 2, k));
+            RDouble x_CL1 = half * (xx(i, j    , k) + xx(i, j - 1, k));
+            RDouble x_CL2 = half * (xx(i, j - 1, k) + xx(i, j - 2, k));
+
+            RDouble x_fR = xx(i, j + 1, k);
+            RDouble x_fL = xx(i, j    , k);
+
+            RDouble y_CR2 = half * (yy(i, j + 2, k) + yy(i, j + 3, k));
+            RDouble y_CR1 = half * (yy(i, j + 1, k) + yy(i, j + 2, k));
+            RDouble y_CL1 = half * (yy(i, j    , k) + yy(i, j - 1, k));
+            RDouble y_CL2 = half * (yy(i, j - 1, k) + yy(i, j - 2, k));
+
+            RDouble y_fR = yy(i, j + 1, k);
+            RDouble y_fL = yy(i, j    , k);
+
+            xeta = alfa_sixth * (x_fR - x_fL) + a_sixth * (x_CR1 - x_CL1) + b_sixth * (x_CR2 - x_CL2);
+            yeta = alfa_sixth * (y_fR - y_fL) + a_sixth * (y_CR1 - y_CL1) + b_sixth * (y_CR2 - y_CL2);
+
+            RDouble ds = sqrt(xeta * xeta + yeta * yeta);
+
+            xfv(i, j, k, 1) =   yeta;
+            yfv(i, j, k, 1) = - xeta;
+
+            area(i, j, k, 1) = ds;
+
+            xfn(i, j, k, 1) =   yeta / (ds + TINY);
+            yfn(i, j, k, 1) = - xeta / (ds + TINY);
+        }
+    }
+
+    for (int j = -1; j <= nj + 2; ++ j)
+    {
+        for (int i = 1; i <= ni - 1; ++ i)
+        {
+            RDouble xkxi, ykxi;
+
+            RDouble x_CR2 = half * (xx(i + 2, j, k) + xx(i + 3, j, k));
+            RDouble x_CR1 = half * (xx(i + 1, j, k) + xx(i + 2, j, k));
+            RDouble x_CL1 = half * (xx(i    , j, k) + xx(i - 1, j, k));
+            RDouble x_CL2 = half * (xx(i - 1, j, k) + xx(i - 2, j, k));
+
+            RDouble x_fR = xx(i + 1, j, k);
+            RDouble x_fL = xx(i    , j, k);
+
+            RDouble y_CR2 = half * (yy(i + 2, j, k) + yy(i + 3, j, k));
+            RDouble y_CR1 = half * (yy(i + 1, j, k) + yy(i + 2, j, k));
+            RDouble y_CL1 = half * (yy(i    , j, k) + yy(i - 1, j, k));
+            RDouble y_CL2 = half * (yy(i - 1, j, k) + yy(i - 2, j, k));
+
+            RDouble y_fR = yy(i + 1, j, k);
+            RDouble y_fL = yy(i    , j, k);
+
+            xkxi = alfa_sixth * (x_fR - x_fL) + a_sixth * (x_CR1 - x_CL1) + b_sixth * (x_CR2 - x_CL2);
+            ykxi = alfa_sixth * (y_fR - y_fL) + a_sixth * (y_CR1 - y_CL1) + b_sixth * (y_CR2 - y_CL2);
+
+            RDouble ds = sqrt(xkxi * xkxi + ykxi * ykxi);
+
+            xfv(i, j, k, 2) = - ykxi;
+            yfv(i, j, k, 2) =   xkxi;
+
+            area(i, j, k, 2) = ds;
+
+            xfn(i, j, k, 2) = - ykxi / (ds + TINY);
+            yfn(i, j, k, 2) =   xkxi / (ds + TINY);
+        }
+    }
+    //!=
+    RDouble3D &vol = *this->GetCellVolume();
+
+    RDouble3D &xfaceI = *new RDouble3D(Range(-1, ni + 2), Range(1, nj - 1), Range(1, 1), fortranArray);
+    RDouble3D &yfaceI = *new RDouble3D(Range(-1, ni + 2), Range(1, nj - 1), Range(1, 1), fortranArray);
+
+    RDouble3D &xfaceJ = *new RDouble3D(Range(1, ni - 1), Range(-1, nj + 2), Range(1, 1), fortranArray);
+    RDouble3D &yfaceJ = *new RDouble3D(Range(1, ni - 1), Range(-1, nj + 2), Range(1, 1), fortranArray);
+
+    for (int j = 1; j <= nj - 1; ++ j)
+    {
+        for (int i = -1; i <= ni + 2; ++ i)
+        {
+            RDouble x1 = xx(i, j,  k);
+            RDouble x2 = xx(i, j + 1, k);
+
+            RDouble y1 = yy(i, j,  k);
+            RDouble y2 = yy(i, j + 1, k);
+            
+            xfaceI(i, j, k) = half * (x1 + x2);
+            yfaceI(i, j, k) = half * (y1 + y2);
+        }
+    }
+    for (int i = 1; i <= ni - 1; ++ i)
+    {
+        for (int j = -1; j <= nj + 2; ++ j)
+        {
+            RDouble x1 = xx(i,  j, k);
+            RDouble x2 = xx(i + 1, j, k);
+
+            RDouble y1 = yy(i,  j, k);
+            RDouble y2 = yy(i + 1, j, k);
+            
+            xfaceJ(i, j, k) = half * (x1 + x2);
+            yfaceJ(i, j, k) = half * (y1 + y2);
+        }
+    }
+
+    int ZoneID = this->GetZoneID();
+    std::ostringstream oss;
+    for (int i = 1; i <= ni - 1; ++ i)
+    {
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            RDouble vol_kxi;
+            RDouble vol_eta;
+
+            RDouble kxi_fL = xfaceI(i    , j, k) * xfv(i    , j, k, 1) + yfaceI(i    , j, k) * yfv(i    , j, k, 1);
+            RDouble kxi_fR = xfaceI(i + 1, j, k) * xfv(i + 1, j, k, 1) + yfaceI(i + 1, j, k) * yfv(i + 1, j, k, 1);
+
+            RDouble kxi_CL2 = 0.25 * (xfaceI(i - 2, j, k) + xfaceI(i - 1, j, k)) * (xfv(i - 2, j, k, 1) + xfv(i - 1, j, k, 1)) + 0.25 * (yfaceI(i - 2, j, k) + yfaceI(i - 1, j, k)) * (yfv(i - 2, j, k, 1) + yfv(i - 1, j, k, 1));
+            RDouble kxi_CL1 = 0.25 * (xfaceI(i - 1, j, k) + xfaceI(i    , j, k)) * (xfv(i - 1, j, k, 1) + xfv(i    , j, k, 1)) + 0.25 * (yfaceI(i - 1, j, k) + yfaceI(i    , j, k)) * (yfv(i - 1, j, k, 1) + yfv(i    , j, k, 1));
+            RDouble kxi_CR1 = 0.25 * (xfaceI(i + 1, j, k) + xfaceI(i + 2, j, k)) * (xfv(i + 1, j, k, 1) + xfv(i + 2, j, k, 1)) + 0.25 * (yfaceI(i + 1, j, k) + yfaceI(i + 2, j, k)) * (yfv(i + 1, j, k, 1) + yfv(i + 2, j, k, 1));
+            RDouble kxi_CR2 = 0.25 * (xfaceI(i + 2, j, k) + xfaceI(i + 3, j, k)) * (xfv(i + 2, j, k, 1) + xfv(i + 3, j, k, 1)) + 0.25 * (yfaceI(i + 2, j, k) + yfaceI(i + 3, j, k)) * (yfv(i + 2, j, k, 1) + yfv(i + 3, j, k, 1));
+
+            RDouble eta_fL = xfaceJ(i, j    , k) * xfv(i, j    , k, 2) + yfaceJ(i, j    , k) * yfv(i, j    , k, 2);
+            RDouble eta_fR = xfaceJ(i, j + 1, k) * xfv(i, j + 1, k, 2) + yfaceJ(i, j + 1, k) * yfv(i, j + 1, k, 2);
+
+            RDouble eta_CL2 = 0.25 * (xfaceJ(i, j - 2, k) + xfaceJ(i, j - 1, k)) * (xfv(i, j - 2, k, 2) + xfv(i, j - 1, k, 2)) + 0.25 * (yfaceJ(i, j - 2, k) + yfaceJ(i, j - 1, k)) * (yfv(i, j - 2, k, 2) + yfv(i, j - 1, k, 2));
+            RDouble eta_CL1 = 0.25 * (xfaceJ(i, j - 1, k) + xfaceJ(i, j    , k)) * (xfv(i, j - 1, k, 2) + xfv(i, j    , k, 2)) + 0.25 * (yfaceJ(i, j - 1, k) + yfaceJ(i, j    , k)) * (yfv(i, j - 1, k, 2) + yfv(i, j    , k, 2));
+            RDouble eta_CR1 = 0.25 * (xfaceJ(i, j + 1, k) + xfaceJ(i, j + 2, k)) * (xfv(i, j + 1, k, 2) + xfv(i, j + 2, k, 2)) + 0.25 * (yfaceJ(i, j + 1, k) + yfaceJ(i, j + 2, k)) * (yfv(i, j + 1, k, 2) + yfv(i, j + 2, k, 2));
+            RDouble eta_CR2 = 0.25 * (xfaceJ(i, j + 2, k) + xfaceJ(i, j + 3, k)) * (xfv(i, j + 2, k, 2) + xfv(i, j + 3, k, 2)) + 0.25 * (yfaceJ(i, j + 2, k) + yfaceJ(i, j + 3, k)) * (yfv(i, j + 2, k, 2) + yfv(i, j + 3, k, 2));
+
+
+            vol_kxi= alfa_sixth * (kxi_fR - kxi_fL) + a_sixth * (kxi_CR1 - kxi_CL1) + b_sixth * (kxi_CR2 - kxi_CL2);
+            vol_eta= alfa_sixth * (eta_fR - eta_fL) + a_sixth * (eta_CR1 - eta_CL1) + b_sixth * (eta_CR2 - eta_CL2);
+
+            RDouble vol_FD = half * (vol_kxi + vol_eta);
+
+            //!RDouble vol_FV = vol(i, j, k);
+            //!
+            //!if (vol_FD <= zero || vol_FD > 1.2 * vol_FV || vol_FD < 0.8 * vol_FV)
+            //!{
+            //!    vol_FD = vol_FV;
+            //!}
+            if(vol_FD < SMALL)
+            {
+                oss << " vol < 0 " << " ZoneID = " << ZoneID << " i = " << i << " j = " << j << " vol = " << vol_FD << "\n";
+            }
+            vol(i, j, k) = vol_FD;
+        }
+    }
+    ComputeCellCenter();
+
+    delete &xfaceI;
+    delete &yfaceI;
+    delete &xfaceJ;
+    delete &yfaceJ;
+}
+
+void StructGrid::ComputeMetricsStructHighOrder3D_HDCS()
+{
+    RDouble4D &xfn  = *(this->GetFaceNormalX());
+    RDouble4D &yfn  = *(this->GetFaceNormalY());
+    RDouble4D &zfn  = *(this->GetFaceNormalZ());
+    RDouble4D &area = *(this->GetFaceArea());
+    RDouble4D &xfv  = *(this->GetFaceVectorX());
+    RDouble4D &yfv  = *(this->GetFaceVectorY());
+    RDouble4D &zfv  = *(this->GetFaceVectorZ());
+
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+
+    const RDouble alfa_sixth =  64.0 / 45.0;
+    const RDouble    a_sixth = - 2.0 / 9.0;
+    const RDouble    b_sixth =   1.0 / 180.0;
+
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();  
+    RDouble3D &xA    = *new RDouble3D(Range(1, ni - 1), Range(-1, nj + 2), Range(-1, nk + 2), fortranArray);
+    RDouble3D &yA    = *new RDouble3D(Range(1, ni - 1), Range(-1, nj + 2), Range(-1, nk + 2), fortranArray);
+    RDouble3D &zA    = *new RDouble3D(Range(1, ni - 1), Range(-1, nj + 2), Range(-1, nk + 2), fortranArray);
+    RDouble3D &xkxi  = *new RDouble3D(Range(1, ni - 1), Range(-1, nj + 2), Range(-1, nk + 2), fortranArray);
+    RDouble3D &ykxi  = *new RDouble3D(Range(1, ni - 1), Range(-1, nj + 2), Range(-1, nk + 2), fortranArray);
+    RDouble3D &zkxi  = *new RDouble3D(Range(1, ni - 1), Range(-1, nj + 2), Range(-1, nk + 2), fortranArray);
+
+    RDouble3D &xB    = *new RDouble3D(Range(-1, ni + 2), Range(1, nj - 1), Range(-1, nk + 2), fortranArray);
+    RDouble3D &yB    = *new RDouble3D(Range(-1, ni + 2), Range(1, nj - 1), Range(-1, nk + 2), fortranArray);
+    RDouble3D &zB    = *new RDouble3D(Range(-1, ni + 2), Range(1, nj - 1), Range(-1, nk + 2), fortranArray);
+    RDouble3D &xeta  = *new RDouble3D(Range(-1, ni + 2), Range(1, nj - 1), Range(-1, nk + 2), fortranArray);
+    RDouble3D &yeta  = *new RDouble3D(Range(-1, ni + 2), Range(1, nj - 1), Range(-1, nk + 2), fortranArray);
+    RDouble3D &zeta  = *new RDouble3D(Range(-1, ni + 2), Range(1, nj - 1), Range(-1, nk + 2), fortranArray);
+
+    RDouble3D &xC    = *new RDouble3D(Range(-1, ni + 2), Range(-1, nj + 2), Range(1, nk - 1), fortranArray);
+    RDouble3D &yC    = *new RDouble3D(Range(-1, ni + 2), Range(-1, nj + 2), Range(1, nk - 1), fortranArray);
+    RDouble3D &zC    = *new RDouble3D(Range(-1, ni + 2), Range(-1, nj + 2), Range(1, nk - 1), fortranArray);
+    RDouble3D &xcta  = *new RDouble3D(Range(-1, ni + 2), Range(-1, nj + 2), Range(1, nk - 1), fortranArray);
+    RDouble3D &ycta  = *new RDouble3D(Range(-1, ni + 2), Range(-1, nj + 2), Range(1, nk - 1), fortranArray);
+    RDouble3D &zcta  = *new RDouble3D(Range(-1, ni + 2), Range(-1, nj + 2), Range(1, nk - 1), fortranArray);
+
+    for (int i = 1; i <= ni - 1; ++ i)
+    {
+        for (int j = -1; j <= nj + 2; ++ j)
+        {
+            for (int k = -1; k <= nk + 2; ++ k)
+            {
+                xA(i, j, k) = half * (xx(i + 1, j, k) + xx(i, j, k));
+                yA(i, j, k) = half * (yy(i + 1, j, k) + yy(i, j, k));
+                zA(i, j, k) = half * (zz(i + 1, j, k) + zz(i, j, k));
+
+                RDouble x_CL2 = half * (xx(i - 1, j, k) + xx(i - 2, j, k));
+                RDouble x_CL1 = half * (xx(i    , j, k) + xx(i - 1, j, k));
+                RDouble x_fL  =         xx(i    , j, k);
+                RDouble x_fR  =         xx(i + 1, j, k);
+                RDouble x_CR1 = half * (xx(i + 1, j, k) + xx(i + 2, j, k));
+                RDouble x_CR2 = half * (xx(i + 2, j, k) + xx(i + 3, j, k));
+
+                RDouble y_CL2 = half * (yy(i - 1, j, k) + yy(i - 2, j, k));
+                RDouble y_CL1 = half * (yy(i    , j, k) + yy(i - 1, j, k));
+                RDouble y_fL  =         yy(i    , j, k);
+                RDouble y_fR  =         yy(i + 1, j, k);
+                RDouble y_CR1 = half * (yy(i + 1, j, k) + yy(i + 2, j, k));
+                RDouble y_CR2 = half * (yy(i + 2, j, k) + yy(i + 3, j, k));
+
+                RDouble z_CL2 = half * (zz(i - 1, j, k) + zz(i - 2, j, k));
+                RDouble z_CL1 = half * (zz(i    , j, k) + zz(i - 1, j, k));
+                RDouble z_fL  =         zz(i    , j, k);
+                RDouble z_fR  =         zz(i + 1, j, k);
+                RDouble z_CR1 = half * (zz(i + 1, j, k) + zz(i + 2, j, k));
+                RDouble z_CR2 = half * (zz(i + 2, j, k) + zz(i + 3, j, k));
+
+                xkxi(i, j, k) = alfa_sixth * (x_fR - x_fL) + a_sixth * (x_CR1 - x_CL1) + b_sixth * (x_CR2 - x_CL2);
+                ykxi(i, j, k) = alfa_sixth * (y_fR - y_fL) + a_sixth * (y_CR1 - y_CL1) + b_sixth * (y_CR2 - y_CL2);
+                zkxi(i, j, k) = alfa_sixth * (z_fR - z_fL) + a_sixth * (z_CR1 - z_CL1) + b_sixth * (z_CR2 - z_CL2);
+            }
+        }
+    }
+
+    for (int j = 1; j <= nj - 1; ++ j)
+    {
+        for (int k = -1; k <= nk + 2; ++ k)
+        {
+            for (int i = -1; i <= ni + 2; ++ i)
+            {
+                xB(i, j, k) = half * (xx(i, j + 1, k) + xx(i, j, k));
+                yB(i, j, k) = half * (yy(i, j + 1, k) + yy(i, j, k));
+                zB(i, j, k) = half * (zz(i, j + 1, k) + zz(i, j, k));
+
+                RDouble x_CL2 = half * (xx(i, j - 1, k) + xx(i, j - 2, k));
+                RDouble x_CL1 = half * (xx(i, j    , k) + xx(i, j - 1, k));
+                RDouble x_fL  =         xx(i, j    , k);
+                RDouble x_fR  =         xx(i, j + 1, k);
+                RDouble x_CR1 = half * (xx(i, j + 1, k) + xx(i, j + 2, k));
+                RDouble x_CR2 = half * (xx(i, j + 2, k) + xx(i, j + 3, k));
+
+                RDouble y_CL2 = half * (yy(i, j - 1, k) + yy(i, j - 2, k));
+                RDouble y_CL1 = half * (yy(i, j    , k) + yy(i, j - 1, k));
+                RDouble y_fL  =         yy(i, j    , k);
+                RDouble y_fR  =         yy(i, j + 1, k);
+                RDouble y_CR1 = half * (yy(i, j + 1, k) + yy(i, j + 2, k));
+                RDouble y_CR2 = half * (yy(i, j + 2, k) + yy(i, j + 3, k));
+
+                RDouble z_CL2 = half * (zz(i, j - 1, k) + zz(i, j - 2, k));
+                RDouble z_CL1 = half * (zz(i, j    , k) + zz(i, j - 1, k));
+                RDouble z_fL  =         zz(i, j    , k);
+                RDouble z_fR  =         zz(i, j + 1, k);
+                RDouble z_CR1 = half * (zz(i, j + 1, k) + zz(i, j + 2, k));
+                RDouble z_CR2 = half * (zz(i, j + 2, k) + zz(i, j + 3, k));
+
+                xeta(i, j, k) = alfa_sixth * (x_fR - x_fL) + a_sixth * (x_CR1 - x_CL1) + b_sixth * (x_CR2 - x_CL2);
+                yeta(i, j, k) = alfa_sixth * (y_fR - y_fL) + a_sixth * (y_CR1 - y_CL1) + b_sixth * (y_CR2 - y_CL2);
+                zeta(i, j, k) = alfa_sixth * (z_fR - z_fL) + a_sixth * (z_CR1 - z_CL1) + b_sixth * (z_CR2 - z_CL2);
+            }
+        }
+    }
+    
+    for (int k = 1; k <= nk - 1; ++ k)
+    {
+        for (int i = -1; i <= ni + 2; ++ i)
+        {
+            for (int j = -1; j <= nj + 2; ++ j)
+            {
+                xC(i, j, k) = half * (xx(i, j, k + 1) + xx(i, j, k));
+                yC(i, j, k) = half * (yy(i, j, k + 1) + yy(i, j, k));
+                zC(i, j, k) = half * (zz(i, j, k + 1) + zz(i, j, k));
+
+                RDouble x_CL2 = half * (xx(i, j, k - 1) + xx(i, j, k - 2));
+                RDouble x_CL1 = half * (xx(i, j, k   ) + xx(i, j, k - 1));
+                RDouble x_fL  =         xx(i, j, k   );
+                RDouble x_fR  =         xx(i, j, k + 1);
+                RDouble x_CR1 = half * (xx(i, j, k + 1) + xx(i, j, k + 2));
+                RDouble x_CR2 = half * (xx(i, j, k + 2) + xx(i, j, k + 3));
+
+                RDouble y_CL2 = half * (yy(i, j, k - 1) + yy(i, j, k - 2));
+                RDouble y_CL1 = half * (yy(i, j, k   ) + yy(i, j, k - 1));
+                RDouble y_fL  =         yy(i, j, k   );
+                RDouble y_fR  =         yy(i, j, k + 1);
+                RDouble y_CR1 = half * (yy(i, j, k + 1) + yy(i, j, k + 2));
+                RDouble y_CR2 = half * (yy(i, j, k + 2) + yy(i, j, k + 3));
+
+                RDouble z_CL2 = half * (zz(i, j, k - 1) + zz(i, j, k - 2));
+                RDouble z_CL1 = half * (zz(i, j, k   ) + zz(i, j, k - 1));
+                RDouble z_fL  =         zz(i, j, k   );
+                RDouble z_fR  =         zz(i, j, k + 1);
+                RDouble z_CR1 = half * (zz(i, j, k + 1) + zz(i, j, k + 2));
+                RDouble z_CR2 = half * (zz(i, j, k + 2) + zz(i, j, k + 3));
+
+                xcta(i, j, k) = alfa_sixth * (x_fR - x_fL) + a_sixth * (x_CR1 - x_CL1) + b_sixth * (x_CR2 - x_CL2);
+                ycta(i, j, k) = alfa_sixth * (y_fR - y_fL) + a_sixth * (y_CR1 - y_CL1) + b_sixth * (y_CR2 - y_CL2);
+                zcta(i, j, k) = alfa_sixth * (z_fR - z_fL) + a_sixth * (z_CR1 - z_CL1) + b_sixth * (z_CR2 - z_CL2);
+            }
+        }
+    }
+    //!=
+    for (int k = 1; k <= nk - 1; ++ k)
+    {
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            for (int i = -1; i <= ni + 2; ++ i)
+            {
+                RDouble KX = 0.0;
+                RDouble KY = 0.0;
+                RDouble KZ = 0.0;
+
+                RDouble sx_CL2 = 0.25 * (yeta(i, j, k - 1) + yeta(i, j, k - 2)) * (zB(i, j, k - 1) + zB(i, j, k - 2)) - 0.25 * (yB(i, j, k - 1) + yB(i, j, k - 2)) * (zeta(i, j, k - 1) + zeta(i, j, k - 2));
+                RDouble sx_CL1 = 0.25 * (yeta(i, j, k   ) + yeta(i, j, k - 1)) * (zB(i, j, k   ) + zB(i, j, k - 1)) - 0.25 * (yB(i, j, k   ) + yB(i, j, k - 1)) * (zeta(i, j, k   ) + zeta(i, j, k - 1));
+                RDouble sx_fL  =         yeta(i, j, k   )                      *  zB(i, j, k   )                    -         yB(i, j, k   )                    *  zeta(i, j, k   )                     ;
+                RDouble sx_fR  =         yeta(i, j, k + 1)                      *  zB(i, j, k + 1)                    -         yB(i, j, k + 1)                    *  zeta(i, j, k + 1)                     ;
+                RDouble sx_CR1 = 0.25 * (yeta(i, j, k + 1) + yeta(i, j, k + 2)) * (zB(i, j, k + 1) + zB(i, j, k + 2)) - 0.25 * (yB(i, j, k + 1) + yB(i, j, k + 2)) * (zeta(i, j, k + 1) + zeta(i, j, k + 2));
+                RDouble sx_CR2 = 0.25 * (yeta(i, j, k + 2) + yeta(i, j, k + 3)) * (zB(i, j, k + 2) + zB(i, j, k + 3)) - 0.25 * (yB(i, j, k + 2) + yB(i, j, k + 3)) * (zeta(i, j, k + 2) + zeta(i, j, k + 3));
+
+                RDouble sy_CL2 = 0.25 * (zeta(i, j, k - 1) + zeta(i, j, k - 2)) * (xB(i, j, k - 1) + xB(i, j, k - 2)) - 0.25 * (zB(i, j, k - 1) + zB(i, j, k - 2)) * (xeta(i, j, k - 1) + xeta(i, j, k - 2));
+                RDouble sy_CL1 = 0.25 * (zeta(i, j, k   ) + zeta(i, j, k - 1)) * (xB(i, j, k   ) + xB(i, j, k - 1)) - 0.25 * (zB(i, j, k   ) + zB(i, j, k - 1)) * (xeta(i, j, k   ) + xeta(i, j, k - 1));
+                RDouble sy_fL  =         zeta(i, j, k   )                      *  xB(i, j, k   )                    -         zB(i, j, k   )                    *  xeta(i, j, k   )                     ;
+                RDouble sy_fR  =         zeta(i, j, k + 1)                      *  xB(i, j, k + 1)                    -         zB(i, j, k + 1)                    *  xeta(i, j, k + 1)                     ;
+                RDouble sy_CR1 = 0.25 * (zeta(i, j, k + 1) + zeta(i, j, k + 2)) * (xB(i, j, k + 1) + xB(i, j, k + 2)) - 0.25 * (zB(i, j, k + 1) + zB(i, j, k + 2)) * (xeta(i, j, k + 1) + xeta(i, j, k + 2));
+                RDouble sy_CR2 = 0.25 * (zeta(i, j, k + 2) + zeta(i, j, k + 3)) * (xB(i, j, k + 2) + xB(i, j, k + 3)) - 0.25 * (zB(i, j, k + 2) + zB(i, j, k + 3)) * (xeta(i, j, k + 2) + xeta(i, j, k + 3));
+
+                RDouble sz_CL2 = 0.25 * (xeta(i, j, k - 1) + xeta(i, j, k - 2)) * (yB(i, j, k - 1) + yB(i, j, k - 2)) - 0.25 * (xB(i, j, k - 1) + xB(i, j, k - 2)) * (yeta(i, j, k - 1) + yeta(i, j, k - 2));
+                RDouble sz_CL1 = 0.25 * (xeta(i, j, k   ) + xeta(i, j, k - 1)) * (yB(i, j, k   ) + yB(i, j, k - 1)) - 0.25 * (xB(i, j, k   ) + xB(i, j, k - 1)) * (yeta(i, j, k   ) + yeta(i, j, k - 1));
+                RDouble sz_fL  =         xeta(i, j, k   )                      *  yB(i, j, k   )                    -         xB(i, j, k   )                    *  yeta(i, j, k   )                     ;
+                RDouble sz_fR  =         xeta(i, j, k + 1)                      *  yB(i, j, k + 1)                    -         xB(i, j, k + 1)                    *  yeta(i, j, k + 1)                     ;
+                RDouble sz_CR1 = 0.25 * (xeta(i, j, k + 1) + xeta(i, j, k + 2)) * (yB(i, j, k + 1) + yB(i, j, k + 2)) - 0.25 * (xB(i, j, k + 1) + xB(i, j, k + 2)) * (yeta(i, j, k + 1) + yeta(i, j, k + 2));
+                RDouble sz_CR2 = 0.25 * (xeta(i, j, k + 2) + xeta(i, j, k + 3)) * (yB(i, j, k + 2) + yB(i, j, k + 3)) - 0.25 * (xB(i, j, k + 2) + xB(i, j, k + 3)) * (yeta(i, j, k + 2) + yeta(i, j, k + 3));
+                
+                KX += half * (alfa_sixth * (sx_fR - sx_fL) + a_sixth * (sx_CR1 - sx_CL1) + b_sixth * (sx_CR2 - sx_CL2));
+                KY += half * (alfa_sixth * (sy_fR - sy_fL) + a_sixth * (sy_CR1 - sy_CL1) + b_sixth * (sy_CR2 - sy_CL2));
+                KZ += half * (alfa_sixth * (sz_fR - sz_fL) + a_sixth * (sz_CR1 - sz_CL1) + b_sixth * (sz_CR2 - sz_CL2));
+
+                sx_CL2 = 0.25 * (zcta(i, j - 1, k) + zcta(i, j - 2, k)) * (yC(i, j - 1, k) + yC(i, j - 2, k)) - 0.25 * (zC(i, j - 1, k) + zC(i, j - 2, k)) * (ycta(i, j - 1, k) + ycta(i, j - 2, k));
+                sx_CL1 = 0.25 * (zcta(i, j    , k) + zcta(i, j - 1, k)) * (yC(i, j    , k) + yC(i, j - 1, k)) - 0.25 * (zC(i, j    , k) + zC(i, j - 1, k)) * (ycta(i, j    , k) + ycta(i, j - 1, k));
+                sx_fL  =         zcta(i, j    , k)                      *  yC(i, j    , k)                    -         zC(i, j    , k)                    *  ycta(i, j    , k)                     ;
+                sx_fR  =         zcta(i, j + 1, k)                      *  yC(i, j + 1, k)                    -         zC(i, j + 1, k)                    *  ycta(i, j + 1, k)                     ;
+                sx_CR1 = 0.25 * (zcta(i, j + 1, k) + zcta(i, j + 2, k)) * (yC(i, j + 1, k) + yC(i, j + 2, k)) - 0.25 * (zC(i, j + 1, k) + zC(i, j + 2, k)) * (ycta(i, j + 1, k) + ycta(i, j + 2, k));
+                sx_CR2 = 0.25 * (zcta(i, j + 2, k) + zcta(i, j + 3, k)) * (yC(i, j + 2, k) + yC(i, j + 3, k)) - 0.25 * (zC(i, j + 2, k) + zC(i, j + 3, k)) * (ycta(i, j + 2, k) + ycta(i, j + 3, k));
+
+                sy_CL2 = 0.25 * (xcta(i, j - 1, k) + xcta(i, j - 2, k)) * (zC(i, j - 1, k) + zC(i, j - 2, k)) - 0.25 * (xC(i, j - 1, k) + xC(i, j - 2, k)) * (zcta(i, j - 1, k) + zcta(i, j - 2, k));
+                sy_CL1 = 0.25 * (xcta(i, j    , k) + xcta(i, j - 1, k)) * (zC(i, j    , k) + zC(i, j - 1, k)) - 0.25 * (xC(i, j    , k) + xC(i, j - 1, k)) * (zcta(i, j    , k) + zcta(i, j - 1, k));
+                sy_fL  =         xcta(i, j    , k)                      *  zC(i, j    , k)                    -         xC(i, j    , k)                    *  zcta(i, j    , k)                     ;
+                sy_fR  =         xcta(i, j + 1, k)                      *  zC(i, j + 1, k)                    -         xC(i, j + 1, k)                    *  zcta(i, j + 1, k)                     ;
+                sy_CR1 = 0.25 * (xcta(i, j + 1, k) + xcta(i, j + 2, k)) * (zC(i, j + 1, k) + zC(i, j + 2, k)) - 0.25 * (xC(i, j + 1, k) + xC(i, j + 2, k)) * (zcta(i, j + 1, k) + zcta(i, j + 2, k));
+                sy_CR2 = 0.25 * (xcta(i, j + 2, k) + xcta(i, j + 3, k)) * (zC(i, j + 2, k) + zC(i, j + 3, k)) - 0.25 * (xC(i, j + 2, k) + xC(i, j + 3, k)) * (zcta(i, j + 2, k) + zcta(i, j + 3, k));
+
+                sz_CL2 = 0.25 * (ycta(i, j - 1, k) + ycta(i, j - 2, k)) * (xC(i, j - 1, k) + xC(i, j - 2, k)) - 0.25 * (yC(i, j - 1, k) + yC(i, j - 2, k)) * (xcta(i, j - 1, k) + xcta(i, j - 2, k));
+                sz_CL1 = 0.25 * (ycta(i, j    , k) + ycta(i, j - 1, k)) * (xC(i, j    , k) + xC(i, j - 1, k)) - 0.25 * (yC(i, j    , k) + yC(i, j - 1, k)) * (xcta(i, j    , k) + xcta(i, j - 1, k));
+                sz_fL  =         ycta(i, j    , k)                      *  xC(i, j    , k)                    -         yC(i, j    , k)                    *  xcta(i, j    , k)                     ;
+                sz_fR  =         ycta(i, j + 1, k)                      *  xC(i, j + 1, k)                    -         yC(i, j + 1, k)                    *  xcta(i, j + 1, k)                     ;
+                sz_CR1 = 0.25 * (ycta(i, j + 1, k) + ycta(i, j + 2, k)) * (xC(i, j + 1, k) + xC(i, j + 2, k)) - 0.25 * (yC(i, j + 1, k) + yC(i, j + 2, k)) * (xcta(i, j + 1, k) + xcta(i, j + 2, k));
+                sz_CR2 = 0.25 * (ycta(i, j + 2, k) + ycta(i, j + 3, k)) * (xC(i, j + 2, k) + xC(i, j + 3, k)) - 0.25 * (yC(i, j + 2, k) + yC(i, j + 3, k)) * (xcta(i, j + 2, k) + xcta(i, j + 3, k));
+                
+                KX += half * (alfa_sixth * (sx_fR - sx_fL) + a_sixth * (sx_CR1 - sx_CL1) + b_sixth * (sx_CR2 - sx_CL2));
+                KY += half * (alfa_sixth * (sy_fR - sy_fL) + a_sixth * (sy_CR1 - sy_CL1) + b_sixth * (sy_CR2 - sy_CL2));
+                KZ += half * (alfa_sixth * (sz_fR - sz_fL) + a_sixth * (sz_CR1 - sz_CL1) + b_sixth * (sz_CR2 - sz_CL2));
+
+                RDouble ds = sqrt(KX * KX + KY * KY + KZ * KZ);
+
+                xfv (i, j, k, 1) = KX;
+                yfv (i, j, k, 1) = KY;
+                zfv (i, j, k, 1) = KZ;
+                area(i, j, k, 1) = ds;
+                xfn (i, j, k, 1) = KX / (ds + TINY);
+                yfn (i, j, k, 1) = KY / (ds + TINY);
+                zfn (i, j, k, 1) = KZ / (ds + TINY);
+            }
+        }
+    }
+
+    for (int k = 1; k <= nk - 1; ++ k)
+    {
+        for (int i = 1; i <= ni - 1; ++ i)
+        {
+            for (int j = -1; j <= nj + 2; ++ j)
+            {
+                RDouble KX = 0.0;
+                RDouble KY = 0.0;
+                RDouble KZ = 0.0;
+
+                RDouble sx_CL2 = 0.25 * (ycta(i - 1, j, k) + ycta(i - 2, j, k)) * (zC(i - 1, j, k) + zC(i - 2, j, k)) - 0.25 * (yC(i - 1, j, k) + yC(i - 2, j, k)) * (zcta(i - 1, j, k) + zcta(i - 2, j, k));
+                RDouble sx_CL1 = 0.25 * (ycta(i    , j, k) + ycta(i - 1, j, k)) * (zC(i    , j, k) + zC(i - 1, j, k)) - 0.25 * (yC(i    , j, k) + yC(i - 1, j, k)) * (zcta(i    , j, k) + zcta(i - 1, j, k));
+                RDouble sx_fL  =         ycta(i    , j, k)                      *  zC(i    , j, k)                    -         yC(i    , j, k)                    *  zcta(i    , j, k)                     ;
+                RDouble sx_fR  =         ycta(i + 1, j, k)                      *  zC(i + 1, j, k)                    -         yC(i + 1, j, k)                    *  zcta(i + 1, j, k)                     ;
+                RDouble sx_CR1 = 0.25 * (ycta(i + 1, j, k) + ycta(i + 2, j, k)) * (zC(i + 1, j, k) + zC(i + 2, j, k)) - 0.25 * (yC(i + 1, j, k) + yC(i + 2, j, k)) * (zcta(i + 1, j, k) + zcta(i + 2, j, k));
+                RDouble sx_CR2 = 0.25 * (ycta(i + 2, j, k) + ycta(i + 3, j, k)) * (zC(i + 2, j, k) + zC(i + 3, j, k)) - 0.25 * (yC(i + 2, j, k) + yC(i + 3, j, k)) * (zcta(i + 2, j, k) + zcta(i + 3, j, k));
+
+                RDouble sy_CL2 = 0.25 * (zcta(i - 1, j, k) + zcta(i - 2, j, k)) * (xC(i - 1, j, k) + xC(i - 2, j, k)) - 0.25 * (zC(i - 1, j, k) + zC(i - 2, j, k)) * (xcta(i - 1, j, k) + xcta(i - 2, j, k));
+                RDouble sy_CL1 = 0.25 * (zcta(i    , j, k) + zcta(i - 1, j, k)) * (xC(i    , j, k) + xC(i - 1, j, k)) - 0.25 * (zC(i    , j, k) + zC(i - 1, j, k)) * (xcta(i    , j, k) + xcta(i - 1, j, k));
+                RDouble sy_fL  =         zcta(i    , j, k)                      *  xC(i    , j, k)                    -         zC(i    , j, k)                    *  xcta(i    , j, k)                     ;
+                RDouble sy_fR  =         zcta(i + 1, j, k)                      *  xC(i + 1, j, k)                    -         zC(i + 1, j, k)                    *  xcta(i + 1, j, k)                     ;
+                RDouble sy_CR1 = 0.25 * (zcta(i + 1, j, k) + zcta(i + 2, j, k)) * (xC(i + 1, j, k) + xC(i + 2, j, k)) - 0.25 * (zC(i + 1, j, k) + zC(i + 2, j, k)) * (xcta(i + 1, j, k) + xcta(i + 2, j, k));
+                RDouble sy_CR2 = 0.25 * (zcta(i + 2, j, k) + zcta(i + 3, j, k)) * (xC(i + 2, j, k) + xC(i + 3, j, k)) - 0.25 * (zC(i + 2, j, k) + zC(i + 3, j, k)) * (xcta(i + 2, j, k) + xcta(i + 3, j, k));
+
+                RDouble sz_CL2 = 0.25 * (xcta(i - 1, j, k) + xcta(i - 2, j, k)) * (yC(i - 1, j, k) + yC(i - 2, j, k)) - 0.25 * (xC(i - 1, j, k) + xC(i - 2, j, k)) * (ycta(i - 1, j, k) + ycta(i - 2, j, k));
+                RDouble sz_CL1 = 0.25 * (xcta(i    , j, k) + xcta(i - 1, j, k)) * (yC(i    , j, k) + yC(i - 1, j, k)) - 0.25 * (xC(i    , j, k) + xC(i - 1, j, k)) * (ycta(i    , j, k) + ycta(i - 1, j, k));
+                RDouble sz_fL  =         xcta(i    , j, k)                      *  yC(i    , j, k)                    -         xC(i    , j, k)                    *  ycta(i    , j, k)                     ;
+                RDouble sz_fR  =         xcta(i + 1, j, k)                      *  yC(i + 1, j, k)                    -         xC(i + 1, j, k)                    *  ycta(i + 1, j, k)                     ;
+                RDouble sz_CR1 = 0.25 * (xcta(i + 1, j, k) + xcta(i + 2, j, k)) * (yC(i + 1, j, k) + yC(i + 2, j, k)) - 0.25 * (xC(i + 1, j, k) + xC(i + 2, j, k)) * (ycta(i + 1, j, k) + ycta(i + 2, j, k));
+                RDouble sz_CR2 = 0.25 * (xcta(i + 2, j, k) + xcta(i + 3, j, k)) * (yC(i + 2, j, k) + yC(i + 3, j, k)) - 0.25 * (xC(i + 2, j, k) + xC(i + 3, j, k)) * (ycta(i + 2, j, k) + ycta(i + 3, j, k));
+                
+                KX += half * (alfa_sixth * (sx_fR - sx_fL) + a_sixth * (sx_CR1 - sx_CL1) + b_sixth * (sx_CR2 - sx_CL2));
+                KY += half * (alfa_sixth * (sy_fR - sy_fL) + a_sixth * (sy_CR1 - sy_CL1) + b_sixth * (sy_CR2 - sy_CL2));
+                KZ += half * (alfa_sixth * (sz_fR - sz_fL) + a_sixth * (sz_CR1 - sz_CL1) + b_sixth * (sz_CR2 - sz_CL2));
+
+                sx_CL2 = 0.25 * (zkxi(i, j, k - 1) + zkxi(i, j, k - 2)) * (yA(i, j, k - 1) + yA(i, j, k - 2)) - 0.25 * (zA(i, j, k - 1) + zA(i, j, k - 2)) * (ykxi(i, j, k - 1) + ykxi(i, j, k - 2));
+                sx_CL1 = 0.25 * (zkxi(i, j, k   ) + zkxi(i, j, k - 1)) * (yA(i, j, k   ) + yA(i, j, k - 1)) - 0.25 * (zA(i, j, k   ) + zA(i, j, k - 1)) * (ykxi(i, j, k   ) + ykxi(i, j, k - 1));
+                sx_fL  =         zkxi(i, j, k   )                      *  yA(i, j, k   )                    -         zA(i, j, k   )                    *  ykxi(i, j, k   )                     ;
+                sx_fR  =         zkxi(i, j, k + 1)                      *  yA(i, j, k + 1)                    -         zA(i, j, k + 1)                    *  ykxi(i, j, k + 1)                     ;
+                sx_CR1 = 0.25 * (zkxi(i, j, k + 1) + zkxi(i, j, k + 2)) * (yA(i, j, k + 1) + yA(i, j, k + 2)) - 0.25 * (zA(i, j, k + 1) + zA(i, j, k + 2)) * (ykxi(i, j, k + 1) + ykxi(i, j, k + 2));
+                sx_CR2 = 0.25 * (zkxi(i, j, k + 2) + zkxi(i, j, k + 3)) * (yA(i, j, k + 2) + yA(i, j, k + 3)) - 0.25 * (zA(i, j, k + 2) + zA(i, j, k + 3)) * (ykxi(i, j, k + 2) + ykxi(i, j, k + 3));
+
+                sy_CL2 = 0.25 * (xkxi(i, j, k - 1) + xkxi(i, j, k - 2)) * (zA(i, j, k - 1) + zA(i, j, k - 2)) - 0.25 * (xA(i, j, k - 1) + xA(i, j, k - 2)) * (zkxi(i, j, k - 1) + zkxi(i, j, k - 2));
+                sy_CL1 = 0.25 * (xkxi(i, j, k   ) + xkxi(i, j, k - 1)) * (zA(i, j, k   ) + zA(i, j, k - 1)) - 0.25 * (xA(i, j, k   ) + xA(i, j, k - 1)) * (zkxi(i, j, k   ) + zkxi(i, j, k - 1));
+                sy_fL  =         xkxi(i, j, k   )                      *  zA(i, j, k   )                    -         xA(i, j, k   )                    *  zkxi(i, j, k   )                     ;
+                sy_fR  =         xkxi(i, j, k + 1)                      *  zA(i, j, k + 1)                    -         xA(i, j, k + 1)                    *  zkxi(i, j, k + 1)                     ;
+                sy_CR1 = 0.25 * (xkxi(i, j, k + 1) + xkxi(i, j, k + 2)) * (zA(i, j, k + 1) + zA(i, j, k + 2)) - 0.25 * (xA(i, j, k + 1) + xA(i, j, k + 2)) * (zkxi(i, j, k + 1) + zkxi(i, j, k + 2));
+                sy_CR2 = 0.25 * (xkxi(i, j, k + 2) + xkxi(i, j, k + 3)) * (zA(i, j, k + 2) + zA(i, j, k + 3)) - 0.25 * (xA(i, j, k + 2) + xA(i, j, k + 3)) * (zkxi(i, j, k + 2) + zkxi(i, j, k + 3));
+
+                sz_CL2 = 0.25 * (ykxi(i, j, k - 1) + ykxi(i, j, k - 2)) * (xA(i, j, k - 1) + xA(i, j, k - 2)) - 0.25 * (yA(i, j, k - 1) + yA(i, j, k - 2)) * (xkxi(i, j, k - 1) + xkxi(i, j, k - 2));
+                sz_CL1 = 0.25 * (ykxi(i, j, k   ) + ykxi(i, j, k - 1)) * (xA(i, j, k   ) + xA(i, j, k - 1)) - 0.25 * (yA(i, j, k   ) + yA(i, j, k - 1)) * (xkxi(i, j, k   ) + xkxi(i, j, k - 1));
+                sz_fL  =         ykxi(i, j, k   )                      *  xA(i, j, k   )                    -         yA(i, j, k   )                    *  xkxi(i, j, k   )                     ;
+                sz_fR  =         ykxi(i, j, k + 1)                      *  xA(i, j, k + 1)                    -         yA(i, j, k + 1)                    *  xkxi(i, j, k + 1)                     ;
+                sz_CR1 = 0.25 * (ykxi(i, j, k + 1) + ykxi(i, j, k + 2)) * (xA(i, j, k + 1) + xA(i, j, k + 2)) - 0.25 * (yA(i, j, k + 1) + yA(i, j, k + 2)) * (xkxi(i, j, k + 1) + xkxi(i, j, k + 2));
+                sz_CR2 = 0.25 * (ykxi(i, j, k + 2) + ykxi(i, j, k + 3)) * (xA(i, j, k + 2) + xA(i, j, k + 3)) - 0.25 * (yA(i, j, k + 2) + yA(i, j, k + 3)) * (xkxi(i, j, k + 2) + xkxi(i, j, k + 3));
+                
+                KX += half * (alfa_sixth * (sx_fR - sx_fL) + a_sixth * (sx_CR1 - sx_CL1) + b_sixth * (sx_CR2 - sx_CL2));
+                KY += half * (alfa_sixth * (sy_fR - sy_fL) + a_sixth * (sy_CR1 - sy_CL1) + b_sixth * (sy_CR2 - sy_CL2));
+                KZ += half * (alfa_sixth * (sz_fR - sz_fL) + a_sixth * (sz_CR1 - sz_CL1) + b_sixth * (sz_CR2 - sz_CL2));
+
+                RDouble ds = sqrt(KX * KX + KY * KY + KZ * KZ);
+
+                xfv (i, j, k, 2) = KX;
+                yfv (i, j, k, 2) = KY;
+                zfv (i, j, k, 2) = KZ;
+                area(i, j, k, 2) = ds;
+                xfn (i, j, k, 2) = KX / (ds + TINY);
+                yfn (i, j, k, 2) = KY / (ds + TINY);
+                zfn (i, j, k, 2) = KZ / (ds + TINY);
+            }
+        }
+    }
+
+    for (int j = 1; j <= nj - 1; ++ j)
+    {
+        for (int i = 1; i <= ni - 1; ++ i)
+        {
+            for (int k = -1; k <= nk + 2; ++ k)
+            {
+                RDouble KX = 0.0;
+                RDouble KY = 0.0;
+                RDouble KZ = 0.0;
+
+                RDouble sx_CL2 = 0.25 * (ykxi(i, j - 1, k) + ykxi(i, j - 2, k)) * (zA(i, j - 1, k) + zA(i, j - 2, k)) - 0.25 * (yA(i, j - 1, k) + yA(i, j - 2, k)) * (zkxi(i, j - 1, k) + zkxi(i, j - 2, k));
+                RDouble sx_CL1 = 0.25 * (ykxi(i, j    , k) + ykxi(i, j - 1, k)) * (zA(i, j    , k) + zA(i, j - 1, k)) - 0.25 * (yA(i, j    , k) + yA(i, j - 1, k)) * (zkxi(i, j    , k) + zkxi(i, j - 1, k));
+                RDouble sx_fL  =         ykxi(i, j    , k)                      *  zA(i, j    , k)                    -         yA(i, j    , k)                    *  zkxi(i, j    , k)                     ;
+                RDouble sx_fR  =         ykxi(i, j + 1, k)                      *  zA(i, j + 1, k)                    -         yA(i, j + 1, k)                    *  zkxi(i, j + 1, k)                     ;
+                RDouble sx_CR1 = 0.25 * (ykxi(i, j + 1, k) + ykxi(i, j + 2, k)) * (zA(i, j + 1, k) + zA(i, j + 2, k)) - 0.25 * (yA(i, j + 1, k) + yA(i, j + 2, k)) * (zkxi(i, j + 1, k) + zkxi(i, j + 2, k));
+                RDouble sx_CR2 = 0.25 * (ykxi(i, j + 2, k) + ykxi(i, j + 3, k)) * (zA(i, j + 2, k) + zA(i, j + 3, k)) - 0.25 * (yA(i, j + 2, k) + yA(i, j + 3, k)) * (zkxi(i, j + 2, k) + zkxi(i, j + 3, k));
+
+                RDouble sy_CL2 = 0.25 * (zkxi(i, j - 1, k) + zkxi(i, j - 2, k)) * (xA(i, j - 1, k) + xA(i, j - 2, k)) - 0.25 * (zA(i, j - 1, k) + zA(i, j - 2, k)) * (xkxi(i, j - 1, k) + xkxi(i, j - 2, k));
+                RDouble sy_CL1 = 0.25 * (zkxi(i, j    , k) + zkxi(i, j - 1, k)) * (xA(i, j    , k) + xA(i, j - 1, k)) - 0.25 * (zA(i, j    , k) + zA(i, j - 1, k)) * (xkxi(i, j    , k) + xkxi(i, j - 1, k));
+                RDouble sy_fL  =         zkxi(i, j    , k)                      *  xA(i, j    , k)                    -         zA(i, j    , k)                    *  xkxi(i, j    , k)                     ;
+                RDouble sy_fR  =         zkxi(i, j + 1, k)                      *  xA(i, j + 1, k)                    -         zA(i, j + 1, k)                    *  xkxi(i, j + 1, k)                     ;
+                RDouble sy_CR1 = 0.25 * (zkxi(i, j + 1, k) + zkxi(i, j + 2, k)) * (xA(i, j + 1, k) + xA(i, j + 2, k)) - 0.25 * (zA(i, j + 1, k) + zA(i, j + 2, k)) * (xkxi(i, j + 1, k) + xkxi(i, j + 2, k));
+                RDouble sy_CR2 = 0.25 * (zkxi(i, j + 2, k) + zkxi(i, j + 3, k)) * (xA(i, j + 2, k) + xA(i, j + 3, k)) - 0.25 * (zA(i, j + 2, k) + zA(i, j + 3, k)) * (xkxi(i, j + 2, k) + xkxi(i, j + 3, k));
+
+                RDouble sz_CL2 = 0.25 * (xkxi(i, j - 1, k) + xkxi(i, j - 2, k)) * (yA(i, j - 1, k) + yA(i, j - 2, k)) - 0.25 * (xA(i, j - 1, k) + xA(i, j - 2, k)) * (ykxi(i, j - 1, k) + ykxi(i, j - 2, k));
+                RDouble sz_CL1 = 0.25 * (xkxi(i, j    , k) + xkxi(i, j - 1, k)) * (yA(i, j    , k) + yA(i, j - 1, k)) - 0.25 * (xA(i, j    , k) + xA(i, j - 1, k)) * (ykxi(i, j    , k) + ykxi(i, j - 1, k));
+                RDouble sz_fL  =         xkxi(i, j    , k)                      *  yA(i, j    , k)                    -         xA(i, j    , k)                    *  ykxi(i, j    , k)                     ;
+                RDouble sz_fR  =         xkxi(i, j + 1, k)                      *  yA(i, j + 1, k)                    -         xA(i, j + 1, k)                    *  ykxi(i, j + 1, k)                     ;
+                RDouble sz_CR1 = 0.25 * (xkxi(i, j + 1, k) + xkxi(i, j + 2, k)) * (yA(i, j + 1, k) + yA(i, j + 2, k)) - 0.25 * (xA(i, j + 1, k) + xA(i, j + 2, k)) * (ykxi(i, j + 1, k) + ykxi(i, j + 2, k));
+                RDouble sz_CR2 = 0.25 * (xkxi(i, j + 2, k) + xkxi(i, j + 3, k)) * (yA(i, j + 2, k) + yA(i, j + 3, k)) - 0.25 * (xA(i, j + 2, k) + xA(i, j + 3, k)) * (ykxi(i, j + 2, k) + ykxi(i, j + 3, k));
+                
+                KX += half * (alfa_sixth * (sx_fR - sx_fL) + a_sixth * (sx_CR1 - sx_CL1) + b_sixth * (sx_CR2 - sx_CL2));
+                KY += half * (alfa_sixth * (sy_fR - sy_fL) + a_sixth * (sy_CR1 - sy_CL1) + b_sixth * (sy_CR2 - sy_CL2));
+                KZ += half * (alfa_sixth * (sz_fR - sz_fL) + a_sixth * (sz_CR1 - sz_CL1) + b_sixth * (sz_CR2 - sz_CL2));
+
+                sx_CL2 = 0.25 * (zeta(i - 1, j, k) + zeta(i - 2, j, k)) * (yB(i - 1, j, k) + yB(i - 2, j, k)) - 0.25 * (zB(i - 1, j, k) + zB(i - 2, j, k)) * (yeta(i - 1, j, k) + yeta(i - 2, j, k));
+                sx_CL1 = 0.25 * (zeta(i    , j, k) + zeta(i - 1, j, k)) * (yB(i    , j, k) + yB(i - 1, j, k)) - 0.25 * (zB(i    , j, k) + zB(i - 1, j, k)) * (yeta(i    , j, k) + yeta(i - 1, j, k));
+                sx_fL  =         zeta(i    , j, k)                      *  yB(i    , j, k)                    -         zB(i    , j, k)                    *  yeta(i    , j, k)                     ;
+                sx_fR  =         zeta(i + 1, j, k)                      *  yB(i + 1, j, k)                    -         zB(i + 1, j, k)                    *  yeta(i + 1, j, k)                     ;
+                sx_CR1 = 0.25 * (zeta(i + 1, j, k) + zeta(i + 2, j, k)) * (yB(i + 1, j, k) + yB(i + 2, j, k)) - 0.25 * (zB(i + 1, j, k) + zB(i + 2, j, k)) * (yeta(i + 1, j, k) + yeta(i + 2, j, k));
+                sx_CR2 = 0.25 * (zeta(i + 2, j, k) + zeta(i + 3, j, k)) * (yB(i + 2, j, k) + yB(i + 3, j, k)) - 0.25 * (zB(i + 2, j, k) + zB(i + 3, j, k)) * (yeta(i + 2, j, k) + yeta(i + 3, j, k));
+
+                sy_CL2 = 0.25 * (xeta(i - 1, j, k) + xeta(i - 2, j, k)) * (zB(i - 1, j, k) + zB(i - 2, j, k)) - 0.25 * (xB(i - 1, j, k) + xB(i - 2, j, k)) * (zeta(i - 1, j, k) + zeta(i - 2, j, k));
+                sy_CL1 = 0.25 * (xeta(i    , j, k) + xeta(i - 1, j, k)) * (zB(i    , j, k) + zB(i - 1, j, k)) - 0.25 * (xB(i    , j, k) + xB(i - 1, j, k)) * (zeta(i    , j, k) + zeta(i - 1, j, k));
+                sy_fL  =         xeta(i    , j, k)                      *  zB(i    , j, k)                    -         xB(i    , j, k)                    *  zeta(i    , j, k)                     ;
+                sy_fR  =         xeta(i + 1, j, k)                      *  zB(i + 1, j, k)                    -         xB(i + 1, j, k)                    *  zeta(i + 1, j, k)                     ;
+                sy_CR1 = 0.25 * (xeta(i + 1, j, k) + xeta(i + 2, j, k)) * (zB(i + 1, j, k) + zB(i + 2, j, k)) - 0.25 * (xB(i + 1, j, k) + xB(i + 2, j, k)) * (zeta(i + 1, j, k) + zeta(i + 2, j, k));
+                sy_CR2 = 0.25 * (xeta(i + 2, j, k) + xeta(i + 3, j, k)) * (zB(i + 2, j, k) + zB(i + 3, j, k)) - 0.25 * (xB(i + 2, j, k) + xB(i + 3, j, k)) * (zeta(i + 2, j, k) + zeta(i + 3, j, k));
+
+                sz_CL2 = 0.25 * (yeta(i - 1, j, k) + yeta(i - 2, j, k)) * (xB(i - 1, j, k) + xB(i - 2, j, k)) - 0.25 * (yB(i - 1, j, k) + yB(i - 2, j, k)) * (xeta(i - 1, j, k) + xeta(i - 2, j, k));
+                sz_CL1 = 0.25 * (yeta(i    , j, k) + yeta(i - 1, j, k)) * (xB(i    , j, k) + xB(i - 1, j, k)) - 0.25 * (yB(i    , j, k) + yB(i - 1, j, k)) * (xeta(i    , j, k) + xeta(i - 1, j, k));
+                sz_fL  =         yeta(i    , j, k)                      *  xB(i    , j, k)                    -         yB(i    , j, k)                    *  xeta(i    , j, k)                     ;
+                sz_fR  =         yeta(i + 1, j, k)                      *  xB(i + 1, j, k)                    -         yB(i + 1, j, k)                    *  xeta(i + 1, j, k)                     ;
+                sz_CR1 = 0.25 * (yeta(i + 1, j, k) + yeta(i + 2, j, k)) * (xB(i + 1, j, k) + xB(i + 2, j, k)) - 0.25 * (yB(i + 1, j, k) + yB(i + 2, j, k)) * (xeta(i + 1, j, k) + xeta(i + 2, j, k));
+                sz_CR2 = 0.25 * (yeta(i + 2, j, k) + yeta(i + 3, j, k)) * (xB(i + 2, j, k) + xB(i + 3, j, k)) - 0.25 * (yB(i + 2, j, k) + yB(i + 3, j, k)) * (xeta(i + 2, j, k) + xeta(i + 3, j, k));
+                
+                KX += half * (alfa_sixth * (sx_fR - sx_fL) + a_sixth * (sx_CR1 - sx_CL1) + b_sixth * (sx_CR2 - sx_CL2));
+                KY += half * (alfa_sixth * (sy_fR - sy_fL) + a_sixth * (sy_CR1 - sy_CL1) + b_sixth * (sy_CR2 - sy_CL2));
+                KZ += half * (alfa_sixth * (sz_fR - sz_fL) + a_sixth * (sz_CR1 - sz_CL1) + b_sixth * (sz_CR2 - sz_CL2));
+
+                RDouble ds = sqrt(KX * KX + KY * KY + KZ * KZ);
+
+                xfv (i, j, k, 3) = KX;
+                yfv (i, j, k, 3) = KY;
+                zfv (i, j, k, 3) = KZ;
+                area(i, j, k, 3) = ds;
+                xfn (i, j, k, 3) = KX / (ds + TINY);
+                yfn (i, j, k, 3) = KY / (ds + TINY);
+                zfn (i, j, k, 3) = KZ / (ds + TINY);
+            }
+        }
+    }
+    //!=
+    RDouble4D &Cellxfv = *new RDouble4D(Range(-1, ni + 1), Range(-1, nj + 1), Range(-1, nk + 1), Range(1, 3), fortranArray);
+    RDouble4D &Cellyfv = *new RDouble4D(Range(-1, ni + 1), Range(-1, nj + 1), Range(-1, nk + 1), Range(1, 3), fortranArray);
+    RDouble4D &Cellzfv = *new RDouble4D(Range(-1, ni + 1), Range(-1, nj + 1), Range(-1, nk + 1), Range(1, 3), fortranArray);
+
+    for (int k = 1; k <= nk - 1; ++ k)
+    {
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            for (int i = -1; i <= ni + 1; ++ i)
+            {
+                RDouble KX = 0.0;
+                RDouble KY = 0.0;
+                RDouble KZ = 0.0;
+
+                RDouble sx_CL2 = 0.0625 * (yeta(i, j, k - 1) + yeta(i, j, k - 2) + yeta(i + 1, j, k - 1) + yeta(i + 1, j, k - 2)) * (zB(i, j, k - 1) + zB(i, j, k - 2) + zB(i + 1, j, k - 1) + zB(i + 1, j, k - 2)) - 0.0625 * (yB(i, j, k - 1) + yB(i, j, k - 2) + yB(i + 1, j, k - 1) + yB(i + 1, j, k - 2)) * (zeta(i, j, k - 1) + zeta(i, j, k - 2) + zeta(i + 1, j, k - 1) + zeta(i + 1, j, k - 2));
+                RDouble sx_CL1 = 0.0625 * (yeta(i, j, k   ) + yeta(i, j, k - 1) + yeta(i + 1, j, k   ) + yeta(i + 1, j, k - 1)) * (zB(i, j, k   ) + zB(i, j, k - 1) + zB(i + 1, j, k   ) + zB(i + 1, j, k - 1)) - 0.0625 * (yB(i, j, k   ) + yB(i, j, k - 1) + yB(i + 1, j, k   ) + yB(i + 1, j, k - 1)) * (zeta(i, j, k   ) + zeta(i, j, k - 1) + zeta(i + 1, j, k   ) + zeta(i + 1, j, k - 1));
+                RDouble sx_fL  = 0.0625 * (yeta(i, j, k   ) + yeta(i, j, k   ) + yeta(i + 1, j, k   ) + yeta(i + 1, j, k   )) * (zB(i, j, k   ) + zB(i, j, k   ) + zB(i + 1, j, k   ) + zB(i + 1, j, k   )) - 0.0625 * (yB(i, j, k   ) + yB(i, j, k   ) + yB(i + 1, j, k   ) + yB(i + 1, j, k   )) * (zeta(i, j, k   ) + zeta(i, j, k   ) + zeta(i + 1, j, k   ) + zeta(i + 1, j, k   ));
+                RDouble sx_fR  = 0.0625 * (yeta(i, j, k + 1) + yeta(i, j, k + 1) + yeta(i + 1, j, k + 1) + yeta(i + 1, j, k + 1)) * (zB(i, j, k + 1) + zB(i, j, k + 1) + zB(i + 1, j, k + 1) + zB(i + 1, j, k + 1)) - 0.0625 * (yB(i, j, k + 1) + yB(i, j, k + 1) + yB(i + 1, j, k + 1) + yB(i + 1, j, k + 1)) * (zeta(i, j, k + 1) + zeta(i, j, k + 1) + zeta(i + 1, j, k + 1) + zeta(i + 1, j, k + 1));
+                RDouble sx_CR1 = 0.0625 * (yeta(i, j, k + 1) + yeta(i, j, k + 2) + yeta(i + 1, j, k + 1) + yeta(i + 1, j, k + 2)) * (zB(i, j, k + 1) + zB(i, j, k + 2) + zB(i + 1, j, k + 1) + zB(i + 1, j, k + 2)) - 0.0625 * (yB(i, j, k + 1) + yB(i, j, k + 2) + yB(i + 1, j, k + 1) + yB(i + 1, j, k + 2)) * (zeta(i, j, k + 1) + zeta(i, j, k + 2) + zeta(i + 1, j, k + 1) + zeta(i + 1, j, k + 2));
+                RDouble sx_CR2 = 0.0625 * (yeta(i, j, k + 2) + yeta(i, j, k + 3) + yeta(i + 1, j, k + 2) + yeta(i + 1, j, k + 3)) * (zB(i, j, k + 2) + zB(i, j, k + 3) + zB(i + 1, j, k + 2) + zB(i + 1, j, k + 3)) - 0.0625 * (yB(i, j, k + 2) + yB(i, j, k + 3) + yB(i + 1, j, k + 2) + yB(i + 1, j, k + 3)) * (zeta(i, j, k + 2) + zeta(i, j, k + 3) + zeta(i + 1, j, k + 2) + zeta(i + 1, j, k + 3));
+                RDouble sy_CL2 = 0.0625 * (zeta(i, j, k - 1) + zeta(i, j, k - 2) + zeta(i + 1, j, k - 1) + zeta(i + 1, j, k - 2)) * (xB(i, j, k - 1) + xB(i, j, k - 2) + xB(i + 1, j, k - 1) + xB(i + 1, j, k - 2)) - 0.0625 * (zB(i, j, k - 1) + zB(i, j, k - 2) + zB(i + 1, j, k - 1) + zB(i + 1, j, k - 2)) * (xeta(i, j, k - 1) + xeta(i, j, k - 2) + xeta(i + 1, j, k - 1) + xeta(i + 1, j, k - 2));
+                RDouble sy_CL1 = 0.0625 * (zeta(i, j, k   ) + zeta(i, j, k - 1) + zeta(i + 1, j, k   ) + zeta(i + 1, j, k - 1)) * (xB(i, j, k   ) + xB(i, j, k - 1) + xB(i + 1, j, k   ) + xB(i + 1, j, k - 1)) - 0.0625 * (zB(i, j, k   ) + zB(i, j, k - 1) + zB(i + 1, j, k   ) + zB(i + 1, j, k - 1)) * (xeta(i, j, k   ) + xeta(i, j, k - 1) + xeta(i + 1, j, k   ) + xeta(i + 1, j, k - 1));
+                RDouble sy_fL  = 0.0625 * (zeta(i, j, k   ) + zeta(i, j, k   ) + zeta(i + 1, j, k   ) + zeta(i + 1, j, k   )) * (xB(i, j, k   ) + xB(i, j, k   ) + xB(i + 1, j, k   ) + xB(i + 1, j, k   )) - 0.0625 * (zB(i, j, k   ) + zB(i, j, k   ) + zB(i + 1, j, k   ) + zB(i + 1, j, k   )) * (xeta(i, j, k   ) + xeta(i, j, k   ) + xeta(i + 1, j, k   ) + xeta(i + 1, j, k   ));
+                RDouble sy_fR  = 0.0625 * (zeta(i, j, k + 1) + zeta(i, j, k + 1) + zeta(i + 1, j, k + 1) + zeta(i + 1, j, k + 1)) * (xB(i, j, k + 1) + xB(i, j, k + 1) + xB(i + 1, j, k + 1) + xB(i + 1, j, k + 1)) - 0.0625 * (zB(i, j, k + 1) + zB(i, j, k + 1) + zB(i + 1, j, k + 1) + zB(i + 1, j, k + 1)) * (xeta(i, j, k + 1) + xeta(i, j, k + 1) + xeta(i + 1, j, k + 1) + xeta(i + 1, j, k + 1));
+                RDouble sy_CR1 = 0.0625 * (zeta(i, j, k + 1) + zeta(i, j, k + 2) + zeta(i + 1, j, k + 1) + zeta(i + 1, j, k + 2)) * (xB(i, j, k + 1) + xB(i, j, k + 2) + xB(i + 1, j, k + 1) + xB(i + 1, j, k + 2)) - 0.0625 * (zB(i, j, k + 1) + zB(i, j, k + 2) + zB(i + 1, j, k + 1) + zB(i + 1, j, k + 2)) * (xeta(i, j, k + 1) + xeta(i, j, k + 2) + xeta(i + 1, j, k + 1) + xeta(i + 1, j, k + 2));
+                RDouble sy_CR2 = 0.0625 * (zeta(i, j, k + 2) + zeta(i, j, k + 3) + zeta(i + 1, j, k + 2) + zeta(i + 1, j, k + 3)) * (xB(i, j, k + 2) + xB(i, j, k + 3) + xB(i + 1, j, k + 2) + xB(i + 1, j, k + 3)) - 0.0625 * (zB(i, j, k + 2) + zB(i, j, k + 3) + zB(i + 1, j, k + 2) + zB(i + 1, j, k + 3)) * (xeta(i, j, k + 2) + xeta(i, j, k + 3) + xeta(i + 1, j, k + 2) + xeta(i + 1, j, k + 3));
+                RDouble sz_CL2 = 0.0625 * (xeta(i, j, k - 1) + xeta(i, j, k - 2) + xeta(i + 1, j, k - 1) + xeta(i + 1, j, k - 2)) * (yB(i, j, k - 1) + yB(i, j, k - 2) + yB(i + 1, j, k - 1) + yB(i + 1, j, k - 2)) - 0.0625 * (xB(i, j, k - 1) + xB(i, j, k - 2) + xB(i + 1, j, k - 1) + xB(i + 1, j, k - 2)) * (yeta(i, j, k - 1) + yeta(i, j, k - 2) + yeta(i + 1, j, k - 1) + yeta(i + 1, j, k - 2));
+                RDouble sz_CL1 = 0.0625 * (xeta(i, j, k   ) + xeta(i, j, k - 1) + xeta(i + 1, j, k   ) + xeta(i + 1, j, k - 1)) * (yB(i, j, k   ) + yB(i, j, k - 1) + yB(i + 1, j, k   ) + yB(i + 1, j, k - 1)) - 0.0625 * (xB(i, j, k   ) + xB(i, j, k - 1) + xB(i + 1, j, k   ) + xB(i + 1, j, k - 1)) * (yeta(i, j, k   ) + yeta(i, j, k - 1) + yeta(i + 1, j, k   ) + yeta(i + 1, j, k - 1));
+                RDouble sz_fL  = 0.0625 * (xeta(i, j, k   ) + xeta(i, j, k   ) + xeta(i + 1, j, k   ) + xeta(i + 1, j, k   )) * (yB(i, j, k   ) + yB(i, j, k   ) + yB(i + 1, j, k   ) + yB(i + 1, j, k   )) - 0.0625 * (xB(i, j, k   ) + xB(i, j, k   ) + xB(i + 1, j, k   ) + xB(i + 1, j, k   )) * (yeta(i, j, k   ) + yeta(i, j, k   ) + yeta(i + 1, j, k   ) + yeta(i + 1, j, k   ));
+                RDouble sz_fR  = 0.0625 * (xeta(i, j, k + 1) + xeta(i, j, k + 1) + xeta(i + 1, j, k + 1) + xeta(i + 1, j, k + 1)) * (yB(i, j, k + 1) + yB(i, j, k + 1) + yB(i + 1, j, k + 1) + yB(i + 1, j, k + 1)) - 0.0625 * (xB(i, j, k + 1) + xB(i, j, k + 1) + xB(i + 1, j, k + 1) + xB(i + 1, j, k + 1)) * (yeta(i, j, k + 1) + yeta(i, j, k + 1) + yeta(i + 1, j, k + 1) + yeta(i + 1, j, k + 1));
+                RDouble sz_CR1 = 0.0625 * (xeta(i, j, k + 1) + xeta(i, j, k + 2) + xeta(i + 1, j, k + 1) + xeta(i + 1, j, k + 2)) * (yB(i, j, k + 1) + yB(i, j, k + 2) + yB(i + 1, j, k + 1) + yB(i + 1, j, k + 2)) - 0.0625 * (xB(i, j, k + 1) + xB(i, j, k + 2) + xB(i + 1, j, k + 1) + xB(i + 1, j, k + 2)) * (yeta(i, j, k + 1) + yeta(i, j, k + 2) + yeta(i + 1, j, k + 1) + yeta(i + 1, j, k + 2));
+                RDouble sz_CR2 = 0.0625 * (xeta(i, j, k + 2) + xeta(i, j, k + 3) + xeta(i + 1, j, k + 2) + xeta(i + 1, j, k + 3)) * (yB(i, j, k + 2) + yB(i, j, k + 3) + yB(i + 1, j, k + 2) + yB(i + 1, j, k + 3)) - 0.0625 * (xB(i, j, k + 2) + xB(i, j, k + 3) + xB(i + 1, j, k + 2) + xB(i + 1, j, k + 3)) * (yeta(i, j, k + 2) + yeta(i, j, k + 3) + yeta(i + 1, j, k + 2) + yeta(i + 1, j, k + 3));
+
+                KX += half * (alfa_sixth * (sx_fR - sx_fL) + a_sixth * (sx_CR1 - sx_CL1) + b_sixth * (sx_CR2 - sx_CL2));
+                KY += half * (alfa_sixth * (sy_fR - sy_fL) + a_sixth * (sy_CR1 - sy_CL1) + b_sixth * (sy_CR2 - sy_CL2));
+                KZ += half * (alfa_sixth * (sz_fR - sz_fL) + a_sixth * (sz_CR1 - sz_CL1) + b_sixth * (sz_CR2 - sz_CL2));
+
+                sx_CL2 =  0.0625 * (yC(i, j - 1, k) + yC(i, j - 2, k) + yC(i + 1, j - 1, k) + yC(i + 1, j - 2, k)) * (zcta(i, j - 1, k) + zcta(i, j - 2, k) + zcta(i + 1, j - 1, k) + zcta(i + 1, j - 2, k)) - 0.0625 * (ycta(i, j - 1, k) + ycta(i, j - 2, k) + ycta(i + 1, j - 1, k) + ycta(i + 1, j - 2, k)) * (zC(i, j - 1, k) + zC(i, j - 2, k) + zC(i + 1, j - 1, k) + zC(i + 1, j - 2, k));
+                sx_CL1 =  0.0625 * (yC(i, j    , k) + yC(i, j - 1, k) + yC(i + 1, j    , k) + yC(i + 1, j - 1, k)) * (zcta(i, j    , k) + zcta(i, j - 1, k) + zcta(i + 1, j    , k) + zcta(i + 1, j - 1, k)) - 0.0625 * (ycta(i, j    , k) + ycta(i, j - 1, k) + ycta(i + 1, j    , k) + ycta(i + 1, j - 1, k)) * (zC(i, j    , k) + zC(i, j - 1, k) + zC(i + 1, j    , k) + zC(i + 1, j - 1, k));
+                sx_fL  =  0.0625 * (yC(i, j    , k) + yC(i, j    , k) + yC(i + 1, j    , k) + yC(i + 1, j    , k)) * (zcta(i, j    , k) + zcta(i, j    , k) + zcta(i + 1, j    , k) + zcta(i + 1, j    , k)) - 0.0625 * (ycta(i, j    , k) + ycta(i, j    , k) + ycta(i + 1, j    , k) + ycta(i + 1, j    , k)) * (zC(i, j    , k) + zC(i, j    , k) + zC(i + 1, j    , k) + zC(i + 1, j    , k));
+                sx_fR  =  0.0625 * (yC(i, j + 1, k) + yC(i, j + 1, k) + yC(i + 1, j + 1, k) + yC(i + 1, j + 1, k)) * (zcta(i, j + 1, k) + zcta(i, j + 1, k) + zcta(i + 1, j + 1, k) + zcta(i + 1, j + 1, k)) - 0.0625 * (ycta(i, j + 1, k) + ycta(i, j + 1, k) + ycta(i + 1, j + 1, k) + ycta(i + 1, j + 1, k)) * (zC(i, j + 1, k) + zC(i, j + 1, k) + zC(i + 1, j + 1, k) + zC(i + 1, j + 1, k));
+                sx_CR1 =  0.0625 * (yC(i, j + 1, k) + yC(i, j + 2, k) + yC(i + 1, j + 1, k) + yC(i + 1, j + 2, k)) * (zcta(i, j + 1, k) + zcta(i, j + 2, k) + zcta(i + 1, j + 1, k) + zcta(i + 1, j + 2, k)) - 0.0625 * (ycta(i, j + 1, k) + ycta(i, j + 2, k) + ycta(i + 1, j + 1, k) + ycta(i + 1, j + 2, k)) * (zC(i, j + 1, k) + zC(i, j + 2, k) + zC(i + 1, j + 1, k) + zC(i + 1, j + 2, k));
+                sx_CR2 =  0.0625 * (yC(i, j + 2, k) + yC(i, j + 3, k) + yC(i + 1, j + 2, k) + yC(i + 1, j + 3, k)) * (zcta(i, j + 2, k) + zcta(i, j + 3, k) + zcta(i + 1, j + 2, k) + zcta(i + 1, j + 3, k)) - 0.0625 * (ycta(i, j + 2, k) + ycta(i, j + 3, k) + ycta(i + 1, j + 2, k) + ycta(i + 1, j + 3, k)) * (zC(i, j + 2, k) + zC(i, j + 3, k) + zC(i + 1, j + 2, k) + zC(i + 1, j + 3, k));
+                sy_CL2 =  0.0625 * (zC(i, j - 1, k) + zC(i, j - 2, k) + zC(i + 1, j - 1, k) + zC(i + 1, j - 2, k)) * (xcta(i, j - 1, k) + xcta(i, j - 2, k) + xcta(i + 1, j - 1, k) + xcta(i + 1, j - 2, k)) - 0.0625 * (zcta(i, j - 1, k) + zcta(i, j - 2, k) + zcta(i + 1, j - 1, k) + zcta(i + 1, j - 2, k)) * (xC(i, j - 1, k) + xC(i, j - 2, k) + xC(i + 1, j - 1, k) + xC(i + 1, j - 2, k));
+                sy_CL1 =  0.0625 * (zC(i, j    , k) + zC(i, j - 1, k) + zC(i + 1, j    , k) + zC(i + 1, j - 1, k)) * (xcta(i, j    , k) + xcta(i, j - 1, k) + xcta(i + 1, j    , k) + xcta(i + 1, j - 1, k)) - 0.0625 * (zcta(i, j    , k) + zcta(i, j - 1, k) + zcta(i + 1, j    , k) + zcta(i + 1, j - 1, k)) * (xC(i, j    , k) + xC(i, j - 1, k) + xC(i + 1, j    , k) + xC(i + 1, j - 1, k));
+                sy_fL  =  0.0625 * (zC(i, j    , k) + zC(i, j    , k) + zC(i + 1, j    , k) + zC(i + 1, j    , k)) * (xcta(i, j    , k) + xcta(i, j    , k) + xcta(i + 1, j    , k) + xcta(i + 1, j    , k)) - 0.0625 * (zcta(i, j    , k) + zcta(i, j    , k) + zcta(i + 1, j    , k) + zcta(i + 1, j    , k)) * (xC(i, j    , k) + xC(i, j    , k) + xC(i + 1, j    , k) + xC(i + 1, j    , k));
+                sy_fR  =  0.0625 * (zC(i, j + 1, k) + zC(i, j + 1, k) + zC(i + 1, j + 1, k) + zC(i + 1, j + 1, k)) * (xcta(i, j + 1, k) + xcta(i, j + 1, k) + xcta(i + 1, j + 1, k) + xcta(i + 1, j + 1, k)) - 0.0625 * (zcta(i, j + 1, k) + zcta(i, j + 1, k) + zcta(i + 1, j + 1, k) + zcta(i + 1, j + 1, k)) * (xC(i, j + 1, k) + xC(i, j + 1, k) + xC(i + 1, j + 1, k) + xC(i + 1, j + 1, k));
+                sy_CR1 =  0.0625 * (zC(i, j + 1, k) + zC(i, j + 2, k) + zC(i + 1, j + 1, k) + zC(i + 1, j + 2, k)) * (xcta(i, j + 1, k) + xcta(i, j + 2, k) + xcta(i + 1, j + 1, k) + xcta(i + 1, j + 2, k)) - 0.0625 * (zcta(i, j + 1, k) + zcta(i, j + 2, k) + zcta(i + 1, j + 1, k) + zcta(i + 1, j + 2, k)) * (xC(i, j + 1, k) + xC(i, j + 2, k) + xC(i + 1, j + 1, k) + xC(i + 1, j + 2, k));
+                sy_CR2 =  0.0625 * (zC(i, j + 2, k) + zC(i, j + 3, k) + zC(i + 1, j + 2, k) + zC(i + 1, j + 3, k)) * (xcta(i, j + 2, k) + xcta(i, j + 3, k) + xcta(i + 1, j + 2, k) + xcta(i + 1, j + 3, k)) - 0.0625 * (zcta(i, j + 2, k) + zcta(i, j + 3, k) + zcta(i + 1, j + 2, k) + zcta(i + 1, j + 3, k)) * (xC(i, j + 2, k) + xC(i, j + 3, k) + xC(i + 1, j + 2, k) + xC(i + 1, j + 3, k));
+                sz_CL2 =  0.0625 * (xC(i, j - 1, k) + xC(i, j - 2, k) + xC(i + 1, j - 1, k) + xC(i + 1, j - 2, k)) * (ycta(i, j - 1, k) + ycta(i, j - 2, k) + ycta(i + 1, j - 1, k) + ycta(i + 1, j - 2, k)) - 0.0625 * (xcta(i, j - 1, k) + xcta(i, j - 2, k) + xcta(i + 1, j - 1, k) + xcta(i + 1, j - 2, k)) * (yC(i, j - 1, k) + yC(i, j - 2, k) + yC(i + 1, j - 1, k) + yC(i + 1, j - 2, k));
+                sz_CL1 =  0.0625 * (xC(i, j    , k) + xC(i, j - 1, k) + xC(i + 1, j    , k) + xC(i + 1, j - 1, k)) * (ycta(i, j    , k) + ycta(i, j - 1, k) + ycta(i + 1, j    , k) + ycta(i + 1, j - 1, k)) - 0.0625 * (xcta(i, j    , k) + xcta(i, j - 1, k) + xcta(i + 1, j    , k) + xcta(i + 1, j - 1, k)) * (yC(i, j    , k) + yC(i, j - 1, k) + yC(i + 1, j    , k) + yC(i + 1, j - 1, k));
+                sz_fL  =  0.0625 * (xC(i, j    , k) + xC(i, j    , k) + xC(i + 1, j    , k) + xC(i + 1, j    , k)) * (ycta(i, j    , k) + ycta(i, j    , k) + ycta(i + 1, j    , k) + ycta(i + 1, j    , k)) - 0.0625 * (xcta(i, j    , k) + xcta(i, j    , k) + xcta(i + 1, j    , k) + xcta(i + 1, j    , k)) * (yC(i, j    , k) + yC(i, j    , k) + yC(i + 1, j    , k) + yC(i + 1, j    , k));
+                sz_fR  =  0.0625 * (xC(i, j + 1, k) + xC(i, j + 1, k) + xC(i + 1, j + 1, k) + xC(i + 1, j + 1, k)) * (ycta(i, j + 1, k) + ycta(i, j + 1, k) + ycta(i + 1, j + 1, k) + ycta(i + 1, j + 1, k)) - 0.0625 * (xcta(i, j + 1, k) + xcta(i, j + 1, k) + xcta(i + 1, j + 1, k) + xcta(i + 1, j + 1, k)) * (yC(i, j + 1, k) + yC(i, j + 1, k) + yC(i + 1, j + 1, k) + yC(i + 1, j + 1, k));
+                sz_CR1 =  0.0625 * (xC(i, j + 1, k) + xC(i, j + 2, k) + xC(i + 1, j + 1, k) + xC(i + 1, j + 2, k)) * (ycta(i, j + 1, k) + ycta(i, j + 2, k) + ycta(i + 1, j + 1, k) + ycta(i + 1, j + 2, k)) - 0.0625 * (xcta(i, j + 1, k) + xcta(i, j + 2, k) + xcta(i + 1, j + 1, k) + xcta(i + 1, j + 2, k)) * (yC(i, j + 1, k) + yC(i, j + 2, k) + yC(i + 1, j + 1, k) + yC(i + 1, j + 2, k));
+                sz_CR2 =  0.0625 * (xC(i, j + 2, k) + xC(i, j + 3, k) + xC(i + 1, j + 2, k) + xC(i + 1, j + 3, k)) * (ycta(i, j + 2, k) + ycta(i, j + 3, k) + ycta(i + 1, j + 2, k) + ycta(i + 1, j + 3, k)) - 0.0625 * (xcta(i, j + 2, k) + xcta(i, j + 3, k) + xcta(i + 1, j + 2, k) + xcta(i + 1, j + 3, k)) * (yC(i, j + 2, k) + yC(i, j + 3, k) + yC(i + 1, j + 2, k) + yC(i + 1, j + 3, k));
+
+                KX += half * (alfa_sixth * (sx_fR - sx_fL) + a_sixth * (sx_CR1 - sx_CL1) + b_sixth * (sx_CR2 - sx_CL2));
+                KY += half * (alfa_sixth * (sy_fR - sy_fL) + a_sixth * (sy_CR1 - sy_CL1) + b_sixth * (sy_CR2 - sy_CL2));
+                KZ += half * (alfa_sixth * (sz_fR - sz_fL) + a_sixth * (sz_CR1 - sz_CL1) + b_sixth * (sz_CR2 - sz_CL2));
+
+                Cellxfv(i, j, k, 1) = KX;
+                Cellyfv(i, j, k, 1) = KY;
+                Cellzfv(i, j, k, 1) = KZ;
+            }
+        }
+    }
+
+    for (int k = 1; k <= nk - 1; ++ k)
+    {
+        for (int i = 1; i <= ni - 1; ++ i)
+        {
+            for (int j = -1; j <= nj + 1; ++ j)
+            {
+                RDouble KX = 0.0;
+                RDouble KY = 0.0;
+                RDouble KZ = 0.0;
+
+                RDouble sx_CL2 = 0.0625 * (ycta(i - 1, j, k) + ycta(i - 2, j, k) + ycta(i - 1, j + 1, k) + ycta(i - 2, j + 1, k)) * (zC(i - 1, j, k) + zC(i - 2, j, k) + zC(i - 1, j + 1, k) + zC(i - 2, j + 1, k)) - 0.0625 * (yC(i - 1, j, k) + yC(i - 2, j, k) + yC(i - 1, j + 1, k) + yC(i - 2, j + 1, k)) * (zcta(i - 1, j, k) + zcta(i - 2, j, k) + zcta(i - 1, j + 1, k) + zcta(i - 2, j + 1, k));
+                RDouble sx_CL1 = 0.0625 * (ycta(i    , j, k) + ycta(i - 1, j, k) + ycta(i    , j + 1, k) + ycta(i - 1, j + 1, k)) * (zC(i    , j, k) + zC(i - 1, j, k) + zC(i    , j + 1, k) + zC(i - 1, j + 1, k)) - 0.0625 * (yC(i    , j, k) + yC(i - 1, j, k) + yC(i    , j + 1, k) + yC(i - 1, j + 1, k)) * (zcta(i    , j, k) + zcta(i - 1, j, k) + zcta(i    , j + 1, k) + zcta(i - 1, j + 1, k));
+                RDouble sx_fL  = 0.0625 * (ycta(i    , j, k) + ycta(i    , j, k) + ycta(i    , j + 1, k) + ycta(i    , j + 1, k)) * (zC(i    , j, k) + zC(i    , j, k) + zC(i    , j + 1, k) + zC(i    , j + 1, k)) - 0.0625 * (yC(i    , j, k) + yC(i    , j, k) + yC(i    , j + 1, k) + yC(i    , j + 1, k)) * (zcta(i    , j, k) + zcta(i    , j, k) + zcta(i    , j + 1, k) + zcta(i    , j + 1, k));
+                RDouble sx_fR  = 0.0625 * (ycta(i + 1, j, k) + ycta(i + 1, j, k) + ycta(i + 1, j + 1, k) + ycta(i + 1, j + 1, k)) * (zC(i + 1, j, k) + zC(i + 1, j, k) + zC(i + 1, j + 1, k) + zC(i + 1, j + 1, k)) - 0.0625 * (yC(i + 1, j, k) + yC(i + 1, j, k) + yC(i + 1, j + 1, k) + yC(i + 1, j + 1, k)) * (zcta(i + 1, j, k) + zcta(i + 1, j, k) + zcta(i + 1, j + 1, k) + zcta(i + 1, j + 1, k));
+                RDouble sx_CR1 = 0.0625 * (ycta(i + 1, j, k) + ycta(i + 2, j, k) + ycta(i + 1, j + 1, k) + ycta(i + 2, j + 1, k)) * (zC(i + 1, j, k) + zC(i + 2, j, k) + zC(i + 1, j + 1, k) + zC(i + 2, j + 1, k)) - 0.0625 * (yC(i + 1, j, k) + yC(i + 2, j, k) + yC(i + 1, j + 1, k) + yC(i + 2, j + 1, k)) * (zcta(i + 1, j, k) + zcta(i + 2, j, k) + zcta(i + 1, j + 1, k) + zcta(i + 2, j + 1, k));
+                RDouble sx_CR2 = 0.0625 * (ycta(i + 2, j, k) + ycta(i + 3, j, k) + ycta(i + 2, j + 1, k) + ycta(i + 3, j + 1, k)) * (zC(i + 2, j, k) + zC(i + 3, j, k) + zC(i + 2, j + 1, k) + zC(i + 3, j + 1, k)) - 0.0625 * (yC(i + 2, j, k) + yC(i + 3, j, k) + yC(i + 2, j + 1, k) + yC(i + 3, j + 1, k)) * (zcta(i + 2, j, k) + zcta(i + 3, j, k) + zcta(i + 2, j + 1, k) + zcta(i + 3, j + 1, k));
+                RDouble sy_CL2 = 0.0625 * (zcta(i - 1, j, k) + zcta(i - 2, j, k) + zcta(i - 1, j + 1, k) + zcta(i - 2, j + 1, k)) * (xC(i - 1, j, k) + xC(i - 2, j, k) + xC(i - 1, j + 1, k) + xC(i - 2, j + 1, k)) - 0.0625 * (zC(i - 1, j, k) + zC(i - 2, j, k) + zC(i - 1, j + 1, k) + zC(i - 2, j + 1, k)) * (xcta(i - 1, j, k) + xcta(i - 2, j, k) + xcta(i - 1, j + 1, k) + xcta(i - 2, j + 1, k));
+                RDouble sy_CL1 = 0.0625 * (zcta(i    , j, k) + zcta(i - 1, j, k) + zcta(i    , j + 1, k) + zcta(i - 1, j + 1, k)) * (xC(i    , j, k) + xC(i - 1, j, k) + xC(i    , j + 1, k) + xC(i - 1, j + 1, k)) - 0.0625 * (zC(i    , j, k) + zC(i - 1, j, k) + zC(i    , j + 1, k) + zC(i - 1, j + 1, k)) * (xcta(i    , j, k) + xcta(i - 1, j, k) + xcta(i    , j + 1, k) + xcta(i - 1, j + 1, k));
+                RDouble sy_fL  = 0.0625 * (zcta(i    , j, k) + zcta(i    , j, k) + zcta(i    , j + 1, k) + zcta(i    , j + 1, k)) * (xC(i    , j, k) + xC(i    , j, k) + xC(i    , j + 1, k) + xC(i    , j + 1, k)) - 0.0625 * (zC(i    , j, k) + zC(i    , j, k) + zC(i    , j + 1, k) + zC(i    , j + 1, k)) * (xcta(i    , j, k) + xcta(i    , j, k) + xcta(i    , j + 1, k) + xcta(i    , j + 1, k));
+                RDouble sy_fR  = 0.0625 * (zcta(i + 1, j, k) + zcta(i + 1, j, k) + zcta(i + 1, j + 1, k) + zcta(i + 1, j + 1, k)) * (xC(i + 1, j, k) + xC(i + 1, j, k) + xC(i + 1, j + 1, k) + xC(i + 1, j + 1, k)) - 0.0625 * (zC(i + 1, j, k) + zC(i + 1, j, k) + zC(i + 1, j + 1, k) + zC(i + 1, j + 1, k)) * (xcta(i + 1, j, k) + xcta(i + 1, j, k) + xcta(i + 1, j + 1, k) + xcta(i + 1, j + 1, k));
+                RDouble sy_CR1 = 0.0625 * (zcta(i + 1, j, k) + zcta(i + 2, j, k) + zcta(i + 1, j + 1, k) + zcta(i + 2, j + 1, k)) * (xC(i + 1, j, k) + xC(i + 2, j, k) + xC(i + 1, j + 1, k) + xC(i + 2, j + 1, k)) - 0.0625 * (zC(i + 1, j, k) + zC(i + 2, j, k) + zC(i + 1, j + 1, k) + zC(i + 2, j + 1, k)) * (xcta(i + 1, j, k) + xcta(i + 2, j, k) + xcta(i + 1, j + 1, k) + xcta(i + 2, j + 1, k));
+                RDouble sy_CR2 = 0.0625 * (zcta(i + 2, j, k) + zcta(i + 3, j, k) + zcta(i + 2, j + 1, k) + zcta(i + 3, j + 1, k)) * (xC(i + 2, j, k) + xC(i + 3, j, k) + xC(i + 2, j + 1, k) + xC(i + 3, j + 1, k)) - 0.0625 * (zC(i + 2, j, k) + zC(i + 3, j, k) + zC(i + 2, j + 1, k) + zC(i + 3, j + 1, k)) * (xcta(i + 2, j, k) + xcta(i + 3, j, k) + xcta(i + 2, j + 1, k) + xcta(i + 3, j + 1, k));
+                RDouble sz_CL2 = 0.0625 * (xcta(i - 1, j, k) + xcta(i - 2, j, k) + xcta(i - 1, j + 1, k) + xcta(i - 2, j + 1, k)) * (yC(i - 1, j, k) + yC(i - 2, j, k) + yC(i - 1, j + 1, k) + yC(i - 2, j + 1, k)) - 0.0625 * (xC(i - 1, j, k) + xC(i - 2, j, k) + xC(i - 1, j + 1, k) + xC(i - 2, j + 1, k)) * (ycta(i - 1, j, k) + ycta(i - 2, j, k) + ycta(i - 1, j + 1, k) + ycta(i - 2, j + 1, k));
+                RDouble sz_CL1 = 0.0625 * (xcta(i    , j, k) + xcta(i - 1, j, k) + xcta(i    , j + 1, k) + xcta(i - 1, j + 1, k)) * (yC(i    , j, k) + yC(i - 1, j, k) + yC(i    , j + 1, k) + yC(i - 1, j + 1, k)) - 0.0625 * (xC(i    , j, k) + xC(i - 1, j, k) + xC(i    , j + 1, k) + xC(i - 1, j + 1, k)) * (ycta(i    , j, k) + ycta(i - 1, j, k) + ycta(i    , j + 1, k) + ycta(i - 1, j + 1, k));
+                RDouble sz_fL  = 0.0625 * (xcta(i    , j, k) + xcta(i    , j, k) + xcta(i    , j + 1, k) + xcta(i    , j + 1, k)) * (yC(i    , j, k) + yC(i    , j, k) + yC(i    , j + 1, k) + yC(i    , j + 1, k)) - 0.0625 * (xC(i    , j, k) + xC(i    , j, k) + xC(i    , j + 1, k) + xC(i    , j + 1, k)) * (ycta(i    , j, k) + ycta(i    , j, k) + ycta(i    , j + 1, k) + ycta(i    , j + 1, k));
+                RDouble sz_fR  = 0.0625 * (xcta(i + 1, j, k) + xcta(i + 1, j, k) + xcta(i + 1, j + 1, k) + xcta(i + 1, j + 1, k)) * (yC(i + 1, j, k) + yC(i + 1, j, k) + yC(i + 1, j + 1, k) + yC(i + 1, j + 1, k)) - 0.0625 * (xC(i + 1, j, k) + xC(i + 1, j, k) + xC(i + 1, j + 1, k) + xC(i + 1, j + 1, k)) * (ycta(i + 1, j, k) + ycta(i + 1, j, k) + ycta(i + 1, j + 1, k) + ycta(i + 1, j + 1, k));
+                RDouble sz_CR1 = 0.0625 * (xcta(i + 1, j, k) + xcta(i + 2, j, k) + xcta(i + 1, j + 1, k) + xcta(i + 2, j + 1, k)) * (yC(i + 1, j, k) + yC(i + 2, j, k) + yC(i + 1, j + 1, k) + yC(i + 2, j + 1, k)) - 0.0625 * (xC(i + 1, j, k) + xC(i + 2, j, k) + xC(i + 1, j + 1, k) + xC(i + 2, j + 1, k)) * (ycta(i + 1, j, k) + ycta(i + 2, j, k) + ycta(i + 1, j + 1, k) + ycta(i + 2, j + 1, k));
+                RDouble sz_CR2 = 0.0625 * (xcta(i + 2, j, k) + xcta(i + 3, j, k) + xcta(i + 2, j + 1, k) + xcta(i + 3, j + 1, k)) * (yC(i + 2, j, k) + yC(i + 3, j, k) + yC(i + 2, j + 1, k) + yC(i + 3, j + 1, k)) - 0.0625 * (xC(i + 2, j, k) + xC(i + 3, j, k) + xC(i + 2, j + 1, k) + xC(i + 3, j + 1, k)) * (ycta(i + 2, j, k) + ycta(i + 3, j, k) + ycta(i + 2, j + 1, k) + ycta(i + 3, j + 1, k));
+
+                KX += half * (alfa_sixth * (sx_fR - sx_fL) + a_sixth * (sx_CR1 - sx_CL1) + b_sixth * (sx_CR2 - sx_CL2));
+                KY += half * (alfa_sixth * (sy_fR - sy_fL) + a_sixth * (sy_CR1 - sy_CL1) + b_sixth * (sy_CR2 - sy_CL2));
+                KZ += half * (alfa_sixth * (sz_fR - sz_fL) + a_sixth * (sz_CR1 - sz_CL1) + b_sixth * (sz_CR2 - sz_CL2));
+
+                sx_CL2 =  0.0625 * (yA(i, j, k - 1) + yA(i, j, k - 2) + yA(i, j + 1, k - 1) + yA(i, j + 1, k - 2)) * (zkxi(i, j, k - 1) + zkxi(i, j, k - 2) + zkxi(i, j + 1, k - 1) + zkxi(i, j + 1, k - 2)) - 0.0625 * (ykxi(i, j, k - 1) + ykxi(i, j, k - 2) + ykxi(i, j + 1, k - 1) + ykxi(i, j + 1, k - 2)) * (zA(i, j, k - 1) + zA(i, j, k - 2) + zA(i, j + 1, k - 1) + zA(i, j + 1, k - 2));
+                sx_CL1 =  0.0625 * (yA(i, j, k   ) + yA(i, j, k - 1) + yA(i, j + 1, k   ) + yA(i, j + 1, k - 1)) * (zkxi(i, j, k   ) + zkxi(i, j, k - 1) + zkxi(i, j + 1, k   ) + zkxi(i, j + 1, k - 1)) - 0.0625 * (ykxi(i, j, k   ) + ykxi(i, j, k - 1) + ykxi(i, j + 1, k   ) + ykxi(i, j + 1, k - 1)) * (zA(i, j, k   ) + zA(i, j, k - 1) + zA(i, j + 1, k   ) + zA(i, j + 1, k - 1));
+                sx_fL  =  0.0625 * (yA(i, j, k   ) + yA(i, j, k   ) + yA(i, j + 1, k   ) + yA(i, j + 1, k   )) * (zkxi(i, j, k   ) + zkxi(i, j, k   ) + zkxi(i, j + 1, k   ) + zkxi(i, j + 1, k   )) - 0.0625 * (ykxi(i, j, k   ) + ykxi(i, j, k   ) + ykxi(i, j + 1, k   ) + ykxi(i, j + 1, k   )) * (zA(i, j, k   ) + zA(i, j, k   ) + zA(i, j + 1, k   ) + zA(i, j + 1, k   ));
+                sx_fR  =  0.0625 * (yA(i, j, k + 1) + yA(i, j, k + 1) + yA(i, j + 1, k + 1) + yA(i, j + 1, k + 1)) * (zkxi(i, j, k + 1) + zkxi(i, j, k + 1) + zkxi(i, j + 1, k + 1) + zkxi(i, j + 1, k + 1)) - 0.0625 * (ykxi(i, j, k + 1) + ykxi(i, j, k + 1) + ykxi(i, j + 1, k + 1) + ykxi(i, j + 1, k + 1)) * (zA(i, j, k + 1) + zA(i, j, k + 1) + zA(i, j + 1, k + 1) + zA(i, j + 1, k + 1));
+                sx_CR1 =  0.0625 * (yA(i, j, k + 1) + yA(i, j, k + 2) + yA(i, j + 1, k + 1) + yA(i, j + 1, k + 2)) * (zkxi(i, j, k + 1) + zkxi(i, j, k + 2) + zkxi(i, j + 1, k + 1) + zkxi(i, j + 1, k + 2)) - 0.0625 * (ykxi(i, j, k + 1) + ykxi(i, j, k + 2) + ykxi(i, j + 1, k + 1) + ykxi(i, j + 1, k + 2)) * (zA(i, j, k + 1) + zA(i, j, k + 2) + zA(i, j + 1, k + 1) + zA(i, j + 1, k + 2));
+                sx_CR2 =  0.0625 * (yA(i, j, k + 2) + yA(i, j, k + 3) + yA(i, j + 1, k + 2) + yA(i, j + 1, k + 3)) * (zkxi(i, j, k + 2) + zkxi(i, j, k + 3) + zkxi(i, j + 1, k + 2) + zkxi(i, j + 1, k + 3)) - 0.0625 * (ykxi(i, j, k + 2) + ykxi(i, j, k + 3) + ykxi(i, j + 1, k + 2) + ykxi(i, j + 1, k + 3)) * (zA(i, j, k + 2) + zA(i, j, k + 3) + zA(i, j + 1, k + 2) + zA(i, j + 1, k + 3));
+                sy_CL2 =  0.0625 * (zA(i, j, k - 1) + zA(i, j, k - 2) + zA(i, j + 1, k - 1) + zA(i, j + 1, k - 2)) * (xkxi(i, j, k - 1) + xkxi(i, j, k - 2) + xkxi(i, j + 1, k - 1) + xkxi(i, j + 1, k - 2)) - 0.0625 * (zkxi(i, j, k - 1) + zkxi(i, j, k - 2) + zkxi(i, j + 1, k - 1) + zkxi(i, j + 1, k - 2)) * (xA(i, j, k - 1) + xA(i, j, k - 2) + xA(i, j + 1, k - 1) + xA(i, j + 1, k - 2));
+                sy_CL1 =  0.0625 * (zA(i, j, k   ) + zA(i, j, k - 1) + zA(i, j + 1, k   ) + zA(i, j + 1, k - 1)) * (xkxi(i, j, k   ) + xkxi(i, j, k - 1) + xkxi(i, j + 1, k   ) + xkxi(i, j + 1, k - 1)) - 0.0625 * (zkxi(i, j, k   ) + zkxi(i, j, k - 1) + zkxi(i, j + 1, k   ) + zkxi(i, j + 1, k - 1)) * (xA(i, j, k   ) + xA(i, j, k - 1) + xA(i, j + 1, k   ) + xA(i, j + 1, k - 1));
+                sy_fL  =  0.0625 * (zA(i, j, k   ) + zA(i, j, k   ) + zA(i, j + 1, k   ) + zA(i, j + 1, k   )) * (xkxi(i, j, k   ) + xkxi(i, j, k   ) + xkxi(i, j + 1, k   ) + xkxi(i, j + 1, k   )) - 0.0625 * (zkxi(i, j, k   ) + zkxi(i, j, k   ) + zkxi(i, j + 1, k   ) + zkxi(i, j + 1, k   )) * (xA(i, j, k   ) + xA(i, j, k   ) + xA(i, j + 1, k   ) + xA(i, j + 1, k   ));
+                sy_fR  =  0.0625 * (zA(i, j, k + 1) + zA(i, j, k + 1) + zA(i, j + 1, k + 1) + zA(i, j + 1, k + 1)) * (xkxi(i, j, k + 1) + xkxi(i, j, k + 1) + xkxi(i, j + 1, k + 1) + xkxi(i, j + 1, k + 1)) - 0.0625 * (zkxi(i, j, k + 1) + zkxi(i, j, k + 1) + zkxi(i, j + 1, k + 1) + zkxi(i, j + 1, k + 1)) * (xA(i, j, k + 1) + xA(i, j, k + 1) + xA(i, j + 1, k + 1) + xA(i, j + 1, k + 1));
+                sy_CR1 =  0.0625 * (zA(i, j, k + 1) + zA(i, j, k + 2) + zA(i, j + 1, k + 1) + zA(i, j + 1, k + 2)) * (xkxi(i, j, k + 1) + xkxi(i, j, k + 2) + xkxi(i, j + 1, k + 1) + xkxi(i, j + 1, k + 2)) - 0.0625 * (zkxi(i, j, k + 1) + zkxi(i, j, k + 2) + zkxi(i, j + 1, k + 1) + zkxi(i, j + 1, k + 2)) * (xA(i, j, k + 1) + xA(i, j, k + 2) + xA(i, j + 1, k + 1) + xA(i, j + 1, k + 2));
+                sy_CR2 =  0.0625 * (zA(i, j, k + 2) + zA(i, j, k + 3) + zA(i, j + 1, k + 2) + zA(i, j + 1, k + 3)) * (xkxi(i, j, k + 2) + xkxi(i, j, k + 3) + xkxi(i, j + 1, k + 2) + xkxi(i, j + 1, k + 3)) - 0.0625 * (zkxi(i, j, k + 2) + zkxi(i, j, k + 3) + zkxi(i, j + 1, k + 2) + zkxi(i, j + 1, k + 3)) * (xA(i, j, k + 2) + xA(i, j, k + 3) + xA(i, j + 1, k + 2) + xA(i, j + 1, k + 3));
+                sz_CL2 =  0.0625 * (xA(i, j, k - 1) + xA(i, j, k - 2) + xA(i, j + 1, k - 1) + xA(i, j + 1, k - 2)) * (ykxi(i, j, k - 1) + ykxi(i, j, k - 2) + ykxi(i, j + 1, k - 1) + ykxi(i, j + 1, k - 2)) - 0.0625 * (xkxi(i, j, k - 1) + xkxi(i, j, k - 2) + xkxi(i, j + 1, k - 1) + xkxi(i, j + 1, k - 2)) * (yA(i, j, k - 1) + yA(i, j, k - 2) + yA(i, j + 1, k - 1) + yA(i, j + 1, k - 2));
+                sz_CL1 =  0.0625 * (xA(i, j, k   ) + xA(i, j, k - 1) + xA(i, j + 1, k   ) + xA(i, j + 1, k - 1)) * (ykxi(i, j, k   ) + ykxi(i, j, k - 1) + ykxi(i, j + 1, k   ) + ykxi(i, j + 1, k - 1)) - 0.0625 * (xkxi(i, j, k   ) + xkxi(i, j, k - 1) + xkxi(i, j + 1, k   ) + xkxi(i, j + 1, k - 1)) * (yA(i, j, k   ) + yA(i, j, k - 1) + yA(i, j + 1, k   ) + yA(i, j + 1, k - 1));
+                sz_fL  =  0.0625 * (xA(i, j, k   ) + xA(i, j, k   ) + xA(i, j + 1, k   ) + xA(i, j + 1, k   )) * (ykxi(i, j, k   ) + ykxi(i, j, k   ) + ykxi(i, j + 1, k   ) + ykxi(i, j + 1, k   )) - 0.0625 * (xkxi(i, j, k   ) + xkxi(i, j, k   ) + xkxi(i, j + 1, k   ) + xkxi(i, j + 1, k   )) * (yA(i, j, k   ) + yA(i, j, k   ) + yA(i, j + 1, k   ) + yA(i, j + 1, k   ));
+                sz_fR  =  0.0625 * (xA(i, j, k + 1) + xA(i, j, k + 1) + xA(i, j + 1, k + 1) + xA(i, j + 1, k + 1)) * (ykxi(i, j, k + 1) + ykxi(i, j, k + 1) + ykxi(i, j + 1, k + 1) + ykxi(i, j + 1, k + 1)) - 0.0625 * (xkxi(i, j, k + 1) + xkxi(i, j, k + 1) + xkxi(i, j + 1, k + 1) + xkxi(i, j + 1, k + 1)) * (yA(i, j, k + 1) + yA(i, j, k + 1) + yA(i, j + 1, k + 1) + yA(i, j + 1, k + 1));
+                sz_CR1 =  0.0625 * (xA(i, j, k + 1) + xA(i, j, k + 2) + xA(i, j + 1, k + 1) + xA(i, j + 1, k + 2)) * (ykxi(i, j, k + 1) + ykxi(i, j, k + 2) + ykxi(i, j + 1, k + 1) + ykxi(i, j + 1, k + 2)) - 0.0625 * (xkxi(i, j, k + 1) + xkxi(i, j, k + 2) + xkxi(i, j + 1, k + 1) + xkxi(i, j + 1, k + 2)) * (yA(i, j, k + 1) + yA(i, j, k + 2) + yA(i, j + 1, k + 1) + yA(i, j + 1, k + 2));
+                sz_CR2 =  0.0625 * (xA(i, j, k + 2) + xA(i, j, k + 3) + xA(i, j + 1, k + 2) + xA(i, j + 1, k + 3)) * (ykxi(i, j, k + 2) + ykxi(i, j, k + 3) + ykxi(i, j + 1, k + 2) + ykxi(i, j + 1, k + 3)) - 0.0625 * (xkxi(i, j, k + 2) + xkxi(i, j, k + 3) + xkxi(i, j + 1, k + 2) + xkxi(i, j + 1, k + 3)) * (yA(i, j, k + 2) + yA(i, j, k + 3) + yA(i, j + 1, k + 2) + yA(i, j + 1, k + 3));
+
+                KX += half * (alfa_sixth * (sx_fR - sx_fL) + a_sixth * (sx_CR1 - sx_CL1) + b_sixth * (sx_CR2 - sx_CL2));
+                KY += half * (alfa_sixth * (sy_fR - sy_fL) + a_sixth * (sy_CR1 - sy_CL1) + b_sixth * (sy_CR2 - sy_CL2));
+                KZ += half * (alfa_sixth * (sz_fR - sz_fL) + a_sixth * (sz_CR1 - sz_CL1) + b_sixth * (sz_CR2 - sz_CL2));
+
+                Cellxfv(i, j, k, 2) = KX;
+                Cellyfv(i, j, k, 2) = KY;
+                Cellzfv(i, j, k, 2) = KZ;
+            }
+        }
+    }
+
+    for (int j = 1; j <= nj - 1; ++ j)
+    {
+        for (int i = 1; i <= ni - 1; ++ i)
+        {
+            for (int k = -1; k <= nk + 1; ++ k)
+            {
+                RDouble KX = 0.0;
+                RDouble KY = 0.0;
+                RDouble KZ = 0.0;
+
+                RDouble sx_CL2 = 0.0625 * (ykxi(i, j - 1, k) + ykxi(i, j - 2, k) + ykxi(i, j - 1, k + 1) + ykxi(i, j - 2, k + 1)) * (zA(i, j - 1, k) + zA(i, j - 2, k) + zA(i, j - 1, k + 1) + zA(i, j - 2, k + 1)) - 0.0625 * (yA(i, j - 1, k) + yA(i, j - 2, k) + yA(i, j - 1, k + 1) + yA(i, j - 2, k + 1)) * (zkxi(i, j - 1, k) + zkxi(i, j - 2, k) + zkxi(i, j - 1, k + 1) + zkxi(i, j - 2, k + 1));
+                RDouble sx_CL1 = 0.0625 * (ykxi(i, j    , k) + ykxi(i, j - 1, k) + ykxi(i, j    , k + 1) + ykxi(i, j - 1, k + 1)) * (zA(i, j    , k) + zA(i, j - 1, k) + zA(i, j    , k + 1) + zA(i, j - 1, k + 1)) - 0.0625 * (yA(i, j    , k) + yA(i, j - 1, k) + yA(i, j    , k + 1) + yA(i, j - 1, k + 1)) * (zkxi(i, j    , k) + zkxi(i, j - 1, k) + zkxi(i, j    , k + 1) + zkxi(i, j - 1, k + 1));
+                RDouble sx_fL  = 0.0625 * (ykxi(i, j    , k) + ykxi(i, j    , k) + ykxi(i, j    , k + 1) + ykxi(i, j    , k + 1)) * (zA(i, j    , k) + zA(i, j    , k) + zA(i, j    , k + 1) + zA(i, j    , k + 1)) - 0.0625 * (yA(i, j    , k) + yA(i, j    , k) + yA(i, j    , k + 1) + yA(i, j    , k + 1)) * (zkxi(i, j    , k) + zkxi(i, j    , k) + zkxi(i, j    , k + 1) + zkxi(i, j    , k + 1));
+                RDouble sx_fR  = 0.0625 * (ykxi(i, j + 1, k) + ykxi(i, j + 1, k) + ykxi(i, j + 1, k + 1) + ykxi(i, j + 1, k + 1)) * (zA(i, j + 1, k) + zA(i, j + 1, k) + zA(i, j + 1, k + 1) + zA(i, j + 1, k + 1)) - 0.0625 * (yA(i, j + 1, k) + yA(i, j + 1, k) + yA(i, j + 1, k + 1) + yA(i, j + 1, k + 1)) * (zkxi(i, j + 1, k) + zkxi(i, j + 1, k) + zkxi(i, j + 1, k + 1) + zkxi(i, j + 1, k + 1));
+                RDouble sx_CR1 = 0.0625 * (ykxi(i, j + 1, k) + ykxi(i, j + 2, k) + ykxi(i, j + 1, k + 1) + ykxi(i, j + 2, k + 1)) * (zA(i, j + 1, k) + zA(i, j + 2, k) + zA(i, j + 1, k + 1) + zA(i, j + 2, k + 1)) - 0.0625 * (yA(i, j + 1, k) + yA(i, j + 2, k) + yA(i, j + 1, k + 1) + yA(i, j + 2, k + 1)) * (zkxi(i, j + 1, k) + zkxi(i, j + 2, k) + zkxi(i, j + 1, k + 1) + zkxi(i, j + 2, k + 1));
+                RDouble sx_CR2 = 0.0625 * (ykxi(i, j + 2, k) + ykxi(i, j + 3, k) + ykxi(i, j + 2, k + 1) + ykxi(i, j + 3, k + 1)) * (zA(i, j + 2, k) + zA(i, j + 3, k) + zA(i, j + 2, k + 1) + zA(i, j + 3, k + 1)) - 0.0625 * (yA(i, j + 2, k) + yA(i, j + 3, k) + yA(i, j + 2, k + 1) + yA(i, j + 3, k + 1)) * (zkxi(i, j + 2, k) + zkxi(i, j + 3, k) + zkxi(i, j + 2, k + 1) + zkxi(i, j + 3, k + 1));
+                RDouble sy_CL2 = 0.0625 * (zkxi(i, j - 1, k) + zkxi(i, j - 2, k) + zkxi(i, j - 1, k + 1) + zkxi(i, j - 2, k + 1)) * (xA(i, j - 1, k) + xA(i, j - 2, k) + xA(i, j - 1, k + 1) + xA(i, j - 2, k + 1)) - 0.0625 * (zA(i, j - 1, k) + zA(i, j - 2, k) + zA(i, j - 1, k + 1) + zA(i, j - 2, k + 1)) * (xkxi(i, j - 1, k) + xkxi(i, j - 2, k) + xkxi(i, j - 1, k + 1) + xkxi(i, j - 2, k + 1));
+                RDouble sy_CL1 = 0.0625 * (zkxi(i, j    , k) + zkxi(i, j - 1, k) + zkxi(i, j    , k + 1) + zkxi(i, j - 1, k + 1)) * (xA(i, j    , k) + xA(i, j - 1, k) + xA(i, j    , k + 1) + xA(i, j - 1, k + 1)) - 0.0625 * (zA(i, j    , k) + zA(i, j - 1, k) + zA(i, j    , k + 1) + zA(i, j - 1, k + 1)) * (xkxi(i, j    , k) + xkxi(i, j - 1, k) + xkxi(i, j    , k + 1) + xkxi(i, j - 1, k + 1));
+                RDouble sy_fL  = 0.0625 * (zkxi(i, j    , k) + zkxi(i, j    , k) + zkxi(i, j    , k + 1) + zkxi(i, j    , k + 1)) * (xA(i, j    , k) + xA(i, j    , k) + xA(i, j    , k + 1) + xA(i, j    , k + 1)) - 0.0625 * (zA(i, j    , k) + zA(i, j    , k) + zA(i, j    , k + 1) + zA(i, j    , k + 1)) * (xkxi(i, j    , k) + xkxi(i, j    , k) + xkxi(i, j    , k + 1) + xkxi(i, j    , k + 1));
+                RDouble sy_fR  = 0.0625 * (zkxi(i, j + 1, k) + zkxi(i, j + 1, k) + zkxi(i, j + 1, k + 1) + zkxi(i, j + 1, k + 1)) * (xA(i, j + 1, k) + xA(i, j + 1, k) + xA(i, j + 1, k + 1) + xA(i, j + 1, k + 1)) - 0.0625 * (zA(i, j + 1, k) + zA(i, j + 1, k) + zA(i, j + 1, k + 1) + zA(i, j + 1, k + 1)) * (xkxi(i, j + 1, k) + xkxi(i, j + 1, k) + xkxi(i, j + 1, k + 1) + xkxi(i, j + 1, k + 1));
+                RDouble sy_CR1 = 0.0625 * (zkxi(i, j + 1, k) + zkxi(i, j + 2, k) + zkxi(i, j + 1, k + 1) + zkxi(i, j + 2, k + 1)) * (xA(i, j + 1, k) + xA(i, j + 2, k) + xA(i, j + 1, k + 1) + xA(i, j + 2, k + 1)) - 0.0625 * (zA(i, j + 1, k) + zA(i, j + 2, k) + zA(i, j + 1, k + 1) + zA(i, j + 2, k + 1)) * (xkxi(i, j + 1, k) + xkxi(i, j + 2, k) + xkxi(i, j + 1, k + 1) + xkxi(i, j + 2, k + 1));
+                RDouble sy_CR2 = 0.0625 * (zkxi(i, j + 2, k) + zkxi(i, j + 3, k) + zkxi(i, j + 2, k + 1) + zkxi(i, j + 3, k + 1)) * (xA(i, j + 2, k) + xA(i, j + 3, k) + xA(i, j + 2, k + 1) + xA(i, j + 3, k + 1)) - 0.0625 * (zA(i, j + 2, k) + zA(i, j + 3, k) + zA(i, j + 2, k + 1) + zA(i, j + 3, k + 1)) * (xkxi(i, j + 2, k) + xkxi(i, j + 3, k) + xkxi(i, j + 2, k + 1) + xkxi(i, j + 3, k + 1));
+                RDouble sz_CL2 = 0.0625 * (xkxi(i, j - 1, k) + xkxi(i, j - 2, k) + xkxi(i, j - 1, k + 1) + xkxi(i, j - 2, k + 1)) * (yA(i, j - 1, k) + yA(i, j - 2, k) + yA(i, j - 1, k + 1) + yA(i, j - 2, k + 1)) - 0.0625 * (xA(i, j - 1, k) + xA(i, j - 2, k) + xA(i, j - 1, k + 1) + xA(i, j - 2, k + 1)) * (ykxi(i, j - 1, k) + ykxi(i, j - 2, k) + ykxi(i, j - 1, k + 1) + ykxi(i, j - 2, k + 1));
+                RDouble sz_CL1 = 0.0625 * (xkxi(i, j    , k) + xkxi(i, j - 1, k) + xkxi(i, j    , k + 1) + xkxi(i, j - 1, k + 1)) * (yA(i, j    , k) + yA(i, j - 1, k) + yA(i, j    , k + 1) + yA(i, j - 1, k + 1)) - 0.0625 * (xA(i, j    , k) + xA(i, j - 1, k) + xA(i, j    , k + 1) + xA(i, j - 1, k + 1)) * (ykxi(i, j    , k) + ykxi(i, j - 1, k) + ykxi(i, j    , k + 1) + ykxi(i, j - 1, k + 1));
+                RDouble sz_fL  = 0.0625 * (xkxi(i, j    , k) + xkxi(i, j    , k) + xkxi(i, j    , k + 1) + xkxi(i, j    , k + 1)) * (yA(i, j    , k) + yA(i, j    , k) + yA(i, j    , k + 1) + yA(i, j    , k + 1)) - 0.0625 * (xA(i, j    , k) + xA(i, j    , k) + xA(i, j    , k + 1) + xA(i, j    , k + 1)) * (ykxi(i, j    , k) + ykxi(i, j    , k) + ykxi(i, j    , k + 1) + ykxi(i, j    , k + 1));
+                RDouble sz_fR  = 0.0625 * (xkxi(i, j + 1, k) + xkxi(i, j + 1, k) + xkxi(i, j + 1, k + 1) + xkxi(i, j + 1, k + 1)) * (yA(i, j + 1, k) + yA(i, j + 1, k) + yA(i, j + 1, k + 1) + yA(i, j + 1, k + 1)) - 0.0625 * (xA(i, j + 1, k) + xA(i, j + 1, k) + xA(i, j + 1, k + 1) + xA(i, j + 1, k + 1)) * (ykxi(i, j + 1, k) + ykxi(i, j + 1, k) + ykxi(i, j + 1, k + 1) + ykxi(i, j + 1, k + 1));
+                RDouble sz_CR1 = 0.0625 * (xkxi(i, j + 1, k) + xkxi(i, j + 2, k) + xkxi(i, j + 1, k + 1) + xkxi(i, j + 2, k + 1)) * (yA(i, j + 1, k) + yA(i, j + 2, k) + yA(i, j + 1, k + 1) + yA(i, j + 2, k + 1)) - 0.0625 * (xA(i, j + 1, k) + xA(i, j + 2, k) + xA(i, j + 1, k + 1) + xA(i, j + 2, k + 1)) * (ykxi(i, j + 1, k) + ykxi(i, j + 2, k) + ykxi(i, j + 1, k + 1) + ykxi(i, j + 2, k + 1));
+                RDouble sz_CR2 = 0.0625 * (xkxi(i, j + 2, k) + xkxi(i, j + 3, k) + xkxi(i, j + 2, k + 1) + xkxi(i, j + 3, k + 1)) * (yA(i, j + 2, k) + yA(i, j + 3, k) + yA(i, j + 2, k + 1) + yA(i, j + 3, k + 1)) - 0.0625 * (xA(i, j + 2, k) + xA(i, j + 3, k) + xA(i, j + 2, k + 1) + xA(i, j + 3, k + 1)) * (ykxi(i, j + 2, k) + ykxi(i, j + 3, k) + ykxi(i, j + 2, k + 1) + ykxi(i, j + 3, k + 1));
+
+                KX += half * (alfa_sixth * (sx_fR - sx_fL) + a_sixth * (sx_CR1 - sx_CL1) + b_sixth * (sx_CR2 - sx_CL2));
+                KY += half * (alfa_sixth * (sy_fR - sy_fL) + a_sixth * (sy_CR1 - sy_CL1) + b_sixth * (sy_CR2 - sy_CL2));
+                KZ += half * (alfa_sixth * (sz_fR - sz_fL) + a_sixth * (sz_CR1 - sz_CL1) + b_sixth * (sz_CR2 - sz_CL2));
+
+                sx_CL2 =  0.0625 * (yB(i - 1, j, k) + yB(i - 2, j, k) + yB(i - 1, j, k + 1) + yB(i - 2, j, k + 1)) * (zeta(i - 1, j, k) + zeta(i - 2, j, k) + zeta(i - 1, j, k + 1) + zeta(i - 2, j, k + 1)) - 0.0625 * (yeta(i - 1, j, k) + yeta(i - 2, j, k) + yeta(i - 1, j, k + 1) + yeta(i - 2, j, k + 1)) * (zB(i - 1, j, k) + zB(i - 2, j, k) + zB(i - 1, j, k + 1) + zB(i - 2, j, k + 1));
+                sx_CL1 =  0.0625 * (yB(i    , j, k) + yB(i - 1, j, k) + yB(i    , j, k + 1) + yB(i - 1, j, k + 1)) * (zeta(i    , j, k) + zeta(i - 1, j, k) + zeta(i    , j, k + 1) + zeta(i - 1, j, k + 1)) - 0.0625 * (yeta(i    , j, k) + yeta(i - 1, j, k) + yeta(i    , j, k + 1) + yeta(i - 1, j, k + 1)) * (zB(i    , j, k) + zB(i - 1, j, k) + zB(i    , j, k + 1) + zB(i - 1, j, k + 1));
+                sx_fL  =  0.0625 * (yB(i    , j, k) + yB(i    , j, k) + yB(i    , j, k + 1) + yB(i    , j, k + 1)) * (zeta(i    , j, k) + zeta(i    , j, k) + zeta(i    , j, k + 1) + zeta(i    , j, k + 1)) - 0.0625 * (yeta(i    , j, k) + yeta(i    , j, k) + yeta(i    , j, k + 1) + yeta(i    , j, k + 1)) * (zB(i    , j, k) + zB(i    , j, k) + zB(i    , j, k + 1) + zB(i    , j, k + 1));
+                sx_fR  =  0.0625 * (yB(i + 1, j, k) + yB(i + 1, j, k) + yB(i + 1, j, k + 1) + yB(i + 1, j, k + 1)) * (zeta(i + 1, j, k) + zeta(i + 1, j, k) + zeta(i + 1, j, k + 1) + zeta(i + 1, j, k + 1)) - 0.0625 * (yeta(i + 1, j, k) + yeta(i + 1, j, k) + yeta(i + 1, j, k + 1) + yeta(i + 1, j, k + 1)) * (zB(i + 1, j, k) + zB(i + 1, j, k) + zB(i + 1, j, k + 1) + zB(i + 1, j, k + 1));
+                sx_CR1 =  0.0625 * (yB(i + 1, j, k) + yB(i + 2, j, k) + yB(i + 1, j, k + 1) + yB(i + 2, j, k + 1)) * (zeta(i + 1, j, k) + zeta(i + 2, j, k) + zeta(i + 1, j, k + 1) + zeta(i + 2, j, k + 1)) - 0.0625 * (yeta(i + 1, j, k) + yeta(i + 2, j, k) + yeta(i + 1, j, k + 1) + yeta(i + 2, j, k + 1)) * (zB(i + 1, j, k) + zB(i + 2, j, k) + zB(i + 1, j, k + 1) + zB(i + 2, j, k + 1));
+                sx_CR2 =  0.0625 * (yB(i + 2, j, k) + yB(i + 3, j, k) + yB(i + 2, j, k + 1) + yB(i + 3, j, k + 1)) * (zeta(i + 2, j, k) + zeta(i + 3, j, k) + zeta(i + 2, j, k + 1) + zeta(i + 3, j, k + 1)) - 0.0625 * (yeta(i + 2, j, k) + yeta(i + 3, j, k) + yeta(i + 2, j, k + 1) + yeta(i + 3, j, k + 1)) * (zB(i + 2, j, k) + zB(i + 3, j, k) + zB(i + 2, j, k + 1) + zB(i + 3, j, k + 1));
+                sy_CL2 =  0.0625 * (zB(i - 1, j, k) + zB(i - 2, j, k) + zB(i - 1, j, k + 1) + zB(i - 2, j, k + 1)) * (xeta(i - 1, j, k) + xeta(i - 2, j, k) + xeta(i - 1, j, k + 1) + xeta(i - 2, j, k + 1)) - 0.0625 * (zeta(i - 1, j, k) + zeta(i - 2, j, k) + zeta(i - 1, j, k + 1) + zeta(i - 2, j, k + 1)) * (xB(i - 1, j, k) + xB(i - 2, j, k) + xB(i - 1, j, k + 1) + xB(i - 2, j, k + 1));
+                sy_CL1 =  0.0625 * (zB(i    , j, k) + zB(i - 1, j, k) + zB(i    , j, k + 1) + zB(i - 1, j, k + 1)) * (xeta(i    , j, k) + xeta(i - 1, j, k) + xeta(i    , j, k + 1) + xeta(i - 1, j, k + 1)) - 0.0625 * (zeta(i    , j, k) + zeta(i - 1, j, k) + zeta(i    , j, k + 1) + zeta(i - 1, j, k + 1)) * (xB(i    , j, k) + xB(i - 1, j, k) + xB(i    , j, k + 1) + xB(i - 1, j, k + 1));
+                sy_fL  =  0.0625 * (zB(i    , j, k) + zB(i    , j, k) + zB(i    , j, k + 1) + zB(i    , j, k + 1)) * (xeta(i    , j, k) + xeta(i    , j, k) + xeta(i    , j, k + 1) + xeta(i    , j, k + 1)) - 0.0625 * (zeta(i    , j, k) + zeta(i    , j, k) + zeta(i    , j, k + 1) + zeta(i    , j, k + 1)) * (xB(i    , j, k) + xB(i    , j, k) + xB(i    , j, k + 1) + xB(i    , j, k + 1));
+                sy_fR  =  0.0625 * (zB(i + 1, j, k) + zB(i + 1, j, k) + zB(i + 1, j, k + 1) + zB(i + 1, j, k + 1)) * (xeta(i + 1, j, k) + xeta(i + 1, j, k) + xeta(i + 1, j, k + 1) + xeta(i + 1, j, k + 1)) - 0.0625 * (zeta(i + 1, j, k) + zeta(i + 1, j, k) + zeta(i + 1, j, k + 1) + zeta(i + 1, j, k + 1)) * (xB(i + 1, j, k) + xB(i + 1, j, k) + xB(i + 1, j, k + 1) + xB(i + 1, j, k + 1));
+                sy_CR1 =  0.0625 * (zB(i + 1, j, k) + zB(i + 2, j, k) + zB(i + 1, j, k + 1) + zB(i + 2, j, k + 1)) * (xeta(i + 1, j, k) + xeta(i + 2, j, k) + xeta(i + 1, j, k + 1) + xeta(i + 2, j, k + 1)) - 0.0625 * (zeta(i + 1, j, k) + zeta(i + 2, j, k) + zeta(i + 1, j, k + 1) + zeta(i + 2, j, k + 1)) * (xB(i + 1, j, k) + xB(i + 2, j, k) + xB(i + 1, j, k + 1) + xB(i + 2, j, k + 1));
+                sy_CR2 =  0.0625 * (zB(i + 2, j, k) + zB(i + 3, j, k) + zB(i + 2, j, k + 1) + zB(i + 3, j, k + 1)) * (xeta(i + 2, j, k) + xeta(i + 3, j, k) + xeta(i + 2, j, k + 1) + xeta(i + 3, j, k + 1)) - 0.0625 * (zeta(i + 2, j, k) + zeta(i + 3, j, k) + zeta(i + 2, j, k + 1) + zeta(i + 3, j, k + 1)) * (xB(i + 2, j, k) + xB(i + 3, j, k) + xB(i + 2, j, k + 1) + xB(i + 3, j, k + 1));
+                sz_CL2 =  0.0625 * (xB(i - 1, j, k) + xB(i - 2, j, k) + xB(i - 1, j, k + 1) + xB(i - 2, j, k + 1)) * (yeta(i - 1, j, k) + yeta(i - 2, j, k) + yeta(i - 1, j, k + 1) + yeta(i - 2, j, k + 1)) - 0.0625 * (xeta(i - 1, j, k) + xeta(i - 2, j, k) + xeta(i - 1, j, k + 1) + xeta(i - 2, j, k + 1)) * (yB(i - 1, j, k) + yB(i - 2, j, k) + yB(i - 1, j, k + 1) + yB(i - 2, j, k + 1));
+                sz_CL1 =  0.0625 * (xB(i    , j, k) + xB(i - 1, j, k) + xB(i    , j, k + 1) + xB(i - 1, j, k + 1)) * (yeta(i    , j, k) + yeta(i - 1, j, k) + yeta(i    , j, k + 1) + yeta(i - 1, j, k + 1)) - 0.0625 * (xeta(i    , j, k) + xeta(i - 1, j, k) + xeta(i    , j, k + 1) + xeta(i - 1, j, k + 1)) * (yB(i    , j, k) + yB(i - 1, j, k) + yB(i    , j, k + 1) + yB(i - 1, j, k + 1));
+                sz_fL  =  0.0625 * (xB(i    , j, k) + xB(i    , j, k) + xB(i    , j, k + 1) + xB(i    , j, k + 1)) * (yeta(i    , j, k) + yeta(i    , j, k) + yeta(i    , j, k + 1) + yeta(i    , j, k + 1)) - 0.0625 * (xeta(i    , j, k) + xeta(i    , j, k) + xeta(i    , j, k + 1) + xeta(i    , j, k + 1)) * (yB(i    , j, k) + yB(i    , j, k) + yB(i    , j, k + 1) + yB(i    , j, k + 1));
+                sz_fR  =  0.0625 * (xB(i + 1, j, k) + xB(i + 1, j, k) + xB(i + 1, j, k + 1) + xB(i + 1, j, k + 1)) * (yeta(i + 1, j, k) + yeta(i + 1, j, k) + yeta(i + 1, j, k + 1) + yeta(i + 1, j, k + 1)) - 0.0625 * (xeta(i + 1, j, k) + xeta(i + 1, j, k) + xeta(i + 1, j, k + 1) + xeta(i + 1, j, k + 1)) * (yB(i + 1, j, k) + yB(i + 1, j, k) + yB(i + 1, j, k + 1) + yB(i + 1, j, k + 1));
+                sz_CR1 =  0.0625 * (xB(i + 1, j, k) + xB(i + 2, j, k) + xB(i + 1, j, k + 1) + xB(i + 2, j, k + 1)) * (yeta(i + 1, j, k) + yeta(i + 2, j, k) + yeta(i + 1, j, k + 1) + yeta(i + 2, j, k + 1)) - 0.0625 * (xeta(i + 1, j, k) + xeta(i + 2, j, k) + xeta(i + 1, j, k + 1) + xeta(i + 2, j, k + 1)) * (yB(i + 1, j, k) + yB(i + 2, j, k) + yB(i + 1, j, k + 1) + yB(i + 2, j, k + 1));
+                sz_CR2 =  0.0625 * (xB(i + 2, j, k) + xB(i + 3, j, k) + xB(i + 2, j, k + 1) + xB(i + 3, j, k + 1)) * (yeta(i + 2, j, k) + yeta(i + 3, j, k) + yeta(i + 2, j, k + 1) + yeta(i + 3, j, k + 1)) - 0.0625 * (xeta(i + 2, j, k) + xeta(i + 3, j, k) + xeta(i + 2, j, k + 1) + xeta(i + 3, j, k + 1)) * (yB(i + 2, j, k) + yB(i + 3, j, k) + yB(i + 2, j, k + 1) + yB(i + 3, j, k + 1));
+
+                KX += half * (alfa_sixth * (sx_fR - sx_fL) + a_sixth * (sx_CR1 - sx_CL1) + b_sixth * (sx_CR2 - sx_CL2));
+                KY += half * (alfa_sixth * (sy_fR - sy_fL) + a_sixth * (sy_CR1 - sy_CL1) + b_sixth * (sy_CR2 - sy_CL2));
+                KZ += half * (alfa_sixth * (sz_fR - sz_fL) + a_sixth * (sz_CR1 - sz_CL1) + b_sixth * (sz_CR2 - sz_CL2));
+                
+                Cellxfv(i, j, k, 3) = KX;
+                Cellyfv(i, j, k, 3) = KY;
+                Cellzfv(i, j, k, 3) = KZ;
+            }
+        }
+    }
+
+
+    delete &xA   ;
+    delete &yA   ;
+    delete &zA   ;
+    delete &xkxi;
+    delete &ykxi;
+    delete &zkxi;
+
+    delete &xB   ;
+    delete &yB   ;
+    delete &zB   ;
+    delete &xeta;
+    delete &yeta;
+    delete &zeta;
+
+    delete &xC   ;
+    delete &yC   ;
+    delete &zC   ;
+    delete &xcta;
+    delete &ycta;
+    delete &zcta;
+    //!=
+    RDouble3D &vol = *this->GetCellVolume();
+
+    RDouble3D &xfaceI = *new RDouble3D(Range(-1, ni + 2), Range(1, nj - 1), Range(1, nk - 1), fortranArray);
+    RDouble3D &yfaceI = *new RDouble3D(Range(-1, ni + 2), Range(1, nj - 1), Range(1, nk - 1), fortranArray);
+    RDouble3D &zfaceI = *new RDouble3D(Range(-1, ni + 2), Range(1, nj - 1), Range(1, nk - 1), fortranArray);
+
+    RDouble3D &xfaceJ = *new RDouble3D(Range(1, ni - 1), Range(-1, nj + 2), Range(1, nk - 1), fortranArray);
+    RDouble3D &yfaceJ = *new RDouble3D(Range(1, ni - 1), Range(-1, nj + 2), Range(1, nk - 1), fortranArray);
+    RDouble3D &zfaceJ = *new RDouble3D(Range(1, ni - 1), Range(-1, nj + 2), Range(1, nk - 1), fortranArray);
+
+    RDouble3D &xfaceK = *new RDouble3D(Range(1, ni - 1), Range(1, nj - 1), Range(-1, nk + 2), fortranArray);
+    RDouble3D &yfaceK = *new RDouble3D(Range(1, ni - 1), Range(1, nj - 1), Range(-1, nk + 2), fortranArray);
+    RDouble3D &zfaceK = *new RDouble3D(Range(1, ni - 1), Range(1, nj - 1), Range(-1, nk + 2), fortranArray);
+
+    for (int k = 1; k <= nk - 1; ++ k)
+    {
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            for (int i = -1; i <= ni + 2; ++ i)
+            {
+                RDouble x1 = xx(i, j,     k);
+                RDouble x2 = xx(i, j + 1, k);
+                RDouble x3 = xx(i, j,     k + 1);
+                RDouble x4 = xx(i, j + 1, k + 1);
+
+                RDouble y1 = yy(i, j,     k);
+                RDouble y2 = yy(i, j + 1, k);
+                RDouble y3 = yy(i, j,     k + 1);
+                RDouble y4 = yy(i, j + 1, k + 1);
+
+                RDouble z1 = zz(i, j,     k);
+                RDouble z2 = zz(i, j + 1, k);
+                RDouble z3 = zz(i, j,     k + 1);
+                RDouble z4 = zz(i, j + 1, k + 1);
+                
+                xfaceI(i, j, k) = 0.25 * (x1 + x2 + x3 + x4);
+                yfaceI(i, j, k) = 0.25 * (y1 + y2 + y3 + y4);
+                zfaceI(i, j, k) = 0.25 * (z1 + z2 + z3 + z4);
+            }
+        }
+    }
+
+    for (int k = 1; k <= nk - 1; ++ k)
+    {
+        for (int i = 1; i <= ni - 1; ++ i)
+        {
+            for (int j = -1; j <= nj + 2; ++ j)
+            {
+                RDouble x1 = xx(i,     j, k);
+                RDouble x2 = xx(i + 1, j, k);
+                RDouble x3 = xx(i,     j, k + 1);
+                RDouble x4 = xx(i + 1, j, k + 1);
+
+                RDouble y1 = yy(i,     j, k);
+                RDouble y2 = yy(i + 1, j, k);
+                RDouble y3 = yy(i,     j, k + 1);
+                RDouble y4 = yy(i + 1, j, k + 1);
+
+                RDouble z1 = zz(i,     j, k);
+                RDouble z2 = zz(i + 1, j, k);
+                RDouble z3 = zz(i,     j, k + 1);
+                RDouble z4 = zz(i + 1, j, k + 1);
+                
+                xfaceJ(i, j, k) = 0.25 * (x1 + x2 + x3 + x4);
+                yfaceJ(i, j, k) = 0.25 * (y1 + y2 + y3 + y4);
+                zfaceJ(i, j, k) = 0.25 * (z1 + z2 + z3 + z4);
+            }
+        }
+    }
+
+    for (int j = 1; j <= nj - 1; ++ j)
+    {
+        for (int i = 1; i <= ni - 1; ++ i)
+        {
+            for (int k = -1; k <= nk + 2; ++ k)
+            {
+                RDouble x1 = xx(i,     j,     k);
+                RDouble x2 = xx(i + 1, j,     k);
+                RDouble x3 = xx(i,     j + 1, k);
+                RDouble x4 = xx(i + 1, j + 1, k);
+
+                RDouble y1 = yy(i,     j,     k);
+                RDouble y2 = yy(i + 1, j,     k);
+                RDouble y3 = yy(i,     j + 1, k);
+                RDouble y4 = yy(i + 1, j + 1, k);
+
+                RDouble z1 = zz(i,     j,     k);
+                RDouble z2 = zz(i + 1, j,     k);
+                RDouble z3 = zz(i,     j + 1, k);
+                RDouble z4 = zz(i + 1, j + 1, k);
+                
+                xfaceK(i, j, k) = 0.25 * (x1 + x2 + x3 + x4);
+                yfaceK(i, j, k) = 0.25 * (y1 + y2 + y3 + y4);
+                zfaceK(i, j, k) = 0.25 * (z1 + z2 + z3 + z4);
+            }
+        }
+    }
+
+    int ZoneID = this->GetZoneID();
+    std::ostringstream oss;
+    for (int k = 1; k <= nk - 1; ++ k)
+    {
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            for (int i = 1; i <= ni - 1; ++ i)
+            {
+                RDouble vol_kxi, vol_eta, vol_cta;
+
+                RDouble kxi_CL2 = half * (xfaceI(i - 1, j, k) + xfaceI(i - 2, j, k)) * Cellxfv(i - 2, j, k, 1) + half * (yfaceI(i - 1, j, k) + yfaceI(i - 2, j, k)) * Cellyfv(i - 2, j, k, 1) + half * (zfaceI(i - 1, j, k) + zfaceI(i - 2, j, k)) * Cellzfv(i - 2, j, k, 1);
+                RDouble kxi_CL1 = half * (xfaceI(i    , j, k) + xfaceI(i - 1, j, k)) * Cellxfv(i - 1, j, k, 1) + half * (yfaceI(i    , j, k) + yfaceI(i - 1, j, k)) * Cellyfv(i - 1, j, k, 1) + half * (zfaceI(i    , j, k) + zfaceI(i - 1, j, k)) * Cellzfv(i - 1, j, k, 1);
+                RDouble kxi_fL  = half * (xfaceI(i    , j, k) + xfaceI(i    , j, k)) *     xfv(i    , j, k, 1) + half * (yfaceI(i    , j, k) + yfaceI(i    , j, k)) *     yfv(i    , j, k, 1) + half * (zfaceI(i    , j, k) + zfaceI(i    , j, k)) *     zfv(i    , j, k, 1);
+                RDouble kxi_fR  = half * (xfaceI(i + 1, j, k) + xfaceI(i + 1, j, k)) *     xfv(i + 1, j, k, 1) + half * (yfaceI(i + 1, j, k) + yfaceI(i + 1, j, k)) *     yfv(i + 1, j, k, 1) + half * (zfaceI(i + 1, j, k) + zfaceI(i + 1, j, k)) *     zfv(i + 1, j, k, 1);
+                RDouble kxi_CR1 = half * (xfaceI(i + 1, j, k) + xfaceI(i + 2, j, k)) * Cellxfv(i + 1, j, k, 1) + half * (yfaceI(i + 1, j, k) + yfaceI(i + 2, j, k)) * Cellyfv(i + 1, j, k, 1) + half * (zfaceI(i + 1, j, k) + zfaceI(i + 2, j, k)) * Cellzfv(i + 1, j, k, 1);
+                RDouble kxi_CR2 = half * (xfaceI(i + 2, j, k) + xfaceI(i + 3, j, k)) * Cellxfv(i + 2, j, k, 1) + half * (yfaceI(i + 2, j, k) + yfaceI(i + 3, j, k)) * Cellyfv(i + 2, j, k, 1) + half * (zfaceI(i + 2, j, k) + zfaceI(i + 3, j, k)) * Cellzfv(i + 2, j, k, 1);
+                
+                vol_kxi = alfa_sixth * (kxi_fR - kxi_fL) + a_sixth * (kxi_CR1 - kxi_CL1) + b_sixth * (kxi_CR2 - kxi_CL2);
+
+                RDouble eta_CL2 = half * (xfaceJ(i, j - 1, k) + xfaceJ(i, j - 2, k)) * Cellxfv(i, j - 2, k, 2) + half * (yfaceJ(i, j - 1, k) + yfaceJ(i, j - 2, k)) * Cellyfv(i, j - 2, k, 2) + half * (zfaceJ(i, j - 1, k) + zfaceJ(i, j - 2, k)) * Cellzfv(i, j - 2, k, 2);
+                RDouble eta_CL1 = half * (xfaceJ(i, j    , k) + xfaceJ(i, j - 1, k)) * Cellxfv(i, j - 1, k, 2) + half * (yfaceJ(i, j    , k) + yfaceJ(i, j - 1, k)) * Cellyfv(i, j - 1, k, 2) + half * (zfaceJ(i, j    , k) + zfaceJ(i, j - 1, k)) * Cellzfv(i, j - 1, k, 2);
+                RDouble eta_fL  = half * (xfaceJ(i, j    , k) + xfaceJ(i, j    , k)) *     xfv(i, j    , k, 2) + half * (yfaceJ(i, j    , k) + yfaceJ(i, j    , k)) *     yfv(i, j    , k, 2) + half * (zfaceJ(i, j    , k) + zfaceJ(i, j    , k)) *     zfv(i, j    , k, 2);
+                RDouble eta_fR  = half * (xfaceJ(i, j + 1, k) + xfaceJ(i, j + 1, k)) *     xfv(i, j + 1, k, 2) + half * (yfaceJ(i, j + 1, k) + yfaceJ(i, j + 1, k)) *     yfv(i, j + 1, k, 2) + half * (zfaceJ(i, j + 1, k) + zfaceJ(i, j + 1, k)) *     zfv(i, j + 1, k, 2);
+                RDouble eta_CR1 = half * (xfaceJ(i, j + 1, k) + xfaceJ(i, j + 2, k)) * Cellxfv(i, j + 1, k, 2) + half * (yfaceJ(i, j + 1, k) + yfaceJ(i, j + 2, k)) * Cellyfv(i, j + 1, k, 2) + half * (zfaceJ(i, j + 1, k) + zfaceJ(i, j + 2, k)) * Cellzfv(i, j + 1, k, 2);
+                RDouble eta_CR2 = half * (xfaceJ(i, j + 2, k) + xfaceJ(i, j + 3, k)) * Cellxfv(i, j + 2, k, 2) + half * (yfaceJ(i, j + 2, k) + yfaceJ(i, j + 3, k)) * Cellyfv(i, j + 2, k, 2) + half * (zfaceJ(i, j + 2, k) + zfaceJ(i, j + 3, k)) * Cellzfv(i, j + 2, k, 2);
+                
+                vol_eta = alfa_sixth * (eta_fR - eta_fL) + a_sixth * (eta_CR1 - eta_CL1) + b_sixth * (eta_CR2 - eta_CL2);
+                
+                RDouble cta_CL2 = half * (xfaceK(i, j, k - 1) + xfaceK(i, j, k - 2)) * Cellxfv(i, j, k - 2, 3) + half * (yfaceK(i, j, k - 1) + yfaceK(i, j, k - 2)) * Cellyfv(i, j, k - 2, 3) + half * (zfaceK(i, j, k - 1) + zfaceK(i, j, k - 2)) * Cellzfv(i, j, k - 2, 3);
+                RDouble cta_CL1 = half * (xfaceK(i, j, k   ) + xfaceK(i, j, k - 1)) * Cellxfv(i, j, k - 1, 3) + half * (yfaceK(i, j, k   ) + yfaceK(i, j, k - 1)) * Cellyfv(i, j, k - 1, 3) + half * (zfaceK(i, j, k   ) + zfaceK(i, j, k - 1)) * Cellzfv(i, j, k - 1, 3);
+                RDouble cta_fL  = half * (xfaceK(i, j, k   ) + xfaceK(i, j, k   )) *     xfv(i, j, k    , 3) + half * (yfaceK(i, j, k   ) + yfaceK(i, j, k   )) *     yfv(i, j, k    , 3) + half * (zfaceK(i, j, k   ) + zfaceK(i, j, k   )) *     zfv(i, j, k    , 3);
+                RDouble cta_fR  = half * (xfaceK(i, j, k + 1) + xfaceK(i, j, k + 1)) *     xfv(i, j, k + 1, 3) + half * (yfaceK(i, j, k + 1) + yfaceK(i, j, k + 1)) *     yfv(i, j, k + 1, 3) + half * (zfaceK(i, j, k + 1) + zfaceK(i, j, k + 1)) *     zfv(i, j, k + 1, 3);
+                RDouble cta_CR1 = half * (xfaceK(i, j, k + 1) + xfaceK(i, j, k + 2)) * Cellxfv(i, j, k + 1, 3) + half * (yfaceK(i, j, k + 1) + yfaceK(i, j, k + 2)) * Cellyfv(i, j, k + 1, 3) + half * (zfaceK(i, j, k + 1) + zfaceK(i, j, k + 2)) * Cellzfv(i, j, k + 1, 3);
+                RDouble cta_CR2 = half * (xfaceK(i, j, k + 2) + xfaceK(i, j, k + 3)) * Cellxfv(i, j, k + 2, 3) + half * (yfaceK(i, j, k + 2) + yfaceK(i, j, k + 3)) * Cellyfv(i, j, k + 2, 3) + half * (zfaceK(i, j, k + 2) + zfaceK(i, j, k + 3)) * Cellzfv(i, j, k + 2, 3);
+                
+                vol_cta = alfa_sixth * (cta_fR - cta_fL) + a_sixth * (cta_CR1 - cta_CL1) + b_sixth * (cta_CR2 - cta_CL2);
+                
+                RDouble vol_FD = (vol_kxi + vol_eta + vol_cta) / 3.0;
+
+                if(vol_FD < SMALL)
+                {
+                    oss << " vol < 0 " << " ZoneID = " << ZoneID << " i = " << i << " j = " << j << " vol = " << vol_FD << "\n";
+                }
+                //!RDouble vol_FV = vol(i, j, k);
+                //!
+                //!if (vol_FD <= zero || vol_FD > 1.2 * vol_FV || vol_FD < 0.8 * vol_FV)
+                //!{
+                //!    vol_FD = vol_FV;
+                //!}
+                vol(i ,j ,k) = vol_FD;
+            }
+        }
+    }
+
+    delete &xfaceI;
+    delete &yfaceI;
+    delete &zfaceI;
+
+    delete &xfaceJ;
+    delete &yfaceJ;
+    delete &zfaceJ;
+
+    delete &xfaceK;
+    delete &yfaceK;
+    delete &zfaceK;
+
+    //!=
+    ComputeCellCenter();
+}
+
+void StructGrid::GhostMetricsStructHighOrder2D()
+{
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+
+    RDouble3D &vol  = *(this->GetCellVolume());
+    RDouble3D &xcc = *(this->GetCellCenterX());
+    RDouble3D &ycc = *(this->GetCellCenterY());
+    RDouble3D &zcc = *(this->GetCellCenterZ());
+
+    const int k = 1;
+
+    for(int layer = 1; layer <= 4; ++layer)
+    {
+        for(int j = 1; j <= nj - 1; ++j)
+        {
+            vol(    1 - layer, j, k) = vol(    layer, j, k);
+            vol(ni - 1 + layer, j, k) = vol(ni - layer, j, k);
+
+            int nsurf = 1;
+            RDouble xfc, yfc, zfc;
+
+            FaceCoor(1, j, k, nsurf, xfc, yfc, zfc);            
+            xcc(1-layer,j,k) = two * xfc - xcc(layer,j,k);
+            ycc(1-layer,j,k) = two * yfc - ycc(layer,j,k);
+            zcc(1-layer,j,k) = two * zfc - zcc(layer,j,k);
+
+            
+            FaceCoor(ni, j, k, nsurf, xfc, yfc, zfc);            
+            xcc(ni-1+layer,j,k) = two * xfc - xcc(ni-layer,j,k);
+            ycc(ni-1+layer,j,k) = two * yfc - ycc(ni-layer,j,k);
+            zcc(ni-1+layer,j,k) = two * zfc - zcc(ni-layer,j,k);
+        }
+
+        for(int i = 1; i <= ni - 1; ++i)
+        {
+            vol(i,      1 - layer, k) = vol(i,      layer, k);
+            vol(i, nj - 1 + layer, k) = vol(i, nj - layer, k);
+
+            int nsurf = 2;
+            RDouble xfc, yfc, zfc;
+
+            FaceCoor(i, 1, k, nsurf, xfc, yfc, zfc);            
+            xcc(i,1-layer,k) = two * xfc - xcc(i,layer,k);
+            ycc(i,1-layer,k) = two * yfc - ycc(i,layer,k);
+            zcc(i,1-layer,k) = two * zfc - zcc(i,layer,k);
+
+            
+            FaceCoor(i, nj, k, nsurf, xfc, yfc, zfc);            
+            xcc(i,nj-1+layer,k) = two * xfc - xcc(i,nj-layer,k);
+            ycc(i,nj-1+layer,k) = two * yfc - ycc(i,nj-layer,k);
+            zcc(i,nj-1+layer,k) = two * zfc - zcc(i,nj-layer,k);
+        }
+    }    
+}
+
+void StructGrid::GhostMetricsStructHighOrder3D()
+{
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    RDouble3D &vol  = *(this->GetCellVolume());
+    RDouble3D &xcc = *(this->GetCellCenterX());
+    RDouble3D &ycc = *(this->GetCellCenterY());
+    RDouble3D &zcc = *(this->GetCellCenterZ());
+    
+    for(int layer = 1; layer <= 4; ++layer)
+    {
+        for(int k = 1; k <= nk - 1; ++k)
+        {
+            for(int j = 1; j <= nj - 1; ++j)
+            {
+                vol(    1 - layer, j, k) = vol(    layer, j, k);
+                vol(ni - 1 + layer, j, k) = vol(ni - layer, j, k);
+                
+                int nsurf = 1;
+                RDouble xfc, yfc, zfc;
+                
+                FaceCoor(1, j, k, nsurf, xfc, yfc, zfc); 
+                xcc(1-layer,j,k) = two * xfc - xcc(layer,j,k);
+                ycc(1-layer,j,k) = two * yfc - ycc(layer,j,k);
+                zcc(1-layer,j,k) = two * zfc - zcc(layer,j,k);
+                
+                FaceCoor(ni, j, k, nsurf, xfc, yfc, zfc);
+                xcc(ni-1+layer,j,k) = two * xfc - xcc(ni-layer,j,k);
+                ycc(ni-1+layer,j,k) = two * yfc - ycc(ni-layer,j,k);
+                zcc(ni-1+layer,j,k) = two * zfc - zcc(ni-layer,j,k);
+            }
+        }
+        
+        for(int k = 1; k <= nk - 1; ++k)
+        {
+            for(int i = 1; i <= ni - 1; ++i)
+            {
+                vol(i,      1 - layer, k) = vol(i,      layer, k);
+                vol(i, nj - 1 + layer, k) = vol(i, nj - layer, k);
+                
+                int nsurf = 2;
+                RDouble xfc, yfc, zfc;
+                
+                FaceCoor(i, 1, k, nsurf, xfc, yfc, zfc);
+                xcc(i,1-layer,k) = two * xfc - xcc(i,layer,k);
+                ycc(i,1-layer,k) = two * yfc - ycc(i,layer,k);
+                zcc(i,1-layer,k) = two * zfc - zcc(i,layer,k);
+                
+                FaceCoor(i, nj, k, nsurf, xfc, yfc, zfc);
+                xcc(i,nj-1+layer,k) = two * xfc - xcc(i,nj-layer,k);
+                ycc(i,nj-1+layer,k) = two * yfc - ycc(i,nj-layer,k);
+                zcc(i,nj-1+layer,k) = two * zfc - zcc(i,nj-layer,k);
+            }
+        }
+
+        for(int j = 1; j <= nj - 1; ++j)
+        {
+            for(int i = 1; i <= ni - 1; ++i)
+            {
+                vol(i, j,      1 - layer) = vol(i, j,      layer);
+                vol(i, j, nk - 1 + layer) = vol(i, j, nk - layer);
+                
+                int nsurf = 3;
+                RDouble xfc, yfc, zfc;
+                
+                FaceCoor(i, j, 1, nsurf, xfc, yfc, zfc);
+                xcc(i,j,1-layer) = two * xfc - xcc(i,j,layer);
+                ycc(i,j,1-layer) = two * yfc - ycc(i,j,layer);
+                zcc(i,j,1-layer) = two * zfc - zcc(i,j,layer);
+                
+                FaceCoor(i, j, nk, nsurf, xfc, yfc, zfc);
+                xcc(i,j,nk-1+layer) = two * xfc - xcc(i,j,nk-layer);
+                ycc(i,j,nk-1+layer) = two * yfc - ycc(i,j,nk-layer);
+                zcc(i,j,nk-1+layer) = two * zfc - zcc(i,j,nk-layer);
+            }
+        }
+        
+    }    
+}
+
+void StructGrid::InitialDiffOrderforStructHighOrder()
+{
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    DiscretePrecisionKXI = new Int1D(Range(-1, ni + 1), fortranArray);
+    DiscretePrecisionETA = new Int1D(Range(-1, nj + 1), fortranArray);
+    DiscretePrecisionCTA = new Int1D(Range(-1, nk + 1), fortranArray);
+    
+    for(int i = -1; i <= ni + 1; ++ i)
+    {
+        (*DiscretePrecisionKXI)(i) = 4;
+    }
+
+    for(int j = -1; j <= nj + 1; ++ j)
+    {
+        (*DiscretePrecisionETA)(j) = 4;
+    }
+
+    for(int k = -1; k <= nk + 1; ++ k)
+    {
+        (*DiscretePrecisionCTA)(k) = 4;
+    }
+
+    const RDouble LowerValue = cos(15.0 / 180.0 * PI);
+
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+
+    StructBCSet *structBCSet = this->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = bcregion->GetBCType();
+        int nsurf_bc = bcregion->GetFaceDirection() + 1;
+        if (IsInterface(BCType))
+        {
+            continue;
+        }
+        int ist, ied, jst, jed, kst, ked;
+        bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+        
+        int *s_lr3d = bcregion->GetFaceDirectionIndex();  
+        int id, jd, kd;
+        GetBCFaceIDX(s_lr3d, id, jd, kd);
+        if(nsurf_bc == 1)
+        {
+            if (id + jd + kd == 0)
+            {
+                (*DiscretePrecisionKXI)(-1) = 2;
+                (*DiscretePrecisionKXI)(0) = 2;
+                (*DiscretePrecisionKXI)(1) = 2;
+            }
+            else
+            {
+                (*DiscretePrecisionKXI)(ni - 1) = 2;
+                (*DiscretePrecisionKXI)(ni   ) = 2;
+                (*DiscretePrecisionKXI)(ni + 1) = 2;
+            } 
+        }
+        else if(nsurf_bc == 2)
+        {
+            if (id + jd + kd == 0)
+            {
+                (*DiscretePrecisionETA)(-1) = 2;
+                (*DiscretePrecisionETA)(0) = 2;
+                (*DiscretePrecisionETA)(1) = 2;
+            }
+            else
+            {
+                (*DiscretePrecisionETA)(nj - 1) = 2;
+                (*DiscretePrecisionETA)(nj   ) = 2;
+                (*DiscretePrecisionETA)(nj + 1) = 2;
+            } 
+        }
+        else
+        {
+            if (id + jd + kd == 0)
+            {
+                (*DiscretePrecisionCTA)(-1) = 2;
+                (*DiscretePrecisionCTA)(0) = 2;
+                (*DiscretePrecisionCTA)(1) = 2;
+            }
+            else
+            {
+                (*DiscretePrecisionCTA)(nk - 1) = 2;
+                (*DiscretePrecisionCTA)(nk   ) = 2;
+                (*DiscretePrecisionCTA)(nk + 1) = 2;
+            } 
+        }          
+    }    
+
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni;
+    int jed = nj;
+    int ked = nk;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for(int i = ist; i <= ied; ++ i)
+            {
+                RDouble ax = - xx(i - 1, j, k) + xx(i    , j, k);
+                RDouble ay = - yy(i - 1, j, k) + yy(i    , j, k);
+                RDouble az = - zz(i - 1, j, k) + zz(i    , j, k);
+                RDouble bx = - xx(i    , j, k) + xx(i + 1, j, k);
+                RDouble by = - yy(i    , j, k) + yy(i + 1, j, k);
+                RDouble bz = - zz(i    , j, k) + zz(i + 1, j, k);
+
+                RDouble la = sqrt(ax * ax + ay * ay + az * az);
+                RDouble lb = sqrt(bx * bx + by * by + bz * bz);                
+                RDouble ab = ax * bx + ay * by + az * bz;
+                
+                if (ab < la * lb * LowerValue)
+                {
+                    (*DiscretePrecisionKXI)(i - 1) = 2;
+                    (*DiscretePrecisionKXI)(i   ) = 2;
+                }
+            }            
+        }
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for(int i = ist; i <= ied; ++ i)
+            {
+                RDouble ax = - xx(i, j - 1, k) + xx(i, j    , k);
+                RDouble ay = - yy(i, j - 1, k) + yy(i, j    , k);
+                RDouble az = - zz(i, j - 1, k) + zz(i, j    , k);
+                RDouble bx = - xx(i, j    , k) + xx(i, j + 1, k);
+                RDouble by = - yy(i, j    , k) + yy(i, j + 1, k);
+                RDouble bz = - zz(i, j    , k) + zz(i, j + 1, k);
+
+                RDouble la = sqrt(ax * ax + ay * ay + az * az);
+                RDouble lb = sqrt(bx * bx + by * by + bz * bz);                
+                RDouble ab = ax * bx + ay * by + az * bz;
+                
+                if (ab < la * lb * LowerValue)
+                {
+                    (*DiscretePrecisionETA)(j - 1) = 2;
+                    (*DiscretePrecisionETA)(j   ) = 2;
+                }
+            }            
+        }
+    }
+    
+    if (nk == 1)
+    {
+        return;
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for(int i = ist; i <= ied; ++ i)
+            {
+                RDouble ax = - xx(i, j, k - 1) + xx(i, j, k   );
+                RDouble ay = - yy(i, j, k - 1) + yy(i, j, k   );
+                RDouble az = - zz(i, j, k - 1) + zz(i, j, k   );
+                RDouble bx = - xx(i, j, k   ) + xx(i, j, k + 1);
+                RDouble by = - yy(i, j, k   ) + yy(i, j, k + 1);
+                RDouble bz = - zz(i, j, k   ) + zz(i, j, k + 1);
+
+                RDouble la = sqrt(ax * ax + ay * ay + az * az);
+                RDouble lb = sqrt(bx * bx + by * by + bz * bz);                
+                RDouble ab = ax * bx + ay * by + az * bz;
+                
+                if (ab < la * lb * LowerValue)
+                {
+                    (*DiscretePrecisionCTA)(k - 1) = 2;
+                    (*DiscretePrecisionCTA)(k   ) = 2;
+                }
+            }            
+        }
+    }    
+}
+
+void StructGrid::CorrectDiffOrderNearUnstructBlockforStructHighOrder(const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+        
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+
+        for (int layer = 1; layer <= 1; ++ layer)
+        {            
+            int id, jd, kd;
+            int i_lr, j_lr, k_lr;
+            finestGrid->GetTargetIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+            if (i_lr != 0)
+            {
+                //! I_face
+                if (i_lr == -1)
+                {
+                    //! left boundary     
+                    (*DiscretePrecisionKXI)(-1) = 2;
+                    (*DiscretePrecisionKXI)(0) = 2;
+                    (*DiscretePrecisionKXI)(1) = 2;
+                }
+                else
+                {
+                    //! right boundary
+                    (*DiscretePrecisionKXI)(ni - 1) = 2;
+                    (*DiscretePrecisionKXI)(ni   ) = 2;
+                    (*DiscretePrecisionKXI)(ni + 1) = 2;
+                }
+            }
+            else if (j_lr != 0)
+            {
+                //! J_face
+                if (j_lr == -1)
+                {
+                    //! left boundary                    
+                    (*DiscretePrecisionETA)(-1) = 2;
+                    (*DiscretePrecisionETA)(0) = 2;
+                    (*DiscretePrecisionETA)(1) = 2;
+                }
+                else
+                {
+                    //! right boundary
+                    (*DiscretePrecisionETA)(nj - 1) = 2;
+                    (*DiscretePrecisionETA)(nj   ) = 2;
+                    (*DiscretePrecisionETA)(nj + 1) = 2;
+                }
+            }
+            else
+            {
+                //! K_face
+                if (k_lr == -1)
+                {
+                    //! left boundary                    
+                    (*DiscretePrecisionCTA)(-1) = 2;
+                    (*DiscretePrecisionCTA)(0) = 2;
+                    (*DiscretePrecisionCTA)(1) = 2;
+                }
+                else
+                {
+                    //! right boundary
+                    (*DiscretePrecisionCTA)(nk - 1) = 2;
+                    (*DiscretePrecisionCTA)(nk   ) = 2;
+                    (*DiscretePrecisionCTA)(nk + 1) = 2;
+                }
+            }  
+        }
+    }  
+}
+
+void StructGrid::ComputeMetricsWithBCforStructHighOrder()
+{
+    if (GetDim() == 2)
+    {
+        ComputeMetricsWithBCforStructHighOrder2D();
+    }
+    else
+    {
+        ComputeMetricsWithBCforStructHighOrder3D();
+    }
+}
+
+void StructGrid::ComputeMetricsWithBCforStructHighOrder2D()
+{
+    RDouble4D &xfn  = *(this->GetFaceNormalX());
+    RDouble4D &yfn  = *(this->GetFaceNormalY());
+    RDouble4D &zfn  = *(this->GetFaceNormalZ());
+    RDouble4D &area = *(this->GetFaceArea());
+    RDouble4D &xfv  = *(this->GetFaceVectorX());
+    RDouble4D &yfv  = *(this->GetFaceVectorY());
+    RDouble4D &zfv  = *(this->GetFaceVectorZ());
+
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+
+    zfn = 0.0;
+    zfv = 0.0;
+
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    const int k = 1;
+    
+    for (int i = 1; i <= ni; ++ i)
+    {
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            RDouble xeta, yeta;
+
+            RDouble x0 = xx(i, j - 1, k);
+            RDouble x1 = xx(i, j,     k);
+            RDouble x2 = xx(i, j + 1, k);
+            RDouble x3 = xx(i, j + 2, k);
+
+            RDouble y0 = yy(i, j - 1, k);
+            RDouble y1 = yy(i, j,     k);
+            RDouble y2 = yy(i, j + 1, k);
+            RDouble y3 = yy(i, j + 2, k);
+
+            if ((*DiscretePrecisionETA)(j) == 2)
+            {
+                xeta = (x2 - x1);
+                yeta = (y2 - y1);
+            }
+            else
+            {
+                xeta = (27.0 * (x2 - x1) - (x3 - x0)) / 24.0;
+                yeta = (27.0 * (y2 - y1) - (y3 - y0)) / 24.0;
+            }
+            
+            RDouble ds = sqrt(xeta * xeta + yeta * yeta);
+
+            xfv(i, j, k, 1) =   yeta;
+            yfv(i, j, k, 1) = - xeta;
+
+            area(i, j, k, 1) = ds;
+
+            xfn(i, j, k, 1) =   yeta / (ds + TINY);
+            yfn(i, j, k, 1) = - xeta / (ds + TINY);
+        }
+    }
+
+    for (int j = 1; j <= nj; ++ j)
+    {
+        for (int i = 1; i <= ni - 1; ++ i)
+        {
+            RDouble xkxi, ykxi;
+
+            RDouble x0 = xx(i - 1, j, k);
+            RDouble x1 = xx(i,     j, k);
+            RDouble x2 = xx(i + 1, j, k);
+            RDouble x3 = xx(i + 2, j, k);
+
+            RDouble y0 = yy(i - 1, j, k);
+            RDouble y1 = yy(i,     j, k);
+            RDouble y2 = yy(i + 1, j, k);
+            RDouble y3 = yy(i + 2, j, k);
+
+            if ((*DiscretePrecisionKXI)(i) == 2)
+            {
+                xkxi = (x2 - x1);
+                ykxi = (y2 - y1);
+            }
+            else
+            {
+                xkxi = (27.0 * (x2 - x1) - (x3 - x0)) / 24.0;
+                ykxi = (27.0 * (y2 - y1) - (y3 - y0)) / 24.0;
+            }
+            
+            RDouble ds = sqrt(xkxi * xkxi + ykxi * ykxi);
+
+            xfv(i, j, k, 2) = - ykxi;
+            yfv(i, j, k, 2) =   xkxi;
+
+            area(i, j, k, 2) = ds;
+
+            xfn(i, j, k, 2) = - ykxi / (ds + TINY);
+            yfn(i, j, k, 2) =   xkxi / (ds + TINY);
+        }        
+    }
+
+    //! BC metrics
+    //! interior BC would be replaced in the next function CommPartofMetrics_FD.
+    GhostMetrics2D();
+}
+
+void StructGrid::ComputeMetricsWithBCforStructHighOrder3D()
+{
+    RDouble4D &xfn  = *(this->GetFaceNormalX());
+    RDouble4D &yfn  = *(this->GetFaceNormalY());
+    RDouble4D &zfn  = *(this->GetFaceNormalZ());
+    RDouble4D &area = *(this->GetFaceArea());
+    RDouble4D &xfv  = *(this->GetFaceVectorX());
+    RDouble4D &yfv  = *(this->GetFaceVectorY());
+    RDouble4D &zfv  = *(this->GetFaceVectorZ());
+
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();  
+    RDouble3D &xA    = *new RDouble3D(Range(1, ni - 1), Range(0, nj + 1), Range(0, nk + 1), fortranArray);
+    RDouble3D &yA    = *new RDouble3D(Range(1, ni - 1), Range(0, nj + 1), Range(0, nk + 1), fortranArray);
+    RDouble3D &zA    = *new RDouble3D(Range(1, ni - 1), Range(0, nj + 1), Range(0, nk + 1), fortranArray);
+    RDouble3D &xkxi = *new RDouble3D(Range(1, ni - 1), Range(0, nj + 1), Range(0, nk + 1), fortranArray);
+    RDouble3D &ykxi = *new RDouble3D(Range(1, ni - 1), Range(0, nj + 1), Range(0, nk + 1), fortranArray);
+    RDouble3D &zkxi = *new RDouble3D(Range(1, ni - 1), Range(0, nj + 1), Range(0, nk + 1), fortranArray);
+
+    RDouble3D &xB    = *new RDouble3D(Range(0, ni + 1), Range(1, nj - 1), Range(0, nk + 1), fortranArray);
+    RDouble3D &yB    = *new RDouble3D(Range(0, ni + 1), Range(1, nj - 1), Range(0, nk + 1), fortranArray);
+    RDouble3D &zB    = *new RDouble3D(Range(0, ni + 1), Range(1, nj - 1), Range(0, nk + 1), fortranArray);
+    RDouble3D &xeta = *new RDouble3D(Range(0, ni + 1), Range(1, nj - 1), Range(0, nk + 1), fortranArray);
+    RDouble3D &yeta = *new RDouble3D(Range(0, ni + 1), Range(1, nj - 1), Range(0, nk + 1), fortranArray);
+    RDouble3D &zeta = *new RDouble3D(Range(0, ni + 1), Range(1, nj - 1), Range(0, nk + 1), fortranArray);
+
+    RDouble3D &xC    = *new RDouble3D(Range(0, ni + 1), Range(0, nj + 1), Range(1, nk - 1), fortranArray);
+    RDouble3D &yC    = *new RDouble3D(Range(0, ni + 1), Range(0, nj + 1), Range(1, nk - 1), fortranArray);
+    RDouble3D &zC    = *new RDouble3D(Range(0, ni + 1), Range(0, nj + 1), Range(1, nk - 1), fortranArray);
+    RDouble3D &xcta = *new RDouble3D(Range(0, ni + 1), Range(0, nj + 1), Range(1, nk - 1), fortranArray);
+    RDouble3D &ycta = *new RDouble3D(Range(0, ni + 1), Range(0, nj + 1), Range(1, nk - 1), fortranArray);
+    RDouble3D &zcta = *new RDouble3D(Range(0, ni + 1), Range(0, nj + 1), Range(1, nk - 1), fortranArray);
+    
+    int ibc[2];
+    int jbc[2];
+    int kbc[2];
+
+    ibc[0] = 0;
+    jbc[0] = 0;
+    kbc[0] = 0;
+    ibc[1] = ni + 1;
+    jbc[1] = nj + 1;
+    kbc[1] = nk + 1;   
+
+    for (int i = 1; i <= ni - 1; ++ i)
+    {
+        for (int j = 1; j <= nj; ++ j)
+        {
+            for (int k = 1; k <= nk; ++ k)
+            {
+                if ((*DiscretePrecisionKXI)(i) == 2)
+                {
+                    xA(i, j, k) = half * (xx(i + 1, j, k) + xx(i, j, k));
+                    yA(i, j, k) = half * (yy(i + 1, j, k) + yy(i, j, k));
+                    zA(i, j, k) = half * (zz(i + 1, j, k) + zz(i, j, k));
+                    
+                    xkxi(i, j, k) = xx(i + 1, j, k) - xx(i, j, k);
+                    ykxi(i, j, k) = yy(i + 1, j, k) - yy(i, j, k);
+                    zkxi(i, j, k) = zz(i + 1, j, k) - zz(i, j, k);
+                }
+                else
+                {
+                    xA(i, j, k) = half * (xx(i + 1, j, k) + xx(i, j, k));
+                    yA(i, j, k) = half * (yy(i + 1, j, k) + yy(i, j, k));
+                    zA(i, j, k) = half * (zz(i + 1, j, k) + zz(i, j, k));
+                    
+                    xkxi(i, j, k) = (27.0 * (xx(i + 1, j, k) - xx(i, j, k)) - (xx(i + 2, j, k) - xx(i - 1, j, k))) / 24.0;
+                    ykxi(i, j, k) = (27.0 * (yy(i + 1, j, k) - yy(i, j, k)) - (yy(i + 2, j, k) - yy(i - 1, j, k))) / 24.0;
+                    zkxi(i, j, k) = (27.0 * (zz(i + 1, j, k) - zz(i, j, k)) - (zz(i + 2, j, k) - zz(i - 1, j, k))) / 24.0;
+                }                
+            }
+        }
+        for (int bcindex = 0; bcindex <= 1; ++ bcindex)
+        {
+            int j = jbc[bcindex];
+            for (int k = 1; k <= nk; ++ k)
+            {
+                if ((*DiscretePrecisionKXI)(i) == 2)
+                {
+                    xA(i, j, k) = half * (xx(i + 1, j, k) + xx(i, j, k));
+                    yA(i, j, k) = half * (yy(i + 1, j, k) + yy(i, j, k));
+                    zA(i, j, k) = half * (zz(i + 1, j, k) + zz(i, j, k));
+                    
+                    xkxi(i, j, k) = xx(i + 1, j, k) - xx(i, j, k);
+                    ykxi(i, j, k) = yy(i + 1, j, k) - yy(i, j, k);
+                    zkxi(i, j, k) = zz(i + 1, j, k) - zz(i, j, k);
+                }
+                else
+                {
+                    xA(i, j, k) = half * (xx(i + 1, j, k) + xx(i, j, k));
+                    yA(i, j, k) = half * (yy(i + 1, j, k) + yy(i, j, k));
+                    zA(i, j, k) = half * (zz(i + 1, j, k) + zz(i, j, k));
+                    
+                    xkxi(i, j, k) = (27.0 * (xx(i + 1, j, k) - xx(i, j, k)) - (xx(i + 2, j, k) - xx(i - 1, j, k))) / 24.0;
+                    ykxi(i, j, k) = (27.0 * (yy(i + 1, j, k) - yy(i, j, k)) - (yy(i + 2, j, k) - yy(i - 1, j, k))) / 24.0;
+                    zkxi(i, j, k) = (27.0 * (zz(i + 1, j, k) - zz(i, j, k)) - (zz(i + 2, j, k) - zz(i - 1, j, k))) / 24.0;
+                }  
+            }
+        }
+        for (int bcindex = 0; bcindex <= 1; ++bcindex)
+        {
+            int k = kbc[bcindex];
+            for (int j = 1; j <= nj; ++ j)
+            {
+                if ((*DiscretePrecisionKXI)(i) == 2)
+                {
+                    xA(i, j, k) = half * (xx(i + 1, j, k) + xx(i, j, k));
+                    yA(i, j, k) = half * (yy(i + 1, j, k) + yy(i, j, k));
+                    zA(i, j, k) = half * (zz(i + 1, j, k) + zz(i, j, k));
+                    
+                    xkxi(i, j, k) = xx(i + 1, j, k) - xx(i, j, k);
+                    ykxi(i, j, k) = yy(i + 1, j, k) - yy(i, j, k);
+                    zkxi(i, j, k) = zz(i + 1, j, k) - zz(i, j, k);
+                }
+                else
+                {
+                    xA(i, j, k) = half * (xx(i + 1, j, k) + xx(i, j, k));
+                    yA(i, j, k) = half * (yy(i + 1, j, k) + yy(i, j, k));
+                    zA(i, j, k) = half * (zz(i + 1, j, k) + zz(i, j, k));
+                    
+                    xkxi(i, j, k) = (27.0 * (xx(i + 1, j, k) - xx(i, j, k)) - (xx(i + 2, j, k) - xx(i - 1, j, k))) / 24.0;
+                    ykxi(i, j, k) = (27.0 * (yy(i + 1, j, k) - yy(i, j, k)) - (yy(i + 2, j, k) - yy(i - 1, j, k))) / 24.0;
+                    zkxi(i, j, k) = (27.0 * (zz(i + 1, j, k) - zz(i, j, k)) - (zz(i + 2, j, k) - zz(i - 1, j, k))) / 24.0;
+                }  
+            }
+        }
+    }
+
+    for (int j = 1; j <= nj - 1; ++ j)
+    {
+        for (int k = 1; k <= nk; ++ k)
+        {
+            for (int i = 1; i <= ni; ++ i)
+            {
+                if ((*DiscretePrecisionETA)(j) == 2)
+                {
+                    xB(i, j, k) = half * (xx(i, j + 1, k) + xx(i, j, k));
+                    yB(i, j, k) = half * (yy(i, j + 1, k) + yy(i, j, k));
+                    zB(i, j, k) = half * (zz(i, j + 1, k) + zz(i, j, k));
+                    
+                    xeta(i, j, k) = xx(i, j + 1, k) - xx(i, j, k);
+                    yeta(i, j, k) = yy(i, j + 1, k) - yy(i, j, k);
+                    zeta(i, j, k) = zz(i, j + 1, k) - zz(i, j, k);
+                }
+                else
+                {
+                    xB(i, j, k) = half * (xx(i, j + 1, k) + xx(i, j, k));
+                    yB(i, j, k) = half * (yy(i, j + 1, k) + yy(i, j, k));
+                    zB(i, j, k) = half * (zz(i, j + 1, k) + zz(i, j, k));
+                    
+                    xeta(i, j, k) = (27.0 * (xx(i, j + 1, k) - xx(i, j, k)) - (xx(i, j + 2, k) - xx(i, j - 1, k))) / 24.0;
+                    yeta(i, j, k) = (27.0 * (yy(i, j + 1, k) - yy(i, j, k)) - (yy(i, j + 2, k) - yy(i, j - 1, k))) / 24.0;
+                    zeta(i, j, k) = (27.0 * (zz(i, j + 1, k) - zz(i, j, k)) - (zz(i, j + 2, k) - zz(i, j - 1, k))) / 24.0;
+                }                
+            }
+        }
+        for (int bcindex = 0; bcindex <= 1; ++bcindex)
+        {
+            int k = kbc[bcindex];
+            for (int i = 1; i <= ni; ++ i)
+            {
+                if ((*DiscretePrecisionETA)(j) == 2)
+                {
+                    xB(i, j, k) = half * (xx(i, j + 1, k) + xx(i, j, k));
+                    yB(i, j, k) = half * (yy(i, j + 1, k) + yy(i, j, k));
+                    zB(i, j, k) = half * (zz(i, j + 1, k) + zz(i, j, k));
+                    
+                    xeta(i, j, k) = xx(i, j + 1, k) - xx(i, j, k);
+                    yeta(i, j, k) = yy(i, j + 1, k) - yy(i, j, k);
+                    zeta(i, j, k) = zz(i, j + 1, k) - zz(i, j, k);
+                }
+                else
+                {
+                    xB(i, j, k) = half * (xx(i, j + 1, k) + xx(i, j, k));
+                    yB(i, j, k) = half * (yy(i, j + 1, k) + yy(i, j, k));
+                    zB(i, j, k) = half * (zz(i, j + 1, k) + zz(i, j, k));
+                    
+                    xeta(i, j, k) = (27.0 * (xx(i, j + 1, k) - xx(i, j, k)) - (xx(i, j + 2, k) - xx(i, j - 1, k))) / 24.0;
+                    yeta(i, j, k) = (27.0 * (yy(i, j + 1, k) - yy(i, j, k)) - (yy(i, j + 2, k) - yy(i, j - 1, k))) / 24.0;
+                    zeta(i, j, k) = (27.0 * (zz(i, j + 1, k) - zz(i, j, k)) - (zz(i, j + 2, k) - zz(i, j - 1, k))) / 24.0;
+                } 
+            }
+        }        
+        for (int bcindex = 0; bcindex <= 1; ++bcindex)
+        {
+            int i = ibc[bcindex];
+            for (int k = 1; k <= nk; ++ k)
+            {
+                if ((*DiscretePrecisionETA)(j) == 2)
+                {
+                    xB(i, j, k) = half * (xx(i, j + 1, k) + xx(i, j, k));
+                    yB(i, j, k) = half * (yy(i, j + 1, k) + yy(i, j, k));
+                    zB(i, j, k) = half * (zz(i, j + 1, k) + zz(i, j, k));
+                    
+                    xeta(i, j, k) = xx(i, j + 1, k) - xx(i, j, k);
+                    yeta(i, j, k) = yy(i, j + 1, k) - yy(i, j, k);
+                    zeta(i, j, k) = zz(i, j + 1, k) - zz(i, j, k);
+                }
+                else
+                {
+                    xB(i, j, k) = half * (xx(i, j + 1, k) + xx(i, j, k));
+                    yB(i, j, k) = half * (yy(i, j + 1, k) + yy(i, j, k));
+                    zB(i, j, k) = half * (zz(i, j + 1, k) + zz(i, j, k));
+                    
+                    xeta(i, j, k) = (27.0 * (xx(i, j + 1, k) - xx(i, j, k)) - (xx(i, j + 2, k) - xx(i, j - 1, k))) / 24.0;
+                    yeta(i, j, k) = (27.0 * (yy(i, j + 1, k) - yy(i, j, k)) - (yy(i, j + 2, k) - yy(i, j - 1, k))) / 24.0;
+                    zeta(i, j, k) = (27.0 * (zz(i, j + 1, k) - zz(i, j, k)) - (zz(i, j + 2, k) - zz(i, j - 1, k))) / 24.0;
+                } 
+            }
+        }
+    }
+    
+    for (int k = 1; k <= nk - 1; ++ k)
+    {
+        for (int i = 1; i <= ni; ++ i)
+        {
+            for (int j = 1; j <= nj; ++ j)
+            {
+                if ((*DiscretePrecisionCTA)(k) == 2)
+                {
+                    xC(i, j, k) = half * (xx(i, j, k + 1) + xx(i, j, k));
+                    yC(i, j, k) = half * (yy(i, j, k + 1) + yy(i, j, k));
+                    zC(i, j, k) = half * (zz(i, j, k + 1) + zz(i, j, k));
+                    
+                    xcta(i, j, k) = xx(i, j, k + 1) - xx(i, j, k);
+                    ycta(i, j, k) = yy(i, j, k + 1) - yy(i, j, k);
+                    zcta(i, j, k) = zz(i, j, k + 1) - zz(i, j, k);
+                }
+                else
+                {
+                    xC(i, j, k) = half * (xx(i, j, k + 1) + xx(i, j, k));
+                    yC(i, j, k) = half * (yy(i, j, k + 1) + yy(i, j, k));
+                    zC(i, j, k) = half * (zz(i, j, k + 1) + zz(i, j, k));
+                    
+                    xcta(i, j, k) = (27.0 * (xx(i, j, k + 1) - xx(i, j, k)) - (xx(i, j, k + 2) - xx(i, j, k - 1))) / 24.0;
+                    ycta(i, j, k) = (27.0 * (yy(i, j, k + 1) - yy(i, j, k)) - (yy(i, j, k + 2) - yy(i, j, k - 1))) / 24.0;
+                    zcta(i, j, k) = (27.0 * (zz(i, j, k + 1) - zz(i, j, k)) - (zz(i, j, k + 2) - zz(i, j, k - 1))) / 24.0;
+                }                
+            }
+        }
+        for (int bcindex = 0; bcindex <= 1; ++bcindex)
+        {
+            int i = ibc[bcindex];
+            for (int j = 1; j <= nj; ++ j)
+            {
+                if ((*DiscretePrecisionCTA)(k) == 2)
+                {
+                    xC(i, j, k) = half * (xx(i, j, k + 1) + xx(i, j, k));
+                    yC(i, j, k) = half * (yy(i, j, k + 1) + yy(i, j, k));
+                    zC(i, j, k) = half * (zz(i, j, k + 1) + zz(i, j, k));
+                    
+                    xcta(i, j, k) = xx(i, j, k + 1) - xx(i, j, k);
+                    ycta(i, j, k) = yy(i, j, k + 1) - yy(i, j, k);
+                    zcta(i, j, k) = zz(i, j, k + 1) - zz(i, j, k);
+                }
+                else
+                {
+                    xC(i, j, k) = half * (xx(i, j, k + 1) + xx(i, j, k));
+                    yC(i, j, k) = half * (yy(i, j, k + 1) + yy(i, j, k));
+                    zC(i, j, k) = half * (zz(i, j, k + 1) + zz(i, j, k));
+                    
+                    xcta(i, j, k) = (27.0 * (xx(i, j, k + 1) - xx(i, j, k)) - (xx(i, j, k + 2) - xx(i, j, k - 1))) / 24.0;
+                    ycta(i, j, k) = (27.0 * (yy(i, j, k + 1) - yy(i, j, k)) - (yy(i, j, k + 2) - yy(i, j, k - 1))) / 24.0;
+                    zcta(i, j, k) = (27.0 * (zz(i, j, k + 1) - zz(i, j, k)) - (zz(i, j, k + 2) - zz(i, j, k - 1))) / 24.0;
+                } 
+            }
+        }
+        for (int bcindex = 0; bcindex <= 1; ++bcindex)
+        {
+            int j = jbc[bcindex];
+            for (int i = 1; i <= ni; ++ i)
+            {
+                if ((*DiscretePrecisionCTA)(k) == 2)
+                {
+                    xC(i, j, k) = half * (xx(i, j, k + 1) + xx(i, j, k));
+                    yC(i, j, k) = half * (yy(i, j, k + 1) + yy(i, j, k));
+                    zC(i, j, k) = half * (zz(i, j, k + 1) + zz(i, j, k));
+                    
+                    xcta(i, j, k) = xx(i, j, k + 1) - xx(i, j, k);
+                    ycta(i, j, k) = yy(i, j, k + 1) - yy(i, j, k);
+                    zcta(i, j, k) = zz(i, j, k + 1) - zz(i, j, k);
+                }
+                else
+                {
+                    xC(i, j, k) = half * (xx(i, j, k + 1) + xx(i, j, k));
+                    yC(i, j, k) = half * (yy(i, j, k + 1) + yy(i, j, k));
+                    zC(i, j, k) = half * (zz(i, j, k + 1) + zz(i, j, k));
+                    
+                    xcta(i, j, k) = (27.0 * (xx(i, j, k + 1) - xx(i, j, k)) - (xx(i, j, k + 2) - xx(i, j, k - 1))) / 24.0;
+                    ycta(i, j, k) = (27.0 * (yy(i, j, k + 1) - yy(i, j, k)) - (yy(i, j, k + 2) - yy(i, j, k - 1))) / 24.0;
+                    zcta(i, j, k) = (27.0 * (zz(i, j, k + 1) - zz(i, j, k)) - (zz(i, j, k + 2) - zz(i, j, k - 1))) / 24.0;
+                } 
+            }
+        }
+    }
+
+    for (int k = 1; k <= nk - 1; ++ k)
+    {
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            for (int i = 1; i <= ni; ++ i)
+            {
+                RDouble sx0, sy0, sz0;
+                RDouble sx1, sy1, sz1;
+                RDouble sx2, sy2, sz2;
+                RDouble sx3, sy3, sz3;
+
+                RDouble KX = 0.0;
+                RDouble KY = 0.0;
+                RDouble KZ = 0.0;
+
+                sx0 = half * (yeta(i, j, k - 1) * zB(i, j, k - 1) - yB(i, j, k - 1) * zeta(i, j, k - 1));
+                sy0 = half * (zeta(i, j, k - 1) * xB(i, j, k - 1) - zB(i, j, k - 1) * xeta(i, j, k - 1));
+                sz0 = half * (xeta(i, j, k - 1) * yB(i, j, k - 1) - xB(i, j, k - 1) * yeta(i, j, k - 1));
+                sx1 = half * (yeta(i, j, k) * zB(i, j, k) - yB(i, j, k) * zeta(i, j, k));
+                sy1 = half * (zeta(i, j, k) * xB(i, j, k) - zB(i, j, k) * xeta(i, j, k));
+                sz1 = half * (xeta(i, j, k) * yB(i, j, k) - xB(i, j, k) * yeta(i, j, k));
+                sx2 = half * (yeta(i, j, k + 1) * zB(i, j, k + 1) - yB(i, j, k + 1) * zeta(i, j, k + 1));
+                sy2 = half * (zeta(i, j, k + 1) * xB(i, j, k + 1) - zB(i, j, k + 1) * xeta(i, j, k + 1));
+                sz2 = half * (xeta(i, j, k + 1) * yB(i, j, k + 1) - xB(i, j, k + 1) * yeta(i, j, k + 1));
+                sx3 = half * (yeta(i, j, k + 2) * zB(i, j, k + 2) - yB(i, j, k + 2) * zeta(i, j, k + 2));
+                sy3 = half * (zeta(i, j, k + 2) * xB(i, j, k + 2) - zB(i, j, k + 2) * xeta(i, j, k + 2));
+                sz3 = half * (xeta(i, j, k + 2) * yB(i, j, k + 2) - xB(i, j, k + 2) * yeta(i, j, k + 2));                
+
+                if ((*DiscretePrecisionCTA)(k) == 2)
+                {
+                    KX += (sx2 - sx1);
+                    KY += (sy2 - sy1);
+                    KZ += (sz2 - sz1);
+                }
+                else
+                {
+                    KX += (27.0 * (sx2 - sx1) - (sx3 - sx0)) / 24.0;
+                    KY += (27.0 * (sy2 - sy1) - (sy3 - sy0)) / 24.0;
+                    KZ += (27.0 * (sz2 - sz1) - (sz3 - sz0)) / 24.0;
+                } 
+                
+                sx0 = half * (yC(i, j - 1, k) * zcta(i, j - 1, k) - ycta(i, j - 1, k) * zC(i, j - 1, k));
+                sy0 = half * (zC(i, j - 1, k) * xcta(i, j - 1, k) - zcta(i, j - 1, k) * xC(i, j - 1, k));
+                sz0 = half * (xC(i, j - 1, k) * ycta(i, j - 1, k) - xcta(i, j - 1, k) * yC(i, j - 1, k));
+                sx1 = half * (yC(i, j,  k) * zcta(i, j,  k) - ycta(i, j, k) * zC(i, j, k));
+                sy1 = half * (zC(i, j,  k) * xcta(i, j,  k) - zcta(i, j, k) * xC(i, j, k));
+                sz1 = half * (xC(i, j,  k) * ycta(i, j,  k) - xcta(i, j, k) * yC(i, j, k));
+                sx2 = half * (yC(i, j + 1, k) * zcta(i, j + 1, k) - ycta(i, j + 1, k) * zC(i, j + 1, k));
+                sy2 = half * (zC(i, j + 1, k) * xcta(i, j + 1, k) - zcta(i, j + 1, k) * xC(i, j + 1, k));
+                sz2 = half * (xC(i, j + 1, k) * ycta(i, j + 1, k) - xcta(i, j + 1, k) * yC(i, j + 1, k));
+                sx3 = half * (yC(i, j + 2, k) * zcta(i, j + 2, k) - ycta(i, j + 2, k) * zC(i, j + 2, k));
+                sy3 = half * (zC(i, j + 2, k) * xcta(i, j + 2, k) - zcta(i, j + 2, k) * xC(i, j + 2, k));
+                sz3 = half * (xC(i, j + 2, k) * ycta(i, j + 2, k) - xcta(i, j + 2, k) * yC(i, j + 2, k));                
+
+                if ((*DiscretePrecisionETA)(j) == 2)
+                {
+                    KX += (sx2 - sx1);
+                    KY += (sy2 - sy1);
+                    KZ += (sz2 - sz1);
+                }
+                else
+                {
+                    KX += (27.0 * (sx2 - sx1) - (sx3 - sx0)) / 24.0;
+                    KY += (27.0 * (sy2 - sy1) - (sy3 - sy0)) / 24.0;
+                    KZ += (27.0 * (sz2 - sz1) - (sz3 - sz0)) / 24.0;
+                }
+                
+                RDouble ds = sqrt(KX * KX + KY * KY + KZ * KZ);
+
+                xfv (i, j, k, 1) = KX;
+                yfv (i, j, k, 1) = KY;
+                zfv (i, j, k, 1) = KZ;
+                area(i, j, k, 1) = ds;
+                xfn (i, j, k, 1) = KX / (ds + TINY);
+                yfn (i, j, k, 1) = KY / (ds + TINY);
+                zfn (i, j, k, 1) = KZ / (ds + TINY);
+            }
+        }
+    }
+
+    for (int k = 1; k <= nk - 1; ++ k)
+    {
+        for (int i = 1; i <= ni - 1; ++ i)
+        {
+            for (int j = 1; j <= nj; ++ j)
+            {
+                RDouble sx0, sy0, sz0;
+                RDouble sx1, sy1, sz1;
+                RDouble sx2, sy2, sz2;
+                RDouble sx3, sy3, sz3;
+
+                RDouble KX = 0.0;
+                RDouble KY = 0.0;
+                RDouble KZ = 0.0;
+
+                sx0 = half * (ycta(i - 1, j, k) * zC(i - 1, j, k) - yC(i - 1, j, k) * zcta(i - 1, j, k));
+                sy0 = half * (zcta(i - 1, j, k) * xC(i - 1, j, k) - zC(i - 1, j, k) * xcta(i - 1, j, k));
+                sz0 = half * (xcta(i - 1, j, k) * yC(i - 1, j, k) - xC(i - 1, j, k) * ycta(i - 1, j, k));
+                sx1 = half * (ycta(i  , j, k) * zC(i  , j, k) - yC(i  , j, k) * zcta(i  , j, k));
+                sy1 = half * (zcta(i  , j, k) * xC(i  , j, k) - zC(i  , j, k) * xcta(i  , j, k));
+                sz1 = half * (xcta(i  , j, k) * yC(i  , j, k) - xC(i  , j, k) * ycta(i  , j, k));
+                sx2 = half * (ycta(i + 1, j, k) * zC(i + 1, j, k) - yC(i + 1, j, k) * zcta(i + 1, j, k));
+                sy2 = half * (zcta(i + 1, j, k) * xC(i + 1, j, k) - zC(i + 1, j, k) * xcta(i + 1, j, k));
+                sz2 = half * (xcta(i + 1, j, k) * yC(i + 1, j, k) - xC(i + 1, j, k) * ycta(i + 1, j, k));
+                sx3 = half * (ycta(i + 2, j, k) * zC(i + 2, j, k) - yC(i + 2, j, k) * zcta(i + 2, j, k));
+                sy3 = half * (zcta(i + 2, j, k) * xC(i + 2, j, k) - zC(i + 2, j, k) * xcta(i + 2, j, k));
+                sz3 = half * (xcta(i + 2, j, k) * yC(i + 2, j, k) - xC(i + 2, j, k) * ycta(i + 2, j, k));                
+
+                if ((*DiscretePrecisionKXI)(i) == 2)
+                {
+                    KX += (sx2 - sx1);
+                    KY += (sy2 - sy1);
+                    KZ += (sz2 - sz1);
+                }
+                else
+                {
+                    KX += (27.0 * (sx2 - sx1) - (sx3 - sx0)) / 24.0;
+                    KY += (27.0 * (sy2 - sy1) - (sy3 - sy0)) / 24.0;
+                    KZ += (27.0 * (sz2 - sz1) - (sz3 - sz0)) / 24.0;
+                }                
+
+                sx0 = half * (yA(i, j, k - 1) * zkxi(i, j, k - 1) - ykxi(i, j, k - 1) * zA(i, j, k - 1));
+                sy0 = half * (zA(i, j, k - 1) * xkxi(i, j, k - 1) - zkxi(i, j, k - 1) * xA(i, j, k - 1));
+                sz0 = half * (xA(i, j, k - 1) * ykxi(i, j, k - 1) - xkxi(i, j, k - 1) * yA(i, j, k - 1));
+                sx1 = half * (yA(i, j, k) * zkxi(i, j, k) - ykxi(i, j, k) * zA(i, j, k));
+                sy1 = half * (zA(i, j, k) * xkxi(i, j, k) - zkxi(i, j, k) * xA(i, j, k));
+                sz1 = half * (xA(i, j, k) * ykxi(i, j, k) - xkxi(i, j, k) * yA(i, j, k));
+                sx2 = half * (yA(i, j, k + 1) * zkxi(i, j, k + 1) - ykxi(i, j, k + 1) * zA(i, j, k + 1));
+                sy2 = half * (zA(i, j, k + 1) * xkxi(i, j, k + 1) - zkxi(i, j, k + 1) * xA(i, j, k + 1));
+                sz2 = half * (xA(i, j, k + 1) * ykxi(i, j, k + 1) - xkxi(i, j, k + 1) * yA(i, j, k + 1));
+                sx3 = half * (yA(i, j, k + 2) * zkxi(i, j, k + 2) - ykxi(i, j, k + 2) * zA(i, j, k + 2));
+                sy3 = half * (zA(i, j, k + 2) * xkxi(i, j, k + 2) - zkxi(i, j, k + 2) * xA(i, j, k + 2));
+                sz3 = half * (xA(i, j, k + 2) * ykxi(i, j, k + 2) - xkxi(i, j, k + 2) * yA(i, j, k + 2));                
+
+                if ((*DiscretePrecisionCTA)(k) == 2)
+                {
+                    KX += (sx2 - sx1);
+                    KY += (sy2 - sy1);
+                    KZ += (sz2 - sz1);
+                }
+                else
+                {
+                    KX += (27.0 * (sx2 - sx1) - (sx3 - sx0)) / 24.0;
+                    KY += (27.0 * (sy2 - sy1) - (sy3 - sy0)) / 24.0;
+                    KZ += (27.0 * (sz2 - sz1) - (sz3 - sz0)) / 24.0;
+                }
+
+                RDouble ds = sqrt(KX * KX + KY * KY + KZ * KZ);
+
+                xfv (i, j, k, 2) = KX;
+                yfv (i, j, k, 2) = KY;
+                zfv (i, j, k, 2) = KZ;
+                area(i, j, k, 2) = ds;
+                xfn (i, j, k, 2) = KX / (ds + TINY);
+                yfn (i, j, k, 2) = KY / (ds + TINY);
+                zfn (i, j, k, 2) = KZ / (ds + TINY);
+            }
+        }
+    }
+
+    for (int j = 1; j <= nj - 1; ++ j)
+    {
+        for (int i = 1; i <= ni - 1; ++ i)
+        {
+            for (int k = 1; k <= nk; ++ k)
+            {
+                RDouble sx0, sy0, sz0;
+                RDouble sx1, sy1, sz1;
+                RDouble sx2, sy2, sz2;
+                RDouble sx3, sy3, sz3;
+
+                RDouble KX = 0.0;
+                RDouble KY = 0.0;
+                RDouble KZ = 0.0;
+
+                sx0 = half * (ykxi(i, j - 1, k) * zA(i, j - 1, k) - yA(i, j - 1, k) * zkxi(i, j - 1, k));
+                sy0 = half * (zkxi(i, j - 1, k) * xA(i, j - 1, k) - zA(i, j - 1, k) * xkxi(i, j - 1, k));
+                sz0 = half * (xkxi(i, j - 1, k) * yA(i, j - 1, k) - xA(i, j - 1, k) * ykxi(i, j - 1, k));
+                sx1 = half * (ykxi(i, j,  k) * zA(i, j,  k) - yA(i, j,  k) * zkxi(i, j,  k));
+                sy1 = half * (zkxi(i, j,  k) * xA(i, j,  k) - zA(i, j,  k) * xkxi(i, j,  k));
+                sz1 = half * (xkxi(i, j,  k) * yA(i, j,  k) - xA(i, j,  k) * ykxi(i, j,  k));
+                sx2 = half * (ykxi(i, j + 1, k) * zA(i, j + 1, k) - yA(i, j + 1, k) * zkxi(i, j + 1, k));
+                sy2 = half * (zkxi(i, j + 1, k) * xA(i, j + 1, k) - zA(i, j + 1, k) * xkxi(i, j + 1, k));
+                sz2 = half * (xkxi(i, j + 1, k) * yA(i, j + 1, k) - xA(i, j + 1, k) * ykxi(i, j + 1, k));
+                sx3 = half * (ykxi(i, j + 2, k) * zA(i, j + 2, k) - yA(i, j + 2, k) * zkxi(i, j + 2, k));
+                sy3 = half * (zkxi(i, j + 2, k) * xA(i, j + 2, k) - zA(i, j + 2, k) * xkxi(i, j + 2, k));
+                sz3 = half * (xkxi(i, j + 2, k) * yA(i, j + 2, k) - xA(i, j + 2, k) * ykxi(i, j + 2, k));                
+
+                if ((*DiscretePrecisionETA)(j) == 2)
+                {
+                    KX += (sx2 - sx1);
+                    KY += (sy2 - sy1);
+                    KZ += (sz2 - sz1);
+                }
+                else
+                {
+                    KX += (27.0 * (sx2 - sx1) - (sx3 - sx0)) / 24.0;
+                    KY += (27.0 * (sy2 - sy1) - (sy3 - sy0)) / 24.0;
+                    KZ += (27.0 * (sz2 - sz1) - (sz3 - sz0)) / 24.0;
+                }
+
+
+                sx0 = half * (yB(i - 1, j, k) * zeta(i - 1, j, k) - yeta(i - 1, j, k) * zB(i - 1, j, k));
+                sy0 = half * (zB(i - 1, j, k) * xeta(i - 1, j, k) - zeta(i - 1, j, k) * xB(i - 1, j, k));
+                sz0 = half * (xB(i - 1, j, k) * yeta(i - 1, j, k) - xeta(i - 1, j, k) * yB(i - 1, j, k));
+                sx1 = half * (yB(i  , j, k) * zeta(i  , j, k) - yeta(i  , j, k) * zB(i  , j, k));
+                sy1 = half * (zB(i  , j, k) * xeta(i  , j, k) - zeta(i  , j, k) * xB(i  , j, k));
+                sz1 = half * (xB(i  , j, k) * yeta(i  , j, k) - xeta(i  , j, k) * yB(i  , j, k));
+                sx2 = half * (yB(i + 1, j, k) * zeta(i + 1, j, k) - yeta(i + 1, j, k) * zB(i + 1, j, k));
+                sy2 = half * (zB(i + 1, j, k) * xeta(i + 1, j, k) - zeta(i + 1, j, k) * xB(i + 1, j, k));
+                sz2 = half * (xB(i + 1, j, k) * yeta(i + 1, j, k) - xeta(i + 1, j, k) * yB(i + 1, j, k));
+                sx3 = half * (yB(i + 2, j, k) * zeta(i + 2, j, k) - yeta(i + 2, j, k) * zB(i + 2, j, k));
+                sy3 = half * (zB(i + 2, j, k) * xeta(i + 2, j, k) - zeta(i + 2, j, k) * xB(i + 2, j, k));
+                sz3 = half * (xB(i + 2, j, k) * yeta(i + 2, j, k) - xeta(i + 2, j, k) * yB(i + 2, j, k));                
+
+                if ((*DiscretePrecisionKXI)(i) == 2)
+                {
+                    KX += (sx2 - sx1);
+                    KY += (sy2 - sy1);
+                    KZ += (sz2 - sz1);
+                }
+                else
+                {
+                    KX += (27.0 * (sx2 - sx1) - (sx3 - sx0)) / 24.0;
+                    KY += (27.0 * (sy2 - sy1) - (sy3 - sy0)) / 24.0;
+                    KZ += (27.0 * (sz2 - sz1) - (sz3 - sz0)) / 24.0;
+                }
+                
+                RDouble ds = sqrt(KX * KX + KY * KY + KZ * KZ);
+
+                xfv (i, j, k, 3) = KX;
+                yfv (i, j, k, 3) = KY;
+                zfv (i, j, k, 3) = KZ;
+                area(i, j, k, 3) = ds;
+                xfn (i, j, k, 3) = KX / (ds + TINY);
+                yfn (i, j, k, 3) = KY / (ds + TINY);
+                zfn (i, j, k, 3) = KZ / (ds + TINY);
+            }
+        }
+    }
+    
+    delete &xA   ;
+    delete &yA   ;
+    delete &zA   ;
+    delete &xkxi;
+    delete &ykxi;
+    delete &zkxi;
+
+    delete &xB   ;
+    delete &yB   ;
+    delete &zB   ;
+    delete &xeta;
+    delete &yeta;
+    delete &zeta;
+
+    delete &xC   ;
+    delete &yC   ;
+    delete &zC   ;
+    delete &xcta;
+    delete &ycta;
+    delete &zcta;
+
+    //! BC metrics
+    //! interior BC would be replaced in the next function CommPartofMetrics_FD.
+    GhostMetrics3D();
+}
+
+void StructGrid::ComputeJacobianforStructHighOrder()
+{
+    if (GetDim() == 2)
+    {
+        ComputeJacobianforStructHighOrder2D();
+    }
+    else
+    {
+        ComputeJacobianforStructHighOrder3D();
+    }
+}
+
+void StructGrid::ComputeJacobianforStructHighOrder2D()
+{
+    RDouble4D &xfv  = *(this->GetFaceVectorX());
+    RDouble4D &yfv  = *(this->GetFaceVectorY());
+
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+
+    RDouble3D &vol = *this->GetCellVolume();    
+
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    const int k = 1;
+
+    RDouble3D &xfaceI = *new RDouble3D(Range(0, ni + 1), Range(1, nj - 1), Range(1, 1), fortranArray);
+    RDouble3D &yfaceI = *new RDouble3D(Range(0, ni + 1), Range(1, nj - 1), Range(1, 1), fortranArray);
+
+    RDouble3D &xfaceJ = *new RDouble3D(Range(1, ni - 1), Range(0, nj + 1), Range(1, 1), fortranArray);
+    RDouble3D &yfaceJ = *new RDouble3D(Range(1, ni - 1), Range(0, nj + 1), Range(1, 1), fortranArray);
+
+    for (int j = 1; j <= nj - 1; ++ j)
+    {
+        for (int i = 0; i <= ni + 1; ++ i)
+        {
+            RDouble x1 = xx(i, j,  k);
+            RDouble x2 = xx(i, j + 1, k);
+
+            RDouble y1 = yy(i, j,  k);
+            RDouble y2 = yy(i, j + 1, k);
+            
+            xfaceI(i, j, k) = half * (x1 + x2);
+            yfaceI(i, j, k) = half * (y1 + y2);
+        }
+    }
+    for (int i = 1; i <= ni - 1; ++ i)
+    {
+        for (int j = 0; j <= nj + 1; ++ j)
+        {
+            RDouble x1 = xx(i,  j, k);
+            RDouble x2 = xx(i + 1, j, k);
+
+            RDouble y1 = yy(i,  j, k);
+            RDouble y2 = yy(i + 1, j, k);
+            
+            xfaceJ(i, j, k) = half * (x1 + x2);
+            yfaceJ(i, j, k) = half * (y1 + y2);
+        }
+    }
+
+    for (int i = 1; i <= ni - 1; ++ i)
+    {
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            RDouble vol_kxi;
+            RDouble vol_eta;
+
+            RDouble kxi0 = xfaceI(i - 1, j, k) * xfv(i - 1, j, k, 1) + yfaceI(i - 1, j, k) * yfv(i - 1, j, k, 1);
+            RDouble kxi1 = xfaceI(i,     j, k) * xfv(i,     j, k, 1) + yfaceI(i,     j, k) * yfv(i,     j, k, 1);
+            RDouble kxi2 = xfaceI(i + 1, j, k) * xfv(i + 1, j, k, 1) + yfaceI(i + 1, j, k) * yfv(i + 1, j, k, 1);
+            RDouble kxi3 = xfaceI(i + 2, j, k) * xfv(i + 2, j, k, 1) + yfaceI(i + 2, j, k) * yfv(i + 2, j, k, 1);
+
+            RDouble eta0 = xfaceJ(i, j - 1, k) * xfv(i, j - 1, k, 2) + yfaceJ(i, j - 1, k) * yfv(i, j - 1, k, 2);
+            RDouble eta1 = xfaceJ(i, j,     k) * xfv(i, j,     k, 2) + yfaceJ(i, j,     k) * yfv(i, j,     k, 2);
+            RDouble eta2 = xfaceJ(i, j + 1, k) * xfv(i, j + 1, k, 2) + yfaceJ(i, j + 1, k) * yfv(i, j + 1, k, 2);
+            RDouble eta3 = xfaceJ(i, j + 2, k) * xfv(i, j + 2, k, 2) + yfaceJ(i, j + 2, k) * yfv(i, j + 2, k, 2);
+
+            if ((*DiscretePrecisionKXI)(i) == 2)
+            {
+                vol_kxi= (kxi2 - kxi1);
+            }
+            else
+            {
+                vol_kxi= (27.0 * (kxi2 - kxi1) - (kxi3 - kxi0)) / 24.0;
+            }
+            
+            if ((*DiscretePrecisionETA)(j) == 2)
+            {
+                vol_eta= (eta2 - eta1);
+            }
+            else
+            {
+                vol_eta= (27.0 * (eta2 - eta1) - (eta3 - eta0)) / 24.0;
+            }
+
+            RDouble vol_FD = half * (vol_kxi + vol_eta);
+            RDouble vol_FV = vol(i, j, k);
+
+            if (vol_FD <= zero || vol_FD > 1.2 * vol_FV || vol_FD < 0.8 * vol_FV)
+            {
+                vol_FD = vol_FV;
+            }
+
+            vol(i, j, k) = vol_FD;
+        }        
+    }
+    
+    GhostCell3D(vol, ni, nj, 1);
+    //! ghost vol
+    //! interior BC would be replaced in the next function CommJacobian_FD.
+
+    delete &xfaceI;
+    delete &yfaceI;
+    delete &xfaceJ;
+    delete &yfaceJ;
+}
+
+void StructGrid::ComputeJacobianforStructHighOrder3D()
+{
+    RDouble4D &xfv  = *(this->GetFaceVectorX());
+    RDouble4D &yfv  = *(this->GetFaceVectorY());
+    RDouble4D &zfv  = *(this->GetFaceVectorZ());
+
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+
+    RDouble3D &vol = *this->GetCellVolume();
+
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    RDouble3D &xfaceI = *new RDouble3D(Range(0, ni + 1), Range(1, nj - 1), Range(1, nk - 1), fortranArray);
+    RDouble3D &yfaceI = *new RDouble3D(Range(0, ni + 1), Range(1, nj - 1), Range(1, nk - 1), fortranArray);
+    RDouble3D &zfaceI = *new RDouble3D(Range(0, ni + 1), Range(1, nj - 1), Range(1, nk - 1), fortranArray);
+
+    RDouble3D &xfaceJ = *new RDouble3D(Range(1, ni - 1), Range(0, nj + 1), Range(1, nk - 1), fortranArray);
+    RDouble3D &yfaceJ = *new RDouble3D(Range(1, ni - 1), Range(0, nj + 1), Range(1, nk - 1), fortranArray);
+    RDouble3D &zfaceJ = *new RDouble3D(Range(1, ni - 1), Range(0, nj + 1), Range(1, nk - 1), fortranArray);
+
+    RDouble3D &xfaceK = *new RDouble3D(Range(1, ni - 1), Range(1, nj - 1), Range(0, nk + 1), fortranArray);
+    RDouble3D &yfaceK = *new RDouble3D(Range(1, ni - 1), Range(1, nj - 1), Range(0, nk + 1), fortranArray);
+    RDouble3D &zfaceK = *new RDouble3D(Range(1, ni - 1), Range(1, nj - 1), Range(0, nk + 1), fortranArray);
+
+    for (int k = 1; k <= nk - 1; ++ k)
+    {
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            for (int i = 0; i <= ni + 1; ++ i)
+            {
+                RDouble x1 = xx(i, j,     k);
+                RDouble x2 = xx(i, j + 1, k);
+                RDouble x3 = xx(i, j,     k + 1);
+                RDouble x4 = xx(i, j + 1, k + 1);
+
+                RDouble y1 = yy(i, j,     k);
+                RDouble y2 = yy(i, j + 1, k);
+                RDouble y3 = yy(i, j,     k + 1);
+                RDouble y4 = yy(i, j + 1, k + 1);
+
+                RDouble z1 = zz(i, j,     k);
+                RDouble z2 = zz(i, j + 1, k);
+                RDouble z3 = zz(i, j,     k + 1);
+                RDouble z4 = zz(i, j + 1, k + 1);
+                
+                xfaceI(i, j, k) = 0.25 * (x1 + x2 + x3 + x4);
+                yfaceI(i, j, k) = 0.25 * (y1 + y2 + y3 + y4);
+                zfaceI(i, j, k) = 0.25 * (z1 + z2 + z3 + z4);
+            }
+        }
+    }
+
+    for (int k = 1; k <= nk - 1; ++ k)
+    {
+        for (int i = 1; i <= ni - 1; ++ i)
+        {
+            for (int j = 0; j <= nj + 1; ++ j)
+            {
+                RDouble x1 = xx(i,     j, k);
+                RDouble x2 = xx(i + 1, j, k);
+                RDouble x3 = xx(i,     j, k + 1);
+                RDouble x4 = xx(i + 1, j, k + 1);
+
+                RDouble y1 = yy(i,     j, k);
+                RDouble y2 = yy(i + 1, j, k);
+                RDouble y3 = yy(i,     j, k + 1);
+                RDouble y4 = yy(i + 1, j, k + 1);
+
+                RDouble z1 = zz(i,     j, k);
+                RDouble z2 = zz(i + 1, j, k);
+                RDouble z3 = zz(i,     j, k + 1);
+                RDouble z4 = zz(i + 1, j, k + 1);
+                
+                xfaceJ(i, j, k) = 0.25 * (x1 + x2 + x3 + x4);
+                yfaceJ(i, j, k) = 0.25 * (y1 + y2 + y3 + y4);
+                zfaceJ(i, j, k) = 0.25 * (z1 + z2 + z3 + z4);
+            }
+        }
+    }
+
+    for (int j = 1; j <= nj - 1; ++ j)
+    {
+        for (int i = 1; i <= ni - 1; ++ i)
+        {
+            for (int k = 0; k <= nk + 1; ++ k)
+            {
+                RDouble x1 = xx(i,     j,     k);
+                RDouble x2 = xx(i + 1, j,     k);
+                RDouble x3 = xx(i,     j + 1, k);
+                RDouble x4 = xx(i + 1, j + 1, k);
+
+                RDouble y1 = yy(i,     j,     k);
+                RDouble y2 = yy(i + 1, j,     k);
+                RDouble y3 = yy(i,     j + 1, k);
+                RDouble y4 = yy(i + 1, j + 1, k);
+
+                RDouble z1 = zz(i,     j,     k);
+                RDouble z2 = zz(i + 1, j,     k);
+                RDouble z3 = zz(i,     j + 1, k);
+                RDouble z4 = zz(i + 1, j + 1, k);
+                
+                xfaceK(i, j, k) = 0.25 * (x1 + x2 + x3 + x4);
+                yfaceK(i, j, k) = 0.25 * (y1 + y2 + y3 + y4);
+                zfaceK(i, j, k) = 0.25 * (z1 + z2 + z3 + z4);
+            }
+        }
+    }
+
+    for (int k = 1; k <= nk - 1; ++ k)
+    {
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            for (int i = 1; i <= ni - 1; ++ i)
+            {
+                RDouble vol_kxi, vol_eta, vol_cta;
+
+                RDouble kxi0 = xfaceI(i - 1, j, k) * xfv(i - 1, j, k, 1) + yfaceI(i - 1, j, k) * yfv(i - 1, j, k, 1) + zfaceI(i - 1, j, k) * zfv(i - 1, j, k, 1);
+                RDouble kxi1 = xfaceI(i,     j, k) * xfv(i,     j, k, 1) + yfaceI(i,     j, k) * yfv(i,     j, k, 1) + zfaceI(i,     j, k) * zfv(i,     j, k, 1);
+                RDouble kxi2 = xfaceI(i + 1, j, k) * xfv(i + 1, j, k, 1) + yfaceI(i + 1, j, k) * yfv(i + 1, j, k, 1) + zfaceI(i + 1, j, k) * zfv(i + 1, j, k, 1);
+                RDouble kxi3 = xfaceI(i + 2, j, k) * xfv(i + 2, j, k, 1) + yfaceI(i + 2, j, k) * yfv(i + 2, j, k, 1) + zfaceI(i + 2, j, k) * zfv(i + 2, j, k, 1);
+                
+                if ((*DiscretePrecisionKXI)(i) == 2)
+                {
+                    vol_kxi= (kxi2 - kxi1);
+                }
+                else
+                {
+                    vol_kxi= (27.0 * (kxi2 - kxi1) - (kxi3 - kxi0)) / 24.0;
+                }                
+
+                RDouble eta0 = xfaceJ(i, j - 1, k) * xfv(i, j - 1, k, 2) + yfaceJ(i, j - 1, k) * yfv(i, j - 1, k, 2) + zfaceJ(i, j - 1, k) * zfv(i, j - 1, k, 2);
+                RDouble eta1 = xfaceJ(i, j,     k) * xfv(i, j,     k, 2) + yfaceJ(i, j,     k) * yfv(i, j,     k, 2) + zfaceJ(i, j,     k) * zfv(i, j,     k, 2);
+                RDouble eta2 = xfaceJ(i, j + 1, k) * xfv(i, j + 1, k, 2) + yfaceJ(i, j + 1, k) * yfv(i, j + 1, k, 2) + zfaceJ(i, j + 1, k) * zfv(i, j + 1, k, 2);
+                RDouble eta3 = xfaceJ(i, j + 2, k) * xfv(i, j + 2, k, 2) + yfaceJ(i, j + 2, k) * yfv(i, j + 2, k, 2) + zfaceJ(i, j + 2, k) * zfv(i, j + 2, k, 2);
+                
+                if ((*DiscretePrecisionETA)(j) == 2)
+                {
+                    vol_eta= (eta2 - eta1);
+                }
+                else
+                {
+                    vol_eta= (27.0 * (eta2 - eta1) - (eta3 - eta0)) / 24.0;
+                }
+                
+                RDouble cta0 = xfaceK(i, j, k - 1) * xfv(i, j, k - 1, 3) + yfaceK(i, j, k - 1) * yfv(i, j, k - 1, 3) + zfaceK(i, j, k - 1) * zfv(i, j, k - 1, 3);
+                RDouble cta1 = xfaceK(i, j, k   ) * xfv(i, j, k,     3) + yfaceK(i, j, k   ) * yfv(i, j, k,     3) + zfaceK(i, j, k   ) * zfv(i, j, k,     3);
+                RDouble cta2 = xfaceK(i, j, k + 1) * xfv(i, j, k + 1, 3) + yfaceK(i, j, k + 1) * yfv(i, j, k + 1, 3) + zfaceK(i, j, k + 1) * zfv(i, j, k + 1, 3);
+                RDouble cta3 = xfaceK(i, j, k + 2) * xfv(i, j, k + 2, 3) + yfaceK(i, j, k + 2) * yfv(i, j, k + 2, 3) + zfaceK(i, j, k + 2) * zfv(i, j, k + 2, 3);
+                
+                if ((*DiscretePrecisionCTA)(k) == 2)
+                {
+                    vol_cta= (cta2 - cta1);
+                }
+                else
+                {
+                    vol_cta= (27.0 * (cta2 - cta1) - (cta3 - cta0)) / 24.0;
+                } 
+                
+                RDouble vol_FD = (vol_kxi + vol_eta + vol_cta) / 3.0;
+                RDouble vol_FV = vol(i, j, k);
+                
+                if (vol_FD <= zero || vol_FD > 1.2 * vol_FV || vol_FD < 0.8 * vol_FV)
+                {
+                    vol_FD = vol_FV;
+                }
+                vol(i ,j ,k) = vol_FD;
+            }
+        }
+    }
+
+    GhostCell3D(vol, ni, nj, nk);
+    //! ghost vol
+    //! interior BC would be replaced in the next function CommJacobian_FD.
+
+    delete &xfaceI;
+    delete &yfaceI;
+    delete &zfaceI;
+
+    delete &xfaceJ;
+    delete &yfaceJ;
+    delete &zfaceJ;
+
+    delete &xfaceK;
+    delete &yfaceK;
+    delete &zfaceK;
+}
+
+void StructGrid::GetNodeIJKfromSourceIndexghostofghost(StructGrid *fgrid, int iFace, int layer, int IJKofNodes[12][3])
+{
+    int is, js, ks;
+    fgrid->GetSourceIndexIJK(iFace, layer, is, js, ks);
+
+    int id, jd, kd;
+    int i_lr, j_lr, k_lr;
+    fgrid->GetSourceIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+
+    int a[3];
+    int b[3];
+    int c[3];
+    int d[3];
+    int ab[3];
+    int ad[3];
+    int bc[3];
+    int ba[3];
+    int cd[3];
+    int cb[3];
+    int da[3];
+    int dc[3];
+    
+    if (i_lr != 0)
+    {
+        //! I_face
+        a[0] = 0;
+        a[1] = 0;
+        a[2] = 0;
+
+        b[0] = 0;
+        b[1] = 1;
+        b[2] = 0;
+
+        c[0] = 0;
+        c[1] = 1;
+        c[2] = 1;
+
+        d[0] = 0;
+        d[1] = 0;
+        d[2] = 1;
+    }
+    else if (j_lr != 0)
+    {
+        //! J_face
+        a[0] = 0;
+        a[1] = 0;
+        a[2] = 0;
+
+        b[0] = 0;
+        b[1] = 0;
+        b[2] = 1;
+
+        c[0] = 1;
+        c[1] = 0;
+        c[2] = 1;
+
+        d[0] = 1;
+        d[1] = 0;
+        d[2] = 0;
+    }
+    else
+    {
+        //! K_face
+        a[0] = 0;
+        a[1] = 0;
+        a[2] = 0;
+
+        b[0] = 1;
+        b[1] = 0;
+        b[2] = 0;
+
+        c[0] = 1;
+        c[1] = 1;
+        c[2] = 0;
+
+        d[0] = 0;
+        d[1] = 1;
+        d[2] = 0;
+    }
+
+    for (int m = 0; m <= 2; ++ m)
+    {
+        ab[m] = 2 * a[m] - b[m];
+        ad[m] = 2 * a[m] - d[m];
+        bc[m] = 2 * b[m] - c[m];
+        ba[m] = 2 * b[m] - a[m];
+        cd[m] = 2 * c[m] - d[m];
+        cb[m] = 2 * c[m] - b[m];
+        da[m] = 2 * d[m] - a[m];
+        dc[m] = 2 * d[m] - c[m];
+    }
+
+    int basepoint[3];
+    basepoint[0] = is + id;
+    basepoint[1] = js + jd;
+    basepoint[2] = ks + kd;
+
+    for (int m = 0; m <= 2; ++ m)
+    {
+        IJKofNodes[ 0][m] = basepoint[m] + a[m];
+        IJKofNodes[ 1][m] = basepoint[m] + b[m];
+        IJKofNodes[ 2][m] = basepoint[m] + c[m];
+        IJKofNodes[ 3][m] = basepoint[m] + d[m];
+
+        IJKofNodes[ 4][m] = basepoint[m] + ab[m];
+        IJKofNodes[ 5][m] = basepoint[m] + ad[m];
+        IJKofNodes[ 6][m] = basepoint[m] + bc[m];
+        IJKofNodes[ 7][m] = basepoint[m] + ba[m];
+        IJKofNodes[ 8][m] = basepoint[m] + cd[m];
+        IJKofNodes[ 9][m] = basepoint[m] + cb[m];
+        IJKofNodes[10][m] = basepoint[m] + da[m];
+        IJKofNodes[11][m] = basepoint[m] + dc[m];
+    }
+}
+
+void StructGrid::GetNodeIJKfromTargetIndexghostofghost(StructGrid *fgrid, int iFace, int layer, int IJKofNodes[12][3])
+{
+    int it, jt, kt;
+    fgrid->GetTargetIndexIJK(iFace, layer, it, jt, kt);
+
+    int id, jd, kd;
+    int i_lr, j_lr, k_lr;
+    fgrid->GetTargetIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+
+    int a[3];
+    int b[3];
+    int c[3];
+    int d[3];
+    int ab[3];
+    int ad[3];
+    int bc[3];
+    int ba[3];
+    int cd[3];
+    int cb[3];
+    int da[3];
+    int dc[3];
+    
+    if (i_lr != 0)
+    {
+        //! I_face
+        a[0] = 0;
+        a[1] = 0;
+        a[2] = 0;
+
+        b[0] = 0;
+        b[1] = 1;
+        b[2] = 0;
+
+        c[0] = 0;
+        c[1] = 1;
+        c[2] = 1;
+
+        d[0] = 0;
+        d[1] = 0;
+        d[2] = 1;
+    }
+    else if (j_lr != 0)
+    {
+        //! J_face
+        a[0] = 0;
+        a[1] = 0;
+        a[2] = 0;
+
+        b[0] = 0;
+        b[1] = 0;
+        b[2] = 1;
+
+        c[0] = 1;
+        c[1] = 0;
+        c[2] = 1;
+
+        d[0] = 1;
+        d[1] = 0;
+        d[2] = 0;
+    }
+    else
+    {
+        //! K_face
+        a[0] = 0;
+        a[1] = 0;
+        a[2] = 0;
+
+        b[0] = 1;
+        b[1] = 0;
+        b[2] = 0;
+
+        c[0] = 1;
+        c[1] = 1;
+        c[2] = 0;
+
+        d[0] = 0;
+        d[1] = 1;
+        d[2] = 0;
+    }
+
+    for (int m = 0; m <= 2; ++ m)
+    {
+        ab[m] = 2 * a[m] - b[m];
+        ad[m] = 2 * a[m] - d[m];
+        bc[m] = 2 * b[m] - c[m];
+        ba[m] = 2 * b[m] - a[m];
+        cd[m] = 2 * c[m] - d[m];
+        cb[m] = 2 * c[m] - b[m];
+        da[m] = 2 * d[m] - a[m];
+        dc[m] = 2 * d[m] - c[m];
+    }
+
+    int basepoint[3];
+    basepoint[0] = it + id;
+    basepoint[1] = jt + jd;
+    basepoint[2] = kt + kd;
+
+    for (int m = 0; m <= 2; ++ m)
+    {
+        IJKofNodes[ 0][m] = basepoint[m] + a[m];
+        IJKofNodes[ 1][m] = basepoint[m] + b[m];
+        IJKofNodes[ 2][m] = basepoint[m] + c[m];
+        IJKofNodes[ 3][m] = basepoint[m] + d[m];
+
+        IJKofNodes[ 4][m] = basepoint[m] + ab[m];
+        IJKofNodes[ 5][m] = basepoint[m] + ad[m];
+        IJKofNodes[ 6][m] = basepoint[m] + bc[m];
+        IJKofNodes[ 7][m] = basepoint[m] + ba[m];
+        IJKofNodes[ 8][m] = basepoint[m] + cd[m];
+        IJKofNodes[ 9][m] = basepoint[m] + cb[m];
+        IJKofNodes[10][m] = basepoint[m] + da[m];
+        IJKofNodes[11][m] = basepoint[m] + dc[m];
+    }
+}
+
+int StructGrid::GetRelationshipBetweenTwoPairsofNodes(RDouble NodesofABCD[4][3], RDouble Nodesofabcd[4][3])
+{
+    RDouble length2ofAa = 0.0;
+    RDouble length2ofAb = 0.0;
+    RDouble length2ofAc = 0.0;
+    RDouble length2ofAd = 0.0;
+    
+    RDouble length2ofBa = 0.0;
+    RDouble length2ofBb = 0.0;
+    RDouble length2ofBc = 0.0;
+    RDouble length2ofBd = 0.0;
+    
+    RDouble length2ofCa = 0.0;
+    RDouble length2ofCb = 0.0;
+    RDouble length2ofCc = 0.0;
+    RDouble length2ofCd = 0.0;
+    
+    RDouble length2ofDa = 0.0;
+    RDouble length2ofDb = 0.0;
+    RDouble length2ofDc = 0.0;
+    RDouble length2ofDd = 0.0;
+
+    for (int m = 0; m <= 2; ++ m)
+    {
+        length2ofAa += (NodesofABCD[0][m] - Nodesofabcd[0][m]) * (NodesofABCD[0][m] - Nodesofabcd[0][m]);
+        length2ofAb += (NodesofABCD[0][m] - Nodesofabcd[1][m]) * (NodesofABCD[0][m] - Nodesofabcd[1][m]);
+        length2ofAc += (NodesofABCD[0][m] - Nodesofabcd[2][m]) * (NodesofABCD[0][m] - Nodesofabcd[2][m]);
+        length2ofAd += (NodesofABCD[0][m] - Nodesofabcd[3][m]) * (NodesofABCD[0][m] - Nodesofabcd[3][m]);
+        
+        length2ofBa += (NodesofABCD[1][m] - Nodesofabcd[0][m]) * (NodesofABCD[1][m] - Nodesofabcd[0][m]);
+        length2ofBb += (NodesofABCD[1][m] - Nodesofabcd[1][m]) * (NodesofABCD[1][m] - Nodesofabcd[1][m]);
+        length2ofBc += (NodesofABCD[1][m] - Nodesofabcd[2][m]) * (NodesofABCD[1][m] - Nodesofabcd[2][m]);
+        length2ofBd += (NodesofABCD[1][m] - Nodesofabcd[3][m]) * (NodesofABCD[1][m] - Nodesofabcd[3][m]);
+        
+        length2ofCa += (NodesofABCD[2][m] - Nodesofabcd[0][m]) * (NodesofABCD[2][m] - Nodesofabcd[0][m]);
+        length2ofCb += (NodesofABCD[2][m] - Nodesofabcd[1][m]) * (NodesofABCD[2][m] - Nodesofabcd[1][m]);
+        length2ofCc += (NodesofABCD[2][m] - Nodesofabcd[2][m]) * (NodesofABCD[2][m] - Nodesofabcd[2][m]);
+        length2ofCd += (NodesofABCD[2][m] - Nodesofabcd[3][m]) * (NodesofABCD[2][m] - Nodesofabcd[3][m]);
+        
+        length2ofDa += (NodesofABCD[3][m] - Nodesofabcd[0][m]) * (NodesofABCD[3][m] - Nodesofabcd[0][m]);
+        length2ofDb += (NodesofABCD[3][m] - Nodesofabcd[1][m]) * (NodesofABCD[3][m] - Nodesofabcd[1][m]);
+        length2ofDc += (NodesofABCD[3][m] - Nodesofabcd[2][m]) * (NodesofABCD[3][m] - Nodesofabcd[2][m]);
+        length2ofDd += (NodesofABCD[3][m] - Nodesofabcd[3][m]) * (NodesofABCD[3][m] - Nodesofabcd[3][m]);
+    }
+
+    RDouble errorofcase1 = length2ofAa + length2ofBb + length2ofCc + length2ofDd;
+    RDouble errorofcase2 = length2ofAa + length2ofBd + length2ofCc + length2ofDb;
+    RDouble errorofcase3 = length2ofAb + length2ofBa + length2ofCd + length2ofDc;
+    RDouble errorofcase4 = length2ofAb + length2ofBc + length2ofCd + length2ofDa;
+    RDouble errorofcase5 = length2ofAc + length2ofBb + length2ofCa + length2ofDd;
+    RDouble errorofcase6 = length2ofAc + length2ofBd + length2ofCa + length2ofDb;
+    RDouble errorofcase7 = length2ofAd + length2ofBa + length2ofCb + length2ofDc;
+    RDouble errorofcase8 = length2ofAd + length2ofBc + length2ofCb + length2ofDa;
+
+    RDouble errorMin = errorofcase1;
+    int mapcase = 1;
+    
+    if (errorofcase2 < errorMin)
+    {
+        errorMin = errorofcase2;
+        mapcase = 2;
+    }
+
+    if (errorofcase3 < errorMin)
+    {
+        errorMin = errorofcase3;
+        mapcase = 3;
+    }
+
+    if (errorofcase4 < errorMin)
+    {
+        errorMin = errorofcase4;
+        mapcase = 4;
+    }
+
+    if (errorofcase5 < errorMin)
+    {
+        errorMin = errorofcase5;
+        mapcase = 5;
+    }
+
+    if (errorofcase6 < errorMin)
+    {
+        errorMin = errorofcase6;
+        mapcase = 6;
+    }
+
+    if (errorofcase7 < errorMin)
+    {
+        errorMin = errorofcase7;
+        mapcase = 7;
+    }
+
+    if (errorofcase8 < errorMin)
+    {
+        errorMin = errorofcase8;
+        mapcase = 8;
+    }
+
+    return mapcase;
+}
+
+void StructGrid::UploadGridInfoOnlyforStructHighOrder(DataContainer *&dataContainer, const int &neighborZoneIndex, int mission)
+{
+    //int mission_Comm(XYZghost                                ) = 1;
+    //int mission_Comm(XYZghostofghos                          ) = 2;
+    //int mission_Comm(Metrics                                 ) = 3;
+    //int mission_Comm(Jacobian                                ) = 4;
+    //int mission_Comm(q_FD                                    ) = 5;
+    //int mission_Comm(rtem                                    ) = 6;
+    //int mission_Comm(rtem, dqdxyznokxi,dqdxyznoeta,dqdxyznocta) = 7;
+    //int mission_Comm(rtem, gradUVWTCellCenterXYZ             ) = 8;
+    //int mission_Comm(vist, gradqturb                         ) = 9;
+    //int mission_Comm(vist, gradqturb, blending               ) = 10;
+    //int mission_Comm(vist                                    ) = 11 (for LES);
+    
+    if(mission == 1)
+    {
+        UploadGridInfoOnlyforStructHighOrder_mission1(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 2)
+    {
+        UploadGridInfoOnlyforStructHighOrder_mission2(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 3)
+    {
+        UploadGridInfoOnlyforStructHighOrder_mission3(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 4)
+    {
+        UploadGridInfoOnlyforStructHighOrder_mission4(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 5)
+    {
+        UploadGridInfoOnlyforStructHighOrder_mission5(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 6)
+    {
+        UploadGridInfoOnlyforStructHighOrder_mission6(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 7)
+    {
+        UploadGridInfoOnlyforStructHighOrder_mission7(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 8)
+    {
+        UploadGridInfoOnlyforStructHighOrder_mission8(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 9)
+    {
+        UploadGridInfoOnlyforStructHighOrder_mission9(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 10)
+    {
+        UploadGridInfoOnlyforStructHighOrder_mission10(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 11)
+    {
+        UploadGridInfoOnlyforStructHighOrder_mission11(dataContainer, neighborZoneIndex);
+    }
+}
+
+void StructGrid::DownloadGridInfoOnlyforStructHighOrder(DataContainer *&dataContainer, const int &neighborZoneIndex, int mission)
+{
+    //int mission_Comm(XYZghost                                ) = 1;
+    //int mission_Comm(XYZghostofghos                          ) = 2;
+    //int mission_Comm(Metrics                                 ) = 3;
+    //int mission_Comm(Jacobian                                ) = 4;
+    //int mission_Comm(q_FD                                    ) = 5;
+    //int mission_Comm(rtem                                    ) = 6;
+    //int mission_Comm(rtem, dqdxyznokxi,dqdxyznoeta,dqdxyznocta) = 7;
+    //int mission_Comm(rtem, gradUVWTCellCenterXYZ             ) = 8;
+    //int mission_Comm(vist, gradqturb                         ) = 9;
+    //int mission_Comm(vist, gradqturb, blending               ) = 10;
+    //int mission_Comm(vist                                    ) = 11 (for LES);
+    
+    if(mission == 1)
+    {
+        DownloadGridInfoOnlyforStructHighOrder_mission1(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 2)
+    {
+        DownloadGridInfoOnlyforStructHighOrder_mission2(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 3)
+    {
+        DownloadGridInfoOnlyforStructHighOrder_mission3(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 4)
+    {
+        DownloadGridInfoOnlyforStructHighOrder_mission4(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 5)
+    {
+        DownloadGridInfoOnlyforStructHighOrder_mission5(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 6)
+    {
+        DownloadGridInfoOnlyforStructHighOrder_mission6(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 7)
+    {
+        DownloadGridInfoOnlyforStructHighOrder_mission7(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 8)
+    {
+        DownloadGridInfoOnlyforStructHighOrder_mission8(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 9)
+    {
+        DownloadGridInfoOnlyforStructHighOrder_mission9(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 10)
+    {
+        DownloadGridInfoOnlyforStructHighOrder_mission10(dataContainer, neighborZoneIndex);
+    }
+    else if(mission == 11)
+    {
+        DownloadGridInfoOnlyforStructHighOrder_mission11(dataContainer, neighborZoneIndex);
+    }
+}
+
+void StructGrid::UploadGridInfoOnlyforStructHighOrder_mission1(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble3D &vol = *this->GetCellVolume();
+    RDouble3D &xcc = *this->GetCellCenterX();
+    RDouble3D &ycc = *this->GetCellCenterY();
+    RDouble3D &zcc = *this->GetCellCenterZ();
+
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+    
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+
+        for (int layer = 1; layer <= 4; ++layer)
+        {
+            int is, js, ks;
+            finestGrid->GetSourceIndexIJK(iFace,layer, is, js, ks);
+            finestGrid->RemapMultigridIJK(level, is, js, ks);
+            
+            PHWrite(dataContainer, xcc(is, js, ks));
+            PHWrite(dataContainer, ycc(is, js, ks));
+            PHWrite(dataContainer, zcc(is, js, ks));
+            PHWrite(dataContainer, vol(is, js, ks));
+        }
+
+        int IJKofNodes1stLayer[4][3];
+        int IJKofNodes2ndLayer[4][3];
+
+        GetNodeIJKfromSourceIndex(finestGrid, iFace, 1, IJKofNodes1stLayer);
+        GetNodeIJKfromSourceIndex(finestGrid, iFace, 2, IJKofNodes2ndLayer);
+        
+        for (int iNode = 0; iNode < 4; ++ iNode)
+        {
+            PHWrite(dataContainer, xx(IJKofNodes1stLayer[iNode][0], IJKofNodes1stLayer[iNode][1], IJKofNodes1stLayer[iNode][2]));
+            PHWrite(dataContainer, yy(IJKofNodes1stLayer[iNode][0], IJKofNodes1stLayer[iNode][1], IJKofNodes1stLayer[iNode][2]));
+            PHWrite(dataContainer, zz(IJKofNodes1stLayer[iNode][0], IJKofNodes1stLayer[iNode][1], IJKofNodes1stLayer[iNode][2]));
+            
+            PHWrite(dataContainer, xx(IJKofNodes2ndLayer[iNode][0], IJKofNodes2ndLayer[iNode][1], IJKofNodes2ndLayer[iNode][2]));
+            PHWrite(dataContainer, yy(IJKofNodes2ndLayer[iNode][0], IJKofNodes2ndLayer[iNode][1], IJKofNodes2ndLayer[iNode][2]));
+            PHWrite(dataContainer, zz(IJKofNodes2ndLayer[iNode][0], IJKofNodes2ndLayer[iNode][1], IJKofNodes2ndLayer[iNode][2]));
+        }
+    }
+}
+
+void StructGrid::UploadGridInfoOnlyforStructHighOrder_mission2(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+    
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+
+        int IJKofNodes1stLayer[12][3];
+        int IJKofNodes2ndLayer[12][3];
+
+        GetNodeIJKfromSourceIndexghostofghost(finestGrid, iFace, 1, IJKofNodes1stLayer);
+        GetNodeIJKfromSourceIndexghostofghost(finestGrid, iFace, 2, IJKofNodes2ndLayer);
+
+        for (int nodeID = 0; nodeID <= 3; ++nodeID)
+        {
+            PHWrite(dataContainer, xx(IJKofNodes1stLayer[nodeID][0], IJKofNodes1stLayer[nodeID][1], IJKofNodes1stLayer[nodeID][2]));
+            PHWrite(dataContainer, yy(IJKofNodes1stLayer[nodeID][0], IJKofNodes1stLayer[nodeID][1], IJKofNodes1stLayer[nodeID][2]));
+            PHWrite(dataContainer, zz(IJKofNodes1stLayer[nodeID][0], IJKofNodes1stLayer[nodeID][1], IJKofNodes1stLayer[nodeID][2]));
+        }  
+
+        for (int nodeID = 4; nodeID <= 11; ++nodeID)
+        {
+            PHWrite(dataContainer, xx(IJKofNodes2ndLayer[nodeID][0], IJKofNodes2ndLayer[nodeID][1], IJKofNodes2ndLayer[nodeID][2]));
+            PHWrite(dataContainer, yy(IJKofNodes2ndLayer[nodeID][0], IJKofNodes2ndLayer[nodeID][1], IJKofNodes2ndLayer[nodeID][2]));
+            PHWrite(dataContainer, zz(IJKofNodes2ndLayer[nodeID][0], IJKofNodes2ndLayer[nodeID][1], IJKofNodes2ndLayer[nodeID][2]));
+        }
+    }
+}
+
+void StructGrid::UploadGridInfoOnlyforStructHighOrder_mission3(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+    
+    RDouble4D &xfv  = *(this->GetFaceVectorX());
+    RDouble4D &yfv  = *(this->GetFaceVectorY());
+    RDouble4D &zfv  = *(this->GetFaceVectorZ());
+    
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+
+        for (int layer = 1; layer <= 2; ++ layer)
+        {
+            int is, js, ks;
+            finestGrid->GetSourceIndexIJK(iFace,layer, is, js, ks);
+            finestGrid->RemapMultigridIJK(level, is, js, ks);
+
+            RDouble KX, KY, KZ;
+
+            int id, jd, kd;
+            int i_lr, j_lr, k_lr;
+            finestGrid->GetSourceIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+            
+            if (i_lr != 0)
+            {
+                //! I_face
+                if (i_lr == -1)
+                {
+                    //! left boundary
+                    KX = xfv(is+1, js, ks, 1);
+                    KY = yfv(is+1, js, ks, 1);
+                    KZ = zfv(is+1, js, ks, 1);
+                }
+                else
+                {
+                    //! right boundary
+                    KX = - xfv(is, js, ks, 1);
+                    KY = - yfv(is, js, ks, 1);
+                    KZ = - zfv(is, js, ks, 1);
+                }
+            }
+            else if (j_lr != 0)
+            {
+                //! J_face
+                if (j_lr == -1)
+                {
+                    //! left boundary
+                    KX = xfv(is, js+1, ks, 2);
+                    KY = yfv(is, js+1, ks, 2);
+                    KZ = zfv(is, js+1, ks, 2);
+                }
+                else
+                {
+                    //! right boundary
+                    KX = - xfv(is, js, ks, 2);
+                    KY = - yfv(is, js, ks, 2);
+                    KZ = - zfv(is, js, ks, 2);
+                }
+            }
+            else
+            {
+                //! K_face
+                if (k_lr == -1)
+                {
+                    //! left boundary
+                    KX = xfv(is, js, ks+1, 3);
+                    KY = yfv(is, js, ks+1, 3);
+                    KZ = zfv(is, js, ks+1, 3);
+                }
+                else
+                {
+                    //! right boundary
+                    KX = - xfv(is, js, ks, 3);
+                    KY = - yfv(is, js, ks, 3);
+                    KZ = - zfv(is, js, ks, 3);
+                }
+            }
+            PHWrite(dataContainer, KX);
+            PHWrite(dataContainer, KY);
+            PHWrite(dataContainer, KZ);
+        }
+    }
+}
+
+void StructGrid::UploadGridInfoOnlyforStructHighOrder_mission4(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+    
+    RDouble3D &vol = *this->GetCellVolume();
+    
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+
+        for (int layer = 1; layer <= 4; ++layer)
+        {
+            int is, js, ks;
+            finestGrid->GetSourceIndexIJK(iFace,layer, is, js, ks);
+            finestGrid->RemapMultigridIJK(level, is, js, ks);            
+            
+            PHWrite(dataContainer, vol(is, js, ks));
+        }
+    }
+}
+
+void StructGrid::UploadGridInfoOnlyforStructHighOrder_mission5(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &q_FD = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("q_FD"));
+
+    int nEquation = 5;
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+        for (int layer = 3; layer <= 4; ++layer)
+        {
+            int is, js, ks;
+            finestGrid->GetSourceIndexIJK(iFace, layer, is, js, ks);
+            finestGrid->RemapMultigridIJK(0, is, js, ks);
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                PHWrite(dataContainer, q_FD(is, js, ks, m));
+            }
+        }
+    }
+}
+
+void StructGrid::UploadGridInfoOnlyforStructHighOrder_mission6(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble3D &rtem = *reinterpret_cast <RDouble3D *> (this->GetDataPtr("rtem"));
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+        for (int layer = 1; layer <= 2; ++layer)
+        {
+            int is, js, ks;
+            finestGrid->GetSourceIndexIJK(iFace, layer, is, js, ks);
+            finestGrid->RemapMultigridIJK(0, is, js, ks);
+            PHWrite(dataContainer, rtem(is, js, ks));
+        }
+    }
+}
+
+void StructGrid::UploadGridInfoOnlyforStructHighOrder_mission7(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble3D &rtem = *reinterpret_cast <RDouble3D *> (this->GetDataPtr("rtem"));
+
+    RDouble4D &dqdxnokxi = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdxnokxi"));
+    RDouble4D &dqdynokxi = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdynokxi"));
+    RDouble4D &dqdznokxi = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdznokxi"));
+
+    RDouble4D &dqdxnoeta = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdxnoeta"));
+    RDouble4D &dqdynoeta = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdynoeta"));
+    RDouble4D &dqdznoeta = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdznoeta"));
+
+    RDouble4D &dqdxnocta = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdxnocta"));
+    RDouble4D &dqdynocta = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdynocta"));
+    RDouble4D &dqdznocta = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdznocta"));
+
+    RDouble dqdx_layer1[4];
+    RDouble dqdy_layer1[4];
+    RDouble dqdz_layer1[4];
+
+    RDouble dqdx_layer2[4];
+    RDouble dqdy_layer2[4];
+    RDouble dqdz_layer2[4];
+
+    RDouble dqdx_layer3[4];
+    RDouble dqdy_layer3[4];
+    RDouble dqdz_layer3[4];
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+        
+        int is1, js1, ks1; //! layer = 1
+        int is2, js2, ks2; //! layer = 2
+        int is3, js3, ks3; //! layer = 3
+
+        finestGrid->GetSourceIndexIJK(iFace, 1, is1, js1, ks1);
+        finestGrid->GetSourceIndexIJK(iFace, 2, is2, js2, ks2);
+        finestGrid->GetSourceIndexIJK(iFace, 3, is3, js3, ks3);
+
+        finestGrid->RemapMultigridIJK(0, is1, js1, ks1);
+        finestGrid->RemapMultigridIJK(0, is2, js2, ks2);
+        finestGrid->RemapMultigridIJK(0, is3, js3, ks3);
+        
+        int id, jd, kd;
+        int i_lr, j_lr, k_lr;
+        finestGrid->GetSourceIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+        
+        if (i_lr != 0)
+        {
+            //! I_face
+            for (int m = 0; m < 4; ++ m)
+            {
+                dqdx_layer1[m] = dqdxnokxi(is1, js1, ks1, m);
+                dqdy_layer1[m] = dqdynokxi(is1, js1, ks1, m);
+                dqdz_layer1[m] = dqdznokxi(is1, js1, ks1, m);
+
+                dqdx_layer2[m] = dqdxnokxi(is2, js2, ks2, m);
+                dqdy_layer2[m] = dqdynokxi(is2, js2, ks2, m);
+                dqdz_layer2[m] = dqdznokxi(is2, js2, ks2, m);
+
+                dqdx_layer3[m] = dqdxnokxi(is3, js3, ks3, m);
+                dqdy_layer3[m] = dqdynokxi(is3, js3, ks3, m);
+                dqdz_layer3[m] = dqdznokxi(is3, js3, ks3, m);
+            }
+        }
+        else if (j_lr != 0)
+        {
+            //! J_face
+            for (int m = 0; m < 4; ++ m)
+            {
+                dqdx_layer1[m] = dqdxnoeta(is1, js1, ks1, m);
+                dqdy_layer1[m] = dqdynoeta(is1, js1, ks1, m);
+                dqdz_layer1[m] = dqdznoeta(is1, js1, ks1, m);
+
+                dqdx_layer2[m] = dqdxnoeta(is2, js2, ks2, m);
+                dqdy_layer2[m] = dqdynoeta(is2, js2, ks2, m);
+                dqdz_layer2[m] = dqdznoeta(is2, js2, ks2, m);
+
+                dqdx_layer3[m] = dqdxnoeta(is3, js3, ks3, m);
+                dqdy_layer3[m] = dqdynoeta(is3, js3, ks3, m);
+                dqdz_layer3[m] = dqdznoeta(is3, js3, ks3, m);
+            }
+        }
+        else
+        {
+            //! K_face
+            for (int m = 0; m < 4; ++ m)
+            {
+                dqdx_layer1[m] = dqdxnocta(is1, js1, ks1, m);
+                dqdy_layer1[m] = dqdynocta(is1, js1, ks1, m);
+                dqdz_layer1[m] = dqdznocta(is1, js1, ks1, m);
+
+                dqdx_layer2[m] = dqdxnocta(is2, js2, ks2, m);
+                dqdy_layer2[m] = dqdynocta(is2, js2, ks2, m);
+                dqdz_layer2[m] = dqdznocta(is2, js2, ks2, m);
+
+                dqdx_layer3[m] = dqdxnocta(is3, js3, ks3, m);
+                dqdy_layer3[m] = dqdynocta(is3, js3, ks3, m);
+                dqdz_layer3[m] = dqdznocta(is3, js3, ks3, m);
+            }
+        }
+        
+        PHWrite(dataContainer, rtem(is1, js1, ks1));
+        PHWrite(dataContainer, rtem(is2, js2, ks2));
+
+        for (int m = 0; m < 4; ++ m)
+        {
+            PHWrite(dataContainer, dqdx_layer1[m]);
+            PHWrite(dataContainer, dqdy_layer1[m]);
+            PHWrite(dataContainer, dqdz_layer1[m]);
+
+            PHWrite(dataContainer, dqdx_layer2[m]);
+            PHWrite(dataContainer, dqdy_layer2[m]);
+            PHWrite(dataContainer, dqdz_layer2[m]);
+
+            PHWrite(dataContainer, dqdx_layer3[m]);
+            PHWrite(dataContainer, dqdy_layer3[m]);
+            PHWrite(dataContainer, dqdz_layer3[m]);
+        }
+    }
+}
+
+void StructGrid::UploadGridInfoOnlyforStructHighOrder_mission8(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble3D &rtem = *reinterpret_cast <RDouble3D *> (this->GetDataPtr("rtem"));
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("gradUVWTCellCenterZ"));
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+        
+        int is1, js1, ks1; //! layer = 1
+        int is2, js2, ks2; //! layer = 2
+        int is3, js3, ks3; //! layer = 3
+
+        finestGrid->GetSourceIndexIJK(iFace, 1, is1, js1, ks1);
+        finestGrid->GetSourceIndexIJK(iFace, 2, is2, js2, ks2);
+        finestGrid->GetSourceIndexIJK(iFace, 3, is3, js3, ks3);
+
+        finestGrid->RemapMultigridIJK(0, is1, js1, ks1);
+        finestGrid->RemapMultigridIJK(0, is2, js2, ks2);
+        finestGrid->RemapMultigridIJK(0, is3, js3, ks3);
+
+        PHWrite(dataContainer, rtem(is1, js1, ks1));
+        PHWrite(dataContainer, rtem(is2, js2, ks2));
+
+        PHWrite(dataContainer, gradUVWTCellCenterX(is1, js1, ks1,0));
+        PHWrite(dataContainer, gradUVWTCellCenterX(is1, js1, ks1,1));
+        PHWrite(dataContainer, gradUVWTCellCenterX(is1, js1, ks1,2));
+        PHWrite(dataContainer, gradUVWTCellCenterX(is1, js1, ks1,3));
+
+        PHWrite(dataContainer, gradUVWTCellCenterX(is2, js2, ks2,0));
+        PHWrite(dataContainer, gradUVWTCellCenterX(is2, js2, ks2,1));
+        PHWrite(dataContainer, gradUVWTCellCenterX(is2, js2, ks2,2));
+        PHWrite(dataContainer, gradUVWTCellCenterX(is2, js2, ks2,3));
+
+        PHWrite(dataContainer, gradUVWTCellCenterX(is3, js3, ks3,0));
+        PHWrite(dataContainer, gradUVWTCellCenterX(is3, js3, ks3,1));
+        PHWrite(dataContainer, gradUVWTCellCenterX(is3, js3, ks3,2));
+        PHWrite(dataContainer, gradUVWTCellCenterX(is3, js3, ks3,3));
+
+        PHWrite(dataContainer, gradUVWTCellCenterY(is1, js1, ks1,0));
+        PHWrite(dataContainer, gradUVWTCellCenterY(is1, js1, ks1,1));
+        PHWrite(dataContainer, gradUVWTCellCenterY(is1, js1, ks1,2));
+        PHWrite(dataContainer, gradUVWTCellCenterY(is1, js1, ks1,3));
+
+        PHWrite(dataContainer, gradUVWTCellCenterY(is2, js2, ks2,0));
+        PHWrite(dataContainer, gradUVWTCellCenterY(is2, js2, ks2,1));
+        PHWrite(dataContainer, gradUVWTCellCenterY(is2, js2, ks2,2));
+        PHWrite(dataContainer, gradUVWTCellCenterY(is2, js2, ks2,3));
+
+        PHWrite(dataContainer, gradUVWTCellCenterY(is3, js3, ks3,0));
+        PHWrite(dataContainer, gradUVWTCellCenterY(is3, js3, ks3,1));
+        PHWrite(dataContainer, gradUVWTCellCenterY(is3, js3, ks3,2));
+        PHWrite(dataContainer, gradUVWTCellCenterY(is3, js3, ks3,3));
+
+        PHWrite(dataContainer, gradUVWTCellCenterZ(is1, js1, ks1,0));
+        PHWrite(dataContainer, gradUVWTCellCenterZ(is1, js1, ks1,1));
+        PHWrite(dataContainer, gradUVWTCellCenterZ(is1, js1, ks1,2));
+        PHWrite(dataContainer, gradUVWTCellCenterZ(is1, js1, ks1,3));
+
+        PHWrite(dataContainer, gradUVWTCellCenterZ(is2, js2, ks2,0));
+        PHWrite(dataContainer, gradUVWTCellCenterZ(is2, js2, ks2,1));
+        PHWrite(dataContainer, gradUVWTCellCenterZ(is2, js2, ks2,2));
+        PHWrite(dataContainer, gradUVWTCellCenterZ(is2, js2, ks2,3));
+
+        PHWrite(dataContainer, gradUVWTCellCenterZ(is3, js3, ks3,0));
+        PHWrite(dataContainer, gradUVWTCellCenterZ(is3, js3, ks3,1));
+        PHWrite(dataContainer, gradUVWTCellCenterZ(is3, js3, ks3,2));
+        PHWrite(dataContainer, gradUVWTCellCenterZ(is3, js3, ks3,3));
+    }
+}
+
+void StructGrid::UploadGridInfoOnlyforStructHighOrder_mission9(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble3D &vist = *reinterpret_cast<RDouble3D *> (this->GetDataPtr("vist"));
+    RDouble4D &gradTurbulenceCellCenterX = *reinterpret_cast<RDouble4D *> (this->GetDataPtr("gradTurbulenceCellCenterX"));
+    RDouble4D &gradTurbulenceCellCenterY = *reinterpret_cast<RDouble4D *> (this->GetDataPtr("gradTurbulenceCellCenterY"));
+    RDouble4D &gradTurbulenceCellCenterZ = *reinterpret_cast<RDouble4D *> (this->GetDataPtr("gradTurbulenceCellCenterZ"));
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+        
+        int is1, js1, ks1; //! layer = 1
+
+        finestGrid->GetSourceIndexIJK(iFace, 1, is1, js1, ks1);
+
+        finestGrid->RemapMultigridIJK(0, is1, js1, ks1);
+
+        PHWrite(dataContainer, vist(is1, js1, ks1));
+
+        PHWrite(dataContainer, gradTurbulenceCellCenterX(is1, js1, ks1,ISA));
+        PHWrite(dataContainer, gradTurbulenceCellCenterY(is1, js1, ks1,ISA));
+        PHWrite(dataContainer, gradTurbulenceCellCenterZ(is1, js1, ks1,ISA));
+    }
+}
+
+void StructGrid::UploadGridInfoOnlyforStructHighOrder_mission10(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble3D &blend = *reinterpret_cast<RDouble3D *> (this->GetDataPtr("blend"));
+    RDouble3D &vist  = *reinterpret_cast<RDouble3D *> (this->GetDataPtr("vist"));
+    RDouble4D &gradTurbulenceCellCenterX = *reinterpret_cast<RDouble4D *> (this->GetDataPtr("gradTurbulenceCellCenterX"));
+    RDouble4D &gradTurbulenceCellCenterY = *reinterpret_cast<RDouble4D *> (this->GetDataPtr("gradTurbulenceCellCenterY"));
+    RDouble4D &gradTurbulenceCellCenterZ = *reinterpret_cast<RDouble4D *> (this->GetDataPtr("gradTurbulenceCellCenterZ"));
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+        
+        int is1, js1, ks1; //! layer = 1
+
+        finestGrid->GetSourceIndexIJK(iFace, 1, is1, js1, ks1);
+
+        finestGrid->RemapMultigridIJK(0, is1, js1, ks1);
+
+        PHWrite(dataContainer, blend(is1, js1, ks1));
+
+        PHWrite(dataContainer, vist(is1, js1, ks1));
+
+        PHWrite(dataContainer, gradTurbulenceCellCenterX(is1, js1, ks1,IKE));
+        PHWrite(dataContainer, gradTurbulenceCellCenterX(is1, js1, ks1,IKW));
+
+        PHWrite(dataContainer, gradTurbulenceCellCenterY(is1, js1, ks1,IKE));
+        PHWrite(dataContainer, gradTurbulenceCellCenterY(is1, js1, ks1,IKW));
+
+        PHWrite(dataContainer, gradTurbulenceCellCenterZ(is1, js1, ks1,IKE));
+        PHWrite(dataContainer, gradTurbulenceCellCenterZ(is1, js1, ks1,IKW));
+    }
+}
+
+void StructGrid::UploadGridInfoOnlyforStructHighOrder_mission11(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble3D &vist  = *reinterpret_cast<RDouble3D *> (this->GetDataPtr("vist"));
+    RDouble3D &subgridScaleEnergy  = *reinterpret_cast<RDouble3D *> (this->GetDataPtr("subgridScaleEnergy"));
+    RDouble3D &turbulentPrandtlNumber = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("turbulentPrandtlNumber"));
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+        
+        int is1, js1, ks1; //! layer = 1
+
+        finestGrid->GetSourceIndexIJK(iFace, 1, is1, js1, ks1);
+
+        finestGrid->RemapMultigridIJK(0, is1, js1, ks1);
+
+        PHWrite(dataContainer, vist(is1, js1, ks1));
+
+        PHWrite(dataContainer, subgridScaleEnergy(is1, js1, ks1));
+
+        PHWrite(dataContainer, turbulentPrandtlNumber(is1, js1, ks1));
+    }
+}
+
+void StructGrid::DownloadGridInfoOnlyforStructHighOrder_mission1(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+    
+    RDouble3D &vol = *this->GetCellVolume();
+    RDouble3D &xcc = *this->GetCellCenterX();
+    RDouble3D &ycc = *this->GetCellCenterY();
+    RDouble3D &zcc = *this->GetCellCenterZ();
+    
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+    
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+
+        for (int layer = 1; layer <= 4; ++ layer)
+        {
+            int it, jt, kt;
+            finestGrid->GetTargetIndexIJK(iFace,layer, it, jt, kt);
+            finestGrid->RemapMultigridIJK(level, it, jt, kt);
+            
+            PHRead(dataContainer, xcc(it, jt, kt));
+            PHRead(dataContainer, ycc(it, jt, kt));
+            PHRead(dataContainer, zcc(it, jt, kt));
+            PHRead(dataContainer, vol(it, jt, kt));
+        }
+
+        RDouble Data1stLayer[4][3];
+        RDouble Data2ndLayer[4][3];
+        for (int nodeID = 0; nodeID < 4; ++nodeID)
+        {
+            PHRead(dataContainer, Data1stLayer[nodeID][0]);
+            PHRead(dataContainer, Data1stLayer[nodeID][1]);
+            PHRead(dataContainer, Data1stLayer[nodeID][2]);
+
+            PHRead(dataContainer, Data2ndLayer[nodeID][0]);
+            PHRead(dataContainer, Data2ndLayer[nodeID][1]);
+            PHRead(dataContainer, Data2ndLayer[nodeID][2]);
+        }  
+
+        int IJKofNodes1stLayer[4][3];
+        int IJKofNodes2ndLayer[4][3];
+        GetNodeIJKfromTargetIndex(finestGrid, iFace, 1, IJKofNodes1stLayer);
+        GetNodeIJKfromTargetIndex(finestGrid, iFace, 2, IJKofNodes2ndLayer);
+
+        RDouble XYZofNodes1stLayer[4][3];
+        for (int nodeID = 0; nodeID < 4; ++nodeID)
+        {
+            XYZofNodes1stLayer[nodeID][0] = xx(IJKofNodes1stLayer[nodeID][0], IJKofNodes1stLayer[nodeID][1], IJKofNodes1stLayer[nodeID][2]);
+            XYZofNodes1stLayer[nodeID][1] = yy(IJKofNodes1stLayer[nodeID][0], IJKofNodes1stLayer[nodeID][1], IJKofNodes1stLayer[nodeID][2]);
+            XYZofNodes1stLayer[nodeID][2] = zz(IJKofNodes1stLayer[nodeID][0], IJKofNodes1stLayer[nodeID][1], IJKofNodes1stLayer[nodeID][2]);
+        }
+        
+        int RelationBetweenTwoPairsofNodes[4];
+        GetRelationBetweenTwoPairsofNodes(RelationBetweenTwoPairsofNodes, XYZofNodes1stLayer, Data1stLayer);
+        
+        for (int nodeID = 0; nodeID < 4; ++nodeID)
+        {
+            int abcdID = RelationBetweenTwoPairsofNodes[nodeID];            
+            xx(IJKofNodes2ndLayer[nodeID][0], IJKofNodes2ndLayer[nodeID][1], IJKofNodes2ndLayer[nodeID][2]) = Data2ndLayer[abcdID][0];
+            yy(IJKofNodes2ndLayer[nodeID][0], IJKofNodes2ndLayer[nodeID][1], IJKofNodes2ndLayer[nodeID][2]) = Data2ndLayer[abcdID][1];
+            zz(IJKofNodes2ndLayer[nodeID][0], IJKofNodes2ndLayer[nodeID][1], IJKofNodes2ndLayer[nodeID][2]) = Data2ndLayer[abcdID][2];
+        }        
+    }  
+}
+
+void StructGrid::DownloadGridInfoOnlyforStructHighOrder_mission2(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+    
+    RDouble3D &xx = * this->GetStructX();
+    RDouble3D &yy = * this->GetStructY();
+    RDouble3D &zz = * this->GetStructZ();
+    
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+
+        RDouble Data1stLayer[4][3];
+        for (int nodeID = 0; nodeID <= 3; ++nodeID)
+        {
+            PHRead(dataContainer, Data1stLayer[nodeID][0]);
+            PHRead(dataContainer, Data1stLayer[nodeID][1]);
+            PHRead(dataContainer, Data1stLayer[nodeID][2]);
+        }
+
+        RDouble ab[3];
+        RDouble ad[3];
+        RDouble bc[3];
+        RDouble ba[3];
+        RDouble cd[3];
+        RDouble cb[3];
+        RDouble da[3];
+        RDouble dc[3];
+
+        PHRead(dataContainer, ab[0]);
+        PHRead(dataContainer, ab[1]);
+        PHRead(dataContainer, ab[2]);
+
+        PHRead(dataContainer, ad[0]);
+        PHRead(dataContainer, ad[1]);
+        PHRead(dataContainer, ad[2]);
+
+        PHRead(dataContainer, bc[0]);
+        PHRead(dataContainer, bc[1]);
+        PHRead(dataContainer, bc[2]);
+
+        PHRead(dataContainer, ba[0]);
+        PHRead(dataContainer, ba[1]);
+        PHRead(dataContainer, ba[2]);
+
+        PHRead(dataContainer, cd[0]);
+        PHRead(dataContainer, cd[1]);
+        PHRead(dataContainer, cd[2]);
+
+        PHRead(dataContainer, cb[0]);
+        PHRead(dataContainer, cb[1]);
+        PHRead(dataContainer, cb[2]);
+
+        PHRead(dataContainer, da[0]);
+        PHRead(dataContainer, da[1]);
+        PHRead(dataContainer, da[2]);
+
+        PHRead(dataContainer, dc[0]);
+        PHRead(dataContainer, dc[1]);
+        PHRead(dataContainer, dc[2]);
+
+        int IJKofNodes1stLayer[12][3];
+        int IJKofNodes2ndLayer[12][3];
+        GetNodeIJKfromTargetIndexghostofghost(finestGrid, iFace, 1, IJKofNodes1stLayer);
+        GetNodeIJKfromTargetIndexghostofghost(finestGrid, iFace, 2, IJKofNodes2ndLayer);
+
+        RDouble XYZofNodes1stLayer[4][3];
+        for (int nodeID = 0; nodeID <= 3; ++nodeID)
+        {
+            XYZofNodes1stLayer[nodeID][0] = xx(IJKofNodes1stLayer[nodeID][0], IJKofNodes1stLayer[nodeID][1], IJKofNodes1stLayer[nodeID][2]);
+            XYZofNodes1stLayer[nodeID][1] = yy(IJKofNodes1stLayer[nodeID][0], IJKofNodes1stLayer[nodeID][1], IJKofNodes1stLayer[nodeID][2]);
+            XYZofNodes1stLayer[nodeID][2] = zz(IJKofNodes1stLayer[nodeID][0], IJKofNodes1stLayer[nodeID][1], IJKofNodes1stLayer[nodeID][2]);
+        }
+        
+        int mapcase = GetRelationshipBetweenTwoPairsofNodes(XYZofNodes1stLayer, Data1stLayer);
+
+        if (mapcase == 1)
+        {
+            xx(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = ab[0];
+            yy(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = ab[1];
+            zz(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = ab[2];
+
+            xx(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = ad[0];
+            yy(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = ad[1];
+            zz(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = ad[2];
+
+            xx(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = bc[0];
+            yy(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = bc[1];
+            zz(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = bc[2];
+
+            xx(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = ba[0];
+            yy(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = ba[1];
+            zz(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = ba[2];
+
+            xx(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = cd[0];
+            yy(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = cd[1];
+            zz(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = cd[2];
+
+            xx(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = cb[0];
+            yy(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = cb[1];
+            zz(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = cb[2];
+
+            xx(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = da[0];
+            yy(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = da[1];
+            zz(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = da[2];
+
+            xx(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = dc[0];
+            yy(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = dc[1];
+            zz(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = dc[2];
+        }
+        else if (mapcase == 2)
+        {
+            xx(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = ad[0];
+            yy(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = ad[1];
+            zz(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = ad[2];
+
+            xx(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = ab[0];
+            yy(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = ab[1];
+            zz(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = ab[2];
+
+            xx(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = dc[0];
+            yy(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = dc[1];
+            zz(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = dc[2];
+
+            xx(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = da[0];
+            yy(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = da[1];
+            zz(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = da[2];
+
+            xx(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = cb[0];
+            yy(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = cb[1];
+            zz(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = cb[2];
+
+            xx(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = cd[0];
+            yy(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = cd[1];
+            zz(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = cd[2];
+
+            xx(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = ba[0];
+            yy(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = ba[1];
+            zz(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = ba[2];
+
+            xx(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = bc[0];
+            yy(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = bc[1];
+            zz(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = bc[2];
+        }
+        else if (mapcase == 3)
+        {
+            xx(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = ba[0];
+            yy(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = ba[1];
+            zz(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = ba[2];
+
+            xx(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = bc[0];
+            yy(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = bc[1];
+            zz(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = bc[2];
+
+            xx(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = ad[0];
+            yy(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = ad[1];
+            zz(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = ad[2];
+
+            xx(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = ab[0];
+            yy(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = ab[1];
+            zz(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = ab[2];
+
+            xx(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = dc[0];
+            yy(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = dc[1];
+            zz(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = dc[2];
+
+            xx(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = da[0];
+            yy(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = da[1];
+            zz(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = da[2];
+
+            xx(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = cb[0];
+            yy(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = cb[1];
+            zz(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = cb[2];
+
+            xx(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = cd[0];
+            yy(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = cd[1];
+            zz(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = cd[2];
+        }
+        else if (mapcase == 4)
+        {
+            xx(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = bc[0];
+            yy(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = bc[1];
+            zz(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = bc[2];
+
+            xx(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = ba[0];
+            yy(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = ba[1];
+            zz(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = ba[2];
+
+            xx(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = cd[0];
+            yy(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = cd[1];
+            zz(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = cd[2];
+
+            xx(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = cb[0];
+            yy(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = cb[1];
+            zz(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = cb[2];
+
+            xx(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = da[0];
+            yy(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = da[1];
+            zz(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = da[2];
+
+            xx(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = dc[0];
+            yy(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = dc[1];
+            zz(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = dc[2];
+
+            xx(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = ab[0];
+            yy(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = ab[1];
+            zz(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = ab[2];
+
+            xx(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = ad[0];
+            yy(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = ad[1];
+            zz(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = ad[2];
+        }
+        else if (mapcase == 5)
+        {
+            xx(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = cb[0];
+            yy(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = cb[1];
+            zz(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = cb[2];
+
+            xx(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = cd[0];
+            yy(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = cd[1];
+            zz(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = cd[2];
+
+            xx(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = ba[0];
+            yy(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = ba[1];
+            zz(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = ba[2];
+
+            xx(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = bc[0];
+            yy(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = bc[1];
+            zz(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = bc[2];
+
+            xx(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = ad[0];
+            yy(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = ad[1];
+            zz(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = ad[2];
+
+            xx(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = ab[0];
+            yy(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = ab[1];
+            zz(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = ab[2];
+
+            xx(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = dc[0];
+            yy(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = dc[1];
+            zz(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = dc[2];
+
+            xx(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = da[0];
+            yy(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = da[1];
+            zz(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = da[2];
+        }
+        else if (mapcase == 6)
+        {
+            xx(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = cd[0];
+            yy(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = cd[1];
+            zz(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = cd[2];
+
+            xx(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = cb[0];
+            yy(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = cb[1];
+            zz(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = cb[2];
+
+            xx(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = da[0];
+            yy(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = da[1];
+            zz(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = da[2];
+
+            xx(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = dc[0];
+            yy(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = dc[1];
+            zz(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = dc[2];
+
+            xx(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = ab[0];
+            yy(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = ab[1];
+            zz(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = ab[2];
+
+            xx(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = ad[0];
+            yy(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = ad[1];
+            zz(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = ad[2];
+
+            xx(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = bc[0];
+            yy(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = bc[1];
+            zz(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = bc[2];
+
+            xx(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = ba[0];
+            yy(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = ba[1];
+            zz(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = ba[2];
+        }
+        else if (mapcase == 7)
+        {
+            xx(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = da[0];
+            yy(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = da[1];
+            zz(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = da[2];
+
+            xx(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = dc[0];
+            yy(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = dc[1];
+            zz(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = dc[2];
+
+            xx(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = ab[0];
+            yy(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = ab[1];
+            zz(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = ab[2];
+
+            xx(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = ad[0];
+            yy(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = ad[1];
+            zz(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = ad[2];
+
+            xx(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = bc[0];
+            yy(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = bc[1];
+            zz(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = bc[2];
+
+            xx(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = ba[0];
+            yy(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = ba[1];
+            zz(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = ba[2];
+
+            xx(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = cd[0];
+            yy(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = cd[1];
+            zz(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = cd[2];
+
+            xx(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = cb[0];
+            yy(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = cb[1];
+            zz(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = cb[2];
+        }
+        else if (mapcase == 8)
+        {
+            xx(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = dc[0];
+            yy(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = dc[1];
+            zz(IJKofNodes2ndLayer[ 4][0], IJKofNodes2ndLayer[ 4][1], IJKofNodes2ndLayer[ 4][2]) = dc[2];
+
+            xx(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = da[0];
+            yy(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = da[1];
+            zz(IJKofNodes2ndLayer[ 5][0], IJKofNodes2ndLayer[ 5][1], IJKofNodes2ndLayer[ 5][2]) = da[2];
+
+            xx(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = cb[0];
+            yy(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = cb[1];
+            zz(IJKofNodes2ndLayer[ 6][0], IJKofNodes2ndLayer[ 6][1], IJKofNodes2ndLayer[ 6][2]) = cb[2];
+
+            xx(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = cd[0];
+            yy(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = cd[1];
+            zz(IJKofNodes2ndLayer[ 7][0], IJKofNodes2ndLayer[ 7][1], IJKofNodes2ndLayer[ 7][2]) = cd[2];
+
+            xx(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = ba[0];
+            yy(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = ba[1];
+            zz(IJKofNodes2ndLayer[ 8][0], IJKofNodes2ndLayer[ 8][1], IJKofNodes2ndLayer[ 8][2]) = ba[2];
+
+            xx(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = bc[0];
+            yy(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = bc[1];
+            zz(IJKofNodes2ndLayer[ 9][0], IJKofNodes2ndLayer[ 9][1], IJKofNodes2ndLayer[ 9][2]) = bc[2];
+
+            xx(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = ad[0];
+            yy(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = ad[1];
+            zz(IJKofNodes2ndLayer[10][0], IJKofNodes2ndLayer[10][1], IJKofNodes2ndLayer[10][2]) = ad[2];
+
+            xx(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = ab[0];
+            yy(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = ab[1];
+            zz(IJKofNodes2ndLayer[11][0], IJKofNodes2ndLayer[11][1], IJKofNodes2ndLayer[11][2]) = ab[2];
+        }
+    }  
+}
+
+void StructGrid::DownloadGridInfoOnlyforStructHighOrder_mission3(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+    
+    RDouble4D &xfn  = *(this->GetFaceNormalX());
+    RDouble4D &yfn  = *(this->GetFaceNormalY());
+    RDouble4D &zfn  = *(this->GetFaceNormalZ());
+    RDouble4D &area = *(this->GetFaceArea());
+    RDouble4D &xfv  = *(this->GetFaceVectorX());
+    RDouble4D &yfv  = *(this->GetFaceVectorY());
+    RDouble4D &zfv  = *(this->GetFaceVectorZ());
+    
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+
+        for (int layer = 1; layer <= 2; ++ layer)
+        {
+            int it, jt, kt;
+            finestGrid->GetTargetIndexIJK(iFace,layer, it, jt, kt);
+            finestGrid->RemapMultigridIJK(level, it, jt, kt);
+
+            RDouble KX, KY, KZ;
+
+            PHRead(dataContainer, KX);
+            PHRead(dataContainer, KY);
+            PHRead(dataContainer, KZ);
+            
+            int id, jd, kd;
+            int i_lr, j_lr, k_lr;
+            finestGrid->GetTargetIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+            if (i_lr != 0)
+            {
+                //! I_face
+                if (i_lr == -1)
+                {
+                    //! left boundary                    
+                    RDouble nx = - KX;
+                    RDouble ny = - KY;
+                    RDouble nz = - KZ;
+                    
+                    RDouble ds = sqrt(nx * nx + ny * ny + nz * nz);
+                    
+                    xfv (it, jt, kt, 1) = nx;
+                    yfv (it, jt, kt, 1) = ny;
+                    zfv (it, jt, kt, 1) = nz;
+                    area(it, jt, kt, 1) = ds;
+                    xfn (it, jt, kt, 1) = nx / (ds + TINY);
+                    yfn (it, jt, kt, 1) = ny / (ds + TINY);
+                    zfn (it, jt, kt, 1) = nz / (ds + TINY);
+                }
+                else
+                {
+                    //! right boundary
+                    RDouble nx = KX;
+                    RDouble ny = KY;
+                    RDouble nz = KZ;
+                    
+                    RDouble ds = sqrt(nx * nx + ny * ny + nz * nz);
+                    
+                    xfv (it+1, jt, kt, 1) = nx;
+                    yfv (it+1, jt, kt, 1) = ny;
+                    zfv (it+1, jt, kt, 1) = nz;
+                    area(it+1, jt, kt, 1) = ds;
+                    xfn (it+1, jt, kt, 1) = nx / (ds + TINY);
+                    yfn (it+1, jt, kt, 1) = ny / (ds + TINY);
+                    zfn (it+1, jt, kt, 1) = nz / (ds + TINY);
+                }
+            }
+            else if (j_lr != 0)
+            {
+                //! J_face
+                if (j_lr == -1)
+                {
+                    //! left boundary                    
+                    RDouble nx = - KX;
+                    RDouble ny = - KY;
+                    RDouble nz = - KZ;
+                    
+                    RDouble ds = sqrt(nx * nx + ny * ny + nz * nz);
+                    
+                    xfv (it, jt, kt, 2) = nx;
+                    yfv (it, jt, kt, 2) = ny;
+                    zfv (it, jt, kt, 2) = nz;
+                    area(it, jt, kt, 2) = ds;
+                    xfn (it, jt, kt, 2) = nx / (ds + TINY);
+                    yfn (it, jt, kt, 2) = ny / (ds + TINY);
+                    zfn (it, jt, kt, 2) = nz / (ds + TINY);
+                }
+                else
+                {
+                    //! right boundary
+                    RDouble nx = KX;
+                    RDouble ny = KY;
+                    RDouble nz = KZ;
+                    
+                    RDouble ds = sqrt(nx * nx + ny * ny + nz * nz);
+                    
+                    xfv (it, jt+1, kt, 2) = nx;
+                    yfv (it, jt+1, kt, 2) = ny;
+                    zfv (it, jt+1, kt, 2) = nz;
+                    area(it, jt+1, kt, 2) = ds;
+                    xfn (it, jt+1, kt, 2) = nx / (ds + TINY);
+                    yfn (it, jt+1, kt, 2) = ny / (ds + TINY);
+                    zfn (it, jt+1, kt, 2) = nz / (ds + TINY);
+                }
+            }
+            else
+            {
+                //! K_face
+                if (k_lr == -1)
+                {
+                    //! left boundary                    
+                    RDouble nx = - KX;
+                    RDouble ny = - KY;
+                    RDouble nz = - KZ;
+                    
+                    RDouble ds = sqrt(nx * nx + ny * ny + nz * nz);
+                    
+                    xfv (it, jt, kt, 3) = nx;
+                    yfv (it, jt, kt, 3) = ny;
+                    zfv (it, jt, kt, 3) = nz;
+                    area(it, jt, kt, 3) = ds;
+                    xfn (it, jt, kt, 3) = nx / (ds + TINY);
+                    yfn (it, jt, kt, 3) = ny / (ds + TINY);
+                    zfn (it, jt, kt, 3) = nz / (ds + TINY);
+                }
+                else
+                {
+                    //! right boundary
+                    RDouble nx = KX;
+                    RDouble ny = KY;
+                    RDouble nz = KZ;
+                    
+                    RDouble ds = sqrt(nx * nx + ny * ny + nz * nz);
+                    
+                    xfv (it, jt, kt+1, 3) = nx;
+                    yfv (it, jt, kt+1, 3) = ny;
+                    zfv (it, jt, kt+1, 3) = nz;
+                    area(it, jt, kt+1, 3) = ds;
+                    xfn (it, jt, kt+1, 3) = nx / (ds + TINY);
+                    yfn (it, jt, kt+1, 3) = ny / (ds + TINY);
+                    zfn (it, jt, kt+1, 3) = nz / (ds + TINY);
+                }
+            }  
+        }
+    }  
+}
+
+void StructGrid::DownloadGridInfoOnlyforStructHighOrder_mission4(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+    
+    RDouble3D &vol = *this->GetCellVolume();
+    
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+
+        for (int layer = 1; layer <= 4; ++ layer)
+        {
+            int it, jt, kt;
+            finestGrid->GetTargetIndexIJK(iFace,layer, it, jt, kt);
+            finestGrid->RemapMultigridIJK(level, it, jt, kt);
+
+            PHRead(dataContainer, vol(it, jt, kt));
+        }
+    }  
+}
+
+void StructGrid::DownloadGridInfoOnlyforStructHighOrder_mission5(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &q_FD = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("q_FD"));
+
+    int nEquation = 5;
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+        for (int layer = 3; layer <= 4; ++layer)
+        {
+            int it, jt, kt;
+            finestGrid->GetTargetIndexIJK(iFace, layer, it, jt, kt);
+            finestGrid->RemapMultigridIJK(0, it, jt, kt);
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                PHRead(dataContainer, q_FD(it, jt, kt, m));
+            }
+        }
+    }
+}
+
+void StructGrid::DownloadGridInfoOnlyforStructHighOrder_mission6(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble3D &rtem = *reinterpret_cast <RDouble3D *> (this->GetDataPtr("rtem"));
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+        for (int layer = 1; layer <= 2; ++layer)
+        {
+            int it, jt, kt;
+            finestGrid->GetTargetIndexIJK(iFace, layer, it, jt, kt);
+            finestGrid->RemapMultigridIJK(0, it, jt, kt);
+            PHRead(dataContainer, rtem(it, jt, kt));
+        }
+    }
+}
+
+void StructGrid::DownloadGridInfoOnlyforStructHighOrder_mission7(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble3D &rtem = *reinterpret_cast <RDouble3D *> (this->GetDataPtr("rtem"));
+    RDouble4D &dqdxnokxi = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdxnokxi"));
+    RDouble4D &dqdynokxi = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdynokxi"));
+    RDouble4D &dqdznokxi = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdznokxi"));
+
+    RDouble4D &dqdxnoeta = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdxnoeta"));
+    RDouble4D &dqdynoeta = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdynoeta"));
+    RDouble4D &dqdznoeta = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdznoeta"));
+
+    RDouble4D &dqdxnocta = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdxnocta"));
+    RDouble4D &dqdynocta = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdynocta"));
+    RDouble4D &dqdznocta = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("dqdznocta"));
+
+    RDouble dqdx_layer1[4];
+    RDouble dqdy_layer1[4];
+    RDouble dqdz_layer1[4];
+
+    RDouble dqdx_layer2[4];
+    RDouble dqdy_layer2[4];
+    RDouble dqdz_layer2[4];
+
+    RDouble dqdx_layer3[4];
+    RDouble dqdy_layer3[4];
+    RDouble dqdz_layer3[4];
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+        
+        int it1, jt1, kt1; //! layer = 1;
+        int it2, jt2, kt2; //! layer = 2;
+        int it3, jt3, kt3; //! layer = 3;
+
+        finestGrid->GetTargetIndexIJK(iFace, 1, it1, jt1, kt1);
+        finestGrid->GetTargetIndexIJK(iFace, 2, it2, jt2, kt2);
+        finestGrid->GetTargetIndexIJK(iFace, 3, it3, jt3, kt3);
+
+        finestGrid->RemapMultigridIJK(0, it1, jt1, kt1);
+        finestGrid->RemapMultigridIJK(0, it2, jt2, kt2);
+        finestGrid->RemapMultigridIJK(0, it3, jt3, kt3);
+
+        PHRead(dataContainer, rtem(it1, jt1, kt1));
+        PHRead(dataContainer, rtem(it2, jt2, kt2));
+
+        for (int m = 0; m < 4; ++ m)
+        {
+            PHRead(dataContainer, dqdx_layer1[m]);
+            PHRead(dataContainer, dqdy_layer1[m]);
+            PHRead(dataContainer, dqdz_layer1[m]);
+
+            PHRead(dataContainer, dqdx_layer2[m]);
+            PHRead(dataContainer, dqdy_layer2[m]);
+            PHRead(dataContainer, dqdz_layer2[m]);
+
+            PHRead(dataContainer, dqdx_layer3[m]);
+            PHRead(dataContainer, dqdy_layer3[m]);
+            PHRead(dataContainer, dqdz_layer3[m]);
+        }
+        
+        int id, jd, kd;
+        int i_lr, j_lr, k_lr;
+        finestGrid->GetTargetIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+        if (i_lr != 0)
+        {
+            //! I_face.
+            for (int m = 0; m < 4; ++ m)
+            {
+                dqdxnokxi(it1, jt1, kt1, m) = dqdx_layer1[m];
+                dqdynokxi(it1, jt1, kt1, m) = dqdy_layer1[m];
+                dqdznokxi(it1, jt1, kt1, m) = dqdz_layer1[m];
+
+                dqdxnokxi(it2, jt2, kt2, m) = dqdx_layer2[m];
+                dqdynokxi(it2, jt2, kt2, m) = dqdy_layer2[m];
+                dqdznokxi(it2, jt2, kt2, m) = dqdz_layer2[m];
+
+                dqdxnokxi(it3, jt3, kt3, m) = dqdx_layer3[m];
+                dqdynokxi(it3, jt3, kt3, m) = dqdy_layer3[m];
+                dqdznokxi(it3, jt3, kt3, m) = dqdz_layer3[m];
+            }
+        }
+        else if (j_lr != 0)
+        {
+            //! J_face.
+            for (int m = 0; m < 4; ++ m)
+            {
+                dqdxnoeta(it1, jt1, kt1, m) = dqdx_layer1[m];
+                dqdynoeta(it1, jt1, kt1, m) = dqdy_layer1[m];
+                dqdznoeta(it1, jt1, kt1, m) = dqdz_layer1[m];
+
+                dqdxnoeta(it2, jt2, kt2, m) = dqdx_layer2[m];
+                dqdynoeta(it2, jt2, kt2, m) = dqdy_layer2[m];
+                dqdznoeta(it2, jt2, kt2, m) = dqdz_layer2[m];
+
+                dqdxnoeta(it3, jt3, kt3, m) = dqdx_layer3[m];
+                dqdynoeta(it3, jt3, kt3, m) = dqdy_layer3[m];
+                dqdznoeta(it3, jt3, kt3, m) = dqdz_layer3[m];
+            }
+        }
+        else
+        {
+            //! K_face.
+            for (int m = 0; m < 4; ++ m)
+            {
+                dqdxnocta(it1, jt1, kt1, m) = dqdx_layer1[m];
+                dqdynocta(it1, jt1, kt1, m) = dqdy_layer1[m];
+                dqdznocta(it1, jt1, kt1, m) = dqdz_layer1[m];
+
+                dqdxnocta(it2, jt2, kt2, m) = dqdx_layer2[m];
+                dqdynocta(it2, jt2, kt2, m) = dqdy_layer2[m];
+                dqdznocta(it2, jt2, kt2, m) = dqdz_layer2[m];
+
+                dqdxnocta(it3, jt3, kt3, m) = dqdx_layer3[m];
+                dqdynocta(it3, jt3, kt3, m) = dqdy_layer3[m];
+                dqdznocta(it3, jt3, kt3, m) = dqdz_layer3[m];
+            }
+        }
+    }
+}
+
+void StructGrid::DownloadGridInfoOnlyforStructHighOrder_mission8(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble3D &rtem = *reinterpret_cast <RDouble3D *> (this->GetDataPtr("rtem"));
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast <RDouble4D *> (this->GetDataPtr("gradUVWTCellCenterZ"));
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+        
+        int it1, jt1, kt1; //! layer = 1;
+        int it2, jt2, kt2; //! layer = 2;
+        int it3, jt3, kt3; //! layer = 3;
+
+        finestGrid->GetTargetIndexIJK(iFace, 1, it1, jt1, kt1);
+        finestGrid->GetTargetIndexIJK(iFace, 2, it2, jt2, kt2);
+        finestGrid->GetTargetIndexIJK(iFace, 3, it3, jt3, kt3);
+
+        finestGrid->RemapMultigridIJK(0, it1, jt1, kt1);
+        finestGrid->RemapMultigridIJK(0, it2, jt2, kt2);
+        finestGrid->RemapMultigridIJK(0, it3, jt3, kt3);
+
+        PHRead(dataContainer, rtem(it1, jt1, kt1));
+        PHRead(dataContainer, rtem(it2, jt2, kt2));
+
+        PHRead(dataContainer, gradUVWTCellCenterX(it1, jt1, kt1,0));
+        PHRead(dataContainer, gradUVWTCellCenterX(it1, jt1, kt1,1));
+        PHRead(dataContainer, gradUVWTCellCenterX(it1, jt1, kt1,2));
+        PHRead(dataContainer, gradUVWTCellCenterX(it1, jt1, kt1,3));
+
+        PHRead(dataContainer, gradUVWTCellCenterX(it2, jt2, kt2,0));
+        PHRead(dataContainer, gradUVWTCellCenterX(it2, jt2, kt2,1));
+        PHRead(dataContainer, gradUVWTCellCenterX(it2, jt2, kt2,2));
+        PHRead(dataContainer, gradUVWTCellCenterX(it2, jt2, kt2,3));
+
+        PHRead(dataContainer, gradUVWTCellCenterX(it3, jt3, kt3,0));
+        PHRead(dataContainer, gradUVWTCellCenterX(it3, jt3, kt3,1));
+        PHRead(dataContainer, gradUVWTCellCenterX(it3, jt3, kt3,2));
+        PHRead(dataContainer, gradUVWTCellCenterX(it3, jt3, kt3,3));
+
+        PHRead(dataContainer, gradUVWTCellCenterY(it1, jt1, kt1,0));
+        PHRead(dataContainer, gradUVWTCellCenterY(it1, jt1, kt1,1));
+        PHRead(dataContainer, gradUVWTCellCenterY(it1, jt1, kt1,2));
+        PHRead(dataContainer, gradUVWTCellCenterY(it1, jt1, kt1,3));
+
+        PHRead(dataContainer, gradUVWTCellCenterY(it2, jt2, kt2,0));
+        PHRead(dataContainer, gradUVWTCellCenterY(it2, jt2, kt2,1));
+        PHRead(dataContainer, gradUVWTCellCenterY(it2, jt2, kt2,2));
+        PHRead(dataContainer, gradUVWTCellCenterY(it2, jt2, kt2,3));
+
+        PHRead(dataContainer, gradUVWTCellCenterY(it3, jt3, kt3,0));
+        PHRead(dataContainer, gradUVWTCellCenterY(it3, jt3, kt3,1));
+        PHRead(dataContainer, gradUVWTCellCenterY(it3, jt3, kt3,2));
+        PHRead(dataContainer, gradUVWTCellCenterY(it3, jt3, kt3,3));
+
+        PHRead(dataContainer, gradUVWTCellCenterZ(it1, jt1, kt1,0));
+        PHRead(dataContainer, gradUVWTCellCenterZ(it1, jt1, kt1,1));
+        PHRead(dataContainer, gradUVWTCellCenterZ(it1, jt1, kt1,2));
+        PHRead(dataContainer, gradUVWTCellCenterZ(it1, jt1, kt1,3));
+
+        PHRead(dataContainer, gradUVWTCellCenterZ(it2, jt2, kt2,0));
+        PHRead(dataContainer, gradUVWTCellCenterZ(it2, jt2, kt2,1));
+        PHRead(dataContainer, gradUVWTCellCenterZ(it2, jt2, kt2,2));
+        PHRead(dataContainer, gradUVWTCellCenterZ(it2, jt2, kt2,3));
+
+        PHRead(dataContainer, gradUVWTCellCenterZ(it3, jt3, kt3,0));
+        PHRead(dataContainer, gradUVWTCellCenterZ(it3, jt3, kt3,1));
+        PHRead(dataContainer, gradUVWTCellCenterZ(it3, jt3, kt3,2));
+        PHRead(dataContainer, gradUVWTCellCenterZ(it3, jt3, kt3,3));
+    }
+}
+
+void StructGrid::DownloadGridInfoOnlyforStructHighOrder_mission9(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble3D &vist = *reinterpret_cast<RDouble3D *> (this->GetDataPtr("vist"));
+    RDouble4D &gradTurbulenceCellCenterX = *reinterpret_cast<RDouble4D *> (this->GetDataPtr("gradTurbulenceCellCenterX"));
+    RDouble4D &gradTurbulenceCellCenterY = *reinterpret_cast<RDouble4D *> (this->GetDataPtr("gradTurbulenceCellCenterY"));
+    RDouble4D &gradTurbulenceCellCenterZ = *reinterpret_cast<RDouble4D *> (this->GetDataPtr("gradTurbulenceCellCenterZ"));
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+        
+        int it1, jt1, kt1; //! layer = 1;
+
+        finestGrid->GetTargetIndexIJK(iFace, 1, it1, jt1, kt1);
+
+        finestGrid->RemapMultigridIJK(0, it1, jt1, kt1);
+
+        PHRead(dataContainer, vist(it1, jt1, kt1));
+
+        PHRead(dataContainer, gradTurbulenceCellCenterX(it1, jt1, kt1,ISA));
+        PHRead(dataContainer, gradTurbulenceCellCenterY(it1, jt1, kt1,ISA));
+        PHRead(dataContainer, gradTurbulenceCellCenterZ(it1, jt1, kt1,ISA));
+    }
+}
+
+void StructGrid::DownloadGridInfoOnlyforStructHighOrder_mission10(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble3D &blend = *reinterpret_cast<RDouble3D *> (this->GetDataPtr("blend"));
+    RDouble3D &vist = *reinterpret_cast<RDouble3D *> (this->GetDataPtr("vist"));
+    RDouble4D &gradTurbulenceCellCenterX = *reinterpret_cast<RDouble4D *> (this->GetDataPtr("gradTurbulenceCellCenterX"));
+    RDouble4D &gradTurbulenceCellCenterY = *reinterpret_cast<RDouble4D *> (this->GetDataPtr("gradTurbulenceCellCenterY"));
+    RDouble4D &gradTurbulenceCellCenterZ = *reinterpret_cast<RDouble4D *> (this->GetDataPtr("gradTurbulenceCellCenterZ"));
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+        
+        int it1, jt1, kt1; //! layer = 1;
+
+        finestGrid->GetTargetIndexIJK(iFace, 1, it1, jt1, kt1);
+
+        finestGrid->RemapMultigridIJK(0, it1, jt1, kt1);
+
+        PHRead(dataContainer, blend(it1, jt1, kt1));
+
+        PHRead(dataContainer, vist(it1, jt1, kt1));
+
+        PHRead(dataContainer, gradTurbulenceCellCenterX(it1, jt1, kt1,IKE));
+        PHRead(dataContainer, gradTurbulenceCellCenterX(it1, jt1, kt1,IKW));
+
+        PHRead(dataContainer, gradTurbulenceCellCenterY(it1, jt1, kt1,IKE));
+        PHRead(dataContainer, gradTurbulenceCellCenterY(it1, jt1, kt1,IKW));
+
+        PHRead(dataContainer, gradTurbulenceCellCenterZ(it1, jt1, kt1,IKE));
+        PHRead(dataContainer, gradTurbulenceCellCenterZ(it1, jt1, kt1,IKW));
+    }
+}
+
+void StructGrid::DownloadGridInfoOnlyforStructHighOrder_mission11(DataContainer *&dataContainer, const int &neighborZoneIndex)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(this->GetFinestGrid());
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble3D &vist = *reinterpret_cast<RDouble3D *> (this->GetDataPtr("vist"));
+
+    RDouble3D &subgridScaleEnergy = *reinterpret_cast<RDouble3D *> (this->GetDataPtr("subgridScaleEnergy"));
+
+    RDouble3D &turbulentPrandtlNumber = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("turbulentPrandtlNumber"));
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+        
+        int it1, jt1, kt1; //! layer = 1;
+
+        finestGrid->GetTargetIndexIJK(iFace, 1, it1, jt1, kt1);
+
+        finestGrid->RemapMultigridIJK(0, it1, jt1, kt1);
+
+        PHRead(dataContainer, vist(it1, jt1, kt1));
+
+        PHRead(dataContainer, subgridScaleEnergy(it1, jt1, kt1));
+
+        PHRead(dataContainer, turbulentPrandtlNumber(it1, jt1, kt1));
+    }
+}
+
+}
diff --git a/API/IO/include/IO_FileName.h b/API/IO/include/IO_FileName.h
new file mode 100644
index 0000000..20b0746
--- /dev/null
+++ b/API/IO/include/IO_FileName.h
@@ -0,0 +1,88 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      IO_FileName.h
+//! @brief     file name.
+//! @author    Baka.
+
+#pragma once
+#include <sstream>
+using namespace std;
+
+namespace PHSPACE
+{
+
+//! Return the file name of the current processor.
+//! The processor ID would be add to the input filename.
+void GetFileNameofThisProcessor(string &filename);
+
+//! Add digits to file name.
+string AddDigitToFileName(const string &fname, const string &fext, const string &sep, int num);
+
+string GetDefaultDirectory();
+
+string AbsoluteFilename(const string &relativeFilename);
+
+//! Get the file name's extension.
+void GetFileNameExtension(const string &fullName, string &mainName, string &extensionName, const string &fileNameSeparator);
+
+//! Change the file name's extension.
+string ChangeExtensionOfFileName(const string &fileName, const string &newExtension);
+
+//! Change the file's main name.
+string ChangeFileMainName(const string &fileName, const string &newMainName);
+
+int ExtractNumberOfPartFromFileName(const string &source);
+
+template < typename T >
+string AddSymbolToFileName(const string &fileName, const T &symbol)
+{
+    if (fileName == "") return "";
+
+    string mainName, extensionName;
+    GetFileNameExtension(fileName, mainName, extensionName, ".");
+
+    ostringstream oss;
+    oss << mainName << symbol << "." << extensionName;
+    return oss.str();
+}
+
+template < typename T1, typename T2 >
+string AddSymbolToFileName(const string &fileName, const T1 &v1, const T2 &v2)
+{
+    if (fileName == "") return "";
+
+    string mainName, extensionName;
+    GetFileNameExtension(fileName, mainName, extensionName, ".");
+
+    ostringstream oss;
+    oss << mainName << v1 << v2 << "." << extensionName;
+    return oss.str();
+}
+
+template < typename T1, typename T2, typename T3 >
+string AddSymbolToFileName(const string &fileName, const T1 &v1, const T2 &v2, const T3 &v3)
+{
+    if (fileName == "") return "";
+
+    string mainName, extensionName;
+    GetFileNameExtension(fileName, mainName, extensionName, ".");
+
+    ostringstream oss;
+    oss << mainName << v1 << v2 << v3 << "." << extensionName;
+    return oss.str();
+}
+
+string GetProcessPath();
+
+string GetCurrentWorkDir();
+
+}
\ No newline at end of file
diff --git a/API/IO/include/IO_FileReader.h b/API/IO/include/IO_FileReader.h
new file mode 100644
index 0000000..85e1726
--- /dev/null
+++ b/API/IO/include/IO_FileReader.h
@@ -0,0 +1,116 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      IO_FileReader.h
+//! @brief     file reader.
+//! @author    Guo Yongheng.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "TK_Parse.h"
+
+namespace PHSPACE
+{
+class IO_FileReader
+{
+private:
+    std::string *line, *separator;
+    fstream *file;
+    int setfileFlag;
+
+    std::string fileName;
+    ios_base::openmode fileOpenMode;
+    streamsize filePosition;
+public:
+    LIB_EXPORT  IO_FileReader();
+    LIB_EXPORT ~IO_FileReader();
+
+public:
+    //! Open the file.
+    //! @param[in] fileName        file name.
+    //! @param[in] fileOpenMode    open mode.
+    void OpenFile(const string &fileName, const ios_base::openmode &fileOpenMode);
+
+    //! Close the file.
+    void CloseFile();
+
+    //!
+    void MarkCurrentFilePosition();
+
+    //!
+    void MoveToPreviousFilePosition();
+
+public:
+    void SetDefaultFile(std::fstream *defaultFileIn);
+    void SetDefaultSeparator(const std::string &separatorIn) { * this->separator = separatorIn; }
+
+    std::string  * GetDefaultLine() { return line; }
+    std::fstream * GetDefaultFile() { return file; }
+    std::string  * GetDefaultSeparator() { return separator; }
+public:
+    //!
+    void SetLineContent(const std::string &lineContent) { * this->line = lineContent; }
+
+    //!
+    void ShiftLineContent(int numberOfChars) { * this->line = (* this->line).substr(numberOfChars); }
+
+    bool ReadNextMeaningfulLine();
+    bool ReachTheEndOfFile();
+    bool IsArrayParameter();
+
+public:
+    //! Skip lines.
+    //! @param[in] numberOfLinesToSkip    the number of lines to skip.
+    void SkipLines(int numberOfLinesToSkip);
+
+    //!
+    void ReadNextNonEmptyLine();
+
+    //!
+    void DumpLineContentToScreen();
+
+    //!
+    std::string ReadNextWord();
+
+    //!
+    std::string ReadNextWord(const std::string &separator);
+
+    //!
+    std::string ReadNextWordToLowerCase();
+
+    //!
+    std::string ReadNextWordToLowerCase(const std::string &separator);
+public:
+    //!
+    void SkipReadSymbol(const string &stringSymbol);
+
+    //!
+    void SkipReadWholeBlock();
+
+public:
+    template < typename T >
+    friend inline IO_FileReader & operator >> (IO_FileReader &ioStruct, T &value)
+    {
+        fstream &file = * ioStruct.GetDefaultFile();
+        file >> value;
+        return ioStruct;
+    }
+
+    template < typename T >
+    T ReadNextDigit(ios_base & (* f)(ios_base &) = & std::dec)
+    {
+        std::string word = PHSPACE::FindNextWord(*line, *separator);
+        T value = PHSPACE::StringToDigit< T >(word, f);
+        return value;
+    }
+};
+
+}
\ No newline at end of file
diff --git a/API/IO/include/IO_HDF5File.h b/API/IO/include/IO_HDF5File.h
new file mode 100644
index 0000000..83c51f7
--- /dev/null
+++ b/API/IO/include/IO_HDF5File.h
@@ -0,0 +1,77 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      IO_HDF5File.h
+//! @brief     file reader.
+//! @author    Baka.
+
+#pragma once
+#include "hdf5.h"
+#include "Precision.h"
+#include "Pointer.h"
+#include "ActionKey.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+//! Create a HDF5 file.
+//! @param[in] filename    file name.
+hid_t CreateHDF5File(const string &filename);
+
+//! Open a HDF5 file.
+//! @param[in] filename    file name.
+hid_t OpenHDF5File(const string &filename);
+
+//! If myid equals fileserver, create a HDF5 file according to actkey.
+//! @param[in] actkey    an action key.
+void ParallelCreateHDF5File(ActionKey *actionKey);
+
+//! If myid equals fileserver, close a HDF5 file according to actkey.
+//! @param[in] actkey    an action key.
+void ParallelCloseHDF5File(ActionKey *actionKey);
+
+//!
+void CreateGroup(hid_t loc_id, const string &groupName);
+
+hid_t OpenGroup(hid_t loc_id, const string &groupName);
+
+hid_t GetGroup(hid_t loc_id, const string &groupName);
+
+//!
+void CreateEmptyData(hid_t loc_id, const string &dataName, hsize_t rowNumber, hsize_t rowLength, int type);
+
+hid_t OpenData(hid_t loc_id, const string &dataName);
+
+//!
+void CreateAndWriteData(hid_t loc_id, const string &dataName, hsize_t rowNumber, hsize_t rowLength, int type, const void *data);
+
+void WriteData(hid_t loc_id, const void *data, const string &dataName);
+
+void ReadData(hid_t loc_id, void *data, const string &dataName);
+
+//!
+RDouble * ReadDoubleOneRow(hid_t loc_id, const string &dataName);
+
+int  * ReadIntOneRow(hid_t loc_id, const string &dataName);
+
+int ** ReadIntTwoRow(hid_t loc_id, const string &dataName);
+
+char * ReadCharData(hid_t loc_id, const string &dataName);
+
+bool CheckDataExist(hid_t loc_id, const string &dataName);
+
+int  GetObjNumber(hid_t loc_id);
+
+void GetObjNameList(hid_t loc_id, string *objNameList);
+
+void GetObjTypeList(hid_t loc_id, H5G_obj_t *objTypeList);
+}
\ No newline at end of file
diff --git a/API/IO/include/IO_VirtualFile.h b/API/IO/include/IO_VirtualFile.h
new file mode 100644
index 0000000..8558ab0
--- /dev/null
+++ b/API/IO/include/IO_VirtualFile.h
@@ -0,0 +1,99 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      IO_VirtualFile.h
+//! @brief     Define the class VirtualFile.
+//! @author    Refactored by He Xianyao, Bell.
+
+#pragma once
+#include <fstream>
+#include "DataContainer.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+//! @brief The virtual file class.
+class VirtualFile
+{
+private:
+    int key;
+    fstream *file;
+    DataContainer *cdata;
+
+public:
+    VirtualFile(fstream *file) { this->file = file; key = 0; }
+    VirtualFile(DataContainer *cdata) { this->cdata = cdata; key = 1; }
+
+public:
+    //! Read data from file or datacontainer.
+    //! @param[in] data    data address.
+    //! @param[in] size    data size.
+    void read(void *data, streamsize size);
+
+    //! Write data to file or datacontainer.
+    //! @param[in] data    data address.
+    //! @param[in] size    data size.
+    void write(void *data, streamsize size);
+
+    //! Begin to read.
+    void BeginReadWork();
+
+    //! Mark section end only for key = 0.
+    void EndReadWork();
+
+    //! Mark and write section_begin only for key = 0.
+    void BeginWriteWork();
+    
+    //! Do something to end writing.
+    void EndWriteWork();
+
+    //! Read data length.
+    void ReadDataLength();
+    
+    //! Write section_begin.
+    void ReservePlaceholder();
+    
+    //! Return 0 or file pointer location.
+    streamsize GetCurrentPosition();
+
+private:
+    //! section_begin assignment.
+    void MarkSectionBegin();
+
+    //! section_end assignment.
+    void MarkSectionEnd();
+    
+    //! Return section_begin.
+    streamsize GetSectionBegin();
+    
+    //! Return section_end.
+    streamsize GetSectionEnd();
+    
+    //! Move to some position.
+    void MoveToPosition(streamsize section_pos);
+    
+    //! Move to the begin of section.
+    void MoveToSectionBegin();
+    
+    //! Move to the end of section.
+    void MoveToSectionEnd();
+    
+    //! Calculate the data_len and write it.
+    void WriteDataLength();
+
+private:
+    streamsize section_begin, section_end, data_len;
+};
+
+#include "IO_VirtualFile.hxx"
+}
\ No newline at end of file
diff --git a/API/IO/include/IO_VirtualFile.hxx b/API/IO/include/IO_VirtualFile.hxx
new file mode 100644
index 0000000..b1f2544
--- /dev/null
+++ b/API/IO/include/IO_VirtualFile.hxx
@@ -0,0 +1,11 @@
+//! Return section_begin.
+inline streamsize VirtualFile::GetSectionBegin()
+{
+    return section_begin;
+}
+
+//! Return section_end.
+inline streamsize VirtualFile::GetSectionEnd()
+{
+    return section_end;
+}
\ No newline at end of file
diff --git a/API/IO/include/PHIO.h b/API/IO/include/PHIO.h
new file mode 100644
index 0000000..9799ae2
--- /dev/null
+++ b/API/IO/include/PHIO.h
@@ -0,0 +1,180 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      IO.h
+//! @brief     Declare some IO functions.
+//! @author    Refactored by He Xianyao, Bell.
+
+#pragma once
+#include "IO_VirtualFile.h"
+#include "LIB_Macro.h"
+#include "ActionKey.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+//! If myid equals fileserver, open a file with "openmode" mode.
+//! @param[in] file        file stream flow.
+//! @param[in] fileName    file name.
+//! @param[in] openMode    open mode.
+LIB_EXPORT void ParallelOpenFile(fstream &file, const string &fileName, const ios_base::openmode &openMode);
+
+//! If myid equals fileserver, open a file according to actkey.
+//! @param[in] actkey    an action key.
+LIB_EXPORT void ParallelOpenFile(ActionKey *actkey);
+
+//! Open a file according to actkey, this function is used by p2p mode.
+//! @param[in] actionKey    an action key.
+LIB_EXPORT void ParallelOpenFile2(ActionKey *actionKey);
+
+//! Open a file with "openmode" mode.
+//! @param[in] file        file stream flow.
+//! @param[in] fileName    file name.
+//! @param[in] openMode    open mode.
+LIB_EXPORT void OpenFile(fstream &file, const string &fileName, const ios_base::openmode &openMode);
+
+//! Open a file with "openmode" mode.
+//! It is different with OpenFile, this function will auto add _0 after filename.
+//! e.g filename = aaa.fts, it will open aaa_0.fts.
+//! @param[in] file        file stream flow.
+//! @param[in] fileName    file name.
+//! @param[in] openMode    open mode.
+LIB_EXPORT void OpenSerialFile(fstream &file, const string &filename, const ios_base::openmode &openmode);
+
+//! If myid equals fileserver, close a file.
+//! @param[in] file    file stream flow.
+LIB_EXPORT void ParallelCloseFile(fstream &file);
+
+//! If myid equals fileserver, close a file according to actkey.
+//! @param[in] actionKey    an action key.
+LIB_EXPORT void ParallelCloseFile(ActionKey *actionKey);
+
+//! Close a file.
+//! @param[in] file    file stream flow.
+LIB_EXPORT void CloseFile(fstream &file);
+
+//! Close a file.
+//! @param[in] file    file stream flow.
+LIB_EXPORT void CloseFile(ifstream &file);
+
+//! Close a file.
+//! @param[in] file    file stream flow.
+LIB_EXPORT void CloseFile(ofstream &file);
+
+//! Close a file according to actkey.
+//! @param[in] actkey    an action key.
+LIB_EXPORT void CloseFile(ActionKey *actkey);
+
+//! Read data from file to datacontainer.
+//! @param[in] file     file stream flow.
+//! @param[in] cdata    the datacontainer.
+LIB_EXPORT void ReadFile(fstream &file, DataContainer *cdata);
+
+//! According to actkey, read data from file to datacontainer.
+//! @param[in] actkey    an action key.
+LIB_EXPORT void ReadFile(ActionKey *actkey);
+
+//! Write data from datacontainer to file.
+//! @param[in] file     file stream flow.
+//! @param[in] cdata    the datacontainer.
+LIB_EXPORT void WriteFile(fstream &file, DataContainer *cdata);
+
+//! According to actkey, write data from datacontainer to file.
+//! @param[in] actkey    an action key.
+LIB_EXPORT void WriteFile(ActionKey *actkey);
+
+//! Output str to file.
+//! @param[in] file    file stream flow.
+//! @param[in] str     a string.
+LIB_EXPORT void WriteASCIIFile(fstream &file, const string &str);
+
+//! Output oss to file.
+//! @param[in] file    file stream flow.
+//! @param[in] oss     a string stream.
+LIB_EXPORT void WriteASCIIFile(fstream &file, std::ostringstream &oss);
+
+//! Output datacontainer to file.
+//! @param[in] file     file stream flow.
+//! @param[in] cdata    the datacontainer.
+LIB_EXPORT void WriteASCIIFile(fstream &file, DataContainer *cdata);
+
+//! Output according to actkey.
+//! @param[in] actkey    an action key.
+//! @param[in] oss       a string stream.
+LIB_EXPORT void WriteASCIIFile(ActionKey *actionKey, std::ostringstream &oss);
+
+//! Output according to actkey.
+//! @param[in] actkey    an action key.
+LIB_EXPORT void WriteASCIIFile(ActionKey *actkey);
+
+//! Useless.
+//! @param[in] actkey    an action key.
+LIB_EXPORT void WriteBinaryFile(ActionKey *actkey);
+
+//! Write sentinel file needed by GUI.
+LIB_EXPORT void WriteSentinelFile();
+
+//! Output to screen from datacontainer.
+//! @param[in] cdata    the datacontainer.
+LIB_EXPORT void WriteScreen(DataContainer *cdata);
+
+//! Output to screen according to actkey.
+//! @param[in] actkey    an action key.
+LIB_EXPORT void WriteScreen(ActionKey *actkey);
+
+//! Judge file empty or not.
+//! @param[in] file    file stream flow.
+LIB_EXPORT bool IfFileEmpty(fstream &file);
+
+//! Judge file exist or not.
+//! @param[in] fileName    file name.
+LIB_EXPORT bool FileExist(const string &fileName);
+
+//! Judge SerialFile exist or not.
+//! SerialFile names add _0 after filename, e.g filename = aaa.fts.
+//! This will judge if aaa_0.fts exist or not.
+//! @param[in] fileName    file name.
+LIB_EXPORT bool SerialFileExist(const string &fileName);
+
+//! Read from file and send the data to others.
+//! @param[in] file         file stream flow.
+//! @param[in] cdata        the datacontainer.
+//! @param[in] send_proc    send process.
+//! @param[in] recv_proc    receive process.
+//! @param[in] tag          tag flag.
+LIB_EXPORT void ReadAbstractData(fstream &file, DataContainer *cdata, int send_proc, int recv_proc, int tag = 0);
+
+//! Read control parameters info.
+//! At first, read keyInfo from file(./bin/key.hypara).
+//! Then, according to the nsimutask info from key.hypara, read corresponding file.
+//! Example:    int nsimutask = 2;
+//!             string parafilename = "./bin/cfd_para.hypara";
+LIB_EXPORT void ReadControlParameters();
+
+LIB_EXPORT void ReadKeyInfo();
+
+LIB_EXPORT void ReadDefaultParamInfo();
+
+LIB_EXPORT void ReadParamInfo();
+
+LIB_EXPORT void ReadParamInfo(const string &filename);
+
+LIB_EXPORT void BroadcastInfo();
+
+LIB_EXPORT void CompleteParamInfo();
+
+LIB_EXPORT void PrintInflowConditionToWindow(void);
+
+LIB_EXPORT void ModifyWindowTemperature(RDouble &wallTemperature, vector< RDouble > &WallT, vector< int > &WallNumber);
+
+#include "PHIO.hxx"
+}
\ No newline at end of file
diff --git a/API/IO/include/PHIO.hxx b/API/IO/include/PHIO.hxx
new file mode 100644
index 0000000..e852fe2
--- /dev/null
+++ b/API/IO/include/PHIO.hxx
@@ -0,0 +1,156 @@
+//! Read a value from file.
+//! @param[in] file     file stream flow.
+//! @param[in] value    variable name.
+template < typename T >
+LIB_EXPORT void PHRead(fstream *file, T &value)
+{
+    file->read(reinterpret_cast<char *>(&value), sizeof(T));
+}
+
+//! Read a value from file.
+//! @param[in] file     file stream flow.
+//! @param[in] value    variable name.
+template < typename T >
+LIB_EXPORT void PHRead(fstream &file, T &value)
+{
+    PHRead(&file, value);
+}
+
+//! Read a field from file.
+//! @param[in] file     file stream flow.
+//! @param[in] field    variable field.
+//! @param[in] numberOfElements    number of field elements.
+template < typename T >
+LIB_EXPORT void PHRead(fstream *file, T *field, int numberOfElements)
+{
+    file->read(reinterpret_cast<char *>(field), numberOfElements * sizeof(T));
+}
+
+//! Read a field from file.
+//! @param[in] file     file stream flow.
+//! @param[in] field    variable field.
+//! @param[in] numberOfElements    number of field elements.
+template < typename T >
+LIB_EXPORT void PHRead(fstream &file, T *field, int numberOfElements)
+{
+    PHRead(&file, field, numberOfElements);
+}
+
+//! Read a field from file.
+//! @param[in] file     file stream flow.
+//! @param[in] field    variable field.
+//! @param[in] numberOfElements    number of field elements.
+template < typename T >
+LIB_EXPORT void PHRead(fstream *file, vector< T > &field, int numberOfElements)
+{
+    PHRead(*file, field, numberOfElements);
+}
+
+//! Read a field from file.
+//! @param[in] file     file stream flow.
+//! @param[in] field    variable field.
+//! @param[in] numberOfElements    number of field elements.
+template < typename T >
+LIB_EXPORT void PHRead(fstream &file, vector< T > &field, int numberOfElements)
+{
+    PHRead(&file, &field[0], numberOfElements);
+}
+
+//! Read a value from virtual file.
+//! @param[in] virtualFile    virtual file.
+//! @param[in] value          variable name.
+template < typename T >
+LIB_EXPORT void PHRead(VirtualFile *virtualFile, T &value)
+{
+    virtualFile->read(&value, sizeof(T));
+}
+
+//! Read a field from virtual file.
+//! @param[in] virtualFile    virtual file.
+//! @param[in] field          variable field.
+//! @param[in] numberOfElements    number of field elements.
+template < typename T >
+LIB_EXPORT void PHRead(VirtualFile *virtualFile, T *field, int numberOfElements)
+{
+    virtualFile->read(field, numberOfElements * sizeof(T));
+}
+
+template < typename T >
+void PHSkipRead(fstream *file, int numberOfElements)
+{
+    int bufferSize = sizeof(T) * numberOfElements;
+    file->seekg(bufferSize, ios::cur);
+}
+
+template < typename T >
+void PHSkipRead(fstream &file, int numberOfElements)
+{
+    PHSkipRead< T >(&file, numberOfElements);
+}
+
+//! Write a value to file.
+//! @param[in] file     file stream flow.
+//! @param[in] value    variable name.
+template < typename T >
+LIB_EXPORT void PHWrite(fstream *file, T &value)
+{
+    file->write(reinterpret_cast<char *>(&value), sizeof(T));
+}
+
+//! Write a value to file.
+//! @param[in] file     file stream flow.
+//! @param[in] value    variable name.
+template < typename T >
+LIB_EXPORT void PHWrite(fstream &file, T &value)
+{
+    PHWrite(&file, value);
+}
+
+//! Write a field to file.
+//! @param[in] file     file stream flow.
+//! @param[in] field    variable field.
+//! @param[in] numberOfElements    number of field elements.
+template < typename T >
+LIB_EXPORT void PHWrite(fstream *file, T *field, int numberOfElements)
+{
+    file->write(reinterpret_cast<char *>(field), numberOfElements * sizeof(T));
+}
+
+//! Write a field to file.
+//! @param[in] file     file stream flow.
+//! @param[in] field    variable field.
+//! @param[in] numberOfElements    number of field elements.
+template < typename T >
+LIB_EXPORT void PHWrite(fstream &file, T *field, int numberOfElements)
+{
+    PHWrite(&file, field, numberOfElements);
+}
+
+//! Write a field to file.
+//! @param[in] file     file stream flow.
+//! @param[in] field    variable field.
+//! @param[in] numberOfElements    number of field elements.
+template < typename T >
+LIB_EXPORT void PHWrite(fstream &file, vector< T > &field, int numberOfElements)
+{
+    PHWrite(&file, &field[0], numberOfElements);
+}
+
+//! Write a value to virtual file.
+//! @param[in] virtualFile    virtual file.
+//! @param[in] value          variable name.
+template < typename T >
+LIB_EXPORT void PHWrite(VirtualFile *virtualFile, T &value)
+{
+    virtualFile->write(&value, sizeof(T));
+}
+
+//! Write a field to virtual file.
+//! @param[in] virtualFile    virtual file.
+//! @param[in] field          variable field.
+//! @param[in] numberOfElements    number of field elements.
+template < typename T >
+LIB_EXPORT void PHWrite(VirtualFile *virtualFile, T *field, int numberOfElements)
+{
+    virtualFile->write(field, numberOfElements * sizeof(T));
+}
\ No newline at end of file
diff --git a/API/IO/src/IO_FileName.cpp b/API/IO/src/IO_FileName.cpp
new file mode 100644
index 0000000..90dd440
--- /dev/null
+++ b/API/IO/src/IO_FileName.cpp
@@ -0,0 +1,163 @@
+#include "IO_FileName.h"
+#include "TK_Exit.h"
+#include "TK_Parse.h"
+#ifdef USE_WINDOWS_X64
+#include <direct.h>
+#include <windows.h>
+#else
+#include <unistd.h>
+#endif
+#define BUF_SIZE 4096
+
+namespace PHSPACE
+{
+void GetFileNameofThisProcessor(string &filename)
+{
+    //! If serial run, do not change file name.
+    if (!PHMPI::IsParallelRun())
+    {
+        return;
+    }
+
+    string fname, fext;
+    GetNameExt(filename, fname, fext, ".");
+    int myID = PHMPI::GetCurrentProcessorID();
+    filename = AddDigitToFileName(fname, fext, ".", myID);
+}
+
+string AddDigitToFileName(const string &fname, const string &fext, const string &sep, int num)
+{
+    std::ostringstream oss;
+    if (fname.empty()) return oss.str();
+
+    oss << fname << num << sep << fext;
+    return oss.str();
+}
+
+string GetDefaultDirectory()
+{
+    return "./results/";
+}
+
+string AbsoluteFilename(const string &relativeFilename)
+{
+    string filename = GetDefaultDirectory();
+    filename += relativeFilename;
+    return filename;
+}
+
+void GetFileNameExtension(const string &fullName, string &mainName, string &extensionName, const string &fileNameSeparator)
+{
+    basic_string <char>::size_type index;
+
+    index         = fullName.find_last_of(fileNameSeparator);
+    mainName      = fullName.substr(0, index);
+    extensionName = fullName.substr(index+1, fullName.length() - index - 1);
+}
+
+string ChangeExtensionOfFileName(const string &fileName, const string &newExtension)
+{
+    string mainName, extensionName;
+    GetFileNameExtension(fileName, mainName, extensionName, ".");
+
+    ostringstream oss;
+    oss << mainName << "." << newExtension;
+    return oss.str();
+}
+
+string ChangeFileMainName(const string &fileName, const string &newMainName)
+{
+    string mainName, extensionName;
+    GetFileNameExtension(fileName, mainName, extensionName, ".");
+
+    ostringstream oss;
+    oss << newMainName << "." << extensionName;
+    return oss.str();
+}
+
+int ExtractNumberOfPartFromFileName(const string &source)
+{
+    int prePosition = -1;
+    for (int iChar = 1; iChar < static_cast<int>(source.size()); ++ iChar)
+    {
+        char ch = source[iChar];
+        if (ch == '_')
+        {
+            int iCharTmp = iChar - 1;
+            if (ch == source[iCharTmp])
+            {
+                prePosition = iChar;
+                break;
+            }
+        }
+    }
+
+    if (prePosition == -1)
+    {
+        TK_Exit::PrintDebugInfoExit("Error: Can not Extract Number Of Parts From File Name!");
+        exit(0);
+    }
+
+    string number;
+    int iCharTmp = prePosition + 1;
+    for (std::size_t iChar = iCharTmp; iChar < source.size(); ++ iChar)
+    {
+        char ch = source[iChar];
+        if (ch != '_' && ch != '-' && ch != '.')
+        {
+            number.push_back(ch);
+        }
+        else
+        {
+            break;
+        }
+    }
+
+    int numberParts = -1;
+    from_string<int>(numberParts, number, std::dec);
+    return numberParts;
+}
+
+string GetProcessPath()
+{
+#ifdef USE_WINDOWS_X64
+    char szFilePath[MAX_PATH];
+    GetModuleFileNameA(NULL, szFilePath, MAX_PATH);
+    std::string strFilePath(szFilePath);
+    strFilePath = strFilePath.substr(0, strFilePath.find_last_of("\\"));
+    strFilePath = strFilePath.substr(0, strFilePath.find_last_of("\\"));
+    return strFilePath;
+#else
+    char abs_path[BUF_SIZE];
+    int cnt = readlink("/proc/self/exe", abs_path, BUF_SIZE);
+    if (cnt < 0 || cnt >= BUF_SIZE)
+    {
+        return NULL;
+    }
+
+    for (int i = cnt; i >= 0; --i)
+    {
+        if (abs_path[i] == '/')
+        {
+            abs_path[i] = '\0';
+            break;
+        }
+    }
+    return string(abs_path);
+#endif
+}
+
+#pragma warning(disable:4996)
+string GetCurrentWorkDir()
+{
+    char buf_ptr[BUF_SIZE];
+    char *ptr;
+    ptr = getcwd(buf_ptr, BUF_SIZE);
+    if (ptr == NULL)
+    {
+        return NULL;
+    }
+    return string(ptr);
+}
+
+}
\ No newline at end of file
diff --git a/API/IO/src/IO_FileReader.cpp b/API/IO/src/IO_FileReader.cpp
new file mode 100644
index 0000000..b8ba60e
--- /dev/null
+++ b/API/IO/src/IO_FileReader.cpp
@@ -0,0 +1,174 @@
+#include "IO_FileReader.h"
+#include "TK_Parse.h"
+#include "PHIO.h"
+
+namespace PHSPACE
+{
+LIB_EXPORT IO_FileReader::IO_FileReader()
+{
+    line        = new std::string;
+    separator   = new std::string;
+    file        = new fstream;
+    setfileFlag = 0;
+    string keyWordSeparator = " =\r\n\t#$,;\"";
+    this->SetDefaultSeparator(keyWordSeparator);
+}
+
+LIB_EXPORT IO_FileReader::~IO_FileReader()
+{
+    delete line;
+    delete separator;
+    if (setfileFlag == 0)
+    {
+        delete file;
+    }
+}
+
+void IO_FileReader::OpenFile(const string &fileName, const ios_base::openmode &fileOpenMode)
+{
+    this->fileName     = fileName;
+    this->fileOpenMode = fileOpenMode;
+    PHSPACE::OpenFile(*file, fileName, fileOpenMode);
+}
+
+void IO_FileReader::CloseFile()
+{
+    PHSPACE::CloseFile(*file);
+}
+
+void IO_FileReader::MarkCurrentFilePosition()
+{
+    filePosition = file->tellp();
+}
+
+void IO_FileReader::MoveToPreviousFilePosition()
+{
+    file->seekp(filePosition);
+}
+
+void IO_FileReader::SetDefaultFile(std::fstream *defaultFileIn)
+{
+    if (setfileFlag == 0)
+    {
+        delete file;
+    }
+    this->file = defaultFileIn;
+    setfileFlag = 1;
+}
+
+bool IO_FileReader::ReadNextMeaningfulLine()
+{
+    while (!this->ReachTheEndOfFile())
+    {
+        PHSPACE::ReadNextLine(*file, *line);
+
+        if (PHSPACE::IsEmptyLine(*line) || PHSPACE::IsCommentLine(*line))
+        {
+            continue;
+        }
+        return true;
+    }
+    return false;
+}
+
+bool IO_FileReader::ReachTheEndOfFile()
+{
+    if ((*file).eof())
+    {
+        return true;
+    }
+    return false;
+}
+
+bool IO_FileReader::IsArrayParameter()
+{
+    return PHSPACE::IsArrayParameter(* this->line);
+}
+
+void IO_FileReader::SkipLines(int numberOfLinesToSkip)
+{
+    PHSPACE::SkipLines(*file, numberOfLinesToSkip);
+}
+
+void IO_FileReader::ReadNextNonEmptyLine()
+{
+    PHSPACE::ReadNextNonEmptyLine(* this->file, * this->line);
+}
+
+void IO_FileReader::DumpLineContentToScreen()
+{
+    cout << *line << "\n";
+}
+
+std::string IO_FileReader::ReadNextWord()
+{
+    string word = PHSPACE::FindNextWord(* this->line, * this->separator);
+    return word;
+}
+
+std::string IO_FileReader::ReadNextWord(const std::string &separator)
+{
+    string word = PHSPACE::FindNextWord(* this->line, separator);
+    return word;
+}
+
+string IO_FileReader::ReadNextWordToLowerCase()
+{
+    string word = PHSPACE::FindNextWord(* this->line, * this->separator);
+
+    PHSPACE::ToLowerCase(word);
+    return word;
+}
+
+string IO_FileReader::ReadNextWordToLowerCase(const std::string &separator)
+{
+    string word = PHSPACE::FindNextWord(* this->line, separator);
+    PHSPACE::ToLowerCase(word);
+    return word;
+}
+
+void IO_FileReader::SkipReadSymbol(const string &stringSymbol)
+{
+    while (!this->ReachTheEndOfFile())
+    {
+        bool resultFlag = this->ReadNextMeaningfulLine();
+        if (!resultFlag) break;
+
+        string word = this->ReadNextWord();
+
+        if (word == stringSymbol)
+        {
+            return;
+        }
+    }
+}
+
+void IO_FileReader::SkipReadWholeBlock()
+{
+    int countOfLeftBrackets  = 0;
+    int countOfRightBrackets = 0;
+
+    while (!this->ReachTheEndOfFile())
+    {
+        bool resultFlag = this->ReadNextMeaningfulLine();
+        if (!resultFlag) break;
+
+        string word = this->ReadNextWord();
+
+        if (word == "{")
+        {
+            ++ countOfLeftBrackets;
+        }
+        else if (word == "}")
+        {
+            ++ countOfRightBrackets;
+        }
+
+        if (countOfLeftBrackets == countOfRightBrackets)
+        {
+            return;
+        }
+    }
+}
+
+}
\ No newline at end of file
diff --git a/API/IO/src/IO_HDF5File.cpp b/API/IO/src/IO_HDF5File.cpp
new file mode 100644
index 0000000..de95d63
--- /dev/null
+++ b/API/IO/src/IO_HDF5File.cpp
@@ -0,0 +1,442 @@
+#include "IO_HDF5File.h"
+#include "Constants.h"
+#include "IO_FileName.h"
+#include "TK_Exit.h"
+
+namespace PHSPACE
+{
+using namespace PHMPI;
+
+hid_t CreateHDF5File(const string &filename)
+{
+    hid_t file, acc_tpl1;
+    herr_t status;
+
+    acc_tpl1 = H5Pcreate(H5P_FILE_ACCESS);
+    status = H5Pset_fapl_mpio(acc_tpl1, MPI_COMM_WORLD, MPI_INFO_NULL);
+
+    file = H5Fcreate(filename.c_str(), H5F_ACC_TRUNC, H5P_DEFAULT, acc_tpl1);
+
+    status = H5Pclose(acc_tpl1);
+    return file;
+}
+
+void ParallelCreateHDF5File(ActionKey *actionKey)
+{
+    if (actionKey->filename == "")
+    {
+        actionKey->filepos = 0;
+        actionKey->del_file = false;
+    }
+    else
+    {
+        if (PHMPI::IsCurrentProcessorFileServer() == 0)
+        {
+            return;
+        }
+
+        int fileID = PHMPI::GetFileIndexofCurrentProcessor();
+        string finalFileName = PHSPACE::AddSymbolToFileName(actionKey->filename, '_', fileID);
+        actionKey->filepos = H5Fcreate(finalFileName.c_str(), H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT);
+        actionKey->del_file = true;
+    }
+}
+
+void ParallelCloseHDF5File(ActionKey *actionKey)
+{
+    if (PHMPI::IsCurrentProcessorFileServer() == 0)
+    {
+        return;
+    }
+
+    H5Fclose(actionKey->filepos);
+}
+
+hid_t OpenHDF5File(const string &filename)
+{
+    hid_t file;
+    file = H5Fopen(filename.c_str(), H5F_ACC_RDONLY, H5P_DEFAULT);
+
+    return file;
+}
+
+void CreateGroup(hid_t loc_id, const string &groupName)
+{
+    hid_t grpData;
+
+    grpData = H5Gcreate2(loc_id, groupName.c_str(), H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT);
+    H5Gclose(grpData);
+}
+
+hid_t OpenGroup(hid_t loc_id, const string &groupName)
+{
+    hid_t grpData;
+
+    grpData = H5Gopen2(loc_id, groupName.c_str(), H5P_DEFAULT);
+    return grpData;
+}
+
+hid_t GetGroup(hid_t loc_id, const string &groupName)
+{
+    hid_t grpData;
+
+    CreateGroup(loc_id, groupName);
+    grpData = OpenGroup(loc_id, groupName);
+
+    return grpData;
+}
+
+void CreateEmptyData(hid_t loc_id, const string &dataName, hsize_t rowNumber, hsize_t rowLength, int type)
+{
+    hid_t dataspace = 0, dataset = 0, datatype = 0;
+    int rank = 0;
+
+    //! Dataset dimensions at the creation time.
+    hsize_t dims[2] = {0};
+
+    if (rowNumber == 1)
+    {
+        rank = 1;
+        dims[0] = rowLength;
+    }
+    else
+    {
+        rank = 2;
+        dims[0] = rowNumber;
+        dims[1] = rowLength;
+    }
+
+    //! Create the data space with unlimited dimensions.
+    dataspace = H5Screate_simple(rank, dims, NULL);
+
+    if (type == PHINT)
+    {
+        datatype = H5Tcopy(H5T_NATIVE_INT);
+    }
+    else if(type == PHDOUBLE)
+    {
+        datatype = H5Tcopy(H5T_NATIVE_DOUBLE);
+    }
+    else if(type == PHSTRING)
+    {
+        datatype = H5Tcopy(H5T_NATIVE_CHAR);
+    }
+
+    //! Create a empty dataset.
+    dataset = H5Dcreate2(loc_id, dataName.c_str(), datatype, dataspace, H5P_DEFAULT, H5P_DEFAULT, H5P_DEFAULT);
+
+    H5Sclose(dataspace);
+    H5Tclose(datatype);
+    H5Dclose(dataset);
+}
+
+hid_t OpenData(hid_t loc_id, const string &dataName)
+{
+    hid_t dataLoc;
+
+    dataLoc = H5Dopen2(loc_id, dataName.c_str(), H5P_DEFAULT);
+    if (dataLoc < 0)
+    {
+        ostringstream oss;
+        oss << "The data is not found :  " << dataName;
+        TK_Exit::ExceptionExit(oss);
+    }
+
+    return dataLoc;
+}
+
+void WriteData(hid_t loc_id, const void *data, const string &dataName)
+{
+    hid_t dataset, datatype, dataspace;
+    herr_t status;
+
+    dataset = OpenData(loc_id, dataName);
+
+    datatype = H5Dget_type(dataset);
+    dataspace = H5Dget_space(dataset);
+
+    status = H5Dwrite(dataset, datatype, H5S_ALL, H5S_ALL, H5P_DEFAULT, data);
+
+    H5Sclose(dataspace);
+    H5Tclose(datatype);
+    H5Dclose(dataset);
+}
+
+void ReadData(hid_t loc_id, void *data, const string &dataName)
+{
+    hid_t dataset, datatype, dataspace, memspace;
+    herr_t status;
+    int rank;
+
+    dataset = OpenData(loc_id, dataName);
+    datatype = H5Dget_type(dataset);
+    dataspace = H5Dget_space(dataset);
+    rank  = H5Sget_simple_extent_ndims(dataspace);
+
+    hsize_t *dataLength = new hsize_t[rank];
+    status = H5Sget_simple_extent_dims(dataspace, dataLength, NULL);
+
+    hsize_t *dataLocation = new hsize_t[rank];
+    for (int irank = 0; irank < rank; ++ irank)
+    {
+        dataLocation[irank] = 0;
+    }
+
+    status = H5Sselect_hyperslab(dataspace, H5S_SELECT_SET, dataLocation, NULL, dataLength, NULL);
+
+    memspace = H5Screate_simple(rank, dataLength,NULL);
+    status = H5Sselect_hyperslab(memspace, H5S_SELECT_SET, dataLocation, NULL, dataLength, NULL);
+
+    status = H5Dread(dataset, datatype, memspace, dataspace, H5P_DEFAULT, data);
+
+    H5Sclose(dataspace);
+    H5Tclose(datatype);
+    H5Dclose(dataset);
+
+    delete [] dataLength;
+    delete [] dataLocation;
+}
+
+void CreateAndWriteData(hid_t loc_id, const string &dataName, hsize_t rowNumber, hsize_t rowLength, int type, const void *data)
+{
+    CreateEmptyData(loc_id, dataName, rowNumber, rowLength, type);
+    WriteData(loc_id, data, dataName);
+}
+
+RDouble * ReadDoubleOneRow(hid_t loc_id, const string &dataName)
+{
+    hid_t dataset;
+    hid_t datatype, dataspace, memspace;
+    herr_t status;
+    int rank, status_n;
+    ostringstream oss;
+
+    dataset = H5Dopen2(loc_id, dataName.c_str(), H5P_DEFAULT);
+    if (dataset < 0)
+    {
+        oss << "The data is not found :  " << dataName;
+        TK_Exit::ExceptionExit(oss);
+    }
+
+    datatype = H5Dget_type(dataset);
+    dataspace = H5Dget_space(dataset);
+    rank = H5Sget_simple_extent_ndims(dataspace);
+    if (rank != 1)
+    {
+        oss << "The data is not One_D :  " << dataName;
+        TK_Exit::ExceptionExit(oss);
+    }
+
+    hsize_t dataLength;
+    status_n = H5Sget_simple_extent_dims(dataspace, &dataLength, NULL);
+
+    hsize_t dataLocation[1] = {0};
+    status = H5Sselect_hyperslab(dataspace, H5S_SELECT_SET, dataLocation, NULL, &dataLength, NULL);
+
+    memspace = H5Screate_simple(rank, &dataLength, NULL);
+    status = H5Sselect_hyperslab(memspace, H5S_SELECT_SET, dataLocation, NULL, &dataLength, NULL);
+
+    double *Data = new double[dataLength];
+    status = H5Dread(dataset, datatype, memspace, dataspace, H5P_DEFAULT, Data);
+
+    H5Sclose(dataspace);
+    H5Tclose(datatype);
+    H5Dclose(dataset);
+
+    RDouble *dataReturn = new RDouble[dataLength];
+    for (int iData = 0; iData < dataLength; ++ iData)
+    {
+        dataReturn[iData] = static_cast<RDouble>(Data[iData]);
+    }
+    delete [] Data;    Data = NULL;
+    return dataReturn;
+}
+
+int * ReadIntOneRow(hid_t loc_id, const string &dataName)
+{
+    hid_t dataset;
+    hid_t datatype, dataspace, memspace;
+    herr_t status;
+    int rank, status_n;
+    ostringstream oss;
+
+    dataset = H5Dopen2(loc_id, dataName.c_str(), H5P_DEFAULT);
+    if (dataset < 0)
+    {
+        oss << "The data is not found :  " << dataName;
+        TK_Exit::ExceptionExit(oss);
+    }
+
+    datatype = H5Dget_type(dataset);
+    dataspace = H5Dget_space(dataset);
+    rank = H5Sget_simple_extent_ndims(dataspace);
+    if (rank != 1)
+    {
+        oss << "The data is not One_D :  " << dataName;
+        TK_Exit::ExceptionExit(oss);
+    }
+
+    hsize_t dataLength;
+    status_n = H5Sget_simple_extent_dims(dataspace, &dataLength, NULL);
+
+    hsize_t dataLocation[1] = {0};
+    status = H5Sselect_hyperslab(dataspace, H5S_SELECT_SET, dataLocation, NULL, &dataLength, NULL);
+
+    memspace = H5Screate_simple(rank, &dataLength,NULL);
+    status = H5Sselect_hyperslab(memspace, H5S_SELECT_SET, dataLocation, NULL, &dataLength, NULL);
+
+    int *Data = new int [dataLength];
+    status = H5Dread(dataset, datatype, memspace, dataspace, H5P_DEFAULT, Data);
+
+    H5Sclose(dataspace);
+    H5Tclose(datatype);
+    H5Dclose(dataset);
+
+    return Data;
+}
+
+int ** ReadIntTwoRow(hid_t loc_id, const string &dataName)
+{
+    hid_t dataset;
+    hid_t datatype, dataspace, memspace;
+    herr_t status;
+    int rank, status_n;
+    ostringstream oss;
+
+    dataset = H5Dopen2(loc_id, dataName.c_str(), H5P_DEFAULT);
+    if (dataset < 0)
+    {
+        oss << "The data is not found :  " << dataName;
+        TK_Exit::ExceptionExit(oss);
+    }
+
+    datatype = H5Dget_type(dataset);
+    dataspace = H5Dget_space(dataset);
+    rank = H5Sget_simple_extent_ndims(dataspace);
+
+    if (rank != 2)
+    {
+        oss << "The data is not Two_D :  " << dataName;
+        TK_Exit::ExceptionExit(oss);
+    }
+
+    hsize_t *dataLength = new hsize_t[rank];
+    status_n = H5Sget_simple_extent_dims(dataspace, dataLength, NULL);
+
+    hsize_t *dataLocation = new hsize_t[rank];
+    dataLocation[0] = 0;
+    dataLocation[1] = 0;
+
+    status = H5Sselect_hyperslab(dataspace, H5S_SELECT_SET, dataLocation, NULL, dataLength, NULL);
+
+    memspace = H5Screate_simple(rank, dataLength, NULL);
+    status = H5Sselect_hyperslab(memspace, H5S_SELECT_SET, dataLocation, NULL, dataLength, NULL);
+
+    int **Data = NewPointer2<int>(static_cast<int>(dataLength[0]), static_cast<int>(dataLength[1]));
+    status = H5Dread(dataset, datatype, memspace, dataspace, H5P_DEFAULT, Data[0]);
+
+    delete [] dataLocation;
+    delete [] dataLength;
+
+    H5Sclose(dataspace);
+    H5Tclose(datatype);
+    H5Dclose(dataset);
+
+    return Data;
+}
+
+char *ReadCharData(hid_t loc_id, const string &dataName)
+{
+    hid_t dataset;
+    hid_t datatype, dataspace, memspace;
+    herr_t status;
+    int rank, status_n;
+    ostringstream oss;
+
+    dataset = H5Dopen2(loc_id, dataName.c_str(), H5P_DEFAULT);
+    if (dataset < 0)
+    {
+        oss << "The data is not found :  " << dataName;
+        TK_Exit::ExceptionExit(oss);
+    }
+
+    datatype = H5Dget_type(dataset);
+    dataspace = H5Dget_space(dataset);
+    rank = H5Sget_simple_extent_ndims(dataspace);
+    if (rank != 1)
+    {
+        oss << "The data is not One_D :  " << dataName;
+        TK_Exit::ExceptionExit(oss);
+    }
+
+    hsize_t dataLength;
+    status_n = H5Sget_simple_extent_dims(dataspace, &dataLength, NULL);
+
+    hsize_t dataLocation[1] = {0};
+    status = H5Sselect_hyperslab(dataspace, H5S_SELECT_SET, dataLocation, NULL, &dataLength, NULL);
+
+    memspace = H5Screate_simple(rank, &dataLength, NULL);
+    status = H5Sselect_hyperslab(memspace, H5S_SELECT_SET, dataLocation, NULL, &dataLength, NULL);
+
+    char *Data = new char[dataLength];
+    status = H5Dread(dataset, datatype, memspace, dataspace, H5P_DEFAULT, Data);
+
+    H5Sclose(dataspace);
+    H5Tclose(datatype);
+    H5Dclose(dataset);
+
+    return Data;
+}
+
+int GetObjNumber(hid_t loc_id)
+{
+    H5G_info_t grp_info;
+    H5Gget_info(loc_id, &grp_info);
+
+    return static_cast<int>(grp_info.nlinks);
+}
+
+void GetObjNameList(hid_t loc_id, string *objNameList)
+{
+    int objNumber = GetObjNumber(loc_id);
+    for (int iObj = 0; iObj < objNumber; ++ iObj)
+    {
+        char dataname[100];
+        int nameSize = 100;
+        H5Gget_objname_by_idx(loc_id, iObj, &dataname[0], nameSize);
+
+        objNameList[iObj] = dataname;
+    }
+}
+
+void GetObjTypeList(hid_t loc_id, H5G_obj_t *objTypeList)
+{
+    int objNumber = GetObjNumber(loc_id);
+    for (int iObj = 0; iObj < objNumber; ++ iObj)
+    {
+        objTypeList[iObj] = H5Gget_objtype_by_idx(loc_id, iObj);
+    }
+}
+
+bool CheckDataExist(hid_t loc_id, const string &dataName_in)
+{
+    bool dataExist = false;
+
+    int objNumber = GetObjNumber(loc_id);
+    string *objNameList = new string[objNumber];
+    GetObjNameList(loc_id, objNameList);
+
+    for (int iObj = 0; iObj < objNumber; ++ iObj)
+    {
+        if (objNameList[iObj] == dataName_in)
+        {
+            dataExist = true;
+            break;
+        }
+    }
+
+    delete [] objNameList;
+    return dataExist;
+}
+
+}
\ No newline at end of file
diff --git a/API/IO/src/IO_VirtualFile.cpp b/API/IO/src/IO_VirtualFile.cpp
new file mode 100644
index 0000000..96cdf42
--- /dev/null
+++ b/API/IO/src/IO_VirtualFile.cpp
@@ -0,0 +1,125 @@
+#include "IO_VirtualFile.h"
+
+namespace PHSPACE
+{
+
+void VirtualFile::read(void *data, streamsize size)
+{
+    if (key == 0)
+    {
+        file->read(reinterpret_cast<char *>(data), size);
+    }
+    else
+    {
+        cdata->read(data, static_cast<CharVecSizeType>(size));
+    }
+}
+
+void VirtualFile::write(void *data, streamsize size)
+{
+    if (key == 0)
+    {
+        file->write(reinterpret_cast<char *>(data), size);
+    }
+    else
+    {
+        cdata->write(data, static_cast<CharVecSizeType>(size));
+    }
+}
+
+void VirtualFile::BeginReadWork()
+{
+    if (key == 0)
+    {
+        MarkSectionBegin();
+        ReadDataLength();
+    }
+    else
+    {
+        cdata->moveto_begin();
+    }
+}
+
+void VirtualFile::EndReadWork()
+{
+    if (key == 0)
+    {
+        MarkSectionEnd();
+    }
+}
+
+void VirtualFile::BeginWriteWork()
+{
+    if (key == 0)
+    {
+        MarkSectionBegin();
+        ReservePlaceholder();
+    }
+}
+
+void VirtualFile::EndWriteWork()
+{
+    if (key == 0)
+    {
+        MarkSectionEnd();
+        MoveToSectionBegin();
+        WriteDataLength();
+        MoveToSectionEnd();
+    }
+}
+
+void VirtualFile::ReadDataLength()
+{
+    read(&data_len, sizeof(streamsize));
+}
+
+void VirtualFile::ReservePlaceholder()
+{
+    write(&section_begin, sizeof(streamsize));
+}
+
+streamsize VirtualFile::GetCurrentPosition()
+{
+    if (key == 0)
+    {
+        return file->tellp();
+    }
+    else
+    {
+        return 0;
+    }
+}
+
+void VirtualFile::MarkSectionBegin()
+{
+    this->section_begin = GetCurrentPosition();
+}
+
+void VirtualFile::MarkSectionEnd()
+{
+    this->section_end = GetCurrentPosition();
+}
+
+void VirtualFile::MoveToPosition(streamsize section_pos)
+{
+    file->seekp(section_pos);
+}
+
+void VirtualFile::MoveToSectionBegin()
+{
+    MoveToPosition(this->GetSectionBegin());
+}
+
+void VirtualFile::MoveToSectionEnd()
+{
+    MoveToPosition(this->GetSectionEnd());
+}
+
+void VirtualFile::WriteDataLength()
+{
+    data_len = GetSectionEnd() - GetSectionBegin() - sizeof(streamsize);
+
+    write(&data_len, sizeof(streamsize));
+}
+
+}
\ No newline at end of file
diff --git a/API/IO/src/PHIO.cpp b/API/IO/src/PHIO.cpp
new file mode 100644
index 0000000..9f90b1f
--- /dev/null
+++ b/API/IO/src/PHIO.cpp
@@ -0,0 +1,593 @@
+#include "PHIO.h"
+#include "IO_FileName.h"
+#include "TK_Exit.h"
+#include "TK_Parse.h"
+#include "GlobalDataBase.h"
+#include "Constants.h"
+#include "TK_Log.h"
+#include "Gas.h"
+#include "Geo_SimpleBC.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+LIB_EXPORT void ParallelOpenFile(fstream &file, const string &fileName, const ios_base::openmode &openMode)
+{
+    if (PHMPI::IsCurrentProcessorFileServer() == 0)
+    {
+        return;
+    }
+
+    PHSPACE::OpenFile(file, fileName, openMode);
+}
+
+LIB_EXPORT void OpenSerialFile(fstream &file, const string &filename, const ios_base::openmode &openmode)
+{
+    int fileID = PHMPI::GetFileIndexofCurrentProcessor();
+    string actualFileName = AddSymbolToFileName(filename, "_", fileID);
+    OpenFile(file, actualFileName, openmode);
+}
+
+LIB_EXPORT void ParallelOpenFile(ActionKey *actkey)
+{
+    if (!actkey->IsNeedOpenFile())
+    {
+        fstream *file = 0;
+        actkey->file = file;
+        actkey->del_file = false;
+    }
+    else
+    {
+        if (PHMPI::IsCurrentProcessorFileServer() == 0)
+        {
+            return;
+        }
+
+        fstream *file = new fstream();
+        //! Open file by default.
+        ParallelOpenFile(*file, actkey->filename, actkey->openmode);
+        actkey->file = file;
+        actkey->del_file = true;
+    }
+}
+
+LIB_EXPORT void ParallelOpenFile2(ActionKey *actionKey)
+{
+    //! Open file by default.
+    if (actionKey->filename == "")
+    {
+        fstream *file = 0;
+        actionKey->file = file;
+        actionKey->del_file = false;
+    }
+    else
+    {
+        if (PHMPI::IsCurrentProcessorFileServer() == 0)
+        {
+            return;
+        }
+
+        fstream *file = new fstream();
+        int fileID = PHMPI::GetFileIndexofCurrentProcessor();
+        string finalFileName = PHSPACE::AddSymbolToFileName(actionKey->filename, '_', fileID);
+        PHSPACE::ParallelOpenFile(*file, finalFileName, actionKey->openmode);
+        actionKey->file = file;
+        actionKey->del_file = true;
+    }
+}
+
+LIB_EXPORT void OpenFile(fstream &file, const string &fileName, const ios_base::openmode &openMode)
+{
+    file.open(fileName.c_str(), openMode);
+    if (!file)
+    {
+        ostringstream oss;
+        oss << "Could not open " << fileName << endl;
+
+        PHMPI::FreeBlockData();
+        cout << oss.str() << endl;
+        MPI_Abort(MPI_COMM_WORLD, -1);
+    }
+}
+
+LIB_EXPORT void ParallelCloseFile(fstream &file)
+{
+    if (PHMPI::IsCurrentProcessorFileServer() == 0)
+    {
+        return;
+    }
+
+    PHSPACE::CloseFile(file);
+}
+
+LIB_EXPORT void ParallelCloseFile(ActionKey *actionKey)
+{
+    if (PHMPI::IsCurrentProcessorFileServer() == 0)
+    {
+        return;
+    }
+    CloseFile(actionKey);
+}
+
+LIB_EXPORT void CloseFile(fstream &file)
+{
+    file.close();
+    file.clear();
+}
+
+LIB_EXPORT void CloseFile(ifstream &file)
+{
+    file.close();
+    file.clear();
+}
+
+LIB_EXPORT void CloseFile(ofstream &file)
+{
+    file.close();
+    file.clear();
+}
+
+LIB_EXPORT void CloseFile(ActionKey *actkey)
+{
+    if (!actkey->file)
+    {  
+        return;
+    }
+    CloseFile(* actkey->file);
+
+    if (actkey->del_file)
+    {
+        delete actkey->file;
+        actkey->del_file = false;
+    }
+}
+
+LIB_EXPORT void ReadFile(fstream &file, DataContainer *cdata)
+{
+    //! The real meaning of the function with DataContainer is to read the file contents into cdata.
+    //! For cdata, this is the process of writing.
+    cdata->readfile(file);
+}
+
+LIB_EXPORT void ReadFile(ActionKey *actkey)
+{
+    fstream &file = *(actkey->file);
+    ReadFile(file, actkey->GetData());
+}
+
+LIB_EXPORT void WriteFile(fstream &file, DataContainer *cdata)
+{
+    cdata->writefile(file);
+}
+
+LIB_EXPORT void WriteFile(ActionKey *actkey)
+{
+    fstream *file = actkey->file;
+
+    if (!file) return;
+
+    WriteFile(*file, actkey->GetData());
+}
+
+LIB_EXPORT void WriteASCIIFile(fstream &file, const string &str)
+{
+    file << str;
+}
+
+LIB_EXPORT void WriteASCIIFile(fstream &file, std::ostringstream &oss)
+{
+    WriteASCIIFile(file, oss.str());
+}
+
+LIB_EXPORT void WriteASCIIFile(fstream &file, DataContainer *cdata)
+{
+    string str;
+    DataCharToString(cdata, str);
+
+    WriteASCIIFile(file, str);
+}
+
+LIB_EXPORT void WriteASCIIFile(ActionKey *actionKey, std::ostringstream &oss)
+{
+    PHSPACE::ParallelOpenFile(actionKey);
+    fstream &file = *(actionKey->GetFile());
+    PHSPACE::WriteASCIIFile(file, oss);
+    PHSPACE::ParallelCloseFile(file);
+}
+
+LIB_EXPORT void WriteASCIIFile(ActionKey *actkey)
+{
+    if (!actkey->file)
+    {
+        return;
+    }
+
+    fstream &file = *(actkey->file);
+    WriteASCIIFile(file, actkey->GetData());
+}
+
+LIB_EXPORT void WriteBinaryFile(ActionKey *actkey)
+{
+    /*DumpToTecio dumptotecio(actkey);
+    dumptotecio.Run();
+    if(!actkey->file) return;
+    fstream &file = *(actkey->file);
+    WriteASCIIFile(file, actkey->GetData());*/
+}
+
+LIB_EXPORT void WriteSentinelFile()
+{
+    fstream sentinelfile;
+    string sentinelfilename = "results/sentinel";
+    sentinelfile.open(sentinelfilename.c_str(),ios::in);
+    if (!sentinelfile)
+    {
+        fstream sentinelfile1;
+        sentinelfile1.open(sentinelfilename.c_str(), ios_base::out|ios_base::trunc);
+        sentinelfile1.close();
+        sentinelfile1.clear();
+    }
+    else
+    {
+        sentinelfile.close();
+        sentinelfile.clear();
+    }
+}
+
+LIB_EXPORT void WriteScreen(DataContainer *cdata)
+{
+    string str;
+    DataCharToString(cdata, str);
+    cout << str;
+}
+
+LIB_EXPORT void WriteScreen(ActionKey *actkey)
+{
+    WriteScreen(actkey->GetData());
+}
+
+LIB_EXPORT bool IfFileEmpty(fstream &file)
+{
+    file.seekp(0, ios::end);
+    streamoff i = file.tellp();
+
+    if (i)
+    {
+        return false;
+    }
+    return true;
+}
+
+LIB_EXPORT bool FileExist(const string &fileName)
+{
+    fstream file;
+    file.open(fileName.c_str(), ios::in);
+    if (file)
+    {
+        CloseFile(file);
+        return true;
+    }
+    else
+    {
+        return false;
+    }
+}
+
+LIB_EXPORT bool SerialFileExist(const string &fileName)
+{
+    string acutalFileName = AddSymbolToFileName(fileName, "_", 0);
+    return FileExist(acutalFileName);
+}
+
+LIB_EXPORT void ReadAbstractData(fstream &file, DataContainer *cdata, int send_proc, int recv_proc, int tag)
+{
+    using namespace PHMPI;
+
+    int myid = GetCurrentProcessorID();
+
+    if (myid == send_proc)
+    {
+        ReadFile(file, cdata);
+    }
+
+    PH_Trade(cdata, send_proc, recv_proc, tag);
+}
+
+LIB_EXPORT void ReadControlParameters()
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if (myid == server)
+    {
+        PrintToWindow("Control parameters reading by server ...\n");
+        ReadKeyInfo();
+        ReadDefaultParamInfo();
+        ReadParamInfo();
+    }
+
+    BroadcastInfo();
+}
+
+LIB_EXPORT void ReadKeyInfo()
+{
+    string keyfile = "./bin/key.hypara";
+
+    ReadParamInfo(keyfile);
+}
+
+LIB_EXPORT void ReadDefaultParamInfo()
+{
+    string defaultParaFile;
+    GlobalDataBase::GetData("defaultParaFile", &defaultParaFile, PHSTRING, 1);
+
+    ReadParamInfo(defaultParaFile);
+}
+
+LIB_EXPORT void ReadParamInfo()
+{
+    string parafilename;
+    GlobalDataBase::GetData("parafilename", &parafilename, PHSTRING, 1);
+
+    int nparafile = GlobalDataBase::GetIntParaFromDB("nparafile");
+
+    ReadParamInfo(parafilename);
+
+    for (int ifile = 1; ifile < nparafile; ++ ifile)
+    {
+        std::ostringstream oss;
+        oss << "parafilename" << ifile;
+        string filetitle = oss.str();
+        string filename;
+        GlobalDataBase::GetData(filetitle, &filename, PHSTRING, 1);
+
+        ReadParamInfo(filename);
+    }
+}
+
+LIB_EXPORT void ReadParamInfo(const string &filename)
+{
+    fstream file;
+    file.open(filename.c_str(), ios_base::in);
+
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(filename);
+    }
+
+    TK_Parse::ReadBasicData(file, GlobalDataBase::GetDataPara());
+
+    file.close();
+    file.clear();
+}
+
+LIB_EXPORT void BroadcastInfo()
+{
+    using namespace PHMPI;
+    int number_of_processor = GetNumberOfProcessor();
+    if (number_of_processor <= 1) return;
+
+    PrintToWindow("Control parameters broad casting by server ...\n");
+
+    int serverTmp = GetServerProcessorID();
+    int myid = GetCurrentProcessorID();
+
+    DataContainer *cdata = new DataContainer();
+
+    if (myid == serverTmp)
+    {
+        PHSPACE::GlobalDataBase::CompressData(cdata);
+    }
+
+    PH_BcastByServer(cdata);
+
+    if (myid != serverTmp)
+    {
+        PHSPACE::GlobalDataBase::DecompressData(cdata);
+    }
+
+    delete cdata;
+}
+
+LIB_EXPORT void CompleteParamInfo()
+{
+    //! 1. Add walldistfile, its name is the same with grid file, except for the suffix ".wdt".
+    //! 2. bnd_file is the same name with from_gfile when converting grid.
+    int nsimutask = GlobalDataBase::GetIntParaFromDB("nsimutask");
+    if (nsimutask == SOLVE_FIELD || nsimutask == CAL_WALL_DIST)
+    {
+        string origialGridFile = GlobalDataBase::GetStrParaFromDB("gridfile");
+        string walldistfile = ChangeExtensionOfFileName(origialGridFile, "wdt");
+        GlobalDataBase::UpdateData("walldistfile", &walldistfile, PHSTRING, 1);
+    }
+    else if (nsimutask == CREATE_GRID)
+    {
+        string from_gfile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+        string bnd_file = ChangeExtensionOfFileName(from_gfile, "inp");
+        GlobalDataBase::UpdateData("bnd_file", &bnd_file, PHSTRING, 1);
+    }
+    else if (nsimutask == INTEGRATIVE_SOLVER)
+    {
+        string origialGridFile = GlobalDataBase::GetStrParaFromDB("gridfile");
+        string walldistfile = ChangeExtensionOfFileName(origialGridFile, "wdt");
+        GlobalDataBase::UpdateData("walldistfile", &walldistfile, PHSTRING, 1);
+
+        string from_gfile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+        string bnd_file = ChangeExtensionOfFileName(from_gfile, "inp");
+        GlobalDataBase::UpdateData("bnd_file", &bnd_file, PHSTRING, 1);
+    }
+    else
+    {
+        //! do nothing.
+    }
+
+    //! Some other default parameters.
+    int nTurbulenceEquation = 0;
+
+    int ViscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+
+    if (ViscousType == 2)
+    {
+        nTurbulenceEquation = 0;
+    }
+    else if (ViscousType == 3)
+    {
+        nTurbulenceEquation = 1;
+    }
+    else if (ViscousType == 4)
+    {
+        nTurbulenceEquation = 2;
+    }
+
+    GlobalDataBase::UpdateData("n_turb", &nTurbulenceEquation, PHINT, 1);
+
+    int transitionType = GlobalDataBase::GetIntParaFromDB("transitionType");
+    int nTransitionEquation = 0;
+    if (transitionType == 2)
+    {
+        nTransitionEquation = 2;
+    }
+    GlobalDataBase::UpdateData("n_transition", &nTransitionEquation, PHINT, 1);
+
+    int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nTemperatureModel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+    if (nChemical == 0)
+    {
+        nTemperatureModel = 1;
+    }
+
+    GlobalDataBase::UpdateData("ntmodel", &nTemperatureModel, PHINT, 1);
+
+    int newnstep = 0;
+    GlobalDataBase::UpdateData("newnstep", &newnstep, PHINT, 1);
+
+    RDouble globalMinTimeStep = -LARGE;
+    GlobalDataBase::UpdateData("globalMinTimeStep", &globalMinTimeStep, PHDOUBLE, 1);
+}
+
+LIB_EXPORT void PrintInflowConditionToWindow(void)
+{
+
+    int inflowParaType = GlobalDataBase::GetIntParaFromDB("inflowParaType");
+
+    RDouble refGama                   = GlobalDataBase::GetDoubleParaFromDB("refGama");
+    RDouble refMachNumber             = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+    RDouble refReNumber               = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+    RDouble attackd                   = GlobalDataBase::GetDoubleParaFromDB("attackd");
+    RDouble angleSlide                = GlobalDataBase::GetDoubleParaFromDB("angleSlide");
+    RDouble refDimensionalPressure    = GlobalDataBase::GetDoubleParaFromDB("refDimensionalPressure");
+    RDouble refDimensionalDensity     = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+    RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+    RDouble wallTemperature           = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+
+    vector< RDouble > WallT;
+    vector< int > WallNumber;
+    ModifyWindowTemperature(wallTemperature, WallT, WallNumber);
+
+    RDouble reynoldsReferenceLengthDimensional = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+    RDouble forceReferenceArea                 = GlobalDataBase::GetDoubleParaFromDB("forceReferenceArea");
+    RDouble forceReferenceLength               = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLength");
+    RDouble TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+    RDouble TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+    RDouble TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+
+    using namespace GAS_SPACE;
+    FluidParameter refParam;
+    gas->GetReferenceParameters(refParam);
+    RDouble refVelocity = refParam.GetVelocity();
+    RDouble refVicosity = refParam.GetViscosity();
+    RDouble refSoundSpeed = refParam.GetSoundVelocity();
+
+    PrintToWindow("Inflow Conditions", "\n");
+    PrintToWindow("  Gama                     :    ", refGama      ,           "\n");
+    PrintToWindow("  Mach Number              :    ", refMachNumber,           "\n");
+    PrintToWindow("  Attack Angle             :    ", attackd      , "degree", "\n");
+    PrintToWindow("  Sideslip Angle           :    ", angleSlide   , "degree", "\n");
+ 
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    if (viscousType)
+    {
+        if (inflowParaType == FLIGHTCONDITION)
+        {
+            RDouble height = GlobalDataBase::GetDoubleParaFromDB("height");
+            PrintToWindow("  Fly Height               :    ", height, "km", "\n");
+        }
+        PrintToWindow("  Reynolds Number          :    ", refReNumber,               " 1/m",   "\n");
+        PrintToWindow("  Dimensional Pressure     :    ", refDimensionalPressure,    " Pa",    "\n");
+        PrintToWindow("  Dimensional Density      :    ", refDimensionalDensity,     " kg/m^3", "\n");
+        PrintToWindow("  Dimensional Temperature  :    ", refDimensionalTemperature, " K",     "\n");
+
+        int metabolicWallTemperature = -1;
+        GlobalDataBase::GetData("metabolicWallTemperature", &metabolicWallTemperature, PHINT, 1);
+
+        if (metabolicWallTemperature == 0)
+        {
+            for(int i = 0; i < WallT.size(); ++i)
+            {
+                if (WallT[i] < 0.0)
+                {
+                    PrintToWindow("  Temperature of Wall",WallNumber[i],"   :    ",  "Adiabatic Wall", "\n");
+                }
+                else if(WallT[i] == 0.0)
+                {
+                    PrintToWindow("  Temperature of Wall",WallNumber[i],"   :    ", "Radiation balance Wall", "\n");
+                }
+                else
+                {
+                    PrintToWindow("  Temperature of Wall",WallNumber[i],"   :    ", WallT[i], "K", "\n");
+                }
+            }
+
+        }
+        PrintToWindow("  Dimensional Sound Speed  :    ", refSoundSpeed,               " m/s",    "\n");
+        PrintToWindow("  Dimensional Velocity     :    ", refVelocity,               " m/s",      "\n");
+        PrintToWindow("  Dimensional Viscosity    :    ", refVicosity,               " kg/(m*s)", "\n");
+    }
+
+    PrintToWindow("Geometry Informations"           ,                                     "\n");
+    PrintToWindow("  Scale Factor             :    ", reynoldsReferenceLengthDimensional,  "\n");
+    PrintToWindow("  Force Reference Area     :    ", forceReferenceArea                ,   "m^2", "\n");
+    PrintToWindow("  Force Reference Length   :    ", forceReferenceLength              ,   "m", "\n");
+    PrintToWindow("  Force Reference x        :    ", TorqueRefX                        , "\n");
+    PrintToWindow("  Force Reference y        :    ", TorqueRefY                        , "\n");
+    PrintToWindow("  Force Reference z        :    ", TorqueRefZ                        , "\n");
+}
+
+LIB_EXPORT void ModifyWindowTemperature(RDouble &wallTemperature, vector< RDouble > &WallT, vector< int > &WallNumber)
+{
+    /*if(wallTemperature >= 0.0 )
+    {
+        return;
+    }*/
+    int nWall = 0;
+    GlobalBoundaryCondition::ReadGlobalBoundaryCondition();
+    vector<SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+    for (int iBC = 0; iBC < globalBCList->size(); ++ iBC)
+    {
+        SimpleBC *bcParamDataBase = (*globalBCList)[iBC];
+        int bcType = bcParamDataBase->GetBCType();
+        Data_Param *bcParamDB = bcParamDataBase->GetBCParamDataBase();
+        if (bcType != PHENGLEI::SOLID_SURFACE && bcType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+        else if(bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::ABLATION_SURFACE)
+        {
+            if (!bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+            {
+                GlobalDataBase::GetData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+                bcParamDB->UpdateData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+            }
+            else
+            {
+                bcParamDB->GetData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+                //GlobalDataBase::UpdateData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+            }
+            WallT.push_back(wallTemperature);
+            nWall ++;
+            WallNumber.push_back(nWall);
+        }
+    }
+}
+}
\ No newline at end of file
diff --git a/API/Math/include/Math_BasisFunction.h b/API/Math/include/Math_BasisFunction.h
new file mode 100644
index 0000000..54be4b7
--- /dev/null
+++ b/API/Math/include/Math_BasisFunction.h
@@ -0,0 +1,294 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Math_BasisFunction.h
+//! @brief     Basis mathematic function, such as min/max/sign, etc.
+//! @author    Bell, He Xin.
+
+#pragma once
+#include <cmath>
+#include <float.h>
+#include <algorithm>
+#include "Precision.h"
+#include "TypeDefine.h"
+using namespace std;
+
+namespace PHSPACE
+{
+//! Get the interval: size of total is 'nTotal', it's divided into 'nInterval'.
+int GetProgressInterval(int nTotal, int nInterval);
+
+//! Return the minimum value of the two input values.
+template < typename T >
+inline T MIN(const T &a, const T &b)
+{
+    return (a < b) ? a : b;
+}
+
+template < typename T1, typename T2 >
+inline T1 MIN(const T1 &a, const T2 &b)
+{
+    return static_cast<T1>((a < b) ? a : b);
+}
+
+//! Return the maximum value of the two input values.
+template < typename T >
+inline T MAX(const T &a, const T &b)
+{
+    return (a > b) ? a : b;
+}
+
+template < typename T1, typename T2 >
+inline T1 MAX(const T1 &a, const T2 &b)
+{
+    return static_cast<T1>((a > b) ? a : b);
+}
+
+//! Return the absolute value of the input value.
+template < typename T >
+inline T ABS(const T &a)
+{
+    return (a < 0) ? -a : a;
+}
+
+//! Return the square value of the input value.
+template < typename T >
+inline T SQR(const T &a)
+{
+    return a * a;
+}
+
+//! Return the cube value of the input value.
+template < typename T >
+inline T POWER3(const T &a)
+{
+    return a * a * a;
+}
+
+//! Return the nearest round number value of the input value.
+template < typename T >
+inline T ROUND(const T &a)
+{
+    return (a > 0.0) ? floor(a + 0.5):ceil(a - 0.5);
+}
+
+//! Return the square distance of the three input values.
+template < typename T >
+inline T SQR(const T &a, const T &b, const T &c)
+{
+    return a * a + b * b + c * c;
+}
+
+inline RDouble SQR(RDouble *point1, RDouble *point2)
+{
+    return  (point1[0] - point2[0]) * (point1[0] - point2[0]) +
+            (point1[1] - point2[1]) * (point1[1] - point2[1]) +
+            (point1[2] - point2[2]) * (point1[2] - point2[2]);
+}
+
+//! Return the distance of the three input values.
+template < typename T >
+inline T DISTANCE(const T &a, const T &b, const T &c)
+{
+    return sqrt(SQR(a, b, c));
+}
+
+inline RDouble DISTANCE(RDouble *point1, RDouble *point2)
+{
+    return sqrt((point1[0] - point2[0]) * (point1[0] - point2[0]) +
+                (point1[1] - point2[1]) * (point1[1] - point2[1]) +
+                (point1[2] - point2[2]) * (point1[2] - point2[2]));
+}
+
+//! Swap the two input values.
+template < typename T >
+inline void SWAP(T &a, T &b)
+{
+    T c = a;
+    a = b;
+    b = c;
+}
+
+template < typename T >
+bool isErrorData(T data)
+{
+#ifdef WIN32
+    if (!_isnan(data) || ABS(data) < SMALL)
+    {
+        return false;
+    }
+#else
+    if (ABS(data) < LARGE && (std::isnormal(data) || ABS(data) < SMALL))
+    {
+        return false;
+    }
+#endif
+    return true;
+}
+
+//! sign(a, b): return |a| * sign(b). a is the same as b.
+template < typename T >
+inline T SIGN(const T &a, const T &b)
+{
+    int s = 1;
+    if (b < 0) s = -1;
+    return s * ABS(a);
+}
+
+//! sign(a, b): return |a| * sign(b). a and b are different types.
+template < typename T1, typename T2 >
+inline T1 SIGN(const T1 &a, const T2 &b)
+{
+    int s = 1;
+    if (b < 0) s = -1;
+    return static_cast <T1>(s * ABS(a));
+}
+
+template < typename T >
+inline T SUMMARY(vector < T > &a, int n)
+{
+    T sum = 0.0;
+    for (int i = 0; i < n; ++ i)
+    {
+        sum += a[i];
+    }
+    return sum;
+}
+
+//! Coordinate rotate with X axis:
+//! x' = x.
+//! y' = y*cos(degree) + z*sin(degree).
+//! z' = z*cos(degree) - y*sin(degree).
+template < typename T >
+void RotateAxisX(const T *orginalR, T *newR, const RDouble &degree)
+{
+    newR[0] = orginalR[0];
+    newR[1] = orginalR[1] * cos(degree) + orginalR[2] * sin(degree);
+    newR[2] = orginalR[2] * cos(degree) - orginalR[1] * sin(degree);
+}
+
+//! Coordinate rotate with Y axis:
+//! x' = x*cos(degree) - z*sin(degree).
+//! y' = y.
+//! z' = z*cos(degree) + x*sin(degree).
+template < typename T >
+void RotateAxisY(const T *orginalR, T *newR, const RDouble &degree)
+{
+    newR[0] = orginalR[0] * cos(degree) - orginalR[2] * sin(degree);
+    newR[1] = orginalR[1];
+    newR[2] = orginalR[2] * cos(degree) + orginalR[0] * sin(degree);
+}
+
+//! Coordinate rotate with Z axis:
+//! x' = x*cos(degree) + y*sin(degree).
+//! y' = y*cos(degree) - x*sin(degree).
+//! z' = z.
+template < typename T >
+void RotateAxisZ(const T *orginalR, T *newR, const RDouble &degree)
+{
+    newR[0] = orginalR[0] * cos(degree) + orginalR[1] * sin(degree);
+    newR[1] = orginalR[1] * cos(degree) - orginalR[0] * sin(degree);
+    newR[2] = orginalR[2];
+}
+
+template < typename T1, typename T2, typename T3 >
+void MatrixMultiply(T1 **a, T2 *b, T3 *c, int m, int n)
+{
+    for (int i = 0; i < m; ++ i)
+    {
+        c[i] = 0;
+        for (int j = 0; j < n; ++ j)
+        {
+            c[i] += a[i][j] * b[j];
+        }
+    }
+}
+
+template < typename T1, typename T2, typename T3 >
+void MatrixMultiply(T1 **a, vector< T2 > &b, vector< T3 > &c, int m, int n)
+{
+    MatrixMultiply(a, &b[0], &c[0], m, n);
+}
+
+template<typename T> 
+string toString(const T &t)
+{ 
+    ostringstream oss;
+    oss<<t;
+    return oss.str();
+}
+
+//! Compute the cross product of two vectors.
+//! @param[in]  vec1        The 1st vector, 3D array.
+//! @param[in]  vec2        The 2nd vector, 3D array.
+//! @param[out] crossVec    The cross product, 3D array.
+void CrossProduct(RDouble *vec1, RDouble *vec2, RDouble *crossVec);
+
+template < typename T1, typename T2, typename T3 >
+void CrossProduct(vector< T1 > &a, vector< T2 > &b, vector< T3 > &crossProduct)
+{
+    CrossProduct(&a[0], &b[0], &crossProduct[0]);
+}
+
+//! Compute the unit face (a line with two end-points) normal of 2D case.
+//! @param[in] startPoint     Start point, 2D array.
+//! @param[in] endPoint       End point, 2D array.
+//! @param[out] unitNormal    The unit normal direction, 3D array, unitNormal[2] is the length of the original face.
+void UnitFaceNormal2D(RDouble *startPoint, RDouble *endPoint, RDouble *unitNormal);
+
+//! Compute the area of the quadrilateral that was composed by vector of r1, r2, r3, r4.
+//! The area is called "volume" also in 2D mesh.
+//! @param[in] r1       The 1st vector, 3D array.
+//! @param[in] r2       The 2nd vector, 3D array.
+//! @param[in] r3       The 3rd vector, 3D array.
+//! @param[in] r4       The 4th vector, 3D array.
+//! @param[out] area    The area of quadrilateral, that is called "volume" also in 2D mesh.
+void Area2D(RDouble *r1, RDouble *r2, RDouble *r3, RDouble *r4, RDouble &area);
+
+//! Compute the face normal of 3D case.
+//! @param[in] r1    The 1st vector, 3D array.
+//! @param[in] r2    The 2nd vector, 3D array.
+//! @param[in] r3    The 3rd vector, 3D array.
+//! @param[in] r4    The 4th vector, 3D array.
+//! @param[out] faceNormal    The normal direction, 3D array.
+void FaceNormal3D(RDouble *r1, RDouble *r2, RDouble *r3, RDouble *r4, RDouble *faceNormal);
+
+//! Normalize the input vector for nDim-dimension vector.
+//! @param[in]  vecIn     The input vector without normalization, with dimension of 'nDim'.
+//! @param[out] vecOut    The output vector that has been normalized, with dimension of 'nDim + 1'.
+//! @param[in]  nDim      dimension of the input vector that need to be normalized.
+void NormalizeVector(RDouble *vecIn, RDouble *vecOut, int nDim);
+
+//! Compute the six-times volume of a tetrahedron.
+//! @param[in] r1,r2,r3,r4    The four edges of the tetrahedron.
+//! @param[in] vol    The six-times of the real tetrahedron volume.
+void Vol_Tetrahedron(RDouble *r1, RDouble *r2, RDouble *r3, RDouble *r4, RDouble &vol);
+
+//! ComputDist.
+//! @param[in] x1,y1,z1,x2,y2,z2
+double ComputDist(double x1, double y1, double z1, double x2, double y2, double z2);
+
+//! Determinant.
+//! @param[in] A1,A2,A3,B1,B2,B3,C1,C2,C3
+double Determinant(double A1, double A2, double A3,
+                   double B1, double B2, double B3,
+                   double C1, double C2, double C3);
+
+void RestrictIndex(int &i, int &j, int &k, const int &maxi, const int &maxj, const int &maxk);
+
+//! To solve the linear equation like the format A * x = b, where A is an matrix, while both x and b are vectors.
+//! @param[in]: diagonalMatrix is the left-hand side matrix.
+//! @param[in]: rhsMatrix is the right-hand side vector.
+//! @param[in]: nEquation denotes the number of the equation.
+//! @param[out]: deltaQ is solution vector of the linear equation.
+void SolveLinearEquation(RDouble2D *diagonalMatrix, RDouble *rhsMatrix, int nEquation, RDouble *deltaQ);
+
+}
\ No newline at end of file
diff --git a/API/Math/include/Math_Limiter.h b/API/Math/include/Math_Limiter.h
new file mode 100644
index 0000000..ad93bcf
--- /dev/null
+++ b/API/Math/include/Math_Limiter.h
@@ -0,0 +1,203 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Math_Limiter.h
+//! @brief     Limiters' mathematic functions, such as vencat, vanleer, etc.
+//! @author    Bell, He Xin.
+
+#pragma once
+#include "Precision.h"
+#include "Math_BasisFunction.h"
+#include <cmath>
+#include <algorithm>
+using namespace std;
+ 
+namespace PHSPACE
+{
+//! CheckLimit.
+//! @param[in]: value
+//! @param[in]: v_min
+//! @param[in]: v_max
+inline bool CheckLimit(const RDouble &value, const RDouble &v_min, const RDouble &v_max)
+{
+    if (value < v_min || value > v_max) return false;
+    return true;
+}
+
+//! NOLIMITER.
+//! @param[in]: x
+//! @param[in]: y
+inline RDouble NOLIMITER(const RDouble &x)
+{
+    return x;
+}
+
+//! MINMOD.
+//! @param[in]: x
+//! @param[in]: y
+inline RDouble MINMOD(const RDouble &x, const RDouble &y)
+{
+    return half * (SIGN(one, x) + SIGN(one, y)) * MIN(ABS(x), ABS(y));
+}
+
+//! VANLEER.
+//! @param[in]: x
+//! @param[in]: y
+inline RDouble VANLEER(const RDouble &x, const RDouble &y)
+{
+    const RDouble eps = 1.0e-12;
+
+    return (SIGN(one, x) + SIGN(one, y)) * x * y / (ABS(x + y) + eps);
+}
+
+//! MIX_MINMOD_VANLEER.
+//! @param[in]: x
+//! @param[in]: y
+inline RDouble MIX_MINMOD_VANLEER(const RDouble &x, const RDouble &y)
+{
+    const RDouble eps = 1.0e-15;
+    RDouble z, z2, z3, xy2, absx, absy, min_van;
+
+    z = half * (SIGN(one, x) + SIGN(one, y));
+    absx = abs(x);
+    absy = abs(y);
+    xy2 = (x + x) * y;
+    z2 = xy2 / (x * x + y * y + eps);
+    z3 = xy2 / (absx + absy + eps);
+    min_van = z * ((one - z2) * min(absx , absy) + z2 * z3);
+/*
+    if (ABS(z) < eps)
+    {
+        min_van = 0.0;
+    }
+    else
+    {
+        absx = abs(x);
+        absy = abs(y);
+        xy2 = (x + x) * y;
+        z2 = xy2 / (x * x + y * y + eps);
+        z3 = xy2 / (absx + absy + eps);
+        min_van = z * ((1.0 - z2) * min(absx, absy) + z2 * z3);
+    }
+*/
+    return min_van;
+}
+
+//! VANALBADA.
+//! @param[in]: x
+//! @param[in]: y
+inline RDouble VANALBADA(const RDouble &x, const RDouble &y)
+{
+    //const RDouble eps = 1.0e-7;
+    //RDouble cx, cy, cd;
+    //cx = x * x + eps;
+    //cy = y * y + eps;
+    //cd = 1.0 / (cx + cy);
+    //return (cx * y + cy * x) * cd;
+    const RDouble eps = 1.0e-6;
+//    RDouble cx, cy, cd;
+//    cx = x * x + eps;
+//    cy = y * y + eps;
+//    cd = 1.0 / (cx + cy);
+    return 0.5 * (SIGN(one, x) + SIGN(one, y)) * ((x * y)* ABS(x + y)) / (x * x + y * y + eps);
+}
+
+//! VANALBADACLZ.
+//! @param[in]: x
+//! @param[in]: y
+inline RDouble VANALBADACLZ(const RDouble &x, const RDouble &y)
+{
+    const RDouble eps = 1.0e-6;
+    RDouble cx, cy, cd;
+    cx = x * x + eps;
+    cy = y * y + eps;
+    cd = 1.0 / (cx + cy);
+    return 0.5 * (SIGN(one, x) + SIGN(one, y)) * (cx * y + cy * x) * cd;
+}
+
+//! SMOOTH.
+//! @param[in]: x
+//! @param[in]: y
+inline RDouble SMOOTH(const RDouble &x, const RDouble &y)
+{
+    const RDouble eps = 1.0e-6;
+    RDouble Smooth= (2. * x * y + eps) / (x * x + y * y + eps);    //0.5 * (SIGN(1.0, x) + SIGN(1.0, y)) *
+    return Smooth;
+}
+
+//! SMOOTHTURB.
+//! @param[in]: x
+//! @param[in]: y
+inline RDouble SMOOTHTURB(const RDouble &x, const RDouble &y)
+{
+    const RDouble eps = 1.0e-6;
+    RDouble Smooth = (2. * x * y) / (x * x + y * y + eps);    //0.5 * (SIGN(1.0, x) + SIGN(1.0, y)) *
+    return Smooth;
+}
+
+//! THIRD_ORDER_SMOOTH.
+//! @param[in]: x
+//! @param[in]: y
+inline RDouble THIRD_ORDER_SMOOTH(const RDouble &x, const RDouble &y)
+{
+    const RDouble eps2 = 1.0e-6;
+    RDouble Smooth1 = x * (y * y + 2.0 * eps2) +  y * (2.0 * x * x + eps2);
+    RDouble Smooth2 = 2.0 * x * x - x * y + 2.0 * y * y + 3.0 * eps2;
+    RDouble Smooth = Smooth1 / Smooth2;
+    return Smooth;
+}
+
+//! THIRD_ORDER_MINMOD_SMOOTH.
+//! @param[in]: x
+//! @param[in]: y
+inline RDouble THIRD_ORDER_MINMOD_SMOOTH(const RDouble &x, const RDouble &y)
+{
+    const RDouble eps2 = 1.0e-6;
+    RDouble Smooth1 = x * (y * y + 2.0 * eps2) +  y * (2.0 * x * x + eps2);
+    RDouble Smooth2 = 2.0 * x * x - x * y + 2.0 * y * y + 3.0 * eps2;
+    RDouble Smooth = 0.5 * (SIGN(one, x) + SIGN(one, y)) * Smooth1 / Smooth2;
+    return Smooth;
+}
+
+//! VenFun.
+//! @param[in]: x
+//! @param[in]: y
+//! @param[in]: eps
+inline RDouble VenFun(const RDouble &x, const RDouble &y, const RDouble &eps)
+{
+    RDouble x2 = x * x;
+    RDouble xy = x * y;
+    RDouble y2 = y * y;
+    return ((x2 + eps + 2.0 * xy) / (x2 + 2.0 * y2 + xy + eps));
+}
+
+PH_DEFINE_BINARY_FUNCTION(PH_MinMod, MINMOD)
+PH_DEFINE_BINARY_FUNCTION(PH_Vanleer, VANLEER)
+PH_DEFINE_BINARY_FUNCTION(PH_Vanalbada, VANALBADA)
+PH_DEFINE_BINARY_FUNCTION(PH_VanalbadaCLZ, VANALBADACLZ)
+PH_DEFINE_BINARY_FUNCTION(PH_Smooth, SMOOTH)
+PH_DEFINE_BINARY_FUNCTION(PH_Third_Order_Smooth, THIRD_ORDER_SMOOTH)
+PH_DEFINE_BINARY_FUNCTION(PH_Third_Order_Minmod_Smooth, THIRD_ORDER_MINMOD_SMOOTH)
+PH_DEFINE_BINARY_FUNCTION(PH_Smooth_turb, SMOOTHTURB)
+PH_DEFINE_BINARY_FUNCTION(PH_Min_Van, MIX_MINMOD_VANLEER)
+
+PH_DECLARE_ARRAY_BINARY(MinMod, PH_MinMod)
+PH_DECLARE_ARRAY_BINARY(Vanleer, PH_Vanleer)
+PH_DECLARE_ARRAY_BINARY(Vanalbada, PH_Vanalbada)
+PH_DECLARE_ARRAY_BINARY(VanalbadaCLZ, PH_VanalbadaCLZ)
+PH_DECLARE_ARRAY_BINARY(Smooth, PH_Smooth)
+PH_DECLARE_ARRAY_BINARY(Third_Order_SMOOTH, PH_Third_Order_Smooth)
+PH_DECLARE_ARRAY_BINARY(Third_Order_Minmod_Smooth, PH_Third_Order_Minmod_Smooth)
+PH_DECLARE_ARRAY_BINARY(Smoothturb, PH_Smooth_turb)
+
+PH_DECLARE_ARRAY_BINARY(Minvan, PH_Min_Van)
+
+}
\ No newline at end of file
diff --git a/API/Math/src/Math_BasisFunction.cpp b/API/Math/src/Math_BasisFunction.cpp
new file mode 100644
index 0000000..499d49c
--- /dev/null
+++ b/API/Math/src/Math_BasisFunction.cpp
@@ -0,0 +1,251 @@
+#include "Math_BasisFunction.h"
+#include "TypeDefine.h"
+
+namespace PHSPACE
+{
+
+int GetProgressInterval(int nTotal, int nInterval)
+{
+    nInterval = MIN(nInterval, nTotal);
+    int interval = MAX((int)((nTotal * 1.0) / (nInterval * 1.0)), 1);
+    return interval;
+}
+
+void UnitFaceNormal2D(RDouble *startPoint, RDouble *endPoint, RDouble *unitNormal)
+{
+    RDouble dx, dy, ds, ods;
+
+    dx = endPoint[0] - startPoint[0];
+    dy = endPoint[1] - startPoint[1];
+    ds = sqrt(dx * dx + dy * dy);
+    const RDouble one = 1.0;
+    ods = one / (ds + TINY);
+
+    unitNormal[0] =   dy * ods;
+    unitNormal[1] = - dx * ods;
+    unitNormal[2] =   ds;
+}
+
+void Area2D(RDouble *r1, RDouble *r2, RDouble *r3, RDouble *r4, RDouble &area)
+{
+    RDouble v1[3], v2[3], p1[3], p2[3];
+
+    for (int i = 0; i < 3; ++ i)
+    {
+        v1[i] = r2[i] - r1[i];
+        v2[i] = r3[i] - r2[i];
+    }
+
+    CrossProduct(v1, v2, p1);
+
+    for (int i = 0; i < 3; ++ i)
+    {
+        v1[i] = r4[i] - r3[i];
+        v2[i] = r1[i] - r4[i];
+    }
+
+    CrossProduct(v1, v2, p2);
+
+    const RDouble half = 0.5;
+    area = half * (p1[2] + p2[2]);
+}
+
+void FaceNormal3D(RDouble *r1, RDouble *r2, RDouble *r3, RDouble *r4, RDouble *faceNormal)
+{
+    //! The following code is used to compute the face normal.
+    RDouble v1[3], v2[3], p1[3], p2[3];
+    for (int i = 0; i < 3; ++ i)
+    {
+        v1[i] = r2[i] - r1[i];
+        v2[i] = r3[i] - r2[i];
+    }
+
+    CrossProduct(v1, v2, p1);
+
+    for (int i = 0; i < 3; ++ i)
+    {
+        v1[i] = r4[i] - r3[i];
+        v2[i] = r1[i] - r4[i];
+    }
+
+    CrossProduct(v1, v2, p2);
+
+    const RDouble half = 0.5;
+    for (int i = 0; i < 3; ++ i)
+    {
+        faceNormal[i] = half * (p1[i] + p2[i]) + SMALL;
+    }
+}
+
+void NormalizeVector(RDouble *vecIn, RDouble *vecOut, int nDim)
+{
+    RDouble s = 0.0;
+    for (int i = 0; i < nDim; ++ i)
+    {
+        s += vecIn[i] * vecIn[i];
+    }
+    vecOut[nDim] = sqrt(s);
+
+    const RDouble one = 1.0;
+    RDouble os = one / vecOut[nDim];
+
+    for (int i = 0; i < nDim; ++ i)
+    {
+        vecOut[i] = vecIn[i] * os;
+    }
+}
+
+void CrossProduct(RDouble *vec1, RDouble *vec2, RDouble *crossVec)
+{
+    //! The following code is used to compute cross product.
+    crossVec[0] = vec1[1] * vec2[2] - vec1[2] * vec2[1];
+    crossVec[1] = vec1[2] * vec2[0] - vec1[0] * vec2[2];
+    crossVec[2] = vec1[0] * vec2[1] - vec1[1] * vec2[0];
+}
+
+void Vol_Tetrahedron(RDouble *r1, RDouble *r2, RDouble *r3, RDouble *r4, RDouble &vol)
+{
+    //! The tetrahedron is six-times as much as the normal volume.
+    RDouble a[3], b[3], c[3];
+    for (int i = 0; i < 3; ++ i)
+    {
+        a[i] = r2[i] - r1[i];
+        b[i] = r3[i] - r1[i];
+        c[i] = r4[i] - r1[i];
+    }
+    vol = a[0] * b[1] * c[2] + a[1] * b[2] * c[0] + a[2] * b[0] * c[1]
+        - c[0] * b[1] * a[2] - c[1] * b[2] * a[0] - c[2] * b[0] * a[1];
+}
+
+double ComputDist(double x1, double y1, double z1, double x2, double y2, double z2)
+{
+    double dx, dy, dz;
+    dx = x2 - x1;
+    dy = y2 - y1;
+    dz = z2 - z1;
+
+    return sqrt(dx * dx + dy * dy + dz * dz);
+}
+
+double Determinant(double A1, double A2, double A3,
+                   double B1, double B2, double B3,
+                   double C1, double C2, double C3)
+{
+    double det;
+    det = A1 * B2 * C3 + B1 * C2 * A3 + A2 * B3 * C1 
+        - A3 * B2 * C1 - A2 * B1 * C3 - B3 * C2 * A1;
+
+    return det;
+}
+
+void RestrictIndex(int &i, int &j, int &k, const int &maxi, const int &maxj, const int &maxk)
+{
+    i = MIN(MAX(1, i), MAX(1, maxi));
+    j = MIN(MAX(1, j), MAX(1, maxj));
+    k = MIN(MAX(1, k), MAX(1, maxk));
+}
+
+void SolveLinearEquation(RDouble2D *dMatrix, RDouble *rhsMatrix, int nEquation, RDouble *deltaQ)
+{
+    //! Allocate new matrix or vector in order to avoid changing the values of the original variables.
+    Range II(0, nEquation - 1);
+    RDouble2D *aMatrix = new RDouble2D(II, II, fortranArray);
+    //! Transformation.
+    RDouble2D &A = *reinterpret_cast<RDouble2D *>(aMatrix);
+    //! Initialize the matrix of A.
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        for (int n = 0; n < nEquation; ++ n)
+        {
+            A(m, n) = (*dMatrix)(m, n);
+        }
+    }
+
+    RDouble *B = new RDouble[nEquation];
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        B[m] = rhsMatrix[m];
+    }
+
+    //! To solve the linear equation called A * X = B using the Guass elimination method.
+    for (int k = 0; k < nEquation - 1; ++ k)
+    {
+        //! Select the main element which is the maximum absolution value.
+        RDouble maxElement = fabs(A(k, k));
+        int p = k;    //! To record the row number of the main element.
+        for (int i = k + 1; i < nEquation; ++ i)
+        {
+            if (fabs(A(i, k)) > maxElement)
+            {
+                p = i;
+                maxElement = fabs(A(i, k));
+            }
+        }
+
+        if (p != k)    //! Swap the elements between two rows.
+        {
+            RDouble temp = 0.0;
+            for (int j = k; j < nEquation; ++ j)
+            {
+                temp = A(k, j);
+                A(k, j) = A(p, j);
+                A(p, j) = temp;
+            }
+            temp = B[k];
+            B[k] = B[p];
+            B[p] = temp;
+        }
+
+        //! To eliminate the elements.
+        for (int i = k + 1; i < nEquation; ++ i)
+        {
+            RDouble mik = 0.0;
+            if (fabs(A(k, k)) >= 1.0E-20)
+            {
+                mik = A(i, k) / A(k, k);
+            }
+            else
+            {
+                mik = A(i, k) / (A(k, k) + 1.0E-20);
+            }
+            for (int j = k + 1; j < nEquation; ++ j)
+            {
+                A(i, j) += - mik * A(k, j);
+            }
+            B[i] += - mik * B[k];
+        }
+    }
+
+    //! The step of back substitution.
+    if (fabs(A(nEquation - 1, nEquation - 1)) >= 1.0E-20)
+    {
+        deltaQ[nEquation - 1] = B[nEquation - 1] / A(nEquation - 1, nEquation - 1);
+    }
+    else
+    {
+        deltaQ[nEquation - 1] = B[nEquation - 1] / (A(nEquation - 1, nEquation - 1) + 1.0E-20);
+    }
+
+    for (int i = nEquation - 2; i >= 0; -- i)
+    {
+        RDouble fSum = 0.0;
+        for (int j = i + 1; j < nEquation; ++ j)
+        {
+            fSum += A(i, j) * deltaQ[j];
+        }
+        if (fabs(A(i, i)) >= 1.0E-20)
+        {
+            deltaQ[i] = (B[i] - fSum) / A(i, i);
+        }
+        else
+        {
+            deltaQ[i] = (B[i] - fSum) / (A(i, i) + 1.0E-20);
+        }
+    }
+
+    //! Deallocate the memories.
+    delete aMatrix;
+    delete [] B;    B = NULL;
+}
+
+}
\ No newline at end of file
diff --git a/API/MultiSpecies/include/ChemModel.h b/API/MultiSpecies/include/ChemModel.h
new file mode 100644
index 0000000..cc67ded
--- /dev/null
+++ b/API/MultiSpecies/include/ChemModel.h
@@ -0,0 +1,238 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      ChemModel.h
+//! @brief     Define chemical reactions.
+//! @author    Meng Liyuan, Li Peng.
+
+#pragma once
+#include <string>
+#include "Precision.h"
+#include "TypeDefine.h"
+using namespace std;
+
+namespace PHSPACE
+{
+namespace GAS_SPACE
+{
+//! Define the class of ChemicalReactions that is used to construct the chemical reactions and their reaction rates.
+class ChemicalReactions{
+private:
+    int nReactionType; 
+    //nType = 0 indicates the Gupta Model, nType = 1 indicates the Park Model, and nType = 2 indicates the Dunn-Kang Model.
+    //nType = 3 indicates the Park Model of Mars, and nType = 4 indicates the McKenzie Model of Mars.
+    int nSpecies, nReaction;
+    string *speciesName; //The names of the species in the mixture.
+private:
+    int **stoichForward, **stoichBackward;
+    RDouble **collisionCoef;
+    RDouble **reactionData; //curve fitting data of reaction rate.
+
+    //The type of chemical reaction, reactionType[i][j], i indicates the number of the reaction, j=0 or j=1.
+    //reactionType[i][0]=0 for reaction without the third collision bodies.
+    //reactionType[i][0]=1 for collision reaction. e.g. AB + M = A + B + M.
+    //reactionType[i][1]=0 for dissociation reaction(AB+M=A+B+M)
+    //reactionType[i][1]=1 for dissociation reaction with electron collision(AB+e=A+B+e).
+    //reactionType[i][1]=2 for neutral exchange reaction(AB+C=AC+B)
+    //reactionType[i][1]=3 for charge exchange reaction(AB+ + C=A+ + BC).
+    //reactionType[i][1]=4 for recombination ionization reaction(A+B=AB+ + e)
+    //reactionType[i][1]=5 for ionization reaction with electron collision(A+e=A+ + e + e).
+    int **reactionType;
+
+public:
+    ChemicalReactions();
+    ChemicalReactions(int ns, int nr);
+    ~ChemicalReactions();
+    void AllocateMemories();
+    void DeAllocateMemories();
+    int GetChemicalReactionType() const { return nReactionType; }
+    void SetChemicalReactionType(int ntype) { this->nReactionType = ntype; }
+    void GetChemicalModelInfo(int &ns, int &nr) { ns = nSpecies; nr = nReaction; }
+    void SetChemicalModelInfo(int ns, int nr);
+    string * GetSpeciesNames() const { return this->speciesName; }
+    int ** GetForwardStoichiometricCoefficient() const { return stoichForward; }
+    int ** GetBackwardStoichiometricCoefficient() const { return stoichBackward; }
+    RDouble ** GetThirdBodyCollisionCoefficient() const { return collisionCoef; }
+    RDouble ** GetReactionRateCurveFittingData() const { return reactionData; }
+    int ** GetReactionType() const { return reactionType; }
+public:
+    //! To obtain the data of the Gupta 11s20r reaction model.
+    //! Param[in/out]: reactionCoef denotes the stoichiometric coefficients of forward and backward reaction equation.
+    //! Param[in/out]: collisionCoef indicates the collision coefficients of third body in the reaction equation.
+    //! Param[in/out]: rateCoef indicates the curve fitting data of reaction rates.
+    void GenerateGupta11S20RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef);
+
+    //! To obtain the data of the Park 11s48r reaction model.
+    //! Param[in/out]: reactionCoef denotes the stoichiometric coefficients of forward and backward reaction equation.
+    //! Param[in/out]: collisionCoef indicates the collision coefficients of third body in the reaction equation.
+    //! Param[in/out]: rateCoef indicates the curve fitting data of reaction rates.
+    void GeneratePark11S48RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef);
+
+    //! To obtain the data of the Dunn-Kang 11s26r reaction model.
+    //! Param[in/out]: reactionCoef denotes the stoichiometric coefficients of forward and backward reaction equation.
+    //! Param[in/out]: collisionCoef indicates the collision coefficients of third body in the reaction equation.
+    //! Param[in/out]: rateCoef indicates the curve fitting data of reaction rates.
+    void GenerateDunnKang11S26RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef);
+
+    //! To obtain the data of the Park 12s12r reaction model of Mars.
+    //! Param[in/out]: reactionCoef denotes the stoichiometric coefficients of forward and backward reaction equation.
+    //! Param[in/out]: collisionCoef indicates the collision coefficients of third body in the reaction equation.
+    //! Param[in/out]: rateCoef indicates the curve fitting data of reaction rates.
+    void GenerateMarsPark8S12RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef);
+
+    //! To obtain the data of the McKenzie 12s12r reaction model of Mars.
+    //! Param[in/out]: reactionCoef denotes the stoichiometric coefficients of forward and backward reaction equation.
+    //! Param[in/out]: collisionCoef indicates the collision coefficients of third body in the reaction equation.
+    //! Param[in/out]: rateCoef indicates the curve fitting data of reaction rates.
+    void GenerateMarsMcKenzie8S12RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef);
+
+    void GenerateGuptaAblation16S36RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef);
+
+    void GenerateParkAblation16S38RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef);
+
+    //void GenerateDunnKangAblation17S44RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef);
+
+    void GenerateDunnKangAblation16S42RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef);
+
+    void GenerateCombustionGas12S20RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef);
+    
+    void GenerateGasMixture2S1RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef);
+
+    //! Initialization for chemical reaction model.
+    void Initialization();
+
+    //! Import data of basic chemical reaction model.
+    //! Param[in ]: nType indicates the reaction type.
+    void CreateBasicChemicalReactionModel(int nType = 0);
+
+    //! Create a new chemical reaction model according to the name list.
+    //! Param[in ]: namelist indicates the vector of the species names in the new model.
+    //! Param[out]: pNewModel indicates the new chemical reaction model.
+    void CreateChemicalReactionModel(vector<string> &namelist, ChemicalReactions *pNewModel);
+};
+
+//Find the species in the name list, if found, return the index of the species in the name list.
+int SearchSpeciesInNameList(string strName, vector<string> &namelist);
+
+//! Define the class of ChemkinFitData that is used to compute the specific heat of species via curve fitting method.
+class ChemkinFitData{
+private:
+    int nSpecies;//number of species;
+    string *speciesName; //The names of the species in the mixture.
+    RDouble ***curveFittingData;
+    RDouble **enthalpyFitData; //curve fit coefficients for enthalpy.
+    RDouble ***curveFittingDataT2; //Curve fit coefficients for two-temperature model.
+    int nInterval, nCoefNum;
+    RDouble *temperatureRange;
+    RDouble *temperatureStart; //The start temperature when the curve fit method is valid.
+public:
+    ChemkinFitData();
+    ~ChemkinFitData();
+    void AllocateMemories();
+    void DeAllocateMemories();
+    void GetInterpolationInfo(int &ns, int &m, int &n) { ns = nSpecies; m = nInterval; n = nCoefNum; }
+    void SetInterpolationInfo(int ns, int m = 5, int n = 6);
+    string * GetSpeciesNames() const { return this->speciesName; }
+    RDouble *** GetCurveFittingData() const { return curveFittingData; }
+    RDouble * GetTemperatureRange() const { return temperatureRange; }
+    RDouble ** GetEnthalpyFitData() const { return enthalpyFitData; }
+    RDouble * GetStartTemperature() const { return temperatureStart; }
+    RDouble *** GetCurveFittingDataT2() const { return curveFittingDataT2; }
+public:
+    void SetCurveFittingDataT2();
+
+    //! To Generate the curve fitting data in the chemkin method.
+    void GenerateFullChemkinData();
+
+    //! Create a new ChemkinFitData according to the name list.
+    //! Param[in ]: namelist indicates the vector of the species names in the new model.
+    //! Param[out]: pNewData indicates the new ChemkinFitData.
+    void CreateChemkinFitData(vector<string> &namelist, ChemkinFitData *pNewData);
+};
+
+//! Define the class of TransportFitData that is used to compute the transport coefficients such as viscosity.
+class TransportFitData{
+private:
+    int nSpecies; //number of species;
+    string *speciesName; //The names of the species in the mixture.
+    RDouble **viscosityFitData; //the curve fitting data of viscosity.
+    RDouble **collisionAreaFitData; // the curve fitting data of the average collision area.
+public:
+    TransportFitData();
+    ~TransportFitData();
+    void AllocateMemories();
+    void DeAllocateMemories();
+    void SetSpeciesNumber(int ns);
+    int GetSpeciesNumber() const { return nSpecies; }
+    string * GetSpeciesNames() const { return this->speciesName; }
+    RDouble ** GetViscosityCurveFittingData() const { return viscosityFitData; }
+    RDouble ** GetCollisionAreaCurveFittingData() const { return collisionAreaFitData; }
+public:
+    //! To Generate the full curve fitting data of 16 species.
+    void GenerateFullCurveFittingData();
+
+    //! Create a new TransportFitData according to the name list.
+    //! Param[in ]: namelist indicates the vector of the species names in the new model.
+    //! Param[out]: pNewData indicates the new TransportFitData.
+    void CreateTransportFitData(vector<string> &namelist, TransportFitData *pNewData);
+};
+
+struct VibrationModeData{
+    int nMode; //The number of vibrational mode.
+    int g[10]; //The degeneracy of each vibrational mode.
+    RDouble Tv[10]; //The characteristic vibrational temperature of each vibrational mode, (K).
+};
+
+//! Define the class of AtmosphereData that is used to save the physical and chemical data.
+class AtmosphereData{
+private:
+    int nSpecies; //number of species;
+    string *speciesName; // the name of species.
+    int *nSpeciesType; // the type of species.
+    int *nSpeciesCharge; // the charge of species.
+    int *nSpeciesG0; // the degeneracy of species.
+    int *nSpeciesG1; // the degeneracy of species.
+    RDouble *speciesMass; // the molecular weight of species, (g/mol).
+    RDouble *speciesTtr; // the characteristic temperature of species, (K).
+    VibrationModeData *speciesVibrationalModeData; //The data of vibrational mode.
+    RDouble *speciesTes; // the characteristic electronic temperature of species, (K).
+    RDouble *speciesEnthalpy; // the formation enthalpy of species, (J/kg).
+    RDouble *speciesSigma; // the collision area of species, (m2).
+public:
+    AtmosphereData();
+    ~AtmosphereData();
+    void AllocateMemories();
+    void DeAllocateMemories();
+    void SetSpeciesNumber(int ns);
+    string * GetSpeciesNames() const { return speciesName; }
+    int GetSpeciesNumber() const { return nSpecies; }
+    int * GetSpeciesType() const { return nSpeciesType; }
+    int * GetSpeciesCharge() const { return nSpeciesCharge; }
+    RDouble * GetSpeciesMolecularWeight() const{ return speciesMass; }
+    int * GetSpeciesDegeneracy0() const { return nSpeciesG0; }
+    int * GetSpeciesDegeneracy1() const { return nSpeciesG1; }
+    RDouble * GetSpeciesTemperature() const { return speciesTtr; }
+    VibrationModeData * GetSpeciesVibrationalModeData() const { return speciesVibrationalModeData; }
+    RDouble * GetSpeciesElectronTemperature() const { return speciesTes; }
+    RDouble * GetSpeciesFormationEnthalpy() const { return speciesEnthalpy; }
+    RDouble * GetSpeciesCollisionArea() const { return speciesSigma; }
+public:
+    //! To Generate the physical and chemicla data of 16 species.
+    void GenerateFullPhysicalChemicalData();
+
+    //! Create a new AtmosphereData according to the name list.
+    //! Param[in ]: namelist indicates the vector of the species names in the new model.
+    //! Param[out]: pNewData indicates the new AtmosphereData.
+    void CreateAtmosphereData(vector<string> &namelist, AtmosphereData *pNewData);
+};
+
+}// end of GAS_SPACE
+}// end of PHSPACE
diff --git a/API/MultiSpecies/include/MixedGas.h b/API/MultiSpecies/include/MixedGas.h
new file mode 100644
index 0000000..2352400
--- /dev/null
+++ b/API/MultiSpecies/include/MixedGas.h
@@ -0,0 +1,1402 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      MixedGas.h
+//! @brief     Explain this file briefly.
+//! @author    Meng Liyuan, Li Peng.
+
+#pragma once
+#include "Precision.h"
+#include "Gas.h"
+#include "Geo_StructGrid.h"
+#include "Geo_UnstructGrid.h"
+#include "ChemModel.h"
+
+#include <string>
+using namespace std;
+
+namespace PHSPACE
+{
+class DataContainer;
+
+namespace GAS_SPACE
+{
+const RDouble chem_temp_diff = 1.0e-8;
+const int chem_pres_iter_max = 1000;
+
+class ThermodynamicFunction
+{
+public:
+    ThermodynamicFunction();
+    ~ThermodynamicFunction();
+private:
+    int number_of_polynomial_coefficient;
+    int number_of_temperature_interval;
+    RDouble **polynomial_coefficient;
+    RDouble *enthalpyFitCoefficient;
+    RDouble **polynomial_coefficientT2;
+public:
+    int  GetNumberOfPolynomialCoefficient() const { return number_of_polynomial_coefficient; }
+    void SetNumberOfPolynomialCoefficient(int number_of_polynomial_coefficient) { this->number_of_polynomial_coefficient = number_of_polynomial_coefficient; }
+    void Init(int number_of_temperature_interval, int number_of_polynomial_coefficient);
+    RDouble * GetPolynomialCoefficient(int i_temperature_interval) { return polynomial_coefficient[i_temperature_interval]; }
+    RDouble * GetPolynomialCoefficientT2(int i_temperature_interval) { return polynomial_coefficientT2[i_temperature_interval]; }
+    RDouble * GetEnthalpyFitCoefficient() { return enthalpyFitCoefficient; }
+public:
+    void ReadPolynomialCoefficient(fstream &file);
+    void CreatePolynomialCoefficient(RDouble **curveFitData, RDouble **curveFitDataT2, RDouble *enthalpyFitData);
+    void ReadPolynomialCoefficient(DataContainer *cdata);
+    void WritePolynomialCoefficient(DataContainer *cdata);
+};
+
+class ThermodynamicManager
+{
+public:
+    ThermodynamicManager();
+    ~ThermodynamicManager();
+private:
+    int numberOfSpecies;
+    int numberOfTemperatureInterval, numberofpolynomialcoefficient;
+    ThermodynamicFunction **thermoDynamicFunction;
+    RDouble *temperatureRange;
+    RDouble *temperatureStart;
+public:
+    void Init(int numberOfSpecies);
+    void Read(fstream &file);
+    void GenerateData(vector<string> &namelist);
+    void Read(DataContainer *cdata);
+    void Write(DataContainer *cdata);
+public:
+    RDouble * GetEnthalpyFitCoefficient(int iSpecies);
+    RDouble * GetPolynomialCoefficient(int iSpecies, int itemperature);
+    RDouble * GetPolynomialCoefficientT2(int iSpecies, int itemperature);
+    void GetTemperatureRangeIndex(const RDouble &temperature_dimensional, int &indexOfTemperatureRange);
+
+    RDouble GetTemperatureMin();
+    RDouble GetTemperatureMax();
+
+    int GetNumberofPolynomialCoefficient();
+    RDouble GetBenchmarkTemperature(int iSpecies);
+};
+
+class ReactionRate
+{
+public:
+    ReactionRate();
+    ~ReactionRate();
+private:
+    int numberOfReaction;
+    RDouble *afr, *bfr, *cfr, *abr, *bbr, *cbr;
+public:
+    void Init(int numberOfReaction);
+    void Read(fstream &file);
+    //! To generate the reaction rate coefficient of curve fitting method.
+    //! Param[in]: reationCoef denotes the array of saving the chemical reaction coefficient of each reaction equation.
+    void Create(RDouble **reationCoef);
+    void Read(DataContainer *cdata);
+    void Write(DataContainer *cdata);
+    RDouble * GetForwardReactionRateCoefficientA() { return afr; }
+    RDouble * GetForwardReactionRateCoefficientB() { return bfr; }
+    RDouble * GetForwardReactionRateCoefficientC() { return cfr; }
+
+    RDouble * GetBackwardReactionRateCoefficientA() { return abr; }
+    RDouble * GetBackwardReactionRateCoefficientB() { return bbr; }
+    RDouble * GetBackwardReactionRateCoefficientC() { return cbr; }
+};
+
+class StoichiometricEquation
+{
+public:
+    StoichiometricEquation();
+    ~StoichiometricEquation();
+private:
+    int numberOfReaction, numberOfSpecies;
+    int **cvp, **cvn;
+    RDouble **cpz;
+    int *reactionType;
+    bool *isCollisionType;
+public:
+    void Init(int numberOfReaction, int numberOfSpecies);
+    void Read(fstream &file);
+    void Create(int **forwardCoef, int **backwardCoef, RDouble **collisionCoef, int **reactionFlag);
+    void Read(DataContainer *cdata);
+    void Write(DataContainer *cdata);
+
+    int * GetChemicalReactionType() { return reactionType; }
+    bool * GetCollisionReactionFlag() { return isCollisionType; }
+
+    int ** GetForwardReactionStoichiometricCoefficient() const { return cvp; }
+    int ** GetBackwardReactionStoichiometricCoefficient() const { return cvn; }
+    RDouble ** GetReactionStoichiometricThirdBodyCoefficient() const { return cpz; }
+};
+
+class CurveFitsMethod
+{
+public:
+    CurveFitsMethod();
+    ~CurveFitsMethod();
+private:
+    int numberOfSpecies;
+    //The curve fit coefficients of blottner method.
+    RDouble *blotter_ai, *blotter_bi, *blotter_ci, *blotter_di, *blotter_ei;
+    //The curve fit coefficients of average collision areas of species couples.
+    RDouble *omega_ai, *omega_bi, *omega_ci, *omega_di;
+    //The curve fit coefficients of vibrational excitation rate of electron collision-N2.
+    RDouble *curvefit_av, *curvefit_bv, *curvefit_cv;
+    //The curve fit coefficients of effective collision cross-sectional area between the electron and neutral heavy particle.
+    //The sorting sequence of the neutral heavy particle is O, O2, NO, N and N2.
+    RDouble *curvefit_aes, *curvefit_bes, *curvefit_ces;
+public:
+    void Init(int numberOfSpecies, int nGasModel = 0);
+    void Read(fstream &file);
+    void GenerateData(vector<string> &namelist);
+    void Read(DataContainer *cdata);
+    void Write(DataContainer *cdata);
+public:
+    //!Obtain the array of curve fit coefficients that is used to compute the viscosities of species.
+    RDouble * GetBlotterCurveFittingCoefficientA() const { return blotter_ai; }
+    RDouble * GetBlotterCurveFittingCoefficientB() const { return blotter_bi; }
+    RDouble * GetBlotterCurveFittingCoefficientC() const { return blotter_ci; }
+    RDouble * GetBlotterCurveFittingCoefficientD() const { return blotter_di; }
+    RDouble * GetBlotterCurveFittingCoefficientE() const { return blotter_ei; }
+    //! Set the curve fitting data of Blotter viscosity.
+    //! @param[in ]: speciesName is an array of saving the names of species.
+    //! @param[in ]: nSpecies is the number of the total species.
+    //void SetBlotterCurveFittingCoefficients(string *speciesName, int nSpecies);
+    //void SetGuptaCurveFittingCoefficients(string *speciesName, int nSpecies);
+
+    //!Obtain the array of curve fit coefficients that is used to compute the average collision areas of species couples.
+    RDouble * GetOmegaCurveFittingCoefficientA() const { return omega_ai; }
+    RDouble * GetOmegaCurveFittingCoefficientB() const { return omega_bi; }
+    RDouble * GetOmegaCurveFittingCoefficientC() const { return omega_ci; }
+    RDouble * GetOmegaCurveFittingCoefficientD() const { return omega_di; }
+
+    //!Set the curve fit coefficients of vibrational excitation rate of electron collision-N2.
+    void SetNitrogenVibrationalExcitationRate();
+    //!Obtain the array of curve fit coefficients that is used to compute the vibrational excitation rate of electron collision-N2.
+    RDouble * GetNitrogenVibrationalExcitationRateA() const { return curvefit_av; }
+    RDouble * GetNitrogenVibrationalExcitationRateB() const { return curvefit_bv; }
+    RDouble * GetNitrogenVibrationalExcitationRateC() const { return curvefit_cv; }
+
+    //!Set the curve fit coefficients of effective collision cross-sectional area between the electron and neutral heavy particle.
+    void SetEffectiveCollisionCrossSectionalAreaCurveFits(int nGasModel = 0);
+    void SetEffectiveCollisionCrossSectionalAreaCurveFits(vector<string> &namelist);
+
+    //!Obtain the array of curve fit coefficients that is used to compute the effective collision cross-sectional area between the electron and neutral heavy particle.
+    RDouble * GetEffectiveCollisionCrossSectionalAreaCurveFitsA() const { return curvefit_aes; }
+    RDouble * GetEffectiveCollisionCrossSectionalAreaCurveFitsB() const { return curvefit_bes; }
+    RDouble * GetEffectiveCollisionCrossSectionalAreaCurveFitsC() const { return curvefit_ces; }
+};
+
+class SchmidtNumber
+{
+public:
+    SchmidtNumber();
+    ~SchmidtNumber();
+private:
+    int numberOfSpecies;
+    RDouble *scl, *sct, *oscl, *osct;
+public:
+    void Init(int numberOfSpecies);
+    //void Read(fstream &file);
+    void ComputeSpeciesSchmidtNumber(int *ionTypeOfSpecies);
+    void Read(DataContainer *cdata);
+    void Write(DataContainer *cdata);
+public:
+    RDouble * GetLaminarSchmidtNumber() const { return scl; }
+    RDouble * GetTurbulentSchmidtNumber() const { return sct; }
+
+    RDouble * GetLaminarSchmidtNumberReciprocal() const { return oscl; }
+    RDouble * GetTurbulentSchmidtNumberReciprocal() const { return osct; }
+};
+
+//! Define the struct to store thermodynamic properties.
+typedef struct{
+    //! The type is used to identify electron, monatom and polyatom.
+    int nType;
+    //! The degeneracy.
+    int gs0, gs1;
+    //! The characteristic temperature of vibration mode.
+    //RDouble Tvs;
+    VibrationModeData Tvs;
+    //! The characteristic temperature of electron mode.
+    RDouble Tes;
+    //! The enthalpy of formation.
+    RDouble hs0;
+}Thermo_Param;
+
+
+class MolecularProperty
+{
+public:
+    MolecularProperty();
+    ~MolecularProperty();
+private:
+    int numberOfSpecies;
+    RDouble *molecularWeightDimensional, *molecularWeight, *oMolecularWeightDimensional, *oMolecularWeight;
+    RDouble *characteristicTemperatureOfSpecies;
+    RDouble *mass_fraction_reference;
+    string *name_of_species;
+    int    *ionTypeOfSpecies;
+    RDouble *collisionCrossSection;
+    SchmidtNumber *schmidt_number;
+private:
+    //! The thermodynamic parameters of species in the mixed gas.
+    Thermo_Param *thermodynamicProperties;
+public:
+    void Init(int numberOfSpecies);
+    void Read(fstream &file);
+    void GenerateData(vector<string> &namelist, vector<RDouble> &initMassFractions);
+    void Read(DataContainer *cdata);
+    void Write(DataContainer *cdata);
+public:
+    //! Obtain the nondimensional molecular weight of the mixture gas.
+    RDouble * GetMolecularWeight() const { return molecularWeight; }
+    RDouble * GetMolecularWeightReciprocal() const { return oMolecularWeight; }
+
+    //! Obtain the dimensional molecular weight of the mixture gas whose unit is kg/mol.
+    RDouble * GetMolecularWeightDimensional() const { return molecularWeightDimensional; }
+    RDouble * GetMolecularWeightReciprocalDimensional() const { return oMolecularWeightDimensional; }
+
+    RDouble * GetInitialMassFraction() const { return mass_fraction_reference; }
+
+    string * GetNameOfSpecies() const { return name_of_species; }
+
+    RDouble * GetLaminarSchmidtNumberReciprocal() const;
+    RDouble * GetTurbulentSchmidtNumberReciprocal() const;
+
+    //! To obtain the thermodynamic properties of species.
+    Thermo_Param * GetThermodynamicProperties() const { return thermodynamicProperties; }
+
+    int * GetIonTypeOfSpecies() const { return ionTypeOfSpecies; }
+};
+
+class MixedGas : public Gas
+{
+public:
+    MixedGas();
+    ~MixedGas();
+private:
+    FluidParameter referenceParameterDimensional;    //! Ref
+    ThermodynamicManager  *thermodynamicManager;     //! Ppolynomial fitting for Species Energy
+    ReactionRate *reactionRate;                      //! kb��kf
+    StoichiometricEquation *stoichiometricEquation;  //! Equation coef for matrix
+    CurveFitsMethod *CurveFits;                      //! Curve fitting for viscosity��collision section
+    MolecularProperty *molecularProperty;            //! Species characteristic parameter
+private:
+    int nm, nl, numberOfSpecies, numberOfReaction, nchem, ntmodel, nEquation;
+    int nTEnergyModel;  //! 0 indicates Energy level method ,  1 is for  curve fitting method.
+    int nSpeciesEquation; //! The number of species equation.
+    int nElectronIndex; //! The index of electron in the array.
+    int nNitrogenIndex; //! The index of nitrogen in the array.
+    int nLastSpeciesIndex; //! The index of the key species with the maximum mass fraction in the array.
+    int nGasModel;    //! nGasModel = 0 indicates the gas of Earth, nGasModel = 1 is for gas of Mars.
+    int nSpeciesLimit ;
+    int mTT;
+    int mTV;
+    int mTE;
+    int nEnergyRecycle;
+    int nIsChemicalFreeze;
+    int nIsSuperCatalytic;
+    int nChemcalSourceModified;
+    int nChemcalSourceEsMethod;
+    int nDensityForWallMethod;
+
+    RDouble electronMass;
+    RDouble electronMassDimension;
+    RDouble reynoldsReferenceLengthDimensional;
+    RDouble coefficientOfStateEquation; //universal gas constant, R
+    RDouble oprl, oprt;
+    RDouble referenceEnergy;
+    RDouble referenceSpecificHeat;
+    //! The power of translational-rotational temperature in the Park's V-D(Vibration-Dissociation) coupling model.
+    RDouble parkVDPower; //the value is in range of [0.0, 1.0].
+    RDouble chemicalRelaxCorf;
+    RDouble veTemperatureMin;
+    RDouble veTemperatureMinNonDimensional;
+    RDouble trTemperatureMin;
+    RDouble trTemperatureMinNonDimensional;
+    RDouble maxViscous;
+    RDouble lnMaximum;
+  //  int nMaxStepTemperature, precisionTemperature;
+public:
+    void GetReferenceParameters(FluidParameter &refParam) { refParam = referenceParameterDimensional; }
+    int GetSpeciesEquationNumber() const { return nSpeciesEquation; }
+    int GetNitrogenIndex() const { return nNitrogenIndex; }
+    int GetElectronIndex() const { return nElectronIndex; }
+    void SetSpeciesEquationNumber(int ns) { nSpeciesEquation = ns; }
+    void SetNitrogenIndex(int nn) { nNitrogenIndex = nn; }
+    void SetElectronIndex(int ne) { nElectronIndex = ne; }
+    void SetElectronMolecularWeight(RDouble me) { electronMass = me; }
+    RDouble GetElectronMolecularWeight() const { return electronMass; }
+    RDouble GetDimensionalElectronMolecularWeight() const { return electronMassDimension; }
+    int GetNSEquationNumber() const { return nm; }
+    int GetLaminarNumber() const { return nl; }
+    int GetTemperatureModel() const { return ntmodel; }
+    int GetChemicalType() const { return nchem; }
+    int GetnLastSpeciesIndex() const { return nLastSpeciesIndex; }
+    RDouble * GetInitMassFraction() const { return molecularProperty->GetInitialMassFraction(); }
+    virtual RDouble * GetMolecularWeightDimensional() const { return molecularProperty->GetMolecularWeightDimensional(); }
+    RDouble ComputeReferenceTotalEnthalpy();
+    int GetmTT() const { return mTT; }
+    int GetmTV() const { return mTV; }
+    int GetmTE() const { return mTE; }
+    int GetnEnergyRecycle() const { return nEnergyRecycle; }
+    int GetnChemcalSourceModified() const { return nChemcalSourceModified; }
+    int GetGasModelType() { return this->nGasModel; }
+    int GetnDensityForWallMethod() const { return nDensityForWallMethod; }
+private:
+    RDouble *moleFractions;
+    RDouble *massFractions;
+    RDouble *speciesViscosity;
+    RDouble *speciesWeight;
+    RDouble *speciesCp;
+    RDouble *speciesCv;
+    RDouble *speciesEnthalpy;
+    RDouble *speciesEnergyTr;
+    RDouble *speciesEnergyVb;
+    RDouble *speciesEnergyEe;
+    RDouble *speciesConductivity;
+    RDouble *workSpecies;
+
+    RDouble *dfsdx;
+    RDouble *dfsdy;
+    RDouble *dfsdz;
+    RDouble *fvis;
+    Thermo_Energy Thermo_Energy_temparay;    //! Energy parameter.
+    
+    RDouble *maximumSpecies;    //! The maximum of each Specie.
+    RDouble **polynomialCoefT2; //! The interpolation coefficients for the polynomial in the two-temperature model.
+private:
+    RDouble GetTemperatureMin();
+    RDouble GetTemperatureMax();
+    Thermo_Energy *GetThermo_Energy_temparay() { return &Thermo_Energy_temparay; }
+private:
+    void AllocateWorkingSpace();
+    void DeAllocateWorkingSpace();
+    void InitCommonParameter();
+    void InitOtherParameter();
+    void ComputeReferenceParameter();
+    void ComputeReferenceTsuth();
+
+    void ComputeReferenceViscosityDimensionalChemical();
+    void ComputeReferenceSpecificHeatRatio();
+    void ComputeReferenceGeneralGasConstant();
+
+    void ComputeReferenceSpecificHeatRatioWithChemical();
+    void ComputeReferenceViscosityDimensionalNoChemical();
+    void ComputeReferenceViscosityDimensional();
+    void ComputeReferenceGasInformation();
+    void ComputeReferenceSoundVelocity();
+    void ComputeReferenceInitMassFractionInformation();
+    void ComputeReferenceMolecularInformation();
+    void ComputeReferenceMolecularInformationWithChemical();
+    void ComputeReferenceMolecularInformationWithoutChemical();
+    void ComputeReferenceVelocity();
+    void ComputeReferenceReynoldsNumber();
+    void ComputeProperReynoldsNumberForGrid();
+    void ComputeOtherProperParameterForGrid();
+    RDouble ComputeReferenceReynoldsNumberFromTotalPT(void);
+    void ComputeDensityWithReynoldsNumber();
+    void ComputePressureInGasStateEquation();
+    void InitReferenceParameter();
+    void InitNumberOfSpecies();
+    void ComputeCoefficientOfStateEquation();
+    void Print();
+
+    //! Obtain the T, p, rho and c by the height (Rg=287.053, gamma=1.4 are used). However, only the T and p is useful. 
+    //! The other two variables will be recomputed to be compatible with the condition of chemical reactions existing.
+    void SetAirInformationByDataBase();
+
+    //! Obtain the T, p, rho and c by the T0, P0, Ma (Rg=287.053, gamma=1.4 are used). However, only the T and p is useful. 
+    //!The other two variables will be recomputed to be compatible with the condition of chemical reactions existing.
+    void SetAirInformationByExpData();
+
+    //! This function is mainly for the average density of the mixture in chemical reactions, 
+    //! The value of mixture density has little difference with that of no chemical reaction, which can be ignored.
+    void NormalizeAirInformation();
+
+    void ComputeReferencePrimitive();
+
+    void CreateAllDataClass(int numberOfSpecies, int numberOfReaction);
+    void Read(fstream &file);
+    void Read(DataContainer *cdata);
+    void Write(DataContainer *cdata);
+
+    void SetMaximumSpecies(RDouble *mass_fraction_ref);
+public:
+    void CompressData(DataContainer *&cdata);
+    void DecompressData(DataContainer *cdata);
+private:
+    RDouble * GetLaminarSchmidtNumberReciprocal() const;
+    RDouble * GetTurbulentSchmidtNumberReciprocal() const;
+public:
+    //! To obtain the laminar Schmidt number of each component.
+    void GetLaminarSchmidtNumber(RDouble *Scl) const;
+    //! To obtain the turbulent Schmidt number of each component.
+    void GetTurbulentSchmidtNumber(RDouble *Sct) const;
+    //! To obtain the molecular weight of each component.
+    RDouble * GetMolecularWeight() const { return molecularProperty->GetMolecularWeight(); }
+
+    int  GetNumberOfSpecies() const { return numberOfSpecies; }
+    void SetNumberOfSpecies(int numberOfSpecies) { this->numberOfSpecies = numberOfSpecies; }
+    void InitGlobalParameterOfNSEquation();
+    void ReadGasModel(fstream &file);
+    //! To Generate the gas model.
+    void GenerateGasModel(string chemicalModel);
+    void GetNameList(vector<string> &namelist, vector<RDouble> &initMassFraction);
+
+    void InitGasModel();
+    //! To import the data of gas model from file.
+    void ReadGasModel();
+
+    void GetTemperatureRangeIndex(const RDouble &temperature_dimensional, int &indexOfTemperatureRange);
+    RDouble GetCoefficientOfStateEquation() { return coefficientOfStateEquation; }
+    string * GetNameOfSpecies() const;
+
+    void GetElectronMolecularWeightAndMassFraction(RDouble *massFraction, RDouble &ce, RDouble &Me);
+
+    //! Compute pressure when the total interal energy e is known.
+    //! @param[in ]: primitiveVars is the array that stores the primitive variables.
+    //! @param[in ]: gama is the specific heat ratio.
+    //! @param[in ]: internalEnergy denotes the total internal energy that equals to the density multiplies the specific internal energy.
+    //! @param[in ]: temperature denotes the translation-rotation temperature in the one-temperature model.
+    //! @param[out]: pressure is the returned value that denotes the pressure of the mixed gas.
+    void GetPressure(RDouble *primitiveVars, RDouble gama, RDouble internalEnergy, RDouble temperature, RDouble &pressure);
+
+    //! Compute temperatures and pressure in the next time-advancing step.
+    //! @param[in ]: primitiveVars denotes the array that stores the primitive variables.
+    //! @param[in ]: internalEnergy denotes the total internal energy that equals to the density multiplies the specific internal energy.
+    //! @param[in/out]: temperature denotes the array of temperatures in the current time-advancing step and next time-advancing step.
+    //! As input parameter, temperature indicates the temperature of the current time-advancing step. Meanwhile,
+    //! it denotes the temperature of the next time-advancing step as output parameter.
+    //! @param[out]: pressure denotes the pressure of the mixed gas.
+    void GetTemperatureAndPressure(RDouble *primitiveVars, RDouble internalEnergy, RDouble *temperature, RDouble &pressure);
+
+    //! To obtain the non-dimensional enthalpy of each species in accordance with the temperature of mixture gas.
+    //! @param[in ]: temperature denotes the non-dimensional temperature of the mixture gas.
+    //! @param[out]: speciesEnthaly saves the non-dimensional static enthalpy of each species.
+    void ComputeSpeciesEnthalpy(RDouble temperature, RDouble *speciesEnthaly);
+
+    //! To obtain the dimensional total enthalpy of each species in accordance with the temperature of mixture gas.
+    //! @param[in ]: temperature denotes the dimensional temperature of the mixture gas.
+    //! @param[out]: speciesEnthaly saves the dimensional total enthalpy of each species.
+    void ComputeSpeciesEnthalpyDimensional(RDouble temperature, RDouble *speciesEnthaly);
+
+    void ComputeSpeciesEnergy(RDouble temperature, RDouble *speciesEnergy);
+    void ComputeSpeciesEnergyDimensional(RDouble temperature, RDouble *speciesEnergy);
+
+    //! To obtain the non-dimensional molecular weight of the mixture gas in accordace with the mass fraction of each species.
+    //! @param[in ]: massFraction is an array saving the mass fraction of each species.
+    RDouble GetMixedGasMolecularWeight(RDouble *massFraction);
+
+    // !To obtain the non-dimensional molecular weight of the mixture gas eliminating electron.
+    // !@param[in ]: massFraction is an array saving the mass fraction of each species.
+    // !@param[out]: ceDivideMe is the value of the electron mass fraction dividing the electron molecular weight.
+    RDouble GetMixedGasMolecularWeightReciprocalWithoutElectron(RDouble *massFraction, RDouble &ceDivideMe);
+
+    //! To obtain the non-dimensional universal gas constant called R = 8.314J/(mol*K).
+    RDouble GetUniversalGasConstant();
+
+    //! To obtain the static enthalpy of the mixed gas.
+    //! @param[in ]: massFraction is an array saving the mass fraction of each species.
+    //! @param[in ]: temperature denotes the non-dimensional temperature of the mixture gas.
+    //! @param[out]: return the non-dimensional value of static enthalpy of mixed gas.
+    RDouble GetMixtureGasEnthalpy(RDouble *massFraction, RDouble temperature);
+
+    //! To obtain the non-dimensional constant pressure specific heat called cp according to the mass fraction of each species.
+    //! @param[in ]: massFraction is an array saving the mass fraction of each species.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! @param[out]: mixedcp denotes the non-dimensional constant pressure specific heat of the mixture gas.
+    void ComputeConstantPressureSpecificHeatByMassFraction(RDouble *massFraction, RDouble temperature, RDouble &mixedcp);
+
+    //! To obtain the non-dimensional constant pressure specific heat called cp of each species by fitting formula.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! @param[out]: cpSpecies is an array saving the non-dimensional constant pressure specific heat of each species.
+    void ComputeSpeciesConstantPressureSpecificHeat(RDouble temperature, RDouble *cpSpecies);
+
+    //! To obtain the dimensional constant pressure specific heat called cp[J/(kg*K)] of each species by fitting formula.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! @param[out]: cpSpeciesDimensional is an array saving the dimensional constant pressure specific heat of each species.
+    void ComputeSpeciesConstantPressureSpecificHeatDimensional(RDouble temperature, RDouble *cpSpeciesDimensional);
+
+    //! To obtain the non-dimensional constant volume specific heat called cv according to the mass fraction of each species.
+    //! @param[in ]: massFraction is an array saving the mass fraction of each species.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! @param[out]: mixedGasCv denotes the non-dimensional constant volume specific heat of the mixture gas.
+    void ComputeConstantVolumeSpecificHeatByMassFraction(RDouble *massFraction, RDouble temperature, RDouble &mixedGasCv);
+
+    //! To obtain the dimensional constant volume specific heat called cv[J/(kg*K)] of each species by fitting formula.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! @param[out]: cvSpeciesDimensional is an array saving the dimensional constant volume specific heat of each species.
+    void ComputeSpeciesConstantVolumeSpecificHeatDimensional(RDouble temperature, RDouble *cvSpeciesDimensional);
+
+    //! To obtain the non-dimensional constant volume specific heat called cv of each species by fitting formula.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! @param[out]: cvSpecies is an array saving the non-dimensional constant volume specific heat of each species.
+    void ComputeSpeciesConstantVolumeSpecificHeat(RDouble temperature, RDouble *cvSpecies);
+
+    //! To obtain the non-dimensional viscosity of each species according to the Blotter fitting formula.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! @param[out]: viscosityOfSpecies is an array saving the non-dimensional viscosity of each species.
+    void ComputeOneTemperatureModelSpeciesViscosity(RDouble temperature, RDouble *viscosityOfSpecies);
+
+    //! To obtain the dimensional viscosity of each species according to the Blotter fitting formula.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! @param[out]: viscosityOfSpeciesDimensional is an array saving the dimensional viscosity of each species [N*s/m2]
+    void ComputeOneTemperatureModelSpeciesViscosityDimensional(RDouble temperature, RDouble *viscosityOfSpeciesDimensional);
+
+    void ComputeSpeciesEnthalpy(RDouble temperature, RDouble *speciesCv, RDouble *speciesE, RDouble *speciesH);
+
+    void ComputeMixtureByMassFraction(RDouble *massFraction, RDouble *mixtureOfSpecies, RDouble &mixture);
+    void ComputeMixtureByPrimitive(RDouble *prim, RDouble *mixtureOfSpecies, RDouble &mixture);
+    void ComputeMixtureCoefficientByWilkeFormula(RDouble *moleFractionOfSpecies, RDouble *chem_var, RDouble *chem_phi);
+
+    void ComputeMixtureByWilkeFormula(RDouble *moleFractionOfSpecies, RDouble *mixtureOfSpecies, RDouble *phiOfSpecies, RDouble &mixture);
+
+    //! To obtain the mass fraction of each species according to other fraction of each species.
+    //! @param[in ]: fractionOfSpecies is an array of saving the fraction of each specie,such as mole fraction,volume fraction.
+    void MassFractionConversion(RDouble *fractionOfSpecies);
+    //! To obtain the mole fraction of each species according to the mass fraction of each species.
+    //! @param[in ]: massFractionOfSpecies is an array of saving the mass fraction of each species.
+    //! @param[out]: moleFractionOfSpecies is an array of saving the mole fraction of each species.
+    void ComputeMoleFractionByMassFraction(RDouble *massFractionOfSpecies, RDouble *moleFractionOfSpecies);
+
+    //! To compute the non-dimensional temperature of the mixture gas in accordance with primary variables saving in the array of prim.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[out]: temperature is the non-dimensional value of temperature.
+    void ComputeTemperature(RDouble *primitiveVariables, RDouble &temperature);
+
+    //! To compute the non-dimensional temperature of the mixture gas in accordance with primary variables saving in the array of prim.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[out]: transRotationTemperature is the non-dimensional value of translation-rotation temperature.
+    //! @param[out]: vibrationTemperature is the non-dimensional value of vibration temperature.
+    //! @param[out]: electronTemperature is the non-dimensional value of electron temperature.
+    void GetTemperature(RDouble *primitiveVariables, RDouble &transRotationTemperature, RDouble &vibrationTemperature, RDouble &electronTemperature);
+    void GetTemperatureR(RDouble *primitiveVariables, RDouble &transRotationTemperature, RDouble &vibrationTemperature, RDouble &electronTemperature);
+
+    //! To obtain the mass fraction of the last species with the label ns-1.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    void NormalizePrimitive(RDouble *primitiveVariables);
+
+    //! Compute the molecular weight reciprocal of the mixed gas.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[out]: massReciprocal denotes the reciprocal of the molecular weight.
+    void ComputeMolecularWeightReciprocal(RDouble *primitiveVariables, RDouble &massReciprocal);
+
+    void ComputeMolecularWeightReciprocalDimensional(RDouble *prim, RDouble &omavDimensional);
+
+    //! Compute the specific heat at constant pressure using the Eucken method.
+    //! @param[out]: cpSpecies is an array to saving the specific heat at constant pressure of each species.
+    void ComputeSpeciesConstantPressureSpecificHeatByEuckenFormula(RDouble *cpSpecies);
+
+    //! Compute the static enthalpy with the primitive variables.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: gama is the specific heat ratio.
+    //! @param[out]: enthalpy denotes the static enthalpy.
+    //! @param[in ]: temperatures stores the translation-rotation temperature, vibration temperature and the electron temperature.
+    void ComputeEnthalpyByPrimitive(RDouble *primitiveVariables, RDouble gama, RDouble &enthalpy, RDouble *temperatures);
+
+    //! To obtain the total energy E = e + 1/2*V2.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables, gama is the specific heat ratio of the mixture gas.
+    //! @param[in ]: vibrationTemperature is non-dimensional value of vibration temperature.
+    //! @param[in ]: electronTemperature is non-dimensional value of electron  temperature.
+    //! @param[OUT]: totalEnergy denotes the total internal energy of the mixed gas.
+    void ComputeInternalEnergy(RDouble *primitiveVariables, RDouble gama, RDouble vibrationTemperature, RDouble electronTemperature, RDouble &totalEnergy);
+
+    //! To compute the total enthalpy and the difference of the static enthalpy.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: gama is the specific heat ratio.
+    //! @param[in ]: deltaQ is an array to saving the differences of the primitive variables.
+    //! @param[out]: deltaEnthalpy denotes the difference of static enthalpy.
+    //! @param[out]: totalEnthalpy denotes the total enthalpy.
+    void ComputeDHAndTotalEnthalpy(RDouble *primitiveVariables, RDouble &gama, RDouble *deltaQ, RDouble &deltaEnthalpy, RDouble &totalEnthalpy);
+
+    //! This function is used for perfect gas and single temperature model.
+    //! To compute the total enthalpy and the variable dh in the function MXDQ_STD(). dh=b2, b2 denotes the coefficient \n
+    //! of the vector M*dQ which can be referred to the forumla (A.7) and (A.8) in the appendix A of the PHengLEI Theory manual.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: gama is the specific heat ratio.
+    //! @param[in ]: deltaQ is an array to saving the differences of the primitive variables.
+    //! @param[out]: totalEnthalpy denotes the total enthalpy.
+    //! @param[out]: deltaEnthalpy denotes the difference of static enthalpy.
+    void ComputeTotalEnthalpyAndDH(RDouble *primitiveVariables, RDouble &gama, RDouble *deltaQ, RDouble &totalEnthalpy, RDouble &deltaEnthalpy);
+
+    //! To obtain the non-dimensional viscosity of the mixture gas according to the primary variables.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: transRotationTemperature is the non-dimensional translation-rotation temperature of the mixture gas.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[in ]: suthTemperature denotes the temperature value in the Sutherland fomula.
+    //! @param[out]: viscosity is the non-dimensional viscosity of the mixture gas [N*s/m2].
+    void ComputeViscosityByPrimitive(RDouble *primitiveVariables, RDouble &transRotationTemperature, RDouble &electronTemperature, RDouble &suthTemperature, RDouble &viscosity);
+
+    //! To Compute the viscosity, heat conductivity and mass diffusion coefficient.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: temperature is the array of temperature for each temperature model.
+    //! @param[out]: viscosity is the non-dimensional viscosity of the mixture gas.
+    //! @param[out]: heatConductivity denotes the array of heat conductivity for each mode.
+    //! @param[out]: rhoDs denotes the array of mass diffusion coefficients for each species.
+    void ComputeTransportCoefficients(RDouble *primitiveVariables, RDouble *temperature, RDouble visTurbulence, RDouble &viscosity, RDouble *heatConductivity, RDouble *rhoDs);
+    void ComputeTransportCoefficientsR(RDouble *primitiveVariables, RDouble *temperature, RDouble *speciesCps, RDouble *speciesCvvs, RDouble *speciesCves, RDouble visTurbulence, RDouble &viscosity, RDouble *heatConductivity, RDouble *rhoDs);
+
+    //! To obtain the non-dimensional viscosity of the mixture gas according to the mass fraction of each species.
+    //! @param[in ]: density denotes the non-dimensional value of density of the mixed gas.
+    //! @param[in ]: massFractionOfSpecies is an array of saving the mass fraction of each species.
+    //! @param[in ]: transRotationTemperature is the non-dimensional translation-rotation temperature of the mixture gas.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[in ]: suthTemperature denotes the temperature value in the Sutherland fomula.
+    //! @param[out]: viscosity is the non-dimensional viscosity of the mixture gas [N*s/m2].  
+    void ComputeViscosity(RDouble density, RDouble *massFractionOfSpecies, RDouble &transRotationTemperature, RDouble &electronTemperature, RDouble &suthTemperature, RDouble &viscosity);
+
+    //! To compute the heat conductivity of each species using the Eucken formula.
+    //! @param[in ]: viscosity is array of saving the species viscosity.
+    //! @param[in ]: cps is the array of saving the species values of specific heat at constant pressure.
+    //! @param[out]: conductivity is an array of saving the heat conductivity of each species.
+    void ComputeSpeciesHeatConductivityByEuckenFormula(RDouble *viscosity, RDouble *cps, RDouble *conductivity);
+
+    //! To compute heat conductivity of mixture gas using Eucken formula and Wassilewa relation.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! The function returns the heat conductivity of mixture gas.
+    RDouble ComputeMixtureGasHeatConductivityByWassilewaFormula(RDouble *primitiveVariables, RDouble temperature);
+
+    //! To obtain the partition function values based on the targets, e.g conductivity or viscosity.
+    //! @param[in ]: target is array of viscosity or heat conductivity of each species.
+    //! @param[in ]: speciesMass is array of molecular weight.
+    //! @param[in ]: moleFraction is array of mole fraction.
+    //! @param[out]: phi is an array of saving the partition function value of each species.
+    void GetPartitionFunctionValues(RDouble *target, RDouble *speciesMass, RDouble *moleFraction, RDouble *phi);
+
+    //! Compute the source terms of chemical reaction equations.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[out]: chemicalSourceTerms returns the source terms of chemical reaction equations in the specified control cells.
+    //! @param[in ]: iCell denotes the number of the specified control cell.
+    void ChemicalSource(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, int iCell);
+    //! Compute the source terms of vibration-electron energy equations.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[in ]: chemicalSourceTerms stores the source terms of chemical reaction equations in the specified control cells.
+    //! @param[out]: energySourceTerms returns the source terms of vibration-electron energy equations in the specified control cells.
+    //! @param[in ]: nCellNumber denotes the number of the specified control cells.
+    void EnergySource(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble **energySourceTerms, int nCellNumber);
+
+    //! Compute the source term of vibration and electron energy equation.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: omega is the source term of chemical reaction equation.
+    //! @param[in ]: temperature is non-dimensional value of temperatures.
+    //! @param[out]: return the dimensional value of source term of vibration and electron energy equation.
+    RDouble ComputeVibrationAndElectronEnergySourceTerm(RDouble *primitiveVariables, RDouble *omega, RDouble *temperature);
+
+    //! Compute the source term of vibration energy equation.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: omega is the source term of chemical reaction equation.
+    //! @param[in ]: temperature is non-dimensional value of temperatures.
+    //! @param[out]: return the dimensional value of source term of vibration energy equation.
+    RDouble ComputeVibrationEnergySourceTerm(RDouble *primitiveVariables, RDouble *omega, RDouble *temperature);
+
+    //! Compute relaxation time of translation and vibration.The parameters are dimensional values.
+    //! @param[in ]: thermodynamicProperties saves the thermodynamic properties of species.
+    //! @param[in ]: massFraction saves the mass fractions of species.
+    //! @param[in ]: speciesMass saves the molecular weight of species.
+    //! @param[in ]: temperature, pressure, and density denote the temperature of translation and rotation, pressure and density, respectively.
+    //! @param[out]: tvs saves the relaxation time of translation and vibration of species.
+    void GetTranslationAndVibrationRelaxationTime(Thermo_Param *thermodynamicProperties, RDouble *massFraction, RDouble *speciesMass, 
+                                                  RDouble temperature, RDouble pressure, RDouble density, RDouble *tvs);
+    void GetTranslationAndVibrationRelaxationTimeR(Thermo_Param *thermodynamicProperties, RDouble *massFraction, RDouble *speciesMass, 
+                                                  RDouble temperature, RDouble pressure, RDouble density, RDouble *tvs);
+
+    //! Compute relaxation time of electron and vibration.The parameters are dimensional values.
+    //! @param[in ]: thermodynamicProperties saves the thermodynamic properties of species.
+    //! @param[in ]: electronPressure is the pressure of electron.
+    //! @param[in ]: electronTemperature is the temperature of electron.
+    //! @param[out]: tes saves the relaxation time of electron and vibration of species.
+    void GetElectronAndVibrationRelaxationTime(Thermo_Param *thermodynamicProperties, RDouble electronPressure, RDouble electronTemperature, RDouble *tes);
+
+    //! Compute the source term of electron energy equation.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: omega is the source term of chemical reaction equation.
+    //! @param[in ]: temperature is non-dimensional value of temperatures.
+    //! @param[out]: return the dimensional value of source term of vibration energy equation.
+    RDouble ComputeElectronEnergySourceTerm(RDouble *primitiveVariables, RDouble *omega, RDouble *temperature);
+
+    //! Compute the effective collision cross-sectional area of the electron and the s-th heavy species(the element except for electron).
+    //! @param[in ]: thermodynamicProperties saves the thermodynamic properties of species.
+    //! @param[in ]: electronTemperature is the dimensional value of temperature of electron.
+    //! @param[in ]: electronNumberDensity denotes the number density of electron.
+    //! @param[out]: sigma saves the effective collision cross-sectional areas of each heavy species.
+    void GetEffectiveCollisionCrossSectionalArea(Thermo_Param *thermodynamicProperties, RDouble electronTemperature, RDouble electronNumberDensity, RDouble *sigma);
+
+    void ChemicalSpectrumRadius(RDouble **q, RDouble **t, RDouble *vol, RDouble **src, int iCell);
+    //! To obtain the approximating polynomial coefficients from the polynomial curve fits in five temperature ranges. \n
+    //! The approximating polynomial is input for evaluating the species specific heats and enthalpies, and the temperature\n
+    //! boundary is smoothed by linearly averaging the polynomial cofficients.
+    //! @param[in ]: nSpecies denotes the species index in the collection.
+    //! @param[in ]: temperature is the dimensional temperature value.
+    //! @param[out]: polynomialCoef is an array of saving the polynomial coefficients.
+    void GetLinearlyAveragedPolynomialCoefficients(int nSpecies, RDouble temperature, RDouble *polynomialCoef);
+    void GetLinearlyAveragedPolynomialCoefficientsT2(RDouble temperature, RDouble **polynomialCoef);
+    void GetLinearlyAveragedPolynomialCoefficientsIndex(RDouble temperature, RDouble &coef, int &nIndex1, int &nIndex2);
+    void GetLinearlyAveragedPolynomialCoefficientsByIndex(int nSpecies, RDouble *polynomialCoef, RDouble coef, int nIndex1, int nIndex2);
+
+    //! Compute chemical source term and its Jacobian matrix. The first function is batch processing of data, the second is single processing of data.
+    void ComputeChemicalSourceDerivatives(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber);
+    void ComputeChemicalSourceJacobian(RDouble *primitiveVariables, RDouble *temperatures, RDouble cellVolume, RDouble *chemicalSourceTerms, RDouble **sourceDerivatives);
+    void ComputeChemicalSourceAndJacobian(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber);
+    void ComputeChemicalSourceAndJacobianD3(int *Inzone, RDouble4D &primitiveVariables, RDouble4D &temperatures, RDouble4D &speciesEs, RDouble4D &speciesCvs, RDouble3D &totalCv, RDouble3D &cellVolume, RDouble4D &chemicalSourceTerms, RDouble5D &sourceDerivatives);
+
+    //! Compute the partial derivatives of source terms of chemical reaction equations without electron.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[out]: chemicalSourceTerms returns the source terms of chemical reaction equations in the specified control cells.
+    //! @param[out]: sourceDerivatives returns the elements of the Jacobian matrix in the source terms of chemical reaction equations in the specified control cells.
+    //! @param[in ]: nCellNumber denotes the number of the specified control cells.
+    void ComputeChemicalSourceDerivatives1(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber);
+
+    //! Compute the partial derivatives of source terms of chemical reaction equations, it is used for the reactions including electron.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[out]: chemicalSourceTerms returns the source terms of chemical reaction equations in the specified control cells.
+    //! @param[out]: sourceDerivatives returns the elements of the Jacobian matrix in the source terms of chemical reaction equations in the specified control cells.
+    //! @param[in ]: nCellNumber denotes the number of the specified control cells.
+    void ComputeChemicalSourceDerivatives2(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber);
+
+    //! Compute the partial derivatives of source terms of chemical reaction equations. The function is used for two-temperature model.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[in ]: chemicalSourceTerms stores the source terms of chemical reaction equations in the specified control cells.
+    //! @param[in ]: chemicalSourceDerivatives stores the partial derivatives of the source terms of chemical reaction equations in the specified control cells.
+    //! @param[out]: energySourceDerivatives returns the partial derivatives of the source terms of energy equations in the specified control cells.
+    //! @param[in ]: nCellNumber denotes the number of the specified control cells.
+    void ComputeEnergySourceDerivatives1(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms,
+                                        RDouble ***chemicalSourceDerivatives, RDouble ***energySourceDerivatives, int nCellNumber);
+
+    //! Compute the partial derivatives of source terms of vibration-electron energy equations. The function is used for two-temperature model.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[in ]: chemicalSourceTerms stores the source terms of chemical reaction equations in the specified control cells.
+    //! @param[in ]: chemicalSourceDerivatives stores the partial derivatives of the source terms of chemical reaction equations in the specified control cells.
+    //! @param[out]: energySourceDerivatives returns the diagonal element of partial derivatives to the source terms of energy equations in the specified control cells.
+    //! @param[in ]: nCellNumber denotes the number of the specified control cells.
+    void ComputeEnergySourceDiagonalDerivatives1(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms,
+                                                 RDouble ***chemicalSourceDerivatives, RDouble **energySourceDerivatives, int nCellNumber);
+
+    //! Compute the partial derivatives of source terms of vibration-electron energy equations. The function is used for three-temperature model.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[in ]: chemicalSourceTerms stores the source terms of chemical reaction equations in the specified control cells.
+    //! @param[in ]: chemicalSourceDerivatives stores the partial derivatives of the source terms of chemical reaction equations in the specified control cells.
+    //! @param[out]: energySourceDerivatives returns the diagonal element of partial derivatives to the source terms of energy equations in the specified control cells.
+    //! @param[in ]: nCellNumber denotes the number of the specified control cells.
+    void ComputeEnergySourceDiagonalDerivatives2(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms,
+                                                 RDouble ***chemicalSourceDerivatives, RDouble **energySourceDerivatives, int nCellNumber);
+
+    //! Compute energy source term and its Jacobian. The function is for two-temperature model, it is equal to ComputeEnergySourceDiagonalDerivatives1() which is the batch processing.
+    void ComputeEnergySourceJacobianT2(RDouble *primitiveVariables, RDouble *temperatures, RDouble cellVolume, RDouble *chemicalSourceTerms, RDouble **sourceDerivatives);
+
+    //! Compute energy source term and its Jacobian. The function is for three-temperature model, it is equal to ComputeEnergySourceDiagonalDerivatives2() which is the batch processing.
+    void ComputeEnergySourceJacobianT3(RDouble *primitiveVariables, RDouble *temperatures, RDouble cellVolume, RDouble *chemicalSourceTerms, RDouble **sourceDerivatives);
+
+    void ComputeEnergySourceAndJacobianT2(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber);
+
+    void ComputeEnergySourceAndJacobianT3(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber);
+
+    void ComputeEnergySourceAndJacobianT2D3(int *nCell, RDouble4D &primitiveVariables, RDouble4D &temperatures, RDouble4D &speciesCvvs, RDouble4D &speciesCves, RDouble4D &speciesEvs, RDouble4D &speciesEes, RDouble3D &totalCvtr, RDouble3D &totalCvv, RDouble3D &totalCve, RDouble3D &cellVolume, RDouble4D &chemicalSourceTerms, RDouble5D &sourceDerivatives);
+
+    void ComputeEnergySourceAndJacobianT3D3(int *nCell, RDouble4D &primitiveVariables, RDouble4D &temperatures, RDouble4D &speciesCvvs, RDouble4D &speciesCves, RDouble4D &speciesEvs, RDouble4D &speciesEes, RDouble3D &totalCvtr, RDouble3D &totalCvv, RDouble3D &totalCve, RDouble3D &cellVolume, RDouble4D &chemicalSourceTerms, RDouble5D &sourceDerivatives);
+
+public:
+
+    //! The primitive variables are transfered to the conservative variables.
+    //! @param[in ]: q prim indicates the primitive variables.
+    //! @param[in ]: gama denotes the specific heat ratio, which is valid in the perfect gas.
+    //! @param[in ]: Tv denotes the vibrational temperature(The non-dimensional value).
+    //! @param[in ]: Te denotes the electron temperature(The non-dimensional value).
+    //! @param[out]: indicates the conservative variables.
+    void Primitive2Conservative(RDouble *prim, RDouble gama, RDouble Tv, RDouble Te, RDouble *q);
+    void Primitive2ConservativeR(RDouble *prim, RDouble gama, RDouble Tv, RDouble Te, RDouble staticE, RDouble *q);
+
+    //! The conservative variables are transfered to the primitive variables.
+    //! @param[in ]: q indicates the conservative variables.
+    //! @param[in ]: gama denotes the specific heat ratio, which is valid in the perfect gas.
+    //! @param[out]: prim indicates the primitive variables.
+    //! @param[in/out]: temperature denotes the array of temperatures in the current time-advancing step and next time-advancing step.
+    //! As input parameter, temperature indicates the temperature of the current time-advancing step. Meanwhile,
+    //! It denotes the temperature of the next time-advancing step as output parameter.
+    void Conservative2Primitive(RDouble *q, RDouble gama, RDouble *prim, RDouble *temperature);
+    void Conservative2PrimitiveR(RDouble *q, RDouble gama, RDouble *prim, RDouble *temperature);
+
+    void GetSpecificHeatRatio(RDouble *prim, RDouble &gama);
+
+    //! Compute the specific heat ratio and the temperatures.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[out]: gama denotes the specific heat ratio of the mixed gas.
+    //! @param[out]: transRotationTemperature denotes the translation-rotation temperature of the mixed gas.
+    //! @param[out]: vibrationTemperature denotes the vibration temperature of the mixed gas.
+    //! @param[out]: electronTemperature denotes the electron temperature of the mixed gas.
+    void GetSpecificHeatRatioAndTemperatute(RDouble *primitiveVariables, RDouble &gama, RDouble &transRotationTemperature, RDouble &vibrationTemperature, RDouble &electronTemperature);
+
+    void ComputeDensityDiffusionAndKCP(RDouble temperature, RDouble *primface, RDouble mul, RDouble mut, RDouble *rho_ds_face, RDouble *hintSpeciesOfFace, RDouble &kcp);
+    void GetAirInfo(const RDouble &height, RDouble &temperature, RDouble &pressure, RDouble &density, RDouble &soundspeed);
+
+    //! To obtain the coefficients of computing the M*dQ in the function MXDQ_STD_LP(), added by LiPeng on Jan. 10, 2019.
+    //! @param[in ]: primitiveVars is the array that stores the primitive variables of the current cell.
+    //! @param[out]: alpha, beta and speciesBeta are referred to the fomular (A.5) in the appendix A of the PHengLEI Theory manual.
+    void ComputeCoefficientInMXDQ(RDouble *primitiveVars, RDouble &alpha, RDouble &beta, RDouble *speciesBeta);
+    void ComputeCoefficientInMXDQR(RDouble *primitiveVars, RDouble trTemperature, RDouble squareVelocity, RDouble *speciesCvs, RDouble totalCv, RDouble &alpha, RDouble &beta, RDouble *speciesBeta);
+
+    //!To obtain the coefficients of computing the M*dQ in the function MVXDQ_STD_LP(), added by LiPeng on Jan. 21, 2019.
+    //!K=visl/Prl + vist/Prt denotes the thermal conductivity coefficient, rD=visl/Scl + vist/Sct is the species diffusion coefficient,\n
+    //!Ds is an array of saving the diffusion coefficient of each species.
+    void ComputeCoefficientInMVXDQ(RDouble *prim, RDouble K, RDouble rD, RDouble *theta_s, RDouble *phi_s, RDouble *Ds);
+
+public:
+
+    //! Compute the mass fractions of Earth mixture for fully catalytic wall condition.
+    //! @param[in ]: fs is array of mass fractions of the components in the multi-species.
+    //! @param[out]: fcw is array of mass fractions under fully catalytic condition.
+    void GetEarthFullyCatalyticMassFraction(RDouble *fs, RDouble *fcw);
+
+    //! Compute the mass fractions of Mars mixture for fully catalytic wall condition.
+    //! @param[in ]: fs is array of mass fractions of the components in the multi-species.
+    //! @param[out]: fcw is array of mass fractions under fully catalytic condition.
+    void GetMarsFullyCatalyticMassFraction(RDouble *fs, RDouble *fcw);
+
+    //! To find the chemical element in the species, if found, return the coefficient of the element.
+    //! @param[in ]: species_name denotes the name of the species.
+    //! @param[out]: element_name denotes the name of the specified element.
+    //! @param[out]: coef is the stoichiometric coefficient of the element.
+    bool FindChemicalElement(string species_name, char element_name, int &coef);
+
+    //! To obtain the index of the specified species in the sequence in accordance with its name.
+    //! @param[in ]: species_name denotes the name of the species.
+    //! @param[out]: the function returns the index of the species if found, otherwise, returns value of -1.
+    int GetSpeciesIndex(string species_name);
+
+public:
+
+    //! To compute the translation and rotation specific heat at constant volume.
+    //! @param[out]: speciesTransRotationCv is an array saving the translation and rotation specific heat at constant volume of each species.
+    void ComputeTranslationAndRotationSpecificHeatAtConstantVolume(RDouble *speciesTransRotationCv);
+
+    //! To compute the translation and rotation specific heat at constant volume.
+    //! @param[out]: speciesTransRotationCv is an array saving the dimensional value of translation and rotation specific heat at constant volume of each species.
+    void ComputeDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(RDouble *speciesTransRotationCv);
+
+    //! To compute the the translation and rotation energy.
+    //! @param[in ]: transRotationTemperature is the non-dimensional translation-rotation temperature of the mixture gas.
+    //! @param[out]: speciesTransRotationEnergy is an array saving the translation and rotation energy of each species.
+    void ComputeTranslationAndRotationEnergy(RDouble transRotationTemperature, RDouble *speciesTransRotationEnergy);
+
+    //! To compute the vibration specific heat at constant volume.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[out]: speciesVibrationCv is an array saving the vibration specific heat at constant volume of each species.
+    void ComputeVibrationSpecificHeatAtConstantVolume(RDouble vibrationTemperature, RDouble *speciesVibrationCv);
+
+    //! To compute the vibration specific heat at constant volume.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[out]: speciesVibrationCv is an array saving the dimensional value of vibration specific heat at constant volume of each species.
+    void ComputeDimensionalVibrationSpecificHeatAtConstantVolume(RDouble vibrationTemperature, RDouble *speciesVibrationCv);
+
+    //! To compute the dimensional value of the vibration energy (J/kg).
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[out]: speciesVibrationEnergy is an array saving the vibration energy of each species.
+    void ComputeDimensionalVibrationEnergy(RDouble vibrationTemperature, RDouble *speciesVibrationEnergy);
+
+    //! To compute the vibration energy.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[out]: speciesVibrationEnergy is an array saving the vibration energy of each species.
+    void ComputeVibrationEnergy(RDouble vibrationTemperature, RDouble *speciesVibrationEnergy);
+
+    //! To compute the electron specific heat at constant volume.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[out]: speciesElectronCv is an array saving the electron specific heat at constant volume of each species.
+    void ComputeElectronSpecificHeatAtConstantVolume(RDouble electronTemperature, RDouble *speciesElectronCv);
+
+    //! To compute the electron specific heat at constant volume.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[out]: speciesElectronCv is an array saving the dimensional value of electron specific heat at constant volume of each species.
+    void ComputeDimensionalElectronSpecificHeatAtConstantVolume(RDouble electronTemperature, RDouble *speciesElectronCv);
+
+    //! To compute the dimensional value of electron energy (J/kg).
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[out]: speciesElectronEnergy is an array saving the electron energy of each species.
+    void ComputeDimensionalElectronEnergy(RDouble electronTemperature, RDouble *speciesElectronEnergy);
+
+    //! To compute the electron energy.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[out]: speciesElectronEnergy is an array saving the electron energy of each species.
+    void ComputeElectronEnergy(RDouble electronTemperature, RDouble *speciesElectronEnergy);
+
+    //! To compute the enthalpies of species.
+    //! @param[in ]: transRotationTemperature is the non-dimensional translation-rotation temperature of the mixture gas.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[out]: speciesEnthalpy is an array saving the enthalpies of each species.
+    void ComputeSpeciesEnthalpy(RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature, RDouble *speciesEnthalpy);
+
+    //! To compute the translation-rotation specific heat at constant volume of the mixed gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the total translation-rotation specific heat at constant volume.
+    RDouble GetMixedGasTranslationAndRotationSpecificHeatAtConstantVolume(RDouble *massFraction);
+
+    //! To compute the translation-rotation specific heat at constant volume of the mixed gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the dimensional value of total translation-rotation specific heat at constant volume.
+    RDouble GetMixedGasDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(RDouble *massFraction);
+
+    //! To compute the vibration specific heat at constant volume of the mixed gas.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the total vibration specific heat at constant volume.
+    RDouble GetMixedGasVibrationSpecificHeatAtConstantVolume(RDouble vibrationTemperature, RDouble *massFraction);
+
+    //! To compute the vibration specific heat at constant volume of the mixed gas.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the dimensional value of total vibration specific heat at constant volume.
+    RDouble GetMixedGasDimensionalVibrationSpecificHeatAtConstantVolume(RDouble vibrationTemperature, RDouble *massFraction);
+
+    //! To compute the electron specific heat at constant volume of the mixed gas.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the total electron specific heat at constant volume.
+    RDouble GetMixedGasElectronSpecificHeatAtConstantVolume(RDouble electronTemperature, RDouble *massFraction);
+
+    //! To compute the electron specific heat at constant volume of the mixed gas.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the dimensional value of total electron specific heat at constant volume.
+    RDouble GetMixedGasDimensionalElectronSpecificHeatAtConstantVolume(RDouble electronTemperature, RDouble *massFraction);
+
+    //! To compute the translation-rotation energy of the mixed gas.
+    //! @param[in ]: transRotationTemperature is the non-dimensional translation-rotation temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the total translation-rotation energy.
+    RDouble GetMixedGasTranslationAndRotationEnergy(RDouble transRotationTemperature, RDouble *massFraction);
+
+    //! To compute the dimensional value of vibration energy of the mixed gas.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the total vibration energy.
+    RDouble GetMixedGasDimensionalVibrationEnergy(RDouble vibrationTemperature, RDouble *massFraction);
+
+    //! To compute the vibration energy of the mixed gas.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the total vibration energy.
+    RDouble GetMixedGasVibrationEnergy(RDouble vibrationTemperature, RDouble *massFraction);
+
+    //! To compute the dimensional value of electron energy of the mixed gas.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the total electron energy.
+    RDouble GetMixedGasDimensionalElectronEnergy(RDouble electronTemperature, RDouble *massFraction);
+
+    //! To compute the electron energy of the mixed gas.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the total electron energy.
+    RDouble GetMixedGasElectronEnergy(RDouble electronTemperature, RDouble *massFraction);
+
+    //! To compute the total enthalpy of the mixed gas.
+    //! @param[in ]: transRotationTemperature is the non-dimensional translation-rotation temperature of the mixture gas.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[out]: return the total enthalpy of the mixed gas.
+    RDouble ComputeMixedGasEnthalpy(RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature, RDouble *massFraction);
+
+    //! To compute the total enthalpy of the mixed gas.
+    //! @param[in ]: primitiveVars indicates the array of primitive variables.
+    //! @param[in ]: temperatures indicates the array of temperatures.
+    RDouble ComputeMixedGasEnthalpy(RDouble *primitiveVars, RDouble *temperatures);
+
+    //! To compute the total enthalpy of formation.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species.
+    //! @param[out]: return the non-dimensional value of the formation enthalpy.
+    RDouble GetTotalFormationEnthalpy(RDouble *massFraction);
+
+    //! To compute translation-rotation temperature where the pressure is known.
+    //! @param[in ]: primitiveVariables is an array of saving the primary variables.
+    //! @param[in ]: electronPressure is the pressure of electron.
+    //! @param[out]: return the non-dimensional value of translation-rotation temperature.
+    RDouble ComputeTranslationAndRotationTemperatureByPrimitiveVariables(RDouble *primitiveVariables, RDouble electronPressure = 0.0);
+
+    //! To compute translation-rotation temperature.
+    //! @param[in ]: transRotationEnergy is the total internal energy of translation and rotation mode.
+    //! @param[in ]: massFraction is an array of saving the mass fractions of species.
+    //! @param[out]: return the non-dimensional value of translation-rotation temperature.
+    RDouble ComputeTranslationAndRotationTemperature(RDouble *massFraction, RDouble transRotationEnergy);
+
+    //! To compute vibration temperature.
+    //! @param[in ]: massFraction is an array of saving the mass fractions of species.
+    //! @param[in ]: vibrationEnergy is the total internal energy of vibration mode.
+    //! @param[in ]: initTemperature is the initial temperature of the newton iteration method.
+    //! @param[out]: return the non-dimensional value of vibration temperature.
+    RDouble ComputeVibrationTemperature(RDouble *massFraction, RDouble vibrationEnergy, RDouble initTemperature);
+
+    //! To compute electron temperature.
+    //! @param[in ]: massFraction is an array of saving the mass fractions of species.
+    //! @param[in ]: electronEnergy is the total internal energy of electron mode.
+    //! @param[in ]: initTemperature is the initial temperature of the newton iteration method.
+    //! @param[out]: return the non-dimensional value of electron temperature.
+    RDouble ComputeElectronTemperature(RDouble *massFraction, RDouble electronEnergy, RDouble initTemperature);
+
+    //! To compute vibration-electron temperature.
+    //! @param[in ]: massFraction is an array of saving the mass fractions of species.
+    //! @param[in ]: vibrationElectronEnergy is the total internal energy of vibration and electron mode.
+    //! @param[in ]: initTemperature is the initial temperature of the newton iteration method.
+    //! @param[out]: return the non-dimensional value of vibration-electron temperature.
+    RDouble ComputeVibrationAndElectronTemperature(RDouble *massFraction, RDouble vibrationElectronEnergy, RDouble initTemperature);
+
+    //! To compute the temperature of one-temperature model.
+    //! @param[in ]: massFraction is an array of mass fractions of species.
+    //! @param[in ]: internalEnergy is total internal energy of the mixed gas.
+    //! @param[out]: return the non-dimensional value of temperature.
+    RDouble ComputeOneTemperatureModelTemperature(RDouble *massFraction, RDouble internalEnergy);
+
+    //! To compute non-equilibrium temperature of chemical reaction flow for one-temperature model using the curve fitting method.
+    //! @param[in ]: massFraction is an array of mass fractions of species.
+    //! @param[in ]: internalEnergy is total internal energy of the mixed gas.
+    //! @param[out]: return the non-dimensional value of temperature.
+    RDouble ComputeNonequilibrumTemperatureViaBisectionMethod(RDouble *massFraction, RDouble internalEnergy);
+
+    //! To compute non-equilibrium temperature of chemical reaction flow for one-temperature model using the newton method.
+    //! @param[in ]: massFraction is an array of mass fractions of species.
+    //! @param[in ]: internalEnergy is total internal energy of the mixed gas.
+    //! @param[in ]: initTemperature is the initial temperature of the newton iteration method.
+    //! @param[out]: return the non-dimensional value of temperature.
+    RDouble ComputeNonequilibrumTemperature(RDouble *massFraction, RDouble internalEnergy, RDouble initTemperature);
+
+    //! To obtain the electron pressure.
+    //! @param[in ]: primitiveVariables is an array of saving the primary variables.
+    //! @param[in ]: electronTemperature is non-dimensional value of electron temperature.
+    //! @param[out]: return the non-dimensional value of electron pressure.
+    RDouble GetElectronPressure(RDouble *primitiveVariables, RDouble electronTemperature);
+
+    //! To compute the heat conductivity of translation and rotation using the Eucken formula.
+    //! @param[in ]: viscosity is array of saving the species viscosity.
+    //! @param[out]: conductivity is an array of saving the translation-rotation heat conductivity of each species.
+    void ComputeSpeciesTranslationAndRotationHeatConductivity(RDouble *viscosity, RDouble *conductivity);
+
+    //! To compute the heat conductivity of vibration using the Eucken formula.
+    //! @param[in ]: viscosity is array of saving the species viscosity.
+    //! @param[in ]: speciesVibrationCv is the array of saving the vibration specific heat at constant pressure.
+    //! @param[out]: conductivity is an array of saving the vibration heat conductivity of each species.
+    void ComputeSpeciesVibrationHeatConductivity(RDouble *viscosity, RDouble *speciesVibrationCv, RDouble *conductivity);
+
+    //! To compute the heat conductivity of electron using the Eucken formula.
+    //! @param[in ]: viscosity is array of saving the species viscosity.
+    //! @param[in ]: speciesElectronCv is the array of saving the electron specific heat at constant pressure.
+    //! @param[out]: conductivity is an array of saving the electron heat conductivity of each species.
+    void ComputeSpeciesElectronHeatConductivity(RDouble *viscosity, RDouble *speciesElectronCv, RDouble *conductivity);
+
+    //! To compute the translation-rotation heat conductivity of the mixed gas using Wilke method.
+    //! @param[in ]: primitiveVariables is an array of saving the primary variables.
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronTemperature denotes the non-dimensional value of electron temperature.
+    //! @param[out]: return the translation-rotation heat conductivity of the mixed gas.
+    RDouble GetMixedGasTranslationAndRotationHeatConductivity(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble electronTemperature);
+
+    //! To compute the vibration heat conductivity of the mixed gas using Wilke method.
+    //! @param[in ]: primitiveVariables is an array of saving the primary variables.
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: vibrationTemperature denotes the non-dimensional value of vibration temperature.
+    //! @param[in ]: electronTemperature denotes the non-dimensional value of electron temperature.
+    //! @param[out]: return the vibration heat conductivity of the mixed gas.
+    RDouble GetMixedGasVibrationHeatConductivity(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature);
+
+    //! To compute the electron heat conductivity of the mixed gas using Wilke method.
+    //! @param[in ]: primitiveVariables is an array of saving the primary variables.
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronTemperature denotes the non-dimensional value of electron temperature.
+    //! @param[out]: return the electron heat conductivity of the mixed gas.
+    RDouble GetMixedGasElectronHeatConductivity(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble electronTemperature);
+
+    void ComputeMixedGasTranslationVibrationElectronHeatConductivity(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature, RDouble &transRotationConductivity, RDouble &vibrationConductivity, RDouble &electronConductivity);
+
+    //! To obtain the heat conductivity of the mixed gas using Wilke method, the value is identified by the type of the heat conductivity.
+    //! @param[in ]: moleFraction is an array of saving the mole fractions of species.
+    //! @param[in ]: conductivity is an array of saving the heat conductivity of species. The heat conductivity could be translation-rotation\n
+    //! heat conductivity, vibration heat conductivity or electron heat conductivity.
+    //! @param[in ]: Phi denotes the array of the partion function.
+    //! @param[out]: return the heat conductivity of the mixed gas.
+    RDouble GetMixedGasHeatConductivityWithWilkeFormula(RDouble *moleFraction, RDouble *conductivity, RDouble *phi);
+
+    //! To compute the non-dimensional values of viscosities of species using Gupta or Blotter method. 
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronTemperature denotes the non-dimensional value of electron temperature.
+    //! @param[out]: speciesViscosity is an array to storing the non-dimensional values of viscosities of species.
+    void ComputeSpeciesViscosityWithCurveFitMethod(RDouble transRotationTemperature, RDouble electronTemperature, RDouble *speciesViscosity);
+
+    //! To compute the dimensional values of viscosities of species using Gupta or Blotter method. 
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronTemperature denotes the non-dimensional value of electron temperature.
+    //! @param[out]: speciesViscosity is an array to storing the dimensional values of viscosities of species(Unit: kg/(m*s)).
+    void ComputeSpeciesDimensionalViscosityWithCurveFitMethod(RDouble transRotationTemperature, RDouble electronTemperature, RDouble *speciesViscosity);
+
+    //! To compute the non-dimensional values of viscosities of species using Lennard-Jones method. 
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronPressure denotes the non-dimensional value of electron pressure.
+    //! @param[out]: speciesViscosity is an array to storing the non-dimensional values of viscosities of species.
+    void ComputeSpeciesViscosityWithLennardJonesMethod(RDouble transRotationTemperature, RDouble electronPressure, RDouble *speciesViscosity);
+
+    //! To compute the dimensional values of viscosities of species using using Lennard-Jones method. 
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronPressure denotes the non-dimensional value of electron pressure.
+    //! @param[out]: speciesViscosity is an array to storing the dimensional values of viscosities of species(Unit: kg/(m*s)).
+    void ComputeSpeciesDimensionalViscosityWithLennardJonesMethod(RDouble transRotationTemperature, RDouble electronPressure, RDouble *speciesViscosity);
+
+    //! To compute the collision area between the same species using the curve fit method.
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronPressure denotes the non-dimensional value of electron pressure.
+    //! @param[out]: piOmega is an array to storing the dimensional values of collision area of species(Unit: m2).
+    void ComputeAverageCollisionAreaOmega22(RDouble transRotationTemperature, RDouble electronPressure, RDouble *piOmega);
+
+    //! To obtain the viscosity of the mixed gas using Wilke method.
+    //! @param[in ]: moleFraction is an array of saving the mole fractions of species.
+    //! @param[in ]: viscosity is an array of saving the viscosity of species.
+    //! @param[in ]: phi denotes the array of the partion function.
+    //! @param[out]: return the viscosity of the mixed gas.
+    RDouble GetMixedGasViscosityWithWilkeFormula(RDouble *moleFraction, RDouble *viscosity, RDouble *phi);
+
+    //! To obtain the diffusion coefficient of each species. added by LiPeng in Mar. 11,2019.
+    //! @param[in ]: massFraction is an array of saving the primary variables.
+    //! @param[in ]: viscosityLaminar is the laminar viscosity, and viscosityTurbulence is the turbulent viscosity.
+    //! @param[out]: speciesDiffusionCoef stores the species mass diffusion coefficient of each component.
+    //! The function returns the diffusion coefficients of each species which saved in rDs = (1 - Cs)/(1- Xs) * (mul/Scl + mut/Sct).
+    void ComputeSpeciesMassDiffusionCoefficient(RDouble *massFraction, RDouble viscosityLaminar, RDouble viscosityTurbulence, RDouble *speciesDiffusionCoef);
+
+    //! To obtain the mass diffusion coefficient with CLN method, the obtained value is enjoyed by all of the species.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronTemperature denotes the non-dimensional value of electron temperature.
+    //! @param[out]: return the mass diffusion coefficient.
+    RDouble GetMassDiffusionCoefficientWithCLNModel(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble electronTemperature);
+
+    //! Compute the coefficient called gama system in the multi-temperature model.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: electronTemperature is the non-dimensional value of vibration or electron temperature.
+    //! @param[out]: gama are partial derivative of electron pressure to vibration or electron energy.
+    //! @param[out]: speciesGama is an array of partial derivatives of electron pressure to species density.
+    void GetElectronPressurePartialDerivatives(RDouble *primitiveVars, RDouble electronTemperature, RDouble &gama, RDouble *speciesGama);
+
+    //! Compute the coefficient called alpha system in the multi-temperature model.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: transRotationTemperature is the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronTemperature is the non-dimensional value of vibration or electron temperature.
+    //! @param[out]: alpha is partial derivative of pressure to internal energy.
+    //! @param[out]: beta is partial derivative of pressure to total density.
+    //! @param[out]: speciesBeta is an array of partial derivatives of pressure to species density..
+    void GetPressurePartialDerivatives(RDouble *primitiveVars, RDouble transRotationTemperature, RDouble electronTemperature,
+                                       RDouble &alpha, RDouble &beta, RDouble *speciesBeta);
+
+    //! Compute the main partial derivatives in the multi-temperature model.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: transRotationTemperature is the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronTemperature is the non-dimensional value of vibration or electron temperature.
+    //! @param[out]: alpha is the partial derivative of pressure to total energy.
+    //! @param[out]: beta is the partial derivative of pressure to total density.
+    //! @param[out]: gama is the partial derivative of electron pressure to vibration-electron enegy.
+    //! @param[out]: speciesBeta��speciesGama are the partial derivatives of pressure and electron pressure to species density.
+    void GetMultiTemperatureModelPartialDerivatives(RDouble *primitiveVars, RDouble transRotationTemperature, RDouble electronTemperature,
+                                                    RDouble &alpha, RDouble &beta, RDouble &gama, RDouble *speciesBeta, RDouble *speciesGama);
+    void GetMultiTemperatureModelPartialDerivativesR(RDouble *primitiveVars, RDouble transRotationTemperature, RDouble electronTemperature,
+                                                    RDouble &alpha, RDouble &beta, RDouble &gama, RDouble *speciesBeta, RDouble *speciesGama,
+                                                    RDouble squareVelocity, RDouble *speciesEtrs, RDouble totalCvtr, RDouble totalCvv, RDouble totalCve);
+
+    //! Compute partial derivative of pressure to total density.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[out]: return the partial derivative called alpha.
+    RDouble ComputePressureDerivativeToTotalDensity(RDouble *primitiveVars);
+
+    //! To compute the static enthalpy of the mixed gas.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: transRotationTemperature denotes the temperature of translation-rotation mode.
+    //! @param[in ]: vibrationTemperature denotes the temperature of vibration mode.
+    //! @param[in ]: electronTemperature denotes the temperature of electron mode.
+    RDouble GetMixedGasEnthalpy(RDouble *primitiveVars, RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature);
+
+    RDouble ComputeMolecularWeightReciprocal(RDouble *prim);
+
+    RDouble ComputeMolecularWeight(RDouble *prim);
+
+    //! To compute heat conductivity of mixture gas using Eucken formula and Wassilewa relation.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: transRotationTemperature is the non-dimensional value of translation-rotation temperature of the mixture gas.
+    //! @param[in ]: vibrationTemperature is the non-dimensional value of vibration temperature of the mixture gas.
+    //! @param[in ]: electronTemperature is the non-dimensional value of electron temperature of the mixture gas.
+    //! @param[out]: transRotationConductivity is heat conductivity of translation-rotation of mixied gas.
+    //! @param[out]: vibrationConductivity is heat conductivity of vibration of mixied gas.
+    //! @param[out]: electronConductivity is heat conductivity of electron of mixied gas.
+    void ComputeMixtureGasHeatConductivity(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature,
+        RDouble &transRotationConductivity, RDouble &vibrationConductivity, RDouble &electronConductivity);
+
+    void ComputeMixtureGasSpecificHeatAtConstantVolume(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature,
+        RDouble &cvtr, RDouble &cvv, RDouble &cve);
+
+    //! Compute the partial derivatives of source terms of chemical reaction equations.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[in ]: chemicalSourceTerms stores the source terms of chemical reaction equations in the specified control cells.
+    //! @param[in ]: chemicalSourceDerivatives stores the partial derivatives of the source terms of chemical reaction equations in the specified control cells.
+    //! @param[out]: energySourceDerivatives returns the partial derivatives of the source terms of energy equations in the specified control cells.
+    //! @param[in ]: nCellNumber denotes the number of the specified control cells.
+    void ComputeEnergySourceDerivatives(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms,
+        RDouble ***chemicalSourceDerivatives, RDouble ***energySourceDerivatives, int nCellNumber);
+
+    //! Compute the partial derivatives of source terms of chemical reaction equations.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[in ]: chemicalSourceTerms stores the source terms of chemical reaction equations in the specified control cells.
+    //! @param[in ]: chemicalSourceDerivatives stores the partial derivatives of the source terms of chemical reaction equations in the specified control cells.
+    //! @param[out]: energySourceDerivatives returns the diagonal element of partial derivatives to the source terms of energy equations in the specified control cells.
+    //! @param[in ]: nCellNumber denotes the number of the specified control cells.
+    void ComputeEnergySourceDiagonalDerivatives(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms,
+        RDouble ***chemicalSourceDerivatives, RDouble **energySourceDerivatives, int nCellNumber);
+
+    //! To obtain the maximum mass diffusion coefficient among the species. added by LiPeng in Jan. 2019.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: viscosityLaminar is the laminar viscosity, and viscosityTurbulence is the turbulent viscosity.
+    //! The function returns the maximum mass diffusion coefficient called (1 - Cs)/(1- Xs) * (mul/Scl + mut/Sct).
+    RDouble GetMaximumSpeciesMassDiffusionCoef(RDouble *primitiveVars, RDouble viscosityLaminar, RDouble viscosityTurbulence);
+
+    RDouble ComputeMolecularWeightReciprocalWithoutElectron(RDouble *prim, RDouble &ce_div_me);
+
+    //! To obtain the diffusion coefficient of each species. added by LiPeng in Mar. 11,2019.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: viscosityLaminar is the laminar viscosity, and viscosityTurbulence is the turbulent viscosity.
+    //! @param[out]: speciesDiffusionCoef stores the species mass diffusion coefficient of each component.
+    //! The function returns the diffusion coefficients of each species which saved in rDs = (1 - Cs)/(1- Xs) * (mul/Scl + mut/Sct).
+    void GetSpeciesMassDiffusionCoef(RDouble *primitiveVars, RDouble viscosityLaminar, RDouble viscosityTurbulence, RDouble *speciesDiffusionCoef);
+
+    //! To obtain the non-dimensional constant pressure specific heat in accordance with the primary variables.
+    //! prim is an array of saving the primary variables, the non-dimensional temperature called Tm and the non-dimensional \n
+    //! Constant pressure specific heat called cp are returned.
+    void GetTemperatureAndCP(RDouble *prim, RDouble &Tm, RDouble &cp);
+    
+    //! To obtain the non-dimensional enthalpy of each species, the variable Tm is the non-dimensional temperature of the mixture gas,\n
+    //! The enthalpy of each species saved in the array of hs is returned.
+    void GetEverySpeciesEnthalpy(RDouble trTemperature, RDouble vTemperature, RDouble eTemperature, RDouble *hs);
+
+    //! To compute the electron energy of the mixed gas.
+    //! @param[in ]: prim is an array of saving the primary variables.
+    //! @param[in ]: Te is the non-dimensional electron temperature of the mixture gas.
+    //! @param[out]: return the total electron energy.
+    RDouble GetMixedGasElectronEnergy(RDouble *prim, RDouble Te);
+
+    //! To compute the vibration specific heat at constant volume of the mixed gas.
+    //! @param[in ]: prim is an array of saving the primary variables.
+    //! @param[in ]: Tv is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[out]: return the total vibration specific heat at constant volume.
+    RDouble GetMixedGasVibrationSpecificHeatAtConstantVolume(RDouble *prim, RDouble Tv);
+
+    //! To compute the vibration specific heat at constant volume of the mixed gas.
+    //! @param[in ]: prim is an array of saving the primary variables.
+    //! @param[in ]: Te is the non-dimensional electron temperature of the mixture gas.
+    //! @param[out]: return the dimensional value of total vibration specific heat at constant volume.
+    RDouble GetMixedGasElectronSpecificHeatAtConstantVolume(RDouble *prim, RDouble Te);
+
+    //! To compute the translation-rotation specific heat at constant volume of the mixed gas.
+    //! @param[in ]: prim is an array of saving the primary variables. 
+    //! @param[out]: return the dimensional value of total translation-rotation specific heat at constant volume.
+    RDouble GetMixedGasTransAndRotatSpecHeatAtConstVolume(RDouble *prim);
+
+    //! To compute the translation-rotation energy of the mixed gas.
+    //! @param[in ]: prim is an array of saving the primary variables.
+    //! @param[in ]: Ttr is the non-dimensional translation-rotation temperature of the mixture gas. 
+    //! @param[out]: return the total translation-rotation energy.
+    RDouble GetMixedGasTranslationAndRotationEnergy(RDouble *prim, RDouble Ttr);
+
+    //! To compute the vibration energy of the mixed gas.
+    //! @param[in ]: prim is an array of saving the primary variables.
+    //! @param[in ]: Tv is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[out]: return the total vibration energy.
+    RDouble GetMixedGasVibrationEnergy(RDouble *prim, RDouble Tv);
+
+    //! Compute the frozen sound speed in the multi-temperature model.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[out]: return the frozen sound speed.
+    RDouble ComputeFrozenSoundSpeed(RDouble *primitiveVars);
+
+    //! To obtain the non-dimensional temperature according to the primary variables,\n
+    //! prim is an array of saving the primary variables, the non-dimensional temperature is returned.
+    RDouble GetTemperature(RDouble *prim);
+
+public:
+
+    //! Compute the specific heat of species.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: temperatures indicates the array of temperatures including translational-rotational temperature, vibrational temperature and electron temperature.
+    //! @param[out]: spciesCvtr denotes the array of translational-rotational specific heat for species.
+    //! @param[out]: spciesCvv  denotes the array of vibrational specific heat for species.
+    //! @param[out]: totalCvtr and totalCvv denotes the total specific heat of mixture gas.
+    void ComputeSpecificHeat(RDouble *primitiveVars, RDouble *temperatures, RDouble *spciesCvtr, RDouble *spciesCvv, RDouble &totalCvtr, RDouble &totalCvv);
+
+    //! Compute the energies of species.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: temperatures indicates the array of temperatures including translational-rotational temperature, vibrational temperature and electron temperature.
+    //! @param[out]: spciesEtr denotes the array of translational-rotational energy for species.
+    //! @param[out]: spciesEv  denotes the array of vibrational energy for species.
+    //! @param[out]: spciesEnthalpy denotes the array of enthalpies for species.
+    //! @param[out]: totalEtr and totalEv denotes the total energy of mixture gas.
+    //! @param[out]: totalEnthalpy denotes the total enthalpy of mixture gas.
+    void ComputeEnergy(RDouble *primitiveVars, RDouble *temperatures, RDouble *spciesEtr, RDouble *spciesEv, RDouble *spciesEnthalpy, RDouble &totalEtr, RDouble &totalEv, RDouble &totalEnthalpy);
+
+    //! Compute the partial derivatives of pressure.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: temperatures indicates the array of temperatures including translational-rotational temperature, vibrational temperature and electron temperature.
+    //! @param[out]: alpha indicates the partial derivative of pressure vs. total energy(dp/d(rho*E)).
+    //! @param[out]: beta indicates the partial derivative of pressure vs. density(dp/d(rho)).
+    //! @param[out]: eta indicates the partial derivative of pressure vs. vibration energy(dp/d(rho * Ev)).
+    //! @param[out]: speciesBeta indicates the partial derivatives of pressure vs. species density(dp/d(rho * ci)).
+    void ComputePressureDerivatives(RDouble *primitiveVars, RDouble *temperatures, RDouble &alpha, RDouble &beta, RDouble &eta, RDouble *speciesBeta);
+
+    void ComputeSpecificHeatByFitMethod(RDouble temperature, RDouble *cvSpecies, bool isVibrationModel = true);
+    void ComputeEnthalpyByFitMethod(RDouble temperature, RDouble *hSpecies, bool isVibrationModel = true);
+
+    void ComputeSpecificHeatByPolynomialFitMethod(RDouble temperature, RDouble *cvSpecies, bool isVibrationModel = true);
+    void ComputeEnthalpyByPolynomialFitMethod(RDouble temperature, RDouble *hSpecies, bool isVibrationModel = true);
+    void ComputeTemperatureFromTotalTemperature(RDouble *massF, RDouble totalTemperature, RDouble mach, RDouble &Temperature, RDouble &gama, int Dimensional = 0);
+
+};
+
+void ChemCompressData(DataContainer *&cdata);
+
+void ChemDecompressData(DataContainer *cdata);
+
+//! The function computes the formula (M +- R) * dQ, where M and R denote the Jacobian matrix and spectrum radius of inviscid flux,respectively.
+//! @param[in ]: primitiveVars is the array that stores the primitive variables of the current cell.
+//! @param[in ]: temperature is the array that stores the temperature values of the current cell.
+//! @param[in ]: nx, ny and nz are components of the average normal vector located in the center of the current cell.
+//! @param[in ]: faceArea denotes the avarage area located in the center of the current cell.
+//! @param[in ]: moveVelocity denotes the movement velocity located in the center of the current cell, and it is used for dynamic mesh.
+//! @param[in ]: deltaQ is the increment of conservative vector.
+//! @param[out]: flux is the inviscid flux that equals to the Jacobian matrix multiplies the difference values of the conservative variables.
+//! @param[in ]: radius denotes the spectrum radius of invsicid Jacobian matrix.
+//! @param[in ]: iSign denotes the computation symbol, -1 denotes M substracts R, 1 denotes M plus R.
+void ChemicalMXDQ(RDouble *primitiveVars, RDouble *temperature, RDouble nx, RDouble ny, RDouble nz, RDouble faceArea, RDouble moveVelocity,
+                  RDouble *deltaQ, RDouble *flux, int nNSEquation, int nLaminar, int nTemperatureModel, RDouble radius, int iSign,int nElectronIndex);
+void ChemicalMXDQR(RDouble *primitiveVars, RDouble *temperature, RDouble nx, RDouble ny, RDouble nz, RDouble faceArea, RDouble moveVelocity,
+                   RDouble *deltaQ, RDouble *flux, int nNSEquation, int nLaminar, int nTemperatureModel, RDouble radius, int iSign, int nElectronIndex,
+                   RDouble *speciesCvs, RDouble *speciesEtrs, RDouble totalH,  RDouble totalCv, RDouble totalCvtr, RDouble totalCvv, RDouble totalCve);
+}
+
+}
diff --git a/API/MultiSpecies/src/ChemModel.cpp b/API/MultiSpecies/src/ChemModel.cpp
new file mode 100644
index 0000000..c7d08e2
--- /dev/null
+++ b/API/MultiSpecies/src/ChemModel.cpp
@@ -0,0 +1,3080 @@
+#include "ChemModel.h"
+#include "Pointer.h"
+#include "GlobalDataBase.h"
+#include "Constants.h"
+
+namespace PHSPACE
+{
+namespace GAS_SPACE
+{
+ChemicalReactions::ChemicalReactions()
+{
+    nReactionType = 0; //nType = 0 indicates the Gupta Model, nType = 1 indicates the Park Model, and nType = 2 indicates the Dunn-Kang Model.
+    nSpecies = 0;
+    nReaction = 0;
+    speciesName = NULL;
+    stoichForward = NULL;
+    stoichBackward = NULL;
+    collisionCoef = NULL;
+    reactionData = NULL;
+    reactionType = NULL; 
+}
+
+ChemicalReactions::ChemicalReactions(int ns, int nr)
+{
+    if (ns <= 0 || nr <= 0)
+    {
+        nReactionType = 0;
+        nSpecies = 0;
+        nReaction = 0;
+        speciesName = NULL;
+        stoichForward = NULL;
+        stoichBackward = NULL;
+        collisionCoef = NULL;
+        reactionData = NULL;
+        reactionType = NULL; 
+    }
+    else
+    {
+        nSpecies = ns;
+        nReaction = nr;
+        nReactionType = 0;
+        AllocateMemories();
+    }
+}
+
+ChemicalReactions::~ChemicalReactions()
+{
+    DeAllocateMemories();
+}
+
+void ChemicalReactions::AllocateMemories()
+{
+    if (this->nSpecies <= 0 || this->nReaction <= 0)
+        return;
+    speciesName = new string[nSpecies];
+    stoichForward = NewPointer2 <int> (this->nReaction, this->nSpecies);
+    stoichBackward = NewPointer2 <int> (this->nReaction, this->nSpecies);
+    collisionCoef = NewPointer2 <RDouble> (this->nReaction, this->nSpecies);
+    reactionData = NewPointer2 <RDouble> (this->nReaction, 6);
+    reactionType = NewPointer2 <int> (this->nReaction, 2);
+}
+
+void ChemicalReactions::DeAllocateMemories()
+{
+    if (this->nSpecies <= 0 || this->nReaction <= 0)
+        return;
+    // Remove the allocated memories.
+    delete [] speciesName;
+    DelPointer2(stoichForward);
+    DelPointer2(stoichBackward);
+    DelPointer2(collisionCoef);
+    DelPointer2(reactionData);
+    DelPointer2(reactionType);
+
+    nSpecies = 0;
+    nReaction = 0;
+    speciesName = NULL;
+    stoichForward = NULL;
+    stoichBackward = NULL;
+    collisionCoef = NULL;
+    reactionData = NULL;
+    reactionType = NULL;
+}
+
+void ChemicalReactions::SetChemicalModelInfo(int ns, int nr)
+{
+    if (ns <= 0 || nr <= 0)
+        return;
+    if (this->nSpecies == ns && this->nReaction == nr)
+        return;
+    DeAllocateMemories();
+
+    this->nSpecies = ns;
+    this->nReaction = nr;
+    AllocateMemories();
+}
+
+void ChemicalReactions::GenerateGupta11S20RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef)
+{
+    //Set the types of chemical reactions.
+    int typeOfReaction[20] = {0, 0, 0, 0, 2, 2, 4, 5, 5, 4, 3, 3, 4, 4, 4, 3, 3, 3, 3, 3};
+    for (int r = 0; r < 20; ++ r)
+    {
+        reactionType[r][0] = 0;
+        reactionType[r][1] = typeOfReaction[r];
+    }
+    //The following chemical reactions are collision reactions.
+    reactionType[0][0] = 1;
+    reactionType[1][0] = 1;
+    reactionType[3][0] = 1;
+    reactionType[14][0] = 1;
+
+    //! O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-.
+    int stoichData[440] = {
+        0,   1,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   1,   0,
+        0,   0,   0,   1,   0,   0,   0,   0,   0,   1,   0,
+        0,   0,   1,   0,   0,   0,   0,   0,   0,   0,   0,
+        1,   0,   1,   0,   0,   0,   0,   0,   0,   0,   0,
+        1,   0,   0,   0,   0,   0,   0,   0,   0,   1,   0,
+        1,   0,   0,   1,   0,   0,   0,   0,   0,   0,   0,
+        1,   0,   0,   0,   0,   0,   0,   0,   0,   0,   1,
+        0,   0,   0,   1,   0,   0,   0,   0,   0,   0,   1,
+        2,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        1,   0,   0,   0,   0,   1,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   1,   0,   1,   0,
+        0,   0,   0,   2,   0,   0,   0,   0,   0,   0,   0,
+        0,   1,   0,   0,   0,   0,   0,   0,   0,   1,   0,
+        0,   0,   1,   0,   0,   0,   0,   0,   0,   0,   0,
+        1,   0,   0,   0,   0,   0,   1,   0,   0,   0,   0,
+        0,   0,   0,   0,   1,   0,   0,   0,   0,   1,   0,
+        0,   0,   0,   1,   0,   0,   1,   0,   0,   0,   0,
+        0,   1,   0,   0,   0,   0,   1,   0,   0,   0,   0,
+        1,   0,   0,   0,   0,   0,   1,   0,   0,   0,   0,
+        2,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   2,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   3,   0,   0,   0,   0,   0,   0,   0,
+        1,   0,   0,   1,   0,   0,   0,   0,   0,   0,   0,
+        0,   1,   0,   1,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   1,   1,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   1,   0,   0,   0,   1,
+        0,   0,   0,   0,   1,   0,   0,   0,   0,   0,   2,
+        0,   0,   0,   0,   0,   0,   0,   1,   0,   0,   2,
+        0,   0,   0,   0,   0,   1,   0,   0,   0,   0,   1,
+        0,   1,   0,   0,   1,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   1,   0,   0,   0,   0,   1,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   1,   0,   1,
+        0,   0,   1,   0,   0,   0,   1,   0,   0,   0,   1,
+        0,   0,   0,   0,   0,   0,   1,   0,   0,   0,   1,
+        0,   0,   1,   0,   1,   0,   0,   0,   0,   0,   0,
+        1,   0,   0,   0,   0,   0,   0,   0,   1,   0,   0,
+        0,   0,   1,   0,   0,   0,   0,   1,   0,   0,   0,
+        0,   0,   1,   0,   0,   1,   0,   0,   0,   0,   0,
+        0,   1,   0,   0,   0,   0,   0,   1,   0,   0,   0
+    };
+    RDouble collisionData[220] = {
+        25.0,  9.0,   1.0,   1.0,   0.0,   0.0,   0.0,   0.0,   0.0,   2.0,   0.0,
+        1.0,   1.0,   1.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   2.5,   0.0,
+        0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,
+        20.0,  1.0,   20.0,  20.0,  0.0,   0.0,   0.0,   0.0,   0.0,   1.0,   0.0,
+        0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,
+        0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,
+        0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,
+        0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,
+        0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,
+        0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,
+        0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,
+        0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,
+        0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,
+        0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,
+        0.0,   4.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   1.0,   0.0,
+        0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,
+        0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,
+        0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,
+        0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,
+        0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0,   0.0
+    };
+    RDouble rateData[120] = {
+        3.6100E+12, -1.00,  5.9400E+04,  3.0100E+03, -0.50,  0.0000E+00,
+        1.9200E+11, -0.50,  1.1310E+05,  1.0900E+04, -0.50,  0.0000E+00,
+        4.1500E+16, -1.50,  1.1310E+05,  2.3200E+09, -1.50,  0.0000E+00,
+        3.9700E+14, -1.50,  7.5600E+04,  1.0100E+08, -1.50,  0.0000E+00,
+        3.1800E+03,  1.00,  1.9700E+04,  9.6300E+05,  0.50,  3.6000E+03,
+        6.7500E+07,  0.00,  3.7500E+04,  1.5000E+07,  0.00,  0.0000E+00,
+        9.0300E+03,  0.50,  3.2400E+04,  1.8000E+13, -1.00,  0.0000E+00,
+        3.6000E+25, -2.91,  1.5800E+05,  2.2000E+28, -4.50,  0.0000E+00,
+        1.1000E+26, -3.14,  1.6900E+05,  2.2000E+28, -4.50,  0.0000E+00,
+        1.6000E+11, -0.98,  8.0800E+04,  8.0200E+15, -1.50,  0.0000E+00,
+        2.9200E+12, -1.11,  2.8000E+04,  7.8000E+05,  0.50,  0.0000E+00,
+        2.0200E+05,  0.81,  1.3000E+04,  7.8000E+05,  0.50,  0.0000E+00,
+        1.4000E+07,  0.00,  6.7800E+04,  1.5000E+16, -1.50,  0.0000E+00,
+        1.3800E+14, -1.84,  1.4100E+05,  1.0000E+12, -2.50,  0.0000E+00,
+        2.2000E+09, -0.35,  1.0800E+05,  2.2000E+14, -2.50,  0.0000E+00,
+        3.6300E+09, -0.60,  5.0800E+04,  1.5000E+07,  0.00,  0.0000E+00,
+        3.4000E+13, -2.00,  2.3000E+04,  2.4800E+13, -2.20,  0.0000E+00,
+        1.0000E+13, -0.93,  6.1000E+04,  4.8000E+08,  0.00,  0.0000E+00,
+        1.8000E+09,  0.17,  3.3000E+04,  1.8000E+07,  0.50,  0.0000E+00,
+        1.3400E+07,  0.31,  7.7270E+04,  1.0000E+08,  0.00,  0.0000E+00
+    };
+
+    for (int i = 0; i < 440; ++ i)
+    {
+        reactionCoef[i] = stoichData[i];
+    }
+    for (int i = 0; i < 220; ++ i)
+    {
+        collisionCoef[i] = collisionData[i];
+    }
+    for (int i = 0; i < 120; ++ i)
+    {
+        rateCoef[i] = rateData[i];
+    }
+}
+
+void ChemicalReactions::GeneratePark11S48RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef)
+{
+    //Set the types of chemical reactions.
+    int typeOfReaction[48] = {
+        0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+        0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 2,
+        4, 4, 4, 5, 5, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 1
+    };
+    for (int r = 0; r < 48; ++ r)
+    {
+        reactionType[r][0] = 0;
+        reactionType[r][1] = typeOfReaction[r];
+    }
+
+    //! O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-.
+    int stoichData[1056] = {
+        0,   2,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   1,   1,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   1,   0,   0,   0,   0,   0,   0,   0,   1,   0,
+        1,   1,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   1,   0,   1,   0,   0,   0,   0,   0,   0,   0,
+        0,   1,   0,   0,   0,   0,   0,   1,   0,   0,   0,
+        0,   1,   0,   0,   1,   0,   0,   0,   0,   0,   0,
+        0,   1,   0,   0,   0,   0,   0,   0,   1,   0,   0,
+        0,   1,   0,   0,   0,   1,   0,   0,   0,   0,   0,
+        0,   1,   0,   0,   0,   0,   1,   0,   0,   0,   0,
+        0,   1,   1,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   2,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   1,   0,   0,   0,   0,   0,   0,   1,   0,
+        1,   0,   1,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   1,   1,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   1,   0,   0,   0,   0,   1,   0,   0,   0,
+        0,   0,   1,   0,   1,   0,   0,   0,   0,   0,   0,
+        0,   0,   1,   0,   0,   0,   0,   0,   1,   0,   0,
+        0,   0,   1,   0,   0,   1,   0,   0,   0,   0,   0,
+        0,   0,   1,   0,   0,   0,   1,   0,   0,   0,   0,
+        0,   1,   0,   0,   0,   0,   0,   0,   0,   1,   0,
+        0,   0,   1,   0,   0,   0,   0,   0,   0,   1,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   2,   0,
+        1,   0,   0,   0,   0,   0,   0,   0,   0,   1,   0,
+        0,   0,   0,   1,   0,   0,   0,   0,   0,   1,   0,
+        0,   0,   0,   0,   0,   0,   0,   1,   0,   1,   0,
+        0,   0,   0,   0,   1,   0,   0,   0,   0,   1,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   1,   1,   0,
+        0,   0,   0,   0,   0,   1,   0,   0,   0,   1,   0,
+        0,   0,   0,   0,   0,   0,   1,   0,   0,   1,   0,
+        1,   0,   0,   0,   0,   0,   0,   0,   0,   1,   0,
+        1,   0,   1,   0,   0,   0,   0,   0,   0,   0,   0,
+        1,   0,   0,   1,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   2,   0,   0,   0,   0,   0,   0,   0,
+        2,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        1,   0,   0,   0,   0,   0,   0,   0,   0,   0,   1,
+        0,   0,   0,   1,   0,   0,   0,   0,   0,   0,   1,
+        1,   0,   0,   0,   0,   0,   1,   0,   0,   0,   0,
+        0,   0,   0,   1,   0,   1,   0,   0,   0,   0,   0,
+        0,   0,   1,   0,   1,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   1,   0,   0,   0,   1,   0,
+        1,   0,   0,   0,   0,   1,   0,   0,   0,   0,   0,
+        0,   0,   0,   1,   0,   0,   1,   0,   0,   0,   0,
+        0,   1,   0,   0,   0,   0,   1,   0,   0,   0,   0,
+        1,   0,   0,   0,   0,   0,   1,   0,   0,   0,   0,
+        0,   0,   0,   0,   1,   0,   0,   0,   0,   1,   0,
+        0,   0,   0,   1,   0,   0,   1,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   1,   1,
+        2,   1,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        2,   0,   1,   0,   0,   0,   0,   0,   0,   0,   0,
+        2,   0,   0,   0,   0,   0,   0,   0,   0,   1,   0,
+        3,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        2,   0,   0,   1,   0,   0,   0,   0,   0,   0,   0,
+        2,   0,   0,   0,   0,   0,   0,   1,   0,   0,   0,
+        2,   0,   0,   0,   1,   0,   0,   0,   0,   0,   0,
+        2,   0,   0,   0,   0,   0,   0,   0,   1,   0,   0,
+        2,   0,   0,   0,   0,   1,   0,   0,   0,   0,   0,
+        2,   0,   0,   0,   0,   0,   1,   0,   0,   0,   0,
+        1,   1,   0,   1,   0,   0,   0,   0,   0,   0,   0,
+        1,   0,   1,   1,   0,   0,   0,   0,   0,   0,   0,
+        1,   0,   0,   1,   0,   0,   0,   0,   0,   1,   0,
+        2,   0,   0,   1,   0,   0,   0,   0,   0,   0,   0,
+        1,   0,   0,   2,   0,   0,   0,   0,   0,   0,   0,
+        1,   0,   0,   1,   0,   0,   0,   1,   0,   0,   0,
+        1,   0,   0,   1,   1,   0,   0,   0,   0,   0,   0,
+        1,   0,   0,   1,   0,   0,   0,   0,   1,   0,   0,
+        1,   0,   0,   1,   0,   1,   0,   0,   0,   0,   0,
+        1,   0,   0,   1,   0,   0,   1,   0,   0,   0,   0,
+        0,   1,   0,   2,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   1,   2,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   2,   0,   0,   0,   0,   0,   1,   0,
+        1,   0,   0,   2,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   3,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   2,   0,   0,   0,   1,   0,   0,   0,
+        0,   0,   0,   2,   1,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   2,   0,   0,   0,   0,   1,   0,   0,
+        0,   0,   0,   2,   0,   1,   0,   0,   0,   0,   0,
+        0,   0,   0,   2,   0,   0,   1,   0,   0,   0,   0,
+        0,   0,   1,   1,   0,   0,   0,   0,   0,   0,   0,
+        0,   1,   0,   1,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   1,   0,   0,   0,   1,
+        0,   0,   0,   0,   0,   0,   0,   0,   1,   0,   1,
+        0,   0,   0,   0,   0,   1,   0,   0,   0,   0,   1,
+        0,   0,   0,   0,   1,   0,   0,   0,   0,   0,   2,
+        0,   0,   0,   0,   0,   0,   0,   1,   0,   0,   2,
+        0,   1,   0,   0,   0,   0,   0,   1,   0,   0,   0,
+        0,   1,   0,   0,   0,   0,   0,   1,   0,   0,   0,
+        0,   1,   0,   0,   0,   0,   0,   1,   0,   0,   0,
+        0,   1,   0,   0,   0,   0,   0,   0,   1,   0,   0,
+        0,   1,   0,   0,   1,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   1,   0,   0,   0,   0,   1,   0,
+        0,   0,   1,   0,   0,   1,   0,   0,   0,   0,   0,
+        0,   0,   0,   1,   0,   1,   0,   0,   0,   0,   0,
+        1,   0,   0,   0,   0,   0,   0,   0,   1,   0,   0,
+        1,   0,   0,   0,   0,   0,   0,   0,   1,   0,   0,
+        0,   0,   0,   2,   0,   0,   0,   0,   0,   0,   1
+    };
+    RDouble rateData[288] = {
+        2.0000E+15, -1.50,  6.0050E+04,  2.6705E+04, -0.50,  0.0000E+00,
+        2.0000E+15, -1.50,  6.0050E+04,  2.6705E+04, -0.50,  0.0000E+00,
+        2.0000E+15, -1.50,  6.0050E+04,  2.6705E+04, -0.50,  0.0000E+00,
+        1.0000E+16, -1.50,  6.0050E+04,  1.3353E+05, -0.50,  0.0000E+00,
+        1.0000E+16, -1.50,  6.0050E+04,  1.3353E+05, -0.50,  0.0000E+00,
+        1.0000E+16, -1.50,  6.0050E+04,  1.3353E+05, -0.50,  0.0000E+00,
+        1.0000E+16, -1.50,  6.0050E+04,  1.3353E+05, -0.50,  0.0000E+00,
+        2.0000E+15, -1.50,  6.0050E+04,  2.6705E+04, -0.50,  0.0000E+00,
+        2.0000E+15, -1.50,  6.0050E+04,  2.6705E+04, -0.50,  0.0000E+00,
+        2.0000E+15, -1.50,  6.0050E+04,  2.6705E+04, -0.50,  0.0000E+00,
+        5.0000E+09,  0.00,  7.6022E+04,  2.5807E-01,  1.00,  0.0000E+00,
+        1.1000E+11,  0.00,  7.6022E+04,  5.6774E+00,  1.00,  0.0000E+00,
+        5.0000E+09,  0.00,  7.6022E+04,  2.5807E-01,  1.00,  0.0000E+00,
+        1.1000E+11,  0.00,  7.6022E+04,  5.6774E+00,  1.00,  0.0000E+00,
+        1.1000E+11,  0.00,  7.6022E+04,  5.6774E+00,  1.00,  0.0000E+00,
+        1.1000E+11,  0.00,  7.6022E+04,  5.6774E+00,  1.00,  0.0000E+00,
+        1.1000E+11,  0.00,  7.6022E+04,  5.6774E+00,  1.00,  0.0000E+00,
+        5.0000E+09,  0.00,  7.6022E+04,  2.5807E-01,  1.00,  0.0000E+00,
+        5.0000E+09,  0.00,  7.6022E+04,  2.5807E-01,  1.00,  0.0000E+00,
+        5.0000E+09,  0.00,  7.6022E+04,  2.5807E-01,  1.00,  0.0000E+00,
+        7.0000E+15, -1.60,  1.1392E+05,  7.4287E+04, -0.60,  0.0000E+00,
+        7.0000E+15, -1.60,  1.1392E+05,  7.4287E+04, -0.60,  0.0000E+00,
+        7.0000E+15, -1.60,  1.1392E+05,  7.4287E+04, -0.60,  0.0000E+00,
+        3.0000E+16, -1.60,  1.1392E+05,  3.1837E+05, -0.60,  0.0000E+00,
+        3.0000E+16, -1.60,  1.1392E+05,  3.1837E+05, -0.60,  0.0000E+00,
+        3.0000E+16, -1.60,  1.1392E+05,  3.1837E+05, -0.60,  0.0000E+00,
+        3.0000E+16, -1.60,  1.1392E+05,  3.1837E+05, -0.60,  0.0000E+00,
+        7.0000E+15, -1.60,  1.1392E+05,  7.4287E+04, -0.60,  0.0000E+00,
+        7.0000E+15, -1.60,  1.1392E+05,  7.4287E+04, -0.60,  0.0000E+00,
+        7.0000E+15, -1.60,  1.1392E+05,  7.4287E+04, -0.60,  0.0000E+00,
+        6.4000E+11, -1.00,  3.8400E+04,  1.3159E+11, -1.00,  4.9744E+02,
+        8.4000E+06,  0.00,  1.9450E+04,  3.2469E+07,  0.00,  3.4780E+03,
+        8.8000E+02,  1.00,  3.3633E+04,  3.6997E+06,  1.00,  0.0000E+00,
+        4.4000E+01,  1.50,  6.9355E+04,  4.8044E+04,  1.50,  0.0000E+00,
+        7.1000E-04,  2.70,  8.2471E+04,  2.1358E+00,  2.70,  0.0000E+00,
+        3.9000E+27, -3.78,  1.6108E+05,  2.0798E+20, -2.78,  0.0000E+00,
+        2.5000E+28, -3.82,  1.7175E+05,  1.0557E+21, -2.82,  0.0000E+00,
+        1.0000E+06,  0.50,  7.8067E+04,  2.3385E+05,  0.50,  0.0000E+00,
+        8.7000E+07,  0.14,  2.9229E+04,  2.8434E+07,  0.14,  0.0000E+00,
+        1.4000E-01,  1.90,  2.6644E+04,  1.3322E-01,  1.90,  0.0000E+00,
+        9.9000E+06,  0.00,  4.0759E+04,  2.8561E+06,  0.00,  0.0000E+00,
+        4.0000E+06, -0.09,  1.8557E+04,  5.3106E+06, -0.09,  0.0000E+00,
+        3.4000E+07, -1.08,  1.3520E+04,  4.0638E+07, -1.08,  0.0000E+00,
+        2.4000E+07,  0.41,  3.2866E+04,  4.4426E+06,  0.41,  0.0000E+00,
+        7.2000E+06,  0.29,  4.8838E+04,  5.1518E+06,  0.29,  0.0000E+00,
+        9.1000E+05,  0.36,  2.2800E+04,  1.9774E+05,  0.36,  5.9851E+02,
+        7.2000E+07,  0.00,  3.5722E+04,  1.8700E+07,  0.00,  0.0000E+00,
+        1.2000E+19, -1.60,  1.1392E+05,  1.2735E+08, -0.60,  0.0000E+00
+    };
+
+    for (int i = 0; i < 1056; ++ i)
+    {
+        reactionCoef[i] = stoichData[i];
+    }
+    for (int i = 0; i < 528; ++ i)
+    {
+        collisionCoef[i] = 0.0;
+    }
+    for (int i = 0; i < 288; ++ i)
+    {
+        rateCoef[i] = rateData[i];
+    }
+}
+
+void ChemicalReactions::GenerateDunnKang11S26RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef)
+{
+    //Set the types of chemical reactions.
+    int typeOfReaction[26] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 2, 4, 4, 4, 4, 5, 5, 3, 3, 3, 3, 3, 4, 4, 3, 3};
+    for (int r = 0; r < 26; ++ r)
+    {
+        reactionType[r][0] = 0;
+        reactionType[r][1] = typeOfReaction[r];
+    }
+    //The following chemical reactions are collision reactions.
+    reactionType[0][0] = 1;
+    reactionType[4][0] = 1;
+    reactionType[7][0] = 1;
+    reactionType[8][0] = 1;
+
+    //! O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-.
+    int stoichData[572] = {
+        0,   1,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        1,   1,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   2,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   1,   0,   0,   0,   0,   0,   0,   0,   1,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   1,   0,
+        0,   0,   0,   1,   0,   0,   0,   0,   0,   1,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   2,   0,
+        0,   0,   1,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   1,   0,   0,   0,   0,   0,   0,   0,   0,
+        1,   0,   1,   0,   0,   0,   0,   0,   0,   0,   0,
+        1,   0,   0,   0,   0,   0,   0,   0,   0,   1,   0,
+        1,   0,   0,   1,   0,   0,   0,   0,   0,   0,   0,
+        0,   1,   0,   0,   0,   0,   0,   0,   0,   1,   0,
+        0,   0,   1,   0,   0,   0,   0,   0,   0,   1,   0,
+        0,   1,   1,   0,   0,   0,   0,   0,   0,   0,   0,
+        1,   0,   0,   0,   0,   0,   0,   0,   0,   0,   1,
+        0,   0,   0,   1,   0,   0,   0,   0,   0,   0,   1,
+        0,   0,   0,   1,   0,   0,   1,   0,   0,   0,   0,
+        1,   0,   0,   0,   0,   0,   1,   0,   0,   0,   0,
+        1,   0,   0,   0,   0,   0,   1,   0,   0,   0,   0,
+        0,   0,   0,   0,   1,   0,   0,   0,   0,   1,   0,
+        0,   0,   0,   0,   0,   0,   0,   1,   0,   1,   0,
+        0,   0,   0,   2,   0,   0,   0,   0,   0,   0,   0,
+        2,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   1,   0,   0,   0,   0,   1,   0,   0,   0,   0,
+        1,   0,   0,   0,   0,   1,   0,   0,   0,   0,   0,
+        2,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        3,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        2,   1,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        2,   0,   0,   0,   0,   0,   0,   0,   0,   1,   0,
+        0,   0,   0,   2,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   3,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   2,   0,   0,   0,   0,   0,   1,   0,
+        1,   0,   0,   1,   0,   0,   0,   0,   0,   0,   0,
+        1,   0,   0,   1,   0,   0,   0,   0,   0,   0,   0,
+        0,   1,   0,   1,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   1,   1,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   1,   0,   0,   0,   1,
+        0,   0,   1,   0,   0,   0,   1,   0,   0,   0,   1,
+        0,   0,   0,   0,   0,   0,   1,   0,   0,   1,   1,
+        0,   1,   0,   0,   0,   0,   1,   0,   0,   0,   1,
+        0,   0,   0,   0,   1,   0,   0,   0,   0,   0,   2,
+        0,   0,   0,   0,   0,   0,   0,   1,   0,   0,   2,
+        0,   0,   1,   0,   0,   0,   0,   1,   0,   0,   0,
+        0,   1,   0,   0,   0,   0,   0,   1,   0,   0,   0,
+        0,   0,   1,   0,   1,   0,   0,   0,   0,   0,   0,
+        1,   0,   0,   0,   0,   0,   0,   0,   1,   0,   0,
+        0,   0,   0,   1,   0,   0,   0,   0,   1,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   1,   0,   1,
+        0,   0,   0,   0,   0,   1,   0,   0,   0,   0,   1,
+        0,   0,   1,   0,   0,   1,   0,   0,   0,   0,   0,
+        0,   1,   0,   0,   1,   0,   0,   0,   0,   0,   0
+    };
+    RDouble collisionData[286] = {
+        0,   0,   1,   1,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        1,   1,   1,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   1,   0,   0,   0,   0,   0,   0,   0,   1,   0,
+        1,   0,   1,   1,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0,
+        0,   0,   0,   0,   0,   0,   0,   0,   0,   0,   0
+    };
+    RDouble rateData[156] = {
+        3.6000E+12, -1.00,  5.9500E+04,  3.0000E+03, -0.50,  0.0000E+00,
+        9.0000E+13, -1.00,  5.9500E+04,  7.5000E+04, -0.50,  0.0000E+00,
+        3.2400E+13, -1.00,  5.9500E+04,  2.7000E+04, -0.50,  0.0000E+00,
+        7.2000E+12, -1.00,  5.9500E+04,  6.0000E+03, -0.50,  0.0000E+00,
+        1.9000E+11, -0.50,  1.1300E+05,  1.1000E+04, -0.50,  0.0000E+00,
+        4.0850E+16, -1.50,  1.1300E+05,  2.2700E+09, -1.50,  0.0000E+00,
+        4.7000E+11, -0.50,  1.1300E+05,  2.7200E+04, -0.50,  0.0000E+00,
+        3.9000E+14, -1.50,  7.5500E+04,  1.0000E+08, -1.50,  0.0000E+00,
+        7.8000E+14, -1.50,  7.5500E+04,  2.0000E+08, -1.50,  0.0000E+00,
+        3.2000E+03,  1.00,  1.9700E+04,  1.3000E+04,  1.00,  3.5800E+03,
+        7.0000E+07,  0.00,  3.8000E+04,  1.5600E+07,  0.00,  0.0000E+00,
+        1.4000E+00,  1.50,  3.1900E+04,  6.7000E+15, -1.50,  0.0000E+00,
+        1.3800E+14, -1.84,  1.4100E+05,  1.0000E+12, -2.50,  0.0000E+00,
+        2.2000E+09, -0.35,  1.0800E+05,  2.2000E+14, -2.50,  0.0000E+00,
+        8.8000E+09, -0.35,  1.0800E+05,  8.8000E+14, -2.50,  0.0000E+00,
+        3.6000E+25, -2.91,  1.5800E+05,  2.2000E+28, -4.50,  0.0000E+00,
+        1.1000E+26, -3.14,  1.6900E+05,  2.2000E+28, -4.50,  0.0000E+00,
+        1.0000E+13, -0.93,  6.1000E+04,  4.8000E+08,  0.00,  0.0000E+00,
+        1.3400E+07,  0.31,  7.7270E+04,  1.0000E+08,  0.00,  0.0000E+00,
+        3.6300E+09, -0.60,  5.0800E+04,  1.5000E+07,  0.00,  0.0000E+00,
+        3.4000E+13, -2.00,  2.3000E+04,  2.4800E+13, -2.20,  0.0000E+00,
+        2.0200E+05,  0.81,  1.3000E+04,  7.8000E+05,  0.50,  0.0000E+00,
+        1.4000E+07,  0.00,  6.7800E+04,  1.5000E+16, -1.50,  0.0000E+00,
+        1.6000E+11, -0.98,  8.0800E+04,  8.0000E+15, -1.50,  0.0000E+00,
+        1.8000E+09,  0.17,  3.3000E+04,  1.8000E+07,  0.50,  0.0000E+00,
+        2.9200E+12, -1.11,  2.8000E+04,  7.8000E+05,  0.50,  0.0000E+00
+    };
+
+    for (int i = 0; i < 572; ++ i)
+    {
+        reactionCoef[i] = stoichData[i];
+    }
+    for (int i = 0; i < 286; ++ i)
+    {
+        collisionCoef[i] = collisionData[i];
+    }
+    for (int i = 0; i < 156; ++ i)
+    {
+        rateCoef[i] = rateData[i];
+    }
+}
+
+void ChemicalReactions::GenerateMarsPark8S12RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef)
+{
+    //Set the types of chemical reactions.
+    int typeOfReaction[12] = {0, 0, 0, 0, 0, 2, 2, 2, 2, 2, 2, 2};
+    for (int r = 0; r < 12; ++ r)
+    {
+        reactionType[r][0] = 0;
+        reactionType[r][1] = typeOfReaction[r];
+    }
+    //The following chemical reactions are collision reactions.
+    reactionType[0][0] = 1;
+    reactionType[1][0] = 1;
+    reactionType[2][0] = 1;
+    reactionType[3][0] = 1;
+    reactionType[4][0] = 1;
+
+    int nMarsModel = GlobalDataBase::GetIntParaFromDB("nMarsModel");
+    if (0 == nMarsModel)
+    {
+        //! O, O2, NO, N, N2, C, CO, CO2.
+        int stoichData[192] = {
+            0,  0,  0,  0,  0,  0,  0,  1,
+            0,  0,  0,  0,  0,  0,  1,  0,
+            0,  0,  0,  0,  1,  0,  0,  0,
+            0,  1,  0,  0,  0,  0,  0,  0,
+            0,  0,  1,  0,  0,  0,  0,  0,
+            0,  0,  0,  1,  0,  0,  1,  0,
+            0,  0,  0,  0,  0,  0,  2,  0,
+            1,  0,  0,  0,  0,  0,  1,  0,
+            1,  0,  0,  0,  1,  0,  0,  0,
+            0,  0,  1,  0,  0,  0,  1,  0,
+            1,  0,  1,  0,  0,  0,  0,  0,
+            1,  0,  0,  0,  0,  0,  0,  1,
+            1,  0,  0,  0,  0,  0,  1,  0,
+            1,  0,  0,  0,  0,  1,  0,  0,
+            0,  0,  0,  2,  0,  0,  0,  0,
+            2,  0,  0,  0,  0,  0,  0,  0,
+            1,  0,  0,  1,  0,  0,  0,  0,
+            0,  0,  1,  0,  0,  1,  0,  0,
+            0,  0,  0,  0,  0,  1,  0,  1,
+            0,  1,  0,  0,  0,  1,  0,  0,
+            0,  0,  1,  1,  0,  0,  0,  0,
+            0,  0,  0,  1,  0,  0,  0,  1,
+            0,  1,  0,  1,  0,  0,  0,  0,
+            0,  1,  0,  0,  0,  0,  1,  0
+        };
+        RDouble collisionData[96] = {
+            1.00,  1.00,  1.00,  1.00,  1.00,  1.00,  1.00,  1.00,
+            14.80, 1.00,  1.00,  14.80, 1.00,  14.80, 1.95,  1.00,
+            4.28,  1.00,  1.00,  4.28,  1.00,  4.28,  1.00,  1.00,
+            5.00,  1.00,  1.00,  5.00,  1.00,  5.00,  1.00,  1.00,
+            22.00, 1.00,  22.00, 22.00, 1.00,  22.00, 1.00,  22.00,
+            0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,
+            0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,
+            0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,
+            0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,
+            0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,
+            0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,
+            0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00
+        };
+        RDouble rateData[72] = {
+            3.70E+08,   0.00,  5.250E+04,  6.10E-03,   0.75,  -1.024E+04,
+            2.30E+13,  -1.00,  1.290E+05,  5.13E+05,  -1.00,   0.000E+00,
+            7.00E+15,  -1.60,  1.132E+05,  4.27E+08,  -1.60,   0.000E+00,
+            2.00E+15,  -1.50,  5.950E+04,  2.00E+06,  -1.00,   0.000E+00,
+            5.00E+09,   0.00,  7.550E+04,  4.27E+03,   0.00,   0.000E+00,
+            2.86E+05,   0.50,  5.363E+04,  2.60E+04,   0.50,   0.000E+00,
+            2.33E+03,   0.50,  6.571E+04,  4.60E+06,  -0.25,   0.000E+00,
+            3.90E+07,  -0.18,  6.920E+04,  1.34E+08,  -0.43,   0.000E+00,
+            6.40E+11,  -1.00,  3.830E+04,  1.39E+11,  -1.00,   0.000E+00,
+            4.59E+02,   0.50,  1.207E+04,  9.90E+06,  -0.25,   0.000E+00,
+            8.40E+06,   0.00,  1.945E+04,  2.68E+05,   0.50,   0.000E+00,
+            1.70E+07,   0.00,  2.650E+04,  3.33E+04,   0.50,   2.250E+04
+        };
+
+        for (int i = 0; i < 192; ++ i)
+        {
+            reactionCoef[i] = stoichData[i];
+        }
+        for (int i = 0; i < 96; ++ i)
+        {
+            collisionCoef[i] = collisionData[i];
+        }
+        for (int i = 0; i < 72; ++ i)
+        {
+            rateCoef[i] = rateData[i];
+        }
+    }
+    else  //94��Park������
+    {
+        //! O,  O2, NO, N,  N2, C,  CO, CO2.
+        int stoichData[192] = {
+            0,  0,  0,  0,  0,  0,  0,  1,
+            0,  0,  0,  0,  0,  0,  1,  0,
+            0,  0,  0,  0,  1,  0,  0,  0,
+            0,  1,  0,  0,  0,  0,  0,  0,
+            0,  0,  1,  0,  0,  0,  0,  0,
+            0,  0,  0,  1,  0,  0,  1,  0,
+            0,  0,  0,  0,  0,  0,  2,  0,
+            1,  0,  0,  0,  0,  0,  1,  0,
+            1,  0,  0,  0,  1,  0,  0,  0,
+            0,  0,  1,  0,  0,  0,  1,  0,
+            1,  0,  1,  0,  0,  0,  0,  0,
+            1,  0,  0,  0,  0,  0,  0,  1,
+            1,  0,  0,  0,  0,  0,  1,  0,
+            1,  0,  0,  0,  0,  1,  0,  0,
+            0,  0,  0,  2,  0,  0,  0,  0,
+            2,  0,  0,  0,  0,  0,  0,  0,
+            1,  0,  0,  1,  0,  0,  0,  0,
+            0,  0,  1,  0,  0,  1,  0,  0,
+            0,  0,  0,  0,  0,  1,  0,  1,
+            0,  1,  0,  0,  0,  1,  0,  0,
+            0,  0,  1,  1,  0,  0,  0,  0,
+            0,  0,  0,  1,  0,  0,  0,  1,
+            0,  1,  0,  1,  0,  0,  0,  0,
+            0,  1,  0,  0,  0,  0,  1,  0
+        };
+        RDouble collisionData[96] = {
+            2.03,  1.00,  1.00,  1.00,  1.00,  2.03,  1.00,  1.00,//1
+            1.48,  1.00,  1.00,  14.80, 1.00,  1.48,  1.00,  1.00,//2
+            4.28,  1.00,  1.00,  4.28,  1.00,  4.28,  1.00,  1.00,
+            5.00,  1.00,  1.00,  5.00,  1.00,  5.00,  1.00,  1.00,//3
+            22.00, 1.00,  22.00, 22.00, 1.00,  22.00, 1.00,  22.00,
+            0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,
+            0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,//4
+            0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,//5
+            0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,
+            0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,
+            0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,
+            0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00 //6
+        };
+        RDouble rateData[72] = {
+            6.90E+15,  -1.50,  6.328E+04,  1.14E+05,  -0.75,   0.000E+00,
+            2.30E+14,  -1.00,  1.290E+05,  5.13E+06,  -1.00,   0.000E+00,
+            7.00E+15,  -1.60,  1.132E+05,  4.27E+08,  -1.60,   0.000E+00,
+            2.00E+15,  -1.50,  5.975E+04,  2.00E+06,  -1.00,   0.000E+00,
+            5.00E+09,   0.00,  7.550E+04,  4.27E+03,   0.00,   0.000E+00,
+            2.86E+05,   0.50,  5.363E+04,  2.60E+04,   0.50,   0.000E+00,
+            2.33E+03,   0.50,  6.571E+04,  4.60E+06,  -0.25,   0.000E+00,
+            3.90E+07,  -0.18,  6.920E+04,  1.34E+08,  -0.43,   0.000E+00,
+            6.40E+11,  -1.00,  3.830E+04,  1.39E+11,  -1.00,   0.000E+00,
+            4.59E+02,   0.50,  1.207E+04,  9.90E+06,  -0.25,   0.000E+00,
+            8.40E+06,   0.00,  1.945E+04,  2.68E+05,   0.50,   0.000E+00,
+            2.10E+07,   0.00,  2.780E+04,  4.11E+04,   0.50,   2.380E+04
+        };
+
+        for (int i = 0; i < 192; ++ i)
+        {
+            reactionCoef[i] = stoichData[i];
+        }
+        for (int i = 0; i < 96; ++ i)
+        {
+            collisionCoef[i] = collisionData[i];
+        }
+        for (int i = 0; i < 72; ++ i)
+        {
+            rateCoef[i] = rateData[i];
+        }
+    }
+}
+
+void ChemicalReactions::GenerateMarsMcKenzie8S12RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef)
+{
+    //Set the types of chemical reactions.
+    int typeOfReaction[12] = {0, 0, 0, 0, 0, 2, 2, 2, 2, 2, 2, 2};
+    for (int r = 0; r < 12; ++ r)
+    {
+        reactionType[r][0] = 0;
+        reactionType[r][1] = typeOfReaction[r];
+    }
+    //The following chemical reactions are collision reactions.
+    reactionType[0][0] = 1;
+    reactionType[1][0] = 1;
+    reactionType[2][0] = 1;
+    reactionType[3][0] = 1;
+    reactionType[4][0] = 1;
+
+    //! O, O2, NO, N, N2, C, CO, CO2.
+    int stoichData[192] = {
+        0,  0,  0,  0,  0,  0,  0,  1,
+        0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  0,  0,  1,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  1,  0,
+        0,  0,  0,  0,  0,  0,  2,  0,
+        1,  0,  0,  0,  0,  0,  1,  0,
+        1,  0,  0,  0,  1,  0,  0,  0,
+        0,  0,  1,  0,  0,  0,  1,  0,
+        1,  0,  1,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  1,
+        1,  0,  0,  0,  0,  0,  1,  0,
+        1,  0,  0,  0,  0,  1,  0,  0,
+        0,  0,  0,  2,  0,  0,  0,  0,
+        2,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  1,  0,  0,  0,  0,
+        0,  0,  1,  0,  0,  1,  0,  0,
+        0,  0,  0,  0,  0,  1,  0,  1,
+        0,  1,  0,  0,  0,  1,  0,  0,
+        0,  0,  1,  1,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  1,
+        0,  1,  0,  1,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  1,  0
+    };
+    RDouble collisionData[96] = {
+        1.00,  1.00,  1.00,  1.00,  1.00,  1.00,  1.00,  1.00,
+        14.80, 1.00,  1.00,  14.80, 1.00,  14.80, 1.95,  1.00,
+        4.28,  1.00,  1.00,  4.28,  1.00,  4.28,  1.00,  1.00,
+        5.00,  1.00,  1.00,  5.00,  1.00,  5.00,  1.00,  1.00,
+        22.00, 1.00,  22.00, 22.00, 1.00,  22.00, 1.00,  22.00,
+        0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,
+        0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,
+        0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,
+        0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,
+        0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,
+        0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,
+        0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00,  0.00
+    };
+    RDouble rateData[72] = {
+        1.20E+05,   0.50,   3.434E+04,   2.00E-06,   1.25,  -2.840E+04,
+        4.48E+13,  -1.00,   1.289E+05,   1.00E+06,  -1.00,   0.000E+00,
+        2.46E+13,  -1.00,   1.132E+05,   1.50E+06,  -1.00,   0.000E+00,
+        9.05E+12,  -1.00,   5.937E+04,   9.00E+03,  -0.50,   0.000E+00,
+        4.09E+12,  -1.00,   7.533E+04,   3.50E+06,  -1.00,   0.000E+00,
+        2.86E+05,   0.50,   5.360E+04,   2.60E+04,   0.50,   0.000E+00,
+        2.33E+03,   0.50,   6.571E+04,   4.60E+06,  -0.25,   0.000E+00,
+        2.73E+06,   0.50,   6.954E+04,   9.40E+06,   0.25,   0.000E+00,
+        7.35E+05,   0.50,   3.794E+04,   1.60E+05,   0.50,   0.000E+00,
+        4.59E+02,   0.50,   1.207E+04,   9.90E+06,  -0.25,   0.000E+00,
+        2.98E+05,   0.50,   1.946E+04,   9.50E+03,   1.00,   0.000E+00,
+        2.54E+05,   0.50,   2.769E+04,   5.00E+02,   1.00,   2.390E+04,
+    };
+
+    for (int i = 0; i < 192; ++ i)
+    {
+        reactionCoef[i] = stoichData[i];
+    }
+    for (int i = 0; i < 96; ++ i)
+    {
+        collisionCoef[i] = collisionData[i];
+    }
+    for (int i = 0; i < 72; ++ i)
+    {
+        rateCoef[i] = rateData[i];
+    }
+}
+
+void ChemicalReactions::GenerateGuptaAblation16S36RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef)
+{
+    //Set the types of chemical reactions.
+    int typeOfReaction[36] = {0, 0, 0, 0, 0, 2, 2, 4, 4, 4, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 5, 5, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2};
+    for (int r = 0; r < 36; ++ r)
+    {
+        reactionType[r][0] = 0;
+        reactionType[r][1] = typeOfReaction[r];
+    }
+    //The following chemical reactions are collision reactions.
+    reactionType[0][0] = 1;
+    reactionType[1][0] = 1;
+    reactionType[3][0] = 1;
+    reactionType[14][0] = 1;
+    reactionType[20][0] = 1;
+    reactionType[21][0] = 1;
+    reactionType[22][0] = 1;
+    reactionType[23][0] = 1;
+    //������
+    int stoichData[1292] = {
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  0,  2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  1,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  1,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  1,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  1,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  1,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  2,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  2,  0,  0,  0,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  3,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  1,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  2,
+        0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  2,
+        0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        0,  1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  1,
+        0,  0,  1,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        0,  0,  1,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  1,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  1,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  2,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  2,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  1,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0
+    };
+             
+    RDouble collisionData[646] = {
+        25,  9,  1,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  2,  0,
+        1,  1,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0, 2.5, 0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        20,  1, 20, 20,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  4,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  1,  1,  1,  0,  0,  0,  0,  0,  1,  1,  1,  1,  1,  1,  1,  0,
+        2,  2,  2,  2,  0,  0,  0,  0,  0,  0,  0,  0,  2,  5,  0,  2,  0,
+        1,  1,  1,  1,  0,  0,  0,  0,  0,  1,  1,  1,  1,  1,  1,  1,  0,
+        1,  1,  1,  1,  0,  0,  0,  0,  0,  1,  1,  1,  1,  1,  1,  1,  0,
+        1,  1,  1,  1,  0,  0,  0,  0,  0,  1,  1,  1,  1,  1,  1,  1,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0
+    };
+            
+    RDouble rateData[228] = { 
+        3.6100E+12, -1.00,  5.9400E+04,  3.0100E+03, -0.50,  0.0000E+00,
+        1.9200E+11, -0.50,  1.1310E+05,  1.0900E+04, -0.50,  0.0000E+00,
+        4.1500E+16, -1.50,  1.1310E+05,  2.3200E+09, -1.50,  0.0000E+00,
+        3.9700E+14, -1.50,  7.5600E+04,  1.0100E+08, -1.50,  0.0000E+00,
+        3.1800E+03,  1.00,  1.9700E+04,  9.6300E+05,  0.50,  3.6000E+03,
+        6.7500E+07,  0.00,  3.7500E+04,  1.5000E+07,  0.00,  0.0000E+00,
+        9.0300E+03,  0.50,  3.2400E+04,  1.8000E+13, -1.00,  0.0000E+00,
+        3.6000E+25, -2.91,  1.5800E+05,  2.2000E+28, -4.50,  0.0000E+00,
+        1.1000E+26, -3.14,  1.6900E+05,  2.2000E+28, -4.50,  0.0000E+00,
+        1.6000E+11, -0.98,  8.0800E+04,  8.0200E+15, -1.50,  0.0000E+00,
+        2.9200E+12, -1.11,  2.8000E+04,  7.8000E+05,  0.50,  0.0000E+00,
+        2.0200E+05,  0.81,  1.3000E+04,  7.8000E+05,  0.50,  0.0000E+00,
+        1.4000E+07,  0.00,  6.7800E+04,  1.5000E+16, -1.50,  0.0000E+00,
+        1.3800E+14, -1.84,  1.4100E+05,  1.0000E+12, -2.50,  0.0000E+00,
+        2.2000E+09, -0.35,  1.0800E+05,  2.2000E+14, -2.50,  0.0000E+00,
+        3.6300E+09, -0.60,  5.0800E+04,  1.5000E+07,  0.00,  0.0000E+00,
+        3.4000E+13, -2.00,  2.3000E+04,  2.4800E+13, -2.20,  0.0000E+00,
+        1.0000E+13, -0.93,  6.1000E+04,  4.8000E+08,  0.00,  0.0000E+00,
+        1.8000E+09,  0.17,  3.3000E+04,  1.8000E+07,  0.50,  0.0000E+00,
+        1.3400E+07,  0.31,  7.7270E+04,  1.0000E+08,  0.00,  0.0000E+00,
+        1.6000E+10,  1.00,  8.7480E+04,  1.0000E+04, -0.50,  0.0000E+00,
+        1.2000E+05,  0.50,  3.6900E+04,  1.5000E-06,  1.25, -2.6400E+04,
+        4.5000E+12, -1.00,  7.0930E+04,  1.0000E+04, -0.50,  0.0000E+00,
+        8.5000E+13, -1.00,  1.2900E+05,  2.4000E+06, -1.00,  0.0000E+00,
+        5.2000E+13, -1.00,  9.4100E+04,  7.4000E+06, -1.00,  4.1200E+03,
+        1.7000E+03,  1.50,  1.9580E+04,  5.0000E+05,  0.50,  3.0200E+03,
+        1.2000E+07,  0.00,  4.3200E+04,  5.0000E+05,  0.50,  2.0100E+03,
+        3.9000E+07, -0.18,  6.9200E+04,  1.3400E+08, -0.43,  0.0000E+00,
+        1.0000E+06,  0.00,  1.4500E+04,  6.0000E+05,  0.00,  0.0000E+00,
+        1.7000E+07,  0.00,  2.6500E+04,  3.3300E+04,  0.50,  2.2500E+04,
+        4.1000E+04,  0.50,  5.9800E+04,  5.0000E+05,  0.50,  2.0100E+03,
+        2.0000E+04,  1.00,  3.1600E+04,  7.7000E+03,  1.00,  8.3300E+03,
+        5.0000E+07,  0.00,  1.3000E+04,  5.0000E+04,  0.50,  5.0000E+03,
+        2.0000E+04,  1.00,  4.5800E+04,  2.7000E+04,  0.75,  7.1000E+03,
+        9.0000E+10, -1.00,  5.3630E+04,  1.0000E+10, -1.00,  0.0000E+00,
+        2.3300E+03,  0.50,  6.5710E+04,  4.6000E+06, -0.25,  0.0000E+00,
+        9.2000E+05,  0.75,  1.6330E+05,  3.8000E+07,  0.00,  3.6200E+04,
+        1.0000E-03,  2.00,  2.1000E+04,  1.8000E+01,  1.25,  8.7500E+03
+    };
+
+    for (int i = 0; i < 1292; ++ i)
+    {
+        reactionCoef[i] = stoichData[i];
+    }
+    for (int i = 0; i < 646; ++ i)
+    {
+        collisionCoef[i] = collisionData[i];
+    }
+    for (int i = 0; i < 228; ++ i)
+    {
+        rateCoef[i] = rateData[i];
+    }
+}
+
+void ChemicalReactions::GenerateParkAblation16S38RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef)
+{
+    //Set the types of chemical reactions.
+    int typeOfReaction[38] = {0, 0, 0, 0, 0, 0, 0, 2, 2, 4, 4, 4, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 5, 5, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2};
+    for (int r = 0; r < 38; ++ r)
+    {
+        reactionType[r][0] = 0;
+        reactionType[r][1] = typeOfReaction[r];
+    }
+    //The following chemical reactions are collision reactions.
+    reactionType[0][0] = 1;
+    reactionType[1][0] = 1;
+    reactionType[2][0] = 1;
+    reactionType[3][0] = 1;
+    reactionType[4][0] = 1;
+    reactionType[5][0] = 1;
+    reactionType[6][0] = 1;
+
+    int stoichData[1216] = {
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        1,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  0,  1,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  1,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        1,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  0,  1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  1,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  2,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  1,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  1,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  2,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  1,  0,  0,
+        0,  0,  0,  2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  2,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  1,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  1,
+        0,  1,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  2,
+        0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  2,
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  1,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0
+    };
+
+    RDouble collisionData[608] = {
+        4.28,  1,  1, 4.28, 4.28,  1,  1, 4.28,  1, 4.28,  1,  1,  1,  1,  1,  1714.3,
+        5,  1,  1,    5,    5,  1,  1,    5,  1,    5,  1,  1,  1,  1,  1,  0,
+        22,  1, 22,   22,   22,  1,  1,   22,  1,   22,  1,  1, 22,  1,  1,  0,
+        2.03,  1,  1, 2.03, 2.03,  1,  1, 2.03,  1, 2.03,  1,  1,  1,  1,  1,  0,
+        1.48,  1,  1, 1.48, 1.48,  1,  1, 1.48,  1, 1.48,  1,  1,  1,  1,  1,  0,
+        1,  1,  1,    1,    1,  1,  1,    1,  1,    1,  1,  1,  1,  1,  1,  0,
+        1,  1,  1,    1,    1,  1,  1,    1,  1,    1,  1,  1,  1,  1,  1,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,    0,  0,  0,  0,  0,  0,  0
+};
+
+    RDouble rateData[228] = {
+        7.0000E+15, -1.60,  1.1392E+05,  7.4287E+04, -0.60,  0.0000E+00,
+        2.0000E+15, -1.50,  6.0050E+04,  2.6705E+04, -0.50,  0.0000E+00,
+        5.0000E+09,  0.00,  7.6022E+04,  2.5807E-01,  1.00,  0.0000E+00,
+        6.9000E+15, -1.50,  6.3275E+04,  9.5000E+04, -0.75,  0.0000E+00,
+        2.3000E+14, -1.00,  1.2900E+05,  5.1300E+06, -1.00,  0.0000E+00,
+        3.7000E+08,  0.00,  6.9900E+04,  8.2000E-01,  0.50,  0.0000E+00,
+        2.5000E+08,  0.00,  7.1000E+04,  3.0800E+04, -0.50,  0.0000E+00,
+        8.4000E+06,  0.00,  1.9450E+04,  3.2500E+07,  0.00,  3.4780E+03,
+        6.4000E+11, -1.00,  3.8400E+04,  1.3200E+11, -1.00,  4.9700E+02,
+        8.8000E+02,  1.00,  3.1900E+04,  3.7000E+06,  1.00,  0.0000E+00,
+        7.1000E-04,  2.70,  8.0600E+04,  2.1400E+00,  2.70,  0.0000E+00,
+        4.4000E+00,  1.50,  6.7500E+04,  4.8000E+04,  1.50,  0.0000E+00,
+        1.0000E+06,  0.50,  7.7200E+04,  2.3400E+05,  0.50,  0.0000E+00,
+        1.0000E+06,  0.50,  1.2200E+04,  3.9000E+06,  0.19,  0.0000E+00,
+        8.7000E+07,  0.14,  2.8600E+04,  2.8400E+07,  0.14,  0.0000E+00,
+        1.4000E-01,  1.90,  2.6600E+04,  1.3300E-01,  1.90,  0.0000E+00,
+        9.9000E+06,  0.00,  4.0700E+04,  2.8600E+06,  0.00,  0.0000E+00,
+        4.0000E+06, -0.09,  1.8000E+03,  5.3100E+06, -0.09,  0.0000E+00,
+        3.4000E+07, -1.08,  1.2800E+04,  4.0600E+07, -1.08,  0.0000E+00,
+        2.4000E+07,  0.41,  3.2600E+04,  4.4400E+06,  0.41,  0.0000E+00,
+        7.2000E+06,  0.29,  4.8600E+04,  5.1500E+06,  0.29,  0.0000E+00,
+        9.1000E+05,  0.36,  2.2800E+04,  1.9800E+05,  0.36,  5.9850E+02,
+        7.2000E+07,  0.00,  3.5500E+04,  1.8700E+07,  0.00,  0.0000E+00,
+        3.9000E+27, -3.78,  1.5850E+05,  2.0800E+20, -2.78,  0.0000E+00,
+        2.5000E+28, -3.82,  1.6860E+05,  1.0600E+21, -2.82,  0.0000E+00,
+        3.9000E+07, -0.18,  6.9200E+04,  1.3400E+08, -0.43,  0.0000E+00,
+        2.8600E+05,  0.50,  5.3630E+04,  2.6000E+04,  0.50,  0.0000E+00,
+        1.0000E+08,  0.00,  3.8600E+04,  1.3500E+08, -0.25,  0.0000E+00,
+        1.0000E-03,  2.00,  9.2000E+04,  3.1000E-04,  1.75,  1.5600E+04,
+        4.5900E+02,  0.50,  1.2070E+04,  9.9000E+00, -0.25,  0.0000E+00,
+        2.3300E+03,  0.50,  6.5710E+04,  4.6000E+06, -0.25,  0.0000E+00,
+        1.1000E+08, -0.11,  2.3200E+04,  4.2300E+07, -0.11,  0.0000E+00,
+        2.1000E+07,  0.00,  2.7800E+04,  4.1100E+04,  0.50,  2.3800E+04,
+        3.0000E+02,  1.00,  4.9600E+04,  6.7000E-01,  1.25,  6.9600E+03,
+        1.6000E+07,  0.10,  1.4600E+04,  9.6000E+06,  0.10,  0.0000E+00,
+        2.0000E+11, -1.00,  5.8000E+04,  2.5000E+10, -1.00,  0.0000E+00,
+        9.2000E+05,  0.75,  1.6330E+05,  3.8000E+07,  0.00,  3.6200E+04,
+        5.0000E+07,  0.00,  1.3000E+04,  1.0000E+08,  0.00,  0.0000E+00
+};
+
+for (int i = 0; i < 1216; ++ i)
+{
+    reactionCoef[i] = stoichData[i];
+}
+    for (int i = 0; i < 608; ++ i)
+{
+    collisionCoef[i] = collisionData[i];
+}
+for (int i = 0; i < 228; ++ i)
+{
+    rateCoef[i] = rateData[i];
+}
+}
+
+void ChemicalReactions::GenerateDunnKangAblation16S42RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef)
+{
+    //Set the types of chemical reactions.
+    int typeOfReaction[42] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 2, 4, 4, 4, 4, 5, 5, 3, 3, 3, 3, 3, 4, 4, 3, 3, 0, 0, 0, 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2};
+    for (int r = 0; r < 42; ++ r)
+    {
+        reactionType[r][0] = 0;
+        reactionType[r][1] = typeOfReaction[r];
+    }
+    //The following chemical reactions are collision reactions.
+    reactionType[0][0] = 1;
+    reactionType[4][0] = 1;
+    reactionType[7][0] = 1;
+    reactionType[8][0] = 1;
+    reactionType[26][0] = 1;
+    reactionType[27][0] = 1;
+    reactionType[28][0] = 1;
+    reactionType[29][0] = 1;
+
+    int stoichData[1344] = {
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  2,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  1,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        0,  0,  0,  1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  0,  2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  1,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  1,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  1,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  2,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  2,  0,  0,  0,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        3,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        2,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  0,  2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  3,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  1,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        0,  0,  1,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  1,  1,
+        0,  1,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  2,
+        0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  2,
+        0,  0,  1,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  1,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  1,
+        0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        0,  0,  1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  2,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  1,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,
+    };
+
+    RDouble collisionData[672] = {
+        0,  0,  1,  1,  0,  0,  0,  0,  0,  1,  1,  2,  5,  1,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  1,  1,  0,  0,  0,  0,  0,  0,  1,  1,  2,  5,  1,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  1,  1,  2,  5,  1,  1,  0,
+        1,  0,  1,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        2,  2,  2,  2,  0,  0,  0,  0,  0,  1,  1,  2,  5,  1,  2,  0,
+        1,  1,  1,  1,  0,  0,  0,  0,  0,  1,  1,  1,  1,  1,  1,  0,
+        1,  1,  1,  1,  0,  0,  0,  0,  0,  1,  1,  1,  1,  1,  1,  0,
+        1,  1,  1,  1,  0,  0,  0,  0,  0,  1,  1,  1,  1,  1,  1,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0
+    };
+
+    RDouble rateData[252] = {
+        3.6000E+12, -1.00,  5.9500E+04,  3.0000E+03, -0.50,  0.0000E+00,
+        9.0000E+13, -1.00,  5.9500E+04,  7.5000E+04, -0.50,  0.0000E+00,
+        3.2400E+13, -1.00,  5.9500E+04,  2.7000E+04, -0.50,  0.0000E+00,
+        7.2000E+12, -1.00,  5.9500E+04,  6.0000E+03, -0.50,  0.0000E+00,
+        1.9000E+11, -0.50,  1.1300E+05,  1.1000E+04, -0.50,  0.0000E+00,
+        4.0850E+16, -1.50,  1.1300E+05,  2.2700E+09, -1.50,  0.0000E+00,
+        4.7000E+11, -0.50,  1.1300E+05,  2.7200E+04, -0.50,  0.0000E+00,
+        3.9000E+14, -1.50,  7.5500E+04,  1.0000E+08, -1.50,  0.0000E+00,
+        7.8000E+14, -1.50,  7.5500E+04,  2.0000E+08, -1.50,  0.0000E+00,
+        3.2000E+03,  1.00,  1.9700E+04,  1.3000E+04,  1.00,  3.5800E+03,
+        7.0000E+07,  0.00,  3.8000E+04,  1.5600E+07,  0.00,  0.0000E+00,
+        1.4000E+00,  1.50,  3.1900E+04,  6.7000E+15, -1.50,  0.0000E+00,
+        1.3800E+14, -1.84,  1.4100E+05,  1.0000E+12, -2.50,  0.0000E+00,
+        2.2000E+09, -0.35,  1.0800E+05,  2.2000E+14, -2.50,  0.0000E+00,
+        8.8000E+09, -0.35,  1.0800E+05,  8.8000E+14, -2.50,  0.0000E+00,
+        3.6000E+25, -2.91,  1.5800E+05,  2.2000E+28, -4.50,  0.0000E+00,
+        1.1000E+26, -3.14,  1.6900E+05,  2.2000E+28, -4.50,  0.0000E+00,
+        1.0000E+13, -0.93,  6.1000E+04,  4.8000E+08,  0.00,  0.0000E+00,
+        1.3400E+07,  0.31,  7.7270E+04,  1.0000E+08,  0.00,  0.0000E+00,
+        3.6300E+09, -0.60,  5.0800E+04,  1.5000E+07,  0.00,  0.0000E+00,
+        3.4000E+13, -2.00,  2.3000E+04,  2.4800E+13, -2.20,  0.0000E+00,
+        2.0200E+05,  0.81,  1.3000E+04,  7.8000E+05,  0.50,  0.0000E+00,
+        1.4000E+07,  0.00,  6.7800E+04,  1.5000E+16, -1.50,  0.0000E+00,
+        1.6000E+11, -0.98,  8.0800E+04,  8.0000E+15, -1.50,  0.0000E+00,
+        1.8000E+09,  0.17,  3.3000E+04,  1.8000E+07,  0.50,  0.0000E+00,
+        2.9200E+12, -1.11,  2.8000E+04,  7.8000E+05,  0.50,  0.0000E+00,
+        1.2000E+05,  0.50,  3.6850E+04,  1.5000E-06,  1.25, -2.6430E+04,
+        4.5000E+12, -1.00,  7.0930E+04,  1.0000E+04, -0.50,  0.0000E+00,
+        8.5000E+13, -1.00,  1.2900E+05,  2.4000E+06, -1.00,  0.0000E+00,
+        5.2000E+13, -1.00,  9.4100E+04,  7.4000E+06, -1.00,  4.1200E+03,
+        2.0000E+04,  1.00,  6.9500E+04,  1.0000E+04,  1.00,  0.0000E+00,
+        1.0000E+06,  0.00,  1.4500E+04,  6.0000E+05,  0.00,  0.0000E+00,
+        3.0000E+02,  1.00,  1.8210E+04,  5.2000E-01,  1.50,  1.4300E+04,
+        4.1000E+04,  0.50,  5.9800E+04,  5.0000E+05,  0.50,  2.0100E+03,
+        2.0000E+04,  1.00,  3.1600E+04,  7.7000E+03,  1.00,  8.3300E+03,
+        1.0000E-03,  2.00,  9.2010E+04,  3.1000E-04,  1.75,  1.5590E+04,
+        2.0000E+04,  1.00,  4.5800E+04,  2.7000E+04,  0.75,  7.1000E+03,
+        9.0000E+10, -1.00,  5.3200E+04,  1.0000E+10, -1.00,  0.0000E+00,
+        3.0000E+02,  1.00,  4.9560E+04,  6.7000E-01,  1.25,  6.9600E+03,
+        1.0000E-03,  2.00,  7.2390E+04,  2.0000E+00,  1.25,  6.9700E+03,
+        9.2000E+05,  0.75,  1.6330E+05,  3.8000E+07,  0.00,  3.6200E+04,
+        1.0000E-03,  2.00,  2.1000E+04,  1.8000E+01,  1.25,  8.7500E+03
+
+    };
+
+    for (int i = 0; i < 1344; ++ i)
+    {
+        reactionCoef[i] = stoichData[i];
+    }
+    for (int i = 0; i < 672; ++ i)
+    {
+        collisionCoef[i] = collisionData[i];
+    }
+    for (int i = 0; i < 252; ++ i)
+    {
+        rateCoef[i] = rateData[i];
+    }
+}
+
+void ChemicalReactions::GenerateCombustionGas12S20RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef)
+{
+    //Set the types of chemical reactions.
+    int typeOfReaction[20] = {0, 0, 0, 0, 0, 0, 0, 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2};
+    for (int r = 0; r < 20; ++ r)
+    {
+        reactionType[r][0] = 0;
+        reactionType[r][1] = typeOfReaction[r];
+    }
+
+    //The following chemical reactions are collision reactions.
+    reactionType[0][0] = 1;
+    reactionType[1][0] = 1;
+    reactionType[2][0] = 1;
+    reactionType[3][0] = 1;
+    reactionType[4][0] = 1;
+    reactionType[5][0] = 1;
+    reactionType[6][0] = 1;
+    reactionType[7][0] = 1;
+
+    int stoichData[480] = {
+        0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,
+        0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,
+        1,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,
+        0,  0,  1,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  1,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  2,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  1,  0,  0,  0,  1,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  1,  1,  0,  0,
+        0,  1,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  2,  0,  0,
+        1,  0,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  1,  0,  1,  0,  0,
+        1,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  2,  0,  0,  0,  0,  0,  0,  0,  0,
+        2,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  2,  0,  0,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  1,  0,  0,  0,  0,
+        0,  0,  1,  1,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  1,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  0,  1,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  1,  0,  0,  1,  0,  0,  0,  0,  0,
+        0,  1,  0,  0,  1,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  1,  0,  1,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  1,  0,  1,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  1,  1,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  1,  0,  0,  1,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  1,  0,  1,  0,  0,
+        1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  1,  0
+    };
+
+    RDouble collisionData[240] = {
+        2,  1,  1,    2,    2,  1,  1,    2,  1,  1,  1,  1,
+        2,  2,  2,    2,    2,  2,  5,    2,  2,  2,  8,  2,
+        1.48,  1,  1, 1.48, 1.48,  1,  1, 1.48,  1,  1,  1,  1,
+        4.28,  1,  1, 4.28, 4.28,  1,  1, 4.28,  1,  1,  1,  1,
+        5,  1,  1,    5,    5,  1,  1,    5,  1,  1,  1,  1,
+        22,  1, 22,   22,   22,  1, 22,   22,  1,  1,  1,  1,
+        1,  1,  1,    1,    1,  1,  1,    1,  1,  1,  1,  1,
+        5,  2,  2,    2,    2,  2,  5,    5,  2,  2,  5,  2,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,  0,  0,  0,
+        0,  0,  0,    0,    0,  0,  0,    0,  0,  0,  0,  0
+    };
+
+    RDouble rateData[120] = {
+        6.900E+15, -1.50,  6.3275E+04,  9.500E+04,  -0.75,  0.000E+00,
+        4.800E+09,  0.00,  5.2920E+04,  2.200E+10,  -2.00,  0.000E+00,
+        2.300E+14, -1.00,  1.2900E+05,  5.130E+06,  -1.00,  0.000E+00,
+        7.000E+15, -1.60,  1.1320E+05,  7.430E+04,  -0.60,  0.000E+00,
+        2.000E+15, -1.50,  5.9750E+04,  2.670E+04,  -0.50,  0.000E+00,
+        5.000E+09,  0.00,  7.5500E+04,  2.580E-01,   1.00,  0.000E+00,
+        2.200E+08,  0.00,  4.8300E+04,  1.000E+05,   0.00,  0.000E+00,
+        6.960E+07,  0.21,  5.1000E+04,  4.720E+06,  -1.00,  0.000E+00,
+        6.400E+11, -1.00,  3.8370E+04,  1.320E+11,  -1.00,  4.970E+02,
+        8.400E+06,  0.00,  1.9450E+04,  3.250E+07,   0.00,  3.478E+03,
+        2.100E+07,  0.00,  2.7800E+04,  4.110E+04,   0.50,  2.380E+04,
+        4.590E+02,  0.50,  1.2070E+04,  9.900E+06,  -0.25,  0.000E+00,
+        3.900E+07, -0.18,  6.9200E+04,  1.340E+08,  -0.43,  0.000E+00,
+        2.860E+05,  0.50,  5.3630E+04,  2.600E+04,   0.50,  0.000E+00,
+        2.330E+03,  0.50,  6.5710E+04,  4.600E+06,  -0.25,  0.000E+00,
+        1.500E+05,  0.00,  1.0700E+02,  1.410E+10,  -0.80,  1.240E+04,
+        5.000E+06,  0.00,  2.3200E+03,  1.850E+07,   0.01,  9.800E+03,
+        5.000E+08,  0.00,  8.4300E+03,  4.170E+06,   0.27,  4.910E+01,
+        4.000E+07,  0.00,  5.1400E+03,  1.290E+07,   0.03,  4.160E+03,
+        7.600E+06,  0.00,  5.0400E+02,  8.650E+07,  -0.02,  8.930E+03
+    };
+
+    for (int i = 0; i < 480; ++ i)
+    {
+        reactionCoef[i] = stoichData[i];
+    }
+    for (int i = 0; i < 240; ++ i)
+    {
+        collisionCoef[i] = collisionData[i];
+    }
+    for (int i = 0; i < 120; ++ i)
+    {
+        rateCoef[i] = rateData[i];
+    }
+}
+
+void ChemicalReactions::GenerateGasMixture2S1RData(int *reactionCoef, RDouble *collisionCoef, RDouble *rateCoef)
+{
+
+    reactionType[0][0] = 0;
+    reactionType[0][1] = 2;
+
+    //int stoichData[16] = {
+    //    1,  1,  1,  1,  1,  1,  1,  1,
+    //    1,  1,  1,  1,  1,  1,  1,  1
+    //};
+    int stoichData[38] = {
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0
+    };
+
+    RDouble collisionData[19] = {
+        0.0,  0.0,  0.0,  0.0, 0.0,  0.0,  0.0,  0.0,  0.0,  0.0,  0.0,  0.0,  0.0,  0.0,  0.0,  0.0,  0.0,  0.0,  0.0
+    };
+
+    RDouble rateData[6] ={
+        0.0,  0.0,  0.0,  0.0, 0.0,  0.0
+    };
+
+    for (int i = 0; i < 38; ++ i)
+    {
+        reactionCoef[i] = stoichData[i];
+    }
+
+    for (int i = 0; i < 19; ++ i)
+    {
+        collisionCoef[i] = collisionData[i];
+    }
+
+    for (int i = 0; i < 6; ++ i)
+    {
+        rateCoef[i] = rateData[i];
+    }
+}
+
+void ChemicalReactions::Initialization()
+{
+    for (int r = 0; r < this->nReaction; ++ r)
+    {
+        reactionType[r][0] = 0;
+        reactionType[r][1] = 0;
+        for (int s = 0; s < nSpecies; ++ s)
+        {
+            stoichForward[r][s] = 0;
+            stoichBackward[r][s] = 0;
+            collisionCoef[r][s] = 0.0;
+        }
+        for (int s = 0; s < 6; ++ s)
+        {
+            reactionData[r][s] = 0.0;
+        }
+    }
+}
+
+void ChemicalReactions::CreateBasicChemicalReactionModel(int nType/* = 0*/)
+{
+    this->SetChemicalReactionType(nType);
+    int ns = 11, nr = 20;
+    if (nType == 0) //The Gupta model.
+    {
+        ns = 11;
+        nr = 20;
+    }
+    else if (nType == 1) //The Park model.
+    {
+        ns = 11;
+        nr = 48;
+    }
+    else if (nType == 2) //The Dunn-Kang model.
+    {
+        ns = 11;
+        nr = 26;
+    }
+    else if (nType == 3) //The Park model of Mars.
+    {
+        ns = 8;
+        nr = 12;
+    }
+    else if (nType == 4) //The McKenzie model of Mars.
+    {
+        ns = 8;
+        nr = 12;
+    }
+    else if (nType == 5) //The Gupta model of Carbon material ablation.
+    {
+        ns = 16;
+        nr = 38;
+    }
+    else if (nType == 6) //The Park model of Carbon material ablation.
+    {
+        ns = 16;
+        nr = 38;
+    }
+    else if (nType == 7) //The Dunn-Kang model of Carbon material ablation.
+    {
+        ns = 16;
+        nr = 42;
+    }
+    else if (nType == 8) // The Combustion chamber Gas Model.
+    {
+        ns = 12;
+        nr = 20;
+    }
+    else if (nType == 9) // The mixed Gas Model.
+    {
+        ns = 19;
+        nr = 1;
+    }
+    else
+    {
+        ns = 11;
+        nr = 20;
+    }
+    //Allocate the memories.
+    this->SetChemicalModelInfo(ns, nr);
+    //Set the name list.
+    if (nType == 3 || nType == 4)    //! Mars Gas
+    {
+        speciesName[0] = "O";
+        speciesName[1] = "O2";
+        speciesName[2] = "NO";
+        speciesName[3] = "N";
+        speciesName[4] = "N2";
+        speciesName[5] = "C";
+        speciesName[6] = "CO";
+        speciesName[7] = "CO2";
+    }
+
+    else if (nType == 5 || nType == 6 ||  nType == 7)    //! Carbon material ablation.(Based on Earth Gas)
+    {
+        speciesName[0] = "O";
+        speciesName[1] = "O2";
+        speciesName[2] = "NO";
+        speciesName[3] = "N";
+        speciesName[4] = "O+";
+        speciesName[5] = "O2+";
+        speciesName[6] = "NO+";
+        speciesName[7] = "N+";
+        speciesName[8] = "N2+";
+        speciesName[9] = "C";
+        speciesName[10] = "C2";
+        speciesName[11] = "CO";
+        speciesName[12] = "CO2";
+        speciesName[13] = "CN";
+        speciesName[14] = "N2";
+        speciesName[15] = "e-";
+    }
+
+    else if (nType == 8)    //! Combustion Chamber Gas
+    {
+        speciesName[0] = "O";
+        speciesName[1] = "O2";
+        speciesName[2] = "NO";
+        speciesName[3] = "N";
+        speciesName[4] = "C";
+        speciesName[5] = "CO";
+        speciesName[6] = "CO2";
+        speciesName[7] = "H";
+        speciesName[8] = "H2";
+        speciesName[9] = "OH";
+        speciesName[10] = "H2O";
+        speciesName[11] = "N2";
+    }
+
+    else if (nType == 9)
+    {
+        speciesName[0] = "O2";
+        speciesName[1] = "NO";
+        speciesName[2] = "CO";
+        speciesName[3] = "CO2";
+        speciesName[4] = "H2";
+        speciesName[5] = "N2";
+        speciesName[6] = "Air";
+        speciesName[7] = "CH4";
+        speciesName[8] = "H2S";
+        speciesName[9] = "SO2";
+        speciesName[10] = "CL2";
+        speciesName[11] = "NH3";
+        speciesName[12] = "C2H2";
+        speciesName[13] = "C2H4";
+        speciesName[14] = "C2H6";
+        speciesName[15] = "C3H6";
+        speciesName[16] = "C3H8";
+        speciesName[17] = "C4H8";
+        speciesName[18] = "C4H10";
+    }
+
+    else    //! Earth Gas
+    {
+        speciesName[0] = "O";
+        speciesName[1] = "O2";
+        speciesName[2] = "NO";
+        speciesName[3] = "N";
+        speciesName[4] = "O+";
+        speciesName[5] = "O2+";
+        speciesName[6] = "NO+";
+        speciesName[7] = "N+";
+        speciesName[8] = "N2+";
+        speciesName[9] = "N2";
+        speciesName[10] = "e-";
+    }
+
+    int *reactionCoef = new int[2 * ns * nr];
+    RDouble *thirdBodyCoef = new RDouble[ns * nr];
+    RDouble *rateCoef = new RDouble[nr * 6];
+
+    if (nType == 0) //The Gupta model.
+    {
+        this->GenerateGupta11S20RData(reactionCoef, thirdBodyCoef, rateCoef);
+    }
+    else if (nType == 1) //The Park model.
+    {
+        this->GeneratePark11S48RData(reactionCoef, thirdBodyCoef, rateCoef);
+    }
+    else if (nType == 2) //The Dunn-Kang model.
+    {
+        this->GenerateDunnKang11S26RData(reactionCoef, thirdBodyCoef, rateCoef);
+    }
+    else if (nType == 3) //The Park model of Mars.
+    {
+        this->GenerateMarsPark8S12RData(reactionCoef, thirdBodyCoef, rateCoef);
+    }
+    else if (nType == 4) //The McKenzie model of Mars.
+    {
+        this->GenerateMarsMcKenzie8S12RData(reactionCoef, thirdBodyCoef, rateCoef);
+    }
+    else if (nType == 5) //The Gupta model of Carbon material ablation.
+    {
+        this->GenerateGuptaAblation16S36RData(reactionCoef, thirdBodyCoef, rateCoef);
+    }
+    else if (nType == 6) //The Park model of Carbon material ablation.
+    {
+        this->GenerateParkAblation16S38RData(reactionCoef, thirdBodyCoef, rateCoef);
+    }
+    else if (nType == 7) //The Dunn-Kang model of Carbon material ablation.
+    {
+        this->GenerateDunnKangAblation16S42RData(reactionCoef, thirdBodyCoef, rateCoef);
+    }
+    else if (nType == 8) // The Combustion Chamber Gas model.
+    {
+        this->GenerateCombustionGas12S20RData(reactionCoef, thirdBodyCoef, rateCoef);
+    }
+    else if (nType == 9)
+    {
+        this->GenerateGasMixture2S1RData(reactionCoef, thirdBodyCoef, rateCoef);
+    }
+    else
+    {
+        this->GenerateGupta11S20RData(reactionCoef, thirdBodyCoef, rateCoef);
+    }
+
+    int nIndex = 0, nStart = nr * ns;
+    for (int r = 0; r < nr; ++ r)
+    {
+        nIndex = r * ns;
+        for (int s = 0; s < ns; ++ s)
+        {
+            this->stoichForward[r][s]  = reactionCoef[nIndex + s];
+            this->stoichBackward[r][s] = reactionCoef[nStart + nIndex + s];
+            this->collisionCoef[r][s]  = thirdBodyCoef[nIndex + s];
+        }
+    }
+    for (int r = 0; r < nr; ++ r)
+    {
+        nIndex = r * 6;
+        for (int s = 0; s < 6; ++ s)
+        {
+            this->reactionData[r][s] = rateCoef[nIndex + s];
+        }
+    }
+
+    delete [] reactionCoef;
+    delete [] thirdBodyCoef;
+    delete [] rateCoef;
+}
+
+void ChemicalReactions::CreateChemicalReactionModel(vector<string> &namelist, ChemicalReactions *pNewModel)
+{
+    if (this->nSpecies <= 0 || this->nReaction <= 0)
+        return;
+    int nTargetSpecies = static_cast<int>(namelist.size());
+    if (nTargetSpecies <= 0)
+        return;
+    //Record the new index of the source species in the new model.
+    int flag[100], reactionFlag[70];
+    for (int s = 0; s < nSpecies; ++ s)
+    {
+        flag[s] = SearchSpeciesInNameList(speciesName[s], namelist);
+    }
+
+    //Count the number of new reactions.
+    int nTargetReactions = 0;
+    bool rflag = true;
+    for (int r = 0; r < this->nReaction; ++ r)
+    {
+        rflag = true;
+        reactionFlag[r] = 0;
+        for (int s = 0; s < nSpecies; ++ s)
+        {
+            if (stoichForward[r][s] > 0)
+            {
+                if (flag[s] == -1)
+                {
+                    rflag = false;
+                    break;
+                }
+            }
+            if (stoichBackward[r][s] > 0)
+            {
+                if (flag[s] == -1)
+                {
+                    rflag = false;
+                    break;
+                }
+            }
+        }
+        if (rflag)
+        {
+            ++ nTargetReactions;
+            reactionFlag[r] = 1; //1 indicates the current reaction is kept.
+        }
+    }
+
+    //Generate the new reaction model.
+    pNewModel->SetChemicalReactionType(this->nReactionType);
+    pNewModel->SetChemicalModelInfo(nTargetSpecies, nTargetReactions);
+    string *targetName = pNewModel->GetSpeciesNames();
+    for (int s = 0; s < nTargetSpecies; ++ s)
+    {
+        targetName[s] = namelist[s];
+    }
+    pNewModel->Initialization();
+    int **targetReactionType = pNewModel->GetReactionType();
+    int **targetStoichForward = pNewModel->GetForwardStoichiometricCoefficient();
+    int **targetStoichBackward = pNewModel->GetBackwardStoichiometricCoefficient();
+    RDouble **targetCollisionCoef = pNewModel->GetThirdBodyCollisionCoefficient();
+    RDouble **targetReactionData = pNewModel->GetReactionRateCurveFittingData();
+    int nr = -1, ns = -1;
+    for (int r = 0; r < this->nReaction; ++ r)
+    {
+        if (reactionFlag[r] != 1)
+        {
+            continue;
+        }
+        ++ nr;
+        for (int s = 0; s < nSpecies; ++ s)
+        {
+            ns = flag[s];
+            if (ns != -1)
+            {
+                targetReactionType[nr][0] = this->reactionType[r][0];
+                targetReactionType[nr][1] = this->reactionType[r][1];
+
+                targetStoichForward[nr][ns] = this->stoichForward[r][s];
+                targetStoichBackward[nr][ns] = this->stoichBackward[r][s];
+                targetCollisionCoef[nr][ns] = this->collisionCoef[r][s];
+            }
+        }
+        for (int s = 0; s < 6; ++ s)
+        {
+            targetReactionData[nr][s] = this->reactionData[r][s];
+        }
+    }
+}
+
+int SearchSpeciesInNameList(string strName, vector<string> &namelist)
+{
+    int num = static_cast<int>(namelist.size());
+    for (int s = 0; s < num; ++ s)
+    {
+        if (namelist[s] == strName)
+            return s;
+    }
+    return -1;
+}
+
+//===============================================
+ChemkinFitData::ChemkinFitData()
+{
+    nSpecies = 0;//number of species;
+    nInterval = 0;
+    nCoefNum = 0;
+    speciesName = NULL;
+    temperatureRange = NULL;
+    curveFittingData = NULL;
+    temperatureStart = NULL;
+    curveFittingDataT2 = NULL;
+}
+
+ChemkinFitData::~ChemkinFitData()
+{
+    DeAllocateMemories();
+}
+
+void ChemkinFitData::AllocateMemories()
+{
+    if (nSpecies > 0 && nInterval > 0 && nCoefNum > 0)
+    {
+        speciesName = new string [nSpecies];
+        temperatureRange = new RDouble[nInterval + 1];
+        curveFittingData = NewPointer3 <RDouble> (this->nSpecies, nInterval, nCoefNum);
+        enthalpyFitData = NewPointer2 <RDouble> (this->nSpecies, nCoefNum);
+
+        temperatureStart = new RDouble [nSpecies];
+        curveFittingDataT2 = NewPointer3 <RDouble> (this->nSpecies, nInterval + 1, nCoefNum);
+    }
+}
+
+void ChemkinFitData::DeAllocateMemories()
+{
+    if (nSpecies > 0 && nInterval > 0 && nCoefNum > 0)
+    {
+        delete [] speciesName;
+        delete [] temperatureRange;
+        delete [] temperatureStart;
+        DelPointer3(curveFittingData);
+        DelPointer3(curveFittingDataT2);
+        DelPointer2(enthalpyFitData);
+        nSpecies = 0;//number of species;
+        nInterval = 0;
+        nCoefNum = 0;
+        speciesName = NULL;
+        curveFittingData = NULL;
+        temperatureRange = NULL;
+        temperatureStart = NULL;
+        curveFittingDataT2 = NULL;
+    }
+}
+
+void ChemkinFitData::SetInterpolationInfo(int ns, int m/* = 5*/, int n/* = 6*/)
+{
+    if (ns <= 0 || m <= 0 || n <= 0)
+        return;
+    if (ns == this->nSpecies && m == this->nInterval && n == this->nCoefNum)
+        return;
+    DeAllocateMemories();
+
+    this->nSpecies = ns;
+    this->nInterval = m;
+    this->nCoefNum  = n;
+    AllocateMemories();
+}
+
+void ChemkinFitData::SetCurveFittingDataT2()
+{
+    // the order of species is O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-, C, C2, CN, CO, CO2
+    RDouble temperature[16] = {2000, 200, 300, 2300, 3000, 300, 350, 2000, 350, 350, 200, 1600, 200, 300, 350, 150};
+
+    //Create the curve fitting data according to the chemkin method for Two-Temperature Model.
+    RDouble curveFitData[576] = {
+        //O
+        2.994948E+04,  2.500000E+00,  5.223956E-08,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        2.994951E+04,  2.500000E+00, -2.568583E-10,  5.808484E-13, -6.011273E-16,  2.313759E-19,
+        2.995071E+04,  2.492586E+00,  1.203323E-05, -7.894051E-09,  2.027117E-12, -1.331087E-16,
+        3.104743E+04,  1.854836E+00,  1.251750E-04, -8.148648E-09,  2.507334E-13, -3.044578E-18,
+        2.828810E+04,  2.730908E+00,  1.395464E-05, -1.105268E-09,  2.889644E-14, -2.752174E-19,
+        2.662513E+04,  3.099121E+00, -1.879333E-05,  3.553327E-10, -3.744271E-15,  1.693754E-20,
+        //O2
+        0.000000E+00,  3.500000E+00,  4.433878E-06,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        -1.763351E+01,  3.777701E+00, -1.491862E-03,  3.280076E-06, -2.439437E-09,  6.588389E-13,
+        -1.864569E+02,  3.718250E+00,  2.719609E-04, -3.157941E-08,  1.693918E-12, -3.857499E-17,
+        -1.730019E+03,  4.673495E+00,  4.561561E-05, -6.082030E-09,  2.972157E-13, -5.319652E-18,
+        -2.617574E+03,  5.111067E+00, -3.567285E-05,  1.220236E-09, -2.274709E-14,  1.787153E-19,
+        -1.447896E+03,  4.869817E+00, -1.557016E-05,  3.759224E-10, -4.885234E-15,  2.656670E-20,
+        //NO
+        1.087323E+04,  3.500000E+00,  1.022368E-05,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        1.085854E+04,  3.707169E+00, -9.832370E-04,  1.831154E-06, -1.055746E-09,  2.102797E-13,
+        1.082548E+04,  3.315053E+00,  5.437810E-04, -1.308904E-07,  1.568014E-11, -7.340641E-16,
+        8.751642E+03,  5.047951E+00, -1.173136E-04,  9.875066E-09, -2.471149E-13,  9.790216E-19,
+        1.853085E+04,  2.314812E+00,  1.733771E-04, -4.217113E-09,  2.932799E-14,  1.612139E-19,
+        1.640596E+04,  2.437413E+00,  1.892202E-04, -5.949257E-09,  8.761277E-14, -5.094389E-19,
+        //N
+        5.689199E+04,  2.500000E+00,  3.708103E-08,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        5.689206E+04,  2.500000E+00, -6.887638E-12,  1.550249E-14, -1.594977E-17,  6.096015E-21,
+        5.690429E+04,  2.461438E+00,  3.923201E-05, -1.759867E-08,  3.361647E-12, -1.861660E-16,
+        5.857039E+04,  1.665839E+00,  1.236919E-04, -3.478947E-09, -8.272678E-14,  4.035201E-18,
+        5.500509E+04,  2.496331E+00,  6.729317E-05, -3.907893E-09,  9.443767E-14, -8.680371E-19,
+        4.963591E+04,  3.669480E+00, -3.577910E-05,  6.396422E-10, -6.217534E-15,  2.531483E-20,
+        //O+
+        1.888381E+05,  2.500000E+00,  1.870445E-10,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        1.888380E+05,  2.500000E+00, -5.799747E-16,  1.299992E-18, -1.330600E-21,  5.054282E-25,
+        1.888480E+05,  2.478340E+00,  1.865230E-05, -6.499990E-09,  8.086068E-13, -5.142878E-18,
+        1.875811E+05,  3.569610E+00, -3.279120E-04,  4.301768E-08, -2.161538E-12,  3.872899E-17,
+        1.958739E+05, -3.851041E-01,  3.796350E-04, -1.790906E-08,  3.962347E-13, -3.451295E-18,
+        1.723990E+05,  4.581351E+00, -4.366104E-05,  2.445517E-10,  4.815675E-15, -5.972147E-20,
+        //O2+
+        1.407265E+05,  3.500000E+00,  1.263562E-05,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        1.407130E+05,  3.717996E+00, -1.046496E-03,  1.985477E-06, -1.192872E-09,  2.526815E-13,
+        1.406654E+05,  3.337955E+00,  5.350720E-04, -1.287692E-07,  1.532079E-11, -7.023512E-16,
+        1.374473E+05,  5.848307E+00, -3.237850E-04,  3.386321E-08, -1.407332E-12,  2.121106E-17,
+        1.540163E+05,  2.766940E-01,  4.293419E-04, -1.726009E-08,  3.341342E-13, -2.586070E-18,
+        1.321235E+05,  4.595249E+00,  8.685982E-05, -3.610163E-09,  6.072374E-14, -3.844347E-19,
+        //NO+
+        1.194371E+05,  3.500000E+00,  7.087734E-06,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        1.194283E+05,  3.555369E+00, -1.886339E-04,  9.302780E-08,  3.637005E-10, -1.989363E-13,
+        1.195250E+05,  3.019535E+00,  6.435575E-04, -1.498788E-07,  1.762729E-11, -8.199314E-16,
+        1.186042E+05,  4.133200E+00,  8.644779E-05, -1.106037E-08,  6.821688E-13, -1.379391E-17,
+        1.155246E+05,  5.741895E+00, -2.108602E-04,  1.475028E-08, -3.975100E-13,  3.842340E-18,
+        1.469455E+05, -8.955266E-01,  3.531503E-04, -9.337342E-09,  1.192184E-13, -6.092275E-19,
+        //N+
+        2.261247E+05,  2.500000E+00,  1.202833E-07,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        2.261240E+05,  2.500000E+00, -5.388626E-10,  1.220036E-12, -1.264546E-15,  4.876155E-19,
+        2.261256E+05,  2.498659E+00,  7.150544E-06, -6.452663E-09,  1.913296E-12, -1.321710E-16,
+        2.272279E+05,  1.826936E+00,  1.356515E-04, -9.350600E-09,  3.082078E-13, -4.063345E-18,
+        2.242845E+05,  2.791958E+00,  8.096754E-06, -8.593686E-10,  2.378525E-14, -2.323424E-19,
+        2.229084E+05,  3.100074E+00, -1.957118E-05,  3.849765E-10, -4.222831E-15,  1.989600E-20,
+        //N2+
+        1.840269E+05,  3.500000E+00,  1.359240E-05,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        1.840230E+05,  3.605218E+00, -4.360047E-04,  6.009381E-07, -2.532788E-11, -9.330792E-14,
+        1.838771E+05,  3.652295E+00,  8.662663E-05,  6.628267E-08, -1.254719E-11,  6.457523E-16,
+        1.802543E+05,  5.122061E+00,  9.300704E-05, -1.510533E-08,  7.951474E-13, -1.486633E-17,
+        1.788856E+05,  6.017683E+00, -9.888440E-05,  3.629809E-09, -7.107152E-14,  5.788636E-19,
+        1.825810E+05,  5.242762E+00, -3.334243E-05,  8.368635E-10, -1.116095E-14,  6.182677E-20,
+        //N2
+        0.000000E+00,  3.500000E+00,  7.494489E-06,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        -4.168535E+00,  3.559014E+00, -2.063324E-04,  1.282542E-07,  3.379745E-10, -1.923401E-13,
+        9.132411E+01,  3.026874E+00,  6.414494E-04, -1.495232E-07,  1.759072E-11, -8.180448E-16,
+        -9.801465E+02,  4.216487E+00,  7.099921E-05, -9.927399E-09,  6.618185E-13, -1.401307E-17,
+        -1.728594E+03,  5.189906E+00, -1.613031E-04,  1.293358E-08, -3.691039E-13,  3.694329E-18,
+        2.655896E+04, -9.208331E-01,  3.690424E-04, -1.015946E-08,  1.351042E-13, -7.192463E-19,
+        //e-
+        0.000000E+00,  2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        0.000000E+00,  2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        0.000000E+00,  2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        0.000000E+00,  2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        0.000000E+00,  2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        0.000000E+00,  2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        //C
+        8.551840E+04,  2.500000E+00,  5.347142E-07,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        8.544003E+04,  2.500050E+00, -2.551162E-07,  5.912581E-10, -6.312305E-13,  2.523172E-16,
+        8.547602E+04,  2.622832E+00, -1.116964E-04,  4.011200E-08, -4.771025E-12,  1.958110E-16,
+        8.565838E+04,  2.192844E+00,  1.168773E-04, -1.098821E-08,  4.669630E-13, -7.702747E-18,
+        8.340321E+04,  3.094647E+00, -2.889865E-05,  8.442386E-10, -1.370806E-14,  9.529651E-20,
+        8.408757E+04,  2.960564E+00, -1.833919E-05,  4.261968E-10, -5.387804E-15,  2.869617E-20,
+        //C2
+        9.886938E+04,  3.500000E+00,  3.853198E-06,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        9.885449E+04,  3.769306E+00, -1.391769E-03,  2.925302E-06, -2.074193E-09,  5.350655E-13,
+        9.877784E+04,  3.461358E+00,  5.068968E-04, -1.313572E-07,  1.707532E-11, -8.369112E-16,
+        9.941814E+04,  3.708402E+00,  1.133398E-04, -3.108136E-09, -7.640438E-14,  3.635645E-18,
+        9.641003E+04,  4.405745E+00,  6.846466E-05, -3.814645E-09,  9.057950E-14, -8.239557E-19,
+        9.123860E+04,  5.527154E+00, -2.955559E-05,  4.900755E-10, -4.311224E-15,  1.518778E-20,
+        //CN
+        5.256194E+04,  3.500000E+00,  1.205381E-06,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        5.254980E+04,  3.640531E+00, -6.182474E-04,  9.934842E-07, -3.424829E-10, -2.763549E-15,
+        5.239089E+04,  3.717437E+00,  6.859118E-05,  6.733491E-08, -1.232647E-11,  6.227216E-16,
+        4.891711E+04,  5.079436E+00,  1.018169E-04, -1.587822E-08,  8.275421E-13, -1.539973E-17,
+        4.740669E+04,  6.035210E+00, -9.992284E-05,  3.663840E-09, -7.167591E-14,  5.833870E-19,
+        5.114155E+04,  5.253771E+00, -3.385426E-05,  8.494772E-10, -1.132684E-14,  6.273524E-20,
+        //CO
+        -1.370881E+04,  3.500000E+00,  1.562805E-05,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        -1.371616E+04,  3.617074E+00, -4.965016E-04,  7.290115E-07, -1.256742E-10, -6.586338E-14,
+        -1.367341E+04,  3.137886E+00,  6.072908E-04, -1.436350E-07,  1.703768E-11, -7.950868E-16,
+        -1.488009E+04,  4.289658E+00,  8.438730E-05, -1.561329E-08,  1.218096E-12, -2.817849E-17,
+        -3.648753E+03,  2.825366E+00, -3.157712E-05,  1.381354E-08, -5.317996E-13,  6.208207E-18,
+        2.468335E+04, -4.574400E+00,  7.109235E-04, -2.244255E-08,  3.364252E-13, -1.988694E-18,
+        //CO2
+        -4.726667E+04,  3.500000E+00,  2.126593E-04,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        -4.718245E+04,  2.308168E+00,  4.797185E-03, -2.925483E-06,  1.064955E-09, -1.710750E-13,
+        -4.792299E+04,  4.874087E+00,  1.204451E-03, -2.907913E-07,  3.505711E-11, -1.659616E-15,
+        -5.020279E+04,  7.366062E+00,  2.690938E-05, -4.532483E-09,  3.741945E-13, -8.782102E-18,
+        -4.781377E+04,  7.160828E+00, -2.912446E-05,  5.268216E-09, -1.761376E-13,  1.886644E-18,
+        -3.462102E+04,  4.210869E+00,  2.347903E-04, -6.537375E-09,  8.785314E-14, -4.735520E-19
+    };
+
+    int nIndex = 0, nStart = 0;
+    for (int s = 0; s < this->nSpecies; ++ s)
+    {
+        nStart = s * 36;
+        for (int i = 0; i < this->nInterval + 1; ++ i)
+        {
+            nIndex = nStart + i * nCoefNum;
+            for (int j = 0; j < this->nCoefNum; ++ j)
+            {
+                this->curveFittingDataT2[s][i][j] = curveFitData[nIndex + j];
+            }
+        }
+        temperatureStart[s] = temperature[s];
+    }
+}
+
+void ChemkinFitData::GenerateFullChemkinData()
+{
+    // the order of species is O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-, C, C2, CN, CO, CO2, H, H2, OH, H2O
+    this->SetInterpolationInfo(30, 5, 6);
+
+    //Set the curve fitting data for the two-temperature model.
+    this->SetCurveFittingDataT2();
+
+    //Initialization.
+    RDouble temperature[6] = {300.0, 1000.0, 6000.0, 15000.0, 25000.0, 30000.0};
+    for (int i = 0; i < 6; ++ i)
+    {
+        temperatureRange[i] = temperature[i];
+    }
+    speciesName[0] = "O";
+    speciesName[1] = "O2";
+    speciesName[2] = "NO";
+    speciesName[3] = "N";
+    speciesName[4] = "O+";
+    speciesName[5] = "O2+";
+    speciesName[6] = "NO+";
+    speciesName[7] = "N+";
+    speciesName[8] = "N2+";
+    speciesName[9] = "N2";
+    speciesName[10] = "e-";
+    speciesName[11] = "C";
+    speciesName[12] = "C2";
+    speciesName[13] = "CN";
+    speciesName[14] = "CO";
+    speciesName[15] = "CO2";
+    speciesName[16] = "H2";
+    speciesName[17] = "Air";
+    speciesName[18] = "CH4";
+    speciesName[19] = "H2S";
+    speciesName[20] = "SO2";
+    speciesName[21] = "CL2";
+    speciesName[22] = "NH3";
+    speciesName[23] = "C2H2";
+    speciesName[24] = "C2H4";
+    speciesName[25] = "C2H6";
+    speciesName[26] = "C3H6";
+    speciesName[27] = "C3H8";
+    speciesName[28] = "C4H8";
+    speciesName[29] = "C4H10";
+
+    int IndexO2 = 1;
+    int IndexNO = 2;
+    int IndexN2 = 9;
+    int IndexCO = 14;
+    int IndexCO2 = 15;
+    int IndexH2 = 16;
+    int IndexAir = 17;
+    int IndexCH4 = 18;
+    int IndexH2S = 19;
+    int IndexSO2 = 20;
+    int IndexCL2 = 21;
+    int IndexNH3 = 22;
+    int IndexC2H2 = 23;
+    int IndexC2H4 = 24;
+    int IndexC2H6 = 25;
+    int IndexC3H6 = 26;
+    int IndexC3H8 = 27;
+    int IndexC4H8 = 28;
+    int IndexC4H10 = 29;
+
+    RDouble gamaO2 = 1.393;
+    RDouble gamaNO = 1.400;
+    RDouble gamaN2 = 1.400;
+    RDouble gamaCO = 1.399;
+    RDouble gamaCO2 = 1.289;
+    RDouble gamaH2 = 1.409;
+    RDouble gamaAir = 1.400;
+    RDouble gamaCH4 = 1.229;
+    RDouble gamaH2S = 1.326;
+    RDouble gamaSO2 = 1.289;
+    RDouble gamaCL2 = 1.327;
+    RDouble gamaNH3 = 1.301;
+    RDouble gamaC2H2 = 1.231;
+    RDouble gamaC2H4 = 1.237;
+    RDouble gamaC2H6 = 1.186;
+    RDouble gamaC3H6 = 1.147;
+    RDouble gamaC3H8 = 1.126;
+    RDouble gamaC4H8 = 1.113;
+    RDouble gamaC4H10 = 1.091;
+
+    //Create the curve fitting data according to the chemkin method.
+    RDouble curveFitData[900] = {
+        2.823600E+00, -8.947800E-04,  8.306000E-07, -1.683700E-10, -7.320500E-14,  2.915000E+04,
+        2.542100E+00, -2.755100E-05, -3.102800E-09,  4.551100E-12, -4.368100E-16,  2.915000E+04,
+        2.546000E+00, -5.952000E-05,  2.701000E-08, -2.798000E-12,  9.380000E-17,  2.915000E+04,
+        -9.787100E-03,  1.245000E-03, -1.615400E-07,  8.038000E-12, -1.262400E-16,  2.915000E+04,
+        1.642800E+01, -3.931300E-03,  2.984000E-07, -8.161300E-12,  7.500400E-17,  2.915000E+04,
+
+        3.614600E+00, -1.859800E-03,  7.081400E-06, -6.807000E-09,  2.162800E-12, -1.044000E+03,
+        3.594900E+00,  7.521300E-04, -1.873200E-07,  2.791300E-11, -1.577400E-15, -1.044000E+03,
+        3.859900E+00,  3.251000E-04, -9.213100E-09, -7.868400E-13,  2.942600E-17, -1.044000E+03,
+        3.486700E+00,  5.238400E-04, -3.912300E-08,  1.009400E-12, -8.871800E-18, -1.044000E+03,
+        3.962000E+00,  3.944600E-04, -2.950600E-08,  7.397500E-13, -6.420900E-18, -1.044000E+03,
+
+        //3.588700E+00, -1.247900E-03,  3.978600E-06, -2.865100E-09,  6.301500E-13,  9.764000E+03,
+        //3.204700E+00,  1.270500E-03, -4.660300E-07,  7.500700E-11, -4.231400E-15,  9.764000E+03,
+        //3.854300E+00,  2.340900E-04, -2.135400E-08,  1.668900E-12, -4.907000E-17,  9.764000E+03,
+        //4.330900E+00, -5.808600E-05,  2.805900E-08, -1.569400E-12,  2.410400E-17,  9.764000E+03,
+        //2.350700E+00,  5.864300E-04, -3.131600E-08,  6.049500E-13, -4.055700E-18,  9.764000E+03,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,//NO
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+
+        2.503100E+00, -2.180000E-05,  5.420500E-08, -5.647600E-11,  2.099900E-14,  5.613000E+04,
+        2.482000E+00,  6.925800E-05, -6.306500E-08,  1.838700E-11, -1.174700E-15,  5.613000E+04,
+        2.748000E+00, -3.909000E-04,  1.338000E-07, -1.191000E-11,  3.369000E-16,  5.613000E+04,
+        -1.228000E+00,  1.926800E-03, -2.437000E-07,  1.219300E-11, -1.991800E-16,  5.613000E+04,
+        1.552000E+01, -3.885800E-03,  3.228800E-07, -9.605300E-12,  9.547200E-17,  5.613000E+04,
+
+        2.498500E+00,  1.141100E-05, -2.976100E-08,  3.224700E-11, -1.237600E-14,  1.879000E+05,
+        2.506000E+00, -1.446400E-05,  1.244600E-08, -4.685800E-12,  6.554900E-16,  1.879000E+05,
+        2.944000E+00, -4.108000E-04,  9.156000E-08, -5.848000E-12,  1.190000E-16,  1.879000E+05,
+        1.278400E+00,  4.086600E-04, -2.173100E-08,  3.325200E-13,  6.316000E-19,  1.879000E+05,
+        1.288900E+00,  4.334300E-04, -2.675800E-08,  6.215900E-13, -4.513100E-18,  1.879000E+05,
+
+        3.243000E+00,  1.174000E-03, -3.900000E-07,  5.437000E-11, -2.392000E-15,  1.400000E+05,
+        3.243000E+00,  1.174000E-03, -3.900000E-07,  5.437000E-11, -2.392000E-15,  1.400000E+05,
+        5.169000E+00, -8.620000E-04,  2.041000E-07, -1.300000E-11,  2.494000E-16,  1.400000E+05,
+        -2.801700E-01,  1.667400E-03, -1.210700E-07,  3.211300E-12, -2.834900E-17, 1.400000E+05,
+        2.044500E+00,  1.031300E-03, -7.404600E-08,  1.925700E-12, -1.746100E-17,  1.400000E+05,
+
+        3.529400E+00, -3.034200E-04,  3.854400E-07,  1.051900E-09, -7.277700E-13,  1.184000E+05,
+        3.215200E+00,  9.974200E-04, -2.903000E-07,  3.692500E-11, -1.599400E-15,  1.184000E+05,
+        2.689600E+00,  1.379600E-03, -3.398500E-07,  3.377600E-11, -1.042700E-15,  1.184000E+05,
+        5.934600E+00, -1.317800E-03,  2.329700E-07, -1.173300E-11,  1.840200E-16,  1.184000E+05,
+        -5.159500E+00,  2.629000E-03, -1.625400E-07,  3.938100E-12, -3.431100E-17, 1.184000E+05,
+
+        2.727000E+00, -2.820000E-04,  1.105000E-07, -1.551000E-11,  7.847000E-16,  2.254000E+05,
+        2.727000E+00, -2.820000E-04,  1.105000E-07, -1.551000E-11,  7.847000E-16,  2.254000E+05,
+        2.499000E+00, -3.725000E-06,  1.147000E-08, -1.102000E-12,  3.078000E-17,  2.254000E+05,
+        2.385600E+00,  8.349500E-05, -5.881500E-09,  1.885000E-13, -1.612000E-18,  2.254000E+05,
+        2.228600E+00,  1.245800E-04, -8.763600E-09,  2.620400E-13, -2.167400E-18,  2.254000E+05,
+
+        3.549800E+00, -6.081000E-04,  1.469000E-06, -6.509100E-11, -3.564900E-13,  1.826000E+05,
+        3.397000E+00,  4.525000E-04,  1.272000E-07, -3.879000E-11,  2.459000E-15,  1.826000E+05,
+        3.378000E+00,  8.629000E-04, -1.276000E-07,  8.087000E-12, -1.880000E-16,  1.826000E+05,
+        4.394200E+00,  1.886800E-04, -7.127200E-09, -1.751100E-13,  6.717600E-18,  1.826000E+05,
+        3.949300E+00,  3.679500E-04, -2.691000E-08,  6.711000E-13, -5.824400E-18,  1.826000E+05,
+
+        3.674800E+00, -1.208100E-03,  2.324000E-06, -6.321800E-10, -2.257700E-13, -1.043000E+03,
+        3.212500E+00,  1.013700E-03, -3.046700E-07,  4.109100E-11, -2.017000E-15, -1.043000E+03,
+        3.181100E+00,  8.974500E-04, -2.021600E-07,  1.826600E-11, -5.033400E-16, -1.043000E+03,
+        9.637700E+00, -2.572800E-03,  3.302000E-07, -1.431500E-11,  2.033300E-16, -1.043000E+03,
+        -5.168100E+00,  2.333700E-03, -1.295300E-07,  2.787200E-12, -2.136000E-17, -1.043000E+03,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, -7.454200E+02,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, -7.454200E+02,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, -7.454200E+02,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, -7.454200E+02,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, -7.454200E+02,
+
+        2.50000000E+00,  2.91840000E-08,  0.00000000E+00,  0.00000000E+00,  0.00000000E+00,  8.62400000E+04,
+        2.73010000E+00, -3.54680000E-04,  1.76380000E-07, -2.90810000E-11,  1.61410000E-15,  8.62400000E+04,
+        2.19260000E+00,  2.33960000E-04, -3.29930000E-08,  1.86950000E-12, -3.85470000E-17,  8.62400000E+04,
+        3.09520000E+00, -5.78480000E-05,  2.53490000E-09, -5.48800000E-14,  4.76900000E-19,  8.62400000E+04,
+        2.99920000E+00, -4.21660000E-05,  1.57100000E-09, -2.84690000E-14,  2.04760000E-19,  8.62400000E+04,
+
+        3.59270000E+00, -1.31500000E-03,  4.68360000E-06, -3.64550000E-09,  8.22490000E-13,  9.88690000E+04,
+        3.46870000E+00,  9.91340000E-04, -3.80030000E-07,  6.51940000E-11, -3.95530000E-15,  9.88690000E+04,
+        3.70860000E+00,  2.26880000E-04, -9.33260000E-09, -3.05890000E-13,  1.81940000E-17,  9.88690000E+04,
+        4.40650000E+00,  1.37050000E-04, -1.14540000E-08,  3.62640000E-13, -4.12340000E-18,  9.88690000E+04,
+        5.45660000E+00, -4.88060000E-05,  9.16120000E-10, -4.04850000E-15, -4.16240000E-20,  9.88690000E+04,
+
+        3.52730000E+00, -2.94470000E-04,  3.54480000E-07,  1.61510000E-09, -1.20290000E-12,  5.25620000E+04,
+        3.76220000E+00,  3.96600000E-05,  2.57790000E-07, -6.11840000E-11,  3.96340000E-15,  5.25620000E+04,
+        5.08050000E+00,  2.03760000E-04, -4.76650000E-08,  3.31230000E-12, -7.70480000E-17,  5.25620000E+04,
+        6.03680000E+00, -1.99970000E-04,  1.09990000E-08, -2.86890000E-13,  2.91880000E-18,  5.25620000E+04,
+        5.36840000E+00, -8.39690000E-05,  3.41690000E-09, -6.58850000E-14,  4.96200000E-19,  5.25620000E+04,
+
+        //3.51580000E+00, -1.30220000E-04, -2.62670000E-07,  2.25550000E-09, -1.41070000E-12, -1.33510000E+04,
+        //3.12340000E+00,  1.20590000E-03, -4.20430000E-07,  6.54410000E-11, -3.76140000E-15, -1.33510000E+04,
+        //4.28580000E+00,  1.69940000E-04, -4.69800000E-08,  4.88050000E-12, -1.41070000E-16, -1.33510000E+04,
+        //2.82420000E+00, -6.30390000E-05,  4.14460000E-08, -2.12770000E-12,  3.10490000E-17, -1.33510000E+04,
+        //-7.28620000E+00,  1.80800000E-03, -8.78970000E-08,  1.83160000E-12, -1.42390000E-17, -1.33510000E+04,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,//CO
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+
+        //3.13320000E+00,  2.73250000E-03,  1.03530000E-05, -1.74770000E-08,  7.80100000E-12, -4.73900000E+04,
+        //4.89430000E+00,  2.34790000E-03, -8.34670000E-07,  1.31910000E-10, -7.68540000E-15, -4.73900000E+04,
+        //7.36680000E+00,  5.38290000E-05, -1.36000000E-08,  1.49710000E-12, -4.39190000E-17, -4.73900000E+04,
+        //7.16150000E+00, -5.82590000E-05,  1.58080000E-08, -7.04680000E-13,  9.43500000E-18, -4.73900000E+04,
+        //4.06620000E+00,  4.90030000E-04, -2.06870000E-08,  3.76430000E-13, -2.58570000E-18, -4.73900000E+04,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,//CO2
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+
+        //3.59270000E+00, -1.31500000E-03,  4.68360000E-06, -3.64550000E-09,  8.22490000E-13,  9.88690000E+04,  //! H/H2/OH/H2O��������Ҫ���¼���
+        //3.46870000E+00,  9.91340000E-04, -3.80030000E-07,  6.51940000E-11, -3.95530000E-15,  9.88690000E+04,
+        //3.70860000E+00,  2.26880000E-04, -9.33260000E-09, -3.05890000E-13,  1.81940000E-17,  9.88690000E+04,
+        //4.40650000E+00,  1.37050000E-04, -1.14540000E-08,  3.62640000E-13, -4.12340000E-18,  9.88690000E+04,
+        //5.45660000E+00, -4.88060000E-05,  9.16120000E-10, -4.04850000E-15, -4.16240000E-20,  9.88690000E+04,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,//H2
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,//Air
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,//CH4
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,//H2S
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,//SO2
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,//CL2
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,//NH3
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,//C2H2
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,//C2H4
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,//C2H6
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,//C3H6
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,//C3H8
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,//C4H8
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,//C4H10
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00,
+        2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00, 0.000000E+00
+    };
+
+    //Create the curve fitting data for enthalpy.
+    RDouble tmpFitData[180] = {
+        //O
+        2.994826E+04,  2.500878E+00,  4.823562E-05, -2.300169E-09,  4.385966E-14, -2.742383E-19,
+        //O2
+        0.000000E+00,  4.165566E+00,  1.071239E-04, -8.438129E-09,  2.771412E-13, -3.302201E-18,
+        //NO
+        1.087279E+04,  4.342100E+00, -1.431366E-05,  3.909009E-09, -1.341897E-13,  1.365789E-18,
+        //N
+        5.688967E+04,  2.501346E+00,  5.999053E-05, -1.557247E-09, -1.419300E-14,  6.683566E-19,
+        //O+
+        1.888304E+05,  2.507998E+00, -1.246533E-05,  7.344646E-09, -3.592366E-13,  5.071417E-18,
+        //O2+
+        1.407208E+05,  4.315920E+00, -2.494874E-05,  7.302887E-09, -3.065519E-13,  3.887176E-18,
+        //NO+
+        1.194324E+05,  4.195210E+00,  2.536182E-05, -1.235356E-09,  9.797966E-14, -1.900332E-18,
+        //N+
+        2.261155E+05,  2.500157E+00,  5.192698E-05, -2.665587E-09,  5.695897E-14, -4.360660E-19,
+        //N2+
+        1.840194E+05,  3.909825E+00,  2.249430E-04, -1.842780E-08,  6.158210E-13, -7.402858E-18,
+        //N2
+        0.000000E+00,  4.230253E+00,  1.445665E-05, -3.763594E-11,  5.344843E-14, -1.361599E-18,
+        //e-
+        0.000000E+00,  2.500000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,  0.000000E+00,
+        //C
+        8.551491E+04,  2.500871E+00,  6.753262E-05, -4.988307E-09,  1.531785E-13, -1.725660E-18,
+        //C2
+        9.886533E+04,  3.942798E+00,  9.961589E-05, -4.470392E-09,  8.363204E-14, -5.358576E-19,
+        //CN
+        5.255979E+04,  3.923315E+00,  2.234822E-04, -1.831569E-08,  6.117643E-13, -7.349370E-18,
+        //CO
+        -1.371125E+04,  4.591969E+00, -8.386492E-05,  9.441331E-09, -2.471780E-13,  1.762265E-18,
+        //CO2
+        -4.726773E+04,  6.798947E+00,  8.349937E-05, -4.568962E-09,  1.725463E-13, -2.501434E-18,
+        0.000000E+00,  4.230253E+00,  1.445665E-05, -3.763594E-11,  5.344843E-14, -1.361599E-18,    //H2
+        0.000000E+00,  4.230253E+00,  1.445665E-05, -3.763594E-11,  5.344843E-14, -1.361599E-18,    //Air
+        -4.691950E+04,  6.798947E+00,  8.349937E-05, -4.568962E-09,  1.725463E-13, -2.501434E-18,    //CH4
+        0.000000E+00,  4.230253E+00,  1.445665E-05, -3.763594E-11,  5.344843E-14, -1.361599E-18,    //H2S
+        0.000000E+00,  4.230253E+00,  1.445665E-05, -3.763594E-11,  5.344843E-14, -1.361599E-18,    //SO2
+        0.000000E+00,  4.230253E+00,  1.445665E-05, -3.763594E-11,  5.344843E-14, -1.361599E-18,    //CL2
+        0.000000E+00,  4.230253E+00,  1.445665E-05, -3.763594E-11,  5.344843E-14, -1.361599E-18,    //NH3
+        -4.691950E+04,  6.798947E+00,  8.349937E-05, -4.568962E-09,  1.725463E-13, -2.501434E-18,    //C2H2
+        -4.691950E+04,  6.798947E+00,  8.349937E-05, -4.568962E-09,  1.725463E-13, -2.501434E-18,    //C2H4
+        -4.691950E+04,  6.798947E+00,  8.349937E-05, -4.568962E-09,  1.725463E-13, -2.501434E-18,    //C2H6
+        -4.691950E+04,  6.798947E+00,  8.349937E-05, -4.568962E-09,  1.725463E-13, -2.501434E-18,    //C3H6
+        -4.691950E+04,  6.798947E+00,  8.349937E-05, -4.568962E-09,  1.725463E-13, -2.501434E-18,    //C3H8
+        -4.691950E+04,  6.798947E+00,  8.349937E-05, -4.568962E-09,  1.725463E-13, -2.501434E-18,    //C4H8
+        -4.691950E+04,  6.798947E+00,  8.349937E-05, -4.568962E-09,  1.725463E-13, -2.501434E-18    //C4H10
+    };
+
+    int nIndex = 0, nStart = 0;
+    for (int s = 0; s < this->nSpecies; ++ s)
+    {
+        nStart = s * 30;
+        for (int i = 0; i < this->nInterval; ++ i)
+        {
+            nIndex = nStart + i * nCoefNum;
+            for (int j = 0; j < this->nCoefNum; ++ j)
+            {
+                this->curveFittingData[s][i][j] = curveFitData[nIndex + j];
+            }
+        }
+        nStart = s * 6;
+        for (int j = 0; j < this->nCoefNum; ++ j)
+        {
+            this->enthalpyFitData[s][j] = tmpFitData[nStart + j];
+        }
+    }
+    RDouble aA = gamaO2 / (gamaO2 - 1);
+    RDouble aB = gamaNO / (gamaNO - 1);
+    RDouble aC = gamaN2 / (gamaN2 - 1);
+    RDouble aD = gamaCO / (gamaCO - 1);
+    RDouble aE = gamaCO2 / (gamaCO2 - 1);
+    RDouble aF = gamaH2 / (gamaH2 - 1);
+    RDouble aG = gamaAir / (gamaAir - 1);
+    RDouble aH = gamaCH4 / (gamaCH4 - 1);
+    RDouble aI = gamaH2S / (gamaH2S - 1);
+    RDouble aJ = gamaSO2 / (gamaSO2 - 1);
+    RDouble aK = gamaCL2 / (gamaCL2 - 1);
+    RDouble aL = gamaNH3 / (gamaNH3 - 1);
+    RDouble aM = gamaC2H2 / (gamaC2H2 - 1);
+    RDouble aN = gamaC2H4 / (gamaC2H4 - 1);
+    RDouble aO = gamaC2H6 / (gamaC2H6 - 1);
+    RDouble aP = gamaC3H6 / (gamaC3H6 - 1);
+    RDouble aQ = gamaC3H8 / (gamaC3H8 - 1);
+    RDouble aR = gamaC4H8 / (gamaC4H8 - 1);
+    RDouble aS = gamaC4H10 / (gamaC4H10 - 1);
+
+    for (int i = 0; i < this->nInterval; ++ i)
+    {
+        this->curveFittingData[IndexO2][i][0] = aA;
+        this->curveFittingData[IndexNO][i][0] = aB;
+        this->curveFittingData[IndexN2][i][0] = aC;
+        this->curveFittingData[IndexCO][i][0] = aD;
+        this->curveFittingData[IndexCO2][i][0] = aE;
+        this->curveFittingData[IndexH2][i][0] = aF;
+        this->curveFittingData[IndexAir][i][0] = aG;
+        this->curveFittingData[IndexCH4][i][0] = aH;
+        this->curveFittingData[IndexH2S][i][0] = aI;
+        this->curveFittingData[IndexSO2][i][0] = aJ;
+        this->curveFittingData[IndexCL2][i][0] = aK;
+        this->curveFittingData[IndexNH3][i][0] = aL;
+        this->curveFittingData[IndexC2H2][i][0] = aM;
+        this->curveFittingData[IndexC2H4][i][0] = aN;
+        this->curveFittingData[IndexC2H6][i][0] = aO;
+        this->curveFittingData[IndexC3H6][i][0] = aP;
+        this->curveFittingData[IndexC3H8][i][0] = aQ;
+        this->curveFittingData[IndexC4H8][i][0] = aR;
+        this->curveFittingData[IndexC4H10][i][0] = aS;
+    }
+}
+
+void ChemkinFitData::CreateChemkinFitData(vector<string> &namelist, ChemkinFitData *pNewData)
+{
+    if (this->nSpecies <= 0)
+        return;
+    int nTargetSpecies = static_cast<int>(namelist.size());
+    if (nTargetSpecies <= 0)
+        return;
+
+    //Record the new index of the source species in the new model.
+    int flag[100];
+    for (int s = 0; s < this->nSpecies; ++ s)
+    {
+        flag[s] = SearchSpeciesInNameList(speciesName[s], namelist);
+    }
+
+    //Generate the new curve fitting data.
+    pNewData->SetInterpolationInfo(nTargetSpecies, this->nInterval, this->nCoefNum);
+    string *targetName = pNewData->GetSpeciesNames();
+    for (int s = 0; s < nTargetSpecies; ++ s)
+    {
+        targetName[s] = namelist[s];
+    }
+
+    RDouble *targetTemp = pNewData->GetTemperatureRange();
+    for (int s = 0; s < 6; ++ s)
+    {
+        targetTemp[s] = this->temperatureRange[s];
+    }
+    RDouble **targetEnthalpyFitData = pNewData->GetEnthalpyFitData();
+    RDouble ***targetFitData = pNewData->GetCurveFittingData();
+    RDouble *targetTempStart = pNewData->GetStartTemperature();
+    RDouble ***targetFitDataT2 = pNewData->GetCurveFittingDataT2();
+
+    int nIndex = -1;
+    for (int s = 0; s < this->nSpecies; ++ s)
+    {
+        nIndex = flag[s];
+        if (nIndex == -1)
+            continue;
+        for (int i = 0; i < this->nInterval; ++ i)
+        {
+            for (int j = 0; j < this->nCoefNum; ++ j)
+            {
+                targetFitData[nIndex][i][j] = this->curveFittingData[s][i][j];
+            }
+        }
+
+        for (int j = 0; j < this->nCoefNum; ++ j)
+        {
+            targetEnthalpyFitData[nIndex][j] = this->enthalpyFitData[s][j];
+        }
+
+        targetTempStart[nIndex] = this->temperatureStart[s];
+        for (int i = 0; i < this->nInterval + 1; ++ i)
+        {
+            for (int j = 0; j < this->nCoefNum; ++ j)
+            {
+                targetFitDataT2[nIndex][i][j] = this->curveFittingDataT2[s][i][j];
+            }
+        }
+    }
+}
+
+//=======================================
+TransportFitData::TransportFitData()
+{
+    nSpecies = 0; //number of species;
+    speciesName = NULL; //The names of the species in the mixture.
+    viscosityFitData = NULL; //the curve fitting data of viscosity.
+    collisionAreaFitData = NULL; // the curve fitting data of the average collision area.
+}
+
+TransportFitData::~TransportFitData()
+{
+    DeAllocateMemories();
+}
+
+void TransportFitData::AllocateMemories()
+{
+    if (this->nSpecies <= 0)
+        return;
+    speciesName = new string[this->nSpecies];
+    viscosityFitData = NewPointer2 <RDouble> (this->nSpecies, 5);
+    collisionAreaFitData = NewPointer2 <RDouble> (this->nSpecies, 4);
+}
+
+void TransportFitData::DeAllocateMemories()
+{
+    if (this->nSpecies <= 0)
+        return;
+    delete [] speciesName;
+    DelPointer2(viscosityFitData);
+    DelPointer2(collisionAreaFitData);
+    nSpecies = 0;
+    speciesName = NULL;
+    viscosityFitData = NULL;
+    collisionAreaFitData = NULL;
+}
+
+void TransportFitData::SetSpeciesNumber(int ns)
+{
+    if (ns <= 0 || ns == this->nSpecies)
+        return;
+    DeAllocateMemories();
+
+    this->nSpecies = ns;
+    AllocateMemories();
+}
+
+void TransportFitData::GenerateFullCurveFittingData()
+{
+    //! the order of species is O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-, C, C2, CN, CO, CO2, H, H2, OH, H2O.
+    this->SetSpeciesNumber(33);
+    speciesName[0] = "O";
+    speciesName[1] = "O2";
+    speciesName[2] = "NO";
+    speciesName[3] = "N";
+    speciesName[4] = "O+";
+    speciesName[5] = "O2+";
+    speciesName[6] = "NO+";
+    speciesName[7] = "N+";
+    speciesName[8] = "N2+";
+    speciesName[9] = "N2";
+    speciesName[10] = "e-";
+    speciesName[11] = "C";
+    speciesName[12] = "C2";
+    speciesName[13] = "CN";
+    speciesName[14] = "CO";
+    speciesName[15] = "CO2";
+    speciesName[16] = "H";
+    speciesName[17] = "H2";
+    speciesName[18] = "OH";
+    speciesName[19] = "H2O";
+    speciesName[20] = "Air";
+    speciesName[21] = "CH4";
+    speciesName[22] = "H2S";
+    speciesName[23] = "SO2";
+    speciesName[24] = "CL2";
+    speciesName[25] = "NH3";
+    speciesName[26] = "C2H2";
+    speciesName[27] = "C2H4";
+    speciesName[28] = "C2H6";
+    speciesName[29] = "C3H6";
+    speciesName[30] = "C3H8";
+    speciesName[31] = "C4H8";
+    speciesName[32] = "C4H10";
+
+    RDouble curveFitData2[132] = {
+        0.0000, -0.0207,  0.0780,  3.5658,
+        0.0000, -0.0485,  0.6475,  1.2607,
+        0.0000, -0.0453,  0.5624,  1.7669,
+        0.0000, -0.0118, -0.0960,  4.3252,
+        0.0000,  0.0000, -2.0000,  24.3602,
+        0.0000,  0.0000, -2.0000,  24.3602,
+        0.0000,  0.0000, -2.0000,  24.3602,
+        0.0000,  0.0000, -2.0000,  24.3602,
+        0.0000,  0.0000, -2.0000,  24.3602,
+        0.0000, -0.0203,  0.0683,  4.0900,
+        0.0000,  0.0000, -2.0000,  24.3061,
+        0.0000,  0.0000, -2.0000,  24.3602,
+        0.0000,  0.0000, -2.0000,  24.3602,
+        0.0000,  0.0000, -2.0000,  24.3602,
+        0.0000,  0.0000, -2.0000,  24.3602,
+        0.0000,  0.0000, -2.0000,  24.3602,
+        0.0000,  0.0000, -2.0000,  24.3602,  //! H\H2\OH\H2O
+        0.0000,  0.0000, -2.0000,  24.3602,
+        0.0000,  0.0000, -2.0000,  24.3602,
+        0.0000,  0.0000, -2.0000,  24.3602,
+        0.0000,  0.0000, -2.0000,  24.3602,  //Air
+        0.0000,  0.0000, -2.0000,  24.3602,  //CH4
+        0.0000,  0.0000, -2.0000,  24.3602,  //H2S
+        0.0000,  0.0000, -2.0000,  24.3602,  //SO2
+        0.0000,  0.0000, -2.0000,  24.3602,  //CL2
+        0.0000,  0.0000, -2.0000,  24.3602,  //NH3
+        0.0000,  0.0000, -2.0000,  24.3602,  //C2H2
+        0.0000,  0.0000, -2.0000,  24.3602,  //C2H4
+        0.0000,  0.0000, -2.0000,  24.3602,  //C2H6
+        0.0000,  0.0000, -2.0000,  24.3602,  //C3H6
+        0.0000,  0.0000, -2.0000,  24.3602,  //C3H8
+        0.0000,  0.0000, -2.0000,  24.3602,  //C4H8
+        0.0000,  0.0000, -2.0000,  24.3602  //C4H10
+    };
+
+    //Initialization.
+    int nViscosityModel = 0;
+    if (GlobalDataBase::IsExist("nViscosityModel", PHDOUBLE, 1))
+    {
+        nViscosityModel = GlobalDataBase::GetIntParaFromDB("nViscosityModel");
+    }
+            
+    if (nViscosityModel == 0)
+    {
+        RDouble curveFitData1[165] = {
+            0.0,      0.0,    0.0203144,  0.4294404, -11.6031403,
+            0.0,      0.0,    0.044929,  -0.0826158, -9.2019475,
+            0.0,      0.0,    0.0436378, -0.0335511, -9.5767430,
+            0.0,      0.0,    0.0115572,  0.6031679, -12.432750,
+            0.0912,  -3.3154,  45.1290,  -270.4211,  586.2903,
+            0.0908,  -3.3020,  44.9511,  -269.3877,  584.4130,
+            0.0913,  -3.3178,  45.1426,  -270.3948,  586.3300,
+            0.0895,  -3.2573,  44.3511,  -265.8276,  576.1313,
+            0.0897,  -3.2618,  44.4079,  -266.1462,  577.1449,
+            0.0,      0.0,     0.0268142,  0.3177838,  -11.3155513,
+            0.0899,  -3.2731,  44.5782,  -267.2522,  574.4149,
+            0.0000000,   0.0000000,  -0.0061100,   0.7385000,   -12.7100000,
+            0.0000000,   0.0000000,  -0.0272900,   1.0640000,   -14.0300000,
+            0.0000000,   0.0000000,  -0.0257200,   1.0400000,   -13.8600000,
+            0.0000000,   0.0000000,  -0.0324200,   1.1430000,   -14.1700000,
+            0.0000000,   0.0000000,  -0.0577200,   1.5430000,   -15.7600000,
+            0.0000000,   0.0000000,   0.1138,   -1.0251,   -7.0904,  //! H\H2\OH\H2O
+            0.0000000,   0.0000000,   0.1029,   -0.8896,   -7.2273,
+            0.0000000,   0.0000000,  -0.00421,   0.713,    -12.44,
+            0.0000000,   0.0000000,  -0.097,     2.29,     -19.1,
+            0.0,            0.0,     0.0268142,  0.3177838,  -11.3155513,  //Air
+            0.0000000,   0.0000000,  -0.0577200,   1.5430000,   -15.7600000,  //CH4
+            0.0,            0.0,     0.0268142,  0.3177838,  -11.3155513,  //H2S
+            0.0,            0.0,     0.0268142,  0.3177838,  -11.3155513,  //SO2
+            0.0,            0.0,     0.0268142,  0.3177838,  -11.3155513,  //CL2
+            0.0,            0.0,     0.0268142,  0.3177838,  -11.3155513,  //NH3
+            0.0000000,   0.0000000,  -0.0577200,   1.5430000,   -15.7600000,  //C2H2
+            0.0000000,   0.0000000,  -0.0577200,   1.5430000,   -15.7600000,  //C2H4
+            0.0000000,   0.0000000,  -0.0577200,   1.5430000,   -15.7600000,  //C2H6
+            0.0000000,   0.0000000,  -0.0577200,   1.5430000,   -15.7600000,  //C3H6
+            0.0000000,   0.0000000,  -0.0577200,   1.5430000,   -15.7600000,  //C3H8
+            0.0000000,   0.0000000,  -0.0577200,   1.5430000,   -15.7600000,  //C4H8
+            0.0000000,   0.0000000,  -0.0577200,   1.5430000,   -15.7600000  //C4H10
+        };
+
+        int nIndex = 0;
+        for (int s = 0; s < this->nSpecies; ++ s)
+        {
+            nIndex = s * 5;
+            for (int i = 0; i < 5; ++ i)
+            {
+                this->viscosityFitData[s][i] = curveFitData1[nIndex + i];
+            }
+            nIndex = s * 4;
+            for (int i = 0; i < 4; ++ i)
+            {
+                this->collisionAreaFitData[s][i] = curveFitData2[nIndex + i];
+            }
+        }
+    }
+
+    else
+    {
+        RDouble curveFitData1[165] = {
+            0.0,   0.0,    0.0205,   0.4257,  -11.5803,
+            0.0,   0.0,    0.0484,  -0.1455,  -8.9231,
+            0.0,   0.0,    0.0452,  -0.0609,  -9.4596,
+            0.0,   0.0,    0.0120,   0.5930,  -12.3805,
+            0.0,   0.0,    0.0,      2.5,     -32.3606,
+            0.0,   0.0,    0.0,      2.5,     -32.0148,
+            0.0,   0.0,    0.0,      2.5,     -32.0453,
+            0.0,   0.0,    0.0,      2.5,     -32.4285,
+            0.0,   0.0,    0.0,      2.5,     -32.0827,
+            0.0,   0.0,    0.0203,   0.4329,  -11.8153,
+            0.0,   0.0,    0.0,      2.5,     -37.4475,
+            0.0,   0.0,  -0.00611,   0.7385,  -12.7100,
+            0.0,   0.0,  -0.02729,   1.0640,  -14.0300,
+            0.0,   0.0,  -0.02572,   1.0400,  -13.8600,
+            0.0,   0.0,  -0.03242,   1.1430,  -14.1700,
+            0.0,   0.0,  -0.05772,   1.5430,  -15.7600,
+            0.0,   0.0,   0.1138,   -1.0251,  -7.0904,  //! H\H2\OH\H2O
+            0.0,   0.0,   0.1029,   -0.8896,  -7.2273,
+            0.0,   0.0,  -0.00421,   0.713,   -12.44,
+            0.0,   0.0,  -0.097,     2.29,    -19.1,
+            0.0,            0.0,     0.0268142,  0.3177838,  -11.3155513,  //Air
+            0.0000000,   0.0000000,  -0.0577200,   1.5430000,   -15.7600000,  //CH4
+            0.0,            0.0,     0.0268142,  0.3177838,  -11.3155513,  //H2S
+            0.0,            0.0,     0.0268142,  0.3177838,  -11.3155513,  //SO2
+            0.0,            0.0,     0.0268142,  0.3177838,  -11.3155513,  //CL2
+            0.0,            0.0,     0.0268142,  0.3177838,  -11.3155513,  //NH3
+            0.0000000,   0.0000000,  -0.0577200,   1.5430000,   -15.7600000,  //C2H2
+            0.0000000,   0.0000000,  -0.0577200,   1.5430000,   -15.7600000,  //C2H4
+            0.0000000,   0.0000000,  -0.0577200,   1.5430000,   -15.7600000,  //C2H6
+            0.0000000,   0.0000000,  -0.0577200,   1.5430000,   -15.7600000,  //C3H6
+            0.0000000,   0.0000000,  -0.0577200,   1.5430000,   -15.7600000,  //C3H8
+            0.0000000,   0.0000000,  -0.0577200,   1.5430000,   -15.7600000,  //C4H8
+            0.0000000,   0.0000000,  -0.0577200,   1.5430000,   -15.7600000  //C4H10
+        };
+        int nIndex = 0;
+        for (int s = 0; s < this->nSpecies; ++ s)
+        {
+            nIndex = s * 5;
+            for (int i = 0; i < 5; ++ i)
+            {
+                this->viscosityFitData[s][i] = curveFitData1[nIndex + i];
+            }
+            nIndex = s * 4;
+            for (int i = 0; i < 4; ++ i)
+            {
+                this->collisionAreaFitData[s][i] = curveFitData2[nIndex + i];
+            }
+        }
+    }
+}
+
+void TransportFitData::CreateTransportFitData(vector<string> &namelist, TransportFitData *pNewData)
+{
+    if (this->nSpecies <= 0)
+        return;
+    int nTargetSpecies = static_cast<int>(namelist.size());
+    if (nTargetSpecies <= 0)
+        return;
+
+    //Record the new index of the source species in the new model.
+    int flag[100];
+    for (int s = 0; s < this->nSpecies; ++ s)
+    {
+        flag[s] = SearchSpeciesInNameList(speciesName[s], namelist);
+    }
+
+    //Generate the new curve fitting data.
+    pNewData->SetSpeciesNumber(nTargetSpecies);
+    string *targetName = pNewData->GetSpeciesNames();
+    for (int s = 0; s < nTargetSpecies; ++ s)
+    {
+        targetName[s] = namelist[s];
+    }
+    RDouble **targetViscosityFitData = pNewData->GetViscosityCurveFittingData();
+    RDouble **targetCollisionAreaFitData = pNewData->GetCollisionAreaCurveFittingData();
+
+    int nIndex = -1;
+    for (int s = 0; s < this->nSpecies; ++ s)
+    {
+        nIndex = flag[s];
+        if (nIndex == -1)
+            continue;
+        for (int i = 0; i < 5; ++ i)
+        {
+            targetViscosityFitData[nIndex][i] = this->viscosityFitData[s][i];
+        }
+        for (int i = 0; i < 4; ++ i)
+        {
+            targetCollisionAreaFitData[nIndex][i] = this->collisionAreaFitData[s][i];
+        }
+    }
+}
+
+//============================================================
+AtmosphereData::AtmosphereData()
+{
+    nSpecies = 0;
+    speciesName = NULL;
+    nSpeciesType = NULL;
+    nSpeciesCharge = NULL;
+    speciesMass = NULL;
+    nSpeciesG0 = NULL;
+    nSpeciesG1 = NULL;
+    speciesTtr = NULL;
+    speciesTes = NULL;
+    speciesSigma = NULL;
+    speciesEnthalpy = NULL;
+    speciesVibrationalModeData = NULL;
+}
+
+AtmosphereData::~AtmosphereData()
+{
+    DeAllocateMemories();
+}
+
+void AtmosphereData::AllocateMemories()
+{
+    if (this->nSpecies <= 0)
+        return;
+    speciesName = new string[nSpecies];
+    nSpeciesType = new int[nSpecies];
+    nSpeciesCharge = new int[nSpecies];
+    nSpeciesG0 = new int[nSpecies];
+    nSpeciesG1 = new int[nSpecies];
+    speciesMass = new RDouble[nSpecies];
+    speciesTtr = new RDouble[nSpecies];
+    speciesTes = new RDouble[nSpecies];
+    speciesSigma = new RDouble[nSpecies];
+    speciesEnthalpy = new RDouble[nSpecies];
+    speciesVibrationalModeData = new VibrationModeData[nSpecies];
+}
+
+void AtmosphereData::DeAllocateMemories()
+{
+    if (this->nSpecies <= 0)
+        return;
+    delete [] speciesName;
+    delete [] nSpeciesType;
+    delete [] nSpeciesCharge;
+    delete [] nSpeciesG0;
+    delete [] nSpeciesG1;
+    delete [] speciesMass;
+    delete [] speciesTtr;
+    delete [] speciesTes;
+    delete [] speciesEnthalpy;
+    delete [] speciesSigma;
+    delete [] speciesVibrationalModeData;
+
+    nSpecies = 0;
+    speciesName = NULL;
+    nSpeciesType = NULL;
+    nSpeciesCharge = NULL;
+    speciesMass = NULL;
+    nSpeciesG0 = NULL;
+    nSpeciesG1 = NULL;
+    speciesTtr = NULL;
+    speciesTes = NULL;
+    speciesEnthalpy = NULL;
+    speciesSigma = NULL;
+    speciesVibrationalModeData = NULL;
+}
+
+void AtmosphereData::SetSpeciesNumber(int ns)
+{
+    if (ns <= 0 || ns == this->nSpecies)
+        return;
+    DeAllocateMemories();
+
+    this->nSpecies = ns;
+    AllocateMemories();
+}
+
+void AtmosphereData::GenerateFullPhysicalChemicalData()
+{
+    //! the order of species is O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-, C, C2, CN, CO, CO2, H, H2, OH, H2O.
+    this->SetSpeciesNumber(33);
+    speciesName[0] = "O";
+    speciesName[1] = "O2";
+    speciesName[2] = "NO";
+    speciesName[3] = "N";
+    speciesName[4] = "O+";
+    speciesName[5] = "O2+";
+    speciesName[6] = "NO+";
+    speciesName[7] = "N+";
+    speciesName[8] = "N2+";
+    speciesName[9] = "N2";
+    speciesName[10] = "e-";
+    speciesName[11] = "C";
+    speciesName[12] = "C2";
+    speciesName[13] = "CN";
+    speciesName[14] = "CO";
+    speciesName[15] = "CO2";
+    speciesName[16] = "H";
+    speciesName[17] = "H2";
+    speciesName[18] = "OH";
+    speciesName[19] = "H2O";
+    speciesName[20] = "Air";
+    speciesName[21] = "CH4";
+    speciesName[22] = "H2S";
+    speciesName[23] = "SO2";
+    speciesName[24] = "CL2";
+    speciesName[25] = "NH3";
+    speciesName[26] = "C2H2";
+    speciesName[27] = "C2H4";
+    speciesName[28] = "C2H6";
+    speciesName[29] = "C3H6";
+    speciesName[30] = "C3H8";
+    speciesName[31] = "C4H8";
+    speciesName[32] = "C4H10";
+
+    int IndexCO2 = 15;
+    // The type and charge of species.
+    int data1[132] = {
+        //The type.
+        1,  2,  2,  1,  1,  2,  2,  1,  2,  2,  0,  1,  2,  2,  2,  2,  1,  2,  2,  2,  2,  2,  2,  2,  2,  2,  2,  2,  2,  2,  2,  2,  2,
+        //The Charge.
+        0,  0,  0,  0,  1,  1,  1,  1,  1,  0, -1,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
+        //The g0.
+        9,  3,  4,  9,  4,  4,  1,  9,  2,  1,  0,  9,  6,  2,  1,  1,  2,  1,  4,  2,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,
+        //The g1.
+        5,  2,  8, 10, 10, 10,  3,  5,  4,  3,  0,  5,  6,  4,  6,  2,  6,  1,  2,  2,  3,  4,  4,  4,  4,  4,  4,  4,  4,  4,  4,  4,  4
+    };
+    // The other parameter.
+    RDouble data2[198] = {
+        //The molecular weight.
+        15.9994, 31.9988, 30.00614, 14.00674, 15.99885, 31.99825, 30.00564, 14.00619, 28.01293, 28.01348, 5.486e-4, 12.011, 24.022, 26.01774, 28.01, 44.01, 1.0, 2.0, 16.999, 17.999, 28.946, 16.043, 34.076, 64.054, 70.905, 17.031, 26.073, 28.054, 30.070, 42.0797, 44.0956, 56.10, 58.122,
+        //The the characteristic temperature.
+        216.0, 37.0, 106.7, 260.0, 216.0, 37.0, 106.7, 260.0, 106.7, 106.7, 106.7, 216.0, 216.0, 216.0, 216.0, 216.0, 216.0, 216.0, 216.0, 216.0, 216.0, 216.0, 216.0, 216.0, 216.0, 216.0, 216.0, 216.0, 216.0, 216.0, 216.0, 216.0, 216.0,
+        //The characteristic vibrational Temperature.
+        0.0, 2239.0, 2699.0, 0.0, 0.0, 2652.0, 3373.0, 0.0, 3129.0, 3353.0, 0.0, 0.0, 2362.0, 2976, 3074, 945.0, 0.0, 6326.0, 5375.0, 2295.0, 3353.0, 945.0, 945.0, 945.0, 945.0, 945.0, 945.0, 945.0, 945.0, 945.0, 945.0, 945.0, 945.0,
+        //The characteristic electronic temperature.
+        22890.0, 11390.0, 55874.0, 27670.0, 38610.0, 47460.0, 75140.0, 22052.0, 13200.0, 72225.0, 0.0, 14670.0, 27800.0, 13300.0, 70060.0, 66200.0, 118370.0, 132000.0, 47030.0, 77420.0, 72225.0, 66200.0, 66200.0, 66200.0, 66200.0, 66200.0, 66200.0, 66200.0, 66200.0, 66200.0, 66200.0, 66200.0, 66200.0,
+        //The collision area.
+        3.1177e-19, 7.0149e-20, 1.6178e-19, 3.2471e-19, 1.5151e-15, 5.1636e-14, 6.2090e-15, 1.0457e-15, 6.2090e-15, 1.8273e-19, 6.2090e-15, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19, 3.1177e-19,
+        //The product enthalpy.
+        1.556308E+07, 0.0, 3.012717E+06, 3.376946E+07, 9.813204E+07, 3.656450E+07, 3.309383E+07, 1.342264E+08, 5.461763E+07, 0.0, 0.0, 5.919574E+07, 3.421863E+07, 1.679623E+07, -4.069975E+06, -8.929789E+06, 2.1800E+08, 0.0, 2.1954E+06, -1.34519E+07, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0
+    };
+
+    int **dataArray1 = NewPointer2 <int> (4, nSpecies);
+    RDouble **dataArray2 = NewPointer2 <RDouble> (6, nSpecies);
+    int nIndex = 0;
+    for (int i = 0; i < 4; ++ i)
+    {
+        nIndex = i * nSpecies;
+        for (int s = 0; s < nSpecies; ++ s)
+        {
+            dataArray1[i][s] = data1[nIndex + s];
+        }
+    }
+    for (int i = 0; i < 6; ++ i)
+    {
+        nIndex = i * nSpecies;
+        for (int s = 0; s < nSpecies; ++ s)
+        {
+            dataArray2[i][s] = data2[nIndex + s];
+        }
+    }
+    for (int s = 0; s < this->nSpecies; ++ s)
+    {
+        this->nSpeciesType[s] = dataArray1[0][s];
+        this->nSpeciesCharge[s] = dataArray1[1][s];
+        this->nSpeciesG0[s] = dataArray1[2][s];
+        this->nSpeciesG1[s] = dataArray1[3][s];
+
+        this->speciesMass[s] = dataArray2[0][s];
+        this->speciesTtr[s] = dataArray2[1][s];
+        this->speciesTes[s] = dataArray2[3][s];
+        this->speciesSigma[s] = dataArray2[4][s];
+        this->speciesEnthalpy[s] = dataArray2[5][s];
+    }
+    for (int s = 0; s < this->nSpecies; ++ s)
+    {
+        this->speciesVibrationalModeData[s].nMode = 1;
+        this->speciesVibrationalModeData[s].g[0] = 1;
+        this->speciesVibrationalModeData[s].Tv[0] = dataArray2[2][s];
+    }
+
+    //The CO2
+    this->speciesVibrationalModeData[IndexCO2].nMode = 3;
+    this->speciesVibrationalModeData[IndexCO2].g[0] = 2;
+    this->speciesVibrationalModeData[IndexCO2].g[1] = 1;
+    this->speciesVibrationalModeData[IndexCO2].g[2] = 1;
+    this->speciesVibrationalModeData[IndexCO2].Tv[0] = 945.0;
+    this->speciesVibrationalModeData[IndexCO2].Tv[1] = 1903.0;
+    this->speciesVibrationalModeData[IndexCO2].Tv[2] = 3329.0;
+
+    DelPointer2(dataArray1);
+    DelPointer2(dataArray2);
+}
+
+void AtmosphereData::CreateAtmosphereData(vector<string> &namelist, AtmosphereData *pNewData)
+{
+    if (this->nSpecies <= 0)
+        return;
+    int nTargetSpecies = static_cast<int>(namelist.size());
+    if (nTargetSpecies <= 0)
+        return;
+
+    //Record the new index of the source species in the new model.
+    int flag[100];
+    for (int s = 0; s < this->nSpecies; ++ s)
+    {
+        flag[s] = SearchSpeciesInNameList(speciesName[s], namelist);
+    }
+
+    //Generate the new data.
+    pNewData->SetSpeciesNumber(nTargetSpecies);
+    string *targetName = pNewData->GetSpeciesNames();
+    for (int s = 0; s < nTargetSpecies; ++ s)
+    {
+        targetName[s] = namelist[s];
+    }
+    int *targetType = pNewData->GetSpeciesType();
+    int *targetCharge = pNewData->GetSpeciesCharge();
+    int *targetG0 = pNewData->GetSpeciesDegeneracy0();
+    int *targetG1 = pNewData->GetSpeciesDegeneracy1();
+    RDouble *targetMass = pNewData->GetSpeciesMolecularWeight();
+    RDouble *targetT = pNewData->GetSpeciesTemperature();
+    VibrationModeData *targetTv = pNewData->GetSpeciesVibrationalModeData();
+    RDouble *targetTe = pNewData->GetSpeciesElectronTemperature();
+    RDouble *targetH0 = pNewData->GetSpeciesFormationEnthalpy();
+    RDouble *targetSigma = pNewData->GetSpeciesCollisionArea();
+    //Reconstruct.
+    int nIndex = -1;
+    for (int s = 0; s < this->nSpecies; ++ s)
+    {
+        nIndex = flag[s];
+        if (nIndex == -1)
+            continue;
+        targetType[nIndex] = this->nSpeciesType[s];
+        targetCharge[nIndex] = this->nSpeciesCharge[s];
+        targetG0[nIndex] = this->nSpeciesG0[s];
+        targetG1[nIndex] = this->nSpeciesG1[s];
+
+        targetMass[nIndex] = this->speciesMass[s];
+        targetT[nIndex] = this->speciesTtr[s];
+        targetTe[nIndex] = this->speciesTes[s];
+        targetSigma[nIndex] = this->speciesSigma[s];
+        targetH0[nIndex] = this->speciesEnthalpy[s];
+        targetTv[nIndex] = this->speciesVibrationalModeData[s];
+    }
+}
+}// end of GAS_SPACE
+}// end of PHSPACE
\ No newline at end of file
diff --git a/API/MultiSpecies/src/MixedGas.cpp b/API/MultiSpecies/src/MixedGas.cpp
new file mode 100644
index 0000000..45d1c2b
--- /dev/null
+++ b/API/MultiSpecies/src/MixedGas.cpp
@@ -0,0 +1,7119 @@
+#include "MixedGas.h"
+#include "Constants.h"
+#include "PHMatrix.h"
+#include "TK_Exit.h"
+#include "TK_Parse.h"
+#include "Glb_Dimension.h"
+#include "Geo_SimpleBC.h"
+#include "TK_Log.h"
+#include "PHIO.h"
+#pragma warning(disable:6386)
+#pragma warning(disable:4100)
+#pragma warning(disable:4701)
+#pragma warning(disable:26451)
+
+namespace PHSPACE
+{
+namespace GAS_SPACE
+{
+
+ThermodynamicFunction::ThermodynamicFunction()
+{
+    number_of_polynomial_coefficient = 0;
+    polynomial_coefficient = 0;
+    number_of_temperature_interval = 0;
+    enthalpyFitCoefficient = 0;
+    polynomial_coefficientT2 = 0;
+}
+
+ThermodynamicFunction::~ThermodynamicFunction()
+{
+    delete [] enthalpyFitCoefficient;
+    DelPointer2(polynomial_coefficient);
+    DelPointer2(polynomial_coefficientT2);
+}
+
+void ThermodynamicFunction::Init(int number_of_temperature_interval, int number_of_polynomial_coefficient)
+{
+    this->number_of_temperature_interval   = number_of_temperature_interval;
+    this->number_of_polynomial_coefficient = number_of_polynomial_coefficient;
+    polynomial_coefficient = NewPointer2<RDouble>(number_of_temperature_interval, number_of_polynomial_coefficient);
+    enthalpyFitCoefficient = new RDouble[number_of_polynomial_coefficient];
+    polynomial_coefficientT2 = NewPointer2<RDouble>(number_of_temperature_interval + 1, number_of_polynomial_coefficient);
+}
+
+void ThermodynamicFunction::ReadPolynomialCoefficient(fstream &file)
+{
+    string line, word;
+    string separator  = " =\t\r\n#$,;\"'";
+
+    for (int i_interval = 0; i_interval < number_of_temperature_interval; ++ i_interval)
+    {
+        getline(file, line);
+
+        RDouble *coef = this->GetPolynomialCoefficient(i_interval);
+
+        for (int icoef = 0; icoef < number_of_polynomial_coefficient; ++ icoef)
+        {
+            line = FindNextWord(line, word, separator);
+            from_string< RDouble >(coef[icoef], word, std::dec);
+        }
+    }
+}
+
+void ThermodynamicFunction::CreatePolynomialCoefficient(RDouble **curveFitData, RDouble **curveFitDataT2, RDouble *enthalpyFitData)
+{
+    for (int m = 0; m < number_of_temperature_interval; ++ m)
+    {
+        RDouble *coef = this->GetPolynomialCoefficient(m);
+
+        for (int n = 0; n < number_of_polynomial_coefficient; ++ n)
+        {
+            coef[n] = curveFitData[m][n];
+        }
+    }
+    //The curve fit data for the two-temperature model.
+    for (int m = 0; m < number_of_temperature_interval + 1; ++ m)
+    {
+        RDouble *coef = this->GetPolynomialCoefficientT2(m);
+
+        for (int n = 0; n < number_of_polynomial_coefficient; ++ n)
+        {
+            coef[n] = curveFitDataT2[m][n];
+        }
+    }
+
+    for (int n = 0; n < number_of_polynomial_coefficient; ++ n)
+    {
+        enthalpyFitCoefficient[n] = enthalpyFitData[n];
+    }
+}
+
+void ThermodynamicFunction::ReadPolynomialCoefficient(DataContainer *cdata)
+{
+    for (int i_interval = 0; i_interval < number_of_temperature_interval; ++ i_interval)
+    {
+        RDouble *coef = this->GetPolynomialCoefficient(i_interval);
+
+        for (int icoef = 0; icoef < number_of_polynomial_coefficient; ++ icoef)
+        {
+            cdata->read(&coef[icoef], sizeof(RDouble));
+        }
+    }
+    //The curve fit data for the two-temperature model.
+    for (int i_interval = 0; i_interval < number_of_temperature_interval + 1; ++ i_interval)
+    {
+        RDouble *coef = this->GetPolynomialCoefficientT2(i_interval);
+
+        for (int icoef = 0; icoef < number_of_polynomial_coefficient; ++ icoef)
+        {
+            cdata->read(&coef[icoef], sizeof(RDouble));
+        }
+    }
+
+    for (int icoef = 0; icoef < number_of_polynomial_coefficient; ++ icoef)
+    {
+        cdata->read(&enthalpyFitCoefficient[icoef], sizeof(RDouble));
+    }
+}
+
+void ThermodynamicFunction::WritePolynomialCoefficient(DataContainer *cdata)
+{
+    for (int i_interval = 0; i_interval < number_of_temperature_interval; ++ i_interval)
+    {
+        RDouble *coef = this->GetPolynomialCoefficient(i_interval);
+
+        for (int icoef = 0; icoef < number_of_polynomial_coefficient; ++ icoef)
+        {
+            cdata->append(&coef[icoef], sizeof(RDouble));
+        }
+    }
+    //The curve fit data for the two-temperature model.
+    for (int i_interval = 0; i_interval < number_of_temperature_interval + 1; ++ i_interval)
+    {
+        RDouble *coef = this->GetPolynomialCoefficientT2(i_interval);
+
+        for (int icoef = 0; icoef < number_of_polynomial_coefficient; ++ icoef)
+        {
+            cdata->append(&coef[icoef], sizeof(RDouble));
+        }
+    }
+
+    for (int icoef = 0; icoef < number_of_polynomial_coefficient; ++ icoef)
+    {
+        cdata->append(&enthalpyFitCoefficient[icoef], sizeof(RDouble));
+    }
+}
+
+ThermodynamicManager::ThermodynamicManager()
+{
+    thermoDynamicFunction = 0;
+    temperatureRange = 0;
+    temperatureStart = 0;
+}
+
+ThermodynamicManager::~ThermodynamicManager()
+{
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        delete thermoDynamicFunction[ispecies];
+    }
+    delete [] thermoDynamicFunction;
+    delete [] temperatureRange;
+    delete [] temperatureStart;
+}
+
+void ThermodynamicManager::Init(int numberOfSpecies)
+{
+    this->numberOfSpecies = numberOfSpecies;
+    thermoDynamicFunction = new ThermodynamicFunction * [numberOfSpecies];
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        thermoDynamicFunction[ispecies] = new ThermodynamicFunction();
+    }
+}
+
+void ThermodynamicManager::Read(fstream &file)
+{
+    string line, word;
+    string separator = " =\t\r\n#$,;\"'";
+
+    //! Read the number of thermodynamic temperature polynomial coefficients of species.
+    SkipLines(file, 3);
+    getline(file, line);
+
+    //! numberofpolynomialcoefficient is the number of polynomial coefficients(a1-a7,or a1-a6).
+
+    line = FindNextWord(line, word, separator);
+    from_string< int >(numberOfTemperatureInterval, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string< int >(numberofpolynomialcoefficient, word, std::dec);
+
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        thermoDynamicFunction[ispecies]->Init(numberOfTemperatureInterval, numberofpolynomialcoefficient);
+    }
+
+    temperatureRange = new RDouble[numberOfTemperatureInterval+1];
+
+    //! Read the thermodynamic temperature polynomial coefficients,temperature range and so on of species.
+    SkipLines(file, 4);
+    getline(file, line);
+
+    for (int m = 0; m < numberOfTemperatureInterval + 1; ++ m)
+    {
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(temperatureRange[m], word, std::dec);
+    }
+
+    SkipLines(file, 2);
+
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        SkipLines(file, 3);
+        thermoDynamicFunction[ispecies]->ReadPolynomialCoefficient(file);
+    }
+}
+
+void ThermodynamicManager::GenerateData(vector<string> &namelist)
+{
+    ChemkinFitData myChemkinData;
+    ChemkinFitData *currentData = new ChemkinFitData();
+
+    myChemkinData.GenerateFullChemkinData();
+    myChemkinData.CreateChemkinFitData(namelist, currentData);
+
+    //! To obtain the basic information of interpolation.
+    int nSpecies, nInterval, nCoefNum;
+    currentData->GetInterpolationInfo(nSpecies, nInterval, nCoefNum);
+    numberOfSpecies = nSpecies;
+    numberOfTemperatureInterval = nInterval;
+    numberofpolynomialcoefficient = nCoefNum;
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        thermoDynamicFunction[ispecies]->Init(numberOfTemperatureInterval, numberofpolynomialcoefficient);
+    }
+
+    //! To obtain the temperature range of interpolation.
+    RDouble *temperatures = currentData->GetTemperatureRange();
+    temperatureRange = new RDouble[numberOfTemperatureInterval + 1];
+    for (int m = 0; m < numberOfTemperatureInterval + 1; ++ m)
+    {
+        temperatureRange[m] = temperatures[m];
+    }
+
+    //! To obtain the curve fitting data of interpolation of each species.
+    RDouble ***curveFittingData = currentData->GetCurveFittingData();
+    RDouble ***curveFittingDataT2 = currentData->GetCurveFittingDataT2();
+    RDouble **curveFitData = NewPointer2 <RDouble> (numberOfTemperatureInterval, numberofpolynomialcoefficient);
+    RDouble **curveFitDataT2 = NewPointer2 <RDouble> (numberOfTemperatureInterval + 1, numberofpolynomialcoefficient);
+    RDouble *tmpFitData = new RDouble[numberofpolynomialcoefficient];
+    RDouble **enthalpyFitData = currentData->GetEnthalpyFitData();
+    RDouble *benckmarkT2 = currentData->GetStartTemperature();
+    temperatureStart = new RDouble [numberOfSpecies];
+
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        temperatureStart[ispecies] = benckmarkT2[ispecies];
+
+        for (int m = 0; m < numberOfTemperatureInterval; ++ m)
+        {
+            for (int n = 0; n < numberofpolynomialcoefficient; ++ n)
+            {
+                curveFitData[m][n] = curveFittingData[ispecies][m][n];
+            }
+        }
+
+        for (int n = 0; n < numberofpolynomialcoefficient; ++ n)
+        {
+            tmpFitData[n] = enthalpyFitData[ispecies][n];
+        }
+
+        for (int m = 0; m < numberOfTemperatureInterval + 1; ++ m)
+        {
+            for (int n = 0; n < numberofpolynomialcoefficient; ++ n)
+            {
+                curveFitDataT2[m][n] = curveFittingDataT2[ispecies][m][n];
+            }
+        }
+        thermoDynamicFunction[ispecies]->CreatePolynomialCoefficient(curveFitData, curveFitDataT2, tmpFitData);
+    }
+
+    delete [] tmpFitData;
+    DelPointer2(curveFitData);
+    DelPointer2(curveFitDataT2);
+    delete currentData;
+}
+
+void ThermodynamicManager::Read(DataContainer *cdata)
+{
+    cdata->read(&numberOfTemperatureInterval, sizeof(int));
+    cdata->read(&numberofpolynomialcoefficient, sizeof(int));
+
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        thermoDynamicFunction[ispecies]->Init(numberOfTemperatureInterval, numberofpolynomialcoefficient);
+    }
+
+    temperatureStart = new RDouble [numberOfSpecies];
+    cdata->read(temperatureStart, numberOfSpecies * sizeof(RDouble));
+
+    temperatureRange = new RDouble[numberOfTemperatureInterval + 1];
+    cdata->read(temperatureRange, (numberOfTemperatureInterval + 1) * sizeof(RDouble));
+
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        thermoDynamicFunction[ispecies]->ReadPolynomialCoefficient(cdata);
+    }
+}
+
+void ThermodynamicManager::Write(DataContainer *cdata)
+{
+    cdata->append(&numberOfTemperatureInterval, sizeof(int));
+    cdata->append(&numberofpolynomialcoefficient, sizeof(int));
+    cdata->append(temperatureStart, numberOfSpecies * sizeof(RDouble));
+    cdata->append(temperatureRange, (numberOfTemperatureInterval + 1) * sizeof(RDouble));
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        thermoDynamicFunction[ispecies]->WritePolynomialCoefficient(cdata);
+    }
+}
+
+RDouble * ThermodynamicManager::GetPolynomialCoefficient(int iSpecies, int iTemperature)
+{
+    return thermoDynamicFunction[iSpecies]->GetPolynomialCoefficient(iTemperature);
+}
+
+RDouble * ThermodynamicManager::GetPolynomialCoefficientT2(int iSpecies, int iTemperature)
+{
+    return thermoDynamicFunction[iSpecies]->GetPolynomialCoefficientT2(iTemperature);
+}
+
+RDouble * ThermodynamicManager::GetEnthalpyFitCoefficient(int iSpecies)
+{
+    return thermoDynamicFunction[iSpecies]->GetEnthalpyFitCoefficient();
+}
+
+void ThermodynamicManager::GetTemperatureRangeIndex(const RDouble &temperature_dimensional, int &indexOfTemperatureRange)
+{
+    //! Avoid abnormal situations.
+    indexOfTemperatureRange = 0;
+    if (temperatureRange[0] >= temperature_dimensional)
+    {
+        indexOfTemperatureRange = 0;
+    }
+    else if (temperatureRange[numberOfTemperatureInterval] <= temperature_dimensional)
+    {
+        indexOfTemperatureRange = numberOfTemperatureInterval - 1;
+    }
+    else
+    {
+        for (int i = 0; i < numberOfTemperatureInterval; ++ i)
+        {
+            if ((temperatureRange[i] < temperature_dimensional) && (temperature_dimensional <= temperatureRange[i+1]))
+            {
+                indexOfTemperatureRange = i;
+                return;
+            }
+        }
+    }
+    return;
+}
+
+RDouble ThermodynamicManager::GetTemperatureMin()
+{
+    return temperatureRange[0];
+}
+
+RDouble ThermodynamicManager::GetTemperatureMax()
+{
+    return temperatureRange[numberOfTemperatureInterval];
+}
+
+int ThermodynamicManager::GetNumberofPolynomialCoefficient()
+{
+    return this->numberofpolynomialcoefficient;
+}
+
+RDouble ThermodynamicManager::GetBenchmarkTemperature(int iSpecies)
+{
+    return temperatureStart[iSpecies];
+}
+
+ReactionRate::ReactionRate()
+{
+    numberOfReaction = 0;
+    afr = 0;
+    bfr = 0;
+    cfr = 0;
+
+    abr = 0;
+    bbr = 0;
+    cbr = 0;
+}
+
+ReactionRate::~ReactionRate()
+{
+    delete [] afr;
+    delete [] bfr;
+    delete [] cfr;
+
+    delete [] abr;
+    delete [] bbr;
+    delete [] cbr;
+}
+
+void ReactionRate::Init(int numberOfReaction)
+{
+    this->numberOfReaction = numberOfReaction;
+
+    afr = new RDouble [numberOfReaction];
+    bfr = new RDouble [numberOfReaction];
+    cfr = new RDouble [numberOfReaction];
+
+    abr = new RDouble [numberOfReaction];
+    bbr = new RDouble [numberOfReaction];
+    cbr = new RDouble [numberOfReaction];
+}
+
+void ReactionRate::Read(fstream &file)
+{
+    string line, word;
+    string separator = " =\t\r\n#$,;\"'";
+
+    if (numberOfReaction <= 0) return;
+
+    //! Read the forward and reverse reaction rate coefficients of each chemical reaction.
+    SkipLines(file, 3);
+    for (int irection = 0; irection < numberOfReaction; ++ irection)
+    {
+        getline(file, line);
+        //! Read irtmp.
+        line = FindNextWord(line, word, separator);
+
+        line = FindNextWord(line, word, separator);
+        from_string <RDouble> (afr[irection], word, std::dec);
+
+        line = FindNextWord(line, word, separator);
+        from_string <RDouble> (bfr[irection], word, std::dec);
+
+        line = FindNextWord(line, word, separator);
+        from_string <RDouble> (cfr[irection], word, std::dec);
+
+        line = FindNextWord(line, word, separator);
+        from_string <RDouble> (abr[irection], word, std::dec);
+
+        line = FindNextWord(line, word, separator);
+        from_string <RDouble> (bbr[irection], word, std::dec);
+
+        line = FindNextWord(line, word, separator);
+        from_string <RDouble> (cbr[irection], word, std::dec);
+    }
+}
+
+void ReactionRate::Create(RDouble **reationCoef)
+{
+    for (int r = 0; r < numberOfReaction; ++ r)
+    {
+        afr[r] = reationCoef[r][0];
+        bfr[r] = reationCoef[r][1];
+        cfr[r] = reationCoef[r][2];
+
+        abr[r] = reationCoef[r][3];
+        bbr[r] = reationCoef[r][4];
+        cbr[r] = reationCoef[r][5];
+    }
+}
+
+void ReactionRate::Read(DataContainer *cdata)
+{
+    cdata->read(afr, numberOfReaction * sizeof(RDouble));
+    cdata->read(bfr, numberOfReaction * sizeof(RDouble));
+    cdata->read(cfr, numberOfReaction * sizeof(RDouble));
+                                        
+    cdata->read(abr, numberOfReaction * sizeof(RDouble));
+    cdata->read(bbr, numberOfReaction * sizeof(RDouble));
+    cdata->read(cbr, numberOfReaction * sizeof(RDouble));
+}
+
+void ReactionRate::Write(DataContainer *cdata)
+{
+    cdata->append(afr, numberOfReaction * sizeof(RDouble));
+    cdata->append(bfr, numberOfReaction * sizeof(RDouble));
+    cdata->append(cfr, numberOfReaction * sizeof(RDouble));
+
+    cdata->append(abr, numberOfReaction * sizeof(RDouble));
+    cdata->append(bbr, numberOfReaction * sizeof(RDouble));
+    cdata->append(cbr, numberOfReaction * sizeof(RDouble));
+}
+
+StoichiometricEquation::StoichiometricEquation()
+{
+    cvp = 0;
+    cvn = 0;
+    cpz = 0;
+    numberOfReaction = 0;
+    numberOfSpecies = 0;
+
+    reactionType = 0;
+    isCollisionType = 0;
+}
+
+StoichiometricEquation::~StoichiometricEquation()
+{
+    DelPointer2(cvp);
+    DelPointer2(cvn);
+    DelPointer2(cpz);
+
+    delete [] reactionType;
+    delete [] isCollisionType;
+}
+
+void StoichiometricEquation::Init(int numberOfReaction, int numberOfSpecies)
+{
+    this->numberOfReaction = numberOfReaction;
+    this->numberOfSpecies  = numberOfSpecies ;
+
+    reactionType = new int[numberOfReaction];
+    isCollisionType = new bool[numberOfReaction];
+
+    cvp = NewPointer2<int> (numberOfReaction, numberOfSpecies);
+    cvn = NewPointer2<int> (numberOfReaction, numberOfSpecies);
+    cpz = NewPointer2<RDouble> (numberOfReaction, numberOfSpecies);
+}
+
+void StoichiometricEquation::Read(fstream &file)
+{
+    string line, word;
+    string separator = " =\t\r\n#$,;\"'";
+
+    if (numberOfReaction <= 0) return;
+
+    SkipLines(file, 4);
+
+    //! Read chemical reaction equation coefficients of species.
+    for (int irection = 0; irection < numberOfReaction; ++ irection)
+    {
+        getline(file, line);
+        //! Read irtmp.
+        line = FindNextWord(line, word, separator);
+
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            line = FindNextWord(line, word, separator);
+            from_string< int >(cvp[irection][ispecies], word, std::dec);
+        }
+    }
+
+    SkipLines(file, 4);
+    //! Read chemical reaction equation coefficients of species.
+    for (int irection = 0; irection < numberOfReaction; ++ irection)
+    {
+        getline(file, line);
+        //! Read irtmp.
+        line = FindNextWord(line, word, separator);
+
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            line = FindNextWord(line, word, separator);
+            from_string< int >(cvn[irection][ispecies], word, std::dec);
+        }
+    }
+
+    SkipLines(file, 4);
+    //! Read chemical reaction equation coefficients of each collision body.
+    for (int irection = 0; irection < numberOfReaction; ++ irection)
+    {
+        getline(file, line);
+        //! Read irtmp.
+        line = FindNextWord(line, word, separator);
+
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            line = FindNextWord(line, word, separator);
+            from_string< RDouble >(cpz[irection][ispecies], word, std::dec);
+        }
+    }
+
+    //Read the types of chemical reactions.
+    SkipLines(file, 3);
+    getline(file, line);
+    for (int irection = 0; irection < numberOfReaction; ++ irection)
+    {
+        line = FindNextWord(line, word, separator);
+        from_string<int>(reactionType[irection], word, std::dec);
+
+        isCollisionType[irection] = 0;
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            //Determine whether the third collision body exists.
+            if (cpz[irection][ispecies] > 0.0) 
+            {
+                isCollisionType[irection] = 1;
+                break;
+            }
+        }
+    }
+}
+
+void StoichiometricEquation::Create(int **forwardCoef, int **backwardCoef, RDouble **collisionCoef, int **reactionFlag)
+{
+    //! To create the coefficient of forward reaction equation.
+    for (int r = 0; r < numberOfReaction; ++ r)
+    {
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            cvp[r][s] = forwardCoef[r][s];
+        }
+    }
+
+    //! To create the coefficient of backward reaction equation.
+    for (int r = 0; r < numberOfReaction; ++ r)
+    {
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            cvn[r][s] = backwardCoef[r][s];
+        }
+    }
+
+    //! To create the coefficient of the third collision body in the reaction equation.
+    for (int r = 0; r < numberOfReaction; ++ r)
+    {
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            cpz[r][s] = collisionCoef[r][s];
+        }
+    }
+
+    //! To generate the types of chemical reactions.
+    for (int r = 0; r < numberOfReaction; ++ r)
+    {
+        reactionType[r] = reactionFlag[r][1];
+        if (reactionFlag[r][0] == 1)
+            isCollisionType[r] = true;
+        else
+            isCollisionType[r] = false;
+    }
+}
+
+void StoichiometricEquation::Read(DataContainer *cdata)
+{
+    for (int irection = 0; irection < numberOfReaction; ++ irection)
+    {
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            cdata->read(&cvp[irection][ispecies], sizeof(int));
+        }
+    }
+
+    for (int irection = 0; irection < numberOfReaction; ++ irection)
+    {
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            cdata->read(&cvn[irection][ispecies], sizeof(int));
+        }
+    }
+
+    for (int irection = 0; irection < numberOfReaction; ++ irection)
+    {
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            cdata->read(&cpz[irection][ispecies], sizeof(RDouble));
+        }
+    }
+
+    cdata->read(reactionType, numberOfReaction * sizeof(int));
+    cdata->read(isCollisionType, numberOfReaction * sizeof(bool));
+}
+
+void StoichiometricEquation::Write(DataContainer *cdata)
+{
+    for (int irection = 0; irection < numberOfReaction; ++ irection)
+    {
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            cdata->append(&cvp[irection][ispecies], sizeof(int));
+        }
+    }
+
+    for (int irection = 0; irection < numberOfReaction; ++ irection)
+    {
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            cdata->append(&cvn[irection][ispecies], sizeof(int));
+        }
+    }
+
+    for (int irection = 0; irection < numberOfReaction; ++ irection)
+    {
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            cdata->append(&cpz[irection][ispecies], sizeof(RDouble));
+        }
+    }
+
+    cdata->append(reactionType, numberOfReaction * sizeof(int));
+    cdata->append(isCollisionType, numberOfReaction * sizeof(bool));
+}
+
+CurveFitsMethod::CurveFitsMethod()
+{
+    blotter_ai = 0;
+    blotter_bi = 0;
+    blotter_ci = 0;
+    blotter_di = 0;
+    blotter_ei = 0;
+
+    omega_ai = 0;
+    omega_bi = 0;
+    omega_ci = 0;
+    omega_di = 0;
+
+    curvefit_av = 0;
+    curvefit_bv = 0; 
+    curvefit_cv = 0;
+
+    curvefit_aes = 0;
+    curvefit_bes = 0; 
+    curvefit_ces = 0;
+
+    numberOfSpecies = 0;
+}
+
+CurveFitsMethod::~CurveFitsMethod()
+{
+    if (numberOfSpecies > 0)
+    {
+        delete [] blotter_ai;
+        delete [] blotter_bi;
+        delete [] blotter_ci;
+        delete [] blotter_di;
+        delete [] blotter_ei;
+
+        delete [] omega_ai;
+        delete [] omega_bi;
+        delete [] omega_ci;
+        delete [] omega_di;
+
+        delete [] curvefit_av;
+        delete [] curvefit_bv; 
+        delete [] curvefit_cv;
+
+        delete [] curvefit_aes;
+        delete [] curvefit_bes;
+        delete [] curvefit_ces;
+
+        numberOfSpecies = 0;
+    }
+}
+
+void CurveFitsMethod::Init(int numberOfSpecies, int nGasModel/* = 0*/)
+{
+    if (numberOfSpecies <= 0)
+    {
+        return;
+    }
+    this->numberOfSpecies = numberOfSpecies;
+
+    blotter_ai = new RDouble[numberOfSpecies];
+    blotter_bi = new RDouble[numberOfSpecies];
+    blotter_ci = new RDouble[numberOfSpecies];
+    blotter_di = new RDouble[numberOfSpecies];
+    blotter_ei = new RDouble[numberOfSpecies];
+
+    omega_ai = new RDouble[numberOfSpecies];
+    omega_bi = new RDouble[numberOfSpecies];
+    omega_ci = new RDouble[numberOfSpecies];
+    omega_di = new RDouble[numberOfSpecies];
+
+    curvefit_aes = new RDouble[numberOfSpecies];
+    curvefit_bes = new RDouble[numberOfSpecies];
+    curvefit_ces = new RDouble[numberOfSpecies];
+
+    //! Set curve fit coefficients of vibrational excitation rate of electron collision for Nitrogen.
+    SetNitrogenVibrationalExcitationRate();
+
+    //! Set the curve fit coefficients of effective collision cross-sectional area between the electron and neutral heavy particle.
+    SetEffectiveCollisionCrossSectionalAreaCurveFits(nGasModel);
+}
+
+//! Set the curve fit coefficients of vibrational excitation rate of electron collision-N2.
+void CurveFitsMethod::SetNitrogenVibrationalExcitationRate()
+{
+    RDouble av[10] = {8.034, 7.924, 7.876, 7.626, 7.326, 4.9, 2.457, 1.119, 0.4681, 0.1837};
+    RDouble bv[10] = {-2.227, -2.235, -2.257, -2.334, -2.454, -2.556, -2.702, -2.865, -3.042, -3.223};
+    RDouble cv[10] = {2.005, 1.479, 1.054, 0.6499, 0.2049, 7.448e-3, 2.952e-3, 1.133e-3, 4.312e-3, 2.219e-4};
+
+    int nLevel = 10;
+    curvefit_av = new RDouble[nLevel];
+    curvefit_bv = new RDouble[nLevel];
+    curvefit_cv = new RDouble[nLevel];
+    for (int i = 0; i < nLevel; i ++)
+    {
+        curvefit_av[i] = av[i];
+        curvefit_bv[i] = bv[i];
+        curvefit_cv[i] = cv[i];
+    }
+}
+
+//! Set the curve fit coefficients of effective collision cross-sectional area between the electron and neutral heavy particle.
+void CurveFitsMethod::SetEffectiveCollisionCrossSectionalAreaCurveFits(int nGasModel /*= 0*/)
+{
+    //Curve fitting data for electronic collision area.
+    RDouble aes[8] = {1.2e-20, 2.0e-20, 1.0e-19, 5.0e-20, 7.5e-20, 1.0e-20, 1.0e-20, 1.0e-20};
+    RDouble bes[8] = {1.7e-24, 6.0e-24, 0.0, 0.0, 5.5e-24, 0.0, 0.0, 0.0};
+    RDouble ces[8] = {-2.0e-29, 0.0, 0.0, 0.0, -1.0e-28, 0.0, 0.0, 0.0};
+
+    if (nGasModel == 0) //Earth Gas.
+    {
+        int nStart = MIN(4, numberOfSpecies);
+        for (int i = 0; i < nStart; ++ i)
+        {
+            curvefit_aes[i] = aes[i];
+            curvefit_bes[i] = bes[i];
+            curvefit_ces[i] = ces[i];
+        }
+        for (int i = nStart; i < numberOfSpecies; ++ i)
+        {
+            curvefit_aes[i] = 0.0;
+            curvefit_bes[i] = 0.0;
+            curvefit_ces[i] = 0.0;
+        }
+        if (numberOfSpecies <= 5)
+        {
+            curvefit_aes[numberOfSpecies - 1] = aes[4];
+            curvefit_bes[numberOfSpecies - 1] = bes[4];
+            curvefit_ces[numberOfSpecies - 1] = ces[4];
+        }
+        else
+        {
+            curvefit_aes[numberOfSpecies - 2] = aes[4];
+            curvefit_bes[numberOfSpecies - 2] = bes[4];
+            curvefit_ces[numberOfSpecies - 2] = ces[4];
+        }
+    }
+    else
+    {
+        for (int i = 0; i < numberOfSpecies; ++ i)
+        {
+            curvefit_aes[i] = aes[i];
+            curvefit_bes[i] = bes[i];
+            curvefit_ces[i] = ces[i];
+        }
+    }
+}
+
+void CurveFitsMethod::SetEffectiveCollisionCrossSectionalAreaCurveFits(vector<string> &namelist)
+{
+    for (int s = 0; s < numberOfSpecies; ++ s)
+    {
+        if (namelist[s] == "O")
+        {
+            curvefit_aes[s] = 1.2e-20;
+            curvefit_bes[s] = 1.7e-24;
+            curvefit_ces[s] = -2.0e-29;
+        }
+        else if (namelist[s] == "O2")
+        {
+            curvefit_aes[s] = 2.0e-20;
+            curvefit_bes[s] = 6.0e-24;
+            curvefit_ces[s] = 0.0;
+        }
+        else if (namelist[s] == "NO")
+        {
+            curvefit_aes[s] = 1.0e-19;
+            curvefit_bes[s] = 0.0;
+            curvefit_ces[s] = 0.0;
+        }
+        else if (namelist[s] == "N")
+        {
+            curvefit_aes[s] = 5.0e-20;
+            curvefit_bes[s] = 0.0;
+            curvefit_ces[s] = 0.0;
+        }
+        else if (namelist[s] == "N2")
+        {
+            curvefit_aes[s] = 7.5e-20;
+            curvefit_bes[s] = 5.5e-24;
+            curvefit_ces[s] = -1.0e-28;
+        }
+        else if (namelist[s] == "C")
+        {
+            curvefit_aes[s] = 1.0e-20;
+            curvefit_bes[s] = 0.0;
+            curvefit_ces[s] = 0.0;
+        }
+        else if (namelist[s] == "CO")
+        {
+            curvefit_aes[s] = 1.0e-20;
+            curvefit_bes[s] = 0.0;
+            curvefit_ces[s] = 0.0;
+        }
+        else if (namelist[s] == "CO2")
+        {
+            curvefit_aes[s] = 1.0e-20;
+            curvefit_bes[s] = 0.0;
+            curvefit_ces[s] = 0.0;
+        }
+        else
+        {
+            curvefit_aes[s] = 0.0;
+            curvefit_bes[s] = 0.0;
+            curvefit_ces[s] = 0.0;
+        }
+    }
+}
+
+void CurveFitsMethod::Read(fstream &file)
+{
+    string line, word;
+    string separator = " =\t\r\n#$,;\"'";
+
+    //! Obtain the curve fit coefficients of Gupta and Blottner methods for computing the viscosities of species.
+    SkipLines(file, 2);
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        SkipLines(file, 3);
+        getline(file, line);
+
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(blotter_ai[ispecies], word, std::dec);
+
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(blotter_bi[ispecies], word, std::dec);
+
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(blotter_ci[ispecies], word, std::dec);
+
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(blotter_di[ispecies], word, std::dec);
+
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(blotter_ei[ispecies], word, std::dec);
+    }
+
+    //! Obtain the curve fit coefficients of computing the average collision areas for species couples called PI*Omega(2,2).
+    SkipLines(file, 2);
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        SkipLines(file, 3);
+        getline(file, line);
+
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(omega_ai[ispecies], word, std::dec);
+
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(omega_bi[ispecies], word, std::dec);
+
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(omega_ci[ispecies], word, std::dec);
+
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(omega_di[ispecies], word, std::dec);
+    }
+}
+
+void CurveFitsMethod::GenerateData(vector<string> &namelist)
+{
+    TransportFitData myCurveFitData;
+    TransportFitData *currentData = new TransportFitData();
+
+    myCurveFitData.GenerateFullCurveFittingData();
+    myCurveFitData.CreateTransportFitData(namelist, currentData);
+
+    RDouble **viscosityFitData = currentData->GetViscosityCurveFittingData();
+    RDouble **collisionAreaFitData = currentData->GetCollisionAreaCurveFittingData();
+    for (int s = 0; s < numberOfSpecies; ++ s)
+    {
+        blotter_ai[s] = viscosityFitData[s][0];
+        blotter_bi[s] = viscosityFitData[s][1];
+        blotter_ci[s] = viscosityFitData[s][2];
+        blotter_di[s] = viscosityFitData[s][3];
+        blotter_ei[s] = viscosityFitData[s][4];
+
+        omega_ai[s] = collisionAreaFitData[s][0];
+        omega_bi[s] = collisionAreaFitData[s][1];
+        omega_ci[s] = collisionAreaFitData[s][2];
+        omega_di[s] = collisionAreaFitData[s][3];
+    }
+
+    SetEffectiveCollisionCrossSectionalAreaCurveFits(namelist);
+    delete currentData;
+}
+
+void CurveFitsMethod::Read(DataContainer *cdata)
+{
+    cdata->read(blotter_ai, numberOfSpecies * sizeof(RDouble));
+    cdata->read(blotter_bi, numberOfSpecies * sizeof(RDouble));
+    cdata->read(blotter_ci, numberOfSpecies * sizeof(RDouble));
+    cdata->read(blotter_di, numberOfSpecies * sizeof(RDouble));
+    cdata->read(blotter_ei, numberOfSpecies * sizeof(RDouble));
+
+    cdata->read(omega_ai, numberOfSpecies * sizeof(RDouble));
+    cdata->read(omega_bi, numberOfSpecies * sizeof(RDouble));
+    cdata->read(omega_ci, numberOfSpecies * sizeof(RDouble));
+    cdata->read(omega_di, numberOfSpecies * sizeof(RDouble));
+
+    cdata->read(curvefit_av, 10 * sizeof(RDouble));
+    cdata->read(curvefit_bv, 10 * sizeof(RDouble));
+    cdata->read(curvefit_cv, 10 * sizeof(RDouble));
+
+    cdata->read(curvefit_aes, numberOfSpecies * sizeof(RDouble));
+    cdata->read(curvefit_bes, numberOfSpecies * sizeof(RDouble));
+    cdata->read(curvefit_ces, numberOfSpecies * sizeof(RDouble));
+}
+
+void CurveFitsMethod::Write(DataContainer *cdata)
+{
+    cdata->append(blotter_ai, numberOfSpecies * sizeof(RDouble));
+    cdata->append(blotter_bi, numberOfSpecies * sizeof(RDouble));
+    cdata->append(blotter_ci, numberOfSpecies * sizeof(RDouble));
+    cdata->append(blotter_di, numberOfSpecies * sizeof(RDouble));
+    cdata->append(blotter_ei, numberOfSpecies * sizeof(RDouble));
+
+    cdata->append(omega_ai, numberOfSpecies * sizeof(RDouble));
+    cdata->append(omega_bi, numberOfSpecies * sizeof(RDouble));
+    cdata->append(omega_ci, numberOfSpecies * sizeof(RDouble));
+    cdata->append(omega_di, numberOfSpecies * sizeof(RDouble));
+
+    cdata->append(curvefit_av, 10 * sizeof(RDouble));
+    cdata->append(curvefit_bv, 10 * sizeof(RDouble));
+    cdata->append(curvefit_cv, 10 * sizeof(RDouble));
+
+    cdata->append(curvefit_aes, numberOfSpecies * sizeof(RDouble));
+    cdata->append(curvefit_bes, numberOfSpecies * sizeof(RDouble));
+    cdata->append(curvefit_ces, numberOfSpecies * sizeof(RDouble));
+}
+
+SchmidtNumber::SchmidtNumber()
+{
+    scl  = 0;
+    sct  = 0;
+    oscl = 0;
+    osct = 0;
+    numberOfSpecies = 0;
+}
+
+SchmidtNumber::~SchmidtNumber()
+{
+    delete [] scl ;
+    delete [] sct ;
+    delete [] oscl;
+    delete [] osct;
+}
+
+void SchmidtNumber::Init(int numberOfSpecies)
+{
+    this->numberOfSpecies = numberOfSpecies;
+
+    scl  = new RDouble[numberOfSpecies];
+    sct  = new RDouble[numberOfSpecies];
+    oscl = new RDouble[numberOfSpecies];
+    osct = new RDouble[numberOfSpecies];
+}
+
+void SchmidtNumber::ComputeSpeciesSchmidtNumber(int *ionTypeOfSpecies)
+{
+    //! Calculate the Schmidt number of laminar or turbulent flow of species.
+
+    RDouble sc_l;
+    GlobalDataBase::GetData("sc_l", &sc_l, PHDOUBLE, 1);
+    RDouble sc_t;
+    GlobalDataBase::GetData("sc_t", &sc_t, PHDOUBLE, 1);
+
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        if (ionTypeOfSpecies[ispecies] != 0 && ABS(ionTypeOfSpecies[ispecies]) < 100)
+        {
+            scl[ispecies] = half * sc_l;
+            sct[ispecies] = half * sc_t;
+        }
+        else
+        {
+            scl[ispecies] = 1.0 * sc_l;
+            sct[ispecies] = 1.0 * sc_t;
+        }
+
+        oscl[ispecies] = 1.0 / scl[ispecies];
+        osct[ispecies] = 1.0 / sct[ispecies];
+    }
+}
+
+void SchmidtNumber::Read(DataContainer *cdata)
+{
+    cdata->read(scl, numberOfSpecies * sizeof(RDouble));
+    cdata->read(sct, numberOfSpecies * sizeof(RDouble));
+                                        
+    cdata->read(oscl, numberOfSpecies * sizeof(RDouble));
+    cdata->read(osct, numberOfSpecies * sizeof(RDouble));
+}
+
+void SchmidtNumber::Write(DataContainer *cdata)
+{
+    cdata->append(scl, numberOfSpecies * sizeof(RDouble));
+    cdata->append(sct, numberOfSpecies * sizeof(RDouble));
+                                          
+    cdata->append(oscl, numberOfSpecies * sizeof(RDouble));
+    cdata->append(osct, numberOfSpecies * sizeof(RDouble));
+}
+
+MolecularProperty::MolecularProperty()
+{
+    schmidt_number              = 0;
+    molecularWeightDimensional  = 0;
+    molecularWeight             = 0;
+    oMolecularWeightDimensional = 0;
+    oMolecularWeight            = 0;
+
+    characteristicTemperatureOfSpecies = 0;
+    mass_fraction_reference = 0;
+    name_of_species         = 0;
+    ionTypeOfSpecies        = 0;
+    collisionCrossSection   = 0;
+
+    thermodynamicProperties = 0;
+    numberOfSpecies = 0;
+}
+
+MolecularProperty::~MolecularProperty()
+{
+    delete schmidt_number;
+    delete [] molecularWeightDimensional ;
+    delete [] molecularWeight            ;
+    delete [] oMolecularWeightDimensional;
+    delete [] oMolecularWeight           ;
+
+    delete [] characteristicTemperatureOfSpecies;
+    delete [] mass_fraction_reference;
+    delete [] name_of_species        ;
+    delete [] ionTypeOfSpecies     ;
+    delete [] collisionCrossSection;
+    delete [] thermodynamicProperties;
+}
+
+void MolecularProperty::Init(int numberOfSpecies)
+{
+    this->numberOfSpecies = numberOfSpecies;
+
+    molecularWeightDimensional  = new RDouble[numberOfSpecies];
+    molecularWeight             = new RDouble[numberOfSpecies];
+    oMolecularWeightDimensional = new RDouble[numberOfSpecies];
+    oMolecularWeight            = new RDouble[numberOfSpecies];
+
+    characteristicTemperatureOfSpecies = new RDouble[numberOfSpecies];
+    name_of_species = new string[numberOfSpecies];
+
+    //! ionTypeOfSpecies is the ion type of species.
+    ionTypeOfSpecies        = new int[numberOfSpecies];
+    mass_fraction_reference = new RDouble[numberOfSpecies];
+    collisionCrossSection   = new RDouble[numberOfSpecies];
+
+    schmidt_number = new SchmidtNumber();
+    schmidt_number->Init(numberOfSpecies);
+
+    //! To set the thermodynamic properties of species under the multi-temperature model.
+    thermodynamicProperties = new Thermo_Param[numberOfSpecies];
+}
+
+void MolecularProperty::Read(fstream &file)
+{
+    string line, word;
+    string separator = " =\t\r\n#$,;\"'";
+
+    SkipLines(file, 3);
+    //! Obtain the name of species.
+    getline(file, line);
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        line = FindNextWord(line, name_of_species[ispecies], separator);
+    }
+
+    SkipLines(file, 3);
+    //! Obtain the ion type of species.
+    getline(file, line);
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        line = FindNextWord(line, word, separator);
+        from_string< int >(ionTypeOfSpecies[ispecies], word, std::dec);
+    }
+
+    SkipLines(file, 3);
+    //! Obtain the molecular weight of species.
+    getline(file, line);
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(molecularWeightDimensional[ispecies], word, std::dec);
+    }
+
+    SkipLines(file, 3);
+    //! Obtain the mass ratio of species.
+    getline(file, line);
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(mass_fraction_reference[ispecies], word, std::dec);
+    }
+
+    SkipLines(file, 3);
+    //! Obtain the collision cross section of species.
+    getline(file, line);
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(collisionCrossSection[ispecies], word, std::dec);
+    }
+
+    SkipLines(file, 3);
+    //! Obtain the characteristic temperature of species.
+    getline(file, line);
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(characteristicTemperatureOfSpecies[ispecies], word, std::dec);
+    }
+
+    schmidt_number->ComputeSpeciesSchmidtNumber(ionTypeOfSpecies);
+
+    //! The thermodynamic properties under the multi-temperature model.
+    int nParam = 6;     //! To add 6 parameters including the degeneracy, characteristic temperature etc.
+    for (int iparam = 0; iparam < nParam; iparam ++)
+    {
+        SkipLines(file, 3);
+        //! Obtain the characteristic temperature of species.
+        getline(file, line);
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            line = FindNextWord(line, word, separator);
+            if (iparam == 0)             //! To set the type of species.
+            {
+                from_string< int >(thermodynamicProperties[ispecies].nType, word, std::dec);
+            }else if (iparam == 1)       //! To set the first degeneracy of species.
+            {
+                from_string< int >(thermodynamicProperties[ispecies].gs0, word, std::dec);
+            }else if (iparam == 2)       //! To set the second degeneracy of species.
+            {
+                from_string< int >(thermodynamicProperties[ispecies].gs1, word, std::dec);
+            }else if (iparam == 3)       //! To set the characteristic temperature of species in the vibration mode.
+            {
+                from_string< RDouble >(thermodynamicProperties[ispecies].Tvs.Tv[0], word, std::dec);
+            }else if (iparam == 4)       //! To set the characteristic temperature of species in the electron mode.
+            {
+                from_string< RDouble >(thermodynamicProperties[ispecies].Tes, word, std::dec);
+            }else if (iparam == 5)       //! To set the formation enthalpies of species.
+            {
+                from_string< RDouble >(thermodynamicProperties[ispecies].hs0, word, std::dec);
+            }
+        }
+    }         //! End of reading the parameters to species.
+}
+void MolecularProperty::GenerateData(vector<string> &namelist, vector<RDouble> &initMassFractions)
+{
+    AtmosphereData *baseData = new AtmosphereData();
+    AtmosphereData *currentData = new AtmosphereData();
+
+    baseData->GenerateFullPhysicalChemicalData();
+    baseData->CreateAtmosphereData(namelist, currentData);
+
+    //Obtain the new data according to the name list.
+    int *speciesType = currentData->GetSpeciesType();
+    int *speciesCharge = currentData->GetSpeciesCharge();
+    int *speciesG0 = currentData->GetSpeciesDegeneracy0();
+    int *speciesG1 = currentData->GetSpeciesDegeneracy1();
+    RDouble *speciesMass = currentData->GetSpeciesMolecularWeight();
+    RDouble *speciesTtr = currentData->GetSpeciesTemperature();
+    RDouble *speciesTes = currentData->GetSpeciesElectronTemperature();
+    RDouble *speciesSigma = currentData->GetSpeciesCollisionArea();
+    RDouble *speciesEnthalpy = currentData->GetSpeciesFormationEnthalpy();
+    VibrationModeData *speciesVibrationModeData = currentData->GetSpeciesVibrationalModeData();
+
+    for (int s = 0; s < this->numberOfSpecies; ++ s)
+    {
+        name_of_species[s] = namelist[s];
+        mass_fraction_reference[s] = initMassFractions[s];
+        //! Generate the ion type of species.
+        ionTypeOfSpecies[s] = speciesCharge[s];
+        //! Generate the molecular weight of species.
+        molecularWeightDimensional[s] = speciesMass[s];
+        //! Generate the collision cross section of species.
+        collisionCrossSection[s] = speciesSigma[s];
+        //! Generate the characteristic temperature of species.
+        characteristicTemperatureOfSpecies[s] = speciesTtr[s];
+
+        thermodynamicProperties[s].nType = speciesType[s];
+        thermodynamicProperties[s].gs0 = speciesG0[s];
+        thermodynamicProperties[s].gs1 = speciesG1[s];
+        thermodynamicProperties[s].Tvs = speciesVibrationModeData[s];
+        thermodynamicProperties[s].Tes = speciesTes[s];
+        thermodynamicProperties[s].hs0 = speciesEnthalpy[s];
+    }
+    schmidt_number->ComputeSpeciesSchmidtNumber(ionTypeOfSpecies);
+
+    delete baseData;
+    delete currentData;
+}
+
+void MolecularProperty::Read(DataContainer *cdata)
+{
+    schmidt_number->Read(cdata);
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        cdata->read_string(name_of_species[ispecies]);
+    }
+
+    cdata->read(ionTypeOfSpecies, numberOfSpecies * sizeof(int));
+    cdata->read(mass_fraction_reference, numberOfSpecies * sizeof(RDouble));
+
+    cdata->read(collisionCrossSection, numberOfSpecies * sizeof(RDouble));
+    cdata->read(characteristicTemperatureOfSpecies, numberOfSpecies * sizeof(RDouble));
+
+    cdata->read(molecularWeightDimensional, numberOfSpecies * sizeof(RDouble));
+    cdata->read(molecularWeight, numberOfSpecies * sizeof(RDouble));
+
+    cdata->read(oMolecularWeightDimensional, numberOfSpecies * sizeof(RDouble));
+    cdata->read(oMolecularWeight, numberOfSpecies * sizeof(RDouble));
+
+    cdata->read(thermodynamicProperties, numberOfSpecies * sizeof(Thermo_Param));
+}
+
+void MolecularProperty::Write(DataContainer *cdata)
+{
+    schmidt_number->Write(cdata);
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        cdata->append_string(name_of_species[ispecies]);
+    }
+
+    cdata->append(ionTypeOfSpecies, numberOfSpecies * sizeof(int));
+    cdata->append(mass_fraction_reference, numberOfSpecies * sizeof(RDouble));
+
+    cdata->append(collisionCrossSection, numberOfSpecies * sizeof(RDouble));
+    cdata->append(characteristicTemperatureOfSpecies, numberOfSpecies * sizeof(RDouble));
+
+    cdata->append(molecularWeightDimensional, numberOfSpecies * sizeof(RDouble));
+    cdata->append(molecularWeight, numberOfSpecies * sizeof(RDouble));
+
+    cdata->append(oMolecularWeightDimensional, numberOfSpecies * sizeof(RDouble));
+    cdata->append(oMolecularWeight, numberOfSpecies * sizeof(RDouble));
+
+    cdata->append(thermodynamicProperties, numberOfSpecies * sizeof(Thermo_Param));
+}
+
+RDouble * MolecularProperty::GetLaminarSchmidtNumberReciprocal() const
+{ 
+    return schmidt_number->GetLaminarSchmidtNumberReciprocal();
+}
+
+RDouble * MolecularProperty::GetTurbulentSchmidtNumberReciprocal() const
+{
+    return schmidt_number->GetTurbulentSchmidtNumberReciprocal();
+}
+
+MixedGas::MixedGas()
+{
+    molecularProperty      = 0;
+    thermodynamicManager   = 0;
+    reactionRate           = 0;
+    stoichiometricEquation = 0;
+    CurveFits = 0;
+    nGasModel = 0; //nGasModel = 0 indicates the gas of Earth, nGasModel = 1 is for gas of Mars.
+    parkVDPower = 0.6;
+    nTEnergyModel = 0; //The conventional method to computing temperature energy terms.
+    nIsChemicalFreeze = 0;
+    nIsSuperCatalytic = 1;
+    polynomialCoefT2 = 0;
+}
+
+MixedGas::~MixedGas()
+{
+    if (nchem > 0)
+    {
+        delete molecularProperty;
+        delete thermodynamicManager;
+        delete reactionRate;
+        delete stoichiometricEquation;
+        delete CurveFits;
+
+        DeAllocateWorkingSpace();
+        RDouble *prim_inf = reinterpret_cast<RDouble *>(GlobalDataBase::GetDataPtr("prim_inf"));
+        delete [] prim_inf;
+        RDouble *catalyticMassFraction = reinterpret_cast<RDouble *>(GlobalDataBase::GetDataPtr("catalyticMassFraction"));
+        delete [] catalyticMassFraction;
+    }
+}
+
+RDouble MixedGas::ComputeReferenceTotalEnthalpy()
+{
+    RDouble totalEnthalpy = 0.0, staticEnthalpy = 0.0;
+    RDouble *initMassFraction = this->GetInitMassFraction();
+    RDouble initVibrationTemperature = 1.0;
+    if (GlobalDataBase::IsExist("freestream_vibration_temperature", PHDOUBLE, 1))
+    {
+        initVibrationTemperature = GlobalDataBase::GetDoubleParaFromDB("freestream_vibration_temperature");
+        initVibrationTemperature = initVibrationTemperature / referenceParameterDimensional.GetTemperature();
+    }
+    RDouble velocity = referenceParameterDimensional.GetVelocity();
+    if (this->ntmodel == 1)
+    {
+        staticEnthalpy = this->GetMixtureGasEnthalpy(initMassFraction, 1.0);
+    }
+    else
+    {
+        
+    }
+    totalEnthalpy = (staticEnthalpy + 0.5) * velocity * velocity;
+
+    return totalEnthalpy;
+}
+
+void MixedGas::AllocateWorkingSpace()
+{
+    moleFractions = new RDouble[numberOfSpecies];
+    massFractions = new RDouble[numberOfSpecies];
+
+    speciesViscosity = new RDouble[numberOfSpecies];
+    speciesWeight = new RDouble[numberOfSpecies];
+
+    speciesCp = new RDouble[numberOfSpecies];
+    speciesCv = new RDouble[numberOfSpecies];
+    speciesEnthalpy = new RDouble[numberOfSpecies];
+
+    workSpecies = new RDouble[numberOfSpecies];
+    speciesEnergyTr = new RDouble[numberOfSpecies];
+    speciesEnergyVb = new RDouble[numberOfSpecies];
+    speciesEnergyEe = new RDouble[numberOfSpecies];
+    speciesConductivity = new RDouble[numberOfSpecies];
+
+    dfsdx = new RDouble[nl + nchem];
+    dfsdy = new RDouble[nl + nchem];
+    dfsdz = new RDouble[nl + nchem];
+    fvis  = new RDouble[nl + nchem + ntmodel - 1];
+
+    maximumSpecies = new RDouble[numberOfSpecies];
+
+    Thermo_Energy_temparay.Cps = new RDouble[numberOfSpecies];
+    Thermo_Energy_temparay.Cvs = new RDouble[numberOfSpecies];
+    Thermo_Energy_temparay.Cvtrs = new RDouble[numberOfSpecies];
+    Thermo_Energy_temparay.Cvvs = new RDouble[numberOfSpecies];
+    Thermo_Energy_temparay.Cves = new RDouble[numberOfSpecies];
+
+    Thermo_Energy_temparay.Hs = new RDouble[numberOfSpecies];
+    Thermo_Energy_temparay.Es = new RDouble[numberOfSpecies];
+    Thermo_Energy_temparay.Etrs = new RDouble[numberOfSpecies];
+    Thermo_Energy_temparay.Evs = new RDouble[numberOfSpecies];
+    Thermo_Energy_temparay.Ees = new RDouble[numberOfSpecies];
+    Thermo_Energy_temparay.Rms = new RDouble[numberOfSpecies];
+
+    Thermo_Energy_temparay.forwardRates = new RDouble [numberOfReaction];
+    Thermo_Energy_temparay.backwardRates = new RDouble [numberOfReaction];
+    Thermo_Energy_temparay.collisionRates = new RDouble [numberOfReaction];
+    Thermo_Energy_temparay.OmegaDerivative = NewPointer2 <RDouble> (numberOfSpecies, ntmodel - 1);
+
+    Thermo_Energy_temparay.partialValues = NewPointer2 <RDouble> (numberOfReaction, nEquation);
+    Thermo_Energy_temparay.partialValues2 = NewPointer2 <RDouble> (numberOfReaction, nEquation);
+
+    //Obtain the interpolation coefficients for the polynomial.
+    int n = this->thermodynamicManager->GetNumberofPolynomialCoefficient();
+    polynomialCoefT2 = NewPointer2<RDouble>(numberOfSpecies, n);
+}
+
+void MixedGas::DeAllocateWorkingSpace()
+{
+    delete [] moleFractions;
+    delete [] massFractions;
+    delete [] speciesViscosity;
+    delete [] speciesWeight;
+
+    delete [] speciesCp;
+    delete [] speciesCv;
+    delete [] speciesEnthalpy;
+    delete [] workSpecies;
+
+    delete [] speciesEnergyTr;
+    delete [] speciesEnergyVb;
+    delete [] speciesEnergyEe;
+    delete [] speciesConductivity;
+
+    delete [] dfsdx;
+    delete [] dfsdy;
+    delete [] dfsdz;
+    delete [] fvis;
+    
+    delete [] maximumSpecies;
+
+    delete [] Thermo_Energy_temparay.Cps;
+    delete [] Thermo_Energy_temparay.Cvs;
+    delete [] Thermo_Energy_temparay.Cvtrs ;
+    delete [] Thermo_Energy_temparay.Cvvs;
+    delete [] Thermo_Energy_temparay.Cves;
+
+    delete [] Thermo_Energy_temparay.Hs ;
+    delete [] Thermo_Energy_temparay.Es ;
+    delete [] Thermo_Energy_temparay.Etrs;
+    delete [] Thermo_Energy_temparay.Evs;
+    delete [] Thermo_Energy_temparay.Ees;
+    delete [] Thermo_Energy_temparay.Rms;
+
+    delete [] Thermo_Energy_temparay.forwardRates;
+    delete [] Thermo_Energy_temparay.backwardRates;
+    delete [] Thermo_Energy_temparay.collisionRates;
+    DelPointer2(Thermo_Energy_temparay.OmegaDerivative);
+    DelPointer2(Thermo_Energy_temparay.partialValues);
+    DelPointer2(Thermo_Energy_temparay.partialValues2);
+    DelPointer2(polynomialCoefT2);
+}
+
+void MixedGas::Primitive2Conservative(RDouble *prim, RDouble gama, RDouble Tv, RDouble Te, RDouble *q)
+{
+    using namespace IDX;
+    RDouble em;
+    RDouble &density = prim[IR];
+    RDouble &um = prim[IU];
+    RDouble &vm = prim[IV];
+    RDouble &wm = prim[IW];
+    
+    //! Obtain the mass fraction of the last species whose label in the collection is ns-1.
+    if (nchem == 1)
+    {
+        NormalizePrimitive(prim);
+    }
+
+    //! Obtain the total internal energy Em.
+    ComputeInternalEnergy(prim, gama, Tv, Te, em);
+
+    q[IR ] = density;
+    q[IRU] = density * um;
+    q[IRV] = density * vm;
+    q[IRW] = density * wm;
+    q[IRE] = density * em;
+
+    for (int m = nm; m < nl; ++ m)
+    {
+        q[m] = density * prim[m];
+    }
+    if (nchem == 1)
+    {
+        q[nl] = density * prim[nl];
+    }
+    for (int i = 0; i < ntmodel - 1; i ++)    //! multi-temperature model.
+    {
+        q[nl + nchem + i] = density * prim[nl + nchem + i];
+    }
+}
+
+void MixedGas::Primitive2ConservativeR(RDouble *prim, RDouble gama, RDouble Tv, RDouble Te, RDouble staticE, RDouble *q)
+{
+    using namespace IDX;
+    RDouble em;
+    RDouble &density = prim[IR];
+    RDouble &um = prim[IU];
+    RDouble &vm = prim[IV];
+    RDouble &wm = prim[IW];
+
+    RDouble squareVelocity;
+    squareVelocity = um * um + vm * vm + wm * wm;
+    em = staticE + half * squareVelocity;
+
+    q[IR ] = density;
+    q[IRU] = density * um;
+    q[IRV] = density * vm;
+    q[IRW] = density * wm;
+    q[IRE] = density * em;
+
+    for (int m = nm; m < nEquation; ++ m)
+    {
+        q[m] = density * prim[m];
+    }
+}
+
+void MixedGas::Conservative2Primitive(RDouble *q, RDouble gama, RDouble *prim, RDouble *temperature)
+{
+    using namespace IDX;
+    RDouble density, oDensity, um, vm, wm, pressure, totalInternalEnergy, squareVelocity, internalEnergy;
+    density = q[IR];
+    if (density <= zero)
+    {
+        prim[IR] = density;
+        return;
+    }
+
+    oDensity = 1.0 / density;
+    um = q[IU] * oDensity;
+    vm = q[IV] * oDensity;
+    wm = q[IW] * oDensity;
+    totalInternalEnergy  = q[IP];    ///den*H
+    squareVelocity = um * um + vm * vm + wm * wm;
+    internalEnergy = totalInternalEnergy - half * density * squareVelocity;
+
+    prim[IR] = density;
+    prim[IU] = um;
+    prim[IV] = vm;
+    prim[IW] = wm;
+
+    if (nchem == 1)
+    {
+        for (int m = nm; m < nl; ++m)
+        {
+            prim[m] = MIN(static_cast<RDouble>(one), MAX(SMALL, q[m] * oDensity));
+        }
+        NormalizePrimitive(prim);
+    }
+
+    for (int i = 0; i < ntmodel - 1; ++ i)    //! multi-temperature model.
+    {
+        prim[nl + nchem + i] = MAX(q[nl + nchem + i] * oDensity, 1.0e-30);
+    }
+
+    int nIdealState = GlobalDataBase::GetIntParaFromDB("nIdealState");
+    if (nIdealState == 1)
+    {
+        prim[IP] = (gama - one) * internalEnergy;
+        //! Compute temperature.
+        //RDouble gasConstant = this->GetCoefficientOfStateEquation();
+        //temperature[ITT] = prim[IP] / (prim[IR] * gasConstant);
+        //temperature[ITV] = temperature[ITT];
+        //temperature[ITE] = temperature[ITT];
+        GetTemperature(prim, temperature[ITT], temperature[ITV], temperature[ITE]);
+    }
+    else
+    {
+        //GetPressure(prim, gama, internalEnergy, temperature[0], pressure);
+        this->GetTemperatureAndPressure(prim, internalEnergy, temperature, pressure);
+        prim[IP] = MAX(SMALL, pressure);
+    }
+}
+
+void MixedGas::Conservative2PrimitiveR(RDouble *q, RDouble gama, RDouble *prim, RDouble *temperature)
+{
+    using namespace IDX;
+    RDouble gasConstant = this->GetUniversalGasConstant();
+    RDouble *speciesMass = molecularProperty->GetMolecularWeight();
+
+    RDouble oDensity, squareVelocity, internalEnergy;
+    RDouble massReciprocal, ceDivideMe;
+    RDouble gasMixtureCv, gasMixtureEnergy, TkLimit;
+    int nCount;
+
+    RDouble &density = prim[IR];
+    RDouble &um = prim[IU];
+    RDouble &vm = prim[IV];
+    RDouble &wm = prim[IW];
+    RDouble &pressure = prim[IP];
+
+    density = q[IR];    
+    oDensity = 1.0 / density;
+    um = q[IRU] * oDensity;
+    vm = q[IRV] * oDensity;
+    wm = q[IRW] * oDensity;
+ 
+    squareVelocity = um * um + vm * vm + wm * wm;
+    internalEnergy = q[IRE] * oDensity - half * squareVelocity;
+
+    for (int m = nm; m < nl; ++ m)
+    {
+        prim[m] = MIN(static_cast<RDouble>(one), MAX(SMALL, q[m] * oDensity));
+    }
+
+    NormalizePrimitive(prim);
+
+    for (int i = 1; i < ntmodel; ++ i)    //! multi-temperature model.
+    {
+        prim[nl + i] = MAX(q[nl + i] * oDensity, 1.0e-30);
+    }
+
+    //! Obtain the average molecular weight.
+    massReciprocal = 0.0;
+    for (int i = 0; i < numberOfSpecies; ++ i)
+    {
+        massFractions[i] = prim[nm + i];
+        massReciprocal += massFractions[i] / speciesMass[i];
+    }
+    
+    if (nElectronIndex >= 0)
+    {
+        ceDivideMe = massFractions[nElectronIndex] / speciesMass[nElectronIndex];
+    }
+    else
+    {
+        ceDivideMe = 0.0;
+    }
+
+    //compute T and P;
+
+    int nMaxStepTemperature = 5;
+    RDouble precisionTemperature = 1.0e-3;
+
+    if (ntmodel == 1)
+    {
+        RDouble &trTemperature = temperature[mTT];
+        nCount = 0;
+        while (nCount < nMaxStepTemperature)
+        {
+            nCount++;
+            ComputeMixtureCvAndEnergy(massFractions, trTemperature, gasMixtureCv, gasMixtureEnergy);
+           
+            TkLimit = (gasMixtureEnergy - internalEnergy) / max(gasMixtureCv, SMALL);
+
+            if (TkLimit > 0.9 * trTemperature)
+            {
+                TkLimit = 0.9 * trTemperature;
+            }
+            else if (TkLimit < -9.0 * trTemperature)
+            {
+                TkLimit = -9.0 * trTemperature;
+            }
+            trTemperature = MAX(trTemperature - TkLimit, trTemperatureMinNonDimensional);
+
+            if (fabs(TkLimit / trTemperature) <= precisionTemperature)
+            {
+                break;
+            }
+        }
+        //trTemperature = MAX(trTemperature, SMALL);
+        pressure = density * gasConstant * trTemperature * massReciprocal;
+    }
+    else if (ntmodel == 2)
+    {
+
+    }
+    else
+    {
+
+    }
+}
+
+RDouble * MixedGas::GetLaminarSchmidtNumberReciprocal() const
+{ 
+    return molecularProperty->GetLaminarSchmidtNumberReciprocal();
+}
+
+RDouble * MixedGas::GetTurbulentSchmidtNumberReciprocal() const
+{
+    return molecularProperty->GetTurbulentSchmidtNumberReciprocal();
+}
+
+//! To obtain the laminar Schmidt number of each component.
+void MixedGas::GetLaminarSchmidtNumber(RDouble *Scl) const
+{
+    if (Scl == NULL)
+    {
+        return;
+    }
+    else
+    {
+        RDouble *pSchmidt = molecularProperty->GetLaminarSchmidtNumberReciprocal();
+        for (int i = 0; i < numberOfSpecies; ++ i)
+        {
+            Scl[i] = 1.0 / pSchmidt[i];
+        }
+    }
+}
+
+//! To obtain the turbulent Schmidt number of each component.
+void MixedGas::GetTurbulentSchmidtNumber(RDouble *Sct) const
+{
+    if (Sct == NULL)
+    {
+        return;
+    }
+    else
+    {
+        RDouble *pSchmidt = molecularProperty->GetTurbulentSchmidtNumberReciprocal();
+        for (int i = 0; i < numberOfSpecies; ++ i)
+        {
+            Sct[i] = 1.0 / pSchmidt[i];
+        }
+    }
+}
+
+void MixedGas::GetSpecificHeatRatio(RDouble *prim, RDouble &gama)
+{
+    if (nchem == 0)      //! Perfect gas.
+    {
+        gama = 1.4;
+    }
+    else                 //! The chemical non-equilibrium flow.
+    {
+        for (int i = 0; i < this->numberOfSpecies; ++ i)
+        {
+            massFractions[i] = prim[nm + i];
+        }
+        RDouble cp, cv;
+        RDouble R = this->GetUniversalGasConstant();
+        RDouble M = this->GetMixedGasMolecularWeight(massFractions);
+        if (ntmodel >= 2)     //! Two-Temperature and Three-Temperature model.
+        {
+
+        }
+        else                 //! The default setting is One-Temperature model.
+        {
+            RDouble Ttr = prim[IDX::IP] * M / (prim[IDX::IR] * R);
+            this->ComputeConstantPressureSpecificHeatByMassFraction(massFractions, Ttr, cp);
+            cv = cp - R/M;
+        }
+
+        gama = cp / cv;
+    }
+}
+
+void MixedGas::GetSpecificHeatRatioAndTemperatute(RDouble *primitiveVariables, RDouble &gama, RDouble &transRotationTemperature, RDouble &vibrationTemperature, RDouble &electronTemperature)
+  {
+  
+    GetTemperature(primitiveVariables, transRotationTemperature, vibrationTemperature, electronTemperature);
+
+    if (nchem == 0)       //! Perfect gas.
+    {
+        gama = 1.4;
+    }
+    else                  //! The chemical non-equilibrium flow.
+    {
+        for (int i = 0; i < this->numberOfSpecies; ++ i)
+        {
+            massFractions[i] = primitiveVariables[nm + i];
+        }
+        RDouble cp, cv;
+        RDouble gasConstant = this->GetUniversalGasConstant();
+        RDouble mass = this->GetMixedGasMolecularWeight(massFractions);
+        //! The NormalizePrimitive() function has been used in the function of GetTemperature().
+        if (ntmodel >= 2)        //! Two-Temperature and Three-Temperature model.
+        {
+
+        }
+        else                    //! The default setting is One-Temperature model.
+        {
+            this->ComputeConstantPressureSpecificHeatByMassFraction(massFractions, transRotationTemperature, cp);
+            cv = cp - gasConstant / mass;
+        }
+        gama = cp / cv;
+    }
+}
+
+void MixedGas::ReadGasModel()
+{
+    string gasfile;
+    GlobalDataBase::GetData("gasfile", &gasfile, PHSTRING, 1);
+
+    string chemicalModel = "";
+    int nSpecies = 0, nReaction = 0;
+    if (gasfile == "Gu5")       //! The Gupta 5-species-6-reactions model.
+    {
+        chemicalModel = "Gupta";
+        nSpecies = 5;
+        nReaction = 6;
+    }
+    else if (gasfile == "Gu7")  //! The Gupta 7-species-9-reactions model.
+    {
+        chemicalModel = "Gupta";
+        nSpecies = 7;
+        nReaction = 9;
+    }
+    else if (gasfile == "Gu11") //! The Gupta 11-species-20-reactions model.
+    {
+        chemicalModel = "Gupta";
+        nSpecies = 11;
+        nReaction = 20;
+    }
+    else if (gasfile == "Pa5")  //! The Park 5-species-17-reactions model.
+    {
+        chemicalModel = "Park";
+        nSpecies = 5;
+        nReaction = 17;
+    }
+    else if (gasfile == "Pa7")  //! The Park 7-species-22-reactions model.
+    {
+        chemicalModel = "Park";
+        nSpecies = 7;
+        nReaction = 22;
+    }
+    else if (gasfile == "Pa11") //! The Park 11-species-48-reactions model.
+    {
+        chemicalModel = "Park";
+        nSpecies = 11;
+        nReaction = 48;
+    }
+    else if (gasfile == "DK5")  //! The Dunn-Kang 5-species-11-reactions model.
+    {
+        chemicalModel = "Dunn-Kang";
+        nSpecies = 5;
+        nReaction = 11;
+    }
+    else if (gasfile == "DK7")  //! The Dunn-Kang 7-species-15-reactions model.
+    {
+        chemicalModel = "Dunn-Kang";
+        nSpecies = 7;
+        nReaction = 15;
+    }
+    else if (gasfile == "DK11") //! The Dunn-Kang 11-species-26-reactions model.
+    {
+        chemicalModel = "Dunn-Kang";
+        nSpecies = 11;
+        nReaction = 26;
+    }
+    else if (gasfile == "Mars-Pa8") //! The Park 8-species-12-reactions model for Mars.
+    {
+        chemicalModel = "Mars-Park";
+        nSpecies = 8;
+        nReaction = 12;
+    }
+    else if (gasfile == "Mars-Mc8") //! The McKenzie 8-species-12-reactions model for Mars.
+    {
+        chemicalModel = "Mars-McKenzie";
+        nSpecies = 8;
+        nReaction = 12;
+    }
+    else if (gasfile == "Combustion-12")
+    {
+        chemicalModel = "CombustionGas"; //The 12-species-20-reactions model of Combustion chamber Gas which reference AEROPH.
+        nSpecies = 12;
+        nReaction = 20;
+    }
+    else if (gasfile == "Gas-Mixture")
+    {
+        chemicalModel = "Gas-Mixture";
+        nSpecies = 2;
+        nReaction = 1;
+    }
+    else
+    {
+        if (gasfile.find("Gu") != gasfile.npos)
+        {
+            chemicalModel = "Gupta";
+        }
+        else if (gasfile.find("Pa") != gasfile.npos)
+        {
+            if (gasfile.find("Mars-Pa") != gasfile.npos)
+            {
+                chemicalModel = "Mars-Park";
+            }
+            else
+            {
+                chemicalModel = "Park";
+            }
+        }
+        else if (gasfile.find("DK") != gasfile.npos)
+        {
+            chemicalModel = "Dunn-Kang";
+        }
+        else if (gasfile.find("Mars-Mc") != gasfile.npos)
+        {
+            chemicalModel = "Mars-McKenzie";
+        }
+    }
+
+    if (chemicalModel == "")    //! Obtain the gas model from file.
+    {
+        fstream file;
+        file.open(gasfile.c_str(), ios_base::in);
+
+        ReadGasModel(file);
+
+        file.close();
+        file.clear();
+    }
+    else    //! Generate the gas model in the code.
+    {
+        GenerateGasModel(chemicalModel);
+    }
+}
+
+void MixedGas::InitGasModel()
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    if (nchem <= 0) return;
+
+    if (myid == server)
+    {
+        ReadGasModel();
+    }
+
+    int number_of_processor = GetNumberOfProcessor();
+
+    if (number_of_processor <= 1) return;
+
+    int tag = 0;
+    PH_BcastComposite(ChemCompressData, ChemDecompressData, server, tag);
+}
+
+void MixedGas::ComputeReferenceViscosityDimensionalChemical()
+{
+    RDouble reference_viscosity_dimensional;
+    RDouble reference_tempereature = 1.0;
+
+    RDouble *mass_fraction_reference = this->molecularProperty->GetInitialMassFraction();
+    ComputeMoleFractionByMassFraction(mass_fraction_reference, moleFractions);
+
+    if (ntmodel > 1)    //! Multi-Temperature Model.
+    {
+
+    }
+    else         //! The default model: one-temperature model.
+    { 
+        ComputeOneTemperatureModelSpeciesViscosityDimensional(reference_tempereature, speciesViscosity);
+        ComputeMixtureCoefficientByWilkeFormula(moleFractions, speciesViscosity, speciesWeight);
+        ComputeMixtureByWilkeFormula(moleFractions, speciesViscosity, speciesWeight, reference_viscosity_dimensional);
+    }
+
+    referenceParameterDimensional.SetViscosity(reference_viscosity_dimensional);
+}
+
+void MixedGas::ComputeReferenceViscosityDimensionalNoChemical()
+{
+    RDouble t0i  = 288.15;
+    RDouble tsi  = 110.4;
+    RDouble mu0i = 1.7894E-05;
+
+    RDouble refDimensionalTemperature = referenceParameterDimensional.GetTemperature();
+    RDouble reference_viscosity_dimensional = (t0i + tsi) / (refDimensionalTemperature + tsi) * pow(refDimensionalTemperature / t0i, 1.5) * mu0i;
+    referenceParameterDimensional.SetViscosity(reference_viscosity_dimensional);
+}
+
+void MixedGas::ComputeReferenceTsuth()
+{
+    RDouble tsi = 110.4;
+
+    RDouble refDimensionalTemperature = referenceParameterDimensional.GetTemperature();
+
+    RDouble tsuth = tsi / refDimensionalTemperature;
+    GlobalDataBase::UpdateData("tsuth", &tsuth, PHDOUBLE, 1);
+}
+
+void MixedGas::ComputeReferenceViscosityDimensional()
+{
+    if (nchem > 0)
+    {
+        ComputeReferenceViscosityDimensionalChemical();
+    }
+    else
+    {
+        ComputeReferenceViscosityDimensionalNoChemical();
+    }
+
+    ComputeReferenceTsuth();
+}
+
+void MixedGas::ComputeReferenceSpecificHeatRatio()
+{
+    if (nchem > 0)
+    {
+        ComputeReferenceSpecificHeatRatioWithChemical();
+    }
+    else
+    {
+        RDouble refGama = 1.4;
+        refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+        referenceParameterDimensional.SetAverageSpecificHeatRatio(refGama);
+    }
+}
+
+void MixedGas::ComputeReferenceSpecificHeatRatioWithChemical()
+{
+    RDouble reference_temperature = 1.0;
+    RDouble refGama = 1.4;
+    RDouble *mass_fraction_reference = this->molecularProperty->GetInitialMassFraction();
+
+    if (ntmodel > 1)       //! multi-temperature model.
+    {
+
+    }
+    else                  //! one-temperature model.
+    {
+        RDouble cp_dimensional, cv_dimensional;
+        ComputeSpeciesConstantPressureSpecificHeatDimensional(reference_temperature, speciesCp);
+        ComputeMixtureByMassFraction(mass_fraction_reference, speciesCp, cp_dimensional);
+
+        RDouble reference_average_molecular_weight_dimensional = referenceParameterDimensional.GetAverageMolecularWeight();
+        RDouble o_reference_average_molecular_weight_dimensional = 1.0 / reference_average_molecular_weight_dimensional;
+
+        cv_dimensional = cp_dimensional - rjmk * o_reference_average_molecular_weight_dimensional;
+        refGama = cp_dimensional / cv_dimensional;
+    }
+
+    referenceParameterDimensional.SetAverageSpecificHeatRatio(refGama);
+    GlobalDataBase::UpdateData("refGama", &refGama, PHDOUBLE, 1);
+}
+
+void MixedGas::ComputeReferenceGeneralGasConstant()
+{
+    RDouble reference_average_molecular_weight_dimensional = referenceParameterDimensional.GetAverageMolecularWeight();
+    RDouble reference_average_general_gas_constant = rjmk / reference_average_molecular_weight_dimensional;
+
+    referenceParameterDimensional.SetAverageGeneralGasConstant(reference_average_general_gas_constant);
+    GlobalDataBase::UpdateData("reference_average_general_gas_constant", &reference_average_general_gas_constant, PHDOUBLE, 1);
+}
+
+void MixedGas::SetAirInformationByDataBase()
+{
+    RDouble height = GlobalDataBase::GetDoubleParaFromDB("height");
+
+    RDouble refDimensionalTemperature;
+    RDouble refDimensionalPressure;
+    RDouble refDimensionalDensity;
+    RDouble refDimensionalSonicSpeed;
+
+    GetAirInfo(height, refDimensionalTemperature, refDimensionalPressure, refDimensionalDensity, refDimensionalSonicSpeed);
+
+    referenceParameterDimensional.SetDensity(refDimensionalDensity);
+    referenceParameterDimensional.SetPressure(refDimensionalPressure);
+    referenceParameterDimensional.SetTemperature(refDimensionalTemperature);
+    referenceParameterDimensional.SetSoundVelocity(refDimensionalSonicSpeed);
+
+    GlobalDataBase::UpdateData("refDimensionalDensity", &refDimensionalDensity, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalPressure", &refDimensionalPressure, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalTemperature", &refDimensionalTemperature, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalSonicSpeed", &refDimensionalSonicSpeed, PHDOUBLE, 1);
+}
+
+void MixedGas::SetAirInformationByExpData()
+{
+    RDouble refDimensionalTemperature;
+    RDouble refDimensionalPressure;
+    RDouble refDimensionalDensity;
+    RDouble refDimensionalSonicSpeed;
+
+    RDouble refMachNumber = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+    RDouble T0 = referenceParameterDimensional.GetTemperature();
+    RDouble P0 = referenceParameterDimensional.GetPressure();
+
+    RDouble refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+    RDouble R = 287.053;
+
+    RDouble mi = refGama / (refGama - 1.0);
+    RDouble coef = 1.0 + (refGama - 1.0) * refMachNumber * refMachNumber / 2.0;
+
+    RDouble T, P, rho, c;
+    T = T0 / coef;
+    P = P0 / pow(coef, mi);
+    rho = P / R / T;
+    c = sqrt(refGama * R * T);
+
+    refDimensionalDensity = rho;
+    refDimensionalPressure = P;
+    refDimensionalTemperature = T;
+    refDimensionalSonicSpeed = c;
+
+    referenceParameterDimensional.SetDensity(refDimensionalDensity);
+    referenceParameterDimensional.SetPressure(refDimensionalPressure);
+    referenceParameterDimensional.SetTemperature(refDimensionalTemperature);
+    referenceParameterDimensional.SetSoundVelocity(refDimensionalSonicSpeed);
+
+    GlobalDataBase::UpdateData("refDimensionalDensity", &refDimensionalDensity, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalPressure", &refDimensionalPressure, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalTemperature", &refDimensionalTemperature, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalSonicSpeed", &refDimensionalSonicSpeed, PHDOUBLE, 1);
+}
+
+void MixedGas::ComputeReferenceGasInformation()
+{
+    int inflowParaType = GlobalDataBase::GetIntParaFromDB("inflowParaType");
+
+    if (inflowParaType == NONDIMENSIONCONDITION)    //! Obtain the reference density and reference pressure for non-dimension condition.
+    {
+        ComputeDensityWithReynoldsNumber();
+        ComputePressureInGasStateEquation();
+    }
+    else if (inflowParaType == FLIGHTCONDITION || inflowParaType == EXPERIMENTCONDITION)      //! Obtain the reference density for non-dimension, and the Re.
+    {
+        NormalizeAirInformation();
+        ComputeReferenceReynoldsNumber();
+    }
+    else if (inflowParaType == TEMPERATURE_DENSITY)
+    {
+        RDouble refDimensionalTemperature = referenceParameterDimensional.GetTemperature();
+        RDouble refDimensionalDensity = referenceParameterDimensional.GetDensity();
+        RDouble gasConstant = referenceParameterDimensional.GetAverageGeneralGasConstant();
+        
+        RDouble refDimensionalPressure = refDimensionalDensity * gasConstant * refDimensionalTemperature;
+        referenceParameterDimensional.SetPressure(refDimensionalPressure);
+        GlobalDataBase::UpdateData("refDimensionalPressure", &refDimensionalPressure, PHDOUBLE, 1);
+
+        ComputeReferenceReynoldsNumber();
+    }
+    else if (inflowParaType == TEMPERATURE_PRESSURE)
+    {
+        NormalizeAirInformation();
+        ComputeReferenceReynoldsNumber();
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("inflowParaType", inflowParaType);
+    }
+}
+
+void MixedGas::ComputeReferenceSoundVelocity()
+{
+    RDouble gama0 = referenceParameterDimensional.GetAverageSpecificHeatRatio();
+    RDouble reference_general_gas_constant = referenceParameterDimensional.GetAverageGeneralGasConstant();
+    RDouble refDimensionalTemperature = referenceParameterDimensional.GetTemperature();
+
+    //! Unit: m/s.
+    RDouble refDimensionalSonicSpeed = sqrt(gama0 * reference_general_gas_constant * refDimensionalTemperature);
+
+    referenceParameterDimensional.SetSoundVelocity(refDimensionalSonicSpeed);
+    GlobalDataBase::UpdateData("refDimensionalSonicSpeed", &refDimensionalSonicSpeed, PHDOUBLE, 1);
+}
+
+void MixedGas::ComputeReferenceInitMassFractionInformation()
+{
+    RDouble *mass_fraction_reference = this->molecularProperty->GetInitialMassFraction();
+
+    MassFractionConversion(mass_fraction_reference);
+
+}
+
+void MixedGas::ComputeReferenceMolecularInformation()
+{
+    if (nchem > 0)
+    {
+        ComputeReferenceMolecularInformationWithChemical();
+    }
+    else
+    {
+        ComputeReferenceMolecularInformationWithoutChemical();
+    }
+
+    RDouble refMass = referenceParameterDimensional.GetAverageMolecularWeight();
+    this->electronMassDimension = 5.486e-7;     //! Unit: kg/m3.
+    this->electronMass = 5.486e-7 / refMass;    //! non-dimensional value.
+}
+
+void MixedGas::ComputeReferenceMolecularInformationWithoutChemical()
+{
+    //! Unit: kg/mol.
+    RDouble reference_average_molecular_weight_dimensional = 28.9644 * 1.0e-3;
+
+    referenceParameterDimensional.SetAverageMolecularWeight(reference_average_molecular_weight_dimensional);
+}
+
+void MixedGas::ComputeReferenceMolecularInformationWithChemical()
+{
+    RDouble *molecularWeight  = molecularProperty->GetMolecularWeight();
+    RDouble *oMolecularWeight = molecularProperty->GetMolecularWeightReciprocal();
+
+    RDouble *molecularWeightDimensional  = molecularProperty->GetMolecularWeightDimensional();
+    RDouble *oMolecularWeightDimensional = molecularProperty->GetMolecularWeightReciprocalDimensional();
+
+    RDouble *mass_fraction_reference = this->molecularProperty->GetInitialMassFraction();
+
+    //! The molecular weight of the species.
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        molecularWeightDimensional[ispecies] *= 1.0e-3;
+    }
+
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        oMolecularWeightDimensional[ispecies] = 1.0 / molecularWeightDimensional[ispecies];
+    }
+
+    RDouble o_reference_average_molecular_weight_dimensional = 0.0;
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        o_reference_average_molecular_weight_dimensional += mass_fraction_reference[ispecies] * oMolecularWeightDimensional[ispecies];
+    }
+
+    RDouble reference_average_molecular_weight_dimensional = 1.0 / o_reference_average_molecular_weight_dimensional;
+
+    referenceParameterDimensional.SetAverageMolecularWeight(reference_average_molecular_weight_dimensional);
+
+    //! The non-dimensionalization of the molecular weight of species.
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        molecularWeight[ispecies] = molecularWeightDimensional[ispecies] * o_reference_average_molecular_weight_dimensional;
+    }
+
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        oMolecularWeight[ispecies] = 1.0 / molecularWeight[ispecies];
+    }
+}
+
+void MixedGas::ComputeReferenceVelocity()
+{
+    RDouble refDimensionalSonicSpeed = referenceParameterDimensional.GetSoundVelocity();
+
+    int inflowParaType = GlobalDataBase::GetIntParaFromDB("inflowParaType");
+
+    if (inflowParaType == TEMPERATURE_DENSITY || inflowParaType == TEMPERATURE_PRESSURE)
+    {
+        RDouble refDimensionalVelocity = referenceParameterDimensional.GetVelocity();
+        RDouble refMachNumber = refDimensionalVelocity / refDimensionalSonicSpeed;
+        referenceParameterDimensional.SetMachNumber(refMachNumber);
+        GlobalDataBase::UpdateData("refMachNumber", &refMachNumber, PHDOUBLE, 1);
+    }
+    else
+    {
+        RDouble refMachNumber = referenceParameterDimensional.GetMachNumber();
+        RDouble refDimensionalVelocity = refDimensionalSonicSpeed * refMachNumber;
+        referenceParameterDimensional.SetVelocity(refDimensionalVelocity);
+        GlobalDataBase::UpdateData("refDimensionalVelocity", &refDimensionalVelocity, PHDOUBLE, 1);
+    }
+}
+
+void MixedGas::ComputeReferenceReynoldsNumber()
+{
+    RDouble refDimensionalDensity = referenceParameterDimensional.GetDensity();
+    RDouble reference_velocity_dimensional  = referenceParameterDimensional.GetVelocity();
+    RDouble reference_viscosity_dimensional = referenceParameterDimensional.GetViscosity();
+
+    RDouble refReNumber = refDimensionalDensity * reference_velocity_dimensional / reference_viscosity_dimensional;
+    RDouble oreynolds = 1.0 / refReNumber;
+
+    referenceParameterDimensional.SetReynoldsNumber(refReNumber);
+    GlobalDataBase::UpdateData("refReNumber", &refReNumber, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("oreynolds", &oreynolds, PHDOUBLE, 1);
+}
+
+void MixedGas::ComputeProperReynoldsNumberForGrid()
+{
+    RDouble refReNumber = referenceParameterDimensional.GetReynoldsNumber();
+    RDouble reynoldsReferenceLengthDimensional = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+
+    refReNumber *= reynoldsReferenceLengthDimensional;
+    RDouble oreynolds = 1.0 / refReNumber;
+
+    referenceParameterDimensional.SetReynoldsNumber(refReNumber);
+    GlobalDataBase::UpdateData("refReNumber", &refReNumber, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("oreynolds", &oreynolds, PHDOUBLE, 1);
+}
+
+void MixedGas::ComputeOtherProperParameterForGrid()
+{
+    RDouble reynoldsReferenceLengthDimensional = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+    RDouble forceReferenceLength = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLength");
+    RDouble forceReferenceLengthSpanWise = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLengthSpanWise");
+    RDouble forceReferenceArea = GlobalDataBase::GetDoubleParaFromDB("forceReferenceArea");
+
+    RDouble TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+    RDouble TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+    RDouble TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+
+    if (GetDim() == THREE_D)
+    {
+        forceReferenceArea /= reynoldsReferenceLengthDimensional * reynoldsReferenceLengthDimensional;
+    }
+    else if (GetDim() == TWO_D)
+    {
+        forceReferenceArea /= reynoldsReferenceLengthDimensional;
+    }
+    forceReferenceLength /= reynoldsReferenceLengthDimensional;
+    forceReferenceLengthSpanWise /= reynoldsReferenceLengthDimensional;
+    TorqueRefX /= reynoldsReferenceLengthDimensional;
+    TorqueRefY /= reynoldsReferenceLengthDimensional;
+    TorqueRefZ /= reynoldsReferenceLengthDimensional;
+
+    GlobalDataBase::UpdateData("forceReferenceLength", &forceReferenceLength, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("forceReferenceLengthSpanWise", &forceReferenceLengthSpanWise, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("forceReferenceArea", &forceReferenceArea, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("TorqueRefX", &TorqueRefX, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("TorqueRefY", &TorqueRefY, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("TorqueRefZ", &TorqueRefZ, PHDOUBLE, 1);
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady == 1)
+    {
+        PrintToWindow("Unsteady Informations" , "\n");
+        RDouble reference_velocity_dimensional = referenceParameterDimensional.GetVelocity();
+        RDouble unit = reynoldsReferenceLengthDimensional / reference_velocity_dimensional;
+        RDouble physicalTimeStepDimensional = 0.0;
+        RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+        if (GlobalDataBase::IsExist("physicalTimeStepDimensional", PHDOUBLE, 1))
+        {
+            physicalTimeStepDimensional = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStepDimensional");
+            if (physicalTimeStepDimensional >= 0.0)
+            {
+                physicalTimeStep = physicalTimeStepDimensional / unit;
+            }
+        }
+        physicalTimeStepDimensional = physicalTimeStep * unit;
+        GlobalDataBase::UpdateData("physicalTimeStepDimensional", &physicalTimeStepDimensional, PHDOUBLE, 1);
+        //! The non-dimensional physical time step based on grid scale.
+        physicalTimeStep /= reynoldsReferenceLengthDimensional;
+        GlobalDataBase::UpdateData("physicalTimeStep", &physicalTimeStep, PHDOUBLE, 1);
+
+        PrintToWindow("  Physical Time Step       :    ", physicalTimeStepDimensional , "s", "\n");
+    }
+}
+
+void MixedGas::ComputeDensityWithReynoldsNumber()
+{
+    RDouble refReNumber = referenceParameterDimensional.GetReynoldsNumber();
+    RDouble reference_viscosity_dimensional = referenceParameterDimensional.GetViscosity();
+    RDouble reference_velocity_dimensional = referenceParameterDimensional.GetVelocity();
+
+    RDouble refDimensionalDensity = refReNumber * reference_viscosity_dimensional / reference_velocity_dimensional;
+
+    referenceParameterDimensional.SetDensity(refDimensionalDensity);
+    GlobalDataBase::UpdateData("refDimensionalDensity", &refDimensionalDensity, PHDOUBLE, 1);
+}
+
+void MixedGas::ComputePressureInGasStateEquation()
+{
+    RDouble refDimensionalDensity = referenceParameterDimensional.GetDensity();
+    RDouble reference_average_generanl_gas_constant = referenceParameterDimensional.GetAverageGeneralGasConstant();
+    RDouble refDimensionalTemperature = referenceParameterDimensional.GetTemperature();
+
+    RDouble refDimensionalPressure = refDimensionalDensity * reference_average_generanl_gas_constant * refDimensionalTemperature;
+
+    referenceParameterDimensional.SetPressure(refDimensionalPressure);
+    GlobalDataBase::UpdateData("refDimensionalPressure", &refDimensionalPressure, PHDOUBLE, 1);
+}
+
+void MixedGas::InitNumberOfSpecies()
+{
+    if (nchem == 0)
+    {
+        numberOfSpecies = 0;
+        nl = nm;
+        nEquation = nm;
+    }
+    else
+    {
+        nl = nm + numberOfSpecies - 1;
+        nEquation = nm + numberOfSpecies + ntmodel - 1;
+    }
+    GlobalDataBase::UpdateData("nl", &nl, PHINT, 1);
+    GlobalDataBase::UpdateData("numberOfSpecies", &numberOfSpecies, PHINT, 1);
+
+    if (numberOfSpecies > 0)
+    {
+        this->nElectronIndex = this->GetSpeciesIndex("e-");
+        nNitrogenIndex = this->GetSpeciesIndex("N2");
+        if (this->nElectronIndex >= 0)
+        {
+            this->nSpeciesEquation = numberOfSpecies - 2;
+            this->nLastSpeciesIndex = numberOfSpecies - 2;
+        }
+        else
+        {
+            this->nSpeciesEquation = numberOfSpecies - 1;
+            this->nLastSpeciesIndex = numberOfSpecies - 1;
+        }
+    }
+    else
+    {
+        this->nSpeciesEquation = 0;
+        this->nElectronIndex = -1;
+        this->nNitrogenIndex = -1;
+        this->nLastSpeciesIndex = -1;
+    }
+
+    //! This variable is used to indicate the index of the species with the maximum mass fraction in the array of mixture.
+    //for Earth air, Nitrogen is the species with the maximum mass fraction, so it is employed as the variable name.
+    GlobalDataBase::UpdateData("nNitrogenIndex", &this->nLastSpeciesIndex, PHINT, 1);
+    GlobalDataBase::UpdateData("nElectronIndex", &this->nElectronIndex, PHINT, 1);
+
+    if (nchem > 0)
+    {
+        AllocateWorkingSpace();
+    }
+}
+
+RDouble MixedGas::ComputeReferenceReynoldsNumberFromTotalPT(void)
+{
+    RDouble Re0, refMachNumber;
+    RDouble T0 = referenceParameterDimensional.GetTemperature();
+    RDouble P0 = referenceParameterDimensional.GetPressure();
+    GlobalDataBase::GetData("refMachNumber", &refMachNumber, PHDOUBLE, 1);
+
+    RDouble refGama, c;
+    GlobalDataBase::GetData("refGama", &refGama, PHDOUBLE, 1);
+    c = referenceParameterDimensional.GetSoundVelocity();
+    RDouble R = 287.0;
+    RDouble coef, T, P, rho, miuInf;
+    RDouble mi = refGama / (refGama - 1.0);
+    coef = 1.0 + (refGama - 1.0) * refMachNumber * refMachNumber / 2.0;
+    T = T0 / coef;
+    P = P0 / pow(coef, mi);
+    rho = P / R / T;
+
+    RDouble miu0 = 1.7894e-5;
+    RDouble T1 = 288.15, C = 110.4;
+    miuInf = pow(T / T1, 1.5) * (T1 + C) / (T + C) * miu0;
+
+    Re0 = rho * refMachNumber * c / miuInf;
+    return Re0;
+}
+
+void MixedGas::Print()
+{
+    ostringstream oss;
+    string *speciesName = GetNameOfSpecies();
+    Thermo_Param *param = molecularProperty->GetThermodynamicProperties();
+    for (int s = 0; s < numberOfSpecies; ++ s)
+    {
+        oss << speciesName[s] << endl;
+        oss << param[s].nType << ", " << param[s].Tvs.Tv[0] << ", " << param[s].Tes << ", " << param[s].gs0 << ", " << param[s].gs1 << ", " << param[s].hs0 << endl;
+    }
+
+    RDouble *blotterA = CurveFits->GetBlotterCurveFittingCoefficientA();
+    RDouble *blotterB = CurveFits->GetBlotterCurveFittingCoefficientB();
+    RDouble *blotterC = CurveFits->GetBlotterCurveFittingCoefficientC();
+    RDouble *blotterD = CurveFits->GetBlotterCurveFittingCoefficientD();
+    RDouble *blotterE = CurveFits->GetBlotterCurveFittingCoefficientE();
+    for (int s = 0; s < numberOfSpecies; ++ s)
+    {
+        oss << speciesName[s] << endl;
+        oss << blotterA[s] << ", " << blotterB[s] << ", " << blotterC[s] << ", " << blotterD[s] << ", " << blotterE[s] << endl;
+    }
+
+    int nTemp = 5, nCoef = 0;
+    nCoef = thermodynamicManager->GetNumberofPolynomialCoefficient();
+    for (int s = 0; s < numberOfSpecies; ++ s)
+    {
+        oss << speciesName[s] << endl;
+        for (int i = 0; i < nTemp; ++ i)
+        {
+            RDouble *coef = thermodynamicManager->GetPolynomialCoefficient(s, i);
+            for (int j = 0; j < nCoef; ++ j)
+            {
+                oss << coef[j] << ", ";
+            }
+            oss << endl;
+        }
+    }
+    oss << endl;
+    int **forward = stoichiometricEquation->GetForwardReactionStoichiometricCoefficient();
+    int **backward = stoichiometricEquation->GetBackwardReactionStoichiometricCoefficient();
+    RDouble **thirdBody = stoichiometricEquation->GetReactionStoichiometricThirdBodyCoefficient();
+    for (int r = 0; r < numberOfReaction; ++ r)
+    {
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            oss << forward[r][s] << ", ";
+        }
+        oss << endl;
+    }
+    oss << endl;
+    for (int r = 0; r < numberOfReaction; ++ r)
+    {
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            oss << backward[r][s] << ", ";
+        }
+        oss << endl;
+    }
+    oss << endl;
+    for (int r = 0; r < numberOfReaction; ++ r)
+    {
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            oss << thirdBody[r][s] << ", ";
+        }
+        oss << endl;
+    }
+    oss << endl;
+
+    RDouble *f1 = reactionRate->GetForwardReactionRateCoefficientA();
+    RDouble *f2 = reactionRate->GetForwardReactionRateCoefficientB();
+    RDouble *f3 = reactionRate->GetForwardReactionRateCoefficientC();
+    RDouble *b1 = reactionRate->GetBackwardReactionRateCoefficientA();
+    RDouble *b2 = reactionRate->GetBackwardReactionRateCoefficientB();
+    RDouble *b3 = reactionRate->GetBackwardReactionRateCoefficientC();
+    for (int r = 0; r < numberOfReaction; ++ r)
+    {
+        oss << f1[r] << ", " << f2[r] << ", " << f3[r] << ", " << b1[r] << ", " << b2[r] << ", " << b3[r] << endl;
+    }
+    oss << endl;
+
+    WriteLogFile(oss);
+}
+
+void MixedGas::InitReferenceParameter()
+{
+    InitGasModel();
+    InitNumberOfSpecies();
+
+    int inflowParaType = GlobalDataBase::GetIntParaFromDB("inflowParaType");
+
+    if (inflowParaType == NONDIMENSIONCONDITION)
+    {
+        RDouble refMachNumber = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+        RDouble refReNumber = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+        RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+
+        referenceParameterDimensional.SetMachNumber(refMachNumber);
+        referenceParameterDimensional.SetReynoldsNumber(refReNumber);
+        referenceParameterDimensional.SetTemperature(refDimensionalTemperature);
+    }
+    else if (inflowParaType == FLIGHTCONDITION)
+    {
+        RDouble refMachNumber = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+
+        referenceParameterDimensional.SetMachNumber(refMachNumber);
+
+        SetAirInformationByDataBase();
+    }
+    else if (inflowParaType == EXPERIMENTCONDITION)
+    {
+        RDouble refMachNumber = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+        RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+        RDouble refDimensionalPressure = GlobalDataBase::GetDoubleParaFromDB("refDimensionalPressure");
+
+        referenceParameterDimensional.SetMachNumber(refMachNumber);
+        referenceParameterDimensional.SetTemperature(refDimensionalTemperature);
+        referenceParameterDimensional.SetPressure(refDimensionalPressure);
+
+        SetAirInformationByExpData();
+    }
+    else if (inflowParaType == TEMPERATURE_DENSITY) //where temperature and density are fixed.
+    {
+        RDouble refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+        RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+        RDouble refDimensionalDensity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+
+        referenceParameterDimensional.SetVelocity(refDimensionalVelocity);
+        referenceParameterDimensional.SetTemperature(refDimensionalTemperature);
+        referenceParameterDimensional.SetDensity(refDimensionalDensity);
+    }
+    else if (inflowParaType == TEMPERATURE_PRESSURE) //where temperature and pressure are fixed.
+    {
+        RDouble refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+        RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+        RDouble refDimensionalPressure = GlobalDataBase::GetDoubleParaFromDB("refDimensionalPressure");
+
+        referenceParameterDimensional.SetVelocity(refDimensionalVelocity);
+        referenceParameterDimensional.SetTemperature(refDimensionalTemperature);
+        referenceParameterDimensional.SetPressure(refDimensionalPressure);
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("inflowParaType", inflowParaType);
+    }
+
+    RDouble prl = GlobalDataBase::GetDoubleParaFromDB("prl");
+    RDouble prt = GlobalDataBase::GetDoubleParaFromDB("prt");
+
+    RDouble oprl = 1.0 / prl;
+    GlobalDataBase::UpdateData("oprl", &oprl, PHDOUBLE, 1);
+    RDouble oprt = 1.0 / prt;
+    GlobalDataBase::UpdateData("oprt", &oprt, PHDOUBLE, 1);
+
+    this->oprl = oprl;
+    this->oprt = oprt;
+}
+
+void MixedGas::ComputeCoefficientOfStateEquation()
+{
+    //! No matter whether chemical reactions exist or not.
+    RDouble gama0 = referenceParameterDimensional.GetAverageSpecificHeatRatio();
+    RDouble refMachNumber = referenceParameterDimensional.GetMachNumber();
+
+    //! The variable is the non-dimensional value of 8.314/M��M denotes the non-dimensional molecular weight of the mixture gas.
+    coefficientOfStateEquation = 1.0 / (gama0 * refMachNumber * refMachNumber); //! Universal gas constant.
+    GlobalDataBase::UpdateData("coefficientOfStateEquation", &coefficientOfStateEquation, PHDOUBLE, 1);
+}
+
+void MixedGas::NormalizeAirInformation()
+{
+    RDouble refDimensionalPressure = referenceParameterDimensional.GetPressure();
+    RDouble refDimensionalTemperature = referenceParameterDimensional.GetTemperature();
+    RDouble reference_average_generanl_gas_constant = referenceParameterDimensional.GetAverageGeneralGasConstant();
+
+    RDouble refDimensionalDensity = refDimensionalPressure / reference_average_generanl_gas_constant / refDimensionalTemperature;
+
+    referenceParameterDimensional.SetDensity(refDimensionalDensity);
+    GlobalDataBase::UpdateData("refDimensionalDensity", &refDimensionalDensity, PHDOUBLE, 1);
+}
+
+void MixedGas::InitCommonParameter()
+{
+    nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    nm    = GlobalDataBase::GetIntParaFromDB("nm");
+    ntmodel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+    nGasModel = GlobalDataBase::GetIntParaFromDB("nGasModel");
+    nTEnergyModel = GlobalDataBase::GetIntParaFromDB("nTEnergyModel");
+    parkVDPower = GlobalDataBase::GetDoubleParaFromDB("parkVDPower");
+    chemicalRelaxCorf = GlobalDataBase::GetDoubleParaFromDB("chemicalRelaxCorf");
+    nSpeciesLimit = GlobalDataBase::GetIntParaFromDB("nSpeciesLimit");
+    nEnergyRecycle = GlobalDataBase::GetIntParaFromDB("nEnergyRecycle") * nchem;
+    veTemperatureMin = GlobalDataBase::GetDoubleParaFromDB("veTemperatureMin");
+    nChemcalSourceModified = GlobalDataBase::GetIntParaFromDB("nChemcalSourceModified");
+    nChemcalSourceEsMethod = GlobalDataBase::GetIntParaFromDB("nChemcalSourceEsMethod");
+
+    maxViscous = log(1.0);
+    lnMaximum =  log(1.0e36);
+    if (GlobalDataBase::IsExist("maxViscous", PHDOUBLE, 1))
+    {
+        maxViscous = log(GlobalDataBase::GetDoubleParaFromDB("maxViscous")*10.0);
+    }
+
+    trTemperatureMin = 10.0;
+    if (GlobalDataBase::IsExist("trTemperatureMin", PHDOUBLE, 1))
+    {
+        trTemperatureMin = GlobalDataBase::GetDoubleParaFromDB("trTemperatureMin");
+    }
+
+    nDensityForWallMethod = 0;
+    if (GlobalDataBase::IsExist("nDensityForWallMethod", PHINT, 1))
+    {
+        nDensityForWallMethod = GlobalDataBase::GetIntParaFromDB("nDensityForWallMethod");
+    }
+
+    if (GlobalDataBase::IsExist("nIsChemicalFreeze", PHINT, 1))
+    {
+        nIsChemicalFreeze = GlobalDataBase::GetIntParaFromDB("nIsChemicalFreeze");
+    }
+    if (GlobalDataBase::IsExist("nIsSuperCatalytic", PHINT, 1))
+    {
+        nIsSuperCatalytic = GlobalDataBase::GetIntParaFromDB("nIsSuperCatalytic");
+        if (nIsSuperCatalytic != 0 && nIsSuperCatalytic != 1)
+        {
+            //cout<<"The parameter \"nIsSuperCatalytic\" does not equal to zero or one"<<endl;
+            nIsSuperCatalytic = 1;
+            GlobalDataBase::UpdateData("nIsSuperCatalytic", &nIsSuperCatalytic, PHINT, 1);
+        }
+    }
+
+    if (parkVDPower < 0.0 || parkVDPower > 1.0)
+    {
+        parkVDPower = 0.6;
+        GlobalDataBase::UpdateData("parkVDPower", &parkVDPower, PHDOUBLE, 1);
+    }
+
+    reynoldsReferenceLengthDimensional = 1.0;
+
+    RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+
+    reynoldsReferenceLengthDimensional *= gridScaleFactor;
+
+    GlobalDataBase::UpdateData("reynoldsReferenceLengthDimensional", &reynoldsReferenceLengthDimensional, PHDOUBLE, 1);
+
+    mTT = 0;
+    if (ntmodel == 3)
+    {
+
+    }
+    else if (ntmodel == 2)
+    {
+
+    }
+    else
+    {
+        mTV = 0;
+        mTE = 0;
+    }
+}
+
+void MixedGas::InitOtherParameter()
+{
+    int nolstress, nrokplus;
+    nolstress = -1;
+    nrokplus  = -1;
+    GlobalDataBase::UpdateData("nolstress", &nolstress, PHINT, 1);
+    GlobalDataBase::UpdateData("nrokplus" , &nrokplus , PHINT, 1);
+
+    int outnstep = 0;
+    GlobalDataBase::UpdateData("outnstep", &outnstep, PHINT, 1);
+    int innstep = 0;
+    GlobalDataBase::UpdateData("innstep", &innstep, PHINT, 1);
+
+    RDouble physicalTime = 0.0;
+    GlobalDataBase::UpdateData("physicalTime", &physicalTime, PHDOUBLE, 1);
+
+    int nIndexTT = 0;
+    int nIndexTV = 0;
+    int nIndexTE = 0;
+    if (ntmodel == 2)
+    {
+
+    }
+    else if (ntmodel == 3)
+    {
+
+    }
+    else
+    {
+        nIndexTT = 0;
+        nIndexTV = 0;
+        nIndexTE = 0;
+    }
+    GlobalDataBase::UpdateData("indexOfTT", &nIndexTT, PHINT, 1);
+    GlobalDataBase::UpdateData("indexOfTV", &nIndexTV, PHINT, 1);
+    GlobalDataBase::UpdateData("indexOfTE", &nIndexTE, PHINT, 1);
+}
+
+void MixedGas::ComputeReferenceParameter()
+{
+    //! Convert to mass fraction, if the initial setting is other fractions convert other type fractions.
+    ComputeReferenceInitMassFractionInformation();
+
+    //! The first two variables is temperature independent, 
+    //! depend on molecular weight and mass fraction of species if chemical reactions exist.
+    ComputeReferenceMolecularInformation();
+
+    ComputeReferenceGeneralGasConstant();
+
+    //! The following five variables depend on temperature, 
+    //! and mass fraction of species if chemical reactions exist.
+    ComputeReferenceViscosityDimensional();
+
+    ComputeReferenceSpecificHeatRatio();
+
+    ComputeReferenceSoundVelocity();
+
+    ComputeReferenceVelocity();
+
+    ComputeCoefficientOfStateEquation();
+    //! The above seven variables should be computed firstly.
+
+    //! The variables in this function are computed by different methods according to "inflowParaType", 
+    //! including density, pressure or reynolds.
+    ComputeReferenceGasInformation();
+
+    ComputeReferencePrimitive();
+}
+
+void MixedGas::InitGlobalParameterOfNSEquation()
+{
+    //! Obtain the variable of "reynoldsReferenceLengthDimensional" according to "gridScaleFactor".
+    InitCommonParameter();
+
+    InitReferenceParameter();
+
+    ComputeReferenceParameter();
+
+    PrintInflowConditionToWindow();
+
+    ComputeProperReynoldsNumberForGrid();
+
+    //! The five reference variables for the whole aerodynamic coefficients integration, which are from the file of "cfd_para.hypara", should be updated with "reynoldsReferenceLengthDimensional".
+    ComputeOtherProperParameterForGrid();
+
+    InitOtherParameter();
+
+    //! Read parameters from file of "boundary_condition.hypara". Notice that the five reference variables for the component aerodynamic coefficients integration should be updated with "reynoldsReferenceLengthDimensional".
+    GlobalBoundaryCondition::ReadGlobalBoundaryCondition();
+
+    GlobalBoundaryCondition::SetGlobalBCByGlobalDataBase();
+
+    GlobalBoundaryCondition::InitMassFlowBoundary();
+
+    GlobalBoundaryCondition::SetBCDataBaseByGlobalBC();
+}
+
+void MixedGas::ComputeReferencePrimitive()
+{
+    RDouble refMachNumber = referenceParameterDimensional.GetMachNumber();
+    RDouble reference_sound_velocity, reference_pressure;
+    
+    RDouble massoo_ref = 1.0;
+
+    RDouble reference_density     = 1.0;
+    RDouble reference_temperature = 1.0;
+
+    reference_sound_velocity = 1.0 / refMachNumber;
+    //! coefficientOfStateEquation = 1.0 / (gama0 * refMachNumber * refMachNumber);
+    reference_pressure = coefficientOfStateEquation * 
+                         reference_density * 
+                         reference_temperature / massoo_ref;
+
+    //! Set the global reference value of energy.
+    RDouble refVelocity = referenceParameterDimensional.GetVelocity();
+    RDouble refTemperature = referenceParameterDimensional.GetTemperature();
+    referenceEnergy = refVelocity * refVelocity;
+    referenceSpecificHeat = refTemperature / referenceEnergy;
+
+    veTemperatureMinNonDimensional = veTemperatureMin / refTemperature;
+    trTemperatureMinNonDimensional = trTemperatureMin / refTemperature;
+
+    if (nchem == 1)
+    {
+        if (ntmodel > 1)
+        {
+
+        }
+        else       //! One-temperature model.
+        {
+            reference_pressure = coefficientOfStateEquation * 
+                                 reference_density * 
+                                 reference_temperature / massoo_ref;
+        }
+    }
+
+    RDouble attackd = GlobalDataBase::GetDoubleParaFromDB("attackd");
+    RDouble angleSlide = GlobalDataBase::GetDoubleParaFromDB("angleSlide");
+
+    RDouble attack   = attackd * PI / 180.0;
+    RDouble sideslip = angleSlide * PI / 180.0;
+
+    GlobalDataBase::UpdateData("attack", &attack, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("sideslip", &sideslip, PHDOUBLE, 1);
+
+    using namespace IDX;
+    RDouble *prim_inf = new RDouble[nl + nchem + ntmodel - 1];
+    GlobalDataBase::UpdateDataPtr("prim_inf", prim_inf);
+
+    prim_inf[IR] = reference_density;
+    prim_inf[IU] = 1.0 * cos(attack) * cos(sideslip);
+    prim_inf[IV] = 1.0 * sin(attack) * cos(sideslip);
+    prim_inf[IW] = 1.0 *               sin(sideslip);
+    prim_inf[IP] = reference_pressure;
+
+    if (nchem > 0)
+    {
+        RDouble * mass_fraction_reference = this->molecularProperty->GetInitialMassFraction();
+
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            prim_inf[nm + ispecies] = mass_fraction_reference[ispecies];
+        }
+
+        //! Set the vibration energy and electron energy.
+        if (ntmodel == 2)    //! Tve = Tv = Te = Tinf.
+        {
+
+        }
+        else if (ntmodel == 3)
+        {
+
+        }
+
+        RDouble *catalyticMassFraction = new RDouble[numberOfSpecies];
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            catalyticMassFraction[s] = prim_inf[nm + s];
+        }
+
+        if (nIsSuperCatalytic == 1)
+        {
+            if (this->nGasModel == 0) //Gas of Earth.
+            {
+                GetEarthFullyCatalyticMassFraction(mass_fraction_reference, catalyticMassFraction);
+            }
+            else if (this->nGasModel == 1) //Gas of Mars.
+            {
+                GetMarsFullyCatalyticMassFraction(mass_fraction_reference, catalyticMassFraction);
+            }
+        }
+
+        SetMaximumSpecies(mass_fraction_reference);
+
+        GlobalDataBase::UpdateDataPtr("catalyticMassFraction", catalyticMassFraction);
+    }
+}
+
+void MixedGas::CreateAllDataClass(int numberOfSpecies, int numberOfReaction)
+{
+    molecularProperty = new MolecularProperty();
+    molecularProperty->Init(numberOfSpecies);
+
+    reactionRate = new ReactionRate();
+    reactionRate->Init(numberOfReaction);
+
+    stoichiometricEquation = new StoichiometricEquation();
+    stoichiometricEquation->Init(numberOfReaction, numberOfSpecies);
+
+    CurveFits = new CurveFitsMethod();
+    CurveFits->Init(numberOfSpecies);
+
+    thermodynamicManager = new ThermodynamicManager();
+    thermodynamicManager->Init(numberOfSpecies);
+}
+
+void MixedGas::Read(fstream &file)
+{
+    molecularProperty->Read(file);
+    reactionRate->Read(file);
+    thermodynamicManager->Read(file);
+    CurveFits->Read(file);
+    stoichiometricEquation->Read(file);
+}
+
+void MixedGas::ReadGasModel(fstream &file)
+{
+    string line, word;
+    string separator = " =\t\r\n#$,;\"'";
+
+    SkipLines(file, 2);
+
+    getline(file, line);
+    line = FindNextWord(line, word, separator);
+
+    from_string< int >(numberOfSpecies, word, std::dec);
+    line = FindNextWord(line, word, separator);
+    from_string< int >(numberOfReaction, word, std::dec);
+
+    CreateAllDataClass(numberOfSpecies, numberOfReaction);
+    Read(file);
+}
+
+void MixedGas::GenerateGasModel(string chemicalModel)
+{
+    int nGasType = 0;
+    int Ablation = GlobalDataBase::GetIntParaFromDB("nAblation");
+    if (chemicalModel == "Gupta")
+    {
+        if (Ablation == 0)
+        {
+            nGasType = 0;
+        }
+        else
+        {
+            nGasType = 5;    //! Carbon material ablation.
+        }
+    }
+    else if (chemicalModel == "Park")
+    {
+        if (Ablation == 0)
+        {
+            nGasType = 1;
+        }
+        else
+        {
+            nGasType = 6;    //! Carbon material ablation.
+        }
+    }
+    else if (chemicalModel == "Dunn-Kang")    //! The Dunn-Kang Model.
+    {
+        if (Ablation == 0)
+        {
+            nGasType = 2;
+        }
+        else
+        {
+            nGasType = 7;    //! Carbon material ablation.
+        }
+    }
+    else if (chemicalModel == "Mars-Park")    //! The Park Model for Mars.
+    {
+        nGasType = 3;
+    }
+    else if (chemicalModel == "Mars-McKenzie")    //! The McKenzie Model for Mars.
+    {
+        nGasType = 4;
+    }
+    else if (chemicalModel == "CombustionGas")    //! The Combustion chamber Gas Model.
+    {
+        nGasType = 8;
+    }
+    else if (chemicalModel == "Gas-Mixture")    //! The Mixed Gas Model.
+    {
+        nGasType = 9;
+    }
+
+    //Obtain the initial data.
+    vector<string> namelist;
+    vector<RDouble> initMassFraction;
+    this->GetNameList(namelist, initMassFraction);
+
+    //! Generate the chemical reaction model.
+    ChemicalReactions myChemModel;
+    ChemicalReactions *currentReaction = new ChemicalReactions();
+    myChemModel.CreateBasicChemicalReactionModel(nGasType);
+    myChemModel.CreateChemicalReactionModel(namelist, currentReaction);
+
+    int ns = 0, nr = 0;
+    currentReaction->GetChemicalModelInfo(ns, nr);
+    if (ns <= 0 || nr <= 0)
+    {
+        cout << "Failed to create the gas model!" << endl;
+        delete currentReaction;
+        return;
+    }
+
+    //! The number of species and reaction are imported from the database.
+    numberOfSpecies = ns;
+    numberOfReaction = nr;
+    //! Allocate memories.
+    CreateAllDataClass(numberOfSpecies, numberOfReaction);
+
+    //-------------------------------------------------------------------
+    //! Generate the physical and chemical data of species.
+    molecularProperty->GenerateData(namelist, initMassFraction);
+
+    //! Generate the curve fitting data of chemical reaction rate.
+    RDouble **reactionCoef = currentReaction->GetReactionRateCurveFittingData();
+    reactionRate->Create(reactionCoef);
+
+    //! Generate the curve fitting data of chemkin model for computing the specific heat and enthalpy in the one-temperature model.
+    thermodynamicManager->GenerateData(namelist);
+
+    //! Generate the curve fitting data of transport coefficients, such as viscosity.
+    CurveFits->GenerateData(namelist);
+
+    //! Generate the chemical reaction equations.
+    int **reactionFlag = currentReaction->GetReactionType();
+    int **forwardCoef = currentReaction->GetForwardStoichiometricCoefficient();
+    int **backwardCoef = currentReaction->GetBackwardStoichiometricCoefficient();
+    RDouble **collisionCoef = currentReaction->GetThirdBodyCollisionCoefficient();
+    stoichiometricEquation->Create(forwardCoef, backwardCoef, collisionCoef, reactionFlag);
+
+    delete currentReaction;
+}
+
+void MixedGas::GetNameList(vector<string> &namelist, vector<RDouble> &initMassFraction)
+{
+    string speciesName[30], line1, line2;
+    RDouble massFraction[30];
+    GlobalDataBase::GetData("speciesName", &line1, PHSTRING, 1);
+    GlobalDataBase::GetData("initMassFraction", &line2, PHSTRING, 1);
+    string word;
+    string separator  = " =\t\r\n#$,;\"'";
+    int nSpecies = 0;
+    for (int s = 0; s < 30; ++ s)
+    {
+        line1 = FindNextWord(line1, word, separator);
+        if (word == "")
+        {
+            break;
+        }
+        ++ nSpecies;
+        speciesName[s] = word;
+
+        line2 = FindNextWord(line2, word, separator);
+        from_string<RDouble>(massFraction[s], word, std::dec);
+    }
+    namelist.clear();
+    initMassFraction.clear();
+    for (int s = 0; s < nSpecies; ++ s)
+    {
+        namelist.push_back(speciesName[s]);
+        initMassFraction.push_back(massFraction[s]);
+    }
+}
+
+void MixedGas::Read(DataContainer *cdata)
+{
+    molecularProperty->Read(cdata);
+    reactionRate->Read(cdata);
+    stoichiometricEquation->Read(cdata);
+    CurveFits->Read(cdata);
+    thermodynamicManager->Read(cdata);
+}
+
+void MixedGas::Write(DataContainer *cdata)
+{
+    molecularProperty->Write(cdata);
+    reactionRate->Write(cdata);
+    stoichiometricEquation->Write(cdata);
+    CurveFits->Write(cdata);
+    thermodynamicManager->Write(cdata);
+}
+
+void MixedGas::CompressData(DataContainer *&cdata)
+{
+    cdata->append(&numberOfSpecies, sizeof(int));
+    cdata->append(&numberOfReaction, sizeof(int));
+
+    Write(cdata);
+}
+
+void MixedGas::DecompressData(DataContainer *cdata)
+{
+    cdata->moveto_begin();
+
+    cdata->read(&numberOfSpecies, sizeof(int));
+    cdata->read(&numberOfReaction, sizeof(int));
+
+    CreateAllDataClass(numberOfSpecies, numberOfReaction);
+    Read(cdata);
+}
+
+void MixedGas::GetTemperatureRangeIndex(const RDouble &temperature_dimensional, int &indexOfTemperatureRange)
+{
+    this->thermodynamicManager->GetTemperatureRangeIndex(temperature_dimensional, indexOfTemperatureRange);
+}
+
+void MixedGas::ComputeSpeciesConstantPressureSpecificHeatDimensional(RDouble temperature, RDouble *cpSpeciesDimensional)
+{
+    int ntype = 1;    //! 0 stands for applying the old method, 1 for the new method.
+
+    if (ntype == 0)   //! The primary algorithm.
+    {
+        RDouble t1, t2, t3, t4;
+
+        RDouble referenceTemperature = this->referenceParameterDimensional.GetTemperature();
+    
+        t1 = temperature * referenceTemperature;
+        t2 = t1 * t1;
+        t3 = t1 * t2;
+        t4 = t1 * t3;
+
+        int itemperature;
+        GetTemperatureRangeIndex(t1, itemperature);
+
+        RDouble *oMolecularWeightDimensional = molecularProperty->GetMolecularWeightReciprocalDimensional();
+
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            RDouble *coef = this->thermodynamicManager->GetPolynomialCoefficient(ispecies, itemperature);
+
+            cpSpeciesDimensional[ispecies] = coef[0]
+                                           + coef[1] * t1
+                                           + coef[2] * t2
+                                           + coef[3] * t3
+                                           + coef[4] * t4;
+            cpSpeciesDimensional[ispecies] *= rjmk * oMolecularWeightDimensional[ispecies];
+        }
+        return;
+    }
+    else      //! The new method that modified the coefficients in the temperature boundary range.
+    {
+        RDouble gasConstant = rjmk;      //! The universal gas constant equals to 8.31434 J/mol-K.
+        //! The following variables are dimensional values.
+         RDouble referenceTemperature = this->referenceParameterDimensional.GetTemperature();
+         RDouble *speciesMass = this->molecularProperty->GetMolecularWeightDimensional(); //The mole weight kg/mol.
+
+        int n = this->thermodynamicManager->GetNumberofPolynomialCoefficient();
+        if (n < 1)
+        {
+            return;
+        }
+
+        //! Allocate the memory space.
+        RDouble coef[7];
+        RDouble T1, T2, T3, T4;
+        T1 = temperature * referenceTemperature;
+        T1 = MAX(T1, 50.0);
+        T2 = T1 * T1;
+        T3 = T1 * T2;
+        T4 = T1 * T3;
+
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            //! Apply the polynomial by linearly averaging the coefficients on the temperature boundary.
+            GetLinearlyAveragedPolynomialCoefficients(ispecies, T1, coef);
+
+            cpSpeciesDimensional[ispecies] = coef[0] + coef[1] * T1 + coef[2] * T2 + coef[3] * T3 + coef[4] * T4;
+            cpSpeciesDimensional[ispecies] *= gasConstant / speciesMass[ispecies];
+        }
+    }
+}
+
+RDouble MixedGas::GetMixedGasMolecularWeight(RDouble *massFraction)
+{
+    RDouble mixedMass = 0.0;
+    RDouble *speciesMass = this->molecularProperty->GetMolecularWeight();
+    for (int i = 0; i < numberOfSpecies; ++ i)
+    {
+        mixedMass += massFraction[i] / speciesMass[i];
+    }
+    mixedMass = 1.0 / mixedMass;
+
+    //! Return the non-dimensional molecular weight of the mixture gas.
+    return mixedMass;
+}
+
+RDouble MixedGas::GetMixedGasMolecularWeightReciprocalWithoutElectron(RDouble *massFraction, RDouble &ceDivideMe)
+{
+    RDouble *speciesMass = molecularProperty->GetMolecularWeight();
+    //! Obtain the average molecular weight.
+    RDouble mixedMass = GetMixedGasMolecularWeight(massFraction);
+    ceDivideMe = 0.0;
+    if (nElectronIndex >= 0)
+    {
+        ceDivideMe = massFraction[nElectronIndex] / speciesMass[nElectronIndex];
+    }
+
+    return (1.0 / mixedMass - ceDivideMe);
+}
+
+RDouble MixedGas::GetUniversalGasConstant()
+{
+    //! To obtain the non-dimensional universal gas constant called R = 8.314J/(mol*K).
+    //RDouble gasConstant = rjmk;//!unit��J/(mol*K)
+    //RDouble referenceVelocity = this->referenceParameterDimensional.GetVelocity();
+    //RDouble referenceTemperature = this->referenceParameterDimensional.GetTemperature();
+    //RDouble referenceMass = this->referenceParameterDimensional.GetAverageMolecularWeight();
+    //gasConstant = gasConstant * referenceTemperature / (referenceMass * referenceVelocity * referenceVelocity);
+
+    //// Return the non-dimensional universal gas constant.
+    //return gasConstant;
+    return coefficientOfStateEquation;
+}
+
+RDouble MixedGas::GetMixtureGasEnthalpy(RDouble *massFraction, RDouble temperature)
+{
+    //! Obtain the enthalpy of each species.
+    this->ComputeSpeciesEnthalpy(temperature, speciesEnthalpy);
+    //! Integral.
+    RDouble mixedGasEnthalpy = 0.0;
+    this->ComputeMixtureByMassFraction(massFraction, speciesEnthalpy, mixedGasEnthalpy);
+
+    return mixedGasEnthalpy;
+}
+
+void MixedGas::ComputeConstantVolumeSpecificHeatByMassFraction(RDouble *massFraction, RDouble temperature, RDouble &mixedGasCv)
+{
+    RDouble mixedGasCp;       //! Specific heat at constant pressure.
+    this->ComputeConstantPressureSpecificHeatByMassFraction(massFraction, temperature, mixedGasCp);
+
+    //! Obtain universal gas constant.
+    RDouble gasConstant = this->GetUniversalGasConstant();
+    //! Obtain molecular weight of the mixture gas.
+    RDouble mixedGasMass = this->GetMixedGasMolecularWeight(massFraction);
+
+    //! Compute the constant volume specific heat of the mixture gas.
+    mixedGasCv = mixedGasCp - gasConstant / mixedGasMass;
+}
+
+void MixedGas::ComputeSpeciesConstantVolumeSpecificHeat(RDouble temperature, RDouble *cvSpecies)
+{
+    //! To obtain the non-dimensional constant volume specific heat called cv of each species by fitting formula.
+    //! temperature is the non-dimensional temperature of the mixture gas.
+    //! cvSpecies is an array saving the non-dimensional constant volume specific heat of each species.
+
+    //! Obtain the dimensional value of specific heat at constant volume.
+    ComputeSpeciesConstantVolumeSpecificHeatDimensional(temperature, cvSpecies);
+
+    //! Obtain the reference values.
+    RDouble referenceVelocity = this->referenceParameterDimensional.GetVelocity();
+    RDouble referenceTemperature = this->referenceParameterDimensional.GetTemperature();
+    RDouble referenceValue = referenceTemperature / (referenceVelocity * referenceVelocity);
+
+    //! Translate the dimensional value to the non-dimensional value.
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        cvSpecies[i] = cvSpecies[i] * referenceValue;
+    }
+}
+
+void MixedGas::ComputeSpeciesConstantVolumeSpecificHeatDimensional(RDouble temperature, RDouble *cvSpeciesDimensional)
+{
+    //! To obtain the dimensional constant volume specific heat called cv[J/(kg*K)] of each species by fitting formula.
+    //! temperature is the non-dimensional temperature of the mixture gas.
+    //! cvSpeciesDimensional is an array saving the dimensional constant volume specific heat of each species.
+    //! The following variables are the non-dimensional values.
+
+    //! Obtain the dimensional value of constant pressure specific heat of each species.
+    this->ComputeSpeciesConstantPressureSpecificHeatDimensional(temperature, cvSpeciesDimensional);
+
+    RDouble gasConstant = rjmk;// dimensional universal gas constant.
+    //! Obtain molecular weight of each species.
+    RDouble *speciesMass = molecularProperty->GetMolecularWeightDimensional();
+
+    //! Compute the specific heat at constant volume.
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        cvSpeciesDimensional[i] = cvSpeciesDimensional[i] - gasConstant / speciesMass[i];
+    }
+}
+
+void MixedGas::ComputeConstantPressureSpecificHeatByMassFraction(RDouble *massFraction, RDouble temperature, RDouble &mixedcp)
+{
+    ComputeSpeciesConstantPressureSpecificHeat(temperature, speciesCp);
+    ComputeMixtureByMassFraction(massFraction, speciesCp, mixedcp);
+}
+
+void MixedGas::ComputeSpeciesConstantPressureSpecificHeat(RDouble temperature, RDouble *cpSpecies)
+{
+    //! Obtain the dimensional value of species specific heat at constant pressure.
+    this->ComputeSpeciesConstantPressureSpecificHeatDimensional(temperature, cpSpecies);
+
+    //! Change to the non-dimensional values.
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        cpSpecies[ispecies] = cpSpecies[ispecies] * referenceSpecificHeat;
+    }
+}
+
+void MixedGas::ComputeSpeciesEnthalpy(RDouble temperature, RDouble *speciesEnthaly)
+{
+    //! Obtain the dimensional values of species enthalpies.
+    this->ComputeSpeciesEnthalpyDimensional(temperature, speciesEnthaly);
+
+    //! Change to the non-dimensional values.
+    for (int s = 0; s < numberOfSpecies; ++ s)
+    {
+        speciesEnthaly[s] = speciesEnthaly[s] / referenceEnergy;
+    }
+}
+
+void MixedGas::ComputeSpeciesEnthalpyDimensional(RDouble temperature, RDouble *speciesEnthaly)
+{
+    int ntype = 1;     //! 0 stands for applying the old method, 1 for the new method.
+
+    if (ntype == 0)    //! The primary algorithm.
+    {
+        RDouble t1, t2, t3, t4, ot1;
+
+        RDouble referenceTemperature = this->referenceParameterDimensional.GetTemperature();
+
+        t1 = temperature * referenceTemperature;
+        t2 = t1 * t1;
+        t3 = t1 * t2;
+        t4 = t1 * t3;
+        ot1 = 1.0 / t1;
+
+        int itemperature;
+        GetTemperatureRangeIndex(t1, itemperature);
+
+        RDouble *oMolecularWeightDimensional = molecularProperty->GetMolecularWeightReciprocalDimensional();
+
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            RDouble *coef = this->thermodynamicManager->GetPolynomialCoefficient(ispecies, itemperature);
+            speciesEnthaly[ispecies] = coef[0]            +
+                                       coef[1] * t1 / 2.0 +
+                                       coef[2] * t2 / 3.0 +
+                                       coef[3] * t3 / 4.0 +
+                                       coef[4] * t4 / 5.0 +
+                                       coef[5] * ot1;
+            speciesEnthaly[ispecies] *= rjmk * oMolecularWeightDimensional[ispecies] * t1;
+        }
+    }
+    else      //! The new method that modified the coefficients in the temperature boundary range.
+    {
+        RDouble gasConstant = rjmk;     //! The universal gas constant equals to 8.31434 J/mol-K.
+        //! The following variables are dimensional values.
+        RDouble referenceTemperature = this->referenceParameterDimensional.GetTemperature();
+        RDouble *speciesMass = this->molecularProperty->GetMolecularWeightDimensional();      //! The mole weight kg/mol.
+
+        int n = this->thermodynamicManager->GetNumberofPolynomialCoefficient();
+        if (n < 1)
+        {
+            return;
+        }
+
+        RDouble coef[7];
+        RDouble T1, T2, T3, T4;
+        T1 = temperature * referenceTemperature;
+        T1 = MAX(T1, 50.0);
+        T2 = T1 * T1;
+        T3 = T1 * T2;
+        T4 = T1 * T3;
+
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            //! Apply the polynomial by linearly averaging the coefficients on the temperature boundary.
+            GetLinearlyAveragedPolynomialCoefficients(ispecies, T1, coef);
+
+            speciesEnthaly[ispecies] = coef[0] + coef[1] * T1/2.0 + coef[2] * T2/3.0 + coef[3] * T3/4.0 + coef[4] * T4/5.0 + coef[5]/T1;
+            speciesEnthaly[ispecies] *= T1 * gasConstant / speciesMass[ispecies];
+        }
+    }
+}
+
+void MixedGas::ComputeSpeciesEnergy(RDouble temperature, RDouble *speciesEnergy)
+{
+}
+
+void MixedGas::ComputeSpeciesEnergyDimensional(RDouble temperature, RDouble *speciesEnergy)
+{
+}
+
+void MixedGas::ComputeMixtureByMassFraction(RDouble *massFraction, RDouble *mixtureOfSpecies, RDouble &mixture)
+{
+    mixture = 0.0;
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        mixture += massFraction[ispecies] * mixtureOfSpecies[ispecies];
+    }
+}
+
+void MixedGas::ComputeMixtureByPrimitive(RDouble *prim, RDouble *mixtureOfSpecies, RDouble &mixture)
+{
+    mixture = 0.0;
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        mixture += prim[nm + ispecies] * mixtureOfSpecies[ispecies];
+    }
+}
+
+void MixedGas::MassFractionConversion(RDouble *fractionOfSpecies)
+{
+    int nFraction = GlobalDataBase::GetIntParaFromDB("nFraction");
+
+    if (nFraction == 1)
+    {
+        RDouble *molecularWeightDimensional  = molecularProperty->GetMolecularWeightDimensional();
+
+        RDouble wiSum = 0.0;
+
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ispecies)
+        {
+            wiSum += fractionOfSpecies[ispecies] * molecularWeightDimensional[ispecies];
+        }
+
+        RDouble owiSum = 1.0 / wiSum;
+
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ispecies)
+        {
+            fractionOfSpecies[ispecies] = fractionOfSpecies[ispecies] * molecularWeightDimensional[ispecies] * owiSum;
+        }
+    }
+}
+
+void MixedGas::ComputeMoleFractionByMassFraction(RDouble *massFractionOfSpecies, RDouble *moleFractionOfSpecies)
+{
+    RDouble *oMolecularWeight = molecularProperty->GetMolecularWeightReciprocal();     //! The reciprocal value of mass fraction.
+
+    RDouble xiSum, oxiSum;
+
+    xiSum = 0.0;
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        xiSum += massFractionOfSpecies[ispecies] * oMolecularWeight[ispecies];
+    }
+    oxiSum = 1.0 / xiSum;
+
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+       moleFractionOfSpecies[ispecies] = massFractionOfSpecies[ispecies] * oMolecularWeight[ispecies] * oxiSum;
+    }
+}
+
+void MixedGas::ComputeMixtureCoefficientByWilkeFormula(RDouble *moleFractionOfSpecies, RDouble *chem_var, RDouble *chem_phi)
+{
+//! Arguments: moleFractionOfSpecies saves the mole fraction of the species,chem_var stores the viscosity of the given species,
+//! return the value phi stored in the variable chem_phi.
+
+    RDouble *molecularWeight = molecularProperty->GetMolecularWeight();
+
+    RDouble tmp, tmp1, tmp2;
+
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        chem_phi[ispecies] = 0.0;
+        for (int jspecies = 0; jspecies < numberOfSpecies; ++ jspecies)
+        {
+            tmp = sqrt(molecularWeight[jspecies] / molecularWeight[ispecies]);
+            tmp1 = 1.0 + sqrt(chem_var[ispecies] / chem_var[jspecies]) * sqrt(tmp);
+            tmp2 = sqrt(8.0 * (1.0 + molecularWeight[ispecies] / molecularWeight[jspecies]));
+            chem_phi[ispecies] += moleFractionOfSpecies[jspecies] * SQR(tmp1) / tmp2;
+        }
+    }
+}
+
+void MixedGas::ComputeMixtureByWilkeFormula(RDouble *moleFractionOfSpecies, RDouble *mixtureOfSpecies, RDouble *phiOfSpecies, RDouble &mixture)
+{
+    mixture = 0.0;
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        mixture += moleFractionOfSpecies[ispecies] * mixtureOfSpecies[ispecies] / phiOfSpecies[ispecies];
+    }
+}
+
+void MixedGas::ComputeTemperature(RDouble *primitiveVariables, RDouble &temperature)
+{
+}
+
+void MixedGas::GetTemperature(RDouble *primitiveVariables, RDouble &transRotationTemperature, RDouble &vibrationTemperature, RDouble &electronTemperature)
+{
+    using namespace IDX;
+    RDouble density, pressure, gasConstant;
+    density = primitiveVariables[IR];
+    pressure = primitiveVariables[IP];
+    gasConstant = GetUniversalGasConstant();;
+
+    if (nchem == 0)     //! Perfect gas.
+    {
+        transRotationTemperature = pressure / (density * gasConstant);
+    }
+    else                //! Chemical non-equilibrium flow.
+    {
+        //! Compute the mass fraction of the last species.
+        NormalizePrimitive(primitiveVariables);
+
+        for (int i = 0; i < this->numberOfSpecies; ++ i)
+        {
+            massFractions[i] = primitiveVariables[nm + i];
+        }
+
+        RDouble massReciprocal = 0.0, ceDivideMe = 0.0;
+        massReciprocal = GetMixedGasMolecularWeightReciprocalWithoutElectron(massFractions, ceDivideMe);
+
+        if (ntmodel == 1) //! The default setting is One-Temperature model.
+        {
+            transRotationTemperature = pressure / (density * gasConstant * (massReciprocal + ceDivideMe));
+        }    
+        else if (ntmodel == 2)      //! Two-Temperature model.
+        {
+
+        }
+        else  //! Three-Temperature model.
+        {
+
+        }
+    }
+}
+
+void MixedGas::GetTemperatureR(RDouble *primitiveVariables, RDouble &transRotationTemperature, RDouble &vibrationTemperature, RDouble &electronTemperature)
+{
+    using namespace IDX;
+    RDouble density, pressure, gasConstant;
+    density = primitiveVariables[IR];
+    pressure = primitiveVariables[IP];
+    gasConstant = GetUniversalGasConstant();
+
+   // Compute the mass fraction of the last species.
+    NormalizePrimitive(primitiveVariables);
+
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        massFractions[i] = primitiveVariables[nm + i];
+    }
+
+    RDouble massReciprocal = 0.0, ceDivideMe = 0.0;
+    massReciprocal = GetMixedGasMolecularWeightReciprocalWithoutElectron(massFractions, ceDivideMe);
+
+    if (ntmodel == 1)
+    {
+        transRotationTemperature = pressure / (density * gasConstant * (massReciprocal + ceDivideMe));
+    }
+    else if (ntmodel == 2)
+    {
+
+    }
+    else
+    {
+
+    }
+
+    return;
+}
+
+RDouble MixedGas::GetTemperatureMin()
+{
+    RDouble refDimensionalTemperature = this->referenceParameterDimensional.GetTemperature();
+    return this->thermodynamicManager->GetTemperatureMin() / refDimensionalTemperature;
+}
+
+RDouble MixedGas::GetTemperatureMax()
+{
+    RDouble refDimensionalTemperature = this->referenceParameterDimensional.GetTemperature();
+    return this->thermodynamicManager->GetTemperatureMax() / refDimensionalTemperature;
+}
+
+string * MixedGas::GetNameOfSpecies() const 
+{
+    if (!molecularProperty) return 0;
+    return molecularProperty->GetNameOfSpecies(); 
+};
+
+void MixedGas::GetElectronMolecularWeightAndMassFraction(RDouble *massFraction, RDouble &ce, RDouble &Me)
+{
+}
+
+void MixedGas::GetPressure(RDouble *primitiveVars, RDouble gama, RDouble internalEnergy, RDouble temperature, RDouble &pressure)
+{
+    if (nchem != 1)      //! Perfect gas.
+    {
+        pressure = (gama - one) * internalEnergy;
+        return;
+    }
+
+    using namespace IDX;
+    RDouble density, specificInternalEnergy, gasConstant;
+    gasConstant = this->GetUniversalGasConstant();
+    density = primitiveVars[IR];
+    specificInternalEnergy = internalEnergy / density;
+
+    //! Obtain the mass fractions of species.
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        massFractions[i] = primitiveVars[nm + i];
+    }
+
+    RDouble transRotationTemperature, massReciprocal, ceDivideMe, Tk;
+    massReciprocal = GetMixedGasMolecularWeightReciprocalWithoutElectron(massFractions, ceDivideMe);
+    Tk = temperature;
+    if (ntmodel == 2)     //! Two-Temperature model.
+    {
+
+    }
+    else if (ntmodel == 3)     //! Three-Temperature model.
+    {
+
+    }
+    else       //! The default is One-Temperature model.
+    {
+        transRotationTemperature = ComputeNonequilibrumTemperature(massFractions, specificInternalEnergy, Tk);
+        pressure = density * gasConstant * transRotationTemperature * (massReciprocal + ceDivideMe);
+    }
+}
+
+void MixedGas::GetTemperatureAndPressure(RDouble *primitiveVars, RDouble internalEnergy, RDouble *temperature, RDouble &pressure)
+{
+    using namespace IDX;
+    RDouble density, specificInternalEnergy, gasConstant;
+    gasConstant = this->GetUniversalGasConstant();
+    density = primitiveVars[IR];
+    specificInternalEnergy = internalEnergy / density;
+
+    //! Obtain the mass fractions of species.
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        massFractions[i] = primitiveVars[nm + i];
+    }
+
+    RDouble transRotationTemperature, massReciprocal, ceDivideMe, Tk;
+    massReciprocal = GetMixedGasMolecularWeightReciprocalWithoutElectron(massFractions, ceDivideMe);
+    
+    if (ntmodel == 2)     //! Two-Temperature model.
+    {
+
+    }
+    else if (ntmodel == 3)     //! Three-Temperature model.
+    {
+
+    }
+    else       //! The default is One-Temperature model.
+    {
+        Tk = temperature[ITT];
+        transRotationTemperature = ComputeNonequilibrumTemperature(massFractions, specificInternalEnergy, Tk);
+        pressure = density * gasConstant * transRotationTemperature * (massReciprocal + ceDivideMe);
+
+        //Save the temperature of the next time-advancing step.
+        temperature[ITT] = transRotationTemperature;
+        temperature[ITV] = transRotationTemperature;
+        temperature[ITE] = transRotationTemperature;
+    }
+}
+
+void MixedGas::NormalizePrimitive(RDouble *primitiveVariables)
+{
+    RDouble fSum = 0.0;
+    for (int s = 0; s < this->numberOfSpecies - 1; ++s)
+    {
+        fSum += primitiveVariables[nm + s];
+    }
+
+    //! Compute mass fraction of the last species.
+    primitiveVariables[nm + numberOfSpecies - 1] = MAX(0.0, 1.0 - fSum);
+    fSum += primitiveVariables[nm + numberOfSpecies - 1];
+
+    //! Normalize the mass fractions.
+    for (int s = 0; s < this->numberOfSpecies; ++ s)
+    {
+        primitiveVariables[nm + s] /= fSum;
+    }
+}
+
+void MixedGas::ComputeMolecularWeightReciprocal(RDouble *primitiveVariables, RDouble &massReciprocal)
+{
+    RDouble *oMolecularWeight = molecularProperty->GetMolecularWeightReciprocal();
+
+    massReciprocal = 0.0;
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        massReciprocal += primitiveVariables[ispecies + nm] * oMolecularWeight[ispecies];
+    }
+}
+
+void MixedGas::ComputeMolecularWeightReciprocalDimensional(RDouble *prim, RDouble &omavDimensional)
+{
+    RDouble *oMolecularWeightDimensional = molecularProperty->GetMolecularWeightReciprocalDimensional();
+
+    omavDimensional = 0.0;
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        omavDimensional += prim[ispecies + nm] * oMolecularWeightDimensional[ispecies];
+    }
+}
+
+void MixedGas::ComputeOneTemperatureModelSpeciesViscosity(RDouble temperature, RDouble *viscosityOfSpecies)
+{
+    //! Obtain the dimensional values of each species viscosity.
+    ComputeOneTemperatureModelSpeciesViscosityDimensional(temperature, speciesViscosity);
+
+    RDouble referenceViscosity = this->referenceParameterDimensional.GetViscosity();
+
+    //! Translate to the non-dimensional value.
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        viscosityOfSpecies[ispecies] = speciesViscosity[ispecies] / referenceViscosity;
+    }
+}
+
+void MixedGas::ComputeOneTemperatureModelSpeciesViscosityDimensional(RDouble temperature, RDouble *viscosityOfSpeciesDimensional)
+{
+    //! To obtain the dimensional viscosity of each species according to the Blotter fitting formula.
+    //! temperature is the non-dimensional temperature of the mixture gas.
+    //! viscosityOfSpeciesDimensional is an array saving the dimensional viscosity of each species [N*s/m2].
+
+    int nType = 0;     //! 0 stands for selecting the Blotter curve fits mode, 1 is for Sutherland relation.
+    nType = GlobalDataBase::GetIntParaFromDB("nSutherland");
+    RDouble referenceTemperature = this->referenceParameterDimensional.GetTemperature();
+    RDouble T = temperature * referenceTemperature;
+
+    if (nType == 0)     //! Compute species viscosity using the Blotter curve fits for single-temperature model.
+    {
+        RDouble *blotterAi = CurveFits->GetBlotterCurveFittingCoefficientA();
+        RDouble *blotterBi = CurveFits->GetBlotterCurveFittingCoefficientB();
+        RDouble *blotterCi = CurveFits->GetBlotterCurveFittingCoefficientC();
+        RDouble *blotterDi = CurveFits->GetBlotterCurveFittingCoefficientD();
+        RDouble *blotterEi = CurveFits->GetBlotterCurveFittingCoefficientE();
+   
+        RDouble lnt1, lnt2, lnt3, lnt4, tmp;
+        lnt1 = log(T);
+        lnt2 = lnt1 * lnt1;
+        lnt3 = lnt1 * lnt2;
+        lnt4 = lnt1 * lnt3;
+
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            tmp = blotterAi[ispecies] * lnt4
+                + blotterBi[ispecies] * lnt3
+                + blotterCi[ispecies] * lnt2
+                + blotterDi[ispecies] * lnt1
+                + blotterEi[ispecies];
+
+            //! The Blotter curve fits.
+            viscosityOfSpeciesDimensional[ispecies] = 0.10 * exp(tmp) + SMALL;
+        }
+    }
+    else       //! Compute species viscosity using the Sutherland relation.
+    { 
+        RDouble miu0, T0, C;
+        miu0 = 1.7894E-5;     //! Unit: kg/(m*s).
+        T0 = 288.15;          //! Unit: K.
+        C  = 110.4;           //! Unit: K.
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            viscosityOfSpeciesDimensional[ispecies] = miu0 * pow(T / T0, 1.5) * (T0 + C) / (T + C);
+        }
+    }
+}
+
+void MixedGas::ComputeSpeciesEnthalpy(RDouble temperature, RDouble *speciesCv, RDouble *speciesE, RDouble *speciesH)
+{
+    ComputeSpeciesConstantVolumeSpecificHeat(temperature, speciesCv);
+
+    ComputeSpeciesConstantPressureSpecificHeat(temperature, speciesH);
+
+    RDouble gasConstant = this->GetCoefficientOfStateEquation();
+    RDouble *speciesMass = molecularProperty->GetMolecularWeight();
+    for (int s = 0; s < numberOfSpecies; ++ s)
+    {
+        speciesE[s] = speciesH[s] - gasConstant / speciesMass[s];
+    }
+}
+
+void MixedGas::ComputeSpeciesConstantPressureSpecificHeatByEuckenFormula(RDouble *cpSpecies)
+{
+}
+
+void MixedGas::ComputeEnthalpyByPrimitive(RDouble *primitiveVariables, RDouble gama, RDouble &enthalpy, RDouble *temperatures)
+{
+    using namespace IDX;
+
+    RDouble &density  = primitiveVariables[IR];
+    RDouble &pressure = primitiveVariables[IP];
+    int nIdealState = GlobalDataBase::GetIntParaFromDB("nIdealState");
+    if (nchem == 0 || nIdealState == 1)
+    //if (nchem == 0)
+    {
+        enthalpy = (gama / (gama - one)) * (pressure / density);
+    }
+    else
+    {
+        enthalpy = this->ComputeMixedGasEnthalpy(primitiveVariables, temperatures);
+    }
+}
+
+void MixedGas::ComputeInternalEnergy(RDouble *primitiveVariables, RDouble gama, RDouble vibrationTemperature, RDouble electronTemperature, RDouble &totalEnergy)
+{
+    using namespace IDX;
+    RDouble temperature = 0.0, squareVelocity = 0.0, massReciprocal = 0.0, staticEnthalpy = 0.0;
+
+    RDouble &um = primitiveVariables[IU];
+    RDouble &vm = primitiveVariables[IV];
+    RDouble &wm = primitiveVariables[IW];
+    RDouble &density = primitiveVariables[IR];
+    RDouble &pressure = primitiveVariables[IP];
+    squareVelocity = um * um + vm * vm + wm * wm;
+    int nIdealState = GlobalDataBase::GetIntParaFromDB("nIdealState");
+    if (nchem == 0 || nIdealState == 1)//! Perfect gas.
+    //if (nchem == 0)
+    {
+        totalEnergy = (pressure / density) / (gama - one) + half * squareVelocity;
+    }
+    else
+    {
+        if (ntmodel == 1)     //! Single-Temperature model.
+        {
+            ComputeMolecularWeightReciprocal(primitiveVariables, massReciprocal);
+            temperature = pressure / (coefficientOfStateEquation * density * massReciprocal);
+            ComputeSpeciesEnthalpy(temperature, speciesEnthalpy);
+            ComputeMixtureByPrimitive(primitiveVariables, speciesEnthalpy, staticEnthalpy);
+            totalEnergy = staticEnthalpy - pressure / density + half * squareVelocity;
+        }
+        else      //! Multi-temperature model.
+        {
+
+        }
+    }
+}
+
+void MixedGas::ComputeDensityDiffusionAndKCP(RDouble temperature, RDouble *primface, RDouble mul, RDouble mut, RDouble *rho_ds_face, RDouble *hintSpeciesOfFace, RDouble &kcp)
+{
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        massFractions[ispecies] = primface[nm + ispecies];
+    }
+
+    ComputeMoleFractionByMassFraction(massFractions, moleFractions);
+
+    RDouble *oscl = GetLaminarSchmidtNumberReciprocal();
+    RDouble *osct = GetTurbulentSchmidtNumberReciprocal();
+
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        RDouble tmp = 1.0 - moleFractions[ispecies];
+        if (tmp <= 0.0)
+        {
+            rho_ds_face[ispecies] = mul * oscl[ispecies] + mut * osct[ispecies];
+        }
+        else
+        {
+            rho_ds_face[ispecies] = (mul * oscl[ispecies] + mut * osct[ispecies]) * (1.0 - massFractions[ispecies]) / tmp;
+        }
+    }
+
+
+    ComputeSpeciesEnthalpy(temperature, speciesEnthalpy);
+
+    RDouble cp = -1.0;
+    ComputeConstantPressureSpecificHeatByMassFraction(massFractions, temperature, cp);
+    kcp = (mul * oprl + mut * oprt) * cp;
+
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        hintSpeciesOfFace[ispecies] = speciesEnthalpy[ispecies];
+    }
+}
+
+void MixedGas::ComputeDHAndTotalEnthalpy(RDouble *primitiveVariables, RDouble &gama, RDouble *deltaQ, RDouble &deltaEnthalpy, RDouble &totalEnthalpy)
+{
+    using namespace IDX;
+
+    RDouble squareVelocity, ae, af;
+    RDouble enthalpy;
+    //! Obtain the primitive variables.
+    RDouble &um = primitiveVariables[IU];
+    RDouble &vm = primitiveVariables[IV];
+    RDouble &wm = primitiveVariables[IW];
+    RDouble &density = primitiveVariables[IR];
+    RDouble &pressure = primitiveVariables[IP];
+
+    squareVelocity = um * um + vm * vm + wm * wm;
+    ae = gama - one;
+    af = half * ae * squareVelocity;
+    deltaEnthalpy = -ae * (um * deltaQ[IRU] + vm * deltaQ[IRV] + wm * deltaQ[IRW] - deltaQ[IRE]);
+
+    int nIdealState = GlobalDataBase::GetIntParaFromDB("nIdealState");
+    if (nchem == 0 || nIdealState ==1)
+    //if (nchem == 0)
+    {
+        //! h = Cp*T = (gamma*Rg/gamma-1)*T = (gamma/gamma-1)*(p/rho).
+        enthalpy = (gama / (gama - one)) * (pressure / density);
+    }
+    else
+    {
+        //! The obtained value is the reciprocal value of molecular weight.
+        RDouble *oMolecularWeight = molecularProperty->GetMolecularWeightReciprocal();
+
+        RDouble temperature, massReciprocal, as;
+        ComputeMolecularWeightReciprocal(primitiveVariables, massReciprocal);
+        temperature = pressure / (coefficientOfStateEquation * density * massReciprocal);
+        ComputeSpeciesEnthalpy(temperature, speciesEnthalpy);
+        ComputeMixtureByPrimitive(primitiveVariables, speciesEnthalpy, enthalpy);
+
+        for (int ispecies = 0; ispecies < numberOfSpecies - 1; ++ ispecies)
+        {
+            as = -ae * (speciesEnthalpy[ispecies] - speciesEnthalpy[numberOfSpecies - 1])
+               + coefficientOfStateEquation * gama * temperature * (oMolecularWeight[ispecies] - oMolecularWeight[numberOfSpecies - 1]);
+            deltaEnthalpy += as * deltaQ[nm + ispecies];
+        }
+        af += coefficientOfStateEquation * gama * temperature * oMolecularWeight[numberOfSpecies - 1] - ae * speciesEnthalpy[numberOfSpecies - 1];
+    }
+
+    deltaEnthalpy += af * deltaQ[IR];
+    // ht = h+v*v/2
+    totalEnthalpy = enthalpy + half * squareVelocity;
+}
+
+void MixedGas::ComputeTotalEnthalpyAndDH(RDouble *primitiveVariables, RDouble &gama, RDouble *deltaQ, RDouble &totalEnthalpy, RDouble &deltaEnthalpy)
+{
+    //! This function is used for perfect gas and single temperature model.
+    //! To compute the total enthalpy and the variable dh in the function MXDQ_STD(). dh=b2, b2 denotes the coefficient \n
+    //! of the vector M*dQ which can be referred to the forumla (A.7) and (A.8) in the appendix A of the PHengLEI Theory manual.
+    using namespace IDX;
+
+    //! Obtain the primitive variables.
+    RDouble &um = primitiveVariables[IU];
+    RDouble &vm = primitiveVariables[IV];
+    RDouble &wm = primitiveVariables[IW];
+    RDouble &density = primitiveVariables[IR];
+    RDouble &pressure = primitiveVariables[IP];
+
+    //! c1 is product coefficient of the variable dq[IR]��c2 = R*T/Mns - (gama-1)*ens��gama1 = gama-1.
+    RDouble squareVelocity, c1, c2, gama1;
+    squareVelocity = um * um + vm * vm + wm * wm;
+    gama1 = gama - 1.0;
+    c1 = half * gama1 * squareVelocity;
+    deltaEnthalpy = -gama1 * (um * deltaQ[IRU] + vm * deltaQ[IRV] + wm * deltaQ[IRW] - deltaQ[IRE]);
+
+    //! enthalpy is static enthalpy.
+    RDouble enthalpy;
+    int nIdealState = GlobalDataBase::GetIntParaFromDB("nIdealState");
+    if (nchem == 0 || nIdealState == 1)     //! Compute the static enthalpy.
+    //if (nchem == 0)
+    {
+        // h = cp*T = [gama/(gama-1)]*(R/M)*T = [gama/(gama-1)]*(p/rho).
+        enthalpy = (gama / gama1) * (pressure / density);
+    }
+    else      //! Compute the static enthalpy of the multi-species model.
+    {
+        //! Obtain the non-dimensional molecular weight of each species saving in the array Ms.
+        RDouble *speciesMass = molecularProperty->GetMolecularWeight();
+        RDouble gasConstant, temperature, mass;
+        for (int i = 0; i < numberOfSpecies; ++ i)
+        {
+            massFractions[i] = primitiveVariables[nm + i];
+        }
+
+        gasConstant = GetUniversalGasConstant();
+        mass = GetMixedGasMolecularWeight(massFractions);
+        //! Compute temperature using the state equation.
+        temperature = (pressure / density) * (mass / gasConstant);
+
+        //! Obtain constant volume specific heat of each species.
+        ComputeSpeciesConstantVolumeSpecificHeat(temperature, this->speciesCv);
+
+        // c2 = R*T/Mns - (gama-1)*ens
+        c2 = gasConstant * temperature / speciesMass[numberOfSpecies - 1] - gama1 * speciesCv[numberOfSpecies - 1] * temperature;
+        c1 += c2;     //! Added to the product coefficient of the variable dq[IR].
+
+        //! fSum saves the summation of each term.
+        RDouble fSum = 0.0;
+        for (int i = 0; i < numberOfSpecies - 1; ++ i)
+        {
+            fSum += deltaQ[nm + i];
+        }
+        deltaEnthalpy += -c2 * fSum;
+
+        fSum = 0.0;
+        for (int i = 0; i < numberOfSpecies - 1; ++ i)
+        {
+            fSum += deltaQ[nm + i] / speciesMass[i];
+        }
+        deltaEnthalpy += gasConstant * temperature * fSum;
+
+        fSum = 0.0;
+        for (int i = 0; i < numberOfSpecies - 1; ++ i)
+        {
+            fSum += deltaQ[nm + i] * speciesCv[i] * temperature;
+        }
+        deltaEnthalpy += -gama1 * fSum;
+
+        this->ComputeSpeciesEnthalpy(temperature, speciesEnthalpy);
+        enthalpy = 0.0;     //! Compute the static enthalpy.
+        for (int i = 0; i < numberOfSpecies; ++ i)
+        {
+            enthalpy += massFractions[i] * speciesEnthalpy[i];
+        }
+    }
+
+    deltaEnthalpy += c1 * deltaQ[IR];
+    // h0 = h+v*v/2, total enthalpy equals to static enthalpy plus half of the squared velocity.
+    totalEnthalpy = enthalpy + half * squareVelocity;
+}
+
+void MixedGas::ComputeViscosityByPrimitive(RDouble *primitiveVariables, RDouble &transRotationTemperature, RDouble &electronTemperature, RDouble &suthTemperature, RDouble &viscosity)
+{
+    using namespace IDX;
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        massFractions[ispecies] = primitiveVariables[nm + ispecies];
+    }
+
+    ComputeViscosity(primitiveVariables[IR], massFractions, transRotationTemperature, electronTemperature, suthTemperature, viscosity);
+}
+
+void MixedGas::ComputeTransportCoefficients(RDouble *primitiveVariables, RDouble *temperature, RDouble visTurbulence, RDouble &viscosity, RDouble *heatConductivity, RDouble *rhoDs)
+{
+    using namespace IDX;
+    //RDouble rho = primitiveVariables[IR];
+    for (int s = 0; s < numberOfSpecies; ++ s)
+    {
+        massFractions[s] = primitiveVariables[nm + s];
+    }
+    // Compute mole fractions using the mass fraction.
+    ComputeMoleFractionByMassFraction(massFractions, moleFractions);
+
+    RDouble *speciesMass = molecularProperty->GetMolecularWeight();
+
+    if (ntmodel > 1) //Multi-temperature model.
+    {
+
+    }
+    else//One-temperature model.
+    {
+        ComputeOneTemperatureModelSpeciesViscosity(temperature[ITT], speciesViscosity);
+        GetPartitionFunctionValues(speciesViscosity, speciesMass, moleFractions, speciesWeight);
+
+        ComputeSpeciesConstantPressureSpecificHeat(temperature[ITT], speciesCp);
+        ComputeSpeciesHeatConductivityByEuckenFormula(speciesViscosity, speciesCp, speciesConductivity);
+
+        // Compute heat conductivity.
+        ComputeMixtureByWilkeFormula(moleFractions, speciesConductivity, speciesWeight, heatConductivity[ITT]);
+    }
+
+    // Compute viscosity.
+    ComputeMixtureByWilkeFormula(moleFractions, speciesViscosity, speciesWeight, viscosity);
+
+    // Compute mass diffusion coefficients.
+    ComputeSpeciesMassDiffusionCoefficient(massFractions, viscosity, visTurbulence, rhoDs);
+
+}
+
+void MixedGas::ComputeTransportCoefficientsR(RDouble *massFractions, RDouble *temperature, RDouble *speciesCps, RDouble *speciesCvvs, RDouble *speciesCves, RDouble visTurbulence, RDouble &viscosity, RDouble *heatConductivity, RDouble *rhoDs)
+{
+    using namespace IDX;
+
+    RDouble *oMolecularWeight = molecularProperty->GetMolecularWeightReciprocal();     //! The reciprocal value of mass fraction.
+    RDouble *speciesMass = molecularProperty->GetMolecularWeight();
+    RDouble referenceTemperature = this->referenceParameterDimensional.GetTemperature();
+    RDouble referenceViscosity = this->referenceParameterDimensional.GetViscosity();
+    int *ionType = this->molecularProperty->GetIonTypeOfSpecies();
+    RDouble *oSchmidtLaminar = GetLaminarSchmidtNumberReciprocal();
+    RDouble *oSchmidtTurbulence = GetTurbulentSchmidtNumberReciprocal();
+    RDouble gasConstant = this->GetUniversalGasConstant(); 
+
+    RDouble *blotterAi = CurveFits->GetBlotterCurveFittingCoefficientA();
+    RDouble *blotterBi = CurveFits->GetBlotterCurveFittingCoefficientB();
+    RDouble *blotterCi = CurveFits->GetBlotterCurveFittingCoefficientC();
+    RDouble *blotterDi = CurveFits->GetBlotterCurveFittingCoefficientD();
+    RDouble *blotterEi = CurveFits->GetBlotterCurveFittingCoefficientE();
+
+    RDouble Ttr = temperature[mTT] * referenceTemperature;
+
+    RDouble xiSum, oxiSum;
+    xiSum = 0.0;
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        moleFractions[ispecies] = massFractions[ispecies] * oMolecularWeight[ispecies];
+        xiSum += moleFractions[ispecies];
+    }
+
+    oxiSum = 1.0 / xiSum;
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+       moleFractions[ispecies] *= oxiSum;
+    }
+
+    RDouble lnT = log(static_cast<RealData>(Ttr));
+    for (int ispecies = 0; ispecies <= nLastSpeciesIndex; ++ ispecies)
+    {
+        oxiSum = min(maxViscous, (((blotterAi[ispecies] * lnT + blotterBi[ispecies]) * lnT + blotterCi[ispecies]) * lnT + blotterDi[ispecies]) * lnT + blotterEi[ispecies]);
+        speciesViscosity[ispecies] = 0.10 * exp(static_cast<RealData>(oxiSum)) / referenceViscosity + SMALL;
+    }
+
+    if (nElectronIndex >= 0)
+    {
+        RDouble Te = temperature[mTE] * referenceTemperature;
+        RDouble lnTe = log(static_cast<RealData>(Te));
+        oxiSum = min(maxViscous, (((blotterAi[nElectronIndex] * lnTe + blotterBi[nElectronIndex]) * lnTe + blotterCi[nElectronIndex]) * lnTe + blotterDi[nElectronIndex]) * lnTe + blotterEi[nElectronIndex]);
+        speciesViscosity[nElectronIndex] = 0.10 * exp(static_cast<RealData>(oxiSum)) / referenceViscosity + SMALL;
+    }
+    
+    RDouble tmp0, tmp1, phiTmp;
+    for (int s = 0; s < numberOfSpecies; ++ s)
+    {
+        phiTmp = 0.0;
+        for (int i = 0; i < numberOfSpecies; ++ i)
+        {
+            tmp0 = speciesMass[i] / speciesMass[s];
+            tmp1 = 1.0 + sqrt(static_cast<RealData>(speciesViscosity[s] / speciesViscosity[i])) * sqrt((sqrt(static_cast<RealData>(tmp0))));
+            phiTmp += moleFractions[i] * tmp1 * tmp1 / sqrt(static_cast<RealData>(8.0 + 8.0 / tmp0));
+        }
+        speciesWeight[s] = phiTmp;
+    }
+
+    //! Compute the viscosity using Eucken formula.
+    viscosity = 0.0;
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        speciesConductivity[ispecies] = moleFractions[ispecies] * speciesViscosity[ispecies] / speciesWeight[ispecies];
+        viscosity += speciesConductivity[ispecies];
+    }
+
+    //! Compute mass diffusion coefficient for Species
+    tmp1 = 0;
+    phiTmp = 0;
+    for (int i = 0; i <= this->nLastSpeciesIndex; ++ i)
+    {
+        if (1.0 - moleFractions[i] <= 1.0e-20)
+        {
+            rhoDs[i] = 0.0;
+        }
+        else
+        {
+            rhoDs[i] = (1.0 - massFractions[i]) / (1.0 - moleFractions[i]) * (viscosity * oSchmidtLaminar[i] + visTurbulence * oSchmidtTurbulence[i]);
+        }
+
+        if (ionType[i] != 0)
+        {
+            tmp0  = massFractions[i] * oMolecularWeight[i];
+            tmp1 += rhoDs[i] * tmp0;
+            phiTmp += tmp0;
+        }
+    }
+
+    //! Compute the mass diffusion coefficient of electron.
+    if (nElectronIndex >= 0)
+    {
+        rhoDs[nElectronIndex] = tmp1 / MAX(phiTmp, 1.0e-20);
+    }
+
+    //! Compute the heat conductivity using Eucken formula.
+    heatConductivity[ITT] = 0.0;
+    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+    {
+        heatConductivity[ITT] += speciesConductivity[ispecies] * (speciesCps[ispecies] + 1.25 * gasConstant * oMolecularWeight[ispecies]);
+    }
+
+    heatConductivity[ITV] = 0.0;
+    heatConductivity[ITE] = 0.0;
+    if (ntmodel == 2)
+    {
+
+    }
+    else if (ntmodel == 3)
+    {
+
+    }
+}
+
+void MixedGas::ComputeViscosity(RDouble density, RDouble *massFractionOfSpecies, RDouble &transRotationTemperature, RDouble &electronTemperature, RDouble &suthTemperature, RDouble &viscosity)
+{
+    if (nchem == 0)     //! Perfect gas.
+    {
+        viscosity = transRotationTemperature * sqrt(transRotationTemperature) * (1.0 + suthTemperature) / (transRotationTemperature + suthTemperature);
+    }
+    else      //! Chemical non-equilibrium flow.
+    {
+        RDouble *speciesMass = molecularProperty->GetMolecularWeight();
+        ComputeMoleFractionByMassFraction(massFractionOfSpecies, moleFractions);
+
+        if (ntmodel > 1)     //! Multi-temperature model.
+        {
+
+        }
+        else     //! One-temperature model.
+        {
+            ComputeOneTemperatureModelSpeciesViscosity(transRotationTemperature, speciesViscosity);
+        }
+
+        GetPartitionFunctionValues(speciesViscosity, speciesMass, moleFractions, speciesWeight);
+
+        viscosity = GetMixedGasViscosityWithWilkeFormula(moleFractions, speciesViscosity, speciesWeight);
+    }
+}
+
+void MixedGas::ComputeSpeciesHeatConductivityByEuckenFormula(RDouble *viscosity, RDouble *cps, RDouble *conductivity)
+{
+    //! Obtain the universal gas constant.
+    RDouble gasConstant = this->GetUniversalGasConstant(); 
+    RDouble *speciesMass = this->molecularProperty->GetMolecularWeight();
+
+    //! Compute the heat conductivity using Eucken formula.
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        conductivity[i] = viscosity[i] * cps[i];
+        conductivity[i] += 1.25 * viscosity[i] * gasConstant / speciesMass[i];
+    }
+}
+
+RDouble MixedGas::ComputeMixtureGasHeatConductivityByWassilewaFormula(RDouble *primitiveVariables, RDouble temperature)
+{
+    for (int i = 0; i < numberOfSpecies; ++ i)
+    {
+        massFractions[i] = primitiveVariables[nm + i];
+    }
+
+    //! Obtain the mole fraction of each species.
+    this->ComputeMoleFractionByMassFraction(massFractions, moleFractions);
+
+    //! Obtain the molecular weight of each species.
+    RDouble *speciesMass = this->molecularProperty->GetMolecularWeight();
+
+    //! Obtain the viscosity of each species.
+    this->ComputeOneTemperatureModelSpeciesViscosity(temperature, speciesViscosity);
+
+    //! Obtain the species specific heat ratio at constant pressure.
+    this->ComputeSpeciesConstantPressureSpecificHeat(temperature, speciesCp);
+
+    //! Compute the heat conductivity of each species.
+    this->ComputeSpeciesHeatConductivityByEuckenFormula(speciesViscosity, speciesCp, speciesConductivity);
+
+    //! Compute species partition function values.
+    this->GetPartitionFunctionValues(speciesViscosity, speciesMass, moleFractions, this->workSpecies);
+
+    RDouble lambda = 0.0;
+    for (int i = 0; i < numberOfSpecies; ++ i)
+    {
+        lambda += speciesConductivity[i] * moleFractions[i] / workSpecies[i];
+    }
+
+    return lambda;
+}
+
+void MixedGas::GetPartitionFunctionValues(RDouble *target, RDouble *speciesMass, RDouble *moleFraction, RDouble *phi)
+{
+    //! To obtain the partition function values based on the targets, e.g conductivity or viscosity.
+    RDouble tmp = 0.0;
+    RDouble tmp0, tmp1, phiTmp;
+    for (int s = 0; s < numberOfSpecies; ++ s)
+    {
+        phiTmp = 0.0;
+        for (int i = 0; i < numberOfSpecies; ++ i)
+        {
+            tmp0 = speciesMass[i] / speciesMass[s];
+            tmp1 = 1.0 + sqrt(target[s] / target[i]) * sqrt(static_cast<float>(sqrt(static_cast<float>(tmp0))));
+            tmp = moleFraction[i] * tmp1 * tmp1;
+            phiTmp += tmp / sqrt(static_cast<float>(8.0 + 8.0 / tmp0));
+        }
+        phi[s] = phiTmp;
+    }
+}
+
+void MixedGas::ChemicalSource(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, int iCell)
+{
+}
+
+void MixedGas::EnergySource(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble **energySourceTerms, int nCellNumber)
+{
+}
+
+RDouble MixedGas::ComputeVibrationAndElectronEnergySourceTerm(RDouble *primitiveVariables, RDouble *omega, RDouble *temperature)
+{
+    return 0.0;
+}
+
+RDouble MixedGas::ComputeVibrationEnergySourceTerm(RDouble *primitiveVariables, RDouble *omega, RDouble *temperature)
+{
+    return 0.0;
+}
+
+void MixedGas::GetTranslationAndVibrationRelaxationTime(Thermo_Param *thermodynamicProperties, RDouble *massFraction,
+                                                        RDouble *speciesMass, RDouble temperature, RDouble pressure, RDouble density, RDouble *tvs)
+{
+}
+
+void MixedGas::GetTranslationAndVibrationRelaxationTimeR(Thermo_Param *thermodynamicProperties, RDouble *massFraction,
+                                                        RDouble *speciesMass, RDouble temperature, RDouble pressure, RDouble density, RDouble *tvs)
+{
+}
+
+void MixedGas::GetElectronAndVibrationRelaxationTime(Thermo_Param *thermodynamicProperties, RDouble electronPressure, RDouble electronTemperature, RDouble *tes)
+{
+}
+
+RDouble MixedGas::ComputeElectronEnergySourceTerm(RDouble *primitiveVariables, RDouble *omega, RDouble *temperature)
+{
+    return 0.0;
+}
+
+void MixedGas::GetEffectiveCollisionCrossSectionalArea(Thermo_Param *thermodynamicProperties, RDouble electronTemperature, RDouble electronNumberDensity, RDouble *sigma)
+{
+}
+
+void MixedGas::ChemicalSpectrumRadius(RDouble **q, RDouble **t, RDouble *vol, RDouble **srs, int iCell)
+{
+    using namespace IDX;
+    RDouble *molecularWeightDimensional  = molecularProperty->GetMolecularWeightDimensional();
+    RDouble *oMolecularWeightDimensional = molecularProperty->GetMolecularWeightReciprocalDimensional();
+
+    RDouble refDimensionalTemperature = this->referenceParameterDimensional.GetTemperature();
+    RDouble reference_velocity_dimensional = this->referenceParameterDimensional.GetVelocity();
+    RDouble refDimensionalDensity = this->referenceParameterDimensional.GetDensity();
+
+    RDouble temperatureDimensional, densityDimensional, oTemperatureDimensional, oTemperatureDimensional2;
+    RDouble diffp, diffn, posr, negr, comm, pztt;
+    RDouble xis, srst;
+    RDouble density, temperature;
+    RDouble odensityDimensionalJS, odensityDimensionalNS;
+    RDouble cpDimensional, cvDimensional, omav, coef_tr;
+
+    RDouble lov = reynoldsReferenceLengthDimensional / reference_velocity_dimensional;
+
+    int neqn = nl + nchem;
+
+    RDouble *afr = reactionRate->GetForwardReactionRateCoefficientA();
+    RDouble *bfr = reactionRate->GetForwardReactionRateCoefficientB();
+    RDouble *cfr = reactionRate->GetForwardReactionRateCoefficientC();
+
+    RDouble *abr = reactionRate->GetBackwardReactionRateCoefficientA();
+    RDouble *bbr = reactionRate->GetBackwardReactionRateCoefficientB();
+    RDouble *cbr = reactionRate->GetBackwardReactionRateCoefficientC();
+
+    int **cvp = stoichiometricEquation->GetForwardReactionStoichiometricCoefficient();
+    int **cvn = stoichiometricEquation->GetBackwardReactionStoichiometricCoefficient();
+    RDouble **cpz = stoichiometricEquation->GetReactionStoichiometricThirdBodyCoefficient();
+
+    RDouble *cq = new RDouble [numberOfReaction];
+    RDouble *kf = new RDouble [numberOfReaction];
+    RDouble *kb = new RDouble [numberOfReaction];
+
+    RDouble *pos = new RDouble[numberOfReaction];
+    RDouble *neg = new RDouble[numberOfReaction];
+    RDouble *pzt = new RDouble[numberOfReaction];
+    int     *npz = new int    [numberOfReaction];
+
+    RDouble *c_a1 = new RDouble[numberOfSpecies];
+    RDouble *c_a2 = new RDouble[numberOfSpecies];
+    RDouble *c_bk = new RDouble[numberOfSpecies];
+    RDouble *c_tr = new RDouble[numberOfSpecies];
+
+    RDouble *prim = new RDouble[neqn];
+
+    density     = q[IR ][iCell];
+    temperature = t[ITT][iCell];
+
+    densityDimensional = density * refDimensionalDensity;
+    temperatureDimensional = temperature * refDimensionalTemperature;
+    oTemperatureDimensional = one / (temperatureDimensional + SMALL);
+    oTemperatureDimensional2 = SQR(oTemperatureDimensional);
+
+    for (int m = 0; m < neqn; ++ m)
+    {
+        prim[m] = q[m][iCell];
+    }
+
+    for (int ireaction = 0; ireaction < numberOfReaction; ++ ireaction)
+    {
+        pos[ireaction] = 1.0;
+        neg[ireaction] = 1.0;
+        pzt[ireaction] = 0.0;
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            xis = densityDimensional * (prim[nm+ispecies] + SMALL) * oMolecularWeightDimensional[ispecies];
+
+            for (int nexp = 0; nexp < cvp[ireaction][ispecies]; ++ nexp)
+            {
+                pos[ireaction] *= xis;
+            }
+
+            for (int nexp = 0; nexp < cvn[ireaction][ispecies]; ++ nexp)
+            {
+                neg[ireaction] *= xis;
+            }
+
+            pzt[ireaction] += xis * cpz[ireaction][ispecies];
+        }
+
+        npz[ireaction] = 0;
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            npz[ireaction] += static_cast<int>(cpz[ireaction][ispecies] + 0.1);
+        }
+
+        if (npz[ireaction] == 0)
+        {
+            pzt[ireaction] = one;
+        }
+
+        kf[ireaction] = afr[ireaction] * pow(temperatureDimensional, bfr[ireaction]) * exp(-cfr[ireaction] * oTemperatureDimensional);
+        kb[ireaction] = abr[ireaction] * pow(temperatureDimensional, bbr[ireaction]) * exp(-cbr[ireaction] * oTemperatureDimensional);
+    }
+
+    for (int ispecies = 0; ispecies < numberOfSpecies - 1; ++ ispecies)
+    {
+        c_a2[ispecies] = 0.0;
+        for (int ireaction = 0; ireaction < numberOfReaction; ++ ireaction)
+        {
+            diffp = bfr[ireaction] * oTemperatureDimensional + cfr[ireaction] * oTemperatureDimensional2;
+            diffn = bbr[ireaction] * oTemperatureDimensional + cbr[ireaction] * oTemperatureDimensional2;
+            posr = pos[ireaction] * pzt[ireaction] * kf[ireaction] * diffp;
+            negr = neg[ireaction] * pzt[ireaction] * kb[ireaction] * diffn;
+            comm = (cvn[ireaction][ispecies] - cvp[ireaction][ispecies]);
+            c_a2[ispecies] += comm * (posr - negr);
+        }
+        c_a2[ispecies] *= molecularWeightDimensional[ispecies];
+    }
+
+    ComputeSpeciesEnthalpyDimensional(temperature, speciesEnthalpy);
+    ComputeSpeciesConstantPressureSpecificHeatDimensional(temperature, speciesCp);
+    ComputeMixtureByPrimitive(prim, speciesCp, cpDimensional);
+    ComputeMixtureByPrimitive(prim, oMolecularWeightDimensional, omav);
+
+    cvDimensional = cpDimensional - rjmk * omav;
+    coef_tr = - 1.0 / (densityDimensional * cvDimensional);
+
+    for (int ispecies = 0; ispecies < numberOfSpecies - 1; ++ ispecies)
+    {
+        c_tr[ispecies] = coef_tr * (speciesEnthalpy[ispecies] - speciesEnthalpy[numberOfSpecies-1] - rjmk * temperatureDimensional * 
+            (oMolecularWeightDimensional[ispecies] - oMolecularWeightDimensional[numberOfSpecies-1]));
+    }
+
+    for (int ispecies = 0; ispecies < numberOfSpecies - 1; ++ ispecies)
+    {
+        for (int jspecies = 0; jspecies < numberOfSpecies - 1; ++ jspecies)
+        {
+            c_bk[jspecies] = 0.0;
+            odensityDimensionalJS = 1.0 / (densityDimensional * (prim[nm+jspecies         ] + SMALL));
+            odensityDimensionalNS = 1.0 / (densityDimensional * (prim[nm+numberOfSpecies-1] + SMALL));
+            for (int ireaction = 0; ireaction < numberOfReaction; ++ ireaction)
+            {
+                diffp = cvp[ireaction][jspecies] * odensityDimensionalJS - cvp[ireaction][numberOfSpecies-1] * odensityDimensionalNS;
+                diffn = cvn[ireaction][jspecies] * odensityDimensionalJS - cvn[ireaction][numberOfSpecies-1] * odensityDimensionalNS;
+                posr  = pos[ireaction] * kf[ireaction] * diffp;
+                negr  = neg[ireaction] * kb[ireaction] * diffn;
+                comm  = (cvn[ireaction][ispecies] - cvp[ireaction][ispecies]);
+                c_bk[jspecies] += comm * (posr - negr) * pzt[ireaction];
+                if (npz[ireaction] != 0)
+                {
+                    pztt = cpz[ireaction][jspecies] * oMolecularWeightDimensional[jspecies]
+                    - cpz[ireaction][numberOfSpecies-1] * oMolecularWeightDimensional[numberOfSpecies-1];
+                    c_bk[jspecies] += comm * (kf[ireaction] * pos[ireaction] - kb[ireaction] * neg[ireaction]) * pztt;
+                }
+            }
+            c_bk[jspecies] = molecularWeightDimensional[ispecies] * c_bk[jspecies];
+        }
+        srst = 0.0;
+        for (int jspecies = 0; jspecies < numberOfSpecies - 1; ++ jspecies)
+        {
+            srst += ABS(c_bk[jspecies] + c_a2[ispecies] * c_tr[jspecies]);
+        }
+        srs[ispecies][iCell] = srst * lov * vol[iCell];
+    }
+
+    delete [] cq;
+    delete [] kf;
+    delete [] kb;
+
+    delete [] pos;
+    delete [] neg;
+    delete [] pzt;
+    delete [] npz;
+
+    delete [] c_a1;
+    delete [] c_a2;
+    delete [] c_bk;
+    delete [] c_tr;
+
+    delete [] prim;
+}
+
+void MixedGas::ComputeChemicalSourceDerivatives(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber)
+{
+}
+
+void MixedGas::ComputeChemicalSourceJacobian(RDouble *primitiveVariables, RDouble *temperatures, RDouble cellVolume, RDouble *chemicalSourceTerms, RDouble **sourceDerivatives)
+{
+}
+
+void MixedGas::ComputeChemicalSourceAndJacobian(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber)
+{
+}
+
+void MixedGas::ComputeChemicalSourceAndJacobianD3(int *Inzone, RDouble4D &primitiveVariables, RDouble4D &temperatures, RDouble4D &speciesEs, RDouble4D &speciesCvs, RDouble3D &totalCv, RDouble3D &cellVolume, RDouble4D &chemicalSourceTerms, RDouble5D &sourceDerivatives)
+{
+}
+
+void MixedGas::ComputeChemicalSourceDerivatives1(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber)
+{
+}
+
+void MixedGas::ComputeChemicalSourceDerivatives2(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber)
+{
+}
+
+void MixedGas::ComputeEnergySourceDerivatives1(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms,
+                                               RDouble ***chemicalSourceDerivatives, RDouble ***energySourceDerivatives, int nCellNumber)
+{
+
+}
+
+void MixedGas::ComputeEnergySourceDiagonalDerivatives1(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms,
+                                                       RDouble ***chemicalSourceDerivatives, RDouble **energySourceDerivatives, int nCellNumber)
+{
+ 
+}
+
+void MixedGas::ComputeEnergySourceDiagonalDerivatives2(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms,
+                                                       RDouble ***chemicalSourceDerivatives, RDouble **energySourceDerivatives, int nCellNumber)
+{
+
+}
+
+void MixedGas::ComputeEnergySourceJacobianT2(RDouble *primitiveVariables, RDouble *temperatures, RDouble cellVolume, RDouble *chemicalSourceTerms, RDouble **sourceDerivatives)
+{
+ 
+}
+
+void MixedGas::ComputeEnergySourceJacobianT3(RDouble *primitiveVariables, RDouble *temperatures, RDouble cellVolume, RDouble *chemicalSourceTerms, RDouble **sourceDerivatives)
+{
+
+}
+
+void MixedGas::ComputeEnergySourceAndJacobianT2(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber)
+{
+
+}
+
+void MixedGas::ComputeEnergySourceAndJacobianT2D3(int *Inzone, RDouble4D &primitiveVariables, RDouble4D &temperatures, RDouble4D &speciesCvvs, RDouble4D &speciesCves, RDouble4D &speciesEvs, RDouble4D &speciesEes, RDouble3D &totalCvtr, RDouble3D &totalCvv, RDouble3D &totalCve, RDouble3D &cellVolume, RDouble4D &chemicalSourceTerms, RDouble5D &sourceDerivatives)
+{                                              
+
+}
+
+void MixedGas::ComputeEnergySourceAndJacobianT3(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber)
+{
+
+}
+
+void MixedGas::ComputeEnergySourceAndJacobianT3D3(int *Inzone, RDouble4D &primitiveVariables, RDouble4D &temperatures, RDouble4D &speciesCvvs, RDouble4D &speciesCves, RDouble4D &speciesEvs, RDouble4D &speciesEes, RDouble3D &totalCvtr, RDouble3D &totalCvv, RDouble3D &totalCve, RDouble3D &cellVolume, RDouble4D &chemicalSourceTerms, RDouble5D &sourceDerivatives)
+{
+ 
+}
+
+void MixedGas::GetLinearlyAveragedPolynomialCoefficients(int nSpecies, RDouble temperature, RDouble *polynomialCoef)
+{
+    int nIndex1, nIndex2;      //! Record the index of temperature range.
+    RDouble coef1, coef2;      //! The coefficients for linear polynomial on the temperature boundary.
+    RDouble T = temperature;   //! temperature is the dimensional value.
+
+    //! Select the temperature range and compute the coefficients.
+    if (T > 15500.0)
+    {
+        nIndex1 = 3;
+        nIndex2 = 4;
+        if (T > 25500.0)     //! Range: (25500, 30000).
+        {
+            coef1 = 0.0;
+            coef2 = 1.0;
+        }
+        else if (T <= 24500.0)     //! Range: (15500, 24500).
+        {
+            coef1 = 1.0;
+            coef2 = 0.0;
+        }
+        else     //! Range: (24500, 25500).
+        {
+            coef2 = 0.001 * (T - 24500.0);
+            coef1 = 1.0 - coef2;
+        }
+    }
+    else if (T > 6500.0)
+    {
+        nIndex1 = 2;
+        nIndex2 = 3;
+        if (T <= 14500.0)     //! Range: (6500, 14500).
+        {
+            coef1 = 1.0;
+            coef2 = 0.0;
+        }
+        else      //! Range: (14500, 15500).
+        {
+            coef2 = 0.001 * (T - 14500.0);
+            coef1 = 1.0 - coef2;
+        }
+    }
+    else if (T > 1200.0)
+    {
+        nIndex1 = 1;
+        nIndex2 = 2;
+        if (T <= 5500.0)     //! Range: (1200, 5500).
+        {
+            coef1 = 1.0;
+            coef2 = 0.0;
+        }
+        else      //! Range: (5500, 6500).
+        {
+            coef2 = 0.001 * (T - 5500.0);
+            coef1 = 1.0 - coef2;
+        }
+    }
+    else
+    {
+        nIndex1 = 0;
+        nIndex2 = 1;
+        if (T <= 800.0)      //! Range: (0, 800).
+        {
+            coef1 = 1.0;
+            coef2 = 0.0;
+        }
+        else      //! Range: (800, 1200).
+        {
+            coef2 = (T - 800.0)/400.0;
+            coef1 = 1.0 - coef2;
+        }
+    }
+
+    RDouble *a = this->thermodynamicManager->GetPolynomialCoefficient(nSpecies, nIndex1);
+    RDouble *b = this->thermodynamicManager->GetPolynomialCoefficient(nSpecies, nIndex2);
+    int n = thermodynamicManager->GetNumberofPolynomialCoefficient();
+    for (int i = 0; i < n; ++ i)
+    {
+        polynomialCoef[i] = coef1 * a[i] + coef2 * b[i];
+    }
+}
+
+void MixedGas::GetLinearlyAveragedPolynomialCoefficientsT2(RDouble temperature, RDouble **polynomialCoef)
+{
+    int nIndex1, nIndex2;      //! Record the index of temperature range.
+    RDouble coef1, coef2;      //! The coefficients for linear polynomial on the temperature boundary.
+    RDouble T = temperature;   //! temperature is the dimensional value.
+
+    //! Select the temperature range and compute the coefficients.
+    if (T > 15500.0)
+    {
+        nIndex1 = 4;
+        nIndex2 = 5;
+        if (T > 25500.0)     //! Range: (25500, 30000).
+        {
+            coef1 = 0.0;
+            coef2 = 1.0;
+        }
+        else if (T <= 24500.0)     //! Range: (15500, 24500).
+        {
+            coef1 = 1.0;
+            coef2 = 0.0;
+        }
+        else     //! Range: (24500, 25500).
+        {
+            coef2 = 0.001 * (T - 24500.0);
+            coef1 = 1.0 - coef2;
+        }
+    }
+    else if (T > 6500.0)
+    {
+        nIndex1 = 3;
+        nIndex2 = 4;
+        if (T <= 14500.0)     //! Range: (6500, 14500).
+        {
+            coef1 = 1.0;
+            coef2 = 0.0;
+        }
+        else      //! Range: (14500, 15500).
+        {
+            coef2 = 0.001 * (T - 14500.0);
+            coef1 = 1.0 - coef2;
+        }
+    }
+    else if (T > 1200.0)
+    {
+        nIndex1 = 2;
+        nIndex2 = 3;
+        if (T <= 5500.0)     //! Range: (1200, 5500).
+        {
+            coef1 = 1.0;
+            coef2 = 0.0;
+        }
+        else      //! Range: (5500, 6500).
+        {
+            coef2 = 0.001 * (T - 5500.0);
+            coef1 = 1.0 - coef2;
+        }
+    }
+    else
+    {
+        nIndex1 = 1;
+        nIndex2 = 2;
+        if (T <= 800.0)      //! Range: (0, 800).
+        {
+            coef1 = 1.0;
+            coef2 = 0.0;
+        }
+        else      //! Range: (800, 1200).
+        {
+            coef2 = (T - 800.0) / 400.0;
+            coef1 = 1.0 - coef2;
+        }
+    }
+
+    RDouble benchmarkTemp = 200, T1 = 0.0, T2 = 0.0;
+    RDouble *polynomial1 = NULL, *polynomial2 = NULL;
+
+    int n = thermodynamicManager->GetNumberofPolynomialCoefficient();
+    if (ABS(coef1 - 1) <= EPSILON)
+    {
+        for (int iSpecies = 0; iSpecies < numberOfSpecies; ++ iSpecies)
+        {
+            polynomial1 = this->thermodynamicManager->GetPolynomialCoefficientT2(iSpecies, nIndex1);
+            for (int i = 0; i < n; ++ i)
+            {
+                polynomialCoef[iSpecies][i] = polynomial1[i];
+            }
+        }
+    }
+    else if (ABS(coef2 - 1) <= EPSILON)
+    {
+        for (int iSpecies = 0; iSpecies < numberOfSpecies; ++ iSpecies)
+        {
+            polynomial2 = this->thermodynamicManager->GetPolynomialCoefficientT2(iSpecies, nIndex2);
+            for (int i = 0; i < n; ++ i)
+            {
+                polynomialCoef[iSpecies][i] = polynomial2[i];
+            }
+        }
+    }
+    else
+    {
+        for (int iSpecies = 0; iSpecies < numberOfSpecies; ++ iSpecies)
+        {
+            polynomial1 = this->thermodynamicManager->GetPolynomialCoefficientT2(iSpecies, nIndex1);
+            polynomial2 = this->thermodynamicManager->GetPolynomialCoefficientT2(iSpecies, nIndex2);
+            for (int i = 0; i < n; ++ i)
+            {
+                polynomialCoef[iSpecies][i] = coef1 * polynomial1[i] + coef2 * polynomial2[i];
+            }
+        }
+    }
+
+    //Modify the coefficient when the temperature is low.
+    bool isSmooth = false;
+    for (int iSpecies = 0; iSpecies < numberOfSpecies; ++ iSpecies)
+    {
+        benchmarkTemp = this->thermodynamicManager->GetBenchmarkTemperature(iSpecies);
+        if (isSmooth)
+        {
+            T1 = benchmarkTemp - 100;
+            T2 = benchmarkTemp + 100;
+            if (T < T1)
+            {
+                polynomial1 = this->thermodynamicManager->GetPolynomialCoefficientT2(iSpecies, 0);
+                for (int i = 0; i < n; ++ i)
+                {
+                    polynomialCoef[iSpecies][i] = polynomial1[i];
+                }
+            }
+            else if (T <= T2)
+            {
+                polynomial1 = this->thermodynamicManager->GetPolynomialCoefficientT2(iSpecies, 0);
+                polynomial2 = this->thermodynamicManager->GetPolynomialCoefficientT2(iSpecies, 1);
+                coef2 = (T - T1) / 200.0;
+                coef1 = 1.0 - coef2;
+                for (int i = 0; i < n; ++ i)
+                {
+                    polynomialCoef[iSpecies][i] = coef1 * polynomial1[i] + coef2 * polynomial2[i];
+                }
+            }
+        }
+        else //No smooth.
+        {
+            if (T < benchmarkTemp)
+            {
+                polynomial1 = this->thermodynamicManager->GetPolynomialCoefficientT2(iSpecies, 0);
+                for (int i = 0; i < n; ++ i)
+                {
+                    polynomialCoef[iSpecies][i] = polynomial1[i];
+                }
+            }
+        }
+    }
+}
+
+void MixedGas::GetLinearlyAveragedPolynomialCoefficientsIndex(RDouble temperature, RDouble &coef, int &nIndex1, int &nIndex2)
+{
+}
+
+void MixedGas::GetLinearlyAveragedPolynomialCoefficientsByIndex(int nSpecies, RDouble *polynomialCoef, RDouble coef, int nIndex1, int nIndex2)
+{
+}
+
+void MixedGas::GetAirInfo(const RDouble &h1, RDouble &t, RDouble &p, RDouble &den, RDouble &a)
+{
+    //! USSA 76 Model for atmosphere.
+    RDouble h      = h1 * 1000.0;
+    RDouble r      = 287.053;
+    RDouble g0     = 9.80665;
+    RDouble rp     = 6.37111e6;
+    RDouble g      = (rp/(rp+h))*(rp/(rp+h))*g0;
+    RDouble t0     = 288.15;
+    RDouble p0     = 10.1325e2;
+    RDouble rho0   = 1.225;
+    RDouble t11    = 216.65;
+    RDouble p11    = 2.2632e2;
+    RDouble rho11  = 3.6392e-1;
+    RDouble t20    = t11;
+    RDouble p20    = 5.4747e1;
+    RDouble rho20  = 8.8035e-2;
+    RDouble t32    = 228.65;
+    RDouble p32    = 8.6789;
+    RDouble rho32  = 1.3225e-2;
+    RDouble t47    = 270.65;
+    RDouble p47    = 1.1090;
+    RDouble rho47  = 1.4275e-3;
+    RDouble t52    = t47;
+    RDouble p52    = 5.8997e-1;
+    RDouble rho52  = 7.5943e-4;
+    RDouble t61    = 252.65;
+    RDouble p61    = 1.8209e-1;
+    RDouble rho61  = 2.5109e-4;
+    RDouble t79    = 180.65;
+    RDouble p79    = 1.0376e-2;
+    RDouble rho79  = 2.0010e-5;
+    RDouble t90    = t79;
+    RDouble p90    = 1.6437e-3;
+    RDouble rho90  = 3.4165e-6;
+    RDouble t100   = 210.02;
+    RDouble p100   = 3.0070e-4;
+    RDouble rho100 = 5.6044e-7;
+    RDouble t110   = 257.00;
+    RDouble p110   = 7.3527e-5;
+    RDouble rho110 = 9.7081e-8;
+    RDouble t120   = 349.49;
+    RDouble p120   = 2.5209e-5;
+    RDouble rho120 = 2.2222e-8;
+    RDouble t150   = 892.79;
+    RDouble p150   = 5.0599e-6;
+    RDouble rho150 = 2.0752e-9;
+    RDouble t160   = 1022.20;
+    RDouble p160   = 3.6929e-6;
+    RDouble rho160 = 1.2336e-9;
+    RDouble t170   = 1103.40;
+    RDouble p170   = 2.7915e-6;
+    RDouble rho170 = 7.8155e-10;
+    RDouble t190   = 1205.40;
+    RDouble p190   = 1.6845e-6;
+    RDouble rho190 = 3.5807e-10;
+    RDouble t230   = 1322.30;
+    RDouble p230   = 6.7138e-7;
+    RDouble rho230 = 1.5640e-10;
+    RDouble t300   = 1432.10;
+    RDouble p300   = 1.8828e-7;
+    RDouble rho300 = 1.9159e-11;
+    RDouble t400   = 1487.40;
+    RDouble p400   = 4.0278e-8;
+    RDouble rho400 = 2.8028e-12;
+    RDouble t500   = 1499.20;
+    RDouble p500   = 1.0949e-8;
+    RDouble rho500 = 5.2148e-13;
+    RDouble t600   = 1506.10;
+    RDouble p600   = 3.4475e-9;
+    RDouble rho600 = 1.1367e-13;
+    RDouble t700   = 1507.60;
+
+    RDouble rho = 0.0;
+
+    if (h <= 11019.0) 
+    {
+        RDouble al1 = (t11 - t0) / 11019.0;
+        t   = t0 + al1 * h;
+        p   = p0 * pow(t/t0, -g / (r * al1));
+        rho = rho0 * pow(t/t0, -1.0 - g / (r*al1));
+    }
+    else if (h <= 20063.0)
+    {
+        t   = t11;
+        p   = p11   * exp(-g*(h-11019.0)/(r*t11));
+        rho = rho11 * exp(-g*(h-11019.0)/(r*t11));
+    }
+    else if (h <= 32162.0)
+    {
+        RDouble al2 = (t32-t20) / (32162.0-20063.0);
+        t   = t11 + al2*(h-20063.0);
+        p   = p20 * pow(t/t11, -g/(r*al2));
+        rho = rho20 * pow(t/t11, -1.0-g/(r*al2));
+    }
+    else if (h <= 47350.0)
+    {
+        RDouble al3 = (t47-t32) / (47350.0-32162.0);
+        t   = t32 + al3 * (h-32162.0);
+        p   = p32 * pow(t/t32, -g/(r*al3));
+        rho = rho32 * pow(t/t32, -1.0-g/(r*al3));
+    }
+
+    else if (h <= 52429.0)
+    {
+        t   = t47;
+        p   = p47*exp(-g*(h-47350.0)/(r*t47));
+        rho = rho47*exp(-g*(h-47350.0)/(r*t47));
+    }
+    else if (h <= 61591.0)
+    {
+        RDouble al4 =(t61-t52)/(61591.0-52429.0);
+        t = t47 + al4*(h-52429.0);
+        p = p52 * pow(t/t47, -g/(r*al4));
+        rho = rho52* pow(t/t47, -1.0-g/(r*al4));
+    }
+    else if (h <= 79994.0)
+    {
+        RDouble al5 = (t79-t61) / (79994.0-61591.0);
+        t = t61 + al5 * (h-61591.0);
+        p = p61 * pow(t/t61, -g/(r*al5));
+        rho = rho61 * pow(t/t61, -1.0-g/(r*al5));
+    }
+    else if (h <= 90000.0)
+    {
+        t = t79;
+        p = p79 * exp(-g*(h-79994.0)/(r*t79));
+        rho = rho79 * exp(-g*(h-79994.0)/(r*t79));
+    }
+    else if (h <= 100000.0)
+    {
+        RDouble al6 = (t100-t90)/10000.0;
+        t = t79 + al6*(h-90000.0);
+        p = p90 * pow(t/t79, -g/(r*al6));
+        rho = rho90 * pow(t/t79, -1.0-g/(r*al6));
+    }
+    else if (h <= 110000.0)
+    {
+        RDouble al7 = (t110-t100)/10000.0;
+        t = t100 + al7*(h-100000.0);
+        p = p100 * pow(t/t100, -g/(r*al7));
+        rho = rho100 * (t/t100, -1.0-g/(r*al7));
+    }
+    else if (h <= 120000.0)
+    {
+        RDouble al8 = (t120-t110)/10000.0;
+        t = t110 + al8*(h-110000.0);
+        p = p110 * pow(t/t110, -g/(r*al8));
+        rho = rho110 * pow(t/t110, -1.0-g/(r*al8));
+    }
+    else if (h <= 150000.0)
+    {
+        RDouble al9 = (t150-t120)/30000.0;
+        t = t120 + al9*(h-120000.0);
+        p = p120 * pow(t/t120, -g/(r*al9));
+        rho = rho120 * pow(t/t120, -1.0-g/(r*al9));
+    }
+    else if (h <= 160000.0)
+    {
+        RDouble al10 = (t160-t150)/10000.0;
+        t = t150 + al10*(h-150000.0);
+        p = p150 * pow(t/t150, -g/(r*al10));
+        rho = rho150 * pow(t/t150, -1.0-g/(r*al10));
+    }
+    else if (h <= 170000.0)
+    {
+        RDouble al11 = (t170-t160)/10000.0;
+        t = t160 + al11*(h-160000.0);
+        p = p160 * pow(t/t160, -g/(r*al11));
+        rho = rho160 * pow(t/t160, -1.0-g/(r*al11));
+    }
+    else if (h <= 190000.0)
+    {
+        RDouble al12 = (t190-t170)/20000.0;
+        t = t170 + al12*(h-170000.0);
+        p = p170 * pow(t/t170, -g/(r*al12));
+        rho = rho170 * pow(t/t170, -1.0-g/(r*al12));
+    }
+    else if (h <= 230000.0)
+    {
+        RDouble al13 = (t230-t190)/40000.0;
+        t = t190 + al13*(h-190000.0);
+        p = p190 * pow(t/t190, -g/(r*al13));
+        rho = rho190 * pow(t/t190, -1.0-g/(r*al13));
+    }
+    else if (h <= 300000.0)
+    {
+        RDouble al14 = (t300-t230)/70000.0;
+        t = t230 + al14*(h-230000.0);
+        p = p230 * pow(t/t230, -g/(r*al14));
+        rho = rho230 * pow(t/t230, -1.0-g/(r*al14));
+    }
+    else if (h <= 400000.0)
+    {
+        RDouble al15 = (t400-t300)/100000.0;
+        t = t300 + al15*(h-300000.0);
+        p = p300 * pow(t/t300, -g/(r*al15));
+        rho = rho300 * pow(t/t300, -1.0-g/(r*al15));
+    }
+    else if (h <= 500000.0)
+    {
+        RDouble al16 = (t500-t400)/100000.0;
+        t = t400 + al16*(h-400000.0);
+        p = p400 * pow(t/t400, -g/(r*al16));
+        rho = rho400 * pow(t/t400, -1.0-g/(r*al16));
+    }
+    else if (h <= 600000.0)
+    {
+        RDouble al17 = (t600-t500)/100000.0;
+        t = t500 + al17*(h-500000.0);
+        p = p500 * pow(t/t500, -g/(r*al17));
+        rho = rho500 * pow(t/t500, -1.0-g/(r*al17));
+    }
+    else if (h <= 700000.0)
+    {
+        RDouble al18 = (t700-t600)/100000.0;
+        t = t600 + al18*(h-600000.0);
+        p = p600 * pow(t/t600, -g/(r*al18));
+        rho = rho600 * pow(t/t600, -1.0-g/(r*al18));
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("Error: height must be less than 700km!!!\n", true);
+    }
+
+    a   = sqrt(1.4*r*t);
+    p   = p * 100.0;
+    den = rho;
+}
+
+void MixedGas::ComputeCoefficientInMXDQ(RDouble *primitiveVars, RDouble &alpha, RDouble &beta, RDouble *speciesBeta)
+{
+    //! The arguments alpha, beta and beta_s are referred to the formular (A.5) in the appendix A of the PHengLEI Theory manual.
+    //! alpha = R/(M*cv)
+    //! beta = R/(M*cv)*(0.5*V^2 - ens) + R*T/Mns
+    //! betas =  R/(M*cv) * (ens - es) + R*T(1/Ms - 1/Mns)
+    int nSpecies = this->GetNumberOfSpecies();
+    for (int s = 0; s < nSpecies; ++ s)
+    {
+        massFractions[s] = primitiveVars[this->nm + s];
+    }
+
+    //! Obtain the primitive values.
+    using namespace IDX;
+    RDouble &density   = primitiveVars[IR];
+    RDouble &uVelocity = primitiveVars[IU];
+    RDouble &vVelocity = primitiveVars[IV];
+    RDouble &wVelocity = primitiveVars[IW];
+    RDouble &pressure  = primitiveVars[IP];
+    RDouble squareVelocity = uVelocity * uVelocity + vVelocity * vVelocity + wVelocity * wVelocity;
+    //! Obtain the non-dimensional universal gas constant.
+    RDouble gasConstant = this->GetUniversalGasConstant();
+    //! Obtain the molecular weight of mixture gas.
+    RDouble mixedGasMass = this->GetMixedGasMolecularWeight(massFractions);
+    //! Compute the temperature using the state equation of mixture gas.
+    RDouble temperature = pressure * mixedGasMass / (density * gasConstant);
+
+    //! Compute the internal energy of last species with the label ns-1.
+    this->ComputeSpeciesConstantVolumeSpecificHeat(temperature, speciesCv);
+    //this->ComputeSpeciesEnthalpy(temperature, speciesCv, speciesEnergyTr, speciesEnthalpy);
+    RDouble mixedGasCv = 0.0;
+    this->ComputeMixtureByMassFraction(massFractions, speciesCv, mixedGasCv);
+    //! Compute the first coefficient called alpha.
+    alpha = gasConstant / (mixedGasMass * mixedGasCv);
+
+    //! Obtain the molecular weight of each species.
+    RDouble *speciesMassReciprocal = this->molecularProperty->GetMolecularWeightReciprocal();
+    RDouble nitrogenEnergy = speciesCv[nLastSpeciesIndex] * temperature;//speciesEnergyTr[nLastSpeciesIndex];
+    RDouble electronEnergy = 0.0, electronMassReciprocal = 1.0 / electronMass;
+    if (nElectronIndex >= 0)
+    {
+        electronEnergy = speciesCv[nElectronIndex] * temperature;
+        //electronEnergy = speciesEnergyTr[nElectronIndex];
+        electronMassReciprocal = speciesMassReciprocal[nElectronIndex];
+    }
+
+    //! Compute the second coefficient called beta.
+    RDouble alpha1 = 0.5 * squareVelocity - nitrogenEnergy;
+    RDouble alpha2 = speciesMassReciprocal[nLastSpeciesIndex];
+    beta = alpha * alpha1 + gasConstant * temperature * alpha2;
+
+    //! Compute the other coefficient stored in speciesBeta.
+    RDouble speciesGama, speciesEta, tempCoef;
+    int *ionType = molecularProperty->GetIonTypeOfSpecies();
+    speciesBeta[nLastSpeciesIndex] = 0.0;
+    for (int s = 0; s < nLastSpeciesIndex; ++ s)
+    {
+        tempCoef = ionType[s] * speciesMassReciprocal[s] / electronMassReciprocal;
+
+        speciesGama = speciesMassReciprocal[s] - speciesMassReciprocal[nLastSpeciesIndex];
+        speciesGama += tempCoef * (electronMassReciprocal - speciesMassReciprocal[nLastSpeciesIndex]);
+
+        speciesEta = nitrogenEnergy - speciesCv[s] * temperature;
+        //speciesEta = nitrogenEnergy - speciesEnergyTr[s];
+        speciesEta += tempCoef * (nitrogenEnergy - electronEnergy);
+
+        speciesBeta[s] = alpha * speciesEta + gasConstant * temperature * speciesGama;
+    }
+}
+
+void MixedGas::ComputeCoefficientInMXDQR(RDouble *primitiveVars, RDouble trTemperature, RDouble squareVelocity, RDouble *speciesCvs, RDouble totalCv, RDouble &alpha, RDouble &beta, RDouble *speciesBeta)
+{
+    //! The arguments alpha, beta and beta_s are referred to the formular (A.5) in the appendix A of the PHengLEI Theory manual.
+    //! alpha = R/(M*cv)
+    //! beta = R/(M*cv)*(0.5*V^2 - ens) + R*T/Mns
+    //! betas =  R/(M*cv) * (ens - es) + R*T(1/Ms - 1/Mns)
+    //! Obtain the primitive values.
+
+    RDouble gasConstant = this->GetUniversalGasConstant();
+    RDouble *speciesMassReciprocal = this->molecularProperty->GetMolecularWeightReciprocal();
+    int *ionType = molecularProperty->GetIonTypeOfSpecies();
+
+    RDouble mixedGasMass = 0.0;
+    for (int i = 0; i < numberOfSpecies; ++ i)
+    {
+        massFractions[i] = primitiveVars[this->nm + i];
+        mixedGasMass += massFractions[i] * speciesMassReciprocal[i];
+    }
+
+    alpha = gasConstant * mixedGasMass / totalCv;
+
+    //! Obtain the molecular weight of each species.
+
+    RDouble nitrogenEnergy = speciesCvs[nLastSpeciesIndex] * trTemperature;   //speciesEnergyTr[nLastSpeciesIndex];
+
+    RDouble electronEnergy = 0.0, electronMassReciprocal = 1.0 / electronMass;
+    if (nElectronIndex >= 0)
+    {
+        electronEnergy = speciesCvs[nElectronIndex] * trTemperature;
+        //electronEnergy = speciesEnergyTr[nElectronIndex];
+        electronMassReciprocal = speciesMassReciprocal[nElectronIndex];
+    }
+
+    //! Compute the second coefficient called beta.
+    RDouble alpha1 = 0.5 * squareVelocity - nitrogenEnergy;
+    RDouble alpha2 = speciesMassReciprocal[nLastSpeciesIndex];
+    beta = alpha * alpha1 + gasConstant * trTemperature * alpha2;
+
+    //! Compute the other coefficient stored in speciesBeta.
+    RDouble speciesGama, speciesEta, tempCoef;
+
+    for (int s = 0; s < nLastSpeciesIndex; ++ s)
+    {
+        tempCoef = ionType[s] * speciesMassReciprocal[s] / electronMassReciprocal;
+
+        speciesGama = speciesMassReciprocal[s] - speciesMassReciprocal[nLastSpeciesIndex];
+        speciesGama += tempCoef * (electronMassReciprocal - speciesMassReciprocal[nLastSpeciesIndex]);
+
+        speciesEta = nitrogenEnergy - speciesCvs[s] * trTemperature;
+        //speciesEta = nitrogenEnergy - speciesEnergyTr[s];
+        speciesEta += tempCoef * (nitrogenEnergy - electronEnergy);
+
+        speciesBeta[s] = alpha * speciesEta + gasConstant * trTemperature * speciesGama;
+    }
+    speciesBeta[nLastSpeciesIndex] = 0.0;
+}
+
+//! To obtain the coefficients of computing the M*dQ in the function MVXDQ_STD_LP(), added by LiPeng on Jan. 21, 2019.
+void MixedGas::ComputeCoefficientInMVXDQ(RDouble *prim, RDouble K, RDouble rD, RDouble *theta_s, RDouble *phi_s, RDouble *Ds)
+{
+    //! K=visl/Prl + vist/Prt denotes the thermal conductivity coefficient, rD=visl/Scl + vist/Sct is the species diffusion coefficient,\n
+    //! Ds is an array of saving the diffusion coefficient of each species.
+
+    int ns = this->GetNumberOfSpecies();
+    //! To obtain the mass fraction of each species.
+    RDouble *fs = new RDouble[ns];
+    RDouble *xs = new RDouble[ns];
+    for (int i = 0; i < ns; i++)
+    {
+        fs[i] = prim[i + this->nm];
+    }
+
+    //! Obtain the mole fraction of each species.
+    this->ComputeMoleFractionByMassFraction(fs, xs);
+
+    //! Obtain the density and pressure.
+    RDouble &ro = prim[0];
+    RDouble &pm = prim[4];
+    RDouble R = this->GetUniversalGasConstant();    //! The non-dimensional universal gas constant.
+    RDouble M = this->GetMixedGasMolecularWeight(fs);     //! The molecular weight of mixture gas.
+    RDouble tm = pm * M / (ro * R);     //! Compute the temperature using the state equation of mixture gas.
+
+    RDouble cp;    //! Save the value of constant pressure specific heat.
+    this->ComputeConstantPressureSpecificHeatByMassFraction(fs, tm, cp);
+    RDouble lambda = cp * K;      //! K = visl/Prl + vist/Prt denotes the thermal conductivity coefficient.
+
+    //! Compute the diffusion coefficient of each species.
+    for (int i = 0; i < ns; i++)
+    {
+        Ds[i] = (rD/ro) * (1.0 - fs[i]) / (1.0 - xs[i]);     //! rD=visl/Scl + vist/Sct.
+    }
+
+    RDouble cv;//!Save the value of constant volume specific heat.
+    this->ComputeConstantVolumeSpecificHeatByMassFraction(fs, tm, cv);
+    RDouble e = cv * tm;//!the total internal energy of mixture gas
+
+    //! Compute the internal energy of last species with label ns-1 in the collection.
+    RDouble *cvs = new RDouble[ns];    //! Save the value of constant volume specific heat of each species.
+    this->ComputeSpeciesConstantVolumeSpecificHeat(tm, cvs);
+    RDouble ens = cvs[ns-1] * tm;
+    RDouble *Ms = this->molecularProperty->GetMolecularWeight();    //! Obtain the molecular weight of each species.
+
+    //! Compute the coefficient called theta_s.
+    RDouble ei = 0.0;
+    for (int i = 0; i < ns; i++)
+    {
+        ei = cvs[i] * tm;
+        theta_s[i] = (ei - ens) - M * (1.0/Ms[i] - 1.0/Ms[ns-1]) * e;
+    }
+
+    //! Compute the coefficient called phi_s.
+    RDouble *cps = new RDouble[ns];    //! Save the value of constant pressure specific heat of each species.
+    this->ComputeSpeciesConstantPressureSpecificHeat(tm, cps);
+    RDouble roDns = ro * Ds[ns-1] * cps[ns-1] * tm;
+    RDouble hi = 0.0;
+
+    //! Compute the coefficient called phi_s of each species.
+    for (int i = 0; i < ns; i ++)
+    {//!lambda=cp*(visl/Prl + vist/Prt)
+        hi = cps[i] * tm;
+        phi_s[i] = -lambda * M * (1.0/Ms[i] - 1.0/Ms[ns-1]) * tm + (ro * Ds[i] * hi  - roDns);
+    }
+
+    //! Remove the dynamic memory space.
+    delete [] fs;
+    delete [] xs;
+    delete [] cvs;
+    delete [] cps;
+}
+
+void MixedGas::GetEarthFullyCatalyticMassFraction(RDouble *fs, RDouble *fcw)
+{
+    RDouble *Ms = this->molecularProperty->GetMolecularWeightDimensional();
+    RDouble M = 0.0;
+    //! Compute the total molecular weight.
+    for (int i = 0; i < this->numberOfSpecies; i ++)
+    {
+        fcw[i] = 0.0; //Initialization.
+        M += fs[i] / Ms[i];
+    }
+    M = 1.0 / M;
+
+    RDouble *xs = new RDouble[this->numberOfSpecies];
+    //! Compute mole fraction of each species.
+    for (int i = 0; i < this->numberOfSpecies; i ++)
+    {
+        xs[i] = fs[i] * M / Ms[i];
+    }
+
+    //! To compute the mass of oxygen.
+    RDouble co2 = 0.0, cn2 = 0.0;
+    int coef = 0;
+    RDouble Mo = 15.9994E-3;     //! The molecular weight.
+    string *species_name = this->molecularProperty->GetNameOfSpecies();
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        if (FindChemicalElement(species_name[i], 'O', coef))
+        {
+            co2 += xs[i] * coef * Mo;
+        }
+    }
+    delete [] xs;
+    //Compute the mass fraction of Oxygen.
+    co2 = co2 / M;
+    //Compute the mass fraction of Nitrogen.
+    cn2 = MAX(1.0 - co2, 0.0);
+
+    int nIndex = this->GetSpeciesIndex("O2");
+    if (nIndex >= 0)
+    {
+        fcw[nIndex] = co2;
+    }
+    nIndex = this->GetSpeciesIndex("N2");
+    if (nIndex >= 0)
+    {
+        fcw[nIndex] = cn2;
+    }
+}
+
+void MixedGas::GetMarsFullyCatalyticMassFraction(RDouble *fs, RDouble *fcw)
+{
+    RDouble *Ms = this->molecularProperty->GetMolecularWeightDimensional();
+    RDouble M = 0.0;
+    //! Compute the total molecular weight.
+    for (int i = 0; i < this->numberOfSpecies; i++)
+    {
+        fcw[i] = 0.0; //Initialization.
+        M += fs[i] / Ms[i];
+    }
+    M = 1.0 / M;
+
+    RDouble *xs = new RDouble[this->numberOfSpecies];
+    //! Compute mole fraction of each species.
+    for (int i = 0; i < this->numberOfSpecies; i ++)
+    {
+        xs[i] = fs[i] * M / Ms[i];
+    }
+
+    //! To compute the mass of Oxygen, Nitrogen and Carbon dioxide.
+    RDouble cO2 = 0.0, cN2 = 0.0, cCO2 = 0.0;
+    int coef = 0;
+    RDouble atomicNitrogenMass = 1.400674E-2, carbonDioxideMass = 4.401E-2; //! The molecular weight(kg/mol).
+    string *species_name = this->molecularProperty->GetNameOfSpecies();
+
+    RDouble moleFracationCO2 = 0.0;
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        //Compute the total mass of Nitrogen.
+        if (FindChemicalElement(species_name[i], 'N', coef))
+        {
+            cN2 += xs[i] * coef * atomicNitrogenMass;
+        }
+        //Compute the total mass of Carbon.
+        if (FindChemicalElement(species_name[i], 'C', coef))
+        {
+            moleFracationCO2 += xs[i] * coef; //Obtain the total mole fractions of CO2;
+        }
+    }
+    delete [] xs;
+
+    //Compute the mass fraction of Nitrogen.
+    cN2 = cN2 / M;
+    //Compute the mass fraction of Carbon dioxide.
+    cCO2 = moleFracationCO2 * carbonDioxideMass / M;
+    //Compute the mass fraction of Oxygen.
+    cO2 = MAX(1.0 - cN2 - cCO2, 0.0);
+
+    if (cCO2 > 1.0 && cN2 == 0 && cO2 == 0)
+    {
+        cCO2 = 1.0;
+    }
+
+    int nIndex = this->GetSpeciesIndex("O2");
+    if (nIndex >= 0)
+    {
+        fcw[nIndex] = cO2;
+    }
+    nIndex = this->GetSpeciesIndex("N2");
+    if (nIndex >= 0)
+    {
+        fcw[nIndex] = cN2;
+    }
+    nIndex = this->GetSpeciesIndex("CO2");
+    if (nIndex >= 0)
+    {
+        fcw[nIndex] = cCO2;
+    }
+}
+
+bool MixedGas::FindChemicalElement(string species_name, char element_name, int &coef)
+{
+    bool bflag = false;
+    coef = 0;
+    int i = static_cast<int> (species_name.find(element_name));
+    if (i >= 0)
+    {
+        coef = 1;
+        bflag = true;
+        int n = static_cast<int> (species_name.length());
+        if (i + 1 < n)
+        {
+            if (species_name[i + 1] >= '1' && species_name[i + 1] <= '9')
+            {
+                coef = atoi(species_name.substr(i + 1, 1).c_str());
+            }
+
+            if (element_name == 'N' && species_name[i + 1] == 'a')  //Na
+            {
+                coef = 0;
+                bflag = false;   //����ط�û����Na�ĵ�����
+            }
+
+            if (element_name == 'S' && species_name[i + 1] == 'i')  //Si
+            {
+                coef = 0;     //
+                bflag = false;   //����ط�û����Si������
+            }
+        }
+    }
+
+    return bflag;
+}
+
+int MixedGas::GetSpeciesIndex(string species_name)
+{
+    string *name_array = this->molecularProperty->GetNameOfSpecies();
+    for (int i = 0; i < this->numberOfSpecies; i ++)
+    {
+        if (name_array[i] == species_name)
+        {
+            return i;
+        }
+    }
+    return -1;
+}
+
+void MixedGas::ComputeTranslationAndRotationSpecificHeatAtConstantVolume(RDouble *speciesTransRotationCv)
+{
+    //! The dimensional value of translation-rotation specific heat at constant volume.
+    ComputeDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(speciesTransRotationCv);
+
+    //! Translate to the non-dimensional values.
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        speciesTransRotationCv[i] *= referenceSpecificHeat;
+    }
+}
+
+void MixedGas::ComputeDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(RDouble *speciesTransRotationCv)
+{
+    RDouble gasConstant = rjmk; //Unit: J/(kg*K)
+    RDouble *speciesMass = molecularProperty->GetMolecularWeightDimensional();
+    //! nTypes denotes the types of species which is used to identity the electron, monoatom and polyatom.
+    Thermo_Param *thermodynamicProperties = molecularProperty->GetThermodynamicProperties();
+    RDouble coef = 1.0;
+    for (int i = 0; i <= this->nLastSpeciesIndex; ++ i)
+    {
+        speciesTransRotationCv[i] = 1.5 * gasConstant / speciesMass[i];
+        coef = (RDouble)(thermodynamicProperties[i].nType - 1);
+        //! Polyatom species.
+        speciesTransRotationCv[i] += coef * gasConstant / speciesMass[i];
+    }
+    if (this->nElectronIndex >= 0)
+    {
+        speciesTransRotationCv[this->nElectronIndex] = 0.0;
+    }
+}
+
+void MixedGas::ComputeTranslationAndRotationEnergy(RDouble transRotationTemperature, RDouble *speciesTransRotationEnergy)
+{
+    //! Obtain the translation-rotation specific heat at constant volume.
+    ComputeTranslationAndRotationSpecificHeatAtConstantVolume(speciesTransRotationEnergy);
+
+    //! Obtain the thermodynamic properties of species.
+    Thermo_Param *thermodynamicProperties = this->molecularProperty->GetThermodynamicProperties();
+
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        speciesTransRotationEnergy[i]  = speciesTransRotationEnergy[i] * transRotationTemperature;
+        speciesTransRotationEnergy[i] += thermodynamicProperties[i].hs0 / referenceEnergy;
+    }
+}
+
+void MixedGas::ComputeVibrationSpecificHeatAtConstantVolume(RDouble vibrationTemperature, RDouble *speciesVibrationCv)
+{
+}
+
+void MixedGas::ComputeDimensionalVibrationSpecificHeatAtConstantVolume(RDouble vibrationTemperature, RDouble *speciesVibrationCv)
+{
+    RDouble gasConstant = rjmk; //Unit: J/(kg*K)
+    RDouble *speciesMass = this->molecularProperty->GetMolecularWeightDimensional();
+    //! nTypes denotes the types of species which is used to identity the electron, monoatom and polyatom.
+    Thermo_Param *thermodynamicProperties = this->molecularProperty->GetThermodynamicProperties();
+    //! The reference temperature and the dimensional vibration temperature.
+    RDouble referenceTemperature = this->referenceParameterDimensional.GetTemperature();
+    RDouble Tv = vibrationTemperature * referenceTemperature;
+
+    if (nTEnergyModel >= 1)
+    {
+        RDouble speciesCvtr[MAX_SPECIES_NUM], speciesCvv[MAX_SPECIES_NUM];
+        if (nTEnergyModel == 1)
+        {
+            this->ComputeSpecificHeatByFitMethod(vibrationTemperature, speciesCvv, true);
+        }
+        else
+        {
+            this->ComputeSpecificHeatByPolynomialFitMethod(vibrationTemperature, speciesCvv, true);
+        }
+        this->ComputeDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(speciesCvtr);
+        for (int i = 0; i < this->numberOfSpecies; ++ i)
+        {
+            if (thermodynamicProperties[i].nType < 2)
+            {
+                speciesVibrationCv[i] = 0.0;
+                continue;
+            }
+            //! Polyatom species.
+            speciesVibrationCv[i] = speciesCvv[i] - speciesCvtr[i];
+        }
+    }
+    else
+    {
+        RDouble theta = 0.0, expValue = 0.0, powValue = 0.0;
+        for (int i = 0; i < this->numberOfSpecies; ++ i)
+        {
+            if (thermodynamicProperties[i].nType < 2)
+            {
+                speciesVibrationCv[i] = 0.0;
+                continue;
+            }
+            //! Polyatom species.
+            speciesVibrationCv[i] = 0.0;
+            for (int m = 0; m < thermodynamicProperties[i].Tvs.nMode; ++ m)
+            {
+                theta = thermodynamicProperties[i].Tvs.Tv[m] / (Tv + SMALL);
+
+                expValue = MIN(exp(theta), LARGE);
+                powValue = theta / ((expValue - 1.0) + SMALL);
+                powValue = powValue * powValue;
+
+                speciesVibrationCv[i] += thermodynamicProperties[i].Tvs.g[m] * (gasConstant / speciesMass[i]) * expValue * powValue;
+            }
+        }
+    }
+}
+
+void MixedGas::ComputeDimensionalVibrationEnergy(RDouble vibrationTemperature, RDouble *speciesVibrationEnergy)
+{
+    RDouble gasConstant = rjmk;     //! Unit: J/(kg*K).
+    RDouble *speciesMass = this->molecularProperty->GetMolecularWeightDimensional();
+    //! nTypes denotes the types of species which is used to identity the electron, monoatom and polyatom.
+    Thermo_Param *thermodynamicProperties = this->molecularProperty->GetThermodynamicProperties();
+
+    //! Obtain the reference temperature and velocity.
+    RDouble referenceTemperature = this->referenceParameterDimensional.GetTemperature();
+    RDouble Tv = vibrationTemperature * referenceTemperature;
+
+    if (nTEnergyModel >= 1)
+    {
+        RDouble speciesCvtr[MAX_SPECIES_NUM], speciesEnthaly[MAX_SPECIES_NUM];
+        if (nTEnergyModel == 1)
+        {
+            this->ComputeEnthalpyByFitMethod(vibrationTemperature, speciesEnthaly, true);
+        }
+        else
+        {
+            this->ComputeEnthalpyByPolynomialFitMethod(vibrationTemperature, speciesEnthaly, true);
+        }
+        this->ComputeDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(speciesCvtr);
+        for (int i = 0; i < this->numberOfSpecies; ++ i)
+        {
+            if (thermodynamicProperties[i].nType < 2)
+            {
+                speciesVibrationEnergy[i] = 0.0;
+                continue;
+            }
+            //! Polyatom species.
+            speciesVibrationEnergy[i] = speciesEnthaly[i] - gasConstant * Tv / speciesMass[i];
+            speciesVibrationEnergy[i] -= speciesCvtr[i] * Tv + thermodynamicProperties[i].hs0;
+        }
+    }
+    else
+    {
+        RDouble theta = 0.0, expValue = 0.0, powValue = 0.0;
+        for (int i = 0; i < this->numberOfSpecies; ++ i)
+        {
+            if (thermodynamicProperties[i].nType < 2)
+            {
+                speciesVibrationEnergy[i] = 0.0;
+                continue;
+            }
+            //! Polyatom species.
+            speciesVibrationEnergy[i] = 0.0;
+            for (int m = 0; m < thermodynamicProperties[i].Tvs.nMode; ++ m)
+            {
+                theta = thermodynamicProperties[i].Tvs.Tv[m] / (Tv + SMALL);
+                expValue = MIN(exp(theta), LARGE);
+                powValue = thermodynamicProperties[i].Tvs.Tv[m] / ((expValue - 1.0) + SMALL);
+
+                speciesVibrationEnergy[i] += thermodynamicProperties[i].Tvs.g[m] * (gasConstant / speciesMass[i]) * powValue;
+            }
+        }
+    }
+}
+
+void MixedGas::ComputeVibrationEnergy(RDouble vibrationTemperature, RDouble *speciesVibrationEnergy)
+{
+    //! Obtain the dimensional value of vibration energy.
+    ComputeDimensionalVibrationEnergy(vibrationTemperature, speciesVibrationEnergy);
+
+    //! Translate to non-dimensional value.
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        speciesVibrationEnergy[i] /= referenceEnergy;
+    }
+}
+
+void MixedGas::ComputeElectronSpecificHeatAtConstantVolume(RDouble electronTemperature, RDouble *speciesElectronCv)
+{
+}
+
+void MixedGas::ComputeDimensionalElectronSpecificHeatAtConstantVolume(RDouble electronTemperature, RDouble *speciesElectronCv)
+{
+    RDouble gasConstant = rjmk;      //! Unit: J/(kg*K).
+    RDouble *speciesMass = molecularProperty->GetMolecularWeightDimensional();
+    //! nTypes denotes the types of species which is used to identity the electron, monoatom and polyatom.
+    Thermo_Param *thermodynamicProperties = this->molecularProperty->GetThermodynamicProperties();
+
+    //! Obtain the reference temperature and compute the dimensional value of electron temperature.
+    RDouble referenceTemperature = this->referenceParameterDimensional.GetTemperature();
+    RDouble Te = electronTemperature * referenceTemperature;
+
+    if (nTEnergyModel >= 1)
+    {
+        RDouble speciesCvtr[MAX_SPECIES_NUM], speciesCvv[MAX_SPECIES_NUM];
+        if (nTEnergyModel == 1)
+        {
+            this->ComputeSpecificHeatByFitMethod(electronTemperature, speciesCvv, false);
+        }
+        else
+        {
+            this->ComputeSpecificHeatByPolynomialFitMethod(electronTemperature, speciesCvv, false);
+        }
+        this->ComputeDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(speciesCvtr);
+        for (int i = 0; i < this->numberOfSpecies; ++ i)
+        {
+            if (thermodynamicProperties[i].nType >= 2)
+            {
+                speciesElectronCv[i] = 0.0;
+                continue;
+            }
+            speciesElectronCv[i] = speciesCvv[i] - speciesCvtr[i];
+        }
+    }
+    else
+    {
+        RDouble theta = 0.0, expValue = 0.0, gs0 = 0.0, gs1 = 0.0, powValue = 0.0;
+        for (int i = 0; i < this->numberOfSpecies; ++ i)
+        {
+            if (thermodynamicProperties[i].nType == 0) //electron
+            {
+                speciesElectronCv[i] = 1.5 * gasConstant / speciesMass[i];
+                continue;
+            }
+
+            //! The degeneracy of species.
+            gs0 = thermodynamicProperties[i].gs0;
+            gs1 = thermodynamicProperties[i].gs1;
+
+            //! The monoaton species and polyatom species.
+            theta = thermodynamicProperties[i].Tes / (Te + SMALL);
+            expValue = MIN(exp(theta), LARGE);
+            powValue = theta / (gs0 * expValue + gs1);
+            powValue = powValue * powValue;
+
+            speciesElectronCv[i] = (gasConstant / speciesMass[i]) * (gs0 * gs1) * expValue * powValue;
+        }
+    }
+}
+
+void MixedGas::ComputeDimensionalElectronEnergy(RDouble electronTemperature, RDouble *speciesElectronEnergy)
+{
+    RDouble gasConstant = rjmk;     //! Unit: J/(kg*K).
+    RDouble *speciesMass = molecularProperty->GetMolecularWeightDimensional();
+    //! nTypes denotes the types of species which is used to identity the electron, monoatom and polyatom.
+    Thermo_Param *thermodynamicProperties = this->molecularProperty->GetThermodynamicProperties();
+
+    //! Obtain the reference temperature and compute the dimensional value of electron temperature.
+    RDouble referenceTemperature = this->referenceParameterDimensional.GetTemperature();
+    RDouble Te = electronTemperature * referenceTemperature;
+
+    if (nTEnergyModel >= 1)
+    {
+        RDouble speciesCvtr[MAX_SPECIES_NUM], speciesEnthaly[MAX_SPECIES_NUM];
+        if (nTEnergyModel == 1)
+        {
+            this->ComputeEnthalpyByFitMethod(electronTemperature, speciesEnthaly, false);
+        }
+        else
+        {
+            this->ComputeEnthalpyByPolynomialFitMethod(electronTemperature, speciesEnthaly, false);
+        }
+        this->ComputeDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(speciesCvtr);
+        for (int i = 0; i < this->numberOfSpecies; ++ i)
+        {
+            if (thermodynamicProperties[i].nType >= 2)
+            {
+                speciesElectronEnergy[i] = 0.0;
+                continue;
+            }
+            speciesElectronEnergy[i] = speciesEnthaly[i] - gasConstant * Te / speciesMass[i];
+            speciesElectronEnergy[i] -= speciesCvtr[i] * Te + thermodynamicProperties[i].hs0;
+        }
+    }
+    else
+    {
+        RDouble theta = 0.0, expValue = 0.0, gs0 = 0.0, gs1 = 0.0;
+        for (int i = 0; i < this->numberOfSpecies; ++ i)
+        {
+            if (thermodynamicProperties[i].nType == 0) //electron
+            {
+                speciesElectronEnergy[i] = 1.5 * gasConstant * Te / speciesMass[i];
+                continue;
+            }
+
+            //! The monoaton species and polyatom species.
+            theta = thermodynamicProperties[i].Tes / (Te + SMALL);
+            //! The degeneracy of species.
+            gs0 = thermodynamicProperties[i].gs0;
+            gs1 = thermodynamicProperties[i].gs1;
+            expValue = MIN(exp(theta), LARGE);
+
+            speciesElectronEnergy[i] = (gasConstant / speciesMass[i]) * thermodynamicProperties[i].Tes * (gs1 / (gs0 * expValue + gs1));
+        }
+    }
+}
+
+void MixedGas::ComputeElectronEnergy(RDouble electronTemperature, RDouble *speciesElectronEnergy)
+{
+    //! Obtain the dimensional value of electron energy.
+    ComputeDimensionalElectronEnergy(electronTemperature, speciesElectronEnergy);
+
+    //! Translate to non-dimensional value.
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        speciesElectronEnergy[i] /= referenceEnergy;
+    }
+}
+
+void MixedGas::ComputeSpeciesEnthalpy(RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature, RDouble *speciesEnthalpy)
+{
+    //! Compute energies.
+    ComputeTranslationAndRotationEnergy(transRotationTemperature, this->speciesEnergyTr);
+    ComputeVibrationEnergy(vibrationTemperature, this->speciesEnergyVb);
+    ComputeElectronEnergy(electronTemperature, this->speciesEnergyEe);
+
+    RDouble gasConstant = GetUniversalGasConstant();
+    RDouble *speciesMass = molecularProperty->GetMolecularWeight();
+    if (this->nElectronIndex >= 0)
+    {
+        //! Electron.
+        speciesEnthalpy[nElectronIndex] = 2.5 * gasConstant * electronTemperature / speciesMass[nElectronIndex];
+    }
+    for (int i = 0; i <= nLastSpeciesIndex; ++ i)
+    {
+        //! The monoaton species and polyatom species.
+        speciesEnthalpy[i] = speciesEnergyTr[i] + speciesEnergyVb[i] + speciesEnergyEe[i];
+        speciesEnthalpy[i] += gasConstant * transRotationTemperature / speciesMass[i];
+    }
+}
+
+RDouble MixedGas::GetMixedGasTranslationAndRotationSpecificHeatAtConstantVolume(RDouble *massFraction)
+{
+    //! Get dimensional value of translation-rotation specific heat at constant volume.
+    RDouble transRotationCv = GetMixedGasDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(massFraction);
+
+    //! Translate to the non-dimensional values.
+    return (transRotationCv * referenceSpecificHeat);
+}
+
+RDouble MixedGas::GetMixedGasDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(RDouble *massFraction)
+{
+    ComputeDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(speciesCv);
+
+    RDouble transRotationCv = 0.0;     //! The translation-rotation specific heat at constant volume.
+    ComputeMixtureByMassFraction(massFraction, speciesCv, transRotationCv);
+
+    return transRotationCv;
+}
+
+RDouble MixedGas::GetMixedGasVibrationSpecificHeatAtConstantVolume(RDouble vibrationTemperature, RDouble *massFraction)
+{
+    //! Get dimensional value of vibration specific heat at constant volume.
+    RDouble vibrationCv = GetMixedGasDimensionalVibrationSpecificHeatAtConstantVolume(vibrationTemperature, massFraction);
+
+    // Translate to the non-dimensional values.
+    return (vibrationCv * referenceSpecificHeat);
+}
+
+RDouble MixedGas::GetMixedGasDimensionalVibrationSpecificHeatAtConstantVolume(RDouble vibrationTemperature, RDouble *massFraction)
+{
+    ComputeDimensionalVibrationSpecificHeatAtConstantVolume(vibrationTemperature, speciesCv);
+
+    //! The vibration specific heat at constant volume.
+    RDouble vibrationCv = 0.0;
+    ComputeMixtureByMassFraction(massFraction, speciesCv, vibrationCv);
+
+    return vibrationCv;
+}
+
+RDouble MixedGas::GetMixedGasElectronSpecificHeatAtConstantVolume(RDouble electronTemperature, RDouble *massFraction)
+{
+    //! Get dimensional value of electron specific heat at constant volume.
+    RDouble electronCv = GetMixedGasDimensionalElectronSpecificHeatAtConstantVolume(electronTemperature, massFraction);
+
+    //! Translate to the non-dimensional values.
+    return (electronCv * referenceSpecificHeat);
+}
+
+RDouble MixedGas::GetMixedGasDimensionalElectronSpecificHeatAtConstantVolume(RDouble electronTemperature, RDouble *massFraction)
+{
+    this->ComputeDimensionalElectronSpecificHeatAtConstantVolume(electronTemperature, speciesCv);
+
+    RDouble electronCv = 0.0;     //! The electron specific heat at constant volume.
+    ComputeMixtureByMassFraction(massFraction, speciesCv, electronCv);
+
+    return electronCv;
+}
+
+RDouble MixedGas::GetMixedGasTranslationAndRotationEnergy(RDouble transRotationTemperature, RDouble *massFraction)
+{
+    //! To obtain the translation-rotation energy.
+    ComputeTranslationAndRotationEnergy(transRotationTemperature, speciesEnergyTr);
+
+    RDouble transRotationEnergy = 0.0;
+    ComputeMixtureByMassFraction(massFraction, speciesEnergyTr, transRotationEnergy);
+
+    return transRotationEnergy;
+}
+
+RDouble MixedGas::GetMixedGasDimensionalVibrationEnergy(RDouble vibrationTemperature, RDouble *massFraction)
+{
+    //! To obtain the vibration energy.
+    this->ComputeDimensionalVibrationEnergy(vibrationTemperature, speciesEnergyVb);
+
+    RDouble vibrationEnergy = 0.0;
+    ComputeMixtureByMassFraction(massFraction, speciesEnergyVb, vibrationEnergy);
+
+    return vibrationEnergy;
+}
+
+RDouble MixedGas::GetMixedGasVibrationEnergy(RDouble vibrationTemperature, RDouble *massFraction)
+{
+    RDouble vibrationEnergy = GetMixedGasDimensionalVibrationEnergy(vibrationTemperature, massFraction);
+    //! Translate to non-dimensional value.
+    vibrationEnergy = vibrationEnergy / referenceEnergy;
+
+    return vibrationEnergy;
+}
+
+RDouble MixedGas::GetMixedGasDimensionalElectronEnergy(RDouble electronTemperature, RDouble *massFraction)
+{
+    //! To obtain the electron energy.
+    this->ComputeDimensionalElectronEnergy(electronTemperature, speciesEnergyEe);
+
+    RDouble electronEnergy = 0.0;
+    ComputeMixtureByMassFraction(massFraction, speciesEnergyEe, electronEnergy);
+
+    return electronEnergy;
+}
+
+RDouble MixedGas::GetMixedGasElectronEnergy(RDouble electronTemperature, RDouble *massFraction)
+{
+    RDouble electronEnergy = GetMixedGasDimensionalElectronEnergy(electronTemperature, massFraction);
+    //! Translate to non-dimensional value.
+    electronEnergy = electronEnergy / referenceEnergy;
+
+    return electronEnergy;
+}
+
+RDouble MixedGas::ComputeMixedGasEnthalpy(RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature, RDouble *massFraction)
+{
+    //! To obtain the enthalpies of species.
+    ComputeSpeciesEnthalpy(transRotationTemperature, vibrationTemperature, electronTemperature, speciesEnthalpy);
+
+    RDouble enthalpy = 0.0;
+    ComputeMixtureByMassFraction(massFraction, speciesEnthalpy, enthalpy);
+
+    return enthalpy;
+}
+
+RDouble MixedGas::ComputeMixedGasEnthalpy(RDouble *primitiveVars, RDouble *temperatures)
+{
+    using namespace IDX;
+    for (int s = 0; s < numberOfSpecies; ++ s)
+    {
+        massFractions[s] = primitiveVars[this->nm + s];
+    }
+    RDouble staticEnthalpy = 0.0;
+    if (this->ntmodel == 1)
+    {
+        staticEnthalpy = this->GetMixtureGasEnthalpy(massFractions, temperatures[ITT]);
+     }
+    else
+    {
+    }
+    return staticEnthalpy;
+}
+
+RDouble MixedGas::GetTotalFormationEnthalpy(RDouble *massFraction)
+{
+    return 0.0;
+}
+
+RDouble MixedGas::ComputeTranslationAndRotationTemperatureByPrimitiveVariables(RDouble *primitiveVariables, RDouble electronPressure/* = 0.0*/)
+{
+    return 0.0;
+}
+
+RDouble MixedGas::ComputeTranslationAndRotationTemperature(RDouble *massFraction, RDouble transRotationEnergy)
+{
+    return 0.0;
+}
+
+RDouble MixedGas::ComputeVibrationTemperature(RDouble *massFraction, RDouble vibrationEnergy, RDouble initTemperature/* = 0.0*/)
+{
+    return 0.0;
+}
+
+RDouble MixedGas::ComputeElectronTemperature(RDouble *massFraction, RDouble electronEnergy, RDouble initTemperature)
+{
+    return 0.0;
+}
+
+RDouble MixedGas::ComputeVibrationAndElectronTemperature(RDouble *massFraction, RDouble vibrationElectronEnergy, RDouble initTemperature)
+{
+    return 0.0;
+}
+
+RDouble MixedGas::ComputeOneTemperatureModelTemperature(RDouble *massFraction, RDouble internalEnergy)
+{
+    return 0.0;
+}
+
+RDouble MixedGas::ComputeNonequilibrumTemperatureViaBisectionMethod(RDouble *massFraction, RDouble internalEnergy)
+{
+    return 0.0;
+}
+
+RDouble MixedGas::ComputeNonequilibrumTemperature(RDouble *massFraction, RDouble internalEnergy, RDouble initTemperature)
+{
+    RDouble referenceTemperature = this->referenceParameterDimensional.GetTemperature();
+    RDouble e1 = 0.0, e2 = 0.0, T1 = 100.0 / referenceTemperature, T2 = 30000.0 / referenceTemperature;
+    RDouble ft1, ft2, Tk = 0.0, Tk1 = 0.0, precision = 1.0e-12;
+    RDouble gasConstant = this->GetUniversalGasConstant();
+    RDouble mass = this->GetMixedGasMolecularWeight(massFraction);
+    RDouble gasR = gasConstant / mass;
+
+    //! To determine the region where the root exists.
+    int nCount = 0, nMaxStep = 500;
+    if (initTemperature <= 0.0)
+    {
+        e1 = GetMixtureGasEnthalpy(massFraction, T1) - gasR * T1;
+        e2 = GetMixtureGasEnthalpy(massFraction, T2) - gasR * T2;
+        if (internalEnergy <= e1)
+        {
+            return T1;
+        }
+        else if (internalEnergy >= e2)
+        {
+            return T2;
+        }
+
+        //! To determine the region where the root exists.
+        ft1 = e1 - internalEnergy;
+        RDouble deltaT = 3000.0 / referenceTemperature;
+        while (nCount <= 10)
+        {
+            nCount ++;
+            T2 = nCount * deltaT;
+            ft2 = GetMixtureGasEnthalpy(massFraction, T2) - gasR * T2 - internalEnergy;
+            if (fabs(ft2) <= precision)
+            {
+                return T2;
+            }
+            else if (ft1 * ft2 <= 0.0)
+            {
+                break;     //! Find the region where the root exists.
+            }
+            T1 = T2;
+            ft1 = ft2;
+        }
+        if (nCount > 10)     //! Failed to find the region, set the minimum temperature.
+        {
+            return T2;
+        }
+        Tk = (T1 + T2) / 2.0;
+    }
+    else
+    {
+        nMaxStep = 5;
+        Tk = initTemperature;
+    }
+
+    //! To compute the vibration-electron temperature using the Newton iteration method.
+    nCount = 0;
+    RDouble gasMixtureCv = 0.0, deltaEnergy = 0.0;
+    while (nCount < nMaxStep)
+    {
+        nCount++;
+        ComputeConstantVolumeSpecificHeatByMassFraction(massFraction, Tk, gasMixtureCv);
+        deltaEnergy = GetMixtureGasEnthalpy(massFraction, Tk) - gasR * Tk - internalEnergy;
+        Tk1 = Tk - deltaEnergy / gasMixtureCv;
+        if (fabs(Tk1 - Tk) <= precision)
+        {
+            break;
+        }
+        Tk = Tk1;
+    }
+    //printf("Number of iteration is %d\n", nCount);
+    return Tk1;
+}
+
+RDouble MixedGas::GetElectronPressure(RDouble *primitiveVariables, RDouble electronTemperature)
+{
+    RDouble density = primitiveVariables[IDX::IR];
+    RDouble gasConstant = this->GetUniversalGasConstant();
+    //RDouble referenceMass = referenceParameterDimensional.GetAverageMolecularWeight();
+    //! To obtain the molecular weight of species.
+
+    //! Search the index of the electron.
+    RDouble electronMassFraction = 0.0;
+    //RDouble electronMass = 5.486e-7 / referenceMass;
+    if (nElectronIndex >= 0)
+    {
+        electronMassFraction = primitiveVariables[nm + nElectronIndex];
+    }
+
+    //! Compute electron pressure.
+    RDouble electronPressure = (density * gasConstant * electronTemperature) * electronMassFraction / electronMass;
+    return electronPressure;
+}
+
+void MixedGas::ComputeSpeciesTranslationAndRotationHeatConductivity(RDouble *viscosity, RDouble *conductivity)
+{
+
+}
+
+void MixedGas::ComputeSpeciesVibrationHeatConductivity(RDouble *viscosity, RDouble *speciesVibrationCv, RDouble *conductivity)
+{
+
+}
+
+void MixedGas::ComputeSpeciesElectronHeatConductivity(RDouble *viscosity, RDouble *speciesElectronCv, RDouble *conductivity)
+{
+
+}
+
+RDouble MixedGas::GetMixedGasTranslationAndRotationHeatConductivity(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble electronTemperature)
+{
+    return 0.0;
+}
+
+RDouble MixedGas::GetMixedGasVibrationHeatConductivity(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature)
+{
+    return 0.0;
+}
+
+RDouble MixedGas::GetMixedGasElectronHeatConductivity(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble electronTemperature)
+{
+    return 0.0;
+}
+
+void MixedGas::ComputeMixedGasTranslationVibrationElectronHeatConductivity(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature, RDouble &transRotationConductivity, RDouble &vibrationConductivity, RDouble &electronConductivity)
+{
+
+}
+
+RDouble MixedGas::GetMixedGasHeatConductivityWithWilkeFormula(RDouble *moleFraction, RDouble *conductivity, RDouble *phi)
+{
+    RDouble lambda = 0.0;
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        lambda += moleFraction[i] * conductivity[i] / phi[i];
+    }
+    return lambda;
+}
+
+void MixedGas::ComputeSpeciesViscosityWithCurveFitMethod(RDouble transRotationTemperature, RDouble electronTemperature, RDouble *speciesViscosity)
+{
+    //! Obtain the reference viscosity.
+    RDouble referenceViscosity = this->referenceParameterDimensional.GetViscosity();
+
+    //! Obtain the dimensional value of viscosity.
+    ComputeSpeciesDimensionalViscosityWithCurveFitMethod(transRotationTemperature, electronTemperature, speciesViscosity);
+
+    //! Translate to the non-dimensional value.
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        speciesViscosity[i] /= referenceViscosity;
+    }
+}
+
+void MixedGas::ComputeSpeciesDimensionalViscosityWithCurveFitMethod(RDouble transRotationTemperature, RDouble electronTemperature, RDouble *speciesViscosity)
+{
+    RDouble referenceTemperature = this->referenceParameterDimensional.GetTemperature();
+    RDouble dimensionalTransRotationTemperature, dimensionalElectronTemperature;
+    dimensionalTransRotationTemperature = transRotationTemperature * referenceTemperature;
+    dimensionalElectronTemperature = electronTemperature * referenceTemperature;
+    //! nTypes denotes the types of species which is used to identity the electron, monoatom and polyatom.
+
+    //! Obtain the coefficients of the curve fitting.
+    RDouble *coefA = CurveFits->GetBlotterCurveFittingCoefficientA();
+    RDouble *coefB = CurveFits->GetBlotterCurveFittingCoefficientB();
+    RDouble *coefC = CurveFits->GetBlotterCurveFittingCoefficientC();
+    RDouble *coefD = CurveFits->GetBlotterCurveFittingCoefficientD();
+    RDouble *coefE = CurveFits->GetBlotterCurveFittingCoefficientE();
+
+    RDouble lnt1, lnt2, lnt3, lnt4, tmp;
+    lnt1 = log(dimensionalTransRotationTemperature);     //! Polyatom and monoatom.
+    lnt2 = lnt1 * lnt1;
+    lnt3 = lnt1 * lnt2;
+    lnt4 = lnt1 * lnt3;
+    for (int i = 0; i <= nLastSpeciesIndex; ++ i)
+    {
+        //! To compute viscosity using the curve fitting method.
+        tmp = coefA[i] * lnt4 + coefB[i] * lnt3 + coefC[i] * lnt2 + coefD[i] * lnt1 + coefE[i];
+
+        //! Compute the dimensional value of viscosity.
+        speciesViscosity[i] = 0.1 * exp(tmp);
+    }
+    if (nElectronIndex >= 0)// electron.
+    {
+        lnt1 = log(dimensionalElectronTemperature);
+        lnt2 = lnt1 * lnt1;
+        lnt3 = lnt1 * lnt2;
+        lnt4 = lnt1 * lnt3;
+        tmp = coefA[nElectronIndex] * lnt4 + coefB[nElectronIndex] * lnt3 + coefC[nElectronIndex] * lnt2 + coefD[nElectronIndex] * lnt1 + coefE[nElectronIndex];
+        speciesViscosity[nElectronIndex] = 0.1 * exp(tmp);
+    }
+}
+
+void MixedGas::ComputeSpeciesViscosityWithLennardJonesMethod(RDouble transRotationTemperature, RDouble electronPressure, RDouble *speciesViscosity)
+{
+    //! Obtain the reference viscosity.
+    RDouble referenceViscosity = this->referenceParameterDimensional.GetViscosity();
+
+    //! Obtain the dimensional value of viscosity.
+    ComputeSpeciesDimensionalViscosityWithLennardJonesMethod(transRotationTemperature, electronPressure, speciesViscosity);
+
+    //! Translate to the non-dimensional value.
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        speciesViscosity[i] /= referenceViscosity;
+    }
+}
+
+void MixedGas::ComputeSpeciesDimensionalViscosityWithLennardJonesMethod(RDouble transRotationTemperature, RDouble electronPressure, RDouble *speciesViscosity)
+{
+    //! Obtain the reference temperature.
+    RDouble referenceTemperature = this->referenceParameterDimensional.GetTemperature();
+    RDouble dimensionalTransRotationTemperature = transRotationTemperature * referenceTemperature;
+
+    //! The average area of collision between species.
+    RDouble *collisionArea = new RDouble[this->numberOfSpecies];
+    ComputeAverageCollisionAreaOmega22(transRotationTemperature, electronPressure, collisionArea);
+
+    //! Obtain the molecular weights of species.
+    RDouble *speciesMass = this->molecularProperty->GetMolecularWeight();
+    //! Translate to the dimensional value.
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        speciesViscosity[i] = 8.4411e-8 * PI * sqrt(speciesMass[i] * dimensionalTransRotationTemperature) / collisionArea[i];
+    }
+    delete [] collisionArea;
+}
+
+void MixedGas::ComputeAverageCollisionAreaOmega22(RDouble transRotationTemperature, RDouble electronPressure, RDouble *piOmega)
+{
+    //! Obtain the reference temperature and reference pressure.
+    RDouble referenceTemperature = this->referenceParameterDimensional.GetTemperature();
+    RDouble referencePressure = this->referenceParameterDimensional.GetPressure();
+    RDouble dimensionalTransRotationTemperature, temperature, lnt, tmp;
+    dimensionalTransRotationTemperature = transRotationTemperature * referenceTemperature;
+    temperature = dimensionalTransRotationTemperature / 1000.0;
+    lnt = log(dimensionalTransRotationTemperature);
+
+    RDouble p0, pe, pem, pressure, lnpe;
+    pe  = electronPressure * referencePressure;
+    p0  = 101325.0; //Pa
+    pem = p0 * 0.0975 * pow(temperature, 4);
+    pressure = p0 / pe;
+
+    int *ionType = this->molecularProperty->GetIonTypeOfSpecies();
+    RDouble *coefAss, *coefBss, *coefCss, *coefDss;
+    coefAss = this->CurveFits->GetOmegaCurveFittingCoefficientA();
+    coefBss = this->CurveFits->GetOmegaCurveFittingCoefficientB();
+    coefCss = this->CurveFits->GetOmegaCurveFittingCoefficientC();
+    coefDss = this->CurveFits->GetOmegaCurveFittingCoefficientD();
+
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        if (ionType[i] == 0)     //! The atom or molecular.
+        {
+            lnpe = 1.0;
+        }
+        else
+        {
+            if (fabs(pe - pem) <= 1.0e-8)
+            {
+                lnpe = 1.0;
+            }
+            else     //! Modify the coefficient.
+            {
+                lnpe = 0.5 * log(2.09e-2 * pow(temperature, 4) * pressure + 1.52 * pow(temperature, 8.0 / 3.0) * pow(pressure, 2.0 / 3.0));
+            }
+        }
+        tmp = coefAss[i] * pow(lnt, 3) + coefBss[i] * pow(lnt, 2) + coefCss[i] * lnt + coefDss[i];
+        piOmega[i] = 1.0e-20 * lnpe * exp(tmp);
+    }
+}
+
+RDouble MixedGas::GetMixedGasViscosityWithWilkeFormula(RDouble *moleFraction, RDouble *viscosity, RDouble *phi)
+{
+    RDouble mixedViscosity = 0.0;
+    for (int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        mixedViscosity += moleFraction[i] * viscosity[i] / phi[i];
+    }
+    return mixedViscosity;
+}
+
+void MixedGas::ComputeSpeciesMassDiffusionCoefficient(RDouble *massFraction, RDouble viscosityLaminar, RDouble viscosityTurbulence, RDouble *speciesDiffusionCoef)
+{
+    //! The function returns the diffusion coefficients of each species which saved in rDs = (1 - Cs)/(1- Xs) * (mul/Scl + mut/Sct).
+    //! nTypes denotes the types of species which is used to identity the electron, monoatom and polyatom.
+    Thermo_Param *thermodynamicProperties = this->molecularProperty->GetThermodynamicProperties();
+    int *ionType = this->molecularProperty->GetIonTypeOfSpecies();
+
+    //! To compute the mole fractions of species.
+    RDouble *speciesMass = this->molecularProperty->GetMolecularWeight();
+    this->ComputeMoleFractionByMassFraction(massFraction, moleFractions);
+
+    //! Obtain the Schmidt number.
+    RDouble *oSchmidtLaminar = GetLaminarSchmidtNumberReciprocal();
+    RDouble *oSchmidtTurbulence = GetTurbulentSchmidtNumberReciprocal();
+
+    RDouble tmp1 = 0.0, tmp2 = 0.0;
+    int nIndex = -1;
+    for(int i = 0; i < this->numberOfSpecies; ++ i)
+    {
+        if (thermodynamicProperties[i].nType == 0)
+        {
+            nIndex = i;      //! To save the index of the electron.
+            continue;      //! Ignore the electron.
+        }
+
+        if (1.0 - moleFractions[i] <= 1.0e-20)
+        {
+            speciesDiffusionCoef[i] = 0.0;
+        }
+        else
+        {
+            speciesDiffusionCoef[i] = (1.0 - massFraction[i]) / (1.0 - moleFractions[i]) * (viscosityLaminar * oSchmidtLaminar[i] + viscosityTurbulence * oSchmidtTurbulence[i]);
+        }
+
+        if (ionType[i] == 0)
+        {
+            continue;     //! Ignore the atom and molecular species.
+        }
+        else
+        {
+            tmp1 += speciesDiffusionCoef[i] * massFraction[i] / speciesMass[i];
+            tmp2 += massFraction[i] / speciesMass[i];
+        }
+    }
+
+    //! Compute the mass diffusion coefficient of electron.
+    if (nIndex >= 0)
+    {
+        speciesDiffusionCoef[nIndex] = tmp1 / MAX(tmp2, 1.0e-20);
+    }
+}
+
+RDouble MixedGas::GetMassDiffusionCoefficientWithCLNModel(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble electronTemperature)
+{
+    return 0.0;
+}
+
+void MixedGas::GetElectronPressurePartialDerivatives(RDouble *primitiveVars, RDouble electronTemperature, RDouble &gama, RDouble *speciesGama)
+{
+
+}
+
+void MixedGas::GetPressurePartialDerivatives(RDouble *primitiveVars, RDouble transRotationTemperature, RDouble electronTemperature,
+                                             RDouble &alpha, RDouble &beta, RDouble *speciesBeta)
+{
+}
+
+void MixedGas::GetMultiTemperatureModelPartialDerivatives(RDouble *primitiveVars, RDouble transRotationTemperature, RDouble electronTemperature,
+                                                          RDouble &alpha, RDouble &beta, RDouble &gama, RDouble *speciesBeta, RDouble *speciesGama)
+{
+}
+
+void MixedGas::GetMultiTemperatureModelPartialDerivativesR(RDouble *primitiveVars, RDouble transRotationTemperature, RDouble electronTemperature,
+                                                           RDouble &alpha, RDouble &beta, RDouble &gama, RDouble *speciesBeta, RDouble *speciesGama,
+                                                           RDouble squareVelocity, RDouble *speciesEtrs, RDouble totalCvtr, RDouble totalCvv, RDouble totalCve)
+{
+
+}
+
+RDouble MixedGas::ComputePressureDerivativeToTotalDensity(RDouble *primitiveVars)
+{
+    return 0.0;
+}
+
+RDouble MixedGas::GetMixedGasEnthalpy(RDouble *primitiveVars, RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature)
+{
+    int nChemical = GetChemicalType();
+    RDouble staticEnthaly = 0.0;
+    if (nChemical == 0)
+    {
+        staticEnthaly = 3.5 * primitiveVars[IDX::IP] / primitiveVars[IDX::IR];
+    }
+    else
+    {
+        RDouble temperatures[3] = {transRotationTemperature, vibrationTemperature, electronTemperature};
+        staticEnthaly = ComputeMixedGasEnthalpy(primitiveVars, temperatures);
+    }
+
+    //delete []massFraction;
+    return staticEnthaly;
+}
+
+RDouble MixedGas::ComputeMolecularWeightReciprocal(RDouble *prim)
+{
+    RDouble omav = 1.0;
+    ComputeMolecularWeightReciprocal(prim, omav);
+    return omav;
+}
+
+RDouble MixedGas::ComputeMolecularWeight(RDouble *prim)
+{
+    return 0.0;
+}
+
+void MixedGas::ComputeMixtureGasHeatConductivity(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature,
+                                                 RDouble &transRotationConductivity, RDouble &vibrationConductivity, RDouble &electronConductivity)
+{
+    //int nTemperatureModel = GetTemperatureModel();
+    if (ntmodel > 1)
+    {
+    }
+    else     //! One-temperature model.
+    {
+        //! Compute heat conductivity of mixture gas.
+        transRotationConductivity = ComputeMixtureGasHeatConductivityByWassilewaFormula(primitiveVariables, transRotationTemperature);
+        vibrationConductivity = 0.0;
+        electronConductivity = 0.0;
+    }
+}
+
+void MixedGas::ComputeMixtureGasSpecificHeatAtConstantVolume(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature,
+                                                             RDouble &cvtr, RDouble &cvv, RDouble &cve)
+{
+
+}
+
+void MixedGas::ComputeEnergySourceDerivatives(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms,
+                                              RDouble ***chemicalSourceDerivatives, RDouble ***energySourceDerivatives, int nCellNumber)
+{
+}
+
+void MixedGas::ComputeEnergySourceDiagonalDerivatives(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms,
+                                                      RDouble ***chemicalSourceDerivatives, RDouble **energySourceDerivatives, int nCellNumber)
+{
+}
+
+RDouble MixedGas::GetMaximumSpeciesMassDiffusionCoef(RDouble *primitiveVars, RDouble viscosityLaminar, RDouble viscosityTurbulence)
+{
+    return 0.0;     //! Returned value.
+}
+
+void MixedGas::GetSpeciesMassDiffusionCoef(RDouble *primitiveVars, RDouble viscosityLaminar, RDouble viscosityTurbulence, RDouble *speciesDiffusionCoef)
+{
+    //! The function returns the diffusion coefficients of each species which saved in rDs = (1 - Cs)/(1- Xs) * (mul/Scl + mut/Sct).
+    for (int i = 0; i < numberOfSpecies; ++ i)
+    {
+        massFractions[i] = primitiveVars[nm + i];
+    }
+
+    ComputeSpeciesMassDiffusionCoefficient(massFractions, viscosityLaminar, viscosityTurbulence, speciesDiffusionCoef);
+}
+
+void MixedGas::GetTemperatureAndCP(RDouble *prim, RDouble &Tm, RDouble &cp)
+{
+    int nchem = GetChemicalType();
+    int nm = GetNSEquationNumber();
+
+    //! Specific heat ratio
+    RDouble gama = 1.4;
+    RDouble &ro = prim[0];
+    RDouble &pm = prim[4];
+    //! The non-dimensional universal gas constant.
+    RDouble R = GetCoefficientOfStateEquation();
+    //! The constant pressure specific heat of perfect gas.
+    cp = gama / (gama - 1.0) * R;
+    //! Compute the temperature using the state equation of perfect gas.
+    Tm = pm / (ro * R);
+
+    //! Mixture gas condition.
+    if (nchem == 1)
+    {
+        //! Save the number of species
+        int ns = GetNumberOfSpecies();
+        RDouble *fs = new RDouble[ns];
+        for (int i = 0; i < ns; i ++)
+        {
+            fs[i] = prim[i + nm];     //! Obtain the mass fraction of each species.
+        }
+
+        //! Obtain the average molecular weight of mixture gas.
+        RDouble M = GetMixedGasMolecularWeight(fs);
+        R = GetUniversalGasConstant();     //! The non-dimensional universal gas constant.
+        //! Compute the temperature using the state equation of mixture gas.
+        Tm = pm * M / (ro * R);
+        
+        //! Compute constant pressure specific heat of each species.
+        ComputeConstantPressureSpecificHeatByMassFraction(fs, Tm, cp);
+
+        //! Remove the memory space.
+        delete [] fs;
+    }
+}
+
+RDouble MixedGas::GetTemperature(RDouble *prim)
+{
+    int nchem = GetChemicalType();
+    int nm = GetNSEquationNumber();
+    //! Obtain the density and pressure.
+    RDouble &ro = prim[0];
+    RDouble &pm = prim[4];
+    RDouble R = GetCoefficientOfStateEquation();
+    //! Compute the temperature using the state equation of mixture gas.
+    RDouble Tm = pm / (ro * R);
+
+    if (nchem == 1)
+    {
+        //! Save the number of species.
+        int ns = GetNumberOfSpecies();
+        RDouble *fs = new RDouble[ns];
+        //! Obtain the mass fraction of each species.
+        for (int i = 0; i < ns; i ++)
+        {
+            fs[i] = prim[i + nm];
+        }
+
+        //! Obtain the average molecular weight of mixture gas.
+        RDouble M = GetMixedGasMolecularWeight(fs);
+        R = GetUniversalGasConstant();     //! The non-dimensional universal gas constant.
+        //! Compute the temperature using the state equation of mixture gas.
+        Tm = pm * M / (ro * R);
+        //! Remove the memory space.
+        delete [] fs;
+    }
+    return Tm;
+}
+
+void MixedGas::GetEverySpeciesEnthalpy(RDouble trTemperature, RDouble vTemperature, RDouble eTemperature, RDouble *hs)
+{
+    if (ntmodel > 1)      //! Multi-temperature model.
+    {
+    }
+    else      //! Single temperature model.
+    {
+        ComputeSpeciesEnthalpy(trTemperature, hs);
+    }
+}
+
+RDouble MixedGas::ComputeMolecularWeightReciprocalWithoutElectron(RDouble *prim, RDouble &ce_div_me)
+{
+    RDouble massFraction[MAX_SPECIES_NUM];
+    for (int i = 0; i < numberOfSpecies; i ++)
+    {
+        massFraction[i] = prim[i + nm];
+    }
+
+    RDouble M = GetMixedGasMolecularWeightReciprocalWithoutElectron(massFraction, ce_div_me);
+    return M;
+}
+
+RDouble MixedGas::GetMixedGasTranslationAndRotationEnergy(RDouble *prim, RDouble Ttr)
+{
+    RDouble massFraction[MAX_SPECIES_NUM];
+    for (int i = 0; i < numberOfSpecies; i ++)
+    {
+        massFraction[i] = prim[nm + i];
+    }
+
+    RDouble Etr = GetMixedGasTranslationAndRotationEnergy(Ttr, massFraction);
+    return Etr;
+}
+
+RDouble MixedGas::GetMixedGasVibrationEnergy(RDouble *prim, RDouble Tv)
+{
+    RDouble massFraction[MAX_SPECIES_NUM];
+    for (int i = 0; i < numberOfSpecies; ++ i)
+    {
+        massFraction[i] = prim[nm + i];
+    }
+
+    RDouble vibrationEnergy = GetMixedGasVibrationEnergy(Tv, massFraction);
+    return vibrationEnergy;
+}
+
+RDouble MixedGas::GetMixedGasElectronEnergy(RDouble *prim, RDouble Te)
+{
+    RDouble massFraction[MAX_SPECIES_NUM];
+    for (int i = 0; i < numberOfSpecies; ++ i)
+    {
+        massFraction[i] = prim[nm + i];
+    }
+
+    RDouble electronEnergy = GetMixedGasElectronEnergy(Te, massFraction);
+    return electronEnergy;
+}
+
+RDouble MixedGas::GetMixedGasTransAndRotatSpecHeatAtConstVolume(RDouble *prim)
+{
+    return 0.0;
+}
+
+RDouble MixedGas::GetMixedGasVibrationSpecificHeatAtConstantVolume(RDouble *prim, RDouble Tv)
+{
+    RDouble massFraction[MAX_SPECIES_NUM];
+    for (int i = 0; i < numberOfSpecies; i ++)
+    {
+        massFraction[i] = prim[nm + i];
+    }
+
+    RDouble cvv = GetMixedGasVibrationSpecificHeatAtConstantVolume(Tv, massFraction);
+    return cvv;
+}
+
+RDouble MixedGas::GetMixedGasElectronSpecificHeatAtConstantVolume(RDouble *prim, RDouble Te)
+{
+    RDouble massFraction[MAX_SPECIES_NUM];
+    for (int i = 0; i < numberOfSpecies; i ++)
+    {
+        massFraction[i] = prim[nm + i];
+    }
+
+    RDouble cve = GetMixedGasElectronSpecificHeatAtConstantVolume(Te, massFraction);
+    return cve;
+}
+
+RDouble MixedGas::ComputeFrozenSoundSpeed(RDouble *primitiveVars)
+{
+    return 0.0;
+}
+
+void MixedGas::ComputeSpecificHeat(RDouble *primitiveVars, RDouble *temperatures, RDouble *spciesCvtr, RDouble *spciesCvv, RDouble &totalCvtr, RDouble &totalCvv)
+{
+
+}
+
+void MixedGas::ComputeEnergy(RDouble *primitiveVars, RDouble *temperatures, RDouble *spciesEtr, RDouble *spciesEv, RDouble *spciesEnthalpy, RDouble &totalEtr, RDouble &totalEv, RDouble &totalEnthalpy)
+{
+}
+
+void MixedGas::ComputePressureDerivatives(RDouble *primitiveVars, RDouble *temperatures, RDouble &alpha, RDouble &beta, RDouble &eta, RDouble *speciesBeta)
+{
+}
+
+void MixedGas::ComputeSpecificHeatByFitMethod(RDouble temperature, RDouble *cvSpecies, bool isVibrationModel/* = true*/)
+{
+    RDouble gasConstant = rjmk;     //! Unit: J/(kg*K).
+    RDouble *speciesMass = molecularProperty->GetMolecularWeightDimensional();
+    //! nTypes denotes the types of species which is used to identity the electron, monoatom and polyatom.
+    Thermo_Param *thermodynamicProperties = this->molecularProperty->GetThermodynamicProperties();
+    RDouble referenceTemperature = referenceParameterDimensional.GetTemperature();
+    RDouble *coef, cp;
+    RDouble T1, T2, T3, T4;
+    T1 = temperature * referenceTemperature;
+    //T1 = MAX(T1, 50.0);
+    T2 = T1 * T1;
+    T3 = T1 * T2;
+    T4 = T1 * T3;
+
+    if (isVibrationModel)
+    {
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            if (thermodynamicProperties[ispecies].nType < 2)
+            {
+                cvSpecies[ispecies] = 0.0;
+                continue;
+            }
+            coef = thermodynamicManager->GetEnthalpyFitCoefficient(ispecies);
+            cp = coef[1] + 2 * coef[2] * T1 + 3 * coef[3] * T2 + 4 * coef[4] * T3 + 5 * coef[5] * T4;
+            cvSpecies[ispecies] = (cp - 1.0) * gasConstant / speciesMass[ispecies];
+        }
+    }
+    else
+    {
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            if (thermodynamicProperties[ispecies].nType >= 2)
+            {
+                cvSpecies[ispecies] = 0.0;
+                continue;
+            }
+            coef = thermodynamicManager->GetEnthalpyFitCoefficient(ispecies);
+            cp = coef[1] + 2 * coef[2] * T1 + 3 * coef[3] * T2 + 4 * coef[4] * T3 + 5 * coef[5] * T4;
+            cvSpecies[ispecies] = (cp - 1.0) * gasConstant / speciesMass[ispecies];
+        }
+    }
+}
+
+void MixedGas::ComputeEnthalpyByFitMethod(RDouble temperature, RDouble *hSpecies, bool isVibrationModel/* = true*/)
+{
+    RDouble gasConstant = rjmk;     //! Unit: J/(kg*K).
+    RDouble *speciesMass = molecularProperty->GetMolecularWeightDimensional();
+    //! nTypes denotes the types of species which is used to identity the electron, monoatom and polyatom.
+    Thermo_Param *thermodynamicProperties = this->molecularProperty->GetThermodynamicProperties();
+    RDouble referenceTemperature = referenceParameterDimensional.GetTemperature();
+    RDouble *coef, hs;
+    RDouble T1, T2, T3, T4, T5;
+    T1 = temperature * referenceTemperature;
+    //T1 = MAX(T1, 50.0);
+    T2 = T1 * T1;
+    T3 = T1 * T2;
+    T4 = T1 * T3;
+    T5 = T1 * T4;
+
+    if (isVibrationModel)
+    {
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            if (thermodynamicProperties[ispecies].nType < 2)
+            {
+                hSpecies[ispecies] = 0.0;
+                continue;
+            }
+            coef = thermodynamicManager->GetEnthalpyFitCoefficient(ispecies);
+            hs = coef[0] + coef[1] * T1 + coef[2] * T2 + coef[3] * T3 + coef[4] * T4 + coef[5] * T5;
+            hSpecies[ispecies] = hs * gasConstant / speciesMass[ispecies];
+        }
+    }
+    else
+    {
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            if (thermodynamicProperties[ispecies].nType >= 2)
+            {
+                hSpecies[ispecies] = 0.0;
+                continue;
+            }
+            coef = thermodynamicManager->GetEnthalpyFitCoefficient(ispecies);
+            hs = coef[0] + coef[1] * T1 + coef[2] * T2 + coef[3] * T3 + coef[4] * T4 + coef[5] * T5;
+            hSpecies[ispecies] = hs * gasConstant / speciesMass[ispecies];
+        }
+    }
+}
+
+void MixedGas::ComputeSpecificHeatByPolynomialFitMethod(RDouble temperature, RDouble *cvSpecies, bool isVibrationModel/* = true*/)
+{
+    RDouble gasConstant = rjmk;     //! Unit: J/(kg*K).
+    RDouble *speciesMass = molecularProperty->GetMolecularWeightDimensional();
+    //! nTypes denotes the types of species which is used to identity the electron, monoatom and polyatom.
+    Thermo_Param *thermodynamicProperties = this->molecularProperty->GetThermodynamicProperties();
+    RDouble referenceTemperature = referenceParameterDimensional.GetTemperature();
+    RDouble cp, T1, T2, T3, T4;
+    T1 = temperature * referenceTemperature;
+    //T1 = MAX(T1, 1.0);
+    T2 = T1 * T1;
+    T3 = T1 * T2;
+    T4 = T1 * T3;
+
+    //! Obtain the interpolation coefficients for the polynomial.
+    this->GetLinearlyAveragedPolynomialCoefficientsT2(T1, this->polynomialCoefT2);
+
+    if (isVibrationModel)
+    {
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            if (thermodynamicProperties[ispecies].nType < 2)
+            {
+                cvSpecies[ispecies] = 0.0;
+                continue;
+            }
+            cp = polynomialCoefT2[ispecies][1] + 2 * polynomialCoefT2[ispecies][2] * T1 + 3 * polynomialCoefT2[ispecies][3] * T2 + 4 * polynomialCoefT2[ispecies][4] * T3 + 5 * polynomialCoefT2[ispecies][5] * T4;
+            cvSpecies[ispecies] = (cp - 1.0) * gasConstant / speciesMass[ispecies];
+        }
+    }
+    else
+    {
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            if (thermodynamicProperties[ispecies].nType >= 2)
+            {
+                cvSpecies[ispecies] = 0.0;
+                continue;
+            }
+            cp = polynomialCoefT2[ispecies][1] + 2 * polynomialCoefT2[ispecies][2] * T1 + 3 * polynomialCoefT2[ispecies][3] * T2 + 4 * polynomialCoefT2[ispecies][4] * T3 + 5 * polynomialCoefT2[ispecies][5] * T4;
+            cvSpecies[ispecies] = (cp - 1.0) * gasConstant / speciesMass[ispecies];
+        }
+    }
+}
+
+void MixedGas::ComputeEnthalpyByPolynomialFitMethod(RDouble temperature, RDouble *hSpecies, bool isVibrationModel/* = true*/)
+{
+    RDouble gasConstant = rjmk;     //! Unit: J/(kg*K).
+    RDouble *speciesMass = molecularProperty->GetMolecularWeightDimensional();
+    //! nTypes denotes the types of species which is used to identity the electron, monoatom and polyatom.
+    Thermo_Param *thermodynamicProperties = this->molecularProperty->GetThermodynamicProperties();
+    RDouble referenceTemperature = referenceParameterDimensional.GetTemperature();
+    RDouble hs, T1, T2, T3, T4, T5;
+    T1 = temperature * referenceTemperature;
+    //T1 = MAX(T1, 1.0);
+    T2 = T1 * T1;
+    T3 = T1 * T2;
+    T4 = T1 * T3;
+    T5 = T1 * T4;
+
+    //! Obtain the interpolation coefficients for the polynomial.
+    this->GetLinearlyAveragedPolynomialCoefficientsT2(T1, this->polynomialCoefT2);
+
+    if (isVibrationModel)
+    {
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            if (thermodynamicProperties[ispecies].nType < 2)
+            {
+                hSpecies[ispecies] = 0.0;
+                continue;
+            }
+            hs = polynomialCoefT2[ispecies][0] + polynomialCoefT2[ispecies][1] * T1 + polynomialCoefT2[ispecies][2] * T2 + polynomialCoefT2[ispecies][3] * T3 + polynomialCoefT2[ispecies][4] * T4 + polynomialCoefT2[ispecies][5] * T5;
+            hSpecies[ispecies] = hs * gasConstant / speciesMass[ispecies];
+        }
+    }
+    else
+    {
+        for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+        {
+            if (thermodynamicProperties[ispecies].nType >= 2)
+            {
+                hSpecies[ispecies] = 0.0;
+                continue;
+            }
+            hs = polynomialCoefT2[ispecies][0] + polynomialCoefT2[ispecies][1] * T1 + polynomialCoefT2[ispecies][2] * T2 + polynomialCoefT2[ispecies][3] * T3 + polynomialCoefT2[ispecies][4] * T4 + polynomialCoefT2[ispecies][5] * T5;
+            hSpecies[ispecies] = hs * gasConstant / speciesMass[ispecies];
+        }
+    }
+}
+
+void MixedGas::ComputeTemperatureFromTotalTemperature(RDouble *massF, RDouble totalTemperature, RDouble mach, RDouble &Temperature, RDouble &gama, int Dimensional)
+{
+    RDouble Tmin = 10.0;
+    RDouble Tmax = 50000.0;
+    RDouble mach2 = mach * mach;
+    RDouble totalTemperatureLocal;
+    RDouble referenceTemperature = referenceParameterDimensional.GetTemperature();
+    if (Dimensional == 0)
+    {
+        Tmin = 10.0 / referenceTemperature;
+        Tmax = 50000.0 / referenceTemperature;
+    }
+    int count = 0;
+    while (count < 100)
+    {
+        Temperature = 0.5 * (Tmin + Tmax);
+        ComputeGama(massF, Temperature, gama, Dimensional);
+        totalTemperatureLocal = Temperature * (1.0 + 0.5 * (gama - 1.0) * mach2);
+        if(ABS(totalTemperatureLocal - totalTemperature) / totalTemperature < 1.0e-8) return;
+        if (totalTemperatureLocal > totalTemperature)
+        {
+            Tmax = Temperature;
+        }
+        else
+        {
+            Tmin = Temperature;
+        }
+        count++;
+    }
+}
+
+void ChemCompressData(DataContainer *&cdata)
+{
+    gas->CompressData(cdata);
+}
+
+void ChemDecompressData(DataContainer *cdata)
+{
+    gas->DecompressData(cdata);
+}
+
+void MixedGas::SetMaximumSpecies(RDouble *fs)
+{
+    RDouble *Ms = this->molecularProperty->GetMolecularWeightDimensional();
+    string *species_name = this->molecularProperty->GetNameOfSpecies();
+
+    char    elementName[4] = {'O', 'N', 'C', 'H'}; 
+    RDouble elementWeight[4] = {1.599940E-2, 1.400674E-2, 1.400674E-2, 1.0E-3};
+    RDouble elementMaximum[4] = {0.0, 0.0, 0.0, 0.0};
+
+    int coef = 0;
+    RDouble elementMaximumC1;
+
+    RDouble *xs = new RDouble[this->numberOfSpecies]();
+
+    for (int i = 0; i < this->numberOfSpecies; i ++)
+    {
+        maximumSpecies[i] = 1.0;    //ini
+        xs[i] = fs[i] / Ms[i];
+    }
+
+    if (nSpeciesLimit == 0) return;
+
+    //! Compute the maximum of each element.
+    for (int n = 0; n < 4; n ++)
+    {
+        for (int i = 0; i < this->numberOfSpecies; i ++)
+        {
+            if (FindChemicalElement(species_name[i], elementName[n], coef))
+            {
+                elementMaximum[n] += xs[i] * coef * elementWeight[n];
+            }
+        }
+    }
+
+    //! Compute the maximum of each Specie.
+    for (int i = 0; i < this->numberOfSpecies; i ++)
+    {
+        for (int n = 0; n < 4; n ++)
+        {
+            if (FindChemicalElement(species_name[i], elementName[n], coef))
+            {
+                elementMaximumC1 = Ms[i] * elementMaximum[n] / (elementWeight[n] * coef);
+                maximumSpecies[i] = MIN(maximumSpecies[i], elementMaximumC1);
+            }
+        }
+    }
+    delete [] xs;    xs = NULL;
+}
+
+void ChemicalMXDQ(RDouble *primitiveVars, RDouble *temperature, RDouble nx, RDouble ny, RDouble nz, RDouble faceArea, RDouble moveVelocity,
+                  RDouble *deltaQ, RDouble *flux, int nNSEquation, int nLaminar, int nTemperatureModel, RDouble radius, int iSign, int nElectronIndex)
+{
+    using namespace IDX;
+    using namespace GAS_SPACE;
+    //! The number of species.
+    int nSpecies = nLaminar - nNSEquation + 1;
+    RDouble alpha = 0.0, beta = 0.0, gama = 0.0, *speciesBeta;
+    speciesBeta = new RDouble[nSpecies];
+
+    RDouble uVelocity = primitiveVars[IU];
+    RDouble vVelocity = primitiveVars[IV];
+    RDouble wVelocity = primitiveVars[IW];
+    RDouble squareVelocity, absoluteVelocity, relativeVelocity;
+
+    //! The absolute velocity.
+    absoluteVelocity = nx * uVelocity + ny * vVelocity + nz * wVelocity;
+    //! The relative velocity.
+    relativeVelocity = absoluteVelocity - moveVelocity;
+    //! Compute squared velocity.
+    squareVelocity = uVelocity * uVelocity + vVelocity * vVelocity + wVelocity * wVelocity;
+
+    //! Obtain the temperatures.
+    RDouble transRotationTemperature = temperature[ITT];
+    RDouble vibrationTemperature = transRotationTemperature;
+    RDouble electronTemperature = transRotationTemperature;
+    if (nTemperatureModel > 1)
+    {
+        vibrationTemperature = temperature[ITV];
+        electronTemperature = vibrationTemperature;
+        if (nTemperatureModel == 3)
+        {
+            electronTemperature = temperature[ITE];
+        }
+    }
+
+    //! Compute the total enthalpy.
+    RDouble totalEnthalpy = gas->GetMixedGasEnthalpy(primitiveVars, transRotationTemperature, vibrationTemperature, electronTemperature);
+    totalEnthalpy += 0.5 * squareVelocity;
+
+    //! Compute the coefficient b1 and b2 (see formula A.5 in PHengLEI Theory manual).
+    RDouble b1 = nx * deltaQ[IRU] + ny * deltaQ[IRV] + nz * deltaQ[IRW] - absoluteVelocity * deltaQ[IR];
+    RDouble dh = uVelocity * deltaQ[IRU] + vVelocity * deltaQ[IRV] + wVelocity * deltaQ[IRW] - deltaQ[IRE];
+    RDouble b2 = 0.0, b3 = 0.0, electronPressure = 0.0;
+
+    if (nTemperatureModel == 1)
+    {
+        //! Compute the coefficients in the chemical reaction.
+        gas->ComputeCoefficientInMXDQ(primitiveVars, alpha, beta, speciesBeta);
+
+        b2 = beta * deltaQ[IR] - alpha * dh;
+        for (int s = 0; s < nSpecies - 1; ++ s)
+        {
+            b2 += speciesBeta[s] * deltaQ[nNSEquation + s];
+        }
+    }
+    else //! Multi-temperature model.
+    {
+        //! Compute the pressure of electron.
+        electronPressure = gas->GetElectronPressure(primitiveVars, electronTemperature);
+        RDouble *speciesGama = new RDouble[nSpecies];
+
+        //! Compute partial derivatives of pressure and electron pressure to conservative variables.
+        gas->GetMultiTemperatureModelPartialDerivatives(primitiveVars, transRotationTemperature, electronTemperature,
+            alpha, beta, gama, speciesBeta, speciesGama);
+
+        if (nTemperatureModel == 2)
+        {
+            dh += deltaQ[nLaminar + 1];
+            b2 += gama * deltaQ[nLaminar + 1];
+            b3 += gama * deltaQ[nLaminar + 1];
+        }
+        else if (nTemperatureModel == 3)
+        {
+            b2 += gama * deltaQ[nLaminar + 1];
+            b3 += gama * deltaQ[nLaminar + 2];
+            dh += deltaQ[nLaminar + 1] + deltaQ[nLaminar + 2];
+        }
+        b2 += beta * deltaQ[IR] - alpha * dh;
+
+        for (int iSpices = 0; iSpices < nSpecies - 1; ++ iSpices)
+        {
+            b2 += speciesBeta[iSpices] * deltaQ[nNSEquation + iSpices];
+            b3 += speciesGama[iSpices] * deltaQ[nNSEquation + iSpices];
+        }
+
+        delete[] speciesGama;    speciesGama = nullptr;
+    }
+
+    //! Comoute the fluxes called M*dQ.
+    flux[IR ] = relativeVelocity * deltaQ[IR ] + b1;
+    flux[IRU] = relativeVelocity * deltaQ[IRU] + b1 * uVelocity     + b2 * nx;
+    flux[IRV] = relativeVelocity * deltaQ[IRV] + b1 * vVelocity     + b2 * ny;
+    flux[IRW] = relativeVelocity * deltaQ[IRW] + b1 * wVelocity     + b2 * nz;
+    flux[IRE] = relativeVelocity * deltaQ[IRE] + b1 * totalEnthalpy + b2 * absoluteVelocity;
+    for (int m = nNSEquation; m < nLaminar; ++ m)
+    {
+        flux[m] = relativeVelocity * deltaQ[m] + b1 * primitiveVars[m];
+    }
+
+    //! Modify the fluxes of multi-temperature model.
+    if (nTemperatureModel == 2) 
+    {
+        flux[nLaminar + 1] = relativeVelocity * deltaQ[nLaminar + 1] + b1 * (primitiveVars[nLaminar + 1] + electronPressure / primitiveVars[IR]) + b3 * absoluteVelocity;
+    }
+    else if (nTemperatureModel == 3)
+    {
+        flux[nLaminar + 1] = relativeVelocity * deltaQ[nLaminar + 1] + b1 * primitiveVars[nLaminar + 1];
+        flux[nLaminar + 2] = relativeVelocity * deltaQ[nLaminar + 2] + b1 * (primitiveVars[nLaminar + 2] + electronPressure / primitiveVars[IR]) + b3 * absoluteVelocity;
+    }
+
+    //! To add rM * dQ that is the product of the invscid spectrum radius rM and increment dQ.
+    RDouble spectrumRadiusTerm = iSign * radius / faceArea;
+    for (int m = 0; m < nLaminar; ++ m)
+    {
+        flux[m] += spectrumRadiusTerm * deltaQ[m];
+        flux[m] *= 0.5 * faceArea;
+    }
+
+    flux[nLaminar] = 0.0;
+    if (nElectronIndex >= 0)
+    {
+        flux[nLaminar - 1] = 0.0;
+    }
+
+    //! Modify the fluxes of vibration and electron energy terms.
+    for (int m = 0; m < nTemperatureModel - 1; ++ m)
+    {
+        flux[nLaminar + 1 + m] += spectrumRadiusTerm * deltaQ[nLaminar + 1 + m];
+        flux[nLaminar + 1 + m] *= 0.5 * faceArea;
+    }
+    delete[] speciesBeta;    speciesBeta = nullptr;
+}
+
+void ChemicalMXDQR(RDouble *primitiveVars, RDouble *temperature, RDouble nx, RDouble ny, RDouble nz, RDouble faceArea, RDouble moveVelocity,
+                   RDouble *deltaQ, RDouble *flux, int nNSEquation, int nLaminar, int nTemperatureModel, RDouble radius, int iSign, int nElectronIndex,
+                   RDouble *speciesCvs, RDouble *speciesEtrs, RDouble totalH,  RDouble totalCv, RDouble totalCvtr, RDouble totalCvv, RDouble totalCve)
+{
+    using namespace IDX;
+    using namespace GAS_SPACE;
+    // The number of species.
+    int nSpecies = nLaminar - nNSEquation + 1;
+    //  int nElectronIndex = GlobalDataBase::GetIntParaFromDB("nElectronIndex");
+    RDouble alpha = 0.0, beta = 0.0, gama = 0.0, *speciesBeta;
+
+    int mTT = gas->GetmTT();
+    int mTE = gas->GetmTE();
+    Thermo_Energy  *Thermo_Energy_temparay = gas->GetThermo_Energy_temparay();
+    speciesBeta = Thermo_Energy_temparay->Rms;  //be careful. by dms
+
+    RDouble uVelocity = primitiveVars[IU];
+    RDouble vVelocity = primitiveVars[IV];
+    RDouble wVelocity = primitiveVars[IW];
+    RDouble squareVelocity, absoluteVelocity, relativeVelocity;
+
+    // The absolute velocity.
+    absoluteVelocity = nx * uVelocity + ny * vVelocity + nz * wVelocity;
+    // The relative velocity.
+    relativeVelocity = absoluteVelocity - moveVelocity;
+    // Compute squared velocity.
+    squareVelocity = uVelocity * uVelocity + vVelocity * vVelocity + wVelocity * wVelocity;
+
+    // Obtain the temperatures.
+    RDouble transRotationTemperature = temperature[mTT];
+    RDouble electronTemperature = temperature[mTE];
+
+    // Compute the total enthalpy.
+    RDouble totalEnthalpy = totalH + 0.5 * squareVelocity;
+
+    // Compute the coefficient b1 and b2 (see formula A.5 in PHengLEI Theory manual).
+    RDouble b1 = nx * deltaQ[IRU] + ny * deltaQ[IRV] + nz * deltaQ[IRW] - absoluteVelocity * deltaQ[IR];
+    RDouble dh = uVelocity * deltaQ[IRU] + vVelocity * deltaQ[IRV] + wVelocity * deltaQ[IRW] - deltaQ[IRE];
+    RDouble b2 = 0.0, b3 = 0.0, electronPressure = 0.0;
+
+    if (nTemperatureModel == 1)
+    {
+        // Compute the coefficients in the chemical reaction.
+        //gas->ComputeCoefficientInMXDQ(primitiveVars, alpha, beta, speciesBeta);
+        gas->ComputeCoefficientInMXDQR(primitiveVars, transRotationTemperature, squareVelocity, speciesCvs, totalCv, alpha, beta, speciesBeta);
+
+        b2 = beta * deltaQ[IR] - alpha * dh;
+        for (int s = 0; s < nSpecies - 1; ++ s)
+        {
+            b2 += speciesBeta[s] * deltaQ[nNSEquation + s];
+        }
+    }
+    else // Multi-temperature model.
+    {
+        // Compute the pressure of electron.
+        electronPressure = gas->GetElectronPressure(primitiveVars, electronTemperature);
+        RDouble *speciesGama = Thermo_Energy_temparay->Ees;  //be careful. by dms
+
+
+        gas->GetMultiTemperatureModelPartialDerivativesR(primitiveVars, transRotationTemperature, electronTemperature,alpha, beta, gama, speciesBeta, speciesGama,
+            squareVelocity, speciesEtrs, totalCvtr, totalCvv, totalCve);
+
+        if (nTemperatureModel == 2)
+        {
+            dh += deltaQ[nLaminar + 1];
+            b2 += gama * deltaQ[nLaminar + 1];
+            b3 += gama * deltaQ[nLaminar + 1];
+        }
+        else if (nTemperatureModel == 3)
+        {
+            b2 += gama * deltaQ[nLaminar + 1];
+            b3 += gama * deltaQ[nLaminar + 2];
+            dh += deltaQ[nLaminar + 1] + deltaQ[nLaminar + 2];
+        }
+        b2 += beta * deltaQ[IR] - alpha * dh;
+
+        for (int iSpices = 0; iSpices < nSpecies - 1; ++ iSpices)
+        {
+            b2 += speciesBeta[iSpices] * deltaQ[nNSEquation + iSpices];
+            b3 += speciesGama[iSpices] * deltaQ[nNSEquation + iSpices];
+        }
+    }
+
+    // Comoute the fluxes called M*dQ.
+    flux[IR ] = relativeVelocity * deltaQ[IR ] + b1;
+    flux[IRU] = relativeVelocity * deltaQ[IRU] + b1 * uVelocity     + b2 * nx;
+    flux[IRV] = relativeVelocity * deltaQ[IRV] + b1 * vVelocity     + b2 * ny;
+    flux[IRW] = relativeVelocity * deltaQ[IRW] + b1 * wVelocity     + b2 * nz;
+    flux[IRE] = relativeVelocity * deltaQ[IRE] + b1 * totalEnthalpy + b2 * absoluteVelocity;
+    for (int m = nNSEquation; m < nLaminar; ++ m)
+    {
+        flux[m] = relativeVelocity * deltaQ[m] + b1 * primitiveVars[m];
+    }
+
+    // Modify the fluxes of multi-temperature model.
+    if (nTemperatureModel == 2) 
+    {
+        flux[nLaminar + 1] = relativeVelocity * deltaQ[nLaminar + 1] + b1 * (primitiveVars[nLaminar + 1] + electronPressure / primitiveVars[IR]) + b3 * absoluteVelocity;
+    }
+    else if (nTemperatureModel == 3)
+    {
+        flux[nLaminar + 1] = relativeVelocity * deltaQ[nLaminar + 1] + b1 * primitiveVars[nLaminar + 1];
+        flux[nLaminar + 2] = relativeVelocity * deltaQ[nLaminar + 2] + b1 * (primitiveVars[nLaminar + 2] + electronPressure / primitiveVars[IR]) + b3 * absoluteVelocity;
+    }
+
+    // To add rM * dQ that is the product of the invscid spectrum radius rM and increment dQ.
+    RDouble spectrumRadiusTerm = iSign * radius / faceArea;
+    for (int m = 0; m < nLaminar; ++ m)
+    {
+        flux[m] += spectrumRadiusTerm * deltaQ[m];
+        flux[m] *= 0.5 * faceArea;
+    }
+
+    flux[nLaminar] = 0.0;
+    if (nElectronIndex >= 0)
+    {
+        flux[nLaminar - 1] = 0.0;
+    }
+
+    // Modify the fluxes of vibration and electron energy terms.
+    for (int m = 0; m < nTemperatureModel - 1; ++ m)
+    {
+        flux[nLaminar + 1 + m] += spectrumRadiusTerm * deltaQ[nLaminar + 1 + m];
+        flux[nLaminar + 1 + m] *= 0.5 * faceArea;
+    }
+}
+
+}
+}
diff --git a/API/Physics/include/AerodynamicsBasicRelations.h b/API/Physics/include/AerodynamicsBasicRelations.h
new file mode 100644
index 0000000..1c43bf2
--- /dev/null
+++ b/API/Physics/include/AerodynamicsBasicRelations.h
@@ -0,0 +1,56 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Aerodynamics_BasicRelations.h
+//! @brief     Define some basic aerodynamic relations, e.g isentropic relations, shock relations.
+//! @author    Zhang Jian, He Xin.
+
+#pragma once
+#include "Precision.h"
+
+namespace PHSPACE
+{
+
+//! isentropic relationships
+struct IsentropicRelations{
+    //! T0/T
+    static RDouble T0OverT(RDouble gama, RDouble mach);
+    
+    //! P0/P
+    static RDouble P0OverP(RDouble gama, RDouble mach);
+    
+    //! Rho0/Rho
+    static RDouble Rho0OverRho(RDouble gama, RDouble mach);
+};
+
+struct ShockRelations{
+    //! Behind/Before shock temperature relation
+    //! @param gama gama
+    //! @param m1   mach before the shock
+    static RDouble T2OverT1(RDouble gama, RDouble m1);
+
+    //! Behind/Before shock pressure relation
+    //! @param gama gama
+    //! @param m1   mach before the shock
+    static RDouble P2OverP1(RDouble gama, RDouble m1);
+
+    //! Behind/Before shock density relation
+    //! @param gama gama
+    //! @param m1   mach before the shock
+    static RDouble Rho2OverRho1(RDouble gama, RDouble m1);
+
+    //! Compute mach behind the shock by mach before the shock
+    //! @param gama gama
+    //! @param m1   mach before the shock
+    static RDouble MachBehindShock(RDouble gama, RDouble m1);
+};
+
+}
diff --git a/API/Physics/include/AleForceManager.h b/API/Physics/include/AleForceManager.h
new file mode 100644
index 0000000..a4839b6
--- /dev/null
+++ b/API/Physics/include/AleForceManager.h
@@ -0,0 +1,309 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Force.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+#include "DataContainer.h"
+using namespace std;
+
+namespace PHSPACE
+{
+
+class ActionKey;
+class DataContainer;
+class AerodynamicForceManager;
+class AerodynamicForce;
+
+class AerodynamicForceBody
+{
+public:
+    AerodynamicForceBody();
+    ~AerodynamicForceBody();
+protected:
+    static vector< std::set< string > > bodies;
+    static bool initialize;
+public:
+    static void Initialize();
+    static bool FaceInAerodynamicForceBodies(string bodyName, int aerodynamicForceBodyIndex);
+};
+
+bool FaceInAerodynamicForceBodies(string bodyName, int aerodynamicForceBodyIndex);
+
+class BasicAerodynamicForce
+{
+protected:
+    RDouble forceX, forceY, forceZ;
+    RDouble forceXByPressure, forceYByPressure, forceZByPressure;
+    RDouble forceXByViscosity, forceYByViscosity, forceZByViscosity;
+protected:
+    RDouble momentX, momentY, momentZ;
+    RDouble momentXByPressure, momentYByPressure, momentZByPressure;
+    RDouble momentXByViscosity, momentYByViscosity, momentZByViscosity;
+protected:
+    RDouble momentReferenceX, momentReferenceY, momentReferenceZ;
+public:
+    BasicAerodynamicForce();
+    ~BasicAerodynamicForce();
+protected:
+    void ZeroBasicAerodynamicForce();
+public:
+    void SetMomentReferencePoint(RDouble momentReferenceX, RDouble momentReferenceY, RDouble momentReferenceZ);
+    void SetPressureAerodynamicForce(RDouble forceXByPressure, RDouble forceYByPressure, RDouble forceZByPressure);
+    void SetViscousAerodynamicForce(RDouble forceXByViscosity, RDouble forceYByViscosity, RDouble forceZByViscosity);
+    void ComputeResultantAerodynamicForce();
+    void SetPressureAerodynamicMoment(RDouble faceCenterX, RDouble faceCenterY, RDouble faceCenterZ);
+    void SetViscousAerodynamicMoment(RDouble faceCenterX, RDouble faceCenterY, RDouble faceCenterZ);
+    void ComputeAerodynamicMoment(RDouble faceCenterX, RDouble faceCenterY, RDouble faceCenterZ);
+    void ComputeResultantAerodynamicMoment();
+public:
+    void WriteAerodynamicForceToDataContainer(DataContainer *dataContainer);
+    void ReadAerodynamicForceFromDataContainer(DataContainer *dataContainer);
+    void AddAerodynamicForce(BasicAerodynamicForce *basicAerodynamicForce);
+    //void StatisticalForce(BasicAerodynamicForce *basicAerodynamicForce, int numberOfAverage);
+};
+
+class BasicAleForce
+{
+protected:
+    RDouble forceX, forceY, forceZ;
+    RDouble momentX, momentY, momentZ;
+    RDouble powerConsumption;
+public:
+    BasicAleForce();
+    ~BasicAleForce();
+public:
+    void ZeroBasicAleForce();
+    void SetBasicAleForceByAerodynamicForce(AerodynamicForce *aerodynamicForce);
+public:
+    RDouble GetForceX() { return forceX; }
+    RDouble GetForceY() { return forceY; }
+    RDouble GetForceZ() { return forceZ; }
+    RDouble GetMomentX() { return momentX; }
+    RDouble GetMomentY() { return momentY; }
+    RDouble GetMomentZ() { return momentZ; }
+    RDouble GetPowerConsumption() { return powerConsumption; }
+public:
+    void ReadBasicAleForceFromFile(fstream &file);
+    void ReadBasicAleForceFromBasicAleForce(BasicAleForce *basicAleForce);
+    void WriteBasicAleForceToFile(fstream &file);
+};
+
+class AleForceOfBody
+{
+public:
+    AleForceOfBody();
+    ~AleForceOfBody();
+protected:
+    int bodyIndex;
+    int numberOfTimeLayers;
+    vector< BasicAleForce * > basicAleForceContainer;
+public:
+    int  GetBodyIndex() const { return bodyIndex; }
+    void SetBodyIndex(int bodyIndex) { this->bodyIndex = bodyIndex; }
+
+    int  GetNumberOfTimeLayers() const { return numberOfTimeLayers; }
+    void SetNumberOfTimeLayers(int numberOfTimeLayers) { this->numberOfTimeLayers = numberOfTimeLayers; }
+public:
+    void AllocateMemory();
+    void DeallocateMemory();
+public:
+    BasicAleForce *GetBasicAleForce(int timeLayerIndex);
+    void DumpRestartAleForceOfBodyContainer(fstream &file);
+    void InitializeAleForceOfBodyContainer();
+    void ReadAleForceOfBodyContainer();
+    void UpdateAleForceOfBodyOfNewTimeLayer();
+    void UpdateUnsteadyAleForceTerm();
+};
+
+class AleForceManager
+{
+public:
+    AleForceManager();
+    ~AleForceManager();
+protected:
+    vector< AleForceOfBody * > aleForceOfBodyContainer;
+    int numberOfMovingBodies;
+
+    RDouble dimensionalForceCoefficient;
+    RDouble dimensionalMomentCoefficient;
+    RDouble dimensionalPowerCoefficient;
+    int numberOfTimeLayers;
+public:
+    void Initialize();
+    void Restart();
+    void Run();
+    void Post();
+
+    void DumpRestartAleForceOfBodyContainer(fstream &file);
+
+    BasicAleForce *GetBasicAleForce(int bodyIndex, int iTimeLayer);
+public:
+    int GetNumberOfTimeLayers() const { return numberOfTimeLayers; }
+    void SetNumberOfTimeLayers(int numberOfTimeLayers) { this->numberOfTimeLayers = numberOfTimeLayers; }
+    RDouble GetDimensionalForceCoefficient() { return dimensionalForceCoefficient; }
+    RDouble GetDimensionalPowerCoefficient() { return dimensionalPowerCoefficient; }
+    RDouble GetDimensionalMomentCoefficient() { return dimensionalMomentCoefficient; }
+protected:
+    AleForceOfBody *GetAleForceOfBody(int bodyIndex) { return aleForceOfBodyContainer[bodyIndex]; }
+protected:
+    void AllocateAleForceOfBodyContainer();
+    void DeallocateAleForceOfBodyContainer();
+    void InitializeDimensionalReferenceVariables();
+    void InitializeAleForceOfBodyContainer();
+    void ReadAleForceOfBodyContainer();
+};
+
+void CopyBasicAleForce(BasicAleForce *basicAleForce, BasicAleForce *basicAleForceIn);
+
+class AerodynamicForce
+{
+public:
+    AerodynamicForce();
+    ~AerodynamicForce();
+protected:
+    RDouble forceX, forceY, forceZ;
+    RDouble forceXByPressure, forceYByPressure, forceZByPressure;
+    RDouble forceXByViscosity, forceYByViscosity, forceZByViscosity;
+
+    RDouble momentX, momentY, momentZ;
+    RDouble momentXByPressure, momentYByPressure, momentZByPressure;
+    RDouble momentXByViscosity, momentYByViscosity, momentZByViscosity;
+    RDouble hingeMoment;
+protected:
+    RDouble coefForceX, coefForceY, coefForceZ;
+    RDouble coefForceXByPressure, coefForceYByPressure, coefForceZByPressure;
+    RDouble coefForceXByViscosity, coefForceYByViscosity, coefForceZByViscosity;
+
+    RDouble coefMomentX, coefMomentY, coefMomentZ;
+    RDouble coefMomentXByPressure, coefMomentYByPressure, coefMomentZByPressure;
+    RDouble coefMomentXByViscosity, coefMomentYByViscosity, coefMomentZByViscosity;
+protected:
+    RDouble totalLiftCoefficient, totalDragCoefficient, totalCrossCoefficient;
+    RDouble totalPressureDragCoefficient, totalViscosityDragCoefficient;
+    RDouble pressureCenter;
+    RDouble DragCoefLiftCoef2piar;
+    RDouble angleOfAttackDenotedByRadian, angleOfSideslipDenotedByRadian;
+    RDouble coefHingeMoment;
+protected:
+    string bodyName;
+    RDouble referenceArea, referenceLength, referenceSpainLength;
+    RDouble torqueRefX, torqueRefY, torqueRefZ;
+    RDouble localCoordAxis0[3];
+    RDouble localCoordAxis1[3];
+protected:
+    void Zero();
+public:
+    void Initialize(RDouble angleOfAttackDenotedByRadian, RDouble angleOfSideslipDenotedByRadian, RDouble referenceAreaOfAerodynamicForce, RDouble referenceLengthOfAerodynamicMoment,
+        RDouble referenceSpainLengthOfAerodynamicMoment);
+    void Add(DataContainer *dataContainer);
+    void DumpCoefficient(ActionKey *actionKey);
+    void DumpComponentCoefficient(ActionKey *actionKey);
+    void DumpCoefficient(fstream &file);
+    void ComputeCoefficient();
+
+    //! Dump global force data.
+    void DumpAllGlobalForceData(const string &partName, int partID, std::ostringstream &oss);
+
+    //! Dump local force data.
+    void DumpAllLocalForceData(const string &partName, int partID, std::ostringstream &oss);
+
+    void CollectOfAllProcessors();
+public:
+    RDouble GetForceCoefficientX() { return coefForceX; }
+    RDouble GetForceCoefficientY() { return coefForceY; }
+    RDouble GetForceCoefficientZ() { return coefForceZ; }
+
+    RDouble GetMomentCoefficientX() { return coefMomentX; }
+    RDouble GetMomentCoefficientY() { return coefMomentY; }
+    RDouble GetMomentCoefficientZ() { return coefMomentZ; }
+public:
+    RDouble GetAerodynamicForceX() { return forceX; }
+    RDouble GetAerodynamicForceY() { return forceY; }
+    RDouble GetAerodynamicForceZ() { return forceZ; }
+
+    RDouble GetAerodynamicMomentX() { return momentX; }
+    RDouble GetAerodynamicMomentY() { return momentY; }
+    RDouble GetAerodynamicMomentZ() { return momentZ; }
+
+public:
+    void SetReferenceArea(RDouble referenceArea) { this->referenceArea = referenceArea; }
+    void SetReferenceLength(RDouble referenceLength) { this->referenceLength = referenceLength; }
+    void SetReferenceSpainLength(RDouble referenceSpainLength) { this->referenceSpainLength = referenceSpainLength; }
+    void SetTorqueRef(RDouble torqueRefX, RDouble torqueRefY, RDouble torqueRefZ);
+    void SetHingeMomentRef(RDouble *localCoordAxis0, RDouble *localCoordAxis1);
+
+    void SetBodyName(string bodyName) { this->bodyName = bodyName; }
+    string GetBodyName() { return bodyName; }
+
+    void GetMomentByOriginOfCoordinate(RDouble &aerodynamicMomentX0, RDouble &aerodynamicMomentY0, RDouble &aerodynamicMomentZ0);
+};
+
+void InitializeAerodynamicForce();
+void AddAerodynamicForce(ActionKey *actionKey);
+void CollectAerodynamicForceOfAllProcessors();
+void ComputeAerodynamicForceForALE();
+void DumpAerodynamicForceCoefficient(ActionKey *actionKey);
+
+void WriteAerodynamicForceToActionKey(ActionKey *actionKey, BasicAerodynamicForce **basicAerodynamicForceContainer);
+void WriteAerodynamicForceToActionKey(ActionKey *actionKey, vector< BasicAerodynamicForce * > *basicAerodynamicForceVector);
+
+BasicAerodynamicForce **CreateBasicAerodynamicForceContainer();
+void FreeBasicAerodynamicForceContainer(BasicAerodynamicForce **basicAerodynamicForceContainer);
+
+vector< BasicAerodynamicForce * > *CreateBasicAerodynamicForceVector();
+void FreeBasicAerodynamicForceVector(vector< BasicAerodynamicForce * > *basicAerodynamicForceVector);
+
+class AerodynamicForceManager
+{
+public:
+    AerodynamicForceManager();
+    ~AerodynamicForceManager();
+protected:
+    size_t numberOfAerodynamicForceBodies;
+    vector<AerodynamicForce *> aerodynamicForceContainer;
+    bool isAllocateMemory;
+
+    //! The corresponding Boundary Condition ID of each moving body.
+    int *bodyID;
+protected:
+    void AllocateMemory();
+    void DeallocateMemory();
+public:
+    void InitializeAerodynamicForceManager();
+    void AddAerodynamicForce(ActionKey *actionKey);
+    void CollectAerodynamicForceOfAllProcessors();
+
+    void DumpAerodynamicForceCoefficient(ActionKey *actionKey);
+
+    void SetNumberOfAerodynamicForces(int numberOfAerodynamicForceBodies) { this->numberOfAerodynamicForceBodies = numberOfAerodynamicForceBodies; }
+
+    //! Dump all force data in forcefile.
+    void DumpAllForceData(ActionKey *actkey);
+
+public:
+    AerodynamicForce *GetAerodynamicForce(int bodyIndex) { return aerodynamicForceContainer[bodyIndex]; }
+    AerodynamicForce *GetAerodynamicForce() { return aerodynamicForceContainer[numberOfAerodynamicForceBodies]; }
+protected:
+    void ExtractForceDataFromActionKey(ActionKey *actionKey, vector< DataContainer * > *superContainerArray);
+    vector< DataContainer * > *CreateDataContainerArray();
+    void FreeDataContainerArray(vector< DataContainer * > *superContainerArray);
+};
+
+AerodynamicForceManager *GetAerodynamicForceManager();
+AerodynamicForce *GetCurrentAerodynamicForce(int bodyIndex);
+
+BasicAerodynamicForce *GetBasicAerodynamicForce(int iBoundaryConditionRegion, BasicAerodynamicForce **basicAerodynamicForceContainer);
+BasicAerodynamicForce *GetBasicAerodynamicForce(int iBoundaryConditionRegion, vector< BasicAerodynamicForce * > *basicAerodynamicForceVector);
+
+}
diff --git a/API/Physics/include/AleManager.h b/API/Physics/include/AleManager.h
new file mode 100644
index 0000000..a076bdb
--- /dev/null
+++ b/API/Physics/include/AleManager.h
@@ -0,0 +1,107 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      AleManager.h
+//! @brief     Explain this file briefly.
+//! @author    He Kun.
+
+#pragma once
+#include "Precision.h"
+#include "Force.h"
+#include "Pointer.h"
+#include "AMRDef.h"
+#include "Data_ParamFieldSuite.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+class SixDofSolverManager;
+class MovingMeshManager;
+class DeformingSolverManager;
+class AleForceManager;
+class Grid;
+class Data_ParamFieldSuite;
+
+class AleManager
+{
+public:
+    AleManager();
+    ~AleManager();
+
+private:
+    AleForceManager     *aleForceManager;
+    SixDofSolverManager* sixDofSolverManager;
+    DeformingSolverManager* deformingManager;
+    MovingMeshManager   *movingMeshManager;
+
+public:
+    void Initialize();
+    void Allocate();
+    void Restart();
+    void Run();
+    void UpdateAleForce();
+    void Post();
+    void Dump();
+    void DumpRestart();
+
+protected:
+    void SychonizeAleTime();
+    void InitializeDimensionalReferenceTime();
+    fstream* currentAleFile;
+
+public:
+    fstream & GetCurrentAleFile() { return * currentAleFile; };
+    AleForceManager        * GetAleForceManager()        { return aleForceManager;        };
+    SixDofSolverManager    * GetSixDofSolverManager()    { return sixDofSolverManager;    };
+    DeformingSolverManager* GetDeformingSolverManager()  { return deformingManager; };
+    void ComputeMetrics();
+    void CommunicateCellCenterData();
+    void ComputeGridFaceVelocity();
+};
+
+//! The global call of Ale.
+void CreateAleManager();
+void FreeAleManager();
+void SolveSingleInnerIterationStepForAleSolvers();
+void PostprocessAfterInnerIterationStepForAleSolvers();
+
+AleManager * GetAleManager();
+
+void BackupAllZonesOldGrid();
+
+//! The backup file of Ale.
+bool IsReadAleFile();
+void SetIsReadAleFile(bool isReadAleFileIn);
+fstream & GetCurrentAleFile();
+
+int GetIntegerParameterFromDataBase(int bodyIndex, const string& parameterName);
+int GetIntegerParameterFromDataBaseIfExist(int bodyIndex, const string& parameterName, int defaultValve);
+
+RDouble GetRDoubleParameterFromDataBase(int bodyIndex, const string& parameterName);
+
+string GetStringParameterFromDataBase(int bodyIndex, const string& parameterName);
+
+RDouble GetRDoubleParameterFromDataBaseIfExist(int bodyIndex, const string &parameterName, RDouble defaultValue);
+
+int * GetIntegerArrayFromDataBase(const string& nameOfIntegerArray, int numberOfElements);
+void GetRDoubleVectorFromDataBase(vector< RDouble >& parameter, int bodyIndex, const string& parameterName, int numberOfElements);
+
+RDouble GetAleTimeStep();
+
+bool IsImplicitAleMethod();
+bool IsExplicitAleMethod();
+
+void DeAllocateOversetStorage();
+
+void AllocateOversetStorage();
+
+}
\ No newline at end of file
diff --git a/API/Physics/include/AleModel.h b/API/Physics/include/AleModel.h
new file mode 100644
index 0000000..dcf324c
--- /dev/null
+++ b/API/Physics/include/AleModel.h
@@ -0,0 +1,137 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      AleModel.h
+//! @brief     Explain this file briefly.
+//! @author    xxx.
+
+#pragma once
+#include "Precision.h"
+
+namespace PHSPACE
+{
+const int LMSM_IMPEUL    = 1;
+const int LMSM_IMPTRZ    = 2;
+const int LMSM_IMPBD2    = 3;
+const int LMSM_IMPTHR    = 4;
+const int LMSM_IMPFOR    = 5;
+const int LMSM_NODUAL    = 6;
+
+void lmsmcoef(int lmsmflag, int outnstep, RDouble *outerdt, RDouble &xi, RDouble &theta, RDouble &phi);
+void ordcoef(int order, RDouble &xi, RDouble &theta, RDouble &phi, RDouble *outerdt, int iact);
+
+class Grid;
+class AleParameter
+{
+public:
+    int isUnsteady, isAle;
+    int order;
+    //! Linear Multi Step Methods flag.
+    int lmsmflag; 
+    //! Outer iteration step.
+    int outnstep;
+
+    RDouble theta;
+    RDouble phi;
+    RDouble xi;
+    RDouble *outerdt;
+    RDouble dtau;
+    RDouble dtsave;
+    RDouble simutime;
+    RDouble timemax;
+public:
+    int & GetLMSMFlag() { return lmsmflag; };
+    void SetLMSMFlag();
+    void Init();
+    AleParameter();
+    ~AleParameter();
+};
+
+class AleModel
+{
+public:
+    //! Parameters for the Arbitrary Lagrangian Eulerian Method (ALE).
+    //! Euler's angles and reference point position at time n, n-1, n-2
+    //! and their times derivatives at time n (0)
+
+    //! x,y,z position.
+    //! coord0(1,1),coord0(2,1),coord0(3,1)
+    //! x,y,z velocity.
+    //! coord0(1,2),coord0(2,2),coord0(3,2)
+    //! x,y,z accelerations.
+    //! coord0(1,3),coord0(2,3),coord0(3,3)
+    
+    int maxale;
+    static RDouble * euler_angle;    //! Rotation euler angle.
+    static RDouble **trans_ref;      //! Reference point, velocity, accelerations.
+    static RDouble **xyz_ref;        //! Reference point n, n-1, n-2.
+    static RDouble **rotate_ref;     //! Reference point, velocity, accelerations.
+    static RDouble **angle_ref;    
+    static RDouble **matrix;         //! Matrix.
+    int * ialepar;
+    static AleParameter *param;
+public:
+    static void Init();             //! Initialization.
+    static void Allocate();         //! Allocate memory.
+    static void Free();
+
+    static RDouble ** CreateMatrix();
+    static void DestroyMatrix(RDouble **matrix);
+
+    static RDouble * CreateVector();
+    static void DestroyVector(RDouble *v);
+
+    static void CrossMultiply(RDouble *omega, RDouble *dr, RDouble *vel);
+
+    static void SetMatrix(RDouble ** matrix_x, RDouble ** matrix_y);
+    static void TransposeMatrix(RDouble ** matrix);
+    static void ComputeRelativeRotateMatrix();
+    static void ComputeRelativeRotateMatrix(RDouble ** matrix_now, RDouble ** matrix_old);
+
+    static void MatrixMultiply(RDouble **x, RDouble **y, RDouble **z);
+    static void MatrixRotate  (RDouble *angle, RDouble **matrix);
+    static void MatrixRotateX (RDouble  angle, RDouble **matrix);
+    static void MatrixRotateY (RDouble  angle, RDouble **matrix);
+    static void MatrixRotateZ (RDouble  angle, RDouble **matrix);
+
+    static void GetGridFileName(string &filename);
+
+    static void EulerAngle();
+    static void DynamicGrid();
+    static void GenerateDynamicGrid();
+    static void BackUpOldGrid();
+    static void ReadDynamicGrid();
+    static void ReadDynamicGrid(fstream &file);
+    static void ReadGridCoordinate(fstream &file, int iZone);
+    static void ComputeGridVelocity();
+    static void UpdateGridInfo();
+    static void RotateTranslation();
+    static void RotateTranslation(Grid *grid);
+    static void GridVerticeVelocity       (Grid *grid, RDouble *xt, RDouble *yt, RDouble *zt);
+    static void GridVerticeVelocityRigid  (Grid *grid, RDouble *xt, RDouble *yt, RDouble *zt);
+    static void GridVerticeVelocityGeneral(Grid *grid, RDouble *xt, RDouble *yt, RDouble *zt);
+    static void GridSurfaceVelocity       (Grid *grid, RDouble *xt, RDouble *yt, RDouble *zt);
+    static void CheckMovement();
+    static void Deform();
+    static void MoveGrid();
+    static void LinearMultiStepMethodsCoeffcient(AleParameter *param);
+    static void GetOuterdt(AleParameter *param);
+    static void UnsteadyPreSolve();
+    static void GetOuterSrc();
+};
+
+void chckmovmt(int *ialepar, RDouble **angle0, RDouble **coord0, RDouble **angle, RDouble **coord,RDouble *outerdt, 
+               int lmsmflag, int outnstep);
+//void deftrans(RDouble **coord, RDouble time, RDouble *outerdt, int *ialepar, RDouble *ralepar);
+void chckdeform();
+
+}
+
diff --git a/API/Physics/include/DeformingSolverManager.h b/API/Physics/include/DeformingSolverManager.h
new file mode 100644
index 0000000..afddbc5
--- /dev/null
+++ b/API/Physics/include/DeformingSolverManager.h
@@ -0,0 +1,75 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      DeformingSolverManager.h
+//! @brief     Explain this file briefly.
+//! @author    He Kun.
+
+#pragma once
+#include "AleManager.h"
+#include "Force.h"
+#include "SixDofManager.h"
+
+namespace PHSPACE
+{
+
+namespace MORPHINGMANNER
+{
+    const int NOMPRPHING  = 1;
+    const int FISH        = 2;
+    const int INSECT      = 3;
+    const int BIRD        = 4;
+    const int MISSILE     = 5;
+    const int OSCILLATE   = 6;
+    const int MORPHINGAIRCRAFTFOLD = 7;
+    const int MORPHINGAIRCRAFTTAILEDGEUP = 8;
+}
+
+class MassCharacter;
+
+//! This parameter is used to determine the motion of the grid.
+class DeformingParameter
+{
+public:
+    DeformingParameter();
+    ~DeformingParameter();
+protected:
+    int numberOfParameters;
+    vector< RDouble > parameters;
+public:
+    DeformingParameter & operator = (const DeformingParameter & rhs);
+    bool operator == (const DeformingParameter & rhs);
+public:
+    void SetNumberOfParameters(int numberOfParameters) { this->numberOfParameters = numberOfParameters; };
+    int  GetNumberOfParameters() { return numberOfParameters; };
+
+    vector< RDouble > & GetParameters()   { return parameters; };
+    void SetParameters(PHVectorRDouble1D& parameterVector);
+};
+
+DeformingParameter * GetDeformingParameter();
+
+class DeformingSolverManager
+{
+public:
+    DeformingSolverManager();
+    ~DeformingSolverManager();
+
+public:
+    void Initialize();
+    void Restart();
+    void Run();
+    void Post();
+    void Dump();
+    void DumpRestart();
+};
+
+}
\ No newline at end of file
diff --git a/API/Physics/include/Flux_Inviscid.h b/API/Physics/include/Flux_Inviscid.h
new file mode 100644
index 0000000..efbde7c
--- /dev/null
+++ b/API/Physics/include/Flux_Inviscid.h
@@ -0,0 +1,325 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Flux_Inviscid.h
+//! @brief     Inviscid (convection) flux computing, including number of inviscid scheme,
+//!            such as Roe, Steger-Warmming, Van Leer, HLLC, AUSM, etc.
+//! @author    Bell, He Xin, Wang Boqian.
+
+#pragma once
+#include "FaceProxy.h"
+#include "Geo_UnstructBC.h"    //! GMRES3D
+#ifdef USE_GMRESSOLVER
+#include "Sacado.hpp"
+#endif
+namespace PHSPACE
+{
+class InviscidSchemeParameter;
+#ifdef USE_GMRESSOLVER
+//! GMRESAD
+typedef Sacado::Fad::DFad<RDouble> ADReal;
+#endif
+typedef void (*INVScheme) (FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+int GetSchemeID(const string &scheme_name);
+
+INVScheme GetINVScheme(int scheme_id);
+
+//! This Roe scheme is coding by the conservative variable way, in which the DF is expressed by dH.
+void Roe_Scheme_ConservativeForm(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+#ifdef USE_GMRESSOLVER
+//! GMRES, the flux is calculated in Cal_GMRES_Roe_Scheme_Flux 
+//! assembling the Jacobian matrix using primitive variables
+//! GMRESAD GMRESCSR
+void GMRES_Roe_Scheme_ConservativeForm(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+//! GMRESJac1st GMRES3D
+void GMRES_INVScheme(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+//! GMRESnolim
+void GMRES_Roe_Scheme_ConservativeForm_nolim_2nd(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+//! GMRESnolim
+void GMRES_Roe_Scheme_ConservativeForm_nolim_Matrix(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+//! GMRESAD_WITH_CSR GMRESCSR
+void GMRES_Roe_Scheme_ConservativeForm_CSR(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+//! GMRESPV
+void GMRES_Roe_Scheme_ConservativeForm_FD_PV(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+//! _CV : assembling the Jacobian matrix using conservative variables(consider the contribution from bc)
+void GMRES_Roe_Scheme_ConservativeForm_CV(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+//! _FD: assembling the Jacobian matrix using conservative variables(not considering the contribution from bc)
+void GMRES_Roe_Scheme_ConservativeForm_FD(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+//! _wholeJacobian: for outputing the wholeJacobian matrix, so remove the finite difference part
+void GMRES_Roe_Scheme_ConservativeForm_wholeJacobian(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+//! _rhow: modification for the components of rhow when assembling the Jacobian matrix
+void GMRES_Roe_Scheme_ConservativeForm_rhow(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+void GMRES_Roe_Scheme_ConservativeForm_test(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+//! GMRESPV
+template <typename T>
+void Cal_GMRES_Roe_Scheme_Flux_PV(T* primL, T* primR,int iFace, T* flux,
+    FaceProxy* face_proxy, InviscidSchemeParameter* invSchemePara);
+
+//! GMRES3D 
+template <typename T>
+void Cal_GMRES_Steger_Scheme_Flux_PV(T* primL, T* primR,int iLen, T* flux,
+    FaceProxy* face_proxy, InviscidSchemeParameter* invSchemePara);
+
+//! GMRESnolim  primcc: primitive variables at the cell center, primf: primitive variables at the face
+void cal_ReConstructFaceValue(RDouble* primcc, RDouble* dqdx, RDouble* dqdy, RDouble* dqdz,
+                              RDouble dx, RDouble dy, RDouble dz, RDouble * primf,
+                              InviscidSchemeParameter* invSchemePara);
+//! using conservative variables
+void Cal_GMRES_Roe_Scheme_Flux(RDouble* primL, RDouble* primR, RDouble* qCvL, RDouble* qCvR, int iFace, RDouble* flux,
+    FaceProxy* face_proxy, InviscidSchemeParameter* invSchemePara);
+
+//! GMRES CSR
+int GetIndexOfBlockJacobianMatrix(vector<int> &AI, vector<int> &AJ, int nEquation, int rCell, int qCell);
+#endif
+
+//! This Roe scheme is coding by the primitive variable way, in which the DF is split into three parts.
+void Roe_Scheme_PrimitiveForm(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+void Steger_Scheme (FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+void Ausmdv_Scheme (FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+void Ausmpw_Scheme (FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+void AusmpwPlus_Scheme (FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+void Hlle_Scheme   (FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+void Vanleer_Scheme(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+void Rotate_Vanleer_Scheme(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara);
+
+RDouble FMSplit1(const RDouble &mach, const RDouble &ipn);
+RDouble FMSplit2(const RDouble &mach, const RDouble &ipn);
+RDouble FMSplit4(const RDouble &mach, const RDouble &beta, const RDouble &ipn);
+RDouble FPSplit5(const RDouble &mach, const RDouble &alpha, const RDouble &ipn);
+RDouble FMmpn(const RDouble &mach, const RDouble &ipn);
+RDouble FMppn(const RDouble &mach, const RDouble &ipn);
+
+void RoeAveragedVariables(RDouble rhoLeft, RDouble uLeft, RDouble vLeft, RDouble wLeft, RDouble pLeft, RDouble gamaLeft, 
+                          RDouble rhoRight, RDouble uRight, RDouble vRight, RDouble wRight, RDouble pRight, RDouble gamaRight,
+                          RDouble &rhoRoe, RDouble &uRoe, RDouble &vRoe, RDouble &wRoe, RDouble &pRoe);
+
+//! @brief The parameters that inviscid flux computing need.
+//!        These data are compacted into this class to fill the need of OpenMP parallel.
+//!        If not, would lead to data completion problems.
+class InviscidSchemeParameter
+{
+public:
+    InviscidSchemeParameter();
+    ~InviscidSchemeParameter();
+
+private:
+    int nLen;
+    int nm;
+    int nLaminar;
+    int nEquation;
+    int nChemical;
+    int nPrecondition;
+    int nTemperatureModel;
+    int nEntrFix;
+    int nNitrogenIndex;
+    int nElectronIndex;
+    int nIdealState;
+    RDouble kPrec;
+    int limiterType;    //! GMRESnolim
+
+    //! GMRESVenkat
+    int limitModel;
+    int limitVector;
+
+    RDouble AusmpwPlusLimiter;
+
+    RDouble refMachNumber;
+
+    RDouble entrFixCoefLeft;
+    RDouble entrFixCoefRight;
+
+    RDouble *gamal; RDouble *gamar;
+    RDouble *lrtl; RDouble *lrtr;
+    RDouble *tcl; RDouble *tcr;
+    RDouble *pcl; RDouble *pcr;
+    RDouble **ql; RDouble **qr;
+    RDouble **qlc; RDouble **qrc;    //! GMRESPassQC
+    RDouble **tl; RDouble **tr;    //! left and right temperature.
+    RDouble **flux;
+    RDouble *xfn; RDouble *yfn; RDouble *zfn;
+    RDouble *xfc; RDouble *yfc; RDouble *zfc;    //! GMRESnolim
+    RDouble *xcc; RDouble *ycc; RDouble *zcc;    //! GMRESnolim
+    RDouble *nsx; RDouble *nsy; RDouble *nsz;    //! GMRESnolim absolute index
+    RDouble *ns; RDouble *vol;   //! GMRESnolim absolute index
+    RDouble ** prim; RDouble *gama;    //! GMRESnolim
+    vector<int>* neighborCells;
+    vector<int>* neighborFaces;
+    vector<int>* neighborLR;
+    vector<int> BCLeftCells;    //! GMRES2ndCorrection
+    vector<int> BCRightCells;   //! GMRES2ndCorrection
+    vector<int> BCFaces;        //! GMRES2ndCorrection
+    RDouble **dqdx; RDouble **dqdy; RDouble **dqdz;    //! GMRESnolim
+    int * qlsign; int * qrsign;    //! GMRESnolim
+    UnstructBCSet* unstructBCSet;    //! GMRES3D
+    RDouble *area;
+    RDouble *vgn;
+    RDouble averageVolume;    //! GMRESVenkat
+
+public:
+    void SetLength(const int nLen) {this->nLen = nLen;}
+    void SetNumberOfLaminar(const int nLaminar) {this->nLaminar = nLaminar;}
+    void Setnm(const int nm) {this->nm = nm;}
+    void SetIfPrecondition(const int nPrecondition) {this->nPrecondition = nPrecondition;}
+    void SetIfIdealState(const int nIdealState) { this->nIdealState = nIdealState; }
+    void SetPreconCoefficient(const RDouble kPrec) { this->kPrec = kPrec; }
+    void SetNumberOfChemical(const int nChemical) {this->nChemical = nChemical;}
+    void SetNumberOfTemperatureModel(const int nTemperatureModel) {this->nTemperatureModel = nTemperatureModel;}
+    void SetNumberOfTotalEquation(const int nEquation) {this->nEquation = nEquation;}
+    void SetIndexOfNitrogen(const int nIndex) {this->nNitrogenIndex = nIndex;}
+    void SetIndexOfElectron(const int nIndex) {this->nElectronIndex = nIndex;}
+    void SetAusmpwPlusLimiter(const RDouble Limiter) {this->AusmpwPlusLimiter = Limiter;}
+    void SetLimiterType(const int limiterType){ this->limiterType = limiterType;}    //!GMRESnolim
+    void SetLimitModel(const int limitModel){ this->limitModel = limitModel;}    //! GMRESVenkat
+    void SetLimitVector(const int limitVector){ this->limitVector = limitVector;}    //! GMRESVenkat
+    void SetAverageVolume(const RDouble averageVolume){ this->averageVolume = averageVolume; }    //! GMRESVenkat
+
+    void SetEntropyFixMethod(const int nEntrFix) {this->nEntrFix = nEntrFix;}
+    void SetEntropyFixCoefficients(const RDouble entrFixCoefLeft, const RDouble entrFixCoefRight)
+    {this->entrFixCoefLeft = entrFixCoefLeft; this->entrFixCoefRight = entrFixCoefRight;}
+    void SetMachNumber(const RDouble refMachNumber) {this->refMachNumber = refMachNumber;}
+    void SetLeftAndRightGama(RDouble *gamal, RDouble *gamar) {this->gamal = gamal; this->gamar = gamar;}
+    void SetLeftAndRightPressureCoefficient(RDouble *lrtl, RDouble *lrtr) {this->lrtl = lrtl; this->lrtr = lrtr;}
+    void SetLeftAndRightTimeCoefficient(RDouble *tcl, RDouble *tcr) {this->tcl = tcl; this->tcr = tcr;}
+    void SetLeftAndRightPreconCoefficient(RDouble *pcl, RDouble *pcr) {this->pcl = pcl; this->pcr = pcr;}
+    void SetLeftAndRightQ(RDouble **ql, RDouble **qr) {this->ql = ql; this->qr = qr;}
+    void SetLeftAndRightQC(RDouble **qlc, RDouble **qrc) {this->qlc = qlc; this->qrc = qrc;}    //! GMRESPassQC
+    void SetLeftAndRightQSign(int* qlsign, int* qrsign) {this->qlsign = qlsign; this->qrsign = qrsign;}    //! GMRESnolim GMRESSign
+    void SetLeftAndRightTemperature(RDouble **tl, RDouble **tr) {this->tl = tl; this->tr = tr;}
+    void SetFlux(RDouble **flux) {this->flux = flux;}
+    void SetFaceNormal(RDouble *xfn, RDouble *yfn, RDouble *zfn) {this->xfn = xfn; this->yfn = yfn; this->zfn = zfn;}
+    void SetFaceArea(RDouble *area) {this->area = area;}
+    void SetFaceVelocity(RDouble *vgn) {this->vgn = vgn;}
+    //! GMRESnolim
+    void SetFaceCenter(RDouble *xfc, RDouble *yfc, RDouble *zfc) {this->xfc = xfc; this->yfc = yfc; this->zfc = zfc;}
+    void SetCellCenter(RDouble *xcc, RDouble *ycc, RDouble *zcc) {this->xcc = xcc; this->ycc = ycc; this->zcc = zcc;}
+    void SetGradient(RDouble ** dqdx, RDouble ** dqdy, RDouble ** dqdz) {this->dqdx = dqdx; this->dqdy = dqdy; this->dqdz = dqdz;}
+    void SetFaceNormalAbs(RDouble *nsx, RDouble *nsy, RDouble *nsz) {this->nsx = nsx; this->nsy = nsy; this->nsz = nsz;}
+    void SetFaceAreaAbs(RDouble *ns) {this->ns = ns;}
+    void SetVolume(RDouble *vol) {this->vol = vol;}
+    void SetPrimitive(RDouble **prim){this->prim = prim;}
+    void SetGama(RDouble* gama){this->gama = gama;}
+    void SetNeighborCells(vector<int>* neighborCells){this->neighborCells=neighborCells;}
+    void SetNeighborFaces(vector<int>* neighborFaces){this->neighborFaces=neighborFaces;}
+    void SetNeighborLR(vector<int>* neighborLR){this->neighborLR=neighborLR;}
+
+    //! GMRES2ndCorrection
+    void SetBCLeftCells(vector<int> BCLeftCells){this->BCLeftCells = BCLeftCells;}
+    void SetBCRightCells(vector<int> BCRightCells){this->BCRightCells = BCRightCells;}
+    void SetBCFaces(vector<int> BCFaces){this->BCFaces = BCFaces;}
+
+    //! GMRES3D
+    void SetUnstructBCSet(UnstructBCSet* unstructBCSet){this->unstructBCSet = unstructBCSet;}
+
+
+    int GetLength() {return this->nLen;}
+    int Getnm() {return this->nm;}
+    int GetNumberOfLaminar() {return this->nLaminar;}
+    int GetNumberOfTotalEquation() {return this->nEquation;}
+    int GetNumberOfChemical() {return this->nChemical;}
+    int GetNumberOfTemperatureModel() {return this->nTemperatureModel;}
+    int GetIndexOfNitrogen() {return this->nNitrogenIndex;}
+    int GetIndexOfElectron() {return this->nElectronIndex;}
+
+    int GetEntropyFixMethod() {return this->nEntrFix;}
+    int GetIfPrecondition() {return this->nPrecondition;}
+    int GetIfIdealState() { return this->nIdealState; }
+    RDouble GetPreconCoefficient() { return this->kPrec; }
+    int GetLimiterType(){ return this->limiterType;}    //! GMRESnolim
+    int GetLimitModel(){ return this->limitModel;}    //! GMRESVenkat
+    int GetLimitVector(){ return this->limitVector;}    //! GMRESVenkat
+    RDouble GetAverageVolume(){ return this->averageVolume; }    //! GMRESVenkat
+
+    RDouble GetAusmpwPlusLimiter() {return this->AusmpwPlusLimiter;}
+
+    RDouble GetLeftEntropyFixCoefficient() {return this->entrFixCoefLeft;}
+    RDouble GetRightEntropyFixCoefficient() {return this->entrFixCoefRight;}
+    RDouble GetMachNumber() {return this->refMachNumber;}
+    RDouble *GetLeftGama() {return this->gamal;}
+    RDouble *GetRightGama() {return this->gamar;}
+
+    RDouble *GetLeftPressureCoefficient() {return this->lrtl;}
+    RDouble *GetRightPressureCoefficient() {return this->lrtr;}
+
+    RDouble *GetLeftTimeCoefficient() {return this->tcl;}
+    RDouble *GetRightTimeCoefficient() {return this->tcr;}
+
+    RDouble *GetLeftPreconCoefficient() {return this->pcl;}
+    RDouble *GetRightPreconCoefficient() {return this->pcr;}
+
+    RDouble **GetLeftQ() {return this->ql;}
+    RDouble **GetRightQ() {return this->qr;}
+
+    RDouble **GetLeftQC() {return this->qlc;}    //! GMRESPassQC
+    RDouble **GetRightQC() {return this->qrc;}   //! GMRESPassQC
+
+    int* GetLeftQSign() {return this->qlsign;}    //! GMRESSign GMRESnolim
+    int* GetRightQSign() {return this->qrsign;}   //! GMRESSign GMRESnolim
+
+    RDouble** GetLeftTemperature() {return this->tl;}
+    RDouble** GetRightTemperature() {return this->tr;}
+
+    RDouble **GetFlux() {return this->flux;}
+    RDouble *GetFaceNormalX() {return this->xfn;}
+    RDouble *GetFaceNormalY() {return this->yfn;}
+    RDouble *GetFaceNormalZ() {return this->zfn;}
+    RDouble *GetFaceArea() {return this->area;}
+    RDouble *GetFaceVelocity() {return this->vgn;}
+    
+    //! GMRESnolim
+    RDouble *GetFaceCenterX() {return this->xfc;}
+    RDouble *GetFaceCenterY() {return this->yfc;}
+    RDouble *GetFaceCenterZ() {return this->zfc;}
+    RDouble *GetCellCenterX() {return this->xcc;}
+    RDouble *GetCellCenterY() {return this->ycc;}
+    RDouble *GetCellCenterZ() {return this->zcc;}
+    RDouble **GetGradientX() {return this->dqdx;}
+    RDouble **GetGradientY() {return this->dqdy;}
+    RDouble **GetGradientZ() {return this->dqdz;}
+    RDouble *GetFaceNormalXAbs() {return this->nsx;}
+    RDouble *GetFaceNormalYAbs() {return this->nsy;}
+    RDouble *GetFaceNormalZAbs() {return this->nsz;}
+    RDouble *GetFaceAreaAbs(){return this->ns;}
+    RDouble *GetVolume(){return this->vol;}
+    RDouble **GetPrimitive(){return this->prim;}
+    RDouble *GetGama(){return this->gama;}
+    vector<int>* GetNeighborCells() {return this->neighborCells;}
+    vector<int>* GetNeighborFaces() {return this->neighborFaces;}
+    vector<int>* GetNeighborLR() {return this->neighborLR;}
+
+    //! GMRES2ndCorrection
+    vector<int> GetBCLeftCells() {return this-> BCLeftCells;}
+    vector<int> GetBCRightCells() {return this-> BCRightCells;}
+    vector<int> GetBCFaces() {return this-> BCFaces;}
+
+    //! GMRES3D
+    UnstructBCSet* GetUnstructBCSet() {return this->unstructBCSet;}
+};
+
+}
diff --git a/API/Physics/include/Flux_RoeEntropyCorrection.h b/API/Physics/include/Flux_RoeEntropyCorrection.h
new file mode 100644
index 0000000..3862355
--- /dev/null
+++ b/API/Physics/include/Flux_RoeEntropyCorrection.h
@@ -0,0 +1,76 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Flux_RoeEntropyCorrection.h
+//! @brief     This file defines the entropy correction (fix) method in Roe inviscid flux method.
+//! @author    Bell, Liu Jian.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "Math_BasisFunction.h"
+#ifdef USE_GMRESSOLVER
+#include "Sacado.hpp"
+#endif
+namespace PHSPACE
+{
+#ifdef USE_GMRESSOLVER
+//! GMRESAD
+typedef Sacado::Fad::DFad<RDouble> ADReal;
+
+//! The entropy correction (fix) in Roe scheme of inviscid flux, which is used to limit the magnitude of the three eigenvalue.\n
+//!    @param[in] eigv1,2,3                    The three eigenvalue, which are V/V+c/V-c on the face. They will be corrected and returned.\n
+//!    @param[in] vn                           The normal velocity on the face.\n
+//!    @param[in] absVel                       The absolute velocity on the face.\n
+//!    @param[in] RoeEntropyCorrectionMethod   The Roe entropy correction method.\n
+//!    @param[in] entropyCorrectionCoef        The Roe entropy correction coefficient.\n
+template <typename T>
+LIB_EXPORT void Flux_RoeEntropyCorrection(T &eigv1, T &eigv2, T &eigv3, T pressureCoeffL, T pressureCoeffR, 
+                                          T absVel, T vn, T cm, int RoeEntropyCorrectionMethod, T acousticEigenLimit, T convectEigenLimit);
+
+//! Harten type of entropy correction (fix).\n
+//!    @param[in] eigenValue        The original eigenvalue, which may be invalid.
+//!    @param[in] eigenValueLimit   The epsilon in the Harten formula.
+//!    @return                      The new eigenvalue which has been limited. 
+template <typename T>
+inline T Harten(T eigenValue, T eigenValueLimit)
+{
+    T eigenValueNew = abs(eigenValue);
+    if(eigenValueNew < eigenValueLimit) 
+    {
+        eigenValueNew = 0.5 * (eigenValue * eigenValue + eigenValueLimit * eigenValueLimit) / eigenValueLimit;
+    }
+    return eigenValueNew;
+}
+#else
+    //! The entropy correction (fix) in Roe scheme of inviscid flux, which is used to limit the magnitude of the three eigenvalue.\n
+    //!    @param[in] eigv1,2,3                    The three eigenvalue, which are V/V+c/V-c on the face. They will be corrected and returned.\n
+    //!    @param[in] vn                           The normal velocity on the face.\n
+    //!	   @param[in] absVel                       The absolute velocity on the face.\n
+    //!    @param[in] RoeEntropyCorrectionMethod   The Roe entropy correction method.\n
+    //!    @param[in] entropyCorrectionCoef        The Roe entropy correction coefficient.\n
+    LIB_EXPORT void Flux_RoeEntropyCorrection(RDouble &eigv1, RDouble &eigv2, RDouble &eigv3, RDouble pressureCoeffL, RDouble pressureCoeffR, 
+        RDouble absVel, RDouble vn, RDouble cm, int RoeEntropyCorrectionMethod, RDouble acousticEigenLimit, RDouble convectEigenLimit);
+
+    //! Harten type of entropy correction (fix).\n
+    //!    @param[in] eigenValue        The original eigenvalue, which may be invalid.
+    //!    @param[in] eigenValueLimit   The epsilon in the Harten formula.
+    //!    @return                      The new eigenvalue which has been limited. 
+    inline RDouble Harten(RDouble eigenValue, RDouble eigenValueLimit)
+    {
+        RDouble eigenValueNew = ABS(eigenValue);
+        if(eigenValueNew < eigenValueLimit) 
+        {
+            eigenValueNew = 0.5 * (eigenValue * eigenValue + eigenValueLimit * eigenValueLimit) / eigenValueLimit;
+        }
+        return eigenValueNew;
+    }
+#endif
+}
diff --git a/API/Physics/include/Force.h b/API/Physics/include/Force.h
new file mode 100644
index 0000000..8a1352a
--- /dev/null
+++ b/API/Physics/include/Force.h
@@ -0,0 +1,106 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Force.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+#include "DataContainer.h"
+using namespace std;
+
+namespace PHSPACE
+{
+
+class ActionKey;
+class DataContainer;
+class AerodynamicForceManager;
+class AerodynamicForce;
+
+class Force
+{
+public:
+    static const int ALL_SOLID_WALL = -1;
+
+    //! Number of force variables.
+    static const int nForceVar = 16;
+
+private:
+    //! Number of solid wall part.
+    int numberofSolidWallPart;
+
+    //! Number of total part, is numberofSolidWallPart plus ONE.
+    //! 'ONE' represent the total solid wall force, stored on the first position.
+    int numberofTotalPart;
+
+    //! The corresponding Boundary Condition ID of each part.
+    int *partBCID;
+
+    RDouble *cpx, *cpy, *cpz;
+    RDouble *cl_tot, *cd_tot, *cd_pr, *cd_sf, *cd_cl2pa, *xcp, *ycp, *zcp, *side;
+    RDouble *CA_f, *CA_p, *CN_f, *CN_p, *CZ_f, *CZ_p, *Cl_f, *Cl_p, *Cn_f, *Cn_p, *Cm_f, *Cm_p;
+
+    int numberOfBody;
+    vector < vector <string> > wallNameOfEachBody;
+    RDouble *CA_f_body, *CN_f_body, *CZ_f_body, *Cl_f_body, *Cn_f_body, *Cm_f_body;
+    RDouble *CA_p_body, *CN_p_body, *CZ_p_body, *Cl_p_body, *Cn_p_body, *Cm_p_body;
+
+    RDouble *hingeMoment; 
+    RDouble attack, sideslip;
+    RDouble forceReferenceArea, forceReferenceLength, forceReferenceLengthSpanWise;
+
+public:
+    Force();
+    ~Force();
+
+public:
+    void Init(RDouble attack, RDouble sideslip, RDouble forceReferenceArea, RDouble forceReferenceLength, RDouble forceReferenceLengthSpanWise);
+    void CollectionForce(DataContainer *data_in);
+    void CompForce();
+    void DumpForce(int outnstep,std::ostringstream &oss);
+    void DumpPartForce(int outnstep, int partID, std::ostringstream &oss);
+    void DumpForce(ActionKey *actkey, int outnstep);
+    void DumpData(DataContainer *data);
+
+    //! Dump all force data in forcefile.
+    void DumpAllForceData(ActionKey *actkey, int outnstep);
+
+    //! Dump global force data.
+    void DumpAllGlobalForceData(const string &partName, int partID, std::ostringstream &oss);
+
+    //! Dump local force data.
+    void DumpAllLocalForceData(const string &partName, int partID, std::ostringstream &oss);
+
+    void DumpBodyForceData(int bodyID, std::ostringstream &oss);
+private:
+    bool isPartExist;
+};
+
+void InitForce();
+void CollectionForce(ActionKey *actkey);
+void DumpForce(ActionKey *actkey);
+
+class AerodynamicForceComponent
+{
+public:
+    AerodynamicForceComponent();
+    ~AerodynamicForceComponent();
+protected:
+    static vector< std::set< string > > components;
+    static bool initialize;
+public:
+    static void Initialize();
+    static bool FaceInAerodynamicForceComponents(string componentName, int aerodynamicForceComponentIndex);
+};
+
+bool FaceInAerodynamicForceComponents(string componentName, int aerodynamicForceComponentIndex);
+
+}
diff --git a/API/Physics/include/Gas.h b/API/Physics/include/Gas.h
new file mode 100644
index 0000000..1b47fd5
--- /dev/null
+++ b/API/Physics/include/Gas.h
@@ -0,0 +1,1242 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Gas.h
+//! @brief     Explain this file briefly.
+//! @author    Wan YunBo.
+
+#pragma once
+#include "Precision.h"
+#include "DataContainer.h"
+#include "Constants.h"
+#include <string>
+#include "Geo_UnstructGrid.h"
+#pragma warning(disable:4100)
+
+using namespace std;
+
+namespace PHSPACE
+{
+namespace GAS_SPACE
+{
+//! General gas constant,the unit is J/(Mol*K).
+//! const RDouble rjmk = 8.31434;
+const RDouble rjmk = GeneralGasConstant;
+
+class FluidParameter
+{
+private:
+    RDouble machnumber;
+    RDouble density, pressure, temperature;
+    RDouble sound_velocity, enthalpy;       //! The speed of sound, enthapy.
+    RDouble velocity, velocity_x, velocity_y, velocity_z;
+    RDouble viscosity;
+    RDouble average_molecular_weight;
+    RDouble reynoldsnumber;
+    RDouble average_gamma;
+    RDouble average_Rg;
+public:
+    RDouble GetDensity() const { return density; }
+    void SetDensity(RDouble density) { this->density = density; }
+
+    RDouble GetPressure() const { return pressure; }
+    void SetPressure(RDouble pressure) { this->pressure = pressure; }
+
+    RDouble GetTemperature() const { return temperature; }
+    void SetTemperature(RDouble temperature) { this->temperature = temperature; }
+
+    RDouble GetVelocity() const { return velocity; }
+    void SetVelocity(RDouble velocity) { this->velocity = velocity; }
+
+    RDouble GetMachNumber() const { return machnumber; }
+    void SetMachNumber(RDouble machnumber) { this->machnumber = machnumber; }
+
+    RDouble GetViscosity() const { return viscosity; }
+    void SetViscosity(RDouble viscosity) { this->viscosity = viscosity; }
+
+    RDouble GetSoundVelocity() const { return sound_velocity; }
+    void SetSoundVelocity(RDouble sound_velocity) { this->sound_velocity = sound_velocity; }
+
+    RDouble GetAverageMolecularWeight() const { return average_molecular_weight; }
+    void SetAverageMolecularWeight(RDouble average_molecular_weight) { this->average_molecular_weight = average_molecular_weight; }
+
+    RDouble GetReynoldsNumber() const { return reynoldsnumber; }
+    void SetReynoldsNumber(RDouble reynoldsnumber) { this->reynoldsnumber = reynoldsnumber; }
+
+    RDouble GetAverageSpecificHeatRatio() const { return average_gamma; }
+    void SetAverageSpecificHeatRatio(RDouble average_gamma) { this->average_gamma = average_gamma; }
+
+    RDouble GetAverageGeneralGasConstant() const { return average_Rg; }
+    void SetAverageGeneralGasConstant(RDouble average_Rg) { this->average_Rg = average_Rg; }
+};
+
+typedef struct{
+    RDouble H, E, Etr, Ev, Ee, gama, Cv, Cp, Cvtr, Cvv, Cve, Rm, Rme;
+    RDouble *Cps, *Cvs, *Cvtrs, *Cvvs, *Cves;
+    RDouble *Hs, *Es, *Etrs, *Evs, *Ees, *Rms;
+    RDouble *forwardRates, *backwardRates, *collisionRates;
+    RDouble **OmegaDerivative, **partialValues, **partialValues2;
+}Thermo_Energy;
+
+typedef float RealData;
+
+class Thermo_Energy_Data
+{
+    RDouble H, E, Etr, Ev, Ee, gama, Cv, Cp, Cvtr, Cvv, Cve, Rm, Rme;
+    RDouble *Cps, *Cvs, *Cvtrs, *Cvvs, *Cves;
+    RDouble *Hs, *Es, *Etrs, *Evs, *Ees, *Rms;
+
+    public:
+    Thermo_Energy_Data(int numberOfSpecies);
+    Thermo_Energy_Data();
+    ~Thermo_Energy_Data();
+    void Init(int numberOfSpecies, int ntmodel);
+    void freeData();
+};
+
+class Thermo_Energy_DB
+{
+    Thermo_Energy_Data *Data;
+    int nmax;
+    int ni, nj, nk;
+    int istart, jstart, kstart;
+    int numberOfSpecies;
+    public:
+    Thermo_Energy_DB(int imin, int imax ,int jmin, int jmax, int kmin, int kmax, int numberSpecies, int ntmodel);
+    ~Thermo_Energy_DB();
+
+    Thermo_Energy_Data * GetThermo_Energy_Data(int i, int j ,int k);
+
+};
+
+class Gas
+{
+public:
+    Gas();
+    virtual ~Gas() {};
+public:
+    int wallMultiTemperature;
+    int nDiagonalModified;
+    int nDiagonalModifiedTurb;
+    RDouble trTemperatureMinNonDim;
+public:
+    virtual int GetSpeciesEquationNumber() const {return 0;}
+    virtual int GetNitrogenIndex() const {return 0;}
+    virtual int GetElectronIndex() const {return 0;}
+    virtual void SetSpeciesEquationNumber(int ns) {}
+    virtual void SetNitrogenIndex(int nn) {}
+    virtual void SetElectronIndex(int ne) {}
+    virtual RDouble GetElectronMolecularWeight() const {return 1.894e-5;}
+    virtual void SetElectronMolecularWeight(RDouble me) {}
+    virtual RDouble GetDimensionalElectronMolecularWeight() const {return 5.486e-7;}
+    virtual int GetNSEquationNumber() const {return 5;}; 
+    virtual int GetLaminarNumber() const {return 5;};
+    virtual int GetTemperatureModel() const {return 1;};
+    virtual int GetChemicalType() const {return 0;};
+    virtual int GetnLastSpeciesIndex() const {return 0;};
+    virtual void GetReferenceParameters(FluidParameter &refParam){};
+    virtual RDouble * GetInitMassFraction() const { return NULL; }
+    virtual RDouble ComputeReferenceTotalEnthalpy() {return 0.0;};
+    virtual RDouble GetMolecularDiameter() {return 3.6e-10;};
+    virtual int GetGasModelType() {return 0;};
+    int GetnDiagonalModified() const {return nDiagonalModified;};
+    int GetnDiagonalModifiedTurb() const {return nDiagonalModifiedTurb;};
+    virtual int GetnSpeciesForWallMethod() const {return 0;}
+    virtual int GetnDensityForWallMethod() const {return 0;}
+public:
+    virtual int GetmTT() const {return 0;}
+    virtual int GetmTV() const {return 0;}
+    virtual int GetmTE() const {return 0;}
+    virtual int GetnEnergyRecycle() const {return 0;}
+    virtual int GetnChemcalSourceModified() const {return 0;}
+    virtual RDouble GetTemperatureMin(){return 0;};
+    virtual RDouble GetTemperatureMax(){return 0;};
+    virtual Thermo_Energy *GetThermo_Energy_temparay(){ return NULL;};
+
+    virtual RDouble GetveTemperatureMinNonDimensional() const {return 0.0;}
+    virtual RDouble GettrTemperatureMinNonDimensional() const {return 0.0;}
+
+    virtual void SetNonequilibriumCondition(int nMask){}
+    virtual void SetFrozenCondition(RDouble err){}
+    virtual int GetNonequilibriumCondition() const {return 0;}
+    virtual RDouble GetFrozenCondition() const {return 1.0e-5;}
+
+    int GetwallMultiTemperature() const {return wallMultiTemperature;}
+public:
+    virtual void AllocateWorkingSpace(){};
+    virtual void DeAllocateWorkingSpace(){};
+    virtual void InitCommonParameter(){};
+    virtual void InitOtherParameter(){};
+    virtual void ComputeReferenceParameter(){};
+    virtual void ComputeReferenceTsuth(){};
+
+    virtual void ComputeReferenceViscosityDimensionalChemical(){};
+    virtual void ComputeReferenceSpecificHeatRatio(){};
+    virtual void ComputeReferenceGeneralGasConstant(){};
+
+    virtual void ComputeReferenceSpecificHeatRatioWithChemical(){};
+    virtual void ComputeReferenceViscosityDimensionalNoChemical(){};
+    virtual void ComputeReferenceViscosityDimensional(){};
+    virtual void ComputeReferenceGasInformation(){};
+    virtual void ComputeReferenceSoundVelocity(){};
+    virtual void ComputeReferenceInitMassFractionInformation(){};
+    virtual void ComputeReferenceMolecularInformation(){};
+    virtual void ComputeReferenceMolecularInformationWithChemical(){};
+    virtual void ComputeReferenceMolecularInformationWithoutChemical(){};
+    virtual void ComputeReferenceVelocity(){};
+    virtual void ComputeReferenceReynoldsNumber(){};
+    virtual void ComputeProperReynoldsNumberForGrid(){};
+    virtual void ComputeOtherProperParameterForGrid(){};
+    virtual RDouble ComputeReferenceReynoldsNumberFromTotalPT(void) { return 0.0; }
+    virtual void ComputeDensityWithReynoldsNumber(){};
+    virtual void ComputePressureInGasStateEquation(){};
+    virtual void InitReferenceParameter(){};
+    virtual void InitNumberOfSpecies(){};
+    virtual void ComputeCoefficientOfStateEquation(){};
+
+    //! Obtain the T, p, rho and c by the height (Rg=287.053, gamma=1.4 are used). However, only the T and p is useful.
+    //! The other two variables will be recomputed to be compatible with the condition of chemical reactions existing.
+    virtual void SetAirInformationByDataBase(){};
+
+    //! Obtain the T, p, rho and c by the T0, P0, Ma (Rg=287.053, gamma=1.4 are used){}. However, only the T and p is useful.
+    //! The other two variables will be recomputed to be compatible with the condition of chemical reactions existing.
+    virtual void SetAirInformationByExpData(int useSetting){};
+    virtual void SetAirInformationByExpData(){};
+
+    //! This function is mainly for the average density of the mixture in chemical reactions.
+    //! The value of mixture density has little difference with that of no chemical reaction, which can be ignored.
+    virtual void NormalizeAirInformation(){};
+
+    virtual void ComputeReferencePrimitive(){};
+
+    virtual void CreateAllDataClass(int numberOfSpecies, int numberOfReaction){};
+    virtual void Read(fstream &file){};
+    virtual void Read(DataContainer *cdata){};
+    virtual void Write(DataContainer *cdata){};
+
+    virtual void SetMaximumSpecies(RDouble *mass_fraction_ref){};
+    virtual RDouble * GetMaximumSpecies() const { return NULL;}
+public:
+    virtual void CompressData  (DataContainer *&cdata){};
+    virtual void DecompressData(DataContainer *cdata){};
+    virtual RDouble * GetLaminarSchmidtNumberReciprocal  () const {return 0;};
+    virtual RDouble * GetTurbulenceSchmidtNumberReciprocal() const {return 0;};
+public:
+    //! To obtain the laminar Schmidt number of each component.
+    virtual void GetLaminarSchmidtNumber  (RDouble *Scl) const {};
+    //! To obtain the turbulent Schmidt number of each component.
+    virtual void GetTurbulenceSchmidtNumber(RDouble *Sct) const {};
+    //! To obtain the molecular weight of each component.
+    virtual RDouble * GetMolecularWeight() const {return 0;}
+    virtual RDouble * GetMolecularWeightDimensional() const {return 0;}
+
+    virtual int  GetNumberOfSpecies() const{return 0;};
+    virtual void SetNumberOfSpecies(int numberOfSpecies) {}
+    virtual void InitGlobalParameterOfNSEquation(){};
+    virtual void ReadGasModel(fstream &file){};
+    //! To Generate the gas model.
+    //! Param[in]: chemicalModel indicates the name of the chemical model.
+    //! Param[in]: ns indicates the number of species.
+    //! Param[in]: nr indicates the number of reactions.
+    virtual void CreateGasModel(string chemicalModel, int ns, int nr){};
+
+    virtual void InitGasModel(){};
+    //! To import the data of gas model from file.
+    virtual void ReadGasModel(){};
+
+    virtual void GetTemperatureRangeIndex(const RDouble &temperature_dimensional, int &indexOfTemperatureRange){};
+    virtual RDouble GetCoefficientOfStateEquation(){return 0;};
+    virtual string * GetNameOfSpecies() const{return 0;};
+
+    virtual void GetElectronMolecularWeightAndMassFraction(RDouble *massFraction, RDouble &ce, RDouble &Me){};
+
+    //! Compute pressure when the total internal energy e is known.
+    //! @param[in ]: primitiveVars is the array that stores the primitive variables.
+    //! @param[in ]: gama is the specific heat ratio.
+    //! @param[in ]: internalEnergy denotes the total internal energy that equals to the density multiplies the specific internal energy.
+    //! @param[in ]: temperature denotes the translation-rotation temperature in the one-temperature model.
+    //! @param[out]: pressure is the returned value that denotes the pressure of the mixed gas.
+    virtual void GetPressure(RDouble *primitiveVars, RDouble gama, RDouble internalEnergy, RDouble temperature, RDouble &pressure){};
+
+    //! To obtain the non-dimensional enthalpy of each species in accordance with the temperature of mixture gas.
+    //! @param[in ]: temperature denotes the non-dimensional temperature of the mixture gas.
+    //! @param[out]: speciesEnthaly saves the non-dimensional static enthalpy of each species.
+    virtual void ComputeSpeciesEnthalpy(RDouble temperature, RDouble *speciesEnthaly){};
+
+    //! To obtain the dimensional total enthalpy of each species in accordance with the temperature of mixture gas.
+    //! @param[in ]: temperature denotes the dimensional temperature of the mixture gas.
+    //! @param[out]: speciesEnthaly saves the dimensional total enthalpy of each species.
+    virtual void ComputeSpeciesEnthalpyDimensional(RDouble temperature, RDouble *speciesEnthaly){};
+
+    //! To obtain the non-dimensional molecular weight of the mixture gas in accordance with the mass fraction of each species.
+    //! @param[in ]: massFraction is an array saving the mass fraction of each species.
+    virtual RDouble GetMixedGasMolecularWeight(RDouble *massFraction){return 0;};
+
+    //! To obtain the non-dimensional molecular weight of the mixture gas eliminating electron.
+    //! @param[in ]: massFraction is an array saving the mass fraction of each species.
+    //! @param[out]: ceDivideMe is the value of the electron mass fraction dividing the electron molecular weight.
+    virtual RDouble GetMixedGasMolecularWeightReciprocalWithoutElectron(RDouble *massFraction, RDouble &ceDivideMe){return 0;};
+
+    //! To obtain the non-dimensional universal gas constant called R = 8.314J/(mol*K).
+    virtual RDouble GetUniversalGasConstant(){return 0;};
+
+    //! To obtain the static enthalpy of the mixed gas.
+    //! @param[in ]: massFraction is an array saving the mass fraction of each species.
+    //! @param[in ]: temperature denotes the non-dimensional temperature of the mixture gas.
+    //! @param[out]: return the non-dimensional value of static enthalpy of mixed gas.
+    virtual RDouble GetMixtureGasEnthalpy(RDouble *massFraction, RDouble temperature){return 0;};
+
+    //! To obtain the non-dimensional constant pressure specific heat called cp according to the mass fraction of each species.
+    //! @param[in ]: massFraction is an array saving the mass fraction of each species.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! @param[out]: mixedcp denotes the non-dimensional constant pressure specific heat of the mixture gas.
+    virtual void ComputeConstantPressureSpecificHeatByMassFraction(RDouble *massFraction, RDouble temperature, RDouble &mixedcp){};
+
+    //! To obtain the non-dimensional constant pressure specific heat called cp of each species by fitting formula.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! @param[out]: cpSpecies is an array saving the non-dimensional constant pressure specific heat of each species.
+    virtual void ComputeSpeciesConstantPressureSpecificHeat(RDouble temperature, RDouble *cpSpecies){};
+
+    //! To obtain the dimensional constant pressure specific heat called cp[J/(kg*K)] of each species by fitting formula.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! @param[out]: cpSpeciesDimensional is an array saving the dimensional constant pressure specific heat of each species.
+    virtual void ComputeSpeciesConstantPressureSpecificHeatDimensional(RDouble temperature, RDouble *cpSpeciesDimensional){};
+
+    //! To obtain the non-dimensional constant volume specific heat called cv according to the mass fraction of each species.
+    //! @param[in ]: massFraction is an array saving the mass fraction of each species.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! @param[out]: mixedGasCv denotes the non-dimensional constant volume specific heat of the mixture gas.
+    virtual void ComputeConstantVolumeSpecificHeatByMassFraction(RDouble *massFraction, RDouble temperature, RDouble &mixedGasCv){};
+
+    //! To obtain the dimensional constant volume specific heat called cv[J/(kg*K)] of each species by fitting formula.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! @param[out]: cvSpeciesDimensional is an array saving the dimensional constant volume specific heat of each species.
+    virtual void ComputeSpeciesConstantVolumeSpecificHeatDimensional(RDouble temperature, RDouble *cvSpeciesDimensional){};
+
+    //! To obtain the non-dimensional constant volume specific heat called cv of each species by fitting formula.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! @param[out]: cvSpecies is an array saving the non-dimensional constant volume specific heat of each species.
+    virtual void ComputeSpeciesConstantVolumeSpecificHeat(RDouble temperature, RDouble *cvSpecies){};
+
+    //! To obtain the non-dimensional viscosity of each species according to the Blotter fitting formula.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! @param[out]: viscosityOfSpecies is an array saving the non-dimensional viscosity of each species.
+    virtual void ComputeOneTemperatureModelSpeciesViscosity(RDouble temperature, RDouble *viscosityOfSpecies){};
+
+    //! To obtain the dimensional viscosity of each species according to the Blotter fitting formula.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! @param[out]: viscosityOfSpeciesDimensional is an array saving the dimensional viscosity of each species [N*s/m2]
+    virtual void ComputeOneTemperatureModelSpeciesViscosityDimensional(RDouble temperature, RDouble *viscosityOfSpeciesDimensional){};
+
+    virtual void ComputeMixtureByMassFraction(RDouble *massFraction, RDouble *mixtureOfSpecies, RDouble &mixture){};
+    virtual void ComputeMixtureByPrimitive(RDouble *prim, RDouble *mixtureOfSpecies, RDouble &mixture){};
+    virtual void ComputeMixtureCoefficientByWilkeFormula(RDouble *moleFractionOfSpecies, RDouble *chem_var, RDouble *chem_phi){};
+
+    virtual void ComputeMixtureByWilkeFormula(RDouble *moleFractionOfSpecies, RDouble *mixtureOfSpecies, RDouble *phiOfSpecies, RDouble &mixture){};
+
+    //! To obtain the mass fraction of each species according to other fraction of each species.
+    //! @param[in ]: fractionOfSpecies is an array of saving the fraction of each specie,such as mole fraction,volume fraction.
+    virtual void MassFractionConversion(RDouble *fractionOfSpecies){};
+    //! To obtain the mole fraction of each species according to the mass fraction of each species.
+    //! @param[in ]: massFractionOfSpecies is an array of saving the mass fraction of each species.
+    //! @param[out]: moleFractionOfSpecies is an array of saving the mole fraction of each species.
+    virtual void ComputeMoleFractionByMassFraction(RDouble *massFractionOfSpecies, RDouble *moleFractionOfSpecies){};
+
+    //! To compute the non-dimensional temperature of the mixture gas in accordance with primary variables saving in the array of prim.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[out]: temperature is the non-dimensional value of temperature.
+    virtual void ComputeTemperature(RDouble *primitiveVariables, RDouble &temperature){};
+
+    //! To compute the non-dimensional temperature of the mixture gas in accordance with primary variables saving in the array of prim.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[out]: transRotationTemperature is the non-dimensional value of translation-rotation temperature.
+    //! @param[out]: vibrationTemperature is the non-dimensional value of vibration temperature.
+    //! @param[out]: electronTemperature is the non-dimensional value of electron temperature.
+    virtual void GetTemperature(RDouble *primitiveVariables, RDouble &transRotationTemperature, RDouble &vibrationTemperature, RDouble &electronTemperature){};
+    virtual void GetTemperatureR(RDouble *primitiveVariables, RDouble &transRotationTemperature, RDouble &vibrationTemperature, RDouble &electronTemperature,int m =0){};
+
+    //! To obtain the mass fraction of the last species with the label ns-1.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    virtual void NormalizePrimitive(RDouble *primitiveVariables){};
+    virtual void NormalizePrimitiveR(RDouble *primitiveVariables){};
+
+    //! Compute the molecular weight reciprocal of the mixed gas.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[out]: massReciprocal denotes the reciprocal of the molecular weight.
+    virtual void ComputeMolecularWeightReciprocal(RDouble *primitiveVariables, RDouble &massReciprocal){};
+
+    virtual void ComputeMolecularWeightReciprocalDimensional(RDouble *prim, RDouble &omavDimensional){};
+
+    //! Compute the specific heat at constant pressure using the Eucken method.
+    //! @param[out]: cpSpecies is an array to saving the specific heat at constant pressure of each species.
+    virtual void ComputeSpeciesConstantPressureSpecificHeatByEuckenFormula(RDouble *cpSpecies){};
+
+    //! Compute the static enthalpy with the primitive variables.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: gama is the specific heat ratio.
+    //! @param[out]: enthalpy denotes the static enthalpy.
+    //! @param[in ]: temperatures stores the translation-rotation temperature, vibration temperature and the electron temperature.
+    virtual void ComputeEnthalpyByPrimitive(RDouble *primitiveVariables, RDouble &gama, RDouble &enthalpy, RDouble* temperatures){};
+
+    //! To obtain the total energy E = e + 1/2*V2.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables, gama is the specific heat ratio of the mixture gas.
+    //! @param[in ]: vibrationTemperature is non-dimensional value of vibration temperature.
+    //! @param[in ]: electronTemperature is non-dimensional value of electron  temperature.
+    //! @param[OUT]: totalEnergy denotes the total internal energy of the mixed gas.
+    virtual void ComputeInternalEnergy(RDouble *primitiveVariables, RDouble gama, RDouble vibrationTemperature, RDouble electronTemperature, RDouble &totalEnergy){};
+
+    //! To compute the total enthalpy and the difference of the static enthalpy.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: gama is the specific heat ratio.
+    //! @param[in ]: deltaQ is an array to saving the differences of the primitive variables.
+    //! @param[out]: deltaEnthalpy denotes the difference of static enthalpy.
+    //! @param[out]: totalEnthalpy denotes the total enthalpy.
+    virtual void ComputeDHAndTotalEnthalpy(RDouble *primitiveVariables, RDouble &gama, RDouble *deltaQ, RDouble &deltaEnthalpy, RDouble &totalEnthalpy){};
+
+    //! This function is used for perfect gas and single temperature model.
+    //! To compute the total enthalpy and the variable dh in the function MXDQ_STD(). dh=b2, b2 denotes the coefficient \n
+    //! of the vector M*dQ which can be referred to the forumla (A.7) and (A.8) in the appendix A of the PHengLEI Theory manual.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: gama is the specific heat ratio.
+    //! @param[in ]: deltaQ is an array to saving the differences of the primitive variables.
+    //! @param[out]: totalEnthalpy denotes the total enthalpy.
+    //! @param[out]: deltaEnthalpy denotes the difference of static enthalpy.
+    virtual void ComputeTotalEnthalpyAndDH(RDouble *primitiveVariables, RDouble &gama, RDouble *deltaQ, RDouble &totalEnthalpy, RDouble &deltaEnthalpy){};
+
+    //! To obtain the non-dimensional viscosity of the mixture gas according to the primary variables.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: transRotationTemperature is the non-dimensional translation-rotation temperature of the mixture gas.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[in ]: suthTemperature denotes the temperature value in the Sutherland formula.
+    //! @param[out]: viscosity is the non-dimensional viscosity of the mixture gas [N*s/m2].
+    virtual void ComputeViscosityByPrimitive(RDouble *primitiveVariables, RDouble &transRotationTemperature, RDouble &electronTemperature, RDouble &suthTemperature, RDouble &viscosity){};
+
+    //! To Compute the viscosity, heat conductivity and mass diffusion coefficient.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: temperature is the array of temperature for each temperature model.
+    //! @param[out]: viscosity is the non-dimensional viscosity of the mixture gas.
+    //! @param[out]: heatConductivity denotes the array of heat conductivity for each mode.
+    //! @param[out]: rhoDs denotes the array of mass diffusion coefficients for each species.
+    virtual void ComputeTransportCoefficients(RDouble *primitiveVariables, RDouble *temperature, RDouble visTurbulence, RDouble &viscosity, RDouble *heatConductivity, RDouble *rhoDs){};
+    virtual void ComputeTransportCoefficientsR(RDouble *massFractions, RDouble *temperature, RDouble density, RDouble *speciesCps, RDouble *speciesCvvs,RDouble *speciesCves, RDouble visTurbulence, RDouble &viscosity, RDouble *heatConductivity, RDouble *rhoDs){};
+
+    //! To obtain the non-dimensional viscosity of the mixture gas according to the mass fraction of each species.
+    //! @param[in ]: density denotes the non-dimensional value of density of the mixed gas.
+    //! @param[in ]: massFractionOfSpecies is an array of saving the mass fraction of each species.
+    //! @param[in ]: transRotationTemperature is the non-dimensional translation-rotation temperature of the mixture gas.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[in ]: suthTemperature denotes the temperature value in the Sutherland formula.
+    //! @param[out]: viscosity is the non-dimensional viscosity of the mixture gas [N*s/m2].  
+    virtual void ComputeViscosity(RDouble density, RDouble *massFractionOfSpecies, RDouble &transRotationTemperature, RDouble &electronTemperature, RDouble &suthTemperature, RDouble &viscosity){};
+
+    //! To compute the heat conductivity of each species using the Eucken formula.
+    //! @param[in ]: viscosity is array of saving the species viscosity.
+    //! @param[in ]: cps is the array of saving the species values of specific heat at constant pressure.
+    //! @param[out]: conductivity is an array of saving the heat conductivity of each species.
+    virtual void ComputeSpeciesHeatConductivityByEuckenFormula(RDouble *viscosity, RDouble *cps, RDouble *conductivity){};
+
+    //! To compute heat conductivity of mixture gas using Eucken formula and Wassilewa relation.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: temperature is the non-dimensional temperature of the mixture gas.
+    //! The function returns the heat conductivity of mixture gas.
+    virtual RDouble ComputeMixtureGasHeatConductivityByWassilewaFormula(RDouble *primitiveVariables, RDouble temperature){return 0;};
+
+    //! To obtain the partition function values based on the targets, e.g conductivity or viscosity.
+    //! @param[in ]: target is array of viscosity or heat conductivity of each species.
+    //! @param[in ]: speciesMass is array of molecular weight.
+    //! @param[in ]: moleFraction is array of mole fraction.
+    //! @param[out]: phi is an array of saving the partition function value of each species.
+    virtual void GetPartitionFunctionValues(RDouble *target, RDouble *speciesMass, RDouble *moleFraction, RDouble *phi){};
+
+    //! Compute the source terms of chemical reaction equations.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[out]: chemicalSourceTerms returns the source terms of chemical reaction equations in the specified control cells.
+    //! @param[in ]: nCellNumber denotes the number of the specified control cells.
+    //virtual void ChemicalSource(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, int nCellNumber){};
+    virtual void ChemicalSource(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, int iCell){};
+    //! Compute the source terms of vibration-electron energy equations.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[in ]: chemicalSourceTerms stores the source terms of chemical reaction equations in the specified control cells.
+    //! @param[out]: energySourceTerms returns the source terms of vibration-electron energy equations in the specified control cells.
+    //! @param[in ]: nCellNumber denotes the number of the specified control cells.
+    virtual void EnergySource(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble **energySourceTerms, int nCellNumber){};
+
+    //! Compute the source term of vibration and electron energy equation.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: omega is the source term of chemical reaction equation.
+    //! @param[in ]: temperature is non-dimensional value of temperatures.
+    //! @param[out]: return the dimensional value of source term of vibration and electron energy equation.
+    virtual RDouble ComputeVibrationAndElectronEnergySourceTerm(RDouble *primitiveVariables, RDouble *omega, RDouble *temperature){return 0;};
+
+    //! Compute the source term of vibration energy equation.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: omega is the source term of chemical reaction equation.
+    //! @param[in ]: temperature is non-dimensional value of temperatures.
+    //! @param[out]: return the dimensional value of source term of vibration energy equation.
+    virtual RDouble ComputeVibrationEnergySourceTerm(RDouble *primitiveVariables, RDouble *omega, RDouble *temperature){return 0.0;};
+
+    //! Compute the source term of electron energy equation.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: omega is the source term of chemical reaction equation.
+    //! @param[in ]: temperature is non-dimensional value of temperatures.
+    //! @param[out]: return the dimensional value of source term of vibration energy equation.
+    virtual RDouble ComputeElectronEnergySourceTerm(RDouble *primitiveVariables, RDouble *omega, RDouble *temperature){return 0.0;};
+
+    //virtual void ChemicalSpectrumRadius(RDouble **q, RDouble **t, RDouble *vol, RDouble **src, int nlen){};
+    virtual void ChemicalSpectrumRadius(RDouble **q, RDouble **t, RDouble *vol, RDouble **src, int iCell){};
+    //! To obtain the approximating polynomial coefficients from the polynomial curve fits in five temperature ranges. \n
+    //! The approximating polynomial is input for evaluating the species specific heats and enthalpies, and the temperature\n
+    //! boundary is smoothed by linearly averaging the polynomial coefficients.
+    //! @param[in ]: nSpecies denotes the species index in the collection.
+    //! @param[in ]: temperature is the dimensional temperature value.
+    //! @param[out]: polynomialCoef is an array of saving the polynomial coefficients.
+    virtual void GetLinearlyAveragedPolynomialCoefficients(int nSpecies, RDouble temperature, RDouble *polynomialCoef){};
+    virtual void GetLinearlyAveragedPolynomialCoefficientsIndex(RDouble temperature, RDouble &coef, int &nIndex1, int &nIndex2){};
+    virtual void GetLinearlyAveragedPolynomialCoefficientsByIndex(int nSpecies, RDouble *polynomialCoef, RDouble coef, int nIndex1, int nIndex2){};
+
+    //! Compute chemical source term and its Jacobian.
+    virtual void ComputeChemicalSourceDerivatives(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber){};
+    virtual void ComputeChemicalSourceJacobian(RDouble *primitiveVariables, RDouble *temperatures, RDouble cellVolume, RDouble *chemicalSourceTerms, RDouble **sourceDerivatives){};
+    virtual void ComputeChemicalSourceAndJacobian(RDouble **primitiveVariables, RDouble **temperatures, RDouble *damkohlerNumber, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber){};
+    virtual void ComputeChemicalSourceAndJacobianD3(int *Inzone, RDouble4D &primitiveVariables, RDouble4D &temperatures, RDouble4D &speciesEs, RDouble4D &speciesCvs, RDouble3D &totalCv, RDouble3D &cellVolume, RDouble4D &chemicalSourceTerms, RDouble5D &sourceDerivatives){};
+    virtual void ComputeChemicalSourceAndJacobianD3(int *Inzone, RDouble4D &primitiveVariables, RDouble4D &temperatures, RDouble4D &noneqNumber, RDouble4D &deltaQ, RDouble4D &speciesEs, RDouble4D &speciesCvs, RDouble3D &totalCv, RDouble3D &cellVolume, RDouble4D &chemicalSourceTerms, RDouble5D &sourceDerivatives){};
+    //! Compute the partial derivatives of source terms of chemical reaction equations without electron.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[out]: chemicalSourceTerms returns the source terms of chemical reaction equations in the specified control cells.
+    //! @param[out]: sourceDerivatives returns the elements of the Jacobian matrix in the source terms of chemical reaction equations in the specified control cells.
+    //! @param[in ]: nCellNumber denotes the number of the specified control cells.
+    virtual void ComputeChemicalSourceDerivatives1(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber){};
+
+    //! Compute the partial derivatives of source terms of chemical reaction equations, it is used for the reactions including electron.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[out]: chemicalSourceTerms returns the source terms of chemical reaction equations in the specified control cells.
+    //! @param[out]: sourceDerivatives returns the elements of the Jacobian matrix in the source terms of chemical reaction equations in the specified control cells.
+    //! @param[in ]: nCellNumber denotes the number of the specified control cells.
+    virtual void ComputeChemicalSourceDerivatives2(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber){};
+
+    //! Compute the partial derivatives of source terms of chemical reaction equations. The function is used for two-temperature model.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[in ]: chemicalSourceTerms stores the source terms of chemical reaction equations in the specified control cells.
+    //! @param[in ]: chemicalSourceDerivatives stores the partial derivatives of the source terms of chemical reaction equations in the specified control cells.
+    //! @param[out]: energySourceDerivatives returns the partial derivatives of the source terms of energy equations in the specified control cells.
+    //! @param[in ]: nCellNumber denotes the number of the specified control cells.
+    virtual void ComputeEnergySourceDerivatives1(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms,
+        RDouble ***chemicalSourceDerivatives, RDouble ***energySourceDerivatives, int nCellNumber){};
+
+    //! Compute the partial derivatives of source terms of vibration-electron energy equations. The function is used for two-temperature model.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[in ]: chemicalSourceTerms stores the source terms of chemical reaction equations in the specified control cells.
+    //! @param[in ]: chemicalSourceDerivatives stores the partial derivatives of the source terms of chemical reaction equations in the specified control cells.
+    //! @param[out]: energySourceDerivatives returns the diagonal element of partial derivatives to the source terms of energy equations in the specified control cells.
+    //! @param[in ]: nCellNumber denotes the number of the specified control cells.
+    virtual void ComputeEnergySourceDiagonalDerivatives1(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms,
+        RDouble ***chemicalSourceDerivatives, RDouble **energySourceDerivatives, int nCellNumber){};
+
+    //! Compute the partial derivatives of source terms of vibration-electron energy equations. The function is used for three-temperature model.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[in ]: chemicalSourceTerms stores the source terms of chemical reaction equations in the specified control cells.
+    //! @param[in ]: chemicalSourceDerivatives stores the partial derivatives of the source terms of chemical reaction equations in the specified control cells.
+    //! @param[out]: energySourceDerivatives returns the diagonal element of partial derivatives to the source terms of energy equations in the specified control cells.
+    //! @param[in ]: nCellNumber denotes the number of the specified control cells.
+    virtual void ComputeEnergySourceDiagonalDerivatives2(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms,
+            RDouble ***chemicalSourceDerivatives, RDouble **energySourceDerivatives, int nCellNumber){};
+
+public:
+
+    //The primitive variables are transfered to the conservative variables.
+    //! @param[in ]: q prim indicates the primitive variables.
+    //! @param[in ]: gama denotes the specific heat ratio, which is valid in the perfect gas.
+    //! @param[in ]: Tv denotes the vibrational temperature(The non-dimensional value).
+    //! @param[in ]: Te denotes the electron temperature(The non-dimensional value).
+    //! @param[out]: indicates the conservative variables.
+    virtual void Primitive2Conservative(RDouble *prim, RDouble gama, RDouble Tv, RDouble Te, RDouble *q){};
+    virtual void Primitive2ConservativeR(RDouble *prim, RDouble gama, RDouble Tv, RDouble Te, RDouble staticE, RDouble *q){};
+    virtual void Primitive2ConservativeR2(RDouble *prim, RDouble Ttr, RDouble Tv, RDouble Te, RDouble *q){};
+
+#ifdef USE_GMRESSOLVER
+    //! GMRESPV 
+    //! the derivative of primitive variables w.r.t conservative variables
+    virtual void dPrimitive2dConservative(RDouble *prim, RDouble gama, RDouble** dqdcv){};
+
+    //! GMRESVis
+    //! the derivative of primitive variables w.r.t conservative variables
+    virtual void dGradient2dPrimitive(RDouble *prim, int sign, RDouble** dgraddq, char direction, RDouble nxs, RDouble nys, RDouble nzs, RDouble ns, RDouble vol,int nPara = 6){};
+    
+    //! GMRESnolim
+    virtual void dGradient2dPrimitive4limiter(int sign, RDouble** dgraddq, char direction, RDouble nxs, RDouble nys, RDouble nzs, RDouble ns, RDouble vol){};
+#endif
+
+    //! The conservative variables are transfered to the primitive variables.
+    //! @param[in ]: q indicates the conservative variables.
+    //! @param[in ]: gama denotes the specific heat ratio, which is valid in the perfect gas.
+    //! @param[out]: prim indicates the primitive variables.
+    //! @param[in/out]: temperature denotes the array of temperatures in the current time-advancing step and next time-advancing step.
+    //! As input parameter, temperature indicates the temperature of the current time-advancing step. Meanwhile,
+    //! it denotes the temperature of the next time-advancing step as output parameter.
+    virtual void Conservative2Primitive(RDouble *q, RDouble gama, RDouble *prim, RDouble *temperature){};
+    virtual void Conservative2PrimitiveR(RDouble *q, RDouble gama, RDouble *prim, RDouble *temperature){};
+    virtual void LimitTemperature(RDouble &Temperature, RDouble Delta, RDouble Minimum){};
+
+    virtual void GetSpecificHeatRatio(RDouble *prim, RDouble &gama){};
+
+    //! Compute the specific heat ratio and the temperatures.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[out]: gama denotes the specific heat ratio of the mixed gas.
+    //! @param[out]: transRotationTemperature denotes the translation-rotation temperature of the mixed gas.
+    //! @param[out]: vibrationTemperature denotes the vibration temperature of the mixed gas.
+    //! @param[out]: electronTemperature denotes the electron temperature of the mixed gas.
+    virtual void GetSpecificHeatRatioAndTemperatute(RDouble *primitiveVariables, RDouble &gama, RDouble &transRotationTemperature, RDouble &vibrationTemperature, RDouble &electronTemperature){};
+
+    virtual void ComputeDensityDiffusionAndKCP(RDouble temperature, RDouble *primface, RDouble mul, RDouble mut, RDouble *rho_ds_face, RDouble *hintSpeciesOfFace, RDouble &kcp){};
+    virtual void GetAirInfo(const RDouble &height, RDouble &temperature, RDouble &pressure, RDouble &density, RDouble &soundspeed){};
+    virtual void ReadAirInfo(string &filePath, RDouble &longitude, RDouble &latitude, RDouble &temperature, RDouble &pressure, RDouble &density, RDouble &angle, RDouble &velocity, RDouble &soundspeed){};
+    //! To obtain the coefficients of computing the M*dQ in the function MXDQ_STD_LP(), added by LiPeng on Jan. 10, 2019.
+    //! @param[in ]: primitiveVars is the array that stores the primitive variables of the current cell.
+    //! @param[out]: alpha, beta and speciesBeta are referred to the formula (A.5) in the appendix A of the PHengLEI Theory manual.
+    virtual void ComputeCoefficientInMXDQ(RDouble *primitiveVars, RDouble &alpha, RDouble &beta, RDouble *speciesBeta){};
+    virtual void ComputeCoefficientInMXDQR(RDouble *primitiveVars, RDouble trTemperature, RDouble squareVelocity, RDouble *speciesCvs, RDouble totalCv, RDouble &alpha, RDouble &beta, RDouble *speciesBeta){};
+
+    //! To obtain the coefficients of computing the M*dQ in the function MVXDQ_STD_LP(), added by LiPeng on Jan. 21, 2019.
+    //! K=visl/Prl + vist/Prt denotes the thermal conductivity coefficient, rD=visl/Scl + vist/Sct is the species diffusion coefficient,\n
+    //! Ds is an array of saving the diffusion coefficient of each species.
+    virtual void ComputeCoefficientInMVXDQ(RDouble *prim, RDouble K, RDouble rD, RDouble *theta_s, RDouble *phi_s, RDouble *Ds){};
+
+public:
+
+    //! To find the chemical element in the species, if found, return the coefficient of the element.
+    //! @param[in ]: species_name denotes the name of the species.
+    //! @param[out]: element_name denotes the name of the specified element.
+    //! @param[out]: coef is the stoichiometric coefficient of the element.
+    virtual bool FindChemicalElement(string species_name, char element_name, int &coef){return 0;};
+
+    //! To obtain the index of the specified species in the sequence in accordance with its name.
+    //! @param[in ]: species_name denotes the name of the species.
+    //! @param[out]: the function returns the index of the species if found, otherwise, returns value of -1.
+    virtual int GetSpeciesIndex(string species_name){return 0;};
+
+public:     //! The function library of multi-temperature model.
+
+    //! To compute the translation and rotation specific heat at constant volume.
+    //! @param[out]: speciesTransRotationCv is an array saving the translation and rotation specific heat at constant volume of each species.
+    virtual void ComputeTranslationAndRotationSpecificHeatAtConstantVolume(RDouble *speciesTransRotationCv){};
+    
+    //! To compute the translation and rotation specific heat at constant volume.
+    //! @param[out]: speciesTransRotationCv is an array saving the dimensional value of translation and rotation specific heat at constant volume of each species.
+    virtual void ComputeDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(RDouble *speciesTransRotationCv){};
+    
+    //! To compute the the translation and rotation energy.
+    //! @param[in ]: transRotationTemperature is the non-dimensional translation-rotation temperature of the mixture gas.
+    //! @param[out]: speciesTransRotationEnergy is an array saving the translation and rotation energy of each species.
+    virtual void ComputeTranslationAndRotationEnergy(RDouble transRotationTemperature, RDouble *speciesTransRotationEnergy){};
+    
+    //! To compute the vibration specific heat at constant volume.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[out]: speciesVibrationCv is an array saving the vibration specific heat at constant volume of each species.
+    virtual void ComputeVibrationSpecificHeatAtConstantVolume(RDouble vibrationTemperature, RDouble *speciesVibrationCv){};
+    
+    //! To compute the vibration specific heat at constant volume.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[out]: speciesVibrationCv is an array saving the dimensional value of vibration specific heat at constant volume of each species.
+    virtual void ComputeDimensionalVibrationSpecificHeatAtConstantVolume(RDouble vibrationTemperature, RDouble *speciesVibrationCv){};
+    
+    //! To compute the dimensional value of the vibration energy (J/kg).
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[out]: speciesVibrationEnergy is an array saving the vibration energy of each species.
+    virtual void ComputeDimensionalVibrationEnergy(RDouble vibrationTemperature, RDouble *speciesVibrationEnergy){};
+    
+    //! To compute the vibration energy.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[out]: speciesVibrationEnergy is an array saving the vibration energy of each species.
+    virtual void ComputeVibrationEnergy(RDouble vibrationTemperature, RDouble *speciesVibrationEnergy){};
+    
+    //! To compute the electron specific heat at constant volume.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[out]: speciesElectronCv is an array saving the electron specific heat at constant volume of each species.
+    virtual void ComputeElectronSpecificHeatAtConstantVolume(RDouble electronTemperature, RDouble *speciesElectronCv){};
+    
+    //! To compute the electron specific heat at constant volume.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[out]: speciesElectronCv is an array saving the dimensional value of electron specific heat at constant volume of each species.
+    virtual void ComputeDimensionalElectronSpecificHeatAtConstantVolume(RDouble electronTemperature, RDouble *speciesElectronCv){};
+    
+    //! To compute the dimensional value of electron energy (J/kg).
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[out]: speciesElectronEnergy is an array saving the electron energy of each species.
+    virtual void ComputeDimensionalElectronEnergy(RDouble electronTemperature, RDouble *speciesElectronEnergy){};
+    
+    //! To compute the electron energy.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[out]: speciesElectronEnergy is an array saving the electron energy of each species.
+    virtual void ComputeElectronEnergy(RDouble electronTemperature, RDouble *speciesElectronEnergy){};
+    
+    //! To compute the enthalpies of species.
+    //! @param[in ]: transRotationTemperature is the non-dimensional translation-rotation temperature of the mixture gas.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[out]: speciesEnthalpy is an array saving the enthalpies of each species.
+    virtual void ComputeSpeciesEnthalpy(RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature, RDouble *speciesEnthalpy){};
+    
+    //! To compute the translation-rotation specific heat at constant volume of the mixed gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the total translation-rotation specific heat at constant volume.
+    virtual RDouble GetMixedGasTranslationAndRotationSpecificHeatAtConstantVolume(RDouble *massFraction){return 0;};
+    
+    //! To compute the translation-rotation specific heat at constant volume of the mixed gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the dimensional value of total translation-rotation specific heat at constant volume.
+    virtual RDouble GetMixedGasDimensionalTranslationAndRotationSpecificHeatAtConstantVolume(RDouble *massFraction){return 0;};
+    
+    //! To compute the vibration specific heat at constant volume of the mixed gas.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the total vibration specific heat at constant volume.
+    virtual RDouble GetMixedGasVibrationSpecificHeatAtConstantVolume(RDouble vibrationTemperature, RDouble *massFraction){return 0;};
+    
+    //! To compute the vibration specific heat at constant volume of the mixed gas.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the dimensional value of total vibration specific heat at constant volume.
+    virtual RDouble GetMixedGasDimensionalVibrationSpecificHeatAtConstantVolume(RDouble vibrationTemperature, RDouble *massFraction){return 0;};
+    
+    //! To compute the electron specific heat at constant volume of the mixed gas.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the total electron specific heat at constant volume.
+    virtual RDouble GetMixedGasElectronSpecificHeatAtConstantVolume(RDouble electronTemperature, RDouble *massFraction){return 0;};
+    
+    //! To compute the electron specific heat at constant volume of the mixed gas.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the dimensional value of total electron specific heat at constant volume.
+    virtual RDouble GetMixedGasDimensionalElectronSpecificHeatAtConstantVolume(RDouble electronTemperature, RDouble *massFraction){return 0;};
+    
+    //! To compute the translation-rotation energy of the mixed gas.
+    //! @param[in ]: transRotationTemperature is the non-dimensional translation-rotation temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the total translation-rotation energy.
+    virtual RDouble GetMixedGasTranslationAndRotationEnergy(RDouble transRotationTemperature, RDouble *massFraction){return 0;};
+    
+    //! To compute the dimensional value of vibration energy of the mixed gas.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the total vibration energy.
+    virtual RDouble GetMixedGasDimensionalVibrationEnergy(RDouble vibrationTemperature, RDouble *massFraction){return 0;};
+    
+    //! To compute the vibration energy of the mixed gas.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the total vibration energy.
+    virtual RDouble GetMixedGasVibrationEnergy(RDouble vibrationTemperature, RDouble *massFraction){return 0;};
+    
+    //! To compute the dimensional value of electron energy of the mixed gas.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the total electron energy.
+    virtual RDouble GetMixedGasDimensionalElectronEnergy(RDouble electronTemperature, RDouble *massFraction){return 0;};
+    
+    //! To compute the electron energy of the mixed gas.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species. 
+    //! @param[out]: return the total electron energy.
+    virtual RDouble GetMixedGasElectronEnergy(RDouble electronTemperature, RDouble *massFraction){return 0;};
+    
+    //! To compute the total enthalpy of the mixed gas.
+    //! @param[in ]: transRotationTemperature is the non-dimensional translation-rotation temperature of the mixture gas.
+    //! @param[in ]: vibrationTemperature is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[out]: return the total enthalpy of the mixed gas.
+    virtual RDouble ComputeMixedGasEnthalpy(RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature, RDouble *massFraction){return 0;};
+    
+    //! To compute the total enthalpy of the mixed gas.
+    //! @param[in ]: primitiveVars indicates the array of primitive variables.
+    //! @param[in ]: temperatures indicates the array of temperatures.
+    virtual RDouble ComputeMixedGasEnthalpy(RDouble *primitiveVars, RDouble *temperatures){return 0;};
+    
+    //! To compute the total enthalpy of formation.
+    //! @param[in ]: massFraction is an array to storing the mass fractions of species.
+    //! @param[out]: return the non-dimensional value of the formation enthalpy.
+    virtual RDouble GetTotalFormationEnthalpy(RDouble *massFraction){return 0;};
+    
+    //! To compute translation-rotation temperature where the pressure is known.
+    //! @param[in ]: primitiveVariables is an array of saving the primary variables.
+    //! @param[in ]: electronPressure is the pressure of electron.
+    //! @param[out]: return the non-dimensional value of translation-rotation temperature.
+    virtual RDouble ComputeTranslationAndRotationTemperatureByPrimitiveVariables(RDouble *primitiveVariables, RDouble electronPressure = 0.0){return 0;};
+    
+    //! To compute translation-rotation temperature.
+    //! @param[in ]: transRotationEnergy is the total internal energy of translation and rotation mode.
+    //! @param[in ]: massFraction is an array of saving the mass fractions of species.
+    //! @param[out]: return the non-dimensional value of translation-rotation temperature.
+    virtual RDouble ComputeTranslationAndRotationTemperature(RDouble *massFraction, RDouble transRotationEnergy){return 0;};
+    
+    //! To compute vibration temperature.
+    //! @param[in ]: massFraction is an array of saving the mass fractions of species.
+    //! @param[in ]: vibrationEnergy is the total internal energy of vibration mode.
+    //! @param[in ]: initTemperature is the initial temperature of the newton iteration method.
+    //! @param[out]: return the non-dimensional value of vibration temperature.
+    virtual RDouble ComputeVibrationTemperature(RDouble *massFraction, RDouble vibrationEnergy, RDouble initTemperature){return 0;};
+    
+    //! To compute electron temperature.
+    //! @param[in ]: massFraction is an array of saving the mass fractions of species.
+    //! @param[in ]: electronEnergy is the total internal energy of electron mode.
+    //! @param[in ]: initTemperature is the initial temperature of the newton iteration method.
+    //! @param[out]: return the non-dimensional value of electron temperature.
+    virtual RDouble ComputeElectronTemperature(RDouble *massFraction, RDouble electronEnergy, RDouble initTemperature){return 0;};
+    
+    //! To compute vibration-electron temperature.
+    //! @param[in ]: massFraction is an array of saving the mass fractions of species.
+    //! @param[in ]: vibrationElectronEnergy is the total internal energy of vibration and electron mode.
+    //! @param[in ]: initTemperature is the initial temperature of the newton iteration method.
+    //! @param[out]: return the non-dimensional value of vibration-electron temperature.
+    virtual RDouble ComputeVibrationAndElectronTemperature(RDouble *massFraction, RDouble vibrationElectronEnergy, RDouble initTemperature){return 0;};
+    
+    //! To compute the temperature of one-temperature model.
+    //! @param[in ]: massFraction is an array of mass fractions of species.
+    //! @param[in ]: internalEnergy is total internal energy of the mixed gas.
+    //! @param[out]: return the non-dimensional value of temperature.
+    virtual RDouble ComputeOneTemperatureModelTemperature(RDouble *massFraction, RDouble internalEnergy){return 0;};
+    
+    //! To compute non-equilibrium temperature of chemical reaction flow for one-temperature model using the curve fitting method.
+    //! @param[in ]: massFraction is an array of mass fractions of species.
+    //! @param[in ]: internalEnergy is total internal energy of the mixed gas.
+    //! @param[out]: return the non-dimensional value of temperature.
+    virtual RDouble ComputeNonequilibrumTemperatureViaBisectionMethod(RDouble *massFraction, RDouble internalEnergy){return 0;};
+    
+    //! To compute non-equilibrium temperature of chemical reaction flow for one-temperature model using the newton method.
+    //! @param[in ]: massFraction is an array of mass fractions of species.
+    //! @param[in ]: internalEnergy is total internal energy of the mixed gas.
+    //! @param[in ]: initTemperature is the initial temperature of the newton iteration method.
+    //! @param[out]: return the non-dimensional value of temperature.
+    virtual RDouble ComputeNonequilibrumTemperature(RDouble *massFraction, RDouble internalEnergy, RDouble initTemperature){return 0;};
+    
+    //! To obtain the electron pressure.
+    //! @param[in ]: primitiveVariables is an array of saving the primary variables.
+    //! @param[in ]: electronTemperature is non-dimensional value of electron temperature.
+    //! @param[out]: return the non-dimensional value of electron pressure.
+    virtual RDouble GetElectronPressure(RDouble *primitiveVariables, RDouble electronTemperature){return 0;};
+    
+    //! To compute the heat conductivity of translation and rotation using the Eucken formula.
+    //! @param[in ]: viscosity is array of saving the species viscosity.
+    //! @param[out]: conductivity is an array of saving the translation-rotation heat conductivity of each species.
+    virtual void ComputeSpeciesTranslationAndRotationHeatConductivity(RDouble *viscosity, RDouble *conductivity){};
+    
+    //! To compute the heat conductivity of vibration using the Eucken formula.
+    //! @param[in ]: viscosity is array of saving the species viscosity.
+    //! @param[in ]: speciesVibrationCv is the array of saving the vibration specific heat at constant pressure.
+    //! @param[out]: conductivity is an array of saving the vibration heat conductivity of each species.
+    virtual void ComputeSpeciesVibrationHeatConductivity(RDouble *viscosity, RDouble *speciesVibrationCv, RDouble *conductivity){};
+    
+    //! To compute the heat conductivity of electron using the Eucken formula.
+    //! @param[in ]: viscosity is array of saving the species viscosity.
+    //! @param[in ]: speciesElectronCv is the array of saving the electron specific heat at constant pressure.
+    //! @param[out]: conductivity is an array of saving the electron heat conductivity of each species.
+    virtual void ComputeSpeciesElectronHeatConductivity(RDouble *viscosity, RDouble *speciesElectronCv, RDouble *conductivity){};
+    
+    //! To compute the translation-rotation heat conductivity of the mixed gas using Wilke method.
+    //! @param[in ]: primitiveVariables is an array of saving the primary variables.
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronTemperature denotes the non-dimensional value of electron temperature.
+    //! @param[out]: return the translation-rotation heat conductivity of the mixed gas.
+    virtual RDouble GetMixedGasTranslationAndRotationHeatConductivity(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble electronTemperature){return 0;};
+    
+    //! To compute the vibration heat conductivity of the mixed gas using Wilke method.
+    //! @param[in ]: primitiveVariables is an array of saving the primary variables.
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: vibrationTemperature denotes the non-dimensional value of vibration temperature.
+    //! @param[in ]: electronTemperature denotes the non-dimensional value of electron temperature.
+    //! @param[out]: return the vibration heat conductivity of the mixed gas.
+    virtual RDouble GetMixedGasVibrationHeatConductivity(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature){return 0;};
+    
+    //! To compute the electron heat conductivity of the mixed gas using Wilke method.
+    //! @param[in ]: primitiveVariables is an array of saving the primary variables.
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronTemperature denotes the non-dimensional value of electron temperature.
+    //! @param[out]: return the electron heat conductivity of the mixed gas.
+    virtual RDouble GetMixedGasElectronHeatConductivity(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble electronTemperature){return 0;};
+    
+    virtual void ComputeMixedGasTranslationVibrationElectronHeatConductivity(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature, RDouble &transRotationConductivity, RDouble &vibrationConductivity, RDouble &electronConductivity){};
+    
+    //! To obtain the heat conductivity of the mixed gas using Wilke method, the value is identified by the type of the heat conductivity.
+    //! @param[in ]: moleFraction is an array of saving the mole fractions of species.
+    //! @param[in ]: conductivity is an array of saving the heat conductivity of species. The heat conductivity could be translation-rotation\n
+    //! heat conductivity, vibration heat conductivity or electron heat conductivity.
+    //! @param[in ]: Phi denotes the array of the partition function.
+    //! @param[out]: return the heat conductivity of the mixed gas.
+    virtual RDouble GetMixedGasHeatConductivityWithWilkeFormula(RDouble *moleFraction, RDouble *conductivity, RDouble *phi){return 0;};
+    
+    //! To compute the non-dimensional values of viscosities of species using Gupta or Blotter method. 
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronTemperature denotes the non-dimensional value of electron temperature.
+    //! @param[out]: speciesViscosity is an array to storing the non-dimensional values of viscosities of species.
+    virtual void ComputeSpeciesViscosityWithCurveFitMethod(RDouble transRotationTemperature, RDouble electronTemperature, RDouble *speciesViscosity){};
+    
+    //! To compute the dimensional values of viscosities of species using Gupta or Blotter method. 
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronTemperature denotes the non-dimensional value of electron temperature.
+    //! @param[out]: speciesViscosity is an array to storing the dimensional values of viscosities of species(Unit: kg/(m*s)).
+    virtual void ComputeSpeciesDimensionalViscosityWithCurveFitMethod(RDouble transRotationTemperature, RDouble electronTemperature, RDouble *speciesViscosity){};
+    
+    //! To compute the non-dimensional values of viscosities of species using Lennard-Jones method. 
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronPressure denotes the non-dimensional value of electron pressure.
+    //! @param[out]: speciesViscosity is an array to storing the non-dimensional values of viscosities of species.
+    virtual void ComputeSpeciesViscosityWithLennardJonesMethod(RDouble transRotationTemperature, RDouble electronPressure, RDouble *speciesViscosity){};
+    
+    //! To compute the dimensional values of viscosities of species using using Lennard-Jones method. 
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronPressure denotes the non-dimensional value of electron pressure.
+    //! @param[out]: speciesViscosity is an array to storing the dimensional values of viscosities of species(Unit: kg/(m*s)).
+    virtual void ComputeSpeciesDimensionalViscosityWithLennardJonesMethod(RDouble transRotationTemperature, RDouble electronPressure, RDouble *speciesViscosity){};
+    
+    //! To compute the collision area between the same species using the curve fit method.
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronPressure denotes the non-dimensional value of electron pressure.
+    //! @param[out]: piOmega is an array to storing the dimensional values of collision area of species(Unit: m2).
+    virtual void ComputeAverageCollisionAreaOmega22(RDouble transRotationTemperature, RDouble electronPressure, RDouble *piOmega){};
+    
+    //! To obtain the viscosity of the mixed gas using Wilke method.
+    //! @param[in ]: moleFraction is an array of saving the mole fractions of species.
+    //! @param[in ]: viscosity is an array of saving the viscosity of species.
+    //! @param[in ]: phi denotes the array of the partition function.
+    //! @param[out]: return the viscosity of the mixed gas.
+    virtual RDouble GetMixedGasViscosityWithWilkeFormula(RDouble *moleFraction, RDouble *viscosity, RDouble *phi){return 0;};
+    
+    //! To obtain the diffusion coefficient of each species. added by LiPeng in Mar. 11,2019.
+    //! @param[in ]: massFraction is an array of saving the primary variables.
+    //! @param[in ]: viscosityLaminar is the laminar viscosity, and viscosityTurbulence is the turbulent viscosity.
+    //! @param[out]: speciesDiffusionCoef stores the species mass diffusion coefficient of each component.
+    //! The function returns the diffusion coefficients of each species which saved in rDs = (1 - Cs)/(1- Xs) * (mul/Scl + mut/Sct).
+    virtual void ComputeSpeciesMassDiffusionCoefficient(RDouble *massFraction, RDouble viscosityLaminar, RDouble viscosityTurbulence, RDouble *speciesDiffusionCoef){};
+    
+    //! To obtain the mass diffusion coefficient with CLN method, the obtained value is enjoyed by all of the species.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: transRotationTemperature denotes the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronTemperature denotes the non-dimensional value of electron temperature.
+    //! @param[out]: return the mass diffusion coefficient.
+    virtual RDouble GetMassDiffusionCoefficientWithCLNModel(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble electronTemperature){return 0;};
+    
+    //! Compute the coefficient called gama system in the multi-temperature model.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: electronTemperature is the non-dimensional value of vibration or electron temperature.
+    //! @param[out]: gama are partial derivative of electron pressure to vibration or electron energy.
+    //! @param[out]: speciesGama is an array of partial derivatives of electron pressure to species density.
+    virtual void GetElectronPressurePartialDerivatives(RDouble *primitiveVars, RDouble electronTemperature, RDouble &gama, RDouble *speciesGama){};
+    
+    //! Compute the coefficient called alpha system in the multi-temperature model.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: transRotationTemperature is the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronTemperature is the non-dimensional value of vibration or electron temperature.
+    //! @param[out]: alpha is partial derivative of pressure to internal energy.
+    //! @param[out]: beta is partial derivative of pressure to total density.
+    //! @param[out]: speciesBeta is an array of partial derivatives of pressure to species density..
+    virtual void GetPressurePartialDerivatives(RDouble *primitiveVars, RDouble transRotationTemperature, RDouble electronTemperature,
+        RDouble &alpha, RDouble &beta, RDouble *speciesBeta){};
+    
+    //! Compute the main partial derivatives in the multi-temperature model.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: transRotationTemperature is the non-dimensional value of translation-rotation temperature.
+    //! @param[in ]: electronTemperature is the non-dimensional value of vibration or electron temperature.
+    //! @param[out]: alpha is the partial derivative of pressure to total energy.
+    //! @param[out]: beta is the partial derivative of pressure to total density.
+    //! @param[out]: gama is the partial derivative of electron pressure to vibration-electron enegy.
+    //! @param[out]: speciesBeta��speciesGama are the partial derivatives of pressure and electron pressure to species density.
+    virtual void GetMultiTemperatureModelPartialDerivatives(RDouble *primitiveVars, RDouble transRotationTemperature, RDouble electronTemperature,
+        RDouble &alpha, RDouble &beta, RDouble &gama, RDouble *speciesBeta, RDouble *speciesGama){};
+    virtual void GetMultiTemperatureModelPartialDerivativesR(RDouble *primitiveVars, RDouble transRotationTemperature, RDouble electronTemperature,
+                                                             RDouble &alpha, RDouble &beta, RDouble &gama, RDouble *speciesBeta, RDouble *speciesGama,
+                                                             RDouble squareVelocity, RDouble *speciesEtrs, RDouble totalCvtr,RDouble totalCvv, RDouble totalCve){};
+    
+    //! Compute partial derivative of pressure to total density.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[out]: return the partial derivative called alpha.
+    virtual RDouble ComputePressureDerivativeToTotalDensity(RDouble *primitiveVars){return 0;};
+    
+    //! To compute the static enthalpy of the mixed gas.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: transRotationTemperature denotes the temperature of translation-rotation mode.
+    //! @param[in ]: vibrationTemperature denotes the temperature of vibration mode.
+    //! @param[in ]: electronTemperature denotes the temperature of electron mode.
+    virtual RDouble GetMixedGasEnthalpy(RDouble *primitiveVars, RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature){return 0;};
+    
+    virtual RDouble ComputeMolecularWeightReciprocal(RDouble *prim){return 0;};
+    
+    virtual RDouble ComputeMolecularWeight(RDouble *prim){return 0;};
+    
+    //! Compute chemical energy of species stored in the variable of qx, qy and qz. The variable of fvis stores\n
+    //! the mass diffusion flux namely ro*Ds * (dfsdx * nx + dfsdy * ny + dfsdz * nz).
+    //! The function is the optimized format of the previous function, added by LiPeng on April 12, 2019.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: dfsdx, dfsdy, dfsdz are arrays of saving the partial derivatives of the mass fractions.
+    //! @param[in ]: transRotationTemperature, vibrationTemperatuare and electronTemperature denote the temperatures of translation-rotation mode, vibration mode and electron mode, respectively.
+    //! @param[in ]: viscosityLaminar and viscosityTurbulence are the laminar viscosity and turbulent viscosity, respectively.
+    //! @param[in ]: nx, ny and nz are the components of the normal vector on the face.
+    //! @param[out]: qx, qy and qz are chemical energy of species in each coordinates.
+    //! @param[out]: speciesFluxes is array of saving the mass diffusion flux namely ro*Ds * (dfsdx * nx + dfsdy * ny + dfsdz * nz).
+    virtual void ComputeSpeciesMassDiffusionFlux(RDouble *primitiveVars, RDouble *dfsdx, RDouble *dfsdy, RDouble *dfsdz, RDouble transRotationTemperature, RDouble vibrationTemperatuare, RDouble electronTemperature,
+        RDouble viscosityLaminar, RDouble viscosityTurbulence, RDouble nx, RDouble ny, RDouble nz, RDouble &qx, RDouble &qy, RDouble &qz, RDouble *speciesFluxes){};
+    
+    //! To compute heat conductivity of mixture gas using Eucken formula and Wassilewa relation.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: transRotationTemperature is the non-dimensional value of translation-rotation temperature of the mixture gas.
+    //! @param[in ]: vibrationTemperature is the non-dimensional value of vibration temperature of the mixture gas.
+    //! @param[in ]: electronTemperature is the non-dimensional value of electron temperature of the mixture gas.
+    //! @param[out]: transRotationConductivity is heat conductivity of translation-rotation of mixed gas.
+    //! @param[out]: vibrationConductivity is heat conductivity of vibration of mixed gas.
+    //! @param[out]: electronConductivity is heat conductivity of electron of mixed gas.
+    virtual void ComputeMixtureGasHeatConductivity(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature,
+        RDouble &transRotationConductivity, RDouble &vibrationConductivity, RDouble &electronConductivity){};
+
+    virtual void ComputeMixtureGasSpecificHeatAtConstantVolume(RDouble *primitiveVariables, RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature,
+        RDouble &cvtr, RDouble &cvv, RDouble &cve){};
+
+    //! Compute the partial derivatives of source terms of chemical reaction equations.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[in ]: chemicalSourceTerms stores the source terms of chemical reaction equations in the specified control cells.
+    //! @param[in ]: chemicalSourceDerivatives stores the partial derivatives of the source terms of chemical reaction equations in the specified control cells.
+    //! @param[out]: energySourceDerivatives returns the partial derivatives of the source terms of energy equations in the specified control cells.
+    //! @param[in ]: nCellNumber denotes the number of the specified control cells.
+    virtual void ComputeEnergySourceDerivatives(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms,
+        RDouble ***chemicalSourceDerivatives, RDouble ***energySourceDerivatives, int nCellNumber){};
+    
+    //! Compute the partial derivatives of source terms of chemical reaction equations.
+    //! @param[in ]: primitiveVariables stores the primitive variables of the specified control cells.
+    //! @param[in ]: temperatures stores the temperature values of the specified control cells.
+    //! @param[in ]: cellVolume is an array that stores the volume values of the specified control cells.
+    //! @param[in ]: chemicalSourceTerms stores the source terms of chemical reaction equations in the specified control cells.
+    //! @param[in ]: chemicalSourceDerivatives stores the partial derivatives of the source terms of chemical reaction equations in the specified control cells.
+    //! @param[out]: energySourceDerivatives returns the diagonal element of partial derivatives to the source terms of energy equations in the specified control cells.
+    //! @param[in ]: nCellNumber denotes the number of the specified control cells.
+    virtual void ComputeEnergySourceDiagonalDerivatives(RDouble **primitiveVariables, RDouble **temperatures, RDouble *cellVolume, RDouble **chemicalSourceTerms,
+        RDouble ***chemicalSourceDerivatives, RDouble **energySourceDerivatives, int nCellNumber){};
+
+    virtual void ComputeEnergySourceJacobianT2(RDouble *primitiveVariables, RDouble *temperatures, RDouble cellVolume, RDouble *chemicalSourceTerms, RDouble **sourceDerivatives){};
+    virtual void ComputeEnergySourceJacobianT3(RDouble *primitiveVariables, RDouble *temperatures, RDouble cellVolume, RDouble *chemicalSourceTerms, RDouble **sourceDerivatives){};
+
+    virtual void ComputeEnergySourceAndJacobianT2(RDouble **primitiveVariables, RDouble **temperatures, RDouble *vibNoneqNumber, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber){};
+    virtual void ComputeEnergySourceAndJacobianT3(RDouble **primitiveVariables, RDouble **temperatures, RDouble *vibNoneqNumber, RDouble *cellVolume, RDouble **chemicalSourceTerms, RDouble ***sourceDerivatives, int nCellNumber){};
+
+    virtual void ComputeEnergySourceAndJacobianT2D3(int *nCell, RDouble4D &primitiveVariables, RDouble4D &temperatures, RDouble4D &vibNoneqNumber, RDouble4D &speciesCvvs, RDouble4D &speciesCves, RDouble4D &speciesEvs, RDouble4D &speciesEes, RDouble3D &totalCvtr, RDouble3D &totalCvv, RDouble3D &totalCve, RDouble3D &cellVolume, RDouble4D &chemicalSourceTerms, RDouble5D &sourceDerivatives){};
+    virtual void ComputeEnergySourceAndJacobianT3D3(int *nCell, RDouble4D &primitiveVariables, RDouble4D &temperatures, RDouble4D &vibNoneqNumber, RDouble4D &speciesCvvs, RDouble4D &speciesCves, RDouble4D &speciesEvs, RDouble4D &speciesEes, RDouble3D &totalCvtr, RDouble3D &totalCvv, RDouble3D &totalCve, RDouble3D &cellVolume, RDouble4D &chemicalSourceTerms, RDouble5D &sourceDerivatives){};
+
+    //! To obtain the maximum mass diffusion coefficient among the species. added by LiPeng in Jan. 2019.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: viscosityLaminar is the laminar viscosity, and viscosityTurbulence is the turbulent viscosity.
+    //! The function returns the maximum mass diffusion coefficient called (1 - Cs)/(1- Xs) * (mul/Scl + mut/Sct).
+    virtual RDouble GetMaximumSpeciesMassDiffusionCoef(RDouble *primitiveVars, RDouble viscosityLaminar, RDouble viscosityTurbulence){return 0;};
+    
+    virtual RDouble ComputeMolecularWeightReciprocalWithoutElectron(RDouble *prim, RDouble &ce_div_me){return 0;};
+    
+    //! To obtain the diffusion coefficient of each species. added by LiPeng in Mar. 11,2019.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: viscosityLaminar is the laminar viscosity, and viscosityTurbulence is the turbulent viscosity.
+    //! @param[out]: speciesDiffusionCoef stores the species mass diffusion coefficient of each component.
+    //! The function returns the diffusion coefficients of each species which saved in rDs = (1 - Cs)/(1- Xs) * (mul/Scl + mut/Sct).
+    virtual void GetSpeciesMassDiffusionCoef(RDouble *primitiveVars, RDouble viscosityLaminar, RDouble viscosityTurbulence, RDouble *speciesDiffusionCoef){};
+    
+    //! To obtain the non-dimensional constant pressure specific heat in accordance with the primary variables.
+    //! prim is an array of saving the primary variables, the non-dimensional temperature called Tm and the non-dimensional \n
+    //! constant pressure specific heat called cp are returned.
+    virtual void GetTemperatureAndCP(RDouble *prim, RDouble &Tm, RDouble &cp){};
+    
+    //! To obtain the non-dimensional enthalpy of each species, the variable Tm is the non-dimensional temperature of the mixture gas,\n
+    //! the enthalpy of each species saved in the array of hs is returned.
+    virtual void GetEverySpeciesEnthalpy(RDouble trTemperature, RDouble vTemperature, RDouble eTemperature, RDouble *hs){};
+    
+    //! To compute the electron energy of the mixed gas.
+    //! @param[in ]: prim is an array of saving the primary variables.
+    //! @param[in ]: Te is the non-dimensional electron temperature of the mixture gas.
+    //! @param[out]: return the total electron energy.
+    virtual RDouble GetMixedGasElectronEnergy(RDouble *prim, RDouble Te){return 0;};
+    
+    //! To compute the vibration specific heat at constant volume of the mixed gas.
+    //! @param[in ]: prim is an array of saving the primary variables.
+    //! @param[in ]: Tv is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[out]: return the total vibration specific heat at constant volume.
+    virtual RDouble GetMixedGasVibrationSpecificHeatAtConstantVolume(RDouble *prim, RDouble Tv){return 0;};
+    
+    //! To compute the vibration specific heat at constant volume of the mixed gas.
+    //! @param[in ]: prim is an array of saving the primary variables.
+    //! @param[in ]: Te is the non-dimensional electron temperature of the mixture gas.
+    //! @param[out]: return the dimensional value of total vibration specific heat at constant volume.
+    virtual RDouble GetMixedGasElectronSpecificHeatAtConstantVolume(RDouble *prim, RDouble Te){return 0;};
+    
+    //! To compute the translation-rotation specific heat at constant volume of the mixed gas.
+    //! @param[in ]: prim is an array of saving the primary variables.
+    //! @param[out]: return the dimensional value of total translation-rotation specific heat at constant volume.
+    virtual RDouble GetMixedGasTransAndRotatSpecHeatAtConstVolume(RDouble *prim){return 0;};
+    
+    //! To compute the translation-rotation energy of the mixed gas.
+    //! @param[in ]: prim is an array of saving the primary variables.
+    //! @param[in ]: Ttr is the non-dimensional translation-rotation temperature of the mixture gas.
+    //! @param[out]: return the total translation-rotation energy.
+    virtual RDouble GetMixedGasTranslationAndRotationEnergy(RDouble *prim, RDouble Ttr){return 0;};
+    
+    //! To compute the vibration energy of the mixed gas.
+    //! @param[in ]: prim is an array of saving the primary variables.
+    //! @param[in ]: Tv is the non-dimensional vibration temperature of the mixture gas.
+    //! @param[out]: return the total vibration energy.
+    virtual RDouble GetMixedGasVibrationEnergy(RDouble *prim, RDouble Tv){return 0;};
+    
+    //! Compute the frozen sound speed in the multi-temperature model.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[out]: return the frozen sound speed.
+    virtual RDouble ComputeFrozenSoundSpeed(RDouble *primitiveVars){return 0;};
+    
+    //! To obtain the non-dimension temperature according to the primary variables,\n
+    //! prim is an array of saving the primary variables, the non-dimensional temperature is returned.
+    virtual RDouble GetTemperature(RDouble *prim){return 0;};
+
+public:
+    //! Compute the specific heat of species.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: temperatures indicates the array of temperatures including translational-rotational temperature, vibrational temperature and electron temperature.
+    //! @param[out]: spciesCvtr denotes the array of translational-rotational specific heat for species.
+    //! @param[out]: spciesCvv  denotes the array of vibrational specific heat for species.
+    //! @param[out]: totalCvtr and totalCvv denotes the total specific heat of mixture gas.
+    virtual void ComputeSpecificHeat(RDouble *primitiveVars, RDouble *temperatures, RDouble *spciesCvtr, RDouble *spciesCvv, RDouble &totalCvtr, RDouble &totalCvv) {};
+
+    //! Compute the energies of species.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: temperatures indicates the array of temperatures including translational-rotational temperature, vibrational temperature and electron temperature.
+    //! @param[out]: spciesEtr denotes the array of translational-rotational energy for species.
+    //! @param[out]: spciesEv  denotes the array of vibrational energy for species.
+    //! @param[out]: spciesEnthalpy denotes the array of enthalpies for species.
+    //! @param[out]: totalEtr and totalEv denotes the total energy of mixture gas.
+    //! @param[out]: totalEnthalpy denotes the total enthalpy of mixture gas.
+    virtual void ComputeEnergy(RDouble *primitiveVars, RDouble *temperatures, RDouble *spciesEtr, RDouble *spciesEv, RDouble *spciesEnthalpy, RDouble &totalEtr, RDouble &totalEv, RDouble &totalEnthalpy) {};
+
+    //! Compute the partial derivatives of pressure.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: temperatures indicates the array of temperatures including translational-rotational temperature, vibrational temperature and electron temperature.
+    //! @param[out]: alpha indicates the partial derivative of pressure vs. total energy(dp/d(rho*E)).
+    //! @param[out]: beta indicates the partial derivative of pressure vs. density(dp/d(rho)).
+    //! @param[out]: eta indicates the partial derivative of pressure vs. vibration energy(dp/d(rho * Ev)).
+    //! @param[out]: speciesBeta indicates the partial derivatives of pressure vs. species density(dp/d(rho * ci)).
+    virtual void ComputePressureDerivatives(RDouble *primitiveVars, RDouble *temperatures, RDouble &alpha, RDouble &beta, RDouble &eta, RDouble *speciesBeta) {};
+
+    //! =======codes for test ================
+    virtual void  ComputeMixturegasThermalParameter(RDouble *massF, RDouble trTemperature, RDouble vTemperature, RDouble eTemperature, int Dimensional = 0){};
+
+    virtual void  ComputeMixtureCvAndEnergy(RDouble *massF, RDouble trTemperature, RDouble &gasMixtureCv, RDouble &gasMixtureEnergy){};
+    virtual void  ComputeMixtureEnergy(RDouble *massF, RDouble trTemperature, RDouble &gasMixtureEnergy){};
+
+    virtual void  ComputeMixtureCvtrAndEtr(RDouble *massF, RDouble trTemperature, RDouble &gasMixtureCv, RDouble &gasMixtureEnergy){};
+
+    virtual void  ComputeMixtureCvveAndEve(RDouble *massF, RDouble tveTemperature, RDouble &gasMixtureCv, RDouble &gasMixtureEnergy){};
+    virtual void  ComputeMixtureEve(RDouble *massF, RDouble tveTemperature, RDouble &gasMixtureEnergy){};
+
+    virtual void  ComputeMixtureCvvAndEv(RDouble *massF, RDouble tvTemperature, RDouble &gasMixtureCv, RDouble &gasMixtureEnergy){};
+    virtual void  ComputeMixtureCveAndEe(RDouble *massF, RDouble teTemperature, RDouble &gasMixtureCv, RDouble &gasMixtureEnergy){};
+
+    virtual void ComputeMixtureEv(RDouble *massF, RDouble tvTemperature, RDouble &gasMixtureEnergy){};
+    virtual void ComputeMixtureEe(RDouble *massF, RDouble teTemperature, RDouble &gasMixtureEnergy){};
+
+    virtual void  ComputeCvvesAndEvesForSpecies(RDouble tveTemperature, RDouble *gasCvs, RDouble *gasEnergys, int Dimensional){};
+    virtual void  ComputeCvvsAndEvsForSpecies(RDouble tvTemperature, RDouble *gasCvs, RDouble *gasEnergys, int Dimensional){};
+
+    virtual void  ComputeTemperatureFromTotalTemperature(RDouble *massF, RDouble totalTemperature, RDouble mach, RDouble &Temperature, RDouble &gama, int Dimensional = 0){};
+    virtual void  ComputeGama(RDouble *massF, RDouble Temperature, RDouble &gama, int Dimensional = 0){};
+    virtual void  ComputeGamaAndHo(RDouble *massF, RDouble *Temperature, RDouble &gama, RDouble &H, int Dimensional = 0){};
+
+    //! For Incompressible Solver
+    virtual void InitParameter() {};
+    virtual void InitParameterForMu() {};
+    virtual void InitParameterForK() {};
+    virtual void InitParameterForMassdiff() {};
+    virtual void SetGasName(string speciesNameIncom) {};
+    virtual void SetGasMolarMass(string gasMolarMass) {};
+    virtual void SetGasRho(string gasRho) {};
+    virtual void SetGasMu(string gasMu) {};
+    virtual void SetGasCp(string gasCp) {};
+    virtual void SetGasK(string gasK) {};
+    virtual string*  GetGasName() { return gasNameList; }
+    virtual RDouble* GetGasMolarMass() { return gasMolarMassList; }
+    virtual RDouble* GetGasRho() { return gasRhoList; }
+    virtual RDouble* GetGasMu() { return gasMuList; }
+    virtual RDouble* GetGasCp() { return gasCpList; }
+    virtual RDouble* GetGasK() { return gasKList; }
+    virtual void UpdateRg(UnstructGrid* grid, RDouble* Rg) {};
+    virtual void UpdateRho(UnstructGrid* grid, RDouble* rho) {};
+    virtual void UpdateMu(UnstructGrid* grid, RDouble* mu) {};
+    virtual void UpdateCp(UnstructGrid* grid, RDouble* cp) {};
+    virtual void UpdateK(UnstructGrid* grid, RDouble* k) {};
+    virtual void UpdateMassDiff(UnstructGrid* grid, int iGas, RDouble* massdiff) {};
+    protected:
+
+        //! SutherLand
+        //RDouble C1;
+        //RDouble C2;
+        //RDouble refT;
+        //RDouble S;
+        //RDouble mu0;
+
+        //! Ideal gas mixing law for Mu
+        RDouble** phiij;
+
+        //! Calculation of mass diffusion coefficient
+        //! massDiffConstantDiluteApprox
+        //RDouble sct;
+        RDouble* dilute;
+
+        //RDouble refP;
+        //RDouble gasR;
+
+        string* gasNameList;
+        RDouble* gasMolarMassList;
+        RDouble* gasRhoList;
+        RDouble* gasMuList;
+        RDouble* gasCpList;
+        RDouble* gasKList;
+};
+
+extern Gas *gas;
+
+//! To obtain the index of the species name.
+//! Param[IN]: speciesName indicates the species name.
+int GetIndexBySpeciesName(string speciesName);
+
+//! To obtain the species name using the index.
+//! Param[IN]: nIndex indicates the index of the species name.
+string GetSpeciesNameByIndex(int nIndex);
+
+//! Transfer the string to the integer.
+//! Param[IN ]: numberOfSpecies indicates the number of the species.
+//! Param[IN ]: nameList indicates the name list of species.
+//! Param[OUT]: speciesOrder indicates the order of the species name.
+void SpeciesNameToInteger(int numberOfSpecies, string *nameList, Int1D *speciesOrder);
+void SpeciesNameToInteger(int numberOfSpecies, string *nameList, int *speciesOrder);
+
+//! Determine whether the two gas models are equal.
+//! Param[IN ]: speciesOrder1 indicates the name list of the first gas model.
+//! Param[OUT]: speciesOrder2 indicates the name list of the second gas model.
+bool IsEqualGasModel(Int1D *speciesOrder1, Int1D *speciesOrder2);
+
+
+}
+
+}
+
diff --git a/API/Physics/include/Gradient.h b/API/Physics/include/Gradient.h
new file mode 100644
index 0000000..8cbaf2e
--- /dev/null
+++ b/API/Physics/include/Gradient.h
@@ -0,0 +1,172 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Gradient.h
+//! @brief     Gradient defines a class that compute and store the gradient of specific variables. 
+//! @author    Zhang Jian, He Xin.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "Precision.h"
+
+namespace PHSPACE
+{
+//! Forward declaration.
+class Grid;
+class FieldProxy;
+class Range;
+class GradientCellCenter;
+
+//@brief 
+class Gradient
+{
+
+private:
+    //! Grid used to compute gradient.
+    Grid *grid;
+
+    //! Grid type.
+    int gridType;
+
+    //! The variable field used to compute its gradient. 
+    FieldProxy *q;
+
+    //! The total number of the variables.
+    int nTotalVariable;
+
+    //! The computed gradient.
+    FieldProxy *dqdx, *dqdy, *dqdz;
+
+    //! The node value used for computing the gradient.
+    RDouble **nodeValue;
+
+public:
+    //! Constructor for gradient computation.
+    LIB_EXPORT Gradient(Grid *grid_in, int gridType, FieldProxy *q, int nTotalVariable);
+
+    //! Destructor.
+    LIB_EXPORT ~Gradient();
+
+public:
+    //! set the nodevalue of this class. 
+    //! @param[in] nodeValue:   The node value used for computing the gradient.
+    LIB_EXPORT void setNodeValue(RDouble **nodeValue);
+
+    LIB_EXPORT void CalculatebyCellCenter(GradientCellCenter * gradientCellCenter, int nsurf);
+
+    //! Return the x component of gradient, i.e dqdx.
+    LIB_EXPORT FieldProxy * GetGradX() const;
+    
+    //! Return the y component of gradient, i.e dqdy.
+    LIB_EXPORT FieldProxy * GetGradY() const;
+
+    //! Return the z component of gradient, i.e dqdz.
+    LIB_EXPORT FieldProxy * GetGradZ() const;
+
+    //! Get the two dimensional pointer of the gradient(dqdx), only unstructured grid
+    LIB_EXPORT RDouble ** GetGradX_UNS() const;
+
+    //! Get the two dimensional pointer of the gradient(dqdx), only unstructured grid
+    LIB_EXPORT RDouble ** GetGradY_UNS() const;
+
+    //! Get the two dimensional pointer of the gradient(dqdx), only unstructured grid
+    LIB_EXPORT RDouble ** GetGradZ_UNS() const;
+
+    //! Communicate gradient at interface.
+    //! @param[in] gradNameX name of gradient's x-component, e.g "dqdx".
+    //! @param[in] gradNameY name of gradient's y-component, e.g "dqdy".
+    //! @param[in] gradNameZ name of gradient's z-component, e.g "dqdz".
+    //! @note gradient name must correspond to user registered through RegisterInterfaceField.
+    LIB_EXPORT void CommunicateInterfaceValue(string gradNameX, string gradNameY, string gradNameZ);
+
+    //! Store gradient at boundary's left face to compute aerodynamic coefficients.
+    //! @param[in] boundGradNameX name of gradient's x-component at boundary's left face.
+    //! @param[in] boundGradNameY name of gradient's y-component at boundary's left face.
+    //! @param[in] boundGradNameZ name of gradient's z-component at boundary's left face.
+    //! @note gradient name must correspond to user allocated memory through AllocateGlobalVar.
+    //! @param[in] nsurf    if equal to zero, for unstructured grid gradient boundary storage.
+    //!                     if not equal zero, for struct grid's gradient storage at the surfaces of direction nsurf
+    //! -# 0: default option, for unstructured grid.
+    //! -# 1: surfaces of direction x
+    //! -# 2: surfaces of direction y
+    //! -# 3: surfaces of direction z
+    LIB_EXPORT void StoreBoundGrad(string boundGradNameX, string boundGradNameY, string boundGradNameZ, int nsurf = 0);
+
+    LIB_EXPORT int GetNumberOfTotalVariable();
+
+private:
+    //! Allocate memory for dqdx, dqdy and dqdz.
+    void Allocate();
+
+    //! Deallocate memory for dqdx, dqdy and dqdz.
+    void FreeMemory();
+
+    //! Calculate gradient of variables at the surfaces of direction nsurf
+    //! rewrite from old Grad3dVector of fygradientoperation.h
+    void Grad3DVector(int nsurf);
+};
+
+class GradientCellCenter
+{
+
+private:
+    //! Grid used to compute gradient.
+    Grid *grid;
+
+    //! Grid type.
+    int gridType;
+
+    //! The variable field used to compute its gradient. 
+    FieldProxy *q;
+
+    //! The total number of the variables.
+    int nTotalVariable;
+
+    //! The computed gradient.
+    FieldProxy *dqdx, *dqdy, *dqdz;
+
+public:
+    //! Constructor for gradient computation.
+    LIB_EXPORT GradientCellCenter(Grid *grid_in, int gridType, FieldProxy *q, int nTotalVariable);
+
+    //! Destructor.
+    LIB_EXPORT ~GradientCellCenter();
+
+public:
+    //! Calculate the gradient, 
+    LIB_EXPORT void Calculate();
+
+    //! Return the x component of gradient, i.e dqdx.
+    LIB_EXPORT FieldProxy * GetGradX() const;
+    
+    //! Return the y component of gradient, i.e dqdy.
+    LIB_EXPORT FieldProxy * GetGradY() const;
+
+    //! Return the z component of gradient, i.e dqdz.
+    LIB_EXPORT FieldProxy * GetGradZ() const;
+
+    LIB_EXPORT void SetProxy(FieldProxy *q);
+
+    LIB_EXPORT int GetNumberOfTotalVariable();
+
+private:
+    //! Allocate memory for dqdx, dqdy and dqdz.
+    void Allocate();
+
+    //! Deallocate memory for dqdx, dqdy and dqdz.
+    void FreeMemory();
+
+    //! Calculate gradient of variables at the cell center.
+    void GradCenter();
+};
+
+#include "Gradient.hxx"
+}
\ No newline at end of file
diff --git a/API/Physics/include/Gradient.hxx b/API/Physics/include/Gradient.hxx
new file mode 100644
index 0000000..57924ac
--- /dev/null
+++ b/API/Physics/include/Gradient.hxx
@@ -0,0 +1,29 @@
+LIB_EXPORT inline FieldProxy * Gradient::GetGradX() const
+{
+	return dqdx;
+}
+
+LIB_EXPORT inline FieldProxy * Gradient::GetGradY() const
+{
+	return dqdy;
+}
+
+LIB_EXPORT inline FieldProxy * Gradient::GetGradZ() const
+{
+	return dqdz;
+}
+
+LIB_EXPORT inline FieldProxy * GradientCellCenter::GetGradX() const
+{
+	return dqdx;
+}
+
+LIB_EXPORT inline FieldProxy * GradientCellCenter::GetGradY() const
+{
+	return dqdy;
+}
+
+LIB_EXPORT inline FieldProxy * GradientCellCenter::GetGradZ() const
+{
+	return dqdz;
+}
diff --git a/API/Physics/include/GradientOperation.h b/API/Physics/include/GradientOperation.h
new file mode 100644
index 0000000..98ee73a
--- /dev/null
+++ b/API/Physics/include/GradientOperation.h
@@ -0,0 +1,64 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Gradient_Operation.h
+//! @brief     Gradient_Operation defines some methods carrying out calculations on gradient.
+//! @author    Zhang Jian, He Xin.
+
+#pragma once
+
+namespace PHSPACE
+{
+class Grid;
+class GreenGeo3D
+{
+public:
+    RDouble nxip,nyip,nzip,nxim,nyim,nzim;
+    RDouble nxjp,nyjp,nzjp,nxjm,nyjm,nzjm;
+    RDouble nxkp,nykp,nzkp,nxkm,nykm,nzkm;
+    RDouble ovol;
+};
+class Geometry3D
+{
+public:
+    RDouble kx,ky,kz,ex,ey,ez,cx,cy,cz;
+    RDouble vjacob;
+};
+
+void CorrectGradient(RDouble fl, RDouble fr, RDouble &dfdx, RDouble &dfdy, RDouble dx, RDouble dy, RDouble ods);
+void CorrectGradient(RDouble fl, RDouble fr, RDouble &dfdx, RDouble &dfdy, RDouble &dfdz, RDouble dx, RDouble dy, RDouble dz, RDouble ods);
+
+void Get_SPM  (int i, int j, int k, int js, int ks, int ndim, GreenGeo3D *greenGeo3D, RDouble4D &xfn, RDouble4D &yfn, RDouble4D &zfn, RDouble4D &area, RDouble3D &vol);
+void Get_SPM  (int i, int j, int k, int js, int ks, int ndim, GreenGeo3D *greenGeo3D, RDouble4D &xfv, RDouble4D &yfv, RDouble4D &zfv, RDouble3D &vol);
+void Get_SPM_I(int i, int j, int k, int js, int ks, int ndim, GreenGeo3D *greenGeo3D, RDouble4D &xfn, RDouble4D &yfn, RDouble4D &zfn, RDouble4D &area, RDouble3D &vol);
+void Get_SPM_J(int i, int j, int k, int js, int ks, int ndim, GreenGeo3D *greenGeo3D, RDouble4D &xfn, RDouble4D &yfn, RDouble4D &zfn, RDouble4D &area, RDouble3D &vol);
+void Get_SPM_K(int i, int j, int k, int js, int ks, GreenGeo3D *greenGeo3D, RDouble4D &xfn, RDouble4D &yfn, RDouble4D &zfn, RDouble4D &area, RDouble3D &vol);
+
+void Get_SPM_PARA(int ndim,GreenGeo3D *greenGeo3D,RDouble xfn_1,RDouble yfn_1,RDouble zfn_1,RDouble area_1,RDouble xfn_ip1,RDouble yfn_ip1,RDouble zfn_ip1,RDouble area_ip1,RDouble xfn_2,RDouble yfn_2,RDouble zfn_2,RDouble area_2,RDouble xfn_ip2,RDouble yfn_ip2,RDouble zfn_ip2,RDouble area_ip2,RDouble xfn_3,RDouble yfn_3,RDouble zfn_3,RDouble area_3,RDouble xfn_ip3,RDouble yfn_ip3,RDouble zfn_ip3,RDouble area_ip3,RDouble data_vol);
+void DXDYDZ  (RDouble3D & f,GreenGeo3D * g,int i,int j,int k,int js,int ks,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz);
+void DXDYDZ_I(RDouble3D & f,GreenGeo3D * g,int i,int j,int k,int js,int ks,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz);
+void DXDYDZ_J(RDouble3D & f,GreenGeo3D * g,int i,int j,int k,int js,int ks,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz);
+void DXDYDZ_K(RDouble3D & f,GreenGeo3D * g,int i,int j,int k,int js,int ks,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz);
+void DXDYDZ  (RDouble4D & f,GreenGeo3D * g,int i,int j,int k,int js,int ks,int npos,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz);
+void DXDYDZ_I(RDouble4D & f,GreenGeo3D * g,int i,int j,int k,int js,int ks,int npos,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz);
+void DXDYDZ_J(RDouble4D & f,GreenGeo3D * g,int i,int j,int k,int js,int ks,int npos,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz);
+void DXDYDZ_K(RDouble4D & f,GreenGeo3D * g,int i,int j,int k,int js,int ks,int npos,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz);
+
+void GradCenter(Grid *grid_in, RDouble3D &q, RDouble3D &dqdx, RDouble3D &dqdy, RDouble3D &dqdz);
+void GradCenter(Grid *grid_in, RDouble4D &q, RDouble3D &dqdx, RDouble3D &dqdy, RDouble3D &dqdz, int m);
+
+void Get_GEO_I(int i, int j, int k, int im, int ip, int ndim, Geometry3D *g, RDouble4D &xfv, RDouble4D &yfv, RDouble4D &zfv, RDouble3D &vol);
+void Get_GEO_J(int i, int j, int k, int jm, int jp, int ndim, Geometry3D *g, RDouble4D &xfv, RDouble4D &yfv, RDouble4D &zfv, RDouble3D &vol);
+void Get_GEO_K(int i, int j, int k, int km, int kp, Geometry3D *g, RDouble4D &xfv, RDouble4D &yfv, RDouble4D &zfv, RDouble3D &vol);
+void DXDYDZ_I(RDouble4D & f,Geometry3D * g,int i,int j,int k,int ndim,int npos,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz,int lr);
+void DXDYDZ_J(RDouble4D & f,Geometry3D * g,int i,int j,int k,int ndim,int npos,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz,int lr);
+void DXDYDZ_K(RDouble4D & f,Geometry3D * g,int i,int j,int k,int npos,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz,int lr);
+}
diff --git a/API/Physics/include/GridGroup.h b/API/Physics/include/GridGroup.h
new file mode 100644
index 0000000..1cd482b
--- /dev/null
+++ b/API/Physics/include/GridGroup.h
@@ -0,0 +1,82 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      GridGroup.h
+//! @brief     Explain this file briefly.
+//! @author    xxx.
+
+#pragma once
+#include "Pointer.h"
+#include "Geo_StructBC.h"
+#include "TK_Exit.h"
+#include "MultigridFactory.h"
+#include "MixGrid.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+class Region;
+
+class GridGroup
+{
+public:
+    GridGroup(int zoneStart = 0);
+    ~GridGroup();
+private:
+    int nzones;
+    int * block_proc_dump;    //! Bell 20131124 add
+    int * block_proc;
+    int * block_proc_grid;
+    int * block_type;
+    int * block_idx ;
+    int * block_fileProc;
+    vector< Grid *> grids;
+    int iBlock;
+    int zoneStart;
+    Region *region;
+public:
+    void AddGrid(Grid *grid);
+
+public:
+    void SetIBlock(int iBlock) { this->iBlock = iBlock; }
+    bool IsZoneLayoutInitialized();
+    void SetZoneHandler(Region *region) { this->region = region; }
+    Region * GetRegion() { return region; }
+    void SetNZones(int nZonesIn) { this->nzones = nZonesIn; }
+    int GetNZones() const { return nzones; }
+    int GetNumberofGrid() const;
+    Grid * GetGrid(int iZone) const { return grids[iZone]; }
+
+    //void ReadSingleGrid(fstream &file, int iZone);
+    void InitZoneLayoutInformation(const string &filename);
+
+    void SetBlockProcDump(int * block_proc_dump) { this->block_proc_dump = block_proc_dump; }
+    void SetBlockProc(int * block_proc) { this->block_proc = block_proc; }
+    void SetBlockProcGrid(int * block_proc) { this->block_proc_grid = block_proc; }
+    void SetBlockType(int * block_type) { this->block_type = block_type; }
+    void SetBlockIndex(int * block_idx) { this->block_idx = block_idx; }
+    void SetBockFileProc(int * block_fileProc) { this->block_fileProc = block_fileProc; }
+
+    int * GetBlockProcDump() { return this->block_proc_dump; }
+    int * GetBlockProc()     { return this->block_proc; }
+    int * GetBlockProcGrid() { return this->block_proc_grid; }
+    int * GetBlockType()     { return this->block_type; }
+    int * GetBlockIndex()    { return this->block_idx; }
+    int * GetBlockFileProc() { return this->block_fileProc; }
+    int   GetZoneStart()     { return this->zoneStart; }
+
+    void SetGlobalZoneLayout();
+private:
+    void InitZoneLayout(fstream &file);
+    
+};
+}
\ No newline at end of file
diff --git a/API/Physics/include/IO_GridReader.h b/API/Physics/include/IO_GridReader.h
new file mode 100644
index 0000000..5d13f65
--- /dev/null
+++ b/API/Physics/include/IO_GridReader.h
@@ -0,0 +1,183 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      IO_GridReader.h
+//! @brief     It defines the grid reading method.
+//! @author    Bell.
+
+#pragma once
+#include "GridGroup.h"
+using namespace std;
+
+namespace PHSPACE
+{
+
+//! @brief IO_GridReader class defines the method of grid reader.\n
+class IO_GridReader
+{
+private:
+    //! The grid group name list.
+    vector< string > gridGroupNameList;
+
+    //! Grid dimension.
+    //! -# 2 : two dimensional grid.
+    //! -# 3 : three dimensional grid.
+    int dimension;
+
+    //! Grid group to store the grids.
+    GridGroup * gridGroup;
+
+    //! Number of global grid files.
+    int globalFileNumber;
+
+    //! Grid groups for multi-files
+    vector< GridGroup * > gridGroups;
+public:
+    //! Construct the GridReader.
+    //! @param[in] gridFileName    the grid file name.
+    //! @param[in] dimension       Grid dimension.
+    //!                            -# 2 : two dimensional grid.
+    //!                            -# 3 : three dimensional grid.
+    //! @param[in] gridType    Grid type.
+    //!            -# PHSPACE::UNSTRUCTGRID (0): unstructured grid.
+    //!            -# PHSPACE::STRUCTGRID   (1): structured grid.
+    //!            -# PHSPACE::MIXGRID      (2): mixed grid, this type is not support for other developer.
+    LIB_EXPORT IO_GridReader(PHVectorString1D & gridGroupNameListIn, int dimension);
+
+    LIB_EXPORT ~IO_GridReader();
+
+public:
+    //! Read ordinary grid.
+    LIB_EXPORT void ReadGridsByP2PMode();
+
+    //! Reading in Multi Files (need further revise)
+    LIB_EXPORT void ReadGridsByCSMode();
+
+    //! Read the cell to node topology by cs mode.
+    LIB_EXPORT void ReadCellToNodeByCSMode();
+
+    //! Read the interpoint to interpoint info by cs mode.
+    LIB_EXPORT void ReadInterpointInfoByCSMode();
+
+    //! Read the cell to node topology by p2p mode.
+    LIB_EXPORT void ReadCellToNodeByP2PMode();
+
+    //! Read the interpoint to interpoint info by P2P mode.
+    LIB_EXPORT void ReadInterpointInfoByP2PMode();
+
+    //! Read the walldist information by cs mode.
+    LIB_EXPORT void ReadWallDistByCSMode();
+
+    //! Read the walldist information by p2p mode.
+    LIB_EXPORT void ReadWallDistByP2PMode();
+
+    //! Read the Face bc topology by cs mode.
+    LIB_EXPORT void ReadFaceBCByCSMode();
+
+    //! Read the face direction with matching target face by cs mode.
+    LIB_EXPORT void ReadFaceBcDirByCSMode();
+
+    //! Read the Face bc topology by p2p mode.
+    LIB_EXPORT void ReadFaceBCByP2PMode();
+
+    //! Read the face direction with matching target face by p2p mode.
+    LIB_EXPORT void ReadFaceBcDirByP2PMode();
+
+    //! Return number of grid zones.
+    LIB_EXPORT int GetNumberOfGrids();
+
+    //! Return number of total Global simulation grid zones.
+    LIB_EXPORT int GetNumberofGlobalZones();
+
+    //! Return the i-th grid.
+    LIB_EXPORT Grid * GetGrid(int iGrid);
+
+    LIB_EXPORT GridGroup * GetGridGroup();
+
+    LIB_EXPORT vector< GridGroup * > & GetGridGroups();
+
+    //! Return the number of grid files.
+    LIB_EXPORT std::size_t GetNumberOfGridFile() const;
+
+
+    void InitGridFileNameListAndFileProcessor();
+
+private:
+    void ReadNumberOfTotalZonesAndInitialGlobalValue();
+    int  CheckNumberofFiles();
+    bool CheckGridConvertionMixGrid();
+    void ReadGrid(const string & gridFileName, int startZoneIndex);
+    void ReadGridGroup(const string & gridFileName, int startZoneIndex);
+    void ReadNumberOfZones(fstream & file, int & nZones);
+    void ReadOneZoneGrid(fstream & file, int & iZone);
+    void ReadZoneLayout(fstream & file, int nZones);
+    void ReadZoneLayoutCSMode(fstream & file, int nZones, int startZoneIndex);
+    void RedistributeZonesIfNeed(int startZoneIndex);
+    void ClassifyGridSystem();
+    void DecompressDataToGrid(DataContainer *cdata, int iZone);
+    void GetSendRecvProcID(int iZone, int &send_proc, int &recv_proc);
+    void GetSendRecvProcID(int localZoneID, int &send_proc, int &recv_proc, int &recv_proc_grid);
+    void Read_Bcast(fstream &file, void *data, int size);
+    void Read(fstream &file, void *data, int size);
+    void Bcast(void *data, int size, int proc, int tag);
+    void ReadCompressedData(fstream &file, DataContainer *cdata, int send_proc, int recv_proc, int tag = 0);
+    void Open(fstream &file, const string &filename, const ios_base::openmode &openmode);
+    void OpenSerialFile(fstream &file, const string &filename, const ios_base::openmode &openmode);
+    void Close(fstream &file);
+
+    void DecompressDataToCellNode(DataContainer *cdata, int iZone);
+
+    //! Decompress the interpoint information from the DataContainer.
+    //! @param[in] cdata               the DataContainer which contains the interpoint information.
+    //! @param[in] iZone               the zone number.\n
+    void DecompressInterpointInfo(DataContainer *cdata, int iZone);
+    void DecompressDataToFaceBC(DataContainer *cdata, int iZone);
+    void DecompressDataToFaceBcDir(DataContainer *cdata, int iZone);
+    void DecompressDataToWallDist(DataContainer *cdata, int iZone);
+
+private:
+    //! The file index which the current processor charged.
+    int fileID;
+
+    //! The processor index of the current one.
+    int myProcID;
+
+    //! The processor index of the serve.
+    int serverProcID;
+
+    //! Number of zones in each .fts file.
+    int * nZonesList;
+    vector < int > numberOfZones;
+
+    //! If the cell to node file exist.
+    bool cellnodeFileExist;
+
+    //! If the cell to node file exist.
+    bool interpointInfoFileExist;
+
+    //! If the face BC file exist.
+    bool faceBCFileExist;
+
+    //! If the walldist file exist.
+    bool walldistFileExist;
+
+    int numberOfTotalZones;
+
+    int presentGridGroup;
+};
+
+#include "IO_GridReader.hxx"
+
+
+
+
+
+}
\ No newline at end of file
diff --git a/API/Physics/include/IO_GridReader.hxx b/API/Physics/include/IO_GridReader.hxx
new file mode 100644
index 0000000..5980593
--- /dev/null
+++ b/API/Physics/include/IO_GridReader.hxx
@@ -0,0 +1,29 @@
+LIB_EXPORT inline std::size_t IO_GridReader::GetNumberOfGridFile() const
+{
+	return gridGroupNameList.size();
+}
+
+LIB_EXPORT inline int IO_GridReader::GetNumberOfGrids()
+{
+	return gridGroup->GetNumberofGrid();
+}
+
+LIB_EXPORT inline int IO_GridReader::GetNumberofGlobalZones()
+{
+	return gridGroup->GetNZones();
+}
+
+LIB_EXPORT inline Grid * IO_GridReader::GetGrid(int iGrid)
+{
+	return gridGroup->GetGrid(iGrid);
+}
+
+LIB_EXPORT inline GridGroup * IO_GridReader::GetGridGroup()
+{
+	return gridGroup;
+}
+
+LIB_EXPORT inline vector< GridGroup * > & IO_GridReader::GetGridGroups()
+{
+	return gridGroups;
+}
\ No newline at end of file
diff --git a/API/Physics/include/IncomGas.h b/API/Physics/include/IncomGas.h
new file mode 100644
index 0000000..80c5bd0
--- /dev/null
+++ b/API/Physics/include/IncomGas.h
@@ -0,0 +1,128 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      IncomGas.h
+//! @brief     Explain this file briefly.
+//! @author    Ming Pingjian, Sun Huawen, Huang Jin.
+
+#pragma once
+#include "Precision.h"
+#include "PerfectGas.h"
+#include "Geo_UnstructGrid.h"
+#include <string>
+using namespace std;
+
+namespace PHSPACE
+{
+namespace GAS_SPACE
+{
+typedef struct {
+    RDouble molarMass;
+    RDouble rho;
+    RDouble mu;
+    RDouble cp;
+    RDouble k;
+} propertySp;
+
+typedef enum
+{
+    rhoConstant = 0,
+    rhoIncompressibleIdealGas,
+    rhoIdealGas,
+    rhoVolumnWeightedMixingLaw
+}RhoProperty;
+
+typedef enum
+{
+    muConstant = 0,
+    muSutherLand,
+    muIdealGasMixingLaw,
+    muMassWeightedMixingLaw,
+    muPiecewiseLinear,
+    muPiecewisePolynomial,
+    muPolynomial,
+    muPowerLaw
+}MuProperty;
+
+typedef enum
+{
+    cpConstant = 0,
+    cpMixing,
+    cpPiecewiseLinear,
+    cpPiecewisePolynomial,
+    cpPolynomial
+}CpProperty;
+
+typedef enum
+{
+    kConstant = 0,
+    kMassWeightedMixingLaw,
+    kIdealGasMixingLaw,
+    kPiecewiseLinear,
+    kPiecewisePolynomial,
+    kPolynomial
+}KProperty;
+
+typedef enum
+{
+    massDiffConstantDiluteApprox = 0,
+    massDiffDiluteApprox,
+    massDiffMulticomponent,
+    massDiffUnityLewisNumber
+}MassDiffProperty;
+
+class IncomGas :public PerfectGas
+{
+public:
+    IncomGas();
+    ~IncomGas();
+
+public:
+    void InitCommonParameter();
+
+    void InitParameterForMu();
+    void InitParameterForK();
+    void InitParameterForMassdiff();
+
+    void SetGasName(string speciesNameIncom);
+    void SetGasMolarMass(string gasMolarMass);
+    void SetGasRho(string gasRho);
+    void SetGasMu(string gasMu);
+    void SetGasCp(string gasCp);
+    void SetGasK(string gasK);
+
+    string* GetGasName() { return gasNameList; }
+    RDouble* GetGasMolarMass() { return gasMolarMassList; }
+    RDouble* GetGasRho() { return gasRhoList; }
+    RDouble* GetGasMu() { return gasMuList; }
+    RDouble* GetGasCp() { return gasCpList; }
+    RDouble* GetGasK() { return gasKList; }
+
+public:
+    void UpdateRg(UnstructGrid* grid, RDouble* Rg);
+    void UpdateRho(UnstructGrid* grid, RDouble* rho);
+    void UpdateMu(UnstructGrid* grid, RDouble* mu);
+    void UpdateCp(UnstructGrid* grid, RDouble* cp);
+    void UpdateK(UnstructGrid* grid, RDouble* k);
+    void UpdateMassDiff(UnstructGrid* grid, int iGas, RDouble* massdiff);
+
+protected:
+    void ComputePhiIJ();
+    void ComputeAmountOfSubstance(UnstructGrid* grid, RDouble** amountOfSubstance, RDouble** amountFracOfSubstance);
+    void SetPropertyLib();
+
+private:
+    vector<string> componentLib;
+    map<string, propertySp> propertyLib;
+};
+
+}
+}
\ No newline at end of file
diff --git a/API/Physics/include/Jacobian.h b/API/Physics/include/Jacobian.h
new file mode 100644
index 0000000..c63c27d
--- /dev/null
+++ b/API/Physics/include/Jacobian.h
@@ -0,0 +1,43 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Jacobian.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin, Bell, He Kun, He Xianyao, Liu Jian, Xu Qingxin, etc.
+
+#pragma once
+#include "Precision.h"
+namespace PHSPACE
+{
+//! The fuction computes the formula (M +- R) * dQ, M and R denote the Jacobian matrix and spectrum radius of inviscid flux,respectively,\n
+//! dQ is the increment of conservative vector.
+void MXDQ_STD(RDouble *prim, RDouble nxs, RDouble nys, RDouble nzs, RDouble area, RDouble vgn, RDouble gama, RDouble *dq, RDouble *f, 
+              int nm, int nl, RDouble radius, int ipn);
+
+void MXDQ_STD(RDouble *prim, RDouble *gykb, RDouble *dq, RDouble *df, RDouble gama, int nm, int nl, RDouble radius, int ipn);
+
+//! The fuction computes the formula (Mv +- Rv) * dQ, Mv and Rv denote the Jacobian matrix and spectrum radius of viscous flux,respectively,\n
+//! dQ is the increment of conservative vector.
+void MVXDQ_STD_LP(RDouble *prim, RDouble nxs, RDouble nys, RDouble nzs, RDouble area, RDouble vol, RDouble visl, RDouble vist, RDouble gama, 
+                  RDouble *dq, RDouble *f, int nm, int nl, RDouble radius, int ipn);
+
+//! The functions for low speed precondition.
+//! Compute conservative precondition matrix.
+//! The function computes flux,respectively,\n
+void ComputeConservativePreconMatrix(int sign, RDouble **MG, RDouble *prim, RDouble gama, RDouble preconCoeff, int nm, int neqn);
+void ConservativePreconMatrixVariables(RDouble *field, RDouble *preconMatrix, int neqn);
+void ConservativePreconMatrixVariables(RDouble *field, RDouble *preconMatrix, RDouble timeCoeff, int neqn);
+
+void MatrixFreeDF(RDouble *q, RDouble *dq, RDouble *nxyz, RDouble gama, RDouble *df, int nm, int neqn, int ipn);
+void PreconMatrixFreeDF(RDouble *q, RDouble *dq, RDouble *nxyz, RDouble **MG, RDouble gama, RDouble *df, int nm);
+void PreconMatrixFreeDF(RDouble *q, RDouble *dq, RDouble *nxyz, RDouble *preconMatrix, RDouble gama, RDouble preconCoeff, RDouble *df, int nm, int neqn, int ipn);
+void PreconMatrixFreeDF(RDouble *q, RDouble *dq, RDouble *nxyz, RDouble *preconMatrix, RDouble gama, RDouble preconCoeff, RDouble timeCoeff, RDouble *df, int nm, int neqn, int ipn);
+}
diff --git a/API/Physics/include/Limiter.h b/API/Physics/include/Limiter.h
new file mode 100644
index 0000000..72d9d10
--- /dev/null
+++ b/API/Physics/include/Limiter.h
@@ -0,0 +1,210 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Limiter.h
+//! @brief     Spatial inviscid flux limiter.
+//! @author    Bell.
+
+#pragma once
+#include "Geo_UnstructGrid.h"
+using namespace std;
+namespace PHSPACE
+{
+template < typename T >
+class Data2D;
+class Gradient;
+//! @brief Limiter class defines the method of limiter function during inviscid flux calculation.\n
+//! calculate limiter with inter faces communication.
+class Limiter
+{
+public:
+    typedef RDouble * iterator;
+
+private:
+    //! The unstructured grid that the variables load on.
+    UnstructGrid * grid;
+
+    //! The variables that need to calculate limiter.
+    RDouble ** q;
+
+    //! Number of variables, which is the above 'q', that need to calculate limiter.
+    int nLimiterVariables;
+
+    //! Gradient of the variables, which is the above 'q', that need to calculate limiter.
+    //Gradient *gradient;
+
+    //! Two-dimensional limiter pointer.\n
+    //! 1th dim point to the variable limiter.\n
+    //! 2nd dim point to the limiter value on each cell.
+    Data2D<RDouble> * limit;
+
+    //! Limiter variable name, used to identity interface limiter when parallel communication.
+    string limiterVarName;
+
+    //! Limiter type.
+    //! - # ILMT_NOLIM (1): Without limiter.
+    //! - # ILMT_FIRST (2): First order.
+    //! - # ILMT_BARTH (3): Barth limiter, for unstructured solver.
+    //! - # ILMT_VENCAT (4): Vencat limiter, for unstructured solver.
+    //! - # ILMT_STRUCT (10):
+    //! - # ILMT_MINMOD (11): MINMOD limiter, for structured solver.
+    //! - # ILMT_VAN_ALBADA (12): Van Albada limiter, for structured solver.
+    //! - # ILMT_VAN_ALBADA_CLZ (13):
+    //! - # ILMT_VANLEER (14): VanLeer limiter, for structured solver.
+    //! - # ILMT_SMOOTH (15):
+    //! - # ILMT_MINMODTEST (16):
+    //! - # ILMT_MIN_VAN (17):
+    int limiterTypeID;
+
+    //! Limiter model:\n
+    //! -# 0: limit only for pressure and density, then get the min value\n
+    //! -# 1: limit for every variables, then get the min value
+    int limitModel;
+
+    //! Scalar or vector limiter:\n
+    //! -# 0: Each variable use the same limiter coefficient.\n
+    //! -# 1: Each variable use the respective limiter coefficients.
+    int limitVector;
+
+    //! Vencat limiter type.\n
+    //! -# 0: The modification of Dr. Wang, AIAA-96-2091. Independent of grid scale.
+    //!       venkatCoeff = [0.01, 0.2].
+    //! -# 2: This limiter type was proposed by CXH. Which has nothing to do with grid scale, mach number.
+    //!       But it need to be V&V in more numerical experiments.
+    //! -# 3: This limiter type was modified by NeverMore.
+    //!       Which the limiter coefficient of eps^2 is influenced by cell volume,
+    //!       other than distance between cell center and face center, that was used in VencatLimiter4.
+    //! -# 4: Original format vencat limiter, depend on grid scale.
+    int vencatLimiterType;
+
+public:
+    //! @param[in] gridin     The unstructured grid that the variables load on.\n
+    //! @param[in] q          The variables that need to calculate limiter.\n
+    //! @param[in] gradient   Gradient of the variables, which is the above 'q', 
+    //!                       that need to calculate limiter.\n
+    //! @param[in] nVariable  Number of variables, which is the above 'q', 
+    //!                       that need to calculate limiter.\n
+    //! @param[in] limiterVar Name Limiter variable name, 
+    //!                       used to identity interface limiter when parallel communication.
+    LIB_EXPORT Limiter(UnstructGrid *gridin, RDouble **q, int nVariable, const string &limiterVarName);
+    LIB_EXPORT ~Limiter();
+
+public:
+    //! Set limiter type.\n
+    //! - # ILMT_NOLIM (1): Without limiter.\n
+    //! - # ILMT_FIRST (2): First order.\n
+    //! - # ILMT_BARTH (3): Barth limiter, for unstructured solver.\n
+    //! - # ILMT_VENCAT (4): Vencat limiter, for unstructured solver.\n
+    //! - # ILMT_STRUCT (10):\n
+    //! - # ILMT_MINMOD (11): MINMOD limiter, for structured solver.\n
+    //! - # ILMT_VAN_ALBADA (12): Van Albada limiter, for structured solver.\n
+    //! - # ILMT_VAN_ALBADA_CLZ (13):\n
+    //! - # ILMT_VANLEER (14): VanLeer limiter, for structured solver.\n
+    //! - # ILMT_SMOOTH (15):\n
+    //! - # ILMT_MINMODTEST (16):\n
+    //! - # ILMT_MIN_VAN (17):\n
+    LIB_EXPORT void SetLimiterTypeID(int uns_limiter); 
+
+    //! Set limiter model:\n
+    //! -# 0: limit only for pressure and density, then get the min value\n
+    //! -# 1: limit for every variables, then get the min value
+    LIB_EXPORT void SetLimiterModel(int limit_mode);   
+
+    //! Set scalar or vector limiter:\n
+    //! -# 0: Each variable use the same limiter coefficient.\n
+    //! -# 1: Each variable use the respective limiter coefficients.
+    LIB_EXPORT void SetLimiterVector(int limit_vec);
+
+    //! Set Vencat limiter type.\n
+    //! -# 0: The modification of Dr. Wang, AIAA-96-2091. Independent of grid scale.
+    //!       venkatCoeff = [0.01, 0.2].
+    //! -# 2: This limiter type was proposed by CXH. Which has nothing to do with grid scale, mach number.
+    //!       But it need to be V&V in more numerical experiments.\n
+    //! -# 3: This limiter type was modified by NeverMore.
+    //!       Which the limiter coefficient of eps^2 is influenced by cell volume,
+    //!       other than distance between cell center and face center, that was used in VencatLimiter4.\n
+    //! -# 4: Original format vencat limiter, depend on grid scale.
+    LIB_EXPORT void SetVencatLimiterType(int VenkatLimiterType);
+
+    //! Return limiter of ith-variable.
+    LIB_EXPORT iterator GetLimiter(int m = 0);
+
+    //! Run the limiter calculation.
+    LIB_EXPORT void Calculation(Grid *grid);
+
+    //! Initialzie the Two-dimensional limiter pointer(limit)'s data
+    LIB_EXPORT void InitLimitData();
+
+public:
+    void CreateLimiter(int nsize, int neqn = 1);
+
+    void BarthLimiter  (RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+    void VencatLimiter (RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, int iVariable = 0);
+    void VencatLimiter0(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+    void VencatLimiter1(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+    void VencatLimiter2(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, int iVariable = 0);
+    void VencatLimiter3(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, int iVariable = 0);
+    void VencatLimiter4(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);    // Bell 20121028 add
+    void VencatLimiter5(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+    void VencatLimiter6(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz);
+    void VencatLimiter7(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, int iVariable = 0);
+
+    void MinMaxDiff(RDouble *dmin, RDouble *dmax, RDouble *q);
+};
+
+#include "Limiter.hxx"
+
+template < typename T >
+class Data2D
+{
+private:
+    T *data;
+    int nsize, neqn, ntotal_size;
+public:
+    //! type definitions
+    typedef T  value_type;
+    typedef T* iterator;
+public:
+    Data2D()
+    {
+        data = 0;
+    }
+    ~Data2D()
+    {
+        delete [] data;
+    }
+public:
+    void CreateData(int nsize, int neqn = 1)
+    {
+        this->nsize = nsize;
+        this->neqn  = neqn;
+        ntotal_size = nsize * neqn;
+        data = new T [ ntotal_size ];
+        std::fill_n(data, ntotal_size, 0);
+    }
+    iterator GetData(int m)
+    {
+        return &data[ m * nsize ];
+    }
+
+    template < typename T2 >
+    void SetData(const T2 & value)
+    {
+        T t_value = value;
+        std::fill_n(data, ntotal_size, t_value);
+    }
+};
+
+void Init_Limiters(Grid *grid_in, RDouble *limit);
+
+int GetLimiterID(const string &limiter_name);
+
+}
diff --git a/API/Physics/include/Limiter.hxx b/API/Physics/include/Limiter.hxx
new file mode 100644
index 0000000..4ec6754
--- /dev/null
+++ b/API/Physics/include/Limiter.hxx
@@ -0,0 +1,19 @@
+LIB_EXPORT inline void Limiter::SetLimiterTypeID(int uns_limiter) 
+{ 
+	this->limiterTypeID = uns_limiter; 
+}
+
+LIB_EXPORT inline void Limiter::SetLimiterModel(int limit_mode)
+{ 
+	this->limitModel = limit_mode; 
+}
+
+LIB_EXPORT inline void Limiter::SetLimiterVector(int limit_vec) 
+{ 
+	this->limitVector = limit_vec;
+}
+
+LIB_EXPORT inline void Limiter::SetVencatLimiterType(int ivencat) 
+{
+	this->vencatLimiterType = ivencat; 
+}
\ No newline at end of file
diff --git a/API/Physics/include/MatrixLUSGS.h b/API/Physics/include/MatrixLUSGS.h
new file mode 100644
index 0000000..279ec53
--- /dev/null
+++ b/API/Physics/include/MatrixLUSGS.h
@@ -0,0 +1,77 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      MatrixLUSGS.h
+//! @brief     Implicit iterative method for Linearized N-S equations based on exact Jacobian matrix.
+//! @author    LiuJian, Yang Yufeng.
+
+#include "Geo_StructGrid.h"
+#include "FieldProxy.h"
+#include "FaceProxy.h"
+#include "PHMatrix.h"
+
+namespace PHSPACE
+{
+
+//! To execute the forward sweep of the Matrix LU-SGS method.
+//! @param[in ]: gridIn denotes the current computational regions of the grids.
+//! @param[out]: dqProxy is an array that store the difference values between the conservative variables at n and n+1 time step.
+void SolveMatrixLUSGSForwardSweep(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal);
+
+//! To execute the backward sweep of the Matrix LU-SGS method.
+//! @param[in ]: gridIn denotes the current computational regions of the grids.
+//! @param[out]: dqProxy and dqStarProxy are arrays that store the difference values between the conservative variables at n and n+1 time step.
+void SolveMatrixLUSGSBackwardSweep(Grid *gridIn, FieldProxy *dq_proxy, FieldProxy *LUplusDQ, RDouble &sweepNormal);
+
+//! Compute and save the diagonal matrix on grids that are used for matrix LU-SGS method.
+//! @param[in ]: gridIn denotes the current computational regions of the grids.
+void SolveDiagonalMatrix(StructGrid *gridIn);
+
+//! Construct the Jacobian matrix of the inviscid flux item.
+//! @param[in ]: primitiveVars is the array that stores the primitive variables of the current cell.
+//! @param[in ]: temperature is the array that stores the temperature values of the current cell.
+//! @param[in ]: xfn, yfn and zfn are components of the average normal vector located in the center of the current cell.
+//! @param[in ]: area denotes the avarage area located in the center of the current cell.
+//! @param[in ]: vgn denotes the moment velocity located in the center of the current cell, and it is used for dynamic mesh.
+//! @param[in ]: gama denotes the specific heat ratio.
+//! @param[out]: tempMatrix is an matrix that stores the Jacobian matrix of the inviscid flux item.
+void ComputeInviscidMatrix(RDouble *primitiveVars, RDouble xfn, RDouble yfn, RDouble zfn, RDouble area, RDouble vgn, RDouble gama, RDouble2D *tempMatrix);
+
+//! Construct the roe matrix of the inviscid flux item.
+//! @param[in ]: priml is the array that stores the primitive variables of the left cell.
+//! @param[in ]: primr is the array that stores the primitive variables of the current cell.
+//! @param[in ]: xfn, yfn and zfn are components of the average normal vector located in the center of the current cell.
+//! @param[in ]: gama denotes the specific heat ratio.
+//! @param[in ]: area denotes the avarage area located in the center of the current cell.
+//! @param[in ]: rtemL and rtemR are the parameters of Entropy fix, add by liujian 2019 From JCP ,1995, Lin H-C
+//! @param[out]: jacobianMatrix is an matrix that stores the Roe matrix of the inviscid flux item.
+void SolveRoeMatrix(RDouble *priml, RDouble *primr, RDouble xfn, RDouble yfn, RDouble zfn, RDouble gama, RDouble area, RDouble rtemL, RDouble rtemR, RDouble2D *jacobianMatrix);
+
+//! Construct the Jacobian matrix of the viscous flux item.
+//! @param[in ]: primitiveVars is the array that stores the primitive variables of the current cell.
+//! @param[in ]: temperature is the array that stores the temperature values of the current cell.
+//! @param[in ]: xfn, yfn and zfn are components of the average normal vector located in the center of the current cell.
+//! @param[in ]: area denotes the avarage area located in the center of the current cell.
+//! @param[in ]: vol denotes the avarage volume located in the center of the current cell.
+//! @param[in ]: vgn denotes the moment velocity located in the center of the current cell, and it is used for dynamic mesh.
+//! @param[in ]: gama denotes the specific heat ratio.
+//! @param[in ]: laminarViscosity and turbulentViscosity denote the laminar viscosity and turbulent viscosity, respectively.
+//! @param[out]: tempMatrix is an matrix that stores the Jacobian matrix of the viscous flux item.
+void ComputeViscousMatrix(RDouble *primitiveVars, RDouble *temperature, RDouble xfn, RDouble yfn, RDouble zfn, RDouble area, RDouble vol, 
+                          RDouble vgn, RDouble gama, RDouble laminarViscosity, RDouble turbulentViscosity, RDouble2D *tempMatrix);
+
+//! Compute and save the inverse matrix of the diagonal matrix by LU decomposition.
+//! @param[in ]: diagonalMatrixD is the diagonal matrix used for the matrix LU-SGS method.
+//! @param[in ]: nEquation is the 
+//! @param[out]: inverseDiaMatrix is the inverse matrix of the diagonal matrix.
+void ObtainInverseDiagonalMatrix(RDouble2D *diagonalMatrixD, int nEquation, RDouble2D *inverseDiaMatrix);
+
+}
\ No newline at end of file
diff --git a/API/Physics/include/MovingMesh.h b/API/Physics/include/MovingMesh.h
new file mode 100644
index 0000000..bce21ff
--- /dev/null
+++ b/API/Physics/include/MovingMesh.h
@@ -0,0 +1,157 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      MovingMesh.h
+//! @brief     Explain this file briefly.
+//! @author    He Kun.
+
+#pragma once
+
+namespace PHSPACE
+{
+
+class MeshNodesSpring
+{
+public:
+    MeshNodesSpring(){};
+    ~MeshNodesSpring(){};
+
+public:
+    int numberOfNodes;
+
+public:
+    void Initialize(){};
+    void Run(){};
+};
+
+class MeshNodesMapping
+{
+public:
+    MeshNodesMapping (){};
+    ~MeshNodesMapping(){};
+
+public:
+    int numberOfNodes;
+
+public:
+    void Initialize(){};
+    void Run(){};
+};
+
+class MeshNodesRBF
+{
+public:
+    MeshNodesRBF(){};
+    ~MeshNodesRBF(){};
+
+public:
+    int numberOfNodes;
+
+public:
+    void Initialize(){};
+    void Run(){};
+};
+
+class SixDofParameter;
+class DeformingParameter;
+class Grid;
+
+//! the father class of the moving mesh. the features includes the deforming and rigid motion.
+class SimpleMovingMesh
+{
+public:
+    SimpleMovingMesh();
+    ~SimpleMovingMesh();
+
+public:
+    int meshDoformingMethod;      //! 0 - not doformed; 1 - rbf; 2 - spring; 3 - mapping����
+
+public:
+    Grid *grid;
+
+    int numberOfNodes;
+    //! the init coordinate of the body axis.
+    vector< RDouble > xInit;
+    vector< RDouble > yInit;
+    vector< RDouble > zInit;
+
+    //! the current coordinate of the body axis.
+    vector< RDouble > xPresent;
+    vector< RDouble > yPresent;
+    vector< RDouble > zPresent;
+
+public:
+    void SetInitCoordinate(Grid* grid     );
+    void CalInitCoordinate(SixDofParameter    * sixDof   );
+
+    void Deforming        ();
+    void RigidMoving      (SixDofParameter    * sixDof   );
+    void UpdateGrid       ();
+};
+
+
+//! several common complex motion meshes.
+//! transform to the calculating axis system from the body axis by the six DOF information.
+//! for the rudder surface control.
+//! 1 - first rotate in the body axis system.(rudder deviation)
+//! 2 - implement the coordinate transform by the assembly information of the projectile.
+//! 3 - transform to the calculating axis system by the six DOF information of the projectile.
+
+class OriginalMovingMesh
+{
+public:
+    OriginalMovingMesh();
+    ~OriginalMovingMesh();
+
+public:
+    int bodyIndex;
+    int fartherIndex;
+    SixDofParameter    *location;         //! the assmbly positin in farther index.
+
+    SixDofParameter    *presentSixdof;    //! the current six DOF parameters of the rigid body.
+
+    DeformingParameter *presentDeforming; //! the current Deforming parameters.
+
+    Grid* grid;
+    SimpleMovingMesh   *movingMesh;
+
+public:
+    void Initialize(Grid* grid, int bodyIndex);
+    void Restart();
+    void PreProcess();
+    void PreProcessRigidMoving();
+    void PreProcessDeforming();
+    void Run();
+};
+
+class MovingMeshManager
+{
+public:
+    MovingMeshManager();
+    ~MovingMeshManager();
+
+public:
+    int numberOfBodies;
+    int numberOfZones;
+
+    OriginalMovingMesh ** originalMovingMeshes;
+
+    vector < OriginalMovingMesh * > innerMovingMesh;
+    vector < OriginalMovingMesh * > outerMovingMesh;
+
+public:
+    void Initialize();
+    void Restart();
+    void Run();
+    void Post();
+};
+
+}
\ No newline at end of file
diff --git a/API/Physics/include/PHSuperMatrix.h b/API/Physics/include/PHSuperMatrix.h
new file mode 100644
index 0000000..a393287
--- /dev/null
+++ b/API/Physics/include/PHSuperMatrix.h
@@ -0,0 +1,313 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PHSuperMatrix.h
+//! @brief     Explain this file briefly.
+//! @author    xxx.
+
+#pragma once
+#include <vector>
+#include "PHHeader.h"
+#include "TK_Exit.h"
+#include "Math_BasisFunction.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+template < typename T >
+class PHMatrix
+{
+protected:
+    int _nrow, _ncolumn, _nsize;
+    PHVector1D< T > _data;
+public:
+    PHMatrix(int nrow, int ncolumn = 1)
+    {
+        _nrow    = nrow;
+        _ncolumn = ncolumn;
+        _nsize   = _nrow * _ncolumn;
+        _data    = PHVector1D< T >(_nsize);
+    }
+
+    ~PHMatrix()
+    {
+    }
+    int rows   () const { return _nrow; }
+    int columns() const { return _ncolumn; }
+    int sizes  () const { return _nsize; };
+    PHVector1D< T > datas() { return _data; }
+
+    const T & operator() (int row, int column = 1) const 
+    {
+        if ((row < 0 || row > _nrow) || (column < 0 || column > _ncolumn))
+        {
+            cout << endl << "Error : overflow in type PHMatrix ! ";
+            TK_Exit::ExceptionExit("");
+        }
+        return  _data[(row - 1) * _ncolumn + (column - 1)] ;
+    }
+
+    T & operator()(int row, int column = 1)
+    {
+        if ((row < 0 || row > _nrow) || (column < 0 || column > _ncolumn))
+        {
+            TK_Exit::ExceptionExit("Error : overflow in type PHMatrix ! ");
+        }
+        return  _data[(row - 1) * _ncolumn + (column - 1)] ;
+    }
+
+};
+
+template < typename T >
+PHMatrix< T > operator * (const PHMatrix<T> & matrixA, const PHMatrix<T> & matrixB)
+{
+    int nrow = matrixA.rows();
+    int ncol = matrixB.columns();
+
+    if (matrixA.columns() != matrixB.rows())
+    {
+        TK_Exit::ExceptionExit("Error : Index not matched in PHMatrix<T> operator * ! ");
+    }
+
+    PHMatrix< T > result(nrow, ncol);
+
+    for (int col = 1; col <= ncol; ++ col)
+    {
+        for (int row = 1; row <= nrow; ++ row)
+        {
+            T sum = static_cast< T >(0);
+            for (int i = 1; i <= matrixA.columns(); ++ i)
+            {
+                sum += matrixA(row, i) * matrixB(i, col);
+            }
+            result(row, col) = sum;
+        }
+    }
+    return result;
+}
+
+template < typename T >
+PHMatrix< T > MATMUL(PHMatrix<T> & matrixA, PHMatrix<T> & matrixB)
+{
+    int nrow = matrixA.rows();
+    int ncol = matrixB.columns();
+
+    if (matrixA.columns() != matrixB.rows())
+    {
+        TK_Exit::ExceptionExit("Error : Index not matched in function MATMUL ! ");
+    }
+
+    PHMatrix<T> result(nrow, ncol);
+
+    for (int row = 1; row <= nrow; ++ row)
+    {
+        for (int col = 1; col <= ncol; ++ col)
+        {
+            T sum = static_cast< T >(0);
+            for (int i = 1; i <= matrixA.columns(); ++ i)
+            {
+                sum += matrixA(row, i) * matrixB(i, col);
+            }
+            result(row, col) = sum;
+        }
+    }
+    return result;
+}
+
+template < typename T >
+PHMatrix<T> TransposeMatrix(PHMatrix<T> & matrixA)
+{
+    int nrow = matrixA.rows();
+    int ncol = matrixA.columns();
+
+    if (nrow != ncol)
+    {
+        TK_Exit::ExceptionExit("Error : Index not matched in function TransposeMatrix ! ");
+    }
+
+    PHMatrix<T> matrixB(nrow, ncol);
+
+    for (int row = 1; row <= nrow; ++ row)
+    {
+        for (int col = 1; col <= ncol; ++ col)
+        {
+            matrixB(row, col) = matrixA(col, row);
+        }
+    }
+    return matrixB;
+}
+
+template < typename T >
+PHMatrix<T>  Matrix3X3Inverse(PHMatrix<T> & matrix)
+{
+    PHMatrix<T> inverse(3, 3);
+
+    if (matrix.rows() != 3 || matrix.columns() != 3)
+    {
+        TK_Exit::ExceptionExit("Error : Index must be 3 in function Matrix3X3Inverse ! ");
+    }
+
+    T detA = matrix(1, 1) * matrix(2, 2) * matrix(3, 3)
+           + matrix(1, 2) * matrix(2, 3) * matrix(3, 1)
+           + matrix(2, 1) * matrix(3, 2) * matrix(1, 3)
+           - matrix(1, 1) * matrix(2, 3) * matrix(3, 2)
+           - matrix(2, 2) * matrix(1, 3) * matrix(3, 1)
+           - matrix(3, 3) * matrix(2, 1) * matrix(1, 2);
+
+    if (detA == 0.0)
+    {
+        TK_Exit::ExceptionExit("Error : The Determinant of the Matrix is Zero��Singular Matrix ! ");
+    }
+    else
+    {
+        inverse(1, 1) = matrix(2, 2) * matrix(3, 3) - matrix(2, 3) * matrix(3, 2);
+        inverse(1, 2) = matrix(1, 3) * matrix(3, 2) - matrix(1, 2) * matrix(3, 3);
+        inverse(1, 3) = matrix(1, 2) * matrix(2, 3) - matrix(2, 2) * matrix(1, 3);
+
+        inverse(2, 1) = matrix(2, 3) * matrix(3, 1) - matrix(2, 1) * matrix(3, 3);
+        inverse(2, 2) = matrix(1, 1) * matrix(3, 3) - matrix(1, 3) * matrix(3, 1);
+        inverse(2, 3) = matrix(2, 1) * matrix(1, 3) - matrix(1, 1) * matrix(2, 3);
+
+        inverse(3, 1) = matrix(2, 1) * matrix(3, 2) - matrix(3, 1) * matrix(2, 2);
+        inverse(3, 2) = matrix(1, 2) * matrix(3, 1) - matrix(1, 1) * matrix(3, 2);
+        inverse(3, 3) = matrix(1, 1) * matrix(2, 2) - matrix(1, 2) * matrix(2, 1);
+
+        for (int i = 1; i <= 3; ++ i)
+        {
+            for (int j = 1; j <= 3; ++ j)
+            {
+                inverse(i, j) /=  detA;
+            }
+        }
+    }
+
+    return inverse;
+
+}
+
+template < typename T >
+PHMatrix<T> BaseMatrixOfRotate(const T & angle, string const & axisLabel)
+{
+    PHMatrix<T> matrix(3, 3);
+
+    T cosine = cos(angle);
+    T sine   = sin(angle);
+    T oneTmp    = static_cast< T >(1);
+    T zeroTmp   = static_cast< T >(0);
+
+    if (axisLabel == "x" || axisLabel == "X")
+    {
+        matrix(1, 1) = oneTmp;
+        matrix(1, 2) = zeroTmp;
+        matrix(1, 3) = zeroTmp;
+
+        matrix(2, 1) = zeroTmp;
+        matrix(2, 2) = cosine;
+        matrix(2, 3) = sine;
+
+        matrix(3, 1) = zeroTmp;
+        matrix(3, 2) =-sine;
+        matrix(3, 3) = cosine;
+    } 
+    else if (axisLabel == "y" || axisLabel == "Y")
+    {
+        matrix(1, 1) = cosine;
+        matrix(1, 2) = zeroTmp;
+        matrix(1, 3) =-sine;
+
+        matrix(2, 1) = zeroTmp;
+        matrix(2, 2) = oneTmp;
+        matrix(2, 3) = zeroTmp;
+
+        matrix(3, 1) = sine;
+        matrix(3, 2) = zeroTmp;
+        matrix(3, 3) = cosine;
+    }
+    else if (axisLabel == "z" || axisLabel == "Z")
+    {
+        matrix(1, 1) = cosine;
+        matrix(1, 2) = sine;
+        matrix(1, 3) = zeroTmp;
+
+        matrix(2, 1) =-sine;
+        matrix(2, 2) = cosine;
+        matrix(2, 3) = zeroTmp;
+
+        matrix(3, 1) = zeroTmp;
+        matrix(3, 2) = zeroTmp;
+        matrix(3, 3) = oneTmp;
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("Error : error axis label in BaseMatrixOfRotate ! ");
+    }
+
+    return matrix;
+}
+
+template < typename T >
+PHMatrix<T> AngleRateTransformMatrixBodyToGlobal(PHMatrix<T> & eulerangle, string const & rotateorder)
+{
+    PHMatrix<T> matrix(3, 3);
+
+    T pitchangle  = eulerangle(1);
+    T rollangle   = eulerangle(3);
+
+    T oneTmp    = static_cast< T >(1);
+    T zeroTmp   = static_cast< T >(0);
+
+    if (rotateorder == "y-z-x" || rotateorder == "Y-Z-X" || rotateorder == "2-3-1")
+    {
+        T cosineofpitchangle = cos(pitchangle);
+        if (PHSPACE::ABS(cosineofpitchangle) < SMALL)
+        {
+            TK_Exit::ExceptionExit("Error : pitching angle is 90 DEG��singular ! ");
+        }
+        else
+        {
+            T sineofpitchangle  = sin(pitchangle);
+            T cosineofrollangle = cos(rollangle);
+            T sineofrollangle   = sin(rollangle);
+
+            matrix(1, 1) = zeroTmp;
+            matrix(1, 2) = sineofrollangle;
+            matrix(1, 3) = cosineofrollangle;
+
+            matrix(2, 1) = zeroTmp;
+            matrix(2, 2) = cosineofrollangle / cosineofpitchangle;
+            matrix(2, 3) =-sineofrollangle / cosineofpitchangle;
+
+            matrix(3, 1) = oneTmp;
+            matrix(3, 2) =-cosineofrollangle * sineofpitchangle / cosineofpitchangle;
+            matrix(3, 3) = sineofrollangle * sineofpitchangle / cosineofpitchangle;
+        }
+    } 
+    else
+    {
+        TK_Exit::ExceptionExit("Error : Undefined Euler Angle transformation order ! ");
+    }
+
+    return matrix;
+}
+
+template < typename T >
+PHMatrix<T> CrossProductVector(PHMatrix<T> a, PHMatrix<T> b)
+{
+    PHMatrix<T> cp(a.rows());
+    cp(1) = a(2) * b(3) - a(3) * b(2);
+    cp(2) = a(3) * b(1) - a(1) * b(3);
+    cp(3) = a(1) * b(2) - a(2) * b(1);
+    return cp;
+}
+
+}
\ No newline at end of file
diff --git a/API/Physics/include/PerfectGas.h b/API/Physics/include/PerfectGas.h
new file mode 100644
index 0000000..c24a585
--- /dev/null
+++ b/API/Physics/include/PerfectGas.h
@@ -0,0 +1,197 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PerfectGas.h
+//! @brief     Explain this file briefly.
+//! @author    Li Peng, He Xin.
+
+#pragma once
+#include "Precision.h"
+#include "Gas.h"
+#include <string>
+using namespace std;
+
+namespace PHSPACE
+{
+class DataContainer;
+namespace GAS_SPACE
+{
+
+class PerfectGas :public Gas
+{
+private:
+    FluidParameter referenceParameterDimensional;
+private:
+    RDouble coefficientOfStateEquation;    //! universal gas constant, R
+    int nGasModel;    //! The gas model, 0 is the earth atmosphere, 1 the Mars atmosphere, 2 the Argon, 3 the Nitrogen.
+    RDouble molecularDiameter;
+public:
+    PerfectGas();
+    ~PerfectGas();
+
+public:
+    void GetReferenceParameters(FluidParameter &refParam){refParam = referenceParameterDimensional;};
+    RDouble GetMolecularDiameter() {return this->molecularDiameter;};
+    int GetGasModelType() {return this->nGasModel;};
+public:
+    //! The primitive variables are transfered to the conservative variables.
+    //! @param[in ]: q prim indicates the primitive variables.
+    //! @param[in ]: gama denotes the specific heat ratio, which is valid in the perfect gas.
+    //! @param[in ]: Tv denotes the vibrational temperature(The non-dimensional value).
+    //! @param[in ]: Te denotes the electron temperature(The non-dimensional value).
+    //! @param[out]: indicates the conservative variables.
+    void Primitive2Conservative(RDouble *prim, RDouble gama, RDouble Tv, RDouble Te, RDouble *q);
+
+#ifdef USE_GMRESSOLVER
+    //! GMRESPV 
+    //! the derivative of primitive variables w.r.t conservative variables
+    void dPrimitive2dConservative(RDouble *prim, RDouble gama, RDouble** dqdcv);
+
+    //! GMRESVis
+    //! the derivative of primitive variables w.r.t conservative variables
+    void dGradient2dPrimitive(RDouble *prim, int sign, RDouble** dgraddq, char direction, RDouble nxs, RDouble nys, RDouble nzs, RDouble ns, RDouble vol,int nPara = 6);
+    
+    //! GMRESnolim
+    void dGradient2dPrimitive4limiter(int sign, RDouble** dgraddq, char direction, RDouble nxs, RDouble nys, RDouble nzs, RDouble ns, RDouble vol);
+#endif
+
+    //! To obtain the total energy E = e + 1/2*V2.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables, gama is the specific heat ratio of the mixture gas.
+    //! @param[in ]: vibrationTemperature is non-dimensional value of vibration temperature.
+    //! @param[in ]: electronTemperature is non-dimensional value of electron  temperature.
+    //! @param[OUT]: totalEnergy denotes the total internal energy of the mixed gas.
+    void ComputeInternalEnergy(RDouble *primitiveVariables, RDouble gama, RDouble vibrationTemperature, RDouble electronTemperature, RDouble &totalEnergy);
+
+    //! The conservative variables are transfered to the primitive variables.
+    //! @param[in ]: q indicates the conservative variables.
+    //! @param[in ]: gama denotes the specific heat ratio, which is valid in the perfect gas.
+    //! @param[out]: prim indicates the primitive variables.
+    //! @param[in/out]: temperature denotes the array of temperatures in the current time-advancing step and next time-advancing step.
+    //! As input parameter, temperature indicates the temperature of the current time-advancing step. Meanwhile,
+    //! it denotes the temperature of the next time-advancing step as output parameter.
+    void Conservative2Primitive(RDouble *q, RDouble gama, RDouble *prim, RDouble *temperature);
+
+    virtual void GetSpecificHeatRatio(RDouble *prim, RDouble &gama);
+
+    //! Compute the static enthalpy with the primitive variables.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: gama is the specific heat ratio.
+    //! @param[out]: enthalpy denotes the static enthalpy.
+    //! @param[in ]: temperatures stores the translation-rotation temperature, vibration temperature and the electron temperature.
+    void ComputeEnthalpyByPrimitive(RDouble *primitiveVariables, RDouble &gama, RDouble &enthalpy, RDouble* temperatures);
+
+    //! This function is used for perfect gas and single temperature model.
+    //! To compute the total enthalpy and the variable dh in the function MXDQ_STD(). dh=b2, b2 denotes the coefficient \n
+    //! of the vector M*dQ which can be referred to the forumla (A.7) and (A.8) in the appendix A of the PHengLEI Theory manual.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: gama is the specific heat ratio.
+    //! @param[in ]: deltaQ is an array to saving the differences of the primitive variables.
+    //! @param[out]: totalEnthalpy denotes the total enthalpy.
+    //! @param[out]: deltaEnthalpy denotes the difference of static enthalpy.
+    void ComputeTotalEnthalpyAndDH(RDouble *primitiveVariables, RDouble &gama, RDouble *deltaQ, RDouble &totalEnthalpy, RDouble &deltaEnthalpy);
+
+
+    //! To compute the total enthalpy and the difference of the static enthalpy.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: gama is the specific heat ratio.
+    //! @param[in ]: deltaQ is an array to saving the differences of the primitive variables.
+    //! @param[out]: deltaEnthalpy denotes the difference of static enthalpy.
+    //! @param[out]: totalEnthalpy denotes the total enthalpy.
+    void ComputeDHAndTotalEnthalpy(RDouble *primitiveVariables, RDouble &gama, RDouble *deltaQ, RDouble &deltaEnthalpy, RDouble &totalEnthalpy);
+
+    //! To compute the static enthalpy of the mixed gas.
+    //! @param[in ]: primitiveVars is an array of saving the primitive variables.
+    //! @param[in ]: transRotationTemperature denotes the temperature of translation-rotation mode.
+    //! @param[in ]: vibrationTemperature denotes the temperature of vibration mode.
+    //! @param[in ]: electronTemperature denotes the temperature of electron mode.
+    RDouble GetMixedGasEnthalpy(RDouble *primitiveVars, RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature);
+
+    //! To obtain the non-dimensional viscosity of the mixture gas according to the primary variables.
+    //! @param[in ]: primitiveVariables is an array of saving the primitive variables.
+    //! @param[in ]: transRotationTemperature is the non-dimensional translation-rotation temperature of the mixture gas.
+    //! @param[in ]: electronTemperature is the non-dimensional electron temperature of the mixture gas.
+    //! @param[in ]: suthTemperature denotes the temperature value in the Sutherland fomula.
+    //! @param[out]: viscosity is the non-dimensional viscosity of the mixture gas [N*s/m2].
+    void ComputeViscosityByPrimitive(RDouble *primitiveVariables, RDouble &transRotationTemperature, RDouble &electronTemperature, RDouble &suthTemperature, RDouble &viscosity);
+
+    void InitGlobalParameterOfNSEquation();
+
+    void InitCommonParameter();
+
+    void InitReferenceParameter();
+
+    void InitNumberOfSpecies();
+
+    void InitOtherParameter();
+
+    //! Obtain the T, p, rho and c by the height (Rg=287.053, gamma=1.4 are used). However, only the T and p is useful. 
+    //! The other two variables will be recomputed to be compatible with the condition of chemical reactions existing.
+    void SetAirInformationByDataBase();
+
+    //! Obtain the T, p, rho and c by the T0, P0, Ma (Rg=287.053, gamma=1.4 are used). However, only the T and p is useful. 
+    //! The other two variables will be recomputed to be compatible with the condition of chemical reactions existing.
+    void SetAirInformationByExpData(int useSetting);
+    void SetAirInformationByExpData();
+
+    void GetAirInfo(const RDouble &height, RDouble &temperature, RDouble &pressure, RDouble &density, RDouble &soundspeed);
+
+    void SetAirInformationByWRFDataBase();
+    void ReadAirInfo(string &filepath, RDouble &longitude, RDouble &latitude, RDouble &temperature, RDouble &pressure, RDouble &density, RDouble &angle, RDouble &velocity, RDouble &soundspeed);
+    void ReadWRFSingleData(string &filepath, string &varname,int &fileindex, RDouble &longitude, RDouble &latitude, vector< RDouble > & variable);
+    void ReadWRFDoubleData(string &filepath, string &varname,int &fileindex, RDouble &longitude, RDouble &latitude, vector< RDouble > & variable1, vector< RDouble > & variable2);
+    RDouble ComputeVariablesAverage(vector< RDouble > & variable);
+
+
+    void ComputeReferenceParameter();
+
+    void ComputeDensityWithReynoldsNumber();
+
+    void ComputeReferencePrimitive();
+
+    void ComputeReferenceGasInformation();
+
+    void ComputeReferenceReynoldsNumber();
+
+    //! This function is mainly for the average density of the mixture in chemical reactions, 
+    //! the value of mixture density has little difference with that of no chemical reaction, which can be ignored.
+    void NormalizeAirInformation();
+
+    void ComputePressureInGasStateEquation();
+
+    void ComputeCoefficientOfStateEquation();
+
+    void ComputeReferenceVelocity();
+
+    void ComputeReferenceSoundVelocity();
+
+    void ComputeReferenceSpecificHeatRatio();
+
+    void ComputeReferenceViscosityDimensional();
+
+    void ComputeProperReynoldsNumberForGrid();
+
+    void ComputeOtherProperParameterForGrid();
+
+    void ComputeReferenceGeneralGasConstant();
+
+    void ComputeReferenceMolecularInformation();
+
+    RDouble GetCoefficientOfStateEquation() { return coefficientOfStateEquation; };
+
+    RDouble GetUniversalGasConstant();
+
+    RDouble ComputeReferenceTotalEnthalpy();
+
+};
+
+}
+bool CheckIfLocationInMinMaxBox(RDouble longitude,RDouble latitude,RDouble a,RDouble b,RDouble c,RDouble d);
+}
diff --git a/API/Physics/include/Region.h b/API/Physics/include/Region.h
new file mode 100644
index 0000000..e8a0e39
--- /dev/null
+++ b/API/Physics/include/Region.h
@@ -0,0 +1,295 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Region.h
+//! @brief     It defines the region, that is defined as the computational domain.
+//!            It is used to manage the geometry, solvers, fields and so on.
+//!            It is one of the most important classes in PHengLEI.
+//! @author    Bell, He Xin.
+
+#pragma once
+#include "Pointer.h"
+#include "TK_Exit.h"
+#include "Geo_StructBC.h"
+#include "MultigridFactory.h"
+#include "MixGrid.h"
+#include "IO_GridReader.h"
+namespace PHSPACE
+{
+//! @brief Region class is used to manage the geometry, solvers, fields and so on.
+//!        It is one of the most important classes in PHengLEI.
+//!        In PHengLEI, the whole computational domain is divided in to many sub-domains(zones) using
+//!        different partition methods on structured/unstructured grid. Each sub-domain is defined as 'zone'.
+//!        'Grid', which are computational mesh include point/face/cell, are built on each 'zone'.
+//!        The zones belong to the current processor are defined as 'Region'.
+//!        The relationship of these object:\n
+//!        structured/unstructured mesh --> grid --> zone --> region.
+class Zone;
+class Region
+{
+public:
+    LIB_EXPORT Region();
+    LIB_EXPORT ~Region();
+
+private:
+    //! The main data structure, which include the 'Zones' (Referenced as Zone class).
+    //! The size of zoneContainer is equal to the number of global partition zones.
+    //! IMPORTANT: only the zones that belong to the current processor are NON-ZERO Entity,
+    //! the zones that belong to other processors are set to be ZERO in this container.
+    vector <Zone *> *zoneContainer;
+
+public:
+    //! Return the iZone-th zone.
+    Zone * GetZone(int iZone);
+
+    //! If the iZone-th zone belong to current processor.\n
+    //! @return
+    //! -# <em>false</em>:  the zone with globalZoneIndex dose not belong to current processor.\n
+    //! -# <em>true</em>:   the zone with globalZoneIndex belongs to current processor.
+    bool ZoneBelongToCurrentProcessor(int globalZoneIndex);
+
+    //! Return the global zone index of 'localZoneIndex'.
+    int  GetProcessLocalZoneIndexToGlobalZoneIndex(int localZoneIndex);
+
+    void SetIBlock(int iBlock) { this->iBlock = iBlock; }
+    //! Read grid from file.
+    LIB_EXPORT void ReadGrid();
+
+    LIB_EXPORT void InitGridForOversetConfig();
+
+    //! Return the local zone index of 'globalZoneIndex'.
+    LIB_EXPORT int  GetProcessGlobalZoneIndexToLocalZoneIndex(int globalZoneIndex);
+    
+    //! Initialize the geometry (grid actually), the initialization tasks include:\n
+    //!   1: Set up Multi-Block relationship, that is the MPI communication relationship.\n
+    //!   2: Calculate the grid metrics, such as volume, area, center and so on.\n
+    //!   3: Agglomerate coarse grids, if multi-grid method is used.\n
+    //!   4: Calculate the wall distance, that is the nearest distance between each cell center and solid wall.\n
+    //!   5: Change boundary condition if necessary.\n
+    //!   6: Initialize dynamic(moving) grid.
+    LIB_EXPORT void InitGeometry();
+
+
+    //! If need, change the default boundary condition to other type according to the 
+    //! input parameter file named 'BCMap.hypara'. Details reference to the file.
+    LIB_EXPORT void ChangeBoundaryCondition();
+
+    //! Communicate the grid metrics on the interfaces.\n
+    //! And calculate the coefficient matrix if LSQ method is used.
+    LIB_EXPORT void SwapGeommetry();
+    
+    //! Dump out some informations after whole of the simulation.
+    LIB_EXPORT void PostSimulation();
+
+    //**************************************************************
+    //! The following functions should not be called unless special
+    //! reasons.
+    //**************************************************************
+
+    //! Read ordinary grid from file. this function is not allowed to call. 
+    //! If the grid wanted to be read, call the 'ReadGrid' function above, Please!
+    LIB_EXPORT void ReadOrdinaryGridP2PMode(PHVectorString1D & gridGroupNameList);
+    //! Read ordinary grid from file. this function is not allowed to call. 
+    LIB_EXPORT void ReadOrdinaryGridCSMode(PHVectorString1D & gridGroupNameList);
+    //! Read ordinary grid from file. this function is not allowed to call. 
+    //! If the grid wanted to be read, call the 'ReadGrid' function above, Please!
+    LIB_EXPORT void ReadOrdinaryGrid(string fileName, int fileMode);
+
+    //! Read ordinary grid from file. this function is not allowed to call. 
+    LIB_EXPORT void ReadOrdinaryGrid(string fileName);
+    LIB_EXPORT void ReadOrdinaryGrid(PHVectorString1D & gridGroupNameList);
+
+    //! Read overset / overlapping grid. this function is not allowed to call. 
+    //! If the grid wanted to be read, call the 'ReadGrid' function above, Please!
+    LIB_EXPORT void ReadOversetGrid();
+
+    LIB_EXPORT void SetOversetGrid();
+
+    LIB_EXPORT void ReviseInterZoneIndexForOverSetGrids(int iZone);
+
+    //! Build structured/unstructured grid if HYBRID Solver is used.
+    LIB_EXPORT void BuildAndDumpMixedGrid();
+
+    LIB_EXPORT void WriteFaceBoundaryName(Grid **grids, int nZones, const string &gridFileName);
+
+    //! Set up Multi-Block relationship, that is the MPI communication relationship.\n
+    LIB_EXPORT void SetupMultiBlockRelationship();
+
+    //! Agglomerate coarse grids and set up multi-grid relationship, if multi-grid method is used.
+    LIB_EXPORT void MultiGridSetup();
+
+    //! Initialize the grid,include:\n
+    //!   1: Set the number of level of Multi-Grid.\n
+    //!   2: Calculate the grid metrics.\n
+    //!   3: Initialize moving grid.
+    LIB_EXPORT void InitGrids();
+
+    void DumpWallFaceCenter();
+
+    //! Update all of parameters in the running data base of each zones according to the global_para.
+    LIB_EXPORT void UpdateAllZonesPara();
+
+    //! Read single grid from file stream, create zone, and then insert in to zoneContainer.
+    LIB_EXPORT void ReadSingleGrid(fstream &file, int iZone);
+
+    //! Read layout information from file.\n
+    //! 'Lay out' is defined as the multi-block information on both structured/unstructured grid, include:\n
+    //!   1: The zone index of each global zone.\n
+    //!   2: The assigned processor index of each global zone.\n
+    //!   3: The grid type of each global zone. 'grid type': STRUCTURED grid or UNSTRUCTURED grid.
+    LIB_EXPORT void PreprocessLayoutInformation(vector< string > &filenamelist);
+
+    //! Fix the grid type according to the lay out information read from file.
+    LIB_EXPORT void ClassifyGridSystem();
+
+    //! Monitor the data according to location. 
+    LIB_EXPORT void DataMonitor();
+
+    void InitVariableWallTemperature();
+
+    void ReSetBoundaryConditionByGlobalBC();
+
+    void CommunicateCellIBlank();
+
+    void AddZone(Zone *zone);
+
+    void CommGridInfoOnlyforStructHighOrder(int mission);
+private:
+    void DumpProcessorGridNumber();
+    void CreateGridFileNameList(vector< string > &filenamelist);
+    void CreateGridFileNameListCSMode(vector< string > &filenamelist);
+    void CreateGridFileNameListP2PMode(vector< string > &filenamelist);
+    void GetZoneLayoutInformation(vector< string > &filenamelist);
+    void GetZoneLayoutInformation(const string &filename);
+    void ReadNumberOfZones(fstream &file);
+    void InitZoneLayoutInformation(vector< string > &filenamelist);
+    void InitZoneLayoutInformation(const string &filename);
+    void AllocateZoneLayoutInformation();
+
+    void MultiBlocksInterface();
+
+    //! build the connection in multiblocks.
+    void MultiBlocksInterpoint();
+
+    void MultiBlocksOverInterface();
+
+    void InitZoneNeighborsInformation();
+
+    //! build the zone Neighbor information for point.
+    void InitZoneNeighborsForPointInformation();
+
+    void SwapZoneNeighborsInformation();
+
+    //! swap the zone Neighbor information for point.
+    void SwapZoneNeighborsForPointInformation();
+
+    void SwapNeighborsSendContent();
+
+    //! swap the zone Neighbor information for send.
+    void SwapNeighborsSendContentForPoint();
+
+    void SwapNeighborsSendContentNonblocking();
+
+    void BroadcastZoneNeighborInformation();
+
+    //! swap the zone Neighbor information for point.
+    void BroadcastZoneNeighborForPointInformation();
+
+    void BroadcastZoneNeighborInformationToEachProcessor();
+    void BroadcastZoneNeighborInformationToNeighborZones();
+    void SwapZoneConnectivityBetweenNeighborZones();
+
+    //! swap the zone Connectivity information for point in neighbor zones.
+    void SwapZoneConnectivityForPointBetweenNeighborZones();
+
+    //! New method to bcast zone neighbor information.\n
+    //! step1: collecting from each other processor by server.
+    //! step2: bcasting to each other processor by server.
+    void BroadcastZoneNeighborInformationCollectBcast();
+    void ServerCollectionNeighborInfor();
+    void ServerBcastNeighborInfor();
+    void CleanNeighborInfor();
+
+    void GetProcessorZones(int iZone, ZoneNeighbor * zoneNeighbor, vector< int > * neighborProcessors, vector< set< int > > * processorZones);
+
+    void CheckMeshMultigridByFTS();
+    void CoarseGrids();
+    void ShowCoarseGrids();
+
+    void SetNGrids();
+    void ComputeMetrics(int level = 0);
+    void InitMovingGrids(int level = 0);
+    void InitCellBoundaryType(int level = 0);
+
+    //! Global grid information static, for structured and unstructured.
+    void GlobalGridStatic(int level = 0);
+    //! Compute global min&&max cell number in all zones.
+    void ComputeGlobalCellSize(int level = 0);
+    //! Compute global total number of cells and total volume for vencat limiter of type 2 && 3.
+    void ComputeGlobalGridSize(int level = 0);
+    void buildGlobalCellsArrary(int level = 0);
+
+#ifdef USE_GMRESSOLVER
+    //! GMRESParallel
+    //! get shift of cells in the local zone with respect to the global mesh for GMRES
+    void GetCurrentShiftCellSizeToGlobalSize(int level = 0);
+ #endif   
+ 
+    //! MixGrid
+    void ComputeGlobalGridCellSize(int level = 0);
+
+    void CommunicateCellCenterData();
+    void ComputeMetrics_BC();
+    void ComputeMetricsandJacobinWithBCforStructHighOrder();
+    void UpdateDiffOrderforStructHighOrder();
+    void UpdateMetricsWithBCforStructHighOrder();
+    void UpdateJacobianWithBCforStructHighOrder();
+
+    void ComputeWeight();
+    void TestReconstruction();
+
+    int *GetNode2All(int iZone);
+    int *GetFace2All(int iZone);
+    int *GetCell2All(int iZone);
+
+    void ReadStructuredOversetGrid();
+    void ReadGridTopologyData(const string & fileName);
+    void DeleteLabelContainer();
+
+    void ReadUnstructuredOversetGrid();
+    void ReadGrid(fstream &file);
+    void ReadOversetGrid(const string &gridfile);
+    void ReadSingleOversetGrid(fstream &file, int iZone);
+    void AllocateOversetGrid();
+    void AddUnStructInfoToStructGrid();
+
+    void CreateZonesFromGridReader(IO_GridReader * gridReader);
+    void CreateZonesFromGridGroups(IO_GridReader * gridReader);
+    void ExcangeProcessorIDForGridProcessor();
+    void CreateZoneAndGrid(int iZone);
+    void RecoverGridFromFile(fstream &file, int iZone);
+    void InterpretDataToGrid(DataContainer *cdata, int iZone);
+    //! Check grid validity.
+    void GridValidityCheck();
+
+private:
+    int numberOfProcessorStructgridUsed;
+    int numberOfZoneInLocalProcess;
+    int nGrids;
+    int iBlock;
+    int numberOfTotalZones;
+    int zoneStart;
+};
+
+void ResetAllZonesOversetGrid();
+#include "Region.hxx"
+
+}
diff --git a/API/Physics/include/Region.hxx b/API/Physics/include/Region.hxx
new file mode 100644
index 0000000..260c83e
--- /dev/null
+++ b/API/Physics/include/Region.hxx
@@ -0,0 +1,22 @@
+inline Zone * Region::GetZone(int iZone)
+{
+    return (*zoneContainer)[iZone];
+}
+
+inline bool Region::ZoneBelongToCurrentProcessor( int globalZoneIndex )
+{
+    if ( this->GetZone(globalZoneIndex) ) 
+    {
+        return true;
+    }
+    else
+    {
+        return false;
+    }
+}
+
+inline int Region::GetProcessLocalZoneIndexToGlobalZoneIndex( int localZoneIndex )
+{ 
+    //return processLocalZoneIndexToGlobalZoneIndex[ localZoneIndex ];
+    return PHMPI::GetLocalZoneIDToGlobalZoneID(localZoneIndex);
+}
\ No newline at end of file
diff --git a/API/Physics/include/Residual.h b/API/Physics/include/Residual.h
new file mode 100644
index 0000000..69fc86d
--- /dev/null
+++ b/API/Physics/include/Residual.h
@@ -0,0 +1,148 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Residual.h
+//! @brief     It defines the residual computing, collection, dumping method.
+//! @author    Bell, He Xin.
+
+#pragma once
+#include "Geo_StructGrid.h"
+#include "Geo_UnstructGrid.h"
+
+using namespace std;
+namespace PHSPACE
+{
+//! Residual Initialize, called when task action.
+void InitResidual();
+
+//! Residual collection, called when task action.
+void CollectResidual(ActionKey *actkey);
+
+//! Residual dump, called when task action.
+void PostDumpResidual(ActionKey *actkey);
+
+class ActionKey;
+class Residual;
+
+//! @brief ResidualGlobal defines the residual operation globally,
+//!        including residual initialization, collection(MPI), dumping.
+class ResidualGlobal
+{
+private:
+    //! Residual on each local zone.
+    Residual **residualOnEachZone;
+
+    //! Global residual after collection, which is ONLY defined on server processor.
+    RDouble *residualNormal;
+
+    //! Number of residual variables.
+    int numberOfResidualVariables;
+
+    //! Control if print residual to window.
+    bool IsFirstStep;
+
+public:
+    ResidualGlobal();
+    ~ResidualGlobal();
+
+public:
+    //! Residual Initialize globally.
+    void InitResidual();
+
+    //! Residual collection globally.
+    void CollectResidual(ActionKey *actkey);
+
+    //! Residual dump globally, ONLY execute it on server processor.
+    void DumpResidual(ActionKey *actkey, int outnstep);
+
+private:
+    void ComputeResidualNorm(RDouble *localNorm);
+    void PrepareFormatedResidual(int outnstep, string &formatRes);
+    void PrintResidualtoWindow(int outnstep, string &formatRes);
+    void OutResResidualNorm(fstream &file, string &formatRes, std::ostringstream &oss);
+    void FreeMemory();
+};
+
+//! @brief Residual defines the residual on each local zone in the current processor.
+class Residual
+{
+private:
+    //! Zone index.
+    int zoneID;
+    int npoint;
+    int numberOfResidualVariables;
+    RDouble *x, *y, *z, *vol;
+    int    *i, *j, *k;
+    RDouble *maximumResidual, *averageResidual;
+public:
+    Residual();
+    ~Residual();
+public:
+    //! Set the number of residual variables.
+    void SetNvar(int nvar);
+
+    //! Set the zone index.
+    void SetZoneID(int zoneID) {this->zoneID = zoneID;}
+
+    //! Get the number of residual variables.
+    int  GetNvar() const {return this->numberOfResidualVariables;}
+
+    //! Get the zone index.
+    int  GetZoneID() const {return this->zoneID;}
+
+    //! Get the residual on this zone.
+    RDouble *GetAverageResidual() {return this->averageResidual;}
+};
+
+class MaxResidual
+{
+private:
+    int processorOfMaxResidual;
+    RDouble x, y, z;
+    int maxResVariableIndex;
+    RDouble maximumResidual;
+    DataContainer *data;
+
+public:
+    MaxResidual();
+    ~MaxResidual();
+
+public:
+    void Init();
+
+    int GetProcessorOfMaxResidual();
+    RDouble GetMaxRes();
+    RDouble GetMaxResCoorX();
+    RDouble GetMaxResCoorY();
+    RDouble GetMaxResCoorZ();
+    int GetMaxResVariableIndex();
+
+    void SetProcessorOfMaxResidual(const int &processorOfMaxResidualIn);
+    void SetMaxRes(const RDouble &maxResIn);
+    void SetMaxResCoorX(const RDouble &xIn);
+    void SetMaxResCoorY(const RDouble &yIn);
+    void SetMaxResCoorZ(const RDouble &zIn);
+    void setMaxResVariableIndex(const int &maxResVariableIndexIn);
+
+    void ServerCollection();
+
+private:
+    void InitMamory();
+    void DeleteMamory();
+};
+
+void InitMaxResidual();
+void EndMaxResidual();
+
+void ComputeResidualonGrid(UnstructGrid *gridIn, ActionKey *actkey, RDouble **dq, int nEquation);
+void ComputeResidualonGrid(StructGrid   *gridIn, ActionKey *actkey, RDouble4D &dq, int nEquation);
+
+}
diff --git a/API/Physics/include/SixDOF.h b/API/Physics/include/SixDOF.h
new file mode 100644
index 0000000..6b39f25
--- /dev/null
+++ b/API/Physics/include/SixDOF.h
@@ -0,0 +1,105 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      SixDOF.h
+//! @brief     Explain this file briefly.
+//! @author    xxx.
+
+#pragma once
+#include "Constants.h"
+#include "Geo_StructGrid.h"
+#include "PHSuperMatrix.h"
+#include "Force.h"
+
+namespace PHSPACE
+{
+
+class PHRigidBodyMovement
+{
+public:
+    typedef PHMatrix< RDouble > PHSuperMatrix;
+protected:
+    //! variables declaration.
+    //! the attributes of aircraft.
+    RDouble massOfAircraft;                           //! the mass of aircraft.
+    PHSuperMatrix * massCenterOfAircraft;              //! the centroid position of aircraft.
+    PHSuperMatrix * inertiaTensorOfAircraft;           //! the moment of inertia of aircraft.
+    PHSuperMatrix * reverseOfInertiaTensor;            //  the inverse matrix of moment of inertia
+
+    // the data changed with the flow solvers.
+    // input��force and moment coefficient.
+    PHSuperMatrix * aerodynamicForce;                  //! aerodynamic force.
+    PHSuperMatrix * aerodynamicMoment;                 //! aerodynamic moment.
+    PHSuperMatrix * otherForceSum;                     //!   sum of other forces.(gravity, thrust.)
+    PHSuperMatrix * otherMomentSum;                    //!  sum of other moment.
+    //! input��the physical nondimensional time step of flow solvers.
+    RDouble currentMarchTimeStep;                     //! marching time step.
+    //! input��freestream AOA, slide angle.
+    RDouble initiativeAngleOfAttack;                  //! init angle of attack.
+    RDouble initiativeAngleOfSlide;                   //!  init angle of slide.
+    //! output��temporary angle of attack, temporary angle of slide.
+    RDouble temporaryAngleOfAttack;                   //!  temporary angle of attack.
+    RDouble temporaryAngleOfSlide;                    //!  temporary angle of slide.
+    //! input/output��mesh information.
+    StructGrid* grid;
+    //! int ni, nj, nk;
+    //! changed coordinate data.
+    PHSuperMatrix * eulerAngle;                        //!  Euler angle,
+    PHSuperMatrix * eulerAngleRate;                    //!  euler angle rate in time n-2, n-1 and n.
+    PHSuperMatrix * eulerAngleAcceleration;            //!  euler angle acceleration.
+
+    PHSuperMatrix * transformMatrixCurrent;            //!  the current time system.  -> transform matrix of body axis.
+    PHSuperMatrix * transformMatrixLastTime;               //!  the last time system. -> transform matrix of body axis.
+    //! the amount of motion.
+    PHSuperMatrix * momentOfInertia;                   //!  moment Of Inertia in time n-2, n-1 and n.
+    PHSuperMatrix * bodyAngleRate;                     //!  body angle rate
+    PHSuperMatrix * bodyAngleAcceleration;
+
+    //! reference values.
+    //! input��force and moment coefficient.
+    RDouble densityRef;                               //! reference desity.
+    RDouble areaRef;                                  //! reference area.
+    RDouble lengthRef;                                //! reference length.
+public:
+    PHRigidBodyMovement();
+    ~PHRigidBodyMovement();
+protected:
+    void UpdateCoordinate               (Grid * gridIn);
+    void UpdateGridVelocity             (Grid * gridIn);
+    void InitializeAircraftProperty     ();
+    void InitializeEulerAngleInformation();
+    void InitializeInertia      ();
+    void CalculationOfMatrix    ();
+    void NondimensionalOf6DOF   ();
+    void GetReferenceValue      ();
+    void AerodynamicsInCFDSolver();
+    void UpdateDynamicInfo6DOF();
+    void UpdateMomentOfInertia();
+    void UpdateOfInertia();
+    void CalculateAngleRateOfBody();
+    void CalculateEulerAngleRate();
+    void CalculateEulerAngle();
+    void CalculateEulerAngleAcceleration();
+    void CalculateAngleOfAttackAndSlide();
+    PHSuperMatrix CalculateGridCellFaceVelocity(Grid* gridIn, int i, int j, int k, int nd);
+    PHSuperMatrix GetCellFaceCoordinate(Grid* gridIn, int i, int j, int k, int nd);
+    void UpdateCellArea(Grid* gridIn);
+    void UpdateSingleZoneGridInformation(Grid * gridIn);
+public:
+    void InitializeSixDof();
+    void MainCallOf6DOF();
+};
+
+void InitializeSixDof();
+void MainCallOf6DOF();
+
+}
+
diff --git a/API/Physics/include/SixDofManager.h b/API/Physics/include/SixDofManager.h
new file mode 100644
index 0000000..e0abc7c
--- /dev/null
+++ b/API/Physics/include/SixDofManager.h
@@ -0,0 +1,333 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      SixDofManager.h
+//! @brief     Explain this file briefly.
+//! @author    xxx.
+
+#pragma once
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+namespace KINETIC_SCHEME
+{
+    const int ADMAS_BASHFORTH_FIRST_ORDER     =   0;
+    const int ADMAS_BASHFORTH_SECOND_ORDER    =   1;
+    const int IMPLICIT_EULER_FIRST_ORDER      =   2;
+    const int IMPLICIT_EULER_SECOND_ORDER     =   3;
+    const int ADMAS_MOULTON_SECOND_ORDER      =   4;
+    const int ADMAS_MOULTON_THIRD_ORDER       =   5;
+}
+
+class MassCharacter
+{
+protected:
+    RDouble mass;
+    RDouble momentOfInertiaTensorXX, momentOfInertiaTensorYY, momentOfInertiaTensorZZ, momentOfInertiaTensorXY, momentOfInertiaTensorXZ, momentOfInertiaTensorYZ;
+public:
+    MassCharacter() { mass = momentOfInertiaTensorXX = momentOfInertiaTensorYY = momentOfInertiaTensorZZ = momentOfInertiaTensorXY = momentOfInertiaTensorXZ = momentOfInertiaTensorYZ = 0.0; };
+    MassCharacter(RDouble mass, RDouble momentOfInertiaTensorXX, RDouble momentOfInertiaTensorYY, RDouble momentOfInertiaTensorZZ, RDouble momentOfInertiaTensorXY, RDouble momentOfInertiaTensorXZ, RDouble momentOfInertiaTensorYZ);
+
+    ~MassCharacter() {};
+    
+    void SetMassCharacter(RDouble mass, vector< RDouble > & massMatrix);
+    void SetMassCharacter(RDouble mass, RDouble momentOfInertiaTensorXX, RDouble momentOfInertiaTensorYY, RDouble momentOfInertiaTensorZZ, RDouble momentOfInertiaTensorXY, RDouble momentOfInertiaTensorXZ, RDouble momentOfInertiaTensorYZ);
+    void GetMassCharacter(RDouble & mass, RDouble & momentOfInertiaTensorXX, RDouble & momentOfInertiaTensorYY, RDouble & momentOfInertiaTensorZZ, RDouble & momentOfInertiaTensorXY, RDouble & momentOfInertiaTensorXZ, RDouble & momentOfInertiaTensorYZ);
+    void GetMomentInertia(RDouble & momentOfInertiaTensorXX, RDouble & momentOfInertiaTensorYY, RDouble & momentOfInertiaTensorZZ, RDouble & momentOfInertiaTensorXY,RDouble & momentOfInertiaTensorXZ,RDouble & momentOfInertiaTensorYZ);
+    void GetMomentInertia(vector< RDouble > & momentOfInertia);
+
+    RDouble GetMass(){ return mass; };
+    RDouble GetMomentOfInertiaTensorXX() { return momentOfInertiaTensorXX; };
+    RDouble GetMomentOfInertiaTensorYY() { return momentOfInertiaTensorYY; };
+    RDouble GetMomentOfInertiaTensorZZ() { return momentOfInertiaTensorZZ; };
+    RDouble GetMomentOfInertiaTensorXY() { return momentOfInertiaTensorXY; };
+    RDouble GetMomentOfInertiaTensorXZ() { return momentOfInertiaTensorXZ; };
+    RDouble GetMomentOfInertiaTensorYZ() { return momentOfInertiaTensorYZ; };
+public:
+    RDouble ** GetMomentOfInertiaTensor();
+    RDouble ** GetInverseMomentOfInertiaTensor();
+};
+
+class SixDofParameter
+{
+protected:
+    RDouble referenceLength;
+    RDouble massCenterX, massCenterY, massCenterZ;
+    RDouble massCenterVelocityX, massCenterVelocityY, massCenterVelocityZ;
+    RDouble eulerAngleAlpha, eulerAngleBeta, eulerAngleGama;
+    RDouble angularVelocityX, angularVelocityY, angularVelocityZ;
+public:
+    SixDofParameter();
+    ~SixDofParameter() {};
+
+    void SetMassCenterX(RDouble massCenterX){ this->massCenterX = massCenterX; };
+    void SetMassCenterY(RDouble massCenterY){ this->massCenterY = massCenterY; };
+    void SetMassCenterZ(RDouble massCenterZ){ this->massCenterZ = massCenterZ; };
+    void SetMassCenter (RDouble massCenterX, RDouble massCenterY, RDouble massCenterZ)
+    {
+        this->massCenterX = massCenterX; 
+        this->massCenterY = massCenterY; 
+        this->massCenterZ = massCenterZ; 
+    };
+
+    void SetMassCenterVelocityX(RDouble massCenterVelocityX){ this->massCenterVelocityX = massCenterVelocityX; };
+    void SetMassCenterVelocityY(RDouble massCenterVelocityY){ this->massCenterVelocityY = massCenterVelocityY; };
+    void SetMassCenterVelocityZ(RDouble massCenterVelocityZ){ this->massCenterVelocityZ = massCenterVelocityZ; };
+    void SetMassCenterVelocity (RDouble massCenterVelocityX, RDouble massCenterVelocityY, RDouble massCenterVelocityZ)
+    {
+        this->massCenterVelocityX = massCenterVelocityX;
+        this->massCenterVelocityY = massCenterVelocityY;
+        this->massCenterVelocityZ = massCenterVelocityZ;
+    };
+
+    void SetEulerAngleAlpha(RDouble eulerAngleAlpha) { this->eulerAngleAlpha = eulerAngleAlpha; };
+    void SetEulerAngleBeta (RDouble eulerAngleBeta)  { this->eulerAngleBeta  = eulerAngleBeta; };
+    void SetEulerAngleGama (RDouble eulerAngleGama)  { this->eulerAngleGama  = eulerAngleGama; };
+
+    void SetEulerAngle     (RDouble eulerAngleGama, RDouble eulerAngleBeta, RDouble eulerAngleAlpha) 
+    {
+        this->eulerAngleGama  = eulerAngleGama;
+        this->eulerAngleBeta  = eulerAngleBeta;
+        this->eulerAngleAlpha = eulerAngleAlpha;
+    };
+
+    void SetAngularVelocityX(RDouble angularVelocityX) { this->angularVelocityX = angularVelocityX; };
+    void SetAngularVelocityY(RDouble angularVelocityY) { this->angularVelocityY = angularVelocityY; };
+    void SetAngularVelocityZ(RDouble angularVelocityZ) { this->angularVelocityZ = angularVelocityZ; };
+
+    void SetAngularVelocity(RDouble angularVelocityX, RDouble angularVelocityY, RDouble angularVelocityZ)
+    { 
+        this->angularVelocityX = angularVelocityX;
+        this->angularVelocityY = angularVelocityY;
+        this->angularVelocityZ = angularVelocityZ;
+    };
+
+    RDouble GetMassCenterX() { return massCenterX; };
+    RDouble GetMassCenterY() { return massCenterY; };
+    RDouble GetMassCenterZ() { return massCenterZ; };
+    void    GetMassCenter(RDouble & massCenterX, RDouble & massCenterY, RDouble & massCenterZ)
+    {
+        massCenterX = this->massCenterX;
+        massCenterY = this->massCenterY;
+        massCenterZ = this->massCenterZ; 
+    };
+
+    RDouble GetNondimensionalMassCenterX();
+    RDouble GetNondimensionalMassCenterY();
+    RDouble GetNondimensionalMassCenterZ();
+    void    GetNondimensionalMassCenterVector(vector< RDouble > & nondimensionalMassCenterVector);
+    void    GetNondimensionalMassCenter(RDouble & dimensionlessMassCenterX, RDouble & dimensionlessMassCenterY, RDouble & dimensionlessMassCenterZ);
+
+    RDouble GetMassCenterVelocityX() { return massCenterVelocityX; };
+    RDouble GetMassCenterVelocityY() { return massCenterVelocityY; };
+    RDouble GetMassCenterVelocityZ() { return massCenterVelocityZ; };
+
+    void    GetMassCenterVelocity(RDouble & massCenterVelocityX, RDouble & massCenterVelocityY, RDouble & massCenterVelocityZ)
+    {
+        massCenterVelocityX = this->massCenterVelocityX;
+        massCenterVelocityY = this->massCenterVelocityY;
+        massCenterVelocityZ = this->massCenterVelocityZ; 
+    };
+
+    RDouble GetEulerAngleAlpha() { return eulerAngleAlpha; };
+    RDouble GetEulerAngleBeta()  { return eulerAngleBeta ; };
+    RDouble GetEulerAngleGama()  { return eulerAngleGama ; };
+
+    void    GetEulerAngle(RDouble & eulerAngleGama, RDouble & eulerAngleBeta, RDouble & eulerAngleAlpha) 
+    { 
+        eulerAngleGama  = this->eulerAngleGama; 
+        eulerAngleBeta  = this->eulerAngleBeta; 
+        eulerAngleAlpha = this->eulerAngleAlpha;
+    };
+
+    void  GetEulerAngleContainer(vector< RDouble > & eulerAngleContainer)
+    {
+        return this->GetEulerAngle(eulerAngleContainer[ 0 ], eulerAngleContainer[ 1 ], eulerAngleContainer[ 2 ]);
+    };
+
+    RDouble GetAngularVelocityX() { return angularVelocityX; };
+    RDouble GetAngularVelocityY() { return angularVelocityY; };
+    RDouble GetAngularVelocityZ() { return angularVelocityZ; };
+    void    GetAngularVelocity(RDouble & angularVelocityX, RDouble & angularVelocityY, RDouble & angularVelocityZ)
+    {
+        angularVelocityX = this->angularVelocityX;
+        angularVelocityY = this->angularVelocityY;
+        angularVelocityZ = this->angularVelocityZ;
+    };
+
+    void  GetAngularVelocityContainer(vector< RDouble > & angularVelocityContainer)
+    {
+        return this->GetAngularVelocity(angularVelocityContainer[ 0 ], angularVelocityContainer[ 1 ], angularVelocityContainer[ 2 ]);
+    }
+public:
+    void GetGeneralVariableContainer(vector< RDouble > & generalVariableContainer);
+    void SetGeneralVariableContainer(RDouble * generalVariableContainer);
+    void SetGeneralVariableContainer(vector< RDouble > & massCenter, vector< RDouble >& attitudeAngle, 
+        vector< RDouble > &massCenterVelocity, vector< RDouble > &angularVelocity);
+    void UpdateEulerAngle           (RDouble * eulerAngleVariationContainer);
+    void UpdateAngularVelocity      (RDouble * angularVelocityVariationContainer);
+};
+
+class SixDofSolver;
+class SixDofSolverManager
+{
+protected:
+    int numberOfMovingBodies;
+    SixDofSolver ** sixDofSolverContainer;
+
+public:
+    SixDofSolverManager ();
+    ~SixDofSolverManager();
+
+public:
+    void Initialize();
+    void Restart();
+    void Run();
+    void Post();
+    void Dump();
+    void DumpRestart(fstream & file);
+    void ResetMassCenter();
+protected:
+    void AllocateSixDofSolverContainer();
+
+public:
+    MassCharacter   * GetMassCharacter    (int bodyIndex);
+    SixDofParameter * GetSixDofParameterN1(int bodyIndex);
+    SixDofParameter * GetSixDofParameterN (int bodyIndex);
+    SixDofParameter * GetSixDofParameter  (int bodyIndex);
+
+    SixDofSolver * GetSixDofSolver(int bodyIndex) { return sixDofSolverContainer[ bodyIndex ]; }
+};
+
+class SixDofSolver
+{
+public:
+    SixDofSolver(SixDofSolverManager * sixDofSolverManager);
+    virtual ~SixDofSolver();
+
+protected:
+    int bodyIndex;
+    int numberOfTimeLayers;
+    int resetMassCenter;
+    
+    SixDofSolverManager * sixDofSolverManager;
+
+    vector< SixDofParameter * > sixDofParameterContainer;
+    vector< vector< RDouble > > sixDofForceContainer;
+    MassCharacter * massCharacter;
+
+    //�ǶȻ��Ȼ���
+    RDouble DegToRad, RadToDeg;
+
+public:
+    virtual void Initialize(int bodyIndexIn);
+    void Restart();
+    void Run();
+    void Post();
+    void UpdateUnsteadyTerm();
+
+protected:
+    void AllocateAllVariables();
+    void AllocateSixDofParameter();
+    void AllocateSixDofForceContainer();
+    void AllocateMassCharacter();
+
+    void InitializeMassCharacter();
+    void InitializeSixDofByParameter();
+
+    void DeallocateAllVariables();
+public:
+    virtual void InitializeSixDofByFiles(fstream & file);
+    virtual void DumpRestartSixDofSolver(fstream & file);
+
+    virtual void ResetMassCenter();
+public:
+    SixDofParameter * GetSixDofParameter(int iTimeLayer) { return sixDofParameterContainer[ iTimeLayer ]; };
+    vector< RDouble > & GetForceVector    (int iTimeLayer) { return sixDofForceContainer    [ iTimeLayer ]; }
+    MassCharacter   * GetMassCharacter() { return massCharacter; };
+
+    int  GetNumberOfTimeLayers() { return numberOfTimeLayers; }
+    void SetNumberOfTimeLayers(int numberOfTimeLayers) { this->numberOfTimeLayers = numberOfTimeLayers; }
+
+protected:
+    void MovingByFile                                    ();
+    void Stationary                                      ();
+    void SolveSixDofEquation                             ();
+    void ModifyForceAndSixDofInformationForXYSymmetryCase();
+
+    void OscillatingInXDirection();
+    void OscillatingInYDirection();
+    void Pitching               ();
+    void Yawing                 ();
+    void Rolling                ();
+    void XDirectionOnly         ();
+    void YDirectionOnly         ();
+    void RotationInXDirection   ();
+    void RotationInZDirection   ();
+    
+    void ModifyForceAndSixDofInformationForPitchingOnly          ();
+    void ModifyForceAndSixDofInformationForRollingOnly           ();
+    void ModifyForceAndSixDofInformationForPitchingAndRollingOnly();
+    
+    void ReadSixDofParameterFromFile();
+    void Rotation_Rudder_Test1      ();
+
+protected:
+    void GetSixDofFlux(SixDofParameter * sixDofParameter, MassCharacter * massCharacter, vector< RDouble > & force, vector< RDouble > & generalSixDofFlux);
+    
+    void ComputeRightHandSideOfRigidBodyTranslationalMotionEquation  (SixDofParameter * sixDofParameter, MassCharacter * massCharacter, vector< RDouble > & force, vector< RDouble > & generalSixDofFlux);
+    void ComputeRightHandSideOfRigidBodyTranslationalDynamicsEquation(SixDofParameter * sixDofParameter, MassCharacter * massCharacter, vector< RDouble > & force, vector< RDouble > & generalSixDofFlux);
+    void ComputeRightHandSideOfRigidBodyRotationalMotionEquation     (SixDofParameter * sixDofParameter, MassCharacter * massCharacter, vector< RDouble > & force, vector< RDouble > & generalSixDofFlux);
+    void ComputeRightHandSideOfRigidBodyRotationalDynamicsEquation   (SixDofParameter * sixDofParameter, MassCharacter * massCharacter, vector< RDouble > & force, vector< RDouble > & generalSixDofFlux);
+
+    void ComputeSixDofForceTimeSequenceContainer();
+    void GetDimensionalTotalForceAndMomentOfBody(vector< RDouble > & dimensionalGeneralForceContainer, int iTimeLayer);
+    void GetMassCenterAndEulerAngleContainer(vector< RDouble > & massCenterContainer, vector< RDouble > & eulerAngleContainer, int iTimeLayer);
+    void GetMomentAboutMassCenterInInertialFrame(vector< RDouble > & massCenterContainer, vector< RDouble > & totalForceVector, vector< RDouble > & momentVector, vector< RDouble > & momentAboutMassCenterInInertialFrame);
+    void GetDimensionalAdditionalForceAndMomentOfBody(vector< RDouble > & dimensionalGeneralForceContainer, int iTimeLayer);
+    void GetDimensionalAdditionalForceAndMomentOfBodyByParameter(vector< RDouble > & dimensionalGeneralForceContainer, int iTimeLayer);
+    void ComputeCurrentSixDofVariables(vector< vector< RDouble > > & qContainer, vector< vector< RDouble > > & fluxContainer, int numberOfEquations);
+    void ComputeCurrentSixDofVariables(RDouble * q, RDouble * qN, RDouble * qN1, RDouble * fluxM, RDouble * fluxN, RDouble * fluxN1, int numberOfEquations);
+    void GetDimensionalAerodynamicForceAndMoment(vector< RDouble > & dimensionalAerodynamicForce, vector< RDouble > & dimensionalAerodynamicMoment, int bodyIndex, int iTimeLayer);
+public:
+    void GetDimensionalAerodynamicForceAndMomentOfBody   (vector< RDouble > & dimensionalGeneralAerodynamicForceContainer, int iTimeLayer);
+    void GetDimensionalAerodynamicForceAndMomentBodyFrame(vector< RDouble > & dimensionalGeneralAerodynamicForceContainer, int iTimeLayer);
+    void GetDimensionalAerodynamicForceAndMomentInerFrame(vector< RDouble > & dimensionalGeneralAerodynamicForceContainer, int iTimeLayer);
+
+public:
+    void DumpSixDofSolverInformation();
+
+protected:
+    void DumpSixDofParameterInformation();
+    void DumpSixDofParameterInformation(fstream & file);
+
+    void DumpAleForceInformation();
+    void DumpAleForceInformationBodyFrame(fstream & file);
+    void DumpAleForceInformationInerFrame(fstream & file);
+};
+
+SixDofParameter * GetSixDofParameter       (int bodyIndex);
+
+void GetSixDofCoefficients(RDouble & a, RDouble & b, RDouble & c, RDouble & d, RDouble & e, RFloat & relaxParameter);
+
+void ConvertVectorFromInertialCoordinateSystemToBodyCoordinateSystem(vector< RDouble > & vectorInInertialFrame, vector< RDouble > & angleVector, vector< RDouble > & massCenter, vector< RDouble > & vectorInBodyFrame);
+void ConvertVectorFromBodyCoordinateSystemToInertialCoordinateSystem(vector< RDouble > & vectorInBodyFrame,     vector< RDouble > & angleVector, vector< RDouble > & massCenter, vector< RDouble > & vectorInInertialFrame);
+void ConvertVectorFromInertialCoordinateSystemToBodyCoordinateSystem(vector< RDouble > & vectorInInertialFrame, vector< RDouble > & angleVector, vector< RDouble > & vectorInBodyFrame);
+void ConvertVectorFromBodyCoordinateSystemToInertialCoordinateSystem(vector< RDouble > & vectorInBodyFrame,     vector< RDouble > & angleVector, vector< RDouble > & vectorInInertialFrame);
+
+void RotateAboutAxisX(vector< RDouble > & vectorIn, RDouble rotateAngle, vector< RDouble > & vectorOut);
+void RotateAboutAxisY(vector< RDouble > & vectorIn, RDouble rotateAngle, vector< RDouble > & vectorOut);
+void RotateAboutAxisZ(vector< RDouble > & vectorIn, RDouble rotateAngle, vector< RDouble > & vectorOut);
+
+}
\ No newline at end of file
diff --git a/API/Physics/include/Solver.h b/API/Physics/include/Solver.h
new file mode 100644
index 0000000..a24cd6d
--- /dev/null
+++ b/API/Physics/include/Solver.h
@@ -0,0 +1,185 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Solver.h
+//! @brief     Define the base solver class of all other solvers.
+//! @author    Bell, He Xin, Xu Qingxin.
+
+#pragma once
+#include <sstream>
+#include <vector>
+#include "Geo_Grid.h"
+#pragma warning(disable:4100)
+
+using namespace std;
+
+namespace PHSPACE
+{
+typedef enum
+{
+    NS_SOLVER,
+    TURB_SOLVER,
+    TRANSITION_SOLVER,
+    INCOMPRESSIBLE_SOLVER
+}solverEnum;
+
+class PHNsTag
+{
+public:
+    static int GetID() { return NS_SOLVER; }
+};
+
+class PHTurbulentTag
+{
+public:
+    static int GetID() { return TURB_SOLVER; }
+};
+
+class PHTransitionTag
+{
+public:
+    static int GetID() { return TRANSITION_SOLVER; }
+};
+
+class ActionKey;
+class ActionTag;
+class PHSolver;
+class Post_Visual;
+class Post_Probes;
+class PHGeometry;
+class Data_ParamFieldSuite;
+class InterfaceDataProxy;
+class InterpointDataProxy;
+
+//! @brief The base class of all other solvers. Although different types of solver are create,
+//!        they are all handled in the form of 'Solver' during simulation, this let them look same.
+//!        The inherit order is: Solver->NSSolver->NSSolverStructFV/NSSolverStructFD/NSSolverUnstruct.
+//!                                    ->TurbSolver->TurbSolverStr/TurbSolverUnstr.
+//!                                    ->INCompSolver->INCompSolverStruct/INCompSolverUnstruct.
+//!                                    ->UGKSSimulation, and other solvers.
+//!        Note that, each zone can load several different solvers.
+class PHSolver
+{
+private:
+    //! The index of the solver.
+    int index;
+
+    //! The name of the solver.
+    string solverName;
+
+    //! The geometry, which is grid actually, bind to the solver.
+    PHGeometry *geometry;
+
+    //!
+    int key; 
+
+public:
+    PHSolver(){};
+    virtual ~PHSolver(){};
+
+public:
+    //! Assign the solver index, the default index is '0' if without given.
+    void SetIndex(int index = 0);
+
+    //! Assign the solver name, this function is for incompressible solver. 
+    void SetName(string name);
+
+    //! Assign the geometry(grid) to the solver.
+    void SetGeometry(PHGeometry *geometry);
+
+    //! Return the solver name,
+    inline string GetName() const;
+
+    //! Return the solver index, 
+    int  GetIndex() const;
+
+    //! Return the geometry(grid).
+    PHGeometry *GetGeometry();
+    
+    //!
+    void SetKey(int key);
+
+    //!
+    int  GetKey() const;
+    
+    //! Initialize the data, 
+    //! here it is a pure virtual function, it should be re-defined in the real solver.
+    virtual void InitMemory() = 0;
+
+    virtual void ReleaseMemory() = 0;
+
+    //! Initialize the flow, here it is a pure virtual function, 
+    //! here it is a pure virtual function, it should be re-defined in the real solver.
+    virtual void InitFlow() = 0;
+
+    virtual void InitProtectedFlow() {};
+
+    //! Interface data communications.    
+    virtual void CommunicationInterfaceData() {};
+
+    //! Interpoint data communications.
+    virtual void CommunicationInterpointData() {};
+
+    //! To get the number of equations to be solve in the solver.
+    //! here it is a pure virtual function, it should be re-defined in the real solver.
+    virtual int GetNumberOfEquations() = 0;
+
+    //! For multi-grid technique, initialize the flow on the coarse grid.
+    virtual void InitCoarseGridsFlow(){};
+
+    //! The main entrance of solving the equation.
+    //! here it is a pure virtual function, it should be re-defined in the real solver.
+    virtual void Solve() = 0;
+
+    //! Do some left work after solving the equation.
+    //! here it is a pure virtual function, it should be re-defined in the real solver.
+    virtual void Post() = 0;
+
+    //! The following function is old version of task, should be removed latter.
+    virtual void ActionReflect(ActionTag *acttag){};
+    virtual void Action(ActionKey *actkey){};
+    virtual void TranslateAction(ActionKey *actkey){};
+    virtual streamsize TranslateActionLength(ActionKey *actkey){ return 0; };
+    virtual void PrepareInterfaceData(Grid *grid, Data_ParamFieldSuite *datastore, InterfaceDataProxy *interfaceDataProxy){};
+    virtual void ComputePostVisualVariables(Post_Visual * postVisualization) = 0;
+    virtual void ComputePostProbesVariables(Post_Probes * postProbesVar){};
+    virtual void AirForceCoefBodies(ActionKey *actkey){};
+    virtual void RegisterOversetField(){};
+    virtual void DeAllocateOversetInterfaceVar(Grid *grid){};
+};
+#include "Solver.hxx"
+
+//! @brief GlobalSolvers stores the global solver list on each zone.
+class GlobalSolvers
+{
+private:
+    //! The global solvers list, in which the solver list is stored on each global zone.
+    //! The first dimension is the zone index, and the second is the solver index.
+    static vector< vector< PHSolver *> * > *globalSolversList; 
+               
+public:    
+    //! Return the 'solverID'-th solver on 'zoneID'-th zone from global solvers list.
+    //! @param[in] zoneID    The global zone index.
+    //! @param[in] solverID  The solver index on the zone of 'zoneID'.
+    static PHSolver *GetSolver(int zoneID, int solverID = 0);
+
+    //! Return the total number of solvers on the zone of 'iZone'.
+    //! @param[in] iZone    The zone index that you want to know the number of solvers.
+    static int GetNumberOfSolvers(int iZone = 0);
+
+    //! Add the solvers list onto the zone of 'iZone'.
+    //! This function is used after all solvers have been created on the zone of 'iZone'.
+    //! @param[in] iZone          The zone index that you want to add the solvers.
+    //! @param[in] solversList    The solvers list that you want to add to the zone of 'iZone'.
+    static void AddSolverToGlobal(int iZone, vector < PHSolver * > *solversList);
+};
+
+}
diff --git a/API/Physics/include/Solver.hxx b/API/Physics/include/Solver.hxx
new file mode 100644
index 0000000..d409586
--- /dev/null
+++ b/API/Physics/include/Solver.hxx
@@ -0,0 +1,39 @@
+inline void PHSolver::SetKey(int key) 
+{ 
+    this->key = key;
+}
+
+inline int PHSolver::GetKey() const 
+{ 
+    return key;
+}
+
+inline void PHSolver::SetName(string name)
+{
+    this->solverName = name;
+}
+
+inline string PHSolver::GetName() const
+{
+    return this->solverName;
+}
+
+inline void PHSolver::SetIndex(int index) 
+{ 
+    this->index = index; 
+}
+
+inline int PHSolver::GetIndex() const 
+{ 
+    return index; 
+}
+
+inline PHGeometry * PHSolver::GetGeometry() 
+{ 
+    return geometry; 
+}
+
+inline void PHSolver::SetGeometry(PHGeometry *geometry)
+{ 
+    this->geometry = geometry;
+}
\ No newline at end of file
diff --git a/API/Physics/include/Task.h b/API/Physics/include/Task.h
new file mode 100644
index 0000000..4d6044c
--- /dev/null
+++ b/API/Physics/include/Task.h
@@ -0,0 +1,109 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Task.h
+//! @brief     Task defines several design patterns, such as communication pattern,
+//!            read and write pattern, and so on. It is not recommended for the learners 
+//!            in the first stage.
+//! @author    He Xin.
+#pragma once
+#include "PHMpi.h"
+using namespace std;
+
+namespace PHSPACE
+{
+
+typedef void (*ServerFUN)(ActionKey *actkey);
+typedef void (*ActionKeyFUN)(ActionKey *actkey);
+void NOAction (ActionKey *actkey);
+
+//! @brief The base class of all the design patterns
+class LIB_EXPORT Task
+{
+private:
+    ActionKeyFUN main_action, pre_action, post_action;
+    ActionKey *actkey;
+
+public:
+    static vector<Task *> *ootasklist;
+//  static const int SOLVE_FIELD     ;
+//  static const int CREATE_GRID     ;
+//  static const int CAL_WALL_DIST   ;
+//  static const int PARTITION_GRID  ;
+//  static const int OVERSETGRID_VIEW;
+//  static const int OVERSET_CONFIG;
+
+public:
+    Task();
+    virtual~Task();
+
+public:
+    //! Return the main_action
+    //! @return main_action
+    ActionKeyFUN GetMainAction();
+
+    //! Return the pre_action
+    //! @return pre_action
+    ActionKeyFUN GetPreAction ();
+
+    //! Return the post_action
+    //! @return post_action
+    ActionKeyFUN GetPostAction();
+
+    //! Set main_action with action
+    //! @param[in] action    An input action
+    void SetMainAction(ActionKeyFUN action);
+
+    //! Set pre_action with action
+    //! @param[in] action    An input action
+    void SetPreAction (ActionKeyFUN action);
+
+    //! Set post_action with action
+    //! @param[in] action    An input action
+    void SetPostAction(ActionKeyFUN action);
+
+    //! Return the actkey
+    //! @return actkey
+    ActionKey * GetActionKey();
+
+    //! Set this->actkey with actkey
+    //! @param[in] action    An input actkey
+    void SetActionKey(ActionKey *actkey);
+
+    //! Run all the task(PreTask, MainTask, PostTask)
+    void RunTask();
+
+private:
+    virtual void PreTask(ActionKey *actkey) = 0;
+    virtual void PostTask(ActionKey *actkey) = 0;
+    virtual void MainTask(ActionKey *actkey) = 0;
+};
+
+void RunSimuTask(Task *task, bool run_now);
+
+void GlobalSolve();
+void AddTasktoSimu(Task *task);
+void ClearTaskList();
+
+void PH_Interface(ActionKey *actkey, int iZone, int jZone);
+void PH_InterfaceNonBlocking(ActionKey *actkey, DataContainer * sendBuffer, DataContainer * receivedBuffer, int iZone, int jZone, vector< PH_Request > & requestContainer);
+void GeneralTranslateAction(ActionKey *actkey, int iZone);
+streamsize GeneralTranslateActionLength(ActionKey *actkey, int iZone);
+CharVecSizeType PH_Interface_GetLength(ActionKey *actkey, int iZone, int jZone);
+
+void PH_ReadPattern (ActionKey *actkey, ActionKeyFUN main_action, int send_proc, int recv_proc, int iZone);
+void PH_WritePattern(ActionKey *actkey, ActionKeyFUN main_action, int send_proc, int recv_proc, int iZone);
+
+void GeneralAction(ActionKey *actkey, int iZone);
+
+#include "Task.hxx"
+
+}
\ No newline at end of file
diff --git a/API/Physics/include/Task.hxx b/API/Physics/include/Task.hxx
new file mode 100644
index 0000000..ef0c195
--- /dev/null
+++ b/API/Physics/include/Task.hxx
@@ -0,0 +1,15 @@
+inline ActionKeyFUN Task::GetMainAction() { return main_action; };
+
+inline ActionKeyFUN Task::GetPreAction () { return pre_action;  };
+
+inline ActionKeyFUN Task::GetPostAction() { return post_action; };
+
+inline void Task::SetMainAction(ActionKeyFUN action) { main_action = action; };
+
+inline void Task::SetPreAction (ActionKeyFUN action) { pre_action  = action; };
+
+inline void Task::SetPostAction(ActionKeyFUN action) { post_action = action; };
+
+inline ActionKey * Task::GetActionKey() { return actkey; };
+
+inline void Task::SetActionKey(ActionKey *actkey) { this->actkey = actkey; };
\ No newline at end of file
diff --git a/API/Physics/include/Task_ServerUpdateInterface.h b/API/Physics/include/Task_ServerUpdateInterface.h
new file mode 100644
index 0000000..d9bba48
--- /dev/null
+++ b/API/Physics/include/Task_ServerUpdateInterface.h
@@ -0,0 +1,23 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Task_ServerUpdateInterface.h
+//! @brief     Communication pattern of update interface data.
+//!            It is not recommended for the learners in the first stage.
+//! @author    Bell, Zhang Jian, He Xin.
+
+#pragma once
+#include "Task.h"
+namespace PHSPACE
+{
+void MainTaskNonBlocking(ActionKey *actkey);
+void MainTaskBlocking(ActionKey *actkey);
+}
\ No newline at end of file
diff --git a/API/Physics/include/Task_ServerUpdateInterpoint.h b/API/Physics/include/Task_ServerUpdateInterpoint.h
new file mode 100644
index 0000000..b1bde0d
--- /dev/null
+++ b/API/Physics/include/Task_ServerUpdateInterpoint.h
@@ -0,0 +1,69 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Task_ServerUpdateInterpoint.h
+//! @brief     Communication pattern of update interpoint data.
+//!            It is not recommended for the learners in the first stage.
+//! @author    Wan Yunbo.
+//! @time      2019.12.9.
+
+#pragma once
+#include "Task.h"
+namespace PHSPACE
+{
+//! @brief TaskServerUpdateInterpoint define the task of updating data at interpoint
+class LIB_EXPORT TaskServerUpdateInterpoint : public Task
+{
+public:
+    //! Construct function
+    TaskServerUpdateInterpoint();
+    //! Destructor, free memory
+    ~TaskServerUpdateInterpoint();
+
+    //! run the non blocking task for updating the interpoint.
+    //! @param[in] actkey         the actkey strore the information of the interpoint.
+    void MainTaskNonBlocking(ActionKey *actkey);
+
+    //! run the blocking task for updating the interpoint.
+    //! @param[in] actkey         the actkey store the information of the interpoint.
+    void MainTaskBlocking(ActionKey *actkey);
+
+private:
+    //! prepare for the task for update the interpoint.
+    //! @param[in] actkey         the actkey store the information of the interpoint.
+    void PreTask(ActionKey *actkey);
+
+    //! post solve for the task for update the interpoint.
+    //! @param[in] actkey         the actkey store the information of the interpoint.
+    void PostTask(ActionKey *actkey);
+
+    //! main solve for the task for update the interpoint.
+    //! @param[in] actkey       the actkey store the information of the interpoint.
+    void MainTask(ActionKey *actkey);
+
+    //! communicate the interpoint using MPI.
+    //! @param[in] actkey       the actkey store the information of the interpoint.
+    //! @param[in] sendBuffer       a data container containing the data for sending.
+    //! @param[in] receivedBuffer       a data container containing the data for receiving.
+    //! @param[in] iZone       the number of sending zone.
+    //! @param[in] jZone       the number of receiving zone.
+    //! @param[in] requestContainer       a vector of MPI_Request.
+    void InterpointNonBlocking(ActionKey *actkey, DataContainer *sendBuffer, DataContainer *receivedBuffer, int iZone, int jZone, vector<PH_Request> &requestContainer);
+
+    //! get the interpoint using MPI.
+    //! @param[in] actkey       the actkey store the information of the interpoint.
+    //! @param[in] iZone       the number of sending zone.
+    //! @param[in] jZone       the number of receiving zone.
+    //! @param[out] nlen       the size of the sending or receiving data.
+    CharVecSizeType InterpointGetLength(ActionKey *actkey, int iZone, int jZone);
+};
+
+}
\ No newline at end of file
diff --git a/API/Physics/include/Task_Simple.h b/API/Physics/include/Task_Simple.h
new file mode 100644
index 0000000..9403907
--- /dev/null
+++ b/API/Physics/include/Task_Simple.h
@@ -0,0 +1,34 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Task_Simple.h
+//! @brief     Task_Simple is the most simple design pattern.
+//!            Only deal with actkey
+//!            It is not recommended for the learners in the first stage.
+//! @author    Bell, Zhang Jian, He Xin.
+
+#pragma once
+#include "Task.h"
+namespace PHSPACE
+{
+//! @brief Class of task simple
+class LIB_EXPORT Task_Simple : public Task
+{
+public:
+    Task_Simple() {};
+    ~Task_Simple() {};
+
+private:
+    void PreTask(ActionKey *actkey);
+    void PostTask(ActionKey *actkey);
+    void MainTask(ActionKey *actkey);
+};
+}
\ No newline at end of file
diff --git a/API/Physics/include/Task_WriteBinaryTecplot.h b/API/Physics/include/Task_WriteBinaryTecplot.h
new file mode 100644
index 0000000..3b28c53
--- /dev/null
+++ b/API/Physics/include/Task_WriteBinaryTecplot.h
@@ -0,0 +1,45 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Task_WriteBinaryTecplot.h
+//! @brief     Write flow field data into tecio film.
+//! @author    Xu Gang, Zhang Jian, He Xin.
+
+#pragma once
+#include "Geo_UnstructGrid.h"
+#include "Task.h"
+using namespace std;
+
+namespace PHSPACE
+{
+//! @brief Task_WriteBinaryTecplot class defines the method about Writing flow field data into binary tecplot film.\n
+//!
+//! Task_WriteBinaryTecplot
+class Task_WriteBinaryTecplot : public Task
+{
+public:
+    LIB_EXPORT Task_WriteBinaryTecplot(int flowType = 0);
+    LIB_EXPORT ~Task_WriteBinaryTecplot();
+    LIB_EXPORT void ServerWrite(ActionKey *actkey);
+    void PreTask(ActionKey *actkey);
+    void MainTask(ActionKey *actkey);
+    void PostTask(ActionKey *actkey);
+
+private:
+    vector < DataContainer * > datalist;
+    int flowType;
+};
+
+
+
+
+
+}
\ No newline at end of file
diff --git a/API/Physics/include/Zone.h b/API/Physics/include/Zone.h
new file mode 100644
index 0000000..665f507
--- /dev/null
+++ b/API/Physics/include/Zone.h
@@ -0,0 +1,109 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Zone.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin, Bell.
+
+#pragma once
+#include <vector>
+#include "Data_Field.h"
+#include "Data_Param.h"
+#include <sstream>
+using namespace std;
+
+namespace PHSPACE
+{
+class Grid;
+class UnstructGrid;
+class PHSolver;
+class PHGeometry;
+class Data_Param;
+class Data_Field;
+class ZoneNeighbor;
+class Region;
+
+class Zone
+{
+private:
+    //! Zone Index.
+    int index;
+
+    //! Computational grid.
+    PHGeometry *geom;
+
+    //! Solvers list, load on the current zone.
+    vector <PHSolver *> *solvers;
+
+    //! Control parameters, usually read from file.
+    Data_Param *zPara;
+
+    //! Zonal data pointers.
+    Data_Field *zField;
+
+    //! Number of solvers on this zone.
+    int nsolver;
+
+public:
+    Zone(int index);
+    ~Zone();
+
+public:
+    int GetIndex(void) { return index; }
+    int GetNumberOfSolvers() { return nsolver; }
+    void SetNSolver(int n) { nsolver = n; }
+    void ComputeWeight();
+    void CoarseGrids();
+    void ShowCoarseGrids();
+
+    PHGeometry * GetGeometry() { return geom; }
+    void SetGeometry(PHGeometry *In) { this->geom = In; }
+
+    void AddSolver(PHSolver *solver);
+    void AddGridAndCopyZonePara(Grid *grid);
+
+    void AddGrid(Grid *grid);
+    void AddGridToGlobal(int iZone);
+    void UpdateAllData();
+    void UpdateData(const string &name, void *data, int type, int size)
+    {
+        zPara->UpdateData(name, data, type, size);
+    }
+
+    void GetData(const string &name, void *data, int type, int size)
+    {
+        zPara->GetData(name, data, type, size);
+    }
+
+    void UpdateDataPtr(const string &name, void *data)
+    {
+        zField->UpdateDataPtr(name, data);
+    }
+
+    void * GetDataPtr(const string &name) const
+    {
+        return zField->GetDataPtr(name);
+    }
+
+    void SetInterface(Grid *base_grid, Grid *cgrid);
+};
+
+extern vector <Zone *> *GlobalZones;
+
+void InitGlobalValuesOfAllZones();
+
+void InitGlobalValuesGrid();
+void InitGlobalValuesSolver();
+
+//! To release the allocated memories for the object of chemical class.
+void CleanGlobalValuesSolver();
+
+}
diff --git a/API/Physics/src/AerodynamicsBasicRelations.cpp b/API/Physics/src/AerodynamicsBasicRelations.cpp
new file mode 100644
index 0000000..062848e
--- /dev/null
+++ b/API/Physics/src/AerodynamicsBasicRelations.cpp
@@ -0,0 +1,73 @@
+#include "AerodynamicsBasicRelations.h"
+#include "Constants.h"
+#include <cmath>
+using namespace std;
+
+namespace PHSPACE
+{
+
+RDouble IsentropicRelations::T0OverT(RDouble gama, RDouble mach)
+{
+    RDouble m2 = mach * mach;
+    return one + half * (gama - one) * m2;
+}
+
+RDouble IsentropicRelations::P0OverP(RDouble gama, RDouble mach)
+{
+    RDouble t0t = T0OverT(gama, mach);
+    RDouble cc  = gama / (gama - one);
+
+    return pow(t0t,cc);
+}
+
+RDouble IsentropicRelations::Rho0OverRho(RDouble gama, RDouble mach)
+{
+    RDouble t0t = T0OverT(gama, mach);
+    RDouble cc  = one / (gama - one);
+
+    return pow(t0t,cc);
+}
+
+RDouble ShockRelations::P2OverP1(RDouble gama, RDouble m1)
+{
+    RDouble m12 = m1 * m1;
+    RDouble gamp1 = gama + one;
+    RDouble gamm1 = gama - one;
+
+    return two * gama / gamp1 * m12 - gamm1 / gamp1;
+}
+
+RDouble ShockRelations::Rho2OverRho1(RDouble gama, RDouble m1)
+{
+    RDouble m12 = m1 * m1;
+    RDouble gamp1 = gama + one;
+    RDouble gamm1 = gama - one;
+
+    return gamp1 * m12 / (gamm1 * m12 + two);
+}
+
+RDouble ShockRelations::T2OverT1(RDouble gama, RDouble m1)
+{
+    RDouble m12 = m1 * m1;
+    RDouble gamp1 = gama + one;
+    RDouble gamm1 = gama - one;
+
+    RDouble c1 = two * gama * m12 - gamm1;
+    RDouble c2 = gamm1 * m12 + two;
+    RDouble c3 = gamp1 * gamp1 * m12;
+
+    return c1 * c2 / c3;
+}
+
+RDouble ShockRelations::MachBehindShock(RDouble gama, RDouble m1)
+{
+    RDouble m12 = m1 * m1;
+    RDouble gamm1 = gama - one;
+
+    RDouble c1 = two / gamm1 + m12;
+    RDouble c2 = two * gama / gamm1 * m12 - one;
+
+    return sqrt(c1 / c2);
+}
+
+}
diff --git a/API/Physics/src/AleForceManager.cpp b/API/Physics/src/AleForceManager.cpp
new file mode 100644
index 0000000..286c57f
--- /dev/null
+++ b/API/Physics/src/AleForceManager.cpp
@@ -0,0 +1,1186 @@
+#include "AleForceManager.h"
+#include "Math_BasisFunction.h"
+#include "Constants.h"
+#include "PHIO.h"
+#include "IO_FileName.h"
+#include "Geo_SimpleBC.h"
+#include "TK_Time.h"
+#include "TK_Parse.h"
+#include "TK_Exit.h"
+#include "Glb_Dimension.h"
+#include "GlobalDataBase.h"
+#include "PHHeader.h"
+#include "PHMpi.h"
+#include "AleManager.h"
+#include "Solver.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+bool AerodynamicForceBody::initialize = false;
+vector< std::set< string > >  AerodynamicForceBody::bodies;
+
+AerodynamicForceBody::AerodynamicForceBody()
+{
+}
+
+AerodynamicForceBody::~AerodynamicForceBody()
+{
+}
+
+void AerodynamicForceBody::Initialize()
+{
+    if (!AerodynamicForceBody::initialize)
+    {
+        int numberOfMovingBodies = GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+        AerodynamicForceBody::bodies.resize(numberOfMovingBodies);
+
+        set < string > *bodyList = GlobalBoundaryCondition::GetBodyNameList();
+        set < string >::iterator bodyListIter = bodyList->begin();
+        for (int iMovingBody = 0; iMovingBody < numberOfMovingBodies; ++ iMovingBody)
+        {
+            string bodyName = *bodyListIter;
+            AerodynamicForceBody::bodies[iMovingBody].insert(bodyName);
+            bodyListIter ++;
+        }
+        AerodynamicForceBody::initialize = true;
+    }
+}
+
+bool AerodynamicForceBody::FaceInAerodynamicForceBodies(string bodyName, int aerodynamicForceBodyIndex)
+{
+    AerodynamicForceBody::Initialize();
+    set< string >::iterator iter = AerodynamicForceBody::bodies[aerodynamicForceBodyIndex].find(bodyName);
+    return iter != AerodynamicForceBody::bodies[aerodynamicForceBodyIndex].end();
+}
+
+bool FaceInAerodynamicForceBodies(string bodyName, int aerodynamicForceBodyIndex)
+{
+    return AerodynamicForceBody::FaceInAerodynamicForceBodies(bodyName, aerodynamicForceBodyIndex);
+}
+
+AerodynamicForceManager aerodynamicForceManager;
+
+void InitializeAerodynamicForce()
+{
+    AerodynamicForceManager *aerodynamicForceManager1 = PHSPACE::GetAerodynamicForceManager();
+    aerodynamicForceManager1->InitializeAerodynamicForceManager();
+}
+
+void ComputeAerodynamicForceForALE()
+{
+    ActionKey *actkeyComputeAirForceCoef = new ActionKey();
+    actkeyComputeAirForceCoef->action = COMPUTE_AERODYNAMIC_FORCE;
+
+    PHSPACE::InitializeAerodynamicForce();
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    actkeyComputeAirForceCoef->GetData()->moveto_begin();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int ZoneProcessorID = GetZoneProcessorID(iZone);
+        int currentProcessorID = GetCurrentProcessorID();
+
+        if (currentProcessorID == ZoneProcessorID)
+        {
+            //! If zone i belongs to the current process.
+            PHSolver *solver = static_cast <PHSolver *> (GlobalSolvers::GetSolver(iZone, actkeyComputeAirForceCoef->solverID));
+            solver->AirForceCoefBodies(actkeyComputeAirForceCoef);
+            PHSPACE::AddAerodynamicForce(actkeyComputeAirForceCoef);
+        }
+    }
+
+    //! Third: Collecting AirForceCoef on Each Zone to serve.
+    PHSPACE::CollectAerodynamicForceOfAllProcessors();
+}
+
+void AddAerodynamicForce(ActionKey *actionKey)
+{
+    AerodynamicForceManager *aerodynamicForceManager2 = PHSPACE::GetAerodynamicForceManager();
+    aerodynamicForceManager2->AddAerodynamicForce(actionKey);
+}
+
+void CollectAerodynamicForceOfAllProcessors()
+{
+    AerodynamicForceManager *aerodynamicForceManager3 = PHSPACE::GetAerodynamicForceManager();
+    aerodynamicForceManager3->CollectAerodynamicForceOfAllProcessors();
+}
+
+BasicAerodynamicForce **CreateBasicAerodynamicForceContainer()
+{
+    int numberOfAerodynamicForceBodies = GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+
+    BasicAerodynamicForce **basicAerodynamicForceContainer = new BasicAerodynamicForce * [numberOfAerodynamicForceBodies];
+
+    for (int iMovingBody = 0; iMovingBody < numberOfAerodynamicForceBodies; ++ iMovingBody)
+    {
+        basicAerodynamicForceContainer[iMovingBody] = new BasicAerodynamicForce();
+    }
+
+    return basicAerodynamicForceContainer;
+}
+
+vector< BasicAerodynamicForce * > *CreateBasicAerodynamicForceVector()
+{
+    int numberOfAerodynamicForceBodies = GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+
+    vector< BasicAerodynamicForce * > *basicAerodynamicForceVector = new vector< BasicAerodynamicForce * >(numberOfAerodynamicForceBodies);
+
+    for (int iMovingBody = 0; iMovingBody < numberOfAerodynamicForceBodies; ++ iMovingBody)
+    {
+        (*basicAerodynamicForceVector)[iMovingBody] = new BasicAerodynamicForce();
+    }
+
+    return basicAerodynamicForceVector;
+}
+
+void FreeBasicAerodynamicForceVector(vector<BasicAerodynamicForce *> *basicAerodynamicForceVector)
+{
+    int numberOfAerodynamicForceBodies = static_cast<int>(basicAerodynamicForceVector->size());
+
+    for (int iMovingBody = 0; iMovingBody < numberOfAerodynamicForceBodies; ++ iMovingBody)
+    {
+        delete (*basicAerodynamicForceVector)[iMovingBody];
+    }
+
+    delete  basicAerodynamicForceVector;
+}
+
+void FreeBasicAerodynamicForceContainer(BasicAerodynamicForce **basicAerodynamicForceContainer)
+{
+    int numberOfAerodynamicForceBodies = GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+
+    for (int iMovingBody = 0; iMovingBody < numberOfAerodynamicForceBodies; ++ iMovingBody)
+    {
+        delete basicAerodynamicForceContainer[iMovingBody];
+    }
+
+    delete [] basicAerodynamicForceContainer;
+}
+
+void WriteAerodynamicForceToActionKey(ActionKey *actionKey, BasicAerodynamicForce **basicAerodynamicForceContainer)
+{
+    int numberOfAerodynamicForceBodies = GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+
+    DataContainer *dataContainer = actionKey->GetData();
+    dataContainer->moveto_begin();
+
+    for (int iMovingBody = 0; iMovingBody < numberOfAerodynamicForceBodies; ++ iMovingBody)
+    {
+        basicAerodynamicForceContainer[iMovingBody]->WriteAerodynamicForceToDataContainer(dataContainer);
+    }
+}
+
+void WriteAerodynamicForceToActionKey(ActionKey *actionKey, vector< BasicAerodynamicForce * > *basicAerodynamicForceVector)
+{
+    int numberOfAerodynamicForceBodies = GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+
+    DataContainer *dataContainer = actionKey->GetData();
+    dataContainer->moveto_begin();
+
+    for (int iMovingBody = 0; iMovingBody < numberOfAerodynamicForceBodies; ++ iMovingBody)
+    {
+        (*basicAerodynamicForceVector)[iMovingBody]->WriteAerodynamicForceToDataContainer(dataContainer);
+    }
+}
+
+BasicAerodynamicForce::BasicAerodynamicForce()
+{
+    this->ZeroBasicAerodynamicForce();
+}
+
+BasicAerodynamicForce::~BasicAerodynamicForce()
+{
+}
+
+void BasicAerodynamicForce::ZeroBasicAerodynamicForce()
+{
+    forceX = 0.0;
+    forceY = 0.0;
+    forceZ = 0.0;
+
+    forceXByPressure = 0.0;
+    forceYByPressure = 0.0;
+    forceZByPressure = 0.0;
+
+    forceXByViscosity = 0.0;
+    forceYByViscosity = 0.0;
+    forceZByViscosity = 0.0;
+
+    momentX = 0.0;
+    momentY = 0.0;
+    momentZ = 0.0;
+
+    momentXByPressure = 0.0;
+    momentYByPressure = 0.0;
+    momentZByPressure = 0.0;
+
+    momentXByViscosity = 0.0;
+    momentYByViscosity = 0.0;
+    momentZByViscosity = 0.0;
+}
+
+void BasicAerodynamicForce::SetMomentReferencePoint(RDouble momentReferenceX, RDouble momentReferenceY, RDouble momentReferenceZ)
+{
+    this->momentReferenceX = momentReferenceX;
+    this->momentReferenceY = momentReferenceY;
+    this->momentReferenceZ = momentReferenceZ;
+}
+
+void BasicAerodynamicForce::SetPressureAerodynamicForce(RDouble forceXByPressure, RDouble forceYByPressure, RDouble forceZByPressure)
+{
+    this->forceXByPressure = forceXByPressure;
+    this->forceYByPressure = forceYByPressure;
+    this->forceZByPressure = forceZByPressure;
+}
+
+void BasicAerodynamicForce::SetViscousAerodynamicForce(RDouble forceXByViscosity, RDouble forceYByViscosity, RDouble forceZByViscosity)
+{
+    this->forceXByViscosity = forceXByViscosity;
+    this->forceYByViscosity = forceYByViscosity;
+    this->forceZByViscosity = forceZByViscosity;
+}
+
+void BasicAerodynamicForce::ComputeResultantAerodynamicForce()
+{
+    forceX = forceXByPressure + forceXByViscosity;
+    forceY = forceYByPressure + forceYByViscosity;
+    forceZ = forceZByPressure + forceZByViscosity;
+}
+
+void BasicAerodynamicForce::ComputeResultantAerodynamicMoment()
+{
+    momentX = momentXByPressure + momentXByViscosity;
+    momentY = momentYByPressure + momentYByViscosity;
+    momentZ = momentZByPressure + momentZByViscosity;
+}
+
+void BasicAerodynamicForce::SetPressureAerodynamicMoment(RDouble faceCenterX, RDouble faceCenterY, RDouble faceCenterZ)
+{
+    momentXByPressure = (faceCenterY - momentReferenceY) * forceZByPressure - (faceCenterZ - momentReferenceZ) * forceYByPressure;
+    momentYByPressure = (faceCenterZ - momentReferenceZ) * forceXByPressure - (faceCenterX - momentReferenceX) * forceZByPressure;
+    momentZByPressure = (faceCenterX - momentReferenceX) * forceYByPressure - (faceCenterY - momentReferenceY) * forceXByPressure;
+}
+
+void BasicAerodynamicForce::SetViscousAerodynamicMoment(RDouble faceCenterX, RDouble faceCenterY, RDouble faceCenterZ)
+{
+    momentXByViscosity = (faceCenterY - momentReferenceY) * forceZByViscosity - (faceCenterZ - momentReferenceZ) * forceYByViscosity;
+    momentYByViscosity = (faceCenterZ - momentReferenceZ) * forceXByViscosity - (faceCenterX - momentReferenceX) * forceZByViscosity;
+    momentZByViscosity = (faceCenterX - momentReferenceX) * forceYByViscosity - (faceCenterY - momentReferenceY) * forceXByViscosity;
+}
+
+void BasicAerodynamicForce::ComputeAerodynamicMoment(RDouble faceCenterX, RDouble faceCenterY, RDouble faceCenterZ)
+{
+    momentX = (faceCenterY - momentReferenceY) * forceZ - (faceCenterZ - momentReferenceZ) * forceY;
+    momentY = (faceCenterZ - momentReferenceZ) * forceX - (faceCenterX - momentReferenceX) * forceZ;
+    momentZ = (faceCenterX - momentReferenceX) * forceY - (faceCenterY - momentReferenceY) * forceX;
+}
+
+void BasicAerodynamicForce::AddAerodynamicForce(BasicAerodynamicForce *basicAerodynamicForce)
+{
+    this->forceX += basicAerodynamicForce->forceX;
+    this->forceY += basicAerodynamicForce->forceY;
+    this->forceZ += basicAerodynamicForce->forceZ;
+
+    this->forceXByPressure += basicAerodynamicForce->forceXByPressure;
+    this->forceYByPressure += basicAerodynamicForce->forceYByPressure;
+    this->forceZByPressure += basicAerodynamicForce->forceZByPressure;
+
+    this->forceXByViscosity += basicAerodynamicForce->forceXByViscosity;
+    this->forceYByViscosity += basicAerodynamicForce->forceYByViscosity;
+    this->forceZByViscosity += basicAerodynamicForce->forceZByViscosity;
+
+    this->momentX += basicAerodynamicForce->momentX;
+    this->momentY += basicAerodynamicForce->momentY;
+    this->momentZ += basicAerodynamicForce->momentZ;
+
+    this->momentXByPressure += basicAerodynamicForce->momentXByPressure;
+    this->momentYByPressure += basicAerodynamicForce->momentYByPressure;
+    this->momentZByPressure += basicAerodynamicForce->momentZByPressure;
+
+    this->momentXByViscosity += basicAerodynamicForce->momentXByViscosity;
+    this->momentYByViscosity += basicAerodynamicForce->momentYByViscosity;
+    this->momentZByViscosity += basicAerodynamicForce->momentZByViscosity;
+}
+
+void BasicAerodynamicForce::WriteAerodynamicForceToDataContainer(DataContainer *dataContainer)
+{
+    PHWrite(dataContainer, forceX);
+    PHWrite(dataContainer, forceY);
+    PHWrite(dataContainer, forceZ);
+
+    PHWrite(dataContainer, forceXByPressure);
+    PHWrite(dataContainer, forceYByPressure);
+    PHWrite(dataContainer, forceZByPressure);
+
+    PHWrite(dataContainer, forceXByViscosity);
+    PHWrite(dataContainer, forceYByViscosity);
+    PHWrite(dataContainer, forceZByViscosity);
+
+    PHWrite(dataContainer, momentX);
+    PHWrite(dataContainer, momentY);
+    PHWrite(dataContainer, momentZ);
+
+    PHWrite(dataContainer, momentXByPressure);
+    PHWrite(dataContainer, momentYByPressure);
+    PHWrite(dataContainer, momentZByPressure);
+
+    PHWrite(dataContainer, momentXByViscosity);
+    PHWrite(dataContainer, momentYByViscosity);
+    PHWrite(dataContainer, momentZByViscosity);
+}
+
+void BasicAerodynamicForce::ReadAerodynamicForceFromDataContainer(DataContainer *dataContainer)
+{
+    PHRead(dataContainer, forceX);
+    PHRead(dataContainer, forceY);
+    PHRead(dataContainer, forceZ);
+
+    PHRead(dataContainer, forceXByPressure);
+    PHRead(dataContainer, forceYByPressure);
+    PHRead(dataContainer, forceZByPressure);
+
+    PHRead(dataContainer, forceXByViscosity);
+    PHRead(dataContainer, forceYByViscosity);
+    PHRead(dataContainer, forceZByViscosity);
+
+    PHRead(dataContainer, momentX);
+    PHRead(dataContainer, momentY);
+    PHRead(dataContainer, momentZ);
+
+    PHRead(dataContainer, momentXByPressure);
+    PHRead(dataContainer, momentYByPressure);
+    PHRead(dataContainer, momentZByPressure);
+
+    PHRead(dataContainer, momentXByViscosity);
+    PHRead(dataContainer, momentYByViscosity);
+    PHRead(dataContainer, momentZByViscosity);
+}
+
+BasicAleForce::BasicAleForce()
+{
+    this->ZeroBasicAleForce();
+}
+
+BasicAleForce::~BasicAleForce()
+{
+}
+
+void BasicAleForce::ZeroBasicAleForce()
+{
+    forceX = 0.0;
+    forceY = 0.0;
+    forceZ = 0.0;
+
+    momentX = 0.0;
+    momentY = 0.0;
+    momentZ = 0.0;
+
+    powerConsumption = 0.0;
+}
+
+void BasicAleForce::SetBasicAleForceByAerodynamicForce(AerodynamicForce *aerodynamicForce)
+{
+    forceX = aerodynamicForce->GetAerodynamicForceX();
+    forceY = aerodynamicForce->GetAerodynamicForceY();
+    forceZ = aerodynamicForce->GetAerodynamicForceZ();
+    aerodynamicForce->GetMomentByOriginOfCoordinate(momentX, momentY, momentZ);
+}
+
+void BasicAleForce::ReadBasicAleForceFromBasicAleForce(BasicAleForce *basicAleForce)
+{
+    (*this) = (*basicAleForce);
+}
+
+void BasicAleForce::ReadBasicAleForceFromFile(fstream &file)
+{
+    //PHSPACE::PHRead(file, forceX);
+    //PHSPACE::PHRead(file, forceY);
+    //PHSPACE::PHRead(file, forceZ);
+    //
+    //PHSPACE::PHRead(file, momentX);
+    //PHSPACE::PHRead(file, momentY);
+    //PHSPACE::PHRead(file, momentZ);
+    //
+    //PHSPACE::PHRead(file, powerConsumption);
+    file >> forceX >> forceY >> forceZ;
+    file >> momentX >> momentY >> momentZ;
+    file >> powerConsumption;
+}
+
+void BasicAleForce::WriteBasicAleForceToFile(fstream &file)
+{
+    //PHSPACE::PHWrite(file, forceX);
+    //PHSPACE::PHWrite(file, forceY);
+    //PHSPACE::PHWrite(file, forceZ);
+    //
+    //PHSPACE::PHWrite(file, momentX);
+    //PHSPACE::PHWrite(file, momentY);
+    //PHSPACE::PHWrite(file, momentZ);
+    //
+    //PHSPACE::PHWrite(file, powerConsumption);
+    file << forceX << "   " << forceY << "   " << forceZ << "\n";
+    
+    file << momentX << "   " << momentY << "   " << momentZ << "\n";
+
+    file << powerConsumption << "\n";
+}
+
+AleForceOfBody::AleForceOfBody()
+{
+    bodyIndex = 0;
+    numberOfTimeLayers = 0;
+}
+
+AleForceOfBody::~AleForceOfBody()
+{
+    this->DeallocateMemory();
+}
+
+void AleForceOfBody::AllocateMemory()
+{
+    basicAleForceContainer.resize(numberOfTimeLayers);
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++iTimeLayer)
+    {
+        basicAleForceContainer[iTimeLayer] = new BasicAleForce();
+    }
+}
+
+void AleForceOfBody::DeallocateMemory()
+{
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++iTimeLayer)
+    {
+        delete basicAleForceContainer[iTimeLayer];
+    }
+}
+
+BasicAleForce *AleForceOfBody::GetBasicAleForce(int timeLayerIndex)
+{
+    return basicAleForceContainer[timeLayerIndex];
+}
+
+void AleForceOfBody::DumpRestartAleForceOfBodyContainer(fstream &file)
+{
+    int numberOfTimeLayers = this->GetNumberOfTimeLayers();
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++iTimeLayer)
+    {
+        BasicAleForce *basicAleForce = this->GetBasicAleForce(iTimeLayer);
+        basicAleForce->WriteBasicAleForceToFile(file);
+    }
+}
+
+void AleForceOfBody::InitializeAleForceOfBodyContainer()
+{
+    int numberOfTimeLayers = this->GetNumberOfTimeLayers();
+    int bodyIndex = this->GetBodyIndex();
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++iTimeLayer)
+    {
+        BasicAleForce *basicAleForce = this->GetBasicAleForce(iTimeLayer);
+        AerodynamicForce *aerodynamicForce = PHSPACE::GetCurrentAerodynamicForce(bodyIndex);
+        basicAleForce->SetBasicAleForceByAerodynamicForce(aerodynamicForce);
+    }
+}
+
+void AleForceOfBody::ReadAleForceOfBodyContainer()
+{
+    fstream &aleFile = PHSPACE::GetCurrentAleFile();
+
+    int numberOfTimeLayers = this->GetNumberOfTimeLayers();
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++iTimeLayer)
+    {
+        BasicAleForce *basicAleForce = this->GetBasicAleForce(iTimeLayer);
+        fstream &file = aleFile;
+        basicAleForce->ReadBasicAleForceFromFile(file);
+    }
+}
+
+void AleForceOfBody::UpdateAleForceOfBodyOfNewTimeLayer()
+{
+    int iTimeLayer = 0;
+    int bodyIndex = this->GetBodyIndex();
+
+    AerodynamicForce *aerodynamicForce = PHSPACE::GetCurrentAerodynamicForce(bodyIndex);
+
+    BasicAleForce *basicAleForce = this->GetBasicAleForce(iTimeLayer);
+    basicAleForce->SetBasicAleForceByAerodynamicForce(aerodynamicForce);
+}
+
+void AleForceOfBody::UpdateUnsteadyAleForceTerm()
+{
+    int iTimeLevel0 = 0;
+    int iTimeLevel1 = 1;
+    int iTimeLevel2 = 2;
+
+    BasicAleForce *basicAleForce = this->GetBasicAleForce(iTimeLevel0);
+    BasicAleForce *basicAleForceNTimeLevel = this->GetBasicAleForce(iTimeLevel1);
+    BasicAleForce *basicAleForceN1TimeLevel = this->GetBasicAleForce(iTimeLevel2);
+
+    PHSPACE::CopyBasicAleForce(basicAleForceN1TimeLevel, basicAleForceNTimeLevel);
+    PHSPACE::CopyBasicAleForce(basicAleForceNTimeLevel, basicAleForce);
+}
+
+AleForceManager::AleForceManager()
+{
+    numberOfMovingBodies = 0;
+
+    dimensionalForceCoefficient = 1.0;
+    dimensionalMomentCoefficient = 1.0;
+    dimensionalPowerCoefficient = 1.0;
+    numberOfTimeLayers = 0;
+}
+
+AleForceManager::~AleForceManager()
+{
+    this->DeallocateAleForceOfBodyContainer();
+}
+
+void AleForceManager::Initialize()
+{
+    this->AllocateAleForceOfBodyContainer();
+    this->InitializeAleForceOfBodyContainer();
+}
+
+void AleForceManager::Restart()
+{
+    this->ReadAleForceOfBodyContainer();
+}
+
+void AleForceManager::InitializeDimensionalReferenceVariables()
+{
+    RDouble referenceDensity = GlobalDataBase::GetDoubleParaFromDB("referenceDensity");
+    RDouble referenceVelocity = GlobalDataBase::GetDoubleParaFromDB("referenceVelocity");
+    RDouble referenceLength = GlobalDataBase::GetDoubleParaFromDB("referenceLength");
+
+    int geometricDimension = GetDim();
+
+    RDouble dynamicPressure = referenceDensity * PHSPACE::SQR(referenceVelocity);
+
+    dimensionalForceCoefficient = half * dynamicPressure * PHSPACE::SQR(referenceLength);
+    dimensionalMomentCoefficient = half * dynamicPressure * PHSPACE::POWER3(referenceLength);
+    dimensionalPowerCoefficient = dimensionalForceCoefficient * referenceVelocity;
+
+    if (geometricDimension == TWO_D)
+    {
+        dimensionalForceCoefficient = half * dynamicPressure * referenceLength;
+        dimensionalMomentCoefficient = half * dynamicPressure * PHSPACE::SQR(referenceLength);
+    }
+}
+
+void AleForceManager::AllocateAleForceOfBodyContainer()
+{
+    numberOfTimeLayers = 3;
+    numberOfMovingBodies = GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+    this->InitializeDimensionalReferenceVariables();
+
+    aleForceOfBodyContainer.resize(numberOfMovingBodies);
+
+    for (int iMovingBody = 0; iMovingBody < numberOfMovingBodies; ++ iMovingBody)
+    {
+        AleForceOfBody *aleForceOfBody = new AleForceOfBody();
+        aleForceOfBodyContainer[iMovingBody] = aleForceOfBody;
+
+        aleForceOfBody->SetBodyIndex(iMovingBody);
+        aleForceOfBody->SetNumberOfTimeLayers(numberOfTimeLayers);
+        aleForceOfBody->AllocateMemory();
+    }
+}
+
+void AleForceManager::DeallocateAleForceOfBodyContainer()
+{
+    for (int iMovingBody = 0; iMovingBody < numberOfMovingBodies; ++ iMovingBody)
+    {
+        delete aleForceOfBodyContainer[iMovingBody];
+    }
+}
+
+void AleForceManager::InitializeAleForceOfBodyContainer()
+{
+    for (int iMovingBody = 0; iMovingBody < numberOfMovingBodies; ++ iMovingBody)
+    {
+        AleForceOfBody *aleForceOfBody = this->GetAleForceOfBody(iMovingBody);
+
+        aleForceOfBody->InitializeAleForceOfBodyContainer();
+    }
+}
+
+void AleForceManager::ReadAleForceOfBodyContainer()
+{
+
+    for (int iMovingBody = 0; iMovingBody < numberOfMovingBodies; ++ iMovingBody)
+    {
+        AleForceOfBody *aleForceOfBody = this->GetAleForceOfBody(iMovingBody);
+        aleForceOfBody->ReadAleForceOfBodyContainer();
+
+        int resetMassCenter = GetIntegerParameterFromDataBaseIfExist(iMovingBody, "resetMassCenter", 0);
+        if (resetMassCenter == 1)
+        {
+            aleForceOfBody->InitializeAleForceOfBodyContainer();
+        }
+    }
+}
+
+void AleForceManager::Run()
+{
+    for (int iMovingBody = 0; iMovingBody < numberOfMovingBodies; ++ iMovingBody)
+    {
+        aleForceOfBodyContainer[iMovingBody]->UpdateAleForceOfBodyOfNewTimeLayer();
+    }
+}
+
+void AleForceManager::Post()
+{
+    int numberOfMovingBodies = GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+
+    for (int iMovingBody = 0; iMovingBody < numberOfMovingBodies; ++ iMovingBody)
+    {
+        AleForceOfBody *aleForceOfBody = this->GetAleForceOfBody(iMovingBody);
+        aleForceOfBody->UpdateUnsteadyAleForceTerm();
+    }
+}
+
+void AleForceManager::DumpRestartAleForceOfBodyContainer(fstream &file)
+{
+    for (int iMovingBody = 0; iMovingBody < numberOfMovingBodies; ++ iMovingBody)
+    {
+        AleForceOfBody *aleForceOfBody = this->GetAleForceOfBody(iMovingBody);
+        aleForceOfBody->DumpRestartAleForceOfBodyContainer(file);
+    }
+}
+
+BasicAleForce *AleForceManager::GetBasicAleForce(int bodyIndex, int iTimeLayer)
+{
+    AleForceOfBody *aleForceOfBody = this->GetAleForceOfBody(bodyIndex);
+    return aleForceOfBody->GetBasicAleForce(iTimeLayer);
+}
+
+void CopyBasicAleForce(BasicAleForce *basicAleForce, BasicAleForce *basicAleForceIn)
+{
+    *basicAleForce = (*basicAleForceIn);
+}
+
+AerodynamicForce::AerodynamicForce()
+{
+    bodyName = "AllWall";
+    this->Zero();
+}
+
+AerodynamicForce::~AerodynamicForce()
+{
+}
+
+void AerodynamicForce::Zero()
+{
+    forceX = 0.0;
+    forceY = 0.0;
+    forceZ = 0.0;
+
+    forceXByPressure = 0.0;
+    forceYByPressure = 0.0;
+    forceZByPressure = 0.0;
+
+    forceXByViscosity = 0.0;
+    forceYByViscosity = 0.0;
+    forceZByViscosity = 0.0;
+
+    momentX = 0.0;
+    momentY = 0.0;
+    momentZ = 0.0;
+
+    momentXByPressure = 0.0;
+    momentYByPressure = 0.0;
+    momentZByPressure = 0.0;
+
+    momentXByViscosity = 0.0;
+    momentYByViscosity = 0.0;
+    momentZByViscosity = 0.0;
+
+    coefForceX = 0.0;
+    coefForceY = 0.0;
+    coefForceZ = 0.0;
+
+    coefForceXByPressure = 0.0;
+    coefForceYByPressure = 0.0;
+    coefForceZByPressure = 0.0;
+
+    coefForceXByViscosity = 0.0;
+    coefForceYByViscosity = 0.0;
+    coefForceZByViscosity = 0.0;
+
+    coefMomentX = 0.0;
+    coefMomentY = 0.0;
+    coefMomentZ = 0.0;
+
+    coefMomentXByPressure = 0.0;
+    coefMomentYByPressure = 0.0;
+    coefMomentZByPressure = 0.0;
+
+    coefMomentXByViscosity = 0.0;
+    coefMomentYByViscosity = 0.0;
+    coefMomentZByViscosity = 0.0;
+}
+
+void AerodynamicForce::Initialize(RDouble angleOfAttackDenotedByRadian, RDouble angleOfSideslipDenotedByRadian, RDouble referenceAreaOfAerodynamicForce, RDouble referenceLengthOfAerodynamicMoment, RDouble referenceSpainLengthOfAerodynamicMoment)
+{
+    this->angleOfAttackDenotedByRadian = angleOfAttackDenotedByRadian;
+    this->angleOfSideslipDenotedByRadian = angleOfSideslipDenotedByRadian;
+    this->referenceArea = referenceAreaOfAerodynamicForce;
+    this->referenceLength = referenceLengthOfAerodynamicMoment;
+    this->referenceSpainLength = referenceSpainLengthOfAerodynamicMoment;
+
+    this->Zero();
+}
+
+void AerodynamicForce::SetTorqueRef(RDouble torqueRefX, RDouble torqueRefY, RDouble torqueRefZ)
+{
+    this->torqueRefX = torqueRefX;
+    this->torqueRefY = torqueRefY;
+    this->torqueRefZ = torqueRefZ;
+};
+
+void AerodynamicForce::SetHingeMomentRef(RDouble *localCoordAxis0, RDouble *localCoordAxis1)
+{
+    for (int m = 0; m < 3; ++m)
+    {
+        this->localCoordAxis0[m] = localCoordAxis0[m];
+        this->localCoordAxis1[m] = localCoordAxis1[m];
+    }
+};
+
+void AerodynamicForce::Add(DataContainer *dataContainer)
+{
+    const int numberOfForceVariables = 18;
+    RDouble forceMomentContainer[numberOfForceVariables];
+
+    dataContainer->moveto_begin();
+
+    PHSPACE::PHRead(dataContainer, forceMomentContainer, numberOfForceVariables);
+
+    forceX += forceMomentContainer[0];
+    forceY += forceMomentContainer[1];
+    forceZ += forceMomentContainer[2];
+
+    forceXByPressure += forceMomentContainer[3];
+    forceYByPressure += forceMomentContainer[4];
+    forceZByPressure += forceMomentContainer[5];
+
+    forceXByViscosity += forceMomentContainer[6];
+    forceYByViscosity += forceMomentContainer[7];
+    forceZByViscosity += forceMomentContainer[8];
+
+    momentX += forceMomentContainer[9];
+    momentY += forceMomentContainer[10];
+    momentZ += forceMomentContainer[11];
+
+    momentXByPressure += forceMomentContainer[12];
+    momentYByPressure += forceMomentContainer[13];
+    momentZByPressure += forceMomentContainer[14];
+
+    momentXByViscosity += forceMomentContainer[15];
+    momentYByViscosity += forceMomentContainer[16];
+    momentZByViscosity += forceMomentContainer[17];
+}
+
+void AerodynamicForce::GetMomentByOriginOfCoordinate(RDouble &aerodynamicMomentX0, RDouble &aerodynamicMomentY0, RDouble &aerodynamicMomentZ0)
+{
+    RDouble momentReferencePoint[3];
+
+    momentReferencePoint[0] = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+    momentReferencePoint[1] = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+    momentReferencePoint[2] = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+
+    RDouble aerodynamicForce[3];
+
+    aerodynamicForce[0] = forceX;
+    aerodynamicForce[1] = forceY;
+    aerodynamicForce[2] = forceZ;
+
+    RDouble changeOfAerodynamicMoment[3];
+    PHSPACE::CrossProduct(momentReferencePoint, aerodynamicForce, changeOfAerodynamicMoment);
+
+    aerodynamicMomentX0 = momentX + changeOfAerodynamicMoment[0];
+    aerodynamicMomentY0 = momentY + changeOfAerodynamicMoment[1];
+    aerodynamicMomentZ0 = momentZ + changeOfAerodynamicMoment[2];
+}
+
+void AerodynamicForce::DumpCoefficient(ActionKey *actionKey)
+{
+    using namespace PHMPI;
+    int myID = GetCurrentProcessorID();
+    int serverTmp = GetServerProcessorID();
+    if (myID != serverTmp) return;
+
+    PHSPACE::ParallelOpenFile(actionKey);
+
+    fstream &file = *actionKey->GetFile();
+
+    this->DumpCoefficient(file);
+
+    PHSPACE::ParallelCloseFile(file);
+}
+
+void AerodynamicForce::DumpComponentCoefficient(ActionKey *actionKey)
+{
+    using namespace PHMPI;
+    int myID = GetCurrentProcessorID();
+    int serverTmp = GetServerProcessorID();
+    if (myID != serverTmp) return;
+
+    string totalForceFileName = actionKey->GetFileName();
+    string partAircoefFileName = PHSPACE::AddSymbolToFileName(totalForceFileName, "_", bodyName);
+
+    fstream file;
+    file.open(partAircoefFileName.c_str(), ios_base::out | ios_base::app);
+
+    this->DumpCoefficient(file);
+
+    file.close();
+    file.clear();
+}
+
+void AerodynamicForce::DumpCoefficient(fstream &file)
+{
+    this->ComputeCoefficient();
+
+    ostringstream oss;
+
+    int outerIterationSteps = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    oss << setiosflags(ios::right);
+    oss << setiosflags(ios::scientific);
+
+    if (PHSPACE::IfFileEmpty(file))
+    {
+        vector<string> titleOfTecplot;
+        titleOfTecplot.push_back("Title=\"THE AIRCOEF\"");
+        titleOfTecplot.push_back("Variables=");
+        titleOfTecplot.push_back("iter");
+        titleOfTecplot.push_back("<i>C<sub>L</sub></i>");
+        titleOfTecplot.push_back("<i>C<sub>D</sub></i>");
+        titleOfTecplot.push_back("<i>C<sub>Z</sub></i>");
+        titleOfTecplot.push_back("<i>C<sub>D_p</sub></i>");
+        titleOfTecplot.push_back("<i>C<sub>D_f</sub></i>");
+        titleOfTecplot.push_back("<i>C<sub>D</sub></i>-<i>C<sub>L</sub></i><sup>2</sup>/(<greek>p</greek><math>4</math>A<sub>r</sub>)</i>");
+        titleOfTecplot.push_back("<i>X<sub>cp</sub></i>");
+        titleOfTecplot.push_back("<i>C<sub>A</sub></i>");
+        titleOfTecplot.push_back("<i>C<sub>N</sub></i>");
+        titleOfTecplot.push_back("<i>C<sub>Z1</sub></i>");
+        titleOfTecplot.push_back("<i>C<sub>ml</sub></i>");
+        titleOfTecplot.push_back("<i>C<sub>mn</sub></i>");
+        titleOfTecplot.push_back("<i>C<sub>m</sub></i>");
+        if (bodyName == "AllWall")
+        {
+            titleOfTecplot.push_back("\"WallTime\"");
+        }
+
+        for (std::size_t iTitle = 0; iTitle < titleOfTecplot.size(); ++iTitle)
+        {
+            oss << titleOfTecplot[iTitle] << "\n";
+        }
+    }
+
+    oss << outerIterationSteps << "\t";
+
+    oss << setprecision(10);
+
+    oss << totalLiftCoefficient << "\t";
+    oss << totalDragCoefficient << "\t";
+    oss << totalCrossCoefficient << "\t";
+    oss << totalPressureDragCoefficient << "\t";
+    oss << totalViscosityDragCoefficient << "\t";
+    oss << DragCoefLiftCoef2piar << "\t";
+    oss << pressureCenter << "\t";
+
+    oss << coefForceX << "\t";
+    oss << coefForceY << "\t";
+    oss << coefForceZ << "\t";
+    oss << coefMomentX << "\t";
+    oss << coefMomentY << "\t";
+    oss << coefMomentZ << "\t";
+
+    if (bodyName == "AllWall")
+    {
+        RDouble wallTime = PHSPACE::TIME_SPACE::GetWallTime();
+        oss << wallTime;
+    }
+
+    oss << "\n";
+    PHSPACE::WriteASCIIFile(file, oss.str());
+}
+
+void AerodynamicForce::ComputeCoefficient()
+{
+    RDouble sina = sin(angleOfAttackDenotedByRadian);
+    RDouble cosa = cos(angleOfAttackDenotedByRadian);
+    RDouble sinb = sin(angleOfSideslipDenotedByRadian);
+    RDouble cosb = cos(angleOfSideslipDenotedByRadian);
+
+    const RDouble AR = 9.5;
+
+    RDouble referenceCoefficientOfForce = 1.0 / referenceArea;
+    RDouble referenceCoefficientOfMoment = 1.0 / (referenceArea * referenceLength);
+    RDouble referenceCoefficientOfMomentSpain = 1.0 / (referenceArea * referenceSpainLength);
+
+    coefForceX = forceX * referenceCoefficientOfForce;
+    coefForceY = forceY * referenceCoefficientOfForce;
+    coefForceZ = forceZ * referenceCoefficientOfForce;
+
+    coefForceXByPressure = forceXByPressure * referenceCoefficientOfForce;
+    coefForceYByPressure = forceYByPressure * referenceCoefficientOfForce;
+    coefForceZByPressure = forceZByPressure * referenceCoefficientOfForce;
+
+    coefForceXByViscosity = forceXByViscosity * referenceCoefficientOfForce;
+    coefForceYByViscosity = forceYByViscosity * referenceCoefficientOfForce;
+    coefForceZByViscosity = forceZByViscosity * referenceCoefficientOfForce;
+
+    coefMomentX = momentX * referenceCoefficientOfMomentSpain;
+    coefMomentY = momentY * referenceCoefficientOfMomentSpain;
+    coefMomentZ = momentZ * referenceCoefficientOfMoment;
+
+    coefMomentXByPressure = momentXByPressure * referenceCoefficientOfMomentSpain;
+    coefMomentYByPressure = momentYByPressure * referenceCoefficientOfMomentSpain;
+    coefMomentZByPressure = momentZByPressure * referenceCoefficientOfMoment;
+
+    coefMomentXByViscosity = momentXByViscosity * referenceCoefficientOfMomentSpain;
+    coefMomentYByViscosity = momentYByViscosity * referenceCoefficientOfMomentSpain;
+    coefMomentZByViscosity = momentZByViscosity * referenceCoefficientOfMoment;
+
+    totalLiftCoefficient = -sina * coefForceX + cosa * coefForceY;
+    totalDragCoefficient = cosa * cosb * coefForceX + sina * cosb * coefForceY + sinb * coefForceZ;
+    totalCrossCoefficient = -cosa * sinb * coefForceX - sina * sinb * coefForceY + cosb * coefForceZ;
+    totalPressureDragCoefficient = cosa * cosb * coefForceXByPressure + sina * cosb * coefForceYByPressure + sinb * coefForceZByPressure;
+    totalViscosityDragCoefficient = cosa * cosb * coefForceXByViscosity + sina * cosb * coefForceYByViscosity + sinb * coefForceZByViscosity;
+    DragCoefLiftCoef2piar = totalDragCoefficient - totalLiftCoefficient * totalLiftCoefficient / (PI * AR);
+    pressureCenter = PHSPACE::SIGN(1.0, coefForceY) * coefMomentZ / (PHSPACE::ABS(coefForceY) + SMALL);
+}
+
+void AerodynamicForce::CollectOfAllProcessors()
+{
+    using namespace PHMPI;
+    RDouble forceXSum = forceX;
+    RDouble forceYSum = forceY;
+    RDouble forceZSum = forceZ;
+
+    RDouble forceXByPressureSum = forceXByPressure;
+    RDouble forceYByPressureSum = forceYByPressure;
+    RDouble forceZByPressureSum = forceZByPressure;
+
+    RDouble forceXByViscositySum = forceXByViscosity;
+    RDouble forceYByViscositySum = forceYByViscosity;
+    RDouble forceZByViscositySum = forceZByViscosity;
+
+    RDouble momentXSum = momentX;
+    RDouble momentYSum = momentY;
+    RDouble momentZSum = momentZ;
+
+    RDouble momentXByPressureSum = momentXByPressure;
+    RDouble momentYByPressureSum = momentYByPressure;
+    RDouble momentZByPressureSum = momentZByPressure;
+
+    RDouble momentXByViscositySum = momentXByViscosity;
+    RDouble momentYByViscositySum = momentYByViscosity;
+    RDouble momentZByViscositySum = momentZByViscosity;
+
+    PH_Reduce(&forceX, &forceXSum, 1, PH_SUM);
+    PH_Reduce(&forceY, &forceYSum, 1, PH_SUM);
+    PH_Reduce(&forceZ, &forceZSum, 1, PH_SUM);
+
+    PH_Reduce(&forceXByPressure, &forceXByPressureSum, 1, PH_SUM);
+    PH_Reduce(&forceYByPressure, &forceYByPressureSum, 1, PH_SUM);
+    PH_Reduce(&forceZByPressure, &forceZByPressureSum, 1, PH_SUM);
+
+    PH_Reduce(&forceXByViscosity, &forceXByViscositySum, 1, PH_SUM);
+    PH_Reduce(&forceYByViscosity, &forceYByViscositySum, 1, PH_SUM);
+    PH_Reduce(&forceZByViscosity, &forceZByViscositySum, 1, PH_SUM);
+
+    PH_Reduce(&momentX, &momentXSum, 1, PH_SUM);
+    PH_Reduce(&momentY, &momentYSum, 1, PH_SUM);
+    PH_Reduce(&momentZ, &momentZSum, 1, PH_SUM);
+
+    PH_Reduce(&momentXByPressure, &momentXByPressureSum, 1, PH_SUM);
+    PH_Reduce(&momentYByPressure, &momentYByPressureSum, 1, PH_SUM);
+    PH_Reduce(&momentZByPressure, &momentZByPressureSum, 1, PH_SUM);
+
+    PH_Reduce(&momentXByViscosity, &momentXByViscositySum, 1, PH_SUM);
+    PH_Reduce(&momentYByViscosity, &momentYByViscositySum, 1, PH_SUM);
+    PH_Reduce(&momentZByViscosity, &momentZByViscositySum, 1, PH_SUM);
+
+    forceX = forceXSum;
+    forceY = forceYSum;
+    forceZ = forceZSum;
+
+    forceXByPressure = forceXByPressureSum;
+    forceYByPressure = forceYByPressureSum;
+    forceZByPressure = forceZByPressureSum;
+
+    forceXByViscosity = forceXByViscositySum;
+    forceYByViscosity = forceYByViscositySum;
+    forceZByViscosity = forceZByViscositySum;
+
+    momentX = momentXSum;
+    momentY = momentYSum;
+    momentZ = momentZSum;
+
+    momentXByPressure = momentXByPressureSum;
+    momentYByPressure = momentYByPressureSum;
+    momentZByPressure = momentZByPressureSum;
+
+    momentXByViscosity = momentXByViscositySum;
+    momentYByViscosity = momentYByViscositySum;
+    momentZByViscosity = momentZByViscositySum;
+}
+
+AerodynamicForceManager::AerodynamicForceManager()
+{
+    isAllocateMemory = false;
+    numberOfAerodynamicForceBodies = 0;
+    bodyID = 0;
+}
+
+AerodynamicForceManager::~AerodynamicForceManager()
+{
+    this->DeallocateMemory();
+}
+
+void AerodynamicForceManager::AllocateMemory()
+{
+    if (isAllocateMemory) return;
+
+    isAllocateMemory = true;
+
+    aerodynamicForceContainer.resize(numberOfAerodynamicForceBodies);
+
+    for (int iMovingBody = 0; iMovingBody < numberOfAerodynamicForceBodies; ++ iMovingBody)
+    {
+        aerodynamicForceContainer[iMovingBody] = new AerodynamicForce();
+    }
+}
+
+void AerodynamicForceManager::DeallocateMemory()
+{
+    if (!isAllocateMemory) return;
+
+    for (int iMovingBody = 0; iMovingBody < numberOfAerodynamicForceBodies; ++ iMovingBody)
+    {
+        delete aerodynamicForceContainer[iMovingBody];
+    }
+}
+
+void AerodynamicForceManager::InitializeAerodynamicForceManager()
+{
+    numberOfAerodynamicForceBodies = GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+    this->AllocateMemory();
+
+    RDouble angleOfAttackDenotedByRadian = GlobalDataBase::GetDoubleParaFromDB("attack");
+    RDouble angleOfSideslipDenotedByRadian = GlobalDataBase::GetDoubleParaFromDB("sideslip");
+
+    RDouble referenceAreaOfAerodynamicForce = GlobalDataBase::GetDoubleParaFromDB("forceReferenceArea");
+    RDouble referenceLengthOfAerodynamicMoment = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLength");
+    RDouble referenceSpainLengthOfAerodynamicMoment = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLengthSpanWise");
+
+    set < string > *bodyList = GlobalBoundaryCondition::GetBodyNameList();
+    set < string >::iterator bodyListIter = bodyList->begin();
+    for (int iMovingBody = 0; iMovingBody < numberOfAerodynamicForceBodies; ++ iMovingBody)
+    {
+        AerodynamicForce *aerodynamicForce = this->GetAerodynamicForce(iMovingBody);
+        aerodynamicForce->Initialize(angleOfAttackDenotedByRadian, angleOfSideslipDenotedByRadian, referenceAreaOfAerodynamicForce,
+            referenceLengthOfAerodynamicMoment, referenceSpainLengthOfAerodynamicMoment);
+
+        string bodyName = *bodyListIter;
+        aerodynamicForce->SetBodyName(bodyName);
+        bodyListIter ++;
+    }
+}
+
+void AerodynamicForceManager::ExtractForceDataFromActionKey(ActionKey *actionKey, vector< DataContainer * > *dataContainerArray)
+{
+    DataContainer *dataContainer = actionKey->GetData();
+    dataContainer->moveto_begin();
+
+    const int numberOfData = 18;
+    RDouble bufferForSwap[numberOfData];
+
+    for (int iMovingBody = 0; iMovingBody < numberOfAerodynamicForceBodies; ++ iMovingBody)
+    {
+        PHSPACE::PHRead(dataContainer, bufferForSwap, numberOfData);
+        PHSPACE::PHWrite((*dataContainerArray)[iMovingBody], bufferForSwap, numberOfData);
+    }
+}
+
+vector< DataContainer * > *AerodynamicForceManager::CreateDataContainerArray()
+{
+    vector< DataContainer * > *dataContainerArray = new vector< DataContainer * >(numberOfAerodynamicForceBodies + 1);
+    for (int iMovingBody = 0; iMovingBody < numberOfAerodynamicForceBodies; ++ iMovingBody)
+    {
+        (*dataContainerArray)[iMovingBody] = new DataContainer();
+    }
+    return dataContainerArray;
+}
+
+void AerodynamicForceManager::FreeDataContainerArray(vector< DataContainer * > *dataContainerArray)
+{
+    for (int iMovingBody = 0; iMovingBody < numberOfAerodynamicForceBodies; ++ iMovingBody)
+    {
+        delete (*dataContainerArray)[iMovingBody];
+    }
+    delete dataContainerArray;
+}
+
+void AerodynamicForceManager::AddAerodynamicForce(ActionKey *actionKey)
+{
+    vector< DataContainer * > *dataContainerArray = this->CreateDataContainerArray();
+
+    this->ExtractForceDataFromActionKey(actionKey, dataContainerArray);
+
+    for (int iMovingBody = 0; iMovingBody < numberOfAerodynamicForceBodies; ++ iMovingBody)
+    {
+        DataContainer *dataContainer = (*dataContainerArray)[iMovingBody];
+        aerodynamicForceContainer[iMovingBody]->Add(dataContainer);
+    }
+    this->FreeDataContainerArray(dataContainerArray);
+}
+
+void AerodynamicForceManager::CollectAerodynamicForceOfAllProcessors()
+{
+    for (int iMovingBody = 0; iMovingBody < numberOfAerodynamicForceBodies; ++ iMovingBody)
+    {
+        aerodynamicForceContainer[iMovingBody]->CollectOfAllProcessors();
+    }
+}
+
+AerodynamicForceManager *GetAerodynamicForceManager()
+{
+    return &aerodynamicForceManager;
+}
+
+AerodynamicForce *GetCurrentAerodynamicForce(int bodyIndex)
+{
+    return GetAerodynamicForceManager()->GetAerodynamicForce(bodyIndex);
+}
+
+BasicAerodynamicForce *GetBasicAerodynamicForce(int iBoundaryConditionRegion, BasicAerodynamicForce **basicAerodynamicForceContainer)
+{
+    return basicAerodynamicForceContainer[iBoundaryConditionRegion];
+}
+
+BasicAerodynamicForce *GetBasicAerodynamicForce(int iBoundaryConditionRegion, vector<BasicAerodynamicForce *> *basicAerodynamicForceVector)
+{
+    return (*basicAerodynamicForceVector)[iBoundaryConditionRegion];
+}
+
+bool OutPutSubIterationForceHeader()
+{
+    int outerIterationSteps = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int innerIterationSteps = GlobalDataBase::GetIntParaFromDB("innstep");
+    int numberOfForceSaveSteps = GlobalDataBase::GetIntParaFromDB("intervalStepForce");
+
+    if (outerIterationSteps / numberOfForceSaveSteps == 1 && innerIterationSteps / numberOfForceSaveSteps == 1)
+    {
+        return true;
+    }
+
+    return false;
+}
+
+}
diff --git a/API/Physics/src/AleManager.cpp b/API/Physics/src/AleManager.cpp
new file mode 100644
index 0000000..ce1bbdb
--- /dev/null
+++ b/API/Physics/src/AleManager.cpp
@@ -0,0 +1,586 @@
+#include <iostream>
+#include "PHMpi.h"
+#include "Precision.h"
+#include "Constants.h"
+#include "AleManager.h"
+#include "AleForceManager.h"
+#include "Solver.h"
+#include "Geometry.h"
+#include "SixDofManager.h"
+#include "DeformingSolverManager.h"
+#include "MovingMesh.h"
+#include "Zone.h"
+#include "GridType.h"
+#include "Region.h"
+#include "OversetInformation.h"
+#include "GlobalDataBase.h"
+#include "PHIO.h"
+#include "IO_FileName.h"
+#include "IO_FileReader.h"
+#include "TK_Exit.h"
+#include "TK_Log.h"
+#include "Task_ServerUpdateInterface.h"
+#include "Geo_UnstructGrid.h"
+#include "Glb_Dimension.h"
+
+namespace PHSPACE
+{
+
+AleManager * aleManager = NULL;
+
+void CreateAleManager()
+{
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (!isUnsteady)
+    {
+        return;
+    }
+
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+    if (!isAle)
+    {
+        return;
+    }
+
+    aleManager = new AleManager;
+
+    aleManager->Initialize();
+}
+
+AleManager * GetAleManager()
+{
+    return aleManager;
+}
+
+void FreeAleManager()
+{
+    int IsUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+    if (IsUnsteady  && isAle)
+    {
+        if(aleManager)
+        {
+            delete aleManager;
+            aleManager = NULL;
+        }
+    }
+}
+
+void SolveSingleInnerIterationStepForAleSolvers()
+{
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+    if (!isAle)
+    {
+        return;
+    }
+
+    //! it does not need to solve Ale for quasi steady questions.
+    int aleStartStrategy = GlobalDataBase::GetIntParaFromDB("aleStartStrategy");
+    if (aleStartStrategy == -1)
+    {
+        return;
+    }
+
+    //! backup the old meshes information (n time) first in the inner iterations.
+    int innStep = GlobalDataBase::GetIntParaFromDB("innstep");
+    if (innStep == 1)
+    {
+        BackupAllZonesOldGrid();
+    }
+    if (innStep == 1)
+    {
+        RDouble aleSimulationTime = GlobalDataBase::GetDoubleParaFromDB("aleSimulationTime");
+        RDouble aleTimeStep = GetAleTimeStep();
+
+        aleSimulationTime += aleTimeStep;
+        GlobalDataBase::UpdateData("aleSimulationTime", &aleSimulationTime, PHDOUBLE, 1);
+    }
+    //! if it is the first step of the inner step or implicit methods, update the mesh information.
+    if (innStep == 1 || IsImplicitAleMethod())
+    {
+        ComputeAerodynamicForceForALE();
+
+        aleManager->Run();
+
+        //ComputeMetrics();
+        aleManager->ComputeMetrics();
+
+        aleManager->CommunicateCellCenterData();
+
+        //! computing the faceNormalVelocityContainer. we do not compute the movement velocity for quasi steady questions.
+        int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+        if(methodOfDualTime != 0)
+        {
+            aleManager->ComputeGridFaceVelocity();
+        }
+    }
+
+    if (innStep == 1)
+    {
+        //! if it is the overset mesh, should dig the hole.
+        int isOverset = PHSPACE::GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+        if (isOverset)
+        {
+            //! clear up the store memory before assembling.
+            DeAllocateOversetStorage();
+
+            ResetAllZonesOversetGrid();
+
+            InitializeOversetInterfaceTopology();
+
+            //! the memory of the variables need to re open, when the overset mesh changes.
+            AllocateOversetStorage();
+        }
+    }
+}
+
+void PostprocessAfterInnerIterationStepForAleSolvers()
+{
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+    if (!isAle)
+    {
+        return;
+    }
+
+    aleManager->UpdateAleForce();
+
+    aleManager->Post();
+
+    aleManager->DumpRestart();
+}
+
+AleManager::AleManager()
+{
+    aleForceManager      = NULL;
+    sixDofSolverManager  = NULL;
+    deformingManager     = NULL;
+    movingMeshManager    = NULL;
+    currentAleFile       = NULL;
+}
+
+AleManager::~AleManager()
+{
+    if (aleForceManager    ) delete aleForceManager;
+    if (sixDofSolverManager) delete sixDofSolverManager;
+    if (deformingManager   ) delete deformingManager;
+    if (movingMeshManager  ) delete movingMeshManager;
+}
+
+void AleManager::Initialize()
+{
+    SychonizeAleTime();
+
+    Allocate();
+
+    int aleStartStrategy = GlobalDataBase::GetIntParaFromDB("aleStartStrategy");
+    if(aleStartStrategy ==  1)
+    {
+        Restart();
+    }
+
+    aleStartStrategy = GlobalDataBase::GetIntParaFromDB("aleStartStrategy");
+    if(aleStartStrategy == -1)
+    {
+        aleManager->Run();
+
+        aleManager->ComputeMetrics();
+
+        aleManager->CommunicateCellCenterData();
+
+        int isOverset = PHSPACE::GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+        if (isOverset)
+        {
+            ResetAllZonesOversetGrid();
+
+            InitializeOversetInterfaceTopology();
+            //! the memory of the variables need to re open, when the overset mesh changes.
+            AllocateOversetStorage();
+        }
+    }
+
+    Dump();
+}
+
+void AleManager::ComputeMetrics()
+{
+    using namespace PHMPI;
+
+    int nZones = GetNumberofGlobalZones();
+    ActionKey* actkey = new ActionKey();
+    actkey->action = COMPUTEMETRICS;
+
+    for (int iZone = 0; iZone < nZones; ++iZone)
+    {
+        int send_proc = GetZoneProcessorIDSepMode(iZone);
+        int recv_proc = GetServerSepMode();
+
+        int tag = GetSendRecvTag(GRID_BASED, 0, iZone);
+        int myid = PHMPI::GetCurrentProcessorID();
+        if (myid == send_proc)
+        {
+            //! If the ProcessorID of i-th zone equal to the running ProcessorID, compute grid metrics.
+            Grid* grid = GetGrid(iZone, 0);
+            grid->ComputeMetrics(actkey);
+            if (grid->Type() == PHSPACE::STRUCTGRID)
+            {
+                UnstructGrid *gridUnstr = UnstructGridCast(grid);
+                if (gridUnstr)
+                {
+                    gridUnstr->ComputeMetrics(actkey);
+                }
+            }
+        }
+
+        // collect all info out by ComputeMetrics function to cdata.
+        PH_Trade(actkey, send_proc, recv_proc, tag);
+
+        if (myid == recv_proc)
+        {
+            //! If ProcessorID ProcessorID is serve ProcessorID, output the info in cdata.
+            WriteScreen(actkey);
+        }
+    }
+    delete actkey;    actkey = NULL;
+}
+
+void AleManager::CommunicateCellCenterData()
+{
+    using namespace PHMPI;
+    int nMGLevel = GlobalDataBase::GetIntParaFromDB("nMGLevel");
+    for (int level = 0; level < nMGLevel; ++level)
+    {
+        ActionKey* actkey = new ActionKey();
+        actkey->action = COMMCELLCENTERDATA;
+        actkey->kind = GRID_BASED;
+        actkey->level = level;
+
+        if (IsNeedNonBlockingCommunication(actkey))
+        {
+            MainTaskNonBlocking(actkey);
+        }
+        else
+        {
+            MainTaskBlocking(actkey);
+        }
+
+        delete actkey;
+    }
+}
+
+void AleManager::ComputeGridFaceVelocity()
+{
+    int numberOfZones = PHMPI::GetNumberofGlobalZones();
+
+    int gridLevelIndex = 0;
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        Grid* grid = PHSPACE::GetGrid(iZone, gridLevelIndex);
+        if (!grid) continue;
+
+        grid->ComputeGridFaceVelocity();
+    }
+}
+
+void AleManager::Allocate()
+{
+    InitializeAerodynamicForce();
+
+    aleForceManager         = new AleForceManager       ;
+    deformingManager        = new DeformingSolverManager;
+    sixDofSolverManager     = new SixDofSolverManager   ;
+    movingMeshManager       = new MovingMeshManager     ;
+
+    RDouble aleSimulationTime = 0.0;
+    GlobalDataBase::UpdateData("aleSimulationTime", &aleSimulationTime, PHDOUBLE, 1);
+
+    aleForceManager     ->Initialize();
+    deformingManager    ->Initialize();
+    sixDofSolverManager ->Initialize();
+    movingMeshManager   ->Initialize();
+}
+
+void AleManager::Restart()
+{
+    fstream aleFile;
+    string aleFileName = "./results/aleRestartFile.dat";
+
+    ifstream infile(aleFileName.c_str(), ios::in);
+    if (!infile)
+    {
+        int aleStartStrategy = 0;
+        GlobalDataBase::UpdateData("aleStartStrategy", &aleStartStrategy, PHINT, 1);
+        return;
+    }
+
+    ios_base::openmode openMode = ios_base::in;
+    PHSPACE::OpenFile(aleFile, aleFileName, openMode);
+    currentAleFile = & aleFile;
+    SetIsReadAleFile(true);
+
+    RDouble aleSimulationTime = 0.0;
+    //PHRead(aleFile, aleSimulationTime);
+    aleFile >> aleSimulationTime;
+    GlobalDataBase::UpdateData("aleSimulationTime", &aleSimulationTime, PHDOUBLE, 1);
+
+    //! the mesh  need to transform to n time from 0 time, when restart the computing.
+    aleForceManager       ->Restart();
+    deformingManager      ->Restart();
+    sixDofSolverManager   ->Restart();
+    movingMeshManager     ->Run();
+    sixDofSolverManager   ->ResetMassCenter();
+    movingMeshManager     ->Restart();
+
+    //! the mesh moves, it needs to recompute the mesh information.
+    aleManager->ComputeMetrics();
+
+    aleManager->CommunicateCellCenterData();
+
+    PHSPACE::CloseFile(aleFile);
+}
+
+void AleManager::InitializeDimensionalReferenceTime()
+{
+    RDouble referenceVelocity = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("referenceVelocity");
+    RDouble referenceLength   = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("referenceLength");
+
+    RDouble dimensionalReferenceTime = referenceLength / referenceVelocity;
+    PHSPACE::GlobalDataBase::UpdateData("dimensionalReferenceTime", &dimensionalReferenceTime, PHDOUBLE, 1);
+}
+
+void AleManager::SychonizeAleTime()
+{
+    RDouble aleSimulationTime = 0.0;
+    PHSPACE::GlobalDataBase::UpdateData("aleSimulationTime", &aleSimulationTime, PHDOUBLE, 1);
+
+    int aleStartStrategy = GlobalDataBase::GetIntParaFromDB("aleStartStrategy");
+    if(aleStartStrategy == 0)
+    {
+        int outIterStep = 0;
+        PHSPACE::GlobalDataBase::UpdateData("outnstep", &outIterStep, PHINT, 1);
+        int innerIterStep = 0;
+        PHSPACE::GlobalDataBase::UpdateData("innstep", &innerIterStep, PHINT, 1);
+    }
+
+    InitializeDimensionalReferenceTime();
+
+    RDouble dimensionalReferenceTime = GlobalDataBase::GetDoubleParaFromDB("dimensionalReferenceTime");
+
+    RDouble physicalTime = aleSimulationTime / dimensionalReferenceTime;
+
+    GlobalDataBase::UpdateData("physicalTime", &physicalTime, PHDOUBLE, 1);
+}
+
+void AleManager::UpdateAleForce()
+{
+    //! update the aerodynamic force after the iterations to prevent get the wrong energy consumption when restarting.
+    aleForceManager->Run();
+}
+
+void AleManager::Run()
+{
+    deformingManager    ->Run();
+    sixDofSolverManager ->Run();
+    movingMeshManager   ->Run();
+}
+
+void AleManager::Post()
+{
+    aleForceManager     ->Post();
+    deformingManager    ->Post();
+    sixDofSolverManager ->Post();
+    movingMeshManager   ->Post();
+}
+
+void AleManager::Dump()
+{
+    deformingManager      ->Dump();
+    sixDofSolverManager   ->Dump();
+}
+
+void AleManager::DumpRestart()
+{
+    using namespace PHMPI;
+    int currentProcessor = GetCurrentProcessorID();
+    int serverProcessor = GetServerProcessorID();
+    if (currentProcessor != serverProcessor)
+    {
+        return;
+    }
+
+    fstream aleFile;
+
+    int outerStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int numberOfFieldSaveSteps = GlobalDataBase::GetIntParaFromDB("intervalStepFlow");
+    int maxSimuStep = GlobalDataBase::GetIntParaFromDB("maxSimuStep");
+
+    if(outerStep % numberOfFieldSaveSteps == 0 || outerStep == maxSimuStep)
+    {
+        string aleFileName = "./results/aleRestartFile.dat";
+        ios_base::openmode openMode = ios_base::out;
+        PHSPACE::OpenFile(aleFile, aleFileName, openMode);
+
+        RDouble aleTime = GlobalDataBase::GetDoubleParaFromDB("aleSimulationTime");
+
+        aleFile << aleTime << "\n";
+        //PHWrite(aleFile, aleTime);
+
+        aleForceManager->DumpRestartAleForceOfBodyContainer(aleFile);
+        deformingManager->DumpRestart();
+        sixDofSolverManager->DumpRestart(aleFile);
+
+        PHSPACE::CloseFile(aleFile);
+    }
+}
+
+void BackupAllZonesOldGrid()
+{
+    int numberOfZones = PHMPI::GetNumberofGlobalZones();
+
+    int gridLevelIndex = 0;
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        Grid* grid = GetGrid(iZone, gridLevelIndex);
+        if (! grid) continue;
+        grid->BackUpOldGrid();
+    }
+}
+
+void DeAllocateOversetStorage()
+{
+    int nSolver = GlobalDataBase::GetIntParaFromDB("maxNumOfSolver");
+    for (int iSolver = 0; iSolver < nSolver; ++iSolver)
+    {
+        int numberOfZones = PHMPI::GetNumberofGlobalZones();
+        int gridLevelIndex = 0;
+        for (int iZone = 0; iZone < numberOfZones; ++iZone)
+        {
+            Grid* grid = GetGrid(iZone, gridLevelIndex);
+            if (!grid) continue;
+            PHSolver *solver = GlobalSolvers::GetSolver(iZone, iSolver);
+            solver->DeAllocateOversetInterfaceVar(grid);
+        }
+    }
+}
+
+void AllocateOversetStorage()
+{
+    int nSolver = GlobalDataBase::GetIntParaFromDB("maxNumOfSolver");
+    for (int iSolver = 0; iSolver < nSolver; ++iSolver)
+    {
+        int numberOfZones = PHMPI::GetNumberofGlobalZones();
+        int gridLevelIndex = 0;
+        for (int iZone = 0; iZone < numberOfZones; ++iZone)
+        {
+            Grid* grid = GetGrid(iZone, gridLevelIndex);
+            if (!grid) continue;
+            PHSolver *solver = GlobalSolvers::GetSolver(iZone, iSolver);
+            solver->RegisterOversetField();
+        }
+    }
+}
+
+bool isReadAleFile = false;
+
+bool IsReadAleFile()
+{
+    return isReadAleFile;
+}
+
+void SetIsReadAleFile(bool isReadAleFileIn)
+{
+    PHSPACE::isReadAleFile = isReadAleFileIn;
+}
+
+fstream & GetCurrentAleFile()
+{
+    return aleManager->GetCurrentAleFile();
+}
+
+bool IsImplicitAleMethod()
+{
+    int keyMethod = PHSPACE::GlobalDataBase::GetIntParaFromDB("methodForKineticEquation");
+
+    if (keyMethod == KINETIC_SCHEME::ADMAS_BASHFORTH_FIRST_ORDER)   return false;
+    if (keyMethod == KINETIC_SCHEME::ADMAS_BASHFORTH_SECOND_ORDER)  return false;
+
+    return true;
+}
+
+bool IsExplicitAleMethod()
+{
+    return ! IsImplicitAleMethod();
+}
+
+int GetIntegerParameterFromDataBase(int bodyIndex, const string& parameterName)
+{
+    ostringstream oss;
+    oss << parameterName << "_" << bodyIndex;
+    return PHSPACE::GlobalDataBase::GetIntParaFromDB(oss.str());
+}
+
+int GetIntegerParameterFromDataBaseIfExist(int bodyIndex, const string& parameterName, int defaultValue)
+{
+    int value = defaultValue;
+    ostringstream oss;
+    oss << parameterName << "_" << bodyIndex;
+    if (GlobalDataBase::IsExist(oss.str(), PHINT, 1))
+    {
+        value = PHSPACE::GlobalDataBase::GetIntParaFromDB(oss.str());
+    }
+    return value;
+}
+
+RDouble GetRDoubleParameterFromDataBase(int bodyIndex, const string& parameterName)
+{
+    ostringstream oss;
+    oss << parameterName << "_" << bodyIndex;
+    return PHSPACE::GlobalDataBase::GetDoubleParaFromDB(oss.str());
+}
+
+RDouble GetRDoubleParameterFromDataBaseIfExist(int bodyIndex, const string &parameterName, RDouble defaultValue)
+{
+    RDouble value = defaultValue;
+    ostringstream oss;
+    oss << parameterName << "_" << bodyIndex;
+    if (GlobalDataBase::IsExist(oss.str(), PHDOUBLE, 1))
+    {
+        value = PHSPACE::GlobalDataBase::GetDoubleParaFromDB(oss.str());
+    }
+    return value;
+}
+
+string GetStringParameterFromDataBase(int bodyIndex, const string& parameterName)
+{
+    ostringstream oss;
+    oss << parameterName << "_" << bodyIndex;
+    return PHSPACE::GlobalDataBase::GetStrParaFromDB(oss.str());
+}
+
+int* GetIntegerArrayFromDataBase(const string& nameOfIntegerArray, int numberOfElements)
+{
+    int* integerArray = new int[numberOfElements];
+
+    GlobalDataBase::GetData(nameOfIntegerArray, integerArray, PHINT, numberOfElements);
+
+    return integerArray;
+}
+
+void GetRDoubleVectorFromDataBase(vector< RDouble >& parameter, int bodyIndex, const string& parameterName, int numberOfElements)
+{
+    ostringstream oss;
+    oss << parameterName << "_" << bodyIndex;
+    PHSPACE::GlobalDataBase::GetRDoubleVectorFromDB(parameter, oss.str(), numberOfElements);
+}
+
+RDouble GetAleTimeStep()
+{
+    RDouble physicalTimeStep         = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+    RDouble dimensionalReferenceTime = GlobalDataBase::GetDoubleParaFromDB("dimensionalReferenceTime");
+    RDouble gridScaleFactor          = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+
+    RDouble aleTimeStep = physicalTimeStep * dimensionalReferenceTime * gridScaleFactor;
+
+    return aleTimeStep;
+}
+
+}
\ No newline at end of file
diff --git a/API/Physics/src/AleModel.cpp b/API/Physics/src/AleModel.cpp
new file mode 100644
index 0000000..6c6f77c
--- /dev/null
+++ b/API/Physics/src/AleModel.cpp
@@ -0,0 +1,1206 @@
+#include "PHMpi.h"
+#include "AleModel.h"
+#include "PHIO.h"
+#include "Constants.h"
+#include "Math_BasisFunction.h"
+#include "PHMatrix.h"
+#include "Geo_Grid.h"
+using namespace std;
+
+namespace PHSPACE
+{
+void lmsmcoef(int lmsmflag, int outnstep, RDouble *outerdt, RDouble &xi, RDouble &theta, RDouble &phi)
+{
+    //! This subroutine calculates the coefficients for the
+    //! Dual Time Stepping Method with a variable outer time step.
+
+    //! Note that it may be easily adapted to a three or more time
+    //! stepping method, ie Linear Multi Step Methods.
+    //! WARNING: these higher order schemes are not available but
+    //! they could be implemented with little effort, given examples show 
+    //! that.
+    //! PLEASE: verify relations linking xi theta and phi before
+    //! using such schemes.
+    
+    //! outerdt(1)= dt for the time step of the outer loop at n.
+    //! outerdt(2)= outer time-step at n-1.
+    //! outerdt(3)= outer time-step at n-2 (not used yet).
+    //! outnstep  = current time-step for the outer loop.
+    //! outtimesc = time stepping scheme for the outer loop.
+    
+    //! xi, theta, phi, coefficients for the dual time stepping.
+    
+    int order;
+
+    if (lmsmflag == LMSM_IMPEUL)
+    {
+        //! FIRST ORDER SCHEME.
+        //! Backward euler - A stable.
+        theta = one;
+        phi   = zero;
+        xi    = zero;
+        order = 1;
+    }
+    else if (lmsmflag == LMSM_IMPTRZ)
+    {
+        //! SECOND ORDER SCHEMES.
+        //! One-step trapezoidal - A stable.
+        theta = half;
+        phi   = zero;
+        order = 2;
+        ordcoef(order,xi,theta,phi,outerdt,2);
+    }
+    else if (lmsmflag == LMSM_IMPBD2)
+    {
+        //! Backward differentiation - A stable.
+        if (outnstep == 1)
+        {
+            theta = one;
+            phi   = zero;
+            xi    = zero;
+            order = 1;
+        }
+        else
+        {
+            theta = one;
+            phi   = zero;
+            order = 2;
+            ordcoef(order,xi,theta,phi,outerdt,2);
+        }
+    }
+    else if (lmsmflag == LMSM_IMPTHR)
+    {
+        //! THIRD ORDER SCHEMES / NOT YET IMPLEMENTED.
+        //! Third-order implicit.
+        if (outnstep == 1)
+        {
+            theta = one;
+            phi   = zero;
+            xi    = zero;
+            order = 1;
+        }
+        else if (outnstep == 2)
+        {
+            theta = one;
+            phi   = zero;
+            order = 2;
+            ordcoef(order,xi,theta,phi,outerdt,2);
+        }
+        else
+        {
+            phi   = zero;
+            order = 3;
+            ordcoef(order,xi,theta,phi,outerdt,3);
+        }
+    }
+    else if (lmsmflag == LMSM_IMPFOR)
+    {
+        //! FOURTH ORDER SCHEME / NOT YET IMPLEMENTED.
+        //! Milne's scheme.
+        if (outnstep == 1)
+        {
+            theta = one;
+            phi   = zero;
+            xi    = zero;
+        }
+        else if (outnstep == 2)
+        {
+            theta = one;
+            phi   = zero;
+            order = 2;
+            ordcoef(order,xi,theta,phi,outerdt,2);
+        }
+        else if (outnstep == 3)
+        {
+            phi   = zero;
+            order = 3;
+            ordcoef(order,xi,theta,phi,outerdt,3);
+        }
+        else
+        {
+            order = 4;
+            ordcoef(order,xi,theta,phi,outerdt,1);
+        }
+    }
+    else if (lmsmflag == LMSM_NODUAL)
+    {
+        //! No linear multi step method.
+        xi    = - one;
+        theta =   one;
+        phi   =   zero;
+    }
+}
+
+void ordcoef(int order, RDouble &xi, RDouble &theta, RDouble &phi, RDouble *outerdt, int iact)
+{
+    //! This routine returns the value of the missing coefficient to 
+    //! ensure the required precision of the time integration scheme.
+    RDouble a;
+    
+    a = outerdt[1] / (outerdt[0] + SMALL);
+
+    if (order == 2)
+    {
+        if (iact == 1)
+        {
+            //! xi,theta given.
+            phi   = (half + half * xi * (1 + a) - theta) / (a + SMALL);
+        }
+        else if (iact == 2)
+        {
+            //! theta,phi given.
+            xi    = (two * theta + two * a * phi - one) / (one + a);
+        }
+        else if (iact == 3)
+        {
+            //! phi,xi given.
+            theta = half + half * xi * (one + a) - a * phi;
+        }
+    }
+    else if (order == 3)
+    {
+        if (iact == 1)
+        {
+            //! xi given.
+            phi   = (one + (one + three * a + two * a * a) * xi) / 
+                    (six * a * (one + a) + SMALL);
+            theta = half + half * (one + a) * xi - a * phi;
+        }
+        else if (iact == 2)
+        {
+            //! theta given.
+            phi = ((one + three * a + two * a * a) * theta - a - a * a) / 
+                  (a * (two + three * a + a * a) + SMALL);
+            xi  = (two * theta + two * a * phi - one) / (one + a);
+        }
+        else if (iact == 3)
+        {
+            //! phi given.
+            xi    = (- one + six * a * (one + a) * phi) / 
+                    (one + three * a + two * a * a);
+            theta = half + half * (one + a) * xi - a * phi;
+        }
+    }
+    else if (order == 4)
+    {
+        if (iact == 1)
+        {
+            phi   = - half / (one + a + a * a);
+            xi    = two * (one + two * a) / (one + a);
+            theta = a * (two + three * a) * phi - a * (one + a) * xi;
+        }
+    }
+}
+
+void chckmovmt(int *ialepar, RDouble **angle0, RDouble **coord0, RDouble **angle, RDouble **coord,RDouble *outerdt, 
+               int lmsmflag, int outnstep)
+{
+    //! time      = current time for unsteady calculations.
+    //! outerdt   = dt for the time step of the outer loop.
+    //! outnstep  = current time-step for the outer loop.
+    //! outtimesc = time stepping scheme for the outer loop.
+    //! ialepar   = array of integer.
+    //! ralepar   = array of real.
+    //! u0,v0,w0  = free stream velocity components.
+
+    //! angle     = current Euler's angles at time n, n-1, n-2.
+    //! coord     = current position of the reference point at time n, n-1, n-2.
+
+    //! angle0    = current Euler's angles and their time derivatives.
+    //! coord0    = current position of the reference point and
+    //!             its time derivatives.
+
+    //! Global definitions.
+    int itrans = ialepar[0];
+    int irotat = ialepar[1];
+    int ipdfm  = ialepar[2];
+
+    RDouble dt     = outerdt[0];
+    RDouble dtold  = outerdt[1];
+    
+    //! Compute Euler's angles and the reference position
+    //! coordinates and their time derivatives.
+    //! These expressions are second order accurate only
+    //! for outnstep greater than 1.
+
+    RDouble xi,theta,phi;
+    RDouble fac1,fac2,fac3,fac4,fac5,fac6;
+    
+    lmsmcoef(lmsmflag,outnstep,outerdt,xi,theta,phi);
+
+    fac3 =        xi  / (dtold + SMALL);
+    fac1 = (one + xi) / (dt    + SMALL);
+    fac2 =    - (fac1 + fac3);
+    fac4 =        two / (dt * dtold + SMALL);
+    fac6 =         dt / (dt + dtold + SMALL);
+    fac5 =        one - fac6;
+    
+    if (outnstep == 1) fac4 = 0.0;
+
+    //! This is the case of a predefined movement.
+    if (ipdfm >= 1 && ipdfm <= 3)
+    {
+        return;
+    }
+    else if (ipdfm == 4)
+    {
+        return;
+    }
+    else if (ipdfm == 5)
+    {
+        return;
+    }
+    else if (ipdfm == 6)
+    {
+        return;
+    }
+    
+    //! Translation : a constant translation velocity is considered.
+    if (itrans == 1)
+    {
+        for (int m = 0; m < 3; ++ m)
+        {
+            coord0[m][0] = coord0[m][0] + coord0[m][1] * dt;
+            coord0[m][2] = 0.0;
+            coord [m][0] = coord0[m][0];
+        }
+    }
+    //! Translation : the reference point coordinates are prescribed.
+    else if (itrans == 2)
+    {
+        //deftrans(coord,time,outerdt,ialepar,ralepar);
+        for (int m = 0; m < 3; ++ m)
+        {
+            coord0[m][0] = coord[m][0];
+            coord0[m][1] = fac1 * coord[m][0] + fac2 * coord[m][1] + fac3 * coord[m][2];
+            coord0[m][2] = fac4 * (fac5 * coord[m][0] - coord[m][1] + fac6 * coord[m][2]);
+        }
+    }
+    //! Translation : the movement is enforced in another way.
+    else if (itrans == 3)
+    {
+        //! Not yet implemented!
+        cout << "this option is not yet implemented\n";
+        return;
+    }
+
+    //! Rotation : a constant angular velocity is considered.
+    if (irotat == 1)
+    {
+        for (int m = 0; m < 3; ++ m)
+        {
+            angle0[m][0] = angle0[m][0] + angle0[m][1] * dt;
+            angle0[m][2] = 0.0;
+            angle [m][0] = angle0[m][0];
+        }
+    }
+    //! Rotation : the values of Euler's angles are analytically prescribed.
+    else if (irotat == 2)
+    {
+        //defrotat(angle,time,outerdt,ialepar,ralepar);
+        for (int m = 0; m < 3; ++ m)
+        {
+            angle0[m][0] = angle[m][0];
+            angle0[m][1] = fac1 * angle[m][0] + fac2 * angle[m][1] + fac3 * angle[m][2];
+            angle0[m][2] = fac4 * (fac5 * angle[m][0] - angle[m][1] + fac6 * angle[m][2]);
+        }
+    }
+    //! Rotation : the movement is enforced in another way.
+    else if (irotat == 3)
+    {
+        //! Not yet implemented!
+        cout << "this option is not yet implemented\n";
+        return;
+    }
+}
+
+//void deftrans(RDouble **coord, RDouble time, RDouble *outerdt, int *ialepar, RDouble *ralepar)
+//{
+//    //! This routine enables to write the reference position coordinates
+//    //! (coord(.,1)) as a function of time or outerdt.
+//    
+//    //! coord(1,1) = ....
+//    //! coord(2,1) = ....
+//    //! coord(3,1) = ....
+//    return;
+//}
+
+void chckdeform()
+{
+    return;
+}
+
+RDouble * AleModel::euler_angle  = 0;
+RDouble **AleModel::trans_ref    = 0;
+RDouble **AleModel::xyz_ref      = 0;
+RDouble **AleModel::rotate_ref   = 0;
+RDouble **AleModel::angle_ref    = 0;
+RDouble **AleModel::matrix       = 0;
+AleParameter *AleModel::param = 0;
+
+class AleInitializingClass
+{
+public:
+    AleInitializingClass();
+    ~AleInitializingClass();
+};
+
+AleInitializingClass::AleInitializingClass()
+{
+    AleModel::Allocate();
+}
+
+AleInitializingClass::~AleInitializingClass()
+{
+    AleModel::Free();
+}
+
+AleInitializingClass ale_local_initialize;
+
+AleParameter::AleParameter()
+{
+    outerdt = new RDouble[3];
+}
+
+AleParameter::~AleParameter()
+{
+    delete [] outerdt;
+}
+
+void AleParameter::SetLMSMFlag()
+{
+    string outtimesc;
+    GlobalDataBase::GetData("outtimesc", &outtimesc, PHSTRING, 1);
+
+    if (outtimesc.substr(0,6) == "impeul")
+    {
+        lmsmflag = LMSM_IMPEUL;
+    }
+    else if (outtimesc.substr(0,6) == "imptrz")
+    {
+        lmsmflag = LMSM_IMPTRZ;
+    }
+    else if (outtimesc.substr(0,6) == "impbd2")
+    {
+        lmsmflag = LMSM_IMPBD2;
+    }
+    else if (outtimesc.substr(0,6) == "impthr")
+    {
+        lmsmflag = LMSM_IMPTHR;
+    }
+    else if (outtimesc.substr(0,6) == "impfor")
+    {
+        lmsmflag = LMSM_IMPFOR;
+    }
+    else if (outtimesc.substr(0,6) == "nodual")
+    {
+        lmsmflag = LMSM_NODUAL;
+    }
+    else
+    {
+        lmsmflag = LMSM_NODUAL;
+    }
+}
+
+void AleParameter::Init()
+{
+    //! At this time,we can not get the value of outnstep ,temporarily set to 0.
+
+    int outnstep = 0;
+    RDouble dtau = GlobalDataBase::GetDoubleParaFromDB("dtau");
+    RDouble timemax = GlobalDataBase::GetDoubleParaFromDB("timemax");
+    RDouble dtsave = GlobalDataBase::GetDoubleParaFromDB("dtsave");
+
+    RDouble simutime = zero;
+
+    this->outnstep = outnstep;
+    this->dtau     = dtau;
+    this->simutime = simutime;
+    this->dtsave   = dtsave;
+    this->timemax  = timemax;
+
+    this->outerdt[0] = zero;
+    this->outerdt[1] = zero;
+    this->outerdt[2] = zero;
+
+    SetLMSMFlag();
+}
+
+void AleModel::Allocate()
+{
+    trans_ref  = CreateMatrix();
+    xyz_ref    = CreateMatrix();
+    rotate_ref = CreateMatrix();
+    angle_ref  = CreateMatrix();
+    matrix     = CreateMatrix();
+    param      = new AleParameter();
+}
+
+void AleModel::Free()
+{
+    DestroyMatrix(trans_ref);
+    DestroyMatrix(xyz_ref  );
+    DestroyMatrix(rotate_ref);
+    DestroyMatrix(angle_ref);
+    DestroyMatrix(matrix   );
+    delete param;
+}
+
+void AleModel::SetMatrix(RDouble ** matrix_x, RDouble ** matrix_y)
+{
+    for (int i = 0; i < 3; ++ i)
+    {
+        for (int j = 0; j < 3; ++ j)
+        {
+            matrix_x[i][j] = matrix_y[i][j];
+        }
+    }
+}
+
+void AleModel::TransposeMatrix(RDouble ** matrix)
+{
+    for (int i = 0; i < 3; ++ i)
+    {
+        for (int j = 0; j < i; ++ j)
+        {
+            SWAP(matrix[i][j],matrix[j][i]);
+        }
+    }
+}
+
+void AleModel::ComputeRelativeRotateMatrix(RDouble ** matrix_now, RDouble ** matrix_old)
+{
+    //! Create matrix_now and matrix_old.
+    RDouble ** matrix_t = CreateMatrix();
+
+    SetMatrix(matrix_t, matrix_old);
+
+    TransposeMatrix(matrix_old);
+    MatrixMultiply(matrix_now, matrix_t, matrix);
+
+    DestroyMatrix(matrix_t);
+}
+
+void AleModel::ComputeRelativeRotateMatrix()
+{
+    //! Create matrix_now and matrix_old.
+    RDouble ** matrix_now = CreateMatrix();
+    RDouble ** matrix_old = CreateMatrix();
+
+    MatrixRotate(angle_ref[0], matrix_now);
+    MatrixRotate(angle_ref[1], matrix_old);
+
+    ComputeRelativeRotateMatrix(matrix_now, matrix_old);
+
+    //! Free matrix_now and matrix_old.
+    DestroyMatrix(matrix_now);
+    DestroyMatrix(matrix_old);
+}
+
+void AleModel::RotateTranslation()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    ComputeRelativeRotateMatrix();
+    int level = 0;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Grid *grid = GetGrid(iZone, level);
+        if (!grid) continue;
+        RotateTranslation(grid);
+    }
+}
+
+void AleModel::RotateTranslation(Grid *grid)
+{
+    int nTotalNode = grid->GetNTotalNode();
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    RDouble xref_new = xyz_ref[0][0];
+    RDouble yref_new = xyz_ref[0][1];
+    RDouble zref_new = xyz_ref[0][2];
+
+    RDouble xref_old = xyz_ref[1][0];
+    RDouble yref_old = xyz_ref[1][1];
+    RDouble zref_old = xyz_ref[1][2];
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        RDouble dx = x[iNode] - xref_old;
+        RDouble dy = y[iNode] - yref_old;
+        RDouble dz = z[iNode] - zref_old;
+        
+        x[iNode] = matrix[0][0] * dx + matrix[0][1] * dy + matrix[0][2] * dz + xref_new;
+        y[iNode] = matrix[1][0] * dx + matrix[1][1] * dy + matrix[1][2] * dz + yref_new;
+        z[iNode] = matrix[2][0] * dx + matrix[2][1] * dy + matrix[2][2] * dz + zref_new;
+    }
+}
+
+void AleModel::EulerAngle()
+{
+    MatrixRotate(euler_angle, matrix);
+}
+
+void AleModel::MatrixMultiply(RDouble **x, RDouble **y, RDouble **z)
+{
+    for (int i = 0; i < 3; ++ i)
+    {
+        for (int j = 0; j < 3; ++ j)
+        {
+            z[i][j] = zero;
+            for (int k = 0; k < 3; ++ k)
+            {
+                z[i][j] += x[i][k] * y[k][j];
+            }
+        }
+    }
+}
+
+void AleModel::MatrixRotate(RDouble *angle, RDouble **matrix)
+{
+    //! Create matrix1��matrix2��matrix3��matrix4.
+    RDouble ** matrix1 = CreateMatrix();
+    RDouble ** matrix2 = CreateMatrix();
+    RDouble ** matrix3 = CreateMatrix();
+    RDouble ** matrix4 = CreateMatrix();
+
+    //! y-z-x.
+    MatrixRotateY(angle[0], matrix1);
+    MatrixRotateZ(angle[1], matrix2);
+    MatrixRotateX(angle[2], matrix3);
+
+    MatrixMultiply(matrix2, matrix1, matrix4);
+    MatrixMultiply(matrix3, matrix4, matrix);
+
+    //! Free matrix1��matrix2��matrix3��matrix4.
+    DestroyMatrix(matrix1);
+    DestroyMatrix(matrix2);
+    DestroyMatrix(matrix3);
+    DestroyMatrix(matrix4);
+}
+
+void AleModel::MatrixRotateX(RDouble angle, RDouble **matrix)
+{
+    RDouble cosa = cos(angle);
+    RDouble sina = sin(angle);
+
+    matrix[0][0] = one ; matrix[0][1] = zero; matrix[0][2] =   zero;
+    matrix[1][0] = zero; matrix[1][1] = cosa; matrix[1][2] = - sina;
+    matrix[2][0] = zero; matrix[2][1] = sina; matrix[2][2] =   cosa;
+}
+
+void AleModel::MatrixRotateY(RDouble angle, RDouble **matrix)
+{
+    RDouble cosa = cos(angle);
+    RDouble sina = sin(angle);
+
+    matrix[0][0] =   cosa; matrix[0][1] = zero; matrix[0][2] =  sina;
+    matrix[1][0] =   zero; matrix[1][1] = one ; matrix[1][2] =  zero;
+    matrix[2][0] = - sina; matrix[2][1] = zero; matrix[2][2] =  cosa;
+}
+
+void AleModel::MatrixRotateZ(RDouble angle, RDouble **matrix)
+{
+    RDouble cosa = cos(angle);
+    RDouble sina = sin(angle);
+
+    matrix[0][0] = cosa; matrix[0][1] = - sina; matrix[0][2] = zero;
+    matrix[1][0] = sina; matrix[1][1] =   cosa; matrix[1][2] = zero;
+    matrix[2][0] = zero; matrix[2][1] =   zero; matrix[2][2] = one ;
+}
+
+RDouble ** AleModel::CreateMatrix()
+{
+    return NewPointer2<RDouble>(3, 3);
+}
+
+void AleModel::DestroyMatrix(RDouble **matrix)
+{
+    DelPointer2(matrix);
+}
+
+RDouble * AleModel::CreateVector()
+{
+    return new RDouble[3];
+}
+
+void AleModel::DestroyVector(RDouble *v)
+{
+    delete [] v;
+}
+
+void AleModel::CrossMultiply(RDouble *a, RDouble *b, RDouble *c)
+{
+    c[0] = a[1] * b[2] - a[2] * b[1];
+    c[1] = a[2] * b[0] - a[0] * b[2];
+    c[2] = a[0] * b[1] - a[1] * b[0];
+}
+
+void AleModel::UpdateGridInfo()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    int level = 0;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Grid *grid = GetGrid(iZone, level);
+        if (!grid) continue;
+        grid->ComputeMinMaxBox();
+        grid->ComputeMetrics();
+    }
+}
+
+void AleModel::DynamicGrid()
+{
+    BackUpOldGrid();
+    GenerateDynamicGrid();
+    ComputeGridVelocity();
+    UpdateGridInfo();
+}
+
+void AleModel::GenerateDynamicGrid()
+{
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+
+    if (isAle)
+    {
+        //! Rigid body movement.
+        CheckMovement();
+        RotateTranslation();
+    }
+    else
+    {
+        //! Arbitrary movement.
+        ReadDynamicGrid();
+    }
+}
+
+void AleModel::GetGridFileName(string &filename)
+{
+    filename = "movegrid.fts";
+}
+
+void AleModel::BackUpOldGrid()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    int level = 0;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Grid *grid = GetGrid(iZone, level);
+        if (!grid) continue;
+        grid->BackUpOldGrid();
+    }
+}
+
+void AleModel::ComputeGridVelocity()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    int level = 0;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Grid *grid = GetGrid(iZone, level);
+        if (!grid) continue;
+
+        int nTotalNode = grid->GetNTotalNode();
+        RDouble *xt = new RDouble[nTotalNode];
+        RDouble *yt = new RDouble[nTotalNode];
+        RDouble *zt = new RDouble[nTotalNode];
+
+        GridVerticeVelocity(grid, xt, yt, zt);
+        GridSurfaceVelocity(grid, xt, yt, zt);
+
+        delete [] xt;
+        delete [] yt;
+        delete [] zt;
+    }
+}
+
+void AleModel::ReadDynamicGrid()
+{
+    fstream file;
+    ios_base::openmode openmode = ios_base::in|ios_base::binary;
+
+    string filename;
+
+    GetGridFileName(filename);
+
+    ParallelOpenFile(file, filename, openmode);
+
+    ReadDynamicGrid(file);
+
+    ParallelCloseFile(file);
+}
+
+void AleModel::ReadDynamicGrid(fstream &file)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ReadGridCoordinate(file, iZone);
+    }
+}
+
+void AleModel::ReadGridCoordinate(fstream &file, int iZone)
+{
+    using namespace PHMPI;
+
+    int send_proc = 0;
+    int recv_proc = 0;
+
+    GetSendRecvProc(iZone, send_proc, recv_proc);
+
+    int myid = GetCurrentProcessorID();
+
+    //! If the process neither sends nor receives, it will return.
+    if (myid != send_proc && myid != recv_proc) return;
+
+    DataContainer *cdata = new DataContainer();
+
+    //! Read grid file ,and send to the corresponding process.
+    ReadAbstractData(file, cdata, send_proc, recv_proc);
+
+    if (myid == recv_proc)
+    {
+        Grid *grid = GetGrid(iZone, 0);
+        grid->UpdateCoordinate(cdata);
+    }
+
+    delete cdata;
+}
+
+void AleModel::GridSurfaceVelocity(Grid *grid, RDouble *xt, RDouble *yt, RDouble *zt)
+{
+    grid->GridSurfaceVelocity(xt, yt, zt);
+}
+
+void AleModel::GridVerticeVelocity(Grid *grid, RDouble *xt, RDouble *yt, RDouble *zt)
+{
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+
+    if (isAle)
+    {
+        //! Rigid body movement.
+        GridVerticeVelocityRigid(grid, xt, yt, zt);
+    }
+    else
+    {
+        //! Arbitrary movement.
+        GridVerticeVelocityGeneral(grid, xt, yt, zt);
+    }
+}
+
+void AleModel::GridVerticeVelocityGeneral(Grid *grid, RDouble *xt, RDouble *yt, RDouble *zt)
+{
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    SimpleGrid * oldGrid = grid->GetOldGrid();
+
+    RDouble *xold = oldGrid->GetX();
+    RDouble *yold = oldGrid->GetY();
+    RDouble *zold = oldGrid->GetZ();
+
+    int nTotalNode = grid->GetNTotalNode();
+
+    RDouble dtau;
+    GlobalDataBase::GetData("dtau", &dtau, PHDOUBLE, 1);
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        xt[iNode] = (x[iNode] - xold[iNode]) / dtau;
+        yt[iNode] = (y[iNode] - yold[iNode]) / dtau;
+        zt[iNode] = (z[iNode] - zold[iNode]) / dtau;
+    }
+}
+
+void AleModel::GridVerticeVelocityRigid(Grid *grid, RDouble *xt, RDouble *yt, RDouble *zt)
+{
+    //! This subroutine calculates the grid velocity at the cell vertices.
+    int nTotalNode = grid->GetNTotalNode();
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    //! Compute the components of the rotation vector.
+    //! Omega (psip,thetap,phip) in the frame (k0,jh,i) where
+    //! k0 = -sin theta * i + cos theta sin phi * j + cos theta cos phi * k
+    //! jh = cos phi * j - sin phi * k
+    //! Omega(p,q,r) in the frame (i,j,k) angle0(1,.) = (psi,theta,phi)
+    //! psi is not set since it is not needed.
+
+    RDouble xref_old = xyz_ref[1][0];
+    RDouble yref_old = xyz_ref[1][1];
+    RDouble zref_old = xyz_ref[1][2];
+
+    RDouble *dr    = CreateVector();
+    RDouble *omega = CreateVector();
+    RDouble *vel   = CreateVector();
+
+    //! Calculate the grid velocity with the formula dOM =dOP+Omega*PM.
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        RDouble dx = x[iNode] - xref_old;
+        RDouble dy = y[iNode] - yref_old;
+        RDouble dz = z[iNode] - zref_old;
+
+        dr[0] = dx;
+        dr[1] = dy;
+        dr[2] = dz;
+
+        CrossMultiply(omega, dr, vel);
+
+        //xt[iNode] = trans_ref[1][0] + vel[0];
+        //yt[iNode] = trans_ref[1][1] + vel[1];
+        //zt[iNode] = trans_ref[1][2] + vel[2];
+        xt[iNode] = zero;
+        yt[iNode] = zero;
+        zt[iNode] = zero;
+    }
+
+    DestroyVector(dr  );
+    DestroyVector(omega);
+    DestroyVector(vel );
+}
+
+void AleModel::CheckMovement()
+{
+    //! time      = current time for unsteady calculations.
+    //! outerdt   = dt for the time step of the outer loop.
+    //! outnstep  = current time-step for the outer loop.
+    //! outtimesc = time stepping scheme for the outer loop.
+    //! ialepar   = array of integer.
+    //! ralepar   = array of real.
+
+    //! angle     = current Euler's angles at time n, n-1, n-2.
+    //! coord     = current position of the reference point at time n, n-1, n-2.
+
+    //! angle0    = current Euler's angles and their time derivatives.
+    //! coord0    = current position of the reference point and
+    //!             its time derivatives.
+
+    //! Global definitions.
+    int itrans = 1;
+    int irotat = 0;
+
+    //! Compute Euler's angles and the reference position
+    //! coordinates and their time derivatives.
+    //! These expressions are second order accurate only
+    //! for outnstep greater than 1.
+
+    RDouble dt = param->dtau;
+    
+    if (itrans == 1)
+    {
+        //! Translation : a constant translation velocity is considered.
+        for (int m = 0; m < 3; ++ m)
+        {
+            trans_ref[0][m] += trans_ref[1][m] * dt;
+            trans_ref[2][m]  = zero;
+        }
+
+        for (int m = 0; m < 3; ++ m)
+        {
+            xyz_ref[2][m] = xyz_ref[1][m];
+            xyz_ref[1][m] = xyz_ref[0][m];
+            xyz_ref[0][m] = trans_ref[0][m];
+        }
+    }
+    else if (itrans == 2)
+    {
+        //! Translation : the reference point coordinates are prescribed.
+    }
+    else if (itrans == 3)
+    {
+        //! Translation : the movement is enforced in another way.
+        //! Not yet implemented!
+        cout << "this option is not yet implemented\n";
+        return;
+    }
+
+    //! Rotation : a constant angular velocity is considered.
+    if (irotat == 1)
+    {
+        for (int m = 0; m < 3; ++ m)
+        {
+            rotate_ref[0][m] = rotate_ref[0][m] + rotate_ref[1][m] * dt;
+            rotate_ref[2][m] = 0.0;
+        }
+
+        for (int m = 0; m < 3; ++ m)
+        {
+            angle_ref[2][m] = angle_ref[1][m];
+            angle_ref[1][m] = angle_ref[0][m];
+            angle_ref[0][m] = rotate_ref[0][m];
+        }
+    }
+    //! Rotation : the values of Euler's angles are analytically prescribed.
+    else if (irotat == 2)
+    {
+    }
+    //! Rotation : the movement is enforced in another way.
+    else if (irotat == 3)
+    {
+        //! Not yet implemented!
+        cout << "this option is not yet implemented\n";
+        return;
+    }
+}
+
+void AleModel::Deform()
+{
+}
+
+void AleModel::Init()
+{
+    param->Init();
+
+    //! Return judgment isn't necessary here.
+    for (int i = 0; i < 3; ++ i)
+    {
+        for (int j = 0; j < 3; ++ j)
+        {
+            xyz_ref   [i][j] = 0.0;
+            trans_ref [i][j] = 0.0;
+            angle_ref [i][j] = 0.0;
+            rotate_ref[i][j] = 0.0;
+        }
+    }
+
+    for (int i = 0; i < 3; ++ i)
+    {
+        for (int j = 0; j < 3; ++ j)
+        {
+            xyz_ref   [i][j] = 0.0;
+            trans_ref [i][j] = 0.0;
+            angle_ref [i][j] = 0.0;
+            rotate_ref[i][j] = 0.0;
+        }
+    }
+
+    trans_ref[1][0] = - 1.0;
+    trans_ref[1][1] =   0.0;
+    trans_ref[1][2] =   0.0;
+}
+
+void AleModel::MoveGrid()
+{
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+
+    int ialetype = 0;
+    GlobalDataBase::GetData("ialetype", &ialetype, PHINT, 1);
+
+    if (!isUnsteady || !isAle) return;
+
+    if (ialetype == 2)
+    {
+        int ipdfm = 0;
+        //ipdfm  = ialepar(3);
+        if (ipdfm == 5)
+        {
+            //simu_compute_force;
+        }
+    }
+
+    //! codeOfAleModel = 0: no ALE method;
+    //!                  1: ALE method for non-moving grids (relative frame);
+    //!                  2: ALE method for moving grids (absolute frame);
+    //!                  3: ALE method for deforming grids.
+    
+    //! coord     = current position of the reference point at time n, n-1, n-2.
+    //! angle     = current Euler's angles at time n, n-1, n-2.
+
+    
+    //! psi, theta and phi angles.
+    //! angle0(1,1),angle0(2,1),angle0(3,1)
+    //! phi, theta and psi velocity.
+    //! angle0(1,2),angle0(2,2),angle0(3,2)
+    //! phi, theta and psi acceleration.
+    //! angle0(1,3),angle0(2,3),angle0(3,3)
+    
+    //! x,y,z position.
+    //! coord0(1,1),coord0(2,1),coord0(3,1)
+    //! x,y,z velocity.
+    //! coord0(1,2),coord0(2,2),coord0(3,2)
+    //! x,y,z accelerations.
+    //! coord0(1,3),coord0(2,3),coord0(3,3)
+
+
+    int lmsmflag = 1;
+    GlobalDataBase::GetData("lmsmflag", &lmsmflag, PHINT, 1);
+
+    int outnstep = 1;
+    GlobalDataBase::GetData("outnstep", &outnstep, PHINT, 1);
+
+    int    * ialepar = reinterpret_cast< int    *  > (GlobalDataBase::GetDataPtr("ialepar"));
+    RDouble * outerdt = reinterpret_cast< RDouble *  > (GlobalDataBase::GetDataPtr("outerdt"));
+    RDouble **angle0  = reinterpret_cast< RDouble ** > (GlobalDataBase::GetDataPtr("angle0"));
+    RDouble **coord0  = reinterpret_cast< RDouble ** > (GlobalDataBase::GetDataPtr("coord0"));
+    RDouble **angle   = reinterpret_cast< RDouble ** > (GlobalDataBase::GetDataPtr("angle"));
+    RDouble **coord   = reinterpret_cast< RDouble ** > (GlobalDataBase::GetDataPtr("coord"));
+
+    if (ialetype == 2)
+    {
+        //! Check how the movement is enforced.
+        chckmovmt(ialepar,angle0,coord0,angle,coord,
+            outerdt,lmsmflag,outnstep);
+    }
+    else if (ialetype >= 3)
+    {
+        //! Check how the deformation is enforced.
+        //! WARNING: chckdeform does nothing!
+        chckdeform();
+    }
+
+    RDouble *dangle = new RDouble[3];
+    RDouble *tcoord = new RDouble[3];
+
+    //! Update position parameters by specifying their temporal increment.
+    for (int m = 0; m < 3; ++ m)
+    {
+        dangle[m] = angle[m][0] - angle[m][1];
+        tcoord[m] = coord[m][0] - coord[m][1];
+    }
+
+    delete [] dangle;
+    delete [] tcoord;
+
+    //! Update Euler's angles and the reference point position.
+    for (int m = 0; m < 3; ++ m)
+    {
+        angle[m][2] = angle[m][1];
+        angle[m][1] = angle[m][0];
+        
+        coord[m][2] = coord[m][1];
+        coord[m][1] = coord[m][0];
+    }
+}
+
+void AleModel::LinearMultiStepMethodsCoeffcient(AleParameter *param)
+{
+    //! This subroutine calculates the coefficients for the
+    //! Dual Time Stepping Method with a variable outer time step.
+
+    //! Note that it may be easily adapted to a three or more time
+    //! stepping method, ie Linear Multi Step Methods.
+    //! WARNING : these higher order schemes are not available but
+    //! they could be implemented with little effort, given examples show 
+    //! that.
+    //! PLEASE : verify relations linking xi theta and phi before
+    //! using such schemes.
+    
+    //! outerdt(1) = dt for the time step of the outer loop at n.
+    //! outerdt(2) = outer time-step at n-1.
+    //! outerdt(3) = outer time-step at n-2 (not used yet).
+    //! outnstep   = current time-step for the outer loop.
+    //! outtimesc  = time stepping scheme for the outer loop.
+    
+    //! xi, theta, phi, coefficients for the dual time stepping.
+    
+    if (param->lmsmflag == LMSM_IMPEUL)
+    {
+        //! FIRST ORDER SCHEME.
+        //! Backward euler - A stable.
+        param->theta = one;
+        param->phi   = zero;
+        param->xi    = zero;
+        param->order = 1;
+    }
+    else if (param->lmsmflag == LMSM_IMPTRZ)
+    {
+        //! SECOND ORDER SCHEMES.
+        //! One-step trapezoidal - A stable.
+        param->theta = half;
+        param->phi   = zero;
+        param->xi    = zero;
+        param->order = 2;
+    }
+    else if (param->lmsmflag == LMSM_IMPBD2)
+    {
+        //! Backward differentiation - A stable.
+        if (param->outnstep == 1)
+        {
+            param->theta = one;
+            param->phi   = zero;
+            param->xi    = zero;
+            param->order = 1;
+        }
+        else
+        {
+            param->theta = one;
+            param->phi   = zero;
+            param->xi    = half;
+            param->order = 2;
+        }
+    }
+    else if (param->lmsmflag == LMSM_NODUAL)
+    {
+        //! No linear multi step method.
+        param->theta =   one;
+        param->phi   =   zero;
+        param->xi    = - one;
+    }
+}
+
+void AleModel::GetOuterdt(AleParameter *param)
+{
+    //! This subroutine computes the size of the real time step for the
+    //! uter loop, outerdt, when using dual time stepping. It is also
+    //! updating the new time level, time.
+
+    // Extract Dual Time Stepping coefficients.
+    LinearMultiStepMethodsCoeffcient(param);
+
+    //! Use constant outer time step.
+    param->outerdt[0] = param->dtau;
+    
+    //! Update the "physical" time.
+    param->simutime += param->outerdt[0];
+
+    param->outerdt[2] = param->outerdt[1];
+    param->outerdt[1] = param->outerdt[0];
+
+}
+
+void AleModel::UnsteadyPreSolve()
+{
+    //! Pre-work for unsteady.
+    int innstep = 0;
+    GlobalDataBase::UpdateData("innstep", &innstep, PHINT, 1);
+
+    RDouble physicalTime = 0;
+    GlobalDataBase::GetData("physicalTime", &physicalTime, PHDOUBLE, 1);
+
+    RDouble physicalTimeStep = 0;
+    GlobalDataBase::GetData("physicalTimeStep", &physicalTimeStep, PHDOUBLE, 1);
+
+    physicalTime += physicalTimeStep;
+    GlobalDataBase::UpdateData("physicalTime", &physicalTime, PHDOUBLE, 1);
+
+    //! Pre-work for ALE.
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+
+    if (!isAle) return;
+
+    DynamicGrid();
+}
+
+void AleModel::GetOuterSrc()
+{
+    GetOuterdt(param);
+}
+
+}
+
diff --git a/API/Physics/src/DeformingSolverManager.cpp b/API/Physics/src/DeformingSolverManager.cpp
new file mode 100644
index 0000000..0b6bfd9
--- /dev/null
+++ b/API/Physics/src/DeformingSolverManager.cpp
@@ -0,0 +1,119 @@
+#include "PHMpi.h"
+#include "PHIO.h"
+#include "Constants.h"
+#include "AleManager.h"
+#include "Force.h"
+#include "Data_Field.h"
+#include "Math_BasisFunction.h"
+#include "Zone.h"
+#include "SixDofManager.h"
+#include "DeformingSolverManager.h"
+
+#include <iomanip>
+#include <iostream>
+
+namespace PHSPACE
+{
+
+DeformingParameter::DeformingParameter()
+{
+    numberOfParameters = 0;
+    //parameters = 0; 
+}
+
+DeformingParameter::~DeformingParameter()
+{
+    //delete [] parameters;
+}
+
+DeformingParameter & DeformingParameter::operator = (const DeformingParameter & rhs)
+{
+    if (this == & rhs) return * this;
+
+    numberOfParameters = rhs.numberOfParameters;
+    parameters = rhs.parameters;
+
+    return * this;
+}
+
+bool DeformingParameter::operator == (const DeformingParameter & rhs)
+{
+    if (this == & rhs) return true;
+
+    if (numberOfParameters != rhs.numberOfParameters)
+    {
+        return false;
+    }
+
+    const RDouble eps = 1.0e-7;
+    for (int iParameter = 0; iParameter < numberOfParameters; ++ iParameter)
+    {
+        if (PHSPACE::ABS(parameters[ iParameter ] - rhs.parameters[ iParameter ]) > eps)
+        {
+            return false;
+        }
+    }
+    return true;
+}
+
+void DeformingParameter::SetParameters(PHVectorRDouble1D& parameterVector)
+{
+    //delete [] parameters;
+
+    numberOfParameters = static_cast<int>(parameterVector.size());
+    parameters.resize(numberOfParameters);
+
+    for (int iParameter = 0; iParameter < numberOfParameters; ++ iParameter)
+    {
+        parameters[ iParameter ] = parameterVector[ iParameter ];
+    }
+}
+
+DeformingParameter * GetDeformingParameter()
+{
+    DeformingParameter * tmp = new DeformingParameter;
+
+    return tmp;
+}
+
+DeformingSolverManager::DeformingSolverManager()
+{
+
+}
+
+DeformingSolverManager::~DeformingSolverManager()
+{
+
+}
+
+void DeformingSolverManager::Initialize()
+{
+
+}
+
+void DeformingSolverManager::Restart()
+{
+
+}
+
+void DeformingSolverManager::DumpRestart()
+{
+
+}
+
+void DeformingSolverManager::Run()
+{
+
+}
+
+void DeformingSolverManager::Post()
+{
+
+}
+
+void DeformingSolverManager::Dump()
+{
+
+}
+
+}
\ No newline at end of file
diff --git a/API/Physics/src/Flux_Inviscid.cpp b/API/Physics/src/Flux_Inviscid.cpp
new file mode 100644
index 0000000..641171f
--- /dev/null
+++ b/API/Physics/src/Flux_Inviscid.cpp
@@ -0,0 +1,14534 @@
+#include "Flux_Inviscid.h"
+#include "Constants.h"
+#include "TK_Exit.h"
+#include "Flux_RoeEntropyCorrection.h"
+#include "PHMatrix.h"
+#include "Glb_Dimension.h" 
+using namespace std;
+
+#include "Gas.h"
+
+namespace PHSPACE
+{
+using namespace GAS_SPACE;
+
+int GetSchemeID(const string &scheme_name)
+{
+    int scheme_id = ISCHEME_ROE;
+    if (scheme_name.substr(0,3) == "roe")
+    {
+        scheme_id = ISCHEME_ROE;
+    }
+    else if (scheme_name.substr(0,7) == "ausmpw+")
+    {
+        scheme_id = ISCHEME_AUSMPW_PLUS;
+    }
+    else if (scheme_name.substr(0,6) == "ausmpw")
+    {
+        scheme_id = ISCHEME_AUSMPW;
+    }
+    else if (scheme_name.substr(0,6) == "ausm+w")
+    {
+        scheme_id = ISCHEME_AUSM_W;
+    }
+    else if (scheme_name.substr(0,7) == "ausm+up")
+    {
+        scheme_id = ISCHEME_AUSMPUP;
+    }
+    else if (scheme_name.substr(0,5) == "ausm+")
+    {    
+        scheme_id = ISCHEME_AUSMP;
+    }
+    else if (scheme_name.substr(0,6) == "ausmdv")
+    {
+        scheme_id = ISCHEME_AUSMDV;
+    }
+    else if (scheme_name.substr(0,14) == "vanleer_Rotate")
+    {
+        scheme_id = ISCHEME_Rotate;
+    }
+    else if (scheme_name.substr(0,7) == "vanleer")
+    {
+        scheme_id = ISCHEME_VANLEER;
+    }
+    else if (scheme_name.substr(0,6) == "steger")
+    {
+        scheme_id = ISCHEME_STEGER;
+    }
+    else if (scheme_name.substr(0,4) == "hlle")
+    {
+        scheme_id = ISCHEME_HLLE;
+    }
+    else if (scheme_name.substr(0,5) == "lax_f")
+    {
+        scheme_id = ISCHEME_LAX_FRIEDRICHS;
+    }
+    //! GMRES
+    else if (scheme_name.substr(0,8) == "GMRESRoe")
+    {
+        scheme_id = ISCHEME_GMRES_ROE;
+    }
+    else if (scheme_name.substr(0,11) == "GMRESSteger")  // GMRES3D
+    {
+        scheme_id = ISCHEME_GMRES_Steger;
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("Error: this inv-scheme is not exist !\n", true);
+    }
+    //*/
+    
+    return scheme_id;
+}
+
+INVScheme GetINVScheme(int scheme_id)
+{
+    INVScheme inv_scheme = NULL;
+    switch (scheme_id)
+    {
+    case ISCHEME_ROE:
+        inv_scheme = Roe_Scheme_ConservativeForm;
+        break;
+    case ISCHEME_AUSMDV:
+        inv_scheme = Ausmdv_Scheme;
+        break;
+    case ISCHEME_AUSMPW:
+        inv_scheme = Ausmpw_Scheme;
+        break;
+    case ISCHEME_AUSMPW_PLUS:
+        inv_scheme = AusmpwPlus_Scheme;
+        break;
+    case ISCHEME_VANLEER:
+        inv_scheme = Vanleer_Scheme;
+        break;
+    case ISCHEME_Rotate:
+        inv_scheme = Rotate_Vanleer_Scheme;
+        break;
+    case ISCHEME_STEGER:
+        inv_scheme = Steger_Scheme;
+        break;
+    case ISCHEME_HLLE:
+        inv_scheme = Hlle_Scheme;
+        break;
+    #ifdef USE_GMRESSOLVER
+    case ISCHEME_GMRES_ROE:    //! GMRES
+        inv_scheme = GMRES_INVScheme;    //! GMRES3D
+        break;
+    case ISCHEME_GMRES_Steger:    //! GMRES3D
+        inv_scheme = GMRES_INVScheme;
+        break;
+    #endif
+    default:
+        TK_Exit::ExceptionExit("this scheme doesn't exist\n");
+        break;
+    }
+
+    return inv_scheme;
+}
+
+void Roe_Scheme_ConservativeForm(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara)
+{
+    const RDouble LITTLE = 1.0E-10;
+    int nTemperatureModel = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar = invSchemePara->GetNumberOfLaminar();
+    int nLength = invSchemePara->GetLength();
+    int nm = invSchemePara->Getnm();
+    int RoeEntropyFixMethod = invSchemePara->GetEntropyFixMethod();
+    int nChemical = invSchemePara->GetNumberOfChemical();
+    int nPrecondition = invSchemePara->GetIfPrecondition();
+    int nIdealState = invSchemePara->GetIfIdealState();
+
+    RDouble entrFixCoefLeft = invSchemePara->GetLeftEntropyFixCoefficient();
+    RDouble entrFixCoefRight = invSchemePara->GetRightEntropyFixCoefficient();
+    RDouble **qL = invSchemePara->GetLeftQ();
+    RDouble **qR = invSchemePara->GetRightQ();
+    RDouble *gamaL = invSchemePara->GetLeftGama();
+    RDouble *gamaR = invSchemePara->GetRightGama();
+    RDouble *pressureCoeffL = face_proxy->GetPressureCoefficientL();
+    RDouble *pressureCoeffR = face_proxy->GetPressureCoefficientR();
+    RDouble *xfn   = invSchemePara->GetFaceNormalX();
+    RDouble *yfn   = invSchemePara->GetFaceNormalY();
+    RDouble *zfn   = invSchemePara->GetFaceNormalZ();
+    RDouble *vgn   = invSchemePara->GetFaceVelocity();
+    RDouble **flux = invSchemePara->GetFlux();
+    RDouble **tl = invSchemePara->GetLeftTemperature();
+    RDouble **tr = invSchemePara->GetRightTemperature();
+    
+    RDouble *timeCoeffL =NULL;
+    RDouble *timeCoeffR =NULL;
+    RDouble *preconCoeffL =NULL;
+    RDouble *preconCoeffR =NULL;
+    if (nPrecondition == 1)
+    {
+        timeCoeffL = face_proxy->GetTimeCoefficientL();
+        timeCoeffR = face_proxy->GetTimeCoefficientR();
+        preconCoeffL = face_proxy->GetPreconCoefficientL();
+        preconCoeffR = face_proxy->GetPreconCoefficientR();
+    }
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble *prim       = new RDouble[nEquation]();
+    RDouble *qConserveL = new RDouble[nEquation]();
+    RDouble *qConserveR = new RDouble[nEquation]();
+    RDouble *dq         = new RDouble[nEquation]();
+
+    RDouble *primL = new RDouble[nEquation]();
+    RDouble *primR = new RDouble[nEquation]();
+    RDouble temperaturesL[3] = {0}, temperaturesR[3] = {0};
+
+    for (int iFace = 0; iFace < nLength; ++ iFace)
+    {
+        for (int iEqn = 0; iEqn < nEquation; ++ iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+        }
+
+        RDouble &rL = primL[IR];
+        RDouble &uL = primL[IU];
+        RDouble &vL = primL[IV];
+        RDouble &wL = primL[IW];
+        RDouble &pL = primL[IP];
+
+        RDouble &rR = primR[IR];
+        RDouble &uR = primR[IU];
+        RDouble &vR = primR[IV];
+        RDouble &wR = primR[IW];
+        RDouble &pR = primR[IP];
+
+        RDouble xsn = xfn[iFace];
+        RDouble ysn = yfn[iFace];
+        RDouble zsn = zfn[iFace];
+        RDouble vb  = vgn[iFace];
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        rL = MAX(rL, LITTLE);
+        rR = MAX(rR, LITTLE);
+        pL = MAX(pL, LITTLE);
+        pR = MAX(pR, LITTLE);
+
+        RDouble vSquareL = uL * uL + vL * vL + wL * wL;
+        RDouble vSquareR = uR * uR + vR * vR + wR * wR;
+
+        RDouble hint_L = (gmL / (gmL - one)) * (pL / rL);
+        RDouble hint_R = (gmR / (gmR - one)) * (pR / rR);
+        RDouble peL = 0.0, peR = 0.0;
+
+        if (nChemical != 0 && nIdealState == 0)
+        {
+            for (int i = 0; i < 3; ++ i)
+            {
+                temperaturesL[i] = tl[i][iFace];
+                temperaturesR[i] = tr[i][iFace];
+            }
+            gas->ComputeEnthalpyByPrimitive(primL, gmL, hint_L, temperaturesL);
+            gas->ComputeEnthalpyByPrimitive(primR, gmR, hint_R, temperaturesR);
+
+            if (nTemperatureModel > 1)
+            {
+                peL = gas->GetElectronPressure(primL, temperaturesL[ITE]);
+                peR = gas->GetElectronPressure(primR, temperaturesR[ITE]);
+            }
+        }
+        RDouble hL = hint_L + half * vSquareL;
+        RDouble hR = hint_R + half * vSquareR;
+
+        RDouble vnL  = xsn * uL  + ysn * vL  + zsn * wL  - vb;
+        RDouble vnR  = xsn * uR  + ysn * vR  + zsn * wR  - vb;
+        RDouble rvnL = rL * vnL;
+        RDouble rvnR = rR * vnR;
+
+        //! The first part of Roe scheme: F(QL, QR) = 0.5 * [ F(QL) + F(QR) ].
+        flux[IR ][iFace] =  half * (rvnL                        + rvnR                     );
+        flux[IRU][iFace] =  half * (rvnL * uL + xfn[iFace] * pL + rvnR * uR + xfn[iFace] * pR);
+        flux[IRV][iFace] =  half * (rvnL * vL + yfn[iFace] * pL + rvnR * vR + yfn[iFace] * pR);
+        flux[IRW][iFace] =  half * (rvnL * wL + zfn[iFace] * pL + rvnR * wR + zfn[iFace] * pR);
+        flux[IRE][iFace] =  half * (rvnL * hL + vgn[iFace] * pL + rvnR * hR + vgn[iFace] * pR);
+
+        //! The following loop is useless.
+        for (int iLaminar = nm; iLaminar < nLaminar; ++ iLaminar)
+        {
+            flux[iLaminar][iFace] = half * (primL[iLaminar] * rvnL + primR[iLaminar] * rvnR);
+        }
+
+        for (int it = 1; it < nTemperatureModel; ++ it)
+        {
+            flux[nLaminar + it][iFace] = half * (primL[nLaminar + it] * rvnL + primR[nLaminar + it] * rvnR);
+        }
+        if (nChemical == 1)
+        {
+            flux[nLaminar + nTemperatureModel - 1][iFace] += half * (peL * (vnL + vgn[iFace]) + peR * (vnR + vgn[iFace]));
+        }
+
+        RDouble ratio = sqrt(rR / rL);
+        RDouble roeAverageCoef  = one / (one + ratio);
+
+        RDouble rRoeAverage = sqrt(rL * rR);
+        RDouble uRoeAverage = (uL + uR * ratio) * roeAverageCoef;
+        RDouble vRoeAverage = (vL + vR * ratio) * roeAverageCoef;
+        RDouble wRoeAverage = (wL + wR * ratio) * roeAverageCoef;
+        RDouble pRoeAverage = (pL + pR * ratio) * roeAverageCoef;
+
+        prim[0] = rRoeAverage;
+        prim[1] = uRoeAverage;
+        prim[2] = vRoeAverage;
+        prim[3] = wRoeAverage;
+        prim[4] = pRoeAverage;
+
+
+        RDouble gama = (gmL + gmR * ratio) * roeAverageCoef;
+        RDouble gamm1 = gama - one;
+
+        RDouble vSquareRoeAverage = uRoeAverage * uRoeAverage + vRoeAverage * vRoeAverage + wRoeAverage * wRoeAverage;
+		RDouble absVel = sqrt(vSquareRoeAverage);
+        RDouble hRoeAverage = gama / gamm1 * pRoeAverage / rRoeAverage + half * vSquareRoeAverage;
+
+        RDouble vn = xsn * uRoeAverage + ysn * vRoeAverage + zsn * wRoeAverage - vb;
+        RDouble theta = vn + vb;
+                       
+        //! c2: square of sound speed.             
+        RDouble c2 = gamm1 * (hRoeAverage - half * vSquareRoeAverage);
+
+        //! Sound speed: gama * pRoeAverage / rRoeAverage.
+        RDouble cm = sqrt(ABS(c2));
+
+        RDouble cnew2 = 0, cnew = 0, vnew = 0, timeCoeff = 0, preconCoeff = 0, alpha = 0;
+        RDouble eigv1 = 0, eigv2 = 0, eigv3 = 0;
+        if (nPrecondition == 0)
+        {
+            eigv1 = ABS(vn);
+            eigv2 = ABS(vn + cm);
+            eigv3 = ABS(vn - cm);
+        }
+        else
+        {
+
+            timeCoeff = (timeCoeffL[iFace] + timeCoeffR[iFace] * ratio) * roeAverageCoef;
+            preconCoeff = (preconCoeffL[iFace] + preconCoeffR[iFace] * ratio) * roeAverageCoef;
+            eigv1 = timeCoeff * ABS(vn);
+            vnew  = half * timeCoeff * vn * (one + preconCoeff);
+            cnew  = half * timeCoeff * sqrt(((preconCoeff - one) * vn) * ((preconCoeff - one) * vn) + four * preconCoeff * c2);
+            cnew2  = cnew * cnew;
+            eigv2 = ABS(vnew + cnew);
+            eigv3 = ABS(vnew - cnew);
+        }
+
+        RDouble EL = (one / (gmL - one)) * (pL / rL) + half * vSquareL;
+        RDouble ER = (one / (gmR - one)) * (pR / rR) + half * vSquareR;
+
+        //! The jump between left and right conservative variables.
+        dq[IR]  = rR - rL;
+        dq[IRU] = rR * uR - rL * uL;
+        dq[IRV] = rR * vR - rL * vL;
+        dq[IRW] = rR * wR - rL * wL;
+        dq[IRE] = rR * ER - rL * EL; 
+
+        if (nChemical != 0)
+        {
+            if (nTemperatureModel > 1)
+            {
+                gas->GetTemperature(primL, temperaturesL[ITT], temperaturesL[ITV], temperaturesL[ITE]);
+                gas->GetTemperature(primR, temperaturesR[ITT], temperaturesR[ITV], temperaturesR[ITE]);
+            }
+            gas->Primitive2Conservative(primL, gmL, temperaturesL[ITV], temperaturesL[ITE], qConserveL);
+            gas->Primitive2Conservative(primR, gmR, temperaturesR[ITV], temperaturesR[ITE], qConserveR);
+        }
+
+        for (int iLaminar = nm; iLaminar < nEquation; ++ iLaminar)
+        {
+            dq[iLaminar] = qConserveR[iLaminar] - qConserveL[iLaminar];
+        }
+
+        //! Entropy correction, to limit the magnitude of the three eigenvalue.
+        //! Warning: This function calling may affect the efficient!
+        if(nPrecondition == 0)
+        {
+            Flux_RoeEntropyCorrection(eigv1, eigv2, eigv3, pressureCoeffL[iFace], pressureCoeffR[iFace], absVel, vn, cm, RoeEntropyFixMethod, entrFixCoefLeft, entrFixCoefRight);
+        }
+        else
+        {
+            Flux_RoeEntropyCorrection(eigv1, eigv2, eigv3, pressureCoeffL[iFace], pressureCoeffR[iFace], absVel, vnew, cnew, RoeEntropyFixMethod, entrFixCoefLeft, entrFixCoefRight);
+        }
+        
+
+        RDouble xi1 = 0.0, xi2 = 0.0, xi3 = 0.0, xi4 = 0.0;
+        if (nPrecondition == 0) 
+        {
+            xi1 = (two * eigv1 - eigv2 - eigv3) / (two * c2);
+            xi2 = (eigv2 - eigv3)/(two * cm);
+        }
+        else
+        {
+            xi1 = (two * eigv1 - eigv2 - eigv3) / (two * c2);
+            xi2 = (eigv2 - eigv3)/(two * cnew);
+            alpha = half * (one - preconCoeff);
+            xi3 = two * alpha * eigv1 / c2;
+            xi4 = alpha * vn * xi2 / c2;
+        }
+
+        RDouble dc = theta * dq[IR] - xsn * dq[IRU] - ysn * dq[IRV] - zsn * dq[IRW];
+
+        RDouble c2dc = 0;
+
+        c2dc = c2 * dc;
+
+        RDouble dh = - gamm1 * (uRoeAverage * dq[IRU] + vRoeAverage * dq[IRV] + wRoeAverage * dq[IRW] - dq[IRE]) + half * gamm1 * vSquareRoeAverage * dq[IR];
+
+        if (nChemical != 0)
+        {
+            gas->ComputeDHAndTotalEnthalpy(prim, gama, dq, dh, hRoeAverage);
+        }
+
+        if (nPrecondition == 0)
+        {
+            flux[IR ][iFace] -= half * (eigv1 * dq[IR ]                 -               dh  * xi1               -               dc  * xi2);
+            flux[IRU][iFace] -= half * (eigv1 * dq[IRU] + (xsn   * c2dc - uRoeAverage * dh) * xi1 + (xsn   * dh - uRoeAverage * dc) * xi2);
+            flux[IRV][iFace] -= half * (eigv1 * dq[IRV] + (ysn   * c2dc - vRoeAverage * dh) * xi1 + (ysn   * dh - vRoeAverage * dc) * xi2);
+            flux[IRW][iFace] -= half * (eigv1 * dq[IRW] + (zsn   * c2dc - wRoeAverage * dh) * xi1 + (zsn   * dh - wRoeAverage * dc) * xi2);
+            flux[IRE][iFace] -= half * (eigv1 * dq[IRE] + (theta * c2dc - hRoeAverage * dh) * xi1 + (theta * dh - hRoeAverage * dc) * xi2);
+
+            for (int iLaminar = nm; iLaminar < nLaminar; ++ iLaminar)
+            {
+                prim[iLaminar] = half * (primL[iLaminar] + primR[iLaminar]);
+                flux[iLaminar][iFace] -= half * (eigv1 * dq[iLaminar] - prim[iLaminar] * (dh * xi1 + dc * xi2));
+            }
+        }
+        else
+        {
+            flux[IR ][iFace] -= half * (eigv1 * dq[IR ]               - dh / preconCoeff * (xi1 - xi3 + xi4)                                            -               dc  * xi2);
+            flux[IRU][iFace] -= half * (eigv1 * dq[IRU] - uRoeAverage * dh / preconCoeff * (xi1 - xi3 + xi4) + xsn   * c2dc * (xi1 - xi4) + (xsn   * dh - uRoeAverage * dc) * xi2);
+            flux[IRV][iFace] -= half * (eigv1 * dq[IRV] - vRoeAverage * dh / preconCoeff * (xi1 - xi3 + xi4) + ysn   * c2dc * (xi1 - xi4) + (ysn   * dh - vRoeAverage * dc) * xi2);
+            flux[IRW][iFace] -= half * (eigv1 * dq[IRW] - wRoeAverage * dh / preconCoeff * (xi1 - xi3 + xi4) + zsn   * c2dc * (xi1 - xi4) + (zsn   * dh - wRoeAverage * dc) * xi2);
+            flux[IRE][iFace] -= half * (eigv1 * dq[IRE] - hRoeAverage * dh / preconCoeff * (xi1 - xi3 + xi4) + theta * c2dc * (xi1 - xi4) + (theta * dh - hRoeAverage * dc) * xi2);
+
+            for (int iLaminar = nm; iLaminar < nLaminar; ++ iLaminar)
+            {
+                prim[iLaminar] = half * (primL[iLaminar] + primR[iLaminar]);
+                flux[iLaminar][iFace] -= half * (eigv1 * dq[iLaminar] - prim[iLaminar] * (dh / preconCoeff * (xi1 - xi3 + xi4) + dc * xi2));
+            }
+            //! Compute vibration-electron energy term.
+            for (int it = 1; it < nTemperatureModel; ++ it)
+            {
+                prim[nLaminar + it] = half * (primL[nLaminar + it] + primR[nLaminar + it]);
+                flux[nLaminar + it][iFace] -= half * (eigv1 * dq[nLaminar + it] - prim[nLaminar + it] * (dh / preconCoeff * (xi1 - xi3 + xi4) + dc * xi2));
+            }
+        }
+
+    }
+
+    delete []prim;    prim = NULL;
+    delete []primL;    primL = NULL;
+    delete []primR;    primR = NULL;
+    delete []qConserveL;    qConserveL = NULL;
+    delete []qConserveR;    qConserveR = NULL;
+    delete []dq;    dq = NULL;
+}
+#ifdef USE_GMRESSOLVER
+//! GMRESCSR
+inline int GetIndexOfBlockJacobianMatrix(vector<int> &AI, vector<int> &AJ, int nEquation, int rCell, int qCell)
+{
+    int index;
+    vector<int>::iterator result = find(AJ.begin()+AI[rCell], AJ.begin()+AI[rCell + 1], qCell); // find qcell
+    if(result==AJ.begin()+AI[rCell+1])
+    {
+        printf("\nrcell %d cannot find qcell %d from:\n", rCell, qCell);
+        for (int i = AI[rCell]; i < AI[rCell+1]; i++)
+        {
+            printf("%d  ", AJ[i]);
+        }
+        printf("\n");
+
+        TK_Exit::ExceptionExit("Sparse matrix index is wrong");
+    }
+    index = distance(AJ.begin(), result);
+    index *= nEquation;
+    return index;
+}
+//! GMRES
+void GMRES_Roe_Scheme_ConservativeForm_test(FaceProxy* face_proxy, InviscidSchemeParameter* invSchemePara)
+{
+    const RDouble LITTLE = 1.0E-10;
+    int nTemperatureModel = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar = invSchemePara->GetNumberOfLaminar();
+    int nLength = invSchemePara->GetLength();
+    int nm = invSchemePara->Getnm();
+    int RoeEntropyFixMethod = invSchemePara->GetEntropyFixMethod();
+    int nChemical = invSchemePara->GetNumberOfChemical();
+    int nPrecondition = invSchemePara->GetIfPrecondition();
+    int nIdealState = invSchemePara->GetIfIdealState();
+
+    RDouble refMachNumber = invSchemePara->GetMachNumber();
+    RDouble entrFixCoefLeft = invSchemePara->GetLeftEntropyFixCoefficient();
+    RDouble entrFixCoefRight = invSchemePara->GetRightEntropyFixCoefficient();
+    RDouble **qL = invSchemePara->GetLeftQ();
+    RDouble **qR = invSchemePara->GetRightQ();
+    RDouble *gamaL = invSchemePara->GetLeftGama();
+    RDouble *gamaR = invSchemePara->GetRightGama();
+    RDouble *pressureCoeffL = face_proxy->GetPressureCoefficientL();
+    RDouble *pressureCoeffR = face_proxy->GetPressureCoefficientR();
+    RDouble *xfn = invSchemePara->GetFaceNormalX();
+    RDouble *yfn = invSchemePara->GetFaceNormalY();
+    RDouble *zfn = invSchemePara->GetFaceNormalZ();
+    RDouble *vgn = invSchemePara->GetFaceVelocity();
+    RDouble **flux = invSchemePara->GetFlux();
+    RDouble **tl = invSchemePara->GetLeftTemperature();
+    RDouble **tr = invSchemePara->GetRightTemperature();
+    RDouble mach2 = refMachNumber * refMachNumber;
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble *prim = new RDouble[nEquation]();
+    RDouble *qConserveL = new RDouble[nEquation]();
+    RDouble *qConserveR = new RDouble[nEquation]();
+    RDouble *dq = new RDouble[nEquation]();
+
+    RDouble *primL = new RDouble[nEquation]();
+    RDouble *primR = new RDouble[nEquation]();
+    RDouble temperaturesL[3] = { 0 }, temperaturesR[3] = { 0 };
+
+    for (int iFace = 0; iFace < nLength; ++iFace)
+    {
+        for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+        }
+
+        RDouble &rL = primL[IR];
+        RDouble &uL = primL[IU];
+        RDouble &vL = primL[IV];
+        RDouble &wL = primL[IW];
+        RDouble &pL = primL[IP];
+
+        RDouble &rR = primR[IR];
+        RDouble &uR = primR[IU];
+        RDouble &vR = primR[IV];
+        RDouble &wR = primR[IW];
+        RDouble &pR = primR[IP];
+
+        RDouble xsn = xfn[iFace];
+        RDouble ysn = yfn[iFace];
+        RDouble zsn = zfn[iFace];
+        RDouble vb = vgn[iFace];
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        rL = MAX(rL, LITTLE);
+        rR = MAX(rR, LITTLE);
+        pL = MAX(pL, LITTLE);
+        pR = MAX(pR, LITTLE);
+
+        RDouble vSquareL = uL * uL + vL * vL + wL * wL;
+        RDouble vSquareR = uR * uR + vR * vR + wR * wR;
+
+        RDouble hint_L = (gmL / (gmL - one)) * (pL / rL);
+        RDouble hint_R = (gmR / (gmR - one)) * (pR / rR);
+        RDouble peL = 0.0, peR = 0.0;
+
+        if (nChemical != 0 && nIdealState == 0)
+        {
+            for (int i = 0; i < 3; ++i)
+            {
+                temperaturesL[i] = tl[i][iFace];
+                temperaturesR[i] = tr[i][iFace];
+            }
+            gas->ComputeEnthalpyByPrimitive(primL, gmL, hint_L, temperaturesL);
+            gas->ComputeEnthalpyByPrimitive(primR, gmR, hint_R, temperaturesR);
+
+            if (nTemperatureModel > 1)
+            {
+                peL = gas->GetElectronPressure(primL, temperaturesL[ITE]);
+                peR = gas->GetElectronPressure(primR, temperaturesR[ITE]);
+            }
+        }
+        RDouble hL = hint_L + half * vSquareL;
+        RDouble hR = hint_R + half * vSquareR;
+
+        RDouble vnL = xsn * uL + ysn * vL + zsn * wL - vb;
+        RDouble vnR = xsn * uR + ysn * vR + zsn * wR - vb;
+        RDouble rvnL = rL * vnL;
+        RDouble rvnR = rR * vnR;
+
+        //! The first part of Roe scheme: F(QL, QR) = 0.5 * [ F(QL) + F(QR) ].
+        flux[IR][iFace] = half * (rvnL + rvnR);
+        flux[IRU][iFace] = half * (rvnL * uL + xfn[iFace] * pL + rvnR * uR + xfn[iFace] * pR);
+        flux[IRV][iFace] = half * (rvnL * vL + yfn[iFace] * pL + rvnR * vR + yfn[iFace] * pR);
+        flux[IRW][iFace] = half * (rvnL * wL + zfn[iFace] * pL + rvnR * wR + zfn[iFace] * pR);
+        flux[IRE][iFace] = half * (rvnL * hL + vgn[iFace] * pL + rvnR * hR + vgn[iFace] * pR);
+
+        //! The following loop is useless.
+        for (int iLaminar = nm; iLaminar < nLaminar; ++iLaminar)
+        {
+            flux[iLaminar][iFace] = half * (primL[iLaminar] * rvnL + primR[iLaminar] * rvnR);
+        }
+
+        for (int it = 1; it < nTemperatureModel; ++it)
+        {
+            flux[nLaminar + it][iFace] = half * (primL[nLaminar + it] * rvnL + primR[nLaminar + it] * rvnR);
+        }
+        if (nChemical == 1)
+        {
+            flux[nLaminar + nTemperatureModel - 1][iFace] += half * (peL * (vnL + vgn[iFace]) + peR * (vnR + vgn[iFace]));
+        }
+
+        RDouble ratio = sqrt(rR / rL);
+        RDouble roeAverageCoef = one / (one + ratio);
+
+        RDouble rRoeAverage = sqrt(rL * rR);
+        RDouble uRoeAverage = (uL + uR * ratio) * roeAverageCoef;
+        RDouble vRoeAverage = (vL + vR * ratio) * roeAverageCoef;
+        RDouble wRoeAverage = (wL + wR * ratio) * roeAverageCoef;
+        RDouble pRoeAverage = (pL + pR * ratio) * roeAverageCoef;
+
+        RDouble gama = (gmL + gmR * ratio) * roeAverageCoef;
+        RDouble gamm1 = gama - one;
+
+        RDouble vSquareRoeAverage = uRoeAverage * uRoeAverage + vRoeAverage * vRoeAverage + wRoeAverage * wRoeAverage;
+        RDouble absVel = sqrt(vSquareRoeAverage);
+        RDouble hRoeAverage = gama / gamm1 * pRoeAverage / rRoeAverage + half * vSquareRoeAverage;
+
+        RDouble vn = xsn * uRoeAverage + ysn * vRoeAverage + zsn * wRoeAverage - vb;
+        RDouble theta = vn + vb;
+
+        //! c2: square of sound speed.             
+        RDouble c2 = gamm1 * (hRoeAverage - half * vSquareRoeAverage);
+
+        //! Sound speed: gama * pRoeAverage / rRoeAverage.
+        RDouble cm = sqrt(ABS(c2));
+
+        RDouble Ur2 = 0, cnew2 = 0, cnew = 0, vnew = 0, beta = 0, alpha = 0;
+        RDouble eigv1 = 0, eigv2 = 0, eigv3 = 0;
+        eigv1 = ABS(vn);
+        if (nPrecondition == 0)
+        {
+            eigv2 = ABS(vn + cm);
+            eigv3 = ABS(vn - cm);
+        }
+        else
+        {
+            beta = MIN(MAX(vSquareRoeAverage / c2, three * mach2), one);
+            vnew = half * vn * (one + beta);
+            cnew = half * sqrt(((beta - one) * vn) * ((beta - one) * vn) + four * beta * c2);
+            cnew2 = cnew * cnew;
+            eigv2 = ABS(vnew + cnew);
+            eigv3 = ABS(vnew - cnew);
+        }
+
+        RDouble EL = (one / (gmL - one)) * (pL / rL) + half * vSquareL;
+        RDouble ER = (one / (gmR - one)) * (pR / rR) + half * vSquareR;
+
+        //! The jump between left and right conservative variables.
+        dq[IR] = rR - rL;
+        dq[IRU] = rR * uR - rL * uL;
+        dq[IRV] = rR * vR - rL * vL;
+        dq[IRW] = rR * wR - rL * wL;
+        dq[IRE] = rR * ER - rL * EL;
+
+        if (nChemical != 0)
+        {
+            if (nTemperatureModel > 1)
+            {
+                gas->GetTemperature(primL, temperaturesL[ITT], temperaturesL[ITV], temperaturesL[ITE]);
+                gas->GetTemperature(primR, temperaturesR[ITT], temperaturesR[ITV], temperaturesR[ITE]);
+            }
+            gas->Primitive2Conservative(primL, gmL, temperaturesL[ITV], temperaturesL[ITE], qConserveL);
+            gas->Primitive2Conservative(primR, gmR, temperaturesR[ITV], temperaturesR[ITE], qConserveR);
+        }
+
+        for (int iLaminar = nm; iLaminar < nEquation; ++iLaminar)
+        {
+            dq[iLaminar] = qConserveR[iLaminar] - qConserveL[iLaminar];
+        }
+
+        //! Entropy correction, to limit the magnitude of the three eigenvalue.
+        //! Warning: This function calling may affect the efficient!
+
+        Flux_RoeEntropyCorrection(eigv1, eigv2, eigv3, pressureCoeffL[iFace], pressureCoeffR[iFace], absVel, vn, cm, RoeEntropyFixMethod, entrFixCoefLeft, entrFixCoefRight);
+
+        RDouble xi1 = 0.0, xi2 = 0.0, xi3 = 0.0, xi4 = 0.0;
+        if (nPrecondition == 0)
+        {
+            xi1 = (two * eigv1 - eigv2 - eigv3) / (two * c2);
+            xi2 = (eigv2 - eigv3) / (two * cm);
+        }
+        else
+        {
+            xi1 = (two * eigv1 - eigv2 - eigv3) / (two * cnew2);
+            xi2 = (eigv2 - eigv3) / (two * cnew);
+            alpha = half * (one - beta);
+            xi3 = two * alpha * eigv1 / cnew2;
+            xi4 = alpha * vn * xi2 / cnew2;
+        }
+
+        RDouble dc = theta * dq[IR] - xsn * dq[IRU] - ysn * dq[IRV] - zsn * dq[IRW];
+
+        RDouble c2dc = 0;
+        if (nPrecondition == 0)
+        {
+            c2dc = c2 * dc;
+        }
+        else
+        {
+            Ur2 = beta * c2;
+            c2dc = cnew2 * dc;
+        }
+
+        RDouble dh = -gamm1 * (uRoeAverage * dq[IRU] + vRoeAverage * dq[IRV] + wRoeAverage * dq[IRW] - dq[IRE]) + half * gamm1 * vSquareRoeAverage * dq[IR];
+
+        if (nChemical != 0)
+        {
+            gas->ComputeDHAndTotalEnthalpy(prim, gama, dq, dh, hRoeAverage);
+        }
+
+        if (nPrecondition == 0)
+        {
+            flux[IR][iFace] -= half * (eigv1 * dq[IR] - dh * xi1 - dc * xi2);
+            flux[IRU][iFace] -= half * (eigv1 * dq[IRU] + (xsn * c2dc - uRoeAverage * dh) * xi1 + (xsn * dh - uRoeAverage * dc) * xi2);
+            flux[IRV][iFace] -= half * (eigv1 * dq[IRV] + (ysn * c2dc - vRoeAverage * dh) * xi1 + (ysn * dh - vRoeAverage * dc) * xi2);
+            flux[IRW][iFace] -= half * (eigv1 * dq[IRW] + (zsn * c2dc - wRoeAverage * dh) * xi1 + (zsn * dh - wRoeAverage * dc) * xi2);
+            flux[IRE][iFace] -= half * (eigv1 * dq[IRE] + (theta * c2dc - hRoeAverage * dh) * xi1 + (theta * dh - hRoeAverage * dc) * xi2);
+
+            for (int iLaminar = nm; iLaminar < nLaminar; ++iLaminar)
+            {
+                prim[iLaminar] = half * (primL[iLaminar] + primR[iLaminar]);
+                flux[iLaminar][iFace] -= half * (eigv1 * dq[iLaminar] - prim[iLaminar] * (dh * xi1 + dc * xi2));
+            }
+        }
+        else
+        {
+            flux[IR][iFace] -= half * (eigv1 * dq[IR] - dh * cnew2 / Ur2 * xi1 - dc * xi2 + dh * cnew2 / Ur2 * xi3 - dh * cnew2 / Ur2 * xi4);
+            flux[IRU][iFace] -= half * (eigv1 * dq[IRU] + (xsn * c2dc - uRoeAverage * dh * cnew2 / Ur2) * xi1 + (xsn * dh - uRoeAverage * dc) * xi2 + uRoeAverage * dh * cnew2 / Ur2 * xi3 - (xsn * c2dc + uRoeAverage * dh * cnew2 / Ur2) * xi4);
+            flux[IRV][iFace] -= half * (eigv1 * dq[IRV] + (ysn * c2dc - vRoeAverage * dh * cnew2 / Ur2) * xi1 + (ysn * dh - vRoeAverage * dc) * xi2 + vRoeAverage * dh * cnew2 / Ur2 * xi3 - (ysn * c2dc + vRoeAverage * dh * cnew2 / Ur2) * xi4);
+            flux[IRW][iFace] -= half * (eigv1 * dq[IRW] + (zsn * c2dc - wRoeAverage * dh * cnew2 / Ur2) * xi1 + (zsn * dh - wRoeAverage * dc) * xi2 + wRoeAverage * dh * cnew2 / Ur2 * xi3 - (zsn * c2dc + wRoeAverage * dh * cnew2 / Ur2) * xi4);
+            flux[IRE][iFace] -= half * (eigv1 * dq[IRE] + (theta * c2dc - hRoeAverage * dh * cnew2 / Ur2) * xi1 + (theta * dh - hRoeAverage * dc) * xi2 + hRoeAverage * dh * cnew2 / Ur2 * xi3 - (theta * c2dc + hRoeAverage * dh * cnew2 / Ur2) * xi4);
+
+            for (int iLaminar = nm; iLaminar < nLaminar; ++iLaminar)
+            {
+                prim[iLaminar] = half * (primL[iLaminar] + primR[iLaminar]);
+                flux[iLaminar][iFace] -= half * (eigv1 * dq[iLaminar] - prim[iLaminar] * (dh * cnew2 / Ur2 * (xi1 - xi3 + xi4) + dc * xi2));
+            }
+            //! Compute vibration-electron energy term.
+            for (int it = 1; it < nTemperatureModel; ++it)
+            {
+                prim[nLaminar + it] = half * (primL[nLaminar + it] + primR[nLaminar + it]);
+                flux[nLaminar + it][iFace] -= half * (eigv1 * dq[nLaminar + it] - prim[nLaminar + it] * (dh * cnew2 / Ur2 * (xi1 - xi3 + xi4) + dc * xi2));
+            }
+        }
+
+    }
+
+    delete[]prim;    prim = NULL;
+    delete[]primL;    primL = NULL;
+    delete[]primR;    primR = NULL;
+    delete[]qConserveL;    qConserveL = NULL;
+    delete[]qConserveR;    qConserveR = NULL;
+    delete[]dq;    dq = NULL;
+}
+
+
+//! GMRES 
+void GMRES_Roe_Scheme_ConservativeForm_wholeJacobian(FaceProxy* face_proxy, InviscidSchemeParameter* invSchemePara)
+{
+    const RDouble LITTLE    = 1.0E-10;
+    int nTemperatureModel   = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation           = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar            = invSchemePara->GetNumberOfLaminar();
+    int nLength             = invSchemePara->GetLength();
+    int nm                  = invSchemePara->Getnm();
+    int RoeEntropyFixMethod = invSchemePara->GetEntropyFixMethod();
+    int nChemical           = invSchemePara->GetNumberOfChemical();
+    int nPrecondition       = invSchemePara->GetIfPrecondition();
+    int nIdealState         = invSchemePara->GetIfIdealState();
+
+    RDouble refMachNumber       = invSchemePara->GetMachNumber();
+    RDouble entrFixCoefLeft     = invSchemePara->GetLeftEntropyFixCoefficient();
+    RDouble entrFixCoefRight    = invSchemePara->GetRightEntropyFixCoefficient();
+    RDouble **qL                = invSchemePara->GetLeftQ();
+    RDouble **qR                = invSchemePara->GetRightQ();
+    RDouble *gamaL              = invSchemePara->GetLeftGama();
+    RDouble *gamaR              = invSchemePara->GetRightGama();
+    RDouble *pressureCoeffL     = face_proxy->GetPressureCoefficientL();
+    RDouble *pressureCoeffR     = face_proxy->GetPressureCoefficientR();
+    RDouble *xfn                = invSchemePara->GetFaceNormalX();
+    RDouble *yfn                = invSchemePara->GetFaceNormalY();
+    RDouble *zfn                = invSchemePara->GetFaceNormalZ();
+    RDouble *vgn                = invSchemePara->GetFaceVelocity();
+    RDouble **flux              = invSchemePara->GetFlux();
+    RDouble **tl                = invSchemePara->GetLeftTemperature();
+    RDouble **tr                = invSchemePara->GetRightTemperature();
+    int *leftcellindexofFace    = face_proxy->GetLeftCellIndexOfFace();
+    int *rightcellindexofFace   = face_proxy->GetRightCellIndexOfFace();
+    GeomProxy *geomProxy        = face_proxy->GetGeomProxy();
+    RDouble *areas              = geomProxy->GetFaceArea();
+    RDouble **dRdq             = face_proxy->GetJacobianMatrix();
+    RDouble mach2               = refMachNumber * refMachNumber;
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble *prim       = new RDouble[nEquation]();
+    RDouble *qConserveL = new RDouble[nEquation]();
+    RDouble *qConserveR = new RDouble[nEquation]();
+    RDouble *qCvL       = new RDouble[nEquation]();
+    RDouble *qCvR       = new RDouble[nEquation]();
+    RDouble *qCvLpert   = new RDouble[nEquation]();
+    RDouble *qCvRpert   = new RDouble[nEquation]();
+    RDouble *dFluxdCv   = new RDouble[nEquation]();
+    RDouble dCvpert;
+
+    RDouble *primL = new RDouble[nEquation]();
+    RDouble *primR = new RDouble[nEquation]();
+    RDouble *fluxp = new RDouble[nEquation](); // flux proxy
+    RDouble temperaturesL[3] = { 0 }, temperaturesR[3] = { 0 };
+    RDouble perturbScale = 0.001;
+
+    for (int iFace = 0; iFace < nLength; ++iFace)
+    {
+        int le          = leftcellindexofFace[iFace];
+        int re          = rightcellindexofFace[iFace];
+        RDouble area    = areas[iFace];
+        for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+        }
+
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        gas->Primitive2Conservative(primL, gmL, temperaturesL[ITV], temperaturesL[ITE], qCvL);
+        gas->Primitive2Conservative(primR, gmR, temperaturesR[ITV], temperaturesR[ITE], qCvR);
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvR,iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        flux[IR][iFace] = fluxp[IR];
+        flux[IU][iFace] = fluxp[IU];
+        flux[IV][iFace] = fluxp[IV];
+        flux[IW][iFace] = fluxp[IW];
+        flux[IP][iFace] = fluxp[IP];
+
+    }
+
+    delete[]prim;           prim = NULL;
+    delete[]primL;          primL = NULL;
+    delete[]primR;          primR = NULL;
+    delete[]qConserveL;     qConserveL = NULL;
+    delete[]qConserveR;     qConserveR = NULL;
+    delete[]qCvL;           qCvL = NULL;
+    delete[]dFluxdCv;       dFluxdCv = NULL;
+    delete[]qCvLpert;       qCvLpert = NULL;
+    delete[]qCvRpert;       qCvRpert = NULL;
+    delete[]qCvR;           qCvR = NULL;
+    delete[]fluxp;          fluxp = NULL;
+}
+//! GMRESAD CSR format  GMRESCSR
+//! GMRES for finite difference considering nBoundFace using primitive variables with auto difference
+void GMRES_Roe_Scheme_ConservativeForm(FaceProxy* face_proxy, InviscidSchemeParameter* invSchemePara)
+{
+    const RDouble LITTLE    = 1.0E-10;
+    int nTemperatureModel   = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation           = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar            = invSchemePara->GetNumberOfLaminar();
+    int nLength             = invSchemePara->GetLength();
+    int nm                  = invSchemePara->Getnm();
+    int RoeEntropyFixMethod = invSchemePara->GetEntropyFixMethod();
+    int nChemical           = invSchemePara->GetNumberOfChemical();
+    int nPrecondition       = invSchemePara->GetIfPrecondition();
+    int nIdealState         = invSchemePara->GetIfIdealState();
+
+    //! GMRESBoundary
+    int localStart  = face_proxy->GetlocalStart();
+    int localEnd    = face_proxy->GetlocalEnd();
+    int nBoundFace  = face_proxy->GetnBoundFace();
+    int nTotalCell  = face_proxy->GetnTotalCell();
+    int nMid;
+    //! GMRESBCorrection
+    vector<int>* wallFaceIndex = face_proxy->GetWallFaceIndex();
+
+    RDouble refMachNumber       = invSchemePara->GetMachNumber();
+    RDouble entrFixCoefLeft     = invSchemePara->GetLeftEntropyFixCoefficient();
+    RDouble entrFixCoefRight    = invSchemePara->GetRightEntropyFixCoefficient();
+    RDouble **qL                = invSchemePara->GetLeftQ();
+    RDouble **qR                = invSchemePara->GetRightQ();
+    RDouble **qLC               = invSchemePara->GetLeftQC();  // GMRESPassQC
+    RDouble **qRC               = invSchemePara->GetRightQC(); // GMRESPassQC
+    RDouble *gamaL              = invSchemePara->GetLeftGama();
+    RDouble *gamaR              = invSchemePara->GetRightGama();
+    RDouble *pressureCoeffL     = face_proxy->GetPressureCoefficientL();
+    RDouble *pressureCoeffR     = face_proxy->GetPressureCoefficientR();
+    RDouble *xfn                = invSchemePara->GetFaceNormalX();
+    RDouble *yfn                = invSchemePara->GetFaceNormalY();
+    RDouble *zfn                = invSchemePara->GetFaceNormalZ();
+    RDouble *vgn                = invSchemePara->GetFaceVelocity();
+    RDouble **flux              = invSchemePara->GetFlux();
+    RDouble **tl                = invSchemePara->GetLeftTemperature();
+    RDouble **tr                = invSchemePara->GetRightTemperature();
+    int *leftcellindexofFace    = face_proxy->GetLeftCellIndexOfFace();
+    int *rightcellindexofFace   = face_proxy->GetRightCellIndexOfFace();
+    GeomProxy *geomProxy        = face_proxy->GetGeomProxy();
+    RDouble *areas              = geomProxy->GetFaceArea();
+    RDouble **dRdq             = face_proxy->GetJacobianMatrix();
+    //! GMRESBoundary    
+    RDouble **dDdP              = face_proxy->GetdDdPMatrix();
+    //! GMRES CSR
+    vector<int> AI = face_proxy->GetJacobianAI4GMRES();
+    vector<int> AJ = face_proxy->GetJacobianAJ4GMRES();
+
+    // RDouble   dRdqL[nEquation][nEquation];
+    RDouble   dRdqR[nEquation][nEquation];
+    RDouble   dDdPlocal[nEquation][nEquation];
+    RDouble mach2               = refMachNumber * refMachNumber;
+
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble  dFluxdpL[nEquation][nEquation];
+    RDouble  dFluxdpR[nEquation][nEquation];
+    RDouble  dFluxdpwall[nEquation][nEquation];
+
+    //! auto difference allocation
+    ADReal *primL  = new ADReal[nEquation]();
+    ADReal *primR  = new ADReal[nEquation]();
+    ADReal *fluxp  = new ADReal[nEquation](); //! flux proxy
+
+    RDouble *primLC = new RDouble[nEquation](); //! GMRESPassQC
+    RDouble *primRC = new RDouble[nEquation](); //! GMRESPassQC
+
+    RDouble temperaturesL[3] = { 0 }, temperaturesR[3] = { 0 };
+    RDouble perturbScale = 0.001;
+    
+    RDouble **dqdcvL= new RDouble*[nEquation];
+    RDouble **dqdcvR= new RDouble*[nEquation];
+    for(int indexI=0; indexI < nEquation; indexI++)
+    {
+        dqdcvL[indexI] = new RDouble[nEquation];
+        dqdcvR[indexI] = new RDouble[nEquation];
+        
+        for(int indexJ =0; indexJ < nEquation; indexJ ++)
+        {
+            dqdcvL[indexI][indexJ] = 0.0;
+            dqdcvR[indexI][indexJ] = 0.0;
+        }
+    }
+    
+    // GMRESBoundary
+     if (localStart >= nBoundFace)
+     {
+         nMid = localStart;  // a bug 01.07
+     }
+     else if (localEnd <= nBoundFace)
+     {
+         //! If they are all boundary faces.
+         nMid = localEnd;
+     }
+     else
+     {
+         //! Part of them are boundary faces.
+         nMid = nBoundFace;
+     }
+
+     nMid = nMid - localStart;
+
+     for(int iFace = 0;iFace < nMid; ++iFace)
+     {
+        int le          = leftcellindexofFace[iFace];
+        int re          = rightcellindexofFace[iFace];
+        int colidx; // colume index for GMRES CSR
+
+        RDouble area    = areas[iFace];
+        for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+
+            primLC[iEqn] = qLC[iEqn][iFace]; // GMRESPassQC
+            primRC[iEqn] = qRC[iEqn][iFace]; // GMRESPassQC
+        }
+
+        // define sequence order of the independent variables
+        for (int iEqn = 0; iEqn < nEquation; iEqn++)
+        {
+            primL[iEqn].diff(iEqn, 10);
+            primR[iEqn].diff(iEqn + nEquation, 10);
+        }
+        
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primR, iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        flux[IR][iFace] = fluxp[IR].val();
+        flux[IU][iFace] = fluxp[IU].val();
+        flux[IV][iFace] = fluxp[IV].val();
+        flux[IW][iFace] = fluxp[IW].val();
+        flux[IP][iFace] = fluxp[IP].val();
+
+        for (int m = 0; m < nEquation; m++)
+        {
+            for (int n = 0; n < nEquation; n++)
+            {
+                dFluxdpL[m][n] = fluxp[m].dx(n) * area;
+                dFluxdpR[m][n] = fluxp[m].dx(n + nEquation) * area;
+            }
+        }
+   
+        // contributions from the bc
+        int indexre = (re-nTotalCell)*nEquation;
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+            }
+        }
+
+        // GMRESBCorrection
+        if(find(wallFaceIndex->begin(),wallFaceIndex->end(),iFace) != wallFaceIndex->end())
+        {
+            // GMRESPV , obtain the dqdcv for the left cell
+            gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+            // average of the dFluxdpL and dFluxdpR
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ =0; indexJ < nEquation; indexJ ++)
+                {
+                    dFluxdpwall[indexI][indexJ] = 0.5*(dFluxdpL[indexI][indexJ]
+                                                     + dFluxdpR[indexI][indexJ]);
+                    dFluxdpL[indexI][indexJ]    =  dFluxdpwall[indexI][indexJ]; 
+                    dFluxdpR[indexI][indexJ]    =  dFluxdpwall[indexI][indexJ];                               
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then minus to the corresponding location in dRdq.
+            int indexf = re * nEquation; // first index
+            int indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        /* dRdq[indexf+indexI][indexs+indexJ] -= dFluxdpwall[indexI][indexK]*
+                                                                   dqdcvL[indexK][indexJ]; */
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpwall[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // contributions from the bc, 
+            // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dFluxdpL[indexI][indexJ]  += dFluxdpwall[indexI][indexK]*
+                                                       dDdPlocal[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        /* dRdq[indexf+indexI][indexs+indexJ] += dFluxdpL[indexI][indexK]*
+                                                                 dqdcvL[indexK][indexJ]; */
+                        dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+             // GMRESPV , obtain the dqdcv for the right cell
+            gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then minus to the corresponding location in dRdq.
+            indexf = re * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        /*dRdq[indexf+indexI][indexs+indexJ] -= dFluxdpR[indexI][indexK]*
+                                                                 dqdcvR[indexK][indexJ];*/
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];                          
+                    }
+                }
+            }
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        /* dRdq[indexf+indexI][indexs+indexJ] += dFluxdpR[indexI][indexK]*
+                                                                 dqdcvR[indexK][indexJ]; */
+                        dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+            
+        }
+        else
+        {
+            // GMRESPV , obtain the dqdcv for the left cell
+            gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then minus to the corresponding location in dRdq.
+            int indexf = re * nEquation; // first index
+            int indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        /* dRdq[indexf+indexI][indexs+indexJ] -= dFluxdpL[indexI][indexK]*
+                                                                 dqdcvL[indexK][indexJ]; */
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // contributions from the bc, 
+            // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dFluxdpL[indexI][indexJ]  += dFluxdpR[indexI][indexK]*
+                                                    dDdPlocal[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        /* dRdq[indexf+indexI][indexs+indexJ] += dFluxdpL[indexI][indexK]*
+                                                                 dqdcvL[indexK][indexJ]; */
+                        dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+             // GMRESPV , obtain the dqdcv for the right cell
+            gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then minus to the corresponding location in dRdq.
+            indexf = re * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        /* dRdq[indexf+indexI][indexs+indexJ] -= dFluxdpR[indexI][indexK]*
+                                                                 dqdcvR[indexK][indexJ]; */
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        /* dRdq[indexf+indexI][indexs+indexJ] += dFluxdpR[indexI][indexK]*
+                                                                 dqdcvR[indexK][indexJ]; */
+                        dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+        }
+
+    
+     }
+
+     for(int iFace = nMid;iFace < nLength; ++iFace)
+     {
+        int le          = leftcellindexofFace[iFace];
+        int re          = rightcellindexofFace[iFace];
+        int colidx;
+        RDouble area    = areas[iFace];
+        for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+
+            primLC[iEqn] = qLC[iEqn][iFace]; // GMRESPassQC
+            primRC[iEqn] = qRC[iEqn][iFace]; // GMRESPassQC
+        }
+
+        // define sequence order of the independent variables
+        for (int iEqn = 0; iEqn < nEquation; iEqn++)
+        {
+            primL[iEqn].diff(iEqn, 10);
+            primR[iEqn].diff(iEqn + nEquation, 10);
+        }
+
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primR, iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        flux[IR][iFace] = fluxp[IR].val();
+        flux[IU][iFace] = fluxp[IU].val();
+        flux[IV][iFace] = fluxp[IV].val();
+        flux[IW][iFace] = fluxp[IW].val();
+        flux[IP][iFace] = fluxp[IP].val();
+       
+        for (int m = 0; m < nEquation; m++)
+         {
+             for (int n = 0; n < nEquation; n++)
+             {
+                 dFluxdpL[m][n] = fluxp[m].dx(n) * area;
+                 dFluxdpR[m][n] = fluxp[m].dx(n + nEquation) * area;
+             }
+         }
+  
+        // GMRESPV , obtain the dqdcv for the left cell
+        gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+        // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+        // then minus to the corresponding location in dRdq.
+        int indexf = re * nEquation; // first index
+        int indexs = le * nEquation; // second index
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            { 
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = le * nEquation; // second index
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                }
+            }
+        }
+
+         // GMRESPV , obtain the dqdcv for the right cell
+        gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+        // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+        // then minus to the corresponding location in dRdq.
+        indexf = re * nEquation; // first index
+        indexs = re * nEquation; // second index
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = re * nEquation; // second index
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                }
+            }
+        }
+     }
+
+    delete[]primL;          primL = NULL;
+    delete[]primR;          primR = NULL;
+    delete[]primLC;         primLC = NULL;
+    delete[]primRC;         primRC = NULL;
+    delete[]fluxp;          fluxp = NULL;
+
+    for(int index = 0; index < nEquation; index++)
+    {
+        delete[] dqdcvL[index];
+        delete[] dqdcvR[index];
+    }
+    delete[] dqdcvL;
+    delete[] dqdcvR;
+}
+
+
+// GMRESJac1st-nolim GMRES3D
+void GMRES_INVScheme(FaceProxy* face_proxy, InviscidSchemeParameter* invSchemePara)
+{
+    const RDouble LITTLE    = 1.0E-10;
+    int nTemperatureModel   = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation           = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar            = invSchemePara->GetNumberOfLaminar();
+    int nLength             = invSchemePara->GetLength();
+    int nm                  = invSchemePara->Getnm();
+    int RoeEntropyFixMethod = invSchemePara->GetEntropyFixMethod();
+    int nChemical           = invSchemePara->GetNumberOfChemical();
+    int nPrecondition       = invSchemePara->GetIfPrecondition();
+    int nIdealState         = invSchemePara->GetIfIdealState();
+    int limiterType         = invSchemePara->GetLimiterType();
+    int unstructScheme      = GlobalDataBase::GetIntParaFromDB("uns_scheme");  // GMRES3D
+    UnstructBCSet * unstructBCSet       = invSchemePara->GetUnstructBCSet(); // GMRES3D judge the type of the bc
+    int * bcRegionIDofBCFace            = unstructBCSet->GetBCFaceInfo(); // GMRES3D
+    RDouble wallTemperature             = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+    RDouble refDimensionalTemperature   = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+    RDouble coefficientOfStateEquation  = gas->GetCoefficientOfStateEquation();
+
+    // GMRES1st2nd
+    if( limiterType == ILMT_NOLIM || limiterType == ILMT_VENCAT )
+    {
+        int newIterStep = GlobalDataBase::GetIntParaFromDB("newnstep");
+        int flowInitStep = GlobalDataBase::GetIntParaFromDB("flowInitStep");
+        
+        if(newIterStep <= flowInitStep)
+        {
+            limiterType = ILMT_FIRST;
+        }
+    }
+
+    // GMRESBoundary
+    int localStart  = face_proxy->GetlocalStart();
+    int localEnd    = face_proxy->GetlocalEnd();
+    int nBoundFace  = face_proxy->GetnBoundFace();
+    int nTotalCell  = face_proxy->GetnTotalCell();
+    int nMid;
+    // GMRESBCorrection
+    vector<int>* wallFaceIndex = face_proxy->GetWallFaceIndex();
+
+    RDouble refMachNumber       = invSchemePara->GetMachNumber();
+    RDouble entrFixCoefLeft     = invSchemePara->GetLeftEntropyFixCoefficient();
+    RDouble entrFixCoefRight    = invSchemePara->GetRightEntropyFixCoefficient();
+    RDouble** qL                = invSchemePara->GetLeftQ();
+    RDouble** qR                = invSchemePara->GetRightQ();
+    RDouble** qLC               = invSchemePara->GetLeftQC();  // GMRESPassQC
+    RDouble** qRC               = invSchemePara->GetRightQC(); // GMRESPassQC
+    RDouble* gamaL              = invSchemePara->GetLeftGama();
+    RDouble* gamaR              = invSchemePara->GetRightGama();
+    RDouble* pressureCoeffL     = face_proxy->GetPressureCoefficientL();
+    RDouble* pressureCoeffR     = face_proxy->GetPressureCoefficientR();
+    RDouble* xfn                = invSchemePara->GetFaceNormalX();
+    RDouble* yfn                = invSchemePara->GetFaceNormalY();
+    RDouble* zfn                = invSchemePara->GetFaceNormalZ();
+    RDouble* vgn                = invSchemePara->GetFaceVelocity();
+    RDouble** flux              = invSchemePara->GetFlux();
+    RDouble** tl                = invSchemePara->GetLeftTemperature();
+    RDouble** tr                = invSchemePara->GetRightTemperature();
+    int* leftcellindexofFace    = face_proxy->GetLeftCellIndexOfFace();
+    int* rightcellindexofFace   = face_proxy->GetRightCellIndexOfFace();
+    GeomProxy* geomProxy        = face_proxy->GetGeomProxy();
+    RDouble* areas              = geomProxy->GetFaceArea();
+
+    // GMRESnolim  xfc xcc should use the absolute face index
+    RDouble * xfc               = invSchemePara->GetFaceCenterX();
+    RDouble * yfc               = invSchemePara->GetFaceCenterY();
+    RDouble * zfc               = invSchemePara->GetFaceCenterZ();
+    RDouble * xcc               = invSchemePara->GetCellCenterX();
+    RDouble * ycc               = invSchemePara->GetCellCenterY();
+    RDouble * zcc               = invSchemePara->GetCellCenterZ();
+    RDouble * nsx               = invSchemePara->GetFaceNormalXAbs();
+    RDouble * nsy               = invSchemePara->GetFaceNormalYAbs();
+    RDouble * nsz               = invSchemePara->GetFaceNormalZAbs();
+    RDouble * ns                = invSchemePara->GetFaceAreaAbs();
+    RDouble * vol               = invSchemePara->GetVolume();
+    RDouble * gama              = invSchemePara->GetGama();
+    RDouble **prim              = invSchemePara->GetPrimitive();
+    vector<int>* neighborCells  = invSchemePara->GetNeighborCells();
+    vector<int>* neighborFaces  = invSchemePara->GetNeighborFaces();
+    vector<int>* neighborLR     = invSchemePara->GetNeighborLR();
+    int* qlsign                 = invSchemePara->GetLeftQSign();
+    int* qrsign                 = invSchemePara->GetRightQSign();
+
+    // GMRES2ndCorrection
+    vector<int> BCLeftCells     = invSchemePara->GetBCLeftCells();
+    vector<int> BCRightCells    = invSchemePara->GetBCRightCells();
+    vector<int> BCFaces         = invSchemePara->GetBCFaces();
+
+    // GMRESVenkat
+    RDouble ** dqdx         = invSchemePara->GetGradientX();
+    RDouble ** dqdy         = invSchemePara->GetGradientY();
+    RDouble ** dqdz         = invSchemePara->GetGradientZ();
+    int limitModel          = invSchemePara->GetLimitModel();
+    int limitVector         = invSchemePara->GetLimitVector();
+    bool usingVectorLimiter = (limitVector == 1);
+    int limitnVariable      = 1;
+    ADReal*  limitL;
+    ADReal*  limitR;
+    int     ivencat;
+    RDouble venkatCoeff;
+    RDouble averageVolume   = invSchemePara->GetAverageVolume();
+    RDouble nExp            = 3.0; 
+    int dimension           = PHSPACE::GetDim();
+
+    const int SCALAR_LIMITER    = 0;
+    const int VECTOR_LIMITER    = 1;
+
+    const int LIMIT_BY_RHO_P    = 0;
+    const int LIMIT_BY_EACH_VAR = 1;
+
+    int reconstructMethod       = GlobalDataBase::GetIntParaFromDB("reconmeth");
+    const int RECONSTRUCT_USING_RESPECTIVE_LIMITER = 0;
+    
+    if ( limiterType == ILMT_VENCAT )
+    {
+        if( limitVector == 0  )
+        {
+            TK_Exit::ExceptionExit("SCALAR_LIMITER for Venkat is not yet implemented\n");
+        }
+        
+        if (limitVector != 0 || limitModel != 0)
+        {
+            limitnVariable = nEquation;
+        }
+
+        limitL = new ADReal[limitnVariable];
+        limitR = new ADReal[limitnVariable];
+
+        ivencat     = GlobalDataBase::GetIntParaFromDB("ivencat");
+        venkatCoeff = GlobalDataBase::GetDoubleParaFromDB("venkatCoeff");
+    }
+
+
+    RDouble dxL,dyL,dzL,dxR,dyR,dzR;
+    int Lsign;
+    int Rsign;
+
+    RDouble** dRdq             = face_proxy->GetJacobianMatrix();
+    // GMRESBoundary    
+    RDouble** dDdP              = face_proxy->GetdDdPMatrix();
+    // GMRES CSR
+    vector<int> AI = face_proxy->GetJacobianAI4GMRES();
+    vector<int> AJ = face_proxy->GetJacobianAJ4GMRES();
+
+    //! GMRESJac1st
+    RDouble** dRdq1st = face_proxy->GetJacobianMatrix1st();
+    vector<int> AI1st = face_proxy->GetJacobianAI1st4GMRES();
+    vector<int> AJ1st = face_proxy->GetJacobianAJ1st4GMRES();
+    int JacOrder = face_proxy->GetJacobianOrder();
+
+    RDouble   dRdqR[nEquation][nEquation];
+    RDouble   dDdPlocal[nEquation][nEquation];
+    RDouble   dGdqx, dGdqy, dGdqz;
+    RDouble mach2               = refMachNumber * refMachNumber;
+
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble  dFluxdpL[nEquation][nEquation];
+    RDouble  dFluxdpR[nEquation][nEquation];
+    RDouble  dFluxdtmp[nEquation][nEquation];
+    RDouble  dFluxdpwall[nEquation][nEquation];
+
+    // GMRESVenkat
+    RDouble dFluxdgradxL[nEquation][nEquation];
+    RDouble dFluxdgradyL[nEquation][nEquation];
+    RDouble dFluxdgradzL[nEquation][nEquation];
+    RDouble dFluxdgradxR[nEquation][nEquation];
+    RDouble dFluxdgradyR[nEquation][nEquation];
+    RDouble dFluxdgradzR[nEquation][nEquation];
+    RDouble dFluxdminL[nEquation][nEquation];
+    RDouble dFluxdmaxL[nEquation][nEquation];
+    RDouble dFluxdminR[nEquation][nEquation];
+    RDouble dFluxdmaxR[nEquation][nEquation];
+    RDouble dGradtmp[nEquation][nEquation];
+    RDouble dGradtmpBC[nEquation][nEquation];
+    RDouble dFluxdMinMax[nEquation][nEquation];
+
+    // auto difference allocation
+    ADReal* primL       = new ADReal[nEquation]();
+    ADReal* primR       = new ADReal[nEquation]();
+    ADReal* fluxp       = new ADReal[nEquation](); // flux proxy
+    ADReal* primTry     = new ADReal[nEquation]();
+
+    // GMRESVenkat
+    ADReal *dqdxL = new ADReal[nEquation];
+    ADReal *dqdyL = new ADReal[nEquation];
+    ADReal *dqdzL = new ADReal[nEquation];
+
+    ADReal *dqdxR = new ADReal[nEquation];
+    ADReal *dqdyR = new ADReal[nEquation];
+    ADReal *dqdzR = new ADReal[nEquation];
+
+    ADReal dminL;
+    ADReal dminR;
+    ADReal dmaxL;
+    ADReal dmaxR;
+    
+    // if ( limitVector != 0 || limitModel != 0 )
+    ADReal* minL       = new ADReal[nEquation]();
+    ADReal* maxL       = new ADReal[nEquation]();
+    ADReal* minR       = new ADReal[nEquation]();
+    ADReal* maxR       = new ADReal[nEquation]();
+
+    int* IndexMinL = new int [nEquation];
+    int* IndexMaxL = new int [nEquation];
+    int* IndexMinR = new int [nEquation];
+    int* IndexMaxR = new int [nEquation];
+    int* LimitSignL = new int [nEquation];
+    int* LimitSignR = new int [nEquation];
+
+    int nIndependentVars    ;
+    int halfIndependentVars ;
+    if ( limitVector != 0 || limitModel != 0 )
+    {
+        nIndependentVars    = nEquation * 2 + nEquation  * 6 + nEquation * 4;
+        halfIndependentVars = nIndependentVars / 2;
+
+    } 
+
+    RDouble* primLC = new RDouble[nEquation](); // GMRESPassQC
+    RDouble* primRC = new RDouble[nEquation](); // GMRESPassQC
+    RDouble* primN  = new RDouble[nEquation]();
+    
+    RDouble temperaturesL[3] = { 0 }, temperaturesR[3] = { 0 };
+    RDouble perturbScale = 0.001;
+    
+    RDouble** dqdcvL= new RDouble*[nEquation];
+    RDouble** dqdcvR= new RDouble*[nEquation];
+    RDouble** dqdcvN= new RDouble*[nEquation];  // dqdcv for neighbors
+    RDouble** dgraddqx = new RDouble*[nEquation];
+    RDouble** dgraddqy = new RDouble*[nEquation];
+    RDouble** dgraddqz = new RDouble*[nEquation];
+    for(int indexI=0; indexI < nEquation; indexI++)
+    {
+        dqdcvL[indexI]      = new RDouble[nEquation];
+        dqdcvR[indexI]      = new RDouble[nEquation];
+        dqdcvN[indexI]      = new RDouble[nEquation];
+        dgraddqx[indexI]    = new RDouble[nEquation];
+        dgraddqy[indexI]    = new RDouble[nEquation];
+        dgraddqz[indexI]    = new RDouble[nEquation];
+        
+        for(int indexJ =0; indexJ < nEquation; indexJ ++)
+        {
+            dqdcvL[indexI][indexJ] = 0.0;
+            dqdcvR[indexI][indexJ] = 0.0;
+            dqdcvN[indexI][indexJ] = 0.0;
+            dgraddqx[indexI][indexJ] = 0.0;
+            dgraddqy[indexI][indexJ] = 0.0;
+            dgraddqz[indexI][indexJ] = 0.0;
+        }
+    }
+    
+    // GMRESBoundary
+    if (localStart >= nBoundFace)
+    {
+        nMid = localStart; // a bug 01.07
+    }
+    else if (localEnd <= nBoundFace)
+    {
+        //! If they are all boundary faces.
+        nMid = localEnd;
+    }
+    else
+    {
+        //! Part of them are boundary faces.
+        nMid = nBoundFace;
+    }
+
+    nMid = nMid - localStart;
+
+    for (int iFace = 0; iFace < nMid; ++iFace)
+    {
+        int le = leftcellindexofFace[iFace];
+        int re = rightcellindexofFace[iFace];
+        int colidx; // colume index for GMRES CSR
+        int colidx1st; // GMRESJac1st
+        int kFace = iFace + localStart; // absolute face index
+
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[kFace]);
+        int bcType = bcRegion->GetBCType();
+
+        RDouble area = areas[iFace];
+
+        
+        if ( limiterType == ILMT_VENCAT && 
+             ( bcType == PHENGLEI::OUTFLOW || bcType == PHENGLEI::INTERFACE ) )
+        {
+            if (limitVector != 0 || limitModel != 0)
+            {
+                for (int nVar = 0; nVar < limitnVariable; ++ nVar)
+                {
+                    
+                    IndexMinL[nVar] = le;
+                    IndexMaxL[nVar] = le;
+                    RDouble pminL = prim[nVar][le];
+                    RDouble pmaxL = prim[nVar][le];
+                    for ( int index = 0; index < neighborCells[le].size(); index++ )
+                    {
+                        int neighborIndex       = neighborCells[le][index];
+                        int neighborFaceIndex   = neighborFaces[le][index];
+                        if( neighborFaceIndex >= nBoundFace )
+                        {
+                            RDouble  primNeighbor    = prim[nVar][neighborIndex];
+
+                            if( pminL > primNeighbor)
+                            {
+                                pminL           = primNeighbor;
+                                IndexMinL[nVar] = neighborIndex;
+                            }
+
+                            if( pmaxL < primNeighbor)
+                            {
+                                pmaxL = primNeighbor;
+                                IndexMaxL[nVar] = neighborIndex;
+                            }
+
+                        }
+                    }
+
+
+                    IndexMinR[nVar] = re;
+                    IndexMaxR[nVar] = re;
+                    RDouble pminR = prim[nVar][re];
+                    RDouble pmaxR = prim[nVar][re];
+                    for ( int index = 0; index < neighborCells[re].size(); index++ )
+                    {
+                        int neighborIndex       = neighborCells[re][index];
+                        int neighborFaceIndex   = neighborFaces[re][index];
+                        if( neighborFaceIndex >= nBoundFace )
+                        {
+                            RDouble  primNeighbor    = prim[nVar][neighborIndex];
+
+                            if( pminR > primNeighbor)
+                            {
+                                pminR           = primNeighbor;
+                                IndexMinR[nVar] = neighborIndex;
+                            }
+
+                            if( pmaxR < primNeighbor)
+                            {
+                                pmaxR           = primNeighbor;
+                                IndexMaxR[nVar] = neighborIndex;
+                            }
+
+                        }
+                    }
+
+                
+                }
+            }
+
+        
+        }
+ 
+        // GMRESVenkat pay attention to the interface boundary condition
+        if ( limiterType == ILMT_VENCAT && 
+             ( bcType == PHENGLEI::OUTFLOW || bcType == PHENGLEI::INTERFACE ) ) 
+        {
+            for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+            {
+                primL[iEqn]     = qL[iEqn][iFace];
+                primR[iEqn]     = qR[iEqn][iFace];
+
+                primLC[iEqn]    = qLC[iEqn][iFace]; // GMRESPassQC
+                primRC[iEqn]    = qRC[iEqn][iFace]; // GMRESPassQC
+
+                dqdxL[iEqn]     = dqdx[iEqn][le];
+                dqdyL[iEqn]     = dqdy[iEqn][le];
+                dqdzL[iEqn]     = dqdz[iEqn][le];
+                dqdxR[iEqn]     = dqdx[iEqn][re];
+                dqdyR[iEqn]     = dqdy[iEqn][re];
+                dqdzR[iEqn]     = dqdz[iEqn][re];
+
+                minL[iEqn]      = prim[iEqn][IndexMinL[iEqn]];
+                maxL[iEqn]      = prim[iEqn][IndexMaxL[iEqn]];
+                minR[iEqn]      = prim[iEqn][IndexMinR[iEqn]];
+                maxR[iEqn]      = prim[iEqn][IndexMaxR[iEqn]];
+            }
+        }
+        else
+        {
+            for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+            {
+                primL[iEqn] = qL[iEqn][iFace];
+                primR[iEqn] = qR[iEqn][iFace];
+
+                primLC[iEqn] = qLC[iEqn][iFace]; // GMRESPassQC
+                primRC[iEqn] = qRC[iEqn][iFace]; // GMRESPassQC
+            }
+        }
+
+        // define sequence order of the independent variables
+        // GMRESVenkat
+        if ( limiterType == ILMT_VENCAT && 
+             (  bcType == PHENGLEI::OUTFLOW || bcType == PHENGLEI::INTERFACE ) )
+        {
+            
+            //! define the sequence of the independent variables
+            for (int m = 0; m < nEquation; m++)
+            {
+                primL[m].diff(m, nIndependentVars);
+                primR[m].diff(halfIndependentVars + m, nIndependentVars);
+            }
+
+            for (int m = 0; m < nEquation; m++)
+            {
+                dqdxL[m].diff(nEquation + m, nIndependentVars);
+                dqdyL[m].diff(nEquation + nEquation + m, nIndependentVars);
+                dqdzL[m].diff(nEquation + 2 * nEquation + m, nIndependentVars);
+                minL[m].diff(nEquation * 4 + m, nIndependentVars);
+                maxL[m].diff(nEquation * 5 + m, nIndependentVars);
+                dqdxR[m].diff(halfIndependentVars + nEquation + m, nIndependentVars);
+                dqdyR[m].diff(halfIndependentVars + nEquation + nEquation + m, nIndependentVars);
+                dqdzR[m].diff(halfIndependentVars + nEquation + 2 * nEquation + m, nIndependentVars);
+                minR[m].diff(halfIndependentVars + nEquation * 4 + m, nIndependentVars);
+                maxR[m].diff(halfIndependentVars + nEquation * 5 + m, nIndependentVars);
+            }
+
+        }
+        else
+        {
+        
+            for (int iEqn = 0; iEqn < nEquation; iEqn++)
+            {
+                primL[iEqn].diff(iEqn, 10);
+                primR[iEqn].diff(iEqn + nEquation, 10);
+            }
+
+        }
+
+        // Boundaryqlqrfix
+        if ( bcType == PHENGLEI::SYMMETRY )
+        {
+            ADReal vn = 2.0*( nsx[kFace]*primL[IU] + nsy[kFace]*primL[IV] + nsz[kFace]*primL[IW]);
+
+            primR[IR] = primL[IR];
+            primR[IU] = primL[IU] - vn * nsx[kFace];
+            primR[IV] = primL[IV] - vn * nsy[kFace];
+            primR[IW] = primL[IW] - vn * nsz[kFace];
+            primR[IP] = primL[IP];
+        }
+        
+        int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+
+        if( bcType == PHENGLEI::SOLID_SURFACE && viscousType != INVISCID )
+        {
+            ADReal uWall = 0.0;
+            ADReal vWall = 0.0;
+            ADReal wWall = 0.0;                
+            Data_Param *bcData  = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[kFace])->GetBCParamDataBase();
+            if(bcData)
+            {
+                if (bcData->IsExist("uWall", PHDOUBLE, 1))
+                {
+                    bcData->GetData("uWall", &uWall, PHDOUBLE, 1);
+                    bcData->GetData("vWall", &vWall, PHDOUBLE, 1);
+                    bcData->GetData("wWall", &wWall, PHDOUBLE, 1);
+                }
+            }            
+
+            ADReal velocityXWall = uWall;
+            ADReal velocityYWall = vWall;
+            ADReal velocityZWall = wWall;
+            
+            primL[IU]   = velocityXWall;
+            primL[IV]   = velocityYWall;
+            primL[IW]   = velocityZWall;
+
+            primR[IU]   = velocityXWall;
+            primR[IV]   = velocityYWall;
+            primR[IW]   = velocityZWall;
+
+            if (wallTemperature <= 0.0)
+            {
+                //! Viscous WALL, adiabatic.
+            }
+            else
+            {
+                //! Iso-thermal wall.
+                ADReal tw = wallTemperature / refDimensionalTemperature;
+
+                // for (int m = 0; m < nEquation; ++ m)
+                // {
+                //     primitiveVariable[m] = qL[m][jFace];
+                // }
+
+                ADReal omav = one;
+                using namespace GAS_SPACE;
+                // if (nChemical == 1)
+                // {
+                //     omav = gas->ComputeMolecularWeightReciprocal(primitiveVariable);
+                // }
+
+                ADReal pressureWall = primL[IP];
+                ADReal rhoWall      = pressureWall / (coefficientOfStateEquation * tw * omav);
+
+                primL[IR]  = rhoWall;
+                primR[IR]  = rhoWall;
+            }
+        }
+
+
+          // GMRESVenkat 
+        if ( limiterType == ILMT_VENCAT && 
+             ( bcType == PHENGLEI::OUTFLOW || bcType == PHENGLEI::INTERFACE ) )
+        {
+            // Initialize the limiter with one
+            for ( int m = 0; m < limitnVariable; m++ )
+            {
+                limitL[m] = 1.0;
+                limitR[m] = 1.0;
+            }
+
+            // Limiter calculation
+            if ( limitVector == SCALAR_LIMITER )
+            {
+                TK_Exit::ExceptionExit("SCALAR_LIMITER for Venkat is not yet implemented\n");
+            }
+            else if ( limitVector == VECTOR_LIMITER )
+            {
+                        
+                for (int nVar = 0; nVar < limitnVariable; ++ nVar)
+                {
+
+                    if( IndexMinL[nVar] == le)
+                    {
+                        dminL = 0;
+                    }
+                    else
+                    {
+                        dminL   =   minL[nVar] - primL[nVar];
+                    }
+                    
+                    if( IndexMaxL[nVar] == le)
+                    {
+                        dmaxL = 0;
+                    }
+                    else
+                    {
+                        dmaxL   =   maxL[nVar] - primL[nVar];
+                    }
+
+                    // !!!!! pay attention to the interface
+                    // if( bcType == PHENGLEI::INTERFACE || bcType < 0 )
+                    // {
+                    //     dminL = MIN(dminL, primR[nVar]);
+                    //     dmaxL = MIN(dmaxL, primR[nVar]);
+                    // }
+
+                    // for (int index = 0; index < neighborCells[le].size(); index++)
+                    // {
+                    //     int neighborIndex       = neighborCells[le][index];
+                    //     if( neighborIndex != re)
+                    //     {
+                    //         ADReal  primNeighbor    = prim[nVar][neighborIndex];
+                    //         dminL = MIN(dminL, primNeighbor);
+                    //         dmaxL = MAX(dmaxL, primNeighbor);
+                    //     }
+                    // }
+
+
+                    ADReal eps_tmp = venkatCoeff * venkatCoeff * venkatCoeff;
+                    eps_tmp *= 1.0/pow(pow(averageVolume, 1.0/dimension), nExp);
+
+                    ADReal epsCellL =  eps_tmp*primL[nVar]*primL[nVar];
+                    epsCellL        *= pow(pow(vol[le],1.0/dimension),nExp);
+
+                    LimitSignL[nVar]   = 0;
+                    for (int index = 0; index < neighborCells[le].size(); index++)
+                    {
+                        int FaceIndex       = neighborFaces[le][index];
+                        RDouble dx  = xfc[FaceIndex] - xcc[le];
+                        RDouble dy  = yfc[FaceIndex] - ycc[le];
+                        RDouble dz  = zfc[FaceIndex] - zcc[le];
+
+                        ADReal dqFace = dqdxL[nVar] * dx + dqdyL[nVar] * dy + dqdzL[nVar] * dz;
+
+                        if( dqFace > SMALL )
+                        {
+                                ADReal x2   = dmaxL*dmaxL;
+                                ADReal xy   = dmaxL*dqFace;
+                                ADReal y2   = dqFace*dqFace; 
+                                ADReal temp = (x2 + epsCellL + 2.0 * xy) / (x2 + 2.0 * y2 + xy + epsCellL);
+                                
+                                if( temp < limitL[nVar] )
+                                {
+                                     limitL[nVar]       = temp;
+                                     LimitSignL[nVar]   = 1;
+                                }
+                        }
+                        else if( dqFace < -SMALL )
+                        {
+                                ADReal x2   = dminL*dminL;
+                                ADReal xy   = dminL*dqFace;
+                                ADReal y2   = dqFace*dqFace; 
+                                ADReal temp = (x2 + epsCellL + 2.0 * xy) / (x2 + 2.0 * y2 + xy + epsCellL);
+                                
+                                if( temp < limitL[nVar] )
+                                {
+                                     limitL[nVar]       = temp;
+                                     LimitSignL[nVar]   = -1;
+                                }
+                        }
+                        
+
+                    }
+
+                }
+            }
+        
+            // Reconstruct the left & right state using the limiter
+            if (reconstructMethod == RECONSTRUCT_USING_RESPECTIVE_LIMITER)
+            {
+
+                // reconstruct left state
+                RDouble dxL = xfc[kFace] - xcc[le];
+                RDouble dyL = yfc[kFace] - ycc[le];
+                RDouble dzL = zfc[kFace] - zcc[le];
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    primTry[m] = primL[m];
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    if(usingVectorLimiter)
+                    {
+                        primTry[m] += limitL[m] * (dqdxL[m] * dxL + dqdyL[m] * dyL + dqdzL[m] * dzL);
+
+                    }
+                    else
+                    {
+                        primTry[m] += limitL[0] * (dqdxL[m] * dxL + dqdyL[m] * dyL + dqdzL[m] * dzL);
+                    }
+
+                }
+
+                if ( (primTry[IR] > 0.0)&&(primTry[IP] > 0.0) )
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        primL[m] = primTry[m];
+                    }
+                }
+
+
+                // reconstruct right state
+                RDouble dxR = xfc[kFace] - xcc[re];
+                RDouble dyR = yfc[kFace] - ycc[re];
+                RDouble dzR = zfc[kFace] - zcc[re];
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    primTry[m] = primR[m];
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    if(usingVectorLimiter)
+                    {
+                        primTry[m] += limitR[m] * (dqdxR[m] * dxR + dqdyR[m] * dyR + dqdzR[m] * dzR);
+
+                    }
+                    else
+                    {
+                        primTry[m] += limitR[0] * (dqdxR[m] * dxR + dqdyR[m] * dyR + dqdzR[m] * dzR);
+                    }
+
+                }
+
+                if ( (primTry[IR] > 0.0)&&(primTry[IP] > 0.0) )
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        primR[m] = primTry[m];
+                    }
+                }
+
+
+            }
+            else
+            {
+
+                // reconstruct left state
+                RDouble dxL = xfc[kFace] - xcc[le];
+                RDouble dyL = yfc[kFace] - ycc[le];
+                RDouble dzL = zfc[kFace] - zcc[le];
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    primTry[m] = primL[m];
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    if(usingVectorLimiter)
+                    {
+                        primTry[m] += MIN(limitL[m], limitR[m]) * (dqdxL[m] * dxL + dqdyL[m] * dyL + dqdzL[m] * dzL);
+
+                    }
+                    else
+                    {
+                        primTry[m] += MIN(limitL[0], limitR[0]) * (dqdxL[m] * dxL + dqdyL[m] * dyL + dqdzL[m] * dzL);
+                    }
+
+                }
+
+                if ( (primTry[IR] > 0.0)&&(primTry[IP] > 0.0) )
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        primL[m] = primTry[m];
+                    }
+                }
+
+
+                // reconstruct right state
+                RDouble dxR = xfc[kFace] - xcc[re];
+                RDouble dyR = yfc[kFace] - ycc[re];
+                RDouble dzR = zfc[kFace] - zcc[re];
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    primTry[m] = primR[m];
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    if(usingVectorLimiter)
+                    {
+                        primTry[m] += MIN(limitR[m], limitL[m]) * (dqdxR[m] * dxR + dqdyR[m] * dyR + dqdzR[m] * dzR);
+
+                    }
+                    else
+                    {
+                        primTry[m] += MIN(limitR[0], limitL[0]) * (dqdxR[m] * dxR + dqdyR[m] * dyR + dqdzR[m] * dzR);
+                    }
+                }
+
+                if ( (primTry[IR] > 0.0)&&(primTry[IP] > 0.0) )
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        primR[m] = primTry[m];
+                    }
+                }
+
+
+            }
+        
+        }
+
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        // GMRES3D
+        if( unstructScheme == ISCHEME_GMRES_ROE )
+        {
+            Cal_GMRES_Roe_Scheme_Flux_PV(primL, primR, iFace, fluxp,
+                                        face_proxy, invSchemePara);
+        }
+        else if( unstructScheme == ISCHEME_GMRES_Steger )
+        {
+            Cal_GMRES_Steger_Scheme_Flux_PV(primL, primR, iFace, fluxp,
+                                        face_proxy, invSchemePara);
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("Error: this inv-scheme is not exist !\n", true);
+        }
+        
+
+        flux[IR][iFace] = fluxp[IR].val();
+        flux[IU][iFace] = fluxp[IU].val();
+        flux[IV][iFace] = fluxp[IV].val();
+        flux[IW][iFace] = fluxp[IW].val();
+        flux[IP][iFace] = fluxp[IP].val();
+
+        if ( limiterType == ILMT_VENCAT && 
+             ( bcType == PHENGLEI::OUTFLOW || bcType == PHENGLEI::INTERFACE ) )
+        {
+            for (int m = 0; m < nEquation; m++)
+            {
+                for (int n = 0; n < nEquation; ++ n)
+                {
+                    dFluxdpL[m][n] = fluxp[m].dx(n) * area;
+                    dFluxdpR[m][n] = fluxp[m].dx(halfIndependentVars + n) * area;
+                }
+                
+                for (int n = 0; n < nEquation; n++)
+                {
+                    dFluxdgradxL[m][n] = fluxp[m].dx(nEquation + n) * area;
+                    dFluxdgradyL[m][n] = fluxp[m].dx(nEquation + nEquation + n) * area;
+                    dFluxdgradzL[m][n] = fluxp[m].dx(nEquation + 2 * nEquation  + n) * area;
+                    dFluxdminL[m][n] = fluxp[m].dx(4 * nEquation  + n) * area;
+                    dFluxdmaxL[m][n] = fluxp[m].dx(5 * nEquation  + n) * area;
+                    dFluxdgradxR[m][n] = fluxp[m].dx(halfIndependentVars + nEquation + n) * area;
+                    dFluxdgradyR[m][n] = fluxp[m].dx(halfIndependentVars + nEquation + nEquation + n) * area;
+                    dFluxdgradzR[m][n] = fluxp[m].dx(halfIndependentVars + nEquation + 2 * nEquation + n) * area;
+                    dFluxdminR[m][n] = fluxp[m].dx(halfIndependentVars + 4 * nEquation  + n) * area;
+                    dFluxdmaxR[m][n] = fluxp[m].dx(halfIndependentVars + 5 * nEquation  + n) * area;
+                }
+            }
+        }
+        else
+        {
+            for (int m = 0; m < nEquation; m++)
+            {
+                for (int n = 0; n < nEquation; n++)
+                {
+                    dFluxdpL[m][n] = fluxp[m].dx(n) * area;
+                    dFluxdpR[m][n] = fluxp[m].dx(n + nEquation) * area;
+                }
+            }
+        }
+
+        // contributions from the bc
+        int indexre = (re - nTotalCell) * nEquation;
+        for (int indexI = 0; indexI < nEquation; indexI++)
+        {
+            for (int indexJ = 0; indexJ < nEquation; indexJ++)
+            {
+                dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre + indexJ];
+            }
+        }
+
+        // GMRESBCorrection
+        //if (find(wallFaceIndex->begin(), wallFaceIndex->end(), iFace) != wallFaceIndex->end())
+        if ( bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::SYMMETRY )
+        {
+            // GMRESPV , obtain the dqdcv for the left cell
+            gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+
+            // average of the dFluxdpL and dFluxdpR
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    dFluxdpwall[indexI][indexJ] = 0.5 * (dFluxdpL[indexI][indexJ] + dFluxdpR[indexI][indexJ]);
+                    dFluxdpL[indexI][indexJ] = dFluxdpwall[indexI][indexJ];
+                    dFluxdpR[indexI][indexJ] = dFluxdpwall[indexI][indexJ];
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then minus to the corresponding location in dRdq.
+            int indexf = re * nEquation; // first index
+            int indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        /* dRdq[indexf+indexI][indexs+indexJ] -= dFluxdpwall[indexI][indexK]*
+                                                                dqdcvL[indexK][indexJ]; */
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpwall[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // contributions from the bc,
+            // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        dFluxdpL[indexI][indexJ] += dFluxdpwall[indexI][indexK] *
+                                                    dDdPlocal[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        /* dRdq[indexf+indexI][indexs+indexJ] += dFluxdpL[indexI][indexK]*
+                                                                dqdcvL[indexK][indexJ]; */
+                        dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // GMRESPV , obtain the dqdcv for the right cell
+            gas->dPrimitive2dConservative(primRC, gmR, dqdcvR);
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then minus to the corresponding location in dRdq.
+            indexf = re * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        /*dRdq[indexf+indexI][indexs+indexJ] -= dFluxdpR[indexI][indexK]*
+                                                                dqdcvR[indexK][indexJ];*/
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        /* dRdq[indexf+indexI][indexs+indexJ] += dFluxdpR[indexI][indexK]*
+                                                                dqdcvR[indexK][indexJ]; */
+                        dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            if(JacOrder == 2)
+            {
+                // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+                // then minus to the corresponding location in dRdq.
+                colidx = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, re, le);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq1st[indexI][colidx + indexJ] -= dFluxdpwall[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, le, le);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq1st[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+                // then minus to the corresponding location in dRdq.
+                indexf = re * nEquation; // first index
+                indexs = re * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, re, re);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq1st[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = re * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, le, re);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq1st[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+            }
+        }
+        //! GMRESParallel 
+        else if (bcType == PHENGLEI::INTERFACE)
+        {
+            if(JacOrder == 2)
+            {
+                 // obtain the dqdcv for the left cell
+                gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+                int indexf = le * nEquation;
+                int dndexs = le * nEquation;
+                colidx = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, le, le);
+                for (int indexI = 0; indexI < nEquation; indexI ++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq1st[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+            }
+
+            if(limiterType == ILMT_FIRST)
+            {
+                // obtain the dqdcv for the left cell
+                gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+
+                int indexf = le * nEquation;
+                int indexs = le * nEquation;
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                indexf = re * nEquation;
+                indexs = le * nEquation;
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+            }
+            else if(limiterType ==ILMT_NOLIM)
+            {
+                                Lsign = qlsign[iFace];
+                Rsign = qrsign[iFace];
+                int jFace = iFace + localStart; // absolute face index
+
+                if(Lsign > 0)
+                {
+                    dxL = xfc[jFace] - xcc[le];
+                    dyL = yfc[jFace] - ycc[le];
+                    dzL = zfc[jFace] - zcc[le];
+                }
+                else
+                {
+                    dxL = 0.0;
+                    dyL = 0.0;
+                    dzL = 0.0;
+                }
+
+                if(Rsign > 0)
+                {
+                    dxR = xfc[jFace] - xcc[re];
+                    dyR = yfc[jFace] - ycc[re];
+                    dzR = zfc[jFace] - zcc[re];
+                }
+                else
+                {
+                    dxR = 0.0;
+                    dyR = 0.0;
+                    dzR = 0.0;
+                }
+
+                // obtain the dqdcv
+                gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+
+                int indexf1 = le * nEquation;
+                int indexf2 = re * nEquation;
+                int indexs  = le * nEquation;
+                int colidx1 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            RDouble tmp = dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                            dRdq[indexI][colidx1 + indexJ] += tmp;
+                            dRdq[indexI][colidx2 + indexJ] -= tmp;
+                            // if(PHMPI::GetCurrentProcessorID() == 2 && le == 138)
+                            // {
+                            //     printf("dFluxdpR %lf, dqdcvR %lf\n", dFluxdpL[indexI][indexK], dqdcvL[indexK][indexJ]);
+                            // }
+                        }
+                    }
+                }
+
+                // considering the perturbation of the gradient in the limiter
+                RDouble fnx = nsx[jFace];
+                RDouble fny = nsy[jFace];
+                RDouble fnz = nsz[jFace];
+                RDouble farea = ns[jFace];
+
+                RDouble volume = vol[re];
+                dGdqx = -1.0 * 0.5 / volume * farea * fnx;
+                dGdqy = -1.0 * 0.5 / volume * farea * fny;
+                dGdqz = -1.0 * 0.5 / volume * farea * fnz;
+                RDouble dGrad = dGdqx * dxR + dGdqy * dyR + dGdqz * dzR;
+
+                for (int indexI = 0; indexI < nEquation; indexI ++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            RDouble tmp = dGrad * dFluxdpR[indexI][indexK] * dqdcvL[indexK][indexJ];
+                            dRdq[indexI][colidx1 + indexJ] += tmp;
+                            dRdq[indexI][colidx2 + indexJ] -= tmp;
+                        }
+                    }
+                }
+
+
+                for (int index = 0; index < neighborCells[le].size(); index++)
+                {
+                    int neighborIndex = neighborCells[le][index];
+                    if(neighborIndex != re)
+                    {
+                        int faceIndex = neighborFaces[le][index]; // absolute face index
+                        // judge whether it is the boundary face as well and obtain its boundary type
+                        bool isGhostCell = false;
+                        UnstructBC *neighborBCRegion = nullptr;
+                        int neighborBCType;
+                        if (neighborIndex >= nTotalCell)
+                        {
+                            isGhostCell = true;
+                            neighborBCRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[faceIndex]);
+                            neighborBCType = neighborBCRegion->GetBCType();
+                        }
+
+                        int sign = neighborLR[le][index];
+                        RDouble fnx = nsx[faceIndex];
+                        RDouble fny = nsy[faceIndex];
+                        RDouble fnz = nsz[faceIndex];
+                        RDouble farea = ns[faceIndex];
+
+                        RDouble volume = vol[le];
+                        for (int m = 0; m < nEquation; m++)
+                        {
+                            primN[m] = prim[m][neighborIndex];
+                        }
+
+                        gas->dPrimitive2dConservative(primN, gama[neighborIndex], dqdcvN);
+
+                        dGdqx = sign * 0.5 / volume * farea * fnx;
+                        dGdqy = sign * 0.5 / volume * farea * fny;
+                        dGdqz = sign * 0.5 / volume * farea * fnz;
+
+                        dGrad = dGdqx * dxL + dGdqy * dyL + dGdqz * dzL;
+
+                        int indexf1 = le * nEquation;
+                        int indexf2 = re * nEquation;
+                        int indexs  = neighborIndex * nEquation;
+                        int colidx1 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                        int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                        for (int indexI = 0; indexI < nEquation; indexI++)
+                        {
+                            for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                            {
+                                for (int indexK = 0; indexK < nEquation; indexK++)
+                                {
+                                    RDouble tmp = dGrad * dFluxdpL[indexI][indexK] * dqdcvN[indexK][indexJ];
+                                    dRdq[indexI][colidx1 + indexJ] += tmp;
+                                    dRdq[indexI][colidx2 + indexJ] -= tmp;
+                                }
+                            }
+                        }
+
+                        if (isGhostCell && neighborBCType != PHENGLEI::INTERFACE)
+                        {
+                            int indexre = (neighborIndex - nTotalCell) * nEquation;
+                            for (int indexI = 0; indexI < nEquation; indexI++)
+                            {
+                                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                                {
+                                    dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre + indexJ];
+                                }
+                            }
+
+                            //HINT: this can be deleted
+                            if(sign != 1.0) {
+                                TK_Exit::ExceptionExit("sign is fault in Flux_Inviscid.cpp");
+                            }
+
+                            // contribution from the bc
+                            // dFluxdpL = dFluxdpL + dFluxdpR * dDdPlocal
+                            for (int indexI = 0; indexI < nEquation; indexI++)
+                            {
+                                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                                {
+                                    dFluxdtmp[indexI][indexJ] = 0.0;
+                                    for (int indexK = 0; indexK < nEquation; indexK++)
+                                    {
+                                        dFluxdtmp[indexI][indexJ] += dGrad * dFluxdpL[indexI][indexK] * dDdPlocal[indexK][indexJ];
+                                    }
+                                }
+                            }
+                            
+                            gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+                            colidx1 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                            colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                            for (int indexI = 0; indexI < nEquation; indexI++)
+                            {
+                                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                                {
+                                    for (int indexK = 0; indexK < nEquation; indexK++)
+                                    {
+                                        RDouble tmp = dFluxdtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+                                        dRdq[indexI][colidx1 + indexJ] += tmp;
+                                        dRdq[indexI][colidx2 + indexJ] -= tmp;
+                                    }
+                                }
+                            }
+                        }
+                    }
+                }
+            }
+        }
+        else
+        {
+            if(JacOrder == 2)
+            {
+                // GMRESPV , obtain the dqdcv for the left cell
+                gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+
+                // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+                // then minus to the corresponding location in dRdq.
+                int indexf = re * nEquation; // first index
+                int indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, re, le);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq1st[indexI][colidx + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // contributions from the bc,
+                // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dFluxdpL[indexI][indexJ] += dFluxdpR[indexI][indexK] *
+                                                        dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, le, le);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq1st[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // GMRESPV , obtain the dqdcv for the right cell
+                gas->dPrimitive2dConservative(primRC, gmR, dqdcvR);
+
+                // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+                // then minus to the corresponding location in dRdq.
+                indexf = re * nEquation; // first index
+                indexs = re * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, re, re);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq1st[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = re * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, le, re);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq1st[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+
+                
+                if ( limiterType == ILMT_VENCAT && 
+                    ( bcType == PHENGLEI::OUTFLOW || bcType == PHENGLEI::INTERFACE ) )
+                {
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        for (int n = 0; n < nEquation; ++ n)
+                        {
+                            dFluxdpL[m][n] = fluxp[m].dx(n) * area;
+                            dFluxdpR[m][n] = fluxp[m].dx(halfIndependentVars + n) * area;
+                        }
+
+                    }
+                }
+                else
+                {
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        for (int n = 0; n < nEquation; n++)
+                        {
+                            dFluxdpL[m][n] = fluxp[m].dx(n) * area;
+                            dFluxdpR[m][n] = fluxp[m].dx(n + nEquation) * area;
+                        }
+                    }
+                }
+            }
+            
+            if ( limiterType == ILMT_FIRST || 
+                 (limiterType == ILMT_VENCAT && 
+                    (bcType != PHENGLEI::OUTFLOW && bcType != PHENGLEI::INTERFACE )))
+            {
+                // GMRESPV , obtain the dqdcv for the left cell
+                gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+
+                // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+                // then minus to the corresponding location in dRdq.
+                int indexf = re * nEquation; // first index
+                int indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // contributions from the bc,
+                // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dFluxdpL[indexI][indexJ] += dFluxdpR[indexI][indexK] *
+                                                        dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+
+                            dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // GMRESPV , obtain the dqdcv for the right cell
+                gas->dPrimitive2dConservative(primRC, gmR, dqdcvR);
+
+                // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+                // then minus to the corresponding location in dRdq.
+                indexf = re * nEquation; // first index
+                indexs = re * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = re * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            /* dRdq[indexf+indexI][indexs+indexJ] += dFluxdpR[indexI][indexK]*
+                                                                    dqdcvR[indexK][indexJ]; */
+                            dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+            }
+            else if (limiterType == ILMT_NOLIM)
+            {
+                Lsign = qlsign[iFace];
+                Rsign = qrsign[iFace];
+                int jFace = iFace + localStart; // absolute face index
+
+                // GMRESgrad
+                if (Lsign > 0)
+                {
+                    dxL = xfc[jFace] - xcc[le];
+                    dyL = yfc[jFace] - ycc[le];
+                    dzL = zfc[jFace] - zcc[le];
+                }
+                else
+                {
+                    dxL = 0.0;
+                    dyL = 0.0;
+                    dzL = 0.0;
+                }
+
+                dxR = 0.0;
+                dyR = 0.0;
+                dzR = 0.0;
+                // GMRESPV , obtain the dqdcv for the left cell
+                gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+
+                // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+                // then minus to the corresponding location in dRdq.
+                int indexf = re * nEquation; // first index
+                int indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // contributions from the bc,
+                // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        dFluxdtmp[indexI][indexJ] = 0.0;
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dFluxdtmp[indexI][indexJ] += dFluxdpR[indexI][indexK] *
+                                                        dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] += dFluxdtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+                            dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // GMRESPV , obtain the dqdcv for the right cell
+                gas->dPrimitive2dConservative(primRC, gmR, dqdcvR);
+
+                // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+                // then minus to the corresponding location in dRdq.
+                indexf = re * nEquation; // first index
+                indexs = re * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = re * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // considering the perturbation of the gradient in the limiter
+                RDouble fnx = nsx[jFace];
+                RDouble fny = nsy[jFace];
+                RDouble fnz = nsz[jFace];
+                RDouble farea = ns[jFace];
+                RDouble volume = vol[re];
+
+                // dgradRdqL
+                dGdqx = -1.0 * 0.5 / volume * farea * fnx;
+                dGdqy = -1.0 * 0.5 / volume * farea * fny;
+                dGdqz = -1.0 * 0.5 / volume * farea * fnz;
+
+                // dQre/dgradR*dgradRdqL
+                RDouble dGrad = dGdqx * dxR + dGdqy * dyR + dGdqz * dzR;
+
+                // convert dGrad by right multiplying the dqdcvL,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] += dGrad * dFluxdpR[indexI][indexK] * dqdcvL[indexK][indexJ];
+                            dRdq[indexI][colidx2 + indexJ] -= dGrad * dFluxdpR[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // considering the perturbation of the gradient in the limiter
+                volume = vol[le];
+
+                // dgradLdqR
+                dGdqx = 1.0 * 0.5 / volume * farea * fnx;
+                dGdqy = 1.0 * 0.5 / volume * farea * fny;
+                dGdqz = 1.0 * 0.5 / volume * farea * fnz;
+
+                dGrad = dGdqx * dxL + dGdqy * dyL + dGdqz * dzL;
+
+                // convert dGrad by right multiplying the dqdcvL,
+                // then add to the corresponding location in dRdq.
+
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        dFluxdtmp[indexI][indexJ] = 0.0;
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dFluxdtmp[indexI][indexJ] += dGrad * dFluxdpL[indexI][indexK] *
+                                                        dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                int colidx3 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] += dGrad * dFluxdpL[indexI][indexK] * dqdcvR[indexK][indexJ];
+                            dRdq[indexI][colidx2 + indexJ] -= dGrad * dFluxdpL[indexI][indexK] * dqdcvR[indexK][indexJ];
+                            dRdq[indexI][colidx3 + indexJ] += dFluxdtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // the neighbors of the left cells
+                for (int index = 0; index < neighborCells[le].size(); index++)
+                {
+                    int neighborIndex = neighborCells[le][index];
+                    // std::cout << "Neighbors of the left cells: " << neighborIndex << " \n";
+
+                    if (neighborIndex != re)
+                    {
+                        int Faceindex = neighborFaces[le][index];
+                        // judge whether it is the boundary face as well and obtain its boundary type
+                        bool isGhostCell = false;
+                        UnstructBC *neighborBCRegion = nullptr;
+                        int neighborBCType;
+                        if (neighborIndex >= nTotalCell)
+                        {
+                            isGhostCell = true;
+                            neighborBCRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[Faceindex]);
+                            neighborBCType = neighborBCRegion->GetBCType();
+                        }
+
+                        int sign = neighborLR[le][index];
+                        RDouble fnx = nsx[Faceindex];
+                        RDouble fny = nsy[Faceindex];
+                        RDouble fnz = nsz[Faceindex];
+                        RDouble farea = ns[Faceindex];
+                        RDouble volume = vol[le];
+
+                        for (int m = 0; m < nEquation; m++)
+                        {
+                            primN[m] = prim[m][neighborIndex];
+                        }
+                        gas->dPrimitive2dConservative(primN, gama[neighborIndex], dqdcvN);
+                        // dgradLdqN
+                        dGdqx = sign * 0.5 / volume * farea * fnx;
+                        dGdqy = sign * 0.5 / volume * farea * fny;
+                        dGdqz = sign * 0.5 / volume * farea * fnz;
+
+                        // dQle/dgradL*dgradLdqN
+                        dGrad = dGdqx * dxL + dGdqy * dyL + dGdqz * dzL;
+
+                        int indexf = le * nEquation;            // first index
+                        int indexs = neighborIndex * nEquation; // second index
+                        int indexf2 = re * nEquation;
+                        int colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                        int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                     
+                        for (int indexI = 0; indexI < nEquation; indexI++)
+                        {
+                            for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                            {
+
+                                for (int indexK = 0; indexK < nEquation; indexK++)
+                                {
+                                    // dRL/dqLNeighbors
+                                    dRdq[indexI][colidx + indexJ] += dGrad * dFluxdpL[indexI][indexK] *
+                                                                    dqdcvN[indexK][indexJ];
+
+                                    // dRR/dqLNeighbors
+                                    dRdq[indexI][colidx2 + indexJ] -= dGrad * dFluxdpL[indexI][indexK] *
+                                                                    dqdcvN[indexK][indexJ];
+                                }
+                            }
+
+                        }
+
+                        if(isGhostCell && neighborBCType != PHENGLEI::INTERFACE)
+                        {
+                            int indexre = (neighborIndex - nTotalCell) * nEquation;
+                            for (int indexI = 0; indexI < nEquation; indexI++)
+                            {
+                                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                                {
+                                    dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre + indexJ];
+                                }
+                            }
+
+                            // HINT: this can be deleted
+                            if(sign != 1.0)
+                            {
+                                TK_Exit::ExceptionExit("sign is falut in Flux_Inviscid.cpp 2");
+                            }
+
+                            // contribution from the bc
+                            // dFluxdpL = dFluxdpL + dFluxdpR * dDdPlocal
+                            for (int indexI = 0; indexI < nEquation; indexI++)
+                            {
+                                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                                {
+                                    dFluxdtmp[indexI][indexJ] = 0.0;
+                                    for (int indexK = 0; indexK < nEquation; indexK++)
+                                    {
+                                        dFluxdtmp[indexI][indexJ] += dGrad * dFluxdpL[indexI][indexK] * dDdPlocal[indexK][indexJ];
+                                    }
+                                }
+                            }
+
+                            gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+                            colidx  = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                            colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                            for (int indexI = 0; indexI < nEquation; indexI++)
+                            {
+                                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                                {
+                                    for (int indexK = 0; indexK < nEquation; indexK++)
+                                    {
+                                        RDouble tmp = dFluxdtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+                                        dRdq[indexI][colidx  + indexJ] += tmp;
+                                        dRdq[indexI][colidx2 + indexJ] -= tmp;
+                                    }
+                                }
+                            }
+
+                    }
+                }
+              }
+            }
+            else if (limiterType == ILMT_VENCAT && 
+                     ( bcType == PHENGLEI::OUTFLOW || bcType == PHENGLEI::INTERFACE ))
+            {
+
+                // GMRESPV , obtain the dqdcv for the left cell
+                gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+                
+                // GMRESPV , obtain the dqdcv for the right cell
+                gas->dPrimitive2dConservative(primRC, gmR, dqdcvR);
+
+                // convert dFluxdp to dFluxdcv by right multiplying the dqdcvL/dqdcvR,
+                // then add/minus to the corresponding location in dRdq.
+                
+                int colidx1 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                // int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                int colidx3 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                int colidx4 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx1 + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+
+                            dRdq[indexI][colidx3 + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+
+                            dRdq[indexI][colidx4 + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+
+
+                // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dFluxdpL[indexI][indexJ]  += dFluxdpR[indexI][indexK]*
+                                                        dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+
+                int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx2 + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+
+                        }
+                    }
+                }
+
+
+                // considering the perturbation of the gradient in the flux calculation
+                RDouble fnx         = nsx[kFace];
+                RDouble fny         = nsy[kFace];
+                RDouble fnz         = nsz[kFace];
+                RDouble farea       = ns[kFace];
+                RDouble volume      = vol[re];
+
+
+                #ifdef RightBCGradient
+                // dgradtmp = dfluxdgradxR*dgradRdqLx + dfluxdgradyR*dgradRdqLy + dfluxdgradzR*dgraddqLz
+                // dRdq[le][le] += dgradtmp*dqdcvL
+                gas->dGradient2dPrimitive(primLC,-1,dgraddqx, 'x', fnx, fny, fnz, farea,volume, nEquation);
+                gas->dGradient2dPrimitive(primLC,-1,dgraddqy, 'y', fnx, fny, fnz, farea,volume, nEquation);
+                gas->dGradient2dPrimitive(primLC,-1,dgraddqz, 'z', fnx, fny, fnz, farea,volume, nEquation);
+
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dGradtmp[indexI][indexJ] = 0;
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dGradtmp[indexI][indexJ] += dFluxdgradxR[indexI][indexK] * dgraddqx[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradyR[indexI][indexK] * dgraddqy[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradzR[indexI][indexK] * dgraddqz[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dGradtmp by right multiplying the dqdcvL,
+                // then add to the corresponding location in dRdq.
+                // indexf = le * nEquation; // first index
+                // indexs = le * nEquation; // second index
+                colidx1      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                colidx2      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx1+indexJ] += dGradtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+
+                            dRdq[indexI][colidx2+indexJ] -= dGradtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+                #endif
+
+                fnx         = nsx[kFace];
+                fny         = nsy[kFace];
+                fnz         = nsz[kFace];
+                farea       = ns[kFace];
+                volume      = vol[le];
+                // dgradtmp = dfluxdgradxL*dgradLdqRx + dfluxdgradyL*dgradLdqRy + dfluxdgradzL*dgradLdqRz
+                // dRdq[le][re] += dgradtmp*dqdcvL
+
+                gas->dGradient2dPrimitive(primRC,1,dgraddqx, 'x', fnx, fny, fnz, farea,volume, nEquation);
+                gas->dGradient2dPrimitive(primRC,1,dgraddqy, 'y', fnx, fny, fnz, farea,volume, nEquation);
+                gas->dGradient2dPrimitive(primRC,1,dgraddqz, 'z', fnx, fny, fnz, farea,volume, nEquation);
+
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dGradtmp[indexI][indexJ] = 0;
+                        
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dGradtmp[indexI][indexJ] += dFluxdgradxL[indexI][indexK]*
+                                                                    dgraddqx[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradyL[indexI][indexK]*
+                                                                    dgraddqy[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradzL[indexI][indexK]*
+                                                                    dgraddqz[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dGradtmp by right multiplying the dqdcvL,
+                // then add to the corresponding location in dRdq.
+            
+                colidx1      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                colidx2      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            
+                            dRdq[indexI][colidx1+indexJ] += dGradtmp[indexI][indexK]*
+                                                                    dqdcvR[indexK][indexJ];
+
+                            dRdq[indexI][colidx2+indexJ] -= dGradtmp[indexI][indexK]*
+                                                                    dqdcvR[indexK][indexJ];
+                                                    
+                        }
+                    }
+                }
+
+
+                // contributions from the bc, 
+                // dFluxdPR*dDdPlocal
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dGradtmpBC[indexI][indexJ] = 0.0;
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dGradtmpBC[indexI][indexJ]  += dGradtmp[indexI][indexK]*
+                                                            dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+
+                colidx1      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx1+indexJ] += dGradtmpBC[indexI][indexK]*
+                                                                    dqdcvL[indexK][indexJ];
+
+                        }
+                    }
+                }
+
+
+                // the neighbors of the left cells
+                for(int index = 0; index < neighborCells[le].size(); index++)
+                {
+                    int neighborIndex = neighborCells[le][index];
+
+                    if(neighborIndex != re)
+                    {
+                        int Faceindex   = neighborFaces[le][index];
+                        int sign        = neighborLR[le][index];
+                        RDouble fnx     = nsx[Faceindex];
+                        RDouble fny     = nsy[Faceindex];
+                        RDouble fnz     = nsz[Faceindex];
+                        RDouble farea   = ns[Faceindex];
+                        RDouble volume  = vol[le];
+
+                        for (int m = 0; m < nEquation; m++)
+                        {
+                            primN[m] = prim[m][neighborIndex];
+                        }
+
+                        gas->dPrimitive2dConservative(primN, gama[neighborIndex], dqdcvN);
+
+                        gas->dGradient2dPrimitive(primN,sign,dgraddqx, 'x', fnx, fny, fnz, farea, volume, nEquation);
+                        gas->dGradient2dPrimitive(primN,sign,dgraddqy, 'y', fnx, fny, fnz, farea, volume, nEquation);
+                        gas->dGradient2dPrimitive(primN,sign,dgraddqz, 'z', fnx, fny, fnz, farea, volume, nEquation);
+
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+                                dGradtmp[indexI][indexJ] = 0;
+
+                                for(int indexK=0; indexK < nEquation; indexK++)
+                                {
+                                    dGradtmp[indexI][indexJ] += dFluxdgradxL[indexI][indexK]*
+                                                                            dgraddqx[indexK][indexJ];
+                                    dGradtmp[indexI][indexJ] += dFluxdgradyL[indexI][indexK]*
+                                                                            dgraddqy[indexK][indexJ];
+                                    dGradtmp[indexI][indexJ] += dFluxdgradzL[indexI][indexK]*
+                                                                            dgraddqz[indexK][indexJ];
+                                }
+                            }
+                        }
+
+                        colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                        colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+
+                                for(int indexK=0; indexK < nEquation; indexK++)
+                                {
+                                    // dRL/dqLNeighbors += dRL/dGradL*dGradL/dqLNeighbors ===> dFluxdgradL*dgraddq
+                                    dRdq[indexI][colidx1+indexJ] += dGradtmp[indexI][indexK]*
+                                                                            dqdcvN[indexK][indexJ];
+                                    
+                                    // dRR/dqLNeighbors -= dRR/dGradL*dGradL/dqLNeighbors ===> dFluxdgradL*dgraddq
+                                    dRdq[indexI][colidx2+indexJ] -= dGradtmp[indexI][indexK]*
+                                                                            dqdcvN[indexK][indexJ];
+                                }
+                            }
+                        }
+
+                        // GMRES2ndBCs
+                        if( Faceindex < nBoundFace )
+                        {
+
+                            // contributions from the bc
+                            int indexre = (neighborIndex-nTotalCell)*nEquation;
+                            for(int indexI=0; indexI < nEquation; indexI++)
+                            {
+                                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                {
+                                    dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+                                }
+                            }
+
+
+                            // contributions from the bc, 
+                            // dFluxdPR*dDdPlocal
+                            for(int indexI=0; indexI < nEquation; indexI++)
+                            {
+                                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                {
+                                    dGradtmpBC[indexI][indexJ] = 0.0;
+                                    for(int indexK=0; indexK < nEquation; indexK++)
+                                    {
+                                        dGradtmpBC[indexI][indexJ]  += dGradtmp[indexI][indexK]*
+                                                                        dDdPlocal[indexK][indexJ];
+                                    }
+                                }
+                            }
+
+                            gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+                            int colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                            int colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                            for(int indexI=0; indexI < nEquation; indexI++)
+                            {
+                                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                {
+                                    for(int indexK=0; indexK < nEquation; indexK++)
+                                    {
+                                        dRdq[indexI][colidx1+indexJ] += dGradtmpBC[indexI][indexK] * dqdcvL[indexK][indexJ];
+                                        dRdq[indexI][colidx2+indexJ] -= dGradtmpBC[indexI][indexK] * dqdcvL[indexK][indexJ];
+
+                                    }
+                                }
+                            }
+
+
+                        }                  
+                    }
+                }
+
+
+                #ifdef BCRightCells
+                // the neighbors of the right cells
+                for(int index = 0; index < neighborCells[re].size(); index++)
+                {
+                    int neighborIndex = neighborCells[re][index];
+
+                    if(neighborIndex != le)
+                    {
+                        int Faceindex       = neighborFaces[re][index];
+                        int sign            = neighborLR[re][index];
+                        RDouble fnx         = nsx[Faceindex];
+                        RDouble fny         = nsy[Faceindex];
+                        RDouble fnz         = nsz[Faceindex];
+                        RDouble farea       = ns[Faceindex];
+                        RDouble volume      = vol[re];
+            
+
+                        for (int m = 0; m < nEquation; m++)
+                        {
+                            primN[m] = prim[m][neighborIndex];
+                        }
+
+                        gas->dPrimitive2dConservative(primN, gama[neighborIndex], dqdcvN);
+            
+                        gas->dGradient2dPrimitive(primN,sign,dgraddqx, 'x', fnx, fny, fnz, farea, volume, nEquation);
+                        gas->dGradient2dPrimitive(primN,sign,dgraddqy, 'y', fnx, fny, fnz, farea, volume, nEquation);
+                        gas->dGradient2dPrimitive(primN,sign,dgraddqz, 'z', fnx, fny, fnz, farea, volume, nEquation);
+            
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+                                dGradtmp[indexI][indexJ] = 0;
+                                for(int indexK=0; indexK < nEquation; indexK++)
+                                {
+                                    dGradtmp[indexI][indexJ] += dFluxdgradxR[indexI][indexK]*
+                                                                            dgraddqx[indexK][indexJ];
+                                    dGradtmp[indexI][indexJ] += dFluxdgradyR[indexI][indexK]*
+                                                                            dgraddqy[indexK][indexJ];
+                                    dGradtmp[indexI][indexJ] += dFluxdgradzR[indexI][indexK]*
+                                                                            dgraddqz[indexK][indexJ];
+                                }
+                            }
+                        }
+            
+                        colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                        colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+                                for(int indexK=0; indexK < nEquation; indexK++)
+                                {
+                                    
+                                    // dRL/dqRNeighbors += dRL/dGradR*dGradR/dqRNeighbors ===> dFluxdgradR*dgraddq
+                                    dRdq[indexI][colidx1+indexJ] += dGradtmp[indexI][indexK]*
+                                                                            dqdcvN[indexK][indexJ];
+
+
+                                    // dRR/dqRNeighbors -= dRR/dGradR*dGradR/dqRNeighbors ===> dFluxdgradR*dgraddq
+                                    dRdq[indexI][colidx2+indexJ] -= dGradtmp[indexI][indexK]*
+                                                                            dqdcvN[indexK][indexJ];
+                                }
+                            }
+                        }
+                    }   
+                }
+                
+                #endif
+
+
+                for (int nVar = 0; nVar < limitnVariable; ++ nVar)
+                {
+                    for( int n = 0; n < nEquation; n++ )
+                    {
+                        for( int m = 0; m < nEquation; m++ )
+                        {
+                            dFluxdMinMax[n][m] = 0.0;     
+                        }
+                    }
+
+                    if( LimitSignL[nVar] == 1 )
+                    {
+                        int indexmax = IndexMaxL[nVar];
+                        if( indexmax != le )
+                        {
+                            for (int m = 0; m < nEquation; m++)
+                            {
+                                dFluxdMinMax[m][nVar]   = dFluxdmaxL[m][nVar];
+                                primN[m]                = prim[m][indexmax];
+                            }
+
+                            gas->dPrimitive2dConservative(primN, gama[indexmax], dqdcvN);
+
+                            int colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, indexmax);
+                            int colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, indexmax);
+                            for(int indexI=0; indexI < nEquation; indexI++)
+                            {
+                                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                {
+                                    for(int indexK=0; indexK < nEquation; indexK++)
+                                    {
+
+                                        dRdq[indexI][colidx1+indexJ] += dFluxdMinMax[indexI][indexK]*
+                                                                                dqdcvN[indexK][indexJ];
+
+                                        dRdq[indexI][colidx2+indexJ] -= dFluxdMinMax[indexI][indexK]*
+                                                                                dqdcvN[indexK][indexJ];
+                                    }
+                                }
+                            }
+
+                            // GMRES2ndBCs
+                            if( indexmax >= nTotalCell )
+                            {
+                                // contributions from the bc
+                                int indexre = (indexmax-nTotalCell)*nEquation;
+                                for(int indexI=0; indexI < nEquation; indexI++)
+                                {
+                                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                    {
+                                        dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+                                    }
+                                }
+
+
+
+                                for(int indexI=0; indexI < nEquation; indexI++)
+                                {
+                                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                    {
+                                        dGradtmpBC[indexI][indexJ] = 0.0;
+                                        for(int indexK=0; indexK < nEquation; indexK++)
+                                        {
+                                            dGradtmpBC[indexI][indexJ]  += dFluxdMinMax[indexI][indexK]*
+                                                                            dDdPlocal[indexK][indexJ];
+                                        }
+                                    }
+                                }
+
+                                gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+                                int colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                                int colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                                for(int indexI=0; indexI < nEquation; indexI++)
+                                {
+                                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                    {
+                                        for(int indexK=0; indexK < nEquation; indexK++)
+                                        {
+                                            dRdq[indexI][colidx1+indexJ] += dGradtmpBC[indexI][indexK] * dqdcvL[indexK][indexJ];
+                                            dRdq[indexI][colidx2+indexJ] -= dGradtmpBC[indexI][indexK] * dqdcvL[indexK][indexJ];
+
+                                        }
+                                    }
+                                }
+                            }            
+            
+
+                        }
+                    }
+                    else if ( LimitSignL[nVar] == -1 )
+                    {
+                        int indexmin = IndexMinL[nVar];
+                        if( indexmin != le )
+                        {
+                            for (int m = 0; m < nEquation; m++)
+                            {
+                                dFluxdMinMax[m][nVar]   = dFluxdminL[m][nVar];
+                                primN[m]                = prim[m][indexmin];
+                            }
+
+                            gas->dPrimitive2dConservative(primN, gama[indexmin], dqdcvN);
+
+                            int colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, indexmin);
+                            int colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, indexmin);
+                            for(int indexI=0; indexI < nEquation; indexI++)
+                            {
+                                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                {
+                                    for(int indexK=0; indexK < nEquation; indexK++)
+                                    {
+
+                                        dRdq[indexI][colidx1+indexJ] += dFluxdMinMax[indexI][indexK]*
+                                                                                dqdcvN[indexK][indexJ];
+
+                                        dRdq[indexI][colidx2+indexJ] -= dFluxdMinMax[indexI][indexK]*
+                                                                                dqdcvN[indexK][indexJ];
+                                    }
+                                }
+                            }
+
+                            // GMRES2ndBCs
+                            if( indexmin >= nTotalCell )
+                            {
+                                // contributions from the bc
+                                int indexre = (indexmin-nTotalCell)*nEquation;
+                                for(int indexI=0; indexI < nEquation; indexI++)
+                                {
+                                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                    {
+                                        dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+                                    }
+                                }
+    
+    
+                                // contributions from the bc, 
+                                // dFluxdPR*dDdPlocal
+                                for(int indexI=0; indexI < nEquation; indexI++)
+                                {
+                                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                    {
+                                        dGradtmpBC[indexI][indexJ] = 0.0;
+                                        for(int indexK=0; indexK < nEquation; indexK++)
+                                        {
+                                            dGradtmpBC[indexI][indexJ]  += dFluxdMinMax[indexI][indexK]*
+                                                                            dDdPlocal[indexK][indexJ];
+                                        }
+                                    }
+                                }
+    
+                                gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+                                int colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                                int colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                                for(int indexI=0; indexI < nEquation; indexI++)
+                                {
+                                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                    {
+                                        for(int indexK=0; indexK < nEquation; indexK++)
+                                        {
+                                            dRdq[indexI][colidx1+indexJ] += dGradtmpBC[indexI][indexK] * dqdcvL[indexK][indexJ];
+                                            dRdq[indexI][colidx2+indexJ] -= dGradtmpBC[indexI][indexK] * dqdcvL[indexK][indexJ];
+        
+                                        }
+                                    }
+                                }
+                            }                           
+
+                        }
+                    }
+
+                }
+
+
+
+
+
+            }
+        
+        }
+    }
+
+
+    for (int iFace = nMid; iFace < nLength; ++iFace)
+    {
+        int le = leftcellindexofFace[iFace];
+        int re = rightcellindexofFace[iFace];
+        int colidx;
+        RDouble area = areas[iFace];
+        int jFace = iFace + localStart; // absolute face index
+        
+        if ( limiterType == ILMT_VENCAT )
+        {
+            
+            if (limitVector != 0 || limitModel != 0)
+            {
+                for (int nVar = 0; nVar < limitnVariable; ++ nVar)
+                {
+                    
+                    IndexMinL[nVar] = le;
+                    IndexMaxL[nVar] = le;
+                    RDouble pminL = prim[nVar][le];
+                    RDouble pmaxL = prim[nVar][le];
+                    for ( int index = 0; index < neighborCells[le].size(); index++ )
+                    {
+                        int neighborIndex       = neighborCells[le][index];
+                        int neighborFaceIndex   = neighborFaces[le][index];
+                        if( neighborFaceIndex >= nBoundFace )
+                        {
+                            RDouble  primNeighbor    = prim[nVar][neighborIndex];
+
+                            if( pminL > primNeighbor)
+                            {
+                                pminL           = primNeighbor;
+                                IndexMinL[nVar] = neighborIndex;
+                            }
+
+                            if( pmaxL < primNeighbor)
+                            {
+                                pmaxL = primNeighbor;
+                                IndexMaxL[nVar] = neighborIndex;
+                            }
+
+                        }
+                    }
+
+
+                    IndexMinR[nVar] = re;
+                    IndexMaxR[nVar] = re;
+                    RDouble pminR = prim[nVar][re];
+                    RDouble pmaxR = prim[nVar][re];
+                    for ( int index = 0; index < neighborCells[re].size(); index++ )
+                    {
+                        int neighborIndex       = neighborCells[re][index];
+                        int neighborFaceIndex   = neighborFaces[re][index];
+                        if( neighborFaceIndex >= nBoundFace )
+                        {
+                            RDouble  primNeighbor    = prim[nVar][neighborIndex];
+
+                            if( pminR > primNeighbor)
+                            {
+                                pminR           = primNeighbor;
+                                IndexMinR[nVar] = neighborIndex;
+                            }
+
+                            if( pmaxR < primNeighbor)
+                            {
+                                pmaxR           = primNeighbor;
+                                IndexMaxR[nVar] = neighborIndex;
+                            }
+
+                        }
+                    }
+
+                
+                }
+            }
+
+        
+        }
+
+        // GMRESVenkat
+        if ( limiterType == ILMT_VENCAT )
+        {
+            for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+            {
+                primL[iEqn]     = qL[iEqn][iFace];
+                primR[iEqn]     = qR[iEqn][iFace];
+
+                primLC[iEqn]    = qLC[iEqn][iFace]; // GMRESPassQC
+                primRC[iEqn]    = qRC[iEqn][iFace]; // GMRESPassQC
+
+                dqdxL[iEqn]     = dqdx[iEqn][le];
+                dqdyL[iEqn]     = dqdy[iEqn][le];
+                dqdzL[iEqn]     = dqdz[iEqn][le];
+                dqdxR[iEqn]     = dqdx[iEqn][re];
+                dqdyR[iEqn]     = dqdy[iEqn][re];
+                dqdzR[iEqn]     = dqdz[iEqn][re];
+
+                minL[iEqn]      = prim[iEqn][IndexMinL[iEqn]];
+                maxL[iEqn]      = prim[iEqn][IndexMaxL[iEqn]];
+                minR[iEqn]      = prim[iEqn][IndexMinR[iEqn]];
+                maxR[iEqn]      = prim[iEqn][IndexMaxR[iEqn]];
+            }
+        }
+        else
+        {
+            for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+            {
+                primL[iEqn] = qL[iEqn][iFace];
+                primR[iEqn] = qR[iEqn][iFace];
+
+                primLC[iEqn] = qLC[iEqn][iFace]; // GMRESPassQC
+                primRC[iEqn] = qRC[iEqn][iFace]; // GMRESPassQC
+            }
+        }
+
+        // define sequence order of the independent variables
+        // GMRESVenkat
+        if ( limiterType == ILMT_VENCAT )
+        {
+            
+            //! define the sequence of the independent variables
+            for (int m = 0; m < nEquation; m++)
+            {
+                primL[m].diff(m, nIndependentVars);
+                primR[m].diff(halfIndependentVars + m, nIndependentVars);
+            }
+
+            for (int m = 0; m < nEquation; m++)
+            {
+                dqdxL[m].diff(nEquation + m, nIndependentVars);
+                dqdyL[m].diff(nEquation * 2 + m, nIndependentVars);
+                dqdzL[m].diff(nEquation * 3 + m, nIndependentVars);
+                minL[m].diff(nEquation * 4 + m, nIndependentVars);
+                maxL[m].diff(nEquation * 5 + m, nIndependentVars);
+                dqdxR[m].diff(halfIndependentVars + nEquation + m, nIndependentVars);
+                dqdyR[m].diff(halfIndependentVars + nEquation * 2 + m, nIndependentVars);
+                dqdzR[m].diff(halfIndependentVars + nEquation * 3 + m, nIndependentVars);
+                minR[m].diff(halfIndependentVars + nEquation * 4 + m, nIndependentVars);
+                maxR[m].diff(halfIndependentVars + nEquation * 5 + m, nIndependentVars);
+            }
+
+        }
+        else
+        {
+        
+            for (int iEqn = 0; iEqn < nEquation; iEqn++)
+            {
+                primL[iEqn].diff(iEqn, 10);
+                primR[iEqn].diff(iEqn + nEquation, 10);
+            }
+
+        }
+
+         // GMRESVenkat 
+        if ( limiterType == ILMT_VENCAT )
+        {
+            // Initialize the limiter with one
+            for ( int m = 0; m < limitnVariable; m++ )
+            {
+                limitL[m] = 1.0;
+                limitR[m] = 1.0;
+            }
+
+            bool CalLimiterL = true;
+            bool CalLimiterR = true;
+
+            // judge whether the le is adjacent to boundary face
+            for (int index = 0; index < neighborCells[le].size(); index++)
+            {
+                int neighborFaceIndex   = neighborFaces[le][index];
+                if( neighborFaceIndex < nBoundFace )
+                {
+                    UnstructBC* bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[neighborFaceIndex]);
+                    int bcType = bcRegion->GetBCType();
+                    if (bcType != PHENGLEI::INTERFACE && 
+                        bcType != PHENGLEI::SYMMETRY  &&
+                        bcType != PHENGLEI::SOLID_SURFACE &&
+                        bcType != PHENGLEI::OUTFLOW)
+                    {
+                        for ( int m = 0; m < limitnVariable; m++ )
+                        {
+                            limitL[m]       = 0.0;
+                            LimitSignL[m]   = 0;
+                        }
+
+                        CalLimiterL = false;
+                    }
+                }
+            }
+
+            // judge whether the re is adjacent to boundary face
+            for (int index = 0; index < neighborCells[re].size(); index++)
+            {
+                int neighborFaceIndex   = neighborFaces[re][index];
+                if( neighborFaceIndex < nBoundFace )
+                {
+                    UnstructBC* bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[neighborFaceIndex]);
+                    int bcType = bcRegion->GetBCType();
+                    if (bcType != PHENGLEI::INTERFACE && 
+                        bcType != PHENGLEI::SYMMETRY  &&
+                        bcType != PHENGLEI::SOLID_SURFACE &&
+                        bcType != PHENGLEI::OUTFLOW)
+                    {
+                        for ( int m = 0; m < limitnVariable; m++ )
+                        {
+                            limitR[m]       = 0.0;
+                            LimitSignR[m]   = 0;
+                        }
+
+                        CalLimiterR = false;
+                    }
+                }
+            }
+
+            // Limiter calculation
+            if ( limitVector == SCALAR_LIMITER )
+            {
+                TK_Exit::ExceptionExit("SCALAR_LIMITER for Venkat is not yet implemented\n");
+            }
+            else if ( limitVector == VECTOR_LIMITER )
+            {
+                        
+                for (int nVar = 0; nVar < limitnVariable; ++ nVar)
+                {
+                    
+                    if(CalLimiterL)
+                    {
+                        
+                        if( IndexMinL[nVar] == le)
+                        {
+                            dminL = 0;
+                        }
+                        else
+                        {
+                            dminL   =   minL[nVar] - primL[nVar];
+                        }
+
+                        if( IndexMaxL[nVar] == le)
+                        {
+                            dmaxL = 0;
+                        }
+                        else
+                        {
+                            dmaxL   =   maxL[nVar] - primL[nVar];
+                        }
+                        
+
+                        // for (int index = 0; index < neighborCells[le].size(); index++)
+                        // {
+                        //     int neighborIndex       = neighborCells[le][index];
+                        //     int neighborFaceIndex   = neighborFaces[le][index];
+// 
+                        //     if( neighborFaceIndex >= nBoundFace )
+                        //     {
+                        //         ADReal  primNeighbor    = prim[nVar][neighborIndex];
+                        //         dminL = MIN(dminL, primNeighbor);
+                        //         dmaxL = MAX(dmaxL, primNeighbor);
+                        //     }
+                        // }
+
+
+                        ADReal eps_tmp = venkatCoeff * venkatCoeff * venkatCoeff;
+                        eps_tmp *= 1.0/pow(pow(averageVolume, 1.0/dimension), nExp);
+
+                        ADReal epsCellL =  eps_tmp*primL[nVar]*primL[nVar];
+                        epsCellL        *= pow(pow(vol[le],1.0/dimension),nExp);
+
+
+                        LimitSignL[nVar]   = 0;
+                        for (int index = 0; index < neighborCells[le].size(); index++)
+                        {
+                            int FaceIndex       = neighborFaces[le][index];
+                            RDouble dx  = xfc[FaceIndex] - xcc[le];
+                            RDouble dy  = yfc[FaceIndex] - ycc[le];
+                            RDouble dz  = zfc[FaceIndex] - zcc[le];
+
+                            ADReal dqFace = dqdxL[nVar] * dx + dqdyL[nVar] * dy + dqdzL[nVar] * dz;
+
+                            if( dqFace > SMALL )
+                            {
+                                    ADReal x2   = dmaxL*dmaxL;
+                                    ADReal xy   = dmaxL*dqFace;
+                                    ADReal y2   = dqFace*dqFace; 
+                                    ADReal temp = (x2 + epsCellL + 2.0 * xy) / (x2 + 2.0 * y2 + xy + epsCellL);
+
+                                    if( temp < limitL[nVar] )
+                                    {
+                                         limitL[nVar]       = temp;
+                                         LimitSignL[nVar]   = 1;
+                                    }
+                            }
+                            else if( dqFace < -SMALL )
+                            {
+                                    ADReal x2   = dminL*dminL;
+                                    ADReal xy   = dminL*dqFace;
+                                    ADReal y2   = dqFace*dqFace; 
+                                    ADReal temp = (x2 + epsCellL + 2.0 * xy) / (x2 + 2.0 * y2 + xy + epsCellL);
+
+                                    if( temp < limitL[nVar] )
+                                    {
+                                         limitL[nVar]       = temp;
+                                         LimitSignL[nVar]   = -1;
+                                    }
+                            }
+
+
+                        }
+                    }
+                   
+                    if(CalLimiterR)
+                    {
+                        
+                        if( IndexMinR[nVar] == re)
+                        {
+                            dminR = 0;
+                        }
+                        else
+                        {
+                            dminR   =  minR[nVar] - primR[nVar];
+                        }
+
+                        if( IndexMaxR[nVar] == re)
+                        {
+                            dmaxR = 0;
+                        }
+                        else
+                        {
+                            dmaxR   =  maxR[nVar] - primR[nVar];
+                        }
+                        
+
+                        // for (int index = 0; index < neighborCells[re].size(); index++)
+                        // {
+                        //     int neighborIndex       = neighborCells[re][index];
+                        //     int neighborFaceIndex   = neighborFaces[re][index];
+// 
+                        //     if( neighborFaceIndex >= nBoundFace )
+                        //     {
+                        //         ADReal  primNeighbor    = prim[nVar][neighborIndex];
+                        //         dminR = MIN(dminR, primNeighbor);
+                        //         dmaxR = MAX(dmaxR, primNeighbor);
+                        //     }
+                        // }
+
+
+                        ADReal eps_tmp = venkatCoeff * venkatCoeff * venkatCoeff;
+                        eps_tmp *= 1.0/pow(pow(averageVolume, 1.0/dimension), nExp);
+
+
+                        ADReal epsCellR =  eps_tmp*primR[nVar]*primR[nVar];
+                        epsCellR        *= pow(pow(vol[re],1.0/dimension),nExp);
+
+                        LimitSignR[nVar]   = 0;
+                        for (int index = 0; index < neighborCells[re].size(); index++)
+                        {
+                            int FaceIndex       = neighborFaces[re][index];
+                            RDouble dx  = xfc[FaceIndex] - xcc[re];
+                            RDouble dy  = yfc[FaceIndex] - ycc[re];
+                            RDouble dz  = zfc[FaceIndex] - zcc[re];
+
+                            ADReal dqFace = dqdxR[nVar] * dx + dqdyR[nVar] * dy + dqdzR[nVar] * dz;
+
+                            if( dqFace > SMALL )
+                            {
+                                    ADReal x2   = dmaxR*dmaxR;
+                                    ADReal xy   = dmaxR*dqFace;
+                                    ADReal y2   = dqFace*dqFace; 
+                                    ADReal temp = (x2 + epsCellR + 2.0 * xy) / (x2 + 2.0 * y2 + xy + epsCellR);
+
+                                    if( temp < limitR[nVar] )
+                                    {
+                                        limitR[nVar]        = temp;
+                                        LimitSignR[nVar]    = 1;
+                                    }
+                            }
+                            else if( dqFace < -SMALL )
+                            {
+                                    ADReal x2   = dminR*dminR;
+                                    ADReal xy   = dminR*dqFace;
+                                    ADReal y2   = dqFace*dqFace; 
+                                    ADReal temp = (x2 + epsCellR + 2.0 * xy) / (x2 + 2.0 * y2 + xy + epsCellR);
+                                    
+                                    if( temp < limitR[nVar] )
+                                    {
+                                        limitR[nVar]        = temp;
+                                        LimitSignR[nVar]    = -1;
+                                    }
+                            }
+
+
+                        }
+                    }
+                   
+                }
+            }
+
+            // Reconstruct the left & right state using the limiter
+            if (reconstructMethod == RECONSTRUCT_USING_RESPECTIVE_LIMITER)
+            {
+
+                // reconstruct left state
+                RDouble dxL = xfc[jFace] - xcc[le];
+                RDouble dyL = yfc[jFace] - ycc[le];
+                RDouble dzL = zfc[jFace] - zcc[le];
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    primTry[m] = primL[m];
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    if(usingVectorLimiter)
+                    {
+                        primTry[m] += limitL[m] * (dqdxL[m] * dxL + dqdyL[m] * dyL + dqdzL[m] * dzL);
+
+                    }
+                    else
+                    {
+                        primTry[m] += limitL[0] * (dqdxL[m] * dxL + dqdyL[m] * dyL + dqdzL[m] * dzL);
+                    }
+
+                }
+
+                if ( (primTry[IR] > 0.0)&&(primTry[IP] > 0.0) )
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        primL[m] = primTry[m];
+                    }
+                }
+
+
+                // reconstruct right state
+                RDouble dxR = xfc[jFace] - xcc[re];
+                RDouble dyR = yfc[jFace] - ycc[re];
+                RDouble dzR = zfc[jFace] - zcc[re];
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    primTry[m] = primR[m];
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    if(usingVectorLimiter)
+                    {
+                        primTry[m] += limitR[m] * (dqdxR[m] * dxR + dqdyR[m] * dyR + dqdzR[m] * dzR);
+
+                    }
+                    else
+                    {
+                        primTry[m] += limitR[0] * (dqdxR[m] * dxR + dqdyR[m] * dyR + dqdzR[m] * dzR);
+                    }
+
+                }
+
+                if ( (primTry[IR] > 0.0)&&(primTry[IP] > 0.0) )
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        primR[m] = primTry[m];
+                    }
+                }
+
+
+            }
+            else
+            {
+
+                // reconstruct left state
+                RDouble dxL = xfc[jFace] - xcc[le];
+                RDouble dyL = yfc[jFace] - ycc[le];
+                RDouble dzL = zfc[jFace] - zcc[le];
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    primTry[m] = primL[m];
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    if(usingVectorLimiter)
+                    {
+                        primTry[m] += MIN(limitL[m], limitR[m]) * (dqdxL[m] * dxL + dqdyL[m] * dyL + dqdzL[m] * dzL);
+
+                    }
+                    else
+                    {
+                        primTry[m] += MIN(limitL[0], limitR[0]) * (dqdxL[m] * dxL + dqdyL[m] * dyL + dqdzL[m] * dzL);
+                    }
+
+                }
+
+                if ( (primTry[IR] > 0.0)&&(primTry[IP] > 0.0) )
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        primL[m] = primTry[m];
+                    }
+                }
+
+
+                // reconstruct right state
+                RDouble dxR = xfc[jFace] - xcc[re];
+                RDouble dyR = yfc[jFace] - ycc[re];
+                RDouble dzR = zfc[jFace] - zcc[re];
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    primTry[m] = primR[m];
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    if(usingVectorLimiter)
+                    {
+                        primTry[m] += MIN(limitR[m], limitL[m]) * (dqdxR[m] * dxR + dqdyR[m] * dyR + dqdzR[m] * dzR);
+
+                    }
+                    else
+                    {
+                        primTry[m] += MIN(limitR[0], limitL[0]) * (dqdxR[m] * dxR + dqdyR[m] * dyR + dqdzR[m] * dzR);
+                    }
+                }
+
+                if ( (primTry[IR] > 0.0)&&(primTry[IP] > 0.0) )
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        primR[m] = primTry[m];
+                    }
+                }
+
+
+            }
+        
+        }
+
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        // GMRES3D
+        if( unstructScheme == ISCHEME_GMRES_ROE )
+        {
+            Cal_GMRES_Roe_Scheme_Flux_PV(primL, primR, iFace, fluxp,
+                                        face_proxy, invSchemePara);
+        }
+        else if( unstructScheme == ISCHEME_GMRES_Steger )
+        {
+            Cal_GMRES_Steger_Scheme_Flux_PV(primL, primR, iFace, fluxp,
+                                        face_proxy, invSchemePara);
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("Error: this inv-scheme is not exist !\n", true);
+        }
+
+        flux[IR][iFace] = fluxp[IR].val();
+        flux[IU][iFace] = fluxp[IU].val();
+        flux[IV][iFace] = fluxp[IV].val();
+        flux[IW][iFace] = fluxp[IW].val();
+        flux[IP][iFace] = fluxp[IP].val();
+
+        if ( limiterType == ILMT_VENCAT )
+        {
+            for (int m = 0; m < nEquation; m++)
+            {
+                for (int n = 0; n < nEquation; ++ n)
+                {
+                    dFluxdpL[m][n] = fluxp[m].dx(n) * area;
+                    dFluxdpR[m][n] = fluxp[m].dx(halfIndependentVars + n) * area;
+                }
+                
+                for (int n = 0; n < nEquation; n++)
+                {
+                    dFluxdgradxL[m][n] = fluxp[m].dx(nEquation + n) * area;
+                    dFluxdgradyL[m][n] = fluxp[m].dx(nEquation + nEquation + n) * area;
+                    dFluxdgradzL[m][n] = fluxp[m].dx(nEquation + 2 * nEquation  + n) * area;
+                    dFluxdminL[m][n] = fluxp[m].dx(4 * nEquation  + n) * area;
+                    dFluxdmaxL[m][n] = fluxp[m].dx(5 * nEquation  + n) * area;
+                    dFluxdgradxR[m][n] = fluxp[m].dx(halfIndependentVars + nEquation + n) * area;
+                    dFluxdgradyR[m][n] = fluxp[m].dx(halfIndependentVars + nEquation + nEquation + n) * area;
+                    dFluxdgradzR[m][n] = fluxp[m].dx(halfIndependentVars + nEquation + 2 * nEquation + n) * area;
+                    dFluxdminR[m][n] = fluxp[m].dx(halfIndependentVars + 4 * nEquation  + n) * area;
+                    dFluxdmaxR[m][n] = fluxp[m].dx(halfIndependentVars + 5 * nEquation  + n) * area;
+                }
+            }
+        }
+        else
+        {
+            for (int m = 0; m < nEquation; m++)
+            {
+                for (int n = 0; n < nEquation; n++)
+                {
+                    dFluxdpL[m][n] = fluxp[m].dx(n) * area;
+                    dFluxdpR[m][n] = fluxp[m].dx(n + nEquation) * area;
+                }
+            }
+        }
+
+//#define outputJac
+
+#ifdef outputJac
+        //  output the dFluxdminL dFluxdmaxL
+        std::cout << "======================================================================================\n";
+        std::cout << "le: " << le <<  " re: " << re << " \n";
+        std::cout << "LimitSignL: \n";
+        for( int n = 0; n < nEquation; n++ )
+        {
+            std::cout << LimitSignL[n] << "  ";     
+        }
+        std::cout << "\n";
+
+        std::cout << "IndexMinL: \n";
+        for( int n = 0; n < nEquation; n++ )
+        {
+            std::cout << IndexMinL[n] << "  ";     
+        }
+        std::cout << "\n";
+
+        std::cout << "IndexMaxL: \n";
+        for( int n = 0; n < nEquation; n++ )
+        {
+            std::cout << IndexMaxL[n] << "  ";     
+        }
+        std::cout << "\n";
+
+        std::cout << "dFluxdminL: \n";
+        for( int n = 0; n < nEquation; n++ )
+        {
+            for( int m = 0; m < nEquation; m++ )
+            {
+                std::cout << dFluxdminL[n][m] << "  ";     
+            }
+            std::cout << "\n";
+        }
+        std::cout << "\n";
+
+
+        std::cout << "dFluxdmaxL: \n";
+        for( int n = 0; n < nEquation; n++ )
+        {
+            for( int m = 0; m < nEquation; m++ )
+            {
+                std::cout << dFluxdmaxL[n][m] << "  ";     
+            }
+            std::cout << "\n";
+        }
+        std::cout << "\n";
+
+
+
+         std::cout << "LimitSignR: \n";
+        for( int n = 0; n < nEquation; n++ )
+        {
+            std::cout << LimitSignR[n] << "  ";     
+        }
+        std::cout << "\n";
+
+        std::cout << "IndexMinR: \n";
+        for( int n = 0; n < nEquation; n++ )
+        {
+            std::cout << IndexMinR[n] << "  ";     
+        }
+        std::cout << "\n";
+
+        std::cout << "IndexMaxR: \n";
+        for( int n = 0; n < nEquation; n++ )
+        {
+            std::cout << IndexMaxR[n] << "  ";     
+        }
+        std::cout << "\n";
+
+        std::cout << "dFluxdminR: \n";
+        for( int n = 0; n < nEquation; n++ )
+        {
+            for( int m = 0; m < nEquation; m++ )
+            {
+                std::cout << dFluxdminR[n][m] << "  ";     
+            }
+            std::cout << "\n";
+        }
+        std::cout << "\n";
+
+
+        std::cout << "dFluxdmaxR: \n";
+        for( int n = 0; n < nEquation; n++ )
+        {
+            for( int m = 0; m < nEquation; m++ )
+            {
+                std::cout << dFluxdmaxR[n][m] << "  ";     
+            }
+            std::cout << "\n";
+        }
+        std::cout << "\n";
+
+#endif
+
+
+        if (JacOrder == 2)
+        {
+            // GMRESPV , obtain the dqdcv for the left cell
+            gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then minus to the corresponding location in dRdq.
+            int indexf = re * nEquation; // first index
+            int indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, re, le);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        dRdq1st[indexI][colidx + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, le, le);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        dRdq1st[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // GMRESPV , obtain the dqdcv for the right cell
+            gas->dPrimitive2dConservative(primRC, gmR, dqdcvR);
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then minus to the corresponding location in dRdq.
+            indexf = re * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, re, re);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        dRdq1st[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, le, re);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        dRdq1st[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+        }
+
+        if (limiterType == ILMT_FIRST)
+        {
+            // GMRESPV , obtain the dqdcv for the left cell
+            gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then minus to the corresponding location in dRdq.
+            int indexf = re * nEquation; // first index
+            int indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // GMRESPV , obtain the dqdcv for the right cell
+            gas->dPrimitive2dConservative(primRC, gmR, dqdcvR);
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then minus to the corresponding location in dRdq.
+            indexf = re * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+        }
+        else if (limiterType == ILMT_NOLIM)
+        {
+            Lsign = qlsign[iFace];
+            Rsign = qrsign[iFace];
+            int jFace = iFace + localStart; // absolute face index
+
+            if (Lsign > 0)
+            {
+                dxL = xfc[jFace] - xcc[le];
+                dyL = yfc[jFace] - ycc[le];
+                dzL = zfc[jFace] - zcc[le];
+            }
+            else
+            {
+                dxL = 0.0;
+                dyL = 0.0;
+                dzL = 0.0;
+            }
+
+            if (Rsign > 0)
+            {
+                dxR = xfc[jFace] - xcc[re];
+                dyR = yfc[jFace] - ycc[re];
+                dzR = zfc[jFace] - zcc[re];
+            }
+            else
+            {
+                dxR = 0.0;
+                dyR = 0.0;
+                dzR = 0.0;
+            }
+
+            // GMRESPV , obtain the dqdcv for the left cell
+            gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then minus to the corresponding location in dRdq.
+            int indexf = re * nEquation; // first index
+            int indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // GMRESPV , obtain the dqdcv for the right cell
+            gas->dPrimitive2dConservative(primRC, gmR, dqdcvR);
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then minus to the corresponding location in dRdq.
+            indexf = re * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            // considering the perturbation of the gradient in the limiter
+            RDouble fnx = nsx[jFace];
+            RDouble fny = nsy[jFace];
+            RDouble fnz = nsz[jFace];
+            RDouble farea = ns[jFace];
+            RDouble volume = vol[re];
+
+            // dgradRdqL
+            dGdqx = -1.0 * 0.5 / volume * farea * fnx;
+            dGdqy = -1.0 * 0.5 / volume * farea * fny;
+            dGdqz = -1.0 * 0.5 / volume * farea * fnz;
+
+            // dQre/dgradR*dgradRdqL
+            RDouble dGrad = dGdqx * dxR + dGdqy * dyR + dGdqz * dzR;
+
+            // convert dGrad by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dGrad * dFluxdpR[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        dRdq[indexI][colidx2 + indexJ] -= dGrad * dFluxdpR[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // considering the perturbation of the gradient in the limiter
+            volume = vol[le];
+
+            // dgradLdqR
+            dGdqx = 1.0 * 0.5 / volume * farea * fnx;
+            dGdqy = 1.0 * 0.5 / volume * farea * fny;
+            dGdqz = 1.0 * 0.5 / volume * farea * fnz;
+
+            // dQle/dgradL*dgradLdqR
+            dGrad = dGdqx * dxL + dGdqy * dyL + dGdqz * dzL;
+
+            // convert dGrad by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dGrad * dFluxdpL[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        dRdq[indexI][colidx2 + indexJ] -= dGrad * dFluxdpL[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            // std::cout << "iFace: " << iFace << " le, re " << le << " , " << re << "\n";
+            // the neighbors of the left cells
+            for (int index = 0; index < neighborCells[le].size(); index++)
+            {
+                int neighborIndex = neighborCells[le][index];
+                // std::cout << "Neighbors of the left cells: " << neighborIndex << " \n";
+                if (neighborIndex != re)
+                {
+                    int Faceindex = neighborFaces[le][index];
+                    // judge whether it is the boundary face and obtain its boundary type
+                    bool isGhostCell = false;
+                    UnstructBC *neighborBCRegion = nullptr;
+                    int neighborBCType;
+                    if(neighborIndex >= nTotalCell)
+                    {
+                        isGhostCell = true;
+                        neighborBCRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[Faceindex]);
+                        neighborBCType = neighborBCRegion->GetBCType();
+                    }
+
+                    int sign = neighborLR[le][index];
+                    RDouble fnx = nsx[Faceindex];
+                    RDouble fny = nsy[Faceindex];
+                    RDouble fnz = nsz[Faceindex];
+                    RDouble farea = ns[Faceindex];
+                    RDouble volume = vol[le];
+
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        primN[m] = prim[m][neighborIndex];
+                    }
+
+                    gas->dPrimitive2dConservative(primN, gama[neighborIndex], dqdcvN);
+
+                    // dgradLdqN
+                    dGdqx = sign * 0.5 / volume * farea * fnx;
+                    dGdqy = sign * 0.5 / volume * farea * fny;
+                    dGdqz = sign * 0.5 / volume * farea * fnz;
+
+                    // dQle/dgradL*dgradLdqN
+                    dGrad = dGdqx * dxL + dGdqy * dyL + dGdqz * dzL;
+
+                    int indexf = le * nEquation;            // first index
+                    int indexs = neighborIndex * nEquation; // second index
+                    int indexf2 = re * nEquation;
+                    int colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                    int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                    // std::cout << "dRle/dqNeighbor: " << le << " " << neighborIndex <<  " " << colidx << " \n";
+                    // std::cout << "dRre/dqNeighbor: " << re << " " << neighborIndex <<  " " << colidx2 << " \n";
+
+                    for (int indexI = 0; indexI < nEquation; indexI++)
+                    {
+                        for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                        {
+
+                            for (int indexK = 0; indexK < nEquation; indexK++)
+                            {
+                                // dRL/dqLNeighbors
+                                dRdq[indexI][colidx + indexJ] += dGrad * dFluxdpL[indexI][indexK] *
+                                                                dqdcvN[indexK][indexJ];
+
+                                // dRR/dqLNeighbors
+                                dRdq[indexI][colidx2 + indexJ] -= dGrad * dFluxdpL[indexI][indexK] *
+                                                                dqdcvN[indexK][indexJ];
+                            }
+                        }
+                    }
+
+                    if (isGhostCell && neighborBCType != PHENGLEI::INTERFACE)
+                    {
+                        int indexre = (neighborIndex - nTotalCell) * nEquation;
+                        for (int indexI = 0; indexI < nEquation; indexI++)
+                        {
+                            for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                            {
+                                dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre + indexJ];
+                            }
+                        }
+
+                         if (sign != 1.0)
+                        {
+                            printf("sign %d\n", sign);
+                            TK_Exit::ExceptionExit("sign is fault in Flux_Inviscid.cpp 3");
+                        }
+
+                        // contribution from the bc
+                        for (int indexI = 0; indexI < nEquation; indexI++)
+                        {
+                            for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                            {
+                                dFluxdtmp[indexI][indexJ] = 0.0;
+                                for (int indexK = 0; indexK < nEquation; indexK++)
+                                {
+                                    dFluxdtmp[indexI][indexJ] += dGrad * dFluxdpL[indexI][indexK] * dDdPlocal[indexK][indexJ];
+                                }
+                            }
+                        }
+
+                        gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+                        colidx  = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                        colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                        for (int indexI = 0; indexI < nEquation; indexI++)
+                        {
+                            for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                            {
+                                for (int indexK = 0; indexK < nEquation; indexK++)
+                                {
+                                    RDouble tmp = dFluxdtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+                                    dRdq[indexI][colidx  + indexJ] += tmp;
+                                    dRdq[indexI][colidx2 + indexJ] -= tmp;
+                                }
+                            }
+                        }
+                    }
+                    
+                }
+            }
+
+            // the neighbors of the right cells
+            for (int index = 0; index < neighborCells[re].size(); index++)
+            {
+                int neighborIndex = neighborCells[re][index];
+                // std::cout << "Neighbors of the right cells: " << neighborIndex << " \n";
+
+                if (neighborIndex != le)
+                {
+                    int Faceindex = neighborFaces[re][index];
+                    // judge whether it is the boundary face and obtain its boundary type
+                    bool isGhostCell = false;
+                    UnstructBC *neighborBCRegion = nullptr;
+                    int neighborBCType;
+                    if (neighborIndex >= nTotalCell)
+                    {
+                        isGhostCell = true;
+                        neighborBCRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[Faceindex]);
+                        neighborBCType = neighborBCRegion->GetBCType();
+                    }
+
+                    int sign = neighborLR[re][index];
+                    RDouble fnx = nsx[Faceindex];
+                    RDouble fny = nsy[Faceindex];
+                    RDouble fnz = nsz[Faceindex];
+                    RDouble farea = ns[Faceindex];
+                    RDouble volume = vol[re];
+
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        primN[m] = prim[m][neighborIndex];
+                    }
+
+                    gas->dPrimitive2dConservative(primN, gama[neighborIndex], dqdcvN);
+
+                    // dgradRdqN
+                    dGdqx = sign * 0.5 / volume * farea * fnx;
+                    dGdqy = sign * 0.5 / volume * farea * fny;
+                    dGdqz = sign * 0.5 / volume * farea * fnz;
+
+                    // dQre/dgradR*dgradRdqN
+                    dGrad = dGdqx * dxR + dGdqy * dyR + dGdqz * dzR;
+
+                    int indexf = le * nEquation;            // first index
+                    int indexs = neighborIndex * nEquation; // second index
+                    int indexf2 = re * nEquation;
+                    int colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                    int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                    // std::cout << "dRle/dqNeighbor: " << le << " " << neighborIndex <<  " " << colidx << " \n";
+                    // std::cout << "dRre/dqNeighbor: " << re << " " << neighborIndex <<  " " << colidx2 << " \n";
+                    for (int indexI = 0; indexI < nEquation; indexI++)
+                    {
+                        for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                        {
+
+                            for (int indexK = 0; indexK < nEquation; indexK++)
+                            {
+                                // dRL/dqRNeighbors
+                                dRdq[indexI][colidx + indexJ] += dGrad * dFluxdpR[indexI][indexK] *
+                                                                dqdcvN[indexK][indexJ];
+
+                                // dRR/dqRNeighbors
+                                dRdq[indexI][colidx2 + indexJ] -= dGrad * dFluxdpR[indexI][indexK] *
+                                                                dqdcvN[indexK][indexJ];
+                            }
+                        }
+                    }
+
+                    if (isGhostCell && neighborBCType != PHENGLEI::INTERFACE)
+                    {
+                        int indexre = (neighborIndex - nTotalCell) * nEquation;
+                        for (int indexI = 0; indexI < nEquation; indexI++)
+                        {
+                            for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                            {
+                                dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre + indexJ];
+                            }
+                        }
+
+                        // HINT: this can be deleted
+                        if (sign != 1.0){
+                            TK_Exit::ExceptionExit("sign is fault in Flux_Inviscid.cpp 4");
+                        }
+
+                        // contribution from the bc
+                        // dFluxdpL = dFluxdpL + dFluxdpR * dDdPlocal
+                        for (int indexI = 0; indexI < nEquation; indexI++)
+                        {
+                            for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                            {
+                                dFluxdtmp[indexI][indexJ] = 0.0;
+                                for (int indexK = 0; indexK < nEquation; indexK++)
+                                {
+                                    dFluxdtmp[indexI][indexJ] += dGrad * dFluxdpR[indexI][indexK] * dDdPlocal[indexK][indexJ];
+                                }
+                            }
+                        }
+
+                        gas->dPrimitive2dConservative(primRC, gmR, dqdcvR);
+                        colidx  = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                        colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                        for (int indexI = 0; indexI < nEquation; indexI++)
+                        {
+                            for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                            {
+                                for (int indexK = 0; indexK < nEquation; indexK++)
+                                {
+                                    RDouble tmp = dFluxdtmp[indexI][indexK] * dqdcvR[indexK][indexJ];
+                                    dRdq[indexI][colidx  + indexJ] += tmp;
+                                    dRdq[indexI][colidx2 + indexJ] -= tmp;
+                                }
+                            }
+                        }
+                    }
+                }
+            }
+
+            #ifdef BC_effect_to_Interior
+            // judge whether le is in the left cell lists of the BC
+            vector<int>::iterator result = find(BCLeftCells.begin(), BCLeftCells.end(), le);
+            if (result != BCLeftCells.end())
+            {
+                int dist = distance(BCLeftCells.begin(), result);
+                int rBCIndex = BCRightCells[dist];
+                int FBCIndex = BCFaces[dist];
+
+                // contributions from the bc
+                int indexre = (rBCIndex - nTotalCell) * nEquation;
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre + indexJ];
+                    }
+                }
+
+                RDouble fnx = nsx[FBCIndex];
+                RDouble fny = nsy[FBCIndex];
+                RDouble fnz = nsz[FBCIndex];
+                RDouble farea = ns[FBCIndex];
+                RDouble volume = vol[le];
+
+                // dgradLdqN
+                dGdqx = 1.0 * 0.5 / volume * farea * fnx;
+                dGdqy = 1.0 * 0.5 / volume * farea * fny;
+                dGdqz = 1.0 * 0.5 / volume * farea * fnz;
+                // dQle/dgradL*dgradLdqN
+                dGrad = dGdqx * dxL + dGdqy * dyL + dGdqz * dzL;
+
+                // contributions from the bc,
+                // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        dFluxdtmp[indexI][indexJ] = 0.0;
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dFluxdtmp[indexI][indexJ] += dGrad * dFluxdpL[indexI][indexK] *
+                                                        dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+                gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+                int colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] += dFluxdtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+                            dRdq[indexI][colidx2 + indexJ] -= dFluxdtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+            }
+
+            // judge whether re is in the left cell lists of the BC
+            result = find(BCLeftCells.begin(), BCLeftCells.end(), re);
+            if (result != BCLeftCells.end())
+            {
+                int dist = distance(BCLeftCells.begin(), result);
+                int rBCIndex = BCRightCells[dist];
+                int FBCIndex = BCFaces[dist];
+
+                // contributions from the bc
+                int indexre = (rBCIndex - nTotalCell) * nEquation;
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre + indexJ];
+                    }
+                }
+
+                RDouble fnx = nsx[FBCIndex];
+                RDouble fny = nsy[FBCIndex];
+                RDouble fnz = nsz[FBCIndex];
+                RDouble farea = ns[FBCIndex];
+                RDouble volume = vol[re];
+
+                // dgradLdqN
+                dGdqx = 1.0 * 0.5 / volume * farea * fnx;
+                dGdqy = 1.0 * 0.5 / volume * farea * fny;
+                dGdqz = 1.0 * 0.5 / volume * farea * fnz;
+                // dQle/dgradL*dgradLdqN
+                dGrad = dGdqx * dxR + dGdqy * dyR + dGdqz * dzR;
+
+                // contributions from the bc,
+                // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        dFluxdtmp[indexI][indexJ] = 0.0;
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dFluxdtmp[indexI][indexJ] += dGrad * dFluxdpR[indexI][indexK] *
+                                                        dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+                gas->dPrimitive2dConservative(primRC, gmR, dqdcvR);
+                int colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                for (int indexI = 0; indexI < nEquation; indexI++)
+                {
+                    for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                    {
+                        for (int indexK = 0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] += dFluxdtmp[indexI][indexK] * dqdcvR[indexK][indexJ];
+                            dRdq[indexI][colidx2 + indexJ] -= dFluxdtmp[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+            }
+            #endif
+            
+        }
+        else if (limiterType == ILMT_VENCAT)
+        {
+            
+            // GMRESPV , obtain the dqdcv for the left cell
+            gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+            
+            // GMRESPV , obtain the dqdcv for the right cell
+            gas->dPrimitive2dConservative(primRC, gmR, dqdcvR);
+
+            // convert dFluxdp to dFluxdcv by right multiplying the dqdcvL/dqdcvR,
+            // then add/minus to the corresponding location in dRdq.
+            
+            int colidx1 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+            int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            int colidx3 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            int colidx4 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                {
+                    for (int indexK = 0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx1 + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+
+                        dRdq[indexI][colidx2 + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+
+                        dRdq[indexI][colidx3 + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+
+                        dRdq[indexI][colidx4 + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+
+            // considering the perturbation of the gradient in the flux calculation
+            RDouble fnx         = nsx[jFace];
+            RDouble fny         = nsy[jFace];
+            RDouble fnz         = nsz[jFace];
+            RDouble farea       = ns[jFace];
+            RDouble volume      = vol[re];
+            // dgradtmp = dfluxdgradxR*dgradRdqLx + dfluxdgradyR*dgradRdqLy + dfluxdgradzR*dgraddqLz
+            // dRdq[le][le] += dgradtmp*dqdcvL
+            gas->dGradient2dPrimitive(primLC,-1,dgraddqx, 'x', fnx, fny, fnz, farea, volume, nEquation);
+            gas->dGradient2dPrimitive(primLC,-1,dgraddqy, 'y', fnx, fny, fnz, farea, volume, nEquation);
+            gas->dGradient2dPrimitive(primLC,-1,dgraddqz, 'z', fnx, fny, fnz, farea, volume, nEquation);
+
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    dGradtmp[indexI][indexJ] = 0;
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dGradtmp[indexI][indexJ] += dFluxdgradxR[indexI][indexK] * dgraddqx[indexK][indexJ];
+                        dGradtmp[indexI][indexJ] += dFluxdgradyR[indexI][indexK] * dgraddqy[indexK][indexJ];
+                        dGradtmp[indexI][indexJ] += dFluxdgradzR[indexI][indexK] * dgraddqz[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dGradtmp by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            // indexf = le * nEquation; // first index
+            // indexs = le * nEquation; // second index
+            colidx1      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            colidx2      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx1+indexJ] += dGradtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+
+                        dRdq[indexI][colidx2+indexJ] -= dGradtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+
+            fnx         = nsx[jFace];
+            fny         = nsy[jFace];
+            fnz         = nsz[jFace];
+            farea       = ns[jFace];
+            volume      = vol[le];
+            // dgradtmp = dfluxdgradxL*dgradLdqRx + dfluxdgradyL*dgradLdqRy + dfluxdgradzL*dgradLdqRz
+            // dRdq[le][re] += dgradtmp*dqdcvL
+
+            gas->dGradient2dPrimitive(primRC,1,dgraddqx, 'x', fnx, fny, fnz, farea,volume, nEquation);
+            gas->dGradient2dPrimitive(primRC,1,dgraddqy, 'y', fnx, fny, fnz, farea,volume, nEquation);
+            gas->dGradient2dPrimitive(primRC,1,dgraddqz, 'z', fnx, fny, fnz, farea,volume, nEquation);
+
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    dGradtmp[indexI][indexJ] = 0;
+                    
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dGradtmp[indexI][indexJ] += dFluxdgradxL[indexI][indexK]*
+                                                                dgraddqx[indexK][indexJ];
+                        dGradtmp[indexI][indexJ] += dFluxdgradyL[indexI][indexK]*
+                                                                dgraddqy[indexK][indexJ];
+                        dGradtmp[indexI][indexJ] += dFluxdgradzL[indexI][indexK]*
+                                                                dgraddqz[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dGradtmp by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+          
+            colidx1      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            colidx2      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        
+                        dRdq[indexI][colidx1+indexJ] += dGradtmp[indexI][indexK]*
+                                                                dqdcvR[indexK][indexJ];
+
+                        dRdq[indexI][colidx2+indexJ] -= dGradtmp[indexI][indexK]*
+                                                                dqdcvR[indexK][indexJ];
+                                                 
+                    }
+                }
+            }
+
+
+            // the neighbors of the left cells
+            for(int index = 0; index < neighborCells[le].size(); index++)
+            {
+                int neighborIndex = neighborCells[le][index];
+
+                if(neighborIndex != re)
+                {
+                    int Faceindex   = neighborFaces[le][index];
+                    int sign        = neighborLR[le][index];
+                    RDouble fnx     = nsx[Faceindex];
+                    RDouble fny     = nsy[Faceindex];
+                    RDouble fnz     = nsz[Faceindex];
+                    RDouble farea   = ns[Faceindex];
+                    RDouble volume  = vol[le];
+
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        primN[m] = prim[m][neighborIndex];
+                    }
+
+                    gas->dPrimitive2dConservative(primN, gama[neighborIndex], dqdcvN);
+
+                    gas->dGradient2dPrimitive(primN,sign,dgraddqx, 'x', fnx, fny, fnz, farea, volume, nEquation);
+                    gas->dGradient2dPrimitive(primN,sign,dgraddqy, 'y', fnx, fny, fnz, farea, volume, nEquation);
+                    gas->dGradient2dPrimitive(primN,sign,dgraddqz, 'z', fnx, fny, fnz, farea, volume, nEquation);
+
+                    for(int indexI=0; indexI < nEquation; indexI++)
+                    {
+                        for(int indexJ=0; indexJ < nEquation; indexJ++)
+                        {
+                            dGradtmp[indexI][indexJ] = 0;
+
+                            for(int indexK=0; indexK < nEquation; indexK++)
+                            {
+                                dGradtmp[indexI][indexJ] += dFluxdgradxL[indexI][indexK]*
+                                                                        dgraddqx[indexK][indexJ];
+                                dGradtmp[indexI][indexJ] += dFluxdgradyL[indexI][indexK]*
+                                                                        dgraddqy[indexK][indexJ];
+                                dGradtmp[indexI][indexJ] += dFluxdgradzL[indexI][indexK]*
+                                                                        dgraddqz[indexK][indexJ];
+                            }
+                        }
+                    }
+
+                    colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                    colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                    for(int indexI=0; indexI < nEquation; indexI++)
+                    {
+                        for(int indexJ=0; indexJ < nEquation; indexJ++)
+                        {
+
+                            for(int indexK=0; indexK < nEquation; indexK++)
+                            {
+                                // dRL/dqLNeighbors += dRL/dGradL*dGradL/dqLNeighbors ===> dFluxdgradL*dgraddq
+                                dRdq[indexI][colidx1+indexJ] += dGradtmp[indexI][indexK]*
+                                                                        dqdcvN[indexK][indexJ];
+                                
+                                // dRR/dqLNeighbors -= dRR/dGradL*dGradL/dqLNeighbors ===> dFluxdgradL*dgraddq
+                                dRdq[indexI][colidx2+indexJ] -= dGradtmp[indexI][indexK]*
+                                                                        dqdcvN[indexK][indexJ];
+                            }
+                        }
+                    } 
+
+                    // GMRES2ndBCs
+                    if( Faceindex < nBoundFace )
+                    {
+                        
+                        // contributions from the bc
+                        int indexre = (neighborIndex-nTotalCell)*nEquation;
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+                                dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+                            }
+                        }
+
+
+                        // contributions from the bc, 
+                        // dFluxdPR*dDdPlocal
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+                                dGradtmpBC[indexI][indexJ] = 0.0;
+                                for(int indexK=0; indexK < nEquation; indexK++)
+                                {
+                                    dGradtmpBC[indexI][indexJ]  += dGradtmp[indexI][indexK]*
+                                                                    dDdPlocal[indexK][indexJ];
+                                }
+                            }
+                        }
+
+                        gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+                        int colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                        int colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+                                for(int indexK=0; indexK < nEquation; indexK++)
+                                {
+                                    dRdq[indexI][colidx1+indexJ] += dGradtmpBC[indexI][indexK] * dqdcvL[indexK][indexJ];
+                                    dRdq[indexI][colidx2+indexJ] -= dGradtmpBC[indexI][indexK] * dqdcvL[indexK][indexJ];
+
+                                }
+                            }
+                        }
+
+
+                    }           
+                }
+            }
+
+
+            // the neighbors of the right cells
+            for(int index = 0; index < neighborCells[re].size(); index++)
+            {
+                int neighborIndex = neighborCells[re][index];
+
+                if(neighborIndex != le)
+                {
+                    int Faceindex       = neighborFaces[re][index];
+                    int sign            = neighborLR[re][index];
+                    RDouble fnx         = nsx[Faceindex];
+                    RDouble fny         = nsy[Faceindex];
+                    RDouble fnz         = nsz[Faceindex];
+                    RDouble farea       = ns[Faceindex];
+                    RDouble volume      = vol[re];
+        
+
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        primN[m] = prim[m][neighborIndex];
+                    }
+
+                    gas->dPrimitive2dConservative(primN, gama[neighborIndex], dqdcvN);
+        
+                    gas->dGradient2dPrimitive(primN,sign,dgraddqx, 'x', fnx, fny, fnz, farea, volume, nEquation);
+                    gas->dGradient2dPrimitive(primN,sign,dgraddqy, 'y', fnx, fny, fnz, farea, volume, nEquation);
+                    gas->dGradient2dPrimitive(primN,sign,dgraddqz, 'z', fnx, fny, fnz, farea, volume, nEquation);
+        
+                    for(int indexI=0; indexI < nEquation; indexI++)
+                    {
+                        for(int indexJ=0; indexJ < nEquation; indexJ++)
+                        {
+                            dGradtmp[indexI][indexJ] = 0;
+                            for(int indexK=0; indexK < nEquation; indexK++)
+                            {
+                                dGradtmp[indexI][indexJ] += dFluxdgradxR[indexI][indexK]*
+                                                                        dgraddqx[indexK][indexJ];
+                                dGradtmp[indexI][indexJ] += dFluxdgradyR[indexI][indexK]*
+                                                                        dgraddqy[indexK][indexJ];
+                                dGradtmp[indexI][indexJ] += dFluxdgradzR[indexI][indexK]*
+                                                                        dgraddqz[indexK][indexJ];
+                            }
+                        }
+                    }
+        
+                    colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                    colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                    for(int indexI=0; indexI < nEquation; indexI++)
+                    {
+                        for(int indexJ=0; indexJ < nEquation; indexJ++)
+                        {
+                            for(int indexK=0; indexK < nEquation; indexK++)
+                            {
+                                
+                                // dRL/dqRNeighbors += dRL/dGradR*dGradR/dqRNeighbors ===> dFluxdgradR*dgraddq
+                                dRdq[indexI][colidx1+indexJ] += dGradtmp[indexI][indexK]*
+                                                                        dqdcvN[indexK][indexJ];
+
+
+                                // dRR/dqRNeighbors -= dRR/dGradR*dGradR/dqRNeighbors ===> dFluxdgradR*dgraddq
+                                dRdq[indexI][colidx2+indexJ] -= dGradtmp[indexI][indexK]*
+                                                                        dqdcvN[indexK][indexJ];
+                            }
+                        }
+                    }
+
+                    // GMRES2ndBCs
+                    if ( Faceindex < nBoundFace )
+                    {
+                        
+                        // contributions from the bc
+                        int indexre = (neighborIndex-nTotalCell)*nEquation;
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+                                dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+                            }
+                        }
+
+
+                        // contributions from the bc, 
+                        // dFluxdPR*dDdPlocal
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+                                dGradtmpBC[indexI][indexJ] = 0.0;
+                                for(int indexK=0; indexK < nEquation; indexK++)
+                                {
+                                    dGradtmpBC[indexI][indexJ]  += dGradtmp[indexI][indexK]*
+                                                                    dDdPlocal[indexK][indexJ];
+                                }
+                            }
+                        }
+        
+                        gas->dPrimitive2dConservative(primRC, gmR, dqdcvR);
+                        int colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                        int colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+                                for(int indexK=0; indexK < nEquation; indexK++)
+                                {
+                                    dRdq[indexI][colidx1+indexJ] += dGradtmpBC[indexI][indexK] * dqdcvR[indexK][indexJ];
+                                    dRdq[indexI][colidx2+indexJ] -= dGradtmpBC[indexI][indexK] * dqdcvR[indexK][indexJ];
+        
+                                }
+                            }
+                        }
+
+                    }
+                }   
+            }
+
+
+            #ifdef BC_effect_to_Interior
+            // judge whether le is in the left cell lists of the BC 
+            vector<int>::iterator result = find(BCLeftCells.begin(), BCLeftCells.end(), le); 
+            if(result != BCLeftCells.end())
+            {
+                int dist        = distance(BCLeftCells.begin(),result);
+                int rBCIndex    = BCRightCells[dist];
+                int FBCIndex    = BCFaces[dist];
+                // contributions from the bc
+                int indexre = (rBCIndex-nTotalCell)*nEquation;
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+                    }
+                }
+
+                RDouble fnx     = nsx[FBCIndex];
+                RDouble fny     = nsy[FBCIndex];
+                RDouble fnz     = nsz[FBCIndex];
+                RDouble farea   = ns[FBCIndex];
+                RDouble volume  = vol[le];
+
+                for (int m = 0; m < nEquation; m++)
+                {
+                    primN[m] = prim[m][rBCIndex];
+                }
+
+                gas->dGradient2dPrimitive(primN,1,dgraddqx, 'x', fnx, fny, fnz, farea, volume, nEquation);
+                gas->dGradient2dPrimitive(primN,1,dgraddqy, 'y', fnx, fny, fnz, farea, volume, nEquation);
+                gas->dGradient2dPrimitive(primN,1,dgraddqz, 'z', fnx, fny, fnz, farea, volume, nEquation);
+                
+
+                // contributions from the bc, 
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dGradtmp[indexI][indexJ] = 0;
+
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dGradtmp[indexI][indexJ] += dFluxdgradxL[indexI][indexK]*
+                                                                    dgraddqx[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradyL[indexI][indexK]*
+                                                                    dgraddqy[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradzL[indexI][indexK]*
+                                                                    dgraddqz[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // contributions from the bc, 
+                // dFluxdPR*dDdPlocal
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dGradtmpBC[indexI][indexJ] = 0.0;
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dGradtmpBC[indexI][indexJ]  += dGradtmp[indexI][indexK]*
+                                                            dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+                gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+                int colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                int colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx1+indexJ] += dGradtmpBC[indexI][indexK] * dqdcvL[indexK][indexJ];
+                            dRdq[indexI][colidx2+indexJ] -= dGradtmpBC[indexI][indexK] * dqdcvL[indexK][indexJ];
+
+                        }
+                    }
+                }
+            }
+
+
+
+
+            // judge whether le is in the left cell lists of the BC 
+            result = find(BCLeftCells.begin(), BCLeftCells.end(), re); 
+            if(result != BCLeftCells.end())
+            {
+                int dist        = distance(BCLeftCells.begin(),result);
+                int rBCIndex    = BCRightCells[dist];
+                int FBCIndex    = BCFaces[dist];
+                // contributions from the bc
+                int indexre = (rBCIndex-nTotalCell)*nEquation;
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+                    }
+                }
+
+
+                RDouble fnx     = nsx[FBCIndex];
+                RDouble fny     = nsy[FBCIndex];
+                RDouble fnz     = nsz[FBCIndex];
+                RDouble farea   = ns[FBCIndex];
+                RDouble volume  = vol[re];
+
+                for (int m = 0; m < nEquation; m++)
+                {
+                    primN[m] = prim[m][rBCIndex];
+                }
+
+                gas->dGradient2dPrimitive(primN,1,dgraddqx, 'x', fnx, fny, fnz, farea, volume, nEquation);
+                gas->dGradient2dPrimitive(primN,1,dgraddqy, 'y', fnx, fny, fnz, farea, volume, nEquation);
+                gas->dGradient2dPrimitive(primN,1,dgraddqz, 'z', fnx, fny, fnz, farea, volume, nEquation);
+                
+                
+                // contributions from the bc, 
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dGradtmp[indexI][indexJ] = 0;
+
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dGradtmp[indexI][indexJ] += dFluxdgradxR[indexI][indexK]*
+                                                                    dgraddqx[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradyR[indexI][indexK]*
+                                                                    dgraddqy[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradzR[indexI][indexK]*
+                                                                    dgraddqz[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // contributions from the bc, 
+                // dFluxdPR*dDdPlocal
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dGradtmpBC[indexI][indexJ] = 0.0;
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dGradtmpBC[indexI][indexJ]  += dGradtmp[indexI][indexK]*
+                                                            dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+                gas->dPrimitive2dConservative(primRC, gmR, dqdcvR);
+                int colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                int colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx1+indexJ] += dGradtmpBC[indexI][indexK] * dqdcvR[indexK][indexJ];
+                            dRdq[indexI][colidx2+indexJ] -= dGradtmpBC[indexI][indexK] * dqdcvR[indexK][indexJ];
+
+                        }
+                    }
+                }
+            }
+
+
+            #endif
+            
+            for (int nVar = 0; nVar < limitnVariable; ++ nVar)
+            {
+                for( int n = 0; n < nEquation; n++ )
+                {
+                    for( int m = 0; m < nEquation; m++ )
+                    {
+                        dFluxdMinMax[n][m] = 0.0;     
+                    }
+                }
+
+                #ifdef outputJac
+                    std::cout << "------ nVar: " << nVar << " ------\n";
+                    std::cout << "LimitSignL["<<nVar<<"] = " << LimitSignL[nVar] << "  \n";
+                    std::cout << "LimitSignR["<<nVar<<"] = " << LimitSignR[nVar] << "  \n";
+                    std::cout << "dFluxdMinMax: \n";
+                    for( int n = 0; n < nEquation; n++ )
+                    {
+                        for( int m = 0; m < nEquation; m++ )
+                        {
+                            std::cout << dFluxdMinMax[n][m] << "  ";     
+                        }
+                        std::cout << "\n";
+                    }
+                    std::cout << "\n"; 
+                #endif
+
+                if( LimitSignL[nVar] == 1 )
+                {
+                    int indexmax = IndexMaxL[nVar];
+                    if( indexmax != le )
+                    {
+                        for (int m = 0; m < nEquation; m++)
+                        {
+                            dFluxdMinMax[m][nVar]   = dFluxdmaxL[m][nVar];
+                            primN[m]                = prim[m][indexmax];
+                        }
+
+                        gas->dPrimitive2dConservative(primN, gama[indexmax], dqdcvN);
+
+                        int colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, indexmax);
+                        int colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, indexmax);
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+                                for(int indexK=0; indexK < nEquation; indexK++)
+                                {
+                                    
+                                    dRdq[indexI][colidx1+indexJ] += dFluxdMinMax[indexI][indexK]*
+                                                                            dqdcvN[indexK][indexJ];
+                                    
+                                    dRdq[indexI][colidx2+indexJ] -= dFluxdMinMax[indexI][indexK]*
+                                                                            dqdcvN[indexK][indexJ];
+                                }
+                            }
+                        }
+                        
+                        // GMRES2ndBCs
+                        if( indexmax >= nTotalCell )
+                        {
+                            // contributions from the bc
+                            int indexre = (indexmax-nTotalCell)*nEquation;
+                            for(int indexI=0; indexI < nEquation; indexI++)
+                            {
+                                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                {
+                                    dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+                                }
+                            }
+
+
+
+                            for(int indexI=0; indexI < nEquation; indexI++)
+                            {
+                                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                {
+                                    dGradtmpBC[indexI][indexJ] = 0.0;
+                                    for(int indexK=0; indexK < nEquation; indexK++)
+                                    {
+                                        dGradtmpBC[indexI][indexJ]  += dFluxdMinMax[indexI][indexK]*
+                                                                        dDdPlocal[indexK][indexJ];
+                                    }
+                                }
+                            }
+
+                            gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+                            int colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                            int colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                            for(int indexI=0; indexI < nEquation; indexI++)
+                            {
+                                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                {
+                                    for(int indexK=0; indexK < nEquation; indexK++)
+                                    {
+                                        dRdq[indexI][colidx1+indexJ] += dGradtmpBC[indexI][indexK] * dqdcvL[indexK][indexJ];
+                                        dRdq[indexI][colidx2+indexJ] -= dGradtmpBC[indexI][indexK] * dqdcvL[indexK][indexJ];
+
+                                    }
+                                }
+                            }
+                        }            
+
+                    }
+
+                    #ifdef outputJac
+                        if( indexmax == le )
+                        {       
+                                std::cout << "Left max: \n";
+                                for( int n = 0; n < nEquation; n++ )
+                                {
+                                    for( int m = 0; m < nEquation; m++ )
+                                    {
+                                        std::cout << dFluxdMinMax[n][m] << "  ";     
+                                    }
+                                    std::cout << "\n";
+                                }
+                                std::cout << "\n";
+                        }
+                    #endif
+                }
+                else if ( LimitSignL[nVar] == -1 )
+                {
+                    int indexmin = IndexMinL[nVar];
+                    if( indexmin != le )
+                    {
+                        for (int m = 0; m < nEquation; m++)
+                        {
+                            dFluxdMinMax[m][nVar]   = dFluxdminL[m][nVar];
+                            primN[m]                = prim[m][indexmin];
+                        }
+
+                        gas->dPrimitive2dConservative(primN, gama[indexmin], dqdcvN);
+
+                        int colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, indexmin);
+                        int colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, indexmin);
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+                                for(int indexK=0; indexK < nEquation; indexK++)
+                                {
+                                    
+                                    dRdq[indexI][colidx1+indexJ] += dFluxdMinMax[indexI][indexK]*
+                                                                            dqdcvN[indexK][indexJ];
+                                    
+                                    dRdq[indexI][colidx2+indexJ] -= dFluxdMinMax[indexI][indexK]*
+                                                                            dqdcvN[indexK][indexJ];
+                                }
+                            }
+                        }
+
+                        // GMRES2ndBCs
+                        if( indexmin >= nTotalCell )
+                        {
+                            // contributions from the bc
+                            int indexre = (indexmin-nTotalCell)*nEquation;
+                            for(int indexI=0; indexI < nEquation; indexI++)
+                            {
+                                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                {
+                                    dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+                                }
+                            }
+
+
+                            // contributions from the bc, 
+                            // dFluxdPR*dDdPlocal
+                            for(int indexI=0; indexI < nEquation; indexI++)
+                            {
+                                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                {
+                                    dGradtmpBC[indexI][indexJ] = 0.0;
+                                    for(int indexK=0; indexK < nEquation; indexK++)
+                                    {
+                                        dGradtmpBC[indexI][indexJ]  += dFluxdMinMax[indexI][indexK]*
+                                                                        dDdPlocal[indexK][indexJ];
+                                    }
+                                }
+                            }
+
+                            gas->dPrimitive2dConservative(primLC, gmL, dqdcvL);
+                            int colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                            int colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                            for(int indexI=0; indexI < nEquation; indexI++)
+                            {
+                                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                {
+                                    for(int indexK=0; indexK < nEquation; indexK++)
+                                    {
+                                        dRdq[indexI][colidx1+indexJ] += dGradtmpBC[indexI][indexK] * dqdcvL[indexK][indexJ];
+                                        dRdq[indexI][colidx2+indexJ] -= dGradtmpBC[indexI][indexK] * dqdcvL[indexK][indexJ];
+    
+                                    }
+                                }
+                            }
+                        }                        
+
+                    }
+
+                    #ifdef outputJac
+                        if( indexmin == le )
+                        {       
+                                std::cout << "Left min: \n";
+                                for( int n = 0; n < nEquation; n++ )
+                                {
+                                    for( int m = 0; m < nEquation; m++ )
+                                    {
+                                        std::cout << dFluxdMinMax[n][m] << "  ";     
+                                    }
+                                    std::cout << "\n";
+                                }
+                                std::cout << "\n";
+                        }
+                    #endif
+                }
+
+
+
+                if( LimitSignR[nVar] == 1 )
+                {
+                    int indexmax = IndexMaxR[nVar];
+                    if( indexmax != re )
+                    {
+                        for (int m = 0; m < nEquation; m++)
+                        {
+                            dFluxdMinMax[m][nVar]   = dFluxdmaxR[m][nVar];
+                            primN[m]                = prim[m][indexmax];
+                        }
+
+                        gas->dPrimitive2dConservative(primN, gama[indexmax], dqdcvN);
+
+                        int colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, indexmax);
+                        int colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, indexmax);
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+                                for(int indexK=0; indexK < nEquation; indexK++)
+                                {
+                                    
+                                    dRdq[indexI][colidx1+indexJ] += dFluxdMinMax[indexI][indexK]*
+                                                                            dqdcvN[indexK][indexJ];
+                                    
+                                    dRdq[indexI][colidx2+indexJ] -= dFluxdMinMax[indexI][indexK]*
+                                                                            dqdcvN[indexK][indexJ];
+                                }
+                            }
+                        }
+
+                        // GMRES2ndBCs
+                        if( indexmax >= nTotalCell )
+                        {
+                            // contributions from the bc
+                            int indexre = (indexmax-nTotalCell)*nEquation;
+                            for(int indexI=0; indexI < nEquation; indexI++)
+                            {
+                                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                {
+                                    dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+                                }
+                            }
+
+
+ 
+                            for(int indexI=0; indexI < nEquation; indexI++)
+                            {
+                                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                {
+                                    dGradtmpBC[indexI][indexJ] = 0.0;
+                                    for(int indexK=0; indexK < nEquation; indexK++)
+                                    {
+                                        dGradtmpBC[indexI][indexJ]  += dFluxdMinMax[indexI][indexK]*
+                                                                        dDdPlocal[indexK][indexJ];
+                                    }
+                                }
+                            }
+
+                            gas->dPrimitive2dConservative(primRC, gmR, dqdcvR);
+                            int colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                            int colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                            for(int indexI=0; indexI < nEquation; indexI++)
+                            {
+                                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                {
+                                    for(int indexK=0; indexK < nEquation; indexK++)
+                                    {
+                                        dRdq[indexI][colidx1+indexJ] += dGradtmpBC[indexI][indexK] * dqdcvR[indexK][indexJ];
+                                        dRdq[indexI][colidx2+indexJ] -= dGradtmpBC[indexI][indexK] * dqdcvR[indexK][indexJ];
+
+                                    }
+                                }
+                            }
+                        }            
+
+
+
+                    }
+
+                    #ifdef outputJac
+                        if( indexmax == re )
+                        {       
+                                std::cout << "Right max: \n";
+                                for( int n = 0; n < nEquation; n++ )
+                                {
+                                    for( int m = 0; m < nEquation; m++ )
+                                    {
+                                        std::cout << dFluxdMinMax[n][m] << "  ";     
+                                    }
+                                    std::cout << "\n";
+                                }
+                                std::cout << "\n";
+                        }
+                    #endif
+                }
+                else if ( LimitSignR[nVar] == -1 )
+                {
+                    int indexmin = IndexMinR[nVar];
+                    if( indexmin != re )
+                    {
+                        for (int m = 0; m < nEquation; m++)
+                        {
+                            dFluxdMinMax[m][nVar]   = dFluxdminR[m][nVar];
+                            primN[m]                = prim[m][indexmin];
+                        }
+
+                        gas->dPrimitive2dConservative(primN, gama[indexmin], dqdcvN);
+
+                        int colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, indexmin);
+                        int colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, indexmin);
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+                                for(int indexK=0; indexK < nEquation; indexK++)
+                                {
+                                    
+                                    dRdq[indexI][colidx1+indexJ] += dFluxdMinMax[indexI][indexK]*
+                                                                            dqdcvN[indexK][indexJ];
+                                    
+                                    dRdq[indexI][colidx2+indexJ] -= dFluxdMinMax[indexI][indexK]*
+                                                                            dqdcvN[indexK][indexJ];
+                                }
+                            }
+                        }
+
+                        // GMRES2ndBCs
+                        if( indexmin >= nTotalCell )
+                        {
+                            // contributions from the bc
+                            int indexre = (indexmin-nTotalCell)*nEquation;
+                            for(int indexI=0; indexI < nEquation; indexI++)
+                            {
+                                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                {
+                                    dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+                                }
+                            }
+
+
+                            for(int indexI=0; indexI < nEquation; indexI++)
+                            {
+                                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                {
+                                    dGradtmpBC[indexI][indexJ] = 0.0;
+                                    for(int indexK=0; indexK < nEquation; indexK++)
+                                    {
+                                        dGradtmpBC[indexI][indexJ]  += dFluxdMinMax[indexI][indexK]*
+                                                                        dDdPlocal[indexK][indexJ];
+                                    }
+                                }
+                            }
+
+                            gas->dPrimitive2dConservative(primRC, gmR, dqdcvR);
+                            int colidx1     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                            int colidx2     = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                            for(int indexI=0; indexI < nEquation; indexI++)
+                            {
+                                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                                {
+                                    for(int indexK=0; indexK < nEquation; indexK++)
+                                    {
+                                        dRdq[indexI][colidx1+indexJ] += dGradtmpBC[indexI][indexK] * dqdcvR[indexK][indexJ];
+                                        dRdq[indexI][colidx2+indexJ] -= dGradtmpBC[indexI][indexK] * dqdcvR[indexK][indexJ];
+
+                                    }
+                                }
+                            }
+                        }                        
+
+                    }
+
+                     #ifdef outputJac
+                        if( indexmin == re )
+                        {       
+                                std::cout << "Right min: \n";
+                                for( int n = 0; n < nEquation; n++ )
+                                {
+                                    for( int m = 0; m < nEquation; m++ )
+                                    {
+                                        std::cout << dFluxdMinMax[n][m] << "  ";     
+                                    }
+                                    std::cout << "\n";
+                                }
+                                std::cout << "\n";
+                        }
+                    #endif
+                }
+            }
+
+        }
+    
+    }
+    
+    
+    delete[]primL;          primL = NULL;
+    delete[]primR;          primR = NULL;
+    delete[]primN;          primN = NULL;
+    delete[]primLC;         primLC = NULL;
+    delete[]primRC;         primRC = NULL;
+    delete[]fluxp;          fluxp = NULL;
+
+    for(int index = 0; index < nEquation; index++)
+    {
+        delete[] dqdcvL[index];
+        delete[] dqdcvR[index];
+        delete[] dqdcvN[index];
+        delete[] dgraddqx[index];
+        delete[] dgraddqy[index];
+        delete[] dgraddqz[index];
+    }
+    delete[] dqdcvL;    dqdcvL = NULL;
+    delete[] dqdcvR;    dqdcvR = NULL;
+    delete[] dqdcvN;    dqdcvN = NULL;
+    delete[] dgraddqx;  dgraddqx = NULL;
+    delete[] dgraddqy;  dgraddqy = NULL;
+    delete[] dgraddqz;  dgraddqz = NULL;
+
+    delete[] dqdxL;  dqdxL = NULL;
+    delete[] dqdyL;  dqdyL = NULL;
+    delete[] dqdzL;  dqdzL = NULL;
+
+    delete[] dqdxR;  dqdxR = NULL;
+    delete[] dqdyR;  dqdyR = NULL;
+    delete[] dqdzR;  dqdzR = NULL;
+    if ( limiterType == ILMT_VENCAT )
+    {
+        delete[] limitL;  limitL = NULL;
+        delete[] limitR;  limitR = NULL;
+    }
+    delete[] primTry; primTry = NULL;
+
+    delete[] IndexMinL; IndexMinL = NULL;
+    delete[] IndexMaxL; IndexMaxL = NULL;
+    delete[] IndexMinR; IndexMinR = NULL;
+    delete[] IndexMaxR; IndexMaxR = NULL;
+
+    delete[] minL; minL = NULL;
+    delete[] maxL; maxL = NULL;
+    delete[] minR; minR = NULL;
+    delete[] maxR; maxR = NULL;
+
+    delete[] LimitSignL; LimitSignL = NULL;
+    delete[] LimitSignR; LimitSignR = NULL;
+}
+
+
+// GMRESnolim
+void GMRES_Roe_Scheme_ConservativeForm_nolim_2nd(FaceProxy* face_proxy, InviscidSchemeParameter* invSchemePara)
+{
+    const RDouble LITTLE    = 1.0E-10;
+    int nTemperatureModel   = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation           = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar            = invSchemePara->GetNumberOfLaminar();
+    int nLength             = invSchemePara->GetLength();
+    int nm                  = invSchemePara->Getnm();
+    int RoeEntropyFixMethod = invSchemePara->GetEntropyFixMethod();
+    int nChemical           = invSchemePara->GetNumberOfChemical();
+    int nPrecondition       = invSchemePara->GetIfPrecondition();
+    int nIdealState         = invSchemePara->GetIfIdealState();
+    int limiterType         = invSchemePara->GetLimiterType();
+    // limiterType             = ILMT_FIRST;
+
+    // GMRESBoundary
+    int localStart  = face_proxy->GetlocalStart();
+    int localEnd    = face_proxy->GetlocalEnd();
+    int nBoundFace  = face_proxy->GetnBoundFace();
+    int nTotalCell  = face_proxy->GetnTotalCell();
+    int nMid;
+    // GMRESBCorrection
+    vector<int>* wallFaceIndex = face_proxy->GetWallFaceIndex();
+
+    RDouble refMachNumber       = invSchemePara->GetMachNumber();
+    RDouble entrFixCoefLeft     = invSchemePara->GetLeftEntropyFixCoefficient();
+    RDouble entrFixCoefRight    = invSchemePara->GetRightEntropyFixCoefficient();
+    RDouble** qL                = invSchemePara->GetLeftQ();
+    RDouble** qR                = invSchemePara->GetRightQ();
+    RDouble** qLC               = invSchemePara->GetLeftQC();  // GMRESPassQC
+    RDouble** qRC               = invSchemePara->GetRightQC(); // GMRESPassQC
+    RDouble* gamaL              = invSchemePara->GetLeftGama();
+    RDouble* gamaR              = invSchemePara->GetRightGama();
+    RDouble* pressureCoeffL     = face_proxy->GetPressureCoefficientL();
+    RDouble* pressureCoeffR     = face_proxy->GetPressureCoefficientR();
+    RDouble* xfn                = invSchemePara->GetFaceNormalX();
+    RDouble* yfn                = invSchemePara->GetFaceNormalY();
+    RDouble* zfn                = invSchemePara->GetFaceNormalZ();
+    RDouble* vgn                = invSchemePara->GetFaceVelocity();
+    RDouble** flux              = invSchemePara->GetFlux();
+    RDouble** tl                = invSchemePara->GetLeftTemperature();
+    RDouble** tr                = invSchemePara->GetRightTemperature();
+    int* leftcellindexofFace    = face_proxy->GetLeftCellIndexOfFace();
+    int* rightcellindexofFace   = face_proxy->GetRightCellIndexOfFace();
+    GeomProxy* geomProxy        = face_proxy->GetGeomProxy();
+    RDouble* areas              = geomProxy->GetFaceArea();
+
+    // GMRESnolim  xfc xcc should use the absolute face index
+    RDouble * xfc               = invSchemePara->GetFaceCenterX();
+    RDouble * yfc               = invSchemePara->GetFaceCenterY();
+    RDouble * zfc               = invSchemePara->GetFaceCenterZ();
+    RDouble * xcc               = invSchemePara->GetCellCenterX();
+    RDouble * ycc               = invSchemePara->GetCellCenterY();
+    RDouble * zcc               = invSchemePara->GetCellCenterZ();
+    RDouble * nsx               = invSchemePara->GetFaceNormalXAbs();
+    RDouble * nsy               = invSchemePara->GetFaceNormalYAbs();
+    RDouble * nsz               = invSchemePara->GetFaceNormalZAbs();
+    RDouble * ns                = invSchemePara->GetFaceAreaAbs();
+    RDouble * vol               = invSchemePara->GetVolume();
+    RDouble * gama              = invSchemePara->GetGama();
+    RDouble **prim              = invSchemePara->GetPrimitive();
+    vector<int>* neighborCells  = invSchemePara->GetNeighborCells();
+    vector<int>* neighborFaces  = invSchemePara->GetNeighborFaces();
+    vector<int>* neighborLR     = invSchemePara->GetNeighborLR();
+    int* qlsign                 = invSchemePara->GetLeftQSign();
+    int* qrsign                 = invSchemePara->GetRightQSign();
+
+    // GMRES2ndCorrection
+    vector<int> BCLeftCells     = invSchemePara->GetBCLeftCells();
+    vector<int> BCRightCells    = invSchemePara->GetBCRightCells();
+    vector<int> BCFaces         = invSchemePara->GetBCFaces();
+
+    RDouble dxL,dyL,dzL,dxR,dyR,dzR;
+    int Lsign;
+    int Rsign;
+
+    RDouble** dRdq             = face_proxy->GetJacobianMatrix();
+    // GMRESBoundary    
+    RDouble** dDdP              = face_proxy->GetdDdPMatrix();
+    // GMRES CSR
+    vector<int> AI = face_proxy->GetJacobianAI4GMRES();
+    vector<int> AJ = face_proxy->GetJacobianAJ4GMRES();
+
+
+    // RDouble   dRdqL[nEquation][nEquation];
+    RDouble   dRdqR[nEquation][nEquation];
+    RDouble   dDdPlocal[nEquation][nEquation];
+    RDouble   dGdqx, dGdqy, dGdqz;
+    RDouble mach2               = refMachNumber * refMachNumber;
+
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble  dFluxdpL[nEquation][nEquation];
+    RDouble  dFluxdpR[nEquation][nEquation];
+    RDouble  dFluxdtmp[nEquation][nEquation];
+    RDouble  dFluxdpwall[nEquation][nEquation];
+
+    // auto difference allocation
+    ADReal* primL  = new ADReal[nEquation]();
+    ADReal* primR  = new ADReal[nEquation]();
+    ADReal* fluxp  = new ADReal[nEquation](); // flux proxy
+
+    RDouble* primLC = new RDouble[nEquation](); // GMRESPassQC
+    RDouble* primRC = new RDouble[nEquation](); // GMRESPassQC
+    RDouble* primN  = new RDouble[nEquation]();
+    
+    RDouble temperaturesL[3] = { 0 }, temperaturesR[3] = { 0 };
+    RDouble perturbScale = 0.001;
+    
+    RDouble** dqdcvL= new RDouble*[nEquation];
+    RDouble** dqdcvR= new RDouble*[nEquation];
+    RDouble** dqdcvN= new RDouble*[nEquation];  // dqdcv for neighbors
+    RDouble** dgraddqx = new RDouble*[nEquation];
+    RDouble** dgraddqy = new RDouble*[nEquation];
+    RDouble** dgraddqz = new RDouble*[nEquation];
+    for(int indexI=0; indexI < nEquation; indexI++)
+    {
+        dqdcvL[indexI]      = new RDouble[nEquation];
+        dqdcvR[indexI]      = new RDouble[nEquation];
+        dqdcvN[indexI]      = new RDouble[nEquation];
+        dgraddqx[indexI]    = new RDouble[nEquation];
+        dgraddqy[indexI]    = new RDouble[nEquation];
+        dgraddqz[indexI]    = new RDouble[nEquation];
+        
+        for(int indexJ =0; indexJ < nEquation; indexJ ++)
+        {
+            dqdcvL[indexI][indexJ] = 0.0;
+            dqdcvR[indexI][indexJ] = 0.0;
+            dqdcvN[indexI][indexJ] = 0.0;
+            dgraddqx[indexI][indexJ] = 0.0;
+            dgraddqy[indexI][indexJ] = 0.0;
+            dgraddqz[indexI][indexJ] = 0.0;
+        }
+    }
+    
+    // GMRESBoundary
+     if (localStart >= nBoundFace)
+     {
+         nMid = localStart;  // a bug 01.07
+     }
+     else if (localEnd <= nBoundFace)
+     {
+         //! If they are all boundary faces.
+         nMid = localEnd;
+     }
+     else
+     {
+         //! Part of them are boundary faces.
+         nMid = nBoundFace;
+     }
+
+     nMid = nMid - localStart;
+
+
+     for(int iFace = 0;iFace < nMid; ++iFace)
+     {
+        int le          = leftcellindexofFace[iFace];
+        int re          = rightcellindexofFace[iFace];
+        int colidx; // colume index for GMRES CSR
+
+        RDouble area    = areas[iFace];
+
+        // GMRESgrad
+        for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+
+            primLC[iEqn] = qLC[iEqn][iFace]; // GMRESPassQC
+            primRC[iEqn] = qRC[iEqn][iFace]; // GMRESPassQC
+        }
+
+        // define sequence order of the independent variables
+        for (int iEqn = 0; iEqn < nEquation; iEqn++)
+        {
+            primL[iEqn].diff(iEqn, 10);
+            primR[iEqn].diff(iEqn + nEquation, 10);
+        }
+        
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primR, iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        flux[IR][iFace] = fluxp[IR].val();
+        flux[IU][iFace] = fluxp[IU].val();
+        flux[IV][iFace] = fluxp[IV].val();
+        flux[IW][iFace] = fluxp[IW].val();
+        flux[IP][iFace] = fluxp[IP].val();
+
+        for (int m = 0; m < nEquation; m++)
+        {
+            for (int n = 0; n < nEquation; n++)
+            {
+                dFluxdpL[m][n] = fluxp[m].dx(n) * area;
+                dFluxdpR[m][n] = fluxp[m].dx(n + nEquation) * area;
+            }
+        }
+   
+        // contributions from the bc
+        int indexre = (re-nTotalCell)*nEquation;
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+            }
+        }
+
+        // GMRESBCorrection
+        if(find(wallFaceIndex->begin(),wallFaceIndex->end(),iFace) != wallFaceIndex->end())
+        {
+            // GMRESPV , obtain the dqdcv for the left cell
+            gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+            // average of the dFluxdpL and dFluxdpR
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ =0; indexJ < nEquation; indexJ ++)
+                {
+                    dFluxdpwall[indexI][indexJ] = 0.5*(dFluxdpL[indexI][indexJ]
+                                                     + dFluxdpR[indexI][indexJ]);
+                    dFluxdpL[indexI][indexJ]    =  dFluxdpwall[indexI][indexJ]; 
+                    dFluxdpR[indexI][indexJ]    =  dFluxdpwall[indexI][indexJ];                               
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then minus to the corresponding location in dRdq.
+            int indexf = re * nEquation; // first index
+            int indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpwall[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // contributions from the bc, 
+            // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dFluxdpL[indexI][indexJ]  += dFluxdpwall[indexI][indexK]*
+                                                       dDdPlocal[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+             // GMRESPV , obtain the dqdcv for the right cell
+            gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then minus to the corresponding location in dRdq.
+            indexf = re * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];                          
+                    }
+                }
+            }
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+            
+        }
+        else
+        {
+            if ( limiterType == ILMT_FIRST )
+            {
+                // GMRESPV , obtain the dqdcv for the left cell
+                gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+                // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+                // then minus to the corresponding location in dRdq.
+                int indexf = re * nEquation; // first index
+                int indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // contributions from the bc, 
+                // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dFluxdpL[indexI][indexJ]  += dFluxdpR[indexI][indexK]*
+                                                        dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                 // GMRESPV , obtain the dqdcv for the right cell
+                gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+                // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+                // then minus to the corresponding location in dRdq.
+                indexf = re * nEquation; // first index
+                indexs = re * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = re * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+            }
+            else if ( limiterType == ILMT_NOLIM )
+            {
+                Lsign = qlsign[iFace];
+                Rsign = qrsign[iFace];
+                int jFace =  iFace + localStart; // absolute face index
+
+                // GMRESgrad
+                if( Lsign > 0)
+                {
+                    dxL = xfc[jFace] - xcc[le];
+                    dyL = yfc[jFace] - ycc[le];
+                    dzL = zfc[jFace] - zcc[le];
+                }
+                else
+                {
+                    dxL = 0.0;
+                    dyL = 0.0;
+                    dzL = 0.0;
+                }
+
+                 dxR = 0.0;
+                 dyR = 0.0;
+                 dzR = 0.0;
+              
+                // GMRESPV , obtain the dqdcv for the left cell
+                gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+                // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+                // then minus to the corresponding location in dRdq.
+                int indexf = re * nEquation; // first index
+                int indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    { 
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // contributions from the bc, 
+                // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dFluxdtmp[indexI][indexJ] = 0.0;
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dFluxdtmp[indexI][indexJ]  +=   dFluxdpR[indexI][indexK]*
+                                                            dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] += dFluxdtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+                            dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                 // GMRESPV , obtain the dqdcv for the right cell
+                gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+                // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+                // then minus to the corresponding location in dRdq.
+                indexf = re * nEquation; // first index
+                indexs = re * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = re * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+
+                
+                // considering the perturbation of the gradient in the limiter
+                RDouble fnx         = nsx[jFace];
+                RDouble fny         = nsy[jFace];
+                RDouble fnz         = nsz[jFace];
+                RDouble farea       = ns[jFace];
+                RDouble volume      = vol[re];
+                
+                // dgradRdqL
+                dGdqx = -1.0*0.5/volume*farea*fnx;
+                dGdqy = -1.0*0.5/volume*farea*fny;
+                dGdqz = -1.0*0.5/volume*farea*fnz;
+
+                // dQre/dgradR*dgradRdqL
+                RDouble dGrad = dGdqx * dxR + dGdqy * dyR + dGdqz * dzR;
+
+                // convert dGrad by right multiplying the dqdcvL,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx+indexJ] += dGrad* dFluxdpR[indexI][indexK] * dqdcvL[indexK][indexJ];
+                            dRdq[indexI][colidx2+indexJ] -= dGrad* dFluxdpR[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+
+                // considering the perturbation of the gradient in the limiter
+                volume      = vol[le];
+
+                // dgradLdqR
+                dGdqx = 1.0*0.5/volume*farea*fnx;
+                dGdqy = 1.0*0.5/volume*farea*fny;
+                dGdqz = 1.0*0.5/volume*farea*fnz;
+
+                // dQle/dgradL*dgradLdqR
+                dGrad = dGdqx * dxL + dGdqy * dyL + dGdqz * dzL;
+
+                // convert dGrad by right multiplying the dqdcvL,
+                // then add to the corresponding location in dRdq.
+
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dFluxdtmp[indexI][indexJ] = 0.0;
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dFluxdtmp[indexI][indexJ]  += dGrad* dFluxdpL[indexI][indexK]*
+                                                            dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                int colidx3 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx+indexJ] += dGrad* dFluxdpL[indexI][indexK] * dqdcvR[indexK][indexJ];
+                            dRdq[indexI][colidx2+indexJ] -= dGrad* dFluxdpL[indexI][indexK] * dqdcvR[indexK][indexJ];
+                            dRdq[indexI][colidx3+indexJ] += dFluxdtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // the neighbors of the left cells
+                for(int index = 0; index < neighborCells[le].size(); index++)
+                {
+                    int neighborIndex = neighborCells[le][index];
+                    
+                    if(neighborIndex != re)
+                    {
+                        int Faceindex   = neighborFaces[le][index];
+                        int sign        = neighborLR[le][index];
+                        RDouble fnx     = nsx[Faceindex];
+                        RDouble fny     = nsy[Faceindex];
+                        RDouble fnz     = nsz[Faceindex];
+                        RDouble farea   = ns[Faceindex];
+                        RDouble volume  = vol[le];
+
+                        for(int m =0; m < nEquation; m++)
+                        {
+                            primN[m] = prim[m][neighborIndex];
+                        }
+                        gas->dPrimitive2dConservative(primN,gama[neighborIndex],dqdcvN);
+                        // dgradLdqN
+                        dGdqx = sign*0.5/volume*farea*fnx;
+                        dGdqy = sign*0.5/volume*farea*fny;
+                        dGdqz = sign*0.5/volume*farea*fnz;
+
+                        // dQle/dgradL*dgradLdqN
+                        dGrad = dGdqx * dxL + dGdqy * dyL + dGdqz * dzL;
+
+                        int indexf  = le * nEquation; // first index
+                        int indexs  = neighborIndex * nEquation; // second index
+                        int indexf2 = re * nEquation; 
+                        int colidx  = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                        int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                        
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+
+                                for(int indexK=0; indexK < nEquation; indexK++)
+                                {
+                                    // dRL/dqLNeighbors 
+                                    dRdq[indexI][colidx+indexJ] += dGrad* dFluxdpL[indexI][indexK]*
+                                                                             dqdcvN[indexK][indexJ];
+
+                                    // dRR/dqLNeighbors 
+                                    dRdq[indexI][colidx2+indexJ] -= dGrad* dFluxdpL[indexI][indexK]*
+                                                                             dqdcvN[indexK][indexJ];
+                                }
+                            }
+                        }            
+                    }
+                }
+
+                
+                // the neighbors of the right cells
+                for(int index = 0; index < neighborCells[re].size(); index++)
+                {
+                    int neighborIndex = neighborCells[re][index];
+                    // std::cout << "Neighbors of the right cells: " << neighborIndex << " \n";
+
+                    if(neighborIndex != le)
+                    {
+                        int Faceindex   = neighborFaces[re][index];
+                        int sign        = neighborLR[re][index];
+                        RDouble fnx     = nsx[Faceindex];
+                        RDouble fny     = nsy[Faceindex];
+                        RDouble fnz     = nsz[Faceindex];
+                        RDouble farea   = ns[Faceindex];
+                        RDouble volume  = vol[re];
+
+                        for(int m =0; m < nEquation; m++)
+                        {
+                            primN[m] = prim[m][neighborIndex];
+                        }
+
+                        gas->dPrimitive2dConservative(primN,gama[neighborIndex],dqdcvN);
+
+                        // dgradRdqN
+                        dGdqx = sign*0.5/volume*farea*fnx;
+                        dGdqy = sign*0.5/volume*farea*fny;
+                        dGdqz = sign*0.5/volume*farea*fnz;
+
+                        // dQre/dgradR*dgradRdqN
+                        dGrad = dGdqx * dxR + dGdqy * dyR + dGdqz * dzR;
+
+                        int indexf  = le * nEquation; // first index
+                        int indexs  = neighborIndex * nEquation; // second index
+                        int indexf2 = re * nEquation; 
+                        int colidx  = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                        int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+
+                                for(int indexK=0; indexK < nEquation; indexK++)
+                                {
+                                    // dRL/dqRNeighbors 
+                                    dRdq[indexI][colidx+indexJ] += dGrad* dFluxdpR[indexI][indexK]*
+                                                                             dqdcvN[indexK][indexJ];
+
+                                    // dRR/dqRNeighbors
+                                    dRdq[indexI][colidx2+indexJ] -= dGrad* dFluxdpR[indexI][indexK]*
+                                                                             dqdcvN[indexK][indexJ];
+                                }
+                            }
+                        }            
+                    }
+                }
+                
+
+                
+            }
+        }
+
+    
+     }
+
+
+     for(int iFace = nMid;iFace < nLength; ++iFace)
+     {
+        int le          = leftcellindexofFace[iFace];
+        int re          = rightcellindexofFace[iFace];
+        int colidx;
+        RDouble area    = areas[iFace];
+        for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+
+            primLC[iEqn] = qLC[iEqn][iFace]; // GMRESPassQC
+            primRC[iEqn] = qRC[iEqn][iFace]; // GMRESPassQC
+        }
+
+        // define sequence order of the independent variables
+        for (int iEqn = 0; iEqn < nEquation; iEqn++)
+        {
+            primL[iEqn].diff(iEqn, 10);
+            primR[iEqn].diff(iEqn + nEquation, 10);
+        }
+
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primR, iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        flux[IR][iFace] = fluxp[IR].val();
+        flux[IU][iFace] = fluxp[IU].val();
+        flux[IV][iFace] = fluxp[IV].val();
+        flux[IW][iFace] = fluxp[IW].val();
+        flux[IP][iFace] = fluxp[IP].val();
+       
+        for (int m = 0; m < nEquation; m++)
+        {
+             for (int n = 0; n < nEquation; n++)
+             {
+                 dFluxdpL[m][n] = fluxp[m].dx(n) * area;
+                 dFluxdpR[m][n] = fluxp[m].dx(n + nEquation) * area;
+             }
+        }
+  
+        if (limiterType == ILMT_FIRST)
+        {
+            // GMRESPV , obtain the dqdcv for the left cell
+            gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then minus to the corresponding location in dRdq.
+            int indexf = re * nEquation; // first index
+            int indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                { 
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+             // GMRESPV , obtain the dqdcv for the right cell
+            gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then minus to the corresponding location in dRdq.
+            indexf = re * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+        }
+        else if ( limiterType == ILMT_NOLIM )
+        {
+            Lsign = qlsign[iFace];
+            Rsign = qrsign[iFace];
+            int jFace =  iFace + localStart; // absolute face index
+
+            if( Lsign > 0 )
+            {
+                dxL = xfc[jFace] - xcc[le];
+                dyL = yfc[jFace] - ycc[le];
+                dzL = zfc[jFace] - zcc[le];
+            }
+            else
+            {
+                dxL = 0.0;
+                dyL = 0.0;
+                dzL = 0.0;
+            }
+
+            if( Rsign > 0 )
+            {
+                dxR = xfc[jFace] - xcc[re];
+                dyR = yfc[jFace] - ycc[re];
+                dzR = zfc[jFace] - zcc[re];
+            }
+            else
+            {
+                dxR = 0.0;
+                dyR = 0.0;
+                dzR = 0.0;
+            }
+
+            // GMRESPV , obtain the dqdcv for the left cell
+            gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then minus to the corresponding location in dRdq.
+            int indexf = re * nEquation; // first index
+            int indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                { 
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+             // GMRESPV , obtain the dqdcv for the right cell
+            gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then minus to the corresponding location in dRdq.
+            indexf = re * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            
+            // considering the perturbation of the gradient in the limiter
+            RDouble fnx         = nsx[jFace];
+            RDouble fny         = nsy[jFace];
+            RDouble fnz         = nsz[jFace];
+            RDouble farea       = ns[jFace];
+            RDouble volume      = vol[re];
+
+            // dgradRdqL
+            dGdqx = -1.0*0.5/volume*farea*fnx;
+            dGdqy = -1.0*0.5/volume*farea*fny;
+            dGdqz = -1.0*0.5/volume*farea*fnz;
+
+            // dQre/dgradR*dgradRdqL
+            RDouble dGrad = dGdqx * dxR + dGdqy * dyR + dGdqz * dzR;
+            
+            // convert dGrad by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx+indexJ] += dGrad* dFluxdpR[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        dRdq[indexI][colidx2+indexJ] -= dGrad* dFluxdpR[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+
+            // considering the perturbation of the gradient in the limiter
+            volume      = vol[le];
+
+            // dgradLdqR
+            dGdqx = 1.0*0.5/volume*farea*fnx;
+            dGdqy = 1.0*0.5/volume*farea*fny;
+            dGdqz = 1.0*0.5/volume*farea*fnz;
+
+            // dQle/dgradL*dgradLdqR
+            dGrad = dGdqx * dxL + dGdqy * dyL + dGdqz * dzL;
+
+            // convert dGrad by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx+indexJ] += dGrad* dFluxdpL[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        dRdq[indexI][colidx2+indexJ] -= dGrad* dFluxdpL[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            // std::cout << "iFace: " << iFace << " le, re " << le << " , " << re << "\n";
+            // the neighbors of the left cells
+            for(int index = 0; index < neighborCells[le].size(); index++)
+            {
+                int neighborIndex = neighborCells[le][index];
+                // std::cout << "Neighbors of the left cells: " << neighborIndex << " \n";
+                if(neighborIndex != re)
+                {
+                    int Faceindex   = neighborFaces[le][index];
+                    int sign        = neighborLR[le][index];
+                    RDouble fnx     = nsx[Faceindex];
+                    RDouble fny     = nsy[Faceindex];
+                    RDouble fnz     = nsz[Faceindex];
+                    RDouble farea   = ns[Faceindex];
+                    RDouble volume  = vol[le];
+
+                    for(int m =0; m < nEquation; m++)
+                    {
+                        primN[m] = prim[m][neighborIndex];
+                    }
+
+                    gas->dPrimitive2dConservative(primN,gama[neighborIndex],dqdcvN);
+
+                    // dgradLdqN
+                    dGdqx = sign*0.5/volume*farea*fnx;
+                    dGdqy = sign*0.5/volume*farea*fny;
+                    dGdqz = sign*0.5/volume*farea*fnz;
+
+                    // dQle/dgradL*dgradLdqN
+                    dGrad = dGdqx * dxL + dGdqy * dyL + dGdqz * dzL;
+
+                    int indexf  = le * nEquation; // first index
+                    int indexs  = neighborIndex * nEquation; // second index
+                    int indexf2 = re * nEquation; 
+                    int colidx  = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                    int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                    // std::cout << "dRle/dqNeighbor: " << le << " " << neighborIndex <<  " " << colidx << " \n";
+                    // std::cout << "dRre/dqNeighbor: " << re << " " << neighborIndex <<  " " << colidx2 << " \n";
+                    
+                    for(int indexI=0; indexI < nEquation; indexI++)
+                    {
+                        for(int indexJ=0; indexJ < nEquation; indexJ++)
+                        {
+
+                            for(int indexK=0; indexK < nEquation; indexK++)
+                            {
+                                // dRL/dqLNeighbors 
+                                dRdq[indexI][colidx+indexJ] += dGrad* dFluxdpL[indexI][indexK]*
+                                                                         dqdcvN[indexK][indexJ];
+
+                                // dRR/dqLNeighbors 
+                                dRdq[indexI][colidx2+indexJ] -= dGrad* dFluxdpL[indexI][indexK]*
+                                                                         dqdcvN[indexK][indexJ];
+                            }
+                        }
+                    }            
+                }
+            }
+
+            // the neighbors of the right cells
+            for(int index = 0; index < neighborCells[re].size(); index++)
+            {
+                int neighborIndex = neighborCells[re][index];
+                // std::cout << "Neighbors of the right cells: " << neighborIndex << " \n";
+
+                if(neighborIndex != le)
+                {
+                    int Faceindex   = neighborFaces[re][index];
+                    int sign        = neighborLR[re][index];
+                    RDouble fnx     = nsx[Faceindex];
+                    RDouble fny     = nsy[Faceindex];
+                    RDouble fnz     = nsz[Faceindex];
+                    RDouble farea   = ns[Faceindex];
+                    RDouble volume  = vol[re];
+
+                    for(int m =0; m < nEquation; m++)
+                    {
+                        primN[m] = prim[m][neighborIndex];
+                    }
+
+                    gas->dPrimitive2dConservative(primN,gama[neighborIndex],dqdcvN);
+
+                    // dgradRdqN
+                    dGdqx = sign*0.5/volume*farea*fnx;
+                    dGdqy = sign*0.5/volume*farea*fny;
+                    dGdqz = sign*0.5/volume*farea*fnz;
+
+                    // dQre/dgradR*dgradRdqN
+                    dGrad = dGdqx * dxR + dGdqy * dyR + dGdqz * dzR;
+
+                    int indexf  = le * nEquation; // first index
+                    int indexs  = neighborIndex * nEquation; // second index
+                    int indexf2 = re * nEquation; 
+                    int colidx  = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                    int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                    // std::cout << "dRle/dqNeighbor: " << le << " " << neighborIndex <<  " " << colidx << " \n";
+                    // std::cout << "dRre/dqNeighbor: " << re << " " << neighborIndex <<  " " << colidx2 << " \n";
+                    for(int indexI=0; indexI < nEquation; indexI++)
+                    {
+                        for(int indexJ=0; indexJ < nEquation; indexJ++)
+                        {
+
+                            for(int indexK=0; indexK < nEquation; indexK++)
+                            {
+                                // dRL/dqRNeighbors 
+                                dRdq[indexI][colidx+indexJ] += dGrad* dFluxdpR[indexI][indexK]*
+                                                                         dqdcvN[indexK][indexJ];
+
+                                // dRR/dqRNeighbors
+                                dRdq[indexI][colidx2+indexJ] -= dGrad* dFluxdpR[indexI][indexK]*
+                                                                         dqdcvN[indexK][indexJ];
+                            }
+                        }
+                    }            
+                }
+            }
+
+            // judge whether le is in the left cell lists of the BC 
+            vector<int>::iterator result = find(BCLeftCells.begin(), BCLeftCells.end(), le); 
+            if(result != BCLeftCells.end())
+            {
+                int dist        = distance(BCLeftCells.begin(),result);
+                int rBCIndex    = BCRightCells[dist];
+                int FBCIndex    = BCFaces[dist];
+
+                // contributions from the bc
+                int indexre = (rBCIndex-nTotalCell)*nEquation;
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+                    }
+                }
+
+                RDouble fnx     = nsx[FBCIndex];
+                RDouble fny     = nsy[FBCIndex];
+                RDouble fnz     = nsz[FBCIndex];
+                RDouble farea   = ns[FBCIndex];
+                RDouble volume  = vol[le];
+
+                // dgradLdqN
+                dGdqx = 1.0*0.5/volume*farea*fnx;
+                dGdqy = 1.0*0.5/volume*farea*fny;
+                dGdqz = 1.0*0.5/volume*farea*fnz;
+                // dQle/dgradL*dgradLdqN
+                dGrad = dGdqx * dxL + dGdqy * dyL + dGdqz * dzL;
+
+                // contributions from the bc, 
+                // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dFluxdtmp[indexI][indexJ] = 0.0;
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dFluxdtmp[indexI][indexJ]  += dGrad* dFluxdpL[indexI][indexK]*
+                                                            dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+                gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+                int colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx+indexJ] += dFluxdtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+                            dRdq[indexI][colidx2+indexJ] -= dFluxdtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+
+            }
+
+            // judge whether re is in the left cell lists of the BC 
+            result = find(BCLeftCells.begin(), BCLeftCells.end(), re); 
+            if(result != BCLeftCells.end())
+            {
+                int dist        = distance(BCLeftCells.begin(),result);
+                int rBCIndex    = BCRightCells[dist];
+                int FBCIndex    = BCFaces[dist];
+
+                // contributions from the bc
+                int indexre = (rBCIndex-nTotalCell)*nEquation;
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+                    }
+                }
+
+                RDouble fnx     = nsx[FBCIndex];
+                RDouble fny     = nsy[FBCIndex];
+                RDouble fnz     = nsz[FBCIndex];
+                RDouble farea   = ns[FBCIndex];
+                RDouble volume  = vol[re];
+
+                // dgradLdqN
+                dGdqx = 1.0*0.5/volume*farea*fnx;
+                dGdqy = 1.0*0.5/volume*farea*fny;
+                dGdqz = 1.0*0.5/volume*farea*fnz;
+                // dQle/dgradL*dgradLdqN
+                dGrad = dGdqx * dxR + dGdqy * dyR + dGdqz * dzR;
+
+                // contributions from the bc, 
+                // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dFluxdtmp[indexI][indexJ] = 0.0;
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dFluxdtmp[indexI][indexJ]  += dGrad* dFluxdpR[indexI][indexK]*
+                                                            dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+                gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+                int colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx+indexJ] += dFluxdtmp[indexI][indexK] * dqdcvR[indexK][indexJ];
+                            dRdq[indexI][colidx2+indexJ] -= dFluxdtmp[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+
+
+            } 
+
+        }
+     }
+
+    delete[]primL;          primL = NULL;
+    delete[]primR;          primR = NULL;
+    delete[]primN;          primN = NULL;
+    delete[]primLC;         primLC = NULL;
+    delete[]primRC;         primRC = NULL;
+    delete[]fluxp;          fluxp = NULL;
+
+    for(int index = 0; index < nEquation; index++)
+    {
+        delete[] dqdcvL[index];
+        delete[] dqdcvR[index];
+        delete[] dqdcvN[index];
+        delete[] dgraddqx[index];
+        delete[] dgraddqy[index];
+        delete[] dgraddqz[index];
+    }
+    delete[] dqdcvL;    dqdcvL = NULL;
+    delete[] dqdcvR;    dqdcvR = NULL;
+    delete[] dqdcvN;    dqdcvN = NULL;
+    delete[] dgraddqx;  dgraddqx = NULL;
+    delete[] dgraddqy;  dgraddqy = NULL;
+    delete[] dgraddqz;  dgraddqz = NULL;
+}
+
+// GMRESnolim
+void GMRES_Roe_Scheme_ConservativeForm_nolim_Matrix(FaceProxy* face_proxy, InviscidSchemeParameter* invSchemePara)
+{
+    const RDouble LITTLE    = 1.0E-10;
+    int nTemperatureModel   = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation           = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar            = invSchemePara->GetNumberOfLaminar();
+    int nLength             = invSchemePara->GetLength();
+    int nm                  = invSchemePara->Getnm();
+    int RoeEntropyFixMethod = invSchemePara->GetEntropyFixMethod();
+    int nChemical           = invSchemePara->GetNumberOfChemical();
+    int nPrecondition       = invSchemePara->GetIfPrecondition();
+    int nIdealState         = invSchemePara->GetIfIdealState();
+    int limiterType         = invSchemePara->GetLimiterType();
+
+    // GMRESBoundary
+    int localStart  = face_proxy->GetlocalStart();
+    int localEnd    = face_proxy->GetlocalEnd();
+    int nBoundFace  = face_proxy->GetnBoundFace();
+    int nTotalCell  = face_proxy->GetnTotalCell();
+    int nMid;
+    // GMRESBCorrection
+    vector<int>* wallFaceIndex = face_proxy->GetWallFaceIndex();
+
+    RDouble refMachNumber       = invSchemePara->GetMachNumber();
+    RDouble entrFixCoefLeft     = invSchemePara->GetLeftEntropyFixCoefficient();
+    RDouble entrFixCoefRight    = invSchemePara->GetRightEntropyFixCoefficient();
+    RDouble** qL                = invSchemePara->GetLeftQ();
+    RDouble** qR                = invSchemePara->GetRightQ();
+    RDouble** qLC               = invSchemePara->GetLeftQC();  // GMRESPassQC
+    RDouble** qRC               = invSchemePara->GetRightQC(); // GMRESPassQC
+    RDouble* gamaL              = invSchemePara->GetLeftGama();
+    RDouble* gamaR              = invSchemePara->GetRightGama();
+    RDouble* pressureCoeffL     = face_proxy->GetPressureCoefficientL();
+    RDouble* pressureCoeffR     = face_proxy->GetPressureCoefficientR();
+    RDouble* xfn                = invSchemePara->GetFaceNormalX();
+    RDouble* yfn                = invSchemePara->GetFaceNormalY();
+    RDouble* zfn                = invSchemePara->GetFaceNormalZ();
+    RDouble* vgn                = invSchemePara->GetFaceVelocity();
+    RDouble** flux              = invSchemePara->GetFlux();
+    RDouble** tl                = invSchemePara->GetLeftTemperature();
+    RDouble** tr                = invSchemePara->GetRightTemperature();
+    int* leftcellindexofFace    = face_proxy->GetLeftCellIndexOfFace();
+    int* rightcellindexofFace   = face_proxy->GetRightCellIndexOfFace();
+    GeomProxy* geomProxy        = face_proxy->GetGeomProxy();
+    RDouble* areas              = geomProxy->GetFaceArea();
+
+    // GMRESnolim  xfc xcc should use the absolute face index
+    RDouble * xfc               = invSchemePara->GetFaceCenterX();
+    RDouble * yfc               = invSchemePara->GetFaceCenterY();
+    RDouble * zfc               = invSchemePara->GetFaceCenterZ();
+    RDouble * xcc               = invSchemePara->GetCellCenterX();
+    RDouble * ycc               = invSchemePara->GetCellCenterY();
+    RDouble * zcc               = invSchemePara->GetCellCenterZ();
+    RDouble * nsx               = invSchemePara->GetFaceNormalXAbs();
+    RDouble * nsy               = invSchemePara->GetFaceNormalYAbs();
+    RDouble * nsz               = invSchemePara->GetFaceNormalZAbs();
+    RDouble * ns                = invSchemePara->GetFaceAreaAbs();
+    RDouble * vol               = invSchemePara->GetVolume();
+    RDouble * gama              = invSchemePara->GetGama();
+    RDouble **prim              = invSchemePara->GetPrimitive();
+    vector<int>* neighborCells  = invSchemePara->GetNeighborCells();
+    vector<int>* neighborFaces  = invSchemePara->GetNeighborFaces();
+    vector<int>* neighborLR     = invSchemePara->GetNeighborLR();
+    int* qlsign                 = invSchemePara->GetLeftQSign();
+    int* qrsign                 = invSchemePara->GetRightQSign();
+    RDouble dxL,dyL,dzL,dxR,dyR,dzR;
+    int Lsign;
+    int Rsign;
+
+    RDouble** dRdq             = face_proxy->GetJacobianMatrix();
+    // GMRESBoundary    
+    RDouble** dDdP              = face_proxy->GetdDdPMatrix();
+    // GMRES CSR
+    vector<int> AI = face_proxy->GetJacobianAI4GMRES();
+    vector<int> AJ = face_proxy->GetJacobianAJ4GMRES();
+
+    RDouble   dRdqR[nEquation][nEquation];
+    RDouble   dDdPlocal[nEquation][nEquation];
+    RDouble   dGdqx, dGdqy, dGdqz;
+    RDouble mach2               = refMachNumber * refMachNumber;
+
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble  dFluxdpL[nEquation][nEquation];
+    RDouble  dFluxdpR[nEquation][nEquation];
+    RDouble  dFluxdtmp[nEquation][nEquation];
+    RDouble  dFluxdpwall[nEquation][nEquation];
+
+    // auto difference allocation
+    ADReal* primL  = new ADReal[nEquation]();
+    ADReal* primR  = new ADReal[nEquation]();
+    ADReal* fluxp  = new ADReal[nEquation](); // flux proxy
+
+    RDouble* primLC = new RDouble[nEquation](); // GMRESPassQC
+    RDouble* primRC = new RDouble[nEquation](); // GMRESPassQC
+    RDouble* primN  = new RDouble[nEquation]();
+    
+    RDouble temperaturesL[3] = { 0 }, temperaturesR[3] = { 0 };
+    RDouble perturbScale = 0.001;
+    
+    RDouble** dqdcvL= new RDouble*[nEquation];
+    RDouble** dqdcvR= new RDouble*[nEquation];
+    RDouble** dqdcvN= new RDouble*[nEquation];  // dqdcv for neighbors
+    RDouble** dgraddqx = new RDouble*[nEquation];
+    RDouble** dgraddqy = new RDouble*[nEquation];
+    RDouble** dgraddqz = new RDouble*[nEquation];
+    for(int indexI=0; indexI < nEquation; indexI++)
+    {
+        dqdcvL[indexI]      = new RDouble[nEquation];
+        dqdcvR[indexI]      = new RDouble[nEquation];
+        dqdcvN[indexI]      = new RDouble[nEquation];
+        dgraddqx[indexI]    = new RDouble[nEquation];
+        dgraddqy[indexI]    = new RDouble[nEquation];
+        dgraddqz[indexI]    = new RDouble[nEquation];
+        
+        for(int indexJ =0; indexJ < nEquation; indexJ ++)
+        {
+            dqdcvL[indexI][indexJ] = 0.0;
+            dqdcvR[indexI][indexJ] = 0.0;
+            dqdcvN[indexI][indexJ] = 0.0;
+            dgraddqx[indexI][indexJ] = 0.0;
+            dgraddqy[indexI][indexJ] = 0.0;
+            dgraddqz[indexI][indexJ] = 0.0;
+        }
+    }
+    
+    // GMRESBoundary
+     if (localStart >= nBoundFace)
+     {
+         nMid = localStart;  // a bug 01.07
+     }
+     else if (localEnd <= nBoundFace)
+     {
+         //! If they are all boundary faces.
+         nMid = localEnd;
+     }
+     else
+     {
+         //! Part of them are boundary faces.
+         nMid = nBoundFace;
+     }
+
+     nMid = nMid - localStart;
+
+     for(int iFace = 0;iFace < nMid; ++iFace)
+     {
+        int le          = leftcellindexofFace[iFace];
+        int re          = rightcellindexofFace[iFace];
+        int colidx; // colume index for GMRES CSR
+
+        RDouble area    = areas[iFace];
+        for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+
+            primLC[iEqn] = qLC[iEqn][iFace]; // GMRESPassQC
+            primRC[iEqn] = qRC[iEqn][iFace]; // GMRESPassQC
+        }
+
+        // define sequence order of the independent variables
+        for (int iEqn = 0; iEqn < nEquation; iEqn++)
+        {
+            primL[iEqn].diff(iEqn, 10);
+            primR[iEqn].diff(iEqn + nEquation, 10);
+        }
+        
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primR, iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        flux[IR][iFace] = fluxp[IR].val();
+        flux[IU][iFace] = fluxp[IU].val();
+        flux[IV][iFace] = fluxp[IV].val();
+        flux[IW][iFace] = fluxp[IW].val();
+        flux[IP][iFace] = fluxp[IP].val();
+
+        for (int m = 0; m < nEquation; m++)
+        {
+            for (int n = 0; n < nEquation; n++)
+            {
+                dFluxdpL[m][n] = fluxp[m].dx(n) * area;
+                dFluxdpR[m][n] = fluxp[m].dx(n + nEquation) * area;
+            }
+        }
+   
+        // contributions from the bc
+        int indexre = (re-nTotalCell)*nEquation;
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+            }
+        }
+
+        // GMRESBCorrection
+        if(find(wallFaceIndex->begin(),wallFaceIndex->end(),iFace) != wallFaceIndex->end())
+        {
+            // GMRESPV , obtain the dqdcv for the left cell
+            gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+            // average of the dFluxdpL and dFluxdpR
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ =0; indexJ < nEquation; indexJ ++)
+                {
+                    dFluxdpwall[indexI][indexJ] = 0.5*(dFluxdpL[indexI][indexJ]
+                                                     + dFluxdpR[indexI][indexJ]);
+                    dFluxdpL[indexI][indexJ]    =  dFluxdpwall[indexI][indexJ]; 
+                    dFluxdpR[indexI][indexJ]    =  dFluxdpwall[indexI][indexJ];                               
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then minus to the corresponding location in dRdq.
+            int indexf = re * nEquation; // first index
+            int indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpwall[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // contributions from the bc, 
+            // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dFluxdpL[indexI][indexJ]  += dFluxdpwall[indexI][indexK]*
+                                                       dDdPlocal[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+             // GMRESPV , obtain the dqdcv for the right cell
+            gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then minus to the corresponding location in dRdq.
+            indexf = re * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];                          
+                    }
+                }
+            }
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+            
+        }
+        else
+        {
+            if ( limiterType == ILMT_FIRST )
+            {
+                // GMRESPV , obtain the dqdcv for the left cell
+                gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+                // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+                // then minus to the corresponding location in dRdq.
+                int indexf = re * nEquation; // first index
+                int indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // contributions from the bc, 
+                // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dFluxdpL[indexI][indexJ]  += dFluxdpR[indexI][indexK]*
+                                                        dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                 // GMRESPV , obtain the dqdcv for the right cell
+                gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+                // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+                // then minus to the corresponding location in dRdq.
+                indexf = re * nEquation; // first index
+                indexs = re * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = re * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+            }
+            else if ( limiterType == ILMT_NOLIM )
+            {
+                Lsign = qlsign[iFace];
+                Rsign = qrsign[iFace];
+                int jFace =  iFace + localStart; // absolute face index
+
+                if( Lsign > 0)
+                {
+                    dxL = xfc[jFace] - xcc[le];
+                    dyL = yfc[jFace] - ycc[le];
+                    dzL = zfc[jFace] - zcc[le];
+                }
+                else
+                {
+                    dxL = 0.0;
+                    dyL = 0.0;
+                    dzL = 0.0;
+                }
+
+                if( Rsign > 0)
+                {
+                    dxR = xfc[jFace] - xcc[re];
+                    dyR = yfc[jFace] - ycc[re];
+                    dzR = zfc[jFace] - zcc[re];
+                }
+                else
+                {
+                    dxR = 0.0;
+                    dyR = 0.0;
+                    dzR = 0.0;
+                }
+                // GMRESPV , obtain the dqdcv for the left cell
+                gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+                // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+                // then minus to the corresponding location in dRdq.
+                int indexf = re * nEquation; // first index
+                int indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    { 
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // contributions from the bc, 
+                // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dFluxdtmp[indexI][indexJ] = 0.0;
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dFluxdtmp[indexI][indexJ]  +=   dFluxdpR[indexI][indexK]*
+                                                            dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] += dFluxdtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                 // GMRESPV , obtain the dqdcv for the right cell
+                gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+                // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+                // then minus to the corresponding location in dRdq.
+                indexf = re * nEquation; // first index
+                indexs = re * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = re * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        }
+                    }
+                }
+
+                
+                // considering the perturbation of the gradient in the limiter
+                RDouble fnx         = nsx[jFace];
+                RDouble fny         = nsy[jFace];
+                RDouble fnz         = nsz[jFace];
+                RDouble farea       = ns[jFace];
+                RDouble volume      = vol[re];
+                
+                // dgradRdqL
+                dGdqx = -1.0*0.5/volume*farea*fnx;
+                dGdqy = -1.0*0.5/volume*farea*fny;
+                dGdqz = -1.0*0.5/volume*farea*fnz;
+
+                // dQre/dgradR*dgradRdqL
+                RDouble dGrad = dGdqx * dxR + dGdqy * dyR + dGdqz * dzR;
+
+                // convert dGrad by right multiplying the dqdcvL,
+                // then add to the corresponding location in dRdq.
+                indexf = le * nEquation; // first index
+                indexs = le * nEquation; // second index
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx+indexJ] += dGrad* dFluxdpR[indexI][indexK] * dqdcvL[indexK][indexJ];
+                            dRdq[indexI][colidx2+indexJ] -= dGrad* dFluxdpR[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+
+                // considering the perturbation of the gradient in the limiter
+                volume      = vol[le];
+
+                // dgradLdqR
+                dGdqx = 1.0*0.5/volume*farea*fnx;
+                dGdqy = 1.0*0.5/volume*farea*fny;
+                dGdqz = 1.0*0.5/volume*farea*fnz;
+
+                // dQle/dgradL*dgradLdqR
+                dGrad = dGdqx * dxL + dGdqy * dyL + dGdqz * dzL;
+
+                // convert dGrad by right multiplying the dqdcvL,
+                // then add to the corresponding location in dRdq.
+
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dFluxdtmp[indexI][indexJ] = 0.0;
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dFluxdtmp[indexI][indexJ]  += dGrad* dFluxdpL[indexI][indexK]*
+                                                            dDdPlocal[indexK][indexJ];
+                        }
+                    }
+                }
+
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+                colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+                int colidx3 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            dRdq[indexI][colidx+indexJ] += dGrad* dFluxdpL[indexI][indexK] * dqdcvR[indexK][indexJ];
+                            dRdq[indexI][colidx2+indexJ] -= dGrad* dFluxdpL[indexI][indexK] * dqdcvR[indexK][indexJ];
+                            dRdq[indexI][colidx3+indexJ] += dFluxdtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        }
+                    }
+                }
+
+                // the neighbors of the left cells
+                for(int index = 0; index < neighborCells[le].size(); index++)
+                {
+                    int neighborIndex = neighborCells[le][index];
+
+                    if(neighborIndex != re)
+                    {
+                        int Faceindex   = neighborFaces[le][index];
+                        int sign        = neighborLR[le][index];
+                        RDouble fnx     = nsx[Faceindex];
+                        RDouble fny     = nsy[Faceindex];
+                        RDouble fnz     = nsz[Faceindex];
+                        RDouble farea   = ns[Faceindex];
+                        RDouble volume  = vol[le];
+
+                        for(int m =0; m < nEquation; m++)
+                        {
+                            primN[m] = prim[m][neighborIndex];
+                        }
+                        gas->dPrimitive2dConservative(primN,gama[neighborIndex],dqdcvN);
+                        // dgradLdqN
+                        dGdqx = sign*0.5/volume*farea*fnx;
+                        dGdqy = sign*0.5/volume*farea*fny;
+                        dGdqz = sign*0.5/volume*farea*fnz;
+
+                        // dQle/dgradL*dgradLdqN
+                        dGrad = dGdqx * dxL + dGdqy * dyL + dGdqz * dzL;
+
+                        int indexf  = le * nEquation; // first index
+                        int indexs  = neighborIndex * nEquation; // second index
+                        int indexf2 = re * nEquation; 
+                        int colidx  = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                        int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+
+                                for(int indexK=0; indexK < nEquation; indexK++)
+                                {
+                                    // dRL/dqLNeighbors 
+                                    dRdq[indexI][colidx+indexJ] += dGrad* dFluxdpL[indexI][indexK]*
+                                                                             dqdcvN[indexK][indexJ];
+
+                                    // dRR/dqLNeighbors 
+                                    dRdq[indexI][colidx2+indexJ] -= dGrad* dFluxdpL[indexI][indexK]*
+                                                                             dqdcvN[indexK][indexJ];
+                                }
+                            }
+                        }            
+                    }
+                }
+
+                // the neighbors of the right cells
+                for(int index = 0; index < neighborCells[re].size(); index++)
+                {
+                    int neighborIndex = neighborCells[re][index];
+
+                    if(neighborIndex != le)
+                    {
+                        int Faceindex   = neighborFaces[re][index];
+                        int sign        = neighborLR[re][index];
+                        RDouble fnx     = nsx[Faceindex];
+                        RDouble fny     = nsy[Faceindex];
+                        RDouble fnz     = nsz[Faceindex];
+                        RDouble farea   = ns[Faceindex];
+                        RDouble volume  = vol[re];
+
+                        for(int m =0; m < nEquation; m++)
+                        {
+                            primN[m] = prim[m][neighborIndex];
+                        }
+
+                        gas->dPrimitive2dConservative(primN,gama[neighborIndex],dqdcvN);
+
+                        // dgradRdqN
+                        dGdqx = sign*0.5/volume*farea*fnx;
+                        dGdqy = sign*0.5/volume*farea*fny;
+                        dGdqz = sign*0.5/volume*farea*fnz;
+
+                        // dQre/dgradR*dgradRdqN
+                        dGrad = dGdqx * dxR + dGdqy * dyR + dGdqz * dzR;
+
+                        int indexf  = le * nEquation; // first index
+                        int indexs  = neighborIndex * nEquation; // second index
+                        int indexf2 = re * nEquation; 
+                        int colidx  = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                        int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                        for(int indexI=0; indexI < nEquation; indexI++)
+                        {
+                            for(int indexJ=0; indexJ < nEquation; indexJ++)
+                            {
+
+                                for(int indexK=0; indexK < nEquation; indexK++)
+                                {
+                                    // dRL/dqRNeighbors 
+                                    dRdq[indexI][colidx+indexJ] += dGrad* dFluxdpR[indexI][indexK]*
+                                                                             dqdcvN[indexK][indexJ];
+
+                                    // dRR/dqRNeighbors
+                                    dRdq[indexI][colidx2+indexJ] -= dGrad* dFluxdpR[indexI][indexK]*
+                                                                             dqdcvN[indexK][indexJ];
+                                }
+                            }
+                        }            
+                    }
+                }
+
+                
+            }
+        }
+
+    
+     }
+
+     for(int iFace = nMid;iFace < nLength; ++iFace)
+     {
+        int le          = leftcellindexofFace[iFace];
+        int re          = rightcellindexofFace[iFace];
+        int colidx;
+        RDouble area    = areas[iFace];
+        for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+
+            primLC[iEqn] = qLC[iEqn][iFace]; // GMRESPassQC
+            primRC[iEqn] = qRC[iEqn][iFace]; // GMRESPassQC
+        }
+
+        // define sequence order of the independent variables
+        for (int iEqn = 0; iEqn < nEquation; iEqn++)
+        {
+            primL[iEqn].diff(iEqn, 10);
+            primR[iEqn].diff(iEqn + nEquation, 10);
+        }
+
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primR, iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        flux[IR][iFace] = fluxp[IR].val();
+        flux[IU][iFace] = fluxp[IU].val();
+        flux[IV][iFace] = fluxp[IV].val();
+        flux[IW][iFace] = fluxp[IW].val();
+        flux[IP][iFace] = fluxp[IP].val();
+       
+        for (int m = 0; m < nEquation; m++)
+        {
+             for (int n = 0; n < nEquation; n++)
+             {
+                 dFluxdpL[m][n] = fluxp[m].dx(n) * area;
+                 dFluxdpR[m][n] = fluxp[m].dx(n + nEquation) * area;
+             }
+        }
+  
+        if (limiterType == ILMT_FIRST)
+        {
+            // GMRESPV , obtain the dqdcv for the left cell
+            gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then minus to the corresponding location in dRdq.
+            int indexf = re * nEquation; // first index
+            int indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                { 
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+             // GMRESPV , obtain the dqdcv for the right cell
+            gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then minus to the corresponding location in dRdq.
+            indexf = re * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+        }
+        else if ( limiterType == ILMT_NOLIM )
+        {
+            Lsign = qlsign[iFace];
+            Rsign = qrsign[iFace];
+            int jFace =  iFace + localStart; // absolute face index
+
+            if( Lsign > 0 )
+            {
+                dxL = xfc[jFace] - xcc[le];
+                dyL = yfc[jFace] - ycc[le];
+                dzL = zfc[jFace] - zcc[le];
+            }
+            else
+            {
+                dxL = 0.0;
+                dyL = 0.0;
+                dzL = 0.0;
+            }
+
+            if( Rsign > 0 )
+            {
+                dxR = xfc[jFace] - xcc[re];
+                dyR = yfc[jFace] - ycc[re];
+                dzR = zfc[jFace] - zcc[re];
+            }
+            else
+            {
+                dxR = 0.0;
+                dyR = 0.0;
+                dzR = 0.0;
+            }
+
+            // GMRESPV , obtain the dqdcv for the left cell
+            gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then minus to the corresponding location in dRdq.
+            int indexf = re * nEquation; // first index
+            int indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                { 
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+             // GMRESPV , obtain the dqdcv for the right cell
+            gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then minus to the corresponding location in dRdq.
+            indexf = re * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx + indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            
+            // considering the perturbation of the gradient in the limiter
+            RDouble fnx         = nsx[jFace];
+            RDouble fny         = nsy[jFace];
+            RDouble fnz         = nsz[jFace];
+            RDouble farea       = ns[jFace];
+            RDouble volume      = vol[re];
+
+            // dgradRdqL
+            dGdqx = -1.0*0.5/volume*farea*fnx;
+            dGdqy = -1.0*0.5/volume*farea*fny;
+            dGdqz = -1.0*0.5/volume*farea*fnz;
+
+            // dQre/dgradR*dgradRdqL
+            RDouble dGrad = dGdqx * dxR + dGdqy * dyR + dGdqz * dzR;
+
+            // convert dGrad by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx+indexJ] += dGrad* dFluxdpR[indexI][indexK] * dqdcvL[indexK][indexJ];
+                        dRdq[indexI][colidx2+indexJ] -= dGrad* dFluxdpR[indexI][indexK] * dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+
+            // considering the perturbation of the gradient in the limiter
+            volume      = vol[le];
+
+            // dgradLdqR
+            dGdqx = 1.0*0.5/volume*farea*fnx;
+            dGdqy = 1.0*0.5/volume*farea*fny;
+            dGdqz = 1.0*0.5/volume*farea*fnz;
+
+            // dQle/dgradL*dgradLdqR
+            dGrad = dGdqx * dxL + dGdqy * dyL + dGdqz * dzL;
+
+            // convert dGrad by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx+indexJ] += dGrad* dFluxdpL[indexI][indexK] * dqdcvR[indexK][indexJ];
+                        dRdq[indexI][colidx2+indexJ] -= dGrad* dFluxdpL[indexI][indexK] * dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            // the neighbors of the left cells
+            for(int index = 0; index < neighborCells[le].size(); index++)
+            {
+                int neighborIndex = neighborCells[le][index];
+
+                if(neighborIndex != re)
+                {
+                    int Faceindex   = neighborFaces[le][index];
+                    int sign        = neighborLR[le][index];
+                    RDouble fnx     = nsx[Faceindex];
+                    RDouble fny     = nsy[Faceindex];
+                    RDouble fnz     = nsz[Faceindex];
+                    RDouble farea   = ns[Faceindex];
+                    RDouble volume  = vol[le];
+
+                    for(int m =0; m < nEquation; m++)
+                    {
+                        primN[m] = prim[m][neighborIndex];
+                    }
+
+                    gas->dPrimitive2dConservative(primN,gama[neighborIndex],dqdcvN);
+
+                    // dgradLdqN
+                    dGdqx = sign*0.5/volume*farea*fnx;
+                    dGdqy = sign*0.5/volume*farea*fny;
+                    dGdqz = sign*0.5/volume*farea*fnz;
+
+                    // dQle/dgradL*dgradLdqN
+                    dGrad = dGdqx * dxL + dGdqy * dyL + dGdqz * dzL;
+
+                    int indexf  = le * nEquation; // first index
+                    int indexs  = neighborIndex * nEquation; // second index
+                    int indexf2 = re * nEquation; 
+                    int colidx  = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                    int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                    for(int indexI=0; indexI < nEquation; indexI++)
+                    {
+                        for(int indexJ=0; indexJ < nEquation; indexJ++)
+                        {
+
+                            for(int indexK=0; indexK < nEquation; indexK++)
+                            {
+                                // dRL/dqLNeighbors 
+                                dRdq[indexI][colidx+indexJ] += dGrad* dFluxdpL[indexI][indexK]*
+                                                                         dqdcvN[indexK][indexJ];
+
+                                // dRR/dqLNeighbors 
+                                dRdq[indexI][colidx2+indexJ] -= dGrad* dFluxdpL[indexI][indexK]*
+                                                                         dqdcvN[indexK][indexJ];
+                            }
+                        }
+                    }            
+                }
+            }
+
+            // the neighbors of the right cells
+            for(int index = 0; index < neighborCells[re].size(); index++)
+            {
+                int neighborIndex = neighborCells[re][index];
+
+                if(neighborIndex != le)
+                {
+                    int Faceindex   = neighborFaces[re][index];
+                    int sign        = neighborLR[re][index];
+                    RDouble fnx     = nsx[Faceindex];
+                    RDouble fny     = nsy[Faceindex];
+                    RDouble fnz     = nsz[Faceindex];
+                    RDouble farea   = ns[Faceindex];
+                    RDouble volume  = vol[re];
+
+                    for(int m =0; m < nEquation; m++)
+                    {
+                        primN[m] = prim[m][neighborIndex];
+                    }
+
+                    gas->dPrimitive2dConservative(primN,gama[neighborIndex],dqdcvN);
+
+                    // dgradRdqN
+                    dGdqx = sign*0.5/volume*farea*fnx;
+                    dGdqy = sign*0.5/volume*farea*fny;
+                    dGdqz = sign*0.5/volume*farea*fnz;
+
+                    // dQre/dgradR*dgradRdqN
+                    dGrad = dGdqx * dxR + dGdqy * dyR + dGdqz * dzR;
+
+                    int indexf  = le * nEquation; // first index
+                    int indexs  = neighborIndex * nEquation; // second index
+                    int indexf2 = re * nEquation; 
+                    int colidx  = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                    int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                    for(int indexI=0; indexI < nEquation; indexI++)
+                    {
+                        for(int indexJ=0; indexJ < nEquation; indexJ++)
+                        {
+
+                            for(int indexK=0; indexK < nEquation; indexK++)
+                            {
+                                // dRL/dqRNeighbors 
+                                dRdq[indexI][colidx+indexJ] += dGrad* dFluxdpR[indexI][indexK]*
+                                                                         dqdcvN[indexK][indexJ];
+
+                                // dRR/dqRNeighbors
+                                dRdq[indexI][colidx2+indexJ] -= dGrad* dFluxdpR[indexI][indexK]*
+                                                                         dqdcvN[indexK][indexJ];
+                            }
+                        }
+                    }            
+                }
+            }
+        }
+     }
+
+    delete[]primL;          primL = NULL;
+    delete[]primR;          primR = NULL;
+    delete[]primN;          primN = NULL;
+    delete[]primLC;         primLC = NULL;
+    delete[]primRC;         primRC = NULL;
+    delete[]fluxp;          fluxp = NULL;
+
+    for(int index = 0; index < nEquation; index++)
+    {
+        delete[] dqdcvL[index];
+        delete[] dqdcvR[index];
+        delete[] dqdcvN[index];
+        delete[] dgraddqx[index];
+        delete[] dgraddqy[index];
+        delete[] dgraddqz[index];
+    }
+    delete[] dqdcvL;    dqdcvL = NULL;
+    delete[] dqdcvR;    dqdcvR = NULL;
+    delete[] dqdcvN;    dqdcvN = NULL;
+    delete[] dgraddqx;  dgraddqx = NULL;
+    delete[] dgraddqy;  dgraddqy = NULL;
+    delete[] dgraddqz;  dgraddqz = NULL;
+}
+
+// GMRES FD CSR format  GMRESCSR
+void GMRES_Roe_Scheme_ConservativeForm_CSR(FaceProxy* face_proxy, InviscidSchemeParameter* invSchemePara)
+{
+    const RDouble LITTLE    = 1.0E-10;
+    int nTemperatureModel   = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation           = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar            = invSchemePara->GetNumberOfLaminar();
+    int nLength             = invSchemePara->GetLength();
+    int nm                  = invSchemePara->Getnm();
+    int RoeEntropyFixMethod = invSchemePara->GetEntropyFixMethod();
+    int nChemical           = invSchemePara->GetNumberOfChemical();
+    int nPrecondition       = invSchemePara->GetIfPrecondition();
+    int nIdealState         = invSchemePara->GetIfIdealState();
+
+    // GMRESBoundary
+    int localStart  = face_proxy->GetlocalStart();
+    int localEnd    = face_proxy->GetlocalEnd();
+    int nBoundFace  = face_proxy->GetnBoundFace();
+    int nTotalCell  = face_proxy->GetnTotalCell();
+    int nMid;
+    // GMRESBCorrection
+    vector<int>* wallFaceIndex = face_proxy->GetWallFaceIndex();
+
+    RDouble refMachNumber       = invSchemePara->GetMachNumber();
+    RDouble entrFixCoefLeft     = invSchemePara->GetLeftEntropyFixCoefficient();
+    RDouble entrFixCoefRight    = invSchemePara->GetRightEntropyFixCoefficient();
+    RDouble** qL                = invSchemePara->GetLeftQ();
+    RDouble** qR                = invSchemePara->GetRightQ();
+    RDouble** qLC               = invSchemePara->GetLeftQC();  // GMRESPassQC
+    RDouble** qRC               = invSchemePara->GetRightQC(); // GMRESPassQC
+    RDouble* gamaL              = invSchemePara->GetLeftGama();
+    RDouble* gamaR              = invSchemePara->GetRightGama();
+    RDouble* pressureCoeffL     = face_proxy->GetPressureCoefficientL();
+    RDouble* pressureCoeffR     = face_proxy->GetPressureCoefficientR();
+    RDouble* xfn                = invSchemePara->GetFaceNormalX();
+    RDouble* yfn                = invSchemePara->GetFaceNormalY();
+    RDouble* zfn                = invSchemePara->GetFaceNormalZ();
+    RDouble* vgn                = invSchemePara->GetFaceVelocity();
+    RDouble** flux              = invSchemePara->GetFlux();
+    RDouble** tl                = invSchemePara->GetLeftTemperature();
+    RDouble** tr                = invSchemePara->GetRightTemperature();
+    int* leftcellindexofFace    = face_proxy->GetLeftCellIndexOfFace();
+    int* rightcellindexofFace   = face_proxy->GetRightCellIndexOfFace();
+    GeomProxy* geomProxy        = face_proxy->GetGeomProxy();
+    RDouble* areas              = geomProxy->GetFaceArea();
+    RDouble** dRdq             = face_proxy->GetJacobianMatrix();
+    // GMRESBoundary    
+    RDouble** dDdP              = face_proxy->GetdDdPMatrix();
+    // GMRES CSR
+    vector<int> AI = face_proxy->GetJacobianAI4GMRES();
+    vector<int> AJ = face_proxy->GetJacobianAJ4GMRES();
+    // RDouble   dRdqL[nEquation][nEquation];
+    RDouble   dRdqR[nEquation][nEquation];
+    RDouble   dDdPlocal[nEquation][nEquation];
+    RDouble mach2               = refMachNumber * refMachNumber;
+
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+
+    RDouble* primLpert  = new RDouble[nEquation]();
+    RDouble* primRpert  = new RDouble[nEquation]();
+    RDouble  dFluxdpL[nEquation][nEquation];
+    RDouble  dFluxdpR[nEquation][nEquation];
+    RDouble  dFluxdpwall[nEquation][nEquation];
+    RDouble dprimpert;
+    RDouble* primL  = new RDouble[nEquation]();
+    RDouble* primR  = new RDouble[nEquation]();
+    RDouble* primLC = new RDouble[nEquation](); // GMRESPassQC
+    RDouble* primRC = new RDouble[nEquation](); // GMRESPassQC
+    RDouble* fluxp  = new RDouble[nEquation](); // flux proxy
+    RDouble temperaturesL[3] = { 0 }, temperaturesR[3] = { 0 };
+    RDouble perturbScale = 0.001;
+    
+    RDouble** dqdcvL= new RDouble*[nEquation];
+    RDouble** dqdcvR= new RDouble*[nEquation];
+    for(int indexI=0; indexI < nEquation; indexI++)
+    {
+        dqdcvL[indexI] = new RDouble[nEquation];
+        dqdcvR[indexI] = new RDouble[nEquation];
+        
+        for(int indexJ =0; indexJ < nEquation; indexJ ++)
+        {
+            dqdcvL[indexI][indexJ] = 0.0;
+            dqdcvR[indexI][indexJ] = 0.0;
+        }
+    }
+    
+    // GMRESBoundary
+     if (localStart >= nBoundFace)
+     {
+         nMid = localStart;  // a bug 01.07
+     }
+     else if (localEnd <= nBoundFace)
+     {
+         //! If they are all boundary faces.
+         nMid = localEnd;
+     }
+     else
+     {
+         //! Part of them are boundary faces.
+         nMid = nBoundFace;
+     }
+
+     nMid = nMid - localStart;
+
+     for(int iFace = 0;iFace < nMid; ++iFace)
+     {
+        int le          = leftcellindexofFace[iFace];
+        int re          = rightcellindexofFace[iFace];
+        int colidx;
+        RDouble area    = areas[iFace];
+        for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+
+            primLC[iEqn] = qLC[iEqn][iFace]; // GMRESPassQC
+            primRC[iEqn] = qRC[iEqn][iFace]; // GMRESPassQC
+
+        }
+
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primR, iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        flux[IR][iFace] = fluxp[IR];
+        flux[IU][iFace] = fluxp[IU];
+        flux[IV][iFace] = fluxp[IV];
+        flux[IW][iFace] = fluxp[IW];
+        flux[IP][iFace] = fluxp[IP];
+       
+
+        // perturb the density of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IR] *= (1.0+perturbScale);
+        dprimpert     = primLpert[IR] - primL[IR];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IR] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+        
+
+        // perturb the u of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IU] += perturbScale;
+        dprimpert     = primLpert[IU] - primL[IU];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IU] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the v of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IV] += perturbScale;
+        dprimpert     = primLpert[IV] - primL[IV];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IV] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the w of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IW] += perturbScale;
+        dprimpert     = primLpert[IW] - primL[IW];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IW] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the P of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IP] *= (1.0+perturbScale);
+        dprimpert     = primLpert[IP] - primL[IP];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IP] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the rho of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IR] *= (1.0+perturbScale);
+        dprimpert     = primRpert[IR] - primR[IR];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IR] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the u of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IU] += perturbScale;
+        dprimpert     = primRpert[IU] - primR[IU];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IU] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the v of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IV] += perturbScale;
+        dprimpert     = primRpert[IV] - primR[IV];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IV] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the w of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IW] += perturbScale;
+        dprimpert     = primRpert[IW] - primR[IW];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IW] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the P of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IP] *= (1.0+perturbScale);
+        dprimpert     = primRpert[IP] - primR[IP];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IP] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+   
+        // contributions from the bc
+        int indexre = (re-nTotalCell)*nEquation;
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+            }
+        }
+
+        // GMRESBCorrection
+        if(find(wallFaceIndex->begin(),wallFaceIndex->end(),iFace) != wallFaceIndex->end())
+        {
+            // GMRESPV , obtain the dqdcv for the left cell
+            gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+            // average of the dFluxdpL and dFluxdpR
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                
+                for(int indexJ =0; indexJ < nEquation; indexJ ++)
+                {
+                    dFluxdpwall[indexI][indexJ] = 0.5*(dFluxdpL[indexI][indexJ]
+                                                     + dFluxdpR[indexI][indexJ]);
+                    dFluxdpL[indexI][indexJ]    =  dFluxdpwall[indexI][indexJ]; 
+                    dFluxdpR[indexI][indexJ]    =  dFluxdpwall[indexI][indexJ];                               
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then minus to the corresponding location in dRdq.
+            int indexf = re * nEquation; // first index
+            int indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx+indexJ] -= dFluxdpwall[indexI][indexK]*
+                                                                   dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // contributions from the bc, 
+            // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dFluxdpL[indexI][indexJ]  += dFluxdpwall[indexI][indexK]*
+                                                       dDdPlocal[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx+indexJ] += dFluxdpL[indexI][indexK]*
+                                                                 dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+             // GMRESPV , obtain the dqdcv for the right cell
+            gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then minus to the corresponding location in dRdq.
+            indexf = re * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx+indexJ] -= dFluxdpR[indexI][indexK]*
+                                                                 dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx+indexJ] += dFluxdpR[indexI][indexK]*
+                                                                 dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+            
+        }
+        else
+        {
+            // GMRESPV , obtain the dqdcv for the left cell
+            gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then minus to the corresponding location in dRdq.
+            int indexf = re * nEquation; // first index
+            int indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx+indexJ] -= dFluxdpL[indexI][indexK]*
+                                                                 dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // contributions from the bc, 
+            // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dFluxdpL[indexI][indexJ]  += dFluxdpR[indexI][indexK]*
+                                                    dDdPlocal[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx+indexJ] += dFluxdpL[indexI][indexK]*
+                                                                 dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+             // GMRESPV , obtain the dqdcv for the right cell
+            gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then minus to the corresponding location in dRdq.
+            indexf = re * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx+indexJ] -= dFluxdpR[indexI][indexK]*
+                                                                 dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = re * nEquation; // second index
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexI][colidx+indexJ] += dFluxdpR[indexI][indexK]*
+                                                                 dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+        }
+
+    
+     }
+
+     for(int iFace = nMid;iFace < nLength; ++iFace)
+     {
+        int le          = leftcellindexofFace[iFace];
+        int re          = rightcellindexofFace[iFace];
+        int colidx;
+        RDouble area    = areas[iFace];
+        for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+
+            primLC[iEqn] = qLC[iEqn][iFace]; // GMRESPassQC
+            primRC[iEqn] = qRC[iEqn][iFace]; // GMRESPassQC
+        }
+
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primR, iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        flux[IR][iFace] = fluxp[IR];
+        flux[IU][iFace] = fluxp[IU];
+        flux[IV][iFace] = fluxp[IV];
+        flux[IW][iFace] = fluxp[IW];
+        flux[IP][iFace] = fluxp[IP];
+       
+
+        // perturb the density of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IR] *= (1.0+perturbScale);
+        dprimpert     = primLpert[IR] - primL[IR];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IR] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+        
+
+        // perturb the u of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IU] += perturbScale;
+        dprimpert     = primLpert[IU] - primL[IU];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IU] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the v of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IV] += perturbScale;
+        dprimpert     = primLpert[IV] - primL[IV];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IV] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the w of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IW] += perturbScale;
+        dprimpert     = primLpert[IW] - primL[IW];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IW] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the P of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IP] *= (1.0+perturbScale);
+        dprimpert     = primLpert[IP] - primL[IP];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IP] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the rho of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IR] *= (1.0+perturbScale);
+        dprimpert     = primRpert[IR] - primR[IR];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IR] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the u of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IU] += perturbScale;
+        dprimpert     = primRpert[IU] - primR[IU];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IU] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the v of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IV] += perturbScale;
+        dprimpert     = primRpert[IV] - primR[IV];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IV] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the w of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IW] += perturbScale;
+        dprimpert     = primRpert[IW] - primR[IW];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IW] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the P of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IP] *= (1.0+perturbScale);
+        dprimpert     = primRpert[IP] - primR[IP];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IP] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+  
+        // GMRESPV , obtain the dqdcv for the left cell
+        gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+        // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+        // then minus to the corresponding location in dRdq.
+        int indexf = re * nEquation; // first index
+        int indexs = le * nEquation; // second index
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx+indexJ] -= dFluxdpL[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = le * nEquation; // second index
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx+indexJ] += dFluxdpL[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+                }
+            }
+        }
+
+         // GMRESPV , obtain the dqdcv for the right cell
+        gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+        // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+        // then minus to the corresponding location in dRdq.
+        indexf = re * nEquation; // first index
+        indexs = re * nEquation; // second index
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx+indexJ] -= dFluxdpR[indexI][indexK]*
+                                                             dqdcvR[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = re * nEquation; // second index
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx+indexJ] += dFluxdpR[indexI][indexK]*
+                                                             dqdcvR[indexK][indexJ];
+                }
+            }
+        }
+     }
+
+    delete[]primL;          primL = NULL;
+    delete[]primR;          primR = NULL;
+    delete[]primLC;         primLC = NULL;
+    delete[]primRC;         primRC = NULL;
+    delete[]primLpert;      primLpert = NULL;
+    delete[]primRpert;      primRpert = NULL;
+    delete[]fluxp;          fluxp = NULL;
+
+    for(int index = 0; index < nEquation; index++)
+    {
+        delete[] dqdcvL[index];
+        delete[] dqdcvR[index];
+    }
+    delete[] dqdcvL;
+    delete[] dqdcvR;
+}
+
+// GMRESPV
+// GMRES for finite difference considering nBoundFace using primitive variables
+void GMRES_Roe_Scheme_ConservativeForm_FD_PV(FaceProxy* face_proxy, InviscidSchemeParameter* invSchemePara)
+{
+    const RDouble LITTLE    = 1.0E-10;
+    int nTemperatureModel   = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation           = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar            = invSchemePara->GetNumberOfLaminar();
+    int nLength             = invSchemePara->GetLength();
+    int nm                  = invSchemePara->Getnm();
+    int RoeEntropyFixMethod = invSchemePara->GetEntropyFixMethod();
+    int nChemical           = invSchemePara->GetNumberOfChemical();
+    int nPrecondition       = invSchemePara->GetIfPrecondition();
+    int nIdealState         = invSchemePara->GetIfIdealState();
+
+    // GMRESBoundary
+    int localStart  = face_proxy->GetlocalStart();
+    int localEnd    = face_proxy->GetlocalEnd();
+    int nBoundFace  = face_proxy->GetnBoundFace();
+    int nTotalCell  = face_proxy->GetnTotalCell();
+    int nMid;
+    // GMRESBCorrection
+    vector<int>* wallFaceIndex = face_proxy->GetWallFaceIndex();
+
+    RDouble refMachNumber       = invSchemePara->GetMachNumber();
+    RDouble entrFixCoefLeft     = invSchemePara->GetLeftEntropyFixCoefficient();
+    RDouble entrFixCoefRight    = invSchemePara->GetRightEntropyFixCoefficient();
+    RDouble** qL                = invSchemePara->GetLeftQ();
+    RDouble** qR                = invSchemePara->GetRightQ();
+    RDouble** qLC               = invSchemePara->GetLeftQC();  // GMRESPassQC
+    RDouble** qRC               = invSchemePara->GetRightQC(); // GMRESPassQC
+    RDouble* gamaL              = invSchemePara->GetLeftGama();
+    RDouble* gamaR              = invSchemePara->GetRightGama();
+    RDouble* pressureCoeffL     = face_proxy->GetPressureCoefficientL();
+    RDouble* pressureCoeffR     = face_proxy->GetPressureCoefficientR();
+    RDouble* xfn                = invSchemePara->GetFaceNormalX();
+    RDouble* yfn                = invSchemePara->GetFaceNormalY();
+    RDouble* zfn                = invSchemePara->GetFaceNormalZ();
+    RDouble* vgn                = invSchemePara->GetFaceVelocity();
+    RDouble** flux              = invSchemePara->GetFlux();
+    RDouble** tl                = invSchemePara->GetLeftTemperature();
+    RDouble** tr                = invSchemePara->GetRightTemperature();
+    int* leftcellindexofFace    = face_proxy->GetLeftCellIndexOfFace();
+    int* rightcellindexofFace   = face_proxy->GetRightCellIndexOfFace();
+    GeomProxy* geomProxy        = face_proxy->GetGeomProxy();
+    RDouble* areas              = geomProxy->GetFaceArea();
+    RDouble** dRdq             = face_proxy->GetJacobianMatrix();
+    // GMRESBoundary    
+    RDouble** dDdP              = face_proxy->GetdDdPMatrix();
+    // RDouble   dRdqL[nEquation][nEquation];
+    RDouble   dRdqR[nEquation][nEquation];
+    RDouble   dDdPlocal[nEquation][nEquation];
+    RDouble mach2               = refMachNumber * refMachNumber;
+
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+
+    RDouble* primLpert  = new RDouble[nEquation]();
+    RDouble* primRpert  = new RDouble[nEquation]();
+    RDouble  dFluxdpL[nEquation][nEquation];
+    RDouble  dFluxdpR[nEquation][nEquation];
+    RDouble  dFluxdpwall[nEquation][nEquation];
+    RDouble dprimpert;
+    RDouble* primL  = new RDouble[nEquation]();
+    RDouble* primR  = new RDouble[nEquation]();
+    RDouble* primLC = new RDouble[nEquation](); // GMRESPassQC
+    RDouble* primRC = new RDouble[nEquation](); // GMRESPassQC
+    RDouble* fluxp  = new RDouble[nEquation](); // flux proxy
+    RDouble temperaturesL[3] = { 0 }, temperaturesR[3] = { 0 };
+    RDouble perturbScale = 1e-6;
+    
+    RDouble** dqdcvL= new RDouble*[nEquation];
+    RDouble** dqdcvR= new RDouble*[nEquation];
+    for(int indexI=0; indexI < nEquation; indexI++)
+    {
+        dqdcvL[indexI] = new RDouble[nEquation];
+        dqdcvR[indexI] = new RDouble[nEquation];
+        
+        for(int indexJ =0; indexJ < nEquation; indexJ ++)
+        {
+            dqdcvL[indexI][indexJ] = 0.0;
+            dqdcvR[indexI][indexJ] = 0.0;
+        }
+    }
+    
+    // GMRESBoundary
+     if (localStart >= nBoundFace)
+     {
+         nMid = localStart;  // a bug 01.07
+     }
+     else if (localEnd <= nBoundFace)  // add else 
+     {
+         //! If they are all boundary faces.
+         nMid = localEnd;
+     }
+     else
+     {
+         //! Part of them are boundary faces.
+         nMid = nBoundFace;
+     }
+
+     nMid = nMid - localStart;
+
+     for(int iFace = 0;iFace < nMid; ++iFace)
+     {
+        int le          = leftcellindexofFace[iFace];
+        int re          = rightcellindexofFace[iFace];
+        RDouble area    = areas[iFace];
+        for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+
+            primLC[iEqn] = qLC[iEqn][iFace]; // GMRESPassQC
+            primRC[iEqn] = qRC[iEqn][iFace]; // GMRESPassQC
+
+        }
+
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primR, iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        flux[IR][iFace] = fluxp[IR];
+        flux[IU][iFace] = fluxp[IU];
+        flux[IV][iFace] = fluxp[IV];
+        flux[IW][iFace] = fluxp[IW];
+        flux[IP][iFace] = fluxp[IP];
+       
+
+        // perturb the density of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IR] *= (1.0+perturbScale);
+        dprimpert     = primLpert[IR] - primL[IR];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IR] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+        
+
+        // perturb the u of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IU] += perturbScale;
+        dprimpert     = primLpert[IU] - primL[IU];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IU] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the v of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IV] += perturbScale;
+        dprimpert     = primLpert[IV] - primL[IV];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IV] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the w of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IW] += perturbScale;
+        dprimpert     = primLpert[IW] - primL[IW];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IW] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the P of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IP] *= (1.0+perturbScale);
+        dprimpert     = primLpert[IP] - primL[IP];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IP] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the rho of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IR] *= (1.0+perturbScale);
+        dprimpert     = primRpert[IR] - primR[IR];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IR] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the u of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IU] += perturbScale;
+        dprimpert     = primRpert[IU] - primR[IU];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IU] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the v of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IV] += perturbScale;
+        dprimpert     = primRpert[IV] - primR[IV];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IV] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the w of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IW] += perturbScale;
+        dprimpert     = primRpert[IW] - primR[IW];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IW] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the P of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IP] *= (1.0+perturbScale);
+        dprimpert     = primRpert[IP] - primR[IP];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IP] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+   
+        // contributions from the bc
+        int indexre = (re-nTotalCell)*nEquation;
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+            }
+        }
+
+        // GMRESBCorrection
+        if(find(wallFaceIndex->begin(),wallFaceIndex->end(),iFace) != wallFaceIndex->end())
+        {
+            // GMRESPV , obtain the dqdcv for the left cell
+            gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+            // average of the dFluxdpL and dFluxdpR
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                
+                for(int indexJ =0; indexJ < nEquation; indexJ ++)
+                {
+                    dFluxdpwall[indexI][indexJ] = 0.5*(dFluxdpL[indexI][indexJ]
+                                                     + dFluxdpR[indexI][indexJ]);
+                    dFluxdpL[indexI][indexJ]    =  dFluxdpwall[indexI][indexJ]; 
+                    dFluxdpR[indexI][indexJ]    =  dFluxdpwall[indexI][indexJ];                               
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then minus to the corresponding location in dRdq.
+            int indexf = re * nEquation; // first index
+            int indexs = le * nEquation; // second index
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexf+indexI][indexs+indexJ] -= dFluxdpwall[indexI][indexK]*
+                                                                   dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // contributions from the bc, 
+            // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dFluxdpL[indexI][indexJ]  += dFluxdpwall[indexI][indexK]*
+                                                       dDdPlocal[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexf+indexI][indexs+indexJ] += dFluxdpL[indexI][indexK]*
+                                                                 dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+             // GMRESPV , obtain the dqdcv for the right cell
+            gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then minus to the corresponding location in dRdq.
+            indexf = re * nEquation; // first index
+            indexs = re * nEquation; // second index
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexf+indexI][indexs+indexJ] -= dFluxdpR[indexI][indexK]*
+                                                                 dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = re * nEquation; // second index
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexf+indexI][indexs+indexJ] += dFluxdpR[indexI][indexK]*
+                                                                 dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+            
+        }
+        else
+        {
+            // GMRESPV , obtain the dqdcv for the left cell
+            gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then minus to the corresponding location in dRdq.
+            int indexf = re * nEquation; // first index
+            int indexs = le * nEquation; // second index
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexf+indexI][indexs+indexJ] -= dFluxdpL[indexI][indexK]*
+                                                                 dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+            // contributions from the bc, 
+            // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dFluxdpL[indexI][indexJ]  += dFluxdpR[indexI][indexK]*
+                                                    dDdPlocal[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = le * nEquation; // second index
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexf+indexI][indexs+indexJ] += dFluxdpL[indexI][indexK]*
+                                                                 dqdcvL[indexK][indexJ];
+                    }
+                }
+            }
+
+             // GMRESPV , obtain the dqdcv for the right cell
+            gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then minus to the corresponding location in dRdq.
+            indexf = re * nEquation; // first index
+            indexs = re * nEquation; // second index
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexf+indexI][indexs+indexJ] -= dFluxdpR[indexI][indexK]*
+                                                                 dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+
+            // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+            // then add to the corresponding location in dRdq.
+            indexf = le * nEquation; // first index
+            indexs = re * nEquation; // second index
+            for(int indexI=0; indexI < nEquation; indexI++)
+            {
+                for(int indexJ=0; indexJ < nEquation; indexJ++)
+                {
+
+                    for(int indexK=0; indexK < nEquation; indexK++)
+                    {
+                        dRdq[indexf+indexI][indexs+indexJ] += dFluxdpR[indexI][indexK]*
+                                                                 dqdcvR[indexK][indexJ];
+                    }
+                }
+            }
+        }
+
+    
+     }
+
+     for(int iFace = nMid;iFace < nLength; ++iFace)
+     {
+        int le          = leftcellindexofFace[iFace];
+        int re          = rightcellindexofFace[iFace];
+        RDouble area    = areas[iFace];
+        for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+
+            primLC[iEqn] = qLC[iEqn][iFace]; // GMRESPassQC
+            primRC[iEqn] = qRC[iEqn][iFace]; // GMRESPassQC
+        }
+
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primR, iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        flux[IR][iFace] = fluxp[IR];
+        flux[IU][iFace] = fluxp[IU];
+        flux[IV][iFace] = fluxp[IV];
+        flux[IW][iFace] = fluxp[IW];
+        flux[IP][iFace] = fluxp[IP];
+       
+
+        // perturb the density of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IR] *= (1.0+perturbScale);
+        dprimpert     = primLpert[IR] - primL[IR];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IR] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+        
+
+        // perturb the u of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IU] += perturbScale;
+        dprimpert     = primLpert[IU] - primL[IU];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IU] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the v of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IV] += perturbScale;
+        dprimpert     = primLpert[IV] - primL[IV];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IV] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the w of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IW] += perturbScale;
+        dprimpert     = primLpert[IW] - primL[IW];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IW] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the P of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primLpert[index] = primL[index];
+        }
+        primLpert[IP] *= (1.0+perturbScale);
+        dprimpert     = primLpert[IP] - primL[IP];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primLpert, primR, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpL[index][IP] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the rho of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IR] *= (1.0+perturbScale);
+        dprimpert     = primRpert[IR] - primR[IR];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IR] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the u of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IU] += perturbScale;
+        dprimpert     = primRpert[IU] - primR[IU];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IU] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the v of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IV] += perturbScale;
+        dprimpert     = primRpert[IV] - primR[IV];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IV] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the w of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IW] += perturbScale;
+        dprimpert     = primRpert[IW] - primR[IW];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IW] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+        // perturb the P of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            primRpert[index] = primR[index];
+        }
+        primRpert[IP] *= (1.0+perturbScale);
+        dprimpert     = primRpert[IP] - primR[IP];
+
+        Cal_GMRES_Roe_Scheme_Flux_PV(primL, primRpert, iFace, fluxp,
+                                        face_proxy,invSchemePara);
+
+        for(int index = 0; index < nEquation; index++)
+        {
+            dFluxdpR[index][IP] = (fluxp[index] - flux[index][iFace])/dprimpert*area;
+        }
+
+  
+        // GMRESPV , obtain the dqdcv for the left cell
+        gas->dPrimitive2dConservative(primLC,gmL,dqdcvL);
+
+        // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+        // then minus to the corresponding location in dRdq.
+        int indexf = re * nEquation; // first index
+        int indexs = le * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] -= dFluxdpL[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = le * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] += dFluxdpL[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+                }
+            }
+        }
+
+         // GMRESPV , obtain the dqdcv for the right cell
+        gas->dPrimitive2dConservative(primRC,gmR,dqdcvR);
+
+        // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+        // then minus to the corresponding location in dRdq.
+        indexf = re * nEquation; // first index
+        indexs = re * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] -= dFluxdpR[indexI][indexK]*
+                                                             dqdcvR[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = re * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] += dFluxdpR[indexI][indexK]*
+                                                             dqdcvR[indexK][indexJ];
+                }
+            }
+        }
+     }
+
+    delete[]primL;          primL = NULL;
+    delete[]primR;          primR = NULL;
+    delete[]primLC;         primLC = NULL;
+    delete[]primRC;         primRC = NULL;
+    delete[]primLpert;      primLpert = NULL;
+    delete[]primRpert;      primRpert = NULL;
+    delete[]fluxp;          fluxp = NULL;
+
+    for(int index = 0; index < nEquation; index++)
+    {
+        delete[] dqdcvL[index];
+        delete[] dqdcvR[index];
+    }
+    delete[] dqdcvL;
+    delete[] dqdcvR;
+}
+
+// GMRES for finite difference considering nBoundFace using conservative variables
+void GMRES_Roe_Scheme_ConservativeForm_CV(FaceProxy* face_proxy, InviscidSchemeParameter* invSchemePara)
+{
+    const RDouble LITTLE    = 1.0E-10;
+    int nTemperatureModel   = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation           = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar            = invSchemePara->GetNumberOfLaminar();
+    int nLength             = invSchemePara->GetLength();
+    int nm                  = invSchemePara->Getnm();
+    int RoeEntropyFixMethod = invSchemePara->GetEntropyFixMethod();
+    int nChemical           = invSchemePara->GetNumberOfChemical();
+    int nPrecondition       = invSchemePara->GetIfPrecondition();
+    int nIdealState         = invSchemePara->GetIfIdealState();
+
+    // GMRESBoundary
+    int localStart  = face_proxy->GetlocalStart();
+    int localEnd    = face_proxy->GetlocalEnd();
+    int nBoundFace  = face_proxy->GetnBoundFace();
+    int nTotalCell  = face_proxy->GetnTotalCell();
+    int nMid;
+
+    RDouble refMachNumber       = invSchemePara->GetMachNumber();
+    RDouble entrFixCoefLeft     = invSchemePara->GetLeftEntropyFixCoefficient();
+    RDouble entrFixCoefRight    = invSchemePara->GetRightEntropyFixCoefficient();
+    RDouble** qL                = invSchemePara->GetLeftQ();
+    RDouble** qR                = invSchemePara->GetRightQ();
+    RDouble* gamaL              = invSchemePara->GetLeftGama();
+    RDouble* gamaR              = invSchemePara->GetRightGama();
+    RDouble* pressureCoeffL     = face_proxy->GetPressureCoefficientL();
+    RDouble* pressureCoeffR     = face_proxy->GetPressureCoefficientR();
+    RDouble* xfn                = invSchemePara->GetFaceNormalX();
+    RDouble* yfn                = invSchemePara->GetFaceNormalY();
+    RDouble* zfn                = invSchemePara->GetFaceNormalZ();
+    RDouble* vgn                = invSchemePara->GetFaceVelocity();
+    RDouble** flux              = invSchemePara->GetFlux();
+    RDouble** tl                = invSchemePara->GetLeftTemperature();
+    RDouble** tr                = invSchemePara->GetRightTemperature();
+    int* leftcellindexofFace    = face_proxy->GetLeftCellIndexOfFace();
+    int* rightcellindexofFace   = face_proxy->GetRightCellIndexOfFace();
+    GeomProxy* geomProxy        = face_proxy->GetGeomProxy();
+    RDouble* areas              = geomProxy->GetFaceArea();
+    RDouble** dRdq             = face_proxy->GetJacobianMatrix();
+    // GMRESBoundary    
+    RDouble** dDdP              = face_proxy->GetdDdPMatrix();
+    // RDouble   dRdqL[nEquation][nEquation];
+    RDouble   dRdqR[nEquation][nEquation];
+    RDouble   dDdPlocal[nEquation][nEquation];
+    RDouble mach2               = refMachNumber * refMachNumber;
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble* prim       = new RDouble[nEquation]();
+    RDouble* qConserveL = new RDouble[nEquation]();
+    RDouble* qConserveR = new RDouble[nEquation]();
+    RDouble* qCvL       = new RDouble[nEquation]();
+    RDouble* qCvR       = new RDouble[nEquation]();
+    RDouble* qCvLpert   = new RDouble[nEquation]();
+    RDouble* qCvRpert   = new RDouble[nEquation]();
+    RDouble* dFluxdCv   = new RDouble[nEquation]();
+    RDouble  dCvpert;
+
+    RDouble* primL = new RDouble[nEquation]();
+    RDouble* primR = new RDouble[nEquation]();
+    RDouble* fluxp = new RDouble[nEquation](); // flux proxy
+    RDouble temperaturesL[3] = { 0 }, temperaturesR[3] = { 0 };
+    RDouble perturbScale = 0.001;
+    
+    // GMRESBoundary
+     if (localStart >= nBoundFace)
+     {
+         nMid = 0;
+     }
+     if (localEnd <= nBoundFace)
+     {
+         //! If they are all boundary faces.
+         nMid = localEnd;
+     }
+     else
+     {
+         //! Part of them are boundary faces.
+         nMid = nBoundFace;
+     }
+
+     nMid = nMid - localStart;
+
+     for(int iFace = 0;iFace < nMid; ++iFace)
+     {
+        int le          = leftcellindexofFace[iFace];
+        int re          = rightcellindexofFace[iFace];
+        RDouble area    = areas[iFace];
+        for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+        }
+
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        gas->Primitive2Conservative(primL, gmL, temperaturesL[ITV], temperaturesL[ITE], qCvL);
+        gas->Primitive2Conservative(primR, gmR, temperaturesR[ITV], temperaturesR[ITE], qCvR);
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvR,iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        flux[IR][iFace] = fluxp[IR];
+        flux[IU][iFace] = fluxp[IU];
+        flux[IV][iFace] = fluxp[IV];
+        flux[IW][iFace] = fluxp[IW];
+        flux[IP][iFace] = fluxp[IP];
+       
+
+        // perturb the density of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IR] *= (1.0+perturbScale);
+        dCvpert     = qCvLpert[IR] - qCvL[IR];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+                                  face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace])/dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace])/dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace])/dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace])/dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace])/dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IR] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IR] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IR] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IR] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][le * nEquation + IR] += dFluxdCv[IP] * area;
+
+        // for(int index=0; index < nEquation; index++)
+        // {
+        //     dRdqL[index][IR] = dFluxdCv[index] * area;
+        // }
+
+        dRdq[re * nEquation + IR][le * nEquation + IR] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IR] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IR] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IR] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][le * nEquation + IR] -= dFluxdCv[IP] * area;
+        
+
+        // perturb the momentum rhou of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IU] += perturbScale;
+        dCvpert = qCvLpert[IU] - qCvL[IU];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+                                  face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IU] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IU] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IU] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IU] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][le * nEquation + IU] += dFluxdCv[IP] * area;
+
+        // for(int index=0; index < nEquation; index++)
+        // {
+        //     dRdqL[index][IU] = dFluxdCv[index] * area;
+        // }
+
+        dRdq[re * nEquation + IR][le * nEquation + IU] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IU] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IU] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IU] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][le * nEquation + IU] -= dFluxdCv[IP] * area;
+
+
+        // perturb the momentum rhov of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IV] += perturbScale;
+        dCvpert = qCvLpert[IV] - qCvL[IV];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IV] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IV] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IV] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IV] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][le * nEquation + IV] += dFluxdCv[IP] * area;
+
+        // for(int index=0; index < nEquation; index++)
+        // {
+        //     dRdqL[index][IV] = dFluxdCv[index] * area;
+        // }
+
+        dRdq[re * nEquation + IR][le * nEquation + IV] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IV] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IV] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IV] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][le * nEquation + IV] -= dFluxdCv[IP] * area;
+
+        // perturb the momentum rhow of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IW] += perturbScale;
+        dCvpert = qCvLpert[IW] - qCvL[IW];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IW] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IW] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IW] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IW] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][le * nEquation + IW] += dFluxdCv[IP] * area;
+
+        // for(int index=0; index < nEquation; index++)
+        // {
+        //     dRdqL[index][IW] = dFluxdCv[index] * area;
+        // }
+
+        dRdq[re * nEquation + IR][le * nEquation + IW] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IW] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IW] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IW] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][le * nEquation + IW] -= dFluxdCv[IP] * area;
+
+
+        // perturb the rhoE of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IP] *= (1.0+perturbScale);
+        dCvpert = qCvLpert[IP] - qCvL[IP];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IP] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IP] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IP] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IP] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][le * nEquation + IP] += dFluxdCv[IP] * area;
+
+        // for(int index=0; index < nEquation; index++)
+        // {
+        //     dRdqL[index][IP] = dFluxdCv[index] * area;
+        // }
+
+        dRdq[re * nEquation + IR][le * nEquation + IP] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IP] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IP] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IP] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][le * nEquation + IP] -= dFluxdCv[IP] * area;
+
+
+        // perturb the density of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IR] *= (1.0+perturbScale);
+        dCvpert = qCvRpert[IR] - qCvR[IR];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IR] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IR] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IR] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IR] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][re * nEquation + IR] += dFluxdCv[IP] * area;
+
+        for(int index=0; index < nEquation; index++)
+        {
+            dRdqR[index][IR] = dFluxdCv[index] * area;
+        }
+
+        dRdq[re * nEquation + IR][re * nEquation + IR] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IR] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IR] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IR] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][re * nEquation + IR] -= dFluxdCv[IP] * area;
+
+
+        // perturb the momentum rhou of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IU] += perturbScale;
+        dCvpert = qCvRpert[IU] - qCvR[IU];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+                                  face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IU] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IU] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IU] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IU] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][re * nEquation + IU] += dFluxdCv[IP] * area;
+
+        for(int index=0; index < nEquation; index++)
+        {
+            dRdqR[index][IU] = dFluxdCv[index] * area;
+        }
+
+        dRdq[re * nEquation + IR][re * nEquation + IU] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IU] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IU] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IU] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][re * nEquation + IU] -= dFluxdCv[IP] * area;
+
+
+        // perturb the momentum rhov of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IV] += perturbScale;
+        dCvpert = qCvRpert[IV] - qCvR[IV];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+                                  face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IV] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IV] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IV] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IV] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][re * nEquation + IV] += dFluxdCv[IP] * area;
+
+        for(int index=0; index < nEquation; index++)
+        {
+            dRdqR[index][IV] = dFluxdCv[index] * area;
+        }
+
+        dRdq[re * nEquation + IR][re * nEquation + IV] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IV] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IV] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IV] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][re * nEquation + IV] -= dFluxdCv[IP] * area;
+
+        // perturb the momentum rhow of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IW] += perturbScale;
+        dCvpert = qCvRpert[IW] - qCvR[IW];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IW] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IW] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IW] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IW] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][re * nEquation + IW] += dFluxdCv[IP] * area;
+
+        for(int index=0; index < nEquation; index++)
+        {
+            dRdqR[index][IW] = dFluxdCv[index] * area;
+        }
+
+        dRdq[re * nEquation + IR][re * nEquation + IW] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IW] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IW] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IW] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][re * nEquation + IW] -= dFluxdCv[IP] * area;
+
+
+        // perturb the momentum rhoE of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IP] *= (1.0+perturbScale);
+        dCvpert = qCvRpert[IP] - qCvR[IP];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IP] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IP] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IP] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IP] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][re * nEquation + IP] += dFluxdCv[IP] * area;
+
+        for(int index=0; index < nEquation; index++)
+        {
+            dRdqR[index][IP] = dFluxdCv[index] * area;
+        }
+
+        dRdq[re * nEquation + IR][re * nEquation + IP] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IP] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IP] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IP] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][re * nEquation + IP] -= dFluxdCv[IP] * area;
+
+        int indexre = (re-nTotalCell)*nEquation;
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+            }
+        }
+
+        int indexle = le * nEquation;
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexle+indexI][indexle+indexJ] += dRdqR[indexI][indexK]*
+                                                             dDdPlocal[indexK][indexJ];
+                }
+            }
+        }
+
+    
+     }
+
+     for(int iFace = nMid;iFace < nLength; ++iFace)
+     {
+        int le          = leftcellindexofFace[iFace];
+        int re          = rightcellindexofFace[iFace];
+        RDouble area    = areas[iFace];
+        for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+        }
+
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        gas->Primitive2Conservative(primL, gmL, temperaturesL[ITV], temperaturesL[ITE], qCvL);
+        gas->Primitive2Conservative(primR, gmR, temperaturesR[ITV], temperaturesR[ITE], qCvR);
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvR,iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        flux[IR][iFace] = fluxp[IR];
+        flux[IU][iFace] = fluxp[IU];
+        flux[IV][iFace] = fluxp[IV];
+        flux[IW][iFace] = fluxp[IW];
+        flux[IP][iFace] = fluxp[IP];
+       
+
+        // perturb the density of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IR] *= (1.0+perturbScale);
+        dCvpert     = qCvLpert[IR] - qCvL[IR];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+                                  face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace])/dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace])/dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace])/dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace])/dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace])/dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IR] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IR] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IR] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IR] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][le * nEquation + IR] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][le * nEquation + IR] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IR] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IR] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IR] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][le * nEquation + IR] -= dFluxdCv[IP] * area;
+        
+
+        // perturb the momentum rhou of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IU] += perturbScale;
+        dCvpert = qCvLpert[IU] - qCvL[IU];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+                                  face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IU] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IU] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IU] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IU] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][le * nEquation + IU] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][le * nEquation + IU] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IU] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IU] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IU] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][le * nEquation + IU] -= dFluxdCv[IP] * area;
+
+
+        // perturb the momentum rhov of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IV] += perturbScale;
+        dCvpert = qCvLpert[IV] - qCvL[IV];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IV] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IV] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IV] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IV] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][le * nEquation + IV] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][le * nEquation + IV] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IV] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IV] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IV] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][le * nEquation + IV] -= dFluxdCv[IP] * area;
+
+        // perturb the momentum rhow of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IW] += perturbScale;
+        dCvpert = qCvLpert[IW] - qCvL[IW];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IW] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IW] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IW] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IW] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][le * nEquation + IW] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][le * nEquation + IW] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IW] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IW] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IW] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][le * nEquation + IW] -= dFluxdCv[IP] * area;
+
+
+        // perturb the rhoE of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IP] *= (1.0+perturbScale);
+        dCvpert = qCvLpert[IP] - qCvL[IP];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IP] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IP] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IP] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IP] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][le * nEquation + IP] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][le * nEquation + IP] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IP] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IP] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IP] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][le * nEquation + IP] -= dFluxdCv[IP] * area;
+
+
+        // perturb the density of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IR] *= (1.0+perturbScale);
+        dCvpert = qCvRpert[IR] - qCvR[IR];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IR] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IR] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IR] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IR] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][re * nEquation + IR] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][re * nEquation + IR] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IR] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IR] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IR] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][re * nEquation + IR] -= dFluxdCv[IP] * area;
+
+
+        // perturb the momentum rhou of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IU] += perturbScale;
+        dCvpert = qCvRpert[IU] - qCvR[IU];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+                                  face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IU] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IU] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IU] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IU] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][re * nEquation + IU] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][re * nEquation + IU] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IU] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IU] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IU] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][re * nEquation + IU] -= dFluxdCv[IP] * area;
+
+
+        // perturb the momentum rhov of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IV] += perturbScale;
+        dCvpert = qCvRpert[IV] - qCvR[IV];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+                                  face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IV] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IV] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IV] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IV] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][re * nEquation + IV] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][re * nEquation + IV] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IV] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IV] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IV] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][re * nEquation + IV] -= dFluxdCv[IP] * area;
+
+        // perturb the momentum rhow of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IW] += perturbScale;
+        dCvpert = qCvRpert[IW] - qCvR[IW];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IW] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IW] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IW] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IW] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][re * nEquation + IW] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][re * nEquation + IW] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IW] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IW] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IW] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][re * nEquation + IW] -= dFluxdCv[IP] * area;
+
+
+        // perturb the momentum rhoE of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IP] *= (1.0+perturbScale);
+        dCvpert = qCvRpert[IP] - qCvR[IP];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IP] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IP] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IP] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IP] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][re * nEquation + IP] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][re * nEquation + IP] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IP] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IP] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IP] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][re * nEquation + IP] -= dFluxdCv[IP] * area;
+     }
+
+    delete[]prim;           prim = NULL;
+    delete[]primL;          primL = NULL;
+    delete[]primR;          primR = NULL;
+    delete[]qConserveL;     qConserveL = NULL;
+    delete[]qConserveR;     qConserveR = NULL;
+    delete[]qCvL;           qCvL = NULL;
+    delete[]dFluxdCv;       dFluxdCv = NULL;
+    delete[]qCvLpert;       qCvLpert = NULL;
+    delete[]qCvRpert;       qCvRpert = NULL;
+    delete[]qCvR;           qCvR = NULL;
+    delete[]fluxp;          fluxp = NULL;
+}
+
+
+// GMRES for finite difference
+void GMRES_Roe_Scheme_ConservativeForm_FD(FaceProxy* face_proxy, InviscidSchemeParameter* invSchemePara)
+{
+    const RDouble LITTLE    = 1.0E-10;
+    int nTemperatureModel   = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation           = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar            = invSchemePara->GetNumberOfLaminar();
+    int nLength             = invSchemePara->GetLength();
+    int nm                  = invSchemePara->Getnm();
+    int RoeEntropyFixMethod = invSchemePara->GetEntropyFixMethod();
+    int nChemical           = invSchemePara->GetNumberOfChemical();
+    int nPrecondition       = invSchemePara->GetIfPrecondition();
+    int nIdealState         = invSchemePara->GetIfIdealState();
+
+    RDouble refMachNumber       = invSchemePara->GetMachNumber();
+    RDouble entrFixCoefLeft     = invSchemePara->GetLeftEntropyFixCoefficient();
+    RDouble entrFixCoefRight    = invSchemePara->GetRightEntropyFixCoefficient();
+    RDouble** qL                = invSchemePara->GetLeftQ();
+    RDouble** qR                = invSchemePara->GetRightQ();
+    RDouble* gamaL              = invSchemePara->GetLeftGama();
+    RDouble* gamaR              = invSchemePara->GetRightGama();
+    RDouble* pressureCoeffL     = face_proxy->GetPressureCoefficientL();
+    RDouble* pressureCoeffR     = face_proxy->GetPressureCoefficientR();
+    RDouble* xfn                = invSchemePara->GetFaceNormalX();
+    RDouble* yfn                = invSchemePara->GetFaceNormalY();
+    RDouble* zfn                = invSchemePara->GetFaceNormalZ();
+    RDouble* vgn                = invSchemePara->GetFaceVelocity();
+    RDouble** flux              = invSchemePara->GetFlux();
+    RDouble** tl                = invSchemePara->GetLeftTemperature();
+    RDouble** tr                = invSchemePara->GetRightTemperature();
+    int* leftcellindexofFace    = face_proxy->GetLeftCellIndexOfFace();
+    int* rightcellindexofFace   = face_proxy->GetRightCellIndexOfFace();
+    GeomProxy* geomProxy        = face_proxy->GetGeomProxy();
+    RDouble* areas              = geomProxy->GetFaceArea();
+    RDouble** dRdq             = face_proxy->GetJacobianMatrix();
+    RDouble mach2               = refMachNumber * refMachNumber;
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble* prim       = new RDouble[nEquation]();
+    RDouble* qConserveL = new RDouble[nEquation]();
+    RDouble* qConserveR = new RDouble[nEquation]();
+    RDouble* qCvL       = new RDouble[nEquation]();
+    RDouble* qCvR       = new RDouble[nEquation]();
+    RDouble* qCvLpert   = new RDouble[nEquation]();
+    RDouble* qCvRpert   = new RDouble[nEquation]();
+    RDouble* dFluxdCv   = new RDouble[nEquation]();
+    RDouble  dCvpert;
+
+    RDouble* primL = new RDouble[nEquation]();
+    RDouble* primR = new RDouble[nEquation]();
+    RDouble* fluxp = new RDouble[nEquation](); // flux proxy
+    RDouble temperaturesL[3] = { 0 }, temperaturesR[3] = { 0 };
+    RDouble perturbScale = 0.001;
+
+    for (int iFace = 0; iFace < nLength; ++iFace)
+    {
+        int le          = leftcellindexofFace[iFace];
+        int re          = rightcellindexofFace[iFace];
+        RDouble area    = areas[iFace];
+        for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+        }
+
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        gas->Primitive2Conservative(primL, gmL, temperaturesL[ITV], temperaturesL[ITE], qCvL);
+        gas->Primitive2Conservative(primR, gmR, temperaturesR[ITV], temperaturesR[ITE], qCvR);
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvR,iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        flux[IR][iFace] = fluxp[IR];
+        flux[IU][iFace] = fluxp[IU];
+        flux[IV][iFace] = fluxp[IV];
+        flux[IW][iFace] = fluxp[IW];
+        flux[IP][iFace] = fluxp[IP];
+       
+
+        // perturb the density of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IR] *= (1.0+perturbScale);
+        dCvpert     = qCvLpert[IR] - qCvL[IR];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+                                  face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace])/dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace])/dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace])/dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace])/dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace])/dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IR] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IR] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IR] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IR] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][le * nEquation + IR] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][le * nEquation + IR] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IR] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IR] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IR] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][le * nEquation + IR] -= dFluxdCv[IP] * area;
+        
+
+        // perturb the momentum rhou of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IU] += perturbScale;
+        dCvpert = qCvLpert[IU] - qCvL[IU];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+                                  face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IU] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IU] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IU] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IU] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][le * nEquation + IU] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][le * nEquation + IU] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IU] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IU] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IU] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][le * nEquation + IU] -= dFluxdCv[IP] * area;
+
+
+        // perturb the momentum rhov of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IV] += perturbScale;
+        dCvpert = qCvLpert[IV] - qCvL[IV];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IV] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IV] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IV] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IV] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][le * nEquation + IV] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][le * nEquation + IV] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IV] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IV] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IV] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][le * nEquation + IV] -= dFluxdCv[IP] * area;
+
+        // perturb the momentum rhow of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IW] += perturbScale;
+        dCvpert = qCvLpert[IW] - qCvL[IW];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IW] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IW] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IW] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IW] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][le * nEquation + IW] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][le * nEquation + IW] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IW] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IW] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IW] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][le * nEquation + IW] -= dFluxdCv[IP] * area;
+
+
+        // perturb the rhoE of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IP] *= (1.0+perturbScale);
+        dCvpert = qCvLpert[IP] - qCvL[IP];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IP] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IP] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IP] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IP] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][le * nEquation + IP] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][le * nEquation + IP] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IP] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IP] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IP] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][le * nEquation + IP] -= dFluxdCv[IP] * area;
+
+
+        // perturb the density of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IR] *= (1.0+perturbScale);
+        dCvpert = qCvRpert[IR] - qCvR[IR];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IR] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IR] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IR] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IR] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][re * nEquation + IR] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][re * nEquation + IR] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IR] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IR] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IR] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][re * nEquation + IR] -= dFluxdCv[IP] * area;
+
+
+        // perturb the momentum rhou of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IU] += perturbScale;
+        dCvpert = qCvRpert[IU] - qCvR[IU];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+                                  face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IU] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IU] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IU] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IU] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][re * nEquation + IU] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][re * nEquation + IU] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IU] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IU] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IU] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][re * nEquation + IU] -= dFluxdCv[IP] * area;
+
+
+        // perturb the momentum rhov of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IV] += perturbScale;
+        dCvpert = qCvRpert[IV] - qCvR[IV];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+                                  face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IV] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IV] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IV] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IV] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][re * nEquation + IV] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][re * nEquation + IV] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IV] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IV] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IV] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][re * nEquation + IV] -= dFluxdCv[IP] * area;
+
+        // perturb the momentum rhow of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IW] += perturbScale;
+        dCvpert = qCvRpert[IW] - qCvR[IW];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IW] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IW] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IW] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IW] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][re * nEquation + IW] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][re * nEquation + IW] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IW] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IW] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IW] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][re * nEquation + IW] -= dFluxdCv[IP] * area;
+
+
+        // perturb the momentum rhoE of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IP] *= (1.0+perturbScale);
+        dCvpert = qCvRpert[IP] - qCvR[IP];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IP] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IP] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IP] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IP] += dFluxdCv[IW] * area;
+        dRdq[le * nEquation + IP][re * nEquation + IP] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][re * nEquation + IP] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IP] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IP] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IP] -= dFluxdCv[IW] * area;
+        dRdq[re * nEquation + IP][re * nEquation + IP] -= dFluxdCv[IP] * area;
+
+    }
+
+    delete[]prim;           prim = NULL;
+    delete[]primL;          primL = NULL;
+    delete[]primR;          primR = NULL;
+    delete[]qConserveL;     qConserveL = NULL;
+    delete[]qConserveR;     qConserveR = NULL;
+    delete[]qCvL;           qCvL = NULL;
+    delete[]dFluxdCv;       dFluxdCv = NULL;
+    delete[]qCvLpert;       qCvLpert = NULL;
+    delete[]qCvRpert;       qCvRpert = NULL;
+    delete[]qCvR;           qCvR = NULL;
+    delete[]fluxp;          fluxp = NULL;
+}
+
+// GMRES for rhow
+void GMRES_Roe_Scheme_ConservativeForm_rhow(FaceProxy* face_proxy, InviscidSchemeParameter* invSchemePara)
+{
+    const RDouble LITTLE    = 1.0E-10;
+    int nTemperatureModel   = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation           = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar            = invSchemePara->GetNumberOfLaminar();
+    int nLength             = invSchemePara->GetLength();
+    int nm                  = invSchemePara->Getnm();
+    int RoeEntropyFixMethod = invSchemePara->GetEntropyFixMethod();
+    int nChemical           = invSchemePara->GetNumberOfChemical();
+    int nPrecondition       = invSchemePara->GetIfPrecondition();
+    int nIdealState         = invSchemePara->GetIfIdealState();
+
+    RDouble refMachNumber       = invSchemePara->GetMachNumber();
+    RDouble entrFixCoefLeft     = invSchemePara->GetLeftEntropyFixCoefficient();
+    RDouble entrFixCoefRight    = invSchemePara->GetRightEntropyFixCoefficient();
+    RDouble** qL                = invSchemePara->GetLeftQ();
+    RDouble** qR                = invSchemePara->GetRightQ();
+    RDouble* gamaL              = invSchemePara->GetLeftGama();
+    RDouble* gamaR              = invSchemePara->GetRightGama();
+    RDouble* pressureCoeffL     = face_proxy->GetPressureCoefficientL();
+    RDouble* pressureCoeffR     = face_proxy->GetPressureCoefficientR();
+    RDouble* xfn                = invSchemePara->GetFaceNormalX();
+    RDouble* yfn                = invSchemePara->GetFaceNormalY();
+    RDouble* zfn                = invSchemePara->GetFaceNormalZ();
+    RDouble* vgn                = invSchemePara->GetFaceVelocity();
+    RDouble** flux              = invSchemePara->GetFlux();
+    RDouble** tl                = invSchemePara->GetLeftTemperature();
+    RDouble** tr                = invSchemePara->GetRightTemperature();
+    int* leftcellindexofFace    = face_proxy->GetLeftCellIndexOfFace();
+    int* rightcellindexofFace   = face_proxy->GetRightCellIndexOfFace();
+    GeomProxy* geomProxy        = face_proxy->GetGeomProxy();
+    RDouble* areas              = geomProxy->GetFaceArea();
+    RDouble** dRdq             = face_proxy->GetJacobianMatrix();
+    RDouble mach2               = refMachNumber * refMachNumber;
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble* prim       = new RDouble[nEquation]();
+    RDouble* qConserveL = new RDouble[nEquation]();
+    RDouble* qConserveR = new RDouble[nEquation]();
+    RDouble* qCvL       = new RDouble[nEquation]();
+    RDouble* qCvR       = new RDouble[nEquation]();
+    RDouble* qCvLpert   = new RDouble[nEquation]();
+    RDouble* qCvRpert   = new RDouble[nEquation]();
+    RDouble* dFluxdCv   = new RDouble[nEquation]();
+    RDouble  dCvpert;
+
+    RDouble* primL = new RDouble[nEquation]();
+    RDouble* primR = new RDouble[nEquation]();
+    RDouble* fluxp = new RDouble[nEquation](); // flux proxy
+    RDouble temperaturesL[3] = { 0 }, temperaturesR[3] = { 0 };
+    RDouble perturbScale = 0.001;
+
+    for (int iFace = 0; iFace < nLength; ++iFace)
+    {
+        int le          = leftcellindexofFace[iFace];
+        int re          = rightcellindexofFace[iFace];
+        RDouble area    = areas[iFace];
+        for (int iEqn = 0; iEqn < nEquation; ++iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+        }
+
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        gas->Primitive2Conservative(primL, gmL, temperaturesL[ITV], temperaturesL[ITE], qCvL);
+        gas->Primitive2Conservative(primR, gmR, temperaturesR[ITV], temperaturesR[ITE], qCvR);
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvR,iFace, fluxp,
+                                  face_proxy,invSchemePara);
+
+        flux[IR][iFace] = fluxp[IR];
+        flux[IU][iFace] = fluxp[IU];
+        flux[IV][iFace] = fluxp[IV];
+        flux[IW][iFace] = fluxp[IW];
+        flux[IP][iFace] = fluxp[IP];
+       
+
+        // perturb the density of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IR] *= (1.0+perturbScale);
+        dCvpert     = qCvLpert[IR] - qCvL[IR];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+                                  face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace])/dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace])/dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace])/dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace])/dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace])/dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IR] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IR] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IR] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IR] = 0;
+        dRdq[le * nEquation + IP][le * nEquation + IR] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][le * nEquation + IR] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IR] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IR] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IR] = 0;
+        dRdq[re * nEquation + IP][le * nEquation + IR] -= dFluxdCv[IP] * area;
+        
+
+        // perturb the momentum rhou of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IU] += perturbScale;
+        dCvpert = qCvLpert[IU] - qCvL[IU];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+                                  face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IU] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IU] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IU] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IU] = 0;
+        dRdq[le * nEquation + IP][le * nEquation + IU] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][le * nEquation + IU] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IU] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IU] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IU] = 0;
+        dRdq[re * nEquation + IP][le * nEquation + IU] -= dFluxdCv[IP] * area;
+
+
+        // perturb the momentum rhov of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IV] += perturbScale;
+        dCvpert = qCvLpert[IV] - qCvL[IV];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IV] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IV] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IV] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IV] = 0;
+        dRdq[le * nEquation + IP][le * nEquation + IV] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][le * nEquation + IV] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IV] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IV] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IV] = 0;
+        dRdq[re * nEquation + IP][le * nEquation + IV] -= dFluxdCv[IP] * area;
+
+        // perturb the momentum rhow of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IW] += perturbScale;
+        dCvpert = qCvLpert[IW] - qCvL[IW];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IW] = 0;
+        dRdq[le * nEquation + IU][le * nEquation + IW] = 0;
+        dRdq[le * nEquation + IV][le * nEquation + IW] = 0;
+        dRdq[le * nEquation + IW][le * nEquation + IW] += 1;
+        dRdq[le * nEquation + IP][le * nEquation + IW] = 0;
+
+        dRdq[re * nEquation + IR][le * nEquation + IW] = 0;
+        dRdq[re * nEquation + IU][le * nEquation + IW] = 0;
+        dRdq[re * nEquation + IV][le * nEquation + IW] = 0;
+        dRdq[re * nEquation + IW][le * nEquation + IW] -= 1;
+        dRdq[re * nEquation + IP][le * nEquation + IW] = 0;
+
+
+        // perturb the rhoE of the left cell of the face
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IP] *= (1.0+perturbScale);
+        dCvpert = qCvLpert[IP] - qCvL[IP];
+
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvR, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvLpert, qCvR, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][le * nEquation + IP] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][le * nEquation + IP] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][le * nEquation + IP] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][le * nEquation + IP] = 0;
+        dRdq[le * nEquation + IP][le * nEquation + IP] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][le * nEquation + IP] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][le * nEquation + IP] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][le * nEquation + IP] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][le * nEquation + IP] = 0;
+        dRdq[re * nEquation + IP][le * nEquation + IP] -= dFluxdCv[IP] * area;
+
+
+        // perturb the density of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IR] *= (1.0+perturbScale);
+        dCvpert = qCvRpert[IR] - qCvR[IR];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IR] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IR] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IR] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IR] = 0;
+        dRdq[le * nEquation + IP][re * nEquation + IR] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][re * nEquation + IR] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IR] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IR] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IR] = 0;
+        dRdq[re * nEquation + IP][re * nEquation + IR] -= dFluxdCv[IP] * area;
+
+
+        // perturb the momentum rhou of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IU] += perturbScale;
+        dCvpert = qCvRpert[IU] - qCvR[IU];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+                                  face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IU] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IU] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IU] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IU] = 0;
+        dRdq[le * nEquation + IP][re * nEquation + IU] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][re * nEquation + IU] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IU] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IU] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IU] = 0;
+        dRdq[re * nEquation + IP][re * nEquation + IU] -= dFluxdCv[IP] * area;
+
+
+        // perturb the momentum rhov of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IV] += perturbScale;
+        dCvpert = qCvRpert[IV] - qCvR[IV];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+                                  face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IV] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IV] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IV] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IV] = 0;
+        dRdq[le * nEquation + IP][re * nEquation + IV] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][re * nEquation + IV] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IV] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IV] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IV] = 0;
+        dRdq[re * nEquation + IP][re * nEquation + IV] -= dFluxdCv[IP] * area;
+
+        // perturb the momentum rhow of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IW] += perturbScale;
+        dCvpert = qCvRpert[IW] - qCvR[IW];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IW] = 0;
+        dRdq[le * nEquation + IU][re * nEquation + IW] = 0;
+        dRdq[le * nEquation + IV][re * nEquation + IW] = 0;
+        dRdq[le * nEquation + IW][re * nEquation + IW] += 1;
+        dRdq[le * nEquation + IP][re * nEquation + IW] = 0;
+
+        dRdq[re * nEquation + IR][re * nEquation + IW] = 0;
+        dRdq[re * nEquation + IU][re * nEquation + IW] = 0;
+        dRdq[re * nEquation + IV][re * nEquation + IW] = 0;
+        dRdq[re * nEquation + IW][re * nEquation + IW] -= 1;
+        dRdq[re * nEquation + IP][re * nEquation + IW] = 0;
+
+
+        // perturb the momentum rhoE of the right cell of the face
+        qCvRpert[IR] = qCvR[IR];
+        qCvRpert[IU] = qCvR[IU];
+        qCvRpert[IV] = qCvR[IV];
+        qCvRpert[IW] = qCvR[IW];
+        qCvRpert[IP] = qCvR[IP];
+        qCvRpert[IP] *= (1.0+perturbScale);
+        dCvpert = qCvRpert[IP] - qCvR[IP];
+
+        gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+        gas->Conservative2Primitive(qCvRpert, gmR, primR, temperaturesR);
+
+        Cal_GMRES_Roe_Scheme_Flux(primL, primR, qCvL, qCvRpert, iFace, fluxp,
+            face_proxy, invSchemePara);
+
+        dFluxdCv[IR] = (fluxp[IR] - flux[IR][iFace]) / dCvpert;
+        dFluxdCv[IU] = (fluxp[IU] - flux[IU][iFace]) / dCvpert;
+        dFluxdCv[IV] = (fluxp[IV] - flux[IV][iFace]) / dCvpert;
+        dFluxdCv[IW] = (fluxp[IW] - flux[IW][iFace]) / dCvpert;
+        dFluxdCv[IP] = (fluxp[IP] - flux[IP][iFace]) / dCvpert;
+
+        dRdq[le * nEquation + IR][re * nEquation + IP] += dFluxdCv[IR] * area;
+        dRdq[le * nEquation + IU][re * nEquation + IP] += dFluxdCv[IU] * area;
+        dRdq[le * nEquation + IV][re * nEquation + IP] += dFluxdCv[IV] * area;
+        dRdq[le * nEquation + IW][re * nEquation + IP] = 0;
+        dRdq[le * nEquation + IP][re * nEquation + IP] += dFluxdCv[IP] * area;
+
+        dRdq[re * nEquation + IR][re * nEquation + IP] -= dFluxdCv[IR] * area;
+        dRdq[re * nEquation + IU][re * nEquation + IP] -= dFluxdCv[IU] * area;
+        dRdq[re * nEquation + IV][re * nEquation + IP] -= dFluxdCv[IV] * area;
+        dRdq[re * nEquation + IW][re * nEquation + IP] = 0;
+        dRdq[re * nEquation + IP][re * nEquation + IP] -= dFluxdCv[IP] * area;
+
+    }
+
+    delete[]prim;           prim = NULL;
+    delete[]primL;          primL = NULL;
+    delete[]primR;          primR = NULL;
+    delete[]qConserveL;     qConserveL = NULL;
+    delete[]qConserveR;     qConserveR = NULL;
+    delete[]qCvL;           qCvL = NULL;
+    delete[]dFluxdCv;       dFluxdCv = NULL;
+    delete[]qCvLpert;       qCvLpert = NULL;
+    delete[]qCvRpert;       qCvRpert = NULL;
+    delete[]qCvR;           qCvR = NULL;
+    delete[]fluxp;          fluxp = NULL;
+}
+
+// GMRESnolim
+void cal_ReConstructFaceValue(RDouble* primcc, RDouble* dqdx, RDouble* dqdy, RDouble* dqdz,
+                              RDouble dx, RDouble dy, RDouble dz, RDouble * primf,
+                              InviscidSchemeParameter* invSchemePara)
+{
+    int nEquation = invSchemePara->GetNumberOfTotalEquation();
+    
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        primf[m] = primcc[m];
+        primf[m] += dqdx[m] * dx + dqdy[m] * dy + dqdz[m] * dz;
+    }
+
+    if(primf[IDX::IR] <= 0 && primf[IDX::IP] <= 0)
+    {
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            primf[m] = primcc[m];
+        }
+    }
+}
+
+// GMRESPV GMRESAD GMRES3D
+template <typename T>
+void Cal_GMRES_Steger_Scheme_Flux_PV(T* primL, T* primR, int iLen, T* flux,
+                               FaceProxy* face_proxy, InviscidSchemeParameter* invSchemePara)
+{
+    int nTemperatureModel = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar = invSchemePara->GetNumberOfLaminar();
+    int nm = invSchemePara->Getnm();
+    int EntropyFixMethod = invSchemePara->GetEntropyFixMethod();
+    int nChemical = invSchemePara->GetNumberOfChemical();
+    int nIdealState = invSchemePara->GetIfIdealState();
+
+    int nElectronIndex = invSchemePara->GetIndexOfElectron();
+
+    RDouble entrFixCoefLeft  = invSchemePara->GetLeftEntropyFixCoefficient();
+    RDouble entrFixCoefRight = invSchemePara->GetRightEntropyFixCoefficient();
+    RDouble *gamal = invSchemePara->GetLeftGama();
+    RDouble *gamar = invSchemePara->GetRightGama();
+    RDouble *xfn   = invSchemePara->GetFaceNormalX();
+    RDouble *yfn   = invSchemePara->GetFaceNormalY();
+    RDouble *zfn   = invSchemePara->GetFaceNormalZ();
+    RDouble *vgn   = invSchemePara->GetFaceVelocity();
+    RDouble **tl = invSchemePara->GetLeftTemperature();
+    RDouble **tr = invSchemePara->GetRightTemperature();
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    T *fl    = new T [nEquation];
+    T *fr    = new T [nEquation];
+    T temperaturesL[3], temperaturesR[3];
+
+    T rl = primL[IR];
+    T ul = primL[IU];
+    T vl = primL[IV];
+    T wl = primL[IW];
+    T pl = primL[IP];
+
+    T rr = primR[IR];
+    T ur = primR[IU];
+    T vr = primR[IV];
+    T wr = primR[IW];
+    T pr = primR[IP];
+
+    RDouble xsn = xfn[iLen];
+    RDouble ysn = yfn[iLen];
+    RDouble zsn = zfn[iLen];
+    RDouble vb  = vgn[iLen];
+    RDouble gmL = gamal[iLen];
+    RDouble gmR = gamar[iLen];
+
+    T v2l = ul * ul + vl * vl + wl * wl;
+    T v2r = ur * ur + vr * vr + wr * wr;
+    T hintLeft  = (gmL / (gmL - one)) * (pl / rl);
+    T hintRight = (gmR / (gmR - one)) * (pr / rr);
+    T pel = 0.0, per = 0.0;
+
+    if (nChemical != 0 && nIdealState == 0)
+    {
+        /*
+        for (int i = 0; i < 3; ++ i)
+        {
+            temperaturesL[i] = tl[i][iLen];
+            temperaturesR[i] = tr[i][iLen];
+        }
+        gas->ComputeEnthalpyByPrimitive(priml, gmL, hintLeft, temperaturesL);
+        gas->ComputeEnthalpyByPrimitive(primr, gmR, hintRight, temperaturesR);
+        if (nTemperatureModel > 1)
+        {
+            pel = gas->GetElectronPressure(priml, temperaturesL[ITE]);
+            per = gas->GetElectronPressure(primr, temperaturesR[ITE]);
+        }*/
+    }
+
+    T hl = hintLeft  + half * v2l;
+    T hr = hintRight + half * v2r;
+    T el = hl - pl / (rl + SMALL);
+    T er = hr - pr / (rr + SMALL);
+    T vnl = xsn * ul + ysn * vl + zsn * wl - vb;
+    T vnr = xsn * ur + ysn * vr + zsn * wr - vb;
+    T c2l = gmL * pl / rl;
+    T cl  = sqrt(ABS(c2l));
+    T c2r = gmR * pr / rr;
+    T cr  = sqrt(ABS(c2r));
+    //! The eigenvalues of left and right.
+    T eigvl1 = vnl;
+    T eigvl2 = vnl + cl;
+    T eigvl3 = vnl - cl;
+    T eigvr1 = vnr;
+    T eigvr2 = vnr + cr;
+    T eigvr3 = vnr - cr;
+    T absEigvl1 = ABS(eigvl1);
+    T absEigvl2 = ABS(eigvl2);
+    T absEigvl3 = ABS(eigvl3);
+    T absEigvr1 = ABS(eigvr1);
+    T absEigvr2 = ABS(eigvr2);
+    T absEigvr3 = ABS(eigvr3);
+    //! Entropy fix.
+    //! Modified by clz : 2012-8-15.
+    if (EntropyFixMethod == 1)
+    {
+        T maxEigv = MAX(absEigvl2, absEigvl3);
+        T tmp0    = maxEigv * entrFixCoefLeft ;
+        T tmp1    = maxEigv * entrFixCoefRight;
+        absEigvl1       = MAX(tmp0, absEigvl1);
+        absEigvl2       = MAX(tmp1, absEigvl2);
+        absEigvl3       = MAX(tmp1, absEigvl3);
+        maxEigv = MAX(absEigvr2, absEigvr3);
+        tmp0     = maxEigv * entrFixCoefLeft ;
+        tmp1     = maxEigv * entrFixCoefRight;
+        absEigvr1   = MAX(tmp0, absEigvr1);
+        absEigvr2   = MAX(tmp1, absEigvr2);
+        absEigvr3   = MAX(tmp1, absEigvr3);
+    }
+    else if (EntropyFixMethod == 2)
+    {
+        //RDouble tmp0 = MAX(entrFixCoefLeft , static_cast <RDouble> (0.02));
+        //RDouble tmp1 = MAX(entrFixCoefRight, static_cast <RDouble> (0.02));
+        //absEigvl1 = MAX(tmp0, absEigvl1);
+        //absEigvl2 = MAX(tmp1, absEigvl2);
+        //absEigvl3 = MAX(tmp1, absEigvl3);
+               
+        //absEigvr1 = MAX(tmp0, absEigvr1);
+        //absEigvr2 = MAX(tmp1, absEigvr2);
+        //absEigvr3 = MAX(tmp1, absEigvr3);
+        absEigvl1 = sqrt(absEigvl1*absEigvl1 + 1.E-4);
+        absEigvl2 = sqrt(absEigvl2*absEigvl2 + 1.E-4);
+        absEigvl3 = sqrt(absEigvl3*absEigvl3 + 1.E-4);
+        absEigvr1 = sqrt(absEigvr1*absEigvr1 + 1.E-4);
+        absEigvr2 = sqrt(absEigvr2*absEigvr2 + 1.E-4);
+        absEigvr3 = sqrt(absEigvr3*absEigvr3 + 1.E-4);
+    }
+    eigvl1 = half * (eigvl1 + absEigvl1);
+    eigvl2 = half * (eigvl2 + absEigvl2);
+    eigvl3 = half * (eigvl3 + absEigvl3);
+    eigvr1 = half * (eigvr1 - absEigvr1);
+    eigvr2 = half * (eigvr2 - absEigvr2);
+    eigvr3 = half * (eigvr3 - absEigvr3);
+    T c2gaml  = c2l / gmL;
+    T c2gamr  = c2r / gmR;
+    T xil1 = c2gaml * (eigvl1 + eigvl1 - eigvl2 - eigvl3) / (c2l + c2l);
+    T xil2 = c2gaml * (eigvl2 - eigvl3) / (cl + cl);
+    T xir1 = c2gamr * (eigvr1 + eigvr1 - eigvr2 - eigvr3) / (c2r + c2r);
+    T xir2 = c2gamr * (eigvr2 - eigvr3) / (cr + cr);
+    T eig_xi = eigvl1 - xil1;
+    fl[IR ] = rl * (eig_xi                );
+    fl[IRU] = rl * (eig_xi * ul + xil2 * xsn);
+    fl[IRV] = rl * (eig_xi * vl + xil2 * ysn);
+    fl[IRW] = rl * (eig_xi * wl + xil2 * zsn);
+    fl[IRE] = rl * (eigvl1 * el - xil1 * hl + xil2 * (vnl + vb));
+    T fel = - xil1 * pel;
+    eig_xi = eigvr1 - xir1;
+    fr[IR ] = rr * (eig_xi                );
+    fr[IRU] = rr * (eig_xi * ur + xir2 * xsn);
+    fr[IRV] = rr * (eig_xi * vr + xir2 * ysn);
+    fr[IRW] = rr * (eig_xi * wr + xir2 * zsn);
+    fr[IRE] = rr * (eigvr1 * er - xir1 * hr + xir2 * (vnr + vb));
+    T fer = - xir1 * per;
+    for (int iLaminar = nm; iLaminar < nEquation; ++ iLaminar)
+    {
+        fl[iLaminar] = primL[iLaminar] * fl[IR];
+        fr[iLaminar] = primR[iLaminar] * fr[IR];
+    }
+    if (nChemical == 1)
+    {
+        fl[nLaminar + nTemperatureModel - 1] += fel;
+        fr[nLaminar + nTemperatureModel - 1] += fer;
+    }
+    //! Compute vibration-electron energy term.
+    for (int iLaminar = 0; iLaminar < nEquation; ++ iLaminar)
+    {
+        flux[iLaminar] = fl[iLaminar] + fr[iLaminar];
+    }
+    //! Modify the fluxes of the species whose transport equations need not to be computed.
+    if (nChemical == 1)
+    {
+    
+    }
+
+    delete []fl;
+    delete []fr;
+}
+
+// GMRESPV GMRESAD
+template <typename T>
+void Cal_GMRES_Roe_Scheme_Flux_PV(T* primL, T* primR, int iFace, T* flux,
+                               FaceProxy* face_proxy, InviscidSchemeParameter* invSchemePara)
+{
+    using namespace IDX;                                
+    using namespace GAS_SPACE;                          
+    const RDouble LITTLE        = 1.0E-10;
+    int nTemperatureModel       = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation               = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar                = invSchemePara->GetNumberOfLaminar();
+    int nm                      = invSchemePara->Getnm();
+    RDouble* gamaL              = invSchemePara->GetLeftGama();
+    RDouble* gamaR              = invSchemePara->GetRightGama();
+    RDouble* pressureCoeffL     = face_proxy->GetPressureCoefficientL();
+    RDouble* pressureCoeffR     = face_proxy->GetPressureCoefficientR();
+    T entrFixCoefLeft     = invSchemePara->GetLeftEntropyFixCoefficient();
+    T entrFixCoefRight    = invSchemePara->GetRightEntropyFixCoefficient();
+    RDouble* xfn                = invSchemePara->GetFaceNormalX();
+    RDouble* yfn                = invSchemePara->GetFaceNormalY();
+    RDouble* zfn                = invSchemePara->GetFaceNormalZ();
+    RDouble* vgn                = invSchemePara->GetFaceVelocity();
+    RDouble refMachNumber       = invSchemePara->GetMachNumber();
+    RDouble **tl                = invSchemePara->GetLeftTemperature();
+    RDouble **tr                = invSchemePara->GetRightTemperature();
+    int RoeEntropyFixMethod     = invSchemePara->GetEntropyFixMethod();
+    int nChemical               = invSchemePara->GetNumberOfChemical();
+    int nPrecondition           = invSchemePara->GetIfPrecondition();
+    int nIdealState             = invSchemePara->GetIfIdealState();
+    RDouble mach2               = refMachNumber * refMachNumber;
+    T *prim                     = new T[nEquation]();
+    RDouble *qConserveL         = new RDouble[nEquation]();
+    RDouble *qConserveR         = new RDouble[nEquation]();
+    T* dq                       = new T[nEquation]();
+    RDouble temperaturesL[3] = {0}, temperaturesR[3] = {0};
+    RDouble xsn             = xfn[iFace];
+    RDouble ysn             = yfn[iFace];
+    RDouble zsn             = zfn[iFace];
+    RDouble vb              = vgn[iFace];
+    RDouble gmL             = gamaL[iFace];
+    RDouble gmR             = gamaR[iFace];
+    T half = 0.5;
+    T two = 2.0;
+    T one = 1.0;
+    T three = 3.0;
+
+    T& rL     = primL[IR];
+    T& uL     = primL[IU];
+    T& vL     = primL[IV];
+    T& wL     = primL[IW];
+    T& pL     = primL[IP];
+
+    T& rR     = primR[IR];
+    T& uR     = primR[IU];
+    T& vR     = primR[IV];
+    T& wR     = primR[IW];
+    T& pR     = primR[IP];
+
+    rL = MAX(rL, LITTLE);
+    rR = MAX(rR, LITTLE);
+    pL = MAX(pL, LITTLE);
+    pR = MAX(pR, LITTLE);
+
+    T vSquareL = uL * uL + vL * vL + wL * wL;
+    T vSquareR = uR * uR + vR * vR + wR * wR;
+
+    T hint_L  = (gmL / (gmL - one)) * (pL / rL);
+    T hint_R  = (gmR / (gmR - one)) * (pR / rR);
+    T peL     = 0.0, peR = 0.0;
+
+    if (nChemical != 0 && nIdealState == 0)
+    {
+       // for (int i = 0; i < 3; ++i)
+       // {
+       //     temperaturesL[i] = tl[i][iFace];
+       //     temperaturesR[i] = tr[i][iFace];
+       // }
+       // gas->ComputeEnthalpyByPrimitive(primL, gmL, hint_L, temperaturesL);
+       // gas->ComputeEnthalpyByPrimitive(primR, gmR, hint_R, temperaturesR);
+    
+       // if (nTemperatureModel > 1)
+       // {
+       //     peL = gas->GetElectronPressure(primL, temperaturesL[ITE]);
+       //     peR = gas->GetElectronPressure(primR, temperaturesR[ITE]);
+       // }
+    }
+    T hL = hint_L + half * vSquareL;
+    T hR = hint_R + half * vSquareR;
+     
+    T vnL = xsn * uL + ysn * vL + zsn * wL - vb;
+    T vnR = xsn * uR + ysn * vR + zsn * wR - vb;
+    T rvnL = rL * vnL;
+    T rvnR = rR * vnR;
+
+    //! The first part of Roe scheme: F(QL, QR) = 0.5 * [ F(QL) + F(QR) ].
+    flux[IR]  = half * (rvnL + rvnR);
+    flux[IRU] = half * (rvnL * uL + xfn[iFace] * pL + rvnR * uR + xfn[iFace] * pR);
+    flux[IRV] = half * (rvnL * vL + yfn[iFace] * pL + rvnR * vR + yfn[iFace] * pR);
+    flux[IRW] = half * (rvnL * wL + zfn[iFace] * pL + rvnR * wR + zfn[iFace] * pR);
+    flux[IRE] = half * (rvnL * hL + vgn[iFace] * pL + rvnR * hR + vgn[iFace] * pR);
+
+
+    //! The following loop is useless.
+    for (int iLaminar = nm; iLaminar < nLaminar; ++iLaminar)
+    {
+        flux[iLaminar] = half * (primL[iLaminar] * rvnL + primR[iLaminar] * rvnR);
+    }
+    
+    for (int it = 1; it < nTemperatureModel; ++it)
+    {
+        flux[nLaminar + it] = half * (primL[nLaminar + it] * rvnL + primR[nLaminar + it] * rvnR);
+    }
+    if (nChemical == 1)
+    {
+        flux[nLaminar + nTemperatureModel - 1] += half * (peL * (vnL + vgn[iFace]) + peR * (vnR + vgn[iFace]));
+    }
+
+    T ratio = sqrt(rR / rL);
+    T roeAverageCoef = one / (one + ratio);
+
+    T rRoeAverage = sqrt(rL * rR);
+    T uRoeAverage = (uL + uR * ratio) * roeAverageCoef;
+    T vRoeAverage = (vL + vR * ratio) * roeAverageCoef;
+    T wRoeAverage = (wL + wR * ratio) * roeAverageCoef;
+    T pRoeAverage = (pL + pR * ratio) * roeAverageCoef;
+
+    T gama = (gmL + gmR * ratio) * roeAverageCoef;
+    T gamm1 = gama - one;
+
+    T vSquareRoeAverage = uRoeAverage * uRoeAverage + vRoeAverage * vRoeAverage + wRoeAverage * wRoeAverage;
+    T absVel = sqrt(vSquareRoeAverage);
+    T hRoeAverage = gama / gamm1 * pRoeAverage / rRoeAverage + half * vSquareRoeAverage;
+
+    T vn = xsn * uRoeAverage + ysn * vRoeAverage + zsn * wRoeAverage - vb;
+    T theta = vn + vb;
+
+    //! c2: square of sound speed.             
+    T c2 = gamm1 * (hRoeAverage - half * vSquareRoeAverage);
+
+    //! Sound speed: gama * pRoeAverage / rRoeAverage.
+    T cm = sqrt(abs(c2)); //HINT: from ABS to abs
+
+    T Ur2 = 0, cnew2 = 0, cnew = 0, vnew = 0, beta = 0, alpha = 0;
+    T eigv1 = 0, eigv2 = 0, eigv3 = 0;
+    eigv1 = abs(vn); //HINT: from ABS to abs
+    if (nPrecondition == 0)
+    {
+        eigv2 = abs(vn + cm); //HINT: from ABS to abs
+        eigv3 = abs(vn - cm); //HINT: from ABS to abs
+    }
+    else
+    {
+        beta = min(max(vSquareRoeAverage / c2, three * mach2), one);//HINT: MAX MIN
+        vnew = half * vn * (one + beta);
+        cnew = half * sqrt(((beta - one) * vn) * ((beta - one) * vn) + four * beta * c2);
+        cnew2 = cnew * cnew;
+        eigv2 = abs(vnew + cnew); //HINT: from ABS to abs
+        eigv3 = abs(vnew - cnew); //HINT: from ABS to abs
+    }
+
+    T EL = (one / (gmL - one)) * (pL / rL) + half * vSquareL;
+    T ER = (one / (gmR - one)) * (pR / rR) + half * vSquareR;
+
+    //! The jump between left and right conservative variables.
+    dq[IR]  = rR - rL;
+    dq[IRU] = rR * uR - rL * uL;
+    dq[IRV] = rR * vR - rL * vL;
+    dq[IRW] = rR * wR - rL * wL;
+    dq[IRE] = rR * ER - rL * EL; 
+
+
+    if (nChemical != 0)
+    {
+        // if (nTemperatureModel > 1)
+        // {
+        //     gas->GetTemperature(primL, temperaturesL[ITT], temperaturesL[ITV], temperaturesL[ITE]);
+        //     gas->GetTemperature(primR, temperaturesR[ITT], temperaturesR[ITV], temperaturesR[ITE]);
+        // }
+        // gas->Primitive2Conservative(primL, gmL, temperaturesL[ITV], temperaturesL[ITE], qConserveL);
+        // gas->Primitive2Conservative(primR, gmR, temperaturesR[ITV], temperaturesR[ITE], qConserveR);
+    }
+    
+    for (int iLaminar = nm; iLaminar < nEquation; ++iLaminar)
+    {
+        dq[iLaminar] = qConserveR[iLaminar] - qConserveL[iLaminar];
+    }
+
+    //! Entropy correction, to limit the magnitude of the three eigenvalue.
+    //! Warning: This function calling may affect the efficient!
+    T pressureCoeffadL = pressureCoeffL[iFace];
+    T pressureCoeffadR = pressureCoeffR[iFace];
+    Flux_RoeEntropyCorrection(eigv1, eigv2, eigv3, pressureCoeffadL, pressureCoeffadR, absVel, vn, cm, RoeEntropyFixMethod, entrFixCoefLeft, entrFixCoefRight);
+
+    T xi1 = 0.0, xi2 = 0.0, xi3 = 0.0, xi4 = 0.0;
+    if (nPrecondition == 0)
+    {
+        xi1 = (two * eigv1 - eigv2 - eigv3) / (two * c2);
+        xi2 = (eigv2 - eigv3) / (two * cm);
+    }
+    else
+    {
+        xi1 = (two * eigv1 - eigv2 - eigv3) / (two * cnew2);
+        xi2 = (eigv2 - eigv3) / (two * cnew);
+        alpha = half * (one - beta);
+        xi3 = two * alpha * eigv1 / cnew2;
+        xi4 = alpha * vn * xi2 / cnew2;
+    }
+
+    T dc = theta * dq[IR] - xsn * dq[IRU] - ysn * dq[IRV] - zsn * dq[IRW];
+
+    T c2dc = 0;
+    if (nPrecondition == 0)
+    {
+        c2dc = c2 * dc;
+    }
+    else
+    {
+        Ur2 = beta * c2;
+        c2dc = cnew2 * dc;
+    }
+
+    T dh = -gamm1 * (uRoeAverage * dq[IRU] + vRoeAverage * dq[IRV] + wRoeAverage * dq[IRW] - dq[IRE]) + half * gamm1 * vSquareRoeAverage * dq[IR];
+
+    if (nChemical != 0)
+    {
+        // gas->ComputeDHAndTotalEnthalpy(prim, gama, dq, dh, hRoeAverage);
+    }
+
+    if (nPrecondition == 0)
+    {
+        flux[IR]     -= half * (eigv1 * dq[IR] - dh * xi1 - dc * xi2);
+        flux[IRU]    -= half * (eigv1 * dq[IRU] + (xsn * c2dc - uRoeAverage * dh) * xi1 + (xsn * dh - uRoeAverage * dc) * xi2);
+        flux[IRV]    -= half * (eigv1 * dq[IRV] + (ysn * c2dc - vRoeAverage * dh) * xi1 + (ysn * dh - vRoeAverage * dc) * xi2);
+        flux[IRW]    -= half * (eigv1 * dq[IRW] + (zsn * c2dc - wRoeAverage * dh) * xi1 + (zsn * dh - wRoeAverage * dc) * xi2);
+        flux[IRE]    -= half * (eigv1 * dq[IRE] + (theta * c2dc - hRoeAverage * dh) * xi1 + (theta * dh - hRoeAverage * dc) * xi2);
+
+        for (int iLaminar = nm; iLaminar < nLaminar; ++iLaminar)
+        {
+            prim[iLaminar] = half * (primL[iLaminar] + primR[iLaminar]);
+            flux[iLaminar] -= half * (eigv1 * dq[iLaminar] - prim[iLaminar] * (dh * xi1 + dc * xi2));
+        }
+    }
+    else
+    {
+        flux[IR]     -= half * (eigv1 * dq[IR] - dh * cnew2 / Ur2 * xi1 - dc * xi2 + dh * cnew2 / Ur2 * xi3 - dh * cnew2 / Ur2 * xi4);
+        flux[IRU]    -= half * (eigv1 * dq[IRU] + (xsn * c2dc - uRoeAverage * dh * cnew2 / Ur2) * xi1 + (xsn * dh - uRoeAverage * dc) * xi2 + uRoeAverage * dh * cnew2 / Ur2 * xi3 - (xsn * c2dc + uRoeAverage * dh * cnew2 / Ur2) * xi4);
+        flux[IRV]    -= half * (eigv1 * dq[IRV] + (ysn * c2dc - vRoeAverage * dh * cnew2 / Ur2) * xi1 + (ysn * dh - vRoeAverage * dc) * xi2 + vRoeAverage * dh * cnew2 / Ur2 * xi3 - (ysn * c2dc + vRoeAverage * dh * cnew2 / Ur2) * xi4);
+        flux[IRW]    -= half * (eigv1 * dq[IRW] + (zsn * c2dc - wRoeAverage * dh * cnew2 / Ur2) * xi1 + (zsn * dh - wRoeAverage * dc) * xi2 + wRoeAverage * dh * cnew2 / Ur2 * xi3 - (zsn * c2dc + wRoeAverage * dh * cnew2 / Ur2) * xi4);
+        flux[IRE]    -= half * (eigv1 * dq[IRE] + (theta * c2dc - hRoeAverage * dh * cnew2 / Ur2) * xi1 + (theta * dh - hRoeAverage * dc) * xi2 + hRoeAverage * dh * cnew2 / Ur2 * xi3 - (theta * c2dc + hRoeAverage * dh * cnew2 / Ur2) * xi4);
+
+        for (int iLaminar = nm; iLaminar < nLaminar; ++iLaminar)
+        {
+            prim[iLaminar] = half * (primL[iLaminar] + primR[iLaminar]);
+            flux[iLaminar] -= half * (eigv1 * dq[iLaminar] - prim[iLaminar] * (dh * cnew2 / Ur2 * (xi1 - xi3 + xi4) + dc * xi2));
+        }
+        //! Compute vibration-electron energy term.
+        for (int it = 1; it < nTemperatureModel; ++it)
+        {
+            prim[nLaminar + it] = half * (primL[nLaminar + it] + primR[nLaminar + it]);
+            flux[nLaminar + it] -= half * (eigv1 * dq[nLaminar + it] - prim[nLaminar + it] * (dh * cnew2 / Ur2 * (xi1 - xi3 + xi4) + dc * xi2));
+        }
+    }
+
+    delete[]dq;         dq = NULL;
+    delete[]qConserveL; qConserveL = NULL;
+    delete[]qConserveR; qConserveR = NULL;
+    delete[]prim;       prim = NULL;
+}
+
+// GMRES 
+void Cal_GMRES_Roe_Scheme_Flux(RDouble* primL, RDouble* primR, RDouble* qCvL, RDouble* qCvR, int iFace, RDouble* flux,
+                               FaceProxy* face_proxy, InviscidSchemeParameter* invSchemePara)
+{
+    using namespace IDX;                                
+    using namespace GAS_SPACE;                          
+    const RDouble LITTLE        = 1.0E-10;
+    int nEquation               = invSchemePara->GetNumberOfTotalEquation();
+    RDouble* gamaL              = invSchemePara->GetLeftGama();
+    RDouble* gamaR              = invSchemePara->GetRightGama();
+    RDouble* pressureCoeffL     = face_proxy->GetPressureCoefficientL();
+    RDouble* pressureCoeffR     = face_proxy->GetPressureCoefficientR();
+    RDouble entrFixCoefLeft     = invSchemePara->GetLeftEntropyFixCoefficient();
+    RDouble entrFixCoefRight    = invSchemePara->GetRightEntropyFixCoefficient();
+    RDouble* xfn                = invSchemePara->GetFaceNormalX();
+    RDouble* yfn                = invSchemePara->GetFaceNormalY();
+    RDouble* zfn                = invSchemePara->GetFaceNormalZ();
+    RDouble* vgn                = invSchemePara->GetFaceVelocity();
+    RDouble refMachNumber       = invSchemePara->GetMachNumber();
+    int RoeEntropyFixMethod     = invSchemePara->GetEntropyFixMethod();
+    RDouble mach2               = refMachNumber * refMachNumber;
+    RDouble* dq                 = new RDouble[nEquation]();
+
+    int nPrecondition       = invSchemePara->GetIfPrecondition(); 
+    RDouble xsn             = xfn[iFace];
+    RDouble ysn             = yfn[iFace];
+    RDouble zsn             = zfn[iFace];
+    RDouble vb              = vgn[iFace];
+    RDouble gmL             = gamaL[iFace];
+    RDouble gmR             = gamaR[iFace];
+
+    RDouble& rL     = qCvL[IR];
+    RDouble& ruL    = qCvL[IU];
+    RDouble& rvL    = qCvL[IV];
+    RDouble& rwL    = qCvL[IW];
+    RDouble& rEL    = qCvL[IP];
+
+    RDouble& rR     = qCvR[IR];
+    RDouble& ruR    = qCvR[IU];
+    RDouble& rvR    = qCvR[IV];
+    RDouble& rwR    = qCvR[IW];
+    RDouble& rER    = qCvR[IP];
+
+
+    RDouble& uL     = primL[IU];
+    RDouble& vL     = primL[IV];
+    RDouble& wL     = primL[IW];
+    RDouble& pL     = primL[IP];
+
+    RDouble& uR     = primR[IU];
+    RDouble& vR     = primR[IV];
+    RDouble& wR     = primR[IW];
+    RDouble& pR     = primR[IP];
+
+    rL = MAX(rL, LITTLE);
+    rR = MAX(rR, LITTLE);
+    pL = MAX(pL, LITTLE);
+    pR = MAX(pR, LITTLE);
+
+    // RDouble vSquareL = uL * uL + vL * vL + wL * wL;
+    // RDouble vSquareR = uR * uR + vR * vR + wR * wR;
+
+    RDouble hint_L  = (gmL / (gmL - one)) * (pL / rL);
+    RDouble hint_R  = (gmR / (gmR - one)) * (pR / rR);
+    RDouble peL     = 0.0, peR = 0.0;
+
+    //if (nChemical != 0 && nIdealState == 0)
+    //{
+    //    for (int i = 0; i < 3; ++i)
+    //    {
+    //        temperaturesL[i] = tl[i][iFace];
+    //        temperaturesR[i] = tr[i][iFace];
+    //    }
+    //    gas->ComputeEnthalpyByPrimitive(primL, gmL, hint_L, temperaturesL);
+    //    gas->ComputeEnthalpyByPrimitive(primR, gmR, hint_R, temperaturesR);
+    //
+    //    if (nTemperatureModel > 1)
+    //    {
+    //        peL = gas->GetElectronPressure(primL, temperaturesL[ITE]);
+    //        peR = gas->GetElectronPressure(primR, temperaturesR[ITE]);
+    //    }
+    //}
+    //RDouble hL = hint_L + half * vSquareL;
+    //RDouble hR = hint_R + half * vSquareR;
+    // 
+    RDouble vnL = xsn * uL + ysn * vL + zsn * wL - vb;
+    RDouble vnR = xsn * uR + ysn * vR + zsn * wR - vb;
+    //RDouble rvnL = rL * vnL;
+    //RDouble rvnR = rR * vnR;
+
+    //! The first part of Roe scheme: F(QL, QR) = 0.5 * [ F(QL) + F(QR) ].
+    RDouble rvnL = ruL * xsn + rvL * ysn + rwL * zsn - rL * vb;
+    RDouble rvnR = ruR * xsn + rvR * ysn + rwR * zsn - rR * vb;
+    RDouble hL = (rEL + pL) / rL;
+    RDouble hR = (rER + pR) / rR;
+
+    flux[IR]  = half * (rvnL + rvnR);
+    flux[IRU] = half * (rvnL * uL + xfn[iFace] * pL + rvnR * uR + xfn[iFace] * pR);
+    flux[IRV] = half * (rvnL * vL + yfn[iFace] * pL + rvnR * vR + yfn[iFace] * pR);
+    flux[IRW] = half * (rvnL * wL + zfn[iFace] * pL + rvnR * wR + zfn[iFace] * pR);
+    flux[IRE] = half * (rvnL * hL + vgn[iFace] * pL + rvnR * hR + vgn[iFace] * pR);
+
+
+    //! The following loop is useless.
+    //for (int iLaminar = nm; iLaminar < nLaminar; ++iLaminar)
+    //{
+    //    flux[iLaminar][iFace] = half * (primL[iLaminar] * rvnL + primR[iLaminar] * rvnR);
+    //}
+    //
+    //for (int it = 1; it < nTemperatureModel; ++it)
+    //{
+    //    flux[nLaminar + it][iFace] = half * (primL[nLaminar + it] * rvnL + primR[nLaminar + it] * rvnR);
+    //}
+    //if (nChemical == 1)
+    //{
+    //    flux[nLaminar + nTemperatureModel - 1][iFace] += half * (peL * (vnL + vgn[iFace]) + peR * (vnR + vgn[iFace]));
+    //}
+
+    RDouble ratio = sqrt(rR / rL);
+    RDouble roeAverageCoef = one / (one + ratio);
+
+    RDouble rRoeAverage = sqrt(rL * rR);
+    RDouble uRoeAverage = (uL + uR * ratio) * roeAverageCoef;
+    RDouble vRoeAverage = (vL + vR * ratio) * roeAverageCoef;
+    RDouble wRoeAverage = (wL + wR * ratio) * roeAverageCoef;
+    RDouble pRoeAverage = (pL + pR * ratio) * roeAverageCoef;
+
+    RDouble gama = (gmL + gmR * ratio) * roeAverageCoef;
+    RDouble gamm1 = gama - one;
+
+    RDouble vSquareRoeAverage = uRoeAverage * uRoeAverage + vRoeAverage * vRoeAverage + wRoeAverage * wRoeAverage;
+    RDouble absVel = sqrt(vSquareRoeAverage);
+    RDouble hRoeAverage = gama / gamm1 * pRoeAverage / rRoeAverage + half * vSquareRoeAverage;
+
+    RDouble vn = xsn * uRoeAverage + ysn * vRoeAverage + zsn * wRoeAverage - vb;
+    RDouble theta = vn + vb;
+
+    //! c2: square of sound speed.             
+    RDouble c2 = gamm1 * (hRoeAverage - half * vSquareRoeAverage);
+
+    //! Sound speed: gama * pRoeAverage / rRoeAverage.
+    RDouble cm = sqrt(ABS(c2));
+
+    RDouble Ur2 = 0, cnew2 = 0, cnew = 0, vnew = 0, beta = 0, alpha = 0;
+    RDouble eigv1 = 0, eigv2 = 0, eigv3 = 0;
+    eigv1 = ABS(vn);
+    if (nPrecondition == 0)
+    {
+        eigv2 = ABS(vn + cm);
+        eigv3 = ABS(vn - cm);
+    }
+    else
+    {
+        beta = MIN(MAX(vSquareRoeAverage / c2, three * mach2), one);
+        vnew = half * vn * (one + beta);
+        cnew = half * sqrt(((beta - one) * vn) * ((beta - one) * vn) + four * beta * c2);
+        cnew2 = cnew * cnew;
+        eigv2 = ABS(vnew + cnew);
+        eigv3 = ABS(vnew - cnew);
+    }
+
+    //RDouble EL = (one / (gmL - one)) * (pL / rL) + half * vSquareL;
+    //RDouble ER = (one / (gmR - one)) * (pR / rR) + half * vSquareR;
+
+    //! The jump between left and right conservative variables.
+    dq[IR]  = rR - rL;
+    dq[IRU] = ruR - ruL;
+    dq[IRV] = rvR - rvL;
+    dq[IRW] = rwR - rwL;
+    dq[IRE] = rER - rEL;
+
+
+    //if (nChemical != 0)
+    //{
+    //    if (nTemperatureModel > 1)
+    //    {
+    //        gas->GetTemperature(primL, temperaturesL[ITT], temperaturesL[ITV], temperaturesL[ITE]);
+    //        gas->GetTemperature(primR, temperaturesR[ITT], temperaturesR[ITV], temperaturesR[ITE]);
+    //    }
+    //    gas->Primitive2Conservative(primL, gmL, temperaturesL[ITV], temperaturesL[ITE], qConserveL);
+    //    gas->Primitive2Conservative(primR, gmR, temperaturesR[ITV], temperaturesR[ITE], qConserveR);
+    //}
+    //
+    //for (int iLaminar = nm; iLaminar < nEquation; ++iLaminar)
+    //{
+    //    dq[iLaminar] = qConserveR[iLaminar] - qConserveL[iLaminar];
+    //}
+
+    //! Entropy correction, to limit the magnitude of the three eigenvalue.
+    //! Warning: This function calling may affect the efficient!
+
+    Flux_RoeEntropyCorrection(eigv1, eigv2, eigv3, pressureCoeffL[iFace], pressureCoeffR[iFace], absVel, vn, cm, RoeEntropyFixMethod, entrFixCoefLeft, entrFixCoefRight);
+
+    RDouble xi1 = 0.0, xi2 = 0.0, xi3 = 0.0, xi4 = 0.0;
+    if (nPrecondition == 0)
+    {
+        xi1 = (two * eigv1 - eigv2 - eigv3) / (two * c2);
+        xi2 = (eigv2 - eigv3) / (two * cm);
+    }
+    else
+    {
+        xi1 = (two * eigv1 - eigv2 - eigv3) / (two * cnew2);
+        xi2 = (eigv2 - eigv3) / (two * cnew);
+        alpha = half * (one - beta);
+        xi3 = two * alpha * eigv1 / cnew2;
+        xi4 = alpha * vn * xi2 / cnew2;
+    }
+
+    RDouble dc = theta * dq[IR] - xsn * dq[IRU] - ysn * dq[IRV] - zsn * dq[IRW];
+
+    RDouble c2dc = 0;
+    if (nPrecondition == 0)
+    {
+        c2dc = c2 * dc;
+    }
+    else
+    {
+        Ur2 = beta * c2;
+        c2dc = cnew2 * dc;
+    }
+
+    RDouble dh = -gamm1 * (uRoeAverage * dq[IRU] + vRoeAverage * dq[IRV] + wRoeAverage * dq[IRW] - dq[IRE]) + half * gamm1 * vSquareRoeAverage * dq[IR];
+
+    //if (nChemical != 0)
+    //{
+    //    gas->ComputeDHAndTotalEnthalpy(prim, gama, dq, dh, hRoeAverage);
+    //}
+
+    if (nPrecondition == 0)
+    {
+        flux[IR]     -= half * (eigv1 * dq[IR] - dh * xi1 - dc * xi2);
+        flux[IRU]    -= half * (eigv1 * dq[IRU] + (xsn * c2dc - uRoeAverage * dh) * xi1 + (xsn * dh - uRoeAverage * dc) * xi2);
+        flux[IRV]    -= half * (eigv1 * dq[IRV] + (ysn * c2dc - vRoeAverage * dh) * xi1 + (ysn * dh - vRoeAverage * dc) * xi2);
+        flux[IRW]    -= half * (eigv1 * dq[IRW] + (zsn * c2dc - wRoeAverage * dh) * xi1 + (zsn * dh - wRoeAverage * dc) * xi2);
+        flux[IRE]    -= half * (eigv1 * dq[IRE] + (theta * c2dc - hRoeAverage * dh) * xi1 + (theta * dh - hRoeAverage * dc) * xi2);
+
+        //for (int iLaminar = nm; iLaminar < nLaminar; ++iLaminar)
+        //{
+        //    prim[iLaminar] = half * (primL[iLaminar] + primR[iLaminar]);
+        //    flux[iLaminar][iFace] -= half * (eigv1 * dq[iLaminar] - prim[iLaminar] * (dh * xi1 + dc * xi2));
+        //}
+    }
+    else
+    {
+        flux[IR]     -= half * (eigv1 * dq[IR] - dh * cnew2 / Ur2 * xi1 - dc * xi2 + dh * cnew2 / Ur2 * xi3 - dh * cnew2 / Ur2 * xi4);
+        flux[IRU]    -= half * (eigv1 * dq[IRU] + (xsn * c2dc - uRoeAverage * dh * cnew2 / Ur2) * xi1 + (xsn * dh - uRoeAverage * dc) * xi2 + uRoeAverage * dh * cnew2 / Ur2 * xi3 - (xsn * c2dc + uRoeAverage * dh * cnew2 / Ur2) * xi4);
+        flux[IRV]    -= half * (eigv1 * dq[IRV] + (ysn * c2dc - vRoeAverage * dh * cnew2 / Ur2) * xi1 + (ysn * dh - vRoeAverage * dc) * xi2 + vRoeAverage * dh * cnew2 / Ur2 * xi3 - (ysn * c2dc + vRoeAverage * dh * cnew2 / Ur2) * xi4);
+        flux[IRW]    -= half * (eigv1 * dq[IRW] + (zsn * c2dc - wRoeAverage * dh * cnew2 / Ur2) * xi1 + (zsn * dh - wRoeAverage * dc) * xi2 + wRoeAverage * dh * cnew2 / Ur2 * xi3 - (zsn * c2dc + wRoeAverage * dh * cnew2 / Ur2) * xi4);
+        flux[IRE]    -= half * (eigv1 * dq[IRE] + (theta * c2dc - hRoeAverage * dh * cnew2 / Ur2) * xi1 + (theta * dh - hRoeAverage * dc) * xi2 + hRoeAverage * dh * cnew2 / Ur2 * xi3 - (theta * c2dc + hRoeAverage * dh * cnew2 / Ur2) * xi4);
+
+        //for (int iLaminar = nm; iLaminar < nLaminar; ++iLaminar)
+        //{
+        //    prim[iLaminar] = half * (primL[iLaminar] + primR[iLaminar]);
+        //    flux[iLaminar][iFace] -= half * (eigv1 * dq[iLaminar] - prim[iLaminar] * (dh * cnew2 / Ur2 * (xi1 - xi3 + xi4) + dc * xi2));
+        //}
+        ////! Compute vibration-electron energy term.
+        //for (int it = 1; it < nTemperatureModel; ++it)
+        //{
+        //    prim[nLaminar + it] = half * (primL[nLaminar + it] + primR[nLaminar + it]);
+        //    flux[nLaminar + it][iFace] -= half * (eigv1 * dq[nLaminar + it] - prim[nLaminar + it] * (dh * cnew2 / Ur2 * (xi1 - xi3 + xi4) + dc * xi2));
+        //}
+    }
+
+    delete[]dq;    dq = NULL;
+}
+#endif
+
+void Roe_Scheme_PrimitiveForm(FaceProxy *faceProxy, InviscidSchemeParameter *inviscidSchemePara)
+{
+    const RDouble LITTLE = 1.0E-10;
+    int nTemperatureModel = inviscidSchemePara->GetNumberOfTemperatureModel();
+    int nEquation = inviscidSchemePara->GetNumberOfTotalEquation();
+    int nLaminar = inviscidSchemePara->GetNumberOfLaminar();
+    int nLength = inviscidSchemePara->GetLength();
+    int nm = inviscidSchemePara->Getnm();
+    int RoeEntropyFixMethod = inviscidSchemePara->GetEntropyFixMethod();
+    int nChemical = inviscidSchemePara->GetNumberOfChemical();
+    int nPrecondition = inviscidSchemePara->GetIfPrecondition();
+
+    RDouble refMachNumber = inviscidSchemePara->GetMachNumber();
+    RDouble entrFixCoefLeft = inviscidSchemePara->GetLeftEntropyFixCoefficient();
+    RDouble entrFixCoefRight = inviscidSchemePara->GetRightEntropyFixCoefficient();
+    RDouble **qL = inviscidSchemePara->GetLeftQ();
+    RDouble **qR = inviscidSchemePara->GetRightQ();
+    RDouble *gamaL = inviscidSchemePara->GetLeftGama();
+    RDouble *gamaR = inviscidSchemePara->GetRightGama();
+
+    RDouble *xfn   = inviscidSchemePara->GetFaceNormalX();
+    RDouble *yfn   = inviscidSchemePara->GetFaceNormalY();
+    RDouble *zfn   = inviscidSchemePara->GetFaceNormalZ();
+    RDouble *vgn   = inviscidSchemePara->GetFaceVelocity();
+    RDouble **flux = inviscidSchemePara->GetFlux();
+
+    RDouble *pressureCoeffL = faceProxy->GetPressureCoefficientL();
+    RDouble *pressureCoeffR = faceProxy->GetPressureCoefficientR();
+    RDouble **tl = inviscidSchemePara->GetLeftTemperature();
+    RDouble **tr = inviscidSchemePara->GetRightTemperature();
+    RDouble mach2 = refMachNumber * refMachNumber;
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble *dq         = new RDouble[nEquation];
+
+    RDouble *primL = new RDouble[nEquation];
+    RDouble *primR = new RDouble[nEquation];
+    RDouble temperaturesL[3], temperaturesR[3];
+
+    for (int iFace = 0; iFace < nLength; ++ iFace)
+    {
+        for (int iEqn = 0; iEqn < nEquation; ++ iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iFace];
+            primR[iEqn] = qR[iEqn][iFace];
+        }
+
+        RDouble &rL = primL[IR];
+        RDouble &uL = primL[IU];
+        RDouble &vL = primL[IV];
+        RDouble &wL = primL[IW];
+        RDouble &pL = primL[IP];
+
+        RDouble &rR = primR[IR];
+        RDouble &uR = primR[IU];
+        RDouble &vR = primR[IV];
+        RDouble &wR = primR[IW];
+        RDouble &pR = primR[IP];
+
+        RDouble xsn = xfn[iFace];
+        RDouble ysn = yfn[iFace];
+        RDouble zsn = zfn[iFace];
+        RDouble vb  = vgn[iFace];
+        RDouble gmL = gamaL[iFace];
+        RDouble gmR = gamaR[iFace];
+
+        rL = MAX(rL, LITTLE);
+        rR = MAX(rR, LITTLE);
+        pL = MAX(pL, LITTLE);
+        pR = MAX(pR, LITTLE);
+
+        RDouble vSquareL = uL * uL + vL * vL + wL * wL;
+        RDouble vSquareR = uR * uR + vR * vR + wR * wR;
+
+        RDouble hint_L = (gmL / (gmL - one)) * (pL / rL);
+        RDouble hint_R = (gmR / (gmR - one)) * (pR / rR);
+        RDouble peL = 0.0, peR = 0.0;
+        if (nChemical != 0)
+        {
+            for (int i = 0; i < 3; ++ i)
+            {
+                temperaturesL[i] = tl[i][iFace];
+                temperaturesR[i] = tr[i][iFace];
+            }
+            gas->ComputeEnthalpyByPrimitive(primL, gmL, hint_L, temperaturesL);
+            gas->ComputeEnthalpyByPrimitive(primR, gmR, hint_R, temperaturesR);
+
+            if (nTemperatureModel > 1)
+            {
+                peL = gas->GetElectronPressure(primL, temperaturesL[ITE]);
+                peR = gas->GetElectronPressure(primR, temperaturesR[ITE]);
+            }
+        }
+
+        //! H = h + 0.5 * V^2.
+        //! h = gam / (gam - 1) * p / rho.
+        RDouble HL = hint_L + half * vSquareL;
+        RDouble HR = hint_R + half * vSquareR;
+
+        RDouble vnL  = xsn * uL  + ysn * vL  + zsn * wL  - vb;
+        RDouble vnR  = xsn * uR  + ysn * vR  + zsn * wR  - vb;
+        RDouble rvnL = rL * vnL;
+        RDouble rvnR = rR * vnR;
+
+        //! The first part of Roe scheme: F(QL, QR) = 0.5 * [ F(QL) + F(QR) ].
+        flux[IR ][iFace] =  half * (rvnL                        + rvnR                     );
+        flux[IRU][iFace] =  half * (rvnL * uL + xfn[iFace] * pL + rvnR * uR + xfn[iFace] * pR);
+        flux[IRV][iFace] =  half * (rvnL * vL + yfn[iFace] * pL + rvnR * vR + yfn[iFace] * pR);
+        flux[IRW][iFace] =  half * (rvnL * wL + zfn[iFace] * pL + rvnR * wR + zfn[iFace] * pR);
+        flux[IRE][iFace] =  half * (rvnL * HL + vgn[iFace] * pL + rvnR * HR + vgn[iFace] * pR);
+
+        //! The following loop is useless.
+        for (int iLaminar = nm; iLaminar < nLaminar; ++ iLaminar)
+        {
+            flux[iLaminar][iFace] = half * (primL[iLaminar] * rvnL + primR[iLaminar] * rvnR);
+        }
+        for (int it = 1; it < nTemperatureModel; ++ it)
+        {
+            flux[nLaminar + it][iFace] = half * (primL[nLaminar + it] * rvnL + primR[nLaminar + it] * rvnR);
+        }
+        if (nChemical == 1)
+        {
+            flux[nLaminar + nTemperatureModel - 1][iFace] += half * (peL * (vnL + vgn[iFace]) + peR * (vnR + vgn[iFace]));
+        }
+
+        //! Compute diffusion terms following.
+
+        //! Roe-average firstly. Using density, three velocity components and pressure
+        RDouble ratio = sqrt(rR / rL);
+        RDouble roeAverageCoef = one / (one + ratio);
+
+        RDouble rRoeAverage = sqrt(rL * rR);
+        RDouble uRoeAverage = (uL + uR * ratio) * roeAverageCoef;
+        RDouble vRoeAverage = (vL + vR * ratio) * roeAverageCoef;
+        RDouble wRoeAverage = (wL + wR * ratio) * roeAverageCoef;
+        RDouble HRoeAverage = (HL + HR * ratio) * roeAverageCoef;
+
+        RDouble gama = (gmL + gmR * ratio) * roeAverageCoef;
+        RDouble gamm1 = gama - one;
+
+        RDouble vSquareRoeAverage = uRoeAverage * uRoeAverage + vRoeAverage * vRoeAverage + wRoeAverage * wRoeAverage;
+		RDouble absVel = sqrt(vSquareRoeAverage);
+        RDouble vn = xsn * uRoeAverage + ysn * vRoeAverage + zsn * wRoeAverage - vb;
+
+        //! c2: square of sound speed.             
+        RDouble c2 = gamm1 * (HRoeAverage - half * vSquareRoeAverage);
+
+        //! Sound speed: gama * pRoeAverage / rRoeAverage.
+        RDouble cm = sqrt(ABS(c2));
+
+        RDouble prconCoeff;
+        RDouble eigv1, eigv2, eigv3;
+        eigv1 = ABS(vn);
+        if (nPrecondition == 1)
+        {
+            prconCoeff = MIN(MAX(vSquareRoeAverage / c2, three * mach2), 1.0);
+            vn = half * vn * (1.0 + prconCoeff);
+            cm = half * sqrt(((1.0 - prconCoeff) * vn) * ((1.0 - prconCoeff) * vn) + 4.0 * prconCoeff * c2);
+            c2 = cm * cm;
+        }
+        eigv2 = ABS(vn + cm);
+        eigv3 = ABS(vn - cm);
+
+        //! The jump between left and right primitive variables.
+        dq[IR] = rR - rL;
+        dq[IU] = uR - uL;
+        dq[IV] = vR - vL;
+        dq[IW] = wR - wL;
+        dq[IP] = pR - pL;
+        RDouble dVn = vnR - vnL;
+
+        if (nChemical != 0)
+        {
+            TK_Exit::UnexpectedVarValue("Do not consider chemical = ", 1);
+        }
+
+        //! Entropy correction, to limit the magnitude of the three eigenvalue.
+        //! Warning: This function calling may affect the efficient!
+
+
+
+        Flux_RoeEntropyCorrection(eigv1, eigv2, eigv3, pressureCoeffL[iFace], pressureCoeffR[iFace], absVel, vn, cm, RoeEntropyFixMethod, entrFixCoefLeft, entrFixCoefRight);
+
+        RDouble eigv1Term = 0.0, eigv2Term = 0.0, eigv3Term = 0.0;
+        RDouble oSoundSpeed2 = 1.0 / (cm * cm);
+        if (nPrecondition == 0) 
+        {
+            eigv1Term = dq[IR] - dq[IP] * oSoundSpeed2;
+            eigv2Term = half * (dq[IP] + rRoeAverage * cm * dVn) * oSoundSpeed2;
+            eigv3Term = half * (dq[IP] - rRoeAverage * cm * dVn) * oSoundSpeed2;
+        }
+        else
+        {
+            TK_Exit::UnexpectedVarValue("Do not consider nPrecondition = ", 1);
+        }
+
+        if (nChemical != 0)
+        {
+            TK_Exit::UnexpectedVarValue("Do not consider chemical = ", 1);
+            //ComputeDHAndTotalEnthalpy(prim, gama, dq, dh, hRoeAverage);
+        }
+
+        RDouble fluxTerm111 = 1.0;
+        RDouble fluxTerm112 = uRoeAverage;
+        RDouble fluxTerm113 = vRoeAverage;
+        RDouble fluxTerm114 = wRoeAverage;
+        RDouble fluxTerm115 = half * vSquareRoeAverage;
+
+        RDouble fluxTerm121 = 0.0;
+        RDouble fluxTerm122 = dq[IU] - dVn * xsn;
+        RDouble fluxTerm123 = dq[IV] - dVn * ysn;
+        RDouble fluxTerm124 = dq[IW] - dVn * zsn;
+        RDouble fluxTerm125 = uRoeAverage * dq[IU] + vRoeAverage * dq[IV] + wRoeAverage * dq[IW] - vn * dVn;
+
+        RDouble fluxTerm21 = 1.0;
+        RDouble fluxTerm22 = uRoeAverage + cm * xsn;
+        RDouble fluxTerm23 = vRoeAverage + cm * ysn;
+        RDouble fluxTerm24 = wRoeAverage + cm * zsn;
+        RDouble fluxTerm25 = HRoeAverage + cm * vn;
+
+        RDouble fluxTerm31 = 1.0;
+        RDouble fluxTerm32 = uRoeAverage - cm * xsn;
+        RDouble fluxTerm33 = vRoeAverage - cm * ysn;
+        RDouble fluxTerm34 = wRoeAverage - cm * zsn;
+        RDouble fluxTerm35 = HRoeAverage - cm * vn;
+
+        if (nPrecondition == 0)
+        {
+            flux[IR ][iFace] -= half * (eigv1 * eigv1Term * fluxTerm111 + eigv1 * rRoeAverage * fluxTerm121 + eigv2 * eigv2Term * fluxTerm21 + eigv3 * eigv3Term * fluxTerm31);
+            flux[IRU][iFace] -= half * (eigv1 * eigv1Term * fluxTerm112 + eigv1 * rRoeAverage * fluxTerm122 + eigv2 * eigv2Term * fluxTerm22 + eigv3 * eigv3Term * fluxTerm32);
+            flux[IRV][iFace] -= half * (eigv1 * eigv1Term * fluxTerm113 + eigv1 * rRoeAverage * fluxTerm123 + eigv2 * eigv2Term * fluxTerm23 + eigv3 * eigv3Term * fluxTerm33);
+            flux[IRW][iFace] -= half * (eigv1 * eigv1Term * fluxTerm114 + eigv1 * rRoeAverage * fluxTerm124 + eigv2 * eigv2Term * fluxTerm24 + eigv3 * eigv3Term * fluxTerm34);
+            flux[IRE][iFace] -= half * (eigv1 * eigv1Term * fluxTerm115 + eigv1 * rRoeAverage * fluxTerm125 + eigv2 * eigv2Term * fluxTerm25 + eigv3 * eigv3Term * fluxTerm35);
+        }
+        else
+        {
+            TK_Exit::UnexpectedVarValue("Do not consider nPrecondition = ", 1);
+        }
+
+    }
+
+    delete []primL;
+    delete []primR;
+    delete []dq;
+}
+
+//clz begin
+void Steger_Scheme(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara)
+{
+    int nTemperatureModel = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar = invSchemePara->GetNumberOfLaminar();
+    int nLen = invSchemePara->GetLength();
+    int nm = invSchemePara->Getnm();
+    int EntropyFixMethod = invSchemePara->GetEntropyFixMethod();
+    int nChemical = invSchemePara->GetNumberOfChemical();
+    int nIdealState = invSchemePara->GetIfIdealState();
+
+    int nElectronIndex = invSchemePara->GetIndexOfElectron();
+
+    RDouble entrFixCoefLeft  = invSchemePara->GetLeftEntropyFixCoefficient();
+    RDouble entrFixCoefRight = invSchemePara->GetRightEntropyFixCoefficient();
+    RDouble **ql = invSchemePara->GetLeftQ();
+    RDouble **qr = invSchemePara->GetRightQ();
+    RDouble *gamal = invSchemePara->GetLeftGama();
+    RDouble *gamar = invSchemePara->GetRightGama();
+    RDouble *xfn   = invSchemePara->GetFaceNormalX();
+    RDouble *yfn   = invSchemePara->GetFaceNormalY();
+    RDouble *zfn   = invSchemePara->GetFaceNormalZ();
+    RDouble *vgn   = invSchemePara->GetFaceVelocity();
+    RDouble **flux = invSchemePara->GetFlux();
+    RDouble **tl = invSchemePara->GetLeftTemperature();
+    RDouble **tr = invSchemePara->GetRightTemperature();
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble *fl    = new RDouble[nEquation];
+    RDouble *fr    = new RDouble[nEquation];
+    RDouble *priml = new RDouble[nEquation];
+    RDouble *primr = new RDouble[nEquation];
+    RDouble temperaturesL[3], temperaturesR[3];
+
+    for (int iLen = 0; iLen < nLen; ++ iLen)
+    {
+        for (int iEqn = 0; iEqn < nEquation; ++ iEqn)
+        {
+            priml[iEqn] = ql[iEqn][iLen];
+            primr[iEqn] = qr[iEqn][iLen];
+        }
+
+        RDouble rl = priml[IR];
+        RDouble ul = priml[IU];
+        RDouble vl = priml[IV];
+        RDouble wl = priml[IW];
+        RDouble pl = priml[IP];
+
+        RDouble rr = primr[IR];
+        RDouble ur = primr[IU];
+        RDouble vr = primr[IV];
+        RDouble wr = primr[IW];
+        RDouble pr = primr[IP];
+
+        RDouble xsn = xfn[iLen];
+        RDouble ysn = yfn[iLen];
+        RDouble zsn = zfn[iLen];
+        RDouble vb  = vgn[iLen];
+
+        RDouble gmL = gamal[iLen];
+        RDouble gmR = gamar[iLen];
+
+        RDouble v2l = ul * ul + vl * vl + wl * wl;
+        RDouble v2r = ur * ur + vr * vr + wr * wr;
+
+        RDouble hintLeft  = (gmL / (gmL - one)) * (pl / rl);
+        RDouble hintRight = (gmR / (gmR - one)) * (pr / rr);
+
+        RDouble pel = 0.0, per = 0.0;
+
+        if (nChemical != 0 && nIdealState == 0)
+        {
+            for (int i = 0; i < 3; ++ i)
+            {
+                temperaturesL[i] = tl[i][iLen];
+                temperaturesR[i] = tr[i][iLen];
+            }
+            gas->ComputeEnthalpyByPrimitive(priml, gmL, hintLeft, temperaturesL);
+            gas->ComputeEnthalpyByPrimitive(primr, gmR, hintRight, temperaturesR);
+
+            if (nTemperatureModel > 1)
+            {
+                pel = gas->GetElectronPressure(priml, temperaturesL[ITE]);
+                per = gas->GetElectronPressure(primr, temperaturesR[ITE]);
+            }
+        }
+
+        RDouble hl = hintLeft  + half * v2l;
+        RDouble hr = hintRight + half * v2r;
+        RDouble el = hl - pl / (rl + SMALL);
+        RDouble er = hr - pr / (rr + SMALL);
+
+        RDouble vnl = xsn * ul + ysn * vl + zsn * wl - vb;
+        RDouble vnr = xsn * ur + ysn * vr + zsn * wr - vb;
+
+        RDouble c2l = gmL * pl / rl;
+        RDouble cl  = sqrt(ABS(c2l));
+
+        RDouble c2r = gmR * pr / rr;
+        RDouble cr  = sqrt(ABS(c2r));
+
+        //! The eigenvalues of left and right.
+        RDouble eigvl1 = vnl;
+        RDouble eigvl2 = vnl + cl;
+        RDouble eigvl3 = vnl - cl;
+
+        RDouble eigvr1 = vnr;
+        RDouble eigvr2 = vnr + cr;
+        RDouble eigvr3 = vnr - cr;
+
+        RDouble absEigvl1 = ABS(eigvl1);
+        RDouble absEigvl2 = ABS(eigvl2);
+        RDouble absEigvl3 = ABS(eigvl3);
+
+        RDouble absEigvr1 = ABS(eigvr1);
+        RDouble absEigvr2 = ABS(eigvr2);
+        RDouble absEigvr3 = ABS(eigvr3);
+
+        //! Entropy fix.
+        //! Modified by clz : 2012-8-15.
+        if (EntropyFixMethod == 1)
+        {
+            RDouble maxEigv = MAX(absEigvl2, absEigvl3);
+            RDouble tmp0    = maxEigv * entrFixCoefLeft ;
+            RDouble tmp1    = maxEigv * entrFixCoefRight;
+            absEigvl1       = MAX(tmp0, absEigvl1);
+            absEigvl2       = MAX(tmp1, absEigvl2);
+            absEigvl3       = MAX(tmp1, absEigvl3);
+
+            maxEigv = MAX(absEigvr2, absEigvr3);
+            tmp0     = maxEigv * entrFixCoefLeft ;
+            tmp1     = maxEigv * entrFixCoefRight;
+            absEigvr1   = MAX(tmp0, absEigvr1);
+            absEigvr2   = MAX(tmp1, absEigvr2);
+            absEigvr3   = MAX(tmp1, absEigvr3);
+        }
+        else if (EntropyFixMethod == 2)
+        {
+            //RDouble tmp0 = MAX(entrFixCoefLeft , static_cast <RDouble> (0.02));
+            //RDouble tmp1 = MAX(entrFixCoefRight, static_cast <RDouble> (0.02));
+
+            //absEigvl1 = MAX(tmp0, absEigvl1);
+            //absEigvl2 = MAX(tmp1, absEigvl2);
+            //absEigvl3 = MAX(tmp1, absEigvl3);
+                   
+            //absEigvr1 = MAX(tmp0, absEigvr1);
+            //absEigvr2 = MAX(tmp1, absEigvr2);
+            //absEigvr3 = MAX(tmp1, absEigvr3);
+
+            absEigvl1 = sqrt(absEigvl1*absEigvl1 + 1.E-4);
+            absEigvl2 = sqrt(absEigvl2*absEigvl2 + 1.E-4);
+            absEigvl3 = sqrt(absEigvl3*absEigvl3 + 1.E-4);
+
+            absEigvr1 = sqrt(absEigvr1*absEigvr1 + 1.E-4);
+            absEigvr2 = sqrt(absEigvr2*absEigvr2 + 1.E-4);
+            absEigvr3 = sqrt(absEigvr3*absEigvr3 + 1.E-4);
+        }
+        eigvl1 = half * (eigvl1 + absEigvl1);
+        eigvl2 = half * (eigvl2 + absEigvl2);
+        eigvl3 = half * (eigvl3 + absEigvl3);
+
+        eigvr1 = half * (eigvr1 - absEigvr1);
+        eigvr2 = half * (eigvr2 - absEigvr2);
+        eigvr3 = half * (eigvr3 - absEigvr3);
+
+        RDouble c2gaml  = c2l / gmL;
+        RDouble c2gamr  = c2r / gmR;
+
+        RDouble xil1 = c2gaml * (eigvl1 + eigvl1 - eigvl2 - eigvl3) / (c2l + c2l);
+        RDouble xil2 = c2gaml * (eigvl2 - eigvl3) / (cl + cl);
+
+        RDouble xir1 = c2gamr * (eigvr1 + eigvr1 - eigvr2 - eigvr3) / (c2r + c2r);
+        RDouble xir2 = c2gamr * (eigvr2 - eigvr3) / (cr + cr);
+
+        RDouble eig_xi = eigvl1 - xil1;
+
+        fl[IR ] = rl * (eig_xi                );
+        fl[IRU] = rl * (eig_xi * ul + xil2 * xsn);
+        fl[IRV] = rl * (eig_xi * vl + xil2 * ysn);
+        fl[IRW] = rl * (eig_xi * wl + xil2 * zsn);
+        fl[IRE] = rl * (eigvl1 * el - xil1 * hl + xil2 * (vnl + vb));
+        RDouble fel = - xil1 * pel;
+
+        eig_xi = eigvr1 - xir1;
+
+        fr[IR ] = rr * (eig_xi                );
+        fr[IRU] = rr * (eig_xi * ur + xir2 * xsn);
+        fr[IRV] = rr * (eig_xi * vr + xir2 * ysn);
+        fr[IRW] = rr * (eig_xi * wr + xir2 * zsn);
+        fr[IRE] = rr * (eigvr1 * er - xir1 * hr + xir2 * (vnr + vb));
+        RDouble fer = - xir1 * per;
+
+        for (int iLaminar = nm; iLaminar < nEquation; ++ iLaminar)
+        {
+            fl[iLaminar] = priml[iLaminar] * fl[IR];
+            fr[iLaminar] = primr[iLaminar] * fr[IR];
+        }
+        if (nChemical == 1)
+        {
+            fl[nLaminar + nTemperatureModel - 1] += fel;
+            fr[nLaminar + nTemperatureModel - 1] += fer;
+        }
+
+        //! Compute vibration-electron energy term.
+        for (int iLaminar = 0; iLaminar < nEquation; ++ iLaminar)
+        {
+            flux[iLaminar][iLen] = fl[iLaminar] + fr[iLaminar];
+        }
+
+        //! Modify the fluxes of the species whose transport equations need not to be computed.
+        if (nChemical == 1)
+        {
+            flux[nLaminar][iLen] = 0.0;
+            if (nElectronIndex >= 0)
+            {
+                flux[nLaminar - 1][iLen] = 0.0;
+            }
+        }
+    }
+
+    delete []fl;
+    delete []fr;
+    delete []priml;
+    delete []primr;
+}
+
+
+
+void Vanleer_Scheme(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara)
+{
+    int nTemperatureModel = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar = invSchemePara->GetNumberOfLaminar();
+    int nLen = invSchemePara->GetLength();
+    int nm = invSchemePara->Getnm();
+    int nChemical = invSchemePara->GetNumberOfChemical();
+    int nPrecondition = invSchemePara->GetIfPrecondition();
+    int nIdealState = invSchemePara->GetIfIdealState();
+    int nElectronIndex = invSchemePara->GetIndexOfElectron();
+    RDouble kPrec = invSchemePara->GetPreconCoefficient();
+
+    RDouble **qL = invSchemePara->GetLeftQ();
+    RDouble **qR = invSchemePara->GetRightQ();
+    RDouble *gamal = invSchemePara->GetLeftGama();
+    RDouble *gamar = invSchemePara->GetRightGama();
+    RDouble *xfn   = invSchemePara->GetFaceNormalX();
+    RDouble *yfn   = invSchemePara->GetFaceNormalY();
+    RDouble *zfn   = invSchemePara->GetFaceNormalZ();
+    RDouble *vgn   = invSchemePara->GetFaceVelocity();
+    RDouble **flux = invSchemePara->GetFlux();
+    RDouble refMachNumber = invSchemePara->GetMachNumber();
+    RDouble mach2 = refMachNumber * refMachNumber;
+    RDouble **tl = invSchemePara->GetLeftTemperature();
+    RDouble **tr = invSchemePara->GetRightTemperature();
+ 
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble *fluxL    = new RDouble[nEquation];
+    RDouble *fluxR    = new RDouble[nEquation];
+    RDouble *primL = new RDouble[nEquation];
+    RDouble *primR = new RDouble[nEquation];
+    RDouble temperaturesL[3], temperaturesR[3];
+
+    for (int iLen = 0; iLen < nLen; ++ iLen)
+    {
+        for (int iEqn = 0; iEqn < nEquation; ++ iEqn)
+        {
+            primL[iEqn] = qL[iEqn][iLen];
+            primR[iEqn] = qR[iEqn][iLen];
+        }
+
+        RDouble &rL = primL[IR];
+        RDouble &uL = primL[IU];
+        RDouble &vL = primL[IV];
+        RDouble &wL = primL[IW];
+        RDouble &pL = primL[IP];
+
+        RDouble &rR = primR[IR];
+        RDouble &uR = primR[IU];
+        RDouble &vR = primR[IV];
+        RDouble &wR = primR[IW];
+        RDouble &pR = primR[IP];
+
+        //! It is convenient for later package flux solver,and adding variables.
+        RDouble xsn = xfn[iLen];
+        RDouble ysn = yfn[iLen];
+        RDouble zsn = zfn[iLen];
+        RDouble vb =  vgn[iLen];
+        RDouble gmL = gamal[iLen];
+        RDouble gmR = gamar[iLen];
+
+        RDouble v2L = uL * uL + vL * vL + wL * wL;
+        RDouble v2R = uR * uR + vR * vR + wR * wR;
+
+        RDouble hintL = (gmL / (gmL - one)) * (pL / rL);
+        RDouble hintR = (gmR / (gmR - one)) * (pR / rR);
+
+        RDouble peL = 0.0, peR = 0.0;
+
+        if (nChemical != 0 && nIdealState == 0)
+        {
+            for (int i = 0; i < 3; ++ i)
+            {
+                temperaturesL[i] = tl[i][iLen];
+                temperaturesR[i] = tr[i][iLen];
+            }
+            gas->ComputeEnthalpyByPrimitive(primL, gmL, hintL, temperaturesL);
+            gas->ComputeEnthalpyByPrimitive(primR, gmR, hintR, temperaturesR);
+
+            if (nTemperatureModel > 1)
+            {
+                peL = gas->GetElectronPressure(primL, tl[2][iLen]);
+                peR = gas->GetElectronPressure(primR, tr[2][iLen]);
+            }
+        }
+
+        RDouble HL  = hintL + half * v2L;
+        RDouble HR  = hintR + half * v2R;
+
+        //! Full flux.
+        RDouble vnL  = xsn * uL + ysn * vL + zsn * wL - vb;
+        RDouble vnR  = xsn * uR + ysn * vR + zsn * wR - vb;
+        RDouble rhoVnL = rL * vnL;
+        RDouble rhoVnR = rR * vnR;
+
+        RDouble c2l   = gmL * pL / rL;
+        RDouble cL    = sqrt(ABS(c2l));
+        RDouble machL = vnL / cL;
+        RDouble mach2L = machL * machL;
+        RDouble Mr2l =sqrt(MIN(MAX(mach2L, kPrec * mach2), 1.0));
+
+        RDouble c2r   = gmR * pR / rR;
+        RDouble cR    = sqrt(ABS(c2r));
+        RDouble machR = vnR / cR;
+        RDouble mach2R = machR * machR;
+        RDouble Mr2r =sqrt(MIN(MAX(mach2R, kPrec * mach2), 1.0));
+
+        RDouble fel = 0.0, fer = 0.0;
+        if (machL > one)
+        {
+            //! Supersonic flow from left to right, upwind by left.
+            fluxL[IR ] = rhoVnL;
+            fluxL[IRU] = rhoVnL * uL + xsn * pL;
+            fluxL[IRV] = rhoVnL * vL + ysn * pL;
+            fluxL[IRW] = rhoVnL * wL + zsn * pL;
+            fluxL[IRE] = rhoVnL * HL + vb  * pL;
+            fel = peL * (vnL + vb);
+        }
+        else if (machL < - one)
+        {
+            //! Supersonic flow from right to left, upwind by right.
+            fluxL[IR ] = zero;
+            fluxL[IRU] = zero;
+            fluxL[IRV] = zero;
+            fluxL[IRW] = zero;
+            fluxL[IRE] = zero;
+            fel = zero;
+        }
+        else
+        {
+            //! Subsonic flow.
+            if (nPrecondition == 0)
+            {
+                //! Without precondition.
+                RDouble fmass = 0.25 * rL * cL * (machL + 1.0) * (machL + 1.0);
+                RDouble tmp = (- vnL + 2.0 * cL) / gmL;
+                fluxL[IR ] = fmass;
+                fluxL[IRU] = fmass * (uL + xsn * tmp);
+                fluxL[IRV] = fmass * (vL + ysn * tmp);
+                fluxL[IRW] = fmass * (wL + zsn * tmp);
+                fluxL[IRE] = fmass * (HL + vb  * tmp);
+            }
+            else
+            {
+                //! With precondition.
+                RDouble fmass = 0.25 * rL * cL * (machL * machL + 1.0);
+                RDouble tmp0  = - vnL / gmL;
+                RDouble tmp1  = rL * cL / gmL;
+                fluxL[IR ] = half * rhoVnL + Mr2l *  fmass;
+                fluxL[IRU] = half * (rhoVnL * uL + xsn * pL) + Mr2l * (fmass * (uL + xsn * tmp0) + uL * tmp1);
+                fluxL[IRV] = half * (rhoVnL * vL + ysn * pL) + Mr2l * (fmass * (vL + ysn * tmp0) + vL * tmp1);
+                fluxL[IRW] = half * (rhoVnL * wL + zsn * pL) + Mr2l * (fmass * (wL + zsn * tmp0) + wL * tmp1);
+                fluxL[IRE] = half * (rhoVnL * HL + vb  * pL) + Mr2l * (fmass * (HL + vb  * tmp0));
+            }
+        }
+
+        //! Other equations besides N-S 5-equations, such as: multi-species, electronic.
+        //! which are stored start from iEqua=5, 6, ...
+        for (int iLaminar = nm; iLaminar < nLaminar; ++ iLaminar)
+        {
+            fluxL[iLaminar] = primL[iLaminar] * fluxL[IR];
+        }
+
+        //! Right contribution.
+        if (machR < - one)
+        {
+            //! Supersonic flow from right to left, upwind by right.
+            fluxR[IR ] = rhoVnR;
+            fluxR[IRU] = rhoVnR * uR + xsn * pR;
+            fluxR[IRV] = rhoVnR * vR + ysn * pR;
+            fluxR[IRW] = rhoVnR * wR + zsn * pR;
+            fluxR[IRE] = rhoVnR * HR + vb  * pR;
+            fer = peR * (vnR + vb);
+        }
+        else if (machR > one)
+        {
+            //! Supersonic flow from left to right, upwind by left.
+            fluxR[IR ] = zero;
+            fluxR[IRU] = zero;
+            fluxR[IRV] = zero;
+            fluxR[IRW] = zero;
+            fluxR[IRE] = zero;
+            fer = zero;
+        }
+        else
+        {
+            //! Subsonic flow.
+            if (nPrecondition == 0)
+            {
+                //! Without precondition.
+                RDouble fmass = - 0.25 * rR * cR * (machR - 1.0) * (machR - 1.0);
+                RDouble tmp = (- vnR - 2.0 * cR) / gmR;
+                fluxR[IR ] = fmass;
+                fluxR[IRU] = fmass * (uR + xsn * tmp);
+                fluxR[IRV] = fmass * (vR + ysn * tmp);
+                fluxR[IRW] = fmass * (wR + zsn * tmp);
+                fluxR[IRE] = fmass * (HR + vb  * tmp);
+            }
+            else
+            {
+                //! With precondition.
+                RDouble fmass = 0.25 * rR * cR * (machR * machR + 1.0);
+                RDouble tmp0  = - vnR / gmR;
+                RDouble tmp1  = rR * cR / gmR;
+                fluxR[IR ] = half * rhoVnR  - Mr2r * fmass;
+                fluxR[IRU] = half * (rhoVnR * uR + xsn * pR) - Mr2r * (fmass * (uR + xsn * tmp0) + uR * tmp1);
+                fluxR[IRV] = half * (rhoVnR * vR + ysn * pR) - Mr2r * (fmass * (vR + ysn * tmp0) + vR * tmp1);
+                fluxR[IRW] = half * (rhoVnR * wR + zsn * pR) - Mr2r * (fmass * (wR + zsn * tmp0) + wR * tmp1);
+                fluxR[IRE] = half * (rhoVnR * HR + vb  * pR) - Mr2r * (fmass * (HR + vb  * tmp0));
+            }
+        }
+
+        //! Other equations besides N-S 5-equations, such as: multi-species, electronic.
+        //! which are stored start from iEqua=5, 6, ...
+        for (int iLaminar = nm; iLaminar < nLaminar; ++ iLaminar)
+        {
+            fluxR[iLaminar] = primR[iLaminar] * fluxR[IR];
+        }
+
+        //! Compute vibration-electron energy term.
+        for (int it = 1; it < nTemperatureModel; ++ it)
+        {
+            fluxL[nLaminar + it] = primL[nLaminar + it] * fluxL[IR];
+            fluxR[nLaminar + it] = primR[nLaminar + it] * fluxR[IR];
+        }
+        if (nChemical == 1)
+        {
+            fluxL[nLaminar + nTemperatureModel - 1] += fel;
+            fluxR[nLaminar + nTemperatureModel - 1] += fer;
+        }
+
+        for (int iLaminar = 0; iLaminar < nEquation; ++ iLaminar)
+        {
+            flux[iLaminar][iLen] = fluxL[iLaminar] + fluxR[iLaminar];
+        }
+        if (nChemical == 1)
+        {
+            flux[nLaminar][iLen] = 0.0;
+            if (nElectronIndex >= 0)
+            {
+                flux[nLaminar - 1][iLen] = 0.0;
+            }
+        }
+    }
+
+    delete [] fluxL;
+    delete [] fluxR;
+    delete [] primL;
+    delete [] primR;
+}
+
+
+void Rotate_Vanleer_Scheme(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara)
+{
+    RDouble v2l,vnl,hint_l,hl,rvnl,c2l,cl,machl;
+    RDouble v2r,vnr,hint_r,hr,rvnr,c2r,cr,machr;
+    RDouble fmass, tmp;
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+    int neqn     = invSchemePara->GetNumberOfTotalEquation();
+    int nl       = invSchemePara->GetNumberOfLaminar();
+    int nlen     = invSchemePara->GetLength();
+    int nm		 = invSchemePara->Getnm();
+    RDouble ** ql = invSchemePara->GetLeftQ();
+    RDouble ** qr = invSchemePara->GetRightQ();
+    RDouble * gamal = invSchemePara->GetLeftGama();
+    RDouble * gamar = invSchemePara->GetRightGama();
+    RDouble * xfn   = invSchemePara->GetFaceNormalX();
+    RDouble * yfn   = invSchemePara->GetFaceNormalY();
+    RDouble * zfn   = invSchemePara->GetFaceNormalZ();
+    RDouble * vgn   = invSchemePara->GetFaceVelocity();
+    RDouble ** flux = invSchemePara->GetFlux();
+
+    RDouble *fl    = new RDouble[nl];
+    RDouble *fr    = new RDouble[nl];
+    RDouble *priml = new RDouble[neqn];
+    RDouble *primr = new RDouble[neqn];
+
+    for ( int i = 0; i < nlen; ++ i )
+    {
+        for ( int m = 0; m < nl; ++ m )
+        {
+            flux[m][i] = 0 ;
+        }
+
+        for ( int m = 0; m < neqn; ++ m )
+        {
+            priml[m] = ql[m][i];
+            primr[m] = qr[m][i];
+        }
+
+
+        RDouble &rl = priml[IR];
+        RDouble &ul = priml[IU];
+        RDouble &vl = priml[IV];
+        RDouble &wl = priml[IW];
+        RDouble &pl = priml[IP];
+
+        RDouble &rr = primr[IR];
+        RDouble &ur = primr[IU];
+        RDouble &vr = primr[IV];
+        RDouble &wr = primr[IW];
+        RDouble &pr = primr[IP];
+
+        v2l = ul * ul + vl * vl + wl * wl;
+        v2r = ur * ur + vr * vr + wr * wr;
+
+        RDouble gmL = gamal[i];
+        RDouble gmR = gamar[i];
+
+        hint_l = (gmL / (gmL - one)) * (pl / rl);
+        hint_r = (gmR / (gmR - one)) * (pr / rr);
+
+        //gas->ComputeEnthalpyByPrimitive(priml, gamal[i], hint_l);
+        //gas->ComputeEnthalpyByPrimitive(primr, gamar[i], hint_r);
+
+        hl = hint_l + half * v2l;
+        hr = hint_r + half * v2r;
+
+        // Face normal
+        RDouble n[3];
+        n[0] = xfn[i];
+        n[1] = yfn[i];
+        n[2] = zfn[i];
+
+        RDouble n1[3];
+
+        if((qr[IU][i] - ql[IU][i]) == 0 && (qr[IV][i] - ql[IV][i]) == 0 && (qr[IW][i] - ql[IW][i]) == 0)
+        {
+            n1[0] = 1;
+            n1[1] = 0;
+            n1[2] = 0;
+        }
+        else
+        {
+            RDouble sqdv = sqrt(pow((qr[IU][i] - ql[IU][i] ),2) + pow((qr[IV][i] - ql[IV][i] ),2) + pow((qr[IW][i] - ql[IW][i]  ),2));
+            n1[0] = (qr[IU][i] - ql[IU][i])/sqdv;
+            n1[1] = (qr[IV][i] - ql[IV][i])/sqdv;
+            n1[2] = (qr[IW][i] - ql[IW][i])/sqdv;
+        }
+
+        RDouble angle1 = GetAngleOfTwoVector(n1, n, 3);
+
+        if ( cos(angle1) < 0)
+        {
+            n1[0] = -n1[0];
+            n1[1] = -n1[1];
+            n1[2] = -n1[2];
+            angle1 = GetAngleOfTwoVector(n1, n, 3);
+        }
+        RDouble n2[3];
+        if (abs(n1[0] - xfn[i]) < 1.0e-8 && abs(n1[1] - yfn[i]) < 1.0e-8 && abs(n1[2] - zfn[i]) < 1.0e-8)
+        {
+
+            n2[0] = 0;
+            n2[1] = 1;
+            n2[2] = 0;
+        }
+        else
+        {
+            RDouble tmpV[3];
+            CrossProduct(n1, n, tmpV);
+            CrossProduct(tmpV, n1, n2);
+        }	
+        RDouble normn2 = GetNorm(n2, 3);
+        if ( cos(GetAngleOfTwoVector(n2, n, 3)) < 0)
+        {
+            n2[0] = -n2[0]/normn2;
+            n2[1] = -n2[1]/normn2;
+            n2[2] = -n2[2]/normn2;
+        }
+        else
+        {
+            n2[0] = n2[0]/normn2;
+            n2[1] = n2[1]/normn2;
+            n2[2] = n2[2]/normn2;
+        }
+
+        RDouble angle2 = GetAngleOfTwoVector(n2, n, 3);
+        for(int dir= 1; dir <=2; ++dir)
+        {						
+            if (dir == 1)
+            {
+                xfn[i] = n1[0];
+                yfn[i] = n1[1];
+                zfn[i] = n1[2];
+            }
+            else
+            {
+                xfn[i] = n2[0];
+                yfn[i] = n2[1];
+                zfn[i] = n2[2];
+            }
+            vnl  = xfn[i] * ul + yfn[i] * vl + zfn[i] * wl - vgn[i];
+            vnr  = xfn[i] * ur + yfn[i] * vr + zfn[i] * wr - vgn[i];
+            rvnl = rl * vnl;
+            rvnr = rr * vnr;
+
+            c2l   = gamal[i] * pl / rl;
+            cl    = sqrt( ABS(c2l) );
+            machl = vnl / cl;
+
+            c2r   = gamar[i] * pr / rr;
+            cr    = sqrt( ABS(c2r) );
+            machr = vnr / cr;
+
+            if ( machl > one )
+            {
+                fl[IR ] = rvnl;
+                fl[IRU] = rvnl * ul + xfn[i] * pl;
+                fl[IRV] = rvnl * vl + yfn[i] * pl;
+                fl[IRW] = rvnl * wl + zfn[i] * pl;
+                fl[IRE] = rvnl * hl + vgn[i] * pl;
+            }
+            else if ( machl < - one )
+            {
+                fl[IR ] = zero;
+                fl[IRU] = zero;
+                fl[IRV] = zero;
+                fl[IRW] = zero;
+                fl[IRE] = zero;
+            }
+            else
+            {
+                fmass      = 0.25 * rl * cl * ( machl + 1.0 ) * ( machl + 1.0 );
+                tmp        = ( - vnl + 2.0 * cl ) / gamal[i];
+                fl[IR ] = fmass;
+                fl[IRU] = fmass * ( ul + xfn[i] * tmp );
+                fl[IRV] = fmass * ( vl + yfn[i] * tmp );
+                fl[IRW] = fmass * ( wl + zfn[i] * tmp );
+                fl[IRE] = fmass * ( hl + vgn[i] * tmp );
+            }
+
+            for ( int m = nm; m < nl; ++ m )
+            {
+                fl[m] = priml[m] * fl[IR ];
+            }
+
+            //!Right contribution
+            if ( machr < - one )
+            {
+                fr[IR ] = rvnr                ;
+                fr[IRU] = rvnr * ur + xfn[i] * pr;
+                fr[IRV] = rvnr * vr + yfn[i] * pr;
+                fr[IRW] = rvnr * wr + zfn[i] * pr;
+                fr[IRE] = rvnr * hr + vgn[i] * pr;
+            }
+            else if ( machr > one )
+            {
+                fr[IR ] = zero;
+                fr[IRU] = zero;
+                fr[IRV] = zero;
+                fr[IRW] = zero;
+                fr[IRE] = zero;
+            }
+            else
+            {
+                fmass       = - 0.25 * rr * cr * ( machr - 1.0 ) * ( machr - 1.0 );
+                tmp         = ( - vnr - 2.0 * cr ) / gamar[i];
+                fr[IR ] = fmass                        ;
+                fr[IRU] = fmass * ( ur + xfn[i] * tmp );
+                fr[IRV] = fmass * ( vr + yfn[i] * tmp );
+                fr[IRW] = fmass * ( wr + zfn[i] * tmp );
+                fr[IRE] = fmass * ( hr + vgn[i] * tmp );
+            }
+
+            for ( int m = nm; m < nl; ++ m )
+            {
+                fr[m] = primr[m] * fr[IR ];
+            }
+
+            for ( int m = 0; m < nl; ++ m )
+            {
+                if (dir ==1 )
+                {
+                    flux[m][i]  = flux[m][i] + cos(angle1) * (fl[m] + fr[m]) ;
+                }
+                else
+                {
+                    flux[m][i]  = flux[m][i] + cos(angle2) * (fl[m] + fr[m]) ;
+                }
+            }
+        }
+    }
+
+    delete [] fl   ;
+    delete [] fr   ;
+    delete [] priml;
+    delete [] primr;
+}
+
+void Ausmdv_Scheme(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara)
+{
+    int nTemperatureModel = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar = invSchemePara->GetNumberOfLaminar();
+    int nLen = invSchemePara->GetLength();
+    int nm = invSchemePara->Getnm();
+    RDouble **ql = invSchemePara->GetLeftQ();
+    RDouble **qr = invSchemePara->GetRightQ();
+    RDouble **tl = invSchemePara->GetLeftTemperature();
+    RDouble **tr = invSchemePara->GetRightTemperature();
+
+    RDouble *gamal = invSchemePara->GetLeftGama();
+    RDouble *gamar = invSchemePara->GetRightGama();
+    RDouble *xfn = invSchemePara->GetFaceNormalX();
+    RDouble *yfn = invSchemePara->GetFaceNormalY();
+    RDouble *zfn = invSchemePara->GetFaceNormalZ();
+    RDouble *vgn = invSchemePara->GetFaceVelocity();
+    RDouble **flux = invSchemePara->GetFlux();
+    //! Compute the number of species.
+    int nChemical = invSchemePara->GetNumberOfChemical();
+    int nElectronIndex = invSchemePara->GetIndexOfElectron();
+
+    using namespace IDX;
+
+    RDouble *priml = new RDouble[nEquation];
+    RDouble *primr = new RDouble[nEquation];
+    RDouble temperaturesL[3], temperaturesR[3];
+
+    for (int iLen = 0; iLen < nLen; ++ iLen)
+    {
+        for (int iEqn = 0; iEqn < nEquation; ++ iEqn)
+        {
+            priml[iEqn] = ql[iEqn][iLen];
+            primr[iEqn] = qr[iEqn][iLen];
+        }
+
+        RDouble &rl = priml[IR];
+        RDouble &ul = priml[IU];
+        RDouble &vl = priml[IV];
+        RDouble &wl = priml[IW];
+        RDouble &pl = priml[IP];
+
+        RDouble &rr = primr[IR];
+        RDouble &ur = primr[IU];
+        RDouble &vr = primr[IV];
+        RDouble &wr = primr[IW];
+        RDouble &pr = primr[IP];
+
+        RDouble gama = half * (gamal[iLen] + gamar[iLen]);
+
+        RDouble hintLeft, hintRight;
+        RDouble v2l = ul * ul + vl * vl + wl * wl;
+        RDouble v2r = ur * ur + vr * vr + wr * wr;
+
+        for (int i = 0; i < 3; ++ i)
+        {
+            temperaturesL[i] = tl[i][iLen];
+            temperaturesR[i] = tr[i][iLen];
+        }
+        gas->ComputeEnthalpyByPrimitive(priml, gamal[iLen], hintLeft, temperaturesL);
+        gas->ComputeEnthalpyByPrimitive(primr, gamar[iLen], hintRight, temperaturesR);
+
+        RDouble peL = 0.0, peR = 0.0;
+        if (nChemical > 0 && nTemperatureModel > 1)
+        {
+            peL = gas->GetElectronPressure(priml, temperaturesL[ITE]);
+            peR = gas->GetElectronPressure(primr, temperaturesR[ITE]);
+        }
+
+        RDouble hl = hintLeft  + half * v2l;
+        RDouble hr = hintRight + half * v2r;
+
+        RDouble vnl = xfn[iLen] * ul + yfn[iLen] * vl + zfn[iLen] * wl - vgn[iLen];
+        RDouble vnr = xfn[iLen] * ur + yfn[iLen] * vr + zfn[iLen] * wr - vgn[iLen];
+
+        RDouble orl = 1.0 / (rl + SMALL);
+        RDouble orr = 1.0 / (rr + SMALL);
+
+        RDouble c2l =  gama * pl * orl;
+        RDouble c2r =  gama * pr * orr;
+
+        //! Here,the vn_l and vn_r are normal velocities in the inertial coordinate system.
+        //! vnl and vnr are normal velocities relative to the moving interface.
+        RDouble vn_l = vnl + vgn[iLen];
+        RDouble vn_r = vnr + vgn[iLen];
+
+        //! Fourth speed interface.
+        RDouble cl = sqrt(c2l);
+        RDouble cr = sqrt(c2r);
+        RDouble cm = MAX(cl,cr);
+        RDouble ocm = one / (cm + SMALL);
+
+        RDouble ssw = zero;
+        //! Determine shock switch.
+        if ((vnl > cl && vnr < cr) || (vnl > -cl && vnr < -cr))
+        {
+            ssw = one;
+        }
+        RDouble ssw_a = one - ssw;
+
+        //! Haenel / van Leer.
+        RDouble ml  =  vnl / cl;
+        RDouble mr  =  vnr / cr;
+
+        RDouble mla =  ABS(ml);
+        RDouble mra =  ABS(mr);
+
+        RDouble mpl, ppl, mmr, pmr;
+
+        RDouble mp1 = half * (ml + mla);
+        RDouble mm1 = half * (mr - mra);
+
+        if (mla >= one)
+        {
+            mpl = mp1;
+            ppl = half * (one + ml / (mla + SMALL));
+        }
+        else
+        {
+            RDouble tmp = fourth * SQR(ml + one);
+            mpl = tmp;
+            ppl = tmp * (two - ml);
+        }
+
+        if (mra >= one)
+        {
+            mmr = mm1;
+            pmr = half * (one - mr / (mra + SMALL));
+        }
+        else
+        {
+            RDouble tmp = fourth * SQR(mr - one);
+
+            mmr = - tmp;
+            pmr = tmp * (two + mr);
+        }
+
+        RDouble p12_v =  ppl * pl + pmr * pr;
+        RDouble pe12 = ppl * peL + pmr * peR;
+        RDouble rvnl_v = cl * rl * mpl;
+        RDouble rvnr_v = cr * rr * mmr;
+
+        //! AUSMDV.
+        ml    =  vnl * ocm;
+        mla   =  ABS(ml);
+
+        mr    =  vnr * ocm;
+        mra   =  ABS(mr);
+
+        mp1 = half * (ml + mla);
+        mm1 = half * (mr - mra);
+
+        RDouble r1  = pl * orl;
+        RDouble r2  = pr * orr;
+        RDouble r3  = two / (r1 + r2);
+        RDouble alphal = r1 * r3;
+        RDouble alphar = r2 * r3;
+
+        if (mla >= one)
+        {
+            mpl = mp1;
+            ppl = half * (one + ml / (mla + SMALL));
+        }
+        else
+        {
+            RDouble tmp = fourth * SQR(ml + one);
+
+            mpl = alphal * tmp + (one - alphal) * mp1;
+            ppl = tmp * (two - ml);
+        }
+
+        if (mra >= one)
+        {
+            mmr = mm1;
+            pmr = half * (one - mr / (mra + SMALL));
+        }
+        else
+        {
+            RDouble tmp = fourth * SQR(mr - one);
+            mmr = - alphar * tmp + (one - alphar) * mm1;
+            pmr = tmp * (two + mr);
+        }
+        RDouble rvnl_d = cm * rl * mpl;
+        RDouble rvnr_d = cm * rr * mmr;
+
+        RDouble rvn    = rvnl_d + rvnr_d;
+        rvnl_d = half * (rvn + ABS(rvn));
+        rvnr_d = half * (rvn - ABS(rvn));
+
+        RDouble rvnl = rvnl_v;
+        RDouble rvnr = rvnr_v;
+        RDouble p12  = p12_v ;
+
+        //! AUSMD/AUSMV switch.
+        RDouble kSwitch = 10.0, cEfix = 0.125;
+        RDouble s = half * MIN(static_cast <RDouble> (one), kSwitch * ABS(pr-pl) / MIN(pl,pr));
+
+        RDouble rvvn = ssw * (rvnl_v * vn_l + rvnr_v * vn_r);
+        rvvn += (half - s) * ssw_a *      (rvnl_d * vn_l +   rvnr_d * vn_r)
+              + (half + s) * ssw_a * cm * (rl * mpl * vn_l + rr * mmr * vn_r);
+
+        //! Entropy fix.
+        bool atmp = ((vnl - cl) < 0.0) && ((vnr - cr) > 0.0);
+        bool btmp = ((vnl + cl) < 0.0) && ((vnr + cr) > 0.0);
+
+        if ((atmp && !btmp) || (!atmp && btmp))
+        {
+            if (atmp && !btmp)
+            {
+                RDouble tmp   = ssw_a * cEfix * ((vnr - cr) - (vnl - cl));
+                rvnl += tmp * rl;
+                rvnr -= tmp * rr;
+            }
+            else
+            {
+                RDouble tmp   = ssw_a * cEfix * ((vnr + cr) - (vnl + cl));
+                rvnl += tmp * rl;
+                rvnr -= tmp * rr;
+            }
+        }
+
+        RDouble dul = ul - xfn[iLen] * vn_l;
+        RDouble dvl = vl - yfn[iLen] * vn_l;
+        RDouble dwl = wl - zfn[iLen] * vn_l;
+
+        RDouble dur = ur - xfn[iLen] * vn_r;
+        RDouble dvr = vr - yfn[iLen] * vn_r;
+        RDouble dwr = wr - zfn[iLen] * vn_r;
+
+        flux[IR ][iLen] = rvnl       + rvnr      ;
+        flux[IRU][iLen] = rvnl * dul + rvnr * dur;
+        flux[IRV][iLen] = rvnl * dvl + rvnr * dvr;
+        flux[IRW][iLen] = rvnl * dwl + rvnr * dwr;
+        flux[IRE][iLen] = rvnl * hl  + rvnr * hr ;
+
+        for (int iLaminar = nm; iLaminar < nLaminar; ++ iLaminar)
+        {
+            flux[iLaminar][iLen] = rvnl * priml[iLaminar] + rvnr * primr[iLaminar];
+        }
+       //! Compute the vibration-electron energy term.
+        for (int it = 1; it < nTemperatureModel; ++ it)
+        {
+            flux[nLaminar + it][iLen] = rvnl * priml[nLaminar + it] + rvnr * primr[nLaminar + it];
+        }
+        if (nChemical == 1)
+        {
+            flux[nLaminar + nTemperatureModel - 1][iLen] += peL * vnl + peR * vnr + pe12 * vgn[iLen];
+        }
+
+        rvvn += p12;
+
+        flux[IRU][iLen] += rvvn * xfn[iLen];
+        flux[IRV][iLen] += rvvn * yfn[iLen];
+        flux[IRW][iLen] += rvvn * zfn[iLen];
+        flux[IRE][iLen] += p12  * vgn[iLen];
+
+        if (nChemical > 0)
+        {
+            flux[nLaminar][iLen] = 0.0;
+            if (nElectronIndex >= 0)
+            {
+                flux[nLaminar - 1][iLen] = 0.0;
+            }
+        }
+    }
+
+    delete []priml;
+    delete []primr;
+
+}
+
+void Ausmpw_Scheme(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara)
+{
+    int nTemperatureModel = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar = invSchemePara->GetNumberOfLaminar();
+    int nLen = invSchemePara->GetLength();
+    int nm = invSchemePara->Getnm();
+    //! Compute the number of species.
+    int nChemical = invSchemePara->GetNumberOfChemical();
+    int nElectronIndex = invSchemePara->GetIndexOfElectron();
+
+    RDouble **ql = invSchemePara->GetLeftQ();
+    RDouble **qr = invSchemePara->GetRightQ();
+    RDouble *gamal = invSchemePara->GetLeftGama();
+    RDouble *gamar = invSchemePara->GetRightGama();
+    RDouble *xfn   = invSchemePara->GetFaceNormalX();
+    RDouble *yfn   = invSchemePara->GetFaceNormalY();
+    RDouble *zfn   = invSchemePara->GetFaceNormalZ();
+    RDouble *vgn   = invSchemePara->GetFaceVelocity();
+    RDouble **flux = invSchemePara->GetFlux();
+    RDouble **tl = invSchemePara->GetLeftTemperature();
+    RDouble **tr = invSchemePara->GetRightTemperature();
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble *priml = new RDouble[nEquation];
+    RDouble *primr = new RDouble[nEquation];
+    RDouble temperaturesL[3], temperaturesR[3];
+
+    for (int iLen = 0; iLen < nLen; ++ iLen)
+    {
+        for (int iEqn = 0; iEqn < nEquation; ++ iEqn)
+        {
+            priml[iEqn] = ql[iEqn][iLen];
+            primr[iEqn] = qr[iEqn][iLen];
+        }
+
+        RDouble &rl = priml[IR];
+        RDouble &ul = priml[IU];
+        RDouble &vl = priml[IV];
+        RDouble &wl = priml[IW];
+        RDouble &pl = priml[IP];
+
+        RDouble &rr = primr[IR];
+        RDouble &ur = primr[IU];
+        RDouble &vr = primr[IV];
+        RDouble &wr = primr[IW];
+        RDouble &pr = primr[IP];
+
+        RDouble v2l = ul * ul + vl * vl + wl * wl;
+        RDouble v2r = ur * ur + vr * vr + wr * wr;
+
+        RDouble hint_l, hint_r;
+        for (int i = 0; i < 3; ++ i)
+        {
+            temperaturesL[i] = tl[i][iLen];
+            temperaturesR[i] = tr[i][iLen];
+        }
+        gas->ComputeEnthalpyByPrimitive(priml, gamal[iLen], hint_l, temperaturesL);
+        gas->ComputeEnthalpyByPrimitive(primr, gamar[iLen], hint_r, temperaturesR);
+
+        RDouble peL = 0.0, peR = 0.0;
+        if (nChemical > 0 && nTemperatureModel > 1)
+        {
+            peL = gas->GetElectronPressure(priml, temperaturesL[ITE]);
+            peR = gas->GetElectronPressure(primr, temperaturesR[ITE]);
+        }
+
+        RDouble hl  = hint_l + half * v2l;
+        RDouble hr  = hint_r + half * v2r;
+
+        RDouble vnl  = xfn[iLen] * ul + yfn[iLen] * vl + zfn[iLen] * wl - vgn[iLen];
+        RDouble vnr  = xfn[iLen] * ur + yfn[iLen] * vr + zfn[iLen] * wr - vgn[iLen];
+
+        RDouble orl = 1.0 / (rl + SMALL);
+        RDouble orr = 1.0 / (rr + SMALL);
+
+        RDouble c2l = gamal[iLen] * pl * orl;
+        RDouble c2r = gamar[iLen] * pr * orr;
+        RDouble cl  = sqrt(c2l);
+        RDouble cr  = sqrt(c2r);
+        RDouble cm  = half * (cl + cr);
+
+        RDouble ocm = one / (cm + SMALL);
+
+        RDouble ml  =  vnl * ocm;
+        RDouble mr  =  vnr * ocm;
+
+        RDouble fm4ml = FMSplit4(ml, zero,  one);
+        RDouble fm4mr = FMSplit4(mr, zero, -one);
+
+        RDouble fp5ml = FPSplit5(ml, zero,  one);
+        RDouble fp5mr = FPSplit5(mr, zero, -one);
+
+        RDouble m12  = fm4ml + fm4mr;
+        RDouble p12  = fp5ml * pl + fp5mr * pr;
+        RDouble pe12 = fp5ml * peL + fp5mr * peR;
+
+        RDouble minplr = MIN(pl / (pr + SMALL), pr / (pl + SMALL));
+        RDouble fw     = one - minplr * minplr * minplr;
+
+        RDouble op12 = one / (p12 + SMALL);
+
+        RDouble fl = zero;
+        RDouble fr = zero;
+
+        if (ABS(ml) < one)
+        {
+            fl = pl * op12 - one;
+        }
+
+        if (ABS(mr) < one)
+        {
+            fr = pr * op12 - one;
+        }
+
+        RDouble mpl, mmr;
+        if (m12 >= zero)
+        {
+            RDouble one_fr = one + fr;
+            mpl = fm4ml + fm4mr * ((one - fw) * one_fr - fl);
+            mmr = fm4mr * fw * one_fr;
+        }
+        else
+        {
+            RDouble one_fl = one + fl;
+            mpl = fm4ml * fw * one_fl;
+            mmr = fm4mr + fm4ml * ((one - fw) * one_fl - fr);
+        }
+
+        flux[IR ][iLen] = cm * (mpl*rl    + mmr*rr );
+        flux[IRU][iLen] = cm * (mpl*rl*ul + mmr*rr*ur) + p12 * xfn[iLen];
+        flux[IRV][iLen] = cm * (mpl*rl*vl + mmr*rr*vr) + p12 * yfn[iLen];
+        flux[IRW][iLen] = cm * (mpl*rl*wl + mmr*rr*wr) + p12 * zfn[iLen];
+        flux[IRE][iLen] = cm * (mpl*rl*hl + mmr*rr*hr) + p12 * vgn[iLen];
+
+        for (int iLaminar = nm; iLaminar < nLaminar; ++ iLaminar)
+        {
+            flux[iLaminar][iLen] = cm * (mpl*rl*priml[iLaminar] + mmr*rr*primr[iLaminar]);
+        }
+
+        //! Compute vibration-electron energy term.
+        for (int it = 1; it < nTemperatureModel; ++ it)
+        {
+            flux[nLaminar + it][iLen] = cm * (mpl*rl*priml[nLaminar + it] + mmr*rr*primr[nLaminar + it]);
+        }
+        if (nChemical == 1)
+        {
+            flux[nLaminar + nTemperatureModel - 1][iLen] += cm * (mpl*peL + mmr*peR) + pe12 * vgn[iLen];
+        }
+
+        if (nChemical > 0)
+        {
+            flux[nLaminar][iLen] = 0.0;
+            if (nElectronIndex >= 0)
+            {
+                flux[nLaminar - 1][iLen] = 0.0;
+            }
+        }
+    }
+    delete []priml;
+    delete []primr;
+}
+
+void AusmpwPlus_Scheme(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara)
+{
+    int nTemperatureModel = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar = invSchemePara->GetNumberOfLaminar();
+    int nLen = invSchemePara->GetLength();
+    int nm = invSchemePara->Getnm();
+    //! Compute the number of species.
+    int nChemical = invSchemePara->GetNumberOfChemical();
+    int nElectronIndex = invSchemePara->GetIndexOfElectron();
+    RDouble AusmpwPlusLimiter = invSchemePara->GetAusmpwPlusLimiter();
+
+    RDouble **ql = invSchemePara->GetLeftQ();
+    RDouble **qr = invSchemePara->GetRightQ();
+    RDouble *gamal = invSchemePara->GetLeftGama();
+    RDouble *gamar = invSchemePara->GetRightGama();
+    RDouble *xfn   = invSchemePara->GetFaceNormalX();
+    RDouble *yfn   = invSchemePara->GetFaceNormalY();
+    RDouble *zfn   = invSchemePara->GetFaceNormalZ();
+    RDouble *vgn   = invSchemePara->GetFaceVelocity();
+    RDouble **flux = invSchemePara->GetFlux();
+    RDouble **tl = invSchemePara->GetLeftTemperature();
+    RDouble **tr = invSchemePara->GetRightTemperature();
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble *priml = new RDouble[nEquation];
+    RDouble *primr = new RDouble[nEquation];
+    RDouble temperaturesL[3], temperaturesR[3];
+
+    for (int iLen = 0; iLen < nLen; ++ iLen)
+    {
+        for (int iEqn = 0; iEqn < nEquation; ++ iEqn)
+        {
+            priml[iEqn] = ql[iEqn][iLen];
+            primr[iEqn] = qr[iEqn][iLen];
+        }
+
+        RDouble &rl = priml[IR];
+        RDouble &ul = priml[IU];
+        RDouble &vl = priml[IV];
+        RDouble &wl = priml[IW];
+        RDouble &pl = priml[IP];
+
+        RDouble &rr = primr[IR];
+        RDouble &ur = primr[IU];
+        RDouble &vr = primr[IV];
+        RDouble &wr = primr[IW];
+        RDouble &pr = primr[IP];
+
+        RDouble v2l = ul * ul + vl * vl + wl * wl;
+        RDouble v2r = ur * ur + vr * vr + wr * wr;
+
+        RDouble hint_l, hint_r;
+        for (int i = 0; i < 3; ++ i)
+        {
+            temperaturesL[i] = tl[i][iLen];
+            temperaturesR[i] = tr[i][iLen];
+        }
+        gas->ComputeEnthalpyByPrimitive(priml, gamal[iLen], hint_l, temperaturesL);
+        gas->ComputeEnthalpyByPrimitive(primr, gamar[iLen], hint_r, temperaturesR);
+
+        RDouble peL = 0.0, peR = 0.0;
+        if (nChemical > 0 && nTemperatureModel > 1)
+        {
+            peL = gas->GetElectronPressure(priml, temperaturesL[ITE]);
+            peR = gas->GetElectronPressure(primr, temperaturesR[ITE]);
+        }
+
+        RDouble hl  = hint_l + half * v2l;
+        RDouble hr  = hint_r + half * v2r;
+
+
+
+        //RDouble gama2l = (gamal[iLen] - 1.0)/(gamal[iLen] + 1.0);
+        //RDouble gama2r = (gamar[iLen] - 1.0)/(gamar[iLen] + 1.0);
+        //RDouble cs  = half * ABS((gama2l + gama2r) * (hl + hr));             //!!!!
+        //RDouble c12;
+        //if (vnl + vnr > 0.0)
+        //{
+        //    c12 = cs / max(abs(vnl), sqrt(cs));
+        //}
+        //else
+        //{
+        //    c12 = cs / max(abs(vnr), sqrt(cs));
+        //}
+
+
+        RDouble al = sqrt(gamal[iLen] * (pl / (rl + SMALL)));
+        RDouble ar = sqrt(gamar[iLen] * (pr / (rr + SMALL)));
+
+        
+        RDouble vnl= xfn[iLen] * ul + yfn[iLen] * vl + zfn[iLen] * wl - vgn[iLen];
+        RDouble vnr= xfn[iLen] * ur + yfn[iLen] * vr + zfn[iLen] * wr - vgn[iLen];
+        RDouble ml= abs(vnl / al);
+        RDouble mr= abs(vnr / ar);
+
+        RDouble minplr = MIN(pl / (pr + SMALL), pr / (pl + SMALL));
+
+        RDouble c12, ocm;
+
+        /*if( minplr < 0.5 && (( ml > 1.0 && mr < 1.0 ) || ( mr > 1.0 && ml < 1.0 )) )
+        {
+            c12 = max(sqrt(abs(vnl * vnr)), min(al, ar));
+
+            if (vnl + vnr > 0.0)
+            {
+                c12 *= c12 / max(abs(vnl), c12);
+            }
+            else
+            {
+                c12 *= c12 / max(abs(vnr), c12);
+            }
+        }
+        else
+        {*/
+            c12 = half * (al + ar);
+        //}
+
+        //if( minplr < 0.5)
+        //{
+        //    RDouble du = ur - ul;
+        //    RDouble dv = vr - vl;
+        //    RDouble dw = wr - wl;
+        //    
+        //    c12 = max(sqrt(du * du + dv * dv + dw * dw), SMALL);
+        //    if(xfn[iLen] * du + yfn[iLen] * du + zfn[iLen] * du < 0.0)
+        //    {
+        //        c12 = -c12;
+        //        du /= c12;
+        //        dv /= c12;
+        //        dw /= c12;
+        //    }
+        //    else
+        //    {
+        //        du /= c12;
+        //        dv /= c12;
+        //        dw /= c12;
+        //    }
+
+        //    vnl  = du * ul + dv * vl + dw * wl - vgn[iLen];
+        //    vnr  = du * ur + dv * vr + dw * wr - vgn[iLen];
+
+        //    ml = abs(vnl / al);
+        //    mr = abs(vnr / ar);
+
+        //    if(( ml > 1.0 && mr < 1.0 ) || ( mr > 1.0 && ml < 1.0 ))
+        //    {
+        //        c12 = max(sqrt(abs(vnl * vnr)), min(al, ar));
+        //        if (vnl + vnr > 0.0)
+        //        {
+        //            c12 *= c12 / max(abs(vnl), c12);
+        //        }
+        //        else
+        //        {
+        //            c12 *= c12 / max(abs(vnr), c12);
+        //        }
+        //    }
+        //    else
+        //    {
+        //        c12 = half * (al + ar);
+        //    }
+        //}
+        //else
+        //{
+        //    c12 = half * (al + ar);
+        //}
+
+        //vnl  = xfn[iLen] * ul + yfn[iLen] * vl + zfn[iLen] * wl - vgn[iLen];
+        //vnr  = xfn[iLen] * ur + yfn[iLen] * vr + zfn[iLen] * wr - vgn[iLen];
+
+
+       // RDouble du = ur - ul;
+       // RDouble dv = vr - vl;
+       // RDouble dw = wr - wl;
+       // c12 = max(sqrt(du * du + dv * dv + dw * dw), SMALL);
+       // if(xfn[iLen] * du + yfn[iLen] * du + zfn[iLen] * du < 0.0)
+       // {
+       //     c12 = -c12;
+       // }
+       // du /= c12;
+       // dv /= c12;
+       // dw /= c12;
+       // 
+       // vnl  = du * ul + dv * vl + dw * wl - vgn[iLen];
+       // vnr  = du * ur + dv * vr + dw * wr - vgn[iLen];
+
+       // ml = abs(vnl / al);
+       // mr = abs(vnr / ar);
+
+       //if(( ml > 1.0 && mr < 1.0 ) || ( mr > 1.0 && ml < 1.0 ))
+       // {
+       //     c12 = max(sqrt(abs(vnl * vnr)), min(al, ar));
+       //     if (vnl + vnr > 0.0)
+       //     {
+       //         c12 *= c12 / max(abs(vnl), c12);
+       //     }
+       //     else
+       //     {
+       //         c12 *= c12 / max(abs(vnr), c12);
+       //     }
+       // }
+       // else
+       // {
+       //     c12 = half * (al + ar);
+       // }
+
+       // vnl  = xfn[iLen] * ul + yfn[iLen] * vl + zfn[iLen] * wl - vgn[iLen];
+       // vnr  = xfn[iLen] * ur + yfn[iLen] * vr + zfn[iLen] * wr - vgn[iLen];
+
+        ocm = 1.0 / c12;
+
+        ml  =  vnl * ocm;
+        mr  =  vnr * ocm;
+
+        RDouble fm4ml = FMmpn(ml, one);
+        RDouble fm4mr = FMmpn(mr, -one);
+
+        RDouble fp5ml = FMppn(ml, one);
+        RDouble fp5mr = FMppn(mr, -one);
+
+        RDouble m12  = fm4ml + fm4mr;
+        RDouble p12  = fp5ml * pl + fp5mr * pr;
+        RDouble pe12 = fp5ml * peL + fp5mr * peR;
+
+        
+        RDouble fw     = one - minplr * minplr * minplr * AusmpwPlusLimiter;
+
+        RDouble op12 = one / (p12 + SMALL);
+
+        RDouble fl = zero;
+        RDouble fr = zero;
+
+        if (p12 != 0.0)
+        {
+            if (ABS(ml) <= one)
+            {
+                fl = pl * op12 - one;
+            }
+
+            if (ABS(mr) <= one)
+            {
+                fr = pr * op12 - one;
+            }
+        }
+
+        RDouble mpl, mmr;
+        if (m12 >= zero)
+        {
+            RDouble one_fr = one + fr;
+            mpl = fm4ml + fm4mr * ((one - fw) * one_fr - fl);
+            mmr = fm4mr * fw * one_fr;
+        }
+        else
+        {
+            RDouble one_fl = one + fl;
+            mpl = fm4ml * fw * one_fl;
+            mmr = fm4mr + fm4ml * ((one - fw) * one_fl - fr);
+        }
+
+        flux[IR ][iLen] = c12 * (mpl * rl      + mmr * rr);
+        flux[IRU][iLen] = c12 * (mpl * rl * ul + mmr * rr * ur) + p12 * xfn[iLen];
+        flux[IRV][iLen] = c12 * (mpl * rl * vl + mmr * rr * vr) + p12 * yfn[iLen];
+        flux[IRW][iLen] = c12 * (mpl * rl * wl + mmr * rr * wr) + p12 * zfn[iLen];
+        flux[IRE][iLen] = c12 * (mpl * rl * hl + mmr * rr * hr) + p12 * vgn[iLen];
+
+        for (int iLaminar = nm; iLaminar < nLaminar; ++ iLaminar)
+        {
+            flux[iLaminar][iLen] = c12 * (mpl * rl * priml[iLaminar] + mmr * rr * primr[iLaminar]);
+        }
+
+        //! Compute vibration-electron energy term.
+        for (int it = 1; it < nTemperatureModel; ++ it)
+        {
+            flux[nLaminar + it][iLen] = c12 * (mpl * rl * priml[nLaminar + it] + mmr * rr * primr[nLaminar + it]);
+        }
+        if (nChemical == 1)
+        {
+            flux[nLaminar + nTemperatureModel - 1][iLen] += c12 * (mpl * peL + mmr * peR) + pe12 * vgn[iLen];
+        }
+
+        if (nChemical > 0)
+        {
+            flux[nLaminar][iLen] = 0.0;
+            if (nElectronIndex >= 0)
+            {
+                flux[nLaminar - 1][iLen] = 0.0;
+            }
+        }
+    }
+    delete []priml;
+    delete []primr;
+}
+
+void Hlle_Scheme(FaceProxy *face_proxy, InviscidSchemeParameter *invSchemePara)
+{
+    int nTemperatureModel = invSchemePara->GetNumberOfTemperatureModel();
+    int nEquation = invSchemePara->GetNumberOfTotalEquation();
+    int nLaminar = invSchemePara->GetNumberOfLaminar();
+    int nLen = invSchemePara->GetLength();
+    int nm = invSchemePara->Getnm();
+    //! Compute the number of species.
+    int nChemical = invSchemePara->GetNumberOfChemical();
+    int nElectronIndex = invSchemePara->GetIndexOfElectron();
+
+    RDouble **ql = invSchemePara->GetLeftQ();
+    RDouble **qr = invSchemePara->GetRightQ();
+    RDouble *gamal = invSchemePara->GetLeftGama();
+    RDouble *gamar = invSchemePara->GetRightGama();
+    RDouble *xfn   = invSchemePara->GetFaceNormalX();
+    RDouble *yfn   = invSchemePara->GetFaceNormalY();
+    RDouble *zfn   = invSchemePara->GetFaceNormalZ();
+    RDouble *vgn   = invSchemePara->GetFaceVelocity();
+    RDouble **flux = invSchemePara->GetFlux();
+    RDouble **tl = invSchemePara->GetLeftTemperature();
+    RDouble **tr = invSchemePara->GetRightTemperature();
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble *qcsvl = new RDouble[nEquation];
+    RDouble *qcsvr = new RDouble[nEquation];
+    RDouble *fl    = new RDouble[nEquation];
+    RDouble *fr    = new RDouble[nEquation];
+
+    RDouble *priml = new RDouble[nEquation];
+    RDouble *primr = new RDouble[nEquation];
+    RDouble temperaturesL[3], temperaturesR[3];
+
+    for (int iLen = 0; iLen < nLen; ++ iLen)
+    {
+        for (int iEqn = 0; iEqn < nEquation; ++ iEqn)
+        {
+            priml[iEqn] = ql[iEqn][iLen];
+            primr[iEqn] = qr[iEqn][iLen];
+        }
+
+        RDouble &rl = priml[IR];
+        RDouble &ul = priml[IU];
+        RDouble &vl = priml[IV];
+        RDouble &wl = priml[IW];
+        RDouble &pl = priml[IP];
+
+        RDouble &rr = primr[IR];
+        RDouble &ur = primr[IU];
+        RDouble &vr = primr[IV];
+        RDouble &wr = primr[IW];
+        RDouble &pr = primr[IP];
+
+        RDouble v2l = ul * ul + vl * vl + wl * wl;
+        RDouble v2r = ur * ur + vr * vr + wr * wr;
+
+        RDouble hint_l, hint_r;
+        for (int i = 0; i < 3; ++ i)
+        {
+            temperaturesL[i] = tl[i][iLen];
+            temperaturesR[i] = tr[i][iLen];
+        }
+        gas->ComputeEnthalpyByPrimitive(priml, gamal[iLen], hint_l, temperaturesL);
+        gas->ComputeEnthalpyByPrimitive(primr, gamar[iLen], hint_r, temperaturesR);
+
+        RDouble hl  = hint_l + half * v2l;
+        RDouble hr  = hint_r + half * v2r;
+
+        RDouble ratio = sqrt(rr / rl);
+        RDouble coef  = 1.0 / (1.0 + ratio);
+
+        RDouble rm = sqrt(rl * rr);
+        RDouble um = (ul + ur * ratio) * coef;
+        RDouble vm = (vl + vr * ratio) * coef;
+        RDouble wm = (wl + wr * ratio) * coef;
+        RDouble pm = (pl + pr * ratio) * coef;
+        
+        RDouble gama  = (gamal[iLen] + gamar[iLen] * ratio) * coef;
+
+        RDouble vnl  = xfn[iLen] * ul + yfn[iLen] * vl + zfn[iLen] * wl - vgn[iLen];
+        RDouble vnr  = xfn[iLen] * ur + yfn[iLen] * vr + zfn[iLen] * wr - vgn[iLen];
+        RDouble rvnl = rl * vnl;
+        RDouble rvnr = rr * vnr;
+
+        RDouble vn   = xfn[iLen] * um + yfn[iLen] * vm + zfn[iLen] * wm - vgn[iLen];
+        RDouble cl   = sqrt(gamal[iLen] * pl / (rl + SMALL));
+        RDouble cr   = sqrt(gamar[iLen] * pr / (rr + SMALL));
+        RDouble cm   = sqrt(gama     * pm / (rm + SMALL));
+
+        fl[IR ] = rvnl                      ;
+        fl[IRU] = rvnl * ul + xfn[iLen] * pl;
+        fl[IRV] = rvnl * vl + yfn[iLen] * pl;
+        fl[IRW] = rvnl * wl + zfn[iLen] * pl;
+        fl[IRE] = rvnl * hl + vgn[iLen] * pl;
+
+        fr[IR ] = rvnr                      ;
+        fr[IRU] = rvnr * ur + xfn[iLen] * pr;
+        fr[IRV] = rvnr * vr + yfn[iLen] * pr;
+        fr[IRW] = rvnr * wr + zfn[iLen] * pr;
+        fr[IRE] = rvnr * hr + vgn[iLen] * pr;
+
+        for (int iLaminar = nm; iLaminar < nLaminar; ++ iLaminar)
+        {
+            fl[iLaminar] = priml[iLaminar] * fl[IR];
+            fr[iLaminar] = primr[iLaminar] * fr[IR];
+        }
+
+        if (nTemperatureModel > 1)
+        {
+            gas->GetTemperature(priml, temperaturesL[ITT], temperaturesL[ITV], temperaturesL[ITE]);
+            gas->GetTemperature(primr, temperaturesR[ITT], temperaturesR[ITV], temperaturesR[ITE]);
+        }
+        gas->Primitive2Conservative(priml, gamal[iLen], temperaturesL[ITV], temperaturesL[ITE], qcsvl);
+        gas->Primitive2Conservative(primr, gamar[iLen], temperaturesR[ITV], temperaturesR[ITE], qcsvr);
+
+        //! Compute vibration-electron energy term.
+        for (int it = 1; it < nTemperatureModel; ++ it)
+        {
+            fl[nLaminar + it] = priml[nLaminar + it] * fl[IR];
+            fr[nLaminar + it] = primr[nLaminar + it] * fr[IR];
+        }
+        RDouble peL = 0.0, peR = 0.0;
+        if (nChemical > 0 && nTemperatureModel > 1)
+        {
+            peL = gas->GetElectronPressure(priml, temperaturesL[ITE]);
+            peR = gas->GetElectronPressure(primr, temperaturesR[ITE]);
+            fl[nLaminar + nTemperatureModel - 1] += peL * (vnl + vgn[iLen]);
+            fr[nLaminar + nTemperatureModel - 1] += peR * (vnr + vgn[iLen]);
+        }
+
+        RDouble bm = MIN(static_cast<RDouble>(zero), MIN(vn - cm, vnl - cl));
+        RDouble bp = MAX(static_cast<RDouble>(zero), MAX(vn + cm, vnr + cr));
+    
+        RDouble c1 = bp * bm / (bp - bm + SMALL);
+        RDouble c2 = - half * (bp + bm) / (bp - bm + SMALL);
+
+        for (int iLaminar = 0; iLaminar < nEquation; ++ iLaminar)
+        {
+            flux[iLaminar][iLen] = half * (fl[iLaminar]    + fr[iLaminar]) 
+                              + c1   * (qcsvr[iLaminar] - qcsvl[iLaminar]) 
+                              + c2   * (fr[iLaminar]    - fl[iLaminar]);
+        }
+        if (nChemical == 1)
+        {
+            flux[nLaminar][iLen] = 0.0;
+            if (nElectronIndex >= 0)
+            {
+                flux[nLaminar - 1][iLen] = 0.0;
+            }
+        }
+    }
+
+    delete []qcsvl;
+    delete []qcsvr;
+    delete []fl;
+    delete []fr;
+    delete []priml;
+    delete []primr;
+}
+
+RDouble FMSplit1(const RDouble &mach, const RDouble &ipn)
+{
+    return half * (mach + ipn * ABS(mach));
+}
+
+RDouble FMSplit2(const RDouble &mach, const RDouble &ipn)
+{
+    return ipn * fourth * SQR(mach + ipn);
+}
+
+RDouble FMmpn(const RDouble &mach, const RDouble &ipn)
+{
+    if (ABS(mach) >= one)
+    {
+        return FMSplit1(mach,ipn);
+    }
+    return FMSplit2(mach,ipn);
+}
+
+RDouble FMppn(const RDouble &mach, const RDouble &ipn)
+{
+    RDouble macha = ABS(mach);
+    if (macha >= one)
+    {
+        return  FMSplit1(mach,ipn) / mach ;
+    }
+
+    return FMSplit2(mach,ipn) * ((two * ipn - mach));
+}
+
+RDouble FMSplit4(const RDouble &mach, const RDouble &beta, const RDouble &ipn)
+{
+    if (ABS(mach) >= one)
+    {
+        return FMSplit1(mach,ipn);
+    }
+    return FMSplit2(mach,ipn) * (one - ipn * sixteen * beta * FMSplit2(mach,-ipn));
+}
+
+RDouble FPSplit5(const RDouble &mach, const RDouble &alpha, const RDouble &ipn)
+{
+    RDouble macha = ABS(mach);
+    if (macha >= one)
+    {
+        return  FMSplit1(mach,ipn) / mach ;
+    }
+
+    return FMSplit2(mach,ipn) * ((two * ipn - mach) - ipn * sixteen * alpha * mach * FMSplit2(mach,-ipn));
+}
+
+void RoeAveragedVariables(RDouble rhoLeft, RDouble uLeft, RDouble vLeft, RDouble wLeft, RDouble pLeft, RDouble gamaLeft, 
+                          RDouble rhoRight, RDouble uRight, RDouble vRight, RDouble wRight, RDouble pRight, RDouble gamaRight,
+                          RDouble &rhoRoe, RDouble &uRoe, RDouble &vRoe, RDouble &wRoe, RDouble &pRoe)
+{
+    RDouble hLeft  = gamaLeft  / (gamaLeft  - 1.0) * pLeft / rhoLeft + half * (uLeft * uLeft + vLeft * vLeft + wLeft * wLeft);
+    RDouble hRight  = gamaRight / (gamaRight - 1.0) * pRight / rhoRight + half * (uRight * uRight + vRight * vRight + wRight * wRight);
+
+    RDouble tmp0 = sqrt(rhoRight / rhoLeft);
+    RDouble tmp1 = 1.0 / (1.0 + tmp0);
+
+    RDouble rm = sqrt(rhoRight * rhoLeft);
+    RDouble um = (uLeft + uRight * tmp0) * tmp1;
+    RDouble vm = (vLeft + vRight * tmp0) * tmp1;
+    RDouble wm = (wLeft + wRight * tmp0) * tmp1;
+    RDouble hm = (hLeft + hRight * tmp0) * tmp1;
+    RDouble pm = rm * (hm - half * SQR(um, vm, wm)) * (gamaLeft  - 1.0) / gamaLeft;
+
+    rhoRoe = rm;
+    uRoe = um;
+    vRoe = vm;
+    wRoe = wm;
+    pRoe = pm;
+}
+
+
+
+InviscidSchemeParameter::InviscidSchemeParameter()
+{
+    gamal = 0;
+    gamar = 0;
+
+    lrtl = 0;
+    lrtr = 0;
+
+    tcl = 0;
+    tcr = 0;
+
+    pcl = 0;
+    pcr = 0;
+
+    tl   = 0;
+    tr   = 0;
+
+    ql   = 0;
+    qr   = 0;
+    flux = 0;
+
+    qlc  = 0; // GMRESPassQC
+    qrc  = 0; // GMRESPassQC
+
+    xfn  = 0;
+    yfn  = 0;
+    zfn  = 0;
+    area = 0;
+    vgn  = 0;
+
+    // GMRESnolim
+    xfc  = 0;
+    yfc  = 0;
+    zfc  = 0;
+    xcc  = 0;
+    ycc  = 0;
+    zcc  = 0;
+    dqdx = 0;
+    dqdy = 0;
+    dqdz = 0;
+    nsx  = 0;
+    nsy  = 0;
+    nsz  = 0;
+    ns   = 0;
+    vol  = 0;
+    prim = 0;
+    gama = 0;
+    neighborCells = 0;
+    neighborFaces = 0;
+    neighborLR    = 0;
+    qlsign        = 0;
+    qrsign        = 0;
+
+    unstructBCSet = 0; //GMRES3D
+
+}
+
+InviscidSchemeParameter::~InviscidSchemeParameter()
+{
+    //! Do not free, since these pointers are not allocated by this class.
+}
+
+
+
+
+}
+
diff --git a/API/Physics/src/Flux_RoeEntropyCorrection.cpp b/API/Physics/src/Flux_RoeEntropyCorrection.cpp
new file mode 100644
index 0000000..3b6f71e
--- /dev/null
+++ b/API/Physics/src/Flux_RoeEntropyCorrection.cpp
@@ -0,0 +1,173 @@
+#include "Flux_RoeEntropyCorrection.h"
+#include "Constants.h"
+#include "TK_Exit.h"
+
+namespace PHSPACE
+{
+// GMRESAD
+#ifdef USE_GMRESSOLVER
+template <typename T>
+LIB_EXPORT void Flux_RoeEntropyCorrection(T &eigv1, T &eigv2, T &eigv3, T pressureCoeffL, T pressureCoeffR, 
+										  T absVel, T vn, T cm, int RoeEntropyCorrectionMethod, T acousticEigenLimit, T convectEigenLimit)
+{
+    //! eigv1,2,3: The three eigenvalue, which are V/V+c/V-c on the face.
+	if (RoeEntropyCorrectionMethod == 1)
+    {
+        T maxEigvalue = MAX(eigv2, eigv3);
+        T tmp0 = maxEigvalue * acousticEigenLimit;
+        T tmp1 = maxEigvalue * acousticEigenLimit;
+        eigv1 = MAX(tmp0, eigv1);
+        eigv2 = MAX(tmp1, eigv2);
+        eigv3 = MAX(tmp1, eigv3);
+    }    
+    else if (RoeEntropyCorrectionMethod == 2)
+    {
+        //! From JCP,1995,Lin H-C
+        T k1 = 0.25;
+        T k2 = 5.0;
+        T k3 = 15.0;
+
+        T pressureSensorOnface = max(pressureCoeffL, pressureCoeffR);
+        T limitEigv1 = (abs(vn) + cm) * k3 * pressureSensorOnface;
+        T limitEigv2 = (abs(vn) + cm) * (k1 + k2 * pressureSensorOnface);
+        T limitEigv3 = limitEigv2;
+
+        eigv1 = Harten(eigv1, limitEigv1);
+        eigv2 = Harten(eigv2, limitEigv2);
+        eigv3 = Harten(eigv3, limitEigv3);
+    }
+    else if (RoeEntropyCorrectionMethod == 3)
+    {
+        //! 3: Harten type.
+        T maxEigenValue = abs(vn) + cm;
+        T acousticEigenvalueLimit  = acousticEigenLimit * maxEigenValue;
+        T convectiveEigenvalueLimit= convectEigenLimit * maxEigenValue;
+
+        eigv1 = Harten(eigv1, convectiveEigenvalueLimit);
+        eigv2 = Harten(eigv2, acousticEigenvalueLimit);
+        eigv3 = Harten(eigv3, acousticEigenvalueLimit);
+    }
+    else if (RoeEntropyCorrectionMethod == 4)
+    {
+        //! 4: Method in Ustar
+        T maxEigvalue = max(eigv2, eigv3);
+
+        T ratio = min(one, fabs(vn) / cm);  
+        T tmp0 = min(maxEigvalue * acousticEigenLimit * ratio, maxEigvalue * acousticEigenLimit / 100.0);
+        T tmp1 = min(maxEigvalue * acousticEigenLimit * ratio, maxEigvalue * acousticEigenLimit / 100.0);
+
+        eigv1 = max(tmp0, eigv1);
+        eigv2 = max(tmp1, eigv2);
+        eigv3 = max(tmp1, eigv3);
+    }
+    else if (RoeEntropyCorrectionMethod == 5)
+    {
+        //! Otero, AIAA 2014-2094.
+        T maxEigvalue = max(eigv2, eigv3);
+        T delta = maxEigvalue * acousticEigenLimit;
+
+        eigv1 += delta;
+        eigv2 += delta;
+        eigv3 += delta;
+    }
+    else if (RoeEntropyCorrectionMethod == 6)
+    {
+        // for arbitary grid type, based on the shock wave detector and the absolute velocity V + sound speed C
+		T pressureSensorOnface = min(pressureCoeffL, pressureCoeffR);
+		T limitEig = (one - pressureSensorOnface) * (absVel + cm) + 0.0001 * cm;
+
+		eigv1 = Harten(eigv1, limitEig);
+		eigv2 = Harten(eigv2, limitEig);
+		eigv3 = Harten(eigv3, limitEig);
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("Error, no entropy correction method is adopt in Roe scheme! \n");
+    }
+}
+template LIB_EXPORT void Flux_RoeEntropyCorrection<RDouble>(RDouble &eigv1, RDouble &eigv2, RDouble &eigv3, RDouble pressureCoeffL, RDouble pressureCoeffR,
+                                                            RDouble absVel, RDouble vn, RDouble cm, int RoeEntropyCorrectionMethod, RDouble acousticEigenLimit, RDouble convectEigenLimit);
+template LIB_EXPORT void Flux_RoeEntropyCorrection<ADReal>(ADReal &eigv1, ADReal &eigv2, ADReal &eigv3, ADReal pressureCoeffL, ADReal pressureCoeffR,
+                                                           ADReal absVel, ADReal vn, ADReal cm, int RoeEntropyCorrectionMethod, ADReal acousticEigenLimit, ADReal convectEigenLimit);    
+#else
+    LIB_EXPORT void Flux_RoeEntropyCorrection(RDouble &eigv1, RDouble &eigv2, RDouble &eigv3, RDouble pressureCoeffL, RDouble pressureCoeffR, 
+        RDouble absVel, RDouble vn, RDouble cm, int RoeEntropyCorrectionMethod, RDouble acousticEigenLimit, RDouble convectEigenLimit)
+    {
+        //! eigv1,2,3: The three eigenvalue, which are V/V+c/V-c on the face.
+        if (RoeEntropyCorrectionMethod == 1)
+        {
+            RDouble maxEigvalue = MAX(eigv2, eigv3);
+            RDouble tmp0 = maxEigvalue * acousticEigenLimit;
+            RDouble tmp1 = maxEigvalue * acousticEigenLimit;
+            eigv1 = MAX(tmp0, eigv1);
+            eigv2 = MAX(tmp1, eigv2);
+            eigv3 = MAX(tmp1, eigv3);
+        }    
+        else if (RoeEntropyCorrectionMethod == 2)
+        {
+            //! From JCP,1995,Lin H-C
+            RDouble k1 = 0.25;
+            RDouble k2 = 5.0;
+            RDouble k3 = 15.0;
+
+            RDouble pressureSensorOnface = MAX(pressureCoeffL, pressureCoeffR);
+            RDouble limitEigv1 = (ABS(vn) + cm) * k3 * pressureSensorOnface;
+            RDouble limitEigv2 = (ABS(vn) + cm) * (k1 + k2 * pressureSensorOnface);
+            RDouble limitEigv3 = limitEigv2;
+
+            eigv1 = Harten(eigv1, limitEigv1);
+            eigv2 = Harten(eigv2, limitEigv2);
+            eigv3 = Harten(eigv3, limitEigv3);
+        }
+        else if (RoeEntropyCorrectionMethod == 3)
+        {
+            //! 3: Harten type.
+            RDouble maxEigenValue = ABS(vn) + cm;
+            RDouble acousticEigenvalueLimit  = acousticEigenLimit * maxEigenValue;
+            RDouble convectiveEigenvalueLimit= convectEigenLimit * maxEigenValue;
+
+            eigv1 = Harten(eigv1, convectiveEigenvalueLimit);
+            eigv2 = Harten(eigv2, acousticEigenvalueLimit);
+            eigv3 = Harten(eigv3, acousticEigenvalueLimit);
+        }
+        else if (RoeEntropyCorrectionMethod == 4)
+        {
+            //! 4: Method in Ustar
+            RDouble maxEigvalue = MAX(eigv2, eigv3);
+
+            RDouble ratio = MIN(one, fabs(vn) / cm);  
+            RDouble tmp0 = MAX(maxEigvalue * acousticEigenLimit * ratio, maxEigvalue * acousticEigenLimit / 100.0);
+            RDouble tmp1 = MAX(maxEigvalue * acousticEigenLimit * ratio, maxEigvalue * acousticEigenLimit / 100.0);
+
+            eigv1 = MAX(tmp0, eigv1);
+            eigv2 = MAX(tmp1, eigv2);
+            eigv3 = MAX(tmp1, eigv3);
+        }
+        else if (RoeEntropyCorrectionMethod == 5)
+        {
+            //! Otero, AIAA 2014-2094.
+            RDouble maxEigvalue = MAX(eigv2, eigv3);
+            RDouble delta = maxEigvalue * acousticEigenLimit;
+
+            eigv1 += delta;
+            eigv2 += delta;
+            eigv3 += delta;
+        }
+        else if (RoeEntropyCorrectionMethod == 6)
+        {
+            // for arbitary grid type, based on the shock wave detector and the absolute velocity V + sound speed C
+            RDouble pressureSensorOnface = MIN(pressureCoeffL, pressureCoeffR);
+            RDouble limitEig = (one - pressureSensorOnface) * (absVel + cm) + 0.0001 * cm;
+
+            eigv1 = Harten(eigv1, limitEig);
+            eigv2 = Harten(eigv2, limitEig);
+            eigv3 = Harten(eigv3, limitEig);
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("Error, no entropy correction method is adopt in Roe scheme! \n");
+        }
+    }
+#endif                       
+}
+
diff --git a/API/Physics/src/Force.cpp b/API/Physics/src/Force.cpp
new file mode 100644
index 0000000..e4dcfbc
--- /dev/null
+++ b/API/Physics/src/Force.cpp
@@ -0,0 +1,1103 @@
+#include "Force.h"
+#include "Math_BasisFunction.h"
+#include "Constants.h"
+#include "PHIO.h"
+#include "IO_FileName.h"
+#include "Geo_SimpleBC.h"
+#include "TK_Time.h"
+#include "TK_Parse.h"
+#include "TK_Exit.h"
+#include "Glb_Dimension.h"
+#include "GlobalDataBase.h"
+#include "PHHeader.h"
+#include "PHMpi.h"
+#include "AleManager.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+Force globalAerodynamicForce;
+
+void InitForce()
+{
+
+    RDouble attack, sideslip;
+    RDouble attackd = GlobalDataBase::GetDoubleParaFromDB("attackd");
+    RDouble angleSlide = GlobalDataBase::GetDoubleParaFromDB("angleSlide");
+
+    attack = attackd * PI / 180.0;
+    sideslip = angleSlide * PI / 180.0;
+
+    RDouble forceReferenceArea = GlobalDataBase::GetDoubleParaFromDB("forceReferenceArea");
+    RDouble forceReferenceLength = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLength");
+    RDouble forceReferenceLengthSpanWise = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLengthSpanWise");
+
+    globalAerodynamicForce.Init(attack, sideslip, forceReferenceArea, forceReferenceLength, forceReferenceLengthSpanWise);
+}
+
+void CollectionForce(ActionKey *actkey)
+{
+    globalAerodynamicForce.CollectionForce(actkey->GetData());
+}
+
+void DumpForce(ActionKey *actkey)
+{
+    int iterationStep;
+    GlobalDataBase::GetData("outnstep", &iterationStep, PHINT, 1);
+
+    globalAerodynamicForce.DumpForce(actkey, iterationStep);
+}
+
+Force::Force()
+{
+    partBCID = 0;
+
+    cpx = 0;
+    cpy = 0;
+    cpz = 0;
+
+    cl_tot = 0;
+    cd_tot = 0;
+    cd_pr = 0;
+    cd_sf = 0;
+    cd_cl2pa = 0;
+    xcp = 0;
+    ycp = 0;
+    zcp = 0;
+    side = 0;
+
+    CA_f = 0;
+    CA_p = 0;
+    CN_f = 0;
+    CN_p = 0;
+    CZ_f = 0;
+    CZ_p = 0;
+    Cl_f = 0;
+    Cl_p = 0;
+    Cn_f = 0;
+    Cn_p = 0;
+    Cm_f = 0;
+    Cm_p = 0;
+
+    CA_f_body = 0;
+    CN_f_body = 0;
+    CZ_f_body = 0;
+    Cl_f_body = 0;
+    Cn_f_body = 0;
+    Cm_f_body = 0;
+    CA_p_body = 0;
+    CN_p_body = 0;
+    CZ_p_body = 0;
+    Cl_p_body = 0;
+    Cn_p_body = 0;
+    Cm_p_body = 0;
+
+    numberOfBody = 0;
+    wallNameOfEachBody.resize(0);
+}
+
+Force::~Force()
+{
+    delete[] partBCID;    partBCID = NULL;
+
+    delete[] cpx;    cpx = NULL;
+    delete[] cpy;    cpy = NULL;
+    delete[] cpz;    cpz = NULL;
+
+    delete[] cl_tot;    cl_tot = NULL;
+    delete[] cd_tot;    cd_tot = NULL;
+    delete[] cd_pr;    cd_pr = NULL;
+    delete[] cd_sf;    cd_sf = NULL;
+    delete[] cd_cl2pa;    cd_cl2pa = NULL;
+    delete[] xcp;    xcp = NULL;
+    delete[] ycp;    ycp = NULL;
+    delete[] zcp;    zcp = NULL;
+    delete[] side;    side = NULL;
+
+    delete[] CA_f;    CA_f = NULL;
+    delete[] CA_p;    CA_p = NULL;
+    delete[] CN_f;    CN_f = NULL;
+    delete[] CN_p;    CN_p = NULL;
+    delete[] CZ_f;    CZ_f = NULL;
+    delete[] CZ_p;    CZ_p = NULL;
+    delete[] Cl_f;    Cl_f = NULL;
+    delete[] Cl_p;    Cl_p = NULL;
+    delete[] Cn_f;    Cn_f = NULL;
+    delete[] Cn_p;    Cn_p = NULL;
+    delete[] Cm_f;    Cm_f = NULL;
+    delete[] Cm_p;    Cm_p = NULL;
+
+    delete[] CA_f_body;    CA_f_body = NULL;
+    delete[] CN_f_body;    CN_f_body = NULL;
+    delete[] CZ_f_body;    CZ_f_body = NULL;
+    delete[] Cl_f_body;    Cl_f_body = NULL;
+    delete[] Cn_f_body;    Cn_f_body = NULL;
+    delete[] Cm_f_body;    Cm_f_body = NULL;
+    delete[] CA_p_body;    CA_p_body = NULL;
+    delete[] CN_p_body;    CN_p_body = NULL;
+    delete[] CZ_p_body;    CZ_p_body = NULL;
+    delete[] Cl_p_body;    Cl_p_body = NULL;
+    delete[] Cn_p_body;    Cn_p_body = NULL;
+    delete[] Cm_p_body;    Cm_p_body = NULL;
+}
+
+void Force::Init(RDouble attack, RDouble sideslip, RDouble forceReferenceArea, RDouble forceReferenceLength, RDouble forceReferenceLengthSpanWise)
+{
+    this->attack = attack;
+    this->sideslip = sideslip;
+    this->forceReferenceArea = forceReferenceArea;
+    this->forceReferenceLength = forceReferenceLength;
+    this->forceReferenceLengthSpanWise = forceReferenceLengthSpanWise;
+
+    isPartExist = (GlobalBoundaryCondition::GetGlobalBoundaryConditionList() != 0);
+    numberofSolidWallPart = 0;
+    if (isPartExist)
+    {
+        numberofSolidWallPart = GlobalBoundaryCondition::GetNumberOfSolidWallPart();
+    }
+    //! Because of global and local part force, numberofSolidWallPart * 2
+    numberofTotalPart = numberofSolidWallPart * 2 + 1;
+
+    int myid = PHMPI::GetCurrentProcessorID();
+    int server = PHMPI::GetServerProcessorID();
+    if ((myid == server) && (!cpx))
+    {
+        cpx = new RDouble[numberofTotalPart];
+        cpy = new RDouble[numberofTotalPart];
+        cpz = new RDouble[numberofTotalPart];
+        hingeMoment = new RDouble[numberofTotalPart];
+
+        CA_f = new RDouble[numberofTotalPart];
+        CA_p = new RDouble[numberofTotalPart];
+        CN_f = new RDouble[numberofTotalPart];
+        CN_p = new RDouble[numberofTotalPart];
+        CZ_f = new RDouble[numberofTotalPart];
+        CZ_p = new RDouble[numberofTotalPart];
+        Cl_f = new RDouble[numberofTotalPart];
+        Cl_p = new RDouble[numberofTotalPart];
+        Cn_f = new RDouble[numberofTotalPart];
+        Cn_p = new RDouble[numberofTotalPart];
+        Cm_f = new RDouble[numberofTotalPart];
+        Cm_p = new RDouble[numberofTotalPart];
+
+        PHSPACE::SetField(cpx, 0.0, numberofTotalPart);
+        PHSPACE::SetField(cpy, 0.0, numberofTotalPart);
+        PHSPACE::SetField(cpz, 0.0, numberofTotalPart);
+        PHSPACE::SetField(hingeMoment, 0.0, numberofTotalPart);
+
+        PHSPACE::SetField(CA_f, 0.0, numberofTotalPart);
+        PHSPACE::SetField(CA_p, 0.0, numberofTotalPart);
+        PHSPACE::SetField(CN_f, 0.0, numberofTotalPart);
+        PHSPACE::SetField(CN_p, 0.0, numberofTotalPart);
+        PHSPACE::SetField(CZ_f, 0.0, numberofTotalPart);
+        PHSPACE::SetField(CZ_p, 0.0, numberofTotalPart);
+        PHSPACE::SetField(Cl_f, 0.0, numberofTotalPart);
+        PHSPACE::SetField(Cl_p, 0.0, numberofTotalPart);
+        PHSPACE::SetField(Cn_f, 0.0, numberofTotalPart);
+        PHSPACE::SetField(Cn_p, 0.0, numberofTotalPart);
+        PHSPACE::SetField(Cm_f, 0.0, numberofTotalPart);
+        PHSPACE::SetField(Cm_p, 0.0, numberofTotalPart);
+    }
+
+    numberOfBody = static_cast<int>(GlobalBoundaryCondition::GetNumberOfBody());
+    if ((myid == server) && (!CA_f_body) && (numberOfBody))
+    {
+        CA_f_body = new RDouble[numberOfBody];
+        CN_f_body = new RDouble[numberOfBody];
+        CZ_f_body = new RDouble[numberOfBody];
+        Cl_f_body = new RDouble[numberOfBody];
+        Cn_f_body = new RDouble[numberOfBody];
+        Cm_f_body = new RDouble[numberOfBody];
+        CA_p_body = new RDouble[numberOfBody];
+        CN_p_body = new RDouble[numberOfBody];
+        CZ_p_body = new RDouble[numberOfBody];
+        Cl_p_body = new RDouble[numberOfBody];
+        Cn_p_body = new RDouble[numberOfBody];
+        Cm_p_body = new RDouble[numberOfBody];
+
+        set < string > *bodyList = GlobalBoundaryCondition::GetBodyNameList();
+        set < string >::iterator bodyListIter;
+        wallNameOfEachBody.resize(numberOfBody);
+        int bodyIndex = 0;
+        for (bodyListIter = bodyList->begin(); bodyListIter != bodyList->end(); ++ bodyListIter)
+        {
+            string bodyNameInList = *bodyListIter;
+            wallNameOfEachBody[bodyIndex].push_back(bodyNameInList);
+            bodyIndex ++;
+        }
+    }
+
+    if ((myid == server) && (numberOfBody))
+    {
+        PHSPACE::SetField(CA_f_body, 0.0, numberOfBody);
+        PHSPACE::SetField(CN_f_body, 0.0, numberOfBody);
+        PHSPACE::SetField(CZ_f_body, 0.0, numberOfBody);
+        PHSPACE::SetField(Cl_f_body, 0.0, numberOfBody);
+        PHSPACE::SetField(Cn_f_body, 0.0, numberOfBody);
+        PHSPACE::SetField(Cm_f_body, 0.0, numberOfBody);
+        PHSPACE::SetField(CA_p_body, 0.0, numberOfBody);
+        PHSPACE::SetField(CN_p_body, 0.0, numberOfBody);
+        PHSPACE::SetField(CZ_p_body, 0.0, numberOfBody);
+        PHSPACE::SetField(Cl_p_body, 0.0, numberOfBody);
+        PHSPACE::SetField(Cn_p_body, 0.0, numberOfBody);
+        PHSPACE::SetField(Cm_p_body, 0.0, numberOfBody);
+    }
+
+    if ((!partBCID) && (myid == server))
+    {
+        partBCID = new int[numberofTotalPart];
+
+        const int ALL_SOLID_WALL = -1;
+        PHSPACE::SetField(partBCID, ALL_SOLID_WALL, numberofTotalPart);
+
+        int partCount = 1;
+        uint_t nTBC = GlobalBoundaryCondition::GetNumberOfBC();
+        for (int iBC = 0; iBC < nTBC; ++ iBC)
+        {
+            if ((!GlobalBoundaryCondition::IsSolidWallBC(iBC)) && ((GlobalBoundaryCondition::GetBC(iBC)->GetBCType() != PHENGLEI::ABLATION_SURFACE))) continue;
+
+            //! Because of global and local part force, partBCID set twice
+            partBCID[partCount ++] = iBC;
+            partBCID[partCount ++] = iBC;
+
+            if (numberOfBody == 0)
+            {
+                continue;
+            }
+            string wallName = GlobalBoundaryCondition::GetBoundaryName(iBC);
+            int bodyIndex = static_cast<int>(GlobalBoundaryCondition::GetBodyIndex(iBC));
+            wallNameOfEachBody[bodyIndex].push_back(wallName);
+        }
+    }
+}
+
+void Force::CollectionForce(DataContainer *data_in)
+{
+    data_in->moveto_begin();
+    int nLocalZones = PHMPI::GetNumberofLocalZones();
+
+    int nTotalVarDim = nForceVar * numberofTotalPart;
+    double *localForceVar = new double[nTotalVarDim];
+    PHSPACE::SetField(localForceVar, 0.0, nTotalVarDim);
+
+    int nTBC = static_cast<int>(GlobalBoundaryCondition::GetNumberOfBC());
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int varCount = 0;
+
+        //! '-1'     , represent total wall force;\n
+        //! 0 - nWALL, represent each wall part force.
+        for (int iPart = ALL_SOLID_WALL; iPart < nTBC; ++ iPart)
+        {
+            bool ifRead = (iPart == ALL_SOLID_WALL); // total wall force.
+            if (iPart >= 0)
+            {
+                ifRead = ((GlobalBoundaryCondition::IsSolidWallBC(iPart)) || ((GlobalBoundaryCondition::GetBC(iPart)->GetBCType() == PHENGLEI::ABLATION_SURFACE)));
+            }
+            if (!ifRead) continue;
+
+            RDouble dCA_f, dCA_p, dCN_f, dCN_p, dCZ_f, dCZ_p, dcpx, dcpy, dcpz, dCl_f, dCl_p, dCn_f, dCn_p, dCm_f, dCm_p, hingeMoment;
+
+            data_in->read(&dCA_f, sizeof(RDouble));
+            data_in->read(&dCA_p, sizeof(RDouble));
+            data_in->read(&dCN_f, sizeof(RDouble));
+            data_in->read(&dCN_p, sizeof(RDouble));
+            data_in->read(&dCZ_f, sizeof(RDouble));
+            data_in->read(&dCZ_p, sizeof(RDouble));
+
+            data_in->read(&dcpx, sizeof(RDouble));
+            data_in->read(&dcpy, sizeof(RDouble));
+            data_in->read(&dcpz, sizeof(RDouble));
+
+            data_in->read(&dCl_f, sizeof(RDouble));
+            data_in->read(&dCl_p, sizeof(RDouble));
+            data_in->read(&dCn_f, sizeof(RDouble));
+            data_in->read(&dCn_p, sizeof(RDouble));
+            data_in->read(&dCm_f, sizeof(RDouble));
+            data_in->read(&dCm_p, sizeof(RDouble));
+
+            data_in->read(&hingeMoment, sizeof(RDouble));
+
+            localForceVar[varCount ++] += static_cast<double>(dCA_f);
+            localForceVar[varCount ++] += static_cast<double>(dCA_p);
+            localForceVar[varCount ++] += static_cast<double>(dCN_f);
+            localForceVar[varCount ++] += static_cast<double>(dCN_p);
+            localForceVar[varCount ++] += static_cast<double>(dCZ_f);
+            localForceVar[varCount ++] += static_cast<double>(dCZ_p);
+
+            localForceVar[varCount ++] += static_cast<double>(dcpx);
+            localForceVar[varCount ++] += static_cast<double>(dcpy);
+            localForceVar[varCount ++] += static_cast<double>(dcpz);
+
+            localForceVar[varCount ++] += static_cast<double>(dCl_f);
+            localForceVar[varCount ++] += static_cast<double>(dCl_p);
+            localForceVar[varCount ++] += static_cast<double>(dCn_f);
+            localForceVar[varCount ++] += static_cast<double>(dCn_p);
+            localForceVar[varCount ++] += static_cast<double>(dCm_f);
+            localForceVar[varCount ++] += static_cast<double>(dCm_p);
+
+            localForceVar[varCount ++] += static_cast<double>(hingeMoment);
+
+            //! Because of global and local part force, when (iPart > ALL_SOLID_WALL), read second.
+            if (iPart > ALL_SOLID_WALL)
+            {
+                data_in->read(&dCA_f, sizeof(RDouble));
+                data_in->read(&dCA_p, sizeof(RDouble));
+                data_in->read(&dCN_f, sizeof(RDouble));
+                data_in->read(&dCN_p, sizeof(RDouble));
+                data_in->read(&dCZ_f, sizeof(RDouble));
+                data_in->read(&dCZ_p, sizeof(RDouble));
+
+                data_in->read(&dcpx, sizeof(RDouble));
+                data_in->read(&dcpy, sizeof(RDouble));
+                data_in->read(&dcpz, sizeof(RDouble));
+
+                data_in->read(&dCl_f, sizeof(RDouble));
+                data_in->read(&dCl_p, sizeof(RDouble));
+                data_in->read(&dCn_f, sizeof(RDouble));
+                data_in->read(&dCn_p, sizeof(RDouble));
+                data_in->read(&dCm_f, sizeof(RDouble));
+                data_in->read(&dCm_p, sizeof(RDouble));
+
+                data_in->read(&hingeMoment, sizeof(RDouble));
+
+                localForceVar[varCount ++] += static_cast<double>(dCA_f);
+                localForceVar[varCount ++] += static_cast<double>(dCA_p);
+                localForceVar[varCount ++] += static_cast<double>(dCN_f);
+                localForceVar[varCount ++] += static_cast<double>(dCN_p);
+                localForceVar[varCount ++] += static_cast<double>(dCZ_f);
+                localForceVar[varCount ++] += static_cast<double>(dCZ_p);
+
+                localForceVar[varCount ++] += static_cast<double>(dcpx);
+                localForceVar[varCount ++] += static_cast<double>(dcpy);
+                localForceVar[varCount ++] += static_cast<double>(dcpz);
+
+                localForceVar[varCount ++] += static_cast<double>(dCl_f);
+                localForceVar[varCount ++] += static_cast<double>(dCl_p);
+                localForceVar[varCount ++] += static_cast<double>(dCn_f);
+                localForceVar[varCount ++] += static_cast<double>(dCn_p);
+                localForceVar[varCount ++] += static_cast<double>(dCm_f);
+                localForceVar[varCount ++] += static_cast<double>(dCm_p);
+
+                localForceVar[varCount ++] += static_cast<double>(hingeMoment);
+            }
+        }
+    }
+
+    //! Collection.
+    int myid = PHMPI::GetCurrentProcessorID();
+    int server = PHMPI::GetServerProcessorID();
+
+    double *globalForceVar = new double[nTotalVarDim];
+    if (PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_AllreduceSepMode(localForceVar, globalForceVar, nTotalVarDim, MPI_DOUBLE, PH_SUM);
+    }
+    else
+    {
+        for (int iVar = 0; iVar < nTotalVarDim; ++ iVar)
+        {
+            globalForceVar[iVar] = localForceVar[iVar];
+        }
+    }
+
+    if (myid == server)
+    {
+        int varCount = 0;
+        for (int iPart = 0; iPart < numberofTotalPart; ++ iPart)
+        {
+            CA_f[iPart] = static_cast<RDouble>(globalForceVar[varCount ++]);
+            CA_p[iPart] = static_cast<RDouble>(globalForceVar[varCount ++]);
+            CN_f[iPart] = static_cast<RDouble>(globalForceVar[varCount ++]);
+            CN_p[iPart] = static_cast<RDouble>(globalForceVar[varCount ++]);
+            CZ_f[iPart] = static_cast<RDouble>(globalForceVar[varCount ++]);
+            CZ_p[iPart] = static_cast<RDouble>(globalForceVar[varCount ++]);
+
+            cpx[iPart] = static_cast<RDouble>(globalForceVar[varCount ++]);
+            cpy[iPart] = static_cast<RDouble>(globalForceVar[varCount ++]);
+            cpz[iPart] = static_cast<RDouble>(globalForceVar[varCount ++]);
+
+            Cl_f[iPart] = static_cast<RDouble>(globalForceVar[varCount ++]);
+            Cl_p[iPart] = static_cast<RDouble>(globalForceVar[varCount ++]);
+            Cn_f[iPart] = static_cast<RDouble>(globalForceVar[varCount ++]);
+            Cn_p[iPart] = static_cast<RDouble>(globalForceVar[varCount ++]);
+            Cm_f[iPart] = static_cast<RDouble>(globalForceVar[varCount ++]);
+            Cm_p[iPart] = static_cast<RDouble>(globalForceVar[varCount ++]);
+
+            hingeMoment[iPart] = static_cast<RDouble>(globalForceVar[varCount ++]);
+        }
+    }
+
+    delete[]localForceVar;
+    delete[]globalForceVar;
+}
+
+void Force::CompForce()
+{
+    RDouble sina, cosa, sinb, cosb;
+
+    sina = sin(attack);
+    cosa = cos(attack);
+    sinb = sin(sideslip);
+    cosb = cos(sideslip);
+
+    bool isGlobalCoordinate = false;
+    for (int iPart = 0; iPart < numberofTotalPart; ++ iPart)
+    {
+        RDouble scf, vcm, Sb, forceReferenceAreaPart, forceReferenceLengthPart, forceReferenceLengthPart_B;
+        int bcID = partBCID[iPart];
+        if ((bcID == ALL_SOLID_WALL) || (isGlobalCoordinate == true))
+        {
+            forceReferenceAreaPart = this->forceReferenceArea;
+            forceReferenceLengthPart = this->forceReferenceLength;
+            forceReferenceLengthPart_B = this->forceReferenceLengthSpanWise;
+            isGlobalCoordinate = false;
+        }
+        else
+        {
+            SimpleBC *boundaryCondition = GlobalBoundaryCondition::GetBC(bcID);
+
+            boundaryCondition->GetParamData("forceReferenceArea", &forceReferenceAreaPart, PHDOUBLE, 1);
+            boundaryCondition->GetParamData("forceReferenceLength", &forceReferenceLengthPart, PHDOUBLE, 1);
+            boundaryCondition->GetParamData("forceReferenceLengthSpanWise", &forceReferenceLengthPart_B, PHDOUBLE, 1);
+            isGlobalCoordinate = true;
+        }
+
+        scf = 1.0 / forceReferenceAreaPart;
+        vcm = 1.0 / (forceReferenceAreaPart * forceReferenceLengthPart);
+        Sb = 1.0 / (forceReferenceAreaPart * forceReferenceLengthPart_B);
+
+        CA_f[iPart] *= scf;
+        CA_p[iPart] *= scf;
+        CN_f[iPart] *= scf;
+        CN_p[iPart] *= scf;
+        CZ_f[iPart] *= scf;
+        CZ_p[iPart] *= scf;
+
+        cpx[iPart] *= scf;
+        cpy[iPart] *= scf;
+        cpz[iPart] *= scf;
+
+        Cl_f[iPart] *= Sb;
+        Cl_p[iPart] *= Sb;
+        Cn_f[iPart] *= Sb;
+        Cn_p[iPart] *= Sb;
+        Cm_f[iPart] *= vcm;
+        Cm_p[iPart] *= vcm;
+
+        hingeMoment[iPart] *= vcm;
+    }
+
+    //* GRID_SIZE (F10.0) Number of grid nodes or cells
+    //* MACH      (F10.2) Mach Number.
+    //* ALPHA     (F10.3) Angle of Attack in Degrees.
+    //* CL_TOT    (F10.3) Total Lift Coefficient.
+    //* CD_TOT    (F10.5) Total Drag Coefficient.
+    //* CD_PR     (F10.5) Surface-Pressure Integrated Drag Coefficient.
+    //* CD_SF     (F10.5) Skin-Friction Integrated Drag Coefficient.
+    //* CD-CL2/PA (F10.5) CD_TOT - (CL_TOT*CL_TOT)/(PI*AR)��Note: AR=9.5
+    //* CM_TOT    (F10.4) Total Moment Coefficient.
+
+    if (!cl_tot || !cd_tot || !cd_pr || !cd_sf || !cd_cl2pa || !xcp || !side)
+    {
+        cl_tot = new RDouble[numberofTotalPart];
+        cd_tot = new RDouble[numberofTotalPart];
+        cd_pr = new RDouble[numberofTotalPart];
+        cd_sf = new RDouble[numberofTotalPart];
+        cd_cl2pa = new RDouble[numberofTotalPart];
+        xcp = new RDouble[numberofTotalPart];
+        ycp = new RDouble[numberofTotalPart];
+        zcp = new RDouble[numberofTotalPart];
+        side = new RDouble[numberofTotalPart];
+    }
+
+    const RDouble AR = 9.5;
+    for (int iPart = 0; iPart < numberofTotalPart; ++ iPart)
+    {
+        RDouble cfx, cfy, cfz;
+        cfx = CA_f[iPart] + CA_p[iPart];
+        cfy = CN_f[iPart] + CN_p[iPart];
+        cfz = CZ_f[iPart] + CZ_p[iPart];
+
+        RDouble cmx, cmy, cmz;
+        cmx = Cl_f[iPart] + Cl_p[iPart];
+        cmy = Cn_f[iPart] + Cn_p[iPart];
+        cmz = Cm_f[iPart] + Cm_p[iPart];
+
+        cl_tot[iPart] = - sina * cfx + cosa * cfy;
+        cd_tot[iPart] = cosa * cosb * cfx + sina * cosb * cfy + sinb * cfz;
+        side[iPart] = -cosa * sinb * cfx - sina * sinb * cfy + cosb * cfz;
+        cd_pr[iPart] = cosa * cosb * cpx[iPart] + sina * cosb * cpy[iPart] + sinb * cpz[iPart];
+        cd_sf[iPart] = cd_tot[iPart] - cd_pr[iPart];
+        cd_cl2pa[iPart] = cd_tot[iPart] - (cl_tot[iPart] * cl_tot[iPart]) / (PI * AR);
+
+        xcp[iPart] = SIGN(one, cfy) * cmz / (ABS(cfy) + SMALL);
+    }
+
+    if (numberOfBody == 0)
+    {
+        return;
+    }
+
+    isGlobalCoordinate = false;
+    for (int iPart = 0; iPart < numberofTotalPart; ++ iPart)
+    {
+        int bcID = partBCID[iPart];
+        if (bcID == ALL_SOLID_WALL)
+        {
+            continue;
+        }
+
+        if (isGlobalCoordinate == false)
+        {
+            isGlobalCoordinate = true;
+            continue;
+        }
+
+        int bodyIndex = static_cast<int>(GlobalBoundaryCondition::GetBodyIndex(bcID));
+
+        CA_f_body[bodyIndex] += CA_f[iPart];
+        CN_f_body[bodyIndex] += CN_f[iPart];
+        CZ_f_body[bodyIndex] += CZ_f[iPart];
+        Cl_f_body[bodyIndex] += Cl_f[iPart];
+        Cn_f_body[bodyIndex] += Cn_f[iPart];
+        Cm_f_body[bodyIndex] += Cm_f[iPart];
+        CA_p_body[bodyIndex] += CA_p[iPart];
+        CN_p_body[bodyIndex] += CN_p[iPart];
+        CZ_p_body[bodyIndex] += CZ_p[iPart];
+        Cl_p_body[bodyIndex] += Cl_p[iPart];
+        Cn_p_body[bodyIndex] += Cn_p[iPart];
+        Cm_p_body[bodyIndex] += Cm_p[iPart];
+
+        isGlobalCoordinate = false;
+    }
+}
+
+//! Bell modify 20120605.
+void Force::DumpForce(int outnstep, std::ostringstream &oss)
+{
+    oss << setiosflags(ios::left);
+    oss << setiosflags(ios::scientific);
+    oss << setprecision(10);
+
+    const int ALL = 0;
+    oss << outnstep << "	";
+    oss << cl_tot[ALL] << "	";
+    oss << cd_tot[ALL] << "	";
+    oss << side[ALL] << "	";
+    oss << cd_pr[ALL] << "	";
+    oss << cd_sf[ALL] << "	";
+    oss << cd_cl2pa[ALL] << "	";
+    oss << xcp[ALL] << "	";
+    oss << CA_f[ALL] + CA_p[ALL] << "	";
+    oss << CN_f[ALL] + CN_p[ALL] << "	";
+    oss << CZ_f[ALL] + CZ_p[ALL] << "	";
+    oss << Cl_f[ALL] + Cl_p[ALL] << "	";
+    oss << Cn_f[ALL] + Cn_p[ALL] << "	";
+    oss << Cm_f[ALL] + Cm_p[ALL] << "	";
+
+    RDouble wallTime = PHSPACE::TIME_SPACE::GetWallTime();
+    oss << wallTime;
+
+    oss << "\n";
+}
+
+void Force::DumpPartForce(int outnstep, int partID, std::ostringstream &oss)
+{
+    oss << setiosflags(ios::left);
+    oss << setiosflags(ios::scientific);
+    oss << setprecision(10);
+
+    oss << outnstep << "	";
+
+    oss << cl_tot[partID] << "	";
+    oss << cd_tot[partID] << "	";
+    oss << side[partID] << "	";
+    oss << cd_pr[partID] << "	";
+    oss << cd_sf[partID] << "	";
+    oss << cd_cl2pa[partID] << "	";
+    oss << xcp[partID] << "	";
+    oss << CA_f[partID] + CA_p[partID] << "	";
+    oss << CN_f[partID] + CN_p[partID] << "	";
+    oss << CZ_f[partID] + CZ_p[partID] << "	";
+    oss << Cl_f[partID] + Cl_p[partID] << "	";
+    oss << Cn_f[partID] + Cn_p[partID] << "	";
+    oss << Cm_f[partID] + Cm_p[partID] << "	";
+
+    oss << "\n";
+}
+
+
+void Force::DumpForce(ActionKey *actkey, int outnstep)
+{
+    CompForce();
+
+    if (!actkey->IsNeedOpenFile())
+    {
+        return;
+    }
+
+    //! For total wall force.
+    ParallelOpenFile(actkey);
+
+    std::ostringstream oss;
+    fstream &file = *(actkey->file);
+
+    if (IfFileEmpty(file))
+    {
+        oss << "Title=\"THE AIRCOEF\"" << endl;
+        oss << "Variables=" << endl;
+        oss << "iter" << endl;
+        oss << "<i>C<sub>L</sub></i>" << endl;
+        oss << "<i>C<sub>D</sub></i>" << endl;
+        oss << "<i>C<sub>Z</sub></i>" << endl;
+        oss << "<i>C<sub>D_p</sub></i>" << endl;
+        oss << "<i>C<sub>D_f</sub></i>" << endl;
+        oss << "<i>C<sub>D</sub></i>-<i>C<sub>L</sub></i><sup>2</sup>/(<greek>p</greek><math>4</math>A<sub>r</sub>)</i>" << endl;
+        oss << "<i>X<sub>cp</sub></i>" << endl;
+        oss << "<i>C<sub>A</sub></i>" << endl;
+        oss << "<i>C<sub>N</sub></i>" << endl;
+        oss << "<i>C<sub>Z1</sub></i>" << endl;
+        oss << "<i>C<sub>ml</sub></i>" << endl;
+        oss << "<i>C<sub>mn</sub></i>" << endl;
+        oss << "<i>C<sub>m</sub></i>" << endl;
+
+        oss << "\"Walltime\"" << endl;
+    }
+
+    DumpForce(outnstep, oss);
+
+    WriteASCIIFile(file, oss.str());
+
+    ParallelCloseFile(actkey);
+
+    //! For part force.
+    bool isGlobalCoordinate = false;
+    for (int iPart = 1; iPart < numberofTotalPart; ++ iPart)
+    {
+        int bcID = partBCID[iPart];
+
+        SimpleBC *boundaryCondition = GlobalBoundaryCondition::GetBC(bcID);
+        const string &bcName = boundaryCondition->GetBCName();
+
+        string totalForceFileName = actkey->filename;
+        string partAircoefFileName = PHSPACE::AddSymbolToFileName(totalForceFileName, "_", bcName);
+
+        if (isGlobalCoordinate == false)
+        {
+            isGlobalCoordinate = true;
+            continue;
+        }
+        else
+        {
+            isGlobalCoordinate = false;
+        }
+
+        fstream fileTmp;
+        ParallelOpenFile(fileTmp, partAircoefFileName, ios_base::out | ios_base::app);
+
+        ostringstream ossTmp;
+        if (IfFileEmpty(fileTmp))
+        {
+            ossTmp << "Title=\"Aerodynamic Force of " << bcName << "\"" << endl;
+            ossTmp << "Variables=" << endl;
+            ossTmp << "iter" << endl;
+
+            ossTmp << "<i>C<sub>L</sub></i>" << endl;
+            ossTmp << "<i>C<sub>D</sub></i>" << endl;
+            ossTmp << "<i>C<sub>Z</sub></i>" << endl;
+            ossTmp << "<i>C<sub>D_p</sub></i>" << endl;
+            ossTmp << "<i>C<sub>D_f</sub></i>" << endl;
+            ossTmp << "<i>C<sub>D</sub></i>-<i>C<sub>L</sub></i><sup>2</sup>/(<greek>p</greek><math>4</math>A<sub>r</sub>)</i>" << endl;
+            ossTmp << "<i>X<sub>cp</sub></i>" << endl;
+            ossTmp << "<i>C<sub>A</sub></i>" << endl;
+            ossTmp << "<i>C<sub>N</sub></i>" << endl;
+            ossTmp << "<i>C<sub>Z1</sub></i>" << endl;
+            ossTmp << "<i>C<sub>ml</sub></i>" << endl;
+            ossTmp << "<i>C<sub>mn</sub></i>" << endl;
+            ossTmp << "<i>C<sub>m</sub></i>" << endl;
+        }
+        DumpPartForce(outnstep, iPart, ossTmp);
+        WriteASCIIFile(fileTmp, ossTmp.str());
+
+        ParallelCloseFile(fileTmp);
+    }
+
+    DumpAllForceData(actkey, outnstep);
+}
+
+void Force::DumpAllForceData(ActionKey *actkey, int outnstep)
+{
+    string fileName = actkey->filename;
+
+    string mainName, fileDir, extensionName;
+    string globalFileName, localFileName;
+    GetFileNameExtension(fileName, mainName, extensionName, ".");
+    GetFileNameExtension(mainName, fileDir, extensionName, "/");
+
+    ostringstream ossGlobalFileName, ossLocalFileName, ossGlobalData, ossLocalData;
+    ossGlobalFileName << fileDir << "/force_global.dat";
+    ossLocalFileName << fileDir << "/force_local.dat";
+    globalFileName = ossGlobalFileName.str();
+    localFileName = ossLocalFileName.str();
+
+    string gridFile = GlobalDataBase::GetStrParaFromDB("gridfile");
+    RDouble refMachNumber = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+    RDouble attackd = GlobalDataBase::GetDoubleParaFromDB("attackd");
+    RDouble angleSlide = GlobalDataBase::GetDoubleParaFromDB("angleSlide");
+    RDouble refReNumber = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+    RDouble TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+    RDouble TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+    RDouble TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+    RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+    RDouble wallTemperature = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+    RDouble reynoldsReferenceLengthDimensional = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+    RDouble height = 0.0;
+    int inflowParaType = GlobalDataBase::GetIntParaFromDB("inflowParaType");
+    if (inflowParaType == 1)
+    {
+        height = GlobalDataBase::GetDoubleParaFromDB("height");
+    }
+
+
+    //! Write global force data file title
+    ossGlobalData << "#     MeshFile                     :       " << gridFile << endl;
+    if (inflowParaType == 1)
+    {
+        ossGlobalData << "#     Height                       :       " << height << "  km" << endl;
+    }
+
+    ossGlobalData << setiosflags(ios::scientific);
+    ossGlobalData << setprecision(6);
+    ossGlobalData << "#     Reynolds                     :       " << refReNumber / reynoldsReferenceLengthDimensional << "  1/m" << endl;
+    ossGlobalData << resetiosflags(ios::scientific);
+
+    ossGlobalData << "#     Mach                         :       " << refMachNumber << endl;
+    ossGlobalData << "#     Alpha                        :       " << attackd << "  degree" << endl;
+    ossGlobalData << "#     Beta                         :       " << angleSlide << "  degree" << endl;
+
+    if (wallTemperature < 0.0)
+    {
+        ossGlobalData << "#     Wall Temperature             :       " << "Adiabatic Wall" << endl;
+    }
+    else
+    {
+        ossGlobalData << "#     Wall Temperature             :       " << wallTemperature << "  K" << endl;
+    }
+
+    ossGlobalData << "#     gridScaleFactor              :       " << gridScaleFactor << endl;
+    ossGlobalData << "#     forceReferenceLength         :       " << this->forceReferenceLength * reynoldsReferenceLengthDimensional << "  m" << endl;
+    ossGlobalData << "#     forceReferenceLengthSpanWise :       " << this->forceReferenceLengthSpanWise * reynoldsReferenceLengthDimensional << "  m" << endl;
+
+    if (GetDim() == THREE_D)
+    {
+        ossGlobalData << "#     forceReferenceArea           :       " << this->forceReferenceArea * reynoldsReferenceLengthDimensional * reynoldsReferenceLengthDimensional << "  m2" << endl;
+    }
+    else
+    {
+        ossGlobalData << "#     forceReferenceArea           :       " << this->forceReferenceArea * reynoldsReferenceLengthDimensional << "  m^2" << endl;
+    }
+
+    ossGlobalData << "#     TorqueRefX                   :       " << TorqueRefX * reynoldsReferenceLengthDimensional << endl;
+    ossGlobalData << "#     TorqueRefY                   :       " << TorqueRefY * reynoldsReferenceLengthDimensional << endl;
+    ossGlobalData << "#     TorqueRefZ                   :       " << TorqueRefZ * reynoldsReferenceLengthDimensional << endl;
+    ossGlobalData << "#     iter                         :       " << outnstep << endl << endl;
+    ossGlobalData << "#        CA             CN            CZ1           Cml             Cmn            Cm" << endl;
+    ossGlobalData << "#        CA_p           CN_p          CZ1_p         Cml_p           Cmn_p          Cm_p" << endl;
+    ossGlobalData << "#        CA_f           CN_f          CZ1_f         Cml_f           Cmn_f          Cm_f" << endl;
+
+
+    //! Write local force data file title
+    ossLocalData << "#     MeshFile             :       " << gridFile << endl;
+    if (inflowParaType == 1)
+    {
+        ossLocalData << "#     Height               :       " << height << "  km" << endl;
+    }
+
+    ossLocalData << setiosflags(ios::scientific);
+    ossLocalData << setprecision(6);
+    ossLocalData << "#     Reynolds             :       " << refReNumber / reynoldsReferenceLengthDimensional << "  1/m" << endl;
+    ossLocalData << resetiosflags(ios::scientific);
+
+    ossLocalData << "#     Mach                 :       " << refMachNumber << endl;
+    ossLocalData << "#     Alpha                :       " << attackd << "  degree" << endl;
+    ossLocalData << "#     Beta                 :       " << angleSlide << "  degree" << endl;
+
+    if (wallTemperature < 0.0)
+    {
+        ossLocalData << "#     Wall Temperature     :       " << "Adiabatic Wall" << endl;
+    }
+    else
+    {
+        ossLocalData << "#     Wall Temperature     :       " << wallTemperature << "  K" << endl;
+    }
+
+
+    ossLocalData << "#     gridScaleFactor      :       " << gridScaleFactor << endl;
+    ossLocalData << "#     iter                 :       " << outnstep << endl << endl;
+    ossLocalData << "#        CA             CN            CZ1           Cml             Cmn            Cm" << endl;
+    ossLocalData << "#        CA_p           CN_p          CZ1_p         Cml_p           Cmn_p          Cm_p" << endl;
+    ossLocalData << "#        CA_f           CN_f          CZ1_f         Cml_f           Cmn_f          Cm_f" << endl;
+    ossLocalData << "#        CMh" << endl;
+
+
+    bool isGlobalData = true;
+    //! Write force data file
+    for (int iPart = 0; iPart < numberofTotalPart; ++ iPart)
+    {
+        int bcID = partBCID[iPart];
+
+        string partName;
+        if (bcID == -1)
+        {
+            partName = "whole";
+        }
+        else
+        {
+            SimpleBC *boundaryCondition = GlobalBoundaryCondition::GetBC(bcID);
+            const string &bcName = boundaryCondition->GetBCName();
+            partName = bcName;
+        }
+
+        if (isGlobalData == true)
+        {
+            DumpAllGlobalForceData(partName, iPart, ossGlobalData);
+            isGlobalData = false;
+        }
+        else
+        {
+            DumpAllLocalForceData(partName, iPart, ossLocalData);
+            isGlobalData = true;
+        }
+    }
+
+    for (int iBody = 0; iBody < numberOfBody; ++ iBody)
+    {
+        DumpBodyForceData(iBody, ossGlobalData);
+    }
+
+    //! Write global force data file
+    fstream globalFile;
+    ParallelOpenFile(globalFile, globalFileName, ios_base::out | ios_base::trunc);
+    WriteASCIIFile(globalFile, ossGlobalData.str());
+    ParallelCloseFile(globalFile);
+
+    //! Write local force data file
+    fstream localFile;
+    ParallelOpenFile(localFile, localFileName, ios_base::out | ios_base::trunc);
+    WriteASCIIFile(localFile, ossLocalData.str());
+    ParallelCloseFile(localFile);
+}
+
+void Force::DumpAllLocalForceData(const string &partName, int partID, std::ostringstream &oss)
+{
+    RDouble TorqueRefX, TorqueRefY, TorqueRefZ, forceReferenceAreaPart, forceReferenceLengthPart, forceReferenceLengthSpanWisePart;
+    int bcID = partBCID[partID];
+    SimpleBC *boundaryCondition = GlobalBoundaryCondition::GetBC(bcID);
+
+    boundaryCondition->GetParamData("forceReferenceArea", &forceReferenceAreaPart, PHDOUBLE, 1);
+    boundaryCondition->GetParamData("forceReferenceLength", &forceReferenceLengthPart, PHDOUBLE, 1);
+    boundaryCondition->GetParamData("forceReferenceLengthSpanWise", &forceReferenceLengthSpanWisePart, PHDOUBLE, 1);
+    boundaryCondition->GetParamData("TorqueRefX", &TorqueRefX, PHDOUBLE, 1);
+    boundaryCondition->GetParamData("TorqueRefY", &TorqueRefY, PHDOUBLE, 1);
+    boundaryCondition->GetParamData("TorqueRefZ", &TorqueRefZ, PHDOUBLE, 1);
+
+    RDouble reynoldsReferenceLengthDimensional = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+
+    oss << resetiosflags(ios::scientific);
+
+    oss << endl;
+    oss << "*" << partName << endl;
+    oss << "#forceReferenceLength         :    " << forceReferenceLengthPart * reynoldsReferenceLengthDimensional << "  m" << endl;
+    oss << "#forceReferenceLengthSpanWise :    " << forceReferenceLengthSpanWisePart * reynoldsReferenceLengthDimensional << "  m" << endl;
+
+    if (GetDim() == THREE_D)
+    {
+        oss << "#forceReferenceArea           :    " << forceReferenceAreaPart * reynoldsReferenceLengthDimensional * reynoldsReferenceLengthDimensional << "  m2" << endl;
+    }
+    else
+    {
+        oss << "#forceReferenceArea           :    " << forceReferenceAreaPart * reynoldsReferenceLengthDimensional << "  m^2" << endl;
+    }
+
+    oss << "#TorqueRefX                   :    " << TorqueRefX * reynoldsReferenceLengthDimensional << endl;
+    oss << "#TorqueRefY                   :    " << TorqueRefY * reynoldsReferenceLengthDimensional << endl;
+    oss << "#TorqueRefZ                   :    " << TorqueRefZ * reynoldsReferenceLengthDimensional << endl;
+
+    oss << setiosflags(ios::right);
+    oss << setiosflags(ios::scientific);
+    oss << setprecision(10);
+
+    oss << CA_f[partID] + CA_p[partID] << "	";
+    oss << CN_f[partID] + CN_p[partID] << "	";
+    oss << CZ_f[partID] + CZ_p[partID] << "	";
+    oss << Cl_f[partID] + Cl_p[partID] << "	";
+    oss << Cn_f[partID] + Cn_p[partID] << "	";
+    oss << Cm_f[partID] + Cm_p[partID] << endl;
+
+    oss << CA_p[partID] << "	";
+    oss << CN_p[partID] << "	";
+    oss << CZ_p[partID] << "	";
+    oss << Cl_p[partID] << "	";
+    oss << Cn_p[partID] << "	";
+    oss << Cm_p[partID] << endl;
+
+    oss << CA_f[partID] << "	";
+    oss << CN_f[partID] << "	";
+    oss << CZ_f[partID] << "	";
+    oss << Cl_f[partID] << "	";
+    oss << Cn_f[partID] << "	";
+    oss << Cm_f[partID] << endl;
+
+    oss << hingeMoment[partID] << endl;
+}
+
+void Force::DumpAllGlobalForceData(const string &partName, int partID, std::ostringstream &oss)
+{
+    oss << setiosflags(ios::right);
+    oss << setiosflags(ios::scientific);
+    oss << setprecision(10);
+
+    oss << endl;
+    oss << "*" << partName << endl;
+
+    oss << CA_f[partID] + CA_p[partID] << "	";
+    oss << CN_f[partID] + CN_p[partID] << "	";
+    oss << CZ_f[partID] + CZ_p[partID] << "	";
+    oss << Cl_f[partID] + Cl_p[partID] << "	";
+    oss << Cn_f[partID] + Cn_p[partID] << "	";
+    oss << Cm_f[partID] + Cm_p[partID] << endl;
+
+    oss << CA_p[partID] << "	";
+    oss << CN_p[partID] << "	";
+    oss << CZ_p[partID] << "	";
+    oss << Cl_p[partID] << "	";
+    oss << Cn_p[partID] << "	";
+    oss << Cm_p[partID] << endl;
+
+    oss << CA_f[partID] << "	";
+    oss << CN_f[partID] << "	";
+    oss << CZ_f[partID] << "	";
+    oss << Cl_f[partID] << "	";
+    oss << Cn_f[partID] << "	";
+    oss << Cm_f[partID] << endl;
+}
+
+void Force::DumpBodyForceData(int bodyID, std::ostringstream &oss)
+{
+    oss << setiosflags(ios::right);
+    oss << setiosflags(ios::scientific);
+    oss << setprecision(10);
+
+    oss << endl;
+    oss << "*" << wallNameOfEachBody[bodyID][0] << "(";
+    oss << wallNameOfEachBody[bodyID][1];
+
+    for (int ibc = 2; ibc < wallNameOfEachBody[bodyID].size(); ++ ibc)
+    {
+        oss << " + " << wallNameOfEachBody[bodyID][ibc];
+    }
+    oss << ")" << endl;
+
+    oss << CA_f_body[bodyID] + CA_p_body[bodyID] << "	";
+    oss << CN_f_body[bodyID] + CN_p_body[bodyID] << "	";
+    oss << CZ_f_body[bodyID] + CZ_p_body[bodyID] << "	";
+    oss << Cl_f_body[bodyID] + Cl_p_body[bodyID] << "	";
+    oss << Cn_f_body[bodyID] + Cn_p_body[bodyID] << "	";
+    oss << Cm_f_body[bodyID] + Cm_p_body[bodyID] << endl;
+
+    oss << CA_p_body[bodyID] << "	";
+    oss << CN_p_body[bodyID] << "	";
+    oss << CZ_p_body[bodyID] << "	";
+    oss << Cl_p_body[bodyID] << "	";
+    oss << Cn_p_body[bodyID] << "	";
+    oss << Cm_p_body[bodyID] << endl;
+
+    oss << CA_f_body[bodyID] << "	";
+    oss << CN_f_body[bodyID] << "	";
+    oss << CZ_f_body[bodyID] << "	";
+    oss << Cl_f_body[bodyID] << "	";
+    oss << Cn_f_body[bodyID] << "	";
+    oss << Cm_f_body[bodyID] << endl;
+}
+
+void Force::DumpData(DataContainer *data)
+{
+    data->moveto_begin();
+
+    PHWrite(data, numberofSolidWallPart);
+    PHWrite(data, numberofTotalPart);
+
+    PHWrite(data, partBCID, numberofTotalPart);
+
+    PHWrite(data, cpx, numberofTotalPart);
+    PHWrite(data, cpy, numberofTotalPart);
+    PHWrite(data, cpz, numberofTotalPart);
+
+    PHWrite(data, cl_tot, numberofTotalPart);
+    PHWrite(data, cd_tot, numberofTotalPart);
+    PHWrite(data, cd_pr, numberofTotalPart);
+    PHWrite(data, cd_sf, numberofTotalPart);
+    PHWrite(data, cd_cl2pa, numberofTotalPart);
+    PHWrite(data, xcp, numberofTotalPart);
+    PHWrite(data, side, numberofTotalPart);
+    PHWrite(data, hingeMoment, numberofTotalPart);
+
+}
+
+bool AerodynamicForceComponent::initialize = false;
+vector< std::set< string > >  AerodynamicForceComponent::components;
+
+AerodynamicForceComponent::AerodynamicForceComponent()
+{
+}
+
+AerodynamicForceComponent::~AerodynamicForceComponent()
+{
+}
+
+void AerodynamicForceComponent::Initialize()
+{
+    if (!AerodynamicForceComponent::initialize)
+    {
+        int numberOfAerodynamicForceComponents = GlobalDataBase::GetIntParaFromDB("numberOfAerodynamicForceComponents");
+        AerodynamicForceComponent::components.resize(numberOfAerodynamicForceComponents);
+        int nTBCWall = GlobalBoundaryCondition::GetNumberOfSolidWallPart();
+        SimpleBC *boundaryCondition = 0;
+        int iComponent = 0;
+        int nTBC = static_cast<int>(GlobalBoundaryCondition::GetNumberOfBC());
+        if (numberOfAerodynamicForceComponents != nTBCWall)
+        {
+            TK_Exit::ExceptionExit("Error in AerodynamicForceComponent::initialize : numberOfAerodynamicForceComponents != nTBCWall");
+
+        }
+        for (int iBC = 0; iBC < nTBC; ++ iBC)
+        {
+            if (GlobalBoundaryCondition::IsSolidWallBC(iBC))
+            {
+                boundaryCondition = GlobalBoundaryCondition::GetBC(iBC);
+                string bcName = boundaryCondition->GetBCName();
+                AerodynamicForceComponent::components[iComponent++].insert(bcName);
+            }
+        }
+
+        AerodynamicForceComponent::initialize = true;
+    }
+}
+
+bool AerodynamicForceComponent::FaceInAerodynamicForceComponents(string componentName, int aerodynamicForceComponentIndex)
+{
+    AerodynamicForceComponent::Initialize();
+    set< string >::iterator iter = AerodynamicForceComponent::components[aerodynamicForceComponentIndex].find(componentName);
+    return iter != AerodynamicForceComponent::components[aerodynamicForceComponentIndex].end();
+}
+
+bool FaceInAerodynamicForceComponents(string componentName, int aerodynamicForceComponentIndex)
+{
+    return AerodynamicForceComponent::FaceInAerodynamicForceComponents(componentName, aerodynamicForceComponentIndex);
+}
+
+}
+
diff --git a/API/Physics/src/Gas.cpp b/API/Physics/src/Gas.cpp
new file mode 100644
index 0000000..73a92c7
--- /dev/null
+++ b/API/Physics/src/Gas.cpp
@@ -0,0 +1,360 @@
+#include <cmath>
+#include "Gas.h"
+#include "GlobalDataBase.h"
+#include "Constants.h"
+#include "TK_Exit.h"
+
+
+namespace PHSPACE
+{
+namespace GAS_SPACE
+{
+    Gas *gas;
+
+    int GetIndexBySpeciesName(string speciesName)
+    {
+        int nIndex = -1;
+        if (speciesName == "O")
+        {
+            nIndex = 0;
+        }
+        else if (speciesName == "O2")
+        {
+            nIndex = 1;
+        }
+        else if (speciesName == "NO")
+        {
+            nIndex = 2;
+        }
+        else if (speciesName == "N")
+        {
+            nIndex = 3;
+        }
+        else if (speciesName == "N2")
+        {
+            nIndex = 4;
+        }
+        else if (speciesName == "O+")
+        {
+            nIndex = 5;
+        }
+        else if (speciesName == "O2+")
+        {
+            nIndex = 6;
+        }
+        else if (speciesName == "NO+")
+        {
+            nIndex = 7;
+        }
+        else if (speciesName == "N+")
+        {
+            nIndex = 8;
+        }
+        else if (speciesName == "N2+")
+        {
+            nIndex = 9;
+        }
+        else if (speciesName == "e-")
+        {
+            nIndex = 10;
+        }
+        else if (speciesName == "C")
+        {
+            nIndex = 11;
+        }
+        else if (speciesName == "C2")
+        {
+            nIndex = 12;
+        }
+        else if (speciesName == "CO")
+        {
+            nIndex = 13;
+        }
+        else if (speciesName == "CO2")
+        {
+            nIndex = 14;
+        }
+        else if (speciesName == "CN")
+        {
+            nIndex = 15;
+        }
+        else
+        {
+            nIndex = -1;
+        }
+        return nIndex;
+    }
+
+    string GetSpeciesNameByIndex(int nIndex)
+    {
+        string speciesName = "";
+        if (nIndex == 0)
+        {
+            speciesName = "O";
+        }
+        else if (nIndex == 1)
+        {
+            speciesName = "O2";
+        }
+        else if (nIndex == 2)
+        {
+            speciesName = "NO";
+        }
+        else if (nIndex == 3)
+        {
+            speciesName = "N";
+        }
+        else if (nIndex == 4)
+        {
+            speciesName = "N2";
+        }
+        else if (nIndex == 5)
+        {
+            speciesName = "O+";
+        }
+        else if (nIndex == 6)
+        {
+            speciesName = "O2+";
+        }
+        else if (nIndex == 7)
+        {
+            speciesName = "NO+";
+        }
+        else if (nIndex == 8)
+        {
+            speciesName = "N+";
+        }
+        else if (nIndex == 9)
+        {
+            speciesName = "N2+";
+        }
+        else if (nIndex == 10)
+        {
+            speciesName = "e-";
+        }
+        else if (nIndex == 11)
+        {
+            speciesName = "C";
+        }
+        else if (nIndex == 12)
+        {
+            speciesName = "C2";
+        }
+        else if (nIndex == 13)
+        {
+            speciesName = "CO";
+        }
+        else if (nIndex == 14)
+        {
+            speciesName = "CO2";
+        }
+        else if (nIndex == 15)
+        {
+            speciesName = "CN";
+        }
+        else
+        {
+            speciesName = "";
+        }
+        return speciesName;
+    }
+
+    void SpeciesNameToInteger(int numberOfSpecies, string *nameList, Int1D *speciesOrder)
+    {
+        //Initialization.
+        for (int n = 0; n < numberOfSpecies; ++ n)
+        {
+            (*speciesOrder)(n) = -1;
+        }
+        for (int n = 0; n < numberOfSpecies; ++ n)
+        {
+            int nIndex = GetIndexBySpeciesName(nameList[n]);
+            if (nIndex >= 0)
+            {
+                (*speciesOrder)(nIndex) = n;
+            }
+        }
+    }
+    void SpeciesNameToInteger(int numberOfSpecies, string *nameList, int *speciesOrder)
+    {
+        //Initialization.
+        for (int n = 0; n < numberOfSpecies; ++ n)
+        {
+            speciesOrder[n] = -1;
+        }
+        for (int n = 0; n < numberOfSpecies; ++ n)
+        {
+            int nIndex = GetIndexBySpeciesName(nameList[n]);
+            if (nIndex >= 0)
+            {
+                speciesOrder[nIndex] = n;
+            }
+        }
+    }
+
+    bool IsEqualGasModel(Int1D *speciesOrder1, Int1D *speciesOrder2)
+    {
+        //the index of the array are O, O2, NO, N, N2, O+, O2+, NO+, N+, N2+, e-, C, C2, CO, CO2, CN, respectively.
+        //the elements indicate the order of the species in the gas model, -1 indicates the species does not exist.
+        int totalNumber = 16;
+        for (int n = 0; n < totalNumber; ++ n)
+        {
+            if ((*speciesOrder1)(n) != (*speciesOrder2)(n))
+            {
+                return false;
+            }
+            //if (((*speciesOrder1)(n) >= 0 && (*speciesOrder2)(n) < 0) ||
+            //    ((*speciesOrder1)(n) < 0 && (*speciesOrder2)(n) >= 0))
+            //{
+            //    return false;
+            //}
+        }
+        return true;
+    }
+
+    Gas::Gas()
+    {
+        wallMultiTemperature = 0;
+        if (GlobalDataBase::IsExist("wallMultiTemperature", PHINT, 1))
+        {
+            wallMultiTemperature = GlobalDataBase::GetIntParaFromDB("wallMultiTemperature");
+        }
+
+        nDiagonalModified = 0;
+       
+        nDiagonalModifiedTurb = 0;
+        
+        trTemperatureMinNonDim = 10.0 ;
+        if (GlobalDataBase::IsExist("trTemperatureMin", PHDOUBLE, 1))
+        {
+            trTemperatureMinNonDim = GlobalDataBase::GetDoubleParaFromDB("trTemperatureMin") ;
+        }
+        trTemperatureMinNonDim /= GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+    }
+
+
+
+Thermo_Energy_Data::Thermo_Energy_Data(int numberOfSpecies)
+{
+    Cps = new RDouble[numberOfSpecies];
+    Cvs = new RDouble[numberOfSpecies];
+    Cvtrs = new RDouble[numberOfSpecies];
+    Cvvs = new RDouble[numberOfSpecies];
+    Cves = new RDouble[numberOfSpecies];
+
+    Hs = new RDouble[numberOfSpecies];
+    Es = new RDouble[numberOfSpecies];
+    Etrs = new RDouble[numberOfSpecies];
+    Evs = new RDouble[numberOfSpecies];
+    Ees = new RDouble[numberOfSpecies];
+    Rms = new RDouble[numberOfSpecies];
+}
+
+Thermo_Energy_Data::Thermo_Energy_Data()
+{
+    Cps = NULL;
+    Cvs = NULL;
+    Cvtrs = NULL;
+    Cvvs = NULL;
+    Cves = NULL;
+
+    Hs = NULL;
+    Es = NULL;
+    Etrs = NULL;
+    Evs = NULL;
+    Ees = NULL;
+    Rms = NULL;
+}
+
+Thermo_Energy_Data::~Thermo_Energy_Data()
+{
+    if (Cps != NULL) delete[]Cps;
+    if (Cvs != NULL) delete[]Cvs;
+    if (Cvtrs != NULL) delete[]Cvtrs;
+    if (Cvvs != NULL) delete[]Cvvs;
+    if (Cves != NULL) delete[]Cves;
+
+    if (Hs != NULL) delete[]Hs;
+    if (Es != NULL) delete[]Es;
+    if (Etrs != NULL) delete[]Etrs;
+    if (Evs != NULL) delete[]Evs;
+    if (Ees != NULL) delete[]Ees;
+    if (Rms != NULL) delete[]Rms;
+}
+
+void Thermo_Energy_Data::Init(int numberOfSpecies, int ntmodel)
+{
+    Cps = new RDouble[numberOfSpecies];
+    Cvs = new RDouble[numberOfSpecies];
+    Cvtrs = new RDouble[numberOfSpecies];
+    Cvvs = new RDouble[numberOfSpecies];
+    Cves = new RDouble[numberOfSpecies];
+
+    Hs = new RDouble[numberOfSpecies];
+    Es = new RDouble[numberOfSpecies];
+    Etrs = new RDouble[numberOfSpecies];
+    Evs = new RDouble[numberOfSpecies];
+    Ees = new RDouble[numberOfSpecies];
+    Rms = new RDouble[numberOfSpecies];
+}
+
+void Thermo_Energy_Data::freeData()
+{
+    if (Cps != NULL) delete[]Cps;
+    if (Cvs != NULL) delete[]Cvs;
+    if (Cvtrs != NULL) delete[]Cvtrs;
+    if (Cvvs != NULL) delete[]Cvvs;
+    if (Cves != NULL) delete[]Cves;
+
+    if (Hs != NULL) delete[]Hs;
+    if (Es != NULL) delete[]Es;
+    if (Etrs != NULL) delete[]Etrs;
+    if (Evs != NULL) delete[]Evs;
+    if (Ees != NULL) delete[]Ees;
+    if (Rms != NULL) delete[]Rms;
+}
+
+
+Thermo_Energy_DB ::Thermo_Energy_DB(int imin, int imax ,int jmin, int jmax, int kmin, int kmax, int numberSpecies, int ntmodel)
+{
+    ni = imax - imin + 1;
+    nj = jmax - jmin + 1;
+    nk = kmax - kmin + 1;
+
+    istart = imin;
+    jstart = jmin;
+    kstart = kmin;
+
+    nmax = ni * nj * nk;
+    numberOfSpecies = numberSpecies;
+
+    Data = new Thermo_Energy_Data[nmax];
+    for (int m = 0; m < nmax; ++ m)
+    {
+        Data[m].Init(numberOfSpecies, ntmodel);
+    }
+}
+
+Thermo_Energy_DB ::~Thermo_Energy_DB()
+{
+    if (Data != NULL)
+    {
+        if(numberOfSpecies > 0)
+        {
+            for (int m = 0; m < nmax; ++ m)
+            {
+                Data[m].freeData();
+            }
+        }
+        delete[]Data;
+    }
+}
+
+Thermo_Energy_Data * Thermo_Energy_DB ::GetThermo_Energy_Data(int i, int j ,int k)
+{
+    return  &Data[((k - kstart) * nj + (j - jstart)) * ni + i];
+}
+
+}
+
+}
\ No newline at end of file
diff --git a/API/Physics/src/Gradient.cpp b/API/Physics/src/Gradient.cpp
new file mode 100644
index 0000000..310c14f
--- /dev/null
+++ b/API/Physics/src/Gradient.cpp
@@ -0,0 +1,359 @@
+#include "Gradient.h"
+#include "TK_Exit.h"
+#include "Pointer.h"
+#include "Glb_Dimension.h"
+#include "Geo_StructBC.h"
+#include "FieldProxy.h"
+#include "Geo_StructGrid.h"
+#include "Geo_UnstructGrid.h"
+#include "GridType.h"
+
+namespace PHSPACE
+{
+LIB_EXPORT Gradient::Gradient(Grid *grid_in, int gridType, FieldProxy *q, int nTotalVariable)
+{
+    this->grid = grid_in;
+    this->gridType = gridType;
+    this->q = q;
+    this->nTotalVariable = nTotalVariable;
+    this->dqdx = 0;
+    this->dqdy = 0;
+    this->dqdz = 0;
+    Allocate();
+}
+
+LIB_EXPORT Gradient::~Gradient()
+{
+    grid = 0;
+    q = 0;
+    nTotalVariable = 0;
+    gridType = -1;
+    FreeMemory();
+}
+
+LIB_EXPORT RDouble ** Gradient::GetGradX_UNS() const
+{
+    return dqdx->GetField_UNS();
+}
+
+LIB_EXPORT RDouble ** Gradient::GetGradY_UNS() const
+{
+    return dqdy->GetField_UNS();
+}
+
+LIB_EXPORT RDouble ** Gradient::GetGradZ_UNS() const
+{
+    return dqdz->GetField_UNS();
+}
+
+LIB_EXPORT void Gradient::setNodeValue(RDouble **nodeValue)
+{
+    this->nodeValue = nodeValue;
+}
+
+LIB_EXPORT void Gradient::CommunicateInterfaceValue(string gradNameX, string gradNameY, string gradNameZ)
+{
+    if (gridType == UNSTRUCTGRID)
+    {
+        UnstructGrid *gridUnstruct = UnstructGridCast(grid);
+        RDouble **dqdx2d = dqdx->GetField_UNS();
+        RDouble **dqdy2d = dqdy->GetField_UNS();
+        RDouble **dqdz2d = dqdz->GetField_UNS();
+        if (dqdx2d == 0 || dqdy2d == 0 || dqdz2d == 0)
+        {
+            TK_Exit::ExceptionExit("You need calculate gradient before communicate interface value");
+        }
+        PHSPACE::CommunicateInterfaceValue(gridUnstruct, dqdx2d, gradNameX, nTotalVariable);
+        PHSPACE::CommunicateInterfaceValue(gridUnstruct, dqdy2d, gradNameY, nTotalVariable);
+        PHSPACE::CommunicateInterfaceValue(gridUnstruct, dqdz2d, gradNameZ, nTotalVariable);
+
+    }
+    else if (gridType == STRUCTGRID)
+    {
+        TK_Exit::ExceptionExit("Currently, gradient calculation only suit for unstructured grid!");
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("Gradinent Calculation: unrecongnized gridType!");
+    }
+}
+
+LIB_EXPORT void Gradient::StoreBoundGrad(string boundGradNameX, string boundGradNameY, string boundGradNameZ, int nsurf)
+{
+    if (gridType == UNSTRUCTGRID)
+    {
+        if (nsurf != 0)
+        {
+            TK_Exit::ExceptionExit("For unstructured grid, nsurf must equal to 0 (default option)");
+        }
+        UnstructGrid *gridUnstruct = UnstructGridCast(grid);
+        if (gridUnstruct->GetLevel() != 0) return;
+
+        RDouble **dqdx2d = dqdx->GetField_UNS();
+        RDouble **dqdy2d = dqdy->GetField_UNS();
+        RDouble **dqdz2d = dqdz->GetField_UNS();
+        if (dqdx2d == 0 || dqdy2d == 0 || dqdz2d == 0)
+        {
+            TK_Exit::ExceptionExit("You need calculate gradient before store boundary gradient");
+        }
+
+        int nBoundFace = gridUnstruct->GetNBoundFace();
+        int *leftCellOfFace = gridUnstruct->GetLeftCellOfFace();
+
+        RDouble **gradPrimtiveVarX = reinterpret_cast<RDouble **> (gridUnstruct->GetDataPtr(boundGradNameX));
+        RDouble **gradPrimtiveVarY = reinterpret_cast<RDouble **> (gridUnstruct->GetDataPtr(boundGradNameY));
+        RDouble **gradPrimtiveVarZ = reinterpret_cast<RDouble **> (gridUnstruct->GetDataPtr(boundGradNameZ));
+
+        int le;
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            le = leftCellOfFace[iFace];
+            for (int m = 0; m < nTotalVariable; ++ m)
+            {
+                gradPrimtiveVarX[m][iFace] = dqdx2d[m][le];
+                gradPrimtiveVarY[m][iFace] = dqdy2d[m][le];
+                gradPrimtiveVarZ[m][iFace] = dqdz2d[m][le];
+            }
+        }
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("Gradinent Calculation: unrecongnized gridType!");
+    }
+}
+
+void Gradient::Allocate()
+{
+    FreeMemory();
+    if(gridType == UNSTRUCTGRID)
+    {
+        UnstructGrid *gridUnstruct = UnstructGridCast(grid);
+        int nTotalCell = gridUnstruct->GetNTotalCell();
+        int nBoundFace = gridUnstruct->GetNBoundFace();
+        int nTotal = nTotalCell + nBoundFace;
+        dqdx = new FieldProxy();
+        dqdx->SetField_UNS(NewPointer2<RDouble>(nTotalVariable, nTotal), true);
+
+        dqdy = new FieldProxy();
+        dqdy->SetField_UNS(NewPointer2<RDouble>(nTotalVariable, nTotal), true);
+
+        dqdz = new FieldProxy();
+        dqdz->SetField_UNS(NewPointer2<RDouble>(nTotalVariable, nTotal), true);
+    }
+    else if(gridType == STRUCTGRID)
+    {
+        StructGrid *grid_str = StructGridCast(grid);
+        int ni = grid_str->GetNI();
+        int nj = grid_str->GetNJ();
+        int nk = grid_str->GetNK();
+        Range I(-1,ni+1);
+        Range J(-1,nj+1);
+        Range K(-1,nk+1);
+        Range M(0,nTotalVariable-1);
+        if (nk == 1) K.setRange(1,1);
+
+        dqdx = new FieldProxy();
+        dqdy = new FieldProxy();
+        dqdz = new FieldProxy();
+        dqdx->SetField_STR(new RDouble4D(I,J,K,M,fortranArray), true);
+        dqdy->SetField_STR(new RDouble4D(I,J,K,M,fortranArray), true);
+        dqdz->SetField_STR(new RDouble4D(I,J,K,M,fortranArray), true);
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("Gradinent Calculation: unrecongnized gridType!");
+    }
+}
+
+void Gradient::FreeMemory()
+{
+    if (dqdx) delete dqdx; dqdx = NULL;
+    if (dqdy) delete dqdy; dqdy = NULL;
+    if (dqdz) delete dqdz; dqdz = NULL;
+}
+
+LIB_EXPORT int Gradient::GetNumberOfTotalVariable()
+{
+    return nTotalVariable;
+}
+
+LIB_EXPORT GradientCellCenter::GradientCellCenter(Grid *grid_in, int gridType, FieldProxy *q, int nTotalVariable)
+{
+    this->grid = grid_in;
+    this->gridType = gridType;
+    this->q = q;
+    this->nTotalVariable = nTotalVariable;
+    this->dqdx = 0;
+    this->dqdy = 0;
+    this->dqdz = 0;
+    Allocate();
+}
+
+LIB_EXPORT GradientCellCenter::~GradientCellCenter()
+{
+    grid = 0;
+    q = 0;
+    nTotalVariable = 0;
+    gridType = -1;
+    FreeMemory();
+}
+
+void GradientCellCenter::Allocate()
+{
+    FreeMemory();
+    if(gridType == STRUCTGRID)
+    {
+        StructGrid *grid_str = StructGridCast(grid);
+        int ni = grid_str->GetNI();
+        int nj = grid_str->GetNJ();
+        int nk = grid_str->GetNK();
+        Range I(-1,ni+1);
+        Range J(-1,nj+1);
+        Range K(-1,nk+1);
+        Range M(0,nTotalVariable-1);
+        if (nk == 1) K.setRange(1,1);
+
+        dqdx = new FieldProxy();
+        dqdy = new FieldProxy();
+        dqdz = new FieldProxy();
+        dqdx->SetField_STR(new RDouble4D(I,J,K,M,fortranArray), true);
+        dqdy->SetField_STR(new RDouble4D(I,J,K,M,fortranArray), true);
+        dqdz->SetField_STR(new RDouble4D(I,J,K,M,fortranArray), true);
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("Gradinent Calculation: unrecongnized gridType!");
+    }
+}
+
+void GradientCellCenter::FreeMemory()
+{
+    if (dqdx) delete dqdx; dqdx = NULL;
+    if (dqdy) delete dqdy; dqdy = NULL;
+    if (dqdz) delete dqdz; dqdz = NULL;
+}
+
+LIB_EXPORT void GradientCellCenter::Calculate()
+{
+    if(dqdx == NULL || dqdy == NULL || dqdz == NULL)
+    {
+        TK_Exit::ExceptionExit("Memory for gradient have not been allocated!");
+    }
+    if(gridType == STRUCTGRID)
+    {
+        GradCenter();
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("Gradinent Calculation: unrecongnized gridType!");
+    }
+}
+
+void GradientCellCenter::GradCenter()
+{
+    StructGrid *strgrid = StructGridCast(grid);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &xfv = *(strgrid->GetFaceVectorX());
+    RDouble4D &yfv = *(strgrid->GetFaceVectorY());
+    RDouble4D &zfv = *(strgrid->GetFaceVectorZ());
+    RDouble3D &vol = *(strgrid->GetCellVolume());
+
+    int ndim = GetDim();
+
+    RDouble4D &q_4d    = q   ->GetField_STR();
+    RDouble4D &dqdx_4d = dqdx->GetField_STR();
+    RDouble4D &dqdy_4d = dqdy->GetField_STR();
+    RDouble4D &dqdz_4d = dqdz->GetField_STR();
+
+    dqdx_4d = 0.0;
+    dqdy_4d = 0.0;
+    dqdz_4d = 0.0;
+
+    for (int nsurf = 1; nsurf <= ndim; ++ nsurf)
+    {
+        int il1,jl1,kl1;
+        GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+        int ist = 1;
+        int ied = ni-1+il1;
+        int jst = 1;
+        int jed = nj-1+jl1;
+        int kst = 1;
+        int ked = nk-1+kl1;
+
+        if (ndim == TWO_D) ked = 1;
+
+        int il,jl,kl;
+                
+        for (int m = 0; m <= nTotalVariable-1; ++ m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        il = i - il1;
+                        jl = j - jl1;
+                        kl = k - kl1;
+
+                        RDouble phis = q_4d(i,j,k,m) + q_4d(il,jl,kl,m);
+
+                        RDouble ddx = phis * xfv(i,j,k,nsurf);
+                        RDouble ddy = phis * yfv(i,j,k,nsurf);
+                        RDouble ddz = phis * zfv(i,j,k,nsurf);
+
+                        dqdx_4d(i ,j ,k ,m) -= ddx;
+                        dqdy_4d(i ,j ,k ,m) -= ddy;
+                        dqdz_4d(i ,j ,k ,m) -= ddz;
+
+                        dqdx_4d(il,jl,kl,m) += ddx;
+                        dqdy_4d(il,jl,kl,m) += ddy;
+                        dqdz_4d(il,jl,kl,m) += ddz;
+                    }
+                }
+            }
+        }
+    }
+    int ist = 1;
+    int ied = ni-1;
+    int jst = 1;
+    int jed = nj-1;
+    int kst = 1;
+    int ked = nk-1;
+
+
+    if (ndim == TWO_D) ked = 1;
+
+    for (int m = 0; m <= nTotalVariable-1; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble oov = half / vol(i,j,k);
+                    dqdx_4d(i,j,k,m) *= oov;
+                    dqdy_4d(i,j,k,m) *= oov;
+                    dqdz_4d(i,j,k,m) *= oov;
+                }
+            }
+        }
+    }
+}
+
+LIB_EXPORT void GradientCellCenter::SetProxy(FieldProxy *q)
+{
+    this->q = q;
+}
+
+LIB_EXPORT int GradientCellCenter::GetNumberOfTotalVariable()
+{
+    return nTotalVariable;
+}
+
+}
\ No newline at end of file
diff --git a/API/Physics/src/GradientOperation.cpp b/API/Physics/src/GradientOperation.cpp
new file mode 100644
index 0000000..cd7fe98
--- /dev/null
+++ b/API/Physics/src/GradientOperation.cpp
@@ -0,0 +1,893 @@
+#include "TK_Log.h"
+#include "GradientOperation.h"
+#include "Geo_StructGrid.h"
+#include "Glb_Dimension.h"
+#include "Constants.h"
+
+namespace PHSPACE
+{
+
+void CorrectGradient(RDouble fl, RDouble fr, RDouble &dfdx, RDouble &dfdy, RDouble dx, RDouble dy, RDouble ods)
+{
+    RDouble fold, fnew, df;
+    fold = dfdx * dx + dfdy * dy;
+    fnew = (fr - fl) * ods;
+    df   = fnew - fold;
+
+    dfdx += df * dx;
+    dfdy += df * dy;
+}
+
+void CorrectGradient(RDouble fl, RDouble fr, RDouble &dfdx, RDouble &dfdy, RDouble &dfdz, RDouble dx, RDouble dy, RDouble dz, RDouble ods)
+{
+    RDouble fold, fnew, df;
+    fold = dfdx * dx + dfdy * dy + dfdz * dz;
+    fnew = (fr - fl) * ods;
+    df   = fnew - fold;
+
+    dfdx += df * dx;
+    dfdy += df * dy;
+    dfdz += df * dz;
+}
+
+void Get_SPM(int i, int j, int k, int js, int ks, int ndim, GreenGeo3D *greenGeo3D, RDouble4D &xfn, RDouble4D &yfn, RDouble4D &zfn, RDouble4D &area, RDouble3D &vol)
+{
+    //int ip = i + 1;
+    //int jp = j + 1;
+    //int kp = k + 1;
+
+    int ip = i + 1;
+    int jp = j + js;
+    int kp = k + ks;
+
+    greenGeo3D->nxip = xfn(ip,j ,k ,1) * area(ip,j ,k ,1);
+    greenGeo3D->nyip = yfn(ip,j ,k ,1) * area(ip,j ,k ,1);
+    greenGeo3D->nzip = zfn(ip,j ,k ,1) * area(ip,j ,k ,1);
+    greenGeo3D->nxim = xfn(i ,j ,k ,1) * area(i ,j ,k ,1);
+    greenGeo3D->nyim = yfn(i ,j ,k ,1) * area(i ,j ,k ,1);
+    greenGeo3D->nzim = zfn(i ,j ,k ,1) * area(i ,j ,k ,1);
+
+    greenGeo3D->nxjp = xfn(i ,jp,k ,2) * area(i ,jp,k ,2);
+    greenGeo3D->nyjp = yfn(i ,jp,k ,2) * area(i ,jp,k ,2);
+    greenGeo3D->nzjp = zfn(i ,jp,k ,2) * area(i ,jp,k ,2);
+    greenGeo3D->nxjm = xfn(i ,j ,k ,2) * area(i ,j ,k ,2);
+    greenGeo3D->nyjm = yfn(i ,j ,k ,2) * area(i ,j ,k ,2);
+    greenGeo3D->nzjm = zfn(i ,j ,k ,2) * area(i ,j ,k ,2);
+
+    if (ndim == THREE_D)
+    {
+        greenGeo3D->nxkp = xfn(i ,j ,kp,3) * area(i ,j ,kp,3);
+        greenGeo3D->nykp = yfn(i ,j ,kp,3) * area(i ,j ,kp,3);
+        greenGeo3D->nzkp = zfn(i ,j ,kp,3) * area(i ,j ,kp,3);
+        greenGeo3D->nxkm = xfn(i ,j ,k ,3) * area(i ,j ,k ,3);
+        greenGeo3D->nykm = yfn(i ,j ,k ,3) * area(i ,j ,k ,3);
+        greenGeo3D->nzkm = zfn(i ,j ,k ,3) * area(i ,j ,k ,3);
+    }
+    else
+    {
+        greenGeo3D->nxkp = 0.0;
+        greenGeo3D->nykp = 0.0;
+        greenGeo3D->nzkp = 0.0;
+        greenGeo3D->nxkm = 0.0;
+        greenGeo3D->nykm = 0.0;
+        greenGeo3D->nzkm = 0.0;
+
+    }
+    greenGeo3D->ovol = one / vol(i,j,k);
+}
+void Get_SPM(int i, int j, int k, int js, int ks, int ndim, GreenGeo3D *greenGeo3D, RDouble4D &xfv, RDouble4D &yfv, RDouble4D &zfv, RDouble3D &vol)
+{
+    //int ip = i + 1;
+    //int jp = j + 1;
+    //int kp = k + 1;
+
+    int ip = i + 1;
+    int jp = j + js;
+    int kp = k + ks;
+
+    greenGeo3D->nxip = xfv(ip,j ,k ,1);
+    greenGeo3D->nyip = yfv(ip,j ,k ,1);
+    greenGeo3D->nzip = zfv(ip,j ,k ,1);
+    greenGeo3D->nxim = xfv(i ,j ,k ,1);
+    greenGeo3D->nyim = yfv(i ,j ,k ,1);
+    greenGeo3D->nzim = zfv(i ,j ,k ,1);
+
+    greenGeo3D->nxjp = xfv(i ,jp,k ,2);
+    greenGeo3D->nyjp = yfv(i ,jp,k ,2);
+    greenGeo3D->nzjp = zfv(i ,jp,k ,2);
+    greenGeo3D->nxjm = xfv(i ,j ,k ,2);
+    greenGeo3D->nyjm = yfv(i ,j ,k ,2);
+    greenGeo3D->nzjm = zfv(i ,j ,k ,2);
+
+    if (ndim == THREE_D)
+    {
+        greenGeo3D->nxkp = xfv(i ,j ,kp,3);
+        greenGeo3D->nykp = yfv(i ,j ,kp,3);
+        greenGeo3D->nzkp = zfv(i ,j ,kp,3);
+        greenGeo3D->nxkm = xfv(i ,j ,k ,3);
+        greenGeo3D->nykm = yfv(i ,j ,k ,3);
+        greenGeo3D->nzkm = zfv(i ,j ,k ,3);
+    }
+    else
+    {
+        greenGeo3D->nxkp = 0.0;
+        greenGeo3D->nykp = 0.0;
+        greenGeo3D->nzkp = 0.0;
+        greenGeo3D->nxkm = 0.0;
+        greenGeo3D->nykm = 0.0;
+        greenGeo3D->nzkm = 0.0;
+
+    }
+    greenGeo3D->ovol = one / vol(i,j,k);
+}
+
+void Get_SPM_PARA(int ndim,GreenGeo3D *greenGeo3D,RDouble xfn_1,RDouble yfn_1,RDouble zfn_1,RDouble area_1,RDouble xfn_ip1,RDouble yfn_ip1,RDouble zfn_ip1,RDouble area_ip1,RDouble xfn_2,RDouble yfn_2,RDouble zfn_2,RDouble area_2,RDouble xfn_ip2,RDouble yfn_ip2,RDouble zfn_ip2,RDouble area_ip2,RDouble xfn_3,RDouble yfn_3,RDouble zfn_3,RDouble area_3,RDouble xfn_ip3,RDouble yfn_ip3,RDouble zfn_ip3,RDouble area_ip3,RDouble data_vol)
+{
+        greenGeo3D->nxip = xfn_ip1 * area_ip1;
+        greenGeo3D->nyip = yfn_ip1 * area_ip1;
+        greenGeo3D->nzip = zfn_ip1 * area_ip1;
+        greenGeo3D->nxim = xfn_1 * area_1;
+        greenGeo3D->nyim = yfn_1 * area_1;
+        greenGeo3D->nzim = zfn_1 * area_1;
+
+        greenGeo3D->nxjp = xfn_ip2 * area_ip2;
+        greenGeo3D->nyjp = yfn_ip2 * area_ip2;
+        greenGeo3D->nzjp = zfn_ip2 * area_ip2;
+        greenGeo3D->nxjm = xfn_2 * area_2;
+        greenGeo3D->nyjm = yfn_2 * area_2;
+        greenGeo3D->nzjm = zfn_2 * area_2;
+        if (ndim == THREE_D)
+        {
+                greenGeo3D->nxkp = xfn_ip3 * area_ip3;
+                greenGeo3D->nykp = yfn_ip3 * area_ip3;
+                greenGeo3D->nzkp = zfn_ip3 * area_ip3;
+                greenGeo3D->nxkm = xfn_3 * area_3;
+                greenGeo3D->nykm = yfn_3 * area_3;
+                greenGeo3D->nzkm = zfn_3 * area_3;
+        }
+        else
+        {
+                greenGeo3D->nxkp = 0.0;
+                greenGeo3D->nykp = 0.0;
+                greenGeo3D->nzkp = 0.0;
+                greenGeo3D->nxkm = 0.0;
+                greenGeo3D->nykm = 0.0;
+                greenGeo3D->nzkm = 0.0;
+        }
+        greenGeo3D->ovol = one / data_vol;
+}
+void Get_SPM_I(int i, int j, int k, int js, int ks, int ndim, GreenGeo3D *greenGeo3D, RDouble4D &xfn, RDouble4D &yfn, RDouble4D &zfn, RDouble4D &area, RDouble3D &vol)
+{
+    int im,jm,km,ip,jp,kp;
+
+    //ip = i + 1;
+    //im = i - 1;
+    //jp = j + 1;
+    //jm = j;
+    //kp = k + 1;
+    //km = k;
+
+    ip = i + 1;
+    im = i - 1;
+    jp = j + js;
+    jm = j;
+    kp = k + ks;
+    km = k;
+
+    greenGeo3D->nxip = half * (xfn(i ,j ,k,1) * area(i ,j ,k,1) + xfn(ip,j ,k,1) * area(ip,j ,k,1));
+    greenGeo3D->nyip = half * (yfn(i ,j ,k,1) * area(i ,j ,k,1) + yfn(ip,j ,k,1) * area(ip,j ,k,1));
+    greenGeo3D->nzip = half * (zfn(i ,j ,k,1) * area(i ,j ,k,1) + zfn(ip,j ,k,1) * area(ip,j ,k,1));
+    greenGeo3D->nxim = half * (xfn(i ,j ,k,1) * area(i ,j ,k,1) + xfn(im,j ,k,1) * area(im,j ,k,1));
+    greenGeo3D->nyim = half * (yfn(i ,j ,k,1) * area(i ,j ,k,1) + yfn(im,j ,k,1) * area(im,j ,k,1));
+    greenGeo3D->nzim = half * (zfn(i ,j ,k,1) * area(i ,j ,k,1) + zfn(im,j ,k,1) * area(im,j ,k,1));
+                                                                                    
+    greenGeo3D->nxjp = half * (xfn(i ,jp,k,2) * area(i ,jp,k,2) + xfn(im,jp,k,2) * area(im,jp,k,2));
+    greenGeo3D->nyjp = half * (yfn(i ,jp,k,2) * area(i ,jp,k,2) + yfn(im,jp,k,2) * area(im,jp,k,2));
+    greenGeo3D->nzjp = half * (zfn(i ,jp,k,2) * area(i ,jp,k,2) + zfn(im,jp,k,2) * area(im,jp,k,2));
+    greenGeo3D->nxjm = half * (xfn(i ,jm,k,2) * area(i ,jm,k,2) + xfn(im,jm,k,2) * area(im,jm,k,2));
+    greenGeo3D->nyjm = half * (yfn(i ,jm,k,2) * area(i ,jm,k,2) + yfn(im,jm,k,2) * area(im,jm,k,2));
+    greenGeo3D->nzjm = half * (zfn(i ,jm,k,2) * area(i ,jm,k,2) + zfn(im,jm,k,2) * area(im,jm,k,2));
+
+    if (ndim == THREE_D)
+    {
+        greenGeo3D->nxkp = half * (xfn(i ,j,kp,3) * area(i ,j,kp,3) + xfn(im,j,kp,3) * area(im,j,kp,3));
+        greenGeo3D->nykp = half * (yfn(i ,j,kp,3) * area(i ,j,kp,3) + yfn(im,j,kp,3) * area(im,j,kp,3));
+        greenGeo3D->nzkp = half * (zfn(i ,j,kp,3) * area(i ,j,kp,3) + zfn(im,j,kp,3) * area(im,j,kp,3));
+        greenGeo3D->nxkm = half * (xfn(i ,j,km,3) * area(i ,j,km,3) + xfn(im,j,km,3) * area(im,j,km,3));
+        greenGeo3D->nykm = half * (yfn(i ,j,km,3) * area(i ,j,km,3) + yfn(im,j,km,3) * area(im,j,km,3));
+        greenGeo3D->nzkm = half * (zfn(i ,j,km,3) * area(i ,j,km,3) + zfn(im,j,km,3) * area(im,j,km,3));
+    }
+    else
+    {
+        greenGeo3D->nxkp = 0.0;
+        greenGeo3D->nykp = 0.0;
+        greenGeo3D->nzkp = 0.0;
+        greenGeo3D->nxkm = 0.0;
+        greenGeo3D->nykm = 0.0;
+        greenGeo3D->nzkm = 0.0;
+    }
+
+    greenGeo3D->ovol = two / (vol(i,j,k) + vol(im,j,k));
+}
+
+void Get_SPM_J(int i, int j, int k, int js, int ks, int ndim, GreenGeo3D *greenGeo3D, RDouble4D &xfn, RDouble4D &yfn, RDouble4D &zfn, RDouble4D &area, RDouble3D &vol)
+{
+    int ip,im,jp,jm,kp,km;
+
+    //ip = i + 1;
+    //im = i;
+    //jp = j + 1;
+    //jm = j - 1;
+    //kp = k + 1;
+    //km = k;
+
+    ip = i + 1;
+    im = i;
+    jp = j + js;
+    jm = j - js;
+    kp = k + ks;
+    km = k;
+
+    greenGeo3D->nxip = half * (xfn(ip,j ,k,1) * area(ip,j ,k,1) + xfn(ip,jm,k,1) * area(ip,jm,k,1));
+    greenGeo3D->nyip = half * (yfn(ip,j ,k,1) * area(ip,j ,k,1) + yfn(ip,jm,k,1) * area(ip,jm,k,1));
+    greenGeo3D->nzip = half * (zfn(ip,j ,k,1) * area(ip,j ,k,1) + zfn(ip,jm,k,1) * area(ip,jm,k,1));
+    greenGeo3D->nxim = half * (xfn(im,j ,k,1) * area(im,j ,k,1) + xfn(im,jm,k,1) * area(im,jm,k,1));
+    greenGeo3D->nyim = half * (yfn(im,j ,k,1) * area(im,j ,k,1) + yfn(im,jm,k,1) * area(im,jm,k,1));
+    greenGeo3D->nzim = half * (zfn(im,j ,k,1) * area(im,j ,k,1) + zfn(im,jm,k,1) * area(im,jm,k,1));
+                                                                                        
+    greenGeo3D->nxjp = half * (xfn(i ,j ,k,2) * area(i ,j ,k,2) + xfn(i ,jp,k,2) * area(i ,jp,k,2));
+    greenGeo3D->nyjp = half * (yfn(i ,j ,k,2) * area(i ,j ,k,2) + yfn(i ,jp,k,2) * area(i ,jp,k,2));
+    greenGeo3D->nzjp = half * (zfn(i ,j ,k,2) * area(i ,j ,k,2) + zfn(i ,jp,k,2) * area(i ,jp,k,2));
+    greenGeo3D->nxjm = half * (xfn(i ,j ,k,2) * area(i ,j ,k,2) + xfn(i ,jm,k,2) * area(i ,jm,k,2));
+    greenGeo3D->nyjm = half * (yfn(i ,j ,k,2) * area(i ,j ,k,2) + yfn(i ,jm,k,2) * area(i ,jm,k,2));
+    greenGeo3D->nzjm = half * (zfn(i ,j ,k,2) * area(i ,j ,k,2) + zfn(i ,jm,k,2) * area(i ,jm,k,2));
+
+    if (ndim == THREE_D)
+    {
+        greenGeo3D->nxkp = half * (xfn(i,j ,kp,3) * area(i,j ,kp,3) + xfn(i,jm,kp,3) * area(i,jm,kp,3));
+        greenGeo3D->nykp = half * (yfn(i,j ,kp,3) * area(i,j ,kp,3) + yfn(i,jm,kp,3) * area(i,jm,kp,3));
+        greenGeo3D->nzkp = half * (zfn(i,j ,kp,3) * area(i,j ,kp,3) + zfn(i,jm,kp,3) * area(i,jm,kp,3));
+        greenGeo3D->nxkm = half * (xfn(i,j ,km,3) * area(i,j ,km,3) + xfn(i,jm,km,3) * area(i,jm,km,3));
+        greenGeo3D->nykm = half * (yfn(i,j ,km,3) * area(i,j ,km,3) + yfn(i,jm,km,3) * area(i,jm,km,3));
+        greenGeo3D->nzkm = half * (zfn(i,j ,km,3) * area(i,j ,km,3) + zfn(i,jm,km,3) * area(i,jm,km,3));
+    }
+    else
+    {
+        greenGeo3D->nxkp = 0.0;
+        greenGeo3D->nykp = 0.0;
+        greenGeo3D->nzkp = 0.0;
+        greenGeo3D->nxkm = 0.0;
+        greenGeo3D->nykm = 0.0;
+        greenGeo3D->nzkm = 0.0;
+    }
+
+    greenGeo3D->ovol = two / (vol(i,j,k) + vol(i,jm,k));
+}
+
+void Get_SPM_K(int i, int j, int k, int js, int ks, GreenGeo3D *greenGeo3D, RDouble4D &xfn, RDouble4D &yfn, RDouble4D &zfn, RDouble4D &area, RDouble3D &vol)
+{
+    int ip,im,jp,jm,kp,km;
+
+    //ip = i + 1;
+    //im = i;
+    //jp = j + 1;
+    //jm = j;
+    //kp = k + 1;
+    //km = k - 1;
+
+    ip = i + 1;
+    im = i;
+    jp = j + js;
+    jm = j;
+    kp = k + ks;
+    km = k - ks;
+
+    greenGeo3D->nxip = half * (xfn(ip,j,k ,1) * area(ip,j,k ,1) + xfn(ip,j,km,1) * area(ip,j,km,1));
+    greenGeo3D->nyip = half * (yfn(ip,j,k ,1) * area(ip,j,k ,1) + yfn(ip,j,km,1) * area(ip,j,km,1));
+    greenGeo3D->nzip = half * (zfn(ip,j,k ,1) * area(ip,j,k ,1) + zfn(ip,j,km,1) * area(ip,j,km,1));
+    greenGeo3D->nxim = half * (xfn(im,j,k ,1) * area(im,j,k ,1) + xfn(im,j,km,1) * area(im,j,km,1));
+    greenGeo3D->nyim = half * (yfn(im,j,k ,1) * area(im,j,k ,1) + yfn(im,j,km,1) * area(im,j,km,1));
+    greenGeo3D->nzim = half * (zfn(im,j,k ,1) * area(im,j,k ,1) + zfn(im,j,km,1) * area(im,j,km,1));
+                                                                                        
+    greenGeo3D->nxjp = half * (xfn(i,jp,k ,2) * area(i,jp,k ,2) + xfn(i,jp,km,2) * area(i,jp,km,2));
+    greenGeo3D->nyjp = half * (yfn(i,jp,k ,2) * area(i,jp,k ,2) + yfn(i,jp,km,2) * area(i,jp,km,2));
+    greenGeo3D->nzjp = half * (zfn(i,jp,k ,2) * area(i,jp,k ,2) + zfn(i,jp,km,2) * area(i,jp,km,2));
+    greenGeo3D->nxjm = half * (xfn(i,jm,k ,2) * area(i,jm,k ,2) + xfn(i,jm,km,2) * area(i,jm,km,2));
+    greenGeo3D->nyjm = half * (yfn(i,jm,k ,2) * area(i,jm,k ,2) + yfn(i,jm,km,2) * area(i,jm,km,2));
+    greenGeo3D->nzjm = half * (zfn(i,jm,k ,2) * area(i,jm,k ,2) + zfn(i,jm,km,2) * area(i,jm,km,2));
+                                                                                        
+    greenGeo3D->nxkp = half * (xfn(i,j ,k ,3) * area(i,j ,k ,3) + xfn(i,j ,kp,3) * area(i,j ,kp,3));
+    greenGeo3D->nykp = half * (yfn(i,j ,k ,3) * area(i,j ,k ,3) + yfn(i,j ,kp,3) * area(i,j ,kp,3));
+    greenGeo3D->nzkp = half * (zfn(i,j ,k ,3) * area(i,j ,k ,3) + zfn(i,j ,kp,3) * area(i,j ,kp,3));
+    greenGeo3D->nxkm = half * (xfn(i,j ,k ,3) * area(i,j ,k ,3) + xfn(i,j ,km,3) * area(i,j ,km,3));
+    greenGeo3D->nykm = half * (yfn(i,j ,k ,3) * area(i,j ,k ,3) + yfn(i,j ,km,3) * area(i,j ,km,3));
+    greenGeo3D->nzkm = half * (zfn(i,j ,k ,3) * area(i,j ,k ,3) + zfn(i,j ,km,3) * area(i,j ,km,3));
+
+    greenGeo3D->ovol = two / (vol(i,j,k) + vol(i,j,km));
+}
+
+void DXDYDZ(RDouble3D & f,GreenGeo3D * g,int i,int j,int k,int js,int ks,RDouble &dfdx, RDouble &dfdy, RDouble &dfdz)
+{
+    int    ip,im,jp,jm,kp,km;
+    RDouble fip,fim,fjp,fjm,fkp,fkm;
+
+    //ip = i + 1;
+    //im = i - 1;
+    //jp = j + 1;
+    //jm = j - 1;
+    //kp = k + 1;
+    //km = k - 1;
+
+    ip = i + 1;
+    im = i - 1;
+    jp = j + js;
+    jm = j - js;
+    kp = k + ks;
+    km = k - ks;
+
+    fip = half * (f(i,j,k) + f(ip,j,k));
+    fim = half * (f(i,j,k) + f(im,j,k));
+    fjp = half * (f(i,j,k) + f(i,jp,k));
+    fjm = half * (f(i,j,k) + f(i,jm,k));
+    fkp = half * (f(i,j,k) + f(i,j,kp));
+    fkm = half * (f(i,j,k) + f(i,j,km));
+
+    dfdx = g->ovol * (fip * g->nxip - fim * g->nxim + fjp * g->nxjp - fjm * g->nxjm + fkp * g->nxkp - fkm * g->nxkm);
+    dfdy = g->ovol * (fip * g->nyip - fim * g->nyim + fjp * g->nyjp - fjm * g->nyjm + fkp * g->nykp - fkm * g->nykm);
+    dfdz = g->ovol * (fip * g->nzip - fim * g->nzim + fjp * g->nzjp - fjm * g->nzjm + fkp * g->nzkp - fkm * g->nzkm);
+}
+
+void DXDYDZ(RDouble4D & f,GreenGeo3D * g,int i,int j,int k,int js,int ks,int npos,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz)
+{
+    int    ip,im,jp,jm,kp,km;
+    RDouble fip,fim,fjp,fjm,fkp,fkm;
+
+    //ip = i + 1;
+    //im = i - 1;
+    //jp = j + 1;
+    //jm = j - 1;
+    //kp = k + 1;
+    //km = k - 1;
+
+    ip = i + 1;
+    im = i - 1;
+    jp = j + js;
+    jm = j - js;
+    kp = k + ks;
+    km = k - ks;
+
+    fip = half * (f(i,j,k,npos) + f(ip,j,k,npos));
+    fim = half * (f(i,j,k,npos) + f(im,j,k,npos));
+    fjp = half * (f(i,j,k,npos) + f(i,jp,k,npos));
+    fjm = half * (f(i,j,k,npos) + f(i,jm,k,npos));
+    fkp = half * (f(i,j,k,npos) + f(i,j,kp,npos));
+    fkm = half * (f(i,j,k,npos) + f(i,j,km,npos));
+
+    dfdx = g->ovol * (fip * g->nxip - fim * g->nxim + fjp * g->nxjp - fjm * g->nxjm + fkp * g->nxkp - fkm * g->nxkm);
+    dfdy = g->ovol * (fip * g->nyip - fim * g->nyim + fjp * g->nyjp - fjm * g->nyjm + fkp * g->nykp - fkm * g->nykm);
+    dfdz = g->ovol * (fip * g->nzip - fim * g->nzim + fjp * g->nzjp - fjm * g->nzjm + fkp * g->nzkp - fkm * g->nzkm);
+}
+
+void DXDYDZ_I(RDouble3D & f,GreenGeo3D * g,int i,int j,int k,int js,int ks,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz)
+{
+    int im,jm,km,ip,jp,kp;
+    RDouble fim,fjm,fkm,fip,fjp,fkp;
+
+    //ip = i;
+    //im = i - 1;
+    //jp = j + 1;
+    //jm = j - 1;
+    //kp = k + 1;
+    //km = k - 1;
+
+    ip = i;
+    im = i - 1;
+    jp = j + js;
+    jm = j - js;
+    kp = k + ks;
+    km = k - ks;
+
+    fip = f(ip,j,k);
+    fim = f(im,j,k);
+    fjp = fourth * (fip + fim + f(ip,jp,k) + f(im,jp,k));
+    fjm = fourth * (fip + fim + f(ip,jm,k) + f(im,jm,k));
+    fkp = fourth * (fip + fim + f(ip,j,kp) + f(im,j,kp));
+    fkm = fourth * (fip + fim + f(ip,j,km) + f(im,j,km));
+
+    dfdx = g->ovol * (fip * g->nxip - fim * g->nxim + fjp * g->nxjp - fjm * g->nxjm + fkp * g->nxkp - fkm * g->nxkm);
+    dfdy = g->ovol * (fip * g->nyip - fim * g->nyim + fjp * g->nyjp - fjm * g->nyjm + fkp * g->nykp - fkm * g->nykm);
+    dfdz = g->ovol * (fip * g->nzip - fim * g->nzim + fjp * g->nzjp - fjm * g->nzjm + fkp * g->nzkp - fkm * g->nzkm);
+}
+
+
+void DXDYDZ_J(RDouble3D & f,GreenGeo3D * g,int i,int j,int k,int js,int ks,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz)
+{
+    int im,jm,km,ip,jp,kp;
+    RDouble fim,fjm,fkm,fip,fjp,fkp;
+
+    //ip = i + 1;
+    //im = i - 1;
+    //jp = j;
+    //jm = j - 1;
+    //kp = k + 1;
+    //km = k - 1;
+
+    ip = i + 1;
+    im = i - 1;
+    jp = j;
+    jm = j - js;
+    kp = k + ks;
+    km = k - ks;
+
+    fjp = f(i,jp,k);
+    fjm = f(i,jm,k);
+    fkp = fourth * (fjp + fjm + f(i,jp,kp) + f(i,jm,kp));
+    fkm = fourth * (fjp + fjm + f(i,jp,km) + f(i,jm,km));
+    fip = fourth * (fjp + fjm + f(ip,jp,k) + f(ip,jm,k));
+    fim = fourth * (fjp + fjm + f(im,jp,k) + f(im,jm,k));
+
+    dfdx = g->ovol * (fip * g->nxip - fim * g->nxim + fjp * g->nxjp - fjm * g->nxjm + fkp * g->nxkp - fkm * g->nxkm);
+    dfdy = g->ovol * (fip * g->nyip - fim * g->nyim + fjp * g->nyjp - fjm * g->nyjm + fkp * g->nykp - fkm * g->nykm);
+    dfdz = g->ovol * (fip * g->nzip - fim * g->nzim + fjp * g->nzjp - fjm * g->nzjm + fkp * g->nzkp - fkm * g->nzkm);
+}
+
+void DXDYDZ_K(RDouble3D & f,GreenGeo3D * g,int i,int j,int k,int js,int ks,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz)
+{
+    int im,jm,km,ip,jp,kp;
+    RDouble fim,fjm,fkm,fip,fjp,fkp;
+
+    //ip = i + 1;
+    //im = i - 1;
+    //jp = j + 1;
+    //jm = j - 1;
+    //kp = k;
+    //km = k - 1;
+
+    ip = i + 1;
+    im = i - 1;
+    jp = j + js;
+    jm = j - js;
+    kp = k;
+    km = k - ks;
+
+    fkp = f(i,j,kp);
+    fkm = f(i,j,km);
+    fip = fourth * (fkp + fkm + f(ip,j,kp) + f(ip,j,km));
+    fim = fourth * (fkp + fkm + f(im,j,kp) + f(im,j,km));
+    fjp = fourth * (fkp + fkm + f(i,jp,kp) + f(i,jp,km));
+    fjm = fourth * (fkp + fkm + f(i,jm,kp) + f(i,jm,km));
+
+    dfdx = g->ovol * (fip * g->nxip - fim * g->nxim + fjp * g->nxjp - fjm * g->nxjm + fkp * g->nxkp - fkm * g->nxkm);
+    dfdy = g->ovol * (fip * g->nyip - fim * g->nyim + fjp * g->nyjp - fjm * g->nyjm + fkp * g->nykp - fkm * g->nykm);
+    dfdz = g->ovol * (fip * g->nzip - fim * g->nzim + fjp * g->nzjp - fjm * g->nzjm + fkp * g->nzkp - fkm * g->nzkm);
+}
+
+void DXDYDZ_I(RDouble4D & f,GreenGeo3D * g,int i,int j,int k,int js,int ks,int npos,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz)
+{
+    int im,jm,km,ip,jp,kp;
+    RDouble fim,fjm,fkm,fip,fjp,fkp;
+
+    //ip = i;
+    //im = i - 1;
+    //jp = j + 1;
+    //jm = j - 1;
+    //kp = k + 1;
+    //km = k - 1;
+
+    ip = i;
+    im = i - 1;
+    jp = j + js;
+    jm = j - js;
+    kp = k + ks;
+    km = k - ks;
+
+    fip = f(ip,j,k,npos);
+    fim = f(im,j,k,npos);
+    fjp = fourth * (fip + fim + f(ip,jp,k,npos) + f(im,jp,k,npos));
+    fjm = fourth * (fip + fim + f(ip,jm,k,npos) + f(im,jm,k,npos));
+    fkp = fourth * (fip + fim + f(ip,j,kp,npos) + f(im,j,kp,npos));
+    fkm = fourth * (fip + fim + f(ip,j,km,npos) + f(im,j,km,npos));
+
+    dfdx = g->ovol * (fip * g->nxip - fim * g->nxim + fjp * g->nxjp - fjm * g->nxjm + fkp * g->nxkp - fkm * g->nxkm);
+    dfdy = g->ovol * (fip * g->nyip - fim * g->nyim + fjp * g->nyjp - fjm * g->nyjm + fkp * g->nykp - fkm * g->nykm);
+    dfdz = g->ovol * (fip * g->nzip - fim * g->nzim + fjp * g->nzjp - fjm * g->nzjm + fkp * g->nzkp - fkm * g->nzkm);
+}
+
+void DXDYDZ_J(RDouble4D & f,GreenGeo3D * g,int i,int j,int k,int js,int ks,int npos,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz)
+{
+    int im,jm,km,ip,jp,kp;
+    RDouble fim,fjm,fkm,fip,fjp,fkp;
+
+    //ip = i + 1;
+    //im = i - 1;
+    //jp = j;
+    //jm = j - 1;
+    //kp = k + 1;
+    //km = k - 1;
+
+    ip = i + 1;
+    im = i - 1;
+    jp = j;
+    jm = j - js;
+    kp = k + ks;
+    km = k - ks;
+
+    fjp = f(i,jp,k,npos);
+    fjm = f(i,jm,k,npos);
+    fkp = fourth * (fjp + fjm + f(i,jp,kp,npos) + f(i,jm,kp,npos));
+    fkm = fourth * (fjp + fjm + f(i,jp,km,npos) + f(i,jm,km,npos));
+    fip = fourth * (fjp + fjm + f(ip,jp,k,npos) + f(ip,jm,k,npos));
+    fim = fourth * (fjp + fjm + f(im,jp,k,npos) + f(im,jm,k,npos));
+
+    dfdx = g->ovol * (fip * g->nxip - fim * g->nxim + fjp * g->nxjp - fjm * g->nxjm + fkp * g->nxkp - fkm * g->nxkm);
+    dfdy = g->ovol * (fip * g->nyip - fim * g->nyim + fjp * g->nyjp - fjm * g->nyjm + fkp * g->nykp - fkm * g->nykm);
+    dfdz = g->ovol * (fip * g->nzip - fim * g->nzim + fjp * g->nzjp - fjm * g->nzjm + fkp * g->nzkp - fkm * g->nzkm);
+}
+
+void DXDYDZ_K(RDouble4D & f,GreenGeo3D * g,int i,int j,int k,int js,int ks,int npos,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz)
+{
+    int im,jm,km,ip,jp,kp;
+    RDouble fim,fjm,fkm,fip,fjp,fkp;
+
+    //ip = i + 1;
+    //im = i - 1;
+    //jp = j + 1;
+    //jm = j - 1;
+    //kp = k;
+    //km = k - 1;
+
+    ip = i + 1;
+    im = i - 1;
+    jp = j + js;
+    jm = j - js;
+    kp = k;
+    km = k - ks;
+
+    fkp = f(i,j,kp,npos);
+    fkm = f(i,j,km,npos);
+    fip = fourth * (fkp + fkm + f(ip,j,kp,npos) + f(ip,j,km,npos));
+    fim = fourth * (fkp + fkm + f(im,j,kp,npos) + f(im,j,km,npos));
+    fjp = fourth * (fkp + fkm + f(i,jp,kp,npos) + f(i,jp,km,npos));
+    fjm = fourth * (fkp + fkm + f(i,jm,kp,npos) + f(i,jm,km,npos));
+
+    dfdx = g->ovol * (fip * g->nxip - fim * g->nxim + fjp * g->nxjp - fjm * g->nxjm + fkp * g->nxkp - fkm * g->nxkm);
+    dfdy = g->ovol * (fip * g->nyip - fim * g->nyim + fjp * g->nyjp - fjm * g->nyjm + fkp * g->nykp - fkm * g->nykm);
+    dfdz = g->ovol * (fip * g->nzip - fim * g->nzim + fjp * g->nzjp - fjm * g->nzjm + fkp * g->nzkp - fkm * g->nzkm);
+}
+
+void GradCenter(Grid *grid_in, RDouble4D &q, RDouble3D &dqdx, RDouble3D &dqdy, RDouble3D &dqdz, int m)
+{
+    StructGrid *grid = StructGridCast(grid_in);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &xfv  = *(grid->GetFaceVectorX());
+    RDouble4D &yfv  = *(grid->GetFaceVectorY());
+    RDouble4D &zfv  = *(grid->GetFaceVectorZ());
+    RDouble3D &vol  = *(grid->GetCellVolume() );
+
+    int ndim = GetDim();
+
+    dqdx = 0.0;
+    dqdy = 0.0;
+    dqdz = 0.0;
+
+    for (int nsurf = 1; nsurf <= ndim; ++ nsurf)
+    {
+        int il1,jl1,kl1;
+        GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+        int ist = 1;
+        int ied = ni-1+il1;
+        int jst = 1;
+        int jed = nj-1+jl1;
+        int kst = 1;
+        int ked = nk-1+kl1;
+
+        if (ndim == TWO_D) ked = 1;
+
+        int il,jl,kl;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    il = i - il1;
+                    jl = j - jl1;
+                    kl = k - kl1;
+
+                    RDouble phis = q(i,j,k,m) + q(il,jl,kl,m);
+
+                    RDouble ddx = phis * xfv(i,j,k,nsurf);
+                    RDouble ddy = phis * yfv(i,j,k,nsurf);
+                    RDouble ddz = phis * zfv(i,j,k,nsurf);
+
+                    dqdx(i ,j ,k) -= ddx;
+                    dqdy(i ,j ,k) -= ddy;
+                    dqdz(i ,j ,k) -= ddz;
+
+                    dqdx(il,jl,kl) += ddx;
+                    dqdy(il,jl,kl) += ddy;
+                    dqdz(il,jl,kl) += ddz;
+                }
+            }
+        }
+    }
+
+    int ist = 1;
+    int ied = ni-1;
+    int jst = 1;
+    int jed = nj-1;
+    int kst = 1;
+    int ked = nk-1;
+
+    if (ndim == TWO_D) ked = 1;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble oov = half / vol(i,j,k);
+                dqdx(i,j,k) *= oov;
+                dqdy(i,j,k) *= oov;
+                dqdz(i,j,k) *= oov;
+            }
+        }
+    }
+}
+
+void GradCenter(Grid *grid_in, RDouble3D &q, RDouble3D &dqdx, RDouble3D &dqdy, RDouble3D &dqdz)
+{
+    StructGrid *grid = StructGridCast(grid_in);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &xfv  = *(grid->GetFaceVectorX());
+    RDouble4D &yfv  = *(grid->GetFaceVectorY());
+    RDouble4D &zfv  = *(grid->GetFaceVectorZ());
+    RDouble3D &vol  = *(grid->GetCellVolume() );
+
+    int ndim = GetDim();
+
+    dqdx = 0.0;
+    dqdy = 0.0;
+    dqdz = 0.0;
+
+    for (int nsurf = 1; nsurf <= ndim; ++ nsurf)
+    {
+        int il1,jl1,kl1;
+        GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+        int ist = 1;
+        int ied = ni-1+il1;
+        int jst = 1;
+        int jed = nj-1+jl1;
+        int kst = 1;
+        int ked = nk-1+kl1;
+
+        if (ndim == TWO_D) ked = 1;
+
+        int il,jl,kl;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    il = i - il1;
+                    jl = j - jl1;
+                    kl = k - kl1;
+
+                    RDouble phis = q(i,j,k) + q(il,jl,kl);
+
+                    RDouble ddx = phis * xfv(i,j,k,nsurf);
+                    RDouble ddy = phis * yfv(i,j,k,nsurf);
+                    RDouble ddz = phis * zfv(i,j,k,nsurf);
+
+                    dqdx(i ,j ,k) -= ddx;
+                    dqdy(i ,j ,k) -= ddy;
+                    dqdz(i ,j ,k) -= ddz;
+
+                    dqdx(il,jl,kl) += ddx;
+                    dqdy(il,jl,kl) += ddy;
+                    dqdz(il,jl,kl) += ddz;
+                }
+            }
+        }
+    }
+
+    int ist = 1;
+    int ied = ni-1;
+    int jst = 1;
+    int jed = nj-1;
+    int kst = 1;
+    int ked = nk-1;
+
+    if (ndim == TWO_D) ked = 1;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble oov = half / vol(i,j,k);
+                dqdx(i,j,k) *= oov;
+                dqdy(i,j,k) *= oov;
+                dqdz(i,j,k) *= oov;
+            }
+        }
+    }
+}
+
+void Get_GEO_I(int i, int j, int k, int im, int ip, int ndim, Geometry3D *geometry3D, RDouble4D &xfv, RDouble4D &yfv, RDouble4D &zfv, RDouble3D &vol)
+{
+
+    geometry3D->kx = xfv(i,j,k,1);
+    geometry3D->ky = yfv(i,j,k,1);
+    geometry3D->kz = zfv(i,j,k,1);
+                                                         
+    geometry3D->ex = fourth * (xfv(im,j,k,2) + xfv(im,j+1,k,2) + xfv(ip,j,k,2) + xfv(ip,j+1,k,2));
+    geometry3D->ey = fourth * (yfv(im,j,k,2) + yfv(im,j+1,k,2) + yfv(ip,j,k,2) + yfv(ip,j+1,k,2));
+    geometry3D->ez = fourth * (zfv(im,j,k,2) + zfv(im,j+1,k,2) + zfv(ip,j,k,2) + zfv(ip,j+1,k,2));
+
+    if (ndim == THREE_D)
+    {
+        geometry3D->cx = fourth * (xfv(im,j,k,3) + xfv(im,j,k+1,3) + xfv(ip,j,k,3) + xfv(ip,j,k+1,3));
+        geometry3D->cy = fourth * (yfv(im,j,k,3) + yfv(im,j,k+1,3) + yfv(ip,j,k,3) + yfv(ip,j,k+1,3));
+        geometry3D->cz = fourth * (zfv(im,j,k,3) + zfv(im,j,k+1,3) + zfv(ip,j,k,3) + zfv(ip,j,k+1,3));
+    }
+    else
+    {
+        geometry3D->cx = 0.0;
+        geometry3D->cy = 0.0;
+        geometry3D->cz = 0.0;
+    }
+
+    geometry3D->vjacob = two / (vol(im,j,k) + vol(ip,j,k));
+}
+
+void Get_GEO_J(int i, int j, int k, int jm, int jp, int ndim, Geometry3D *geometry3D, RDouble4D &xfv, RDouble4D &yfv, RDouble4D &zfv, RDouble3D &vol)
+{
+
+    geometry3D->kx = fourth * (xfv(i,jm,k,1) + xfv(i+1,jm,k,1) + xfv(i,jp,k,1) + xfv(i+1,jp,k,1));
+    geometry3D->ky = fourth * (yfv(i,jm,k,1) + yfv(i+1,jm,k,1) + yfv(i,jp,k,1) + yfv(i+1,jp,k,1));
+    geometry3D->kz = fourth * (zfv(i,jm,k,1) + zfv(i+1,jm,k,1) + zfv(i,jp,k,1) + zfv(i+1,jp,k,1));
+
+    geometry3D->ex = xfv(i,j,k,2);
+    geometry3D->ey = yfv(i,j,k,2);
+    geometry3D->ez = zfv(i,j,k,2);                                                         
+
+    if (ndim == THREE_D)
+    {
+        geometry3D->cx = fourth * (xfv(i,jm,k,3) + xfv(i,jm,k+1,3) + xfv(i,jp,k,3) + xfv(i,jp,k+1,3));
+        geometry3D->cy = fourth * (yfv(i,jm,k,3) + yfv(i,jm,k+1,3) + yfv(i,jp,k,3) + yfv(i,jp,k+1,3));
+        geometry3D->cz = fourth * (zfv(i,jm,k,3) + zfv(i,jm,k+1,3) + zfv(i,jp,k,3) + zfv(i,jp,k+1,3));
+    }
+    else
+    {
+        geometry3D->cx = 0.0;
+        geometry3D->cy = 0.0;
+        geometry3D->cz = 0.0;
+    }
+
+    geometry3D->vjacob = two / (vol(i,jm,k) + vol(i,jp,k));
+}
+
+void Get_GEO_K(int i, int j, int k, int km, int kp, Geometry3D *geometry3D, RDouble4D &xfv, RDouble4D &yfv, RDouble4D &zfv, RDouble3D &vol)
+{
+
+    geometry3D->kx = fourth * (xfv(i,j,km,1) + xfv(i+1,j,km,1) + xfv(i,j,kp,1) + xfv(i+1,j,kp,1));
+    geometry3D->ky = fourth * (yfv(i,j,km,1) + yfv(i+1,j,km,1) + yfv(i,j,kp,1) + yfv(i+1,j,kp,1));
+    geometry3D->kz = fourth * (zfv(i,j,km,1) + zfv(i+1,j,km,1) + zfv(i,j,kp,1) + zfv(i+1,j,kp,1));
+
+    geometry3D->ex = fourth * (xfv(i,j,km,2) + xfv(i,j+1,km,2) + xfv(i,j,kp,2) + xfv(i,j+1,kp,2));
+    geometry3D->ey = fourth * (yfv(i,j,km,2) + yfv(i,j+1,km,2) + yfv(i,j,kp,2) + yfv(i,j+1,kp,2));
+    geometry3D->ez = fourth * (zfv(i,j,km,2) + zfv(i,j+1,km,2) + zfv(i,j,kp,2) + zfv(i,j+1,kp,2));
+
+    geometry3D->cx = xfv(i,j,k,3);
+    geometry3D->cy = yfv(i,j,k,3);
+    geometry3D->cz = zfv(i,j,k,3);
+                                                         
+    geometry3D->vjacob = two / (vol(i,j,km) + vol(i,j,kp));
+}
+
+void DXDYDZ_I(RDouble4D & f,Geometry3D * g,int i,int j,int k,int ndim,int npos,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz,int lr)
+{
+    int im,jm,km,ip,jp,kp;
+    RDouble fkc,fet,fct;
+    //set ip & im to be the index of first layer and first ghost layer near solidwall
+    //(eapecially when the wall is at the right side of one zone).
+    ip = max(i,i+lr);
+    im = min(i,i+lr);
+    jp = j + 1;
+    jm = j - 1;
+    if (ndim == THREE_D)
+    {
+        kp = k + 1;
+        km = k - 1;
+    }
+    else if(ndim == TWO_D)
+    {
+        kp = k;
+        km = k;
+    }
+
+    fkc = f(ip,j,k,npos) - f(im,j,k,npos);
+    fet = 0.0;
+    fct = 0.0;
+
+    dfdx = g->vjacob * (fkc * g->kx + fet * g->ex + fct * g->cx);
+    dfdy = g->vjacob * (fkc * g->ky + fet * g->ey + fct * g->cy);
+    dfdz = 0.0;
+    if (ndim == THREE_D)
+    {
+        dfdz = g->vjacob * (fkc * g->kz + fet * g->ez + fct * g->cz);
+    }
+}
+
+void DXDYDZ_J(RDouble4D & f,Geometry3D * g,int i,int j,int k,int ndim,int npos,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz,int lr)
+{
+    int im,jm,km,ip,jp,kp;
+    RDouble fkc,fet,fct;
+
+    ip = i + 1;
+    im = i - 1;
+    //set jp & jm to be the index of first layer and first ghost layer near solidwall
+    //(eapecially when the wall is at the right side of one zone).
+    jp = max(j,j+lr);
+    jm = min(j,j+lr);
+    if (ndim == THREE_D)
+    {
+        kp = k + 1;
+        km = k - 1;
+    }
+    else if(ndim == TWO_D)
+    {
+        kp = k;
+        km = k;
+    }
+
+    fkc = 0.0;
+    fet = f(i,jp,k,npos) - f(i,jm,k,npos);
+    fct = 0.0;
+
+    dfdx = g->vjacob * (fkc * g->kx + fet * g->ex + fct * g->cx);
+    dfdy = g->vjacob * (fkc * g->ky + fet * g->ey + fct * g->cy);
+    dfdz = 0.0;
+    if (ndim == THREE_D)
+    {
+        dfdz = g->vjacob * (fkc * g->kz + fet * g->ez + fct * g->cz);
+    }
+}
+
+
+void DXDYDZ_K(RDouble4D & f,Geometry3D * g,int i,int j,int k,int npos,RDouble &dfdx,RDouble &dfdy,RDouble &dfdz,int lr)
+{
+    int im,jm,km,ip,jp,kp;
+    RDouble fkc,fet,fct;
+
+    ip = i + 1;
+    im = i - 1;
+    jp = j + 1;
+    jm = j - 1;
+    //set kp & km to be the index of first layer and first ghost layer near solidwall
+    //(eapecially when the wall is at the right side of one zone).
+    kp = max(k,k+lr);
+    km = min(k,k+lr);
+
+    fkc = 0.0;
+    fet = 0.0;
+    fct = f(i,j,kp,npos) - f(i,j,km,npos);
+
+    dfdx = g->vjacob * (fkc * g->kx + fet * g->ex + fct * g->cx);
+    dfdy = g->vjacob * (fkc * g->ky + fet * g->ey + fct * g->cy);
+    dfdz = g->vjacob * (fkc * g->kz + fet * g->ez + fct * g->cz);
+}
+
+}
\ No newline at end of file
diff --git a/API/Physics/src/GridGroup.cpp b/API/Physics/src/GridGroup.cpp
new file mode 100644
index 0000000..b73c4f4
--- /dev/null
+++ b/API/Physics/src/GridGroup.cpp
@@ -0,0 +1,256 @@
+#include "GridGroup.h"
+#include "TK_Exit.h"
+#include "GridType.h"
+#include "PHIO.h"
+#include "TK_Log.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+GridGroup::GridGroup(int zoneStart)
+{
+    block_proc_dump = 0; // Bell 20131124 add
+    nzones     = 0;
+    block_proc = 0;
+    block_proc_grid = 0;
+    block_type = 0;
+    block_idx  = 0;
+    block_fileProc = 0;
+    this->zoneStart = zoneStart;
+    region     = 0;
+}
+
+GridGroup::~GridGroup()
+{
+    delete [] block_proc_dump; // Bell 20131124 add
+    delete [] block_proc;
+    delete [] block_proc_grid;
+    delete [] block_type;
+    delete [] block_idx ;
+    delete [] block_fileProc;
+}
+
+void GridGroup::InitZoneLayoutInformation(const string &filename)
+{
+    fstream file;
+    OpenSerialFile(file, filename, ios_base::in|ios_base::binary);
+
+    InitZoneLayout(file);
+    SetGlobalZoneLayout();
+
+    ParallelCloseFile(file);
+}
+
+void GridGroup::SetGlobalZoneLayout()
+{
+    using namespace PHMPI;
+
+    if(!GetZoneGridType())
+    {
+        SetNumberOfGlobalZones(nzones);
+        CreateZoneProcessorIDDump(nzones);
+        CreateZoneProcessorID(nzones);
+        CreateZoneGridID     (nzones);
+        CreateZoneGridType   (nzones);
+        CreateZoneFileID     (nzones);
+    }
+
+    int * global_block_proc      = GetZoneProcessorID();
+    int * global_block_proc_grid = GetZoneProcessorIDForGrid();
+    int * global_block_type      = GetZoneGridType();
+    int * global_block_idx       = GetZoneGridID();
+    int * global_block_file      = GetZoneFileID();
+    int * global_block_proc_dump = GetZoneProcessorIDDump();
+
+    set< int > zoneIDinCurrentProc;
+    int myid = GetCurrentProcessorID();
+    for (int iZone = 0; iZone < nzones; ++ iZone)
+    {
+        int multi_izone = zoneStart + iZone;
+
+        global_block_proc     [multi_izone] = block_proc     [iZone];
+        global_block_proc_grid[multi_izone] = block_proc_grid[iZone];
+        global_block_type     [multi_izone] = block_type     [iZone];
+        global_block_idx      [multi_izone] = block_idx      [iZone];
+        global_block_file     [multi_izone] = block_fileProc [iZone];
+
+        if (block_proc[iZone] == myid || block_proc_grid[iZone] == myid)
+        {
+            zoneIDinCurrentProc.insert(iZone);
+        }
+    }
+
+    ostringstream oss;
+    oss << "Zone index in current processor : ";
+    for (set<int>::iterator iter = zoneIDinCurrentProc.begin(); iter != zoneIDinCurrentProc.end(); ++ iter)
+    {
+        int partID = * iter;
+        oss << partID << " ";
+    }
+    oss << endl;
+    WriteLogFile(oss.str());
+
+    //! global_block_proc_dump would be deleted?
+    for (int iZone = 0; iZone < nzones; ++ iZone)
+    {
+        int multi_izone = zoneStart + iZone;
+        global_block_proc_dump[multi_izone] = block_proc_dump[iZone];
+    }
+}
+
+void GridGroup::InitZoneLayout(fstream &file)
+{
+    using namespace PHMPI;
+
+    int file_proc;
+    GetFileProc(file_proc);
+
+    PH_Read_Bcast(file, &nzones, sizeof(int), file_proc);
+
+    block_proc = new int [nzones];
+    block_proc_grid = new int [nzones];
+    block_fileProc = new int [nzones];
+
+    //! Initialization.
+    for (int iZone = 0; iZone < nzones; ++ iZone)
+    {
+        block_proc[iZone] = 0;
+        block_proc_grid[iZone] = 0;
+        block_fileProc[iZone] = 0;
+    }
+
+    PH_Read_Bcast(file, block_proc, nzones*sizeof(int), file_proc);
+    PH_Read_Bcast(file, block_proc_grid, nzones*sizeof(int), file_proc);
+
+    //! block_proc_dump is deleted in ~GridGroup() function.
+    block_proc_dump = new int [nzones];
+    for (int iZone = 0; iZone < nzones; ++ iZone)
+    {
+        block_proc_dump[iZone] = block_proc[iZone];
+    }
+
+    block_idx  = new int [nzones];
+    block_type = new int [nzones];
+
+    //! Read the index of each block,actually nb defaults to iZone.
+    PH_Read_Bcast(file, block_idx, nzones*sizeof(int), file_proc);
+
+    //! Read the grid type of each block,it can be unstructured and structured.
+    PH_Read_Bcast(file, block_type, nzones*sizeof(int), file_proc);
+
+    int m_block_proc = PHMPI::GetZoneDistributionMethod();
+
+    int number_of_processor = GetNumberOfProcessor();
+
+    if (m_block_proc == REDISTRIBUTION)
+    {
+        if (number_of_processor <= nzones)
+        {
+            for (int iZone = 0; iZone < nzones; ++ iZone)
+            {
+                block_proc[iZone] = (zoneStart + iZone) % number_of_processor;
+            }
+        }
+        else
+        {
+            string cs;
+            std::ostringstream oss;
+            oss << "When the parallel policy is determined by the system (m_block_proc = 1), the number of processes started must be less than the number of partitions!\n" 
+                << "   ---- Number of processes = " << number_of_processor << ", Number of partitions = " << nzones << " ----\n" 
+                << "Abnormally Exit Program!!!\n";
+            cs = oss.str();
+
+            cout << cs << endl;
+
+            TK_Exit::ExceptionExit(cs);
+        }
+    }
+    else
+    {
+        if (number_of_processor == 1)
+        {
+            if (IsConvertGridToMixGrid())
+            {
+                //! For structured + unstructured = mix grid,move the specified process of  unstructured grid partition backward.
+                if (block_type[0] == PHSPACE::STRUCTGRID)
+                {
+                    int maxproc = block_proc[0];
+                    for (int iZone = 0; iZone < nzones; ++ iZone)
+                    {
+                        if (block_proc[iZone] > maxproc)
+                        {
+                            maxproc = block_proc[iZone];
+                        }
+                    }
+                    maxproc += 1;
+                    SetNumberOfProcStructUsed(maxproc);
+                }
+                else
+                {
+                    for (int iZone = 0; iZone < nzones; ++ iZone)
+                    {
+                        block_proc_dump[iZone] += GetNumberOfProcStructUsed();
+                    }
+                }
+            }
+            for (int iZone = 0; iZone < nzones; ++ iZone)
+            {
+                block_proc[iZone] = 0;
+            }
+        }
+        else
+        {
+            int maxproc = block_proc[0];
+            for (int iZone = 0; iZone < nzones; ++ iZone)
+            {
+                if (block_proc[iZone] > maxproc)
+                {
+                    maxproc = block_proc[iZone];
+                }
+            }
+
+            maxproc += 1;
+            if (number_of_processor != maxproc)
+            {
+                string cs;
+                std::ostringstream oss;
+                oss << "When a parallel policy is run with a specified partition (m_block_proc = 0), the number of processes started must be less than the number of partitions!\n" 
+                    << "   ---- Number of processes = " << number_of_processor << ", Number of partitions = " << maxproc << " ----\n" 
+                    << "Abnormally Exit Program!!!\n";
+                cs = oss.str();
+
+                cout << cs << endl;
+
+                TK_Exit::ExceptionExit(cs);
+            }
+        }
+    }
+}
+
+void GridGroup::AddGrid(Grid *grid)
+{
+    grids.push_back(grid);
+}
+
+bool GridGroup::IsZoneLayoutInitialized()
+{
+    if (this->block_idx || this->block_proc || this->block_type)
+    {
+        return true;
+    }
+    else
+    {
+        return false;
+    }
+}
+
+int GridGroup::GetNumberofGrid() const
+{
+    return static_cast<int>(grids.size());
+}
+
+}
+
+
diff --git a/API/Physics/src/IO_GridReader.cpp b/API/Physics/src/IO_GridReader.cpp
new file mode 100644
index 0000000..f36258b
--- /dev/null
+++ b/API/Physics/src/IO_GridReader.cpp
@@ -0,0 +1,1693 @@
+#include "IO_GridReader.h"
+#include "Math_BasisFunction.h"
+#include "Geo_UnstructBC.h"
+#include "IO_FileName.h"
+#include "IO_HDF5File.h"
+#include "TK_Time.h"
+#include "PHIO.h"
+#include "GridType.h"
+
+namespace PHSPACE
+{
+using namespace PHMPI;
+
+LIB_EXPORT IO_GridReader::IO_GridReader(PHVectorString1D & gridGroupNameListIn, int dimension)
+{
+    globalFileNumber   = 0;
+    numberOfTotalZones = 0;
+    presentGridGroup   = 0;
+    this->gridGroupNameList = gridGroupNameListIn;
+    gridGroup = 0;
+    this->dimension = dimension;
+
+    myProcID = GetCurrentProcessorID();
+    serverProcID = 0;
+    if(myProcID == serverProcID)
+    {
+        this->fileID = 0;
+    }
+    else
+    {
+        this->fileID = -1;
+    }
+    nZonesList = new int [ PHMPI::GetNumberOfProcessor() + PHMPI::GetNumberOfGridProcessor() ];
+
+    cellnodeFileExist = false;
+    interpointInfoFileExist = false;
+    faceBCFileExist   = false;
+    walldistFileExist = false;
+}
+
+LIB_EXPORT IO_GridReader::~IO_GridReader()
+{
+    //delete gridGroup;
+    delete [] nZonesList;
+}
+
+void IO_GridReader::InitGridFileNameListAndFileProcessor()
+{
+    //! Global file number is determined by gridGroupNameList[0].
+    //! Each grid group should have the same number of files.
+    globalFileNumber = CheckNumberofFiles();
+
+    uint_t numberOfGridGroups = gridGroupNameList.size();
+
+    int fileProcessorInterval = PHMPI::GetIntervalofProcessorFiles();
+
+    bool isFileProcessor = (myProcID % fileProcessorInterval == 0 && myProcID < globalFileNumber * fileProcessorInterval);
+    
+    if(isFileProcessor)
+    {
+        //! This processor is the file server.
+        this->fileID = PHMPI::GetFileIndexofCurrentProcessor();
+
+        //! Set file processor index.
+        for(int iGridGroup = 0; iGridGroup < numberOfGridGroups; ++ iGridGroup)
+        {
+            string gridfileProc = PHSPACE::AddSymbolToFileName(gridGroupNameList[ iGridGroup ], "_", this->fileID);
+
+            gridGroupNameList[ iGridGroup ] = gridfileProc;
+        }
+    }
+    else
+    {
+        //! This processor is NOT file server.
+        this->fileID = -1;
+    }
+
+    WriteLogFile("File ID of current processor: ", fileID);
+
+    //! Check whether the cellToNodeFile or the faceBCFile exits.
+    cellnodeFileExist = true;
+
+    interpointInfoFileExist = true;
+
+    faceBCFileExist   = true;
+
+    walldistFileExist = true;
+
+    if(myProcID == serverProcID)
+    {
+        for(int iGridGroup = 0; iGridGroup < numberOfGridGroups; ++ iGridGroup)
+        {
+            for(int iFile = 0; iFile < globalFileNumber; ++ iFile)
+            {
+                string cellToNodeFileName = ChangeExtensionOfFileName(gridGroupNameList[ iGridGroup ], "c2n");
+
+                if(! FileExist(cellToNodeFileName))
+                {
+                    cellnodeFileExist = false;
+                    break;
+                }
+            }
+
+            for(int iFile = 0; iFile < globalFileNumber; ++ iFile)
+            {
+                string interpointInfoFileName = ChangeExtensionOfFileName(gridGroupNameList[iGridGroup], "interpoint");
+                
+                if (! FileExist(interpointInfoFileName))
+                {
+                    interpointInfoFileExist = false;
+                    break;
+                }
+            }
+
+            for(int iFile = 0; iFile < globalFileNumber; ++ iFile)
+            {
+                string faceBCFileName = ChangeExtensionOfFileName(gridGroupNameList[ iGridGroup ], "bc");
+
+                if(! FileExist(faceBCFileName))
+                {
+                    faceBCFileExist = false;
+                    break;
+                }
+            }
+
+            for(int iFile = 0; iFile < globalFileNumber; ++ iFile)
+            {
+                string walldistFileName = ChangeExtensionOfFileName(gridGroupNameList[ iGridGroup ], "wdt");
+
+                if(! FileExist(walldistFileName))
+                {
+                    walldistFileExist = false;
+                    break;
+                }
+            }
+        }
+    }
+
+    PH_BcastToClinet(& cellnodeFileExist, sizeof(bool), serverProcID, 2);
+
+    PH_BcastToClinet(& interpointInfoFileExist, sizeof(bool), serverProcID, 2);
+
+    PH_BcastToClinet(& faceBCFileExist,   sizeof(bool), serverProcID, 2);
+
+    PH_BcastToClinet(& walldistFileExist, sizeof(bool), serverProcID, 2);
+
+}
+
+void IO_GridReader::ReadNumberOfTotalZonesAndInitialGlobalValue()
+{
+    numberOfTotalZones = 0;
+
+    int numberOfProcessor = GetNumberOfProcessor();
+
+    for(unsigned int iGridGroup = 0; iGridGroup < gridGroupNameList.size(); ++ iGridGroup)
+    {
+        fstream file;
+
+        int nZones = 0;
+
+        Open(file, gridGroupNameList[ iGridGroup ], ios_base::in|ios_base::binary);
+
+        ReadNumberOfZones(file, nZones);
+
+        numberOfTotalZones += nZones;
+
+        Close(file);
+    }
+
+    //! Allocate global zone layout information.
+    SetNumberOfGlobalZones   (numberOfTotalZones);
+    CreateZoneProcessorIDDump(numberOfTotalZones);
+    CreateZoneProcessorID    (numberOfTotalZones);
+    CreateZoneGridID         (numberOfTotalZones);
+    CreateZoneGridType       (numberOfTotalZones);
+    CreateZoneFileID         (numberOfTotalZones);
+
+    if(numberOfTotalZones < numberOfProcessor)
+    {
+        ostringstream oss;
+        oss << "   ---- numberOfProcessor = " << numberOfProcessor << ", numberOfTotalZones = " << numberOfTotalZones << " ----\n"
+             << "Abnormally Exit Program!!!\n";
+        TK_Exit::ExceptionExit(oss.str());
+    }
+}
+
+int IO_GridReader::CheckNumberofFiles()
+{
+    //! P2P model.
+    string gridFileName = gridGroupNameList.front();
+
+    //! Set file processor index.
+    string gridfileProc = gridFileName;
+    gridfileProc = PHSPACE::AddSymbolToFileName(gridfileProc, "_", myProcID);
+    ifstream infile(gridfileProc.c_str(), ios_base::in);
+
+    int nFileProcessors = 0;
+    if(!infile)
+    {
+        if(myProcID == serverProcID)
+        {
+            //! The server processor must be file processor.
+            TK_Exit::FileOpenErrorExit(gridfileProc);
+        }
+    }
+    else
+    {
+        nFileProcessors = 1;
+
+        PHSPACE::CloseFile(infile);
+    }
+
+    PH_AllReduce(&nFileProcessors, &globalFileNumber, 1, MPI_SUM);
+    
+    PHMPI::SetNumberofFiles(globalFileNumber);
+    WriteLogFile("Global grid files number: ", globalFileNumber);
+    
+    return globalFileNumber;
+}
+
+bool IO_GridReader::CheckGridConvertionMixGrid()
+{
+    int nsimutask = GlobalDataBase::GetIntParaFromDB("nsimutask");
+    if(nsimutask != 1)
+    {
+        return false;
+    }
+
+    int gridobj = GlobalDataBase::GetIntParaFromDB("gridobj");
+    if(gridobj != 1)
+    {
+        return false;
+    }
+
+    int gridtype = GlobalDataBase::GetIntParaFromDB("gridtype");
+    if(gridtype != 2)
+    {
+        return false;
+    }
+
+    return true;
+}
+
+LIB_EXPORT void IO_GridReader::ReadGridsByP2PMode()
+{
+    WriteLogFile("Start to read grid ... ");
+
+    //! Init grid groups and files.
+    InitGridFileNameListAndFileProcessor();
+
+    //! Read number of total zones and initial global value.
+    ReadNumberOfTotalZonesAndInitialGlobalValue();
+
+    //! Build gridGroups. Read in layout and distribute.
+    int startZoneIndex = 0;
+
+    for(unsigned int iGridGroup = 0; iGridGroup < gridGroupNameList.size(); ++ iGridGroup)
+    {
+        ostringstream oss;
+        oss << "startZoneIndex = " << startZoneIndex << endl;
+        WriteLogFile(oss.str());
+
+        presentGridGroup = iGridGroup;
+
+        gridGroup = new GridGroup(startZoneIndex);
+
+        gridGroups.push_back(gridGroup);
+
+        ReadGridGroup(gridGroupNameList[ iGridGroup ], startZoneIndex);
+
+        startZoneIndex += gridGroup->GetNZones();
+    }
+
+    //ReadGrid(gridGroupNameList.front(), startZoneIndex);
+
+    WriteLogFile("End reading grid ... ");
+}
+
+//! Read in multi files by CS Mode.
+LIB_EXPORT void IO_GridReader::ReadGridsByCSMode()
+{
+    WriteLogFile("Read in grid(s) by CSMode ... ");
+
+    bool gridconvertionmixgrid = CheckGridConvertionMixGrid();
+
+    int numberOfOriginalProcessor = GetNumberOfProcessor();
+
+    uint_t numberOfGridFiles = gridGroupNameList.size();
+
+    numberOfTotalZones = 0;
+
+    if (myProcID == serverProcID)
+    {
+        this->fileID = 0;
+    }
+    else
+    {
+        this->fileID = -1;
+    }
+
+    this->numberOfZones.resize(0);
+
+    for (int iFile = 0; iFile < numberOfGridFiles; ++ iFile)
+    {
+        fstream file;
+
+        int nZones = 0;
+
+        //Open(file, gridGroupNameList[ iFile ], ios_base::in|ios_base::binary);
+        OpenSerialFile(file, gridGroupNameList[ iFile ], ios_base::in|ios_base::binary);
+
+        Read_Bcast(file, &nZones, sizeof(int));
+
+        this->numberOfZones.push_back(nZones);
+
+        numberOfTotalZones += nZones;
+
+        Close(file);
+    }
+
+    if(numberOfTotalZones < numberOfOriginalProcessor)
+    {
+        ostringstream oss;
+        cout << "   ---- numberOfProcessor = " << numberOfOriginalProcessor << ", numberOfTotalZones = " << numberOfTotalZones << " ----\n"
+             << "Abnormally Exit Program!!!\n";
+
+        TK_Exit::ExceptionExit(oss);
+    }
+
+    //! Allocate global zone layout information.
+    SetNumberOfGlobalZones   (numberOfTotalZones);
+    CreateZoneProcessorIDDump(numberOfTotalZones);
+    CreateZoneProcessorID    (numberOfTotalZones);
+    CreateZoneGridID         (numberOfTotalZones);
+    CreateZoneGridType       (numberOfTotalZones);
+    CreateZoneFileID         (numberOfTotalZones);
+
+    if (gridconvertionmixgrid)
+    {
+        CreatetZoneProcessorID_INP(numberOfTotalZones);
+    }
+
+    int startZoneIndex = 0;
+
+    for(int iFile = 0; iFile < numberOfGridFiles; ++ iFile)
+    {
+        presentGridGroup = iFile;
+
+        fstream file;
+
+        OpenSerialFile(file, gridGroupNameList[ iFile ], ios_base::in|ios_base::binary);
+
+        int nZones = 0;
+
+        Read_Bcast(file, &nZones, sizeof(int));
+
+        gridGroup = new GridGroup(startZoneIndex);
+
+        gridGroups.push_back(gridGroup);
+
+        gridGroup->SetNZones(nZones);
+
+        int * block_proc      = new int [nZones];
+        int * block_proc_grid = new int [nZones];
+        int * block_proc_dump = new int [nZones];
+        int * block_idx       = new int [nZones];
+        int * block_type      = new int [nZones];
+        int * block_file      = new int [nZones];
+        int * block_proc_tmpformix = new int [nZones];
+
+        Read_Bcast(file, block_proc, nZones * sizeof(int));
+        Read_Bcast(file, block_idx , nZones * sizeof(int));
+        Read_Bcast(file, block_type, nZones * sizeof(int));
+
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            block_proc_tmpformix[iZone] = block_proc[iZone];
+            block_proc_dump[iZone] = block_proc[iZone];
+            block_file[iZone]      = serverProcID;
+        }
+
+        gridGroup->SetBlockProc    (block_proc     );
+        gridGroup->SetBlockProcGrid(block_proc_grid);
+        gridGroup->SetBlockProcDump(block_proc_dump);
+        gridGroup->SetBlockIndex   (block_idx      );
+        gridGroup->SetBlockType    (block_type     );
+        gridGroup->SetBockFileProc (block_file     );
+
+        //! Attribute the grid zone to processor
+        //for (int iZone = 0; iZone < nZones; ++ iZone)
+        //{
+        //    block_proc[ iZone ] = (startZoneIndex + iZone) % numberOfOriginalProcessor;
+        //}
+
+        //if(numberOfGridProcessor != 0)
+        //{
+        //    for (int iZone = 0; iZone < nZones; ++ iZone)
+        //    {
+        //        block_proc_grid[ iZone ] = (startZoneIndex + iZone) % numberOfGridProcessor + numberOfOriginalProcessor;
+        //    }
+        //}
+        //else
+        //{
+        //    for (int iZone = 0; iZone < nZones; ++ iZone)
+        //    {
+        //        block_proc_grid[ iZone ] = -1;
+        //    }
+        //}
+
+        RedistributeZonesIfNeed(startZoneIndex);
+
+        gridGroup->SetGlobalZoneLayout();
+
+        if (gridconvertionmixgrid)
+        {
+            int *global_block_proc_inp = GetZoneProcessorID_INP();
+            for (int iZone = 0; iZone < nZones; ++ iZone)
+            {
+                int multi_izone = startZoneIndex + iZone;
+                global_block_proc_inp[multi_izone] = block_proc_tmpformix[iZone];
+            }
+        }
+
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            ReadOneZoneGrid(file, iZone);
+        }
+
+        startZoneIndex += nZones;
+
+        Close(file);
+
+        delete [] block_proc_tmpformix;
+    }
+
+    ClassifyGridSystem();
+
+    WriteLogFile("End reading grid ... ");
+}
+
+void IO_GridReader::ReadGridGroup(const string &gridFileName, int startZoneIndex)
+{
+    int nZones = 0;
+
+    fstream file;
+
+    Open(file, gridFileName, ios_base::in|ios_base::binary);
+
+    TimeSpan partTime;
+
+    ostringstream oss;
+
+    ReadNumberOfZones(file, nZones);
+
+    oss << "ReadNumberOfZones:" << partTime.GetTimeSpan() << endl; partTime.ResetTime();
+
+    ReadZoneLayout(file, nZones);
+    oss << "ReadZoneLayout:" << partTime.GetTimeSpan() << endl; partTime.ResetTime();
+
+    gridGroup->SetNZones(nZones);
+
+    RedistributeZonesIfNeed(startZoneIndex);
+
+    gridGroup->SetGlobalZoneLayout();
+
+    ClassifyGridSystem();
+
+    //! All of the global zones need to be looped over.
+    //! The zone not belong to this processor would be added by 'null'.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ReadOneZoneGrid(file, iZone);
+    }
+
+    oss << "ReadZoneGrid:" << partTime.GetTimeSpan() << endl; partTime.ResetTime();
+
+    WriteLogFile(oss);
+
+    Close(file);
+}
+
+void IO_GridReader::ReadNumberOfZones(fstream & file, int & nZones)
+{
+    int nZonesLocal = 0;
+
+    Read(file, &nZonesLocal, sizeof(int));
+
+    int nTProcessor = GetNumberOfProcessor() + GetNumberOfGridProcessor();
+    
+    //! old method.
+    //FillGobalData(nZonesLocal, nZonesList);
+
+    //* New method.
+    int * localSizeTemp = new int [ nTProcessor ];
+
+    SetField(localSizeTemp, 1, nTProcessor);
+
+    int ** nZonesListTemp = new int * [ nTProcessor ];
+
+    PHMPI::FillGobalDataCollectBcast(&nZonesLocal, localSizeTemp, nZonesListTemp);
+    
+    for (int iProc = 0; iProc < nTProcessor; ++ iProc)
+    {
+        nZonesList[ iProc ] = nZonesListTemp[ iProc ][ 0 ];
+    }
+
+    DelPointer2(nZonesListTemp);
+    DelPointer(localSizeTemp);
+
+    nZones = 0;
+    for (int iProc = 0; iProc < nTProcessor; ++ iProc)
+    {
+        nZones += nZonesList[ iProc ];
+    }
+
+    if (nZones == 0)
+    {
+        TK_Exit::ExceptionExit("Error: number of zones is 0");
+    }
+}
+
+void IO_GridReader::ReadZoneLayout(fstream & file, int nZones)
+{
+    int nTProcessors = PHMPI::GetNumberOfProcessor() + PHMPI::GetNumberOfGridProcessor() ;
+    int nZonesLocal = nZonesList[myProcID];
+
+    int * block_proc_local = new int [ nZonesLocal ];
+    int * block_proc_dump_local = new int [nZonesLocal];
+    int * block_idx_local  = new int [ nZonesLocal ];
+    int * block_type_local = new int [ nZonesLocal ];
+
+    for (int iZone = 0; iZone < nZonesLocal; ++ iZone)
+    {
+        block_proc_local[iZone] = -1;
+        block_idx_local[iZone]  = -1;
+        block_type_local[iZone] = -1;
+    }
+
+    //! Read the local layout information in this file.
+    Read(file, block_proc_local, nZonesLocal*sizeof(int));
+    Read(file, block_idx_local , nZonesLocal*sizeof(int));
+    Read(file, block_type_local, nZonesLocal*sizeof(int));
+
+    //! Compress the three information into ONE array,\n
+    //! to save the communication time.
+    int * tempArray = new int[3 * nZonesLocal];
+    int * tempSize  = new int[nTProcessors];
+    int count = 0;
+
+    for (int iZone = 0; iZone < nZonesLocal; ++ iZone)
+    {
+        tempArray[count++] = block_proc_local[iZone];
+        tempArray[count++] = block_idx_local[iZone];
+        tempArray[count++] = block_type_local[iZone];
+    }
+    
+    int ** globalData = new int * [nTProcessors];
+    for (int iProc = 0; iProc < nTProcessors; ++ iProc)
+    {
+        globalData[iProc] = 0;
+        tempSize[iProc] = nZonesList[iProc] * 3;
+    }
+
+    //! Bcast the zone layout information to each other processor.\n
+    //! Then the layout information of each processor obtained.
+    //PHMPI::FillGobalData(tempArray, tempSize, globalData);
+    PHSPACE::PHMPI::FillGobalDataCollectBcast(tempArray, tempSize, globalData);
+
+    //! Compute the global layout information.
+    int * block_proc = new int [ nZones ];
+    int * block_idx  = new int [ nZones ];
+    int * block_type = new int [ nZones ];
+    int * block_fileProc = new int [nZones];
+    int * block_proc_dump = new int [nZones];
+
+    int count1 = 0;
+    for (int iProcessor = 0; iProcessor < nTProcessors; ++ iProcessor)
+    {
+        int count2 = 0;
+        for (int jData = 0; jData < nZonesList[iProcessor]; ++ jData)
+        {
+            block_proc[count1] = globalData[iProcessor][count2++];
+            block_idx[count1]  = globalData[iProcessor][count2++];
+            block_type[count1] = globalData[iProcessor][count2++];
+
+            block_fileProc[block_idx[count1]] = iProcessor;
+            ++ count1;
+        }
+    }
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        block_proc_dump[iZone] = block_proc[iZone];
+    }
+
+    //! Free memory.
+    for (int iProc = 0; iProc < nTProcessors; ++ iProc)
+    {
+        int *temp = globalData[iProc];
+        if(temp) delete []temp;
+    }
+    delete [] globalData;
+    delete [] tempArray;
+    delete [] tempSize;
+    delete [] block_proc_local;
+    delete [] block_proc_dump_local;
+    delete [] block_idx_local;
+    delete [] block_type_local;
+
+    if (!gridGroup->IsZoneLayoutInitialized()) 
+    {
+        gridGroup->SetBlockProc(block_proc);
+        gridGroup->SetBlockProcDump(block_proc_dump);
+        gridGroup->SetBlockIndex(block_idx);
+        gridGroup->SetBlockType(block_type);
+        gridGroup->SetBockFileProc(block_fileProc);
+    }
+    else
+    {
+        delete [] block_proc;
+        delete [] block_proc_dump;
+        delete [] block_idx;
+        delete [] block_type;
+        delete [] block_fileProc;
+        return;
+    }
+}
+
+void IO_GridReader::ClassifyGridSystem()
+{
+    using namespace PHMPI;
+
+    set<int> grid_type;
+    for (int iZone = 0; iZone < numberOfTotalZones; ++ iZone)
+    {
+        grid_type.insert(GetZoneGridType(iZone));
+    }
+
+    int sys_gridtype = GetSystemGridType(grid_type);
+    GlobalDataBase::UpdateData("sys_gridtype", &sys_gridtype, PHINT, 1);
+
+    vector<string> sys_gridtype_name;
+    sys_gridtype_name.push_back("UNSTRUCTGRID");
+    sys_gridtype_name.push_back("STRUCTGRID");
+    sys_gridtype_name.push_back("MIXGRID");
+
+    PrintToWindow("Grid Type: ", sys_gridtype_name[sys_gridtype], "\n");
+}
+
+void IO_GridReader::RedistributeZonesIfNeed(int startZoneIndex)
+{
+    int nZones = gridGroup->GetNZones();
+    int number_of_processor = PHSPACE::GetNumberOfProcessor();
+    int * block_type      = gridGroup->GetBlockType();
+    int * block_proc      = gridGroup->GetBlockProc();
+    int * block_proc_grid = gridGroup->GetBlockProcGrid();
+    int * block_proc_dump = gridGroup->GetBlockProcDump();
+
+    int zoneDistributionMethod;
+    int maxproc = block_proc[0];
+    
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        maxproc = MAX(maxproc, block_proc[iZone]);
+    }
+    maxproc += 1;
+    if (number_of_processor == maxproc)
+    {
+        zoneDistributionMethod = DETERMIN_BY_PARTITION;
+    }else
+    {
+        zoneDistributionMethod = REDISTRIBUTION;
+    }
+
+    PHMPI::SetZoneDistributionMethod(zoneDistributionMethod);
+
+    ostringstream oss;
+    oss << "Max processor ID : " << maxproc << " of total zone " << nZones;
+    if(zoneDistributionMethod == DETERMIN_BY_PARTITION)
+    {
+        oss << ", Zones' distribution is specified by partition ...";
+    }
+    else
+    {
+        oss << ", Zones' distribution is specified randomly ...";
+    }
+    oss << endl;
+    WriteLogFile(oss);
+
+    if (zoneDistributionMethod == REDISTRIBUTION)
+    {
+        if(nZones % number_of_processor == 0)
+        {
+            int nZonesPerProcessor = nZones / number_of_processor;
+            int processorID = 0;
+            for (int iZone = 0; iZone < nZones; ++ iZone)
+            {
+                block_proc[iZone] = processorID;
+                if((iZone + 1) % nZonesPerProcessor == 0)
+                {
+                    processorID ++;
+                }
+            }
+        }
+        else
+        {
+            for (int iZone = 0; iZone < nZones; ++ iZone)
+            {
+                block_proc[iZone] = (startZoneIndex + iZone) % number_of_processor;
+            }
+        }
+    }
+    else
+    {
+        if (number_of_processor == 1)
+        {
+            //! Bell 20131124 add.
+            if (IsConvertGridToMixGrid())
+            {
+                //! For structured + unstructured = mix grid,move the specified process of  unstructured grid partition backward.
+                if (block_type[0] == PHSPACE::STRUCTGRID)
+                {
+                    maxproc = block_proc[0];
+                    for (int iZone = 0; iZone < nZones; ++ iZone)
+                    {
+                        if(block_proc[iZone] > maxproc)
+                        {
+                            maxproc = block_proc[iZone];
+                        }
+                    }
+                    maxproc += 1;
+                    SetNumberOfProcStructUsed(maxproc);
+                }
+                else
+                {
+                    for (int iZone = 0; iZone < nZones; ++ iZone)
+                    {
+                        block_proc_dump[iZone] += GetNumberOfProcStructUsed();
+                    }
+                }
+            }
+            for (int iZone = 0; iZone < nZones; ++ iZone)
+            {
+                block_proc[iZone] = 0;
+            }
+        }
+    }
+
+    if (!block_proc_grid)
+    {
+        block_proc_grid = new int[ nZones ];
+    }
+
+    gridGroup->SetBlockProcGrid(block_proc_grid);
+
+    int numberOfGridProcessor = GetNumberOfGridProcessor();
+
+    if(numberOfGridProcessor != 0)
+    {
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            block_proc_grid[ iZone ] = (startZoneIndex + iZone) % numberOfGridProcessor + number_of_processor;
+        }
+    }
+    else
+    {
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            block_proc_grid[ iZone ] = -1;
+        }
+    }
+}
+
+void IO_GridReader::ReadOneZoneGrid(fstream & file, int & iZone)
+{
+    int send_proc      = 0;
+    int recv_proc      = 0;
+    int recv_proc_grid = 0;
+
+    GetSendRecvProcID(iZone, send_proc, recv_proc, recv_proc_grid);
+
+    DataContainer * gridData = new DataContainer();
+
+    if (myProcID == send_proc)
+    {
+        ReadFile(file, gridData);
+    }
+
+    PH_Trade(gridData, send_proc, recv_proc);
+
+    if(recv_proc_grid != -1)
+    {
+        PH_Trade(gridData, send_proc, recv_proc_grid);
+    }
+
+    //! Decompress the grid data.
+    DecompressDataToGrid(gridData, iZone);
+
+    delete gridData;
+}
+
+void IO_GridReader::DecompressDataToGrid(DataContainer *cdata, int iZone)
+{
+    int send_proc      = 0;
+    int recv_proc      = 0;
+    int recv_proc_grid = 0;
+
+    GetSendRecvProcID(iZone, send_proc, recv_proc, recv_proc_grid);
+
+    if (!(myProcID == recv_proc || myProcID == recv_proc_grid))
+    {
+        gridGroup->AddGrid(0);
+        return;
+    }
+
+    //! Create new grid.
+    int * block_type = gridGroup->GetBlockType();
+    int gridType = block_type[iZone];
+
+    //! The id of the zone needs to be added with zoneStart(cxh 20180515).
+    int zoneStart = gridGroup->GetZoneStart();
+    GridID * index = new GridID(iZone + zoneStart);
+
+    Grid *grid = 0;
+    if(gridType == PHSPACE::UNSTRUCTGRID)
+    {
+        grid = new UnstructGrid();
+    }
+    else
+    {
+        grid = new StructGrid();
+    }
+
+    grid->InitGrid(index, 0, dimension, gridType);
+
+    grid->SetIBlock(presentGridGroup);
+
+    //! Decompress.
+    grid->Decode(cdata, 0);
+
+    //! Add zoneStart to grid.
+    grid->ReviseNeighborZoneIndex(zoneStart);
+
+    //! Add to grid group.
+    gridGroup->AddGrid(grid);
+}
+
+void IO_GridReader::GetSendRecvProcID(int iZone, int &send_proc, int &recv_proc)
+{
+    int *block_proc = PHMPI::GetZoneProcessorID();
+    if (! IsParallelRun())
+    {
+        send_proc = this->serverProcID;
+        recv_proc = this->serverProcID;
+    }
+    else
+    {
+        int *block_fileProc = PHMPI::GetZoneFileID();
+        send_proc = block_fileProc[iZone];
+        recv_proc = block_proc[iZone];
+    }
+}
+
+void IO_GridReader::GetSendRecvProcID(int localZoneID, int &send_proc, int &recv_proc, int &recv_proc_grid)
+{
+    int * block_proc      = PHMPI::GetZoneProcessorID();
+    int * block_proc_grid = PHMPI::GetZoneProcessorIDForGrid();
+
+    recv_proc      = block_proc[localZoneID];
+    recv_proc_grid = block_proc_grid[localZoneID];
+
+    if (! IsParallelRun())
+    {
+        send_proc      = this->serverProcID;
+    }
+    else
+    {
+        int * block_fileProc = PHMPI::GetZoneFileID();
+        send_proc = block_fileProc[localZoneID];
+    }
+}
+
+void IO_GridReader::Read(fstream &file, void *data, int size)
+{
+    if (this->fileID != -1)
+    {
+        PH_Read(file,data,size);
+    }
+}
+
+void IO_GridReader::Read_Bcast(fstream &file, void *data, int size)
+{
+    Read(file, data, size);
+    PH_BcastToClinet(data, size, serverProcID, 2);
+}
+
+void IO_GridReader::Bcast(void *data, int size, int proc, int tag)
+{
+    if (myProcID == proc)
+    {
+        int number_of_processor = GetNumberOfProcessor();
+        for (int i = 0; i < number_of_processor; ++ i)
+        {
+            if (i == proc) continue;
+            PHSPACE::PH_Send(data,size,i,tag);
+        }
+    }
+    else
+    {
+        PHSPACE::PH_Receive(data,size,proc,tag);
+    }
+}
+
+void IO_GridReader::ReadCompressedData(fstream &file, DataContainer *cdata, int send_proc, int recv_proc, int tag)
+{
+    using namespace PHMPI;
+
+    if (myProcID == send_proc)
+    {
+        ReadFile(file, cdata);
+    }
+
+    PH_Trade(cdata, send_proc, recv_proc, tag);
+}
+
+void IO_GridReader::Open(fstream &file, const string &filename, const ios_base::openmode &openmode)
+{
+    using namespace PHMPI;
+
+    if (fileID == -1) return;
+
+    OpenFile(file, filename, openmode);
+}
+
+void IO_GridReader::OpenSerialFile(fstream &file, const string &filename, const ios_base::openmode &openmode)
+{
+    string actualFileName = AddSymbolToFileName(filename, "_", 0);
+    this->Open(file, actualFileName, openmode);
+}
+
+void IO_GridReader::Close(fstream &file)
+{
+    if (myProcID != fileID) return;
+
+    file.close();
+    file.clear();
+}
+
+LIB_EXPORT void IO_GridReader::ReadWallDistByCSMode()
+{
+    bool allFilesExitOrNot = true;
+
+    for(unsigned int iFile = 0; iFile < gridGroupNameList.size(); ++ iFile)
+    {
+        string gridFileName = gridGroupNameList[ iFile ];
+        //string actualFileName = AddSymbolToFileName(gridFileName, "_", 0);
+        string cellToNodeFileName = ChangeExtensionOfFileName(gridFileName, "wdt");
+
+        if(! SerialFileExist(cellToNodeFileName))
+        {
+            allFilesExitOrNot = false;
+            break;
+        }
+    }
+
+    if(! allFilesExitOrNot) 
+    {
+        return;
+    }
+
+    fstream file;
+    string gridFileName =ChangeExtensionOfFileName(gridGroupNameList[0], "wdt");
+    OpenSerialFile(file, gridFileName, ios_base::in | ios_base::binary);
+    int numberOfcells;
+    int sizeInt = sizeof(int);
+    file.read((char*)&numberOfcells, sizeInt);
+    CloseFile(file);
+
+    if (numberOfcells >= static_cast <int> (1e8) || numberOfcells < 0)
+    {
+        return;
+    }
+
+    int zoneStart = 0;
+
+    bool gridIsHdf = false;
+    if(this->gridGroups.size() == 0)
+    {
+        gridIsHdf = true;
+        if(this->numberOfZones.size() == 0)
+        {
+        this->numberOfZones.push_back(PHMPI::GetNumberofGlobalZones());
+    }
+    }
+
+    for(unsigned int iFile = 0; iFile < gridGroupNameList.size(); ++ iFile)
+    {
+        if (!gridIsHdf)
+        {
+            this->gridGroup = this->gridGroups[iFile];
+        }
+
+        string gridFileNamei = gridGroupNameList[ iFile ];
+
+        string cellToNodeFileName = ChangeExtensionOfFileName(gridFileNamei, "wdt");
+
+        fstream file1;
+
+        OpenSerialFile(file1, cellToNodeFileName, ios_base::in|ios_base::binary);
+
+        int nZones = this->numberOfZones[iFile];
+
+        for (int iZone = zoneStart; iZone < nZones + zoneStart; ++ iZone)
+        {
+            int send_proc = 0;
+            int recv_proc = 0;
+
+            GetSendRecvProcID(iZone, send_proc, recv_proc);
+
+            DataContainer * WallDistData = new DataContainer();
+
+            ReadCompressedData(file1, WallDistData, send_proc, recv_proc);
+
+            DecompressDataToWallDist(WallDistData, iZone);
+
+            delete WallDistData;
+        }
+
+        zoneStart += nZones;
+
+        Close(file1);
+    }
+}
+
+LIB_EXPORT void IO_GridReader::ReadCellToNodeByCSMode()
+{
+    bool allFilesExitOrNot = true;
+
+    for(unsigned int iFile = 0; iFile < gridGroupNameList.size(); ++ iFile)
+    {
+        string gridFileName = gridGroupNameList[ iFile ];
+        //string actualFileName = AddSymbolToFileName(gridFileName, "_", 0);
+        string cellToNodeFileName = ChangeExtensionOfFileName(gridFileName, "c2n");
+
+        if(! SerialFileExist(cellToNodeFileName))
+        {
+            allFilesExitOrNot = false;
+            break;
+        }
+    }
+
+    if(! allFilesExitOrNot) 
+    {
+        return;
+    }
+
+    int zoneStart = 0;
+
+    for(unsigned int iFile = 0; iFile < gridGroupNameList.size(); ++ iFile)
+    {
+        this->gridGroup = this->gridGroups[iFile];
+
+        string gridFileName = gridGroupNameList[ iFile ];
+
+        string cellToNodeFileName = ChangeExtensionOfFileName(gridFileName, "c2n");
+
+        fstream file;
+
+        OpenSerialFile(file, cellToNodeFileName, ios_base::in|ios_base::binary);
+
+        int nZones = 0;
+
+        Read_Bcast(file, & nZones, sizeof(int));
+
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            int send_proc = 0;
+            int recv_proc = 0;
+            int recv_proc_grid = 0;
+
+            GetSendRecvProcID(iZone, send_proc, recv_proc, recv_proc_grid);
+
+            DataContainer * c2nData = new DataContainer();
+
+            //! Read the compressed grid data.
+            ReadCompressedData(file, c2nData, send_proc, recv_proc);
+
+            //! Decompress the grid data.
+            DecompressDataToCellNode(c2nData, iZone);
+
+            delete c2nData;
+        }
+
+        zoneStart += nZones;
+
+        Close(file);
+    }
+}
+
+LIB_EXPORT void IO_GridReader::ReadInterpointInfoByCSMode()
+{
+    bool allFilesExitOrNot = true;
+
+    for(unsigned int iFile = 0; iFile < gridGroupNameList.size(); ++ iFile)
+    {
+        string gridFileName = gridGroupNameList[iFile];
+
+        string interpointInfoFileName = ChangeExtensionOfFileName(gridFileName, "interpoint");
+
+        if (! SerialFileExist(interpointInfoFileName))
+        {
+            allFilesExitOrNot = false;
+            break;
+        }
+    }
+
+    if(! allFilesExitOrNot)
+    {
+        return;
+    }
+
+    int zoneStart = 0;
+
+    bool gridIsHdf = false;
+    if (numberOfZones.size() == 0)
+    {
+        gridIsHdf = true;
+    }
+
+    for(unsigned int iFile = 0; iFile < gridGroupNameList.size(); ++ iFile)
+    {
+        if(!gridIsHdf)
+        {
+            this->gridGroup = this->gridGroups[iFile];
+        }
+
+        string gridFileName = gridGroupNameList[iFile];
+
+        string interpointInfoFileName = ChangeExtensionOfFileName(gridFileName, "interpoint");
+
+        fstream file;
+
+        OpenSerialFile(file, interpointInfoFileName, ios_base::in|ios_base::binary);
+
+        int nZones = 0;
+
+        Read_Bcast(file, & nZones, sizeof(int));
+
+        if(gridIsHdf)
+        {
+            this->numberOfZones.push_back(nZones);
+        }
+
+        for (int iZone = 0; iZone < nZones + zoneStart; ++ iZone)
+        {
+            int send_proc = 0;
+            int recv_proc = 0;
+            int recv_proc_grid = 0;
+
+            GetSendRecvProcID(iZone, send_proc, recv_proc, recv_proc_grid);
+
+            DataContainer *interpointData = new DataContainer();
+
+            //! Read the compressed grid data.
+            ReadCompressedData(file, interpointData, send_proc, recv_proc);
+
+            //! Decompress the grid data.
+            DecompressInterpointInfo(interpointData, iZone);
+
+            delete interpointData;
+        }
+
+        zoneStart += nZones;
+
+        Close(file);
+    }
+
+    zoneConnectivityForPoint = new ZoneConnectivityForPoint();
+}
+
+LIB_EXPORT void IO_GridReader::ReadWallDistByP2PMode()
+{
+    if (!walldistFileExist) return;
+
+    string gridFileName, WallDistFileName;
+
+    if(fileID != -1)
+    {
+        gridFileName = gridGroupNameList.front();
+        WallDistFileName = ChangeExtensionOfFileName(gridFileName, "wdt");
+    }
+
+    //! Check if the walldist file exist.
+    if(fileID != -1 && !FileExist(WallDistFileName)) return;
+
+    int wdtFileIsH5 = 0;
+    if (fileID != -1)
+    {
+        hid_t fileId;
+        fileId = OpenHDF5File(WallDistFileName);
+
+        if (!(fileId < 0))
+        {
+            H5Fclose(fileId);
+            wdtFileIsH5 = 1;
+        }
+    }
+
+    PH_CompareMaxMin(wdtFileIsH5, 1);
+    if (wdtFileIsH5)
+    {
+        return;
+    }
+
+    fstream file;
+    Open(file, WallDistFileName, ios_base::in|ios_base::binary);
+
+    //Number of zones in each .fts file, 1 is default.
+    int nZones = PHMPI::GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int send_proc = 0;
+        int recv_proc = 0;
+        GetSendRecvProcID(iZone, send_proc, recv_proc);
+        
+        DataContainer * walldistData = new DataContainer();
+
+        ReadCompressedData(file, walldistData, send_proc, recv_proc);
+        DecompressDataToWallDist(walldistData, iZone);
+        
+        delete walldistData;
+    }
+
+    Close(file);
+}
+
+LIB_EXPORT void IO_GridReader::ReadCellToNodeByP2PMode()
+{
+    if(!cellnodeFileExist) return;
+    
+    string gridFileName, cellToNodeFileName;
+    if(fileID != -1)
+    {
+        gridFileName = gridGroupNameList.front();
+        cellToNodeFileName = ChangeExtensionOfFileName(gridFileName, "c2n");
+    }
+    
+    //! Check if the c2n file exist.
+    if(fileID != -1 && !FileExist(cellToNodeFileName)) return;
+    
+    fstream file;
+    Open(file, cellToNodeFileName, ios_base::in|ios_base::binary);
+
+    int nZones = 0;
+    Read_Bcast(file, &nZones, sizeof(int));
+
+    //if(nZones > 1) return;
+    if (nZones == 0)
+    {
+        nZones = this->numberOfTotalZones;
+    }
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int send_proc = 0;
+        int recv_proc = 0;
+        GetSendRecvProcID(iZone, send_proc, recv_proc);
+        
+        DataContainer * c2nData = new DataContainer();
+
+        //! Read the compressed grid data.
+        ReadCompressedData(file, c2nData, send_proc, recv_proc);
+
+        //! Decompress the grid data.
+        DecompressDataToCellNode(c2nData, iZone);
+
+        delete c2nData;
+    }
+
+    Close(file);
+}
+
+LIB_EXPORT void IO_GridReader::ReadInterpointInfoByP2PMode()
+{
+    if (!interpointInfoFileExist)
+    {
+        return;
+    }
+    string gridFileName, interpointInfoFileName;
+    if(fileID != -1)
+    {
+        gridFileName = gridGroupNameList.front();
+        interpointInfoFileName = ChangeExtensionOfFileName(gridFileName, "interpoint");
+    }
+    
+    //! Check if the c2n file exist.
+    if (fileID != -1 && ! FileExist(interpointInfoFileName))
+    {
+        return;
+    }
+    
+    fstream file;
+    Open(file, interpointInfoFileName, ios_base::in|ios_base::binary);
+
+    int nZones = 0;
+    Read_Bcast(file, &nZones, sizeof(int));
+
+    //if(nZones > 1) return;
+    if (nZones == 0)
+    {
+        nZones = this->numberOfTotalZones;
+    }
+    
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int send_proc = 0;
+        int recv_proc = 0;
+        GetSendRecvProcID(iZone, send_proc, recv_proc);
+        
+        DataContainer *interpointInformation = new DataContainer();
+
+        //! Read the compressed grid data.
+        ReadCompressedData(file, interpointInformation, send_proc, recv_proc);
+
+        //! Decompress the grid data.
+        DecompressInterpointInfo(interpointInformation, iZone);
+
+        delete interpointInformation;
+    }
+    Close(file);
+
+    zoneConnectivityForPoint = new ZoneConnectivityForPoint();
+}
+
+
+LIB_EXPORT void IO_GridReader::ReadFaceBCByCSMode()
+{
+    bool allFilesExitOrNot = true;
+
+    for (unsigned int iFile = 0; iFile < gridGroupNameList.size(); ++ iFile)
+    {
+        string gridFileName = gridGroupNameList[ iFile ];
+        //string actualFileName = AddSymbolToFileName(gridFileName, "_", 0);
+        string faceBCFileName = ChangeExtensionOfFileName(gridFileName, "bc");
+
+        if (!SerialFileExist(faceBCFileName))
+        {
+            allFilesExitOrNot = false;
+            break;
+        }
+    }
+
+    if (!allFilesExitOrNot)
+    {
+        return;
+    }
+
+    int zoneStart = 0;
+
+    for(unsigned int iFile = 0; iFile < gridGroupNameList.size(); ++ iFile)
+    {
+        this->gridGroup = this->gridGroups[iFile];
+
+        string gridFileName = gridGroupNameList[ iFile ];
+
+        string faceBCFileName = ChangeExtensionOfFileName(gridFileName, "bc");
+
+        fstream file;
+
+        OpenSerialFile(file, faceBCFileName, ios_base::in|ios_base::binary);
+
+        int nZones = 0;
+
+        Read_Bcast(file, & nZones, sizeof(int));
+
+        for (int iZone = zoneStart; iZone < nZones + zoneStart; ++ iZone)
+        {
+            int send_proc = 0;
+            int recv_proc = 0;
+            int recv_proc_grid = 0;
+
+            GetSendRecvProcID(iZone, send_proc, recv_proc, recv_proc_grid);
+
+            DataContainer * faceBCData = new DataContainer();
+
+            //! Read the compressed grid data.
+            ReadCompressedData(file, faceBCData, send_proc, recv_proc);
+
+            //! Decompress the grid data.
+            DecompressDataToFaceBC(faceBCData, iZone);
+
+            delete faceBCData;
+        }
+
+        zoneStart += nZones;
+
+        Close(file);
+    }
+}
+
+LIB_EXPORT void IO_GridReader::ReadFaceBcDirByCSMode()
+{
+    bool allFilesExitOrNot = true;
+
+    for (unsigned int iFile = 0; iFile < gridGroupNameList.size(); ++ iFile)
+    {
+        string gridFileName = gridGroupNameList[iFile];
+        //string actualFileName = AddSymbolToFileName(gridFileName, "_", 0);
+        string faceBCFileName = ChangeExtensionOfFileName(gridFileName, "bcdir");
+
+        if (!SerialFileExist(faceBCFileName))
+        {
+            allFilesExitOrNot = false;
+            break;
+        }
+    }
+
+    if (!allFilesExitOrNot) 
+    {
+        return;
+    }
+
+    int zoneStart = 0;
+
+    for (unsigned int iFile = 0; iFile < gridGroupNameList.size(); ++ iFile)
+    {
+        string gridFileName = gridGroupNameList[iFile];
+        //string actualFileName = AddSymbolToFileName(gridFileName, "_", 0);
+        string faceBCFileName = ChangeExtensionOfFileName(gridFileName, "bcdir");
+
+        fstream file;
+
+        OpenSerialFile(file, faceBCFileName, ios_base::in|ios_base::binary);
+
+        int nZones = 0;
+
+        Read_Bcast(file, &nZones, sizeof(int));
+
+        for (int iZone = 0; iZone < nZones + zoneStart; ++ iZone)
+        {
+            int send_proc = 0;
+            int recv_proc = 0;
+            int recv_proc_grid = 0;
+
+            GetSendRecvProcID(iZone, send_proc, recv_proc, recv_proc_grid);
+
+            DataContainer * faceBcDirData = new DataContainer();
+
+            //! Read the compressed grid data.
+            ReadCompressedData(file, faceBcDirData, send_proc, recv_proc);
+
+            //! Decompress the grid data.
+            DecompressDataToFaceBcDir(faceBcDirData, iZone);
+
+            delete faceBcDirData;
+        }
+
+        zoneStart += nZones;
+
+        Close(file);
+    }
+}
+
+LIB_EXPORT void IO_GridReader::ReadFaceBCByP2PMode()
+{
+    if(!faceBCFileExist) return;
+
+    string gridFileName, faceBCFileName;
+    if(fileID != -1)
+    {
+        gridFileName = gridGroupNameList.front();
+        faceBCFileName = ChangeExtensionOfFileName(gridFileName, "bc");
+    }
+
+    //! Check if the face BC file exist.
+    if(fileID != -1 && !FileExist(faceBCFileName)) return;
+
+    fstream file;
+    Open(file, faceBCFileName, ios_base::in|ios_base::binary);
+
+    int nZones = 0;
+    Read_Bcast(file, &nZones, sizeof(int));
+    //if(nZones > 1) return;
+    if (nZones == 0)
+    {
+        nZones = this->numberOfTotalZones;
+    }
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int send_proc = 0;
+        int recv_proc = 0;
+        GetSendRecvProcID(iZone, send_proc, recv_proc);
+
+        DataContainer * faceBCData = new DataContainer();
+
+        //! Read the compressed grid data.
+        ReadCompressedData(file, faceBCData, send_proc, recv_proc);
+
+        //! Decompress the grid data.
+        DecompressDataToFaceBC(faceBCData, iZone);
+
+        delete faceBCData;
+    }
+
+    Close(file);
+}
+
+LIB_EXPORT void IO_GridReader::ReadFaceBcDirByP2PMode()
+{
+    if(!faceBCFileExist) return;
+
+    string gridFileName, faceBCFileName;
+    if(fileID != -1)
+    {
+        gridFileName = gridGroupNameList.front();
+        faceBCFileName = ChangeExtensionOfFileName(gridFileName, "bcdir");
+    }
+
+    //! Check if the face BC file exist.
+    if(fileID != -1 && !FileExist(faceBCFileName)) return;
+
+    fstream file;
+    Open(file, faceBCFileName, ios_base::in|ios_base::binary);
+
+    int nZones = 0;
+    Read_Bcast(file, &nZones, sizeof(int));
+    //if(nZones > 1) return;
+    if (nZones == 0)
+    {
+        nZones = this->numberOfTotalZones;
+    }
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int send_proc = 0;
+        int recv_proc = 0;
+        GetSendRecvProcID(iZone, send_proc, recv_proc);
+
+        DataContainer * faceBcDirData = new DataContainer();
+
+        //! Read the compressed grid data.
+        ReadCompressedData(file, faceBcDirData, send_proc, recv_proc);
+
+        //! Decompress the grid data.
+        DecompressDataToFaceBcDir(faceBcDirData, iZone);
+
+        delete faceBcDirData;
+    }
+
+    Close(file);
+}
+
+void IO_GridReader::DecompressDataToWallDist(DataContainer *cdata, int iZone)
+{
+    int send_proc = 0;
+    int recv_proc = 0;
+
+    GetSendRecvProcID(iZone, send_proc, recv_proc);
+
+    if (myProcID != recv_proc)
+    {
+        return;
+    }
+
+    int zoneStart = 0;
+    if(gridGroups.size() != 0)
+    {
+        zoneStart = this->gridGroup->GetZoneStart();
+    }
+
+    Grid *grid = PHSPACE::GetGrid(iZone + zoneStart, 0);
+
+    int * block_type = PHMPI::GetZoneGridType();
+    int gridType = block_type[iZone];
+
+    if(gridType == PHSPACE::UNSTRUCTGRID)
+    {
+        UnstructGrid * unstructuredGrid = UnstructGridCast(grid);
+        unstructuredGrid->InitWallDist();
+        unstructuredGrid->DecodeWallDist(cdata);
+    }
+    else
+    {
+        StructGrid * structuredgrid = StructGridCast(grid);
+        structuredgrid->InitWallDist();
+        structuredgrid->DecodeWallDist(cdata);
+    }
+}
+
+void IO_GridReader::DecompressDataToCellNode(DataContainer *cdata, int iZone)
+{
+    int send_proc = 0;
+    int recv_proc = 0;
+
+    GetSendRecvProcID(iZone, send_proc, recv_proc);
+
+    if (myProcID != recv_proc)
+    {
+        return;
+    }
+
+    //! Decode the read-in data to cell-node.
+    int zoneStart = this->gridGroup->GetZoneStart();
+    Grid *grid = PHSPACE::GetGrid(iZone + zoneStart, 0);
+    UnstructGrid *unstructuredGrid = UnstructGridCast(grid);
+
+    unstructuredGrid->DecodeCellNode(cdata);
+}
+
+void IO_GridReader::DecompressInterpointInfo(DataContainer *cdata, int iZone)
+{
+    int send_proc = 0;
+    int recv_proc = 0;
+
+    GetSendRecvProcID(iZone, send_proc, recv_proc);
+
+    if (myProcID != recv_proc)
+    {        
+        return;
+    }
+
+    //! Decode the read-in data to cell-node.
+    int zoneStart = 0;
+    if(gridGroups.size() != 0)
+    {
+        zoneStart = this->gridGroup->GetZoneStart();
+    }
+    Grid *grid = PHSPACE::GetGrid(iZone + zoneStart, 0);
+    UnstructGrid * unstructuredGrid = UnstructGridCast(grid);    
+
+    unstructuredGrid->DecodeInterpointInfo(cdata);
+}
+
+void IO_GridReader::DecompressDataToFaceBC(DataContainer *cdata, int iZone)
+{
+    int send_proc = 0;
+    int recv_proc = 0;
+
+    GetSendRecvProcID(iZone, send_proc, recv_proc);
+
+    if (myProcID != recv_proc)
+    {
+        return;
+    }
+
+    //! Decode the data into face BC information.
+    //int zoneStart = this->gridGroup->GetZoneStart();
+    //Grid *grid = PHSPACE::GetGrid(iZone + zoneStart, 0);
+
+    Grid *grid = PHSPACE::GetGrid(iZone, 0);
+    if (grid->Type() == UNSTRUCTGRID)
+    {
+        UnstructGrid *unstructuredGrid = UnstructGridCast(grid);
+
+        unstructuredGrid->DecodeBCFace(cdata);
+    }
+    else
+    {
+        StructGrid *structuredGrid = StructGridCast(grid);
+
+        structuredGrid->DecodeBCFace(cdata);
+    }
+}
+
+void IO_GridReader::DecompressDataToFaceBcDir(DataContainer *cdata, int iZone)
+{
+    int send_proc = 0;
+    int recv_proc = 0;
+
+    GetSendRecvProcID(iZone, send_proc, recv_proc);
+
+    if (myProcID != recv_proc)
+    {
+        return;
+    }
+
+    //! Decode the data into face BC information.
+    Grid *grid = PHSPACE::GetGrid(iZone, 0);
+    if (grid->Type() == UNSTRUCTGRID)
+    {
+        return;
+    }
+    else
+    {
+        StructGrid *structuredGrid = StructGridCast(grid);
+
+        structuredGrid->DecodeBcDirFace(cdata);
+    }
+}
+
+}
\ No newline at end of file
diff --git a/API/Physics/src/IncomGas.cpp b/API/Physics/src/IncomGas.cpp
new file mode 100644
index 0000000..265fe3c
--- /dev/null
+++ b/API/Physics/src/IncomGas.cpp
@@ -0,0 +1,834 @@
+#include "IncomGas.h"
+#include "GlobalDataBase.h"
+#include "TK_Exit.h"
+#include "PHIO.h"
+#include <algorithm>
+
+using namespace std;
+
+namespace PHSPACE
+{
+namespace GAS_SPACE
+{
+    IncomGas::IncomGas()
+    {
+        componentLib.push_back("AIR");
+        componentLib.push_back("H2"); 
+        componentLib.push_back("H2_l"); 
+        componentLib.push_back("NH3_l"); 
+        componentLib.push_back("CH4"); 
+        componentLib.push_back("C2H4"); 
+        componentLib.push_back("C2H6"); 
+        componentLib.push_back("C3H8"); 
+        componentLib.push_back("NG"); 
+        componentLib.push_back("LNG"); 
+        componentLib.push_back("H2S"); 
+        componentLib.push_back("Cl2"); 
+        componentLib.push_back("NH3");
+        SetPropertyLib();
+    }
+
+    IncomGas::~IncomGas()
+    {
+        int muType = GlobalDataBase::GetIntParaFromDB("muType");
+        if (muType == muIdealGasMixingLaw)
+        {
+            DelPointer2(phiij);
+        }
+        int massdiffType = GlobalDataBase::GetIntParaFromDB("massdiffType");
+        if (massdiffType == massDiffDiluteApprox)
+        {
+            delete[] dilute;
+        }
+    }
+
+    void IncomGas::InitCommonParameter()
+    {
+        PerfectGas::InitCommonParameter();
+
+           //! Operating Pressure
+           //! Operating Pressure
+        
+    }
+
+    void IncomGas::InitParameterForMu()
+    {
+        int muType = GlobalDataBase::GetIntParaFromDB("muType");
+        if (muType == muIdealGasMixingLaw)
+        {
+            ComputePhiIJ();
+        }
+    }
+
+    void IncomGas::InitParameterForK()
+    {
+        int kType = GlobalDataBase::GetIntParaFromDB("kType");
+        if (kType == kIdealGasMixingLaw)
+        {
+            ComputePhiIJ();
+        }
+    }
+
+    void IncomGas::InitParameterForMassdiff()
+    {
+        int massdiffType = GlobalDataBase::GetIntParaFromDB("massdiffType");
+        int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+        if (massdiffType == massDiffConstantDiluteApprox)
+        {
+            dilute = new RDouble[1];
+            if (GlobalDataBase::IsExist("dilute", PHINT, 1))
+            {
+                GlobalDataBase::GetData("dilute", dilute, PHDOUBLE, 1);
+            }
+            else
+            {
+                dilute[0] = 2.88e-5;
+            }
+        }
+        else if (massdiffType == massDiffDiluteApprox)
+        {
+            dilute = new RDouble[numberOfSpeciesIncom];
+            GlobalDataBase::GetData("dilute", dilute, PHDOUBLE, numberOfSpeciesIncom);
+        }
+        else if (massdiffType == massDiffMulticomponent)
+        {
+
+        }
+    }
+
+    void IncomGas::SetGasName(string speciesNameIncom)
+    {
+        int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+        gasNameList = new string[numberOfSpeciesIncom];
+        GlobalDataBase::GetData(speciesNameIncom, gasNameList, PHSTRING, numberOfSpeciesIncom);
+    }
+
+    void IncomGas::SetGasMolarMass(string gasMolarMass)
+    {
+        int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+        gasMolarMassList = new RDouble[numberOfSpeciesIncom];
+        for (int iSp = 0; iSp < numberOfSpeciesIncom; ++iSp)
+        {
+            auto iter = find(componentLib.begin(), componentLib.end(), gasNameList[iSp]);
+            if (iter != componentLib.end())
+            {
+                gasMolarMassList[iSp] = propertyLib[gasNameList[iSp]].molarMass;
+            }
+            else
+            {
+                ostringstream oss;
+                oss << "this gas is not included in the gas lib: " << gasNameList[iSp] << "\n";
+                TK_Exit::ExceptionExit(oss.str());
+            }
+        }
+    }
+
+    void IncomGas::SetGasRho(string gasRho)
+    {
+        int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+        gasRhoList = new RDouble[numberOfSpeciesIncom];
+        for (int iSp = 0; iSp < numberOfSpeciesIncom; ++iSp)
+        {
+            auto iter = find(componentLib.begin(), componentLib.end(), gasNameList[iSp]);
+            if (iter != componentLib.end())
+            {
+                gasRhoList[iSp] = propertyLib[gasNameList[iSp]].rho;
+            }
+
+        }
+    }
+
+    void IncomGas::SetGasMu(string gasMu)
+    {
+        int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+        gasMuList = new RDouble[numberOfSpeciesIncom];
+        for (int iSp = 0; iSp < numberOfSpeciesIncom; ++iSp)
+        {
+            auto iter = find(componentLib.begin(), componentLib.end(), gasNameList[iSp]);
+            if (iter != componentLib.end())
+            {
+                gasMuList[iSp] = propertyLib[gasNameList[iSp]].mu;
+            }
+        }
+    }
+
+    void IncomGas::SetGasCp(string gasCp)
+    {
+        int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+        gasCpList = new RDouble[numberOfSpeciesIncom];
+        for (int iSp = 0; iSp < numberOfSpeciesIncom; ++iSp)
+        {
+            auto iter = find(componentLib.begin(), componentLib.end(), gasNameList[iSp]);
+            if (iter != componentLib.end())
+            {
+                gasCpList[iSp] = propertyLib[gasNameList[iSp]].cp;
+            }
+        }
+    }
+
+    void IncomGas::SetGasK(string gasK)
+    {
+        int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+        gasKList = new RDouble[numberOfSpeciesIncom];
+        for (int iSp = 0; iSp < numberOfSpeciesIncom; ++iSp)
+        {
+            auto iter = find(componentLib.begin(), componentLib.end(), gasNameList[iSp]);
+            if (iter != componentLib.end())
+            {
+                gasKList[iSp] = propertyLib[gasNameList[iSp]].k;
+            }
+        }
+    }
+
+    void IncomGas::UpdateRg(UnstructGrid* grid, RDouble* Rg)
+    {
+        int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+        int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+        string speciesNameIncom = gasNameList[0];
+        RDouble* massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(speciesNameIncom));
+        RDouble gasR = 8.314;
+        if (massFracOfGas == NULL)
+        {
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                Rg[iCell] = gasR / gasMolarMassList[0];
+            }
+        }
+        else
+        {
+            SetField(Rg, 0.0 , nTotal);
+            for (int iGas = 0; iGas < numberOfSpeciesIncom; ++iGas)
+            {
+                massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(gasNameList[iGas]));
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    Rg[iCell] += massFracOfGas[iCell] * gasR / gasMolarMassList[iGas];
+                }
+            }
+        }        
+    }
+
+    void IncomGas::UpdateRho(UnstructGrid* grid, RDouble* rho)
+    {
+        RDouble refT = GlobalDataBase::GetDoubleParaFromDB("refT");
+        RDouble refP = GlobalDataBase::GetDoubleParaFromDB("refP");
+        int rhoType = GlobalDataBase::GetIntParaFromDB("rhoType");
+        switch (rhoType)
+        {
+        case rhoConstant:
+        {
+            break;
+        }
+
+        case rhoIncompressibleIdealGas:
+        {
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            RDouble* T = reinterpret_cast<RDouble*>(grid->GetDataPtr("T"));
+            RDouble* Rg = reinterpret_cast<RDouble*>(grid->GetDataPtr("Rg"));
+            RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+            
+            if (T == NULL)
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    cRho[iCell] = 1 / (Rg[iCell] * refT);
+                    rho[iCell] = refP * cRho[iCell];
+                }
+            }
+            else
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    cRho[iCell] = 1 / (Rg[iCell] * T[iCell]);
+                    rho[iCell] = refP * cRho[iCell];
+                }
+            }        
+
+            break;
+        }
+
+        case rhoIdealGas:
+        {
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            RDouble* T = reinterpret_cast<RDouble*>(grid->GetDataPtr("T"));
+            RDouble* p = reinterpret_cast<RDouble*>(grid->GetDataPtr("P"));
+            RDouble* Rg = reinterpret_cast<RDouble*>(grid->GetDataPtr("Rg"));
+            RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+
+            if (T == NULL)
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    cRho[iCell] = 1 / (Rg[iCell] * refT);
+                    rho[iCell] = (refP + p[iCell]) * cRho[iCell];
+                }
+            }
+            else
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    cRho[iCell] = 1 / (Rg[iCell] * T[iCell]);
+                    rho[iCell] = (refP + p[iCell]) * cRho[iCell];
+                }
+            }        
+
+            break;
+        }
+
+        case rhoVolumnWeightedMixingLaw:
+        {
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            string speciesNameIncom = gasNameList[0];
+            RDouble* massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(speciesNameIncom));
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                rho[iCell] = massFracOfGas[iCell] / gasRhoList[0];
+            }
+
+            for (int iGas = 1; iGas < numberOfSpeciesIncom; ++iGas)
+            {
+                speciesNameIncom = gasNameList[iGas];
+                massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(speciesNameIncom));
+
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    rho[iCell] += massFracOfGas[iCell] / gasRhoList[iGas];
+                }
+            }
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                rho[iCell] = 1 / rho[iCell];
+            }
+
+            break;
+        }
+        }
+    }
+
+    void IncomGas::UpdateMu(UnstructGrid* grid, RDouble* mu)
+    {
+        RDouble refT = GlobalDataBase::GetDoubleParaFromDB("refT");
+        int muType = GlobalDataBase::GetIntParaFromDB("muType");
+        switch (muType)
+        {
+        case muConstant:
+        {
+            break;
+        }
+
+        case muSutherLand:
+        {
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            RDouble* T = reinterpret_cast<RDouble*>(grid->GetDataPtr("T"));
+            int coeOfSutherland = GlobalDataBase::GetIntParaFromDB("numOfCoeSutherland");
+
+            if (coeOfSutherland == 2)
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    mu[iCell] = 1.458e-6 * pow(T[iCell], 3/2) / (T[iCell] + 110.4);
+                }
+            }
+            else if (coeOfSutherland == 3)
+            {
+                RDouble referenceValue = refT + 110.56;
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    mu[iCell] = 1.716e-5 * pow(T[iCell] / refT, 3 / 2) * referenceValue / (T[iCell] + 110.56);
+                }
+            }
+            
+            break;
+        }
+
+        case muIdealGasMixingLaw:
+        {
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            RDouble* sumOfAmount = NewPointer<RDouble>(nTotal);
+            RDouble** amountOfSubstance = NewPointer2<RDouble>(numberOfSpeciesIncom, nTotal);
+            RDouble** amountFracOfSubstance = NewPointer2<RDouble>(numberOfSpeciesIncom, nTotal);
+            ComputeAmountOfSubstance(grid, amountOfSubstance, amountFracOfSubstance);
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                sumOfAmount[iCell] = amountFracOfSubstance[0][iCell] * phiij[0][0];
+            }
+
+            for (int iGas = 1; iGas < numberOfSpeciesIncom; ++iGas)
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    sumOfAmount[iCell] += amountFracOfSubstance[iGas][iCell] * phiij[0][iGas];
+                }
+            }
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                mu[iCell] = amountFracOfSubstance[0][iCell] * gasMuList[0] / sumOfAmount[iCell];
+            }
+
+            for (int iGas = 1; iGas < numberOfSpeciesIncom; ++iGas)
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    mu[iCell] += amountFracOfSubstance[iGas][iCell] * gasMuList[iGas] / sumOfAmount[iCell];
+                }
+            }
+
+            DelPointer(sumOfAmount);
+            DelPointer2(amountOfSubstance);
+            DelPointer2(amountFracOfSubstance);
+            break;
+        }
+
+        case muMassWeightedMixingLaw:
+        {
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            string speciesNameIncom = gasNameList[0];
+            RDouble* massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(speciesNameIncom));
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                mu[iCell] = massFracOfGas[iCell] * gasMuList[0];
+            }
+
+            for (int iGas = 1; iGas < numberOfSpeciesIncom; ++iGas)
+            {
+                speciesNameIncom = gasNameList[iGas];
+                massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(speciesNameIncom));
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    mu[iCell] += massFracOfGas[iCell] * gasMuList[iGas];
+                }
+            }
+
+            break;
+        }
+
+        case muPiecewiseLinear:
+        {
+
+            break;
+        }
+
+        case muPolynomial:
+        {
+            break;
+        }
+
+        case muPowerLaw:
+        {
+            break;
+        }
+        }
+    }
+
+    void IncomGas::UpdateCp(UnstructGrid* grid, RDouble* cp)
+    {
+        int cpType = GlobalDataBase::GetIntParaFromDB("cpType");
+        switch (cpType)
+        {
+        case cpConstant:
+        {
+            break;
+        }
+
+        case cpMixing:
+        {
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            string speciesNameIncom = gasNameList[0];
+            RDouble* massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(speciesNameIncom));
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                cp[iCell] = massFracOfGas[iCell] * gasCpList[0];
+            }
+
+            for (int iGas = 1; iGas < numberOfSpeciesIncom; ++iGas)
+            {
+                speciesNameIncom = gasNameList[iGas];
+                massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(speciesNameIncom));
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    cp[iCell] += massFracOfGas[iCell] * gasCpList[iGas];
+                }
+            }
+
+            break;
+        }
+
+        case cpPiecewiseLinear:
+        {
+            break;
+        }
+
+        case cpPiecewisePolynomial:
+        {
+            break;
+        }
+
+        case cpPolynomial:
+        {
+            break;
+        }
+
+        }
+    }
+
+    void IncomGas::UpdateK(UnstructGrid* grid, RDouble* k)
+    {
+        int kType = GlobalDataBase::GetIntParaFromDB("kType");
+        switch (kType)
+        {
+        case kConstant:
+        {
+            break;
+        }
+
+        case kMassWeightedMixingLaw:
+        {
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            string speciesNameIncom = gasNameList[0];
+            RDouble* massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(speciesNameIncom));
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                k[iCell] = massFracOfGas[iCell] * gasKList[0];
+            }
+
+            for (int iGas = 1; iGas < numberOfSpeciesIncom; ++iGas)
+            {
+                speciesNameIncom = gasNameList[iGas];
+                massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(speciesNameIncom));
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    k[iCell] += massFracOfGas[iCell] * gasKList[iGas];
+                }
+            }
+
+            break;
+        }
+
+        case kIdealGasMixingLaw:
+        {
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            RDouble* sumOfAmount = NewPointer<RDouble>(nTotal);
+            RDouble** amountOfSubstance = NewPointer2<RDouble>(numberOfSpeciesIncom, nTotal);
+            RDouble** amountFracOfSubstance = NewPointer2<RDouble>(numberOfSpeciesIncom, nTotal);
+            ComputeAmountOfSubstance(grid, amountOfSubstance, amountFracOfSubstance);
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                sumOfAmount[iCell] = amountFracOfSubstance[0][iCell] * phiij[0][0];
+            }
+
+            for (int iGas = 1; iGas < numberOfSpeciesIncom; ++iGas)
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    sumOfAmount[iCell] += amountFracOfSubstance[iGas][iCell] * phiij[0][iGas];
+                }
+            }
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                k[iCell] = amountFracOfSubstance[0][iCell] * gasKList[0] / sumOfAmount[iCell];
+            }
+
+            for (int iGas = 1; iGas < numberOfSpeciesIncom; ++iGas)
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    k[iCell] += amountFracOfSubstance[iGas][iCell] * gasKList[iGas] / sumOfAmount[iCell];
+                }
+            }
+
+            DelPointer(sumOfAmount);
+            DelPointer2(amountOfSubstance);
+            DelPointer2(amountFracOfSubstance);
+
+            break;
+        }
+
+        case kPiecewiseLinear:
+        {
+            break;
+        }
+
+        case kPiecewisePolynomial:
+        {
+            break;
+        }
+
+        case kPolynomial:
+        {
+            break;
+        }
+
+        }
+    }
+
+    void IncomGas::UpdateMassDiff(UnstructGrid* grid, int iGas, RDouble* massdiff)
+    {
+        RDouble sct = 0.7;
+        int isSolveTurb = GlobalDataBase::GetIntParaFromDB("isSolveTurb");
+        int massdiffType = GlobalDataBase::GetIntParaFromDB("massdiffType");
+        switch (massdiffType)
+        {
+            case massDiffConstantDiluteApprox:
+            {
+                int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+                RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+
+                if (isSolveTurb == 0)
+                {
+                    for (int iCell = 0; iCell < nTotal; ++iCell)
+                    {
+                        massdiff[iCell] = rho[iCell] * dilute[0];
+                    }
+                }
+                else
+                {
+                    RDouble* vist = reinterpret_cast<RDouble*>(grid->GetDataPtr("vist"));
+                    for (int iCell = 0; iCell < nTotal; ++iCell)
+                    {
+                        massdiff[iCell] = rho[iCell] * dilute[0];
+                        massdiff[iCell] += vist[iCell] / sct;
+                    }
+                }
+                break;
+            }
+
+            case massDiffDiluteApprox:
+            {
+                int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+                RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+
+                if (isSolveTurb == 0)
+                {
+                    for (int iCell = 0; iCell < nTotal; ++iCell)
+                    {
+                        massdiff[iCell] = rho[iCell] * dilute[iGas];
+                    }
+                }
+                else
+                {
+                    RDouble* vist = reinterpret_cast<RDouble*>(grid->GetDataPtr("vist"));
+                    for (int iCell = 0; iCell < nTotal; ++iCell)
+                    {
+                        massdiff[iCell] = rho[iCell] * dilute[iGas];
+                        massdiff[iCell] += vist[iCell] / sct;
+                    }
+                }
+                break;
+            }
+
+            case massDiffMulticomponent:
+            {
+                break;
+            }
+
+            case massDiffUnityLewisNumber:
+            {
+                int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+                RDouble* k = reinterpret_cast<RDouble*>(grid->GetDataPtr("k"));
+                RDouble* cp = reinterpret_cast<RDouble*>(grid->GetDataPtr("cp"));
+                RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    massdiff[iCell] = k[iCell] / (rho[iCell] * cp[iCell]);
+                }
+                break;
+            }
+        }
+    }
+
+    void IncomGas::ComputePhiIJ()
+    {
+        int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+        phiij = NewPointer2<RDouble>(numberOfSpeciesIncom, numberOfSpeciesIncom);
+
+        for (int iGas = 0; iGas < numberOfSpeciesIncom; ++iGas)
+        {
+            for (int jGas = 0; jGas < numberOfSpeciesIncom; ++jGas)
+            {
+                RDouble molarMassI = gasMolarMassList[iGas];
+                RDouble molarMassJ = gasMolarMassList[jGas];
+                RDouble muI = gasMuList[iGas];
+                RDouble muJ = gasMuList[jGas];
+
+                RDouble molarMassRatio = molarMassJ / molarMassI;
+                RDouble muRatio = muI / muJ;
+
+                phiij[iGas][jGas] = pow(1 + pow(muRatio, 1 / 2) * pow(molarMassRatio, 1 / 4), 2) / pow((1 + molarMassRatio) * 8, 1 / 2);
+            }
+        }
+    }
+
+    void IncomGas::ComputeAmountOfSubstance(UnstructGrid* grid, RDouble** amountOfSubstance, RDouble** amountFracOfSubstance)
+    {
+        int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+        int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+        RDouble* vol = grid->GetCellVolume();
+        RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+        RDouble* totalAmountOfSubstance = new RDouble[nTotal];
+        for (int iCell = 0; iCell < nTotal; ++iCell)
+        {
+            totalAmountOfSubstance[iCell] = 0.0;
+        }
+
+        if (numberOfSpeciesIncom == 1)
+        {
+            string speciesNameIncom = gasNameList[0];
+            RDouble molarMass = gasMolarMassList[0];
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                amountOfSubstance[0][iCell] = rho[iCell] * vol[iCell] / molarMass;
+                totalAmountOfSubstance[iCell] += amountOfSubstance[0][iCell];
+            }
+        }
+        else
+        {
+            for (int iGas = 0; iGas < numberOfSpeciesIncom; ++iGas)
+            {
+                string speciesNameIncom = gasNameList[iGas];
+                RDouble molarMass = gasMolarMassList[iGas];
+                RDouble* massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(speciesNameIncom));
+
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    amountOfSubstance[iGas][iCell] = massFracOfGas[iCell] * rho[iCell] * vol[iCell] / molarMass;
+                    totalAmountOfSubstance[iCell] += amountOfSubstance[iGas][iCell];
+                }
+            }
+        }        
+
+        for (int iGas = 0; iGas < numberOfSpeciesIncom; ++iGas)
+        {
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                amountFracOfSubstance[iGas][iCell] = amountOfSubstance[iGas][iCell] / totalAmountOfSubstance[iCell];
+            }
+        }
+
+        delete[] totalAmountOfSubstance;
+    }
+
+    void IncomGas::SetPropertyLib()
+    {
+        propertySp p_AIR;
+        propertySp p_H2;
+        propertySp p_H2_l;
+        propertySp p_NH3_l;
+        propertySp p_CH4;
+        propertySp p_C2H4;
+        propertySp p_C3H8;
+        propertySp p_C2H6;
+        propertySp p_NG;
+        propertySp p_LNG;
+        propertySp p_H2S;
+        propertySp p_Cl2;
+        propertySp p_NH3;        
+
+        p_AIR.rho = 1.225;
+        p_AIR.mu  = 1.7894e-5;
+        p_AIR.k   = 0.0242;
+        p_AIR.cp  = 1006.43;
+        p_AIR.molarMass  = 0.028;
+        propertyLib.insert({"AIR", p_AIR});
+
+        p_H2.rho = 0.08189;
+        p_H2.mu  = 8.411e-06;
+        p_H2.k   = 0.1672;
+        p_H2.cp  = 14283;
+        p_H2.molarMass  = 0.00201594;
+        propertyLib.insert({"H2", p_H2}); 
+
+        p_H2_l.rho = 70.85;
+        p_H2_l.mu  = 1.332e-5;
+        p_H2_l.k   = 0.10382;
+        p_H2_l.cp  = 9772.2;
+        p_H2_l.molarMass = 0.00201594;
+        propertyLib.insert({"H2_l", p_H2_l}); 
+
+        p_NH3_l.rho = 610;
+        p_NH3_l.mu  = 0.000152;
+        p_NH3_l.k   = 0.493;
+        p_NH3_l.cp  = 4758;
+        p_NH3_l.molarMass = 0.01703061;
+        propertyLib.insert({"NH3_l", p_NH3_l}); 
+
+        p_CH4.rho = 0.6679;
+        p_CH4.mu  = 1.087e-05;
+        p_CH4.k   = 0.0332;
+        p_CH4.cp  = 2222;
+        p_CH4.molarMass = 0.01604303;
+        propertyLib.insert({"CH4", p_CH4}); 
+
+        p_C2H4.rho = 1.137;
+        p_C2H4.mu  = 1.03e-05;
+        p_C2H4.k   = 0.0214;
+        p_C2H4.cp  = 2233;
+        p_C2H4.molarMass = 0.02805418;
+        propertyLib.insert({"C2H4",p_C2H4}); 
+
+        p_C3H8.rho = 1.91;
+        p_C3H8.mu  = 7.95e-06;
+        p_C3H8.k   = 0.0177;
+        p_C3H8.cp  = 1549;
+        p_C3H8.molarMass = 0.04409;
+        propertyLib.insert({"C3H8", p_C3H8});  
+
+        p_C2H6.rho = 1.263;
+        p_C2H6.mu  = 9.29e-6;
+        p_C2H6.k   = 0.0207;
+        p_C2H6.cp  = 1731;
+        p_C2H6.molarMass = 0.03;
+        propertyLib.insert({"C2H6", p_C2H6}); 
+
+        p_NG.rho = 0.753;
+        p_NG.mu  = 1.07e-5;
+        p_NG.k   = 0.0318;
+        p_NG.cp  = 2188.9;
+        p_NG.molarMass = 0.018046;
+        propertyLib.insert({"NG", p_NG}); 
+
+        p_LNG.rho = 434.5566;
+        p_LNG.mu  = 0.14331;
+        p_LNG.k = 0.019549;
+        p_LNG.cp  = 3425.3;
+        p_LNG.molarMass = 0.018046;
+        propertyLib.insert({"LNG", p_LNG}); 
+
+        p_H2S.rho = 1.46;
+        p_H2S.mu  = 1.2e-05;
+        p_H2S.k   = 0.0134;
+        p_H2S.cp  = 1170;
+        p_H2S.molarMass = 0.03407994;
+        propertyLib.insert({"H2S", p_H2S}); 
+
+        p_Cl2.rho = 2.95;
+        p_Cl2.mu  = 1.33e-05;
+        p_Cl2.k   = 0.00882;
+        p_Cl2.cp  = 650;
+        p_Cl2.molarMass = 0.070906;
+        propertyLib.insert({"Cl2", p_Cl2}); 
+
+        p_NH3.rho = 0.6894;
+        p_NH3.mu  = 1.015e-05;
+        p_NH3.k   = 0.0247;
+        p_NH3.cp  = 2158;
+        p_NH3.molarMass = 0.01703061;
+        propertyLib.insert({"NH3", p_NH3});
+    }
+
+}
+}
\ No newline at end of file
diff --git a/API/Physics/src/Jacobian.cpp b/API/Physics/src/Jacobian.cpp
new file mode 100644
index 0000000..cd8038f
--- /dev/null
+++ b/API/Physics/src/Jacobian.cpp
@@ -0,0 +1,716 @@
+#include "Jacobian.h"
+#include "Constants.h"
+#include "Math_BasisFunction.h"
+#include "GlobalDataBase.h"
+
+#include "Gas.h"
+
+using namespace std;
+namespace PHSPACE
+{
+//! The fuction computes the formula (M +- R) * dQ, M and R denote the Jacobian matrix and spectrum radius of inviscid flux,respectively,\n
+//! dQ is the increment of conservative vector.
+void MXDQ_STD(RDouble *prim, RDouble nxs, RDouble nys, RDouble nzs, RDouble area, RDouble vgn, RDouble gama, RDouble *dq, RDouble *f, 
+              int nm, int nLaminar, RDouble radius, int ipn)
+{
+    //! The relevant variables related to vgn has modified by LiPeng on Feb 19, 2019
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble rm = prim[IDX::IR];
+    RDouble um = prim[IDX::IU];
+    RDouble vm = prim[IDX::IV];
+    RDouble wm = prim[IDX::IW];
+    RDouble pm = prim[IDX::IP];
+
+    RDouble c2 = ABS(gama * pm / rm);
+    RDouble cm = sqrt(c2);
+
+    RDouble lmd1, lmd2, lmd3, x1, x2, cits;
+
+    //! The variable cits equals to Ur=U-Ub, which can be referred to the formula (A.5) in appendix A of the PHengLEI Theory manual.
+    cits = nxs * um + nys * vm + nzs * wm - vgn;
+
+    RDouble ctgm = cits;
+    RDouble cmgm = cm;
+
+    lmd1 = ctgm;
+    lmd2 = ctgm + cmgm;
+    lmd3 = ctgm - cmgm;
+
+    RDouble ipnrad = ipn * radius / MAX(SMALL, area);
+
+    lmd1 = half * (lmd1 + ipnrad);
+    lmd2 = half * (lmd2 + ipnrad);
+    lmd3 = half * (lmd3 + ipnrad);
+
+    //! This term is actually equal to 0.0 
+    x1 = (lmd1 + lmd1 - lmd2 - lmd3) / (c2 + c2);
+    //! This term is actually equal to 0.5
+    x2 = (lmd2 - lmd3) / (cm + cm);
+
+    RDouble dc, dh, c2dc;
+    //! dc=-b1,b1 is referred to the formula (A.7) in appendix A of the PHengLEI Theory manual.
+    //! dc   = cits * dq[IR] - nxs * dq[IRU] - nys * dq[IRV] - nzs * dq[IRW];//!the previous form
+    dc   = (cits + vgn) * dq[IDX::IR] - nxs * dq[IDX::IRU] - nys * dq[IDX::IRV] - nzs * dq[IDX::IRW];//!Modified by LiPeng on Feb 21, 2019.
+    c2dc = c2 * dc;
+
+    //! Compute total enthalpy hm and coefficient dh,dh=b2,see formula (A.7) and (A.8) in appendix A of the PHengLEI Theory manual.
+    RDouble hm;
+    gas->ComputeTotalEnthalpyAndDH(prim, gama, dq, hm, dh);
+
+    //! This term is actually equal to (0.5 * dc)
+    RDouble dhx1_dcx2 =  dh   * x1 + dc * x2;
+    //! This term is actually equal to (0.5 * dh)
+    RDouble c2dcx1_dhx2 = c2dc * x1 + dh * x2;
+
+    //! The following expressions can be referred to formula (A.6) in appendix A of the PHengLEI Theory manual.
+    f[IDX::IR ] = lmd1 * dq[IR ] - dhx1_dcx2;
+    f[IDX::IRU] = lmd1 * dq[IRU] - um * dhx1_dcx2 + nxs  * c2dcx1_dhx2;
+    f[IDX::IRV] = lmd1 * dq[IRV] - vm * dhx1_dcx2 + nys  * c2dcx1_dhx2;
+    f[IDX::IRW] = lmd1 * dq[IRW] - wm * dhx1_dcx2 + nzs  * c2dcx1_dhx2;
+
+    //! The previous form is not suitable for dynamic mesh.
+    //! f[IRE] = lmd1 * dq[IRE] - hm * dhx1_dcx2 + cits * c2dcx1_dhx2;
+    //! Modified by LiPeng on Feb 21, 2019.
+    f[IDX::IRE] = lmd1 * dq[IDX::IRE] - hm * dhx1_dcx2 + (cits + vgn) * c2dcx1_dhx2;
+    for (int iLaminar = nm; iLaminar < nLaminar; ++ iLaminar)
+    {
+        f[iLaminar] = lmd1 * dq[iLaminar] - prim[iLaminar] * dhx1_dcx2;
+    }
+
+    for (int iLaminar = 0; iLaminar < nLaminar; ++ iLaminar) //!Modified by LiPeng on Feb. 25, 2019
+    {
+        f[iLaminar] *= area;
+    }
+}
+
+void MXDQ_STD(RDouble *prim, RDouble *gykb, RDouble *dq, RDouble *f, RDouble gama, int nm, int nLaminar, RDouble radius, int ipn)
+{
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble rm  = prim[IR];
+    RDouble um  = prim[IU];
+    RDouble vm  = prim[IV];
+    RDouble wm  = prim[IW];
+    RDouble pm  = prim[IP];
+
+    RDouble c2 = ABS(gama * pm / rm);
+    RDouble cm = sqrt(c2);
+
+    RDouble lmd1, lmd2, lmd3, x1, x2, cits;
+
+    //! the variable cits equals to Ur=U-Ub, which can be referred to the formula (A.5) in appendix A of the PHengLEI Theory manual.
+    cits = gykb[0] * um + gykb[1] * vm + gykb[2] * wm - gykb[4]; 
+
+    RDouble ctgm = cits;
+    RDouble cmgm = cm  ;
+
+    lmd1 = ctgm;
+    lmd2 = ctgm + cmgm;
+    lmd3 = ctgm - cmgm;
+
+    RDouble ipnrad = ipn * radius / MAX(SMALL, gykb[3]);
+    //RDouble ipnrad = ipn * radius;  // org
+
+    lmd1 = half * (lmd1 + ipnrad);
+    lmd2 = half * (lmd2 + ipnrad);
+    lmd3 = half * (lmd3 + ipnrad);
+
+    x1 = (lmd1 + lmd1 - lmd2 - lmd3) / (c2 + c2);    //this term is actually equal to 0.0 
+    x2 = (lmd2 - lmd3) / (cm + cm);                  //this term is actually equal to 0.5
+
+    RDouble dc,dh,c2dc;
+    //! dc=-b1, b1 is referred to the formula (A.7) in appendix A of the PHengLEI Theory manual.
+    //! the previous form
+    dc   = (cits + gykb[4]) * dq[IR] - gykb[0] * dq[IRU] - gykb[1] * dq[IRV] - gykb[2] * dq[IRW];
+    c2dc = c2 * dc;
+
+    //! compute total enthalpy hm and coefficient dh,dh=b2,see formula (A.7) and (A.8) in appendix A of the PHengLEI Theory manual.
+    RDouble hm;
+    gas->ComputeTotalEnthalpyAndDH(prim, gama, dq, hm, dh);
+
+    RDouble dhx1_dcx2   =  dh   * x1 + dc * x2;//this term is actually equal to (0.5 * dc)
+    RDouble c2dcx1_dhx2 =  c2dc * x1 + dh * x2;//this term is actually equal to (0.5 * dh)
+
+    //the following expressions can be referred to formula (A.6) in appendix A of the PHengLEI Theory manual.
+    f[IR ] = lmd1 * dq[IR ] - dhx1_dcx2;
+    f[IRU] = lmd1 * dq[IRU] - um * dhx1_dcx2 + gykb[0]  * c2dcx1_dhx2;
+    f[IRV] = lmd1 * dq[IRV] - vm * dhx1_dcx2 + gykb[1]  * c2dcx1_dhx2;
+    f[IRW] = lmd1 * dq[IRW] - wm * dhx1_dcx2 + gykb[2]  * c2dcx1_dhx2;
+    
+    //! the previous form is not suitable for dynamic mesh.
+    f[IRE] = lmd1 * dq[IRE] - hm * dhx1_dcx2 + (cits + gykb[4]) * c2dcx1_dhx2;
+    for (int iLaminar = nm; iLaminar < nLaminar; ++ iLaminar)
+    {
+        f[iLaminar] = lmd1 * dq[iLaminar] - prim[iLaminar] * dhx1_dcx2;
+    }
+
+    for (int iLaminar = 0; iLaminar < nLaminar; ++ iLaminar) //modified by LiPeng on Feb. 25, 2019
+    {
+        f[iLaminar] *= gykb[3];
+    }
+}
+
+void ComputeConservativePreconMatrix(int sign, RDouble **MG, RDouble *prim, RDouble gama, RDouble preconCoeff, int nm, int neqn)
+{
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble rm, um, vm, wm, pm, Hm, v2, c2, psi = 1.0, gama1;
+
+    for (int i = 0; i < neqn; ++ i)
+    {
+        for (int j = 0; j < neqn; ++ j)
+        {
+            MG[i][j] = 0.0;
+        }
+    }
+
+    rm = prim[IR];
+    um = prim[IU];
+    vm = prim[IV];
+    wm = prim[IW];
+    pm = prim[IP];
+
+    gama1 = gama - 1.0;
+    c2 = gama * pm / rm;
+    v2 = um * um + vm * vm + wm * wm;
+
+    Hm = gama / gama1 * pm / rm + 0.5 * v2;
+
+
+    switch(sign) 
+    {
+
+    case -1: // M * T-
+
+        psi  = (preconCoeff - 1.0) * gama1 / c2;
+        break;
+
+    case 1: // T * M-
+
+        psi  = (1.0 - preconCoeff) / preconCoeff * gama1 / c2 ;
+        break;
+    }
+
+    MG[IR][0] = 1.0 + 0.5 * v2 * psi;
+    MG[IR][1] = - um * psi;
+    MG[IR][2] = - vm * psi;
+    MG[IR][3] = - wm * psi;
+    MG[IR][4] = psi;
+
+    MG[IRU][0] = 0.5 * um * v2 * psi;
+    MG[IRU][1] = 1.0 - um * um * psi;
+    MG[IRU][2] = -um * vm * psi;
+    MG[IRU][3] = -um * wm * psi;
+    MG[IRU][4] = um * psi;
+
+    MG[IRV][0] = 0.5 * vm * v2 * psi;
+    MG[IRV][1] = -vm * um * psi;
+    MG[IRV][2] = 1.0 - vm * vm * psi;
+    MG[IRV][3] = -vm * wm * psi;
+    MG[IRV][4] = vm * psi;
+
+    MG[IRW][0] = 0.5 * wm * v2 * psi;
+    MG[IRW][1] = -wm * um * psi;
+    MG[IRW][2] = -wm * vm * psi;
+    MG[IRW][3] = 1.0 - wm * wm * psi;
+    MG[IRW][4] = wm * psi;
+
+    MG[IRE][0] = 0.5 * Hm * v2 * psi;
+    MG[IRE][1] = - um * Hm * psi;
+    MG[IRE][2] = - vm * Hm * psi;
+    MG[IRE][3] = - wm * Hm * psi;
+    MG[IRE][4] = 1.0 + Hm * psi;
+
+    for (int i = nm; i < neqn; ++ i)
+    {
+        for (int j = 0; j < neqn; ++ j)
+        {
+            MG[i][j] = prim[i] * MG[IR][j];
+            if(j == i)
+            {
+                MG[i][j] = 1.0;
+            }
+        }
+    }
+
+}
+
+void ConservativePreconMatrixVariables(RDouble *field, RDouble *preconMatrix, int neqn)
+{
+    using namespace IDX;
+
+    RDouble *field_tmp = new RDouble [neqn];
+
+    for (int m = 0; m < neqn; ++ m)
+    {
+        field_tmp[m]  = 0;
+    }
+
+    for (int i = 0; i < neqn; ++ i)
+    {
+        for (int j = 0; j < neqn; ++ j)
+        {
+            int index = i * neqn + j;
+
+            field_tmp[i] += field[j] * preconMatrix[index];
+        }
+    }
+
+    for (int m = 0; m < neqn; ++ m)
+    {
+        field[m] = field_tmp[m];
+    }
+
+    delete []field_tmp;
+}
+
+void ConservativePreconMatrixVariables(RDouble *field, RDouble *preconMatrix, RDouble timeCoeff, int neqn)
+{
+    using namespace IDX;
+
+    RDouble *field_tmp = new RDouble [neqn];
+
+    for (int m = 0; m < neqn; ++ m)
+    {
+        field_tmp[m]  = 0;
+    }
+
+    for (int i = 0; i < neqn; ++ i)
+    {
+        for (int j = 0; j < neqn; ++ j)
+        {
+            int index = i * neqn + j;
+
+            field_tmp[i] += field[j] * preconMatrix[index] * timeCoeff;
+        }
+    }
+
+    for (int m = 0; m < neqn; ++ m)
+    {
+        field[m] = field_tmp[m];
+    }
+
+    delete [] field_tmp;    field_tmp = nullptr;
+}
+
+
+
+
+//! The fuction added by LiPeng computes the formula (Mv +- Rv) * dQ, Mv and Rv denote the Jacobian matrix and spectrum radius of viscous flux,respectively,\n
+//! dQ is the increment of conservative vector.
+void MVXDQ_STD_LP(RDouble *prim, RDouble nxs, RDouble nys, RDouble nzs, RDouble area, RDouble vol, RDouble visl, RDouble vist, RDouble gama, 
+                  RDouble *dq, RDouble *f, int nm, int nLaminar, RDouble radius, int ipn)
+{
+    using namespace IDX;
+    using namespace GAS_SPACE;
+
+    RDouble rm = prim[IR];//!the density
+    RDouble um = prim[IU];//!the velocity u in x-direction
+    RDouble vm = prim[IV];//!the velocity v in y-direction
+    RDouble wm = prim[IW];//!the velocity w in z-direction
+    RDouble UU = um * um + vm * vm + wm * wm;
+    RDouble Un = um * nxs + vm * nys + wm * nzs;
+    RDouble Uq = um * dq[1] + vm * dq[2] + wm * dq[3];
+
+    RDouble prl = GlobalDataBase::GetDoubleParaFromDB("prl");
+    RDouble prt = GlobalDataBase::GetDoubleParaFromDB("prt");
+
+    RDouble scl = GlobalDataBase::GetDoubleParaFromDB("sc_l");
+    RDouble sct = GlobalDataBase::GetDoubleParaFromDB("sc_t");
+
+    RDouble refReNumber = GlobalDataBase::GetDoubleParaFromDB("refReNumber"); //! Obtain the reynold number.
+    RDouble coef = area * area / (vol * refReNumber);
+    RDouble bb = (visl + vist)/rm;
+    RDouble b1 = 1.0/3.0 * bb * (-Un * dq[0] + nxs * dq[1] + nys * dq[2] + nzs * dq[3]);
+    RDouble phi = gama * (visl/prl + vist/prt) / rm;
+
+    RDouble cp = 0.0, Tm = 0.0; //!the constant pressure specific heat and temperature.
+    gas->GetTemperatureAndCP(prim, Tm, cp);
+
+    int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    int ns = nLaminar + nChemical - nm;//!the number of species
+    RDouble Psi = -cp * (visl/prl + vist/prt) * Tm/rm;
+    RDouble kn = 0.0;//!the kinetic energy of turbulence
+    Psi += -2.0*bb * UU + phi * 0.5 * UU - bb * kn;
+
+    RDouble *Ds = new RDouble[ns]();
+    RDouble *Phi_s = new RDouble[ns]();
+    RDouble *theta_s = new RDouble[ns]();
+    RDouble fsum = 0.0;
+
+    if (nChemical == 1) //!the relevant terms of chemical reaction
+    {
+        RDouble K = visl/prl + vist/prt;
+        RDouble rD = visl/scl + vist/sct;
+
+        RDouble *hs = new RDouble[ns]();
+        gas->GetEverySpeciesEnthalpy(Tm, Tm, Tm, hs);//!Obtain the enthalpy of each species.
+
+        //!Compute the coefficient theta_s, Phi_s and Ds.
+        gas->ComputeCoefficientInMVXDQ(prim, K, rD, theta_s, Phi_s, Ds);
+
+        Psi += Ds[ns - 1] * prim[nm + ns - 1] * hs[ns - 1];
+        for (int i = 0; i < ns - 1; i++)
+        {
+            fsum += (Phi_s[i]/rm - phi * theta_s[i]) * dq[nm + i];
+            Psi += Ds[i] * prim[nm + i] * hs[i];
+            Psi += phi * prim[nm + i] * theta_s[i];
+            Psi += -prim[nm + i] * Phi_s[i]/rm;
+        }
+        delete []hs;    hs= NULL;
+    }
+
+    //!To compute M*dQ
+    f[IR ] = 0.0; //!Simplification
+    f[IRU] = bb  * dq[IRU] + b1 * nxs - dq[0] * bb * um;
+    f[IRV] = bb  * dq[IRV] + b1 * nys - dq[0] * bb * vm;
+    f[IRW] = bb  * dq[IRW] + b1 * nzs - dq[0] * bb * wm;
+    f[IRE] = phi * dq[IRE] + Uq * (2.0 * bb - phi) + b1 * (2.0*Un) + dq[0] * Psi + fsum; //!fsum denotes the computing result of species terms.
+    for (int iLaminar = nm; iLaminar < nLaminar; ++ iLaminar)
+    {
+        //!f[i] = Ds[i - nm] * dq[i] + b1 * 0.0 + dq[0] * 0.0;
+        f[iLaminar] = Ds[iLaminar - nm] * dq[iLaminar]; //!Simplification
+    }
+
+    for (int iLaminar = 0; iLaminar < nLaminar; ++ iLaminar)
+    {
+        f[iLaminar] *= 0.5 * coef;
+    }
+
+    //!To add rM * dQ that is the product of the viscous spectrum radius rM and increment dQ.
+    RDouble ipnrad = 0.5 * ipn * radius;
+    for (int iLaminar = 0; iLaminar < nLaminar; ++ iLaminar)
+    {
+        f[iLaminar] += ipnrad * dq[iLaminar];
+    }
+
+    //!Remove the dynamic memory space.
+    delete []Ds;    Ds = NULL;
+    delete []Phi_s;    Ds = NULL;
+    delete []theta_s;    theta_s = NULL;
+}
+
+void MatrixFreeDF(RDouble *q, RDouble *dq, RDouble *nxyz, RDouble gama, RDouble *df, int nm, int neqn, int ipn)
+{
+    using namespace IDX;
+    RDouble *Qtmp = new RDouble[neqn];
+
+    RDouble gamm1 = gama - 1.0;
+    RDouble nxs = 0.0, nys = 0.0, nzs = 0.0, vgn = 0.0, ns = 0.0;
+
+    nxs = nxyz[0];
+    nys = nxyz[1];
+    nzs = nxyz[2];
+    ns  = nxyz[3];
+    vgn = nxyz[4];
+
+    RDouble rm,um,vm,wm,pm,vn,eig;
+
+    rm = q[IR];
+    um = q[IU];
+    vm = q[IV];
+    wm = q[IW];
+    pm = q[IP];
+
+    Qtmp[IR]  = rm ;
+    Qtmp[IRU] = rm * um;
+    Qtmp[IRV] = rm * vm;
+    Qtmp[IRW] = rm * wm;
+    Qtmp[IRE] = pm / gamm1 + half * rm * (um * um + vm * vm + wm * wm);
+
+    for (int m = nm; m < neqn; ++ m)
+    {
+        Qtmp[m] = q[IR] * q[m];
+    }
+
+    //! Normal velocity and Eigenvalues.
+    vn = nxs * um + nys * vm + nzs * wm - vgn;
+    eig   = ABS( vn ) + sqrt( gama * pm / rm );
+
+    //! Need to find out the fluxes on level n.
+    df[IR ] = - (Qtmp[IR] * vn);
+    df[IRU] = - (Qtmp[IRU] * vn + nxs * pm);
+    df[IRV] = - (Qtmp[IRV] * vn + nys * pm);
+    df[IRW] = - (Qtmp[IRW] * vn + nzs * pm);
+    df[IRE] = - ((Qtmp[IRE] + pm) * vn + vgn * pm);
+
+    for (int m = nm; m < neqn; ++ m)
+    {
+        df[m] -= ( Qtmp[m] * vn );
+    }
+
+    //! Conservative variable on level n+1.
+    Qtmp[IR]  += dq[IR ];
+    Qtmp[IRU] += dq[IRU];
+    Qtmp[IRV] += dq[IRV];
+    Qtmp[IRW] += dq[IRW];
+    Qtmp[IRE] += dq[IRE];
+
+    for (int m = nm; m < neqn; ++ m)
+    {
+        Qtmp[m] += dq[m];
+    }
+
+    rm = Qtmp[IR];
+    um = Qtmp[IRU] / rm;
+    vm = Qtmp[IRV] / rm;
+    wm = Qtmp[IRW] / rm;
+    pm = gamm1 * (Qtmp[IRE] - half * rm * (um * um + vm * vm + wm * wm));
+
+    rm = ABS(rm);
+    pm = ABS(pm);
+
+    vn  = nxs * um + nys * vm + nzs * wm - vgn;
+
+    //! Now the flux difference due to dq.
+    df[IR ] += (Qtmp[IR] * vn);
+    df[IRU] += (Qtmp[IRU] * vn + nxs * pm);
+    df[IRV] += (Qtmp[IRV] * vn + nys * pm);
+    df[IRW] += (Qtmp[IRW] * vn + nzs * pm);
+    df[IRE] += ((Qtmp[IRE] + pm) * vn + vgn * pm);
+
+    for (int m = nm; m < neqn; ++ m)
+    {
+        df[m] += ( Qtmp[m] * vn );
+    }
+
+    //! Subtract eigenvalue terms from the flux difference.
+    for (int m = 0; m < neqn; ++ m)
+    {
+        //df[m] -= eig * dq[m];
+        df[m] += ipn * eig * dq[m];
+    }
+
+    //! Divide by 2 out of necessity.
+    for (int m = 0; m < neqn; ++ m)
+    {
+        df[m] *= half * ns;
+    }
+
+    delete []Qtmp;
+}
+
+void PreconMatrixFreeDF(RDouble *q, RDouble *dq, RDouble *nxyz, RDouble *preconMatrix, RDouble gama, RDouble preconCoeff, RDouble *df, int nm, int neqn, int ipn)
+{
+    using namespace IDX;
+    RDouble *Qtmp = new RDouble[neqn];
+
+    RDouble gamm1 = gama - 1.0;
+    RDouble nxs = 0.0, nys = 0.0, nzs = 0.0, vgn = 0.0, ns = 0.0;
+
+    nxs = nxyz[0];
+    nys = nxyz[1];
+    nzs = nxyz[2];
+    ns  = nxyz[3];
+    vgn = nxyz[4];
+
+    RDouble rm,um,vm,wm,pm,vn,v2,c2;
+
+    rm = q[IR];
+    um = q[IU];
+    vm = q[IV];
+    wm = q[IW];
+    pm = q[IP];
+
+    Qtmp[IR]  = rm ;
+    Qtmp[IRU] = rm * um;
+    Qtmp[IRV] = rm * vm;
+    Qtmp[IRW] = rm * wm;
+    Qtmp[IRE] = pm / gamm1 + half * rm * (um * um + vm * vm + wm * wm);
+
+    for (int m = nm; m < neqn; ++ m)
+    {
+        Qtmp[m] = q[IR] * q[m];
+    }
+
+    //! Normal velocity and Eigenvalues.
+    vn = nxs * um + nys * vm + nzs * wm - vgn;
+    v2 = um * um + vm * vm + wm * wm;
+    c2  = gama * pm / rm;
+
+    RDouble vnew,cnew,eig;
+
+    vnew  = half * vn * (1.0 + preconCoeff);
+    cnew  = half * sqrt(((1.0 - preconCoeff) * vn) * ((1.0 - preconCoeff) * vn) + 4.0 * preconCoeff * c2);
+    eig   = (ABS(vnew) +  cnew );
+
+    //! Need to find out the fluxes on level n.
+    df[IR ] = - (Qtmp[IR] * vn);
+    df[IRU] = - (Qtmp[IRU] * vn + nxs * pm);
+    df[IRV] = - (Qtmp[IRV] * vn + nys * pm);
+    df[IRW] = - (Qtmp[IRW] * vn + nzs * pm);
+    df[IRE] = - ((Qtmp[IRE] + pm) * vn + vgn * pm);
+
+    for (int m = nm; m < neqn; ++ m)
+    {
+        df[m] -= ( Qtmp[m] * vn );
+    }
+
+    //! Conservative variable on level n+1.
+    Qtmp[IR]  += dq[IR ];
+    Qtmp[IRU] += dq[IRU];
+    Qtmp[IRV] += dq[IRV];
+    Qtmp[IRW] += dq[IRW];
+    Qtmp[IRE] += dq[IRE];
+
+    for (int m = nm; m < neqn; ++ m)
+    {
+        Qtmp[m] += dq[m];
+    }
+
+    rm = Qtmp[IR];
+    um = Qtmp[IRU] / rm;
+    vm = Qtmp[IRV] / rm;
+    wm = Qtmp[IRW] / rm;
+    pm = gamm1 * (Qtmp[IRE] - half * rm * (um * um + vm * vm + wm * wm));
+
+    rm = ABS(rm);
+    pm = ABS(pm);
+
+    vn  = nxs * um + nys * vm + nzs * wm - vgn;
+
+    //! Now the flux difference due to dq.
+    df[IR ] += (Qtmp[IR] * vn);
+    df[IRU] += (Qtmp[IRU] * vn + nxs * pm);
+    df[IRV] += (Qtmp[IRV] * vn + nys * pm);
+    df[IRW] += (Qtmp[IRW] * vn + nzs * pm);
+    df[IRE] += ((Qtmp[IRE] + pm) * vn + vgn * pm);
+
+    for (int m = nm; m < neqn; ++ m)
+    {
+        df[m] += ( Qtmp[m] * vn );
+    }
+
+    ConservativePreconMatrixVariables(df, preconMatrix, neqn);
+
+    //! Subtract eigenvalue terms from the flux difference.
+
+    for (int m = 0; m < neqn; ++ m)
+    {
+        //df[m] -= eig * dq[m];
+        df[m] += ipn * eig * dq[m];
+    }
+
+    //! Divide by 2 out of necessity.
+    for (int m = 0; m < neqn; ++ m)
+    {
+        df[m] *= half * ns;
+    }
+
+    delete []Qtmp;
+}
+
+void PreconMatrixFreeDF(RDouble *q, RDouble *dq, RDouble *nxyz, RDouble *preconMatrix, RDouble gama, RDouble preconCoeff, RDouble timeCoeff, RDouble *df, int nm, int neqn, int ipn)
+{
+    using namespace IDX;
+    RDouble *Qtmp = new RDouble[neqn];
+
+    RDouble gamm1 = gama - 1.0;
+    RDouble nxs = 0.0, nys = 0.0, nzs = 0.0, vgn = 0.0, ns = 0.0;
+
+    nxs = nxyz[0];
+    nys = nxyz[1];
+    nzs = nxyz[2];
+    ns  = nxyz[3];
+    vgn = nxyz[4];
+
+    RDouble rm,um,vm,wm,pm,vn,v2,c2;
+
+    rm = q[IR];
+    um = q[IU];
+    vm = q[IV];
+    wm = q[IW];
+    pm = q[IP];
+
+    Qtmp[IR]  = rm ;
+    Qtmp[IRU] = rm * um;
+    Qtmp[IRV] = rm * vm;
+    Qtmp[IRW] = rm * wm;
+    Qtmp[IRE] = pm / gamm1 + half * rm * (um * um + vm * vm + wm * wm);
+
+    for (int m = nm; m < neqn; ++ m)
+    {
+        Qtmp[m] = q[IR] * q[m];
+    }
+
+    //! Normal velocity and Eigenvalues.
+    vn = nxs * um + nys * vm + nzs * wm - vgn;
+    v2 = um * um + vm * vm + wm * wm;
+    c2 = gama * pm / rm;
+
+    RDouble vnew,cnew,eig;
+
+    vnew = half * timeCoeff * vn * (1.0 + preconCoeff);
+    cnew = half * timeCoeff * sqrt(((1.0 - preconCoeff) * vn) * ((1.0 - preconCoeff) * vn) + 4.0 * preconCoeff * c2);
+    eig  = (ABS(vnew) +  cnew );
+
+    //! Need to find out the fluxes on level n.
+    df[IR ] = - (Qtmp[IR] * vn);
+    df[IRU] = - (Qtmp[IRU] * vn + nxs * pm);
+    df[IRV] = - (Qtmp[IRV] * vn + nys * pm);
+    df[IRW] = - (Qtmp[IRW] * vn + nzs * pm);
+    df[IRE] = - ((Qtmp[IRE] + pm) * vn + vgn * pm);
+
+    for (int m = nm; m < neqn; ++ m)
+    {
+        df[m] -= ( Qtmp[m] * vn );
+    }
+
+    //! Conservative variable on level n+1.
+    Qtmp[IR]  += dq[IR ];
+    Qtmp[IRU] += dq[IRU];
+    Qtmp[IRV] += dq[IRV];
+    Qtmp[IRW] += dq[IRW];
+    Qtmp[IRE] += dq[IRE];
+
+    for (int m = nm; m < neqn; ++ m)
+    {
+        Qtmp[m] += dq[m];
+    }
+
+    rm = Qtmp[IR];
+    um = Qtmp[IRU] / rm;
+    vm = Qtmp[IRV] / rm;
+    wm = Qtmp[IRW] / rm;
+    pm = gamm1 * (Qtmp[IRE] - half * rm * (um * um + vm * vm + wm * wm));
+
+    rm = ABS(rm);
+    pm = ABS(pm);
+
+    vn = nxs * um + nys * vm + nzs * wm - vgn;
+
+    //! Now the flux difference due to dq.
+    df[IR ] += (Qtmp[IR] * vn);
+    df[IRU] += (Qtmp[IRU] * vn + nxs * pm);
+    df[IRV] += (Qtmp[IRV] * vn + nys * pm);
+    df[IRW] += (Qtmp[IRW] * vn + nzs * pm);
+    df[IRE] += ((Qtmp[IRE] + pm) * vn + vgn * pm);
+
+    for (int m = nm; m < neqn; ++ m)
+    {
+        df[m] += ( Qtmp[m] * vn );
+    }
+
+    ConservativePreconMatrixVariables(df, preconMatrix, timeCoeff, neqn);
+
+    //! Subtract eigenvalue terms from the flux difference.
+
+    for (int m = 0; m < neqn; ++ m)
+    {
+        //df[m] -= eig * dq[m];
+        df[m] += ipn * eig * dq[m];
+    }
+
+    //! Divide by 2 out of necessity.
+    for (int m = 0; m < neqn; ++ m)
+    {
+        df[m] *= half * ns;
+    }
+
+    delete[] Qtmp;    Qtmp = nullptr;
+}
+}
diff --git a/API/Physics/src/Limiter.cpp b/API/Physics/src/Limiter.cpp
new file mode 100644
index 0000000..33e5711
--- /dev/null
+++ b/API/Physics/src/Limiter.cpp
@@ -0,0 +1,1363 @@
+#include "Limiter.h"
+#include "Glb_Dimension.h"
+#include "Geo_StructBC.h"
+#include "Geo_UnstructBC.h"
+#include "TK_Exit.h"
+#include "Math_Limiter.h"
+using namespace std;
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Limiter::Limiter(UnstructGrid * gridin, RDouble ** q, int nVariable, const string &limiterVarName)
+{
+    this->grid              = gridin;
+    this->q                 = q;
+    this->nLimiterVariables = nVariable;
+    this->limiterVarName    = limiterVarName;
+
+    limit = new Data2D<RDouble>();
+
+    limitModel     = 0;
+    limitVector   = 0;
+    limiterTypeID  = 1;
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal     = nTotalCell + nBoundFace;
+
+    this->CreateLimiter(nTotal, nLimiterVariables);
+}
+
+LIB_EXPORT Limiter::~Limiter()
+{
+    delete limit;    limit = NULL;
+}
+
+void Limiter::CreateLimiter(int nsize, int neqn)
+{
+    limit->CreateData(nsize, neqn);
+}
+
+LIB_EXPORT Limiter::iterator Limiter::GetLimiter(int m)
+{
+    return limit->GetData(m);
+}
+
+LIB_EXPORT void Limiter::Calculation(Grid *gridIn)
+{
+    if (limiterTypeID >= ILMT_STRUCT || limiterTypeID == ILMT_NOLIM || limiterTypeID == ILMT_FIRST)
+    {
+        return;
+    }
+
+    UnstructGrid *gridUnstruct = UnstructGridCast(gridIn);
+
+    RDouble **dqdx = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **dqdy = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **dqdz = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradPrimtiveVarZ"));
+    using namespace IDX;
+
+    const int SCALAR_LIMITER    = 0;
+    const int VECTOR_LIMITER    = 1;
+
+    const int LIMIT_BY_RHO_P    = 0;
+    const int LIMIT_BY_EACH_VAR = 1;
+
+    RDouble *limit = 0;
+    if (limiterTypeID == ILMT_BARTH)
+    {
+        if(limitVector == SCALAR_LIMITER)
+        {
+            //! Each variables has the same limiter value.
+            limit = this->GetLimiter(0);
+            if (limitModel == LIMIT_BY_RHO_P)
+            {
+                BarthLimiter(limit, q[IR], dqdx[IR], dqdy[IR], dqdz[IR]);
+                BarthLimiter(limit, q[IP], dqdx[IP], dqdy[IP], dqdz[IP]);
+            }
+            else if (limitModel == LIMIT_BY_EACH_VAR)
+            {
+                for (int iVariable = 0; iVariable < nLimiterVariables; ++ iVariable)
+                {
+                    BarthLimiter(limit, q[iVariable], dqdx[iVariable], dqdy[iVariable], dqdz[iVariable]);
+                }
+            }
+        }
+        else if(limitVector == VECTOR_LIMITER)
+        {
+            //! Limiter value of each variable is computed by itself.
+            for (int iVariable = 0; iVariable < nLimiterVariables; ++ iVariable)
+            {
+                limit = this->GetLimiter(iVariable);
+                BarthLimiter(limit, q[iVariable], dqdx[iVariable], dqdy[iVariable], dqdz[iVariable]);
+            }
+        }
+    }
+    else if (limiterTypeID == ILMT_VENCAT)
+    {
+        if (limitVector == SCALAR_LIMITER)
+        {
+            //! The limiter values of each variable are same.
+            limit = this->GetLimiter(0);
+            if (limitModel == LIMIT_BY_RHO_P)
+            {
+                VencatLimiter(limit, q[IR], dqdx[IR], dqdy[IR], dqdz[IR], IR);
+                VencatLimiter(limit, q[IP], dqdx[IP], dqdy[IP], dqdz[IP], IP);
+            }
+            else if (limitModel == LIMIT_BY_EACH_VAR)
+            {
+                for (int m = 0; m < nLimiterVariables; ++ m)
+                {
+                    VencatLimiter(limit, q[m], dqdx[m], dqdy[m], dqdz[m], m);
+                }
+            }
+        } 
+        else if(limitVector == VECTOR_LIMITER)
+        {
+            //! The limiter values of each variable are different.
+            for (int m = 0; m < nLimiterVariables; ++ m)
+            {
+                limit = this->GetLimiter(m);
+                VencatLimiter(limit, q[m], dqdx[m], dqdy[m], dqdz[m], m);
+            }
+        }        
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("Error: this unstructured limiter is not exist !\n", true);
+    }
+
+    //! Set limiter at boundary.
+    if (limitVector == SCALAR_LIMITER)
+    {
+        limit = this->GetLimiter(0);
+        SetLimitBoundary(gridUnstruct, limit);
+    }
+    else if(limitVector == VECTOR_LIMITER)
+    {
+        for (int m = 0; m < nLimiterVariables; ++ m)
+        {
+            limit = this->GetLimiter(m);
+            SetLimitBoundary(gridUnstruct, limit);
+        }
+    }
+}
+
+LIB_EXPORT void Limiter::InitLimitData()
+{
+    limit->SetData(one);
+
+    if (limiterTypeID == ILMT_FIRST)
+    {
+        limit->SetData(zero);
+    }
+}
+
+void Limiter::BarthLimiter(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotal = nTotalCell + nBoundFace;
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *xfc  = grid->GetFaceCenterX();
+    RDouble *yfc  = grid->GetFaceCenterY();
+    RDouble *zfc  = grid->GetFaceCenterZ();
+    RDouble *xcc  = grid->GetCellCenterX();
+    RDouble *ycc  = grid->GetCellCenterY();
+    RDouble *zcc  = grid->GetCellCenterZ();
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+
+    //! Need temporary arrays for the differences between the value in every cell and
+    //! maximum/minimum in the neighboring cells.
+    RDouble *dmin = new RDouble[nTotal];
+    RDouble *dmax = new RDouble[nTotal];
+
+    //! Find the the differences for q.
+    MinMaxDiff(dmin, dmax, q);
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le     = leftCellOfFace [iFace];
+
+        RDouble dx     = xfc[iFace] - xcc[le];
+        RDouble dy     = yfc[iFace] - ycc[le];
+        RDouble dz     = zfc[iFace] - zcc[le];
+        RDouble dqFace = dqdx[le] * dx + dqdy[le] * dy + dqdz[le] * dz;
+
+        RDouble ds     = sqrt(dx * dx + dy * dy + dz * dz);
+        RDouble dot    = (xfn[iFace] * dx + yfn[iFace] * dy + zfn[iFace] * dz) / (ds + SMALL);
+        
+        if (dot < 0.0)
+        {
+            limit[le] = 0.0;
+        }
+        else if (dqFace > dmax[le])
+        {
+            limit[le] = MIN(limit[le], dmax[le] / (dqFace + SMALL));
+        }
+        else if (dqFace < dmin[le])
+        {
+            limit[le] = MIN(limit[le], dmin[le] / (dqFace + SMALL));
+        }
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le     = leftCellOfFace [iFace];
+        int re     = rightCellOfFace[iFace];
+
+        RDouble dx     = xfc[iFace] - xcc[le];
+        RDouble dy     = yfc[iFace] - ycc[le];
+        RDouble dz     = zfc[iFace] - zcc[le];
+        RDouble dqFace = dqdx[le] * dx + dqdy[le] * dy + dqdz[le] * dz;
+
+        RDouble ds     = sqrt(dx * dx + dy * dy + dz * dz);
+        RDouble dot    = (xfn[iFace] * dx + yfn[iFace] * dy + zfn[iFace] * dz) / (ds + SMALL);
+
+        if (dot < 0.0)
+        {
+            limit[le] = 0.0;
+        }
+        else if (dqFace > dmax[le])
+        {
+            limit[le] = MIN(limit[le], dmax[le] / (dqFace + SMALL));
+        }
+        else if (dqFace < dmin[le])
+        {
+            limit[le] = MIN(limit[le], dmin[le] / (dqFace + SMALL));
+        }
+
+        dx     = xfc[iFace] - xcc[re];
+        dy     = yfc[iFace] - ycc[re];
+        dz     = zfc[iFace] - zcc[re];
+
+        dqFace = dqdx[re] * dx + dqdy[re] * dy + dqdz[re] * dz;
+
+        ds     = sqrt(dx * dx + dy * dy + dz * dz);
+        dot    = - (xfn[iFace] * dx + yfn[iFace] * dy + zfn[iFace] * dz) / (ds + SMALL);
+
+        if (dot < 0.0)
+        {
+            limit[re] = 0.0;
+        }
+        else if (dqFace > dmax[re])
+        {
+            limit[re] = MIN(limit[re], dmax[re] / (dqFace + SMALL));
+        }
+        else if (dqFace < dmin[re])
+        {
+            limit[re] = MIN(limit[re], dmin[re] / (dqFace + SMALL));
+        }
+    }
+
+    delete [] dmin;    dmin = NULL;
+    delete [] dmax;    dmax = NULL;
+}
+
+/************************************************************************/
+/*         Control switch of Vencat limiter, Bell 20111226              */
+/************************************************************************/
+void Limiter::VencatLimiter(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, int iVariable)
+{
+    switch (vencatLimiterType)
+    {
+    case 0:
+        VencatLimiter0(limit, q, dqdx, dqdy, dqdz);
+        break;
+    case 1:
+        VencatLimiter1(limit, q, dqdx, dqdy, dqdz);
+        break;
+    case 2:
+        VencatLimiter2(limit, q, dqdx, dqdy, dqdz, iVariable);
+        break;
+    case 3:
+        VencatLimiter3(limit, q, dqdx, dqdy, dqdz, iVariable);
+        break;
+    case 4:
+        VencatLimiter4(limit, q, dqdx, dqdy, dqdz);
+        break;
+    case 5:
+        VencatLimiter5(limit, q, dqdx, dqdy, dqdz);
+        break;
+    case 6:
+        VencatLimiter6(limit, q, dqdx, dqdy, dqdz);
+        break;
+    case 7:
+        VencatLimiter7(limit, q, dqdx, dqdy, dqdz, iVariable);
+        break;
+    default:
+        TK_Exit::UnexpectedVarValue("vencat limiter type", vencatLimiterType);
+        break;
+    }
+}
+/************************************************************************
+Dr. Wang improved vencat limiter, independent of grid unit.
+This limiter is used in Fluent.
+Reference: AIAA-96-2091
+A fast nested multigrid viscous flow solver for adaptive Cartesian Quad grids
+venkatCoeff = [0.01, 0.2]
+But, the dmin and dmax should be the whole grid rather than one partition grid.
+************************************************************************/
+void Limiter::VencatLimiter0(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotal     = nTotalCell + nBoundFace;
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *xfc   = grid->GetFaceCenterX();
+    RDouble *yfc   = grid->GetFaceCenterY();
+    RDouble *zfc   = grid->GetFaceCenterZ();
+    RDouble *xcc   = grid->GetCellCenterX();
+    RDouble *ycc   = grid->GetCellCenterY();
+    RDouble *zcc   = grid->GetCellCenterZ();
+
+    RDouble dx, dy, dz;
+    RDouble dqFace, tmp;
+
+    RDouble *dmin = new RDouble[nTotal];
+    RDouble *dmax = new RDouble[nTotal];
+
+    //! Find the the differences for q.
+    MinMaxDiff(dmin, dmax, q);
+
+    //! Find the maximum and minimum of dq in the field to set epsilons.
+    RDouble dqMin = dmin[0], dqMax = dmax[0];
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        dqMin = MIN(dqMin, dmin[iCell]);
+        dqMax = MAX(dqMax, dmax[iCell]);
+    }
+
+    grid->CompareMaxMinValue(dqMax, 1);
+    grid->CompareMaxMinValue(dqMin, 2);
+
+    RDouble venkatCoeff = 1.0e-5;
+    GlobalDataBase::GetData("venkatCoeff", &venkatCoeff, PHDOUBLE, 1);
+
+    RDouble eps;
+    eps = venkatCoeff * (dqMax - dqMin);
+    eps = eps * eps + SMALL;
+
+    int le, re;
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        dx      = xfc[iFace] - xcc[le];
+        dy      = yfc[iFace] - ycc[le];
+        dz      = zfc[iFace] - zcc[le];
+        dqFace  = dqdx[le] * dx + dqdy[le] * dy + dqdz[le] * dz;
+
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp       = VenFun(dmin[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        dx     = xfc[iFace] - xcc[le];
+        dy     = yfc[iFace] - ycc[le];
+        dz     = zfc[iFace] - zcc[le];
+        dqFace = dqdx[le] * dx + dqdy[le] * dy + dqdz[le] * dz;
+
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp       = VenFun(dmin[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+
+        dx     = xfc[iFace] - xcc[re];
+        dy     = yfc[iFace] - ycc[re];
+        dz     = zfc[iFace] - zcc[re];
+        dqFace = dqdx[re] * dx + dqdy[re] * dy + dqdz[re] * dz;
+
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[re], dqFace, eps);
+            limit[re] = MIN(limit[re], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp       = VenFun(dmin[re], dqFace, eps);
+            limit[re] = MIN(limit[re], tmp);
+        }
+    }
+
+    delete [] dmin;    dmin = NULL;
+    delete [] dmax;    dmax = NULL;
+}
+
+void Limiter::VencatLimiter1(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotal = nTotalCell + nBoundFace;
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *xfc   = grid->GetFaceCenterX();
+    RDouble *yfc   = grid->GetFaceCenterY();
+    RDouble *zfc   = grid->GetFaceCenterZ();
+    RDouble *xcc   = grid->GetCellCenterX();
+    RDouble *ycc   = grid->GetCellCenterY();
+    RDouble *zcc   = grid->GetCellCenterZ();
+
+    RDouble dx, dy, dz, ds;
+    RDouble dqFace, tmp;
+
+    RDouble *dmin = new RDouble[nTotal];
+    RDouble *dmax = new RDouble[nTotal];
+
+    //! Find the the differences for q.
+    MinMaxDiff(dmin, dmax, q);
+
+    //! Find the maximum and minimum of dq in the field to set epsilons.
+    RDouble dqMin = dmin[0], dqMax = dmax[0];
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        dqMin = MIN(dqMin, dmin[iCell]);
+        dqMax = MAX(dqMax, dmax[iCell]);
+    }
+
+    RDouble venkatCoeff = 1.0e-5;
+    GlobalDataBase::GetData("venkatCoeff", &venkatCoeff, PHDOUBLE, 1);
+
+    RDouble eps, eps_ref;
+    eps_ref = venkatCoeff * (dqMax - dqMin);
+    eps = eps_ref + SMALL;
+    //eps = eps * eps + SMALL;
+
+    int le, re;
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        dx = xcc[re] - xcc[le];
+        dy = ycc[re] - ycc[le];
+        dz = zcc[re] - zcc[le];
+        
+        ds  = sqrt(dx * dx + dy * dy + dz * dz);
+        eps = ds;
+        eps = eps_ref * eps * eps * eps;
+
+        dx      = xfc[iFace] - xcc[le];
+        dy      = yfc[iFace] - ycc[le];
+        dz      = zfc[iFace] - zcc[le];
+        dqFace  = dqdx[le] * dx + dqdy[le] * dy + dqdz[le] * dz;
+
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp       = VenFun(dmin[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        dx = xcc[re] - xcc[le];
+        dy = ycc[re] - ycc[le];
+        dz = zcc[re] - zcc[le];
+        
+        ds  = sqrt(dx * dx + dy * dy + dz * dz);
+        eps = ds;
+        eps = eps_ref * eps * eps * eps;
+
+        dx     = xfc[iFace] - xcc[le];
+        dy     = yfc[iFace] - ycc[le];
+        dz     = zfc[iFace] - zcc[le];
+        dqFace = dqdx[le] * dx + dqdy[le] * dy + dqdz[le] * dz;
+
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp       = VenFun(dmin[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+
+        dx     = xfc[iFace] - xcc[re];
+        dy     = yfc[iFace] - ycc[re];
+        dz     = zfc[iFace] - zcc[re];
+        dqFace = dqdx[re] * dx + dqdy[re] * dy + dqdz[re] * dz;
+
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[re], dqFace, eps);
+            limit[re] = MIN(limit[re], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp       = VenFun(dmin[re], dqFace, eps);
+            limit[re] = MIN(limit[re], tmp);
+        }
+    }
+
+    delete [] dmin;    dmin = NULL;
+    delete [] dmax;    dmax = NULL;
+}
+
+//! This limiter type was proposed by CXH.
+//! Which has nothing to do with mesh size, mach number.
+//! But it need to be V&V in more numerical experiments.
+void Limiter::VencatLimiter2(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, int iVariable)
+{
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotal = nTotalCell + nBoundFace;      
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *xfc   = grid->GetFaceCenterX();
+    RDouble *yfc   = grid->GetFaceCenterY();
+    RDouble *zfc   = grid->GetFaceCenterZ();
+    RDouble *xcc   = grid->GetCellCenterX();
+    RDouble *ycc   = grid->GetCellCenterY();
+    RDouble *zcc   = grid->GetCellCenterZ();
+
+    RDouble dx, dy, dz;
+    RDouble dqFace, tmp;
+
+    RDouble *dmin = new RDouble[nTotal];
+    RDouble *dmax = new RDouble[nTotal];
+
+    //! Find the the differences for q.
+    MinMaxDiff(dmin, dmax, q);
+
+    RDouble venkatCoeff = GlobalDataBase::GetDoubleParaFromDB("venkatCoeff");
+    RDouble globalTotalCells = GlobalDataBase::GetDoubleParaFromDB("UnstrGlobalTotalCells");
+
+    //! The following 'eps' is the eps^2 actually in the mathematic formation.
+    //! And the 'venkatCoeff' is the coefficient of 'K' in the mathematic formation.
+    int dimension = GetDim();
+    RDouble n = 3.0;
+    RDouble eps;
+    eps = pow((venkatCoeff * pow((1.0 / globalTotalCells), (1.0 / dimension))), n);
+    if(iVariable == IDX::IP)
+    {
+        RDouble * primInflow = reinterpret_cast< RDouble * >(GlobalDataBase::GetDataPtr("prim_inf"));
+        eps *= primInflow[IDX::IP] * primInflow[IDX::IP];
+    }
+
+    int le, re;
+
+    //! The following loop is to calculate the limiter coefficient of each cell on the boundary face.
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        //! Get the left and right cell index of iFace.
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        //! Compute the vector from face center to left cell center.
+        dx = xfc[iFace] - xcc[le];
+        dy = yfc[iFace] - ycc[le];
+        dz = zfc[iFace] - zcc[le];
+
+        //! Compute the dq from left cell center to face center.
+        dqFace  = dqdx[le] * dx + dqdy[le] * dy + dqdz[le] * dz;
+        if (dqFace > SMALL)
+        {
+            //! According to the vencat limiter of Theory manual.
+            tmp       = VenFun(dmax[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            //! According to the vencat limiter of Theory manual.
+            tmp       = VenFun(dmin[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+    }
+
+    //! The following loop is to calculate the limiter coefficient of each interior cell.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        dx     = xfc[iFace] - xcc[le];
+        dy     = yfc[iFace] - ycc[le];
+        dz     = zfc[iFace] - zcc[le];
+        dqFace = dqdx[le] * dx + dqdy[le] * dy + dqdz[le] * dz;
+        if (dqFace > SMALL)
+        {
+            tmp      = VenFun(dmax[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp      = VenFun(dmin[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+
+        dx     = xfc[iFace] - xcc[re];
+        dy     = yfc[iFace] - ycc[re];
+        dz     = zfc[iFace] - zcc[re];
+        dqFace = dqdx[re] * dx + dqdy[re] * dy + dqdz[re] * dz;
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[re], dqFace, eps);
+            limit[re] = MIN(limit[re], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp       = VenFun(dmin[re], dqFace, eps);
+            limit[re] = MIN(limit[re], tmp);
+        }
+    }
+
+    delete [] dmin;    dmin = NULL;
+    delete [] dmax;    dmax = NULL;
+}
+
+//! This limiter type was modified by NeverMore.
+//! Which the limiter coefficient of eps^2 is influenced by cell volume,
+//! other than distance between cell center and face center, that was used in VencatLimiter4.
+void Limiter::VencatLimiter3(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, int iVariable)
+{
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotal = nTotalCell + nBoundFace;
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *xfc    = grid->GetFaceCenterX();
+    RDouble *yfc    = grid->GetFaceCenterY();
+    RDouble *zfc    = grid->GetFaceCenterZ();
+    RDouble *xcc    = grid->GetCellCenterX();
+    RDouble *ycc    = grid->GetCellCenterY();
+    RDouble *zcc    = grid->GetCellCenterZ();
+    RDouble *volume = grid->GetCellVolume();
+
+    RDouble dx, dy, dz;
+    RDouble dqFace, tmp;
+    int le, re;
+
+    RDouble *dmin = new RDouble[nTotal];
+    RDouble *dmax = new RDouble[nTotal];
+
+    //! Find the the differences for q.
+    MinMaxDiff(dmin, dmax, q);
+
+    RDouble globalTotalVolume;
+    GlobalDataBase::GetData("UnstrGlobalTotalVolume", &globalTotalVolume, PHDOUBLE, 1);
+
+    //! The following 'eps' is the eps^2 actually in the mathematic formation.
+    //! And the 'venkatCoeff' is the coefficient of 'K' in the mathematic formation.
+    RDouble venkatCoeff = 1.0e-5;
+    GlobalDataBase::GetData("venkatCoeff", &venkatCoeff, PHDOUBLE, 1);
+    RDouble *primInflow = reinterpret_cast<RDouble *>(GlobalDataBase::GetDataPtr("prim_inf"));
+        
+    RDouble n = 3.0;
+    int dimension = GetDim();
+    RDouble dim1 = 1.0 / (dimension * 1.0);
+
+    //! Calculate eps for each cell.
+    RDouble squareOfReferenceVariable = primInflow[IDX::IP] * primInflow[IDX::IP];
+    RDouble *eps = new RDouble [nTotalCell];
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        eps[iCell] = pow(venkatCoeff * pow(volume[iCell] / globalTotalVolume, dim1), n);
+        if(iVariable == IDX::IP)
+        {
+            eps[iCell]  *= squareOfReferenceVariable;
+        }
+    }
+
+    //! The following loop is to calculate the limiter coefficient of each cell on the boundary face.
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        dx      = xfc[iFace] - xcc[le];
+        dy      = yfc[iFace] - ycc[le];
+        dz      = zfc[iFace] - zcc[le];
+
+        dqFace  = dqdx[le] * dx + dqdy[le] * dy + dqdz[le] * dz;
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[le], dqFace, eps[le]);
+            limit[le] = MIN(limit[le], tmp);
+
+        }
+        else if (dqFace < - SMALL)
+        { 
+            tmp       = VenFun(dmin[le], dqFace, eps[le]);
+            limit[le] = MIN(limit[le], tmp);
+        }
+    }
+
+    //! The following loop is to calculate the limiter coefficient of each interior cell.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        dx     = xfc[iFace] - xcc[le];
+        dy     = yfc[iFace] - ycc[le];
+        dz     = zfc[iFace] - zcc[le];
+        dqFace = dqdx[le] * dx + dqdy[le] * dy + dqdz[le] * dz;
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[le], dqFace, eps[le]);
+            limit[le] = MIN(limit[le], tmp);
+
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp       = VenFun(dmin[le], dqFace, eps[le]);
+            limit[le] = MIN(limit[le], tmp);
+        }
+
+        dx     = xfc[iFace] - xcc[re];
+        dy     = yfc[iFace] - ycc[re];
+        dz     = zfc[iFace] - zcc[re];
+        dqFace = dqdx[re] * dx + dqdy[re] * dy + dqdz[re] * dz;
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[re], dqFace, eps[re]);
+            limit[re] = MIN(limit[re], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp       = VenFun(dmin[re], dqFace, eps[re]);
+            limit[re] = MIN(limit[re], tmp);
+        }
+    }
+
+    delete [] dmin;    dmin = NULL;
+    delete [] dmax;    dmax = NULL;
+    delete [] eps;     eps = NULL;
+}
+
+/************************************************************************/
+/*  According to the literature formula,related to the grid unit        */
+/*                        Bell 20121028 add                             */
+/************************************************************************/
+void Limiter::VencatLimiter4(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotal = nTotalCell + nBoundFace;
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *xfc   = grid->GetFaceCenterX();
+    RDouble *yfc   = grid->GetFaceCenterY();
+    RDouble *zfc   = grid->GetFaceCenterZ();
+    RDouble *xcc   = grid->GetCellCenterX();
+    RDouble *ycc   = grid->GetCellCenterY();
+    RDouble *zcc   = grid->GetCellCenterZ();
+
+    RDouble dx, dy, dz, ds;
+    RDouble dqFace, tmp;
+
+    RDouble *dmin = new RDouble[nTotal];
+    RDouble *dmax = new RDouble[nTotal];
+
+    //! Find the the differences for q.
+    MinMaxDiff(dmin, dmax, q);
+
+    //! Find the maximum and minimum of dq in the field to set epsilons.
+    RDouble dqMin = dmin[0], dqMax = dmax[0];
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        dqMin = MIN(dqMin, dmin[iCell]);
+        dqMax = MAX(dqMax, dmax[iCell]);
+    }
+
+    //! Bell 20131123 mod.
+    //! Bell 20130307 add.
+    grid->CompareMaxMinValue(dqMax, 1);
+    grid->CompareMaxMinValue(dqMin, 2);
+    //*/
+
+    RDouble venkatCoeff = 1.0e-5;
+    GlobalDataBase::GetData("venkatCoeff", &venkatCoeff, PHDOUBLE, 1);
+
+    RDouble eps;
+
+    int le, re;
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        dx = xcc[re] - xcc[le];
+        dy = ycc[re] - ycc[le];
+        dz = zcc[re] - zcc[le];
+
+        ds  = sqrt(dx * dx + dy * dy + dz * dz);
+        eps = venkatCoeff * venkatCoeff * venkatCoeff * ds * ds * ds;
+
+        dx      = xfc[iFace] - xcc[le];
+        dy      = yfc[iFace] - ycc[le];
+        dz      = zfc[iFace] - zcc[le];
+        dqFace  = dqdx[le] * dx + dqdy[le] * dy + dqdz[le] * dz;
+
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp       = VenFun(dmin[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        dx = xcc[re] - xcc[le];
+        dy = ycc[re] - ycc[le];
+        dz = zcc[re] - zcc[le];
+
+        ds  = sqrt(dx * dx + dy * dy + dz * dz);
+        eps = venkatCoeff * venkatCoeff * venkatCoeff * ds * ds * ds;
+
+        dx     = xfc[iFace] - xcc[le];
+        dy     = yfc[iFace] - ycc[le];
+        dz     = zfc[iFace] - zcc[le];
+        dqFace = dqdx[le] * dx + dqdy[le] * dy + dqdz[le] * dz;
+
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp       = VenFun(dmin[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+
+        dx     = xfc[iFace] - xcc[re];
+        dy     = yfc[iFace] - ycc[re];
+        dz     = zfc[iFace] - zcc[re];
+        dqFace = dqdx[re] * dx + dqdy[re] * dy + dqdz[re] * dz;
+
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[re], dqFace, eps);
+            limit[re] = MIN(limit[re], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp       = VenFun(dmin[re], dqFace, eps);
+            limit[re] = MIN(limit[re], tmp);
+        }
+    }
+
+    delete [] dmin;    dmin = NULL;
+    delete [] dmax;    dmax = NULL;
+}
+
+/************************************************************************/
+/*       According to the grid volume,related to the grid unit          */
+/*                          Bell 20161114 add                           */
+/************************************************************************/
+void Limiter::VencatLimiter5(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotal = nTotalCell + nBoundFace;
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *xfc    = grid->GetFaceCenterX();
+    RDouble *yfc    = grid->GetFaceCenterY();
+    RDouble *zfc    = grid->GetFaceCenterZ();
+    RDouble *xcc    = grid->GetCellCenterX();
+    RDouble *ycc    = grid->GetCellCenterY();
+    RDouble *zcc    = grid->GetCellCenterZ();
+    RDouble *volume = grid->GetCellVolume();
+
+    RDouble dx, dy, dz;
+    RDouble dqFace, tmp;
+
+    RDouble *dmin = new RDouble[nTotal];
+    RDouble *dmax = new RDouble[nTotal];
+
+    //! Find the the differences for q.
+    MinMaxDiff(dmin, dmax, q);
+
+    RDouble venkatCoeff = 1.0e-5;
+    GlobalDataBase::GetData("venkatCoeff", &venkatCoeff, PHDOUBLE, 1);
+
+    RDouble eps;
+
+    int le, re;
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+
+        eps = venkatCoeff * venkatCoeff * venkatCoeff * volume[le];
+
+        dx      = xfc[iFace] - xcc[le];
+        dy      = yfc[iFace] - ycc[le];
+        dz      = zfc[iFace] - zcc[le];
+        dqFace  = dqdx[le] * dx + dqdy[le] * dy + dqdz[le] * dz;
+
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp       = VenFun(dmin[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        eps = venkatCoeff * venkatCoeff * venkatCoeff * volume[le];
+        dx     = xfc[iFace] - xcc[le];
+        dy     = yfc[iFace] - ycc[le];
+        dz     = zfc[iFace] - zcc[le];
+        dqFace = dqdx[le] * dx + dqdy[le] * dy + dqdz[le] * dz;
+
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp       = VenFun(dmin[le], dqFace, eps);
+            limit[le] = MIN(limit[le], tmp);
+        }
+
+        eps = venkatCoeff * venkatCoeff * venkatCoeff * volume[re];
+        dx     = xfc[iFace] - xcc[re];
+        dy     = yfc[iFace] - ycc[re];
+        dz     = zfc[iFace] - zcc[re];
+        dqFace = dqdx[re] * dx + dqdy[re] * dy + dqdz[re] * dz;
+
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[re], dqFace, eps);
+            limit[re] = MIN(limit[re], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp       = VenFun(dmin[re], dqFace, eps);
+            limit[re] = MIN(limit[re], tmp);
+        }
+    }
+
+    delete [] dmin;    dmin = NULL;
+    delete [] dmax;    dmax = NULL;
+}
+
+//! Multidimensional limiting Process.
+void Limiter::VencatLimiter6(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz)
+{
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotal = nTotalCell + nBoundFace;
+    int iNode,j;
+    int nTotalNode = grid->GetNTotalNode();
+    int *nCPN = grid->GetCellNumberOfEachNode();
+    int *npc  = grid->GetNodeNumberOfEachCell();
+    int *n2c  = grid->GetNode2Cell();
+    int *c2n  = grid->GetCell2Node();
+    RDouble *xn = grid->GetX();
+    RDouble *yn = grid->GetY();
+    RDouble *zn = grid->GetZ();
+
+    RDouble *xcc    = grid->GetCellCenterX();
+    RDouble *ycc    = grid->GetCellCenterY();
+    RDouble *zcc    = grid->GetCellCenterZ();
+    RDouble *volume = grid->GetCellVolume();
+
+    RDouble globalTotalVolume = 0.0;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        globalTotalVolume += volume[iCell];  
+    }
+    RDouble **qAll = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    using namespace IDX;
+
+    RDouble dx, dy, dz, ds;
+    RDouble dqNode, tmp;
+    RDouble dqmax, dqmin;
+
+    RDouble venkatCoeff = 1.0e-5;
+    GlobalDataBase::GetData("venkatCoeff", &venkatCoeff, PHDOUBLE, 1);
+
+    RDouble eps;
+
+    RDouble *qmax = new RDouble[nTotalNode];
+    RDouble *qmin = new RDouble[nTotalNode];
+
+    int count = 0;
+    for(iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        qmax[iNode] = -1;
+        qmin[iNode] = 100000;
+        for(j = 0; j < nCPN[ iNode ]; ++ j)
+        {
+            qmax[iNode] = max(qmax[iNode], q[n2c[count]]);
+            qmin[iNode] = min(qmin[iNode], q[n2c[count]]);
+            count ++;
+        }
+
+    }
+
+    count = 0;
+    int nodeno;
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        for (j = 0; j < npc[iCell]; ++ j)
+        {
+            nodeno = c2n[count ++];
+            dqmax  = qmax[nodeno] - q[iCell];
+            dqmin  = qmin[nodeno] - q[iCell];
+            dx     =  xn[nodeno] - xcc[iCell];
+            dy     =  yn[nodeno] - ycc[iCell];
+            dz     =  zn[nodeno] - zcc[iCell];
+            ds     =  sqrt(dx * dx + dy * dy + dz * dz);
+            dqNode = dqdx[iCell] * dx + dqdy[iCell] * dy + dqdz[iCell] * dz;
+
+            eps = venkatCoeff * venkatCoeff * venkatCoeff * ds * ds * ds * qAll[IP][iCell] * qAll[IP][iCell] / globalTotalVolume;
+            if (dqNode > SMALL)
+            {
+                tmp          = VenFun(dqmax, dqNode, eps);
+                limit[iCell] = MIN(limit[iCell], tmp);
+            }
+            else if (dqNode < - SMALL)
+            {
+                tmp          = VenFun(dqmin, dqNode, eps);
+                limit[iCell] = MIN(limit[iCell], tmp);
+            }
+        }
+    }
+
+    delete [] qmax;    qmax = NULL;
+    delete [] qmin;    qmin = NULL;
+}
+#pragma warning(disable:4100)
+void Limiter::VencatLimiter7(RDouble *limit, RDouble *q, RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, int iVariable)
+{
+#pragma warning(default:4100)
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotal     = nTotalCell + nBoundFace;      
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *xfc   = grid->GetFaceCenterX();
+    RDouble *yfc   = grid->GetFaceCenterY();
+    RDouble *zfc   = grid->GetFaceCenterZ();
+    RDouble *xcc   = grid->GetCellCenterX();
+    RDouble *ycc   = grid->GetCellCenterY();
+    RDouble *zcc   = grid->GetCellCenterZ();
+    RDouble *volume   = grid->GetCellVolume();
+
+    int le, re;
+    RDouble dx, dy, dz;
+    RDouble dqFace, tmp;
+
+    RDouble *dmin = new RDouble[nTotal];
+    RDouble *dmax = new RDouble[nTotal];
+    //! Find the the differences for q.
+    MinMaxDiff(dmin, dmax, q);
+
+    RDouble venkatCoeff = GlobalDataBase::GetDoubleParaFromDB("venkatCoeff");
+    RDouble averageVolume = grid->GetAverageVolume();
+
+    //! The following 'eps' is the eps^2 actually in the mathematic formation.
+    //! And the 'venkatCoeff' is the coefficient of 'K' in the mathematic formation.
+    int dimension = GetDim();
+    RDouble n = three;
+    RDouble *epsCell = new RDouble[nTotalCell];
+    RDouble eps_tmp = venkatCoeff * venkatCoeff * venkatCoeff;
+    eps_tmp *= one/pow(pow(averageVolume, one/dimension), n);
+
+    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+    {
+        epsCell[iCell]  = eps_tmp * q[iCell] * q[iCell];
+        epsCell[iCell] *= pow(pow(volume[iCell], one/dimension), n);
+    }
+    //! The following loop is to calculate the limiter coefficient of each cell on the boundary face.
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        //! Get the left and right cell index of iFace.
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        //! Compute the vector from face to left cell center.
+        dx = xfc[iFace] - xcc[le];
+        dy = yfc[iFace] - ycc[le];
+        dz = zfc[iFace] - zcc[le];
+
+        //! Compute the dq from left cell center to face center.
+        dqFace  = dqdx[le] * dx + dqdy[le] * dy + dqdz[le] * dz;
+        if (dqFace > SMALL)
+        {
+            //! According to the vencat limiter of Theory manual.
+            tmp       = VenFun(dmax[le], dqFace, epsCell[le]);
+            limit[le] = MIN(limit[le], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            //! According to the vencat limiter of Theory manual.
+            tmp       = VenFun(dmin[le], dqFace, epsCell[le]);
+            limit[le] = MIN(limit[le], tmp);
+        }
+    }
+
+    //! The following loop is to calculate the limiter coefficient of each interior cell.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        dx     = xfc[iFace] - xcc[le];
+        dy     = yfc[iFace] - ycc[le];
+        dz     = zfc[iFace] - zcc[le];
+        dqFace = dqdx[le] * dx + dqdy[le] * dy + dqdz[le] * dz;
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[le], dqFace, epsCell[le]);
+            limit[le] = MIN(limit[le], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp       = VenFun(dmin[le], dqFace, epsCell[le]);
+            limit[le] = MIN(limit[le], tmp);
+        }
+
+        dx     = xfc[iFace] - xcc[re];
+        dy     = yfc[iFace] - ycc[re];
+        dz     = zfc[iFace] - zcc[re];
+        dqFace = dqdx[re] * dx + dqdy[re] * dy + dqdz[re] * dz;
+        if (dqFace > SMALL)
+        {
+            tmp       = VenFun(dmax[re], dqFace, epsCell[re]);
+            limit[re] = MIN(limit[re], tmp);
+        }
+        else if (dqFace < - SMALL)
+        {
+            tmp       = VenFun(dmin[re], dqFace, epsCell[re]);
+            limit[re] = MIN(limit[re], tmp);
+        }
+    }
+
+    delete [] dmin;    dmin = NULL;
+    delete [] dmax;    dmax = NULL;
+    delete [] epsCell;    epsCell = NULL;
+}
+void Limiter::MinMaxDiff(RDouble *dmin, RDouble *dmax, RDouble *q)
+{
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    //! Find the maximum and minimum in the neighbor of each cell.
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        dmin[iCell] = q[iCell];
+        dmax[iCell] = q[iCell];
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        int le       = leftCellOfFace[iFace];
+        int re       = rightCellOfFace[iFace];
+
+        int bcType = bcRegion->GetBCType();
+        if (!IsInterface(bcType))
+        {
+            continue;
+        }
+
+        dmin[le] = MIN(dmin[le], q[re]);
+        dmax[le] = MAX(dmax[le], q[re]);
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le       = leftCellOfFace [iFace];
+        int re       = rightCellOfFace[iFace];
+        dmin[le] = MIN(dmin[le], q[re]);
+        dmax[le] = MAX(dmax[le], q[re]);
+
+        dmin[re] = MIN(dmin[re], q[le]);
+        dmax[re] = MAX(dmax[re], q[le]);
+    }
+
+    //! Get the maximum and the minimum difference.
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        dmin[iCell] -= q[iCell];
+        dmax[iCell] -= q[iCell];
+    }
+}
+
+void Init_Limiters(Grid *grid_in, RDouble *limit)
+{
+    UnstructGrid *grid = UnstructGridCast(grid_in);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    int uns_limiter;
+    GlobalDataBase::GetData("uns_limiter", &uns_limiter, PHINT, 1);
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        limit[iCell] = one;
+    }
+    
+    if (uns_limiter == ILMT_FIRST)
+    {
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            limit[iCell] = zero;
+        }
+    }
+}
+
+int GetLimiterID(const string &limiter_name)
+{
+    int limiter_id = ILMT_NOLIM;
+    if (limiter_name.substr(0,5) == "nolim")
+    {
+        limiter_id = ILMT_NOLIM;
+    }
+    else if (limiter_name.substr(0,3) == "1st")
+    {
+        limiter_id = ILMT_FIRST;
+    }
+    else if (limiter_name.substr(0,5) == "barth")
+    {
+        limiter_id = ILMT_BARTH;
+    }
+    else if (limiter_name.substr(0,6) == "vencat")
+    {
+        limiter_id = ILMT_VENCAT;
+    }
+    else if (limiter_name.substr(0,6) == "minmod")
+    {
+        limiter_id = ILMT_MINMOD;
+    }
+    else if (limiter_name.substr(0,7) == "vanleer")
+    {
+        limiter_id = ILMT_VANLEER;
+    }
+    else if (limiter_name.substr(0,10) == "minmodtest")
+    {
+        limiter_id = ILMT_MINMODTEST;
+    }
+    else if (limiter_name.substr(0,9) == "vanalbada")
+    {
+        limiter_id = ILMT_VAN_ALBADA;
+        if (limiter_name.substr(0,13) == "vanalbada_clz")
+        {
+            limiter_id = ILMT_VAN_ALBADA_CLZ;
+        }
+    }
+    else if (limiter_name.substr(0,6) == "smooth")
+    {
+        limiter_id = ILMT_SMOOTH;
+    }
+    else if (limiter_name.substr(0,6) == "minvan")
+    {
+        limiter_id = ILMT_MIN_VAN;
+    }
+    else if (limiter_name.substr(0,9) == "3rdsmooth")
+    {
+        limiter_id = ILMT_3rd_SMOOTH;
+    }
+    else if (limiter_name.substr(0,17) == "3rd_minmod_smooth")
+    {
+        limiter_id = ILMT_3rd_Minmod_SMOOTH;
+    }
+    else if (limiter_name.substr(0, 8) == "weno3_js")
+    {
+        limiter_id = ILMT_WENO3_JS;
+    }
+    else if (limiter_name.substr(0, 12) == "wenn3_prm211")
+    {
+        limiter_id = ILMT_WENN3_PRM211;
+    }
+    else if (limiter_name.substr(0, 8) == "wenn3_zm")
+    {
+        limiter_id = ILMT_WENN3_ZM;
+    }
+    else if (limiter_name.substr(0, 10) == "wenn3_zes2")
+    {
+        limiter_id = ILMT_WENN3_ZES2;
+    }
+    else if (limiter_name.substr(0, 10) == "wenn3_zes3")
+    {
+        limiter_id = ILMT_WENN3_ZES3;
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("this limiter does'nt exist\n");
+    }
+    return limiter_id;
+}
+
+}
+
diff --git a/API/Physics/src/MatrixLUSGS.cpp b/API/Physics/src/MatrixLUSGS.cpp
new file mode 100644
index 0000000..6daadb5
--- /dev/null
+++ b/API/Physics/src/MatrixLUSGS.cpp
@@ -0,0 +1,1114 @@
+#include "Geo_StructGrid.h"
+#include "MatrixLUSGS.h"
+#include "Flux_RoeEntropyCorrection.h"
+#include "Gas.h"
+#include "Glb_Dimension.h"
+
+namespace PHSPACE
+{
+     using namespace GAS_SPACE;
+//! This is for Matrix LU-SGS according NSMB handbook in 1995 year.
+//! This is Matrix LU-SGS method.
+void SolveMatrixLUSGSForwardSweep(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+	SolveDiagonalMatrix(grid);
+
+    RDouble4D &dq = dqProxy->GetField_STR();
+    RDouble4D &deltaFlux = LUplusDQ->GetField_STR();
+
+    RDouble4D &gxfn  = *(grid->GetFaceNormalX());
+    RDouble4D &gyfn  = *(grid->GetFaceNormalY());
+    RDouble4D &gzfn  = *(grid->GetFaceNormalZ());
+    RDouble4D &gvgn  = *(grid->GetFaceNormalVelocity());
+    RDouble4D &garea = *(grid->GetFaceArea());
+    /*RDouble3D &gvol  = *(grid->GetCellVolume());*/
+	
+    int nLaminar = GlobalDataBase::GetIntParaFromDB("nl");
+    int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nTemperatureModel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    RDouble *dqNeighbor = new RDouble[nEquation];
+    RDouble *prim   = new RDouble[nEquation];
+    RDouble *qNeighbor = new RDouble[nEquation];
+    RDouble *rhs0   = new RDouble[nEquation];
+    RDouble *df     = new RDouble[nEquation];   
+    RDouble *dqCell = new RDouble[nEquation];
+    RDouble *dqOld  = new RDouble[nEquation];
+    RDouble *temperature = new RDouble[nTemperatureModel];
+    RDouble *qPrecondition = new RDouble[nEquation];
+    RDouble *Ux = new RDouble [nEquation];
+	RDouble *deltaQ = new RDouble[nEquation];
+	RDouble *rhsMatrix = new RDouble[nEquation];
+	RDouble *priml = new RDouble[nEquation];
+	RDouble *primr = new RDouble[nEquation];
+	
+    Range M(0, nEquation - 1);
+	RDouble2D *diagonalMatrixD = new RDouble2D(M, M, fortranArray);
+	RDouble2D &diagonalMatrix2D = *reinterpret_cast<RDouble2D *> (diagonalMatrixD);
+	RDouble2D *tempMatrix = new RDouble2D(M, M, fortranArray);
+    RDouble2D &tempMatrix2D = *reinterpret_cast<RDouble2D *> (tempMatrix);
+	RDouble2D *jacobianMatrix = new RDouble2D(M, M, fortranArray);
+    RDouble2D &jacobianMatrix2D = *reinterpret_cast<RDouble2D *> (jacobianMatrix);
+
+    RDouble4D &res = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+    RDouble4D &q  = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+	RDouble5D &diagonalMatrix = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("diagonalMatrix"));
+	RDouble3D &rtem = *reinterpret_cast <RDouble3D *> (gridIn->GetDataPtr("rtem"));
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    RDouble3D viscousLaminar, viscousTurbulence;
+    if (viscousType > 0)
+    {
+        viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+        viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    }
+
+    int nDim = GetDim();
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {    
+				for (int m = 0; m < nEquation; ++ m)
+				{
+					dq(i, j, k, m) = 0.0;
+				}
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    rhs0[m] = 0.0;
+
+                    //! Temporary variable, only because it is convenient for in/out in function.
+                    qPrecondition[m] = q(i, j, k, m);
+
+                    //! Back up the old dq, to compute the convergence.
+                    //! it is initialized by zero or res in the first sweep,
+                    //! then it is updated by backward sweep, that is dq*.
+                    dqOld[m] = dq(i, j, k, m);
+
+                    //! Here, the deltaFlux is computed in Upper backward sweep!
+                    //! res: b      deltaFlux: Ux, which is computed in backward sweep.
+                    //! the dq is not the real dq, now.
+                    //! Although the 'dq' changed can not the right one, it dosen't matter, since 
+                    //! the following only using the lower neighbor cells, whose 'dq' has been updated.
+                    //! It is convenient for precondition transform.
+                    dq(i, j, k, m) = res(i, j, k, m);
+
+                    Ux[m] = deltaFlux(i, j, k, m);
+
+                    //! Then reset it to zero to store the Lower forward sweep!
+                    deltaFlux(i, j, k, m) = 0.0;
+
+                    //! Temporary variable, only because it is convenient for in/out in precondition function.
+                    dqCell[m] = dq(i, j, k, m);
+                }
+
+                for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+                {
+                    int il1, jl1, kl1, il, jl, kl;
+					grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+					grid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        prim[m] = q(il, jl, kl, m);
+                        qNeighbor[m] = q(il, jl, kl, m);
+                        dqNeighbor[m] = dq(il, jl, kl, m);
+
+						priml[m] = q(il, jl, kl, m);
+                        primr[m] = q(i, j, k, m);
+                    }
+                   
+                    RDouble &xfn1  = gxfn (i ,j ,k ,iSurface);
+                    RDouble &yfn1  = gyfn (i ,j ,k ,iSurface);
+                    RDouble &zfn1  = gzfn (i ,j ,k ,iSurface);
+                    RDouble &area1 = garea(i ,j ,k ,iSurface);
+                    RDouble &vgn1  = gvgn (i ,j ,k ,iSurface);
+
+                    RDouble &xfn2  = gxfn (il ,jl ,kl ,iSurface);
+                    RDouble &yfn2  = gyfn (il ,jl ,kl ,iSurface);
+                    RDouble &zfn2  = gzfn (il ,jl ,kl ,iSurface);
+                    RDouble &area2 = garea(il ,jl ,kl ,iSurface);
+                    RDouble &vgn2  = gvgn (il ,jl ,kl ,iSurface);
+
+                    RDouble xfn  = half * (xfn1  + xfn2);
+                    RDouble yfn  = half * (yfn1  + yfn2);
+                    RDouble zfn  = half * (zfn1  + zfn2);
+                    RDouble area = half * (area1 + area2);
+                    RDouble vgn  = half * (vgn1  + vgn2);
+
+                    RDouble gama = gamma(il, jl, kl);
+
+					ComputeInviscidMatrix(prim, xfn, yfn, zfn, area, vgn, gama, tempMatrix);
+
+					RDouble rtemL = rtem(il, jl, kl);
+					RDouble rtemR = rtem(i,  j,  k);
+
+					SolveRoeMatrix(priml, primr, xfn1, yfn1, zfn1, gama, area1, rtemL, rtemR, jacobianMatrix);
+					for (int m = 0; m < nEquation; ++ m)
+					{
+						for (int n = 0; n < nEquation; ++ n)
+						{
+							tempMatrix2D(m, n) += jacobianMatrix2D(m, n);
+						}
+					}
+
+					for (int m = 0; m < nEquation; ++ m)
+					{
+						RDouble fSum = 0.0;
+						for (int n = 0; n < nEquation; ++ n)
+						{
+							fSum += half * tempMatrix2D(m, n) * dqNeighbor[n];
+						}
+						df[m] = fSum;
+					}
+
+                    //! Add Flux together.
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        rhs0[m] -= df[m];
+                    }
+
+                    if (viscousType > 0)
+                    {
+                        RDouble rad_vis = half * visSpectralRadius(il, jl, kl, iSurface - 1);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            rhs0[m] -= rad_vis * dqNeighbor[m];
+                        }
+                    }
+                }
+				
+				for (int m = 0; m < nEquation; ++ m)
+				{
+					rhsMatrix[m] = 0.0;
+					deltaQ[m]    = 0.0;
+					rhsMatrix[m] = dq(i, j, k, m) - Ux[m] - rhs0[m];
+				}
+				
+				for (int m = 0; m < nEquation; ++ m)
+				{
+					for (int n = 0; n < nEquation; ++ n)
+					{
+						diagonalMatrix2D(m, n) = diagonalMatrix(i, j, k, m, n);
+					}
+				}
+
+				for (int m = 0; m < nEquation; ++ m)
+				{
+					RDouble qSum = 0.0;
+					for (int n = 0; n < nEquation; ++ n)
+					{
+						qSum += diagonalMatrix2D(m, n) * rhsMatrix[n];
+					}
+					deltaQ[m] = qSum;
+				}
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    //! dq(i, j, k, m) = deltQ[m]
+					dq(i, j, k, m) = deltaQ[m];
+                    //! Store the lower forward sweep delta-flux, which will be used in the backward sweep.
+                    deltaFlux(i, j, k, m) += rhs0[m];
+                    sweepNormal += SQR(dq(i, j, k, m) - dqOld[m]);
+                }
+            }
+        }
+    }
+
+    delete[] dqNeighbor;
+    delete[] prim;
+    delete[] qNeighbor;
+    delete[] rhs0;
+	delete[] priml;
+	delete[] primr;
+
+    delete [] df;
+	delete [] deltaQ;
+	delete [] rhsMatrix;
+	delete diagonalMatrixD;
+	delete tempMatrix;
+	delete jacobianMatrix;
+
+    delete[] qPrecondition;
+    delete[] dqCell;
+    delete[] temperature;
+
+    delete[] dqOld;
+    delete[] Ux;
+}
+
+void SolveMatrixLUSGSBackwardSweep(Grid *gridIn, FieldProxy *dq_proxy, FieldProxy *LUplusDQ, RDouble &sweepNormal)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &dq = dq_proxy->GetField_STR();
+    RDouble4D &deltaFlux = LUplusDQ->GetField_STR();
+
+    RDouble4D &gxfn  = *(grid->GetFaceNormalX());
+    RDouble4D &gyfn  = *(grid->GetFaceNormalY());
+    RDouble4D &gzfn  = *(grid->GetFaceNormalZ());
+    RDouble4D &gvgn  = *(grid->GetFaceNormalVelocity());
+    RDouble4D &garea = *(grid->GetFaceArea());
+    /*RDouble3D &gvol  = *(grid->GetCellVolume());*/
+
+    int nLaminar = GlobalDataBase::GetIntParaFromDB("nl");
+    int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nTemperatureModel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    RDouble *dqNeighbor = new RDouble[nEquation];
+    RDouble *prim = new RDouble[nEquation];
+    RDouble *qNeighbor = new RDouble[nEquation];
+    RDouble *dqOld = new RDouble[nEquation];
+    RDouble *rhs0  = new RDouble[nEquation];
+    RDouble *df    = new RDouble[nEquation];
+    RDouble *temperature = new RDouble[nTemperatureModel];
+    RDouble *qPrecondition = new RDouble[nEquation];
+    RDouble *dqCell = new RDouble[nEquation];
+    RDouble *Lx = new RDouble[nEquation];
+	RDouble *deltaQ = new RDouble[nEquation];
+	RDouble *rhsMatrix = new RDouble[nEquation];
+	RDouble *priml = new RDouble[nEquation];
+	RDouble *primr = new RDouble[nEquation];
+	
+	//! Allocate the memories.
+    Range M(0, nEquation - 1);
+	RDouble2D *diagonalMatrixD = new RDouble2D(M, M, fortranArray);
+	RDouble2D &diagonalMatrix2D = *reinterpret_cast<RDouble2D *> (diagonalMatrixD);
+	RDouble2D *tempMatrix = new RDouble2D(M, M, fortranArray);
+    RDouble2D &tempMatrix2D = *reinterpret_cast<RDouble2D *> (tempMatrix);
+	RDouble2D *jacobianMatrix = new RDouble2D(M, M, fortranArray);
+    RDouble2D &jacobianMatrix2D = *reinterpret_cast<RDouble2D *> (jacobianMatrix);
+
+    RDouble4D &res = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+    RDouble4D &q  = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+	RDouble5D &diagonalMatrix = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("diagonalMatrix"));
+	RDouble3D &rtem = *reinterpret_cast <RDouble3D *> (gridIn->GetDataPtr("rtem"));
+
+    Range II, JJ, KK;
+    GetRange(ni, nj, nk, -2, 1, II, JJ, KK);
+    Range MM(0, nEquation - 1);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    RDouble3D viscousLaminar, viscousTurbulence;
+    if (viscousType > 0)
+    {
+        viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+        viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    }
+
+    int nDim = GetDim();
+
+    for (int k = kCellEnd; k >= kCellStart; -- k)
+    {
+        for (int j = jCellEnd; j >= jCellStart; -- j)
+        {
+            for (int i = iCellEnd; i >= iCellStart; -- i)
+            {
+                for (int m = 0; m < nEquation; ++ m)
+				{
+					dq(i, j, k, m) = 0.0;
+				}
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    rhs0[m] = 0.0;
+                    dqNeighbor[m] = dq(i, j, k, m);
+
+                    //! Temporary variable, only because it is convenient for in/out in function.
+                    qPrecondition[m] = q(i, j, k, m);  
+
+                    //! Back up the old dq, to compute the convergence.
+                    //! the 'dq' is dq*, which has been updated in forward.
+                    dqOld[m] = dq(i, j, k, m);
+
+                    //! the dq is not the real dq, now.
+                    //! it is convenient for precondition transform.
+                    dq(i, j, k, m) = res(i, j, k, m);
+
+                    Lx[m] = deltaFlux(i, j, k, m);
+
+                    //! Then reset it to zero to store the upper forward sweep!
+                    deltaFlux(i, j, k, m) = 0.0;
+
+                    //! Temporary variable, only because it is convenient for in/out in precondition function.
+                    dqCell[m] = dq(i, j, k, m);
+                }
+
+                for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+                {
+                    int il1, jl1, kl1, il, jl, kl;
+					grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        prim[m] = q(il, jl, kl, m);
+                        qNeighbor[m] = q(il, jl, kl, m);
+                        dqNeighbor[m] = dq(il, jl, kl, m);
+
+						priml[m] = q(i, j, k, m);
+                        primr[m] = q(il, jl, kl, m);
+                    }
+
+                    //clz begin
+                    RDouble &xfn1  = gxfn (il, jl, kl, iSurface);
+                    RDouble &yfn1  = gyfn (il, jl, kl, iSurface);
+                    RDouble &zfn1  = gzfn (il, jl, kl, iSurface);
+                    RDouble &area1 = garea(il, jl, kl, iSurface);
+                    RDouble &vgn1  = gvgn (il, jl, kl, iSurface);
+
+                    RDouble &xfn2  = gxfn (il + il1, jl + jl1, kl + kl1, iSurface);
+                    RDouble &yfn2  = gyfn (il + il1, jl + jl1, kl + kl1, iSurface);
+                    RDouble &zfn2  = gzfn (il + il1, jl + jl1, kl + kl1, iSurface);
+                    RDouble &area2 = garea(il + il1, jl + jl1, kl + kl1, iSurface);
+                    RDouble &vgn2  = gvgn (il + il1, jl + jl1, kl + kl1, iSurface);
+
+                    RDouble xfn  = half * (xfn1  + xfn2);
+                    RDouble yfn  = half * (yfn1  + yfn2);
+                    RDouble zfn  = half * (zfn1  + zfn2);
+                    RDouble area = half * (area1 + area2);
+                    RDouble vgn  = half * (vgn1  + vgn2);
+
+                    RDouble gama = gamma(il, jl, kl);
+
+					ComputeInviscidMatrix(prim, xfn, yfn, zfn, area, vgn, gama, tempMatrix);
+
+					RDouble rtemL = rtem(i, j, k);
+					RDouble rtemR = rtem(il, jl, kl);
+
+					SolveRoeMatrix(priml, primr, xfn1, yfn1, zfn1, gama, area1, rtemL, rtemR, jacobianMatrix);
+					for (int m = 0; m < nEquation; ++ m)
+					{
+						for (int n = 0; n < nEquation; ++ n)
+						{
+							tempMatrix2D(m, n) -= jacobianMatrix2D(m, n);
+						}
+					}
+
+					for (int m = 0; m < nEquation; ++ m)
+					{
+						RDouble fSum = 0.0;
+						for (int n = 0; n < nEquation; ++ n)
+						{
+							fSum += half * tempMatrix2D(m, n) * dqNeighbor[n];
+						}
+						df[m] = fSum;
+					}
+
+                    //! Add Flux together.
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        rhs0[m] += df[m];
+                    }
+
+                    if (viscousType > 0)
+                    {
+                        RDouble rad_vis = half * visSpectralRadius(il, jl, kl, iSurface - 1);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            rhs0[m] += - rad_vis * dqNeighbor[m];
+                        }
+                    }
+                }
+				
+				for (int m = 0; m < nEquation; ++ m)
+				{
+					rhsMatrix[m] = 0.0;
+					deltaQ[m]    = 0.0;
+					rhsMatrix[m] = dq(i, j, k, m) - Lx[m] - rhs0[m];
+				}
+				
+				for (int m = 0; m < nEquation; ++ m)
+				{
+					for (int n = 0; n < nEquation; ++ n)
+					{
+						diagonalMatrix2D(m, n) = diagonalMatrix(i, j, k, m, n);
+					}
+				}
+
+				for (int m = 0; m < nEquation; ++ m)
+				{
+					RDouble qSum = 0.0;
+					for (int n = 0; n < nEquation; ++ n)
+					{
+						qSum += diagonalMatrix2D(m, n) * rhsMatrix[n];
+					}
+					deltaQ[m] = qSum;
+				}
+				
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    //! dq(i, j, k, m) = deltQ[m]
+					dq(i, j, k, m) = deltaQ[m];
+
+                    //! Store the upper backward sweep delta-flux, which will be used in the forward sweep.
+                    deltaFlux(i, j, k, m) += rhs0[m];
+                    sweepNormal += SQR(dq(i, j, k, m) - dqOld[m]);
+                }
+            }
+        }
+    }
+
+    delete [] dqNeighbor;
+    delete [] dqOld;
+    delete [] prim;
+    delete [] qNeighbor;
+    delete [] rhs0;
+	delete [] priml;
+	delete [] primr;
+
+    delete [] df;
+	delete [] deltaQ;
+	delete [] rhsMatrix;
+	delete diagonalMatrixD;
+	delete tempMatrix;
+	delete jacobianMatrix;
+
+    delete [] temperature;
+    delete [] Lx;
+    delete [] qPrecondition;
+    delete [] dqCell;
+}
+
+void SolveDiagonalMatrix(StructGrid *gridIn)
+{
+    int iSimplifyViscousTerm = GlobalDataBase::GetIntParaFromDB("iSimplifyViscousTerm");
+    //! Compute the number of equations.
+    int nEquation = GlobalDataBase::GetIntParaFromDB("nl");
+
+    RDouble4D &invSpectrumRadius = *reinterpret_cast<RDouble4D *> (gridIn->GetDataPtr("invSpectralRadius"));
+    RDouble4D &visSpectrumRadius = *reinterpret_cast<RDouble4D *> (gridIn->GetDataPtr("visSpectralRadius"));
+    RDouble4D &q = *reinterpret_cast<RDouble4D *> (gridIn->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast<RDouble4D *> (gridIn->GetDataPtr("t"));
+    RDouble3D &dt = *reinterpret_cast<RDouble3D *> (gridIn->GetDataPtr("dt"));
+    RDouble3D &gamma = *reinterpret_cast<RDouble3D *> (gridIn->GetDataPtr("gama"));
+
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    RDouble3D &viscousLaminar = *reinterpret_cast<RDouble3D *> (gridIn->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (gridIn->GetDataPtr("vist"));
+
+    RDouble4D &gxfn  = *(gridIn->GetFaceNormalX());
+    RDouble4D &gyfn  = *(gridIn->GetFaceNormalY());
+    RDouble4D &gzfn  = *(gridIn->GetFaceNormalZ());
+    RDouble3D &gvol  = *(gridIn->GetCellVolume());
+    RDouble4D &gvgn  = *(gridIn->GetFaceNormalVelocity());
+    RDouble4D &garea = *(gridIn->GetFaceArea());
+
+	RDouble3D &rtem = *reinterpret_cast <RDouble3D *> (gridIn->GetDataPtr("rtem"));
+
+    Range I, J, K, M(0, nEquation - 1);
+    RDouble5D &diagonalMatrix = *reinterpret_cast<RDouble5D *> (gridIn->GetDataPtr("diagonalMatrix"));
+    RDouble2D *tempMatrix = new RDouble2D(M, M, fortranArray);
+    RDouble2D &tempMatrix2D = *reinterpret_cast<RDouble2D *> (tempMatrix);
+	RDouble2D *diagonalMatrixD = new RDouble2D(M, M, fortranArray);
+	RDouble2D &diagonalMatrix2D = *reinterpret_cast<RDouble2D *> (diagonalMatrixD);
+	RDouble2D *inverseDiaMatrix = new RDouble2D(M, M, fortranArray);
+	RDouble2D &inverseDiaMatrix2D = *reinterpret_cast<RDouble2D *> (inverseDiaMatrix);
+
+    RDouble *primitiveVars = new RDouble[nEquation];
+    RDouble *temperature = new RDouble[nEquation];
+	RDouble *priml = new RDouble[nEquation];
+	RDouble *primr = new RDouble[nEquation];
+    int nTemperatureModel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    gridIn->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    int nDim = GetDim();
+    int iL, jL, kL, iR, jR, kR;
+    RDouble gama, visLaminar, visTurbulence;
+    RDouble xfn1, yfn1, zfn1, area1, vgn1;
+    RDouble xfn2, yfn2, zfn2, area2, vgn2;
+    RDouble rad_euler, rad_ns;
+
+    //! To Compute diagonal matrix.
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                //! Obtain the primitive variables.
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    primitiveVars[m] = q(i, j, k, m);
+                }
+                gama = gamma(i, j, k);
+                if (viscousType > 0)
+                {
+                    visLaminar = viscousLaminar(i, j, k);
+                    visTurbulence = viscousTurbulence(i, j, k);
+                }
+                else
+                {
+                    visLaminar = 0.0;
+                    visTurbulence = 0.0;
+                }
+                for (int m = 0; m < nTemperatureModel; ++ m)
+                {
+                    temperature[m] = t(i, j, k, m);
+                }
+
+                // initialize.
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    for (int n = 0; n < nEquation; ++ n)
+                    {
+                        diagonalMatrix(i, j, k, m, n) = 0.0;
+                    }
+                }
+				
+                //! Compute the scalar coefficient of the diagonal matrix.
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    diagonalMatrix(i, j, k, m, m) = 1.0 / dt(i, j, k) + 1.0 * gvol(i, j, k);
+                }
+
+                rad_euler = 0.0;
+                rad_ns = 0.0;
+                //! Construct the diagonal matrix called D.
+                for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+                {
+                    int il1, jl1, kl1;
+					gridIn->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+                    //! Compute spectrum radius of inviscid flux.
+                    if (iSimplifyViscousTerm == 1)// Equivalent method to computing the spectrum radius.
+                    {
+                        rad_euler += invSpectrumRadius(i, j, k, iSurface - 1);
+                        rad_ns += visSpectrumRadius(i, j, k, iSurface - 1);
+                    }
+
+					//! Compute the surface -1/2
+					gridIn->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, iL, jL, kL);
+
+					for (int m = 0; m < nEquation; ++ m)
+                    {
+                        priml[m]  =  q(iL, jL, kL, m);
+                        primr[m]  =  q(i, j, k, m);
+                    }
+
+					xfn1  = gxfn (i ,j ,k ,iSurface);
+                    yfn1  = gyfn (i ,j ,k ,iSurface);
+                    zfn1  = gzfn (i ,j ,k ,iSurface);
+                    area1 = garea(i ,j ,k ,iSurface);
+                    vgn1  = gvgn (i ,j ,k ,iSurface);             
+
+					RDouble rtemL = rtem(iL, jL, kL);
+					RDouble rtemR = rtem(i,  j,  k);
+
+					SolveRoeMatrix(priml, primr, xfn1, yfn1, zfn1, gama, area1, rtemL, rtemR, tempMatrix);
+					for (int m = 0; m < nEquation; ++ m)
+					{
+						for (int n = 0; n < nEquation; ++ n)
+						{
+							diagonalMatrix(i, j, k, m, n) += 0.5 * tempMatrix2D(m, n);
+						}
+					}
+
+					//! Compute the surface +1/2
+					gridIn->GetRightCellOfFace(i, j, k, il1, jl1, kl1, iR, jR, kR);
+
+					for (int m = 0; m < nEquation; ++ m)
+                    {
+                        priml[m]  =  q(i, j, k, m);
+                        primr[m]  =  q(iR, jR, kR, m);
+                    }
+
+                    xfn2  = gxfn (iR, jR, kR, iSurface);
+                    yfn2  = gyfn (iR, jR, kR, iSurface);
+                    zfn2  = gzfn (iR, jR, kR, iSurface);
+                    area2 = garea(iR, jR, kR, iSurface);
+                    vgn2  = gvgn (iR, jR, kR, iSurface);
+
+					rtemL = rtem(i, j, k);
+					rtemR = rtem(iR, jR, kR);
+
+					SolveRoeMatrix(priml, primr, xfn2, yfn2, zfn2, gama, area2, rtemL, rtemR, tempMatrix);
+					for (int m = 0; m < nEquation; ++ m)
+					{
+						for (int n = 0; n < nEquation; ++ n)
+						{
+							diagonalMatrix(i, j, k, m, n) += 0.5 * tempMatrix2D(m, n);
+						}
+					}
+                }
+
+                //! Compute the summation of spectrum radius.
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    diagonalMatrix(i, j, k, m, m) += rad_ns;
+                }
+
+				for (int m = 0; m < nEquation; ++ m)
+				{
+					for (int n = 0; n < nEquation; ++ n)
+					{
+						diagonalMatrix2D(m, n) = diagonalMatrix(i, j, k, m, n);
+					}
+				}
+
+				//! ComputeInverseDiagonalMatrix(diagonalMatrixD, nEquation, inverseDiaMatrix);
+				ObtainInverseDiagonalMatrix(diagonalMatrixD, nEquation, inverseDiaMatrix);
+
+				for (int m = 0; m < nEquation; ++ m)
+				{
+					for (int n = 0; n < nEquation; ++ n)
+					{
+						diagonalMatrix(i, j, k, m, n) = inverseDiaMatrix2D(m, n);
+					}
+				}
+            }
+        }
+    }
+
+    delete [] primitiveVars;
+    delete [] temperature;
+    delete tempMatrix;
+	delete diagonalMatrixD;
+	delete inverseDiaMatrix;
+	delete [] priml;
+	delete [] primr;
+}
+
+void ComputeInviscidMatrix(RDouble *primitiveVars, RDouble xfn, RDouble yfn, RDouble zfn, RDouble area, RDouble vgn, RDouble gama, RDouble2D *tempMatrix)
+{
+    int nLaminar = GlobalDataBase::GetIntParaFromDB("nl");
+    int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nTemperatureModel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+    //! Compute the number of equations.
+    int neqn = nLaminar + nChemical + nTemperatureModel - 1;
+
+    //! To store the Jacobian matrix of inviscid flux.
+    RDouble2D &inviscidMatrix = *reinterpret_cast<RDouble2D *> (tempMatrix);
+
+    using namespace IDX;
+    //! Obtain the primitive variables.
+    RDouble uVelocity, vVelocity, wVelocity, density, pressure, averageVelocity, rVelocity;
+    density   = primitiveVars[IR];
+    pressure  = primitiveVars[IP];
+    uVelocity = primitiveVars[IU];
+    vVelocity = primitiveVars[IV];
+    wVelocity = primitiveVars[IW];
+    averageVelocity = uVelocity * xfn + vVelocity * yfn + wVelocity * zfn;
+    //! The relative velocity.
+    rVelocity = averageVelocity - vgn;
+
+    //! To compute the total enthalpy.
+    RDouble squareVelocity, totalEnthalpy=0.0;
+    squareVelocity = uVelocity * uVelocity + vVelocity * vVelocity + wVelocity * wVelocity;
+    if (nChemical == 0)
+    {
+        totalEnthalpy = (gama / (gama - 1)) * pressure / density;
+    }
+    
+    totalEnthalpy += 0.5 * squareVelocity;
+
+    //! Construct the Jacobian matrix.
+    RDouble alpha = 0.5 * (gama - 1.0) * squareVelocity;
+    inviscidMatrix(0, 0) = -vgn;
+    inviscidMatrix(1, 0) = alpha * xfn - uVelocity * averageVelocity;
+    inviscidMatrix(2, 0) = alpha * yfn - vVelocity * averageVelocity;
+    inviscidMatrix(3, 0) = alpha * zfn - wVelocity * averageVelocity;
+    inviscidMatrix(4, 0) = (alpha - totalEnthalpy) * averageVelocity;
+
+    //! The second column.
+    inviscidMatrix(0, 1) = xfn;
+    inviscidMatrix(1, 1) = (2.0 - gama) * uVelocity * xfn + rVelocity;
+    inviscidMatrix(2, 1) = (1.0 - gama) * uVelocity * yfn + vVelocity * xfn;
+    inviscidMatrix(3, 1) = (1.0 - gama) * uVelocity * zfn + wVelocity * xfn;
+    inviscidMatrix(4, 1) = (1.0 - gama) * uVelocity * averageVelocity + totalEnthalpy * xfn;
+
+    //! The third column.
+    inviscidMatrix(0, 2) = yfn;
+    inviscidMatrix(1, 2) = (1.0 - gama) * vVelocity * xfn + uVelocity * yfn;
+    inviscidMatrix(2, 2) = (2.0 - gama) * vVelocity * yfn + rVelocity;
+    inviscidMatrix(3, 2) = (1.0 - gama) * vVelocity * zfn + wVelocity * yfn;
+    inviscidMatrix(4, 2) = (1.0 - gama) * vVelocity * averageVelocity + totalEnthalpy * yfn;
+
+    //! The fourth column.
+    inviscidMatrix(0, 3) = zfn;
+    inviscidMatrix(1, 3) = (1.0 - gama) * wVelocity * xfn + uVelocity * zfn;
+    inviscidMatrix(2, 3) = (1.0 - gama) * wVelocity * yfn + vVelocity * zfn;
+    inviscidMatrix(3, 3) = (2.0 - gama) * wVelocity * zfn + rVelocity;
+    inviscidMatrix(4, 3) = (1.0 - gama) * wVelocity * averageVelocity + totalEnthalpy * zfn;
+
+    //! The fifth column.
+    inviscidMatrix(0, 4) = 0.0;
+    inviscidMatrix(1, 4) = (gama - 1.0) * xfn;
+    inviscidMatrix(2, 4) = (gama - 1.0) * yfn;
+    inviscidMatrix(3, 4) = (gama - 1.0) * zfn;
+    inviscidMatrix(4, 4) = (gama - 1.0) * averageVelocity + rVelocity;
+
+    //! To multiply the average area located in the center of the cell.
+    for (int m = 0; m < neqn; ++ m)
+    {
+        for (int n = 0; n < neqn; ++ n)
+        {
+            inviscidMatrix(m, n) *= area;
+        }
+    }
+}
+
+void SolveRoeMatrix(RDouble *priml, RDouble *primr, RDouble xfn, RDouble yfn, RDouble zfn, RDouble gama, RDouble area, RDouble rtemL, RDouble rtemR, RDouble2D *jacobianMatrix)
+{
+    using namespace IDX;
+	RDouble2D &matrix = *reinterpret_cast<RDouble2D *> (jacobianMatrix);
+	
+	RDouble rl = priml[IDX::IR];
+    RDouble ul = priml[IDX::IU];
+    RDouble vl = priml[IDX::IV];
+    RDouble wl = priml[IDX::IW];
+    RDouble pl = priml[IDX::IP];
+	
+	RDouble rr = primr[IDX::IR];
+    RDouble ur = primr[IDX::IU];
+    RDouble vr = primr[IDX::IV];
+    RDouble wr = primr[IDX::IW];
+    RDouble pr = primr[IDX::IP];
+	
+    RDouble nx = xfn;
+    RDouble ny = yfn;
+    RDouble nz = zfn;
+    RDouble t0 = gama - 1.0;
+
+    if (rl < 1.0e-5) rl = 1.0e-5;
+    if (rr < 1.0e-5) rr = 1.0e-5;
+
+    //! Note that not to miss the gama.
+    RDouble hl = gama * pl / rl / t0 + half * (ul * ul + vl * vl + wl * wl);
+    RDouble hr = gama * pr / rr / t0 + half * (ur * ur + vr * vr + wr * wr);
+
+    RDouble ratio = sqrt(rr / rl);
+    RDouble coef = 1.0 / (1.0 + ratio);
+
+    RDouble u = (ul + ur * ratio) * coef;
+    RDouble v = (vl + vr * ratio) * coef;
+    RDouble w = (wl + wr * ratio) * coef;
+    RDouble h = (hl + hr * ratio) * coef;
+    RDouble halfV2 = half * (u * u + v * v + w * w);
+    RDouble Vn = nx * u + ny * v + nz * w;
+	RDouble absVel = sqrt(two * halfV2);
+
+    RDouble c2 = t0 * (h - halfV2);
+    RDouble c = sqrt(ABS(c2));
+
+    RDouble eigv1 = ABS(Vn);
+    RDouble eigv2 = ABS(Vn + c);
+    RDouble eigv3 = ABS(Vn - c);
+
+    //! Entropy fix.
+	int RoeEntropyFixMethod = 2;
+	RDouble RoeEntropyFixCoef1 = 0.0;
+	RDouble RoeEntropyFixCoef2 = 0.0;
+
+	Flux_RoeEntropyCorrection(eigv1, eigv2, eigv3, rtemL, rtemR, absVel, Vn, c, RoeEntropyFixMethod, RoeEntropyFixCoef1, RoeEntropyFixCoef2);
+
+    RDouble y0 = eigv1;
+    RDouble y1 = half * (2.0 * eigv1 - eigv2 - eigv3) / c2;
+    RDouble y2 = half * (eigv2 - eigv3) / c;
+
+    //! First row.
+    matrix(0, 0) = y0 - halfV2 * t0 * y1 - Vn * y2;
+    matrix(0, 1) = u * t0 * y1 + nx * y2;
+    matrix(0, 2) = v * t0 * y1 + ny * y2;
+    matrix(0, 3) = w * t0 * y1 + nz * y2;
+    matrix(0, 4) = -t0 * y1;
+
+    //! Second row.
+    matrix(1, 0) = (nx * Vn * c2 - u * halfV2 * t0) * y1 + (nx * halfV2 * t0 - u * Vn) * y2;
+    matrix(1, 1) = (u * u * t0 - c2 * nx * nx) * y1 + (nx * u - nx * u * t0) * y2 + y0;
+    matrix(1, 2) = (v * u * t0 - c2 * ny * nx) * y1 + (ny * u - nx * v * t0) * y2;
+    matrix(1, 3) = (w * u * t0 - c2 * nz * nx) * y1 + (nz * u - nx * w * t0) * y2;
+    matrix(1, 4) = -u * t0 * y1 + nx * t0 * y2;
+
+    //! Third row.
+    matrix(2, 0) = (ny * Vn * c2 - v * halfV2 * t0) * y1 + (ny * halfV2 * t0 - v * Vn) * y2;
+    matrix(2, 1) = (u * v * t0 - c2 * nx * ny) * y1 + (nx * v - ny * u * t0) * y2;
+    matrix(2, 2) = (v * v * t0 - c2 * ny * ny) * y1 + (ny * v - ny * v * t0) * y2 + y0;
+    matrix(2, 3) = (w * v * t0 - c2 * nz * ny) * y1 + (nz * v - ny * w * t0) * y2;
+    matrix(2, 4) = -v * t0 * y1 + ny * t0 * y2;
+
+    //! Fourth row.
+    matrix(3, 0) = (nz * Vn * c2 - w * halfV2 * t0) * y1 + (nz * halfV2 * t0 - w * Vn) * y2;
+    matrix(3, 1) = (u * w * t0 - c2 * nx * nz) * y1 + (nx * w - nz * u * t0) * y2;
+    matrix(3, 2) = (v * w * t0 - c2 * ny * nz) * y1 + (ny * w - nz * v * t0) * y2;
+    matrix(3, 3) = (w * w * t0 - c2 * nz * nz) * y1 + (nz * w - nz * w * t0) * y2 + y0;
+    matrix(3, 4) = -w * t0 * y1 + nz * t0 * y2;
+		  	  
+    //! Fi(t,r)w.
+    matrix(4, 0) = (-halfV2 * halfV2 * t0 + Vn * Vn * c2 - halfV2 * c2) * y1 + (halfV2 * Vn * (t0 - 1.0) - c2 * Vn / t0) * y2;
+    matrix(4, 1) = (u * c2 + u * halfV2 * t0 - nx * Vn * c2) * y1 + (nx * halfV2 + nx * c2 / t0 - u * Vn * t0) * y2;
+    matrix(4, 2) = (v * c2 + v * halfV2 * t0 - ny * Vn * c2) * y1 + (ny * halfV2 + ny * c2 / t0 - v * Vn * t0) * y2;
+    matrix(4, 3) = (w * c2 + w * halfV2 * t0 - nz * Vn * c2) * y1 + (nz * halfV2 + nz * c2 / t0 - w * Vn * t0) * y2;
+    matrix(4, 4) = -halfV2 * t0 * y1 + Vn * t0 * y2 + half * (eigv2 + eigv3);
+
+	for (int m = 0; m < 5; ++ m)
+    {
+        for (int n = 0; n < 5; ++ n)
+        {
+            matrix(m, n) *= area;
+        }
+    }
+}
+
+void ComputeViscousMatrix(RDouble *primitiveVars, RDouble *temperature, RDouble xfn, RDouble yfn, RDouble zfn, RDouble area, RDouble vol, 
+                          RDouble vgn, RDouble gama, RDouble laminarViscosity, RDouble turbulentViscosity, RDouble2D *tempMatrix)
+{
+    int nLaminar = GlobalDataBase::GetIntParaFromDB("nl");
+    int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nTemperatureModel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+    RDouble refReNumber = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+    //! Compute the number of equations.
+    int neqn = nLaminar + nChemical + nTemperatureModel - 1;
+
+    //! To store the Jacobian matrix of inviscid flux.
+    RDouble2D &viscousMatrix = *reinterpret_cast<RDouble2D *> (tempMatrix);
+
+    using namespace IDX;
+    //! Obtain the primary variables.
+    RDouble uVelocity, vVelocity, wVelocity, density, pressure, averageVelocity;
+    density   = primitiveVars[IR];
+    pressure  = primitiveVars[IP];
+    uVelocity = primitiveVars[IU];
+    vVelocity = primitiveVars[IV];
+    wVelocity = primitiveVars[IW];
+    averageVelocity = uVelocity * xfn + vVelocity * yfn + wVelocity * zfn;
+
+    //! trTemperature is the translation-rotation temperature, vTemperature and eTemperature denote the temperatures \n
+    //! of the vibration mode and electron mode, respectively.
+    RDouble trTemperature, vTemperature, eTemperature;
+
+    //! To obtain the value of temperature.
+    trTemperature = temperature[ITT];
+    if (nTemperatureModel > 1)
+    {
+        vTemperature = temperature[ITV];
+        eTemperature = vTemperature;
+        if (nTemperatureModel > 2)
+        {
+            eTemperature = temperature[ITE];
+        }
+    }
+    else
+    {
+        vTemperature = trTemperature;
+        eTemperature = trTemperature;
+    }
+
+    //! ktr is the heat conductivity of translation and rotation mode, kv and ke are heat conductivities \n
+    //! of vibration mode and electron mode, respectively. kcp denotes the total heat conductivity of mixed gas.
+    RDouble ktr, kv, ke, kcp;
+    RDouble oprl = GlobalDataBase::GetDoubleParaFromDB("oprl");
+    RDouble oprt = GlobalDataBase::GetDoubleParaFromDB("oprt");
+
+    //! Compute the heat conductivity.
+    if (nChemical == 0) //The heat conductivity of perfect gas
+    {
+        RDouble R = gas->GetUniversalGasConstant();
+        ktr = (laminarViscosity * oprl + turbulentViscosity * oprt) * gama / (gama - 1.0) * R;
+        kv = 0.0;
+        ke = 0.0;
+    }
+    else
+    {
+        gas->ComputeMixtureGasHeatConductivity(primitiveVars, trTemperature, vTemperature, eTemperature, ktr, kv, ke);
+    }
+    //! To compute the total heat conductivity and viscosity.
+    kcp = ktr + kv + ke;
+    RDouble viscosity = laminarViscosity + turbulentViscosity;
+
+    //! To compute the square velocity.
+    RDouble squareVelocity;
+    squareVelocity = uVelocity * uVelocity + vVelocity * vVelocity + wVelocity * wVelocity;
+
+    //! Construct the Jacobian matrix.
+    RDouble alpha = viscosity / density;
+    RDouble phi = kcp * (gama - 1.0) * pressure / trTemperature;
+    viscousMatrix(0, 0) = 0.0;
+    viscousMatrix(1, 0) = -alpha * (uVelocity + 1.0/3.0 * averageVelocity * xfn);
+    viscousMatrix(2, 0) = -alpha * (vVelocity + 1.0/3.0 * averageVelocity * yfn);
+    viscousMatrix(3, 0) = -alpha * (wVelocity + 1.0/3.0 * averageVelocity * zfn);
+    viscousMatrix(4, 0) = -kcp * trTemperature / density + 0.5 * phi * squareVelocity
+                          -2.0 * alpha * (squareVelocity + 1.0/3.0 * averageVelocity * averageVelocity);
+
+    //! The second column.
+    viscousMatrix(0, 1) = 0.0;
+    viscousMatrix(1, 1) = alpha * (1.0 + 1.0/3.0 * xfn * xfn);
+    viscousMatrix(2, 1) = alpha * (0.0 + 1.0/3.0 * xfn * yfn);
+    viscousMatrix(3, 1) = alpha * (0.0 + 1.0/3.0 * xfn * zfn);
+    viscousMatrix(4, 1) = 2.0 * alpha * (uVelocity + 1.0/3.0 * averageVelocity * xfn) - phi * uVelocity;
+
+    // The third column.
+    viscousMatrix(0, 2) = 0.0;
+    viscousMatrix(1, 2) = alpha * (0.0 + 1.0/3.0 * xfn * yfn);
+    viscousMatrix(2, 2) = alpha * (1.0 + 1.0/3.0 * yfn * yfn);
+    viscousMatrix(3, 2) = alpha * (0.0 + 1.0/3.0 * yfn * zfn);
+    viscousMatrix(4, 2) = 2.0 * alpha * (vVelocity + 1.0/3.0 * averageVelocity * yfn) - phi * vVelocity;
+
+    //! The fourth column.
+    viscousMatrix(0, 3) = 0.0;
+    viscousMatrix(1, 3) = alpha * (0.0 + 1.0/3.0 * xfn * zfn);
+    viscousMatrix(2, 3) = alpha * (0.0 + 1.0/3.0 * yfn * zfn);
+    viscousMatrix(3, 3) = alpha * (1.0 + 1.0/3.0 * zfn * zfn);
+    viscousMatrix(4, 3) = 2.0 * alpha * (wVelocity + 1.0/3.0 * averageVelocity * zfn) - phi * wVelocity;
+
+    //! The fifth column.
+    viscousMatrix(0, 4) = 0.0;
+    viscousMatrix(1, 4) = 0.0;
+    viscousMatrix(2, 4) = 0.0;
+    viscousMatrix(3, 4) = 0.0;
+    viscousMatrix(4, 4) = phi;
+
+    //! To multiply the average area located in the center of the cell.
+    for (int m = 0; m < neqn; ++ m)
+    {
+        for (int n = 0; n < neqn; ++ n)
+        {
+            viscousMatrix(m, n) *= area * area / (vol * refReNumber);
+        }
+    }
+}
+
+void ObtainInverseDiagonalMatrix(RDouble2D *diagonalMatrixD, int nEquation, RDouble2D *inverseDiaMatrix)
+{
+	Range II(0, nEquation - 1);
+	RDouble2D *lMatrix = new RDouble2D(II, II, fortranArray);
+	RDouble2D &lMatrix2D = *reinterpret_cast<RDouble2D *> (lMatrix);
+
+	RDouble2D *uMatrix = new RDouble2D(II, II, fortranArray);
+	RDouble2D &uMatrix2D = *reinterpret_cast<RDouble2D *> (uMatrix);
+
+	RDouble2D *lInverseMatrix = new RDouble2D(II, II, fortranArray);
+	RDouble2D &lInverseMatrix2D = *reinterpret_cast<RDouble2D *> (lInverseMatrix);
+
+	RDouble2D *uInverseMatrix = new RDouble2D(II, II, fortranArray);
+	RDouble2D &uInverseMatrix2D = *reinterpret_cast<RDouble2D *> (uInverseMatrix);
+
+	RDouble2D &dMatrix = *reinterpret_cast<RDouble2D *>(diagonalMatrixD);
+	RDouble2D &inverseMatrix = *reinterpret_cast<RDouble2D *>(inverseDiaMatrix);
+
+	int i, j, k;
+	RDouble s, t;
+
+	for (i = 0; i < nEquation; i ++)
+	{
+		for (j = 0; j < nEquation; j ++)
+		{
+			lMatrix2D(i, j) = 0.0;
+			uMatrix2D(i, j) = 0.0;
+			lInverseMatrix2D(i, j) = 0.0;
+			uInverseMatrix2D(i, j) = 0.0;
+		}
+	}
+	
+	//! Calculate the diagonal of the l matrix.
+	for (i = 0; i < nEquation; i ++)
+	{
+		lMatrix2D(i, i) = 1;
+	}
+
+	for (i = 0; i < nEquation; i ++)
+	{
+		for (j = i; j < nEquation; j ++)
+		{
+			s = 0.0;
+			for (k = 0; k < i; k ++)
+			{
+				s += lMatrix2D(i, k) * uMatrix2D(k, j);
+			}
+			uMatrix2D(i, j) = dMatrix(i, j) - s;    //! Calculate u value by row.
+		}
+
+		for (j = i + 1; j < nEquation; j ++)
+		{
+			s = 0.0;
+			for (k = 0; k < i; k ++)
+			{
+				s += lMatrix2D(j, k) * uMatrix2D(k, i);
+			}
+			lMatrix2D(j, i) = (dMatrix(j ,i) - s) / uMatrix2D(i, i);    //! Calculate l value by column.
+		}
+	}
+
+	//! Calculate the inverse matrix of l in row order from top to bottom.
+	for (i = 0; i < nEquation; i ++)
+	{
+		lInverseMatrix2D(i, i) = 1;
+	}
+
+	for (i = 1; i < nEquation; i ++)
+	{
+		for (j = 0; j < i; j ++)
+		{
+			s = 0.0;
+			for (k = 0; k < i; k ++)
+			{
+				s += lMatrix2D(i, k) * lInverseMatrix2D(k, j);
+			}
+			lInverseMatrix2D(k, j) = -s;
+		}
+	}
+
+	//! Calculate the inverse matrix of u in column order from bottom to top.
+	for (i = 0; i < nEquation; i ++)
+	{
+		uInverseMatrix2D(i, i) = 1 / uMatrix2D(i, i);
+	}
+
+	for (i = 1; i < nEquation; i ++)
+	{
+		for (j = i - 1; j >= 0; j --)
+		{
+			s = 0.0;
+			for (k = j + 1; k <= i; k ++)
+			{
+				s += uMatrix2D(j, k) * uInverseMatrix2D(k, i);
+			}
+			uInverseMatrix2D(j, i) = -s / uMatrix2D(j, j);
+		}
+	}
+
+	for (i = 0; i < nEquation; i ++)
+	{
+		for (j = 0; j < nEquation; j ++)
+		{
+			t = 0.0;
+			for (k = 0; k < nEquation; k ++)
+			{
+				t += uInverseMatrix2D(i, k) * lInverseMatrix2D(k, j);
+			}
+			inverseMatrix(i, j) = t;
+		}
+	}
+	delete lMatrix;
+	delete uMatrix;
+	delete lInverseMatrix;
+	delete uInverseMatrix;
+}
+
+}
\ No newline at end of file
diff --git a/API/Physics/src/MovingMesh.cpp b/API/Physics/src/MovingMesh.cpp
new file mode 100644
index 0000000..ad8e181
--- /dev/null
+++ b/API/Physics/src/MovingMesh.cpp
@@ -0,0 +1,454 @@
+#include "PHMpi.h"
+#include "AleManager.h"
+#include "Force.h"
+#include "SixDofManager.h"
+#include "DeformingSolverManager.h"
+#include "MovingMesh.h"
+#include "Geo_Grid.h"
+#include "Geo_UnstructGrid.h"
+#include "Geo_StructGrid.h"
+#include "GridType.h"
+#include "Region.h"
+#include "PHIO.h"
+#include "IO_FileName.h"
+#include "IO_FileReader.h"
+#include "UnstructuredOversetConfig.h"
+
+namespace PHSPACE
+{
+
+SimpleMovingMesh::SimpleMovingMesh()
+{
+    meshDoformingMethod = 0;
+    grid = NULL;
+    numberOfNodes = 0;
+}
+
+SimpleMovingMesh::~SimpleMovingMesh()
+{
+    //if (grid != NULL) delete grid;
+}
+
+void SimpleMovingMesh::SetInitCoordinate(Grid* gridIn)
+{
+    this->grid = gridIn;
+
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    numberOfNodes = grid->GetNTotalNode();
+
+    xInit.resize(numberOfNodes);
+    yInit.resize(numberOfNodes);
+    zInit.resize(numberOfNodes);
+
+    xPresent.resize(numberOfNodes);
+    yPresent.resize(numberOfNodes);
+    zPresent.resize(numberOfNodes);
+
+    for(int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        xPresent[ iNode ] = xInit[ iNode ] = x[ iNode ];
+        yPresent[ iNode ] = yInit[ iNode ] = y[ iNode ];
+        zPresent[ iNode ] = zInit[ iNode ] = z[ iNode ];
+    }
+}
+//! according to six DOF��transform to the body coordinate system for the inertial coordinate.
+void SimpleMovingMesh::CalInitCoordinate(SixDofParameter * sixDof)
+{
+    vector< RDouble > coordinateBody;
+    vector< RDouble > coordinateInertial;
+    vector< RDouble > angleVector;
+    vector< RDouble > massCenter;
+
+    coordinateBody.resize(3);
+    coordinateInertial.resize(3);
+    angleVector.resize(3);
+    massCenter.resize(3);
+
+    angleVector[ 0 ] = sixDof->GetEulerAngleGama();
+    angleVector[ 1 ] = sixDof->GetEulerAngleBeta();
+    angleVector[ 2 ] = sixDof->GetEulerAngleAlpha();
+    massCenter [ 0 ] = sixDof->GetNondimensionalMassCenterX();
+    massCenter [ 1 ] = sixDof->GetNondimensionalMassCenterY();
+    massCenter [ 2 ] = sixDof->GetNondimensionalMassCenterZ();
+
+    for(int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        coordinateInertial[ 0 ] = xInit[ iNode ];
+        coordinateInertial[ 1 ] = yInit[ iNode ];
+        coordinateInertial[ 2 ] = zInit[ iNode ];
+
+        ConvertVectorFromInertialCoordinateSystemToBodyCoordinateSystem(coordinateInertial, angleVector, massCenter, coordinateBody);
+
+        xInit[ iNode ] = coordinateBody[ 0 ];
+        yInit[ iNode ] = coordinateBody[ 1 ];
+        zInit[ iNode ] = coordinateBody[ 2 ];
+    }
+}
+
+void SimpleMovingMesh::Deforming()
+{
+    //! do not consider the mesh deformation in temporary.
+    for(int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        xPresent[ iNode ] = xInit[ iNode ];
+        yPresent[ iNode ] = yInit[ iNode ];
+        zPresent[ iNode ] = zInit[ iNode ];
+    }
+}
+
+//! according to six DOF��transform to the current coordinate system for the body coordinate.
+void SimpleMovingMesh::RigidMoving(SixDofParameter * sixDof)
+{
+    vector< RDouble > coordinateBody;
+    vector< RDouble > coordinateInertial;
+    vector< RDouble > angleVector;
+    vector< RDouble > massCenter;
+
+    coordinateBody.resize(3);
+    coordinateInertial.resize(3);
+    angleVector.resize(3);
+    massCenter.resize(3);
+
+    angleVector[ 0 ] = sixDof->GetEulerAngleGama();
+    angleVector[ 1 ] = sixDof->GetEulerAngleBeta();
+    angleVector[ 2 ] = sixDof->GetEulerAngleAlpha();
+
+    massCenter [ 0 ] = sixDof->GetNondimensionalMassCenterX();
+    massCenter [ 1 ] = sixDof->GetNondimensionalMassCenterY();
+    massCenter [ 2 ] = sixDof->GetNondimensionalMassCenterZ();
+
+    for(int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        coordinateBody[ 0 ] = xInit[ iNode ];
+        coordinateBody[ 1 ] = yInit[ iNode ];
+        coordinateBody[ 2 ] = zInit[ iNode ];
+
+        ConvertVectorFromBodyCoordinateSystemToInertialCoordinateSystem(coordinateBody, angleVector, massCenter, coordinateInertial);
+
+        xPresent[ iNode ] = coordinateInertial[ 0 ];
+        yPresent[ iNode ] = coordinateInertial[ 1 ];
+        zPresent[ iNode ] = coordinateInertial[ 2 ];
+    }
+}
+
+void SimpleMovingMesh::UpdateGrid()
+{
+    RDouble* x = grid->GetX();
+    RDouble* y = grid->GetY();
+    RDouble* z = grid->GetZ();
+
+    int numberOfNodes = grid->GetNTotalNode();
+
+    for(int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        x[ iNode ] = xPresent[ iNode ];
+        y[ iNode ] = yPresent[ iNode ];
+        z[ iNode ] = zPresent[ iNode ];
+    }
+
+    //! Change the coord of unstructure grid which adhere to the structure grid.
+    if (grid->Type() == PHSPACE::STRUCTGRID)
+    {
+        Grid *gridUnstr = StructGridCast(grid)->GetUnstrGrid();
+        if (gridUnstr != NULL)
+        {
+            RDouble* xx = gridUnstr->GetX();
+            RDouble* yy = gridUnstr->GetY();
+            RDouble* zz = gridUnstr->GetZ();
+            int nTotalNode = gridUnstr->GetNTotalNode();
+
+            for(int iNode = 0; iNode < nTotalNode; ++ iNode)
+            {
+                xx[ iNode ] = xPresent[ iNode ];
+                yy[ iNode ] = yPresent[ iNode ];
+                zz[ iNode ] = zPresent[ iNode ];
+            }
+        }
+    }
+}
+
+OriginalMovingMesh::OriginalMovingMesh()
+{
+    bodyIndex        = -1;
+    fartherIndex     = -1;
+
+    location         = NULL;
+    movingMesh       = NULL;
+
+    presentDeforming = NULL;
+}
+
+OriginalMovingMesh::~OriginalMovingMesh()
+{
+    if (location != NULL) { delete location; location = NULL; }
+    if (movingMesh != NULL) { delete movingMesh; movingMesh = NULL; }
+    //if (presentSixdof != NULL) { delete presentSixdof; presentSixdof = NULL; }
+    //if (grid != NULL) { delete grid; grid = NULL; }
+    if (presentDeforming != NULL) { delete presentDeforming; presentDeforming = NULL; }
+}
+
+void OriginalMovingMesh::Initialize(Grid * grid, int bodyIndex)
+{
+    this->grid      = grid;
+    this->bodyIndex = bodyIndex;
+    int numberOfMovingBodies = GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+    if(bodyIndex >= numberOfMovingBodies) return;
+
+    movingMesh = new SimpleMovingMesh;
+
+    fartherIndex = GetIntegerParameterFromDataBase(bodyIndex, "fartherIndex");
+    if(fartherIndex != -1)
+    {
+        vector< RDouble > configPamameter;
+        GetRDoubleVectorFromDataBase(configPamameter, bodyIndex, "configPamameter", 6);
+        location  = new SixDofParameter;
+        location->SetMassCenter(configPamameter[ 0 ], configPamameter[ 1 ], configPamameter[ 2 ]);
+        location->SetEulerAngle(configPamameter[ 3 ], configPamameter[ 4 ], configPamameter[ 5 ]);
+    }
+}
+
+void OriginalMovingMesh::PreProcessRigidMoving()
+{
+    presentSixdof = PHSPACE::GetSixDofParameter(bodyIndex);
+
+    movingMesh->SetInitCoordinate(grid);
+
+    //! if the mesh block is assembled to an object as a part.
+    if(fartherIndex != -1)
+    {
+        SixDofParameter * sixdofFarther = PHSPACE::GetSixDofParameter(fartherIndex);
+
+        movingMesh->CalInitCoordinate(sixdofFarther);
+        movingMesh->CalInitCoordinate(location);
+    }
+
+    movingMesh->CalInitCoordinate(presentSixdof);
+}
+
+void OriginalMovingMesh::PreProcessDeforming()
+{
+
+}
+
+//! the pre-treament of the moving meshes. get the coordinate of the body-axis.
+//! get the area and the coordinate by mapping method.
+//! get the matrix by rbf method.
+
+void OriginalMovingMesh::PreProcess()
+{
+    int numberOfMovingBodies = GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+    if (bodyIndex >= numberOfMovingBodies) return;
+
+    PreProcessRigidMoving();  //! the motion of the rigid body, the coordinate of the body axis.
+
+    PreProcessDeforming();
+}
+
+void OriginalMovingMesh::Restart()
+{
+    int numberOfMovingBodies = GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+    if (bodyIndex >= numberOfMovingBodies) return;
+    int resetMassCenter = GetIntegerParameterFromDataBaseIfExist(bodyIndex, "resetMassCenter", 0);
+    if (resetMassCenter == 1)
+    {
+        PreProcess();
+    }
+
+    presentDeforming = PHSPACE::GetDeformingParameter();
+    presentSixdof    = PHSPACE::GetSixDofParameter   (bodyIndex);
+
+    movingMesh->Deforming  ();
+    movingMesh->RigidMoving(presentSixdof   );
+
+    if(fartherIndex != -1)
+    {
+        SixDofParameter * sixdofFarther = PHSPACE::GetSixDofParameter(fartherIndex);
+
+        movingMesh->RigidMoving(location     );
+        movingMesh->RigidMoving(sixdofFarther);
+    }
+
+    movingMesh->UpdateGrid();
+}
+
+void OriginalMovingMesh::Run()
+{
+    int numberOfMovingBodies = GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+    if (bodyIndex >= numberOfMovingBodies) return;
+
+    presentDeforming = PHSPACE::GetDeformingParameter();
+    presentSixdof    = PHSPACE::GetSixDofParameter   (bodyIndex);
+
+    movingMesh->Deforming  ();
+    movingMesh->RigidMoving(presentSixdof   );
+
+    if(fartherIndex != -1)
+    {
+        SixDofParameter * sixdofFarther = PHSPACE::GetSixDofParameter(fartherIndex);
+
+        movingMesh->RigidMoving(location     );
+        movingMesh->RigidMoving(sixdofFarther);
+    }
+
+    movingMesh->UpdateGrid();
+}
+
+MovingMeshManager * movingMeshManager = NULL;
+
+MovingMeshManager::MovingMeshManager()
+{
+    numberOfBodies        = 0;
+    numberOfZones        = 0;
+
+    originalMovingMeshes = NULL;
+}
+
+MovingMeshManager::~MovingMeshManager()
+{
+    for(int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        if (originalMovingMeshes[iZone])
+        {
+            delete originalMovingMeshes[iZone];
+            originalMovingMeshes[iZone] = NULL;
+        }
+    }
+
+    delete [] originalMovingMeshes;
+    originalMovingMeshes = NULL;
+
+    for(int num = 0; num < innerMovingMesh.size(); ++ num)
+    {
+        delete innerMovingMesh[ num ];
+        innerMovingMesh[num] = NULL;
+    }
+
+    for(int num = 0; num < outerMovingMesh.size(); ++ num)
+    {
+        delete outerMovingMesh[ num ];
+        outerMovingMesh[num] = NULL;
+    }
+}
+
+void MovingMeshManager::Initialize()
+{
+    numberOfBodies = PHSPACE::GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+    numberOfZones = PHMPI::GetNumberofGlobalZones();
+
+    originalMovingMeshes = new OriginalMovingMesh * [ numberOfZones ];
+
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for(int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            originalMovingMeshes[ iZone ] = new OriginalMovingMesh;
+        }
+        else
+        {
+            originalMovingMeshes[ iZone ] = NULL;
+        }
+    }
+
+    //!judge the object that the mesh belonging to by the numbers of mesh files in temporary.
+    for(int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            Grid * grid =  GetGrid(iZone , 0);
+            int bodyIndex = grid->GetIBlock();
+
+            originalMovingMeshes[ iZone ]->Initialize(grid, bodyIndex);
+        }
+    }
+
+    //! if the deforming meshes, it needs some treatment, such as build the backgroung mehsh and the RBF matrix of the wall points, et. al.
+    for(int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            originalMovingMeshes[ iZone ]->PreProcess();
+        }
+    }
+
+    //innerGrid
+    if (GetOversetConfigFactoryMulti() != 0 && GetReadInAuxiliaryInnerGrid() == 1)
+    {
+        vector< UnstructGrid * > &innerGrids = GetOversetConfigFactoryMulti()->GetInnerGrid();
+
+        for (int iBody = 0; iBody < numberOfBodies; ++ iBody)
+        {
+            if (innerGrids[iBody] != 0)
+            {
+                UnstructGrid *innerGrid = innerGrids[iBody];
+
+                OriginalMovingMesh *movingMesh = new OriginalMovingMesh();
+
+                movingMesh->Initialize(innerGrid, iBody);
+                movingMesh->PreProcess();
+
+                innerMovingMesh.push_back(movingMesh);
+            }
+        }
+    }
+}
+
+void MovingMeshManager::Restart()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for(int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            originalMovingMeshes[ iZone ]->Restart();
+        }
+    }
+
+    //! the init of the assist meshes.
+    for(int iInnerMesh = 0; iInnerMesh < innerMovingMesh.size(); ++ iInnerMesh)
+    {
+        innerMovingMesh[ iInnerMesh ]->Restart();
+    }
+
+    for(int iOuterMesh = 0; iOuterMesh < outerMovingMesh.size(); ++ iOuterMesh)
+    {
+        outerMovingMesh[ iOuterMesh ]->Restart();
+    }
+}
+
+void MovingMeshManager::Run()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for(int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            originalMovingMeshes[ iZone ]->Run();
+        }
+    }
+
+    for(int iInnerMesh = 0; iInnerMesh < innerMovingMesh.size(); ++ iInnerMesh)
+    {
+        innerMovingMesh[ iInnerMesh ]->Run();
+    }
+
+    for(int iOuterMesh = 0; iOuterMesh < outerMovingMesh.size(); ++ iOuterMesh)
+    {
+        outerMovingMesh[ iOuterMesh ]->Run();
+    }
+}
+
+void MovingMeshManager::Post()
+{
+    ;
+}
+
+}
\ No newline at end of file
diff --git a/API/Physics/src/PerfectGas.cpp b/API/Physics/src/PerfectGas.cpp
new file mode 100644
index 0000000..bfcf737
--- /dev/null
+++ b/API/Physics/src/PerfectGas.cpp
@@ -0,0 +1,1591 @@
+#include "PerfectGas.h"
+#include "Constants.h"
+#include "Geo_SimpleBC.h"
+#include "GlobalDataBase.h"
+#include "TK_Exit.h"
+#include "PHIO.h"
+#include "Glb_Dimension.h"
+#include "TK_Log.h"
+#include "Math_BasisFunction.h"
+#include "IO_FileName.h"
+#include "TK_Parse.h"
+
+namespace PHSPACE
+{
+namespace GAS_SPACE
+{
+
+PerfectGas::PerfectGas()
+{
+    nGasModel = 0;
+    if (GlobalDataBase::IsExist("nGasModel", PHINT, 1))
+    {
+        nGasModel = GlobalDataBase::GetIntParaFromDB("nGasModel");
+    }
+    molecularDiameter = 3.6e-10; //m
+}
+
+PerfectGas::~PerfectGas()
+{
+    RDouble *prim_inf = reinterpret_cast<RDouble *>(GlobalDataBase::GetDataPtr("prim_inf"));
+    delete [] prim_inf;    prim_inf = NULL;
+    GlobalDataBase::DeleteDataPtr("prim_inf");
+
+    //Restore the following variables.
+    RDouble reynoldsReferenceLengthDimensional = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+    RDouble forceReferenceLength = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLength");
+    RDouble forceReferenceLengthSpanWise = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLengthSpanWise");
+    RDouble forceReferenceArea = GlobalDataBase::GetDoubleParaFromDB("forceReferenceArea");
+
+    RDouble TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+    RDouble TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+    RDouble TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+
+    if (GetDim() == THREE_D)
+    {
+        forceReferenceArea *= reynoldsReferenceLengthDimensional*reynoldsReferenceLengthDimensional;
+    }
+    else if (GetDim() == TWO_D)
+    {
+        forceReferenceArea *= reynoldsReferenceLengthDimensional;
+    }
+    forceReferenceLength *= reynoldsReferenceLengthDimensional;
+    forceReferenceLengthSpanWise *= reynoldsReferenceLengthDimensional;
+    TorqueRefX *= reynoldsReferenceLengthDimensional;
+    TorqueRefY *= reynoldsReferenceLengthDimensional;
+    TorqueRefZ *= reynoldsReferenceLengthDimensional;
+
+    GlobalDataBase::UpdateData("forceReferenceLength", &forceReferenceLength, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("forceReferenceLengthSpanWise", &forceReferenceLengthSpanWise, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("forceReferenceArea", &forceReferenceArea, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("TorqueRefX", &TorqueRefX, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("TorqueRefY", &TorqueRefY, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("TorqueRefZ", &TorqueRefZ, PHDOUBLE, 1);
+
+    RDouble refReNumber = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+    refReNumber /= reynoldsReferenceLengthDimensional;
+    GlobalDataBase::UpdateData("refReNumber", &refReNumber, PHDOUBLE, 1);
+}
+#ifdef USE_GMRESSOLVER
+// GMRESPV
+void PerfectGas::dPrimitive2dConservative(RDouble *prim, RDouble gama, RDouble** dqdcv)
+{
+    using namespace IDX;
+
+    RDouble& r     = prim[IR];
+    RDouble& u     = prim[IU];
+    RDouble& v     = prim[IV];
+    RDouble& w     = prim[IW];
+    RDouble& p     = prim[IP];
+
+    dqdcv[IR][IR] = 1.0;
+    dqdcv[IU][IR] = -1.0*u/r;
+    dqdcv[IV][IR] = -1.0*v/r;
+    dqdcv[IW][IR] = -1.0*w/r;
+    dqdcv[IP][IR] = 0.5*(gama-1.0)*(u*u + v*v + w*w);
+
+    dqdcv[IU][IU] = 1.0/r;
+    dqdcv[IP][IU] = -1.0*(gama-1)*u;
+
+    dqdcv[IV][IV] = 1.0/r;
+    dqdcv[IP][IV] = -1.0*(gama-1)*v;
+
+    dqdcv[IW][IW] = 1.0/r;
+    dqdcv[IP][IW] = -1.0*(gama-1)*w;
+
+    dqdcv[IP][IP] = gama-1;
+
+
+}
+
+// GMRESVis
+// the derivative of primitive variables w.r.t conservative variables
+void PerfectGas::dGradient2dPrimitive(RDouble *prim, int sign, RDouble** dgraddq, char direction, RDouble nxs, RDouble nys, RDouble nzs, RDouble ns, RDouble vol, int nPara)
+{
+    using namespace IDX;
+    RDouble& r     = prim[IR];
+    RDouble& p     = prim[IP];
+
+    if(direction == 'x')
+    {
+        dgraddq[IR][IR] = sign*0.5/vol*ns*nxs;
+        dgraddq[IU][IR] = 0;
+        dgraddq[IV][IR] = 0;
+        dgraddq[IW][IR] = 0;
+        dgraddq[IP][IR] = 0;
+
+        dgraddq[IR][IU] = 0;
+        dgraddq[IU][IU] = sign*0.5/vol*ns*nxs;
+        dgraddq[IV][IU] = 0;
+        dgraddq[IW][IU] = 0;
+        dgraddq[IP][IU] = 0;
+
+        dgraddq[IR][IV] = 0;
+        dgraddq[IU][IV] = 0;
+        dgraddq[IV][IV] = sign*0.5/vol*ns*nxs;
+        dgraddq[IW][IV] = 0;
+        dgraddq[IP][IV] = 0;
+
+        dgraddq[IR][IW] = 0;
+        dgraddq[IU][IW] = 0;
+        dgraddq[IV][IW] = 0;
+        dgraddq[IW][IW] = sign*0.5/vol*ns*nxs;
+        dgraddq[IP][IW] = 0;
+
+        dgraddq[IR][IP] = 0;
+        dgraddq[IU][IP] = 0;
+        dgraddq[IV][IP] = 0;
+        dgraddq[IW][IP] = 0;
+        dgraddq[IP][IP] = sign*0.5/vol*ns*nxs;
+
+        if( nPara == 6)
+        {
+            dgraddq[IP+1][IR] = sign*0.5/vol*ns*nxs*(-1.0*p/(coefficientOfStateEquation*r*r));
+            dgraddq[IP+1][IU] = 0;
+            dgraddq[IP+1][IV] = 0;
+            dgraddq[IP+1][IW] = 0;
+            dgraddq[IP+1][IP] = sign*0.5/vol*ns*nxs*1.0/(coefficientOfStateEquation*r);
+        }
+    }
+    else if(direction == 'y')
+    {
+        dgraddq[IR][IR] = sign*0.5/vol*ns*nys;
+        dgraddq[IU][IR] = 0;
+        dgraddq[IV][IR] = 0;
+        dgraddq[IW][IR] = 0;
+        dgraddq[IP][IR] = 0;
+
+        dgraddq[IR][IU] = 0;
+        dgraddq[IU][IU] = sign*0.5/vol*ns*nys;
+        dgraddq[IV][IU] = 0;
+        dgraddq[IW][IU] = 0;
+        dgraddq[IP][IU] = 0;
+
+        dgraddq[IR][IV] = 0;
+        dgraddq[IU][IV] = 0;
+        dgraddq[IV][IV] = sign*0.5/vol*ns*nys;
+        dgraddq[IW][IV] = 0;
+        dgraddq[IP][IV] = 0;
+
+        dgraddq[IR][IW] = 0;
+        dgraddq[IU][IW] = 0;
+        dgraddq[IV][IW] = 0;
+        dgraddq[IW][IW] = sign*0.5/vol*ns*nys;
+        dgraddq[IP][IW] = 0;
+
+        dgraddq[IR][IP] = 0;
+        dgraddq[IU][IP] = 0;
+        dgraddq[IV][IP] = 0;
+        dgraddq[IW][IP] = 0;
+        dgraddq[IP][IP] = sign*0.5/vol*ns*nys;
+
+
+        if( nPara == 6)
+        {
+            dgraddq[IP+1][IR] = sign*0.5/vol*ns*nys*(-1.0*p/(coefficientOfStateEquation*r*r));
+            dgraddq[IP+1][IU] = 0;
+            dgraddq[IP+1][IV] = 0;
+            dgraddq[IP+1][IW] = 0;
+            dgraddq[IP+1][IP] = sign*0.5/vol*ns*nys*1.0/(coefficientOfStateEquation*r);
+        }
+
+    }
+    else if(direction == 'z')
+    {
+        dgraddq[IR][IR] = sign*0.5/vol*ns*nzs;
+        dgraddq[IU][IR] = 0;
+        dgraddq[IV][IR] = 0;
+        dgraddq[IW][IR] = 0;
+        dgraddq[IP][IR] = 0;
+
+        dgraddq[IR][IU] = 0;
+        dgraddq[IU][IU] = sign*0.5/vol*ns*nzs;
+        dgraddq[IV][IU] = 0;
+        dgraddq[IW][IU] = 0;
+        dgraddq[IP][IU] = 0;
+
+        dgraddq[IR][IV] = 0;
+        dgraddq[IU][IV] = 0;
+        dgraddq[IV][IV] = sign*0.5/vol*ns*nzs;
+        dgraddq[IW][IV] = 0;
+        dgraddq[IP][IV] = 0;
+
+        dgraddq[IR][IW] = 0;
+        dgraddq[IU][IW] = 0;
+        dgraddq[IV][IW] = 0;
+        dgraddq[IW][IW] = sign*0.5/vol*ns*nzs;
+        dgraddq[IP][IW] = 0;
+
+        dgraddq[IR][IP] = 0;
+        dgraddq[IU][IP] = 0;
+        dgraddq[IV][IP] = 0;
+        dgraddq[IW][IP] = 0;
+        dgraddq[IP][IP] = sign*0.5/vol*ns*nzs;
+
+        if( nPara == 6)
+        {
+            dgraddq[IP+1][IR] = sign*0.5/vol*ns*nzs*(-1.0*p/(coefficientOfStateEquation*r*r));
+            dgraddq[IP+1][IU] = 0;
+            dgraddq[IP+1][IV] = 0;
+            dgraddq[IP+1][IW] = 0;
+            dgraddq[IP+1][IP] = sign*0.5/vol*ns*nzs*1.0/(coefficientOfStateEquation*r);
+            
+        }
+    }
+
+}
+
+// GMRESnolim
+void PerfectGas::dGradient2dPrimitive4limiter(int sign, RDouble** dgraddq, char direction, RDouble nxs, RDouble nys, RDouble nzs, RDouble ns, RDouble vol)
+{
+    using namespace IDX;
+
+    if(direction == 'x')
+    {
+        dgraddq[IR][IR] = sign*0.5/vol*ns*nxs;
+       
+        dgraddq[IU][IU] = sign*0.5/vol*ns*nxs;
+        
+        dgraddq[IV][IV] = sign*0.5/vol*ns*nxs;
+     
+        dgraddq[IW][IW] = sign*0.5/vol*ns*nxs;
+    
+        dgraddq[IP][IP] = sign*0.5/vol*ns*nxs;
+    }
+    else if(direction == 'y')
+    {
+        dgraddq[IR][IR] = sign*0.5/vol*ns*nys;
+  
+        dgraddq[IU][IU] = sign*0.5/vol*ns*nys;
+     
+        dgraddq[IV][IV] = sign*0.5/vol*ns*nys;
+
+        dgraddq[IW][IW] = sign*0.5/vol*ns*nys;
+
+        dgraddq[IP][IP] = sign*0.5/vol*ns*nys;
+
+    }
+    else if(direction == 'z')
+    {
+        dgraddq[IR][IR] = sign*0.5/vol*ns*nzs;
+  
+        dgraddq[IU][IU] = sign*0.5/vol*ns*nzs;
+       
+        dgraddq[IV][IV] = sign*0.5/vol*ns*nzs;
+        
+        dgraddq[IW][IW] = sign*0.5/vol*ns*nzs;
+        
+        dgraddq[IP][IP] = sign*0.5/vol*ns*nzs;
+    }
+
+}  
+#endif
+
+void PerfectGas::Primitive2Conservative(RDouble *prim, RDouble gama, RDouble Tv, RDouble Te, RDouble *q)
+{
+    using namespace IDX;
+    RDouble em;
+
+    //! obtain the total internal energy Em.
+    ComputeInternalEnergy(prim, gama, Tv, Te, em);
+
+    q[IR ] = prim[IR];
+    q[IRU] = prim[IR] * prim[IU];
+    q[IRV] = prim[IR] * prim[IV];
+    q[IRW] = prim[IR] * prim[IW];
+    q[IRE] = prim[IR] * em;
+}
+
+void PerfectGas::ComputeInternalEnergy(RDouble *primitiveVariables, RDouble gama, RDouble vibrationTemperature, RDouble electronTemperature, RDouble &totalEnergy)
+{
+    using namespace IDX;
+
+    RDouble &um = primitiveVariables[IU];
+    RDouble &vm = primitiveVariables[IV];
+    RDouble &wm = primitiveVariables[IW];
+    RDouble &density = primitiveVariables[IR];
+    RDouble &pressure = primitiveVariables[IP];
+    RDouble squareVelocity = um * um + vm * vm + wm * wm;
+
+    totalEnergy = (pressure / density) / (gama - one) + half * squareVelocity;
+}
+
+void PerfectGas::Conservative2Primitive(RDouble *q, RDouble gama, RDouble *prim, RDouble *temperature)
+{
+    using namespace IDX;
+    RDouble density, oDensity, um, vm, wm, internalEnergy;
+    density = q[IR];
+    if (density <= zero)
+    {
+        prim[IR] = density;
+        return;
+    }
+
+    oDensity = 1.0 / density;
+    um = q[IRU] * oDensity;
+    vm = q[IRV] * oDensity;
+    wm = q[IRW] * oDensity;
+    internalEnergy = q[IRE] - half * density * (um * um + vm * vm + wm * wm);
+
+    prim[IR] = density;
+    prim[IU] = um;
+    prim[IV] = vm;
+    prim[IW] = wm;
+    prim[IP] = (gama - one) * internalEnergy;
+
+    //! Compute temperature.
+    RDouble gasConstant = this->GetCoefficientOfStateEquation();
+    temperature[ITT] = prim[IP] / (prim[IR] * gasConstant);
+    temperature[ITV] = temperature[ITT];
+    temperature[ITE] = temperature[ITT];
+}
+
+void PerfectGas::GetSpecificHeatRatio(RDouble *prim, RDouble &gama)
+{
+    gama = referenceParameterDimensional.GetAverageSpecificHeatRatio();
+}
+
+void PerfectGas::ComputeEnthalpyByPrimitive(RDouble *primitiveVariables, RDouble &gama, RDouble &enthalpy, RDouble* temperatures)
+{
+    using namespace IDX;
+    enthalpy = (gama / (gama - one)) * (primitiveVariables[IP] / primitiveVariables[IR]);
+}
+
+void PerfectGas::ComputeTotalEnthalpyAndDH(RDouble *primitiveVariables, RDouble &gama, RDouble *deltaQ, RDouble &totalEnthalpy, RDouble &deltaEnthalpy)
+{
+    // This function is used for perfect gas and single temperature model.
+    // To compute the total enthalpy and the variable dh in the function MXDQ_STD(). dh=b2, b2 denotes the coefficient \n
+    // of the vector M*dQ which can be referred to the forumla (A.7) and (A.8) in the appendix A of the PHengLEI Theory manual.
+    using namespace IDX;
+
+    // Obtain the primitive variables.
+    RDouble &um = primitiveVariables[IU];
+    RDouble &vm = primitiveVariables[IV];
+    RDouble &wm = primitiveVariables[IW];
+    RDouble &density = primitiveVariables[IR];
+    RDouble &pressure = primitiveVariables[IP];
+
+    // c1 is product coefficient of the variable dq[IR], gama1 = gama-1.
+    RDouble squareVelocity, c1, gama1;
+    squareVelocity = um * um + vm * vm + wm * wm;
+    gama1 = gama - 1.0;
+    c1 = half * gama1 * squareVelocity;
+    deltaEnthalpy = -gama1 * (um * deltaQ[IRU] + vm * deltaQ[IRV] + wm * deltaQ[IRW] - deltaQ[IRE]);
+
+    // enthalpy is static enthalpy.
+    RDouble enthalpy = (gama / gama1)* (pressure / density);
+
+    deltaEnthalpy += c1 * deltaQ[IR];
+    // h0 = h+v*v/2, total enthalpy equals to static enthalpy plus half of the squared velocity.
+    totalEnthalpy = enthalpy + half * squareVelocity;
+}
+
+void PerfectGas::ComputeDHAndTotalEnthalpy(RDouble *primitiveVariables, RDouble &gama, RDouble *deltaQ, RDouble &deltaEnthalpy, RDouble &totalEnthalpy)
+{
+    using namespace IDX;
+
+    RDouble squareVelocity, ae, af;
+    RDouble enthalpy;
+    // Obtain the primitive variables.
+    RDouble &um = primitiveVariables[IU];
+    RDouble &vm = primitiveVariables[IV];
+    RDouble &wm = primitiveVariables[IW];
+    RDouble &density = primitiveVariables[IR];
+    RDouble &pressure = primitiveVariables[IP];
+
+    squareVelocity = um * um + vm * vm + wm * wm;
+    ae = gama - one;
+    af = half * ae * squareVelocity;
+    deltaEnthalpy = -ae * (um * deltaQ[IRU] + vm * deltaQ[IRV] + wm * deltaQ[IRW] - deltaQ[IRE]);
+    enthalpy = (gama / (gama - one)) * (pressure / density);
+  
+    deltaEnthalpy += af * deltaQ[IR];
+    // ht = h+v*v/2
+    totalEnthalpy = enthalpy + half * squareVelocity;
+}
+
+RDouble PerfectGas::GetMixedGasEnthalpy(RDouble *primitiveVars, RDouble transRotationTemperature, RDouble vibrationTemperature, RDouble electronTemperature)
+{
+    RDouble gamma = referenceParameterDimensional.GetAverageSpecificHeatRatio();
+    RDouble  staticEnthaly = (gamma / (gamma - 1.0)) * primitiveVars[IDX::IP] / primitiveVars[IDX::IR];
+    return staticEnthaly;
+}
+
+void PerfectGas::ComputeViscosityByPrimitive(RDouble *primitiveVariables, RDouble &transRotationTemperature, RDouble &electronTemperature, RDouble &suthTemperature, RDouble &viscosity)
+{
+    if (this->nGasModel > 1) //The one molecule of the gas.
+    {
+        //Referred to the "2008-Lofthouse-Nonequilibrium Hypersonic Aerothermodynamics Using the Direct Simulation Monte Carlo And Navier-Stokes Models".
+        RDouble T = transRotationTemperature * referenceParameterDimensional.GetTemperature();
+        //The default is the Argon.
+        RDouble Omega = 0.734, Tref = 1000.0, Dref = 3.595e-10;
+        if (this->nGasModel == 3) //The pure gas of Nitrogen.
+        {
+            Omega = 0.7;
+            Tref = 290.0;
+            Dref = 4.11e-10;
+        }
+        RDouble mass = referenceParameterDimensional.GetAverageMolecularWeight() / AVOGADRO_CONSTANT;
+        RDouble refViscosity = 15 * sqrt(PI * mass * BOLTZMANN_CONSTANT * Tref);
+        refViscosity = refViscosity / (2 * PI * Dref * Dref) / (5 - 2 * Omega) / (7 - 2 * Omega);
+
+        viscosity = refViscosity * pow(T / Tref, Omega);
+        viscosity = viscosity / referenceParameterDimensional.GetViscosity();
+    }
+    else
+    {
+        viscosity = transRotationTemperature * sqrt(transRotationTemperature) * (1.0 + suthTemperature) / (transRotationTemperature + suthTemperature);
+    }
+}
+
+void PerfectGas::InitGlobalParameterOfNSEquation()
+{
+    //! Obtain the variable of "reynoldsReferenceLengthDimensional" according to "gridScaleFactor".
+    InitCommonParameter();
+
+    InitReferenceParameter();
+
+    ComputeReferenceParameter();
+
+    PrintInflowConditionToWindow();
+
+    ComputeProperReynoldsNumberForGrid();
+
+    //! The five reference variables for the whole aerodynamic coefficients integration, which are from the file of "cfd_para.hypara", should be updated with "reynoldsReferenceLengthDimensional".
+    ComputeOtherProperParameterForGrid();
+
+    InitOtherParameter();
+
+    GlobalBoundaryCondition::SetGlobalBCByGlobalDataBase();
+
+    GlobalBoundaryCondition::InitMassFlowBoundary();
+
+    GlobalBoundaryCondition::SetBCDataBaseByGlobalBC();
+}
+
+void PerfectGas::InitNumberOfSpecies()
+{
+    int numberOfSpecies = 0;
+    GlobalDataBase::UpdateData("numberOfSpecies", &numberOfSpecies, PHINT, 1);
+
+    int nm = GlobalDataBase::GetIntParaFromDB("nm");
+    int nl = nm;
+    GlobalDataBase::UpdateData("nl", &nl, PHINT, 1);
+}
+
+void PerfectGas::ComputeProperReynoldsNumberForGrid()
+{
+    RDouble refReNumber = referenceParameterDimensional.GetReynoldsNumber();
+    RDouble reynoldsReferenceLengthDimensional = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+
+    refReNumber *= reynoldsReferenceLengthDimensional;
+    RDouble oreynolds = 1.0 / refReNumber;
+
+    referenceParameterDimensional.SetReynoldsNumber(refReNumber);
+    GlobalDataBase::UpdateData("refReNumber", &refReNumber, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("oreynolds", &oreynolds, PHDOUBLE, 1);
+}
+
+void PerfectGas::InitCommonParameter()
+{
+    RDouble reynoldsReferenceLengthDimensional = 1.0;
+
+    RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+
+    reynoldsReferenceLengthDimensional = gridScaleFactor;
+
+    GlobalDataBase::UpdateData("reynoldsReferenceLengthDimensional", &reynoldsReferenceLengthDimensional, PHDOUBLE, 1);
+
+    RDouble prl = GlobalDataBase::GetDoubleParaFromDB("prl");
+    RDouble prt = GlobalDataBase::GetDoubleParaFromDB("prt");
+    RDouble gamma = GlobalDataBase::GetDoubleParaFromDB("refGama");
+
+    if (this->nGasModel == 2)    //! The Argon gas.
+    {
+        //! Referred to the "2008-Lofthouse-Nonequilibrium Hypersonic Aerothermodynamics Using the Direct Simulation Monte Carlo And Navier-Stokes Models".
+        gamma = 5.0 / 3.0;
+        GlobalDataBase::UpdateData("refGama", &gamma, PHDOUBLE, 1);
+        prl = 4.0 * gamma / (9.0 * gamma - 5.0);
+        GlobalDataBase::UpdateData("prl", &prl, PHDOUBLE, 1);
+        GlobalDataBase::UpdateData("refGama", &gamma, PHDOUBLE, 1);
+    }
+    else if (this->nGasModel == 3)    //! The Nitrogen gas.
+    {
+        gamma = 1.4;
+        prl = 4.0 * gamma / (9.0 * gamma - 5.0);
+        GlobalDataBase::UpdateData("prl", &prl, PHDOUBLE, 1);
+        GlobalDataBase::UpdateData("refGama", &gamma, PHDOUBLE, 1);
+    }
+
+    RDouble oprl = 1.0 / prl;
+    GlobalDataBase::UpdateData("oprl", &oprl, PHDOUBLE, 1);
+    RDouble oprt = 1.0 / prt;
+    GlobalDataBase::UpdateData("oprt", &oprt, PHDOUBLE, 1);
+}
+
+void PerfectGas::InitOtherParameter()
+{
+    int nolstress, nrokplus;
+    nolstress = -1;
+    nrokplus  = -1;
+    GlobalDataBase::UpdateData("nolstress", &nolstress, PHINT, 1);
+    GlobalDataBase::UpdateData("nrokplus" , &nrokplus , PHINT, 1);
+
+    int outnstep = 0;
+    GlobalDataBase::UpdateData("outnstep", &outnstep, PHINT, 1);
+
+    int innstep = 0;
+    GlobalDataBase::UpdateData("innstep", &innstep, PHINT, 1);
+
+    RDouble physicalTime = 0.0;
+    GlobalDataBase::UpdateData("physicalTime", &physicalTime, PHDOUBLE, 1);
+
+    int nIndexTT = 0;
+    int nIndexTV = 0;
+    int nIndexTE = 0;
+    GlobalDataBase::UpdateData("indexOfTT", &nIndexTT, PHINT, 1);
+    GlobalDataBase::UpdateData("indexOfTV", &nIndexTV, PHINT, 1);
+    GlobalDataBase::UpdateData("indexOfTE", &nIndexTE, PHINT, 1);
+}
+
+void PerfectGas::InitReferenceParameter()
+{
+    InitNumberOfSpecies();
+
+    int inflowParaType = GlobalDataBase::GetIntParaFromDB("inflowParaType");
+
+    if (inflowParaType == NONDIMENSIONCONDITION)
+    {
+        RDouble refMachNumber = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+        RDouble refReNumber   = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+        RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+
+        referenceParameterDimensional.SetMachNumber(refMachNumber);
+        referenceParameterDimensional.SetReynoldsNumber(refReNumber);
+        referenceParameterDimensional.SetTemperature(refDimensionalTemperature);
+    }
+    else if (inflowParaType == FLIGHTCONDITION)
+    {
+        RDouble refMachNumber = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+
+        referenceParameterDimensional.SetMachNumber(refMachNumber);
+
+        SetAirInformationByDataBase();
+    }
+    else if (inflowParaType == EXPERIMENTCONDITION)
+    {
+        RDouble refMachNumber = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+        RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+        RDouble refDimensionalPressure = GlobalDataBase::GetDoubleParaFromDB("refDimensionalPressure");
+
+        referenceParameterDimensional.SetMachNumber(refMachNumber);
+        referenceParameterDimensional.SetTemperature(refDimensionalTemperature);
+        referenceParameterDimensional.SetPressure(refDimensionalPressure);
+
+        SetAirInformationByExpData();
+    }
+    else if (inflowParaType == TEMPERATURE_DENSITY)    //! where temperature and density are fixed.
+    {
+        RDouble refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+        RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+        RDouble refDimensionalDensity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+
+        referenceParameterDimensional.SetVelocity(refDimensionalVelocity);
+        referenceParameterDimensional.SetTemperature(refDimensionalTemperature);
+        referenceParameterDimensional.SetDensity(refDimensionalDensity);
+    }
+    else if (inflowParaType == TEMPERATURE_PRESSURE)    //! where temperature and pressure are fixed.
+    {
+        RDouble refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+        RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+        RDouble refDimensionalPressure = GlobalDataBase::GetDoubleParaFromDB("refDimensionalPressure");
+
+        referenceParameterDimensional.SetVelocity(refDimensionalVelocity);
+        referenceParameterDimensional.SetTemperature(refDimensionalTemperature);
+        referenceParameterDimensional.SetPressure(refDimensionalPressure);
+    }
+    else if (inflowParaType == MACH_TEMP_PRE)    //! where temperature and pressure are fixed.
+    {
+        RDouble refMachNumber = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+        RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+        RDouble refDimensionalPressure = GlobalDataBase::GetDoubleParaFromDB("refDimensionalPressure");
+
+        referenceParameterDimensional.SetMachNumber(refMachNumber);
+        referenceParameterDimensional.SetTemperature(refDimensionalTemperature);
+        referenceParameterDimensional.SetPressure(refDimensionalPressure);
+    }
+    else if (inflowParaType == WEATHERCONDITION)
+    {
+        SetAirInformationByWRFDataBase();
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("inflowParaType", inflowParaType);
+    }
+}
+
+void PerfectGas::SetAirInformationByDataBase()
+{
+    RDouble height = GlobalDataBase::GetDoubleParaFromDB("height");
+
+    RDouble refDimensionalTemperature = 1.0;
+    RDouble refDimensionalPressure = 1.0;
+    RDouble refDimensionalDensity = 1.0;
+    RDouble refDimensionalSonicSpeed=1.0;
+
+    GetAirInfo(height, refDimensionalTemperature, refDimensionalPressure, refDimensionalDensity, refDimensionalSonicSpeed);
+    
+    referenceParameterDimensional.SetDensity(refDimensionalDensity);
+    referenceParameterDimensional.SetPressure(refDimensionalPressure);
+    referenceParameterDimensional.SetTemperature(refDimensionalTemperature);
+    referenceParameterDimensional.SetSoundVelocity(refDimensionalSonicSpeed);
+
+    GlobalDataBase::UpdateData("refDimensionalDensity", &refDimensionalDensity, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalPressure", &refDimensionalPressure, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalTemperature", &refDimensionalTemperature, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalSonicSpeed", &refDimensionalSonicSpeed, PHDOUBLE, 1);
+}
+
+void PerfectGas::SetAirInformationByExpData()
+{
+    RDouble refDimensionalTemperature;
+    RDouble refDimensionalPressure;
+    RDouble refDimensionalDensity;
+    RDouble refDimensionalSonicSpeed;
+
+    RDouble refMachNumber = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+    RDouble T0 = referenceParameterDimensional.GetTemperature();
+    RDouble P0 = referenceParameterDimensional.GetPressure();
+
+    RDouble refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+    RDouble refMolecularWeight = GlobalDataBase::GetDoubleParaFromDB("refMolecularWeight");
+    int nGasModel = GlobalDataBase::GetIntParaFromDB("nGasModel");
+
+    RDouble R = 287.053;
+    if(nGasModel > 0)
+    {
+        R = 1000.0 * GeneralGasConstant / refMolecularWeight;
+    }
+    
+    RDouble mi   = refGama / (refGama - 1.0);
+    RDouble coef = 1.0 + (refGama - 1.0) * refMachNumber * refMachNumber / 2.0;
+
+    RDouble T, P, rho, c;
+    T = T0 / coef;
+    P = P0 / pow(coef, mi);
+    rho = P / R / T;
+    c = sqrt(refGama * R * T);
+
+    refDimensionalDensity = rho;
+    refDimensionalPressure = P;
+    refDimensionalTemperature = T;
+    refDimensionalSonicSpeed = c;
+
+    referenceParameterDimensional.SetDensity(refDimensionalDensity);
+    referenceParameterDimensional.SetPressure(refDimensionalPressure);
+    referenceParameterDimensional.SetTemperature(refDimensionalTemperature);
+    referenceParameterDimensional.SetSoundVelocity(refDimensionalSonicSpeed);
+
+    GlobalDataBase::UpdateData("refDimensionalDensity", &refDimensionalDensity, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalPressure", &refDimensionalPressure, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalTemperature", &refDimensionalTemperature, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalSonicSpeed", &refDimensionalSonicSpeed, PHDOUBLE, 1);
+}
+
+void PerfectGas::SetAirInformationByExpData(int useSetting)
+{
+    RDouble refDimensionalTemperature;
+    RDouble refDimensionalPressure;
+    RDouble refDimensionalDensity;
+    RDouble refDimensionalSonicSpeed;
+
+    RDouble refMachNumber = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+    RDouble T0 = referenceParameterDimensional.GetTemperature();
+    RDouble P0 = referenceParameterDimensional.GetPressure();
+
+    RDouble refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+    RDouble refMolecularWeight = GlobalDataBase::GetDoubleParaFromDB("refMolecularWeight");
+    int nGasModel = GlobalDataBase::GetIntParaFromDB("nGasModel");
+
+    RDouble R = 287.053;
+    RDouble mi   = refGama / (refGama - 1.0);
+    RDouble coef = 1.0 + (refGama - 1.0) * refMachNumber * refMachNumber / 2.0;
+
+    RDouble T, P, rho, c;
+    T = T0 / coef;
+    P = P0 / pow(coef, mi);
+    rho = P / R / T;
+    c = sqrt(refGama * R * T);
+
+    refDimensionalDensity = rho;
+    refDimensionalPressure = P;
+    refDimensionalTemperature = T;
+    refDimensionalSonicSpeed = c;
+
+    referenceParameterDimensional.SetDensity(refDimensionalDensity);
+    referenceParameterDimensional.SetPressure(refDimensionalPressure);
+    referenceParameterDimensional.SetTemperature(refDimensionalTemperature);
+    referenceParameterDimensional.SetSoundVelocity(refDimensionalSonicSpeed);
+
+    GlobalDataBase::UpdateData("refDimensionalDensity", &refDimensionalDensity, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalPressure", &refDimensionalPressure, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalTemperature", &refDimensionalTemperature, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalSonicSpeed", &refDimensionalSonicSpeed, PHDOUBLE, 1);
+}
+
+void PerfectGas::GetAirInfo(const RDouble &h1, RDouble &t, RDouble &p, RDouble &den, RDouble &a)
+{
+    //USSA 76 Model for atmosphere.
+    RDouble h      = h1 * 1000.0;
+    RDouble r      = 287.053;
+    RDouble g0     = 9.80665;
+    RDouble rp     = 6.37111e6;
+    RDouble g      = (rp/(rp+h))*(rp/(rp+h))*g0;
+    RDouble t0     = 288.15;
+    RDouble p0     = 10.1325e2;
+    RDouble rho0   = 1.225;
+    RDouble t11    = 216.65;
+    RDouble p11    = 2.2632e2;
+    RDouble rho11  = 3.6392e-1;
+    RDouble t20    = t11;
+    RDouble p20    = 5.4747e1;
+    RDouble rho20  = 8.8035e-2;
+    RDouble t32    = 228.65;
+    RDouble p32    = 8.6789;
+    RDouble rho32  = 1.3225e-2;
+    RDouble t47    = 270.65;
+    RDouble p47    = 1.1090;
+    RDouble rho47  = 1.4275e-3;
+    RDouble t52    = t47;
+    RDouble p52    = 5.8997e-1;
+    RDouble rho52  = 7.5943e-4;
+    RDouble t61    = 252.65;
+    RDouble p61    = 1.8209e-1;
+    RDouble rho61  = 2.5109e-4;
+    RDouble t79    = 180.65;
+    RDouble p79    = 1.0376e-2;
+    RDouble rho79  = 2.0010e-5;
+    RDouble t90    = t79;
+    RDouble p90    = 1.6437e-3;
+    RDouble rho90  = 3.4165e-6;
+    RDouble t100   = 210.02;
+    RDouble p100   = 3.0070e-4;
+    RDouble rho100 = 5.6044e-7;
+    RDouble t110   = 257.00;
+    RDouble p110   = 7.3527e-5;
+    RDouble rho110 = 9.7081e-8;
+    RDouble t120   = 349.49;
+    RDouble p120   = 2.5209e-5;
+    RDouble rho120 = 2.2222e-8;
+    RDouble t150   = 892.79;
+    RDouble p150   = 5.0599e-6;
+    RDouble rho150 = 2.0752e-9;
+    RDouble t160   = 1022.20;
+    RDouble p160   = 3.6929e-6;
+    RDouble rho160 = 1.2336e-9;
+    RDouble t170   = 1103.40;
+    RDouble p170   = 2.7915e-6;
+    RDouble rho170 = 7.8155e-10;
+    RDouble t190   = 1205.40;
+    RDouble p190   = 1.6845e-6;
+    RDouble rho190 = 3.5807e-10;
+    RDouble t230   = 1322.30;
+    RDouble p230   = 6.7138e-7;
+    RDouble rho230 = 1.5640e-10;
+    RDouble t300   = 1432.10;
+    RDouble p300   = 1.8828e-7;
+    RDouble rho300 = 1.9159e-11;
+    RDouble t400   = 1487.40;
+    RDouble p400   = 4.0278e-8;
+    RDouble rho400 = 2.8028e-12;
+    RDouble t500   = 1499.20;
+    RDouble p500   = 1.0949e-8;
+    RDouble rho500 = 5.2148e-13;
+    RDouble t600   = 1506.10;
+    RDouble p600   = 3.4475e-9;
+    RDouble rho600 = 1.1367e-13;
+    RDouble t700   = 1507.60;
+
+    RDouble rho = 0.0;
+
+    if (h <= 11019.0) 
+    {
+        RDouble al1 = (t11 - t0)/11019.0;
+        t   = t0 + al1 * h;
+        p   = p0 * pow(t/t0, -g/(r * al1));
+        rho = rho0 * pow(t/t0, -1.0 - g/(r*al1));
+    }
+    else if (h <= 20063.0)
+    {
+        t   = t11;
+        p   = p11   * exp(-g*(h-11019.0)/(r*t11));
+        rho = rho11 * exp(-g*(h-11019.0)/(r*t11));
+    }
+    else if (h <= 32162.0)
+    {
+        RDouble al2 = (t32-t20)/(32162.0-20063.0);
+        t   = t11+al2*(h-20063.0);
+        p   = p20 * pow(t/t11, -g/(r*al2));
+        rho = rho20 * pow(t/t11, -1.0-g/(r*al2));
+    }
+    else if (h <= 47350.0)
+    {
+        RDouble al3 = (t47-t32)/(47350.0-32162.0);
+        t   = t32+al3*(h-32162.0);
+        p   = p32 * pow(t/t32, -g/(r*al3));
+        rho = rho32 * pow(t/t32, -1.0-g/(r*al3));
+    }
+
+    else if (h <= 52429.0)
+    {
+        t   = t47;
+        p   = p47*exp(-g*(h-47350.0)/(r*t47));
+        rho = rho47*exp(-g*(h-47350.0)/(r*t47));
+    }
+    else if(h <= 61591.0)
+    {
+        RDouble al4 =(t61-t52)/(61591.0-52429.0);
+        t = t47+al4*(h-52429.0);
+        p = p52 * pow(t/t47, -g/(r*al4));
+        rho = rho52* pow(t/t47,-1.0-g/(r*al4));
+    }
+    else if(h <= 79994.0)
+    {
+        RDouble al5=(t79-t61)/(79994.0-61591.0);
+        t=t61+al5*(h-61591.0);
+        p=p61*pow(t/t61, -g/(r*al5));
+        rho=rho61*pow(t/t61,-1.0-g/(r*al5));
+    }
+    else if(h <= 90000.0)
+    {
+        t=t79;
+        p=p79*exp(-g*(h-79994.0)/(r*t79));
+        rho=rho79*exp(-g*(h-79994.0)/(r*t79));
+    }
+    else if(h <= 100000.0)
+    {
+        RDouble  al6=(t100-t90)/10000.0;
+        t=t79+al6*(h-90000.0);
+        p=p90* pow(t/t79,-g/(r*al6));
+        rho=rho90* pow(t/t79,-1.0-g/(r*al6));
+    }
+    else if(h <= 110000.0)
+    {
+        RDouble al7=(t110-t100)/10000.0;
+        t=t100+al7*(h-100000.0);
+        p=p100*pow(t/t100, -g/(r*al7));
+        rho=rho100*(t/t100, -1.0-g/(r*al7));
+    }
+    else if(h <= 120000.0)
+    {
+        RDouble al8=(t120-t110)/10000.0;
+        t=t110+al8*(h-110000.0);
+        p=p110*pow(t/t110, -g/(r*al8));
+        rho=rho110*pow(t/t110, -1.0-g/(r*al8));
+    }
+    else if(h <= 150000.0)
+    {
+        RDouble al9=(t150-t120)/30000.0;
+        t=t120+al9*(h-120000.0);
+        p=p120*pow(t/t120,-g/(r*al9));
+        rho=rho120*pow(t/t120,-1.0-g/(r*al9));
+    }
+    else if(h <= 160000.0)
+    {
+        RDouble al10=(t160-t150)/10000.0;
+        t=t150+al10*(h-150000.0);
+        p=p150*pow(t/t150, -g/(r*al10));
+        rho=rho150*pow(t/t150, -1.0-g/(r*al10));
+    }
+    else if(h <= 170000.0)
+    {
+        RDouble al11=(t170-t160)/10000.0;
+        t=t160+al11*(h-160000.0);
+        p=p160*pow(t/t160, -g/(r*al11));
+        rho=rho160*pow(t/t160,-1.0-g/(r*al11));
+    }
+    else if(h <= 190000.0)
+    {
+        RDouble al12=(t190-t170)/20000.0;
+        t=t170+al12*(h-170000.0);
+        p=p170*pow(t/t170, -g/(r*al12));
+        rho=rho170*pow(t/t170,-1.0-g/(r*al12));
+    }
+    else if(h <= 230000.0)
+    {
+        RDouble al13=(t230-t190)/40000.0;
+        t=t190+al13*(h-190000.0);
+        p=p190*pow(t/t190,-g/(r*al13));
+        rho=rho190*pow(t/t190,-1.0-g/(r*al13));
+    }
+    else if(h <= 300000.0)
+    {
+        RDouble al14=(t300-t230)/70000.0;
+        t=t230+al14*(h-230000.0);
+        p=p230*pow(t/t230, -g/(r*al14));
+        rho=rho230*pow(t/t230, -1.0-g/(r*al14));
+    }
+    else if(h <= 400000.0)
+    {
+        RDouble al15=(t400-t300)/100000.0;
+        t=t300+al15*(h-300000.0);
+        p=p300*pow(t/t300, -g/(r*al15));
+        rho=rho300*pow(t/t300, -1.0-g/(r*al15));
+    }
+    else if(h <= 500000.0)
+    {
+        RDouble al16=(t500-t400)/100000.0;
+        t=t400+al16*(h-400000.0);
+        p=p400*pow(t/t400, -g/(r*al16));
+        rho=rho400*pow(t/t400, -1.0-g/(r*al16));
+    }
+    else if(h <= 600000.0)
+    {
+        RDouble al17=(t600-t500)/100000.0;
+        t=t500+al17*(h-500000.0);
+        p=p500*pow(t/t500, -g/(r*al17));
+        rho=rho500*pow(t/t500, -1.0-g/(r*al17));
+    }
+    else if(h <= 700000.0)
+    {
+        RDouble al18=(t700-t600)/100000.0;
+        t=t600+al18*(h-600000.0);
+        p=p600*pow(t/t600, -g/(r*al18));
+        rho=rho600*pow(t/t600, -1.0-g/(r*al18));
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("Error: height must be less than 700km!!!\n", true);
+    }
+
+    a   = sqrt(1.4*r*t);
+    p   = p * 100.0;
+    den = rho;
+}
+
+//! Set air parameter information through weather database.
+void PerfectGas::SetAirInformationByWRFDataBase()
+{
+    RDouble angleSlide =0.0;
+
+    RDouble refDimensionalTemperature;
+    RDouble refDimensionalPressure;
+    RDouble refDimensionalDensity;
+    RDouble refDimensionalVelocity;
+    RDouble angle;
+    RDouble refDimensionalSonicSpeed;
+
+    string filePath = GlobalDataBase::GetStrParaFromDB("weatherDataFilePath");
+    RDouble longitude = GlobalDataBase::GetDoubleParaFromDB("longitude");
+    RDouble latitude =  GlobalDataBase::GetDoubleParaFromDB("latitude");
+
+    //! Read air parameter information from weather data file.
+    ReadAirInfo(filePath, longitude, latitude, refDimensionalTemperature, refDimensionalPressure, refDimensionalDensity, angle, refDimensionalVelocity, refDimensionalSonicSpeed);
+
+    referenceParameterDimensional.SetDensity(refDimensionalDensity);
+    referenceParameterDimensional.SetPressure(refDimensionalPressure);
+    referenceParameterDimensional.SetTemperature(refDimensionalTemperature);
+    referenceParameterDimensional.SetVelocity(refDimensionalVelocity);
+    referenceParameterDimensional.SetSoundVelocity(refDimensionalSonicSpeed);
+
+    GlobalDataBase::UpdateData("refDimensionalDensity", &refDimensionalDensity, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalPressure", &refDimensionalPressure, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalTemperature", &refDimensionalTemperature, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("refDimensionalSonicSpeed", &refDimensionalSonicSpeed, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("attackd", &angle, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("angleSlide", &angleSlide, PHDOUBLE, 1);
+}
+
+void PerfectGas::ReadAirInfo(string &filepath, RDouble &lon, RDouble &lat, RDouble &t, RDouble &p, RDouble &den, RDouble &g, RDouble &v, RDouble &a)
+{
+    RDouble r      = 287.053;
+    RDouble t0     = 273.15;
+    RDouble p0     = 1.01325e5;
+    RDouble rho0   = 1.292;
+
+    vector <RDouble> pressure;
+    vector <RDouble> temperature;
+    vector <RDouble> angle;
+    vector <RDouble> velocity;
+
+    string var1 = "P";
+    string var2 = "T";
+    string var3 = "WIND";
+
+    int nfile = 10;
+    int heightInternal = 10;
+    int fileid = 0;
+
+    for (int ifile = 0; ifile < nfile; ++ ifile)
+    {
+        fileid = (ifile + 1) * heightInternal;
+        ReadWRFSingleData(filepath, var1, fileid, lon, lat, pressure);
+        ReadWRFSingleData(filepath, var2, fileid, lon, lat, temperature);
+        ReadWRFDoubleData(filepath, var3, fileid, lon, lat, angle, velocity);
+    }
+
+    RDouble pp = ComputeVariablesAverage(pressure);
+    RDouble tt = ComputeVariablesAverage(temperature);
+    RDouble gg = ComputeVariablesAverage(angle);
+    RDouble vv = ComputeVariablesAverage(velocity);
+
+    p = pp * 100.0;
+    t = t0 + tt;
+    //g = 90 + gg;
+    g = 270 - gg;
+    v = vv;
+    a = sqrt(1.4*r*t);
+    den = p * rho0 * t0 / ( p0 * t);
+}
+
+//! Reading a kind of variable from one file.
+void PerfectGas::ReadWRFSingleData(string &filepath, string &varname,int &fileindex, RDouble &longitude, RDouble &latitude, vector< RDouble > & variable)
+{
+    fstream file;
+    string relativeFilename = "15120108.dat";
+    relativeFilename = PHSPACE::AddSymbolToFileName(relativeFilename, '_', varname);
+    relativeFilename = PHSPACE::AddSymbolToFileName(relativeFilename, '_', fileindex);
+    string filename = filepath + relativeFilename;
+    file.open(filename.c_str(), ios_base::in);
+
+    string line, word;
+    string separator  = " =\t\r\n#$,;\"'";
+
+    RDouble longitudeInterval, latitudeInterval, longitude1, longitude2, latitude1, latitude2;
+    int longitudeVertices, latitudeVertices, timeSeries;
+    int nlongitudeVertice,nlatitudeVertice;
+
+    SkipLines(file, 1);
+
+    getline(file, line);
+
+    SkipWords(line,5);
+
+    line = FindNextWord(line, word, separator);
+    from_string <RDouble> (longitudeInterval, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string <RDouble> (latitudeInterval, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string <RDouble> (longitude1, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string <RDouble> (longitude2, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string <RDouble> (latitude1, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string <RDouble> (latitude2, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string <int> (longitudeVertices, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string <int> (latitudeVertices, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string <int> (timeSeries, word, std::dec);
+
+    bool LocationInMinMaxBox = CheckIfLocationInMinMaxBox(longitude, latitude, longitude1, longitude2, latitude1, latitude2);
+
+    if(!LocationInMinMaxBox)
+    {
+        PrintToWindow("Geographic scope read from meteorological data : ","\n");
+        PrintToWindow("Longitude range : ", longitude1, "--", longitude2, "\n");
+        PrintToWindow("Latitude range : ", latitude1, "--", latitude2, "\n");
+        TK_Exit::ExceptionExit("Error: the longitude or latitude you set is not within the specified range, please check and reset!!!\n", true);
+    }
+    else
+    {
+        RDouble longitudeRatio = (longitude - longitude1)/longitudeInterval + one;
+        nlongitudeVertice = static_cast<int>(ROUND(longitudeRatio));
+        RDouble latitudeRatio = (latitude - latitude1)/latitudeInterval + one;
+        nlatitudeVertice = static_cast<int>(ROUND(latitudeRatio));
+
+        int time  = 12;
+        int nline = nlatitudeVertice + (time - 1) * latitudeVertices - 1;
+        SkipLines(file, nline);
+
+        getline(file, line);
+
+        int nword = nlongitudeVertice - 1;
+        SkipWords(line, nword);
+
+        line = FindNextWord(line, word, separator);
+        RDouble dataIn;
+        from_string<RDouble>(dataIn, word, std::dec);
+        variable.push_back(dataIn);
+
+        file.close();
+        file.clear();
+    }
+}
+
+//! Reading several kinds of variable from one file.
+void PerfectGas::ReadWRFDoubleData(string &filepath, string &varname,int &fileindex, RDouble &longitude, RDouble &latitude, vector< RDouble > & variable1, vector< RDouble > & variable2)
+{
+    fstream file;
+    string relativeFilename = "15120108.dat";
+    relativeFilename = PHSPACE::AddSymbolToFileName(relativeFilename, '_', varname);
+    relativeFilename = PHSPACE::AddSymbolToFileName(relativeFilename, '_', fileindex);
+    string filename = filepath + relativeFilename;
+    file.open(filename.c_str(), ios_base::in);
+
+    string line, word;
+    string separator  = " =\t\r\n#$,;\"'";
+
+    RDouble longitudeInterval, latitudeInterval, longitude1, longitude2, latitude1, latitude2;
+    int longitudeVertices, latitudeVertices, timeSeries;
+    int nlongitudeVertice,nlatitudeVertice;
+
+    SkipLines(file, 1);
+
+    getline(file, line);
+
+    SkipWords(line,5);
+
+    line = FindNextWord(line, word, separator);
+    from_string <RDouble> (longitudeInterval, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string <RDouble> (latitudeInterval, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string <RDouble> (longitude1, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string <RDouble> (longitude2, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string <RDouble> (latitude1, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string <RDouble> (latitude2, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string <int> (longitudeVertices, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string <int> (latitudeVertices, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string <int> (timeSeries, word, std::dec);
+
+    bool LocationInMinMaxBox = CheckIfLocationInMinMaxBox(longitude, latitude, longitude1, longitude2, latitude1, latitude2);
+
+    if(!LocationInMinMaxBox)
+    {
+        PrintToWindow("Geographic scope read from meteorological data : ","\n");
+        PrintToWindow("Longitude range : ", longitude1, "--", longitude2, "\n");
+        PrintToWindow("Latitude range : ", latitude1, "--", latitude2, "\n");
+        TK_Exit::ExceptionExit("Error: the longitude or latitude is not within the specified range!!!\n", true);
+    }
+    else
+    {
+        RDouble longitudeRatio = (longitude - longitude1)/longitudeInterval + 1.5;
+        nlongitudeVertice = static_cast<int>(longitudeRatio);
+        RDouble latitudeRatio = (latitude - latitude1)/latitudeInterval + 1.5;
+        nlatitudeVertice = static_cast<int>(latitudeRatio);
+
+        int time  = 12;
+        int nline = nlatitudeVertice + (time - 1) * latitudeVertices - 1;
+        SkipLines(file, nline);
+
+        getline(file, line);
+
+        int nword = 2 * (nlongitudeVertice - 1);
+        SkipWords(line, nword);
+
+        RDouble dataIn;
+        line = FindNextWord(line, word, separator);
+        from_string<RDouble>(dataIn, word, std::dec);
+        variable1.push_back(dataIn);
+
+        line = FindNextWord(line, word, separator);
+        from_string<RDouble>(dataIn, word, std::dec);
+        variable2.push_back(dataIn);
+
+        file.close();
+        file.clear();
+    }
+
+}
+
+RDouble PerfectGas::ComputeVariablesAverage(vector< RDouble > & variable)
+{
+    RDouble vv = 0.0;
+    for ( int m = 0; m < variable.size(); ++ m )
+    {
+        vv += variable[m] / variable.size();
+    }
+    return vv;
+}
+
+void PerfectGas::ComputeReferenceParameter()
+{
+    //! The first two variables is temperature independent, 
+    //! depend on molecular weight and mass fraction of species if chemical reactions exist.
+    ComputeReferenceMolecularInformation();
+
+    ComputeReferenceGeneralGasConstant();
+
+    //! The following five variables depend on temperature, 
+    //! and mass fraction of species if chemical reactions exist.
+    ComputeReferenceViscosityDimensional();
+
+    ComputeReferenceSpecificHeatRatio();
+
+    ComputeReferenceSoundVelocity();
+
+    ComputeReferenceVelocity();
+
+    ComputeCoefficientOfStateEquation();
+    //! The above seven variables should be computed firstly.
+
+    //! The variables in this function are computed by different methods according to "inflowParaType", 
+    //! including density, pressure or reynolds.
+    ComputeReferenceGasInformation();
+
+    ComputeReferencePrimitive();
+}
+
+void PerfectGas::ComputeReferencePrimitive()
+{
+    RDouble refMachNumber = referenceParameterDimensional.GetMachNumber();
+    RDouble reference_sound_velocity, reference_pressure;
+
+    RDouble massoo_ref = 1.0;
+
+    RDouble reference_density     = 1.0;
+    RDouble reference_temperature = 1.0;
+
+    reference_sound_velocity = 1.0 / refMachNumber;
+
+    reference_pressure = coefficientOfStateEquation * 
+    reference_density * reference_temperature / massoo_ref;
+
+    using namespace IDX;
+    int nLaminar = GlobalDataBase::GetIntParaFromDB("nl");
+    RDouble *prim_inf = new RDouble[nLaminar];
+
+    prim_inf[IR] = reference_density;
+
+    GlobalBoundaryCondition::SetSpeedDrictionForReferenceVar(one, prim_inf);
+
+    prim_inf[IP] = reference_pressure;
+
+    GlobalDataBase::UpdateDataPtr("prim_inf", prim_inf);
+}
+
+void PerfectGas::ComputeReferenceGasInformation()
+{
+    int inflowParaType = GlobalDataBase::GetIntParaFromDB("inflowParaType");
+
+    if (inflowParaType == NONDIMENSIONCONDITION)    //! Obtain the referce density and referce pressure for nondimension condition.
+    {
+        ComputeDensityWithReynoldsNumber();
+        ComputePressureInGasStateEquation();
+    }
+    else if (inflowParaType == FLIGHTCONDITION || inflowParaType == EXPERIMENTCONDITION)    //! obtain the referce density for nondimension, and the Re.
+    {
+        NormalizeAirInformation();
+        ComputeReferenceReynoldsNumber();
+    }
+    else if (inflowParaType == TEMPERATURE_DENSITY)
+    {
+        RDouble refDimensionalTemperature = referenceParameterDimensional.GetTemperature();
+        RDouble refDimensionalDensity = referenceParameterDimensional.GetDensity();
+        RDouble gasConstant = referenceParameterDimensional.GetAverageGeneralGasConstant();
+
+        RDouble refDimensionalPressure = refDimensionalDensity * gasConstant * refDimensionalTemperature;
+        referenceParameterDimensional.SetPressure(refDimensionalPressure);
+        GlobalDataBase::UpdateData("refDimensionalPressure", &refDimensionalPressure, PHDOUBLE, 1);
+
+        ComputeReferenceReynoldsNumber();
+    }
+    else if (inflowParaType == TEMPERATURE_PRESSURE || inflowParaType == MACH_TEMP_PRE || inflowParaType == WEATHERCONDITION)
+    {
+        NormalizeAirInformation();
+        ComputeReferenceReynoldsNumber();
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("inflowParaType", inflowParaType);
+    }
+}
+
+void PerfectGas::ComputeReferenceReynoldsNumber()
+{
+    RDouble refDimensionalDensity = referenceParameterDimensional.GetDensity();
+    RDouble reference_velocity_dimensional  = referenceParameterDimensional.GetVelocity();
+    RDouble reference_viscosity_dimensional = referenceParameterDimensional.GetViscosity();
+
+    RDouble refReNumber = refDimensionalDensity * reference_velocity_dimensional / reference_viscosity_dimensional;
+    RDouble oreynolds = 1.0 / refReNumber;
+
+    referenceParameterDimensional.SetReynoldsNumber(refReNumber);
+    GlobalDataBase::UpdateData("refReNumber", &refReNumber, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("oreynolds", &oreynolds, PHDOUBLE, 1);
+}
+
+void PerfectGas::NormalizeAirInformation()
+{
+    RDouble refDimensionalPressure = referenceParameterDimensional.GetPressure();
+    RDouble refDimensionalTemperature = referenceParameterDimensional.GetTemperature();
+    RDouble reference_average_generanl_gas_constant = referenceParameterDimensional.GetAverageGeneralGasConstant();
+
+    RDouble refDimensionalDensity = refDimensionalPressure / reference_average_generanl_gas_constant / refDimensionalTemperature;
+
+    referenceParameterDimensional.SetDensity(refDimensionalDensity);
+    GlobalDataBase::UpdateData("refDimensionalDensity", &refDimensionalDensity, PHDOUBLE, 1);
+}
+
+void PerfectGas::ComputePressureInGasStateEquation()
+{
+    RDouble refDimensionalDensity = referenceParameterDimensional.GetDensity();
+    RDouble reference_average_generanl_gas_constant = referenceParameterDimensional.GetAverageGeneralGasConstant();
+    RDouble refDimensionalTemperature = referenceParameterDimensional.GetTemperature();
+
+    RDouble refDimensionalPressure = refDimensionalDensity * reference_average_generanl_gas_constant * refDimensionalTemperature;
+
+    referenceParameterDimensional.SetPressure(refDimensionalPressure);
+    GlobalDataBase::UpdateData("refDimensionalPressure", &refDimensionalPressure, PHDOUBLE, 1);
+}
+
+void PerfectGas::ComputeDensityWithReynoldsNumber()
+{
+    RDouble refReNumber = referenceParameterDimensional.GetReynoldsNumber();
+    RDouble reference_viscosity_dimensional = referenceParameterDimensional.GetViscosity();
+    RDouble reference_velocity_dimensional = referenceParameterDimensional.GetVelocity();
+
+    RDouble refDimensionalDensity = refReNumber * reference_viscosity_dimensional / reference_velocity_dimensional;
+
+    referenceParameterDimensional.SetDensity(refDimensionalDensity);
+    GlobalDataBase::UpdateData("refDimensionalDensity", &refDimensionalDensity, PHDOUBLE, 1);
+}
+
+void PerfectGas::ComputeCoefficientOfStateEquation()
+{
+    //! No matter whether chemical reactions exist or not.
+    RDouble gama0 = referenceParameterDimensional.GetAverageSpecificHeatRatio();
+    RDouble refMachNumber = referenceParameterDimensional.GetMachNumber();
+
+    //! The variable is the non-dimensional value of 8.314/M��M denotes the non-dimensioanl molecular weight of the mixture gas.
+    coefficientOfStateEquation = 1.0 / (gama0 * refMachNumber * refMachNumber);    //! universal gas constant.
+    GlobalDataBase::UpdateData("coefficientOfStateEquation", &coefficientOfStateEquation, PHDOUBLE, 1);
+}
+
+void PerfectGas::ComputeReferenceVelocity()
+{
+    RDouble refDimensionalSonicSpeed = referenceParameterDimensional.GetSoundVelocity();
+
+    int inflowParaType = GlobalDataBase::GetIntParaFromDB("inflowParaType");
+
+    if (inflowParaType == TEMPERATURE_DENSITY || inflowParaType == TEMPERATURE_PRESSURE)
+    {
+        RDouble refDimensionalVelocity = referenceParameterDimensional.GetVelocity();
+        RDouble refMachNumber = refDimensionalVelocity / refDimensionalSonicSpeed;
+        referenceParameterDimensional.SetMachNumber(refMachNumber);
+        GlobalDataBase::UpdateData("refMachNumber", &refMachNumber, PHDOUBLE, 1);
+    }
+    else if (inflowParaType == WEATHERCONDITION)
+    {
+        RDouble refDimensionalVelocity = referenceParameterDimensional.GetVelocity();
+        GlobalDataBase::UpdateData("refDimensionalVelocity", &refDimensionalVelocity, PHDOUBLE, 1);
+        RDouble refMachNumber = refDimensionalVelocity / refDimensionalSonicSpeed;
+        referenceParameterDimensional.SetMachNumber(refMachNumber);
+        GlobalDataBase::UpdateData("refMachNumber", &refMachNumber, PHDOUBLE, 1);
+    }
+    else
+    {
+        RDouble refMachNumber = referenceParameterDimensional.GetMachNumber();
+        RDouble refDimensionalVelocity = refDimensionalSonicSpeed * refMachNumber;
+        referenceParameterDimensional.SetVelocity(refDimensionalVelocity);
+        GlobalDataBase::UpdateData("refDimensionalVelocity", &refDimensionalVelocity, PHDOUBLE, 1);
+    }
+}
+
+void PerfectGas::ComputeReferenceSoundVelocity()
+{
+    RDouble gama0 = referenceParameterDimensional.GetAverageSpecificHeatRatio();
+    RDouble reference_general_gas_constant = referenceParameterDimensional.GetAverageGeneralGasConstant();
+    RDouble refDimensionalTemperature = referenceParameterDimensional.GetTemperature();
+
+    //! unit: m/s.
+    RDouble refDimensionalSonicSpeed = sqrt(gama0 * reference_general_gas_constant * refDimensionalTemperature);
+
+    referenceParameterDimensional.SetSoundVelocity(refDimensionalSonicSpeed);
+    GlobalDataBase::UpdateData("refDimensionalSonicSpeed", &refDimensionalSonicSpeed, PHDOUBLE, 1);
+}
+
+void PerfectGas::ComputeReferenceSpecificHeatRatio()
+{
+    RDouble refGama = 1.4;
+    refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+    referenceParameterDimensional.SetAverageSpecificHeatRatio(refGama);
+}
+
+void PerfectGas::ComputeReferenceViscosityDimensional()
+{
+    if (this->nGasModel > 1)    //! The one molecule of the gas.
+    {
+        //! Referred to the "2008-Lofthouse-Nonequilibrium Hypersonic Aerothermodynamics Using the Direct Simulation Monte Carlo And Navier-Stokes Models".
+        RDouble T = referenceParameterDimensional.GetTemperature();
+        //! The default is the Argon.
+        RDouble Omega = 0.734, Tref = 1000.0, Dref = 3.595e-10;
+        if (this->nGasModel == 3)    //! The pure gas of Nitrogen.
+        {
+            Omega = 0.70;
+            Tref = 290.0;
+            Dref = 4.11e-10;
+        }
+        RDouble mass = referenceParameterDimensional.GetAverageMolecularWeight() / AVOGADRO_CONSTANT;
+        RDouble refViscosity = 15 * sqrt(PI * mass * BOLTZMANN_CONSTANT * Tref);
+        refViscosity = refViscosity / (2 * PI * Dref * Dref) / (5 - 2 * Omega) / (7 - 2 * Omega);
+
+        RDouble reference_viscosity_dimensional = refViscosity * pow(T / Tref, Omega);
+        referenceParameterDimensional.SetViscosity(reference_viscosity_dimensional);
+
+        RDouble tsi  = 110.4;
+        RDouble tsuth = tsi / T;
+        GlobalDataBase::UpdateData("tsuth", &tsuth, PHDOUBLE, 1);
+    }
+    else
+    {
+        RDouble t0i  = 288.15;
+        RDouble tsi  = 110.4;
+        RDouble mu0i = 1.7894E-05;
+
+        RDouble refDimensionalTemperature = referenceParameterDimensional.GetTemperature();
+        RDouble reference_viscosity_dimensional = (t0i + tsi) / (refDimensionalTemperature + tsi) * pow(refDimensionalTemperature / t0i, 1.5) * mu0i;
+        referenceParameterDimensional.SetViscosity(reference_viscosity_dimensional);
+
+        RDouble tsuth = tsi / refDimensionalTemperature;
+        GlobalDataBase::UpdateData("tsuth", &tsuth, PHDOUBLE, 1);
+    }
+}
+
+void PerfectGas::ComputeReferenceMolecularInformation()
+{
+    //! unit: kg/mol.
+    RDouble refMolecularWeight = 28.9644;
+
+    molecularDiameter = 3.6e-10;
+
+    if (nGasModel == 1)    //! The Carbon dioxide.
+    {
+        refMolecularWeight = 44.01;
+        molecularDiameter = 3.370e-10;    //! unit: m
+    }
+    else if (nGasModel == 2)    //! The Argon.
+    {
+        refMolecularWeight = 40.0;
+        molecularDiameter = 3.595e-10;    //! unit: m
+    }
+    else if (nGasModel == 3)    //! The Nitrogen.
+    {
+        refMolecularWeight = 28.01293;
+        molecularDiameter = 4.110e-10;    //! unit: m
+    }
+
+    GlobalDataBase::UpdateData("refMolecularWeight", &refMolecularWeight, PHDOUBLE, 1);
+    RDouble reference_average_molecular_weight_dimensional = refMolecularWeight * 1.0e-3;
+    referenceParameterDimensional.SetAverageMolecularWeight(reference_average_molecular_weight_dimensional);
+}
+
+void PerfectGas::ComputeReferenceGeneralGasConstant()
+{
+    RDouble reference_average_molecular_weight_dimensional = referenceParameterDimensional.GetAverageMolecularWeight();
+    RDouble reference_average_general_gas_constant         = rjmk / reference_average_molecular_weight_dimensional;
+
+    referenceParameterDimensional.SetAverageGeneralGasConstant(reference_average_general_gas_constant);
+    GlobalDataBase::UpdateData("reference_average_general_gas_constant", &reference_average_general_gas_constant, PHDOUBLE, 1);
+}
+
+void PerfectGas::ComputeOtherProperParameterForGrid()
+{
+    RDouble reynoldsReferenceLengthDimensional = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+
+    RDouble forceReferenceLength = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLength");
+    RDouble forceReferenceLengthSpanWise = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLengthSpanWise");
+    RDouble forceReferenceArea = GlobalDataBase::GetDoubleParaFromDB("forceReferenceArea");
+    RDouble TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+    RDouble TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+    RDouble TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+
+    if (GetDim() == THREE_D)
+    {
+        forceReferenceArea /= reynoldsReferenceLengthDimensional*reynoldsReferenceLengthDimensional;
+    }
+    else if (GetDim() == TWO_D)
+    {
+        forceReferenceArea /= reynoldsReferenceLengthDimensional;
+    }
+    forceReferenceLength /= reynoldsReferenceLengthDimensional;
+    forceReferenceLengthSpanWise /= reynoldsReferenceLengthDimensional;
+    TorqueRefX /= reynoldsReferenceLengthDimensional;
+    TorqueRefY /= reynoldsReferenceLengthDimensional;
+    TorqueRefZ /= reynoldsReferenceLengthDimensional;
+
+    GlobalDataBase::UpdateData("forceReferenceLength", &forceReferenceLength, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("forceReferenceLengthSpanWise", &forceReferenceLengthSpanWise, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("forceReferenceArea", &forceReferenceArea, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("TorqueRefX", &TorqueRefX, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("TorqueRefY", &TorqueRefY, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("TorqueRefZ", &TorqueRefZ, PHDOUBLE, 1);
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady == 1)
+    {
+        PrintToWindow("Unsteady Informations" , "\n");
+        RDouble reference_velocity_dimensional = referenceParameterDimensional.GetVelocity();
+        RDouble unit = 1.0 / reference_velocity_dimensional;
+        RDouble physicalTimeStepDimensional = 0.0;
+        RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+        if (GlobalDataBase::IsExist("physicalTimeStepDimensional", PHDOUBLE, 1))
+        {
+            physicalTimeStepDimensional = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStepDimensional");
+            if (physicalTimeStepDimensional >= 0.0)
+            {
+                physicalTimeStep = physicalTimeStepDimensional / unit;
+            }
+        }
+        physicalTimeStepDimensional = physicalTimeStep * unit;
+        GlobalDataBase::UpdateData("physicalTimeStepDimensional", &physicalTimeStepDimensional, PHDOUBLE, 1);
+        //! The non-dimensional physical time step based on grid scale.
+        physicalTimeStep /= reynoldsReferenceLengthDimensional;
+        GlobalDataBase::UpdateData("physicalTimeStep", &physicalTimeStep, PHDOUBLE, 1);
+
+        PrintToWindow("  Physical Time Step       :    ", physicalTimeStepDimensional , "s", "\n");
+    }
+}
+
+RDouble PerfectGas::GetUniversalGasConstant()
+{
+    //! Return the non-dimensional universal gas constant.
+    return coefficientOfStateEquation;
+}
+
+RDouble PerfectGas::ComputeReferenceTotalEnthalpy()
+{
+    RDouble totalEnthalpy = 0.0;
+    RDouble gamma = referenceParameterDimensional.GetAverageSpecificHeatRatio();
+    RDouble density = referenceParameterDimensional.GetDensity();
+    RDouble pressure = referenceParameterDimensional.GetPressure();
+    RDouble velocity = referenceParameterDimensional.GetVelocity();
+    totalEnthalpy = gamma / (gamma - 1.0) * (pressure / density) + 0.5 * velocity * velocity;
+    return totalEnthalpy;
+}
+
+}
+
+//! Check if the longitude and latitude are within the specified range in the weather data file
+bool CheckIfLocationInMinMaxBox(RDouble longitude,RDouble latitude,RDouble a,RDouble b,RDouble c,RDouble d)
+{
+    if ( longitude < MIN(a, b) || longitude > MAX(a, b) ) return false;
+    if ( latitude < MIN(c, d) || latitude > MAX(c, d) ) return false;
+    return true;
+}
+}
diff --git a/API/Physics/src/Region.cpp b/API/Physics/src/Region.cpp
new file mode 100644
index 0000000..c8fcdc7
--- /dev/null
+++ b/API/Physics/src/Region.cpp
@@ -0,0 +1,3840 @@
+#include "Geometry.h"
+#include "IO_FileName.h"
+#include "TK_Parse.h"
+#include "TK_Time.h"
+#include "Pre_WalldistCompute.h"
+#include "Geo_Sample.h"
+#include "Task_ServerUpdateInterface.h"
+#include "Post_WriteVisualFile.h"
+#include "TK_Warning.h"
+#include "OversetInformation.h"
+#include "UnstructuredOversetConfig.h"
+#include "Pre_HDF5File.h"
+#include "Glb_Dimension.h"
+#include "Task.h"
+#include "Solver.h"
+#include "Zone.h"
+#include "Geo_UnstructBC.h"
+#include "Pre_GridConversion.h"
+#include "Geo_StructGrid.h"
+#include "Pre_StructToUnstruct.h"
+#include "PHIO.h"
+#include <omp.h>
+
+
+namespace PHSPACE
+{
+LIB_EXPORT Region::Region()
+{
+    zoneContainer = new vector <Zone *>;
+    GlobalZones = new vector <Zone *>;
+    numberOfZoneInLocalProcess = 0;
+}
+
+LIB_EXPORT Region::~Region()
+{
+    for (std::size_t iZone = 0; iZone < zoneContainer->size(); ++ iZone)
+    {
+        delete (*zoneContainer)[iZone];    (*zoneContainer)[iZone] = NULL;
+        (*GlobalZones)[iZone] = NULL;
+    }
+
+    delete zoneContainer;    zoneContainer = NULL;
+    delete GlobalZones;    GlobalZones = NULL;
+
+    DeleteLabelContainer();
+}
+
+LIB_EXPORT void Region::ReadGrid()
+{
+    int numberOfGridGroups = PHSPACE::GlobalDataBase::GetIntParaFromDB("numberOfGridGroups");
+
+    PHVectorString1D gridGroupNameList;
+
+    gridGroupNameList.push_back(PHSPACE::GlobalDataBase::GetStrParaFromDB("gridfile"));
+
+    for (int iGridFile = 1; iGridFile < numberOfGridGroups; ++ iGridFile)
+    {
+        ostringstream oss;
+
+        oss << "gridfile" << iGridFile;
+
+        gridGroupNameList.push_back(PHSPACE::GlobalDataBase::GetStrParaFromDB(oss.str()));
+    }
+    //Check whether the grid file format is the latest version of HDF5.
+    bool HDF5FileRead = ReadHDF5File(this, gridGroupNameList);
+
+    if (!HDF5FileRead)
+    {
+        PrintToWindow("Grid type is old fts type !\n");
+        ReadOrdinaryGrid(gridGroupNameList);
+
+        int isOldGrid = 1;
+        GlobalDataBase::UpdateData("isOldGrid", &isOldGrid, PHINT, 1);
+    }
+
+    //! Read parameters from file of "boundary_condition.hypara". Notice that the five reference variables for the component aerodynamic coefficients integration should be updated with "reynoldsReferenceLengthDimensional".
+    GlobalBoundaryCondition::ReadGlobalBoundaryCondition();
+
+    //If the mesh is overlapping, the mesh assembly is performed.
+    int isOverset = GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+    if (isOverset)
+    {
+        AddUnStructInfoToStructGrid();
+    }
+
+    //! iBlank (for unstructured grid) or cellTypeContainer (for structured grid) should be allocated and initialized
+    //! whenever the overset grid is considered or not!
+    AllocateOversetGrid();
+
+    GridValidityCheck();
+}
+
+LIB_EXPORT void Region::InitGridForOversetConfig()
+{
+    ReadGrid();
+
+    UpdateAllZonesPara();
+
+    InitGeometry();
+
+    SwapGeommetry();
+}
+
+void ResetAllZonesOversetGrid()
+{
+    int isOverset = GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+    if (!isOverset)
+    {
+        return;
+    }
+
+    PHSPACE::ReConfigUnstructOversetGrid();
+}
+
+LIB_EXPORT void Region::ReadOrdinaryGrid(string fileName)
+{
+    using namespace PHMPI;
+
+    PHVectorString1D gridGroupNameList;
+
+    gridGroupNameList.push_back(fileName);
+
+    if (! PHMPI::IsParallelRun())
+    {
+        ReadOrdinaryGridCSMode(gridGroupNameList);
+    }
+    else
+    {
+        ReadOrdinaryGridP2PMode(gridGroupNameList);
+    }
+}
+
+LIB_EXPORT void Region::ReadOrdinaryGrid(string fileName, int fileMode)
+{
+    TK_Warning::FunctionDeprecation("Region::ReadOrdinaryGrid(string fileName, int fileMode)", "Region::ReadOrdinaryGrid(string fileName)");
+    ReadOrdinaryGrid(fileName);
+}
+
+LIB_EXPORT void Region::ReadOrdinaryGrid(PHVectorString1D &gridGroupNameList)
+{
+    using namespace PHMPI;
+
+    if (! PHMPI::IsParallelRun())
+    {
+        ReadOrdinaryGridCSMode(gridGroupNameList);
+    }
+    else
+    {
+        ReadOrdinaryGridP2PMode(gridGroupNameList);
+    }
+}
+
+LIB_EXPORT int Region::GetProcessGlobalZoneIndexToLocalZoneIndex(int globalZoneIndex)
+{
+    int localZoneIndex = -1;
+
+    int nLocalZones = PHMPI::GetNumberofLocalZones();
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        if (GetProcessLocalZoneIndexToGlobalZoneIndex(iZone) == globalZoneIndex)
+        {
+            localZoneIndex = iZone;
+            break;
+        }
+    }
+
+    if (localZoneIndex == -1)
+    {
+        TK_Exit::PrintDebugInfoExit("Error: Could not find out the local zone index !");
+    }
+
+    return localZoneIndex;
+}
+
+void Region::AddZone(Zone *zone)
+{
+    zoneContainer->push_back(zone);
+    GlobalZones->push_back(zone);
+    if (zone)
+    {
+        int globalIndex = static_cast<int>(zoneContainer->size()) - 1;
+        PHMPI::InsertGlobalZones(globalIndex);
+        ++ numberOfZoneInLocalProcess;
+        PHMPI::SetNumberofLocalZones(numberOfZoneInLocalProcess);
+    }
+}
+
+LIB_EXPORT void Region::BuildAndDumpMixedGrid()
+{
+    string outGridFile = GlobalDataBase::GetStrParaFromDB("out_gfile");
+    int nZones = PHMPI::GetNumberofGlobalZones();
+
+    Grid **gridArray = new Grid * [nZones];
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        gridArray[iZone] = GetGrid(iZone);
+    }
+
+    //! Construct connections.
+    ConstructGlobalInterfaceLink(gridArray, nZones);
+
+    //! Dump out grid.
+    DumpGrid(outGridFile, gridArray, nZones);
+    WriteFaceBoundaryName(gridArray, nZones, outGridFile);
+
+    delete [] gridArray;
+}
+
+void Region::CreateGridFileNameList(vector< string > &filenamelist)
+{
+    if (! PHMPI::IsParallelRun())
+    {
+        CreateGridFileNameListCSMode(filenamelist);
+    }
+    else
+    {
+        CreateGridFileNameListP2PMode(filenamelist);
+    }
+}
+
+LIB_EXPORT void Region::WriteFaceBoundaryName(Grid **grids, int nZones, const string &gridFileName)
+{
+    set< pair<int, string> > bcNamePairSet;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Grid *grid = grids[iZone];
+        if (grid->Type() == UNSTRUCTGRID)
+        {
+            UnstructGrid *unstrGrid = UnstructGridCast(grid);
+
+            UnstructBCSet *unstructBCSet = unstrGrid->GetUnstructBCSet();
+            int nBCRegion = unstructBCSet->GetnBCRegion();
+
+            for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+            {
+                UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+                string bcName = bcRegion->GetBCName();
+                int bcType = bcRegion->GetBCType();
+
+                pair<int, string> bcNamePair(bcType, bcName);
+                bcNamePairSet.insert(bcNamePair);
+            }
+        }
+        else if (grid->Type() == STRUCTGRID)
+        {
+            StructGrid *strGrid = StructGridCast(grid);
+            StructBCSet *structBCSet = strGrid->GetStructBCSet();
+            int  nBCRegion = structBCSet->GetnBCRegion();
+
+            for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion ++)
+            {
+                StructBC *bcRegion = structBCSet->GetBCRegion(iBCRegion);
+
+                int bcType = bcRegion->GetBCType();
+                string bcName = bcRegion->GetBCName();
+                if (bcName == "Connection") continue;
+
+                pair<int, string> bcNamePair(bcType, bcName);
+                bcNamePairSet.insert(bcNamePair);
+            }
+        }
+    }
+
+    DumpBoundaryInfo(bcNamePairSet);
+}
+
+void Region::CreateGridFileNameListCSMode(vector< string > &filenamelist)
+{
+    using namespace PHMPI;
+    string gridfile = "grid.grd";
+    GlobalDataBase::GetData("gridfile", &gridfile, PHSTRING, 1);
+
+    string gridfile_proc = gridfile;
+    GetFileNameofThisProcessor(gridfile_proc);
+
+    filenamelist.push_back(gridfile_proc);
+}
+
+void Region::CreateGridFileNameListP2PMode(vector< string > &filenamelist)
+{
+    using namespace PHMPI;
+    string gridFileName;
+    GlobalDataBase::GetData("gridfile", &gridFileName, PHSTRING, 1);
+
+    string word;
+    FindNextWord(gridFileName, word, ".");
+    int numberOfParts = PHSPACE::ExtractNumberOfPartFromFileName(gridFileName);
+
+    if (GetNumberOfProcessor() == 1)
+    {
+        for (int iPart = 0; iPart < numberOfParts; ++ iPart)
+        {
+            string gridfileProc = gridFileName;
+            gridfileProc = PHSPACE::AddSymbolToFileName(gridfileProc, "_", iPart);
+            filenamelist.push_back(gridfileProc);
+        }
+    }
+    else if (GetNumberOfProcessor() == numberOfParts)
+    {
+        string gridfileProc = gridFileName;
+        gridfileProc = PHSPACE::AddSymbolToFileName(gridfileProc, "_", GetCurrentProcessorID());
+        filenamelist.push_back(gridfileProc);
+    }
+    else
+    {
+        TK_Exit::PrintDebugInfoExit("Error: have not considered the case when nProcessor less than nParts !"); 
+    }
+}
+
+void Region::InitZoneLayoutInformation(vector< string > &filenamelist)
+{
+    zoneStart = 0;
+    for (std::size_t ifile = 0; ifile < filenamelist.size(); ++ ifile)
+    {
+        GridGroup *grid_group = new GridGroup(zoneStart);
+        grid_group->InitZoneLayoutInformation(filenamelist[ifile]);
+        zoneStart += grid_group->GetNZones();
+        delete grid_group;
+
+        if (PHMPI::IsParallelRun())
+        {
+            // For self mode, only read the first file to get number of zones.
+            break;
+        }
+    }
+}
+
+LIB_EXPORT void Region::PreprocessLayoutInformation(vector< string > &filenamelist)
+{
+    GetZoneLayoutInformation(filenamelist);
+    AllocateZoneLayoutInformation();
+    InitZoneLayoutInformation(filenamelist);
+}
+
+LIB_EXPORT void Region::ReadOrdinaryGridP2PMode(PHVectorString1D &gridGroupNameList)
+{
+    // Read Grid from file to grid group.
+    IO_GridReader *gridReader = new IO_GridReader(gridGroupNameList, PHSPACE::GetDim());
+
+    gridReader->ReadGridsByP2PMode();
+    
+    // Classify the grid system type: unstructured, structured and mixed.\n
+    // Based on the block type.
+    //ClassifyGridSystem(); // The grid type has been classified by GridReader.
+    
+    // Create Zones from grid group which is included in the Grid Reader.
+    //CreateZonesFromGridReader(gridReader);
+    CreateZonesFromGridGroups(gridReader);
+
+    if (gridGroupNameList.size() == 1)
+    {
+        gridReader->ReadInterpointInfoByP2PMode();
+
+        gridReader->ReadCellToNodeByP2PMode();
+
+        gridReader->ReadWallDistByP2PMode();
+
+        gridReader->ReadFaceBCByP2PMode();
+    }
+
+    delete gridReader;
+
+}
+
+LIB_EXPORT void Region::ReadOrdinaryGridCSMode(PHVectorString1D &gridGroupNameList)
+{
+    IO_GridReader *gridReader = new IO_GridReader(gridGroupNameList, PHSPACE::GetDim());
+
+    gridReader->ReadGridsByCSMode();
+
+    //ClassifyGridSystem();  // The grid type has been classified by GridReader.
+    
+    CreateZonesFromGridGroups(gridReader);
+
+    gridReader->ReadCellToNodeByCSMode();
+
+    gridReader->ReadInterpointInfoByCSMode();
+
+    gridReader->ReadWallDistByCSMode();
+
+    gridReader->ReadFaceBCByCSMode();
+
+    if (GetDim() == THREE_D)
+    {
+        gridReader->ReadFaceBcDirByCSMode();
+    }
+
+    delete gridReader;
+}
+
+void Region::ReadUnstructuredOversetGrid()
+{
+    string fileName;
+    GlobalDataBase::GetData("oversetGridFileName", &fileName, PHSTRING, 1);
+
+    fstream file;
+
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+
+    int serverProcesspr  = PHMPI::GetServerProcessorID();
+
+    if (currentProcessor == serverProcesspr)
+    {
+        OpenFile(file, fileName, ios_base::in|ios_base::binary);
+    }
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        DataContainer *dataContainer = new DataContainer();
+
+        int zoneProcessor = PHMPI::GetZoneProcessorID(iZone);
+
+        if (currentProcessor == serverProcesspr)
+        {
+            ReadFile(file, dataContainer);
+        }
+
+        PHMPI::PH_Trade(dataContainer, serverProcesspr, zoneProcessor, iZone);
+
+        if (currentProcessor == zoneProcessor)
+        {
+            UnstructGridCast(GetGrid(iZone, 0))->Decode(dataContainer, 1);
+        }
+
+        delete dataContainer;
+    }
+
+    if (currentProcessor == serverProcesspr)
+    {
+        CloseFile(file);
+    }
+}
+
+void Region::ReadStructuredOversetGrid()
+{
+    using namespace PHMPI;
+
+    int nZones = GetNumberofGlobalZones();
+
+    PHMPI::CreateZoneStartPointContainer(nZones);
+
+    PHMPI::CreateZoneStartCenterContainer(nZones);
+
+    string linkFileName = PHSPACE::GlobalDataBase::GetStrParaFromDB("linkFileName");
+
+    ReadGridTopologyData(linkFileName);    //! Only server mode is considered here.
+
+    return;
+}
+
+void Region::ReadGridTopologyData(const string &fileName)
+{
+    using namespace PHMPI;
+    int *zoneStartPointContainer  = PHMPI::GetZoneStartPointContainer();
+    int *zoneStartCenterContainer = PHMPI::GetZoneStartCenterContainer();
+
+    int serverProcessorIndex = GetServerProcessorID();
+    fstream file;
+    int globalZoneNumber, globalPointNumber, globalCenterNumber;
+    int **linkMap = new int * [3];
+
+    ParallelOpenFile(file, fileName, ios_base::in|ios_base::binary);
+    PH_ReadBcastInteger(file, &globalZoneNumber, 1, serverProcessorIndex);
+    PH_ReadBcastInteger(file, zoneStartPointContainer, globalZoneNumber, serverProcessorIndex);
+
+    PH_ReadBcastInteger(file, &globalPointNumber, 1, serverProcessorIndex);
+
+    for (int iDirection = 0; iDirection < 3; ++iDirection)
+    {
+        linkMap[iDirection] = new int [globalPointNumber];
+        
+        PH_ReadBcastInteger(file, linkMap[iDirection], globalPointNumber, serverProcessorIndex);
+    }
+
+    GenerateGlobalBinaryTree(zoneStartPointContainer, globalZoneNumber, globalPointNumber);
+
+    PH_ReadBcastInteger(file, zoneStartCenterContainer, globalZoneNumber, serverProcessorIndex);
+    PH_ReadBcastInteger(file, &globalCenterNumber, 1, serverProcessorIndex);
+
+    int *characterPointContainer = new int [globalCenterNumber];
+    RDouble *cellCenterXContainer = new RDouble [globalCenterNumber];
+    RDouble *cellCenterYContainer = new RDouble [globalCenterNumber];
+    RDouble *cellCenterZContainer = new RDouble [globalCenterNumber];
+
+    PH_ReadBcastInteger(file, characterPointContainer, globalCenterNumber, serverProcessorIndex);
+    PH_ReadBcastDouble(file, cellCenterXContainer, globalCenterNumber, serverProcessorIndex);
+    PH_ReadBcastDouble(file, cellCenterYContainer, globalCenterNumber, serverProcessorIndex);
+    PH_ReadBcastDouble(file, cellCenterZContainer, globalCenterNumber, serverProcessorIndex);
+
+    ParallelCloseFile(file);
+
+    for (int iZone = 0; iZone < globalZoneNumber; ++ iZone)
+    {
+        Grid *gridIn = PHSPACE::GetGrid(iZone);
+
+        if (!gridIn) continue;
+
+        StructGrid *grid = PHSPACE::StructGridCast(gridIn);
+        grid->SetZoneStartPointLabel(zoneStartPointContainer[iZone]);
+
+        grid->CreateLinkPointStructure();
+
+        for (int iDirection = 0; iDirection < 3; ++ iDirection)
+        {
+            int *iLabel = &linkMap[iDirection][zoneStartPointContainer[iZone]];
+            grid->SetLinkPointLabel(iLabel, iDirection);
+        }
+
+        grid->SetZoneStartCenterLabel(zoneStartCenterContainer[iZone]);
+
+        grid->CreateCoreParameterContainer();
+
+        int *iLabel = &characterPointContainer[zoneStartCenterContainer[iZone]];
+        grid->SetHingedPointContainer(iLabel);
+
+        RDouble *xLabel = &cellCenterXContainer[zoneStartCenterContainer[iZone]];
+        grid->SetCoreCoordinateContainer(xLabel, 0);
+
+        RDouble *yLabel = &cellCenterYContainer[zoneStartCenterContainer[iZone]];
+        grid->SetCoreCoordinateContainer(yLabel, 1);
+
+        RDouble *zLabel = &cellCenterZContainer[zoneStartCenterContainer[iZone]];
+        grid->SetCoreCoordinateContainer(zLabel, 2);
+    }
+
+    for (int iDirection = 0; iDirection < 3; ++ iDirection)
+    {
+        delete [] linkMap[iDirection];
+    }
+
+    delete [] linkMap;
+    delete [] characterPointContainer;
+    delete [] cellCenterXContainer;
+    delete [] cellCenterYContainer;
+    delete [] cellCenterZContainer;
+
+    linkMap = NULL;
+    characterPointContainer = NULL;
+    cellCenterXContainer = NULL;
+    cellCenterYContainer = NULL;
+    cellCenterZContainer = NULL;
+}
+
+void Region::DeleteLabelContainer()
+{
+    using namespace PHMPI;
+
+    DeleteGlobalBinaryTree();
+
+    DeleteZoneStartPointContainer();
+
+    DeleteZoneStartCenterContainer();
+
+    return;
+}
+
+LIB_EXPORT void Region::ReadOversetGrid()
+{
+    ReadUnstructuredOversetGrid();
+}
+
+LIB_EXPORT void Region::SetOversetGrid()
+{
+    using namespace PHMPI;
+
+    int nLocalZones = GetNumberofLocalZones();
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+        Grid *grid = GetGrid(zoneID, 0);
+        if (!grid) continue;
+        if (grid->Type() == UNSTRUCTGRID) continue;
+        StructGridCast(grid)->CopyOversetFromUnstructGrid();
+    }
+}
+
+void Region::GetZoneLayoutInformation(vector< string > &gridfilelist)
+{
+    numberOfTotalZones = 0;
+    for (std::size_t ifile = 0; ifile < gridfilelist.size(); ++ ifile)
+    {
+        GetZoneLayoutInformation(gridfilelist[ifile]);
+
+        if (PHMPI::IsParallelRun())
+        {
+            //! For self mode, only read the first file to get number of zones.
+            break;
+        }
+    }
+
+    PrintToWindow("Number Of Total Zones = ", numberOfTotalZones, "\n");
+}
+
+void Region::GetZoneLayoutInformation(const string &filename)
+{
+    fstream file;
+    //ParallelOpenFile(file, filename, ios_base::in|ios_base::binary);
+    OpenSerialFile(file, filename, ios_base::in|ios_base::binary);
+
+    ReadNumberOfZones(file);
+
+    ParallelCloseFile(file);
+}
+
+void Region::ReadNumberOfZones(fstream &file)
+{
+    using namespace PHMPI;
+
+    int file_proc;
+    GetFileProc(file_proc);
+
+    int nzones = 0;
+    PH_Read_Bcast(file, &nzones, sizeof(int), file_proc);
+
+    numberOfTotalZones += nzones;
+}
+
+void Region::AllocateZoneLayoutInformation()
+{
+    using namespace PHMPI;
+
+    SetNumberOfGlobalZones(numberOfTotalZones);
+
+    CreateZoneProcessorIDDump(numberOfTotalZones);
+    CreateZoneProcessorID(numberOfTotalZones);
+    CreateZoneGridID     (numberOfTotalZones);
+    CreateZoneGridType   (numberOfTotalZones);
+    CreateZoneFileID     (numberOfTotalZones);
+}
+
+void Region::ReadOversetGrid(const string &filename)
+{
+    using namespace PHMPI;
+
+    fstream file;
+    ParallelOpenFile(file, filename, ios_base::in|ios_base::binary);
+
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ReadSingleOversetGrid(file, iZone);
+    }
+
+    ParallelCloseFile(file);
+}
+
+void Region::ReadGrid(fstream &file)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ReadSingleGrid(file, iZone);
+    }
+}
+
+void Region::AllocateOversetGrid()
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+        Grid *grid = GetGrid(zoneID, 0);
+        if (!grid) continue;
+        grid->AllocateOversetGrid();
+    }
+}
+
+void Region::AddUnStructInfoToStructGrid()
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+    Grid **gridArray = new Grid * [nLocalZones];
+    for (int iZone = 0; iZone < nLocalZones; iZone ++)
+    {
+        int zoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+        gridArray[iZone] = GetGrid(zoneID, 0);
+    }
+
+    Pre_StructToUnstruct *StructToUnstruct = new Pre_StructToUnstruct(gridArray, nLocalZones);
+    StructToUnstruct->Run();
+    Grid **unstructGridArray = StructToUnstruct->GetUnstructGrids();
+    for (int iZone = 0; iZone < nLocalZones; iZone ++)
+    {
+        Grid *grid = gridArray[iZone];
+        if (grid->Type() != STRUCTGRID) continue;
+        StructGrid *strGrid = StructGridCast(grid);
+        UnstructGrid *unstrGrid = UnstructGridCast(unstructGridArray[iZone]);
+        strGrid->SetUnstrGrid(unstrGrid);
+        strGrid->GetUnstrGrid()->ComputeMetrics();
+    }
+}
+
+void Region::ReadSingleOversetGrid(fstream &file, int iZone)
+{
+    using namespace PHMPI;
+
+    int send_proc = 0;
+    int recv_proc = 0;
+
+    GetSendRecvProc(iZone, send_proc, recv_proc);
+
+    int myid = GetCurrentProcessorID();
+
+    //! If the process neither sends nor receives, it will return.
+    if (myid != send_proc && myid != recv_proc) return;
+
+    DataContainer *cdata = new DataContainer();
+
+    //! Read grid file ,and send to the corresponding process.
+    ReadAbstractData(file, cdata, send_proc, recv_proc);
+
+    if (myid == recv_proc)
+    {
+        Grid *grid = GetGrid(iZone, 0);
+        grid->Decode(cdata, 1);
+    }
+
+    delete cdata;
+}
+
+void Region::CreateZonesFromGridReader(IO_GridReader *gridReader)
+{
+    numberOfTotalZones = gridReader->GetNumberofGlobalZones();
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < numberOfTotalZones; ++ iZone)
+    {
+        int send_proc = 0;
+        int recv_proc = 0;
+        GetSendRecvProc(iZone, send_proc, recv_proc);
+
+        if (myid != send_proc && myid != recv_proc)
+        {
+            AddZone(0);
+            continue;
+        }
+
+        if (myid == recv_proc)
+        {
+            Zone *zone = new Zone(iZone);
+            Grid *grid = gridReader->GetGrid(iZone);
+            int nLocalZones = PHMPI::GetNumberofLocalZones();
+            grid->GetGridID()->SetLocalIndex(nLocalZones);
+
+            zone->AddGridAndCopyZonePara(grid);
+            zone->AddGridToGlobal(iZone);
+            AddZone(zone);
+        }
+        else 
+        {
+            //myid == sendproc myid != recv_proc
+            AddZone(0);
+        }
+    }
+}
+
+void Region::ExcangeProcessorIDForGridProcessor()
+{
+    using namespace PHMPI;
+
+    int *block_procs      = GetZoneProcessorID();
+    int *block_procs_grid = GetZoneProcessorIDForGrid();
+
+    if (PHMPI::CurrentProcessorIsGridProcessor())
+    {
+        int nZones = GetNumberofGlobalZones();
+
+        SetField(block_procs, block_procs_grid, nZones);
+    }
+}
+
+void Region::CreateZonesFromGridGroups(IO_GridReader *gridReader)
+{
+    //ExcangeProcessorIDForGridProcessor();
+
+    using namespace PHMPI;
+
+    int myid = GetCurrentProcessorID();
+
+    vector< GridGroup * > &gridGroups = gridReader->GetGridGroups();
+
+    uint_t numberOfGridGroups = gridGroups.size();
+
+    int zoneStart = 0;
+
+    for (int iGroup = 0; iGroup < numberOfGridGroups; ++ iGroup)
+    {
+        GridGroup *gridGroup = gridGroups[iGroup];
+
+        int nZones = gridGroup->GetNZones();
+
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            int globalZoneIndex = zoneStart + iZone;
+
+            int recv_proc      = GetZoneProcessorID(globalZoneIndex);
+            int recv_proc_grid = GetZoneProcessorIDForGrid(globalZoneIndex);
+
+            if (myid == recv_proc || myid == recv_proc_grid)
+            {
+                Zone *zone = new Zone(globalZoneIndex);
+
+                Grid *grid = gridGroup->GetGrid(iZone);
+
+                int nLocalZones = PHMPI::GetNumberofLocalZones();
+
+                grid->GetGridID()->SetLocalIndex(nLocalZones);
+
+                zone->AddGridAndCopyZonePara(grid);
+
+                zone->AddGridToGlobal(globalZoneIndex);
+
+                AddZone(zone);
+            }
+            else
+            {
+                AddZone(0);
+                continue;
+            }
+        }
+        zoneStart += nZones;
+    }
+}
+
+void Region::CreateZoneAndGrid(int iZone)
+{
+    using namespace PHMPI;
+
+    int send_proc = 0;
+    int recv_proc = 0;
+
+    GetSendRecvProc(iZone, send_proc, recv_proc);
+
+    int myid = GetCurrentProcessorID();
+
+    //! If the process neither sends nor receives, it will return.
+    if (myid != send_proc && myid != recv_proc)
+    {
+        //! There is no problem here,but the design is ReadGrid to add zone,so it is responsible here.
+        AddZone(0);
+        return;
+    }
+
+    if (myid == recv_proc)
+    {
+        Zone *zone = new Zone(iZone);
+        Grid *grid = CreateGridGeneral(GetZoneGridType(iZone), new GridID(iZone, PHMPI::GetNumberofLocalZones()), 0, GetDim());
+
+        zone->AddGridAndCopyZonePara(grid);
+        zone->AddGridToGlobal(iZone);
+        AddZone(zone);
+    }
+    else //myid == sendproc myid != recv_proc
+    {
+        AddZone(0);
+    }
+}
+
+void Region::InterpretDataToGrid(DataContainer *cdata, int iZone)
+{
+    using namespace PHMPI;
+
+    int send_proc = 0;
+    int recv_proc = 0;
+
+    GetSendRecvProc(iZone, send_proc, recv_proc);
+
+    int myid = GetCurrentProcessorID();
+
+    if (myid != recv_proc) return;
+
+    //! Decode the read-in data to grid data.
+    Grid *grid = GetGrid(iZone, 0);
+    
+    grid->Decode(cdata, 0);
+}
+
+LIB_EXPORT void Region::ReviseInterZoneIndexForOverSetGrids(int iZone)
+{
+    using namespace PHMPI;
+
+    int sendProcessorIndex = 0;
+    int receiveProcessorIndex = 0;
+
+    GetSendRecvProc(iZone, sendProcessorIndex, receiveProcessorIndex);
+
+    int currentProcessorIndex = GetCurrentProcessorID();
+
+    if (currentProcessorIndex != receiveProcessorIndex) return;
+
+    //! Decode the read-in data to grid data.
+    Grid *grid = PHSPACE::GetGrid(iZone, 0);
+
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+
+    if (!interfaceInfo)
+    {
+        return;
+    }
+
+    int nmberOfInterfaces = interfaceInfo->GetNIFace();
+
+    int *NeighborZoneIndexContainer = interfaceInfo->GetInterFace2ZoneID();
+
+    for (int iInterface = 0; iInterface < nmberOfInterfaces; ++ iInterface)
+    {
+        NeighborZoneIndexContainer[iInterface] += zoneStart;
+    }
+}
+
+void Region::RecoverGridFromFile(fstream &file, int iZone)
+{
+    using namespace PHMPI;
+
+    int send_proc = 0;
+    int recv_proc = 0;
+
+    GetSendRecvProc(iZone, send_proc, recv_proc);
+
+    DataContainer *cdata = new DataContainer();
+
+    //! Read grid file, and send to the corresponding process.
+    //! Read in nlen and the remaining file content.
+
+    ReadAbstractData(file, cdata, send_proc, recv_proc);
+
+    InterpretDataToGrid(cdata, iZone);
+
+    delete cdata;
+}
+
+LIB_EXPORT void Region::ReadSingleGrid(fstream &file, int iZone)
+{
+    CreateZoneAndGrid(iZone);
+    RecoverGridFromFile(file, iZone);
+    ReviseInterZoneIndexForOverSetGrids(iZone);
+}
+
+LIB_EXPORT void Region::ClassifyGridSystem()
+{
+    using namespace PHMPI;
+
+    int nZones = GetNumberofGlobalZones();
+
+    set<int> grid_type;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        grid_type.insert(GetZoneGridType(iZone));
+    }
+
+    int sys_gridtype = GetSystemGridType(grid_type);
+    GlobalDataBase::UpdateData("sys_gridtype", &sys_gridtype, PHINT, 1);
+
+    vector<string> sys_gridtype_name;
+    sys_gridtype_name.push_back("UNSTRUCTGRID");
+    sys_gridtype_name.push_back("STRUCTGRID");
+    sys_gridtype_name.push_back("MIXGRID");
+
+    PrintToWindow("Grid Type: ", sys_gridtype_name[sys_gridtype], "\n");
+}
+
+void Region::InitVariableWallTemperature()
+{
+    string wallTemperatureFile = "";
+    GlobalDataBase::GetData("wallTemperaturefile", &wallTemperatureFile, PHSTRING, 1);
+
+    int metabolicWallTemperature = 0;
+    GlobalDataBase::UpdateData("metabolicWallTemperature", &metabolicWallTemperature, PHINT, 1);
+
+    if (wallTemperatureFile == "")
+    {
+        return;
+    }
+
+    if (!FileExist(wallTemperatureFile))
+    {
+        return;
+    }
+
+    metabolicWallTemperature = 1;
+    GlobalDataBase::UpdateData("metabolicWallTemperature", &metabolicWallTemperature, PHINT, 1);
+
+    PrintToWindow("\n  Temperature file exist, read wall temperature file!\n\n");
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    int myid = GetCurrentProcessorID();
+
+    for (int iZone =  0; iZone < nZones; ++ iZone)
+    {
+        int zoneProc = GetZoneProcessorID(iZone);
+        if (myid == zoneProc)
+        {
+            Grid *grid = GetGrid(iZone);
+            grid->InitVariableWallTemperature();
+        }
+    }
+
+    RDouble wallTemperature = -1;
+    GlobalDataBase::GetData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+    if (wallTemperature < 0.0)
+    {
+        wallTemperature = 288.0;
+        GlobalDataBase::UpdateData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+    }
+}
+
+LIB_EXPORT void Region::DataMonitor()
+{
+    if (!GlobalDataBase::IsExist("ifSetDataMonitor", PHINT, 1))
+    {
+        return;
+    }
+
+    int ifSetDataMonitor = 0;
+    GlobalDataBase::GetData("ifSetDataMonitor", &ifSetDataMonitor, PHINT, 1);
+    if (!ifSetDataMonitor) return;
+
+    SampleLocationInfo *globalSampleLocation = new SampleLocationInfo();
+    globalSampleLocation->Run();
+}
+
+LIB_EXPORT void Region::SetupMultiBlockRelationship()
+{
+    MultiBlocksInterface();
+
+    MultiBlocksInterpoint();
+
+    //! Changed by Guo Yongheng 20160825.
+    //MultiBlocksOverInterface();
+}
+
+void Region::MultiBlocksInterface()
+{
+    InitZoneNeighborsInformation();
+    SwapZoneNeighborsInformation();
+}
+
+void Region::MultiBlocksInterpoint()
+{
+    if (zoneConnectivityForPoint)
+    {
+        InitZoneNeighborsForPointInformation();
+        SwapZoneNeighborsForPointInformation();
+    }
+}
+
+void Region::MultiBlocksOverInterface()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    zone_over_link.resize(nZones);
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Zone *zone = GetZone(iZone);
+        if (!zone) continue;
+
+        OversetInfoProxy *oversetInfoProxy = GetOversetInfoProxy(iZone, 0);
+        if (oversetInfoProxy == 0) continue;
+
+        vector<int> &neighborZoneIndexArray = oversetInfoProxy->GetNeighborZoneIndexArray();
+
+        //! zone_over_link[iZone][j] means the neighbor zones of iZone, zone numbers in ascending order.
+        zone_over_link[iZone] = neighborZoneIndexArray;
+    }
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int proc = GetZoneProcessorID(iZone);
+
+        //! Get the number of neighbor zone of zone_over_link[iZone].
+        int numberOfNeighbor = static_cast<int>(zone_over_link[iZone].size());
+
+        //! If it is parallel,exchange numberOfNeighbor, otherwise do nothing.
+        PH_Bcast(&numberOfNeighbor, sizeof(int), proc, iZone);
+
+        //! Set the zone_over_link[iZone] size to numberOfNeighbor, and do nothing if serial.
+        zone_over_link[iZone].resize(numberOfNeighbor);
+
+        //! When numberOfNeighbor = 0, zone_over_link[iZone][0] will cross the border.
+        if (numberOfNeighbor <= 0) continue;
+
+        //! If it is parallel,exchange zone_over_link[iZone], otherwise do nothing.
+        PH_Bcast(&zone_over_link[iZone][0], numberOfNeighbor*sizeof(int), proc, iZone);
+    }
+}
+
+void Region::InitZoneNeighborsInformation()
+{
+    //! These codes find all the neighbor zones of each zone, if this block has interface boundary.
+    //! Here the neighbors also include this zone itself.
+    //! Finally,the zone numbers of all neighbors are stored in zoneid according to ascending order.
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    zoneConnectivity = new ZoneConnectivity();
+    zoneConnectivity->CreateAllZones(nZones);
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Zone *zone = GetZone(iZone);
+        if (!zone) continue;
+
+        InterfaceInfo *interfaceInfo = GetInterfaceInfo(iZone, 0);
+
+        if (!interfaceInfo) continue;
+        interfaceInfo->InitNeighbors();
+    }
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Zone *zone = GetZone(iZone);
+        if (!zone) continue;
+
+        InterfaceInfo *interfaceInfo = GetInterfaceInfo(iZone, 0);
+        if (!interfaceInfo) continue;
+
+        int numberOfNeighbor = interfaceInfo->GetNumberOfNeighbor();
+
+        ZoneNeighbor *zoneNeighbor = zoneConnectivity->GetZoneNeighbor(iZone);
+
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            //! zoneNeighbor stores the neighbor zones of iZone,zone numbers in ascending order.
+            zoneNeighbor->AddZoneIndexOfNeighbor(interfaceInfo->GetZoneIndexOfNeighbor(iNeighbor));
+        }
+    }
+}
+
+void Region::InitZoneNeighborsForPointInformation()
+{
+    //! These codes find all the neighbor zones of each zone,it is not just interface information here,but also concurrent information.
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    //zoneConnectivityForPoint = new ZoneConnectivityForPoint();
+    zoneConnectivityForPoint->CreateAllZones(nZones);
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Zone *zone = GetZone(iZone);
+        if (!zone)
+        {
+            continue;
+        }
+        InterpointInformation *interpointInformation = GetInterpointInfo(iZone, 0);
+
+        if (interpointInformation == 0)
+        {
+            continue;
+        }
+            interpointInformation->InitNeighbors();
+    }
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Zone *zone = GetZone(iZone);
+        if (! zone)
+        {
+            continue;
+        }
+        InterpointInformation *interpointInformation = GetInterpointInfo(iZone, 0);
+        if (interpointInformation == 0)
+        {
+            continue;
+        }
+        int numberOfNeighbor = interpointInformation->GetNumberOfNeighbor();
+
+        ZoneNeighbor *zoneNeighborForPoint = zoneConnectivityForPoint->GetZoneNeighborForPoint(iZone);
+
+        for (int ineighbor = 0; ineighbor < numberOfNeighbor; ++ ineighbor)
+        {
+            //! zoneNeighbor stores the neighbor zones of iZone,zone numbers in ascending order.
+            zoneNeighborForPoint->AddZoneIndexOfNeighbor(interpointInformation->GetZoneIndexOfNeighbor(ineighbor));
+        }
+    }
+}
+
+void Region::GetProcessorZones(int iZone, ZoneNeighbor *zoneNeighbor, vector< int > *neighborProcessors, vector< set< int > > *processorZones)
+{
+    using namespace PHMPI;
+    uint_t numberOfNeighbor = zoneNeighbor->GetNumberOfNeighbor();
+
+    //! Insert the neighbor processors into set, 
+    //! including itself if the neighbor zone belong to the same processor.
+    // int currentProcessor = GetZoneProcessorID(iZone); 
+    set< int > neighborProcessorsList;
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+    {
+        int neighborZoneIndex = zoneNeighbor->GetZoneIndexOfNeighbor(iNeighbor);
+        int neighborProcessor = GetZoneProcessorID(neighborZoneIndex);
+
+        neighborProcessorsList.insert(neighborProcessor);
+    }
+
+    int numberOfNeighborProcessors = static_cast<int>(neighborProcessorsList.size());
+    processorZones->resize(numberOfNeighborProcessors);
+    neighborProcessors->resize(numberOfNeighborProcessors);
+
+    int count = 0;
+    for (set< int >::iterator iter = neighborProcessorsList.begin(); iter != neighborProcessorsList.end(); ++ iter)
+    {
+        (*neighborProcessors)[count ++] = *iter;
+    }
+
+    //! Construct the zones belong to each neighbor processor.
+    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+    {
+        int neighborZoneIndex = zoneNeighbor->GetZoneIndexOfNeighbor(iNeighbor);
+        int neighborProcessor = GetZoneProcessorID(neighborZoneIndex);
+
+        int iNeighborProc = -1;
+        for (int iProc = 0; iProc < numberOfNeighborProcessors; ++ iProc)
+        {
+            if ((* neighborProcessors)[iProc] == neighborProcessor)
+            {
+                iNeighborProc = iProc;
+                break;
+            }
+        }
+        
+        (*processorZones)[iNeighborProc].insert(neighborZoneIndex);
+    }
+}
+
+void Region::BroadcastZoneNeighborInformationCollectBcast()
+{
+    WriteLogFile("Start broadcasting neighbor information to each zones by collect-bcast method ... ");
+
+    //*********************************************************//
+    // Step1: collection from each other processors by server.
+    //*********************************************************//
+    ServerCollectionNeighborInfor();
+
+    //*********************************************************//
+    // Step2: broadcasting to each other processors by server.
+    //*********************************************************//
+    ServerBcastNeighborInfor();
+
+    //*********************************************************//
+    // Step3: delete the neighbor zone information that have 
+    //        nothing to do with the current zones.
+    //*********************************************************//
+    CleanNeighborInfor();
+
+    WriteLogFile("End broadcasting neighbor information to each zones ... ");
+}
+
+void Region::ServerCollectionNeighborInfor()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    int serverTmp = GetServerProcessorID();
+    int myid   = GetCurrentProcessorID();
+    int number_of_processor = GetNumberOfProcessor();
+
+    //! Grid processors do not send information to server.
+    if (PHMPI::CurrentProcessorIsGridProcessor())
+    {
+        return;
+    }
+
+    DataContainer *cdata = new DataContainer();
+    cdata->moveto_begin();
+
+    //! Write the number of zones in this processor.
+    int nZonesInThisProc = 0;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int proc = GetZoneProcessorID(iZone);
+        if (myid == proc)
+        {
+            ++ nZonesInThisProc;
+        }
+    }
+    PHWrite(cdata, nZonesInThisProc);
+
+    //! Compress all of neighbor information into data-container.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int proc = GetZoneProcessorID(iZone);
+
+        if (myid == proc)
+        {
+            PHWrite(cdata, &iZone, 1);
+
+            ZoneNeighbor *zoneNeighbor = zoneConnectivity->GetZoneNeighbor(iZone);
+            int numberOfNeighbor = zoneNeighbor->GetNumberOfNeighbor();
+
+            PHWrite(cdata, &numberOfNeighbor, 1);
+
+            if (numberOfNeighbor <= 0) continue;
+
+            int *neighborZoneIndex = zoneNeighbor->GetZoneIndexOfNeighbor();
+            PHWrite(cdata, neighborZoneIndex, numberOfNeighbor);
+        }
+    }
+
+    //! Send the data-container to server.
+    if (myid != serverTmp)
+    {
+        int tag = myid;
+        send(cdata, serverTmp, tag);
+    }
+    else
+    {
+        for (int iProc = 0; iProc < number_of_processor; ++ iProc)
+        {
+            int tag = iProc;
+
+            if (myid != iProc)
+            {
+                receive(cdata, iProc, tag);
+            }
+
+            int nZonesInProc;
+            cdata->moveto_begin();
+            PHRead(cdata, &nZonesInProc, 1);
+            for (int iZone = 0; iZone < nZonesInProc; ++ iZone)
+            {
+                int zoneIndex;
+                PHRead(cdata, &zoneIndex, 1);
+
+                int numberOfNeighbor;
+                PHRead(cdata, &numberOfNeighbor, 1);
+
+                ZoneNeighbor *zoneNeighbor = zoneConnectivity->GetZoneNeighbor(zoneIndex);
+                zoneNeighbor->SetNumberOfNeighbor(numberOfNeighbor);
+
+                if (numberOfNeighbor <= 0) continue;
+
+                int *neighborZoneIndex = zoneNeighbor->GetZoneIndexOfNeighbor();
+                PHRead(cdata, neighborZoneIndex, numberOfNeighbor);
+            }
+
+            delete cdata;
+            cdata = new DataContainer();
+        }
+    }
+    delete cdata;
+}
+
+void Region::ServerBcastNeighborInfor()
+{
+    using namespace PHMPI;
+    int number_of_processor = GetNumberOfProcessor();
+    if (number_of_processor <= 1) return;
+
+    int tag = 0;
+    int nZones = GetNumberofGlobalZones();
+    int serverTmp = GetServerProcessorID();
+    int myid   = GetCurrentProcessorID();
+
+    DataContainer *cdata = new DataContainer();
+
+    if (myid == serverTmp)
+    {
+        cdata->moveto_begin();
+
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            ZoneNeighbor *zoneNeighbor = zoneConnectivity->GetZoneNeighbor(iZone);
+            int numberOfNeighbor = zoneNeighbor->GetNumberOfNeighbor();
+
+            PHWrite(cdata, &numberOfNeighbor, 1);
+
+            if (numberOfNeighbor <= 0) continue;
+
+            int *neighborZoneIndex = zoneNeighbor->GetZoneIndexOfNeighbor();
+            PHWrite(cdata, neighborZoneIndex, numberOfNeighbor);
+        }
+    }
+
+    PH_BcastByServerToClinet(cdata, 2, tag);
+
+    if (myid != serverTmp)
+    {
+        cdata->moveto_begin();
+
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            int numberOfNeighbor;
+            PHRead(cdata, &numberOfNeighbor, 1);
+
+            ZoneNeighbor *zoneNeighbor = zoneConnectivity->GetZoneNeighbor(iZone);
+            zoneNeighbor->SetNumberOfNeighbor(numberOfNeighbor);
+
+            if (numberOfNeighbor <= 0) continue;
+
+            int *neighborZoneIndex = zoneNeighbor->GetZoneIndexOfNeighbor();
+            PHRead(cdata, neighborZoneIndex, numberOfNeighbor);
+        }
+    }
+
+    delete cdata;
+}
+
+void Region::CleanNeighborInfor()
+{
+    using namespace PHMPI;
+    int number_of_processor = GetNumberOfProcessor();
+    if (number_of_processor <= 1) return;
+
+    int nZones = GetNumberofGlobalZones();
+    int myid   = GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int proc = GetZoneProcessorIDSepMode(iZone);
+        if (proc == myid) continue;
+
+        ZoneNeighbor *zoneNeighbor = zoneConnectivity->GetZoneNeighbor(iZone);
+        uint_t numberOfNeighbor = zoneNeighbor->GetNumberOfNeighbor();
+
+        bool isNeighbor = false;
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int zoneIndexOfNeighbor = zoneNeighbor->GetZoneIndexOfNeighbor(iNeighbor);
+            int neighborProc = GetZoneProcessorIDSepMode(zoneIndexOfNeighbor);
+            if (neighborProc == myid)
+            {
+                isNeighbor = true;
+                break;
+            }
+        }
+        if (!isNeighbor)
+        {
+            zoneNeighbor->SetNumberOfNeighbor(0);
+        }
+    }
+}
+
+void Region::BroadcastZoneNeighborInformation()
+{
+    //! This is old code.
+    bool isStructuredGrid = false;
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        if (GetZone(iZone))
+        {
+            if (GetZone(iZone)->GetGeometry()->GetGrid()->Type() == STRUCTGRID)
+            {
+                isStructuredGrid = true;
+                break;
+            }
+        }
+    }
+
+    int isOverset = PHSPACE::GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+    int sysGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if (isOverset && sysGridType != STRUCTGRID)
+    {
+        BroadcastZoneNeighborInformationCollectBcast();
+    }
+    else
+    {
+        SwapZoneConnectivityBetweenNeighborZones();
+    }
+}
+
+void Region::BroadcastZoneNeighborForPointInformation()
+{
+    int isOverset = PHSPACE::GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+    int sysGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if (isOverset && sysGridType != STRUCTGRID)
+    {
+    }
+    else
+    {
+        SwapZoneConnectivityForPointBetweenNeighborZones();
+    }
+}
+void Region::BroadcastZoneNeighborInformationToEachProcessor()
+{
+    WriteLogFile("Start broadcasting neighbor information to each zones by old method... ");
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int proc = GetZoneProcessorID(iZone);
+
+        ZoneNeighbor *zoneNeighbor = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = zoneNeighbor->GetNumberOfNeighbor();
+
+        //! If it is parallel,exchange numberOfNeighbor, otherwise do nothing.
+        PH_Bcast(&numberOfNeighbor, sizeof(int), proc, iZone);
+
+        //! Set the zoneNeighbor data  size to numberOfNeighbor, and do nothing if serial.
+        zoneNeighbor->SetNumberOfNeighbor(numberOfNeighbor);
+
+        //! When numberOfNeighbor = 0,it will cross the border.
+        if (numberOfNeighbor <= 0) continue;
+
+        //! If it is parallel,exchange zoneNeighbor, otherwise do nothing.
+        int *neighborZoneIndex = zoneNeighbor->GetZoneIndexOfNeighbor();
+        PH_Bcast(neighborZoneIndex, numberOfNeighbor*sizeof(int), proc, iZone);
+    }
+
+    WriteLogFile("End broadcasting neighbor information to each zones ... ");
+}
+
+void Region::BroadcastZoneNeighborInformationToNeighborZones()
+{
+    WriteLogFile("Start broadcasting neighbor information to neighbor zones ... ");
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    int sizeOfInt = sizeof(int);
+    int tag = 0;
+    for (int zoneIndex = 0; zoneIndex < nZones; ++ zoneIndex)
+    {
+        if (!GetZone(zoneIndex)) continue;
+        
+        int currentZoneIndex = zoneIndex;
+
+        ZoneNeighbor *zoneNeighborOfCurrentZone = zoneConnectivity->GetZoneNeighbor(zoneIndex);
+        uint_t numberOfNeighborZones = zoneNeighborOfCurrentZone->GetNumberOfNeighbor();
+        int *neighborZonesOfCurrentZone = zoneNeighborOfCurrentZone->GetZoneIndexOfNeighbor();
+
+        //! Find the mid-zone.
+        int midN, iZone;
+        for (iZone = 0; iZone < numberOfNeighborZones; ++ iZone)
+        {
+            if (zoneNeighborOfCurrentZone->GetZoneIndexOfNeighbor(iZone) >= currentZoneIndex)
+            {
+                break;
+            }
+        }
+        midN = iZone;
+        
+        //! Part1: receiving messages from neighbors with zone number less than myZone-1.
+        for (int iNeighbor = 0; iNeighbor < midN; ++ iNeighbor)
+        {
+            int neighborZoneIndex  = zoneNeighborOfCurrentZone->GetZoneIndexOfNeighbor(iNeighbor);
+            int sendProcessorIndex = GetZoneProcessorID(neighborZoneIndex);
+
+            ZoneNeighbor *zoneNeighborOfNeighborZone = zoneConnectivity->GetZoneNeighbor(neighborZoneIndex);
+            int size;
+            PH_Receive(&size, 1 * sizeOfInt, sendProcessorIndex, tag);
+            zoneNeighborOfNeighborZone->SetNumberOfNeighbor(size);
+
+            int *neighborZonesOfNeighborZone = zoneNeighborOfNeighborZone->GetZoneIndexOfNeighbor();
+            PH_Receive(neighborZonesOfNeighborZone, size * sizeOfInt, sendProcessorIndex, tag);
+        }
+
+        //! Part2: sending messages to neighbors with zone number big than myZone-1.
+        if (midN < numberOfNeighborZones)
+        {
+            for (int iNeighbor = midN; iNeighbor < numberOfNeighborZones; ++ iNeighbor)
+            {
+                int neighborZoneIndex     = zoneNeighborOfCurrentZone->GetZoneIndexOfNeighbor(iNeighbor);
+                int receiveProcessorIndex = GetZoneProcessorID(neighborZoneIndex);
+
+                int size = zoneNeighborOfCurrentZone->GetNumberOfNeighbor();
+                PH_Send(&size, 1 * sizeOfInt, receiveProcessorIndex, tag);
+                PH_Send(neighborZonesOfCurrentZone, size * sizeOfInt, receiveProcessorIndex, tag);
+            }
+        }
+
+        //! Part3: receiving messages from neighbors with zone number big than myZone-1.
+        for (int iNeighbor = midN; iNeighbor < numberOfNeighborZones; ++ iNeighbor)
+        {
+            int neighborZoneIndex  = zoneNeighborOfCurrentZone->GetZoneIndexOfNeighbor(iNeighbor);
+            int sendProcessorIndex = GetZoneProcessorID(neighborZoneIndex);
+
+            ZoneNeighbor *zoneNeighborOfNeighborZone = zoneConnectivity->GetZoneNeighbor(neighborZoneIndex);
+            int size;
+            PH_Receive(&size, 1 * sizeOfInt, sendProcessorIndex, tag);
+            zoneNeighborOfNeighborZone->SetNumberOfNeighbor(size);
+
+            int *neighborZonesOfNeighborZone = zoneNeighborOfNeighborZone->GetZoneIndexOfNeighbor();
+            PH_Receive(neighborZonesOfNeighborZone, size * sizeOfInt, sendProcessorIndex, tag);
+        }
+
+        //! Part4: sending messages to neighbors with zone number less than myZone-1.
+        if (midN > 0)
+        {
+            for (int iNeighbor = 0; iNeighbor < midN; ++ iNeighbor)
+            {
+                int neighborZoneIndex     = zoneNeighborOfCurrentZone->GetZoneIndexOfNeighbor(iNeighbor);
+                int receiveProcessorIndex = GetZoneProcessorID(neighborZoneIndex);
+
+                int size = zoneNeighborOfCurrentZone->GetNumberOfNeighbor();
+                PH_Send(&size, 1 * sizeOfInt, receiveProcessorIndex, tag);
+                PH_Send(neighborZonesOfCurrentZone, size * sizeOfInt, receiveProcessorIndex, tag);
+            }
+        }
+    }
+
+    WriteLogFile("End broadcasting neighbor information to neighbor zones ... ");
+}
+
+void Region::SwapZoneConnectivityBetweenNeighborZones()
+{
+    WriteLogFile("Start broadcasting neighbor information to neighbor zones using new method... ");
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    int currentProcessor = GetCurrentProcessorID();
+
+    int sizeOfInt = sizeof(int);
+    int tag = 0;
+    for (int zoneIndex = 0; zoneIndex < nZones;  zoneIndex ++)
+    {
+        //! "This" refers to zoneIndex, "current" refers to information on current processor.
+        ZoneNeighbor *zoneNeighborOfThisZone = zoneConnectivity->GetZoneNeighbor(zoneIndex);
+
+        //! The proc id of this zone.
+        int send_proc = GetZoneProcessorID(zoneIndex);
+
+        //! This zone is on current processor, it may send message to others.
+        if (currentProcessor == send_proc)
+        {
+            int numberOfNeighborZones = zoneNeighborOfThisZone->GetNumberOfNeighbor();
+            //! if this zone do not have neighbor, do nothing.
+            if (numberOfNeighborZones <= 0) continue;
+            int *neighborZonesOfThisZone = zoneNeighborOfThisZone->GetZoneIndexOfNeighbor();
+            set<int> processorHasBeenSend;
+            for (int iNeighbor = 0; iNeighbor < numberOfNeighborZones; iNeighbor ++)
+            {
+                int zoneIndexOfNeighbor = zoneNeighborOfThisZone->GetZoneIndexOfNeighbor(iNeighbor);
+                int recv_proc = GetZoneProcessorID(zoneIndexOfNeighbor);
+                if (send_proc == recv_proc)
+                {
+                    //! This neighborZone is on the same processor of this zone.
+                    continue;
+                }
+                else
+                {
+                    if (processorHasBeenSend.find(recv_proc) == processorHasBeenSend.end())
+                    {
+                        //! One target processor only send once.
+                        processorHasBeenSend.insert(recv_proc);
+                        int size = numberOfNeighborZones;
+                        //WriteLogFile("Send #zone to #proc ", zoneIndex, recv_proc);
+                        PH_Send(&size, 1 * sizeOfInt, recv_proc, tag);
+                        PH_Send(neighborZonesOfThisZone, size * sizeOfInt, recv_proc, tag);
+                    }
+                }
+            }
+        }
+
+        //! Current processor do not contain this zone, but it may contains this zone's neighbor zone.
+        else
+        {
+            int nLocalZones = PHMPI::GetNumberofLocalZones();
+
+            //! Loop all zones on current proc, check if has neighbor zone of zoneIndex.
+            //! If has, receive zoneIndex's zoneNeighbor data.
+            //! But only need receive once.
+            for (int localZoneIndex = 0; localZoneIndex < nLocalZones; localZoneIndex ++)
+            {
+                int currentGlobalZone = GetLocalZoneIDToGlobalZoneID(localZoneIndex);
+                ZoneNeighbor *zoneNeighborOfCurrentZone = zoneConnectivity->GetZoneNeighbor(currentGlobalZone);
+                if (zoneNeighborOfCurrentZone->hasNeighborZone(zoneIndex))
+                {
+                    //WriteLogFile("Receive #Zone from #proc ", zoneIndex, send_proc, true);
+                    int size=0;
+                    PH_Receive(&size, 1 * sizeOfInt, send_proc, tag);
+                    zoneNeighborOfThisZone->SetNumberOfNeighbor(size);
+                    int *neighborZonesOfNeighborZone = zoneNeighborOfThisZone->GetZoneIndexOfNeighbor();
+                    //! No allocate memory? through SetNumberOfNeighbor's resize.
+                    PH_Receive(neighborZonesOfNeighborZone, size * sizeOfInt, send_proc, tag);
+                    break;
+                }
+            }
+        }
+    }
+    WriteLogFile("End broadcasting neighbor information to neighbor zones by new method... ");
+}
+
+void Region::SwapZoneConnectivityForPointBetweenNeighborZones()
+{
+    WriteLogFile("Start broadcasting neighbor information for point ");
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    int currentProcessor = GetCurrentProcessorID();
+
+    int sizeOfInt = sizeof(int);
+    int tag = 0;
+    for (int zoneIndex = 0; zoneIndex < nZones;  zoneIndex ++)
+    {
+        //! "This" refers to zoneIndex, "current" refers to information on current processor.
+        ZoneNeighbor *zoneNeighborOfThisZone = zoneConnectivityForPoint->GetZoneNeighborForPoint(zoneIndex);
+            
+        //! The proc id of this zone.
+        int send_proc = GetZoneProcessorID(zoneIndex);
+
+        //! This zone is on current processor, it may send message to others.
+        if (currentProcessor == send_proc)
+        {
+            int numberOfNeighborZones = zoneNeighborOfThisZone->GetNumberOfNeighbor();
+            //! If this zone do not have neighbor, do nothing.
+            if (numberOfNeighborZones <= 0) continue;
+            int *neighborZonesOfThisZone = zoneNeighborOfThisZone->GetZoneIndexOfNeighbor();
+            set<int> processorHasBeenSend; 
+            for (int iNeighbor = 0; iNeighbor < numberOfNeighborZones; iNeighbor ++)
+            {
+                int zoneIndexOfNeighbor = zoneNeighborOfThisZone->GetZoneIndexOfNeighbor(iNeighbor);
+                int recv_proc = GetZoneProcessorID(zoneIndexOfNeighbor);
+                if (send_proc == recv_proc)
+                {
+                    //! This neighborZone is on the same processor of this zone.
+                    continue;
+                }
+                else
+                {
+                    if (processorHasBeenSend.find(recv_proc) == processorHasBeenSend.end())
+                    {
+                        //! One target processor only send once.
+                        processorHasBeenSend.insert(recv_proc);
+                        int size =  numberOfNeighborZones;
+                        //WriteLogFile("Send #zone to #proc ", zoneIndex, recv_proc);
+                        PH_Send(&size, 1 * sizeOfInt, recv_proc, tag);
+                        PH_Send(neighborZonesOfThisZone, size * sizeOfInt, recv_proc, tag);
+                    }
+                }
+            }
+        }
+
+        //! Current processor do not contain this zone, but it may contains this zone's neighbor zone.
+        else
+        {
+            int nLocalZones = PHMPI::GetNumberofLocalZones();
+
+            //! Loop all zones on current proc, check if has neighbor zone of zoneIndex.
+            //! If has,  receive zoneIndex's zoneNeighbor data.
+            //! But only need receive once.
+            for (int localZoneIndex = 0; localZoneIndex < nLocalZones; localZoneIndex ++)
+            {
+                int currentGlobalZone = GetLocalZoneIDToGlobalZoneID(localZoneIndex);
+                ZoneNeighbor *zoneNeighborOfCurrentZone = zoneConnectivityForPoint->GetZoneNeighborForPoint(currentGlobalZone);
+                if (zoneNeighborOfCurrentZone->hasNeighborZone(zoneIndex))
+                {
+                    //WriteLogFile("Receive #Zone from #proc ", zoneIndex, send_proc, true);
+                    int size = 0;
+                    PH_Receive(&size, 1 * sizeOfInt, send_proc, tag);
+                    zoneNeighborOfThisZone->SetNumberOfNeighbor(size);
+                    int *neighborZonesOfNeighborZone = zoneNeighborOfThisZone->GetZoneIndexOfNeighbor();
+                    //! No allocate memory? through SetNumberOfNeighbor's resize.
+                    PH_Receive(neighborZonesOfNeighborZone, size * sizeOfInt, send_proc, tag);
+                    break;
+                }
+            }
+        }
+    }
+    WriteLogFile("End broadcasting neighbor information for point ");
+}
+
+void Region::SwapZoneNeighborsInformation()
+{
+    WriteLogFile("Start Swapping Zone Neighbors Information!");
+
+    TimeSpan timeSpan;
+    BroadcastZoneNeighborInformation();
+    timeSpan.ShowTimeSpanToLogFile("Neighbor zone information BCast "); 
+
+    timeSpan.ResetTime();
+    SwapNeighborsSendContent();
+    //SwapNeighborsSendContentNonblocking();
+    timeSpan.ShowTimeSpanToLogFile("Swap Neighbor Send Content ");
+
+    WriteLogFile("End Swapping Zone Neighbors Information!");
+}
+
+void Region::SwapZoneNeighborsForPointInformation()
+{
+    BroadcastZoneNeighborForPointInformation();
+    SwapNeighborsSendContentForPoint();
+}
+
+void Region::SwapNeighborsSendContentNonblocking()
+{
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    vector< PH_Request > requestContainer;
+    vector< vector< DataContainer * > > receivedDataBuffer;
+    vector< vector< DataContainer * > > sendDataBuffer;
+    receivedDataBuffer.resize(nZones);
+    sendDataBuffer.resize(nZones);
+
+    //! Step 0: Compressing data firstly.
+    WriteLogFile("        Compressing data ...");
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Zone *zone = GetZone(iZone);
+        if (!zone)
+        {
+            continue;
+        }
+
+        int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+        if (currentProcessor == sendProcessor)
+        {
+            sendDataBuffer[iZone].resize(numberOfNeighbor);
+        }
+
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate and compress the buffers for sending.
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = new DataContainer;
+                sendDataBuffer[iZone][iNeighbor] = sendBuffer;
+
+                //! Compress the send information into the actkey.
+                //int localZoneIndex = this->GetProcessGlobalZoneIndexToLocalZoneIndex(iZone);
+                //compressData(zoneGridSolver, sendBuffer, neighborZone);
+                InterfaceInfo *interfaceInfo = GetInterfaceInfo(iZone, 0);
+                int nIFaceOfNeighbor = interfaceInfo->GetNIFaceOfNeighbor(iNeighbor);
+                int *faceIndexForSend = interfaceInfo->ComputeFaceIndexForSend(iNeighbor);
+                sendBuffer->moveto_begin();
+                PHWrite(sendBuffer, nIFaceOfNeighbor);
+                PHWrite(sendBuffer, faceIndexForSend, nIFaceOfNeighbor);
+            }
+        }
+    }
+
+    //! Step 1: Communication.
+    WriteLogFile("        Communication ...");
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        //! Communicating.
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int sendProcessor    = PHMPI::GetZoneProcessorID(iZone);
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate the buffers for sending and receiving.
+            DataContainer *receivedBuffer = 0;
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == receiveProcessor)
+            {
+                receivedBuffer = new DataContainer;
+                receivedDataBuffer[iZone].push_back(receivedBuffer);
+            }
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = sendDataBuffer[iZone][iNeighbor];
+            }
+
+            int tag = iZone;
+
+            //if (sendProcessor == receiveProcessor) continue;
+
+            //! Communication.
+            if (currentProcessor == sendProcessor)
+            {
+                if (sendProcessor != receiveProcessor)
+                {
+                    streamsize nlen = sendBuffer->size();
+
+                    //! Send the data to neighbors.
+                    send(sendBuffer, receiveProcessor, nlen, requestContainer, tag);
+                }
+            }
+            if (currentProcessor == receiveProcessor)
+            {
+                //! Get the neighbor order: which order that 'iZone' on neighbors of neighborZone.
+                int neighborOrer = -1;
+                ZoneNeighbor *globalNeighborZonesTemp = zoneConnectivity->GetZoneNeighbor(neighborZone);
+                int numberOfNeighborTemp = globalNeighborZonesTemp->GetNumberOfNeighbor();
+
+                for (int neighborID = 0; neighborID < numberOfNeighborTemp; ++ neighborID)
+                {
+                    int neighborZoneTemp = globalNeighborZonesTemp->GetZoneIndexOfNeighbor(neighborID);
+                    if (neighborZoneTemp == iZone)
+                    {
+                        neighborOrer = neighborID;
+                        break;
+                    }
+                }
+
+                ASSERT(neighborOrer != -1);
+
+                if (sendProcessor != receiveProcessor)
+                {
+                    //! The data length of the received data is same to the length that send to the neighbor.
+                    CharVecSizeType nlen = sendDataBuffer[neighborZone][neighborOrer]->size();
+
+                    //! Receive data from neighbors.
+                    receive(receivedBuffer, sendProcessor, nlen, requestContainer, tag);
+                }
+                else
+                {
+                    SWAP(receivedDataBuffer[iZone].back(), sendDataBuffer[iZone][iNeighbor]);
+                }
+            }
+        }
+    }
+
+    //! Step2: MPI waiting for Non-blocking communications.
+    if (PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_Wait(static_cast<int>(requestContainer.size()), &(requestContainer[0]));
+    }
+
+    //! Step3: Translate the data container.
+    WriteLogFile("        Translating data ...");
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        int count = 0;
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor == receiveProcessor)
+            {
+                DataContainer *receiveData = receivedDataBuffer[iZone][count];
+
+                //! Because get into here when currentProcessor==receiveProcessor,
+                //! so, use zoneGridSolver of neighborZone, this zone is on the current processor!
+
+                //! Decompress the interface data from data-container.
+                receiveData->moveto_begin();
+                int nIFaceOfNeighbor;
+                PHRead(receiveData, nIFaceOfNeighbor);
+                int *faceIndexForSend = new int [nIFaceOfNeighbor];
+                PHRead(receiveData, faceIndexForSend, nIFaceOfNeighbor);
+
+                InterfaceInfo *tiinfo = GetInterfaceInfo(neighborZone, 0);
+                tiinfo->FillFaceIndexForSend(iZone, faceIndexForSend);
+
+                delete [] faceIndexForSend;
+
+                ++ count;
+            }
+        }
+    }
+
+    WriteLogFile("        Free buffer data ...");
+    //! Step4: Free the buffers.
+    for (std::size_t iDim = 0; iDim < receivedDataBuffer.size(); ++ iDim)
+    {
+        for (std::size_t jDim = 0; jDim < receivedDataBuffer[ iDim ].size(); ++ jDim)
+        {
+            delete receivedDataBuffer[iDim][jDim];
+        }
+    }
+    receivedDataBuffer.clear();
+    for (std::size_t iDim = 0; iDim < sendDataBuffer.size(); ++ iDim)
+    {
+        for (std::size_t jDim = 0; jDim < sendDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete sendDataBuffer[iDim][jDim];
+        }
+    }
+    sendDataBuffer.clear();
+    requestContainer.clear();
+}
+
+void Region::SwapNeighborsSendContent()
+{
+    WriteLogFile("Start SwapNeighborsSendContent ...");
+    using namespace PHMPI;
+
+    int myid = GetCurrentProcessorID();
+    int nZones = GetNumberofGlobalZones();
+
+    int level = 0;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int send_proc = GetZoneProcessorIDSepMode(iZone);
+
+        ZoneNeighbor *zoneNeighbor = zoneConnectivity->GetZoneNeighbor(iZone);
+        uint_t numberOfNeighbor = zoneNeighbor->GetNumberOfNeighbor();
+
+        for (int ineighbor = 0; ineighbor < numberOfNeighbor; ++ ineighbor)
+        {
+            int zoneIndexOfNeighbor = zoneNeighbor->GetZoneIndexOfNeighbor(ineighbor);
+            int recv_proc = GetZoneProcessorIDSepMode(zoneIndexOfNeighbor);
+            int nIFaceOfNeighbor = 0;
+            int *faceIndexForSend = 0;
+
+            if (myid == send_proc)
+            {
+                InterfaceInfo *interfaceInfo = GetInterfaceInfo(iZone, level);
+                nIFaceOfNeighbor = interfaceInfo->GetNIFaceOfNeighbor(ineighbor);
+                faceIndexForSend = interfaceInfo->ComputeFaceIndexForSend(ineighbor);
+            }
+
+            PH_Trade(&nIFaceOfNeighbor, sizeof(int), send_proc, recv_proc, iZone + level * nZones);
+
+            if (myid == recv_proc && send_proc != recv_proc) faceIndexForSend = new int [nIFaceOfNeighbor]();
+            PH_Trade(faceIndexForSend, nIFaceOfNeighbor * sizeof(int), send_proc, recv_proc, iZone + level * nZones);
+
+            if (myid == recv_proc)
+            {
+                InterfaceInfo *tiinfo = GetInterfaceInfo(zoneIndexOfNeighbor, level);
+                tiinfo->FillFaceIndexForSend(iZone, faceIndexForSend);
+            }
+            if (faceIndexForSend != nullptr)
+            {
+                delete [] faceIndexForSend;    faceIndexForSend = nullptr;
+            }
+        }
+    }
+
+    WriteLogFile("End SwapNeighborsSendContent ...");
+}
+
+void Region::SwapNeighborsSendContentForPoint()
+{
+    using namespace PHMPI;
+
+    int myID = GetCurrentProcessorID();
+    int nZones = GetNumberofGlobalZones();
+
+    int level = 0;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int sendProcessor = GetZoneProcessorIDSepMode(iZone);
+
+        ZoneNeighbor *zoneNeighborForPoint = zoneConnectivityForPoint->GetZoneNeighborForPoint(iZone);
+        uint_t numberOfNeighbor = zoneNeighborForPoint->GetNumberOfNeighbor();
+
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int zoneIndexOfNeighbor = zoneNeighborForPoint->GetZoneIndexOfNeighbor(iNeighbor);
+            int receiveProcessor = GetZoneProcessorIDSepMode(zoneIndexOfNeighbor);
+            int numberOfInterpointsForNeighbor = 0;
+            int *pointIndexForSend = 0;
+
+            if (myID == sendProcessor)
+            {
+                InterpointInformation *interpointInformation = GetInterpointInfo(iZone, level);
+                numberOfInterpointsForNeighbor = interpointInformation->GetNumberOfInterpointsForNeighbor(iNeighbor);
+                pointIndexForSend = interpointInformation->ComputePointIndexForSend(iNeighbor);
+            }
+
+            PH_Trade(&numberOfInterpointsForNeighbor, sizeof(int), sendProcessor, receiveProcessor, iZone + level * nZones);
+
+            if (myID == receiveProcessor && sendProcessor != receiveProcessor)
+            {
+                pointIndexForSend = new int [numberOfInterpointsForNeighbor];
+            }
+            PH_Trade(pointIndexForSend, numberOfInterpointsForNeighbor*sizeof(int), sendProcessor, receiveProcessor, iZone + level * nZones);
+
+            if (myID == receiveProcessor)
+            {
+                InterpointInformation *interpointInformation = GetInterpointInfo(zoneIndexOfNeighbor, level);
+                interpointInformation->FillPointIndexForSend(iZone, pointIndexForSend);
+            }
+
+            delete [] pointIndexForSend;    pointIndexForSend = NULL;
+        }
+    }
+}
+
+LIB_EXPORT void Region::MultiGridSetup()
+{
+    CheckMeshMultigridByFTS();
+
+    CoarseGrids();
+
+    ShowCoarseGrids();
+}
+
+LIB_EXPORT void Region::InitGrids()
+{
+    SetNGrids();
+
+    ComputeMetrics();
+
+    InitCellBoundaryType();
+}
+
+void Region::DumpWallFaceCenter()
+{
+    int dumpWallFaceCenter = GlobalDataBase::GetIntParaFromDB("dumpWallFaceCenter");
+    if (!dumpWallFaceCenter)
+    {
+        return;
+    }
+
+    using namespace PHMPI;
+    ActionKey *actkeyDumpFaceCenter = new ActionKey();
+    string faceCenterFile = "./grid/wallFaceCenter.dat";
+
+    actkeyDumpFaceCenter->filename = faceCenterFile;
+    ios_base::openmode openmode = ios_base::out|ios_base::trunc;
+    actkeyDumpFaceCenter->openmode = openmode;
+
+    int currentProcessorID = GetCurrentProcessorID();
+    int serverTmp = GetServerSepMode();
+ 
+    if (currentProcessorID == serverTmp)
+    {
+        ParallelOpenFile(actkeyDumpFaceCenter);
+    }
+
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        DataContainer *cdata = actkeyDumpFaceCenter->GetData();
+        delete cdata;    cdata = nullptr;
+
+        DataContainer *cdataNew = new DataContainer();
+        actkeyDumpFaceCenter->SetData(cdataNew);
+
+        int sendProcess = GetZoneProcessorIDSepMode(iZone);
+        int recvProcess = GetServerSepMode();
+
+        int myProcessorID = GetCurrentProcessorID();
+        int sendRecvTag = GetSendRecvTag(actkeyDumpFaceCenter, iZone);
+
+        if (myProcessorID == sendProcess)
+        {
+            //! If zone i belongs to the current process.
+            Grid *grid = PHSPACE::GetGrid(iZone, 0);
+            grid->DumpWallFaceCenter(actkeyDumpFaceCenter);
+        }
+
+        PH_Trade(actkeyDumpFaceCenter, sendProcess, recvProcess, sendRecvTag);
+
+        if (myProcessorID == recvProcess)
+        {
+            //! If the current process is the server process.
+            WriteASCIIFile(actkeyDumpFaceCenter);
+        }
+    }
+
+    if (currentProcessorID == serverTmp)
+    {
+        ParallelCloseFile(actkeyDumpFaceCenter);
+    }
+
+    delete actkeyDumpFaceCenter;    actkeyDumpFaceCenter = nullptr;
+}
+
+void Region::SetNGrids()
+{
+    int nMGLevel = 1;
+    GlobalDataBase::GetData("nMGLevel", &nMGLevel, PHINT, 1);
+
+    nGrids = nMGLevel;
+}
+
+void Region::CheckMeshMultigridByFTS()
+{
+    using namespace PHMPI;
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    int myid   = PHMPI::GetCurrentProcessorID();
+
+    int km = 0, NN = 0;
+    int km_grid = 1024;
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int procID = PHMPI::GetZoneProcessorID(iZone);
+
+        if (myid == procID)
+        {
+            Grid *gridofThisProcessor = GetGrid(iZone, 0);
+
+            int gridtype = gridofThisProcessor->Type();
+
+            if (gridtype == PHSPACE::STRUCTGRID)
+            {
+                StructGrid *grid = StructGridCast(gridofThisProcessor);
+
+                StructBCSet *structBCSet = grid->GetStructBCSet();
+
+                int nBCRegion = structBCSet->GetnBCRegion();
+                for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion ++)
+                {
+                    km = 1;
+                    NN = 2;
+
+                    StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+                    int *s_st = structBC->GetStartPoint();
+                    int *s_ed = structBC->GetEndPoint();
+
+                    while (true)
+                    {
+                        int CandoMultigrid = 0;
+                        for (int i = 0; i < 3; ++ i)
+                        {
+                            if (((abs(s_ed[i] - s_st[i]) + 1) % NN) == 0)
+                            {
+                                ++ CandoMultigrid;
+                            }
+                        }
+
+                        if ((GetDim() == THREE_D && CandoMultigrid < 2) || (GetDim() == TWO_D && CandoMultigrid < 1))
+                        {
+                            break;
+                        }
+
+                        NN = NN * 2;
+                        km = km + 1;
+                    }
+                    km_grid = min(km_grid, km);
+                }
+            }
+        }
+    }
+
+    PH_CompareMaxMin(km_grid, 2);
+
+    int nMGLevel = GlobalDataBase::GetIntParaFromDB("nMGLevel");
+
+    if (nMGLevel > km_grid && km_grid < 1024)
+    {
+        GlobalDataBase::UpdateData("nMGLevel", &km_grid, PHINT, 1);
+        this->nGrids = km_grid;
+    }
+
+    if (myid == server && km_grid < 1024)
+    {
+        PrintToWindow("\nThe most valid multi-grid level is: ", km_grid, "\n\n");
+        WriteLogFile("\nThe most valid multi-grid level is: ", km_grid, "\n");
+    }
+}
+
+void Region::CoarseGrids()
+{
+    int nLocalZones = PHMPI::GetNumberofLocalZones();
+#ifdef USE_OMP
+    #pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Zone *zone = GetZone(zoneID);
+        if (!zone) continue;
+
+        zone->CoarseGrids();
+    }
+}
+
+void Region::ShowCoarseGrids()
+{
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Zone *zone = GetZone(iZone); 
+        if (!zone) continue;
+        zone->ShowCoarseGrids();
+    }
+}
+
+void Region::InitCellBoundaryType(int level)
+{
+    if (level != 0)
+    {
+        return;
+    }
+
+    using namespace PHMPI;
+
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int send_proc = GetZoneProcessorIDSepMode(iZone);
+        int myid = PHMPI::GetCurrentProcessorID();
+        if (myid == send_proc)
+        {
+            Grid *grid = GetGrid(iZone);
+            grid->ComputeCellBoundaryType();
+        }
+    }
+}
+
+void Region::ComputeMetrics(int level)
+{
+    using namespace PHMPI;
+
+    int nZones = GetNumberofGlobalZones();
+    ActionKey *actkey = new ActionKey();
+    actkey->action = COMPUTEMETRICS;
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        //int send_proc = GetZoneProcessorIDSepMode(iZone);
+        int send_proc = GetZoneProcessorIDSepMode(iZone);
+        int recv_proc = GetServerSepMode();
+
+        int tag = GetSendRecvTag(GRID_BASED, 0, iZone);
+        //int proc = GetZoneProcessorID(iZone);
+        int myid = PHMPI::GetCurrentProcessorID();
+        if (myid == send_proc)
+        {
+            //! If the ProcessorID of i-th zone equal to the running ProcessorID, compute grid metrics.
+            Grid *grid = GetGrid(iZone, level);
+            grid->ComputeMetrics(actkey);
+        }
+
+        //! Collect all info out by ComputeMetrics function to cdata.
+        PH_Trade(actkey, send_proc, recv_proc, tag);
+
+        if (myid == recv_proc)
+        {
+            //! If ProcessorID is serve ProcessorID, output the info in cdata.
+            WriteScreen(actkey);
+        }
+    }
+    delete actkey;    actkey = nullptr;
+}
+
+void Region::GlobalGridStatic(int level)
+{
+    //! Check if need to compute the global grid size.
+    int sys_gridtype;
+    GlobalDataBase::GetData("sys_gridtype", &sys_gridtype, PHINT, 1);
+
+    if (sys_gridtype == STRUCTGRID) 
+    {
+        ComputeGlobalCellSize(level);
+    }
+    else if (sys_gridtype == UNSTRUCTGRID)
+    {
+        ComputeGlobalGridSize(level);
+
+#ifdef USE_GMRESSOLVER
+        int originaltscheme = GlobalDataBase::GetIntParaFromDB("OriginalTscheme");
+        if (originaltscheme == GMRES)
+        {
+            GetCurrentShiftCellSizeToGlobalSize(level);  // GMRESParallel
+        }
+#endif
+
+        int compressible = GlobalDataBase::GetIntParaFromDB("compressible");
+        if (compressible != COMPRESSIBLE)
+        {
+            buildGlobalCellsArrary(level);
+        }
+    }
+    else if (sys_gridtype == MIXGRID)
+    {
+        ComputeGlobalGridCellSize(level);
+    }
+}
+
+void Region::ComputeGlobalCellSize(int level)
+{
+    int minNTCell = 10000000;
+    int maxNTCell = 0;
+    RDouble TotalNodes = 0.0;
+    RDouble TotalFaces = 0.0;
+    RDouble TotalCells = 0.0;
+    int TotalWallFace = 0;
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Zone *zone = GetZone(iZone);
+        if (!zone)
+        {
+            continue;
+        }
+        StructGrid *grid = StructGridCast(GetGrid(iZone, level));
+
+        TotalNodes += grid->GetNTotalNode();
+        TotalFaces += grid->GetNTotalFace();
+        TotalCells += grid->GetNTotalCell();
+
+        TotalWallFace += grid->GetNumberOfWallCell();
+
+        minNTCell = MIN(minNTCell, TotalCells);
+        maxNTCell = MAX(maxNTCell, TotalCells);
+    }
+    
+    RDouble globalTotalNodes = TotalNodes * 1.0;
+    RDouble globalTotalFaces = TotalFaces * 1.0;
+    RDouble globalTotalCells = TotalCells * 1.0;
+    int globalTotalWallFace = TotalWallFace;
+
+    if (PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_AllReduce(&TotalNodes, &globalTotalNodes, 1, PH_SUM);
+        PH_AllReduce(&TotalFaces, &globalTotalFaces, 1, PH_SUM);
+        PH_AllReduce(&TotalCells, &globalTotalCells, 1, PH_SUM);
+        PH_AllReduce(&TotalWallFace, &globalTotalWallFace, 1, PH_SUM);
+    }
+
+    GlobalDataBase::UpdateData("GlobalTotalCells", &globalTotalCells, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("GlobalTotalWallFace", &globalTotalWallFace, PHINT, 1);
+
+    PrintToWindow("The Global Information of StructGrid ", "\n");
+    PrintToWindow("  GlobalTotalNodes: ", globalTotalNodes, "\n");
+    PrintToWindow("  GlobalTotalFaces: ", globalTotalFaces, "\n");
+    PrintToWindow("  GlobalTotalCells: ", globalTotalCells, "\n");
+
+    RDouble minNTCellCompare = minNTCell * 1.0;
+    RDouble maxNTCellCompare = maxNTCell * 1.0;
+
+    if (PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_CompareMaxMin(minNTCellCompare, 2);
+        PH_CompareMaxMin(maxNTCellCompare, 1);
+        WriteLogFile("Min && Max nTCell of all zones: ", minNTCellCompare, maxNTCellCompare);
+    }
+}
+
+void Region::ComputeGlobalGridSize(int level)
+{
+    RDouble TotalNodes = 0.0;
+    RDouble TotalFaces = 0.0;
+    RDouble TotalCells = 0.0;
+    RDouble TotalVolume = 0.0;
+    RDouble averageVolume = 0.0;
+    int TotalWallFace = 0;
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    int nMGLevel = 1;
+    GlobalDataBase::GetData("nMGLevel", &nMGLevel, PHINT, 1);
+    for (int iLevel = 0; iLevel < nMGLevel; ++ iLevel)
+    {
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            if (STRUCTGRID == PHMPI::GetZoneGridType(iZone))
+            {
+                continue;
+            }
+            Zone *zone = GetZone(iZone);
+            if (!zone) continue;
+            UnstructGrid *grid = UnstructGridCast(GetGrid(iZone, iLevel));
+            RDouble *vol = grid->GetCellVolume();
+
+            int nTotalNode = grid->GetNTotalNode();
+            int nTotalFace = grid->GetNTotalFace();
+            int nTotalCell = grid->GetNTotalCell();
+            TotalNodes += nTotalNode * 1.0;
+            TotalFaces += nTotalFace * 1.0;
+            TotalCells += nTotalCell * 1.0;
+
+            TotalWallFace += grid->GetNumberOfWallCell();
+
+            for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+            {
+                TotalVolume += vol[iCell];
+            }
+        }
+
+        RDouble globalTotalNodes = TotalNodes * 1.0;
+        RDouble globalTotalFaces = TotalFaces * 1.0;
+        RDouble globalTotalCells = TotalCells * 1.0;
+        RDouble globalTotalVolume = TotalVolume;
+        int globalTotalWallFace = TotalWallFace;
+
+        if (PHMPI::GetNumberOfProcessor() > 1)
+        {
+            PH_AllReduce(&TotalNodes, &globalTotalNodes, 1, PH_SUM);
+            PH_AllReduce(&TotalFaces, &globalTotalFaces, 1, PH_SUM);
+            PH_AllReduce(&TotalCells, &globalTotalCells, 1, PH_SUM);
+            PH_AllReduce(&TotalVolume, &globalTotalVolume, 1, PH_SUM);
+            PH_AllReduce(&TotalWallFace, &globalTotalWallFace, 1, PH_SUM);
+        }
+
+        GlobalDataBase::UpdateData("GlobalTotalCells", &globalTotalCells, PHDOUBLE, 1);
+        GlobalDataBase::UpdateData("UnstrGlobalTotalCells", &globalTotalCells, PHDOUBLE, 1);
+        GlobalDataBase::UpdateData("UnstrGlobalTotalVolume", &globalTotalVolume, PHDOUBLE, 1);
+        GlobalDataBase::UpdateData("GlobalTotalWallFace", &globalTotalWallFace, PHINT, 1);
+
+        PrintToWindow("The Global Information of UnstructGrid ", "\n");
+        PrintToWindow("  GlobalTotalNodes: ", globalTotalNodes, "\n");
+        PrintToWindow("  GlobalTotalFaces: ", globalTotalFaces, "\n");
+        PrintToWindow("  GlobalTotalCells: ", globalTotalCells, "\n");
+
+        averageVolume = globalTotalVolume / globalTotalCells;
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            if (STRUCTGRID == PHMPI::GetZoneGridType(iZone))
+            {
+                continue;
+            }
+            Zone *zone = GetZone(iZone);
+            if (!zone) continue;
+            UnstructGrid *grid = UnstructGridCast(GetGrid(iZone, iLevel));
+            grid->SetAverageVolume(averageVolume);
+        }
+    }
+}
+#ifdef USE_GMRESSOLVER
+//! GMRESParallel
+void Region::GetCurrentShiftCellSizeToGlobalSize(int level)
+{
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    int nMGLevel = 1;
+    GlobalDataBase::GetData("nMGLevel", &nMGLevel, PHINT, 1);
+
+    RDouble *TotalCells = new RDouble[nZones];
+    int *ShiftCellIndex = new int[nZones];
+
+    for (int iLevel = 0; iLevel < nMGLevel; iLevel++)
+    {
+        for (int iZone = 0; iZone < nZones; iZone++)
+        {
+            TotalCells[iZone] = -1;
+        }
+
+        for (int iZone = 0; iZone < nZones; iZone++)
+        {
+            if (STRUCTGRID == PHMPI::GetZoneGridType(iZone))
+            {
+                continue;
+            }
+            Zone *zone = GetZone(iZone);
+            if (!zone) continue;
+            UnstructGrid *grid = UnstructGridCast(GetGrid(iZone, iLevel));
+
+            int nTotalCell = grid->GetNTotalCell();
+            TotalCells[iZone] += nTotalCell * 1.0;
+        }
+
+        if (PHMPI::GetNumberOfProcessor() > 1)
+        {
+            for (int iZone = 0; iZone < nZones; iZone++)
+            {
+                RDouble targetTotalCell = -1;
+                PH_AllReduce(&TotalCells[iZone], &targetTotalCell, 1, PH_MAX);
+                TotalCells[iZone] = targetTotalCell;
+            }
+        }
+
+       //! determine whether the information is assigned
+       for (int iZone = 0; iZone < nZones; iZone++)
+       {
+            if (STRUCTGRID == PHMPI::GetZoneGridType(iZone))
+            {
+                continue;
+            }
+            Zone *zone = GetZone(iZone);
+            if (!zone) continue;
+
+            if(TotalCells[iZone] < 0.0)
+                TK_Exit::ExceptionExit("Global mesh information loading incorrectly");
+       }
+
+       //! get the shift cell index
+       for (int iZone = 0; iZone < nZones; iZone++)
+       {
+            if (STRUCTGRID == PHMPI::GetZoneGridType(iZone))
+            {
+                continue;
+            }
+
+            int globalCellIDShift = 0;
+            for (int zone = 0; zone < iZone; zone++)
+            {
+                globalCellIDShift += (int)TotalCells[zone];
+            }
+            globalCellIDShift += iZone;
+            ShiftCellIndex[iZone] = globalCellIDShift;
+            // printf("The number of cells in zone %d is %d\n", iZone, grid->GetNTotalCell());
+            // printf("The shift cell index to global in zone %d is %d\n", iZone, globalCellIDShift);
+       }
+    }
+
+    PH_Barrier();
+
+    GlobalDataBase::UpdateDataPtr("shiftCellIndexToGlobal", ShiftCellIndex);
+
+    delete[] TotalCells; TotalCells = NULL;
+
+    //! get the local cell index
+    for (int iLevel = 0; iLevel < nMGLevel; iLevel++)
+    {
+       for (int iZone = 0; iZone < nZones; iZone++)
+       {
+            if (STRUCTGRID == PHMPI::GetZoneGridType(iZone))
+            {
+                continue;
+            }
+            Zone *zone = GetZone(iZone);
+            if (!zone)
+            {
+                continue;
+            }
+
+            UnstructGrid *grid = UnstructGridCast(GetGrid(iZone, iLevel));
+            InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+            if(!interfaceInfo) 
+            {
+                continue;
+            }
+
+            int nNeighbor = interfaceInfo->GetNumberOfNeighbor();
+            int *leftCellOfFace = grid->GetLeftCellOfFace();
+            int *rightCellOfFace = grid->GetRightCellOfFace();
+            for (int ineighbor = 0; ineighbor < nNeighbor; ineighbor++)
+            {
+                InterfacePatch *interFacePatch = interfaceInfo->GetInterfacePatch(ineighbor);
+
+                int *faceID4Recv = interfaceInfo->GetFaceIndexForRecv(ineighbor);
+                int zoneID = interfaceInfo->GetZoneIndexOfNeighbor(ineighbor);
+                int nFace = interfaceInfo->GetNIFaceOfNeighbor(ineighbor);
+
+                int *cellIndexOfLocal = interFacePatch->GetCellIndexOfLocal();
+                int *cellIndexOfLocalGhost = interFacePatch->GetCellIndexOfLocalGhost();
+                int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+
+                for (int face = 0; face < nFace; face++)
+                {
+                    int realface = interFace2BoundaryFace[faceID4Recv[face]];
+                    cellIndexOfLocal[face] = leftCellOfFace[realface];
+                    cellIndexOfLocalGhost[face] = rightCellOfFace[realface];
+                }
+            }
+       }
+    }
+
+    int* shiftCellID = reinterpret_cast<int *>(GlobalDataBase::GetDataPtr("shiftCellIndexToGlobal"));
+
+    //! get the neighbor cell index
+    for (int iLevel = 0; iLevel < nMGLevel; iLevel++)
+    {
+        int count = 0;
+        for (int iZone = 0; iZone < nZones; iZone++)
+        {
+            if(STRUCTGRID ==PHMPI::GetZoneGridType(iZone))
+            {
+                continue;
+            }
+            Zone *zone = GetZone(iZone);
+            if(!zone) continue;
+
+            UnstructGrid *grid = UnstructGridCast(GetGrid(iZone, iLevel));
+            InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+            if(!interfaceInfo) 
+            {
+                continue;
+            }
+            int nNeighbor = interfaceInfo->GetNumberOfNeighbor();
+            for (int ineighbor = 0; ineighbor < nNeighbor; ineighbor++)
+            {
+                InterfacePatch *interFacePatch = interfaceInfo->GetInterfacePatch(ineighbor);
+
+                int zoneID = interfaceInfo->GetZoneIndexOfNeighbor(ineighbor);
+                int targetRank = PHMPI::GetZoneProcessorID(zoneID);
+
+                if(targetRank != PHMPI::GetCurrentProcessorID())
+                {
+                    count++;
+                }
+            }
+        }
+        MPI_Request *request = new MPI_Request[count * 2];
+        MPI_Status *status = new MPI_Status[count * 2];
+
+        int icount = 0;
+        for (int iZone = 0; iZone < nZones; iZone++)
+        {
+            if (STRUCTGRID == PHMPI::GetZoneGridType(iZone))
+            {
+                continue;
+            }
+            Zone *zone = GetZone(iZone);
+            if (!zone)
+            {
+                continue;
+            }
+
+            UnstructGrid *grid = UnstructGridCast(GetGrid(iZone, iLevel));
+            InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+            if(!interfaceInfo) 
+            {
+                continue;
+            }
+
+            int nIFace = interfaceInfo->GetNIFace();
+            int *neighbor = interfaceInfo->GetInterFace2ZoneID();
+            int nNeighbor = interfaceInfo->GetNumberOfNeighbor();
+            int* leftCellOfFace = grid->GetLeftCellOfFace();
+            int *rightCellOfFace = grid->GetRightCellOfFace();
+            for (int ineighbor = 0; ineighbor < nNeighbor; ineighbor++)
+            {
+                InterfacePatch *interFacePatch = interfaceInfo->GetInterfacePatch(ineighbor);
+
+                int zoneID = interfaceInfo->GetZoneIndexOfNeighbor(ineighbor);
+                int nFace = interfaceInfo->GetNIFaceOfNeighbor(ineighbor);
+
+                int *cellIndexOfLocal = interFacePatch->GetCellIndexOfLocal();
+                int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+
+                // data communication
+                int targetRank = PHMPI::GetZoneProcessorID(zoneID);
+                if (targetRank == PHMPI::GetCurrentProcessorID())
+                {
+                    UnstructGrid *gridTarget = UnstructGridCast(GetGrid(zoneID, iLevel));
+                    InterfaceInfo *interfaceInfoTarget = gridTarget->GetInterfaceInfo();
+                    int matchedNeighbor = interfaceInfoTarget->FindIthNeighbor(iZone);
+                    InterfacePatch *interFacePatchTarget = interfaceInfoTarget->GetInterfacePatch(matchedNeighbor);
+                    int matchednFace = interFacePatchTarget->GetNumberOfFace();
+                    if(matchednFace != nFace)
+                    {
+                        printf("!idea: %d, matched: %d\n", nFace, matchednFace);
+                        TK_Exit::ExceptionExit("Unmatched connectivy informatiion");
+                    }
+                    int *cellIndexTarget = interFacePatchTarget->GetCellIndexOfLocal();
+                    interFacePatch->SetCellIndexOfNeighbor(cellIndexTarget);
+                }
+                else // not in one processor
+                {
+                    int *cellIndexOfNeighbor = new int[nFace];
+                    MPI_Isend(cellIndexOfLocal, nFace, MPI_INT, targetRank, iZone, MPI_COMM_WORLD, &request[icount]);
+                    MPI_Irecv(cellIndexOfNeighbor, nFace, MPI_INT, targetRank, zoneID, MPI_COMM_WORLD, &request[icount + 1]);
+                    interFacePatch->SetCellIndexOfNeighbor(cellIndexOfNeighbor);
+                    icount += 2;
+                }
+            }
+        }
+
+        MPI_Waitall(count * 2, request, status);
+        delete[] request;
+        request = NULL;
+        delete[] status;
+        status = NULL;
+
+        for (int iZone = 0; iZone < nZones; iZone++)
+        {
+            if (STRUCTGRID == PHMPI::GetZoneGridType(iZone))
+            {
+                continue;
+            }
+            Zone *zone = GetZone(iZone);
+            if (!zone)
+            {
+                continue;
+            }
+
+            UnstructGrid *grid = UnstructGridCast(GetGrid(iZone, iLevel));
+            grid->SetGlobalCellIndexShift(shiftCellID[iZone]);
+            InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+            if(!interfaceInfo) 
+            {
+                continue;
+            }
+
+            int nIFace = interfaceInfo->GetNIFace();
+            int nNeighbor = interfaceInfo->GetNumberOfNeighbor();
+            int* rightCellOfFace = grid->GetLeftCellOfFace();
+            int *globalNeighborCellIndex = new int[nIFace];
+            int *localInterfaceCellIndex = new int[nIFace];
+            int *localInterfacePhysicalCellIndex = new int[nIFace];
+            int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+            int iFace = 0;
+
+            for (int ineighbor = 0; ineighbor < nNeighbor; ineighbor++)
+            {
+                InterfacePatch *interFacePatch = interfaceInfo->GetInterfacePatch(ineighbor);
+
+                int zoneID = interfaceInfo->GetZoneIndexOfNeighbor(ineighbor);
+                int nFace = interfaceInfo->GetNIFaceOfNeighbor(ineighbor);
+
+                int *cellIndexOfLocal = interFacePatch->GetCellIndexOfLocal();
+                int *cellIndexOfNeighbor = interFacePatch->GetCellIndexOfNeighbor();
+                int *cellIndexOfLocalGhost = interFacePatch->GetCellIndexOfLocalGhost();
+
+                for (int n = 0; n < nFace; n++)
+                {
+                    globalNeighborCellIndex[iFace] = cellIndexOfNeighbor[n] +shiftCellID[zoneID];
+                    localInterfaceCellIndex[iFace] = cellIndexOfLocalGhost[n];
+                    localInterfacePhysicalCellIndex[iFace] = cellIndexOfLocal[n];
+                    // int realFace = interFace2BoundaryFace[iFace];
+                    // localInterfaceCellIndex[iFace] = leftCellOfFace[realFace];
+                    // printf("!local zone %d, neighbor zone %d, face ID %d, target cell %d, local cell %d, shiftcell %d\n", iZone, zoneID, realFace, cellIndexOfNeighbor[n], localInterfaceCellIndex[iFace], globalNeighborCellIndex[iFace]);
+                    iFace++;
+                }
+            }
+
+            // UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+            // int nBCRegion = unstructBCSet->GetnBCRegion();
+            // iFace = 0;
+            // for (int ibc = 0; ibc < nBCRegion; ibc++)
+            // {
+            //     UnstructBC *bcRegion = unstructBCSet->GetBCRegion(ibc);
+            //     int bcType = bcRegion->GetBCType();
+            //     if(IsInterface(bcType))
+            //     {
+            //         vector<int> * face = bcRegion->GetFaceIndex();
+            //         for (vector<int>::iterator iter = face->begin(); iter < face->end(); iter++)
+            //         {
+            //             localInterfaceCellIndex[iFace] = rightCellOfFace[*iter];
+            //             // printf("!local zone %d, face ID %d, local cell %d, shiftcell %d\n", iZone,  *iter, localInterfaceCellIndex[iFace], globalNeighborCellIndex[iFace]);
+            //             iFace++;
+            //         }
+            //     }
+            // }
+
+            interfaceInfo->SetGlobalNeighborCellIndex(globalNeighborCellIndex);
+            interfaceInfo->SetLocalInterfaceCellIndex(localInterfaceCellIndex);
+            interfaceInfo->SetLocalInterfacePhysicalCellIndex(localInterfacePhysicalCellIndex);
+            // if(iZone == 0)
+            // {
+            //     for (int iter = 0; iter < nIFace; iter++)
+            //     {
+            //         printf("!left cell %d matched cell %d\n", localInterfaceCellIndex[iter] + 1, globalNeighborCellIndex[iter] + 1);
+            //     }
+            // }
+        }
+    }
+
+    PH_Barrier();
+
+    // TK_Exit::ExceptionExit("This is the debug information\n");
+}
+#endif
+void Region::buildGlobalCellsArrary(int level)
+{
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    int* cellNumbersOfEachZone = new int[nZones];
+    for (int iZone = 0; iZone < nZones; ++iZone)
+    {
+        cellNumbersOfEachZone[iZone] = 0;
+    }
+
+    for (int iZone = 0; iZone < nZones; ++iZone)
+    {
+        if (STRUCTGRID == PHMPI::GetZoneGridType(iZone))
+        {
+            continue;
+        }
+        Zone* zone = GetZone(iZone);
+        if (!zone) continue;
+        UnstructGrid* grid = UnstructGridCast(GetGrid(iZone, 0));
+        int nTotalCell = grid->GetNTotalCell();
+        cellNumbersOfEachZone[iZone] = nTotalCell;
+    }
+    int* cellNumbersOfEachZoneGlobal = new int[nZones];
+    PH_AllReduce(cellNumbersOfEachZone, cellNumbersOfEachZoneGlobal, nZones, MPI_SUM);
+
+    int * globalCellNoOfGlobalZones = new int[nZones + 1];
+    globalCellNoOfGlobalZones[0] = 0;
+    int cellCount = 0;
+    for (int iZone = 0; iZone < nZones; ++iZone)
+    {
+        cellCount += cellNumbersOfEachZoneGlobal[iZone];
+        globalCellNoOfGlobalZones[iZone + 1] = cellCount;
+    }
+
+    GlobalDataBase::UpdateDataPtr("globalCellNoOfGlobalZones", globalCellNoOfGlobalZones);
+
+    delete[] cellNumbersOfEachZone;
+    delete[] cellNumbersOfEachZoneGlobal;
+}
+
+void Region::ComputeGlobalGridCellSize(int level)
+{
+    RDouble TotalNodes_unstr = 0.0;
+    RDouble TotalFaces_unstr = 0.0;
+    RDouble TotalCells_unstr = 0.0;
+
+    RDouble TotalNodes_str = 0.0;
+    RDouble TotalFaces_str = 0.0;
+    RDouble TotalCells_str = 0.0;
+
+    RDouble TotalVolume_unstr = 0.0;
+    RDouble averageVolume_unstr = 0.0;
+
+    int minNTCell_str = 10000000;
+    int maxNTCell_str = 0;
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Zone *zone = GetZone(iZone);
+        if (!zone) continue;
+        
+        if (STRUCTGRID == PHMPI::GetZoneGridType(iZone))
+        {
+            StructGrid *grid = StructGridCast(GetGrid(iZone, level));
+
+            TotalNodes_str += grid->GetNTotalNode();
+            TotalFaces_str += grid->GetNTotalFace();
+            TotalCells_str += grid->GetNTotalCell();
+
+            minNTCell_str = MIN(minNTCell_str, TotalCells_str);
+            maxNTCell_str = MAX(maxNTCell_str, TotalCells_str);
+        }
+        else
+        {
+            UnstructGrid *grid = UnstructGridCast(GetGrid(iZone, level));
+
+            TotalNodes_unstr += grid->GetNTotalNode();
+            TotalFaces_unstr += grid->GetNTotalFace();
+            TotalCells_unstr += grid->GetNTotalCell();
+
+            RDouble *vol = grid->GetCellVolume();
+            for (int iCell = 0; iCell < (grid->GetNTotalCell()); ++ iCell)
+            {
+                TotalVolume_unstr += vol[iCell];
+            }
+        }
+    }
+    
+    RDouble globalTotalNodes_unstr = TotalNodes_unstr * 1.0;
+    RDouble globalTotalFaces_unstr = TotalFaces_unstr * 1.0;
+    RDouble globalTotalCells_unstr = TotalCells_unstr * 1.0;
+    RDouble globalTotalVolume_unstr = TotalVolume_unstr;
+    
+    RDouble globalTotalNodes_str = TotalNodes_str * 1.0;
+    RDouble globalTotalFaces_str = TotalFaces_str * 1.0;
+    RDouble globalTotalCells_str = TotalCells_str * 1.0;
+
+    RDouble minNTCellCompare_str = minNTCell_str * 1.0;
+    RDouble maxNTCellCompare_str = maxNTCell_str * 1.0;
+    
+    if (PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_AllReduce(&TotalNodes_unstr,  &globalTotalNodes_unstr, 1, PH_SUM);
+        PH_AllReduce(&TotalFaces_unstr,  &globalTotalFaces_unstr, 1, PH_SUM);
+        PH_AllReduce(&TotalCells_unstr,  &globalTotalCells_unstr, 1, PH_SUM);
+        PH_AllReduce(&TotalVolume_unstr, &globalTotalVolume_unstr, 1, PH_SUM);
+        
+        PH_AllReduce(&TotalNodes_str, &globalTotalNodes_str, 1, PH_SUM);
+        PH_AllReduce(&TotalFaces_str, &globalTotalFaces_str, 1, PH_SUM);
+        PH_AllReduce(&TotalCells_str, &globalTotalCells_str, 1, PH_SUM);
+
+        PH_CompareMaxMin(minNTCellCompare_str, 2);
+        PH_CompareMaxMin(maxNTCellCompare_str, 1);
+        WriteLogFile("Min && Max nTCell of all zones: ", minNTCellCompare_str, maxNTCellCompare_str);
+    }
+
+    RDouble globalTotalNodes = globalTotalNodes_unstr + globalTotalNodes_str;
+    RDouble globalTotalFaces = globalTotalFaces_unstr + globalTotalFaces_str;
+    RDouble globalTotalCells = globalTotalCells_unstr + globalTotalCells_str;
+
+    GlobalDataBase::UpdateData("GlobalTotalCells", &globalTotalCells, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("UnstrGlobalTotalCells", &globalTotalCells_unstr, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("UnstrGlobalTotalVolume", &globalTotalVolume_unstr, PHDOUBLE, 1);
+    
+    PrintToWindow("The Global Information of MixGrid ", "\n");
+    PrintToWindow("  GlobalTotalNodes: ", globalTotalNodes, "\n");
+    PrintToWindow("  GlobalTotalFaces: ", globalTotalFaces, "\n");
+    PrintToWindow("  GlobalTotalCells: ", globalTotalCells, "\n");
+    
+    PrintToWindow("\n");
+    
+    PrintToWindow("The Global Information of UnstrGrid ", "\n");
+    PrintToWindow("  GlobalTotalNodes_unstr: ", globalTotalNodes_unstr, "\n");
+    PrintToWindow("  GlobalTotalFaces_unstr: ", globalTotalFaces_unstr, "\n");
+    PrintToWindow("  GlobalTotalCells_unstr: ", globalTotalCells_unstr, "\n");
+    
+    PrintToWindow("\n");
+    
+    PrintToWindow("The Global Information of StructGrid ", "\n");
+    PrintToWindow("  GlobalTotalNodes_str: ", globalTotalNodes_str, "\n");
+    PrintToWindow("  GlobalTotalFaces_str: ", globalTotalFaces_str, "\n");
+    PrintToWindow("  GlobalTotalCells_str: ", globalTotalCells_str, "\n");
+    
+    averageVolume_unstr = globalTotalVolume_unstr / globalTotalCells_unstr;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        if (STRUCTGRID == PHMPI::GetZoneGridType(iZone))
+        {
+            continue;
+        }
+        Zone *zone = GetZone(iZone);
+        if (!zone) continue;
+        UnstructGrid *grid = UnstructGridCast(GetGrid(iZone, level));
+        grid->SetAverageVolume(averageVolume_unstr);
+    }
+}
+
+void Region::InitMovingGrids(int level)
+{
+    int nsimutask = GlobalDataBase::GetIntParaFromDB("nsimutask");
+
+    if (nsimutask == CAL_WALL_DIST) return;
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+
+    if (!isUnsteady)
+    {
+        return;
+    }
+
+    using namespace PHMPI;
+
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Zone *zone = GetZone(iZone);
+        if (!zone) continue;
+
+        Grid *grid = GetGrid(iZone, level);
+        grid->InitMovingGrids();
+    }
+}
+
+LIB_EXPORT void Region::UpdateAllZonesPara()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Zone *zone = GetZone(iZone);
+        if (!zone) continue;
+        zone->UpdateAllData();
+    }
+}
+
+LIB_EXPORT void Region::SwapGeommetry()
+{
+    CommunicateCellCenterData();
+
+    ComputeMetrics_BC();
+
+    ComputeWeight();
+
+    TestReconstruction();
+
+    WriteLogFile("Swap geommetry sucessfully ...");
+}
+
+void Region::CommunicateCellCenterData()
+{
+    using namespace PHMPI;
+    for (int level = 0; level < nGrids; ++ level)
+    {
+        ActionKey *actkey = new ActionKey();
+        actkey->action = COMMCELLCENTERDATA;
+        actkey->kind = GRID_BASED;
+        actkey->level = level;
+
+        //Task_ServerUpdateInterface *task = new Task_ServerUpdateInterface();
+        if (IsNeedNonBlockingCommunication(actkey))
+        {
+            //task->MainTaskNonBlocking(actkey);
+            MainTaskNonBlocking(actkey);
+        }
+        else
+        {
+            //task->MainTaskBlocking(actkey);
+            MainTaskBlocking(actkey);
+        }
+
+        //delete task;
+        delete actkey;    actkey = nullptr;
+    }
+}
+
+void Region::CommunicateCellIBlank()
+{
+    using namespace PHMPI;
+    //for (int level = 0; level < nGrids; ++ level)
+    {
+        ActionKey *actkey = new ActionKey();
+        actkey->action = COMMCELLIBLANK;
+        actkey->kind = GRID_BASED;
+        actkey->level = 0;
+
+        //Task_ServerUpdateInterface *task = new Task_ServerUpdateInterface();
+        if (IsNeedNonBlockingCommunication(actkey))
+        {
+            //task->MainTaskNonBlocking(actkey);
+            MainTaskNonBlocking(actkey);
+        }
+        else
+        {
+            //task->MainTaskBlocking(actkey);
+            MainTaskBlocking(actkey);
+        }
+
+        //delete task;
+        delete actkey;
+    }
+}
+
+void Region::ComputeMetrics_BC()
+{
+    int isFVMOrFDM = PHSPACE::GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+    if (isFVMOrFDM == FD_METHOD)
+    {
+        ComputeMetricsandJacobinWithBCforStructHighOrder();
+        return;
+    }
+
+    bool Rwithghost = true;
+    
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+    int systemGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    int isOverset = PHSPACE::GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+    int nMGLevel = PHSPACE::GlobalDataBase::GetIntParaFromDB("nMGLevel");
+    int compressible = GlobalDataBase::GetIntParaFromDB("compressible");
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    int ifLowSpeedPrecon = GlobalDataBase::GetIntParaFromDB("ifLowSpeedPrecon");
+    int wallFunctionType = GlobalDataBase::GetIntParaFromDB("wallFunctionType");
+
+    if (tscheme != LU_SGS) Rwithghost = false;
+    if (systemGridType != 1) Rwithghost = false; 
+    if (isOverset) Rwithghost = false;
+    if (nMGLevel != 1) Rwithghost = false;
+    if (compressible != COMPRESSIBLE) Rwithghost = false;
+    if (isUnsteady) Rwithghost = false;
+    if (nChemical != 0) Rwithghost = false;
+    if (ifLowSpeedPrecon != 0) Rwithghost = false;
+    if (wallFunctionType != WALLFUNCTION::NONE) Rwithghost = false;
+
+    if (Rwithghost == false) return;
+
+    using namespace PHMPI;
+
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int send_proc = GetZoneProcessorIDSepMode(iZone);
+        int myid = PHMPI::GetCurrentProcessorID();
+        if (myid == send_proc)
+        {
+            StructGrid *grid = StructGridCast(GetGrid(iZone, 0));
+            grid->ComputeMetrics_BC();
+        }
+    }
+}
+
+void Region::ComputeMetricsandJacobinWithBCforStructHighOrder()
+{
+    using namespace PHMPI;
+
+    int mission_CommXYZghost        = 1;
+    int mission_CommXYZghostofghost = 2;
+    int mission_CommMetrics         = 3;
+    int mission_CommJacobian        = 4;
+
+    string highordersolvername = GlobalDataBase::GetStrParaFromDB("str_highorder_solver");
+    if (highordersolvername.substr(0, 4) == "WCNS")
+    {
+        CommGridInfoOnlyforStructHighOrder(mission_CommXYZghost);
+
+        CommGridInfoOnlyforStructHighOrder(mission_CommXYZghostofghost);
+
+        UpdateDiffOrderforStructHighOrder();
+
+        UpdateMetricsWithBCforStructHighOrder();
+
+        CommGridInfoOnlyforStructHighOrder(mission_CommMetrics);
+
+        UpdateJacobianWithBCforStructHighOrder();
+
+        CommGridInfoOnlyforStructHighOrder(mission_CommJacobian);
+    }
+    else if (highordersolvername.substr(0, 4) == "HDCS")
+    {
+        CommGridInfoOnlyforStructHighOrder(mission_CommXYZghost);
+        //! xcc,ycc,zcc,vol
+    }
+}
+
+void Region::UpdateDiffOrderforStructHighOrder()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        if (STRUCTGRID != GetZoneGridType(iZone))
+        {
+            continue;
+        }
+        int send_proc = GetZoneProcessorIDSepMode(iZone);
+
+        int myid = PHMPI::GetCurrentProcessorID();
+        if (myid == send_proc)
+        {
+            StructGrid *grid = StructGridCast(GetGrid(iZone, 0));
+            grid->InitialDiffOrderforStructHighOrder();
+
+            ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+            int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+            for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+            {
+                int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+                
+                if (STRUCTGRID != GetZoneGridType(neighborZone))
+                {
+                    grid->CorrectDiffOrderNearUnstructBlockforStructHighOrder(neighborZone);
+                }
+            }
+        }
+    }    
+}
+
+void Region::UpdateMetricsWithBCforStructHighOrder()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        if (STRUCTGRID != GetZoneGridType(iZone))
+        {
+            continue;
+        }
+        int send_proc = GetZoneProcessorIDSepMode(iZone); 
+        int myid = PHMPI::GetCurrentProcessorID();
+        if (myid == send_proc)
+        {
+            StructGrid *grid = StructGridCast(GetGrid(iZone, 0));
+            grid->ComputeMetricsWithBCforStructHighOrder();
+        }
+    }
+}
+
+void Region::UpdateJacobianWithBCforStructHighOrder()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        if (STRUCTGRID != GetZoneGridType(iZone))
+        {
+            continue;
+        }
+        int send_proc = GetZoneProcessorIDSepMode(iZone); 
+        int myid = PHMPI::GetCurrentProcessorID();
+        if (myid == send_proc)
+        {
+            StructGrid *grid = StructGridCast(GetGrid(iZone, 0));
+            grid->ComputeJacobianforStructHighOrder();
+        }
+    }
+}
+
+void Region::CommGridInfoOnlyforStructHighOrder(int mission)
+{
+    if (GetDim() == TWO_D && mission == 2)
+    {
+        return;
+    }
+
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    vector <PH_Request > requestContainer;
+    vector <vector <DataContainer *> > receivedDataBuffer;
+    vector <vector <DataContainer *> > sendDataBuffer;
+    receivedDataBuffer.resize(nZones);
+    sendDataBuffer.resize(nZones);
+
+    //! Step 0: Compressing data firstly.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int gridtypeofiZone = PHMPI::GetZoneGridType(iZone);
+
+        int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+        if (currentProcessor == sendProcessor)
+        {
+            sendDataBuffer[iZone].resize(numberOfNeighbor);
+        }
+
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+            
+            int gridtypeofneighborZone = PHMPI::GetZoneGridType(neighborZone);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate and compress the buffers for sending.
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = new DataContainer;
+                sendDataBuffer[iZone][iNeighbor] = sendBuffer;
+
+                // Compress the send information into the actkey.
+                Grid *grid = GetGrid(iZone, 0);
+
+                InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+                if (!interfaceInformation)
+                {
+                }
+                else
+                {
+                    if (gridtypeofiZone == UNSTRUCTGRID || gridtypeofneighborZone == UNSTRUCTGRID)
+                    {
+                        RDouble uploadData = 0.0;
+                        sendBuffer->moveto_begin();
+                        PHWrite(sendBuffer, uploadData);
+                    }
+                    else
+                    {
+                        StructGrid *strgrid = StructGridCast(grid);
+                        strgrid->UploadGridInfoOnlyforStructHighOrder(sendBuffer, neighborZone, mission);
+                    }
+                }
+            }
+        }
+    }
+
+    //! Step 1: Communication.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        //! Communicating.
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+            
+            int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate the buffers for sending and receiving.
+            DataContainer *receivedBuffer = 0;
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == receiveProcessor)
+            {
+                receivedBuffer = new DataContainer;
+                receivedDataBuffer[iZone].push_back(receivedBuffer);
+            }
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = sendDataBuffer[iZone][iNeighbor];
+            }
+
+            int tag = iZone;
+
+            //! Communication.
+            if (currentProcessor == sendProcessor)
+            {
+                if (sendProcessor != receiveProcessor)
+                {
+                    streamsize nlen = sendBuffer->size();
+
+                    //! Send the data to neighbors.
+                    send(sendBuffer, receiveProcessor, nlen, requestContainer, tag);
+                }
+            }
+            if (currentProcessor == receiveProcessor)
+            {
+                //! Get the neighbor order: which order that 'iZone' on neighbors of neighborZone.
+                int neighborOrer = -1;
+                ZoneNeighbor *globalNeighborZonesTemp = zoneConnectivity->GetZoneNeighbor(neighborZone);
+                int numberOfNeighborTemp = globalNeighborZonesTemp->GetNumberOfNeighbor();
+
+                for (int neighborID = 0; neighborID < numberOfNeighborTemp; ++ neighborID)
+                {
+                    int neighborZoneTemp = globalNeighborZonesTemp->GetZoneIndexOfNeighbor(neighborID);
+                    if (neighborZoneTemp == iZone)
+                    {
+                        neighborOrer = neighborID;
+                        break;
+                    }
+                }
+
+                ASSERT(neighborOrer != -1);
+
+                if (sendProcessor != receiveProcessor)
+                {
+                    //! The data length of the received data is same to the length that send to the neighbor.
+                    CharVecSizeType nlen = sendDataBuffer[neighborZone][neighborOrer]->size();
+
+                    //! Receive data from neighbors.
+                    receive(receivedBuffer, sendProcessor, nlen, requestContainer, tag);
+                }
+                else
+                {
+                    SWAP(receivedDataBuffer[iZone].back(), sendDataBuffer[iZone][iNeighbor]);
+                }
+            }
+        }
+    }
+
+    //! Step2: MPI waiting for Non-blocking communications.
+    if (PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_Wait(static_cast<int>(requestContainer.size()), &(requestContainer[0]));
+    }
+
+    //! Step3: Translate the data container.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int gridtypeofiZone = PHMPI::GetZoneGridType(iZone);
+
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        int count = 0;
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+            
+            int gridtypeofneighborZone = PHMPI::GetZoneGridType(neighborZone);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor == receiveProcessor)
+            {
+                DataContainer *receiveData = receivedDataBuffer[iZone][count];
+
+                //! Because get into here when currentProcessor==receiveProcessor,
+                //! so, use zoneGridSolver of neighborZone, this zone is on the current processor!
+
+                //! Decompress the interface data from data-container.
+                Grid *grid = GetGrid(neighborZone, 0);
+
+                InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+                if (!interfaceInformation)
+                {
+                    //! can not use return here, because ++count in the after
+                }
+                else
+                {
+                    if (gridtypeofiZone == UNSTRUCTGRID || gridtypeofneighborZone == UNSTRUCTGRID)
+                    {
+                        RDouble downdData = 0.0;
+                        receiveData->moveto_begin();
+                        PHRead(receiveData, downdData);
+                    }
+                    else
+                    {
+                        StructGrid *strgrid = StructGridCast(grid);
+                        strgrid->DownloadGridInfoOnlyforStructHighOrder(receiveData, iZone, mission);
+                    }
+                }
+                ++ count;
+            }
+        }
+    }
+
+    //! Step4: Free the buffers.
+    for (int iDim = 0; iDim < receivedDataBuffer.size(); ++ iDim)
+    {
+        for (int jDim = 0; jDim < receivedDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete receivedDataBuffer[iDim][jDim];
+        }
+    }
+    receivedDataBuffer.clear();
+    for (int iDim = 0; iDim < sendDataBuffer.size(); ++ iDim)
+    {
+        for (int jDim = 0; jDim < sendDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete sendDataBuffer[iDim][jDim];
+        }
+    }
+    sendDataBuffer.clear();
+    requestContainer.clear();
+}
+
+void Region::TestReconstruction()
+{
+    using namespace PHMPI;
+
+    ActionKey *actkey = new ActionKey();
+    actkey->action = TEST_RECONSTRUCTION;
+    actkey->level  = 0;
+
+    int nZones = GetNumberofGlobalZones();
+
+    int myid = GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int proc = GetZoneProcessorIDSepMode(iZone);
+
+        if (myid == proc)
+        {
+            Grid *grid = GetGrid(iZone, actkey->level);
+            grid->SkewnessSummary(actkey);
+        }
+    }
+    delete actkey;    actkey = nullptr;
+}
+
+void Region::ComputeWeight()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Zone *zone = GetZone(iZone);
+        if (!zone) continue;
+        zone->ComputeWeight();
+    }
+}
+
+LIB_EXPORT void Region::PostSimulation()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Zone *zone = GetZone(iZone);
+        if (!zone) continue;
+        int Nsolver = GlobalSolvers::GetNumberOfSolvers(iZone);
+        for (int iSolver = 0; iSolver < Nsolver; ++ iSolver)
+        {
+            GlobalSolvers::GetSolver(iZone, iSolver)->Post();
+        }
+    }
+
+    GlobalSolve();
+#ifdef USE_DEMOSOLVER
+    return;
+#endif
+    //! Temporarily, put it here. In the future, add to Post().
+    WriteVisualFile();
+    //! end
+}
+
+LIB_EXPORT void Region::InitGeometry()
+{
+    SetupMultiBlockRelationship();
+
+    InitGrids();
+
+    MultiGridSetup();
+
+    GlobalGridStatic();
+
+    DumpWallFaceCenter();
+
+    //! Map the OLD bcType to a NEW bcType.
+    ChangeBoundaryCondition();
+
+    WriteLogFile("Change boundary condition ...");
+
+    DataMonitor();
+
+    InitVariableWallTemperature();
+
+    WriteLogFile("Monitoring probes ...");
+}
+
+//! If need, change the default boundary condition to other type.
+LIB_EXPORT void Region::ChangeBoundaryCondition()
+{
+    int nMGLevel = 1;
+    GlobalDataBase::GetData("nMGLevel", &nMGLevel, PHINT, 1);
+
+    string fileName = "bin/BCMap.hypara";
+    ifstream infile(fileName.c_str(), ios::in);
+    if (!infile) return;
+
+    set< int > changedBC;
+
+    Ustar2Fantasy bcMap(fileName);
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iLevel = 0; iLevel < nMGLevel; ++ iLevel)
+    {
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            Zone *zone = GetZone(iZone);
+            if (!zone) continue;
+            Grid *grid = GetGrid(iZone, iLevel);
+            int gridtype = grid->Type();
+            if (gridtype == STRUCTGRID)
+            {
+                continue;
+            }
+            UnstructGrid *unstructGrid = UnstructGridCast(grid);
+
+            UnstructBCSet *unstructBCSet = unstructGrid->GetUnstructBCSet();
+            int nBCRegion = unstructBCSet->GetnBCRegion();
+            for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+            {
+                UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+
+                int originalBC = bcRegion->GetBCType();
+                int newBC = bcMap.TranslateBC(originalBC);
+                if (newBC != originalBC)
+                {
+                    changedBC.insert(originalBC);
+                }
+                bcRegion->SetBCType(newBC);
+
+            }
+        }
+    }
+
+    if (changedBC.size())
+    {
+        cout << "The Number of Changed Boundary Condition Type is: " << changedBC.size() << endl;
+        int count = 1;
+        for (set< int >::iterator iter = changedBC.begin(); iter != changedBC.end(); ++ iter)
+        {
+            int originalBC = (*iter);
+            int newBC = bcMap.TranslateBC(originalBC);
+            cout << "Changed BC " << count ++ << ": " << originalBC << " --> " << newBC << endl;
+        }
+    }
+}
+
+void Region::DumpProcessorGridNumber(void)
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    int number_of_processor = GetNumberOfProcessor();
+    int nZones = GetNumberofGlobalZones();
+    int *nZonesInProc = GetNZonesInProcessor();
+
+    if (! nZonesInProc)
+    {
+        nZonesInProc = new int [number_of_processor];
+    }
+
+    int *numberOfCellInProc = new int [number_of_processor];
+    for (int iProc = 0; iProc < number_of_processor; ++ iProc)
+    {
+        nZonesInProc[iProc] = 0;
+        numberOfCellInProc[iProc] = 0;
+    }
+
+    int *block_proc = GetZoneProcessorID();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Zone *zone = this->GetZone(iZone);
+        if (!zone) continue;
+        int nTotalCell = zone->GetGeometry()->GetGrid(0) -> GetNTotalCell();
+        int processor = block_proc[iZone];
+        numberOfCellInProc[processor] += nTotalCell;
+        ++ nZonesInProc[processor];
+    }
+    
+    for (int iProc = 0; iProc < number_of_processor; ++ iProc)
+    {
+        if (iProc == myid)
+        {
+            ostringstream oss;
+            oss << "In Processor " << iProc << ", Number of Zones = " << nZonesInProc[iProc] <<
+                ", Number of Cells = " << numberOfCellInProc[iProc] << endl;
+            WriteLogFile(oss);
+        }
+    }
+
+    delete [] numberOfCellInProc;
+    delete [] nZonesInProc;
+}
+
+void Region::ReSetBoundaryConditionByGlobalBC()
+{
+    vector<SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+    if (globalBCList == 0) return;
+
+    int nMGLevel = 1;
+    //��If the current task code is 0, the number of layers of the multigrid is set from the input file or it would be 1.
+    if (GetTaskCode() == SOLVE_FIELD)
+    {
+        nMGLevel = GlobalDataBase::GetIntParaFromDB("nMGLevel");
+    }
+    int nZones = PHMPI::GetNumberofGlobalZones();
+
+    for (int iLevel = 0; iLevel < nMGLevel; ++ iLevel)
+    {
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            Zone *zone = GetZone(iZone);
+            if (!zone) continue;
+
+            Grid *grid = GetGrid(iZone, iLevel);
+
+            //�� Only the unstruct grid need to be reset boundaryconditions.
+            grid->ReSetBoundaryConditionByGlobalBC();
+        }
+    }
+}
+
+void Region::GridValidityCheck()
+{
+    using namespace PHMPI;
+
+    RDouble minBox[3] = {LARGE, LARGE, LARGE};
+    RDouble maxBox[3] = {-LARGE, -LARGE, -LARGE};
+
+    int nLocalZones = PHMPI::GetNumberofLocalZones();
+
+    //! Check OpenMP threads information firstly.
+#ifdef USE_OMP
+    int systemGridType = GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+
+    if (systemGridType== MIXGRID || systemGridType== STRUCTGRID)
+    {
+        TK_Exit::ExceptionExit("The USE_OMP is only for UNSTRUCTGRID!\n");
+    }
+#ifdef WIN32
+    omp_set_num_threads(4);
+#endif
+#pragma omp parallel for
+    int myid = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+
+        if (myid == 0)
+        {
+            ostringstream oss;
+            oss << "OMP Info: zone ID = " << zoneID << ", thread ID = " << omp_get_thread_num()
+                << " of total thread num = " << omp_get_num_threads() << ", MPI ID = "
+                << myid << " of total processor num = " << omp_get_num_procs() << endl;
+            PrintToWindow(oss);
+        }
+    }
+#endif
+
+    //! Checking and computing global computational fields bounds box.
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+
+        int level = 0;
+        Grid *grid = GetGrid(zoneID, level);
+        grid->GridValidityCheck();
+
+        RDouble *gridMinBox = grid->GetMinBox();
+        RDouble *gridMaxBox = grid->GetMaxBox();
+        minBox[0] = MIN(minBox[0], gridMinBox[0]);
+        minBox[1] = MIN(minBox[1], gridMinBox[1]);
+        minBox[2] = MIN(minBox[2], gridMinBox[2]);
+
+        maxBox[0] = MAX(maxBox[0], gridMaxBox[0]);
+        maxBox[1] = MAX(maxBox[1], gridMaxBox[1]);
+        maxBox[2] = MAX(maxBox[2], gridMaxBox[2]);
+    }
+
+    RDouble globalMinBox[3], globalMaxBox[3];
+    PHSPACE::SetField(globalMinBox,  PHSPACE::LARGE, 3);
+    PHSPACE::SetField(globalMaxBox, -PHSPACE::LARGE, 3);
+    if (GetTaskCode() == CAL_WALL_DIST)
+    {
+        //! For wall distance computing, each processor need know the box.
+        PH_AllReduce(minBox, globalMinBox, 3, MPI_MIN);
+        PH_AllReduce(maxBox, globalMaxBox, 3, MPI_MAX);
+    }
+    else
+    {
+       if (IsReadWalldist() == true)
+        {
+            //! For general CFD computing, only server processor need know the box.
+            PH_Reduce(minBox, globalMinBox, 3, MPI_MIN);
+            PH_Reduce(maxBox, globalMaxBox, 3, MPI_MAX);
+        }
+        else
+        {
+            //! For wall distance computing, each processor need know the box.
+            PH_AllReduce(minBox, globalMinBox, 3, MPI_MIN);
+            PH_AllReduce(maxBox, globalMaxBox, 3, MPI_MAX);
+        }
+    }
+
+    SetGlobalMinMaxBox(globalMinBox, globalMaxBox);
+
+    if (PHMPI::GetCurrentProcessorID() == PHMPI::GetServerProcessorID())
+    {
+        cout << "Server Processor ID: " << PHMPI::GetServerProcessorID() << endl;
+        ostringstream oss;
+        oss << setiosflags(ios::right);
+        oss << setprecision(6);
+        oss << setiosflags(ios::scientific);
+        oss << setiosflags(ios::showpoint);
+        int wordwidth = 8;
+        oss << "Minimum and maximum boundary box of computational field:" << endl;
+        oss << "    xMin = " << setw(wordwidth) << globalMinBox[0] << ",  xMax = " << setw(wordwidth) << globalMaxBox[0] << "\n";
+        oss << "    yMin = " << setw(wordwidth) << globalMinBox[1] << ",  yMax = " << setw(wordwidth) << globalMaxBox[1] << "\n";
+        oss << "    zMin = " << setw(wordwidth) << globalMinBox[2] << ",  zMax = " << setw(wordwidth) << globalMaxBox[2] << "\n";
+
+        PrintToWindow(oss);
+    }
+}
+
+}
diff --git a/API/Physics/src/Residual.cpp b/API/Physics/src/Residual.cpp
new file mode 100644
index 0000000..94980f4
--- /dev/null
+++ b/API/Physics/src/Residual.cpp
@@ -0,0 +1,735 @@
+#include <cmath>
+#include <cfloat>
+#include "Geo_UnstructGrid.h"
+#include "Residual.h"
+#include "PHIO.h"
+#include "TK_Exit.h"
+#include "TK_Time.h"
+#include "Glb_Dimension.h"
+using namespace std;
+
+namespace PHSPACE
+{
+ResidualGlobal *residual = new ResidualGlobal();
+MaxResidual *maxResidual = new MaxResidual();
+
+void InitResidual()
+{
+    residual->InitResidual();
+}
+
+void CollectResidual(ActionKey *actkey)
+{
+    residual->CollectResidual(actkey);
+}
+
+void PostDumpResidual(ActionKey *actkey)
+{
+    int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    residual->DumpResidual(actkey, outIterStep);
+}
+
+Residual::Residual()
+{
+    zoneID = 0;
+    numberOfResidualVariables = 0;
+    npoint = 0;
+    x = NULL;
+    y = NULL;
+    z = NULL;
+    vol = NULL;
+    i = NULL;
+    j = NULL;
+    k = NULL;
+    maximumResidual = NULL;
+    averageResidual = NULL;
+}
+
+Residual::~Residual()
+{
+    delete []maximumResidual;
+    delete []averageResidual;
+    delete []x;
+    delete []y;
+    delete []z;
+    delete []vol;
+    delete []i;
+    delete []j;
+    delete []k;
+}
+
+void Residual::SetNvar(int numberOfResidualVariables)
+{
+    this->numberOfResidualVariables = numberOfResidualVariables;
+    maximumResidual = new RDouble [numberOfResidualVariables];
+    averageResidual = new RDouble [numberOfResidualVariables];
+    x      = new RDouble [numberOfResidualVariables];
+    y      = new RDouble [numberOfResidualVariables];
+    z      = new RDouble [numberOfResidualVariables];
+    vol    = new RDouble [numberOfResidualVariables];
+    i      = new int [numberOfResidualVariables];
+    j      = new int [numberOfResidualVariables];
+    k      = new int [numberOfResidualVariables];
+}
+
+ResidualGlobal::ResidualGlobal()
+{
+    residualNormal = NULL;
+    IsFirstStep = true;
+    residualOnEachZone = 0;
+    numberOfResidualVariables = 0;
+}
+
+ResidualGlobal::~ResidualGlobal()
+{
+
+}
+
+void ResidualGlobal::InitResidual()
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    residualOnEachZone = new Residual *[nLocalZones];
+    residualNormal = nullptr;
+}
+
+void ResidualGlobal::CollectResidual(ActionKey *actkey)
+{
+    DataContainer *cData = actkey->GetData();
+    cData->moveto_begin();
+    int nLocalZones = PHMPI::GetNumberofLocalZones();
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int nVar;
+        PHRead(cData, nVar);
+
+        RDouble *zoneNorm = new RDouble [nVar];
+        PHRead(cData, zoneNorm, nVar);
+
+        residualOnEachZone[iZone] = new Residual();
+        residualOnEachZone[iZone]->SetNvar(nVar);
+        residualOnEachZone[iZone]->SetZoneID(iZone);
+
+        RDouble *averageResidual = residualOnEachZone[iZone]->GetAverageResidual();
+        int numberOfResidualVar = residualOnEachZone[iZone]->GetNvar();
+        for (int m = 0; m < numberOfResidualVar; ++ m)
+        {
+            averageResidual[m] = zoneNorm[m];
+        }
+
+        delete [] zoneNorm;    zoneNorm = nullptr;
+    }
+
+    //! Residual summary of this processor.
+    numberOfResidualVariables = residualOnEachZone[0]->GetNvar();
+    RDouble *localNorm = new RDouble[numberOfResidualVariables];
+
+    ComputeResidualNorm(localNorm);
+
+    int myid   = PHMPI::GetCurrentProcessorID();
+    int server = PHMPI::GetServerProcessorID();
+
+    if(myid == server && residualNormal == NULL)
+    {
+        residualNormal = new RDouble[numberOfResidualVariables];
+    }
+
+    if(PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_Reduce(localNorm, residualNormal, numberOfResidualVariables, PH_SUM);
+
+        maxResidual->ServerCollection();
+    }
+    else
+    {
+        for(int iVar = 0; iVar < numberOfResidualVariables; ++ iVar)
+        {
+            residualNormal[iVar] = localNorm[iVar];
+        }
+    }
+    delete [] localNorm;    localNorm = nullptr;
+
+    if(myid != server)
+    {
+        FreeMemory();
+    }
+}
+
+void ResidualGlobal::ComputeResidualNorm(RDouble *localNorm)
+{
+    numberOfResidualVariables = residualOnEachZone[0]->GetNvar();
+
+    for (int m = 0; m < numberOfResidualVariables; ++ m)
+    {
+        localNorm[m] = 0.0;
+    }
+
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        RDouble *averageResidual = residualOnEachZone[iZone]->GetAverageResidual();
+        for (int m = 0; m < numberOfResidualVariables; ++ m)
+        {
+            localNorm[m] += averageResidual[m];
+        }
+    }
+}
+
+void ResidualGlobal::PrepareFormatedResidual(int outnstep, string &formatRes)
+{
+    ostringstream oss;
+
+    oss << setiosflags(ios::left);
+    oss << setprecision(5);
+    oss << setiosflags(ios::scientific);
+    oss << setiosflags(ios::showpoint);
+
+    oss << setw(7) << outnstep << "    ";
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if(isUnsteady)
+    {
+        //! Unsteady.
+        int innerStep = GlobalDataBase::GetIntParaFromDB("innstep");
+        oss << setw(7) << innerStep;
+    }
+
+    RDouble resAverage = 0.0;
+    RDouble globalTotalCells = GlobalDataBase::GetDoubleParaFromDB("GlobalTotalCells");
+
+   //for (int m = 0; m < numberOfResidualVariables; ++ m)
+   //{
+   //  if((residualNormal[m] != residualNormal[m]) || fabs(residualNormal[m]) > LARGE 
+   //      || std::isnan(residualNormal[m]) || std::isinf(residualNormal[m]))
+   //  {
+   //      cout << "residual residualNormal[" << m << "] = " << residualNormal[m] << ", on level " << level << endl;
+   //      TK_Exit::ExceptionExit("Error: residual divergence!");
+   //  }
+   //  //resAverage += residualNormal[m];
+   //}
+    //resAverage = resAverage / numberOfResidualVariables;
+
+    resAverage += residualNormal[0];
+    resAverage = sqrt(resAverage / globalTotalCells);
+    oss << resAverage << "    ";
+
+    RDouble maximumResidual = maxResidual->GetMaxRes();
+    RDouble maxResCoorX = maxResidual->GetMaxResCoorX();
+    RDouble maxResCoorY = maxResidual->GetMaxResCoorY();
+    RDouble maxResCoorZ = maxResidual->GetMaxResCoorZ();
+    int maxResIndexM = maxResidual->GetMaxResVariableIndex();
+    
+    oss << sqrt(maximumResidual) << "    ";
+    oss << maxResCoorX << "    ";
+    oss << maxResCoorY << "    ";
+    oss << maxResCoorZ << "    ";
+    oss << maxResIndexM << "    ";
+
+    RDouble step_time = PHSPACE::TIME_SPACE::GetWallTime();
+    oss << step_time << endl;
+
+    formatRes = oss.str();
+}
+
+void ResidualGlobal::PrintResidualtoWindow(int outnstep, string &formatRes)
+{
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    int intervalStepRes = GlobalDataBase::GetIntParaFromDB("intervalStepRes");
+
+    if (numberOfResidualVariables == 1 || numberOfResidualVariables == 2 || numberOfResidualVariables == 4)
+    {
+        return;
+    }
+
+    bool dumpTitle = true;    //! Print the NS-equations residual to window only.
+    if (isUnsteady)
+    {
+        int innerStep = GlobalDataBase::GetIntParaFromDB("innstep");
+        if (innerStep != 1)
+        {
+            dumpTitle = false;
+        }
+    }
+
+    std::ostringstream oss;
+    if (((outnstep / intervalStepRes) % 20 == 1 || IsFirstStep) && dumpTitle)
+    {
+        oss << endl;
+        oss << "Iter" << setw(12);
+        
+        if (isUnsteady)
+        {
+            //! Unsteady.
+            oss << "Sub-iter" << setw(12);
+        }
+        oss << "    averageRes"  << "    ";
+        oss << "    maxRes"      << "    ";
+        oss << "    maxResCoorX" << "    ";
+        oss << "    maxResCoorY" << "    ";
+        oss << "    maxResCoorZ" << "    ";
+        oss << "maxResVariable"  << "   ";
+        oss << "WallTime";
+        oss << endl;
+
+        IsFirstStep = false;
+    }
+
+    oss << formatRes;
+
+    cout << oss.str();
+}
+
+void ResidualGlobal::OutResResidualNorm(fstream &file, string &formatRes, std::ostringstream &oss)
+{
+    if (IfFileEmpty(file))
+    {
+        vector<string> title_tecplot;
+        title_tecplot.push_back("Title=\"THE RESIDUAL\"");
+        title_tecplot.push_back("Variables=");
+        title_tecplot.push_back("\"iter\"");
+
+        int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+        if (isUnsteady == 1)
+        {
+            //! Unsteady.
+            title_tecplot.push_back("\"Sub-iter\"");
+        }
+
+        title_tecplot.push_back("\"averageRes\"");
+
+        title_tecplot.push_back("\"maxRes\"");
+        title_tecplot.push_back("\"maxResCoorX\"");
+        title_tecplot.push_back("\"maxResCoorY\"");
+        title_tecplot.push_back("\"maxResCoorZ\"");
+        title_tecplot.push_back("\"maxResVariable\"");
+        title_tecplot.push_back("\"WallTime\"");
+
+        for (std::size_t i = 0; i < title_tecplot.size(); ++ i)
+        {
+            oss << title_tecplot[i] << "\n";
+        }
+    }
+
+    oss << formatRes;
+}
+
+void ResidualGlobal::FreeMemory()
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        delete residualOnEachZone[iZone];    residualOnEachZone[iZone] = nullptr;
+    }
+    delete [] residualOnEachZone;    residualOnEachZone = nullptr;
+
+    if (residualNormal != nullptr)
+    {
+        delete [] residualNormal;    residualNormal = nullptr;
+    }
+    residualNormal = nullptr;
+}
+
+void ResidualGlobal::DumpResidual(ActionKey *actkey, int outnstep)
+{
+    string formatRes;
+    PrepareFormatedResidual(outnstep, formatRes);
+
+    PrintResidualtoWindow(outnstep, formatRes);
+
+    if (!actkey->IsNeedOpenFile())
+    {
+        return;
+    }
+
+    ParallelOpenFile(actkey);
+
+    fstream &file = *actkey->file;
+    std::ostringstream oss;
+    OutResResidualNorm(file, formatRes, oss);
+    WriteASCIIFile(file, oss.str());
+    ParallelCloseFile(actkey);
+
+    FreeMemory();
+}
+
+MaxResidual::MaxResidual()
+{
+    data = new DataContainer();
+}
+
+MaxResidual::~MaxResidual()
+{
+    DeleteMamory();
+}
+
+void MaxResidual::Init()
+{
+    DeleteMamory();
+    InitMamory();
+}
+
+void MaxResidual::InitMamory()
+{
+    x = 0.0;
+    y = 0.0;
+    z = 0.0;
+
+    maxResVariableIndex = 0;
+
+    maximumResidual = TINY;
+
+    data = new DataContainer();
+}
+
+void MaxResidual::DeleteMamory()
+{
+    if (data != NULL)
+    {
+        delete data;
+    }
+}
+
+void MaxResidual::ServerCollection()
+{
+    int server = PHMPI::GetServerProcessorID();
+    int myid   = PHMPI::GetCurrentProcessorID();
+
+    typedef struct
+    {
+        RDouble val;
+        int rank;
+    }maxResidualAndRank;
+    
+    maxResidualAndRank obj1, obj2;
+    obj1.val = maximumResidual;
+    obj1.rank = myid;
+    MPI_Allreduce(&obj1, &obj2, 1, MPI_DOUBLE_INT, MPI_MAXLOC, MPI_COMM_WORLD);
+    if (server != obj2.rank)
+    {
+        int tag = obj2.rank;
+        if (myid == obj2.rank)
+        {
+            DataContainer *cData = new DataContainer();
+            cData->moveto_begin();
+
+            PHWrite(cData, myid);
+            PHWrite(cData, maximumResidual);
+            PHWrite(cData, x);
+            PHWrite(cData, y);
+            PHWrite(cData, z);
+            PHWrite(cData, maxResVariableIndex);
+
+            send(cData, server, tag);
+            delete cData;
+        }
+        if (myid == server)
+        {
+            DataContainer *cData = new DataContainer();
+            cData->moveto_begin();
+            receive(cData, obj2.rank, tag);
+
+            cData->moveto_begin();
+            int processorOfmaxResRecv = 0;
+            RDouble maxResRecv, xRecv, yRecv, zRecv;
+            int maxResVariableIndexRecv;
+
+            PHRead(cData, processorOfmaxResRecv);
+            PHRead(cData, maxResRecv);
+            PHRead(cData, xRecv);
+            PHRead(cData, yRecv);
+            PHRead(cData, zRecv);
+            PHRead(cData, maxResVariableIndexRecv);
+
+            processorOfMaxResidual = processorOfmaxResRecv;
+            maximumResidual = maxResRecv;
+            x = xRecv;
+            y = yRecv;
+            z = zRecv;
+            maxResVariableIndex = maxResVariableIndexRecv;
+
+            delete cData;
+        }
+    }
+    PH_Barrier();
+}
+
+int MaxResidual::GetProcessorOfMaxResidual()
+{
+    return this->processorOfMaxResidual;
+};
+
+RDouble MaxResidual::GetMaxRes()
+{
+    return this->maximumResidual;
+};
+
+RDouble MaxResidual::GetMaxResCoorX()
+{
+    return this->x;
+};
+
+RDouble MaxResidual::GetMaxResCoorY()
+{
+    return this->y;
+};
+
+RDouble MaxResidual::GetMaxResCoorZ()
+{
+    return this->z;
+};
+
+int MaxResidual::GetMaxResVariableIndex()
+{
+    return this->maxResVariableIndex;
+};
+
+void MaxResidual::SetProcessorOfMaxResidual(const int &processorOfMaxResidualIn)
+{
+    this->processorOfMaxResidual = processorOfMaxResidualIn;
+}
+
+void MaxResidual::SetMaxRes(const RDouble &maxResIn)
+{
+   maximumResidual = maxResIn;
+};
+
+void MaxResidual::SetMaxResCoorX(const RDouble &xIn)
+{
+    x = xIn;
+};
+
+void MaxResidual::SetMaxResCoorY(const RDouble &yIn)
+{
+    y = yIn;
+};
+
+void MaxResidual::SetMaxResCoorZ(const RDouble &zIn)
+{
+    z = zIn;
+};
+
+void MaxResidual::setMaxResVariableIndex(const int &maxResVariableIndexIn)
+{
+    maxResVariableIndex = maxResVariableIndexIn;
+};
+
+void InitMaxResidual()
+{
+    maxResidual->Init();
+}
+
+void ComputeResidualonGrid(UnstructGrid *grid, ActionKey *actkey, RDouble **dq, int nEquation)
+{
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    vector <RDouble> residualNormal(nEquation);
+
+    //! Initialization.
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        residualNormal[m] = 0.0;
+    }
+
+    RDouble maximumResidual = maxResidual->GetMaxRes();
+
+    RDouble maxResLocal = maximumResidual;
+    RDouble maxResCoorXLocal, maxResCoorYLocal, maxResCoorZLocal;
+    int maxResIndexMLocal;
+    RDouble reynoldsReferenceLengthDimensional = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+    RDouble gridScaleUnit = reynoldsReferenceLengthDimensional;
+
+    if (GetDim() == THREE_D)
+    {
+        gridScaleUnit *= reynoldsReferenceLengthDimensional;
+    }
+
+    bool maxResChange = false;
+
+    int *cellIBlank = grid->GetBlankIndex();
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        if (cellIBlank[iCell] != 1)
+        {
+            continue;
+        }
+
+        for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+        {
+            RDouble dResm = dq[iEquation][iCell] * gridScaleUnit;
+            RDouble res2 = dResm * dResm;
+            residualNormal[iEquation] += res2;
+            if(isErrorData(residualNormal[iEquation]))
+            {
+                int iZone = grid->GetZoneID();
+                PrintToWindow("residualNormal[", iEquation, "] = ", residualNormal[iEquation]);
+                PrintToWindow("\n");
+                PrintToWindow("iZone = ", iZone, "\n");
+                PrintToWindow("iCell = ", iCell, "\n");
+                WriteLogFile("residual residualNormal ", iEquation, residualNormal[iEquation], true);
+                WriteLogFile("iZone i = ", iZone, iEquation, true);
+                TK_Exit::ExceptionExit("Error: residual divergence!\n", true);
+            }
+
+            if (res2 > maxResLocal)
+            {
+                maxResChange = true;
+
+                maxResLocal = res2;
+
+                maxResCoorXLocal = xcc[iCell];
+                maxResCoorYLocal = ycc[iCell];
+                maxResCoorZLocal = zcc[iCell];
+
+                maxResIndexMLocal = iEquation;
+            }
+        }
+    }
+
+    if (maxResChange)
+    {
+        maxResidual->SetMaxRes(maxResLocal);
+        maxResidual->SetMaxResCoorX(maxResCoorXLocal);
+        maxResidual->SetMaxResCoorY(maxResCoorYLocal);
+        maxResidual->SetMaxResCoorZ(maxResCoorZLocal);
+        maxResidual->setMaxResVariableIndex(maxResIndexMLocal);
+    }
+
+    DataContainer *cData = actkey->GetData();
+    PHWrite(cData, nEquation);
+    PHWrite(cData, residualNormal, nEquation);
+}
+
+void ComputeResidualonGrid(StructGrid *grid, ActionKey *actkey, RDouble4D &dq, int nEquation)
+{
+    RDouble *residualNormal = new RDouble[nEquation];
+
+    //! Initialization.
+    for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+    {
+        residualNormal[iEquation] = 0.0;
+    }
+
+    RDouble3D &xcc = *grid->GetCellCenterX();
+    RDouble3D &ycc = *grid->GetCellCenterY();
+    RDouble3D &zcc = *grid->GetCellCenterZ();
+    RDouble reynoldsReferenceLengthDimensional = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+    RDouble gridScaleUnit = reynoldsReferenceLengthDimensional;
+
+    int nDebug = 0;
+    if (GlobalDataBase::IsExist("nDebug", PHINT, 1))
+    {
+        nDebug = GlobalDataBase::GetIntParaFromDB("nDebug");
+    }
+
+    if (GetDim() == THREE_D)
+    {
+        gridScaleUnit *= reynoldsReferenceLengthDimensional;
+    }
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    RDouble maximumResidual = maxResidual->GetMaxRes();
+
+    RDouble maxResLocal = maximumResidual;
+    RDouble maxResCoorXLocal, maxResCoorYLocal, maxResCoorZLocal;
+    int maxResIndexMLocal;
+    bool maxResChange = false;
+    int iMax = 0, jMax = 0, kMax = 0, mMax = 0;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int m = mst; m <= med; ++ m)
+                {
+                    RDouble dResm = dq(i, j, k, m) * gridScaleUnit;
+                    RDouble res2 = dResm * dResm;
+                    residualNormal[m] += res2;
+                    if(isErrorData(residualNormal[m]))
+                    {
+                        int iZone = grid->GetZoneID();
+                        PrintToWindow("residualNormal[", m, "] = ", residualNormal[m]);
+                        PrintToWindow("\n");
+                        PrintToWindow("iZone = ", iZone, "\n");
+                        PrintToWindow("i = ", i, "\n");
+                        PrintToWindow("j = ", j, "\n");
+                        PrintToWindow("k = ", k, "\n");
+                        PrintToWindow("xc = ", xcc(i, j, k), "\n");
+                        PrintToWindow("yc = ", ycc(i, j, k), "\n");
+                        PrintToWindow("zc = ", zcc(i, j, k), "\n");
+                        WriteLogFile("residual residualNormal ",m, residualNormal[m], true);
+                        WriteLogFile("iZone = ",iZone, true);
+                        WriteLogFile("i j k = ", i ,j, k, true);
+                        WriteLogFile("xc yc zc = ", xcc(i, j, k) ,ycc(i, j, k), zcc(i, j, k), true);
+                        TK_Exit::ExceptionExit("Error: residual divergence!\n", true);
+                    }
+
+                    if (res2 > maxResLocal)
+                    {
+                        maxResChange = true;
+
+                        maxResLocal = res2;
+
+                        iMax = i;
+                        jMax = j;
+                        kMax = k;
+                        mMax = m;
+
+                        maxResCoorXLocal = xcc(i, j, k);
+                        maxResCoorYLocal = ycc(i, j, k);
+                        maxResCoorZLocal = zcc(i, j, k);
+                        
+                        maxResIndexMLocal = m;
+                    }
+                }
+            }
+        }
+    }
+
+    if (nDebug == 1 && maxResChange == true)
+    {
+        int iZone = grid->GetZoneID();
+        PrintToWindow("\n","Maxres_izone = ", iZone, "\n");
+        PrintToWindow("Maxres_i = ", iMax, "\n");
+        PrintToWindow("Maxres_j = ", jMax, "\n");
+        PrintToWindow("Maxres_k = ", kMax, "\n");
+        PrintToWindow("Maxres_m = ", mMax, "\n");
+        PrintToWindow("Maxres = ", maxResLocal,"\n","\n");
+    }
+    
+    if (maxResChange)
+    {
+        maxResidual->SetMaxRes(maxResLocal);
+        maxResidual->SetMaxResCoorX(maxResCoorXLocal);
+        maxResidual->SetMaxResCoorY(maxResCoorYLocal);
+        maxResidual->SetMaxResCoorZ(maxResCoorZLocal);
+        maxResidual->setMaxResVariableIndex(maxResIndexMLocal);
+    }
+
+    DataContainer *cData = actkey->GetData();
+    PHWrite(cData, nEquation);
+    PHWrite(cData, residualNormal, nEquation);
+
+    delete []residualNormal;
+}
+
+}
diff --git a/API/Physics/src/SixDOF.cpp b/API/Physics/src/SixDOF.cpp
new file mode 100644
index 0000000..1fe0ba8
--- /dev/null
+++ b/API/Physics/src/SixDOF.cpp
@@ -0,0 +1,657 @@
+#include "PHMpi.h"
+#include "SixDOF.h"
+#include "Force.h"
+#include "AleForceManager.h"
+#include "Zone.h"
+#include "GlobalDataBase.h"
+#include "GridType.h"
+#include "PHHeader.h"
+#include "Math_BasisFunction.h"
+#include "PHSuperMatrix.h"
+#include "TK_Log.h"
+
+
+namespace PHSPACE
+{
+PHRigidBodyMovement RigidBodyMovement;
+
+PHRigidBodyMovement::PHRigidBodyMovement()
+{
+    massCenterOfAircraft    = new PHSuperMatrix(3);
+    inertiaTensorOfAircraft = new PHSuperMatrix(3, 3);   //  moment of inertia of aircraft
+    reverseOfInertiaTensor  = new PHSuperMatrix(3, 3);   //  the inverse matrix of moment of inertia
+
+    // the data changed with the flow solvers.
+    // input��force and moment coefficient.
+    aerodynamicForce  = new PHSuperMatrix(3);  //! aerodynamic force.
+    aerodynamicMoment = new PHSuperMatrix(3);  //! aerodynamic moment.
+    otherForceSum     = new PHSuperMatrix(3);
+    otherMomentSum    = new PHSuperMatrix(3);
+
+    eulerAngle             = new PHSuperMatrix(3);
+    eulerAngleRate         = new PHSuperMatrix(3, 3);
+    eulerAngleAcceleration = new PHSuperMatrix(3);
+
+    transformMatrixCurrent = new PHSuperMatrix(3, 3);
+    transformMatrixLastTime    = new PHSuperMatrix(3, 3);
+
+    momentOfInertia        = new PHSuperMatrix(3, 3);
+    bodyAngleRate          = new PHSuperMatrix(3);
+    bodyAngleAcceleration  = new PHSuperMatrix(3);
+}
+
+PHRigidBodyMovement::~PHRigidBodyMovement()
+{
+    delete massCenterOfAircraft;
+    delete inertiaTensorOfAircraft;
+    delete reverseOfInertiaTensor;
+
+    delete aerodynamicForce;
+    delete aerodynamicMoment;
+    delete otherForceSum;
+    delete otherMomentSum;
+    delete eulerAngle;
+    delete eulerAngleRate;
+    delete eulerAngleAcceleration;
+
+    delete transformMatrixCurrent;
+    delete transformMatrixLastTime;
+    delete momentOfInertia;
+    delete bodyAngleRate;
+    delete bodyAngleAcceleration;
+}
+
+void PHRigidBodyMovement::UpdateCoordinate(Grid * gridIn)
+{
+    StructGrid * grid = static_cast<StructGrid* >(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble3D& x = *grid->GetStructX();
+    RDouble3D& y = *grid->GetStructY();
+    RDouble3D& z = *grid->GetStructZ();
+
+    PHSuperMatrix xyzc = * massCenterOfAircraft;
+    PHSuperMatrix dxyz(3);
+    PHSuperMatrix xyz(3);
+
+    PHSuperMatrix & transformMatrixCurrent  = * this->transformMatrixCurrent;
+    PHSuperMatrix & transformMatrixLastTime = * this->transformMatrixLastTime;
+
+    PHSuperMatrix matrix = PHSPACE::TransposeMatrix(transformMatrixCurrent) * transformMatrixLastTime;
+
+    for (int k = 1; k <= nk; ++ k)
+    {
+        for (int j = 1; j <= nj; ++ j)
+        {
+            for (int i = 1; i <= ni; ++ i)
+            {
+                dxyz(1) = x(i, j, k) - xyzc(1);
+                dxyz(2) = y(i, j, k) - xyzc(2);
+                dxyz(3) = z(i, j, k) - xyzc(3);
+
+                xyz = matrix * dxyz;
+
+                x(i, j, k) = xyz(1) + xyzc(1);
+                y(i, j, k) = xyz(2) + xyzc(2);
+                z(i, j, k) = xyz(3) + xyzc(3);
+            }
+        }
+    }
+
+    return;
+}
+
+void PHRigidBodyMovement::UpdateGridVelocity(Grid * gridIn)
+{
+    StructGrid* grid = static_cast<StructGrid* >(gridIn);
+
+    PHSuperMatrix velocityCellface(3);
+
+    RDouble4D& faceNormalX = *(grid->GetFaceNormalX());
+    RDouble4D& faceNormalY = *(grid->GetFaceNormalY());
+    RDouble4D& faceNormalZ = *(grid->GetFaceNormalZ());
+    RDouble4D& faceNormalVelocity = *(grid->GetFaceNormalVelocity());
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble xt, yt, zt, kt;
+    int nd;
+
+    nd = 1;
+    for (int k = 1; k < nk; ++ k)
+    {
+        for (int j = 1; j < nj; ++ j)
+        {
+            for (int i = 1; i <= ni; ++ i)
+            {
+                velocityCellface = CalculateGridCellFaceVelocity(grid, i, j, k, nd);
+
+                xt = velocityCellface(1);
+                yt = velocityCellface(2);
+                zt = velocityCellface(3);
+
+                kt = - (xt * faceNormalX(i, j, k, nd) + 
+                         yt * faceNormalY(i, j, k, nd) + 
+                         zt * faceNormalZ(i, j, k, nd));
+                    
+                faceNormalVelocity(i, j, k, nd) = kt;
+            }
+        }
+    }
+
+    nd = 2;
+    for (int k = 1; k < nk; ++ k)
+    {
+        for (int i = 1; i < ni; ++ i)
+        {
+            for (int j = 1; j <= nj; ++ j)
+            {
+                velocityCellface = CalculateGridCellFaceVelocity(grid, i, j, k, nd);
+
+                xt = velocityCellface(1);
+                yt = velocityCellface(2);
+                zt = velocityCellface(3);
+
+                kt = - (xt * faceNormalX(i, j, k, nd) + 
+                         yt * faceNormalY(i, j, k, nd) + 
+                         zt * faceNormalZ(i, j, k, nd));
+                    
+                faceNormalVelocity(i, j, k, nd) = kt;
+            }
+        }
+    }
+
+    nd = 3;
+    for (int j = 1; j < nj; ++ j)
+    {
+        for (int i = 1; i < ni; ++ i)
+        {
+            for (int k = 1; k <= nk; ++ k)
+            {
+                velocityCellface = CalculateGridCellFaceVelocity(grid, i, j, k, nd);
+
+                xt = velocityCellface(1);
+                yt = velocityCellface(2);
+                zt = velocityCellface(3);
+
+                kt = - (xt * faceNormalX(i, j, k, nd) +
+                         yt * faceNormalY(i, j, k, nd) + 
+                         zt * faceNormalZ(i, j, k, nd));
+                    
+                faceNormalVelocity(i, j, k, nd) = kt;
+            }
+        }
+    }
+}
+
+void PHRigidBodyMovement::InitializeAircraftProperty()
+{
+    //! init.
+    InitializeAerodynamicForce();
+
+    RDouble massCenter[3];
+    GlobalDataBase::GetData("massCenter", &massCenter, PHDOUBLE, 3);
+    PHSuperMatrix& massCenterOfAircraft = *this->massCenterOfAircraft;
+    massCenterOfAircraft(1) = massCenter[0];
+    massCenterOfAircraft(2) = massCenter[1];
+    massCenterOfAircraft(3) = massCenter[2];
+
+    RDouble massMatrix[6];
+    GlobalDataBase::GetData("massMatrix", &massMatrix, PHDOUBLE, 6);
+
+    PHSuperMatrix& inertiaTensorOfAircraft = *this->inertiaTensorOfAircraft;
+    inertiaTensorOfAircraft(1, 1) = massMatrix[0];
+    inertiaTensorOfAircraft(2, 2) = massMatrix[1];
+    inertiaTensorOfAircraft(3, 3) = massMatrix[2];
+
+    //Ixy = Iyx
+    inertiaTensorOfAircraft(1, 2) = massMatrix[3];
+    inertiaTensorOfAircraft(2, 1) = massMatrix[3];
+
+    //Ixz = Izx
+    inertiaTensorOfAircraft(1, 3) = massMatrix[4];
+    inertiaTensorOfAircraft(3, 1) = massMatrix[4];
+
+    //Iyz = Izy
+    inertiaTensorOfAircraft(2, 3) = massMatrix[5];
+    inertiaTensorOfAircraft(3, 2) = massMatrix[5];
+
+    massOfAircraft = GlobalDataBase::GetDoubleParaFromDB("mass");
+
+    RDouble attitudeAngle[3];
+    GlobalDataBase::GetData("attitudeAngle", &attitudeAngle, PHDOUBLE, 3);
+    massCenterOfAircraft(1) = attitudeAngle[0];
+    massCenterOfAircraft(2) = attitudeAngle[1];
+    massCenterOfAircraft(3) = attitudeAngle[2];
+
+    RDouble referenceAreaOfAerodynamicForce    = GlobalDataBase::GetDoubleParaFromDB("forceReferenceArea");
+    RDouble referenceLengthOfAerodynamicMoment = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLength");
+
+    RDouble refDimensionalDensity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+
+    densityRef = refDimensionalDensity;
+    areaRef    = referenceAreaOfAerodynamicForce;
+    lengthRef  = referenceLengthOfAerodynamicMoment;
+}
+
+void PHRigidBodyMovement::InitializeEulerAngleInformation()
+{
+    //! init the Euler angle information.
+    PHSuperMatrix & eulerAngle             = * this->eulerAngle;
+    PHSuperMatrix & eulerAngleRate         = * this->eulerAngleRate;
+    PHSuperMatrix & eulerAngleAcceleration = * this->eulerAngleAcceleration;
+
+    for (int i = 1; i <= 3 ; ++ i)
+    {
+        eulerAngle(i) = 0.0; 
+        for (int j = 1; j <= 3; ++ j)
+        {
+            eulerAngleRate(i, j) = 0.0;
+        }
+        eulerAngleAcceleration(i) = 0.0;      
+    }
+}
+
+void PHRigidBodyMovement::CalculationOfMatrix()
+{
+    PHSuperMatrix & eulerAngle = * this->eulerAngle;
+
+    RDouble pitchAngle = eulerAngle(1);
+    RDouble yawAngle   = eulerAngle(2);
+    RDouble rollAngle  = eulerAngle(3);
+
+    PHSuperMatrix & transformMatrixCurrent = * this->transformMatrixCurrent;
+    PHSuperMatrix & transformMatrixLastTime    = * this->transformMatrixLastTime;
+
+    transformMatrixCurrent = 
+        BaseMatrixOfRotate(rollAngle ,"x") * 
+        BaseMatrixOfRotate(pitchAngle,"z") * 
+        BaseMatrixOfRotate(yawAngle  ,"y");
+
+    transformMatrixLastTime = transformMatrixCurrent;
+
+    AngleRateTransformMatrixBodyToGlobal(eulerAngle,"y-z-x");
+
+}
+
+void PHRigidBodyMovement::NondimensionalOf6DOF()
+{
+    //! non-dimensional six DOF equations.
+    RDouble MassRef, InertiaRef;
+
+    MassRef    = 0.5 * densityRef * areaRef * lengthRef;
+    InertiaRef = MassRef;
+
+    massOfAircraft /= MassRef;
+
+    PHSuperMatrix & inertiaTensorOfAircraft = * this->inertiaTensorOfAircraft;
+
+    for (int i = 1; i <= 3; ++ i)
+    {
+        for (int j = 1; j <= 3; ++ j)
+        {
+            inertiaTensorOfAircraft(i, j) /= InertiaRef;
+        }
+    }
+
+    PHSuperMatrix & reverseOfInertiaTensor = * this->reverseOfInertiaTensor;
+    reverseOfInertiaTensor = Matrix3X3Inverse(inertiaTensorOfAircraft);
+}
+
+void PHRigidBodyMovement::GetReferenceValue()
+{
+    //! Get non-dimensional reference values.
+    RDouble referenceAreaOfAerodynamicForce = GlobalDataBase::GetDoubleParaFromDB("forceReferenceArea");
+    RDouble referenceLengthOfAerodynamicMoment = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLength");
+
+    RDouble referenceDimensionalDensity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+
+    densityRef = referenceDimensionalDensity;
+    areaRef    = referenceAreaOfAerodynamicForce;
+    lengthRef  = referenceLengthOfAerodynamicMoment;
+}
+
+void PHRigidBodyMovement::AerodynamicsInCFDSolver()
+{
+    int bodyIndex = 0;
+    AerodynamicForce * aerodynamicForce = PHSPACE::GetCurrentAerodynamicForce(bodyIndex);
+
+    //! Get aerodynamic coefficients.
+    PHSuperMatrix & aerodynamicForceCoefficient = * this->aerodynamicForce;
+    aerodynamicForceCoefficient(1) = aerodynamicForce->GetForceCoefficientX();
+    aerodynamicForceCoefficient(2) = aerodynamicForce->GetForceCoefficientY();
+    aerodynamicForceCoefficient(3) = aerodynamicForce->GetForceCoefficientZ();
+
+    PHSuperMatrix & aerodynamicMomentCoefficient = * this->aerodynamicMoment;
+
+    aerodynamicMomentCoefficient(1) = aerodynamicForce->GetMomentCoefficientX();
+    aerodynamicMomentCoefficient(2) = aerodynamicForce->GetMomentCoefficientY();
+    aerodynamicMomentCoefficient(3) = aerodynamicForce->GetMomentCoefficientZ();
+}
+
+void PHRigidBodyMovement::UpdateDynamicInfo6DOF()
+{
+    //! update the six DOF dynamic information, include Euler angle solution and coordinates.
+    UpdateOfInertia();
+    CalculateAngleRateOfBody();
+    CalculateEulerAngleRate();
+    CalculateEulerAngle();
+    CalculateEulerAngleAcceleration();
+    CalculateAngleOfAttackAndSlide();
+    CalculationOfMatrix();
+}
+
+void PHRigidBodyMovement::InitializeInertia()          
+{
+    PHSuperMatrix newMomentOfInertia(3);
+
+    PHSuperMatrix & inertiaTensorOfAircraft = * this->inertiaTensorOfAircraft;
+    PHSuperMatrix & momentOfInertia = * this->momentOfInertia;
+    PHSuperMatrix & bodyAngleRate   = * this->bodyAngleRate;
+
+    newMomentOfInertia = inertiaTensorOfAircraft * bodyAngleRate;
+
+    for (int i = 1; i <= 3; ++ i)
+    {
+        momentOfInertia(i, 1) = newMomentOfInertia(i);
+        momentOfInertia(i, 2) = momentOfInertia(i, 1);
+        momentOfInertia(i, 3) = momentOfInertia(i, 2);
+    }
+}
+
+void PHRigidBodyMovement::UpdateOfInertia()          
+{
+    //! update the angular momentum information.
+    RDouble c1, c2, c3;
+
+    c1 =  1.5 / currentMarchTimeStep;
+    c2 = -2.0 / currentMarchTimeStep;
+    c3 =  0.5 / currentMarchTimeStep;
+
+    PHSuperMatrix currentInertia(3);
+    PHSuperMatrix newMomentOfInertia(3);
+
+    PHSuperMatrix & momentOfInertia = * this->momentOfInertia;
+    PHSuperMatrix & bodyAngleRate   = * this->bodyAngleRate;
+
+    for (int i = 1; i <= 3; ++ i)
+    {
+        currentInertia(i) = momentOfInertia(i, 1);
+    }
+
+    PHSuperMatrix crossResult = CrossProductVector(bodyAngleRate, currentInertia);
+
+    PHSuperMatrix & aerodynamicMoment = * this->aerodynamicMoment;
+    PHSuperMatrix & otherMomentSum    = * this->otherMomentSum;
+
+    for (int i = 1; i <= 3; ++ i)
+    {
+        newMomentOfInertia(i) = ( aerodynamicMoment(i) + otherMomentSum(i) 
+                                    - crossResult(i)
+                                    - c2 * currentInertia(i) - c3 * momentOfInertia(2, 1)
+                                   ) / c1;
+    }
+
+    for (int i = 1; i <= 3; ++ i)
+    {
+        momentOfInertia(i, 3) = momentOfInertia(i, 2);
+        momentOfInertia(i, 2) = momentOfInertia(i, 1);
+        momentOfInertia(i, 1) = newMomentOfInertia(i);
+    }
+}
+
+void PHRigidBodyMovement::CalculateAngleRateOfBody()          
+{
+    //! calculate the angular velocity of the projectile coordinate system.
+
+    PHMatrix< RDouble > currentInertia(3);
+
+    PHSuperMatrix & momentOfInertia = * this->momentOfInertia;
+
+    for (int i = 1; i <= 3; ++ i)
+    {
+        currentInertia(i) = momentOfInertia(i, 1);
+    }
+
+    PHSuperMatrix & inertiaTensorOfAircraft = * this->inertiaTensorOfAircraft;
+    PHSuperMatrix & bodyAngleRate   = * this->bodyAngleRate;
+
+    bodyAngleRate = Matrix3X3Inverse(inertiaTensorOfAircraft) * currentInertia;
+
+}
+
+void PHRigidBodyMovement::CalculateEulerAngleRate()          
+{
+    //! calculate the angular velocity of the coordinate system.
+
+    PHSuperMatrix newAnglerate(3);
+
+    PHSuperMatrix & transformMatrixCurrent = * this->transformMatrixCurrent;
+    PHSuperMatrix & bodyAngleRate   = * this->bodyAngleRate;
+
+    newAnglerate = PHSPACE::TransposeMatrix(transformMatrixCurrent) * bodyAngleRate;
+
+    PHSuperMatrix & eulerAngleRate = * this->eulerAngleRate;
+
+    for (int i = 1; i <= 3; ++ i)
+    {
+        eulerAngleRate(i, 3) = eulerAngleRate(i, 2);
+        eulerAngleRate(i, 2) = eulerAngleRate(i, 1);
+        eulerAngleRate(i, 1) = newAnglerate(i);
+    }
+}
+
+void PHRigidBodyMovement::CalculateEulerAngle()
+{
+    //! Calculate the euler angle.
+
+    PHSuperMatrix & eulerAngle = * this->eulerAngle;
+    PHSuperMatrix & eulerAngleRate = * this->eulerAngleRate;
+
+    for (int i = 1; i <= 3; ++ i)
+    {
+        eulerAngle(i) += 0.5 * (eulerAngleRate(i, 1) + eulerAngleRate(i, 2)) * currentMarchTimeStep;
+    }
+}
+
+void PHRigidBodyMovement::CalculateEulerAngleAcceleration()          
+{
+    //! Calculate the euler angle acceleration of the computing axis systems.
+    RDouble c1, c2, c3;
+
+    c1 =  1.5 / currentMarchTimeStep;
+    c2 = -2.0 / currentMarchTimeStep;
+    c3 =  0.5 / currentMarchTimeStep;
+
+    PHSuperMatrix & eulerAngleRate         = * this->eulerAngleRate;
+    PHSuperMatrix & eulerAngleAcceleration = * this->eulerAngleAcceleration;
+
+    for (int i = 1; i <= 3; ++ i)
+    {
+        eulerAngleAcceleration(i) = c1 * eulerAngleRate(i, 1) + 
+                                      c2 * eulerAngleRate(i, 2) + 
+                                      c3 * eulerAngleRate(i, 3) ;
+    }
+}
+
+void PHRigidBodyMovement::CalculateAngleOfAttackAndSlide()          
+{
+    //! Calculate the initiative angle of attack and angle of slid in projectile axis system.
+    PHSuperMatrix velocityOfInflow(3);
+    PHSuperMatrix velocityInBody(3);
+
+    velocityOfInflow(1) = cos(initiativeAngleOfAttack) * cos(initiativeAngleOfSlide);
+    velocityOfInflow(2) = cos(initiativeAngleOfAttack) * sin(initiativeAngleOfSlide);
+    velocityOfInflow(3) = sin(initiativeAngleOfAttack) ;
+    PHSuperMatrix & velocityOfInflow1 = velocityOfInflow;
+
+    RDouble ARC2DEG = 180.0 / acos(- 1.0);
+
+    temporaryAngleOfAttack = ARC2DEG * atan(velocityOfInflow(2) / PHSPACE::MAX(velocityOfInflow(1), 1.0e-20));
+    temporaryAngleOfSlide  = ARC2DEG * asin(velocityOfInflow(3));
+
+    PHSuperMatrix & transformMatrixCurrent = * this->transformMatrixCurrent;
+
+    velocityInBody = transformMatrixCurrent * velocityOfInflow1;
+}
+
+void PHRigidBodyMovement::UpdateSingleZoneGridInformation(Grid * gridIn)
+{
+    if (PHSPACE::UNSTRUCTGRID == gridIn->Type())
+    {
+        return;
+    }
+
+    //! update the mesh information, include the mesh coordinate and derivatives.
+    this->UpdateCoordinate(gridIn);
+    this->UpdateCellArea(gridIn);
+    this->UpdateGridVelocity(gridIn);
+}
+
+void PHRigidBodyMovement::UpdateCellArea(Grid* gridIn)
+{
+    //! update the mesh derivatives.
+    StructGrid* grid = static_cast<StructGrid*>(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D& faceNormalX = *(grid->GetFaceNormalX());
+    RDouble4D& faceNormalY = *(grid->GetFaceNormalY());
+    RDouble4D& faceNormalZ = *(grid->GetFaceNormalZ());
+
+    PHSuperMatrix kxyz(3);
+
+    PHSuperMatrix & transformMatrixCurrent = *(this->transformMatrixCurrent);
+    PHSuperMatrix & transformMatrixLastTime    = *(this->transformMatrixLastTime   );
+
+    PHMatrix< RDouble > matrix = PHSPACE::TransposeMatrix(transformMatrixCurrent) * transformMatrixLastTime;
+
+    for (int nd = 1; nd <= 3; ++ nd)
+    {
+        for (int k = 1; k <= nk; ++ k)
+        {
+            for (int j = 1; j <= nj; ++ j)
+            {
+                for (int i = 1; i <= ni; ++ i)
+                {
+                    kxyz(1) = faceNormalX(i, j, k, nd);
+                    kxyz(2) = faceNormalY(i, j, k, nd);
+                    kxyz(3) = faceNormalZ(i, j, k, nd);
+
+                    kxyz = matrix * kxyz;
+
+                    faceNormalX(i, j, k, nd) = kxyz(1);
+                    faceNormalY(i, j, k, nd) = kxyz(2);
+                    faceNormalZ(i, j, k, nd) = kxyz(3);
+                }
+            }
+        }
+    }
+    return;
+}
+
+PHMatrix< RDouble > PHRigidBodyMovement::CalculateGridCellFaceVelocity(Grid* gridIn, int i, int j, int k, int nd)
+{
+    StructGrid* grid = static_cast<StructGrid*>(gridIn);
+    //! Calculate grid cell face velocity.
+    PHSuperMatrix xyzc = GetCellFaceCoordinate(grid, i, j, k, nd);
+    PHSuperMatrix currentAngelRate(3);
+
+    PHSuperMatrix & eulerAngleRate = * this->eulerAngleRate;
+
+    for (int ii = 1; ii <= 3; ++ii)
+    {
+        xyzc(ii) = (xyzc(ii) - (* massCenterOfAircraft)(ii)) / lengthRef;
+        currentAngelRate(ii) = eulerAngleRate(ii, 1);
+    }
+    return CrossProductVector(currentAngelRate, xyzc);
+}
+
+PHMatrix< RDouble > PHRigidBodyMovement::GetCellFaceCoordinate(Grid* gridIn, int i, int j, int k, int nd)
+{
+    StructGrid* grid = static_cast<StructGrid*>(gridIn);
+    RDouble3D & structuredX  = *(grid->GetStructX());
+    RDouble3D & structuredY  = *(grid->GetStructY());
+    RDouble3D & structuredZ  = *(grid->GetStructZ());
+
+    PHMatrix< RDouble > xyzc(3);
+
+    if (nd == 1) 
+    {
+        xyzc(1) = (  structuredX(i  , j    , k) + structuredX(i  , j    , k + 1)   
+                      + structuredX(i  , j + 1, k) + structuredX(i  , j + 1, k + 1) ) * 0.25 ;
+        xyzc(2) = (  structuredY(i  , j    , k) + structuredY(i  , j    , k + 1)   
+                      + structuredY(i  , j + 1, k) + structuredY(i  , j + 1, k + 1) ) * 0.25 ;
+        xyzc(3) = (  structuredZ(i  , j    , k) + structuredZ(i  , j    , k + 1)   
+                      + structuredZ(i  , j + 1, k) + structuredZ(i  , j + 1, k + 1) ) * 0.25 ;
+    }
+    else if (nd == 2) 
+    {
+        xyzc(1) = (  structuredX(i    , j  , k) + structuredX(i    , j  , k + 1)   
+                      + structuredX(i + 1, j  , k) + structuredX(i + 1, j  , k + 1) ) * 0.25 ;
+        xyzc(2) = (  structuredY(i    , j  , k) + structuredY(i    , j  , k + 1)   
+                      + structuredY(i + 1, j  , k) + structuredY(i + 1, j  , k + 1) ) * 0.25 ;
+        xyzc(3) = (  structuredZ(i    , j  , k) + structuredZ(i    , j  , k + 1)   
+                      + structuredZ(i + 1, j  , k) + structuredZ(i + 1, j  , k + 1) ) * 0.25 ;
+    }
+    else
+    {
+        xyzc(1) = (  structuredX(i    , j  , k) + structuredX(i    , j + 1, k )   
+                      + structuredX(i + 1, j  , k) + structuredX(i + 1, j + 1, k ) ) * 0.25 ;
+        xyzc(2) = (  structuredY(i    , j  , k) + structuredY(i    , j + 1, k )   
+                      + structuredY(i + 1, j  , k) + structuredY(i + 1, j + 1, k ) ) * 0.25 ;
+        xyzc(3) = (  structuredZ(i    , j  , k) + structuredZ(i    , j + 1, k )   
+                      + structuredZ(i + 1, j  , k) + structuredZ(i + 1, j + 1, k ) ) * 0.25 ;
+    }
+    return xyzc;
+}
+
+void PHRigidBodyMovement::InitializeSixDof()
+{
+    this->InitializeAircraftProperty();
+    this->NondimensionalOf6DOF();
+    this->InitializeEulerAngleInformation();
+    this->CalculationOfMatrix();
+}
+
+void PHRigidBodyMovement::MainCallOf6DOF()
+{
+    //! six DOF module main functions.
+    RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+    currentMarchTimeStep = physicalTimeStep;
+
+    this->AerodynamicsInCFDSolver();
+
+    this->UpdateDynamicInfo6DOF();
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+
+    int gridLevelIndex = 0;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Grid * grid = PHSPACE::GetGrid(iZone, gridLevelIndex);
+        if (! grid) continue;
+        this->UpdateSingleZoneGridInformation(grid);
+    }
+}
+
+void InitializeSixDof()
+{
+    RigidBodyMovement.InitializeSixDof();
+}
+
+void MainCallOf6DOF()
+{
+    RigidBodyMovement.MainCallOf6DOF();
+}
+
+}
+
+
diff --git a/API/Physics/src/SixDofManager.cpp b/API/Physics/src/SixDofManager.cpp
new file mode 100644
index 0000000..18f1eee
--- /dev/null
+++ b/API/Physics/src/SixDofManager.cpp
@@ -0,0 +1,2078 @@
+#include "PHMpi.h"
+#include "AleManager.h"
+#include "Force.h"
+#include "SixDofManager.h"
+#include "Pointer.h"
+#include "PHMatrix.h"
+#include "GlobalDataBase.h"
+#include "Constants.h"
+#include "Force.h"
+#include "AleForceManager.h"
+#include "PHIO.h"
+#include "IO_FileName.h"
+#include "IO_FileReader.h"
+#include "TK_Exit.h"
+#include "TK_Log.h"
+#include "Math_BasisFunction.h"
+
+namespace PHSPACE
+{
+
+RDouble ** MassCharacter::GetMomentOfInertiaTensor()
+{
+    RDouble ** momentOfInertiaTensor = PHSPACE::NewPointer2< RDouble > (3, 3);
+
+    momentOfInertiaTensor[ 0 ][ 0 ] =   momentOfInertiaTensorXX;
+    momentOfInertiaTensor[ 0 ][ 1 ] = - momentOfInertiaTensorXY;
+    momentOfInertiaTensor[ 0 ][ 2 ] = - momentOfInertiaTensorXZ;
+
+    momentOfInertiaTensor[ 1 ][ 0 ] = - momentOfInertiaTensorXY;
+    momentOfInertiaTensor[ 1 ][ 1 ] =   momentOfInertiaTensorYY;
+    momentOfInertiaTensor[ 1 ][ 2 ] = - momentOfInertiaTensorYZ;
+
+    momentOfInertiaTensor[ 2 ][ 0 ] = - momentOfInertiaTensorXZ;
+    momentOfInertiaTensor[ 2 ][ 1 ] = - momentOfInertiaTensorYZ;
+    momentOfInertiaTensor[ 2 ][ 2 ] =   momentOfInertiaTensorZZ;
+
+    return momentOfInertiaTensor;
+}
+
+RDouble ** MassCharacter::GetInverseMomentOfInertiaTensor()
+{
+    RDouble ** inverseMomentOfInertiaTensor = PHSPACE::NewPointer2< RDouble > (3, 3);
+
+    RDouble d   =       momentOfInertiaTensorXX * momentOfInertiaTensorYY * momentOfInertiaTensorZZ -
+                        momentOfInertiaTensorXX * momentOfInertiaTensorYZ * momentOfInertiaTensorYZ -
+                        momentOfInertiaTensorYY * momentOfInertiaTensorXZ * momentOfInertiaTensorXZ -
+                        momentOfInertiaTensorZZ * momentOfInertiaTensorXY * momentOfInertiaTensorXY -
+                  2.0 * momentOfInertiaTensorXY * momentOfInertiaTensorXZ * momentOfInertiaTensorYZ;
+
+    RDouble a11 = momentOfInertiaTensorYY * momentOfInertiaTensorZZ - momentOfInertiaTensorYZ * momentOfInertiaTensorYZ;
+    RDouble a12 = momentOfInertiaTensorXY * momentOfInertiaTensorZZ + momentOfInertiaTensorYZ * momentOfInertiaTensorXZ;
+    RDouble a13 = momentOfInertiaTensorXY * momentOfInertiaTensorYZ + momentOfInertiaTensorXZ * momentOfInertiaTensorYY;
+
+    RDouble a21 = momentOfInertiaTensorXY * momentOfInertiaTensorZZ + momentOfInertiaTensorYZ * momentOfInertiaTensorXZ;
+    RDouble a22 = momentOfInertiaTensorXX * momentOfInertiaTensorZZ - momentOfInertiaTensorXZ * momentOfInertiaTensorXZ;
+    RDouble a23 = momentOfInertiaTensorXX * momentOfInertiaTensorYZ + momentOfInertiaTensorXZ * momentOfInertiaTensorXY;
+
+    RDouble a31 = momentOfInertiaTensorXY * momentOfInertiaTensorYZ + momentOfInertiaTensorXZ * momentOfInertiaTensorYY;
+    RDouble a32 = momentOfInertiaTensorXX * momentOfInertiaTensorYZ + momentOfInertiaTensorXZ * momentOfInertiaTensorXY;
+    RDouble a33 = momentOfInertiaTensorXX * momentOfInertiaTensorYY - momentOfInertiaTensorXY * momentOfInertiaTensorXY;
+
+    inverseMomentOfInertiaTensor[ 0 ][ 0 ] = a11 / d;
+    inverseMomentOfInertiaTensor[ 0 ][ 1 ] = a12 / d;
+    inverseMomentOfInertiaTensor[ 0 ][ 2 ] = a13 / d;
+
+    inverseMomentOfInertiaTensor[ 1 ][ 0 ] = a21 / d;
+    inverseMomentOfInertiaTensor[ 1 ][ 1 ] = a22 / d;
+    inverseMomentOfInertiaTensor[ 1 ][ 2 ] = a23 / d;
+
+    inverseMomentOfInertiaTensor[ 2 ][ 0 ] = a31 / d;
+    inverseMomentOfInertiaTensor[ 2 ][ 1 ] = a32 / d;
+    inverseMomentOfInertiaTensor[ 2 ][ 2 ] = a33 / d;
+
+    return inverseMomentOfInertiaTensor;
+}
+
+MassCharacter::MassCharacter(RDouble mass, RDouble momentOfInertiaTensorXX, RDouble momentOfInertiaTensorYY, RDouble momentOfInertiaTensorZZ, RDouble momentOfInertiaTensorXY, RDouble momentOfInertiaTensorXZ, RDouble momentOfInertiaTensorYZ)
+{
+    this->mass = mass;
+    this->momentOfInertiaTensorXX  = momentOfInertiaTensorXX;
+    this->momentOfInertiaTensorYY  = momentOfInertiaTensorYY;
+    this->momentOfInertiaTensorZZ  = momentOfInertiaTensorZZ;
+    this->momentOfInertiaTensorXY  = momentOfInertiaTensorXY;
+    this->momentOfInertiaTensorXZ  = momentOfInertiaTensorXZ;
+    this->momentOfInertiaTensorYZ  = momentOfInertiaTensorYZ;
+}
+
+void MassCharacter::SetMassCharacter(RDouble mass, vector< RDouble > & massMatrix)
+{
+    this->mass = mass;
+    this->momentOfInertiaTensorXX  = massMatrix[ 0 ];
+    this->momentOfInertiaTensorYY  = massMatrix[ 1 ];
+    this->momentOfInertiaTensorZZ  = massMatrix[ 2 ];
+    this->momentOfInertiaTensorXY  = massMatrix[ 3 ];
+    this->momentOfInertiaTensorXZ  = massMatrix[ 4 ];
+    this->momentOfInertiaTensorYZ  = massMatrix[ 5 ];
+}
+
+void MassCharacter::SetMassCharacter(RDouble mass, RDouble momentOfInertiaTensorXX, RDouble momentOfInertiaTensorYY, RDouble momentOfInertiaTensorZZ, RDouble momentOfInertiaTensorXY, RDouble momentOfInertiaTensorXZ, RDouble momentOfInertiaTensorYZ)
+{
+    this->mass = mass;
+    this->momentOfInertiaTensorXX  = momentOfInertiaTensorXX;
+    this->momentOfInertiaTensorYY  = momentOfInertiaTensorYY;
+    this->momentOfInertiaTensorZZ  = momentOfInertiaTensorZZ;
+    this->momentOfInertiaTensorXY  = momentOfInertiaTensorXY;
+    this->momentOfInertiaTensorXZ  = momentOfInertiaTensorXZ;
+    this->momentOfInertiaTensorYZ  = momentOfInertiaTensorYZ;
+}
+
+void MassCharacter::GetMassCharacter(RDouble & mass, RDouble & momentOfInertiaTensorXX, RDouble & momentOfInertiaTensorYY, RDouble & momentOfInertiaTensorZZ,RDouble & momentOfInertiaTensorXY,RDouble & momentOfInertiaTensorXZ,RDouble & momentOfInertiaTensorYZ)
+{
+    mass = this->mass;
+    momentOfInertiaTensorXX  = this->momentOfInertiaTensorXX;
+    momentOfInertiaTensorYY  = this->momentOfInertiaTensorYY;
+    momentOfInertiaTensorZZ  = this->momentOfInertiaTensorZZ;
+    momentOfInertiaTensorXY  = this->momentOfInertiaTensorXY;
+    momentOfInertiaTensorXZ  = this->momentOfInertiaTensorXZ;
+    momentOfInertiaTensorYZ  = this->momentOfInertiaTensorYZ;
+}
+
+void MassCharacter::GetMomentInertia(vector< RDouble > & momentOfInertia)
+{
+    momentOfInertia[ 0 ]  = this->momentOfInertiaTensorXX;
+    momentOfInertia[ 1 ]  = this->momentOfInertiaTensorYY;
+    momentOfInertia[ 2 ]  = this->momentOfInertiaTensorZZ;
+    momentOfInertia[ 3 ]  = this->momentOfInertiaTensorXY;
+    momentOfInertia[ 4 ]  = this->momentOfInertiaTensorXZ;
+    momentOfInertia[ 5 ]  = this->momentOfInertiaTensorYZ;
+}
+
+void MassCharacter::GetMomentInertia(RDouble & momentOfInertiaTensorXX, RDouble & momentOfInertiaTensorYY, RDouble & momentOfInertiaTensorZZ, RDouble & momentOfInertiaTensorXY, RDouble & momentOfInertiaTensorXZ, RDouble & momentOfInertiaTensorYZ)
+{
+    momentOfInertiaTensorXX  = this->momentOfInertiaTensorXX;
+    momentOfInertiaTensorYY  = this->momentOfInertiaTensorYY;
+    momentOfInertiaTensorZZ  = this->momentOfInertiaTensorZZ;
+    momentOfInertiaTensorXY  = this->momentOfInertiaTensorXY;
+    momentOfInertiaTensorXZ  = this->momentOfInertiaTensorXZ;
+    momentOfInertiaTensorYZ  = this->momentOfInertiaTensorYZ;
+}
+
+SixDofParameter::SixDofParameter()
+{
+    massCenterX = 0.0;
+    massCenterY = 0.0;
+    massCenterZ = 0.0;
+
+    eulerAngleAlpha = 0.0;
+    eulerAngleBeta  = 0.0;
+    eulerAngleGama  = 0.0; 
+
+    massCenterVelocityX    = 0.0;
+    massCenterVelocityY    = 0.0;
+    massCenterVelocityZ    = 0.0;
+
+    angularVelocityX = 0.0;
+    angularVelocityY = 0.0;
+    angularVelocityZ = 0.0; 
+
+    referenceLength   = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("referenceLength");
+}
+
+void SixDofParameter::GetNondimensionalMassCenter(RDouble & dimensionlessMassCenterX, RDouble & dimensionlessMassCenterY, RDouble & dimensionlessMassCenterZ)
+{
+    dimensionlessMassCenterX = this->massCenterX / referenceLength;
+    dimensionlessMassCenterY = this->massCenterY / referenceLength;
+    dimensionlessMassCenterZ = this->massCenterZ / referenceLength;
+}
+
+RDouble SixDofParameter::GetNondimensionalMassCenterX()
+{
+    return this->massCenterX / referenceLength;
+}
+
+RDouble SixDofParameter::GetNondimensionalMassCenterY()
+{
+    return this->massCenterY / referenceLength;
+}
+
+RDouble SixDofParameter::GetNondimensionalMassCenterZ()
+{
+    return this->massCenterZ / referenceLength;
+}
+
+void SixDofParameter::GetNondimensionalMassCenterVector(vector< RDouble > & nondimensionalMassCenterVector)
+{
+    nondimensionalMassCenterVector[ 0 ] = this->massCenterX / referenceLength;
+    nondimensionalMassCenterVector[ 1 ] = this->massCenterY / referenceLength;
+    nondimensionalMassCenterVector[ 2 ] = this->massCenterZ / referenceLength;
+}
+
+void SixDofParameter::GetGeneralVariableContainer(vector< RDouble > & generalVariableContainer)
+{
+    this->GetMassCenter        (generalVariableContainer[ 0 ], generalVariableContainer[ 1  ], generalVariableContainer[ 2  ]);
+    this->GetMassCenterVelocity(generalVariableContainer[ 3 ], generalVariableContainer[ 4  ], generalVariableContainer[ 5  ]);
+    this->GetEulerAngle        (generalVariableContainer[ 6 ], generalVariableContainer[ 7  ], generalVariableContainer[ 8  ]);
+    this->GetAngularVelocity   (generalVariableContainer[ 9 ], generalVariableContainer[ 10 ], generalVariableContainer[ 11 ]);
+}
+
+void SixDofParameter::SetGeneralVariableContainer(RDouble * generalVariableContainer)
+{
+    this->SetMassCenter        (generalVariableContainer[ 0 ], generalVariableContainer[ 1  ], generalVariableContainer[ 2  ]);
+    this->SetMassCenterVelocity(generalVariableContainer[ 3 ], generalVariableContainer[ 4  ], generalVariableContainer[ 5  ]);
+    this->SetEulerAngle        (generalVariableContainer[ 6 ], generalVariableContainer[ 7  ], generalVariableContainer[ 8  ]);
+    this->SetAngularVelocity   (generalVariableContainer[ 9 ], generalVariableContainer[ 10 ], generalVariableContainer[ 11 ]);
+}
+
+void SixDofParameter::SetGeneralVariableContainer(vector< RDouble > & massCenter, vector< RDouble >& attitudeAngle, 
+    vector< RDouble >& massCenterVelocity, vector< RDouble >& angularVelocity)
+{
+    this->SetMassCenter        (massCenter        [0], massCenter        [1],         massCenter[2]);
+    this->SetEulerAngle        (attitudeAngle     [0], attitudeAngle     [1],      attitudeAngle[2]);
+    this->SetMassCenterVelocity(massCenterVelocity[0], massCenterVelocity[1], massCenterVelocity[2]);
+    this->SetAngularVelocity   (angularVelocity   [0], angularVelocity   [1],    angularVelocity[2]);
+}
+
+void SixDofParameter::UpdateEulerAngle(RDouble * eulerAngleVariationContainer)
+{
+    eulerAngleGama  += eulerAngleVariationContainer[ 0 ];
+    eulerAngleBeta  += eulerAngleVariationContainer[ 1 ];
+    eulerAngleAlpha += eulerAngleVariationContainer[ 2 ];
+}
+
+void SixDofParameter::UpdateAngularVelocity(RDouble * angularVelocityVariationContainer)
+{
+    angularVelocityX += angularVelocityVariationContainer[ 0 ];
+    angularVelocityY += angularVelocityVariationContainer[ 1 ];
+    angularVelocityZ += angularVelocityVariationContainer[ 2 ];
+}
+
+SixDofSolver::SixDofSolver(SixDofSolverManager * sixDofSolverManager)
+{
+    this->sixDofSolverManager = sixDofSolverManager;
+
+    bodyIndex = 0;
+
+    resetMassCenter = 0;
+
+    AllocateAllVariables();
+
+    DegToRad = PI / 180.0;
+    RadToDeg = 180.0 / PI;
+}
+
+SixDofSolver::~SixDofSolver()
+{
+    DeallocateAllVariables();
+}
+
+void SixDofSolver::AllocateAllVariables()
+{
+    AllocateSixDofParameter();
+
+    AllocateSixDofForceContainer();
+
+    AllocateMassCharacter();
+}
+
+void SixDofSolver::DeallocateAllVariables()
+{
+    int numberOfTimeLayers = this->GetNumberOfTimeLayers();
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++ iTimeLayer)
+    {
+        delete sixDofParameterContainer[ iTimeLayer ];
+        sixDofParameterContainer[iTimeLayer] = NULL;
+    }
+
+    delete massCharacter;
+    massCharacter = NULL;
+}
+
+void SixDofSolver::AllocateSixDofParameter()
+{
+    int numberOfTimeLayers = 3;
+    SetNumberOfTimeLayers(numberOfTimeLayers);
+
+    sixDofParameterContainer.resize(numberOfTimeLayers);
+
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++ iTimeLayer)
+    {
+        sixDofParameterContainer[ iTimeLayer ] = new SixDofParameter();
+    }
+}
+
+void SixDofSolver::AllocateMassCharacter()
+{
+    massCharacter = new MassCharacter();
+}
+
+void SixDofSolver::AllocateSixDofForceContainer()
+{
+    int numberOfTimeLayers = this->GetNumberOfTimeLayers();
+
+    sixDofForceContainer.resize(numberOfTimeLayers);
+
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++ iTimeLayer)
+    {
+        sixDofForceContainer[ iTimeLayer ].resize(6);
+    }
+}
+
+void SixDofSolver::InitializeMassCharacter()
+{
+    MassCharacter * massCharacter = this->GetMassCharacter();
+
+    RDouble mass = GetRDoubleParameterFromDataBase(bodyIndex, "mass");
+
+    vector< RDouble > massMatrix;
+    GetRDoubleVectorFromDataBase(massMatrix, bodyIndex, "massMatrix", 6);
+
+    massCharacter->SetMassCharacter(mass, massMatrix);
+}
+
+void SixDofSolver::Initialize(int bodyIndexIn)
+{
+    this->bodyIndex = bodyIndexIn;
+
+    this->InitializeMassCharacter();
+
+    this->InitializeSixDofByParameter();
+}
+
+void SixDofSolver::Restart()
+{
+    fstream & file = PHSPACE::GetCurrentAleFile();
+    this->InitializeSixDofByFiles(file);
+}
+
+void SixDofSolver::InitializeSixDofByParameter()
+{
+    vector< RDouble > massCenter;
+    GetRDoubleVectorFromDataBase(massCenter, bodyIndex, "massCenter"  , 3);
+
+    vector< RDouble > attitudeAngle;
+    GetRDoubleVectorFromDataBase(attitudeAngle, bodyIndex, "attitudeAngle", 3);
+
+    vector< RDouble > massCenterVelocity;
+    GetRDoubleVectorFromDataBase(massCenterVelocity, bodyIndex, "massCenterVelocity", 3);
+
+    vector< RDouble > angularVelocity;
+    GetRDoubleVectorFromDataBase(angularVelocity, bodyIndex, "angularVelocity", 3);
+
+    RDouble reynoldsReferenceLengthDimensional = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+
+    massCenter[ 0 ] /= reynoldsReferenceLengthDimensional;
+    massCenter[ 1 ] /= reynoldsReferenceLengthDimensional;
+    massCenter[ 2 ] /= reynoldsReferenceLengthDimensional;
+
+    attitudeAngle[ 0 ] *= PI / 180;
+    attitudeAngle[ 1 ] *= PI / 180;
+    attitudeAngle[ 2 ] *= PI / 180;
+
+    angularVelocity[ 0 ] *= PI / 180;
+    angularVelocity[ 1 ] *= PI / 180;
+    angularVelocity[ 2 ] *= PI / 180;
+
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++ iTimeLayer)
+    {
+        SixDofParameter * sixDofParameter = this->GetSixDofParameter(iTimeLayer);
+        sixDofParameter->SetGeneralVariableContainer(massCenter, attitudeAngle, massCenterVelocity, angularVelocity);
+    }
+}
+
+void SixDofSolver::InitializeSixDofByFiles(fstream & file)
+{
+    const int numberOfEquations = 12;
+    RDouble generalVariableContainer[ numberOfEquations ];
+
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++ iTimeLayer)
+    {
+        //PHSPACE::PHRead(file, generalVariableContainer, numberOfEquations);
+        for (int iVar = 0; iVar < numberOfEquations; ++ iVar)
+        {
+            file >> generalVariableContainer[iVar];
+        }
+
+        sixDofParameterContainer[iTimeLayer]->SetGeneralVariableContainer(generalVariableContainer);
+    }
+}
+
+void SixDofSolver::ResetMassCenter()
+{
+    int resetMassCenter = GetIntegerParameterFromDataBaseIfExist(bodyIndex, "resetMassCenter", 0);
+    this -> resetMassCenter = resetMassCenter;
+    if (resetMassCenter == 0)
+    {
+        return;
+    }
+
+    vector< RDouble > massCenterDxyz;
+    GetRDoubleVectorFromDataBase(massCenterDxyz, bodyIndex, "massCenterDxyz", 3);
+
+    RDouble reynoldsReferenceLengthDimensional = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+
+    massCenterDxyz[0] /= reynoldsReferenceLengthDimensional;
+    massCenterDxyz[1] /= reynoldsReferenceLengthDimensional;
+    massCenterDxyz[2] /= reynoldsReferenceLengthDimensional;
+
+    vector< RDouble > massCenter;
+    vector< RDouble > angleVector;
+    vector< RDouble > massCenterVelocity;
+    vector< RDouble > angularVelocity;
+
+    massCenter.resize(3);
+    angleVector.resize(3);
+    massCenterVelocity.resize(3);
+    angularVelocity.resize(3);
+
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++ iTimeLayer)
+    {
+        SixDofParameter *sixDofParameter = this->GetSixDofParameter(iTimeLayer);
+
+        sixDofParameter->GetEulerAngle(angleVector[0], angleVector[1], angleVector[2]);
+        sixDofParameter->GetMassCenter(massCenter[0], massCenter[1], massCenter[2]);
+
+        sixDofParameter->GetMassCenterVelocity(massCenterVelocity[0], massCenterVelocity[1], massCenterVelocity[2]);
+        sixDofParameter->GetAngularVelocity(angularVelocity[0], angularVelocity[1], angularVelocity[2]);
+
+        ConvertVectorFromBodyCoordinateSystemToInertialCoordinateSystem(massCenterDxyz, angleVector, massCenterDxyz);
+        massCenter[0] += massCenterDxyz[0];
+        massCenter[1] += massCenterDxyz[1];
+        massCenter[2] += massCenterDxyz[2];
+        sixDofParameter->SetMassCenter(massCenter[0], massCenter[1], massCenter[2]);
+
+        massCenterVelocity[0] += angularVelocity[1] * massCenterDxyz[2] - angularVelocity[2] * massCenterDxyz[1] ;
+        massCenterVelocity[1] += angularVelocity[2] * massCenterDxyz[0] - angularVelocity[0] * massCenterDxyz[2] ;
+        massCenterVelocity[2] += angularVelocity[0] * massCenterDxyz[1] - angularVelocity[1] * massCenterDxyz[0];
+        sixDofParameter->SetMassCenterVelocity(massCenterVelocity[0], massCenterVelocity[1], massCenterVelocity[2]);
+    }
+}
+
+void SixDofSolver::Run()
+{
+    ComputeSixDofForceTimeSequenceContainer();
+
+    int RBDMethod = PHSPACE::GetIntegerParameterFromDataBase(bodyIndex, "RBDMethod");
+
+    if (RBDMethod == - 1)//! given motion partten.
+    {
+        MovingByFile();
+    }
+    else if (RBDMethod == 0  )//! still.
+    {
+        Stationary();
+    }
+    else if (RBDMethod == 1  )//! six DOF motion.
+    {
+        SolveSixDofEquation();
+    }
+    else if (RBDMethod == 2  )//! three DOF motion.
+    {
+        ModifyForceAndSixDofInformationForXYSymmetryCase();
+        SolveSixDofEquation();
+    }
+    else if (RBDMethod == 11 )//! X-axis forced motion.
+    {
+        OscillatingInXDirection();
+    }
+    else if (RBDMethod == 12 )//! Y-axis forced motion.
+    {
+        OscillatingInYDirection();
+    }
+    else if (RBDMethod == 13 )//! Z-axis forced motion.
+    {
+        TK_Exit::ExceptionExit("There is no Z-axis forced motion in temporary.");
+        //OscillatingInZDirection();
+    }
+    else if (RBDMethod == 14 )//! forced pitch motion.
+    {
+        Pitching();
+        //SolveSixDofEquation();
+    }
+    else if (RBDMethod == 15 )//! forced yaw motion.
+    {
+        Yawing();
+    }
+    else if (RBDMethod == 16 )//! forced roll motion.
+    {
+        Rolling();
+    }
+    else if (RBDMethod == 21 )//! single DOF motion.
+    {
+        XDirectionOnly();
+        //SolveSixDofEquation();
+    }
+    else if ( RBDMethod == 17  )//! Forced rotation along X periodically;
+    {
+        RotationInXDirection();
+    }
+    else if (RBDMethod == 19)//! Forced rotation along Z periodically;
+    {
+        RotationInZDirection();
+    }
+    else if (RBDMethod == 22 )//! single DOF Y-axis motion
+    {
+        YDirectionOnly();
+        //ModifyForceAndSixDofInformationForYDirectionOnly();
+        //SolveSixDofEquation();
+    }
+    else if (RBDMethod == 23 )//! single DOF Z-axis motion
+    {
+        TK_Exit::ExceptionExit("There is no single DOF Z-axis motion in temporary.");
+        //ModifyForceAndSixDofInformationForZDirectionOnly();
+        //SolveSixDofEquation();
+    }
+    else if (RBDMethod == 24 )//! single DOF pitch motion.
+    {
+        ModifyForceAndSixDofInformationForPitchingOnly();
+        SolveSixDofEquation();
+    }
+    else if (RBDMethod == 25 )//! single DOF yaw motion.
+    {
+        TK_Exit::ExceptionExit("There is no single DOF yaw motion. in temporary.");
+        //ModifyForceAndSixDofInformationForYawingOnly();
+        //SolveSixDofEquation();
+    }
+    else if (RBDMethod == 26 )//! single DOF roll motion.
+    {
+        ModifyForceAndSixDofInformationForRollingOnly();
+        SolveSixDofEquation();
+    }
+    else if (RBDMethod == 31 )//! single DOF pitch and roll motion.
+    {
+        ModifyForceAndSixDofInformationForPitchingAndRollingOnly();
+        SolveSixDofEquation();
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("There is no this motion");
+    }
+}
+
+void SixDofSolver::Post()
+{
+    UpdateUnsteadyTerm();
+    DumpSixDofSolverInformation();
+}
+
+void SixDofSolver::UpdateUnsteadyTerm()
+{
+    SixDofParameter * sixDofParameter   = this->GetSixDofParameter(0);
+    SixDofParameter * sixDofParameterN  = this->GetSixDofParameter(1);
+    SixDofParameter * sixDofParameterN1 = this->GetSixDofParameter(2);
+
+    (* sixDofParameterN1) = (* sixDofParameterN);
+    (* sixDofParameterN ) = (* sixDofParameter );
+}
+
+void SixDofSolver::ComputeSixDofForceTimeSequenceContainer()
+{
+    int numberOfTimeLayers = this->GetNumberOfTimeLayers();
+
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++ iTimeLayer)
+    {
+        vector< RDouble > & forceVector = this->GetForceVector(iTimeLayer);
+        this->GetDimensionalTotalForceAndMomentOfBody(forceVector, iTimeLayer);
+    }
+}
+
+void SixDofSolver::GetDimensionalTotalForceAndMomentOfBody(vector< RDouble > & dimensionalGeneralForceContainer, int iTimeLayer)
+{
+    this->GetDimensionalAerodynamicForceAndMomentOfBody(dimensionalGeneralForceContainer, iTimeLayer);
+    this->GetDimensionalAdditionalForceAndMomentOfBody (dimensionalGeneralForceContainer, iTimeLayer);
+}
+
+void SixDofSolver::GetMassCenterAndEulerAngleContainer(vector< RDouble > & massCenterContainer, vector< RDouble > & eulerAngleContainer, int iTimeLayer)
+{
+    SixDofParameter * sixDofParameter = this->GetSixDofParameter(iTimeLayer);
+
+    sixDofParameter->GetMassCenter(massCenterContainer[ 0 ], massCenterContainer[ 1 ], massCenterContainer[ 2 ]);
+    sixDofParameter->GetEulerAngleContainer(eulerAngleContainer);
+}
+
+void SixDofSolver::GetMomentAboutMassCenterInInertialFrame(vector< RDouble > & massCenterContainer, vector< RDouble > & totalForceVector, vector< RDouble > & momentVector, vector< RDouble > & momentAboutMassCenterInInertialFrame)
+{
+    RDouble momentChange [ 3 ];
+    PHSPACE::CrossProduct(& massCenterContainer[ 0 ], & totalForceVector[ 0 ], momentChange);
+
+    momentAboutMassCenterInInertialFrame[ 0 ] = momentVector[ 0 ] - momentChange[ 0 ];
+    momentAboutMassCenterInInertialFrame[ 1 ] = momentVector[ 1 ] - momentChange[ 1 ];
+    momentAboutMassCenterInInertialFrame[ 2 ] = momentVector[ 2 ] - momentChange[ 2 ];
+}
+
+void SixDofSolver::GetDimensionalAerodynamicForceAndMomentOfBody(vector< RDouble > & dimensionalGeneralAerodynamicForceContainer, int iTimeLayer)
+{
+    vector< RDouble > massCenterContainer(3);
+    vector< RDouble > eulerAngleContainer(3);
+
+    this->GetMassCenterAndEulerAngleContainer(massCenterContainer, eulerAngleContainer, iTimeLayer);
+
+    vector< RDouble > dimensionalAerodynamicForce (3);
+    vector< RDouble > dimensionalAerodynamicMoment(3);
+    
+    GetDimensionalAerodynamicForceAndMoment(dimensionalAerodynamicForce, dimensionalAerodynamicMoment, bodyIndex, iTimeLayer);
+
+    vector< RDouble > dimensionalAerodynamicMomentAboutMassCenter(3);
+    this->GetMomentAboutMassCenterInInertialFrame(massCenterContainer, dimensionalAerodynamicForce, dimensionalAerodynamicMoment, dimensionalAerodynamicMomentAboutMassCenter);
+
+    vector< RDouble > dimensionalAerodynamicForceInBodyFrame(3);
+    vector< RDouble > dimensionalAerodynamicMomentAboutMassCenterInBodyFrame(3);
+    PHSPACE::ConvertVectorFromInertialCoordinateSystemToBodyCoordinateSystem(dimensionalAerodynamicForce, eulerAngleContainer, dimensionalAerodynamicForceInBodyFrame);
+    PHSPACE::ConvertVectorFromInertialCoordinateSystemToBodyCoordinateSystem(dimensionalAerodynamicMomentAboutMassCenter, eulerAngleContainer, dimensionalAerodynamicMomentAboutMassCenterInBodyFrame);
+
+    dimensionalGeneralAerodynamicForceContainer[ 0 ] = dimensionalAerodynamicForceInBodyFrame[ 0 ];
+    dimensionalGeneralAerodynamicForceContainer[ 1 ] = dimensionalAerodynamicForceInBodyFrame[ 1 ];
+    dimensionalGeneralAerodynamicForceContainer[ 2 ] = dimensionalAerodynamicForceInBodyFrame[ 2 ];
+
+    dimensionalGeneralAerodynamicForceContainer[ 3 ] = dimensionalAerodynamicMomentAboutMassCenterInBodyFrame[ 0 ];
+    dimensionalGeneralAerodynamicForceContainer[ 4 ] = dimensionalAerodynamicMomentAboutMassCenterInBodyFrame[ 1 ];
+    dimensionalGeneralAerodynamicForceContainer[ 5 ] = dimensionalAerodynamicMomentAboutMassCenterInBodyFrame[ 2 ];
+}
+
+void SixDofSolver::GetDimensionalAerodynamicForceAndMomentInerFrame(vector< RDouble > & dimensionalGeneralAerodynamicForceContainer, int iTimeLayer)
+{
+    vector< RDouble > massCenterContainer(3);
+    vector< RDouble > eulerAngleContainer(3);
+
+    this->GetMassCenterAndEulerAngleContainer(massCenterContainer, eulerAngleContainer, iTimeLayer);
+
+    vector< RDouble > dimensionalAerodynamicForce (3);
+    vector< RDouble > dimensionalAerodynamicMoment(3);
+    
+    GetDimensionalAerodynamicForceAndMoment(dimensionalAerodynamicForce, dimensionalAerodynamicMoment, bodyIndex, iTimeLayer);
+
+    vector< RDouble > dimensionalAerodynamicMomentAboutMassCenter(3);
+    this->GetMomentAboutMassCenterInInertialFrame(massCenterContainer, dimensionalAerodynamicForce, dimensionalAerodynamicMoment, dimensionalAerodynamicMomentAboutMassCenter);
+    
+    dimensionalGeneralAerodynamicForceContainer[ 0 ] = dimensionalAerodynamicForce[ 0 ];
+    dimensionalGeneralAerodynamicForceContainer[ 1 ] = dimensionalAerodynamicForce[ 1 ];
+    dimensionalGeneralAerodynamicForceContainer[ 2 ] = dimensionalAerodynamicForce[ 2 ];
+
+    dimensionalGeneralAerodynamicForceContainer[ 3 ] = dimensionalAerodynamicMomentAboutMassCenter[ 0 ];
+    dimensionalGeneralAerodynamicForceContainer[ 4 ] = dimensionalAerodynamicMomentAboutMassCenter[ 1 ];
+    dimensionalGeneralAerodynamicForceContainer[ 5 ] = dimensionalAerodynamicMomentAboutMassCenter[ 2 ];
+}
+
+void SixDofSolver::GetDimensionalAerodynamicForceAndMomentBodyFrame(vector< RDouble > & dimensionalGeneralAerodynamicForceContainer, int iTimeLayer)
+{
+    vector< RDouble > massCenterContainer(3);
+    vector< RDouble > eulerAngleContainer(3);
+
+    this->GetMassCenterAndEulerAngleContainer(massCenterContainer, eulerAngleContainer, iTimeLayer);
+
+    vector< RDouble > dimensionalAerodynamicForce (3);
+    vector< RDouble > dimensionalAerodynamicMoment(3);
+    
+    GetDimensionalAerodynamicForceAndMoment(dimensionalAerodynamicForce, dimensionalAerodynamicMoment, bodyIndex, iTimeLayer);
+
+    vector< RDouble > dimensionalAerodynamicMomentAboutMassCenter(3);
+    this->GetMomentAboutMassCenterInInertialFrame(massCenterContainer, dimensionalAerodynamicForce, dimensionalAerodynamicMoment, dimensionalAerodynamicMomentAboutMassCenter);
+    
+    vector< RDouble > dimensionalAerodynamicForceInBodyFrame(3);
+    vector< RDouble > dimensionalAerodynamicMomentAboutMassCenterInBodyFrame(3);
+
+    PHSPACE::ConvertVectorFromInertialCoordinateSystemToBodyCoordinateSystem(dimensionalAerodynamicForce, eulerAngleContainer, dimensionalAerodynamicForceInBodyFrame);
+    PHSPACE::ConvertVectorFromInertialCoordinateSystemToBodyCoordinateSystem(dimensionalAerodynamicMomentAboutMassCenter, eulerAngleContainer, dimensionalAerodynamicMomentAboutMassCenterInBodyFrame);
+
+    dimensionalGeneralAerodynamicForceContainer[ 0 ] = dimensionalAerodynamicForceInBodyFrame[ 0 ];
+    dimensionalGeneralAerodynamicForceContainer[ 1 ] = dimensionalAerodynamicForceInBodyFrame[ 1 ];
+    dimensionalGeneralAerodynamicForceContainer[ 2 ] = dimensionalAerodynamicForceInBodyFrame[ 2 ];
+
+    dimensionalGeneralAerodynamicForceContainer[ 3 ] = dimensionalAerodynamicMomentAboutMassCenterInBodyFrame[ 0 ];
+    dimensionalGeneralAerodynamicForceContainer[ 4 ] = dimensionalAerodynamicMomentAboutMassCenterInBodyFrame[ 1 ];
+    dimensionalGeneralAerodynamicForceContainer[ 5 ] = dimensionalAerodynamicMomentAboutMassCenterInBodyFrame[ 2 ];
+}
+
+void SixDofSolver::GetDimensionalAdditionalForceAndMomentOfBodyByParameter(vector< RDouble > & dimensionalGeneralForceContainer, int iTimeLayer)
+{
+    vector< RDouble > massCenterContainer(3);
+    vector< RDouble > eulerAngleContainer(3);
+
+    this->GetMassCenterAndEulerAngleContainer(massCenterContainer, eulerAngleContainer, iTimeLayer);
+
+    vector< RDouble > dimensionalAerodynamicForce(3);
+    vector< RDouble > dimensionalAerodynamicMoment(3);
+    dimensionalAerodynamicForce[0] = 0.0;
+    dimensionalAerodynamicForce[1] = 0.0;
+    dimensionalAerodynamicForce[2] = 0.0;
+    dimensionalAerodynamicMoment[0] = 0.0;
+    dimensionalAerodynamicMoment[1] = 0.0;
+    dimensionalAerodynamicMoment[2] = 0.0;
+
+    RDouble aleSimulationTime = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("aleSimulationTime");
+    RDouble  timeOfNstep = aleSimulationTime - GetAleTimeStep();
+
+    RDouble addedForceTime = GetRDoubleParameterFromDataBaseIfExist(bodyIndex, "addedForceTime", 0.0);
+
+    if (timeOfNstep < addedForceTime)
+    {
+        GetRDoubleVectorFromDataBase(dimensionalAerodynamicForce, bodyIndex, "addedForce", 3);
+
+        GetRDoubleVectorFromDataBase(dimensionalAerodynamicMoment, bodyIndex, "addedMoment", 3);
+    }
+
+    RDouble mass = GetRDoubleParameterFromDataBase(bodyIndex, "mass");
+
+    RDouble gravity = GetRDoubleParameterFromDataBaseIfExist(bodyIndex, "gravity", 0.0);
+
+    dimensionalAerodynamicForce[1] -= gravity * mass;
+
+    vector< RDouble > dimensionalAerodynamicMomentInBodyFrame(3);
+
+
+    PHSPACE::ConvertVectorFromInertialCoordinateSystemToBodyCoordinateSystem(dimensionalAerodynamicMoment, eulerAngleContainer, dimensionalAerodynamicMomentInBodyFrame);
+
+    dimensionalGeneralForceContainer[ 0 ] += dimensionalAerodynamicForce[ 0 ];
+    dimensionalGeneralForceContainer[ 1 ] += dimensionalAerodynamicForce[ 1 ];
+    dimensionalGeneralForceContainer[ 2 ] += dimensionalAerodynamicForce[ 2 ];
+    dimensionalGeneralForceContainer[ 3 ] += dimensionalAerodynamicMomentInBodyFrame[ 0 ];
+    dimensionalGeneralForceContainer[ 4 ] += dimensionalAerodynamicMomentInBodyFrame[ 1 ];
+    dimensionalGeneralForceContainer[ 5 ] += dimensionalAerodynamicMomentInBodyFrame[ 2 ];
+}
+
+void SixDofSolver::GetDimensionalAdditionalForceAndMomentOfBody(vector< RDouble > & dimensionalGeneralForceContainer, int iTimeLayer)
+{
+    GetDimensionalAdditionalForceAndMomentOfBodyByParameter(dimensionalGeneralForceContainer, iTimeLayer);
+}
+
+void SixDofSolver::ReadSixDofParameterFromFile()
+{
+    string uDFSixDofFileName = GetStringParameterFromDataBase(bodyIndex, "uDFSixDofFileName");
+
+    fstream infile(uDFSixDofFileName.c_str(), ios_base::in);
+    
+    string temp;
+    int outerIterationSteps = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    RDouble MassCenterX, MassCenterY, MassCenterZ;
+    RDouble EulerAngleAlpha, EulerAngleBeta, EulerAngleGama;
+
+    for (int iLine = 0; iLine < outerIterationSteps - 1; ++ iLine)
+    {
+        PHSPACE::ReadNextNonEmptyLine(infile, temp);
+    }
+
+    infile >> MassCenterX;
+    infile >> MassCenterY;
+    infile >> MassCenterZ;
+
+    for (int i = 0; i < 3; ++ i)
+    {
+        infile >> temp;
+    }
+
+    infile >> EulerAngleAlpha;
+    infile >> EulerAngleBeta;
+    infile >> EulerAngleGama;
+
+    for (int i = 0; i < 3; ++ i)
+    {
+        infile >> temp;
+    }
+
+    SixDofParameter * sixDofParameter = this->GetSixDofParameter(0);
+
+    sixDofParameter->SetMassCenterX(MassCenterX);
+    sixDofParameter->SetMassCenterY(MassCenterY);
+    sixDofParameter->SetMassCenterZ(MassCenterZ);
+    
+    sixDofParameter->SetEulerAngleAlpha(EulerAngleAlpha);
+    sixDofParameter->SetEulerAngleBeta (EulerAngleBeta);
+    sixDofParameter->SetEulerAngleGama (EulerAngleGama);
+}
+
+void SixDofSolver::Stationary()
+{
+    SixDofParameter * sixDofParameter0 = this->GetSixDofParameter(0);
+    SixDofParameter * sixDofParameter1 = this->GetSixDofParameter(1);
+
+    RDouble oldMassCenterX = sixDofParameter1->GetMassCenterX();
+    RDouble oldMassCenterY = sixDofParameter1->GetMassCenterY();
+    RDouble oldMassCenterZ = sixDofParameter1->GetMassCenterZ();
+
+    RDouble oldEulerAngleAlpha = sixDofParameter1->GetEulerAngleAlpha();
+    RDouble oldEulerAngleBeta  = sixDofParameter1->GetEulerAngleBeta();
+    RDouble oldEulerAngleGama  = sixDofParameter1->GetEulerAngleGama();
+
+    sixDofParameter0->SetMassCenterX(oldMassCenterX);
+    sixDofParameter0->SetMassCenterY(oldMassCenterY);
+    sixDofParameter0->SetMassCenterZ(oldMassCenterZ);
+
+    sixDofParameter0->SetEulerAngleAlpha(oldEulerAngleAlpha);
+    sixDofParameter0->SetEulerAngleBeta (oldEulerAngleBeta);
+    sixDofParameter0->SetEulerAngleGama (oldEulerAngleGama);
+}
+
+void SixDofSolver::Rolling()
+{
+    SixDofParameter * sixDofParameter0 = this->GetSixDofParameter(0);
+    SixDofParameter * sixDofParameter1 = this->GetSixDofParameter(1);
+
+    RDouble oldEulerAngleAlpha = sixDofParameter1->GetEulerAngleAlpha();
+    RDouble oldEulerAngleBeta = sixDofParameter1->GetEulerAngleBeta();
+
+    RDouble oldAngularVelocityX = sixDofParameter1->GetAngularVelocityX();
+    RDouble oldAngularVelocityY = sixDofParameter1->GetAngularVelocityY();
+
+    RDouble newEulerAngleAlpha = sixDofParameter0->GetEulerAngleAlpha();
+    RDouble newEulerAngleBeta  = sixDofParameter0->GetEulerAngleBeta();
+    RDouble newEulerAngleGama  = sixDofParameter0->GetEulerAngleGama();
+
+    RDouble newAngularVelocityX = sixDofParameter0->GetAngularVelocityX();
+    RDouble newAngularVelocityY = sixDofParameter0->GetAngularVelocityY();
+    RDouble newAngularVelocityZ = sixDofParameter0->GetAngularVelocityZ();
+
+    RDouble aleAmplitude = PHSPACE::GetRDoubleParameterFromDataBase(bodyIndex, "amplitude") * PI / 180.0;
+    RDouble aleReduceFrequency = PHSPACE::GetRDoubleParameterFromDataBase(bodyIndex, "reduceFrequency");
+
+    RDouble aleSimulationTime = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("aleSimulationTime");
+    RDouble dimensionalReferenceTime = GlobalDataBase::GetDoubleParaFromDB("dimensionalReferenceTime");
+    aleSimulationTime /= dimensionalReferenceTime;
+
+    RDouble gama = sin(2.0 * aleSimulationTime * aleReduceFrequency);
+    gama = aleAmplitude * gama;
+    RDouble angularVelocity = cos(2.0 * aleSimulationTime * aleReduceFrequency);
+    angularVelocity = 2.0 * aleAmplitude * aleReduceFrequency * angularVelocity;
+
+    newEulerAngleAlpha = oldEulerAngleAlpha;
+    newEulerAngleBeta  = oldEulerAngleBeta;
+    newEulerAngleGama  = gama;
+
+    newAngularVelocityX = oldAngularVelocityX;
+    newAngularVelocityY = oldAngularVelocityY;
+    newAngularVelocityZ = angularVelocity;
+
+    sixDofParameter0->SetEulerAngleAlpha(newEulerAngleAlpha);
+    sixDofParameter0->SetEulerAngleBeta (newEulerAngleBeta);
+    sixDofParameter0->SetEulerAngleGama (newEulerAngleGama);
+
+    sixDofParameter0->SetAngularVelocityX(newAngularVelocityX);
+    sixDofParameter0->SetAngularVelocityY(newAngularVelocityY);
+    sixDofParameter0->SetAngularVelocityZ(newAngularVelocityZ);
+}
+
+void SixDofSolver::Yawing()
+{
+    SixDofParameter * sixDofParameter0 = this->GetSixDofParameter(0);
+    SixDofParameter * sixDofParameter1 = this->GetSixDofParameter(1);
+
+    RDouble oldEulerAngleAlpha = sixDofParameter1->GetEulerAngleAlpha();
+    RDouble oldEulerAngleGama  = sixDofParameter1->GetEulerAngleGama();
+
+    RDouble oldAngularVelocityX = sixDofParameter1->GetAngularVelocityX();
+    RDouble oldAngularVelocityZ = sixDofParameter1->GetAngularVelocityZ();
+
+    RDouble newEulerAngleAlpha = sixDofParameter0->GetEulerAngleAlpha();
+    RDouble newEulerAngleBeta  = sixDofParameter0->GetEulerAngleBeta();
+    RDouble newEulerAngleGama  = sixDofParameter0->GetEulerAngleGama();
+
+    RDouble newAngularVelocityX = sixDofParameter0->GetAngularVelocityX();
+    RDouble newAngularVelocityY = sixDofParameter0->GetAngularVelocityY();
+    RDouble newAngularVelocityZ = sixDofParameter0->GetAngularVelocityZ();
+
+    RDouble aleAmplitude = PHSPACE::GetRDoubleParameterFromDataBase(bodyIndex, "amplitude") * PI / 180.0;
+    RDouble aleReduceFrequency = PHSPACE::GetRDoubleParameterFromDataBase(bodyIndex, "reduceFrequency");
+
+    RDouble aleSimulationTime = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("aleSimulationTime");
+    RDouble dimensionalReferenceTime = GlobalDataBase::GetDoubleParaFromDB("dimensionalReferenceTime");
+    aleSimulationTime /= dimensionalReferenceTime;
+
+    RDouble beta = sin(2.0 * aleSimulationTime * aleReduceFrequency);
+    beta = aleAmplitude * beta;
+    RDouble angularVelocity = cos(2.0 * aleSimulationTime * aleReduceFrequency);
+    angularVelocity = 2.0 * aleAmplitude * aleReduceFrequency * angularVelocity;
+
+    newEulerAngleAlpha = oldEulerAngleAlpha;
+    newEulerAngleBeta  = beta;
+    newEulerAngleGama  = oldEulerAngleGama;
+
+    newAngularVelocityX = oldAngularVelocityX;
+    newAngularVelocityY = angularVelocity;
+    newAngularVelocityZ = oldAngularVelocityZ;
+
+    sixDofParameter0->SetEulerAngleAlpha(newEulerAngleAlpha);
+    sixDofParameter0->SetEulerAngleBeta (newEulerAngleBeta);
+    sixDofParameter0->SetEulerAngleGama (newEulerAngleGama);
+
+    sixDofParameter0->SetAngularVelocityX(newAngularVelocityX);
+    sixDofParameter0->SetAngularVelocityY(newAngularVelocityY);
+    sixDofParameter0->SetAngularVelocityZ(newAngularVelocityZ);
+}
+
+void SixDofSolver::Pitching()
+{
+    SixDofParameter * sixDofParameter0 = this->GetSixDofParameter(0);
+    SixDofParameter * sixDofParameter1 = this->GetSixDofParameter(1);
+
+    RDouble oldEulerAngleBeta = sixDofParameter1->GetEulerAngleBeta();
+    RDouble oldEulerAngleGama  = sixDofParameter1->GetEulerAngleGama();
+
+    RDouble oldAngularVelocityY = sixDofParameter1->GetAngularVelocityY();
+    RDouble oldAngularVelocityZ = sixDofParameter1->GetAngularVelocityZ();
+
+    RDouble newEulerAngleAlpha = sixDofParameter0->GetEulerAngleAlpha();
+    RDouble newEulerAngleBeta  = sixDofParameter0->GetEulerAngleBeta();
+    RDouble newEulerAngleGama  = sixDofParameter0->GetEulerAngleGama();
+
+    RDouble newAngularVelocityX = sixDofParameter0->GetAngularVelocityX();
+    RDouble newAngularVelocityY = sixDofParameter0->GetAngularVelocityY();
+    RDouble newAngularVelocityZ = sixDofParameter0->GetAngularVelocityZ();
+
+    RDouble aleAmplitude = PHSPACE::GetRDoubleParameterFromDataBase(bodyIndex, "amplitude") * PI / 180.0;
+    RDouble aleReduceFrequency = PHSPACE::GetRDoubleParameterFromDataBase(bodyIndex, "reduceFrequency");
+
+    RDouble aleSimulationTime = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("aleSimulationTime");
+    RDouble dimensionalReferenceTime = GlobalDataBase::GetDoubleParaFromDB("dimensionalReferenceTime");
+    aleSimulationTime /= dimensionalReferenceTime;
+
+    RDouble alpha = sin(2.0 * aleSimulationTime * aleReduceFrequency);
+    alpha = aleAmplitude * alpha;
+    RDouble angularVelocity = cos(2.0 * aleSimulationTime * aleReduceFrequency);
+    angularVelocity = 2.0 * aleAmplitude * aleReduceFrequency * angularVelocity;
+
+    newEulerAngleAlpha = alpha;
+    newEulerAngleBeta  = oldEulerAngleBeta;
+    newEulerAngleGama  = oldEulerAngleGama;
+
+    newAngularVelocityX = angularVelocity;
+    newAngularVelocityY = oldAngularVelocityY;
+    newAngularVelocityZ = oldAngularVelocityZ;
+
+    sixDofParameter0->SetEulerAngleAlpha(newEulerAngleAlpha);
+    sixDofParameter0->SetEulerAngleBeta (newEulerAngleBeta);
+    sixDofParameter0->SetEulerAngleGama (newEulerAngleGama);
+
+    sixDofParameter0->SetAngularVelocityX(newAngularVelocityX);
+    sixDofParameter0->SetAngularVelocityY(newAngularVelocityY);
+    sixDofParameter0->SetAngularVelocityZ(newAngularVelocityZ);
+}
+
+void SixDofSolver::RotationInXDirection()
+{
+    SixDofParameter * sixDofParameter0 = this->GetSixDofParameter(0);
+    SixDofParameter * sixDofParameter1 = this->GetSixDofParameter(1);
+
+    RDouble oldEulerAngleAlpha = sixDofParameter1->GetEulerAngleAlpha();
+    RDouble oldEulerAngleBeta  = sixDofParameter1->GetEulerAngleBeta();
+
+    RDouble oldAngularVelocityX = sixDofParameter1->GetAngularVelocityX();
+    RDouble oldAngularVelocityY = sixDofParameter1->GetAngularVelocityY();
+
+    RDouble newEulerAngleAlpha = sixDofParameter0->GetEulerAngleAlpha();
+    RDouble newEulerAngleBeta  = sixDofParameter0->GetEulerAngleBeta();
+    RDouble newEulerAngleGama  = sixDofParameter0->GetEulerAngleGama();
+
+    RDouble newAngularVelocityX = sixDofParameter0->GetAngularVelocityX();
+    RDouble newAngularVelocityY = sixDofParameter0->GetAngularVelocityY();
+    RDouble newAngularVelocityZ = sixDofParameter0->GetAngularVelocityZ();
+
+    int aleDirection  = PHSPACE::GetIntegerParameterFromDataBase( bodyIndex, "direction" );
+    RDouble aleRotateFrequency = PHSPACE::GetRDoubleParameterFromDataBase(bodyIndex, "rotateFrequency");
+
+    RDouble aleSimulationTime = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("aleSimulationTime");
+    RDouble dimensionalReferenceTime = GlobalDataBase::GetDoubleParaFromDB("dimensionalReferenceTime");
+    aleSimulationTime /= dimensionalReferenceTime;
+
+    RDouble deltGama =  2.0 * PI * aleRotateFrequency * aleDirection;
+    RDouble gama = aleSimulationTime * deltGama;
+
+    RDouble angularVelocity = deltGama;
+
+    newEulerAngleAlpha = oldEulerAngleAlpha;
+    newEulerAngleBeta  = oldEulerAngleBeta;
+    newEulerAngleGama  = gama;
+
+    newAngularVelocityX = oldAngularVelocityX;
+    newAngularVelocityY = oldAngularVelocityY;
+    newAngularVelocityZ = angularVelocity;
+
+    sixDofParameter0->SetEulerAngleAlpha(newEulerAngleAlpha);
+    sixDofParameter0->SetEulerAngleBeta (newEulerAngleBeta);
+    sixDofParameter0->SetEulerAngleGama (newEulerAngleGama);
+
+    sixDofParameter0->SetAngularVelocityX(newAngularVelocityX);
+    sixDofParameter0->SetAngularVelocityY(newAngularVelocityY);
+    sixDofParameter0->SetAngularVelocityZ(newAngularVelocityZ);
+}
+
+void SixDofSolver::RotationInZDirection()
+{
+    SixDofParameter* sixDofParameter0 = this->GetSixDofParameter(0);
+    SixDofParameter* sixDofParameter1 = this->GetSixDofParameter(1);
+
+    RDouble oldEulerAngleBeta = sixDofParameter1->GetEulerAngleBeta();
+    RDouble oldEulerAngleGama = sixDofParameter1->GetEulerAngleGama();
+
+    RDouble oldAngularVelocityY = sixDofParameter1->GetAngularVelocityY();
+    RDouble oldAngularVelocityZ = sixDofParameter1->GetAngularVelocityZ();
+
+    RDouble newEulerAngleAlpha = sixDofParameter0->GetEulerAngleAlpha();
+    RDouble newEulerAngleBeta = sixDofParameter0->GetEulerAngleBeta();
+    RDouble newEulerAngleGama = sixDofParameter0->GetEulerAngleGama();
+
+    RDouble newAngularVelocityX = sixDofParameter0->GetAngularVelocityX();
+    RDouble newAngularVelocityY = sixDofParameter0->GetAngularVelocityY();
+    RDouble newAngularVelocityZ = sixDofParameter0->GetAngularVelocityZ();
+
+    RDouble aleSimulationTime = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("aleSimulationTime");
+    RDouble dimensionalReferenceTime = GlobalDataBase::GetDoubleParaFromDB("dimensionalReferenceTime");
+    aleSimulationTime /= dimensionalReferenceTime;
+
+    int aleDirection = PHSPACE::GetIntegerParameterFromDataBase(bodyIndex, "direction");
+    RDouble aleRotateFrequency = PHSPACE::GetRDoubleParameterFromDataBase(bodyIndex, "rotateFrequency");
+
+    RDouble deltAlpha =  2.0 * PI * aleRotateFrequency * aleDirection;
+    RDouble alpha = deltAlpha * aleSimulationTime; 
+
+    RDouble angularVelocity = deltAlpha;
+
+    newEulerAngleAlpha = alpha;
+    newEulerAngleBeta  = oldEulerAngleBeta;
+    newEulerAngleGama  = oldEulerAngleGama;
+
+    newAngularVelocityX = angularVelocity;
+    newAngularVelocityY = oldAngularVelocityY;
+    newAngularVelocityZ = oldAngularVelocityZ;
+
+    sixDofParameter0->SetEulerAngleAlpha(newEulerAngleAlpha);
+    sixDofParameter0->SetEulerAngleBeta(newEulerAngleBeta);
+    sixDofParameter0->SetEulerAngleGama(newEulerAngleGama);
+
+    sixDofParameter0->SetAngularVelocityX(newAngularVelocityX);
+    sixDofParameter0->SetAngularVelocityY(newAngularVelocityY);
+    sixDofParameter0->SetAngularVelocityZ(newAngularVelocityZ);
+}
+
+void SixDofSolver::Rotation_Rudder_Test1()
+{
+    SixDofParameter * sixDofParameter0 = this->GetSixDofParameter(0);
+    SixDofParameter * sixDofParameter1 = this->GetSixDofParameter(1);
+
+    RDouble oldMassCenterX     = sixDofParameter1->GetMassCenterX();
+    RDouble oldMassCenterY     = sixDofParameter1->GetMassCenterY();
+    RDouble oldMassCenterZ     = sixDofParameter1->GetMassCenterZ();
+
+    RDouble oldEulerAngleBeta  = sixDofParameter1->GetEulerAngleBeta ();
+    RDouble oldEulerAngleGama  = sixDofParameter1->GetEulerAngleGama ();
+
+    RDouble newMassCenterX     = sixDofParameter0->GetMassCenterX();
+    RDouble newMassCenterY     = sixDofParameter0->GetMassCenterY();
+    RDouble newMassCenterZ     = sixDofParameter0->GetMassCenterZ();
+
+    RDouble newEulerAngleAlpha = sixDofParameter0->GetEulerAngleAlpha();
+    RDouble newEulerAngleBeta  = sixDofParameter0->GetEulerAngleBeta ();
+    RDouble newEulerAngleGama  = sixDofParameter0->GetEulerAngleGama ();
+
+    RDouble aleSimulationTime = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("aleSimulationTime");
+    RDouble dimensionalReferenceTime = GlobalDataBase::GetDoubleParaFromDB("dimensionalReferenceTime");
+    aleSimulationTime /= dimensionalReferenceTime;
+
+    vector< RDouble >                   controlLawParameters;
+    GetRDoubleVectorFromDataBase(       controlLawParameters, 1, "controlLawParameters", 2);
+
+    RDouble maximumRudderAngle        = controlLawParameters[ 0 ] * PI / 180.0;
+    RDouble imposedRudderRotationTime = controlLawParameters[ 1 ];
+
+    RDouble rudderAngle = maximumRudderAngle * 0.5 * 
+                        (1.0 + cos(PI * (aleSimulationTime / imposedRudderRotationTime  - 1.0)));
+    
+    if (aleSimulationTime > imposedRudderRotationTime)
+    {
+        rudderAngle = maximumRudderAngle;
+    }
+
+    cout << "rudderAngle = " << rudderAngle * RadToDeg << endl;
+
+    newMassCenterX     = oldMassCenterX;
+    newMassCenterY     = oldMassCenterY;
+    newMassCenterZ     = oldMassCenterZ;
+
+    newEulerAngleAlpha = rudderAngle;
+    newEulerAngleBeta  = oldEulerAngleBeta;
+    newEulerAngleGama  = oldEulerAngleGama;
+
+    sixDofParameter0->SetMassCenterX(newMassCenterX);
+    sixDofParameter0->SetMassCenterY(newMassCenterY);
+    sixDofParameter0->SetMassCenterZ(newMassCenterZ);
+
+    sixDofParameter0->SetEulerAngleAlpha(newEulerAngleAlpha);
+    sixDofParameter0->SetEulerAngleBeta (newEulerAngleBeta );
+    sixDofParameter0->SetEulerAngleGama (newEulerAngleGama );
+}
+
+void SixDofSolver::OscillatingInXDirection()
+{
+    SixDofParameter * sixDofParameter0 = this->GetSixDofParameter(0);
+    SixDofParameter * sixDofParameter1 = this->GetSixDofParameter(1);
+
+    RDouble oldMassCenterX     = sixDofParameter1->GetMassCenterX();
+    RDouble oldMassCenterY     = sixDofParameter1->GetMassCenterY();
+    RDouble oldMassCenterZ     = sixDofParameter1->GetMassCenterZ();
+
+    RDouble oldEulerAngleAlpha = sixDofParameter1->GetEulerAngleAlpha();
+    RDouble oldEulerAngleBeta  = sixDofParameter1->GetEulerAngleBeta();
+    RDouble oldEulerAngleGama  = sixDofParameter1->GetEulerAngleGama();
+
+    RDouble newMassCenterX     = sixDofParameter0->GetMassCenterX();
+    RDouble newMassCenterY     = sixDofParameter0->GetMassCenterY();
+    RDouble newMassCenterZ     = sixDofParameter0->GetMassCenterZ();
+
+    RDouble newEulerAngleAlpha = sixDofParameter0->GetEulerAngleAlpha();
+    RDouble newEulerAngleBeta  = sixDofParameter0->GetEulerAngleBeta();
+    RDouble newEulerAngleGama  = sixDofParameter0->GetEulerAngleGama();
+
+    RDouble aleAmplitude = PHSPACE::GetRDoubleParameterFromDataBase(bodyIndex, "amplitude");
+    RDouble alePeriod    = PHSPACE::GetRDoubleParameterFromDataBase(bodyIndex, "period"   );
+
+    RDouble aleSimulationTime = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("aleSimulationTime");
+    RDouble aleTimeStep      = PHSPACE::GetAleTimeStep();
+    RDouble dimensionalReferenceTime = GlobalDataBase::GetDoubleParaFromDB("dimensionalReferenceTime");
+    aleSimulationTime /= dimensionalReferenceTime;
+    aleTimeStep /= dimensionalReferenceTime;
+
+    RDouble ds = aleAmplitude * (sin(2.0 * PI * aleSimulationTime / alePeriod) - sin(2.0 * PI * ((aleSimulationTime - aleTimeStep) / alePeriod)));
+
+    //ds = -1.0 * dimensionalAleTimeStep;
+
+    RDouble dx = ds;
+    RDouble dy = 0.0;
+    RDouble dz = 0.0;
+
+    newMassCenterX     = oldMassCenterX + dx;
+    newMassCenterY     = oldMassCenterY + dy;
+    newMassCenterZ     = oldMassCenterZ + dz;
+
+    newEulerAngleAlpha = oldEulerAngleAlpha;
+    newEulerAngleBeta  = oldEulerAngleBeta;
+    newEulerAngleGama  = oldEulerAngleGama;
+
+    sixDofParameter0->SetMassCenterX(newMassCenterX);
+    sixDofParameter0->SetMassCenterY(newMassCenterY);
+    sixDofParameter0->SetMassCenterZ(newMassCenterZ);
+
+    sixDofParameter0->SetEulerAngleAlpha(newEulerAngleAlpha);
+    sixDofParameter0->SetEulerAngleBeta (newEulerAngleBeta );
+    sixDofParameter0->SetEulerAngleGama (newEulerAngleGama );
+
+    RDouble TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+    TorqueRefX += dx;
+    GlobalDataBase::UpdateData("TorqueRefX", &TorqueRefX, PHDOUBLE, 1);
+}
+
+void SixDofSolver::OscillatingInYDirection()
+{
+    SixDofParameter * sixDofParameter0 = this->GetSixDofParameter(0);
+    SixDofParameter * sixDofParameter1 = this->GetSixDofParameter(1);
+
+    RDouble oldMassCenterX = sixDofParameter1->GetMassCenterX();
+    RDouble oldMassCenterY = sixDofParameter1->GetMassCenterY();
+    RDouble oldMassCenterZ = sixDofParameter1->GetMassCenterZ();
+
+    RDouble oldEulerAngleAlpha = sixDofParameter1->GetEulerAngleAlpha();
+    RDouble oldEulerAngleBeta = sixDofParameter1->GetEulerAngleBeta();
+    RDouble oldEulerAngleGama = sixDofParameter1->GetEulerAngleGama();
+
+    RDouble newMassCenterX = sixDofParameter0->GetMassCenterX();
+    RDouble newMassCenterY = sixDofParameter0->GetMassCenterY();
+    RDouble newMassCenterZ = sixDofParameter0->GetMassCenterZ();
+
+    RDouble newEulerAngleAlpha = sixDofParameter0->GetEulerAngleAlpha();
+    RDouble newEulerAngleBeta = sixDofParameter0->GetEulerAngleBeta();
+    RDouble newEulerAngleGama = sixDofParameter0->GetEulerAngleGama();
+
+    RDouble aleSimulationTime = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("aleSimulationTime");
+    RDouble aleTimeStep = PHSPACE::GetAleTimeStep();
+    RDouble dimensionalReferenceTime = GlobalDataBase::GetDoubleParaFromDB("dimensionalReferenceTime");
+    aleSimulationTime /= dimensionalReferenceTime;
+    aleTimeStep /= dimensionalReferenceTime;
+
+    RDouble aleAmplitude = PHSPACE::GetRDoubleParameterFromDataBase(bodyIndex, "amplitude") * PI / 180.0;
+    RDouble aleReduceFrequency = PHSPACE::GetRDoubleParameterFromDataBase(bodyIndex, "reduceFrequency");
+
+    RDouble attackd = GlobalDataBase::GetDoubleParaFromDB("attackd")* PI / 180.0;
+
+    RDouble alpha = sin(2.0 * aleSimulationTime * aleReduceFrequency);
+    alpha = aleAmplitude * alpha;
+
+    RDouble ds = (tan(attackd + alpha) * cos(attackd) - sin(attackd))* aleTimeStep;
+
+    RDouble dx = 0.0;
+    RDouble dy = ds;
+    RDouble dz = 0.0;
+
+    newMassCenterX = oldMassCenterX + dx;
+    newMassCenterY = oldMassCenterY + dy;
+    newMassCenterZ = oldMassCenterZ + dz;
+
+    newEulerAngleAlpha = oldEulerAngleAlpha;
+    newEulerAngleBeta = oldEulerAngleBeta;
+    newEulerAngleGama = oldEulerAngleGama;
+
+    sixDofParameter0->SetMassCenterX(newMassCenterX);
+    sixDofParameter0->SetMassCenterY(newMassCenterY);
+    sixDofParameter0->SetMassCenterZ(newMassCenterZ);
+
+    sixDofParameter0->SetEulerAngleAlpha(newEulerAngleAlpha);
+    sixDofParameter0->SetEulerAngleBeta(newEulerAngleBeta);
+    sixDofParameter0->SetEulerAngleGama(newEulerAngleGama);
+
+    RDouble TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+    TorqueRefY += dy;
+    GlobalDataBase::UpdateData("TorqueRefY", &TorqueRefY, PHDOUBLE, 1);
+}
+
+void SixDofSolver::XDirectionOnly()
+{
+    SixDofParameter * sixDofParameter0 = this->GetSixDofParameter(0);
+    SixDofParameter * sixDofParameter1 = this->GetSixDofParameter(1);
+
+    RDouble oldMassCenterX     = sixDofParameter1->GetMassCenterX();
+    RDouble oldMassCenterY     = sixDofParameter1->GetMassCenterY();
+    RDouble oldMassCenterZ     = sixDofParameter1->GetMassCenterZ();
+
+    RDouble oldEulerAngleAlpha = sixDofParameter1->GetEulerAngleAlpha();
+    RDouble oldEulerAngleBeta  = sixDofParameter1->GetEulerAngleBeta();
+    RDouble oldEulerAngleGama  = sixDofParameter1->GetEulerAngleGama();
+
+    RDouble newMassCenterX     = sixDofParameter0->GetMassCenterX();
+    RDouble newMassCenterY     = sixDofParameter0->GetMassCenterY();
+    RDouble newMassCenterZ     = sixDofParameter0->GetMassCenterZ();
+
+    RDouble newEulerAngleAlpha = sixDofParameter0->GetEulerAngleAlpha();
+    RDouble newEulerAngleBeta  = sixDofParameter0->GetEulerAngleBeta();
+    RDouble newEulerAngleGama  = sixDofParameter0->GetEulerAngleGama();
+
+    RDouble aleAmplitude = PHSPACE::GetRDoubleParameterFromDataBase(bodyIndex, "amplitude");
+
+    RDouble aleTimeStep      = PHSPACE::GetAleTimeStep();
+    RDouble dimensionalReferenceTime = GlobalDataBase::GetDoubleParaFromDB("dimensionalReferenceTime");
+    aleTimeStep /= dimensionalReferenceTime;
+
+    RDouble ds = aleAmplitude * aleTimeStep;
+
+    newMassCenterX     = oldMassCenterX + ds;
+    newMassCenterY     = oldMassCenterY;
+    newMassCenterZ     = oldMassCenterZ;
+
+    newEulerAngleAlpha = oldEulerAngleAlpha;
+    newEulerAngleBeta  = oldEulerAngleBeta;
+    newEulerAngleGama  = oldEulerAngleGama;
+
+    sixDofParameter0->SetMassCenterX(newMassCenterX);
+    sixDofParameter0->SetMassCenterY(newMassCenterY);
+    sixDofParameter0->SetMassCenterZ(newMassCenterZ);
+
+    sixDofParameter0->SetEulerAngleAlpha(newEulerAngleAlpha);
+    sixDofParameter0->SetEulerAngleBeta (newEulerAngleBeta );
+    sixDofParameter0->SetEulerAngleGama (newEulerAngleGama );
+
+    RDouble TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+    TorqueRefX += ds;
+    GlobalDataBase::UpdateData("TorqueRefX", &TorqueRefX, PHDOUBLE, 1);
+}
+
+void SixDofSolver::YDirectionOnly()
+{
+    SixDofParameter * sixDofParameter0 = this->GetSixDofParameter(0);
+    SixDofParameter * sixDofParameter1 = this->GetSixDofParameter(1);
+
+    RDouble oldMassCenterX     = sixDofParameter1->GetMassCenterX();
+    RDouble oldMassCenterY     = sixDofParameter1->GetMassCenterY();
+    RDouble oldMassCenterZ     = sixDofParameter1->GetMassCenterZ();
+
+    RDouble oldEulerAngleAlpha = sixDofParameter1->GetEulerAngleAlpha();
+    RDouble oldEulerAngleBeta  = sixDofParameter1->GetEulerAngleBeta();
+    RDouble oldEulerAngleGama  = sixDofParameter1->GetEulerAngleGama();
+
+    RDouble newMassCenterX     = sixDofParameter0->GetMassCenterX();
+    RDouble newMassCenterY     = sixDofParameter0->GetMassCenterY();
+    RDouble newMassCenterZ     = sixDofParameter0->GetMassCenterZ();
+
+    RDouble newEulerAngleAlpha = sixDofParameter0->GetEulerAngleAlpha();
+    RDouble newEulerAngleBeta  = sixDofParameter0->GetEulerAngleBeta();
+    RDouble newEulerAngleGama  = sixDofParameter0->GetEulerAngleGama();
+
+    RDouble aleAmplitude = PHSPACE::GetRDoubleParameterFromDataBase(bodyIndex, "amplitude");
+
+    RDouble aleTimeStep      = PHSPACE::GetAleTimeStep();
+    RDouble dimensionalReferenceTime = GlobalDataBase::GetDoubleParaFromDB("dimensionalReferenceTime");
+    aleTimeStep /= dimensionalReferenceTime;
+
+    RDouble ds = aleAmplitude * aleTimeStep;
+
+    newMassCenterX     = oldMassCenterX;
+    newMassCenterY     = oldMassCenterY + ds;
+    newMassCenterZ     = oldMassCenterZ;
+
+    newEulerAngleAlpha = oldEulerAngleAlpha;
+    newEulerAngleBeta  = oldEulerAngleBeta;
+    newEulerAngleGama  = oldEulerAngleGama;
+
+    sixDofParameter0->SetMassCenterX(newMassCenterX);
+    sixDofParameter0->SetMassCenterY(newMassCenterY);
+    sixDofParameter0->SetMassCenterZ(newMassCenterZ);
+
+    sixDofParameter0->SetEulerAngleAlpha(newEulerAngleAlpha);
+    sixDofParameter0->SetEulerAngleBeta (newEulerAngleBeta );
+    sixDofParameter0->SetEulerAngleGama (newEulerAngleGama );
+
+    RDouble TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+    TorqueRefY += ds;
+    GlobalDataBase::UpdateData("TorqueRefY", &TorqueRefY, PHDOUBLE, 1);
+}
+
+void SixDofSolver::ModifyForceAndSixDofInformationForXYSymmetryCase()
+{
+    int numberOfTimeLayers = this->GetNumberOfTimeLayers();
+
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++ iTimeLayer)
+    {
+        vector< RDouble > & forceVector = this->GetForceVector(iTimeLayer);
+        forceVector[ 2 ] = 0;
+        forceVector[ 3 ] = 0;
+        forceVector[ 4 ] = 0;
+    }
+
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++ iTimeLayer)
+    {
+        SixDofParameter * sixDofParameter = this->GetSixDofParameter(iTimeLayer);
+
+        RDouble massCenterVelocityX, massCenterVelocityY, massCenterVelocityZ;
+        RDouble angularVelocityX, angularVelocityY, angularVelocityZ;
+
+        sixDofParameter->GetMassCenterVelocity(massCenterVelocityX, massCenterVelocityY, massCenterVelocityZ);
+        sixDofParameter->GetAngularVelocity(angularVelocityX, angularVelocityY, angularVelocityZ);
+
+        massCenterVelocityZ = 0.0;
+        angularVelocityX    = 0.0;
+        angularVelocityY    = 0.0;
+
+        sixDofParameter->SetMassCenterVelocity(massCenterVelocityX, massCenterVelocityY, massCenterVelocityZ);
+        sixDofParameter->SetAngularVelocity(angularVelocityX, angularVelocityY, angularVelocityZ);
+    }
+}
+
+void SixDofSolver::ModifyForceAndSixDofInformationForPitchingOnly()
+{
+    int numberOfTimeLayers = this->GetNumberOfTimeLayers();
+
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++ iTimeLayer)
+    {
+        vector< RDouble > & forceVector = this->GetForceVector(iTimeLayer);
+        forceVector[ 0 ] = 0;
+        forceVector[ 1 ] = 0;
+        forceVector[ 2 ] = 0;
+        forceVector[ 3 ] = 0;
+        forceVector[ 4 ] = 0;
+    }
+
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++ iTimeLayer)
+    {
+        SixDofParameter * sixDofParameter = this->GetSixDofParameter(iTimeLayer);
+
+        RDouble massCenterVelocityX, massCenterVelocityY, massCenterVelocityZ;
+        RDouble angularVelocityX, angularVelocityY, angularVelocityZ;
+
+        sixDofParameter->GetMassCenterVelocity(massCenterVelocityX, massCenterVelocityY, massCenterVelocityZ);
+        sixDofParameter->GetAngularVelocity(angularVelocityX, angularVelocityY, angularVelocityZ);
+        
+        massCenterVelocityX = 0.0;
+        massCenterVelocityY = 0.0;
+        massCenterVelocityZ = 0.0;
+        angularVelocityX    = 0.0;
+        angularVelocityY    = 0.0;
+
+        sixDofParameter->SetMassCenterVelocity(massCenterVelocityX, massCenterVelocityY, massCenterVelocityZ);
+        sixDofParameter->SetAngularVelocity(angularVelocityX, angularVelocityY, angularVelocityZ);
+    }
+}
+
+void SixDofSolver::ModifyForceAndSixDofInformationForRollingOnly()
+{
+    int numberOfTimeLayers = this->GetNumberOfTimeLayers();
+
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++ iTimeLayer)
+    {
+        vector< RDouble > & forceVector = this->GetForceVector(iTimeLayer);
+        forceVector[ 0 ] = 0;
+        forceVector[ 1 ] = 0;
+        forceVector[ 2 ] = 0;
+        forceVector[ 4 ] = 0;
+        forceVector[ 5 ] = 0;
+    }
+
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++ iTimeLayer)
+    {
+        SixDofParameter * sixDofParameter = this->GetSixDofParameter(iTimeLayer);
+
+        RDouble massCenterVelocityX, massCenterVelocityY, massCenterVelocityZ;
+        RDouble angularVelocityX, angularVelocityY, angularVelocityZ;
+
+        sixDofParameter->GetMassCenterVelocity(massCenterVelocityX, massCenterVelocityY, massCenterVelocityZ);
+        sixDofParameter->GetAngularVelocity(angularVelocityX, angularVelocityY, angularVelocityZ);
+        
+        massCenterVelocityX = 0.0;
+        massCenterVelocityY = 0.0;
+        massCenterVelocityZ = 0.0;
+        angularVelocityY    = 0.0;
+        angularVelocityZ    = 0.0;
+
+        sixDofParameter->SetMassCenterVelocity(massCenterVelocityX, massCenterVelocityY, massCenterVelocityZ);
+        sixDofParameter->SetAngularVelocity(angularVelocityX, angularVelocityY, angularVelocityZ);
+    }
+}
+
+void SixDofSolver::ModifyForceAndSixDofInformationForPitchingAndRollingOnly()
+{
+    int numberOfTimeLayers = this->GetNumberOfTimeLayers();
+
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++ iTimeLayer)
+    {
+        vector< RDouble > & forceVector = this->GetForceVector(iTimeLayer);
+        forceVector[ 0 ] = 0;
+        forceVector[ 1 ] = 0;
+        forceVector[ 2 ] = 0;
+        forceVector[ 4 ] = 0;
+    }
+
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++ iTimeLayer)
+    {
+        SixDofParameter * sixDofParameter = this->GetSixDofParameter(iTimeLayer);
+
+        RDouble massCenterVelocityX, massCenterVelocityY, massCenterVelocityZ;
+        RDouble angularVelocityX, angularVelocityY, angularVelocityZ;
+
+        sixDofParameter->GetMassCenterVelocity(massCenterVelocityX, massCenterVelocityY, massCenterVelocityZ);
+        sixDofParameter->GetAngularVelocity(angularVelocityX, angularVelocityY, angularVelocityZ);
+        
+        massCenterVelocityX = 0.0;
+        massCenterVelocityY = 0.0;
+        massCenterVelocityZ = 0.0;
+        angularVelocityY    = 0.0;
+
+        sixDofParameter->SetMassCenterVelocity(massCenterVelocityX, massCenterVelocityY, massCenterVelocityZ);
+        sixDofParameter->SetAngularVelocity(angularVelocityX, angularVelocityY, angularVelocityZ);
+    }
+}
+
+void SixDofSolver::ComputeCurrentSixDofVariables(vector< vector< RDouble > > & qContainer, vector< vector< RDouble > > & fluxContainer, int numberOfEquations)
+{
+    this->ComputeCurrentSixDofVariables(PHSPACE::HeaderPointer(qContainer   [ 0 ]), 
+                                         PHSPACE::HeaderPointer(qContainer   [ 1 ]),
+                                         PHSPACE::HeaderPointer(qContainer   [ 2 ]),
+                                         PHSPACE::HeaderPointer(fluxContainer[ 0 ]),
+                                         PHSPACE::HeaderPointer(fluxContainer[ 1 ]), 
+                                         PHSPACE::HeaderPointer(fluxContainer[ 2 ]),
+                                         numberOfEquations);
+}
+
+void SixDofSolver::ComputeCurrentSixDofVariables(RDouble * q, RDouble * qN, RDouble * qN1, RDouble * fluxM, RDouble * fluxN, RDouble * fluxN1, int numberOfEquations)
+{
+    RDouble a, b, c, d, e;
+    RDouble relaxParameter = GlobalDataBase::GetDoubleParaFromDB("relaxParameterOfKinetic");
+    PHSPACE::GetSixDofCoefficients(a, b, c, d, e, relaxParameter);
+
+    RDouble coef1 = (1 - relaxParameter);
+    RDouble coef2 = relaxParameter * a;
+    RDouble coef3 = relaxParameter * b;
+    RDouble coef4 = relaxParameter * c;
+    RDouble coef5 = relaxParameter * d;
+    RDouble coef6 = relaxParameter * e;
+
+    for (int iEquation = 0; iEquation < numberOfEquations; ++ iEquation)
+    {
+        q[ iEquation ] = coef1 * q     [ iEquation ] + 
+                         coef2 * qN    [ iEquation ] + 
+                         coef3 * qN1   [ iEquation ] + 
+                         coef4 * fluxM [ iEquation ] + 
+                         coef5 * fluxN [ iEquation ] + 
+                         coef6 * fluxN1[ iEquation ];
+    }
+}
+
+void SixDofSolver::SolveSixDofEquation()
+{
+    const int numberOfEquations = 12;
+    int numberOfTimeLayers = this->GetNumberOfTimeLayers();
+
+    vector< vector< RDouble > > sixDofVariableContainer;
+    vector< vector< RDouble > > sixDofFluxContainer;
+
+    AllocateVector(sixDofVariableContainer, numberOfTimeLayers, numberOfEquations);
+    AllocateVector(sixDofFluxContainer    , numberOfTimeLayers, numberOfEquations);
+
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++ iTimeLayer)
+    {
+        vector< RDouble > & forceVector     = this->GetForceVector    (iTimeLayer);
+        SixDofParameter * sixDofParameter = this->GetSixDofParameter(iTimeLayer);
+
+        sixDofParameter->GetGeneralVariableContainer(sixDofVariableContainer[ iTimeLayer ]);
+
+        GetSixDofFlux(sixDofParameter, massCharacter, forceVector, sixDofFluxContainer[ iTimeLayer ]);
+    }
+
+    ComputeCurrentSixDofVariables(sixDofVariableContainer, sixDofFluxContainer, numberOfEquations);
+
+    SixDofParameter * sixDofParameter0 = this->GetSixDofParameter(0);
+
+    sixDofParameter0->SetGeneralVariableContainer(& sixDofVariableContainer[ 0 ][ 0 ]);
+}
+
+void SixDofSolver::MovingByFile()
+{
+    SixDofParameter * sixDofParameter0 = this->GetSixDofParameter(0);
+
+    int     outIterationStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    int aleStartStrategy = GlobalDataBase::GetIntParaFromDB("aleStartStrategy");
+    if (aleStartStrategy == -1)
+    {
+        outIterationStep = 1;
+    }
+
+    RDouble newMassCenterX = 0.0;
+    RDouble newMassCenterY = 0.0;
+    RDouble newMassCenterZ = 0.0;
+
+    RDouble newEulerAngleGama  = 0.0;
+    RDouble newEulerAngleBeta  = 0.0;
+    RDouble newEulerAngleAlpha = 0.0;
+
+    RDouble tmp;
+
+    string uDFSixDofFileName = GetStringParameterFromDataBase(bodyIndex, "uDFSixDofFileName");
+
+    ios_base::openmode openMode = ios_base::in;
+    fstream file;
+
+    PHSPACE::OpenFile(file, uDFSixDofFileName, openMode);
+
+    for(int iStep = 0; iStep < outIterationStep; ++ iStep)
+    {
+        file >> tmp;
+        file >> newMassCenterX;
+        file >> newMassCenterY;
+        file >> newMassCenterZ;
+        file >> newEulerAngleGama ;
+        file >> newEulerAngleBeta ;
+        file >> newEulerAngleAlpha;
+    }
+
+    newEulerAngleGama  *= PI / 180.0;
+    newEulerAngleBeta  *= PI / 180.0;
+    newEulerAngleAlpha *= PI / 180.0;
+
+    sixDofParameter0->SetMassCenterX(newMassCenterX);
+    sixDofParameter0->SetMassCenterY(newMassCenterY);
+    sixDofParameter0->SetMassCenterZ(newMassCenterZ);
+
+    sixDofParameter0->SetEulerAngleAlpha(newEulerAngleAlpha);
+    sixDofParameter0->SetEulerAngleBeta (newEulerAngleBeta );
+    sixDofParameter0->SetEulerAngleGama (newEulerAngleGama );
+}
+
+void SixDofSolver::GetDimensionalAerodynamicForceAndMoment(vector< RDouble > & dimensionalAerodynamicForce, vector< RDouble > & dimensionalAerodynamicMoment, int bodyIndex, int iTimeLayer)
+{
+    AleForceManager * aleForceManager = GetAleManager()->GetAleForceManager();
+
+    BasicAleForce * basicAleForce = aleForceManager->GetBasicAleForce(bodyIndex, iTimeLayer);
+
+    RDouble dimensionalForceCoefficient  = aleForceManager->GetDimensionalForceCoefficient ();
+    RDouble dimensionalMomentCoefficient = aleForceManager->GetDimensionalMomentCoefficient();
+    dimensionalAerodynamicForce [0] = basicAleForce->GetForceX() * dimensionalForceCoefficient;
+    dimensionalAerodynamicForce [1] = basicAleForce->GetForceY() * dimensionalForceCoefficient;
+    dimensionalAerodynamicForce [2] = basicAleForce->GetForceZ() * dimensionalForceCoefficient;
+
+    dimensionalAerodynamicMoment[0] = basicAleForce->GetMomentX() * dimensionalMomentCoefficient;
+    dimensionalAerodynamicMoment[1] = basicAleForce->GetMomentY() * dimensionalMomentCoefficient;
+    dimensionalAerodynamicMoment[2] = basicAleForce->GetMomentZ() * dimensionalMomentCoefficient;
+}
+
+void SixDofSolver::DumpSixDofSolverInformation()
+{
+    this->DumpSixDofParameterInformation();
+    this->DumpAleForceInformation();
+}
+
+void SixDofSolver::DumpSixDofParameterInformation()
+{
+    string fileName = GlobalDataBase::GetStrParaFromDB("sixDofFileName");
+    string sixDofFileName = PHSPACE::AddSymbolToFileName(fileName, bodyIndex + 1);
+
+    ios_base::openmode openMode = ios_base::out|ios_base::app;
+
+    fstream file;
+    PHSPACE::OpenFile(file, sixDofFileName, openMode);
+
+    this->DumpSixDofParameterInformation(file);
+
+    PHSPACE::CloseFile(file);
+}
+
+void SixDofSolver::DumpAleForceInformation()
+{
+    string fileName = GlobalDataBase::GetStrParaFromDB("sixDofFileName");
+    string aleForceFileName = PHSPACE::AddSymbolToFileName(fileName, bodyIndex + 1);
+
+    ios_base::openmode openMode = ios_base::out|ios_base::app;
+    fstream file;
+
+    string fileName1 = PHSPACE::AddSymbolToFileName(aleForceFileName, "_body");
+    PHSPACE::OpenFile(file, fileName1, openMode);
+    this->DumpAleForceInformationBodyFrame(file);
+    PHSPACE::CloseFile(file);
+
+    string fileName2 = PHSPACE::AddSymbolToFileName(aleForceFileName, "_iner");
+    PHSPACE::OpenFile(file, fileName2, openMode);
+    this->DumpAleForceInformationInerFrame(file);
+    PHSPACE::CloseFile(file);
+}
+
+void SixDofSolver::DumpSixDofParameterInformation(fstream & file)
+{
+    RDouble massCenterX, massCenterY, massCenterZ;
+    RDouble massCenterVelocityX, massCenterVelocityY, massCenterVelocityZ;
+    RDouble eulerAngleAlpha, eulerAngleBeta, eulerAngleGama;
+    RDouble angularVelocityX, angularVelocityY, angularVelocityZ;
+
+    int iTimeLayer = 0;
+    SixDofParameter * sixDofParameter =  this->GetSixDofParameter(iTimeLayer);
+
+    sixDofParameter->GetMassCenter(massCenterX, massCenterY, massCenterZ);
+    sixDofParameter->GetMassCenterVelocity(massCenterVelocityX, massCenterVelocityY, massCenterVelocityZ);
+    sixDofParameter->GetEulerAngle(eulerAngleGama, eulerAngleBeta,eulerAngleAlpha);
+    sixDofParameter->GetAngularVelocity(angularVelocityX, angularVelocityY, angularVelocityZ);
+
+    file << setiosflags(ios::left);
+    file << setiosflags(ios::scientific);
+    file << setprecision(6);
+
+    RDouble aleSimulationTime = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("aleSimulationTime");
+
+    file << aleSimulationTime << "\t";
+
+    file << massCenterX << "\t";
+    file << massCenterY << "\t";
+    file << massCenterZ << "\t";
+    file << massCenterVelocityX << "\t";
+    file << massCenterVelocityY << "\t";
+    file << massCenterVelocityZ << "\t";
+    file << eulerAngleGama << "\t";
+    file << eulerAngleBeta << "\t";
+    file << eulerAngleAlpha << "\t";
+    file << angularVelocityX << "\t";
+    file << angularVelocityY << "\t";
+    file << angularVelocityZ << "\t";
+
+    file << "\n";
+}
+
+void SixDofSolver::DumpAleForceInformationBodyFrame(fstream & file)
+{
+    int numberOfAleForceComponents = 6;
+    vector< RDouble > aleForceContainer(numberOfAleForceComponents);
+
+    this->GetDimensionalAerodynamicForceAndMomentBodyFrame(aleForceContainer, 0);
+
+    file << setiosflags(ios::left);
+    file << setiosflags(ios::scientific);
+    file << setprecision(6);
+
+    RDouble aleSimulationTime = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("aleSimulationTime");
+
+    file << aleSimulationTime << "\t";
+
+    for (int iAleForceComponent = 0; iAleForceComponent < numberOfAleForceComponents; ++ iAleForceComponent)
+    {
+        file << aleForceContainer[ iAleForceComponent ] << "\t";
+    }
+    file << "\n";
+}
+
+void SixDofSolver::DumpAleForceInformationInerFrame(fstream & file)
+{
+    int numberOfAleForceComponents = 6;
+    vector< RDouble > aleForceContainer(numberOfAleForceComponents);
+
+    this->GetDimensionalAerodynamicForceAndMomentInerFrame(aleForceContainer, 0);
+
+    file << setiosflags(ios::left);
+    file << setiosflags(ios::scientific);
+    file << setprecision(6);
+
+    RDouble aleSimulationTime = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("aleSimulationTime");
+
+    file << aleSimulationTime << "\t";
+
+    for (int iAleForceComponent = 0; iAleForceComponent < numberOfAleForceComponents; ++ iAleForceComponent)
+    {
+        file << aleForceContainer[ iAleForceComponent ] << "\t";
+    }
+    file << "\n";
+}
+
+void SixDofSolver::DumpRestartSixDofSolver(fstream & file)
+{
+    const int numberOfEquations = 12;
+    vector< RDouble >  generalVariableContainer(numberOfEquations);
+
+    for (int iTimeLayer = 0; iTimeLayer < numberOfTimeLayers; ++ iTimeLayer)
+    {
+        SixDofParameter * sixDofParameter = this->GetSixDofParameter(iTimeLayer);
+        sixDofParameter->GetGeneralVariableContainer(generalVariableContainer);
+        if (resetMassCenter == 1)
+        {
+        }
+        for (int iVar = 0; iVar < numberOfEquations; ++ iVar)
+        {
+            file << generalVariableContainer[iVar] << "   ";
+        }
+        file << "\n";
+        //PHSPACE::PHWrite(file, generalVariableContainer, numberOfEquations);
+    }
+}
+
+void GetSixDofCoefficients(RDouble & a, RDouble & b, RDouble & c, RDouble & d, RDouble & e, RDouble & relaxParameter)
+{
+    int methodForKineticEquation = PHSPACE::GlobalDataBase::GetIntParaFromDB("methodForKineticEquation");
+    relaxParameter = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("relaxParameterOfKinetic");
+
+    RDouble aleTimeStep  = PHSPACE::GetAleTimeStep();
+
+    RDouble thet = 0.0, xi = 0.0, phi = 0.0;
+
+    if (     methodForKineticEquation == KINETIC_SCHEME::ADMAS_BASHFORTH_FIRST_ORDER )
+    {
+        thet = 0.0;
+        xi   = 0.0;
+        phi  = 0.0;
+        relaxParameter = 1.0;
+    }
+    else if (methodForKineticEquation == KINETIC_SCHEME::ADMAS_BASHFORTH_SECOND_ORDER)
+    {
+        thet = 0.0;
+        xi   = 0.0;
+        phi  = 1.0 / 2.0;
+        relaxParameter = 1.0;
+    }
+    else if (methodForKineticEquation == KINETIC_SCHEME::IMPLICIT_EULER_FIRST_ORDER )
+    {
+        thet = 1.0;
+        xi   = 0.0;
+        phi  = 0.0;
+    }
+    else if (methodForKineticEquation == KINETIC_SCHEME::IMPLICIT_EULER_SECOND_ORDER )
+    {
+        thet = 1.0;
+        xi   = 1.0 / 2.0;
+        phi  = 0.0;
+    }
+    else if (methodForKineticEquation == KINETIC_SCHEME::ADMAS_MOULTON_SECOND_ORDER )
+    {
+        thet = 1.0 / 2.0;
+        xi   = 0.0;
+        phi  = 0.0;
+    }
+    else if (methodForKineticEquation == KINETIC_SCHEME::ADMAS_MOULTON_THIRD_ORDER)
+    {
+        thet = 5.0 / 12.0;
+        xi   = 0.0;
+        phi  = 1.0 / 12.0;
+    }
+
+    a = aleTimeStep / (1.0 + xi) * ((1.0 + xi) / aleTimeStep + xi / aleTimeStep);
+    b = aleTimeStep / (1.0 + xi) * (- xi / aleTimeStep);
+    c = aleTimeStep / (1.0 + xi) * (thet);
+    d = aleTimeStep / (1.0 + xi) * (1.0 - thet + phi);
+    e = aleTimeStep / (1.0 + xi) * (- phi);
+}
+
+void SixDofSolver::GetSixDofFlux(SixDofParameter * sixDofParameter, MassCharacter * massCharacter, vector< RDouble > & force, vector< RDouble > & generalSixDofFlux)
+{
+    this->ComputeRightHandSideOfRigidBodyTranslationalMotionEquation  (sixDofParameter, massCharacter, force, generalSixDofFlux);
+    this->ComputeRightHandSideOfRigidBodyTranslationalDynamicsEquation(sixDofParameter, massCharacter, force, generalSixDofFlux);
+    this->ComputeRightHandSideOfRigidBodyRotationalMotionEquation     (sixDofParameter, massCharacter, force, generalSixDofFlux);
+    this->ComputeRightHandSideOfRigidBodyRotationalDynamicsEquation   (sixDofParameter, massCharacter, force, generalSixDofFlux);
+}
+
+void SixDofSolver::ComputeRightHandSideOfRigidBodyTranslationalMotionEquation(SixDofParameter * sixDofParameter, MassCharacter * massCharacter, vector< RDouble > & force, vector< RDouble > & generalSixDofFlux)
+{
+    RDouble massCenterVelocityX,  massCenterVelocityY, massCenterVelocityZ;
+    sixDofParameter->GetMassCenterVelocity(massCenterVelocityX, massCenterVelocityY, massCenterVelocityZ);
+
+    //location
+    generalSixDofFlux[ 0 ] = massCenterVelocityX;
+    generalSixDofFlux[ 1 ] = massCenterVelocityY;
+    generalSixDofFlux[ 2 ] = massCenterVelocityZ;
+}
+
+void SixDofSolver::ComputeRightHandSideOfRigidBodyTranslationalDynamicsEquation(SixDofParameter * sixDofParameter, MassCharacter * massCharacter, vector< RDouble > & force, vector< RDouble > & generalSixDofFlux)
+{
+    RDouble forceX = force[ 0 ];
+    RDouble forceY = force[ 1 ];
+    RDouble forcez = force[ 2 ];
+
+    RDouble mass = massCharacter->GetMass();
+
+    //velocity
+    generalSixDofFlux[ 3 ] = forceX / mass;
+    generalSixDofFlux[ 4 ] = forceY / mass;
+    generalSixDofFlux[ 5 ] = forcez / mass;
+}
+
+void SixDofSolver::ComputeRightHandSideOfRigidBodyRotationalMotionEquation(SixDofParameter * sixDofParameter, MassCharacter * massCharacter, vector< RDouble > & force, vector< RDouble > & generalSixDofFlux)
+{
+    RDouble angularVelocityX, angularVelocityY, angularVelocityZ;
+    RDouble eulerAngleAlpha, eulerAngleBeta, eulerAngleGama;
+
+    sixDofParameter->GetEulerAngle(eulerAngleGama, eulerAngleBeta, eulerAngleAlpha);
+    sixDofParameter->GetAngularVelocity(angularVelocityX, angularVelocityY, angularVelocityZ);
+
+    //attitude
+    generalSixDofFlux[ 8 ] = angularVelocityY * sin(eulerAngleGama )                          + angularVelocityZ * cos(eulerAngleGama );
+    generalSixDofFlux[ 7 ] = angularVelocityY * cos(eulerAngleGama ) / cos(eulerAngleAlpha) - angularVelocityZ * sin(eulerAngleGama ) / cos(eulerAngleAlpha);
+    generalSixDofFlux[ 6 ] = angularVelocityX - generalSixDofFlux[ 7 ] * sin(eulerAngleAlpha);
+}
+
+void SixDofSolver::ComputeRightHandSideOfRigidBodyRotationalDynamicsEquation(SixDofParameter * sixDofParameter, MassCharacter * massCharacter, vector< RDouble > & force, vector< RDouble > & generalSixDofFlux)
+{
+    RDouble ** momentOfInertiaTensor        = massCharacter->GetMomentOfInertiaTensor();
+    RDouble ** inverseMomentOfInertiaTensor = massCharacter->GetInverseMomentOfInertiaTensor();
+
+    vector< RDouble > angularVelocityVector(3);
+    sixDofParameter->GetAngularVelocityContainer(angularVelocityVector);
+
+    vector< RDouble > momentumMoment(3);
+    PHSPACE::MatrixMultiply(momentOfInertiaTensor, angularVelocityVector, momentumMoment, 3, 3);
+
+    RDouble momentVector[ 3 ];
+    momentVector[ 0 ] = force[ 3 ];
+    momentVector[ 1 ] = force[ 4 ];
+    momentVector[ 2 ] = force[ 5 ];
+
+    vector< RDouble > temp1(3);
+    PHSPACE::CrossProduct(angularVelocityVector, momentumMoment, temp1);
+
+    vector< RDouble > temp2(3);
+    temp2[ 0 ] = momentVector[ 0 ] - temp1[ 0 ];
+    temp2[ 1 ] = momentVector[ 1 ] - temp1[ 1 ];
+    temp2[ 2 ] = momentVector[ 2 ] - temp1[ 2 ];
+
+    vector< RDouble > dRotationDtVector(3);
+
+    PHSPACE::MatrixMultiply(inverseMomentOfInertiaTensor, temp2, dRotationDtVector, 3, 3);
+
+    generalSixDofFlux[ 9  ] = dRotationDtVector[ 0 ];
+    generalSixDofFlux[ 10 ] = dRotationDtVector[ 1 ];
+    generalSixDofFlux[ 11 ] = dRotationDtVector[ 2 ];
+
+    PHSPACE::DelPointer2(momentOfInertiaTensor       );
+    PHSPACE::DelPointer2(inverseMomentOfInertiaTensor);
+}
+
+SixDofSolverManager::SixDofSolverManager()
+{
+    sixDofSolverContainer = 0;
+    numberOfMovingBodies  = 0;
+}
+
+SixDofSolverManager::~SixDofSolverManager() 
+{ 
+    if (sixDofSolverContainer)
+    {
+        for (int iMovingBody = 0; iMovingBody < numberOfMovingBodies; ++ iMovingBody)
+        {
+            delete sixDofSolverContainer[ iMovingBody ];
+            sixDofSolverContainer[iMovingBody] = NULL;
+        }
+    }
+    delete [] sixDofSolverContainer;
+    sixDofSolverContainer = NULL;
+}
+
+void SixDofSolverManager::AllocateSixDofSolverContainer()
+{
+    numberOfMovingBodies = PHSPACE::GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+
+    sixDofSolverContainer = new SixDofSolver * [ numberOfMovingBodies ];
+    for (int iMovingBody = 0; iMovingBody < numberOfMovingBodies; ++ iMovingBody)
+    {
+        int RBDMethod = PHSPACE::GetIntegerParameterFromDataBase(iMovingBody, "RBDMethod");
+        
+        if (RBDMethod <= 100)
+        {
+            sixDofSolverContainer[ iMovingBody ] = new SixDofSolver(this);
+        }
+        else
+        {
+            sixDofSolverContainer[ iMovingBody ] = new SixDofSolver(this);
+        }
+    }
+}
+
+void SixDofSolverManager::Initialize()
+{
+    AllocateSixDofSolverContainer();
+
+    for (int iMovingBody = 0; iMovingBody < numberOfMovingBodies; ++ iMovingBody)
+    {
+        sixDofSolverContainer[ iMovingBody ]->Initialize(iMovingBody);
+    }
+}
+
+void SixDofSolverManager::Restart()
+{
+    for (int iMovingBody = 0; iMovingBody < numberOfMovingBodies; ++ iMovingBody)
+    {
+        sixDofSolverContainer[ iMovingBody ]->Restart();
+    }
+}
+
+void SixDofSolverManager::DumpRestart(fstream & file)
+{
+    for (int iMovingBody = 0; iMovingBody < numberOfMovingBodies; ++ iMovingBody)
+    {
+        sixDofSolverContainer[ iMovingBody ]->DumpRestartSixDofSolver(file);
+    }
+}
+
+void SixDofSolverManager::ResetMassCenter()
+{
+    for (int iMovingBody = 0; iMovingBody < numberOfMovingBodies; ++ iMovingBody)
+    {
+        sixDofSolverContainer[iMovingBody]->ResetMassCenter();
+    }
+}
+
+void SixDofSolverManager::Run()
+{
+    using namespace PHMPI;
+    int currentProcessor = GetCurrentProcessorID();
+    int serverProcessor = GetServerProcessorID();
+
+    vector< RDouble > sixDofVariableContainer;
+
+    sixDofVariableContainer.resize(12);
+
+    for (int iMovingBody = 0; iMovingBody < numberOfMovingBodies; ++ iMovingBody)
+    {
+        SixDofParameter * sixDofParameter   = sixDofSolverContainer[ iMovingBody ]->GetSixDofParameter(0);
+
+        if(currentProcessor == serverProcessor)
+        {
+            sixDofSolverContainer[ iMovingBody ]->Run();
+            sixDofParameter->GetGeneralVariableContainer(sixDofVariableContainer);
+        }
+
+        PHMPI::PH_Bcast(&sixDofVariableContainer[ 0 ], 12*sizeof(RDouble), serverProcessor);
+
+        sixDofParameter->SetGeneralVariableContainer(&sixDofVariableContainer[ 0 ]);
+    }
+}
+
+void SixDofSolverManager::Post()
+{
+    for (int iMovingBody = 0; iMovingBody < numberOfMovingBodies; ++ iMovingBody)
+    {
+        SixDofSolver * sixDofSolver = this->GetSixDofSolver(iMovingBody);
+        sixDofSolver->UpdateUnsteadyTerm();
+    }
+    
+    Dump();
+}
+
+void SixDofSolverManager::Dump()
+{
+    using namespace PHMPI;
+    int currentProcessor = GetCurrentProcessorID();
+    int serverProcessor = GetServerProcessorID();
+    if(currentProcessor != serverProcessor)
+    {
+        return;
+    }
+
+    for (int iMovingBody = 0; iMovingBody < numberOfMovingBodies; ++ iMovingBody)
+    {
+        SixDofSolver * sixDofSolver = this->GetSixDofSolver(iMovingBody);
+        sixDofSolver->DumpSixDofSolverInformation();
+    }
+}
+
+MassCharacter * SixDofSolverManager::GetMassCharacter(int bodyIndex)
+{
+    SixDofSolver * sixDofSolver = this->GetSixDofSolver(bodyIndex);
+    return sixDofSolver->GetMassCharacter();
+}
+
+SixDofParameter * SixDofSolverManager::GetSixDofParameterN1(int bodyIndex)
+{
+    SixDofSolver * sixDofSolver = this->GetSixDofSolver(bodyIndex);
+    return sixDofSolver->GetSixDofParameter(2);
+}
+
+SixDofParameter * SixDofSolverManager::GetSixDofParameterN (int bodyIndex)
+{
+    SixDofSolver * sixDofSolver = this->GetSixDofSolver(bodyIndex);
+    return sixDofSolver->GetSixDofParameter(1);
+}
+
+SixDofParameter * SixDofSolverManager::GetSixDofParameter  (int bodyIndex)
+{
+    SixDofSolver * sixDofSolver = this->GetSixDofSolver(bodyIndex);
+    return sixDofSolver->GetSixDofParameter(0);
+}
+
+SixDofParameter * GetSixDofParameter(int bodyIndex)
+{
+    SixDofSolverManager * sixDofSolverManager = GetAleManager()->GetSixDofSolverManager();
+
+    return sixDofSolverManager->GetSixDofParameter(bodyIndex);
+}
+
+void ConvertVectorFromInertialCoordinateSystemToBodyCoordinateSystem(vector< RDouble > & vectorInInertialFrame, vector< RDouble > & angleVector, vector< RDouble > & massCenter, vector< RDouble > & vectorInBodyFrame)
+{
+    vectorInBodyFrame[ 0 ] = vectorInInertialFrame[ 0 ] - massCenter[ 0 ];
+    vectorInBodyFrame[ 1 ] = vectorInInertialFrame[ 1 ] - massCenter[ 1 ];
+    vectorInBodyFrame[ 2 ] = vectorInInertialFrame[ 2 ] - massCenter[ 2 ];
+
+    PHSPACE::RotateAboutAxisY(vectorInBodyFrame, angleVector[ 1 ], vectorInBodyFrame);
+    PHSPACE::RotateAboutAxisZ(vectorInBodyFrame, angleVector[ 2 ], vectorInBodyFrame);
+    PHSPACE::RotateAboutAxisX(vectorInBodyFrame, angleVector[ 0 ], vectorInBodyFrame);
+}
+
+void ConvertVectorFromInertialCoordinateSystemToBodyCoordinateSystem(vector< RDouble > & vectorInInertialFrame, vector< RDouble > & angleVector, vector< RDouble > & vectorInBodyFrame)
+{
+    PHSPACE::RotateAboutAxisY(vectorInInertialFrame, angleVector[ 1 ], vectorInBodyFrame);
+    PHSPACE::RotateAboutAxisZ(vectorInBodyFrame    , angleVector[ 2 ], vectorInBodyFrame);
+    PHSPACE::RotateAboutAxisX(vectorInBodyFrame    , angleVector[ 0 ], vectorInBodyFrame);
+}
+
+void ConvertVectorFromBodyCoordinateSystemToInertialCoordinateSystem(vector< RDouble > & vectorInBodyFrame, vector< RDouble > & angleVector, vector< RDouble > & massCenter,  vector< RDouble > & vectorInInertialFrame)
+{
+    PHSPACE::RotateAboutAxisX(vectorInBodyFrame    , - angleVector[ 0 ], vectorInInertialFrame);
+    PHSPACE::RotateAboutAxisZ(vectorInInertialFrame, - angleVector[ 2 ], vectorInInertialFrame);
+    PHSPACE::RotateAboutAxisY(vectorInInertialFrame, - angleVector[ 1 ], vectorInInertialFrame);
+
+    vectorInInertialFrame[ 0 ] += massCenter[ 0 ];
+    vectorInInertialFrame[ 1 ] += massCenter[ 1 ];
+    vectorInInertialFrame[ 2 ] += massCenter[ 2 ];
+}
+
+void ConvertVectorFromBodyCoordinateSystemToInertialCoordinateSystem(vector< RDouble > & vectorInBodyFrame, vector< RDouble > & angleVector, vector< RDouble > & vectorInInertialFrame)
+{
+    PHSPACE::RotateAboutAxisX(vectorInBodyFrame    , - angleVector[ 0 ], vectorInInertialFrame);
+    PHSPACE::RotateAboutAxisZ(vectorInInertialFrame, - angleVector[ 2 ], vectorInInertialFrame);
+    PHSPACE::RotateAboutAxisY(vectorInInertialFrame, - angleVector[ 1 ], vectorInInertialFrame);
+}
+
+void RotateAboutAxisX(vector< RDouble > & vectorIn, RDouble rotateAngle, vector< RDouble > & vectorOut)
+{
+    RDouble oldX = vectorIn[ 0 ];
+    RDouble oldY = vectorIn[ 1 ];
+    RDouble oldZ = vectorIn[ 2 ];
+    vectorOut[ 0 ] = 1.0      * oldX + 0.0                * oldY + 0.0                * oldZ;
+    vectorOut[ 1 ] = 0.0      * oldX + cos(rotateAngle) * oldY + sin(rotateAngle) * oldZ;
+    vectorOut[ 2 ] = 0.0      * oldX - sin(rotateAngle) * oldY + cos(rotateAngle) * oldZ;
+}
+
+void RotateAboutAxisY(vector< RDouble > & vectorIn, RDouble rotateAngle, vector< RDouble > & vectorOut)
+{
+    RDouble oldX = vectorIn[ 0 ];
+    RDouble oldY = vectorIn[ 1 ];
+    RDouble oldZ = vectorIn[ 2 ];
+    vectorOut[ 0 ] = cos(rotateAngle) * oldX + 0.0      * oldY - sin(rotateAngle) * oldZ;
+    vectorOut[ 1 ] = 0.0                * oldX + 1.0      * oldY + 0.0                * oldZ;
+    vectorOut[ 2 ] = sin(rotateAngle) * oldX + 0.0      * oldY + cos(rotateAngle) * oldZ;
+}
+
+void RotateAboutAxisZ(vector< RDouble > & vectorIn, RDouble rotateAngle, vector< RDouble > & vectorOut)
+{
+    RDouble oldX = vectorIn[ 0 ];
+    RDouble oldY = vectorIn[ 1 ];
+    RDouble oldZ = vectorIn[ 2 ];
+    vectorOut[ 0 ] =   cos(rotateAngle) * oldX + sin(rotateAngle) * oldY + 0.0      * oldZ;
+    vectorOut[ 1 ] = - sin(rotateAngle) * oldX + cos(rotateAngle) * oldY + 0.0      * oldZ;
+    vectorOut[ 2 ] =   0.0                * oldX + 0.0                * oldY + 1.0      * oldZ;
+}
+
+}
\ No newline at end of file
diff --git a/API/Physics/src/Solver.cpp b/API/Physics/src/Solver.cpp
new file mode 100644
index 0000000..50e4752
--- /dev/null
+++ b/API/Physics/src/Solver.cpp
@@ -0,0 +1,28 @@
+#include "PHMpi.h"
+#include "Solver.h"
+
+namespace PHSPACE
+{
+vector< vector< PHSolver *> *> * GlobalSolvers::globalSolversList = new vector< vector< PHSolver *> * >;
+
+PHSolver *GlobalSolvers::GetSolver(int zoneID, int solverID)
+{
+    return (*(*globalSolversList)[zoneID])[solverID];
+}
+
+int GlobalSolvers::GetNumberOfSolvers(int iZone)
+{
+    return static_cast<int>((*globalSolversList)[iZone]->size());
+}
+
+void GlobalSolvers::AddSolverToGlobal(int iZone, vector < PHSolver * > *solversList)
+{
+    if (globalSolversList->size() == 0)
+    {
+        int nZones = PHMPI::GetNumberofGlobalZones();
+        globalSolversList->resize(nZones, 0);
+    }
+    (*globalSolversList)[iZone] = solversList;
+}
+
+}
diff --git a/API/Physics/src/Task.cpp b/API/Physics/src/Task.cpp
new file mode 100644
index 0000000..817e393
--- /dev/null
+++ b/API/Physics/src/Task.cpp
@@ -0,0 +1,290 @@
+#include "Task.h"
+#include "Solver.h"
+
+#include "Math_BasisFunction.h"
+#include "Geo_Grid.h"
+#include "Constants.h"
+using namespace std;
+
+namespace PHSPACE
+{
+vector<Task *> * Task::ootasklist = new vector<Task *>;
+
+// const int Task::SOLVE_FIELD      = 0;
+// const int Task::CREATE_GRID      = 1;
+// const int Task::CAL_WALL_DIST    = 2;
+// const int Task::PARTITION_GRID   = 3;
+// const int Task::OVERSETGRID_VIEW = 5;
+// const int Task::OVERSET_CONFIG   = 6;
+
+Task::Task()
+{
+    this->main_action = NOAction;
+    this->pre_action  = NOAction;
+    this->post_action = NOAction;
+    this->actkey      = 0;
+}
+
+Task::~Task()
+{
+    delete this->actkey;
+}
+
+void Task::RunTask()
+{
+    ActionKey *actkey = this->GetActionKey();
+
+    this->PreTask(actkey);
+
+    this->MainTask(actkey);
+
+    this->PostTask(actkey);
+}
+
+void NOAction (ActionKey *actkey)
+{
+
+}
+
+void AddTasktoSimu(Task *task)
+{
+    Task::ootasklist->push_back(task);
+}
+
+void RunSimuTask(Task *task, bool run_now)
+{
+    if (run_now)
+    {
+        task->RunTask();
+    }
+    else
+    {
+        AddTasktoSimu(task);
+    }
+}
+
+vector<RDouble> store_value;
+
+RDouble MaxStoreValue()
+{
+    RDouble value = store_value[0];
+
+    for (size_t i = 0; i < store_value.size(); ++ i)
+    {
+        value = MAX(store_value[i],value);
+    }
+    return value;
+}
+
+void GlobalSolve()
+{
+    uint_t taskNumber = Task::ootasklist->size();
+
+    for (int iTask = 0; iTask < taskNumber; ++ iTask)
+    {
+        Task *task = (*Task::ootasklist)[iTask];
+
+        task->RunTask();
+
+        delete task;
+    }
+
+    ClearTaskList();
+}
+
+void ClearTaskList()
+{
+    Task::ootasklist->resize(0);
+}
+
+void GeneralAction(ActionKey *actkey, int iZone)
+{
+    if (actkey->kind == SOLVER_BASED)
+    {
+        PHSolver *solver = GlobalSolvers::GetSolver(iZone, actkey->solverID);
+        solver->Action(actkey);
+    }
+    else
+    {
+        Grid *grid = GetGrid(iZone, actkey->level);
+        grid->Action(actkey);
+    }
+}
+
+void PH_Interface(ActionKey *actkey, int iZone, int jZone)
+{
+    using namespace PHMPI;
+
+    //! iZone is the current zone, jZone is the target zone.
+    int send_proc = GetZoneProcessorIDSepMode(iZone);
+    int recv_proc = GetZoneProcessorIDSepMode(jZone);
+
+    int tag = GetSendRecvTag(actkey, iZone);
+    int myid = GetCurrentProcessorID();
+
+    if (myid == send_proc)
+    {
+        //! If this process is a send process.
+        actkey->ipos = jZone;
+        GeneralAction(actkey, iZone);
+    }
+
+    
+    PH_Trade(actkey, send_proc, recv_proc, tag);   
+
+    if (myid == recv_proc)
+    {
+        //! If this process is a receive process,there are two situations:
+        //! One is that this process is a receive process and also a send process.
+        //! The other is that this process is a receive process not a send process.
+        //! In both situation,the target zone data needs to be translate.
+        actkey->ipos = iZone;
+        GeneralTranslateAction(actkey, jZone);
+    }
+}
+
+void PH_InterfaceNonBlocking(ActionKey *actkey, DataContainer *sendBuffer, DataContainer *receivedBuffer, int iZone, int jZone, vector <PH_Request> &requestContainer)
+{
+    using namespace PHMPI;
+
+    int currentProcessor  = GetCurrentProcessorID();
+    int sendProcessor     = GetZoneProcessorIDSepMode(iZone);
+    int receiveProcessor  = GetZoneProcessorIDSepMode(jZone);
+
+    int tag = GetSendRecvTag(actkey, iZone);
+
+    //! Compress the send information into the actkey.
+    if (currentProcessor == sendProcessor)
+    {
+        DataContainer *originalData = actkey->GetData();
+
+        DataContainer *compressData = sendBuffer;
+        if(sendProcessor == receiveProcessor)
+        {
+            compressData = receivedBuffer;
+        }
+        //! Fill the send buffer by actkey.
+        actkey->SetData(compressData);
+        actkey->ipos = jZone;
+        GeneralAction(actkey, iZone);
+
+        actkey->SetData(originalData);
+    }
+
+    if (sendProcessor == receiveProcessor)
+    {
+        return;
+    }
+    //! Communication.
+    if (currentProcessor == sendProcessor)
+    {
+        streamsize nlen = sendBuffer->size();
+        //! Send the data to neighbors.
+        send(sendBuffer, receiveProcessor, nlen, requestContainer, tag);
+    }
+    else if (currentProcessor == receiveProcessor)
+    {
+        //! Pre-calculating the data length of the received data.
+        CharVecSizeType nlen = PH_Interface_GetLength(actkey, iZone, jZone);
+        //! Receive data from neighbors.
+        receive(receivedBuffer, sendProcessor, nlen, requestContainer, tag);
+    }
+}
+
+void GeneralTranslateAction(ActionKey *actkey, int iZone)
+{
+    if (actkey->kind == SOLVER_BASED)
+    {
+        GlobalSolvers::GetSolver(iZone, actkey->solverID)->TranslateAction(actkey);
+    }
+    else
+    {
+        GetGrid(iZone, actkey->level)->TranslateAction(actkey);
+    }
+}
+
+streamsize GeneralTranslateActionLength(ActionKey *actkey, int iZone)
+{
+    if (actkey->kind == SOLVER_BASED)
+    {
+        return GlobalSolvers::GetSolver(iZone, actkey->solverID)->TranslateActionLength(actkey);
+    }
+    else
+    {
+        return GetGrid(iZone, actkey->level)->TranslateActionLength(actkey);
+    }
+}
+
+
+CharVecSizeType PH_Interface_GetLength(ActionKey *actkey, int iZone, int jZone)
+{
+    using namespace PHMPI;
+    CharVecSizeType nlen = 0;
+
+    int send_proc = GetZoneProcessorIDSepMode(iZone);
+    int recv_proc = GetZoneProcessorIDSepMode(jZone);
+
+    int myid = GetCurrentProcessorID();
+
+    if (myid == send_proc)
+    {
+        DataContainer *cdata = actkey->GetData();
+        nlen = cdata->size();
+    }
+    if (myid == recv_proc)
+    {
+        actkey->ipos = iZone;
+        nlen = static_cast< CharVecSizeType >(GeneralTranslateActionLength(actkey, jZone));
+    }
+    return nlen;
+}
+
+
+void PH_ReadPattern(ActionKey *actkey, ActionKeyFUN main_action, int send_proc, int recv_proc, int iZone)
+{
+    using namespace PHMPI;
+
+    int myid = GetCurrentProcessorID();
+    int tag = GetSendRecvTag(actkey, iZone);
+
+    if (myid == send_proc)
+    {
+        //! If this process is a send process.
+        main_action(actkey);
+    }
+
+    PH_Trade(actkey, send_proc, recv_proc, tag);
+
+    if (myid == recv_proc)
+    {
+        //! If this process is a receive process,there are two situations:
+        //! One is that this process is a receive process and also a send process.
+        //! The other is that this process is a receive process not a send process.
+        //! In both situation,the target zone data needs to be translate.
+        GeneralAction(actkey, iZone);
+    }
+}
+
+void PH_WritePattern(ActionKey *actkey, ActionKeyFUN main_action, int send_proc, int recv_proc, int iZone)
+{
+    using namespace PHMPI;
+
+    int myid = GetCurrentProcessorID();
+    int tag = GetSendRecvTag(actkey, iZone);
+
+    if (myid == send_proc)
+    {
+        //! If the process zone i belongs to is the current process.
+        GeneralAction(actkey, iZone);
+    }
+
+    PH_Trade(actkey, send_proc, recv_proc, tag);
+
+    if (myid == recv_proc)
+    {
+        //! If this process is server process.
+        main_action(actkey);
+    }
+}
+
+}
diff --git a/API/Physics/src/Task_ServerUpdateInterface.cpp b/API/Physics/src/Task_ServerUpdateInterface.cpp
new file mode 100644
index 0000000..168b05e
--- /dev/null
+++ b/API/Physics/src/Task_ServerUpdateInterface.cpp
@@ -0,0 +1,133 @@
+#include "Task_ServerUpdateInterface.h"
+#include "Task.h"
+#include "Geo_Grid.h"
+#include "TK_Log.h"
+
+namespace PHSPACE
+{
+
+void MainTaskBlocking(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *zoneNeighbor = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = zoneNeighbor->GetNumberOfNeighbor();
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZoneIndex = zoneNeighbor->GetZoneIndexOfNeighbor(iNeighbor);
+            PH_Interface(actkey, iZone, neighborZoneIndex);
+        }
+    }
+}
+
+void MainTaskNonBlocking(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    int currentProcessorID = GetCurrentProcessorID();
+
+    vector <vector <DataContainer *> > receivedDataBuffer;
+    vector <vector <DataContainer *> > sendDataBuffer;
+    receivedDataBuffer.resize(nZones);
+    sendDataBuffer.resize(nZones);
+
+    vector <PH_Request> requestContainer;
+
+    //! Each processor runs along the same order, which is from 0 to nZones.
+    //! Each simulation zone is looped over to judge if the communication is necessary.
+    //! Step 1: Compressing data into actkey and Communication.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *zoneNeighbor = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = zoneNeighbor->GetNumberOfNeighbor();
+
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZoneIndex = zoneNeighbor->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int sendProcessID = GetZoneProcessorIDSepMode(iZone);
+            int receiveProcessID = GetZoneProcessorIDSepMode(neighborZoneIndex);
+
+            if(currentProcessorID != sendProcessID && currentProcessorID != receiveProcessID)
+            {
+                continue;
+            }
+
+            //! Allocate the buffers for sending and receiving.
+            DataContainer *receivedBuffer = 0;
+            DataContainer *sendBuffer = 0;
+            if(currentProcessorID == receiveProcessID)
+            {
+                receivedBuffer = new DataContainer;
+                receivedDataBuffer[iZone].push_back(receivedBuffer);
+            }
+            if(currentProcessorID == sendProcessID)
+            {
+                sendBuffer = new DataContainer;
+                sendDataBuffer[iZone].push_back(sendBuffer);
+            }
+
+            //! Swapping.
+            PH_InterfaceNonBlocking(actkey, sendBuffer, receivedBuffer, iZone, neighborZoneIndex, requestContainer);
+        }
+    }
+
+    //! Step2: MPI waiting for Non-blocking communications.
+    if(PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_Wait(static_cast<int>(requestContainer.size()), &(requestContainer[0]));
+    }
+
+    //! Step3: Translate the data container.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *zoneNeighbor = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = zoneNeighbor->GetNumberOfNeighbor();
+
+        int count = 0;
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZoneIndex = zoneNeighbor->GetZoneIndexOfNeighbor(iNeighbor);
+            int receiveProcessID = GetZoneProcessorIDSepMode(neighborZoneIndex);
+            if (currentProcessorID == receiveProcessID)
+            {
+                DataContainer *originalData = actkey->GetData();
+
+                actkey->SetData(receivedDataBuffer[iZone][count]);
+                actkey->ipos = iZone;
+                GeneralTranslateAction(actkey, neighborZoneIndex);
+
+                actkey->SetData(originalData);
+                ++ count;
+            }
+        }
+    }
+
+    //! Step4: Free the buffers.
+    for (std::size_t iDim = 0; iDim < receivedDataBuffer.size(); ++ iDim)
+    {
+        for (std::size_t jDim = 0; jDim < receivedDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete receivedDataBuffer[iDim][jDim];
+        }
+        receivedDataBuffer[iDim].clear();
+    }
+    receivedDataBuffer.clear();
+
+    for (std::size_t iDim = 0; iDim < sendDataBuffer.size(); ++ iDim)
+    {
+        for (std::size_t jDim = 0; jDim < sendDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete sendDataBuffer[iDim][jDim];
+        }
+        sendDataBuffer[iDim].clear();
+    }
+
+    sendDataBuffer.clear();
+    requestContainer.clear();
+}
+
+}
\ No newline at end of file
diff --git a/API/Physics/src/Task_ServerUpdateInterpoint.cpp b/API/Physics/src/Task_ServerUpdateInterpoint.cpp
new file mode 100644
index 0000000..acd5e3d
--- /dev/null
+++ b/API/Physics/src/Task_ServerUpdateInterpoint.cpp
@@ -0,0 +1,221 @@
+#include "Task_ServerUpdateInterpoint.h"
+#include "Geo_Grid.h"
+#pragma warning(disable:4100)
+namespace PHSPACE
+{
+TaskServerUpdateInterpoint::TaskServerUpdateInterpoint() {}
+
+TaskServerUpdateInterpoint::~TaskServerUpdateInterpoint() {}
+
+void TaskServerUpdateInterpoint::PreTask(ActionKey *actkey) {}
+
+void TaskServerUpdateInterpoint::PostTask(ActionKey *actkey) {}
+
+void TaskServerUpdateInterpoint::MainTask(ActionKey *actkey)
+{
+    this->MainTaskNonBlocking(actkey);
+}
+
+void TaskServerUpdateInterpoint::MainTaskBlocking(ActionKey *actkey)
+{
+    //using namespace PHMPI;
+    //int nZones = GetNumberofGlobalZones();
+
+    //for (int iZone = 0; iZone < nZones; ++ iZone)
+    //{
+    //    ZoneNeighbor *zoneNeighbor = zoneConnectivity->GetZoneNeighbor(iZone);
+
+    //    std::size_t numberOfNeighbor = zoneNeighbor->GetNumberOfNeighbor();
+
+    //    for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+    //    {
+    //        int neighborZoneIndex = zoneNeighbor->GetZoneIndexOfNeighbor(iNeighbor);
+
+    //        PH_Interpoint(actkey, iZone, neighborZoneIndex);
+    //    }
+    //}
+}
+
+void TaskServerUpdateInterpoint::MainTaskNonBlocking(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    int currentProcessor = GetCurrentProcessorID();
+
+    vector<vector<DataContainer *> > receivedDataBuffer;
+    vector<vector<DataContainer *> > sendDataBuffer;
+    receivedDataBuffer.resize(nZones);
+    sendDataBuffer.resize(nZones);
+
+    vector<PH_Request> requestContainer;
+
+    //! Each processor runs along the same order, which is from 0 to nZones.
+    //! Each simulation zone is looped over to judge if the communication is necessary.
+    //! Step 1: Compressing data into actkey and Communication.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *zoneNeighborForPoint = zoneConnectivityForPoint->GetZoneNeighborForPoint(iZone);
+        std::size_t numberOfNeighbor = zoneNeighborForPoint->GetNumberOfNeighbor();
+
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZoneIndexForPoint = zoneNeighborForPoint->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int sendProcessor = GetZoneProcessorIDSepMode(iZone);
+            int receiveProcessor = GetZoneProcessorIDSepMode(neighborZoneIndexForPoint);
+
+            if(currentProcessor != sendProcessor &&currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate the buffers for sending and receiving.
+            DataContainer *receivedBuffer = 0;
+            DataContainer *sendBuffer = 0;
+            if(currentProcessor == receiveProcessor)
+            {
+                receivedBuffer = new DataContainer;
+                receivedDataBuffer[iZone].push_back(receivedBuffer);
+            }
+            if(currentProcessor == sendProcessor)
+            {
+                sendBuffer = new DataContainer;
+                sendDataBuffer[iZone].push_back(sendBuffer);
+            }
+
+            //! Swapping.
+            InterpointNonBlocking(actkey, sendBuffer, receivedBuffer, iZone, neighborZoneIndexForPoint, requestContainer);
+        }
+    }
+
+    //! Step2: MPI waiting for Non-blocking communications.
+    if(PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_Wait(static_cast<int>(requestContainer.size()), &(requestContainer[0]));
+    }
+
+
+    //! Step3: Translate the data container.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *zoneNeighborForPoint = zoneConnectivityForPoint->GetZoneNeighborForPoint(iZone);
+        std::size_t numberOfNeighbor = zoneNeighborForPoint->GetNumberOfNeighbor();
+
+        int count = 0;
+        for (std::size_t ineighbor = 0; ineighbor < numberOfNeighbor; ++ ineighbor)
+        {
+            int neighborZoneIndexForPoint = zoneNeighborForPoint->GetZoneIndexOfNeighbor(ineighbor);
+
+            int receiveProcessor = GetZoneProcessorIDSepMode(neighborZoneIndexForPoint);
+
+            if (currentProcessor == receiveProcessor)
+            {
+                DataContainer *originalData = actkey->GetData();
+
+                actkey->SetData(receivedDataBuffer[iZone][count]);
+                actkey->ipos = iZone;
+                GeneralTranslateAction(actkey,neighborZoneIndexForPoint);
+
+                actkey->SetData(originalData);
+                ++ count;
+            }
+        }
+    }
+
+    //! Step4: Free the buffers.
+    for (std::size_t iDimension = 0; iDimension < receivedDataBuffer.size(); ++ iDimension)
+    {
+        for (std::size_t jDimension = 0; jDimension < receivedDataBuffer[iDimension].size(); ++ jDimension)
+        {
+            delete receivedDataBuffer[iDimension][jDimension];
+        }
+        receivedDataBuffer[iDimension].clear();
+    }
+    receivedDataBuffer.clear();
+
+    for (std::size_t iDimension = 0; iDimension < sendDataBuffer.size(); ++ iDimension)
+    {
+        for (std::size_t jDimension = 0; jDimension < sendDataBuffer[iDimension].size(); ++ jDimension)
+        {
+            delete sendDataBuffer[iDimension][jDimension];
+        }
+        sendDataBuffer[iDimension].clear();
+    }
+    sendDataBuffer.clear();
+
+    requestContainer.clear();
+}
+
+void TaskServerUpdateInterpoint::InterpointNonBlocking(ActionKey *actkey, DataContainer *sendBuffer, DataContainer *receivedBuffer, int iZone, int jZone, vector<PH_Request> &requestContainer)
+{
+    using namespace PHMPI;
+
+    int currentProcessor = GetCurrentProcessorID();
+    int sendProcessor = GetZoneProcessorIDSepMode(iZone);
+    int receiveProcessor = GetZoneProcessorIDSepMode(jZone);
+
+    int tag = GetSendRecvTag(actkey, iZone);
+
+    // Compress the send information into the actkey.
+    if (currentProcessor == sendProcessor)
+    {    
+        DataContainer *originalData = actkey->GetData();
+
+        DataContainer *compressData = sendBuffer;
+        if(sendProcessor == receiveProcessor) compressData = receivedBuffer;
+
+        // Fill the send buffer by actkey.
+        actkey->SetData(compressData);
+        actkey->ipos = jZone;
+        GeneralAction(actkey, iZone);
+
+        actkey->SetData(originalData);
+    }
+
+
+    if (sendProcessor == receiveProcessor)
+    {
+        return;
+    }
+
+    // Communication.
+    if (currentProcessor == sendProcessor)
+    {
+        streamsize nlen = sendBuffer->size();
+
+        // Send the data to neighbors.
+        send(sendBuffer, receiveProcessor, nlen, requestContainer, tag);
+    }
+    else if (currentProcessor == receiveProcessor)
+    {
+        // Pre-calculating the data length of the received data.
+        CharVecSizeType nlen = InterpointGetLength(actkey, iZone, jZone);
+
+        // Receive data from neighbors.
+        receive(receivedBuffer, sendProcessor, nlen, requestContainer, tag);
+    }
+}
+
+CharVecSizeType TaskServerUpdateInterpoint::InterpointGetLength(ActionKey *actkey, int iZone, int jZone)
+{
+    using namespace PHMPI;
+    CharVecSizeType nlen = 0;
+
+    int sendProcessor = GetZoneProcessorIDSepMode(iZone);
+    int receiveProcessor = GetZoneProcessorIDSepMode(jZone);
+
+    int myID = GetCurrentProcessorID();    
+    if (myID == sendProcessor)
+    {
+        DataContainer *cdata = actkey->GetData();
+        nlen = cdata->size();
+    }
+    if (myID == receiveProcessor)
+    {
+        actkey->ipos = iZone;
+        nlen = static_cast<CharVecSizeType>(GeneralTranslateActionLength(actkey, jZone));
+    }
+    return nlen;
+}
+
+}
\ No newline at end of file
diff --git a/API/Physics/src/Task_Simple.cpp b/API/Physics/src/Task_Simple.cpp
new file mode 100644
index 0000000..8e022bd
--- /dev/null
+++ b/API/Physics/src/Task_Simple.cpp
@@ -0,0 +1,30 @@
+#include "Task_Simple.h"
+
+namespace PHSPACE
+{
+//Task_Simple::Task_Simple(){}
+//Task_Simple::~Task_Simple(){}
+
+void Task_Simple::PreTask(ActionKey *actkey){}
+
+void Task_Simple::PostTask(ActionKey *actkey){}
+
+void Task_Simple::MainTask(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    int myid = GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int proc = GetZoneProcessorIDSepMode(iZone);
+
+        if (myid == proc)
+        {
+            GeneralAction(actkey, iZone);
+        }
+    }
+}
+
+}
\ No newline at end of file
diff --git a/API/Physics/src/Task_WriteBinaryTecplot.cpp b/API/Physics/src/Task_WriteBinaryTecplot.cpp
new file mode 100644
index 0000000..ae297ec
--- /dev/null
+++ b/API/Physics/src/Task_WriteBinaryTecplot.cpp
@@ -0,0 +1,109 @@
+#include "Task_WriteBinaryTecplot.h"
+#include "PHIO.h"
+
+#include "Post_Visual.h"
+using namespace std;
+#pragma warning(disable:4100)
+namespace PHSPACE
+{
+
+
+void Task_WriteBinaryTecplot::PostTask(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    if (actkey->VTKvisual == true && myid == server)
+    {
+        ActionKeyFUN post_action = this->GetPostAction();
+        post_action(actkey);
+    }
+
+    if (datalist.size() > 0)
+    {
+        ActionKeyFUN post_action = this->GetPostAction();
+        post_action(actkey);
+
+        #ifdef USE_TecplotLib
+        DumpToTecio dumptotecio(datalist, actkey->tecfilename, this->flowType);
+        dumptotecio.Run();
+        #endif
+    }
+}
+
+LIB_EXPORT Task_WriteBinaryTecplot::Task_WriteBinaryTecplot(int flowType)
+{
+    this->flowType = flowType;
+}
+
+LIB_EXPORT Task_WriteBinaryTecplot::~Task_WriteBinaryTecplot(){};
+
+void Task_WriteBinaryTecplot::PreTask(ActionKey *actkey){};
+
+void Task_WriteBinaryTecplot::MainTask(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    ServerWrite(actkey);
+}
+
+void Task_WriteBinaryTecplot::ServerWrite(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    
+    int recv_proc;
+    int myid;
+
+    if (actkey->VTKvisual == true)
+    {
+        if (! PHMPI::IsParallelRun())
+        {
+            ParallelOpenFile(actkey);
+        }
+        else
+        {
+            ParallelOpenFile2(actkey);
+        }
+    }
+
+    for (int iZone =  0; iZone < nZones; ++ iZone)
+    {
+        DataContainer *cdata = actkey->GetData();
+        cdata->moveto_begin();
+        
+        DataContainer *tecdata = actkey->GetTecData();
+        tecdata->moveto_begin();
+
+        int send_proc = GetZoneProcessorID(iZone);
+        recv_proc = GetZoneFileID(iZone);
+
+        myid = GetCurrentProcessorID();
+        int tag = GetSendRecvTag(actkey, iZone);
+
+        if (myid == send_proc)
+        {
+            GeneralAction(actkey, iZone);
+        }
+        
+        PH_Trade(actkey, send_proc, recv_proc, tag);
+
+        if(myid == recv_proc)
+        {
+            if (actkey->VTKvisual == true)
+            {
+                WriteASCIIFile(actkey);
+            }
+
+            datalist.push_back(tecdata);
+            DataContainer *cdata1 = new DataContainer();
+            actkey->SetTecData(cdata1);
+        }
+    }
+
+    if (actkey->VTKvisual == true)
+    {
+        ParallelCloseFile(actkey);
+    }
+}
+
+}
diff --git a/API/Physics/src/Zone.cpp b/API/Physics/src/Zone.cpp
new file mode 100644
index 0000000..7e2084b
--- /dev/null
+++ b/API/Physics/src/Zone.cpp
@@ -0,0 +1,311 @@
+#include "Gas.h"
+#include "PHMpi.h"
+#include "PHIO.h"
+#include "Zone.h"
+#include "Geo_UnstructBC.h"
+#include "Geometry.h"
+#include "PerfectGas.h"
+#include "Pointer.h"
+#include "AleModel.h"
+#include "MixGrid.h"
+#include "Solver.h"
+#include "Glb_Dimension.h"
+#include "GridType.h"
+
+#ifdef USE_INCOMSOLVER
+#include "IncomGas.h"
+#endif
+
+#include "MixedGas.h"
+
+using namespace std;
+
+#pragma warning (disable:913)
+namespace PHSPACE
+{
+vector <Zone *> *GlobalZones;
+
+Zone::Zone(int index)
+{
+    this->index = index;
+    solvers = new vector <PHSolver *>;
+    geom    = new PHGeometry(new vector <Grid *>);
+
+    zPara  = new Data_Param();
+    zField = new Data_Field();
+
+    nsolver = 0;
+}
+
+Zone::~Zone()
+{
+    for (std::size_t iSolver = 0; iSolver < solvers->size(); ++ iSolver)
+    {
+        delete (*solvers)[iSolver];
+    }
+    delete solvers;
+
+    delete geom;
+    delete zPara;
+    delete zField;
+
+    CleanGlobalValuesSolver();
+}
+
+void Zone::AddGridAndCopyZonePara(Grid *grid)
+{
+    grid->CopyPara(zPara);
+    geom->AddGrid(grid);
+}
+
+void Zone::AddSolver(PHSolver *solver)
+{
+    //! Add the solver into the current zone.
+    this->solvers->push_back(solver);
+    Zone::SetNSolver(static_cast<int>(this->solvers->size()));
+
+    //! Add the solver list of the current zone into the global solver list.
+    GlobalSolvers::AddSolverToGlobal(this->GetIndex(), this->solvers);
+}
+
+void Zone::AddGridToGlobal(int iZone)
+{
+    PHSPACE::AddGridToGlobal(iZone, geom->GetVectorGrid());
+}
+
+void Zone::AddGrid(Grid *grid)
+{
+    geom->AddGrid(grid);
+}
+
+void Zone::ComputeWeight()
+{
+    for (int iLevel = 0; iLevel < geom->GetNumberOfMultiGrid(); ++ iLevel)
+    {
+        geom->GetGrid(iLevel)->ComputeWeight();
+    }
+}
+
+void Zone::CoarseGrids()
+{
+    Grid *baseGrid = geom->GetGrid(0);
+
+    int nMGLevel = GlobalDataBase::GetIntParaFromDB("nMGLevel");
+
+    for (int iLevel = 1; iLevel < nMGLevel; ++ iLevel)
+    {
+        Grid *fineGrid = geom->GetGrid(iLevel - 1);
+
+        fineGrid->CoarseGrids(nMGLevel);
+
+        Grid *coarseGrid = fineGrid->GetCoarseGrid();
+        if (coarseGrid)
+        {
+            if (baseGrid->GetInterfaceInfo())
+            {
+                InterfaceInfo *cgridInterfaceInfo = new InterfaceInfo(*baseGrid->GetInterfaceInfo());
+                coarseGrid->SetInterfaceInfo(cgridInterfaceInfo);
+            }
+            if (baseGrid->GetInterpointInfo())
+            {
+                InterpointInformation *cgridInterpointInfo = new InterpointInformation(*baseGrid->GetInterpointInfo());
+                coarseGrid->SetInterpointInfo(cgridInterpointInfo);
+            }
+            AddGridAndCopyZonePara(coarseGrid);
+            coarseGrid->InitMovingGrids();
+        }
+        else
+        {
+            break;
+        }
+    }
+
+    for (int iLevel = 1; iLevel < nMGLevel; ++ iLevel)
+    {
+        Grid *grid = geom->GetGrid(iLevel);
+        grid->AllocateOversetGrid();
+        //ostringstream oss;
+        //oss << "level" << iLevel << ".plt";
+        //VisualizationMesh2D( UnstructGridCast(grid), oss.str() );
+    }
+}
+
+void Zone::SetInterface(Grid *base_grid, Grid *cgrid)
+{
+    InterfaceInfo *interfaceInfo = base_grid->GetInterfaceInfo();
+    cgrid->SetInterfaceInfo(interfaceInfo);
+}
+
+void Zone::ShowCoarseGrids()
+{
+/*
+    for (int iLevel = 1; iLevel < geom->GetNumberOfMultiGrid(); ++ iLevel)
+    {
+        Grid *grid = geom->GetGrid(iLevel);
+
+        if(grid->Type() == PHSPACE::UNSTRUCTGRID)
+        {
+            std::ostringstream oss;
+            oss << "./results/grid" << this->GetIndex() << "_" << "level_" << iLevel << ".plt";
+
+            if(PHSPACE::GetDim() == TWO_D)
+            {
+                VisualizationMesh2D(UnstructGridCast(grid), oss.str().c_str());
+            }
+            else
+            {
+                //! Warning: the bc mesh of coarse grid is same to the fine grid.
+                //! Only visualize the eigen faces.
+                VisualizationEigenMeshofCoarseGrid3D(UnstructGridCast(grid), oss.str().c_str());
+            }
+        }
+    }
+*/
+}
+
+void Zone::UpdateAllData()
+{
+    set < Data_SafeData > *basep = GlobalDataBase::GetBaseP();
+    set < Data_SafeData >::iterator it;
+
+    for (it = basep->begin(); it != basep->end(); ++ it)
+    {
+        this->UpdateData(it->GetName(), it->GetData(), it->GetType(), it->GetSize());
+    }
+}
+
+void InitGlobalValuesOfAllZones()
+{
+    InitGlobalValuesSolver();
+}
+
+void InitGlobalValuesGrid()
+{
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+    int maxale = GlobalDataBase::GetIntParaFromDB("maxale");
+
+    if (!isUnsteady || !isAle)
+    {
+        return;
+    }
+
+    RDouble *ralepar = new RDouble[maxale];
+    GlobalDataBase::UpdateDataPtr("ralepar",ralepar);
+
+    int     *ialepar = new int[maxale];
+    GlobalDataBase::UpdateDataPtr("ialepar",ialepar);
+
+    RDouble **angle0 = NewPointer2<RDouble>(3, 3);
+    GlobalDataBase::UpdateDataPtr("angle0",angle0);
+
+    RDouble **coord0 = NewPointer2<RDouble>(3, 3);
+    GlobalDataBase::UpdateDataPtr("coord0",coord0);
+
+    RDouble  **angle = NewPointer2<RDouble>(3, 3);
+    GlobalDataBase::UpdateDataPtr("angle",angle);
+
+    RDouble  **coord = NewPointer2<RDouble>(3, 3);
+    GlobalDataBase::UpdateDataPtr("coord",coord);
+    
+    int iflag = 0;
+
+    for (int i = 0; i < 3; ++ i)
+    {
+        for (int j = 0; j < 3; ++ j)
+        {
+            angle0[i][j] = 0.0;
+            coord0[i][j] = 0.0;
+        }
+    }
+    
+    if (iflag == 0)
+    {
+        ialepar[0] = 1;
+        ialepar[1] = 1;
+        ialepar[2] = 0;
+        
+        coord0[0][1] = - 1.0;
+        coord0[1][1] =   0.0;
+        coord0[2][1] =   0.0;
+    }
+    else if (iflag == 2)
+    {
+        ialepar[0] = 1;
+        ialepar[1] = 1;
+        ialepar[2] = 5;
+    }
+    else if (iflag == 3)
+    {
+        ialepar[0] = 1;
+        ialepar[1] = 1;
+        ialepar[2] = 6;
+    }
+    else
+    {
+        ialepar[0] = 1;
+        ialepar[1] = 1;
+        ialepar[2] = 5;
+    }
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        coord[m][0] = coord0[m][0];
+        coord[m][1] = coord0[m][0];
+        coord[m][2] = coord0[m][0];
+
+        angle[m][0] = angle0[m][0];
+        angle[m][1] = angle0[m][0];
+        angle[m][2] = angle0[m][0];
+    }
+}
+
+void InitGlobalValuesSolver()
+{
+    int iapplication = GlobalDataBase::GetIntParaFromDB("iapplication");
+    int chemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (iapplication == 0)
+    {
+        using namespace GAS_SPACE;
+        int compressible = GlobalDataBase::GetIntParaFromDB("compressible");
+        if (compressible == INCOMPRESSIBLE)
+        {
+#ifdef USE_INCOMSOLVER
+            gas = new IncomGas();            
+#endif
+        }
+        else
+        {
+            if (chemical == 0)
+            {
+                gas = new PerfectGas();
+            }
+            else
+            {
+                gas = new MixedGas();
+            }
+        }
+        gas->InitGlobalParameterOfNSEquation();
+    }
+    else if (iapplication == 1)
+    {
+
+    }
+}
+
+void CleanGlobalValuesSolver()
+{
+    int iapplication = GlobalDataBase::GetIntParaFromDB("iapplication");
+
+    if (iapplication == 0)
+    {
+        using namespace GAS_SPACE;
+        delete gas;
+        gas = 0;
+    }
+    else if (iapplication == 1)
+    {
+    }
+}
+
+}
diff --git a/API/PostProcess/include/ForceProcessStruct.h b/API/PostProcess/include/ForceProcessStruct.h
new file mode 100644
index 0000000..2ed45d7
--- /dev/null
+++ b/API/PostProcess/include/ForceProcessStruct.h
@@ -0,0 +1,56 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      ForceProcessStruct.h
+//! @brief     StructGrid Flow result post-processing
+//! @author    Baka.
+
+#pragma once
+#include "Force.h"
+#include "AleForceManager.h"
+#include "Geo_Grid.h"
+#include "PostProcessData.h"
+#include "Constants.h"
+
+namespace PHSPACE
+{
+
+class ForceProcessStruct
+{
+public:
+    Force globalAerodynamicForce;
+
+public:
+    ForceProcessStruct();
+    ~ForceProcessStruct();
+
+public:
+    void Run();
+
+private:
+    void InitForce();
+    void CollectionForce();
+    void AirForceCoef(int iZone);
+    void AirForceCoefParts(int iZone, int partID, int Coordinate = GlobalCoordinate);
+    void CompForce();
+    void DumpForce();
+
+    void CompValueField();
+    void ComputeGamaAndTemperature(Grid *gridIn);
+    void ComputeViscousLaminarCoefficient(Grid *gridIn);
+
+private:
+    string filename;
+    DataContainer *CollectData;
+
+};
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/include/ForceProcessUnstruct.h b/API/PostProcess/include/ForceProcessUnstruct.h
new file mode 100644
index 0000000..e934a3e
--- /dev/null
+++ b/API/PostProcess/include/ForceProcessUnstruct.h
@@ -0,0 +1,57 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      ForceProcessUnstruct.h
+//! @brief     UnstructGrid Flow result post-processing
+//! @author    Baka.
+
+#pragma once
+#include "Force.h"
+#include "Geo_Grid.h"
+#include "PostProcessData.h"
+#include "Constants.h"
+
+namespace PHSPACE
+{
+
+class ForceProcessUnstruct
+{
+public:
+    Force globalAerodynamicForce;
+
+public:
+    ForceProcessUnstruct();
+    ~ForceProcessUnstruct();
+
+public:
+    void Run();
+
+private:
+    void InitForce();
+    void CollectionForce();
+    void AirForceCoef(int iZone);
+    void AirForceCoefParts(int iZone, int partID, int Coordinate = GlobalCoordinate);
+    void CompForce();
+    void DumpForce();
+
+    void InitValueField();
+    void CompValueField();
+    void ComputeGamaAndTemperature(Grid *gridIn);
+    void ComputeViscousLaminarCoefficient(Grid *gridIn);
+    void GetGradientField(Grid *gridIn);
+
+private:
+    string filename;
+    DataContainer *CollectData;
+
+};
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/include/IO_FlowReader.h b/API/PostProcess/include/IO_FlowReader.h
new file mode 100644
index 0000000..52bb5b8
--- /dev/null
+++ b/API/PostProcess/include/IO_FlowReader.h
@@ -0,0 +1,64 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      IO_FlowReader.h
+//! @brief     Flow file raed.
+//! @author    Baka.
+
+#pragma once
+#include "Region.h"
+#include "IO_HDF5File.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+class IO_FlowReader
+{
+public:
+    Region *region;
+
+public:
+    IO_FlowReader(Region *region_in);
+    ~IO_FlowReader();
+
+    void Run();
+
+private:
+    void Init();
+    void InitMemoryStruct(Grid *gridIn);
+    void InitMemoryUnstruct(Grid *gridIn);
+
+    void ReadFlowFile();
+    void ReadFlowFileStr(hid_t loc_id, Grid *gridIn);
+    void ReadFlowFileUnStr(hid_t loc_id, Grid *gridIn);
+
+    void ReadTurbFile();
+    void ReadTurbFileStr(hid_t loc_id, Grid *gridIn);
+    void ReadTurbFileUnStr(hid_t loc_id, Grid *gridIn);
+
+    void ReadTransitionFile();
+    void ReadTransitionFileStr(hid_t loc_id, Grid *gridIn);
+    void ReadTransitionFileUnStr(hid_t loc_id, Grid *gridIn);
+
+private:
+    string restartNSFile;
+    string turbFile;
+    string transitionFile;
+
+    int nEquation;
+    int nTurbulenceEquation;
+    int nTemperatureModel;
+    int nTransitionEquation;
+};
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/include/PostProcess.h b/API/PostProcess/include/PostProcess.h
new file mode 100644
index 0000000..89d00b3
--- /dev/null
+++ b/API/PostProcess/include/PostProcess.h
@@ -0,0 +1,59 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PostProcess.h
+//! @brief     Flow result post-processing.
+//! @author    Baka.
+
+#pragma once
+#include "IO_FlowReader.h"
+#include "PostProcessData.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+class PostProcess
+{
+public:
+    Region *region;
+
+public:
+    PostProcess(Region *region_in);
+    ~PostProcess();
+
+public:
+    void Run();
+
+private:
+    void ReadGridFile();
+    void ReadFlowFile();
+    void ComputeMetrics();
+
+    void InitGlobalValues();
+    void ComputeCoefficientOfStateEquation();
+    void ComputeReferenceTsuth();
+    void ComputeReferenceLengthDimensional();
+    void ReadBCFile();
+    void CompAirForceCoef();
+
+private:
+
+};
+
+const int COMPAIRFORCE = 0;
+
+
+
+
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/include/PostProcessData.h b/API/PostProcess/include/PostProcessData.h
new file mode 100644
index 0000000..ad033ce
--- /dev/null
+++ b/API/PostProcess/include/PostProcessData.h
@@ -0,0 +1,90 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PostProcessData.h
+//! @brief     Flow post-processing data store.
+//! @author    Baka.
+
+#pragma once
+#include "Precision.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+class PostProcessData
+{
+private:
+    int numberofSolidWallPart;
+
+    //! Number of total part, is numberofSolidWallPart plus ONE.
+    //! 'ONE' represent the total solid wall force, stored on the first position.
+    int numberofTotalPart;
+
+    //! The corresponding Boundary Condition ID of each part.
+    int *partBCID;
+
+    RDouble *cfx, *cfy, *cfz;
+    RDouble *cpx, *cpy, *cpz;
+    RDouble *cmx, *cmy, *cmz;
+    RDouble *clTot, *cdTot, *cd_pr, *cd_sf, *cd_cl2pa, *xcp, *side;
+    RDouble *hingeMoment;
+
+public:
+    PostProcessData();
+    ~PostProcessData();
+
+public:
+    void SetNWallPart(int numberofSolidWallPartIn);
+    void SetNPart(int numberofTotalPartIn);
+    void SetPartBCID(int *partBCIDIn);
+    void SetCfx(RDouble *cfxIn);
+    void SetCfy(RDouble *cfyIn);
+    void SetCfz(RDouble *cfzIn);
+    void SetCpx(RDouble *cpxIn);
+    void SetCpy(RDouble *cpyIn);
+    void SetCpz(RDouble *cpzIn);
+    void SetCmx(RDouble *cmxIn);
+    void SetCmy(RDouble *cmyIn);
+    void SetCmz(RDouble *cmzIn);
+    void SetClTot(RDouble *clTotIn);
+    void SetCdTot(RDouble *cdTotIn);
+    void SetCdPr(RDouble *cd_prIn);
+    void SetCdSf(RDouble *cd_sfIn);
+    void SetCdCl2Pa(RDouble *cd_cl2paIn);
+    void SetXcp(RDouble *xcpIn);
+    void SetSide(RDouble *sideIn);
+    void SetHingeMoment(RDouble *hingeMomentIn);
+
+    int GetNWallPart();
+    int GetNPart();
+    int * GetPartBCID();
+    RDouble * GetCfx();
+    RDouble * GetCfy();
+    RDouble * GetCfz();
+    RDouble * GetCpx();
+    RDouble * GetCpy();
+    RDouble * GetCpz();
+    RDouble * GetCmx();
+    RDouble * GetCmy();
+    RDouble * GetCmz();
+    RDouble * GetClTot();
+    RDouble * GetCdTot();
+    RDouble * GetCdPr();
+    RDouble * GetCdSf();
+    RDouble * GetCdCl2Pa();
+    RDouble * GetXcp();
+    RDouble * GetSide();
+    RDouble * GetHingeMoment();
+};
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/include/Post_ForceMoment.h b/API/PostProcess/include/Post_ForceMoment.h
new file mode 100644
index 0000000..e38723b
--- /dev/null
+++ b/API/PostProcess/include/Post_ForceMoment.h
@@ -0,0 +1,45 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Post_ForceMoment.h
+//! @brief     Offer some subroutine to calculate moment of force
+//! @author    Zhang Jian
+
+#include "Precision.h"
+
+namespace PHSPACE
+{
+
+class Post_ForceMoment
+{
+public:
+    Post_ForceMoment(){};
+    ~Post_ForceMoment(){};
+
+public:
+    //! Calculate the moment from a point normal to a line.
+    //! @param[in] point    coordinates of the point.
+    //! @param[in] linePoint1/2    two end point of the line.
+    //! @param[in] force    force at the point.
+    RDouble ComputeMoment(RDouble *point, RDouble *linePoint1, RDouble *linePoint2, RDouble *force);
+
+private:
+    //! Calculate the distance from a point normal to a line.
+    //! @param[in] point    coordinates of the point.
+    //! @param[in] linePoint1/2    two end point of the line.
+    RDouble DistPoint2Line(RDouble *point, RDouble *linePoint1, RDouble *linePoint2);
+
+    //! Give a point and a line, calculate the plane's normal.
+    //! @param[out] normalX/Y/Z.
+    void PlaneNormal(RDouble *point, RDouble *linePoint1, RDouble *linePoint2, RDouble &normalX, RDouble &normalY, RDouble &normalZ);
+};
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/include/Post_Identify.h b/API/PostProcess/include/Post_Identify.h
new file mode 100644
index 0000000..bf01717
--- /dev/null
+++ b/API/PostProcess/include/Post_Identify.h
@@ -0,0 +1,64 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Post_Identify.h
+//! @brief     Identify the motive derivative
+//! @author    He kun.
+
+#pragma once
+#include "PHHeader.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+class Identify
+{
+public:
+    bool isIdentify;
+    int nForceVar;
+    int nIdentifyVar;
+    int nDataLine;
+    int nwStep;
+    size_t nLinestart, nLineEnd;
+    int nLineOneCycle, nCycle;
+    int nFrequency, nOrder;
+    string identifyMethod;
+    string motionType;
+    RDouble reduceFrequency, amplitude;
+    RDouble physicalTimeStep;
+    RDouble lenthReference;
+    vector <string> nameList;
+
+    vector < vector <RDouble> > aeroForce;
+
+    RDouble *c0, *c1, *c2;
+
+public:
+    Identify();
+    ~Identify();
+
+    void Run();
+    void ReadForce();
+    void ForceArrange();
+    void IdentifyProcess();
+    void GetNumberOfCycle();
+    void getIntegral(int iVar);
+    void getIntegrand(int iVar, RDouble *f);
+    void GetIntegral4thOrder(int iVar, RDouble *f, RDouble &sum1, RDouble &sum2);
+    void GetIntegral2ndOrder(int iVar, RDouble *f, RDouble &sum1, RDouble &sum2);
+
+    void DumpHysteresisData();
+    void DumpResults();
+};
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/include/Post_Probes.h b/API/PostProcess/include/Post_Probes.h
new file mode 100644
index 0000000..a83ad5a
--- /dev/null
+++ b/API/PostProcess/include/Post_Probes.h
@@ -0,0 +1,214 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Post_Probes.h
+//! @brief     Post_Probes defines the post variables of probes that need to be monitored.
+//! @author    Meng Liyuan.
+
+#pragma once
+#include "GridType.h"
+#include "Geo_Grid.h"
+#include "Geo_UnstructGrid.h"
+#include "Geo_StructGrid.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+class Grid;
+class SampleLocationInfo;
+
+//! @brief Post_Probes class is used to manage post variables data of probes.
+class Post_Probes
+{
+public:
+    //! @param[in] nVariables_in    Number of probe variables, parsed from parameter file usually.
+    //! @param[in] Variables_in     Type of probe variables, parsed from parameter file usually.
+    LIB_EXPORT Post_Probes(int nProbeVariables_in, int *probeVariables_in, Grid *grid_in = NULL);
+
+    LIB_EXPORT ~Post_Probes();
+
+public:
+    //! Return the ASCII type file title header.
+    LIB_EXPORT void GetASCIIFileHeader(vector<string> &title_tecplot);
+
+    //! Return the probes ASCII type file title header.
+    LIB_EXPORT void GetProbesASCIIFileHeader(vector<string> &title_tecplot);
+
+    //! Return the lines or surfaces ASCII type file title header.
+    LIB_EXPORT void GetLinesOrSurfacesASCIIFileHeader(vector<string> &title_tecplot);
+
+    //! Return number of probe variables.
+    int GetNumberofProbeVariables();
+
+    //! Return if the variableType should be Monitored.
+    bool IsNeedMonitoring(int variableType);
+
+    //! Compute variables data of probe through variables on probes cell center.
+    //! Unstructured grid data type.
+    //! @param[in] name              Variable data's name.
+    //! @param[in] cellCenterData    Pointer the cell center data.
+    LIB_EXPORT void UpdateProbesVarPtr(const string &name, RDouble *cellCenterData);
+
+    //! Compute variables data of probe by using the value of probes cell as probe real value.
+    LIB_EXPORT void UpdateProbesVarPtrM1(const string &name, RDouble *cellCenterData);
+
+    //! Interpolation from probes and neighboring cell to probe.
+    LIB_EXPORT void UpdateProbesVarPtrM2(const string &name, RDouble *cellCenterData);
+
+    //! Interpolation from probes cell nodes to probe.
+    LIB_EXPORT void UpdateProbesVarPtrM3(const string &name, RDouble *cellCenterData);
+
+    //! Compute the necessary variables for interpolation.
+    LIB_EXPORT void NecessaryVarForInterpolation(UnstructGrid *grid, int iprobe, int index, vector<RDouble> &numerator, vector<int> &interpolationIndexs, bool flag);
+
+    //! Compute variables data of probe through variables on probes cell center.
+    //! Structured grid data type.
+    //! @param[in] name              Variable data's name.
+    //! @param[in] cellCenterData    Pointer the nearest cell center data.
+    //! @param[in] index             The array index from RDouble4D array,
+    //!                              i.e we only need the cellCenterData[...][...][...][index].
+    LIB_EXPORT void UpdateProbesVarPtr(const string &name, RDouble4D &cellCenterData, int index);
+
+    //! Compute variables data of probe by using the value of probes cell as probe real value.
+    LIB_EXPORT void UpdateProbesVarPtrM1(const string &name, RDouble4D &cellCenterData, int index);
+
+    //! Interpolation from probes and neighboring cell to probe.
+    LIB_EXPORT void UpdateProbesVarPtrM2(const string &name, RDouble4D &cellCenterData, int index);
+
+    //! Interpolation from probes cell nodes to probe.
+    LIB_EXPORT void UpdateProbesVarPtrM3(const string &name, RDouble4D &cellCenterData, int index);
+
+    //! Compute the necessary variables for interpolation.
+    LIB_EXPORT void NecessaryVarForInterpolation(StructGrid *grid, int iprobe, int i, int j, int k, vector<RDouble> &numerator, vector<vector<int> > &interpolationIndexs, bool flag);
+
+    //! Obtain probe variable data's pointer(address) from database by name.
+    //! If the dataSet doesn't has a same name data, returns null.
+    //! @param[in] name    Variable data's name.
+    void * GetProbeVarPtr(const string &name);
+
+    //! Get all probe variables' pointer.
+    LIB_EXPORT void GetAllProbesVarPtr(RDouble **q_probes);
+
+    //! Get probe variables' name through variable's index.
+    //! @param[in] variableNumber    variable's index.
+    string GetProbesVariableName(int variableNumber) const;
+
+    //! Get set of variables.
+    const set<int> & GetProbeVariables() const;
+
+    map<int, string> probesVariablesMap;
+
+    Grid * GetGrid() const;
+
+private:
+    //! Geometry information.
+    Grid *grid;
+
+    //! Grid type;
+    int gridType;
+
+    //! Number of probe variables.
+    int nProbeVariables;
+
+    //! Type of probe variables, each number represents ONE variable.
+    set<int> probeVariables;
+
+    //! Store probe variables.
+    Data_Field *probeVariablesPtr;
+
+private:
+    //! Free all allocated memory by probe variables' pointer.
+    void FreeAllProbeVarPtr();
+
+    //! Free probe variables memory.
+    //! @param[in] name    variables' name.
+    void DeleteProbeVarPtr(const string &name);
+};
+
+const int PROBE_DENSITY     = 0;
+const int PROBE_U           = 1;
+const int PROBE_V           = 2;
+const int PROBE_W           = 3;
+const int PROBE_PRESSURE    = 4;
+const int PROBE_TEMPERATURE = 5;
+const int PROBE_MACH        = 6;
+const int PROBE_DIMENSIONAL_DENSITY     = 7;
+const int PROBE_DIMENSIONAL_U           = 8;
+const int PROBE_DIMENSIONAL_V           = 9;
+const int PROBE_DIMENSIONAL_W           = 10;
+const int PROBE_DIMENSIONAL_PRESSURE    = 11;
+const int PROBE_DIMENSIONAL_TEMPERATURE = 12;
+const int PROBE_VELOCITY_MAGNITUDE      = 13;
+const int PROBE_VISCOSITY_LAMINAR     = 14;
+const int PROBE_VISCOSITY_TURBULENT   = 15;
+const int PROBE_MODELED_TKE           = 16;
+const int PROBE_MODELED_DISSIPATION   = 17;
+
+#include "Post_Probes.hxx"
+
+class DumpToFileASCII
+{
+private:
+    vector <DataContainer *> dataList;
+    string fileName;
+
+public:
+    DumpToFileASCII(vector<DataContainer *> datalist_in, string filename_in);
+    ~DumpToFileASCII();
+
+public:
+    void Run();
+
+    //! Set the variables.
+    void SetVariables(string Variables_in) { this->variables = Variables_in; }
+
+    //! Get the variables.
+    string GetVariables() { return variables; }
+
+    //! Set number of variables in file.
+    void SetnVariablesToDump(int nVariables_in) { this->nVariables = nVariables_in; }
+
+    //! Return number of variables in file.
+    int GetnVariablesToDump() { return nVariables; }
+
+    //! Get the file name.
+    string GetFilename() { return fileName; }
+
+private:
+    //! Init the probes variables need to dump.
+    void InitProbesVariables();
+
+    void WriteProbeFlowFile();
+
+    //! Write the variables data into file.
+    void WriteFlowFile();
+
+    //! Write the probes variables data into file.
+    void WriteProbesFlowFile();
+    //! Write the probes variables data into file.
+    void WriteProbesFlowFile(int outerStep);
+    //! Write the probes of lines variables data into file.
+    void WriteLinesFlowFile();
+    //! Write the probes of lines variables data into file.
+    void WriteLinesFlowFile(int outerStep);
+    //! Write the probes of surfaces variables data into file.
+    void WriteSurfacesFlowFile();
+    //! Write the probes of surfaces variables data into file.
+    void WriteSurfacesFlowFile(int outerStep);
+
+private:
+    int nVariables;
+    string variables;
+};
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/include/Post_Probes.hxx b/API/PostProcess/include/Post_Probes.hxx
new file mode 100644
index 0000000..d6b1475
--- /dev/null
+++ b/API/PostProcess/include/Post_Probes.hxx
@@ -0,0 +1,35 @@
+inline int Post_Probes::GetNumberofProbeVariables()
+{
+    return nProbeVariables;
+}
+
+inline bool Post_Probes::IsNeedMonitoring(int variableType)
+{
+    return probeVariables.find(variableType) != probeVariables.end();
+}
+
+inline string Post_Probes::GetProbesVariableName(int variableNumber) const
+{
+    map<int, string>::const_iterator it = probesVariablesMap.find(variableNumber);
+    return it->second;
+}
+
+inline const set<int> & Post_Probes::GetProbeVariables() const
+{
+    return probeVariables;
+}
+
+inline void * Post_Probes::GetProbeVarPtr(const string &name)
+{
+    return probeVariablesPtr->GetDataPtr(name);
+}
+
+inline void Post_Probes::DeleteProbeVarPtr(const string &name)
+{
+    probeVariablesPtr->DeleteDataPtr(name);
+}
+
+inline Grid * Post_Probes::GetGrid() const
+{
+    return grid;
+}
\ No newline at end of file
diff --git a/API/PostProcess/include/Post_ProbesWrite.h b/API/PostProcess/include/Post_ProbesWrite.h
new file mode 100644
index 0000000..4d39b95
--- /dev/null
+++ b/API/PostProcess/include/Post_ProbesWrite.h
@@ -0,0 +1,54 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Post_ProbesWrite.h
+//! @brief     Write the monitored probes flow field variables into file.
+//! @author    Meng Liyuan.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "TypeDefine.h"
+
+namespace PHSPACE
+{
+class ActionKey;
+class Grid;
+class DataContainer;
+class Post_Probes;
+
+class Post_ProbesWrite
+{
+public:
+    LIB_EXPORT Post_ProbesWrite(int flowType = 0);
+    LIB_EXPORT ~Post_ProbesWrite();
+
+public:
+    //LIB_EXPORT void Run(bool dumpAllLevel = false);
+    LIB_EXPORT void Run();
+
+private:
+    vector<DataContainer *> datalist;
+    int flowType;
+
+private:
+    //! Communicate probes variables with each processor.
+    void ServerProbesWrite(ActionKey *actkey);
+
+    //! Store the probes variables.
+    void StoreProbesVarariables(ActionKey *actkey, Post_Probes *postProbesVar);
+
+    //! Monitored probes post-processing.
+    void PostProbesWrite(ActionKey *actkey);
+
+    void Clear();
+};
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/include/Post_Visual.h b/API/PostProcess/include/Post_Visual.h
new file mode 100644
index 0000000..77a14ca
--- /dev/null
+++ b/API/PostProcess/include/Post_Visual.h
@@ -0,0 +1,436 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Post_Visual.h
+//! @brief     Post_Visual defines the post visualization variables.
+//! @author    Bell.
+
+#pragma once
+#include "GridType.h"
+#include "Geo_UnstructGrid.h"
+#include "Geo_StructGrid.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+class Grid;
+//! @brief Post_Visual class is used to manage post visualization variables data.
+class Post_Visual
+{
+public:
+    //! @param[in] nVisualVariables_in    Number of visual variables, parsed from parameter file usually.
+    //! @param[in] visualVariables_in     Type of visual variables, parsed from parameter file usually.
+    LIB_EXPORT Post_Visual(int nVisualVariables_in, int *visualVariables_in, Grid *grid_in = NULL, int flowType_in = 0);
+
+    LIB_EXPORT ~Post_Visual();
+
+public:
+    //! Return the ASCII type of tecplot title header.
+    LIB_EXPORT void GetASCIITecplotHeader(vector<string> &title_tecplot);
+
+    //! Return the BINARY type of tecplot title header.
+    LIB_EXPORT void GetBinaryTecplotHeader(vector<string> &title_tecplot);
+
+    //! Return number of visual variables.
+    int GetNumberofVisualVariables();
+
+    //! Return if the variableType should be visualized.
+    bool IsNeedVisualization(int variableType);
+
+    //! Compute variables on node through variables on cell center and or update to database.
+    //! Unstructured grid data type.
+    //! @param[in] name              Source data's name.
+    //! @param[in] cellCenterData    Pointer the Source cell center data.
+    LIB_EXPORT void UpdateVisualNodeVarPtr(const string &name, RDouble *cellCenterData);
+    LIB_EXPORT void UpdateVisualNodeVarPtr(const string &name, int *cellCenterData);
+
+    //! Compute variables on node through variables on cell center and or update to database.
+    //! Structured grid data type.
+    //! @param[in] name              Source data's name.
+    //! @param[in] cellCenterData    Pointer the Source cell center data.
+    //! @param[in] index             The array index from RDouble4D array,
+    //!                              i.e we only need the cellCenterData[...][...][...][index].
+    LIB_EXPORT void UpdateVisualNodeVarPtr(const string &name, RDouble4D &cellCenterData, int index);
+
+    //! Compute variables on node through variables on cell center and or update to database.
+    //! Structured grid data type.
+    //! @param[in] name              Source data's name.
+    //! @param[in] cellCenterData    Pointer the Source cell center data.
+    LIB_EXPORT void UpdateVisualNodeVarPtr(const string &name, RDouble3D &cellCenterData);
+
+    //! Compute overset information on node through variables on cell center and or update to database.
+    //! Structured grid data type.
+    //! @param[in] name              Source data's name.
+    //! @param[in] cellCenterData    Pointer the Source cell center data.
+    LIB_EXPORT void UpdateVisualNodeVarPtr(const string &name, Int3D &oversetcellCenterdata);
+    //! Obtain data's pointer(address) from database by name.
+    //! If the dataSet doesn't has a same name data, returns null.
+    //! @param[in] name    Source data's name.
+    void * GetVisualNodeVarPtr(const string &name);
+
+    //! Get all visualization varialbes' pointer (RDouble * for unstruct grid).
+    LIB_EXPORT void GetAllVisualNodeVarPtr(RDouble **qn);
+
+    //! Get all visualization varialbes' pointer (RDouble4D * for struct grid).
+    LIB_EXPORT void GetAllVisualNodeVarPtr(RDouble4D **qn);
+
+    //! Get variables' name through variable's tag index.
+    //! @param[in] variableNumber    variable's index.
+    string GetVariableName(int variableNumber) const;
+
+    //! Get set of variables.
+    const set<int> & GetVisualVariables() const;
+
+    Grid * GetGrid() const;
+    int GetFlowType() { return this->flowType; }
+    void UpdateVisualNodeVarPtr(const string &name, void *data);
+
+private:
+    //! Geometry information.
+    Grid *grid;
+
+    //! Grid type.
+    int gridType;
+
+    //! Number of visual variables.
+    int nVisualVariables;
+
+    //! Type of visual variables, each number represents ONE variable.
+    set<int> visualVariables;
+
+    //! Variable names, displayed in Tecplot.
+    map<int, string> visualVariablesMap;
+
+    //! Store visual variables.
+    Data_Field *visualVariablesPtr;
+
+    int flowType;
+
+private:
+    //! Free all allocated memory by visual node variables' pointer.
+    void FreeAllVisualNodeVarPtr();
+
+    //! Free visual variables memory.
+    //! @param[in] name    variables' name.
+    void DeleteVisualNodeVarPtr(const string &name);
+};
+
+const int VISUAL_DENSITY               = 0;
+const int VISUAL_U                     = 1;
+const int VISUAL_V                     = 2;
+const int VISUAL_W                     = 3;
+const int VISUAL_PRESSURE              = 4;
+const int VISUAL_TEMPERATURE           = 5;
+const int VISUAL_MACH                  = 6;
+const int VISUAL_VISCOSITY_LAMINAR     = 7;
+const int VISUAL_VISCOSITY_TURBULENT   = 8;
+const int VISUAL_VORTICITY_X           = 9;
+const int VISUAL_VORTICITY_Y           = 10;
+const int VISUAL_VORTICITY_Z           = 11;
+const int VISUAL_VORTICITY_MAGNITUDE   = 12;
+const int VISUAL_STRAIN_RATE           = 13;
+const int VISUAL_Q_CRITERIA            = 14;
+const int VISUAL_CP                    = 15;
+const int VISUAL_TIME_STEP             = 16;
+const int VISUAL_VOLUME                = 17;
+const int VISUAL_MODELED_TKE           = 18;
+const int VISUAL_MODELED_DISSIPATION   = 19;
+const int VISUAL_SST_F1                = 20;
+const int VISUAL_SST_F2                = 21;
+const int VISUAL_INCOMP_U              = 22;
+const int VISUAL_INCOMP_V              = 23;
+const int VISUAL_INCOMP_W              = 24;
+const int VISUAL_INCOMP_P              = 25;
+const int VISUAL_INCOMP_CP             = 26;
+const int VISUAL_INCOMP_T              = 27;
+const int VISUAL_INCOMP_ENTHALPY       = 70;
+const int VISUAL_INCOMP_DEN            = 28;
+const int VISUAL_INCOMP_VIS            = 29;
+const int VISUAL_KN                    = 30;  //! Useless.
+const int VISUAL_INCOMP_TE             = 31;
+const int VISUAL_INCOMP_ED             = 32;
+const int VISUAL_INCOMP_WD             = 63;
+const int VISUAL_INCOMP_SPECIES        = 71;
+const int VISUAL_TEMPERATURE_VIBRATION = 33;
+const int VISUAL_TEMPERATURE_ELECTRON  = 34;
+const int VISUAL_ENERGY_VIBRATION      = 35;
+const int VISUAL_ENERGY_ELECTRON       = 36;
+const int VISUAL_ELECTRON_NUMBER       = 37;
+const int VISUAL_DIMENSIONAL_DENSITY   = 38;
+const int VISUAL_DIMENSIONAL_PRESSURE  = 39;
+const int VISUAL_DIMENSIONAL_TEMPERATURE = 40;
+const int VISUAL_GRADIENT_UX           = 41;
+const int VISUAL_GRADIENT_UY           = 42;
+const int VISUAL_GRADIENT_VX           = 43;
+const int VISUAL_GRADIENT_VY           = 44;
+const int VISUAL_STREAMLINE_U          = 45;
+const int VISUAL_STREAMLINE_V          = 46;
+const int VISUAL_STREAMLINE_W          = 47;
+const int VISUAL_TRANSITION_GAMAEFF    = 48;
+const int VISUAL_TRANSITION_RESCF      = 49;
+const int VISUAL_WALL_DIST             = 50;
+const int VISUAL_INTERMITTENCY         = 51;
+const int VISUAL_MOMENTUMTHICKREYNOLDS = 52;
+const int VISUAL_DIMENSIONAL_U         = 53;
+const int VISUAL_DIMENSIONAL_V         = 54;
+const int VISUAL_DIMENSIONAL_W         = 55;
+const int VISUAL_GAMA                  = 56;
+const int VISUAL_CFL1                  = 57;
+const int VISUAL_CFL2                  = 58;
+const int VISUAL_STREAMLINE_MACH       = 59;
+const int VISUAL_KNUDSEN_NUMBER        = 60;  //! Useless.
+const int VISUAL_DAMKOHLER_NUMBER      = 61;
+const int VISUAL_VIBNONEQ_NUMBER       = 62;
+const int VISUAL_VELOCITY_MAGNITUDE    = 63;
+
+const int VISUAL_IBLANK                = 81;
+//const int VISUAL_O2                    = 15;
+//const int VISUAL_NO                    = 16;
+//const int VISUAL_N                     = 17;
+//const int VISUAL_N2                    = 18;
+
+const int VISUAL_TAU_XX = 90;
+const int VISUAL_TAU_YY = 91;
+const int VISUAL_TAU_ZZ = 92;
+const int VISUAL_TAU_XY = 93;
+const int VISUAL_TAU_XZ = 94;
+const int VISUAL_TAU_YZ = 95;
+
+//Visual Wall Variables.
+const int VISUAL_SPECIES_START = 30;
+const int VISUAL_WALL_CP       = 0;
+const int VISUAL_WALL_CF       = 1;
+const int VISUAL_WALL_YPLUS    = 2;
+const int VISUAL_WALL_QNONDIM  = 3;
+const int VISUAL_WALL_QDIM     = 4;
+const int VISUAL_WALL_PW       = 5;
+const int VISUAL_WALL_TW       = 6;
+const int VISUAL_WALL_RHOW     = 7;
+const int VISUAL_WALL_QT       = 8;
+const int VISUAL_WALL_QS       = 9;
+const int VISUAL_WALL_QV       = 10;
+const int VISUAL_WALL_QE       = 11;
+const int VISUAL_WALL_NS       = 12;
+const int VISUAL_WALL_VX       = 13;
+const int VISUAL_WALL_VY       = 14;
+const int VISUAL_WALL_VZ       = 15;
+const int VISUAL_SLIP_TS       = 16;
+const int VISUAL_SLIP_TV       = 17;
+const int VISUAL_SLIP_TE       = 18;
+const int VISUAL_WALL_VS       = 19;
+const int VISUAL_WALL_ST       = 20;
+const int VISUAL_WALL_CH       = 21;
+const int VISUAL_SLIP_DTS      = 22;
+const int VISUAL_WALL_RE       = 23;
+const int VISUAL_WALL_KN       = 24; //The Knudsen number.
+//! The code number must be less than VISUAL_SPECIES_START.
+
+class Post_VisualWall
+{
+public:
+    LIB_EXPORT Post_VisualWall();
+
+    LIB_EXPORT Post_VisualWall(int nVisualNumber, int *visualVariablesType);
+
+    LIB_EXPORT ~Post_VisualWall();
+
+public:
+    int GetVisualVariablesNumber() const { return nVisualVariables; }
+
+    //! Get variables' name through variable's tag index.
+    //! @param[in] variableNumber    variable's index.
+    string GetVariableName(int variableNumber) const;
+
+    int* GetVisualVariablesType() const { return visualVariables; }
+
+    int GetVisualVariablesType(int nIndex) const { return visualVariables[nIndex]; }
+
+private:
+    //! Number of visual variables.
+    int nVisualVariables;
+
+    //! Type of visual variables, each number represents ONE variable.
+    int *visualVariables;
+
+    //! Variable names, displayed in Tecplot.
+    map<int, string> visualVariablesMap;
+};
+
+const int AverageFlow = 1;
+const int AverageReynoldsStress = 2;
+
+#include "Post_Visual.hxx"
+
+class DumpToVTK
+{
+private:
+    vector<DataContainer *> vtkdatalist;
+    string vtkfilename;
+
+    //! Visual flow type: 0 -- main flow;  1 -- average flow.
+    int visualFlowType;
+
+public:
+    DumpToVTK(vector<DataContainer *> datalist_in, string filename_in, bool CharacteristicBoundary_in, int visualFlowType = 0);
+    ~DumpToVTK();
+
+public:
+    void Run();
+
+private:
+    void InitVariables();
+
+    //! Set number of variables in tecplot.
+    void SetNvarplot(int nvarplot_in) { this->nvarplot = nvarplot_in; }
+
+    //! Return number of variables in tecplot.
+    int GetNvarplot() { return nvarplot; }
+
+    //! Get the file name in VTK format.
+    string GetFilename() { return vtkfilename; }
+
+    void WriteVTKFilm();
+
+private:
+    int nvarplot;
+    bool CharacteristicBoundary;
+};
+
+#ifdef USE_TecplotLib
+class DumpToTecio
+{
+private:
+    //ActionKey *actkey;
+    vector<DataContainer *> datalist;
+    string filename;
+
+    //! Visual flow type: 0 -- main flow;  1 -- average flow.
+    int visualFlowType;
+
+public:
+    DumpToTecio(vector<DataContainer *> datalist_in, string filename_in, int visualFlowType = 0);
+    ~DumpToTecio();
+
+public:
+    void Run();
+
+private:
+    void WriteGridFilm_old();
+    void WriteGridFilm();
+    void WriteSliceFilm();
+    void InitVariables();
+
+    //! Set the variables.
+    void SetVariables(string Variables_in) { this->Variables = Variables_in; }
+
+    //! Get the variables.
+    string GetVariables() { return Variables; }
+
+    //! Set number of variables in tecplot.
+    void SetNvarplot(int nvarplot_in) { this->nvarplot = nvarplot_in; }
+
+    //! Return number of variables in tecplot.
+    int GetNvarplot() { return nvarplot; }
+
+    //! Get the file name.
+    string GetFilename() { return filename; }
+private:
+    string Variables;
+    int nvarplot;
+};
+#endif
+
+class DumpToTecplotASCII
+{
+private:
+    vector<DataContainer *> dataList;
+    string fileName;
+
+    //! Visual flow type: 0 -- main flow;  1 -- average flow.
+    int visualFlowType;
+
+public:
+    DumpToTecplotASCII(vector<DataContainer *> datalist_in, string filename_in, int visualFlowType = 0);
+    ~DumpToTecplotASCII();
+
+public:
+    void Run();
+
+    //! Set the variables.
+    void SetVariables(string Variables_in) { this->Variables = Variables_in; }
+
+    //! Get the variables.
+    string GetVariables() { return Variables; }
+
+    //! Set number of variables in tecplot.
+    void SetNvarplot(int nVariable_in) { this->nVariable = nVariable_in; }
+
+    //! Return number of variables in tecplot.
+    int GetNvarplot() { return nVariable; }
+
+    //! Get the file name.
+    string GetFilename() { return fileName; }
+
+private:
+    void InitVariables();
+    void WriteFlowFilm();
+    void DumpOrderedFlow(fstream &flowFile, DataContainer *data, string zoneTitle);
+    void DumpFlowByCellTopo(fstream &flowFile, DataContainer *data, string zoneTitle);
+    void DumpFlowByFaceTopo(fstream &flowFile, DataContainer *data, string zoneTitle);
+
+private:
+    int nVariable;
+    string Variables;
+};
+
+class PHCutPlane
+{
+public:
+    char **title;
+    int nTitle;
+    int neqn;
+    int nTotalNode, nTotalFace;
+    RDouble **data;
+    RDouble *x, *y, *z;
+    int *faceIndex[4];
+public:
+    PHCutPlane();
+    ~PHCutPlane();
+    void SortData(RDouble *value);
+public:
+};
+
+template < typename T >
+void ReorderList(T *x, vector<int> &index_list)
+{
+    T *tmp = new T [index_list.size()];
+
+    for (std::size_t i = 0; i < index_list.size(); ++ i)
+    {
+        tmp[i] = x[i];
+    }
+
+    for (std::size_t i = 0; i < index_list.size(); ++ i)
+    {
+        x[i] = tmp[index_list[i]];
+    }
+
+    delete [] tmp;
+}
+
+void CutPlane(UnstructGrid *grid, RDouble **node_var, int nvar, RDouble cut, PHCutPlane *cutpl, int ndir);
+void CutPlaneCellCenter(UnstructGrid *grid, RDouble **q_var, int nvar, RDouble cut, PHCutPlane *cutpl, int ndir);
+
+void write_string(fstream &file, string &cs);
+void read_string(fstream &file, string &cs);
+}
\ No newline at end of file
diff --git a/API/PostProcess/include/Post_Visual.hxx b/API/PostProcess/include/Post_Visual.hxx
new file mode 100644
index 0000000..180b4fb
--- /dev/null
+++ b/API/PostProcess/include/Post_Visual.hxx
@@ -0,0 +1,41 @@
+inline int Post_Visual::GetNumberofVisualVariables()
+{
+    return nVisualVariables;
+}
+
+inline bool Post_Visual::IsNeedVisualization(int variableType)
+{
+    return visualVariables.find(variableType) != visualVariables.end();
+}
+
+inline string Post_Visual::GetVariableName(int variableNumber) const
+{
+    map<int, string>::const_iterator it = visualVariablesMap.find(variableNumber);
+    return it->second;
+}
+
+inline const set<int> &Post_Visual::GetVisualVariables() const
+{
+    return visualVariables;
+}
+
+inline void * Post_Visual::GetVisualNodeVarPtr(const string &name)
+{
+    return visualVariablesPtr->GetDataPtr(name);
+}
+
+inline void Post_Visual::DeleteVisualNodeVarPtr(const string &name)
+{
+    visualVariablesPtr->DeleteDataPtr(name);
+}
+
+inline Grid * Post_Visual::GetGrid() const
+{
+    return grid;
+}
+
+inline string Post_VisualWall::GetVariableName(int variableNumber) const
+{
+    map<int, string>::const_iterator it = visualVariablesMap.find(variableNumber);
+    return it->second;
+}
\ No newline at end of file
diff --git a/API/PostProcess/include/Post_WriteEnsight.h b/API/PostProcess/include/Post_WriteEnsight.h
new file mode 100644
index 0000000..a7e2729
--- /dev/null
+++ b/API/PostProcess/include/Post_WriteEnsight.h
@@ -0,0 +1,119 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Post_WriteEnsight.h
+//! @brief     Write flow field into ensight file.
+//! @author    Xu Gang, Yan Yong(External contributor).
+
+#pragma once
+#include "Post_WriteVisualFile.h"
+
+namespace PHSPACE
+{
+
+//! File acess method
+typedef enum
+{
+    STDIO_SERIAL,
+    MPI_PARALLEL_IO,
+} file_access_t;
+
+
+//! @brief Post_WriteEnsight class realize ensight visual file output function.\n
+class Post_WriteEnsight : public Post_WriteVisualFile
+{
+public:
+    Post_WriteEnsight();
+    ~Post_WriteEnsight();
+
+private:
+    void Initialize();
+
+    //! Dump data into visual file.
+    void WriteFile();
+
+    //! Write geometry file.
+    void WriteGeometryFile();
+    void WriteGeometryFileSerial();
+    void WriteGeometryFileParallel();
+
+    //! Write variable file.
+    void WriteFiedlData();
+    void WriteFiedlDataSerial();
+    void WriteFiedlDataParallel();
+
+    //! Write and update Ensight case file
+    void UpdateCaseFile();
+
+    //! Clear data.
+    void ClearFieldData();
+
+private:
+    //! Open file.
+    void GetFileHandle(const char *fileName);
+
+    //! Close file.
+    void ClearFileHandle();
+
+    //! Write string data to file.
+    void WriteString(const char *str);
+
+    //! Write int data to file
+    void WriteInt(int num);
+
+    //! Write string data to file use mpi.
+    void MpiWriteString(const char *str, MPI_Offset offset);
+
+    //! Write int data to file use mpi.
+    void MpiWriteInt(int num, MPI_Offset offset);
+
+private:
+    //! Ensight file type.
+    //!     0 -- binary.
+    //!     1 -- ASCII.
+    int fileType;
+
+    //! Visual data location.
+    //!     0 -- On node, default.
+    //!     1 -- On cell center.
+    bool dataOnElement;
+
+    //! If preserve visual file each iter.
+    //!     0 -- Not, only preserve file last iter.
+    //!     1 -- Yes, for instance, unsteady simulation.
+    bool writeFieldEachIter;
+
+    //! Current dump iter.
+    int    currentIter;
+    string currentIterStr;
+
+    //! Geometry file name.
+    string meshFileName;
+
+    //! File write access type.
+    //!     0 -- serial.
+    //!     1 -- parallel.
+    file_access_t fileMethod;
+
+    //! File handle, when serial write.
+    FILE *serialFilehandle;
+
+    //! MPI file handle.
+    MPI_File mpiFilehandle;
+
+    //! MPI file offset.
+    MPI_Offset fileOffset;
+
+};
+
+
+
+}
diff --git a/API/PostProcess/include/Post_WriteTecplot.h b/API/PostProcess/include/Post_WriteTecplot.h
new file mode 100644
index 0000000..a564d88
--- /dev/null
+++ b/API/PostProcess/include/Post_WriteTecplot.h
@@ -0,0 +1,51 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Post_WriteTecplot.h
+//! @brief     Write flow field into tecplot file.
+//! @author    Xu Gang.
+
+#pragma once
+#include "Post_WriteVisualFile.h"
+
+namespace PHSPACE
+{
+
+//! @brief Post_WriteTecplot class realize tecpolt visual file output function.\n
+class Post_WriteTecplot : public Post_WriteVisualFile
+{
+public:
+    Post_WriteTecplot();
+    ~Post_WriteTecplot();
+
+private:
+    void Initialize();
+
+    //! Collect visual data for tecplot visual file.
+    void StoreVisualizationData();
+    void StoreVisualizationData(int zoneIndex, DataContainer *cdata);
+    void StoreStrBoundaryVisualData(int zoneIndex, DataContainer *cdata);
+    void StoreStrFieldVisualData(int zoneIndex, DataContainer *cdata);
+    void StoreUnsBoundaryVisualData(int zoneIndex, DataContainer *cdata);
+    void StoreUnsFieldVisualData(int zoneIndex, DataContainer *cdata);
+
+    //! Dump data into visual file.
+    void WriteFile();
+
+    //! Clear data.
+    void ClearFieldData();
+
+private:
+    vector<DataContainer *> visualDataList;
+
+};
+
+}
diff --git a/API/PostProcess/include/Post_WriteVisualFile.h b/API/PostProcess/include/Post_WriteVisualFile.h
new file mode 100644
index 0000000..b5d8ecd
--- /dev/null
+++ b/API/PostProcess/include/Post_WriteVisualFile.h
@@ -0,0 +1,111 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Post_WriteVisualFile.h
+//! @brief     Write flow field into post visual file.
+//! @author    Xu Gang.
+
+#pragma once
+#include "Geo_Grid.h"
+#include "Post_Visual.h"
+
+namespace PHSPACE
+{
+
+//! Dump results into visual file.
+//! @param[in]  flowTypeIn         Flow field data type.
+//!             flowTypeIn = 0,    Default.
+//!             flowTypeIn = 1,    AverageFlow
+//!             flowTypeIn = 2,    AverageReynoldsStress
+void WriteVisualFile(int flowTypeIn = 0);
+
+
+//! @brief Post_WriteVisualFile class realize visual file output function.\n
+class Post_WriteVisualFile
+{
+public:
+    Post_WriteVisualFile();
+    ~Post_WriteVisualFile();
+
+public:
+    //! @param[in]  flowTypeIn         Flow field data type.
+    //!             flowTypeIn = 0,    Default.
+    //!             flowTypeIn = 1,    AverageFlow
+    //!             flowTypeIn = 2,    AverageReynoldsStress
+    void Run(int flowTypeIn = 0);
+
+    //! Boundary face grid will be reconstruct next output, used when mesh changed, such as overset grid.
+    void BoundaryGridNeedConstruct();
+
+public:
+    //! Store visual variables on node after interpolation.
+    vector <Post_Visual * > flowFieldDataOnNode;
+
+    //! Boundary face grid.
+    vector <Grid * > boundaryGrid;
+
+    //! The grid index correspondence between boundary face grid and original grid.
+    vector <int> gridMap;
+
+    //! The node index correspondence between boundary face grid and original grid.
+    vector <int **> nodeMap;
+
+    //! Boundary face grid name.
+    vector <string> boundaryName;
+
+    //! Boundary face grid type.
+    vector <int> boundaryType;
+
+private:
+    //! Construct boundary face grid.
+    void ConstructBoundaryGrid();
+    void ConstructStrBoundaryGrid(Grid *gridIn);
+    void ConstructUnsBoundaryGrid(Grid *gridIn);
+
+    //! Compute node data.
+    void ComputeNodeData();
+
+    //! Collect visual data for software interface.
+    void StoreVTKData();
+    void StoreVTKData(int zoneIndex, DataContainer *cdata);
+    void StoreStrBoundaryVTKData(int zoneIndex, DataContainer *cdata);
+    void StoreStrFieldVTKData(int zoneIndex, DataContainer *cdata);
+    void StoreUnsBoundaryVTKData(int zoneIndex, DataContainer *cdata);
+    void StoreUnsFieldVTKData(int zoneIndex, DataContainer *cdata);
+    void StoreUnsFieldVTKData2D(int zoneIndex, DataContainer *cdata);
+    void StoreUnsFieldVTKData3D(int zoneIndex, DataContainer *cdata);
+
+private:
+    virtual void Initialize() = 0;
+
+    //! Collect visual data for tecplot visual file.
+    virtual void StoreVisualizationData() {};
+
+    //! Dump data into visual file.
+    virtual void WriteFile() = 0;
+
+    //! Clear data.
+    virtual void ClearFieldData() = 0;
+
+public:
+    int    flowType;
+    bool   boundaryGridNeedConstruct;
+    bool   gridChanged;
+    bool   VTKvisual;
+    string VTKFileName;
+    string visualFileName;
+    vector<DataContainer *> VTKDataList;
+};
+
+//! Determine whether to dump field results to visulization.
+bool WantVisualField(Grid *grid);
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/src/ForceProcessStruct.cpp b/API/PostProcess/src/ForceProcessStruct.cpp
new file mode 100644
index 0000000..234327a
--- /dev/null
+++ b/API/PostProcess/src/ForceProcessStruct.cpp
@@ -0,0 +1,515 @@
+#include "ForceProcessStruct.h"
+#include "Geo_StructBC.h"
+#include "Glb_Dimension.h"
+#include "GradientOperation.h"
+#include "Post_ForceMoment.h"
+#include <cmath>
+#include "Geo_StructGrid.h"
+
+namespace PHSPACE
+{
+
+ForceProcessStruct::ForceProcessStruct()
+{
+    CollectData = new DataContainer();
+}
+
+ForceProcessStruct::~ForceProcessStruct()
+{
+    delete CollectData;
+}
+
+void ForceProcessStruct::Run()
+{
+    CompValueField();
+    InitForce();
+    CompForce();
+    CollectionForce();
+    DumpForce();
+}
+
+void ForceProcessStruct::InitForce()
+{
+    RDouble attack, sideslip;
+    RDouble attackd = GlobalDataBase::GetDoubleParaFromDB("attackd");
+    RDouble angleSlide = GlobalDataBase::GetDoubleParaFromDB("angleSlide");
+
+    attack   = attackd * PI / 180.0;
+    sideslip = angleSlide * PI / 180.0;
+
+    RDouble forceReferenceArea   = GlobalDataBase::GetDoubleParaFromDB("forceReferenceArea");
+    RDouble forceReferenceLength = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLength");
+    RDouble forceReferenceLengthSpanWise = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLengthSpanWise");
+
+    globalAerodynamicForce.Init(attack, sideslip, forceReferenceArea, forceReferenceLength, forceReferenceLengthSpanWise);
+}
+
+void ForceProcessStruct::CollectionForce()
+{
+    globalAerodynamicForce.CollectionForce(CollectData);
+}
+
+void ForceProcessStruct::AirForceCoef(int iZone)
+{
+    const int ALL_PART = -1;
+    AirForceCoefParts(iZone, ALL_PART);
+
+    uint_t nTBC = GlobalBoundaryCondition::GetNumberOfBC();
+    for (int iPart = 0; iPart < nTBC; ++ iPart)
+    {
+        if (!GlobalBoundaryCondition::IsSolidWallBC(iPart)) continue;
+
+        AirForceCoefParts(iZone, iPart, LocalCoordinate);
+
+        AirForceCoefParts(iZone, iPart);
+    }
+}
+
+void ForceProcessStruct::AirForceCoefParts(int iZone, int partID, int Coordinate)
+{
+    StructGrid *grid = StructGridCast(GetGrid(iZone));
+
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    RDouble refReNumber = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+    RDouble oRefReNumber = 1.0 / refReNumber;
+
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+
+    const int ALL_PART = -1;
+    SimpleBC *boundaryCondition = NULL;
+    string partBCName = "";
+    RDouble TorqueRefX = 0.0, TorqueRefY = 0.0, TorqueRefZ = 0.0;
+
+    //! Compute hinge moment.
+    int dumpHingeMoment = 0;
+    RDouble localCoordAxis0[3] = { 0 };
+    RDouble localCoordAxis1[3] = { 0 };
+
+    if (partID == ALL_PART)
+    {
+        TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+        TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+        TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+    }
+    else if ((partID != ALL_PART) && (Coordinate == GlobalCoordinate))
+    {
+        boundaryCondition = GlobalBoundaryCondition::GetBC(partID);
+        partBCName = boundaryCondition->GetBCName();
+
+        TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+        TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+        TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+    }
+    else if ((partID != ALL_PART) && (Coordinate == LocalCoordinate))
+    {
+        boundaryCondition = GlobalBoundaryCondition::GetBC(partID);
+        partBCName = boundaryCondition->GetBCName();
+        boundaryCondition->GetParamData("TorqueRefX", &TorqueRefX, PHDOUBLE, 1);
+        boundaryCondition->GetParamData("TorqueRefY", &TorqueRefY, PHDOUBLE, 1);
+        boundaryCondition->GetParamData("TorqueRefZ", &TorqueRefZ, PHDOUBLE, 1);
+
+        boundaryCondition->GetParamData("dumpHingeMoment", &dumpHingeMoment, PHINT, 1);
+        boundaryCondition->GetParamData("localCoordAxis0", localCoordAxis0, PHDOUBLE, 3);
+        boundaryCondition->GetParamData("localCoordAxis1", localCoordAxis1, PHDOUBLE, 3);
+    }
+
+    using namespace IDX;
+    RDouble *primitiveVarFarfield = reinterpret_cast<RDouble *>(GlobalDataBase::GetDataPtr("prim_inf"));
+    RDouble pressureFarfield = primitiveVarFarfield[IP];
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+    RDouble3D &vol = *(grid->GetCellVolume());
+
+    RDouble cpx = 0.0;
+    RDouble cpy = 0.0;
+    RDouble cpz = 0.0;
+    RDouble hingeMoment = 0.0;
+
+    RDouble CA_f = 0.0;
+    RDouble CA_p = 0.0;
+    RDouble CN_f = 0.0;
+    RDouble CN_p = 0.0;
+    RDouble CZ_f = 0.0;
+    RDouble CZ_p = 0.0;
+    RDouble Cl_f = 0.0;
+    RDouble Cl_p = 0.0;
+    RDouble Cn_f = 0.0;
+    RDouble Cn_p = 0.0;
+    RDouble Cm_f = 0.0;
+    RDouble Cm_p = 0.0;
+
+    int ndim = GetDim();
+
+    using namespace IDX;
+
+    int ix = 0;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcRegion = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = bcRegion->GetBCType();
+
+        int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+        bcRegion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        bool isNeedComputeAirForce = (BCType == PHENGLEI::SOLID_SURFACE || BCType == PHENGLEI::ABLATION_SURFACE);
+        if (isNeedComputeAirForce && partID != ALL_PART)
+        {
+            const string &bcName = bcRegion->GetBCName();
+            isNeedComputeAirForce = isNeedComputeAirForce && (bcName == partBCName);
+        }
+
+        if (!isNeedComputeAirForce)
+        {
+            ix += (ied - ist + 1) * (jed - jst + 1) * (ked - kst + 1);
+            continue;
+        }
+
+        int *s_lr3d = bcRegion->GetFaceDirectionIndex();
+        int nSurface = bcRegion->GetFaceDirection() + 1;
+        int leftOrRightIndex = bcRegion->GetFaceLeftOrRightIndex();
+
+        int iWall = 0, jWall = 0, kWall = 0;
+
+        RDouble dfx = 0, dfy = 0, dfz = 0, dpx = 0, dpy = 0, dpz = 0;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! i, j, k - is first cell index near SOLID_SURFACE.
+                    bcRegion->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                    //! The surface direction of SOLID_SURFACE.
+                    RDouble nx = leftOrRightIndex * xfv(iWall, jWall, kWall, nSurface);
+                    RDouble ny = leftOrRightIndex * yfv(iWall, jWall, kWall, nSurface);
+                    RDouble nz = leftOrRightIndex * zfv(iWall, jWall, kWall, nSurface);
+
+                    //! The index of  first ghost cell layer near SOLID_SURFACE.
+                    int iCellGhostLayer = i + s_lr3d[0];
+                    int jCellGhostLayer = j + s_lr3d[1];
+                    int kCellGhostLayer = k + s_lr3d[2];
+
+                    RDouble pCellfirstLayer = primitiveVars(i, j, k, IP);
+
+                    RDouble pressureWall = pCellfirstLayer;
+                    RDouble pressureCoef = two * (pressureWall - pressureFarfield);
+
+                    dpx = nx * pressureCoef;
+                    dpy = ny * pressureCoef;
+                    dpz = nz * pressureCoef;
+
+                    CA_p += dpx;
+                    CN_p += dpy;
+                    CZ_p += dpz;
+
+                    dfx = dpx;
+                    dfy = dpy;
+                    dfz = dpz;
+
+                    RDouble xc = 0, yc = 0, zc = 0;
+                    grid->FaceCoor(iWall, jWall, kWall, nSurface, xc, yc, zc);
+
+                    RDouble visLaminar = 0, visTurbulence = 0;
+                    RDouble dudx = 0, dudy = 0, dudz = 0, dvdx = 0, dvdy = 0, dvdz = 0, dwdx = 0, dwdy = 0, dwdz = 0;
+                    if (viscousType > INVISCID)
+                    {
+                        Geometry3D *geometry3D = new Geometry3D;
+
+                        if (nSurface == 1)
+                        {
+                            //! Get i-th face vector on the wall surface.
+                            Get_GEO_I(i, j, k, iWall, iWall, ndim, geometry3D, xfv, yfv, zfv, vol);
+                            //! Get derivative to the wall in i-direction of u,v,w.
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, ndim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, ndim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, ndim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(iCellGhostLayer, j, k));
+                            visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(iCellGhostLayer, j, k));
+                        }
+                        else if (nSurface == 2)
+                        {
+                            //! Get j-th face vector on the wall surface.
+                            Get_GEO_J(i, j, k, jWall, jWall, ndim, geometry3D, xfv, yfv, zfv, vol);
+                            //! Get derivative to the wall in j-direction of u,v,w.
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, ndim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, ndim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, ndim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, jCellGhostLayer, k));
+                            visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, jCellGhostLayer, k));
+                        }
+                        else
+                        {
+                            //! Get k-th face vector on the wall surface.
+                            Get_GEO_K(i, j, k, kWall, kWall, geometry3D, xfv, yfv, zfv, vol);
+                            //! Get derivative to the wall in k-direction of u,v,w.
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, j, kCellGhostLayer));
+                            visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, j, kCellGhostLayer));
+                        }
+
+                        //! It is unnecessary to consider because the turbulence viscosity coefficient is 0.
+                        //visTurbulence = 0.0;
+                        RDouble viscousCoef = visLaminar + visTurbulence;
+
+                        RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+                        //! Stress components.
+                        RDouble txx = viscousCoef * (two * dudx - divv2p3);
+                        RDouble tyy = viscousCoef * (two * dvdy - divv2p3);
+                        RDouble tzz = viscousCoef * (two * dwdz - divv2p3);
+                        RDouble txy = viscousCoef * (dudy + dvdx);
+                        RDouble txz = viscousCoef * (dudz + dwdx);
+                        RDouble tyz = viscousCoef * (dvdz + dwdy);
+
+                        RDouble fvsx = -two * (nx * txx + ny * txy + nz * txz) * oRefReNumber;
+                        RDouble fvsy = -two * (nx * txy + ny * tyy + nz * tyz) * oRefReNumber;
+                        RDouble fvsz = -two * (nx * txz + ny * tyz + nz * tzz) * oRefReNumber;
+
+                        dfx += fvsx;
+                        dfy += fvsy;
+                        dfz += fvsz;
+
+                        CA_f += fvsx;
+                        CN_f += fvsy;
+                        CZ_f += fvsz;
+
+                        Cl_f += (yc - TorqueRefY) * fvsz - (zc - TorqueRefZ) * fvsy;
+                        Cn_f += (zc - TorqueRefZ) * fvsx - (xc - TorqueRefX) * fvsz;
+                        Cm_f += (xc - TorqueRefX) * fvsy - (yc - TorqueRefY) * fvsx;
+
+                        delete geometry3D;
+                    }
+
+                    Cl_p += (yc - TorqueRefY) * dpz - (zc - TorqueRefZ) * dpy;
+                    Cn_p += (zc - TorqueRefZ) * dpx - (xc - TorqueRefX) * dpz;
+                    Cm_p += (xc - TorqueRefX) * dpy - (yc - TorqueRefY) * dpx;
+
+                    cpx += dpx;
+                    cpy += dpy;
+                    cpz += dpz;
+
+                    if (dumpHingeMoment)
+                    {
+                        Post_ForceMoment forceMoment;
+                        RDouble point[3] = { xc, yc, zc };
+                        RDouble faceForce[3] = { dfx, dfy, dfz };
+                        hingeMoment += forceMoment.ComputeMoment(point, localCoordAxis0, localCoordAxis1, faceForce);
+                    }
+
+                    ++ ix;
+                }
+            }
+        }
+    }
+
+    this->CollectData->write(&CA_f, sizeof(RDouble));
+    this->CollectData->write(&CA_p, sizeof(RDouble));
+    this->CollectData->write(&CN_f, sizeof(RDouble));
+    this->CollectData->write(&CN_p, sizeof(RDouble));
+    this->CollectData->write(&CZ_f, sizeof(RDouble));
+    this->CollectData->write(&CZ_p, sizeof(RDouble));
+
+    this->CollectData->write(&cpx, sizeof(RDouble));
+    this->CollectData->write(&cpy, sizeof(RDouble));
+    this->CollectData->write(&cpz, sizeof(RDouble));
+
+    this->CollectData->write(&Cl_f, sizeof(RDouble));
+    this->CollectData->write(&Cl_p, sizeof(RDouble));
+    this->CollectData->write(&Cn_f, sizeof(RDouble));
+    this->CollectData->write(&Cn_p, sizeof(RDouble));
+    this->CollectData->write(&Cm_f, sizeof(RDouble));
+    this->CollectData->write(&Cm_p, sizeof(RDouble));
+
+    this->CollectData->write(&hingeMoment, sizeof(RDouble));
+}
+
+void ForceProcessStruct::CompForce()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int zone_proc = GetZoneProcessorID(iZone);
+        int myid = GetCurrentProcessorID();
+
+        if (myid == zone_proc)
+        {
+            AirForceCoef(iZone);
+        }
+    }
+}
+
+void ForceProcessStruct::DumpForce()
+{
+    ActionKey *actkeyDumpAirForceCoef = new ActionKey();
+    delete actkeyDumpAirForceCoef->data;
+    actkeyDumpAirForceCoef->data = this->CollectData;
+
+    string airCoefFile = "aircoef.dat";
+    GlobalDataBase::GetData("aircoeffile", &airCoefFile, PHSTRING, 1);
+
+    actkeyDumpAirForceCoef->filename = airCoefFile;
+    ios_base::openmode openmode = ios_base::out|ios_base::app;
+    actkeyDumpAirForceCoef->openmode = openmode;
+
+    int iterationStep;
+    GlobalDataBase::GetData("outnstep", &iterationStep, PHINT, 1);
+
+    globalAerodynamicForce.DumpForce(actkeyDumpAirForceCoef, iterationStep);
+
+    DataContainer *dataNew = new DataContainer();
+    actkeyDumpAirForceCoef->data = dataNew;
+
+    delete actkeyDumpAirForceCoef;
+}
+
+void ForceProcessStruct::CompValueField()
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    #ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Grid *grid = GetGrid(zoneID,0);
+
+        ComputeGamaAndTemperature(grid);
+        ComputeViscousLaminarCoefficient(grid);
+    }
+}
+
+void ForceProcessStruct::ComputeGamaAndTemperature(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &q = * reinterpret_cast<RDouble4D *>(grid->GetDataPtr("q"));
+    RDouble4D &t = * reinterpret_cast<RDouble4D *>(grid->GetDataPtr("t"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    using namespace IDX;
+
+    RDouble omav = one;
+    RDouble coefficientOfStateEquation = GlobalDataBase::GetDoubleParaFromDB("coefficientOfStateEquation");
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble &rm = q(i, j, k, IR);
+                RDouble &pm = q(i, j, k, IP);
+                t(i, j, k, ITT)  = pm / (coefficientOfStateEquation * rm * omav);
+            }
+        }
+    }
+}
+
+void ForceProcessStruct::ComputeViscousLaminarCoefficient(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble3D &visl = * reinterpret_cast<RDouble3D *>(grid->GetDataPtr("visl"));
+    RDouble4D &t    = * reinterpret_cast<RDouble4D *>(grid->GetDataPtr("t"));
+
+    RDouble tsuth;
+    GlobalDataBase::GetData("tsuth", &tsuth, PHDOUBLE, 1);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble tm = t(i, j, k, ITT);
+                visl(i, j, k) = tm * sqrt(tm) * (1.0 + tsuth) / (tm + tsuth);
+            }
+        }
+    }
+
+    RDouble wallTemperature = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+
+    if (wallTemperature <= 0.0)
+    {
+        GhostCell3D(visl, ni, nj, nk);
+    }
+    else
+    {
+        int idx_bc[2];
+        idx_bc[0] = 0;
+
+        idx_bc[1] = ni;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int m = 0; m <= 1; ++ m)
+                {
+                    int i = idx_bc[m];
+                    RDouble tm = t(i, j, k, ITT);
+                    visl(i, j, k) = tm * sqrt(tm) * (1.0 + tsuth) / (tm + tsuth);
+                }
+            }
+        }
+
+        idx_bc[1] = nj;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int m = 0; m <= 1; ++ m)
+                {
+                    int j = idx_bc[m];
+                    RDouble tm = t(i, j, k, ITT);
+                    visl(i, j, k) = tm * sqrt(tm) * (1.0 + tsuth) / (tm + tsuth);
+                }
+            }
+        }
+
+        if (GetDim() == THREE_D)
+        {
+            idx_bc[1] = nk;
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    for (int m = 0; m <= 1; ++ m)
+                    {
+                        int k = idx_bc[m];
+                        RDouble tm = t(i, j, k, ITT);
+                        visl(i, j, k) = tm * sqrt(tm) * (1.0 + tsuth) / (tm + tsuth);
+                    }
+                }
+            }
+        }
+    }
+}
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/src/ForceProcessUnstruct.cpp b/API/PostProcess/src/ForceProcessUnstruct.cpp
new file mode 100644
index 0000000..a950533
--- /dev/null
+++ b/API/PostProcess/src/ForceProcessUnstruct.cpp
@@ -0,0 +1,510 @@
+#include "ForceProcessUnstruct.h"
+#include "Post_ForceMoment.h"
+#include "GradientOperation.h"
+#include "Geo_UnstructGrid.h"
+#include "PHMpi.h"
+#include "TK_Exit.h"
+
+namespace PHSPACE
+{
+
+ForceProcessUnstruct::ForceProcessUnstruct()
+{
+    CollectData = new DataContainer();
+}
+
+ForceProcessUnstruct::~ForceProcessUnstruct()
+{
+    delete CollectData;
+}
+
+void ForceProcessUnstruct::Run()
+{
+    InitValueField();
+    CompValueField();
+    InitForce();
+    CompForce();
+    CollectionForce();
+    DumpForce();
+}
+
+void ForceProcessUnstruct::InitValueField()
+{
+    using namespace PHMPI;
+
+    int nLocalZones = GetNumberofLocalZones();
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+        UnstructGrid *grid = UnstructGridCast(GetGrid(zoneID));
+        int nTotalCell = grid->GetNTotalCell();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotal = nTotalCell + nBoundFace;
+
+        int nTemperatureModel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+        RDouble **t = NewPointer2<RDouble>(nTemperatureModel, nTotal);
+        grid->UpdateDataPtr("t", t);
+
+        RDouble *visl = new RDouble [nTotal];
+        grid->UpdateDataPtr("visl",visl);
+    }
+}
+
+void ForceProcessUnstruct::InitForce()
+{
+    RDouble attack, sideslip;
+    RDouble attackd = GlobalDataBase::GetDoubleParaFromDB("attackd");
+    RDouble angleSlide = GlobalDataBase::GetDoubleParaFromDB("angleSlide");
+
+    attack   = attackd * PI / 180.0;
+    sideslip = angleSlide * PI / 180.0;
+
+    RDouble forceReferenceArea   = GlobalDataBase::GetDoubleParaFromDB("forceReferenceArea");
+    RDouble forceReferenceLength = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLength");
+    RDouble forceReferenceLengthSpanWise = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLengthSpanWise");
+
+    globalAerodynamicForce.Init(attack, sideslip, forceReferenceArea, forceReferenceLength, forceReferenceLengthSpanWise);
+}
+
+void ForceProcessUnstruct::CollectionForce()
+{
+    globalAerodynamicForce.CollectionForce(CollectData);
+}
+
+void ForceProcessUnstruct::AirForceCoef(int iZone)
+{
+    const int ALL_PART = -1;
+    AirForceCoefParts(iZone, ALL_PART);
+
+    uint_t nTBC = GlobalBoundaryCondition::GetNumberOfBC();
+    for (int iPart = 0; iPart < nTBC; ++ iPart)
+    {
+        if (!GlobalBoundaryCondition::IsSolidWallBC(iPart)) continue;
+
+        AirForceCoefParts(iZone, iPart, LocalCoordinate);
+
+        AirForceCoefParts(iZone, iPart);
+    }
+}
+
+void ForceProcessUnstruct::AirForceCoefParts(int iZone, int partID, int Coordinate)
+{
+    using namespace PHMPI;
+
+    UnstructGrid * grid = UnstructGridCast(GetGrid(iZone));
+
+    RDouble **q   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble *visl = reinterpret_cast< RDouble * > (grid->GetDataPtr("visl"));
+
+    RDouble refReNumber = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+    RDouble oRefReNumber = 1.0 / refReNumber;
+
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+
+    const int ALL_PART = -1;
+    SimpleBC * boundaryCondition = NULL;
+    string partBCName = "";
+    RDouble TorqueRefX = 0.0, TorqueRefY = 0.0, TorqueRefZ = 0.0;
+
+    //! Used to compute hinge moment:
+    int dumpHingeMoment = 0;
+    RDouble localCoordAxis0[3];
+    RDouble localCoordAxis1[3];
+    RDouble hingeMoment = 0.0;
+
+    if(partID == ALL_PART)
+    {
+        TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+        TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+        TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+    }
+    else if ((partID != ALL_PART) && (Coordinate == GlobalCoordinate))
+    {
+        boundaryCondition = GlobalBoundaryCondition::GetBC(partID);
+        partBCName = boundaryCondition->GetBCName();
+
+        TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+        TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+        TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+    }
+    else if ((partID != ALL_PART) && (Coordinate == LocalCoordinate))
+    {
+        boundaryCondition = GlobalBoundaryCondition::GetBC(partID);
+        partBCName = boundaryCondition->GetBCName();
+
+        boundaryCondition->GetParamData("TorqueRefX", &TorqueRefX, PHDOUBLE, 1);
+        boundaryCondition->GetParamData("TorqueRefY", &TorqueRefY, PHDOUBLE, 1);
+        boundaryCondition->GetParamData("TorqueRefZ", &TorqueRefZ, PHDOUBLE, 1);
+
+
+        boundaryCondition->GetParamData("dumpHingeMoment", &dumpHingeMoment, PHINT, 1);
+        boundaryCondition->GetParamData("localCoordAxis0", localCoordAxis0, PHDOUBLE, 3);
+        boundaryCondition->GetParamData("localCoordAxis1", localCoordAxis1, PHDOUBLE, 3);
+    }
+
+    int vis_run = 0;
+    if (viscousType != INVISCID)
+    {
+        vis_run = 1;
+    }
+
+    using namespace IDX;
+    RDouble *primitiveVarFarfield = reinterpret_cast<RDouble *>(GlobalDataBase::GetDataPtr("prim_inf"));
+    RDouble poo = primitiveVarFarfield[IP];
+
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea() ;
+
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    int * leftCellofFace = grid->GetLeftCellOfFace();
+    int * rightCellofFace = grid->GetRightCellOfFace();
+
+    RDouble cpx,cpy,cpz;
+    cpx = 0.0;
+    cpy = 0.0;
+    cpz = 0.0;
+
+    RDouble CA_f = 0.0;
+    RDouble CA_p = 0.0;
+    RDouble CN_f = 0.0;
+    RDouble CN_p = 0.0;
+    RDouble CZ_f = 0.0;
+    RDouble CZ_p = 0.0;
+    RDouble Cl_f = 0.0;
+    RDouble Cl_p = 0.0;
+    RDouble Cn_f = 0.0;
+    RDouble Cn_p = 0.0;
+    RDouble Cm_f = 0.0;
+    RDouble Cm_p = 0.0;
+
+    RDouble pw,cp;
+    RDouble dfx,dfy,dfz,dpx,dpy,dpz,fvsx,fvsy,fvsz;
+    RDouble nx,ny,nz;
+    RDouble vis,txx,txy,txz,tyx,tyy,tyz,tzx,tzy,tzz;
+    RDouble dudx,dudy,dudz,dvdx,dvdy,dvdz,dwdx,dwdy,dwdz;
+    RDouble xc,yc,zc,dx,dy,dz,ods;
+
+    RDouble **gradPrimtiveVarX = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **gradPrimtiveVarY = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **gradPrimtiveVarZ = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    using namespace IDX;
+
+    // get the bcRegion information of unstruct grid.
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+
+    // cycle all bcregions and find the solid surface type of boundary.
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        string bcName = bcRegion->GetBCName();
+        int bcType = bcRegion->GetBCType();
+
+        // if the bc type is wall, calculate the wall coefficient.
+        if(bcType == PHENGLEI::SOLID_SURFACE)
+        {
+            if (partID != ALL_PART && bcName != partBCName)
+            {
+                continue;
+            }
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            int iFace, le, re;
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                iFace = *iter;
+                le = leftCellofFace [ iFace ];
+                re = rightCellofFace[ iFace ];
+
+                nx  = xfn[iFace] * area[iFace];
+                ny  = yfn[iFace] * area[iFace];
+                nz  = zfn[iFace] * area[iFace];
+
+                dx  = xfc[iFace] - xcc[le];
+                dy  = yfc[iFace] - ycc[le];
+                dz  = zfc[iFace] - zcc[le];
+
+                //pressure drag
+                pw = q[IP][le];
+                cp    = two * (pw - poo);
+
+                dpx = nx * cp;
+                dpy = ny * cp;
+                dpz = nz * cp;
+
+                CA_p += dpx;
+                CN_p += dpy;
+                CZ_p += dpz;
+
+                dfx = dpx;
+                dfy = dpy;
+                dfz = dpz;
+
+                xc = xfc[iFace];
+                yc = yfc[iFace];
+                zc = zfc[iFace];
+
+                if (viscousType > INVISCID)
+                {
+                    dudx = gradPrimtiveVarX[IU][le];
+                    dudy = gradPrimtiveVarY[IU][le];
+                    dudz = gradPrimtiveVarZ[IU][le];
+
+                    dvdx = gradPrimtiveVarX[IV][le];
+                    dvdy = gradPrimtiveVarY[IV][le];
+                    dvdz = gradPrimtiveVarZ[IV][le];
+
+                    dwdx = gradPrimtiveVarX[IW][le];
+                    dwdy = gradPrimtiveVarY[IW][le];
+                    dwdz = gradPrimtiveVarZ[IW][le];
+
+                    //! Gradient correction.
+                    dx  = xcc[re] - xcc[le];
+                    dy  = ycc[re] - ycc[le];
+                    dz  = zcc[re] - zcc[le];
+                    ods = 1.0 / sqrt(dx * dx + dy * dy + dz * dz);
+                    dx  = dx * ods;
+                    dy  = dy * ods;
+                    dz  = dz * ods;
+
+                    CorrectGradient(q[IU][le],q[IU][re],dudx,dudy,dudz,dx,dy,dz,ods);
+                    CorrectGradient(q[IV][le],q[IV][re],dvdx,dvdy,dvdz,dx,dy,dz,ods);
+                    CorrectGradient(q[IW][le],q[IW][re],dwdx,dwdy,dwdz,dx,dy,dz,ods);
+
+                    //! It is unnecessary to consider because the turbulence viscosity coefficient is 0.
+                    vis = visl[le];
+
+                    const RDouble c23 = 2.0 / 3.0;
+                    txx = vis * c23 * (2.0 * dudx - dvdy - dwdz);
+                    tyy = vis * c23 * (2.0 * dvdy - dwdz - dudx);
+                    tzz = vis * c23 * (2.0 * dwdz - dudx - dvdy);
+                    txy = vis * (dudy + dvdx);
+                    txz = vis * (dudz + dwdx);
+                    tyz = vis * (dvdz + dwdy);
+                    tyx = txy;
+                    tzx = txz;
+                    tzy = tyz;
+
+                    fvsx = - two * (nx * txx + ny * tyx + nz * tzx) * oRefReNumber;
+                    fvsy = - two * (nx * txy + ny * tyy + nz * tzy) * oRefReNumber;
+                    fvsz = - two * (nx * txz + ny * tyz + nz * tzz) * oRefReNumber;
+
+                    CA_f += fvsx;
+                    CN_f += fvsy;
+                    CZ_f += fvsz;
+
+                    dfx += fvsx;
+                    dfy += fvsy;
+                    dfz += fvsz;
+
+                    Cl_f += (yc - TorqueRefY) * fvsz - (zc - TorqueRefZ) * fvsy;
+                    Cn_f += (zc - TorqueRefZ) * fvsx - (xc - TorqueRefX) * fvsz;
+                    Cm_f += (xc - TorqueRefX) * fvsy - (yc - TorqueRefY) * fvsx;
+                }
+
+                Cl_p += (yc - TorqueRefY) * dpz - (zc - TorqueRefZ) * dpy;
+                Cn_p += (zc - TorqueRefZ) * dpx - (xc - TorqueRefX) * dpz;
+                Cm_p += (xc - TorqueRefX) * dpy - (yc - TorqueRefY) * dpx;
+
+                cpx += dpx;
+                cpy += dpy;
+                cpz += dpz;
+
+                if(dumpHingeMoment)
+                {
+                    Post_ForceMoment forceMoment;
+                    RDouble point[3] = {xfc[iFace], yfc[iFace], zfc[iFace]};
+                    RDouble faceForce[3] = {dfx, dfy, dfz};
+                    hingeMoment += forceMoment.ComputeMoment(point, localCoordAxis0, localCoordAxis1, faceForce);
+                }
+            }
+        }
+    }
+
+    this->CollectData->write(&CA_f,sizeof(RDouble));
+    this->CollectData->write(&CA_p,sizeof(RDouble));
+    this->CollectData->write(&CN_f,sizeof(RDouble));
+    this->CollectData->write(&CN_p,sizeof(RDouble));
+    this->CollectData->write(&CZ_f,sizeof(RDouble));
+    this->CollectData->write(&CZ_p,sizeof(RDouble));
+
+    this->CollectData->write(&cpx,sizeof(RDouble));
+    this->CollectData->write(&cpy,sizeof(RDouble));
+    this->CollectData->write(&cpz,sizeof(RDouble));
+
+    this->CollectData->write(&Cl_f,sizeof(RDouble));
+    this->CollectData->write(&Cl_p,sizeof(RDouble));
+    this->CollectData->write(&Cn_f,sizeof(RDouble));
+    this->CollectData->write(&Cn_p,sizeof(RDouble));
+    this->CollectData->write(&Cm_f,sizeof(RDouble));
+    this->CollectData->write(&Cm_p,sizeof(RDouble));
+
+    this->CollectData->write(&hingeMoment, sizeof(RDouble));
+}
+
+void ForceProcessUnstruct::CompForce()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int zone_proc = GetZoneProcessorID(iZone);
+        int myid = GetCurrentProcessorID();
+
+        if (myid == zone_proc)
+        {
+            AirForceCoef(iZone);
+        }
+    }
+}
+
+void ForceProcessUnstruct::DumpForce()
+{
+    ActionKey *actkeyDumpAirForceCoef = new ActionKey();
+    delete actkeyDumpAirForceCoef->data;
+    actkeyDumpAirForceCoef->data = this->CollectData;
+
+    string airCoefFile = "aircoef.dat";
+    GlobalDataBase::GetData("aircoeffile", &airCoefFile, PHSTRING, 1);
+
+    actkeyDumpAirForceCoef->filename = airCoefFile;
+    ios_base::openmode openmode = ios_base::out|ios_base::app;
+    actkeyDumpAirForceCoef->openmode = openmode;
+
+    int iterationStep;
+    GlobalDataBase::GetData("outnstep", &iterationStep, PHINT, 1);
+
+    globalAerodynamicForce.DumpForce(actkeyDumpAirForceCoef, iterationStep);
+
+    DataContainer *dataNew = new DataContainer();
+    actkeyDumpAirForceCoef->data = dataNew;
+
+    delete actkeyDumpAirForceCoef;
+}
+
+void ForceProcessUnstruct::CompValueField()
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    #ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Grid *grid = GetGrid(zoneID,0);
+
+        ComputeGamaAndTemperature(grid);
+        ComputeViscousLaminarCoefficient(grid);
+        GetGradientField(grid);
+    }
+}
+
+void ForceProcessUnstruct::ComputeGamaAndTemperature(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble **t   = reinterpret_cast< RDouble ** > ( grid->GetDataPtr("t") );
+    RDouble **q   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+
+    using namespace IDX;
+
+    RDouble coefficientOfStateEquation = GlobalDataBase::GetDoubleParaFromDB("coefficientOfStateEquation");
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        RDouble &rm = q[IR][iCell];
+        RDouble &pm = q[IP][iCell];
+        t[ITT][iCell] = pm / (coefficientOfStateEquation * rm);
+    }
+}
+
+void ForceProcessUnstruct::GetGradientField(Grid *gridIn)
+{
+    UnstructGrid *gridUnstruct = UnstructGridCast(gridIn);
+
+    int nChemical           = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nNSEquation         = GlobalDataBase::GetIntParaFromDB("nm");
+    int nTemperatureModel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+    int nEquation = nNSEquation + nChemical + nTemperatureModel - 1;
+
+    RDouble **gradPrimtiveVarX = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **gradPrimtiveVarY = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **gradPrimtiveVarZ = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradPrimtiveVarZ"));
+    RDouble **q     = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("q"));
+
+    string gradientName = GlobalDataBase::GetStrParaFromDB("gradientName");
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        if (gradientName == "ggnode" || gradientName == "ggnodelaplacian")
+        {
+            gridUnstruct->CompGradientGGCell(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }
+        else if (gradientName == "ggcell")
+        {
+            gridUnstruct->CompGradientGGCell(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }
+        else if (gradientName == "lsq")
+        {
+            gridUnstruct->CompGradientLSQ(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }    
+        else if (gradientName == "ggnode_weight")
+        {
+            gridUnstruct->CompGradientGGNodeWeight(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }
+        else if (gradientName == "gg_m2")
+        {
+            gridUnstruct->CompGradientGGModified2(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }
+        else if (gradientName == "ggcellnew")
+        {
+            gridUnstruct->CompGradientGGCellNew(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }
+        else if (gradientName == "ggcellw")
+        {
+            gridUnstruct->CompGradientGGCellW(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("No reconstruction method has been choosed ! /n");
+        }
+    }
+}
+
+void ForceProcessUnstruct::ComputeViscousLaminarCoefficient(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble *viscousLaminar = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+    RDouble **t = reinterpret_cast<RDouble **> (grid->GetDataPtr("t"));
+
+    RDouble tsuth;
+    GlobalDataBase::GetData("tsuth", &tsuth, PHDOUBLE, 1);
+
+    using namespace IDX;
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        viscousLaminar[iCell] = t[ITT][iCell] * sqrt(t[ITT][iCell]) * (1.0 + tsuth) / (t[ITT][iCell] + tsuth);
+    }
+}
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/src/IO_FlowReader.cpp b/API/PostProcess/src/IO_FlowReader.cpp
new file mode 100644
index 0000000..aa735c6
--- /dev/null
+++ b/API/PostProcess/src/IO_FlowReader.cpp
@@ -0,0 +1,367 @@
+#include "IO_FlowReader.h"
+#include "Glb_Dimension.h"
+#include "IO_FileName.h"
+#include "GridType.h"
+#include "PHIO.h"
+
+using namespace std;
+namespace PHSPACE
+{
+
+IO_FlowReader::IO_FlowReader(Region *region_in)
+{
+    this->region = region_in;
+
+    this->nEquation           = 0;
+    this->nTemperatureModel   = 0;
+    this->nTurbulenceEquation = 0;
+    this->nTransitionEquation = 0;
+}
+
+IO_FlowReader::~IO_FlowReader()
+{
+
+}
+
+void IO_FlowReader::Run()
+{
+    Init();
+    ReadFlowFile();
+    ReadTurbFile();
+    ReadTransitionFile();
+}
+
+void IO_FlowReader::Init()
+{
+    using namespace PHMPI;
+
+    restartNSFile = GlobalDataBase::GetStrParaFromDB("restartNSFile");
+    turbFile = GlobalDataBase::GetStrParaFromDB("turbFile");
+    transitionFile = GlobalDataBase::GetStrParaFromDB("transitionFile");
+
+    int nChemical           = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nNSEquation         = GlobalDataBase::GetIntParaFromDB("nm");
+    this->nTemperatureModel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+    this->nEquation         = nNSEquation + nChemical + nTemperatureModel - 1;
+
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    if (viscousType == 3)
+    {
+        this->nTurbulenceEquation = 1;
+    }
+    else if (viscousType == 4)
+    {
+        this->nTurbulenceEquation = 2;
+        int transitionType = GlobalDataBase::GetIntParaFromDB("transitionType");
+        if (transitionType > 0)
+        {
+            this->nTransitionEquation = transitionType;
+        }
+    }
+
+    int nLocalZones = GetNumberofLocalZones();
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Grid *grid = GetGrid(zoneID);
+        int gridType = grid->Type();
+        if (gridType == STRUCTGRID)
+        {
+            InitMemoryStruct(grid);
+        }
+        else
+        {
+            InitMemoryUnstruct(grid);
+        }
+    }
+}
+
+void IO_FlowReader::InitMemoryStruct(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Range M(0, nEquation - 1);
+    Range T(0, nTemperatureModel - 1);
+
+    RDouble4D *q = new RDouble4D(I, J, K, M, fortranArray);
+    grid->UpdateDataPtr("q", q);
+
+    RDouble4D *t = new RDouble4D(I, J, K, T, fortranArray);
+    grid->UpdateDataPtr("t", t);
+
+    RDouble3D *visl = new RDouble3D(I, J, K, fortranArray);
+    grid->UpdateDataPtr("visl", visl);
+
+    RDouble3D *viscousTurbulent = new RDouble3D(I, J, K, fortranArray);
+    grid->UpdateDataPtr("vist", viscousTurbulent);
+    *viscousTurbulent = 0.0;
+
+    if (nTurbulenceEquation > 0)
+    {
+        Range Mturb(0, nTurbulenceEquation - 1);
+        RDouble4D *q_turb = new RDouble4D(I, J, K, Mturb, fortranArray);
+        grid->UpdateDataPtr("q_turb", q_turb);
+    }
+
+    if (nTransitionEquation > 0)
+    {
+        Range Mturb(0, nTransitionEquation - 1);
+        RDouble4D *qTransition = new RDouble4D(I, J, K, Mturb, fortranArray);
+        grid->UpdateDataPtr("q_transition", qTransition);
+    }
+}
+
+void IO_FlowReader::InitMemoryUnstruct(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble **q   = NewPointer2<RDouble>(nEquation, nTotal);
+    grid->UpdateDataPtr("q", q);
+
+    RDouble **gradPrimtiveVarX = NewPointer2<RDouble>(nEquation, nTotal);
+    RDouble **gradPrimtiveVarY = NewPointer2<RDouble>(nEquation, nTotal);
+    RDouble **gradPrimtiveVarZ = NewPointer2<RDouble>(nEquation, nTotal);
+
+    grid->UpdateDataPtr("gradPrimtiveVarX", gradPrimtiveVarX);
+    grid->UpdateDataPtr("gradPrimtiveVarY", gradPrimtiveVarY);
+    grid->UpdateDataPtr("gradPrimtiveVarZ", gradPrimtiveVarZ);
+
+    if (nTurbulenceEquation > 0)
+    {
+        RDouble **qTurbulence = NewPointer2<RDouble>(nTurbulenceEquation, nTotal);
+        grid->UpdateDataPtr("q_turb", qTurbulence);
+    }
+
+    if (nTransitionEquation > 0)
+    {
+        RDouble **qTransition = NewPointer2<RDouble>(nTransitionEquation, nTotal);
+        grid->UpdateDataPtr("q_transition", qTransition);
+    }
+}
+
+void IO_FlowReader::ReadFlowFile()
+{
+    hid_t file;
+    file = OpenHDF5File(restartNSFile);
+
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Grid *grid = GetGrid(zoneID);
+        int gridType = grid->Type();
+        if (gridType == STRUCTGRID)
+        {
+            ReadFlowFileStr(file, grid);
+        }
+        else
+        {
+            ReadFlowFileUnStr(file, grid);
+        }
+    }
+
+    H5Fclose(file);
+}
+
+void IO_FlowReader::ReadFlowFileUnStr(hid_t loc_id, Grid *gridIn)
+{
+    RDouble **q = reinterpret_cast< RDouble ** > ( gridIn->GetDataPtr("q") );
+
+    hid_t grploc;
+    string grpName;
+
+    int outIterStep = 0;
+    ReadData(loc_id, &outIterStep, "outnstep");
+    GlobalDataBase::UpdateData("outnstep", &outIterStep, PHINT, 1);
+
+    ostringstream oss;
+    oss << "Group" << gridIn->GetZoneID();
+    grpName = oss.str();
+
+    grploc = OpenGroup(loc_id, grpName);
+    ReadData(grploc, q[0], "q");
+
+    H5Gclose(grploc);
+}
+
+void IO_FlowReader::ReadFlowFileStr(hid_t loc_id, Grid *gridIn)
+{
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (gridIn->GetDataPtr("q"));
+
+    StructGrid *strGrid = StructGridCast(gridIn);
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    hid_t grploc;
+    string grpName;
+
+    int outIterStep = 0;
+    ReadData(loc_id, &outIterStep, "outnstep");
+    GlobalDataBase::UpdateData("outnstep", &outIterStep, PHINT, 1);
+
+    ostringstream oss;
+    oss << "Group" << gridIn->GetZoneID();
+    grpName = oss.str();
+
+    grploc = OpenGroup(loc_id, grpName);
+    ReadData(grploc, &primitiveVariables(iCellStart, jCellStart, kCellStart, 0), "q");
+
+    H5Gclose(grploc);
+}
+
+void IO_FlowReader::ReadTurbFile()
+{
+    if (!nTurbulenceEquation)
+    {
+        return;
+    }
+
+    hid_t file;
+    file = OpenHDF5File(turbFile);
+
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Grid *grid = GetGrid(zoneID);
+        int gridType = grid->Type();
+        if (gridType == STRUCTGRID)
+        {
+            ReadTurbFileStr(file, grid);
+        }
+        else
+        {
+            ReadTurbFileUnStr(file, grid);
+        }
+    }
+
+    H5Fclose(file);
+}
+
+void IO_FlowReader::ReadTurbFileStr(hid_t loc_id, Grid *gridIn)
+{
+    StructGrid *strGrid = StructGridCast(gridIn);
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    RDouble4D &qTurbulent = *reinterpret_cast<RDouble4D *> (strGrid->GetDataPtr("q_turb"));
+    RDouble3D &viscousTurbulent = *reinterpret_cast<RDouble3D *> (strGrid->GetDataPtr("vist"));
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridIn->GetZoneID();
+    grpName = oss.str();
+
+    grploc = OpenGroup(loc_id, grpName);
+    ReadData(grploc, &qTurbulent(iCellStart, jCellStart, kCellStart, 0), "q_turb");
+    ReadData(grploc, &viscousTurbulent(iCellStart, jCellStart, kCellStart), "visturb");
+
+    H5Gclose(grploc);
+}
+
+void IO_FlowReader::ReadTurbFileUnStr(hid_t loc_id, Grid *gridIn)
+{
+    RDouble **qTurbulence     = reinterpret_cast<RDouble **> (gridIn->GetDataPtr("q_turb"));
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridIn->GetZoneID();
+    grpName = oss.str();
+
+    grploc = OpenGroup(loc_id, grpName);
+    ReadData(grploc, qTurbulence[0], "q_turb");
+
+    H5Gclose(grploc);
+}
+
+void IO_FlowReader::ReadTransitionFile()
+{
+    if (!nTransitionEquation)
+    {
+        return;
+    }
+
+    hid_t file;
+    file = OpenHDF5File(transitionFile);
+
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Grid *grid = GetGrid(zoneID);
+        int gridType = grid->Type();
+        if (gridType == STRUCTGRID)
+        {
+            ReadTransitionFileStr(file, grid);
+        }
+        else
+        {
+            ReadTransitionFileUnStr(file, grid);
+        }
+    }
+
+    H5Fclose(file);
+}
+
+void IO_FlowReader::ReadTransitionFileStr(hid_t loc_id, Grid *gridIn)
+{
+    StructGrid *strGrid = StructGridCast(gridIn);
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (strGrid->GetDataPtr("q_transition"));
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridIn->GetZoneID();
+    grpName = oss.str();
+
+    grploc = OpenGroup(loc_id, grpName);
+    ReadData(grploc, &qTransition(iCellStart, jCellStart, kCellStart, 0), "q_transition");
+
+    H5Gclose(grploc);
+}
+
+void IO_FlowReader::ReadTransitionFileUnStr(hid_t loc_id, Grid *gridIn)
+{
+    RDouble **qTransition     = reinterpret_cast<RDouble **> (gridIn->GetDataPtr("q_transition"));
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridIn->GetZoneID();
+    grpName = oss.str();
+
+    grploc = OpenGroup(loc_id, grpName);
+    ReadData(grploc, qTransition[0], "q_transition");
+
+    H5Gclose(grploc);
+}
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/src/PostProcess.cpp b/API/PostProcess/src/PostProcess.cpp
new file mode 100644
index 0000000..2769462
--- /dev/null
+++ b/API/PostProcess/src/PostProcess.cpp
@@ -0,0 +1,192 @@
+#include "PostProcess.h"
+#include "ForceProcessStruct.h"
+#include "ForceProcessUnstruct.h"
+#include "GridType.h"
+#include "PHIO.h"
+#include "IO_FileName.h"
+#include "Glb_Dimension.h"
+#include <cmath>
+
+using namespace std;
+namespace PHSPACE
+{
+
+PostProcess::PostProcess(Region *region_in)
+{
+    this->region = region_in;
+}
+
+PostProcess::~PostProcess()
+{
+
+}
+
+void PostProcess::Run()
+{
+    ReadGridFile();
+    ReadFlowFile();
+
+    int postTask = GlobalDataBase::GetIntParaFromDB("postTask");
+    switch (postTask)
+    {
+    case COMPAIRFORCE:
+        CompAirForceCoef();
+        break;
+    default:
+        TK_Exit::UnexpectedVarValue("postTask = ", postTask);
+        break;
+    }
+}
+
+void PostProcess::ReadGridFile()
+{
+    region->ReadGrid();
+
+    cout << endl << "Read grid finish ..." << endl;
+}
+
+void PostProcess::ComputeMetrics()
+{
+    using namespace PHMPI;
+
+    ActionKey *actkey = new ActionKey();
+    actkey->action = COMPUTEMETRICS;
+
+    int myid = PHMPI::GetCurrentProcessorID();
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int send_proc = GetZoneProcessorIDSepMode(iZone);
+        if (myid == send_proc)
+        {
+            Grid *grid = GetGrid(iZone, 0);
+            grid->ComputeMetrics(actkey);
+        }
+    }
+    delete actkey;
+
+}
+
+void PostProcess::ReadFlowFile()
+{
+    cout << endl<< "Begin to read flow data ..." << endl << endl;
+
+    IO_FlowReader *flowReader = new IO_FlowReader(this->region);
+    flowReader->Run();
+
+    delete flowReader;
+
+    cout << "Read flow data finish ..." << endl;
+}
+
+void PostProcess::CompAirForceCoef()
+{
+    cout << endl << "Computer air force coefficient ..." << endl;
+
+    InitGlobalValues();
+    ReadBCFile();
+    ComputeMetrics();
+
+    Grid *grid = GetGrid(0);
+    int gridtype = grid->Type();
+    if (gridtype == STRUCTGRID)
+    {
+        ForceProcessStruct *forceprocess = new ForceProcessStruct();
+        forceprocess->Run();
+
+        delete forceprocess;
+    }
+    else
+    {
+        ForceProcessUnstruct *forceprocess = new ForceProcessUnstruct();
+        forceprocess->Run();
+
+        delete forceprocess;
+    }
+
+    cout << endl << "Computer finish ..." << endl;
+}
+
+void PostProcess::ReadBCFile()
+{
+    GlobalBoundaryCondition::ReadGlobalBoundaryCondition();
+
+    GlobalBoundaryCondition::SetGlobalBCByGlobalDataBase();
+}
+
+void PostProcess::InitGlobalValues()
+{
+    ComputeCoefficientOfStateEquation();
+    ComputeReferenceTsuth();
+    ComputeReferenceLengthDimensional();
+
+    int nm    = GlobalDataBase::GetIntParaFromDB("nm");
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    int neqn  = nm + nchem;
+
+    int nl    = nm;
+    GlobalDataBase::UpdateData("nl", &nl, PHINT, 1);
+
+    RDouble *prim_inf = new RDouble[neqn];
+    GlobalDataBase::UpdateDataPtr("prim_inf", prim_inf);
+
+    RDouble attackd = GlobalDataBase::GetDoubleParaFromDB("attackd");
+    RDouble angleSlide = GlobalDataBase::GetDoubleParaFromDB("angleSlide");
+    RDouble coefficientOfStateEquation = GlobalDataBase::GetDoubleParaFromDB("coefficientOfStateEquation");
+
+    RDouble attack   = attackd * PI / 180.0;
+    RDouble sideslip = angleSlide * PI / 180.0;
+
+    RDouble reference_density     = 1.0;
+    RDouble reference_temperature = 1.0;
+
+    RDouble reference_pressure, massoo_ref;
+    massoo_ref = 1.0;
+
+    reference_pressure = coefficientOfStateEquation * reference_density * reference_temperature / massoo_ref;
+
+    using namespace IDX;
+
+    prim_inf[IR] = reference_density;
+    prim_inf[IU] = 1.0 * cos(attack) * cos(sideslip);
+    prim_inf[IV] = 1.0 * sin(attack) * cos(sideslip);
+    prim_inf[IW] = 1.0 *               sin(sideslip);
+    prim_inf[IP] = reference_pressure;
+}
+
+void PostProcess::ComputeCoefficientOfStateEquation()
+{
+    RDouble refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+
+    RDouble refMachNumber = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+
+    RDouble coefficientOfStateEquation = 1.0 / (refGama * refMachNumber * refMachNumber);
+    GlobalDataBase::UpdateData("coefficientOfStateEquation", &coefficientOfStateEquation, PHDOUBLE, 1);
+}
+
+void PostProcess::ComputeReferenceTsuth()
+{
+    RDouble tsi  = 110.4;
+
+    RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+
+    RDouble tsuth = tsi / refDimensionalTemperature;
+    GlobalDataBase::UpdateData("tsuth", &tsuth, PHDOUBLE, 1);
+}
+
+void PostProcess::ComputeReferenceLengthDimensional()
+{
+    RDouble reynoldsReferenceLengthDimensional = 1.0;
+
+    RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+
+    reynoldsReferenceLengthDimensional = gridScaleFactor;
+
+    GlobalDataBase::UpdateData("reynoldsReferenceLengthDimensional", &reynoldsReferenceLengthDimensional, PHDOUBLE, 1);
+}
+
+
+
+
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/src/PostProcessData.cpp b/API/PostProcess/src/PostProcessData.cpp
new file mode 100644
index 0000000..9d56f8c
--- /dev/null
+++ b/API/PostProcess/src/PostProcessData.cpp
@@ -0,0 +1,331 @@
+#include "PostProcessData.h"
+
+using namespace std;
+namespace PHSPACE
+{
+
+PostProcessData::PostProcessData()
+{
+    partBCID = 0;
+
+    cfx = 0;
+    cfy = 0;
+    cfz = 0;
+    cpx = 0;
+    cpy = 0;
+    cpz = 0;
+    cmx = 0;
+    cmy = 0;
+    cmz = 0;
+
+    clTot    = 0;
+    cdTot    = 0;
+    cd_pr    = 0;
+    cd_sf    = 0;
+    cd_cl2pa = 0;
+    xcp      = 0;
+    side     = 0;
+
+    hingeMoment = 0;
+    numberofSolidWallPart = 0;
+    numberofTotalPart = 0;
+}
+
+PostProcessData::~PostProcessData()
+{
+    delete [] partBCID;
+
+    delete [] cfx;
+    delete [] cfy;
+    delete [] cfz;
+    delete [] cpx;
+    delete [] cpy;
+    delete [] cpz;
+    delete [] cmx;
+    delete [] cmy;
+    delete [] cmz;
+
+    delete [] clTot;
+    delete [] cdTot;
+    delete [] cd_pr;
+    delete [] cd_sf;
+    delete [] cd_cl2pa;
+    delete [] xcp;
+    delete [] side;
+
+    delete [] hingeMoment;
+}
+
+void PostProcessData::SetNWallPart(int numberofSolidWallPartIn)
+{
+    this->numberofSolidWallPart = numberofSolidWallPartIn;
+}
+
+void PostProcessData::SetNPart(int numberofTotalPartIn)
+{
+    this->numberofTotalPart = numberofTotalPartIn;
+}
+
+void PostProcessData::SetPartBCID(int *partBCIDIn)
+{
+    if (this->partBCID)
+    {
+        delete this->partBCID;
+    }
+    this->partBCID = partBCIDIn;
+}
+
+void PostProcessData::SetCfx(RDouble *cfxIn)
+{
+    if (this->cfx)
+    {
+        delete this->cfx;
+    }
+    this->cfx = cfxIn;
+}
+
+void PostProcessData::SetCfy(RDouble *cfyIn)
+{
+    if (this->cfy)
+    {
+        delete this->cfy;
+    }
+    this->cfy = cfyIn;
+}
+
+void PostProcessData::SetCfz(RDouble *cfzIn)
+{
+    if (this->cfz)
+    {
+        delete this->cfz;
+    }
+    this->cfz = cfzIn;
+}
+
+void PostProcessData::SetCpx(RDouble *cpxIn)
+{
+    if (this->cpx)
+    {
+        delete this->cpx;
+    }
+    this->cpx = cpxIn;
+}
+
+void PostProcessData::SetCpy(RDouble *cpyIn)
+{
+    if (this->cpy)
+    {
+        delete this->cpy;
+    }
+    this->cpy = cpyIn;
+}
+
+void PostProcessData::SetCpz(RDouble *cpzIn)
+{
+    if (this->cpz)
+    {
+        delete this->cpz;
+    }
+    this->cpz = cpzIn;
+}
+
+void PostProcessData::SetCmx(RDouble *cmxIn)
+{
+    if (this->cmx)
+    {
+        delete this->cmx;
+    }
+    this->cmx = cmxIn;
+}
+
+void PostProcessData::SetCmy(RDouble *cmyIn)
+{
+    if (this->cmy)
+    {
+        delete this->cmy;
+    }
+    this->cmy = cmyIn;
+}
+
+void PostProcessData::SetCmz(RDouble *cmzIn)
+{
+    if (this->cmz)
+    {
+        delete this->cmz;
+    }
+    this->cmz = cmzIn;
+}
+
+void PostProcessData::SetClTot(RDouble *clTotIn)
+{
+    if (this->clTot)
+    {
+        delete this->clTot;
+    }
+    this->clTot = clTotIn;
+}
+
+void PostProcessData::SetCdTot(RDouble *cdTotIn)
+{
+    if (this->cdTot)
+    {
+        delete this->cdTot;
+    }
+    this->cdTot = cdTotIn;
+}
+
+void PostProcessData::SetCdPr(RDouble *cd_prIn)
+{
+    if (this->cd_pr)
+    {
+        delete this->cd_pr;
+    }
+    this->cd_pr = cd_prIn;
+}
+
+void PostProcessData::SetCdSf(RDouble *cd_sfIn)
+{
+    if (this->cd_sf)
+    {
+        delete this->cd_sf;
+    }
+    this->cd_sf = cd_sfIn;
+}
+
+void PostProcessData::SetCdCl2Pa(RDouble *cd_cl2paIn)
+{
+    if (this->cd_cl2pa)
+    {
+        delete this->cd_cl2pa;
+    }
+    this->cd_cl2pa = cd_cl2paIn;
+}
+
+void PostProcessData::SetXcp(RDouble *xcpIn)
+{
+    if (this->xcp)
+    {
+        delete this->xcp;
+    }
+    this->xcp = xcpIn;
+}
+
+void PostProcessData::SetSide(RDouble *sideIn)
+{
+    if (this->side)
+    {
+        delete this->side;
+    }
+    this->side = sideIn;
+}
+
+void PostProcessData::SetHingeMoment(RDouble *hingeMomentIn)
+{
+    if (this->hingeMoment)
+    {
+        delete this->hingeMoment;
+    }
+    this->hingeMoment = hingeMomentIn;
+}
+
+int PostProcessData::GetNWallPart()
+{
+    return this->numberofSolidWallPart;
+}
+
+int PostProcessData::GetNPart()
+{
+    return this->numberofTotalPart;
+}
+
+int * PostProcessData::GetPartBCID()
+{
+    return this->partBCID;
+};
+
+RDouble * PostProcessData::GetCfx()
+{
+    return this->cfx; 
+};
+
+RDouble * PostProcessData::GetCfy() 
+{
+    return this->cfy; 
+};
+
+RDouble * PostProcessData::GetCfz() 
+{
+    return this->cfz; 
+};
+
+RDouble * PostProcessData::GetCpx() 
+{
+    return this->cpx; 
+};
+
+RDouble * PostProcessData::GetCpy() 
+{
+    return this->cpy; 
+};
+
+RDouble * PostProcessData::GetCpz() 
+{
+    return this->cpz; 
+};
+
+RDouble * PostProcessData::GetCmx() 
+{
+    return this->cmx; 
+};
+
+RDouble * PostProcessData::GetCmy() 
+{
+    return this->cmy; 
+};
+
+RDouble * PostProcessData::GetCmz() 
+{
+    return this->cmz; 
+};
+
+RDouble * PostProcessData::GetClTot() 
+{
+    return this->clTot; 
+};
+
+RDouble * PostProcessData::GetCdTot() 
+{
+    return this->cdTot; 
+};
+
+RDouble * PostProcessData::GetCdPr() 
+{
+    return this->cd_pr; 
+};
+
+RDouble * PostProcessData::GetCdSf() 
+{
+    return this->cd_sf; 
+};
+
+RDouble * PostProcessData::GetCdCl2Pa() 
+{
+    return this->cd_cl2pa; 
+};
+
+RDouble * PostProcessData::GetXcp() 
+{
+    return this->xcp; 
+};
+
+RDouble * PostProcessData::GetSide() 
+{
+    return this->side; 
+};
+
+RDouble * PostProcessData::GetHingeMoment() 
+{
+    return this->hingeMoment; 
+};
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/src/Post_ForceMoment.cpp b/API/PostProcess/src/Post_ForceMoment.cpp
new file mode 100644
index 0000000..2c6a9f9
--- /dev/null
+++ b/API/PostProcess/src/Post_ForceMoment.cpp
@@ -0,0 +1,48 @@
+#include "Post_ForceMoment.h"
+#include <cmath>
+
+namespace PHSPACE
+{
+
+RDouble Post_ForceMoment::DistPoint2Line(RDouble *point, RDouble *linePoint1, RDouble *linePoint2)
+{
+    RDouble p, q, r, dx, dy, dz, di, dj, dk, d, distN2L;
+    p = linePoint2[0] - linePoint1[0];
+    q = linePoint2[1] - linePoint1[1];
+    r = linePoint2[2] - linePoint1[2];
+    dx = point[0] - linePoint1[0];
+    dy = point[1] - linePoint1[1];
+    dz = point[2] - linePoint1[2];
+    di =  q * dz - dy * r;
+    dj = -p * dz + dx * r;
+    dk =  p * dy - dx * q;
+    d = di * di + dj * dj +dk * dk;
+    d = sqrt(d);
+    distN2L = d / (sqrt(p * p + q * q + r * r) + TINY);
+    return distN2L;
+}
+
+void Post_ForceMoment::PlaneNormal(RDouble *point, RDouble *linePoint1, RDouble *linePoint2, RDouble &normalX, RDouble &normalY, RDouble &normalZ)
+{
+    RDouble r;
+    normalX =  (linePoint2[1] - linePoint1[1]) * (point[2] - linePoint1[2]) - (point[1] - linePoint1[1]) * (linePoint2[2] - linePoint1[2]);
+    normalY = -(linePoint2[0] - linePoint1[0]) * (point[2] - linePoint1[2]) + (point[0] - linePoint1[0]) * (linePoint2[2] - linePoint1[2]);
+    normalZ =  (linePoint2[0] - linePoint1[0]) * (point[1] - linePoint1[1]) - (point[0] - linePoint1[0]) * (linePoint2[1] - linePoint1[1]);
+    r = normalX * normalX + normalY * normalY + normalZ * normalZ;
+    r = sqrt(r) + TINY;
+    normalX /= r;
+    normalY /= r;
+    normalZ /= r;
+}
+
+RDouble Post_ForceMoment::ComputeMoment(RDouble *point, RDouble *linePoint1, RDouble *linePoint2, RDouble *force)
+{
+    RDouble distN2L = DistPoint2Line(point, linePoint1, linePoint2);
+    RDouble normalX, normalY, normalZ;
+    PlaneNormal(point, linePoint1, linePoint2, normalX, normalY, normalZ);
+
+    RDouble moment = distN2L * (force[0] * normalX + force[1] * normalY + force[2] * normalZ);
+    return moment;
+}
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/src/Post_Identify.cpp b/API/PostProcess/src/Post_Identify.cpp
new file mode 100644
index 0000000..23dc53f
--- /dev/null
+++ b/API/PostProcess/src/Post_Identify.cpp
@@ -0,0 +1,411 @@
+#include "Post_Identify.h"
+#include "PHIO.h"
+#include "TK_Exit.h"
+#include "TK_Log.h"
+#include "GlobalDataBase.h"
+#include "Constants.h"
+#include "AleManager.h"
+#include <cmath>
+
+using namespace std;
+namespace PHSPACE
+{
+    Identify::Identify()
+    {
+        amplitude = -PHSPACE::GetRDoubleParameterFromDataBase(0, "amplitude") * PI / 180.0;
+        reduceFrequency  = PHSPACE::GetRDoubleParameterFromDataBase(0, "reduceFrequency");
+        lenthReference   = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLength");
+        physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+        reduceFrequency  = reduceFrequency * lenthReference;
+        physicalTimeStep = physicalTimeStep / lenthReference;
+
+        nForceVar = 15;
+        nIdentifyVar = 8;
+
+        c0 = new RDouble[nIdentifyVar];
+        c1 = new RDouble[nIdentifyVar];
+        c2 = new RDouble[nIdentifyVar];
+
+        nameList.push_back("cfx");
+        nameList.push_back("cfy");
+        nameList.push_back("cfz");
+        nameList.push_back("cmx");
+        nameList.push_back("cmy");
+        nameList.push_back("cmz");
+        nameList.push_back("cl");
+        nameList.push_back("cd");
+    }
+
+    Identify::~Identify()
+    {
+        delete [] c0;    c0 = NULL;
+        delete [] c1;    c1 = NULL;
+        delete [] c2;    c2 = NULL; 
+    }
+
+    void Identify::Run()
+    {
+        ReadForce();
+        ForceArrange();
+        DumpHysteresisData();
+
+        if (isIdentify)
+        {
+            IdentifyProcess();
+            DumpResults();
+        }
+    }
+
+    void Identify::ReadForce()
+    {
+        isIdentify = true;
+        int nBlankLine = 17;
+        fstream file;
+        string forceFile = GlobalDataBase::GetStrParaFromDB("aircoeffile");
+        file.open(forceFile.c_str(), ios_base::in);
+        vector <RDouble> force(nForceVar);
+
+        string blankLine, line;
+        for (int iLine = 0; iLine < nBlankLine; ++ iLine)
+        {
+            getline(file, blankLine);
+        }
+
+        nDataLine = 1;
+        while (!file.eof())
+        {
+            for (int iVar = 0; iVar < nForceVar; ++ iVar)
+            {
+                file >> force[iVar];
+            }
+
+            vector <RDouble> last = force;
+            if (!aeroForce.empty())
+            {
+                last = aeroForce.back();
+            }
+
+            nwStep = max(int(force[0] - last[0]), nwStep);
+
+            //! remove data line in aircoef.dat which is repeated!
+           if (aeroForce.empty() || int(force[0] - nwStep) == int(last[0]))
+            {
+                aeroForce.push_back(force);
+                ++ nDataLine;
+            }
+        }
+        nDataLine -= 1;
+
+        if (nDataLine < 3)
+        {
+            TK_Exit::ExceptionExit("Error: The data number is less than one cycle! \n");
+        }
+
+        RDouble period = PI;
+        nLineOneCycle = static_cast<int>(period / (reduceFrequency * physicalTimeStep));
+        if (nDataLine < nLineOneCycle)
+        {
+            TK_Exit::ExceptionExit("Error: The data number is less than one cycle! \n");
+        }
+        file.close();
+        file.clear();
+    }
+
+    void Identify::ForceArrange()
+    {
+        for (int iLine = 0; iLine < nDataLine; ++ iLine)
+        {
+            vector <RDouble> &force = aeroForce[iLine];
+            //! arrange force[1~8] by cfx,cfy,cfz,cmx,cmy,cmz,cl,cd
+            RDouble cl  = force[1 ];
+            RDouble cd  = force[2 ];
+            RDouble cfx = force[8 ];
+            RDouble cfy = force[9 ];
+            RDouble cfz = force[10];
+            RDouble cmx = force[11];
+            RDouble cmy = force[12];
+            RDouble cmz = force[13];
+            force[1] = -cfx;
+            force[2] =  cfy;
+            force[3] = -cfz;
+            force[4] = -cmx;
+            force[5] =  cmy;
+            force[6] = -cmz;
+            force[7] =   cl;
+            force[8] =   cd;
+        }
+    }
+
+    void Identify::IdentifyProcess()
+    {
+        GetNumberOfCycle();
+        for (int iVar = 1; iVar <= nIdentifyVar; ++ iVar)
+        {
+            getIntegral(iVar);
+        }
+    }
+
+    void Identify::getIntegral(int iVar)
+    {
+        RDouble *f = new RDouble[nLineEnd - nLinestart + 1]();
+        getIntegrand(iVar, f);
+
+        RDouble sum1 = 0.0, sum2 = 0.0;
+        int integralOrder = 4;
+        if (GlobalDataBase::IsExist("derivativeFileName", PHSTRING, 1))
+        {
+            integralOrder = GlobalDataBase::GetIntParaFromDB("integralOrder");
+        }
+
+        if (integralOrder == 2)
+        {
+            GetIntegral2ndOrder(iVar, f, sum1, sum2);
+        }
+        else if(integralOrder == 4)
+        {
+            GetIntegral4thOrder(iVar, f, sum1, sum2);
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("No such integral Order! \n");
+        }
+
+        sum1 = sum1 / nCycle;
+        sum2 = sum2 / nCycle;
+
+        RDouble amp = amplitude * PI;
+        sum1 = 2.0 * reduceFrequency * sum1 / amp;
+        sum2 = 2.0 * sum2 / amp;
+
+        c1[iVar - 1] = sum1;
+        c2[iVar - 1] = sum2;
+
+        delete [] f;    f = NULL;
+    }
+
+    void Identify::getIntegrand(int iVar, RDouble *f)
+    {
+        RDouble fSum = 0.0;
+        for (int iLine = static_cast<int>(nLinestart); iLine <= nLineEnd; ++ iLine)
+        {
+            fSum += aeroForce[iLine][iVar];
+        }
+        RDouble f0 = fSum / (nLineEnd - nLinestart + 1.0);
+
+        c0[iVar - 1] = f0;
+
+        for (int iLine = 0; iLine <= nLineEnd - nLinestart; ++ iLine)
+        {
+            f[iLine] = aeroForce[iLine + nLinestart][iVar] - f0;
+        }
+        f[0] = half * (f[0] + f[nLineEnd - nLinestart]);
+        f[nLineEnd - nLinestart] = f[0];
+    }
+
+    void Identify::GetIntegral2ndOrder(int iVar, RDouble *f, RDouble &sum1, RDouble &sum2)
+    {
+        sum1 = 0.0;
+        sum2 = 0.0;
+        int nbeg = 0;
+        RDouble *f1= new RDouble[nLineEnd - nLinestart + 1]();
+        RDouble *f2= new RDouble[nLineEnd - nLinestart + 1]();
+
+        RDouble ddt = nwStep * physicalTimeStep;
+
+        for (int m = 0; m <= nLineEnd - nLinestart; m ++)
+        {
+            int n = int(aeroForce[m + nLinestart][0]) + nbeg;
+            RDouble kt = 2.0 * n * reduceFrequency * physicalTimeStep;
+
+            f1[m] = f[m] * sin(kt);
+            f2[m] = f[m] * cos(kt);
+        }
+
+        for (int m = 1; m < nLineEnd - nLinestart; m ++)
+        {
+            sum1 += f1[m];
+            sum2 += f2[m];
+        }
+
+        sum1 = ddt * (half * (f1[0] + f1[nLineEnd - nLinestart]) + sum1);
+        sum2 = ddt * (half * (f2[0] + f2[nLineEnd - nLinestart]) + sum2);
+        delete [] f1;    f1 = NULL;
+        delete [] f2;    f2 = NULL;
+    }
+
+    void Identify::GetIntegral4thOrder(int iVar, RDouble *f, RDouble &sum1, RDouble &sum2)
+    {
+        sum1 = 0.0;
+        sum2 = 0.0;
+        int nbeg = 0;
+        RDouble *f1= new RDouble[nLineEnd - nLinestart + 1]();
+        RDouble *f2= new RDouble[nLineEnd - nLinestart + 1]();
+
+        RDouble ddt = nwStep * physicalTimeStep;
+        int nMiddle = static_cast<int>((nLineEnd - nLinestart)) / 2;
+
+        for (int m = 0; m < nMiddle; ++ m)
+        {
+            int j = 2 * m + 1;
+            int n = int(aeroForce[j + nLinestart][0]) + nbeg;
+            RDouble kt = 2.0 * n * reduceFrequency * physicalTimeStep;
+
+            f1[j] = 4.0 * f[j] * sin(kt);
+            f2[j] = 4.0 * f[j] * cos(kt);
+
+            j = j + 1;
+            n = int(aeroForce[j + nLinestart][0]) + nbeg;
+            kt = 2.0 * n * reduceFrequency * physicalTimeStep;
+
+            f1[j] = 2.0 * f[j] * sin(kt);
+            f2[j] = 2.0 * f[j] * cos(kt);
+        }
+
+        for (int m = 0; m <= nLineEnd - nLinestart; m += static_cast<int>(nLineEnd - nLinestart))
+        {
+            int n = int(aeroForce[m + nLinestart][0]) + nbeg;
+            RDouble kt = 2.0 * n * reduceFrequency * physicalTimeStep;
+
+            f1[m] = f[m] * sin(kt);
+            f2[m] = f[m] * cos(kt);
+        }
+
+        for (int m = 0; m <= nLineEnd - nLinestart; m ++)
+        {
+            sum1 += f1[m];
+            sum2 += f2[m];
+        }
+
+        sum1 = ddt/3.0*sum1;
+        sum2 = ddt/3.0*sum2;
+        delete [] f1;    f1 = NULL;
+        delete [] f2;    f2 = NULL;
+    }
+
+    void Identify::GetNumberOfCycle()
+    {
+        int totalCycle = nDataLine / nLineOneCycle;
+        int startCycle = 0;
+        if(totalCycle > 2)
+        {
+            nCycle = totalCycle - 1;
+            startCycle = 1;
+        }
+        else if (totalCycle < 1)
+        {
+            nCycle = 0;
+            TK_Exit::ExceptionExit("Error: The data number is less than one cycle! \n");
+        }
+        else
+        {
+            nCycle = 1;
+        }
+    
+        nLinestart = nDataLine - nCycle * nLineOneCycle;
+        nLineEnd   = nDataLine - 1;
+    }
+
+    void Identify::DumpResults()
+    {
+        string derivativeFileName = "results/identify.dat";
+        if (GlobalDataBase::IsExist("derivativeFileName", PHSTRING, 1))
+        {
+            derivativeFileName = GlobalDataBase::GetStrParaFromDB("derivativeFileName");
+        }
+        int integralOrder = 4;
+        if (GlobalDataBase::IsExist("derivativeFileName", PHSTRING, 1))
+        {
+            integralOrder = GlobalDataBase::GetIntParaFromDB("integralOrder");
+        }
+        string forceFile = GlobalDataBase::GetStrParaFromDB("aircoeffile");
+        amplitude = PHSPACE::GetRDoubleParameterFromDataBase(0, "amplitude");
+        reduceFrequency = PHSPACE::GetRDoubleParameterFromDataBase(0, "reduceFrequency");
+        lenthReference  = GlobalDataBase::GetDoubleParaFromDB("forceReferenceLength");
+        physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+        fstream file;
+        file.open(derivativeFileName.c_str(), ios_base::out | ios_base::trunc);
+
+        int wordWidth = 16;
+        int floatNumber = 4;
+        ostringstream oss;
+        oss << setprecision(floatNumber);
+        oss << setiosflags(ios::right);
+        oss << setiosflags(ios::scientific);
+
+        //if (PHSPACE::IfFileEmpty(file))
+        {
+            oss << "Static and damping derivatives identified result." << "\n";
+            oss << "\n";
+            oss << setw(wordWidth) << "Data file:" << "\t" << forceFile.c_str() << "\n";
+
+            oss << setw(wordWidth) << "Frequency:"  << "\t" << reduceFrequency << "\n";
+            oss << setw(wordWidth) << "Amplitude:"  << "\t" << amplitude << "\n";
+            oss << setw(wordWidth) << "Timestep:"   << "\t" << physicalTimeStep << "\n";
+            oss << setw(wordWidth) << "LenthRef:"   << "\t" << lenthReference << "\n";
+            oss << setw(wordWidth) << "Cycles used:" << "\t" << nCycle << "\n";
+            oss << setw(wordWidth) << "Integral Order:" << "\t" << integralOrder << "\n";
+            oss << "\n";
+
+            oss << setw(wordWidth) << "Parameter";
+            oss << setw(wordWidth) << "Average";
+            oss << setw(wordWidth) << "dynamic_zero";
+            oss << setw(wordWidth) << "dynamic_1st";
+            oss << "\n";
+            for (int iVar = 0; iVar < nIdentifyVar; ++ iVar)
+            {
+                oss << setw(wordWidth) << nameList[iVar];
+                oss << setw(wordWidth) << c0[iVar];
+                oss << setw(wordWidth) << c1[iVar];
+                oss << setw(wordWidth) << c2[iVar];
+                oss << "\n";
+            }
+
+            PHSPACE::WriteASCIIFile(file, oss.str());
+
+            file.close();
+            file.clear();
+
+        }
+    }
+
+    void Identify::DumpHysteresisData()
+    {
+        string hysteresisFileName = "results/force_beta.plt";
+        if (GlobalDataBase::IsExist("hysteresisFileName", PHSTRING, 1))
+        {
+            hysteresisFileName = GlobalDataBase::GetStrParaFromDB("hysteresisFileName");
+        }
+        RDouble amp = PHSPACE::GetRDoubleParameterFromDataBase(0, "amplitude");
+        RDouble frequency = PHSPACE::GetRDoubleParameterFromDataBase(0, "reduceFrequency");
+        RDouble timeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+        fstream file;
+        file.open(hysteresisFileName.c_str(), ios_base::out | ios_base::trunc);
+
+        int wordWidth = 16;
+        int floatNumber = 6;
+        ostringstream oss;
+        oss << setprecision(floatNumber);
+        oss << setiosflags(ios::right);
+        oss << setiosflags(ios::scientific);
+
+        oss << "variables = beta, cfx, cfy, cfz, cmx, cmy, cmz" << "\n";
+        for (int iLine = 0; iLine < nDataLine; ++ iLine)
+        {
+            RDouble beta = -amp * sin(2.0 * aeroForce[iLine][0] * frequency * timeStep);
+            oss << setw(wordWidth) << beta;
+            for (int iVar = 1; iVar <= 6; ++ iVar)
+            {
+                oss << setw(wordWidth) << aeroForce[iLine][iVar];
+            }
+            oss << "\n";
+        }
+
+        PHSPACE::WriteASCIIFile(file, oss.str());
+
+        file.close();
+        file.clear();
+    }
+}
diff --git a/API/PostProcess/src/Post_Probes.cpp b/API/PostProcess/src/Post_Probes.cpp
new file mode 100644
index 0000000..2a5ae76
--- /dev/null
+++ b/API/PostProcess/src/Post_Probes.cpp
@@ -0,0 +1,1470 @@
+#include "Post_Probes.h"
+#include "TK_Exit.h"
+#include "Pointer.h"
+#include "IO_FileName.h"
+#include "PHIO.h"
+#include "Constants.h"
+#include "Glb_Dimension.h"
+#include "TK_Log.h"
+#include "TK_Time.h"
+#include "Gas.h"
+
+using namespace std;
+namespace PHSPACE
+{
+LIB_EXPORT Post_Probes::Post_Probes(int nProbeVariables_in, int *probeVariables_in, Grid *grid_in)
+{
+    probesVariablesMap.insert(pair<int, string>(PROBE_DENSITY    , "density"));
+    probesVariablesMap.insert(pair<int, string>(PROBE_U          , "u"));
+    probesVariablesMap.insert(pair<int, string>(PROBE_V          , "v"));
+    probesVariablesMap.insert(pair<int, string>(PROBE_W          , "w"));
+    probesVariablesMap.insert(pair<int, string>(PROBE_PRESSURE   , "pressure"));
+    probesVariablesMap.insert(pair<int, string>(PROBE_TEMPERATURE, "temperature"));
+    probesVariablesMap.insert(pair<int, string>(PROBE_MACH, "mach"));
+    probesVariablesMap.insert(pair<int, string>(PROBE_DIMENSIONAL_DENSITY,     "density_Dim"));
+    probesVariablesMap.insert(pair<int, string>(PROBE_DIMENSIONAL_U      ,     "u_Dim"));
+    probesVariablesMap.insert(pair<int, string>(PROBE_DIMENSIONAL_V      ,     "v_Dim"));
+    probesVariablesMap.insert(pair<int, string>(PROBE_DIMENSIONAL_W      ,     "w_Dim"));
+    probesVariablesMap.insert(pair<int, string>(PROBE_VELOCITY_MAGNITUDE ,     "Vmag_Dim"));
+    probesVariablesMap.insert(pair<int, string>(PROBE_DIMENSIONAL_PRESSURE,    "pressure_Dim"));
+    probesVariablesMap.insert(pair<int, string>(PROBE_DIMENSIONAL_TEMPERATURE, "temperature_Dim"));
+    probesVariablesMap.insert(pair<int, string>(PROBE_VISCOSITY_LAMINAR  , "viscosityLaminar"));
+    probesVariablesMap.insert(pair<int, string>(PROBE_VISCOSITY_TURBULENT, "viscosityTurbulence"));
+    probesVariablesMap.insert(pair<int, string>(PROBE_MODELED_TKE        , "modeledTKE"));
+    probesVariablesMap.insert(pair<int, string>(PROBE_MODELED_DISSIPATION, "modeleddissipationrate"));
+
+    nProbeVariables = nProbeVariables_in;
+    int nCount = 0;
+    for (int iVar = 0; iVar < nProbeVariables; ++ iVar)
+    {
+        int varTemp = probeVariables_in[iVar];
+        if (probesVariablesMap.find(varTemp) == probesVariablesMap.end())
+        {
+            continue;
+        }
+        probeVariables.insert(varTemp);
+        ++ nCount;
+    }
+    nProbeVariables = nCount;
+
+    probeVariablesPtr = new Data_Field();
+
+    this->grid = grid_in;
+
+    if (grid_in)
+    {
+        gridType = grid_in->Type();
+    }
+    else
+    {
+        gridType = -1;
+    }
+}
+
+LIB_EXPORT Post_Probes::~Post_Probes()
+{
+    FreeAllProbeVarPtr();
+    delete probeVariablesPtr;
+}
+
+LIB_EXPORT void Post_Probes::GetASCIIFileHeader(vector<string> &title_tecplot)
+{
+    if (nProbeVariables <= 0) return;
+    int dataMonitorType = GlobalDataBase::GetIntParaFromDB("dataMonitorType");
+
+    if (dataMonitorType == PROBESMONITOR)
+    {
+        GetProbesASCIIFileHeader(title_tecplot);
+    }
+    else if (dataMonitorType == LINESMONITOR || dataMonitorType == SURFACESMONITOR)
+    {
+        GetLinesOrSurfacesASCIIFileHeader(title_tecplot);
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("dataMonitorType", dataMonitorType);
+    }
+}
+
+LIB_EXPORT void Post_Probes::GetProbesASCIIFileHeader(vector<string> &title_tecplot)
+{
+    int samplefileMode = GlobalDataBase::GetIntParaFromDB("samplefileMode");
+    ostringstream oss;
+    oss << "title = \"Probes Flow Fields Data of PHengLEI\"" << endl;
+    oss << "Variables =" << endl;
+    oss << "\"iter\"" << endl;
+
+    if (samplefileMode != 0)
+    {
+        oss << "\"x\"" << endl;
+        oss << "\"y\"" << endl;
+        oss << "\"z\"" << endl;
+    }
+
+    set<int>::iterator varIter;
+    for (varIter = probeVariables.begin(); varIter != probeVariables.end(); ++ varIter)
+    {
+        int variableType = *varIter;
+        string varName = probesVariablesMap[variableType];
+        string varNameTemp = "\"" + varName + "\"";
+        oss << varNameTemp << endl;
+    }
+    //! Chemical species must be the last!
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        //! Chemical turned on.
+        using namespace GAS_SPACE;
+        int nm    = GlobalDataBase::GetIntParaFromDB("nm");
+        int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+        int neqn  = nl + nchem;
+
+        string *varname = gas->GetNameOfSpecies();
+        for (int m = nm; m < neqn; ++ m)
+        {
+            string varName = "massfraction-" + varname[m-nm];
+            string species_name = "\"" + varName + "\"";
+            oss << species_name << endl;
+        }
+        for (int m = nm; m < neqn; ++ m)
+        {
+            string varName = "molefraction-" + varname[m-nm];
+            string species_name = "\"" + varName + "\"";
+            oss << species_name << endl;
+        }
+    }
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady)
+    {
+        oss << "\"physicalTime\"" << endl;
+    }
+    title_tecplot.push_back(oss.str());
+    return;
+}
+
+LIB_EXPORT void Post_Probes::GetLinesOrSurfacesASCIIFileHeader(vector<string> &title_tecplot)
+{
+    ostringstream oss;
+    oss << "title = \"Probes Flow Fields Data of PHengLEI\"" << endl;
+    oss << "Variables =" << endl;
+    oss << "\"iter\"" << endl;
+    oss << "\"x\"" << endl;
+    oss << "\"y\"" << endl;
+    oss << "\"z\"" << endl;
+    set<int>::iterator varIter;
+    for (varIter = probeVariables.begin(); varIter != probeVariables.end(); ++ varIter)
+    {
+        int variableType = *varIter;
+        string varName = probesVariablesMap[variableType];
+        string varNameTemp = "\"" + varName + "\"";
+        oss << varNameTemp << endl;
+    }
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady)
+    {
+        oss << "\"physicalTime\"" << endl;
+    }
+    title_tecplot.push_back(oss.str());
+    return;
+}
+
+LIB_EXPORT void Post_Probes::UpdateProbesVarPtr(const string &name, RDouble *cellCenterData)
+{
+    if (!grid)
+    {
+        TK_Exit::ExceptionExit("Post_Probe::UpdateProbesVarPtr needs Geometry infomation.");
+    }
+
+    int probeVariablesInterpolationMethod = GlobalDataBase::GetIntParaFromDB("probeVariablesInterpolationMethod");
+
+    if (probeVariablesInterpolationMethod == CELLVALUE)
+    {
+        UpdateProbesVarPtrM1(name, cellCenterData);
+    }
+    else if (probeVariablesInterpolationMethod == CELLSTOPROBE)
+    {
+        UpdateProbesVarPtrM2(name, cellCenterData);
+    }
+    else if (probeVariablesInterpolationMethod == NODESTOPROBE)
+    {
+        UpdateProbesVarPtrM3(name, cellCenterData);
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("probeVariablesInterpolationMethod", probeVariablesInterpolationMethod);
+    }
+}
+
+LIB_EXPORT void Post_Probes::UpdateProbesVarPtrM1(const string &name, RDouble *cellCenterData)
+{
+    UnstructGrid *unstructGrid = UnstructGridCast(grid);
+    int probesLocalNumber = unstructGrid->GetZoneProbesNumber();
+    if (probesLocalNumber == 0) return;
+
+    vector<int> probesCellID = unstructGrid->GetZoneProbesCellID();
+
+    RDouble *q_probes = new RDouble [probesLocalNumber];
+    SetField(q_probes, 0.0, probesLocalNumber);
+
+    for (int iProbe = 0; iProbe < probesLocalNumber; ++ iProbe)
+    {
+        int probeCell = probesCellID[iProbe];
+        q_probes[iProbe] = cellCenterData[probeCell];
+    }
+    probeVariablesPtr->UpdateDataPtr(name, q_probes);
+}
+
+LIB_EXPORT void Post_Probes::UpdateProbesVarPtrM2(const string &name, RDouble *cellCenterData)
+{
+    UnstructGrid *unstructGrid = UnstructGridCast(grid);
+    int nBoundFace = unstructGrid->GetNBoundFace();
+    int nTotalCell = unstructGrid->GetNTotalCell();
+    int **cell2face = unstructGrid->GetCell2Face();
+    int *faceNumberOfEachCell = unstructGrid->GetFaceNumberOfEachCell();
+
+    int probesLocalNumber = unstructGrid->GetZoneProbesNumber();
+    if (probesLocalNumber == 0) return;
+
+    vector<int> *cell2Cell = unstructGrid->GetCell2Cell();
+    vector<int> probesCellID = unstructGrid->GetZoneProbesCellID();
+
+    RDouble *q_probes = new RDouble [probesLocalNumber];
+    SetField(q_probes, 0.0, probesLocalNumber);
+
+    for (int iProbe = 0; iProbe < probesLocalNumber; ++ iProbe)
+    {
+        vector<int> interpolationCellsID;
+        vector<RDouble> numerator;
+
+        int probeCell = probesCellID[iProbe];
+        NecessaryVarForInterpolation(unstructGrid, iProbe, probeCell, numerator,interpolationCellsID, true);
+
+        int nNeighbor = static_cast<int>(cell2Cell[probeCell].size());
+        for (int iNeighbor = 0; iNeighbor < nNeighbor; ++ iNeighbor)
+        {
+            int neighborCell = cell2Cell[probeCell][iNeighbor];
+            NecessaryVarForInterpolation(unstructGrid, iProbe, neighborCell, numerator,interpolationCellsID, true);
+        }
+
+        for (int iFace = 0; iFace < faceNumberOfEachCell[probeCell]; ++ iFace)
+        {
+            int faceID = cell2face[probeCell][iFace];
+
+            if (faceID < nBoundFace)
+            {
+                int neighborGhostCell = faceID + nTotalCell;
+                NecessaryVarForInterpolation(unstructGrid, iProbe, neighborGhostCell, numerator,interpolationCellsID, true);
+            }
+        }
+
+        int nCells = static_cast<int>(interpolationCellsID.size());
+        RDouble denominator = SUMMARY(numerator, nCells);
+
+        for (int iCell = 0; iCell < nCells; ++ iCell)
+        {
+            RDouble weightCoef = numerator[iCell] / denominator;
+            int cellID = interpolationCellsID[iCell];
+            q_probes[iProbe] += cellCenterData[cellID] * weightCoef;
+        }
+    }
+    probeVariablesPtr->UpdateDataPtr(name, q_probes);
+}
+
+LIB_EXPORT void Post_Probes::UpdateProbesVarPtrM3(const string &name, RDouble *cellCenterData)
+{
+    UnstructGrid *unstructGrid = UnstructGridCast(grid);
+    int probesLocalNumber = unstructGrid->GetZoneProbesNumber();
+    if (probesLocalNumber == 0) return;
+
+    int nTotalNode = unstructGrid->GetNTotalNode();
+    int **cell2Node = unstructGrid->GetCell2NodeArray();
+    int *nodeNumberOfEachCell = unstructGrid->GetNodeNumberOfEachCell();
+
+    RDouble *qn = new RDouble [nTotalNode];
+    CompNodeVar(unstructGrid, qn, cellCenterData);
+
+    vector<int> probesCellID = unstructGrid->GetZoneProbesCellID();
+
+    RDouble *q_probes = new RDouble [probesLocalNumber];
+    SetField(q_probes, 0.0, probesLocalNumber);
+
+    for (int iProbe = 0; iProbe < probesLocalNumber; ++ iProbe)
+    {
+        vector<int> interpolationNodesID;
+        vector<RDouble> numerator;
+
+        int probeCell = probesCellID[iProbe];
+
+        for (int iNode = 0; iNode < nodeNumberOfEachCell[probeCell]; ++ iNode)
+        {
+            int node = cell2Node[probeCell][iNode];
+            NecessaryVarForInterpolation(unstructGrid, iProbe, node, numerator, interpolationNodesID, false);
+        }
+
+        int nNodes = static_cast<int>(interpolationNodesID.size());
+        RDouble denominator = SUMMARY(numerator, nNodes);
+
+        for (int iNode = 0; iNode < nNodes; ++ iNode)
+        {
+            RDouble weightCoef = numerator[iNode] / denominator;
+            int nodeID = interpolationNodesID[iNode];
+            q_probes[iProbe] += qn[nodeID] * weightCoef;
+        }
+    }
+
+    probeVariablesPtr->UpdateDataPtr(name, q_probes);
+
+    delete [] qn;
+}
+
+LIB_EXPORT void Post_Probes::UpdateProbesVarPtr(const string &name, RDouble4D &cellCenterData, int index)
+{
+    if (!grid)
+    {
+        TK_Exit::ExceptionExit("Post_Probe::UpdateProbesVarPtr needs Geometry infomation.");
+    }
+
+    int probeVariablesInterpolationMethod = GlobalDataBase::GetIntParaFromDB("probeVariablesInterpolationMethod");
+
+    if (probeVariablesInterpolationMethod == CELLVALUE)
+    {
+        UpdateProbesVarPtrM1(name, cellCenterData, index);
+    }
+    else if (probeVariablesInterpolationMethod == CELLSTOPROBE)
+    {
+        UpdateProbesVarPtrM2(name, cellCenterData, index);
+    }
+    else if (probeVariablesInterpolationMethod == NODESTOPROBE)
+    {
+        UpdateProbesVarPtrM3(name, cellCenterData, index);
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("probeVariablesInterpolationMethod", probeVariablesInterpolationMethod);
+    }
+}
+
+LIB_EXPORT void Post_Probes::UpdateProbesVarPtrM1(const string &name, RDouble4D &cellCenterData, int index)
+{
+    StructGrid *structGrid = StructGridCast(grid);
+
+    int probesLocalNumber = structGrid->GetZoneProbesNumber();
+    if (probesLocalNumber == 0) return;
+
+    vector<int> probesCellNI = structGrid->GetZoneProbesCellNI();
+    vector<int> probesCellNJ = structGrid->GetZoneProbesCellNJ();
+    vector<int> probesCellNK = structGrid->GetZoneProbesCellNK();
+
+    RDouble *q_probes = new RDouble [probesLocalNumber];
+    SetField(q_probes, 0.0, probesLocalNumber);
+
+    for (int iProbe = 0; iProbe < probesLocalNumber; ++ iProbe)
+    {
+        int probeNI = probesCellNI[iProbe];
+        int probeNJ = probesCellNJ[iProbe];
+        int probeNK = probesCellNK[iProbe];
+        q_probes[iProbe] = cellCenterData(probeNI, probeNJ, probeNK, index);
+    }
+
+    probeVariablesPtr->UpdateDataPtr(name, q_probes);
+}
+
+LIB_EXPORT void Post_Probes::UpdateProbesVarPtrM2(const string &name, RDouble4D &cellCenterData, int index)
+{
+    StructGrid *structGrid = StructGridCast(grid);
+
+    int probesLocalNumber = structGrid->GetZoneProbesNumber();
+    if (probesLocalNumber == 0) return;
+
+    vector<int> probesCellNI = structGrid->GetZoneProbesCellNI();
+    vector<int> probesCellNJ = structGrid->GetZoneProbesCellNJ();
+    vector<int> probesCellNK = structGrid->GetZoneProbesCellNK();
+
+    RDouble *q_probes = new RDouble [probesLocalNumber];
+    SetField(q_probes, 0.0, probesLocalNumber);
+
+    int nDim = GetDim();
+
+    for (int iProbe = 0; iProbe < probesLocalNumber; ++ iProbe)
+    {
+        vector<vector<int> > interpolationCellsID;
+        vector<RDouble> numerator;
+
+        int probeNI = probesCellNI[iProbe];
+        int probeNJ = probesCellNJ[iProbe];
+        int probeNK = probesCellNK[iProbe];
+
+        NecessaryVarForInterpolation(structGrid, iProbe, probeNI, probeNJ, probeNK, numerator, interpolationCellsID, true);
+
+        for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+        {
+            int i1, j1, k1;
+            GetNsurfIndex(iSurface, i1, j1, k1);
+
+            int il = probeNI - i1;
+            int jl = probeNJ - j1;
+            int kl = probeNK - k1;
+
+            int ir = probeNI + i1;
+            int jr = probeNJ + j1;
+            int kr = probeNK + k1;
+
+            NecessaryVarForInterpolation(structGrid, iProbe, il, jl, kl, numerator, interpolationCellsID, true);
+            NecessaryVarForInterpolation(structGrid, iProbe, ir, jr, kr, numerator, interpolationCellsID, true);
+        }
+
+        int nCells = static_cast<int>(interpolationCellsID.size());
+        RDouble denominator = SUMMARY(numerator, nCells);
+
+        for (int iCell = 0; iCell < nCells; ++ iCell)
+        {
+            RDouble weightCoef = numerator[iCell] / denominator;
+            int cellID_i = interpolationCellsID[iCell][0];
+            int cellID_j = interpolationCellsID[iCell][1];
+            int cellID_k = interpolationCellsID[iCell][2];
+            q_probes[iProbe] += cellCenterData(cellID_i, cellID_j, cellID_k, index) * weightCoef;
+        }
+    }
+
+    probeVariablesPtr->UpdateDataPtr(name, q_probes);
+}
+
+LIB_EXPORT void Post_Probes::UpdateProbesVarPtrM3(const string &name, RDouble4D &cellCenterData, int index)
+{
+    StructGrid *structGrid = StructGridCast(grid);
+
+    int probesLocalNumber = structGrid->GetZoneProbesNumber();
+    if (probesLocalNumber == 0) return;
+
+    int ni = structGrid->GetNI();
+    int nj = structGrid->GetNJ();
+    int nk = structGrid->GetNK();
+
+    Range I(-1, ni+1);
+    Range J(-1, nj+1);
+    Range K(-1, nk+1);
+    if (nk == 1) K.setRange(1, 1);
+    Range M(0, 0);
+
+    RDouble4D *qn = new RDouble4D(I, J, K, M, fortranArray);
+    CompNodeVar(structGrid, *qn, 0, cellCenterData, index);
+
+    vector<int> probesCellNI = structGrid->GetZoneProbesCellNI();
+    vector<int> probesCellNJ = structGrid->GetZoneProbesCellNJ();
+    vector<int> probesCellNK = structGrid->GetZoneProbesCellNK();
+
+    RDouble *q_probes = new RDouble [probesLocalNumber];
+    SetField(q_probes, 0.0, probesLocalNumber);
+
+    int i1 = 1;
+    int j1 = 1;
+    int k1 = 1;
+    if (nk == 1) k1 = 0;
+
+    for (int iProbe = 0; iProbe < probesLocalNumber; ++ iProbe)
+    {
+        vector<vector<int> > interpolationNodesID;
+        vector<RDouble> numerator;
+
+        int probeNI = probesCellNI[iProbe];
+        int probeNJ = probesCellNJ[iProbe];
+        int probeNK = probesCellNK[iProbe];
+
+        for (int k = probeNK; k <= probeNK + k1; ++ k)
+        {
+            for (int j = probeNJ; j <= probeNJ + j1; ++ j)
+            {
+                for (int i = probeNI; i <= probeNI + i1; ++ i)
+                {
+                    NecessaryVarForInterpolation(structGrid, iProbe, i, j, k, numerator, interpolationNodesID, false);
+                }
+            }
+        }
+
+        int nNodes = static_cast<int>(interpolationNodesID.size());
+        RDouble denominator = SUMMARY(numerator, nNodes);
+
+        for (int iNode = 0; iNode < nNodes; ++ iNode)
+        {
+            RDouble weightCoef = numerator[iNode] / denominator;
+            int nodeID_i = interpolationNodesID[iNode][0];
+            int nodeID_j = interpolationNodesID[iNode][1];
+            int nodeID_k = interpolationNodesID[iNode][2];
+            q_probes[iProbe] += (*qn)(nodeID_i, nodeID_j, nodeID_k, 0) * weightCoef;
+        }
+    }
+
+    probeVariablesPtr->UpdateDataPtr(name, q_probes);
+    delete qn;
+}
+
+LIB_EXPORT void Post_Probes::NecessaryVarForInterpolation(UnstructGrid *grid, int iprobe, int index, vector<RDouble> &numerator, vector<int> &interpolationIndexs, bool flag)
+{
+    vector<vector<RDouble> > probesCoordinates = grid->GetZoneProbesCoordinates();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    RDouble *xn = grid->GetX();
+    RDouble *yn = grid->GetY();
+    RDouble *zn = grid->GetZ();
+
+    RDouble distance = 0;
+    RDouble odistance = 0;
+
+    //! The range of r is from 0.5 to 3.0.
+    const int r = 1;
+
+    if (flag)
+    {
+        distance = DISTANCE(xcc[index] - probesCoordinates[iprobe][0], ycc[index] - probesCoordinates[iprobe][1], zcc[index] - probesCoordinates[iprobe][2]) + TINY;
+    }
+    else
+    {
+        distance = DISTANCE(xn[index] - probesCoordinates[iprobe][0], yn[index] - probesCoordinates[iprobe][1], zn[index] - probesCoordinates[iprobe][2]) + TINY;
+    }
+
+    odistance = pow(1.0 / distance, r);
+    numerator.push_back(odistance);
+    interpolationIndexs.push_back(index);
+}
+
+LIB_EXPORT void Post_Probes::NecessaryVarForInterpolation(StructGrid *grid, int iprobe, int i, int j, int k, vector<RDouble> &numerator, vector<vector<int> > &interpolationIndexs, bool flag)
+{
+    vector<vector<RDouble> > probesCoordinates = grid->GetZoneProbesCoordinates();
+    RDouble3D &xcc = *(grid->GetCellCenterX());
+    RDouble3D &ycc = *(grid->GetCellCenterY());
+    RDouble3D &zcc = *(grid->GetCellCenterZ());
+
+    RDouble3D &xn = * grid->GetStructX();
+    RDouble3D &yn = * grid->GetStructY();
+    RDouble3D &zn = * grid->GetStructZ();
+
+    RDouble distance = 0;
+    RDouble odistance = 0;
+    vector<int> index;
+
+    //! The range of r is from 0.5 to 3.0.
+    const int r = 1;
+
+    if (flag)
+    {
+        distance = DISTANCE(xcc(i, j, k) - probesCoordinates[iprobe][0], ycc(i, j, k) - probesCoordinates[iprobe][1], zcc(i, j, k) - probesCoordinates[iprobe][2]) + TINY;
+    }
+    else
+    {
+        distance = DISTANCE(xn(i, j, k) - probesCoordinates[iprobe][0], yn(i, j, k) - probesCoordinates[iprobe][1], zn(i, j, k) - probesCoordinates[iprobe][2]) + TINY;
+    }
+
+    odistance = pow(1.0 / distance, r);
+    numerator.push_back(odistance);
+    index.push_back(i);
+    index.push_back(j);
+    index.push_back(k);
+    interpolationIndexs.push_back(index);
+    index.resize(0);
+}
+
+LIB_EXPORT void Post_Probes::GetAllProbesVarPtr(RDouble **q_probes)
+{
+    int varCount = 0;
+
+    for (set<int>::iterator varIter = probeVariables.begin(); varIter != probeVariables.end(); ++ varIter)
+    {
+        int variableType = *varIter;
+        string varName = GetProbesVariableName(variableType);
+        q_probes[varCount ++] = (RDouble *)GetProbeVarPtr(varName);
+    }
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        using namespace GAS_SPACE;
+
+        int nm    = GlobalDataBase::GetIntParaFromDB("nm");
+        int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+        int neqn  = nl + nchem;
+
+        string *varname = gas->GetNameOfSpecies();
+        for (int m = nm; m < neqn; ++ m)
+        {
+            string varName = "massfraction-" + varname[m-nm];
+            q_probes[varCount++] = (RDouble *)GetProbeVarPtr(varName);
+        }
+        for (int m = nm; m < neqn; ++ m)
+        {
+            string varName = "molefraction-" + varname[m-nm];
+            q_probes[varCount++] = (RDouble *)GetProbeVarPtr(varName);
+        }
+    }
+}
+
+void Post_Probes::FreeAllProbeVarPtr()
+{
+    for (set<int>::iterator varIter = probeVariables.begin(); varIter != probeVariables.end(); ++ varIter)
+    {
+        int variableType = *varIter;
+        string varName = GetProbesVariableName(variableType);
+        RDouble *q_probes = (RDouble *)GetProbeVarPtr(varName);
+        if (q_probes)
+        {
+            delete [] q_probes;
+        }
+    }
+}
+
+DumpToFileASCII::DumpToFileASCII(vector<DataContainer *> datalist_in, string filename_in)
+{
+    this->dataList = datalist_in;
+    this->fileName = filename_in;
+
+    for (unsigned int iZone = 0; iZone < dataList.size(); ++ iZone)
+    {
+        dataList[iZone]->moveto_begin();
+    }
+    nVariables = 0;
+}
+
+DumpToFileASCII::~DumpToFileASCII()
+{
+
+}
+
+void DumpToFileASCII::InitProbesVariables()
+{
+    int nProbeVariables = 6;
+    int probeVariables[100] = {0, 1, 2, 3, 4, 5};
+    nProbeVariables = GlobalDataBase::GetIntParaFromDB("nProbeVariables");
+    GlobalDataBase::GetData("probeVariables", probeVariables, PHINT, nProbeVariables);
+
+    Post_Probes *postProbes = new Post_Probes(nProbeVariables, probeVariables);
+
+    int nVariablesToDump = postProbes->GetNumberofProbeVariables();
+
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        using namespace GAS_SPACE;
+
+        int nm    = GlobalDataBase::GetIntParaFromDB("nm");
+        int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+        int neqn  = nl + nchem;
+
+        nVariablesToDump = nVariablesToDump + 2 * (neqn - nm);
+    }
+    SetnVariablesToDump(nVariablesToDump);
+
+    vector<string> title_tecplot;
+    postProbes->GetASCIIFileHeader(title_tecplot);
+    SetVariables(title_tecplot.front());
+
+    FreePointer(postProbes);
+}
+
+void DumpToFileASCII::Run()
+{
+    InitProbesVariables();
+    WriteFlowFile();
+}
+
+void DumpToFileASCII::WriteFlowFile()
+{
+    int dataMonitorType = GlobalDataBase::GetIntParaFromDB("dataMonitorType");
+    int samplefileMode = GlobalDataBase::GetIntParaFromDB("samplefileMode");
+    int outerStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    if (dataMonitorType == PROBESMONITOR)
+    {
+        if (samplefileMode != 0)
+        {
+            WriteProbesFlowFile(outerStep);
+        }
+        else
+        {
+            WriteProbesFlowFile();
+        }
+    }
+    else if (dataMonitorType == LINESMONITOR)
+    {
+        if (samplefileMode != 0)
+        {
+            WriteLinesFlowFile(outerStep);
+        }
+        else
+        {
+            WriteLinesFlowFile();
+        }
+    }
+    else if (dataMonitorType == SURFACESMONITOR)
+    {
+        if (samplefileMode != 0)
+        {
+            WriteSurfacesFlowFile(outerStep);
+        }
+        else
+        {
+            WriteSurfacesFlowFile();
+        }
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("dataMonitorType", dataMonitorType);
+    }
+}
+
+void DumpToFileASCII::WriteProbesFlowFile()
+{
+    uint_t nzones = dataList.size();
+
+    for (int iZone = 0; iZone < nzones; ++ iZone)
+    {
+        DataContainer *cdata = dataList[iZone];
+
+        int probesLocalNumber;
+        PHRead(cdata, &probesLocalNumber, 1);
+
+        if (probesLocalNumber == 0) continue;
+
+        vector<vector<RDouble> > probesCoordinates;
+        vector<int> probesGlobalID, probesLineID, probesSurfaceID;
+        probesCoordinates.resize(probesLocalNumber);
+        probesGlobalID.resize(probesLocalNumber);
+        probesLineID.resize(probesLocalNumber);
+        probesSurfaceID.resize(probesLocalNumber);
+        int nDim;
+        RDouble **qProbes = NewPointer2<RDouble> (nVariables, probesLocalNumber);
+
+        for (int iProbe = 0; iProbe < probesLocalNumber; ++ iProbe)
+        {
+            if (GetFilename() == "")
+            {
+                return;
+            }
+            ostringstream ossFileName;
+            string finalFileName = GetFilename();
+
+            PHRead(cdata, &nDim, 1);
+            PHRead(cdata, &probesGlobalID[iProbe], 1);
+            PHRead(cdata, &probesLineID[iProbe], 1);
+            PHRead(cdata, &probesSurfaceID[iProbe], 1);
+            probesCoordinates[iProbe].resize(nDim);
+
+            for (int iDim = 0; iDim < nDim; ++ iDim)
+            {
+                PHRead(cdata, &probesCoordinates[iProbe][iDim], 1);
+                finalFileName = PHSPACE::AddSymbolToFileName(finalFileName, '_', probesCoordinates[iProbe][iDim]);
+            }
+
+            if (PHMPI::IsParallelRun())
+            {
+                int fileID = PHMPI::GetFileIndexofCurrentProcessor();
+                finalFileName = PHSPACE::AddSymbolToFileName(finalFileName, '_', fileID);
+            }
+
+            ossFileName << finalFileName;
+
+            string probesFlowFileName = ossFileName.str();
+            fstream probesFlowFile;
+            OpenFile(probesFlowFile, probesFlowFileName, ios_base::out|ios_base::app);
+            probesFlowFile << setiosflags(ios::left);
+            probesFlowFile << setiosflags(ios::scientific);
+            probesFlowFile << setprecision(10);
+
+            if (IfFileEmpty(probesFlowFile))
+            {
+                probesFlowFile << variables << endl;
+            }
+
+            int wordWidth = 8;
+
+            int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+            probesFlowFile << setw(wordWidth) << outIterStep << "	";
+
+            for (int iVariable = 0; iVariable < nVariables; ++ iVariable)
+            {
+                PHRead(cdata, qProbes[iVariable][iProbe]);
+                probesFlowFile << setw(wordWidth) << qProbes[iVariable][iProbe] << "	";
+            }
+
+            int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+            if (isUnsteady)
+            {
+                int outerStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("outnstep");
+                RDouble physicalTimeStepDimensional = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStepDimensional");
+                RDouble real_time = physicalTimeStepDimensional * outerStep;
+                probesFlowFile << setw(wordWidth) << real_time << endl;
+            }
+            else
+            {
+                probesFlowFile << endl;
+            }
+            CloseFile(probesFlowFile);
+        }
+
+        DelPointer2(qProbes);
+    }
+}
+
+void DumpToFileASCII::WriteLinesFlowFile()
+{
+    int nLines = GlobalDataBase::GetIntParaFromDB("nLines");
+    int *nProbesOfLine = reinterpret_cast< int * > (GlobalDataBase::GetDataPtr("nProbesOfLine"));
+    vector<vector<RDouble> > *probesReorderCoordinates = new vector<vector<RDouble> > [nLines];
+    vector<vector<RDouble> > *qGlobalProbes = new vector<vector<RDouble> > [nLines];
+
+    for (int iLine = 0; iLine < nLines; ++ iLine)
+    {
+        int nProbes = nProbesOfLine[iLine];
+        probesReorderCoordinates[iLine].resize(nProbes);
+        qGlobalProbes[iLine].resize(nProbes);
+    }
+
+    uint_t nzones = dataList.size();
+    for (int iZone = 0; iZone < nzones; ++ iZone)
+    {
+        DataContainer *cdata = dataList[iZone];
+
+        int probesLocalNumber;
+        PHRead(cdata, &probesLocalNumber, 1);
+
+        if (probesLocalNumber == 0) continue;
+
+        vector<vector<RDouble> > probesCoordinates;
+        vector<int> probesGlobalID, probesLineID, probesSurfaceID;
+        probesCoordinates.resize(probesLocalNumber);
+        probesGlobalID.resize(probesLocalNumber);
+        probesLineID.resize(probesLocalNumber);
+        probesSurfaceID.resize(probesLocalNumber);
+        int nDim;
+        RDouble **qProbes = NewPointer2<RDouble> (nVariables, probesLocalNumber);
+
+        for (int iProbe = 0; iProbe < probesLocalNumber; ++ iProbe)
+        {
+            PHRead(cdata, &nDim, 1);
+            PHRead(cdata, &probesGlobalID[iProbe], 1);
+            PHRead(cdata, &probesLineID[iProbe], 1);
+            PHRead(cdata, &probesSurfaceID[iProbe], 1);
+            probesCoordinates[iProbe].resize(nDim);
+
+            int iProbeLineID = probesLineID[iProbe];
+            int iProbeGlobalID = probesGlobalID[iProbe];
+            probesReorderCoordinates[iProbeLineID][iProbeGlobalID].resize(nDim);
+            qGlobalProbes[iProbeLineID][iProbeGlobalID].resize(nVariables);
+
+            for (int iDim = 0; iDim < nDim; ++ iDim)
+            {
+                PHRead(cdata, &probesCoordinates[iProbe][iDim], 1);
+                probesReorderCoordinates[iProbeLineID][iProbeGlobalID][iDim] = probesCoordinates[iProbe][iDim];
+            }
+
+            for (int iVariable = 0; iVariable < nVariables; ++ iVariable)
+            {
+                PHRead(cdata, qProbes[iVariable][iProbe]);
+                qGlobalProbes[iProbeLineID][iProbeGlobalID][iVariable] = qProbes[iVariable][iProbe];
+            }
+        }
+
+        DelPointer2(qProbes);
+    }
+
+    for (int iLine = 0; iLine < nLines; ++ iLine)
+    {
+        int nProbes = nProbesOfLine[iLine];
+
+        if (GetFilename() == "")
+        {
+            return;
+        }
+
+        ostringstream ossFileName;
+        string finalFileName = GetFilename();
+        finalFileName = PHSPACE::AddSymbolToFileName(finalFileName, "_", "line", iLine);
+
+        if (PHMPI::IsParallelRun())
+        {
+            int fileID = PHMPI::GetFileIndexofCurrentProcessor();
+            finalFileName = PHSPACE::AddSymbolToFileName(finalFileName, '_', fileID);
+        }
+
+        ossFileName << finalFileName;
+
+        string linesFlowFileName = ossFileName.str();
+        fstream linesFlowFile;
+        OpenFile(linesFlowFile, linesFlowFileName, ios_base::out|ios_base::app);
+        linesFlowFile << setiosflags(ios::left);
+        linesFlowFile << setiosflags(ios::scientific);
+        linesFlowFile << setprecision(10);
+
+        if (IfFileEmpty(linesFlowFile))
+        {
+            linesFlowFile << variables << endl;
+        }
+
+        int wordWidth = 8;
+
+        for (int iProbe = 0; iProbe < nProbes; ++ iProbe)
+        {
+            int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+            linesFlowFile << setw(wordWidth) << outIterStep << "	";
+
+            for (int iDim = 0; iDim < probesReorderCoordinates[iLine][iProbe].size(); ++ iDim)
+            {
+                linesFlowFile << setw(wordWidth) << probesReorderCoordinates[iLine][iProbe][iDim] << "	";
+            }
+
+            for (int iVariable = 0; iVariable < nVariables; ++ iVariable)
+            {
+                linesFlowFile << setw(wordWidth) << qGlobalProbes[iLine][iProbe][iVariable] << "	";
+            }
+
+            int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+            if (isUnsteady)
+            {
+                int outerStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("outnstep");
+                RDouble physicalTimeStepDimensional = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStepDimensional");
+                RDouble real_time = physicalTimeStepDimensional * outerStep;
+                linesFlowFile << setw(wordWidth) << real_time << endl;
+            }
+            else
+            {
+                linesFlowFile << endl;
+            }
+        }
+
+        CloseFile(linesFlowFile);
+    }
+
+    delete [] probesReorderCoordinates;
+    delete [] qGlobalProbes;
+    probesReorderCoordinates = NULL;
+    qGlobalProbes = NULL;
+}
+
+void DumpToFileASCII::WriteSurfacesFlowFile()
+{
+    int nSurfaces= GlobalDataBase::GetIntParaFromDB("nSurface");
+    int *nProbesOfSurface = reinterpret_cast< int * > (GlobalDataBase::GetDataPtr("nProbesOfSurface"));
+
+    vector<vector<RDouble> > *probesReorderCoordinates = new vector<vector<RDouble> > [nSurfaces];
+    vector<vector<RDouble> > *qGlobalProbes = new vector<vector<RDouble> > [nSurfaces];
+
+    for (int iSurface = 0; iSurface < nSurfaces; ++ iSurface)
+    {
+        int nProbes = nProbesOfSurface[iSurface];
+        probesReorderCoordinates[iSurface].resize(nProbes);
+        qGlobalProbes[iSurface].resize(nProbes);
+    }
+
+    uint_t nzones = dataList.size();
+    for (int iZone = 0; iZone < nzones; ++ iZone)
+    {
+        DataContainer *cdata = dataList[iZone];
+
+        int probesLocalNumber;
+        PHRead(cdata, &probesLocalNumber, 1);
+
+        if (probesLocalNumber == 0) continue;
+
+        vector<vector<RDouble> > probesCoordinates;
+        vector<int> probesGlobalID, probesLineID, probesSurfaceID;
+        probesCoordinates.resize(probesLocalNumber);
+        probesGlobalID.resize(probesLocalNumber);
+        probesLineID.resize(probesLocalNumber);
+        probesSurfaceID.resize(probesLocalNumber);
+        int nDim;
+        RDouble **qProbes = NewPointer2<RDouble> (nVariables, probesLocalNumber);
+
+        for (int iProbe = 0; iProbe < probesLocalNumber; ++ iProbe)
+        {
+            PHRead(cdata, &nDim, 1);
+            PHRead(cdata, &probesGlobalID[iProbe], 1);
+            PHRead(cdata, &probesLineID[iProbe], 1);
+            PHRead(cdata, &probesSurfaceID[iProbe], 1);
+            probesCoordinates[iProbe].resize(nDim);
+
+            int iProbeSurfaceID = probesSurfaceID[iProbe];
+            int iProbeGlobalID = probesGlobalID[iProbe];
+            probesReorderCoordinates[iProbeSurfaceID][iProbeGlobalID].resize(nDim);
+            qGlobalProbes[iProbeSurfaceID][iProbeGlobalID].resize(nVariables);
+
+            for (int iDim = 0; iDim < nDim; ++ iDim)
+            {
+                PHRead(cdata, &probesCoordinates[iProbe][iDim], 1);
+                probesReorderCoordinates[iProbeSurfaceID][iProbeGlobalID][iDim] = probesCoordinates[iProbe][iDim];
+            }
+
+            for (int iVariable = 0; iVariable < nVariables; ++ iVariable)
+            {
+                PHRead(cdata, qProbes[iVariable][iProbe]);
+                qGlobalProbes[iProbeSurfaceID][iProbeGlobalID][iVariable] = qProbes[iVariable][iProbe];
+            }
+        }
+
+        DelPointer2(qProbes);
+    }
+
+    for (int iSurface = 0; iSurface < nSurfaces; ++ iSurface)
+    {
+        int nProbes = nProbesOfSurface[iSurface];
+
+        if (GetFilename() == "")
+        {
+            return;
+        }
+
+        ostringstream ossFileName;
+        string finalFileName = GetFilename();
+        finalFileName = PHSPACE::AddSymbolToFileName(finalFileName, "_", "surface", iSurface);
+
+        if (PHMPI::IsParallelRun())
+        {
+            int fileID = PHMPI::GetFileIndexofCurrentProcessor();
+            finalFileName = PHSPACE::AddSymbolToFileName(finalFileName, '_', fileID);
+        }
+
+        ossFileName << finalFileName;
+
+        string surfacesFlowFileName = ossFileName.str();
+        fstream surfacesFlowFile;
+        OpenFile(surfacesFlowFile, surfacesFlowFileName, ios_base::out|ios_base::app);
+        surfacesFlowFile << setiosflags(ios::left);
+        surfacesFlowFile << setiosflags(ios::scientific);
+        surfacesFlowFile << setprecision(10);
+
+        if (IfFileEmpty(surfacesFlowFile))
+        {
+            surfacesFlowFile << variables << endl;
+        }
+
+        int wordWidth = 8;
+
+        for (int iProbe = 0; iProbe < nProbes; ++ iProbe)
+        {
+            int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+            surfacesFlowFile << setw(wordWidth) << outIterStep << "	";
+
+            for (int iDim = 0; iDim < probesReorderCoordinates[iSurface][iProbe].size(); ++ iDim)
+            {
+                surfacesFlowFile << setw(wordWidth) << probesReorderCoordinates[iSurface][iProbe][iDim] << "	";
+            }
+
+            for (int iVariable = 0; iVariable < nVariables; ++ iVariable)
+            {
+                surfacesFlowFile << setw(wordWidth) << qGlobalProbes[iSurface][iProbe][iVariable] << "	";
+            }
+
+            int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+            if (isUnsteady)
+            {
+                int outerStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("outnstep");
+                RDouble physicalTimeStepDimensional = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStepDimensional");
+                RDouble real_time = physicalTimeStepDimensional * outerStep;
+                surfacesFlowFile << setw(wordWidth) << real_time << endl;
+            }
+            else
+            {
+                surfacesFlowFile << endl;
+            }
+
+        }
+
+        CloseFile(surfacesFlowFile);
+    }
+
+    delete [] probesReorderCoordinates;
+    delete [] qGlobalProbes;
+    probesReorderCoordinates = NULL;
+    qGlobalProbes = NULL;
+}
+
+void DumpToFileASCII::WriteProbesFlowFile(int outerStep)
+{
+    int nTotalProbes = GlobalDataBase::GetIntParaFromDB("nTotalProbes");
+    vector<vector<RDouble> > probesReorderCoordinates;
+    probesReorderCoordinates.resize(nTotalProbes);
+    vector<vector<RDouble> > qGlobalProbes;
+    qGlobalProbes.resize(nTotalProbes);
+
+    uint_t nzones = dataList.size();
+    for (int iZone = 0; iZone < nzones; ++ iZone)
+    {
+        DataContainer *cdata = dataList[iZone];
+
+        int probesLocalNumber;
+        PHRead(cdata, &probesLocalNumber, 1);
+
+        if (probesLocalNumber == 0) continue;
+
+        vector<vector<RDouble> > probesCoordinates;
+        vector<int> probesGlobalID, probesLineID, probesSurfaceID;
+        probesCoordinates.resize(probesLocalNumber);
+        probesGlobalID.resize(probesLocalNumber);
+        probesLineID.resize(probesLocalNumber);
+        probesSurfaceID.resize(probesLocalNumber);
+        int nDim;
+        RDouble **qProbes = NewPointer2<RDouble> (nVariables, probesLocalNumber);
+
+        for (int iProbe = 0; iProbe < probesLocalNumber; ++ iProbe)
+        {
+            PHRead(cdata, &nDim, 1);
+            PHRead(cdata, &probesGlobalID[iProbe], 1);
+            PHRead(cdata, &probesLineID[iProbe], 1);
+            PHRead(cdata, &probesSurfaceID[iProbe], 1);
+            probesCoordinates[iProbe].resize(nDim);
+
+            int iProbeGlobalID =probesGlobalID[iProbe];
+            probesReorderCoordinates[iProbeGlobalID].resize(nDim);
+            qGlobalProbes[iProbeGlobalID].resize(nVariables);
+
+            for (int iDim = 0; iDim < nDim; ++ iDim)
+            {
+                PHRead(cdata, &probesCoordinates[iProbe][iDim], 1);
+                probesReorderCoordinates[iProbeGlobalID][iDim] = probesCoordinates[iProbe][iDim];
+            }
+
+            for (int iVariable = 0; iVariable < nVariables; ++ iVariable)
+            {
+                PHRead(cdata, qProbes[iVariable][iProbe]);
+                qGlobalProbes[iProbeGlobalID][iVariable] = qProbes[iVariable][iProbe];
+            }
+        }
+
+        DelPointer2(qProbes);
+    }
+
+    for (int iProbe = 0; iProbe < nTotalProbes; ++ iProbe)
+    {
+        if (GetFilename() == "")
+        {
+            return;
+        }
+        ostringstream ossFileName;
+        string finalFileName = GetFilename();
+
+        finalFileName = PHSPACE::AddSymbolToFileName(finalFileName, "_", "probes");
+        finalFileName = PHSPACE::AddSymbolToFileName(finalFileName, '_', outerStep);
+        if (PHMPI::IsParallelRun())
+        {
+            int fileID = PHMPI::GetFileIndexofCurrentProcessor();
+            finalFileName = PHSPACE::AddSymbolToFileName(finalFileName, '_', fileID);
+        }
+
+        ossFileName << finalFileName;
+
+        string probesFlowFileName = ossFileName.str();
+        fstream probesFlowFile;
+        OpenFile(probesFlowFile, probesFlowFileName, ios_base::out|ios_base::app);
+        probesFlowFile << setiosflags(ios::left);
+        probesFlowFile << setiosflags(ios::scientific);
+        probesFlowFile << setprecision(10);
+
+        if (IfFileEmpty(probesFlowFile))
+        {
+            probesFlowFile << variables << endl;
+        }
+
+        int wordWidth = 8;
+
+        probesFlowFile << setw(wordWidth) << outerStep << "	";
+
+        for (int iDim = 0; iDim < probesReorderCoordinates[iProbe].size(); ++ iDim)
+        {
+            probesFlowFile << setw(wordWidth) << probesReorderCoordinates[iProbe][iDim] << "	";
+        }
+
+        for (int iVariable = 0; iVariable < nVariables; ++ iVariable)
+        {
+            probesFlowFile << setw(wordWidth) << qGlobalProbes[iProbe][iVariable] << "	";
+        }
+
+        int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+        if (isUnsteady)
+        {
+            int outerStep1 = PHSPACE::GlobalDataBase::GetIntParaFromDB("outnstep");
+            RDouble physicalTimeStepDimensional = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStepDimensional");
+            RDouble real_time = physicalTimeStepDimensional * outerStep1;
+            probesFlowFile << setw(wordWidth) << real_time << endl;
+        }
+        else
+        {
+            probesFlowFile << endl;
+        }
+
+        CloseFile(probesFlowFile);
+    }
+}
+
+void DumpToFileASCII::WriteLinesFlowFile(int outerStep)
+{
+    int nLines = GlobalDataBase::GetIntParaFromDB("nLines");
+    int *nProbesOfLine = reinterpret_cast< int * > (GlobalDataBase::GetDataPtr("nProbesOfLine"));
+    vector<vector<RDouble> > *probesReorderCoordinates = new vector<vector<RDouble> > [nLines];
+    vector<vector<RDouble> > *qGlobalProbes = new vector<vector<RDouble> > [nLines];
+
+    for (int iLine = 0; iLine < nLines; ++ iLine)
+    {
+        int nProbes = nProbesOfLine[iLine];
+        probesReorderCoordinates[iLine].resize(nProbes);
+        qGlobalProbes[iLine].resize(nProbes);
+    }
+
+    uint_t nzones = dataList.size();
+    for (int iZone = 0; iZone < nzones; ++ iZone)
+    {
+        DataContainer *cdata = dataList[iZone];
+
+        int probesLocalNumber;
+        PHRead(cdata, &probesLocalNumber, 1);
+
+        if (probesLocalNumber == 0) continue;
+
+        vector<vector<RDouble> > probesCoordinates;
+        vector<int> probesGlobalID, probesLineID, probesSurfaceID;
+        probesCoordinates.resize(probesLocalNumber);
+        probesGlobalID.resize(probesLocalNumber);
+        probesLineID.resize(probesLocalNumber);
+        probesSurfaceID.resize(probesLocalNumber);
+        int nDim;
+        RDouble **qProbes = NewPointer2<RDouble> (nVariables, probesLocalNumber);
+
+        for (int iProbe = 0; iProbe < probesLocalNumber; ++ iProbe)
+        {
+            PHRead(cdata, &nDim, 1);
+            PHRead(cdata, &probesGlobalID[iProbe], 1);
+            PHRead(cdata, &probesLineID[iProbe], 1);
+            PHRead(cdata, &probesSurfaceID[iProbe], 1);
+            probesCoordinates[iProbe].resize(nDim);
+
+            int iProbeLineID = probesLineID[iProbe];
+            int iProbeGlobalID = probesGlobalID[iProbe];
+            probesReorderCoordinates[iProbeLineID][iProbeGlobalID].resize(nDim);
+            qGlobalProbes[iProbeLineID][iProbeGlobalID].resize(nVariables);
+
+            for (int iDim = 0; iDim < nDim; ++ iDim)
+            {
+                PHRead(cdata, &probesCoordinates[iProbe][iDim], 1);
+                probesReorderCoordinates[iProbeLineID][iProbeGlobalID][iDim] = probesCoordinates[iProbe][iDim];
+            }
+
+            for (int iVariable = 0; iVariable < nVariables; ++ iVariable)
+            {
+                PHRead(cdata, qProbes[iVariable][iProbe]);
+                qGlobalProbes[iProbeLineID][iProbeGlobalID][iVariable] = qProbes[iVariable][iProbe];
+            }
+        }
+
+        DelPointer2(qProbes);
+    }
+
+    for (int iLine = 0; iLine < nLines; ++ iLine)
+    {
+        int nProbes = nProbesOfLine[iLine];
+
+        if (GetFilename() == "")
+        {
+            return;
+        }
+
+        ostringstream ossFileName;
+        string finalFileName = GetFilename();
+        finalFileName = PHSPACE::AddSymbolToFileName(finalFileName, "_", "line", iLine);
+        finalFileName = PHSPACE::AddSymbolToFileName(finalFileName, '_', outerStep);
+
+        if (PHMPI::IsParallelRun())
+        {
+            int fileID = PHMPI::GetFileIndexofCurrentProcessor();
+            finalFileName = PHSPACE::AddSymbolToFileName(finalFileName, '_', fileID);
+        }
+
+        ossFileName << finalFileName;
+
+        string linesFlowFileName = ossFileName.str();
+        fstream linesFlowFile;
+        OpenFile(linesFlowFile, linesFlowFileName, ios_base::out|ios_base::app);
+        linesFlowFile << setiosflags(ios::left);
+        linesFlowFile << setiosflags(ios::scientific);
+        linesFlowFile << setprecision(10);
+
+        if (IfFileEmpty(linesFlowFile))
+        {
+            linesFlowFile << variables << endl;
+        }
+
+        int wordWidth = 8;
+
+        for (int iProbe = 0; iProbe < nProbes; ++ iProbe)
+        {
+            linesFlowFile << setw(wordWidth) << outerStep << "	";
+
+            for (int iDim = 0; iDim < probesReorderCoordinates[iLine][iProbe].size(); ++ iDim)
+            {
+                linesFlowFile << setw(wordWidth) << probesReorderCoordinates[iLine][iProbe][iDim] << "	";
+            }
+
+            for (int iVariable = 0; iVariable < nVariables; ++ iVariable)
+            {
+                linesFlowFile << setw(wordWidth) << qGlobalProbes[iLine][iProbe][iVariable] << "	";
+            }
+
+            int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+            if (isUnsteady)
+            {
+                int outerStep1 = PHSPACE::GlobalDataBase::GetIntParaFromDB("outnstep");
+                RDouble physicalTimeStepDimensional = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStepDimensional");
+                RDouble real_time = physicalTimeStepDimensional * outerStep1;
+                linesFlowFile << setw(wordWidth) << real_time << endl;
+            }
+            else
+            {
+                linesFlowFile << endl;
+            }
+        }
+
+        CloseFile(linesFlowFile);
+    }
+
+    delete [] probesReorderCoordinates;
+    delete [] qGlobalProbes;
+    probesReorderCoordinates = NULL;
+    qGlobalProbes = NULL;
+}
+
+void DumpToFileASCII::WriteSurfacesFlowFile(int outerStep)
+{
+    int nSurfaces= GlobalDataBase::GetIntParaFromDB("nSurface");
+    int *nProbesOfSurface = reinterpret_cast< int * > (GlobalDataBase::GetDataPtr("nProbesOfSurface"));
+
+    vector<vector<RDouble> > *probesReorderCoordinates = new vector<vector<RDouble> > [nSurfaces];
+    vector<vector<RDouble> > *qGlobalProbes = new vector<vector<RDouble> > [nSurfaces];
+
+    for (int iSurface = 0; iSurface < nSurfaces; ++ iSurface)
+    {
+        int nProbes = nProbesOfSurface[iSurface];
+        probesReorderCoordinates[iSurface].resize(nProbes);
+        qGlobalProbes[iSurface].resize(nProbes);
+    }
+
+    uint_t nzones = dataList.size();
+    for (int iZone = 0; iZone < nzones; ++ iZone)
+    {
+        DataContainer *cdata = dataList[iZone];
+
+        int probesLocalNumber;
+        PHRead(cdata, &probesLocalNumber, 1);
+
+        if (probesLocalNumber == 0) continue;
+
+        vector<vector<RDouble> > probesCoordinates;
+        vector<int> probesGlobalID, probesLineID, probesSurfaceID;
+        probesCoordinates.resize(probesLocalNumber);
+        probesGlobalID.resize(probesLocalNumber);
+        probesLineID.resize(probesLocalNumber);
+        probesSurfaceID.resize(probesLocalNumber);
+        int nDim;
+        RDouble **qProbes = NewPointer2<RDouble> (nVariables, probesLocalNumber);
+
+        for (int iProbe = 0; iProbe < probesLocalNumber; ++ iProbe)
+        {
+            PHRead(cdata, &nDim, 1);
+            PHRead(cdata, &probesGlobalID[iProbe], 1);
+            PHRead(cdata, &probesLineID[iProbe], 1);
+            PHRead(cdata, &probesSurfaceID[iProbe], 1);
+            probesCoordinates[iProbe].resize(nDim);
+
+            int iProbeSurfaceID = probesSurfaceID[iProbe];
+            int iProbeGlobalID = probesGlobalID[iProbe];
+            probesReorderCoordinates[iProbeSurfaceID][iProbeGlobalID].resize(nDim);
+            qGlobalProbes[iProbeSurfaceID][iProbeGlobalID].resize(nVariables);
+
+            for (int iDim = 0; iDim < nDim; ++ iDim)
+            {
+                PHRead(cdata, &probesCoordinates[iProbe][iDim], 1);
+                probesReorderCoordinates[iProbeSurfaceID][iProbeGlobalID][iDim] = probesCoordinates[iProbe][iDim];
+            }
+
+            for (int iVariable = 0; iVariable < nVariables; ++ iVariable)
+            {
+                PHRead(cdata, qProbes[iVariable][iProbe]);
+                qGlobalProbes[iProbeSurfaceID][iProbeGlobalID][iVariable] = qProbes[iVariable][iProbe];
+            }
+        }
+
+        DelPointer2(qProbes);
+    }
+
+    for (int iSurface = 0; iSurface < nSurfaces; ++ iSurface)
+    {
+        int nProbes = nProbesOfSurface[iSurface];
+
+        if (GetFilename() == "")
+        {
+            return;
+        }
+
+        ostringstream ossFileName;
+        string finalFileName = GetFilename();
+        finalFileName = PHSPACE::AddSymbolToFileName(finalFileName, "_", "surface", iSurface);
+        finalFileName = PHSPACE::AddSymbolToFileName(finalFileName, '_', outerStep);
+
+        if (PHMPI::IsParallelRun())
+        {
+            int fileID = PHMPI::GetFileIndexofCurrentProcessor();
+            finalFileName = PHSPACE::AddSymbolToFileName(finalFileName, '_', fileID);
+        }
+
+        ossFileName << finalFileName;
+
+        string surfacesFlowFileName = ossFileName.str();
+        fstream surfacesFlowFile;
+        OpenFile(surfacesFlowFile, surfacesFlowFileName, ios_base::out|ios_base::app);
+        surfacesFlowFile << setiosflags(ios::left);
+        surfacesFlowFile << setiosflags(ios::scientific);
+        surfacesFlowFile << setprecision(10);
+
+        if (IfFileEmpty(surfacesFlowFile))
+        {
+            surfacesFlowFile << variables << endl;
+        }
+
+        int wordWidth = 8;
+
+        for (int iProbe = 0; iProbe < nProbes; ++ iProbe)
+        {
+            surfacesFlowFile << setw(wordWidth) << outerStep << "	";
+
+            for (int iDim = 0; iDim < probesReorderCoordinates[iSurface][iProbe].size(); ++ iDim)
+            {
+                surfacesFlowFile << setw(wordWidth) << probesReorderCoordinates[iSurface][iProbe][iDim] << "	";
+            }
+
+            for (int iVariable = 0; iVariable < nVariables; ++ iVariable)
+            {
+                surfacesFlowFile << setw(wordWidth) << qGlobalProbes[iSurface][iProbe][iVariable] << "	";
+            }
+
+            int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+            if (isUnsteady)
+            {
+                int outerStep1 = PHSPACE::GlobalDataBase::GetIntParaFromDB("outnstep");
+                RDouble physicalTimeStepDimensional = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStepDimensional");
+                RDouble real_time = physicalTimeStepDimensional * outerStep1;
+                surfacesFlowFile << setw(wordWidth) << real_time << endl;
+            }
+            else
+            {
+                surfacesFlowFile << endl;
+            }
+        }
+
+        CloseFile(surfacesFlowFile);
+    }
+
+    delete [] probesReorderCoordinates;
+    delete [] qGlobalProbes;
+    probesReorderCoordinates = NULL;
+    qGlobalProbes = NULL;
+}
+
+}
diff --git a/API/PostProcess/src/Post_ProbesWrite.cpp b/API/PostProcess/src/Post_ProbesWrite.cpp
new file mode 100644
index 0000000..411fc95
--- /dev/null
+++ b/API/PostProcess/src/Post_ProbesWrite.cpp
@@ -0,0 +1,156 @@
+#include "Post_ProbesWrite.h"
+#include "IO_FileName.h"
+#include "TK_Parse.h"
+#include "PHIO.h"
+#include "HyList.h"
+#include "TK_Exit.h"
+#include "Glb_Dimension.h"
+#include "Geo_UnstructBC.h"
+#include "Geo_StructBC.h"
+#include "Post_Probes.h"
+#include "Pointer.h"
+#include "Solver.h"
+#include "Geo_UnstructGrid.h"
+#include "TK_Log.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Post_ProbesWrite::Post_ProbesWrite(int flowType)
+{
+    this->flowType = flowType;
+}
+
+LIB_EXPORT Post_ProbesWrite::~Post_ProbesWrite()
+{
+
+}
+
+LIB_EXPORT void Post_ProbesWrite::Run()
+{
+    string samplefile = "sample.dat";
+    GlobalDataBase::GetData("samplefile", &samplefile, PHSTRING, 1);
+    ActionKey *actkey = new ActionKey();
+    actkey->level    = 0;
+    actkey->filename = samplefile;
+    actkey->openmode = ios_base::out|ios_base::app;
+
+    ServerProbesWrite(actkey);
+    PostProbesWrite(actkey);
+    delete actkey;
+    this->Clear();
+}
+
+void Post_ProbesWrite::ServerProbesWrite(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int nZones = PHMPI::GetNumberofGlobalZones();
+
+    int recv_proc;
+    int myid;
+
+    for (int iZone =  0; iZone < nZones; ++ iZone)
+    {
+        DataContainer *cdata = actkey->GetData();
+        cdata->moveto_begin();
+
+        int send_proc = GetZoneProcessorID(iZone);
+        recv_proc = GetServerProcessorID();
+
+        myid = GetCurrentProcessorID();
+        int tag = GetSendRecvTag(actkey, iZone);
+
+        if (myid == send_proc)
+        {
+            Grid *grid = GetGrid(iZone, actkey->level);
+            int nProbeVariables = GlobalDataBase::GetIntParaFromDB("nProbeVariables");
+            int probeVariables[100] = {0};
+
+            GlobalDataBase::GetData("probeVariables", probeVariables, PHINT, nProbeVariables);
+            Post_Probes *postProbesVar = new Post_Probes(nProbeVariables, probeVariables, grid);
+            int Nsolver = GlobalSolvers::GetNumberOfSolvers(iZone);
+            for (int iSolver = 0; iSolver < Nsolver; ++ iSolver)
+            {
+                GlobalSolvers::GetSolver(iZone, iSolver)->ComputePostProbesVariables(postProbesVar);
+            }
+
+            StoreProbesVarariables(actkey, postProbesVar);
+            FreePointer(postProbesVar);
+        }
+
+        PH_Trade(actkey, send_proc, recv_proc, tag);
+
+        if (myid == recv_proc)
+        {
+            datalist.push_back(cdata);
+            DataContainer *cdata1 = new DataContainer();
+            actkey->SetData(cdata1);
+        }
+    }
+}
+
+void Post_ProbesWrite::StoreProbesVarariables(ActionKey *actkey, Post_Probes *postProbesVar)
+{
+    Grid *grid_in = postProbesVar->GetGrid();
+
+    int nProbeVariables = postProbesVar->GetNumberofProbeVariables();
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        int numberOfSpecies = GlobalDataBase::GetIntParaFromDB("numberOfSpecies");
+        nProbeVariables = nProbeVariables + 2 * numberOfSpecies;
+    }
+    RDouble **q_probes = new RDouble *[nProbeVariables];
+    postProbesVar->GetAllProbesVarPtr(q_probes);
+
+    if (actkey->filename != "")
+    {
+        int probesLocalNumber = grid_in->GetZoneProbesNumber();
+        PHWrite(actkey->GetData(), &probesLocalNumber, 1);
+        vector<int> probesGlobalID = grid_in->GetZoneProbesGlobalID();
+        vector<int> probesLineID = grid_in->GetZoneProbesLineID();
+        vector<int> probesSurfaceID = grid_in->GetZoneProbesSurfaceID();
+        vector<vector<RDouble> > probesCoordinates = grid_in->GetZoneProbesCoordinates();
+        int nDim;
+
+        for (int iProbe = 0; iProbe < probesLocalNumber; ++ iProbe)
+        {
+            nDim = static_cast<int>(probesCoordinates[iProbe].size());
+
+            PHWrite(actkey->GetData(), &nDim, 1);
+            PHWrite(actkey->GetData(), probesGlobalID[iProbe]);
+            PHWrite(actkey->GetData(), probesLineID[iProbe]);
+            PHWrite(actkey->GetData(), probesSurfaceID[iProbe]);
+            for (int iDim = 0; iDim < nDim; ++ iDim)
+            {
+                PHWrite(actkey->GetData(), probesCoordinates[iProbe][iDim]);
+            }
+            for (int iVariable = 0; iVariable < nProbeVariables; ++ iVariable)
+            {
+                PHWrite(actkey->GetData(), q_probes[iVariable][iProbe]);
+            }
+        }
+    }
+    delete [] q_probes;    q_probes = NULL;
+}
+
+void Post_ProbesWrite::PostProbesWrite(ActionKey *actkey)
+{
+    if (datalist.size() > 0)
+    {
+        DumpToFileASCII dumpToFileASCII(datalist, actkey->filename);
+        dumpToFileASCII.Run();
+    }
+
+    for (unsigned int iZone = 0; iZone < datalist.size(); ++ iZone)
+    {
+        delete datalist[iZone];
+    }
+}
+
+void Post_ProbesWrite::Clear()
+{
+    this->datalist.clear();
+}
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/src/Post_Visual.cpp b/API/PostProcess/src/Post_Visual.cpp
new file mode 100644
index 0000000..3d24563
--- /dev/null
+++ b/API/PostProcess/src/Post_Visual.cpp
@@ -0,0 +1,2467 @@
+#include "Post_Visual.h"
+#include "TK_Exit.h"
+#include "Pointer.h"
+#include "IO_FileName.h"
+#include "PHIO.h"
+#include "Geo_UnstructBC.h"
+#include "Constants.h"
+#include "Glb_Dimension.h"
+
+#ifdef USE_TecplotLib
+#include "TECIO.h"
+#endif
+
+#include "Gas.h"
+
+using namespace std;
+namespace PHSPACE
+{
+LIB_EXPORT Post_Visual::Post_Visual(int nVisualVariables_in, int *visualVariables_in, Grid *grid_in, int flowType_in)
+{
+    visualVariablesPtr = new Data_Field();
+
+    this->grid = grid_in;
+    this->flowType = flowType_in;
+
+    if (grid_in)
+    {
+        gridType = grid_in->Type();
+    }
+    else
+    {
+        gridType = -1;
+    }
+
+    if (flowType == AverageFlow)
+    {
+        visualVariablesMap.insert(pair<int, string>(VISUAL_DENSITY , "density_Average"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_U       , "u_Average"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_V       , "v_Average"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_W       , "w_Average"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_PRESSURE, "pressure_Average"));
+
+        nVisualVariables = 5;
+        for (int iVar = 0; iVar < nVisualVariables; ++ iVar)
+        {
+            visualVariables.insert(iVar);
+        }
+        return;
+    }
+
+    if (flowType == AverageReynoldsStress)
+    {
+        visualVariablesMap.insert(pair<int, string>(VISUAL_TAU_XX, "tau_xx"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_TAU_YY, "tau_yy"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_TAU_ZZ, "tau_zz"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_TAU_XY, "tau_xy"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_TAU_XZ, "tau_xz"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_TAU_YZ, "tau_yz"));
+
+        nVisualVariables = 6;
+        for (int iVar = 90; iVar < 96; ++ iVar)
+        {
+            visualVariables.insert(iVar);
+        }
+        return;
+    }
+
+    visualVariablesMap.insert(pair<int, string>(VISUAL_DENSITY            , "density"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_U                  , "u"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_V                  , "v"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_W                  , "w"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_PRESSURE           , "pressure"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_TEMPERATURE        , "temperature"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_MACH               , "mach"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_VISCOSITY_LAMINAR  , "viscosityLaminar"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_VISCOSITY_TURBULENT, "viscosityTurbulence"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_VORTICITY_X        , "vorticity_x"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_VORTICITY_Y        , "vorticity_y"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_VORTICITY_Z        , "vorticity_z"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_VORTICITY_MAGNITUDE, "vorticityMagnitude"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_STRAIN_RATE        , "strain_rate"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_Q_CRITERIA         , "Q_criteria"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_CP                 , "cp"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_TIME_STEP          , "dt"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_VOLUME             , "volume"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_MODELED_TKE        , "modeledTKE"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_MODELED_DISSIPATION, "modeleddissipationrate"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_SST_F1             , "SSTF1"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_SST_F2             , "SSTF2"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_INTERMITTENCY      , "intermittency"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_MOMENTUMTHICKREYNOLDS, "MomentumThicknessReynolds"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_STREAMLINE_U       , "streamline_u"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_STREAMLINE_V       , "streamline_v"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_STREAMLINE_W       , "streamline_w"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_TRANSITION_GAMAEFF , "gamaeff"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_TRANSITION_RESCF   , "stationaryCrossFlowReynolds"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_GRADIENT_UX        , "gradientUx"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_GRADIENT_UY        , "gradientUy"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_GRADIENT_VX        , "gradientVx"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_GRADIENT_VY        , "gradientVy"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_DIST          , "walldist"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_GAMA               , "gama"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_IBLANK             , "iblank"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_CFL1               , "localCFL"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_CFL2               , "minCFL"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_STREAMLINE_MACH    , "streamline_mach"));
+
+    int compressible = COMPRESSIBLE;
+    compressible = GlobalDataBase::GetIntParaFromDB("compressible");
+    if (compressible == INCOMPRESSIBLE)
+    {
+        visualVariablesMap.insert(pair<int, string>(VISUAL_INCOMP_U  , "U" ));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_INCOMP_V  , "V" ));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_INCOMP_W  , "W" ));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_INCOMP_P  , "P" ));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_INCOMP_CP , "CP"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_INCOMP_T  , "T" ));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_INCOMP_ENTHALPY , "Enthalpy"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_INCOMP_DEN, "DEN"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_INCOMP_VIS, "VIS"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_INCOMP_TE , "TE"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_INCOMP_ED , "ED"));
+        if (GlobalDataBase::GetIntParaFromDB("isSolveSpecies"))
+        {
+            int nSpecies = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            string *speciesNameIncom = new string[nSpecies];
+            GlobalDataBase::GetData("speciesNameIncom", speciesNameIncom, PHSTRING, 1);
+
+            for (int iSpecie = 0; iSpecie < nSpecies; ++iSpecie)
+            {
+                int index = VISUAL_INCOMP_SPECIES + iSpecie;
+                visualVariablesMap.insert(pair<int, string>(index, speciesNameIncom[iSpecie]));
+            }
+        }
+    }
+
+    visualVariablesMap.insert(pair<int, string>(VISUAL_DIMENSIONAL_DENSITY,     "density_Dim"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_DIMENSIONAL_U      ,     "u_Dim"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_DIMENSIONAL_V      ,     "v_Dim"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_DIMENSIONAL_W      ,     "w_Dim"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_VELOCITY_MAGNITUDE ,    "Vmag_Dim"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_DIMENSIONAL_PRESSURE,    "pressure_Dim"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_DIMENSIONAL_TEMPERATURE, "temperature_Dim"));
+
+    int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nTemperatureModel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+    if (nChemical > 0)
+    {
+        if (nTemperatureModel == 2)
+        {
+            visualVariablesMap.insert(pair<int, string>(VISUAL_TEMPERATURE_VIBRATION, "Tv"));
+            visualVariablesMap.insert(pair<int, string>(VISUAL_ENERGY_VIBRATION,      "Ev"));
+        }
+        else if (nTemperatureModel == 3)
+        {
+            visualVariablesMap.insert(pair<int, string>(VISUAL_TEMPERATURE_VIBRATION, "Tv"));
+            visualVariablesMap.insert(pair<int, string>(VISUAL_TEMPERATURE_ELECTRON,  "Te"));
+            visualVariablesMap.insert(pair<int, string>(VISUAL_ENERGY_VIBRATION,      "Ev"));
+            visualVariablesMap.insert(pair<int, string>(VISUAL_ENERGY_ELECTRON,       "Ee"));
+        }
+        visualVariablesMap.insert(pair<int, string>(VISUAL_ELECTRON_NUMBER, "Ne"));
+    }
+
+    nVisualVariables = nVisualVariables_in;
+    int nCount = 0;
+    for (int iVar = 0; iVar < nVisualVariables; ++ iVar)
+    {
+        int varTemp = visualVariables_in[iVar];
+        if (visualVariablesMap.find(varTemp) == visualVariablesMap.end())
+        {
+            continue;
+        }
+        visualVariables.insert(varTemp);
+        ++ nCount;
+    }
+    nVisualVariables = nCount;
+    GlobalDataBase::UpdateData("nVisualVariables", &nVisualVariables, PHINT, 1);
+    
+    int *visualVariablesData = new int[nVisualVariables];
+    set<int>::iterator varIter = visualVariables.begin();
+    for (int iVar = 0; iVar < nVisualVariables; ++ iVar)
+    {
+        visualVariablesData[iVar] = *varIter;
+        varIter ++;
+    }
+    GlobalDataBase::UpdateData("visualVariables", visualVariablesData, PHINT, nVisualVariables);
+    delete[] visualVariablesData;    visualVariablesData = nullptr;
+}
+
+LIB_EXPORT Post_Visual::~Post_Visual()
+{
+    FreeAllVisualNodeVarPtr();
+    delete visualVariablesPtr;
+}
+
+LIB_EXPORT void Post_Visual::GetASCIITecplotHeader(vector<string> &title_tecplot)
+{
+    if (nVisualVariables <= 0) return;
+
+    ostringstream oss;
+    oss << "title=\"Flow Fields of PHengLEI\"" << endl;
+    oss << "variables=\"x\", \"y\", \"z\"";
+    set<int>::iterator varIter;
+    for (varIter = visualVariables.begin(); varIter != visualVariables.end(); ++ varIter)
+    {
+        int variableType = *varIter;
+        string varName = visualVariablesMap[variableType];
+        string varNameTemp = "\"" + varName + "\"";
+        oss << ", " << varNameTemp;
+    }
+
+    //! Chemical species must be the last!
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        //! Chemical turned on.
+        using namespace GAS_SPACE;
+        int nm    = GlobalDataBase::GetIntParaFromDB("nm");
+        int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+        int neqn  = nl + nchem;
+
+        string *varname = gas->GetNameOfSpecies();
+        for (int m = nm; m < neqn; ++ m)
+        {
+            string varName = "massfraction-" + varname[m-nm];
+            string species_name = "\"" + varName + "\"";
+            oss << ", " << species_name;
+        }
+        for (int m = nm; m < neqn; ++ m)
+        {
+            string varName = "molefraction-" + varname[m-nm];
+            string species_name = "\"" + varName + "\"";
+            oss << ", " << species_name;
+        }
+    }
+    title_tecplot.push_back(oss.str());
+    return;
+}
+
+LIB_EXPORT void Post_Visual::GetBinaryTecplotHeader(vector<string> &title_tecplot)
+{
+    if (nVisualVariables <= 0) return;
+
+    ostringstream oss;
+    oss << "x y z";
+
+    set<int>::iterator varIter;
+    for (varIter = visualVariables.begin(); varIter != visualVariables.end(); ++ varIter)
+    {
+        int variableType = *varIter;
+        string varName = visualVariablesMap[variableType];
+        //string varNameTemp = "\"" + varName + "\"";
+        oss << " " << varName;
+    }
+
+    //! Chemical species must be the last!
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        //! Chemical turned on.
+        using namespace GAS_SPACE;
+        int nm    = GlobalDataBase::GetIntParaFromDB("nm");
+        int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+        int neqn  = nl + nchem;
+
+        string *varname = gas->GetNameOfSpecies();
+        for (int m = nm; m < neqn; ++ m)
+        {
+            //string species_name = "\"" + varname[m-nm] + "\"";
+            string species_name = "massfraction-" + varname[m-nm];
+            oss << " " << species_name;
+        }
+        for (int m = nm; m < neqn; ++ m)
+        {
+            string species_name = "molefraction-" + varname[m-nm];
+            oss << " " << species_name;
+        }
+    }
+
+    title_tecplot.push_back(oss.str());
+    return;
+}
+
+LIB_EXPORT void Post_Visual::UpdateVisualNodeVarPtr(const string &name, RDouble *cellCenterData)
+{
+    if (!grid)
+    {
+        TK_Exit::ExceptionExit("Post_Visual::UpdateVisualNodeVarPtr needs Geometry infomation.");
+    }
+
+    UnstructGrid *gridUnstruct = UnstructGridCast(grid);
+    int nTotalNode = gridUnstruct->GetNTotalNode();
+    RDouble *qn = new RDouble[nTotalNode];
+
+    bool isVelocityForPostVisual = false;
+    if (name == "streamline_u" || name == "streamline_v" || name == "streamline_w")
+    {
+        isVelocityForPostVisual = true;
+    }
+
+    CompNodeVar(gridUnstruct, qn, cellCenterData, isVelocityForPostVisual);
+    visualVariablesPtr->UpdateDataPtr(name, qn);
+}
+
+LIB_EXPORT void Post_Visual::UpdateVisualNodeVarPtr(const string &name, int *cellCenterData)
+{
+    if (!grid)
+    {
+        TK_Exit::ExceptionExit("Post_Visual::UpdateVisualNodeVarPtr needs Geometry infomation.");
+    }
+
+    UnstructGrid * gridUnstruct = UnstructGridCast(grid);
+    int nTotalNode = gridUnstruct->GetNTotalNode();
+    RDouble *qn = new RDouble[nTotalNode];
+
+    SetField(qn, 1.0, nTotalNode);
+    visualVariablesPtr->UpdateDataPtr(name, qn);
+}
+
+LIB_EXPORT void Post_Visual::UpdateVisualNodeVarPtr(const string &name, RDouble4D &cellCenterData, int index)
+{
+    if (!grid)
+    {
+        TK_Exit::ExceptionExit("Post_Visual::UpdateVisualNodeVarPtr needs Geometry infomation.");
+    }
+
+    StructGrid *grid_str = StructGridCast(grid);
+
+    int ni = grid_str->GetNI();
+    int nj = grid_str->GetNJ();
+    int nk = grid_str->GetNK();
+
+    Range I(-1, ni+1);
+    Range J(-1, nj+1);
+    Range K(-1, nk+1);
+    if (nk == 1) K.setRange(1, 1);
+    Range M(0, 0);
+
+    RDouble4D *qn = new RDouble4D(I, J, K, M, fortranArray);
+    bool isVelocityForPostVisual = false;
+
+    if (name == "streamline_u" || name == "streamline_v" || name == "streamline_w")
+    {
+        isVelocityForPostVisual = true;
+    }
+
+    CompNodeVar(grid_str, *qn, 0, cellCenterData, index, isVelocityForPostVisual);
+
+    int isWennScheme = GlobalDataBase::GetIntParaFromDB("isWennScheme");
+    if (!isVelocityForPostVisual && isWennScheme == 0)
+    {
+        ModifyBoundaryNodeValue(name, grid_str, *qn, cellCenterData, index, PHENGLEI::SOLID_SURFACE);
+    }
+
+    ModifyWallTemperature(name, grid_str, *qn);
+
+    visualVariablesPtr->UpdateDataPtr(name, qn);
+}
+
+LIB_EXPORT void Post_Visual::UpdateVisualNodeVarPtr(const string &name, RDouble3D &cellCenterData)
+{
+    if (!grid)
+    {
+        TK_Exit::ExceptionExit("Post_Visual::UpdateVisualNodeVarPtr needs Geometry infomation.");
+    }
+
+    StructGrid *grid_str = StructGridCast(grid);
+
+    int ni = grid_str->GetNI();
+    int nj = grid_str->GetNJ();
+    int nk = grid_str->GetNK();
+
+    Range I(-1, ni+1);
+    Range J(-1, nj+1);
+    Range K(-1, nk+1);
+    if (nk == 1) K.setRange(1, 1);
+    Range M(0, 0);
+
+    RDouble4D *qn = new RDouble4D(I, J, K, M, fortranArray);
+    CompNodeVar(grid_str, *qn, 0, cellCenterData);
+    ModifyBoundaryNodeValue(name, grid_str, *qn, cellCenterData, PHENGLEI::SOLID_SURFACE);
+    visualVariablesPtr->UpdateDataPtr(name, qn);
+}
+
+LIB_EXPORT void Post_Visual::UpdateVisualNodeVarPtr(const string &name, Int3D &oversetcellCenterdata)
+{
+    if (!grid)
+    {
+        TK_Exit::ExceptionExit("Post_Visual::UpdateVisualNodeVarPtr needs Geometry infomation.");
+    }
+
+    StructGrid *grid_str = StructGridCast(grid);
+
+    int ni = grid_str->GetNI();
+    int nj = grid_str->GetNJ();
+    int nk = grid_str->GetNK();
+
+    Range I(1, ni);
+    Range J(1, nj);
+    Range K(1, nk);
+    if (nk == 1) K.setRange(1, 1);
+    Range M(0, 0);
+
+    RDouble4D *qn =  new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D &ql = *qn;
+    ql = 0.0;
+    int ist, ied, jst, jed, kst, ked;
+    grid_str->GetNodeIterationIndex(ist, ied, jst, jed, kst, ked);
+    int nDim = GetDim();
+    if (nDim == TWO_D)
+    {
+        int k = 1;
+        for (int j = jst; j < jed; ++ j)
+        {
+            for (int i = ist; i < ied; ++ i)
+            {
+                if (oversetcellCenterdata(i, j, k) == -1)
+                {
+                    ql(i,   j,   k, 0) = oversetcellCenterdata(i, j, k);
+                    ql(i+1, j,   k, 0) = oversetcellCenterdata(i, j, k);
+                    ql(i,   j+1, k, 0) = oversetcellCenterdata(i, j, k);
+                    ql(i+1, j+1, k, 0) = oversetcellCenterdata(i, j, k);
+                }
+            }
+        }
+
+        for (int j = jst; j < jed; ++ j)
+        {
+            for (int i = ist; i < ied; ++ i)
+            {
+                if (oversetcellCenterdata(i, j, k) == 0)
+                {
+                    ql(i,   j,   k, 0) = oversetcellCenterdata(i, j, k);
+                    ql(i+1, j,   k, 0) = oversetcellCenterdata(i, j, k);
+                    ql(i,   j+1, k, 0) = oversetcellCenterdata(i, j, k);
+                    ql(i+1, j+1, k, 0) = oversetcellCenterdata(i, j, k);
+                }
+            }
+        }
+
+        for (int j = jst; j < jed; ++ j)
+        {
+            for (int i = ist; i < ied; ++ i)
+            {
+                if (oversetcellCenterdata(i, j, k) == 1)
+                {
+                    ql(i,   j,   k, 0) = oversetcellCenterdata(i, j, k);
+                    ql(i+1, j,   k, 0) = oversetcellCenterdata(i, j, k);
+                    ql(i,   j+1, k, 0) = oversetcellCenterdata(i, j, k);
+                    ql(i+1, j+1, k, 0) = oversetcellCenterdata(i, j, k);
+                }
+            }
+        }
+    }
+    else if (nDim == THREE_D)
+    {
+        for (int k = kst; k < ked; ++ k)
+        {
+            for (int j = jst; j < jed; ++ j)
+            {
+                for (int i = ist; i < ied; ++ i)
+                {
+                    if (oversetcellCenterdata(i, j, k) == 2)
+                    {
+                        ql(i,   j,   k,   0) = oversetcellCenterdata(i, j, k);
+                        ql(i+1, j,   k,   0) = oversetcellCenterdata(i, j, k);
+                        ql(i,   j+1, k,   0) = oversetcellCenterdata(i, j, k);
+                        ql(i,   j,   k+1, 0) = oversetcellCenterdata(i, j, k);
+                        ql(i+1, j+1, k,   0) = oversetcellCenterdata(i, j, k);
+                        ql(i+1, j,   k+1, 0) = oversetcellCenterdata(i, j, k);
+                        ql(i,   j+1, k+1, 0) = oversetcellCenterdata(i, j, k);
+                        ql(i+1, j+1, k+1, 0) = oversetcellCenterdata(i, j, k);
+                    }
+                }
+            }
+        }
+
+        for (int k = kst; k < ked; ++ k)
+        {
+            for (int j = jst; j < jed; ++ j)
+            {
+                for (int i = ist; i < ied; ++ i)
+                {
+                    if (oversetcellCenterdata(i, j, k) == 0)
+                    {
+                        ql(i,   j,   k,   0) = oversetcellCenterdata(i, j, k);
+                        ql(i+1, j,   k,   0) = oversetcellCenterdata(i, j, k);
+                        ql(i,   j+1, k,   0) = oversetcellCenterdata(i, j, k);
+                        ql(i,   j,   k+1, 0) = oversetcellCenterdata(i, j, k);
+                        ql(i+1, j+1, k,   0) = oversetcellCenterdata(i, j, k);
+                        ql(i+1, j,   k+1, 0) = oversetcellCenterdata(i, j, k);
+                        ql(i,   j+1, k+1, 0) = oversetcellCenterdata(i, j, k);
+                        ql(i+1, j+1, k+1, 0) = oversetcellCenterdata(i, j, k);
+                    }
+                }
+            }
+        }
+
+        for (int k = kst; k < ked; ++ k)
+        {
+            for (int j = jst; j < jed; ++ j)
+            {
+                for (int i = ist; i < ied; ++ i)
+                {
+                    if (oversetcellCenterdata(i, j, k) == 1)
+                    {
+                        ql(i,   j,   k,   0) = oversetcellCenterdata(i, j, k);
+                        ql(i+1, j,   k,   0) = oversetcellCenterdata(i, j, k);
+                        ql(i,   j+1, k,   0) = oversetcellCenterdata(i, j, k);
+                        ql(i,   j,   k+1, 0) = oversetcellCenterdata(i, j, k);
+                        ql(i+1, j+1, k,   0) = oversetcellCenterdata(i, j, k);
+                        ql(i+1, j,   k+1, 0) = oversetcellCenterdata(i, j, k);
+                        ql(i,   j+1, k+1, 0) = oversetcellCenterdata(i, j, k);
+                        ql(i+1, j+1, k+1, 0) = oversetcellCenterdata(i, j, k);
+                    }
+                }
+            }
+        }
+    }
+
+    visualVariablesPtr->UpdateDataPtr(name, qn);
+}
+
+void Post_Visual::UpdateVisualNodeVarPtr(const string &name, void *data)
+{
+    visualVariablesPtr->UpdateDataPtr(name, data);
+}
+
+LIB_EXPORT void Post_Visual::GetAllVisualNodeVarPtr(RDouble **qn)
+{
+    int varCount = 0;
+
+    for (set<int>::iterator varIter = visualVariables.begin(); varIter != visualVariables.end(); ++ varIter)
+    {
+        int variableType = *varIter;
+        string varName = GetVariableName(variableType);
+        qn[varCount++] = (RDouble *)GetVisualNodeVarPtr(varName);
+    }
+
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        using namespace GAS_SPACE;
+
+        int nm    = GlobalDataBase::GetIntParaFromDB("nm");
+        int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+        int neqn  = nl + nchem;
+
+        string *varname = gas->GetNameOfSpecies();
+        for (int m = nm; m < neqn; ++ m)
+        {
+            string varName = "massfraction-" + varname[m-nm];
+            qn[varCount++] = (RDouble *)GetVisualNodeVarPtr(varName);
+        }
+        for (int m = nm; m < neqn; ++ m)
+        {
+            string varName = "molefraction-" + varname[m-nm];
+            qn[varCount++] = (RDouble *)GetVisualNodeVarPtr(varName);
+        }
+    }
+}
+
+LIB_EXPORT void Post_Visual::GetAllVisualNodeVarPtr(RDouble4D **qn)
+{
+    int varCount = 0;
+
+    for (set<int>::iterator varIter = visualVariables.begin(); varIter != visualVariables.end(); ++ varIter)
+    {
+        int variableType = *varIter;
+        string varName = GetVariableName(variableType);
+        qn[varCount++] = (RDouble4D *)GetVisualNodeVarPtr(varName);
+    }
+
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        using namespace GAS_SPACE;
+
+        int nm    = GlobalDataBase::GetIntParaFromDB("nm");
+        int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+        int neqn  = nl + nchem;
+
+        string *varname = gas->GetNameOfSpecies();
+        for (int m = nm; m < neqn; ++ m)
+        {
+            string varName = "massfraction-" + varname[m-nm];
+            qn[varCount++] = (RDouble4D *)GetVisualNodeVarPtr(varName);
+        }
+        for (int m = nm; m < neqn; ++ m)
+        {
+            string varName = "molefraction-" + varname[m-nm];
+            qn[varCount++] = (RDouble4D *)GetVisualNodeVarPtr(varName);
+        }
+    }
+}
+
+void Post_Visual::FreeAllVisualNodeVarPtr()
+{
+    if (gridType == UNSTRUCTGRID)
+    {
+        if (visualVariables.size() == 0) return;
+        for (set<int>::iterator varIter = visualVariables.begin(); varIter != visualVariables.end(); ++ varIter)
+        {
+            int variableType = *varIter;
+            string varName = GetVariableName(variableType);
+            RDouble *qn = (RDouble *)GetVisualNodeVarPtr(varName);
+            if (qn)
+            {
+                delete [] qn;
+                //DeleteVisualNodeVarPtr(varName);
+            }
+        }
+
+        int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+        if (nchem)
+        {
+            using namespace GAS_SPACE;
+
+            int nm    = GlobalDataBase::GetIntParaFromDB("nm");
+            int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+            int neqn  = nl + nchem;
+
+            string *varname = gas->GetNameOfSpecies();
+            for (int m = nm; m < neqn; ++ m)
+            {
+                string varName = "massfraction-" + varname[m-nm];
+                RDouble *qn = (RDouble *)GetVisualNodeVarPtr(varName);
+                if (qn)
+                {
+                    delete [] qn;
+                }
+            }
+            for (int m = nm; m < neqn; ++ m)
+            {
+                string varName = "molefraction-" + varname[m-nm];
+                RDouble *qn = (RDouble *)GetVisualNodeVarPtr(varName);
+                if (qn)
+                {
+                    delete [] qn;
+                }
+            }
+        }
+    }
+    else if (gridType == STRUCTGRID)
+    {
+        if (visualVariables.size() == 0) return;
+        for (set<int>::iterator varIter = visualVariables.begin(); varIter != visualVariables.end(); ++ varIter)
+        {
+            int variableType = *varIter;
+            string varName = GetVariableName(variableType);
+            RDouble4D *qn = (RDouble4D *)GetVisualNodeVarPtr(varName);
+            if (qn)
+            {
+                delete qn;
+                //DeleteVisualNodeVarPtr(varName);
+            }
+        }
+
+        int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+        if (nchem)
+        {
+            using namespace GAS_SPACE;
+
+            int nm    = GlobalDataBase::GetIntParaFromDB("nm");
+            int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+            int neqn  = nl + nchem;
+
+            string *varname = gas->GetNameOfSpecies();
+            for (int m = nm; m < neqn; ++ m)
+            {
+                string varName = "massfraction-" + varname[m-nm];
+                RDouble4D *qn = (RDouble4D *)GetVisualNodeVarPtr(varName);
+                if (qn)
+                {
+                    delete qn;
+                }
+            }
+            for (int m = nm; m < neqn; ++ m)
+            {
+                string varName = "molefraction-" + varname[m-nm];
+                RDouble4D *qn = (RDouble4D *)GetVisualNodeVarPtr(varName);
+                if (qn)
+                {
+                    delete qn;
+                }
+            }
+        }
+    }
+    else
+    {
+        //TK_Exit::ExceptionExit("Post_Visual's grid type is not correctly set.");
+    }
+}
+
+DumpToVTK::DumpToVTK(vector<DataContainer *> datalist_in, string filename_in, bool CharacteristicBoundary_in, int visualFlowType)
+{
+    this->vtkdatalist = datalist_in;
+    this->vtkfilename = filename_in;
+    this->visualFlowType = visualFlowType;
+    this->CharacteristicBoundary = CharacteristicBoundary_in;
+
+    for (unsigned int iZone = 0; iZone < vtkdatalist.size(); ++ iZone)
+    {
+        vtkdatalist[iZone]->moveto_begin();
+    }
+    nvarplot = 0;
+}
+
+DumpToVTK::~DumpToVTK()
+{
+
+}
+
+void DumpToVTK::InitVariables()
+{
+    if (CharacteristicBoundary == true) return;
+
+    //! Average flow of DES statistics.
+    int nVisualVariables = 6;
+    int visualVariables[100] = {0, 1, 2, 3, 4, 11};
+
+    if (visualFlowType == 0)
+    {
+        //! Main flow.
+        nVisualVariables = GlobalDataBase::GetIntParaFromDB("nVisualVariables");
+        GlobalDataBase::GetData("visualVariables", visualVariables, PHINT, nVisualVariables);
+    }
+
+    Post_Visual *postVisualization = new Post_Visual(nVisualVariables, visualVariables);
+
+    int nvarplot = postVisualization->GetNumberofVisualVariables();
+
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        using namespace GAS_SPACE;
+
+        int nm    = GlobalDataBase::GetIntParaFromDB("nm");
+        int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+        int neqn  = nl + nchem;
+
+        nvarplot = nvarplot + 2 * (neqn - nm);
+    }
+
+    SetNvarplot(nvarplot);
+
+    FreePointer(postVisualization);
+}
+
+void DumpToVTK::Run()
+{
+    InitVariables();
+    WriteVTKFilm();
+}
+
+void DumpToVTK::WriteVTKFilm()
+{
+    fstream file;
+    string vtkname = GetFilename();
+
+    OpenFile(file, vtkname, ios_base::out|ios_base::binary);
+
+    int writeIsOver = 0;
+    PHWrite(file, writeIsOver);
+
+    int nVisualVariables = 0;
+    int visualVariables[100] = {0, 1, 2, 3, 4, 11};
+
+    if (CharacteristicBoundary == false)
+    {
+        if (visualFlowType == 0)
+        {
+            //! Main flow.
+            nVisualVariables = GlobalDataBase::GetIntParaFromDB("nVisualVariables");
+            GlobalDataBase::GetData("visualVariables", visualVariables, PHINT, nVisualVariables);
+        }
+    }
+    PHWrite(file, nVisualVariables);
+
+    for (int iVisualVariable = 0; iVisualVariable < nVisualVariables; ++ iVisualVariable)
+    {
+        PHWrite(file, &visualVariables[iVisualVariable], 1);
+    }
+
+    if (CharacteristicBoundary == false)
+    {
+        using namespace GAS_SPACE;
+        int numberOfSpecies = gas->GetNumberOfSpecies();
+        PHWrite(file, numberOfSpecies);
+        int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+        if (nChemical > 0)
+        {
+            string *varname = gas->GetNameOfSpecies();
+            for (int iChemical = 0; iChemical < numberOfSpecies; ++ iChemical)
+            {
+                string varName = "massfraction-" + varname[iChemical];
+                write_string(file, varName);
+            }
+            for (int iChemical = 0; iChemical < numberOfSpecies; ++ iChemical)
+            {
+                string varName = "molefraction-" + varname[iChemical];
+                write_string(file, varName);
+            }
+        }
+    }
+
+    map <int, string> bcnameMap;
+    bcnameMap.insert(pair<int, string>(0 , "NO_BOUNDARY_CONDITION"));
+    bcnameMap.insert(pair<int, string>(1 , "EXTRAPOLATION"));
+    bcnameMap.insert(pair<int, string>(2 , "WALL"));
+    bcnameMap.insert(pair<int, string>(3 , "SYMMETRY"));
+    bcnameMap.insert(pair<int, string>(4 , "FARFIELD"));
+    bcnameMap.insert(pair<int, string>(5 , "INFLOW"));
+    bcnameMap.insert(pair<int, string>(6 , "OUTFLOW"));
+    bcnameMap.insert(pair<int, string>(7 , "POLE"));
+    bcnameMap.insert(pair<int, string>(8 , "GENERIC_1"));
+    bcnameMap.insert(pair<int, string>(9 , "GENERIC_2"));
+    bcnameMap.insert(pair<int, string>(10, "GENERIC_3"));
+    bcnameMap.insert(pair<int, string>(52, "PRESSURE_INLET"));
+    bcnameMap.insert(pair<int, string>(62, "PRESSURE_OUTLET"));
+    bcnameMap.insert(pair<int, string>(61, "OUTFLOW_CONFINED"));
+
+    int nZones = static_cast<int>(vtkdatalist.size());
+    PHWrite(file, nZones);
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        DataContainer *cdata = vtkdatalist[iZone];
+        
+        int GridID;
+        int dimension;
+        int type;
+        int IMxOrNumPts, JMxOrNumElements;
+
+        PHRead(cdata, &GridID, 1);
+        PHRead(cdata, &dimension, 1);
+        PHRead(cdata, &type, 1);
+
+        PHWrite(file, GridID);
+        PHWrite(file, dimension);
+        PHWrite(file, type);
+
+        int TecioMission;
+        PHRead(cdata, &TecioMission, 1);
+        PHWrite(file, TecioMission);
+
+        while (true)
+        {
+            if (TecioMission == Writecomplete) break;
+
+            if (TecioMission != WriteBoundary && TecioMission != WriteBlock)
+            {
+                TK_Exit::ExceptionExit("Error: vtkwrite code is wrong!");
+            }
+
+            int bctype;
+
+            string bcName;
+            if (TecioMission == WriteBoundary)
+            {
+                PHRead(cdata, &bctype, 1);
+                PHWrite(file, bctype);
+
+                cdata->read_string(bcName);
+                
+                if (bcName.empty())
+                {
+                    bcName = bcnameMap[bctype];
+                }
+
+                write_string(file, bcName);
+            }
+
+            PHRead(cdata, &IMxOrNumPts, 1);
+            PHRead(cdata, &JMxOrNumElements, 1);
+
+            PHWrite(file, IMxOrNumPts);
+            PHWrite(file, JMxOrNumElements);
+
+
+            RDouble *x = new RDouble [IMxOrNumPts];
+            RDouble *y = new RDouble [IMxOrNumPts];
+            RDouble *z = new RDouble [IMxOrNumPts];
+
+            PHRead(cdata, x, IMxOrNumPts);
+            PHRead(cdata, y, IMxOrNumPts);
+            PHRead(cdata, z, IMxOrNumPts);
+
+            PHWrite(file, x, IMxOrNumPts);
+            PHWrite(file, y, IMxOrNumPts);
+            PHWrite(file, z, IMxOrNumPts);
+
+            delete [] x;
+            delete [] y;
+            delete [] z;
+
+            if (nVisualVariables != 0)
+            {
+                for (int m = 0; m < nvarplot; ++ m)
+                {
+                    RDouble *qq = new RDouble [IMxOrNumPts];
+                    PHRead(cdata, qq, IMxOrNumPts);
+                    PHWrite(file, qq, IMxOrNumPts);
+
+                    delete [] qq;
+                }
+            }
+
+            if (TecioMission == WriteBlock && dimension == THREE_D)
+            {
+                int nTotalFace = 0;
+                PHRead(cdata, &nTotalFace, 1);
+                PHWrite(file, nTotalFace);
+
+                int *nodeNumberOfEachCell = new int[JMxOrNumElements];
+                PHRead(cdata, nodeNumberOfEachCell, JMxOrNumElements);
+                PHWrite(file, nodeNumberOfEachCell, JMxOrNumElements);
+
+                int count = 0;
+                for (int iCell = 0; iCell < JMxOrNumElements; ++ iCell)
+                {
+                    count += nodeNumberOfEachCell[iCell];
+                }
+                int *cell2Node = new int[count];
+                PHRead(cdata, cell2Node, count);
+                PHWrite(file, cell2Node, count);
+
+                int *faceNumberOfEachCell = new int[JMxOrNumElements];
+                PHRead(cdata, faceNumberOfEachCell, JMxOrNumElements);
+                PHWrite(file, faceNumberOfEachCell, JMxOrNumElements);
+
+                count = 0;
+                for (int iCell = 0; iCell < JMxOrNumElements; ++ iCell)
+                {
+                    count += faceNumberOfEachCell[iCell];
+                }
+                int *cell2Face = new int[count];
+                PHRead(cdata, cell2Face, count);
+                PHWrite(file, cell2Face, count);
+
+                int *nodeNumberOfEachFace = new int[nTotalFace];
+                PHRead(cdata, nodeNumberOfEachFace, nTotalFace);
+                PHWrite(file, nodeNumberOfEachFace, nTotalFace);
+
+                count = 0;
+                for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+                {
+                    count += nodeNumberOfEachFace[iFace];
+                }
+
+                int *face2Node = new int[count];
+                PHRead(cdata, face2Node, count);
+                PHWrite(file, face2Node, count);
+
+                delete [] nodeNumberOfEachCell;
+                delete [] cell2Node;
+                delete [] faceNumberOfEachCell;
+                delete [] cell2Face;
+                delete [] nodeNumberOfEachFace;
+                delete [] face2Node;
+            }
+            else
+            {
+                int *face2node = new int [JMxOrNumElements * 4];
+                PHRead(cdata, face2node, JMxOrNumElements * 4);
+                PHWrite(file, face2node, JMxOrNumElements * 4);
+                delete [] face2node;
+            }
+
+            PHRead(cdata, &TecioMission, 1);
+            PHWrite(file, TecioMission);
+        }
+    }
+
+    file.seekp(file.tellp());
+    writeIsOver = 1;
+    PHWrite(file, writeIsOver);
+
+    PHSPACE::CloseFile(file);
+}
+
+#ifdef USE_TecplotLib
+DumpToTecio::DumpToTecio(vector<DataContainer *> datalist_in, string filename_in, int visualFlowType)
+{
+    this->datalist = datalist_in;
+    this->filename = filename_in;
+    this->visualFlowType = visualFlowType;
+
+    for (unsigned int iZone = 0; iZone < datalist.size(); ++ iZone)
+    {
+        datalist[iZone]->moveto_begin();
+    }
+    nvarplot = 0;
+}
+
+DumpToTecio::~DumpToTecio()
+{
+
+}
+
+void DumpToTecio::Run()
+{
+    InitVariables();
+    WriteGridFilm();
+    WriteSliceFilm();
+}
+
+void DumpToTecio::WriteGridFilm()
+{
+    if (GetFilename() == "")
+    {
+        return;
+    }
+
+    ostringstream oss0;
+    if (! PHMPI::IsParallelRun())
+    {
+        oss0 << GetFilename();
+    }
+    else
+    {
+        int fileID = PHMPI::GetFileIndexofCurrentProcessor();
+        string finalFileName = PHSPACE::AddSymbolToFileName(GetFilename(), '_', fileID);
+        oss0 << finalFileName;
+    }
+
+    string pltname = oss0.str();
+    const char *filenames = pltname.c_str();
+    
+    string Variable = GetVariables();
+    const char *Variables = Variable.c_str();
+
+    map<int, string> bcnameMap;
+    bcnameMap.insert(pair<int, string>(0 , "NO_BOUNDARY_CONDITION"));
+    bcnameMap.insert(pair<int, string>(1 , "EXTRAPOLATION"));
+    bcnameMap.insert(pair<int, string>(2 , "WALL"));
+    bcnameMap.insert(pair<int, string>(3 , "SYMMETRY"));
+    bcnameMap.insert(pair<int, string>(4 , "FARFIELD"));
+    bcnameMap.insert(pair<int, string>(5 , "INFLOW"));
+    bcnameMap.insert(pair<int, string>(6 , "OUTFLOW"));
+    bcnameMap.insert(pair<int, string>(7 , "POLE"));
+    bcnameMap.insert(pair<int, string>(8 , "GENERIC_1"));
+    bcnameMap.insert(pair<int, string>(9 , "GENERIC_2"));
+    bcnameMap.insert(pair<int, string>(10, "GENERIC_3"));
+    bcnameMap.insert(pair<int, string>(52, "PRESSURE_INLET"));
+    bcnameMap.insert(pair<int, string>(62, "PRESSURE_OUTLET"));
+    bcnameMap.insert(pair<int, string>(61, "OUTFLOW_CONFINED"));
+
+    INTEGER4 Debug     = 0;
+    INTEGER4 VIsDouble = 1;
+    INTEGER4 FileType  = 0;
+    INTEGER4 I;
+
+    I = TECINI112((char *) "PHengLEI Grid Videotex",
+                  (char *) Variables,
+                  (char *) filenames,
+                  (char *) ".",
+                  &FileType,
+                  &Debug,
+                  &VIsDouble);
+
+    bool FileIsFull = false;
+
+    uint_t nzones = datalist.size();
+    for (int iZone = 0; iZone < nzones; ++ iZone)
+    {
+        DataContainer *cdata = datalist[iZone];
+        
+        INTEGER4 IMxOrNumPts, JMxOrNumElements, KMxOrNumFaces;
+        INTEGER4 ZoneType;
+               /*ZoneType:      0 -- Ordered
+                                1 -- Lineseg
+                                2 -- Triangle
+                                3 -- Quadrilateral
+                                4 -- tetrahedron
+                                5 -- Brick
+                                6 -- Polygon
+                                7 -- Polyhedron
+                */
+        int GridID;
+        int dimension;
+        int type;
+
+        PHRead(cdata, &GridID, 1);
+        PHRead(cdata, &dimension, 1);
+        PHRead(cdata, &type, 1);
+
+        int TecioMission;
+        PHRead(cdata, &TecioMission, 1);
+
+        while (true)
+        {
+            if (TecioMission == Writecomplete) break;
+
+            if (TecioMission != WriteBoundary && TecioMission != WriteBlock)
+            {
+                TK_Exit::ExceptionExit("Error: teciowrite code is wrong!");
+            }
+
+            int bctype;
+            string bcName;
+
+            if (type == PHSPACE::STRUCTGRID)
+            {
+                ZoneType = TEC_SPACE::ORDERED;
+            }
+            else
+            {
+                if (TecioMission == WriteBoundary)
+                {
+                    ZoneType = TEC_SPACE::FEQUADRILATERAL;
+                }
+                else if (dimension == 2)
+                {
+                    ZoneType = TEC_SPACE::FEPOLYGON;
+                }
+                else
+                {
+                    ZoneType = TEC_SPACE::FEPOLYHEDRON;
+                }
+            }
+
+            if (TecioMission == WriteBoundary)
+            {
+                PHRead(cdata, &bctype, 1);
+                cdata->read_string(bcName);
+
+                if (bcName.empty())
+                {
+                    bcName = bcnameMap[bctype];
+                }
+            }
+
+            PHRead(cdata, &IMxOrNumPts, 1);
+            PHRead(cdata, &JMxOrNumElements, 1);
+            PHRead(cdata, &KMxOrNumFaces, 1);
+
+            INTEGER4 ICellMax           = 0;
+            INTEGER4 JCellMax           = 0;
+            INTEGER4 KCellMax           = 0;
+            double   SolutionTime       = 360.0;
+            INTEGER4 StrandID           = 0;
+            INTEGER4 ParentZone         = 0;
+            INTEGER4 IsBlock            = 1;
+            INTEGER4 NumFaceConnections = 0;
+            INTEGER4 FaceNeighborMode   = 0;
+
+            INTEGER4 TotalNumFaceNodes_Rect = 0;
+            INTEGER4 *node_number_of_each_face;
+
+            if (type == PHSPACE::UNSTRUCTGRID)
+            {
+                if (TecioMission == WriteBoundary)
+                {
+                    PHRead(cdata, &TotalNumFaceNodes_Rect, 1);
+                    node_number_of_each_face = new INTEGER4 [JMxOrNumElements];
+                    PHRead(cdata, node_number_of_each_face, JMxOrNumElements);
+                }
+                else
+                {
+                    PHRead(cdata, &TotalNumFaceNodes_Rect, 1);
+                    node_number_of_each_face = new INTEGER4 [KMxOrNumFaces];
+                    PHRead(cdata, node_number_of_each_face, KMxOrNumFaces);
+                }
+            }
+            INTEGER4 NumConnBndryFaces_Rect  = 0;    /* interface */
+            INTEGER4 TotalNumBndryConns_Rect = 0;
+            INTEGER4 SharConn                = 0;
+
+            ostringstream oss;
+
+            if (TecioMission == WriteBlock)
+            {
+                oss << "Zone"<< GridID << " BLK";
+            }
+            else
+            {
+                oss << "Zone"<< GridID << " " << bcName;
+            }
+
+            //const char * ZoneTitle = Zonetitle.c_str();
+            string Zonetitle = oss.str();
+            const char *ZoneTitle = Zonetitle.c_str();
+
+            I = TECZNE112((char*)ZoneTitle,
+                          &ZoneType,
+                          &IMxOrNumPts,
+                          &JMxOrNumElements,
+                          &KMxOrNumFaces,
+                          &ICellMax,
+                          &JCellMax,
+                          &KCellMax,
+                          &SolutionTime,
+                          &StrandID,
+                          &ParentZone,
+                          &IsBlock,
+                          &NumFaceConnections,
+                          &FaceNeighborMode,
+                          &TotalNumFaceNodes_Rect,
+                          &NumConnBndryFaces_Rect,
+                          &TotalNumBndryConns_Rect,
+                          NULL,
+                          NULL,
+                          NULL,
+                          &SharConn);
+
+            INTEGER4 nTotalNode;
+            PHRead(cdata, &nTotalNode, 1);
+
+            RDouble *x = new RDouble [nTotalNode];
+            RDouble *y = new RDouble [nTotalNode];
+            RDouble *z = new RDouble [nTotalNode];
+            PHRead(cdata, x, nTotalNode);
+            PHRead(cdata, y, nTotalNode);
+            PHRead(cdata, z, nTotalNode);
+
+            INTEGER4 IsDouble = 1;
+            I = TECDAT112(&nTotalNode, x, &IsDouble);
+            I = TECDAT112(&nTotalNode, y, &IsDouble);
+            I = TECDAT112(&nTotalNode, z, &IsDouble);
+
+            int nvarplot = GetNvarplot();
+
+            for (int m = 0; m < nvarplot; ++ m)
+            {
+                RDouble *qq = new RDouble [nTotalNode];
+                PHRead(cdata, qq, nTotalNode);
+                I = TECDAT112(&nTotalNode, qq, &IsDouble);
+                delete [] qq;
+            }
+            
+            if (FileIsFull == false) FileIsFull = true;
+
+            if (type == PHSPACE::UNSTRUCTGRID)
+            {
+                int *face2node = new INTEGER4 [TotalNumFaceNodes_Rect];
+                PHRead(cdata, face2node, TotalNumFaceNodes_Rect);
+
+                INTEGER4 *FaceNodes_Rect = new INTEGER4 [TotalNumFaceNodes_Rect];
+                for (INTEGER4 i = 0; i < TotalNumFaceNodes_Rect; ++ i)
+                {
+                    FaceNodes_Rect[i] = face2node[i] + 1;
+                }
+
+                if (TecioMission == WriteBoundary)
+                {
+                    I = TECNOD112(FaceNodes_Rect);
+                }
+                else
+                {
+                    INTEGER4 *FaceLeftElems  = new INTEGER4[KMxOrNumFaces];
+                    INTEGER4 *FaceRightElems = new INTEGER4[KMxOrNumFaces];
+
+                    int *left_cell_of_face  = new INTEGER4[KMxOrNumFaces];
+                    int *right_cell_of_face = new INTEGER4[KMxOrNumFaces];
+                    PHRead(cdata, left_cell_of_face, KMxOrNumFaces);
+                    PHRead(cdata, right_cell_of_face, KMxOrNumFaces);
+
+                    for (INTEGER4 iFace = 0; iFace < KMxOrNumFaces; ++ iFace)
+                    {
+                        FaceLeftElems [iFace] = left_cell_of_face [iFace] + 1;
+                        FaceRightElems[iFace] = right_cell_of_face[iFace] + 1;
+                        //if (FaceRightElems[iFace] > JMxOrNumElements || FaceRightElems[iFace] < 0) FaceRightElems[iFace] = 0;
+                    }
+
+                    INTEGER4 FaceBndryConnectionCounts = 0;
+                    INTEGER4 FaceBndryConnectionElems  = 0;
+                    INTEGER4 FaceBndryConnectionZones  = 0;
+                
+                    I = TECPOLY112(node_number_of_each_face,
+                                   FaceNodes_Rect,
+                                   FaceLeftElems,
+                                   FaceRightElems,
+                                   &FaceBndryConnectionCounts,
+                                   &FaceBndryConnectionElems,
+                                   &FaceBndryConnectionZones);
+                
+                    delete [] FaceLeftElems;
+                    delete [] FaceRightElems;
+                    delete [] left_cell_of_face;
+                    delete [] right_cell_of_face;
+                }
+                
+                delete [] FaceNodes_Rect;
+                delete [] face2node;
+                delete [] node_number_of_each_face;
+            }
+
+            delete [] x;
+            delete [] y;
+            delete [] z;
+
+            PHRead(cdata, &TecioMission, 1);
+        }
+    }
+
+    I = TECEND112();
+
+    if (FileIsFull == false) remove(filenames);
+    return;
+}
+
+void DumpToTecio::WriteSliceFilm()
+{
+    int visualSlice = GlobalDataBase::GetIntParaFromDB("visualSlice");
+
+    if (GetDim() != THREE_D || visualSlice != 1) return;
+
+
+    string sliceFile = GlobalDataBase::GetStrParaFromDB("sliceFile");
+
+    if (visualFlowType == 1)
+    {
+        //! Average flow.
+        string tempFile = AddSymbolToFileName(sliceFile, "_", "Average");
+        sliceFile = tempFile;
+    }
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady)
+    {
+        int outnstep = PHSPACE::GlobalDataBase::GetIntParaFromDB("outnstep");
+        sliceFile = PHSPACE::AddSymbolToFileName(sliceFile, '_', outnstep);
+    }
+    int fileID = PHMPI::GetFileIndexofCurrentProcessor();
+    sliceFile = PHSPACE::AddSymbolToFileName(sliceFile, '_', fileID);
+    
+    std::ostringstream oss;
+    oss << "title=\"Slice of PHengLEI\"" << endl;
+
+    string Variable = GetVariables();
+    oss << "variables=" << Variable << "\n";
+    
+    int totalNumber = 0;
+    uint_t nZones = datalist.size();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        DataContainer *cdata = datalist[iZone];
+
+        int NumPts = 0;
+        PHRead(cdata, &NumPts, 1);
+
+        totalNumber += NumPts;
+        if (NumPts == 0) continue;
+
+        RDouble *xSlice = new RDouble [NumPts];
+        RDouble *ySlice = new RDouble [NumPts];
+        RDouble *zSlice = new RDouble [NumPts];
+
+        PHRead(cdata, xSlice, NumPts);
+        PHRead(cdata, ySlice, NumPts);
+        PHRead(cdata, zSlice, NumPts);
+
+        int nVarplot = GetNvarplot();
+        vector <RDouble *> qnSlice;
+        qnSlice.resize(nVarplot);
+
+        for (int iVarplot = 0; iVarplot < nVarplot; ++ iVarplot)
+        {
+            qnSlice[iVarplot] = new RDouble [NumPts];
+            PHRead(cdata, qnSlice[iVarplot], NumPts);
+        }
+
+        int wordwidth = 20;
+        for (int iNode = 0; iNode < NumPts; ++ iNode)
+        {
+            oss << setiosflags(ios::left);
+            oss << setiosflags(ios::scientific);
+            oss << setprecision(10);
+            oss << setw(wordwidth) << xSlice[iNode]
+                << setw(wordwidth) << ySlice[iNode]
+                << setw(wordwidth) << zSlice[iNode];
+            for (int iVarplot = 0; iVarplot < nVarplot; ++ iVarplot)
+            {
+                oss << setw(wordwidth) << qnSlice[iVarplot][iNode];
+            }
+            oss << "\n";
+        }
+
+        delete [] xSlice;
+        delete [] ySlice;
+        delete [] zSlice;
+        for (int iVarplot = 0; iVarplot < nVarplot; ++ iVarplot)
+        {
+            delete [] qnSlice[iVarplot];
+        }
+    }
+
+    if (totalNumber != 0)
+    {
+        fstream file;
+        ParallelOpenFile(file, sliceFile, ios_base::out|ios_base::trunc);
+
+        file << oss.str();
+
+        ParallelCloseFile(file);
+    }
+}
+
+void DumpToTecio::InitVariables()
+{
+    //! Average flow of DES statistics.
+    int nVisualVariables = 6;
+    int visualVariables[100] = {0, 1, 2, 3, 4, 11};
+
+    if (visualFlowType == 0)
+    {
+        //! Main flow.
+        nVisualVariables = GlobalDataBase::GetIntParaFromDB("nVisualVariables");
+        GlobalDataBase::GetData("visualVariables", visualVariables, PHINT, nVisualVariables);
+    }
+
+    Post_Visual *postVisualization = new Post_Visual(nVisualVariables, visualVariables, NULL, visualFlowType);
+
+    int nvarplot = postVisualization->GetNumberofVisualVariables();
+
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        using namespace GAS_SPACE;
+
+        int nm    = GlobalDataBase::GetIntParaFromDB("nm");
+        int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+        int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+        int neqn  = nl + nchem;
+
+        nvarplot = nvarplot + 2 * (neqn - nm);
+    }
+
+    SetNvarplot(nvarplot);
+
+    vector<string> title_tecplot;
+    postVisualization->GetBinaryTecplotHeader(title_tecplot);
+    SetVariables(title_tecplot.front());
+
+    FreePointer(postVisualization);
+}
+#endif
+
+DumpToTecplotASCII::DumpToTecplotASCII(vector<DataContainer *> datalist_in, string filename_in, int visualFlowType)
+{
+    this->dataList = datalist_in;
+    this->fileName = filename_in;
+    this->visualFlowType = visualFlowType;
+
+    for (unsigned int iZone = 0; iZone < dataList.size(); ++ iZone)
+    {
+        dataList[iZone]->moveto_begin();
+    }
+    nVariable = 0;
+}
+
+DumpToTecplotASCII::~DumpToTecplotASCII()
+{
+
+}
+
+void DumpToTecplotASCII::InitVariables()
+{
+    //! Average flow of DES statistics.
+    int nVisualVariables = 6;
+    int visualVariables[100] = {0, 1, 2, 3, 4, 11};
+    nVisualVariables = GlobalDataBase::GetIntParaFromDB("nVisualVariables");
+    GlobalDataBase::GetData("visualVariables", visualVariables, PHINT, nVisualVariables);
+
+    Post_Visual *postVisualization = new Post_Visual(nVisualVariables, visualVariables, NULL, visualFlowType);
+
+    int nvarplot = postVisualization->GetNumberofVisualVariables();
+
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        using namespace GAS_SPACE;
+
+        int nm    = GlobalDataBase::GetIntParaFromDB("nm");
+        int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+        int neqn  = nl + nchem;
+
+        nvarplot = nvarplot + 2 * (neqn - nm);
+    }
+
+    SetNvarplot(nvarplot);
+
+    vector<string> title_tecplot;
+    postVisualization->GetASCIITecplotHeader(title_tecplot);
+    SetVariables(title_tecplot.front());
+
+    FreePointer(postVisualization);
+}
+
+void DumpToTecplotASCII::Run()
+{
+    InitVariables();
+    WriteFlowFilm();
+}
+
+void DumpToTecplotASCII::WriteFlowFilm()
+{
+    if (GetFilename() == "")
+    {
+        return;
+    }
+
+    ostringstream ossFileName;
+    if (! PHMPI::IsParallelRun())
+    {
+        ossFileName << GetFilename();
+    }
+    else
+    {
+        int fileID = PHMPI::GetFileIndexofCurrentProcessor();
+        string finalFileName = PHSPACE::AddSymbolToFileName(GetFilename(), '_', fileID);
+        ossFileName << finalFileName;
+    }
+    string flowFileName = ossFileName.str();
+
+    fstream flowFile;
+    OpenFile(flowFile, flowFileName, ios_base::out|ios_base::trunc);
+    flowFile << setiosflags(ios::left);
+    flowFile << setiosflags(ios::scientific);
+    flowFile << setprecision(10);
+    flowFile << Variables << endl;
+
+    map <int, string> bcNameMap;
+    bcNameMap.insert(pair<int, string>(0 , "NO_BOUNDARY_CONDITION"));
+    bcNameMap.insert(pair<int, string>(1 , "EXTRAPOLATION"));
+    bcNameMap.insert(pair<int, string>(2 , "WALL"));
+    bcNameMap.insert(pair<int, string>(3 , "SYMMETRY"));
+    bcNameMap.insert(pair<int, string>(4 , "FARFIELD"));
+    bcNameMap.insert(pair<int, string>(5 , "INFLOW"));
+    bcNameMap.insert(pair<int, string>(6 , "OUTFLOW"));
+    bcNameMap.insert(pair<int, string>(7 , "POLE"));
+    bcNameMap.insert(pair<int, string>(8 , "GENERIC_1"));
+    bcNameMap.insert(pair<int, string>(9 , "GENERIC_2"));
+    bcNameMap.insert(pair<int, string>(10, "GENERIC_3"));
+    bcNameMap.insert(pair<int, string>(52, "PRESSURE_INLET"));
+    bcNameMap.insert(pair<int, string>(62, "PRESSURE_OUTLET"));
+    bcNameMap.insert(pair<int, string>(61, "OUTFLOW_CONFINED"));
+
+    uint_t nzones = dataList.size();
+    for (int iZone = 0; iZone < nzones; ++ iZone)
+    {
+        DataContainer *cdata = dataList[iZone];
+
+        int GridID, dimension, type, dumpMission;
+
+        PHRead(cdata, &GridID, 1);
+        PHRead(cdata, &dimension, 1);
+        PHRead(cdata, &type, 1);
+        PHRead(cdata, &dumpMission, 1);
+
+        while (true)
+        {
+            if (dumpMission == Writecomplete) break;
+
+            if (dumpMission != WriteBoundary && dumpMission != WriteBlock)
+            {
+                TK_Exit::ExceptionExit("Error: flow file write code is wrong!");
+            }
+
+            int bcType;
+            string bcName;
+            if (dumpMission == WriteBoundary)
+            {
+                PHRead(cdata, &bcType, 1);
+                cdata->read_string(bcName);
+
+                if (bcName.empty())
+                {
+                    bcName = bcNameMap[bcType];
+                }
+            }
+
+            ostringstream ossZoneTitle;
+            if (dumpMission == WriteBlock)
+            {
+                ossZoneTitle << "\"Zone" << GridID << " BLK" << "\"";
+            }
+            else
+            {
+                ossZoneTitle << "\"Zone" << GridID << " " << bcName << "\"";
+            }
+
+            if (type == PHSPACE::STRUCTGRID)
+            {
+                DumpOrderedFlow(flowFile, cdata, ossZoneTitle.str());
+            }
+            else if (type == PHSPACE::UNSTRUCTGRID)
+            {
+                if (dumpMission == WriteBoundary)
+                {
+                    DumpFlowByCellTopo(flowFile, cdata, ossZoneTitle.str());
+                }
+                else
+                {
+                    DumpFlowByFaceTopo(flowFile, cdata, ossZoneTitle.str());
+                }
+            }
+            else
+            {
+                TK_Exit::ExceptionExit("Error: flow file write code is wrong! Grid type is not right");
+            }
+
+            PHRead(cdata, &dumpMission, 1);
+        }
+    }
+
+    CloseFile(flowFile);
+}
+
+void DumpToTecplotASCII::DumpFlowByFaceTopo(fstream &flowFile, DataContainer *data, string zoneTitle)
+{
+    int NumPts, NumElements, NumFaces, TotalNumFaceNodes_Rect;
+
+    PHRead(data, &NumPts, 1);
+    PHRead(data, &NumElements, 1);
+    PHRead(data, &NumFaces, 1);
+    PHRead(data, &TotalNumFaceNodes_Rect, 1);
+
+    int *node_number_of_each_face = new int [NumFaces];
+    PHRead(data, node_number_of_each_face, NumFaces);
+
+    int nTotalNode;
+    PHRead(data, &nTotalNode, 1);
+
+    RDouble *x = new RDouble [nTotalNode];
+    RDouble *y = new RDouble [nTotalNode];
+    RDouble *z = new RDouble [nTotalNode];
+    PHRead(data, x, nTotalNode);
+    PHRead(data, y, nTotalNode);
+    PHRead(data, z, nTotalNode);
+
+    RDouble **qFiled = NewPointer2<RDouble> (nVariable, nTotalNode);
+    for (int iVariable = 0; iVariable < nVariable; ++ iVariable)
+    {
+        PHRead(data, qFiled[iVariable], nTotalNode);
+    }
+
+    int *face2node = new int [TotalNumFaceNodes_Rect];
+    PHRead(data, face2node, TotalNumFaceNodes_Rect);
+
+    int *left_cell_of_face  = new int [NumFaces];
+    int *right_cell_of_face = new int [NumFaces];
+    PHRead(data, left_cell_of_face , NumFaces);
+    PHRead(data, right_cell_of_face, NumFaces);
+
+    flowFile << "zone T = " << zoneTitle << "\n";
+    if (PHSPACE::GetDim() == TWO_D)
+    {
+        flowFile << "ZoneType = FEPolygon\n";
+    }
+    else
+    {
+        flowFile << "ZoneType = FEPolyhedron\n";
+    }
+    
+    flowFile << "Nodes    = " << nTotalNode << "\n";
+    flowFile << "Faces    = " << NumFaces << "\n";
+    flowFile << "Elements = " << NumElements << "\n";
+    flowFile << "TotalNumFaceNodes = " << TotalNumFaceNodes_Rect << "\n";
+    flowFile << "NumConnectedBoundaryFaces = 0\n";
+    flowFile << "TotalNumBoundaryConnections = 0\n";
+
+    int wordWidth = 20;
+    int nWordOfLine = 5;
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        flowFile << setw(wordWidth) << x[iNode];
+        if ((iNode + 1) % nWordOfLine == 0) 
+        {
+            flowFile << "\n";
+        }
+    }
+    if (nTotalNode % nWordOfLine != 0) flowFile << "\n";
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        flowFile << setw(wordWidth) << y[iNode];
+        if ((iNode + 1) % nWordOfLine == 0) 
+        {
+            flowFile << "\n";
+        }
+    }
+    if (nTotalNode % nWordOfLine != 0) flowFile << "\n";
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        flowFile << setw(wordWidth) << z[iNode];
+        if ((iNode + 1) % nWordOfLine == 0) 
+        {
+            flowFile << "\n";
+        }
+    }
+    if (nTotalNode % nWordOfLine != 0) flowFile << "\n";
+
+    for (int iVariable = 0; iVariable < nVariable; ++ iVariable)
+    {
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            flowFile << setw(wordWidth) << qFiled[iVariable][iNode];
+            if ((iNode + 1) % nWordOfLine == 0) 
+            {
+                flowFile << "\n";
+            }
+        }
+        if (nTotalNode % nWordOfLine != 0) flowFile << "\n";
+    }
+
+    if (PHSPACE::GetDim() == THREE_D)
+    {
+        for (int iFace = 0; iFace < NumFaces; ++ iFace)
+        {
+            flowFile << node_number_of_each_face[iFace] << " ";
+            if ((iFace + 1) % nWordOfLine == 0) flowFile << "\n";
+        }
+        if (NumFaces % nWordOfLine != 0) flowFile << "\n";
+    }
+
+    int count = 0;
+    for (int iFace = 0; iFace < NumFaces; ++ iFace)
+    {
+        for (int iNode = 0; iNode < node_number_of_each_face[iFace]; ++ iNode)
+        {
+            flowFile << face2node[count] + 1 << " ";
+            count ++;
+        }
+        flowFile << "\n";
+    }
+
+    for (int iFace = 0; iFace < NumFaces; ++ iFace)
+    {
+        flowFile << left_cell_of_face[iFace] + 1 << " ";
+        if ((iFace + 1) % nWordOfLine == 0) flowFile << "\n";
+    }
+    if (NumFaces % nWordOfLine != 0) flowFile << "\n";
+
+    int right;
+    for (int iFace = 0; iFace < NumFaces; ++ iFace)
+    {
+        right = right_cell_of_face[iFace] + 1;
+        if (right > NumElements || right < 0) right = 0;
+
+        flowFile << right << " ";
+        if ((iFace + 1) % nWordOfLine == 0) flowFile << "\n";
+    }
+    if (NumFaces % nWordOfLine != 0) flowFile << "\n";
+
+    delete [] x;
+    delete [] y;
+    delete [] z;
+    delete [] node_number_of_each_face;
+    delete [] face2node;
+    delete [] left_cell_of_face;
+    delete [] right_cell_of_face;
+    DelPointer2(qFiled);
+}
+
+void DumpToTecplotASCII::DumpFlowByCellTopo(fstream &flowFile, DataContainer *data, string zoneTitle)
+{
+    int NumPts, NumElements, NumFaces, TotalNumFaceNodes_Rect;
+    
+    PHRead(data, &NumPts, 1);
+    PHRead(data, &NumElements, 1);
+    PHRead(data, &NumFaces, 1);
+    PHRead(data, &TotalNumFaceNodes_Rect, 1);
+
+    int *node_number_of_each_cell = new int [NumElements];
+    PHRead(data, node_number_of_each_cell, NumElements);
+
+    int nTotalNode;
+    PHRead(data, &nTotalNode, 1);
+
+    RDouble *x = new RDouble [nTotalNode];
+    RDouble *y = new RDouble [nTotalNode];
+    RDouble *z = new RDouble [nTotalNode];
+    PHRead(data, x, nTotalNode);
+    PHRead(data, y, nTotalNode);
+    PHRead(data, z, nTotalNode);
+
+    RDouble **qFiled = NewPointer2<RDouble> (nVariable, nTotalNode);
+    for (int iVariable = 0; iVariable < nVariable; ++ iVariable)
+    {
+        PHRead(data, qFiled[iVariable], nTotalNode);
+    }
+
+    int *cell2node = new int [TotalNumFaceNodes_Rect];
+    PHRead(data, cell2node, TotalNumFaceNodes_Rect);
+
+    flowFile << "zone T = " << zoneTitle << "\n";
+    flowFile << "N = " << nTotalNode << "\n";
+    flowFile << "E = " << NumElements << "\n";
+    flowFile << "f = FEPOINT" << "\n";
+    flowFile << "ET = quadrilateral" << "\n";
+
+    int wordWidth = 20;
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        flowFile << setw(wordWidth) << x[iNode]
+                 << setw(wordWidth) << y[iNode]
+                 << setw(wordWidth) << z[iNode];
+        for (int iVariable = 0; iVariable < nVariable; ++ iVariable)
+        {
+            flowFile << setw(wordWidth) << qFiled[iVariable][iNode];
+        }
+        flowFile << "\n";
+    }
+
+    int count = 0;
+    for (int iCell = 0; iCell < NumElements; ++ iCell)
+    {
+        for (int iNode = 0; iNode < 4; ++ iNode)
+        {
+            flowFile << cell2node[count] + 1 << "  ";
+            count ++;
+        }
+        flowFile << "\n";
+    }
+
+    delete [] x;
+    delete [] y;
+    delete [] z;
+    delete [] node_number_of_each_cell;
+    delete [] cell2node;
+    DelPointer2(qFiled);
+}
+
+void DumpToTecplotASCII::DumpOrderedFlow(fstream &flowFile, DataContainer *data, string zoneTitle)
+{
+    int IMx, JMx, KMx;
+    int nTotalNode;
+
+    PHRead(data, &IMx, 1);
+    PHRead(data, &JMx, 1);
+    PHRead(data, &KMx, 1);
+    PHRead(data, &nTotalNode, 1);
+
+    flowFile << "zone T = " << zoneTitle << "\n";
+    flowFile << "I = " << IMx << "\n";
+    flowFile << "J = " << JMx << "\n";
+    flowFile << "K = " << KMx << "\n";
+    flowFile << "f = BLOCK" << "\n";
+
+    RDouble *x = new RDouble [nTotalNode];
+    RDouble *y = new RDouble [nTotalNode];
+    RDouble *z = new RDouble [nTotalNode];
+    PHRead(data, x, nTotalNode);
+    PHRead(data, y, nTotalNode);
+    PHRead(data, z, nTotalNode);
+
+    RDouble **qFiled = NewPointer2<RDouble> (nVariable, nTotalNode);
+    for (int iVariable = 0; iVariable < nVariable; ++ iVariable)
+    {
+        PHRead(data, qFiled[iVariable], nTotalNode);
+    }
+
+    int wordWidth = 20;
+    int nWordOfLine = 5;
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        flowFile << setw(wordWidth) << x[iNode];
+        if ((iNode + 1) % nWordOfLine == 0) 
+        {
+            flowFile << "\n";
+        }
+    }
+    if (nTotalNode % nWordOfLine != 0) flowFile << "\n";
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        flowFile << setw(wordWidth) << y[iNode];
+        if ((iNode + 1) % nWordOfLine == 0) 
+        {
+            flowFile << "\n";
+        }
+    }
+    if (nTotalNode % nWordOfLine != 0) flowFile << "\n";
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        flowFile << setw(wordWidth) << z[iNode];
+        if ((iNode + 1) % nWordOfLine == 0) 
+        {
+            flowFile << "\n";
+        }
+    }
+    if (nTotalNode % nWordOfLine != 0) flowFile << "\n";
+
+    for (int iVariable = 0; iVariable < nVariable; ++ iVariable)
+    {
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            flowFile << setw(wordWidth) << qFiled[iVariable][iNode];
+            if ((iNode + 1) % nWordOfLine == 0)
+            {
+                flowFile << "\n";
+            }
+        }
+        if (nTotalNode % nWordOfLine != 0) flowFile << "\n";
+    }
+
+    delete [] x;
+    delete [] y;
+    delete [] z;
+    DelPointer2(qFiled);
+}
+
+void write_string(fstream &file, string &cs)
+{
+    int nlen = static_cast<int>(cs.length());
+    PHWrite(file, nlen);
+
+    char *data = new char [nlen+1];
+
+    cs.copy(data, nlen);
+    data[nlen] = '\0';
+
+    PHWrite(file, data, nlen+1);
+
+    delete [] data;
+}
+
+void read_string(fstream &file, string &cs)
+{
+    int nlen = 0;
+    PHRead(file, nlen);
+
+    char *data = new char[nlen+1];
+
+    PHRead(file, data, nlen+1);
+    
+    cs = data;
+
+    delete [] data;
+}
+
+PHCutPlane::PHCutPlane()
+{
+    title  = 0;
+    nTitle = 0;
+    neqn   = 0;
+    data   = 0;
+
+    x = 0;
+    y = 0;
+    z = 0;
+
+    faceIndex[0] = 0;
+    faceIndex[1] = 0;
+    faceIndex[2] = 0;
+    faceIndex[3] = 0;
+    nTotalNode   = 0;
+    nTotalFace   = 0;
+}
+
+PHCutPlane::~PHCutPlane()
+{
+    for (int i = 0; i < nTitle; ++ i)
+    {
+        delete [] title[i];
+    }
+    delete [] title;
+
+    for (int i = 0; i < neqn; ++ i)
+    {
+        delete [] data[i];
+    }
+    delete [] data;
+
+    delete [] x;
+    delete [] y;
+    delete [] z;
+
+    delete [] faceIndex[0];
+    delete [] faceIndex[1];
+    delete [] faceIndex[2];
+    delete [] faceIndex[3];
+}
+
+void PHCutPlane::SortData(RDouble *value)
+{
+    using namespace PHSPACE;
+    vector<DataStruct_Sort< RDouble> > value_list;
+    DataStruct_Sort<RDouble> var;
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        var.value = value[iNode];
+        var.index = iNode;
+        value_list.push_back(var);
+    }
+    sort(value_list.begin(), value_list.end());
+
+    vector<int> index_list;
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        index_list.push_back(value_list[iNode].index);
+    }
+
+    ReorderList(x, index_list);
+    ReorderList(y, index_list);
+    ReorderList(z, index_list);
+
+    for (int m = 0; m < neqn; ++ m)
+    {
+        ReorderList(data[m], index_list);
+    }
+}
+
+void CutPlane(UnstructGrid *grid, RDouble **node_var, int nvar, RDouble cut, PHCutPlane *cutpl, int ndir)
+{
+    int nTotalFace = grid->GetNTotalFace();
+
+    int *node_number_of_each_face = grid->GetNodeNumberOfEachFace();
+    int *face2node = grid->GetFace2Node();
+
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    RDouble *xyz = 0;
+
+    if (ndir == X_DIR)
+    {
+        xyz = x;
+    }
+    else if (ndir == Y_DIR)
+    {
+        xyz = y;
+    }
+    else
+    {
+        xyz = z;
+    }
+
+    RDouble *pmin = grid->GetMinBox();
+    RDouble *pmax = grid->GetMaxBox();
+
+    RDouble mindis, maxdis;
+    grid->GetMinMaxDS(mindis, maxdis);
+
+    RDouble min_tree[3], max_tree[3];
+
+    min_tree[0] = pmin[0] - mindis;
+    min_tree[1] = pmin[1] - mindis;
+    min_tree[2] = pmin[2] - mindis;
+                  
+    max_tree[0] = pmax[0] + mindis;
+    max_tree[1] = pmax[1] + mindis;
+    max_tree[2] = pmax[2] + mindis;
+
+    //RDouble tol = mindis / 5;    //! This method may cause problems when slicing.
+
+    RDouble tol = 1.0e-8;
+
+    typedef DataStruct_AdtTree<int, RDouble> AdtTree;
+    AdtTree coor_tree(3, min_tree, max_tree);
+
+    RDouble minwin[3], maxwin[3], coor[3];
+
+    RDouble eps = half * tol;
+
+    vector<vector<RDouble> > var_list;
+    var_list.resize(0);
+
+    vector<RDouble> x_list, y_list, z_list;
+    vector<RDouble> var_l(nvar), var_r(nvar), var(nvar);
+
+    int nodepos = 0;
+    int pcount  = 0;
+    int index;
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        RDouble coor_min =   LARGE;
+        RDouble coor_max = - LARGE;
+
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            int index1 = face2node[nodepos + j];
+            coor_min = MIN(xyz[index1], coor_min);
+            coor_max = MAX(xyz[index1], coor_max);
+        }
+
+        if (cut < coor_min - eps || cut > coor_max + eps)
+        {
+            nodepos += node_number_of_each_face[iFace];
+            continue;
+        }
+
+        RDouble xl, yl, zl, xr, yr, zr, xm, ym, zm;
+
+        int p1, p2;
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            p1 = face2node[nodepos + j];
+            p2 = face2node[nodepos + (j + 1) % node_number_of_each_face[iFace]];
+
+            for (int m = 0; m < nvar; ++ m)
+            {
+                var_l[m] = node_var[m][p1];
+                var_r[m] = node_var[m][p2];
+            }
+
+            xl = x[p1];
+            yl = y[p1];
+            zl = z[p1];
+
+            xr = x[p2];
+            yr = y[p2];
+            zr = z[p2];
+
+            coor_min = MIN(xyz[p1], xyz[p2]);
+            coor_max = MAX(xyz[p1], xyz[p2]);
+
+            if (cut < coor_min - eps || cut > coor_max + eps)
+            {
+                continue;
+            }
+
+            if (ABS(cut - xyz[p1]) <= eps && ABS(cut - xyz[p2]) <= eps)
+            {
+                coor[0] = xl;
+                coor[1] = yl;
+                coor[2] = zl;
+
+                minwin[0] = coor[0] - tol;
+                minwin[1] = coor[1] - tol;
+                minwin[2] = coor[2] - tol;
+
+                maxwin[0] = coor[0] + tol;
+                maxwin[1] = coor[1] + tol;
+                maxwin[2] = coor[2] + tol;
+
+                if (GetCoorIndex(&coor_tree, coor, minwin, maxwin, pcount, index) == 0)
+                {
+                    var_list.push_back(var_l);
+                    x_list.push_back(xl);
+                    y_list.push_back(yl);
+                    z_list.push_back(zl);
+                }
+
+                coor[0] = xr;
+                coor[1] = yr;
+                coor[2] = zr;
+
+                minwin[0] = coor[0] - tol;
+                minwin[1] = coor[1] - tol;
+                minwin[2] = coor[2] - tol;
+
+                maxwin[0] = coor[0] + tol;
+                maxwin[1] = coor[1] + tol;
+                maxwin[2] = coor[2] + tol;
+
+                if (GetCoorIndex(&coor_tree, coor, minwin, maxwin, pcount, index) == 0)
+                {
+                    var_list.push_back(var_r);
+                    x_list.push_back(xr);
+                    y_list.push_back(yr);
+                    z_list.push_back(zr);
+                }
+            }
+            else if (ABS(cut - xyz[p1]) <= eps && ABS(cut - xyz[p2]) > eps)
+            {
+                coor[0] = xl;
+                coor[1] = yl;
+                coor[2] = zl;
+
+                minwin[0] = coor[0] - tol;
+                minwin[1] = coor[1] - tol;
+                minwin[2] = coor[2] - tol;
+
+                maxwin[0] = coor[0] + tol;
+                maxwin[1] = coor[1] + tol;
+                maxwin[2] = coor[2] + tol;
+
+                if (GetCoorIndex(&coor_tree, coor, minwin, maxwin, pcount, index) == 0)
+                {
+                    var_list.push_back(var_l);
+                    x_list.push_back(xl);
+                    y_list.push_back(yl);
+                    z_list.push_back(zl);
+                }
+            }
+            else if (ABS(cut - xyz[p1]) > eps && ABS(cut - xyz[p2]) <= eps)
+            {
+                coor[0] = xr;
+                coor[1] = yr;
+                coor[2] = zr;
+
+                minwin[0] = coor[0] - tol;
+                minwin[1] = coor[1] - tol;
+                minwin[2] = coor[2] - tol;
+
+                maxwin[0] = coor[0] + tol;
+                maxwin[1] = coor[1] + tol;
+                maxwin[2] = coor[2] + tol;
+
+                if (GetCoorIndex(&coor_tree, coor, minwin, maxwin, pcount, index) == 0)
+                {
+                    var_list.push_back(var_r);
+                    x_list.push_back(xr);
+                    y_list.push_back(yr);
+                    z_list.push_back(zr);
+                }
+            }
+            else
+            {
+                RDouble cl, cr;
+                cr = (cut - xyz[p1]) / (xyz[p2] - xyz[p1]);
+                cl = 1 - cr;
+
+                for (int m = 0; m < nvar; ++ m)
+                {
+                    var[m] = cl * var_l[m] + cr * var_r[m];
+                }
+
+                xm = cl * xl + cr * xr;
+                ym = cl * yl + cr * yr;
+                zm = cl * zl + cr * zr;
+
+                coor[0] = xm;
+                coor[1] = ym;
+                coor[2] = zm;
+
+                minwin[0] = coor[0] - tol;
+                minwin[1] = coor[1] - tol;
+                minwin[2] = coor[2] - tol;
+
+                maxwin[0] = coor[0] + tol;
+                maxwin[1] = coor[1] + tol;
+                maxwin[2] = coor[2] + tol;
+
+                if (GetCoorIndex(&coor_tree, coor, minwin, maxwin, pcount, index) == 0)
+                {
+                    var_list.push_back(var);
+                    x_list.push_back(xm);
+                    y_list.push_back(ym);
+                    z_list.push_back(zm);
+                }
+            }
+        }
+
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    cutpl->neqn = nvar;
+    cutpl->nTotalNode = static_cast<int>(var_list.size());
+    cutpl->data = new RDouble * [nvar];
+    for (int m = 0; m < nvar; ++ m)
+    {
+        cutpl->data[m] = new RDouble [cutpl->nTotalNode];
+    }
+
+    cutpl->x = new RDouble [cutpl->nTotalNode];
+    cutpl->y = new RDouble [cutpl->nTotalNode];
+    cutpl->z = new RDouble [cutpl->nTotalNode];
+
+    for (int iNode = 0; iNode < cutpl->nTotalNode; ++ iNode)
+    {
+        cutpl->x[iNode] = x_list[iNode];
+        cutpl->y[iNode] = y_list[iNode];
+        cutpl->z[iNode] = z_list[iNode];
+    }
+
+    for (int iNode = 0; iNode < cutpl->nTotalNode; ++ iNode)
+    {
+        for (int m = 0; m < nvar; ++ m)
+        {
+            cutpl->data[m][iNode] = var_list[iNode][m];
+        }
+    }
+}
+
+void CutPlaneCellCenter(UnstructGrid *grid, RDouble **q_var, int nvar, RDouble cut, PHCutPlane *cutpl, int ndir)
+{
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+
+    int *node_number_of_each_face = grid->GetNodeNumberOfEachFace();
+    int *face2node = grid->GetFace2Node();
+    int *left_cell_of_face = grid->GetLeftCellOfFace();
+    int *right_cell_of_face = grid->GetRightCellOfFace();
+    bool*cut_cell = new bool [nTotalCell];
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        cut_cell[iCell] = false;
+    }
+
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    RDouble *xyz = 0;
+
+    if (ndir == X_DIR)
+    {
+        xyz = x;
+    }
+    else if (ndir == Y_DIR)
+    {
+        xyz = y;
+    }
+    else
+    {
+        xyz = z;
+    }
+
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        int cl = left_cell_of_face[iFace];
+        int cr = right_cell_of_face[iFace];
+
+        RDouble coor_min =   LARGE;
+        RDouble coor_max = - LARGE;
+
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            int index = face2node[nodepos ++];
+            coor_min = MIN(xyz[index], coor_min);
+            coor_max = MAX(xyz[index], coor_max);
+        }
+
+        if ((coor_min - cut) * (coor_max - cut) > 0.0)
+        {
+            continue;
+        }
+
+        cut_cell[cl] = true;
+        if (iFace >= nBoundFace) cut_cell[cr] = true;
+    }
+
+    vector<vector<RDouble> > var_list;
+    vector<RDouble> x_list, y_list, z_list;
+    vector<RDouble> var(nvar);
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        if (cut_cell[iCell])
+        {
+            for (int m = 0; m < nvar; ++ m)
+            {
+                var[m] = q_var[m][iCell];
+            }
+
+            var_list.push_back(var);
+            x_list.push_back(xcc[iCell]);
+            y_list.push_back(ycc[iCell]);
+            z_list.push_back(zcc[iCell]);
+        }
+    }
+
+    cutpl->neqn = nvar;
+    cutpl->nTotalNode = static_cast<int>(var_list.size());
+    cutpl->data = new RDouble * [nvar];
+    for (int m = 0; m < nvar; ++ m)
+    {
+        cutpl->data[m] = new RDouble [cutpl->nTotalNode];
+    }
+
+    cutpl->x = new RDouble [cutpl->nTotalNode];
+    cutpl->y = new RDouble [cutpl->nTotalNode];
+    cutpl->z = new RDouble [cutpl->nTotalNode];
+
+    for (int iNode = 0; iNode < cutpl->nTotalNode; ++ iNode)
+    {
+        cutpl->x[iNode] = x_list[iNode];
+        cutpl->y[iNode] = y_list[iNode];
+        cutpl->z[iNode] = z_list[iNode];
+    }
+
+    for (int iNode = 0; iNode < cutpl->nTotalNode; ++ iNode)
+    {
+        for (int m = 0; m < nvar; ++ m)
+        {
+            cutpl->data[m][iNode] = var_list[iNode][m];
+        }
+    }
+
+    delete [] cut_cell;
+}
+
+LIB_EXPORT Post_VisualWall::Post_VisualWall()
+{
+    nVisualVariables = 0;
+    visualVariables = NULL;
+}
+
+LIB_EXPORT Post_VisualWall::Post_VisualWall(int nVisualNumber, int *visualVariablesType)
+{
+    visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_CP, "cp"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_CF, "cf"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_YPLUS, "yplus"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_QNONDIM, "Q_NonDim"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_QDIM, "Q_Dim(kW/m2)"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_PW, "pw(Pa)"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_TW, "Tw(K)"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_RHOW, "rhow(kg/m3)"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_VX, "Vx(m/s)"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_VY, "Vy(m/s)"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_VZ, "Vz(m/s)"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_VS, "Vs(m/s)"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_ST, "St"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_CH, "Ch"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_RE, "Re_w"));
+    visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_KN, "Kn_wall"));
+
+    int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nChemical > 0)
+    {
+        visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_QT, "Qt(kW/m2)"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_QS, "Qs(kW/m2)"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_QV, "Qv(kW/m2)"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_QE, "Qe(kW/m2)"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_WALL_NS, "Ns"));
+    }
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    if (nSlipBCModel > 0)
+    {
+        visualVariablesMap.insert(pair<int, string>(VISUAL_SLIP_TS, "Tts(K)"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_SLIP_TV, "Tvs(K)"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_SLIP_TE, "Tes(K)"));
+        visualVariablesMap.insert(pair<int, string>(VISUAL_SLIP_DTS, "TtsJump(K)"));
+    }
+
+    nVisualVariables = 0;
+    int tempVariablesType[50];
+    for (int iVar = 0; iVar < nVisualNumber; ++ iVar)
+    {
+        int varTemp = visualVariablesType[iVar];
+        if (visualVariablesMap.find(varTemp) == visualVariablesMap.end())
+        {
+            continue;
+        }
+        tempVariablesType[nVisualVariables] = varTemp;
+        ++ nVisualVariables;
+    }
+
+    GlobalDataBase::UpdateData("nVisualWallVariables", &nVisualVariables, PHINT, 1);
+    visualVariables = NULL;
+    if (nVisualVariables > 0)
+    {
+        visualVariables = new int[nVisualVariables];
+        for (int iVar = 0; iVar < nVisualVariables; ++ iVar)
+        {
+            visualVariables[iVar] = tempVariablesType[iVar];
+        }
+        GlobalDataBase::UpdateData("visualWallVariables", visualVariables, PHINT, nVisualVariables);
+    }
+
+}
+
+LIB_EXPORT Post_VisualWall::~Post_VisualWall()
+{
+    if (nVisualVariables > 0)
+    {
+        delete [] visualVariables;
+        nVisualVariables = 0;
+    }
+}
+
+}
diff --git a/API/PostProcess/src/Post_WriteEnsight.cpp b/API/PostProcess/src/Post_WriteEnsight.cpp
new file mode 100644
index 0000000..76741c2
--- /dev/null
+++ b/API/PostProcess/src/Post_WriteEnsight.cpp
@@ -0,0 +1,1968 @@
+#include "Post_WriteEnsight.h"
+#include "PHIO.h"
+#include "TK_Exit.h"
+#include "TK_Parse.h"
+#include "TK_Log.h"
+#include "IO_FileName.h"
+#include "Glb_Dimension.h"
+#pragma warning(disable : 4996)
+
+namespace PHSPACE
+{
+
+Post_WriteEnsight::Post_WriteEnsight()
+{
+    this->dataOnElement      = false;
+    this->writeFieldEachIter = false;
+
+    int nProcessor = PHMPI::GetNumberOfProcessor();
+
+    if (nProcessor > 1)
+    {
+        fileMethod = MPI_PARALLEL_IO;
+    }
+    else
+    {
+        fileMethod = STDIO_SERIAL;
+    }
+
+    int visualfileType = GlobalDataBase::GetIntParaFromDB("visualfileType");
+    if (visualfileType == Ensight_Binary || fileMethod)
+    {
+        fileType = 0;
+    }
+    else
+    {
+        fileType = 1;
+    }
+}
+
+Post_WriteEnsight::~Post_WriteEnsight()
+{
+
+}
+
+void Post_WriteEnsight::Initialize()
+{
+    string visualfile = "tecflow.dat";
+    GlobalDataBase::GetData("visualfile", &visualfile, PHSTRING, 1);
+
+    visualFileName = ChangeExtensionOfFileName(visualfile, "case");;
+    if (flowType == AverageFlow)
+    {
+        visualFileName = AddSymbolToFileName(visualfile,"_Average");
+    }
+
+    if (flowType == AverageReynoldsStress)
+    {
+        visualFileName = AddSymbolToFileName(visualfile,"_ReynoldsStress");
+    }
+
+    string sentinelfilename = "results/sentinel";
+    fstream sentinelfile;
+    sentinelfile.open(sentinelfilename.c_str(), ios::in);
+    VTKvisual = false;
+    if (!sentinelfile && !visualfile.empty() && (flowType == 0))
+    {
+        VTKFileName = visualfile + ".bak";
+        VTKvisual = true;
+    }
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady)
+    {
+        int outnstep         = GlobalDataBase::GetIntParaFromDB("outnstep");
+        int intervalStepPlot = GlobalDataBase::GetIntParaFromDB("intervalStepPlot");
+
+        this->currentIter = outnstep / intervalStepPlot;
+        stringstream ss;
+        ss << setw(6) << setfill('0') << currentIter;
+        string str;
+        ss >> str;
+
+        writeFieldEachIter = true;
+        this->currentIterStr = str;
+    }
+
+    meshFileName = ChangeExtensionOfFileName(visualfile, "geo");
+}
+
+void Post_WriteEnsight::WriteFile()
+{
+    int intervalStepPlot = GlobalDataBase::GetIntParaFromDB("intervalStepPlot");
+    int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    if (((outIterStep + 1) % intervalStepPlot == 0) && (outIterStep % intervalStepPlot != 0))
+    {
+        return;
+    }
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    if (VTKvisual == true && myid == server)
+    {
+        bool CharacteristicBoundary = false;
+        DumpToVTK DumpToVTK(VTKDataList, VTKFileName, CharacteristicBoundary, this->flowType);
+        DumpToVTK.Run();
+
+        WriteSentinelFile();
+    }
+
+    WriteGeometryFile();
+
+    WriteFiedlData();
+
+    UpdateCaseFile();
+}
+
+void Post_WriteEnsight::WriteGeometryFile()
+{
+    if (!gridChanged)
+    {
+        return;
+    }
+
+    GetFileHandle(meshFileName.c_str());
+
+    if (!fileType)
+    {
+        WriteString("C Binary");
+    }
+
+    WriteString("Geometry File");
+    WriteString("Output by Ensight");
+    WriteString("node id assign");
+    WriteString("element id assign");
+
+    if (fileMethod > STDIO_SERIAL)
+    {
+        WriteGeometryFileParallel();
+    }
+    else
+    {
+        WriteGeometryFileSerial();
+    }
+
+    ClearFileHandle();
+    this->gridChanged = false;
+}
+
+void Post_WriteEnsight::WriteGeometryFileSerial()
+{
+    int ipart  = 1;
+
+    //! Write boundary grid.
+    for (int iBoundary = 0; iBoundary < boundaryGrid.size(); ++ iBoundary)
+    {
+        Grid *grid        = boundaryGrid[iBoundary];
+        int  oriGridIndex = grid->GetZoneID();
+
+        ostringstream ossBlockName;
+        ossBlockName<<"Zone"<<oriGridIndex<<"_"<<boundaryName[iBoundary];
+        string blockName = ossBlockName.str();
+
+        if (grid->Type() == UNSTRUCTGRID)
+        {
+            UnstructGrid *grid_uns      = UnstructGridCast(grid);
+            int           numberOfNodes = grid_uns->GetNTotalNode();
+            int           numberOfCells = grid_uns->GetNTotalCell();
+            RDouble      *x             = grid_uns->GetX();
+            RDouble      *y             = grid_uns->GetY();
+            RDouble      *z             = grid_uns->GetZ();
+
+            int *cell2node              = grid_uns->GetCell2Node();
+            int *nodeNumberOfEachCell   = grid_uns->GetNodeNumberOfEachCell();
+
+            if (fileType)
+            {
+                fprintf(serialFilehandle, "%s\n", "part");
+                fprintf(serialFilehandle, "%10d\n", ipart);
+                fprintf(serialFilehandle, "%s\n", blockName.c_str());
+                ipart += 1;
+
+                fprintf(serialFilehandle, "%s\n", "coordinates");
+                fprintf(serialFilehandle, "%10d\n", numberOfNodes);
+
+                for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(x[iNode]);
+                    fprintf(serialFilehandle, "%12.4E\n", vertex_buf);
+                }
+                for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(y[iNode]);
+                    fprintf(serialFilehandle, "%12.4E\n", vertex_buf);
+                }
+                for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(z[iNode]);
+                    fprintf(serialFilehandle, "%12.4E\n", vertex_buf);
+                }
+
+                fprintf(serialFilehandle, "%s\n", "quad4");
+                fprintf(serialFilehandle, "%10d\n", numberOfCells);
+
+                int subscriptIndex = 0;
+                for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+                {
+                    for (int iNode = 0; iNode < nodeNumberOfEachCell[iCell]; ++ iNode)
+                    {
+                        fprintf(serialFilehandle, "%10d", cell2node[subscriptIndex ++] + 1);
+                    }
+                    fprintf(serialFilehandle, "\n");
+                }
+            }
+            else
+            {
+                WriteString("part");
+                WriteInt(ipart);
+                ipart += 1;
+
+                WriteString(blockName.c_str());
+                WriteString("coordinates");
+
+                WriteInt(numberOfNodes);
+                for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(x[iNode]);
+                    fwrite(&vertex_buf, sizeof(float), 1, serialFilehandle);
+                }
+                for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(y[iNode]);
+                    fwrite(&vertex_buf, sizeof(float), 1, serialFilehandle);
+                }
+                for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(z[iNode]);
+                    fwrite(&vertex_buf, sizeof(float), 1, serialFilehandle);
+                }
+
+                WriteString("quad4");
+                WriteInt(numberOfCells);
+
+                vector<int> buf(4);
+                int subscriptIndex = 0;
+                for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+                {
+                    for (int iNode = 0; iNode < nodeNumberOfEachCell[iCell]; ++ iNode)
+                    {
+                        buf[iNode] = cell2node[subscriptIndex ++] + 1;
+                    }
+
+                    fwrite(buf.data(), sizeof(int), nodeNumberOfEachCell[iCell], serialFilehandle);
+                }
+            }
+        }
+        else
+        {
+            StructGrid *grid_str   = StructGridCast(grid);
+            int         nTotalNode = grid_str->GetNTotalNode();
+
+            int     ni = grid_str->GetNI();
+            int     nj = grid_str->GetNJ();
+            int     nk = grid_str->GetNK();
+            RDouble *x = grid_str->GetX();
+            RDouble *y = grid_str->GetY();
+            RDouble *z = grid_str->GetZ();
+
+            if (fileType)
+            {
+                fprintf(serialFilehandle, "%s\n", "part");
+                fprintf(serialFilehandle, "%10d\n", ipart);
+                fprintf(serialFilehandle, "%s\n", blockName.c_str());
+                ipart += 1;
+
+                fprintf(serialFilehandle, "%s\n", "block");
+                fprintf(serialFilehandle, "%10d%10d%10d\n", ni, nj, nk);
+                for (int iNode = 0; iNode < nTotalNode; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(x[iNode]);
+                    fprintf(serialFilehandle, "%12.4E\n", vertex_buf);
+                }
+                for (int iNode = 0; iNode < nTotalNode; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(y[iNode]);
+                    fprintf(serialFilehandle, "%12.4E\n", vertex_buf);
+                }
+                for (int iNode = 0; iNode < nTotalNode; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(z[iNode]);
+                    fprintf(serialFilehandle, "%12.4E\n", vertex_buf);
+                }
+            }
+            else
+            {
+                WriteString("part");
+                WriteInt(ipart);
+                ipart += 1;
+
+                WriteString(blockName.c_str());
+
+                WriteString("block");
+                WriteInt(ni);
+                WriteInt(nj);
+                WriteInt(nk);
+
+                for (int iNode = 0; iNode < nTotalNode; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(x[iNode]);
+                    fwrite(&vertex_buf, sizeof(float), 1, serialFilehandle);
+                }
+                for (int iNode = 0; iNode < nTotalNode; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(y[iNode]);
+                    fwrite(&vertex_buf, sizeof(float), 1, serialFilehandle);
+                }
+                for (int iNode = 0; iNode < nTotalNode; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(z[iNode]);
+                    fwrite(&vertex_buf, sizeof(float), 1, serialFilehandle);
+                }
+            }
+        }
+    }
+
+
+    //! Write block grid.
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Grid *grid = flowFieldDataOnNode[iZone]->GetGrid();
+        if (!WantVisualField(grid))
+        {
+            continue;
+        }
+
+        int gridIndex = grid->GetZoneID();
+        ostringstream ossBlockName;
+        ossBlockName<<"Zone"<<gridIndex<<"_"<<"BLK";
+        string blockName = ossBlockName.str();
+
+        if (grid->Type() == UNSTRUCTGRID)
+        {
+            UnstructGrid *grid_uns = UnstructGridCast(grid);
+
+            int   numberOfNodes           = grid_uns->GetNTotalNode();
+            int   numberOfCells           = grid_uns->GetNTotalCell();
+            int  *keyActiveOfCells        = grid_uns->GetBlankIndex();
+            int **cellNodeIndexContainer  = grid_uns->GetCell2NodeArray();
+            int  *cellNodeNumberContainer = grid_uns->GetNodeNumberOfEachCell();
+            RDouble *x                    = grid_uns->GetX();
+            RDouble *y                    = grid_uns->GetY();
+            RDouble *z                    = grid_uns->GetZ();
+
+            if (grid_uns->GetDim() != THREE_D)
+            {
+                vector <int> cell_type_count(2, 0);
+                for (int iCell = 0; iCell < numberOfCells; ++iCell)
+                {
+                    if (keyActiveOfCells[iCell] == 1)
+                    {
+                        if (cellNodeNumberContainer[iCell] == 3)
+                            cell_type_count[0] += 1;
+                        else
+                            cell_type_count[1] += 1;
+                    }
+                }
+
+                vector < vector<int> > cell_type_list(2);
+                for (int i = 0; i < 2; ++i)
+                {
+                    cell_type_list[i].resize(cell_type_count[i]);
+                    cell_type_count[i] = 0;
+                }
+
+                for (int iCell = 0; iCell < numberOfCells; ++iCell)
+                {
+                    if (keyActiveOfCells[iCell] == 1)
+                    {
+                        if (cellNodeNumberContainer[iCell] == 3)
+                        {
+                            cell_type_list[0][cell_type_count[0]] = iCell;
+                            cell_type_count[0] += 1;
+                        }
+                        else
+                        {
+                            cell_type_list[1][cell_type_count[1]] = iCell;
+                            cell_type_count[1] += 1;
+                        }
+                    }
+                }
+
+                if (fileType)
+                {
+                    fprintf(serialFilehandle, "%s\n", "part");
+                    fprintf(serialFilehandle, "%10d\n", ipart);
+                    fprintf(serialFilehandle, "%s\n", blockName.c_str());
+                    ipart += 1;
+
+                    fprintf(serialFilehandle, "%s\n", "coordinates");
+                    fprintf(serialFilehandle, "%10d\n", numberOfNodes);
+                    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                    {
+                        float vertex_buf = static_cast<float>(x[iNode]);
+                        fprintf(serialFilehandle, "%12.4E\n", vertex_buf);
+                    }
+                    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                    {
+                        float vertex_buf = static_cast<float>(y[iNode]);
+                        fprintf(serialFilehandle, "%12.4E\n", vertex_buf);
+                    }
+                    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                    {
+                        float vertex_buf = static_cast<float>(z[iNode]);
+                        fprintf(serialFilehandle, "%12.4E\n", vertex_buf);
+                    }
+
+                    vector<string> cell_type_name;
+                    cell_type_name.push_back("tria3");
+                    cell_type_name.push_back("quad4");
+                    for (int i = 0; i < 2; ++i)
+                    {
+                        if (cell_type_count[i] > 0)
+                        {
+                            fprintf(serialFilehandle, "%s\n", cell_type_name[i].c_str());
+                            fprintf(serialFilehandle, "%10d\n", cell_type_count[i]);
+
+                            for (int iCell = 0; iCell < cell_type_count[i]; ++ iCell)
+                            {
+                                for (int iNode = 0; iNode < cellNodeNumberContainer[cell_type_list[i][iCell]]; ++ iNode)
+                                {
+                                    fprintf(serialFilehandle, "%10d", cellNodeIndexContainer[cell_type_list[i][iCell]][iNode] + 1);
+                                }
+                                fprintf(serialFilehandle, "\n");
+                            }
+                        }
+                    }
+                }
+                else
+                {
+                    WriteString("part");
+                    WriteInt(ipart);
+                    ipart += 1;
+
+                    WriteString(blockName.c_str());
+                    WriteString("coordinates");
+                    WriteInt(numberOfNodes);
+                    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                    {
+                        float vertex_buf = static_cast<float>(x[iNode]);
+                        fwrite(&vertex_buf, sizeof(float), 1, serialFilehandle);
+                    }
+                    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                    {
+                        float vertex_buf = static_cast<float>(y[iNode]);
+                        fwrite(&vertex_buf, sizeof(float), 1, serialFilehandle);
+                    }
+                    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                    {
+                        float vertex_buf = static_cast<float>(z[iNode]);
+                        fwrite(&vertex_buf, sizeof(float), 1, serialFilehandle);
+                    }
+
+                    vector<string> cell_type_name;
+                    cell_type_name.push_back("tria3");
+                    cell_type_name.push_back("quad4");
+                    vector<int> buf(4);
+                    for (int i = 0; i < 2; ++i)
+                    {
+                        if (cell_type_count[i] > 0)
+                        {
+                            WriteString(cell_type_name[i].c_str());
+                            WriteInt(cell_type_count[i]);
+                            for (int iCell = 0; iCell < cell_type_count[i]; ++ iCell)
+                            {
+                                for (int iNode = 0; iNode < cellNodeNumberContainer[cell_type_list[i][iCell]]; ++ iNode)
+                                {
+                                    buf[iNode] = cellNodeIndexContainer[cell_type_list[i][iCell]][iNode] + 1;
+                                }
+
+                                fwrite(buf.data(), sizeof(int), cellNodeNumberContainer[cell_type_list[i][iCell]], serialFilehandle);
+                            }
+                        }
+                    }
+                }
+            }
+            else
+            {
+                vector<int> cell_type_count(4, 0);
+                for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+                {
+                    if (keyActiveOfCells[iCell] == 1)
+                    {
+                        if (cellNodeNumberContainer[iCell] == 4)
+                            cell_type_count[0] += 1;
+                        else if (cellNodeNumberContainer[iCell] == 5)
+                            cell_type_count[1] += 1;
+                        else if (cellNodeNumberContainer[iCell] == 6)
+                            cell_type_count[2] += 1;
+                        else if (cellNodeNumberContainer[iCell] == 8)
+                            cell_type_count[3] += 1;
+                        else
+                            continue;
+                    }
+                }
+
+                vector< vector<int> > cell_type_list(4);
+                for (int i = 0; i < 4; ++ i)
+                {
+                    cell_type_list[i].resize(cell_type_count[i]);
+                    cell_type_count[i] = 0;
+                }
+
+                for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+                {
+                    if (keyActiveOfCells[iCell] == 1)
+                    {
+                        if (cellNodeNumberContainer[iCell] == 4)
+                        {
+                            cell_type_list[0][cell_type_count[0]] = iCell;
+                            cell_type_count[0] += 1;
+                        }
+                        else if (cellNodeNumberContainer[iCell] == 5)
+                        {
+                            cell_type_list[1][cell_type_count[1]] = iCell;
+                            cell_type_count[1] += 1;
+                        }
+                        else if (cellNodeNumberContainer[iCell] == 6)
+                        {
+                            cell_type_list[2][cell_type_count[2]] = iCell;
+                            cell_type_count[2] += 1;
+                        }
+                        else if (cellNodeNumberContainer[iCell] == 8)
+                        {
+                            cell_type_list[3][cell_type_count[3]] = iCell;
+                            cell_type_count[3] += 1;
+                        }
+                        else
+                            continue;
+                    }
+                }
+
+                string element[4] = {"tetra4", "pyramid5", "penta6", "hexa8"};
+                if (fileType)
+                {
+                    fprintf(serialFilehandle, "%s\n", "part");
+                    fprintf(serialFilehandle, "%10d\n", ipart);
+                    fprintf(serialFilehandle, "%s\n", blockName.c_str());
+                    ipart += 1;
+
+                    fprintf(serialFilehandle, "%s\n", "coordinates");
+                    fprintf(serialFilehandle, "%10d\n", numberOfNodes);
+                    for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+                    {
+                        float vertex_buf = static_cast<float>(x[iNode]);
+                        fprintf(serialFilehandle, "%12.4E\n", vertex_buf);
+                    }
+                    for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+                    {
+                        float vertex_buf = static_cast<float>(y[iNode]);
+                        fprintf(serialFilehandle, "%12.4E\n", vertex_buf);
+                    }
+                    for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+                    {
+                        float vertex_buf = static_cast<float>(z[iNode]);
+                        fprintf(serialFilehandle, "%12.4E\n", vertex_buf);
+                    }
+
+                    for (int i = 0; i < 4; ++ i)
+                    {
+                        if (cell_type_count[i] > 0)
+                        {
+                            fprintf(serialFilehandle, "%s\n", element[i].c_str());
+                            fprintf(serialFilehandle, "%10d\n", cell_type_count[i]);
+
+                            for (int iCell = 0; iCell < cell_type_count[i]; ++ iCell)
+                            {
+                                for (int iNode = 0; iNode < cellNodeNumberContainer[cell_type_list[i][iCell]]; ++ iNode)
+                                {
+                                    fprintf(serialFilehandle, "%10d", cellNodeIndexContainer[cell_type_list[i][iCell]][iNode] + 1);
+                                }
+                                fprintf(serialFilehandle, "\n");
+                            }
+                        }
+                    }
+                }
+                else
+                {
+                    WriteString("part");
+                    WriteInt(ipart);
+                    ipart += 1;
+
+                    WriteString(blockName.c_str());
+
+                    WriteString("coordinates");
+                    WriteInt(numberOfNodes);
+
+                    for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+                    {
+                        float vertex_buf = static_cast<float>(x[iNode]);
+                        fwrite(&vertex_buf, sizeof(float), 1, serialFilehandle);
+                    }
+                    for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+                    {
+                        float vertex_buf = static_cast<float>(y[iNode]);
+                        fwrite(&vertex_buf, sizeof(float), 1, serialFilehandle);
+                    }
+                    for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+                    {
+                        float vertex_buf = static_cast<float>(z[iNode]);
+                        fwrite(&vertex_buf, sizeof(float), 1, serialFilehandle);
+                    }
+
+                    vector<int> buf(8);
+                    for (int i = 0; i < 4; ++ i)
+                    {
+                        if (cell_type_count[i] > 0)
+                        {
+                            WriteString(element[i].c_str());
+                            WriteInt(cell_type_count[i]);
+                            for (int iCell = 0; iCell < cell_type_count[i]; ++ iCell)
+                            {
+                                for (int iNode = 0; iNode < cellNodeNumberContainer[cell_type_list[i][iCell]]; ++ iNode)
+                                {
+                                    buf[iNode] = cellNodeIndexContainer[cell_type_list[i][iCell]][iNode] + 1;
+                                }
+
+                                fwrite(buf.data(), sizeof(int), cellNodeNumberContainer[cell_type_list[i][iCell]], serialFilehandle);
+                            }
+                        }
+                    }
+                }
+            }
+        }
+        else
+        {
+            StructGrid *grid_str   = StructGridCast(grid);
+            int         nTotalNode = grid_str->GetNTotalNode();
+
+            int     ni = grid_str->GetNI();
+            int     nj = grid_str->GetNJ();
+            int     nk = grid_str->GetNK();
+            RDouble *x = grid_str->GetX();
+            RDouble *y = grid_str->GetY();
+            RDouble *z = grid_str->GetZ();
+
+            if (fileType)
+            {
+                fprintf(serialFilehandle, "%s\n", "part");
+                fprintf(serialFilehandle, "%10d\n", ipart);
+                fprintf(serialFilehandle, "%s\n", blockName.c_str());
+                ipart += 1;
+
+                fprintf(serialFilehandle, "%s\n", "block");
+                fprintf(serialFilehandle, "%10d%10d%10d\n", ni, nj, nk);
+                for (int iNode = 0; iNode < nTotalNode; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(x[iNode]);
+                    fprintf(serialFilehandle, "%12.4E\n", vertex_buf);
+                }
+                for (int iNode = 0; iNode < nTotalNode; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(y[iNode]);
+                    fprintf(serialFilehandle, "%12.4E\n", vertex_buf);
+                }
+                for (int iNode = 0; iNode < nTotalNode; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(z[iNode]);
+                    fprintf(serialFilehandle, "%12.4E\n", vertex_buf);
+                }
+            }
+            else
+            {
+                WriteString("part");
+                WriteInt(ipart);
+                ipart += 1;
+
+                WriteString(blockName.c_str());
+
+                WriteString("block");
+                WriteInt(ni);
+                WriteInt(nj);
+                WriteInt(nk);
+
+                for (int iNode = 0; iNode < nTotalNode; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(x[iNode]);
+                    fwrite(&vertex_buf, sizeof(float), 1, serialFilehandle);
+                }
+                for (int iNode = 0; iNode < nTotalNode; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(y[iNode]);
+                    fwrite(&vertex_buf, sizeof(float), 1, serialFilehandle);
+                }
+                for (int iNode = 0; iNode < nTotalNode; ++iNode)
+                {
+                    float vertex_buf = static_cast<float>(z[iNode]);
+                    fwrite(&vertex_buf, sizeof(float), 1, serialFilehandle);
+                }
+            }
+        }
+    }
+}
+
+void Post_WriteEnsight::WriteGeometryFileParallel()
+{
+    using namespace PHMPI;
+    MPI_Offset offset_my_proc = 0;
+    int        my_zone_num    = 0;
+
+    //! Colloect data length.
+    for (int iBoundary = 0; iBoundary < boundaryGrid.size(); ++ iBoundary)
+    {
+        my_zone_num += 1;
+        Grid *grid = boundaryGrid[iBoundary];
+        if (grid->Type() == UNSTRUCTGRID)
+        {
+            UnstructGrid *grid_uns          = UnstructGridCast(grid);
+            int           numberOfNodes           = grid_uns->GetNTotalNode();
+            int           numberOfCells           = grid_uns->GetNTotalCell();
+
+            offset_my_proc += 80 + sizeof(int) + 80 
+                           +  80 + sizeof(int) + numberOfNodes * sizeof(float) * 3
+                           +  80 + sizeof(int) + numberOfCells * 4 * sizeof(int);
+        }
+        else
+        {
+            StructGrid *grid_str   = StructGridCast(grid);
+            int         nTotalNode = grid_str->GetNTotalNode();
+            offset_my_proc += 80 + sizeof(int) + 80 + 80 + sizeof(int) * 3 +
+                                      nTotalNode * sizeof(float) * 3;
+        }
+    }
+
+    int myid   = GetCurrentProcessorID();
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int proc_id = GetZoneProcessorID(iZone);
+        if (myid != proc_id)
+        {
+            continue;
+        }
+
+        Grid *grid = flowFieldDataOnNode[iZone]->GetGrid();
+        if (!WantVisualField(grid))
+        {
+            continue;
+        }
+
+        my_zone_num += 1;
+        if (grid->Type() == UNSTRUCTGRID)
+        {
+            UnstructGrid *grid_uns                = UnstructGridCast(grid);
+            int           numberOfNodes           = grid_uns->GetNTotalNode();
+            int           numberOfCells           = grid_uns->GetNTotalCell();
+            int          *keyActiveOfCells        = grid_uns->GetBlankIndex();
+            int          *cellNodeNumberContainer = grid_uns->GetNodeNumberOfEachCell();
+            if (grid_uns->GetDim() != THREE_D)
+            {
+                std::vector<int> cell_type_count(2, 0);
+                for (int iCell = 0; iCell < numberOfCells; ++iCell)
+                {
+                    if (keyActiveOfCells[iCell] == 1)
+                    {
+                        if (cellNodeNumberContainer[iCell] == 3)
+                            cell_type_count[0] += 1;
+                        else
+                            cell_type_count[1] += 1;
+                    }
+                }
+
+                offset_my_proc += 80 + sizeof(int) + 80 + 80 + sizeof(int) +
+                    numberOfNodes * sizeof(float) * 3 +
+                    (cell_type_count[0] > 0 ? 1 : 0) * (80 + sizeof(int)) +
+                    cell_type_count[0] * 3 * sizeof(int) +
+                    (cell_type_count[1] > 0 ? 1 : 0) * (80 + sizeof(int)) +
+                    cell_type_count[1] * 4 * sizeof(int);
+            }
+            else if (grid_uns->GetDim() == THREE_D)
+            {
+                std::vector<int> cell_type_count(4, 0);
+                for (int iCell = 0; iCell < numberOfCells; ++iCell)
+                {
+                    if (keyActiveOfCells[iCell] == 1)
+                    {
+                        if (cellNodeNumberContainer[iCell] == 4)
+                            cell_type_count[0] += 1;
+                        else if (cellNodeNumberContainer[iCell] == 5)
+                            cell_type_count[1] += 1;
+                        else if (cellNodeNumberContainer[iCell] == 6)
+                            cell_type_count[2] += 1;
+                        else if (cellNodeNumberContainer[iCell] == 8)
+                            cell_type_count[3] += 1;
+                        else
+                            continue;
+                    }
+                }
+                offset_my_proc += 80 + sizeof(int) + 80 + 80 + sizeof(int) +
+                    numberOfNodes * sizeof(float) * 3 +
+                    (cell_type_count[0] > 0 ? 1 : 0) * (80 + sizeof(int)) +
+                    cell_type_count[0] * 4 * sizeof(int) +
+                    (cell_type_count[1] > 0 ? 1 : 0) * (80 + sizeof(int)) +
+                    cell_type_count[1] * 5 * sizeof(int) +
+                    (cell_type_count[2] > 0 ? 1 : 0) * (80 + sizeof(int)) +
+                    cell_type_count[2] * 6 * sizeof(int) +
+                    (cell_type_count[3] > 0 ? 1 : 0) * (80 + sizeof(int)) +
+                    cell_type_count[3] * 8 * sizeof(int);
+            }
+        }
+        else
+        {
+            StructGrid *grid_str   = StructGridCast(grid);
+            int         nTotalNode = grid_str->GetNTotalNode();
+            offset_my_proc += 80 + sizeof(int) + 80 + 80 + sizeof(int) * 3 +
+                nTotalNode * sizeof(float) * 3;
+        }
+    }
+
+
+    //! mpi scan total offset
+    MPI_Offset offset_write;
+    MPI_Scan(&offset_my_proc, &offset_write, 1, MPI_LONG_LONG, MPI_SUM, MPI_COMM_WORLD);
+    offset_write = offset_write - offset_my_proc + fileOffset;
+
+    int currentZone;
+    MPI_Scan(&my_zone_num, &currentZone, 1, MPI_INT, MPI_SUM, MPI_COMM_WORLD);
+    currentZone = currentZone - my_zone_num + 1;
+
+
+    //! Write boundary grid.
+    for (int iBoundary = 0; iBoundary < boundaryGrid.size(); ++ iBoundary)
+    {
+        Grid *grid = boundaryGrid[iBoundary];
+        int  oriGridIndex = grid->GetZoneID();
+
+        ostringstream ossBlockName;
+        ossBlockName<<"Zone"<<oriGridIndex<<"_"<<boundaryName[iBoundary];
+        string blockName = ossBlockName.str();
+
+        if (grid->Type() == UNSTRUCTGRID)
+        {
+            UnstructGrid *grid_uns      = UnstructGridCast(grid);
+            int           numberOfNodes = grid_uns->GetNTotalNode();
+            int           numberOfCells = grid_uns->GetNTotalCell();
+            RDouble      *x             = grid_uns->GetX();
+            RDouble      *y             = grid_uns->GetY();
+            RDouble      *z             = grid_uns->GetZ();
+
+            int *cell2node              = grid_uns->GetCell2Node();
+            int *nodeNumberOfEachCell   = grid_uns->GetNodeNumberOfEachCell();
+
+            MpiWriteString("part", offset_write);
+            offset_write += 80;
+
+            MpiWriteInt(currentZone, offset_write);
+            offset_write += sizeof(int);
+            currentZone  += 1;
+
+            MpiWriteString(blockName.c_str(), offset_write);
+            offset_write += 80;
+
+            MpiWriteString("coordinates", offset_write);
+            offset_write += 80;
+
+            MpiWriteInt(numberOfNodes, offset_write);
+            offset_write += sizeof(int);
+
+            MPI_Status status;
+            for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+            {
+                float      vertex_buf  = static_cast<float>(x[iNode]);
+                MPI_Offset offset_node = offset_write + iNode * sizeof(float);
+                MPI_File_write_at(mpiFilehandle, offset_node, &vertex_buf, sizeof(float), MPI_BYTE, &status);
+            }
+            for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+            {
+                float      vertex_buf  = static_cast<float>(y[iNode]);
+                MPI_Offset offset_node = offset_write + (numberOfNodes + iNode) * sizeof(float);
+                MPI_File_write_at(mpiFilehandle, offset_node, &vertex_buf, sizeof(float), MPI_BYTE, &status);
+            }
+            for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+            {
+                float      vertex_buf  = static_cast<float>(z[iNode]);
+                MPI_Offset offset_node = offset_write + (numberOfNodes * 2 + iNode) * sizeof(float);
+                MPI_File_write_at(mpiFilehandle, offset_node, &vertex_buf, sizeof(float), MPI_BYTE, &status);
+            }
+            offset_write += numberOfNodes * 3 * sizeof(float);
+
+            MpiWriteString("quad4", offset_write);
+            offset_write += 80;
+            MpiWriteInt(numberOfCells, offset_write);
+            offset_write += sizeof(int);
+
+            vector<int> buf(4);
+            int subscriptIndex = 0;
+            for (int iCell = 0; iCell < numberOfCells; ++iCell)
+            {
+                for (int iNode = 0; iNode < nodeNumberOfEachCell[iCell]; ++ iNode)
+                {
+                    buf[iNode] = cell2node[subscriptIndex ++] + 1;
+                }
+
+                MPI_Offset offset_cell = offset_write + iCell * sizeof(int) * nodeNumberOfEachCell[iCell];
+                MPI_File_write_at(mpiFilehandle, offset_cell, buf.data(), sizeof(int) * nodeNumberOfEachCell[iCell], MPI_BYTE, &status);
+            }
+            offset_write += numberOfCells * 4 * sizeof(int);
+        }
+        else
+        {
+            StructGrid *grid_str   = StructGridCast(grid);
+            int         nTotalNode = grid_str->GetNTotalNode();
+
+            int      ni = grid_str->GetNI();
+            int      nj = grid_str->GetNJ();
+            int      nk = grid_str->GetNK();
+            RDouble *x  = grid_str->GetX();
+            RDouble *y  = grid_str->GetY();
+            RDouble *z  = grid_str->GetZ();
+
+            MpiWriteString("part", offset_write);
+            offset_write += 80;
+
+            MpiWriteInt(currentZone, offset_write);
+            offset_write += sizeof(int);
+            currentZone  += 1;
+
+            MpiWriteString(blockName.c_str(), offset_write);
+            offset_write += 80;
+
+            MpiWriteString("block", offset_write);
+            offset_write += 80;
+
+            MpiWriteInt(ni, offset_write);
+            offset_write += sizeof(int);
+            MpiWriteInt(nj, offset_write);
+            offset_write += sizeof(int);
+            MpiWriteInt(nk, offset_write);
+            offset_write += sizeof(int);
+
+            MPI_Status status;
+            for (int iNode = 0; iNode < nTotalNode; ++iNode)
+            {
+                float      vertex_buf  = static_cast<float>(x[iNode]);
+                MPI_Offset offset_node = offset_write + iNode * sizeof(float);
+                MPI_File_write_at(mpiFilehandle, offset_node, &vertex_buf, sizeof(float), MPI_BYTE, &status);
+            }
+            for (int iNode = 0; iNode < nTotalNode; ++iNode)
+            {
+                float      vertex_buf  = static_cast<float>(y[iNode]);
+                MPI_Offset offset_node = offset_write + (nTotalNode + iNode) * sizeof(float);
+                MPI_File_write_at(mpiFilehandle, offset_node, &vertex_buf, sizeof(float), MPI_BYTE, &status);
+            }
+            for (int iNode = 0; iNode < nTotalNode; ++iNode)
+            {
+                float      vertex_buf  = static_cast<float>(z[iNode]);
+                MPI_Offset offset_node = offset_write + (nTotalNode * 2 + iNode) * sizeof(float);
+                MPI_File_write_at(mpiFilehandle, offset_node, &vertex_buf, sizeof(float), MPI_BYTE, &status);
+            }
+            offset_write += nTotalNode * 3 * sizeof(float);
+        }
+    }
+
+
+    //! Write block grid.
+    for (int iZone = 0; iZone < flowFieldDataOnNode.size(); ++ iZone)
+    {
+        int proc_id = GetZoneProcessorID(iZone);
+        if (myid != proc_id)
+        {
+            continue;
+        }
+
+        Grid *grid = flowFieldDataOnNode[iZone]->GetGrid();
+        if (!WantVisualField(grid))
+        {
+            continue;
+        }
+
+        int gridIndex = grid->GetZoneID();
+        ostringstream ossBlockName;
+        ossBlockName<<"Zone"<<gridIndex<<"_"<<"BLK";
+        string blockName = ossBlockName.str();
+
+        if (grid->Type() == UNSTRUCTGRID)
+        {
+            UnstructGrid *grid_uns = UnstructGridCast(grid);
+
+            int   numberOfNodes           = grid_uns->GetNTotalNode();
+            int   numberOfCells           = grid_uns->GetNTotalCell();
+            int  *keyActiveOfCells        = grid_uns->GetBlankIndex();
+            int **cellNodeIndexContainer  = grid_uns->GetCell2NodeArray();
+            int  *cellNodeNumberContainer = grid_uns->GetNodeNumberOfEachCell();
+            RDouble *x                    = grid_uns->GetX();
+            RDouble *y                    = grid_uns->GetY();
+            RDouble *z                    = grid_uns->GetZ();
+
+            if (grid_uns->GetDim() != THREE_D)
+            {
+                vector <int> cell_type_count(2, 0);
+                for (int iCell = 0; iCell < numberOfCells; ++iCell)
+                {
+                    if (keyActiveOfCells[iCell] == 1)
+                    {
+                        if (cellNodeNumberContainer[iCell] == 3)
+                            cell_type_count[0] += 1;
+                        else
+                            cell_type_count[1] += 1;
+                    }
+                }
+
+                vector < vector<int> > cell_type_list(2);
+                for (int i = 0; i < 2; ++i)
+                {
+                    cell_type_list[i].resize(cell_type_count[i]);
+                    cell_type_count[i] = 0;
+                }
+
+                for (int iCell = 0; iCell < numberOfCells; ++iCell)
+                {
+                    if (keyActiveOfCells[iCell] == 1)
+                    {
+                        if (cellNodeNumberContainer[iCell] == 3)
+                        {
+                            cell_type_list[0][cell_type_count[0]] = iCell;
+                            cell_type_count[0] += 1;
+                        }
+                        else
+                        {
+                            cell_type_list[1][cell_type_count[1]] = iCell;
+                            cell_type_count[1] += 1;
+                        }
+                    }
+                }
+
+                MpiWriteString("part", offset_write);
+                offset_write += 80;
+
+                MpiWriteInt(currentZone, offset_write);
+                offset_write += sizeof(int);
+                currentZone  += 1;
+
+                MpiWriteString(blockName.c_str(), offset_write);
+                offset_write += 80;
+
+                MpiWriteString("coordinates", offset_write);
+                offset_write += 80;
+
+                MpiWriteInt(numberOfNodes, offset_write);
+                offset_write += sizeof(int);
+
+                MPI_Status status;
+                for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                {
+                    float      vertex_buf  = static_cast<float>(x[iNode]);
+                    MPI_Offset offset_node = offset_write + iNode * sizeof(float);
+                    MPI_File_write_at(mpiFilehandle, offset_node, &vertex_buf, sizeof(float), MPI_BYTE, &status);
+                }
+                for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                {
+                    float      vertex_buf  = static_cast<float>(y[iNode]);
+                    MPI_Offset offset_node = offset_write + (numberOfNodes + iNode) * sizeof(float);
+                    MPI_File_write_at(mpiFilehandle, offset_node, &vertex_buf, sizeof(float), MPI_BYTE, &status);
+                }
+                for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                {
+                    float      vertex_buf  = static_cast<float>(z[iNode]);
+                    MPI_Offset offset_node = offset_write + (numberOfNodes * 2 + iNode) * sizeof(float);
+                    MPI_File_write_at(mpiFilehandle, offset_node, &vertex_buf, sizeof(float), MPI_BYTE, &status);
+                }
+                offset_write += numberOfNodes * 3 * sizeof(float);
+
+                vector<string> cell_type_name;
+                cell_type_name.push_back("tria3");
+                cell_type_name.push_back("quad4");
+
+                vector<int> buf(4);
+                for (int i = 0; i < 2; ++i)
+                {
+                    if (cell_type_count[i] > 0)
+                    {
+                        MpiWriteString(cell_type_name[i].c_str(), offset_write);
+                        offset_write += 80;
+                        MpiWriteInt(cell_type_count[i], offset_write);
+                        offset_write += sizeof(int);
+
+                        for (int iCell = 0; iCell < cell_type_count[i]; ++iCell)
+                        {
+                            for (int iNode = 0; iNode < cellNodeNumberContainer[cell_type_list[i][iCell]]; ++ iNode)
+                            {
+                                buf[iNode] = cellNodeIndexContainer[cell_type_list[i][iCell]][iNode] + 1;
+                            }
+
+                            MPI_Offset offset_cell = offset_write + iCell * sizeof(int) * cellNodeNumberContainer[cell_type_list[i][iCell]];
+                            MPI_File_write_at(mpiFilehandle, offset_cell, buf.data(), sizeof(int) * cellNodeNumberContainer[cell_type_list[i][iCell]], MPI_BYTE, &status);
+                        }
+                        offset_write += cell_type_count[i] * (i == 0 ? 3 : 4) * sizeof(int);
+                    }
+                }
+            }
+            else
+            {
+                vector<int> cell_type_count(4, 0);
+                for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+                {
+                    if (keyActiveOfCells[iCell] == 1)
+                    {
+                        if (cellNodeNumberContainer[iCell] == 4)
+                            cell_type_count[0] += 1;
+                        else if (cellNodeNumberContainer[iCell] == 5)
+                            cell_type_count[1] += 1;
+                        else if (cellNodeNumberContainer[iCell] == 6)
+                            cell_type_count[2] += 1;
+                        else if (cellNodeNumberContainer[iCell] == 8)
+                            cell_type_count[3] += 1;
+                        else
+                            continue;
+                    }
+                }
+
+                vector< vector<int> > cell_type_list(4);
+                for (int i = 0; i < 4; ++ i)
+                {
+                    cell_type_list[i].resize(cell_type_count[i]);
+                    cell_type_count[i] = 0;
+                }
+
+                for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+                {
+                    if (keyActiveOfCells[iCell] == 1)
+                    {
+                        if (cellNodeNumberContainer[iCell] == 4)
+                        {
+                            cell_type_list[0][cell_type_count[0]] = iCell;
+                            cell_type_count[0] += 1;
+                        }
+                        else if (cellNodeNumberContainer[iCell] == 5)
+                        {
+                            cell_type_list[1][cell_type_count[1]] = iCell;
+                            cell_type_count[1] += 1;
+                        }
+                        else if (cellNodeNumberContainer[iCell] == 6)
+                        {
+                            cell_type_list[2][cell_type_count[2]] = iCell;
+                            cell_type_count[2] += 1;
+                        }
+                        else if (cellNodeNumberContainer[iCell] == 8)
+                        {
+                            cell_type_list[3][cell_type_count[3]] = iCell;
+                            cell_type_count[3] += 1;
+                        }
+                        else
+                            continue;
+                    }
+                }
+
+                MpiWriteString("part", offset_write);
+                offset_write += 80;
+
+                MpiWriteInt(currentZone, offset_write);
+                offset_write += sizeof(int);
+                currentZone  += 1;
+
+                MpiWriteString(blockName.c_str(), offset_write);
+                offset_write += 80;
+
+                MpiWriteString("coordinates", offset_write);
+                offset_write += 80;
+
+                MpiWriteInt(numberOfNodes, offset_write);
+                offset_write += sizeof(int);
+
+                MPI_Status status;
+                for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                {
+                    float      vertex_buf  = static_cast<float>(x[iNode]);
+                    MPI_Offset offset_node = offset_write + iNode * sizeof(float);
+                    MPI_File_write_at(mpiFilehandle, offset_node, &vertex_buf, sizeof(float), MPI_BYTE, &status);
+                }
+                for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                {
+                    float      vertex_buf  = static_cast<float>(y[iNode]);
+                    MPI_Offset offset_node = offset_write + (numberOfNodes + iNode) * sizeof(float);
+                    MPI_File_write_at(mpiFilehandle, offset_node, &vertex_buf, sizeof(float), MPI_BYTE, &status);
+                }
+                for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                {
+                    float      vertex_buf  = static_cast<float>(z[iNode]);
+                    MPI_Offset offset_node = offset_write + (numberOfNodes * 2 + iNode) * sizeof(float);
+                    MPI_File_write_at(mpiFilehandle, offset_node, &vertex_buf, sizeof(float), MPI_BYTE, &status);
+                }
+                offset_write += numberOfNodes * 3 * sizeof(float);
+
+                string element[4] = {"tetra4", "pyramid5", "penta6", "hexa8"};
+                int     element_vertex_num[4] = {4, 5, 6, 8};
+                vector<int> buf(8);
+                for (int i = 0; i < 4; ++ i)
+                {
+                    if (cell_type_count[i] > 0)
+                    {
+                        MpiWriteString(element[i].c_str(), offset_write);
+                        offset_write += 80;
+                        MpiWriteInt(cell_type_count[i], offset_write);
+                        offset_write += sizeof(int);
+
+                        for (int iCell = 0; iCell < cell_type_count[i]; ++ iCell)
+                        {
+                            for (int iNode = 0; iNode < cellNodeNumberContainer[cell_type_list[i][iCell]]; ++ iNode)
+                            {
+                                buf[iNode] = cellNodeIndexContainer[cell_type_list[i][iCell]][iNode] + 1;
+                            }
+
+                            MPI_Offset offset_cell = offset_write + iCell * sizeof(int) * cellNodeNumberContainer[cell_type_list[i][iCell]];
+                            MPI_File_write_at(mpiFilehandle, offset_cell, buf.data(), sizeof(int) * cellNodeNumberContainer[cell_type_list[i][iCell]], MPI_BYTE, &status);
+                        }
+                        offset_write += cell_type_count[i] * element_vertex_num[i] * sizeof(int);
+                    }
+                }
+            }
+        }
+        else
+        {
+            StructGrid *grid_str   = StructGridCast(grid);
+            int         nTotalNode = grid_str->GetNTotalNode();
+
+            int     ni = grid_str->GetNI();
+            int     nj = grid_str->GetNJ();
+            int     nk = grid_str->GetNK();
+            RDouble *x = grid_str->GetX();
+            RDouble *y = grid_str->GetY();
+            RDouble *z = grid_str->GetZ();
+
+            MpiWriteString("part", offset_write);
+            offset_write += 80;
+
+            MpiWriteInt(currentZone, offset_write);
+            offset_write += sizeof(int);
+            currentZone  += 1;
+
+            MpiWriteString(blockName.c_str(), offset_write);
+            offset_write += 80;
+
+            MpiWriteString("block", offset_write);
+            offset_write += 80;
+
+            MpiWriteInt(ni, offset_write);
+            offset_write += sizeof(int);
+            MpiWriteInt(nj, offset_write);
+            offset_write += sizeof(int);
+            MpiWriteInt(nk, offset_write);
+            offset_write += sizeof(int);
+
+            MPI_Status status;
+            for (int iNode = 0; iNode < nTotalNode; ++iNode)
+            {
+                float      vertex_buf  = static_cast<float>(x[iNode]);
+                MPI_Offset offset_node = offset_write + iNode * sizeof(float);
+                MPI_File_write_at(mpiFilehandle, offset_node, &vertex_buf, sizeof(float), MPI_BYTE, &status);
+            }
+            for (int iNode = 0; iNode < nTotalNode; ++iNode)
+            {
+                float      vertex_buf  = static_cast<float>(y[iNode]);
+                MPI_Offset offset_node = offset_write + (nTotalNode + iNode) * sizeof(float);
+                MPI_File_write_at(mpiFilehandle, offset_node, &vertex_buf, sizeof(float), MPI_BYTE, &status);
+            }
+            for (int iNode = 0; iNode < nTotalNode; ++iNode)
+            {
+                float      vertex_buf  = static_cast<float>(z[iNode]);
+                MPI_Offset offset_node = offset_write + (nTotalNode * 2 + iNode) * sizeof(float);
+                MPI_File_write_at(mpiFilehandle, offset_node, &vertex_buf, sizeof(float), MPI_BYTE, &status);
+            }
+            offset_write += nTotalNode * 3 * sizeof(float);
+        }
+    }
+}
+
+void Post_WriteEnsight::WriteFiedlData()
+{
+    if (fileMethod > STDIO_SERIAL)
+    {
+        WriteFiedlDataParallel();
+    }
+    else
+    {
+        WriteFiedlDataSerial();
+    }
+}
+
+void Post_WriteEnsight::WriteFiedlDataSerial()
+{
+    set<int> visualVariables = flowFieldDataOnNode[0]->GetVisualVariables();
+    for (set<int>::iterator varIter = visualVariables.begin(); varIter != visualVariables.end(); ++ varIter)
+    {
+        int     variableType = *varIter;
+        string       varName = flowFieldDataOnNode[0]->GetVariableName(variableType);
+        string fieldFileName = ChangeExtensionOfFileName(visualFileName, varName);
+        if (writeFieldEachIter)
+        {
+            fieldFileName = fieldFileName + currentIterStr;
+        }
+
+        GetFileHandle(fieldFileName.c_str());
+        WriteString("field File");
+
+        int ipart  = 1;
+
+        //! Write boundary grid.
+        for (int iBoundary = 0; iBoundary < boundaryGrid.size(); ++ iBoundary)
+        {
+            Grid *grid = boundaryGrid[iBoundary];
+            if (grid->Type() == UNSTRUCTGRID)
+            {
+                UnstructGrid *grid_uns      = UnstructGridCast(grid);
+                int           numberOfNodes = grid_uns->GetNTotalNode();
+                int           oriGridIndex  = grid->GetZoneID();
+                RDouble      *qn            = (RDouble *)flowFieldDataOnNode[oriGridIndex]->GetVisualNodeVarPtr(varName);
+
+                if (!dataOnElement)
+                {
+                    if (fileType)
+                    {
+                        fprintf(serialFilehandle, "%s\n", "part");
+                        fprintf(serialFilehandle, "%10d\n", ipart);
+                        ipart += 1;
+
+                        fprintf(serialFilehandle, "%s\n", "coordinates");
+                        for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+                        {
+                            int originaNodeIndex = nodeMap[iBoundary][0][iNode];
+                            fprintf(serialFilehandle, "%12.4E\n", qn[originaNodeIndex]);
+                        }
+                    }
+                    else
+                    {
+                        WriteString("part");
+                        WriteInt(ipart);
+                        ipart += 1;
+
+                        WriteString("coordinates");
+                        for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+                        {
+                            int originaNodeIndex = nodeMap[iBoundary][0][iNode];
+                            float buf = static_cast<float>(qn[originaNodeIndex]);
+                            fwrite(&buf, sizeof(float), 1, serialFilehandle);
+                        }
+                    }
+                }
+                else
+                {
+                    TK_Exit::UnexpectedVarValue("dataOnElement", dataOnElement);
+                }
+            }
+            else
+            {
+                StructGrid *grid_str     = StructGridCast(grid);
+                int         nTotalNode   = grid_str->GetNTotalNode();
+                int         oriGridIndex = grid->GetZoneID();
+                RDouble4D  *qn           = (RDouble4D *)flowFieldDataOnNode[oriGridIndex]->GetVisualNodeVarPtr(varName);
+
+                if (!dataOnElement)
+                {
+                    if (fileType)
+                    {
+                        fprintf(serialFilehandle, "%s\n", "part");
+                        fprintf(serialFilehandle, "%10d\n", ipart);
+                        ipart += 1;
+                        fprintf(serialFilehandle, "%s\n", "block");
+
+                        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+                        {
+                            int originaI = nodeMap[iBoundary][0][iNode];
+                            int originaJ = nodeMap[iBoundary][1][iNode];
+                            int originaK = nodeMap[iBoundary][2][iNode];
+
+                            RDouble vertex_buf = (*qn)(originaI, originaJ, originaK, 0);
+                            fprintf(serialFilehandle, "%12.4E\n", vertex_buf);
+                        }
+                    }
+                    else
+                    {
+                        WriteString("part");
+                        WriteInt(ipart);
+                        ipart += 1;
+                        WriteString("block");
+
+                        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+                        {
+                            int originaI = nodeMap[iBoundary][0][iNode];
+                            int originaJ = nodeMap[iBoundary][1][iNode];
+                            int originaK = nodeMap[iBoundary][2][iNode];
+
+                            float vertex_buf = static_cast<float>((*qn)(originaI, originaJ, originaK, 0));
+                            fwrite(&vertex_buf, sizeof(float), 1, serialFilehandle);
+                        }
+                    }
+                }
+            }
+        }
+
+
+        //! Write block grid.
+        for (int iZone = 0; iZone < flowFieldDataOnNode.size(); ++iZone)
+        {
+            Grid *grid = flowFieldDataOnNode[iZone]->GetGrid();
+            if (!WantVisualField(grid))
+            {
+                continue;
+            }
+
+            if (grid->Type() == UNSTRUCTGRID)
+            {
+                UnstructGrid *grid_uns      = UnstructGridCast(grid);
+                int           numberOfNodes = grid_uns->GetNTotalNode();
+                RDouble      *qn            = (RDouble *)flowFieldDataOnNode[iZone]->GetVisualNodeVarPtr(varName);
+
+                if (!dataOnElement)
+                {
+                    if (fileType)
+                    {
+                        fprintf(serialFilehandle, "%s\n", "part");
+                        fprintf(serialFilehandle, "%10d\n", ipart);
+                        ipart += 1;
+
+                        fprintf(serialFilehandle, "%s\n", "coordinates");
+                        for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+                        {
+                            fprintf(serialFilehandle, "%12.4E\n", qn[iNode]);
+                        }
+                    }
+                    else
+                    {
+                        WriteString("part");
+                        WriteInt(ipart);
+                        ipart += 1;
+
+                        WriteString("coordinates");
+                        for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+                        {
+                            float buf = static_cast<float>(qn[iNode]);
+                            fwrite(&buf, sizeof(float), 1, serialFilehandle);
+                        }
+                    }
+                }
+                else
+                {
+                    TK_Exit::UnexpectedVarValue("dataOnElement", dataOnElement);
+                }
+            }
+            else
+            {
+                StructGrid *grid_str = StructGridCast(grid);
+                RDouble4D  *qn       = (RDouble4D *)flowFieldDataOnNode[iZone]->GetVisualNodeVarPtr(varName);
+
+                int ni = grid_str->GetNI();
+                int nj = grid_str->GetNJ();
+                int nk = grid_str->GetNK();
+
+                if (!dataOnElement)
+                {
+                    if (fileType)
+                    {
+                        fprintf(serialFilehandle, "%s\n", "part");
+                        fprintf(serialFilehandle, "%10d\n", ipart);
+                        ipart += 1;
+                        fprintf(serialFilehandle, "%s\n", "block");
+
+                        for (int k = 1; k <= nk; ++ k)
+                        {
+                            for (int j = 1; j <= nj; ++ j)
+                            {
+                                for (int i = 1; i <= ni; ++ i)
+                                {
+                                    RDouble vertex_buf = (*qn)(i, j, k, 0);
+                                    fprintf(serialFilehandle, "%12.4E\n", vertex_buf);
+                                }
+                            }
+                        }
+                    }
+                    else
+                    {
+                        WriteString("part");
+                        WriteInt(ipart);
+                        ipart += 1;
+                        WriteString("block");
+
+                        for (int k = 1; k <= nk; ++ k)
+                        {
+                            for (int j = 1; j <= nj; ++ j)
+                            {
+                                for (int i = 1; i <= ni; ++ i)
+                                {
+                                    float vertex_buf = static_cast<float>((*qn)(i, j, k, 0));
+                                    fwrite(&vertex_buf, sizeof(float), 1, serialFilehandle);
+                                }
+                            }
+                        }
+                    }
+                }
+                else
+                {
+                    TK_Exit::UnexpectedVarValue("dataOnElement", dataOnElement);
+                }
+            }
+        }
+
+        ClearFileHandle();
+    }
+}
+
+void Post_WriteEnsight::WriteFiedlDataParallel()
+{
+    //! Colloect data length.
+    int nZones = static_cast<int>(flowFieldDataOnNode.size());
+
+    MPI_Offset offset_my_proc = 0;
+    int        my_zone_num    = 0;
+
+    for (int iBoundary = 0; iBoundary < boundaryGrid.size(); ++ iBoundary)
+    {
+        my_zone_num += 1;
+        Grid *grid = boundaryGrid[iBoundary];
+        if (grid->Type() == UNSTRUCTGRID)
+        {
+            UnstructGrid *grid_uns      = UnstructGridCast(grid);
+            int           numberOfNodes = grid_uns->GetNTotalNode();
+
+            offset_my_proc += 80 + sizeof(int) + 80 + numberOfNodes * sizeof(float);
+        }
+        else
+        {
+            StructGrid *grid_str   = StructGridCast(grid);
+            int         nTotalNode = grid_str->GetNTotalNode();
+            int         nTotalCell = grid_str->GetNTotalCell();
+
+            if (!dataOnElement)
+            {
+                offset_my_proc += 80 + sizeof(int) + 80 + nTotalNode * sizeof(float);
+            }
+            else
+            {
+                offset_my_proc += 80 + sizeof(int) + 80 + nTotalCell * sizeof(float);
+            }
+        }
+    }
+
+    for (int iZone = 0; iZone < nZones; ++iZone)
+    {
+        if (!flowFieldDataOnNode[iZone])
+        {
+            continue;
+        }
+
+        Grid *grid = flowFieldDataOnNode[iZone]->GetGrid();
+        if (!WantVisualField(grid))
+        {
+            continue;
+        }
+
+        my_zone_num += 1;
+        if (grid->Type() == UNSTRUCTGRID)
+        {
+            UnstructGrid *grid_uns                = UnstructGridCast(grid);
+            int           numberOfNodes           = grid_uns->GetNTotalNode();
+
+            offset_my_proc += 80 + sizeof(int) + 80 + numberOfNodes * sizeof(float);
+        }
+        else
+        {
+            StructGrid *grid_str   = StructGridCast(grid);
+            int         nTotalNode = grid_str->GetNTotalNode();
+            int         nTotalCell = grid_str->GetNTotalCell();
+
+            if (!dataOnElement)
+            {
+                offset_my_proc += 80 + sizeof(int) + 80 + nTotalNode * sizeof(float);
+            }
+            else
+            {
+                offset_my_proc += 80 + sizeof(int) + 80 + nTotalCell * sizeof(float);
+            }
+        }
+    }
+
+    MPI_Offset offsetStart;
+    MPI_Scan(&offset_my_proc, &offsetStart, 1, MPI_LONG_LONG, MPI_SUM, MPI_COMM_WORLD);
+    offsetStart = offsetStart - offset_my_proc + 80;
+    //offset_write = offset_write - offset_my_proc + fileOffset;
+
+    int zoneStartIndex;
+    MPI_Scan(&my_zone_num, &zoneStartIndex, 1, MPI_INT, MPI_SUM, MPI_COMM_WORLD);
+    zoneStartIndex = zoneStartIndex - my_zone_num + 1;
+
+    Post_Visual *visualData = 0;
+    for (int iZone = 0; iZone < flowFieldDataOnNode.size(); ++ iZone)
+    {
+        if (flowFieldDataOnNode[iZone])
+        {
+            visualData = flowFieldDataOnNode[iZone];
+            break;
+        }
+    }
+
+    set<int> visualVariables = visualData->GetVisualVariables();
+    for (set<int>::iterator varIter = visualVariables.begin(); varIter != visualVariables.end(); ++ varIter)
+    {
+        int     variableType = *varIter;
+        string       varName = visualData->GetVariableName(variableType);
+        string fieldFileName = ChangeExtensionOfFileName(visualFileName, varName);
+        if (writeFieldEachIter)
+        {
+            fieldFileName = fieldFileName + currentIterStr;
+        }
+
+        GetFileHandle(fieldFileName.c_str());
+        WriteString("field File");
+
+        int        currentZone  = zoneStartIndex;
+        MPI_Offset offset_write = offsetStart;
+        for (int iBoundary = 0; iBoundary < boundaryGrid.size(); ++ iBoundary)
+        {
+            Grid *grid = boundaryGrid[iBoundary];
+            if (grid->Type() == UNSTRUCTGRID)
+            {
+                UnstructGrid *grid_uns      = UnstructGridCast(grid);
+                int           numberOfNodes = grid_uns->GetNTotalNode();
+                int           oriGridIndex  = grid->GetZoneID();
+                RDouble      *qn            = (RDouble *)flowFieldDataOnNode[oriGridIndex]->GetVisualNodeVarPtr(varName);
+
+                MpiWriteString("part", offset_write);
+                offset_write += 80;
+
+                MpiWriteInt(currentZone, offset_write);
+                offset_write += sizeof(int);
+                currentZone  += 1;
+
+                MpiWriteString("coordinates", offset_write);
+                offset_write += 80;
+
+                MPI_Status status;
+                for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+                {
+                    int originaNodeIndex = nodeMap[iBoundary][0][iNode];
+                    float buf = static_cast<float>(qn[originaNodeIndex]);
+
+                    MPI_Offset offset_cell = offset_write + iNode * sizeof(float);
+                    MPI_File_write_at(mpiFilehandle, offset_cell, &buf, sizeof(float), MPI_BYTE, &status);
+                }
+                offset_write += numberOfNodes * sizeof(float);
+            }
+            else
+            {
+                StructGrid *grid_str     = StructGridCast(grid);
+                int         nTotalNode   = grid_str->GetNTotalNode();
+                int         oriGridIndex = grid->GetZoneID();
+                RDouble4D  *qn           = (RDouble4D *)flowFieldDataOnNode[oriGridIndex]->GetVisualNodeVarPtr(varName);
+
+                MpiWriteString("part", offset_write);
+                offset_write += 80;
+
+                MpiWriteInt(currentZone, offset_write);
+                offset_write += sizeof(int);
+                currentZone  += 1;
+
+                MpiWriteString("block", offset_write);
+                offset_write += 80;
+
+                MPI_Status status;
+                for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+                {
+                    int originaI = nodeMap[iBoundary][0][iNode];
+                    int originaJ = nodeMap[iBoundary][1][iNode];
+                    int originaK = nodeMap[iBoundary][2][iNode];
+
+                    float vertex_buf = static_cast<float>((*qn)(originaI, originaJ, originaK, 0));
+
+                    MPI_Offset offset_node = offset_write + iNode * sizeof(float);
+                    MPI_File_write_at(mpiFilehandle, offset_node, &vertex_buf, sizeof(float), MPI_BYTE, &status);
+                }
+                offset_write += nTotalNode * sizeof(float);
+            }
+        }
+
+        for (int iZone = 0; iZone < nZones; ++iZone)
+        {
+            if (!flowFieldDataOnNode[iZone])
+            {
+                continue;
+            }
+
+            Grid *grid = flowFieldDataOnNode[iZone]->GetGrid();
+            if (!WantVisualField(grid))
+            {
+                continue;
+            }
+
+            if (grid->Type() == UNSTRUCTGRID)
+            {
+                UnstructGrid *grid_uns      = UnstructGridCast(grid);
+                int           numberOfNodes = grid_uns->GetNTotalNode();
+                RDouble      *qn            = (RDouble *)flowFieldDataOnNode[iZone]->GetVisualNodeVarPtr(varName);
+
+                MpiWriteString("part", offset_write);
+                offset_write += 80;
+
+                MpiWriteInt(currentZone, offset_write);
+                offset_write += sizeof(int);
+                currentZone  += 1;
+
+                MpiWriteString("coordinates", offset_write);
+                offset_write += 80;
+
+                MPI_Status status;
+                for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+                {
+                    float buf = static_cast<float>(qn[iNode]);
+
+                    MPI_Offset offset_cell = offset_write + iNode * sizeof(float);
+                    MPI_File_write_at(mpiFilehandle, offset_cell, &buf, sizeof(float), MPI_BYTE, &status);
+                }
+                offset_write += numberOfNodes * sizeof(float);
+            }
+            else
+            {
+                StructGrid *grid_str = StructGridCast(grid);
+                RDouble4D  *qn       = (RDouble4D *)flowFieldDataOnNode[iZone]->GetVisualNodeVarPtr(varName);
+
+                int ni = grid_str->GetNI();
+                int nj = grid_str->GetNJ();
+                int nk = grid_str->GetNK();
+
+                MpiWriteString("part", offset_write);
+                offset_write += 80;
+
+                MpiWriteInt(currentZone, offset_write);
+                offset_write += sizeof(int);
+                currentZone  += 1;
+
+                MpiWriteString("block", offset_write);
+                offset_write += 80;
+
+                MPI_Status status;
+                for (int k = 1; k <= nk; ++ k)
+                {
+                    for (int j = 1; j <= nj; ++ j)
+                    {
+                        for (int i = 1; i <= ni; ++ i)
+                        {
+                            float vertex_buf = static_cast<float>((*qn)(i, j, k, 0));
+
+                            MPI_File_write_at(mpiFilehandle, offset_write, &vertex_buf, sizeof(float), MPI_BYTE, &status);
+                            offset_write += sizeof(float);
+                        }
+                    }
+                }
+            }
+        }
+
+        ClearFileHandle();
+    }
+}
+
+void Post_WriteEnsight::UpdateCaseFile()
+{
+    int myid = PHMPI::GetCurrentProcessorID();
+
+    if (myid == 0)
+    {
+
+        ofstream fout;
+        fout.open(visualFileName.c_str(), ios::out | ios::trunc);
+
+        string fname, fext;
+        GetNameExt(visualFileName, fname, fext, "/");
+
+        if (fout.is_open())
+        {
+            fout << "# CASE for domain visualization\n" << endl;
+            fout << "FORMAT" << endl;
+            fout << "type:			ensight gold\n" << endl;
+            fout << "GEOMETRY" << std::endl;
+            fout << "model:			" + ChangeExtensionOfFileName(fext, "geo") << endl
+                << endl;
+
+            fout << "VARIABLE" << endl;
+
+            set<int> visualVariables = flowFieldDataOnNode[boundaryGrid[0]->GetZoneID()]->GetVisualVariables();
+            for (set<int>::iterator varIter = visualVariables.begin(); varIter != visualVariables.end(); ++ varIter)
+            {
+                int     variableType = *varIter;
+                string       varName = flowFieldDataOnNode[0]->GetVariableName(variableType);
+                string fieldFileName = ChangeExtensionOfFileName(fext, varName);
+                if (writeFieldEachIter)
+                {
+                    fieldFileName = fieldFileName + "******";
+                }
+
+                if (!dataOnElement)
+                {
+                    fout << "scalar per node:		1       " 
+                         << varName
+                         << "      "
+                         << fieldFileName
+                         << std::endl;
+                }
+                else
+                {
+                    fout << "scalar per element:		1       " 
+                         << varName
+                         << "      "
+                         << fieldFileName
+                         << std::endl;
+                }
+            }
+
+            if (!writeFieldEachIter)
+            {
+                fout.close();
+                return;
+            }
+
+            fout << "\nTIME" << endl;
+            fout << "time set:       1" << endl;
+            fout << "number of steps:        " << currentIter + 1 << endl;
+            fout << "filename start number:      0" << endl;
+            fout << "filename increment:         1" << endl;
+            fout << "time values:" << endl;
+            for (int iter = 0; iter <= currentIter; ++ iter)
+            {
+                fout << iter << endl;
+            }
+            fout.close();
+        }
+    }
+}
+
+void Post_WriteEnsight::ClearFieldData()
+{
+    for (int iData = 0; iData < flowFieldDataOnNode.size(); ++ iData)
+    {
+        if (flowFieldDataOnNode[iData])
+        {
+            FreePointer(flowFieldDataOnNode[iData]);
+        }
+    }
+
+    for (unsigned int iZone = 0; iZone < VTKDataList.size(); ++ iZone)
+    {
+        delete VTKDataList[iZone];
+    }
+    VTKDataList.resize(0);
+}
+
+
+void Post_WriteEnsight::GetFileHandle(const char *fileName)
+{
+    if (fileMethod > STDIO_SERIAL)
+    {
+
+        int ret = MPI_File_open(MPI_COMM_WORLD, fileName, MPI_MODE_CREATE | MPI_MODE_WRONLY, MPI_INFO_NULL, &mpiFilehandle);
+        if (ret == MPI_SUCCESS)
+        {
+            ret = MPI_File_get_position(mpiFilehandle, &fileOffset);
+        }
+    }
+    else
+    {
+        serialFilehandle= fopen(fileName, "wb");
+    }
+}
+
+void Post_WriteEnsight::ClearFileHandle()
+{
+    if (fileMethod > STDIO_SERIAL)
+    {
+        MPI_File_close(&mpiFilehandle);
+    }
+    else
+    {
+        fclose(serialFilehandle);
+    }
+}
+
+void Post_WriteEnsight::WriteString(const char *str)
+{
+    char buf[82];
+    strncpy(buf, str, 80);
+    for (int i = static_cast<int>(strlen(buf)); i < 81; ++i)
+        buf[i] = '\0';
+
+    if (fileMethod > STDIO_SERIAL)
+    {
+
+        MPI_Status status;
+        MPI_File_write_at_all(mpiFilehandle, fileOffset, buf, 80, MPI_BYTE, &status);
+
+        fileOffset += 80;
+
+    }
+    else
+    {
+        if (fileType)
+        {
+            fprintf(serialFilehandle, "%s\n", str);
+        }
+        else
+        {
+            fwrite(buf, sizeof(char), 80, serialFilehandle);
+        }
+    }
+}
+
+void Post_WriteEnsight::MpiWriteString(const char *str, MPI_Offset offset)
+{
+    char buf[82];
+    strncpy(buf, str, 80);
+    for (int i = static_cast<int>(strlen(buf)); i < 81; ++i)
+        buf[i] = '\0';
+
+    MPI_Status status;
+    MPI_File_write_at(mpiFilehandle, offset, buf, 80, MPI_BYTE, &status);
+}
+
+void Post_WriteEnsight::MpiWriteInt(int num, MPI_Offset offset)
+{
+    unsigned char  _copybuf[1024];
+    unsigned char *copybuf = _copybuf;
+    memcpy(copybuf, &num, sizeof(int));
+
+    MPI_Status status;
+    MPI_File_write_at(mpiFilehandle, offset, copybuf, sizeof(int), MPI_BYTE, &status);
+}
+
+void Post_WriteEnsight::WriteInt(int num)
+{
+    unsigned char  _copybuf[1024];
+    unsigned char *copybuf = _copybuf;
+    memcpy(copybuf, &num, sizeof(int));
+
+    if (fileMethod > STDIO_SERIAL)
+    {
+        MPI_Status status;
+        MPI_File_write_at_all(mpiFilehandle, fileOffset, copybuf, sizeof(int), MPI_BYTE, &status);
+
+        fileOffset += sizeof(int);
+    }
+    else
+    {
+        if (fileType)
+        {
+            fprintf(serialFilehandle, "%10d\n", num);
+        }
+        else
+        {
+            fwrite(copybuf, sizeof(int), 1, serialFilehandle);
+        }
+    }
+}
+
+
+
+
+
+
+
+
+
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/src/Post_WriteTecplot.cpp b/API/PostProcess/src/Post_WriteTecplot.cpp
new file mode 100644
index 0000000..e42065e
--- /dev/null
+++ b/API/PostProcess/src/Post_WriteTecplot.cpp
@@ -0,0 +1,526 @@
+#include "Post_WriteTecplot.h"
+#include "PHIO.h"
+#include "TK_Exit.h"
+#include "TK_Parse.h"
+#include "IO_FileName.h"
+#include "TK_Log.h"
+#include "Post_Visual.h"
+
+namespace PHSPACE
+{
+Post_WriteTecplot::Post_WriteTecplot()
+{
+    this->visualDataList.resize(0);
+}
+
+Post_WriteTecplot::~Post_WriteTecplot()
+{
+
+}
+
+void Post_WriteTecplot::Initialize()
+{
+    string visualfile = "tecflow.dat";
+    GlobalDataBase::GetData("visualfile", &visualfile, PHSTRING, 1);
+
+    string fname, fext;
+    GetNameExt(visualfile, fname, fext, ".");
+
+    VTKFileName = visualfile;
+    visualFileName = visualfile;
+    VTKvisual = false;
+
+    if (flowType == AverageFlow)
+    {
+        visualFileName = AddSymbolToFileName(visualfile,"_Average");
+    }
+
+    if (flowType == AverageReynoldsStress)
+    {
+        visualFileName = AddSymbolToFileName(visualfile,"_ReynoldsStress");
+    }
+
+    string sentinelfilename = "results/sentinel";
+    fstream sentinelfile;
+    sentinelfile.open(sentinelfilename.c_str(), ios::in);
+
+    if (!sentinelfile && !visualfile.empty() && (flowType == 0))
+    {
+        VTKFileName = visualfile + ".bak";
+        VTKvisual = true;
+    }
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady)
+    {
+        int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+        visualFileName = AddSymbolToFileName(visualFileName, '_', outnstep);
+    }
+}
+
+void Post_WriteTecplot::StoreVisualizationData()
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        DataContainer *cdata = new DataContainer();
+        cdata->moveto_begin();
+
+        int send_proc = GetZoneProcessorID(iZone);
+        int recv_proc = GetZoneFileID(iZone);
+
+        if (myid == send_proc)
+        {
+            StoreVisualizationData(iZone, cdata);
+        }
+
+        PH_Trade(cdata, send_proc, recv_proc, iZone);
+
+        if (myid == recv_proc)
+        {
+            visualDataList.push_back(cdata);
+        }
+        else
+        {
+            delete cdata;
+        }
+    }
+}
+
+void Post_WriteTecplot::StoreVisualizationData(int zoneIndex, DataContainer *cdata)
+{
+    Grid *grid = flowFieldDataOnNode[zoneIndex]->GetGrid();
+    if (grid->Type() == UNSTRUCTGRID)
+    {
+        int gridID = grid->GetZoneID();
+        int dimension = grid->GetDim();
+        int type = grid->Type();
+
+        PHWrite(cdata, gridID);
+        PHWrite(cdata, dimension);
+        PHWrite(cdata, type);
+
+        StoreUnsBoundaryVisualData(zoneIndex, cdata);
+
+        if (WantVisualField(grid))
+        {
+            StoreUnsFieldVisualData(zoneIndex, cdata);
+        }
+
+        int TecioMission = Writecomplete;
+        PHWrite(cdata, TecioMission);
+    }
+    else
+    {
+        int gridID = grid->GetZoneID();
+        int dimension = grid->GetDim();
+        int type = grid->Type();
+
+        PHWrite(cdata, gridID);
+        PHWrite(cdata, dimension);
+        PHWrite(cdata, type);
+
+        StoreStrBoundaryVisualData(zoneIndex, cdata);
+
+        if (WantVisualField(grid))
+        {
+            StoreStrFieldVisualData(zoneIndex, cdata);
+        }
+
+        int TecioMission = Writecomplete;
+        PHWrite(cdata, TecioMission);
+    }
+}
+
+void Post_WriteTecplot::StoreStrBoundaryVisualData(int zoneIndex, DataContainer *cdata)
+{
+    Post_Visual *FieldData = flowFieldDataOnNode[zoneIndex];
+    int nvarplot = FieldData->GetNumberofVisualVariables();
+    int nVisualVariables = nvarplot;
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        int numberOfSpecies = GlobalDataBase::GetIntParaFromDB("numberOfSpecies");
+        nVisualVariables = nVisualVariables + 2 * numberOfSpecies;
+    }
+    RDouble4D **qn = new RDouble4D *[nVisualVariables];
+    FieldData->GetAllVisualNodeVarPtr(qn);
+
+    int TecioMission = WriteBoundary;
+    for (int iBoundary = 0; iBoundary < boundaryGrid.size(); ++ iBoundary)
+    {
+        if (boundaryGrid[iBoundary]->GetZoneID() != zoneIndex)
+        {
+            continue;
+        }
+
+        int bctype    = boundaryType[iBoundary];
+        string bcName = boundaryName[iBoundary];
+
+        PHWrite(cdata, TecioMission);
+        PHWrite(cdata, bctype);
+        cdata->write_string(bcName);
+
+        int ni = StructGridCast(boundaryGrid[iBoundary])->GetNI();
+        int nj = StructGridCast(boundaryGrid[iBoundary])->GetNJ();
+        int nk = StructGridCast(boundaryGrid[iBoundary])->GetNK();
+
+        PHWrite(cdata, ni);
+        PHWrite(cdata, nj);
+        PHWrite(cdata, nk);
+
+        int nTotalNode = boundaryGrid[iBoundary]->GetNTotalNode();
+        PHWrite(cdata, nTotalNode);
+
+        RDouble *xBoundary = boundaryGrid[iBoundary]->GetX();
+        RDouble *yBoundary = boundaryGrid[iBoundary]->GetY();
+        RDouble *zBoundary = boundaryGrid[iBoundary]->GetZ();
+        PHWrite(cdata, xBoundary, nTotalNode);
+        PHWrite(cdata, yBoundary, nTotalNode);
+        PHWrite(cdata, zBoundary, nTotalNode);
+
+        for (int m = 0; m < nVisualVariables; ++ m)
+        {
+            RDouble *qBoundary = new RDouble[nTotalNode];
+
+            for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+            {
+                int originaI = nodeMap[iBoundary][0][iNode];
+                int originaJ = nodeMap[iBoundary][1][iNode];
+                int originaK = nodeMap[iBoundary][2][iNode];
+
+                qBoundary[iNode] = (*qn[m])(originaI, originaJ, originaK, 0);
+            }
+
+            PHWrite(cdata, qBoundary, nTotalNode);
+            delete []qBoundary;
+        }
+    }
+
+    delete []qn;
+}
+
+void Post_WriteTecplot::StoreStrFieldVisualData(int zoneIndex, DataContainer *cdata)
+{
+    int nVisualVariables = flowFieldDataOnNode[zoneIndex]->GetNumberofVisualVariables();
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        int numberOfSpecies = GlobalDataBase::GetIntParaFromDB("numberOfSpecies");
+        nVisualVariables = nVisualVariables + 2 * numberOfSpecies;
+    }
+    RDouble4D **qn = new RDouble4D *[nVisualVariables];
+    flowFieldDataOnNode[zoneIndex]->GetAllVisualNodeVarPtr(qn);
+
+    Grid *grid = flowFieldDataOnNode[zoneIndex]->GetGrid();
+    StructGrid *strGrid = StructGridCast(grid);
+
+    int TecioMission = WriteBlock;
+    PHWrite(cdata, TecioMission);
+
+    int ni = strGrid->GetNI();
+    int nj = strGrid->GetNJ();
+    int nk = strGrid->GetNK();
+
+    PHWrite(cdata, ni);
+    PHWrite(cdata, nj);
+    PHWrite(cdata, nk);
+
+    int nTotalNode = strGrid->GetNTotalNode();
+    PHWrite(cdata, nTotalNode);
+
+    RDouble *x = new RDouble[nTotalNode];
+    RDouble *y = new RDouble[nTotalNode];
+    RDouble *z = new RDouble[nTotalNode];
+
+    RDouble3D &xx = *strGrid->GetStructX();
+    RDouble3D &yy = *strGrid->GetStructY();
+    RDouble3D &zz = *strGrid->GetStructZ();
+
+    int count = 0;
+    for (int k = 1; k <= nk; ++ k)
+    {
+        for (int j = 1; j <= nj; ++ j)
+        {
+            for (int i = 1; i <= ni; ++ i)
+            {
+                x[count] = xx(i, j, k);
+                y[count] = yy(i, j, k);
+                z[count] = zz(i, j, k);
+                count ++;
+            }
+        }
+    }
+
+    PHWrite(cdata, x, nTotalNode);
+    PHWrite(cdata, y, nTotalNode);
+    PHWrite(cdata, z, nTotalNode);
+
+    delete []x;
+    delete []y;
+    delete []z;
+
+    count = 0;
+    for (int m = 0; m < nVisualVariables; ++ m)
+    {
+        RDouble *qq = new RDouble[nTotalNode];
+        for (int k = 1; k <= nk; ++ k)
+        {
+            for (int j = 1; j <= nj; ++ j)
+            {
+                for (int i = 1; i <= ni; ++ i)
+                {
+                    qq[count] = (*qn[m])(i, j, k, 0);
+                    count ++;
+                }
+            }
+        }
+        PHWrite(cdata, qq, nTotalNode);
+        delete []qq;
+        count = 0;
+    }
+
+    delete []qn;
+}
+
+void Post_WriteTecplot::StoreUnsBoundaryVisualData(int zoneIndex, DataContainer *cdata)
+{
+    Post_Visual *FieldData = flowFieldDataOnNode[zoneIndex];
+    int nvarplot         = FieldData->GetNumberofVisualVariables();
+    int nVisualVariables = nvarplot;
+    int nchem            = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        int numberOfSpecies = GlobalDataBase::GetIntParaFromDB("numberOfSpecies");
+        nVisualVariables = nVisualVariables + 2 * numberOfSpecies;
+    }
+    RDouble **qn = new RDouble *[nVisualVariables];
+    FieldData->GetAllVisualNodeVarPtr(qn);
+
+    UnstructGrid *grid = UnstructGridCast(FieldData->GetGrid());
+    int *node_number_of_each_face = grid->GetNodeNumberOfEachFace();
+    int *face2node = grid->GetFace2Node();
+    int nBoundFace = grid->GetNBoundFace();
+    int NumPts = grid->GetNTotalNode();
+
+    RDouble **qFaceCenter = NewPointer2<RDouble>(nVisualVariables, nBoundFace);
+    for (int m = 0; m < nVisualVariables; ++ m)
+    {
+        int nodeCount = 0;
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            RDouble value = 0.0;
+            for (int iNode = 0; iNode < node_number_of_each_face[iFace]; ++ iNode)
+            {
+                int nodeIndex = face2node[nodeCount + iNode];
+                value += qn[m][nodeIndex];
+            }
+
+            qFaceCenter[m][iFace] = value / node_number_of_each_face[iFace];
+            nodeCount += node_number_of_each_face[iFace];
+        }
+    }
+
+    int TecioMission = WriteBoundary;
+    for (int iBoundary = 0; iBoundary < boundaryGrid.size(); ++ iBoundary)
+    {
+        if (boundaryGrid[iBoundary]->GetZoneID() != zoneIndex)
+        {
+            continue;
+        }
+
+        int bctype    = boundaryType[iBoundary];
+        string bcName = boundaryName[iBoundary];
+
+        PHWrite(cdata, TecioMission);
+        PHWrite(cdata, bctype);
+        cdata->write_string(bcName);
+
+        int nTotalNode = boundaryGrid[iBoundary]->GetNTotalNode();
+        int nTotalFace = boundaryGrid[iBoundary]->GetNTotalFace();
+        int nTotalCell = boundaryGrid[iBoundary]->GetNTotalCell();
+        PHWrite(cdata, nTotalNode);
+        PHWrite(cdata, nTotalCell);
+        PHWrite(cdata, nTotalFace);
+
+        int TotalNumFaceNodes_Rect = nTotalCell * 4;
+        PHWrite(cdata, &TotalNumFaceNodes_Rect, 1);
+
+        int *node_number_of_each_cell = UnstructGridCast(boundaryGrid[iBoundary])->GetNodeNumberOfEachCell();
+        PHWrite(cdata, node_number_of_each_cell, nTotalCell);
+
+        PHWrite(cdata, nTotalNode);
+        RDouble *xBoundary = boundaryGrid[iBoundary]->GetX();
+        RDouble *yBoundary = boundaryGrid[iBoundary]->GetY();
+        RDouble *zBoundary = boundaryGrid[iBoundary]->GetZ();
+        PHWrite(cdata, xBoundary, nTotalNode);
+        PHWrite(cdata, yBoundary, nTotalNode);
+        PHWrite(cdata, zBoundary, nTotalNode);
+
+        for (int m = 0; m < nVisualVariables; ++ m)
+        {
+            RDouble *qBoundary = new RDouble[nTotalNode];
+            for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+            {
+                int nodeIndex = nodeMap[iBoundary][0][iNode];
+
+                if (nodeIndex < NumPts)
+                {
+                    qBoundary[iNode] = qn[m][nodeIndex];
+                }
+                else
+                {
+                    int faceIndex = nodeIndex - NumPts;
+                    qBoundary[iNode] = qFaceCenter[m][faceIndex];
+                }
+            }
+
+            PHWrite(cdata, qBoundary, nTotalNode);
+            delete []qBoundary;
+        }
+
+        int *cell2node = UnstructGridCast(boundaryGrid[iBoundary])->GetCell2Node();
+        PHWrite(cdata, cell2node, TotalNumFaceNodes_Rect);
+    }
+
+    delete []qn;
+    DelPointer2(qFaceCenter);
+}
+
+void Post_WriteTecplot::StoreUnsFieldVisualData(int zoneIndex, DataContainer *cdata)
+{
+    int nVisualVariables = flowFieldDataOnNode[zoneIndex]->GetNumberofVisualVariables();
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        int numberOfSpecies = GlobalDataBase::GetIntParaFromDB("numberOfSpecies");
+        nVisualVariables = nVisualVariables + 2 * numberOfSpecies;
+    }
+    RDouble **qn = new RDouble *[nVisualVariables];
+    flowFieldDataOnNode[zoneIndex]->GetAllVisualNodeVarPtr(qn);
+
+    UnstructGrid *grid = UnstructGridCast(flowFieldDataOnNode[zoneIndex]->GetGrid());
+    int numberOfNodes = grid->GetNTotalNode();
+    int numberOfCells = grid->GetNTotalCell();
+    int numberOfFaces = grid->GetNTotalFace();
+
+    int *faceNodeNumberContainer  = grid->GetNodeNumberOfEachFace();
+    int *faceNodeIndexContainer   = grid->GetFace2Node();
+
+    int *leftCellIndexContainer   = grid->GetLeftCellOfFace();
+    int *rightCellIndexContainer  = grid->GetRightCellOfFace();
+
+    int totalNumFaceNodes = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        totalNumFaceNodes += faceNodeNumberContainer[iFace];
+    }
+
+    int TecioMission = WriteBlock;
+    PHWrite(cdata, TecioMission);
+    PHWrite(cdata, numberOfNodes);
+    PHWrite(cdata, numberOfCells);
+    PHWrite(cdata, numberOfFaces);
+    PHWrite(cdata, totalNumFaceNodes);
+    PHWrite(cdata, faceNodeNumberContainer, numberOfFaces);
+
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    PHWrite(cdata, numberOfNodes);
+    PHWrite(cdata, x, numberOfNodes);
+    PHWrite(cdata, y, numberOfNodes);
+    PHWrite(cdata, z, numberOfNodes);
+
+    for (int iVarible = 0; iVarible < nVisualVariables; ++ iVarible)
+    {
+        RDouble *qq = qn[iVarible];
+        PHWrite(cdata, qq, numberOfNodes);
+    }
+
+    PHWrite(cdata, faceNodeIndexContainer, totalNumFaceNodes);
+
+    PHWrite(cdata, leftCellIndexContainer , numberOfFaces);
+    PHWrite(cdata, rightCellIndexContainer, numberOfFaces);
+
+    delete []qn;
+}
+
+void Post_WriteTecplot::WriteFile()
+{
+    int intervalStepPlot = GlobalDataBase::GetIntParaFromDB("intervalStepPlot");
+    int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    if (((outIterStep + 1) % intervalStepPlot == 0) && (outIterStep % intervalStepPlot != 0))
+    {
+        return;
+    }
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    if (VTKvisual == true && myid == server)
+    {
+        bool CharacteristicBoundary = false;
+        DumpToVTK DumpToVTK(VTKDataList, VTKFileName, CharacteristicBoundary, this->flowType);
+        DumpToVTK.Run();
+
+        WriteSentinelFile();
+    }
+
+    if (visualDataList.size() > 0)
+    {
+        int visualfileType = GlobalDataBase::GetIntParaFromDB("visualfileType");
+        if (visualfileType == Tecplot_Binary)
+        {
+#ifdef USE_TecplotLib
+            DumpToTecio dumptotecio(visualDataList, visualFileName, this->flowType);
+            dumptotecio.Run();
+#else
+            ostringstream WarningInfo;
+            WarningInfo << "Warning : visualfileType = 0 is not right, dump flow data into ASCII file! \n";
+            PrintToWindow(WarningInfo);
+
+            DumpToTecplotASCII dumpToTecplotASCII(visualDataList, visualFileName, this->flowType);
+            dumpToTecplotASCII.Run();
+#endif
+        }
+        else if (visualfileType == Tecplot_ASCII)
+        {
+            DumpToTecplotASCII dumpToTecplotASCII(visualDataList, visualFileName, this->flowType);
+            dumpToTecplotASCII.Run();
+        }
+        else
+        {
+            TK_Exit::UnexpectedVarValue("visualfileType", visualfileType);
+        }
+    }
+}
+
+void Post_WriteTecplot::ClearFieldData()
+{
+    for (int iData = 0; iData < flowFieldDataOnNode.size(); ++ iData)
+    {
+        if (flowFieldDataOnNode[iData])
+        {
+            FreePointer(flowFieldDataOnNode[iData]);
+        }
+    }
+
+    for (unsigned int iZone = 0; iZone < VTKDataList.size(); ++ iZone)
+    {
+        delete VTKDataList[iZone];
+    }
+    VTKDataList.resize(0);
+
+    for (unsigned int iZone = 0; iZone < visualDataList.size(); ++ iZone)
+    {
+        delete visualDataList[iZone];
+    }
+    visualDataList.resize(0);
+}
+
+}
\ No newline at end of file
diff --git a/API/PostProcess/src/Post_WriteVisualFile.cpp b/API/PostProcess/src/Post_WriteVisualFile.cpp
new file mode 100644
index 0000000..d1e315e
--- /dev/null
+++ b/API/PostProcess/src/Post_WriteVisualFile.cpp
@@ -0,0 +1,1055 @@
+#include "Post_WriteVisualFile.h"
+#include "Post_WriteTecplot.h"
+#include "Post_WriteEnsight.h"
+#include "Solver.h"
+#include "Glb_Dimension.h"
+#include "HyList.h"
+#include "TK_Log.h"
+#include "TK_Exit.h"
+
+namespace PHSPACE
+{
+
+Post_WriteVisualFile *generateVisualFile = 0;
+
+Post_WriteVisualFile::Post_WriteVisualFile()
+{
+    this->nodeMap.resize(0);
+    this->gridMap.resize(0);
+    this->VTKDataList.resize(0);
+    this->boundaryName.resize(0);
+    this->boundaryType.resize(0);
+    this->boundaryGrid.resize(0);
+    this->boundaryGridNeedConstruct = true;
+    this->gridChanged = false;
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    this->flowFieldDataOnNode.resize(nZones);
+}
+
+Post_WriteVisualFile::~Post_WriteVisualFile()
+{
+    for (int iGrid = 0; iGrid < this->boundaryGrid.size(); ++ iGrid)
+    {
+        delete this->boundaryGrid[iGrid];
+        DelPointer2(this->nodeMap[iGrid]);
+    }
+}
+
+void Post_WriteVisualFile::Run(int flowTypeIn)
+{
+    this->flowType = flowTypeIn;
+
+    Initialize();
+    ConstructBoundaryGrid();
+    ComputeNodeData();
+    StoreVTKData();
+    StoreVisualizationData();
+    WriteFile();
+    ClearFieldData();
+}
+
+void Post_WriteVisualFile::BoundaryGridNeedConstruct()
+{
+    this->boundaryGridNeedConstruct = true;
+}
+
+void Post_WriteVisualFile::ConstructBoundaryGrid()
+{
+    if (this->boundaryGridNeedConstruct != true)
+    {
+        return;
+    }
+
+    for (int iGrid = 0; iGrid < this->boundaryGrid.size(); ++ iGrid)
+    {
+        delete this->boundaryGrid[iGrid];
+        DelPointer2(this->nodeMap[iGrid]);
+    }
+    this->nodeMap.resize(0);
+    this->gridMap.resize(0);
+    this->boundaryName.resize(0);
+    this->boundaryType.resize(0);
+    this->boundaryGrid.resize(0);
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    int myid = GetCurrentProcessorID();
+    for (int iZone =  0; iZone < nZones; ++ iZone)
+    {
+        int iZoneProcess = GetZoneProcessorID(iZone);
+        if (myid == iZoneProcess)
+        {
+            Grid *grid = GetGrid(iZone);
+            int gridType = grid->Type();
+            if (gridType == STRUCTGRID)
+            {
+                ConstructStrBoundaryGrid(grid);
+            }
+            else
+            {
+                ConstructUnsBoundaryGrid(grid);
+            }
+        }
+    }
+
+    this->boundaryGridNeedConstruct = false;
+    this->gridChanged = true;
+}
+
+void Post_WriteVisualFile::ConstructStrBoundaryGrid(Grid *gridIn)
+{
+    StructGrid *StrGrid = StructGridCast(gridIn);
+    int gridIndex = StrGrid->GetZoneID();
+
+    StructBCSet *structBCSet = StrGrid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int s_st[3] = {0}, s_ed[3] = {0};
+    RDouble3D &xx = * StrGrid->GetStructX();
+    RDouble3D &yy = * StrGrid->GetStructY();
+    RDouble3D &zz = * StrGrid->GetStructZ();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int bctype = bcregion->GetBCType();
+        if (IsInterface(bctype)) continue;
+
+        string bcName = bcregion->GetBCName();
+
+        int nDim = GetDim();
+        GridID *index = new GridID(gridIndex);
+        Grid *grid = new StructGrid();
+        grid->InitGrid(index, 0, nDim, STRUCTGRID);
+        StructGrid *strGrid = StructGridCast(grid);
+
+        int *s_lr3d = bcregion->GetFaceDirectionIndex();
+        for (int m = 0; m < nDim; ++ m)
+        {
+            s_st[m] = bcregion->GetStartPoint(m);
+            s_ed[m] = bcregion->GetEndPoint(m);
+            if (bcregion->GetFaceDirection() == m)
+            {
+                if (s_st[m] > 1 || s_lr3d[m] == 1)
+                {
+                    s_st[m] += 1;
+                    s_ed[m] += 1;
+                }
+            }
+            else
+            {
+                s_ed[m] += 1;
+            }
+        }
+
+        int ist = s_st[0];
+        int ied = s_ed[0];
+        int jst = s_st[1];
+        int jed = s_ed[1];
+        int kst = s_st[2];
+        int ked = s_ed[2];
+
+        if (nDim == TWO_D)
+        {
+            kst = 1;
+            ked = 1;
+        }
+
+        int ii = ied - ist + 1;
+        int jj = jed - jst + 1;
+        int kk = ked - kst + 1;
+        strGrid->SetNI(ii);
+        strGrid->SetNJ(jj);
+        strGrid->SetNK(kk);
+
+        int iCell = ii - 1 ? ii - 1 : 1;
+        int jCell = jj - 1 ? jj - 1 : 1;
+        int kCell = kk - 1 ? kk - 1 : 1;
+        int nTotalCell = iCell * jCell * kCell;
+        int nTotalNode = ii * jj * kk;
+        strGrid->SetNTotalNode(nTotalNode);
+        strGrid->SetNTotalCell(nTotalCell);
+
+        RDouble *x = new RDouble [nTotalNode];
+        RDouble *y = new RDouble [nTotalNode];
+        RDouble *z = new RDouble [nTotalNode];
+
+        int **currentNodeMap = NewPointer2<int>(3, nTotalNode);
+        int nodeCount = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    x[nodeCount] = xx(i, j, k);
+                    y[nodeCount] = yy(i, j, k);
+                    z[nodeCount] = zz(i, j, k);
+
+                    currentNodeMap[0][nodeCount] = i;
+                    currentNodeMap[1][nodeCount] = j;
+                    currentNodeMap[2][nodeCount] = k;
+                    nodeCount ++;
+                }
+            }
+        }
+        strGrid->SetX(x);
+        strGrid->SetY(y);
+        strGrid->SetZ(z);
+
+        boundaryGrid.push_back(grid);
+        gridMap.push_back(gridIndex);
+        nodeMap.push_back(currentNodeMap);
+        boundaryName.push_back(bcName);
+        boundaryType.push_back(bctype);
+    }
+}
+
+void Post_WriteVisualFile::ConstructUnsBoundaryGrid(Grid *gridIn)
+{
+    UnstructGrid *UnsGrid = UnstructGridCast(gridIn);
+
+    int gridIndex                 = UnsGrid->GetZoneID();
+    int nTotalNode                = UnsGrid->GetNTotalNode();
+    int nBoundFace                = UnsGrid->GetNBoundFace();
+    int *node_number_of_each_face = UnsGrid->GetNodeNumberOfEachFace();
+
+    RDouble *x = UnsGrid->GetX();
+    RDouble *y = UnsGrid->GetY();
+    RDouble *z = UnsGrid->GetZ();
+
+    RDouble *xfc = UnsGrid->GetFaceCenterX();
+    RDouble *yfc = UnsGrid->GetFaceCenterY();
+    RDouble *zfc = UnsGrid->GetFaceCenterZ();
+
+    set<pair<int, string> > bcnameMap;
+    UnstructBCSet *unstructBCSet = UnsGrid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace      = unstructBCSet->GetBCFaceInfo();
+
+    int nodeCount = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        string bcName = bcRegion->GetBCName();
+        int bcType = bcRegion->GetBCType();
+
+        bcnameMap.insert(pair<int, string>(bcType, bcName));
+        nodeCount += node_number_of_each_face[iFace];
+    }
+
+    vector<vector<int> > face2nodelist(nBoundFace);
+    vector<int> linkmap;
+    for (set<pair<int, string> >::iterator iter = bcnameMap.begin(); iter != bcnameMap.end(); ++ iter)
+    {
+        if ((*iter).first == PHENGLEI::INTERFACE || (*iter).first < 0) continue;
+
+        face2nodelist.resize(0);
+        linkmap.resize(0);
+
+        GetFace2NodeList(UnsGrid, *iter, linkmap, face2nodelist);
+        if (face2nodelist.size() == 0)
+        {
+            continue;
+        }
+
+        int bctype = (*iter).first;
+        string bcName = (*iter).second;
+
+        int nDim = GetDim();
+        GridID *index = new GridID(gridIndex);
+        Grid *grid = new UnstructGrid();
+        grid->InitGrid(index, 0, nDim, UNSTRUCTGRID);
+        UnstructGrid *unsGrid = UnstructGridCast(grid);
+
+        int NumPts      = static_cast<int>(linkmap.size());
+        int NumElements = static_cast<int>(face2nodelist.size());
+        int NumFaces    = NumElements * 4;
+        unsGrid->SetNTotalNode(NumPts);
+        unsGrid->SetNTotalCell(NumElements);
+        unsGrid->SetNTotalFace(NumFaces);
+
+        int TotalNumFaceNodes_Rect = NumElements * 4;
+        int *cell2node = new int [TotalNumFaceNodes_Rect];
+        int *node_number_of_each_cell = new int [NumElements];
+
+        int count = 0;
+        for (size_t iFace = 0; iFace < face2nodelist.size(); ++ iFace)
+        {
+            node_number_of_each_cell[iFace] = 4;
+            uint_t nodeNumber = face2nodelist[iFace].size();
+            int index0 = face2nodelist[iFace][0];
+            for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+            {
+                cell2node[count] = face2nodelist[iFace][iNode];
+                count ++;
+            }
+
+            for (uint_t iNode = nodeNumber; iNode < 4; ++ iNode)
+            {
+                cell2node[count] = index0;
+                count ++;
+            }
+        }
+        unsGrid->SetNodeNumberOfEachCell(node_number_of_each_cell);
+        unsGrid->SetCell2Node(cell2node);
+
+        RDouble *xCurrent = new RDouble[NumPts];
+        RDouble *yCurrent = new RDouble[NumPts];
+        RDouble *zCurrent = new RDouble[NumPts];
+        int **currentNodeMap = NewPointer2<int>(1, NumPts);
+
+        for (size_t iNode = 0; iNode < linkmap.size(); ++ iNode)
+        {
+            int nodeIndex = linkmap[iNode];
+            currentNodeMap[0][iNode] = nodeIndex;
+
+            if (nodeIndex < nTotalNode)
+            {
+                xCurrent[iNode] = x[nodeIndex];
+                yCurrent[iNode] = y[nodeIndex];
+                zCurrent[iNode] = z[nodeIndex];
+            }
+            else
+            {
+                int faceIndex = nodeIndex - nTotalNode;
+
+                xCurrent[iNode] = xfc[faceIndex];
+                yCurrent[iNode] = yfc[faceIndex];
+                zCurrent[iNode] = zfc[faceIndex];
+            }
+        }
+        unsGrid->SetX(xCurrent);
+        unsGrid->SetY(yCurrent);
+        unsGrid->SetZ(zCurrent);
+
+        boundaryGrid.push_back(unsGrid);
+        gridMap.push_back(gridIndex);
+        nodeMap.push_back(currentNodeMap);
+        boundaryName.push_back(bcName);
+        boundaryType.push_back(bctype);
+    }
+}
+
+void Post_WriteVisualFile::StoreVTKData()
+{
+    if (!VTKvisual)
+    {
+        return;
+    }
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        DataContainer *cdata = new DataContainer();
+        cdata->moveto_begin();
+
+        int send_proc = GetZoneProcessorID(iZone);
+        int recv_proc = GetServerProcessorID();
+
+        if (myid == send_proc)
+        {
+            StoreVTKData(iZone, cdata);
+        }
+
+        PH_Trade(cdata, send_proc, recv_proc, iZone);
+
+        if (myid == recv_proc)
+        {
+            VTKDataList.push_back(cdata);
+        }
+        else
+        {
+            delete cdata;
+        }
+    }
+}
+
+void Post_WriteVisualFile::StoreVTKData(int zoneIndex, DataContainer *cdata)
+{
+    Grid *grid = flowFieldDataOnNode[zoneIndex]->GetGrid();
+    if (grid->Type() == UNSTRUCTGRID)
+    {
+        int gridID = grid->GetZoneID();
+        int dimension = grid->GetDim();
+        int type = grid->Type();
+
+        PHWrite(cdata, gridID);
+        PHWrite(cdata, dimension);
+        PHWrite(cdata, type);
+
+        StoreUnsBoundaryVTKData(zoneIndex, cdata);
+
+        if (WantVisualField(grid))
+        {
+            StoreUnsFieldVTKData(zoneIndex, cdata);
+        }
+
+        int TecioMission = Writecomplete;
+        PHWrite(cdata, TecioMission);
+    }
+    else
+    {
+        int gridID = grid->GetZoneID();
+        int dimension = grid->GetDim();
+        int type = grid->Type();
+
+        PHWrite(cdata, gridID);
+        PHWrite(cdata, dimension);
+        PHWrite(cdata, type);
+
+        StoreStrBoundaryVTKData(zoneIndex, cdata);
+
+        if (WantVisualField(grid))
+        {
+            StoreStrFieldVTKData(zoneIndex, cdata);
+        }
+
+        int TecioMission = Writecomplete;
+        PHWrite(cdata, TecioMission);
+    }
+}
+
+void Post_WriteVisualFile::StoreStrBoundaryVTKData(int zoneIndex, DataContainer *cdata)
+{
+    Post_Visual *FieldData = flowFieldDataOnNode[zoneIndex];
+    int nvarplot = FieldData->GetNumberofVisualVariables();
+    int nVisualVariables = nvarplot;
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        int numberOfSpecies = GlobalDataBase::GetIntParaFromDB("numberOfSpecies");
+        nVisualVariables = nVisualVariables + 2 * numberOfSpecies;
+    }
+    RDouble4D **qn = new RDouble4D *[nVisualVariables];
+    FieldData->GetAllVisualNodeVarPtr(qn);
+
+    int TecioMission = WriteBoundary;
+    for (int iBoundary = 0; iBoundary < boundaryGrid.size(); ++ iBoundary)
+    {
+        if (boundaryGrid[iBoundary]->GetZoneID() != zoneIndex)
+        {
+            continue;
+        }
+
+        int bctype    = boundaryType[iBoundary];
+        string bcName = boundaryName[iBoundary];
+
+        PHWrite(cdata, TecioMission);
+        PHWrite(cdata, bctype);
+        cdata->write_string(bcName);
+
+        int nTotalNode = boundaryGrid[iBoundary]->GetNTotalNode();
+        int nTotalCell = boundaryGrid[iBoundary]->GetNTotalCell();
+        PHWrite(cdata, nTotalNode);
+        PHWrite(cdata, nTotalCell);
+
+        RDouble *xBoundary = boundaryGrid[iBoundary]->GetX();
+        RDouble *yBoundary = boundaryGrid[iBoundary]->GetY();
+        RDouble *zBoundary = boundaryGrid[iBoundary]->GetZ();
+        PHWrite(cdata, xBoundary, nTotalNode);
+        PHWrite(cdata, yBoundary, nTotalNode);
+        PHWrite(cdata, zBoundary, nTotalNode);
+
+        for (int m = 0; m < nVisualVariables; ++ m)
+        {
+            RDouble *qBoundary = new RDouble[nTotalNode];
+
+            for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+            {
+                int originaI = nodeMap[iBoundary][0][iNode];
+                int originaJ = nodeMap[iBoundary][1][iNode];
+                int originaK = nodeMap[iBoundary][2][iNode];
+
+                qBoundary[iNode] = (*qn[m])(originaI, originaJ, originaK, 0);
+            }
+
+            PHWrite(cdata, qBoundary, nTotalNode);
+            delete []qBoundary;
+        }
+
+        int ni = StructGridCast(boundaryGrid[iBoundary])->GetNI();
+        int nj = StructGridCast(boundaryGrid[iBoundary])->GetNJ();
+        int nk = StructGridCast(boundaryGrid[iBoundary])->GetNK();
+
+        int iCellEnd = ni - 1 ? ni - 1 : 1;
+        int jCellEnd = nj - 1 ? nj - 1 : 1;
+        int kCellEnd = nk - 1 ? nk - 1 : 1;
+
+        int ncount = 0;
+        int *cell2node = new int[nTotalCell * 4];
+        for (int kCell = 0; kCell < kCellEnd; ++ kCell)
+        {
+            for (int jCell = 0; jCell < jCellEnd; ++ jCell)
+            {
+                for (int iCell = 0; iCell < iCellEnd; ++ iCell)
+                {
+                    int nodeIndex1, nodeIndex2, nodeIndex3, nodeIndex4;
+                    if (ni == 1)
+                    {
+                        nodeIndex1 = iCell + ni *  jCell      + ni * nj *  kCell;
+                        nodeIndex2 = iCell + ni * (jCell + 1) + ni * nj *  kCell;
+                        nodeIndex3 = iCell + ni * (jCell + 1) + ni * nj * (kCell + 1);
+                        nodeIndex4 = iCell + ni *  jCell      + ni * nj * (kCell + 1);
+                    }
+                    else if(nj == 1)
+                    {
+                        nodeIndex1 =  iCell      + ni * jCell + ni * nj *  kCell;
+                        nodeIndex2 = (iCell + 1) + ni * jCell + ni * nj *  kCell;
+                        nodeIndex3 = (iCell + 1) + ni * jCell + ni * nj * (kCell + 1);
+                        nodeIndex4 =  iCell      + ni * jCell + ni * nj * (kCell + 1);
+                    }
+                    else
+                    {
+                        nodeIndex1 =  iCell      + ni *  jCell      + ni * nj * kCell;
+                        nodeIndex2 = (iCell + 1) + ni *  jCell      + ni * nj * kCell;
+                        nodeIndex3 = (iCell + 1) + ni * (jCell + 1) + ni * nj * kCell;
+                        nodeIndex4 =  iCell      + ni * (jCell + 1) + ni * nj * kCell;
+                    }
+
+                    cell2node[ncount++] = nodeIndex1 + 1;
+                    cell2node[ncount++] = nodeIndex2 + 1;
+                    cell2node[ncount++] = nodeIndex3 + 1;
+                    cell2node[ncount++] = nodeIndex4 + 1;
+                }
+            }
+        }
+
+        PHWrite(cdata, cell2node, nTotalCell * 4);
+        delete []cell2node;
+    }
+
+    delete []qn;
+}
+
+void Post_WriteVisualFile::StoreStrFieldVTKData(int zoneIndex, DataContainer *cdata)
+{
+    Grid *grid = flowFieldDataOnNode[zoneIndex]->GetGrid();
+    StructGrid *strGrid = StructGridCast(grid);
+
+    int ni = strGrid->GetNI();
+    int nj = strGrid->GetNJ();
+    int nk = strGrid->GetNK();
+
+    RDouble3D &xx = *strGrid->GetStructX();
+    RDouble3D &yy = *strGrid->GetStructY();
+    RDouble3D &zz = *strGrid->GetStructZ();
+
+    int nTotalCell = strGrid->GetNTotalCell();
+    int nTotalNode = strGrid->GetNTotalNode();
+
+    if (nk == 1)
+    {
+        int nVisualVariables = flowFieldDataOnNode[zoneIndex]->GetNumberofVisualVariables();
+        int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+        if (nchem)
+        {
+            int numberOfSpecies = GlobalDataBase::GetIntParaFromDB("numberOfSpecies");
+            nVisualVariables = nVisualVariables + 2 * numberOfSpecies;
+        }
+        RDouble4D **qn = new RDouble4D *[nVisualVariables];
+        flowFieldDataOnNode[zoneIndex]->GetAllVisualNodeVarPtr(qn);
+
+        int TecioMission = WriteBlock;
+        PHWrite(cdata, TecioMission);
+
+        PHWrite(cdata, nTotalNode);
+        PHWrite(cdata, nTotalCell);
+
+        RDouble *xBoundary = new RDouble[nTotalNode];
+        RDouble *yBoundary = new RDouble[nTotalNode];
+        RDouble *zBoundary = new RDouble[nTotalNode];
+
+        RDouble **qBoundary = new RDouble *[nVisualVariables];
+        for (int m = 0; m < nVisualVariables; ++ m)
+        {
+            qBoundary[m] = new RDouble[nTotalNode];
+        }
+
+        int ist, ied, jst, jed, kst, ked;
+        strGrid->GetNodeIterationIndex(ist, ied, jst, jed, kst, ked);
+
+        int iNode = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    xBoundary[iNode] = xx(i, j, k);
+                    yBoundary[iNode] = yy(i, j, k);
+                    zBoundary[iNode] = zz(i, j, k);
+
+                    for (int m = 0; m < nVisualVariables; ++ m)
+                    {
+                        qBoundary[m][iNode] = (*qn[m])(i, j, k, 0);
+                    }
+
+                    iNode ++ ;
+                }
+            }
+        }
+
+        PHWrite(cdata, xBoundary, nTotalNode);
+        PHWrite(cdata, yBoundary, nTotalNode);
+        PHWrite(cdata, zBoundary, nTotalNode);
+
+        delete []xBoundary;
+        delete []yBoundary;
+        delete []zBoundary;
+
+        for (int m = 0; m < nVisualVariables; ++ m)
+        {
+            PHWrite(cdata, qBoundary[m], nTotalNode);
+            delete []qBoundary[m];
+        }
+
+        delete []qBoundary;
+
+        int *cell2node = new int[nTotalCell * 4];
+        int ncount = 0;
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            for (int i = 1; i <= ni - 1; ++ i)
+            {
+                cell2node[ncount++] = i     + (j - 1) * ni;
+                cell2node[ncount++] = i + 1 + (j - 1) * ni;
+                cell2node[ncount++] = i + 1 + (j   ) * ni;
+                cell2node[ncount++] = i     + (j   ) * ni;
+            }
+        }
+
+        PHWrite(cdata, cell2node, nTotalCell * 4);
+        delete []cell2node;
+        delete []qn;
+    }
+}
+
+void Post_WriteVisualFile::StoreUnsBoundaryVTKData(int zoneIndex, DataContainer *cdata)
+{
+    Post_Visual *FieldData = flowFieldDataOnNode[zoneIndex];
+    int nVisualVariables = FieldData->GetNumberofVisualVariables();
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        int numberOfSpecies = GlobalDataBase::GetIntParaFromDB("numberOfSpecies");
+        nVisualVariables = nVisualVariables + 2 * numberOfSpecies;
+    }
+
+    RDouble **qn = new RDouble *[nVisualVariables];
+    FieldData->GetAllVisualNodeVarPtr(qn);
+
+    UnstructGrid *grid = UnstructGridCast(FieldData->GetGrid());
+    int *node_number_of_each_face = grid->GetNodeNumberOfEachFace();
+    int *face2node = grid->GetFace2Node();
+    int nBoundFace = grid->GetNBoundFace();
+    int NumPts = grid->GetNTotalNode();
+
+    RDouble **qFaceCenter = NewPointer2<RDouble>(nVisualVariables, nBoundFace);
+    for (int m = 0; m < nVisualVariables; ++ m)
+    {
+        int nodeCount = 0;
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            RDouble value = 0.0;
+            for (int iNode = 0; iNode < node_number_of_each_face[iFace]; ++ iNode)
+            {
+                int nodeIndex = face2node[nodeCount + iNode];
+                value += qn[m][nodeIndex];
+            }
+
+            qFaceCenter[m][iFace] = value / node_number_of_each_face[iFace];
+            nodeCount += node_number_of_each_face[iFace];
+        }
+    }
+
+    int TecioMission = WriteBoundary;
+    for (int iBoundary = 0; iBoundary < boundaryGrid.size(); ++ iBoundary)
+    {
+        if (boundaryGrid[iBoundary]->GetZoneID() != zoneIndex)
+        {
+            continue;
+        }
+
+        int bctype    = boundaryType[iBoundary];
+        string bcName = boundaryName[iBoundary];
+
+        PHWrite(cdata, TecioMission);
+        PHWrite(cdata, bctype);
+        cdata->write_string(bcName);
+
+        int nTotalNode = boundaryGrid[iBoundary]->GetNTotalNode();
+        int nTotalCell = boundaryGrid[iBoundary]->GetNTotalCell();
+        PHWrite(cdata, nTotalNode);
+        PHWrite(cdata, nTotalCell);
+
+        RDouble *xBoundary = boundaryGrid[iBoundary]->GetX();
+        RDouble *yBoundary = boundaryGrid[iBoundary]->GetY();
+        RDouble *zBoundary = boundaryGrid[iBoundary]->GetZ();
+        PHWrite(cdata, xBoundary, nTotalNode);
+        PHWrite(cdata, yBoundary, nTotalNode);
+        PHWrite(cdata, zBoundary, nTotalNode);
+
+        for (int m = 0; m < nVisualVariables; ++ m)
+        {
+            RDouble *qBoundary = new RDouble[nTotalNode];
+            for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+            {
+                int nodeIndex = nodeMap[iBoundary][0][iNode];
+
+                if (nodeIndex < NumPts)
+                {
+                    qBoundary[iNode] = qn[m][nodeIndex];
+                }
+                else
+                {
+                    int faceIndex = nodeIndex - NumPts;
+                    qBoundary[iNode] = qFaceCenter[m][faceIndex];
+                }
+            }
+
+            PHWrite(cdata, qBoundary, nTotalNode);
+            delete []qBoundary;
+        }
+
+        int *cell2node = UnstructGridCast(boundaryGrid[iBoundary])->GetCell2Node();
+        for (int iNode = 0; iNode < nTotalCell * 4; ++ iNode)
+        {
+            int nodeIndex = cell2node[iNode] + 1;
+            PHWrite(cdata, nodeIndex);
+        }
+    }
+
+    delete []qn;
+    DelPointer2(qFaceCenter);
+}
+
+void Post_WriteVisualFile::StoreUnsFieldVTKData(int zoneIndex, DataContainer *cdata)
+{
+    if (GetDim() == PHSPACE::TWO_D)
+    {
+        StoreUnsFieldVTKData2D(zoneIndex, cdata);
+    }
+    else
+    {
+        StoreUnsFieldVTKData3D(zoneIndex, cdata);
+    }
+}
+
+void Post_WriteVisualFile::StoreUnsFieldVTKData2D(int zoneIndex, DataContainer *cdata)
+{
+    int nVisualVariables = flowFieldDataOnNode[zoneIndex]->GetNumberofVisualVariables();
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        int numberOfSpecies = GlobalDataBase::GetIntParaFromDB("numberOfSpecies");
+        nVisualVariables = nVisualVariables + 2 * numberOfSpecies;
+    }
+    RDouble **qn = new RDouble *[nVisualVariables];
+    flowFieldDataOnNode[zoneIndex]->GetAllVisualNodeVarPtr(qn);
+
+    Grid *grid = flowFieldDataOnNode[zoneIndex]->GetGrid();
+    UnstructGrid *unsGrid = UnstructGridCast(grid);
+
+    int TecioMission = WriteBlock;
+    PHWrite(cdata, TecioMission);
+
+    int nTotalNode = unsGrid->GetNTotalNode();
+    int nTotalCell = unsGrid->GetNTotalCell();
+    int nBoundFace = unsGrid->GetNBoundFace();
+    int nTotalFace = unsGrid->GetNTotalFace();
+
+    int *face2node          = unsGrid->GetFace2Node();
+    int *left_cell_of_face  = unsGrid->GetLeftCellOfFace();
+    int *right_cell_of_face = unsGrid->GetRightCellOfFace();
+
+    RDouble *x = unsGrid->GetX();
+    RDouble *y = unsGrid->GetY();
+    RDouble *z = unsGrid->GetZ();
+
+    //! Find out cellToFace.
+    HyList<int> * cell2face = new HyList <int> [nTotalCell];
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        cell2face[iCell].SetAverNnode(4);
+    }
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = left_cell_of_face[iFace];
+        cell2face[le].insert(iFace);
+    }
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = left_cell_of_face[iFace];
+        int re = right_cell_of_face[iFace];
+        cell2face[le].insert(iFace);
+        cell2face[re].insert(iFace);
+    }
+
+    //! Find out cellToNode.
+    HyList<int> *cell2node = new HyList <int> [nTotalCell];
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        cell2node[iCell].SetAverNnode(4);
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        int face0 = cell2face[iCell][0];
+        int ip1 = face2node[2 * face0];
+        int ip2 = face2node[2 * face0 + 1];
+        cell2node[iCell].insert(ip1);
+        cell2node[iCell].insert(ip2);
+
+        int targetNode = ip2;
+        int checkNode  = ip1;
+        
+        int nFaceOfCell = cell2face[iCell].size();
+        int isClockWise = false;
+        while (! isClockWise)
+        {
+            for (int iFace = 1; iFace < nFaceOfCell; ++ iFace)
+            {
+                int face  = cell2face[iCell][iFace];
+                int node1 = face2node[2 * face];
+                int node2 = face2node[2 * face + 1];
+
+                if (node1 == targetNode)
+                {
+                    if (node2 != checkNode)
+                    {
+                        cell2node[iCell].insert(node2);
+                        targetNode = node2;
+                    }
+                    else
+                    {
+                        isClockWise = true;
+                        break;
+                    }
+                }
+                else if (node2 == targetNode)
+                {
+                    if (node1 != checkNode)
+                    {
+                        cell2node[iCell].insert(node1);
+                        targetNode = node1;
+                    }
+                    else
+                    {
+                        isClockWise = true;
+                        break;
+                    }
+                }
+            }    //! Iterate over all faces of cell.
+        }        //! Judge whether the nodes of cell have searched closed.
+    }            //! iCell.
+
+    PHWrite(cdata, nTotalNode);
+    PHWrite(cdata, nTotalCell);
+
+    PHWrite(cdata, x, nTotalNode);
+    PHWrite(cdata, y, nTotalNode);
+    PHWrite(cdata, z, nTotalNode);
+
+    for (int m = 0; m < nVisualVariables; ++ m)
+    {
+        RDouble *qq = qn[m];
+        PHWrite(cdata, qq, nTotalNode);
+    }
+
+    int *cell2node_vtk = new int [nTotalCell * 4];
+    int ncount = 0;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        if (cell2node[iCell].size() == 3)
+        {
+            for (int m = 0; m < 3; ++ m)
+            {
+                cell2node_vtk[ncount] = cell2node[iCell].GetData(m) + 1;
+                ncount ++;
+            }
+            cell2node_vtk[ncount] = cell2node[iCell].GetData(2) + 1;
+            ncount ++;
+        }
+        else if (cell2node[iCell].size() == 4)
+        {
+            for (int m = 0; m < 4; ++ m)
+            {
+                cell2node_vtk[ncount] = cell2node[iCell].GetData(m) + 1;
+                ncount ++;
+            }
+        }
+        else
+        {
+            cout << "Error: this function only support triangle and quad !\n";
+            exit(0);
+        }
+    }
+
+    PHWrite(cdata, cell2node_vtk, nTotalCell * 4);
+
+    delete []qn;
+    delete []cell2node;
+    delete []cell2face;
+    delete []cell2node_vtk;
+}
+
+void Post_WriteVisualFile::StoreUnsFieldVTKData3D(int zoneIndex, DataContainer *cdata)
+{
+    int nVisualVariables = flowFieldDataOnNode[zoneIndex]->GetNumberofVisualVariables();
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        int numberOfSpecies = GlobalDataBase::GetIntParaFromDB("numberOfSpecies");
+        nVisualVariables = nVisualVariables + 2 * numberOfSpecies;
+    }
+    RDouble **qn = new RDouble *[nVisualVariables];
+    flowFieldDataOnNode[zoneIndex]->GetAllVisualNodeVarPtr(qn);
+
+    int TecioMission = WriteBlock;
+    PHWrite(cdata, TecioMission);
+
+    UnstructGrid *grid = UnstructGridCast(flowFieldDataOnNode[zoneIndex]->GetGrid());
+    int nTotalNode = grid->GetNTotalNode();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+    int *nodeNumberOfEachCell = grid->GetNodeNumberOfEachCell();
+    int *cell2Node = grid->GetCell2Node();
+
+    PHWrite(cdata, nTotalNode);
+    PHWrite(cdata, nTotalCell);
+
+    PHWrite(cdata, x, nTotalNode);
+    PHWrite(cdata, y, nTotalNode);
+    PHWrite(cdata, z, nTotalNode);
+
+    for (int m = 0; m < nVisualVariables; ++ m)
+    {
+        RDouble *qq = qn[m];
+        PHWrite(cdata, qq, nTotalNode);
+    }
+
+    PHWrite(cdata, nTotalFace);
+
+    int count = 0;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        count += nodeNumberOfEachCell[iCell];
+    }
+    PHWrite(cdata, nodeNumberOfEachCell, nTotalCell);
+    PHWrite(cdata, cell2Node           , count);
+
+    int *faceNumberOfEachCell = grid->GetFaceNumberOfEachCell();
+    int **cell2Face = grid->GetCell2Face();
+
+    PHWrite(cdata, faceNumberOfEachCell, nTotalCell);
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        PHWrite(cdata, cell2Face[iCell], faceNumberOfEachCell[iCell]);
+    }
+
+    int *nodeNumberOfEachFace = grid->GetNodeNumberOfEachFace();
+    int *face2Node = grid->GetFace2Node();
+
+    count = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        count += nodeNumberOfEachFace[iFace];
+    }
+    PHWrite(cdata, nodeNumberOfEachFace, nTotalFace);
+    PHWrite(cdata, face2Node, count);
+
+    delete []qn;
+}
+
+void Post_WriteVisualFile::ComputeNodeData()
+{
+    int nVisualVariables = GlobalDataBase::GetIntParaFromDB("nVisualVariables");
+    int visualVariables[100];
+    GlobalDataBase::GetData("visualVariables", visualVariables, PHINT, nVisualVariables);
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    int myid = GetCurrentProcessorID();
+    for (int iZone =  0; iZone < nZones; ++ iZone)
+    {
+        Post_Visual *postVisualization = 0;
+        int iZoneProcess = GetZoneProcessorID(iZone);
+        if (myid == iZoneProcess)
+        {
+            Grid *grid = GetGrid(iZone);
+            postVisualization = new Post_Visual(nVisualVariables, visualVariables, grid, flowType);
+
+            int Nsolver = GlobalSolvers::GetNumberOfSolvers(iZone);
+            for (int iSolver = 0; iSolver < Nsolver; ++ iSolver)
+            {
+                GlobalSolvers::GetSolver(iZone, iSolver)->ComputePostVisualVariables(postVisualization);
+            }
+        }
+
+        flowFieldDataOnNode[iZone] = postVisualization;
+    }
+}
+
+bool WantVisualField(Grid *grid)
+{
+    int plotFieldType = 0;
+    GlobalDataBase::GetData("plotFieldType", &plotFieldType, PHINT, 1);
+
+    if (plotFieldType == TEC_SPACE::BlockVisual)
+    {
+        int dimension = GetDim();
+
+        RDouble *pmin = grid->GetMinBox();
+        RDouble *pmax = grid->GetMaxBox();
+
+        RDouble lowerPlotFieldBox[3], upperPlotFieldBox[3];
+        GlobalDataBase::GetData("lowerPlotFieldBox", &lowerPlotFieldBox, PHDOUBLE, 3);
+        GlobalDataBase::GetData("upperPlotFieldBox", &upperPlotFieldBox, PHDOUBLE, 3);
+
+        if ((pmin[0] > upperPlotFieldBox[0]) || (pmax[0] < lowerPlotFieldBox[0])) return false;
+
+        if ((pmin[1] > upperPlotFieldBox[1]) || (pmax[1] < lowerPlotFieldBox[1])) return false;
+
+        if (dimension == THREE_D)
+        {
+            if ((pmin[2] > upperPlotFieldBox[2]) || (pmax[2] < lowerPlotFieldBox[2])) return false;
+        }
+    }
+    return grid->GetDim() == TWO_D || (grid->GetDim() == THREE_D && plotFieldType != TEC_SPACE::BoundaryVisual);
+}
+
+void WriteVisualFile(int flowTypeIn)
+{
+    if (!generateVisualFile)
+    {
+        int visualfileType = GlobalDataBase::GetIntParaFromDB("visualfileType");
+        if (visualfileType == Tecplot_Binary || visualfileType == Tecplot_ASCII)
+        {
+            generateVisualFile = new Post_WriteTecplot();
+        }
+        else if (visualfileType == Ensight_Binary || visualfileType == Ensight_ASCII)
+        {
+            generateVisualFile = new Post_WriteEnsight();
+        }
+        else
+        {
+            TK_Exit::UnexpectedVarValue("visualfileType", visualfileType);
+        }
+    }
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+
+    if (1 == isAle)
+    {
+        generateVisualFile->BoundaryGridNeedConstruct();
+    }
+    generateVisualFile->Run(flowTypeIn);
+}
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/MixGrid.h b/API/PreProcess/include/MixGrid.h
new file mode 100644
index 0000000..b4801e2
--- /dev/null
+++ b/API/PreProcess/include/MixGrid.h
@@ -0,0 +1,79 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      MixGrid.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+#include "Geo_Grid.h"
+#include "Pre_GridBase.h"
+#include "Geo_StructGrid.h"
+#include "Geo_UnstructGrid.h"
+
+namespace PHSPACE
+{
+class Grid;
+class StructGrid;
+class UnstructGrid;
+
+const int MULTI_TYPE     = -1;
+const int PHENGLEI_TYPE  = 1;
+const int CGNS_TYPE      = 2;
+const int PLOT3D_TYPE    = 3;
+const int FIELDVIEW_TYPE = 4;
+const int FLUENT_TYPE    = 5;
+const int USTAR_TYPE     = 6;
+const int MIXGRID_TYPE   = 7;
+const int GMSH_TYPE      = 8;
+const int GRIDGEN_TYPE   = 9;
+
+typedef void (*CREATE_SINGLE_GRID)(Grid *comm_grid);
+
+void SetBcRegion(StructGrid *grid, VInt &imin, VInt &imax, VInt &jmin, VInt &jmax, VInt &kmin, VInt &kmax, VInt &bctype);
+
+void Fantasy2Ustar();
+void Fantasy2Ustar2D();
+void Fantasy2Ustar3D();
+
+void ReProcessBCInfo(Grid **grids, int nBlocks);
+void ReadLnkFile(const string &fileName_in, Grid **grids, int nBlocks);
+void FantasyWriteToGrd(const string &cel_file, Grid **grids, int nBlocks);
+void FantasyWriteToInp(const string &bnd_file, Grid **grids, int nBlocks);
+
+void FantasyWriteToFluent(const string &gridFileName, Grid **grids);
+
+void ReadUstarGrid(const string &gridfile, UnstructGrid *grid);
+void ReadUstarGrid3D_Binary(const string &gridfile, UnstructGrid *grid);
+
+void StrGridToUnsGrid(StructGrid *grid, UnstructGrid *uns_grid);
+void StrGridToUnsGrid(Grid **grids, int nBlocks, UnstructGrid *uns_grid);
+
+void WriteLnkFile(const string &gridFileName, Grid **grids_in, int nBlocks);
+void CheckMeshMultigrid(Grid **grids_in, int nBlocks);
+void WriteBcFileFromFTS(const string &gridFileName, Grid **grids_in, int nBlocks);
+
+void GetUnsIndex(StructGrid *grid, DataStruct_AdtTree<int, RDouble> *adtTree, int &count, RDouble tol, Int3D &unsindex, RDouble *xuns, RDouble *yuns, RDouble *zuns);
+
+void FillSection(Grid **grids, int nBlocks, CGNSBase *base_cgns, BaseElement *base_elem, Int3D **unsindexlist);
+
+class Ustar2Fantasy
+{
+private:
+    string mapfilename;
+    map<int, int> bcmap;
+public:
+    Ustar2Fantasy(string mapfile_in);
+    ~Ustar2Fantasy();
+    int TranslateBC(int bctype);
+};
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_Block_Struct.h b/API/PreProcess/include/Pre_Block_Struct.h
new file mode 100644
index 0000000..c0595e2
--- /dev/null
+++ b/API/PreProcess/include/Pre_Block_Struct.h
@@ -0,0 +1,252 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_Block_Struct.h
+//! @brief     Structured grid partition: block definition.
+//! @author    Guo Yongheng.
+
+#pragma once
+#include "Geo_StructBC.h"
+
+using namespace std;
+namespace PHSPACE
+{
+class Pre_Block_Struct;
+class Pre_Patch_Struct;
+
+//! @brief Pre_BcFace_Struct defines boundary face for struct grid.
+class Pre_BcFace_Struct
+{
+private:
+    //! Boundary type of current face.
+    int boundaryType;
+
+    string bcName;
+
+    int s_dir3d[3];
+
+    //! Range of node index and local axis label.
+    vector<int> nodeStart, nodeEnd, axisLabel;
+
+    //! Boundary Direction.
+    int bcDirection;
+
+    //! Unit matrix which is used to describe axis mapping between source block to target one.
+    vector<vector<int> > unitMatrix;
+
+    //! Pointer of attached struct grid.
+    Pre_Block_Struct *simpleBlock;
+
+    //! Pointer of correlative patch face.
+    Pre_Patch_Struct *next;
+
+    //! Children of current boundary face.
+    vector<Pre_BcFace_Struct *> *child;
+public:
+    LIB_EXPORT  Pre_BcFace_Struct();
+    LIB_EXPORT ~Pre_BcFace_Struct();
+public:
+    //! Recursive function for freeing space of Bc faces and patch faces.
+    LIB_EXPORT void Free();
+
+    //! Erect vertex index mapping between patch faces.
+    LIB_EXPORT void ErectVertexMapping(int geometricDimension);
+
+    //! Get absolute value of node index and sort them.
+    LIB_EXPORT void Normalize(int geometricDimension);
+
+    //! Compute local node index according to block parameter.
+    LIB_EXPORT void ComputeLocalCoordinate();
+
+    //! Output current boundary face information to file.
+    LIB_EXPORT void OutputBoundaryInformation(fstream &file, int geometricDimension);
+    LIB_EXPORT void OutputBoundaryInformation(StructBC *bcregion, int geometricDimension);
+
+    //! Extract leaves of Bc faces which can not be split any more.
+    LIB_EXPORT vector<Pre_BcFace_Struct *> GetLeaves();
+
+    void SetRegion(vector<int> &nodeStart, vector<int> &nodeEnd);
+    void SetDirection(int bcDirection) { this->bcDirection =bcDirection; }
+    void SetAxisLabel(vector<int> &axisLabel);
+    void SetSimpleBlock(Pre_Block_Struct *simpleBlock);
+    void SetNext(Pre_Patch_Struct *next);
+    void SetChild(vector<Pre_BcFace_Struct *> *child);
+    void SetBoundaryType(int boundaryType);
+    void SetBoundaryName(string bcName);
+    void SetFaceMatchingTargetDirIndex(int *dir3dIn);
+    vector<int> & GetNodeStart();
+    vector<int> & GetNodeEnd();
+    vector<int> & GetAxisLabel();
+    Pre_Block_Struct * GetSimpleBlock();
+    Pre_Patch_Struct * GetNext();
+    int GetBoundaryType();
+    int GetDirection() { return bcDirection; }
+    string GetBoundaryName();
+    int * GetFaceMatchingTargetDirIndex();
+    vector<Pre_BcFace_Struct *> * GetChild();
+private:
+    void GetSurfaceDirection(vector<int> &st, vector<int> &ed, vector<int> &nd, int bcDirection, int geometricDimension);
+    void InitUnitMatrix();
+};
+
+//! @brief Pre_Patch_Struct defines patch face for current boundary face.
+class Pre_Patch_Struct
+{
+private:
+    //! Correlative block index.
+    int targetBlockLabel;
+
+    //! Range of node index and local axis label.
+    vector<int> nodeStart, nodeEnd, axisLabel;
+
+    //! Boundary Direction.
+    int bcDirection;
+
+    //! Node index mapping operator.
+    vector<vector<int> > frameOfAxes;
+
+    //! Pointer of target struct block;
+    Pre_Block_Struct *simpleBlock;
+public:
+    LIB_EXPORT  Pre_Patch_Struct();
+    LIB_EXPORT ~Pre_Patch_Struct();
+public:
+    void SetRegion(vector<int> &nodeStart, vector<int> &nodeEnd);
+    void SetNodeMapping(vector<vector<int> > &frameOfAxes);
+    void SetAxisLabel(vector<int> &axisLabel);
+    void SetSimpleBlock(Pre_Block_Struct *simpleBlock);
+    void SetTargetBlockLabel(int i);
+    void SetDirection(int bcDirection) { this->bcDirection =bcDirection; }
+    int GetDirection() { return bcDirection; }
+
+    vector<int> & GetNodeStart();
+    vector<int> & GetNodeEnd();
+    vector<int> & GetAxisLabel();
+
+    Pre_Block_Struct * GetSimpleBlock();
+    vector<vector<int> > & GetFrameOfAxes();
+};
+
+//! @brief Pre_Block_Struct defines basal structured grid.
+class Pre_Block_Struct
+{
+private:
+    //! For multigrid case, numberOfUnitCells equals 2**(numberOfMultigrid - 1).
+    static int numberOfUnitCells;
+
+    //! Current zone index.
+    int zoneIndex;
+    
+    //! Original zone index.
+    int originalZoneIndex;
+    
+    //! Processor index of current zone.
+    int processorIndex;
+
+    //! Parent pointer of current zone.
+    Pre_Block_Struct *parent;
+
+    //! Child pointer of current zone.
+    vector<Pre_Block_Struct *> *child;
+
+    //! Bc face pointer group of current zone.
+    vector<Pre_BcFace_Struct *> boundaryFaceList;
+
+    //! Relative start and end node index in parent zone.
+    vector<int> originalIndex;
+
+    //! For current zone, node number along i,j,k directions.
+    vector<int> nodeDimension;
+
+    //! For original zone, ni, nj, nk are node number along i, j, k directions.
+    int ni, nj, nk;
+
+    //! For original zone, x, y, z are node coordinates with circulation k, j, i.
+    vector<RDouble> x, y, z;
+public:
+    LIB_EXPORT  Pre_Block_Struct();
+    LIB_EXPORT ~Pre_Block_Struct();
+public:
+    //! Calculate number of unit cells for multi-grid case.
+    LIB_EXPORT static void CalculateNumberOfUnitCells(int numberOfMultigrid);
+
+    //! Generate space for node coordinates, i.e. x, y and z.
+    LIB_EXPORT void GenerateCoordinateSpace();
+
+    //! Split current block by the parameter "numberOfCells" and compute relative locations for the left and right block.
+    LIB_EXPORT void Split(RDouble numberOfCells, vector<int> &leftDimension, vector<int> &rightDimension, vector<int> &leftOriginalIndex, vector<int> &rightOriginalIndex);
+    
+    //! Create boundary face for new zones.
+    LIB_EXPORT void CreateBoundaryFace(int geometricDimension);
+
+    //! Normalize every boundary face for current zone.
+    LIB_EXPORT void NormalizeBoundaryFace(int geometricDimension);
+
+    void PatchChild(vector<int> &t_st, vector<int> &t_ed, Pre_Block_Struct *sourceBlock, int geometricDimension);
+    void CreateBoundaryFace(Pre_BcFace_Struct *boundaryFace, int geometricDimension);
+    void GetAbsoluteCoordinate(vector<int> &st, vector<int> &ed);
+    void GetLocalCoordinate(vector<int> &st, vector<int> &ed, vector<int> &local_st, vector<int> &local_ed);
+    void OutputBoundaryInformation(fstream &file, int geometricDimension);
+    void GetRootInformation(Pre_Block_Struct *&root, vector<int> &ref);
+    void GenerateBoundaryFaceList(int numberOfBoundaryFaces);
+    void WriteGridCoordinate(fstream &file, vector<int> &nst, vector<int> &ned);
+    void CorrectSplitDimension(int axisSelect, RDouble numberOfCells, int geometricDimension, int &isplit);
+
+    static int GetNumberOfUnitCells();
+    int GetNumberOfNodes();
+    int GetNumberOfCells();
+    void AddBoundaryFace(Pre_BcFace_Struct *boundaryFace);
+
+    void SetZoneIndex(int iZone);
+    void SetProcessorIndex(int iProcessor);
+    void SetOriginalZoneIndex(int iZone);
+    void SetParentBlock(Pre_Block_Struct *parent);
+    void SetBoundaryFace(int i, Pre_BcFace_Struct *boundaryFace);
+
+    int GetZoneIndex();
+    int GetOriginalZoneIndex();
+    Pre_BcFace_Struct * GetBoundaryFace(int i);
+    vector<Pre_BcFace_Struct *> GetBoundaryFaceList() { return this->boundaryFaceList; }
+
+    void SetOriginalIndex(vector<int> &od);
+    void SetNodeDimension(vector<int> &nd);
+
+    vector<int> & GetOriginalIndex();
+    vector<int> & GetNodeDimension();
+
+    int GetNI() const;
+    int GetNJ() const;
+    int GetNK() const;
+
+    void SetNI(int ni);
+    void SetNJ(int nj);
+    void SetNK(int nk);
+
+    RDouble * GetX();
+    RDouble * GetY();
+    RDouble * GetZ();
+private:
+    bool IsOverlapBoundaryFace(vector<int> &st, vector<int> &ed, int geometricDimension);
+    bool IsPoleBoundaryFace(int iDimension);
+    bool PatchChild(Pre_BcFace_Struct *boundaryFace, vector<int> &t_st, vector<int> &t_ed, Pre_Block_Struct *sourceBlock, int geometricDimension);
+    void GerneralSplit(Pre_BcFace_Struct *boundaryFace, Pre_BcFace_Struct *overlapBoundaryFace, int geometricDimension);
+    void PatchSplit(Pre_BcFace_Struct *boundaryFace, Pre_BcFace_Struct *overlapBoundaryFace, int geometricDimension);
+    void Free();
+    Pre_BcFace_Struct * GetOverlapBoundaryFace(vector<int> &st, vector<int> &ed, vector<int> &st_ref, vector<int> &ed_ref, int geometricDimension);
+};
+
+#include "Pre_Block_Struct.hxx"
+
+int GetSurfaceLabel(vector<int> &st, vector<int> &ed);
+int SignFunction(int value);
+void CalculateVertexIndexOnTargetBlock(vector<vector<int> > &frameOfAxes, vector<int> &p1, vector<int> &p2);
+void GetIJKRegion(vector<int> &blockNodeStart, vector<int> &blockNodeEnd, vector<int> &faceNodeStart, vector<int> &faceNodeEnd, int localFaceLabel);
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_Block_Struct.hxx b/API/PreProcess/include/Pre_Block_Struct.hxx
new file mode 100644
index 0000000..b0cdf9e
--- /dev/null
+++ b/API/PreProcess/include/Pre_Block_Struct.hxx
@@ -0,0 +1,263 @@
+inline void Pre_BcFace_Struct::SetRegion(vector<int> &nodeStart, vector<int> &nodeEnd)
+{
+    this->nodeStart = nodeStart;
+    this->nodeEnd = nodeEnd; 
+}
+
+inline void Pre_BcFace_Struct::SetAxisLabel(vector<int> &axisLabel)
+{
+    this->axisLabel = axisLabel;
+}
+
+inline void Pre_BcFace_Struct::SetSimpleBlock(Pre_Block_Struct *simpleBlock)
+{
+    this->simpleBlock = simpleBlock;
+}
+
+inline void Pre_BcFace_Struct::SetNext(Pre_Patch_Struct *next)
+{
+    this->next = next;
+}
+
+inline void Pre_BcFace_Struct::SetChild(vector<Pre_BcFace_Struct *> *child)
+{
+    this->child = child;
+}
+
+inline void Pre_BcFace_Struct::SetBoundaryType(int boundaryType)
+{
+    this->boundaryType = boundaryType;
+}
+
+inline void Pre_BcFace_Struct::SetBoundaryName(string bcName)
+{
+    this->bcName = bcName;
+}
+
+inline void Pre_BcFace_Struct::SetFaceMatchingTargetDirIndex(int *dir3dIn)
+{
+    for (int i = 0; i < 3; i ++)
+    {
+        s_dir3d[i] = dir3dIn[i];
+    }
+}
+
+inline vector<int> & Pre_BcFace_Struct::GetNodeStart()
+{
+    return this->nodeStart;
+}
+
+inline vector<int> & Pre_BcFace_Struct::GetNodeEnd()
+{
+    return this->nodeEnd;
+}
+
+inline vector<int> & Pre_BcFace_Struct::GetAxisLabel()
+{
+    return this->axisLabel;
+}
+
+inline Pre_Block_Struct * Pre_BcFace_Struct::GetSimpleBlock()
+{
+    return this->simpleBlock;
+}
+
+inline Pre_Patch_Struct * Pre_BcFace_Struct::GetNext()
+{
+    return this->next;
+}
+
+inline int Pre_BcFace_Struct::GetBoundaryType()
+{
+    return this->boundaryType;
+}
+
+inline string Pre_BcFace_Struct::GetBoundaryName()
+{
+    return this->bcName;
+}
+
+inline int * Pre_BcFace_Struct::GetFaceMatchingTargetDirIndex()
+{
+    return s_dir3d;
+}
+
+inline vector<Pre_BcFace_Struct *> * Pre_BcFace_Struct::GetChild()
+{
+    return this->child;
+}
+
+inline void Pre_Patch_Struct::SetRegion(vector<int> &nodeStart, vector<int> &nodeEnd)
+{
+    this->nodeStart = nodeStart;
+    this->nodeEnd   = nodeEnd;
+}
+
+inline void Pre_Patch_Struct::SetNodeMapping(vector<vector<int> > &frameOfAxes)
+{
+    this->frameOfAxes = frameOfAxes;
+}
+
+inline void Pre_Patch_Struct::SetAxisLabel(vector<int> &axisLabel)
+{
+    this->axisLabel = axisLabel;
+}
+
+inline void Pre_Patch_Struct::SetSimpleBlock(Pre_Block_Struct *simpleBlock)
+{
+    this->simpleBlock = simpleBlock;
+}
+
+inline void Pre_Patch_Struct::SetTargetBlockLabel(int i)
+{
+    this->targetBlockLabel = i;
+}
+
+inline vector<int> & Pre_Patch_Struct::GetNodeStart()
+{
+    return this->nodeStart;
+}
+
+inline vector<int> & Pre_Patch_Struct::GetNodeEnd()
+{
+    return this->nodeEnd;
+}
+
+inline vector<int> & Pre_Patch_Struct::GetAxisLabel()
+{
+    return this->axisLabel;
+}
+
+inline Pre_Block_Struct * Pre_Patch_Struct::GetSimpleBlock()
+{
+    return this->simpleBlock;
+}
+
+inline vector<vector<int> > & Pre_Patch_Struct::GetFrameOfAxes()
+{
+    return this->frameOfAxes;
+}
+
+inline int Pre_Block_Struct::GetNumberOfUnitCells()
+{
+    return Pre_Block_Struct::numberOfUnitCells;
+}
+
+inline int Pre_Block_Struct::GetNumberOfNodes()
+{
+    return nodeDimension[0] * nodeDimension[1] * nodeDimension[2];
+}
+
+inline int Pre_Block_Struct::GetNumberOfCells()
+{
+    return (nodeDimension[0] - 1) * (nodeDimension[1] - 1) * max((nodeDimension[2] - 1), 1);
+}
+
+inline void Pre_Block_Struct::AddBoundaryFace(Pre_BcFace_Struct *boundaryFace)
+{
+    boundaryFaceList.push_back(boundaryFace);
+}
+
+inline void Pre_Block_Struct::SetZoneIndex(int iZone)
+{
+    this->zoneIndex = iZone;
+}
+
+inline void Pre_Block_Struct::SetProcessorIndex(int iProcessor)
+{
+    this->processorIndex = iProcessor;
+}
+
+inline void Pre_Block_Struct::SetOriginalZoneIndex(int iZone)
+{
+    this->originalZoneIndex = iZone;
+}
+
+inline void Pre_Block_Struct::SetParentBlock(Pre_Block_Struct *parent)
+{
+    this->parent = parent;
+}
+
+inline void Pre_Block_Struct::SetBoundaryFace(int i, Pre_BcFace_Struct *boundaryFace)
+{
+    boundaryFaceList[i] = boundaryFace;
+}
+
+inline int Pre_Block_Struct::GetZoneIndex()
+{
+    return zoneIndex;
+}
+
+inline int Pre_Block_Struct::GetOriginalZoneIndex()
+{
+    return originalZoneIndex;
+}
+
+inline Pre_BcFace_Struct * Pre_Block_Struct::GetBoundaryFace(int i)
+{
+    return boundaryFaceList[i];
+}
+
+inline void Pre_Block_Struct::SetOriginalIndex(vector<int> &od)
+{
+    originalIndex = od;
+}
+inline void Pre_Block_Struct::SetNodeDimension(vector<int> &nd)
+{
+    nodeDimension = nd;
+}
+
+inline vector<int> & Pre_Block_Struct::GetOriginalIndex()
+{
+    return originalIndex;
+}
+
+inline vector<int> & Pre_Block_Struct::GetNodeDimension()
+{
+    return nodeDimension;
+}
+
+inline int Pre_Block_Struct::GetNI() const
+{
+    return ni;
+}
+
+inline int Pre_Block_Struct::GetNJ() const
+{
+    return nj;
+}
+
+inline int Pre_Block_Struct::GetNK() const
+{
+    return nk;
+}
+
+inline void Pre_Block_Struct::SetNI(int ni)
+{
+    this->ni = ni;
+}
+
+inline void Pre_Block_Struct::SetNJ(int nj)
+{
+    this->nj = nj;
+}
+
+inline void Pre_Block_Struct::SetNK(int nk)
+{
+    this->nk = nk;
+}
+
+inline RDouble * Pre_Block_Struct::GetX()
+{
+    return &x[0];
+}
+
+inline RDouble * Pre_Block_Struct::GetY()
+{
+    return &y[0];
+}
+
+inline RDouble * Pre_Block_Struct::GetZ()
+{
+    return &z[0];
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_CGNSConversion_Struct.h b/API/PreProcess/include/Pre_CGNSConversion_Struct.h
new file mode 100644
index 0000000..f4a15e6
--- /dev/null
+++ b/API/PreProcess/include/Pre_CGNSConversion_Struct.h
@@ -0,0 +1,168 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_CGNSConversion_Struct.h
+//! @brief     Grid conversion from CGNS.
+//! @author    Xu Gang.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "Pre_GridConversion.h"
+#include "cgnslib.h"
+
+using namespace std;
+namespace PHSPACE
+{
+class CGNS_Str_Data;
+
+class Pre_CGNSConversion_Struct : public Pre_GridConversion
+{
+public:
+    LIB_EXPORT Pre_CGNSConversion_Struct(const string &gridFileName);
+    LIB_EXPORT ~Pre_CGNSConversion_Struct();
+
+private:
+    void ReadGrid();
+
+private:
+    void tram(int *a, int *b, int *v, int nCoords);
+    int del(int x, int y);
+
+public:
+    void ResetGridScaleAndTranslate();
+
+public:
+    CGNS_Str_Data *Str_CGNS_Data;
+
+};
+
+class BaseData;
+typedef char char_33[33];
+typedef cgsize_t cgsize_t_60000[60000];
+
+//! @brief Collection the grid information from CGNS.
+//! CGNS_Str_Data
+//! BaseData
+class CGNS_Str_Data
+{
+public:
+    CGNS_Str_Data(int nzones_in);
+    ~CGNS_Str_Data(void);
+
+private:
+    int nzones;
+    BaseData **base_cgns;
+
+public:
+    BaseData * GetBaseData(int iZone) { return base_cgns[iZone]; }
+};
+
+//! @brief Collection the grid information in each block.
+//! BaseData
+class BaseData
+{
+public:
+    BaseData(void);
+    ~BaseData(void);
+
+private:
+    int nCoords, idim, jdim, kdim;
+    int nconnect, nBCRegions, n1to1;
+    RDouble ***x, ***y, ***z;
+    char_33 *zonenames, *familyName;
+    BCType_t *bocoType;
+    cgsize_t_60000 *pnts;
+    string *bcName;
+    int *lab1, *lab2;
+    int ier;
+    cgsize_t **srange, **donor_range;
+    int **b, **vt;
+    char_33 *connectname, *donorname;
+
+public:
+    void SetIdim(int data_in) { this->idim = data_in; }
+    void SetJdim(int data_in) { this->jdim = data_in; }
+    void SetKdim(int data_in) { this->kdim = data_in; }
+
+    int GetIdim() { return idim; }
+    int GetJdim() { return jdim; }
+    int GetKdim() { return kdim; }
+
+    void SetNCoords(int nCoords_in) { this->nCoords = nCoords_in; }
+    int GetNCoords() { return nCoords; }
+
+    void SetX(RDouble ***x_in) { this->x = x_in; }
+    void SetY(RDouble ***y_in) { this->y = y_in; }
+    void SetZ(RDouble ***z_in) { this->z = z_in; }
+    RDouble *** GetX() { return x; }
+    RDouble *** GetY() { return y; }
+    RDouble *** GetZ() { return z; }
+
+    void SetZonenames(char_33 *zonenames_in) { this->zonenames = zonenames_in; }
+    char_33 * GetZonenames() { return zonenames; }
+
+    void SetFamilyName(char_33 *familyName_in) { this->familyName = familyName_in; }
+    char_33 * GetFamilyName() { return familyName; }
+
+    void SetBocoType(BCType_t *bocoType_in) { this->bocoType = bocoType_in; }
+    BCType_t * GetBocoType() { return bocoType; }
+
+    void SetPnts(cgsize_t_60000 *pnts_in) { this->pnts = pnts_in; }
+    cgsize_t_60000 * GetPnts() { return pnts; }
+
+    void SetBcName(string *bcName_in) { this->bcName = bcName_in; }
+    string * GetBcName() { return bcName; }
+
+    void SetLab1(int *lab1_in) { this->lab1 = lab1_in; }
+    int * GetLab1() { return lab1; }
+
+    void SetNconnect(int nconnect_in) { this->nconnect = nconnect_in; }
+    int GetNconnect() { return nconnect; }
+
+    void SetNBCRegions(int nBCRegions_in) { this->nBCRegions = nBCRegions_in; }
+    int GetNBCRegions() { return nBCRegions; }
+
+    void SetN1to1(int n1to1_in) { this->n1to1 = n1to1_in; }
+    int GetN1to1() { return n1to1; }
+
+    void SetB(int *b_in, int one21_in) { this->b[one21_in] = b_in; }
+    int * GetB(int one21_in) { return b[one21_in]; }
+
+    void SetVt(int *vt_in, int one21_in) { this->vt[one21_in] = vt_in; }
+    int * GetVt(int one21_in) { return vt[one21_in]; }
+
+    void ResizeRange(int n1to1_in);
+    void SetSrange(cgsize_t *srange_in, int one21_in) { this->srange[one21_in] = srange_in; }
+    cgsize_t * GetSrange(int one21_in) { return srange[one21_in]; }
+
+    void SetDonor_range(cgsize_t *donor_range_in, int one21_in) { this->donor_range[one21_in] = donor_range_in; }
+    cgsize_t * GetDonor_range(int one21_in) { return donor_range[one21_in]; }
+
+    void SetLab2(int lab2_in, int one21_in) { this->lab2[one21_in] = lab2_in; }
+    int Getlab2(int one21_in) { return lab2[one21_in]; }
+
+    void SetIer(int ier_in) { this->ier = ier_in; }
+    int GetIer() { return ier; }
+
+    void SetConnectname(char_33 *connectname_in) { this->connectname = connectname_in; }
+    void SetDonorname(char_33 *donorname_in) { this->donorname = donorname_in; }
+    char_33 * GetConnectname() { return connectname; }
+    char_33 * GetDonorname() { return donorname; }
+};
+
+
+
+
+
+
+}
+
+
diff --git a/API/PreProcess/include/Pre_CGNSToPHengLEI_Struct.h b/API/PreProcess/include/Pre_CGNSToPHengLEI_Struct.h
new file mode 100644
index 0000000..7126309
--- /dev/null
+++ b/API/PreProcess/include/Pre_CGNSToPHengLEI_Struct.h
@@ -0,0 +1,43 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_CGNSToPHengLEI_Struct.h
+//! @brief     Grid conversion from CGNS to PHengLEI.
+//! @author    Xu Gang.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "Pre_CGNSConversion_Struct.h"
+#include "cgnslib.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+class CGNS_Str_Data;
+
+class Pre_CGNSToPHengLEI_Struct : public Pre_CGNSConversion_Struct
+{
+public:
+    LIB_EXPORT Pre_CGNSToPHengLEI_Struct(const string &gridFileName);
+    LIB_EXPORT ~Pre_CGNSToPHengLEI_Struct();
+
+private:
+    void Conversion();
+
+private:
+    void SetCoordinate();
+    void SetBCInfo();
+    void CheckMeshMultigrid();
+
+};
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_CGNSToPHengLEI_Unstruct.h b/API/PreProcess/include/Pre_CGNSToPHengLEI_Unstruct.h
new file mode 100644
index 0000000..7c2c3df
--- /dev/null
+++ b/API/PreProcess/include/Pre_CGNSToPHengLEI_Unstruct.h
@@ -0,0 +1,53 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_CGNSToPHengLEI_Unstruct.h
+//! @brief     Grid conversion from CGNS to PHengLEI.
+//! @author    Bell, He Xin.
+
+#pragma once
+#include "Pre_GridConversion.h"
+#include "Pre_GridBase.h"
+using namespace std;
+
+namespace PHSPACE
+{
+//! @brief Pre_CGNSToPHengLEI_Unstruct class defines the method of 
+//! Grid conversion from CGNS format to PHengLEI.
+class Pre_CGNSToPHengLEI_Unstruct : public Pre_GridConversion
+{
+public:
+    //! @param[in] Grid file name of field view grid.
+    LIB_EXPORT Pre_CGNSToPHengLEI_Unstruct(const string &gridFileName);
+
+    LIB_EXPORT ~Pre_CGNSToPHengLEI_Unstruct();
+
+public:
+    //! Dump additional information.
+    LIB_EXPORT void WriteAdditionalInformation(const string &targetGridFileName, Grid **grids_in);
+
+private:
+    //! Read the information of original grid.
+    void ReadGrid();
+
+    //! Perform the grid conversion.
+    void Conversion();
+
+private:
+    CGNSFactory *factory_cgns;
+};
+
+namespace FIELDVIEW_SPACE
+{
+
+}
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_CGNSToPlot3D_Struct.h b/API/PreProcess/include/Pre_CGNSToPlot3D_Struct.h
new file mode 100644
index 0000000..0fcd2c3
--- /dev/null
+++ b/API/PreProcess/include/Pre_CGNSToPlot3D_Struct.h
@@ -0,0 +1,61 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_CGNSToPlot3D_Struct.h
+//! @brief     Grid conversion from CGNS to Plot3D.
+//! @author    Refactored by He Xianyao, Xu Gang, He Xin.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "Pre_CGNSConversion_Struct.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+class CGNS_Str_Data;
+
+//! @brief Pre_CGNSToPlot3D_Struct class defines the method of Grid conversion from CGNS format to Plot3D.
+//! Pre_CGNSToPlot3D_Struct
+//! CGNS_Str_Data, BaseData
+class Pre_CGNSToPlot3D_Struct : public Pre_CGNSConversion_Struct
+{
+public:
+    //! @param[in] gridFileName    Grid file name of CGNS grid.
+    //! mode = 0 (output .grd, .inp files); mode(Default) = 1 (output .grd, .inp, .bc, .bcname files with the name "_0").
+    LIB_EXPORT Pre_CGNSToPlot3D_Struct(const string &gridFileName);
+    LIB_EXPORT ~Pre_CGNSToPlot3D_Struct();
+
+private:
+    void Conversion();
+
+private:
+    //! Write the plot3d format grid file.
+    void WriteToGrd();
+
+    //! Write the boundary condition file.
+    void WriteToInp();
+
+    //! Write the boundary face information into file.
+    void WriteToBcinformation();
+
+    //!
+    void writetoCGNS(fstream &bcfile, cgsize_t *pnts, int lab, string bcName, int nCoords);
+
+private:
+    string cel_file;
+    string bnd_file;
+    string bcinfor_file;
+
+};
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_FieldViewToPHengLEI_Unstruct.h b/API/PreProcess/include/Pre_FieldViewToPHengLEI_Unstruct.h
new file mode 100644
index 0000000..60a4e89
--- /dev/null
+++ b/API/PreProcess/include/Pre_FieldViewToPHengLEI_Unstruct.h
@@ -0,0 +1,108 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_FieldViewToPHengLEI_Unstruct.h
+//! @brief     Grid conversion from fieldview format to PHengLEI.
+//! @author    Bell, He Xin.
+
+#pragma once
+#include "cgnslib.h"
+#include "Pre_GridConversion.h"
+#include "Pre_GridBase.h"
+using namespace std;
+
+namespace PHSPACE
+{
+//! @brief Pre_FieldViewToPHengLEI_Unstruct class defines the method of 
+//! Grid conversion from fieldview format to PHengLEI.
+class Pre_FieldViewToPHengLEI_Unstruct : public Pre_GridConversion
+{
+    static const int FIELDVIEW     = 1;
+    static const int FIELDVIEW_2_4 = 2;
+    static const int FIELDVIEW_3_0 = 3;
+public:
+    //! @param[in] Grid file name of field view grid.
+    LIB_EXPORT Pre_FieldViewToPHengLEI_Unstruct(const string &gridFileName);
+
+    LIB_EXPORT ~Pre_FieldViewToPHengLEI_Unstruct();
+
+public:
+    //! Dump additional information.
+    LIB_EXPORT void WriteAdditionalInformation(const string &out_grid_file, Grid **grids_in);
+
+private:
+    //! Read the original grid.
+    void ReadGrid();
+
+    //! Get the version of Field view grid.
+    void GetFieldViewVersion(fstream &file, int &nversion);
+
+    //! Get the block number of Field view grid.
+    void GetFieldViewNBlocks(fstream &file, int nversion);
+
+    //! Get the BC type number of Field view grid.
+    void GetFieldViewNBCType(fstream &file, int nversion, int &nBCType);
+
+    //!
+    void GetFieldViewBCNameTable(fstream &file, int nversion, int nBCType, string *bctype_name_list);
+
+    //!
+    void GetFieldViewBCTypeTable(int nBCType, int nversion, string *bctype_name_list, int *bctype_list);
+
+    //!
+    void Gridgen2CGNSBCTypeTable(int nBCType, int *bctype_list);
+
+    //! Get the total node number of Field view grid.
+    void GetFieldViewNTNode(fstream &file, int nversion, int &nTotalNode);
+
+    //! Get the boundary face number of Field view grid.
+    void GetFieldViewNBFace(fstream &file, int nversion, int &nBoundFace);
+
+    //! Read the coordinates of Field view grid.
+    void ReadFieldViewCoor(fstream &file, int nTotalNode, RDouble *x, RDouble *y, RDouble *z);
+
+    //!
+    void GetFieldViewBCCell(fstream &file, int nBoundFace, int *bctype_list,
+                            int &nBC_Sections, int *&elem_type, int *&istart, int *&iend, cgsize_t **&conn_list,
+                            int &nBCRegions, cgsize_t **&bc_conn_list, int *&nBCElem, int *&bc_type);
+
+    //!
+    void GetFieldViewMainCell(fstream &file, int &nTotalCell, int &nSections, int *&elem_type,
+                              int *&istart, int *&iend, cgsize_t **&conn_list);
+
+    //!
+    void MergeFieldViewCell(CGNSFactory *factory_cgns, int iZone, int nBoundFace, int nTotalNode, int nTotalCell,
+                            int nElem_Sections, int *elem_type, int *elem_istart, int *elem_iend, cgsize_t **elem_conn_list,
+                            int nBC_Sections, int *bc_elem_type, int *bc_istart, int *bc_iend, cgsize_t **bc_elem_conn_list,
+                            int nBCRegions, cgsize_t **bc_conn_list, int *nBCElem, int *bc_type);
+
+    void ElemReorderFieldView2CGNS(int etype, cgsize_t *node_swap, cgsize_t *node_results);
+
+    void Conversion();
+
+private:
+    CGNSFactory *factory_cgns;
+};
+
+namespace FIELDVIEW_SPACE
+{
+    //! Cell type definition in field view.
+    const int TETR = 1;    //! Tetrahedron.
+    const int PYRA = 4;    //! Pyramid.
+    const int PRIS = 3;    //! Prism.
+    const int HEXA = 2;    //! Hexahedron.
+
+    //! The following two types are added for convenience and have not been confirmed.
+    const int TRIA = 5;    //! Surface triangle.
+    const int QUAD = 6;    //! Surface quadrilateral.
+}
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_FluentToPHengLEI_Unstruct.h b/API/PreProcess/include/Pre_FluentToPHengLEI_Unstruct.h
new file mode 100644
index 0000000..8cac0f4
--- /dev/null
+++ b/API/PreProcess/include/Pre_FluentToPHengLEI_Unstruct.h
@@ -0,0 +1,116 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_FluentToPHengLEI_Unstrut.h
+//! @brief     Grid conversion from fluent format(.cas) to PHengLEI(.fts).
+//! @author    He Xin.
+
+#pragma once
+#include "Pre_GridConversion.h"
+#include "Pre_GridBase.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+class GridFormat_Fluent;
+//! @brief Pre_FluentToPHengLEI_Unstrut class defines the method of 
+//! Grid conversion from fluent format(.cas) to PHengLEI(.fts).
+class Pre_FluentToPHengLEI_Unstruct : public Pre_GridConversion
+{
+public:
+    //! @param[in] Grid file name of fluent format grid.
+    LIB_EXPORT Pre_FluentToPHengLEI_Unstruct(const string &gridFileName);
+
+    LIB_EXPORT ~Pre_FluentToPHengLEI_Unstruct();
+
+    //! Write additional information besides grid file, e.g face BC file and BC name.
+    //! @param[in] Output grid file name of PHengLEI.
+    LIB_EXPORT void WriteAdditionalInformation(const string &out_grid_file);
+
+private:
+    void ReadGrid();
+    void Conversion();
+    void ReadFluent(GridFormat_Fluent *&fluent_factory, int &nBlocks, const string &casefile);
+    void AnalysisFluentKeyWord(GridFormat_Fluent *fluent_factory, fstream &file, string &line);
+    void ReadFluentNodes(RawGrid *rawgrid, int first_index, int last_index, int dimension, fstream &file);
+    void ReadFluentFace(GridFormat_Fluent *fluent_factory, int zone_id, int first_index, int last_index, int bc_type, int face_type, fstream &file);
+    void ReadFluentCell(int first_index, int last_index, fstream &file);
+    void ReadFluentEdge(int first_index, int last_index, fstream &file);
+    void ReadFluentPeriodicface(int first_index, int last_index, fstream &file);
+    void ReadFluentCellTree(int first_index, int last_index, fstream &file);
+    void ReadFluentFaceTree(int first_index, int last_index, fstream &file);
+
+private:
+    GridFormat_Fluent *fluent_factory;
+};
+
+class FluentFacePatch
+{
+private:
+    int zone_id, bc_type, face_type;
+    int nTotalFace;
+    vector<int> left_cell_of_face, right_cell_of_face;
+    vector<vector<int> > face2node;
+    string patchName;
+public:
+    int  GetZoneID() const { return zone_id; }
+    void SetZoneID(int zone_id) { this->zone_id = zone_id; }
+    int  GetFaceType() const { return face_type; }
+    void SetFaceType(int face_type) { this->face_type = face_type; }
+    int  GetBCType() const { return bc_type; }
+    void SetBCType(int bc_type) { this->bc_type = bc_type; }
+    int  GetNTotalFace() const { return nTotalFace; }
+    void SetNTotalFace(int nTotalFace) { this->nTotalFace = nTotalFace; }
+    void SetPatchName(const string &patchNameIn) { this->patchName = patchNameIn; }
+    string GetPatchName() const { return this->patchName; }
+public:
+    vector<vector<int> > & GetFace2Node() { return face2node; }
+    vector<int> & GetLeftCellOfFace()  { return left_cell_of_face; }
+    vector<int> & GetRightCellOfFace() { return right_cell_of_face; }
+};
+
+class GridFormat_Fluent
+{
+public:
+    GridFormat_Fluent();
+    ~GridFormat_Fluent();
+private:
+    RawGrid *rawgrid;
+    int dimension;
+    int nTotalNode, nTotalCell, nTotalFace, nBoundFace;
+    int nPatchs;
+    vector<FluentFacePatch *> face_patchs;
+    map<int, int> bcmap;
+public:
+    RawGrid * GetRawGrid() const { return rawgrid; }
+    int  GetNTotalNode() const { return nTotalNode; }
+    void SetNTotalNode(int nTotalNode) { this->nTotalNode = nTotalNode; }
+    int  GetNTotalCell() const { return nTotalCell; }
+    void SetNTotalCell(int nTotalCell) { this->nTotalCell = nTotalCell; }
+    int  GetNTotalFace() const { return nTotalFace; }
+    void SetNTotalFace(int nTotalFace) { this->nTotalFace = nTotalFace; }
+    int  GetNBoundFace() { return nBoundFace; }
+    int  GetDimension() const { return dimension; }
+    void SetDimension(int dimension) { this->dimension = dimension; }
+    vector<FluentFacePatch *> & GetFluentFacePatchS() { return face_patchs; }
+public:
+    void Process();
+    void ReorderFacePatchs();
+    void BuildBCMap();
+    int  Fluent2FantasyBC(int bctype);
+    void SetBoundaryName(int zoneIndex, const string &BCName);
+    void ResetBCTypeOfSelfDefinePart(int zoneIndex);
+    void DumpSelfDefinePartInformation();
+    void Convert2UnsGrid(UnstructGrid *grid);
+};
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_GridBase.h b/API/PreProcess/include/Pre_GridBase.h
new file mode 100644
index 0000000..115dd18
--- /dev/null
+++ b/API/PreProcess/include/Pre_GridBase.h
@@ -0,0 +1,347 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_GridBase.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+#include <vector>
+#include <set>
+#include <map>
+#include <string>
+#include "Precision.h"
+#include "cgnslib.h"
+#include "Geo_UnstructGrid.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+class CGNSRawCoor
+{
+public:
+    void * GetCoor(int icoor) { return coor[icoor]; }
+private:
+    cgsize_t nTotalNode;
+    DataType_t *type;
+    void *coor[3];
+public:
+    CGNSRawCoor();
+    ~CGNSRawCoor();
+public:
+    void SetAllData(RDouble *x, RDouble *y, RDouble *z);
+    void AllocateData(int icoor, cgsize_t nTotalNode, DataType_t type);
+private:
+    void SetData(int icoor, DataType_t type, RDouble *x);
+    void DeAllocateData();
+};
+
+class RawGrid
+{
+public:
+    RawGrid();
+    ~RawGrid();
+private:
+    cgsize_t nTotalNode;
+    RDouble *x, *y, *z;
+public:
+    cgsize_t GetNTotalNode() const { return nTotalNode; }
+    void SetNTotalNode(cgsize_t nTotalNode) { this->nTotalNode = nTotalNode; }
+    RDouble * GetX() const { return x; }
+    RDouble * GetY() const { return y; }
+    RDouble * GetZ() const { return z; }
+    void SetX(RDouble *x) { this->x = x; }
+    void SetY(RDouble *y) { this->y = y; }
+    void SetZ(RDouble *z) { this->z = z; }
+};
+
+class MultiIndex
+{
+public:
+    int size, id;
+    int *data;
+public:
+    MultiIndex();
+    MultiIndex(int size, int id = 0);
+    MultiIndex(const MultiIndex &rhs);
+    MultiIndex & operator = (const MultiIndex &rhs);
+    ~MultiIndex();
+public:
+    bool operator < (const MultiIndex &rhs) const;
+    void SetData(int *data);
+};
+
+class CElemFace
+{
+public:
+    CElemFace();
+    ~CElemFace();
+private:
+    int face_num;
+    int *face_clkwise;
+    int *facept_num;
+    int **face_id;
+public:
+    int ** GetFaceID() const { return face_id; }
+    int * GetFacePointNumber() const { return facept_num; }
+    int GetFaceNumber() const { return face_num; }
+public:
+    void Init(int elem_type);
+};
+
+class BaseElement
+{
+public:
+    BaseElement();
+    ~BaseElement();
+private:
+    int size;
+    CElemFace *elementface;
+    cgsize_t *elementpoint;
+public:
+    cgsize_t * GetElementPoint() const { return elementpoint; }
+    CElemFace * GetElementFace() const { return elementface; }
+private:
+    void InitElementFace();
+    void InitElementPoint();
+};
+
+class BaseBCType
+{
+public:
+    BaseBCType();
+    ~BaseBCType();
+    void Init();
+private:
+    int ibcmax;
+    map<int, int> bctypemap;
+    map<int, int> fts2cgns;
+public:
+    int GetBCType(int bctype) { return bctypemap[bctype]; }
+    int Fantasy2CGNS(int bctype) { return fts2cgns[bctype]; }
+};
+
+class Base_Grid_Conn;
+
+class CGNSBase
+{
+public:
+    CGNSBase();
+    ~CGNSBase();
+public:
+    void SetNTotalCell(cgsize_t nTotalCell) { this->nTotalCell = nTotalCell; }
+    cgsize_t GetNTotalCell() const { return nTotalCell; }
+
+    void SetNTotalNode(cgsize_t nTotalNode) { this->nTotalNode = nTotalNode; }
+    cgsize_t GetNTotalNode() const { return nTotalNode; }
+
+    void SetNBoundFace(cgsize_t nBoundFace) { this->nBoundFace = nBoundFace; }
+    cgsize_t GetNBoundFace() const { return nBoundFace; }
+private:
+    cgsize_t nTotalNode, nTotalCell, nBoundFace;
+    int nSections, nBCRegions;
+    string *boundaryName;
+    string  volumeName;
+    cgsize_t *istart, *iend;
+    cgsize_t *ElementDataSize;
+    int *elem_type;
+    cgsize_t **conn_list;
+    int *nBCElem;
+    cgsize_t **mixed_conn_index;
+
+    int *bc_type;
+    int *bc_elem_set_type, *bc_grid_location;
+    cgsize_t **bc_conn_list;
+    int vcType;
+public:
+    string * GetBCName() const { return boundaryName; }
+    void SetBCName(string *nameIn) { boundaryName = nameIn; }
+
+    string GetVCName() { return volumeName; }
+    void SetVCName(string nameIn) { volumeName = nameIn; }
+
+    int  GetVCType() { return vcType; }
+    void SetVCType(int vcTypeIn) { vcType = vcTypeIn; }
+
+    cgsize_t ** GetBoundaryElementConnectionList() const { return bc_conn_list; }
+    void SetBoundaryElementConnectionList(cgsize_t **bc_conn_list) { this->bc_conn_list = bc_conn_list; }
+
+    int * GetBCType() const { return bc_type; }
+    void SetBCType(int *bc_type) { this->bc_type = bc_type; }
+
+    int * GetBoundaryGridLocation() const { return bc_grid_location; }
+    void SetBoundaryGridLocation(int *bc_grid_location) { this->bc_grid_location = bc_grid_location; }
+
+    int * GetBoundaryElementType() const { return bc_elem_set_type; }
+    void SetBoundaryElementType(int *bc_elem_set_type) { this->bc_elem_set_type = bc_elem_set_type; }
+
+    int * GetNumberOfBCElements() const { return nBCElem; }
+    void SetNumberOfBCElements(int *nBCElem) { this->nBCElem = nBCElem; }
+
+    cgsize_t ** GetElementConnectionList() const { return conn_list; }
+    cgsize_t ** GetMixedConnectionIndex() const { return mixed_conn_index; }
+    int GetNumberOfSections() const { return nSections; }
+    void SetNumberOfSections(int nSections) { this->nSections = nSections; }
+
+    int GetNumberOfBCRegions() const { return nBCRegions; }
+    void SetNumberOfBCRegions(int nBCRegions) { this->nBCRegions = nBCRegions; }
+
+    cgsize_t * GetIndexOfStart() const { return istart; }
+    cgsize_t * GetIndexOfEnd() const { return iend; }
+    cgsize_t * GetElementDataSize() const { return ElementDataSize; }
+
+    int * GetElementType() const { return elem_type; }
+public:
+    void CreateElement(int nSections);
+    void CreateBC(int nBCRegions);
+    void PreProcess(Base_Grid_Conn *gconn, BaseElement *base_elem);
+    void PostProcess(Base_Grid_Conn *gconn);
+    void GetISection(cgsize_t iCell, int &isection);
+
+    bool CheckBCFace(int *bc_face, int nfacept, set<cgsize_t> &bc_vertex);
+
+    void ComputeGridConn(Base_Grid_Conn *gconn, BaseElement *base_elem);
+    void GetElem(cgsize_t *elem_source, cgsize_t iCell, int ptnum, cgsize_t *&elem);
+    void GetBCFaceMixed(cgsize_t *elem_source, cgsize_t iCell, int isection, cgsize_t *&elem);
+    void GetElem(BaseElement *base_elem, cgsize_t iCell, int &etype, cgsize_t *&elem);
+    void GetFace(BaseElement *base_elem, cgsize_t iCell, int &facept_num, cgsize_t *&bcface);
+    void GetFace(Base_Grid_Conn *gconn, cgsize_t *elem, cgsize_t iCell, CElemFace *elemface);
+    void GetFace(cgsize_t *elem, int loc, int *bc_face, int &nfacept, CElemFace *elemface);
+
+    void ComputeElemFace(Base_Grid_Conn *gconn, BaseElement *base_elem);
+    void ComputeBCFace(Base_Grid_Conn *gconn, BaseElement *base_elem);
+    void ComputeCellToNode(Base_Grid_Conn *gconn, BaseElement *base_elem);
+    bool MarkBCFace(Base_Grid_Conn *gconn, cgsize_t *bcface, int facept_num, BCType_t bctype, const string &BCName);
+    void MarkBCInterface(Base_Grid_Conn *gconn);
+
+    void GetBCFace(BaseElement *base_elem, cgsize_t iCell, int &facept_num, cgsize_t *&bcface);
+    void ProcessBCFace(Base_Grid_Conn *gconn, BaseElement *base_elem, cgsize_t iElement, BCType_t bctype, const string &BCName);
+    void ProcessBCVertex(Base_Grid_Conn *gconn, BaseElement *base_elem, int bc_elem_set_type, int nBCElem, cgsize_t *bc_conn_list, int bctype, const string &BCName);
+    void ProcessBCVertex(Base_Grid_Conn *gconn, BaseElement *base_elem, set<cgsize_t> &bc_vertex, int bctype, const string &BCName);
+};
+
+class CGNS_BCFace
+{
+public:
+    CGNS_BCFace(int faceID, int bcType, const string &bcName)
+    {
+        this->faceID = faceID;
+        this->bcType = bcType;
+        this->bcName = bcName;
+    }
+
+private:
+    int faceID;
+    int bcType;
+    string bcName;
+    //int bcID;
+
+public:
+    int GetFaceID() const { return this->faceID; }
+    int GetBCType() const { return this->bcType; }
+    const string & GetBCName() const { return this->bcName; }
+
+    void SetFaceID(int faceID) { this->faceID = faceID; }
+    void SetBCType(int bcType) { this->bcType = bcType; }
+    void SetBCName(const string &bcName) { this->bcName = bcName; }
+
+    CGNS_BCFace & operator = (const CGNS_BCFace &rhs)
+    {
+        if (this == &rhs) return *this;
+
+        this->faceID = rhs.GetFaceID();
+        this->bcType = rhs.GetBCType();
+        this->bcName = rhs.GetBCName();
+
+        return *this;
+    }
+};
+
+class Base_Grid_Conn
+{
+public:
+    Base_Grid_Conn();
+    ~Base_Grid_Conn();
+public:
+    void SetNTotalFace(cgsize_t nTotalFace) { this->nTotalFace = nTotalFace; }
+    cgsize_t GetNTotalFace() const { return nTotalFace; }
+
+    void SetNBoundFace(cgsize_t nBoundFace) { this->nBoundFace = nBoundFace; }
+    cgsize_t GetNBoundFace() const { return nBoundFace; }
+
+    void SetNTotalCell(cgsize_t nTotalCell) { this->nTotalCell = nTotalCell; }
+    cgsize_t GetNTotalCell() const { return nTotalCell; }
+
+    void SetNTotalNode(cgsize_t nTotalNode) { this->nTotalNode = nTotalNode; }
+    cgsize_t GetNTotalNode() const { return nTotalNode; }
+
+    vector< vector<cgsize_t> > * GetFace2Node() const { return face2node; }
+    vector<CGNS_BCFace*> * GetBCFace() const { return this->bcFace; }
+    vector<cgsize_t> * GetLeftCellOfFace() const { return left_cell_of_face; }
+    vector<cgsize_t> * GetRightCellOfFace() const { return right_cell_of_face; }
+    vector<int> * GetFaceLocation() const { return face_location; }
+    vector<int> * GetNodeNumberOfEachFace() const { return node_number_of_each_face; }
+    set<MultiIndex> * GetFaceSet() const { return faceset; }
+    vector<int> * GetNodeNumberOfEachCell() const { return node_number_of_each_cell; }
+    vector< vector<cgsize_t> > * GetCell2Node() const { return cell2node; }
+
+    void FreeFaceSet();
+    void FreeFace2Node();
+    void FreeCell2Node();
+    void FreeCellOfFace();
+    void FreeNodeNumberOfEachFace();
+    void FreeNodeNumberOfEachCell();
+
+private:
+    cgsize_t nTotalNode, nTotalCell, nBoundFace, nTotalFace;
+    set<MultiIndex> *faceset;
+    vector<int> *face_location;
+    vector<CGNS_BCFace *> *bcFace;
+    vector<cgsize_t> *left_cell_of_face, *right_cell_of_face;
+    vector<int> *node_number_of_each_face;
+    vector< vector<cgsize_t> > *face2node;
+    vector<int> *node_number_of_each_cell;
+    vector< vector<cgsize_t> > *cell2node;
+};
+
+class CGNSFactory
+{
+private:
+    int nBlocks;
+    CGNSBase       **base_cgns;
+    Base_Grid_Conn **base_conn;
+    BaseElement    *base_elem;
+    BaseBCType     *fantasy_bc;
+    RawGrid        **rawgrid;
+public:
+    CGNSFactory(int nBlocks);
+    ~CGNSFactory();
+public:
+    Base_Grid_Conn ** GetBaseGridConnection() const { return base_conn; }
+    Base_Grid_Conn * GetBaseGridConnection(int iZone) const { return base_conn[iZone]; }
+    BaseElement * GetBaseElement() const { return base_elem; }
+    BaseBCType * GetBaseBCType() const { return fantasy_bc; }
+    RawGrid  * GetRawGrid(int iZone) { return rawgrid[iZone]; }
+    CGNSBase * GetCGNSBase(int iZone = 0) { return base_cgns[iZone]; }
+    int GetNumberofBlocks() const { return nBlocks; }
+    void ConvertGrid2Fantasy();
+    void DumpSelfDefinePartInformation();
+    void SetNumberofBlocks(int nBlocks_in) { this->nBlocks = nBlocks_in; }
+private:
+    void ComputeGridConn(CGNSBase *cgnsgrid, Base_Grid_Conn *gconn);
+    void ReLableSelfDefineBC();
+};
+
+void CGNS2UnsGrid(CGNSFactory *factory_cgns, int iZone, UnstructGrid *grid);
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_GridCombine.h b/API/PreProcess/include/Pre_GridCombine.h
new file mode 100644
index 0000000..431daec
--- /dev/null
+++ b/API/PreProcess/include/Pre_GridCombine.h
@@ -0,0 +1,154 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_GridCombine.h
+//! @brief     Explain this file briefly.
+//! @author    xxx
+
+#pragma once
+#include "PHMpi.h"
+#include "Region.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+class CombinGrid
+{
+public:
+    CombinGrid(Region *region, Grid **grid_in, int nZones_in);
+    ~CombinGrid();
+public:
+    void RunCombinGrid();
+    Grid ** GetGridAll() const;
+    void DumpMergedGrid(const string &gridFileName, Grid **grids, int nBlocks);
+    void DumpMergedGridP2P(const string &gridFileName, Grid **grids, int nBlocks);
+
+private:
+    void CheckifIndependentZoneExist();
+    Grid * CreateCombinationGrid();
+    void ResetCoordinate();
+    void ResetNodeNumberOfEachFace();
+    void ResetFace2Node();
+    void ResetLeftRightCell();
+    void MergeCell2Node();
+    void MergeBCType();
+    void DumpCombinationGrid();
+
+    void SwapInterfaceData();
+    void CompressInterfaceData(int zoneID, DataContainer *sendBuffer, int neighborZone);
+    void DecompressInterfaceData(int zoneID, DataContainer *recieveBuffer, int neighborZone);
+    
+    void Init();
+    void InitLocal2All();
+    void InitNode2All();
+    void InitFace2All();
+    void InitCell2All();
+    void InitIsBCFaceMerged();
+
+    //! Establish the nodes' connection between zone and whole.
+    void MergeNode2All();
+
+    //! Establish the cells' connection between zone and whole.
+    void MergeCell2All();
+
+    //! Establish the faces' connection between zone and whole.
+    void MergeFace2All();
+
+    //! Establish the interfaces' connection between zone and whole.
+    void MergeInterface2All();
+
+    //! Whether this node is boundary node.
+    bool IsBcNode(int *p, int node_in);
+
+    int * GetNode2All(int iZone) { return node2all[iZone]; }
+    int * GetFace2All(int iZone) { return face2all[iZone]; }
+    int * GetCell2All(int iZone) { return cell2all[iZone]; }
+    //bool * GetIsBCFaceMerged(int iZone) { return isBCFaceMerged[iZone]; }
+
+    int GetNTotalCell() const { return nTotalCell; }
+    int GetNTotalNode() const { return nTotalNode; }
+    int GetNTotalFace() const { return nTotalFace; }
+    int GetNIFace() const { return nIFace; }
+
+    vector<RDouble> GetGlobalx() { return Globalx; }
+    vector<RDouble> GetGlobaly() { return Globaly; }
+    vector<RDouble> GetGlobalz() { return Globalz; }
+
+    int * GetNodeNumberOfAllFace() { return node_number_of_all_face; }
+    vector<int> GetAllFace2Node() { return allface2node; }
+    int * GetLeftCellOfAllFace() { return left_cell_of_all_face; }
+    int * GetRightCellOfAllFace() { return right_cell_of_all_face; }
+
+private:
+    Region *region;
+
+    //! Original multi-block grids.
+    Grid **grid_in;
+
+    //! Combined single block grid.
+    UnstructGrid *grid_all;
+
+    //! The number of total zones.
+    int numberOfZones;
+
+    //! The number of total cells.
+    int nTotalCell;
+
+    //! The number of total nodes.
+    int nTotalNode;
+
+    //! The number of total faces.
+    int nTotalFace;
+
+    //! The number of total interfaces.
+    int nIFace;
+
+    //! The nodes' connection between zone and whole.
+    int **node2all;
+
+    //! The faces' connection between zone and whole.
+    int **face2all;
+
+    //! The cells' connection between zone and whole.
+    int **cell2all;
+
+    //! The grid's information in each zone.
+    int *nTotalNodeEachZone, *nTotalFaceEachZone, *nTotalCellEachZone, *nIFaces;
+
+    //! Global coordinates.
+    vector<RDouble> Globalx, Globaly, Globalz;
+
+    //! Left cell index of each face after combination.
+    int *left_cell_of_all_face;
+
+    //! Right cell index of each face after combination.
+    int *right_cell_of_all_face;
+
+    //! Number of nodes per face after combination.
+    int *node_number_of_all_face;
+
+    bool *isFaceMerged;
+    int  *face2NewFaceafterReorder;
+    int  *face2Interface;
+    int  *face2InterfaceafterReorder;
+    int  *interface2BoundaryFaceafterReorder;
+    bool *isGlobalInterFace;
+
+    //! Face to node: node index of each face after combination.
+    vector<int> allface2node;
+
+    set<int> zoneIDinCurrentProc;
+    map<int, int> zoneIndexMap;
+};
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_GridConversion.h b/API/PreProcess/include/Pre_GridConversion.h
new file mode 100644
index 0000000..d1e2b2a
--- /dev/null
+++ b/API/PreProcess/include/Pre_GridConversion.h
@@ -0,0 +1,108 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_GridConversion.h
+//! @brief     Grid conversion from other format to PHengLEI.
+//! @author    Bell.
+
+#pragma once
+#include "GridType.h"
+using namespace std;
+
+namespace PHSPACE
+{
+//! @brief Pre_GridConversion class defines the method of 
+//! Grid conversion from other format to PHengLEI.
+class Pre_GridConversion
+{
+protected:
+    //! Grid file name of original grid that need to be converted.
+    string gridFileName;
+
+    //! The number of blocks in the grid file.
+    int nBlocks;
+
+    //! The final converted computational grids.
+    Grid **grids;
+
+public:
+    //! @param[in] Grid file name of original grid that need to be converted.
+    LIB_EXPORT Pre_GridConversion(const string &gridFileName);
+
+    LIB_EXPORT virtual ~Pre_GridConversion();
+
+public:
+    //! Run to convert field view grid.
+    LIB_EXPORT void Run();
+
+    //! Return the converted computational grids.
+    Grid ** GetGrids();
+
+    //! Return the number of grid blocks.
+    int GetNumberofBlocks();
+
+    //! Assign the number of grid blocks.
+    void SetNumberofBlocks(int dataIn);
+
+    //! Clear the memory after run, which is the converted computational grids.
+    //! Warning: if this function is executed, the converted computational grids would be deleted.
+    LIB_EXPORT void Clear();
+
+private:
+    virtual void ReadGrid() = 0;
+    virtual void Conversion() = 0;
+
+protected:
+    void WriteFaceBC(const string &out_grid_file, Grid **grids_in);
+    void WriteFaceBoundaryName(const string &out_grid_file, Grid **grids_in);
+    void WriteVolumeName(const string &out_grid_file, Grid **grids_in);
+    void WriteCellToNode(const string &targetGridFileName, Grid **grids_in);
+};
+
+//! Dump the converted grid to file.
+LIB_EXPORT void DumpGrid(const string &gridFileName, Grid **grids, int nBlocks);
+
+LIB_EXPORT void DumpOldGrid(const string &gridFileName, Grid **grids, int nBlocks);
+//!
+void GetGridsBoundingBox(Grid **grids, int nBlocks, RDouble *pmin, RDouble *pmax);
+
+//! Get the minimum and maximum edge length of grid.
+void GetGridsMinMaxDS(Grid **grids, int nBlocks, RDouble &mindis, RDouble &maxdis);
+
+//!
+void MatchInterface(Grid *grid, LinkStruct *link);
+
+//!
+void ConstructGlobalInterfaceLink(Grid **grids,int nBlocks);
+
+//!
+LIB_EXPORT void DumpAdditionalData(const string &gridFileName, Grid **grids, int nBlocks);
+//!
+LIB_EXPORT void DumpFaceBC(const string &gridFileName, Grid **grids, int nBlocks);
+
+//! Dump Characteristic Boundary to file.
+void DumpCharacteristicBoundary(const string &gridFileName, Grid **grids, int nBlocks);
+void WriteBoundaryInfo(Grid **grids_in, int nBlocks);
+void DumpBoundaryInfo(const set< pair<int, string> > &bcNamePairSet);
+
+void WriteBCNameInfo(const string &gridFileName, Grid **grids_in, int nBlocks);
+void DumpBCNameInfo(const set< pair<int, string> > &bcNamePairSet, const string &gridFileName);
+
+void DumpVCNameFile(const set< pair<int, string> > &vcNamePairSet, const string &gridFileName);
+void DumpVolumeConditionFile(const set< pair<int, string> > &vcNamePairSet);
+
+void ComputeCharacteristicBoundary(Grid *grid_in, DataContainer *data);
+void ComputeCharacteristicBoundaryUns(Grid *grid_in, DataContainer *data);
+void ComputeCharacteristicBoundaryStr(Grid *grid_in, DataContainer *data);
+
+#include "Pre_GridConversion.hxx"
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_GridConversion.hxx b/API/PreProcess/include/Pre_GridConversion.hxx
new file mode 100644
index 0000000..9dc5001
--- /dev/null
+++ b/API/PreProcess/include/Pre_GridConversion.hxx
@@ -0,0 +1,14 @@
+inline Grid ** Pre_GridConversion::GetGrids()
+{
+    return this->grids;
+}
+
+inline int Pre_GridConversion::GetNumberofBlocks()
+{
+    return this->nBlocks;
+}
+
+inline void Pre_GridConversion::SetNumberofBlocks(int dataIn)
+{
+    this->nBlocks = dataIn;
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_GridMirror.h b/API/PreProcess/include/Pre_GridMirror.h
new file mode 100644
index 0000000..a555778
--- /dev/null
+++ b/API/PreProcess/include/Pre_GridMirror.h
@@ -0,0 +1,99 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_GridMirror.h
+//! @brief     It defines grid mirror function for pre-processing.
+//! @author    Baka.
+
+#pragma once
+#include "Region.h"
+#include "Geometry.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+class Pre_GridMirror
+{
+public:
+    string gridFileName;
+
+public:
+    LIB_EXPORT Pre_GridMirror(const string &from_gfile);
+    LIB_EXPORT ~Pre_GridMirror();
+
+public:
+    LIB_EXPORT void Run();
+
+private:
+    //! Revert boundary condition information.
+    void RevertBCInfo();
+
+    void ReadLnkFile(const string &fileName_in);
+
+    //! Calculate the symmetry face.
+    void CalSymmetryFace();
+
+    //! Calculate the blocks number of the whole mirror grid.
+    void CalBlocksNumberOfMirrorGrid();
+
+    //! Mirror the grid.
+    void GridMirror();
+
+    //! Mirror the structured grid.
+    void MirrorGridStr(StructGrid *grid_in);
+
+    //! Mirror the boundary condition region.
+    void MirrorBCRegion();
+
+    //! Mirror the unstructured grid.
+    void MirrorGridUnstr(UnstructGrid *grid_in);
+
+    //! Mirror the coordinates of unstructured grid.
+    void MirrorCoordinate(UnstructGrid *grid_in);
+
+    //! Mirror the node number of each face of unstructured grid.
+    void MirrorNodeNumberOfEachFace(UnstructGrid *grid_in);
+
+    void MirrorFace2Node(UnstructGrid *grid_in);
+
+    //! Mirror the cell of each face of unstructured grid.
+    void MirrorCellOfFace(UnstructGrid *grid_in);
+
+    void MirrorCell2Node(UnstructGrid *grid_in);
+
+    void TradeGridInfo();
+    void DumpStrGrid(string out_gfile);
+    void DumpUnstrGrid(string out_gfile);
+
+private:
+    int numberOfZones;
+    int mirrorindex;
+    int Dimension;
+    int numberOfOriginalBlocks;
+    int SymmetryFaceVector;
+    int gridtype;
+    int BlockofEachProc;
+    bool LnkFileExist;
+
+    vector<Grid *> OrdinaryGrid;
+    //Grid ** OrdinaryGrid;
+    vector<DataContainer *> Gridlist;
+    DataContainer *gridinfo;
+    /*vector<Grid *> MirrorGrids;
+    Grid ** OutputGrid;*/
+};
+
+const int X_axis = 0;
+const int Y_axis = 1;
+const int Z_axis = 2;
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_GridTranslator.h b/API/PreProcess/include/Pre_GridTranslator.h
new file mode 100644
index 0000000..1f2aa0e
--- /dev/null
+++ b/API/PreProcess/include/Pre_GridTranslator.h
@@ -0,0 +1,50 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_GridTranslator.h
+//! @brief     Explain this file briefly.
+//! @author    xxx
+
+#pragma once
+#include "Region.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+class GridTranslator
+{
+private:
+    int numberOfZones;
+    int isOverset;
+    vector<StructGrid *> *gridGroup;
+    vector<StructFace *> *structFaceGroup;
+public:
+     GridTranslator();
+     GridTranslator(Grid **&strgrids, int &nBlocks);
+    ~GridTranslator();
+public:
+    void Run();
+private:
+    void ReadGridgenFiles();
+    void ReadGridgenCoordinateFile();
+    void ReadGridgenBoundaryFile();
+    void ProcessBoundaryCondition();
+    void GenerateStructFaceGroup();
+    void ColorateStructFaceGroup();
+    void CollectInterfaceInformation();
+    void OutputMultiZoneComputationalGrids();
+    void OutputGrid();
+    void CheckGrid();
+};
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_HDF5File.h b/API/PreProcess/include/Pre_HDF5File.h
new file mode 100644
index 0000000..f7bb46e
--- /dev/null
+++ b/API/PreProcess/include/Pre_HDF5File.h
@@ -0,0 +1,186 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_HDF5File.h
+//! @brief     It defines HDF5 file read and write method.
+//! @author    Baka.
+
+#pragma once
+#include "IO_HDF5File.h"
+#include "Region.h"
+
+namespace PHSPACE
+{
+
+class IO_HDF5Write
+{
+private:
+    Grid **grids;
+    int nBlocks;
+    string gridFileName;
+
+public:
+    //! Dump nBolcks grids to file.
+    //! @param[in] gridFileName    Grid file name.
+    //! @param[in] grids           The grids that need to be dumped.
+    //! @param[in] nBlocks         The number of the grid zones.
+    IO_HDF5Write(const string &gridFileName, Grid **grids, int nBlocks);
+    ~IO_HDF5Write();
+
+public:
+    void Run();
+
+private:
+    hid_t CreateFile(const string &filename);
+    void WriteVersionInfo(hid_t loc_id);
+    void CreateTotalInfo();
+    void WriteTotalInfo(hid_t loc_id);
+    void WriteGridCoordinates(hid_t loc_id, Grid *gridIn);
+    void WriteInterfaceInfo(hid_t loc_id, Grid *gridIn);
+    void WriteLnkInfo(hid_t loc_id, Grid *gridIn);
+    void WriteVolumeCondition(hid_t loc_id, Grid *gridIn);
+
+    void WriteStructGrid(hid_t loc_id, Grid *gridIn);
+    void WriteBCRegion(hid_t loc_id, Grid *gridIn);
+    void WriteStrBCName(hid_t loc_id, Grid *gridIn);
+    void WriteStrPartitionInfo(hid_t loc_id, Grid *gridIn);
+
+    void WriteUnstructGrid(hid_t loc_id, Grid *gridIn, int iZone);
+    void WriteFaceTopology(hid_t loc_id, Grid *gridIn);
+    void WriteCellTopology(hid_t loc_id, Grid *gridIn);
+    void WriteUnstrBCName(hid_t loc_id, Grid *gridIn);
+    void WriteInterpointInfo(hid_t loc_id, Grid *gridIn);
+    void WriteUnstrPartitionInfo(hid_t loc_id, Grid *gridIn);
+
+private:
+    //! The grids int current processor
+    Grid **gridsLocal;
+    int *nPartOfEachProcessor;
+
+    int *block_proc;
+    int *block_idx;
+    int *block_type;
+    int *file_index;
+};
+
+class IO_HDF5Read
+{
+private:
+    PHVectorString1D gridNameList;
+    double version;
+
+public:
+    //! Read grid from file.
+    //! @param[in] gridFileName    Grid file name.
+    //! @param[in] region_in       The class to manage the geometry.
+    IO_HDF5Read(PHVectorString1D &gridNameListIn, Region *region_in);
+    ~IO_HDF5Read();
+
+public:
+    bool Run();
+
+private:
+    void CheckNumberofFiles(int iGrid);
+    void InitGridFileNameListAndFileProcessor();
+    hid_t OpenH5File(const string &filename);
+
+    void ReadVersionInfo(hid_t loc_id);
+    void ReadTotalInfoOld(hid_t loc_id);
+    void ReadNumberOfZonesOld(hid_t loc_id);    //! Useless.
+    void ReadEachGridOld(hid_t loc_id);
+
+    void ReadTotalInfo();
+    void ReadNumberOfZones();
+    void ReadEachGrid();
+
+    void ReadGridCoordinates(hid_t loc_id, Grid *gridIn);
+    void ReadInterfaceInfo(hid_t loc_id, Grid *gridIn);
+    void ReadVolumeCondition(hid_t loc_id, Grid *gridIn);
+
+    void ReadStructGrid(hid_t loc_id, int iZone);
+    void ReadBCRegion(hid_t loc_id, Grid *gridIn);
+    void ReadLnkInfo(hid_t loc_id, Grid *gridIn);
+    void ReadLnk(hid_t loc_id, int iZone);
+    void ReadStrBCName(hid_t loc_id, Grid *gridIn);
+    void ReadStrPartitionInfo(hid_t loc_id, Grid *gridIn);
+
+    void ReadUnstructGrid(hid_t loc_id, int iZone);
+    void ReadFaceTopology(hid_t loc_id, Grid *gridIn);
+    void ReadCellTopology(hid_t loc_id, Grid *gridIn);
+    void ReadUnstrBCName(hid_t loc_id, Grid *gridIn);
+    void ReadInterpointInfo(hid_t loc_id, Grid *gridIn);
+    void ReadUnstrPartitionInfo(hid_t loc_id, Grid *gridIn);
+
+    void SetNZones(int nZonesIn) { this->numberOfZones = nZonesIn; }
+    int GetNZones() const { return numberOfZones; }
+
+    void RedistributeZonesIfNeed();
+    bool IsZoneLayoutInitialized();
+    void SetGlobalZoneLayout();
+    void ClassifyGridSystem();
+    void AddGrid(Grid *grid);
+    void CreateZones();
+    void ReadWallDist();
+    void SetMixGridInfo();
+
+    void SetBlockProcDump(int *blockProcDumpIn) { this->blockProcDump = blockProcDumpIn; }
+    void SetBlockProcGrid(int *blockProcGridIn) { this->blockProcGrid = blockProcGridIn; }
+    void SetBlockProc(int *blockProcIn) { this->blockProc = blockProcIn; }
+    void SetBlockType(int *blockTypeIn) { this->blockType = blockTypeIn; }
+    void SetBlockIndex(int *blockIdxIn) { this->blockIdx = blockIdxIn; }
+    int * GetBlockProcDump() { return this->blockProcDump; }
+    int * GetBlockProc()     { return this->blockProc; }
+    int * GetBlockProcGrid() { return this->blockProcGrid; }
+    int * GetBlockType()     { return this->blockType; }
+    int * GetBlockIndex()    { return this->blockIdx; }
+
+private:
+    //! The file index which the current processor charged.
+    int fileID;
+    bool isFileProcessor;
+    bool isP2PMode;
+
+    //! The processor index of the current one.
+    int myProcID;
+
+    //! The processor index of the serve.
+    int serverProcID;
+
+    //! Number of global grid files.
+    int globalFileNumber;
+    vector < vector<string> > localGridNameList;
+
+    //! The total number of global zones.
+    int numberOfZones;
+
+    //! Number of zones in each .fts file.
+    VVInt nZonesList;
+
+    uint_t numberOfGridGroups;
+
+    int zoneStart;
+    int presentGridGroup;
+    int *blockProc;
+    int *blockType;
+    int *blockIdx ;
+    int *blockProcDump;
+    int *blockProcGrid;
+    int *blockFileProc;
+    int taskType;
+
+    vector<Grid *> grids;
+    Region *region;
+};
+
+LIB_EXPORT bool ReadHDF5File(Region *region_in, PHVectorString1D &gridGroupNameList);
+LIB_EXPORT void DumpHDF5Grid(const string &gridFileName, Grid **grids, int nBlocks);
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_Plot3DToPHengLEI_Struct.h b/API/PreProcess/include/Pre_Plot3DToPHengLEI_Struct.h
new file mode 100644
index 0000000..92ec8ae
--- /dev/null
+++ b/API/PreProcess/include/Pre_Plot3DToPHengLEI_Struct.h
@@ -0,0 +1,46 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_Plot3DToPHengLEI_Struct.h
+//! @brief     Grid conversion from Plot3D to PHengLEI.
+//! @author    Xu Gang.
+
+#pragma once
+#include "Pre_GridConversion.h"
+#include "Geo_StructGrid.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+class Pre_Plot3DToPHengLEI_Struct : public Pre_GridConversion
+{
+public:
+    LIB_EXPORT Pre_Plot3DToPHengLEI_Struct(const string &gridFileName);
+    LIB_EXPORT ~Pre_Plot3DToPHengLEI_Struct();
+
+private:
+    void ReadGrid();
+    void Conversion();
+
+private:
+    int  CheckPlot3DFileIfASCII();
+    int  CheckGridgenCoorASCIIFileType();
+    void ReadGridgenCoorASCIIPlot3D();
+    void ReadGridgenCoorASCIIGridgen();
+    void ReadGridgenCoor();
+    void ReadGridgenBC();
+    void CheckMeshMultigrid();
+
+};
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_Reorder.h b/API/PreProcess/include/Pre_Reorder.h
new file mode 100644
index 0000000..56d178d
--- /dev/null
+++ b/API/PreProcess/include/Pre_Reorder.h
@@ -0,0 +1,120 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_Reorder.h
+//! @brief     Unstructured grid reorder.
+//! @author    Xi Zhang, Yong Zhang.
+
+//! [1] Zhang Yong, Zhang Xi, Wan Yunbo, He Xianyao, Zhao Zhong, Lu Yutong.
+//!     Optimizations of mesh renumbering for unstructured finite volume Computational Fluid Dynamics[C]. 
+//!     Journal of Computer Research and Development,2021.10,p.123-131.
+#include "Pre_GridBase.h"
+using namespace std;
+using namespace PHSPACE;
+namespace Reorder
+{
+    //! Reorder face label for reducing GPU global memory accessing overheads
+    //! In CGNSBase::ComputeGridConn after CallReorderCellLabel
+    void CallReorderFaceLabel(Base_Grid_Conn *gconn);
+    
+    //! Reorder cell label for reducing bandwidth
+    //! In CGNSBase::ComputeGridConn after PostProcess
+    void CallReorderCellLabel(Base_Grid_Conn *gconn);
+    
+    //! Evaluate the bandwidth in CGNSBase::ComputeGridConn
+    void CallBandwidthEvaluate(Base_Grid_Conn *gconn);
+    
+    //! Evaluate the bandwidth in GPUGeomInfoAllocCopy of BasicDeviceVariables
+    void CallBandwidthFTS(const int nTotalCell, vector<int> *cell2Cell, const int *nNeighborCellOfEachCell);
+    
+    //! Get the current level of vertex rStart
+    //! Input: rStart, nFaceOfEachCell, cell2cell, offsetCell2Cell, reorderCell
+    //! Output: reorderCell, numSortCur, cellIDSortCur
+    void GetCurrentLevel(int rStart, const int *nFaceOfEachCell, const int *cell2Cell, const int *offsetCell2Cell, int *reorderCell, int &numSortCur, int *cellIDSortCur);
+    
+    //! Get the next level of current level
+    //! Input:
+    //! Output:
+    void GetNextLevel(const int &numSortCur, const int *cellIDSortCur, const int *nFaceOfEachCell, const int *cell2Cell, const int *offsetCell2Cell, int *reorderCell, int &numSortNext, int *cellIDSortNext);
+    
+    //! Copy cellIDSortNext into cellIDSortCur	
+    void SetCellIDSortCurByCellIDSortNext(const int &numSortNext, const int *cellIDSortNext, int &numSortCur, int *cellIDSortCur);
+    
+    //! Reset cellIDSortCur or cellIDSortNext by -1
+    void ResetCellSort(int &numSort, int *cellIDSort);
+    
+    //! Output of cellIDSortCur or cellIDSortNext
+    void TestCellSort(const int numSort, const int *cellIDSort);
+    
+    //! Find the smallest degree in cellIDSortCur
+    int FindMinCellIDSortCur(const int numSortCur, const int *cellIDSortCur, const int *nFaceOfEachCell);
+    
+    //! Get current level of rStart for reOrder, the difference from  GetCurrentLevel	is that cancel the set of reorderCell by 1.
+    void GetCurrentLevelForReOrder(int rStart, const int *nFaceOfEachCell, const int *cell2Cell, const int *offsetCell2Cell, int *reorderCell, int &numSortCur, int *cellIDSortCur);
+    
+    //! Arrange cellIDSortCur by Ascending order
+    void AscendingCellIDSortCurByDegree(const int numSortCur, const int *nFaceOfEachCell, int *cellIDSortCur);
+    
+    //! Test degree of cellIDSortCur from 0 to numSortCur
+    void TestCellIDSortCurDegree(const int numSortCur, const int *cellIDSortCur, const int *nFaceOfEachCell);
+    
+    //! Check cell2cell by 3 rules:
+    //! rule1 one cell's neighbor cells should not contain itself.
+    //! rule2 0<= one cell's neighbor cells < nTotalCell
+    //! rule3 one cell's neighbor cells should be different.
+    void CheckCell2Cell(const int nTotalCell, const int *nFaceOfEachCell, const int *offsetCell2Cell, const int * cell2Cell);
+    
+    //! Reorder cells in cellIDSortCur
+    void ReOrderLevelCur(const int numSortCur, const int *cellIDSortCur, int &numVertex, int *reorderCell);
+
+    void GetNextLevelForReOrder(const int &numSortCur, const int *cellIDSortCur, const int *nFaceOfEachCell, const int *cell2Cell, const int *offsetCell2Cell, int *reorderCell, int &numSortNext, int *cellIDSortNext);
+    
+    //! Check rules for cell index
+    //! rule1 0 <= newCell < nTotalCell
+    //! rule2 cell index should be different
+    void CheckNewCell(const int nTotalCell, const int *newCell);
+    
+    //! Compute nFaceOfEachCell and nTotalCellFaces
+    void SetFaceNumberOfEachCell(const int nTotalFace, const int nTotalCell, const int *leftCellOfFace, const int *rightCellOfFace, int *nFaceOfEachCell, int &nTotalCellFaces);
+    
+    //! Set offsetCell2Face by nFaceOfEachCell
+    void SetOffSetCell2Face(const int nTotalCell, const int *nFaceOfEachCell, int *offsetCell2Face);
+    
+    //! Set cell2face by leftCellOfFace, rightCellOfFace, offsetCell2Face
+    //! It should be noted that boundary faces are not considered here.
+    void SetCell2Face(const int nTotalFace, const int nTotalCell, const int *leftCellOfFace, const int *rightCellOfFace, int *offsetCell2Face, int *cell2Face);
+    
+    //! Set cell2Cell
+    void SetCell2Cell(const int nTotalCell, const int *nFaceOfEachCell, const int *offsetCell2Face, const int *cell2Face, const int *leftCellOfFace, const int *rightCellOfFace, int *cell2Cell);
+    
+    //! Compute bandwidth of each cell
+    void ComputeBandwidth(const int nTotalCell, const int *nFaceOfEachCell, const int *offsetCell2Face, const int *cell2Cell);
+    
+    //! Update face_number_of_each_face by swap method
+    //! Intput: nTotalCell, face_number_of_each_face, reflectCell
+    //! Output:nSwapFaceOfEachCell
+    //! The function is used to provide a swap method to update a cell related varible
+    //! After cell reorder. In the future, cell2node can be update by the method
+    void SwapFaceNumberOfEachFace(const int nTotalCell, const int *nFaceOfEachCell, const int *reflectCell, const int *nNewFaceOfEachCell);
+    
+    //! Check swap method for face_number_of_each_face
+    //! After swap, OrgCell=reflectCell, SwapCell=newCell, nSwapFaceOfEachCell=nNewFaceOfEachCell
+    void CheckSwapFaceNumber(const int nTotalCell, const int *orgCell, const int *reflectCell, const int *nSwapFaceOfEachCell, const int *nNewFaceOfEachCell);
+    
+    //! Reorder cell label from nBoundFace to nTotalFace just with the order of faces in cell2face
+    void CellReorderByCell2FaceOrder(const int nTotalCell, const int nTotalFace, const int *offsetCell2Face, const int *nFaceOfEachCell, const int *cell2Face, const int nBoundFace, int labelFace, int *newFaces);
+    
+    //! A caller for MetricLeftRightCellOfFace
+    void CallMetricLeftRightCellOfFace(Base_Grid_Conn *gconn);
+    
+    //! Metric for computing leftCellOfFace and rightCellOfFace for GPU 
+    void MetricLeftRightCellOfFace(const int nTotalFace, const int nBoundFace, const int *leftCellOfFace, const int *rightCellOfFace);
+}
diff --git a/API/PreProcess/include/Pre_StructGridPartition.h b/API/PreProcess/include/Pre_StructGridPartition.h
new file mode 100644
index 0000000..b2650eb
--- /dev/null
+++ b/API/PreProcess/include/Pre_StructGridPartition.h
@@ -0,0 +1,115 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_StructGridPartition.h
+//! @brief     Structured grid partition: manager of block splitting.
+//! @author    Baka, Guo Yongheng.
+
+#include "Region.h"
+#include "Pre_Block_Struct.h"
+
+#pragma once
+
+namespace PHSPACE
+{
+//! @brief Task_WriteBinaryTecplot class finish the structured grid partition.
+//!
+//! Pre_StrGridPartition
+class Pre_StrGridPartition
+{
+public:
+    LIB_EXPORT Pre_StrGridPartition(int numberOfProcessors);
+    LIB_EXPORT ~Pre_StrGridPartition();
+
+    //! Partition structured grid.
+    LIB_EXPORT void Run();
+
+private:
+    //! Number of original blocks.
+    int numberOfOriginalBlocks;
+
+    //! Number of general blocks.
+    int numberOfGeneralBlocks;
+
+    //! Number of processors.
+    int numberOfProcessors;
+
+    //! Geometric dimension.
+    int geometricDimension;
+
+    int numberOfBasicBlocks;
+
+private:
+    void InitSplittingParameter();
+    void BinarySplitBlocks();
+    void GreedySplitBlocks();
+    void SetBlockIndex();
+    void OutputProcessorInformation();
+    void OutputPartitionedGrid();
+
+    void ReadBoundaryData();
+    void ReadLnkFile(const string &fileName_in);
+    void ReadLnkInfor(const string &fileName_in);
+    void InitParititionGrids();
+    void ProcessBCInfo();
+    void WriteGridCoordinate(StructGrid *grid, Pre_Block_Struct *simpleBlock, vector<int> &nst, vector<int> &ned);
+
+    void CheckMultigrid(vector<int> nst, vector<int> ned, int numberOfUnitCells);
+    void CreateInterfaceBoundaryFace(Pre_Block_Struct *leftBlock, Pre_Block_Struct *rightBlock);
+    void CreateInterfaceBoundaryFace(Pre_Block_Struct *leftBlock, Pre_Block_Struct *rightBlock, vector<int> &st, vector<int> &ed);
+    bool GetInterfaceCoordinate(vector<int> &l_st, vector<int> &l_ed, vector<int> &r_st, vector<int> &r_ed, vector<int> &st, vector<int> &ed);
+    bool IsSameDomain(vector<int> &l_st, vector<int> &l_ed, vector<int> &r_st, vector<int> &r_ed);
+    void MarkPatchFace(vector<int> &st, vector<int> &ed, int geometricDimension);
+    void OutputBoundaryInformation(Pre_Block_Struct *Pre_Block_Struct_in, StructGrid *grid, int iZone);
+    void OutputBoundaryInformation(Pre_BcFace_Struct *leafBoundaryFace);
+    void ExtractBoundaryInformation();
+    void ExtractOriginalGridInformation();
+    void OutputPartitionedGridFile();
+    void TraceMark(Pre_Block_Struct *leftBlock, Pre_Block_Struct *rightBlock, Pre_Block_Struct *parentBlock);
+    void DumpMarkInfo();
+
+    void SetWallDist();
+    void WriteGridWallDist(StructGrid *grid, StructGrid *Ordinary_grid, vector<int> &nst);
+    void WriteWalldist(const string &out_grid_file, Grid **grids_in);
+    void WriteWalldist(ActionKey *actkey, StructGrid *grid);
+
+    void ProbeLargestBlock(Pre_Block_Struct *&simpleBlock, RDouble &numberOfCells);
+    void SplitSingleBlock(Pre_Block_Struct *simpleBlock, RDouble ntarget, int ip, bool allotted);
+    void AssignSingleBlock(Pre_Block_Struct *simpleBlock, int ip, RDouble numberOfCells);
+
+    int GetDimension() { return this->geometricDimension; }
+    int GetNumberOfProcessors() { return this->numberOfProcessors; }
+
+    int GetMinimumElementIndex(vector<RDouble> &x);
+    Grid ** GetOrdinaryGrid() { return this->OrdinaryGrid; }
+    Grid ** GetParititionGrids() { return this->parititionGrids; }
+
+private:
+    RDouble delta, idealTime, epsilon;
+    vector<RDouble> reserves;
+    DataContainer *boundaryContainer;
+    vector<Pre_Block_Struct *> referencedBlockContainer;
+    set<Pre_Block_Struct *> unallottedBlockGroup, generalBlockGroup;
+    vector<vector<Pre_Block_Struct *> > specialBlockTable;
+
+    Grid **OrdinaryGrid;
+    Grid **parititionGrids;
+
+    bool LnkFileExist;
+    bool partitionWallDist;
+
+    int traceMark;
+    int blockIndexOfMark;
+    int *cellIndexOfMark;
+};
+
+int GetIntegerDigitWidth(int integerData);
+}
diff --git a/API/PreProcess/include/Pre_StructToUnstruct.h b/API/PreProcess/include/Pre_StructToUnstruct.h
new file mode 100644
index 0000000..b2fb4ca
--- /dev/null
+++ b/API/PreProcess/include/Pre_StructToUnstruct.h
@@ -0,0 +1,52 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_StructToUnstruct.h
+//! @brief     Grid conversion from struct grid to unstruct grid.
+//! @author    Baka.
+
+#pragma once
+
+using namespace std;
+
+namespace PHSPACE
+{
+class Grid;
+class StructGrid;
+class Pre_StructToUnstruct
+{
+private:
+    int numberOfZones;
+    Grid **structGrid;
+    Grid **structToUnstruct;
+
+public:
+    Pre_StructToUnstruct(Grid **structGridIn, int nZonesIn);
+    ~Pre_StructToUnstruct();
+
+public:
+    void Run();
+    Grid ** GetUnstructGrids();
+
+private:
+    void InitMemory();
+    void CopyCoordinate();
+    void CopyIBlock();
+    void ConstructFaceTopo();
+    void ConstructBCType();
+    void CopyInterface();
+    int GetCellIndex(StructGrid *strGrid, int iCell, int jCell, int kCell);
+    int GetNodeIndex(StructGrid *strGrid, int iNode, int jNode, int kNode);
+    void ConstructCellMapStrToUns();
+
+};
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_UnstructGridPartition.h b/API/PreProcess/include/Pre_UnstructGridPartition.h
new file mode 100644
index 0000000..6a5f957
--- /dev/null
+++ b/API/PreProcess/include/Pre_UnstructGridPartition.h
@@ -0,0 +1,262 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Geo_UnstructGridPartition.h
+//! @brief     Unstructured grid partition: serial and parallel.
+//! @author    Bell.
+
+#pragma once
+#include "Geo_UnstructGrid.h"
+#include "TK_Exit.h"
+#ifdef USE_WINDOWS_X64
+#include "parmetis64.h"
+#else
+#include "parmetis.h"
+#endif
+using namespace std;
+
+const int SERIAL_PARTITION    = 0;
+const int PARMETIS_METHOD     = 1;
+const int METIS_METHOD        = 2;
+const int METIS_OPENMP_METHOD = 3;
+
+namespace PHSPACE
+{
+//! @brief Pre_UnstructGridPartition class defines the method of unstructured grid partition.
+//! Serial grid partition using single processor.
+//! Parallel grid partition using many processors.
+class Pre_UnstructGridPartition
+{
+    static const int NOT_IN_THIS_ZONE = -2;
+    static const int IN_THIS_ZONE     = -1;
+private:
+    //! The original source grid that want to be decomposed.
+    UnstructGrid *gridSource;
+
+    //! The partition grids, which is divided from original grid.
+    Grid **grids;
+
+    //! The number of new partition wanted.
+    //! For serial partition, it is equal to the max processor.
+    //! For parallel partition, it is equal to the GLOBAL max processor.
+    int maxProcessor;
+
+    //! Original grid file name, if the original grid does not converted from grid file,
+    //! it could be NON, that is mean orgGridFileName = "".
+    string orgGridFileName;
+
+    //! Parallel partition method:
+    //!   1 -- using ParMETIS for homogeneous MPI.
+    //!   2 -- using METIS for homogeneous MPI.
+    //!   3 -- using METIS partition for homogeneous OpenMP.
+    int parallelPartitionMethod;
+
+    //! OpenMP partition method:
+    //!   0 -- NON used.
+    //!   1 -- Equally partition for each zone.
+    int ompPartMethod;
+public:
+    //! @param[in] gridSource          Original source grid need to be decomposed.
+    //! @param[in] nPartitionBlocks    The number of GLOBAL blocks wanted. It is equal to the number of decomposed 
+    //!                                zones for serial unstructured grid partition.
+    //! @param[in] buildInterfaceMethod  Interfaces building method, used default value of '1' PLEASE!
+    //! @param[in] parallelPartitionMethod Parallel partition method:
+    //!  - # 1 using ParMETIS for homogeneous MPI.
+    //!  - # 2 using METIS for homogeneous MPI.
+    //!  - # 3 using METIS partition for homogeneous OpenMP.
+    LIB_EXPORT Pre_UnstructGridPartition(UnstructGrid *gridSource, int nPartitionBlocks, int buildInterfaceMethod, 
+                                         string orgGridFileName = "", int parallelPartitionMethod = SERIAL_PARTITION);
+    LIB_EXPORT ~Pre_UnstructGridPartition();
+
+public:
+    //! Unstructured grid partition serially.
+    LIB_EXPORT void PartitionGridSerial(const string &out_grid_file);
+
+    //! Unstructured grid partition parallel.
+    LIB_EXPORT void PartitionGridParallel(const string &out_grid_file);
+
+    //! Dump out the partition grid to file of .fts format.
+    LIB_EXPORT void DumpPartitionGrids(const string &out_grid_file);
+
+    //! Return the partition grids.
+    Grid ** GetPartitionGrids();
+
+    //! Set parallel partition method:
+    //!   1 -- using ParMETIS.
+    //!   2 -- using METIS.
+    void SetParallelPartitionMethod(int parallelPartitionMethod);
+
+    //void SetOMPPartMethod(int ompPartMethod);
+
+private:
+    void Init();
+    Grid ** CreateAllPartGrid();
+    void CreatePartition();
+    void ComputeGridForPartition(UnstructGrid *gridpart, int iZone);
+    void GetVertexDist();
+    bool IsParallelPartition();
+    int GetMaxProcessorIndexInThisZone();
+    idx_t * CreatePartitionSerial(UnstructGrid *grid, int maxProcessor);
+    idx_t * CreatePartitionParallel(UnstructGrid *grid, int maxProcessor, idx_t *vtxdist);
+    void MetisGrid(idx_t nTotalCell, idx_t *xadj, idx_t *adjncy, idx_t nparts, idx_t *part);
+    void ParMetisGrid(idx_t *xadj, idx_t *adjncy, idx_t nparts, idx_t *part, idx_t *vtxdist);
+    void ConvertPartNumberToGlobal(idx_t *part, int nTotalCell);
+    void CommunicateNeiborCell(int *neighborCell);
+    void SwapInterface(int *neighborCell, int iZone, int jZone);
+    bool FindMatchPart(UnstructGrid *grid, int izone_t, int iface_t, int ie_t, int *interface_interfaceid_t);
+    void ReconInterfaces(Grid **grids, int iZone);
+    void BuildInterfaceLink(Grid **grids, int maxProcessor);
+
+    //! Get neighborzone and ghost cell for periodic boundary, used for interface reconstruct.
+    void SetPeriodInfo(Grid **grids, int iZone);
+    void MatchPeriodicFace(Grid **grids, int iZone, int iBFace, RDouble *xlist, RDouble *ylist, RDouble *zlist, int &FaceIndex);
+    void ResetFace2Face(Grid **grids);
+
+    void FillnTCellofEachZone(int *&nTCellOfZones);
+
+    void DumpParallelPartitionGrid(const string &gridFileName, Grid **grids, int nBlocks);
+    void DumpSerialPartitionGrid(const string &gridFileName, Grid **grids);
+    void DumpParallelPartitionGrid(const string &gridFileName, Grid **grids, int nBlocks, int *block_index_in);
+
+    //! Compute the processor index that each cell belongs to.
+    void ComputeCellMark();
+
+    void SetProcessorList();
+    bool DoseProcExist(int iproc);
+
+    void FreeLocal2All();
+    void CreateLocal2All(int iZone, UnstructGrid *gridpart);
+
+    void ComputeNodeMark(UnstructGrid *gridpart);
+    void ComputeFaceMark(int iZone, UnstructGrid *gridpart);
+
+    int * GetNode2All(UnstructGrid *gridpart);
+    int * GetFace2All(UnstructGrid *gridpart);
+    int * GetCell2All(int iZone, UnstructGrid *gridpart);
+
+    //! Compute the point to zone ID.
+    void ComputePoint2ZoneID();
+
+    //! Compute the total cell number of the node in computing the node value.
+    void ComputeCellNumberForNodeValue();
+
+    void SetCoorPart(UnstructGrid *gridpart);
+    void SetLinkPart(int iZone, UnstructGrid *gridpart);
+    void SetWallDist(UnstructGrid *gridpart);
+    void SetPartitionInfo(UnstructGrid *gridpart);
+    void SetVolumeCondition(UnstructGrid *gridpart);
+
+    void SetNodeNumberOfEachFaceAndFace2Node(UnstructGrid *gridpart);
+    void SetFace2CellAndBC(int iZone, UnstructGrid *gridpart);
+    void SetInterfaceInfoPart(int iZone, UnstructGrid *gridpart);
+
+    //! Set the interpoint information in the partition for iZone.
+    //! @param[in] iZone       the number of zone.
+    //! @param[in] gridpart    the grid after partition.
+    void SetInterpointInfoPart(int iZone, UnstructGrid *gridpart);
+
+    //! Modify the interpoint information in the partition for iZone.
+    //! @param[in] iZone    the number of zone.
+    //! @param[in] grids    the grid after partition.
+    void ModifyInterpointInfoPart(Grid **grids);
+    void SetInterfaceInfoPartForParallelPartition(int iZone, UnstructGrid *gridpart);
+    void SetNTotalCell(int iZone, UnstructGrid *gridpart);
+    int  GetNTotalCell(int iZone, idx_t *part);
+
+    void CommunicateInterfaceTopo();
+    void SwapInterfaceTopo(int iZone, int jZone);
+    void SetInterfaceInfoPartInOrgBC(Grid **grids);
+    void SetInterfaceInfoPartInOrgBC(int iZone, UnstructGrid *gridpart);
+    void BuildInterfaceLinkForParallelPartition(Grid **grids);
+
+    void CheckDoseNeedPartitionAdditionalData();
+    //void PartitionCellToNode();
+    void WriteAdditionalData(const string &out_grid_file);
+    void WriteCellToNode(const string &out_grid_file);
+    void WriteCellToNode(fstream &file, UnstructGrid *gridPart);
+
+    //! Write the interpoint information into the file.
+    //! @param[in] out_grid_file    the file name for output.
+    void WriteInterpointInfo(const string &out_grid_file);
+
+    //! Write the interpoint information into the file.
+    //! @param[in] file        the file  for output.
+    //! @param[in] gridPart    the grid after partition.
+    void WriteInterpointInfo(fstream &file, UnstructGrid *gridPart);
+
+    void WriteFaceBC(const string &out_grid_file);
+    void WriteFaceBC(fstream &file, UnstructGrid *gridPart);
+    void WriteWalldist(const string &out_grid_file);
+    void WriteWalldist(ActionKey *actkey, UnstructGrid *gridPart);
+
+    void ComputeGlobalToLocalCellToNodeMapping(UnstructGrid *gridpart, int iZone);
+
+    int GetNumberofLocalZones();
+
+    bool IsBelongtoThisZone(int faceMark);
+
+private:
+    //! The node/face/cell index mapping from new partition to old zone.
+    int *node2all, *face2all, *cell2all;
+
+    //! pointNumber2zoneID: the sequence of grid points that can be repeated, corresponding to zoneID.
+    //! point2ZoneID: According to the sequence of grid points pointNumber2zoneID, the corresponding number of zoneID.
+    //! pointPosition2zoneID: Position of point number in pointNumber2zoneID, pointNumber2zoneID is repeatable.
+    int *pointNumber2zoneID, *point2ZoneID, *pointPosition2zoneID;
+
+    //! cellNumberForNodeValue is the number of cells used to compute the value of each node.
+    int *cellNumberForNodeValue;
+
+    //! The part(processor) index that each cell belongs to.
+    idx_t *part;
+
+    //! The local cell/node/face index in the new partition.
+    //! In other words, the index mapping from old zone to new partition.
+    int *cell_mark, *node_mark, *face_mark;
+
+    //! Interface re-construct method.
+    //! -# 1   : Construct by local search in the original grid.
+    //! -# else: Construct by global search among all of the decomposed grids.
+    int npartmethod;
+
+    //! Vertex distribution.
+    //! For grid partition, each cell is a vertex in the partition graph.
+    idx_t *vtxdist;
+
+    //! The processor list that plan to be partition.
+    //! For serial partition, the list up through 0 to maxProcessor (but not included).
+    //! For parallel partition, the list include the processors in this zone.
+    set<int> processorList;
+
+    //! The following several pointers are temporary used.
+    //! Local interface index of the faces that belong to the original BC interfaces.
+    //! Local BC face index of the faces that belong to the original BC interfaces.
+    int *interfaceIndexInBC_send;
+    int *interfaceIndexInBC_recv, *partIndexInNewPartion_recv;
+    int *part2GlobalZoneIndex, *part2LocalZoneIndex;
+    int *nIFaceInOrgBC;
+
+    //! Does need partition cell to node.
+    bool partitionCellToNode;
+
+    //! Does need partition face BC information.
+    bool partitionFaceBC;
+
+    //! Does need partition WallDist information.
+    bool partitionWallDist;
+
+    //! Number of parts in each processor, if metis is used to parallel partition.
+    int nPartInEachProcIfMetis;
+};
+
+#include "Pre_UnstructGridPartition.hxx"
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_UnstructGridPartition.hxx b/API/PreProcess/include/Pre_UnstructGridPartition.hxx
new file mode 100644
index 0000000..7e50761
--- /dev/null
+++ b/API/PreProcess/include/Pre_UnstructGridPartition.hxx
@@ -0,0 +1,26 @@
+inline Grid ** Pre_UnstructGridPartition::GetPartitionGrids()
+{
+    return this->grids;
+}
+
+inline void Pre_UnstructGridPartition::SetParallelPartitionMethod(int parallelPartitionMethod)
+{
+    this->parallelPartitionMethod = parallelPartitionMethod;
+}
+
+inline bool Pre_UnstructGridPartition::IsBelongtoThisZone(int faceMark)
+{
+    if (faceMark == NOT_IN_THIS_ZONE)
+    {
+        return false;
+    }
+    else if (faceMark == IN_THIS_ZONE)
+    {
+        return true;
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("faceMark = ", faceMark);
+        return true;
+    }
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_WalldistCompute.h b/API/PreProcess/include/Pre_WalldistCompute.h
new file mode 100644
index 0000000..09fed19
--- /dev/null
+++ b/API/PreProcess/include/Pre_WalldistCompute.h
@@ -0,0 +1,328 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Pre_WalldistCompute.h
+//! @brief     Wall distance compute for both structured and unstructured grid.
+//! @author    Bell.
+
+#pragma once
+#include "GridType.h"
+#include "TK_Time.h"
+#include "Math_BasisFunction.h"
+#include "Geo_StructGrid.h"
+#include "Geo_UnstructGrid.h"
+#include "PHHeader.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+class WallStructure;
+
+//! @brief Pre_WalldistCompute class defines the method of 
+//! wall distance compute for both structured and unstructured grid.
+//! Wall Distance: the most nearest distance of each cell center to the solid wall.
+class Pre_WalldistCompute
+{
+    typedef pair<std::size_t, int> FaceID;
+    typedef DataStruct_AdtNode<FaceID, RDouble> WallFaceNode;
+    typedef DataStruct_AdtTree<FaceID, RDouble> WallFaceTree;
+    typedef DataStruct_AdtNode<int, RDouble>    WallStructNode;
+    typedef DataStruct_AdtTree<int, RDouble>    WallStructTree;
+    typedef DataStruct_KDTree                   WallStructKDTree;
+    typedef vector<RDouble> value_type;
+    static const int ACCURATE_METHOD   = 0;
+    static const int FAST_METHOD       = 1;
+    static const int SUPER_FAST_METHOD = 2;
+    static const int KDTREE_METHOD     = 3;
+
+    static const int CELL_METHOD = 0;
+    static const int NODE_METHOD = 1;
+
+private:
+    //! Wall distance computing method.
+    //! -# 0: fast but not accurate enough.
+    //! -# 1: accurate but not fast enough.
+    //! -# 3: k-dimension method.
+    int walldistComputeMethod;
+
+    int cellMethodOrNodeMethod;
+
+    //! Grid level in multi-grid method.
+    //! 0 represents the default initial finest computational mesh.
+    //! 1, 2, ..., N is the coarse level mesh.
+    int level;
+
+    int presentBlock;
+
+public:
+    //! @param[in] walldistComputeMethod    Wall distance computing method.
+    //!                                     -# 0: accurate but not fast enough.
+    //!                                     -# 1: fast but not accurate enough.
+    //! @param[in] level    Grid level in multi-grid method.
+    //! 0 represents the default initial finest computational mesh.
+    //! 1, 2, ..., N is the coarse level mesh.
+    LIB_EXPORT Pre_WalldistCompute(int walldistComputeMethod, int level);
+
+    LIB_EXPORT ~Pre_WalldistCompute();
+
+public:
+    //! Run to compute the wall distance of all grids.
+    LIB_EXPORT void Run();
+
+    //! Compute the wall distance of nodes for overlap config.
+    LIB_EXPORT void ComputeNodeDistance();
+
+    LIB_EXPORT void ComputeNodeDistanceInOtherBlock();
+
+    LIB_EXPORT void ComputeWallDistForNodesList(int blockIndex, int nTotalNode, RDouble *x, RDouble *y, RDouble *z, RDouble *dist);
+
+    vector<WallStructure *> * GetWallstructureList();
+private:
+    //! Fill wall structure by server collection-bcast method.
+    void FillWallStructureNew();
+    void ServerCollection();
+    void ServerBcast();
+
+    void InitWallDistance();
+    void InitWallDistance(Grid *grid);
+    void InitWallDistance(StructGrid *grid);
+    void InitWallDistance(UnstructGrid *grid);
+
+    void CheckWallDistance();
+    void CheckWallDistance(UnstructGrid *grid);
+    void CheckWallDistanceByNodeMethod(UnstructGrid *grid);
+
+    void PostWallDistance();
+    void PostWallDistance(Grid *grid);
+    void PostWallDistance(StructGrid *grid);
+    void PostWallDistance(UnstructGrid *grid);
+    void PostWallDistanceByNodeMethod(UnstructGrid *grid);
+
+    bool IsWalldistComputOver();
+    bool IsWalldistComputOver(Grid *grid);
+    bool IsWalldistComputOver(StructGrid *grid);
+    bool IsWalldistComputOver(UnstructGrid *grid);
+    bool IsNodeWalldistComputOver();
+
+    //! Fill wall structure by bcast wall struct to each other.
+    void FillWallStructure();
+    void ComputeWallDistance();
+    void ComputeWallDistance(Grid *grid);
+    void ComputeWallDistance(StructGrid *grid);
+    void ComputeWallDistanceKDTree(StructGrid *grid);
+    void ComputeWallDistance(UnstructGrid *grid);
+    void ComputeWallDist2DByBinarySearching(UnstructGrid *grid);
+    void ComputeWallDist3DByProjectingAccurate(UnstructGrid *grid);
+    void ComputeWallDist3DByProjectingAccurateAndNodeMethod(UnstructGrid *grid);
+    void ComputeWallDist3DByProjectingFast(UnstructGrid *grid);
+    void ComputeWallDist3DByProjectingFastAndNodeMethod(UnstructGrid *grid);
+    void ComputeWallDist3DByProjectingFast(StructGrid *grid);
+    void ComputeNodeWallDist3DByProjectingFast(int nTotalNode, RDouble *x, RDouble *y, RDouble *z, RDouble *nodeWalldist);
+    void ComputeNodeWallDist3DByKDTreeMethod(int nTotalNode, RDouble *x, RDouble *y, RDouble *z, RDouble *nodeWalldist);
+    void CompressWallStructure(DataContainer *&cdata, Grid *grid);
+    void CompressWallStructure(DataContainer *&cdata, StructGrid *grid);
+    void CompressWallStructure(DataContainer *&cdata, UnstructGrid *grid);
+
+    void FilterWallStructureList();
+    void FindNearstWallStructureOld(RDouble *cellCenter, vector<WallStructure *> &nearestWallStruct);
+
+    void DeCompressWallStructure(DataContainer *&cdata, const bool &ifMoveToBegin);
+
+    void BuildWallStructTree();
+    void BuildWallStructKDTree();
+    void BuildWallStructKDTreeNode();
+    void BuildWallStructKDTreeNodeInOtherBlock();
+
+    RDouble ComputeDistanceOfANodeToSegment(const RDouble xcc, const RDouble ycc, const RDouble zcc,
+                                            const RDouble xStart, const RDouble yStart, const RDouble zStart,
+                                            const RDouble xMid, const RDouble yMid, const RDouble zMid,
+                                            const RDouble xEnd, const RDouble yEnd, const RDouble zEnd);
+    RDouble ComputeDistanceOfANodeToAFace(RDouble *cellCenter, RDouble *faceCenter, RDouble *faceNormal, 
+                                          const vector<int> &face2node, value_type &x, value_type &y, value_type &z);
+
+    void RotateAxis(const RDouble *oldR, RDouble *newR);
+
+    RDouble GetGlobalGridSize(int type = 0);
+
+    void ComputeNodeDistanceByDirectMethod();
+    void ComputeNodeDistanceByADTMethod();
+    void ComputeNodeDistanceByKDTreeMethod();
+    void ComputeNodeDistanceByKDTreeMethodInOtherBlock();
+    void ComputeNodeDistanceByDirectMethod(UnstructGrid *grid);
+    void ComputeNodeDistanceForSphere(UnstructGrid *grid);
+    void ComputeNodeDistanceByADTMethodForBlock(int iBlock);
+    void ComputeNodeDistanceByKDTreeMethodForBlock();
+    void ComputeNodeDistanceByKDTreeMethodForBlockInOtherBlock();
+    void ComputeWallDistForNodesListByADT(int blockIndex, int nTotalNode, RDouble *x, RDouble *y, RDouble *z, RDouble *dist);
+    void ComputeWallDistForNodesListByKDT(int blockIndex, int nTotalNode, RDouble *x, RDouble *y, RDouble *z, RDouble *dist);
+    void ComputeWallDistForNodesListByDirectMethod(int blockIndex, int nTotalNode, RDouble *x, RDouble *y, RDouble *z, RDouble *dist);
+    void ComputeWallDistForNodesListForSphere(int blockIndex, int nTotalNode, RDouble *x, RDouble *y, RDouble *z, RDouble *dist);
+
+    int  JudgeInitialRotateAxis();
+private:
+    //! The data structure to store the wall faces and nodes, and the face-nodes connection.
+    vector<WallStructure *> *wallstructureList;
+
+    //! The current processor index.
+    int myid;
+
+    //! Number of total wall faces.
+    int nTWFace;
+
+    //! Boundary box of wall structure.
+    RDouble wallMin[6], wallMax[6];
+
+    //! ADT Tree of wall structures.
+    WallFaceTree *wallFaceTree;
+
+    //! K-Dimendion Tree of wall structures.
+    WallStructKDTree *wallFaceKDTree;
+
+    //! K-Dimendion Tree of wall structures.
+    WallStructKDTree *wallNodeKDTree;
+
+    //! Tolerance of wall.
+    RDouble wallTolerance;
+
+    //! Number of total faces on wall.
+    size_t nTWallFace;
+
+    //! Rotate Axis:
+    //!   0 -- withot rotate.
+    //!   1 -- axis X.
+    //!   2 -- axis Y.
+    //!   3 -- axis Z.
+    int rotateAxis;
+
+    //! Rotate degree.
+    RDouble rotateDegree;
+
+    //! Time statistical.
+    TimeSpan timeSpan;
+};
+
+//! @brief CWallDist class defines the basic wall face data structure:
+//! 1: wall face center, for both structured and unstructured grid.
+//! 2: wall points coordinate and the face-to-points connection, for unstructured grid only.
+class WallStructure
+{
+public:
+    typedef vector<RDouble> value_type;
+    WallStructure();
+    ~WallStructure();
+
+private:
+    //! Coordinates of the points on the solid wall.
+    value_type x, y, z;
+
+    //! Center of the faces on the solid wall.
+    value_type xfc, yfc, zfc;
+
+    //! Normal of the faces on the solid wall.
+    value_type xfn, yfn, zfn;
+
+    //! Number of the points per faces on the solid wall.
+    int *nPointPerFace;
+
+    //! The points list of faces on the solid wall.
+    int *wallFace2Node;
+
+    //! Node position of each face.
+    //! wallFace2Node[nodePosition[iFace]]: start point ID.
+    //! wallFace2Node[nodePosition[iFace + 1]]: end point ID.
+    int *nodePosition;
+
+    //! Boundary box.
+    RDouble box[6];
+
+    //! Distance between box boundary and a filed point.
+    RDouble distance;
+
+    //! The block that this wallstructure belongs to.
+    int iBlock;
+
+public:
+    std::size_t GetNumberOfWallFaces();
+    std::size_t GetNumberOfWallPoints();
+
+    value_type & GetX();
+    value_type & GetY();
+    value_type & GetZ();
+
+    value_type & GetXFaceCenter();
+    value_type & GetYFaceCenter();
+    value_type & GetZFaceCenter();
+
+    value_type & GetXFaceNormal();
+    value_type & GetYFaceNormal();
+    value_type & GetZFaceNormal();
+
+    RDouble * GetBox();
+    RDouble GetDistance();
+
+    int * GetWallFace2Node();
+    int * GetnPointPerFace();
+    int * GetNodePosition();
+
+    void SetWallFace2Node(int *wallFace2Node);
+    void SetnPointPerFace(int *nPointPerFace);
+    void SetNodePosition(int *nodePosition);
+    void SetDistance(RDouble dist);
+
+    void Box();
+
+    void Encode(DataContainer *&cdata, const bool &ifMoveToBegin);
+    void Decode(DataContainer *&cdata, const bool &ifMoveToBegin);
+    
+    vector<vector<int> > & GetFace2NodeVector();
+    void GetFace2NodeVector(vector<int> &face2node, int faceID);
+
+    int  GetIBlock();
+    void SetIBlock(int iBlockIn);
+private:
+    //! Vector type of face to node data structure.
+    vector<vector<int> > face2node;
+};
+
+//! Process of generate wall distance.
+void GenerateWalldist();
+
+//!
+void AllocateWalldist();
+
+//! Compute wall distance.
+void ComputeWalldist();
+
+//! Write wall distance.
+void WriteWalldist();
+
+void CompMaxBoundaryLayerWalldist();
+
+bool IsBoundaryLayerExist();
+
+//!
+void WalldistStatics();
+
+//! Dump out the wall distance to file.
+void DumpWalldistToFile(ActionKey *actkey, int iZone);
+
+#ifdef USE_TecplotLib
+//! Visualization of wall distance.
+void VisualWalldist();
+#endif
+
+//! If read wall distance file or not.
+bool IsReadWalldist();
+
+#include "Pre_WalldistCompute.hxx"
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/include/Pre_WalldistCompute.hxx b/API/PreProcess/include/Pre_WalldistCompute.hxx
new file mode 100644
index 0000000..0d1f007
--- /dev/null
+++ b/API/PreProcess/include/Pre_WalldistCompute.hxx
@@ -0,0 +1,138 @@
+inline void Pre_WalldistCompute::RotateAxis(const RDouble *oldR, RDouble *newR)
+{
+    if (walldistComputeMethod != FAST_METHOD)
+    {
+        PHSPACE::SetField(newR, oldR, 3);
+        return;
+    }
+
+    switch (rotateAxis)
+    {
+    case 0:
+        PHSPACE::SetField(newR, oldR, 3);
+        return;
+        break;
+    case 1:
+        RotateAxisX(oldR, newR, rotateDegree);
+        break;
+    case 2:
+        RotateAxisY(oldR, newR, rotateDegree);
+        break;
+    case 3:
+        RotateAxisZ(oldR, newR, rotateDegree);
+        break;
+    default:
+        PHSPACE::SetField(newR, oldR, 3);
+        break;
+    }
+}
+
+inline std::size_t WallStructure::GetNumberOfWallFaces()
+{
+    return xfc.size();
+}
+
+inline std::size_t WallStructure::GetNumberOfWallPoints()
+{
+    return x.size();
+}
+
+inline WallStructure::value_type & WallStructure::GetX()
+{
+    return x;
+}
+
+inline WallStructure::value_type & WallStructure::GetY()
+{
+    return y;
+}
+
+inline WallStructure::value_type & WallStructure::GetZ()
+{
+    return z;
+}
+
+inline WallStructure::value_type & WallStructure::GetXFaceCenter()
+{
+    return xfc;
+}
+
+inline WallStructure::value_type & WallStructure::GetYFaceCenter()
+{
+    return yfc;
+}
+
+inline WallStructure::value_type & WallStructure::GetZFaceCenter()
+{
+    return zfc;
+}
+
+inline WallStructure::value_type & WallStructure::GetXFaceNormal()
+{
+    return xfn;
+}
+
+inline WallStructure::value_type & WallStructure::GetYFaceNormal()
+{
+    return yfn;
+}
+
+inline WallStructure::value_type & WallStructure::GetZFaceNormal()
+{
+    return zfn;
+}
+
+inline int * WallStructure::GetWallFace2Node()
+{
+    return wallFace2Node;
+}
+
+inline int * WallStructure::GetnPointPerFace()
+{
+    return nPointPerFace;
+}
+
+inline int * WallStructure::GetNodePosition()
+{
+    return nodePosition;
+}
+
+inline void WallStructure::SetWallFace2Node(int *wallFace2Node)
+{
+    this->wallFace2Node = wallFace2Node;
+}
+
+inline void WallStructure::SetnPointPerFace(int *nPointPerFace)
+{
+    this->nPointPerFace = nPointPerFace;
+}
+
+inline void WallStructure::SetNodePosition(int *nodePosition)
+{
+    this->nodePosition = nodePosition;
+}
+
+inline RDouble * WallStructure::GetBox()
+{
+    return this->box;
+}
+
+inline RDouble WallStructure::GetDistance()
+{
+    return distance;
+}
+
+inline void WallStructure::SetDistance(RDouble dist)
+{
+    distance = dist;
+}
+
+inline int WallStructure::GetIBlock()
+{
+    return iBlock;
+}
+
+inline void WallStructure::SetIBlock(int iBlockIn)
+{
+    this->iBlock = iBlockIn;
+}
\ No newline at end of file
diff --git a/API/PreProcess/src/MixGrid.cpp b/API/PreProcess/src/MixGrid.cpp
new file mode 100644
index 0000000..fbe770c
--- /dev/null
+++ b/API/PreProcess/src/MixGrid.cpp
@@ -0,0 +1,2134 @@
+#include "Pre_GridBase.h"
+#include "MixGrid.h"
+#include "TK_Parse.h"
+#include "IO_FileName.h"
+#include "LinkStruct.h"
+#include "Glb_Dimension.h"
+#include "MultigridFactory.h"
+#include "Geo_StructBC.h"
+#include "Geo_UnstructBC.h"
+#include "TK_Exit.h"
+#include "GridType.h"
+#include "PHIO.h"
+#include "TK_Log.h"
+
+using namespace std;
+
+#pragma warning (disable:913)
+namespace PHSPACE
+{
+
+void Fantasy2Ustar()
+{
+    if (GetDim() == TWO_D)
+    {
+        Fantasy2Ustar2D();
+    }
+    else if (GetDim() == THREE_D)
+    {
+        Fantasy2Ustar3D();
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("Error: Can't convert this dim to Ustar !\n");
+    }
+
+    PrintToWindow("HyperFlow grid has been converted to Ustar !\n");
+}
+
+void FantasyWriteToInp(const string &bnd_file, Grid **grids, int nBlocks)
+{
+    fstream GridgenBCfile;
+    OpenFile(GridgenBCfile, bnd_file, ios_base::out);
+
+    GridgenBCfile << 1 << endl;
+    GridgenBCfile << nBlocks << endl;
+
+    int wordwidth = 8;
+    int nCoords = GetDim();
+
+    for (int iBlock = 0; iBlock < nBlocks; ++ iBlock)
+    {
+        StructGrid *grid = StructGridCast(grids[iBlock]);
+
+        int idim = grid->GetNI();
+        int jdim = grid->GetNJ();
+        int kdim = grid->GetNK();
+
+        GridgenBCfile << setw(wordwidth) << idim;
+        GridgenBCfile << setw(wordwidth) << jdim;
+        if (nCoords == 3)
+        {
+            GridgenBCfile << setw(wordwidth) << kdim;
+        }
+        GridgenBCfile << endl;
+        GridgenBCfile << iBlock + 1 << endl;
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+
+        int  numberOfBoundaryFaces = structBCSet->GetnBCRegion();
+        GridgenBCfile << numberOfBoundaryFaces << endl;
+
+        for (int iBCRegion = 0; iBCRegion < numberOfBoundaryFaces; iBCRegion ++)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+            int *s_st = structBC->GetStartPoint();
+            int *s_ed = structBC->GetEndPoint();
+            int bctype = structBC->GetBCType();
+            
+            for (int iCoords = 0; iCoords < nCoords; ++ iCoords)
+            {
+                GridgenBCfile << setw(8) << s_st[iCoords];
+                GridgenBCfile << setw(8) << s_ed[iCoords]; 
+            }
+            GridgenBCfile << setw(8) << bctype;
+            GridgenBCfile << endl;
+
+            if (bctype == -1)
+            {
+                int *t_st = structBC->GetTargetStart();
+                int *t_ed = structBC->GetTargetEnd();
+                int nbt = structBC->GetTargetRegionBlock();
+
+                for (int iCoords = 0; iCoords < nCoords; ++ iCoords)
+                {
+                    GridgenBCfile << setw(8) << t_st[iCoords];
+                    GridgenBCfile << setw(8) << t_ed[iCoords];
+                }
+                GridgenBCfile << setw(8) << nbt + 1;
+                GridgenBCfile << endl;
+            }
+        }
+    }
+
+    CloseFile(GridgenBCfile);
+}
+
+void FantasyWriteToGrd(const string &cel_file, Grid **grids, int nBlocks)
+{
+    fstream Gridgenfile;
+    OpenFile(Gridgenfile, cel_file, ios_base::out|ios_base::binary|ios_base::trunc);
+    Gridgenfile.write(reinterpret_cast<char *>(&nBlocks), sizeof(int));
+
+    for (int iBlock = 0; iBlock < nBlocks; ++ iBlock)
+    {
+        StructGrid *grid = StructGridCast(grids[iBlock]);
+
+        int idim = grid->GetNI();
+        int jdim = grid->GetNJ();
+        int kdim = grid->GetNK();
+
+        Gridgenfile.write(reinterpret_cast<char *>(&idim), sizeof(int));
+        Gridgenfile.write(reinterpret_cast<char *>(&jdim), sizeof(int));
+        Gridgenfile.write(reinterpret_cast<char *>(&kdim), sizeof(int));
+    }
+
+    for (int iBlock = 0; iBlock < nBlocks; ++ iBlock)
+    {
+        StructGrid *grid = StructGridCast(grids[iBlock]);
+
+        int ist, ied, jst, jed, kst, ked;
+        grid->GetNodeIterationIndex(ist, ied, jst, jed, kst, ked);
+
+        grid->WriteXYZ(Gridgenfile, ist, ied, jst, jed, kst, ked);
+    }
+
+    CloseFile(Gridgenfile);
+}
+
+void FantasyWriteToFluent(const string &gridFileName, Grid **grids)
+{
+    using namespace FLUENT_SPACE;
+
+    fstream outfile;
+    OpenFile(outfile, gridFileName, ios::out);
+
+    string headerInformation = "Grid convert from fts file";
+    outfile << "(" << FLUENT_HEADER << " " << headerInformation << ")" << endl;
+    outfile << endl;
+
+    //! Dimension
+    int dimension = GetDim();
+    outfile << "(" << FLUENT_COMMENT << " \"Dimension : " << dimension << "\")" << endl;
+    outfile << "(" << FLUENT_DIMENSIONS << " " << Dec2Hex(dimension) << ")" << endl;
+    outfile << endl;
+
+    UnstructGrid *grid = UnstructGridCast(grids[0]);
+    int zoneID   = 0;
+
+    //! Total nodes information.
+    int nTNode = grid->GetNTotalNode();
+    int firstIndexOfNode = 1;
+    int lastIndexOfNode = nTNode - (1 - firstIndexOfNode);
+
+    int nodeType = 0;
+    outfile << "(" << FLUENT_COMMENT << " \"Number of Nodes : " << nTNode << "\")" << endl;
+    outfile << "(" << FLUENT_NODES << " " << "(" << Dec2Hex(zoneID) << " " 
+            << Dec2Hex(firstIndexOfNode) << " " << Dec2Hex(lastIndexOfNode) << " " << Dec2Hex(nodeType) << " " << Dec2Hex(dimension) << ")" << ")"<< endl;
+    outfile << endl;
+
+    //! Total faces information.
+    int nTFace = grid->GetNTotalFace();
+    int nBFace = grid->GetNBoundFace();
+    int numberOfInteriorFace = nTFace - nBFace;
+    int firstIndexOfFace = 1;
+    int lastIndexOfFace  = nTFace - (1 - firstIndexOfFace);
+
+    int faceType = 0;
+    outfile << "(" << FLUENT_COMMENT << " \"Total Number of Faces : " << nTFace << "\")" << endl;
+    outfile << "(" << FLUENT_COMMENT << " \"       Boundary Faces : " << nBFace << "\")" << endl;
+    outfile << "(" << FLUENT_COMMENT << " \"       Interior Faces : " << numberOfInteriorFace << "\")" << endl;
+    outfile << "(" << FLUENT_FACES << " " << "(" << Dec2Hex(zoneID) << " " 
+            << Dec2Hex(firstIndexOfFace) << " " << Dec2Hex(lastIndexOfFace) << " " << Dec2Hex(faceType) << ")" << ")"<< endl;
+    outfile << endl;
+
+
+    //! Total cells information.
+    int nTCell = grid->GetNTotalCell();
+    int firstIndexOfCell = 1;
+    int lastIndexOfCell  = nTCell - (1 - firstIndexOfCell);
+
+    int elmentType = 0;
+    outfile << "(" << FLUENT_COMMENT << " \"Total Number of Cells : " << nTCell << "\")" << endl;
+    outfile << "(" << FLUENT_CELLS << " " << "(" << Dec2Hex(zoneID) << " " 
+            << Dec2Hex(firstIndexOfCell) << " " << Dec2Hex(lastIndexOfCell) << " " << Dec2Hex(elmentType) << ")" << ")"<< endl;
+    outfile << endl;
+
+
+    //! Nodes coor.
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    ++ zoneID;
+    nodeType = 1;
+    outfile << "(" << FLUENT_COMMENT << " \"Zone " << zoneID << " Number of Nodes : " << nTNode << "\")" << endl;
+    outfile << "(" << FLUENT_NODES << " " << "(" << Dec2Hex(zoneID) << " " 
+        << Dec2Hex(firstIndexOfNode) << " " << Dec2Hex(lastIndexOfNode) << " " << Dec2Hex(nodeType) << " " << Dec2Hex(dimension) << ")" << "("<< endl;
+    outfile.setf(ios::scientific);
+    outfile.precision(15);
+    for (int iNode = 0; iNode < nTNode; ++ iNode)
+    {
+        if (dimension == 2)
+        {
+            outfile << "  " << x[iNode] << "   " << y[iNode] << endl;
+        }else
+        {
+            outfile << "  " << x[iNode] << "   " << y[iNode] << "   " << z[iNode] << endl;
+        }
+    }
+    outfile << "))" << endl;
+    outfile << endl;
+
+    // Body of Cells.
+    ++ zoneID;
+    int type   = 1;
+    elmentType = 1;
+    PrintToWindow("Warning: consider polyhedral here when elmentType !=0 \n");
+    outfile << "(" << FLUENT_COMMENT << " \"Zone " << zoneID
+            << " " << nTCell << " cells "
+            << firstIndexOfCell << ".." << lastIndexOfCell <<"\")" << endl;
+
+    outfile << "(" << FLUENT_CELLS << " " << "(" << Dec2Hex(zoneID) << " " 
+            << Dec2Hex(firstIndexOfCell) << " " << Dec2Hex(lastIndexOfCell) << " " << Dec2Hex(type) << " " << Dec2Hex(elmentType) << ")" << ")"<< endl;
+    outfile << "(" << FLUENT_C45 << " " << "(" << zoneID << " fluid unspecified)())" << endl;
+    outfile << endl;
+
+    //! Face information.
+    int *face2node         = grid->GetFace2Node();
+    long long int *nodePosi= grid->GetFace2NodeSubscript();
+    int *leftCellofFace    = grid->GetLeftCellOfFace();
+    int *rightCellofFace   = grid->GetRightCellOfFace();
+    int *nodeNumOfEachFace = grid->GetNodeNumberOfEachFace();
+
+    map <int, int> bctypeMap;
+    bctypeMap.insert(pair<int, int>(PHENGLEI::INTERIOR      , FLUENT_SPACE::INTERIOR          ));
+    bctypeMap.insert(pair<int, int>(PHENGLEI::SOLID_SURFACE , FLUENT_SPACE::WALL              ));
+    bctypeMap.insert(pair<int, int>(PHENGLEI::SYMMETRY      , FLUENT_SPACE::SYMMETRY          ));
+    bctypeMap.insert(pair<int, int>(PHENGLEI::FARFIELD      , FLUENT_SPACE::PRESSURE_FAR_FIELD));
+    bctypeMap.insert(pair<int, int>(PHENGLEI::INFLOW        , FLUENT_SPACE::VELOCITY_INLET    ));
+    bctypeMap.insert(pair<int, int>(PHENGLEI::OUTFLOW       , FLUENT_SPACE::OUTFLOW           ));
+
+    map <int, string> bcNameMap;
+    bcNameMap.insert(pair<int, string>(PHENGLEI::INTERIOR      , "interior"          ));
+    bcNameMap.insert(pair<int, string>(PHENGLEI::SOLID_SURFACE , "wall"              ));
+    bcNameMap.insert(pair<int, string>(PHENGLEI::SYMMETRY      , "symmetry"          ));
+    bcNameMap.insert(pair<int, string>(PHENGLEI::FARFIELD      , "pressure-far-field"));
+    bcNameMap.insert(pair<int, string>(PHENGLEI::INFLOW        , "velocity-inlet"    ));
+    bcNameMap.insert(pair<int, string>(PHENGLEI::OUTFLOW       , "outflow"           ));
+
+    int firstIndex = firstIndexOfFace;
+    int lastIndex = numberOfInteriorFace;
+
+    //! Interior face.
+    ++ zoneID;
+    outfile << "(" << FLUENT_COMMENT << " \"Zone " << zoneID 
+            <<" " << numberOfInteriorFace << " faces " 
+            << firstIndex << ".." << lastIndex << ", " << "Interior" << "\")" << endl;
+
+    outfile << "(" << FLUENT_FACES << " " << "(" << Dec2Hex(zoneID) << " " 
+            << Dec2Hex(firstIndex) << " " << Dec2Hex(lastIndex) << " " << Dec2Hex(FLUENT_SPACE::INTERIOR) << " "<< Dec2Hex(faceType) << ")" << "("<< endl;
+
+    for (int iFace = nBFace; iFace < nTFace; ++ iFace)
+    {
+        outfile << Dec2Hex(nodeNumOfEachFace[iFace]) << " ";
+
+        long long int firstNodePosi = nodePosi[iFace];
+        for (int iNode = 0; iNode < nodeNumOfEachFace[iFace]; ++ iNode)
+        {
+            outfile << Dec2Hex(face2node[firstNodePosi++] + 1) << " ";
+        }
+
+        outfile << Dec2Hex(leftCellofFace[iFace] + 1) << " " << Dec2Hex(rightCellofFace[iFace] + 1) << endl;
+    }
+
+    outfile << "))" << endl;
+    outfile << "(" << FLUENT_C45 << " " << "(" << zoneID << " " << bcNameMap[PHENGLEI::INTERIOR] << " " << "interior-unspecified)())" << endl;
+
+    //! Boundary face.
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        ++ zoneID;
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        string bcName = bcRegion->GetBCName();
+
+        int faceNum = static_cast<int>(faceIndex->size());
+        firstIndex = lastIndex + 1;
+        lastIndex = firstIndex + faceNum - 1;
+
+        outfile << endl;
+        outfile << "(" << FLUENT_COMMENT << " \"Zone " << zoneID 
+                <<" " << faceNum << " faces " 
+                << firstIndex << ".." << lastIndex << ", " << bcName << "\")" << endl;
+
+        outfile << "(" << FLUENT_FACES << " " << "(" << Dec2Hex(zoneID) << " " 
+            << Dec2Hex(firstIndex) << " " << Dec2Hex(lastIndex) << " " << Dec2Hex(bctypeMap[bcType]) << " "<< Dec2Hex(faceType) << ")" << "("<< endl;
+
+        int rightCell = 0;
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            int faceIndex1 = *iter;
+
+            outfile << Dec2Hex(nodeNumOfEachFace[faceIndex1]) << " ";
+
+            long long int firstNodePosi = nodePosi[faceIndex1];
+            for (int iNode = 0; iNode < nodeNumOfEachFace[faceIndex1]; ++ iNode)
+            {
+                outfile << Dec2Hex(face2node[firstNodePosi++] + 1) << " ";
+            }
+
+            outfile << Dec2Hex(leftCellofFace[faceIndex1] + 1) << " " << rightCell << endl;
+        }
+
+        outfile << "))" << endl;
+        outfile << "(" << FLUENT_C45 << " " << "(" << zoneID << " " << bcNameMap[bcType] << " " << bcName << ")())" << endl;
+    }
+
+    CloseFile(outfile);
+}
+
+void ReProcessBCInfo(Grid **grids, int nBlocks)
+{
+    for (int iBlock = 0; iBlock < nBlocks; iBlock ++)
+    {
+        StructGrid *grid = StructGridCast(grids[iBlock]);
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+
+        int numberOfBoundaryFaces = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < numberOfBoundaryFaces; iBCRegion ++)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+            int *s_st = structBC->GetStartPoint();
+            int *s_ed = structBC->GetEndPoint();
+
+            for (int m = 0; m < GetDim(); ++ m)
+            {
+                if (structBC->GetFaceDirection() == m)
+                {
+                    if (s_st[m] != 1)
+                    {
+                        s_st[m] += 1;
+                        s_ed[m] += 1;
+                    }
+                }
+                else
+                {
+                    s_ed[m] += 1;
+                }
+            }
+        }
+    }
+}
+
+void ReadLnkFile(const string &fileName_in, Grid **grids, int nBlocks)
+{
+    string LnkFileName = ChangeExtensionOfFileName(fileName_in, "link");
+    if (!SerialFileExist(LnkFileName))
+    {
+        TK_Exit::ExceptionExit("缺少link文件");
+        return;
+    }
+
+    fstream file;
+    OpenSerialFile(file, LnkFileName, ios_base::in|ios_base::binary);
+
+    DataContainer *LnkData = new DataContainer();
+    ReadFile(file, LnkData);
+
+    VirtualFile *virtualFile = new VirtualFile(LnkData);
+    virtualFile->BeginReadWork();
+
+    for (int iBlock = 0; iBlock < nBlocks; iBlock ++)
+    {
+        StructGrid *grid = StructGridCast(grids[iBlock]);
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+
+        int nBCRegion = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion ++)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+            int bctype = structBC->GetBCType();
+            if ((!IsInterface(bctype))) continue;
+
+            int imin, imax, jmin, jmax, kmin, kmax, nbt;
+
+            PHRead(virtualFile, imin);
+            PHRead(virtualFile, imax);
+            PHRead(virtualFile, jmin);
+            PHRead(virtualFile, jmax);
+
+            if (GetDim() == THREE_D)
+            {
+                PHRead(virtualFile, kmin);
+                PHRead(virtualFile, kmax);
+            }
+            else
+            {
+                kmin = 1;
+                kmax = 1;
+            }
+
+            structBC->SetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+
+            PHRead(virtualFile, imin);
+            PHRead(virtualFile, imax);
+            PHRead(virtualFile, jmin);
+            PHRead(virtualFile, jmax);
+
+            if (GetDim() == THREE_D)
+            {
+                PHRead(virtualFile, kmin);
+                PHRead(virtualFile, kmax);
+            }
+            else
+            {
+                kmin = 1;
+                kmax = 1;
+            }
+
+            PHRead(virtualFile, nbt);
+
+            structBC->SetTargetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+            structBC->SetTargetRegionBlock(nbt - 1);
+            if (GetDim() == THREE_D)
+            {
+                structBC->ComputeRelativeParameters();
+            }
+        }
+    }
+
+    virtualFile->EndReadWork();
+
+    delete virtualFile;
+    delete LnkData;
+
+    CloseFile(file);
+}
+
+void WriteLnkFile (const string &gridFileName, Grid **grids_in, int nBlocks)
+{
+    fstream file;
+
+    Grid **grids = grids_in;
+
+    string LnkFileName = ChangeExtensionOfFileName(gridFileName, "link");
+
+    PHSPACE::OpenSerialFile(file, LnkFileName, ios_base::out|ios_base::binary);
+
+    VirtualFile *virtualFile = new VirtualFile(&file);
+    virtualFile->BeginWriteWork();
+
+    for (int iZone = 0; iZone < nBlocks; iZone ++)
+    {
+        StructGrid *grid = StructGridCast(grids[iZone]);
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+
+        int nBCRegion = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion ++)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+            int bctype = structBC->GetBCType();
+            if ((!IsInterface(bctype))) continue;
+
+            int dimension = GetDim();
+            int *lnkInfo = structBC->GetInkInfo();
+
+            PHWrite(virtualFile, lnkInfo[0]);
+            PHWrite(virtualFile, lnkInfo[1]);
+            PHWrite(virtualFile, lnkInfo[2]);
+            PHWrite(virtualFile, lnkInfo[3]);
+
+            if (dimension == THREE_D)
+            {
+                PHWrite(virtualFile, lnkInfo[4]);
+                PHWrite(virtualFile, lnkInfo[5]);
+            }
+
+            PHWrite(virtualFile, lnkInfo[6]);
+            PHWrite(virtualFile, lnkInfo[7]);
+            PHWrite(virtualFile, lnkInfo[8]);
+            PHWrite(virtualFile, lnkInfo[9]);
+
+            if (dimension == THREE_D)
+            {
+                PHWrite(virtualFile, lnkInfo[10]);
+                PHWrite(virtualFile, lnkInfo[11]);
+            }
+
+            int nbt = structBC->GetTargetRegionBlock() + 1;
+            PHWrite(virtualFile, nbt);
+        }
+    }
+
+    virtualFile->EndWriteWork();
+    delete virtualFile;
+
+    PHSPACE::CloseFile(file);
+}
+
+void CheckMeshMultigrid(Grid **grids_in, int nBlocks)
+{
+    Grid **grids = grids_in;
+
+    int km, NN;
+    int km_grid = 1024;
+
+    for (int iZone = 0; iZone < nBlocks; iZone ++)
+    {
+        StructGrid *grid = StructGridCast(grids[iZone]);
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+
+        int  nBCRegion = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion ++)
+        {
+            km = 1;
+            NN = 2;
+
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+            int *s_st = structBC->GetStartPoint();
+            int *s_ed = structBC->GetEndPoint();
+
+            while ((((abs(s_st[0])-1)%NN)==0) && (((abs(s_ed[0])-1)%NN)==0) && (((abs(s_st[1])-1)%NN)==0) && (((abs(s_ed[1])-1)%NN)==0) && (((abs(s_st[2])-1)%NN)==0) && (((abs(s_ed[2])-1)%NN)==0))
+            {
+                NN = NN * 2;
+                km = km + 1;
+            }
+            km_grid = min(km_grid, km);
+        }
+    }
+
+    PrintToWindow("The most valid multi-grid level is: ", km_grid, "\n");
+}
+
+void WriteBcFileFromFTS (const string &gridFileName, Grid **grids_in, int nBlocks)
+{
+    Grid **grids = grids_in;
+
+    fstream file;
+
+    string BcFileName = ChangeExtensionOfFileName(gridFileName, "bc");
+    PHSPACE::OpenSerialFile(file, BcFileName, ios_base::out|ios_base::binary);
+
+    PHWrite(file, nBlocks);
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        VirtualFile *virtualFile = new VirtualFile(&file);
+        virtualFile->BeginWriteWork();
+
+        PHWrite(virtualFile, iZone);
+
+        StructGrid *grid = StructGridCast(grids[iZone]);
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+
+        int nBCRegion = static_cast< int > (structBCSet->GetnBCRegion());
+
+        PHWrite(virtualFile, nBCRegion);
+
+        string *bcNameList = new string [nBCRegion];
+
+        uint_long totalSize = 0;
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion ++)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+            string bcName = structBC->GetBCName();
+            int bctype = structBC->GetBCType();
+            if (bcName == "")
+            {
+                if (bctype == -1)
+                {
+                    bcName = "Connection";
+                }
+                else
+                {
+                    bcName = structBCSet->GetBCName(bctype);
+                    if ((bctype >7) && (bctype <51))
+                    {
+                        bctype = 2;
+                        structBC->SetBCType(bctype);
+                    }
+                }
+                structBC->SetBCName(bcName);
+            }
+            
+            bcNameList[iBCRegion] = bcName;
+            
+            //totalSize += bcNameList[iBCRegion].size();
+            totalSize += static_cast< uint_long > (bcNameList[iBCRegion].size());
+            totalSize += 1;
+        }
+
+        char *bcNameChar = new char [totalSize];
+        unsigned int count = 0;
+        for (int boco = 0; boco < nBCRegion; ++ boco)
+        {
+            string &bcName = bcNameList[boco];
+            streamsize nameSize = bcName.size();
+            for (unsigned int iChar = 0; iChar < nameSize; ++ iChar)
+            {
+                bcNameChar[count ++] = bcName[iChar];
+            }
+            bcNameChar[count ++] = '\0';
+        }
+
+        PHWrite(virtualFile, totalSize);
+        PHWrite(virtualFile, bcNameChar, static_cast<int>(totalSize));
+
+        delete [] bcNameList;
+        delete [] bcNameChar;
+
+        virtualFile->EndWriteWork();
+        delete virtualFile;
+    }
+
+    PHSPACE::CloseFile(file);
+}
+
+void Fantasy2Ustar2D()
+{
+    string from_gfile = "grid.fts";
+    GlobalDataBase::GetData("from_gfile", &from_gfile, PHSTRING, 1);
+
+    string out_gfile = "grid.fts";
+    GlobalDataBase::GetData("out_gfile", &out_gfile, PHSTRING, 1);
+
+    fstream file;
+    file.open(from_gfile.c_str(), ios_base::in|ios_base::binary);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(from_gfile);
+    }
+
+    Ustar2Fantasy u2fbc("support/fts2ustarbc.txt");
+
+    using namespace PHSPACE;
+
+    int nBlocks;
+    file.read(reinterpret_cast<char*>(&nBlocks), sizeof(int));
+
+    int *block_proc = new int [nBlocks];
+    int *block_idx  = new int [nBlocks];
+    int *block_type = new int [nBlocks];
+    file.read(reinterpret_cast<char*>(block_proc), nBlocks * sizeof(int));
+    file.read(reinterpret_cast<char*>(block_idx),  nBlocks * sizeof(int));
+    file.read(reinterpret_cast<char*>(block_type), nBlocks * sizeof(int));
+    delete [] block_proc;
+    delete [] block_idx;
+    delete [] block_type;
+
+    streamsize nlen = 0;
+    file.read(reinterpret_cast<char *>(&nlen), sizeof(streamsize));
+    if (nlen <= 0) return;
+
+    int nTotalNode, nTotalFace, nTotalCell, nBoundFace;
+
+    cout << "reading the mesh files......\n";
+    //! Read the total node number,face number and cell number.
+    int sizeint = sizeof(int);
+    int sizeRealGeom = sizeof(RDouble);
+
+    file.read(reinterpret_cast<char*>(&nTotalNode), sizeint);
+    file.read(reinterpret_cast<char*>(&nTotalFace), sizeint);
+    file.read(reinterpret_cast<char*>(&nTotalCell), sizeint);
+
+    cout << "the total numbers of nodes     :" << nTotalNode;
+    cout << "the total numbers of faces   :" << nTotalFace;
+    cout << "the total numbers of cells     :" << nTotalCell << "\n";
+
+    RDouble *x, *y, *z;
+    RDouble xmin, ymin, xmax, ymax;
+    xmin = ymin =   LARGE;
+    xmax = ymax = - LARGE;
+    x = new RDouble[nTotalNode];
+    y = new RDouble[nTotalNode];
+    z = new RDouble[nTotalNode];
+
+    file.read(reinterpret_cast<char*>(x), nTotalNode * sizeRealGeom);
+    file.read(reinterpret_cast<char*>(y), nTotalNode * sizeRealGeom);
+    file.read(reinterpret_cast<char*>(z), nTotalNode * sizeRealGeom);
+
+    cout << "mesh nodes reading end.\n";
+
+    int *node_number_of_each_face = new int[nTotalFace];
+    //! Assign the value to node_number_of_each_face.
+    file.read(reinterpret_cast<char*>(node_number_of_each_face), nTotalFace * sizeint);
+
+    int nsum = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        nsum += node_number_of_each_face[iFace];
+    }
+
+    cout << "set the connection relationship of face to node......\n";
+    //! Face to Node connection relationship.
+    int *face2node = new int [nsum];
+
+    file.read(reinterpret_cast<char*>(face2node), nsum * sizeint);
+
+    cout << "set the connection relationship of face to cell......\n";
+
+    int *left_cell_of_face  = new int [nTotalFace];
+    int *right_cell_of_face = new int [nTotalFace];
+    file.read(reinterpret_cast<char*>(left_cell_of_face), nTotalFace * sizeint);
+    file.read(reinterpret_cast<char*>(right_cell_of_face), nTotalFace * sizeint);
+
+    cout << "set the boundary conditions......\n";
+    file.read(reinterpret_cast<char*>(&nBoundFace), sizeint);
+
+    //! Set the boundary conditions.
+    int *bctype = new int [nBoundFace];
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int tmp;
+        file.read(reinterpret_cast<char*>(&tmp), sizeint);
+        bctype[iFace] = tmp;
+    }
+
+    file.close();
+    file.clear();
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int type = u2fbc.TranslateBC(bctype[iFace]);
+        bctype[iFace] = type;
+    }  
+
+    file.open(out_gfile.c_str(), ios_base::out);
+    file.setf(ios::scientific);
+    file.precision(8);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(out_gfile);
+    }
+
+    int ngrids = 1;
+    file << ngrids << "\n";
+    file << 0 << "\n";
+    file << "grid 1\n";
+    file << nTotalNode << " " << nTotalFace << " " << nTotalCell << " " << nBoundFace << "\n";
+ 
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        file << x[iNode] << " " << y[iNode] << "\n";
+    }
+
+    int *nodePosi = new int [nTotalFace+1];
+
+    nodePosi[0] = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        nodePosi[iFace+1] = nodePosi[iFace] + 2;
+    }
+    delete [] nodePosi;
+
+    for (int i = 0; i < nsum; ++ i)
+    {
+        file << face2node[i] + 1;
+        if (i % 2 == 0)
+        {
+            file << " ";
+        }
+        else
+        {
+            file << "\n";
+        }
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        file << left_cell_of_face[iFace] + 1 << " ";
+        file << bctype[iFace] << "\n";
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        file << left_cell_of_face [iFace] + 1 << " ";
+        file << right_cell_of_face[iFace] + 1 << "\n";
+    }
+
+    file.close();
+    file.clear();
+
+    delete [] bctype;
+    delete [] node_number_of_each_face;
+    delete [] face2node;
+    delete [] left_cell_of_face;
+    delete [] right_cell_of_face;
+    delete [] x;
+    delete [] y;
+    delete [] z;
+}
+
+void Fantasy2Ustar3D()
+{
+    string from_gfile = "grid.fts";
+    GlobalDataBase::GetData("from_gfile", &from_gfile, PHSTRING, 1);
+
+    string out_gfile = "mgrid.in";
+    GlobalDataBase::GetData("out_gfile", &out_gfile, PHSTRING, 1);
+
+    fstream file;
+    file.open(from_gfile.c_str(), ios_base::in|ios_base::binary);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(from_gfile);
+    }
+
+    typedef Ustar2Fantasy FantasyToUstar;
+    FantasyToUstar u2fbc("support/fts2ustarbc.txt");
+
+    using namespace PHSPACE;
+
+    int nBlocks;
+    file.read(reinterpret_cast<char*>(&nBlocks), sizeof(int));
+
+    int *block_proc = new int [nBlocks];
+    int *block_idx  = new int [nBlocks];
+    int *block_type = new int [nBlocks];
+    file.read(reinterpret_cast<char*>(block_proc), nBlocks * sizeof(int));
+    file.read(reinterpret_cast<char*>(block_idx),  nBlocks * sizeof(int));
+    file.read(reinterpret_cast<char*>(block_type), nBlocks * sizeof(int));
+    delete [] block_proc;
+    delete [] block_idx;
+    delete [] block_type;
+
+    streamsize nlen = 0;
+    file.read(reinterpret_cast<char *>(&nlen), sizeof(streamsize));
+    if (nlen <= 0) return;
+
+    int nTotalNode, nTotalFace, nTotalCell, nBoundFace;
+
+    cout << "reading the mesh files......\n";
+    //! Read the total node number, face number and cell number.
+    int sizeint = sizeof(int);
+    int sizeRealGeom = sizeof(RDouble);
+
+    file.read(reinterpret_cast<char*>(&nTotalNode), sizeint);
+    file.read(reinterpret_cast<char*>(&nTotalFace), sizeint);
+    file.read(reinterpret_cast<char*>(&nTotalCell), sizeint);
+
+    cout << "the total numbers of nodes     :" << nTotalNode;
+    cout << "the total numbers of faces   :" << nTotalFace;
+    cout << "the total numbers of cells     :" << nTotalCell << "\n";
+
+    RDouble *x, *y, *z;
+    RDouble xmin, ymin, xmax, ymax;
+    xmin = ymin =   LARGE;
+    xmax = ymax = - LARGE;
+    x = new RDouble[nTotalNode];
+    y = new RDouble[nTotalNode];
+    z = new RDouble[nTotalNode];
+
+    file.read(reinterpret_cast<char*>(x), nTotalNode * sizeRealGeom);
+    file.read(reinterpret_cast<char*>(y), nTotalNode * sizeRealGeom);
+    file.read(reinterpret_cast<char*>(z), nTotalNode * sizeRealGeom);
+
+    cout << "mesh nodes reading end.\n";
+
+    int *node_number_of_each_face = new int[nTotalFace];
+    //! Assign the value to node_number_of_each_face.
+    file.read(reinterpret_cast<char*>(node_number_of_each_face), nTotalFace * sizeint);
+
+    int nsum = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        nsum += node_number_of_each_face[iFace];
+    }
+
+    cout << "set the connection relationship of face to node ......\n";
+    //! Face to Node connection relationship.
+    int *face2node = new int [nsum];
+
+    file.read(reinterpret_cast<char*>(face2node), nsum * sizeint);
+
+    cout << "set the connection relationship of face to cell ......\n";
+
+    int *left_cell_of_face  = new int[nTotalFace];
+    int *right_cell_of_face = new int[nTotalFace];
+    file.read(reinterpret_cast<char*>(left_cell_of_face), nTotalFace * sizeint);
+    file.read(reinterpret_cast<char*>(right_cell_of_face), nTotalFace * sizeint);
+
+    cout << "set the boundary conditions......\n";
+    file.read(reinterpret_cast<char*>(&nBoundFace), sizeint);
+
+    //! Set the boundary conditions.
+    int *bctype = new int [nBoundFace];
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int tmp;
+        file.read(reinterpret_cast<char*>(&tmp), sizeint);
+        bctype[iFace] = tmp;
+    }
+    file.close();
+    file.clear();
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int type = u2fbc.TranslateBC(bctype[iFace]);
+        bctype[iFace] = type;
+    }  
+
+    //! Output file in Ustar format.
+    const int BINARY = 0;
+    const int ASCII  = 1;
+
+    int fileformat = 0;
+    GlobalDataBase::GetData("fileformat", &fileformat, PHINT, 1);
+
+    if (fileformat == ASCII)
+    {
+        file.open(out_gfile.c_str(), ios_base::out);
+        file.setf(ios::scientific);
+        file.precision(8);
+        if (!file)
+        {
+            TK_Exit::FileOpenErrorExit(out_gfile);
+        }
+
+        file << nTotalNode << "  " << nTotalFace << "  " << nTotalCell << endl;
+
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            file << x[iNode] << "  " << y[iNode] << "  " << z[iNode] << endl;
+        }
+
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            file << node_number_of_each_face[iFace] << endl;
+        }
+
+        int count = 0;
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                file << face2node[count++] + 1 << "  ";
+            }
+            file << endl;
+        }
+
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            file << left_cell_of_face[iFace] + 1 << " ";
+            file << bctype[iFace] << "\n"; 
+        }
+
+        for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+        {
+            file << left_cell_of_face [iFace] + 1 << " ";
+            file << right_cell_of_face[iFace] + 1 << "\n";
+        }
+
+        file.close();
+        file.clear();
+    } 
+    else
+    {
+        //! BINARY format.
+        int count;
+        int SizeInt    = sizeof(int);
+        int SizeDouble = sizeof(RDouble);
+
+        file.open(out_gfile.c_str(), ios_base::out|ios_base::binary);
+        if (!file)
+        {
+            TK_Exit::FileOpenErrorExit(out_gfile);
+        }
+
+        file.write((char *)&nTotalNode, SizeInt);
+        file.write((char *)&nTotalFace, SizeInt);
+        file.write((char *)&nTotalCell, SizeInt);
+
+        //! Output coordinates.
+        count = 3 * nTotalNode;
+        RDouble *coordinate = new RDouble [count];
+        count = 0;
+        for (int i = 0; i < nTotalNode; ++ i)
+        {
+            coordinate[count ++] = x[i];
+            coordinate[count ++] = y[i];
+            coordinate[count ++] = z[i];
+        }
+
+        count = 3 * nTotalNode;
+        file.write((char *)coordinate, count * SizeDouble);
+        delete [] coordinate;
+
+        //! Output face to node relationship.
+        file.write((char *)node_number_of_each_face, nTotalFace * SizeInt);
+
+        count = 0;
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                ++ count;
+            }
+        }
+
+        int *f2n_temp = new int [count];
+        for (int j = 0; j < count; ++ j)
+        {
+            f2n_temp[j] = face2node[j] + 1;
+        }
+        
+        file.write((char *)f2n_temp, count * SizeInt);
+        delete [] f2n_temp;
+
+        //! Output face to cell relationship.
+        count = 2 * nTotalFace;
+        int *f2c_temp = new int [count];
+        
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            f2c_temp[2 * iFace] = left_cell_of_face[iFace] + 1;
+            f2c_temp[2 * iFace + 1] = bctype[iFace];
+        }
+
+        for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+        {
+            f2c_temp[2 * iFace] = left_cell_of_face[iFace] + 1;
+            f2c_temp[2 * iFace + 1] = right_cell_of_face[iFace] + 1;
+        }
+
+        file.write((char *)f2c_temp, count * SizeInt);
+        delete [] f2c_temp;
+    }    
+
+    delete [] bctype;
+    delete [] node_number_of_each_face;
+    delete [] face2node;
+    delete [] left_cell_of_face;
+    delete [] right_cell_of_face;
+    delete [] x;
+    delete [] y;
+    delete [] z;
+}
+
+Ustar2Fantasy::Ustar2Fantasy(string mapfile_in)
+{
+    mapfilename = mapfile_in;
+
+    fstream file;
+    string name = mapfilename;
+    file.open(name.c_str(), ios_base::in);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(name);
+    }
+
+    int num_bc = 0;
+
+    file >> num_bc;
+
+    for (int i = 0; i < num_bc; ++ i)
+    {
+        int index, bcindex;
+        file >> index  ;
+        file >> bcindex;
+        bcmap.insert(pair<int, int>(index, bcindex));
+    }
+
+    file.close();
+    file.clear();
+}
+
+Ustar2Fantasy::~Ustar2Fantasy()
+{
+}
+
+int Ustar2Fantasy::TranslateBC(int bctype)
+{
+    map <int, int>::iterator iter;
+    iter = bcmap.find(bctype);
+
+    if (iter != bcmap.end())
+    {
+        return iter->second;
+    }
+
+    return bctype;
+}
+
+//! Add binary ustar grid input.
+void ReadUstarGrid(const string &gridfile, UnstructGrid *grid)
+{
+    const int BINARY = 0;
+    const int ASCII  = 1;
+    
+    int fileformat = 0;
+    GlobalDataBase::GetData("fileformat", &fileformat, PHINT, 1);
+
+    if (fileformat == BINARY)
+    {
+        cout << "reading binary Ustar3D meshes ... \n";
+        ReadUstarGrid3D_Binary(gridfile, grid);
+        return;
+    }
+    else
+    {
+        cout << "reading ascii Ustar meshes ... \n";
+    }
+
+    string line, word;
+    string separator = " =\t\r\n#$,;";
+
+    fstream file;
+    file.open(gridfile.c_str(), ios_base::in);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(gridfile);
+    }
+
+    Ustar2Fantasy u2fbc("support/ustar2ftsbc.txt");
+
+    if (GetDim() == TWO_D)
+    {
+        getline(file, line);
+        line = FindNextWord(line, word, separator);
+        int ngrids = 1;
+        from_string< int >(ngrids, word, std::dec);
+
+        cout << "ngrids = " << ngrids << "\n";
+
+        getline(file, line);
+        getline(file, line);
+    }
+
+    int nTotalNode = 0, nTotalFace = 0, nTotalCell = 0, nBoundFace = 0;
+    getline(file, line);
+
+    line = FindNextWord(line, word, separator);
+    from_string< int >(nTotalNode, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string< int >(nTotalFace, word, std::dec);
+
+    line = FindNextWord(line, word, separator);
+    from_string< int >(nTotalCell, word, std::dec);
+
+    cout << "reading the unstructed data file......\n";
+    //! Read the total node number,face number and cell number.
+
+    if (GetDim() == TWO_D)
+    {
+        line = FindNextWord(line, word, separator);
+        from_string< int >(nBoundFace, word, std::dec);
+        cout << " the numbers of total nodes :"   << nTotalNode;
+        cout << " the numbers of total faces :" << nTotalFace;
+        cout << " the numbers of total cells :"   << nTotalCell << "\n";
+        cout << " the numbers of boundary faces :"   << nBoundFace << "\n";
+
+    }
+    else
+    {
+        cout << " the numbers of total nodes :"   << nTotalNode;
+        cout << " the numbers of total faces :" << nTotalFace;
+        cout << " the numbers of total cells :"   << nTotalCell << "\n";
+    }
+
+    grid->SetNTotalNode(nTotalNode);
+    grid->SetNTotalFace(nTotalFace);
+    grid->SetNTotalCell(nTotalCell);
+
+    RDouble *x, *y, *z;
+    x = new RDouble [nTotalNode];
+    y = new RDouble [nTotalNode];
+    z = new RDouble [nTotalNode];
+
+    grid->SetX(x);
+    grid->SetY(y);
+    grid->SetZ(z);
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        getline(file, line);
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(x[iNode], word, std::dec);
+
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(y[iNode], word, std::dec);
+
+        if (GetDim() == THREE_D)
+        {
+            line = FindNextWord(line, word, separator);
+            from_string< RDouble >(z[iNode], word, std::dec);
+        }
+        else
+        {
+            z[iNode] = zero;
+        }
+    }
+
+    int *node_number_of_each_face = new int[nTotalFace];
+    //! Assign the value to node_number_of_each_face.
+    grid->SetNodeNumberOfEachFace(node_number_of_each_face);
+
+    if (GetDim() == TWO_D)
+    {
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            node_number_of_each_face[iFace] = 2;
+        }
+    }
+    else
+    {
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            file >> node_number_of_each_face[iFace];
+        }
+    }
+
+    int *nodePosi = new int[nTotalFace + 1];
+    int nsum = 0;
+    nodePosi[0] = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        nsum += node_number_of_each_face[iFace];
+        nodePosi[iFace+1] = nsum;
+    }
+
+    cout << "set the connection relationship of face to node......\n";
+    //! Face to Node connection relationship.
+    int *face2node = new int [nsum];
+    grid->SetFace2Node(face2node);
+
+    for (int i = 0; i < nsum; ++ i)
+    {
+        file >> face2node[i];
+        -- face2node[i];
+    }
+
+    int nBFaceReal = 0;
+    int n_patch    = 0;
+
+    cout << "set the connection relationship of face to cell......\n";
+    int *left_cell_of_face  = new int[nTotalFace];
+    int *right_cell_of_face = new int[nTotalFace];
+    grid->SetLeftCellOfFace(left_cell_of_face);
+    grid->SetRightCellOfFace(right_cell_of_face);
+
+    if (GetDim() == TWO_D)
+    {
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            file >> left_cell_of_face[iFace];
+            file >> right_cell_of_face[iFace];
+
+            if (left_cell_of_face[ iFace ] <= 0)
+            {
+                -- left_cell_of_face [iFace];
+                -- right_cell_of_face[iFace];
+                // need to reverse the node ordering
+                SWAP(face2node[2*iFace], face2node[2*iFace+1]);
+                SWAP(left_cell_of_face[iFace], right_cell_of_face[iFace]);
+                n_patch = MAX(n_patch, -right_cell_of_face[iFace]);
+                ++ nBFaceReal;
+            }
+            else if (right_cell_of_face[iFace] <= 0)
+            {
+                -- left_cell_of_face [iFace];
+                -- right_cell_of_face[iFace];
+                n_patch = MAX(n_patch, -right_cell_of_face[iFace]);
+                ++ nBFaceReal;
+            }
+            else
+            {
+                -- left_cell_of_face [iFace];
+                -- right_cell_of_face[iFace];
+            }
+        }
+    }
+    else
+    {
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            file >> left_cell_of_face [iFace];
+            file >> right_cell_of_face[iFace];
+            if (left_cell_of_face[iFace] < 0)
+            {
+                -- right_cell_of_face[iFace];
+                //! Need to reverse the node ordering.
+                //! This problem is very hidden,mainly cause by the unclear definition of reverse.
+                //! The bottom line is wrong.
+                //std::reverse(face2node + nodePosi[iFace],face2node + nodePosi[iFace+1] - 1);
+                std::reverse(face2node + nodePosi[iFace], face2node + nodePosi[iFace+1]);
+
+                //! Now reverse le and re.
+                SWAP(left_cell_of_face[iFace], right_cell_of_face[iFace]);
+
+                n_patch = MAX(n_patch, -right_cell_of_face[iFace]);
+                ++ nBFaceReal;
+            }
+            else if (right_cell_of_face[iFace] < 0)
+            {
+                -- left_cell_of_face[iFace];
+                n_patch = MAX(n_patch, -right_cell_of_face[iFace]);
+                ++ nBFaceReal;
+            }
+            else
+            {
+                -- left_cell_of_face [iFace];
+                -- right_cell_of_face[iFace];
+            }
+        }
+    }
+    delete [] nodePosi;
+
+    if (GetDim() == TWO_D)
+    {
+        if (nBFaceReal != nBoundFace)
+        {
+            TK_Exit::ExceptionExit("nBFaceReal != nBFace\n");
+        }
+    }
+    nBoundFace = nBFaceReal;
+
+    cout << "set the boundary conditions......\n";
+    grid->SetNBoundFace(nBoundFace);
+
+    cout << "nBoundFace = " << nBoundFace << "\n";
+
+    //! Set the boundary conditions.
+    UnstructBCSet **bcr = new UnstructBCSet * [nBoundFace];
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int bctype = u2fbc.TranslateBC(-right_cell_of_face[iFace]);
+        bcr[iFace] = new UnstructBCSet();
+        bcr[iFace]->SetKey(bctype);
+    }
+
+    grid->SetBCRecord(bcr);
+
+    InterfaceInfo *interfaceInfo = 0;
+    grid->SetInterfaceInfo(interfaceInfo);
+
+    grid->SpecifyRightCellofBC();
+
+    file.close();
+}
+
+//! Read ustar 3d grid by binary.
+void ReadUstarGrid3D_Binary(const string &gridfile, UnstructGrid *grid)
+{
+    if (GetDim() == TWO_D)
+    {
+        TK_Exit::ExceptionExit("暂时没考虑2D的二进制ustar文件读入 ... \n");
+    }
+
+    ifstream infile;
+    infile.open(gridfile.c_str(), ios_base::in|ios_base::binary);
+    if (!infile)
+    {
+        TK_Exit::FileOpenErrorExit(gridfile);
+    }
+
+    cout << "reading the unstructed data file......\n";
+
+    Ustar2Fantasy u2fbc("support/ustar2ftsbc.txt");
+        
+    int SizeInt = sizeof(int);
+    int SizeDouble = sizeof(RDouble);
+
+    int nTotalNode, nTotalFace, nTotalCell, nBoundFace;
+
+    infile.read((char *)&nTotalNode, SizeInt);
+    infile.read((char *)&nTotalFace, SizeInt);
+    infile.read((char *)&nTotalCell, SizeInt);
+
+    if (GetDim() == TWO_D)
+    {
+
+    }
+    else
+    {
+        cout << " the total numbers of nodes :"   << nTotalNode;
+        cout << " the total numbers of faces :" << nTotalFace;
+        cout << " the total numbers of cells :"   << nTotalCell << "\n";
+    }
+
+    grid->SetNTotalNode(nTotalNode);
+    grid->SetNTotalFace(nTotalFace);
+    grid->SetNTotalCell(nTotalCell);
+
+    RDouble *x, *y, *z;
+    x = new RDouble[nTotalNode];
+    y = new RDouble[nTotalNode];
+    z = new RDouble[nTotalNode];
+
+    grid->SetX(x);
+    grid->SetY(y);
+    grid->SetZ(z);
+
+    //! Read the coordinatesof point.
+    int count = 3 * nTotalNode;
+    RDouble *coordinate = new RDouble [count];
+    infile.read((char *)coordinate, count * SizeDouble);
+
+    count = 0;
+    for (int i = 0; i < nTotalNode; ++ i)
+    {
+        x[i] = coordinate[count ++];
+        y[i] = coordinate[count ++];
+        z[i] = coordinate[count ++];
+    }
+
+    delete [] coordinate;
+
+    //! Read the face to node relationship.
+    int *node_number_of_each_face = new int[nTotalFace];
+    grid->SetNodeNumberOfEachFace(node_number_of_each_face);
+
+    if (GetDim() == TWO_D)
+    {
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            node_number_of_each_face[iFace] = 2;
+        }
+    }
+    else
+    {
+        infile.read((char *)node_number_of_each_face, nTotalFace * SizeInt);
+    }
+    
+    int *nodePosi = new int[nTotalFace + 1];
+    int nsum = 0;
+    nodePosi[0] = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        nsum += node_number_of_each_face[iFace];
+        nodePosi[iFace+1] = nsum;
+    }
+
+    cout << "set the connection relationship of face to node......\n";
+
+    int *face2node = new int [nsum];
+    grid->SetFace2Node(face2node);
+
+    infile.read((char *)face2node, nsum * SizeInt);
+    for (int j = 0; j < nsum; ++ j)
+    {
+        face2node[j] = face2node[j] - 1;
+    }
+
+    //! Read the face to cell relationship.
+    int nBFaceReal = 0;
+    int n_patch    = 0;
+
+    cout << "set the connection relationship of face to cells......\n";
+    int *left_cell_of_face  = new int [nTotalFace];
+    int *right_cell_of_face = new int [nTotalFace];
+    grid->SetLeftCellOfFace(left_cell_of_face);
+    grid->SetRightCellOfFace(right_cell_of_face);
+
+    if (GetDim() == TWO_D)
+    {
+
+    }
+    else
+    {
+        count = 2 * nTotalFace;
+        int *f2c_temp = new int [count];
+        infile.read((char *)f2c_temp, count * SizeInt);
+
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            left_cell_of_face [iFace] = f2c_temp[2 * iFace];
+            right_cell_of_face[iFace] = f2c_temp[2 * iFace + 1];
+
+            if (left_cell_of_face[iFace] < 0)
+            {
+                -- right_cell_of_face[iFace];
+                std::reverse(face2node + nodePosi[iFace], face2node + nodePosi[iFace+1]);
+
+                //! Now reverse le and re.
+                SWAP(left_cell_of_face[iFace], right_cell_of_face[iFace]);
+
+                n_patch = MAX(n_patch, -right_cell_of_face[iFace]);
+                ++ nBFaceReal;
+            }
+            else if (right_cell_of_face[iFace] < 0)
+            {
+                -- left_cell_of_face[iFace];
+                n_patch = MAX(n_patch, -right_cell_of_face[iFace]);
+                ++ nBFaceReal;
+            }
+            else
+            {
+                -- left_cell_of_face [iFace];
+                -- right_cell_of_face[iFace];
+            }
+        }
+
+        delete [] f2c_temp;
+    }
+    delete [] nodePosi;
+
+    nBoundFace = nBFaceReal;
+
+    cout << "设置边界条件......\n";
+    grid->SetNBoundFace(nBoundFace);
+
+    cout << "nBoundFace = " << nBoundFace << "\n";
+
+    //! Set the boundary conditions.
+    UnstructBCSet **bcr = new UnstructBCSet * [nBoundFace];
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int bctype = u2fbc.TranslateBC(-right_cell_of_face[iFace]);
+        bcr[iFace] = new UnstructBCSet();
+        bcr[iFace]->SetKey(bctype);
+    }
+
+    grid->SetBCRecord(bcr);
+
+    InterfaceInfo *interfaceInfo = 0;
+    grid->SetInterfaceInfo(interfaceInfo);
+
+    grid->SpecifyRightCellofBC();
+
+    infile.close();
+    infile.clear();
+}
+
+void GetUnsIndex(StructGrid *grid, DataStruct_AdtTree<int, RDouble> *adtTree, int &count, RDouble tol, Int3D &unsindex, RDouble *xuns, RDouble *yuns, RDouble *zuns)
+{
+    typedef DataStruct_AdtTree<int, RDouble> AdtTree;
+    typedef DataStruct_AdtNode<int, RDouble> AdtNode;
+    AdtTree::AdtNodeList node_list;
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble3D &xs = * grid->GetStructX();
+    RDouble3D &ys = * grid->GetStructY();
+    RDouble3D &zs = * grid->GetStructZ();
+
+    unsindex = 0;
+
+    RDouble coor[3], minwin[3], maxwin[3];
+
+    for (int k = 1; k <= nk; ++ k)
+    {
+        for (int j = 1; j <= nj; ++ j)
+        {
+            for (int i = 1; i <= ni; ++ i)
+            {
+                coor[0] = xs(i, j, k);
+                coor[1] = ys(i, j, k);
+                coor[2] = zs(i, j, k);
+
+                minwin[0] = coor[0] - tol;
+                minwin[1] = coor[1] - tol;
+                minwin[2] = coor[2] - tol;
+
+                maxwin[0] = coor[0] + tol;
+                maxwin[1] = coor[1] + tol;
+                maxwin[2] = coor[2] + tol;
+
+                node_list.resize(0);
+                adtTree->FindNodesInRegion(minwin, maxwin, node_list);
+
+                if (node_list.size() == 0)
+                {
+                    //! This means that there is no point,can add them.
+                    xuns[count] = coor[0];
+                    yuns[count] = coor[1];
+                    zuns[count] = coor[2];
+
+                    AdtNode *node = new AdtNode(3, coor, count);
+                    adtTree->AddNode(node);
+                    unsindex(i, j, k) = count;
+                    ++ count;
+                }
+                else
+                {
+                    if (node_list.size() > 1)
+                    {
+                        ostringstream oss;
+                        oss << "FATAL ERROR : node_list.size() = " << node_list.size() << "\n";
+                        TK_Exit::ExceptionExit(oss.str());
+                    }
+                    AdtNode *node =  node_list[0];
+                    unsindex(i, j, k) = node->GetData();
+                }
+            }
+        }
+    }
+}
+
+void SetUnstructBC
+(
+#pragma warning(disable:4100)
+    int ist,
+    int ied,
+    int jst,
+    int jed,
+    int kst,
+    int ked,
+    int bctype,
+    cgsize_t *conn_list,
+    int &start_pos,
+    Int3D &unsindex
+#pragma warning(default:4100)
+)
+{
+    cout << "ist,ied,jst,jed,kst,ked = " << ist << " " << ied << " " << jst << " " << jed << " " << kst << " " << ked << "\n";
+    int nDim = GetDim();
+    int numpt = 4;
+    if (nDim == TWO_D) numpt = 2;
+
+    if (ist == ied)
+    {
+        int i = ist;
+        if (nDim == THREE_D)
+        {
+            for (int k = kst; k <= ked - 1; ++ k)
+            {
+                for (int j = jst; j <= jed - 1; ++ j)
+                {
+                    if (i == 1)
+                    {
+                        conn_list[start_pos + 0] = unsindex(i, j  , k ) + 1;
+                        conn_list[start_pos + 1] = unsindex(i, j  , k+1) + 1;
+                        conn_list[start_pos + 2] = unsindex(i, j+1, k+1) + 1;
+                        conn_list[start_pos + 3] = unsindex(i, j+1, k ) + 1;
+                    }
+                    else
+                    {
+                        conn_list[start_pos + 0] = unsindex(i, j  , k ) + 1;
+                        conn_list[start_pos + 1] = unsindex(i, j+1, k ) + 1;
+                        conn_list[start_pos + 2] = unsindex(i, j+1, k+1) + 1;
+                        conn_list[start_pos + 3] = unsindex(i, j  , k+1) + 1;
+                    }
+                    start_pos += numpt;
+                }
+            }
+        }
+        else
+        {
+            int k = kst;
+            for (int j = jst; j <= jed - 1; ++ j)
+            {
+                if (i == 1)
+                {
+                    conn_list[start_pos + 0] = unsindex(i, j+1, k) + 1;
+                    conn_list[start_pos + 1] = unsindex(i, j  , k) + 1;
+                }
+                else
+                {
+                    conn_list[start_pos + 0] = unsindex(i, j  , k) + 1;
+                    conn_list[start_pos + 1] = unsindex(i, j+1, k) + 1;
+                }
+                start_pos += numpt;
+            }
+        }
+        return;
+    }
+
+    if (jst == jed)
+    {
+        int j = jst;
+        if (nDim == THREE_D)
+        {
+            for (int k = kst; k <= ked - 1; ++ k)
+            {
+                for (int i = ist; i <= ied - 1; ++ i)
+                {
+                    if (j == 1)
+                    {
+                        conn_list[start_pos + 0] = unsindex(i  , j, k ) + 1;
+                        conn_list[start_pos + 1] = unsindex(i+1, j, k ) + 1;
+                        conn_list[start_pos + 2] = unsindex(i+1, j, k+1) + 1;
+                        conn_list[start_pos + 3] = unsindex(i  , j, k+1) + 1;
+                    }
+                    else
+                    {
+                        conn_list[start_pos + 0] = unsindex(i  , j, k ) + 1;
+                        conn_list[start_pos + 1] = unsindex(i  , j, k+1) + 1;
+                        conn_list[start_pos + 2] = unsindex(i+1, j, k+1) + 1;
+                        conn_list[start_pos + 3] = unsindex(i+1, j, k ) + 1;
+                    }
+                    start_pos += numpt;
+                }
+            }
+        }
+        else
+        {
+            int k = kst;
+            for (int i = ist; i <= ied - 1; ++ i)
+            {
+                if (j == 1)
+                {
+                    conn_list[start_pos + 0] = unsindex(i  , j, k) + 1;
+                    conn_list[start_pos + 1] = unsindex(i+1, j, k) + 1;
+                }   
+                else
+                {
+                    conn_list[start_pos + 0] = unsindex(i+1, j, k) + 1;
+                    conn_list[start_pos + 1] = unsindex(i  , j, k) + 1;
+                }
+                start_pos += numpt;
+            }
+        }
+        return;
+    }
+
+    if (kst == ked)
+    {
+        int k = kst;
+        for (int j = jst; j <= jed - 1; ++ j)
+        {
+            for (int i = ist; i <= ied - 1; ++ i)
+            {
+                if (k == 1)
+                {
+                    conn_list[start_pos + 0] = unsindex(i  , j  , k) + 1;
+                    conn_list[start_pos + 1] = unsindex(i  , j+1, k) + 1;
+                    conn_list[start_pos + 2] = unsindex(i+1, j+1, k) + 1;
+                    conn_list[start_pos + 3] = unsindex(i+1, j  , k) + 1;
+                }
+                else
+                {
+                    conn_list[start_pos + 0] = unsindex(i  , j  , k) + 1;
+                    conn_list[start_pos + 1] = unsindex(i+1, j  , k) + 1;
+                    conn_list[start_pos + 2] = unsindex(i+1, j+1, k) + 1;
+                    conn_list[start_pos + 3] = unsindex(i  , j+1, k) + 1;
+                }
+                start_pos += numpt;
+            }
+        }
+        return;
+    }
+
+    TK_Exit::ExceptionExit(" error : ist != ied, jst != jed, kst != ked \n");
+}
+
+void FillSection(Grid **grids, int nBlocks, CGNSBase *base_cgns, BaseElement *base_elem, Int3D **unsindexlist)
+{
+    int nTotalCell, nBoundFace, nSections, nBCRegions;
+    int istart[2], iend[2];
+    ElementType_t etype[2];
+
+    cgsize_t *conn_list;
+    int start_pos;
+
+    int nDim = GetDim();
+
+    nTotalCell = 0;
+    nBoundFace = 0;
+    nBCRegions = 0;
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        StructGrid *grid = StructGridCast(grids[iZone]);
+        int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();
+        Range I(1, ni-1);
+        Range J(1, nj-1);
+        Range K(1, nk-1);
+        if (nk == 1) K.setRange(1, 1);
+        nTotalCell += I.length() * J.length() * K.length();
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+        int nBCRegion = structBCSet->GetnBCRegion();
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            //! Read the source region imin,imax,jmin,jmax,kmin,kmax,bctype.
+            int imin, imax, jmin, jmax, kmin, kmax, bctype;
+            StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+            bcregion->GetNormalizeIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+            bctype = bcregion->GetBCType();
+            if (bctype != 7 || bctype / 10 != 7)
+            {
+                int di = MAX(imax - imin, 1);
+                int dj = MAX(jmax - jmin, 1);
+                int dk = MAX(kmax - kmin, 1);
+                nBoundFace += di * dj * dk;
+                nBCRegions ++;
+            }
+        }
+    }
+
+    base_cgns->SetNTotalCell(nTotalCell);
+    base_cgns->SetNBoundFace(nBoundFace);
+
+    nSections = 2;
+
+    base_cgns->CreateElement(nSections);
+
+    istart[0] = 1;
+    iend[0] = nTotalCell;
+
+    istart[1] = nTotalCell + 1;
+    iend[1] = nTotalCell + 1 + nBoundFace;
+
+    if (nDim == THREE_D)
+    {
+        etype[0] = HEXA_8;
+        etype[1] = QUAD_4;
+    }
+    else
+    {
+        etype[0] = QUAD_4;
+        etype[1] = BAR_2;
+    }
+
+    cgsize_t *base_cgns_istart = base_cgns->GetIndexOfStart();
+    cgsize_t *base_cgns_iend   = base_cgns->GetIndexOfEnd();
+    int *base_cgns_elem_type = base_cgns->GetElementType();
+
+    cgsize_t **base_cgns_conn_list = base_cgns->GetElementConnectionList();
+
+    cgsize_t *base_elem_elem_pt = base_elem->GetElementPoint();
+
+    for (int sec = 1; sec <= nSections; ++ sec)
+    {
+        base_cgns_istart[sec-1] = istart[sec-1];
+        base_cgns_iend  [sec-1] = iend  [sec-1];
+        base_cgns_elem_type[sec-1] = etype[sec-1];
+    }
+
+    for (int sec = 1; sec <= nSections; ++ sec)
+    {
+        int nelem = iend[sec-1] - istart[sec-1] + 1;
+        int ptnum = static_cast<int>(base_elem_elem_pt[etype[sec-1]]);
+        base_cgns_conn_list[sec-1] = new cgsize_t[ptnum * nelem];
+    }
+
+    base_cgns->CreateBC(nBCRegions);
+
+    conn_list = base_cgns_conn_list[0];
+    start_pos = 0;
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        StructGrid *grid = StructGridCast(grids[iZone]);
+
+        Int3D &unsindex = *unsindexlist[iZone];
+
+        int ist, ied, jst, jed, kst, ked;
+        grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+        int il1 = 1;
+        int jl1 = 1;
+        int kl1 = 1;
+
+        if (nDim == TWO_D) kl1 = 0;
+
+        int numpt = static_cast<int>(base_elem_elem_pt[etype[0]]);
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    conn_list[start_pos + 0] = unsindex(i    , j    , k) + 1;
+                    conn_list[start_pos + 1] = unsindex(i+il1, j    , k) + 1;
+                    conn_list[start_pos + 2] = unsindex(i+il1, j+jl1, k) + 1;
+                    conn_list[start_pos + 3] = unsindex(i    , j+jl1, k) + 1;
+                    if (nDim == THREE_D)
+                    {
+                        conn_list[start_pos + 4] = unsindex(i    , j    , k+kl1) + 1;
+                        conn_list[start_pos + 5] = unsindex(i+il1, j    , k+kl1) + 1;
+                        conn_list[start_pos + 6] = unsindex(i+il1, j+jl1, k+kl1) + 1;
+                        conn_list[start_pos + 7] = unsindex(i    , j+jl1, k+kl1) + 1;
+                    }
+                    start_pos += numpt;
+                }
+            }
+        }
+    }
+
+    conn_list = base_cgns_conn_list[1];
+    start_pos = 0;
+    int boco  = 0;
+    int ielem = nTotalCell;
+
+    BaseBCType *bc_convert = new BaseBCType();
+
+    int *base_cgns_nBCElem          = base_cgns->GetNumberOfBCElements();
+    int *base_cgns_bc_elem_set_type = base_cgns->GetBoundaryElementType();
+    int *base_cgns_bc_grid_location = base_cgns->GetBoundaryGridLocation();
+    int *base_cgns_bc_type          = base_cgns->GetBCType();
+    cgsize_t **base_cgns_bc_conn_list = base_cgns->GetBoundaryElementConnectionList();
+    string *base_cgns_bc_name = base_cgns->GetBCName();
+
+    cout << "    Warning: the cgsize_t type of conn_list has been convert to int type, when StrGridToUnsGrid()!!!" << endl;
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        StructGrid *grid = StructGridCast(grids[iZone]);
+        Int3D &unsindex = *unsindexlist[iZone];
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+        int nBCRegion = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            //! Read the source region imin,imax,jmin,jmax,kmin,kmax,bctype.
+            int imin, imax, jmin, jmax, kmin, kmax, bctype;
+            StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+             
+            bcregion->GetNormalizeIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+            bctype = bcregion->GetBCType();
+
+            if (bctype != 7 || bctype / 10 != 7)
+            {
+                boco ++;
+                int nBCElem = 2;
+
+                int di = MAX(imax - imin, 1);
+                int dj = MAX(jmax - jmin, 1);
+                int dk = MAX(kmax - kmin, 1);
+
+                base_cgns_nBCElem         [boco-1] = nBCElem;
+                base_cgns_bc_conn_list    [boco-1] = new cgsize_t[nBCElem];
+                base_cgns_bc_type         [boco-1] = bc_convert->Fantasy2CGNS(bctype);
+                base_cgns_bc_elem_set_type[boco-1] = ElementRange;
+                base_cgns_bc_grid_location[boco-1] = CellCenter;
+                base_cgns_bc_name         [boco-1] = bcregion->GetBCName();
+                base_cgns_bc_conn_list[boco-1][0]  = ielem + 1;
+                base_cgns_bc_conn_list[boco-1][1]  = ielem + di * dj * dk;
+                ielem += di * dj * dk;
+
+                SetUnstructBC(imin, imax, jmin, jmax, kmin, kmax, bctype, conn_list, start_pos, unsindex);
+            }
+        }
+    }
+
+    delete bc_convert;
+}
+
+void StrGridToUnsGrid(Grid **grids, int nBlocks, UnstructGrid *uns_grid)
+{
+    using namespace PHSPACE;
+    RDouble tol = 1.0e-8;
+
+    RDouble mindis,maxdis;
+    mindis =   LARGE;
+    maxdis = - LARGE;
+
+    int nTotalNode = 0;
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        StructGrid *grid = StructGridCast(grids[iZone]);
+        int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();
+
+        RDouble dismin, dismax;
+
+        grid->GetMinMaxDS(dismin, dismax);
+
+        mindis = MIN(mindis, dismin);
+        maxdis = MAX(maxdis, dismax);
+        nTotalNode += ni * nj * nk;
+    }
+
+    cout << " mindis = " << mindis << " maxdis = " << maxdis << "\n";
+
+    tol = mindis / 4;
+
+    //! Get the min max coordinates of the grid.
+    RDouble pmin[3], pmax[3];
+
+    pmin[0] = LARGE;
+    pmin[1] = LARGE;
+    pmin[2] = LARGE;
+
+    pmax[0] = - LARGE;
+    pmax[1] = - LARGE;
+    pmax[2] = - LARGE;
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        StructGrid *grid = StructGridCast(grids[iZone]);
+        RDouble *ptmin = grid->GetMinBox();
+        RDouble *ptmax = grid->GetMaxBox();
+
+        pmin[0] = MIN(pmin[0], ptmin[0]);
+        pmin[1] = MIN(pmin[1], ptmin[1]);
+        pmin[2] = MIN(pmin[2], ptmin[2]);
+
+        pmax[0] = MAX(pmax[0], ptmax[0]);
+        pmax[1] = MAX(pmax[1], ptmax[1]);
+        pmax[2] = MAX(pmax[2], ptmax[2]);
+    }
+
+    ShiftMinMaxBox(pmin, pmax, two * tol);
+
+    typedef DataStruct_AdtTree<int, RDouble> AdtTree;
+    AdtTree::AdtNodeList nodeList;
+
+    AdtTree *adtTree = new AdtTree(3, pmin, pmax);
+
+    int count = 0;
+    typedef DataStruct_AdtNode<int, RDouble> AdtNode;
+
+    RDouble *xuns = new RDouble[nTotalNode];
+    RDouble *yuns = new RDouble[nTotalNode];
+    RDouble *zuns = new RDouble[nTotalNode];
+
+    int nTotalCell = 0;
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        StructGrid *grid = StructGridCast(grids[iZone]);
+        int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();
+        Range I(1, ni-1);
+        Range J(1, nj-1);
+        Range K(1, nk-1);
+        if (nk == 1) K.setRange(1, 1);
+        nTotalCell += I.length() * J.length() * K.length();
+    }
+
+    Int3D **unsindexlist = new Int3D * [nBlocks];
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        StructGrid *grid = StructGridCast(grids[iZone]);
+        int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();
+
+        unsindexlist[iZone] = new Int3D(Range(1, ni), Range(1, nj), Range(1, nk), fortranArray);
+        Int3D &unsindex = *unsindexlist[iZone];
+        cout << " block = " << iZone + 1 << "\n";
+        GetUnsIndex(grid, adtTree, count, tol, unsindex, xuns, yuns, zuns);
+    }
+
+    delete adtTree;
+    nTotalNode = count;
+
+    cout << "first nTotalNode = " << nTotalNode << "\n";
+    RDouble *x = new RDouble [nTotalNode];
+    RDouble *y = new RDouble [nTotalNode];
+    RDouble *z = new RDouble [nTotalNode];
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        x[iNode] = xuns[iNode];
+        y[iNode] = yuns[iNode];
+        z[iNode] = zuns[iNode];
+    }
+
+    delete [] xuns;
+    delete [] yuns;
+    delete [] zuns;
+
+    int nSingle_Blocks = 1;
+    CGNSFactory *factory_cgns = new CGNSFactory(nSingle_Blocks);
+
+    CGNSBase    *base_cgns = factory_cgns->GetCGNSBase(0);
+    RawGrid     *rawgrid   = factory_cgns->GetRawGrid(0);
+    BaseElement *base_elem = factory_cgns->GetBaseElement();
+
+    rawgrid->SetNTotalNode(nTotalNode);
+    rawgrid->SetX(x);
+    rawgrid->SetY(y);
+    rawgrid->SetZ(z);
+
+    base_cgns->SetNTotalNode(nTotalNode);
+    base_cgns->SetNTotalCell(nTotalCell);
+
+    FillSection(grids, nBlocks, base_cgns, base_elem, unsindexlist);
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        delete unsindexlist[iZone];
+    }
+    delete [] unsindexlist;
+
+    factory_cgns->ConvertGrid2Fantasy();
+    CGNS2UnsGrid(factory_cgns, 0, uns_grid);
+
+    delete factory_cgns;
+}
+
+void StrGridToUnsGrid(StructGrid *grid, UnstructGrid *uns_grid)
+{
+    int nBlocks = 1;
+    Grid **grids = new Grid *[nBlocks];
+    grids[0] = grid;
+
+    StrGridToUnsGrid(grids, nBlocks, uns_grid);
+
+    delete [] grids;
+}
+
+void SetBcRegion(StructGrid *grid, VInt &imin, VInt &imax, VInt &jmin, VInt &jmax, VInt &kmin, VInt &kmax, VInt &bctype)
+{
+    //! The situation of multi block patched boundary is not considered temporary.
+    int nBCRegion = static_cast<int>(imin.size());
+
+    grid->CreateCompositeBCRegion(nBCRegion);
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+
+    int nb = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = new StructBC(nb, iBCRegion);
+        structBCSet->SetBCRegion(iBCRegion, bcregion);
+        bcregion->SetIJKRegion(imin[iBCRegion], imax[iBCRegion], jmin[iBCRegion], jmax[iBCRegion], kmin[iBCRegion], kmax[iBCRegion]);
+        bcregion->SetBCType(bctype[iBCRegion]);
+    }
+}
+
+}
diff --git a/API/PreProcess/src/Pre_Block_Struct.cpp b/API/PreProcess/src/Pre_Block_Struct.cpp
new file mode 100644
index 0000000..c4cdfeb
--- /dev/null
+++ b/API/PreProcess/src/Pre_Block_Struct.cpp
@@ -0,0 +1,930 @@
+#include "Pre_Block_Struct.h"
+#include "PHIO.h"
+#include "PHMatrix.h"
+#include "Math_BasisFunction.h"
+#include "Glb_Dimension.h"
+
+namespace PHSPACE
+{
+LIB_EXPORT Pre_BcFace_Struct::Pre_BcFace_Struct()
+{
+    simpleBlock  = 0;
+    next         = 0;
+    child        = 0;
+    bcDirection  = -1;
+
+    nodeStart.resize(3);
+    nodeEnd.resize(3);
+    axisLabel.resize(3);
+
+    InitUnitMatrix();
+}
+
+LIB_EXPORT Pre_BcFace_Struct::~Pre_BcFace_Struct()
+{
+    Free();
+}
+
+LIB_EXPORT void Pre_BcFace_Struct::Free()
+{
+    if (child)
+    {
+        uint_t numberOfChildren = child->size();
+        for (int i = 0; i < numberOfChildren; ++ i)
+        {
+            (* child)[i]->Free();
+        }
+        delete child;
+    }
+
+    delete next;
+}
+
+LIB_EXPORT void Pre_BcFace_Struct::ErectVertexMapping(int geometricDimension)
+{
+    vector< int > &s_st = this->nodeStart;
+    vector< int > &s_ed = this->nodeEnd;
+    vector< int > &s_nd = this->axisLabel;
+    int nsDriection = this->GetDirection();
+
+    GetSurfaceDirection(s_st, s_ed, s_nd, nsDriection, geometricDimension);
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        s_st[m] = abs(s_st[m]);
+        s_ed[m] = abs(s_ed[m]);
+    }
+    
+    vector< int > &t_st = this->next->GetNodeStart();
+    vector< int > &t_ed = this->next->GetNodeEnd();
+    vector< int > &t_nd = this->next->GetAxisLabel();
+    int ntDriection = this->next->GetDirection();
+
+    GetSurfaceDirection(t_st, t_ed, t_nd, ntDriection, geometricDimension);
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        t_st[m] = abs(t_st[m]);
+        t_ed[m] = abs(t_ed[m]);
+    }
+
+    vector< int > sourceToTargetAxisMapping(3), targetToSourceAxisMapping(3), rate(3);
+    for (int m = 0; m < 3; ++ m)
+    {
+        sourceToTargetAxisMapping[s_nd[m]] = t_nd[m];
+        targetToSourceAxisMapping[t_nd[m]] = s_nd[m];
+    }
+    
+    for (int m = 0; m < 3; ++ m)
+    {
+        if (s_st[m] > s_ed[m])
+        {
+            int n = sourceToTargetAxisMapping[m];
+            PHSPACE::SWAP(s_st[m], s_ed[m]);
+            PHSPACE::SWAP(t_st[n], t_ed[n]);
+        }
+    }
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        int n = sourceToTargetAxisMapping[m];
+        rate[m] = SignFunction(t_ed[n] - t_st[n]);
+    }
+    
+    vector< vector< int > > &frameOfAxes = this->next->GetFrameOfAxes();
+
+    for (int n = 0; n < 3; ++ n)
+    {
+        int ms = targetToSourceAxisMapping[n];
+        for (int m = 0; m < 3; ++ m)
+        {
+            frameOfAxes[n][m] = rate[m] * unitMatrix[m][ms];
+        }
+    }
+
+    for (int n = 0; n < 3; ++ n)
+    {
+        frameOfAxes[n][3] = t_st[n];
+        for (int m = 0; m < 3; ++ m)
+        {
+            frameOfAxes[n][3] -= frameOfAxes[n][m] * s_st[m];
+        }
+    }
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        if (t_st[m] > t_ed[m])
+        {
+            PHSPACE::SWAP(t_st[m], t_ed[m]);
+        }
+    }
+
+    return;
+}
+
+LIB_EXPORT void Pre_BcFace_Struct::Normalize(int geometricDimension)
+{
+    if ((IsInterface(boundaryType)))
+    {
+        ErectVertexMapping(geometricDimension);
+    }
+    else
+    {
+        for (int m = 0; m < 3; ++ m)
+        {
+            if (nodeStart[m] > nodeEnd[m]) PHSPACE::SWAP(nodeStart[m], nodeEnd[m]);
+        }
+        //axisLabel[0] = GetSurfaceLabel(nodeStart, nodeEnd);
+        axisLabel[0] = bcDirection;
+    }
+}
+
+LIB_EXPORT void Pre_BcFace_Struct::ComputeLocalCoordinate()
+{
+    vector< int > &originalIndex = simpleBlock->GetOriginalIndex();
+    for (int m = 0; m < 3; ++ m)
+    {
+        nodeStart[m] -= originalIndex[m];
+        nodeEnd[m]   -= originalIndex[m];
+    }
+}
+
+LIB_EXPORT void Pre_BcFace_Struct::OutputBoundaryInformation(StructBC *bcregion, int geometricDimension)
+{
+    int imin, imax, jmin, jmax, kmin, kmax, nbt;
+    vector< int > s_st(nodeStart), s_ed(nodeEnd);
+    
+    if (IsInterface(boundaryType))
+    {
+        int patch = axisLabel[1];
+        s_st[patch] = - abs(s_st[patch]);
+        s_ed[patch] = - abs(s_ed[patch]);
+    }
+
+    imin = s_st[0];
+    imax = s_ed[0];
+
+    jmin = s_st[1];
+    jmax = s_ed[1];
+
+    kmin = s_st[2];
+    kmax = s_ed[2];
+
+    bcregion->SetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+    bcregion->SetBCType(boundaryType);
+    bcregion->SetBCName(bcName);
+
+    if (IsInterface(boundaryType))
+    {
+        bcregion->SetBCName("Connection");
+
+        vector< int > t_st(3), t_ed(3);
+        CalculateVertexIndexOnTargetBlock(next->GetFrameOfAxes(), nodeStart, t_st);
+        CalculateVertexIndexOnTargetBlock(next->GetFrameOfAxes(), nodeEnd, t_ed);
+
+        int patch = (next->GetAxisLabel())[1];
+        t_st[patch] = - abs(t_st[patch]);
+        t_ed[patch] = - abs(t_ed[patch]);
+
+        imin = t_st[0];
+        imax = t_ed[0];
+
+        jmin = t_st[1];
+        jmax = t_ed[1];
+
+        kmin = t_st[2];
+        kmax = t_ed[2];
+
+        nbt  = next->GetSimpleBlock()->GetZoneIndex();
+
+        bcregion->SetTargetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+        bcregion->SetTargetRegionBlock(nbt);
+        if (GetDim() == THREE_D)
+        {
+            bcregion->ComputeRelativeParameters();
+        }
+    }
+}
+
+LIB_EXPORT void Pre_BcFace_Struct::OutputBoundaryInformation(fstream &file, int geometricDimension)
+{
+    int width = 8;
+    int imin, imax, jmin, jmax, kmin, kmax, nbt;
+
+    vector< int > s_st(nodeStart), s_ed(nodeEnd);
+
+    if (IsInterface(boundaryType))
+    {
+        int patch = axisLabel[1];
+        s_st[patch] = - abs(s_st[patch]);
+        s_ed[patch] = - abs(s_ed[patch]);
+    }
+
+    imin = s_st[0];
+    imax = s_ed[0];
+
+    jmin = s_st[1];
+    jmax = s_ed[1];
+
+    kmin = s_st[2];
+    kmax = s_ed[2];
+
+    file << setw(width) << imin;
+    file << setw(width) << imax;
+    file << setw(width) << jmin;
+    file << setw(width) << jmax;
+
+    if (geometricDimension == 3)
+    {
+        file << setw(width) << kmin;
+        file << setw(width) << kmax;
+    }
+    file << setw(width) << boundaryType << "\n";
+
+    if (IsInterface(boundaryType))
+    {
+        vector< int > t_st(3), t_ed(3);
+        CalculateVertexIndexOnTargetBlock(next->GetFrameOfAxes(), nodeStart, t_st);
+        CalculateVertexIndexOnTargetBlock(next->GetFrameOfAxes(), nodeEnd, t_ed);
+
+        int patch = (next->GetAxisLabel())[1];
+        t_st[patch] = - abs(t_st[patch]);
+        t_ed[patch] = - abs(t_ed[patch]);
+
+        imin = t_st[0];
+        imax = t_ed[0];
+
+        jmin = t_st[1];
+        jmax = t_ed[1];
+
+        kmin = t_st[2];
+        kmax = t_ed[2];
+
+        nbt = next->GetSimpleBlock()->GetZoneIndex() + 1;
+
+        file << setw(width) << imin;
+        file << setw(width) << imax;
+        file << setw(width) << jmin;
+        file << setw(width) << jmax;
+        if (geometricDimension == 3)
+        {
+            file << setw(width) << kmin;
+            file << setw(width) << kmax;
+        }
+        file << setw(width) << nbt << "\n";
+    }
+}
+
+LIB_EXPORT vector< Pre_BcFace_Struct * > Pre_BcFace_Struct::GetLeaves()
+{
+    vector< Pre_BcFace_Struct * > leaves;
+    if (!child)
+    {
+        leaves.push_back(this);
+        return leaves;
+    }
+
+    uint_t numberOfChildren = child->size();
+    for (int i = 0; i < numberOfChildren; ++ i)
+    {
+        vector< Pre_BcFace_Struct * > cl = (*child)[i]->GetLeaves();
+
+        uint_t numberOfLeaves = cl.size();
+        for (int j = 0; j < numberOfLeaves; ++ j)
+        {
+            leaves.push_back(cl[j]);
+        }
+    }
+
+    return leaves;
+}
+
+void Pre_BcFace_Struct::GetSurfaceDirection(vector< int > &st, vector< int > &ed, vector< int > &nd, int nodeDirection, int geometricDimension)
+{
+    vector< int >(3, -1).swap(nd);
+
+    if (geometricDimension == 3)
+    {
+        for (int m = 0; m < geometricDimension; ++ m)
+        {
+            if (st[m] == ed[m])
+            {
+                nd[0] = m;
+            }
+            else if (st[m] < 0)
+            {
+                nd[1] = m;
+            }
+        }
+    }
+    else
+    {
+        for (int m = 0; m < geometricDimension; ++ m)
+        {
+            if (st[m] == ed[m])
+            {
+                nd[0] = m;
+            }
+            else
+            {
+                nd[1] = m;
+            }
+        }
+    }
+
+    nd[2] = 3 - abs(nd[0]) - abs(nd[1]);
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        if (nd[m] == -1)
+        {
+            cout << "Gridgen boundary file is incorrect!" << endl;
+        }
+    }
+
+    return;
+}
+
+void Pre_BcFace_Struct::InitUnitMatrix()
+{
+    PHSPACE::AllocateVector(unitMatrix, 3, 3);
+    for (int i = 0; i < 3; ++ i)
+    {
+        for (int j = 0; j < 3; ++ j)
+        {
+            if (i == j)
+            {
+                unitMatrix[i][j] = 1;
+            }
+            else
+            {
+                unitMatrix[i][j] = 0;
+            }
+        }
+    }
+    return;
+}
+
+LIB_EXPORT Pre_Patch_Struct::Pre_Patch_Struct()
+{
+    nodeStart.resize(3);
+    nodeEnd.resize(3);
+    axisLabel.resize(3);
+
+    simpleBlock = 0;
+    AllocateVector(frameOfAxes, 3, 4);
+    targetBlockLabel = 0;
+    bcDirection = 0;
+}
+
+LIB_EXPORT Pre_Patch_Struct::~Pre_Patch_Struct()
+{
+
+}
+
+int Pre_Block_Struct::numberOfUnitCells = 1;
+
+LIB_EXPORT Pre_Block_Struct::Pre_Block_Struct()
+{
+    parent = 0;
+    child  = 0;
+
+    originalIndex.resize(3, 0);
+    nodeDimension.resize(3, 1);
+}
+
+LIB_EXPORT Pre_Block_Struct::~Pre_Block_Struct()
+{
+    Free();
+}
+
+LIB_EXPORT void Pre_Block_Struct::Split(RDouble numberOfCells, vector< int > &leftDimension, vector < int > &rightDimension, vector< int > &leftOriginalIndex, vector< int > &rightOriginalIndex)
+{
+    const int geometricDimension = 3;
+    vector< int > faceCellNumber(geometricDimension);
+
+    leftDimension  = this->nodeDimension;
+    rightDimension = this->nodeDimension;
+
+    leftOriginalIndex.resize(geometricDimension, 0);
+    rightOriginalIndex.resize(geometricDimension, 0);
+    
+    for (int iDimension = 0; iDimension < geometricDimension; ++ iDimension)
+    {
+        faceCellNumber[iDimension] = max(nodeDimension[(iDimension+1)%geometricDimension] - 1, 1) * max(nodeDimension[(iDimension+2)%geometricDimension] - 1, 1);
+    }
+
+    int axisSelect = 0, maxNodeNumber = nodeDimension[0];
+    for (int iDimension = 0; iDimension < geometricDimension; ++ iDimension)
+    {
+        if (IsPoleBoundaryFace(iDimension))
+        {
+             continue;
+        }
+  
+        if (maxNodeNumber < nodeDimension[iDimension])
+        {
+            maxNodeNumber = nodeDimension[iDimension];
+            axisSelect    = iDimension;
+        }
+    }
+
+    RDouble dsplit = static_cast< RDouble >(numberOfCells) / faceCellNumber[axisSelect];
+    int usplit = static_cast< int >(floor(dsplit + 0.5)) / numberOfUnitCells;
+    int isplit = 1 + max(usplit, 1) * numberOfUnitCells;
+
+    //For multigrid splitting, it's should be avoid to adjust the split position in the following way.
+    CorrectSplitDimension(axisSelect, numberOfCells, geometricDimension, isplit);
+    
+    leftDimension[axisSelect]      = isplit;
+    rightDimension[axisSelect]     = nodeDimension[axisSelect] - leftDimension[axisSelect] + 1;
+    rightOriginalIndex[axisSelect] = isplit - 1;
+    if (leftDimension[axisSelect] < 5 || rightDimension[axisSelect] < 5)
+    {
+        cout << "Too close splitting point from extreme point!\n";
+    }
+}
+
+void Pre_Block_Struct::CorrectSplitDimension(int axisSelect, RDouble numberOfCells, int geometricDimension, int &isplit)
+{
+
+    //vector< int > leftDimension (geometricDimension);
+    //vector< int > rightDimension(geometricDimension);
+    //vector< int > faceCellNumber(geometricDimension);
+
+    uint_t numberOfBoundaryFaces = boundaryFaceList.size();
+    for (int iBoundaryFace = 0; iBoundaryFace < numberOfBoundaryFaces; ++ iBoundaryFace)
+    {
+        if (axisSelect != boundaryFaceList[iBoundaryFace]->GetDirection())
+        {
+            vector< int > s_st = boundaryFaceList[iBoundaryFace]->GetNodeStart();
+            vector< int > s_ed = boundaryFaceList[iBoundaryFace]->GetNodeEnd();
+            if (s_st[axisSelect] < isplit && isplit - s_st[axisSelect] < 3)
+            {
+                if (isplit == s_ed[axisSelect])
+                {
+                    continue;
+                }
+                cout << "Too close splitting point in surface boundary point!\n";
+                isplit = s_st[axisSelect];
+            }
+
+            if (isplit < s_ed[axisSelect] && s_ed[axisSelect] - isplit < 3)
+            {
+                if (isplit == s_st[axisSelect])
+                {
+                    continue;
+                }
+                cout << "Too close splitting point in surface boundary point!\n";
+                isplit = s_ed[axisSelect];
+            }
+        }
+    }
+}
+
+bool Pre_Block_Struct::IsOverlapBoundaryFace(vector< int > &st, vector< int > &ed, int geometricDimension)
+{
+    int count = 0;
+    for (int m = 0; m < 3; ++ m)
+    {
+        if (st[m] > ed[m])
+        {
+            return false;
+        }
+
+        if (st[m] == ed[m])
+        {
+            ++ count;
+        }
+    }
+
+    if (geometricDimension == 3)
+    {
+        if (count < 2)
+        {
+            return true;
+        }
+        else
+        {
+            return false;
+        }
+    }
+    else
+    {
+        if (count < 3)
+        {
+            return true;
+        }
+        else
+        {
+            return false;
+        }
+    }
+}
+
+bool Pre_Block_Struct::IsPoleBoundaryFace(int iDimension)
+{
+    using namespace GRIDGEN_SPACE;
+    uint_t numberOfBoundaryFaces = this->boundaryFaceList.size();
+    for (int iBoundaryFace = 0; iBoundaryFace < numberOfBoundaryFaces; ++ iBoundaryFace)
+    {
+        int boundaryType = boundaryFaceList[iBoundaryFace]->GetBoundaryType();
+        if (boundaryType / 10 == POLE && boundaryType - 71 == iDimension)
+        {
+            return true;
+        }
+    }
+
+    return false;
+}
+
+LIB_EXPORT void Pre_Block_Struct::CreateBoundaryFace(int geometricDimension)
+{
+    uint_t numberOfBoundaryFaces = parent->boundaryFaceList.size();
+    for (int i = 0; i < numberOfBoundaryFaces; ++ i)
+    {
+        Pre_BcFace_Struct *boundaryFace = parent->boundaryFaceList[i];
+        CreateBoundaryFace(boundaryFace, geometricDimension);
+    }
+    return;
+}
+
+LIB_EXPORT void Pre_Block_Struct::NormalizeBoundaryFace(int geometricDimension)
+{
+    uint_t numberOfBoundaryFaces = this->boundaryFaceList.size();
+    for (int i = 0; i < numberOfBoundaryFaces; ++ i)
+    {
+        boundaryFaceList[i]->Normalize(geometricDimension);
+    }
+    return;
+}
+
+LIB_EXPORT void Pre_Block_Struct::CalculateNumberOfUnitCells(int numberOfMultigrid)
+{
+    RDouble units = floor(pow(2.0, numberOfMultigrid - 1) + 0.5);
+    Pre_Block_Struct::numberOfUnitCells = static_cast< int >(units);
+    return;
+}
+
+LIB_EXPORT void Pre_Block_Struct::GenerateCoordinateSpace()
+{
+    int numberOfNodes = ni * nj * nk;
+
+    x.resize(numberOfNodes);
+    y.resize(numberOfNodes);
+    z.resize(numberOfNodes);
+
+    return;
+}
+
+Pre_BcFace_Struct * Pre_Block_Struct::GetOverlapBoundaryFace(vector< int > &st, vector< int > &ed, vector< int > &st_ref, vector< int > &ed_ref, int geometricDimension)
+{
+    int sourceSurfaceLabel = GetSurfaceLabel(st    , ed   );
+    int targetSurfaceLabel = GetSurfaceLabel(st_ref, ed_ref);
+
+    if (sourceSurfaceLabel != targetSurfaceLabel) return 0;
+
+    if (st[sourceSurfaceLabel] != st_ref[sourceSurfaceLabel]) return 0;
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        int smin = min(st[m], ed[m]);
+        int smax = max(st[m], ed[m]);
+
+        if (smin > ed_ref[m] || smax < st_ref[m]) return 0;
+    }
+
+    vector< int > st_cross(3), ed_cross(3);
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        st_cross[m] = max(st[m], st_ref[m]);
+        ed_cross[m] = min(ed[m], ed_ref[m]);
+    }
+
+    if (IsOverlapBoundaryFace(st_cross, ed_cross, geometricDimension))
+    {
+        Pre_BcFace_Struct *boundaryFace = new Pre_BcFace_Struct();
+        boundaryFace->SetRegion(st_cross, ed_cross);
+        return boundaryFace;
+    }
+
+    return 0;
+}
+
+void Pre_Block_Struct::PatchChild(vector< int > &t_st, vector< int > &t_ed, Pre_Block_Struct *sourceBlock, int geometricDimension)
+{
+    uint_t numberOfBoundaryFaces = boundaryFaceList.size();
+    for (int i = 0; i < numberOfBoundaryFaces; ++ i)
+    {
+        if (boundaryFaceList[i]->GetBoundaryType() >= 0) continue;
+
+        Pre_BcFace_Struct *boundaryFace = GetOverlapBoundaryFace(boundaryFaceList[i]->GetNodeStart(), boundaryFaceList[i]->GetNodeEnd(), t_st, t_ed, geometricDimension);
+
+        boundaryFace = NULL;
+        
+        if (PatchChild(boundaryFaceList[i], t_st, t_ed, sourceBlock, geometricDimension)) return;
+    }
+}
+
+bool Pre_Block_Struct::PatchChild(Pre_BcFace_Struct *boundaryFace, vector< int > &t_st, vector< int > &t_ed, Pre_Block_Struct *sourceBlock, int geometricDimension)
+{
+    Pre_BcFace_Struct *overlapBoundaryFace = GetOverlapBoundaryFace(boundaryFace->GetNodeStart(), boundaryFace->GetNodeEnd(), t_st, t_ed, geometricDimension);
+
+    if (!overlapBoundaryFace) return false;
+
+    if (boundaryFace->GetChild())
+    {
+        uint_t numberOfChildren = boundaryFace->GetChild()->size();
+        for (int i = 0; i < numberOfChildren; ++ i)
+        {
+            Pre_BcFace_Struct *cbc = (* boundaryFace->GetChild())[i];
+            if (PatchChild(cbc, t_st, t_ed, sourceBlock, geometricDimension)) return true;
+        }
+    }
+    else
+    {
+        boundaryFace->SetChild(new vector< Pre_BcFace_Struct * >());
+    }
+
+    boundaryFace->GetChild()->push_back(overlapBoundaryFace);
+
+    overlapBoundaryFace->SetBoundaryType(-1);
+    overlapBoundaryFace->SetSimpleBlock(boundaryFace->GetSimpleBlock());
+    overlapBoundaryFace->SetAxisLabel(boundaryFace->GetAxisLabel());
+
+    overlapBoundaryFace->SetNext(new Pre_Patch_Struct());
+    Pre_Patch_Struct *simplePatch = overlapBoundaryFace->GetNext();
+
+    simplePatch->SetSimpleBlock(sourceBlock);
+    simplePatch->SetNodeMapping(boundaryFace->GetNext()->GetFrameOfAxes());
+
+    simplePatch->SetAxisLabel(boundaryFace->GetNext()->GetAxisLabel());
+
+    vector< vector< int > > &frameOfAxes = simplePatch->GetFrameOfAxes();
+    for (int m = 0; m < 3; ++ m)
+    {
+        frameOfAxes[m][3] -= sourceBlock->originalIndex[m];
+    }
+
+    return true;
+}
+
+void Pre_Block_Struct::PatchSplit(Pre_BcFace_Struct *boundaryFace, Pre_BcFace_Struct *overlapBoundaryFace, int geometricDimension)
+{
+    if (!IsInterface(overlapBoundaryFace->GetBoundaryType())) return;
+
+    Pre_Patch_Struct *simplePatch = new Pre_Patch_Struct();
+    overlapBoundaryFace->SetNext(simplePatch);
+
+    simplePatch->SetSimpleBlock(boundaryFace->GetNext()->GetSimpleBlock());
+    simplePatch->SetAxisLabel(boundaryFace->GetNext()->GetAxisLabel());
+    simplePatch->SetNodeMapping(boundaryFace->GetNext()->GetFrameOfAxes());
+
+    vector< vector< int > > &frameOfAxes = simplePatch->GetFrameOfAxes();
+    for (int m = 0; m < 3; ++ m)
+    {
+        for (int n = 0; n < 3; ++ n)
+        {
+            frameOfAxes[m][3] += frameOfAxes[m][n] * this->originalIndex[n];
+        }
+    }
+
+    vector< int > t_st(3), t_ed(3);
+    PHSPACE::CalculateVertexIndexOnTargetBlock(simplePatch->GetFrameOfAxes(), overlapBoundaryFace->GetNodeStart(), t_st);
+    PHSPACE::CalculateVertexIndexOnTargetBlock(simplePatch->GetFrameOfAxes(), overlapBoundaryFace->GetNodeEnd()  , t_ed);
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        if (t_st[m] > t_ed[m]) PHSPACE::SWAP(t_st[m], t_ed[m]);
+    }
+
+    Pre_Block_Struct *targetBlock = simplePatch->GetSimpleBlock();
+
+    targetBlock->PatchChild(t_st, t_ed, this, geometricDimension);
+
+    return;
+}
+
+void Pre_Block_Struct::GetAbsoluteCoordinate(vector< int > &st, vector< int > &ed)
+{
+    for (int m = 0; m < 3; ++ m)
+    {
+        st[m] = originalIndex[m] + 1;
+        ed[m] = originalIndex[m] + nodeDimension[m];
+    }
+    return;
+}
+
+void Pre_Block_Struct::GetLocalCoordinate(vector< int > &st, vector< int > &ed, vector< int > &local_st, vector< int > &local_ed)
+{
+    for (int m = 0; m < 3; ++ m)
+    {
+        local_st[m] = st[m] - originalIndex[m];
+        local_ed[m] = ed[m] - originalIndex[m];
+    }
+    return;
+}
+
+void Pre_Block_Struct::OutputBoundaryInformation(fstream &file, int geometricDimension)
+{
+    int width = 8;
+    vector< Pre_BcFace_Struct * > leafBoundaryFace;
+
+    uint_t numberOfBoundaryFaces = boundaryFaceList.size();
+    for (int i = 0; i < numberOfBoundaryFaces; ++ i)
+    {
+        vector< Pre_BcFace_Struct * > cl = boundaryFaceList[i]->GetLeaves();
+        uint_t numberOfLeaves = cl.size();
+        for (int j = 0; j < numberOfLeaves; ++ j)
+        {
+            leafBoundaryFace.push_back(cl[j]);
+        }
+    }
+
+    file << setw(width) << leafBoundaryFace.size() << endl;
+
+    uint_t numberOfLeafBoundaryFaces = leafBoundaryFace.size();
+    for (int i = 0; i < numberOfLeafBoundaryFaces; ++ i)
+    {
+        leafBoundaryFace[i]->OutputBoundaryInformation(file, geometricDimension);
+    }
+
+    return;
+}
+
+void Pre_Block_Struct::GetRootInformation(Pre_Block_Struct *&root, vector< int > &ref)
+{
+    for (int m = 0; m < 3; ++ m)
+    {
+        ref[m] += this->originalIndex[m];
+    }
+
+    if (this->parent)
+    {
+        parent->GetRootInformation(root, ref);
+    }
+    else
+    {
+        root = this;
+    }
+
+    return;
+}
+
+void Pre_Block_Struct::GenerateBoundaryFaceList(int numberOfBoundaryFaces)
+{
+    boundaryFaceList.resize(numberOfBoundaryFaces);
+
+    return;
+}
+
+void Pre_Block_Struct::WriteGridCoordinate(fstream &file, vector< int > &nst, vector< int > &ned)
+{
+    vector< RDouble * > s(3, NULL);
+
+    s[0] = this->GetX();
+    s[1] = this->GetY();
+    s[2] = this->GetZ();
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        for (int k = nst[2]-1; k < ned[2]; ++ k)
+        {
+            for (int j = nst[1]-1; j < ned[1]; ++ j)
+            {
+                for (int i = nst[0]-1; i < ned[0]; ++ i)
+                {
+                    int id = ni * nj * k + ni * j + i;
+
+                    PHSPACE::PHWrite(file, s[m][id]);
+                }
+            }
+        }
+    }
+    return;
+}
+
+void Pre_Block_Struct::Free()
+{
+    if (child)
+    {
+        uint_t numberOfChildren = child->size();
+        for (int i = 0; i < numberOfChildren; ++ i)
+        {
+            (*child)[i]->Free();
+        }
+        delete child;
+    }
+
+    uint_t numberOfBoundaryFaces = boundaryFaceList.size();
+    for (int i = 0; i < numberOfBoundaryFaces; ++ i)
+    {
+        delete boundaryFaceList[i];
+    }
+
+    return;
+}
+
+void Pre_Block_Struct::CreateBoundaryFace(Pre_BcFace_Struct *boundaryFace, int geometricDimension)
+{
+    if (!boundaryFace->GetChild())
+    {
+        vector< int > bst(3), bed(3);
+        GetAbsoluteCoordinate(bst, bed);
+
+        vector< int > ref_st(3), ref_ed(3);
+        for (int m = 0; m < 6; ++ m)
+        {
+            PHSPACE::GetIJKRegion(bst, bed, ref_st, ref_ed, m);
+            Pre_BcFace_Struct *overlapBoundaryFace = GetOverlapBoundaryFace(boundaryFace->GetNodeStart(), boundaryFace->GetNodeEnd(), ref_st, ref_ed, geometricDimension);
+            GerneralSplit(boundaryFace, overlapBoundaryFace, geometricDimension);
+        }
+    }
+    else
+    {
+        uint_t numberOfChildren = boundaryFace->GetChild()->size();
+        for (int i = 0; i < numberOfChildren; ++ i)
+        {
+            CreateBoundaryFace((*boundaryFace->GetChild())[i], geometricDimension);
+        }
+    }
+    return;
+}
+
+void Pre_Block_Struct::GerneralSplit(Pre_BcFace_Struct *boundaryFace, Pre_BcFace_Struct *overlapBoundaryFace, int geometricDimension)
+{
+    if (!overlapBoundaryFace) return;
+
+    boundaryFaceList.push_back(overlapBoundaryFace);
+    overlapBoundaryFace->SetBoundaryType(boundaryFace->GetBoundaryType());
+    overlapBoundaryFace->SetBoundaryName(boundaryFace->GetBoundaryName());
+    overlapBoundaryFace->SetSimpleBlock(this);
+
+    overlapBoundaryFace->ComputeLocalCoordinate();
+    overlapBoundaryFace->SetAxisLabel(boundaryFace->GetAxisLabel());
+
+    if (overlapBoundaryFace->GetBoundaryType() < 0)
+    {
+        PatchSplit(boundaryFace, overlapBoundaryFace, geometricDimension);
+    }
+
+    return;
+}
+
+int GetSurfaceLabel(vector< int > &st, vector< int > &ed)
+{
+    for (int m = 0; m < 3; ++ m)
+    {
+        if (st[m] == ed[m]) return m;
+    }
+    return -1;
+}
+
+int SignFunction(int value)
+{
+    if (value < 0)
+    {
+        return -1;
+    }
+    else
+    {
+        return 1;
+    }
+}
+
+void CalculateVertexIndexOnTargetBlock(vector< vector< int > > &frameOfAxes, vector< int > &p1, vector< int > &p2)
+{
+    for (int m = 0; m < 3; ++ m)
+    {
+        p2[m] = frameOfAxes[m][3];
+    }
+
+    for (int m = 0; m < 3; ++ m)
+    {
+        for (int n = 0; n < 3; ++ n)
+        {
+            p2[m] += frameOfAxes[m][n] * p1[n];
+        }
+    }
+}
+
+void GetIJKRegion(vector< int > &blockNodeStart, vector< int > &blockNodeEnd, vector< int > &faceNodeStart, vector< int > &faceNodeEnd, int localFaceLabel)
+{
+    faceNodeStart = blockNodeStart;
+    faceNodeEnd   = blockNodeEnd;
+
+    int axisLabel = localFaceLabel / 2, priority = localFaceLabel % 2;
+    if (priority == 0)
+    {
+        faceNodeEnd[axisLabel] = faceNodeStart[axisLabel];
+    }
+    else
+    {
+        faceNodeStart[axisLabel] = faceNodeEnd[axisLabel];
+    }
+
+    return;
+}
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/src/Pre_CGNSConversion_Struct.cpp b/API/PreProcess/src/Pre_CGNSConversion_Struct.cpp
new file mode 100644
index 0000000..886d6cd
--- /dev/null
+++ b/API/PreProcess/src/Pre_CGNSConversion_Struct.cpp
@@ -0,0 +1,605 @@
+#include "Pre_CGNSConversion_Struct.h"
+#include "Pre_GridBase.h"
+#include "TK_Exit.h"
+
+namespace PHSPACE
+{
+LIB_EXPORT Pre_CGNSConversion_Struct::Pre_CGNSConversion_Struct(const string &gridFileName) : 
+        Pre_GridConversion(gridFileName)
+{
+    Str_CGNS_Data = 0;
+}
+
+LIB_EXPORT Pre_CGNSConversion_Struct::~Pre_CGNSConversion_Struct()
+{
+    delete Str_CGNS_Data;
+}
+
+void Pre_CGNSConversion_Struct::ReadGrid()
+{
+    int fileid = 0, baseid = 0, nbases = 0;
+    int CellDim = 0, PhyDim = 0;
+    int nfamililies = 0, nFambc = 0, nGeo = 0;
+    int normalIndex[3] = {0}, nDataSet = 0;
+    char_33 basename, coordname, bocoName;
+    char_33 *familynames, famBCName;
+    cgsize_t isize[3][3], nPoints, normListFlag;
+    BCType_t *fambctype;
+    PointSetType_t ptsetType;
+    ZoneType_t zone_type;
+    DataType_t dataType;
+    DataType_t normDataType;
+    int ier = 0;
+
+    int omitRepeatInterface = 1;
+    if (GlobalDataBase::IsExist("omitRepeatInterface", PHINT, 1))
+    {
+        omitRepeatInterface = GlobalDataBase::GetIntParaFromDB("omitRepeatInterface");
+    }
+
+    string &cgnsfile = gridFileName;
+    cout << "    CGNS file name: " << cgnsfile << "\n";
+
+    //! Open the CGNS for reading and check if the file was found.
+    if (cg_open(cgnsfile.c_str(), CG_MODE_READ, &fileid) != CG_OK)
+    {
+        TK_Exit::ExceptionExit(cg_get_error());
+    }
+
+    //! Determine the number of bases in the grid
+    cg_nbases(fileid, &nbases);
+
+    if (nbases > 1) 
+    {
+        TK_Exit::ExceptionExit("Cannot deal this situation! nbase > 1\n");
+    }
+
+    baseid = 1;
+    //! Check the cell and physical dimensions of the bases.
+    cg_base_read(fileid, baseid, basename, &CellDim, &PhyDim);
+
+    //! Determine the number of FamilyBC in the grid
+    cg_nfamilies(fileid, baseid, &nfamililies);
+    fambctype   = new BCType_t[nfamililies];
+    familynames = new char_33 [nfamililies];
+
+    if (nfamililies > 0)
+    {
+        for (int fam = 1; fam <= nfamililies; ++ fam)
+        {
+            fambctype[fam-1] = BCTypeNull;
+            cg_family_read(fileid, baseid, fam, familynames[fam-1], &nFambc, &nGeo);
+            cg_fambc_read(fileid, baseid, fam, 1, famBCName, &fambctype[fam-1]);
+        }
+    }
+
+    //! Read the number of zones in the grid.
+    cg_nzones(fileid, baseid, &nBlocks);
+    cout << "	Block number = " << nBlocks << endl;
+    Str_CGNS_Data = new CGNS_Str_Data(nBlocks);
+
+    for (int iZone = 1; iZone <= nBlocks; ++ iZone)
+    {
+        BaseData *base_cgns = Str_CGNS_Data->GetBaseData(iZone-1);
+
+        //! Determine the number and names of the coordinates.
+        base_cgns->SetNCoords(CellDim);
+
+        char_33 *zonenames = new char_33 [1];
+        base_cgns->SetZonenames(zonenames);
+
+        cg_zone_type(fileid, baseid, iZone, &zone_type);
+        if (zone_type == Unstructured)
+        {
+            TK_Exit::ExceptionExit("Error: the input CGNS mesh must be STRUCTURED type!");
+        }
+
+        cg_zone_read(fileid, baseid, iZone, zonenames[0], isize[0]);
+
+        char_33 zonename;
+        cg_zone_read(fileid, baseid, iZone, zonename, isize[0]);
+
+        //! Import i��j��k direction information.
+        cgsize_t idim = isize[0][0];
+        cgsize_t jdim = isize[0][1];
+        cgsize_t kdim = 1;
+
+        if (CellDim ==3)
+        {
+            kdim = isize[0][2];
+        }
+
+        base_cgns->SetIdim(static_cast<int>(idim));
+        base_cgns->SetJdim(static_cast<int>(jdim));
+        base_cgns->SetKdim(static_cast<int>(kdim));
+
+        cgsize_t irmin[3] = {0}, irmax[3] = {0};
+
+        //! lower range index
+        irmin[0] = 1;
+        irmin[1] = 1;
+        irmin[2] = 1;
+
+        //! upper range index of vertices
+        irmax[0] = idim;
+        irmax[1] = jdim;
+        irmax[2] = kdim;
+
+        RDouble ***x = NewPointer3< RDouble >(static_cast<int>(kdim), static_cast<int>(jdim), static_cast<int>(idim));
+        RDouble ***y = NewPointer3< RDouble >(static_cast<int>(kdim), static_cast<int>(jdim), static_cast<int>(idim));
+        RDouble ***z = NewPointer3< RDouble >(static_cast<int>(kdim), static_cast<int>(jdim), static_cast<int>(idim));
+        base_cgns->SetX(x);
+        base_cgns->SetY(y);
+        base_cgns->SetZ(z);
+
+        int icoor = 0;
+        cg_coord_info(fileid, baseid, iZone, icoor+1,  &dataType, coordname);
+        cg_coord_read(fileid, baseid, iZone, coordname, dataType, irmin, irmax, **x);
+        cg_coord_info(fileid, baseid, iZone, icoor+2,  &dataType, coordname);
+        cg_coord_read(fileid, baseid, iZone, coordname, dataType, irmin, irmax, **y);
+        if (CellDim == 3)
+        {
+            cg_coord_info(fileid, baseid, iZone, icoor+3,  &dataType, coordname);
+            cg_coord_read(fileid, baseid, iZone, coordname, dataType, irmin, irmax, **z);
+        }
+
+        //! Read the Connectivity information
+        int nBCRegions, n1to1;
+        cg_goto  (fileid, baseid, "Zone_t", iZone, "ZoneBC_t", 1, "end");
+        cg_nbocos(fileid, baseid, iZone, &nBCRegions);
+        base_cgns->SetNBCRegions(nBCRegions);
+
+        cg_n1to1(fileid, baseid, iZone, &n1to1);
+        char_33 *connectname = new char_33 [n1to1]();
+        char_33 *donorname   = new char_33 [n1to1]();
+        base_cgns->SetConnectname(connectname);
+        base_cgns->SetDonorname(donorname);
+
+        int mark = 0;
+        int make_edge = 0;
+
+        //! Determine the number of interface repeats.
+        for (int one21 = 1; one21 <= n1to1; ++ one21)
+        {
+            cgsize_t srange[6], donor_range[6];
+            int transform[3];
+            cg_1to1_read(fileid, baseid, iZone, one21, connectname[one21-1], donorname[one21-1], srange, donor_range, transform);
+            if (strcmp(zonename, donorname[one21-1]) == 0)
+            {
+                mark ++;
+            }
+        }
+
+        int nInterfaceBCRegions = n1to1;
+        if (CellDim == 3 && n1to1 > 2)
+        {
+            //! CGNS Grid with more than 2 interfaces.
+            if (omitRepeatInterface == 1)
+            {
+                nInterfaceBCRegions = n1to1 - mark/2;
+            }
+        }
+        base_cgns->SetN1to1(nInterfaceBCRegions);
+
+        int      *lab1       = new int     [nBCRegions]();
+        string   *bcName     = new string  [nBCRegions]();
+        char_33  *familyName = new char_33 [nBCRegions]();
+        BCType_t *bocoType   = new BCType_t[nBCRegions]();
+        cgsize_t_60000 *pnts = new cgsize_t_60000[nBCRegions]();
+
+        base_cgns->SetLab1(lab1);
+        base_cgns->SetBocoType(bocoType);
+        base_cgns->SetFamilyName(familyName);
+        base_cgns->SetPnts(pnts);
+        base_cgns->SetBcName(bcName);
+
+        //! Read boundary condition information
+        for (int boco = 0; boco < nBCRegions; ++ boco)
+        {
+            ier = cg_goto(fileid, baseid, "Zone_t", iZone, "ZoneBC_t", 1, "BC_t", boco+1, "end");
+            cg_boco_info(fileid, baseid, iZone, boco+1, bocoName, &bocoType[boco], &ptsetType, &nPoints, &normalIndex[0], 
+                         &normListFlag, &normDataType, &nDataSet);
+            cg_boco_read(fileid, baseid, iZone, boco+1, pnts[boco], NULL);
+
+            int make_edge_judge = 0;
+            for (int nrange = 0; nrange < 3; ++ nrange)
+            {
+                if ((pnts[boco][nrange] - pnts[boco][nrange+3]) == 0)
+                {
+                    make_edge_judge ++;
+                }
+            }
+
+            if (make_edge_judge >= 2)
+            {
+                make_edge = make_edge + 1;
+            }
+
+            cg_famname_read(familyName[boco]);
+
+            if (make_edge_judge >= 2)
+            {
+                continue;
+            }
+
+            //! Set BCtypeName;
+            bcName[boco] = BCTypeName[bocoType[boco]];
+            if (nfamililies > 0)
+            {
+                for (int fam = 1; fam <= nfamililies; ++ fam)
+                {
+                    if (strcmp(familyName[boco], familynames[fam - 1]) == 0)
+                    {
+                        bocoType[boco] = fambctype[fam-1];
+                        bcName[boco] = familyName[boco];
+                        break;
+                    }
+                }
+            }
+
+            BaseBCType *bc_convert = new BaseBCType();
+            lab1[boco] = bc_convert->GetBCType(bocoType[boco]);
+
+            if (strcmp(BCTypeName[bocoType[boco]], "BCDegenerateLine") == 0)
+            {
+                if (CellDim == 3)
+                {
+                    RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+                    int iMin = static_cast<int>(pnts[boco][0]) - 1;
+                    int jMin = static_cast<int>(pnts[boco][1]) - 1;
+                    int kMin = static_cast<int>(pnts[boco][2]) - 1;
+                    int iMax = static_cast<int>(pnts[boco][3]) - 1;
+                    int jMax = static_cast<int>(pnts[boco][4]) - 1;
+                    int kMax = static_cast<int>(pnts[boco][5]) - 1;
+                    RDouble dx = abs(x[kMin][jMin][iMin] - x[kMin][jMin][iMax]) * gridScaleFactor;
+                    RDouble dy = abs(y[kMin][jMin][iMin] - y[kMin][jMin][iMax]) * gridScaleFactor;
+                    RDouble dz = abs(z[kMin][jMin][iMin] - z[kMin][jMin][iMax]) * gridScaleFactor;
+                    if ((dx+dy+dz) < SMALL && pnts[boco][0] != pnts[boco][3])
+                    {
+                        lab1[boco] = 71;
+                    }
+                    
+                    dx = abs(x[kMin][jMin][iMin] - x[kMin][jMax][iMin]) * gridScaleFactor;
+                    dy = abs(y[kMin][jMin][iMin] - y[kMin][jMax][iMin]) * gridScaleFactor;
+                    dz = abs(z[kMin][jMin][iMin] - z[kMin][jMax][iMin]) * gridScaleFactor;
+                    if ((dx+dy+dz) < SMALL && pnts[boco][1] != pnts[boco][4])
+                    {
+                        lab1[boco] = 72;
+                    }
+                    
+                    dx = abs(x[kMin][jMin][iMin] - x[kMax][jMin][iMin]) * gridScaleFactor;
+                    dy = abs(y[kMin][jMin][iMin] - y[kMax][jMin][iMin]) * gridScaleFactor;
+                    dz = abs(z[kMin][jMin][iMin] - z[kMax][jMin][iMin]) * gridScaleFactor;
+                    if ((dx+dy+dz) < SMALL && pnts[boco][2] != pnts[boco][5]) 
+                    {
+                        lab1[boco] = 73;
+                    }
+                }
+                else
+                {
+                    lab1[boco] = 71;
+                }
+            }
+        }
+
+        //! Determine the number of interface connectivity entries.
+        int nconnect;
+        if (CellDim == 3)
+        {
+            nconnect = nBCRegions + nInterfaceBCRegions - make_edge;
+        }
+        else
+        {
+            nconnect = nBCRegions + nInterfaceBCRegions;
+        }
+        base_cgns->SetNconnect(nconnect);
+
+        //! Zone Connectivity
+        ier = cg_goto(fileid, baseid, "Zone_t", iZone, "ZoneGridConnectivity_t", 1, "GridConnectivity1to1_t", 1, "end");
+        base_cgns->SetIer(ier);
+
+        int lab2 = 0;
+        if (CellDim == 3)
+        {
+            base_cgns->ResizeRange(nInterfaceBCRegions - make_edge);
+        }
+        else
+        {
+            base_cgns->ResizeRange(nInterfaceBCRegions);
+        }
+
+        if (ier == CG_OK)
+        {
+            int count = 0;
+
+            for (int one21 = 1; one21 <= n1to1; ++ one21)
+            {
+                int transform[3] = {0};
+
+                int *b = new int [3]();
+                cgsize_t *srange, *donor_range;
+                srange = new cgsize_t [6]();
+                donor_range = new cgsize_t [6]();
+
+                cg_1to1_read(fileid, baseid, iZone, one21, connectname[one21-1], donorname[one21-1], srange, donor_range, transform);
+
+                base_cgns->SetSrange(srange, count);
+                base_cgns->SetDonor_range(donor_range, count);
+
+                for (int zoneid = 1; zoneid <= nBlocks; ++ zoneid)
+                {
+                    cg_zone_read(fileid, baseid, zoneid, zonename, isize[0]);
+                    if (strcmp(zonename, donorname[one21-1]) == 0)
+                    {
+                        lab2 = zoneid;
+                        break;
+                    }
+                }
+
+                if (omitRepeatInterface == 1)
+                {
+                    if (lab2 == iZone)
+                    {
+                        string connectname1 = connectname[one21-1];
+                        if (strcmp(connectname1.substr(0,14).c_str(), "1to1InterfaceB") == 0 && CellDim == 3)
+                        {
+                            continue;
+                        }
+                    }
+                }
+
+                uint_t idcmp1;
+                uint_t idcmp2;
+                if (CellDim == 3)
+                {
+                    if (srange[0] == srange[3])
+                    {
+                        idcmp1 = abs(srange[1] - srange[4]);
+                        idcmp2 = abs(srange[2] - srange[5]);
+                        if (idcmp1 < idcmp2) 
+                        {
+                            b[0] =  1;
+                            b[1] = -1;
+                            b[2] =  1;
+                        }
+                        else
+                        {
+                            b[0] =  1;
+                            b[1] =  1;
+                            b[2] = -1;
+                        }
+                    }
+                    else if (srange[1] == srange[4])
+                    {
+                        idcmp1 = abs(srange[2] - srange[5]);
+                        idcmp2 = abs(srange[0] - srange[3]);
+                        if (idcmp1 < idcmp2) 
+                        {
+                            b[0] =  1;
+                            b[1] =  1;
+                            b[2] = -1;
+                        }
+                        else
+                        {
+                            b[0] = -1;
+                            b[1] =  1;
+                            b[2] =  1;
+                        }
+                    }
+                    else if (srange[2] == srange[5])
+                    {
+                        idcmp1 = abs(srange[0] - srange[3]);
+                        idcmp2 = abs(srange[1] - srange[4]);
+                        if (idcmp1 < idcmp2)
+                        {
+                            b[0] = -1;
+                            b[1] =  1;
+                            b[2] =  1;
+                        }
+                        else
+                        {
+                            b[0] =  1;
+                            b[1] = -1;
+                            b[2] =  1;
+                        }
+                    }
+                }
+                else
+                {
+                    if (srange[0] == srange[2])
+                    {
+                        b[0] =  1;
+                        b[1] = -1;
+                    }
+                    else if (srange[1] == srange[3])
+                    {
+                        b[0] =  -1;
+                        b[1] =  1;
+                    }
+                }
+
+                int *vt = new int[3]();
+                base_cgns->SetVt(vt, count);
+                base_cgns->SetB(b, count);
+
+                tram(transform, b, vt, CellDim);
+
+                base_cgns->SetLab2(lab2, count);
+                ++ count;
+
+            }
+        }
+    }
+    delete [] familynames;    familynames = NULL;
+    delete [] fambctype;    fambctype = NULL;
+    cg_close(fileid);
+}
+
+void Pre_CGNSConversion_Struct::ResetGridScaleAndTranslate()
+{
+    RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+    RDouble *gridTranslationVector = new RDouble[3]();
+    if (GlobalDataBase::IsExist("gridTranslationVector", PHDOUBLE, 3))
+    {
+        GlobalDataBase::GetData("gridTranslationVector", gridTranslationVector, PHDOUBLE, 3);
+    }
+
+    if (abs(gridTranslationVector[0]) < SMALL)
+    {
+        if (abs(gridTranslationVector[1]) < SMALL)
+        {
+            if (abs(gridTranslationVector[2]) < SMALL)
+            {
+                if (!(abs(gridScaleFactor - 1.0) > SMALL))
+                {
+                    return;
+                }
+            }
+        }
+    }
+
+    for (int iZone = 1; iZone <= nBlocks; ++ iZone)
+    {
+        BaseData *base_cgns = Str_CGNS_Data->GetBaseData(iZone-1);
+
+        int nCoords =base_cgns->GetNCoords();
+
+        int idim = base_cgns->GetIdim();
+        int jdim = base_cgns->GetJdim();
+        int kdim = base_cgns->GetKdim();
+
+        RDouble ***x = base_cgns->GetX();
+        RDouble ***y = base_cgns->GetY();
+        RDouble ***z = base_cgns->GetZ();
+
+        for (int k = 0; k < kdim; ++ k)
+        {
+            for (int j = 0; j < jdim; ++ j)
+            {
+                for (int i = 0; i < idim; ++ i)
+                {
+                    x[k][j][i] *= gridScaleFactor;
+                    x[k][j][i] += gridTranslationVector[0];
+                }
+            }
+        }
+
+        for (int k = 0; k < kdim; ++ k)
+        {
+            for (int j = 0; j < jdim; ++ j)
+            {
+                for (int i = 0; i < idim; ++ i)
+                {
+                    y[k][j][i] *= gridScaleFactor;
+                    y[k][j][i] += gridTranslationVector[1];
+                }
+            }
+        }
+
+        for (int k = 0; k < kdim; ++ k)
+        {
+            for (int j = 0; j < jdim; ++ j)
+            {
+                for (int i = 0; i < idim; ++ i)
+                {
+                    if (nCoords == 2) z[k][j][i] = 0.0;
+                    z[k][j][i] *= gridScaleFactor;
+                    if (nCoords == 3) z[k][j][i] += gridTranslationVector[2];
+                }
+            }
+        }
+    }
+}
+
+void Pre_CGNSConversion_Struct::tram(int *a, int *b, int *v, int nCoords)
+{
+    int t[3][3];
+    int i, j;
+    for (i = 0; i < nCoords; ++ i)
+    {
+        v[i] = 0;
+        for (j = 0; j < nCoords; ++ j)
+        {
+            t[i][j] = del(a[j], i+1);
+            v[i] = v[i] + t[i][j] * b[j];
+        }
+    }
+
+    return;
+}
+
+int Pre_CGNSConversion_Struct::del(int x, int y)
+{
+    if (ABS(x) == ABS(y))
+    {
+        return 1;
+    }
+    return 0;
+}
+
+CGNS_Str_Data::CGNS_Str_Data(int nzones_in)
+{
+    this->nzones = nzones_in;
+    base_cgns = new BaseData *[nzones_in];
+    for (int iZone = 0; iZone < nzones; ++ iZone)
+    {
+        base_cgns[iZone] = new BaseData();
+    }
+}
+
+CGNS_Str_Data::~CGNS_Str_Data(void)
+{
+    delete [] base_cgns;
+}
+
+BaseData::BaseData(void)
+{
+    nCoords     = 0;
+    idim        = 0;
+    jdim        = 0;
+    kdim        = 0;
+    nconnect    = 0;
+    nBCRegions  = 0;
+    n1to1       = 0;
+    pnts        = 0;
+    zonenames   = 0;
+    bcName      = 0;
+    bocoType    = 0;
+    familyName  = 0;
+    lab2        = 0;
+    srange      = 0;
+    donor_range = 0;
+    b           = 0;
+    vt          = 0;
+}
+
+BaseData::~BaseData(void)
+{
+    DelPointer3(x);
+    DelPointer3(y);
+    DelPointer3(z);
+    DelPointer2(b);
+    DelPointer2(vt);
+    DelPointer2(srange);
+    DelPointer2(donor_range);
+
+    delete [] bcName;
+    delete [] zonenames;
+    delete [] familyName;
+    delete [] bocoType;
+    delete [] pnts;
+    delete [] lab1;
+    delete [] lab2;
+    delete [] connectname;
+    delete [] donorname;
+}
+
+void BaseData::ResizeRange(int n1to1_in)
+{
+    b           = new int *[n1to1_in];
+    vt          = new int *[n1to1_in];
+    lab2        = new int  [n1to1_in];
+    srange      = new cgsize_t *[n1to1_in];
+    donor_range = new cgsize_t *[n1to1_in];
+}
+}
\ No newline at end of file
diff --git a/API/PreProcess/src/Pre_CGNSToPHengLEI_Struct.cpp b/API/PreProcess/src/Pre_CGNSToPHengLEI_Struct.cpp
new file mode 100644
index 0000000..80ca2f4
--- /dev/null
+++ b/API/PreProcess/src/Pre_CGNSToPHengLEI_Struct.cpp
@@ -0,0 +1,260 @@
+#include "Pre_CGNSToPHengLEI_Struct.h"
+#include "Geo_StructGrid.h"
+#include "Glb_Dimension.h"
+#include "TK_Log.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Pre_CGNSToPHengLEI_Struct::Pre_CGNSToPHengLEI_Struct(const string &gridFileName) : 
+        Pre_CGNSConversion_Struct(gridFileName)
+{
+
+}
+
+LIB_EXPORT Pre_CGNSToPHengLEI_Struct::~Pre_CGNSToPHengLEI_Struct()
+{
+
+}
+
+void Pre_CGNSToPHengLEI_Struct::Conversion()
+{
+    ResetGridScaleAndTranslate();
+
+    grids = new Grid*[nBlocks];
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        GridID *index = new GridID(iZone);
+        StructGrid *grid = StructGridCast(CreateGridGeneral(STRUCTGRID, index, 0, GetDim()));
+        grids[iZone] = grid;
+    }
+
+    SetCoordinate();
+    SetBCInfo();
+
+    CheckMeshMultigrid();
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        Grid *grid = grids[iZone];
+        grid->SetLnkInfo();
+        grid->ProcessBCInfo();
+    }
+}
+
+void Pre_CGNSToPHengLEI_Struct::SetCoordinate()
+{
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        BaseData *base_cgns = Str_CGNS_Data->GetBaseData(iZone);
+
+        int nCoords =base_cgns->GetNCoords();
+        int idim = base_cgns->GetIdim();
+        int jdim = base_cgns->GetJdim();
+        int kdim = base_cgns->GetKdim();
+
+        RDouble ***x = base_cgns->GetX();
+        RDouble ***y = base_cgns->GetY();
+        RDouble ***z = base_cgns->GetZ();
+
+        StructGrid *grid = StructGridCast(grids[iZone]);
+
+        grid->SetNI(idim);
+        grid->SetNJ(jdim);
+        grid->SetNK(kdim);
+
+        grid->SetBasicDimension();
+
+        int nTotalNode = grid->GetNTotalNode();
+        RDouble *xCoor = new RDouble[nTotalNode];
+        RDouble *yCoor = new RDouble[nTotalNode];
+        RDouble *zCoor = new RDouble[nTotalNode];
+        grid->SetX(xCoor);
+        grid->SetY(yCoor);
+        grid->SetZ(zCoor);
+        grid->SetArrayLayout();
+
+        RDouble3D &xx = * grid->GetStructX();
+        RDouble3D &yy = * grid->GetStructY();
+        RDouble3D &zz = * grid->GetStructZ();
+
+        for (int k = 0; k < kdim; ++ k)
+        {
+            for (int j = 0; j < jdim; ++ j)
+            {
+                for (int i = 0; i < idim; ++ i)
+                {
+                    xx(i+1, j+1, k+1) = x[k][j][i];
+                    yy(i+1, j+1, k+1) = y[k][j][i];
+
+                    if (nCoords == 2) z[k][j][i] = 0.0;
+                    zz(i+1, j+1, k+1) = z[k][j][i];
+                }
+            }
+        }
+
+        grid->ComputeMinMaxBox();
+    }
+}
+
+void Pre_CGNSToPHengLEI_Struct::SetBCInfo()
+{
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        BaseData *base_cgns = Str_CGNS_Data->GetBaseData(iZone);
+
+        int    nCoords       = base_cgns->GetNCoords();
+        int    n1to1         = base_cgns->GetN1to1();
+        int    nBCRegions    = base_cgns->GetNBCRegions();
+        int    *lab1         = base_cgns->GetLab1();
+        string *bcName       = base_cgns->GetBcName();
+        cgsize_t_60000 *pnts = base_cgns->GetPnts();
+
+        StructGrid *grid = StructGridCast(grids[iZone]);
+        grid->CreateCompositeBCRegion(nBCRegions + n1to1);
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegions; ++ iBCRegion)
+        {
+            StructBC *BCRegions = new StructBC(iZone, iBCRegion);
+            structBCSet->SetBCRegion(iBCRegion, BCRegions);
+
+            string bcNameCurrent;
+            int iMin, iMax, jMin, jMax, kMin, kMax, BCType;
+
+            if (nCoords == 2)
+            {
+                iMin = static_cast<int>(pnts[iBCRegion][0]);
+                iMax = static_cast<int>(pnts[iBCRegion][2]);
+
+                jMin = static_cast<int>(pnts[iBCRegion][1]);
+                jMax = static_cast<int>(pnts[iBCRegion][3]);
+
+                kMin = 1;
+                kMax = 1;
+            }
+            else
+            {
+                iMin = static_cast<int>(pnts[iBCRegion][0]);
+                iMax = static_cast<int>(pnts[iBCRegion][3]);
+
+                jMin = static_cast<int>(pnts[iBCRegion][1]);
+                jMax = static_cast<int>(pnts[iBCRegion][4]);
+
+                kMin = static_cast<int>(pnts[iBCRegion][2]);
+                kMax = static_cast<int>(pnts[iBCRegion][5]);
+            }
+
+            BCType = lab1[iBCRegion];
+            bcNameCurrent = bcName[iBCRegion];
+
+            BCRegions->SetIJKRegion(iMin, iMax, jMin, jMax, kMin, kMax);
+            BCRegions->SetBCType(BCType);
+            BCRegions->SetBCName(bcNameCurrent);
+        }
+
+        int ier = base_cgns->GetIer();
+        if (ier == CG_OK)
+        {
+            n1to1 = base_cgns->GetN1to1();
+            for (int one21 = 0; one21 < n1to1; ++ one21)
+            {
+                int *b = base_cgns->GetB(one21);
+                int *vt = base_cgns->GetVt(one21);
+                cgsize_t *sranges      = base_cgns->GetSrange(one21);
+                cgsize_t *donor_ranges = base_cgns->GetDonor_range(one21);
+
+                StructBC *BCRegions = new StructBC(iZone, nBCRegions + one21);
+                structBCSet->SetBCRegion(nBCRegions + one21, BCRegions);
+
+                string bcNameCurrent;
+                int iMin, iMax, jMin, jMax, kMin, kMax, BCType;
+
+                iMin = static_cast<int>(sranges[0]) * b[0];
+                iMax = static_cast<int>(sranges[0 + nCoords]) * b[0];
+                jMin = static_cast<int>(sranges[1]) * b[1];
+                jMax = static_cast<int>(sranges[1 + nCoords]) * b[1];
+
+                if (nCoords == 3)
+                {
+                    kMin = static_cast<int>(sranges[2]) * b[2];
+                    kMax = static_cast<int>(sranges[2 + nCoords]) * b[2];
+                }
+                else
+                {
+                    kMin = 1;
+                    kMax = 1;
+                }
+
+                BCType = -1;
+                bcNameCurrent = "Connection";
+
+                BCRegions->SetIJKRegion(iMin, iMax, jMin, jMax, kMin, kMax);
+                BCRegions->SetBCType(BCType);
+                BCRegions->SetBCName(bcNameCurrent);
+
+                iMin = static_cast<int>(donor_ranges[0]) * vt[0];
+                iMax = static_cast<int>(donor_ranges[0 + nCoords]) * vt[0];
+                jMin = static_cast<int>(donor_ranges[1]) * vt[1];
+                jMax = static_cast<int>(donor_ranges[1 + nCoords]) * vt[1];
+
+                if (nCoords == 3)
+                {
+                    kMin = static_cast<int>(donor_ranges[2]) * vt[2];
+                    kMax = static_cast<int>(donor_ranges[2 + nCoords]) * vt[2];
+                }
+                else
+                {
+                    kMin = 1;
+                    kMax = 1;
+                }
+
+                int nbt = base_cgns->Getlab2(one21) - 1;
+
+                BCRegions->SetTargetIJKRegion(iMin, iMax, jMin, jMax, kMin, kMax);
+                BCRegions->SetTargetRegionBlock(nbt);
+
+                if (nCoords == THREE_D)
+                {
+                    BCRegions->ComputeRelativeParameters();
+                }
+            }
+        }
+    }
+}
+
+void Pre_CGNSToPHengLEI_Struct::CheckMeshMultigrid()
+{
+    int km, NN;
+    int km_grid = 1024;
+
+    for (int iZone = 0; iZone < nBlocks; iZone ++)
+    {
+        StructGrid *grid = StructGridCast(grids[iZone]);
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+
+        int nBCRegion = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion ++)
+        {
+            km = 1;
+            NN = 2;
+
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+            int *s_st = structBC->GetStartPoint();
+            int *s_ed = structBC->GetEndPoint();
+
+            while ((((abs(s_st[0])-1)%NN)==0) && (((abs(s_ed[0])-1)%NN)==0) && (((abs(s_st[1])-1)%NN)==0) && (((abs(s_ed[1])-1)%NN)==0) && (((abs(s_st[2])-1)%NN)==0) && (((abs(s_ed[2])-1)%NN)==0))
+            {
+                NN = NN * 2;
+                km = km + 1;
+            }
+            km_grid = min(km_grid, km);
+        }
+    }
+
+    PrintToWindow("The most valid multi-grid level is: ", km_grid, "\n");
+}
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/src/Pre_CGNSToPHengLEI_Unstruct.cpp b/API/PreProcess/src/Pre_CGNSToPHengLEI_Unstruct.cpp
new file mode 100644
index 0000000..40625f3
--- /dev/null
+++ b/API/PreProcess/src/Pre_CGNSToPHengLEI_Unstruct.cpp
@@ -0,0 +1,420 @@
+#include "Pre_CGNSToPHengLEI_Unstruct.h"
+#include "Pre_GridBase.h"
+#include "Math_BasisFunction.h"
+#include "Geo_UnstructBC.h"
+#include "PHIO.h"
+#include "Glb_Dimension.h"
+#include "TK_Exit.h"
+using namespace std;
+#pragma warning(disable:6385)
+#pragma warning(disable:26812)
+#pragma warning(disable:4701)
+
+namespace PHSPACE
+{
+LIB_EXPORT Pre_CGNSToPHengLEI_Unstruct::Pre_CGNSToPHengLEI_Unstruct(const string &gridFileName) : 
+    Pre_GridConversion(gridFileName)
+{
+    factory_cgns = 0;
+}
+
+LIB_EXPORT Pre_CGNSToPHengLEI_Unstruct::~Pre_CGNSToPHengLEI_Unstruct()
+{
+    delete factory_cgns;
+}
+
+void Pre_CGNSToPHengLEI_Unstruct::ReadGrid()
+{
+    string &cgnsfile = gridFileName;
+    cout << "    CGNS file name: " << cgnsfile << "\n";
+
+    cgsize_t isize[3][1];
+    int fileid, baseid;
+    cgsize_t irmin, irmax, istart, iend;
+    int nbndry, iparent_flag;
+    int cellDim, physDim;
+    cgsize_t nTotalNode, nTotalCell;
+    int nCoords, nSections, nBCRegions, nFamilies, FamBC, nGeo;
+    cgsize_t nBCElem, normListFlag;
+    int normalIndex, nDataSet;
+    char zonename[33], sectionname[33];
+    char basename[33], coordname[33], bocoName[33];
+    cgsize_t elementdatasize;
+    ElementType_t  etype;
+    ZoneType_t     zoneType;
+    DataType_t     dataType;
+    BCType_t       bocoType;
+    PointSetType_t ptsetType;
+    DataType_t     normDataType;
+    CGNSRawCoor    *raw_coor;
+
+    //! Open the CGNS for reading and check if the file was found.
+    //if (cg_open(cgnsfile.c_str(), MODE_READ, &fileid) != CG_OK)
+    if (cg_open(cgnsfile.c_str(), CG_MODE_READ, &fileid) != CG_OK)
+    {
+        TK_Exit::ExceptionExit(cg_get_error());
+    }
+
+    int hasVolumeCondition = 0;
+    GlobalDataBase::UpdateData("hasVolumeCondition", &hasVolumeCondition, PHINT, 1);
+
+    //! Determine the of bases in the grid.
+    cg_nbases(fileid, &baseid);
+
+    //! Determine the number of FamilyBC in the grid.
+    cg_nfamilies(fileid, baseid, &nFamilies);
+
+    typedef char char_33[33];
+    char_33 *FamilyName=NULL;
+    char_33 FamBCName;
+
+    BCType_t *FamilyBCType = new BCType_t [nFamilies];
+    int BC=1;
+
+    if (nFamilies > 0)
+    {
+        FamilyName = new char_33 [nFamilies];
+
+        for (int Fam = 1; Fam <= nFamilies; ++ Fam)
+        {
+            cg_family_read(fileid, baseid, Fam, FamilyName[Fam-1], &FamBC, &nGeo);
+            cg_fambc_read(fileid, baseid, Fam, BC, FamBCName, &FamilyBCType[Fam-1]);
+        }
+    }
+
+    //! Read the number of zones in the grid.
+    cg_nzones(fileid, baseid, &nBlocks);
+
+    //! Check the cell and physical dimensions of the bases.
+    cg_base_read(fileid, baseid, basename, &cellDim, &physDim);
+
+    if (cellDim != PHSPACE::GetDim())
+    {
+        TK_Exit::ExceptionExit("Error: Dimension in CGNS file is not according with that in parameter file!");
+    }
+
+    factory_cgns = new CGNSFactory(nBlocks);
+    for (int iZone = 1; iZone <= nBlocks; ++ iZone)
+    {
+        CGNSBase *base_cgns = factory_cgns->GetCGNSBase(iZone-1);
+
+        cg_goto(fileid, baseid, "Zone_t", iZone, "end");
+        char_33 volumeName;
+        cg_famname_read(volumeName);
+        base_cgns->SetVCName(volumeName);
+        if ((strcmp(volumeName, "Unspecified") != 0) && (strcmp(volumeName, "") != 0))
+        {
+            hasVolumeCondition = 1;
+            GlobalDataBase::UpdateData("hasVolumeCondition", &hasVolumeCondition, PHINT, 1);
+        }
+
+        int vcType = PHENGLEI::UNDEFINED;
+        if (nFamilies > 0)
+        {
+            for (int iFam = 1; iFam <= nFamilies; ++ iFam)
+            {
+                if (strcmp(volumeName, FamilyName[iFam-1]) == 0)
+                {
+                    char_33 name;
+                    char *desc=NULL;
+                    cg_goto(fileid, baseid, "Family_t", iFam, "end");
+
+                    int nDesc;
+                    cg_ndescriptors (&nDesc);
+                    for (int iDesc = 1; iDesc <= nDesc; iDesc++)
+                    {
+                        cg_descriptor_read (iDesc, name, &desc);
+
+                        if (strcmp(name, "FamVC_TypeName") == 0)
+                        {
+                            if (strcmp(desc, "Fluid") == 0)
+                            {
+                                vcType = PHENGLEI::FLUID;
+                                break;
+                            }
+                            else if (strcmp(desc, "Solid") == 0)
+                            {
+                                vcType = PHENGLEI::SOLID;
+                                break;
+                            }
+                        }
+                    }
+
+                    delete []desc;
+                }
+            }
+        }
+        base_cgns->SetVCType(vcType);
+
+        //! Check the zone type.
+        cg_zone_type(fileid, baseid, iZone, &zoneType);
+
+        if (zoneType == Structured)
+        {
+            TK_Exit::ExceptionExit("Error: the input CGNS mesh must be UNSTRUCTURED type!");
+        }
+
+        //! Determine the number of vertices and volume elements in this zone.
+        cg_zone_read(fileid, baseid, iZone, zonename, isize[0]);
+
+        nTotalNode = isize[0][0];
+        nTotalCell = isize[1][0];
+
+        base_cgns->SetNTotalNode(nTotalNode);
+        base_cgns->SetNTotalCell(nTotalCell);
+
+        cout << " nTotalNode = " << nTotalNode << " nTotalCell = " << nTotalCell << "\n";
+
+        //! Determine the number and names of the coordinates.
+        cg_ncoords(fileid, baseid, iZone, &nCoords);
+
+        //! Lower range index.
+        irmin = 1;
+        //! Upper range index of vertices.
+        irmax = nTotalNode;
+
+        //! Temporarily assume that grid is unstructured, it will be considered later.
+        RDouble *x = new RDouble[nTotalNode]();
+        RDouble *y = new RDouble[nTotalNode]();
+        RDouble *z = new RDouble[nTotalNode]();
+
+        RawGrid *rawgrid = factory_cgns->GetRawGrid(iZone-1);
+
+        rawgrid->SetNTotalNode(nTotalNode);
+        rawgrid->SetX(x);
+        rawgrid->SetY(y);
+        rawgrid->SetZ(z);
+
+        raw_coor = new CGNSRawCoor();
+
+        for (int icoor = 0; icoor < nCoords; ++ icoor)
+        {
+            cg_coord_info(fileid, baseid, iZone, icoor+1, &dataType, coordname);
+            raw_coor->AllocateData(icoor, nTotalNode, dataType);
+
+            //! Read the x-, y-, z-coordinates.
+            cg_coord_read(fileid, baseid, iZone, coordname, dataType, &irmin, &irmax, raw_coor->GetCoor(icoor));
+        }
+
+        if (nCoords == 2)
+        {
+            for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+            {
+                z[iNode] = 0.0;
+            }
+
+            raw_coor->AllocateData(2, nTotalNode, dataType);
+        }
+
+        raw_coor->SetAllData(x, y, z);
+
+        if (nCoords == 2)
+        {
+            for (int iNodess = 0; iNodess < nTotalNode; ++ iNodess)
+            {
+                z[iNodess] = 0.0;
+            }
+        }
+
+        delete raw_coor;
+
+        //! Determine the number of sections for this zone. Note that
+        //! surface elements can be stored in a volume zone, but they
+        //! are NOT taken into account in the number obtained from 
+        //! cg_zone_read.
+        cg_nsections(fileid, baseid, iZone, &nSections);
+
+        //! Loop over the number of sections and read the element
+        //! connectivities. As CGNS starts the numbering at 1 the
+        //! for-loop starts at 1 as well.
+        base_cgns->CreateElement(nSections);
+
+        cgsize_t *base_cgns_istart = base_cgns->GetIndexOfStart();
+        cgsize_t *base_cgns_iend = base_cgns->GetIndexOfEnd();
+        int *base_cgns_elem_type = base_cgns->GetElementType();
+        cgsize_t **base_cgns_conn_list = base_cgns->GetElementConnectionList();
+        cgsize_t  *base_cgns_elementdatasize = base_cgns->GetElementDataSize();
+        cgsize_t **base_cgns_mixed_conn_list = base_cgns->GetMixedConnectionIndex();
+
+        cgsize_t *base_elem_elem_pt = factory_cgns->GetBaseElement()->GetElementPoint();
+
+        cout << " nSections = " << nSections << "\n";
+        for (int iSection = 1; iSection <= nSections; ++ iSection)
+        {
+            cg_section_read(fileid, baseid, iZone, iSection, sectionname, &etype,
+                            &istart, &iend, &nbndry, &iparent_flag);
+
+            cg_ElementDataSize(fileid, baseid, iZone, iSection, &elementdatasize);
+
+            cout << "\nReading section " << iSection << " ...\n";
+            cout << "   section name = " << sectionname << "\n";
+            cout << "   section type = " << ElementTypeName[etype] << "\n";
+            cout << "   istart,iend =  " << istart << " " << iend << "\n";
+
+            base_cgns_istart   [iSection - 1] = istart;
+            base_cgns_iend     [iSection - 1] = iend;
+            base_cgns_elem_type[iSection - 1] = etype;
+            base_cgns_elementdatasize[iSection - 1] = elementdatasize;
+
+            cgsize_t nelem = iend - istart + 1;
+            if (etype != MIXED)
+            {
+                int ptnum = static_cast<int>(base_elem_elem_pt[etype]);
+                elementdatasize = ptnum * nelem;
+            }
+            base_cgns_conn_list[iSection - 1] = new cgsize_t [elementdatasize];
+            
+            //! Read the connectivity. Again, the node numbering of the 
+            //! connectivities start at 1. If internally a starting index 
+            //! of 0 is used (typical for C-codes) 1 must be subtracted 
+            //! from the connectivities read.
+            cg_elements_read(fileid, baseid, iZone, iSection, base_cgns_conn_list[iSection - 1], NULL);
+
+            if (etype == MIXED)
+            {
+                base_cgns_mixed_conn_list[iSection - 1] = new cgsize_t [nelem];
+
+                int iNode = 0;
+                int index = 0;
+                for (; iNode < elementdatasize;)
+                {
+                    int ptnum = static_cast<int>(base_elem_elem_pt[base_cgns_conn_list[iSection - 1][iNode]]);
+                    base_cgns_mixed_conn_list[iSection - 1][index] = iNode;
+
+                    iNode = iNode + ptnum + 1;
+                    ++ index;
+                }
+            }
+        }
+
+        // Determine the number of boundary conditions for this zone.
+        cg_nbocos(fileid, baseid, iZone, &nBCRegions);
+
+        cout << "\nNumber of BC Regions: " << nBCRegions << endl;
+        base_cgns->CreateBC(nBCRegions);
+
+        int *base_cgns_nBCElem            = base_cgns->GetNumberOfBCElements();
+        int *base_cgns_bc_elem_set_type   = base_cgns->GetBoundaryElementType();
+        int *base_cgns_bc_grid_location   = base_cgns->GetBoundaryGridLocation();
+        int *base_cgns_bc_type            = base_cgns->GetBCType();
+        cgsize_t **base_cgns_bc_conn_list = base_cgns->GetBoundaryElementConnectionList();
+
+        GridLocation_t igr;
+
+        //! Loop over the number of boundary conditions.
+        string *boundaryName = new string [nBCRegions]();
+        base_cgns->SetBCName(boundaryName);
+
+        for (int iBCRegion = 1; iBCRegion <= nBCRegions; ++ iBCRegion)
+        {
+            cout << "  Reading bcRegion " << iBCRegion << " ... " << endl;
+            cg_goto(fileid, baseid, "Zone_t", iZone, "ZoneBC_t", 1, "BC_t", iBCRegion, "end");
+            cg_gridlocation_read(&igr);
+
+            cout << "  Grid Location Name = " << GridLocationName[igr] << "\n";
+            if (igr == FaceCenter)
+            {
+                cout << "GridLocation = FaceCenter means BC data refers to elements, not nodes\n";
+            }
+            else if (igr == Vertex)
+            {
+                cout << "GridLocation = Vertex means BC data refers to nodes, not elements\n";
+                cout << " ============================================================ " << endl;
+                cout << "    Very Important Warning: " << endl;
+                cout << "        if the cgns grid file is exported from Gridgen15.18,  " << endl; 
+                cout << "        make sure the V16 Format button is toggle off, because" << endl;
+                cout << "        the Face-based BCs are exported as Vertex-based type  " << endl;
+                cout << "        wrongly by Gridgen15.18 !!!" << endl;
+                cout << " =========================================================== "  << endl;
+                //igr = FaceCenter;
+            }
+            //! Read the info for this boundary condition.
+            cg_boco_info(fileid, baseid, iZone, iBCRegion, bocoName, &bocoType, &ptsetType, &nBCElem, &normalIndex,
+                         &normListFlag, &normDataType, &nDataSet);
+
+            if (bocoType == FamilySpecified || nFamilies > 0)
+            {
+                for (int iFam = 1; iFam <= nFamilies; ++ iFam)
+                {
+                    if (strcmp(bocoName, FamilyName[iFam-1]) == 0)
+                    {
+                        bocoType = FamilyBCType[iFam-1];
+                        break;
+                    }
+                }
+            }
+
+            boundaryName[iBCRegion - 1] = bocoName;
+
+            cout << "  Boundary Name = " << bocoName << "\n";
+            cout << "  BCtype  = " << BCTypeName[bocoType] << "\n";
+            cout << "  nBCElem = " << nBCElem << "\n";
+
+            base_cgns_nBCElem         [iBCRegion-1] = static_cast<int>(nBCElem);
+            base_cgns_bc_conn_list    [iBCRegion-1] = new cgsize_t [nBCElem];
+            base_cgns_bc_type         [iBCRegion-1] = bocoType;
+            base_cgns_bc_elem_set_type[iBCRegion-1] = ptsetType;
+            base_cgns_bc_grid_location[iBCRegion-1] = igr;
+
+            cout << "  PointSetType_t = " << PointSetTypeName[ptsetType] << "\n";
+
+            //! Read the element ID��s.
+            cg_boco_read(fileid, baseid, iZone, iBCRegion, base_cgns_bc_conn_list[iBCRegion-1], NULL);
+
+            if (nBCElem == 2)
+            {
+                cout << "  Start & End point of Region " << ": " 
+                     << base_cgns_bc_conn_list[iBCRegion-1][0] << " " << base_cgns_bc_conn_list[iBCRegion-1][1] << "\n";
+            }
+            else
+            {
+                cout << "  The first 20 points of Region " << ": ";
+                for (int j = 0; j < MIN(20, (int)nBCElem); ++ j)
+                    //for (int j = 0; j < nBCElem; ++ j)
+                {
+                    cout << base_cgns_bc_conn_list[iBCRegion-1][j] << " ";
+                }
+                cout << "\n";
+            }
+            //! And much more to make it fit into the 
+            //! internal data structures.
+
+            cout << endl;
+        }
+    }
+     delete [] FamilyBCType;    FamilyBCType = NULL;
+    //! Close CGNS file.
+    cg_close(fileid);
+}
+
+void Pre_CGNSToPHengLEI_Unstruct::Conversion()
+{
+    factory_cgns->ConvertGrid2Fantasy();
+
+    grids = new Grid * [nBlocks];
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        GridID *index = new GridID(iZone);
+        Grid *grid = CreateGridGeneral(UNSTRUCTGRID, index, 0, GetDim());
+        grids[iZone] = grid;
+        CGNS2UnsGrid(factory_cgns, iZone, UnstructGridCast(grid));
+        grid->ComputeMinMaxBox();
+    }
+}
+
+LIB_EXPORT void Pre_CGNSToPHengLEI_Unstruct::WriteAdditionalInformation(const string &targetGridFileName, Grid **grids_in)
+{
+    WriteFaceBoundaryName(targetGridFileName, grids_in);
+    WriteVolumeName(targetGridFileName, grids_in);
+
+    int dumpOldGrid = GlobalDataBase::GetIntParaFromDB("dumpOldGrid");
+    if (dumpOldGrid)
+    {
+        WriteCellToNode(targetGridFileName, grids_in);
+
+        WriteFaceBC(targetGridFileName, grids_in);
+    }
+}
+
+}
diff --git a/API/PreProcess/src/Pre_CGNSToPlot3D_Struct.cpp b/API/PreProcess/src/Pre_CGNSToPlot3D_Struct.cpp
new file mode 100644
index 0000000..4637cd1
--- /dev/null
+++ b/API/PreProcess/src/Pre_CGNSToPlot3D_Struct.cpp
@@ -0,0 +1,315 @@
+#include "Pre_CGNSToPlot3D_Struct.h"
+#include "PHIO.h"
+#include "TK_Parse.h"
+#include "Constants.h"
+
+namespace PHSPACE
+{
+
+Pre_CGNSToPlot3D_Struct::Pre_CGNSToPlot3D_Struct(const string &gridFileName) :
+    Pre_CGNSConversion_Struct(gridFileName)
+{
+
+}
+
+Pre_CGNSToPlot3D_Struct::~Pre_CGNSToPlot3D_Struct()
+{
+
+}
+
+void Pre_CGNSToPlot3D_Struct::Conversion()
+{
+    ResetGridScaleAndTranslate();
+
+    WriteToGrd();
+    WriteToInp();
+
+    int dumpOldGrid = GlobalDataBase::GetIntParaFromDB("dumpOldGrid");
+    if (dumpOldGrid)
+    {
+        WriteToBcinformation();
+    }
+}
+
+void Pre_CGNSToPlot3D_Struct::WriteToGrd()
+{
+    string fname = " ", fext = " ";
+    GetNameExt(gridFileName, fname, fext, ".");
+    cel_file = fname + "_0.grd";
+    GlobalDataBase::UpdateData("from_gfile", &cel_file, PHSTRING, 1);
+
+    //! Creating Grid file.
+    fstream Gridgenfile;
+    Gridgenfile.open(cel_file.c_str(), ios_base::out|ios_base::binary|ios_base::trunc);
+    Gridgenfile.write(reinterpret_cast<char *>(&nBlocks), sizeof(int));
+
+    //! Import the maximum value of i, j, k.
+    for (int iZone = 1; iZone <= nBlocks; ++ iZone)
+    {
+        BaseData *base_cgns = Str_CGNS_Data->GetBaseData(iZone-1);
+
+        int idim = base_cgns->GetIdim();
+        int jdim = base_cgns->GetJdim();
+        int kdim = base_cgns->GetKdim();
+
+        Gridgenfile.write(reinterpret_cast<char *>(&idim), sizeof(int));
+        Gridgenfile.write(reinterpret_cast<char *>(&jdim), sizeof(int));
+        Gridgenfile.write(reinterpret_cast<char *>(&kdim), sizeof(int));
+    }
+
+    //! Import the coordinates of node in the CGNS Grid.
+    for (int iZone = 1; iZone <= nBlocks; ++ iZone)
+    {
+        BaseData *base_cgns = Str_CGNS_Data->GetBaseData(iZone-1);
+
+        int nCoords =base_cgns->GetNCoords();
+
+        int idim = base_cgns->GetIdim();
+        int jdim = base_cgns->GetJdim();
+        int kdim = base_cgns->GetKdim();
+
+        RDouble ***x = base_cgns->GetX();
+        RDouble ***y = base_cgns->GetY();
+        RDouble ***z = base_cgns->GetZ();
+
+        for (int k = 0; k < kdim; ++ k)
+        {
+            for (int j = 0; j < jdim; ++ j)
+            {
+                for (int i = 0; i < idim; ++ i)
+                {
+                    Gridgenfile.write(reinterpret_cast<char *>(&x[k][j][i]), sizeof(RDouble));
+                }
+            }
+        }
+
+        for (int k = 0; k < kdim; ++ k)
+        {
+            for (int j = 0; j < jdim; ++ j)
+            {
+                for (int i = 0; i < idim; ++ i)
+                {
+                    Gridgenfile.write(reinterpret_cast<char *>(&y[k][j][i]), sizeof(RDouble));
+                }
+            }
+        }
+
+        for (int k = 0; k < kdim; ++ k)
+        {
+            for (int j = 0; j < jdim; ++ j)
+            {
+                for (int i = 0; i < idim; ++ i)
+                {
+                    if (nCoords == 2) z[k][j][i] = 0.0;
+                    Gridgenfile.write(reinterpret_cast<char *>(&z[k][j][i]), sizeof(RDouble));
+                }
+            }
+        }
+    }
+
+    Gridgenfile.close();
+}
+
+void Pre_CGNSToPlot3D_Struct::WriteToInp()
+{
+    string fname = " ", fext = " ";
+    GetNameExt(gridFileName, fname, fext, ".");
+    bnd_file = fname + "_0.inp";
+    GlobalDataBase::UpdateData("bnd_file",   &bnd_file, PHSTRING, 1);
+
+    //! Create Inp file.
+    fstream GridgenBCfile;
+    GridgenBCfile.open(bnd_file.c_str(), ios_base::out);
+    GridgenBCfile << 1 << endl;
+    GridgenBCfile << nBlocks << endl;
+
+    for (int iZone = 1; iZone <= nBlocks; ++ iZone)
+    {
+        BaseData *base_cgns = Str_CGNS_Data->GetBaseData(iZone-1);
+
+        int nCoords = base_cgns->GetNCoords();
+
+        int idim = base_cgns->GetIdim();
+        int jdim = base_cgns->GetJdim();
+        int kdim = base_cgns->GetKdim();
+        char_33 *zonename = base_cgns->GetZonenames();
+
+        //! Set the minimum data length.
+        int wordwidth = 8;
+
+        GridgenBCfile << setw(wordwidth) << idim;
+        GridgenBCfile << setw(wordwidth) << jdim;
+        if (nCoords == 3)
+        {
+            GridgenBCfile << setw(wordwidth) << kdim;
+        }
+        GridgenBCfile << endl;
+        GridgenBCfile << zonename[0] << endl;
+
+        int nconnect = base_cgns->GetNconnect();
+        GridgenBCfile <<  nconnect << endl;
+
+        int    nBCRegions    = base_cgns->GetNBCRegions();
+        int    *lab1         = base_cgns->GetLab1();
+        string *bcName       = base_cgns->GetBcName();
+        cgsize_t_60000 *pnts = base_cgns->GetPnts();
+
+        for (int boco = 1; boco <= nBCRegions; ++ boco)
+        {
+            writetoCGNS(GridgenBCfile, pnts[boco - 1], lab1[boco - 1], bcName[boco - 1], nCoords);
+        }
+
+        int ier = base_cgns->GetIer();
+        if (ier == CG_OK)
+        {
+            int n1to1 = base_cgns->GetN1to1();
+            for (int one21 = 1; one21 <= n1to1; ++ one21)
+            {
+                int *b = base_cgns->GetB(one21-1);
+                int *vt = base_cgns->GetVt(one21-1);
+                cgsize_t *sranges = base_cgns->GetSrange(one21-1);
+                cgsize_t *donor_ranges = base_cgns->GetDonor_range(one21-1);
+
+                //! Import FarField Boundary Condition and Wall Boundary Condition.
+                for (int iCoords = 0; iCoords < nCoords; ++ iCoords)
+                {
+                    GridgenBCfile << setw(8) << sranges[iCoords] * b[iCoords];
+                    GridgenBCfile << setw(8) << sranges[iCoords + nCoords] * b[iCoords];
+                }
+
+                //! Import interface information.
+                GridgenBCfile << setw(8) << -1;
+                GridgenBCfile << "   " << "Connection" << endl;
+
+                for (int iCoords = 0; iCoords < nCoords; ++ iCoords)
+                {
+                    GridgenBCfile << setw(8) << donor_ranges[iCoords] * vt[iCoords];
+                    GridgenBCfile << setw(8) << donor_ranges[iCoords + nCoords] * vt[iCoords];
+                }
+
+                int lab2 = base_cgns->Getlab2(one21-1);
+
+                //! Import the information of symmetrical interface.
+                GridgenBCfile << setw(8) << lab2 << endl;
+            }
+        }
+        else
+        {
+            cout << "Warning: " << "Zone " << (iZone-1) << " has no interface!" << endl;
+        }
+    }
+
+    GridgenBCfile.close();
+}
+
+void Pre_CGNSToPlot3D_Struct::WriteToBcinformation()
+{
+    string fname = " ", fext = " ";
+    GetNameExt(gridFileName, fname, fext, ".");
+    bcinfor_file = fname + "_0.bc";
+
+    fstream file;
+    PHSPACE::OpenFile(file, bcinfor_file, ios_base::out|ios_base::binary);
+
+    PHWrite(file, nBlocks);
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        VirtualFile *virtualFile = new VirtualFile(&file);
+        virtualFile->BeginWriteWork();
+
+        PHWrite(virtualFile, iZone);
+
+        BaseData *base_cgns = Str_CGNS_Data->GetBaseData(iZone);
+
+        int nBCRegions = base_cgns->GetNBCRegions();
+        int nconnect = base_cgns->GetNconnect();
+        PHWrite(virtualFile, nconnect);
+
+        string *bcNameList = new string [nconnect];
+        string *bcName = base_cgns->GetBcName();
+        uint_long totalSize = 0;
+        for (int boco = 0; boco < nBCRegions; ++ boco)
+        {
+            bcNameList[boco] = bcName[boco];
+
+            totalSize += static_cast< uint_long > (bcNameList[boco].size());
+            totalSize += 1;
+        }
+
+        int ier = base_cgns->GetIer();
+        if (ier == CG_OK)
+        {
+            int n1to1 = base_cgns->GetN1to1();
+            for (int one21 = 0; one21 < n1to1; ++ one21)
+            {
+                bcNameList[nBCRegions+one21] = "Connection";
+
+                totalSize += static_cast< uint_long > (bcNameList[nBCRegions+one21].size());
+                totalSize += 1;
+            }
+        }
+        else
+        {
+            cout << "Warning: " << "Zone " << iZone << " has no interface!" << endl;
+        }
+
+        char *bcNameChar = new char[totalSize];
+        unsigned int count = 0;
+        for (int boco = 0; boco < nconnect; ++ boco)
+        {
+            string &bcName1 = bcNameList[boco];
+            streamsize nameSize = bcName1.size();
+            for (unsigned int iChar = 0; iChar < nameSize; ++ iChar)
+            {
+                bcNameChar[count ++] = bcName1[iChar];
+            }
+            bcNameChar[count ++] = '\0';
+        }
+
+        PHWrite(virtualFile, totalSize);
+        PHWrite(virtualFile, bcNameChar, static_cast<int>(totalSize));
+
+        virtualFile->EndWriteWork();
+        delete virtualFile;
+        delete [] bcNameList;
+        delete [] bcNameChar;
+    }
+
+    PHSPACE::CloseFile(file);
+}
+
+void Pre_CGNSToPlot3D_Struct::writetoCGNS(fstream &bcfile, cgsize_t *pnts, int lab, string bcName, int nCoords)
+{
+    if (nCoords == 2)
+    {
+        bcfile << setw(8) << pnts[0];
+        bcfile << setw(8) << pnts[2];
+        bcfile << setw(8) << pnts[1];
+        bcfile << setw(8) << pnts[3];
+        bcfile << setw(8) << lab;
+    }
+    else
+    {
+        bcfile << setw(8) << pnts[0];
+        bcfile << setw(8) << pnts[3];
+        bcfile << setw(8) << pnts[1];
+        bcfile << setw(8) << pnts[4];
+        bcfile << setw(8) << pnts[2];
+        bcfile << setw(8) << pnts[5];
+        if (bcName.substr(0,7) == "BndCond")
+        {
+            bcfile << setw(8) << atoi(bcName.substr(8, 2).c_str()) - 17;
+        }
+        else
+        {
+            bcfile << setw(8) << lab;
+        }
+    }
+
+    bcfile << "   " << bcName;
+    bcfile << endl;
+}
+
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/src/Pre_FieldViewToPHengLEI_Unstruct.cpp b/API/PreProcess/src/Pre_FieldViewToPHengLEI_Unstruct.cpp
new file mode 100644
index 0000000..04cecf7
--- /dev/null
+++ b/API/PreProcess/src/Pre_FieldViewToPHengLEI_Unstruct.cpp
@@ -0,0 +1,1059 @@
+#include "Pre_FieldViewToPHengLEI_Unstruct.h"
+#include "Math_BasisFunction.h"
+#include "Pre_GridBase.h"
+#include "Geo_UnstructBC.h"
+#include "PHIO.h"
+#include "Glb_Dimension.h"
+#include "TK_Exit.h"
+#include "TK_Parse.h"
+using namespace std;
+
+namespace PHSPACE
+{
+LIB_EXPORT Pre_FieldViewToPHengLEI_Unstruct::Pre_FieldViewToPHengLEI_Unstruct(const string &gridFileName) : 
+    Pre_GridConversion(gridFileName)
+{
+    factory_cgns = 0;
+}
+
+LIB_EXPORT Pre_FieldViewToPHengLEI_Unstruct::~Pre_FieldViewToPHengLEI_Unstruct()
+{
+    
+}
+
+void Pre_FieldViewToPHengLEI_Unstruct::ReadGrid()
+{
+    cout << "    Field view file name: " << gridFileName << "\n";
+
+    fstream file;
+    PHSPACE::OpenFile(file, gridFileName, ios_base::in);
+
+    int nversion, nBCType;
+    int nTotalNode, nTotalCell, nBoundFace;
+
+    GetFieldViewVersion(file, nversion);
+    GetFieldViewNBlocks(file, nversion);
+
+    GetFieldViewNBCType(file, nversion, nBCType);
+    string *bctype_name_list = new string[nBCType];
+    int    *bctype_list      = new int   [nBCType];
+
+    GetFieldViewBCNameTable(file, nversion, nBCType, bctype_name_list);
+    GetFieldViewBCTypeTable(nBCType, nversion, bctype_name_list, bctype_list);
+    Gridgen2CGNSBCTypeTable(nBCType, bctype_list);
+
+    factory_cgns = new CGNSFactory(nBlocks);
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        factory_cgns->GetCGNSBase(iZone)->SetBCName(bctype_name_list);
+
+        cout << " iZone = " << iZone << " nBlocks = " << nBlocks << "\n";
+        GetFieldViewNTNode(file, nversion, nTotalNode);
+
+        RDouble *x = new RDouble[nTotalNode];
+        RDouble *y = new RDouble[nTotalNode];
+        RDouble *z = new RDouble[nTotalNode];
+
+        RawGrid *rawgrid = factory_cgns->GetRawGrid(iZone);
+
+        rawgrid->SetX(x);
+        rawgrid->SetY(y);
+        rawgrid->SetZ(z);
+
+        ReadFieldViewCoor(file, nTotalNode, x, y, z);
+        GetFieldViewNBFace(file, nversion, nBoundFace);
+
+        int nBC_Sections, nBCRegions;
+
+        int *bc_elem_type;
+        int *bc_istart, *bc_iend;
+        cgsize_t **bc_elem_conn_list;
+        cgsize_t **bc_conn_list;
+        int *nBCElem;
+        int *bc_type;
+
+        GetFieldViewBCCell(file, nBoundFace, bctype_list, 
+            nBC_Sections, bc_elem_type, bc_istart, bc_iend, bc_elem_conn_list,
+            nBCRegions, bc_conn_list, nBCElem, bc_type);
+
+        int nElem_Sections;
+
+        int *elem_type;
+        int *elem_istart, *elem_iend;
+        cgsize_t **elem_conn_list;
+
+        GetFieldViewMainCell(file, nTotalCell, nElem_Sections, elem_type, elem_istart, elem_iend, elem_conn_list);
+
+        MergeFieldViewCell(factory_cgns, iZone, nBoundFace, nTotalNode, nTotalCell, nElem_Sections, elem_type, elem_istart, elem_iend, elem_conn_list,
+            nBC_Sections, bc_elem_type, bc_istart, bc_iend, bc_elem_conn_list, nBCRegions, bc_conn_list, nBCElem, bc_type);
+    }
+
+    delete [] bctype_list;
+
+    PHSPACE::CloseFile(file);
+}
+
+LIB_EXPORT void Pre_FieldViewToPHengLEI_Unstruct::WriteAdditionalInformation(const string &targetGridFileName, Grid **grids_in)
+{
+    //WriteCellToNode(targetGridFileName, grids_in);
+
+    //WriteFaceBC(targetGridFileName, grids_in);
+
+    WriteFaceBoundaryName(targetGridFileName, grids_in);
+}
+
+void Pre_FieldViewToPHengLEI_Unstruct::GetFieldViewVersion(fstream &file, int &nversion)
+{
+    string line,word;
+    string separator = " =\t\r\n#$,;";
+    string sep1 = "\r\n";
+    string errmsg = "The file is not a Field-View file!";
+    
+    //! Read the format version.
+    do
+    { 
+        getline(file, line);
+    }while (line == "");
+
+    nversion = FIELDVIEW_2_4;
+
+    line = FindNextWord(line, word, sep1);
+    transform(word.begin(), word.end(), word.begin(), ToLower());
+    if (word.substr(0, 9) != "fieldview")
+    {
+        TK_Exit::ExceptionExit(errmsg);
+    }
+    else
+    {
+        string cs;
+        string word1;
+        int version1, version2;
+
+        if (word.substr(0, 15) == "fieldview_grids")
+        {
+            //! Format of FIELDVIEW 3.0.
+            cs = word.substr(15);
+            cs = FindNextWord(cs, word1, separator);
+            if (word1 == "")
+            {
+                TK_Exit::ExceptionExit("Error: main version number is not found!\n");
+            }
+            from_string< int >(version1, word1, std::dec);
+            cs = FindNextWord(cs, word1, separator);
+            if (word1 == "")
+            {
+                TK_Exit::ExceptionExit("Error: sub-version number is not found\n");
+            }
+            from_string< int >(version2, word1, std::dec);
+            cout << "Format of FIELDVIEW: " << version1 << "." << version2 << "\n";
+            nversion = FIELDVIEW_3_0;
+        }
+        else
+        {
+            //! Format of FIELDVIEW 2.4.
+            cs = word.substr(9);
+            cs = FindNextWord(cs, word1, separator);
+            if (word1 == "")
+            {
+                TK_Exit::ExceptionExit("Error: main version number is not found!\n");
+            }
+            from_string< int >(version1, word1, std::dec);
+            cs = FindNextWord(cs, word1, separator);
+            if (word1 == "")
+            {
+                TK_Exit::ExceptionExit("Error: sub-version number is not found\n");
+            }
+            from_string< int >(version2, word1, std::dec);
+            cout << "Format of FIELDVIEW: "<< version1 << "." << version2 << "\n";
+            nversion = FIELDVIEW_2_4;
+        }
+    }
+}
+
+void Pre_FieldViewToPHengLEI_Unstruct::GetFieldViewNBlocks(fstream &file, int nversion)
+{
+    string line, word;
+    string separator = " =\t\r\n#$,;";
+    string sep1 = "\r\n";
+    do
+    {
+        getline(file, line);
+        line = FindNextWord(line, word, sep1);
+        transform(word.begin(), word.end(), word.begin(), ToLower());
+    } while (word.substr(0,5) != "grids");
+
+    if (nversion == FIELDVIEW_2_4)
+    {
+        getline(file, line);
+    }
+    else
+    {
+        line = word.substr(5);
+    }
+
+    line = FindNextWord(line, word, separator);
+    from_string< int >(nBlocks, word, std::dec);
+    cout << "Number of Block: " << nBlocks << "\n";
+}
+
+void Pre_FieldViewToPHengLEI_Unstruct::GetFieldViewNBCType(fstream &file, int nversion, int &nBCType)
+{
+    string line, word;
+    string separator = " =\t\r\n#$,;";
+    string sep1 = "\r\n";
+
+    do
+    {
+        getline(file, line);
+        line = FindNextWord(line, word, sep1);
+        transform(word.begin(), word.end(), word.begin(), ToLower());
+    } while (word.substr(0, 14) != "boundary table");
+
+    //! Read in the number of BCs.
+    if (nversion == FIELDVIEW_2_4)
+    {
+        getline(file, line);
+        line = FindNextWord(line, word, separator);
+        from_string< int >(nBCType, word, std::dec);
+    }
+    else if (nversion == FIELDVIEW_3_0)
+    {
+        string word1 = word.substr(14);
+        from_string< int >(nBCType, word1, std::dec);
+    }
+    cout << nBCType << " BCs have been found in this field view file.\n";
+}
+
+void Pre_FieldViewToPHengLEI_Unstruct::GetFieldViewBCNameTable(fstream &file, int nversion, int nBCType, string *bctype_name_list)
+{
+    string line, word;
+    string separator = " =\t\r\n#$,;";
+    string sep1 = "\r\n";
+
+    int nskipwords = 1;
+
+    if (nversion == FIELDVIEW_3_0) nskipwords = 3;
+
+    //! Analyze the BCs.
+    for (int i = 0; i < nBCType; ++ i)
+    {
+        getline(file, line);
+        //! The first number is not necessary, so it was passed.
+        for (int m = 0; m < nskipwords; ++ m)
+        {
+            line = FindNextWord(line, word, separator);
+        }
+
+        //! Analyze the remain string.
+        line = FindNextWord(line, word, sep1);
+        TrimBlanks(word);
+        transform(word.begin(), word.end(), word.begin(), ToLower());
+
+        bctype_name_list[i] = word;
+        cout << "Boundary Condition: " << i << " = " << word << "\n";
+    }
+}
+
+void Pre_FieldViewToPHengLEI_Unstruct::GetFieldViewNTNode(fstream &file, int nversion, int &nTotalNode)
+{
+    string line, word;
+    string separator = " =\t\r\n#$,;";
+    string sep1 = "\r\n";
+
+    do
+    {
+        getline(file, line);
+        line = FindNextWord(line, word, sep1);
+        transform(word.begin(), word.end(), word.begin(), ToLower());
+    } while (word.substr(0, 5) != "nodes");
+
+    if (nversion == FIELDVIEW_2_4)
+    {
+        //! Read the node number.
+        getline(file, line);
+    }
+    else
+    {
+        line = word.substr(5);
+    }
+
+    line = FindNextWord(line, word, separator);
+    from_string< int >(nTotalNode, word, std::dec);
+    cout << " Number of Nodes = " << nTotalNode << "\n";
+}
+
+void Pre_FieldViewToPHengLEI_Unstruct::GetFieldViewNBFace(fstream &file, int nversion, int &nBoundFace)
+{
+    string line, word;
+    string separator = " =\t\r\n#$,;";
+    string sep1 = "\r\n";
+    string errmsg = "The file is not a Field-View file!";
+
+    getline(file, line);
+    line = FindNextWord(line, word, sep1);
+    transform(word.begin(), word.end(), word.begin(), ToLower());
+    if (word.substr(0, 14) != "boundary faces")
+    {
+        TK_Exit::ExceptionExit(errmsg);
+    }
+
+    if (nversion == FIELDVIEW_2_4)
+    {
+        //! Read the boundary face number.
+        getline(file, line);
+    }
+    else
+    {
+        line = word.substr(14);
+    }
+
+    line = FindNextWord(line, word, separator);
+    from_string< int >(nBoundFace, word, std::dec);
+    cout << " Number of Boundary Faces = " << nBoundFace << "\n";
+}
+
+void Pre_FieldViewToPHengLEI_Unstruct::GetFieldViewBCTypeTable(int nBCType, int nversion, string *bctype_name_list, int *bctype_list)
+{
+    using namespace PHSPACE;
+    map <string, int> fieldview_bcmap;
+    if (nversion == FIELDVIEW_3_0)
+    {
+        fieldview_bcmap.insert(pair<string, int>("interface"            , GRIDGEN_SPACE::INTERFACE           ));
+        fieldview_bcmap.insert(pair<string, int>("no boundary condition", GRIDGEN_SPACE::NO_BOUNDARY_CONDITION));
+        fieldview_bcmap.insert(pair<string, int>("solid surface"        , GRIDGEN_SPACE::SOLID_SURFACE       ));
+        fieldview_bcmap.insert(pair<string, int>("symmetry"             , GRIDGEN_SPACE::SYMMETRY            ));
+        fieldview_bcmap.insert(pair<string, int>("farfield"             , GRIDGEN_SPACE::FARFIELD            ));
+        fieldview_bcmap.insert(pair<string, int>("inflow"               , GRIDGEN_SPACE::INFLOW              ));
+        fieldview_bcmap.insert(pair<string, int>("outflow"              , GRIDGEN_SPACE::OUTFLOW             ));
+        fieldview_bcmap.insert(pair<string, int>("pole"                 , GRIDGEN_SPACE::POLE                ));
+        fieldview_bcmap.insert(pair<string, int>("generic #1"           , GRIDGEN_SPACE::GENERIC_1           ));
+        fieldview_bcmap.insert(pair<string, int>("generic #2"           , GRIDGEN_SPACE::GENERIC_2           ));
+        fieldview_bcmap.insert(pair<string, int>("generic #3"           , GRIDGEN_SPACE::GENERIC_3           ));
+    }
+    else if (nversion == FIELDVIEW_2_4)
+    {
+        fieldview_bcmap.insert(pair<string, int>("interface"            , GRIDGEN_SPACE::INTERFACE           ));
+        fieldview_bcmap.insert(pair<string, int>("no boundary condition", GRIDGEN_SPACE::NO_BOUNDARY_CONDITION));
+        fieldview_bcmap.insert(pair<string, int>("wall"                 , GRIDGEN_SPACE::SOLID_SURFACE       ));
+        fieldview_bcmap.insert(pair<string, int>("symmetry plane"       , GRIDGEN_SPACE::SYMMETRY            ));
+        fieldview_bcmap.insert(pair<string, int>("farfield"             , GRIDGEN_SPACE::FARFIELD            ));
+        fieldview_bcmap.insert(pair<string, int>("inflow"               , GRIDGEN_SPACE::INFLOW              ));
+        fieldview_bcmap.insert(pair<string, int>("outflow"              , GRIDGEN_SPACE::OUTFLOW             ));
+        fieldview_bcmap.insert(pair<string, int>("pole"                 , GRIDGEN_SPACE::POLE                ));
+        fieldview_bcmap.insert(pair<string, int>("generic #1"           , GRIDGEN_SPACE::GENERIC_1           ));
+        fieldview_bcmap.insert(pair<string, int>("generic #2"           , GRIDGEN_SPACE::GENERIC_2           ));
+        fieldview_bcmap.insert(pair<string, int>("generic #3"           , GRIDGEN_SPACE::GENERIC_3           ));
+    }
+
+    int maxNumberOFBC = static_cast<int>(fieldview_bcmap.size());
+
+    for (int i = 0; i < nBCType; ++ i)
+    {
+        map <string, int> :: const_iterator iter;
+        iter = fieldview_bcmap.find(bctype_name_list[i]);
+        if (iter == fieldview_bcmap.end())
+        {
+            // cout << "GetFieldViewBCTypeTable::û���ҵ���Ӧ�ı߽�����\n";
+            // exit(0);
+            cout << "Self defined Boundary Condition: " << bctype_name_list[ i ] << endl;
+            bctype_list[i] = maxNumberOFBC;
+            ++ maxNumberOFBC;
+        }
+        else
+        {
+            int bctype = iter->second;
+            bctype_list[i] = bctype;
+        }
+    }
+}
+
+void Pre_FieldViewToPHengLEI_Unstruct::Gridgen2CGNSBCTypeTable(int nBCType, int *bctype_list)
+{
+    using namespace PHSPACE;
+
+    map<int, int> bcmap;
+    typedef pair <int, int> Int_Pair;
+    map<int, int>::const_iterator iter;
+
+    bcmap.insert(Int_Pair(PHENGLEI::NO_BOUNDARY_CONDITION , BCTypeNull      ));
+    bcmap.insert(Int_Pair(PHENGLEI::INTERFACE             , BCTypeUserDefined));
+    bcmap.insert(Int_Pair(PHENGLEI::EXTRAPOLATION         , BCExtrapolate   ));
+    bcmap.insert(Int_Pair(PHENGLEI::SOLID_SURFACE         , BCWall          ));
+    bcmap.insert(Int_Pair(PHENGLEI::SYMMETRY              , BCSymmetryPlane ));
+    bcmap.insert(Int_Pair(PHENGLEI::INFLOW                , BCInflow        ));
+    bcmap.insert(Int_Pair(PHENGLEI::OUTFLOW               , BCOutflow       ));
+    bcmap.insert(Int_Pair(PHENGLEI::POLE                  , BCDegenerateLine));
+    bcmap.insert(Int_Pair(PHENGLEI::FARFIELD              , BCFarfield      ));
+    bcmap.insert(Int_Pair(PHENGLEI::GENERIC_1             , BCTypeUserDefined));
+    bcmap.insert(Int_Pair(PHENGLEI::GENERIC_2             , BCTypeUserDefined));
+    bcmap.insert(Int_Pair(PHENGLEI::GENERIC_3             , BCTypeUserDefined));
+    bcmap.insert(Int_Pair(PHENGLEI::PERIODIC              , BCTypeUserDefined));
+
+    const int maxNumberOfSelfDefineBC = 20;
+    const int maxNumberOFFieldViewBC  = 11;
+    const int maxNumberOFCGNSBC       = 26;
+    for (int iBC = 0; iBC < maxNumberOfSelfDefineBC; iBC ++)
+    {
+        bcmap.insert(Int_Pair(maxNumberOFFieldViewBC + iBC, maxNumberOFCGNSBC + iBC));
+    }
+
+    for (int i = 0; i < nBCType; ++ i)
+    {
+        iter = bcmap.find(bctype_list[i]);
+
+        if (iter == bcmap.end())
+        {
+            TK_Exit::ExceptionExit("Gridgen2CGNSBCTypeTable::No corresponding boundary conditions were found!\n");
+        }
+        else
+        {
+            bctype_list[i] = iter->second;
+        }
+    }
+}
+
+void Pre_FieldViewToPHengLEI_Unstruct::ReadFieldViewCoor(fstream &file, int nTotalNode, RDouble *x, RDouble *y, RDouble *z)
+{
+    string line,word;
+    string separator = " =\t\r\n#$,;";
+
+    RDouble xmin, ymin, zmin, xmax, ymax, zmax;
+    xmin = ymin = zmin =   LARGE;
+    xmax = ymax = zmax = - LARGE;
+
+    cout << " Grid coordinates reading ... \n";
+
+    int iskip = MAX(nTotalNode / 10, 1);
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        if (iNode > 0 && iNode % iskip == 0)
+        {
+            cout << "     " << (int)((iNode * 1.0) / nTotalNode * 100 + 1) << "% nodes read ..." << endl;
+        }
+        getline(file, line);
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(x[iNode], word, std::dec);
+
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(y[iNode], word, std::dec);
+
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(z[iNode], word, std::dec);
+
+        xmin = MIN(xmin, x[iNode]);
+        ymin = MIN(ymin, y[iNode]);
+        zmin = MIN(zmin, z[iNode]);
+
+        xmax = MAX(xmax, x[iNode]);
+        ymax = MAX(ymax, y[iNode]);
+        zmax = MAX(zmax, z[iNode]);
+    }
+
+    cout << setiosflags(ios::right);
+    cout << setprecision(8);
+    cout << setiosflags(ios::scientific);
+    cout << setiosflags(ios::showpoint);
+    int wordwidth = 16;
+    cout << " xmin = " << setw(wordwidth) << xmin << " xmax = " << setw(wordwidth) << xmax << "\n";
+    cout << " ymin = " << setw(wordwidth) << ymin << " ymax = " << setw(wordwidth) << ymax << "\n";
+    cout << " zmin = " << setw(wordwidth) << zmin << " zmax = " << setw(wordwidth) << zmax << "\n";
+}
+
+void Pre_FieldViewToPHengLEI_Unstruct::GetFieldViewBCCell(fstream &file, int nBoundFace, int *bctype_list, 
+                        int &nBC_Sections, int *&elem_type, int *&istart, int *&iend, cgsize_t **&conn_list,
+                        int &nBCRegions, cgsize_t **&bc_conn_list,
+                        int *&nBCElem, int *&bc_type)
+{
+    string line, word;
+    string separator = " =\t\r\n#$,;";
+
+    cout << "Boundary elements reading ......\n";
+
+    int *cell_type   = new int [nBoundFace];
+    int *cell_bctype = new int [nBoundFace];
+
+    const int max_face_node = 4;
+
+    int *node2Type = new int[max_face_node+1];
+
+    node2Type[3] = TRI_3;
+    node2Type[4] = QUAD_4;
+
+    cgsize_t *ref_conn_list = new cgsize_t[nBoundFace * max_face_node];
+
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        getline(file, line);
+
+        int bctype_index;
+        line = FindNextWord(line, word, separator);
+        from_string< int >(bctype_index, word, std::dec);
+
+        cell_bctype[iFace] = bctype_list[bctype_index-1];
+
+        //! The nodes number of each boundary face.
+        int nNode;
+        cgsize_t nodeIndex;
+        line = FindNextWord(line, word, separator);
+        from_string< int >(nNode, word, std::dec);
+
+        cell_type[iFace] = node2Type[nNode];
+
+        for (int iNode = 0; iNode < nNode; ++ iNode)
+        {
+            line = FindNextWord(line, word, separator);
+            from_string< cgsize_t >(nodeIndex, word, std::dec);
+            ref_conn_list[nodepos+iNode] = nodeIndex;
+        }
+        nodepos += max_face_node;
+    }
+
+    set<int> bctype_temp;
+    vector<int> bctype_set;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int type = cell_bctype[iFace];
+        set<int> :: const_iterator iter;
+        iter = bctype_temp.find(type);
+        if (iter == bctype_temp.end())
+        {
+            bctype_temp.insert(type);
+            bctype_set.push_back(type);
+        }
+    }
+    nBCRegions = static_cast<int>(bctype_set.size());
+
+    bc_type = new int [nBCRegions];
+    nBCElem = new int [nBCRegions];
+    bc_conn_list = new cgsize_t *[nBCRegions];
+
+    vector<int>::iterator iter;
+    int icount = 0;
+    for (iter = bctype_set.begin(); iter != bctype_set.end(); ++ iter)
+    {
+        bc_type[icount++] = *iter;
+    }
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegions; ++ iBCRegion)
+    {
+        icount = 0;
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            if (cell_bctype[iFace] == bc_type[iBCRegion])
+            {
+                icount ++;
+            }
+        }
+        nBCElem[iBCRegion] = icount;
+        bc_conn_list[iBCRegion] = new cgsize_t [nBCElem[iBCRegion]];
+    }
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegions; ++ iBCRegion)
+    {
+        icount = 0;
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            if (cell_bctype[iFace] == bc_type[iBCRegion])
+            {
+                bc_conn_list[iBCRegion][icount ++] = iFace;
+            }
+        }
+    }
+    int nTri, nQuad, nOthers;
+    nTri    = 0;
+    nQuad   = 0;
+    nOthers = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        if (cell_type[iFace] == TRI_3)
+        {
+            nTri ++;
+        }
+        else if (cell_type[iFace] == QUAD_4)
+        {
+            nQuad ++;
+        }
+        else
+        {
+            nOthers ++;
+        }
+    }
+
+    if (nOthers > 0)
+    {
+        TK_Exit::ExceptionExit("Unknown cell type!\n");
+        
+    }
+
+    nBC_Sections = 0;
+    if (nTri  ) nBC_Sections ++;
+    if (nQuad ) nBC_Sections ++;
+    if (nOthers) nBC_Sections ++;
+
+    int *elem_pt = new int[NofValidElementTypes];
+
+    elem_pt[NODE   ] = 1;
+    elem_pt[BAR_2  ] = 2;
+    elem_pt[TRI_3  ] = 3;
+    elem_pt[QUAD_4 ] = 4;
+    elem_pt[TETRA_4] = 4;
+    elem_pt[PYRA_5 ] = 5;
+    elem_pt[PENTA_6] = 6;
+    elem_pt[HEXA_8 ] = 8;
+
+    conn_list   = new cgsize_t * [nBC_Sections];
+    elem_type   = new int [nBC_Sections];
+    istart      = new int [nBC_Sections];
+    iend        = new int [nBC_Sections];
+    int *n_elem = new int [nBC_Sections];
+
+    nBC_Sections = 0;
+    int ptnum;
+    if (nTri)
+    {
+        elem_type[nBC_Sections] = TRI_3;
+        n_elem   [nBC_Sections] = nTri;
+        nBC_Sections ++;
+    }
+
+    if (nQuad)
+    {
+        elem_type[nBC_Sections] = QUAD_4;
+        n_elem   [nBC_Sections] = nQuad;
+        nBC_Sections ++;
+    }
+
+    istart[0] = 1;
+    for (int m = 0; m < nBC_Sections; ++ m)
+    {
+        iend[m] = istart[m] + n_elem[m] - 1;
+        if (m < nBC_Sections - 1)
+        {
+            istart[m+1] = iend[m] + 1;
+        }
+    }
+    delete [] n_elem;
+
+    for (int m = 0; m < nBC_Sections; ++ m)
+    {
+        int etype = elem_type[m];
+        ptnum = elem_pt[etype];
+        int nelem = iend[m] - istart[m] + 1;
+        conn_list[m] = new cgsize_t [nelem*ptnum];
+    }
+
+    for (int m = 0; m < nBC_Sections; ++ m)
+    {
+        nodepos = 0;
+        int bc_cell_pos = 0;
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            if (cell_type[iFace] == elem_type[m])
+            {
+                ptnum = elem_pt[elem_type[m]];
+                for (int j = 0; j < ptnum; ++ j)
+                {
+                    conn_list[m][bc_cell_pos+j] = ref_conn_list[nodepos+j];
+                }
+                bc_cell_pos += ptnum;
+            }
+            nodepos += max_face_node;
+        }
+    }
+
+    delete [] ref_conn_list;
+
+    int *sec_bc  = new int [nBoundFace];
+    int *sec_pos = new int [nBoundFace];
+
+    for (int m = 0; m < nBC_Sections; ++ m)
+    {
+        icount = 0;
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            if (cell_type[iFace] == elem_type[m])
+            {
+                sec_bc[iFace] = m;
+                sec_pos[iFace] = icount;
+                icount ++;
+            }
+        }
+    }
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegions; ++ iBCRegion)
+    {
+        for (int i = 0; i < nBCElem[iBCRegion]; ++ i)
+        {
+            uint_t idx = bc_conn_list[iBCRegion][i];
+            int m_sec = sec_bc [idx];
+            int m_pos = sec_pos[idx];
+            bc_conn_list[iBCRegion][i] = istart[m_sec] + m_pos;
+        }
+    }
+
+    delete [] node2Type;
+    delete [] sec_bc;
+    delete [] sec_pos;
+    delete [] cell_type;
+    delete [] cell_bctype;
+    delete [] elem_pt;
+}
+
+void Pre_FieldViewToPHengLEI_Unstruct::GetFieldViewMainCell(fstream &file, int &nTotalCell, int &nSections, int *&elem_type,
+                          int *&istart, int *&iend, cgsize_t **&conn_list)
+{
+    string line, word;
+    string separator = " =\t\r\n#$,;";
+    string sep1 = "\r\n";
+    string errmsg = "The file is not a Field-View file!";
+
+    getline(file, line);
+    line = FindNextWord(line, word, sep1);
+    transform(word.begin(), word.end(), word.begin(), ToLower());
+    if (word.substr(0, 8) != "elements")
+    {
+        TK_Exit::ExceptionExit(errmsg);
+    }
+
+    cout << "Interior cells start reading ......\n";
+
+    //! Cell type.
+    //! FieldView type��
+    //! 1. Tetrahedron
+    //! 2. Hexahedron
+    //! 3. Prism
+    //! 4. Pyramid
+
+    int *elem_pt = new int[NofValidElementTypes];
+
+    elem_pt[NODE   ] = 1;
+    elem_pt[BAR_2  ] = 2;
+    elem_pt[TRI_3  ] = 3;
+    elem_pt[QUAD_4 ] = 4;
+    elem_pt[TETRA_4] = 4;
+    elem_pt[PYRA_5 ] = 5;
+    elem_pt[PENTA_6] = 6;
+    elem_pt[HEXA_8 ] = 8;
+
+    int *TypeFieldView2CGNS = new int [NofValidElementTypes+1];
+
+    using namespace PHSPACE;
+
+    TypeFieldView2CGNS[FIELDVIEW_SPACE::TRIA] = TRI_3;
+    TypeFieldView2CGNS[FIELDVIEW_SPACE::QUAD] = QUAD_4;
+    TypeFieldView2CGNS[FIELDVIEW_SPACE::TETR] = TETRA_4;
+    TypeFieldView2CGNS[FIELDVIEW_SPACE::HEXA] = HEXA_8;
+    TypeFieldView2CGNS[FIELDVIEW_SPACE::PRIS] = PENTA_6;
+    TypeFieldView2CGNS[FIELDVIEW_SPACE::PYRA] = PYRA_5;
+
+    vector<int> elem_type_container;
+    vector<int> elem_number_container;
+    vector<cgsize_t> elem_index_container;
+
+    cgsize_t node_swap[8], node_results[8];
+    int total_elem = 0, iskip = 100000;
+    while (true)
+    {
+        streampos file_pos = file.tellp();
+        getline(file, line);
+        if (file.eof()) break;
+        string tmpstring = FindNextWord(line, word, separator);
+        transform(word.begin(), word.end(), word.begin(), ToLower());
+
+        if (!isdigit(word[0]))
+        {
+            file.seekp(file_pos);
+            break;
+        }
+
+        if (total_elem % iskip == 0)
+        {
+            cout << total_elem << " elem read ...........................\n";
+        }
+
+        //! Read cell type.
+        int fieldview_elem_type;
+        line = FindNextWord(line, word, separator);
+        from_string< int >(fieldview_elem_type, word, std::dec);
+
+        //! Read the cell number of this cell type.
+        int nelem_num;
+        line = FindNextWord(line, word, separator);
+        from_string< int >(nelem_num, word, std::dec);
+        cgsize_t nodeindex;
+
+        int etype = TypeFieldView2CGNS[fieldview_elem_type];
+        int ptnum = elem_pt[etype];
+
+        elem_type_container.push_back(etype);
+        elem_number_container.push_back(nelem_num);
+
+        for (int i = 0; i < nelem_num; ++ i)
+        {
+            for (int j = 0; j < ptnum; ++ j)
+            {
+                line = FindNextWord(line, word, separator);
+                from_string< cgsize_t >(nodeindex, word, std::dec);
+                node_swap[j] = nodeindex;
+            }
+
+            ElemReorderFieldView2CGNS(etype, node_swap, node_results);
+            for (int j = 0; j < ptnum; ++ j)
+            {
+                elem_index_container.push_back(node_results[j]);
+            }
+        }
+        total_elem += nelem_num;
+    }
+
+    cout << "Interior cells reading over.\n";
+    cout << " Number of elements = " << total_elem << "\n";
+
+    set<int> elem_type_set;
+
+    for (std::size_t i = 0; i < elem_type_container.size(); ++ i)
+    {
+        int etype = elem_type_container[i];
+        elem_type_set.insert(etype);
+    }
+
+    nSections = static_cast<int>(elem_type_set.size());
+    conn_list   = new cgsize_t * [nSections];
+    elem_type   = new int [nSections];
+    istart      = new int [nSections];
+    iend        = new int [nSections];
+    int *n_elem = new int [nSections];
+
+    Set2Array(elem_type_set, elem_type);
+
+    for (int m = 0; m < nSections; ++ m)
+    {
+        int n_total_nelem = 0;
+        for (std::size_t i = 0; i < elem_type_container.size(); ++ i)
+        {
+            int etype     = elem_type_container[i];
+            int nelem_num = elem_number_container[i];
+            if (etype == elem_type[m])
+            {
+                n_total_nelem += nelem_num;
+            }
+        }
+        int pt_num   = elem_pt[elem_type[m]];
+        conn_list[m] = new cgsize_t[n_total_nelem * pt_num];
+        n_elem[m]    = n_total_nelem;
+    }
+
+    nTotalCell = 0;
+    for (int m = 0; m < nSections; ++ m)
+    {
+        nTotalCell += n_elem[m];
+    }
+
+    istart[0] = 1;
+    for (int m = 0; m < nSections; ++ m)
+    {
+        iend[m] = istart[m] + n_elem[m] - 1;
+        if (m < nSections - 1)
+        {
+            istart[m+1] = iend[m] + 1;
+        }
+    }
+
+    delete [] n_elem;
+
+    for (int m = 0; m < nSections; ++ m)
+    {
+        int icount = 0;
+        int jcount = 0;
+        for (std::size_t i = 0; i < elem_type_container.size(); ++ i)
+        {
+            int etype     = elem_type_container[i];
+            int nelem_num = elem_number_container[i];
+            int ptnum     = elem_pt[etype];
+            int ptmax     = nelem_num * ptnum;
+
+            if (etype == elem_type[m])
+            {
+                for (int j = 0; j < ptmax; ++ j)
+                {
+                    conn_list[m][icount+j] = elem_index_container[jcount+j];
+                }
+                icount += ptmax;
+            }
+            jcount += ptmax;
+        }
+    }
+
+    delete [] TypeFieldView2CGNS;
+    delete [] elem_pt;
+}
+
+void Pre_FieldViewToPHengLEI_Unstruct::MergeFieldViewCell(CGNSFactory *factory_cgns, int iZone, int nBoundFace, int nTotalNode, int nTotalCell, 
+                        int nElem_Sections, int *elem_type, int *elem_istart, int *elem_iend, cgsize_t **elem_conn_list,
+                        int nBC_Sections, int *bc_elem_type, int *bc_istart, int *bc_iend, cgsize_t **bc_elem_conn_list,
+                        int nBCRegions, cgsize_t **bc_conn_list, int *nBCElem, int *bc_type)
+{
+    CGNSBase *base_cgns = factory_cgns->GetCGNSBase(iZone);
+    Base_Grid_Conn *gconn = factory_cgns->GetBaseGridConnection(iZone);
+
+    cout << "Merging cell..............................\n";
+    cout << "nElem_Sections = " << nElem_Sections << " nBC_Sections = " << nBC_Sections << "\n";
+
+    int nSections = nElem_Sections + nBC_Sections;
+    base_cgns->SetNBoundFace(nBoundFace);
+    base_cgns->SetNTotalNode(nTotalNode);
+    base_cgns->SetNTotalCell(nTotalCell);
+
+    gconn->SetNBoundFace(nBoundFace);
+    gconn->SetNTotalNode(nTotalNode);
+    gconn->SetNTotalCell(nTotalCell);
+
+    base_cgns->CreateElement(nSections);
+    base_cgns->SetNumberOfBCRegions(nBCRegions);
+
+    base_cgns->SetBoundaryElementConnectionList(new cgsize_t * [nBCRegions]);
+    base_cgns->SetBoundaryElementType(new int [nBCRegions]);
+    base_cgns->SetBoundaryGridLocation(new int [nBCRegions]);
+
+    cgsize_t *base_cgns_istart = base_cgns->GetIndexOfStart();
+    cgsize_t *base_cgns_iend   = base_cgns->GetIndexOfEnd();
+    int *base_cgns_elem_type   = base_cgns->GetElementType();
+
+    cgsize_t **base_cgns_conn_list    = base_cgns->GetElementConnectionList();
+    cgsize_t **base_cgns_bc_conn_list = base_cgns->GetBoundaryElementConnectionList();
+    cout << "    Warning: the cgsize_t type of conn_list has been convert to int type, when deal with FieldView grid. "
+         << "If the number of grid nodes/cells/faces exceed 4-billion in single core, it would be wrong here!" << endl;
+
+    for (int m = 0; m < nElem_Sections; ++ m)
+    {
+        base_cgns_istart[m] = elem_istart[m];
+        base_cgns_iend  [m] = elem_iend  [m];
+    }
+
+    for (int m = 0; m < nBC_Sections; ++ m)
+    {
+        base_cgns_istart[nElem_Sections+m] = nTotalCell + bc_istart[m];
+        base_cgns_iend  [nElem_Sections+m] = nTotalCell + bc_iend  [m];
+    }
+
+    for (int m = 0; m < nElem_Sections; ++ m)
+    {
+        base_cgns_conn_list[m] = elem_conn_list[m];
+    }
+
+    //! It seems to be something wrong in this place, and needs to be checked. Eric��201101030.
+    //for (int m = 0; m < nElem_Sections; ++ m)
+    for (int m = 0; m < nBC_Sections; ++ m)
+    {
+        base_cgns_conn_list[nElem_Sections+m] = bc_elem_conn_list[m];
+    }
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegions; ++ iBCRegion)
+    {
+        base_cgns_bc_conn_list[iBCRegion] = bc_conn_list[iBCRegion];
+        for (int j = 0; j < nBCElem[iBCRegion]; ++ j)
+        {
+            base_cgns_bc_conn_list[iBCRegion][j] += nTotalCell;
+        }
+    }
+
+    base_cgns->SetNumberOfBCElements(nBCElem);
+    int *base_cgns_bc_elem_set_type = base_cgns->GetBoundaryElementType();
+    int *base_cgns_bc_grid_location = base_cgns->GetBoundaryGridLocation();
+
+    base_cgns->SetBCType(bc_type);
+    for (int iBCRegion = 0; iBCRegion < nBCRegions; ++ iBCRegion)
+    {
+        base_cgns_bc_elem_set_type[iBCRegion] = ElementList;
+        base_cgns_bc_grid_location[iBCRegion] = CellCenter;
+    }
+
+    for (int m = 0; m < nElem_Sections; ++ m)
+    {
+        base_cgns_elem_type[m] = elem_type[m];
+    }
+
+    for (int m = 0; m < nBC_Sections; ++ m)
+    {
+        base_cgns_elem_type[nElem_Sections+m] = bc_elem_type[m];
+    }
+
+    delete [] elem_type;
+    delete [] bc_elem_type;
+
+    delete [] elem_istart;
+    delete [] elem_iend;
+    delete [] bc_istart;
+    delete [] bc_iend;
+
+    delete [] elem_conn_list;
+    delete [] bc_elem_conn_list;
+}
+
+void Pre_FieldViewToPHengLEI_Unstruct::ElemReorderFieldView2CGNS(int etype, cgsize_t *node_swap, cgsize_t *node_results)
+{
+    if (etype == TETRA_4)
+    {
+        node_results[0] = node_swap[1];
+        node_results[1] = node_swap[2];
+        node_results[2] = node_swap[3];
+        node_results[3] = node_swap[0];
+    }
+    else if (etype == PYRA_5)
+    {
+        //! This is actually the fixed here.
+        node_results[0] = node_swap[0];
+        node_results[1] = node_swap[1];
+        node_results[2] = node_swap[2];
+        node_results[3] = node_swap[3];
+        node_results[4] = node_swap[4];
+    }
+    else if (etype == PENTA_6)
+    {
+        node_results[0] = node_swap[0];
+        node_results[1] = node_swap[3];
+        node_results[2] = node_swap[5];
+        node_results[3] = node_swap[1];
+        node_results[4] = node_swap[2];
+        node_results[5] = node_swap[4];
+    }
+    else if (etype == HEXA_8)
+    {
+        node_results[0] = node_swap[0];
+        node_results[1] = node_swap[1];
+        node_results[2] = node_swap[3];
+        node_results[3] = node_swap[2];
+        node_results[4] = node_swap[4];
+        node_results[5] = node_swap[5];
+        node_results[6] = node_swap[7];
+        node_results[7] = node_swap[6];
+    }
+}
+
+void Pre_FieldViewToPHengLEI_Unstruct::Conversion()
+{
+    factory_cgns->ConvertGrid2Fantasy();
+
+    grids = new Grid * [nBlocks];
+
+    int nDim = PHSPACE::GetDim();
+    if (nDim != THREE_D)
+    {
+        cout << "Error: Only 3D mesh is supported by FiledView !" << endl;
+        exit(0);
+    }
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        GridID *index = new GridID(iZone);
+        Grid *grid = CreateGridGeneral(UNSTRUCTGRID, index, 0, GetDim());
+        grids[iZone] = grid;
+        CGNS2UnsGrid(factory_cgns, iZone, UnstructGridCast(grid));
+    }
+
+    delete factory_cgns;
+}
+
+}
diff --git a/API/PreProcess/src/Pre_FluentToPHengLEI_Unstruct.cpp b/API/PreProcess/src/Pre_FluentToPHengLEI_Unstruct.cpp
new file mode 100644
index 0000000..be2411f
--- /dev/null
+++ b/API/PreProcess/src/Pre_FluentToPHengLEI_Unstruct.cpp
@@ -0,0 +1,1074 @@
+#include "Pre_FluentToPHengLEI_Unstruct.h"
+#include "Geo_UnstructBC.h"
+#include "TK_Exit.h"
+#include "IO_FileName.h"
+#include "Glb_Dimension.h"
+#include "Math_BasisFunction.h"
+#include "PHIO.h"
+#include "Constants.h"
+#include "TK_Parse.h"
+#include "Pre_GridBase.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Pre_FluentToPHengLEI_Unstruct::Pre_FluentToPHengLEI_Unstruct(const string &gridFileName) :
+    Pre_GridConversion(gridFileName)
+{
+    fluent_factory = 0;
+}
+
+LIB_EXPORT Pre_FluentToPHengLEI_Unstruct::~Pre_FluentToPHengLEI_Unstruct()
+{
+
+}
+
+LIB_EXPORT void Pre_FluentToPHengLEI_Unstruct::WriteAdditionalInformation(const string &out_grid_file)
+{
+    //WriteFaceBC(out_grid_file, grids);
+    WriteFaceBoundaryName(out_grid_file, grids);
+}
+
+void Pre_FluentToPHengLEI_Unstruct::ReadGrid()
+{
+    ReadFluent(fluent_factory, nBlocks, gridFileName);
+    fluent_factory->DumpSelfDefinePartInformation();
+}
+
+void Pre_FluentToPHengLEI_Unstruct::Conversion()
+{
+    fluent_factory->DumpSelfDefinePartInformation();
+
+    grids = new Grid * [nBlocks];
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        GridID *index = new GridID(iZone);
+        Grid *grid = CreateGridGeneral(UNSTRUCTGRID, index, 0, GetDim());
+        grids[iZone] = grid;
+        fluent_factory->Convert2UnsGrid(UnstructGridCast(grid));
+    }
+    delete fluent_factory;
+}
+
+void Pre_FluentToPHengLEI_Unstruct::ReadFluent(GridFormat_Fluent *&fluent_factory, int &nBlocks, const string &casefile)
+{
+    fstream file;
+    file.open(casefile.c_str(), ios_base::in);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(casefile);
+    }
+
+    string line;
+
+    nBlocks = 1;
+    fluent_factory = new GridFormat_Fluent();
+
+    while (true && !file.eof())
+    {
+        getline(file, line);
+        cout << line << "\n";
+        //! The following situation need to be judged.
+        if (line.size() == 0) continue;
+        if (line[0] == '(')
+        {
+            AnalysisFluentKeyWord(fluent_factory, file, line);
+        }
+    }
+
+    file.close();
+    file.clear();
+
+    fluent_factory->Process();
+
+    vector< FluentFacePatch * > &face_patchs = fluent_factory->GetFluentFacePatchS();
+
+    cout << "Total number of boundaries: " << face_patchs.size() << "\n";
+    for (std::size_t i = 0; i < face_patchs.size(); ++ i)
+    {
+        if (face_patchs[i]->GetBCType() != 100)
+        {
+            cout << face_patchs[i]->GetBCType() << " " << face_patchs[i]->GetPatchName() << "\n";
+        }
+    }
+}
+
+void Pre_FluentToPHengLEI_Unstruct::AnalysisFluentKeyWord(GridFormat_Fluent *fluent_factory, fstream &file, string &line)
+{
+    string word;
+    string word0;
+    string separator = " \r\n()";
+    string sep0 = "\r\n()";
+
+    //! Nodes 
+    //! (10 (zone-id first-index last-index type ND))
+    //! Cells 
+    //! (12 (zone-id first-index last-index type element-type))
+    //! Faces 
+    //! (13 (zone-id first-index last-index bc-type face-type))
+    //! Periodic Shadow Faces
+    //! (18 (first-index last-index periodic-zone shadow-zone))
+    //! Cell Tree 
+    //! (58 (cell-id0 cell-id1 parent-zone-id child-zone-id))
+    //! Face Tree
+    //! (59 (face-id0 face-id1 parent-zone-id child-zone-id))
+    //! Interface Face Parents
+    //! (61 (face-id0 face-id1))
+
+    int section_ID, dimension;
+    int zone_id, first_index, last_index, type, element_type, bc_type, face_type;
+
+    line = line.substr(1);
+
+    line = FindNextWord(line, word, separator);
+    from_string< int >(section_ID, word, std::dec);
+
+    using namespace FLUENT_SPACE;
+
+    if (section_ID == FLUENT_SPACE::FLUENT_COMMENT)
+    {
+    }
+    else if (section_ID == FLUENT_SPACE::FLUENT_HEADER)
+    {
+        line = FindNextWord(line, word, sep0);
+        cout << word << "\n";
+    }
+    else if (section_ID == FLUENT_SPACE::FLUENT_DIMENSIONS)
+    {
+        line = FindNextWord(line, word, separator);
+        from_string< int >(dimension, word, std::hex);
+        fluent_factory->SetDimension(dimension);
+
+        if (GetDim() != dimension)
+        {
+            cout << "Error: Wrong dimensional information !" << endl;
+            exit(0);
+        }
+    }
+    else if (section_ID == FLUENT_SPACE::FLUENT_NODES)
+    {
+        line = FindNextWord(line, word, separator);
+        from_string< int >(zone_id, word, std::hex);
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(first_index, word, std::hex);
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(last_index, word, std::hex);
+
+        if (zone_id == 0)
+        {
+            fluent_factory->SetNTotalNode(last_index - first_index + 1);
+
+            int nTotalNode = last_index - first_index + 1;
+            RDouble *x = new RDouble[nTotalNode];
+            RDouble *y = new RDouble[nTotalNode];
+            RDouble *z = new RDouble[nTotalNode];
+
+            RawGrid *rawgrid = fluent_factory->GetRawGrid();
+            rawgrid->SetNTotalNode(nTotalNode);
+            rawgrid->SetX(x);
+            rawgrid->SetY(y);
+            rawgrid->SetZ(z);
+        }
+        else
+        {
+            int nodeType, nodeDimension;
+            line = FindNextWord(line, word, separator);
+            from_string< int >(nodeType, word, std::hex);
+
+            line = FindNextWord(line, word, separator);
+            from_string< int >(nodeDimension, word, std::hex);
+
+            RawGrid *rawgrid = fluent_factory->GetRawGrid();
+            ReadFluentNodes(rawgrid, first_index, last_index, fluent_factory->GetDimension(), file);
+        }
+    }
+    else if (section_ID == FLUENT_SPACE::FLUENT_EDGES)
+    {
+        line = FindNextWord(line, word, separator);
+        from_string< int >(zone_id, word, std::hex);
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(first_index, word, std::hex);
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(last_index, word, std::hex);
+
+        if (zone_id != 0)
+        {
+            line = FindNextWord(line, word, separator);
+            from_string< int >(type, word, std::hex);
+
+            ReadFluentEdge(first_index, last_index, file);
+        }
+
+    }
+    else if (section_ID == FLUENT_SPACE::FLUENT_CELLS)
+    {
+        line = FindNextWord(line, word, separator);
+        from_string< int >(zone_id, word, std::hex);
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(first_index, word, std::hex);
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(last_index, word, std::hex);
+
+        if (zone_id == 0)
+        {
+            fluent_factory->SetNTotalCell(last_index - first_index + 1);
+        }
+        else
+        {
+            line = FindNextWord(line, word, separator);
+            from_string< int >(type, word, std::hex);
+
+            line = FindNextWord(line, word, separator);
+            from_string< int >(element_type, word, std::hex);
+
+            if (element_type == FLUENT_SPACE::ELEMENTTYPE_MIXED)
+            {
+                ReadFluentCell(first_index, last_index, file);
+            }
+        }
+    }
+    else if (section_ID == FLUENT_SPACE::FLUENT_FACES)
+    {
+        line = FindNextWord(line, word, separator);
+        from_string< int >(zone_id, word, std::hex);
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(first_index, word, std::hex);
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(last_index, word, std::hex);
+
+        if (zone_id == 0)
+        {
+            fluent_factory->SetNTotalFace(last_index - first_index + 1);
+        }
+        else
+        {
+            line = FindNextWord(line, word, separator);
+            from_string< int >(bc_type, word, std::hex);
+
+            line = FindNextWord(line, word, separator);
+            from_string< int >(face_type, word, std::hex);
+
+            ReadFluentFace(fluent_factory, zone_id, first_index, last_index, bc_type, face_type, file);
+        }
+    }
+    else if (section_ID == FLUENT_SPACE::FLUENT_PERIODICFACES)
+    {
+        int periodicFaceZone, shadowFaceZone;
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(first_index, word, std::hex);
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(last_index, word, std::hex);
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(periodicFaceZone, word, std::hex);
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(shadowFaceZone, word, std::hex);
+
+        ReadFluentPeriodicface(first_index, last_index, file);
+    }
+    else if (section_ID == FLUENT_SPACE::FLUENT_C45)
+    {
+        line = FindNextWord(line, word0, separator);
+        from_string< int >(zone_id, word0, std::dec);
+        line = FindNextWord(line, word, separator);
+
+        line = FindNextWord(line, word, separator);
+
+        word0.insert(0, "-");
+        string::size_type loc = word.find(word0);
+
+        if (loc != string::npos)
+        {
+            word.erase(loc);
+        }
+
+        string selfDefineBCName = word;
+
+        fluent_factory->SetBoundaryName(zone_id, selfDefineBCName);
+    }
+    else if (section_ID == FLUENT_SPACE::FLUENT_C39)
+    {
+        line = FindNextWord(line, word0, separator);
+        from_string< int >(zone_id, word0, std::dec);
+        line = FindNextWord(line, word, separator);
+
+        line = FindNextWord(line, word, separator);
+
+        word0.insert(0, "-");
+        string::size_type loc = word.find(word0);
+
+        if (loc != string::npos)
+        {
+            word.erase(loc);
+        }
+
+        string selfDefineBCName = word;
+
+        fluent_factory->SetBoundaryName(zone_id, selfDefineBCName);
+    }
+    else if (section_ID == FLUENT_SPACE::FLUENT_CELLTREE)
+    {
+        line = FindNextWord(line, word, separator);
+        from_string< int >(first_index, word, std::hex);
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(last_index, word, std::hex);
+
+        int parentZoneId, childZoneId;
+        line = FindNextWord(line, word, separator);
+        from_string< int >(parentZoneId, word, std::hex);
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(childZoneId, word, std::hex);
+
+        ReadFluentCellTree(first_index, last_index, file);
+    }
+    else if (section_ID == FLUENT_SPACE::FLUENT_FACETREE)
+    {
+        line = FindNextWord(line, word, separator);
+        from_string< int >(first_index, word, std::hex);
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(last_index, word, std::hex);
+
+        int parentZoneId, childZoneId;
+        line = FindNextWord(line, word, separator);
+        from_string< int >(parentZoneId, word, std::hex);
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(childZoneId, word, std::hex);
+
+        ReadFluentFaceTree(first_index, last_index, file);
+    }
+    else
+    {
+        int frontBracket = count(line.begin(), line.end(), '(') + 1;
+        int closedBracket = count(line.begin(), line.end(), ')');
+        frontBracket = frontBracket - closedBracket;
+
+        while (frontBracket)
+        {
+            getline(file, line);
+
+            int frontBracket1  = count(line.begin(), line.end(), '(');
+            int closedBracket1 = count(line.begin(), line.end(), ')');
+
+            frontBracket = frontBracket + frontBracket1 - closedBracket1;
+        }
+    }
+}
+
+void Pre_FluentToPHengLEI_Unstruct::ReadFluentNodes(RawGrid *rawgrid, int first_index, int last_index, int dimension, fstream &file)
+{
+    RDouble *x = rawgrid->GetX();
+    RDouble *y = rawgrid->GetY();
+    RDouble *z = rawgrid->GetZ();
+
+    string line, word;
+    string separator = " \r\n()";
+
+    int i = first_index;
+    do
+    {
+        getline(file, line);
+        line = FindNextWord(line, word, separator);
+        if (word == "") continue;
+
+        from_string< RDouble >(x[i-1], word, std::dec);
+
+        line = FindNextWord(line, word, separator);
+        from_string< RDouble >(y[i-1], word, std::dec);
+
+        if (dimension == TWO_D)
+        {
+            z[i-1] = 0.0;
+        }
+        else
+        {
+            line = FindNextWord(line, word, separator);
+            from_string< RDouble >(z[i-1], word, std::dec);
+        }
+
+        ++ i;
+    } while (i <= last_index);
+}
+
+void Pre_FluentToPHengLEI_Unstruct::ReadFluentFace(GridFormat_Fluent *fluent_factory, int zone_id, int first_index, int last_index, int bc_type, int face_type, fstream &file)
+{
+    int nTotalFace = last_index - first_index + 1;
+
+    string line, word;
+    string separator = " \r\n()";
+
+    //! A non-zero zone-id indicates a regular face section, and will be followed by a body that contains information about the grid connectivity.
+    //! Each line of the body will describe one face and will have the following format: 
+    //! n0 n1 n2 c0 c1
+    //! where, n* = defining nodes (vertices) of the face 
+    //! c* = adjacent cells 
+    //! This is the format for a 3D grid with a triangular face format.
+    //! The actual number of nodes depends on the face-type.
+    //! The order of the cell indices is important, and is determined by the right-hand rule: 
+    //! if you curl the fingers of your right hand in the order of the nodes, your thumb will point toward c1.
+
+    //! If the face zone is of mixed type (face-type = 0), 
+    //! each line of the section body will begin with a reference to the number of nodes that make up that particular face,
+    //! and has the following format: 
+    //! x n0 n1 ... nf c0 c1
+    //! where, 
+    //! x = the number of nodes (vertices) of the face 
+    //! nf = the final node of the face.
+
+    vector< FluentFacePatch * > &face_patchs = fluent_factory->GetFluentFacePatchS();
+    FluentFacePatch *face_patch = new FluentFacePatch();
+    face_patchs.push_back(face_patch);
+
+    face_patch->SetZoneID(zone_id);
+    face_patch->SetBCType(bc_type);
+    face_patch->SetFaceType(face_type);
+    face_patch->SetNTotalFace(nTotalFace);
+
+    vector<int> face_node;
+    vector< vector<int> > &face2node = face_patch->GetFace2Node();
+    vector<int> &left_cell_of_face  = face_patch->GetLeftCellOfFace();
+    vector<int> &right_cell_of_face = face_patch->GetRightCellOfFace();
+
+    int number, nodeid, le ,re;
+
+    if (face_type == FLUENT_SPACE::FACETYPE_MIXED || face_type == FLUENT_SPACE::FACETYPE_POLYGONAL)
+    {
+        int i = first_index;
+        do
+        {
+            getline(file, line);
+            line = FindNextWord(line, word, separator);
+            if (word == "") continue;
+
+            from_string< int >(number, word, std::hex);
+            face_node.resize(number);
+
+            for (int j = 1; j <= number; ++ j)
+            {
+                line = FindNextWord(line, word, separator);
+                from_string< int >(nodeid, word, std::hex);
+                face_node[j-1] = nodeid;
+            }
+            face2node.push_back(face_node);
+
+            line = FindNextWord(line, word, separator);
+            from_string< int >(le, word, std::hex);
+            line = FindNextWord(line, word, separator);
+            from_string< int >(re, word, std::hex);
+
+            if (bc_type == FLUENT_SPACE::INTERIOR  && fluent_factory->GetDimension() == THREE_D)
+            {
+                SWAP(le, re);
+            }
+
+            left_cell_of_face.push_back(le);
+            right_cell_of_face.push_back(re);
+
+            ++ i;
+        } while (i <= last_index);
+    }
+    else
+    {
+        int i = first_index;
+        do
+        {
+            getline(file, line);
+            line = FindNextWord(line, word, separator);
+            if (word == "") continue;
+
+            face_node.resize(face_type);
+
+            for (int j = 1; j <= face_type; ++ j)
+            {
+                from_string< int >(nodeid, word, std::hex);
+                face_node[j-1] = nodeid;
+                line = FindNextWord(line, word, separator);
+            }
+            face2node.push_back(face_node);
+
+            from_string< int >(le, word, std::hex);
+            line = FindNextWord(line, word, separator);
+            from_string< int >(re, word, std::hex);
+
+            if (bc_type == FLUENT_SPACE::INTERIOR  && fluent_factory->GetDimension() == THREE_D)
+            {
+                SWAP(le, re);
+            }
+
+            left_cell_of_face.push_back(le);
+            right_cell_of_face.push_back(re);
+            ++ i;
+        } while (i <= last_index);
+    }
+    //delete face_patch;
+}
+
+void Pre_FluentToPHengLEI_Unstruct::ReadFluentEdge(int first_index, int last_index, fstream &file)
+{
+    string line, word;
+    string separator = " \r\n()";
+
+    int node1, node2;
+    int i = first_index;
+    do
+    {
+        getline(file, line);
+        line = FindNextWord(line, word, separator);
+        if (word == "") continue;
+
+        from_string< int >(node1, word, std::hex);
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(node2, word, std::hex);
+
+        ++ i;
+    } while (i <= last_index);
+}
+
+void Pre_FluentToPHengLEI_Unstruct::ReadFluentPeriodicface(int first_index, int last_index, fstream &file)
+{
+    string line, word;
+    string separator = " \r\n()";
+
+    int periodicFaceIndex, shadowFaceIndex;
+    int i = first_index;
+    do
+    {
+        getline(file, line);
+        line = FindNextWord(line, word, separator);
+        if (word == "") continue;
+
+        from_string< int >(periodicFaceIndex, word, std::hex);
+
+        line = FindNextWord(line, word, separator);
+        from_string< int >(shadowFaceIndex, word, std::hex);
+
+        ++ i;
+    }while (i <= last_index);
+}
+
+void Pre_FluentToPHengLEI_Unstruct::ReadFluentCellTree(int first_index, int last_index, fstream &file)
+{
+    string line, word;
+    string separator = " \r\n()";
+
+    int numberOfKids, kidIndex;
+    int i = first_index;
+    do
+    {
+        getline(file, line);
+        line = FindNextWord(line, word, separator);
+        if (word == "") continue;
+
+        from_string< int >(numberOfKids, word, std::hex);
+
+        for (int iKid = 0; iKid < numberOfKids; ++ iKid)
+        {
+            line = FindNextWord(line, word, separator);
+            from_string< int >(kidIndex, word, std::hex);
+        }
+
+        ++ i;
+    }while (i <= last_index);
+}
+
+void Pre_FluentToPHengLEI_Unstruct::ReadFluentFaceTree(int first_index, int last_index, fstream &file)
+{
+    string line, word;
+    string separator = " \r\n()";
+
+    int numberOfKids, kidIndex;
+    int i = first_index;
+    do
+    {
+        getline(file, line);
+        line = FindNextWord(line, word, separator);
+        if (word == "") continue;
+
+        from_string< int >(numberOfKids, word, std::hex);
+
+        for (int iKid = 0; iKid < numberOfKids; ++ iKid)
+        {
+            line = FindNextWord(line, word, separator);
+            from_string< int >(kidIndex, word, std::hex);
+        }
+
+        ++ i;
+    }while (i <= last_index);
+}
+
+void Pre_FluentToPHengLEI_Unstruct::ReadFluentCell(int first_index, int last_index, fstream &file)
+{
+    string line, word;
+    string separator = " \r\n()";
+
+    int type;
+
+    int i = first_index;
+    do
+    {
+        getline(file, line);
+        line = FindNextWord(line, word, separator);
+        if (word == "") continue;
+
+        do
+        {
+            from_string< int >(type, word, std::hex);
+            line = FindNextWord(line, word, separator);
+
+            ++ i;
+            if (word == "") break;
+        } while (true);
+    } while (i <= last_index);
+}
+
+GridFormat_Fluent::GridFormat_Fluent()
+{
+    rawgrid = new RawGrid();
+    BuildBCMap();
+}
+
+GridFormat_Fluent::~GridFormat_Fluent()
+{
+    delete rawgrid;
+}
+
+void GridFormat_Fluent::BuildBCMap()
+{
+    typedef pair <int, int> Int_Pair;
+    using namespace PHSPACE;
+    bcmap.insert(Int_Pair(FLUENT_SPACE::INTERIOR          , PHENGLEI::INTERIOR            ));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::WALL              , PHENGLEI::SOLID_SURFACE       ));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::PRESSURE_INLET    , PHENGLEI::INFLOW              ));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::INLET_VENT        , PHENGLEI::INFLOW              ));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::INTAKE_FAN        , PHENGLEI::INFLOW              ));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::VELOCITY_INLET    , PHENGLEI::INFLOW));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::PRESSURE_OUTLET   , PHENGLEI::OUTFLOW             ));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::EXHAUST_FAN       , PHENGLEI::OUTFLOW             ));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::OUTLET_VENT       , PHENGLEI::OUTFLOW             ));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::SYMMETRY          , PHENGLEI::SYMMETRY            ));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::PERIODIC_SHADOW   , PHENGLEI::PERIODIC            ));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::PRESSURE_FAR_FIELD, PHENGLEI::FARFIELD            ));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::PERIODIC          , PHENGLEI::PERIODIC            ));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::FAN               , PHENGLEI::NO_BOUNDARY_CONDITION));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::POROUS_JUMP       , PHENGLEI::NO_BOUNDARY_CONDITION));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::RADIATOR          , PHENGLEI::NO_BOUNDARY_CONDITION));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::MASS_FLOW_INLET   , PHENGLEI::INFLOW              ));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::INTERFACE         , PHENGLEI::OVERSET             ));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::OUTFLOW           , PHENGLEI::OUTFLOW             ));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::AXIS              , PHENGLEI::POLE                ));
+    bcmap.insert(Int_Pair(FLUENT_SPACE::UNSPECIFIED       , PHENGLEI::GENERIC_1           ));
+
+    int maxNumberOfBody = PHENGLEI::ENDNumberOfBodyOfHyperFLOW - PHENGLEI::StartNumberOfBodyOfHyperFLOW + 1;
+    for (int iBody = 0; iBody < maxNumberOfBody; iBody ++)
+    {
+        bcmap.insert(Int_Pair(FLUENT_SPACE::MaxFluentBCType + iBody, PHENGLEI::StartNumberOfBodyOfHyperFLOW + iBody));
+    }
+}
+
+int GridFormat_Fluent::Fluent2FantasyBC(int bctype)
+{
+    map<int, int>::const_iterator iter;
+
+    iter = bcmap.find(bctype);
+    if (iter == bcmap.end())
+    {
+        TK_Exit::ExceptionExit("Error: couldn't map fluent BC to HyperFLOW BC!\n");
+    }
+    return iter->second;
+}
+
+void GridFormat_Fluent::Process()
+{
+    ReorderFacePatchs();
+
+    nBoundFace = 0;
+    for (std::size_t m = 0; m < face_patchs.size(); ++ m)
+    {
+        int bc_type = face_patchs[m]->GetBCType();
+        if (bc_type != FLUENT_SPACE::INTERIOR)
+        {
+            nBoundFace += face_patchs[m]->GetNTotalFace();
+        }
+    }
+
+    for (std::size_t m = 0; m < face_patchs.size(); ++ m)
+    {
+        int bc_type = face_patchs[m]->GetBCType();
+        int nPFace  = face_patchs[m]->GetNTotalFace();
+
+        vector< vector<int> > &face2node = face_patchs[m]->GetFace2Node();
+
+        vector<int> &left_cell_of_face  = face_patchs[m]->GetLeftCellOfFace();
+        vector<int> &right_cell_of_face = face_patchs[m]->GetRightCellOfFace();
+
+        for (int i = 0; i < nPFace; ++ i)
+        {
+            left_cell_of_face[i]  -= 1;
+            right_cell_of_face[i] -= 1;
+
+            uint_t npt = face2node[i].size();
+            for (int j = 0; j < npt; ++ j)
+            {
+                face2node[i][j] -= 1;
+            }
+        }
+
+        if (bc_type != FLUENT_SPACE::INTERIOR && this->dimension == THREE_D)
+        {
+            for (int i = 0; i < nPFace; ++ i)
+            {
+                std::reverse(face2node[i].begin(), face2node[i].end());
+            }
+        }
+    }
+
+    for (std::size_t m = 0; m < face_patchs.size(); ++ m)
+    {
+        face_patchs[m]->SetBCType(Fluent2FantasyBC(face_patchs[m]->GetBCType()));
+    }
+}
+
+void GridFormat_Fluent::ReorderFacePatchs()
+{
+    nPatchs = static_cast<int>(face_patchs.size());
+
+    int firstp = 0;
+    int lastp = nPatchs - 1;
+
+    while (firstp < lastp)
+    {
+        int bc_type;
+        bool flag = false;
+        for (int m = lastp; m >= 0; -- m)
+        {
+            bc_type = face_patchs[m]->GetBCType();
+            if (bc_type != FLUENT_SPACE::INTERIOR)
+            {
+                lastp = m;
+                flag  = true;
+                break;
+            }
+        }
+
+        if (!flag)
+        {
+            break;
+        }
+
+        flag = false;
+        for (int m = firstp; m < lastp; ++ m)
+        {
+            bc_type = face_patchs[m]->GetBCType();
+            if (bc_type == FLUENT_SPACE::INTERIOR)
+            {
+                firstp = m;
+                flag = true;
+                break;
+            }
+        }
+
+        if (!flag)
+        {
+            break;
+        }
+
+        SWAP(face_patchs[firstp], face_patchs[lastp]);
+    }
+}
+
+void GridFormat_Fluent::SetBoundaryName(int zoneIndex, const string &BCName)
+{
+    vector< FluentFacePatch * > &face_patchs = this->GetFluentFacePatchS();
+
+    for (std::size_t iPatch = 0; iPatch < face_patchs.size(); ++ iPatch)
+    {
+        int zoneIndexOfFacePatch = face_patchs[iPatch]->GetZoneID();
+        if (zoneIndexOfFacePatch == zoneIndex)
+        {
+            face_patchs[iPatch]->SetPatchName(BCName);
+            return;
+        }
+    }
+}
+
+void GridFormat_Fluent::ResetBCTypeOfSelfDefinePart(int zoneIndex)
+{
+    int MaxBCType = -1;
+    vector< FluentFacePatch * > &face_patchs = this->GetFluentFacePatchS();
+    for (std::size_t iPatch = 0; iPatch < face_patchs.size(); ++ iPatch)
+    {
+        int bcType = face_patchs[iPatch]->GetBCType();
+        MaxBCType = MAX(MaxBCType, bcType);
+    }
+
+    if (MaxBCType < FLUENT_SPACE::MaxFluentBCType)
+    {
+        MaxBCType = FLUENT_SPACE::MaxFluentBCType;
+    }
+    else
+    {
+        ++ MaxBCType;
+    }
+
+    for (std::size_t iPatch = 0; iPatch < face_patchs.size(); ++ iPatch)
+    {
+        int zoneIndexOfFacePatch = face_patchs[iPatch]->GetZoneID();
+        if (zoneIndexOfFacePatch == zoneIndex)
+        {
+            face_patchs[iPatch]->SetBCType(MaxBCType);
+        }
+    }
+}
+
+void GridFormat_Fluent::DumpSelfDefinePartInformation()
+{
+    //! Collect all of the boundary condition.
+    set< string > nameContainer;
+    vector< int > bcType;
+    vector< string > boundaryName;
+
+    vector< FluentFacePatch * > &face_patchs = this->GetFluentFacePatchS();
+    for (std::size_t iPatch = 0; iPatch < face_patchs.size(); ++ iPatch)
+    {
+        int fantasyBCType = face_patchs[iPatch]->GetBCType();
+
+        string bcName = face_patchs[iPatch]->GetPatchName();
+
+        if (fantasyBCType >= PHENGLEI::StartNumberOfBodyOfHyperFLOW && fantasyBCType <= PHENGLEI::ENDNumberOfBodyOfHyperFLOW)
+        {
+            set< string > :: iterator nameIter;
+            nameIter = nameContainer.find(bcName);
+            if (nameIter == nameContainer.end())
+            {
+                boundaryName.push_back(bcName);
+                bcType.push_back(fantasyBCType);
+            }
+        }
+    }
+
+    uint_t nPart = bcType.size();
+    if (!nPart)
+    {
+        return;
+    }
+
+    string fileName;
+    GlobalDataBase::GetData("from_gfile", &fileName, PHSTRING, 1);
+    fileName = ChangeExtensionOfFileName(fileName, "part");
+
+    fstream outfile(fileName.c_str(), ios::out);
+    if (!outfile)
+    {
+        ostringstream oss;
+        oss << "Can not open file " << fileName << endl;
+        TK_Exit::ExceptionExit(oss.str());
+    }
+
+    RDouble dm = 0.0, dl = 0.0, dn3 = 0.0;
+    RFloat Lref = 1.0, Sref = 1.0, xref = 0.0, yref = 0.0, zref = 0.0;
+
+    outfile << nPart << endl;
+    outfile << dm << " " << dl << " " << dn3 << endl;
+
+    vector< int > :: iterator typeIter = bcType.begin();
+    vector< string > :: iterator nameIter = boundaryName.begin();
+
+    for (int iPart = 0; iPart < nPart; ++ iPart)
+    {
+        int type = *typeIter;
+        string name = *nameIter;
+
+        outfile << name << "	" << type << endl;
+        outfile << "		" << xref << "	" << yref << "	" << zref << "	" << Sref << "	" << Lref << endl;
+
+        ++ typeIter;
+        ++ nameIter;
+    }
+
+    outfile.close();
+    outfile.clear();
+}
+
+void GridFormat_Fluent::Convert2UnsGrid(UnstructGrid *grid)
+{
+    int fcount, count;
+    RawGrid *rawgrid = GetRawGrid();
+
+    int nTotalCell = GetNTotalCell();
+    int nTotalNode = GetNTotalNode();
+    int nBoundFace = GetNBoundFace();
+    grid->SetNTotalCell(nTotalCell);
+    grid->SetNTotalNode(nTotalNode);
+    grid->SetNBoundFace(nBoundFace);
+
+    RDouble *x = new RDouble[nTotalNode];
+    RDouble *y = new RDouble[nTotalNode];
+    RDouble *z = new RDouble[nTotalNode];
+    grid->SetX(x);
+    grid->SetY(y);
+    grid->SetZ(z);
+
+    RDouble *xx = rawgrid->GetX();
+    RDouble *yy = rawgrid->GetY();
+    RDouble *zz = rawgrid->GetZ();
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        x[iNode] = xx[iNode];
+        y[iNode] = yy[iNode];
+        z[iNode] = zz[iNode];
+    }
+
+    vector <string> bcNameList;
+    vector <int> bcTypeList;
+    set<string> bcNameSet;
+    count = 0;
+
+    UnstructBCSet **bcrs = new UnstructBCSet *[nBoundFace];
+    vector< FluentFacePatch * > &face_patchs = GetFluentFacePatchS();
+    for (std::size_t m = 0; m < face_patchs.size(); ++ m)
+    {
+        int bc_type = face_patchs[m]->GetBCType();
+        string bcNam = face_patchs[m]->GetPatchName();
+        if (bc_type == PHENGLEI::INTERIOR)
+        {
+            continue;
+        }
+
+        int nfsum = face_patchs[m]->GetNTotalFace();
+        for (int i = 0; i < nfsum; ++ i)
+        {
+            bcTypeList.push_back(bc_type);
+            bcNameList.push_back(bcNam);
+            bcNameSet.insert(bcNameList[count]);
+
+            bcrs[count] = new UnstructBCSet();
+            bcrs[count]->SetKey(bc_type);
+            bcrs[count]->SetBCName(bcNam);
+
+            ++ count;
+        }
+    }
+
+    grid->SetBCRecord(bcrs);
+
+    int nBCRegionUnstruct = static_cast<int>(bcNameSet.size());
+    grid->CreateUnstructBCSet(nBCRegionUnstruct);
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int* bcRegionIDofBCFace = new int[nBoundFace];
+    set<string>::iterator iter;
+    
+    count = 0;
+    for (iter = bcNameSet.begin(); iter != bcNameSet.end(); iter++)
+    {
+        UnstructBC *unstructBC = new UnstructBC(count);
+        unstructBCSet->SetBCRegion(count, unstructBC);
+        unstructBC->SetBCName(*iter);
+
+        for (int iFace = 0; iFace < nBoundFace; iFace++)
+        {
+            if (bcNameList[iFace] == unstructBC->GetBCName())
+            {
+                unstructBC->SetBCType(bcTypeList[iFace]);
+                bcRegionIDofBCFace[iFace] = count;
+                vector<int> *faceIndex = unstructBC->GetFaceIndex();
+                faceIndex->push_back(iFace);
+            }
+
+        }
+        count++;
+    }
+    unstructBCSet->SetBCFaceInfo(bcRegionIDofBCFace);
+
+    int nTotalFace = GetNTotalFace();
+    grid->SetNTotalFace(nTotalFace);
+
+    int *node_number_of_each_face = new int[nTotalFace];
+    count = 0;
+    for (std::size_t m = 0; m < face_patchs.size(); ++ m)
+    {
+        int nfsum = face_patchs[m]->GetNTotalFace();
+        vector< vector<int> > &face2nodetmp = face_patchs[m]->GetFace2Node();
+
+        for (int i = 0; i < nfsum; ++ i)
+        {
+            node_number_of_each_face[count++] = static_cast<int>(face2nodetmp[i].size());
+        }
+    }
+
+    grid->SetNodeNumberOfEachFace(node_number_of_each_face);
+
+    int face2node_size = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        face2node_size += node_number_of_each_face[iFace];
+    }
+    int *face2node = new int[face2node_size];
+    grid->SetFace2Node(face2node);
+
+    fcount = 0;
+    count  = 0;
+    for (std::size_t m = 0; m < face_patchs.size(); ++ m)
+    {
+        int nfsum = face_patchs[m]->GetNTotalFace();
+        vector< vector<int> > &face2nodetmp = face_patchs[m]->GetFace2Node();
+
+        for (int i = 0; i < nfsum; ++ i)
+        {
+            for (int j = 0; j < node_number_of_each_face[fcount]; ++ j)
+            {
+                face2node[count++] = face2nodetmp[i][j];
+            }
+            fcount ++;
+        }
+    }
+
+    int *left_cell_of_face  = new int[nTotalFace];
+    int *right_cell_of_face = new int[nTotalFace];
+    grid->SetLeftCellOfFace(left_cell_of_face);
+    grid->SetRightCellOfFace(right_cell_of_face);
+
+    fcount = 0;
+    for (std::size_t m = 0; m < face_patchs.size(); ++ m)
+    {
+        int nfsum = face_patchs[m]->GetNTotalFace();
+        vector<int> &left_cell_of_face_tmp  = face_patchs[m]->GetLeftCellOfFace();
+        vector<int> &right_cell_of_face_tmp = face_patchs[m]->GetRightCellOfFace();
+
+        for (int i = 0; i < nfsum; ++ i)
+        {
+
+            if (left_cell_of_face_tmp[i] < 0)
+            {
+                left_cell_of_face[fcount] = right_cell_of_face_tmp[i];
+                right_cell_of_face[fcount] = left_cell_of_face_tmp[i];
+            }
+            else
+            {
+                left_cell_of_face[fcount] = left_cell_of_face_tmp[i];
+                right_cell_of_face[fcount] = right_cell_of_face_tmp[i];
+            }
+            
+            fcount ++;
+        }
+    }
+}
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/src/Pre_GridBase.cpp b/API/PreProcess/src/Pre_GridBase.cpp
new file mode 100644
index 0000000..eea9b7b
--- /dev/null
+++ b/API/PreProcess/src/Pre_GridBase.cpp
@@ -0,0 +1,2155 @@
+#include "Pre_GridBase.h"
+#include "Math_BasisFunction.h"
+#include "IO_FileName.h"
+#include "HyList.h"
+#include "TK_Exit.h"
+#include "Geo_UnstructBC.h"
+#include "Constants.h"
+#include "TK_Log.h"
+#include "Pre_Reorder.h"
+
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+CGNSRawCoor::CGNSRawCoor()
+{
+    type = new DataType_t[3];
+    coor[0] = 0;
+    coor[1] = 0;
+    coor[2] = 0;
+    nTotalNode = 0;
+}
+
+CGNSRawCoor::~CGNSRawCoor()
+{
+    DeAllocateData();
+    delete [] type;
+}
+
+void CGNSRawCoor::AllocateData(int icoor, cgsize_t nTotalNode, DataType_t type)
+{
+    this->type[icoor] = type;
+    this->nTotalNode = nTotalNode;
+    if (type == RealSingle)
+    {
+        coor[icoor] = new RDouble[nTotalNode];
+    }
+    else
+    {
+        coor[icoor] = new RDouble[nTotalNode];
+    }
+}
+
+void CGNSRawCoor::SetAllData(RDouble *x, RDouble *y, RDouble *z)
+{
+    RDouble *xyz[3];
+
+    xyz[0] = x;
+    xyz[1] = y;
+    xyz[2] = z;
+
+    for (int icoor = 0; icoor < 3; ++ icoor)
+    {
+        DataType_t type = this->type[icoor];
+        SetData(icoor, type, xyz[icoor]);
+    }
+
+    //! Compute the max && min box.
+    RDouble xMin, yMin, zMin, xMax, yMax, zMax;
+    xMin = yMin = zMin =   LARGE;
+    xMax = yMax = zMax = - LARGE;
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        xMin = MIN(xMin, x[iNode]);
+        yMin = MIN(yMin, y[iNode]);
+        zMin = MIN(zMin, z[iNode]);
+
+        xMax = MAX(xMax, x[iNode]);
+        yMax = MAX(yMax, y[iNode]);
+        zMax = MAX(zMax, z[iNode]);
+    }
+
+    ostringstream oss;
+    oss << "Min && Max box of the CGNS grid: \n";
+    oss << setiosflags(ios::right);
+    oss << setprecision(8);
+    oss << setiosflags(ios::scientific);
+    oss << setiosflags(ios::showpoint);
+    int wordwidth = 16;
+    oss << "  xMin = " << setw(wordwidth) << xMin << ", xMax = " << setw(wordwidth) << xMax << "\n";
+    oss << "  yMin = " << setw(wordwidth) << yMin << ", yMax = " << setw(wordwidth) << yMax << "\n";
+    oss << "  zMin = " << setw(wordwidth) << zMin << ", zMax = " << setw(wordwidth) << zMax << "\n";
+    oss << "\n";
+    PrintToWindow(oss);
+}
+
+void CGNSRawCoor::SetData(int icoor, DataType_t type, RDouble *x)
+{
+    if (type == RealSingle)
+    {
+        RDouble *data = static_cast<RDouble *>(coor[icoor]);
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            x[iNode] = data[iNode];
+        }
+    }
+    else
+    {
+        RDouble *data = static_cast<RDouble *>(coor[icoor]);
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            x[iNode] = data[iNode];
+        }
+    }
+}
+
+void CGNSRawCoor::DeAllocateData()
+{
+    for (int icoor = 0; icoor < 3; ++ icoor)
+    {
+        int type = this->type[icoor];
+        if (type == RealSingle)
+        {
+            RDouble *data = static_cast<RDouble *>(coor[icoor]);
+            delete [] data;
+        }
+        else
+        {
+            RDouble *data = static_cast<RDouble *>(coor[icoor]);
+            delete [] data;
+        }
+    }
+}
+
+MultiIndex::MultiIndex()
+{
+    this->size = 0;
+    this->id   = -1;
+    data       = 0;
+}
+
+MultiIndex::MultiIndex(int size, int id)
+{
+    this->size = size;
+    this->id   = id;
+    data       = new int [size];
+}
+
+MultiIndex::MultiIndex(const MultiIndex &rhs)
+{
+    this->size = rhs.size;
+    this->id   = rhs.id;
+    this->data = new int [size];
+
+    for (int i = 0; i < size; ++ i)
+    {
+        this->data[i] = rhs.data[i];
+    }
+}
+
+MultiIndex & MultiIndex::operator = (const MultiIndex &rhs)
+{
+    if (this == &rhs) return *this;
+
+    if (this->size != rhs.size)
+    {
+        delete [] this->data;
+        this->size = rhs.size;
+        this->data = new int [this->size];
+    }
+
+    this->id = rhs.id;
+    for (int i = 0; i < size; ++ i)
+    {
+        this->data[i] = rhs.data[i];
+    }
+
+    return *this;
+}
+
+MultiIndex::~MultiIndex()
+{
+    delete [] data;
+}
+
+bool MultiIndex::operator < (const MultiIndex &rhs) const
+{
+    if (this->size != rhs.size) return this->size < rhs.size;
+    for (int i = 0; i < this->size; ++ i)
+    {
+        if (this->data[i] != rhs.data[i])
+        {
+            return this->data[i] < rhs.data[i];
+        }
+    }
+    return false;
+}
+
+void MultiIndex::SetData(int *data)
+{
+    for (int i = 0; i < size; ++ i)
+    {
+        this->data[i] = data[i];
+    }
+}
+
+BaseElement::BaseElement()
+{
+    size         = NofValidElementTypes;
+    elementface  = new CElemFace[size];
+    elementpoint = new cgsize_t[size];
+    InitElementPoint();
+    InitElementFace();
+};
+
+BaseElement::~BaseElement()
+{
+    delete [] elementface;
+    delete [] elementpoint;
+};
+
+void BaseElement::InitElementPoint()
+{
+    elementpoint[NODE ]    = 1;
+    elementpoint[BAR_2]    = 2;
+    elementpoint[TRI_3]    = 3;
+    elementpoint[TRI_6]    = 6;
+    elementpoint[QUAD_4]   = 4;
+    elementpoint[QUAD_9]   = 9;
+    elementpoint[TETRA_4]  = 4;
+    elementpoint[TETRA_10] = 10;
+    elementpoint[PYRA_5 ]  = 5;
+    elementpoint[PYRA_14]  = 14;
+    elementpoint[PENTA_6]  = 6;
+    elementpoint[PENTA_18] = 18;
+    elementpoint[HEXA_8 ]  = 8;
+    elementpoint[HEXA_27]  = 27;
+};
+
+void BaseElement::InitElementFace()
+{
+    elementface[NODE].Init(NODE);
+    elementface[BAR_2].Init(BAR_2);
+    elementface[TRI_3].Init(TRI_3);
+    elementface[QUAD_4].Init(QUAD_4);
+    elementface[TETRA_4].Init(TETRA_4);
+    elementface[TETRA_10].Init(TETRA_10);
+    elementface[PYRA_5].Init(PYRA_5);
+    elementface[PYRA_14].Init(PYRA_14);
+    elementface[PENTA_6].Init(PENTA_6);
+    elementface[PENTA_18].Init(PENTA_18);
+    elementface[HEXA_8].Init(HEXA_8);
+    elementface[HEXA_27].Init(HEXA_27);
+};
+
+CElemFace::CElemFace()
+{
+    face_num     = 0;
+    face_clkwise = 0;
+    facept_num   = 0;
+    face_id      = 0;
+}
+
+CElemFace::~CElemFace()
+{
+    if (face_id)
+    {
+        for (int i = 0; i < face_num; ++ i)
+        {
+            delete [] face_id[i];
+        }
+    }
+    delete [] face_id;
+    delete [] face_clkwise;
+    delete [] facept_num;
+}
+
+void CElemFace::Init(int elem_type)
+{
+    if (elem_type == NODE)
+    {
+        face_num = 1;
+        face_id    = new int * [face_num];
+        facept_num = new int [face_num];
+
+        facept_num[0] = 1;
+
+        for (int i = 0; i < face_num; ++ i)
+        {
+            face_id[i] = new int [facept_num[i]];
+        }
+
+        face_id[0][0] = 0;
+    }
+    else if (elem_type == BAR_2)
+    {
+        face_num = 1;
+        face_id    = new int * [face_num];
+        facept_num = new int [face_num];
+
+        facept_num[0] = 2;
+
+        for (int i = 0; i < face_num; ++ i)
+        {
+            face_id[i] = new int [facept_num[i]];
+        }
+
+        face_id[0][0] = 0;
+        face_id[0][1] = 1;
+    }
+    else if (elem_type == TRI_3)
+    {
+        face_num = 3;
+        face_id    = new int * [face_num];
+        facept_num = new int [face_num];
+
+        facept_num[0] = 2;
+        facept_num[1] = 2;
+        facept_num[2] = 2;
+
+        for (int i = 0; i < face_num; ++ i)
+        {
+            face_id[i] = new int [facept_num[i]];
+        }
+
+        face_id[0][0] = 0;
+        face_id[0][1] = 1;
+
+        face_id[1][0] = 1;
+        face_id[1][1] = 2;
+
+        face_id[2][0] = 2;
+        face_id[2][1] = 0;
+    }
+    else if (elem_type == QUAD_4)
+    {
+        face_num = 4;
+        face_id    = new int * [face_num];
+        facept_num = new int [face_num];
+
+        facept_num[0] = 2;
+        facept_num[1] = 2;
+        facept_num[2] = 2;
+        facept_num[3] = 2;
+
+        for (int i = 0; i < face_num; ++ i)
+        {
+            face_id[i] = new int [facept_num[i]];
+        }
+
+        face_id[0][0] = 0;
+        face_id[0][1] = 1;
+
+        face_id[1][0] = 1;
+        face_id[1][1] = 2;
+
+        face_id[2][0] = 2;
+        face_id[2][1] = 3;
+
+        face_id[3][0] = 3;
+        face_id[3][1] = 0;
+    }
+    else if (elem_type == TETRA_4)
+    {
+        face_num = 4;
+        face_id    = new int * [face_num];
+        facept_num = new int [face_num];
+
+        facept_num[0] = 3;
+        facept_num[1] = 3;
+        facept_num[2] = 3;
+        facept_num[3] = 3;
+
+        for (int i = 0; i < face_num; ++ i)
+        {
+            face_id[i] = new int [facept_num[i]];
+        }
+
+        face_id[0][0] = 0;
+        face_id[0][1] = 2;
+        face_id[0][2] = 1;
+
+        face_id[1][0] = 0;
+        face_id[1][1] = 1;
+        face_id[1][2] = 3;
+
+        face_id[2][0] = 1;
+        face_id[2][1] = 2;
+        face_id[2][2] = 3;
+
+        face_id[3][0] = 2;
+        face_id[3][1] = 0;
+        face_id[3][2] = 3;
+    }
+    else if (elem_type == TETRA_10)
+    {
+        face_num = 4;
+        face_id = new int * [face_num];
+        facept_num = new int[face_num];
+
+        facept_num[0] = 6;
+        facept_num[1] = 6;
+        facept_num[2] = 6;
+        facept_num[3] = 6;
+
+        for (int i = 0; i < face_num; ++ i)
+        {
+            face_id[i] = new int[facept_num[i]];
+        }
+
+        face_id[0][0] = 0;
+        face_id[0][1] = 1;
+        face_id[0][2] = 2;
+        face_id[0][3] = 4;
+        face_id[0][4] = 5;
+        face_id[0][5] = 6;
+
+        face_id[1][0] = 0;
+        face_id[1][1] = 1;
+        face_id[1][2] = 3;
+        face_id[1][3] = 4;
+        face_id[1][4] = 8;
+        face_id[1][5] = 7;
+
+        face_id[2][0] = 1;
+        face_id[2][1] = 2;
+        face_id[2][2] = 3;
+        face_id[2][3] = 5;
+        face_id[2][4] = 9;
+        face_id[2][5] = 8;
+
+        face_id[3][0] = 2;
+        face_id[3][1] = 3;
+        face_id[3][2] = 0;
+        face_id[3][3] = 9;
+        face_id[3][4] = 7;
+        face_id[3][5] = 6;
+    }
+    else if (elem_type == PYRA_5)
+    {
+        face_num = 5;
+        face_id    = new int * [face_num];
+        facept_num = new int [face_num];
+
+        facept_num[0] = 4;
+        facept_num[1] = 3;
+        facept_num[2] = 3;
+        facept_num[3] = 3;
+        facept_num[4] = 3;
+
+        for (int i = 0; i < face_num; ++ i)
+        {
+            face_id[i] = new int [facept_num[i]];
+        }
+
+        face_id[0][0] = 0;
+        face_id[0][1] = 3;
+        face_id[0][2] = 2;
+        face_id[0][3] = 1;
+
+        face_id[1][0] = 0;
+        face_id[1][1] = 1;
+        face_id[1][2] = 4;
+
+        face_id[2][0] = 1;
+        face_id[2][1] = 2;
+        face_id[2][2] = 4;
+
+        face_id[3][0] = 2;
+        face_id[3][1] = 3;
+        face_id[3][2] = 4;
+
+        face_id[4][0] = 3;
+        face_id[4][1] = 0;
+        face_id[4][2] = 4;
+    }
+    else if (elem_type == PYRA_14)
+    {
+        face_num = 5;
+        face_id = new int * [face_num];
+        facept_num = new int[face_num];
+
+        facept_num[0] = 9;
+        facept_num[1] = 6;
+        facept_num[2] = 6;
+        facept_num[3] = 6;
+        facept_num[4] = 6;
+
+        for (int i = 0; i < face_num; ++ i)
+        {
+            face_id[i] = new int[facept_num[i]];
+        }
+
+        face_id[0][0] = 0;
+        face_id[0][1] = 3;
+        face_id[0][2] = 2;
+        face_id[0][3] = 1;
+        face_id[0][4] = 8;
+        face_id[0][5] = 7;
+        face_id[0][6] = 6;
+        face_id[0][7] = 5;
+        face_id[0][8] = 13;
+
+        face_id[1][0] = 0;
+        face_id[1][1] = 1;
+        face_id[1][2] = 4;
+        face_id[1][3] = 5;
+        face_id[1][4] = 10;
+        face_id[1][5] = 9;
+
+        face_id[2][0] = 1;
+        face_id[2][1] = 2;
+        face_id[2][2] = 4;
+        face_id[2][3] = 6;
+        face_id[2][4] = 11;
+        face_id[2][5] = 10;
+
+        face_id[3][0] = 2;
+        face_id[3][1] = 3;
+        face_id[3][2] = 4;
+        face_id[3][3] = 7;
+        face_id[3][4] = 12;
+        face_id[3][5] = 11;
+
+        face_id[4][0] = 3;
+        face_id[4][1] = 0;
+        face_id[4][2] = 4;
+        face_id[4][3] = 8;
+        face_id[4][4] = 9;
+        face_id[4][5] = 12;
+    }
+    else if (elem_type == PENTA_6)
+    {
+        face_num = 5;
+        face_id    = new int * [face_num];
+        facept_num = new int [face_num];
+
+        facept_num[0] = 3;
+        facept_num[1] = 3;
+        facept_num[2] = 4;
+        facept_num[3] = 4;
+        facept_num[4] = 4;
+
+        for (int i = 0; i < face_num; ++ i)
+        {
+            face_id[i] = new int [facept_num[i]];
+        }
+
+        face_id[0][0] = 0;
+        face_id[0][1] = 2;
+        face_id[0][2] = 1;
+
+        face_id[1][0] = 3;
+        face_id[1][1] = 4;
+        face_id[1][2] = 5;
+
+        face_id[2][0] = 0;
+        face_id[2][1] = 1;
+        face_id[2][2] = 4;
+        face_id[2][3] = 3;
+
+        face_id[3][0] = 1;
+        face_id[3][1] = 2;
+        face_id[3][2] = 5;
+        face_id[3][3] = 4;
+
+        face_id[4][0] = 2;
+        face_id[4][1] = 0;
+        face_id[4][2] = 3;
+        face_id[4][3] = 5;
+    }
+    else if (elem_type == PENTA_18)
+    {
+        face_num = 5;
+        face_id = new int * [face_num];
+        facept_num = new int[face_num];
+
+        facept_num[0] = 9;
+        facept_num[1] = 9;
+        facept_num[2] = 9;
+        facept_num[3] = 6;
+        facept_num[4] = 6;
+
+        for (int i = 0; i < face_num; ++ i)
+        {
+            face_id[i] = new int[facept_num[i]];
+        }
+
+        face_id[0][0] = 0;
+        face_id[0][1] = 1;
+        face_id[0][2] = 4;
+        face_id[0][3] = 3;
+        face_id[0][4] = 6;
+        face_id[0][5] = 10;
+        face_id[0][6] = 12;
+        face_id[0][7] = 9;
+        face_id[0][8] = 15;
+
+        face_id[1][0] = 1;
+        face_id[1][1] = 2;
+        face_id[1][2] = 5;
+        face_id[1][3] = 4;
+        face_id[1][4] = 7;
+        face_id[1][5] = 11;
+        face_id[1][6] = 13;
+        face_id[1][7] = 10;
+        face_id[1][8] = 16;
+
+        face_id[2][0] = 2;
+        face_id[2][1] = 0;
+        face_id[2][2] = 3;
+        face_id[2][3] = 5;
+        face_id[2][4] = 8;
+        face_id[2][5] = 9;
+        face_id[2][6] = 14;
+        face_id[2][7] = 11;
+        face_id[2][8] = 17;
+
+        face_id[3][0] = 0;
+        face_id[3][1] = 2;
+        face_id[3][2] = 1;
+        face_id[3][3] = 8;
+        face_id[3][4] = 7;
+        face_id[3][5] = 6;
+
+        face_id[4][0] = 3;
+        face_id[4][1] = 4;
+        face_id[4][2] = 5;
+        face_id[4][3] = 12;
+        face_id[4][4] = 13;
+        face_id[4][5] = 14;
+    }
+    else if (elem_type == HEXA_8)
+    {
+        face_num = 6;
+        face_id    = new int * [face_num];
+        facept_num = new int [face_num];
+
+        facept_num[0] = 4;
+        facept_num[1] = 4;
+        facept_num[2] = 4;
+        facept_num[3] = 4;
+        facept_num[4] = 4;
+        facept_num[5] = 4;
+
+        for (int i = 0; i < face_num; ++ i)
+        {
+            face_id[i] = new int [facept_num[i]];
+        }
+
+        face_id[0][0] = 0;
+        face_id[0][1] = 3;
+        face_id[0][2] = 2;
+        face_id[0][3] = 1;
+
+        face_id[1][0] = 4;
+        face_id[1][1] = 5;
+        face_id[1][2] = 6;
+        face_id[1][3] = 7;
+
+        face_id[2][0] = 3;
+        face_id[2][1] = 0;
+        face_id[2][2] = 4;
+        face_id[2][3] = 7;
+
+        face_id[3][0] = 0;
+        face_id[3][1] = 1;
+        face_id[3][2] = 5;
+        face_id[3][3] = 4;
+
+        face_id[4][0] = 1;
+        face_id[4][1] = 2;
+        face_id[4][2] = 6;
+        face_id[4][3] = 5;
+
+        face_id[5][0] = 2;
+        face_id[5][1] = 3;
+        face_id[5][2] = 7;
+        face_id[5][3] = 6;
+    }
+    else if (elem_type == HEXA_27)
+    {
+        face_num = 6;
+        face_id = new int * [face_num];
+        facept_num = new int[face_num];
+
+        facept_num[0] = 9;
+        facept_num[1] = 9;
+        facept_num[2] = 9;
+        facept_num[3] = 9;
+        facept_num[4] = 9;
+        facept_num[5] = 9;
+
+        for (int i = 0; i < face_num; ++ i)
+        {
+            face_id[i] = new int[facept_num[i]];
+        }
+
+        face_id[0][0] = 0;
+        face_id[0][1] = 3;
+        face_id[0][2] = 2;
+        face_id[0][3] = 1;
+        face_id[0][4] = 11;
+        face_id[0][5] = 10;
+        face_id[0][6] = 9;
+        face_id[0][7] = 8;
+        face_id[0][8] = 20;
+
+        face_id[1][0] = 0;
+        face_id[1][1] = 1;
+        face_id[1][2] = 5;
+        face_id[1][3] = 4;
+        face_id[1][4] = 8;
+        face_id[1][5] = 13;
+        face_id[1][6] = 16;
+        face_id[1][7] = 12;
+        face_id[1][8] = 21;
+
+        face_id[2][0] = 1;
+        face_id[2][1] = 2;
+        face_id[2][2] = 6;
+        face_id[2][3] = 5;
+        face_id[2][4] = 9;
+        face_id[2][5] = 14;
+        face_id[2][6] = 17;
+        face_id[2][7] = 13;
+        face_id[2][8] = 22;
+
+        face_id[3][0] = 2;
+        face_id[3][1] = 3;
+        face_id[3][2] = 7;
+        face_id[3][3] = 6;
+        face_id[3][4] = 10;
+        face_id[3][5] = 15;
+        face_id[3][6] = 18;
+        face_id[3][7] = 14;
+        face_id[3][8] = 23;
+
+        face_id[4][0] = 0;
+        face_id[4][1] = 4;
+        face_id[4][2] = 7;
+        face_id[4][3] = 3;
+        face_id[4][4] = 12;
+        face_id[4][5] = 19;
+        face_id[4][6] = 15;
+        face_id[4][7] = 11;
+        face_id[4][8] = 24;
+
+        face_id[5][0] = 4;
+        face_id[5][1] = 5;
+        face_id[5][2] = 6;
+        face_id[5][3] = 7;
+        face_id[5][4] = 16;
+        face_id[5][5] = 17;
+        face_id[5][6] = 18;
+        face_id[5][7] = 19;
+        face_id[5][8] = 25;
+    }
+    else
+    {
+        TK_Exit::ExceptionExit(" CElemFace::Init, Unknown type\n");
+    }
+}
+
+BaseBCType::BaseBCType()
+{
+    ibcmax = NofValidBCTypes;
+    Init();
+};
+
+void BaseBCType::Init()
+{
+    using namespace PHSPACE;
+
+    bctypemap.insert(pair<int, int>(BCTypeUserDefined  , PHENGLEI::USER_DEFINED         ));
+    bctypemap.insert(pair<int, int>(BCSymmetryPlane    , PHENGLEI::SYMMETRY             ));
+    bctypemap.insert(pair<int, int>(BCInflow           , PHENGLEI::INFLOW               ));
+    bctypemap.insert(pair<int, int>(BCOutflow          , PHENGLEI::OUTFLOW              ));
+    bctypemap.insert(pair<int, int>(BCTunnelOutflow    , PHENGLEI::OUTFLOW              ));
+    bctypemap.insert(pair<int, int>(BCOutflowSupersonic, PHENGLEI::OUTFLOW              ));
+    bctypemap.insert(pair<int, int>(BCWall             , PHENGLEI::SOLID_SURFACE        ));
+    bctypemap.insert(pair<int, int>(BCWallInviscid     , PHENGLEI::SOLID_SURFACE        ));
+    bctypemap.insert(pair<int, int>(BCWallViscous      , PHENGLEI::SOLID_SURFACE        ));
+    bctypemap.insert(pair<int, int>(BCDegenerateLine   , PHENGLEI::POLE                 ));
+    bctypemap.insert(pair<int, int>(BCTypeNull         , PHENGLEI::NO_BOUNDARY_CONDITION));
+    bctypemap.insert(pair<int, int>(BCFarfield         , PHENGLEI::FARFIELD             ));
+    bctypemap.insert(pair<int, int>(BCGeneral          , PHENGLEI::GENERIC_1            ));
+
+    fts2cgns.insert(pair<int, int>(PHENGLEI::USER_DEFINED         , BCTypeUserDefined));
+    fts2cgns.insert(pair<int, int>(PHENGLEI::SYMMETRY             , BCSymmetryPlane  ));
+    fts2cgns.insert(pair<int, int>(PHENGLEI::INFLOW               , BCInflow         ));
+    fts2cgns.insert(pair<int, int>(PHENGLEI::OUTFLOW              , BCOutflow        ));
+    fts2cgns.insert(pair<int, int>(PHENGLEI::SOLID_SURFACE        , BCWall           ));
+    fts2cgns.insert(pair<int, int>(PHENGLEI::POLE                 , BCDegenerateLine ));
+    fts2cgns.insert(pair<int, int>(PHENGLEI::NO_BOUNDARY_CONDITION, BCTypeNull       ));
+    fts2cgns.insert(pair<int, int>(PHENGLEI::FARFIELD             , BCFarfield       ));
+
+    int maxNumberOfBody = 20;
+    for (int iBody = 0; iBody < maxNumberOfBody; iBody ++)
+    {
+        bctypemap.insert(pair<int, int>(NofValidBCTypes + iBody, PHENGLEI::StartNumberOfBodyOfHyperFLOW + iBody));
+        fts2cgns. insert(pair<int, int>(PHENGLEI::StartNumberOfBodyOfHyperFLOW + iBody, NofValidBCTypes + iBody));
+    }
+}
+
+BaseBCType::~BaseBCType()
+{
+}
+
+RawGrid::RawGrid()
+{
+    x          = 0;
+    y          = 0;
+    z          = 0;
+    nTotalNode = 0;
+}
+
+RawGrid::~RawGrid()
+{
+    //delete [] x;
+    //delete [] y;
+    //delete [] z;
+}
+
+Base_Grid_Conn::Base_Grid_Conn()
+{
+    left_cell_of_face        = new vector<cgsize_t>;
+    right_cell_of_face       = new vector<cgsize_t>;
+    face_location            = new vector<int>;
+    bcFace                   = new vector<CGNS_BCFace *>;
+    node_number_of_each_face = new vector<int>;
+    face2node                = new vector< vector<cgsize_t> >;
+    faceset                  = new set<MultiIndex>;
+    node_number_of_each_cell = new vector<int>;
+    cell2node                = new vector< vector<cgsize_t> >;
+    nTotalNode               = 0;
+    nTotalCell               = 0;
+    nBoundFace               = 0;
+    nTotalFace               = 0;
+}
+
+Base_Grid_Conn::~Base_Grid_Conn()
+{
+    delete left_cell_of_face;
+    delete right_cell_of_face;
+    delete face_location;
+    delete node_number_of_each_face;
+    delete face2node ;
+    delete faceset;
+    delete node_number_of_each_cell;
+    delete cell2node;
+
+    vector<CGNS_BCFace *>::iterator iter;
+    for (iter = bcFace->begin(); iter != bcFace->end(); ++ iter)
+    {
+        delete *iter;
+    }
+    delete bcFace;
+}
+
+void Base_Grid_Conn::FreeFaceSet()
+{
+    delete faceset;
+    faceset = 0;
+}
+
+void Base_Grid_Conn::FreeFace2Node()
+{
+    delete face2node;
+    face2node = 0;
+}
+
+void Base_Grid_Conn::FreeCell2Node()
+{
+    delete cell2node;
+    cell2node = 0;
+}
+
+void Base_Grid_Conn::FreeCellOfFace()
+{
+    delete left_cell_of_face;
+    left_cell_of_face = 0;
+
+    delete right_cell_of_face;
+    right_cell_of_face = 0;
+}
+
+void Base_Grid_Conn::FreeNodeNumberOfEachFace()
+{
+    delete node_number_of_each_face;
+    node_number_of_each_face = 0;
+}
+
+void Base_Grid_Conn::FreeNodeNumberOfEachCell()
+{
+    delete node_number_of_each_cell;
+    node_number_of_each_cell = 0;
+}
+
+CGNSBase::CGNSBase()
+{
+    elem_type        = 0;
+    istart           = 0;
+    iend             = 0;
+    conn_list        = 0;
+    nBCElem          = 0;
+    vcType           = 0;
+    bc_type          = 0;
+    bc_conn_list     = 0;
+    boundaryName     = 0;
+    ElementDataSize  = 0;
+    mixed_conn_index = 0;
+}
+
+CGNSBase::~CGNSBase()
+{
+    delete [] boundaryName;
+    delete [] elem_type;
+    delete [] istart;
+    delete [] iend;
+    delete [] nBCElem;
+    delete [] bc_type;
+    delete [] ElementDataSize;
+
+    if (conn_list)
+    {
+        for (int i = 0; i < nSections; ++ i)
+        {
+            delete [] conn_list[i];
+        }
+    }
+    delete [] conn_list;
+
+    if (mixed_conn_index)
+    {
+        for (int i = 0; i < nSections; ++ i)
+        {
+            delete [] mixed_conn_index[i];
+        }
+    }
+    delete [] mixed_conn_index;
+
+    if (bc_conn_list)
+    {
+        for (int iBCRegion = 0; iBCRegion < nBCRegions; ++ iBCRegion)
+        {
+            delete [] bc_conn_list[iBCRegion];
+        }
+    }
+    delete [] bc_conn_list;
+}
+
+void CGNSBase::CreateElement(int nSections)
+{
+    this->nSections = nSections;
+
+    conn_list = new cgsize_t * [nSections];
+    istart    = new cgsize_t [nSections];
+    iend      = new cgsize_t [nSections];
+    elem_type = new int [nSections];
+    ElementDataSize = new cgsize_t [nSections];
+    mixed_conn_index= new cgsize_t * [nSections];
+    cout << " nSections = " << nSections << "\n";
+}
+
+void CGNSBase::CreateBC(int nBCRegions)
+{
+    this->nBCRegions = nBCRegions;
+    bc_conn_list     = new cgsize_t * [nBCRegions];
+    nBCElem          = new int [nBCRegions];
+    bc_type          = new int [nBCRegions];
+    bc_elem_set_type = new int [nBCRegions];
+    bc_grid_location = new int [nBCRegions];
+    boundaryName     = new string[nBCRegions];
+}
+
+void CGNSBase::PreProcess(Base_Grid_Conn *gconn, BaseElement *base_elem)
+{
+    cout << "PreProcess ...\n";
+    gconn->SetNTotalCell(nTotalCell);
+    gconn->SetNTotalNode(nTotalNode);
+    gconn->SetNBoundFace(nBoundFace);
+
+    for (int i = 0; i < nSections; ++ i)
+    {
+        istart[i] -= 1;
+        iend[i]   -= 1;
+    }
+
+    cgsize_t *base_elem_elem_pt = base_elem->GetElementPoint();
+
+    cgsize_t size;
+    for (int i = 0; i < nSections; ++ i)
+    {
+        if (elem_type[i] == MIXED)
+        {
+            size = ElementDataSize[i];
+        }
+        else
+        {
+            cgsize_t nelem = iend[i] - istart[i] + 1;
+            cgsize_t pt    = base_elem_elem_pt[ elem_type[i] ];
+            size  = nelem * pt;
+        }
+
+        for (cgsize_t j = 0; j < size; ++ j)
+        {
+            conn_list[i][j] -= 1;
+        }
+    }
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegions; ++ iBCRegion)
+    {
+        //! It is true for all situation.
+        for (int j = 0; j < nBCElem[iBCRegion]; ++ j)
+        {
+            bc_conn_list[iBCRegion][j] -= 1;
+        }
+    }
+
+    //! For boundary BC's, it should be checked index base.
+    int ibase = 1;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegions; ++ iBCRegion)
+    {
+        for (int j = 0; j < nBCElem[iBCRegion]; ++ j)
+        {
+            if (bc_conn_list[iBCRegion][j] < nTotalCell)
+            {
+                ibase = 0;
+                break;
+            }
+        }
+        if (ibase == 0) break;
+    }
+
+    if (ibase == 0)
+    {
+        for (int iBCRegion = 0; iBCRegion < nBCRegions; ++ iBCRegion)
+        {
+            if ((this->bc_grid_location[iBCRegion] != Vertex))
+            {
+                for (int j = 0; j < nBCElem[iBCRegion]; ++ j)
+                {
+                    bc_conn_list[iBCRegion][j] += nTotalCell;
+                }
+            }
+        }
+    }
+}
+
+void CGNSBase::GetElem(cgsize_t *elem_source, cgsize_t iCell, int ptnum, cgsize_t *&elem)
+{
+    elem = &elem_source[ptnum * iCell];
+}
+
+void CGNSBase::GetFace(Base_Grid_Conn *gconn, cgsize_t *elem, cgsize_t iCell, CElemFace *elemface)
+{
+    int face_list[100], face_now[100];
+    int maxface = elemface->GetFaceNumber();
+
+    vector<cgsize_t> single_face(100);
+    single_face.resize(0);
+
+    vector< vector<cgsize_t> > *face2node = gconn->GetFace2Node();
+    vector<cgsize_t> *left_cell_of_face   = gconn->GetLeftCellOfFace();
+    vector<cgsize_t> *right_cell_of_face  = gconn->GetRightCellOfFace();
+    vector<int> *node_number_of_each_face = gconn->GetNodeNumberOfEachFace();
+    vector<CGNS_BCFace *> *bcFace         = gconn->GetBCFace();
+    vector<int> *face_location            = gconn->GetFaceLocation();
+    set<MultiIndex> *faceSet              = gconn->GetFaceSet();
+
+    int *elemface_facept_num = elemface->GetFacePointNumber();
+    int **elemface_face_id   = elemface->GetFaceID();
+
+    for (int iFace = 0; iFace < maxface; ++ iFace)
+    {
+        int facept_num = elemface_facept_num[iFace];
+        int *face_id   = elemface_face_id[iFace];
+
+        MultiIndex faceIndex(facept_num, static_cast<int>(left_cell_of_face->size()));
+        for (int j = 0; j < facept_num; ++ j)
+        {
+            face_list[j] = static_cast<int>(elem[face_id[j]]);
+            face_now[j]  = face_list[j];
+        }
+        sort(face_list, face_list + facept_num);
+        faceIndex.SetData(face_list);
+
+        set<MultiIndex>::iterator iter = faceSet->find(faceIndex);
+
+        if (iter == faceSet->end())
+        {
+            faceSet->insert(faceIndex);
+            left_cell_of_face->push_back(iCell);
+            right_cell_of_face->push_back(-1);
+
+            CGNS_BCFace *boundaryFace = new CGNS_BCFace(static_cast<int>(bcFace->size()), 0, "");
+            bcFace->push_back(boundaryFace);
+
+            face_location->push_back(iFace);
+
+            single_face.resize(facept_num);
+            for (int j = 0; j < facept_num; ++ j)
+            {
+                single_face[j] = face_now[j];
+            }
+
+            face2node->push_back(single_face);
+            node_number_of_each_face->push_back(facept_num);
+        }
+        else
+        {
+            (*right_cell_of_face)[iter->id] = iCell;
+        }
+    }
+}
+
+void CGNSBase::PostProcess(Base_Grid_Conn *gconn)
+{
+    cout << "  Boundary Faces Reordering ..." << endl;
+    gconn->FreeFaceSet();
+
+    vector<cgsize_t> *left_cell_of_face  = gconn->GetLeftCellOfFace();
+    vector<cgsize_t> *right_cell_of_face = gconn->GetRightCellOfFace();
+
+    cgsize_t nTotalFace = right_cell_of_face->size();
+
+    gconn->SetNTotalFace(nTotalFace);
+
+    nBoundFace = 0;
+    for (cgsize_t iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        if ((*right_cell_of_face)[iFace] == -1)
+        {
+            ++ nBoundFace;
+        }
+    }
+
+    gconn->SetNBoundFace(nBoundFace);
+
+    vector< vector<cgsize_t> > *face2node = gconn->GetFace2Node();
+    vector<int> *node_number_of_each_face = gconn->GetNodeNumberOfEachFace();
+    vector<CGNS_BCFace *> *bcFace = gconn->GetBCFace();
+
+    //! Reorder faces, make sure the boundary faces lie in the first part.
+    cgsize_t jstart = nBoundFace;
+    for (cgsize_t iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        if ((*right_cell_of_face)[iFace] != -1)
+        {
+            //! It needs to swap.
+            for (cgsize_t jFace = jstart; jFace < nTotalFace; ++ jFace)
+            {
+                if ((*right_cell_of_face)[jFace] == -1)
+                {
+                    //! Swap i,j.
+                    SWAP((*left_cell_of_face)[iFace], (*left_cell_of_face)[jFace]);
+                    SWAP((*right_cell_of_face)[iFace], (*right_cell_of_face)[jFace]);
+
+                    //! Swap bctype && bcname only, do not swap faceID.
+                    //! So, did not use SWAP((*bcFace)[iFace], (*bcFace)[jFace]) here.
+                    ASSERT((*bcFace)[iFace]->GetFaceID() == iFace);
+                    int iFaceBCType = (*bcFace)[iFace]->GetBCType();
+                    int jFaceBCType = (*bcFace)[jFace]->GetBCType();
+                    SWAP(iFaceBCType, jFaceBCType);
+                    (*bcFace)[iFace]->SetBCType(iFaceBCType);
+                    (*bcFace)[jFace]->SetBCType(jFaceBCType);
+                    string iFaceBCName = (*bcFace)[iFace]->GetBCName();
+                    string jFaceBCName = (*bcFace)[jFace]->GetBCName();
+                    SWAP(iFaceBCName, jFaceBCName);
+                    (*bcFace)[iFace]->SetBCName(iFaceBCName);
+                    (*bcFace)[jFace]->SetBCName(jFaceBCName);    
+
+                    SWAP((*face2node)[iFace], (*face2node)[jFace]);
+                    SWAP((*node_number_of_each_face)[iFace], (*node_number_of_each_face)[jFace]);
+
+                    jstart = jFace + 1;
+                    break;
+                }
+            }
+        }
+    }
+}
+
+void CGNSBase::GetISection(cgsize_t iCell, int &isection)
+{
+    cgsize_t iabscell = iCell;
+    isection = 0;
+    for (int i = 0; i < nSections; ++ i)
+    {
+        cgsize_t ist = istart[i];
+        cgsize_t ied = iend  [i];
+        if (ist <= iabscell && iabscell <= ied)
+        {
+            isection = i;
+            break;
+        }
+    }
+}
+
+void CGNSBase::GetBCFace(BaseElement *base_elem, cgsize_t iCell, int &facept_num, cgsize_t *&bcface)
+{
+    cgsize_t iabscell = iCell;
+    int isection = 0;
+
+    GetISection(iCell, isection);
+    
+    ElementType_t etype = static_cast<ElementType_t>(elem_type[isection]);
+    cgsize_t *base_elem_elem_pt = base_elem->GetElementPoint();
+
+    if (etype != MIXED)
+    {
+        facept_num = static_cast<int>(base_elem_elem_pt[etype]);
+        GetElem(conn_list[isection], iabscell - istart[isection], facept_num, bcface);
+    }
+    else
+    {
+        int iNode;
+        iNode = static_cast<int>(mixed_conn_index[isection][iabscell - istart[isection]]);
+        etype = static_cast<ElementType_t>(conn_list[isection][iNode] + 1);
+        facept_num = static_cast<int>(base_elem_elem_pt[etype]);
+        GetBCFaceMixed(conn_list[isection], iabscell - istart[isection], isection, bcface);
+    }
+}
+
+void CGNSBase::GetBCFaceMixed(cgsize_t *elem_source, cgsize_t iCell, int isection, cgsize_t *&elem)
+{
+    elem = &elem_source[mixed_conn_index[isection][iCell] + 1];
+}
+
+void CGNSBase::GetElem(BaseElement *base_elem, cgsize_t iCell, int &etype, cgsize_t *&elem)
+{
+    int isection = 0;
+    int elempt_num;
+
+    GetISection(iCell, isection);
+    etype = elem_type[isection];
+
+    cgsize_t *base_elem_elem_pt = base_elem->GetElementPoint();
+
+    if (etype == MIXED)
+    {
+        etype = static_cast<ElementType_t>(conn_list[isection][mixed_conn_index[isection][iCell]] + 1);
+        elem = &conn_list[isection][mixed_conn_index[isection][iCell] + 1];
+    }
+    else
+    {
+        elempt_num = static_cast<int>(base_elem_elem_pt[etype]);
+        GetElem(conn_list[isection], iCell - istart[isection], elempt_num, elem);
+    }
+}
+
+void CGNSBase::ProcessBCFace(Base_Grid_Conn *gconn, BaseElement *base_elem, 
+                             cgsize_t iElement, BCType_t bctype, const string &BCName)
+{
+    cgsize_t *bcface = 0;
+    int facept_num;
+
+    GetBCFace(base_elem, iElement, facept_num, bcface);
+    
+    if (!MarkBCFace(gconn, bcface, facept_num, bctype, BCName))
+    {
+        ostringstream oss;
+        oss << " ERROR in MarkBCFace : iElement = " << iElement << "\n";
+        TK_Exit::ExceptionExit(oss.str());
+    }
+}
+
+bool CGNSBase::MarkBCFace(Base_Grid_Conn *gconn, cgsize_t *bcface, int facept_num, BCType_t bctype, const string &BCName)
+{
+    int face_list[100];
+    MultiIndex idx(facept_num, 0);
+
+    for (int i = 0; i < facept_num; ++ i)
+    {
+        face_list[i] = static_cast<int>(bcface[i]);
+    }
+
+    sort(face_list, face_list + facept_num);
+
+    idx.SetData(face_list);
+
+    set<MultiIndex> *faceset = gconn->GetFaceSet();
+
+    set<MultiIndex>::iterator iter = faceset->find(idx);
+    vector<CGNS_BCFace *> *bcFace = gconn->GetBCFace();
+
+    if (iter == faceset->end())
+    {
+        cout << "impossible, boundary face should be in the total face\n";
+        for (int i = 0; i < facept_num; ++ i)
+        {
+            cout << bcface[ i ] << " ";
+        }
+        cout << "\n";
+        return false;
+    }
+    else
+    {
+        (*bcFace)[iter->id]->SetBCType(bctype);
+        (*bcFace)[iter->id]->SetBCName(BCName);
+        return true;
+    }
+}
+
+void CGNSBase::ComputeGridConn(Base_Grid_Conn *gconn, BaseElement *base_elem)
+{
+    PreProcess(gconn, base_elem);
+    ComputeElemFace(gconn, base_elem);
+    ComputeBCFace(gconn, base_elem);
+    ComputeCellToNode(gconn, base_elem);
+    PostProcess(gconn);
+    
+    int gridReorder = PHSPACE::GlobalDataBase::GetIntParaFromDB("gridReorder");
+    
+    if (gridReorder == 1)
+    {
+        using namespace Reorder;
+        //! Compute bandwidth
+        printf("Before ReOrder...\n");
+        CallBandwidthEvaluate(gconn);
+        CallMetricLeftRightCellOfFace(gconn);
+        //! Cell Reorder
+        CallReorderCellLabel(gconn);
+        //! FaceReorder
+        CallReorderFaceLabel(gconn);
+        //! Metrics for left_cell_of_face and right_cell_of_face
+        printf("After ReOrder...\n");
+        CallBandwidthEvaluate(gconn);
+        CallMetricLeftRightCellOfFace(gconn);
+    }
+}
+
+void CGNSBase::ComputeCellToNode(Base_Grid_Conn *gconn, BaseElement *base_elem)
+{
+    int nSections = this->GetNumberOfSections();
+    int *base_cgns_elem_type = this->GetElementType();
+    int nTotalCell = static_cast<int>(this->GetNTotalCell());
+    cgsize_t **conn_list = this->GetElementConnectionList();
+
+    vector<int> *node_number_of_each_cell = gconn->GetNodeNumberOfEachCell();
+    vector< vector<cgsize_t> > *cell2node = gconn->GetCell2Node();
+    //cell2node->reserve(nTotalCell);
+    cell2node->resize(nTotalCell);
+    //node_number_of_each_cell->reserve(nTotalCell);
+    node_number_of_each_cell->resize(nTotalCell);
+
+    cgsize_t *base_elem_elem_pt = base_elem->GetElementPoint();
+
+    bool flag = false;
+    for (int sec = 0; sec < nSections; ++ sec)
+    {
+        cgsize_t *base_cgns_istart = this->GetIndexOfStart();
+        cgsize_t *base_cgns_iend   = this->GetIndexOfEnd();
+        ElementType_t etype = static_cast<ElementType_t>(base_cgns_elem_type[sec]);
+
+        if (etype != MIXED)
+        {
+            int nPoints = static_cast<int>(base_elem_elem_pt[etype]);
+
+            int count = 0;
+            for (cgsize_t iCell = base_cgns_istart[sec]; iCell <= base_cgns_iend[sec]; ++ iCell)
+            {
+                if (iCell >= nTotalCell)
+                {
+                    flag = true;
+                    break;
+                }
+
+                //node_number_of_each_cell->push_back(nPoints);
+                (*node_number_of_each_cell)[iCell] = nPoints;
+
+                vector<cgsize_t> single_cell;
+                single_cell.resize(0);
+                single_cell.reserve(nPoints);
+
+                for (cgsize_t jPoint = 0; jPoint < nPoints; ++ jPoint)
+                {
+                    single_cell.push_back(conn_list[sec][count]);
+                    count ++;
+                }
+                //cell2node->push_back(single_cell);
+                (*cell2node)[iCell] = single_cell;
+            }
+            if (flag) break;
+        }
+        else
+        {
+            int count = 0;
+            for (cgsize_t iCell = base_cgns_istart[sec]; iCell <= base_cgns_iend[sec]; ++ iCell)
+            {
+                if (iCell >= nTotalCell)
+                {
+                    flag = true;
+                    break;
+                }
+
+                int nPoints = static_cast<int>(base_elem_elem_pt[conn_list[sec][count] + 1]);
+                count ++;
+
+                //node_number_of_each_cell->push_back(nPoints);
+                (*node_number_of_each_cell)[iCell] = nPoints;
+
+                vector<cgsize_t> single_cell;
+                single_cell.resize(0);
+                single_cell.reserve(nPoints);
+
+                for (cgsize_t jPoint = 0; jPoint < nPoints; ++ jPoint)
+                {
+                    single_cell.push_back(conn_list[sec][count]);
+                    count ++;
+                }
+                //cell2node->push_back(single_cell);
+                (*cell2node)[iCell] = single_cell;
+            }
+            if (flag) break;
+        }
+    }
+
+    if (conn_list)
+    {
+        for (int i = 0; i < nSections; ++ i)
+        {
+            delete [] conn_list[i];
+        }
+    }
+    delete [] conn_list;
+
+    delete [] elem_type;
+    delete [] istart;
+    delete [] iend;
+    delete [] nBCElem;
+    delete [] bc_type;
+    delete [] ElementDataSize;
+}
+
+void CGNSBase::ComputeElemFace(Base_Grid_Conn *gconn, BaseElement *base_elem)
+{
+    std::cout << "Reconstruction faces ..." << endl;
+    bool intoBCSection = false;
+    cgsize_t *elem = 0;
+    int count = 0;
+
+    CElemFace *face_list = base_elem->GetElementFace();
+    cgsize_t *base_elem_elem_pt = base_elem->GetElementPoint();
+    for (int iSection = 0; iSection < nSections; ++ iSection)
+    {
+        if (istart[iSection] < nTotalCell)
+        {
+            //! Only dump information for interior computational cells.
+            //! Do not dump for BC sections.
+            std::cout << "  Process_Grid: isection = " << iSection << " nSections = " << nSections << "\n";
+            std::cout << "    iStart = " << istart[iSection] << " " << ", iEnd = " << iend[iSection] << "\n";
+        }
+        else
+        {
+            std::cout << "  Get into BC sections from section " << iSection << endl;
+        }
+
+        //! Reconstruct NON-BC faces ONLY.
+        for (cgsize_t iCell = istart[iSection]; iCell <= iend[iSection]; ++ iCell)
+        {
+            ElementType_t etype = static_cast<ElementType_t>(elem_type[iSection]);
+
+            if (iCell >= nTotalCell)
+            {
+                intoBCSection = true;
+                break;
+            }
+
+            ++ count;
+            if (count % 200000 == 0) std::cout << "  iCell = " << count << "\n";
+            
+            if (etype == MIXED)
+            {
+                etype = static_cast<ElementType_t>(conn_list[iSection][mixed_conn_index[iSection][iCell - istart[iSection]]] + 1);
+                elem = &conn_list[iSection][mixed_conn_index[iSection][iCell - istart[iSection]] + 1];
+            }
+            else
+            {
+                int ptnum = static_cast<int>(base_elem_elem_pt[etype]);
+                GetElem(conn_list[iSection], iCell - istart[iSection], ptnum, elem);
+            }
+
+            GetFace(gconn, elem, iCell, &face_list[etype]);
+        }
+        if (intoBCSection) break;
+    }
+}
+
+void CGNSBase::ComputeBCFace(Base_Grid_Conn *gconn, BaseElement *base_elem)
+{
+    std::cout << "Boundary Faces Reconstruction ..." << endl;
+
+    vector<cgsize_t> &right_cell_of_face = *gconn->GetRightCellOfFace();
+    cgsize_t nTotalFace = right_cell_of_face.size();
+    cgsize_t nBoundFace = 0;
+    for (cgsize_t iFace = 0; iFace < static_cast<cgsize_t>(nTotalFace); ++ iFace)
+    {
+        if (right_cell_of_face[iFace] == -1)
+        {
+            nBoundFace ++;
+        }
+    }
+    cgsize_t MaxCell = this->nTotalCell + nBoundFace;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegions; ++ iBCRegion)
+    {
+        BCType_t bctype = static_cast<BCType_t> (bc_type[iBCRegion]);
+        GridLocation_t igr = static_cast<GridLocation_t>(bc_grid_location[iBCRegion]);
+
+        string BCName = "";
+        if (boundaryName)
+        {
+            BCName = boundaryName[iBCRegion];
+            if (bctype < NofValidBCTypes)
+            {
+                std::cout << "  Boundary Condition : the " << iBCRegion + 1 
+                    << " BCName = "   << BCName 
+                    << ", BCType = "  << BCTypeName[bctype]
+                    << "\n";
+            }
+            else
+            {
+                std::cout << "  Boundary Condition : the " << iBCRegion + 1 
+                    << " BCName = " << BCName << "(SelfDefined)\n";
+            }
+        }
+
+        if (bc_elem_set_type[iBCRegion] == PointRange)
+        {
+            if (igr == EdgeCenter || igr == FaceCenter)
+            {
+                bc_elem_set_type[iBCRegion] = ElementRange;
+            }
+        }
+        else if (bc_elem_set_type[iBCRegion] == PointList)
+        {
+            if (igr == EdgeCenter || igr == FaceCenter)
+            {
+                bc_elem_set_type[iBCRegion] = ElementList;
+            }
+        }
+
+        if (bc_elem_set_type[iBCRegion] == ElementRange)
+        {
+            if (bc_conn_list[iBCRegion][0] >= MaxCell)
+            {
+                continue;
+            }
+
+            cgsize_t startElement = bc_conn_list[iBCRegion][0];
+            cgsize_t endElement   = bc_conn_list[iBCRegion][1];
+            for (cgsize_t iElement = startElement; iElement <= endElement; ++ iElement)
+            {
+                ProcessBCFace(gconn, base_elem, iElement, bctype, BCName);
+            }
+        }
+        else if (bc_elem_set_type[iBCRegion] == ElementList)
+        {
+            if (bc_conn_list[iBCRegion][0] >= MaxCell)
+            {
+                continue;
+            }
+
+            for (int i = 0; i < nBCElem[iBCRegion]; ++ i)
+            {
+                ProcessBCFace(gconn, base_elem, bc_conn_list[iBCRegion][i], bctype, BCName);
+            }
+        }
+        //! This situation has not been encountered, we can not ensure the code is right! 
+        else if (bc_elem_set_type[iBCRegion] == PointRange ||
+                 bc_elem_set_type[iBCRegion] == PointList)
+        {
+            ProcessBCVertex(gconn, base_elem, bc_elem_set_type[iBCRegion], 
+                nBCElem[iBCRegion], bc_conn_list[iBCRegion], bctype, BCName);
+        }
+        else
+        {
+            ostringstream oss;
+            oss << "Error: this situation has not been considered, for points set type is " << PointSetTypeName[bc_elem_set_type[iBCRegion]];
+            oss << " in BCRegions " << iBCRegion << endl;
+            TK_Exit::ExceptionExit(oss);
+        }
+    }
+
+    MarkBCInterface(gconn);
+
+    if (bc_conn_list)
+    {
+        for (int iBCRegion = 0; iBCRegion < nBCRegions; ++ iBCRegion)
+        {
+            delete [] bc_conn_list[iBCRegion];
+        }
+    }
+    delete [] bc_conn_list;
+}
+
+void CGNSBase::MarkBCInterface(Base_Grid_Conn *gconn)
+{
+    vector<cgsize_t> &right_cell_of_face = *gconn->GetRightCellOfFace();
+
+    uint_t nTotalFace = right_cell_of_face.size();
+    int nBoundFace = 0;
+    for (cgsize_t iFace = 0; iFace <static_cast<cgsize_t>(nTotalFace); ++ iFace)
+    {
+        if (right_cell_of_face[iFace] == -1)
+        {
+            nBoundFace ++;
+        }
+    }
+}
+
+void CGNSBase::ProcessBCVertex(Base_Grid_Conn *gconn, BaseElement *base_elem, 
+                               int bc_elem_set_type, int nBCElem, cgsize_t *bc_conn_list, int bctype, const string &BCName)
+{
+    set<cgsize_t> bc_vertex;
+    if (bc_elem_set_type == PointRange)
+    {
+        //ProcessBCVertex(gconn, base_elem, bc_elem_set_type, nBCElem, bc_conn_list, bctype);
+        for (int i = static_cast<int>(bc_conn_list[0]); i <= static_cast<int>(bc_conn_list[1]); ++ i)
+        {
+            bc_vertex.insert(i);
+        }
+    }
+    else
+    {
+        for (int i = 0; i < nBCElem; ++ i)
+        {
+            bc_vertex.insert(bc_conn_list[i]);
+        }
+    }
+
+    ProcessBCVertex(gconn, base_elem, bc_vertex, bctype, BCName);
+}
+
+void CGNSBase::GetFace(BaseElement *base_elem, cgsize_t iCell, int &facept_num, cgsize_t *&bcface)
+{
+    cgsize_t iabscell = iCell;
+    int isection = 0;
+
+    GetISection(iCell, isection);
+    ElementType_t etype = static_cast<ElementType_t>(elem_type[isection]);
+    cgsize_t *base_elem_elem_pt = base_elem->GetElementPoint();
+    facept_num = static_cast<int>(base_elem_elem_pt[etype]);
+    GetElem(conn_list[isection], iabscell - istart[isection], facept_num, bcface);
+}
+
+void CGNSBase::GetFace(cgsize_t *elem, int loc, int *bc_face, int &nfacept, CElemFace *elemface)
+{
+    int * elemface_facept_num = elemface->GetFacePointNumber();
+    int **elemface_face_id    = elemface->GetFaceID();
+
+    nfacept      = elemface_facept_num[loc];
+    int *face_id = elemface_face_id[loc];
+
+    for (int i = 0; i < nfacept; ++ i)
+    {
+        bc_face[i] = static_cast<int>(elem[face_id[i]]);
+    }
+}
+
+bool CGNSBase::CheckBCFace(int *bc_face, int nfacept, set<cgsize_t> &bc_vertex)
+{
+    set<cgsize_t>::iterator iter;
+    for (int i = 0; i < nfacept; ++ i)
+    {
+        iter = bc_vertex.find(bc_face[i]);
+        if (iter == bc_vertex.end())
+        {
+            return false;
+        }
+    }
+    return true;
+}
+
+void CGNSBase::ProcessBCVertex(Base_Grid_Conn *gconn, BaseElement *base_elem, 
+                               set<cgsize_t> &bc_vertex, int bctype, const string &BCName)
+{
+    vector<cgsize_t> &left_cell_of_face  = *gconn->GetLeftCellOfFace();
+    vector<cgsize_t> &right_cell_of_face = *gconn->GetRightCellOfFace();
+
+    uint_t nTotalFace = right_cell_of_face.size();
+    int nBoundFace = 0;
+    for (cgsize_t iFace = 0; iFace < static_cast<cgsize_t>(nTotalFace); ++ iFace)
+    {
+        if (right_cell_of_face[iFace] == -1)
+        {
+            nBoundFace ++;
+        }
+    }
+
+    cout << "ProcessBCVertex BCtype = " << bctype << " ........................................\n";
+    cout << "All Candidate bc num is : " << nBoundFace << "\n";
+
+    cgsize_t *elem;
+    cgsize_t iCell;
+    int etype, loc, nfacept;
+    const int maxfacept = 100;
+    int bc_face[maxfacept];
+
+    vector<CGNS_BCFace *> *bcFace = gconn->GetBCFace();
+    vector<int> *face_location = gconn->GetFaceLocation();
+
+    CElemFace *face_list = base_elem->GetElementFace();
+
+    for (cgsize_t iFace = 0; iFace < static_cast<cgsize_t>(nTotalFace); ++ iFace)
+    {
+        int old_bc_type = (*bcFace)[iFace]->GetBCType();
+        if (right_cell_of_face[iFace] == - 1 && old_bc_type == 0)
+        {
+            iCell = left_cell_of_face[iFace];
+            loc   = (*face_location)[iFace];
+
+            GetElem(base_elem, iCell, etype, elem);
+            GetFace(elem, loc, bc_face, nfacept, &face_list[etype]);
+
+            if (CheckBCFace(bc_face, nfacept, bc_vertex))
+            {
+                (*bcFace)[iFace]->SetBCType(bctype);
+                (*bcFace)[iFace]->SetBCName(BCName);
+                if (bctype == 0)
+                {
+                    cout << "impossible bctype == 0 in ProcessBCVertex\n";
+                }
+            }
+        }
+    }
+}
+
+CGNSFactory::CGNSFactory(int nBlocks)
+{
+    this->nBlocks = nBlocks;
+    base_conn = new Base_Grid_Conn *[nBlocks];
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        base_conn[iZone] = new Base_Grid_Conn();
+    }
+
+    rawgrid = new RawGrid *[nBlocks];
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        rawgrid[iZone] = new RawGrid();
+    }
+
+    base_cgns = new CGNSBase *[nBlocks];
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        base_cgns[iZone] = new CGNSBase();
+    }
+
+    base_elem = new BaseElement();
+    fantasy_bc = new BaseBCType();
+}
+
+CGNSFactory::~CGNSFactory()
+{
+    delete base_elem;
+    delete fantasy_bc;
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        delete base_conn[iZone];
+    }
+    delete [] base_conn;
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        delete rawgrid[iZone];
+    }
+    delete [] rawgrid;
+
+    //for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    //{
+    //    delete base_cgns[iZone];
+    //}
+    delete [] base_cgns;
+}
+
+void CGNSFactory::ConvertGrid2Fantasy()
+{
+    //ReLableSelfDefineBC();
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        std::cout << "Converting Grid to PHengLEI for Zone " << iZone << " of Total Blocks " << nBlocks << "\n";
+        ComputeGridConn(this->GetCGNSBase(iZone), base_conn[iZone]);
+    }
+
+    DumpSelfDefinePartInformation();
+}
+
+void CGNSFactory::ComputeGridConn(CGNSBase *cgnsgrid, Base_Grid_Conn *gconn)
+{
+    cgnsgrid->ComputeGridConn(gconn, this->base_elem);
+}
+
+void CGNSFactory::ReLableSelfDefineBC()
+{
+    int countOfSelfDefine = 0;
+    for (int iBlock = 0; iBlock < nBlocks; ++ iBlock)
+    {
+        CGNSBase *cgnsGrid = this->GetCGNSBase(iBlock);
+
+        int *bc_type = cgnsGrid->GetBCType();
+        int nBCRegions = cgnsGrid->GetNumberOfBCRegions();
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegions; ++ iBCRegion)
+        {
+            BCType_t bctype = static_cast<BCType_t>(bc_type[iBCRegion]);
+            //! Since the number of custom boundary condition is 1, all of them are forced to add the maximum number NofValidBCTypes.
+            if (bctype == BCTypeUserDefined)
+            {
+                bctype = static_cast<BCType_t> (NofValidBCTypes + countOfSelfDefine);
+                ++ countOfSelfDefine;
+            }
+
+            if (bctype >= NofValidBCTypes)
+            {
+                bc_type[iBCRegion] = bctype;
+            }
+        }
+    }
+}
+
+void CGNSFactory::DumpSelfDefinePartInformation()
+{
+    //! Collect all of the boundary condition.
+    set<string> nameContainer;
+    vector<int> bcType;
+    vector<string> boundaryName;
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        CGNSBase *cgnsgrid = this->GetCGNSBase(iZone);
+
+        int *bc_type = cgnsgrid->GetBCType();
+        string *bc_name = cgnsgrid->GetBCName();
+        int nBCRegions = cgnsgrid->GetNumberOfBCRegions();
+
+        for (int iBC = 0; iBC < nBCRegions; ++ iBC)
+        {
+            int cgnsBCType = bc_type[iBC];
+            int fantasyBCType = this->GetBaseBCType()->GetBCType(cgnsBCType);
+
+            string name = bc_name[iBC];
+
+            set<string> :: iterator nameIter;
+
+            nameIter = nameContainer.find(name);
+            //if(nameIter == nameContainer.end())
+            if (nameIter == nameContainer.end() && fantasyBCType >= PHENGLEI::StartNumberOfBodyOfHyperFLOW && fantasyBCType <= PHENGLEI::ENDNumberOfBodyOfHyperFLOW)
+            {
+                boundaryName.push_back(name);
+                bcType.push_back(fantasyBCType);
+            }
+        }
+    }
+
+    uint_t nPart = bcType.size();
+    if (!nPart)
+    {
+        return;
+    }
+
+    //! Dump out.
+    string fileName;
+    GlobalDataBase::GetData("from_gfile", &fileName, PHSTRING, 1);
+    fileName = ChangeExtensionOfFileName(fileName, "part");
+
+    fstream outfile(fileName.c_str(), ios::out);
+    if (!outfile)
+    {
+        ostringstream oss;
+        oss << "Can not open file " << fileName << endl;
+        TK_Exit::ExceptionExit(oss.str());
+    }
+
+    RDouble dm = 0.0, dl = 0.0, dn3 = 0.0;
+    RDouble Lref = 1.0, Sref = 1.0, xref = 0.0, yref = 0.0, zref = 0.0;
+
+    outfile << nPart << endl;
+
+    outfile << dm << " " << dl << " " << dn3 << endl;
+
+    vector< int > :: iterator typeIter = bcType.begin();
+    vector< string > :: iterator nameIter = boundaryName.begin();
+
+    for (int iPart = 0; iPart < nPart; ++ iPart)
+    {
+        int type = *typeIter;
+        string name = *nameIter;
+
+        outfile << name << "	" << type << endl;
+        outfile << "		" << xref << "	" << yref << "	" << zref << "	" << Sref << "	" << Lref << endl;
+
+        ++ typeIter;
+        ++ nameIter;
+    }
+
+    outfile.close();
+    outfile.clear();
+}
+
+void CGNS2UnsGrid(CGNSFactory *factory_cgns, int iZone, UnstructGrid *grid)
+{
+    Base_Grid_Conn *gconn   = factory_cgns->GetBaseGridConnection(iZone);
+    RawGrid        *rawgrid = factory_cgns->GetRawGrid(iZone);
+    CGNSBase *cgnsGrid = factory_cgns->GetCGNSBase(iZone);
+
+    int nTotalCell = static_cast<int>(gconn->GetNTotalCell());
+    int nTotalNode = static_cast<int>(gconn->GetNTotalNode());
+    int nBoundFace = static_cast<int>(gconn->GetNBoundFace());
+
+    grid->SetNTotalCell(nTotalCell);
+    grid->SetNTotalNode(nTotalNode);
+    grid->SetNBoundFace(nBoundFace);
+
+    RDouble *x = new RDouble[nTotalNode];
+    RDouble *y = new RDouble[nTotalNode];
+    RDouble *z = new RDouble[nTotalNode];
+
+    grid->SetX(x);
+    grid->SetY(y);
+    grid->SetZ(z);
+
+    RDouble *xx = rawgrid->GetX();
+    RDouble *yy = rawgrid->GetY();
+    RDouble *zz = rawgrid->GetZ();
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        x[iNode] = xx[iNode];
+        y[iNode] = yy[iNode];
+        z[iNode] = zz[iNode];
+    }
+    delete [] xx;
+    delete [] yy;
+    delete [] zz;
+
+    RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+    RDouble *gridTranslationVector = new RDouble[3]();
+    if (GlobalDataBase::IsExist("gridTranslationVector", PHDOUBLE, 3))
+    {
+        GlobalDataBase::GetData("gridTranslationVector", gridTranslationVector, PHDOUBLE, 3);
+    }
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        x[iNode] *= gridScaleFactor;
+        x[iNode] += gridTranslationVector[0];
+        y[iNode] *= gridScaleFactor;
+        y[iNode] += gridTranslationVector[1];
+        z[iNode] *= gridScaleFactor;
+        z[iNode] += gridTranslationVector[2];
+    }
+
+    cout << "  Boundary condition setting ......\n";
+    //! Set the boundary conditions.
+    UnstructBCSet **bcrs = new UnstructBCSet * [nBoundFace];
+    HyList<int> cgnsBCList;
+    HyList<int> fantasyBCList;
+
+    map<int, string> Fantasybctype = CreatFantasybctype();
+
+    vector<CGNS_BCFace *> *bcFace = gconn->GetBCFace();
+
+    int nBCRegionUnstruct = cgnsGrid->GetNumberOfBCRegions();
+    string *bcRegionName = cgnsGrid->GetBCName();
+
+    for (cgsize_t iFace = 0; iFace < nBoundFace; ++iFace)
+    {
+        const string bcName = (*bcFace)[iFace]->GetBCName();
+        int cgnsBCType = (*bcFace)[iFace]->GetBCType();
+        int fantasyBCType = factory_cgns->GetBaseBCType()->GetBCType(cgnsBCType);
+
+        //!Collect faces which is NO_BOUNDARY_CONDITION into a BCRegion
+        if (fantasyBCType == 0) 
+        {
+            nBCRegionUnstruct ++;
+            string *boundaryName = new string [nBCRegionUnstruct]();
+            for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; ++ iBCRegionUnstruct)
+            {
+                if (iBCRegionUnstruct < nBCRegionUnstruct - 1)
+                {
+                    boundaryName[iBCRegionUnstruct] = bcRegionName[iBCRegionUnstruct];
+                }
+                else
+                {
+                    boundaryName[iBCRegionUnstruct] = bcName;
+                }
+            }
+            cgnsGrid->SetBCName(boundaryName);
+            break;
+        }
+    }
+    string *boundaryName = cgnsGrid->GetBCName();
+
+    grid->CreateUnstructBCSet(nBCRegionUnstruct);
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int* bcRegionIDofBCFace = new int[nBoundFace];
+    for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+    {
+        UnstructBC *unstructBC = new UnstructBC(iBCRegionUnstruct);
+        unstructBCSet->SetBCRegion(iBCRegionUnstruct, unstructBC);
+        unstructBC->SetBCName(boundaryName[iBCRegionUnstruct]);
+        
+        for (cgsize_t iFace = 0; iFace < nBoundFace; ++iFace)
+        {
+            const string bcName = (*bcFace)[iFace]->GetBCName();
+            int cgnsBCType = (*bcFace)[iFace]->GetBCType();
+            int fantasyBCType = factory_cgns->GetBaseBCType()->GetBCType(cgnsBCType);
+  
+            cgnsBCList.insert(cgnsBCType);
+            fantasyBCList.insert(fantasyBCType);
+            if (bcName == unstructBC->GetBCName())
+            {
+                unstructBC->SetBCType(fantasyBCType);
+                bcRegionIDofBCFace[iFace] = iBCRegionUnstruct;
+                vector<int> *faceIndex = unstructBC->GetFaceIndex();
+                faceIndex->push_back(static_cast<int>(iFace));
+            }
+        }
+    }
+    
+    unstructBCSet->SetBCFaceInfo(bcRegionIDofBCFace);
+
+    for (cgsize_t iface = 0; iface < nBoundFace; ++ iface)
+    {
+        bcrs[iface] = new UnstructBCSet();
+        const string &bcName = (*bcFace)[iface]->GetBCName();
+        int cgnsBCType = (*bcFace)[iface]->GetBCType();
+        int fantasyBCType = factory_cgns->GetBaseBCType()->GetBCType(cgnsBCType);
+        bcrs[iface]->SetKey(fantasyBCType);
+        bcrs[iface]->SetBCName(bcName);
+        cgnsBCList.insert(cgnsBCType);
+        fantasyBCList.insert(fantasyBCType);
+
+        delete (*bcFace)[iface];
+    }
+    (*bcFace).clear();
+    grid->SetBCRecord(bcrs);
+
+    cout << "After converting CGNS grid,\n";
+    cout << "Number of Original Boundary Condition: " << cgnsBCList.size() << "\n";
+    for (int iBC = 0; iBC < cgnsBCList.size(); ++ iBC)
+    {
+        cout<< "  The "<< iBC + 1 << " CGNS BC Name is: " << BCTypeName[cgnsBCList[ iBC ]] << endl;
+    }
+
+    //map<int, string> Fantasybctype = CreatFantasybctype();
+
+    cout << "Number of Final Boundary Condition: " << fantasyBCList.size() << "\n";
+    for (int iBC = 0; iBC < fantasyBCList.size(); ++ iBC)
+    {
+        cout << "  The " << iBC + 1 << " PHengLEI BC Name is: ";
+        cout << Fantasybctype[fantasyBCList[iBC]] << "\n";
+    }
+    //     for (set<int>::iterator iter = s2.begin(); iter != s2.end(); ++ iter)
+    //     {
+    //         cout << *iter << " ";
+    //     }
+    //cout << "\n";
+
+    vector<cgsize_t> *gconn_left_cell_of_face  = gconn->GetLeftCellOfFace();
+    vector<cgsize_t> *gconn_right_cell_of_face = gconn->GetRightCellOfFace();
+
+    vector<int> *gconn_node_number_of_each_face = gconn->GetNodeNumberOfEachFace();
+
+    int nTotalFace = static_cast<int>(gconn_left_cell_of_face->size());
+    grid->SetNTotalFace(nTotalFace);
+    cout << "Number of total faces: " << nTotalFace << "\n";
+
+    int *node_number_of_each_face = new int [nTotalFace];
+    for (cgsize_t iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        node_number_of_each_face[iFace] = (*gconn_node_number_of_each_face)[iFace];
+    }
+    grid->SetNodeNumberOfEachFace(node_number_of_each_face);
+
+    gconn->FreeNodeNumberOfEachFace();
+
+    long long int face2node_size = 0;
+    for (cgsize_t iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        face2node_size += node_number_of_each_face[iFace];
+    }
+    int *face2node = new int [face2node_size];
+    grid->SetFace2Node(face2node);
+
+    vector< vector<cgsize_t> > *gface2node = gconn->GetFace2Node();
+
+    long long int count = 0;
+    for (cgsize_t iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        for (std::size_t j = 0; j < (*gface2node)[iFace].size(); ++ j)
+        {
+            face2node[count] = static_cast<int>((*gface2node)[iFace][j]);
+            ++ count;
+        }
+    }
+    gconn->FreeFace2Node();
+    //cout << " Set face2node finished\n";
+
+    int *left_cell_of_face  = new int[nTotalFace];
+    int *right_cell_of_face = new int[nTotalFace];
+    grid->SetLeftCellOfFace (left_cell_of_face);
+    grid->SetRightCellOfFace(right_cell_of_face);
+    for (cgsize_t iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        left_cell_of_face [iFace] = static_cast<int>((*gconn_left_cell_of_face)[iFace]);
+        //! Set the label of ghostcell.
+        right_cell_of_face[iFace] = static_cast<int>((*gconn_right_cell_of_face)[iFace]);
+    }
+
+    gconn->FreeCellOfFace();
+
+    int *node_number_of_each_cell = new int [nTotalCell];
+
+    vector<int> *gconn_node_number_of_each_cell = gconn->GetNodeNumberOfEachCell();
+
+    for (cgsize_t iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        node_number_of_each_cell[iCell] = (*gconn_node_number_of_each_cell)[iCell];
+    }
+    grid->SetNodeNumberOfEachCell(node_number_of_each_cell);
+    //cout << " Set node_number_of_each_cell finished\n";
+
+    gconn->FreeNodeNumberOfEachCell();
+
+    long long int cell2node_size =0;
+
+    for (cgsize_t iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        cell2node_size += node_number_of_each_cell[iCell];
+    }
+    int *cell2node = new int [cell2node_size];
+    grid->SetCell2Node(cell2node);
+
+    vector< vector<cgsize_t> > *gcell2node = gconn->GetCell2Node();
+
+    count = 0;
+    for (cgsize_t iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        for (int iNode =0; iNode < node_number_of_each_cell[iCell]; ++ iNode)
+        {
+            cell2node[count] = static_cast<int>((*gcell2node)[iCell][iNode]);
+            ++ count;
+        }
+    }
+    gconn->FreeCell2Node();
+
+    SimpleVC *volumeCondition = new SimpleVC();
+    string vcName = cgnsGrid->GetVCName();
+    volumeCondition->SetVCName(vcName);
+    int vcType = cgnsGrid->GetVCType();
+    volumeCondition->SetVCType(vcType);
+    grid->SetVolumeCondition(volumeCondition);
+}
+
+}
diff --git a/API/PreProcess/src/Pre_GridCombine.cpp b/API/PreProcess/src/Pre_GridCombine.cpp
new file mode 100644
index 0000000..b6e3a18
--- /dev/null
+++ b/API/PreProcess/src/Pre_GridCombine.cpp
@@ -0,0 +1,1298 @@
+#include "Pre_GridCombine.h"
+#include "Math_BasisFunction.h"
+#include "Glb_Dimension.h"
+#include "IO_FileName.h"
+#include "Region.h"
+#include "OverLappingGrid.h"
+#include "Pre_GridConversion.h"
+#include "PHIO.h"
+#include "TK_Log.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+CombinGrid::CombinGrid(Region *region, Grid **grid_in, int nZones_in)
+{
+    this->region = region;
+    this->grid_in = grid_in;
+    numberOfZones = nZones_in;
+
+    nTotalCell = 0;
+    nTotalFace = 0;
+    nTotalNode = 0;
+    nIFace = 0;
+    nTotalNodeEachZone = new int [numberOfZones];
+    nTotalFaceEachZone = new int [numberOfZones];
+    nTotalCellEachZone = new int [numberOfZones];
+    nIFaces = new int [numberOfZones];
+
+    face2NewFaceafterReorder = 0;
+    face2Interface = 0;
+    face2InterfaceafterReorder = 0;
+    interface2BoundaryFaceafterReorder = 0;
+    isGlobalInterFace = 0;
+}
+
+CombinGrid::~CombinGrid()
+{
+    delete [] nTotalNodeEachZone;
+    delete [] nTotalFaceEachZone;
+    delete [] nTotalCellEachZone;
+    delete [] nIFaces;
+    delete [] left_cell_of_all_face;
+    delete [] right_cell_of_all_face;
+    delete [] node_number_of_all_face;
+    delete [] isFaceMerged;
+    delete [] face2Interface;
+    delete [] isGlobalInterFace;
+    delete [] face2InterfaceafterReorder;
+    delete [] interface2BoundaryFaceafterReorder;
+    delete [] face2NewFaceafterReorder;
+
+    DelPointer2(node2all);
+    DelPointer2(face2all);
+    DelPointer2(cell2all);
+}
+
+void CombinGrid::CheckifIndependentZoneExist()
+{
+    int myid = PHMPI::GetCurrentProcessorID();
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    int localIndex = 0;
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int gridIndex = grid_in[iZone]->GetZoneID();
+        zoneIDinCurrentProc.insert(gridIndex);
+        zoneIndexMap.insert(pair<int, int>(gridIndex ,localIndex));
+        localIndex ++;
+    }
+
+    if (numberOfZones != 1)
+    {
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            int processorID = PHMPI::GetZoneProcessorID(iZone);
+
+            if (processorID == myid)
+            {
+                bool isNeighborinThisProc = false;
+
+                ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+                std::size_t numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+                
+                for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+                {
+                    int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+                    set<int>::iterator iter;
+                    for (iter = zoneIDinCurrentProc.begin(); iter != zoneIDinCurrentProc.end(); ++ iter)
+                    {
+                        int zoneID = *iter;
+                        if (neighborZone == zoneID)
+                        {
+                            isNeighborinThisProc = true;
+                            break;
+                        }
+                    }
+                }
+
+                if (!isNeighborinThisProc)
+                {
+                    TK_Exit::ExceptionExit("Error: An single zone that couldn't merged to any others has been found!");
+                }
+            }
+        }
+    }
+
+    WriteLogFile("All zones in this processor could be merged!");
+    PrintToWindow("All zones in this processor could be merged!\n");
+}
+
+Grid * CombinGrid::CreateCombinationGrid()
+{
+    CheckifIndependentZoneExist();
+
+    Init();
+
+    //! Warning:
+    //! All assumptions are that multi blocks in a process are merged into one block,
+    //! If there is no common face between two blocks, a lot logic relationships need to be reconsidered.
+    //! For example,MergeCell2All is the zone number of new grid.
+    MergeCell2All();
+    MergeNode2All();
+    MergeFace2All();
+    MergeInterface2All();
+
+    int nTotalNode = GetNTotalNode();
+    int nTotalFace = GetNTotalFace();
+    int nTotalCell = GetNTotalCell();
+    int nIFace = GetNIFace();
+
+    ostringstream oss;
+    oss << "After nodes faces cells merged ..." << "\n";
+    oss << "  Number of Points     : " << nTotalNode << "\n";
+    oss << "  Number of Faces      : " << nTotalFace << "\n";
+    oss << "  Number of Cells      : " << nTotalCell << "\n";
+    oss << "  Number of InterFaces : " << nIFace << "\n";
+    PrintToWindow(oss);
+    WriteLogFile(oss);
+
+    int myid = PHMPI::GetCurrentProcessorID();
+    Grid *grid_all = CreateGridGeneral(UNSTRUCTGRID, new GridID(myid), 0, GetDim());
+
+    grid_all->SetNTotalNode(nTotalNode);
+    grid_all->SetNTotalFace(nTotalFace);
+    grid_all->SetNTotalCell(nTotalCell);
+
+    return grid_all;
+}
+
+void CombinGrid::Init()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        nTotalNodeEachZone[iZone] = grid_in[iZone]->GetNTotalNode();
+        nTotalFaceEachZone[iZone] = grid_in[iZone]->GetNTotalFace();
+        nTotalCellEachZone[iZone] = grid_in[iZone]->GetNTotalCell();
+        nIFaces[iZone] = grid_in[iZone]->GetNIFace();
+
+        nTotalCell += nTotalCellEachZone[iZone];
+        nTotalFace += nTotalFaceEachZone[iZone];
+        nIFace     += nIFaces[iZone];
+        nTotalNode += nTotalNodeEachZone[iZone];
+    }
+
+    InitLocal2All();
+}
+
+void CombinGrid::InitLocal2All()
+{
+    WriteLogFile("Init local to all ...");
+    InitNode2All();
+    InitFace2All();
+    InitCell2All();
+}
+
+void CombinGrid::RunCombinGrid()
+{
+    grid_all = UnstructGridCast(CreateCombinationGrid());
+
+    ResetCoordinate();
+    ResetNodeNumberOfEachFace();
+    ResetFace2Node();
+    ResetLeftRightCell();
+    MergeCell2Node();
+    MergeBCType();
+    SwapInterfaceData();
+
+    PrintToWindow("Combine grids finished ...\n");
+}
+
+void CombinGrid::MergeInterface2All()
+{
+    WriteLogFile("Merge interface2all ...");
+    PrintToWindow("Merge interface2all ...\n");
+
+    int nTotalFace = GetNTotalFace();
+    isGlobalInterFace = new bool [nTotalFace];
+    PHSPACE::SetField(isGlobalInterFace, false, nTotalFace);
+
+    face2Interface = new int [nTotalFace];
+    PHSPACE::SetField(face2Interface, -1, nTotalFace);
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+    int nMixingPlaneInterfaces = 0;
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        UnstructGrid *gridLocal = UnstructGridCast(grid_in[iZone]);
+
+        UnstructBCSet *unstructBCSet = gridLocal->GetUnstructBCSet();
+        int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+
+        int *face2all = GetFace2All(iZone);
+
+        int nMergedInterfaces = 0;
+        for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+            int bcType = bcRegion->GetBCType();
+            string bcName = bcRegion->GetBCName();
+
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                //! iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+                int globalFaceID = face2all[iFace];
+
+                if (bcType == PHENGLEI::INTERFACE)
+                {
+                    if (!isFaceMerged[globalFaceID])
+                    {
+                        isGlobalInterFace[globalFaceID] = true;
+                    }else
+                    {
+                        ++ nMergedInterfaces;
+                    }
+                }
+
+                if (referenceFrame == ROTATIONAL_FRAME)
+                {
+                    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+
+                    string MixingPlane[100];
+                    GlobalDataBase::GetData("MixingPlane", &MixingPlane, PHSTRING, 2 * nTurboZone - 2);
+
+                    string MixingInName, MixingOutName;
+                    if (iZone == 0)
+                    {
+                        MixingOutName = MixingPlane[iZone];
+                    }
+                    else if (iZone == nTurboZone - 1)
+                    {
+                        MixingInName = MixingPlane[2 * iZone - 1];
+                    }
+                    else
+                    {
+                        MixingInName  = MixingPlane[2 * iZone - 1];
+                        MixingOutName = MixingPlane[2 * iZone];
+                    }
+                   
+                    if (bcName == MixingInName || bcName == MixingOutName)
+                    {
+                        ++nMergedInterfaces;
+                        ++nMixingPlaneInterfaces;
+                    }
+                }
+            }
+        }
+
+        //! this means rotating frame with mixing plane.
+        if (referenceFrame == ROTATIONAL_FRAME && nMixingPlaneInterfaces > 0)
+        {
+            WriteLogFile("number of Mixing Plane: ", nMixingPlaneInterfaces);
+        }
+        else
+        {
+            WriteLogFile("number of Merged Interfaces: ", nMergedInterfaces);
+        }
+        if (numberOfZones > 1 && nMergedInterfaces == 0)
+        {
+            TK_Exit::ExceptionExit("The sub-zone is independent of other zones, consider more!");
+        }
+    }
+
+    int nIFaceGlobal = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        if(isGlobalInterFace[iFace])
+        {
+            face2Interface[iFace] = nIFaceGlobal;
+            ++ nIFaceGlobal;
+        }
+    }
+
+    this->nIFace = nIFaceGlobal;
+}
+
+void CombinGrid::MergeFace2All()
+{
+    WriteLogFile("Merge face2all ...");
+    PrintToWindow("Merge face2all ...\n");
+
+    left_cell_of_all_face = new int[nTotalFace];
+    right_cell_of_all_face = new int[nTotalFace];
+    node_number_of_all_face = new int[nTotalFace];
+
+    isFaceMerged = new bool [nTotalFace];
+    PHSPACE::SetField(isFaceMerged, false, nTotalFace);
+
+    nTotalFace = 0;
+
+    int globalFace_count = 0;
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        UnstructGrid *unstr_current = UnstructGridCast(grid_in[iZone]);
+
+        int nBFace_current                    = unstr_current->GetNBoundFace();
+        int *node_number_of_each_face_current = unstr_current->GetNodeNumberOfEachFace();
+        int *face2node_current                = unstr_current->GetFace2Node();
+        int *left_cell_of_face_current        = unstr_current->GetLeftCellOfFace();
+        int *right_cell_of_face_current       = unstr_current->GetRightCellOfFace();
+        
+        UnstructBCSet *unstructBCSet = unstr_current->GetUnstructBCSet();
+        int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+       
+        InterfaceInfo *iinfo_current          = unstr_current->GetInterfaceInfo();
+        int *interFace2ZoneID_current         = iinfo_current->GetInterFace2ZoneID();
+        int *interFace2InterFaceID_current    = iinfo_current->GetInterFace2InterFaceID();
+
+        int *node2all = GetNode2All(iZone);
+        int *face2all = GetFace2All(iZone);
+        int *cell2all = GetCell2All(iZone);
+
+        int interface_current = 0;
+        int node_sum = 0;
+        for (int iFace = 0; iFace < nTotalFaceEachZone[iZone]; ++ iFace)
+        {
+            int node_number_of_iface = node_number_of_each_face_current[iFace];
+            if (iFace < nBFace_current)
+            {
+                UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+                int bctype = bcRegion->GetBCType();
+                if (bctype == PHENGLEI::INTERFACE)
+                {
+                    int GridID_Neighbor = interFace2ZoneID_current[interface_current];
+
+                    bool isNeighborinThisProc = false;
+                    set<int>::iterator iter;
+                    for (iter = zoneIDinCurrentProc.begin(); iter != zoneIDinCurrentProc.end(); ++ iter)
+                    {
+                        int zoneID = *iter;
+                        if (GridID_Neighbor == zoneID)
+                        {
+                            isNeighborinThisProc = true;
+                            break;
+                        }
+                    }
+
+                    int localIndexNeighbor = zoneIndexMap[GridID_Neighbor];
+                    if ((isNeighborinThisProc) && (localIndexNeighbor < iZone))
+                    {
+                        int interface_Neighbor = interFace2InterFaceID_current[interface_current];
+                        UnstructGrid *unstr_Neighbor = UnstructGridCast(grid_in[localIndexNeighbor]);
+                        InterfaceInfo *iinfo_Neighbor = unstr_Neighbor->GetInterfaceInfo();
+                        int *interFace2BoundaryFace_Neighbor = iinfo_Neighbor->GetInterFace2BoundaryFace();
+
+                        int bcFace_Neighbor = interFace2BoundaryFace_Neighbor[interface_Neighbor];
+                        int *face2all_Neighbor = GetFace2All(localIndexNeighbor);
+                        face2all[iFace] = face2all_Neighbor[bcFace_Neighbor];
+
+                        right_cell_of_all_face[face2all_Neighbor[bcFace_Neighbor]] = cell2all[left_cell_of_face_current[iFace]];
+
+                        isFaceMerged[face2all_Neighbor[bcFace_Neighbor]] = true;
+                        node_sum += node_number_of_iface;
+
+                        ++ interface_current;
+                        continue;
+                    }
+
+                    ++ interface_current;
+                }
+            }
+
+            face2all[iFace] = globalFace_count;
+
+            node_number_of_all_face[globalFace_count] = node_number_of_iface;
+
+            for (int iNode = 0; iNode < node_number_of_iface; ++ iNode)
+            {
+                int nodeindex = face2node_current[node_sum + iNode];
+                allface2node.push_back(node2all[nodeindex]);
+            }
+            node_sum += node_number_of_iface;
+            
+            if (left_cell_of_face_current[iFace] >= nTotalCellEachZone[iZone] || left_cell_of_face_current[iFace] < 0)
+            {
+                left_cell_of_all_face[globalFace_count] = -1;
+            }
+            else
+            {
+                left_cell_of_all_face[globalFace_count] = cell2all[left_cell_of_face_current[iFace]];
+            }
+            
+
+            if (right_cell_of_face_current[iFace] >= nTotalCellEachZone[iZone] || right_cell_of_face_current[iFace] < 0)
+            {
+                right_cell_of_all_face[globalFace_count] = -1;
+            }
+            else
+            {
+                right_cell_of_all_face[globalFace_count] = cell2all[right_cell_of_face_current[iFace]];
+            }
+            
+            ++ globalFace_count;
+        }
+
+        nTotalFace = globalFace_count;
+    }
+}
+
+void CombinGrid::MergeCell2All()
+{
+    WriteLogFile("Merge cell2all ...");
+    PrintToWindow("Merge cell2all ...\n");
+
+    int sum = 0;
+    nTotalCell = 0;
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int *cell2all = GetCell2All(iZone);
+
+        for (int i = 0; i < nTotalCellEachZone[iZone]; ++ i)
+        {
+            cell2all[i] = sum;
+            sum ++;
+        }
+
+        nTotalCell = sum;
+    }
+
+    int minNTCell, maxNTCell;
+    PH_Reduce(&nTotalCell, &minNTCell, 1, MPI_MIN);
+    PH_Reduce(&nTotalCell, &maxNTCell, 1, MPI_MAX);
+
+    if (PHMPI::GetCurrentProcessorID() == PHMPI::GetServerProcessorID())
+    {
+        ostringstream oss;
+        oss << "Min && Max number of cell after merged : " << minNTCell << ", " << maxNTCell << endl;
+        oss << "Min to Max nTCell ratio = " << (minNTCell * 1.0) / (maxNTCell * 1.0) << endl;
+        PrintToWindow(oss);
+        WriteLogFile(oss);
+    }
+
+    PH_Barrier();
+}
+
+void CombinGrid::MergeNode2All()
+{
+    WriteLogFile("Merge node2all ...");
+    PrintToWindow("Merge node2all ...\n");
+
+    int sum = 0;
+    Globalx.reserve(nTotalNode);
+    Globaly.reserve(nTotalNode);
+    Globalz.reserve(nTotalNode);
+
+    nTotalNode = 0;
+    RDouble minDistance, Disx, Disy, Disz;
+    minDistance = LARGE;
+    bool discard;
+    vector <int> bc_node_all;
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int *node2all = GetNode2All(iZone);
+
+        UnstructGrid *unstr = UnstructGridCast(grid_in[iZone]);
+        RDouble *x2 = grid_in[iZone]->GetX();
+        RDouble *y2 = grid_in[iZone]->GetY();
+        RDouble *z2 = grid_in[iZone]->GetZ();
+        int *node_number_of_each_face = unstr->GetNodeNumberOfEachFace();
+        int *face2node = unstr->GetFace2Node();
+        minDistance = MIN(minDistance, grid_in[iZone]->CalMinEdgeLength());
+        RDouble distanceTolerance = minDistance / 10;
+
+        int nBoundFace = grid_in[iZone]->GetNBoundFace();
+
+        int *isBCNode_iZone = new int[nTotalNodeEachZone[iZone]];
+        PHSPACE::SetField(isBCNode_iZone, 0, nTotalNodeEachZone[iZone]);
+
+        int nsum = 0;
+
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            for (int iNode = 0; iNode < node_number_of_each_face[iFace]; ++ iNode)
+            {
+                isBCNode_iZone[face2node[nsum+iNode]] = 1;
+            }
+            nsum += node_number_of_each_face[iFace];
+        }
+        
+        uint_t bc_node_number = bc_node_all.size();
+        for (int iNode = 0; iNode < nTotalNodeEachZone[iZone]; ++ iNode)
+        {
+            discard = false;
+
+            if (IsBcNode(isBCNode_iZone, iNode))
+            {
+
+                for (int jbcNode = 0; jbcNode < bc_node_number; jbcNode ++)
+                {
+                    Disx = fabs(x2[iNode] - Globalx[bc_node_all[jbcNode]]);
+                    Disy = fabs(y2[iNode] - Globaly[bc_node_all[jbcNode]]);
+                    Disz = fabs(z2[iNode] - Globalz[bc_node_all[jbcNode]]);
+
+                    if (Disx < distanceTolerance && Disy < distanceTolerance && Disz < distanceTolerance)
+                    {
+                        node2all[iNode] = bc_node_all[jbcNode];
+                        discard = true;
+                        break;
+                    }
+                    else
+                    {
+                        continue;
+                    }
+                }
+                if (discard != true)
+                {
+                    bc_node_all.push_back(sum);
+                }
+            }
+            
+            if (discard) continue;
+
+            Globalx.push_back(x2[iNode]);
+            Globaly.push_back(y2[iNode]);
+            Globalz.push_back(z2[iNode]);
+            node2all[iNode] = sum;
+            sum ++ ;
+        }
+        nTotalNode = sum;
+        delete [] isBCNode_iZone;
+    }
+}
+
+void CombinGrid::MergeBCType()
+{
+    WriteLogFile("Merge boundary condition ...");
+    PrintToWindow("Merge boundary condition ...\n");
+
+    int nTFace_all = grid_all->GetNTotalFace();
+
+    int nBFace_all = 0;
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        UnstructGrid *unstr = UnstructGridCast(grid_in[iZone]);
+        int *face2all = GetFace2All(iZone);
+
+        UnstructBCSet *unstructBCSet = unstr->GetUnstructBCSet();
+        int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+
+        for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                // iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+                int globalFaceID = face2all[iFace];
+
+                if (bcRegion->GetBCType() == PHENGLEI::INTERFACE)
+                {
+                    if (isFaceMerged[globalFaceID])
+                    {
+                        //! The interface has been merged, it no longer be boundary face now.
+                        continue;
+                    }
+                }
+                ++ nBFace_all;
+            }
+        }
+    }
+
+    grid_all->SetNBoundFace(nBFace_all);
+    UnstructBCSet **bcr_all = new UnstructBCSet * [nTFace_all];
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        UnstructGrid *unstr = UnstructGridCast(grid_in[iZone]);
+        int nBoundFace = unstr->GetNBoundFace();
+        int *face2all = GetFace2All(iZone);
+
+        UnstructBCSet **bcr = unstr->GetBCRecord();
+        
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            int globalFaceID = face2all[iFace];
+            if (bcr[iFace]->GetKey() == PHENGLEI::INTERFACE)
+            {
+                if (isFaceMerged[globalFaceID])
+                {
+                    //! The interface has been merged, it no longer be boundary face now.
+                    continue;
+                }
+            }
+
+            bcr_all[globalFaceID] = new UnstructBCSet();
+            bcr_all[globalFaceID]->SetKey(bcr[iFace]->GetKey());
+            bcr_all[globalFaceID]->SetBCName(bcr[iFace]->GetBCName());
+        }
+    }
+
+    vector< vector<int> > vface2node;
+    vface2node.reserve(nTFace_all);
+    int *node_number_of_each_face = grid_all->GetNodeNumberOfEachFace();
+    int *face2node = grid_all->GetFace2Node();
+    int *left_cell_of_face  = grid_all->GetLeftCellOfFace();
+    int *right_cell_of_face = grid_all->GetRightCellOfFace();
+
+    int nsum = 0;
+    for (int iFace = 0; iFace < nTFace_all; ++ iFace)
+    {
+        vector< int > eachface2node;
+        eachface2node.reserve(node_number_of_each_face[iFace]);
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            eachface2node.push_back(face2node[nsum]);
+            ++ nsum;
+        }
+        vface2node.push_back(eachface2node);
+    }
+
+    //! Swap faces make sure boundary faces are in the first section (iFace < nBoundFace),
+    //! and the interior faces are in the second section (iFace >= nBoundFace).
+    face2NewFaceafterReorder = new int [nTFace_all];
+    for (int iFace = 0; iFace < nTFace_all; ++ iFace)
+    {
+        face2NewFaceafterReorder[iFace] = iFace;
+    }
+
+    int jstart = nBFace_all;
+    for (int iFace = 0; iFace < nBFace_all; ++ iFace)
+    {
+        if (right_cell_of_face[iFace] != -1)
+        {
+            //! iFace is interior face, it must be reject out of nBoundFace.
+            for (int jFace = jstart; jFace < nTFace_all; ++ jFace)
+            {
+                if (right_cell_of_face[jFace] == -1)
+                {
+                    SWAP(left_cell_of_face[iFace], left_cell_of_face[jFace]);
+                    SWAP(right_cell_of_face[iFace], right_cell_of_face[jFace]);
+                    SWAP(vface2node[iFace], vface2node[jFace]);
+                    SWAP(node_number_of_each_face[iFace], node_number_of_each_face[jFace]);
+                    SWAP(bcr_all[iFace], bcr_all[jFace]);
+
+                    face2NewFaceafterReorder[iFace] = jFace;
+                    face2NewFaceafterReorder[jFace] = iFace;
+
+                    jstart = jFace + 1;
+                    break;
+                }
+            }
+        }
+    }
+
+    nsum = 0;
+    for (int iFace = 0; iFace < nTFace_all; ++ iFace)
+    {
+        for (int iNode = 0; iNode < node_number_of_each_face[iFace]; ++ iNode)
+        {
+            face2node[nsum] = vface2node[iFace][iNode];
+            ++ nsum;
+        }
+    }
+
+    UnstructBCSet **bcr_all2 = new UnstructBCSet * [nBFace_all];
+    grid_all->SetBCRecord(bcr_all2);
+
+    WriteLogFile("nTFace_all = ", nTFace_all);
+    WriteLogFile("nBFace_all = ", nBFace_all);
+
+    face2InterfaceafterReorder = new int [nTFace_all];
+    PHSPACE::SetField(face2InterfaceafterReorder, -1, nTFace_all);
+
+    interface2BoundaryFaceafterReorder = new int [nBFace_all]; // nIFace of grid_all has not been set yet.
+    PHSPACE::SetField(interface2BoundaryFaceafterReorder, -1, nBFace_all);
+
+    int interfaceID = 0;
+    
+    for (int iFace = 0; iFace < nBFace_all; ++ iFace)
+    {
+        bcr_all2[iFace] = bcr_all[iFace];
+
+        if (bcr_all[iFace]->GetKey() == PHENGLEI::INTERFACE)
+        {
+            interface2BoundaryFaceafterReorder[interfaceID] = iFace;
+            face2InterfaceafterReorder[iFace] = interfaceID ++;
+        }
+    }
+
+    delete [] bcr_all;
+
+    nIFace = interfaceID;
+    WriteLogFile("nIFace_all = ", nIFace);
+    InterfaceInfo *interfaceInfo = new InterfaceInfo(nIFace);
+    grid_all->SetInterfaceInfo(interfaceInfo);
+}
+
+bool CombinGrid::IsBcNode(int *p, int node_in)
+{
+    bool bc_node = false;
+
+    if (p[node_in] == 1) bc_node = true;
+    return bc_node;
+}
+
+void CombinGrid::InitNode2All()
+{
+    node2all = new int *[numberOfZones];
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int nTotalNode = grid_in[iZone]->GetNTotalNode();
+        node2all[iZone] = new int [nTotalNode];
+    }
+}
+
+void CombinGrid::InitFace2All()
+{
+    face2all = new int *[numberOfZones];
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int nTotalFace = grid_in[iZone]->GetNTotalFace();
+        face2all[iZone] = new int [nTotalFace];
+    }
+}
+
+void CombinGrid::InitIsBCFaceMerged()
+{
+
+}
+
+void CombinGrid::InitCell2All()
+{
+    cell2all = new int *[numberOfZones];
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int nTotalCell = grid_in[iZone]->GetNTotalCell();
+        cell2all[iZone] = new int [nTotalCell];
+    }
+}
+
+void CombinGrid::ResetCoordinate()
+{
+    WriteLogFile("Combine coordinates ...\n");
+    PrintToWindow("Combine coordinates ...\n");
+
+    int nTNode_all = grid_all->GetNTotalNode();
+
+    RDouble *x_all = new RDouble[nTNode_all];
+    RDouble *y_all = new RDouble[nTNode_all];
+    RDouble *z_all = new RDouble[nTNode_all];
+
+    vector<RDouble> Globalx = GetGlobalx();
+    vector<RDouble> Globaly = GetGlobaly();
+    vector<RDouble> Globalz = GetGlobalz();
+
+    grid_all->SetX(x_all);
+    grid_all->SetY(y_all);
+    grid_all->SetZ(z_all);
+
+    for (int iNode = 0; iNode < nTNode_all; ++ iNode)
+    {
+        x_all[iNode] = Globalx[iNode];
+        y_all[iNode] = Globaly[iNode];
+        z_all[iNode] = Globalz[iNode];
+    }
+
+    grid_all->ComputeMinMaxBox();
+}
+
+void CombinGrid::ResetNodeNumberOfEachFace()
+{
+    WriteLogFile("Combine node_number_of_each_face ...\n");
+    PrintToWindow("Combine node_number_of_each_face ...\n");
+
+    int nTFace_all = grid_all->GetNTotalFace();
+
+    int *node_number_of_each_face = new int[nTFace_all];
+
+    grid_all->SetNodeNumberOfEachFace(node_number_of_each_face);
+
+    int *node_number_of_all_face = GetNodeNumberOfAllFace();
+
+    for (int iNode = 0; iNode < nTFace_all; ++ iNode)
+    {
+        node_number_of_each_face[iNode] = node_number_of_all_face[iNode];
+    }
+}
+
+void CombinGrid::ResetFace2Node()
+{
+    PrintToWindow("Combine face2node ...\n");
+    WriteLogFile("Combine face2node ...\n");
+
+    vector<int> allface2node = GetAllFace2Node();
+    uint_t nsum = allface2node.size();
+
+    int *face2node = new int [nsum];
+    grid_all->SetFace2Node(face2node);
+    
+    for (int i = 0; i < nsum; ++ i)
+    {
+        face2node[i] = allface2node[i];
+    }
+}
+
+void CombinGrid::ResetLeftRightCell()
+{
+    WriteLogFile("Reset Left Right Cell ...");
+    PrintToWindow("Reset Left Right Cell ...\n");
+
+    int nTFace_all = grid_all->GetNTotalFace();
+    int *left_cell_of_all_face  = GetLeftCellOfAllFace();
+    int *right_cell_of_all_face = GetRightCellOfAllFace();
+
+    int *left_cell_of_face  = new int[nTFace_all];
+    int *right_cell_of_face = new int[nTFace_all];
+    grid_all->SetLeftCellOfFace (left_cell_of_face);
+    grid_all->SetRightCellOfFace(right_cell_of_face);
+
+    for (int iFace = 0; iFace < nTFace_all; ++ iFace)
+    {
+        left_cell_of_face[iFace]  = left_cell_of_all_face[iFace];
+        right_cell_of_face[iFace] = right_cell_of_all_face[iFace];
+    }
+}
+
+void CombinGrid::MergeCell2Node()
+{
+    if (UnstructGridCast(grid_in[0])->IsCell2NodeExist() == false)
+    {
+        //! Judge if need merge cell2node.
+        return;
+    }
+    WriteLogFile("Merge cell to node ...");
+    PrintToWindow("Merge cell to node ...\n");
+
+    vector< int > node_number_of_each_cell_all;
+    node_number_of_each_cell_all.resize(0);
+    node_number_of_each_cell_all.reserve(nTotalCell);
+
+    vector< vector<cgsize_t> > cell2node_all;
+    cell2node_all.resize(0);
+    cell2node_all.reserve(nTotalCell);
+
+    int cell2node_size = 0;
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int *gnode_number_of_each_cell = UnstructGridCast(grid_in[iZone])->GetNodeNumberOfEachCell();
+        int *gcell2node = UnstructGridCast(grid_in[iZone])->GetCell2Node();
+
+        int *gnode2all = GetNode2All(iZone);
+
+        int count = 0;
+        for (int iCell = 0; iCell < nTotalCellEachZone[iZone]; ++ iCell)
+        {
+            node_number_of_each_cell_all.push_back(gnode_number_of_each_cell[iCell]);
+            cell2node_size += gnode_number_of_each_cell[iCell];
+
+            vector<cgsize_t> single_cell;
+            single_cell.resize(0);
+            single_cell.reserve(gnode_number_of_each_cell[iCell]);
+
+            for (int iNode = 0; iNode < gnode_number_of_each_cell[iCell]; ++ iNode)
+            {
+                int node_index = gcell2node[count];
+                ++ count;
+                single_cell.push_back(gnode2all[node_index]);
+            }
+            cell2node_all.push_back(single_cell);
+        }
+    }
+
+    int *node_number_of_each_cell = new int [nTotalCell];
+    int *cell2node = new int [cell2node_size];
+
+    int count = 0;
+    for (cgsize_t iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        node_number_of_each_cell[iCell] = node_number_of_each_cell_all[iCell];
+        for (int iNode =0; iNode < node_number_of_each_cell[iCell]; ++ iNode)
+        {
+            cell2node[count] = static_cast<int>(cell2node_all[iCell][iNode]);
+            ++ count;
+        }
+    }
+    grid_all->SetNodeNumberOfEachCell(node_number_of_each_cell);
+    grid_all->SetCell2Node(cell2node);
+}
+
+Grid ** CombinGrid::GetGridAll() const
+{
+    Grid **grid_array = new Grid * [1];
+
+    grid_array[0] = grid_all;
+
+    return grid_array;
+}
+
+void CombinGrid::DumpCombinationGrid()
+{
+    string out_gfile;
+    GlobalDataBase::GetData("out_gfile", &out_gfile, PHSTRING, 1);
+
+    int isOverset = 0;
+    GlobalDataBase::GetData("codeOfOversetGrid", &isOverset, PHINT, 1);
+
+    using namespace PHMPI;
+
+    int nZones = 1;
+
+    Grid **grid_array = new Grid * [nZones];
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        grid_array[iZone] = grid_all;
+    }
+
+    ConstructGlobalInterfaceLink(grid_array, nZones);
+    DumpGrid(out_gfile, grid_array, nZones);
+
+    delete [] grid_array;
+}
+
+void CombinGrid::CompressInterfaceData(int zoneID, DataContainer *sendBuffer, int neighborZone)
+{
+    int localZoneID = region->GetProcessGlobalZoneIndexToLocalZoneIndex(zoneID);
+    Grid *grid = grid_in[localZoneID];
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    int myid = PHMPI::GetCurrentProcessorID();
+    int iNeighborZone                            = interfaceInfo->FindIthNeighbor(neighborZone);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = interfaceInfo->GetFaceIndexForSend(iNeighborZone);
+    int *localInterfaceToBoundaryFaceIndexesMapping = interfaceInfo->GetInterFace2BoundaryFace();
+    sendBuffer->moveto_begin();
+    
+//  WriteLogFile("currentZone = ", zoneID);
+//  WriteLogFile("neighborZone = ", neighborZone);
+
+    int *face2all = GetFace2All(localZoneID);
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int interFaceID = interfaceIndexContainerForSend[iLocalFace];
+        int boundaryFaceID  = localInterfaceToBoundaryFaceIndexesMapping[interFaceID];
+        int oldGlobalFaceID = face2all[boundaryFaceID];
+        int newGlobalFaceID = face2NewFaceafterReorder[oldGlobalFaceID];
+
+        //! interFace2ZoneID.
+        int newZoneID = myid;
+        PHWrite(sendBuffer, newZoneID);
+
+        //! interFace2InterFaceID.
+        int newInterfaceID = face2InterfaceafterReorder[newGlobalFaceID];
+        PHWrite(sendBuffer, newInterfaceID);
+    }
+}
+
+void CombinGrid::DecompressInterfaceData(int zoneID, DataContainer *recieveBuffer, int neighborZone)
+{
+    int localZoneID = region->GetProcessGlobalZoneIndexToLocalZoneIndex(zoneID);
+    Grid *grid = grid_in[localZoneID];
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    //! Interface information of local sub-zones.
+    int iNeighborZone                            = interfaceInfo->FindIthNeighbor(neighborZone);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = interfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+    int *localInterfaceToBoundaryFaceIndexesMapping = interfaceInfo->GetInterFace2BoundaryFace();
+
+    //! Interface information of global merged zone.
+    InterfaceInfo *globalInterfaceInfor = grid_all->GetInterfaceInfo();
+    int *interFace2ZoneID       = globalInterfaceInfor->GetInterFace2ZoneID();
+    int *interFace2InterFaceID  = globalInterfaceInfor->GetInterFace2InterFaceID();
+    int *interFace2BoundaryFace = globalInterfaceInfor->GetInterFace2BoundaryFace();
+
+    recieveBuffer->moveto_begin();
+    int *face2all = GetFace2All(localZoneID);
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int interFaceID = interfaceIndexContainerForReceive[iLocalFace];
+        int boundaryFaceID = localInterfaceToBoundaryFaceIndexesMapping[interFaceID];
+        int oldGlobalFaceID = face2all[boundaryFaceID];
+        int newGlobalFaceID = face2NewFaceafterReorder[oldGlobalFaceID];
+        int newInterfaceID  = face2InterfaceafterReorder[newGlobalFaceID];
+
+        //! interFace2ZoneID.
+        int newNeighborZoneID;
+        PHRead(recieveBuffer, newNeighborZoneID);
+
+        //! interFace2InterFaceID
+        int newNeighborInterfaceID;
+        PHRead(recieveBuffer, newNeighborInterfaceID);
+
+        if (newInterfaceID >= 0)
+        {
+            //! This interface has not been merged, so it also be interface in merged grid.
+            interFace2ZoneID[newInterfaceID]       = newNeighborZoneID;
+            interFace2InterFaceID[newInterfaceID]  = newNeighborInterfaceID;
+            interFace2BoundaryFace[newInterfaceID] = newGlobalFaceID;
+        }
+    }
+}
+
+void CombinGrid::SwapInterfaceData()
+{
+    if (PHMPI::GetNumberOfProcessor() == 1) return;
+
+    PrintToWindow("Swapping interface data ...\n");
+
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    vector< PH_Request > requestContainer;
+    vector< vector< DataContainer * > > receivedDataBuffer;
+    vector< vector< DataContainer * > > sendDataBuffer;
+    receivedDataBuffer.resize(nZones);
+    sendDataBuffer.resize(nZones);
+
+    //! Step 0: Compressing data firstly.
+    WriteLogFile("        Compressing data ...");
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+        if (currentProcessor == sendProcessor)
+        {
+            sendDataBuffer[iZone].resize(numberOfNeighbor);
+        }
+
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate and compress the buffers for sending.
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = new DataContainer;
+                sendDataBuffer[iZone][iNeighbor] = sendBuffer;
+
+                //! Compress the send information into the actkey.
+                CompressInterfaceData(iZone, sendBuffer, neighborZone);
+            }
+        }
+    }
+
+    //! Step 1: Communication.
+    WriteLogFile("        Communication ...");
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        //! Communicating.
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int sendProcessor    = PHMPI::GetZoneProcessorID(iZone);
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate the buffers for sending and receiving.
+            DataContainer *receivedBuffer = 0;
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == receiveProcessor)
+            {
+                receivedBuffer = new DataContainer;
+                receivedDataBuffer[ iZone ].push_back(receivedBuffer);
+            }
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = sendDataBuffer[iZone][iNeighbor];
+            }
+
+            int tag = iZone;
+
+            //if (sendProcessor == receiveProcessor) continue;
+
+            //! Communication.
+            if (currentProcessor == sendProcessor)
+            {
+                if (sendProcessor != receiveProcessor)
+                {
+                    streamsize nlen = sendBuffer->size();
+
+                    //! Send the data to neighbors.
+                    send(sendBuffer, receiveProcessor, nlen, requestContainer, tag);
+                }
+            }
+            if (currentProcessor == receiveProcessor)
+            {
+                //! Get the neighbor order: which order that 'iZone' on neighbors of neighborZone.
+                int neighborOrer = -1;
+                ZoneNeighbor *globalNeighborZonesTemp = zoneConnectivity->GetZoneNeighbor(neighborZone);
+                int numberOfNeighborTemp = globalNeighborZonesTemp->GetNumberOfNeighbor();
+
+                for (int iNeighbor1 = 0; iNeighbor1 < numberOfNeighborTemp; ++ iNeighbor1)
+                {
+                    int neighborZoneTemp = globalNeighborZonesTemp->GetZoneIndexOfNeighbor(iNeighbor1);
+                    if (neighborZoneTemp == iZone)
+                    {
+                        neighborOrer = iNeighbor1;
+                        break;
+                    }
+                }
+
+                ASSERT(neighborOrer != -1);
+
+                if (sendProcessor != receiveProcessor)
+                {
+                    //! The data length of the received data is same to the length that send to the neighbor.
+                    CharVecSizeType nlen = sendDataBuffer[neighborZone][neighborOrer]->size();
+
+                    //! Receive data from neighbors.
+                    receive(receivedBuffer, sendProcessor, nlen, requestContainer, tag);
+                }
+                else
+                {
+                    uint_t lastID = receivedDataBuffer[iZone].size();
+                    SWAP(receivedDataBuffer[ iZone ][lastID - 1], sendDataBuffer[neighborZone][neighborOrer]);
+                }
+            }
+        }
+    }
+
+    //! Step2: MPI waiting for Non-blocking communications.
+    if (PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_Wait(static_cast<int>(requestContainer.size()), &(requestContainer[0]));
+    }
+
+    //! Step3: Translate the data container.
+    WriteLogFile("        Translating data ...");
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        int count = 0;
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor == receiveProcessor)
+            {
+                DataContainer *receiveData = receivedDataBuffer[iZone][count];
+
+                //! Because get into here when currentProcessor==receiveProcessor,
+                //! so, use zoneGridSolver of neighborZone, this zone is on the current processor!
+
+                //! Decompress the interface data from datacontainer.
+                DecompressInterfaceData(neighborZone, receiveData, iZone);
+
+                ++ count;
+            }
+        }
+    }
+
+    WriteLogFile("        Free buffer data ...");
+    //! Step4: Free the buffers.
+    for (std::size_t iDim = 0; iDim < receivedDataBuffer.size(); ++ iDim)
+    {
+        for (std::size_t jDim = 0; jDim < receivedDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete receivedDataBuffer[iDim][jDim];
+        }
+    }
+    receivedDataBuffer.clear();
+    for (std::size_t iDim = 0; iDim < sendDataBuffer.size(); ++ iDim)
+    {
+        for (std::size_t jDim = 0; jDim < sendDataBuffer[ iDim ].size(); ++ jDim)
+        {
+            delete sendDataBuffer[iDim][jDim];
+        }
+    }
+    sendDataBuffer.clear();
+    requestContainer.clear();
+}
+
+void CombinGrid::DumpMergedGrid(const string &gridFileName, Grid **grids, int nBlocks)
+{
+    PrintToWindow("    Writing grid file ....\n");
+
+    if (!PHMPI::IsParallelRun())
+    {
+        TK_Exit::ExceptionExit("fileMode == PHSPACE::CS_MODE has not been considered!");
+    }
+    else
+    {
+        DumpMergedGridP2P(gridFileName, grids, nBlocks);
+    }
+}
+
+void CombinGrid::DumpMergedGridP2P(const string &gridFileName, Grid **grids, int nBlocks)
+{
+    using namespace PHMPI;
+
+    //! Notice: Directly writing to grid file will affect the number of grid blocks,so you can not dump it at will.
+    SetNumberOfGlobalZones(nBlocks);
+
+    int nZones = GetNumberofGlobalZones();
+
+    CreateZoneProcessorID(nZones);
+    CreateZoneGridID(nZones);
+    CreateZoneGridType(nZones);
+
+    int *block_proc     = GetZoneProcessorID();
+    int *block_idx      = GetZoneGridID();
+    int *block_type     = GetZoneGridType();
+    int *block_proc_inp = GetZoneProcessorID_INP();
+
+    int myid = GetCurrentProcessorID();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        block_proc[iZone] = myid;
+        block_idx [iZone] = myid;
+        block_type[iZone] = grids[iZone]->Type();
+    }
+
+    if (block_proc_inp)
+    {
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            SetZoneProcessorID(iZone, block_proc_inp[iZone]);
+        }
+    }
+
+    int m_block_proc = PHMPI::GetZoneDistributionMethod();
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        fstream file;
+        string processorGridFileName = AddSymbolToFileName(gridFileName, '_', PHMPI::GetCurrentProcessorID());
+        PHSPACE::OpenFile(file, processorGridFileName, ios_base::out|ios_base::binary|ios_base::trunc);
+
+        int nBlocksLocal = 1;
+        file.write(reinterpret_cast<char*>(&nBlocksLocal), sizeof(int));
+        int blockIndex = block_idx[iZone];
+        int blockType  = block_type[iZone];
+        int blockProc  = block_proc[iZone];
+        if (m_block_proc == DETERMIN_BY_PARTITION && IsConvertGridToMixGrid())
+        {
+            int *block_proc_dump = GetZoneProcessorIDDump();
+            int blockProcDump = block_proc_dump[iZone];
+            file.write(reinterpret_cast<char*>(&blockProcDump), nBlocksLocal * sizeof(int));
+        }
+        else
+        {
+            file.write(reinterpret_cast<char*>(&blockProc), nBlocksLocal * sizeof(int)); 
+        }
+        file.write(reinterpret_cast<char*>(&blockIndex), nBlocksLocal * sizeof(int));
+        file.write(reinterpret_cast<char*>(&blockType), nBlocksLocal * sizeof(int));
+
+        grids[iZone]->WriteGrid(file);
+
+        PHSPACE::CloseFile(file);
+    }
+}
+
+}
+
+
diff --git a/API/PreProcess/src/Pre_GridConversion.cpp b/API/PreProcess/src/Pre_GridConversion.cpp
new file mode 100644
index 0000000..1b0f665
--- /dev/null
+++ b/API/PreProcess/src/Pre_GridConversion.cpp
@@ -0,0 +1,1246 @@
+#include "Geo_UnstructBC.h"
+#include "IO_FileName.h"
+#include "Pre_HDF5File.h"
+#include "Glb_Dimension.h"
+#include "LinkStruct.h"
+#include "Post_Visual.h"
+#include "Pre_GridConversion.h"
+#include "HyList.h"
+#include "PHIO.h"
+#include "TK_Log.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+LIB_EXPORT Pre_GridConversion::Pre_GridConversion(const string &gridFileName)
+{
+    this->gridFileName = gridFileName;
+    grids = 0;
+    nBlocks = 0;
+}
+
+LIB_EXPORT Pre_GridConversion::~Pre_GridConversion()
+{
+    
+}
+
+LIB_EXPORT void Pre_GridConversion::Clear()
+{
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        delete grids[iZone];
+    }
+    delete [] grids;
+}
+
+LIB_EXPORT void Pre_GridConversion::Run()
+{
+    ReadGrid();
+
+    Conversion();
+}
+
+void Pre_GridConversion::WriteVolumeName(const string &out_grid_file, Grid **grids_in)
+{
+    int hasVolumeCondition = GlobalDataBase::GetIntParaFromDB("hasVolumeCondition");
+    if (!hasVolumeCondition)
+    {
+        return;
+    }
+
+    PrintToWindow("    Writing volume name to .vcname file ....\n");
+
+    set< pair<int, string> > vcNamePairSet;
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        SimpleVC *volumeCondition = grids_in[iZone]->GetVolumeConditionIn();
+
+        int vcType = volumeCondition->GetVCType();
+        string vcName = volumeCondition->GetVCName();
+        pair<int, string> vcNamePair(vcType, vcName);
+        vcNamePairSet.insert(vcNamePair);
+    }
+
+    DumpVCNameFile(vcNamePairSet, out_grid_file);
+    DumpVolumeConditionFile(vcNamePairSet);
+}
+
+void Pre_GridConversion::WriteFaceBoundaryName(const string &out_grid_file, Grid **grids_in)
+{
+    PrintToWindow("    Writing face boundary name to .bcname file ....\n");
+    Grid **grids = grids_in;
+    string from_gfile = "grid.fts";
+    GlobalDataBase::GetData("from_gfile", &from_gfile, PHSTRING, 1);
+
+    set< pair<int, string> > bcNamePairSet;
+    //int nBlocks = 1;
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        UnstructGrid *grid = UnstructGridCast(grids[iZone]);
+        int nBoundFace = grid->GetNBoundFace();
+
+        UnstructBCSet **bcr = grid->GetBCRecord();
+        for (cgsize_t iFace = 0; iFace < nBoundFace; iFace ++)
+        {
+            int bcType = bcr[iFace]->GetKey();
+            if (bcType == PHENGLEI::INTERFACE)
+            {
+                continue;
+            }
+
+            const string &bcName = bcr[iFace]->GetBCName();
+            pair<int, string> bcNamePair(bcType, bcName);
+            bcNamePairSet.insert(bcNamePair);
+        }
+    }
+
+    DumpBoundaryInfo(bcNamePairSet);
+    DumpBCNameInfo(bcNamePairSet, out_grid_file);
+}
+
+void Pre_GridConversion::WriteCellToNode(const string &targetGridFileName, Grid **grids_in)
+{
+    fstream file;
+
+    Grid **grids = grids_in;
+
+    string cellToNodeFileName = ChangeExtensionOfFileName(targetGridFileName, "c2n");
+
+    PHSPACE::OpenSerialFile(file, cellToNodeFileName, ios_base::out|ios_base::binary);
+
+    int nBlocks = 1;
+    PHWrite(file, nBlocks);
+
+    VirtualFile *virtualFile = new VirtualFile(&file);
+    virtualFile->BeginWriteWork();
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        PHWrite(virtualFile, iZone);
+
+        int nTotalCell = grids[0]->GetNTotalCell();
+        PHWrite(virtualFile, nTotalCell);
+
+        int *cell2Node = UnstructGridCast(grids[0])->GetCell2Node();
+        int *node_number_of_each_cell = UnstructGridCast(grids[0])->GetNodeNumberOfEachCell();
+
+        int nPoints;
+        int count = 0;
+        for (int iCell = 0; iCell < nTotalCell; iCell ++)
+        {
+            nPoints = node_number_of_each_cell[iCell];
+            PHWrite(virtualFile, nPoints);
+
+            for (int jPoint = 0; jPoint < nPoints; ++ jPoint)
+            {
+                int pointIndex = cell2Node[count];
+                PHWrite(virtualFile, pointIndex);
+                count ++;
+            }
+        }
+    }
+
+    virtualFile->EndWriteWork();
+    delete virtualFile;
+
+    PHSPACE::CloseFile(file);
+}
+
+void Pre_GridConversion::WriteFaceBC(const string &out_grid_file, Grid **grids_in)
+{
+    fstream file;
+
+    Grid **grids = grids_in;
+
+    string BCFileName = ChangeExtensionOfFileName(out_grid_file, "bc");
+
+    PHSPACE::OpenSerialFile(file, BCFileName, ios_base::out|ios_base::binary);
+
+    //int nBlocks = 1;
+    PHWrite(file, nBlocks);
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        UnstructGrid *grid = UnstructGridCast(grids[iZone]);
+
+        grid->WriteFaceBC(file);
+    }
+
+    PHSPACE::CloseFile(file);
+}
+
+LIB_EXPORT void DumpGrid(const string &gridFileName, Grid **grids, int nBlocks)
+{
+    int dumpOldGrid = GlobalDataBase::GetIntParaFromDB("dumpOldGrid");
+    if (dumpOldGrid)
+    {
+        DumpOldGrid(gridFileName, grids, nBlocks);
+        return;
+    }
+
+    DumpHDF5Grid(gridFileName, grids, nBlocks);
+}
+
+LIB_EXPORT void DumpOldGrid(const string &gridFileName, Grid **grids, int nBlocks)
+{
+    PrintToWindow("    Writing old version grid to file ....\n");
+    fstream file;
+    OpenSerialFile(file, gridFileName.c_str(), ios_base::out|ios_base::binary|ios_base::trunc);
+
+    using namespace PHMPI;
+
+    SetNumberOfGlobalZones(nBlocks);
+
+    int nZones = GetNumberofGlobalZones();
+
+    CreateZoneProcessorID(nZones);
+    CreateZoneGridID(nZones);
+    CreateZoneGridType(nZones);
+
+    int *block_proc     = GetZoneProcessorID();
+    int *block_idx      = GetZoneGridID();
+    int *block_type     = GetZoneGridType();
+    int *block_proc_inp = GetZoneProcessorID_INP();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        block_proc[iZone] = iZone;
+        block_idx [iZone] = iZone;
+        block_type[iZone] = grids[iZone]->Type();
+    }
+
+    if (block_proc_inp)
+    {
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            SetZoneProcessorID(iZone, block_proc_inp[iZone]);
+        }
+    }
+
+    file.write(reinterpret_cast<char*>(&nBlocks), sizeof(int));
+
+    int m_block_proc = PHMPI::GetZoneDistributionMethod();
+    if (m_block_proc == DETERMIN_BY_PARTITION && IsConvertGridToMixGrid())
+    {
+        int *block_proc_dump = GetZoneProcessorIDDump();
+        file.write(reinterpret_cast<char*>(block_proc_dump), nZones*sizeof(int));
+    }
+    else
+    {
+        file.write(reinterpret_cast<char*>(block_proc), nZones*sizeof(int));
+    }
+
+    file.write(reinterpret_cast<char*>(block_idx), nZones*sizeof(int));
+    file.write(reinterpret_cast<char*>(block_type), nZones*sizeof(int));
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        grids[iZone]->WriteGrid(file);
+    }
+
+    file.close();
+    file.clear();
+}
+
+void GetGridsBoundingBox(Grid **grids, int nBlocks, RDouble *pmin, RDouble *pmax)
+{
+    pmin[0] = LARGE;
+    pmin[1] = LARGE;
+    pmin[2] = LARGE;
+
+    pmax[0] = - LARGE;
+    pmax[1] = - LARGE;
+    pmax[2] = - LARGE;
+
+    for (int nb = 0; nb < nBlocks; ++ nb)
+    {
+        RDouble *local_pmin = grids[nb]->GetMinBox();
+        RDouble *local_pmax = grids[nb]->GetMaxBox();
+
+        pmin[0] = MIN(pmin[0], local_pmin[0]);
+        pmin[1] = MIN(pmin[1], local_pmin[1]);
+        pmin[2] = MIN(pmin[2], local_pmin[2]);
+
+        pmax[0] = MAX(pmax[0], local_pmax[0]);
+        pmax[1] = MAX(pmax[1], local_pmax[1]);
+        pmax[2] = MAX(pmax[2], local_pmax[2]);
+    }
+}
+
+void GetGridsMinMaxDS(Grid **grids, int nBlocks, RDouble &mindis, RDouble &maxdis)
+{
+    mindis =   LARGE;
+    maxdis = - LARGE;
+
+    for (int nb = 0; nb < nBlocks; ++ nb)
+    {
+        RDouble dismin, dismax;
+        grids[nb]->GetMinMaxDS(dismin, dismax);
+
+        mindis = MIN(mindis, dismin);
+        maxdis = MAX(maxdis, dismax);
+    }
+}
+
+void MatchInterface(Grid *grid, LinkStruct *link)
+{
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    int nIFace    = interfaceInfo->GetNIFace();
+    int zoneIndex = grid->GetZoneID();
+    int npeoridic = 0;
+
+    VVInt &zoneid  = link->GetZoneID();
+    VVInt &faceid  = link->GetFaceID();
+    VVInt &facemap = link->GetFaceMap();
+
+    int *interFace2ZoneID      = interfaceInfo->GetInterFace2ZoneID();
+    int *interFace2InterFaceID = interfaceInfo->GetInterFace2InterFaceID();
+
+    for (int iiface = 0; iiface < nIFace; ++ iiface)
+    {
+        //! image is interface mapped from i to the global,the interface is for all blocks,,not only the local block.
+        int ipos = facemap[zoneIndex][ iiface ];
+        //int find_flag = false;
+        bool find_flag = false;     //! Corrected by clz, 2012.3.15.
+
+        bool tmpout = false;
+
+        if (zoneid[ipos].size() != 2)
+        {
+            cout << " more than or less than two faces coincide\n";
+            cout << " zoneIndex= " << zoneIndex << "\n";
+            cout << " zoneid[ipos].size() = " << zoneid[ipos].size() << "\n";
+            cout << " iiface = " << iiface << " nIFace = " << nIFace << "\n";
+            tmpout = true;
+        }
+
+        for (std::size_t m = 0; m < zoneid[ipos].size(); ++ m)
+        {
+            int iZone = zoneid[ipos][m];
+            int iFace = faceid[ipos][m];
+            if ((iZone != zoneIndex) || (iFace != iiface))
+            {
+                interFace2ZoneID[iiface]      = iZone;
+                interFace2InterFaceID[iiface] = iFace;
+                find_flag = true;
+                break;
+            }
+        }
+
+        if (!find_flag)
+        {
+            //! It shows that there is  non-physical artificial periodic boundary condition in this block.
+            //! Of course,there may be problems in the process.
+            cout << "There is an error in connection between the calculation area of this block and the butt block " << 
+                    "(There may also be non-physical artificial periodic boundary conditions), please check the grid!\n";
+            ++ npeoridic;
+        }
+    }
+}
+
+void ConstructGlobalInterfaceLink(Grid **grids, int nBlocks)
+{
+    RDouble mindis, maxdis, pmin[3], pmax[3];
+
+    GetGridsBoundingBox(grids, nBlocks, pmin, pmax);
+    GetGridsMinMaxDS(grids, nBlocks, mindis, maxdis);
+
+    cout << "  Min && Max edge length: " << mindis << ", " << maxdis << "\n";
+
+    typedef DataStruct_AdtTree<int, RDouble> AdtTree;
+
+    if (GetDim() == TWO_D)
+    {
+        pmin[2] -= mindis;
+        pmax[2] += maxdis;
+    }
+
+    LinkStruct link(pmin, pmax, mindis / 2.0, nBlocks);
+
+    int omit_no_bound_bc = 1;
+    GlobalDataBase::GetData("omit_no_bound_bc", &omit_no_bound_bc, PHINT, 1);
+
+    if (!omit_no_bound_bc)
+    {
+        //! Covert NO_BOUNDARY_CONDITION to INTERFACE.
+        for (int nb = 0; nb < nBlocks; ++ nb)
+        {
+            grids[nb]->ChangeBCType(PHENGLEI::NO_BOUNDARY_CONDITION, PHENGLEI::INTERFACE);
+
+            //! Consider the periodic boundary as the interface.
+            if (PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType") != 0)
+            {
+                grids[nb]->ChangeBCType(PHENGLEI::USER_DEFINED, PHENGLEI::INTERFACE);
+            }
+        }
+    }
+
+    //! Build the initial link information.
+    for (int nb = 0; nb < nBlocks; ++ nb)
+    {
+        grids[nb]->BuildGridLink(&link);
+    }
+
+    //! Further process.
+    for (int nb = 0; nb < nBlocks; ++ nb)
+    {
+        MatchInterface(grids[nb], &link);
+    }
+}
+
+LIB_EXPORT void DumpAdditionalData(const string &gridFileName, Grid **grids, int nBlocks)
+{
+    DumpFaceBC(gridFileName, grids, nBlocks);
+}
+
+LIB_EXPORT void DumpFaceBC(const string &gridFileName, Grid **grids, int nBlocks)
+{    
+    string faceBCFileName = ChangeExtensionOfFileName(gridFileName, "bc");
+    faceBCFileName = AddSymbolToFileName(faceBCFileName, '_', PHMPI::GetCurrentProcessorID());
+    fstream file;
+    OpenFile(file, faceBCFileName, ios_base::out|ios_base::binary);
+
+    PHWrite(file, nBlocks);
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        Grid *grid = grids[iZone];
+
+        grid->WriteFaceBC(file);
+    }
+
+    CloseFile(file);
+}
+
+void DumpCharacteristicBoundary(const string &gridFileName, Grid **grids, int nBlocks)
+{
+    string filename = ChangeExtensionOfFileName(gridFileName, "bcmesh");
+    filename = AddSymbolToFileName(filename, "_", 0);
+    vector < DataContainer * > datalist;
+    datalist.resize(0);
+
+    for (int iZone =  0; iZone < nBlocks; ++ iZone)
+    {
+        DataContainer *data = new DataContainer();
+        data->moveto_begin();
+
+        Grid *grid = grids[iZone];
+        grid->AllocateOversetGrid();
+        ComputeCharacteristicBoundary(grid, data);
+
+        datalist.push_back(data);
+    }
+
+    bool CharacteristicBoundary = true;
+
+    DumpToVTK DumpToVTK(datalist, filename, CharacteristicBoundary);
+    DumpToVTK.Run();
+}
+
+void WriteBCNameInfo(const string &gridFileName, Grid **grids_in, int nBlocks)
+{
+    Grid **grids = grids_in;
+
+    set< pair<int, string> > bcNamePairSet;
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        grids[iZone]->GetBcNamePair(bcNamePairSet);
+    }
+
+    DumpBCNameInfo(bcNamePairSet, gridFileName);
+}
+
+void DumpBCNameInfo(const set< pair<int, string> > &bcNamePairSet, const string &gridFileName)
+{
+    fstream file;
+    string BCNameFileName = ChangeExtensionOfFileName(gridFileName, "bcname");
+    PHSPACE::OpenSerialFile(file, BCNameFileName, ios_base::out);
+
+    file << "# Boundary Face Information of Grid " << gridFileName << endl;
+    file << "# nBoundaryConditions: number of global boundary conditions." << endl;
+    file << "# bcName             : Boundary Condition Name." << endl;
+    file << "# bcType(in PHengLEI): Boundary Condition Type." << endl;
+    file << endl;
+    file << "int nBoundaryConditions = " << bcNamePairSet.size() << ";" << endl;
+
+    set< pair<int, string> >::iterator iter;
+    for (iter = bcNamePairSet.begin(); iter != bcNamePairSet.end(); ++ iter)
+    {
+        int bcType    = (*iter).first;
+        string bcName = (*iter).second;
+        file << "string bcName = \"" << bcName << "\";" << endl;
+        file << "{" << endl;
+        if (bcType == 2)
+        {
+            file << "  string bodyName = " << "\"" << "body" << "\";" << endl;
+        }
+        file << "  int bcType = " << bcType << ";" << endl;
+        file << "}" << endl;
+    }
+    PHSPACE::CloseFile(file);
+}
+
+void DumpVCNameFile(const set< pair<int, string> > &vcNamePairSet, const string &gridFileName)
+{
+    fstream file;
+    string VCNameFileName = ChangeExtensionOfFileName(gridFileName, "vcname");
+    PHSPACE::OpenSerialFile(file, VCNameFileName, ios_base::out);
+
+    file << "# Volume Condition Information of Grid " << gridFileName << endl;
+    file << "# nVolumeConditions: number of global volume conditions." << endl;
+    file << "# vcName             : Volume Condition Name." << endl;
+    file << "# vcType(in PHengLEI): Volume Condition Type." << endl;
+    file << endl;
+    file << "int nVolumeConditions = " << vcNamePairSet.size() << ";" << endl;
+
+    set< pair<int, string> >::iterator iter;
+    for (iter = vcNamePairSet.begin(); iter != vcNamePairSet.end(); ++ iter)
+    {
+        int vcType    = (*iter).first;
+        string vcName = (*iter).second;
+        file << "string vcName = \"" << vcName << "\";" << endl;
+        file << "{" << endl;
+        file << "  int vcType = " << vcType << ";" << endl;
+        file << "}" << endl;
+    }
+
+    PHSPACE::CloseFile(file);
+}
+
+void DumpVolumeConditionFile(const set< pair<int, string> > &vcNamePairSet)
+{
+    fstream file;
+    string VCFileName = "./bin/volume_condition.hypara";
+    PHSPACE::OpenFile(file, VCFileName, ios_base::out);
+
+    file << "# nVolumeConditions: number of global volume conditions." << endl;
+    file << "# vcName             : Volume Condition Name." << endl;
+    file << "# vcType(in PHengLEI): Volume Condition Type." << endl;
+    file << endl;
+    file << "int nVolumeConditions = " << vcNamePairSet.size() << ";" << endl;
+
+    set< pair<int, string> >::iterator iter;
+    for (iter = vcNamePairSet.begin(); iter != vcNamePairSet.end(); ++ iter)
+    {
+        int vcType    = (*iter).first;
+        string vcName = (*iter).second;
+        file << "string vcName = \"" << vcName << "\";" << endl;
+        file << "{" << endl;
+        file << "  int vcType = " << vcType << ";" << endl;
+        file << "}" << endl;
+    }
+
+    PHSPACE::CloseFile(file);
+}
+
+void WriteBoundaryInfo(Grid **grids_in, int nBlocks)
+{
+    Grid **grids = grids_in;
+
+    set< pair<int, string> > bcNamePairSet;
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        grids[iZone]->GetBcNamePair(bcNamePairSet);
+    }
+
+    DumpBoundaryInfo(bcNamePairSet);
+}
+
+void DumpBoundaryInfo(const set< pair<int, string> > &bcNamePairSet)
+{
+    fstream file;
+    string boundaryconditionfile = "./bin/boundary_condition.hypara";
+    file.open(boundaryconditionfile.c_str(), ios_base::out);
+
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(boundaryconditionfile);
+    }
+
+    //file << "# Boundary Face Information of Grid " << gridFileName << endl;
+    file << "# nBoundaryConditions: Number of global boundary conditions." << endl;
+    file << "# bcName             : Boundary condition name." << endl;
+    file << "# bcType(in PHengLEI): Boundary condition type." << endl;
+    file << endl;
+
+    file << "# How to set boundary condition, for example: " << endl;
+    file << "# string bcName = \"Wall\";                   " << endl;
+    file << "# {                                           " << endl;
+    file << "#   int bcType = 2;                           " << endl;
+    file << "#   int viscousType = 1;                      " << endl;
+    file << "#   double wallTemperature = -1.0;            " << endl;
+    file << "#   double uWall = 0.0;                       " << endl;
+    file << "#   double vWall = 0.0;                       " << endl;
+    file << "#   double wWall = 0.0;                       " << endl;
+    file << "# }                                           " << endl;
+    file << "# string bcName = \"Inflow\";                 " << endl;
+    file << "# {                                           " << endl;
+    file << "#   int bcType = 5;                           " << endl;
+    file << "#   int inflowParaType = 0;                   " << endl;
+    file << "#   double refMachNumber = 0.73;              " << endl;
+    file << "#   double attackd = 2.79;                    " << endl;
+    file << "#   double angleSlide = 0.0;                  " << endl;
+    file << "#   double refReNumber = 6.5e6;               " << endl;
+    file << "#   double refDimensionalTemperature = 288.15;" << endl;
+    file << "# }                                           " << endl;
+    file << endl;
+    file << "# For more information, see examples/bin/boundary_condition.hypara file!!!" << endl;
+    file << endl;
+
+    file << "int nBoundaryConditions = " << bcNamePairSet.size() << ";" << endl;
+
+    set< pair<int, string> >::iterator iter;
+    for (iter = bcNamePairSet.begin(); iter != bcNamePairSet.end(); ++ iter)
+    {
+        int bcType    = (*iter).first;
+        string bcName = (*iter).second;
+        if (bcName == "Connection") continue;
+
+        file << "string bcName = \"" << bcName << "\";" << endl;
+        file << "{" << endl;
+        if (bcType == 2)
+        {
+            file << "  string bodyName = " << "\"" << "body" << "\";" << endl;
+        }
+        file << "  int bcType = " << bcType << ";" << endl;
+        file << "}" << endl;
+    }
+    file << endl;
+
+    file << "# 'bcType' is defined as following:" << endl;
+    file << "#    -2: WAKE                      " << endl;
+    file << "#    -1: INTERFACE                 " << endl;
+    file << "#    0 : NO_BOUNDARY_CONDITION     " << endl;
+    file << "#    1 : EXTRAPOLATION             " << endl;
+    file << "#    2 : SOLID_SURFACE             " << endl;
+    file << "#    3 : SYMMETRY                  " << endl;
+    file << "#    4 : FARFIELD                  " << endl;
+    file << "#    5 : INFLOW                    " << endl;
+    file << "#    6 : OUTFLOW                   " << endl;
+    file << "#    52: PRESSURE_INLET            " << endl;
+    file << "#    62: PRESSURE_OUTLET           " << endl;
+    file << "#    61: OUTFLOW_CONFINED          " << endl;
+    file << "#    7 : POLE                      " << endl;
+
+    PHSPACE::CloseFile(file);
+}
+
+void ComputeCharacteristicBoundary(Grid *grid_in, DataContainer *data)
+{
+    int GridID = grid_in->GetGridID()->GetIndex();
+    PHWrite(data, GridID);
+
+    int dimension = grid_in->GetDim();
+    PHWrite(data, dimension);
+
+    int type = grid_in->Type();
+    PHWrite(data, &type, 1);
+
+    if (type == UNSTRUCTGRID)
+    {
+        ComputeCharacteristicBoundaryUns(grid_in, data);
+    }
+    else if (type == STRUCTGRID)
+    {
+        ComputeCharacteristicBoundaryStr(grid_in, data);
+    }
+
+    int TecioMission = Writecomplete;
+    PHWrite(data, &TecioMission, 1);
+}
+
+void ComputeCharacteristicBoundaryStr(Grid *grid_in, DataContainer *data)
+{
+    StructGrid *grid = StructGridCast(grid_in);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int s_st[3], s_ed[3];
+
+    RDouble3D &xx = * grid->GetStructX();
+    RDouble3D &yy = * grid->GetStructY();
+    RDouble3D &zz = * grid->GetStructZ();
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    int TecioMission;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int bctype = bcregion->GetBCType();
+
+        if (IsInterface(bctype)) continue;
+
+        TecioMission = WriteBoundary;
+        PHWrite(data, &TecioMission, 1);
+
+        PHWrite(data, &bctype, 1);
+
+        string bcName = bcregion->GetBCName();
+        data->write_string(bcName);
+
+        int *s_lr3d = bcregion->GetFaceDirectionIndex();
+        int nDim = GetDim();
+
+        for (int m = 0; m < nDim; ++ m)
+        {
+            s_st[m] = bcregion->GetStartPoint(m);
+            s_ed[m] = bcregion->GetEndPoint(m);
+
+            if (bcregion->GetFaceDirection() == m)
+            {
+                if (s_st[m] > 1 || s_lr3d[m] == 1)
+                {
+                    s_st[m] += 1;
+                    s_ed[m] += 1;
+                }
+            }
+            else
+            {
+                s_ed[m] += 1;
+            }
+        }
+
+        int ist = s_st[0];
+        int ied = s_ed[0];
+        int jst = s_st[1];
+        int jed = s_ed[1];
+        int kst = s_st[2];
+        int ked = s_ed[2];
+
+        Range I(ist, ied);
+        Range J(jst, jed);
+        Range K(kst, ked);
+
+        if (nDim != THREE_D)
+        //if (nk == 1) 
+        {
+            K.setRange(1, 1);
+            kst = 1;
+            ked = 1;
+        }
+
+        Int3D newindex(I, J, K, fortranArray);
+
+        int nsurf = bcregion->GetFaceDirection() + 1;
+
+        int count = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    newindex(i, j, k) = count;
+                    ++ count;
+                }
+            }
+        }
+
+        int nTotalNode = count;
+        int nTotalCell = 1;
+
+        //for (int m = 0; m < nDim; ++ m)
+        for (int m = 0; m < 3; ++ m)
+        {
+            nTotalCell *= (bcregion->GetEndPoint(m) - bcregion->GetStartPoint(m) + 1);
+        }
+
+        PHWrite(data, &nTotalNode, 1);
+        PHWrite(data, &nTotalCell, 1);
+
+
+        RDouble *xBoundary = new RDouble [nTotalNode];
+        RDouble *yBoundary = new RDouble [nTotalNode];
+        RDouble *zBoundary = new RDouble [nTotalNode];
+                
+        int iNode = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    xBoundary[iNode] = xx(i, j, k);
+                    yBoundary[iNode] = yy(i, j, k);
+                    zBoundary[iNode] = zz(i, j, k);
+                    
+                    ++ iNode;
+                }
+            }
+        }
+
+        PHWrite(data, xBoundary, nTotalNode);
+        PHWrite(data, yBoundary, nTotalNode);
+        PHWrite(data, zBoundary, nTotalNode);
+
+        delete [] xBoundary;
+        delete [] yBoundary;
+        delete [] zBoundary;
+
+        int il1, jl1, kl1;
+        GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+        il1 = 1 - il1;
+        jl1 = 1 - jl1;
+        kl1 = 1 - kl1;
+
+        if (nk == 1) kl1 = 0;
+
+        int *cell2node = new int [nTotalCell * 4];
+        int ncount = 0;
+        for (int k = kst; k <= ked - kl1; ++ k)
+        {
+            for (int j = jst; j <= jed - jl1; ++ j)
+            {
+                for (int i = ist; i <= ied - il1; ++ i)
+                {
+                    int p1, p2, p3, p4;
+
+                    int il = i + il1;
+                    int jl = j + jl1;
+                    int kl = k + kl1;
+
+                    if (nsurf == 1)
+                    {
+                        p1 = newindex(i, j , k) + 1;
+                        p2 = newindex(i, jl, k) + 1;
+                        p3 = newindex(i, jl, kl) + 1;
+                        p4 = newindex(i, j , kl) + 1;
+                    }
+                    else if (nsurf == 2)
+                    {
+                        p1 = newindex(i , j, k) + 1;
+                        p2 = newindex(il, j, k) + 1;
+                        p3 = newindex(il, j, kl) + 1;
+                        p4 = newindex(i , j, kl) + 1;
+                    }
+                    else
+                    {
+                        p1 = newindex(i , j , k) + 1;
+                        p2 = newindex(il, j , k) + 1;
+                        p3 = newindex(il, jl, k) + 1;
+                        p4 = newindex(i , jl, k) + 1;
+                    }
+
+                    cell2node[ncount++] = p1;
+                    cell2node[ncount++] = p2;
+                    cell2node[ncount++] = p3;
+                    cell2node[ncount++] = p4;
+                }
+            }
+        }
+
+        PHWrite(data, cell2node, nTotalCell * 4);
+        delete [] cell2node;
+    }
+
+    if (grid_in->GetDim() == PHSPACE::TWO_D)
+    {
+        /*int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();*/
+
+        /*RDouble3D & xx = * grid->GetStructX();
+        RDouble3D & yy = * grid->GetStructY();
+        RDouble3D & zz = * grid->GetStructZ();*/
+
+        int nTotalCell = grid->GetNTotalCell();
+        int nTotalNode = grid->GetNTotalNode();
+
+        TecioMission = WriteBlock;
+        PHWrite(data, &TecioMission, 1);
+
+        PHWrite(data, &nTotalNode, 1);
+        PHWrite(data, &nTotalCell, 1);
+
+        RDouble *xBoundary = new RDouble [nTotalNode];
+        RDouble *yBoundary = new RDouble [nTotalNode];
+        RDouble *zBoundary = new RDouble [nTotalNode];
+    
+        int ist, ied, jst, jed, kst, ked;
+        grid->GetNodeIterationIndex(ist, ied, jst, jed, kst, ked);
+
+        int iNode = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    xBoundary[iNode] = xx(i, j, k);
+                    yBoundary[iNode] = yy(i, j, k);
+                    zBoundary[iNode] = zz(i, j, k);
+
+                    iNode ++ ;
+                }
+            }
+        }
+
+        PHWrite(data, xBoundary, nTotalNode);
+        PHWrite(data, yBoundary, nTotalNode);
+        PHWrite(data, zBoundary, nTotalNode);
+
+        delete [] xBoundary;
+        delete [] yBoundary;
+        delete [] zBoundary;
+
+        int *cell2node = new int [nTotalCell * 4];
+        int ncount = 0;
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            for (int i = 1; i <= ni - 1; ++ i)
+            {
+                cell2node[ncount++] = i     + (j - 1) * ni;
+                cell2node[ncount++] = i + 1 + (j - 1) * ni;
+                cell2node[ncount++] = i + 1 + (j   ) * ni;
+                cell2node[ncount++] = i     + (j   ) * ni;
+            }
+        }
+
+        PHWrite(data, cell2node, nTotalCell * 4);
+        delete [] cell2node;
+    }
+}
+
+void ComputeCharacteristicBoundaryUns(Grid *grid_in, DataContainer *data)
+{
+    UnstructGrid *grid = UnstructGridCast(grid_in);
+
+    if (grid_in->GetDim() == PHSPACE::TWO_D)
+    {
+        int TecioMission;
+
+        int nTotalNode = grid_in->GetNTotalNode();
+        int nTotalCell = grid_in->GetNTotalCell();
+        int nBoundFace = grid_in->GetNBoundFace();
+        int nTotalFace = grid_in->GetNTotalFace();
+
+        int *face2node = grid->GetFace2Node();
+        int *left_cell_of_face = grid->GetLeftCellOfFace();
+        int *right_cell_of_face = grid->GetRightCellOfFace();
+
+        RDouble *x = grid_in->GetX();
+        RDouble *y = grid_in->GetY();
+        RDouble *z = grid_in->GetZ();
+
+        vector < vector < int > > face2nodelist(nBoundFace);
+        vector < int > linkmap;
+
+        set< pair<int, string> > bcnameMap;
+        UnstructBCSet **bcr = grid->GetBCRecord();
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            int bcType = bcr[iFace]->GetKey();
+            string bcName = bcr[iFace]->GetBCName();
+
+            bcnameMap.insert(pair<int, string>(bcType, bcName));
+        }
+
+        set< pair<int, string> >::iterator iter;
+        for (iter = bcnameMap.begin(); iter != bcnameMap.end(); ++ iter)
+        {
+            if ((*iter).first == PHENGLEI::INTERFACE || (*iter).first < 0) continue;
+
+            TecioMission = WriteBoundary;
+            PHWrite(data, &TecioMission, 1);
+
+            int BCtype = (*iter).first;
+            PHWrite(data, &BCtype, 1);
+
+            string bcName = (*iter).second;
+            data->write_string(bcName);
+
+            face2nodelist.resize(0);
+            linkmap.resize(0);
+
+            GetFace2NodeList(grid, *iter, linkmap, face2nodelist);
+            
+            int NumPts = static_cast<int>(linkmap.size());
+            int NumElements = static_cast<int>(face2nodelist.size());
+
+            PHWrite(data, &NumPts, 1);
+            PHWrite(data, &NumElements, 1);
+
+
+            RDouble *xBoundary = new RDouble [NumPts];
+            RDouble *yBoundary = new RDouble [NumPts];
+            RDouble *zBoundary = new RDouble [NumPts];
+
+            for (int iNode = 0; iNode < NumPts; ++ iNode)
+            {
+                int it = linkmap[iNode];
+
+                xBoundary[iNode] = x[it];
+                yBoundary[iNode] = y[it];
+                zBoundary[iNode] = z[it];
+            }
+
+            PHWrite(data, xBoundary, NumPts);
+            PHWrite(data, yBoundary, NumPts);
+            PHWrite(data, zBoundary, NumPts);
+
+            delete [] xBoundary;
+            delete [] yBoundary;
+            delete [] zBoundary;
+
+            int *cell2node = new int [NumElements * 4];
+            int ncount = 0;
+            for (int iCell = 0; iCell < NumElements; ++ iCell)
+            {
+                uint_t np = face2nodelist[iCell].size();
+                int index0 = face2nodelist[iCell][0];
+                for (uint_t ip = 0; ip < np; ++ ip)
+                {
+                    cell2node[ncount] = face2nodelist[iCell][ip] + 1;
+                    ncount ++;
+                }
+
+                for (uint_t ip = np; ip < 4; ++ ip)
+                {
+                    cell2node[ncount] = index0 + 1;
+                    ncount ++;
+                }
+            }
+
+            PHWrite(data, cell2node, NumElements * 4);
+            delete [] cell2node;
+        }
+
+        HyList < int > *cell2face = new HyList < int > [nTotalCell];
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            cell2face[iCell].SetAverNnode(4);
+        }
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            int le = left_cell_of_face[iFace];
+            cell2face[le].insert(iFace);
+        }
+        for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+        {
+            int le = left_cell_of_face[iFace];
+            int re = right_cell_of_face[iFace];
+            cell2face[le].insert(iFace);
+            cell2face[re].insert(iFace);
+        }
+
+        HyList < int > *cell2node = new HyList < int > [nTotalCell];
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            cell2node[iCell].SetAverNnode(4);
+        }
+
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            int face0 = cell2face[iCell][0];
+            int ip1 = face2node[2 * face0];
+            int ip2 = face2node[2 * face0 + 1];
+            cell2node[iCell].insert(ip1);
+            cell2node[iCell].insert(ip2);
+
+            int targetNode = ip2;
+            int checkNode  = ip1;
+            
+            int nFaceOfCell = cell2face[iCell].size();
+            bool isClockWise = false;
+            while (!isClockWise)
+            {
+                for (int iFace = 1; iFace < nFaceOfCell; ++ iFace)
+                {
+                    int face  = cell2face[iCell][iFace];
+                    int node1 = face2node[2 * face];
+                    int node2 = face2node[2 * face + 1];
+
+                    if (node1 == targetNode)
+                    {
+                        if (node2 != checkNode)
+                        {
+                            cell2node[iCell].insert(node2);
+                            targetNode = node2;
+                        }
+                        else
+                        {
+                            isClockWise = true;
+                            break;
+                        }
+                    }
+                    else if (node2 == targetNode)
+                    {
+                        if (node1 != checkNode)
+                        {
+                            cell2node[iCell].insert(node1);
+                            targetNode = node1;
+                        }
+                        else
+                        {
+                            isClockWise = true;
+                            break;
+                        }
+                    }
+                }
+            }
+        }
+
+        TecioMission = WriteBlock;
+        PHWrite(data, &TecioMission, 1);
+        
+        PHWrite(data, &nTotalNode, 1);
+        PHWrite(data, &nTotalCell, 1);
+
+        PHWrite(data, x, nTotalNode);
+        PHWrite(data, y, nTotalNode);
+        PHWrite(data, z, nTotalNode);
+
+        int *cell2node_vtk = new int [nTotalCell * 4];
+        int ncount = 0;
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            if (cell2node[iCell].size() == 3)
+            {
+                for (int m = 0; m < 3; ++ m)
+                {
+                    cell2node_vtk[ncount] = cell2node[iCell].GetData(m) + 1;
+                    ncount ++;
+                }
+                cell2node_vtk[ncount] = cell2node[iCell].GetData(2) + 1;
+                ncount ++;
+            }
+            else if (cell2node[ iCell ].size() == 4)
+            {
+                for (int m = 0; m < 4; ++ m)
+                {
+                    cell2node_vtk[ncount] = cell2node[iCell].GetData(m) + 1;
+                    ncount ++;
+                }
+            }
+            else
+            {
+                cout << "Error: this function only support triangle and quad !\n";
+                exit(0);
+            }
+        }
+
+        PHWrite(data, cell2node_vtk, nTotalCell * 4);
+
+        delete [] cell2node_vtk;
+        delete [] cell2node;
+        delete [] cell2face;
+    }
+    else
+    {
+        int nBoundFace = grid_in->GetNBoundFace();
+        int nTotalNode = grid_in->GetNTotalNode();
+
+        grid->ComputeMetrics(NULL);
+
+        RDouble *x   = grid_in->GetX();
+        RDouble *y   = grid_in->GetY();
+        RDouble *z   = grid_in->GetZ();
+        RDouble *xfc = grid->GetFaceCenterX();
+        RDouble *yfc = grid->GetFaceCenterY();
+        RDouble *zfc = grid->GetFaceCenterZ();
+
+        using namespace PHENGLEI;
+        vector < vector < int > > face2nodelist(nBoundFace);
+        vector < int > linkmap;
+
+        set< pair<int, string> > bcnameMap;
+
+        UnstructBCSet **bcr = grid->GetBCRecord();
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            int bcType = bcr[iFace]->GetKey();
+            string bcName = bcr[iFace]->GetBCName();
+
+            bcnameMap.insert(pair<int, string>(bcType, bcName));
+        }
+
+        int TecioMission;
+        set< pair<int, string> >::iterator iter;
+        for (iter = bcnameMap.begin(); iter != bcnameMap.end(); ++ iter)
+        {
+            if ((*iter).first == PHENGLEI::INTERFACE || (*iter).first < 0) continue;
+
+            TecioMission = WriteBoundary;
+            PHWrite(data, &TecioMission, 1);
+
+            int BCtype = (*iter).first;
+            PHWrite(data, &BCtype, 1);
+
+            string bcName = (*iter).second;
+            data->write_string(bcName);
+
+            face2nodelist.resize(0);
+            linkmap.resize(0);
+
+            GetFace2NodeList(grid, *iter, linkmap, face2nodelist);
+            
+            int NumPts = static_cast<int>(linkmap.size());
+            int NumElements = static_cast<int>(face2nodelist.size());
+
+            PHWrite(data, &NumPts, 1);
+            PHWrite(data, &NumElements, 1);
+            
+
+            RDouble *xBoundary = new RDouble [NumPts];
+            RDouble *yBoundary = new RDouble [NumPts];
+            RDouble *zBoundary = new RDouble [NumPts];
+
+            for (int iNode = 0; iNode < NumPts; ++ iNode)
+            {
+                int nodeIndex = linkmap[iNode];
+                if (nodeIndex < nTotalNode)
+                {
+                    xBoundary[iNode] = x[nodeIndex];
+                    yBoundary[iNode] = y[nodeIndex];
+                    zBoundary[iNode] = z[nodeIndex];
+                }
+                else
+                {
+                    int faceIndex = nodeIndex - nTotalNode;
+                    xBoundary[iNode] = xfc[faceIndex];
+                    yBoundary[iNode] = yfc[faceIndex];
+                    zBoundary[iNode] = zfc[faceIndex];
+                }
+            }
+
+            PHWrite(data, xBoundary, NumPts);
+            PHWrite(data, yBoundary, NumPts);
+            PHWrite(data, zBoundary, NumPts);
+
+            delete [] xBoundary;
+            delete [] yBoundary;
+            delete [] zBoundary;
+
+            int *cell2node = new int [NumElements * 4];
+            int ncount = 0;
+            for (int iCell = 0; iCell < NumElements; ++ iCell)
+            {
+                uint_t np = face2nodelist[iCell].size();
+                int index0 = face2nodelist[iCell][0];
+                for (uint_t ip = 0; ip < np; ++ ip)
+                {
+                    cell2node[ncount] = face2nodelist[iCell][ip] + 1;
+                    ncount ++;
+                }
+
+                for (uint_t ip = np; ip < 4; ++ ip)
+                {
+                    cell2node[ncount] = index0 + 1;
+                    ncount ++;
+                }
+            }
+
+            PHWrite(data, cell2node, NumElements * 4);
+            delete [] cell2node;
+        }
+    }
+}
+
+}
diff --git a/API/PreProcess/src/Pre_GridMirror.cpp b/API/PreProcess/src/Pre_GridMirror.cpp
new file mode 100644
index 0000000..6817baa
--- /dev/null
+++ b/API/PreProcess/src/Pre_GridMirror.cpp
@@ -0,0 +1,1389 @@
+#include "Pre_GridMirror.h"
+#include "Math_BasisFunction.h"
+#include "Glb_Dimension.h"
+#include "IO_FileName.h"
+#include "Zone.h"
+#include "Pre_GridConversion.h"
+#include "PHIO.h"
+#include "TK_Log.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+LIB_EXPORT Pre_GridMirror::Pre_GridMirror(const string &from_gfile)
+{
+    this->gridFileName = from_gfile;
+
+    numberOfZones   = 0;
+    gridtype        = 0;
+    BlockofEachProc = 0;
+    GlobalDataBase::GetData("ndim", &Dimension, PHINT, 1);
+    GlobalDataBase::GetData("SymmetryFaceVector", &SymmetryFaceVector, PHINT, 1);
+
+    gridinfo = new DataContainer();
+
+    OrdinaryGrid.resize(0);
+    //MirrorGrids.resize(0);
+    Gridlist.resize(0);
+}
+
+LIB_EXPORT Pre_GridMirror::~Pre_GridMirror()
+{
+    delete gridinfo;
+}
+
+LIB_EXPORT void Pre_GridMirror::Run()
+{
+    using namespace PHMPI;
+
+    string out_gfile = "grid.fts";
+    GlobalDataBase::GetData("out_gfile", &out_gfile, PHSTRING, 1);
+
+    cout << "Task type	: " << "MirrorGrid" << endl;
+    cout << "  from_gfile	: " << gridFileName << endl;
+    cout << "  out_gfile	: " << out_gfile << endl << endl;
+
+    GlobalDataBase::UpdateData("gridfile", &gridFileName, PHSTRING, 1);
+    GlobalDataBase::GetData("gridtype", &gridtype, PHINT, 1);
+
+    Region *region = new Region();
+    region->ReadGrid();
+
+    numberOfOriginalBlocks = PHMPI::GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < numberOfOriginalBlocks; ++ iZone)
+    {
+        Zone *zone = region->GetZone(iZone);
+        if (!zone) continue;
+
+        Grid *grid = zone->GetGeometry()->GetGrid();
+        OrdinaryGrid.push_back(grid);
+        BlockofEachProc ++;
+    }
+
+    //numberOfOriginalBlocks = PHMPI::GetNumberofGlobalZones();
+    /*OrdinaryGrid = new Grid *[numberOfOriginalBlocks];
+
+    for (int iBlock = 0; iBlock < numberOfOriginalBlocks; iBlock ++)
+    {
+        OrdinaryGrid[iBlock] = GetGrid(iBlock, 0);
+    }*/
+
+    cout << endl << "End reading grid ... " << endl << endl;
+    RevertBCInfo();
+
+    //CalSymmetryFace();
+
+    CalBlocksNumberOfMirrorGrid();
+    GridMirror();
+    MirrorBCRegion();
+
+    cout << endl << "Mirror grid finished ... " << endl << endl;
+
+    TradeGridInfo();
+
+    if (Gridlist.size() > 0)
+    {
+        if (gridtype == STRUCTGRID)
+        {
+            DumpStrGrid(out_gfile);
+        }
+        else
+        {
+            DumpUnstrGrid(out_gfile);
+        }
+    }
+
+    /*for (int iBlock = 0; iBlock < BlockofEachProc; iBlock ++)
+    {
+        delete OrdinaryGrid[iBlock];
+    }*/
+
+    /*for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        delete grids[iZone];
+        delete MirrorGrids[iZone];
+    }
+    delete [] grids;
+    delete [] MirrorGrids;*/
+
+    delete region;
+
+}
+
+void Pre_GridMirror::TradeGridInfo()
+{
+    using namespace PHMPI;
+
+    int myid = GetCurrentProcessorID();
+
+    int nProc = GetNumberOfProcessor();
+
+    for (int iProc = 0; iProc < nProc; ++ iProc)
+    {
+        DataContainer *cdata = 0;
+        if (myid == 0 && iProc != 0)
+        {
+            cdata = new DataContainer();
+        }
+        else
+        {
+            cdata = gridinfo;
+        }
+
+        PH_Trade(cdata, iProc, 0, 0);
+
+        if (myid == 0)
+        {
+            Gridlist.push_back(cdata);
+            gridinfo = new DataContainer();
+        }
+    }
+}
+
+void Pre_GridMirror::DumpUnstrGrid(string out_gfile)
+{
+    /*if (numberOfZones > 1)
+    {
+        cout<<"\n";
+        cout << "Blocks > 1, Start to Combine Grids" << endl;
+        CombinGrid * combinGrid = new CombinGrid(OutputGrid, numberOfZones);
+
+        combinGrid->RunCombinGrid();
+        
+        Grid ** gridMerged = combinGrid->GetGridAll();
+        
+        for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+        {
+            delete OutputGrid[iZone];
+        }
+
+        OutputGrid = 0;
+        OutputGrid = gridMerged;
+
+        DumpGrid(out_gfile, gridMerged, 1);
+
+        delete combinGrid;
+    }
+    else
+    {
+        DumpGrid(out_gfile, OutputGrid, numberOfZones);
+    }
+
+    delete OutputGrid[0];*/
+
+    Grid **grids = new Grid * [numberOfZones];
+
+    uint_t sizes = Gridlist.size();
+
+    for (int isize = 0; isize < sizes; ++ isize)
+    {
+        DataContainer *cdata = Gridlist[isize];
+        cdata->moveto_begin();
+
+        int nblock = 0;
+        PHRead(cdata, &nblock, 1);
+
+        vector < int > indexlist;
+        for (int iZone = 0; iZone < nblock; ++ iZone)
+        {
+            int Gridindex = 0;
+            PHRead(cdata, &Gridindex, 1);
+            indexlist.push_back(Gridindex);
+
+            GridID *index = new GridID(Gridindex);
+            Grid *grid = CreateGridGeneral(UNSTRUCTGRID, index, 0, Dimension);
+            grids[Gridindex] = grid;
+
+            GridID *mirrorIndex = new GridID(Gridindex + numberOfOriginalBlocks);
+            Grid *Mirror = CreateGridGeneral(UNSTRUCTGRID, mirrorIndex, 0, Dimension);
+            grids[Gridindex + numberOfOriginalBlocks] = Mirror;
+
+            int nTotalNodes, nTotalFace, nTotalCells;
+            PHRead(cdata, &nTotalNodes, 1);
+            PHRead(cdata, &nTotalFace, 1);
+            PHRead(cdata, &nTotalCells, 1);
+
+            grid->SetNTotalCell(nTotalCells);
+            grid->SetNTotalNode(nTotalNodes);
+            grid->SetNTotalFace(nTotalFace);
+
+            Mirror->SetNTotalCell(nTotalCells);
+            Mirror->SetNTotalNode(nTotalNodes);
+            Mirror->SetNTotalFace(nTotalFace);
+
+
+            RDouble *x = new RDouble[nTotalNodes];
+            RDouble *y = new RDouble[nTotalNodes];
+            RDouble *z = new RDouble[nTotalNodes];
+
+            RDouble *x_mir = new RDouble[nTotalNodes];
+            RDouble *y_mir = new RDouble[nTotalNodes];
+            RDouble *z_mir = new RDouble[nTotalNodes];
+
+            PHRead(cdata, x, nTotalNodes);
+            PHRead(cdata, y, nTotalNodes);
+            PHRead(cdata, z, nTotalNodes);
+
+            PHRead(cdata, x_mir, nTotalNodes);
+            PHRead(cdata, y_mir, nTotalNodes);
+            PHRead(cdata, z_mir, nTotalNodes);
+
+            grid->SetX(x);
+            grid->SetY(y);
+            grid->SetZ(z);
+
+            Mirror->SetX(x_mir);
+            Mirror->SetY(y_mir);
+            Mirror->SetZ(z_mir);
+
+            grid->ComputeMinMaxBox();
+            Mirror->ComputeMinMaxBox();
+
+            int *node_number_of_each_face = new int[nTotalFace];
+            int *node_number_of_each_face_mir = new int[nTotalFace];
+            UnstructGridCast(grid)->SetNodeNumberOfEachFace(node_number_of_each_face);
+            UnstructGridCast(Mirror)->SetNodeNumberOfEachFace(node_number_of_each_face_mir);
+
+            PHRead(cdata, node_number_of_each_face, nTotalFace);
+            PHRead(cdata, node_number_of_each_face_mir, nTotalFace);
+
+            int nsum;
+            PHRead(cdata, &nsum, 1);
+
+            int *face2node = new int [nsum];
+            int *face2node_mir = new int [nsum];
+            UnstructGridCast(grid)->SetFace2Node(face2node);
+            UnstructGridCast(Mirror)->SetFace2Node(face2node_mir);
+
+            PHRead(cdata, face2node, nsum);
+            PHRead(cdata, face2node_mir, nsum);
+
+            int *left_cell_of_face      = new int[nTotalFace];
+            int *left_cell_of_face_mir  = new int[nTotalFace];
+            int *right_cell_of_face     = new int[nTotalFace];
+            int *right_cell_of_face_mir = new int[nTotalFace];
+
+            UnstructGridCast(grid)->SetLeftCellOfFace(left_cell_of_face);
+            UnstructGridCast(grid)->SetRightCellOfFace(right_cell_of_face);
+            UnstructGridCast(Mirror)->SetLeftCellOfFace(left_cell_of_face_mir);
+            UnstructGridCast(Mirror)->SetRightCellOfFace(right_cell_of_face_mir);
+
+            PHRead(cdata, left_cell_of_face, nTotalFace);
+            PHRead(cdata, left_cell_of_face_mir, nTotalFace);
+            PHRead(cdata, right_cell_of_face, nTotalFace);
+            PHRead(cdata, right_cell_of_face_mir, nTotalFace);
+
+            int cell2node = 0;
+            PHRead(cdata, &cell2node, 1);
+            if (cell2node == 1)
+            {
+                int *node_number_of_each_cell = new int [nTotalCells];
+                int *node_number_of_each_cell_mir = new int [nTotalCells];
+                UnstructGridCast(grid)->SetNodeNumberOfEachCell(node_number_of_each_cell);
+                UnstructGridCast(Mirror)->SetNodeNumberOfEachCell(node_number_of_each_cell_mir);
+
+                PHRead(cdata, node_number_of_each_cell, nTotalCells);
+                PHRead(cdata, node_number_of_each_cell_mir, nTotalCells);
+
+                int num;
+                PHRead(cdata, &num, 1);
+
+                int *cell2nodeA = new int [num];
+                int *cell2node_mir = new int [num];
+                UnstructGridCast(grid)->SetCell2Node(cell2nodeA);
+                UnstructGridCast(Mirror)->SetCell2Node(cell2node_mir);
+
+                PHRead(cdata, cell2nodeA, num);
+                PHRead(cdata, cell2node_mir, num);
+            }
+        }
+
+        for (int iZone = 0; iZone < nblock; ++ iZone)
+        {
+            int Gridindex = indexlist[iZone];
+
+            UnstructGrid *grid   = UnstructGridCast(grids[Gridindex]);
+            UnstructGrid *Mirror = UnstructGridCast(grids[Gridindex + numberOfOriginalBlocks]);
+
+            int nBoundFace;
+            PHRead(cdata, &nBoundFace, 1);
+
+            grid->SetNBoundFace(nBoundFace);
+            Mirror->SetNBoundFace(nBoundFace);
+
+            UnstructBCSet **bcrs     = new UnstructBCSet * [nBoundFace];
+            UnstructBCSet **bcrs_mir = new UnstructBCSet * [nBoundFace];
+
+            grid->SetBCRecord(bcrs);
+            Mirror->SetBCRecord(bcrs_mir);
+
+            int count;
+            PHRead(cdata, &count, 1);
+
+            InterfaceInfo *interfaceInfo = 0;
+            InterfaceInfo *iinfo_mir = 0;
+
+            if (count != 0)
+            {
+                interfaceInfo     = new InterfaceInfo(count);
+                iinfo_mir = new InterfaceInfo(count);
+            }
+
+            grid->SetInterfaceInfo(interfaceInfo);
+            Mirror->SetInterfaceInfo(iinfo_mir);
+
+            int *interFace2ZoneID       = interfaceInfo->GetInterFace2ZoneID();
+            int *interFace2InterFaceID  = interfaceInfo->GetInterFace2InterFaceID();
+            int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace(); 
+
+            int *interFace2ZoneID_mir       = iinfo_mir->GetInterFace2ZoneID();
+            int *interFace2InterFaceID_mir  = iinfo_mir->GetInterFace2InterFaceID();
+            int *interFace2BoundaryFace_mir = iinfo_mir->GetInterFace2BoundaryFace(); 
+
+            count = 0;
+            for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+            {
+                int bctype;
+                string bcName;
+                PHRead(cdata, &bctype, 1);
+                cdata->read_string(bcName);
+
+                bcrs[iFace] = new UnstructBCSet();
+                bcrs[iFace]->SetKey(bctype);
+                bcrs[iFace]->SetBCName(bcName);
+
+                bcrs_mir[iFace] = new UnstructBCSet();
+                bcrs_mir[iFace]->SetKey(bctype);
+                bcrs_mir[iFace]->SetBCName(bcName);
+
+                if (bctype == PHENGLEI::INTERFACE)
+                {
+                    int interFace2BcFace, interFace2Zone, interFace2InterFace;
+
+                    PHRead(cdata, &interFace2BcFace, 1);
+                    PHRead(cdata, &interFace2Zone, 1);
+                    PHRead(cdata, &interFace2InterFace, 1);
+
+                    interFace2BoundaryFace[count] = interFace2BcFace;
+                    interFace2ZoneID[count] = interFace2Zone;
+                    interFace2InterFaceID[count] = interFace2InterFace;
+
+                    PHRead(cdata, &interFace2BcFace, 1);
+                    PHRead(cdata, &interFace2Zone, 1);
+                    PHRead(cdata, &interFace2InterFace, 1);
+
+                    interFace2BoundaryFace_mir[count] = interFace2BcFace;
+                    interFace2ZoneID_mir[count] = interFace2Zone;
+                    interFace2InterFaceID_mir[count] = interFace2InterFace;
+
+                    count++;
+                }
+            }
+        }
+
+        delete cdata;
+    }
+
+    /*fstream file;
+    file.open("results/mirror.log", ios_base::out|ios_base::trunc);
+
+    ostringstream oss;
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        UnstructGrid *grid = UnstructGridCast(grids[iZone]);
+
+        oss << "\n" << "\n";
+
+        oss << "Grid block number: " << iZone << "\n" << "\n";
+
+        oss << "write nodes info: " << "\n";
+
+        int nTotalNode = grid->GetNTotalNode();
+        int nTotalFace = grid->GetNTotalFace();
+        int nTotalCells = grid->GetNTotalCell();
+        int nBoundFace = grid->GetNBoundFace();
+
+        oss << "	Number of nodes: " << nTotalNode << "\n";
+        
+        RDouble *x = grid->GetX();
+        RDouble *y = grid->GetY();
+
+        oss << "	Output node coordinates: " << "\n";
+
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            oss << "		node: " << iNode << " coordinate: " << x[iNode] << "	" << y[iNode] << "\n";
+        }
+
+        oss << "\n";
+
+        oss << "write nodes info: " << "\n";
+        oss << "	Number of faces: " << nTotalFace << "\n";
+
+        int *face2node          = grid->GetFace2Node();
+        int *left_cell_of_face  = grid->GetLeftCellOfFace();
+        int *right_cell_of_face = grid->GetRightCellOfFace();
+        int *cell2node          = grid->GetCell2Node();
+       
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+        InterfaceInfo *iinfo_ordinary = grid->GetInterfaceInfo();
+
+        int *interFace2BoundaryFace = iinfo_ordinary->GetInterFace2BoundaryFace(); 
+        int *interFace2ZoneID       = iinfo_ordinary->GetInterFace2ZoneID();
+        int *interFace2InterFaceID  = iinfo_ordinary->GetInterFace2InterFaceID();
+
+        int count = 0;
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            oss << "\n";
+
+            oss << "	Face number: " << iFace << "\n";
+            oss << "	face2node:	" << face2node[iFace * 2] << "	" << face2node[iFace * 2 + 1] << "\n";
+
+            oss << "	left_cell:	" << left_cell_of_face[iFace] << "\n";
+            oss << "	right_cell:	" << right_cell_of_face[iFace] << "\n";
+
+            if (iFace < nBoundFace)
+            {
+                UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+
+                int bcType = bcRegion->GetBCType();
+                oss << "The Boundary condition is :	" << bcType << "\n";
+
+                if (bcType == -1)
+                {
+                    oss << "	interFace2BoundaryFace:	" << interFace2BoundaryFace[count] << "\n";
+                    oss << "	interFace2ZoneID:	" << interFace2ZoneID[count] << "\n";
+                    oss << "	interFace2InterFaceID:	" << interFace2InterFaceID[count] << "\n";
+                    count ++ ;
+                }
+            }
+        }
+
+        oss << "\n";
+
+        oss << "write nodes info: " << "\n";
+        oss << "	Number of cells: " << nTotalCells << "\n";
+
+        for (int iCell = 0; iCell < nTotalCells; ++ iCell)
+        {
+            oss << "	Cell number: " << iCell << "\n";
+            oss << "	cell2node:	" << cell2node[iCell * 4] << "	" << cell2node[iCell * 4 + 1] << "	" << cell2node[iCell * 4 + 2] << "	" << cell2node[iCell * 4 + 3] << "\n";
+        }
+    }
+
+    file << oss.str();
+    file.close();
+    file.clear();*/
+
+    //ConstructGlobalInterfaceLink(grids, numberOfZones);
+    DumpGrid(out_gfile, grids, numberOfZones);
+}
+
+void Pre_GridMirror::DumpStrGrid(string out_gfile)
+{
+    Grid **grids = new Grid * [numberOfZones];
+
+    uint_t sizes = Gridlist.size();
+
+    for (int isize = 0; isize < sizes; ++ isize)
+    {
+        DataContainer *cdata = Gridlist[isize];
+        cdata->moveto_begin();
+
+        int nblock = 0;
+        PHRead(cdata, &nblock, 1);
+
+        vector < int > indexlist;
+        for (int iZone = 0; iZone < nblock; ++ iZone)
+        {
+            int Gridindex = 0;
+            PHRead(cdata, &Gridindex, 1);
+            indexlist.push_back(Gridindex);
+
+            GridID *index = new GridID(Gridindex);
+            Grid *grid;
+            grid = CreateGridGeneral(STRUCTGRID, index, 0, Dimension);
+            grids[Gridindex] = grid;
+
+            GridID *index_mirror = new GridID(Gridindex + numberOfOriginalBlocks);
+            Grid *Mirror;
+            Mirror = CreateGridGeneral(STRUCTGRID, index_mirror, 0, Dimension);
+            grids[Gridindex + numberOfOriginalBlocks] = Mirror;
+
+            int nTotalNode;
+            PHRead(cdata, &nTotalNode, 1);
+
+            int ni = 0;
+            int nj = 0;
+            int nk = 0;
+            PHRead(cdata, &ni, 1);
+            PHRead(cdata, &nj, 1);
+            PHRead(cdata, &nk, 1);
+            
+            StructGridCast(grid)->SetNI(ni);
+            StructGridCast(grid)->SetNJ(nj);
+            StructGridCast(grid)->SetNK(nk);
+            StructGridCast(grid)->SetBasicDimension();
+
+            StructGridCast(Mirror)->SetNI(ni);
+            StructGridCast(Mirror)->SetNJ(nj);
+            StructGridCast(Mirror)->SetNK(nk);
+            StructGridCast(Mirror)->SetBasicDimension();
+
+            RDouble *x = new RDouble [nTotalNode];
+            RDouble *y = new RDouble [nTotalNode];
+            RDouble *z = new RDouble [nTotalNode];
+
+            grid->SetX(x);
+            grid->SetY(y);
+            grid->SetZ(z);
+            StructGridCast(grid)->SetArrayLayout();
+
+            RDouble *MirrorX = new RDouble [nTotalNode];
+            RDouble *MirrorY = new RDouble [nTotalNode];
+            RDouble *MirrorZ = new RDouble [nTotalNode];
+
+            Mirror->SetX(MirrorX);
+            Mirror->SetY(MirrorY);
+            Mirror->SetZ(MirrorZ);
+            StructGridCast(Mirror)->SetArrayLayout();
+
+            PHRead(cdata, x, nTotalNode);
+            PHRead(cdata, y, nTotalNode);
+            PHRead(cdata, z, nTotalNode);
+
+            PHRead(cdata, MirrorX, nTotalNode);
+            PHRead(cdata, MirrorY, nTotalNode);
+            PHRead(cdata, MirrorZ, nTotalNode);
+
+            StructGridCast(grid)->ComputeMinMaxBox();
+            StructGridCast(Mirror)->ComputeMinMaxBox();
+
+            /*delete index;
+            delete index_mirror;*/
+        }
+
+        for (int iZone = 0; iZone < nblock; ++ iZone)
+        {
+
+            int Gridindex = indexlist[iZone];
+
+            Grid *grid = grids[Gridindex];
+            Grid *Mirror = grids[Gridindex + numberOfOriginalBlocks];
+
+            int  numberOfBoundaryFaces = 0;
+            PHRead(cdata, &numberOfBoundaryFaces, 1);
+
+            StructGridCast(grid)->CreateCompositeBCRegion(numberOfBoundaryFaces);
+            StructGridCast(Mirror)->CreateCompositeBCRegion(numberOfBoundaryFaces);
+
+            StructBCSet *rhs = StructGridCast(grid)->GetStructBCSet();
+            StructBCSet *structBCSet = StructGridCast(Mirror)->GetStructBCSet();
+
+            for (int iBCRegion = 0; iBCRegion < numberOfBoundaryFaces; iBCRegion ++)
+            {
+                StructBC *bcregion = new StructBC(Gridindex, iBCRegion);
+                StructBC *MirrorBCRegion = new StructBC(Gridindex + numberOfOriginalBlocks, iBCRegion);
+
+                rhs->SetBCRegion(iBCRegion, bcregion);
+                structBCSet->SetBCRegion(iBCRegion, MirrorBCRegion);
+
+                int bctype = 0;
+                PHRead(cdata, &bctype, 1);
+
+                bcregion->SetBCType(bctype);
+                MirrorBCRegion->SetBCType(bctype);
+
+                int *s_st = bcregion->GetStartPoint();
+                int *s_ed = bcregion->GetEndPoint();
+
+                PHRead(cdata, s_st, 3);
+                PHRead(cdata, s_ed, 3);
+
+                int *s_st_mir = MirrorBCRegion->GetStartPoint();
+                int *s_ed_mir = MirrorBCRegion->GetEndPoint();
+                PHRead(cdata, s_st_mir, 3);
+                PHRead(cdata, s_ed_mir, 3);
+
+                /*delete bcregion;
+                delete MirrorBCRegion;*/
+            }
+        }
+        delete cdata;
+    }
+    
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        StructGridCast(grids[iZone])->ProcessBCInfo();
+    }
+
+    ConstructGlobalInterfaceLink(grids, numberOfZones);
+    DumpGrid(out_gfile, grids, numberOfZones);
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        delete grids[iZone];
+    }
+    delete [] grids;
+}
+
+void Pre_GridMirror::ReadLnkFile(const string &fileName_in)
+{
+    string LnkFileName = ChangeExtensionOfFileName(fileName_in, "link");
+    if (! SerialFileExist(LnkFileName))
+    {
+        TK_Exit::ExceptionExit("There is no link file!");
+        return;
+    }
+    LnkFileExist = true;
+
+    fstream file;
+    OpenSerialFile(file, LnkFileName, ios_base::in|ios_base::binary);
+
+    DataContainer *LnkData = new DataContainer();
+    ReadFile(file, LnkData);
+
+    VirtualFile *virtualFile = new VirtualFile(LnkData);
+    virtualFile->BeginReadWork();
+
+    //Grid ** OrdinaryGrid = GetOrdinaryGrid();
+    for (int iBlock = 0; iBlock < BlockofEachProc; iBlock ++)
+    {
+        StructGrid *grid = StructGridCast(OrdinaryGrid[iBlock]);
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+
+        int nBCRegion = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion ++)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+            int bctype = structBC->GetBCType();
+            if ((!IsInterface(bctype))) continue;
+
+            int imin, imax, jmin, jmax, kmin, kmax, nbt;
+
+            PHRead(virtualFile, imin);
+            PHRead(virtualFile, imax);
+            PHRead(virtualFile, jmin);
+            PHRead(virtualFile, jmax);
+
+            if (Dimension == THREE_D)
+            {
+                PHRead(virtualFile, kmin);
+                PHRead(virtualFile, kmax);
+            }
+            else
+            {
+                kmin = 1;
+                kmax = 1;
+            }
+
+            structBC->SetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+
+            /*int * t_st = structBC->GetTargetStart();
+            int * t_ed = structBC->GetTargetEnd();*/
+
+            PHRead(virtualFile, imin);
+            PHRead(virtualFile, imax);
+            PHRead(virtualFile, jmin);
+            PHRead(virtualFile, jmax);
+
+            if (Dimension == THREE_D)
+            {
+                PHRead(virtualFile, kmin);
+                PHRead(virtualFile, kmax);
+            }
+            else
+            {
+                kmin = 1;
+                kmax = 1;
+            }
+
+            PHRead(virtualFile, nbt);
+
+            structBC->SetTargetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+            structBC->SetTargetRegionBlock(nbt - 1);
+        }
+    }
+
+    virtualFile->EndReadWork();
+
+    delete virtualFile;
+    delete LnkData;
+
+    file.close();
+    file.clear();
+}
+
+void Pre_GridMirror::RevertBCInfo()
+{
+    if (gridtype == STRUCTGRID)
+    {
+        for (int iBlock = 0; iBlock < BlockofEachProc; iBlock ++)
+        {
+            StructGrid *grid = StructGridCast(OrdinaryGrid[iBlock]);
+            StructBCSet *structBCSet = grid->GetStructBCSet();
+
+            int numberOfBoundaryFaces = structBCSet->GetnBCRegion();
+            for (int iBCRegion = 0; iBCRegion < numberOfBoundaryFaces; iBCRegion ++)
+            {
+                StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+                int *s_st = structBC->GetStartPoint();
+                int *s_ed = structBC->GetEndPoint();
+                int *s_lr3d = structBC->GetFaceDirectionIndex();
+                for (int m = 0; m < Dimension; ++ m)
+                {
+                    if (s_st[m] == s_ed[m])
+                    {
+                        if (s_st[m] > 1 || s_lr3d[m] == 1)
+                        //if (s_st[m] != 1)
+                        {
+                            s_st[m] += 1;
+                            s_ed[m] += 1;
+                        }
+                    }
+                    else
+                    {
+                        s_ed[m] += 1;
+                    }
+                }
+            }
+        }
+
+        //ReadLnkFile(gridFileName);
+    }
+}
+
+void Pre_GridMirror::CalBlocksNumberOfMirrorGrid()
+{
+    /*int SymmetryBlock = 0;
+    for (int iZone = 0; iZone < numberOfOriginalBlocks; iZone ++)
+    {
+        StructGrid * grid = StructGridCast(OrdinaryGrid[iZone]);
+        StructBCSet * structBCSet = grid->GetStructBCSet();
+        int numberOfBoundaryFaces = structBCSet->GetnBCRegion();
+
+        for (int iBCRegion = 0; iBCRegion < numberOfBoundaryFaces; iBCRegion ++)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+            int bctype = structBC->GetBCType();
+
+            if (bctype != PHENGLEI::SYMMETRY) continue;
+
+            SymmetryBlock += 1;
+            break;
+        }
+    }
+
+    numberOfZones = numberOfOriginalBlocks * 2 - SymmetryBlock;*/
+
+    numberOfZones = numberOfOriginalBlocks * 2;
+    //OutputGrid = new Grid * [numberOfZones];
+}
+
+void Pre_GridMirror::CalSymmetryFace()
+{
+    int Nodeindex1[3] = {0}, Nodeindex2[3] = {0}, Nodeindex3[3] = {0}, Nodeindex4[3] = {0};
+    vector < vector <RDouble> > Node;
+    RDouble node1[3] = {0}, node2[3] = {0}, node3[3] = {0};
+
+    Node.resize(3);
+
+    bool SymmetryFace = false;
+    for (int iZone = 0; iZone < numberOfOriginalBlocks; iZone ++)
+    {
+        if (SymmetryFace == true) break;
+
+        StructGrid *grid = StructGridCast(OrdinaryGrid[iZone]);
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+
+        RDouble AA, BB, CC, DD;
+
+        int numberOfBoundaryFaces = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < numberOfBoundaryFaces; iBCRegion ++)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+            int bctype = structBC->GetBCType();
+
+            if (bctype != PHENGLEI::SYMMETRY) continue;
+
+            int *s_st = structBC->GetStartPoint();
+            int *s_ed = structBC->GetEndPoint();
+
+            bool j = false;
+            for (int i = 0; i < 3; i ++)
+            {
+                if (s_st[i] == s_ed[i])
+                {
+                    Nodeindex1[i] = s_st[i];
+                    Nodeindex2[i] = s_st[i];
+                    Nodeindex3[i] = s_st[i];
+                    Nodeindex4[i] = s_st[i];
+                }
+                else
+                {
+                    if (j == false)
+                    {
+                        Nodeindex1[i] = s_st[i];
+                        Nodeindex2[i] = s_st[i];
+
+                        Nodeindex3[i] = s_ed[i];
+                        Nodeindex4[i] = s_ed[i];
+
+                        j = true;
+                    }
+                    else
+                    {
+                        Nodeindex1[i] = s_st[i];
+                        Nodeindex3[i] = s_st[i];
+
+                        Nodeindex2[i] = s_ed[i];
+                        Nodeindex4[i] = s_ed[i];
+                    }
+                }
+            }
+
+            SymmetryFace = true;
+            break;
+        }
+
+        RDouble3D &xx = * grid->GetStructX();
+        RDouble3D &yy = * grid->GetStructY();
+        RDouble3D &zz = * grid->GetStructZ();
+
+        node1[0] = xx(Nodeindex1[0], Nodeindex1[1], Nodeindex1[2]);
+        node1[1] = yy(Nodeindex1[0], Nodeindex1[1], Nodeindex1[2]);
+        node1[2] = zz(Nodeindex1[0], Nodeindex1[1], Nodeindex1[2]);
+
+        node2[0] = xx(Nodeindex2[0], Nodeindex2[1], Nodeindex2[2]);
+        node2[1] = yy(Nodeindex2[0], Nodeindex2[1], Nodeindex2[2]);
+        node2[2] = zz(Nodeindex2[0], Nodeindex2[1], Nodeindex2[2]);
+
+        node3[0] = xx(Nodeindex3[0], Nodeindex3[1], Nodeindex3[2]);
+        node3[1] = yy(Nodeindex3[0], Nodeindex3[1], Nodeindex3[2]);
+        node3[2] = zz(Nodeindex3[0], Nodeindex3[1], Nodeindex3[2]);
+
+        AA = (node2[1] - node1[1]) * (node3[2] - node1[2]) - (node2[2] - node1[2]) * (node3[1] - node1[1]);
+        BB = (node2[2] - node1[2]) * (node3[0] - node1[0]) - (node2[0] - node1[0]) * (node3[2] - node1[2]);
+        CC = (node2[0] - node1[0]) * (node3[1] - node1[1]) - (node2[1] - node1[1]) * (node3[0] - node1[0]);
+        DD = 0 - AA * node1[0] - BB * node1[1] - CC * node1[2];
+
+        vector <RDouble> FF;
+
+        FF.push_back(AA * node1[0] + BB * node1[1] + CC * node1[2] + DD);
+        FF.push_back(AA * node2[0] + BB * node2[1] + CC * node2[2] + DD);
+        FF.push_back(AA * node3[0] + BB * node3[1] + CC * node3[2] + DD);
+
+        int nTotalNode = grid->GetNTotalNode();
+        RDouble *x = grid->GetX();
+        RDouble *y = grid->GetY();
+        RDouble *z = grid->GetZ();
+
+        RDouble count = 0;
+        RDouble resu = 0;
+        for (int iNode = 0; iNode < nTotalNode; iNode ++)
+        {
+            resu = AA * x[iNode] + BB * y[iNode] + CC * z[iNode] + DD;
+            if (ABS(count) < ABS(resu))
+                count = resu;
+        }
+    }
+}
+
+void Pre_GridMirror::GridMirror()
+{
+    gridinfo->moveto_begin();
+    PHWrite(gridinfo, &BlockofEachProc, 1);
+
+    for (int iZone = 0; iZone < BlockofEachProc; iZone ++)
+    {
+        if (gridtype == STRUCTGRID)
+        {
+            StructGrid *grid = StructGridCast(OrdinaryGrid[iZone]);
+            MirrorGridStr(grid);
+        }
+        else
+        {
+            UnstructGrid *grid = UnstructGridCast(OrdinaryGrid[iZone]);
+            MirrorGridUnstr(grid);
+        }
+    }
+}
+
+void Pre_GridMirror::MirrorGridUnstr(UnstructGrid *grid_in)
+{
+    int Gridindex = grid_in->GetGridID()->GetIndex();
+    PHWrite(gridinfo, &Gridindex, 1);
+
+    MirrorCoordinate(grid_in);
+    MirrorNodeNumberOfEachFace(grid_in);
+    MirrorFace2Node(grid_in);
+    MirrorCellOfFace(grid_in);
+    MirrorCell2Node(grid_in);
+    //mirrorindex ++;
+}
+
+void Pre_GridMirror::MirrorCell2Node(UnstructGrid *grid_in)
+{
+    int nTotalCells = grid_in->GetNTotalCell();
+
+    int cell2node = 1;
+    Geo_CellTopo_Unstruct *cellTopology = grid_in->GetCellTopology();
+    if (!cellTopology->GetNodeNumberOfEachCell())
+    {
+        PrintToWindow("Error: cell-node topology is empty!\n");
+        cell2node = 0;
+        PHWrite(gridinfo, &cell2node, 1);
+        return;
+    }
+    
+    PHWrite(gridinfo, &cell2node, 1);
+    int *node_number_of_each_cell_ordinary = grid_in->GetNodeNumberOfEachCell();
+    int *cell2node_ordinary = grid_in->GetCell2Node();
+
+    PHWrite(gridinfo, node_number_of_each_cell_ordinary, nTotalCells);
+    PHWrite(gridinfo, node_number_of_each_cell_ordinary, nTotalCells);
+
+    int num = 0;
+    for (int iCell = 0; iCell < nTotalCells; ++ iCell)
+    {
+        num += node_number_of_each_cell_ordinary[iCell];
+    }
+
+    PHWrite(gridinfo, &num, 1);
+    PHWrite(gridinfo, cell2node_ordinary, num);
+    PHWrite(gridinfo, cell2node_ordinary, num);
+}
+
+void Pre_GridMirror::MirrorCellOfFace(UnstructGrid *grid_in)
+{
+    int nTotalFace = grid_in->GetNTotalFace();
+    int nBoundFace = grid_in->GetNBoundFace();
+
+    int *left_cell_of_face_ordinary  = grid_in->GetLeftCellOfFace();
+    int *right_cell_of_face_ordinary = grid_in->GetRightCellOfFace();
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        right_cell_of_face_ordinary[iFace] = -1;
+    }
+
+    PHWrite(gridinfo, left_cell_of_face_ordinary, nTotalFace);
+    PHWrite(gridinfo, left_cell_of_face_ordinary, nTotalFace);
+    PHWrite(gridinfo, right_cell_of_face_ordinary, nTotalFace);
+    PHWrite(gridinfo, right_cell_of_face_ordinary, nTotalFace);
+}
+
+void Pre_GridMirror::MirrorFace2Node(UnstructGrid *grid_in)
+{
+    int nTotalFace = grid_in->GetNTotalFace();
+    int *node_number_of_each_face_ordinary = grid_in->GetNodeNumberOfEachFace();
+    int *face2node_ordinary = grid_in->GetFace2Node();
+
+    int nsum = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        nsum += node_number_of_each_face_ordinary[iFace];
+    }
+
+    int *face2node_mir = new int [nsum];
+
+    int count = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        int nodeos = node_number_of_each_face_ordinary[iFace];
+
+        for (int iNode = 0; iNode < nodeos; ++ iNode)
+        {
+            face2node_mir[count + iNode] = face2node_ordinary[count + nodeos - 1 - iNode];
+        }
+        count += nodeos;
+    }
+
+    PHWrite(gridinfo, &nsum, 1);
+    PHWrite(gridinfo, face2node_ordinary, nsum);
+    PHWrite(gridinfo, face2node_mir, nsum);
+
+    delete [] face2node_mir;
+}
+
+void Pre_GridMirror::MirrorNodeNumberOfEachFace(UnstructGrid *grid_in)
+{
+    int nTotalFace = grid_in->GetNTotalFace();
+    int *node_number_of_each_face_ordinary = grid_in->GetNodeNumberOfEachFace();
+
+    PHWrite(gridinfo, node_number_of_each_face_ordinary, nTotalFace);
+    PHWrite(gridinfo, node_number_of_each_face_ordinary, nTotalFace);
+}
+
+void Pre_GridMirror::MirrorCoordinate(UnstructGrid *grid_in)
+{
+    int nTotalNode = grid_in->GetNTotalNode();
+    int nTotalFace = grid_in->GetNTotalFace();
+    int nTotalCells = grid_in->GetNTotalCell();
+
+    PHWrite(gridinfo, &nTotalNode, 1);
+    PHWrite(gridinfo, &nTotalFace, 1);
+    PHWrite(gridinfo, &nTotalCells, 1);
+
+    RDouble *x_mir = new RDouble[nTotalNode];
+    RDouble *y_mir = new RDouble[nTotalNode];
+    RDouble *z_mir = new RDouble[nTotalNode];
+    
+    RDouble *x_ordinary = grid_in->GetX();
+    RDouble *y_ordinary = grid_in->GetY();
+    RDouble *z_ordinary = grid_in->GetZ();
+
+    PHWrite(gridinfo, x_ordinary, nTotalNode);
+    PHWrite(gridinfo, y_ordinary, nTotalNode);
+    PHWrite(gridinfo, z_ordinary, nTotalNode);
+
+    if (SymmetryFaceVector == X_axis)
+    {
+        for (int iNode = 0; iNode < nTotalNode; iNode ++)
+        {
+            x_mir[iNode] = - x_ordinary[iNode];
+            y_mir[iNode] = y_ordinary[iNode];
+            z_mir[iNode] = z_ordinary[iNode];
+        }
+    }
+    else if (SymmetryFaceVector == Y_axis)
+    {
+        for (int iNode = 0; iNode < nTotalNode; iNode ++)
+        {
+            x_mir[iNode] = x_ordinary[iNode];
+            y_mir[iNode] = - y_ordinary[iNode];
+            z_mir[iNode] = z_ordinary[iNode];
+        }
+    }
+    else
+    {
+        for (int iNode = 0; iNode < nTotalNode; iNode ++)
+        {
+            x_mir[iNode] = x_ordinary[iNode];
+            y_mir[iNode] = y_ordinary[iNode];
+            z_mir[iNode] = - z_ordinary[iNode];
+        }
+    }
+
+    PHWrite(gridinfo, x_mir, nTotalNode);
+    PHWrite(gridinfo, y_mir, nTotalNode);
+    PHWrite(gridinfo, z_mir, nTotalNode);
+
+    /*grid->ComputeMinMaxBox();
+    Mirror->ComputeMinMaxBox();*/
+}
+
+void Pre_GridMirror::MirrorGridStr(StructGrid *grid_in)
+{
+    int Gridindex = grid_in->GetGridID()->GetIndex();
+    PHWrite(gridinfo, &Gridindex, 1);
+
+/*
+    GridID *index = new GridID(Gridindex);
+    Grid *grid;
+    grid = CreateGridGeneral(STRUCTGRID, index, 0, Dimension);
+    MirrorGrids.push_back(grid);
+    StructGridCast(grid)->CopyGrid(StructGridCast(grid_in));*/
+    /*
+
+    GridID *index_mirror = new GridID(Gridindex + numberOfOriginalBlocks);
+    Grid * Mirror;
+    Mirror = CreateGridGeneral(STRUCTGRID, index_mirror, 0, Dimension);
+    MirrorGrids.push_back(Mirror);*/
+
+    int nTotalNode = grid_in->GetNTotalNode();
+    PHWrite(gridinfo, &nTotalNode, 1);
+
+    int ni = grid_in->GetNI();
+    int nj = grid_in->GetNJ();
+    int nk = grid_in->GetNK();
+    PHWrite(gridinfo, &ni, 1);
+    PHWrite(gridinfo, &nj, 1);
+    PHWrite(gridinfo, &nk, 1);
+
+/*
+    StructGridCast(Mirror)->SetNI(ni);
+    StructGridCast(Mirror)->SetNJ(nj);
+    StructGridCast(Mirror)->SetNK(nk);
+    StructGridCast(Mirror)->SetBasicDimension();*/
+
+    RDouble *MirrorX = new RDouble [nTotalNode];
+    RDouble *MirrorY = new RDouble [nTotalNode];
+    RDouble *MirrorZ = new RDouble [nTotalNode];
+/*
+    Mirror->SetX(MirrorX);
+    Mirror->SetY(MirrorY);
+    Mirror->SetZ(MirrorZ);
+    StructGridCast(Mirror)->SetArrayLayout();*/
+
+    RDouble *x = grid_in->GetX();
+    RDouble *y = grid_in->GetY();
+    RDouble *z = grid_in->GetZ();
+    PHWrite(gridinfo, x, nTotalNode);
+    PHWrite(gridinfo, y, nTotalNode);
+    PHWrite(gridinfo, z, nTotalNode);
+
+    if (SymmetryFaceVector == X_axis)
+    {
+        for (int iNode = 0; iNode < nTotalNode; iNode ++)
+        {
+            MirrorX[iNode] = - x[iNode];
+            MirrorY[iNode] = y[iNode];
+            MirrorZ[iNode] = z[iNode];
+        }
+    }
+    else if (SymmetryFaceVector == Y_axis)
+    {
+        for (int iNode = 0; iNode < nTotalNode; iNode ++)
+        {
+            MirrorX[iNode] = x[iNode];
+            MirrorY[iNode] = - y[iNode];
+            MirrorZ[iNode] = z[iNode];
+        }
+    }
+    else
+    {
+        for (int iNode = 0; iNode < nTotalNode; iNode ++)
+        {
+            MirrorX[iNode] = x[iNode];
+            MirrorY[iNode] = y[iNode];
+            MirrorZ[iNode] = - z[iNode];
+        }
+    }
+
+    PHWrite(gridinfo, MirrorX, nTotalNode);
+    PHWrite(gridinfo, MirrorY, nTotalNode);
+    PHWrite(gridinfo, MirrorZ, nTotalNode);
+
+    /*StructGridCast(Mirror)->ComputeMinMaxBox();
+    StructGridCast(Mirror)->CopyStructBCSet(grid_in->GetStructBCSet());*/
+}
+
+void Pre_GridMirror::MirrorBCRegion()
+{
+    for (int iZone = 0; iZone < BlockofEachProc; iZone ++)
+    {
+        if (gridtype == STRUCTGRID)
+        {
+            StructGrid *grid = StructGridCast(OrdinaryGrid[iZone]);
+            /*StructGrid * Mirror = StructGridCast(MirrorGrids[iZone * 2 + 1]);*/
+
+            StructBCSet *rhs = grid->GetStructBCSet();
+            /*StructBCSet * structBCSet = Mirror->GetStructBCSet();*/
+
+            int numberOfBoundaryFaces = rhs->GetnBCRegion();
+            PHWrite(gridinfo, &numberOfBoundaryFaces, 1);
+
+            for (int iBCRegion = 0; iBCRegion < numberOfBoundaryFaces; iBCRegion ++)
+            {
+                StructBC *bcregion = rhs->GetBCRegion(iBCRegion);
+                /*StructBC *MirrorBCRegion = structBCSet->GetBCRegion(iBCRegion);*/
+
+                int bctype = bcregion->GetBCType();
+
+                /*if (bctype == PHENGLEI::INTERFACE)
+                {
+                    int nbt = bcregion->GetTargetRegionBlock();
+
+                    MirrorBCRegion->SetTargetRegionBlock(nbt + numberOfOriginalBlocks);
+
+                }*/
+
+                if (bctype == PHENGLEI::SYMMETRY)
+                {
+                    bctype = PHENGLEI::INTERFACE;
+
+                    /*bcregion->SetBCType(PHENGLEI::INTERFACE);
+                    int imin, imax, jmin, jmax, kmin, kmax;
+                    bcregion->GetIJKRegion(imin,imax,jmin,jmax,kmin,kmax);
+                    bcregion->SetTargetIJKRegion(imin,imax,jmin,jmax,kmin,kmax);*/
+
+                    /*int Gridindex = grid->GetGridID()->GetIndex();
+                    bcregion->SetTargetRegionBlock(Gridindex + numberOfOriginalBlocks);*/
+
+                    /*MirrorBCRegion->SetBCType(PHENGLEI::INTERFACE);
+                    MirrorBCRegion->GetIJKRegion(imin,imax,jmin,jmax,kmin,kmax);
+                    MirrorBCRegion->SetTargetIJKRegion(imin,imax,jmin,jmax,kmin,kmax);
+                    MirrorBCRegion->SetTargetRegionBlock(Gridindex);*/
+                }
+
+                PHWrite(gridinfo, &bctype, 1);
+                int *s_st = bcregion->GetStartPoint();
+                int *s_ed = bcregion->GetEndPoint();
+                PHWrite(gridinfo, s_st, 3);
+                PHWrite(gridinfo, s_ed, 3);
+                
+                PHWrite(gridinfo, s_st, 3);
+                PHWrite(gridinfo, s_ed, 3);
+                /*int * s_st_mir = MirrorBCRegion->GetStartPoint();
+                int * s_ed_mir = MirrorBCRegion->GetEndPoint();
+                PHWrite(gridinfo, s_st_mir, 3);
+                PHWrite(gridinfo, s_ed_mir, 3);*/
+
+                /*if (IsInterface(bctype))
+                {
+                    int *t_sd = bcregion->GetTargetStart();
+                    int *t_ed = bcregion->GetTargetEnd();
+                    PHWrite(gridinfo, t_sd, 3);
+                    PHWrite(gridinfo, t_ed, 3);
+
+                    int nbt = bcregion->GetTargetRegionBlock();
+                    PHWrite(gridinfo, &nbt, 1);
+
+                    int *t_sd_mir = MirrorBCRegion->GetTargetStart();
+                    int *t_ed_mir = MirrorBCRegion->GetTargetEnd();
+                    PHWrite(gridinfo, t_sd_mir, 3);
+                    PHWrite(gridinfo, t_ed_mir, 3);
+
+                    int nbt_mir = MirrorBCRegion->GetTargetRegionBlock();
+                    PHWrite(gridinfo, &nbt_mir, 1);
+
+                }*/
+            }
+        }
+        else if (gridtype == UNSTRUCTGRID)
+        {
+            UnstructGrid *grid_ordinary = UnstructGridCast(OrdinaryGrid[iZone]);
+
+
+            UnstructBCSet **bcr_ordinary = grid_ordinary->GetBCRecord();
+            int nBoundFace = grid_ordinary->GetNBoundFace();
+            PHWrite(gridinfo, &nBoundFace, 1);
+
+            int count = 0;
+            for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+            {
+                if (bcr_ordinary[iFace]->GetKey() == PHENGLEI::INTERFACE)
+                {
+                    count ++;
+                }
+
+                if (bcr_ordinary[iFace]->GetKey() == PHENGLEI::SYMMETRY)
+                {
+                    count ++;
+                }
+            }
+           
+            PHWrite(gridinfo, &count, 1);
+
+            InterfaceInfo *iinfo_ordinary = grid_ordinary->GetInterfaceInfo();
+            /*InterfaceInfo * interfaceInfo = 0;
+            InterfaceInfo * iinfo_mir = 0;
+            if (count != 0)
+            {
+                interfaceInfo     = new InterfaceInfo(count);
+                iinfo_mir = new InterfaceInfo(count);
+            }
+
+            int * interFace2ZoneID       = interfaceInfo->GetInterFace2ZoneID();
+            int * interFace2InterFaceID  = interfaceInfo->GetInterFace2InterFaceID();
+            int * interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace(); 
+            int * interFaceDirection     = interfaceInfo->GetInterFaceDirection();
+
+            int * interFace2ZoneID_mir       = iinfo_mir->GetInterFace2ZoneID();
+            int * interFace2InterFaceID_mir  = iinfo_mir->GetInterFace2InterFaceID();
+            int * interFace2BoundaryFace_mir = iinfo_mir->GetInterFace2BoundaryFace(); 
+            int * interFaceDirection_mir     = iinfo_mir->GetInterFaceDirection();*/
+
+            int * interFace2ZoneID_ordinary       = NULL;
+            int * interFace2InterFaceID_ordinary  = NULL;
+            int * interFace2BoundaryFace_ordinary = NULL;
+            //int * interFaceDirection_ordinary;
+
+            if (numberOfZones > 2)
+            {
+                interFace2ZoneID_ordinary       = iinfo_ordinary->GetInterFace2ZoneID();
+                interFace2InterFaceID_ordinary  = iinfo_ordinary->GetInterFace2InterFaceID();
+                interFace2BoundaryFace_ordinary = iinfo_ordinary->GetInterFace2BoundaryFace();
+                //interFaceDirection_ordinary     = iinfo_ordinary->GetInterFaceDirection();
+            }
+
+            /*int *interFace2ZoneID_ordinary = iinfo_ordinary->GetInterFace2ZoneID();
+            int *interFace2InterFaceID_ordinary = iinfo_ordinary->GetInterFace2InterFaceID();
+            int *interFace2BoundaryFace_ordinary = iinfo_ordinary->GetInterFace2BoundaryFace();
+            int *interFaceDirection_ordinary = iinfo_ordinary->GetInterFaceDirection();*/
+
+            count = 0;
+            int iInterfae = 0;
+
+            for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+            {
+                int bctype = bcr_ordinary[iFace]->GetKey();
+                string bcName = bcr_ordinary[iFace]->GetBCName();
+
+                if (bctype == PHENGLEI::INTERFACE)
+                {
+                    PHWrite(gridinfo, &bctype, 1);
+                    gridinfo->write_string(bcName);
+
+                    int interFace2BoundaryFace = interFace2BoundaryFace_ordinary[iInterfae];
+                    int interFace2ZoneID       = interFace2ZoneID_ordinary[iInterfae];
+                    int interFace2InterFaceID  = interFace2InterFaceID_ordinary[iInterfae];
+
+                    PHWrite(gridinfo, &interFace2BoundaryFace, 1);
+                    PHWrite(gridinfo, &interFace2ZoneID, 1);
+                    PHWrite(gridinfo, &interFace2InterFaceID, 1);
+
+                    interFace2ZoneID += numberOfOriginalBlocks;
+
+                    PHWrite(gridinfo, &interFace2BoundaryFace, 1);
+                    PHWrite(gridinfo, &interFace2ZoneID, 1);
+                    PHWrite(gridinfo, &interFace2InterFaceID, 1);
+
+                    iInterfae ++;
+                    count ++;
+                    continue;
+                }
+
+                if (bctype == PHENGLEI::SYMMETRY)
+                {
+                    int Gridindex = grid_ordinary->GetGridID()->GetIndex();
+                    bctype = PHENGLEI::INTERFACE;
+                    bcName = "Interface";
+                    PHWrite(gridinfo, &bctype, 1);
+                    gridinfo->write_string(bcName);
+
+                    int interFace2BoundaryFace = iFace;
+                    int interFace2ZoneID       = Gridindex + numberOfOriginalBlocks;
+                    int interFace2InterFaceID  = count;
+
+                    PHWrite(gridinfo, &interFace2BoundaryFace, 1);
+                    PHWrite(gridinfo, &interFace2ZoneID, 1);
+                    PHWrite(gridinfo, &interFace2InterFaceID, 1);
+
+                    interFace2ZoneID = Gridindex;
+                    PHWrite(gridinfo, &interFace2BoundaryFace, 1);
+                    PHWrite(gridinfo, &interFace2ZoneID, 1);
+                    PHWrite(gridinfo, &interFace2InterFaceID, 1);
+
+                    /*interFace2ZoneID[count] = Gridindex + numberOfOriginalBlocks;
+                    interFace2InterFaceID[count] = count;
+                    interFace2BoundaryFace[count] = iFace;
+
+                    interFace2ZoneID_mir[count] = Gridindex;
+                    interFace2InterFaceID_mir[count] = count;
+                    interFace2BoundaryFace_mir[count] = iFace;*/
+
+                    //iInterfae ++;
+                    count ++;
+                    continue;
+                }
+
+                PHWrite(gridinfo, &bctype, 1);
+                gridinfo->write_string(bcName);
+            }
+        }
+    }
+}
+
+}
diff --git a/API/PreProcess/src/Pre_GridTranslator.cpp b/API/PreProcess/src/Pre_GridTranslator.cpp
new file mode 100644
index 0000000..b767be1
--- /dev/null
+++ b/API/PreProcess/src/Pre_GridTranslator.cpp
@@ -0,0 +1,352 @@
+#include <cmath>
+#include "Pre_GridTranslator.h"
+#include "Pre_GridConversion.h"
+#include "MixGrid.h"
+#include "Task_WriteBinaryTecplot.h"
+#include "Geo_StructBC.h"
+#include "MultigridFactory.h"
+#include "PHIO.h"
+#include "IO_FileName.h"
+#include "TK_Exit.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+GridTranslator::GridTranslator()
+{
+    GlobalDataBase::GetData("codeOfOversetGrid", &isOverset, PHINT, 1);
+
+    gridGroup = new vector<StructGrid *>();
+
+    structFaceGroup = new vector<StructFace *>();
+}
+
+GridTranslator::GridTranslator(Grid **&strgrids, int &nBlocks)
+{
+    numberOfZones = nBlocks;
+
+    GlobalDataBase::GetData("codeOfOversetGrid", &isOverset, PHINT, 1);
+
+    gridGroup = new vector<StructGrid *>();
+    gridGroup->resize(nBlocks, NULL);
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        (*gridGroup)[iZone] = StructGridCast(strgrids[iZone]);
+    }
+
+    structFaceGroup = new vector<StructFace *>();
+}
+
+GridTranslator::~GridTranslator()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        delete (*structFaceGroup)[iZone];
+    }
+    delete structFaceGroup;    structFaceGroup = NULL;
+
+    delete gridGroup;
+    gridGroup = NULL;
+}
+
+void GridTranslator::Run()
+{
+    ProcessBoundaryCondition();
+
+    GenerateStructFaceGroup();
+
+    ColorateStructFaceGroup();
+
+    CollectInterfaceInformation();
+
+    OutputGrid();
+}
+
+void GridTranslator::ReadGridgenFiles()
+{
+}
+
+void GridTranslator::ReadGridgenCoordinateFile()
+{
+}
+
+void GridTranslator::ReadGridgenBoundaryFile()
+{
+}
+
+void GridTranslator::ProcessBoundaryCondition()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        StructBCSet *structBCSet = (*gridGroup)[iZone]->GetStructBCSet();
+        
+        structBCSet->ProcessBCInfo();
+    }
+}
+
+void GridTranslator::GenerateStructFaceGroup()
+{
+    structFaceGroup->resize(numberOfZones, NULL);
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        (*structFaceGroup)[iZone] = new StructFace((*gridGroup)[iZone]);
+    }
+}
+
+void GridTranslator::ColorateStructFaceGroup()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        
+        StructFace *structFace = (*structFaceGroup)[iZone];
+        structFace->SetStructFaceGroup(this->structFaceGroup);
+        structFace->PaintSelf();
+    }
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        StructFace *structFace = (*structFaceGroup)[iZone];
+        structFace->PaintNeighbor();
+    }
+}
+
+void GridTranslator::CollectInterfaceInformation()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        cout << "iZone = " << iZone << endl;
+
+        int numberOfInterfaces = (*structFaceGroup)[iZone]->ComputeNumberOfInterfaces();
+
+        cout << " numberOfInterfaces = " << numberOfInterfaces << endl;
+
+        StructGrid *structuredGrid = (*gridGroup)[iZone];
+
+        structuredGrid->SetNIFace(numberOfInterfaces);
+
+        if (numberOfInterfaces == 0)
+        {
+            structuredGrid->SetInterfaceInfo(NULL);
+        }
+        else
+        {
+            structuredGrid->SetInterfaceInfo(new InterfaceInfo(numberOfInterfaces));
+        }
+
+        InterfaceInfo *interfaceInfo = structuredGrid->GetInterfaceInfo();
+
+        (*structFaceGroup)[iZone]->CollectInterfaceInformation(interfaceInfo);
+    }
+}
+
+void GridTranslator::OutputGrid()
+{
+    string out_gfile = "grid.fts";
+    int tasktype = GetTaskCode();
+    int numberOfMultifile = PHSPACE::GlobalDataBase::GetIntParaFromDB("numberOfMultifile");
+    if (tasktype == PHSPACE::PARTITION_GRID)
+    {
+        GlobalDataBase::GetData("partition_grid_file", &out_gfile, PHSTRING, 1);
+    }
+    else if (tasktype == PHSPACE::CREATE_GRID)
+    {
+        GlobalDataBase::GetData("out_gfile", &out_gfile, PHSTRING, 1);
+    }
+
+    Grid **grids = new Grid *[numberOfZones];
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        grids[iZone] = (*gridGroup)[iZone];
+    }
+
+    if (tasktype == PHSPACE::PARTITION_GRID && numberOfMultifile > 1)
+    {
+        int maximumProcess = PHSPACE::GlobalDataBase::GetIntParaFromDB("maxproc");
+        
+        if (maximumProcess < numberOfMultifile)
+        {
+            ostringstream oss;
+            oss << " Error: the numberOfMultifile's value is larger than maximumProcess's value "<< endl;
+            TK_Exit::ExceptionExit(oss.str());
+        }
+        else if(maximumProcess % numberOfMultifile != 0)
+        {
+            ostringstream oss;
+            oss << " Error: the maximumProcess's value is not an integral multiple of numberOfMultifile's value "<< endl;
+            TK_Exit::ExceptionExit(oss.str());
+        }
+
+        int procNumberOfEachfile = maximumProcess / numberOfMultifile;
+        for (int iFile = 0; iFile < numberOfMultifile; ++iFile)
+        {
+            vector < Grid*> tempGrids;
+            tempGrids.resize(0);
+
+            for (int iZone = 0; iZone < numberOfZones; ++iZone)
+            {
+                int procIndex = grids[iZone]->GetGridID()->GetIndex();
+                int* block_proc_inp = PHMPI::GetZoneProcessorID_INP();
+                if (block_proc_inp)
+                {
+                    procIndex = block_proc_inp[iZone];
+                }
+
+                if ((procIndex / procNumberOfEachfile) == iFile)
+                {
+                    tempGrids.push_back(grids[iZone]);
+                }
+                else
+                {
+                    Grid* tempZero = 0;
+                    tempGrids.push_back(tempZero);
+                }
+            }
+
+            string out_gfile_temp = AddSymbolToFileName(out_gfile, "_", iFile);
+            DumpGrid(out_gfile_temp, &tempGrids[0], numberOfZones);
+        }
+
+    }
+    else
+    {
+        DumpGrid(out_gfile, grids, numberOfZones);
+    }
+}
+
+void GridTranslator::OutputMultiZoneComputationalGrids()
+{
+    fstream file;
+    int tasktype = GetTaskCode();
+    if (tasktype == PHSPACE::PARTITION_GRID)
+    {
+        string partition_grid_file = "grid.fts";
+        GlobalDataBase::GetData("partition_grid_file", &partition_grid_file, PHSTRING, 1);
+        OpenSerialFile(file, partition_grid_file, ios_base::out|ios_base::binary|ios_base::trunc);
+    }
+    else if (tasktype == PHSPACE::CREATE_GRID)
+    {
+        string out_gfile = "grid.fts";
+        GlobalDataBase::GetData("out_gfile", &out_gfile, PHSTRING, 1);
+        OpenSerialFile(file, out_gfile.c_str(), ios_base::out|ios_base::binary|ios_base::trunc);
+    }
+
+    using namespace PHMPI;
+
+    CreateZoneProcessorID(numberOfZones);
+    CreateZoneGridID(numberOfZones);
+    CreateZoneGridType(numberOfZones);
+
+    int *zoneProcessorIndexContainer = GetZoneProcessorID();
+    int *zoneIndexContainer = GetZoneGridID();
+    int *zoneTypeContainer  = GetZoneGridType();
+    int *block_proc_inp     = GetZoneProcessorID_INP();
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        zoneProcessorIndexContainer[iZone] = iZone;
+        zoneIndexContainer[iZone] = iZone;
+        zoneTypeContainer[iZone] = (*gridGroup)[iZone]->Type();
+    }
+
+    if (block_proc_inp)
+    {
+        for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+        {
+            SetZoneProcessorID(iZone, block_proc_inp[iZone]);
+        }
+    }
+
+    PHWrite(file, numberOfZones);
+    PHWrite(file, &zoneProcessorIndexContainer[0], numberOfZones);
+    PHWrite(file, &zoneIndexContainer[0], numberOfZones);
+    PHWrite(file, &zoneTypeContainer[0], numberOfZones);
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        (*gridGroup)[iZone]->WriteGrid(file);
+    }
+
+    CloseFile(file);
+}
+
+void GridTranslator::CheckGrid()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        StructGrid *grid = StructGridCast((*gridGroup)[iZone]);
+        InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+
+        int nIFace = 0;
+        if (interfaceInfo)
+        {
+            nIFace = interfaceInfo->GetNIFace();
+        }
+
+        if (nIFace == 0) continue;
+
+        int *interFace2ZoneID      = interfaceInfo->GetInterFace2ZoneID();
+        int *interFace2InterFaceID = interfaceInfo->GetInterFace2InterFaceID();
+
+        int target_zone, itface;
+        int is, js, ks, nsurf, s_lr, it, jt, kt, t_lr;
+        RDouble s_xfc, s_yfc, s_zfc, t_xfc, t_yfc, t_zfc;
+        int il1, jl1, kl1;
+  
+        for (int iFace = 0; iFace < nIFace; ++ iFace)
+        {
+            target_zone = interFace2ZoneID[iFace];
+            if (target_zone < iZone) continue;
+            
+            grid->GetSourceIndexIJK_Nsurf_LR(iFace, 1, is, js, ks, nsurf, s_lr);
+            if (s_lr == 1)
+            {
+                GetNsurfIndex(nsurf, il1, jl1, kl1);
+                is = is + il1;
+                js = js + jl1;
+                ks = ks + kl1;
+            }
+            grid->FaceCoor(is, js, ks, nsurf, s_xfc, s_yfc, s_zfc);
+
+            itface = interFace2InterFaceID[iFace];
+
+            if (target_zone == iZone)
+            {
+                grid->GetSourceIndexIJK_Nsurf_LR(itface, 1, it, jt, kt, nsurf, t_lr);
+                if (t_lr == 1)
+                {
+                    GetNsurfIndex(nsurf, il1, jl1, kl1);
+                    it = it + il1;
+                    jt = jt + jl1;
+                    kt = kt + kl1;
+                }
+                grid->FaceCoor(it, jt, kt, nsurf, t_xfc, t_yfc, t_zfc);
+            }
+            else
+            {
+                StructGrid *tgrid = StructGridCast((*gridGroup)[target_zone]);
+                tgrid->GetSourceIndexIJK_Nsurf_LR(itface, 1, it, jt, kt, nsurf, t_lr);
+                if (t_lr == 1)
+                {
+                    GetNsurfIndex(nsurf, il1, jl1, kl1);
+                    it = it + il1;
+                    jt = jt + jl1;
+                    kt = kt + kl1;
+                }
+                tgrid->FaceCoor(it, jt, kt, nsurf, t_xfc, t_yfc, t_zfc);
+            }
+            
+            if ((fabs(s_xfc - t_xfc) > 1.0e-8) || (fabs(s_yfc - t_yfc) > 1.0e-8) || (fabs(s_zfc - t_zfc) > 1.0e-8))
+            {
+                TK_Exit::ExceptionExit(" Grid Link Error! ");
+            }
+        }
+    }
+}
+
+}
+
+
diff --git a/API/PreProcess/src/Pre_HDF5File.cpp b/API/PreProcess/src/Pre_HDF5File.cpp
new file mode 100644
index 0000000..6058b7f
--- /dev/null
+++ b/API/PreProcess/src/Pre_HDF5File.cpp
@@ -0,0 +1,2279 @@
+#include "Pre_HDF5File.h"
+#include "Math_BasisFunction.h"
+#include "Glb_Dimension.h"
+#include "IO_FileName.h"
+#include "Zone.h"
+#include "GridType.h"
+#include "Geo_UnstructBC.h"
+#include "PHIO.h"
+#include "TK_Log.h"
+#include "GlobalDataBase.h"
+#include "TK_Parse.h"
+
+namespace PHSPACE
+{
+using namespace PHMPI;
+
+IO_HDF5Write::IO_HDF5Write(const string &gridFileName, Grid **grids, int nBlocks)
+{
+    this->gridFileName = gridFileName;
+    this->grids = grids;
+    this->nBlocks = nBlocks;
+
+    gridsLocal = 0;
+    nPartOfEachProcessor = 0;
+
+    block_proc = 0;
+    block_idx  = 0;
+    block_type = 0;
+    file_index = 0;
+}
+
+IO_HDF5Write::~IO_HDF5Write()
+{
+    if (gridsLocal)
+    {
+        delete [] gridsLocal;
+        delete [] nPartOfEachProcessor;
+    }
+
+    if (block_proc)
+    {
+        delete [] block_proc;
+        delete [] block_idx;
+        delete [] block_type;
+        delete [] file_index;
+    }
+}
+
+hid_t IO_HDF5Write::CreateFile(const string &filename)
+{
+    hid_t file;
+    file = H5Fcreate(filename.c_str(), H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT);
+
+    return file;
+}
+
+void IO_HDF5Write::Run()
+{
+    hid_t file;
+    int tasktype = GetTaskCode();
+    int numberOfMultifile = PHSPACE::GlobalDataBase::GetIntParaFromDB("numberOfMultifile");
+    CreateTotalInfo();
+
+    int myid = PHMPI::GetCurrentProcessorID();
+    if (tasktype == PHSPACE::PARTITION_GRID && numberOfMultifile > 1)
+    {
+        file = CreateFile(gridFileName);
+    }
+    else
+    {
+        file = CreateFile(AddSymbolToFileName(gridFileName, "_", myid));
+    }
+
+    WriteVersionInfo(file);
+    WriteTotalInfo(file);
+
+    int nBlocksLocal = nPartOfEachProcessor[myid];
+    for (int iZone = 0; iZone < nBlocksLocal; ++ iZone)
+    {
+        ostringstream oss;
+        oss << "      Dumping zone " << iZone << " ....\n";
+        PrintToWindow(oss);
+
+        if (block_type[iZone] == STRUCTGRID)
+        {
+            WriteStructGrid(file, gridsLocal[iZone]);
+        }
+        else
+        {
+            WriteUnstructGrid(file, gridsLocal[iZone], iZone);
+        }
+    }
+
+    H5Fclose(file);
+}
+
+void IO_HDF5Write::WriteVersionInfo(hid_t loc_id)
+{
+    hid_t grpData;
+
+    grpData = GetGroup(loc_id, "Version");
+
+    RDouble Version = 2.0;
+    CreateAndWriteData(grpData, "VersionData", 1, 1, PHDOUBLE, &Version);
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Write::CreateTotalInfo()
+{
+    int nBlocksLocal = 0;
+
+    for (int iBlock = 0; iBlock < nBlocks; ++ iBlock)
+    {
+        if (grids[iBlock])
+        {
+            ++ nBlocksLocal;
+        }
+    }
+
+    gridsLocal = new Grid *[nBlocksLocal]();
+
+    nBlocksLocal = 0;
+    for (int iBlock = 0; iBlock < nBlocks; ++ iBlock)
+    {
+        if (grids[iBlock])
+        {
+            gridsLocal[nBlocksLocal] = grids[iBlock];
+            ++ nBlocksLocal;
+        }
+    }
+
+    int nProc = PHMPI::GetNumberOfProcessor();
+    int myid  = PHMPI::GetCurrentProcessorID();
+
+    nPartOfEachProcessor = new int[nProc]();
+    PH_AllGather(&nBlocksLocal, 1, nPartOfEachProcessor, 1);
+
+    block_proc = new int[nBlocksLocal]();
+    block_idx  = new int[nBlocksLocal]();
+    block_type = new int[nBlocksLocal]();
+    file_index = new int[nBlocksLocal]();
+
+    int count = 0;
+    for (int iProc = 0; iProc < myid; ++ iProc)
+    {
+        count += nPartOfEachProcessor[iProc];
+    }
+
+    for (int iBlock = 0; iBlock < nBlocksLocal; ++ iBlock)
+    {
+        block_proc[iBlock] = gridsLocal[iBlock]->GetGridID()->GetIndex();
+
+        block_idx [iBlock] = gridsLocal[iBlock]->GetGridID()->GetIndex();
+        if (GlobalDataBase::GetIntParaFromDB("parallelPartitionMethod") == 1)
+        {
+            block_idx [iBlock] = iBlock + count;
+        }
+
+        block_type[iBlock] = gridsLocal[iBlock]->Type();
+        file_index[iBlock] = gridsLocal[iBlock]->GetFileIndex();
+    }
+
+    int *block_proc_inp = GetZoneProcessorID_INP();
+    if (block_proc_inp)
+    {
+        count = 0;
+        for (int iBlock = 0; iBlock < nBlocks; ++ iBlock)
+        {
+            if (grids[iBlock])
+            {
+                block_proc[count] = block_proc_inp[iBlock];
+                count++;
+            }
+        }
+    }
+
+    /*if(parallelPartitionMethod == METIS_OPENMP_METHOD)
+    {
+        // For OpenMP case, reset the processor ID of sub-zone to the source grid's.
+        int zoneID = gridSource->GetGridID()->GetIndex();
+        int processorID = PHMPI::GetZoneProcessorID(zoneID);
+        for (int iZone = 0; iZone < nBlocks; ++ iZone)
+        {
+            block_proc[iZone] = processorID;     
+        }
+    }*/
+}
+
+void IO_HDF5Write::WriteTotalInfo(hid_t loc_id)
+{
+    hid_t grpData;
+    grpData = GetGroup(loc_id, "Information");
+
+    int myid = PHMPI::GetCurrentProcessorID();
+    int nBlocksLocal = nPartOfEachProcessor[myid];
+
+    CreateAndWriteData(grpData, "nBlocks"   , 1, 1           , PHINT, &nBlocksLocal);
+    CreateAndWriteData(grpData, "block_proc", 1, nBlocksLocal, PHINT, block_proc);
+    CreateAndWriteData(grpData, "block_idx" , 1, nBlocksLocal, PHINT, block_idx);
+    CreateAndWriteData(grpData, "block_type", 1, nBlocksLocal, PHINT, block_type);
+    CreateAndWriteData(grpData, "file_index", 1, nBlocksLocal, PHINT, file_index);
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Write::WriteUnstructGrid(hid_t loc_id, Grid *gridIn, int iZone)
+{
+    hid_t grpData;
+    string grpName;
+
+    ostringstream oss;
+    int gridID = block_idx[iZone];
+    oss << "Grid-" << gridID;
+    grpName = oss.str();
+    grpData = GetGroup(loc_id, grpName);
+
+    int iDimensions[3];
+    iDimensions[0] = gridIn->GetNTotalNode();
+    iDimensions[1] = gridIn->GetNTotalFace();
+    iDimensions[2] = gridIn->GetNTotalCell();
+    CreateAndWriteData(grpData, "iDimensions", 1, 3, PHINT, iDimensions);
+
+    WriteGridCoordinates(grpData, gridIn);
+
+    WriteFaceTopology(grpData, gridIn);
+
+    WriteInterfaceInfo(grpData, gridIn);
+
+    WriteCellTopology(grpData, gridIn);
+
+    WriteUnstrBCName(grpData, gridIn);
+
+    WriteInterpointInfo(grpData, gridIn);
+
+    WriteUnstrPartitionInfo(grpData, gridIn);
+
+    WriteVolumeCondition(grpData, gridIn);
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Write::WriteInterpointInfo(hid_t loc_id, Grid *gridIn)
+{
+    hid_t grpData;
+    grpData = GetGroup(loc_id, "InterpointInfo");
+
+    int nIPoint = 0;
+    InterpointInformation *interpointInfo = gridIn->GetInterpointInfo();
+    if (!interpointInfo)
+    {
+        CreateAndWriteData(grpData, "nIPoint", 1, 1, PHINT, &nIPoint);
+        H5Gclose(grpData);
+        return;
+    }
+
+    nIPoint = interpointInfo->GetNumberOfInterpoints();
+    CreateAndWriteData(grpData, "nIPoint", 1, 1, PHINT, &nIPoint);
+
+    int *interPoint2ZoneID       = interpointInfo->GetInterPoint2ZoneID();
+    int *interPoint2InterPointID = interpointInfo->GetInterPoint2InterPointID();
+    int *interPoint2GlobalPoint  = interpointInfo->GetInterPoint2GlobalPoint();
+    int *cellNumberOfInterPoint  = interpointInfo->GetCellNumberOfInterPoint();
+    int *totalZonesOfInterPoint  = interpointInfo->GetTotalZonesOfInterPoint();
+    int *labelOfInterPoint       = interpointInfo->GetLabelOfInterPoint();
+
+    CreateAndWriteData(grpData, "interPoint2ZoneID"      , 1, nIPoint, PHINT, interPoint2ZoneID);
+    CreateAndWriteData(grpData, "interPoint2InterPointID", 1, nIPoint, PHINT, interPoint2InterPointID);
+    CreateAndWriteData(grpData, "interPoint2GlobalPoint" , 1, nIPoint, PHINT, interPoint2GlobalPoint);
+    CreateAndWriteData(grpData, "cellNumberOfInterPoint" , 1, nIPoint, PHINT, cellNumberOfInterPoint);
+    CreateAndWriteData(grpData, "totalZonesOfInterPoint" , 1, nIPoint, PHINT, totalZonesOfInterPoint);
+    CreateAndWriteData(grpData, "labelOfInterPoint"      , 1, nIPoint, PHINT, labelOfInterPoint);
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Write::WriteStructGrid(hid_t loc_id, Grid *gridIn)
+{
+    hid_t grpData;
+    string grpName;
+
+    ostringstream oss;
+    int gridID = gridIn->GetZoneID();
+    oss << "Grid-" << gridID;
+    grpName = oss.str();
+    grpData = GetGroup(loc_id, grpName);
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int iDimensions[3];
+    iDimensions[0] = grid->GetNI();
+    iDimensions[1] = grid->GetNJ();
+    iDimensions[2] = grid->GetNK();
+    CreateAndWriteData(grpData, "iDimensions", 1, 3, PHINT, iDimensions);
+
+    WriteGridCoordinates(grpData, gridIn);
+    WriteBCRegion(grpData, gridIn);
+    WriteInterfaceInfo(grpData, gridIn);
+    WriteStrBCName(grpData, gridIn);
+    WriteLnkInfo(grpData, gridIn);
+    WriteStrPartitionInfo(grpData, gridIn);
+    WriteVolumeCondition(grpData, gridIn);
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Write::WriteGridCoordinates(hid_t loc_id, Grid *gridIn)
+{
+    hid_t grpData;
+
+    grpData = GetGroup(loc_id, "GridCoordinates");
+
+    RDouble *x = gridIn->GetX();
+    RDouble *y = gridIn->GetY();
+    RDouble *z = gridIn->GetZ();
+    int nTotalNode = gridIn->GetNTotalNode();
+
+    gridIn->RotateAboutAxis();
+
+    CreateAndWriteData(grpData, "CoordinateX", 1, nTotalNode, PHDOUBLE, x);
+    CreateAndWriteData(grpData, "CoordinateY", 1, nTotalNode, PHDOUBLE, y);
+    CreateAndWriteData(grpData, "CoordinateZ", 1, nTotalNode, PHDOUBLE, z);
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Write::WriteFaceTopology(hid_t loc_id, Grid *gridIn)
+{
+    hid_t grpData;
+
+    grpData = GetGroup(loc_id, "FaceTopology");
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nTotalFace = grid->GetNTotalFace();
+    int *nodeNumberOfEachFace = grid->GetNodeNumberOfEachFace();
+
+    long long int faceCount = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        faceCount += nodeNumberOfEachFace[iFace];
+    }
+
+    int *face2Node = grid->GetFace2Node();
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    int *nodePosi = new int[nTotalFace + 1];
+    int nodeSum = 0;
+    nodePosi[0] = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        nodeSum += nodeNumberOfEachFace[iFace];
+        nodePosi[iFace+1] = nodeSum;
+    }
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        if (leftCellOfFace[iFace] < 0)
+        {
+            std::reverse(face2Node + nodePosi[iFace], face2Node + nodePosi[iFace+1]);
+            SWAP(leftCellOfFace[iFace], rightCellOfFace[iFace]);
+        }
+    }
+    delete []nodePosi;
+
+    CreateAndWriteData(grpData, "nodeNumberOfEachFace", 1, nTotalFace, PHINT, nodeNumberOfEachFace);
+    CreateAndWriteData(grpData, "face2Node"           , 1, faceCount , PHINT, face2Node);
+    CreateAndWriteData(grpData, "leftCellOfFace"      , 1, nTotalFace, PHINT, leftCellOfFace);
+    CreateAndWriteData(grpData, "rightCellOfFace"     , 1, nTotalFace, PHINT, rightCellOfFace);
+
+    int nBoundFace = grid->GetNBoundFace();
+    CreateAndWriteData(grpData, "nBoundFace", 1, 1, PHINT, &nBoundFace);
+
+    UnstructBCSet **bcr = grid->GetBCRecord();
+
+    int *tmpBcType = new int[nBoundFace];
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        tmpBcType[iFace] = bcr[iFace]->GetKey();
+    }
+    CreateAndWriteData(grpData, "BcType", 1, nBoundFace, PHINT, tmpBcType);
+
+    delete [] tmpBcType;
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Write::WriteCellTopology(hid_t loc_id, Grid *gridIn)
+{
+    hid_t grpData;
+    grpData = GetGroup(loc_id, "CellTopology");
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nTotalCell = grid->GetNTotalCell();
+    int *nodeNumberOfEachCell = grid->GetNodeNumberOfEachCell();
+    CreateAndWriteData(grpData, "nodeNumberOfEachCell", 1, nTotalCell, PHINT, nodeNumberOfEachCell);
+
+    int *cell2Node = grid->GetCell2Node();
+    long long int nodeCount = 0;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        nodeCount += nodeNumberOfEachCell[iCell];
+    }
+    CreateAndWriteData(grpData, "cell2Node", 1, nodeCount, PHINT, cell2Node);
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Write::WriteUnstrBCName(hid_t loc_id, Grid *gridIn)
+{
+    hid_t grpData;
+
+    grpData = GetGroup(loc_id, "BCName");
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nBoundFace = grid->GetNBoundFace();
+    string *bcNameList = new string[nBoundFace];
+
+    uint_long totalSize = 0;
+   
+    UnstructBCSet **bcr = grid->GetBCRecord();
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        const string &bcName = bcr[iFace]->GetBCName();
+        bcNameList[iFace] = bcName;
+
+        totalSize += static_cast< uint_long > (bcName.size());
+        totalSize += 1;
+    }
+
+    char *bcNameChar = new char[totalSize];
+    unsigned int count = 0;
+    for (int iFace = 0; iFace < nBoundFace; iFace ++)
+    {
+        string &bcName = bcNameList[iFace];
+        streamsize nameSize = bcName.size();
+        for (unsigned int iChar = 0; iChar < nameSize; ++ iChar)
+        {
+            bcNameChar[count ++] = bcName[iChar];
+        }
+        bcNameChar[count ++] = '\0';
+    }
+
+    CreateAndWriteData(grpData, "BCName", 1, totalSize, PHSTRING, bcNameChar);
+
+    delete [] bcNameList;
+    delete [] bcNameChar;
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Write::WriteBCRegion(hid_t loc_id, Grid *gridIn)
+{
+    hid_t grpData;
+    int iMin, iMax, jMin, jMax, kMin, kMax, bcType;
+    int sLr, sNd;
+
+    grpData = GetGroup(loc_id, "BCRegion");
+
+    StructGrid *grid = StructGridCast(gridIn);
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+
+    int nBCRegion = structBCSet->GetnBCRegion();
+    CreateAndWriteData(grpData, "nBCRegion", 1, 1, PHINT, &nBCRegion);
+
+    int nBCTotal = nBCRegion;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        bcType = bcregion->GetBCType();
+        if (bcType == -1)
+        {
+            nBCTotal ++;
+        }
+    }
+
+    int **BCInfor = NewPointer2<int>(nBCTotal, 9);
+    int iBCinfo = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        int index = 0;
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        bcregion->GetIJKRegion(iMin, iMax, jMin, jMax, kMin, kMax);
+        bcType = bcregion->GetBCType();
+        sLr = bcregion->GetFaceLeftOrRightIndex();
+        sNd = bcregion->GetFaceDirection();
+
+        BCInfor[iBCinfo][index++] = iMin;
+        BCInfor[iBCinfo][index++] = iMax;
+        BCInfor[iBCinfo][index++] = jMin;
+        BCInfor[iBCinfo][index++] = jMax;
+        BCInfor[iBCinfo][index++] = kMin;
+        BCInfor[iBCinfo][index++] = kMax;
+        BCInfor[iBCinfo][index++] = bcType;
+        BCInfor[iBCinfo][index++] = sLr;
+        BCInfor[iBCinfo][index++] = sNd;
+        iBCinfo ++;
+
+        if (bcType == -1)
+        {
+            index = 0;
+            int *t_st = bcregion->GetTargetStart();
+            int *t_ed = bcregion->GetTargetEnd();
+            int neighborZoneIndex = bcregion->GetTargetRegionBlock();
+
+            BCInfor[iBCinfo][index++] = t_st[0];
+            BCInfor[iBCinfo][index++] = t_ed[0];
+            BCInfor[iBCinfo][index++] = t_st[1];
+            BCInfor[iBCinfo][index++] = t_ed[1];
+            BCInfor[iBCinfo][index++] = t_st[2];
+            BCInfor[iBCinfo][index++] = t_ed[2];
+            BCInfor[iBCinfo][index++] = neighborZoneIndex;
+            BCInfor[iBCinfo][index++] = 0;
+            BCInfor[iBCinfo][index++] = 0;
+            iBCinfo ++;
+        }
+    }
+
+    CreateAndWriteData(grpData, "BCInfor", nBCTotal, 9, PHINT, BCInfor[0]);
+    DelPointer2(BCInfor);
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Write::WriteStrBCName(hid_t loc_id, Grid *gridIn)
+{
+     hid_t grpData;
+
+    grpData = GetGroup(loc_id, "BCName");
+
+    string boundaryName[100] = {"NO_BOUNDARY_CONDITION", "EXTRAPOLATION", "SOLID_SURFACE", "SYMMETRY", 
+                            "FARFIELD", "INFLOW", "OUTFLOW", "POLE", "Wall_8", "Wall_9", "Wall_10", "Wall_11", 
+                            "Wall_12", "Wall_13", "Wall_14", "Wall_15", "Wall_16", "Wall_17", "Wall_18", "Wall_19",
+                            "Wall_20", "Wall_21", "Wall_22", "Wall_23", "Wall_24", "Wall_25", "Wall_26", "Wall_27", 
+                            "Wall_28", "Wall_29", "Wall_30", "Wall_31", "Wall_32", "Wall_33", "Wall_34", "Wall_35",
+                            "Wall_36", "Wall_37", "Wall_38", "Wall_39", "Wall_40", "Wall_41", "Wall_42", "Wall_43",
+                            "Wall_44", "Wall_45", "Wall_46", "Wall_47", "Wall_48", "Wall_49", "Wall_50"};
+    boundaryName[52] = "PRESSURE_INLET";
+    boundaryName[62] = "PRESSURE_OUTLET";
+    boundaryName[71] = "POLE1";
+    boundaryName[72] = "POLE2";
+    boundaryName[73] = "POLE3";
+
+    StructGrid *grid = StructGridCast(gridIn);
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+
+    int nBCRegion = static_cast<int> (structBCSet->GetnBCRegion());
+    string *bcNameList = new string[nBCRegion];
+    uint_long totalSize = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion ++)
+    {
+        StructBC *bcRegion = structBCSet->GetBCRegion(iBCRegion);
+
+        string bcName = bcRegion->GetBCName();
+        int bctype = bcRegion->GetBCType();
+        if (bcName == "")
+        {
+            if (bctype == -1)
+            {
+                bcName = "Connection";
+            }
+            else
+            {
+                bcName = boundaryName[bctype];
+                if ((bctype > 7) && (bctype < 51))
+                {
+                    bctype = 2;
+                    bcRegion->SetBCType(bctype);
+                }
+            }
+            bcRegion->SetBCName(bcName);
+        }
+        bcNameList[iBCRegion] = bcName;
+
+        totalSize += static_cast< uint_long > (bcNameList[iBCRegion].size());
+        totalSize += 1;
+    }
+
+    char *bcNameChar = new char[totalSize];
+    unsigned int count = 0;
+    for (int boco = 0; boco < nBCRegion; ++ boco)
+    {
+        string &bcName = bcNameList[boco];
+        streamsize nameSize = bcName.size();
+        for (unsigned int iChar = 0; iChar < nameSize; ++ iChar)
+        {
+            bcNameChar[count ++] = bcName[iChar];
+        }
+        bcNameChar[count ++] = '\0';
+    }
+
+    CreateAndWriteData(grpData, "BCName", 1, totalSize, PHSTRING, bcNameChar);
+
+    delete [] bcNameChar;
+    delete [] bcNameList;
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Write::WriteVolumeCondition(hid_t loc_id, Grid *gridIn)
+{
+    SimpleVC *volumeCondition = gridIn->GetVolumeConditionIn();
+    if (!volumeCondition)
+    {
+        return;
+    }
+
+    hid_t grpData;
+    grpData = GetGroup(loc_id, "VolumeCondition");
+
+    string vcName = volumeCondition->GetVCName();
+    uint_long nameSize = vcName.size() + 1;
+
+    char *vcNameChar = new char[nameSize];
+    for (unsigned int iChar = 0; iChar < nameSize - 1; ++ iChar)
+    {
+        vcNameChar[iChar] = vcName[iChar];
+    }
+    vcNameChar[nameSize - 1] = '\0';
+
+    CreateAndWriteData(grpData, "VCName", 1, nameSize, PHSTRING, vcNameChar);
+    delete []vcNameChar;
+
+    int vcType = volumeCondition->GetVCType();
+    CreateAndWriteData(grpData, "VCType", 1, 1, PHINT, &vcType);
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Write::WriteInterfaceInfo(hid_t loc_id, Grid *gridIn)
+{
+    hid_t grpData;
+
+    grpData = GetGroup(loc_id, "InterfaceInfo");
+
+    InterfaceInfo *interfaceInfo = gridIn->GetInterfaceInfo();
+
+    int nIFace = 0;
+    if (interfaceInfo)
+    {
+        nIFace = interfaceInfo->GetNIFace();
+    }
+    CreateAndWriteData(grpData, "nIFace", 1, 1, PHINT, &nIFace);
+
+    if (nIFace)
+    {
+        int *interFace2ZoneID       = interfaceInfo->GetInterFace2ZoneID();
+        int *interFace2InterFaceID  = interfaceInfo->GetInterFace2InterFaceID();
+        int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+
+        CreateAndWriteData(grpData, "interFace2ZoneID"      , 1, nIFace, PHINT, interFace2ZoneID);
+        CreateAndWriteData(grpData, "interFace2InterFaceID" , 1, nIFace, PHINT, interFace2InterFaceID);
+        CreateAndWriteData(grpData, "interFace2BoundaryFace", 1, nIFace, PHINT, interFace2BoundaryFace);
+    }
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Write::WriteLnkInfo(hid_t loc_id, Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+
+    int nBCLnkTotal = 0;
+    int nBCRegion = structBCSet->GetnBCRegion();
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion ++)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+        int bctype = structBC->GetBCType();
+        string bcName = structBC->GetBCName();
+        if (bctype == PHENGLEI::INTERFACE && !(bcName == "Periodic_up" || bcName == "Periodic_down"))
+        {
+            nBCLnkTotal ++;
+        }
+    }
+
+    if (!nBCLnkTotal)
+    {
+        return;
+    }
+
+    hid_t grpData;
+    grpData = GetGroup(loc_id, "LnkInfo");
+
+    int **LnkInfor = NewPointer2<int>(nBCLnkTotal * 2, 7);
+    int iLnkinfo = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion ++)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+        int bctype = structBC->GetBCType();
+        string bcName = structBC->GetBCName();
+        if (!IsInterface(bctype) || bcName == "Periodic_up" || bcName == "Periodic_down") continue;
+
+        int index = 0;
+        int icount = 0;
+        int nbt = structBC->GetTargetRegionBlock() + 1;
+        int *lnkInfo = structBC->GetInkInfo();
+
+        LnkInfor[iLnkinfo][index++] = lnkInfo[icount++];
+        LnkInfor[iLnkinfo][index++] = lnkInfo[icount++];
+        LnkInfor[iLnkinfo][index++] = lnkInfo[icount++];
+        LnkInfor[iLnkinfo][index++] = lnkInfo[icount++];
+        LnkInfor[iLnkinfo][index++] = lnkInfo[icount++];
+        LnkInfor[iLnkinfo][index++] = lnkInfo[icount++];
+        LnkInfor[iLnkinfo][index++] = bctype;
+
+        iLnkinfo ++;
+        index = 0;
+
+        LnkInfor[iLnkinfo][index++] = lnkInfo[icount++];
+        LnkInfor[iLnkinfo][index++] = lnkInfo[icount++];
+        LnkInfor[iLnkinfo][index++] = lnkInfo[icount++];
+        LnkInfor[iLnkinfo][index++] = lnkInfo[icount++];
+        LnkInfor[iLnkinfo][index++] = lnkInfo[icount++];
+        LnkInfor[iLnkinfo][index++] = lnkInfo[icount++];
+        LnkInfor[iLnkinfo][index++] = nbt;
+
+        iLnkinfo ++;
+    }
+
+    CreateAndWriteData(grpData, "LnkInfor", nBCLnkTotal * 2, 7, PHINT, LnkInfor[0]);
+    DelPointer2(LnkInfor);
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Write::WriteStrPartitionInfo(hid_t loc_id, Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ordinaryGridIndex = grid->GetOrdinaryGridIndex();
+    if (ordinaryGridIndex == -1)
+    {
+        return;
+    }
+
+    hid_t grpData;
+    grpData = GetGroup(loc_id, "PartitionInfo");
+
+    int *ordinaryDimStartIndex = grid->GetOrdinaryDimStartIndex();
+    int *ordinaryDimEndIndex   = grid->GetOrdinaryDimEndIndex();
+
+    CreateAndWriteData(grpData, "OrdinaryGrid"    , 1, 1, PHINT, &ordinaryGridIndex);
+    CreateAndWriteData(grpData, "OrdinaryDimStart", 1, 3, PHINT, ordinaryDimStartIndex);
+    CreateAndWriteData(grpData, "OrdinaryDimEnd"  , 1, 3, PHINT, ordinaryDimEndIndex  );
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Write::WriteUnstrPartitionInfo(hid_t loc_id, Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int ordinaryGridIndex = grid->GetOrdinaryGridIndex();
+    if (ordinaryGridIndex == -1)
+    {
+        return;
+    }
+
+    hid_t grpData;
+    grpData = GetGroup(loc_id, "PartitionInfo");
+
+    int nTotalNode = grid->GetNTotalNode();
+    int nTotalFace = grid->GetNTotalFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int *ordinaryNodeIndex = grid->GetOrdinaryNodeIndex();
+    int *ordinaryFaceIndex = grid->GetOrdinaryFaceIndex();
+    int *ordinaryCellIndex = grid->GetOrdinaryCellIndex();
+
+    CreateAndWriteData(grpData, "OrdinaryGrid"     , 1, 1         , PHINT, &ordinaryGridIndex);
+    CreateAndWriteData(grpData, "OrdinaryNodeIndex", 1, nTotalNode, PHINT, ordinaryNodeIndex);
+    CreateAndWriteData(grpData, "OrdinaryFaceIndex", 1, nTotalFace, PHINT, ordinaryFaceIndex);
+    CreateAndWriteData(grpData, "OrdinaryCellIndex", 1, nTotalCell, PHINT, ordinaryCellIndex);
+
+    H5Gclose(grpData);
+}
+
+IO_HDF5Read::IO_HDF5Read(PHVectorString1D &gridNameListIn, Region *region_in)
+{
+    this->gridNameList = gridNameListIn;
+    this->region = region_in;
+
+    this->numberOfGridGroups = gridNameList.size();
+    this->grids.resize(0);
+    this->myProcID = PHMPI::GetCurrentProcessorID();
+    this->serverProcID = 0;
+    this->zoneStart = 0;
+    this->presentGridGroup = 0;
+    this->fileID = -1;
+    this->isFileProcessor = false;
+    this->taskType = GetTaskCode();
+    this->isP2PMode = false;
+
+    blockProcDump = 0;
+    numberOfZones = 0;
+    blockProc     = 0;
+    blockType     = 0;
+    blockIdx      = 0;
+    blockProcGrid = 0;
+    blockFileProc = 0;
+    nZonesList.resize(numberOfGridGroups);
+    localGridNameList.resize(numberOfGridGroups);
+    version = 0.0;
+    globalFileNumber = 0;
+}
+
+IO_HDF5Read::~IO_HDF5Read()
+{
+    delete [] blockProcDump;
+    delete [] blockProc;
+    delete [] blockType;
+    delete [] blockIdx;
+    delete [] blockProcGrid;
+    delete [] blockFileProc;
+}
+
+void IO_HDF5Read::CheckNumberofFiles(int iGrid)
+{
+    string gridFileName = gridNameList[iGrid];
+
+    string gridfileProc = gridFileName;
+    gridfileProc = AddSymbolToFileName(gridfileProc, "_", myProcID);
+    bool fileExist = FileExist(gridfileProc);
+
+    int nFileProcessors = 0;
+    if (!fileExist)
+    {
+        if (myProcID == serverProcID)
+        {
+            // The server processor must be file processor.
+            TK_Exit::FileOpenErrorExit(gridfileProc);
+        }
+    }
+    else
+    {
+        nFileProcessors = 1;
+    }
+
+    PH_AllReduce(&nFileProcessors, &globalFileNumber, 1, MPI_SUM);
+
+    PHMPI::SetNumberofFiles(globalFileNumber);
+    WriteLogFile("Global grid files number: ", globalFileNumber);
+
+    nZonesList[iGrid].resize(globalFileNumber);
+
+    localGridNameList[iGrid].resize(0);
+    for (int iFile = 0; iFile < globalFileNumber; ++ iFile)
+    {
+        string gridfile = gridFileName;
+        gridfile = AddSymbolToFileName(gridfile, "_", iFile);
+        localGridNameList[iGrid].push_back(gridfile);
+    }
+
+    if (globalFileNumber > 1)
+    {
+        isP2PMode = true;
+    }
+}
+
+void IO_HDF5Read::InitGridFileNameListAndFileProcessor()
+{
+    for (int iGrid = 0; iGrid < numberOfGridGroups; ++ iGrid)
+    {
+        CheckNumberofFiles(iGrid);
+    }
+
+    if (PHMPI::GetNumberOfProcessor() % PHMPI::GetNumberofFiles() != 0)
+    {
+        ostringstream oss;
+        oss << "   ---- numberOfProcessor = " << PHMPI::GetNumberOfProcessor() << ", numberofFiles = " << PHMPI::GetNumberofFiles() << " ----\n" << "Abnormally Exit Program!!!\n";
+        TK_Exit::ExceptionExit(oss.str());
+    }
+
+    int fileProcessorInterval = PHMPI::GetIntervalofProcessorFiles();
+    isFileProcessor = (myProcID % fileProcessorInterval == 0);
+    //isFileProcessor = (myProcID % fileProcessorInterval == 0 && myProcID < globalFileNumber * fileProcessorInterval);
+
+    this->fileID = PHMPI::GetFileIndexofCurrentProcessor();
+}
+
+hid_t IO_HDF5Read::OpenH5File(const string &filename)
+{
+    hid_t file;
+
+    file = OpenHDF5File(AddSymbolToFileName(filename, "_", this->fileID));
+    return file;
+}
+
+bool IO_HDF5Read::Run()
+{
+    bool HDF5FileRead = false;
+
+    InitGridFileNameListAndFileProcessor();
+    ReadNumberOfZones();
+    ReadTotalInfo();
+    SetMixGridInfo();
+    RedistributeZonesIfNeed();
+    SetGlobalZoneLayout();
+    ClassifyGridSystem();
+    ReadEachGrid();
+    CreateZones();
+    ReadWallDist();
+
+    HDF5FileRead = true;
+    return HDF5FileRead;
+}
+
+void IO_HDF5Read::ReadWallDist()
+{
+    if (gridNameList.size() != 1)
+    {
+        return;
+    }
+
+    string WallDistFileName = ChangeExtensionOfFileName(gridNameList.front(), "wdt");
+
+    bool fileExist = true;
+    if (isFileProcessor)
+    {
+        fileExist = FileExist(AddSymbolToFileName(WallDistFileName, "_", this->fileID));
+    }
+
+    bool fileCheck = true;
+    PH_AllReduce(&fileExist, &fileCheck, 1, MPI_MIN);
+    if (!fileCheck)
+    {
+        return;
+    }
+
+    hid_t file;
+    int zoneCount = 0;
+
+    for (int iGrid = 0; iGrid < numberOfGridGroups; ++ iGrid)
+    {
+        for (int iFile = 0; iFile < localGridNameList[iGrid].size(); ++ iFile)
+        {
+            file = OpenHDF5File(ChangeExtensionOfFileName(localGridNameList[iGrid][iFile], "wdt"));
+            if (file < 0)
+            {
+                return;
+            }
+
+            for (int iZone = 0; iZone < nZonesList[iGrid][iFile]; ++ iZone)
+            {
+                int gridIndex = blockIdx[zoneCount ++];
+                if (myProcID != blockProc[gridIndex])
+                {
+                    continue;
+                }
+
+                ostringstream oss;
+                oss << "Grid-" << gridIndex;
+                string dataName = oss.str();
+
+                Grid *grid = GetGrid(gridIndex, 0);
+                grid->InitWallDist();
+
+                int nTotalCell = grid->GetNTotalCell();
+                double *walldist = new double[nTotalCell];
+                ReadData(file, walldist, dataName);
+
+                RDouble *wdt = new RDouble[nTotalCell];
+                for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+                {
+                    wdt[iCell] = static_cast<RDouble>(walldist[iCell]);
+                }
+                grid->ReadWalldist(wdt);
+
+                string nearestwallfacenormalxname = dataName + "_nwfnx";
+                string nearestwallfacenormalyname = dataName + "_nwfny";
+                string nearestwallfacenormalzname = dataName + "_nwfnz";
+                if (CheckDataExist(file, nearestwallfacenormalxname))
+                {
+                    double* nwfnx = new double[nTotalCell];
+                    ReadData(file, nwfnx, nearestwallfacenormalxname);
+
+                    RDouble* nearestwallfacenormalx = new RDouble[nTotalCell];
+                    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+                    {
+                        nearestwallfacenormalx[iCell] = static_cast<RDouble>(nwfnx[iCell]);
+                        //cout << nearestwallfacenormalx[iCell] << endl;
+                    }
+
+                    double* nwfny = new double[nTotalCell];
+                    ReadData(file, nwfny, nearestwallfacenormalyname);
+
+                    RDouble* nearestwallfacenormaly = new RDouble[nTotalCell];
+                    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+                    {
+                        nearestwallfacenormaly[iCell] = static_cast<RDouble>(nwfny[iCell]);
+                    }
+
+                    double* nwfnz = new double[nTotalCell];
+                    ReadData(file, nwfnz, nearestwallfacenormalzname);
+
+                    RDouble* nearestwallfacenormalz = new RDouble[nTotalCell];
+                    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+                    {
+                        nearestwallfacenormalz[iCell] = static_cast<RDouble>(nwfnz[iCell]);
+                    }
+
+                    grid->ReadNearestwallfacenormalx(nearestwallfacenormalx);
+                    grid->ReadNearestwallfacenormaly(nearestwallfacenormaly);
+                    grid->ReadNearestwallfacenormalz(nearestwallfacenormalz);
+
+                    delete[]nearestwallfacenormalx;
+                    delete[]nearestwallfacenormaly;
+                    delete[]nearestwallfacenormalz;
+
+                    delete[]nwfnx;
+                    delete[]nwfny;
+                    delete[]nwfnz;
+                }
+
+                delete [] walldist;
+                delete [] wdt;
+            }
+
+            H5Fclose(file);
+        }
+    }
+}
+
+void IO_HDF5Read::ReadVersionInfo(hid_t loc_id)
+{
+    hid_t grpData;
+
+    grpData = OpenGroup(loc_id, "Version");
+
+    ReadData(grpData, &this->version, "VersionData");
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Read::ReadNumberOfZones()
+{
+    hid_t file;
+
+    for (int iGrid = 0; iGrid < numberOfGridGroups; ++ iGrid)
+    {
+        for (int iFile = 0; iFile < globalFileNumber; ++ iFile)
+        {
+            file = OpenHDF5File(localGridNameList[iGrid][iFile]);
+            if (file < 0)
+            {
+                TK_Exit::ExceptionExit("Grid file can not open !");
+            }
+
+            hid_t grpData;
+            grpData = OpenGroup(file, "Information");
+
+            int nZones = 0;
+            ReadData(grpData, &nZones, "nBlocks");
+            numberOfZones += nZones;
+            nZonesList[iGrid][iFile] = nZones;
+
+            H5Gclose(grpData);
+            H5Fclose(file);
+        }
+    }
+
+    PHMPI::SetNumberOfGlobalZones   (numberOfZones);
+    PHMPI::CreateZoneProcessorIDDump(numberOfZones);
+    PHMPI::CreateZoneProcessorID    (numberOfZones);
+    PHMPI::CreateZoneGridID         (numberOfZones);
+    PHMPI::CreateZoneGridType       (numberOfZones);
+    PHMPI::CreateZoneFileID         (numberOfZones);
+
+    int numberOfProcessor = PHMPI::GetNumberOfProcessor();
+    if (numberOfZones < numberOfProcessor)
+    {
+        ostringstream oss;
+        oss << "   ---- numberOfProcessor = " << numberOfProcessor << ", numberOfTotalZones = " << numberOfZones << " ----\n" << "Abnormally Exit Program!!!\n";
+        TK_Exit::ExceptionExit(oss.str());
+    }
+}
+
+void IO_HDF5Read::ReadNumberOfZonesOld(hid_t loc_id)
+{
+    hid_t grpData;
+    grpData = OpenGroup(loc_id, "Information");
+
+    int *nZonesListTemp = new int[globalFileNumber];
+    SetField(nZonesListTemp, 0, globalFileNumber);
+
+    int nZones = 0;
+    if (isFileProcessor)
+    {
+        ReadData(grpData, &nZones, "nBlocks");
+        nZonesListTemp[fileID] = nZones;
+        //MPI_Allgather(&nZones, 1, MPI_INT, nZonesList, 1, MPI_INT, MPI_COMM_WORLD);
+    }
+
+    PH_AllReduce(&nZones, &numberOfZones, 1, MPI_SUM);
+    //PH_AllReduce(nZonesListTemp, nZonesList, globalFileNumber, MPI_SUM);
+    delete [] nZonesListTemp;
+
+    PHMPI::SetNumberOfGlobalZones   (numberOfZones);
+    PHMPI::CreateZoneProcessorIDDump(numberOfZones);
+    PHMPI::CreateZoneProcessorID    (numberOfZones);
+    PHMPI::CreateZoneGridID         (numberOfZones);
+    PHMPI::CreateZoneGridType       (numberOfZones);
+    PHMPI::CreateZoneFileID         (numberOfZones);
+
+    int numberOfProcessor = PHMPI::GetNumberOfProcessor();
+    if (numberOfZones < numberOfProcessor)
+    {
+        ostringstream oss;
+        oss << "   ---- numberOfProcessor = " << numberOfProcessor << ", numberOfTotalZones = " << numberOfZones << " ----\n" << "Abnormally Exit Program!!!\n";
+        TK_Exit::ExceptionExit(oss.str());
+    }
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Read::SetMixGridInfo()
+{
+    int nsimutask = GlobalDataBase::GetIntParaFromDB("nsimutask");
+    if (!(nsimutask == CREATE_GRID || nsimutask == GRIDCHECK_SOLVER))
+    {
+        return;
+    }
+
+    if (nsimutask == CREATE_GRID)
+    {
+        int gridObj = GlobalDataBase::GetIntParaFromDB("gridobj");
+        if (gridObj != PHSPACE::GRID_CONVERSION && gridObj != PHSPACE::GRID_STRTOUNS)
+        {
+            return;
+        }
+
+        int gridType = GlobalDataBase::GetIntParaFromDB("gridtype");
+        if (gridType != PHSPACE::MIXGRID && gridObj != PHSPACE::GRID_STRTOUNS)
+        {
+            return;
+        }
+    }
+
+    CreatetZoneProcessorID_INP(numberOfZones);
+    int *global_block_proc_inp = GetZoneProcessorID_INP();
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        global_block_proc_inp[iZone] = blockProc[iZone];
+    }
+}
+
+void IO_HDF5Read::ReadTotalInfo()
+{
+    blockProc     = new int[numberOfZones];
+    blockType     = new int[numberOfZones];
+    blockIdx      = new int[numberOfZones];
+    blockFileProc = new int[numberOfZones];
+
+    SetField(blockProc    , 0, numberOfZones);
+    SetField(blockType    , 0, numberOfZones);
+    SetField(blockIdx     , 0, numberOfZones);
+    SetField(blockFileProc, 0, numberOfZones);
+
+    int processorNumInEachFile = PHMPI::GetNumberOfProcessor() / PHMPI::GetNumberofFiles();
+
+    hid_t file;
+    int count = 0;
+
+    for (int iGrid = 0; iGrid < numberOfGridGroups; ++ iGrid)
+    {
+        for (int iFile = 0; iFile < globalFileNumber; ++ iFile)
+        {
+            file = OpenHDF5File(localGridNameList[iGrid][iFile]);
+
+            hid_t grpData;
+            grpData = OpenGroup(file, "Information");
+
+            int *blockProc_local = ReadIntOneRow(grpData, "block_proc");
+            int *blockIdx_local  = ReadIntOneRow(grpData, "block_idx");
+            int *blockType_local = ReadIntOneRow(grpData, "block_type");
+
+            for (int iZone = 0; iZone < nZonesList[iGrid][iFile]; ++ iZone)
+            {
+                blockProc[count + iZone] = blockProc_local[iZone];
+                blockType[count + iZone] = blockType_local[iZone];
+                blockIdx [count + iZone] = blockIdx_local [iZone];
+
+                blockFileProc[count + iZone] = processorNumInEachFile * iFile;
+            }
+            delete [] blockProc_local;
+            delete [] blockIdx_local ;
+            delete [] blockType_local;
+
+            count += nZonesList[iGrid][iFile];
+            H5Gclose(grpData);
+            H5Fclose(file);
+        }
+    }
+
+    blockProcDump = new int[numberOfZones];
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        blockProcDump[iZone] = blockProc[iZone];
+    }
+}
+
+void IO_HDF5Read::ReadTotalInfoOld(hid_t loc_id)
+{
+    hid_t grpData;
+    grpData = OpenGroup(loc_id, "Information");
+
+    int *blockProcTemp     = new int[numberOfZones];
+    int *blockTypeTemp     = new int[numberOfZones];
+    int *blockIdxTemp      = new int[numberOfZones];
+    int *blockFileProcTemp = new int[numberOfZones];
+
+    blockProc     = new int[numberOfZones];
+    blockType     = new int[numberOfZones];
+    blockIdx      = new int[numberOfZones];
+    blockFileProc = new int[numberOfZones];
+
+    SetField(blockProcTemp    , 0, numberOfZones);
+    SetField(blockTypeTemp    , 0, numberOfZones);
+    SetField(blockIdxTemp     , 0, numberOfZones);
+    SetField(blockFileProcTemp, 0, numberOfZones);
+
+    if (isFileProcessor)
+    {
+        int *blockProc_local = ReadIntOneRow(grpData, "block_proc");
+        int *blockIdx_local  = ReadIntOneRow(grpData, "block_idx");
+        int *blockType_local = ReadIntOneRow(grpData, "block_type");
+
+        int count = 0;
+        for (int ifile = 0; ifile < fileID; ++ ifile)
+        {
+            count += nZonesList[0][ifile];
+        }
+
+        int myid = PHMPI::GetCurrentProcessorID();
+        for (int iZone = 0; iZone < nZonesList[0][fileID]; ++ iZone)
+        {
+            blockProcTemp[count + iZone] = blockProc_local[iZone];
+            blockTypeTemp[count + iZone] = blockType_local[iZone];
+            blockIdxTemp [count + iZone] = blockIdx_local [iZone];
+
+            blockFileProcTemp[count + iZone] = myid;
+        }
+
+        delete [] blockProc_local;
+        delete [] blockIdx_local ;
+        delete [] blockType_local;
+    }
+
+    PH_AllReduce(blockProcTemp    , blockProc    , numberOfZones, MPI_SUM);
+    PH_AllReduce(blockIdxTemp     , blockIdx     , numberOfZones, MPI_SUM);
+    PH_AllReduce(blockTypeTemp    , blockType    , numberOfZones, MPI_SUM);
+    PH_AllReduce(blockFileProcTemp, blockFileProc, numberOfZones, MPI_SUM);
+
+    delete [] blockProcTemp;
+    delete [] blockIdxTemp ;
+    delete [] blockTypeTemp;
+    delete [] blockFileProcTemp;
+
+    blockProcDump = new int[numberOfZones];
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        blockProcDump[iZone] = blockProc[iZone];
+    }
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Read::ReadEachGrid()
+{
+    int *blockProc = GetBlockProc();
+    int *blockType = GetBlockType();
+
+    hid_t file;
+    zoneStart = 0;
+    for (int iGrid = 0; iGrid < numberOfGridGroups; ++ iGrid)
+    {
+        presentGridGroup = iGrid;
+        int nZonesOfGridGroup = 0;
+        for (int iFile = 0; iFile < globalFileNumber; ++ iFile)
+        {
+            file = OpenHDF5File(localGridNameList[iGrid][iFile]);
+
+            hid_t grpData;
+            grpData = OpenGroup(file, "Information");
+            int *blockIdx_local = ReadIntOneRow(grpData, "block_idx");
+            H5Gclose(grpData);
+
+            for (int iZone = 0; iZone < nZonesList[iGrid][iFile]; ++ iZone)
+            {
+                int gridIndex = blockIdx_local[iZone];
+                if (myProcID != blockProc[gridIndex + zoneStart])
+                {
+                    AddGrid(0);
+                    continue;
+                }
+
+                int gridType = blockType[gridIndex + zoneStart];
+                if (gridType == PHSPACE::UNSTRUCTGRID)
+                {
+                    ReadUnstructGrid(file, gridIndex);
+                }
+                else
+                {
+                    ReadStructGrid(file, gridIndex);
+                }
+            }
+
+            nZonesOfGridGroup += nZonesList[iGrid][iFile];
+            delete [] blockIdx_local;
+            H5Fclose(file);
+        }
+        zoneStart += nZonesOfGridGroup;
+    }
+}
+
+void IO_HDF5Read::ReadEachGridOld(hid_t loc_id)
+{
+    int *blockProc = GetBlockProc();
+    int *blockType = GetBlockType();
+
+    int nZones = GetNZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        if (myProcID != blockProc[iZone])
+        {
+            AddGrid(0);
+            continue;
+        }
+
+        int gridType = blockType[iZone];
+        if (gridType == PHSPACE::UNSTRUCTGRID)
+        {
+            ReadUnstructGrid(loc_id, iZone);
+        }
+        else
+        {
+            ReadStructGrid(loc_id, iZone);
+        }
+    }
+}
+
+void IO_HDF5Read::ReadGridCoordinates(hid_t loc_id, Grid *gridIn)
+{
+    PrintToWindow("    Reading coordinates ...\n");
+    hid_t grpData;
+
+    grpData = OpenGroup(loc_id, "GridCoordinates");
+
+    RDouble *CoordinateX = ReadDoubleOneRow(grpData, "CoordinateX");
+    RDouble *CoordinateY = ReadDoubleOneRow(grpData, "CoordinateY");
+    RDouble *CoordinateZ = ReadDoubleOneRow(grpData, "CoordinateZ");
+
+    gridIn->SetX(CoordinateX);
+    gridIn->SetY(CoordinateY);
+    gridIn->SetZ(CoordinateZ);
+
+    gridIn->RotateAboutAxis();
+
+    gridIn->ComputeMinMaxBox();
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Read::ReadInterfaceInfo(hid_t loc_id, Grid *gridIn)
+{
+    PrintToWindow("    Reading interface ...\n");
+    hid_t grpData;
+
+    grpData = OpenGroup(loc_id, "InterfaceInfo");
+
+    InterfaceInfo *interfaceInfo = 0;
+    gridIn->SetInterfaceInfo(interfaceInfo);
+
+    int nIFace = 0;
+    ReadData(grpData, &nIFace, "nIFace");
+
+    if (nIFace > 0)
+    {
+        interfaceInfo = new InterfaceInfo(nIFace, gridIn);
+        gridIn->SetInterfaceInfo(interfaceInfo);
+
+        int *interFace2ZoneID       = interfaceInfo->GetInterFace2ZoneID();
+        int *interFace2InterFaceID  = interfaceInfo->GetInterFace2InterFaceID();
+        int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+
+        int *interFace2ZoneIDTemp       = ReadIntOneRow(grpData, "interFace2ZoneID");
+        int *interFace2InterFaceIDTemp  = ReadIntOneRow(grpData, "interFace2InterFaceID");
+        int *interFace2BoundaryFaceTemp = ReadIntOneRow(grpData, "interFace2BoundaryFace");
+
+        for (int iFace = 0; iFace < nIFace; ++ iFace)
+        {
+            interFace2ZoneID[iFace]       = interFace2ZoneIDTemp[iFace];
+            interFace2InterFaceID[iFace]  = interFace2InterFaceIDTemp[iFace];
+            interFace2BoundaryFace[iFace] = interFace2BoundaryFaceTemp[iFace];
+        }
+
+        delete [] interFace2ZoneIDTemp;    interFace2ZoneIDTemp = nullptr;
+        delete [] interFace2InterFaceIDTemp;    interFace2InterFaceIDTemp = nullptr;
+        delete [] interFace2BoundaryFaceTemp;    interFace2BoundaryFaceTemp = nullptr;
+    }
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Read::ReadVolumeCondition(hid_t loc_id, Grid *gridIn)
+{
+    bool dataExist = CheckDataExist(loc_id, "VolumeCondition");
+    if (!dataExist)
+    {
+        return;
+    }
+
+    hid_t grpData;
+    grpData = OpenGroup(loc_id, "VolumeCondition");
+    char *VCName = ReadCharData(grpData, "VCName");
+
+    SimpleVC *volumeCondition = new SimpleVC();
+
+    int vcType = -1;
+    ReadData(grpData, &vcType, "VCType");
+    volumeCondition->SetVCType(vcType);
+
+    volumeCondition->SetVCName(VCName);
+    gridIn->SetVolumeCondition(volumeCondition);
+
+    delete []VCName;
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Read::ReadStructGrid(hid_t loc_id, int iZone)
+{
+    PrintToWindow("Reading Structured Grid Of Zone ", iZone, "...\n");
+
+    hid_t  grpData;
+    string grpName;
+
+    GridID *index = new GridID(iZone + zoneStart);
+    Grid *grid = new StructGrid();
+
+    grid->InitGrid(index, 0, PHSPACE::GetDim(), STRUCTGRID);
+    grid->SetIBlock(presentGridGroup);
+
+    ostringstream oss;
+    oss << "Grid-" << iZone;
+    grpName = oss.str();
+    grpData = OpenGroup(loc_id, grpName);
+
+    StructGrid *strGrid = StructGridCast(grid);
+    int *iDimensions = ReadIntOneRow(grpData, "iDimensions");
+    strGrid->SetNI(iDimensions[0]);
+    strGrid->SetNJ(iDimensions[1]);
+    strGrid->SetNK(iDimensions[2]);
+    strGrid->SetBasicDimension();
+
+    ReadGridCoordinates(grpData, grid);
+    strGrid->SetArrayLayout();
+
+    ReadStrBCName(grpData, grid);
+    ReadBCRegion(grpData, grid);
+    ReadStrPartitionInfo(grpData, grid);
+    ReadInterfaceInfo(grpData, grid);
+    ReadVolumeCondition(grpData, grid);
+
+    grid->ReviseNeighborZoneIndex(zoneStart);
+    AddGrid(grid);
+    delete [] iDimensions;
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Read::ReadLnk(hid_t loc_id, int iZone)
+{
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    Grid **OrdinaryGrid = new Grid *[nZones];
+
+    hid_t  grpData;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Grid-" << iZone;
+    grpName = oss.str();
+    grpData = OpenGroup(loc_id, grpName);
+
+    OrdinaryGrid[iZone] = GetGrid(iZone, 0);
+
+    ReadLnkInfo(grpData, OrdinaryGrid[iZone]);
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Read::ReadBCRegion(hid_t loc_id, Grid *gridIn)
+{
+    hid_t grpData;
+
+    grpData = OpenGroup(loc_id, "BCRegion");
+
+    StructGrid *grid = StructGridCast(gridIn);
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    int **BCInfor = ReadIntTwoRow(grpData, "BCInfor");
+
+    int iMin, iMax, jMin, jMax, kMin, kMax, bcType;
+    int sLr, sNd;
+    int iBCinfo = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        int index = 0;
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+
+        iMin   = BCInfor[iBCinfo][index++];
+        iMax   = BCInfor[iBCinfo][index++];
+        jMin   = BCInfor[iBCinfo][index++];
+        jMax   = BCInfor[iBCinfo][index++];
+        kMin   = BCInfor[iBCinfo][index++];
+        kMax   = BCInfor[iBCinfo][index++];
+        bcType = BCInfor[iBCinfo][index++];
+        sLr    = BCInfor[iBCinfo][index++];
+        sNd    = BCInfor[iBCinfo][index++];
+        iBCinfo ++;
+        
+        //! Restore periodic boundary bcType and correct read information only for PARTITION_GRID task.
+        if (GetTaskCode() == PARTITION_GRID && PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType") != 0)
+        {
+            if (bcregion->GetBCName() == "Periodic_up"|| bcregion->GetBCName() == "Periodic_down")
+            {
+                bcType = PHENGLEI::USER_DEFINED;
+                iBCinfo ++;
+            }
+        }
+
+        bcregion->SetIJKRegion(iMin, iMax, jMin, jMax, kMin, kMax);
+        bcregion->SetBCType(bcType);
+        bcregion->SetFaceLeftOrRightIndex(sLr);
+        bcregion->SetFaceDirection(sNd);
+        bcregion->InitFaceDirectionIndex();
+
+        if (bcType == -1)
+        {
+            index = 0;
+
+            iMin = BCInfor[iBCinfo][index++];
+            iMax = BCInfor[iBCinfo][index++];
+            jMin = BCInfor[iBCinfo][index++];
+            jMax = BCInfor[iBCinfo][index++];
+            kMin = BCInfor[iBCinfo][index++];
+            kMax = BCInfor[iBCinfo][index++];
+            bcregion->SetTargetIJKRegion(iMin, iMax, jMin, jMax, kMin, kMax);
+
+            int neighborZoneIndex = BCInfor[iBCinfo][index++];
+            bcregion->SetTargetRegionBlock(neighborZoneIndex);
+
+            iBCinfo ++;
+        }
+    }
+    grid->SetBCFaceInfo();
+
+    DelPointer2(BCInfor);
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Read::ReadLnkInfo(hid_t loc_id, Grid *gridIn)
+{
+    hid_t grpData;
+
+    grpData = OpenGroup(loc_id, "LnkInfo");
+
+    StructGrid *grid = StructGridCast(gridIn);
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    int **LnkInfor = ReadIntTwoRow(grpData, "LnkInfor");
+
+    int iMin, iMax, jMin, jMax, kMin, kMax, nbt;
+    int iLnkinfo = 0;
+    int ndim = PHSPACE::GlobalDataBase::GetIntParaFromDB("ndim");
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        int index = 0;
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+
+        int bctype = bcregion->GetBCType();
+        if ((!IsInterface(bctype))) continue;
+
+        iMin = LnkInfor[iLnkinfo][index++];
+        iMax = LnkInfor[iLnkinfo][index++];
+        jMin = LnkInfor[iLnkinfo][index++];
+        jMax = LnkInfor[iLnkinfo][index++];
+
+        if (ndim == THREE_D)
+        {
+            kMin = LnkInfor[iLnkinfo][index++];
+            kMax = LnkInfor[iLnkinfo][index++];
+        }
+        else
+        {
+            kMin = 1;
+            kMax = 1;
+        }
+        iLnkinfo++;
+
+        bcregion->SetIJKRegion(iMin, iMax, jMin, jMax, kMin, kMax);
+
+        index = 0;
+
+        iMin = LnkInfor[iLnkinfo][index++];
+        iMax = LnkInfor[iLnkinfo][index++];
+        jMin = LnkInfor[iLnkinfo][index++];
+        jMax = LnkInfor[iLnkinfo][index++];
+
+        if (ndim == THREE_D)
+        {
+            kMin = LnkInfor[iLnkinfo][index++];
+            kMax = LnkInfor[iLnkinfo][index++];
+        }
+        else
+        {
+            kMin = 1;
+            kMax = 1;
+        }
+
+        nbt = LnkInfor[iLnkinfo][index++];
+        bcregion->SetTargetIJKRegion(iMin, iMax, jMin, jMax, kMin, kMax);
+        bcregion->SetTargetRegionBlock(nbt - 1);
+        if (GetDim() == THREE_D)
+        {
+            bcregion->ComputeRelativeParameters();
+        }
+
+        iLnkinfo++;
+    }
+
+    DelPointer2(LnkInfor);
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Read::ReadStrBCName(hid_t loc_id, Grid *gridIn)
+{
+    hid_t grpData;
+    
+    grpData = OpenGroup(loc_id, "BCRegion");
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int nBCRegion = 0;
+    ReadData(grpData, &nBCRegion, "nBCRegion");
+
+    grid->CreateCompositeBCRegion(nBCRegion);
+    H5Gclose(grpData);
+
+    grpData = OpenGroup(loc_id, "BCName");
+    int gridIndex = grid->GetZoneID();
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+
+    char *BCName = ReadCharData(grpData, "BCName");
+    string *BCNameList = new string[nBCRegion];
+    uint_long count = 0;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        while (BCName[count] != '\0')
+        {
+            BCNameList[iBCRegion].push_back(BCName[count]);
+            ++ count;
+        }
+        ++ count;
+    }
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = new StructBC(gridIndex, iBCRegion);
+        structBCSet->SetBCRegion(iBCRegion, bcregion);
+
+        bcregion->SetBCName(BCNameList[iBCRegion]);
+    }
+
+    delete [] BCNameList;
+    delete [] BCName;
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Read::ReadStrPartitionInfo(hid_t loc_id, Grid *gridIn)
+{
+    bool dataExist = CheckDataExist(loc_id, "PartitionInfo");
+    if (!dataExist)
+    {
+        StructGrid *grid = StructGridCast(gridIn);
+        int ni    = grid->GetNI();
+        int nj    = grid->GetNJ();
+        int nk    = grid->GetNK();
+        int iZone = grid->GetZoneID();
+
+        int ordinaryDimStartIndex[3], ordinaryDimEndIndex[3];
+        ordinaryDimStartIndex[0] = 1; ordinaryDimEndIndex[0] = ni;
+        ordinaryDimStartIndex[1] = 1; ordinaryDimEndIndex[1] = nj;
+        ordinaryDimStartIndex[2] = 1; ordinaryDimEndIndex[2] = nk;
+
+        grid->SetOrdinaryGridIndex(iZone);
+        grid->SetOrdinaryDimStartIndex(&ordinaryDimStartIndex[0]);
+        grid->SetOrdinaryDimEndIndex(&ordinaryDimEndIndex[0]);
+
+        return;
+    }
+
+    hid_t grpData;
+    grpData = OpenGroup(loc_id, "PartitionInfo");
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ordinaryGridIndex = -1;
+    int *ordinaryDimStartIndex = new int[3];
+    int *ordinaryDimEndIndex   = new int[3];
+
+    ReadData(grpData, &ordinaryGridIndex   , "OrdinaryGrid");
+    ReadData(grpData, ordinaryDimStartIndex, "OrdinaryDimStart");
+    ReadData(grpData, ordinaryDimEndIndex  , "OrdinaryDimEnd");
+
+    grid->SetOrdinaryGridIndex(ordinaryGridIndex);
+    grid->SetOrdinaryDimStartIndex(ordinaryDimStartIndex);
+    grid->SetOrdinaryDimEndIndex(ordinaryDimEndIndex);
+
+    delete []ordinaryDimStartIndex;
+    delete []ordinaryDimEndIndex;
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Read::ReadUnstrPartitionInfo(hid_t loc_id, Grid *gridIn)
+{
+    bool dataExist = CheckDataExist(loc_id, "PartitionInfo");
+    if (!dataExist)
+    {
+        return;
+    }
+
+    hid_t grpData;
+    grpData = OpenGroup(loc_id, "PartitionInfo");
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int ordinaryGridIndex = -1;
+    ReadData(grpData, &ordinaryGridIndex, "OrdinaryGrid");
+    grid->SetOrdinaryGridIndex(ordinaryGridIndex);
+
+    int *ordinaryNodeIndex  = ReadIntOneRow(grpData, "OrdinaryNodeIndex");
+    int *ordinaryFaceIndex  = ReadIntOneRow(grpData, "OrdinaryFaceIndex");
+    int *ordinaryCellIndex  = ReadIntOneRow(grpData, "OrdinaryCellIndex");
+    grid->SetOrdinaryNodeIndex(ordinaryNodeIndex);
+    grid->SetOrdinaryFaceIndex(ordinaryFaceIndex);
+    grid->SetOrdinaryCellIndex(ordinaryCellIndex);
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Read::ReadUnstructGrid(hid_t loc_id, int iZone)
+{
+    PrintToWindow("Reading Unstructured Grid Of Zone ", iZone, "...\n");
+
+    hid_t  grpData;
+    string grpName;
+
+    GridID *index = new GridID(iZone + zoneStart);
+    Grid *grid = new UnstructGrid();
+
+    grid->InitGrid(index, 0, PHSPACE::GetDim(), UNSTRUCTGRID);
+    grid->SetIBlock(0);
+
+    ostringstream oss;
+    oss << "Grid-" << iZone;
+    grpName = oss.str();
+    grpData = OpenGroup(loc_id, grpName);
+
+    int *iDimensions = ReadIntOneRow(grpData, "iDimensions");
+    grid->SetNTotalNode(iDimensions[0]);
+    grid->SetNTotalFace(iDimensions[1]);
+    grid->SetNTotalCell(iDimensions[2]);
+
+    PrintToWindow("  Grid Dimension  : ", grid->GetDim(), "\n");
+    PrintToWindow("  Number of Points: ", iDimensions[0], "\n");
+    PrintToWindow("  Number of Faces : ", iDimensions[1], "\n");
+    PrintToWindow("  Number of Cells : ", iDimensions[2], "\n");
+
+    ReadGridCoordinates(grpData, grid);
+    ReadFaceTopology(grpData, grid);
+    ReadInterfaceInfo(grpData, grid);
+    ReadCellTopology(grpData, grid);
+    ReadUnstrBCName(grpData, grid);
+    ReadInterpointInfo(grpData, grid);
+    ReadUnstrPartitionInfo(grpData, grid);
+    ReadVolumeCondition(grpData, grid);
+
+    grid->SetIBlock(presentGridGroup);
+    grid->ReviseNeighborZoneIndex(zoneStart);
+
+    AddGrid(grid);
+
+    delete [] iDimensions;
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Read::ReadFaceTopology(hid_t loc_id, Grid *gridIn)
+{
+    PrintToWindow("    Reading face topology ...\n");
+    hid_t grpData;
+
+    grpData = OpenGroup(loc_id, "FaceTopology");
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int *nodeNumberOfEachFace = ReadIntOneRow(grpData, "nodeNumberOfEachFace");
+    grid->SetNodeNumberOfEachFace(nodeNumberOfEachFace);
+
+    int *face2Node = ReadIntOneRow(grpData, "face2Node");
+    grid->SetFace2Node(face2Node);
+
+    int *leftCellOfFace  = ReadIntOneRow(grpData, "leftCellOfFace");
+    int *rightCellOfFace = ReadIntOneRow(grpData, "rightCellOfFace");
+    grid->SetLeftCellOfFace (leftCellOfFace);
+    grid->SetRightCellOfFace(rightCellOfFace);
+
+    int nTotalFace =grid->GetNTotalFace();
+    int *nodePosi = new int[nTotalFace + 1];
+    int nodeSum = 0;
+    nodePosi[0] = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        nodeSum += nodeNumberOfEachFace[iFace];
+        nodePosi[iFace+1] = nodeSum;
+    }
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        if (leftCellOfFace[iFace] < 0)
+        {
+            std::reverse(face2Node + nodePosi[iFace], face2Node + nodePosi[iFace+1]);
+            SWAP(leftCellOfFace[iFace], rightCellOfFace[iFace]);
+        }
+    }
+    delete [] nodePosi;
+
+    int nBoundFace = 0;
+    ReadData(grpData, &nBoundFace, "nBoundFace");
+    grid->SetNBoundFace(nBoundFace);
+    PrintToWindow("  Number of BC Faces : ", nBoundFace, "\n" );
+
+    grid->SpecifyRightCellofBC();
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Read::ReadCellTopology(hid_t loc_id, Grid *gridIn)
+{
+    PrintToWindow("    Reading cell-to-node ...\n");
+    hid_t grpData;
+
+    grpData = OpenGroup(loc_id, "CellTopology");
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int *cell2Node = ReadIntOneRow(grpData, "cell2Node");
+    int *nodeNumberOfEachCell = ReadIntOneRow(grpData, "nodeNumberOfEachCell");
+
+    grid->SetNodeNumberOfEachCell(nodeNumberOfEachCell);
+    grid->SetCell2Node(cell2Node);
+
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Read::ReadUnstrBCName(hid_t loc_id, Grid *gridIn)
+{
+    PrintToWindow("    Reading boundary name ...\n");
+    hid_t grpData;
+
+    grpData = OpenGroup(loc_id, "BCName");
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    char *BCName = ReadCharData(grpData, "BCName");
+
+    grpData = OpenGroup(loc_id, "FaceTopology");
+    int *BcType = ReadIntOneRow(grpData, "BcType");
+
+    int nBoundFace = grid->GetNBoundFace();
+    string *BCNameList = new string[nBoundFace];
+   
+    int count = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        while (BCName[count] != '\0')
+        {
+            BCNameList[iFace].push_back(BCName[count]);
+            ++ count;
+        }
+        ++ count;
+    }
+
+    UnstructBCSet **bcr = new UnstructBCSet *[nBoundFace];
+
+    //! Create UnstructbcRegion.
+    set<string> bcNameSet;
+    for (int iFace = 0; iFace < nBoundFace; iFace++)
+    {   
+        bcr[iFace] = new UnstructBCSet();
+        bcr[iFace]->SetKey(BcType[iFace]);
+        bcr[iFace]->SetBCName(BCNameList[iFace]);
+
+        bcNameSet.insert(BCNameList[iFace]);
+    }
+    grid->SetBCRecord(bcr);
+
+    int nBCRegionUnstruct = static_cast<int>(bcNameSet.size());
+    
+    grid->CreateUnstructBCSet(nBCRegionUnstruct);
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int* bcRegionIDofBCFace = new int[nBoundFace];
+    set<string>::iterator iter;
+    count = 0;
+    for (iter = bcNameSet.begin(); iter != bcNameSet.end(); iter++)
+    {
+        UnstructBC *unstructBC = new UnstructBC(count);
+        unstructBCSet->SetBCRegion(count, unstructBC);
+        unstructBC->SetBCName(*iter);
+
+        for (int iFace = 0; iFace < nBoundFace; iFace++)
+        {
+            if (BCNameList[iFace] == unstructBC->GetBCName())
+            {
+                unstructBC->SetBCType(BcType[iFace]);
+                bcRegionIDofBCFace[iFace] = count;
+                vector<int> *faceIndex = unstructBC->GetFaceIndex();
+                faceIndex->push_back(iFace);
+            }
+           
+        }
+        count++;
+    }
+    unstructBCSet->SetBCFaceInfo(bcRegionIDofBCFace);
+    delete [] BcType;
+    delete [] BCNameList;
+    delete [] BCName;
+    H5Gclose(grpData);
+}
+
+void IO_HDF5Read::ReadInterpointInfo(hid_t loc_id, Grid *gridIn)
+{
+    if (isP2PMode)
+    {
+        return;
+    }
+
+    if (numberOfGridGroups != 1)
+    {
+        return;
+    }
+
+    InterpointInformation *ipointinfo = 0;
+    gridIn->SetInterpointInfo(ipointinfo);
+
+    hid_t grpData;
+    grpData = OpenGroup(loc_id, "InterpointInfo");
+
+    int nIPoint;
+    ReadData(grpData, &nIPoint, "nIPoint");
+    if (!nIPoint)
+    {
+        H5Gclose(grpData);
+        return;
+    }
+
+    PrintToWindow("    Reading interpoint ...\n");
+
+    ipointinfo = new InterpointInformation(nIPoint,gridIn);
+    gridIn->SetInterpointInfo(ipointinfo);
+
+    int *interPoint2ZoneID = ipointinfo->GetInterPoint2ZoneID();
+    int *interPoint2InterPointID = ipointinfo->GetInterPoint2InterPointID();
+    int *interPoint2GlobalPoint = ipointinfo->GetInterPoint2GlobalPoint();
+    int *cellNumberOfInterPoint = ipointinfo->GetCellNumberOfInterPoint();
+    int *totalZonesOfInterPoint = ipointinfo->GetTotalZonesOfInterPoint();
+    int *labelOfInterPoint = ipointinfo->GetLabelOfInterPoint();
+
+    ReadData(grpData, interPoint2ZoneID      , "interPoint2ZoneID");
+    ReadData(grpData, interPoint2InterPointID, "interPoint2InterPointID");
+    ReadData(grpData, interPoint2GlobalPoint , "interPoint2GlobalPoint");
+    ReadData(grpData, cellNumberOfInterPoint , "cellNumberOfInterPoint");
+    ReadData(grpData, totalZonesOfInterPoint , "totalZonesOfInterPoint");
+    ReadData(grpData, labelOfInterPoint      , "labelOfInterPoint");
+
+    H5Gclose(grpData);
+
+    zoneConnectivityForPoint = new ZoneConnectivityForPoint();
+}
+
+bool IO_HDF5Read::IsZoneLayoutInitialized()
+{
+    if (this->blockIdx || this->blockProc || this->blockType)
+    {
+        return true;
+    }
+    else
+    {
+        return false;
+    }
+}
+
+void IO_HDF5Read::RedistributeZonesIfNeed()
+{
+    int nZones = GetNZones();
+    int numberOfProcessor = PHMPI::GetNumberOfProcessor();
+
+    int *blockType     = GetBlockType();
+    int *blockProc     = GetBlockProc();
+    int *blockProcGrid = GetBlockProcGrid();
+    int *blockProcDump = GetBlockProcDump();
+
+    int zoneDistributionMethod = 0;
+    int maxProc = blockProc[0];
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        maxProc = MAX(maxProc, blockProc[iZone]);
+    }
+    maxProc += 1;
+
+    if (numberOfProcessor == maxProc)
+    {
+        zoneDistributionMethod = DETERMIN_BY_PARTITION;
+    }
+    else
+    {
+        zoneDistributionMethod = REDISTRIBUTION;
+    }
+    PHMPI::SetZoneDistributionMethod(zoneDistributionMethod);
+
+    ostringstream oss;
+    oss << "Max processor ID : " << maxProc << " of total zone " << nZones;
+    if (zoneDistributionMethod == DETERMIN_BY_PARTITION)
+    {
+        oss << ", Zones' distribution is specified by partition ...";
+    }
+    else
+    {
+        oss << ", Zones' distribution is specified randomly ...";
+    }
+    oss << endl;
+    WriteLogFile(oss);
+
+    if (zoneDistributionMethod == REDISTRIBUTION)
+    {
+        if (nZones % numberOfProcessor == 0)
+        {
+            int nZonesPerProcessor = nZones / numberOfProcessor;
+            int processorID = 0;
+            for (int iZone = 0; iZone < nZones; ++ iZone)
+            {
+                blockProc[iZone] = processorID;
+                if ((iZone + 1) % nZonesPerProcessor == 0)
+                {
+                    processorID ++;
+                }
+            }
+        }
+        else
+        {
+            PrintToWindow("Waining: nZones % numberOfProcessor != 0 !!");
+            for (int iZone = 0; iZone < nZones; ++ iZone)
+            {
+                blockProc[iZone] = iZone % numberOfProcessor;
+            }
+        }
+    }
+    else
+    {
+        if (numberOfProcessor == 1)
+        {
+            if (IsConvertGridToMixGrid())
+            {
+                if (blockType[0] == PHSPACE::STRUCTGRID)
+                {
+                    int maxproc = blockProc[0];
+                    for (int iZone = 0; iZone < nZones; ++ iZone)
+                    {
+                        if (blockProc[iZone] > maxproc)
+                        {
+                            maxproc = blockProc[iZone];
+                        }
+                    }
+                    maxproc += 1;
+                    PHMPI::SetNumberOfProcStructUsed(maxproc);
+                }
+                else
+                {
+                    for (int iZone = 0; iZone < nZones; ++ iZone)
+                    {
+                        blockProcDump[iZone] += PHMPI::GetNumberOfProcStructUsed();
+                    }
+                }
+            }
+
+            for (int iZone = 0; iZone < nZones; ++ iZone)
+            {
+                blockProc[iZone] = 0;
+            }
+        }
+    }
+
+    if (!blockProcGrid)
+    {
+        blockProcGrid = new int[nZones];
+    }
+    SetBlockProcGrid(blockProcGrid);
+
+    int numberOfGridProcessor = PHMPI::GetNumberOfGridProcessor();
+    if (numberOfGridProcessor != 0)
+    {
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            blockProcGrid[iZone] = iZone % numberOfGridProcessor + numberOfProcessor;
+        }
+    }
+    else
+    {
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            blockProcGrid[iZone] = -1;
+        }
+    }
+}
+
+void IO_HDF5Read::SetGlobalZoneLayout()
+{
+    if (!PHMPI::GetZoneGridType())
+    {
+        PHMPI::SetNumberOfGlobalZones(numberOfZones);
+        PHMPI::CreateZoneProcessorIDDump(numberOfZones);
+        PHMPI::CreateZoneProcessorID(numberOfZones);
+        PHMPI::CreateZoneGridID(numberOfZones);
+        PHMPI::CreateZoneGridType(numberOfZones);
+        PHMPI::CreateZoneFileID(numberOfZones);
+    }
+
+    int *globalBlockProc     = PHMPI::GetZoneProcessorID();
+    int *globalBlockProcGrid = PHMPI::GetZoneProcessorIDForGrid();
+    int *globalBlockType     = PHMPI::GetZoneGridType();
+    int *globalBlockIdx      = PHMPI::GetZoneGridID();
+    int *globalBlockFile     = PHMPI::GetZoneFileID();
+    int *globalBlockProcDump = PHMPI::GetZoneProcessorIDDump();
+
+    set<int> zoneIDinCurrentProc;
+    int myid = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        globalBlockProc    [iZone] = blockProc    [iZone];
+        globalBlockProcGrid[iZone] = blockProcGrid[iZone];
+        globalBlockType    [iZone] = blockType    [iZone];
+        globalBlockIdx     [iZone] = blockIdx     [iZone];
+        globalBlockFile    [iZone] = blockFileProc[iZone];
+
+        if (blockProc[iZone] == myid || blockProcGrid[iZone] == myid)
+        {
+            zoneIDinCurrentProc.insert(iZone);
+        }
+    }
+
+    ostringstream oss;
+    oss << "Zone index in current processor : ";
+    for (set<int>::iterator iter = zoneIDinCurrentProc.begin(); iter != zoneIDinCurrentProc.end(); ++ iter)
+    {
+        int partID = *iter;
+        oss << partID << " ";
+    }
+    oss << endl;
+    WriteLogFile(oss.str());
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        globalBlockProcDump[iZone] = blockProcDump[iZone];
+    }
+}
+
+void IO_HDF5Read::ClassifyGridSystem()
+{
+    int nZones = PHMPI::GetNumberofGlobalZones();
+
+    set<int> gridType;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        gridType.insert(PHMPI::GetZoneGridType(iZone));
+    }
+
+    int sysGridType = GetSystemGridType(gridType);
+    GlobalDataBase::UpdateData("sys_gridtype", &sysGridType, PHINT, 1);
+
+    vector<string> sysGridTypeName;
+    sysGridTypeName.push_back("UNSTRUCTGRID");
+    sysGridTypeName.push_back("STRUCTGRID");
+    sysGridTypeName.push_back("MIXGRID");
+
+    PrintToWindow("Grid Type: ", sysGridTypeName[sysGridType], "\n");
+}
+
+void IO_HDF5Read::AddGrid(Grid *grid)
+{
+    grids.push_back(grid);
+}
+
+void IO_HDF5Read::CreateZones()
+{
+    zoneStart = 0;
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int globalZoneIndex = zoneStart + iZone;
+
+        int recvProc     = PHMPI::GetZoneProcessorID       (globalZoneIndex);
+        int recvProcGrid = PHMPI::GetZoneProcessorIDForGrid(globalZoneIndex);
+
+        if (myProcID == recvProc || myProcID == recvProcGrid)
+        {
+            int nLocalZones = PHMPI::GetNumberofLocalZones();
+
+            Grid *grid = grids[iZone];
+            grid->GetGridID()->SetLocalIndex(nLocalZones);
+
+            Zone *zone = new Zone(globalZoneIndex);
+            zone->AddGridAndCopyZonePara(grid);
+            zone->AddGridToGlobal(globalZoneIndex);
+
+            region->AddZone(zone);
+        }
+        else
+        {
+            region->AddZone(0);
+            continue;
+        }
+    }
+}
+
+LIB_EXPORT void DumpHDF5Grid(const string &gridFileName, Grid **grids, int nBlocks)
+{
+    PrintToWindow("    Writing new HDF5 version grid to file ....\n");
+
+    IO_HDF5Write writeGrid(gridFileName, grids, nBlocks);
+    writeGrid.Run();
+}
+
+LIB_EXPORT bool ReadHDF5File(Region *region_in, PHVectorString1D &gridGroupNameList)
+{
+    bool HDF5FileRead = false;
+
+    fstream file;
+    string gridFileName = gridGroupNameList[0];
+    OpenSerialFile(file, gridFileName, ios_base::in|ios_base::binary);
+    int nZone;
+    int sizeInt = sizeof(int);
+    file.read((char *)&nZone, sizeInt);
+    CloseFile(file);
+
+    if (nZone <= static_cast <int> (1e8))
+    {
+        PrintToWindow("This grid file is old fts version!\n");
+        WriteLogFile("This grid file is old fts version!\n");
+        return HDF5FileRead;
+    }
+    else
+    {
+        PrintToWindow("This grid file is new HDF5 version!\n");
+        WriteLogFile("This grid file is new HDF5 version!\n");
+    }
+
+    IO_HDF5Read readGrid(gridGroupNameList, region_in);
+    HDF5FileRead = readGrid.Run();
+
+    int isOldGrid = 0;
+    GlobalDataBase::UpdateData("isOldGrid", &isOldGrid, PHINT, 1);
+
+    return HDF5FileRead;
+}
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/src/Pre_Plot3DToPHengLEI_Struct.cpp b/API/PreProcess/src/Pre_Plot3DToPHengLEI_Struct.cpp
new file mode 100644
index 0000000..c0eaf97
--- /dev/null
+++ b/API/PreProcess/src/Pre_Plot3DToPHengLEI_Struct.cpp
@@ -0,0 +1,532 @@
+#include "Pre_Plot3DToPHengLEI_Struct.h"
+#include "TK_Exit.h"
+#include "Glb_Dimension.h"
+#include "Pre_GridTranslator.h"
+#include "TK_Parse.h"
+#include "TK_Log.h"
+
+namespace PHSPACE
+{
+LIB_EXPORT Pre_Plot3DToPHengLEI_Struct::Pre_Plot3DToPHengLEI_Struct(const string &gridFileName) : 
+        Pre_GridConversion(gridFileName)
+{
+
+}
+
+LIB_EXPORT Pre_Plot3DToPHengLEI_Struct::~Pre_Plot3DToPHengLEI_Struct()
+{
+
+}
+
+void Pre_Plot3DToPHengLEI_Struct::ReadGrid()
+{
+    int fileFormat = GlobalDataBase::GetIntParaFromDB("fileformat");
+    //fileformat : Grid file format.
+    //             1 --- ASCII
+    //             0 --- BINARY
+    fileFormat = CheckPlot3DFileIfASCII();
+    GlobalDataBase::UpdateData("fileformat", &fileFormat, PHINT, 1);
+
+    if (fileFormat == 1)
+    {
+        int isPlot3D = 1;
+        isPlot3D = CheckGridgenCoorASCIIFileType();
+        if (isPlot3D)
+        {
+            ReadGridgenCoorASCIIPlot3D();
+        }
+        else
+        {
+            ReadGridgenCoorASCIIGridgen();
+        }
+    }
+    else if (fileFormat == 0)
+    {
+        ReadGridgenCoor();
+    }
+    ReadGridgenBC();
+}
+
+int Pre_Plot3DToPHengLEI_Struct::CheckPlot3DFileIfASCII()
+{
+    fstream file;
+    file.open(gridFileName.c_str(), ios_base::in|ios_base::binary);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(gridFileName);
+    }
+
+    CharVecSizeType sizeOfIntType = sizeof(int);
+
+    int numberOfBlocks = 0;
+    file.read(reinterpret_cast <char *> (&numberOfBlocks), sizeOfIntType);
+
+    file.close();
+    file.clear();
+
+    if (numberOfBlocks <= static_cast <int> (1e8))
+    {
+        return 0;
+    }
+    else
+    {
+        return 1;
+    }
+}
+
+int Pre_Plot3DToPHengLEI_Struct::CheckGridgenCoorASCIIFileType()
+{
+    fstream file;
+    file.open(gridFileName.c_str(), ios_base::in);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(gridFileName);
+    }
+
+    int numberOfBlocks = 0;
+    file >> numberOfBlocks;
+
+    int isPlot3D = 1;
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        int ni, nj, nk;
+        file >> ni;
+        file >> nj;
+        file >> nk;
+
+        if (ni < 0 || nj < 0 || nk < 0)
+        {
+            isPlot3D = 0;
+            break;
+        }
+    }
+
+    file.close();
+    file.clear();
+
+    return isPlot3D;
+}
+
+void Pre_Plot3DToPHengLEI_Struct::ReadGridgenCoorASCIIPlot3D()
+{
+    fstream file;
+    file.open(gridFileName.c_str(), ios_base::in);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(gridFileName);
+    }
+    file >> nBlocks;
+
+    grids = new Grid *[nBlocks];
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        int ni, nj, nk;
+        file >> ni;
+        file >> nj;
+        file >> nk;
+
+        GridID *index = new GridID(iZone);
+        StructGrid *grid = StructGridCast(CreateGridGeneral(STRUCTGRID, index, 0, GetDim()));
+        grids[iZone] = grid;
+        grid->SetNI(ni);
+        grid->SetNJ(nj);
+        grid->SetNK(nk);
+
+        grid->SetBasicDimension();
+
+        int nTotalNode = grid->GetNTotalNode();
+        RDouble *x = new RDouble[nTotalNode];
+        RDouble *y = new RDouble[nTotalNode];
+        RDouble *z = new RDouble[nTotalNode];
+        grid->SetX(x);
+        grid->SetY(y);
+        grid->SetZ(z);
+        grid->SetArrayLayout();
+
+        int wordWidth = 8;
+
+        cout << setiosflags(ios::right);
+        cout << " iZone = " << setw(wordWidth) << iZone;
+        cout << " numberOfBlocks = " << setw(wordWidth) << nBlocks;
+        cout << " ni, nj, nk = ";
+        cout << setw(wordWidth) << ni;
+        cout << setw(wordWidth) << nj;
+        cout << setw(wordWidth) << nk;
+        cout << "\n";
+    }
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        StructGrid *grid = StructGridCast(grids[iZone]);
+        grid->ReadXYZ(file);
+    }
+    file.close();
+    file.clear();
+}
+
+void Pre_Plot3DToPHengLEI_Struct::ReadGridgenCoorASCIIGridgen()
+{
+    fstream file;
+    file.open(gridFileName.c_str(), ios_base::in);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(gridFileName);
+    }
+    file >> nBlocks;
+
+    grids = new Grid *[nBlocks];
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        int ni, nj, nk;
+        file >> ni;
+        file >> nj;
+        file >> nk;
+
+        GridID *index = new GridID(iZone);
+        StructGrid *grid = StructGridCast(CreateGridGeneral(STRUCTGRID, index, 0, GetDim()));
+        grids[iZone] = grid;
+        grid->SetNI(ni);
+        grid->SetNJ(nj);
+        grid->SetNK(nk);
+
+        grid->SetBasicDimension();
+
+        int nTotalNode = grid->GetNTotalNode();
+        RDouble *x = new RDouble[nTotalNode];
+        RDouble *y = new RDouble[nTotalNode];
+        RDouble *z = new RDouble[nTotalNode];
+        grid->SetX(x);
+        grid->SetY(y);
+        grid->SetZ(z);
+        grid->SetArrayLayout();
+
+        int wordWidth = 8;
+
+        cout << setiosflags(ios::right);
+        cout << " iZone = " << setw(wordWidth) << iZone;
+        cout << " numberOfBlocks = " << setw(wordWidth) << nBlocks;
+        cout << " ni, nj, nk = ";
+        cout << setw(wordWidth) << ni;
+        cout << setw(wordWidth) << nj;
+        cout << setw(wordWidth) << nk;
+        cout << "\n";
+
+        grid->ReadXYZ(file);
+    }
+
+    file.close();
+    file.clear();
+}
+
+void Pre_Plot3DToPHengLEI_Struct::ReadGridgenCoor()
+{
+    fstream file;
+    file.open(gridFileName.c_str(), ios_base::in|ios_base::binary);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(gridFileName);
+    }
+
+    CharVecSizeType sizeOfIntType = sizeof(int);
+
+    file.read(reinterpret_cast <char *> (&nBlocks), sizeOfIntType);
+
+    grids = new Grid *[nBlocks];
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        int ni, nj, nk;
+        file.read(reinterpret_cast <char *> (&ni), sizeOfIntType);
+        file.read(reinterpret_cast <char *> (&nj), sizeOfIntType);
+        file.read(reinterpret_cast <char *> (&nk), sizeOfIntType);
+
+        GridID *index = new GridID(iZone);
+        StructGrid *grid = StructGridCast(CreateGridGeneral(STRUCTGRID, index, 0, GetDim()));
+        grids[iZone] = grid;
+        grid->SetNI(ni);
+        grid->SetNJ(nj);
+        grid->SetNK(nk);
+
+        grid->SetBasicDimension();
+
+        int nTotalNode = grid->GetNTotalNode();
+        RDouble *x = new RDouble[nTotalNode];
+        RDouble *y = new RDouble[nTotalNode];
+        RDouble *z = new RDouble[nTotalNode];
+        grid->SetX(x);
+        grid->SetY(y);
+        grid->SetZ(z);
+        grid->SetArrayLayout();
+
+        int wordWidth = 8;
+
+        cout << setiosflags(ios::right);
+        cout << " iZone = " << setw(wordWidth) << iZone;
+        cout << " numberOfBlocks = " << setw(wordWidth) << nBlocks;
+        cout << " ni, nj, nk = ";
+        cout << setw(wordWidth) << ni;
+        cout << setw(wordWidth) << nj;
+        cout << setw(wordWidth) << nk;
+        cout << "\n";
+    }
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        StructGrid *grid = StructGridCast(grids[iZone]);
+        grid->ReadXYZ(file);
+    }
+    file.close();
+    file.clear();
+}
+
+void Pre_Plot3DToPHengLEI_Struct::ReadGridgenBC()
+{
+    string boundaryFile = GlobalDataBase::GetStrParaFromDB("bnd_file");
+    fstream file;
+    file.open(boundaryFile.c_str(), ios_base::in);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(boundaryFile);
+    }
+
+    string line, word;
+    string separator = " =\t\r\n#$,;";
+
+    ReadNewLine(file, line);
+    line = FindNextWord(line, word, separator);
+    int flowSolverID;
+    from_string <int> (flowSolverID, word, std::dec);
+    cout << "flow_solver_id = " << flowSolverID << "\n";
+
+    ReadNewLine(file, line);
+    line = FindNextWord(line, word, separator);
+    int numberOfBlocks;
+    from_string <int> (numberOfBlocks, word, std::dec);
+    cout << "number_of_blocks = " << numberOfBlocks << "\n";
+
+    if (numberOfBlocks != nBlocks)
+    {
+        TK_Exit::ExceptionExit("Block in the boundary file do not match that in the grid file ! \n");
+    }
+
+    int nDim = GetDim();
+
+    bool blockProcessFlag = false;
+
+    using namespace PHMPI;
+
+    CreatetZoneProcessorID_INP(numberOfBlocks);
+    int *blockProcessorINP = GetZoneProcessorID_INP();
+
+    string boundaryName[100] = {"NO_BOUNDARY_CONDITION", "EXTRAPOLATION", "SOLID_SURFACE", "SYMMETRY", 
+                            "FARFIELD", "INFLOW", "OUTFLOW", "POLE", "Wall_8", "Wall_9", "Wall_10", "Wall_11", 
+                            "Wall_12", "Wall_13", "Wall_14", "Wall_15", "Wall_16", "Wall_17", "Wall_18", "Wall_19",
+                            "Wall_20", "Wall_21", "Wall_22", "Wall_23", "Wall_24", "Wall_25", "Wall_26", "Wall_27", 
+                            "Wall_28", "Wall_29", "Wall_30", "Wall_31", "Wall_32", "Wall_33", "Wall_34", "Wall_35",
+                            "Wall_36", "Wall_37", "Wall_38", "Wall_39", "Wall_40", "Wall_41", "Wall_42", "Wall_43",
+                            "Wall_44", "Wall_45", "Wall_46", "Wall_47", "Wall_48", "Wall_49", "Wall_50"};
+    boundaryName[52] = "PRESSURE_INLET";
+    boundaryName[62] = "PRESSURE_OUTLET";
+    boundaryName[71] = "POLE1";
+    boundaryName[72] = "POLE2";
+    boundaryName[73] = "POLE3";
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        StructGrid *grid = StructGridCast(grids[iZone]);
+
+        int ni, nj, nk;
+        ReadNewLine(file, line);
+        line = FindNextWord(line, word, separator);
+        from_string <int> (ni, word, std::dec);
+        line = FindNextWord(line, word, separator);
+        from_string <int> (nj, word, std::dec);
+        nk = 1;
+        if (nDim == THREE_D)
+        {
+            line = FindNextWord(line, word, separator);
+            from_string <int> (nk, word, std::dec);
+        }
+
+        cout << "ni,nj,nk = " << ni << " " << nj << " " << nk << "\n";
+        int ndif = ABS(ni - grid->GetNI()) + ABS(nj - grid->GetNJ()) + ABS(nk - grid->GetNK());
+        if (ndif != 0)
+        {
+            cout << "Dimensions of zone " << iZone + 1 << " in the boundary file do not match those in the grid file ! \n";
+        }
+
+        line = FindNextWord(line, word, separator);
+
+        if (word == "proc")
+        {
+            blockProcessFlag = true;
+            line = FindNextWord(line, word, separator);
+            int proc = 0;
+            from_string <int> (proc, word, std::dec);
+            blockProcessorINP[iZone] = proc;
+        }
+
+        string blockname;
+        ReadNewLine(file, line);
+        line = FindNextWord(line, blockname, separator);
+        int numberOfBCRegion;
+        ReadNewLine(file, line);
+        line = FindNextWord(line, word, separator);
+        from_string <int> (numberOfBCRegion, word, std::dec);
+
+        grid->CreateCompositeBCRegion(numberOfBCRegion);
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+        for (int iBCRegion = 0; iBCRegion < numberOfBCRegion; ++ iBCRegion)
+        {
+            int imin, imax, jmin, jmax, kmin, kmax, BCType;
+            ReadNewLine(file, line);
+            line = FindNextWord(line, word, separator);
+            from_string <int> (imin, word, std::dec);
+            line = FindNextWord(line, word, separator);
+            from_string <int> (imax, word, std::dec);
+
+            line = FindNextWord(line, word, separator);
+            from_string <int> (jmin, word, std::dec);
+            line = FindNextWord(line, word, separator);
+            from_string <int> (jmax, word, std::dec);
+
+            if (nDim == THREE_D)
+            {
+                line = FindNextWord(line, word, separator);
+                from_string <int> (kmin, word, std::dec);
+                line = FindNextWord(line, word, separator);
+                from_string <int> (kmax, word, std::dec);
+            }
+            else
+            {
+                kmin = 1;
+                kmax = 1;
+            }
+
+            line = FindNextWord(line, word, separator);
+            from_string <int> (BCType, word, std::dec);
+
+            StructBC *BCRegions = new StructBC(iZone, iBCRegion);
+            structBCSet->SetBCRegion(iBCRegion, BCRegions);
+            BCRegions->SetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+            BCRegions->SetBCType(BCType);
+
+            string bcName;
+            line = FindNextWord(line, bcName, separator);
+            if (bcName == "")
+            {
+                if (BCType == -1)
+                {
+                    bcName = "Connection";
+                }
+                else
+                {
+                    bcName = boundaryName[BCType];
+                    if ((BCType >7) && (BCType <51))
+                    {
+                        BCType = 2;
+                        BCRegions->SetBCType(BCType);
+                    }
+                }
+                BCRegions->SetBCName(bcName);
+            }
+            else
+            {
+                BCRegions->SetBCName(bcName);
+            }
+
+            if (IsInterface(BCType))
+            {
+                int nbt, originalBlockIndex;
+                ReadNewLine(file, line);
+                line = FindNextWord(line, word, separator);
+                from_string <int> (imin, word, std::dec);
+                line = FindNextWord(line, word, separator);
+                from_string <int> (imax, word, std::dec);
+
+                line = FindNextWord(line, word, separator);
+                from_string <int> (jmin, word, std::dec);
+                line = FindNextWord(line, word, separator);
+                from_string <int> (jmax, word, std::dec);
+
+                if (nDim == THREE_D)
+                {
+                    line = FindNextWord(line, word, separator);
+                    from_string <int> (kmin, word, std::dec);
+                    line = FindNextWord(line, word, separator);
+                    from_string <int> (kmax, word, std::dec);
+                }
+                else
+                {
+                    kmin = 1;
+                    kmax = 1;
+                }
+
+                line = FindNextWord(line, word, separator);
+                from_string <int> (originalBlockIndex, word, std::dec);
+                nbt = originalBlockIndex - 1;
+                BCRegions->SetTargetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+                BCRegions->SetTargetRegionBlock(nbt);
+                if (nDim == THREE_D)
+                {
+                    BCRegions->ComputeRelativeParameters();
+                }
+            }
+        }
+    }
+
+    if (!blockProcessFlag)
+    {
+        delete [] blockProcessorINP;
+        SetZoneProcessID_INP(0);
+    }
+
+    file.close();
+    file.clear();
+}
+
+void Pre_Plot3DToPHengLEI_Struct::Conversion()
+{
+    CheckMeshMultigrid();
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        Grid *grid = grids[iZone];
+        grid->SetLnkInfo();
+        grid->ProcessBCInfo();
+    }
+}
+
+void Pre_Plot3DToPHengLEI_Struct::CheckMeshMultigrid()
+{
+    int km, NN;
+    int km_grid = 1024;
+
+    for (int iZone = 0; iZone < nBlocks; iZone ++)
+    {
+        StructGrid *grid = StructGridCast(grids[iZone]);
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+
+        int nBCRegion = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion ++)
+        {
+            km = 1;
+            NN = 2;
+
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+            int *s_st = structBC->GetStartPoint();
+            int *s_ed = structBC->GetEndPoint();
+
+            while ((((abs(s_st[0])-1)%NN)==0) && (((abs(s_ed[0])-1)%NN)==0) && (((abs(s_st[1])-1)%NN)==0) && (((abs(s_ed[1])-1)%NN)==0) && (((abs(s_st[2])-1)%NN)==0) && (((abs(s_ed[2])-1)%NN)==0))
+            {
+                NN = NN * 2;
+                km = km + 1;
+            }
+            km_grid = min(km_grid, km);
+        }
+    }
+
+    PrintToWindow("The most valid multi-grid level is: ", km_grid, "\n");
+}
+
+}
\ No newline at end of file
diff --git a/API/PreProcess/src/Pre_Reorder.cpp b/API/PreProcess/src/Pre_Reorder.cpp
new file mode 100644
index 0000000..9df3bff
--- /dev/null
+++ b/API/PreProcess/src/Pre_Reorder.cpp
@@ -0,0 +1,1622 @@
+#include "Pre_Reorder.h"
+namespace Reorder
+{
+    void CallBandwidthFTS(const int nTotalCell, vector<int> *cell2Cell, const int *nNeighborCellOfEachCell)
+    {
+        printf("Program is running in CallBandwidthEvaluate\n");
+        int *bandwidthOfEachCell = new int[nTotalCell];
+        for (int iCell = 0; iCell < nTotalCell; iCell ++)
+        {
+            int numCells = nNeighborCellOfEachCell[iCell];
+            int localMaxBand = 0;
+            for (int ngbCell = 0; ngbCell < numCells; ++ ngbCell)
+            {
+                int bandDiff = abs(iCell - cell2Cell[iCell][ngbCell]);
+                if (bandDiff > localMaxBand) localMaxBand = bandDiff;
+            }
+            bandwidthOfEachCell[iCell] = localMaxBand;
+        }
+
+        //statistics of bandwidthOfEachCell
+        int maxGlobalBand = 0; //maximum bandwidth
+        int maxCellID = 0; //cellID of maximum bandwidth
+        int bandDist[33] = {0}; //distribution of bandwidth from 1 to 32 and more
+        for (int i = 0; i < 33; ++ i)
+        {
+            bandDist[i] = 0;
+        }
+
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            int bandCell = bandwidthOfEachCell[iCell];
+            if (bandCell <= 0) 
+            {
+                printf("Error: bandwidth<=0 on cell %d, bandwidth=%d\n", iCell, bandCell);
+                exit(1);
+            }
+            if (bandCell > maxGlobalBand)
+            {
+                maxGlobalBand = bandCell;
+                maxCellID = iCell;
+            }
+            if (bandCell > 32) bandDist[32]++;
+            else bandDist[bandCell-1]++;
+        }
+        
+        printf("maxGlobalBand = %d on cellID %d\n", maxGlobalBand, maxCellID);
+        int nTotalDist = 0;
+        for (int i = 0; i < 33; ++ i)
+        {
+            nTotalDist += bandDist[i];
+            printf("bandDist %d: %d in nTotalCells\n", i+1, bandDist[i]);
+        }
+
+        printf("nTotalDist = %d, nTotalCell = %d\n", nTotalDist, nTotalCell);
+
+    }
+
+    void CallBandwidthEvaluate(Base_Grid_Conn *gconn)
+    {
+        printf("Program is running in CallBandwidthEvaluate\n");
+        cgsize_t nTotalFace = gconn->GetNTotalFace();
+        cgsize_t nBoundFace = gconn->GetNBoundFace();
+        cgsize_t nTotalCell = gconn->GetNTotalCell();
+        printf("nTotalFace = %d, nBoundFace = %d, nTotalCell = %d\n", static_cast<int>(nTotalFace), static_cast<int>(nBoundFace), static_cast<int>(nTotalCell));
+        //How to get leftCellOfFace and rightCellOfFace is from FYGridBase.cpp
+        vector<cgsize_t> &leftCellOfFace  = *gconn->GetLeftCellOfFace();
+        vector<cgsize_t> &rightCellOfFace = *gconn->GetRightCellOfFace();
+        //It is difficult to create cell2Face, because the number of faces belonging to a face is not determined. So, I decide to use the familiar schemes
+        int *cell2Face;
+        int *cell2Cell;
+
+        //offset of iCell's cell faces in cell2Face
+        int *offsetCell2Face = new int[nTotalCell];
+        int nTotalCellFaces = 0;
+
+        int *nFaceOfEachCell = new int[nTotalCell];
+        int *bandwidthOfEachCell = new int[nTotalCell];
+
+        //Initialization of nFaceOfEachCell
+        printf("Initialization\n");
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            nFaceOfEachCell[iCell] = 0;
+            bandwidthOfEachCell[iCell] = 0;
+            offsetCell2Face[iCell] = 0;
+        }
+        //set nFaceOfEachCell and nTotalCellFaces
+        printf("set nFaceOfEachCell and nTotalCellFaces\n");
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            //for leftCellOfFace
+            int cellLabelLeft = static_cast<int>(leftCellOfFace[iFace]);
+            if ((cellLabelLeft < 0) || (cellLabelLeft >= nTotalCell))
+            {
+                printf("Error: cellLabelLeft = %d\n", cellLabelLeft);
+                exit(1);
+            }
+            //nFaceOfEachCell[cellLabel]++;
+            //nTotalCellFaces++;
+            //for rightCellOfFace
+            int cellLabelRight = static_cast<int>(rightCellOfFace[iFace]);
+            if (cellLabelRight == -1) continue; //boundy face's right neighbor
+
+            if ((cellLabelRight < 0) || (cellLabelRight >= nTotalCell)) 
+            {
+                printf("Error: cellLabelRight = %d\n", cellLabelRight);
+                exit(1);
+            }
+            nFaceOfEachCell[cellLabelLeft]++;
+            nTotalCellFaces++;
+            nFaceOfEachCell[cellLabelRight]++;
+            nTotalCellFaces++;
+        }		
+        printf("set the size of cell2Cell and cell2Face\n");
+        //test begin
+            //printf("On cell %d, nFaceOfEachCell[%d]=%d\n", 0, 0, nFaceOfEachCell[0]);
+        //test end
+        //set the size of cell2Cell and cell2Face
+        cell2Face = new int[nTotalCellFaces];
+        cell2Cell = new int[nTotalCellFaces];
+        //set offsetCell2Face
+        offsetCell2Face[0] = 0;
+        for (int iCell = 1; iCell < nTotalCell; ++ iCell)
+        {
+            offsetCell2Face[iCell] = offsetCell2Face[iCell-1] + nFaceOfEachCell[iCell-1];
+        }
+        //set cell2Face
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            //for leftCellOfFace
+            int cellLabelLeft = static_cast<int>(leftCellOfFace[iFace]);
+            if ((cellLabelLeft < 0) || (cellLabelLeft >= nTotalCell))
+            {
+                printf("Error: cellLabelLeft = %d\n", cellLabelLeft);
+                exit(1);
+            }
+            //int cell2faceOffset = offsetCell2Face[cellLabel];
+            //cell2Face[cell2faceOffset] = iFace;
+            //offsetCell2Face update for the next set of face
+            //offsetCell2Face[cellLabel]++;
+            //for rightCellOfFace
+            int cellLabelRight = static_cast<int>(rightCellOfFace[iFace]);
+            if (cellLabelRight == -1) continue; //boundy face's right neighbor
+
+            if ((cellLabelRight < 0) || (cellLabelRight >= nTotalCell))
+            {
+                printf("Error: cellLabelRight = %d\n", cellLabelRight);
+                exit(1);
+            }
+            int cell2faceOffset = offsetCell2Face[cellLabelLeft];
+            cell2Face[cell2faceOffset] = iFace;
+            //offsetCell2Face update for the next set of face
+            offsetCell2Face[cellLabelLeft]++;
+            cell2faceOffset = offsetCell2Face[cellLabelRight];
+            cell2Face[cell2faceOffset] = iFace;
+            offsetCell2Face[cellLabelRight]++;
+        }		
+
+        //reset offsetCell2Face
+        printf("Before reset offsetCell2Face[%d]=%d, nTotalCellFaces = %d\n", static_cast<int>(nTotalCell-1), offsetCell2Face[nTotalCell-1], nTotalCellFaces);
+        offsetCell2Face[0] = 0;
+        for (int iCell = 1; iCell < nTotalCell; ++ iCell)
+        {
+            //offsetCell2Face[iCell] = nFaceOfEachCell[iCell - 1];
+            offsetCell2Face[iCell] = offsetCell2Face[iCell-1] + nFaceOfEachCell[iCell-1];
+        }
+        printf("After reset offsetCell2Face[%d]=%d, nFaceOfEachCell[%d] = %d, nTotalCellFaces = %d\n", static_cast<int>(nTotalCell-1), offsetCell2Face[nTotalCell-1], static_cast<int>(nTotalCell-1), nFaceOfEachCell[nTotalCell-1], nTotalCellFaces);
+        //set cell2Cell
+        //test begin
+            //printf("rightCellOfFace[%d]=%d\n", 23221, rightCellOfFace[23221]);
+        //test end
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            int sizeCellFace = nFaceOfEachCell[iCell];
+            int offsetCellFace = offsetCell2Face[iCell];
+            for (int iFace = 0; iFace < sizeCellFace; ++ iFace)
+            {
+                int faceID = cell2Face[offsetCellFace + iFace];
+                int cellLabel = static_cast<int>(leftCellOfFace[faceID]);
+                if ((cellLabel < 0) || (cellLabel >= nTotalCell)) 
+                {
+                    printf("Error: cellLabel = %d\n", cellLabel);
+                    exit(1);
+                }
+
+                //test begin
+                    //if (iCell == 0) printf("On the left, sizeCellFace =%d, iFace = %d, faceID = %d, cellLabel = %d, rightCell = %d\n", sizeCellFace, iFace, faceID, cellLabel, rightCellOfFace[faceID]);
+                //test end
+
+                if (cellLabel != iCell) cell2Cell[offsetCellFace + iFace] = cellLabel;
+
+                cellLabel = static_cast<int>(rightCellOfFace[faceID]);
+                //test begin
+                    //if (iCell == 0) printf("On the right, faceID = %d, cellLabel = %d\n", faceID, cellLabel);
+                //test end
+                if (cellLabel == -1) continue; //boundy face's right neighbor
+                if ((cellLabel < 0) || (cellLabel >= nTotalCell))
+                {
+                    printf("Error: cellLabel = %d\n", cellLabel);
+                    exit(1);
+                }
+
+                if (cellLabel != iCell) cell2Cell[offsetCellFace + iFace] = cellLabel;
+                
+            }
+        }
+
+        //set bandwidthOfEachCell
+        ComputeBandwidth(static_cast<int>(nTotalCell), nFaceOfEachCell, offsetCell2Face, cell2Cell);
+        /*
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            int sizeCellFace = nFaceOfEachCell[iCell];
+            int offsetCellFace = offsetCell2Face[iCell];
+
+            //The max band between iCell and neighbor cells
+            int maxLocalBand = 0;
+            for (int iFace = 0; iFace < sizeCellFace; iFace++)
+            {
+                int cellID = cell2Cell[offsetCellFace+iFace];
+                int bandDiff = abs(iCell - cellID);
+                if (bandDiff > maxLocalBand) maxLocalBand = bandDiff;
+                //test begin
+                    //if (iCell == 0) printf("offsetCellFace = %d, iFace = %d, cellID = %d, bandDiff = %d\n", offsetCellFace, iFace, cellID, bandDiff);
+                //test end
+            }
+            bandwidthOfEachCell[iCell] = maxLocalBand;
+        }
+        //statistics of bandwidthOfEachCell
+        int maxGlobalBand = 0; //maximum bandwidth
+        int maxCellID = 0; //cellID of maximum bandwidth
+        int bandDist[33]; //distribution of bandwidth from 1 to 32 and more
+        for (int i = 0; i < 33; i++)
+        {
+            bandDist[i] = 0;
+        }
+
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            int bandCell = bandwidthOfEachCell[iCell];
+            if (bandCell <= 0) {
+                printf("Error: bandwidth<=0 on cell %d, bandwidth=%d\n", iCell, bandCell);
+                exit(1);
+            }
+            if (bandCell > maxGlobalBand) 
+            {
+                maxGlobalBand = bandCell;
+                maxCellID = iCell;
+            }
+            if (bandCell > 32) bandDist[32]++;
+            else bandDist[bandCell-1]++;
+        }
+        
+        printf("maxGlobalBand = %d on cellID %d\n", maxGlobalBand, maxCellID);
+        int nTotalDist = 0;
+        for (int i = 0; i < 33; i++)
+        {
+            nTotalDist += bandDist[i];
+            printf("bandDist %d: %d in nTotalCells\n", i+1, bandDist[i]);
+        }
+
+        printf("nTotalDist = %d, nTotalCell = %d\n", nTotalDist, nTotalCell);
+        */
+        delete []bandwidthOfEachCell;    bandwidthOfEachCell = NULL;		
+    }
+    
+    void CallReorderFaceLabel(Base_Grid_Conn *gconn)
+    {
+        printf("Program is running in CallReorderFaceLabel\n");
+        cgsize_t nTotalFace = gconn->GetNTotalFace();
+        cgsize_t nBoundFace = gconn->GetNBoundFace();
+        cgsize_t nTotalCell = gconn->GetNTotalCell();
+        printf("nTotalFace = %d, nBoundFace = %d, nTotalCell = %d\n", static_cast<int>(nTotalFace), static_cast<int>(nBoundFace), static_cast<int>(nTotalCell));
+
+        vector<cgsize_t> &leftCellOfFace  = *gconn->GetLeftCellOfFace();
+        vector<cgsize_t> &rightCellOfFace = *gconn->GetRightCellOfFace();
+        int *oldLeftCellOfFace = new int[nTotalFace];
+        int *oldRightCellOfFace = new int[nTotalFace];
+        
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            oldLeftCellOfFace[iFace] = static_cast<int>(leftCellOfFace[iFace]);
+            oldRightCellOfFace[iFace] = static_cast<int>(rightCellOfFace[iFace]);
+        }
+        int *cell2Face;
+        int *leftRightCellFaces;//corresponding to cell2Face, leftRightCellFaces record the cell is the left or right cell of one face. 
+
+        //int * cell2Cell;
+        //offset of iCell's cell faces in cell2Face
+        int *offsetCell2Face = new int[nTotalCell];
+        int nTotalCellFaces = 0;
+
+        int *nFaceOfEachCell = new int[nTotalCell];
+
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            nFaceOfEachCell[iCell] = 0;
+            offsetCell2Face[iCell] = 0;
+        }
+        //set nFaceOfEachCell and nTotalCellFaces
+        printf("set nFaceOfEachCell and nTotalCellFaces\n");
+        SetFaceNumberOfEachCell(static_cast<int>(nTotalFace), static_cast<int>(nTotalCell), oldLeftCellOfFace, oldRightCellOfFace, nFaceOfEachCell, nTotalCellFaces);
+        //set the size of cell2Cell and cell2Face
+        printf("Before create of cell2Cell nTotalCellFaces = %d\n", nTotalCellFaces);
+        cell2Face = new int[nTotalCellFaces];
+        leftRightCellFaces = new int[nTotalCellFaces];
+        //cell2Cell = new int[nTotalCellFaces];
+
+        //set offsetCell2Face
+        SetOffSetCell2Face(static_cast<int>(nTotalCell), nFaceOfEachCell, offsetCell2Face);
+        //set cell2Face
+        SetCell2Face(static_cast<int>(nTotalFace), static_cast<int>(nTotalCell), oldLeftCellOfFace, oldRightCellOfFace, offsetCell2Face, cell2Face);
+        //reset offsetCell2Face
+        printf("Before reset offsetCell2Face[%d]=%d, nTotalCellFaces = %d\n", static_cast<int>(nTotalCell-1), offsetCell2Face[nTotalCell-1], nTotalCellFaces);
+        //offsetCell2Face is modified due to update of cell2Face
+        //set offsetCell2Face again
+        SetOffSetCell2Face(static_cast<int>(nTotalCell), nFaceOfEachCell, offsetCell2Face);
+        printf("After reset offsetCell2Face[%d]=%d, nFaceOfEachCell[%d] = %d, nTotalCellFaces = %d\n", static_cast<int>(nTotalCell-1), offsetCell2Face[nTotalCell-1], static_cast<int>(nTotalCell-1), nFaceOfEachCell[nTotalCell-1], nTotalCellFaces);
+        //check cell2Face
+        //rule 1: nBoundFace-1<cell2Face<nTotalFace
+        //rule 2: in cell2Face, every value owns at least 1 item.
+        printf("Checking cell2Face ...\n");
+        int *faceIDRecord = new int[nTotalFace-nBoundFace];
+        for (int iFace = 0; iFace < (nTotalFace-nBoundFace); ++ iFace)
+        {
+            faceIDRecord[iFace] = 0;
+        }
+        for (int cellID = 0; cellID < nTotalCell; ++ cellID)
+        {
+            int numFaces = nFaceOfEachCell[cellID];
+            int offset = offsetCell2Face[cellID];
+            for (int iFace=0; iFace < numFaces; ++ iFace)
+            {
+                int faceID = cell2Face[offset+iFace];
+                //rule 1
+                if ((faceID < nBoundFace) || (faceID > nTotalFace))
+                {
+                    printf("Error: faceID %d on cellID %d and iFace %d is outside of nBoundFace %d and nTotalFace-1 %d\n", faceID, cellID, iFace, static_cast<int>(nBoundFace), static_cast<int>(nTotalFace-1));
+                    exit(1);
+                }
+                int remains = faceID - static_cast<int>(nBoundFace);
+                faceIDRecord[remains]++;
+            }
+        }
+        for (int iFace = 0; iFace < (nTotalFace-nBoundFace); ++ iFace)
+        {
+            int numFaces = faceIDRecord[iFace];
+            //rule 2
+            if (numFaces < 1) 
+            {
+                printf("Error: the number of faceID %d is %d\n", iFace+ static_cast<int>(nBoundFace), numFaces);
+                exit(1);
+            }
+        }
+        
+        //set leftRightCellFaces, which stores face
+        //SetLeftRightCellFaces();
+        int numBoundaryFaces = 0;
+        for (int cellID = 0; cellID < nTotalCell; ++ cellID)
+        {
+            int offset = offsetCell2Face[cellID];
+            int numFaces = nFaceOfEachCell[cellID];
+            for (int iFace = 0; iFace < numFaces; iFace++)
+            {
+                int faceID = cell2Face[offset+iFace];
+                if (oldLeftCellOfFace[faceID] == -1)
+                {
+                    printf("Error: on faceID=%d, leftCellOfFace is -1\n", faceID);
+                    exit(1);
+                }
+                if (oldRightCellOfFace[faceID] == -1) numBoundaryFaces ++;
+                //if (oldRightCellOfFace[faceID] == -1) numBoundaryFaces++;
+                if (oldLeftCellOfFace[faceID] == cellID) leftRightCellFaces[offset+iFace] = 1;
+                if (oldRightCellOfFace[faceID] == cellID) leftRightCellFaces[offset+iFace] = -1;
+                
+            }
+        }
+        //if (numBoundaryFaces != nBoundFace) {
+        //Because cell2Face does not contain boudnary faces
+        if (numBoundaryFaces != 0)
+        {
+            printf("Error: numBoundaryFaces=%d is not equal to 0\n", numBoundaryFaces);
+            exit(1);
+        }
+
+        //Reorder faceID from nBoundFace to nTotalFace
+        int *newFaces = new int[nTotalFace]; //Old faceID and containerID
+        //set the initial value of labelFace as nBoundFace-1
+        int labelFace = static_cast<int>(nBoundFace)-1;
+        //Initialize newFaces by -1, which means not changed.
+        for (int faceID = 0; faceID < nTotalFace; ++ faceID)
+        {
+            newFaces[faceID] = -1;
+        }
+        
+        int faceReorderMethod = PHSPACE::GlobalDataBase::GetIntParaFromDB("faceReorderMethod");
+        if (faceReorderMethod == 0)
+        {
+            //BSFCELLFACE means Broad Search First: faceID is distributed face by face in one cell with the ascending order. One cell starts before faceID distribution in one cell is finished. In fact, it is based on original faceID order. Before ReOrder, cell2Face has been reordered with old faceID in ascending order.
+            //Ascending cell2Face for each cell
+            printf("BSFCELLFACEORG: Ascending cell2Face order...\n");
+            for (int cellID = 0; cellID < nTotalCell; ++ cellID)
+            {
+                int offset = offsetCell2Face[cellID];
+                int numFaces = nFaceOfEachCell[cellID];
+                int loopNum = numFaces - 1;
+                //bubble sort
+                for (int jFace = 0; jFace < numFaces-1; ++ jFace)
+                {
+                    for (int iFace = 0; iFace < loopNum; ++ iFace)
+                    {
+                        int faceID = cell2Face[offset+iFace];
+                        int faceIDNext = cell2Face[offset+iFace+1];
+                        if (faceID > faceIDNext)
+                        {
+                            cell2Face[offset+iFace] = faceIDNext;
+                            cell2Face[offset+iFace+1] = faceID;
+                            int temp = leftRightCellFaces[offset+iFace];
+                            leftRightCellFaces[offset+iFace] = leftRightCellFaces[offset+iFace+1];
+                            leftRightCellFaces[offset+iFace+1] = temp;
+                        }
+                    }
+
+                    loopNum --;
+
+                }
+            }
+            printf("BSFCELLFACEORG: checking cell2Face order...\n");
+            for (int cellID = 0; cellID < nTotalCell; ++ cellID)
+            {
+                int offset = offsetCell2Face[cellID];
+                int numFaces = nFaceOfEachCell[cellID];
+                for (int iFace = 0; iFace < numFaces-1; iFace++)
+                {
+                    int faceID = cell2Face[offset+iFace];
+                    int faceIDNext = cell2Face[offset+iFace+1];
+                    if (faceID > faceIDNext)
+                    {
+                        printf("Error: faceID %d on cellID %d iFace %d is larger than faceIDNext %d\n", faceID, cellID, iFace, faceIDNext);
+                        exit(1);
+                    }
+                }
+            }
+            printf("BSFCELLFACEORG: Reorder cell labels ...\n");
+            CellReorderByCell2FaceOrder(static_cast<int>(nTotalCell), static_cast<int>(nTotalFace), offsetCell2Face, nFaceOfEachCell, cell2Face, static_cast<int>(nBoundFace), labelFace, newFaces);
+        }else if (faceReorderMethod == 1)
+        {
+            //It is quite similar as BSFCELLFACEORG. Firstly, cell2Face is reorded with old faceID with leftCellOfFace in ascending order. Then, set those faceID from nBoundFace to nTotalFace
+            //Ascending cell2Face for each cell
+            printf("BSFCELLFACELEFT: Ascending cell2Face order by leftCellOfFace ...\n");
+            for (int cellID = 0; cellID < nTotalCell; ++ cellID)
+            {
+                int offset = offsetCell2Face[cellID];
+                int numFaces = nFaceOfEachCell[cellID];
+                int loopNum = numFaces-1;
+                //bubble sort
+                for (int jFace = 0; jFace < numFaces-1; ++ jFace)
+                {
+                    for (int iFace = 0; iFace < loopNum; ++ iFace)
+                    {
+                        int faceID = cell2Face[offset+iFace];
+                        int leftCell = oldLeftCellOfFace[faceID];
+                        int faceIDNext = cell2Face[offset+iFace+1];
+                        int leftCellNext = oldLeftCellOfFace[faceIDNext];
+                        if (leftCell > leftCellNext){
+                            cell2Face[offset+iFace] = faceIDNext;
+                            cell2Face[offset+iFace+1] = faceID;
+                            int temp = leftRightCellFaces[offset+iFace];
+                            leftRightCellFaces[offset+iFace] = leftRightCellFaces[offset+iFace+1];
+                            leftRightCellFaces[offset+iFace+1] = temp;
+                        }
+                    }
+                    loopNum --;
+                }
+            }
+            printf("BSFCELLFACELEFT: checking cell2Face order...\n");
+            for (int cellID = 0; cellID < nTotalCell; ++ cellID)
+            {
+                int offset = offsetCell2Face[cellID];
+                int numFaces = nFaceOfEachCell[cellID];
+                for (int iFace = 0; iFace < numFaces-1; ++ iFace)
+                {
+                    int faceID = cell2Face[offset+iFace];
+                    int faceIDNext = cell2Face[offset+iFace+1];
+                    int leftCell = oldLeftCellOfFace[faceID];
+                    int leftCellNext = oldLeftCellOfFace[faceIDNext];
+                    if (leftCell > leftCellNext){
+                        printf("Error: faceID %d on cellID %d iFace %d with leftCell %d is larger than leftCellNext %d\n", faceID, cellID, iFace, leftCell, leftCellNext);
+                        exit(1);
+                    }
+                }
+            }
+            //Reorder cell label by faces in cell2Face
+            CellReorderByCell2FaceOrder(static_cast<int>(nTotalCell), static_cast<int>(nTotalFace), offsetCell2Face, nFaceOfEachCell, cell2Face, static_cast<int>(nBoundFace), labelFace, newFaces);
+        }else if (faceReorderMethod == 2)
+        {
+            //It is quite similar as BSFCELLFACEORG. Firstly, cell2Face is reorded with old faceID with rightCellOfFace in ascending order. Then, set those faceID from nBoundFace to nTotalFace
+            //Ascending cell2Face for each cell
+            printf("BSFCELLFACERIGHT: Ascending cell2Face order by rightCellOfFace ...\n");
+            for (int cellID = 0; cellID < nTotalCell; ++ cellID)
+            {
+                int offset = offsetCell2Face[cellID];
+                int numFaces = nFaceOfEachCell[cellID];
+                int loopNum = numFaces-1;
+                //bubble sort
+                for (int jFace = 0; jFace < numFaces-1; ++ jFace)
+                {
+                    for (int iFace = 0; iFace < loopNum; ++ iFace)
+                    {
+                        int faceID = cell2Face[offset+iFace];
+                        int rightCell = oldRightCellOfFace[faceID];
+                        int faceIDNext = cell2Face[offset+iFace+1];
+                        int rightCellNext = oldRightCellOfFace[faceIDNext];
+                        if (rightCell > rightCellNext)
+                        {
+                            cell2Face[offset+iFace] = faceIDNext;
+                            cell2Face[offset+iFace+1] = faceID;
+                            int temp = leftRightCellFaces[offset+iFace];
+                            leftRightCellFaces[offset+iFace] = leftRightCellFaces[offset+iFace+1];
+                            leftRightCellFaces[offset+iFace+1] = temp;
+                        }
+                    }
+                    loopNum --;
+                }
+            }
+            printf("BSFCELLFACERIGHT: checking cell2Face order...\n");
+            for (int cellID = 0; cellID < nTotalCell; ++ cellID)
+            {
+                int offset = offsetCell2Face[cellID];
+                int numFaces = nFaceOfEachCell[cellID];
+                for (int iFace = 0; iFace < numFaces-1; ++ iFace)
+                {
+                    int faceID = cell2Face[offset+iFace];
+                    int faceIDNext = cell2Face[offset+iFace+1];
+                    int rightCell = oldRightCellOfFace[faceID];
+                    int rightCellNext = oldRightCellOfFace[faceIDNext];
+                    if (rightCell > rightCellNext)
+                    {
+                        printf("Error: faceID %d on cellID %d iFace %d with rightCell %d is larger than rightCellNext %d\n", faceID, cellID, iFace, rightCell, rightCellNext);
+                        exit(1);
+                    }
+                }
+            }
+            //Reorder cell label by faces in cell2Face
+            CellReorderByCell2FaceOrder(static_cast<int>(nTotalCell), static_cast<int>(nTotalFace), offsetCell2Face, nFaceOfEachCell, cell2Face, static_cast<int>(nBoundFace), labelFace, newFaces);
+        }
+
+        //check reorder results
+        //rule 1 Before nBoundFace, newFaces=-1
+        //rule 2 nBoundFace <= newFaces < nTotalFace
+        //rule 3 After nBoundFace, no elements are the same in newFaces
+        printf("Checking newFaces which is Reorder cell labels results...\n");
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            //rule 1
+            if (newFaces[iFace]!=-1) {
+                printf("Error in rule 1: on iFace %d, newFaces is -1\n", iFace);
+                exit(1);
+            }
+        }
+        int *recordFaceID = new int[nTotalFace-nBoundFace];
+        for (int iFace = 0; iFace < nTotalFace-nBoundFace; ++ iFace)
+        {
+            recordFaceID[iFace] = 0;
+        }
+        for (int iFace = static_cast<int>(nBoundFace); iFace < nTotalFace-nBoundFace; ++ iFace)
+        {
+            int faceID = newFaces[iFace];
+            //rule 2
+            if ((faceID < nBoundFace) || (faceID>(nTotalFace-1)))
+            {
+                printf("Error in rule 2: on iFace %d of newFaces, faceID = %d is outside of nBoundFace %d and nTotalFace - 1 %d\n", iFace, faceID, static_cast<int>(nBoundFace), static_cast<int>(nTotalFace-1));
+                exit(1);
+            }
+            int remains = (static_cast<int>(nTotalFace)-1) - faceID;
+            recordFaceID[remains] ++;
+        }
+        //rule 3
+        for (int iFace = 0; iFace < nTotalFace-nBoundFace; ++ iFace)
+        {
+            if (recordFaceID[iFace] > 1) 
+            {
+                printf("Error: more than two faces own the same faceID %d\n", static_cast<int>(nTotalFace) - 1 - iFace);
+                exit(1);
+            }
+        }
+        
+        //set newFaces bwtween 0 and nBoundFace-1
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            newFaces[iFace] = iFace;
+        }
+    
+        //create reflectFaces for recording relationship of containerID and old cellID
+        int *reflectFaces = new int[nTotalFace];
+        for (int oldFaceID = 0; oldFaceID < nTotalFace; ++ oldFaceID)
+        {
+            int containerID = newFaces[oldFaceID];
+            reflectFaces[containerID] = oldFaceID;
+        }
+        //check reflectFaceID
+        //rule 1: 0~nBoundFace, reflectFaces[iFace]=iFace
+        //rule 2: nBoundFace~nTotalFace, nBoundFace<=reflectFaces<nTotalFace
+        //rule 3: 0~nTotalFace, reflectFaces does not own the same old faceID
+        printf("Checking reflectFaceID  results...\n");
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            //rule 1
+            if (reflectFaces[iFace] != iFace) 
+            {
+                printf("Error: on containerID %d, is not the same faceID\n", iFace);
+                exit(1);
+            }
+        }
+        for (int iFace = 0; iFace < nTotalFace-nBoundFace; ++ iFace)
+        {
+            recordFaceID[iFace] = 0;
+        }
+        for (int iFace = static_cast<int>(nBoundFace); iFace < nTotalFace; ++ iFace)
+        {
+            int oldFaceID = reflectFaces[iFace];
+            if ((oldFaceID < nBoundFace)||(oldFaceID > nTotalFace))
+            {
+                //rule 2
+                printf("Error: on containerID %d, oldFaceID %d is outside nBoundFace and nTotalFace\n", iFace, oldFaceID);
+                exit(1);
+            }
+            int remains = oldFaceID - static_cast<int>(nBoundFace);
+            recordFaceID[remains] ++;
+        }
+        for (int iFace = 0; iFace < nTotalFace-nBoundFace; ++ iFace)
+        {
+            if (recordFaceID[iFace] != 1) 
+            {
+                //rule 3
+                printf("Error: on iFace %d, face number %d is not 1\n", iFace+ static_cast<int>(nBoundFace), recordFaceID[iFace]);
+                exit(1);
+            }
+        }
+        
+        //swap method for updating nNodeOfEachFace, face2Node,
+        //leftCellOfFace and rightCellOfFace
+        vector< vector<cgsize_t> > & face2Node = *gconn->GetFace2Node();
+        vector<int> & nNodeOfEachFace = *gconn->GetNodeNumberOfEachFace();
+                
+        int *orgFace = new int[nTotalFace]; //containerID and old faceID reflection
+        int *swapFace = new int[nTotalFace];//old faceID and containerID reflection
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            orgFace[iFace] = iFace;
+            swapFace[iFace] = iFace;
+        }
+
+        for (int faceID = 0; faceID < nTotalFace; ++ faceID)
+        {
+            if (orgFace[faceID] == reflectFaces[faceID]) continue;
+            int targetID = reflectFaces[faceID];
+            int currentID = orgFace[faceID];
+            int swapID = swapFace[targetID];
+            //update nNodeOfEachFace on faceID and swapID
+            int tempNumNode = nNodeOfEachFace[swapID];
+            nNodeOfEachFace[swapID] = nNodeOfEachFace[faceID];
+            nNodeOfEachFace[faceID] = tempNumNode;
+            //update face2Node on faceID and swapID
+            vector<cgsize_t> tempFace = face2Node[swapID];
+            face2Node[swapID] = face2Node[faceID];
+            face2Node[faceID] = tempFace;
+            //update leftCellOfFace on faceID and swapID
+            int tempCell = static_cast<int>(leftCellOfFace[swapID]);
+            leftCellOfFace[swapID] = leftCellOfFace[faceID];
+            leftCellOfFace[faceID] = tempCell;
+            //update rightCellOfFace on faceID and swapID
+            tempCell = static_cast<int>(rightCellOfFace[swapID]);
+            rightCellOfFace[swapID] = rightCellOfFace[faceID];
+            rightCellOfFace[faceID] = tempCell;
+            //update orgFace on faceID and swapID
+            orgFace[faceID] = targetID;
+            orgFace[swapID] = currentID;
+            //update swapID on targetID and currentID
+            swapFace[targetID] = faceID;
+            swapFace[currentID] = swapID;
+        }
+        //check orgFace and swapFace
+        printf("Check orgFace and swapFace ...\n");
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            if (orgFace[iFace] != reflectFaces[iFace])
+            {
+                printf("Error: on iFace %d, orgFace %d is not equal to reflectFaces %d\n", iFace, orgFace[iFace], reflectFaces[iFace]);
+                exit(1);
+            }
+
+            if (swapFace[iFace] != newFaces[iFace])
+            {
+                printf("Error:  on iFace %d, swapFace %d is not equal to newFaces %d\n", iFace, swapFace[iFace], newFaces[iFace]);
+                exit(1);
+            }
+        }
+        
+    }
+
+    void CallReorderCellLabel(Base_Grid_Conn * gconn)
+    {
+        printf("Program is running in CallReorderCellLabel\n");
+        cgsize_t nTotalFace = gconn->GetNTotalFace();
+        cgsize_t nBoundFace = gconn->GetNBoundFace();
+        cgsize_t nTotalCell = gconn->GetNTotalCell();
+        printf("nTotalFace = %d, nBoundFace = %d, nTotalCell = %d\n", static_cast<int>(nTotalFace), static_cast<int>(nBoundFace), static_cast<int>(nTotalCell));
+
+        vector<cgsize_t> &leftCellOfFace  = *gconn->GetLeftCellOfFace();
+        vector<cgsize_t> &rightCellOfFace = *gconn->GetRightCellOfFace();
+        int *oldLeftCellOfFace = new int[nTotalFace];
+        int *oldRightCellOfFace = new int[nTotalFace];
+        
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            oldLeftCellOfFace[iFace] = static_cast<int>(leftCellOfFace[iFace]);
+            oldRightCellOfFace[iFace] = static_cast<int>(rightCellOfFace[iFace]);
+        }
+
+        int *cell2Face;
+        int *cell2Cell;
+        //offset of iCell's cell faces in cell2Face
+        int *offsetCell2Face = new int[nTotalCell];
+        int nTotalCellFaces = 0;
+
+        int *nFaceOfEachCell = new int[nTotalCell];
+
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            nFaceOfEachCell[iCell] = 0;
+            offsetCell2Face[iCell] = 0;
+        }
+
+        //set nFaceOfEachCell and nTotalCellFaces
+        printf("set nFaceOfEachCell and nTotalCellFaces\n");
+        SetFaceNumberOfEachCell(static_cast<int>(nTotalFace), static_cast<int>(nTotalCell), oldLeftCellOfFace, oldRightCellOfFace, nFaceOfEachCell, nTotalCellFaces);
+        
+        //set the size of cell2Cell and cell2Face
+        printf("Before create of cell2Cell nTotalCellFaces = %d\n", nTotalCellFaces);
+        cell2Face = new int[nTotalCellFaces];
+        cell2Cell = new int[nTotalCellFaces];
+
+        //set offsetCell2Face
+        SetOffSetCell2Face(static_cast<int>(nTotalCell), nFaceOfEachCell, offsetCell2Face);
+        
+        //set cell2Face
+        SetCell2Face(static_cast<int>(nTotalFace), static_cast<int>(nTotalCell), oldLeftCellOfFace, oldRightCellOfFace, offsetCell2Face, cell2Face);
+        
+        //reset offsetCell2Face
+        printf("Before reset offsetCell2Face[%d]=%d, nTotalCellFaces = %d\n", static_cast<int>(nTotalCell)-1, offsetCell2Face[nTotalCell-1], nTotalCellFaces);
+        
+        //offsetCell2Face is modified due to update of cell2Face
+        //set offsetCell2Face again
+        SetOffSetCell2Face(static_cast<int>(nTotalCell), nFaceOfEachCell, offsetCell2Face);
+        
+        printf("After reset offsetCell2Face[%d]=%d, nFaceOfEachCell[%d] = %d, nTotalCellFaces = %d\n", static_cast<int>(nTotalCell)-1, offsetCell2Face[nTotalCell-1], static_cast<int>(nTotalCell)-1, nFaceOfEachCell[nTotalCell-1], nTotalCellFaces);
+
+        //set cell2Cell
+        SetCell2Cell(static_cast<int>(nTotalCell), nFaceOfEachCell, offsetCell2Face, cell2Face, oldLeftCellOfFace, oldRightCellOfFace, cell2Cell);
+        
+        //check cell2Cell, to see some rules:
+        //rule 1 one cell's neighbor cells should not contain itself.
+        //rule 2 0<= one cell's neighbor cells < nTotalCell
+        //rule 3 one cell's neighbor cells should be different.
+        //It should be noted that for O type grid, break 3 may be broken.
+        CheckCell2Cell(static_cast<int>(nTotalCell), nFaceOfEachCell, offsetCell2Face, cell2Cell);
+        //By above process, cell2Cell is established, which stores one cell's neighbour cells' labels. offsetCell2Face can be used by access of cell2Cell. nFaceOfEachCell stores face number owned by one cell, which can also be used for neighbour cell number owned by one cell. Boundary faces are not considered in both cell2Cell, offsetCell2Face and nFaceOfEachCell.
+        //For reording cell index, cell2Cell with offsetCell2Face can supply cell connection information. nFaceOfEachCell can supply degree of cell. 
+        int maxDegree = 0;
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            int degreeCell = nFaceOfEachCell[iCell];
+            if (maxDegree < degreeCell) maxDegree = degreeCell;
+        }
+        printf("The maximum degree of cell is %d\n", maxDegree);
+        //establish containers
+        int *reorderCell = new int[nTotalCell]; //reorder cell labels
+        int *newCell = new int[nTotalCell]; //reorder cell labels
+        //int maxSizeLevel = maxDegree * maxDegree; //maximum number of one level
+        //It may be very large, not just maxDegree*maxDegree
+        //int maxSizeLevel = 5000; //maximum number of one level
+        //The worst condition
+        int maxSizeLevel = static_cast<int>(nTotalCell); //maximum number of one level
+        int *cellIDSortCur = new int[maxSizeLevel];
+        int numSortCur = 0;
+        int *cellIDSortNext = new int[maxSizeLevel];
+        int numSortNext = 0;
+        //Initialization of reorderCell by -1
+        for (int iCell = 0; iCell < nTotalCell; ++iCell) reorderCell[iCell] = -1;
+        //Initialization of newCell by -1
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell) newCell[iCell] = -1;
+        //Initialization of cellIDSortCur and cellIDSortNext by -1
+        for (int iCell = 0; iCell < maxSizeLevel; ++ iCell) 
+        {
+            cellIDSortCur[iCell] = -1;
+            cellIDSortNext[iCell] = -1;
+        }
+        
+        printf("Searching the root vertex ...\n");
+        //start from vetex 0	
+        int rStart = 0;
+        printf("At the beginning, rStart = %d\n", rStart);
+        //Here, reorderCell is used for marking a cell exsiting in root level structure
+        reorderCell[rStart] = 1;
+        int lCur = 0;
+        int lOld = -1;
+        //Get current level of vertex r
+        GetCurrentLevel(rStart, nFaceOfEachCell, cell2Cell, offsetCell2Face, reorderCell, numSortCur, cellIDSortCur);	
+        
+        //Get the next level of vertex r
+        GetNextLevel(numSortCur, cellIDSortCur, nFaceOfEachCell, cell2Cell, offsetCell2Face, reorderCell, numSortNext, cellIDSortNext);
+        
+        while (lCur > lOld)
+        {
+            lOld = lCur;
+            lCur = 0;
+            while (numSortNext > 0)
+            {
+                lCur ++;
+                
+                ResetCellSort(numSortCur, cellIDSortCur);
+                SetCellIDSortCurByCellIDSortNext(numSortNext, cellIDSortNext, numSortCur, cellIDSortCur);
+                ResetCellSort(numSortNext, cellIDSortNext);
+                GetNextLevel(numSortCur, cellIDSortCur, nFaceOfEachCell, cell2Cell, offsetCell2Face, reorderCell, numSortNext, cellIDSortNext);
+            }
+            if (lCur > lOld)
+            {
+                
+                //get the minimum degree in cellIDSortCur, start the next iteration
+                rStart = FindMinCellIDSortCur(numSortCur, cellIDSortCur, nFaceOfEachCell);
+                //printf("rStart = %d in numSortCur %d\n", rStart, numSortCur);
+                //reset R by -1
+                for (int iCell = 0; iCell < nTotalCell; ++ iCell) reorderCell[iCell] = -1;
+                //reset numSortCur by -1
+                ResetCellSort(numSortCur, cellIDSortCur);
+                //reset numSortNext by -1
+                ResetCellSort(numSortNext, cellIDSortNext);
+
+                reorderCell[rStart] = 1;
+
+                GetCurrentLevel(rStart, nFaceOfEachCell, cell2Cell, offsetCell2Face, reorderCell, numSortCur, cellIDSortCur);	
+
+                GetNextLevel(numSortCur, cellIDSortCur, nFaceOfEachCell, cell2Cell, offsetCell2Face, reorderCell, numSortNext, cellIDSortNext);
+                    
+                
+            }
+            printf("lCur = %d, lOld = %d, numSortNext=%d, rStart = %d\n", lCur, lOld, numSortNext ,rStart);
+        }
+
+        printf("Reorder cell index ...\n");
+        printf("Start from %d\n", rStart);
+        //reset reorderCell by -1
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell) reorderCell[iCell] = -1;
+        //reset numSortCur by -1
+        ResetCellSort(numSortCur, cellIDSortCur);
+
+        //reset numSortNext by -1
+        ResetCellSort(numSortNext, cellIDSortNext);
+    
+        //set rStart as 0, and numVertex as 1
+        reorderCell[rStart] = 1;	
+        int numVertex = 0;
+        newCell[rStart] = numVertex;	
+        int nLevel = 0;
+        
+        //Get current level of rStart
+        //GetCurrentLevelForReOrder(rStart, nFaceOfEachCell, cell2Cell, offsetCell2Face, reorderCell, numSortCur, cellIDSortCur);
+        GetCurrentLevel(rStart, nFaceOfEachCell, cell2Cell, offsetCell2Face, reorderCell, numSortCur, cellIDSortCur);
+
+        while(numSortCur > 0)
+        {
+            printf("nLevel = %d, numSortCur = %d\n", nLevel, numSortCur);
+         
+            AscendingCellIDSortCurByDegree(numSortCur, nFaceOfEachCell, cellIDSortCur);	
+            ReOrderLevelCur(numSortCur, cellIDSortCur, numVertex, newCell);
+
+            GetNextLevel(numSortCur, cellIDSortCur, nFaceOfEachCell, cell2Cell, offsetCell2Face, reorderCell, numSortNext, cellIDSortNext);
+
+            ResetCellSort(numSortCur, cellIDSortCur);
+            SetCellIDSortCurByCellIDSortNext(numSortNext, cellIDSortNext, numSortCur, cellIDSortCur);
+            ResetCellSort(numSortNext, cellIDSortNext);
+            nLevel ++;
+
+        }
+        printf("Finish cell reorder by RCM scheme...\n");
+        printf("nToatalCell = %d, numVertex = %d\n", static_cast<int>(nTotalCell), numVertex);
+        //reverse newCell
+        //Not sure
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            newCell[iCell] = static_cast<int>(nTotalCell) - 1 - newCell[iCell];
+        }
+        //! Check rules for cell index
+        CheckNewCell(static_cast<int>(nTotalCell), newCell);
+
+        int *reflectCell = new int[nTotalCell];
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            int cellID = newCell[iCell];
+            reflectCell[cellID] = iCell;
+        }
+        //define new nFaceOfEachCell and new offsetCell2Face
+        int *nNewFaceOfEachCell = new int[nTotalCell];
+        int *newOffsetCell2Face = new int[nTotalCell];
+        //set nNewFaceOfEachCell
+        for (int cellID = 0; cellID < nTotalCell; ++ cellID)
+        {
+            int reflectCellID = reflectCell[cellID];
+            nNewFaceOfEachCell[cellID] = nFaceOfEachCell[reflectCellID];
+        }
+
+        SetOffSetCell2Face(static_cast<int>(nTotalCell), nNewFaceOfEachCell, newOffsetCell2Face);
+        //! Define new leftCellOfFace and rightCellOfFace
+        //! Define new cell2Cell and cell2Face
+        printf("Before create of newCell2Cell, nTotalCellFaces = %d\n", nTotalCellFaces);
+        int *newCell2Cell = new int[nTotalCellFaces];
+        
+        //! Set newCell2Cell
+        for (int cellID = 0; cellID < nTotalCell; ++ cellID)
+        {
+            int reflectCellID = reflectCell[cellID];
+            int numCellCellsOld = nFaceOfEachCell[reflectCellID];
+            int numCellCellsNew = nNewFaceOfEachCell[cellID];
+            if (numCellCellsOld != numCellCellsNew) 
+            {
+                printf("Error: on cellID %d, numCellCellsNew %d is not equal to numCellCellsOld %d on reflectCellID %d\n", cellID, numCellCellsNew, numCellCellsOld, reflectCellID);
+                exit(1);
+            }
+            int offsetNew = newOffsetCell2Face[cellID];
+            int offsetOld = offsetCell2Face[reflectCellID];
+            for (int iCell = 0; iCell < numCellCellsNew; ++ iCell)
+            {
+                int newCellID = newCell[cell2Cell[offsetOld+iCell]];
+                newCell2Cell[offsetNew+iCell] = newCellID;
+            }
+        }
+    
+        //! Check newCell2Cell
+        CheckCell2Cell(static_cast<int>(nTotalCell), nNewFaceOfEachCell, newOffsetCell2Face, newCell2Cell);
+        
+        //! Calculate bandwidth again    
+        ComputeBandwidth(static_cast<int>(nTotalCell), nNewFaceOfEachCell, newOffsetCell2Face, newCell2Cell);
+        
+        //! According to cell reorder, Update face_number_of_each_face by swap
+        //! Input: face_nuber_of_each_cell and reflectCell
+        SwapFaceNumberOfEachFace(static_cast<int>(nTotalCell), nFaceOfEachCell, reflectCell, nNewFaceOfEachCell);
+        
+        //! Update leftCellOfFace and rightCellOfFace
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            //! For leftCellOfFace
+            int oldCellID = static_cast<int>(leftCellOfFace[iFace]);
+            //! Not bounday faces, treatment is requierd
+            if (oldCellID != -1)
+            {
+                int NewCellID = newCell[oldCellID];
+                leftCellOfFace[iFace] = NewCellID;
+            }
+            //! For rightCellOfFace
+            oldCellID = static_cast<int>(rightCellOfFace[iFace]);
+            if (oldCellID != -1)
+            {
+                int NewCellID = newCell[oldCellID];
+                rightCellOfFace[iFace] = NewCellID;
+
+            }
+        }
+        //! Update cell2Node and nNodeOfEachCell by swap method
+        vector< vector<cgsize_t> > &cell2Node = *gconn->GetCell2Node();
+        vector<int> &nNodeOfEachCell = *gconn->GetNodeNumberOfEachCell();
+        int *orgCell = new int[nTotalCell];//! Contianer index and old cellID reflection
+        int *swapCell = new int[nTotalCell]; //! Old cellID and container index reflection
+        for (int cellID = 0; cellID < nTotalCell; ++ cellID)
+        {
+            //! Before swap, orgCell is equal to swapCell
+            orgCell[cellID] = cellID; 
+            swapCell[cellID] = cellID;
+        }
+
+        for (int cellID = 0; cellID < nTotalCell; ++ cellID)
+        {
+            if (orgCell[cellID] == reflectCell[cellID]) continue;
+            int targetID = reflectCell[cellID];
+            int currentID = orgCell[cellID];
+            int swapID = swapCell[targetID];
+            //! Update correspondings of cellID and swapID for nNodeOfEachCell
+            int tempNodeNumber = nNodeOfEachCell[swapID];
+
+            nNodeOfEachCell[swapID] = nNodeOfEachCell[cellID];
+            nNodeOfEachCell[cellID] = tempNodeNumber;
+            //! Update correspondings of cellID and swapID for cell2Node
+            vector<cgsize_t> tempCell = cell2Node[swapID];
+            cell2Node[swapID] = cell2Node[cellID];
+            cell2Node[cellID] = tempCell;
+            //! Update correspondings of cellID and swapID for orgCell
+            orgCell[cellID] = targetID;
+            orgCell[swapID] = currentID;
+            //! Update correspondings of targerID and currentID for swapID
+            swapCell[targetID] = cellID;
+            swapCell[currentID] = swapID;
+        }
+    }
+
+    void GetCurrentLevel(int rStart, const int *nFaceOfEachCell, const int *cell2Cell, const int *offsetCell2Cell, int *reorderCell, int &numSortCur, int *cellIDSortCur)
+    {
+        numSortCur = 0;
+        int numCellCells = nFaceOfEachCell[rStart];
+        int offset = offsetCell2Cell[rStart];
+
+        for (int iCell = 0; iCell < numCellCells; ++ iCell)
+        {
+            int cellID = cell2Cell[offset + iCell];
+            //! cellID is not in the root level structure
+            if (reorderCell[cellID] == -1)
+            {
+                cellIDSortCur[numSortCur] = cellID;
+                numSortCur ++;
+                reorderCell[cellID] = 1;
+            }
+        }
+    }
+
+    void GetNextLevel(const int &numSortCur, const int *cellIDSortCur, const int *nFaceOfEachCell, const int *cell2Cell, const int *offsetCell2Cell, int *reorderCell, int &numSortNext, int *cellIDSortNext)
+    {
+        numSortNext = 0;
+        for (int iCell = 0; iCell < numSortCur; ++ iCell)
+        {
+            int cellCellID = cellIDSortCur[iCell];
+            int numCellCells = nFaceOfEachCell[cellCellID];
+            int offset = offsetCell2Cell[cellCellID];
+            for (int iCellCell = 0; iCellCell < numCellCells; iCellCell++)
+            {
+                int cellID = cell2Cell[offset + iCellCell];
+                if (reorderCell[cellID] == -1)
+                {
+                    cellIDSortNext[numSortNext] = cellID;
+                    numSortNext ++;
+                    reorderCell[cellID] = 1;
+                }
+            }
+        }
+    }
+
+    void SetCellIDSortCurByCellIDSortNext(const int &numSortNext, const int *cellIDSortNext, int &numSortCur, int *cellIDSortCur)
+    {
+        numSortCur = numSortNext;
+
+        for (int iSort=0; iSort < numSortNext; ++ iSort)
+        {
+            cellIDSortCur[iSort] = cellIDSortNext[iSort];
+        }
+    }
+
+    void ResetCellSort(int &numSort, int *cellIDSort)
+    {
+        for (int iSort=0; iSort<numSort; ++ iSort)
+        {
+            cellIDSort[iSort] = -1;
+        }
+
+        numSort = 0;
+    }
+
+    void TestCellSort(const int numSort, const int *cellIDSort)
+    {
+        for (int iSort = 0; iSort<numSort; ++ iSort)
+        {
+            printf("iSort = %d of numSort %d, cellID = %d\n", iSort, numSort, cellIDSort[iSort]);
+        }
+    }
+
+    int FindMinCellIDSortCur(const int numSortCur, const int *cellIDSortCur, const int *nFaceOfEachCell)
+    {
+        int minCellID = cellIDSortCur[0];
+        int minDegree = nFaceOfEachCell[minCellID];
+
+        for (int iSort = 1; iSort < numSortCur; ++ iSort)
+        {
+            int cellID = cellIDSortCur[iSort];
+            if (nFaceOfEachCell[iSort] < minDegree)
+            {
+                minDegree = nFaceOfEachCell[iSort];
+                minCellID = cellID;
+            }
+
+        }
+
+        return minCellID;
+    }
+
+    void GetCurrentLevelForReOrder(int rStart, const int *nFaceOfEachCell, const int *cell2Cell, const int *offsetCell2Cell, int *reorderCell, int &numSortCur, int *cellIDSortCur)
+    {
+        numSortCur = 0;
+        int numCellCells = nFaceOfEachCell[rStart];
+        int offset = offsetCell2Cell[rStart];
+       
+        for (int iCell = 0; iCell < numCellCells; ++ iCell)
+        {
+            int cellID = cell2Cell[offset + iCell];
+            if (reorderCell[cellID] == -1)
+            {
+                cellIDSortCur[numSortCur] = cellID;
+                numSortCur ++;
+            }
+        }
+    }
+    
+    void AscendingCellIDSortCurByDegree(const int numSortCur, const int *nFaceOfEachCell, int *cellIDSortCur)
+    {
+        int numVertexInSort = numSortCur;
+        //! At least 2 vertices for sort
+        while(numVertexInSort > 1)
+        {
+            for (int iSort=0; iSort < numVertexInSort-1; ++ iSort)
+            {
+                int cellID = cellIDSortCur[iSort];
+                int cellIDNext = cellIDSortCur[iSort+1];
+                int degree = nFaceOfEachCell[cellID];
+                int degreeNext = nFaceOfEachCell[cellIDNext];
+                if (degree > degreeNext)
+                {
+                    //! Exchange vertex order
+                    cellIDSortCur[iSort] = cellIDNext;		
+                    cellIDSortCur[iSort+1] = cellID;
+                }
+            }
+            numVertexInSort --;
+        }
+    }
+
+    void TestCellIDSortCurDegree(const int numSortCur, const int *cellIDSortCur, const int *nFaceOfEachCell)
+    {
+        //! Test Ascending order of vertex 0
+        for (int iSort = 0; iSort < numSortCur; ++ iSort)
+        {
+            printf("iSort = %d, cellID = %d, degree = %d\n", iSort, cellIDSortCur[iSort], nFaceOfEachCell[cellIDSortCur[iSort]]);
+        }
+    }
+
+    //! Check cell2Cell, to see some rules:
+    //! rule1 one cell's neighbor cells should not contain itself.
+    //! rule2 0<= one cell's neighbor cells < nTotalCell
+    //! rule3 one cell's neighbor cells should be different.
+    //! It should be noted that for O type grid, break 3 may be broken.
+    void CheckCell2Cell(const int nTotalCell, const int *nFaceOfEachCell, const int *offsetCell2Cell, const int *cell2Cell)
+    {
+        printf("Check cell2Cell...\n");
+
+        for (int cellID = 0; cellID < nTotalCell; ++ cellID)
+        {
+            int offset = offsetCell2Cell[cellID];
+            int numCellCells = nFaceOfEachCell[cellID];
+
+            for (int iCell = 0; iCell < numCellCells; ++ iCell)
+            {
+                int cellCellID = cell2Cell[offset + iCell];
+                //! Check rule 1
+                if (cellID == cellCellID) printf("rule 1 breaks in cellID %d in %d\n", cellID, iCell);
+                //! Check rule 2
+                if ((cellCellID < 0)||(cellCellID >= nTotalCell)) printf("rule 2 breaks in cellID %d in %d for %d\n", cellID, iCell, cellCellID);
+            }
+
+            //! Check rule 3
+            int numComp = numCellCells;
+            //! At least two cells in cell2Cell	
+            while (numComp > 1)
+            {
+                for (int jCell = 0; jCell < numComp-1; ++ jCell)
+                {
+                    int cellIDLoop = cell2Cell[offset+jCell];
+                    int cellIDComp = cell2Cell[offset+numComp-1];
+                    if (cellIDLoop == cellIDComp) printf("rule 3 breaks in cellID %d in %d and %d are both %d\n", cellID, jCell, numComp-1, cellIDLoop);
+                }
+                numComp --;
+            }
+        }
+
+    }
+
+    void ReOrderLevelCur(const int numSortCur, const int *cellIDSortCur, int &numVertex, int *newCell)
+    {
+        for (int iSort = 0; iSort < numSortCur; ++ iSort)
+        {
+            int cellID = cellIDSortCur[iSort];
+            //! Avoid the same cell index in cellIDSortCur on the condition of O type grid
+            if (newCell[cellID] == -1)
+            {
+                numVertex ++;
+                newCell[cellID] = numVertex;
+            }
+        }
+
+    }
+
+    void GetNextLevelForReOrder(const int &numSortCur, const int *cellIDSortCur, const int *nFaceOfEachCell, const int *cell2Cell, const int *offsetCell2Cell, int *reorderCell, int & numSortNext, int *cellIDSortNext)
+    {
+        numSortNext = 0;
+
+        for (int iCell = 0; iCell < numSortCur; ++ iCell)
+        {
+            int cellCellID = cellIDSortCur[iCell];
+            int numCellCells = nFaceOfEachCell[cellCellID];
+            int offset = offsetCell2Cell[cellCellID];
+            for (int iCellCell = 0; iCellCell < numCellCells; ++ iCellCell)
+            {
+                int cellID = cell2Cell[offset + iCellCell];
+
+                if (reorderCell[cellID] == -1)
+                {
+                    cellIDSortNext[numSortNext] = cellID;
+                    numSortNext ++;
+                }
+            }
+        }
+    }
+    //! Check rules for cell index
+    //! rule1 0 <= newCell < nTotalCell
+    //! rule2 cell index should be different
+    void CheckNewCell(const int nTotalCell, const int * newCell)
+    {
+        printf("Check newCell ...\n");
+
+        int *numCells = new int[nTotalCell];
+
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            int cellID = newCell[iCell];
+            if ((cellID < 0) || (cellID > nTotalCell)) printf("CheckNewCell: cellID %d breaks rule1 on %d of newCell\n", cellID, iCell);
+            int remain = cellID % nTotalCell;
+            numCells[remain] ++;
+        }
+    
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell) 
+        {
+            if (numCells[iCell] != 1) printf("CheckNewCell, cellID %d in newCell breaks rule 2, has %d cells\n", iCell, numCells[iCell]);
+        }	
+
+        delete []numCells;    numCells = NULL;
+    }
+    //! Compute nFaceOfEachCell and nTotalCellFaces
+    //! It should be noted that boundary faces are not considered here.
+    void SetFaceNumberOfEachCell(const int nTotalFace, const int nTotalCell, const int *leftCellOfFace, const int *rightCellOfFace, int *nFaceOfEachCell, int &nTotalCellFaces)
+    {
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            //! For leftCellOfFace
+            int cellLabelLeft = leftCellOfFace[iFace];
+
+            if ((cellLabelLeft < 0)||(cellLabelLeft >= nTotalCell)) 
+            {
+                printf("Error: cellLabelLeft = %d\n", cellLabelLeft);
+                exit(1);
+            }
+            int cellLabelRight = rightCellOfFace[iFace];
+            //! Boundary faces are not considered. In fact, on boundary face, cellLabelLeft is cell itself. cellLabelRight is -1, which is not necessary stored in cell2Cell.
+            if (cellLabelRight == -1) continue; //! Boundy face's right neighbor
+
+            if ((cellLabelRight < 0) || (cellLabelRight >= nTotalCell))
+            {
+                printf("Error: cellLabelRight = %d\n", cellLabelRight);
+                exit(1);
+            }
+            nFaceOfEachCell[cellLabelLeft] ++;
+            nTotalCellFaces ++;
+            nFaceOfEachCell[cellLabelRight] ++;
+            nTotalCellFaces ++;
+        }		
+    }
+    //! Set offsetCell2Face by nFaceOfEachCell
+    void SetOffSetCell2Face(const int nTotalCell, const int *nFaceOfEachCell, int *offsetCell2Face)
+    {
+        offsetCell2Face[0] = 0;
+        for (int iCell = 1; iCell < nTotalCell; ++ iCell)
+        {
+            offsetCell2Face[iCell] = offsetCell2Face[iCell-1] + nFaceOfEachCell[iCell-1];
+        }
+    }
+    //! Set cell2Face by leftCellOfFace, rightCellOfFace, offsetCell2Face
+    //! It should be noted that boundary faces are not considered here.
+    void SetCell2Face(const int nTotalFace, const int nTotalCell, const int *leftCellOfFace, const int *rightCellOfFace, int *offsetCell2Face, int *cell2Face)
+    {
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            //! For leftCellOfFace
+            int cellLabelLeft = leftCellOfFace[iFace];
+            if ((cellLabelLeft < 0)||(cellLabelLeft >= nTotalCell)) 
+            {
+                printf("Error: cellLabelLeft = %d\n", cellLabelLeft);
+                exit(1);
+            }
+
+            int cellLabelRight = rightCellOfFace[iFace];
+            //! Boundary face is not considered.
+            if (cellLabelRight == -1) continue; //! Boundy face's right neighbor
+
+            if ((cellLabelRight < 0) || (cellLabelRight >= nTotalCell))
+            {
+                printf("Error: cellLabelRight = %d\n", cellLabelRight);
+                exit(1);
+            }
+            int cell2faceOffset = offsetCell2Face[cellLabelLeft];
+            cell2Face[cell2faceOffset] = iFace;
+            //! OffsetCell2Face update for the next set of face
+            offsetCell2Face[cellLabelLeft] ++;
+            cell2faceOffset = offsetCell2Face[cellLabelRight];
+            cell2Face[cell2faceOffset] = iFace;
+            offsetCell2Face[cellLabelRight] ++;
+        }		
+    }
+
+    //! Set cell2Cell
+    void SetCell2Cell(const int nTotalCell, const int *nFaceOfEachCell, const int *offsetCell2Face, const int *cell2Face, const int *leftCellOfFace, const int *rightCellOfFace, int *cell2Cell){
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            int sizeCellFace = nFaceOfEachCell[iCell];
+            int offsetCellFace = offsetCell2Face[iCell];
+
+            for (int iFace = 0; iFace < sizeCellFace; ++ iFace)
+            {
+                int faceID = cell2Face[offsetCellFace + iFace];
+                int cellLabel = leftCellOfFace[faceID];
+                if ((cellLabel < 0)||(cellLabel >= nTotalCell))
+                {
+                    printf("Error: cellLabel = %d\n", cellLabel);
+                    exit(1);
+                }
+
+                if (cellLabel != iCell) cell2Cell[offsetCellFace + iFace] = cellLabel;
+
+                cellLabel = rightCellOfFace[faceID];
+
+                if (cellLabel == -1) continue; //! Boundy face's right neighbor
+                if ((cellLabel < 0) || (cellLabel >= nTotalCell))
+                {
+                    printf("Error: cellLabel = %d\n", cellLabel);
+                    exit(1);
+                }
+
+                if (cellLabel != iCell) cell2Cell[offsetCellFace + iFace] = cellLabel;
+                
+            }
+        }
+    }
+
+    //! Compute bandwidth of each cell
+    void ComputeBandwidth(const int nTotalCell, const int *nFaceOfEachCell, const int *offsetCell2Face, const int *cell2Cell)
+    {
+        int *bandwidthOfEachCell = new int[nTotalCell];		
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            int sizeCellFace = nFaceOfEachCell[iCell];
+            int offsetCellFace = offsetCell2Face[iCell];
+
+            //!The max band between iCell and neighbor cells
+            int maxLocalBand = 0;
+            for (int iFace = 0; iFace < sizeCellFace; ++ iFace)
+            {
+                int cellID = cell2Cell[offsetCellFace+iFace];
+                int bandDiff = abs(iCell - cellID);
+                if (bandDiff > maxLocalBand) maxLocalBand = bandDiff;
+            }
+            bandwidthOfEachCell[iCell] = maxLocalBand;
+        }
+        //! Statistics of bandwidthOfEachCell
+        int maxGlobalBand = 0; //! Maximum bandwidth
+        int maxCellID = 0; //! CellID of maximum bandwidth
+        int level = 20;
+        int gapLevel = 6000/level;
+        printf("gapLevel = %d\n", gapLevel);
+        int bandDist[20] = {0}; //! Distribution of bandwidth from 1 to 32 and more
+        for (int i = 0; i < level; ++ i)
+        {
+            bandDist[i] = 0;
+        }
+
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            int bandCell = bandwidthOfEachCell[iCell];
+            if (bandCell <= 0) 
+            {
+                printf("Error: bandwidth<=0 on cell %d, bandwidth=%d\n", iCell, bandCell);
+                exit(1);
+            }
+            if (bandCell > maxGlobalBand)
+            {
+                maxGlobalBand = bandCell;
+                maxCellID = iCell;
+            }
+            int ratio = static_cast<int>(floor(bandCell/gapLevel));
+            if (ratio < 0) 
+            {
+                printf("Error: ratio = %d, iCell = %d, bandCell = %d, gapLevel=%d\n", ratio, iCell, bandCell, gapLevel);
+                exit(0);
+            }
+            if (ratio > (level-1)) bandDist[level-1] ++;
+            else bandDist[ratio] ++;
+        }
+        
+        printf("maxGlobalBand = %d on cellID %d\n", maxGlobalBand, maxCellID);
+        int nTotalDist = 0;
+        for (int i = 0; i < level; ++ i)
+        {
+            nTotalDist += bandDist[i];
+            printf("bandDist %d: %d in nTotalCells\n", i, bandDist[i]);
+        }
+        printf("nTotalDist = %d, nTotalCell = %d\n", nTotalDist, nTotalCell);
+        
+        delete []bandwidthOfEachCell;   bandwidthOfEachCell = NULL;		
+    }
+
+    //! Update face_number_of_each_face by swap method
+    //! Intput: nTotalCell, face_number_of_each_face, reflectCell
+    //! Output:nSwapFaceOfEachCell
+    //! The function is used to provide a swap method to update a cell related varible
+    //! After cell reorder. In the future, cell2Node can be update by the method
+    void SwapFaceNumberOfEachFace(const int nTotalCell, const int *nFaceOfEachCell, const int *reflectCell, const int *nNewFaceOfEachCell)
+    {
+        //! Try swap method
+        int *nSwapFaceOfEachCell = new int[nTotalCell];
+        //!It should be notes that orgCell and swapCell are updated during swap
+        //! Finally, orgCell should be equal to reflectCell and swapCell should be equal to newCell. 
+        int *orgCell = new int[nTotalCell];//! Contianer index and old cellID reflection
+        int *swapCell = new int[nTotalCell]; //! Old cellID and container index reflection
+        for (int cellID = 0; cellID < nTotalCell; ++ cellID)
+        {
+            nSwapFaceOfEachCell[cellID] = nFaceOfEachCell[cellID];
+            //! Before swap, orgCell is equal to swapCell
+            orgCell[cellID] = cellID; 
+            swapCell[cellID] = cellID;
+        }
+        //! After swap, orgCell should be equal to reflectCell
+        //!After swap, swapCell should be equal to newCell
+        for (int cellID = 0; cellID < nTotalCell; ++ cellID)
+        {
+            //! In one container, the corresponding old cellID is the same
+            //! In orgCell and reflectCell. It means that no swap is required.
+            if (orgCell[cellID] == reflectCell[cellID]) continue;
+            //! targetID is the target of orgCell[cellID]
+            //! swapID is the container index corresponds to targetID
+            //! currentID is the real value of orgCell[cellID]
+            //! Obviously, orgCell[cellID] and orgCell[swapID] should be swap.
+            //! After swap, swapCell should be updated. swapCell[targetID] 
+            //! should be cellID. and swapCell[currentID] should be swapID.
+            //! In fact, Swap[targerID] and Swap[currentID] is also swap.
+            int targetID = reflectCell[cellID];
+            int swapID = swapCell[targetID];
+            int currentID = orgCell[cellID];
+            if (swapCell[currentID] != cellID)
+            {
+                //! It means that something wrong in  swap of orgCell and swapCell
+                printf("Error: Old cellID %d is not in the containerID %d\n", currentID, cellID);
+                printf("Old cellID %d is in the containerID %d\n", currentID, swapCell[currentID]);
+                printf("Container %d owns old cellID %d\n", cellID, orgCell[cellID]);
+                exit(1);
+            }
+            //! swap nFaceOfEachCell of cellID and swapID
+            int temp = nSwapFaceOfEachCell[swapID];
+            nSwapFaceOfEachCell[swapID] = nSwapFaceOfEachCell[cellID];
+            nSwapFaceOfEachCell[cellID] = temp;
+            //! swap orgCell of cellID and swapID
+            orgCell[cellID] = targetID;
+            orgCell[swapID] = currentID;
+            //! swap swapID of targerID and currentID
+            swapCell[targetID] = cellID;
+            swapCell[currentID] = swapID;
+        }
+        //! Check results
+        CheckSwapFaceNumber(nTotalCell, orgCell, reflectCell, nSwapFaceOfEachCell, nNewFaceOfEachCell);
+
+        
+    }
+
+    //! Check results
+    void CheckSwapFaceNumber(const int nTotalCell, const int *orgCell, const int *reflectCell, const int *nSwapFaceOfEachCell, const int *nNewFaceOfEachCell)
+    {
+        printf("Checking swap method for update nFaceOfEachCell just by itself...\n");
+        for (int cellID = 0; cellID < nTotalCell; ++ cellID)
+        {
+            if (orgCell[cellID] != reflectCell[cellID]) 
+            {
+                printf("Error: cellID %d is not set yet\n", cellID);
+                exit(1);
+            }
+            if (nSwapFaceOfEachCell[cellID]!= nNewFaceOfEachCell[cellID])
+            {
+                printf("Error: on cellID %d, swap faces %d is not equal  to new faces %d\n", cellID, nSwapFaceOfEachCell[cellID], nNewFaceOfEachCell[cellID]);
+                exit(1);
+            }
+        }
+    }
+    //! Reorder cell label from nBoundFace to nTotalFace just with the order of faces in cell2Face
+    void CellReorderByCell2FaceOrder(const int nTotalCell, const int nTotalFace, const int *offsetCell2Face, const int *nFaceOfEachCell, const int *cell2Face, const int nBoundFace, int labelFace, int *newFaces)
+    {
+        for (int cellID = 0; cellID < nTotalCell; ++ cellID)
+        {
+            int offset = offsetCell2Face[cellID];
+            int numFaces = nFaceOfEachCell[cellID];
+            for (int iFace = 0; iFace < numFaces; ++ iFace)
+            {
+                int faceID = cell2Face[offset+iFace];
+                //! Do not consider boundary faces
+                if (faceID < nBoundFace) 
+                {
+                    printf("Error: faceID %d on cellID %d, iFace %d is boundary face\n", faceID, cellID, iFace);
+                    exit(1);
+                }
+                if (faceID >= nBoundFace)
+                {
+                    //! faceID does not have label yet.
+                    if (newFaces[faceID] == -1) 
+                    {
+                        labelFace ++;
+                        newFaces[faceID] = labelFace;
+                    }
+                }
+            }
+        }
+
+        if (labelFace != nTotalFace-1) 
+        {
+            printf("Error: labelFace %d is not equal to nTotalFace-1 %d\n", labelFace, nTotalFace-1);
+            exit(1);
+        }
+    }
+    //! Metric for computing leftCellOfFace and rightCellOfFace for GPU 
+    void MetricLeftRightCellOfFace(const int nTotalFace, const int nBoundFace, const int *leftCellOfFace, const int *rightCellOfFace)
+    {
+        int *diffCount = new int[129]; //! 0~127, 128 for larger
+        //! Left part
+        //! Start from nBoundFace, boundary faces are not considered
+        int segAddress = nBoundFace;
+        for (int i = 0; i < 129; ++ i)
+        {
+            diffCount[i] = 0;
+        }
+
+        while (segAddress < nTotalFace)
+        {
+                int localMax = leftCellOfFace[segAddress];
+                int localMin = leftCellOfFace[segAddress];
+                for (int offset = 0; offset < 32; ++ offset)
+                {
+                    int le = leftCellOfFace[segAddress];
+                    if (le < localMin) localMin = le;
+                    if (le > localMax) localMax = le;
+                    segAddress++;
+                }
+                int diff = localMax - localMin;
+                if (diff > 128) diffCount[128] ++;
+                else diffCount[diff] ++;
+            }
+            //! Compute metric elements
+            int totalNum = 0;
+            for (int i = 0; i < 129; ++ i)
+            {
+                totalNum += diffCount[i];
+            }
+            for (int i = 0; i < 129; ++ i)
+            {
+                double percent = double(diffCount[i])/totalNum;
+                printf("i = %d, percent = %f\n", i, percent);
+            }
+
+            //! Right part
+            segAddress = nBoundFace;
+
+            for (int i = 0; i < 129; ++ i)
+            {
+                diffCount[i] = 0;
+            }
+            while (segAddress < nTotalFace)
+            {
+                int localMax = rightCellOfFace[segAddress];
+                int localMin = rightCellOfFace[segAddress];
+                for (int offset = 0; offset < 32; offset++)
+                {
+                    int re = rightCellOfFace[segAddress];
+                    if (re < localMin) localMin = re;
+                    if (re > localMax) localMax = re;
+                    segAddress++;
+                }
+                int diff = localMax - localMin;
+                if (diff > 128) diffCount[128] ++;
+                else diffCount[diff] ++;
+
+            }
+            //! Test
+            totalNum = 0;
+            for (int i = 0; i < 129; ++ i)
+            {
+                totalNum += diffCount[i];
+            }
+            for (int i = 0; i < 129; ++ i)
+            {
+                double percent = double(diffCount[i])/totalNum;
+                printf("i = %d, percent = %f\n", i, percent);
+            }
+            delete []diffCount;   diffCount = NULL;
+        
+    }
+    //!A caller for MetricLeftRightCellOfFace
+    void CallMetricLeftRightCellOfFace(Base_Grid_Conn *gconn)
+    {
+        printf("Program is running in CallMetricLeftRightCellOfFace\n");
+        cgsize_t nTotalFace = gconn->GetNTotalFace();
+        cgsize_t nBoundFace = gconn->GetNBoundFace();
+        vector<cgsize_t> &leftCellOfFace  = *gconn->GetLeftCellOfFace();
+        vector<cgsize_t> &rightCellOfFace = *gconn->GetRightCellOfFace();
+        int *oldLeftCellOfFace = new int[nTotalFace];
+        int *oldRightCellOfFace = new int[nTotalFace];
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            oldLeftCellOfFace[iFace] = static_cast<int>(leftCellOfFace[iFace]);
+            oldRightCellOfFace[iFace] = static_cast<int>(rightCellOfFace[iFace]);
+        }
+
+        MetricLeftRightCellOfFace(static_cast<int>(nTotalFace), static_cast<int>(nBoundFace), oldLeftCellOfFace, oldRightCellOfFace);
+
+    }
+
+}
diff --git a/API/PreProcess/src/Pre_StructGridPartition.cpp b/API/PreProcess/src/Pre_StructGridPartition.cpp
new file mode 100644
index 0000000..7dbd966
--- /dev/null
+++ b/API/PreProcess/src/Pre_StructGridPartition.cpp
@@ -0,0 +1,1382 @@
+#include <cmath>
+#include "Pre_Block_Struct.h"
+#include "Pre_StructGridPartition.h"
+#include "Glb_Dimension.h"
+#include "IO_HDF5File.h"
+#include "Pre_GridTranslator.h"
+#include "IO_FileName.h"
+#include "Pre_GridConversion.h"
+#include "PHIO.h"
+#include "TK_Log.h"
+#include "Pre_HDF5File.h"
+
+namespace PHSPACE
+{
+LIB_EXPORT Pre_StrGridPartition::Pre_StrGridPartition(int numberOfProcessors_in)
+{
+    this->numberOfProcessors = numberOfProcessors_in;
+
+    geometricDimension = PHSPACE::GlobalDataBase::GetIntParaFromDB("ndim");
+
+    boundaryContainer = new DataContainer();
+
+    numberOfBasicBlocks = 0;
+
+    LnkFileExist = false;
+    partitionWallDist = false;
+
+    cellIndexOfMark = new int[3];
+    traceMark = PHSPACE::GlobalDataBase::GetIntParaFromDB("traceMark");
+    if (traceMark)
+    {
+        blockIndexOfMark = PHSPACE::GlobalDataBase::GetIntParaFromDB("blockIndexOfMark");
+        GlobalDataBase::GetData("cellIndexOfMark", cellIndexOfMark, PHINT, 3);
+        if (geometricDimension == 2)
+        {
+            cellIndexOfMark[2] = 1;
+        }
+    }
+}
+
+LIB_EXPORT Pre_StrGridPartition::~Pre_StrGridPartition()
+{
+    delete boundaryContainer;
+    delete [] cellIndexOfMark;    cellIndexOfMark = NULL;
+    for (set<Pre_Block_Struct *>::iterator iter = generalBlockGroup.begin(); iter != generalBlockGroup.end(); ++ iter)
+    {
+        delete *iter;
+    }
+    return;
+}
+
+LIB_EXPORT void Pre_StrGridPartition::Run()
+{
+    string original_grid_file = "grid.fts";
+    GlobalDataBase::GetData("original_grid_file", &original_grid_file, PHSTRING, 1);
+    GlobalDataBase::UpdateData("gridfile", &original_grid_file, PHSTRING, 1);
+
+    string partition_grid_file = "metis.fts";
+    GlobalDataBase::GetData("partition_grid_file", &partition_grid_file, PHSTRING, 1);
+
+    int isOverset = 0;
+    GlobalDataBase::GetData("codeOfOversetGrid", &isOverset, PHINT, 1);
+    int periodicType = PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType");
+
+    Region *region = new Region();
+    region->ReadGrid();
+
+    numberOfOriginalBlocks = PHMPI::GetNumberofGlobalZones();
+    OrdinaryGrid = new Grid *[numberOfOriginalBlocks];
+
+    for (int iBlock = 0; iBlock < numberOfOriginalBlocks; iBlock ++)
+    {
+        OrdinaryGrid[iBlock] = GetGrid(iBlock, 0);
+    }
+
+    ProcessBCInfo();
+
+    int isOldGrid = GlobalDataBase::GetIntParaFromDB("isOldGrid");
+    if (isOldGrid)
+    {
+        ReadLnkFile(original_grid_file);
+    }
+    else
+    {
+        ReadLnkInfor(original_grid_file);
+    }
+
+    ReadBoundaryData();
+
+    InitSplittingParameter();
+
+    BinarySplitBlocks();
+
+    SetBlockIndex();
+
+    InitParititionGrids();
+
+    OutputProcessorInformation();
+
+    OutputPartitionedGrid();
+    
+    for (int iZone = 0; iZone < numberOfBasicBlocks; ++ iZone)
+    {
+        parititionGrids[iZone]->SetLnkInfo();
+    }
+
+    int dumpOldGrid = GlobalDataBase::GetIntParaFromDB("dumpOldGrid");
+    int ndim = PHSPACE::GetDim();
+    if (ndim == TWO_D || isOverset || (ndim == THREE_D && periodicType != 0))
+    {
+        CheckMeshMultigrid(parititionGrids, numberOfBasicBlocks);
+
+        for (int iZone = 0; iZone < numberOfBasicBlocks; ++ iZone)
+        {
+            parititionGrids[iZone]->ProcessBCInfo();
+        }
+
+        ConstructGlobalInterfaceLink(parititionGrids, numberOfBasicBlocks);
+
+        if (dumpOldGrid)
+        {
+            WriteLnkFile(partition_grid_file, parititionGrids, numberOfBasicBlocks);
+        }
+
+        int tasktype = GetTaskCode();
+        int numberOfMultifile = PHSPACE::GlobalDataBase::GetIntParaFromDB("numberOfMultifile");
+
+        if (tasktype == PHSPACE::PARTITION_GRID && numberOfMultifile > 1)
+        {
+            int maximumProcess = PHSPACE::GlobalDataBase::GetIntParaFromDB("maxproc");
+            
+
+            if (maximumProcess < numberOfMultifile)
+            {
+                ostringstream oss;
+                oss << " Error: the numberOfMultifile's value is larger than maximumProcess's value "<< endl;
+                TK_Exit::ExceptionExit(oss.str());
+                
+            }
+            else if(maximumProcess % numberOfMultifile != 0)
+            {
+                ostringstream oss;
+                oss << " Error: the maximumProcess's value is not an integral multiple of numberOfMultifile's value "<< endl;
+                TK_Exit::ExceptionExit(oss.str());
+            }
+
+            int procNumberOfEachfile = maximumProcess / numberOfMultifile;
+            for (int iFile = 0; iFile < numberOfMultifile; ++iFile)
+            {
+                vector < Grid*> tempGrids;
+                tempGrids.resize(0);
+
+                for (int iBlock = 0; iBlock < numberOfBasicBlocks; ++iBlock)
+                {
+                    int procIndex = parititionGrids[iBlock]->GetGridID()->GetIndex();
+                    int* block_proc_inp = PHMPI::GetZoneProcessorID_INP();
+                    if (block_proc_inp)
+                    {
+                        procIndex = block_proc_inp[iBlock];
+                    }
+
+                    if ((procIndex / procNumberOfEachfile) == iFile)
+                    {
+                        tempGrids.push_back(parititionGrids[iBlock]);
+                    }
+                    else
+                    {
+                        Grid* tempZero = 0;
+                        tempGrids.push_back(tempZero);
+                    }
+                }
+
+                string out_gfile_temp = AddSymbolToFileName(partition_grid_file, "_", iFile);
+                DumpGrid(out_gfile_temp, &tempGrids[0], numberOfBasicBlocks);
+            }
+        }
+        else
+        {
+            DumpGrid(partition_grid_file, parititionGrids, numberOfBasicBlocks);
+        }
+        
+        string faceBCFileName = ChangeExtensionOfFileName(original_grid_file, "bc");
+        if (SerialFileExist(faceBCFileName))
+        {
+            WriteBcFileFromFTS(partition_grid_file, parititionGrids, numberOfBasicBlocks);
+        }
+    }
+    else
+    {
+        //! Output grid link relation before translate the grid.
+        //! It's necessary to check if it work properly.
+        if (dumpOldGrid)
+        {
+            WriteLnkFile(partition_grid_file, parititionGrids, numberOfBasicBlocks);
+        }
+
+        CheckMeshMultigrid(parititionGrids, numberOfBasicBlocks);
+        GridTranslator *gridTranslator = new GridTranslator(parititionGrids, numberOfBasicBlocks);
+        gridTranslator->Run();
+ 
+        string faceBCFileName = ChangeExtensionOfFileName(original_grid_file, "bc");
+        if (SerialFileExist(faceBCFileName)) WriteBcFileFromFTS(partition_grid_file, parititionGrids, numberOfBasicBlocks);
+ 
+        delete gridTranslator;
+    }
+
+    WriteWalldist(partition_grid_file, parititionGrids);
+    DumpMarkInfo();
+
+    for (int i = 0; i < numberOfBasicBlocks; ++ i)
+    {
+        delete parititionGrids[i];
+    }
+    delete [] parititionGrids;    parititionGrids = NULL;
+
+    delete region;
+}
+
+void Pre_StrGridPartition::WriteWalldist(const string &out_grid_file, Grid **grids_in)
+{
+    if (!partitionWallDist) return;
+    string walldistfile = ChangeExtensionOfFileName(out_grid_file, "wdt");
+
+    ActionKey *actkey = new ActionKey();
+    actkey->filename = (walldistfile);
+
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    string finalFileName = PHSPACE::AddSymbolToFileName(walldistfile, '_', currentProcessorIndex);
+    actkey->filepos = H5Fcreate(finalFileName.c_str(), H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT);
+
+    using namespace PHMPI;
+    for (int iZone = 0; iZone < numberOfBasicBlocks; ++ iZone)
+    {
+        if (!grids_in[iZone]) continue;
+
+        StructGrid *grid = StructGridCast(grids_in[iZone]);
+        WriteWalldist(actkey, grid);
+    }
+    
+    H5Fclose(actkey->filepos);
+    delete actkey;    actkey = NULL;
+}
+
+void Pre_StrGridPartition::WriteWalldist(ActionKey *actkey, StructGrid *grid)
+{
+    ostringstream oss;
+    oss << "Grid-" << grid->GetZoneID();
+    string dataName = oss.str();
+
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble3D &walldist = * grid->GetWallDist();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    CreateAndWriteData(actkey->filepos, dataName, 1, nTotalCell, PHDOUBLE, &walldist(ist, jst, kst));
+}
+
+void Pre_StrGridPartition::ProcessBCInfo()
+{
+    for (int iBlock = 0; iBlock < numberOfOriginalBlocks; iBlock ++)
+    {
+        StructGrid *grid = StructGridCast(OrdinaryGrid[iBlock]);
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+
+        int numberOfBoundaryFaces = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < numberOfBoundaryFaces; iBCRegion ++)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+           
+
+            int *s_st = structBC->GetStartPoint();
+            int *s_ed = structBC->GetEndPoint();
+            int *s_lr3d = structBC->GetFaceDirectionIndex();
+
+            for (int m = 0; m < geometricDimension; ++ m)
+            {
+                //! It may be true in two (or more) different directions after splited, now using the value already existed.
+                if (structBC->GetFaceDirection() == m)
+                {
+                    if (s_st[m] > 1 || s_lr3d[m] == 1)
+                    {
+                        s_st[m] += 1;
+                        s_ed[m] += 1;
+                    }
+                }
+                else
+                {
+                    s_ed[m] += 1;
+                }
+            }
+        }
+    }
+}
+
+void Pre_StrGridPartition::SetBlockIndex()
+{
+    int zoneIndex = 0;
+    bool blockIndexOfMarkChanged = false;
+
+    for (int iProcessor = 0; iProcessor < numberOfProcessors; ++ iProcessor)
+    {
+        uint_t nZones = specialBlockTable[iProcessor].size();
+        for (int j = 0; j < nZones; ++ j)
+        {
+            int oldZoneIndex = specialBlockTable[iProcessor][j]->GetZoneIndex();
+            if (!blockIndexOfMarkChanged && blockIndexOfMark == oldZoneIndex)
+            {
+                blockIndexOfMark = zoneIndex;
+                blockIndexOfMarkChanged = true;
+            }
+
+            specialBlockTable[iProcessor][j]->SetZoneIndex(zoneIndex);
+            specialBlockTable[iProcessor][j]->SetProcessorIndex(iProcessor);
+            ++ zoneIndex;
+        }
+    }
+
+    return;
+}
+
+void Pre_StrGridPartition::OutputPartitionedGrid()
+{
+    ExtractBoundaryInformation();
+    ExtractOriginalGridInformation();
+    OutputPartitionedGridFile();
+    SetWallDist();
+}
+
+void Pre_StrGridPartition::SetWallDist()
+{
+    boundaryContainer->moveto_begin();
+
+    int numberOfBasicBlocks = 0;
+    PHSPACE::PHRead(boundaryContainer, numberOfBasicBlocks);
+
+    for (int i = 0; i < numberOfBasicBlocks; ++ i)
+    {
+        vector< int > nodeDimension(3);
+        PHSPACE::PHRead(boundaryContainer, nodeDimension, 3);
+    }
+
+    int iBasic;
+    vector< int > nst(3), ned(3);
+
+    for (int i = 0; i < numberOfBasicBlocks; ++ i)
+    {
+        StructGrid *grid = StructGridCast(parititionGrids[i]);
+
+        PHSPACE::PHRead(boundaryContainer, iBasic);
+
+        PHSPACE::PHRead(boundaryContainer, nst[0]);
+        PHSPACE::PHRead(boundaryContainer, ned[0]);
+        PHSPACE::PHRead(boundaryContainer, nst[1]);
+        PHSPACE::PHRead(boundaryContainer, ned[1]);
+        PHSPACE::PHRead(boundaryContainer, nst[2]);
+        PHSPACE::PHRead(boundaryContainer, ned[2]);
+
+        StructGrid *Ordinary_grid = StructGridCast(OrdinaryGrid[iBasic]);
+
+        WriteGridWallDist(grid, Ordinary_grid, nst);
+
+        grid->SetOrdinaryGridIndex(iBasic);
+        grid->SetOrdinaryDimStartIndex(&nst[0]);
+        grid->SetOrdinaryDimEndIndex(&ned[0]);
+    }
+
+//    if (partitionWallDist)
+//    {
+        cout << "\nWrite ParititionGrids' WallDist completed ... \n" << endl;
+//    }
+}
+
+void Pre_StrGridPartition::WriteGridWallDist(StructGrid *grid, StructGrid *Ordinary_grid, vector< int > &nst)
+{
+    if (!Ordinary_grid->GetWallDist()) return;
+
+    grid->InitWallDist();
+
+    RDouble3D &walldist = * grid->GetWallDist();
+    RDouble3D &Ordinary_walldist = * Ordinary_grid->GetWallDist();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int kk = nst[2];
+    for (int k = kst; k <= ked; ++ k)
+    {
+        int jj = nst[1];
+        for (int j = jst; j <= jed; ++ j)
+        {
+            int ii = nst[0];
+            for (int i = ist; i <= ied; ++ i)
+            {
+                walldist(i, j, k) = Ordinary_walldist(ii, jj, kk);
+                ii ++;
+            }
+            jj ++;
+        }
+        kk ++;
+    }
+
+    partitionWallDist = true;
+}
+
+void Pre_StrGridPartition::OutputPartitionedGridFile()
+{
+    boundaryContainer->moveto_begin();
+
+    int numberOfBasicBlocks = 0;
+    PHSPACE::PHRead(boundaryContainer, numberOfBasicBlocks);
+
+    for (int i = 0; i < numberOfBasicBlocks; ++ i)
+    {
+        vector< int > nodeDimension(3);
+        PHSPACE::PHRead(boundaryContainer, nodeDimension, 3);
+    }
+
+    cout << "Writing ParititionGrids' Coordinate" << endl;
+
+    int iProcessors = 0;
+    uint_t BlocksOfiProcessors = specialBlockTable[iProcessors].size();
+    int count = 0;
+    int myid = PHMPI::GetCurrentProcessorID();
+
+    int iBasic;
+    vector< int > nst(3), ned(3);
+    for (int i = 0; i < numberOfBasicBlocks; ++ i)
+    {
+        StructGrid *grid = StructGridCast(parititionGrids[i]);
+
+        PHSPACE::PHRead(boundaryContainer, iBasic);
+
+        PHSPACE::PHRead(boundaryContainer, nst[0]);
+        PHSPACE::PHRead(boundaryContainer, ned[0]);
+        PHSPACE::PHRead(boundaryContainer, nst[1]);
+        PHSPACE::PHRead(boundaryContainer, ned[1]);
+        PHSPACE::PHRead(boundaryContainer, nst[2]);
+        PHSPACE::PHRead(boundaryContainer, ned[2]);
+        
+        Pre_Block_Struct *simpleBlock = referencedBlockContainer[iBasic];
+
+        WriteGridCoordinate(grid, simpleBlock, nst, ned);
+
+        ++ count;
+        if (myid == PHMPI::GetServerProcessorID() && count > 0 && count == BlocksOfiProcessors)
+        {
+            ++ iProcessors;
+            ProgressMonitorToLogFile(iProcessors, numberOfProcessors, "grid partition reconstructing");
+            ProgressMonitorToWindows(iProcessors, numberOfProcessors, "grid partition reconstructing");
+
+            if (iProcessors == numberOfProcessors) continue;
+
+            BlocksOfiProcessors = specialBlockTable[iProcessors].size();
+            count = 0;
+        }
+    }
+}
+
+void Pre_StrGridPartition::WriteGridCoordinate(StructGrid *grid, Pre_Block_Struct *simpleBlock, vector< int > &nst, vector< int > &ned)
+{
+    vector< RDouble * > s(3, NULL);
+
+    s[0] = simpleBlock->GetX();
+    s[1] = simpleBlock->GetY();
+    s[2] = simpleBlock->GetZ();
+
+    int nx = ned[0] - nst[0] + 1;
+    int ny = ned[1] - nst[1] + 1;
+    int nz = ned[2] - nst[2] + 1;
+    
+    grid->SetNI(nx);
+    grid->SetNJ(ny);
+    grid->SetNK(nz);
+
+    Range IC(1, nx-1);
+    Range JC(1, ny-1);
+    Range KC(1, nz-1);
+
+    if (grid->GetDim() == TWO_D) KC.setRange(1, 1);
+
+    int nTotalNode, nTotalFace, nTotalCell;
+
+    nTotalNode = nx * ny * nz;
+    nTotalCell = IC.length() * JC.length() * KC.length();
+
+    nTotalFace = (ny - 1) * (nz - 1) * nx + (nz - 1) * (nx - 1) * ny + (nx - 1) * (ny - 1) * nz;
+
+    if (grid->GetDim() == TWO_D)
+    {
+        nTotalFace = (ny - 1) * nx + (nx - 1) * ny;
+    }
+
+    grid->SetNTotalNode(nTotalNode);
+    grid->SetNTotalFace(nTotalFace);
+    grid->SetNTotalCell(nTotalCell);
+
+    int ni = simpleBlock->GetNI();
+    int nj = simpleBlock->GetNJ();
+
+    RDouble *x = new RDouble [nTotalNode];
+    RDouble *y = new RDouble [nTotalNode];
+    RDouble *z = new RDouble [nTotalNode];
+    grid->SetX(x);
+    grid->SetY(y);
+    grid->SetZ(z);
+    grid->SetArrayLayout();
+
+    RDouble3D &xx = * grid->GetStructX();
+    RDouble3D &yy = * grid->GetStructY();
+    RDouble3D &zz = * grid->GetStructZ();
+
+    Range I(1, nx);
+    Range J(1, ny);
+    Range K(1, nz);
+    if (nz == 1) K.setRange(1, 1);
+    
+    int ii, jj, kk;
+    for (int k = nst[2]-1; k < ned[2]; ++ k)
+    {
+        kk = k - (nst[2] - 1) + 1;
+        for (int j = nst[1]-1; j < ned[1]; ++ j)
+        {
+            jj = j - (nst[1] - 1) + 1;
+            for (int i = nst[0]-1; i < ned[0]; ++ i)
+            {
+                ii = i - (nst[0] - 1) + 1;
+                int id = ni * nj * k + ni * j + i;
+                xx(ii, jj, kk) = s[0][id];
+                yy(ii, jj, kk) = s[1][id];
+                zz(ii, jj, kk) = s[2][id];
+            }
+        }
+    }
+
+    grid->ComputeMinMaxBox();
+}
+
+void Pre_StrGridPartition::ExtractBoundaryInformation()
+{
+    boundaryContainer->moveto_begin();
+    PHSPACE::PHWrite(boundaryContainer, numberOfBasicBlocks);
+
+    for (int iProcessor = 0; iProcessor < numberOfProcessors; ++ iProcessor)
+    {
+        uint_t gp_size = specialBlockTable[iProcessor].size();
+        for (int j = 0; j < gp_size; ++ j)
+        {
+            vector< int > &nodeDimension = specialBlockTable[iProcessor][j]->GetNodeDimension();
+            PHSPACE::PHWrite(boundaryContainer, nodeDimension, 3);
+        }
+    }
+
+    int originalZoneIndex, ist, ied, jst, jed, kst, ked;
+    vector< int > ref;
+    Pre_Block_Struct *simpleBlock = 0;
+
+    for (int iProcessor = 0; iProcessor < numberOfProcessors; ++ iProcessor)
+    {
+        uint_t gp_size = specialBlockTable[iProcessor].size();
+        for (int j = 0; j < gp_size; ++ j)
+        {
+            vector< int > &nodeDimension = specialBlockTable[iProcessor][j]->GetNodeDimension();
+            vector< int >(3, 0).swap(ref);
+
+            specialBlockTable[iProcessor][j]->GetRootInformation(simpleBlock, ref);
+
+            originalZoneIndex = simpleBlock->GetOriginalZoneIndex();
+            PHSPACE::PHWrite(boundaryContainer, originalZoneIndex);
+
+            ist = ref[0] + 1;
+            ied = ref[0] + nodeDimension[0];
+            jst = ref[1] + 1;
+            jed = ref[1] + nodeDimension[1];
+            kst = ref[2] + 1;
+            ked = ref[2] + nodeDimension[2];
+
+            PHSPACE::PHWrite(boundaryContainer, ist);
+            PHSPACE::PHWrite(boundaryContainer, ied);
+            PHSPACE::PHWrite(boundaryContainer, jst);
+            PHSPACE::PHWrite(boundaryContainer, jed);
+            PHSPACE::PHWrite(boundaryContainer, kst);
+            PHSPACE::PHWrite(boundaryContainer, ked);
+        }
+    }
+    return;
+}
+
+void Pre_StrGridPartition::ExtractOriginalGridInformation()
+{
+    for (int iBlock = 0; iBlock < numberOfOriginalBlocks; ++ iBlock)
+    {
+        Pre_Block_Struct *originalBlock = referencedBlockContainer[iBlock];
+        int ni, nj, nk;
+
+        StructGrid *grid = StructGridCast(OrdinaryGrid[iBlock]);
+
+        ni = grid->GetNI();
+        nj = grid->GetNJ();
+        nk = grid->GetNK();
+        originalBlock->SetNI(ni);
+        originalBlock->SetNJ(nj);
+        originalBlock->SetNK(nk);
+
+        originalBlock->GenerateCoordinateSpace();
+    }
+
+    for (int iBlock = 0; iBlock < numberOfOriginalBlocks; ++ iBlock)
+    {
+        Pre_Block_Struct *originalBlock = referencedBlockContainer[iBlock];
+        
+        StructGrid *grid = StructGridCast(OrdinaryGrid[iBlock]);
+
+        int nTotalNode = grid->GetNTotalNode();
+
+        RDouble *x = grid->GetX();
+        RDouble *y = grid->GetY();
+        RDouble *z = grid->GetZ();
+        
+        RDouble *xx = originalBlock->GetX();
+        RDouble *yy = originalBlock->GetY();
+        RDouble *zz = originalBlock->GetZ();
+
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            xx[iNode] = x[iNode];
+            yy[iNode] = y[iNode];
+            zz[iNode] = z[iNode];
+        }
+    }
+
+    return;
+}
+
+void Pre_StrGridPartition::OutputProcessorInformation()
+{
+    string cs;
+    std::ostringstream oss;
+
+    int *block_proc_inp = PHMPI::GetZoneProcessorID_INP();
+
+    oss << "\n";
+    oss << "      ----- Grid Partition -----\n"
+        << " Number of final partitions: " << numberOfProcessors << "\n";
+        //<< " Number of processors = " << numberOfProcessors << "\n";
+
+    int procwidth = GetIntegerDigitWidth(numberOfProcessors);
+
+    int mincellsize = 0;
+    for (std::size_t j = 0; j < specialBlockTable[0].size(); ++ j)
+    {
+        mincellsize += specialBlockTable[0][j]->GetNumberOfCells();
+    }
+    int maxcellsize = mincellsize;
+
+    int totalcellsize = 0;
+
+    int numberOfBlocks = 0;
+    for (int i = 0; i < numberOfProcessors; ++ i)
+    {
+        int count = 0;
+        int localcellsize = 0;
+
+        for (std::size_t j = 0; j < specialBlockTable[i].size(); ++ j)
+        {
+            cout << " proc = " << i << " maxproc = " << numberOfProcessors;
+            cout << " block " << numberOfBlocks << " size = " << specialBlockTable[i][j]->GetNumberOfNodes() << "\n";
+            count += specialBlockTable[i][j]->GetNumberOfNodes();
+            block_proc_inp[numberOfBlocks] = i;
+            ++ numberOfBlocks;
+            localcellsize += specialBlockTable[i][j]->GetNumberOfCells();
+        }
+        cout << " total size = " << count << "\n";
+
+        oss << " Processor " << setw(procwidth) << i << ": block = " << specialBlockTable[i].size() 
+            << ", size = " << count << ", cell = " << localcellsize << "\n";
+
+        totalcellsize += localcellsize;
+
+        if (mincellsize > localcellsize)
+        {
+            mincellsize = localcellsize;
+        }
+
+        if (maxcellsize < localcellsize)
+        {
+            maxcellsize = localcellsize;
+        }
+    }
+
+    oss.setf(ios::fixed);
+    oss.precision(2);
+    oss << " Total   Cell Size = " << totalcellsize << "\n" 
+        << " Average Cell Size = " << static_cast<RDouble>(totalcellsize) / numberOfProcessors << "\n"
+        << " Minimum Cell Size = " << mincellsize << "(" 
+        << 100. * (static_cast<RDouble>(mincellsize * numberOfProcessors) / totalcellsize - 1.) << "%)\n"
+        << " Maximum Cell Size = " << maxcellsize << "("
+        << 100. * (static_cast<RDouble>(maxcellsize * numberOfProcessors) / totalcellsize - 1.) << "%)\n";
+    (void)oss.flags();
+
+    cs = oss.str();
+    cout << cs << endl;
+    WriteLogFile(cs);
+
+    int count = 0;
+    for (int i = 0; i < numberOfProcessors; ++ i)
+    {
+        for (std::size_t j = 0; j < specialBlockTable[i].size(); ++ j)
+        {
+            StructGrid *grid = StructGridCast(parititionGrids[count]);
+            count ++;
+
+            OutputBoundaryInformation(specialBlockTable[i][j], grid, i);
+        }
+    }
+    return;
+}
+
+void Pre_StrGridPartition::OutputBoundaryInformation(Pre_Block_Struct *Pre_Block_Struct_in, StructGrid *grid, int iZone)
+{
+    vector< Pre_BcFace_Struct * > leafBoundaryFace;
+    vector< Pre_BcFace_Struct * > boundaryFaceList = Pre_Block_Struct_in->GetBoundaryFaceList();
+
+    uint_t numberOfBoundaryFaces = boundaryFaceList.size();
+    for (int i = 0; i < numberOfBoundaryFaces; ++ i)
+    {
+        vector< Pre_BcFace_Struct * > cl = boundaryFaceList[i]->GetLeaves();
+        uint_t numberOfLeaves = cl.size();
+        for (int j = 0; j < numberOfLeaves; ++ j)
+        {
+            leafBoundaryFace.push_back(cl[j]);
+        }
+    }
+
+    int numberOfLeafBoundaryFaces = static_cast<int>(leafBoundaryFace.size());
+    grid->CreateCompositeBCRegion(numberOfLeafBoundaryFaces);
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+
+    for (int i = 0; i < numberOfLeafBoundaryFaces; ++ i)
+    {
+        StructBC *bcregion = new StructBC(iZone, i);
+        structBCSet->SetBCRegion(i, bcregion);
+        leafBoundaryFace[i]->OutputBoundaryInformation(bcregion, geometricDimension);
+    }
+
+    return;
+}
+
+void Pre_StrGridPartition::InitParititionGrids()
+{
+    for (int iProcessor = 0; iProcessor < numberOfProcessors; ++ iProcessor)
+    {
+        numberOfBasicBlocks += static_cast<int>(specialBlockTable[iProcessor].size());
+    }
+
+    PHMPI::CreatetZoneProcessorID_INP(numberOfBasicBlocks);
+
+    parititionGrids = new Grid * [numberOfBasicBlocks];
+    for (int iZone = 0; iZone < numberOfBasicBlocks; ++ iZone)
+    {
+        GridID *index = new GridID(iZone);
+        Grid *grid;
+        grid = CreateGridGeneral(STRUCTGRID, index, 0, geometricDimension);
+        parititionGrids[iZone] = grid;
+    }
+}
+
+void Pre_StrGridPartition::BinarySplitBlocks()
+{
+    const RDouble nmin = 5 * 5 * 2;
+
+    while (! unallottedBlockGroup.empty())
+    {
+        cout << "unallottedBlockGroup.size = " << unallottedBlockGroup.size() << "\n";
+        int first = GetMinimumElementIndex(reserves);
+
+        Pre_Block_Struct *largestBlock = 0;
+        RDouble largestNumberOfCells = 0.0;
+        ProbeLargestBlock(largestBlock, largestNumberOfCells);
+
+        RDouble tau     = reserves[first] + largestNumberOfCells;
+        RDouble nrest   = tau - idealTime;
+        RDouble ntarget = largestNumberOfCells - nrest;
+
+        if (tau > idealTime * (1.0 + epsilon) && nrest > nmin && ntarget > nmin)
+        {
+            RDouble ratio = ntarget / largestNumberOfCells;
+
+            if (abs(ratio - 0.5) < 0.25)
+            {
+                SplitSingleBlock(largestBlock, ntarget, first, true);
+            }
+            else
+            {
+                RDouble nhalf = largestNumberOfCells / 2.0;
+                SplitSingleBlock(largestBlock, nhalf, first, false);
+            }
+        }
+        else
+        {
+            AssignSingleBlock(largestBlock, first, largestNumberOfCells);
+        }
+    }
+
+    if (unallottedBlockGroup.empty())
+    {
+        cout << "All BlockGroup have been allotted!\n";
+    }
+    return;
+}
+
+void Pre_StrGridPartition::SplitSingleBlock(Pre_Block_Struct *simpleBlock, RDouble ntarget, int ip, bool allotted)
+{
+    vector< int > leftDimension(3), rightDimension(3), leftOriginalIndex(3), rightOriginalIndex(3);
+    simpleBlock->Split(ntarget, leftDimension, rightDimension, leftOriginalIndex, rightOriginalIndex);
+
+    Pre_Block_Struct *leftBlock = new Pre_Block_Struct();
+    leftBlock->SetNodeDimension(leftDimension);
+    leftBlock->SetOriginalIndex(leftOriginalIndex);
+
+    Pre_Block_Struct *rightBlock = new Pre_Block_Struct();
+    rightBlock->SetNodeDimension(rightDimension);
+    rightBlock->SetOriginalIndex(rightOriginalIndex);
+
+    leftBlock->SetZoneIndex(numberOfGeneralBlocks);
+    numberOfGeneralBlocks += 1;
+
+    rightBlock->SetZoneIndex(numberOfGeneralBlocks);
+    numberOfGeneralBlocks += 1;
+
+    leftBlock->SetParentBlock(simpleBlock);
+    rightBlock->SetParentBlock(simpleBlock);
+
+    leftBlock->CreateBoundaryFace(geometricDimension);
+    rightBlock->CreateBoundaryFace(geometricDimension);
+
+    TraceMark(leftBlock, rightBlock, simpleBlock);
+
+    CreateInterfaceBoundaryFace(leftBlock, rightBlock);
+
+    unallottedBlockGroup.erase(simpleBlock);
+    unallottedBlockGroup.insert(leftBlock);
+    unallottedBlockGroup.insert(rightBlock);
+
+    generalBlockGroup.insert(leftBlock);
+    generalBlockGroup.insert(rightBlock);
+
+    if (allotted)
+    {
+        AssignSingleBlock(leftBlock, ip, ntarget);
+    }
+
+    return;
+}
+
+void Pre_StrGridPartition::TraceMark(Pre_Block_Struct *leftBlock, Pre_Block_Struct *rightBlock, Pre_Block_Struct *parentBlock)
+{
+    if (!traceMark)
+    {
+        return;
+    }
+    else if (parentBlock->GetZoneIndex() != blockIndexOfMark)
+    {
+        return;
+    }
+
+    vector<int> leftDimension = leftBlock->GetNodeDimension();
+    vector<int> rightOriginalIndex = rightBlock->GetOriginalIndex();
+
+    int axisSelect = 0;
+    for (int iDimension = 0; iDimension < geometricDimension; ++ iDimension)
+    {
+        if (rightOriginalIndex[iDimension])
+        {
+            axisSelect = iDimension;
+        }
+    }
+
+    if (cellIndexOfMark[axisSelect] < leftDimension[axisSelect])
+    {
+        blockIndexOfMark = leftBlock->GetZoneIndex();
+    }
+    else
+    {
+        blockIndexOfMark = rightBlock->GetZoneIndex();
+        cellIndexOfMark[axisSelect] = cellIndexOfMark[axisSelect] - leftDimension[axisSelect] + 1;
+    }
+}
+
+void Pre_StrGridPartition::DumpMarkInfo()
+{
+    if (!traceMark)
+    {
+        return;
+    }
+
+    std::ostringstream oss;
+    oss << endl;
+    oss << "blockIndexOfMark = " << blockIndexOfMark << endl;
+    oss << "cellIndexOfMark =";
+
+    for (int iDimension = 0; iDimension < geometricDimension; ++ iDimension)
+    {
+        oss << "  " << cellIndexOfMark[iDimension];
+    }
+    oss << endl;
+
+    WriteLogFile(oss);
+}
+
+void Pre_StrGridPartition::AssignSingleBlock(Pre_Block_Struct *simpleBlock, int ip, RDouble numberOfCells)
+{
+    reserves[ip] += numberOfCells;
+    unallottedBlockGroup.erase(simpleBlock);
+    specialBlockTable[ip].push_back(simpleBlock);
+
+    return;
+}
+
+void Pre_StrGridPartition::CreateInterfaceBoundaryFace(Pre_Block_Struct *leftBlock, Pre_Block_Struct *rightBlock)
+{
+    vector< int > l_st(3), l_ed(3), r_st(3), r_ed(3);
+    leftBlock->GetAbsoluteCoordinate(l_st, l_ed);
+    rightBlock->GetAbsoluteCoordinate(r_st, r_ed);
+
+    vector< int > st(3), ed(3);
+
+    if (GetInterfaceCoordinate(l_st, l_ed, r_st, r_ed, st, ed))
+    {
+        CreateInterfaceBoundaryFace(leftBlock, rightBlock, st, ed);
+    }
+
+    return;
+}
+
+void Pre_StrGridPartition::CreateInterfaceBoundaryFace(Pre_Block_Struct *leftBlock, Pre_Block_Struct *rightBlock, vector< int > &st, vector< int > &ed)
+{
+    //! Note that Normalize is not independent ,it is ordering!
+    vector< int > l_st(3), l_ed(3), r_st(3), r_ed(3);
+    leftBlock->GetLocalCoordinate(st, ed, l_st, l_ed);
+    rightBlock->GetLocalCoordinate(st, ed, r_st, r_ed);
+
+    Pre_BcFace_Struct *lbc = new Pre_BcFace_Struct();
+    Pre_BcFace_Struct *rbc = new Pre_BcFace_Struct();
+
+    lbc->SetSimpleBlock(leftBlock);
+    rbc->SetSimpleBlock(rightBlock);
+
+    MarkPatchFace(l_st, l_ed, geometricDimension);
+    MarkPatchFace(r_st, r_ed, geometricDimension);
+
+    lbc->SetRegion(l_st, l_ed);
+    lbc->SetBoundaryType(-1);
+    lbc->SetNext(new Pre_Patch_Struct());
+    lbc->GetNext()->SetSimpleBlock(rightBlock);
+    lbc->GetNext()->SetRegion(r_st, r_ed);
+
+    rbc->SetRegion(r_st, r_ed);
+    rbc->SetBoundaryType(-1);
+    rbc->SetNext(new Pre_Patch_Struct());
+    rbc->GetNext()->SetSimpleBlock(leftBlock);
+    rbc->GetNext()->SetRegion(l_st, l_ed);
+
+    lbc->Normalize(geometricDimension);
+    rbc->Normalize(geometricDimension);
+
+    leftBlock->AddBoundaryFace(lbc);
+    rightBlock->AddBoundaryFace(rbc);
+
+    return;
+}
+
+void Pre_StrGridPartition::MarkPatchFace(vector< int > &st, vector< int > &ed, int geometricDimension)
+{
+    int nsw  [] = { 0, 1, 2, 0, 1 };
+    int nsw2d[] = { 0, 1, 0, 1 };
+    int nsurf = GetSurfaceLabel(st, ed);
+
+    int m = nsw[nsurf+1];
+
+    if (geometricDimension == 2) m = nsw2d[nsurf+1];
+
+    st[m] = - abs(st[m]);
+    ed[m] = - abs(ed[m]);
+
+    return;
+}
+
+bool Pre_StrGridPartition::GetInterfaceCoordinate(vector< int > &l_st, vector< int > &l_ed, vector< int > &r_st, vector< int > &r_ed, vector< int > &st, vector< int > &ed)
+{
+    vector< int > ll_st(3), ll_ed(3), rr_st(3), rr_ed(3);
+    for (int m = 0; m < 6; ++ m)
+    {
+        GetIJKRegion(l_st, l_ed, ll_st, ll_ed, m);
+        for (int n = 0; n < 6; ++ n)
+        {
+            GetIJKRegion(r_st, r_ed, rr_st, rr_ed, n);
+            if (IsSameDomain(ll_st, ll_ed, rr_st, rr_ed))
+            {
+                st = ll_st;
+                ed = ll_ed;
+                return true;
+            }
+        }
+    }
+
+    return false;
+}
+
+bool Pre_StrGridPartition::IsSameDomain(vector< int > &l_st, vector< int > &l_ed, vector< int > &r_st, vector< int > &r_ed)
+{
+    for (int m = 0; m < 3; ++ m)
+    {
+        if (l_st[m] != r_st[m] || l_ed[m] != r_ed[m])
+        {
+            return false;
+        }
+    }
+    return true;
+}
+
+void Pre_StrGridPartition::ProbeLargestBlock(Pre_Block_Struct *&simpleBlock, RDouble &numberOfCells)
+{
+    numberOfCells = 0.0;
+
+    for (set< Pre_Block_Struct * >::iterator iter = unallottedBlockGroup.begin(); iter != unallottedBlockGroup.end(); ++ iter)
+    {
+        RDouble nsize = (*iter)->GetNumberOfCells();
+        if (numberOfCells < nsize)
+        {
+            numberOfCells = nsize;
+            simpleBlock   = (*iter);
+        }
+    }
+    return;
+}
+
+int Pre_StrGridPartition::GetMinimumElementIndex(vector<RDouble> &x)
+{
+    RDouble value = x[0];
+    int index = 0;
+    uint_t numberOfElements = x.size();
+
+    for (int iElement = 1; iElement < numberOfElements; ++ iElement)
+    {
+        if (x[iElement] < value)
+        {
+            index = iElement;
+            value = x[iElement];
+        }
+    }
+
+    return index;
+}
+
+void Pre_StrGridPartition::InitSplittingParameter()
+{
+    numberOfGeneralBlocks = numberOfOriginalBlocks;
+    delta = 1.e-5;
+    reserves.resize(numberOfProcessors, delta);
+
+    RDouble sumOfOriginalBlockCells = 0.0;
+    for (int iBlock = 0; iBlock < numberOfOriginalBlocks; ++ iBlock)
+    {
+        sumOfOriginalBlockCells += referencedBlockContainer[iBlock]->GetNumberOfCells();
+
+        unallottedBlockGroup.insert(referencedBlockContainer[iBlock]);
+
+        generalBlockGroup.insert(referencedBlockContainer[iBlock]);
+    }
+
+    idealTime = sumOfOriginalBlockCells / numberOfProcessors;
+    epsilon = 1.e-2;
+
+    specialBlockTable.resize(numberOfProcessors);
+}
+
+void Pre_StrGridPartition::ReadLnkFile(const string &fileName_in)
+{
+    string LnkFileName = ChangeExtensionOfFileName(fileName_in, "link");
+    if (!SerialFileExist(LnkFileName))
+    {
+        TK_Exit::ExceptionExit("There is no link file!");
+        return;
+    }
+    LnkFileExist = true;
+
+    fstream file;
+    OpenSerialFile(file, LnkFileName, ios_base::in|ios_base::binary);
+
+    DataContainer *LnkData = new DataContainer();
+    ReadFile(file, LnkData);
+
+    VirtualFile *virtualFile = new VirtualFile(LnkData);
+    virtualFile->BeginReadWork();
+
+    Grid **OrdinaryGrid = GetOrdinaryGrid();
+    for (int iBlock = 0; iBlock < numberOfOriginalBlocks; iBlock ++)
+    {
+        StructGrid *grid = StructGridCast(OrdinaryGrid[iBlock]);
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+
+        int nBCRegion = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion ++)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+            int bctype = structBC->GetBCType();
+            if ((!IsInterface(bctype))) continue;
+
+            int imin, imax, jmin, jmax, kmin, kmax, nbt;
+
+            PHRead(virtualFile, imin);
+            PHRead(virtualFile, imax);
+            PHRead(virtualFile, jmin);
+            PHRead(virtualFile, jmax);
+
+            if (geometricDimension == THREE_D)
+            {
+                PHRead(virtualFile, kmin);
+                PHRead(virtualFile, kmax);
+            }
+            else
+            {
+                kmin = 1;
+                kmax = 1;
+            }
+
+            structBC->SetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+
+            PHRead(virtualFile, imin);
+            PHRead(virtualFile, imax);
+            PHRead(virtualFile, jmin);
+            PHRead(virtualFile, jmax);
+
+            if (geometricDimension == THREE_D)
+            {
+                PHRead(virtualFile, kmin);
+                PHRead(virtualFile, kmax);
+            }
+            else
+            {
+                kmin = 1;
+                kmax = 1;
+            }
+
+            PHRead(virtualFile, nbt);
+
+            structBC->SetTargetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+            structBC->SetTargetRegionBlock(nbt - 1);
+            if (GetDim() == THREE_D)
+            {
+                structBC->ComputeRelativeParameters();
+            }
+        }
+    }
+
+    virtualFile->EndReadWork();
+
+    delete virtualFile;
+    delete LnkData;
+
+    file.close();
+    file.clear();
+}
+
+void Pre_StrGridPartition::ReadLnkInfor(const string &fileName_in)
+{
+    hid_t file;
+
+    int fileID = PHMPI::GetFileIndexofCurrentProcessor();
+    string actualFileName = AddSymbolToFileName(fileName_in, "_", fileID);
+    file = OpenHDF5File(actualFileName);
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        OrdinaryGrid[iZone] = GetGrid(iZone, 0);
+
+        StructGrid *grid = StructGridCast(OrdinaryGrid[iZone]);
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+
+        int nBCLnkTotal = 0;
+        int nBCRegion = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion ++)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+            int bctype = structBC->GetBCType();
+            if (bctype == PHENGLEI::INTERFACE)
+            {
+                nBCLnkTotal++;
+            }
+        }
+
+        if (!nBCLnkTotal)
+        {
+            continue;
+        }
+
+        hid_t grpGrid, grpData;
+        string grpName;
+
+        ostringstream oss;
+        oss << "Grid-" << iZone;
+        grpName = oss.str();
+        grpGrid = OpenGroup(file, grpName);
+
+        grpData = OpenGroup(grpGrid, "LnkInfo");
+        int **LnkInfor = ReadIntTwoRow(grpData, "LnkInfor");
+
+        int iMin, iMax, jMin, jMax, kMin, kMax, nbt;
+        int iLnkinfo = 0;
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            int index = 0;
+            StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+
+            int bctype = bcregion->GetBCType();
+            if (!IsInterface(bctype)) continue;
+
+            iMin = LnkInfor[iLnkinfo][index++];
+            iMax = LnkInfor[iLnkinfo][index++];
+            jMin = LnkInfor[iLnkinfo][index++];
+            jMax = LnkInfor[iLnkinfo][index++];
+            kMin = LnkInfor[iLnkinfo][index++];
+            kMax = LnkInfor[iLnkinfo][index++];
+            bcregion->SetIJKRegion(iMin, iMax, jMin, jMax, kMin, kMax);
+
+            iLnkinfo ++;
+            index = 0;
+
+            iMin = LnkInfor[iLnkinfo][index++];
+            iMax = LnkInfor[iLnkinfo][index++];
+            jMin = LnkInfor[iLnkinfo][index++];
+            jMax = LnkInfor[iLnkinfo][index++];
+            kMin = LnkInfor[iLnkinfo][index++];
+            kMax = LnkInfor[iLnkinfo][index++];
+
+            nbt = LnkInfor[iLnkinfo][index++];
+            bcregion->SetTargetIJKRegion(iMin, iMax, jMin, jMax, kMin, kMax);
+            bcregion->SetTargetRegionBlock(nbt - 1);
+            if (GetDim() == THREE_D)
+            {
+                bcregion->ComputeRelativeParameters();
+            }
+
+            iLnkinfo ++;
+        }
+
+        DelPointer2(LnkInfor);
+
+        H5Gclose(grpData);
+        H5Gclose(grpGrid);
+    }
+
+    H5Fclose(file);
+}
+
+void Pre_StrGridPartition::ReadBoundaryData()
+{
+    int numberOfMultigrid = PHSPACE::GlobalDataBase::GetIntParaFromDB("numberOfMultigrid");
+
+    cout << "numberOfMultigrid = " << numberOfMultigrid << endl;
+
+    Pre_Block_Struct::CalculateNumberOfUnitCells(numberOfMultigrid);
+
+    cout << "numberOfOriginalBlocks = " << numberOfOriginalBlocks << "\n";
+    referencedBlockContainer.resize(numberOfOriginalBlocks);
+
+    int numberOfUnitCells = Pre_Block_Struct::GetNumberOfUnitCells();
+
+    Grid **OrdinaryGrid = GetOrdinaryGrid();
+
+    for (int iBlock = 0; iBlock < numberOfOriginalBlocks; ++ iBlock)
+    {
+        referencedBlockContainer[iBlock] = new Pre_Block_Struct();
+        referencedBlockContainer[iBlock]->SetOriginalZoneIndex(iBlock);
+        referencedBlockContainer[iBlock]->SetZoneIndex(iBlock);
+        referencedBlockContainer[iBlock]->SetProcessorIndex(0);
+    }
+
+    for (int iBlock = 0; iBlock < numberOfOriginalBlocks; ++ iBlock)
+    {
+        StructGrid *grid = StructGridCast(OrdinaryGrid[iBlock]);
+
+        vector< int > nodeDimension(3);
+        nodeDimension[0] = grid->GetNI();
+        nodeDimension[1] = grid->GetNJ();
+        nodeDimension[2] = grid->GetNK();
+
+        Pre_Block_Struct *simpleBlock = referencedBlockContainer[iBlock];
+        simpleBlock->SetNodeDimension(nodeDimension);
+        simpleBlock->SetNI(nodeDimension[0]);
+        simpleBlock->SetNJ(nodeDimension[1]);
+        simpleBlock->SetNK(nodeDimension[2]);
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+        int numberOfBoundaryFaces = structBCSet->GetnBCRegion();
+        simpleBlock->GenerateBoundaryFaceList(numberOfBoundaryFaces);
+
+        for (int iBCRegion = 0; iBCRegion < numberOfBoundaryFaces; iBCRegion ++)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+            vector< int > nst(3), ned(3);
+            int bctype;
+            string bcname;
+
+            for (int i = 0; i < 3; i ++)
+            {
+                nst[i] = structBC->GetStartPoint(i);
+                ned[i] = structBC->GetEndPoint(i);
+            }
+
+            CheckMultigrid(nst, ned, numberOfUnitCells);
+
+            bctype = structBC->GetBCType();
+            bcname = structBC->GetBCName();
+            int bcdirection = structBC->GetFaceDirection();
+
+            Pre_BcFace_Struct *boundaryFace = new Pre_BcFace_Struct();
+            simpleBlock->SetBoundaryFace(iBCRegion, boundaryFace);
+            boundaryFace->SetSimpleBlock(simpleBlock);
+            boundaryFace->SetBoundaryType(bctype);
+            boundaryFace->SetBoundaryName(bcname);
+            boundaryFace->SetRegion(nst, ned);
+            boundaryFace->SetDirection(bcdirection);
+
+            if (IsInterface(bctype))
+            {
+                int *t_sd = structBC->GetTargetStart();
+                int *t_ed = structBC->GetTargetEnd();
+
+                for (int i = 0; i < 3; i ++)
+                {
+                    nst[i] = t_sd[i];
+                    ned[i] = t_ed[i];
+                }
+
+                CheckMultigrid(nst, ned, numberOfUnitCells);
+
+                int nbt = structBC->GetTargetRegionBlock();
+                int targetbcdirection = structBC->GetFaceDirectionOfTargetBlock();
+
+                boundaryFace->SetNext(new Pre_Patch_Struct());
+                Pre_Patch_Struct *simplePatch = boundaryFace->GetNext();
+
+                simplePatch->SetSimpleBlock(referencedBlockContainer[nbt]);
+
+                simplePatch->SetRegion(nst, ned);
+                simplePatch->SetTargetBlockLabel(simpleBlock->GetZoneIndex());
+                simplePatch->SetDirection(targetbcdirection);
+            }
+        }
+
+        simpleBlock->NormalizeBoundaryFace(geometricDimension);
+    }
+}
+
+void Pre_StrGridPartition::CheckMultigrid(vector< int > nst, vector< int > ned, int numberOfUnitCells)
+{
+    int resi = (nst[0] - ned[0]) % numberOfUnitCells;
+    int resj = (nst[1] - ned[1]) % numberOfUnitCells;
+    int resk = (nst[2] - ned[2]) % numberOfUnitCells;
+
+    if (abs(resi) + abs(resj) + abs(resk) != 0)
+    {
+        TK_Exit::PrintDebugInfoExit("Multigrid condition is not satisfied !");
+    }
+
+    return;
+}
+
+int GetIntegerDigitWidth(int integerData)
+{
+    return 1 + static_cast< int >(floor(log10(static_cast< RDouble > (max(1, integerData)))));
+}
+
+}
+
diff --git a/API/PreProcess/src/Pre_StructToUnstruct.cpp b/API/PreProcess/src/Pre_StructToUnstruct.cpp
new file mode 100644
index 0000000..a39dcb7
--- /dev/null
+++ b/API/PreProcess/src/Pre_StructToUnstruct.cpp
@@ -0,0 +1,682 @@
+#include "Pre_StructToUnstruct.h"
+#include "MixGrid.h"
+#include "GridType.h"
+#include "Glb_Dimension.h"
+#include "Pre_GridConversion.h"
+#include "TK_Log.h"
+
+using namespace std;
+namespace PHSPACE
+{
+Pre_StructToUnstruct::Pre_StructToUnstruct(Grid **structGridIn, int nZonesIn)
+{
+    this->structGrid = structGridIn;
+    this->numberOfZones = nZonesIn;
+
+    structToUnstruct = 0;
+}
+
+Pre_StructToUnstruct::~Pre_StructToUnstruct()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        delete structToUnstruct[iZone];
+    }
+    delete [] structToUnstruct;
+}
+
+void Pre_StructToUnstruct::Run()
+{
+    InitMemory();
+    CopyCoordinate();
+    CopyIBlock();
+    ConstructBCType();
+    ConstructFaceTopo();
+    CopyInterface();
+    ConstructCellMapStrToUns();
+}
+
+void Pre_StructToUnstruct::ConstructCellMapStrToUns()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        if (structGrid[iZone]->Type() != STRUCTGRID) continue;
+        StructGrid   *strGrid = StructGridCast  (structGrid[iZone]);
+        int nI = strGrid->GetNI();
+        int nJ = strGrid->GetNJ();
+        int nK = strGrid->GetNK();
+
+        Range I, J, K;
+        GetRange(nI, nJ, nK, -1, 0, I, J, K);
+        Int3D *cellMapStrToUns = new Int3D(I, J, K, fortranArray);
+        int ist, ied, jst, jed, kst, ked;
+        GetIJKRegion(I, J, K, ist, ied, jst, jed, kst, ked);
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*cellMapStrToUns)(i, j, k) = -1;
+                }
+            }
+        }
+
+        int nTotalCell = strGrid->GetNTotalCell();
+
+        //! Gost cell.
+        StructBCSet *structBCSet = strGrid->GetStructBCSet();
+        int nBCRegion = structBCSet->GetnBCRegion();
+        int iBoundFace = 0;
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+            string bcName = structBC->GetBCName();
+
+            int ist1, ied1, jst1, jed1, kst1, ked1;
+            structBC->GetIJKRegion(ist1, ied1, jst1, jed1, kst1, ked1);
+
+            int iSurface         = structBC->GetFaceDirection() + 1;
+            int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+
+            for (int k = kst1; k <= ked1; ++ k)
+            {
+                for (int j = jst1; j <= jed1; ++ j)
+                {
+                    for (int i = ist1; i <= ied1; ++ i)
+                    {
+                        int iGost = i;
+                        int jGost = j;
+                        int kGost = k;
+
+                        if (iSurface == X_DIR)
+                        {
+                            iGost = iGost + leftOrRightIndex;
+                        }
+                        else if (iSurface == Y_DIR)
+                        {
+                            jGost = jGost + leftOrRightIndex;
+                        }
+                        else if (iSurface == Z_DIR)
+                        {
+                            kGost = kGost + leftOrRightIndex;
+                        }
+
+                        (*cellMapStrToUns)(iGost, jGost, kGost) = nTotalCell + iBoundFace;
+                        iBoundFace ++;
+
+                    }
+                }
+            }
+        }
+
+        //! Interior cell.
+        int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+        strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd);
+
+        for (int kCell = kCellStart; kCell <= kCellEnd; ++ kCell)
+        {
+            for (int jCell = jCellStart; jCell <= jCellEnd; ++ jCell)
+            {
+                for (int iCell = iCellStart; iCell <= iCellEnd; ++ iCell)
+                {
+                    int unsCellIndex = GetCellIndex(strGrid, iCell, jCell, kCell);
+                    (*cellMapStrToUns)(iCell, jCell, kCell) = unsCellIndex;
+                }
+            }
+        }
+
+        strGrid->UpdateDataPtr("cellMapStrToUns", cellMapStrToUns);
+    }
+
+}
+
+void Pre_StructToUnstruct::CopyInterface()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        if (structGrid[iZone]->Type() != STRUCTGRID) continue;
+        UnstructGrid *unsGrid = UnstructGridCast(structToUnstruct[iZone]);
+        InterfaceInfo *iifo = structGrid[iZone]->GetInterfaceInfo();
+        unsGrid->SetInterfaceInfo(iifo);
+        InterfaceFields *interfaceFields = structGrid[iZone]->GetInterfaceFields();
+        unsGrid->SetInterfaceFields(interfaceFields);
+    }
+}
+
+Grid **Pre_StructToUnstruct::GetUnstructGrids()
+{
+    return this->structToUnstruct;
+}
+
+void Pre_StructToUnstruct::InitMemory()
+{
+    structToUnstruct = new Grid *[numberOfZones];
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        if (structGrid[iZone]->Type() != STRUCTGRID) continue;
+        int gridIndex = structGrid[iZone]->GetZoneID();
+        GridID *index = new GridID(gridIndex);
+        Grid *grid;
+        grid = CreateGridGeneral(UNSTRUCTGRID, index, 0, GetDim());
+        structToUnstruct[iZone] = grid;
+    }
+}
+
+void Pre_StructToUnstruct::CopyIBlock()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        if (structGrid[iZone]->Type() != STRUCTGRID) continue;
+        Grid *strGrid = structGrid[iZone];
+        Grid *unsGrid = structToUnstruct[iZone];
+        int iBlock = strGrid->GetIBlock();
+        unsGrid->SetIBlock(iBlock);
+    }
+}
+
+void Pre_StructToUnstruct::CopyCoordinate()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        if (structGrid[iZone]->Type() != STRUCTGRID) continue;
+        StructGrid   *strGrid = StructGridCast  (structGrid[iZone]);
+        UnstructGrid *unsGrid = UnstructGridCast(structToUnstruct[iZone]);
+
+        int nTotalNode = strGrid->GetNTotalNode();
+        int nTotalFace = strGrid->GetNTotalFace();
+        int nTotalCell = strGrid->GetNTotalCell();
+
+        unsGrid->SetNTotalNode(nTotalNode);
+        unsGrid->SetNTotalFace(nTotalFace);
+        unsGrid->SetNTotalCell(nTotalCell);
+
+        RDouble *x = new RDouble[nTotalNode];
+        RDouble *y = new RDouble[nTotalNode];
+        RDouble *z = new RDouble[nTotalNode];
+        unsGrid->SetX(x);
+        unsGrid->SetY(y);
+        unsGrid->SetZ(z);
+
+        RDouble *xx = strGrid->GetX();
+        RDouble *yy = strGrid->GetY();
+        RDouble *zz = strGrid->GetZ();
+
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            x[iNode] = xx[iNode];
+            y[iNode] = yy[iNode];
+            z[iNode] = zz[iNode];
+        }
+    }
+}
+
+void Pre_StructToUnstruct::ConstructBCType()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        if (structGrid[iZone]->Type() != STRUCTGRID) continue;
+        StructGrid *strGrid = StructGridCast(structGrid[iZone]);
+        UnstructGrid *unsGrid = UnstructGridCast(structToUnstruct[iZone]);
+
+        int nBoundFace = strGrid->GetNBoundFace();
+        unsGrid->SetNBoundFace(nBoundFace);
+        UnstructBCSet **bcrs = new UnstructBCSet * [nBoundFace];
+
+        int boundFaceIndex = 0;
+        StructBCSet *structBCSet = strGrid->GetStructBCSet();
+        int nBCRegion = structBCSet->GetnBCRegion();
+
+        int nBCRegionUnstruct = static_cast<int>(nBCRegion);
+        unsGrid->CreateUnstructBCSet(nBCRegionUnstruct);
+        UnstructBCSet *unstructBCSet = unsGrid->GetUnstructBCSet();
+        int* bcRegionIDofBCFace = new int[nBoundFace];
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+            int BCType = structBC->GetBCType();
+            string bcName = structBC->GetBCName();
+
+            UnstructBC *unstructBC = new UnstructBC(iBCRegion);
+            unstructBCSet->SetBCRegion(iBCRegion, unstructBC);
+
+            unstructBC->SetBCType(BCType);
+            unstructBC->SetBCName(bcName);
+            int ist, ied, jst, jed, kst, ked;
+            structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        bcRegionIDofBCFace[boundFaceIndex] = iBCRegion;
+                        vector<int>* faceIndex = unstructBC->GetFaceIndex();
+                        faceIndex->push_back(boundFaceIndex);
+
+                        bcrs[boundFaceIndex] = new UnstructBCSet();
+                        bcrs[boundFaceIndex]->SetBCName(bcName);
+                        bcrs[boundFaceIndex]->SetKey(BCType);
+
+                        boundFaceIndex ++;
+                    }
+                }
+            }
+        }
+        unstructBCSet->SetBCFaceInfo(bcRegionIDofBCFace);
+        unsGrid->SetBCRecord(bcrs);
+    }
+}
+
+void Pre_StructToUnstruct::ConstructFaceTopo()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        if (structGrid[iZone]->Type() != STRUCTGRID) continue;
+        StructGrid *strGrid = StructGridCast(structGrid[iZone]);
+        UnstructGrid *unsGrid = UnstructGridCast(structToUnstruct[iZone]);
+
+        int nTotalFace = unsGrid->GetNTotalFace();
+        int nTotalCell = unsGrid->GetNTotalCell();
+
+        int *node_number_of_each_face = new int[nTotalFace];
+
+        int gridDim = GetDim();
+        int face2NodeSize = 0;
+        if (gridDim == TWO_D)
+        {
+            face2NodeSize = nTotalFace * 2;
+            PHSPACE::SetField(node_number_of_each_face, 2, nTotalFace);
+        }
+        else
+        {
+            face2NodeSize = nTotalFace * 4;
+            PHSPACE::SetField(node_number_of_each_face, 4, nTotalFace);
+        }
+
+        unsGrid->SetNodeNumberOfEachFace(node_number_of_each_face);
+
+        int *face2Node = new int[face2NodeSize];
+        unsGrid->SetFace2Node(face2Node);
+
+        int *leftCellOfFace  = new int[nTotalFace];
+        int *rightCellOfFace = new int[nTotalFace];
+        unsGrid->SetLeftCellOfFace (leftCellOfFace);
+        unsGrid->SetRightCellOfFace(rightCellOfFace);
+
+        //! Boundary face
+        int faceIndex = 0;
+        int nodeCount = 0;
+        StructBCSet *structBCSet = strGrid->GetStructBCSet();
+        int nBCRegion = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+
+            int ist, ied, jst, jed, kst, ked;
+            structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+            int iSurface = structBC->GetFaceDirection() + 1;
+            int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int leftCellIndex = GetCellIndex(strGrid, i, j, k);
+                        leftCellOfFace [faceIndex] = leftCellIndex;
+                        rightCellOfFace[faceIndex] = nTotalCell + faceIndex;
+
+                        int iNodeIndex1 = 1, iNodeIndex2 = 1, iNodeIndex3, iNodeIndex4;
+                        int jNodeIndex1 = 1, jNodeIndex2 = 1, jNodeIndex3, jNodeIndex4;
+                        int kNodeIndex1, kNodeIndex2, kNodeIndex3, kNodeIndex4;
+
+                        int iWall, jWall, kWall;
+                        structBC->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                        if (gridDim == TWO_D)
+                        {
+                            if (iSurface == 1)
+                            {
+                                if (leftOrRightIndex == -1)
+                                {
+                                    iNodeIndex2 = iWall;
+                                    jNodeIndex2 = jWall;
+
+                                    iNodeIndex1 = iWall;
+                                    jNodeIndex1 = jWall + 1;
+                                }
+                                else
+                                {
+                                    iNodeIndex1 = iWall;
+                                    jNodeIndex1 = jWall;
+
+                                    iNodeIndex2 = iWall;
+                                    jNodeIndex2 = jWall + 1;
+                                }
+                            }
+                            else if (iSurface == 2)
+                            {
+                                if (leftOrRightIndex == -1)
+                                {
+                                    iNodeIndex1 = iWall;
+                                    jNodeIndex1 = jWall;
+                                    iNodeIndex2 = iWall + 1;
+                                    jNodeIndex2 = jWall;
+                                }
+                                else
+                                {
+                                    iNodeIndex2 = iWall;
+                                    jNodeIndex2 = jWall;
+                                    iNodeIndex1 = iWall + 1;
+                                    jNodeIndex1 = jWall;
+                                }
+                            }
+
+                            kNodeIndex1 = 1;
+                            kNodeIndex2 = 1;
+
+                            int nodeIndex1, nodeIndex2;
+                            nodeIndex1 = GetNodeIndex(strGrid, iNodeIndex1, jNodeIndex1, kNodeIndex1);
+                            nodeIndex2 = GetNodeIndex(strGrid, iNodeIndex2, jNodeIndex2, kNodeIndex2);
+
+                            face2Node[nodeCount++] = nodeIndex1;
+                            face2Node[nodeCount++] = nodeIndex2;
+                        }
+                        else
+                        {
+                            if (iSurface == 1)
+                            {
+                                iNodeIndex1 = iWall;
+                                jNodeIndex1 = jWall;
+                                kNodeIndex1 = kWall;
+
+                                iNodeIndex2 = iWall;
+                                jNodeIndex2 = jWall + 1;
+                                kNodeIndex2 = kWall;
+
+                                iNodeIndex3 = iWall;
+                                jNodeIndex3 = jWall + 1;
+                                kNodeIndex3 = kWall + 1;
+
+                                iNodeIndex4 = iWall;
+                                jNodeIndex4 = jWall;
+                                kNodeIndex4 = kWall + 1;
+                            }
+                            else if (iSurface == 2)
+                            {
+                                iNodeIndex1 = iWall;
+                                jNodeIndex1 = jWall;
+                                kNodeIndex1 = kWall;
+
+                                iNodeIndex2 = iWall;
+                                jNodeIndex2 = jWall;
+                                kNodeIndex2 = kWall + 1;
+
+                                iNodeIndex3 = iWall + 1;
+                                jNodeIndex3 = jWall;
+                                kNodeIndex3 = kWall + 1;
+
+                                iNodeIndex4 = iWall + 1;
+                                jNodeIndex4 = jWall;
+                                kNodeIndex4 = kWall;
+                            }
+                            else
+                            {
+                                iNodeIndex1 = iWall;
+                                jNodeIndex1 = jWall;
+                                kNodeIndex1 = kWall;
+
+                                iNodeIndex2 = iWall + 1;
+                                jNodeIndex2 = jWall;
+                                kNodeIndex2 = kWall;
+
+                                iNodeIndex3 = iWall + 1;
+                                jNodeIndex3 = jWall + 1;
+                                kNodeIndex3 = kWall;
+
+                                iNodeIndex4 = iWall;
+                                jNodeIndex4 = jWall + 1;
+                                kNodeIndex4 = kWall;
+                            }
+
+                            int nodeIndex1, nodeIndex2, nodeIndex3, nodeIndex4;
+                            nodeIndex1 = GetNodeIndex(strGrid, iNodeIndex1, jNodeIndex1, kNodeIndex1);
+                            nodeIndex2 = GetNodeIndex(strGrid, iNodeIndex2, jNodeIndex2, kNodeIndex2);
+                            nodeIndex3 = GetNodeIndex(strGrid, iNodeIndex3, jNodeIndex3, kNodeIndex3);
+                            nodeIndex4 = GetNodeIndex(strGrid, iNodeIndex4, jNodeIndex4, kNodeIndex4);
+
+                            if (leftOrRightIndex == 1)
+                            {
+                                face2Node[nodeCount++] = nodeIndex1;
+                                face2Node[nodeCount++] = nodeIndex2;
+                                face2Node[nodeCount++] = nodeIndex3;
+                                face2Node[nodeCount++] = nodeIndex4;
+                            }
+                            else
+                            {
+                                face2Node[nodeCount++] = nodeIndex1;
+                                face2Node[nodeCount++] = nodeIndex4;
+                                face2Node[nodeCount++] = nodeIndex3;
+                                face2Node[nodeCount++] = nodeIndex2;
+                            }
+
+                        }
+                        faceIndex ++;
+                    }
+                }
+            }
+        }
+
+        //! Interior face
+        int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+        strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd);
+
+        for (int kCell = kCellStart; kCell <= kCellEnd; ++ kCell)
+        {
+            for (int jCell = jCellStart; jCell <= jCellEnd; ++ jCell)
+            {
+                for (int iCell = iCellStart; iCell <= iCellEnd; ++ iCell)
+                {
+                    int iNodeIndex1, iNodeIndex2, iNodeIndex3, iNodeIndex4;
+                    int jNodeIndex1, jNodeIndex2, jNodeIndex3, jNodeIndex4;
+                    int kNodeIndex1, kNodeIndex2, kNodeIndex3, kNodeIndex4;
+                    int nodeIndex1, nodeIndex2, nodeIndex3, nodeIndex4;
+
+                    if (gridDim == TWO_D)
+                    {
+                        if (iCell != iCellEnd)
+                        {
+                            iNodeIndex1 = iCell + 1;
+                            jNodeIndex1 = jCell;
+
+                            iNodeIndex2 = iCell + 1;
+                            jNodeIndex2 = jCell + 1;
+
+                            kNodeIndex1 = 1;
+                            kNodeIndex2 = 1;
+
+                            nodeIndex1 = GetNodeIndex(strGrid, iNodeIndex1, jNodeIndex1, kNodeIndex1);
+                            nodeIndex2 = GetNodeIndex(strGrid, iNodeIndex2, jNodeIndex2, kNodeIndex2);
+
+                            face2Node[nodeCount++] = nodeIndex1;
+                            face2Node[nodeCount++] = nodeIndex2;
+
+                            int leftCellIndex  = GetCellIndex(strGrid, iCell    , jCell, kCell);
+                            int rightCellIndex = GetCellIndex(strGrid, iCell + 1, jCell, kCell);
+                            leftCellOfFace [faceIndex] = leftCellIndex;
+                            rightCellOfFace[faceIndex] = rightCellIndex;
+
+                            faceIndex ++;
+                        }
+
+                        if (jCell != jCellEnd)
+                        {
+                            iNodeIndex2 = iCell;
+                            jNodeIndex2 = jCell + 1;
+
+                            iNodeIndex1 = iCell + 1;
+                            jNodeIndex1 = jCell + 1;
+
+                            kNodeIndex1 = 1;
+                            kNodeIndex2 = 1;
+
+                            nodeIndex1 = GetNodeIndex(strGrid, iNodeIndex1, jNodeIndex1, kNodeIndex1);
+                            nodeIndex2 = GetNodeIndex(strGrid, iNodeIndex2, jNodeIndex2, kNodeIndex2);
+
+                            face2Node[nodeCount++] = nodeIndex1;
+                            face2Node[nodeCount++] = nodeIndex2;
+
+                            int leftCellIndex  = GetCellIndex(strGrid, iCell, jCell    , kCell);
+                            int rightCellIndex = GetCellIndex(strGrid, iCell, jCell + 1, kCell);
+                            leftCellOfFace [faceIndex] = leftCellIndex;
+                            rightCellOfFace[faceIndex] = rightCellIndex;
+
+                            faceIndex ++;
+                        }
+                    }
+                    else
+                    {
+                        //! I direction
+                        if (iCell != iCellEnd)
+                        {
+                            iNodeIndex1 = iCell + 1;
+                            jNodeIndex1 = jCell;
+                            kNodeIndex1 = kCell;
+
+                            iNodeIndex2 = iCell + 1;
+                            jNodeIndex2 = jCell;
+                            kNodeIndex2 = kCell + 1;
+
+                            iNodeIndex3 = iCell + 1;
+                            jNodeIndex3 = jCell + 1;
+                            kNodeIndex3 = kCell + 1;
+
+                            iNodeIndex4 = iCell + 1;
+                            jNodeIndex4 = jCell + 1;
+                            kNodeIndex4 = kCell;
+
+                            nodeIndex1 = GetNodeIndex(strGrid, iNodeIndex1, jNodeIndex1, kNodeIndex1);
+                            nodeIndex2 = GetNodeIndex(strGrid, iNodeIndex2, jNodeIndex2, kNodeIndex2);
+                            nodeIndex3 = GetNodeIndex(strGrid, iNodeIndex3, jNodeIndex3, kNodeIndex3);
+                            nodeIndex4 = GetNodeIndex(strGrid, iNodeIndex4, jNodeIndex4, kNodeIndex4);
+
+                            face2Node[nodeCount++] = nodeIndex1;
+                            face2Node[nodeCount++] = nodeIndex4;
+                            face2Node[nodeCount++] = nodeIndex3;
+                            face2Node[nodeCount++] = nodeIndex2;
+
+                            int leftCellIndex  = GetCellIndex(strGrid, iCell    , jCell, kCell);
+                            int rightCellIndex = GetCellIndex(strGrid, iCell + 1, jCell, kCell);
+                            leftCellOfFace [faceIndex] = leftCellIndex;
+                            rightCellOfFace[faceIndex] = rightCellIndex;
+
+                            faceIndex ++;
+                        }
+
+                        //! J direction
+                        if (jCell != jCellEnd)
+                        {
+                            iNodeIndex1 = iCell;
+                            jNodeIndex1 = jCell + 1;
+                            kNodeIndex1 = kCell;
+
+                            iNodeIndex2 = iCell + 1;
+                            jNodeIndex2 = jCell + 1;
+                            kNodeIndex2 = kCell;
+
+                            iNodeIndex3 = iCell + 1;
+                            jNodeIndex3 = jCell + 1;
+                            kNodeIndex3 = kCell + 1;
+
+                            iNodeIndex4 = iCell;
+                            jNodeIndex4 = jCell + 1;
+                            kNodeIndex4 = kCell + 1;
+
+                            nodeIndex1 = GetNodeIndex(strGrid, iNodeIndex1, jNodeIndex1, kNodeIndex1);
+                            nodeIndex2 = GetNodeIndex(strGrid, iNodeIndex2, jNodeIndex2, kNodeIndex2);
+                            nodeIndex3 = GetNodeIndex(strGrid, iNodeIndex3, jNodeIndex3, kNodeIndex3);
+                            nodeIndex4 = GetNodeIndex(strGrid, iNodeIndex4, jNodeIndex4, kNodeIndex4);
+
+                            face2Node[nodeCount++] = nodeIndex1;
+                            face2Node[nodeCount++] = nodeIndex4;
+                            face2Node[nodeCount++] = nodeIndex3;
+                            face2Node[nodeCount++] = nodeIndex2;
+
+                            int leftCellIndex  = GetCellIndex(strGrid, iCell, jCell    , kCell);
+                            int rightCellIndex = GetCellIndex(strGrid, iCell, jCell + 1, kCell);
+                            leftCellOfFace [faceIndex] = leftCellIndex;
+                            rightCellOfFace[faceIndex] = rightCellIndex;
+
+                            faceIndex ++;
+                        }
+
+                        //! K direction
+                        if (kCell != kCellEnd)
+                        {
+                            iNodeIndex1 = iCell;
+                            jNodeIndex1 = jCell;
+                            kNodeIndex1 = kCell + 1;
+
+                            iNodeIndex2 = iCell;
+                            jNodeIndex2 = jCell + 1;
+                            kNodeIndex2 = kCell + 1;
+
+                            iNodeIndex3 = iCell + 1;
+                            jNodeIndex3 = jCell + 1;
+                            kNodeIndex3 = kCell + 1;
+
+                            iNodeIndex4 = iCell + 1;
+                            jNodeIndex4 = jCell;
+                            kNodeIndex4 = kCell + 1;
+
+                            nodeIndex1 = GetNodeIndex(strGrid, iNodeIndex1, jNodeIndex1, kNodeIndex1);
+                            nodeIndex2 = GetNodeIndex(strGrid, iNodeIndex2, jNodeIndex2, kNodeIndex2);
+                            nodeIndex3 = GetNodeIndex(strGrid, iNodeIndex3, jNodeIndex3, kNodeIndex3);
+                            nodeIndex4 = GetNodeIndex(strGrid, iNodeIndex4, jNodeIndex4, kNodeIndex4);
+
+                            face2Node[nodeCount++] = nodeIndex1;
+                            face2Node[nodeCount++] = nodeIndex4;
+                            face2Node[nodeCount++] = nodeIndex3;
+                            face2Node[nodeCount++] = nodeIndex2;
+
+                            int leftCellIndex  = GetCellIndex(strGrid, iCell, jCell, kCell);
+                            int rightCellIndex = GetCellIndex(strGrid, iCell, jCell, kCell + 1);
+                            leftCellOfFace [faceIndex] = leftCellIndex;
+                            rightCellOfFace[faceIndex] = rightCellIndex;
+
+                            faceIndex ++;
+                        }
+                    }
+                }
+            }
+        }
+    }
+}
+
+int Pre_StructToUnstruct::GetCellIndex(StructGrid *strGrid, int iCell, int jCell, int kCell)
+{
+    int nI = strGrid->GetNI();
+    int nJ = strGrid->GetNJ();
+
+    int faceSize = (nI - 1) * (nJ - 1);
+
+    int cellIndex = faceSize * (kCell - 1) + (nI - 1) * (jCell - 1) + (iCell - 1);
+    return cellIndex;
+}
+
+int Pre_StructToUnstruct::GetNodeIndex(StructGrid *strGrid, int iNode, int jNode, int kNode)
+{
+    int nI = strGrid->GetNI();
+    int nJ = strGrid->GetNJ();
+
+    int nodeSize = nI * nJ;
+
+    int nodeIndex = nodeSize * (kNode - 1) + nI * (jNode - 1) + (iNode - 1);
+    return nodeIndex;
+}
+
+}
diff --git a/API/PreProcess/src/Pre_UnstructGridPartition.cpp b/API/PreProcess/src/Pre_UnstructGridPartition.cpp
new file mode 100644
index 0000000..778377f
--- /dev/null
+++ b/API/PreProcess/src/Pre_UnstructGridPartition.cpp
@@ -0,0 +1,2965 @@
+#include "Pre_UnstructGridPartition.h"
+#include "IO_FileName.h"
+#include "Glb_Dimension.h"
+#ifdef USE_WINDOWS_X64
+#else
+#include "metis.h"
+#endif
+#include "Geo_UnstructBC.h"
+#include "PHIO.h"
+#include "Math_BasisFunction.h"
+#include "Pre_GridConversion.h"
+#include "Constants.h"
+#include "IO_HDF5File.h"
+#include "TK_Log.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+LIB_EXPORT Pre_UnstructGridPartition::Pre_UnstructGridPartition(UnstructGrid *gridSource, int nPartitionBlocks,
+                                 int buildInterfaceMethod, string orgGridFileName, int parallelPartitionMethod)
+{
+    // if using ParMetis, the number of partitioned blocks is equal to the input.
+    // else, it total nBlock = nProcessors * maxProcessor, where, maxProcessor in
+    // this processor is the number of partitioned blocks.
+    SetParallelPartitionMethod(parallelPartitionMethod);
+    if (parallelPartitionMethod == METIS_METHOD || parallelPartitionMethod == METIS_OPENMP_METHOD)
+    {
+        this->maxProcessor = nPartitionBlocks;
+        int nProcessors = PHMPI::GetNumberOfProcessor();
+        if (nPartitionBlocks % nProcessors != 0)
+        {
+            ostringstream oss;
+            oss << "Error: if using Metis to parallel partition, the number of zones wanted must INTER times "
+                << "of the number of processors used !" << endl;
+            PrintToWindow(oss);
+        }
+        this->nPartInEachProcIfMetis = nPartitionBlocks / nProcessors;
+    }
+    else
+    {
+        this->maxProcessor = nPartitionBlocks;
+    }
+    
+    grids = 0;
+
+    this->gridSource  = gridSource;
+    this->npartmethod = buildInterfaceMethod;
+
+    node2all = 0;
+    face2all = 0;
+    cell2all = 0;
+    part = 0;
+    cell_mark = 0;
+    node_mark = 0;
+    face_mark = 0;
+
+    vtxdist = 0;
+    interfaceIndexInBC_send    = 0;
+    interfaceIndexInBC_recv    = 0;
+    partIndexInNewPartion_recv = 0;
+    part2GlobalZoneIndex       = 0;
+    part2LocalZoneIndex        = 0;
+    nIFaceInOrgBC              = new int[maxProcessor];
+
+    this->orgGridFileName = orgGridFileName;
+
+    parallelPartitionMethod = 1;
+
+    partitionCellToNode = false;
+    partitionFaceBC     = false;
+    partitionWallDist   = false;
+}
+
+LIB_EXPORT Pre_UnstructGridPartition::~Pre_UnstructGridPartition()
+{
+    delete [] cell_mark;    cell_mark = NULL;
+    delete [] face_mark;    face_mark = NULL;
+    delete [] node_mark;    node_mark = NULL;
+    delete [] part;    part = NULL;
+
+    delete [] vtxdist;    vtxdist = NULL;
+
+    delete [] interfaceIndexInBC_send;    interfaceIndexInBC_send = NULL;
+    delete [] interfaceIndexInBC_recv;    interfaceIndexInBC_recv = NULL;
+    delete [] partIndexInNewPartion_recv;    partIndexInNewPartion_recv = NULL;
+    delete [] part2GlobalZoneIndex;    part2GlobalZoneIndex = NULL;
+    delete [] part2LocalZoneIndex;    part2LocalZoneIndex = NULL;
+    delete [] nIFaceInOrgBC;    nIFaceInOrgBC = NULL;
+
+    delete [] pointNumber2zoneID;    pointNumber2zoneID = NULL;
+    delete [] point2ZoneID;    point2ZoneID = NULL;
+    delete [] pointPosition2zoneID;    pointPosition2zoneID = NULL;
+    delete [] cellNumberForNodeValue;    cellNumberForNodeValue = NULL;
+
+    FreeLocal2All();
+}
+
+void Pre_UnstructGridPartition::Init()
+{
+    CheckDoseNeedPartitionAdditionalData();
+}
+
+void Pre_UnstructGridPartition::CheckDoseNeedPartitionAdditionalData()
+{
+    if (this->orgGridFileName == "")
+    {
+        partitionCellToNode = false;
+        partitionFaceBC     = false;
+        return;
+    }
+
+    string originalCellToNodeFileName, originalFaceBCFileName, originalWallDistFileName;
+    if (PHMPI::GetNumberOfProcessor() == 1)
+    {
+        originalCellToNodeFileName = ChangeExtensionOfFileName(orgGridFileName, "c2n");
+        originalFaceBCFileName     = ChangeExtensionOfFileName(orgGridFileName, "bc");
+        originalWallDistFileName   = ChangeExtensionOfFileName(orgGridFileName, "wdt");
+    }
+    else
+    {
+        if (parallelPartitionMethod == PARMETIS_METHOD)
+        {
+            partitionCellToNode = false;
+            partitionFaceBC     = false;
+            partitionWallDist   = false;
+            return;
+        }
+        else
+        {
+            // Check if the first .c2n file exist or not.
+            originalCellToNodeFileName = ChangeExtensionOfFileName(orgGridFileName, "c2n");
+            originalFaceBCFileName     = ChangeExtensionOfFileName(orgGridFileName, "bc");
+            originalWallDistFileName   = ChangeExtensionOfFileName(orgGridFileName, "wdt");
+        }
+    }
+    
+    //! Check if c2n file exist.
+    partitionCellToNode = this->gridSource->ExistCell2Node();
+
+    //! Check if face BC file exist.
+    partitionFaceBC = SerialFileExist(originalFaceBCFileName);
+
+    //! Check if walldist file exist.
+    if (!this->gridSource->GetWallDist())
+    {
+        partitionWallDist = false;
+    }
+    else
+    {
+        partitionWallDist = true;
+    }
+}
+
+Grid ** Pre_UnstructGridPartition::CreateAllPartGrid()
+{
+    this->CreatePartition();
+    
+    this->ComputeCellMark();
+    
+    this->ComputePoint2ZoneID();
+    
+    gridSource->computeBoundaryPointLabel();
+    
+    Grid **grids = new Grid * [maxProcessor];
+
+    int nLocalZones = this->GetNumberofLocalZones();
+    int interval = GetProgressInterval(nLocalZones, 10);
+    int myid = PHMPI::GetCurrentProcessorID();
+    int count = 0;
+    
+    ComputeCellNumberForNodeValue();
+
+    for (int iproc = 0; iproc < maxProcessor; ++ iproc)
+    {
+        if (!DoseProcExist(iproc))
+        {
+            grids[iproc] = 0;
+            continue;
+        }
+
+        ++ count;
+        if (myid == PHMPI::GetServerProcessorID() && count > 0 && count % interval == 0)
+        {
+            ProgressMonitorToLogFile(count, nLocalZones, "grid partition reconstructing");
+            ProgressMonitorToWindows(count, nLocalZones, "grid partition reconstructing");
+        }
+
+        GridID *index = new GridID(iproc);
+        grids[iproc] = CreateGridGeneral(UNSTRUCTGRID, index, 0, GetDim());
+        
+        ComputeGridForPartition(static_cast<UnstructGrid*>(grids[iproc]), iproc);
+        
+        ComputeGlobalToLocalCellToNodeMapping(static_cast<UnstructGrid*>(grids[iproc]), iproc);
+    }
+
+    if (!IsParallelPartition())
+    {
+        ModifyInterpointInfoPart(grids);
+    }
+    else
+    {
+        PrintToWindow("Warning: Haven't consider inter-point for parallel partition!\n");
+    }
+    
+    SetInterfaceInfoPartInOrgBC(grids);
+    
+    BuildInterfaceLinkForParallelPartition(grids);
+    
+    return grids;
+}
+
+void Pre_UnstructGridPartition::FreeLocal2All()
+{
+    delete [] node2all;
+    delete [] face2all;
+    delete [] cell2all;
+
+    node2all = 0;
+    face2all = 0;
+    cell2all = 0;
+}
+#pragma warning(disable:4100)
+LIB_EXPORT void Pre_UnstructGridPartition::PartitionGridSerial(const string &out_grid_file)
+{
+    Init();
+
+    grids = this->CreateAllPartGrid();
+    
+    BuildInterfaceLink(grids, maxProcessor);
+}
+
+LIB_EXPORT void Pre_UnstructGridPartition::PartitionGridParallel(const string &out_grid_file)
+{
+    Init();
+
+    GetVertexDist();
+
+    grids = CreateAllPartGrid();
+
+    // The following function is need only for serial partition.\n
+    // This has been don in BuildInterfaceLinkForParallelPartition.
+    //BuildInterfaceLink(grids, maxProcessor); 
+}
+#pragma warning(default:4100)
+void Pre_UnstructGridPartition::GetVertexDist()
+{
+    //if(parallelPartitionMethod == METIS_METHOD) return;
+
+#if IDXTYPEWIDTH == 32
+    PrintToWindow("  Using 32-bit METIS/PARMETIS lib ...\n");
+#else
+    PrintToWindow("  Using 64-bit METIS/PARMETIS lib ...\n");
+#endif
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    int nProc  = PHMPI::GetNumberOfProcessor();
+    ASSERT(nProc == nZones);
+    int *nTCellofEachZone = new int[nProc];
+
+    FillnTCellofEachZone(nTCellofEachZone);
+
+    vtxdist = new idx_t[nZones + 1];
+    vtxdist[0] = 0;
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        vtxdist[iZone + 1] = vtxdist[iZone] + nTCellofEachZone[iZone];
+    }
+
+    if (PHMPI::GetCurrentProcessorID() == PHMPI::GetServerProcessorID())
+    {
+        int minNTCell = 10000000, maxNTCell = 0;
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            minNTCell = MIN(minNTCell, nTCellofEachZone[iZone]);
+            maxNTCell = MAX(maxNTCell, nTCellofEachZone[iZone]);
+        }
+
+        ostringstream oss;
+        oss << "  Before partition, Min && Max number of cell : " << minNTCell << ", " << maxNTCell << endl;
+        oss << "                    Min to Max nTCell ratio : " << (minNTCell * 1.0) / (maxNTCell * 1.0) << endl;
+        PrintToWindow(oss);
+        WriteLogFile(oss);
+    }
+
+    delete [] nTCellofEachZone;
+}
+
+void Pre_UnstructGridPartition::CreatePartition()
+{
+    int nTotalCell = gridSource->GetNTotalCell();
+    int nTotalFace = gridSource->GetNTotalFace();
+    int nTotalNode = gridSource->GetNTotalNode();
+
+    cell_mark = new int[nTotalCell];    //all 2 local
+    face_mark = new int[nTotalFace];    //all 2 local
+    node_mark = new int[nTotalNode];    //all 2 local
+
+    if (!IsParallelPartition())
+    {
+        part = CreatePartitionSerial(gridSource, maxProcessor);
+    }
+    else
+    {
+        part = CreatePartitionParallel(gridSource, maxProcessor, vtxdist);
+    }
+
+    // The following section is used in parallel partition.
+    // This pointers are used in communication.
+    int nBoundFace = gridSource->GetNBoundFace();
+    interfaceIndexInBC_send    = new int[nBoundFace];
+    interfaceIndexInBC_recv    = new int[nBoundFace];
+    partIndexInNewPartion_recv = new int[nBoundFace];
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        interfaceIndexInBC_send[iFace]    = -1;
+        interfaceIndexInBC_recv[iFace]    = -1;
+        partIndexInNewPartion_recv[iFace] = -1;
+    }
+
+    SetProcessorList();
+
+}
+
+idx_t * Pre_UnstructGridPartition::CreatePartitionSerial(UnstructGrid *grid, int maxProcessor)
+{
+    if (maxProcessor < 2)
+    {
+        TK_Exit::ExceptionExit("The number of partitions should be greater than 1!\n");
+    }
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+
+    //! The data of large scale grid may exceed the value range of int type, so we change the
+    //! data type from int to long-long-int. 
+    long long int nTotalFaceLongType = nTotalFace;
+    long long int nBoundFaceLongType = nBoundFace;
+    long long int size = 2 * (nTotalFaceLongType - nBoundFaceLongType);
+
+    idx_t *xadj   = new idx_t[nTotalCell + 1];
+    idx_t *adjncy = new idx_t[size];
+    idx_t *part   = new idx_t[nTotalCell];
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        part[iCell] = -1;
+    }
+
+    Get_Xadj_Adjncy(grid, xadj, adjncy);
+    MetisGrid(nTotalCell, xadj, adjncy, maxProcessor, part);
+
+    delete [] xadj;
+    delete [] adjncy;
+
+    return part;
+}
+
+idx_t * Pre_UnstructGridPartition::CreatePartitionParallel(UnstructGrid *grid, int maxProcessor, idx_t *vtxdist)
+{
+    if (maxProcessor < 2)
+    {
+        TK_Exit::ExceptionExit("The number of partitions should be greater than 1!\n");
+    }
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int nIFace = grid->GetNIFace();
+
+    idx_t *xadj   = new idx_t[nTotalCell + 1];
+    idx_t *adjncy = new idx_t[2 * (nTotalFace - nBoundFace + nIFace)];
+    idx_t *part   = new idx_t[nTotalCell];
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        part[iCell] = -1;
+    }
+
+    int *neighborCell = new int[nIFace];
+    CommunicateNeiborCell(neighborCell);
+
+    if (parallelPartitionMethod == PARMETIS_METHOD)
+    {
+        Get_Xadj_Adjncy(grid, xadj, adjncy, neighborCell, vtxdist);
+    }
+    else
+    {
+        Get_Xadj_Adjncy(grid, xadj, adjncy, 0, 0);
+    }
+    
+    if (parallelPartitionMethod == PARMETIS_METHOD)
+    {
+        PrintToWindow("Parallel grid partition by ParMETIS ...\n");
+
+        ParMetisGrid(xadj, adjncy, maxProcessor, part, vtxdist);
+    }
+    else if (parallelPartitionMethod == METIS_METHOD || parallelPartitionMethod == METIS_OPENMP_METHOD)
+    {
+        PrintToWindow("Parallel grid partition by METIS ...\n");
+
+        MetisGrid(nTotalCell, xadj, adjncy, nPartInEachProcIfMetis, part);
+        ConvertPartNumberToGlobal(part, nTotalCell);
+    }
+
+    delete [] xadj;
+    delete [] adjncy;
+    delete [] neighborCell;
+
+    return part;
+}
+
+void Pre_UnstructGridPartition::MetisGrid(idx_t nTotalCell, idx_t *xadj, idx_t *adjncy, idx_t nparts, idx_t *part)
+{
+    WriteLogFile("Now beginning partition graph by METIS!");
+
+    idx_t ncon     = 1;
+    idx_t *vwgt    = 0;
+    idx_t *vsize   = 0;
+    idx_t *adjwgt  = 0;
+    real_t *tpwgts = 0;
+    real_t *ubvec  = 0;
+    idx_t options[METIS_NOPTIONS];
+    idx_t objval = 0;
+
+    METIS_SetDefaultOptions(options);
+  
+    PrintToWindow("Now begining partition graph!\n");
+  
+    if (nparts > 8)
+    {
+        PrintToWindow("Using K-way Partitioning!\n");
+        //METIS4.0
+        //METIS_PartGraphKway(&nTotalCell,xadj,adjncy,vwgt,adjwgt,&wgtflag, &numflag, 
+        //                         &nparts,options,&edgecut,part);
+
+        //METIS5.0
+        METIS_PartGraphKway(&nTotalCell, &ncon, xadj, adjncy, vwgt, vsize, adjwgt, 
+                           &nparts, tpwgts, ubvec, options, &objval, part);
+
+        //METIS PartGraphVKway (int *n, idxtype *xadj, idxtype *adjncy, idxtype *vwgt, idxtype *vsize, int *wgtflag,
+        //int *numflag, int *nparts, int *options, int *volume, idxtype *part);
+
+        //int METIS_PartGraphKway(idx_t *nvtxs, idx_t *ncon, idx_t *xadj, idx_t *adjncy, 
+        //                        idx_t *vwgt, idx_t *vsize, idx_t *adjwgt, idx_t *nparts, 
+        //                        real_t *tpwgts, real_t *ubvec, idx_t *options, idx_t *objval, 
+        //                        idx_t *part)
+    }
+    else
+    {
+        PrintToWindow("Using Recursive Partitioning!\n");
+        //METIS4.0
+        //METIS_PartGraphRecursive(&nTotalCell,xadj,adjncy,vwgt,adjwgt,&wgtflag, &numflag, 
+        //                         &nparts,options,&edgecut,part);
+
+        METIS_PartGraphRecursive(&nTotalCell, &ncon, xadj, adjncy, vwgt, vsize, adjwgt, 
+                                 &nparts, tpwgts, ubvec, options, &objval, part);
+
+        //METIS5.0
+        //int METIS_PartGraphRecursive(idx_t *nvtxs, idx_t *ncon, idx_t *xadj, 
+        //                             idx_t *adjncy, idx_t *vwgt, idx_t *vsize, idx_t *adjwgt, 
+        //                             idx_t *nparts, real_t *tpwgts, real_t *ubvec, idx_t *options, 
+        //                             idx_t *objval, idx_t *part)
+    }
+
+    ostringstream oss;
+    oss << "The interface number: " << objval << endl; 
+    oss << "Partition is finished!\n";
+    PrintToWindow(oss);
+}
+
+void Pre_UnstructGridPartition::ParMetisGrid(idx_t *xadj, idx_t *adjncy, idx_t nparts, idx_t *part, idx_t *vtxdist)
+{
+    WriteLogFile("Now beginning parallel partition graph by ParMETIS!");
+    PrintToWindow("Now beginning parallel partition graph by ParMETIS!\n");
+
+    idx_t ncon     = 1;
+    idx_t *vwgt    = 0;
+    idx_t *adjwgt  = 0;
+    real_t *tpwgts = new real_t[nparts];
+    for (int iPart = 0; iPart < nparts; ++ iPart)
+    {
+        tpwgts[iPart] = static_cast<real_t> (1.0 / nparts);
+    }
+
+    //! parmetisBalance: is used to specify the imbalance tolerance.
+    //! 1     : perfect balance;
+    //! nparts: perfect imbalance;
+    //! 1.05  :recommended.
+    RDouble parmetisBalance = GlobalDataBase::GetDoubleParaFromDB("parmetisBalance");
+
+    real_t *ubvec = new real_t[ncon];
+    for (int icon = 0; icon < ncon; ++ icon)
+    {
+        ubvec[icon] = static_cast<real_t> (parmetisBalance);    //modified by LIJIN,2019-2-19
+    }
+    idx_t options[METIS_NOPTIONS];
+    options[0] = 0;
+    idx_t wgtflag = 0;
+    idx_t numflag = 0;
+    idx_t edgecut = 0;
+
+    MPI_Comm comm;
+    MPI_Comm_dup(MPI_COMM_WORLD, &comm);
+    
+    if (PHMPI::GetNumberOfProcessor() == 1)
+    {
+        TK_Exit::ExceptionExit("Error: number of processors must great than one for parallel partition!\n");
+    }
+    else
+    {
+        ParMETIS_V3_PartKway(vtxdist, xadj, adjncy, vwgt, adjwgt, &wgtflag, &numflag, &ncon,
+            &nparts, tpwgts, ubvec, options, &edgecut, part, &comm);
+    }
+
+    delete [] ubvec;
+    delete [] tpwgts;
+
+    WriteLogFile("Partition is finished by Parallel Metis!");
+    PrintToWindow("Partition is finished by Parallel Metis!\n");
+}
+
+void Pre_UnstructGridPartition::ConvertPartNumberToGlobal(idx_t *part, int nTotalCell)
+{
+    // Each Processor owns one zone, and each one is partition to be same number of zones.
+    // so, the start zone index in this processor(zone) is start from:
+    // number of pre-zones * nPartInEachProcIfMetis in each original zones.
+    int myid = PHMPI::GetCurrentProcessorID();
+    int startZoneID = myid * this->nPartInEachProcIfMetis; 
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        part[iCell] += startZoneID;
+    }
+}
+
+void Pre_UnstructGridPartition::CommunicateNeiborCell(int *neighborCell)
+{
+    WriteLogFile("Start to Communicate Neighbor Cells");
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    // Each processor runs along the same order, which is from 0 to nZones.
+    // Each simulation zone is looped over to judge if the communication is necessary.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *zoneNeighbor = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = zoneNeighbor->GetNumberOfNeighbor();
+        for (std::size_t ineighbor = 0; ineighbor < numberOfNeighbor; ++ ineighbor)
+        {
+            int neighborZoneIndex = zoneNeighbor->GetZoneIndexOfNeighbor(ineighbor);
+            SwapInterface(neighborCell, iZone, neighborZoneIndex);
+        }
+    }
+
+    WriteLogFile("End to Communicate Neighbor Cells");
+}
+
+void Pre_UnstructGridPartition::SwapInterface(int *neighborCell, int iZone, int jZone)
+{
+    using namespace PHMPI;
+
+    //! iZone is the current zone, and jZone is the target zone.
+    int send_proc = GetZoneProcessorID(iZone);
+    int recv_proc = GetZoneProcessorID(jZone);
+
+    int tag = iZone;
+    int myid = GetCurrentProcessorID();
+
+    DataContainer *cdata = new DataContainer();
+    cdata->moveto_begin();
+
+    if (myid == send_proc)
+    {
+        UnstructGrid  *grid  = UnstructGridCast(GetGrid(iZone, 0));
+        InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+        if (interfaceInfo)
+        {
+            int ineighbor = interfaceInfo->FindIthNeighbor(jZone);
+            int nIFaceOfNeighbor = interfaceInfo->GetNIFaceOfNeighbor(ineighbor);
+            int *faceIndexForSend = interfaceInfo->GetFaceIndexForSend(ineighbor);
+            int iFace, sourceCell;
+            for (int iLocalFace = 0; iLocalFace < nIFaceOfNeighbor; ++ iLocalFace)
+            {
+                iFace = faceIndexForSend[iLocalFace];
+                grid->GetSourceIndex(iFace, 1, sourceCell);
+                cdata->write(&sourceCell, sizeof(int));
+            }
+        }
+    }
+
+    PH_Trade(cdata, send_proc, recv_proc, tag); 
+
+    if (myid == recv_proc)
+    {
+        UnstructGrid *grid = UnstructGridCast(GetGrid(jZone, 0));
+        InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+        if (interfaceInfo)
+        {
+            int ineighbor = interfaceInfo->FindIthNeighbor(iZone);
+            int iFace;
+            int nIFaceOfNeighbor = interfaceInfo->GetNIFaceOfNeighbor(ineighbor);
+            int *faceIndexForRecv = interfaceInfo->GetFaceIndexForRecv(ineighbor);
+            cdata->moveto_begin();
+            for (int iLocalFace = 0; iLocalFace < nIFaceOfNeighbor; ++ iLocalFace)
+            {
+                iFace = faceIndexForRecv[iLocalFace];
+                int cellIndex;
+                cdata->read(&cellIndex, sizeof(int));
+                neighborCell[iFace] = cellIndex;
+            }
+        }
+    }
+
+    delete cdata;
+}
+
+void Pre_UnstructGridPartition::SetProcessorList()
+{
+    if (!IsParallelPartition()) return;
+
+    int nTotalCell = this->gridSource->GetNTotalCell();
+    
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        int partIndex = static_cast<int>(part[iCell]);
+
+        processorList.insert(partIndex);
+    }
+
+    ostringstream oss;
+    oss << "  Part index in processor " << PHMPI::GetCurrentProcessorID() << ": ";
+    for (set<int>::iterator iter = processorList.begin(); iter != processorList.end(); ++ iter)
+    {
+        int partID = *iter;
+        if (partID < 0)
+        {
+            TK_Exit::ExceptionExit("Error: partID < 0!");
+        }
+        oss << partID << " ";
+    }
+    oss << endl;
+    WriteLogFile(oss.str());
+    
+    //! Compute the global zone index of each cell.
+    int nLocalZones = this->GetNumberofLocalZones();
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    int nProc  = PHMPI::GetNumberOfProcessor();
+    ASSERT(nProc == nZones);
+    int myid = PHMPI::GetCurrentProcessorID();
+    int *nPartOfEachProcessor = new int[nZones];
+
+    if (nProc == nZones)
+    {
+        //! Each processors has ONE zone.
+        int *localSizeTemp = new int [nProc];
+        SetField(localSizeTemp, 1, nProc);
+        int **nPartListTemp = new int * [nProc];
+
+        PHMPI::FillGobalDataCollectBcast(&nLocalZones, localSizeTemp, nPartListTemp);
+
+        for (int iProc = 0; iProc < nProc; ++ iProc)
+        {
+            nPartOfEachProcessor[iProc] = nPartListTemp[iProc][0];
+        }
+
+        DelPointer2(nPartListTemp);
+        DelPointer(localSizeTemp);
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("number of processors != number of zones.");
+        //PHMPI::FillGobalData(nLocalZones, nPartOfEachProcessor);
+    }
+
+    part2LocalZoneIndex  = new int[maxProcessor];
+    part2GlobalZoneIndex = new int [maxProcessor];
+    for (int iproc = 0; iproc < maxProcessor; ++ iproc)
+    {
+        part2LocalZoneIndex[iproc]  = -1;
+        part2GlobalZoneIndex[iproc] = -1;
+    }
+
+    int localIndex = 0;
+    for (int iproc = 0; iproc < maxProcessor; ++ iproc)
+    {
+        if (processorList.find(iproc) != processorList.end())
+        {
+            part2LocalZoneIndex[iproc] = localIndex ++;
+        }
+    }
+    
+    int count = 0;
+    for (int iProc = 0; iProc < myid; ++ iProc)
+    {
+        count += nPartOfEachProcessor[iProc];
+    }
+    for (set<int>::iterator iter = processorList.begin(); iter != processorList.end(); ++ iter)
+    {
+        int partIndex = *iter;
+        localIndex = part2LocalZoneIndex[partIndex];
+        part2GlobalZoneIndex[partIndex] = localIndex + count;
+    }
+
+    delete [] nPartOfEachProcessor;
+}
+
+int Pre_UnstructGridPartition::GetNumberofLocalZones()
+{
+    int nLocalZones = maxProcessor;
+    if (parallelPartitionMethod == PARMETIS_METHOD)
+    {
+        nLocalZones = static_cast<int>(processorList.size());
+    }
+    else if (parallelPartitionMethod == METIS_METHOD || parallelPartitionMethod == METIS_OPENMP_METHOD)
+    {
+        nLocalZones = static_cast<int>(processorList.size());
+    }
+
+    return nLocalZones;
+}
+
+bool Pre_UnstructGridPartition::DoseProcExist(int iproc)
+{
+    if (!IsParallelPartition()) return true;
+
+    if (processorList.find(iproc) == processorList.end())
+    {
+        return false;
+    }
+    else
+    {
+        return true;
+    }
+}
+
+int Pre_UnstructGridPartition::GetMaxProcessorIndexInThisZone()
+{
+    int nTotalCell = this->gridSource->GetNTotalCell();
+    int maxNumber = 0;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        int partIndex = static_cast<int>(part[iCell]);
+        maxNumber = MAX(maxNumber, partIndex);
+    }
+    return (maxNumber + 1);
+}
+
+void Pre_UnstructGridPartition::ComputeCellMark()
+{
+    int nTotalCell = gridSource->GetNTotalCell();
+
+    int  maxProcessor = GetMaxProcessorIndexInThisZone();
+
+    int *count_array = new int[maxProcessor];
+
+    for (int i = 0; i < maxProcessor; ++ i)
+    {
+        count_array[i] = 0;
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        cell_mark[iCell] = count_array[ part[iCell] ] ++;
+    }
+
+    delete [] count_array;
+}
+
+
+//! Set the interface information of the interfaces that belong to the original BC faces.\n
+//! The interfaces that belong to original interior faces have been set by SetInterfaceInfoPart().
+void Pre_UnstructGridPartition::SetInterfaceInfoPartInOrgBC(Grid **grids)
+{
+    if (!IsParallelPartition()) return;
+
+    if (npartmethod != 1) return;
+    
+    CommunicateInterfaceTopo();
+    
+    for (int iproc = 0; iproc < maxProcessor; ++ iproc)
+    {
+        if (!DoseProcExist(iproc))
+        {
+            grids[iproc] = 0;
+            continue;
+        }
+
+        SetInterfaceInfoPartInOrgBC(iproc, UnstructGridCast(grids[iproc]));
+    }
+}
+
+void Pre_UnstructGridPartition::SetInterfaceInfoPartInOrgBC(int iZone, UnstructGrid *gridpart)
+{
+    if (npartmethod != 1) return;
+    
+    int nBoundFace = gridSource->GetNBoundFace();
+    int nTotalCell = gridSource->GetNTotalCell();
+    int *left_cell_of_face  = gridSource->GetLeftCellOfFace();
+    int *right_cell_of_face = gridSource->GetRightCellOfFace();
+    int le, re;
+
+    UnstructBCSet **bcr = gridSource->GetBCRecord();
+
+    //! Re-compute bc_face_mark for each sub-partition.
+    //! The original face_mark have been overwritten.
+    int *bc_face_mark = new int [nBoundFace];
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        bc_face_mark[iFace] = -2;
+    }
+    
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = left_cell_of_face [iFace];
+        re = right_cell_of_face[iFace];
+        if (part[le] == iZone)
+        {
+            bc_face_mark[iFace] = -1;
+        }
+        else if (re < nTotalCell && part[re] == iZone)
+        {
+            bc_face_mark[iFace] = -1;
+        }
+    }
+    
+    //! Only deal with interfaces that belong to original BC faces.
+    InterfaceInfo *local_iinfo = gridpart->GetInterfaceInfo();
+    int *local_interFace2ZoneID       = local_iinfo->GetInterFace2ZoneID();
+    int *local_interFace2InterFaceID  = local_iinfo->GetInterFace2InterFaceID();
+    int *local_interFace2BoundaryFace = local_iinfo->GetInterFace2BoundaryFace();
+
+    int i_nTFace = 0;
+    int i_nIFace = 0;
+    
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        if (bc_face_mark[iFace] == -1)
+        {
+            bc_face_mark[iFace] = i_nTFace ++;
+
+            int bcType = bcr[iFace]->GetKey();
+            if (bcType == PHENGLEI::INTERFACE)
+            {
+                local_interFace2ZoneID[i_nIFace]       = partIndexInNewPartion_recv[iFace];
+                local_interFace2InterFaceID[i_nIFace]  = interfaceIndexInBC_recv[iFace];
+                local_interFace2BoundaryFace[i_nIFace] = bc_face_mark[iFace];
+
+                i_nIFace ++;
+            }
+        }
+    }
+
+    delete [] bc_face_mark;
+}
+
+void Pre_UnstructGridPartition::BuildInterfaceLinkForParallelPartition(Grid **grids)
+{
+    if (!IsParallelPartition()) return;
+
+    for (int iZone = 0; iZone < maxProcessor; ++ iZone)
+    {
+        if (!grids[iZone]) continue;
+
+        InterfaceInfo *interfaceInfo = grids[iZone]->GetInterfaceInfo();
+        if (!interfaceInfo) continue;
+
+        int *interFace2ZoneID      = interfaceInfo->GetInterFace2ZoneID();
+        int *interFace2InterFaceID = interfaceInfo->GetInterFace2InterFaceID();
+
+        UnstructGrid *grid = UnstructGridCast(grids[iZone]);
+
+        int nBoundFace = grid->GetNBoundFace();
+        int nIFace = interfaceInfo->GetNIFace();
+        int nphysi = nBoundFace - nIFace;    //! number of physical boundary = total number boundary face - number of interface.
+
+        int *left_cell_of_face  = grid->GetLeftCellOfFace();
+        int *right_cell_of_face = grid->GetRightCellOfFace();
+
+        bool *isNeighborInterfaceFound = interfaceInfo->GetIsNeighborInterfaceFound();
+
+        int nbz, le, re, ie;
+
+        //! Interfaces count from 0.
+        for (int iFace = 0; iFace < nIFace; ++ iFace)
+        {
+            if (iFace < nIFaceInOrgBC[iZone])
+            {
+                //! The interfaces in the original BC \n
+                //! have been built in function SetInterfaceInfoPartInOrgBC.
+                continue;
+            }
+
+            if (isNeighborInterfaceFound[iFace] == true)
+            {
+                //! The neighbor of this face has been found and paired, so skip it.
+                continue;
+            }
+            
+            //! Neighbor zone index.
+            nbz = interFace2ZoneID[iFace];
+            le  = left_cell_of_face [iFace + nphysi];
+            re  = right_cell_of_face[iFace + nphysi];
+            ie  = MAX(le, re);
+            if (nbz >= iZone)
+            {
+                UnstructGrid *grid_t = UnstructGridCast(grids[nbz]);
+                if (!FindMatchPart(grid_t, iZone, iFace, ie, interFace2InterFaceID))
+                {
+                    TK_Exit::ExceptionExit("!FindMatchPart\n");
+                }
+                else
+                {
+                    isNeighborInterfaceFound[iFace] = true;
+                }
+            }
+        }
+    }
+
+    //! Map the local part index to global zone index.
+    for (int iZone = 0; iZone < maxProcessor; ++ iZone)
+    {
+        if (!grids[iZone]) continue;
+
+        InterfaceInfo *interfaceInfo = grids[iZone]->GetInterfaceInfo();
+        if (!interfaceInfo) continue;
+
+        int *interFace2ZoneID = interfaceInfo->GetInterFace2ZoneID();
+        int nIFace = interfaceInfo->GetNIFace();
+        for (int iFace = 0; iFace < nIFace; ++ iFace)
+        {
+            if (iFace < nIFaceInOrgBC[iZone])
+            {
+                //! The interfaces in the original BC \n
+                //! have been built in function SetInterfaceInfoPartInOrgBC.
+                continue;
+            }
+            
+            int localPartIndex = interFace2ZoneID[iFace];
+            interFace2ZoneID[iFace] = part2GlobalZoneIndex[localPartIndex];
+        }
+    }
+}
+
+void Pre_UnstructGridPartition::CommunicateInterfaceTopo()
+{
+    if (!IsParallelPartition()) return;
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+
+    //! Each processor runs along the same order, which is from 0 to nZones.
+    //! Each simulation zone is looped over to judge if the communication is necessary.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *zoneNeighbor = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = zoneNeighbor->GetNumberOfNeighbor();
+
+        for (std::size_t ineighbor = 0; ineighbor < numberOfNeighbor; ++ ineighbor)
+        {
+            int neighborZoneIndex = zoneNeighbor->GetZoneIndexOfNeighbor(ineighbor);
+
+            SwapInterfaceTopo(iZone, neighborZoneIndex);
+        }
+    }
+}
+
+void Pre_UnstructGridPartition::SwapInterfaceTopo(int iZone, int jZone)
+{
+    using namespace PHMPI;
+
+    //! iZone is the current zone, and jZone is the target zone.
+    int send_proc = GetZoneProcessorID(iZone);
+    int recv_proc = GetZoneProcessorID(jZone);
+
+    int tag = iZone;
+    int myid = GetCurrentProcessorID();
+
+    DataContainer *cdata = new DataContainer();
+
+    if (myid == send_proc)
+    {
+        UnstructGrid  *grid = UnstructGridCast(GetGrid(iZone, 0));
+        InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+        if (interfaceInfo)
+        {
+            int ineighbor = interfaceInfo->FindIthNeighbor(jZone);
+            int nIFaceOfNeighbor = interfaceInfo->GetNIFaceOfNeighbor(ineighbor);
+            int *faceIndexForSend = interfaceInfo->GetFaceIndexForSend(ineighbor);
+            int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+            int iFace, le, partIndex, localInterfaceIndex, bcFaceIndex;
+            cdata->moveto_begin();
+            for (int iLocalFace = 0; iLocalFace < nIFaceOfNeighbor; ++ iLocalFace)
+            {
+                iFace = faceIndexForSend[iLocalFace];
+                bcFaceIndex = interFace2BoundaryFace[iFace];    // BC face index in old grid.
+                grid->GetSourceIndex(iFace, 1, le);
+
+                partIndex = part2GlobalZoneIndex[part[le]];    // global zone index in new partition.
+                localInterfaceIndex = interfaceIndexInBC_send[bcFaceIndex]; // local interface index in new partition.
+
+                cdata->write(&partIndex, sizeof(int));              // interFace2ZoneID
+                cdata->write(&localInterfaceIndex, sizeof(int));    // interFace2InterFaceID
+            }
+        }
+    }
+
+    PH_Trade(cdata, send_proc, recv_proc, tag);   
+
+    if (myid == recv_proc)
+    {
+        UnstructGrid *grid = UnstructGridCast(GetGrid(jZone, 0));
+        InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+        if (interfaceInfo)
+        {
+            int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+
+            int ineighbor = interfaceInfo->FindIthNeighbor(iZone);
+            int nIFaceOfNeighbor = interfaceInfo->GetNIFaceOfNeighbor(ineighbor);
+            int *faceIndexForRecv = interfaceInfo->GetFaceIndexForRecv(ineighbor);
+            int iFace, globalZoneIndexInNeighbor, localInterfaceIndexInNeighbor, bcFaceIndex;
+            cdata->moveto_begin();
+            for (int iLocalFace = 0; iLocalFace < nIFaceOfNeighbor; ++ iLocalFace)
+            {
+                iFace = faceIndexForRecv[iLocalFace];
+                bcFaceIndex = interFace2BoundaryFace[iFace];
+                
+                cdata->read(&globalZoneIndexInNeighbor, sizeof(int));
+                cdata->read(&localInterfaceIndexInNeighbor, sizeof(int));
+
+                partIndexInNewPartion_recv[bcFaceIndex] = globalZoneIndexInNeighbor;
+                interfaceIndexInBC_recv[bcFaceIndex] = localInterfaceIndexInNeighbor;
+            }
+        }
+    }
+
+    delete cdata;
+}
+
+bool Pre_UnstructGridPartition::FindMatchPart(UnstructGrid *grid, int izone_t, int iface_t, int ie_t, int *interface_interfaceid_t)
+{
+    bool found = false;
+
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo) return found;
+
+    int nBoundFace = grid->GetNBoundFace();
+    int nIFace = interfaceInfo->GetNIFace();
+    int nphysi = nBoundFace - nIFace;    //! number of physical boundary = total number boundary face - number of interface.
+
+    int *left_cell_of_face  = grid->GetLeftCellOfFace();
+    int *right_cell_of_face = grid->GetRightCellOfFace();
+
+    int *interFace2ZoneID      = interfaceInfo->GetInterFace2ZoneID();
+    int *interFace2InterFaceID = interfaceInfo->GetInterFace2InterFaceID();
+    
+    bool *isNeighborInterfaceFound = interfaceInfo->GetIsNeighborInterfaceFound();
+
+    int le, re, ie;
+
+    //! Interfaces count from 0.
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        le = left_cell_of_face [iFace + nphysi];
+        re = right_cell_of_face[iFace + nphysi];
+        ie = MAX(le, re);
+
+        if (isNeighborInterfaceFound[iFace] == true)
+        {
+            //! The neighbor of this face has been found and paired, so skip it.
+            continue;
+        }
+
+        //! The interface iFace target zone == iZone.
+        if ((interFace2ZoneID[iFace] == izone_t) &&
+            (interFace2InterFaceID[iFace] == ie_t) && 
+            (ie == interface_interfaceid_t[iface_t]))
+        {
+            //! The jFace of current zone and the iFace corresponding to target zone are all count from 0.
+            interFace2InterFaceID  [iFace  ] = iface_t;
+            interface_interfaceid_t[iface_t] = iFace;
+
+            isNeighborInterfaceFound[iFace] = true;
+
+            found = true;
+            break;
+        } 
+    }
+
+    return found;
+}
+
+//! For each interface in the current zone,\n
+//! Find out the interface-index in the neighbor zone.
+void Pre_UnstructGridPartition::BuildInterfaceLink(Grid **grids, int maxProcessor)
+{
+    if (npartmethod == 1)
+    {
+        for (int iProc = 0; iProc < maxProcessor; ++ iProc)
+        {
+            //! To build interface link for periodic boundary.
+            SetPeriodInfo(grids, iProc);
+            ReconInterfaces(grids, iProc);
+        }
+        ResetFace2Face(grids);
+    }
+    else
+    {
+        ConstructGlobalInterfaceLink(grids, maxProcessor);
+    }
+}
+
+void Pre_UnstructGridPartition::SetPeriodInfo(Grid **grids, int iZone)
+{
+    UnstructGrid *gridpart = UnstructGridCast(grids[iZone]);
+
+    UnstructBCSet *unstructBCSet = gridSource->GetUnstructBCSet();
+    InterfaceInfo *GlobalInterfaceInfo = gridSource->GetInterfaceInfo();
+
+    int *GlobalinterFace2BoundaryFace = GlobalInterfaceInfo->GetInterFace2BoundaryFace();
+    int *GlobalinterFace2ZoneID       = GlobalInterfaceInfo->GetInterFace2ZoneID();
+    int *bcRegionIDofBCFace           = unstructBCSet->GetBCFaceInfo();
+    int *rightCellOfFace              = gridSource->GetRightCellOfFace();
+    int nBoundFace                    = gridSource->GetNBoundFace();
+
+    RDouble *xfc = gridSource->GetFaceCenterX();
+    RDouble *yfc = gridSource->GetFaceCenterY();
+    RDouble *zfc = gridSource->GetFaceCenterZ();
+
+    RDouble *localxfc = gridpart->GetFaceCenterX();
+    RDouble *localyfc = gridpart->GetFaceCenterY();
+    RDouble *localzfc = gridpart->GetFaceCenterZ();
+
+    int *node_number_of_each_face = gridSource->GetNodeNumberOfEachFace();
+    int *face2node = gridSource->GetFace2Node();
+
+    UnstructBCSet *partBCSet = gridpart->GetUnstructBCSet();
+    int i_nBFace = gridpart->GetNBoundFace();
+
+    InterfaceInfo *interfaceInfo = gridpart->GetInterfaceInfo();
+    int i_nIFace = interfaceInfo->GetNIFace();
+    int *interFace2ZoneID = interfaceInfo->GetInterFace2ZoneID();
+    int *interFace2CellID = interfaceInfo->GetInterFace2CellID();
+    int *interFace2InterFaceID = interfaceInfo->GetInterFace2InterFaceID();
+    int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+    int *interFaceDirection = interfaceInfo->GetInterFaceDirection();
+
+    bool *isNeighborInterfaceFound = interfaceInfo->GetIsNeighborInterfaceFound();
+
+    int periodicType = PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType");
+    RDouble translationLength[3] = { 0.0 };
+    GlobalDataBase::GetData("translationLength", &translationLength, PHDOUBLE, 3);
+    double rotationAngle = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+    rotationAngle = rotationAngle * PI / 180.0;
+
+    int npartBound = gridpart->GetNBoundFace();
+    int nIFace = interfaceInfo->GetNIFace();
+    int nphysi = npartBound - nIFace;
+
+    int count = 0;
+    int Globalpos = 0;
+    int maxlist = 0;
+
+    //! The size of ii_local here is equal to periodic faces in current zone.
+    int ii_local = 0;
+
+    //! Find periodic boundary information in source grid.
+    for (int iBFace = 0; iBFace < nBoundFace; iBFace++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iBFace]);
+        string bcName = bcRegion->GetBCName();
+        int bcType = bcRegion->GetBCType();
+
+        if (bcName != "Periodic_up" && bcName != "Periodic_down")
+        {
+            Globalpos += node_number_of_each_face[iBFace];
+            continue;
+        }
+
+        maxlist = MAX(maxlist, node_number_of_each_face[iBFace]);
+        vector<int> index(maxlist), pindex(maxlist);
+
+        RDouble *xlist = new RDouble[maxlist];
+        RDouble *ylist = new RDouble[maxlist];
+        RDouble *zlist = new RDouble[maxlist];
+
+        RDouble *Globalxlist = new RDouble[maxlist];
+        RDouble *Globalylist = new RDouble[maxlist];
+        RDouble *Globalzlist = new RDouble[maxlist];
+
+        RDouble *Globalx = gridSource->GetX();
+        RDouble *Globaly = gridSource->GetY();
+        RDouble *Globalz = gridSource->GetZ();
+
+        for (int m = 0; m < node_number_of_each_face[iBFace]; ++m)
+        {
+            //! get node index.
+            index[m] = face2node[Globalpos + m];
+        }
+        Globalpos += node_number_of_each_face[iBFace];
+
+        int nlist = node_number_of_each_face[iBFace];
+        pindex.resize(nlist);
+
+        GetFaceCoorList(index, nlist, xlist, ylist, zlist, Globalx, Globaly, Globalz);
+
+        //! Correct coordinates to match target coordinate.
+        if (periodicType == TRANSLATIONAL_PERIODICITY)
+        {
+            if (bcRegion->GetBCName() == "Periodic_up")
+            {
+                for (int m = 0; m < node_number_of_each_face[iBFace]; ++m)
+                {
+                    Globalxlist[m] = xlist[m] + translationLength[0];
+                    Globalylist[m] = ylist[m] + translationLength[1];
+                    Globalzlist[m] = zlist[m] + translationLength[2];
+                }
+            }
+            else
+            {
+                for (int m = 0; m < node_number_of_each_face[iBFace]; ++m)
+                {
+                    Globalxlist[m] = xlist[m] - translationLength[0];
+                    Globalylist[m] = ylist[m] - translationLength[1];
+                    Globalzlist[m] = zlist[m] - translationLength[2];
+                }
+            }
+        }
+        else if (periodicType == ROTATIONAL_PERIODICITY)
+        {
+            if (bcRegion->GetBCName() == "Periodic_down")
+            {
+                for (int m = 0; m < node_number_of_each_face[iBFace]; ++m)
+                {
+                    RDouble rotPoint[3] = { 0.0, 0.0, 0.0 };
+                    rotPoint[0] = xlist[m];
+                    rotPoint[1] = ylist[m] * cos(2.0 * PI - rotationAngle) - zlist[m] * sin(2.0 * PI - rotationAngle);
+                    rotPoint[2] = ylist[m] * sin(2.0 * PI - rotationAngle) + zlist[m] * cos(2.0 * PI - rotationAngle);
+                    Globalxlist[m] = rotPoint[0];
+                    Globalylist[m] = rotPoint[1];
+                    Globalzlist[m] = rotPoint[2];
+                }
+            }
+            if (bcRegion->GetBCName() == "Periodic_up")
+            {
+                for (int m = 0; m < node_number_of_each_face[iBFace]; ++m)
+                {
+                    RDouble rotPoint[3] = { 0.0, 0.0, 0.0 };
+                    rotPoint[0] = xlist[m];
+                    rotPoint[1] = ylist[m] * cos(rotationAngle) - zlist[m] * sin(rotationAngle);
+                    rotPoint[2] = ylist[m] * sin(rotationAngle) + zlist[m] * cos(rotationAngle);
+                    Globalxlist[m] = rotPoint[0];
+                    Globalylist[m] = rotPoint[1];
+                    Globalzlist[m] = rotPoint[2];
+                }
+            }
+        }
+
+        if (IsInterface(bcType))
+        {
+            if (bcRegion->GetBCName() == "Periodic_up" || bcRegion->GetBCName() == "Periodic_down")
+            {
+                int localIndex = -1;
+                //! Find local face index for iBFace.
+                MatchPeriodicFace(grids, iZone, iBFace, xlist, ylist, zlist, localIndex);
+
+                //! Build periodic boundary link for faces that locate in part grid.
+
+                if (localIndex < i_nBFace && localIndex > -1)
+                {
+                    int Targetzone;
+                    int TargetFace = -1;
+
+                    for (Targetzone = 0; Targetzone < maxProcessor; Targetzone++)
+                    {
+                        //! Use corrected coordinate to find target face index.
+                        MatchPeriodicFace(grids, Targetzone, iBFace, Globalxlist, Globalylist, Globalzlist, TargetFace);
+
+                        //! If find target face index in target zone, stop.
+                        if (TargetFace >= 0)
+                        {
+                            //! Due to the periodic boundary, left cell of TargetFace take the place of right cell of iBFace. 
+                            UnstructGrid *Targetgrid = UnstructGridCast(grids[Targetzone]);
+                            int *left_cell_of_face = Targetgrid->GetLeftCellOfFace();
+                            int *right_cell_of_face = gridpart->GetRightCellOfFace();
+
+                            int Targetcell = left_cell_of_face[TargetFace];
+
+                            //! Manually set neighbors for periodic boundary.
+                            interFaceDirection[ii_local] = 1;
+                            interFace2ZoneID[ii_local] = static_cast<int>(Targetzone);
+                            interFace2CellID[ii_local] = cell_mark[Targetcell];
+                            interFace2InterFaceID[ii_local] = TargetFace;
+                            interFace2BoundaryFace[ii_local] = localIndex;
+
+                            isNeighborInterfaceFound[ii_local] = true;
+                            ii_local++;
+                            break;
+                        }
+                    }
+                }
+            }
+        }
+    }
+}
+
+//! Find FaceIndex in Targetzone.
+//! iBFace: global face index.
+//! xlist, ylist, zlist: node cooridinate of the face.
+//! FaceIndex: local face index.
+void Pre_UnstructGridPartition::MatchPeriodicFace(Grid **grids, int Targetzone, int iBFace, RDouble *xlist, RDouble *ylist, RDouble *zlist, int &FaceIndex)
+{
+    UnstructGrid *Targetgrid = UnstructGridCast(grids[Targetzone]);
+    UnstructBCSet *TargetBCSet = Targetgrid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = TargetBCSet->GetBCFaceInfo();
+    int nBoundFace = Targetgrid->GetNBoundFace();
+    int *face2node = Targetgrid->GetFace2Node();
+    int *node_number_of_each_face = gridSource->GetNodeNumberOfEachFace();
+
+    int nodepos = 0;
+    int count = 0;
+
+    for (int iFace = 0; iFace < nBoundFace; iFace++)
+    {
+        UnstructBC *TargetbcRegion = TargetBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        string TargetbcName = TargetbcRegion->GetBCName();
+        int bcType = TargetbcRegion->GetBCType();
+        int *Target_node_number_of_each_face = Targetgrid->GetNodeNumberOfEachFace();
+
+        if (!IsInterface(bcType))
+        {
+            nodepos += Target_node_number_of_each_face[iFace];
+            continue;
+        }
+
+        if (TargetbcName != "Periodic_up" && TargetbcName != "Periodic_down" )
+        {
+            nodepos += Target_node_number_of_each_face[iFace];
+            continue;
+        }
+
+        int Target_maxlist = 0;
+
+        Target_maxlist = MAX(Target_maxlist, Target_node_number_of_each_face[iFace]);
+        vector<int> Target_index(Target_maxlist), Target_pindex(Target_maxlist);
+
+        RDouble *Targetxlist = new RDouble[Target_maxlist];
+        RDouble *Targetylist = new RDouble[Target_maxlist];
+        RDouble *Targetzlist = new RDouble[Target_maxlist];
+
+        RDouble *Targetx = Targetgrid->GetX();
+        RDouble *Targety = Targetgrid->GetY();
+        RDouble *Targetz = Targetgrid->GetZ();
+
+        for (int m = 0; m < Target_node_number_of_each_face[iFace]; ++m)
+        {
+            //! get node index
+            Target_index[m] = face2node[nodepos + m];
+        }
+        nodepos += Target_node_number_of_each_face[iFace];
+
+        int Target_nlist = Target_node_number_of_each_face[iFace];
+        Target_pindex.resize(Target_nlist);
+
+        GetFaceCoorList(Target_index, Target_nlist, Targetxlist, Targetylist, Targetzlist, Targetx, Targety, Targetz);
+        //! every node coordinate of iBFace should equal to iFace.
+        for (int m = 0; m < node_number_of_each_face[iBFace]; ++m)
+        {
+            for (int n = 0; n < Target_node_number_of_each_face[iFace]; ++n)
+            {
+                RDouble errx, erry, errz;
+
+                //! now tolerance is set to 1e-6.
+                errx = xlist[m] - Targetxlist[n];
+                erry = ylist[m] - Targetylist[n];
+                errz = zlist[m] - Targetzlist[n];
+
+                errx = sqrt(errx * errx);
+                erry = sqrt(erry * erry);
+                errz = sqrt(errz * errz);
+
+                if (errx<1e-6 && erry<1e-6 && errz<1e-6)
+                {
+                    count++;
+                    break;
+                }
+            }
+
+            if (m == node_number_of_each_face[iBFace] - 1)
+            {
+                if (count == node_number_of_each_face[iBFace])
+                {
+                    FaceIndex = iFace;
+                }
+                //! Initial count after finishing search for one face. 
+                count = 0;
+            }
+        }
+    }
+}
+
+//! interFace2interface data: turn faceindex into facecount.
+void Pre_UnstructGridPartition::ResetFace2Face(Grid **grids)
+{
+    int maxFace = 0;
+    for (int Zone = 0; Zone < maxProcessor; Zone++)
+    {
+        UnstructGrid *iGrid = UnstructGridCast(grids[Zone]);
+        InterfaceInfo *iinterfaceInfo = iGrid->GetInterfaceInfo();
+        int inIFace = iinterfaceInfo->GetNIFace();
+
+        if (maxFace < inIFace)
+        {
+            maxFace = inIFace;
+        }
+    }
+
+    //! Define two-dimensional array to store "interFace2InterFaceID[ii_local]".
+    int **Face2Face = new int * [maxProcessor];
+    for (int iProcessor = 0; iProcessor < maxProcessor; iProcessor++)
+    {
+        Face2Face[iProcessor] = new int[maxFace];
+    }
+
+    for (int ZoneNumber = 0; ZoneNumber < maxProcessor; ZoneNumber++)
+    {
+        UnstructGrid *Grid_ori = UnstructGridCast(grids[ZoneNumber]);
+        UnstructBCSet *BCSet_ori = Grid_ori->GetUnstructBCSet();
+        int *bcRegionIDofBCFace_ori = BCSet_ori->GetBCFaceInfo();
+
+        InterfaceInfo *interfaceInfo_ori = Grid_ori->GetInterfaceInfo();
+        int nIFace_ori = interfaceInfo_ori->GetNIFace();
+        int * Face2NeighborZone_ori = interfaceInfo_ori->GetInterFace2ZoneID();
+        int * Face2NeighborFace_ori = interfaceInfo_ori->GetInterFace2InterFaceID();
+        int * Face2BoundaryFace_ori = interfaceInfo_ori->GetInterFace2BoundaryFace();
+
+        for (int FaceNumber = 0; FaceNumber < nIFace_ori; FaceNumber++)
+        {
+            int iBoundaryFace = Face2BoundaryFace_ori[FaceNumber];
+            int iNeighborFace = Face2NeighborFace_ori[FaceNumber];
+            int NeighborZone = Face2NeighborZone_ori[FaceNumber];
+
+            UnstructBC *bcRegion_ori = BCSet_ori->GetBCRegion(bcRegionIDofBCFace_ori[iBoundaryFace]);
+            string bcName_ori = bcRegion_ori->GetBCName();
+
+            if (bcName_ori == "Periodic_up" || bcName_ori == "Periodic_down")
+            {
+                UnstructGrid *Grid_target = UnstructGridCast(grids[NeighborZone]);
+                InterfaceInfo *interfaceInfo_target = Grid_target->GetInterfaceInfo();
+
+                int nIFace_target = interfaceInfo_target->GetNIFace();
+                int *Face2BoundaryFace_target = interfaceInfo_target->GetInterFace2BoundaryFace();
+
+                //! Store interface2interface data in Face2Face for periodic face.
+                for (int iTargetFace = 0; iTargetFace < nIFace_target; iTargetFace++)
+                {
+                    if (Face2BoundaryFace_target[iTargetFace] == iNeighborFace)
+                    {
+                        Face2Face[ZoneNumber][FaceNumber] = iTargetFace;
+                    }
+                }
+            }
+        }
+    }
+
+    //! Store interface2interface data in interfaceInfo for periodic face.
+    for (int ZoneNumber = 0; ZoneNumber < maxProcessor; ZoneNumber++)
+    {
+        UnstructGrid *i_Grid = UnstructGridCast(grids[ZoneNumber]);
+        InterfaceInfo *i_interfaceInfo = i_Grid->GetInterfaceInfo();
+
+        UnstructBCSet *i_BCSet = i_Grid->GetUnstructBCSet();
+        int *i_bcRegionIDofBCFace = i_BCSet->GetBCFaceInfo();
+
+        int i_nIFace = i_interfaceInfo->GetNIFace();
+        int *i_interFace2InterFaceID = i_interfaceInfo->GetInterFace2InterFaceID();
+        int *i_Face2BoundaryFace = i_interfaceInfo->GetInterFace2BoundaryFace();
+
+        for (int FaceNumber = 0; FaceNumber < i_nIFace; FaceNumber++)
+        {
+            int iBoundaryFace = i_Face2BoundaryFace[FaceNumber];
+            UnstructBC *i_bcRegion = i_BCSet->GetBCRegion(i_bcRegionIDofBCFace[iBoundaryFace]);
+            string i_bcName = i_bcRegion->GetBCName();
+
+            if (i_bcName == "Periodic_up" || i_bcName == "Periodic_down")
+            {
+                i_interFace2InterFaceID[FaceNumber] = Face2Face[ZoneNumber][FaceNumber];
+            }
+        }
+    }
+
+    //! DeAllocate.
+    for (int iProcessor = 0; iProcessor < maxProcessor; iProcessor++)
+    {
+        delete []Face2Face[iProcessor];
+    }
+    delete []Face2Face;
+}
+
+//! For each interface in the current zone,\n
+//! Find out the interface-index in the neighbor zone.
+void Pre_UnstructGridPartition::ReconInterfaces(Grid **grids, int iZone)
+{
+    if (!grids[iZone]) return;
+
+    InterfaceInfo *interfaceInfo = grids[iZone]->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    int *interFace2ZoneID      = interfaceInfo->GetInterFace2ZoneID();
+    int *interFace2InterFaceID = interfaceInfo->GetInterFace2InterFaceID();
+
+    UnstructGrid *grid = UnstructGridCast(grids[iZone]);
+
+    int nBoundFace = grid->GetNBoundFace();
+    int nIFace = interfaceInfo->GetNIFace();
+    int nphysi = nBoundFace - nIFace;    //! number of physical boundary = total number boundary face - number of interface.
+
+    int *left_cell_of_face  = grid->GetLeftCellOfFace();
+    int *right_cell_of_face = grid->GetRightCellOfFace();
+
+    bool *isNeighborInterfaceFound = interfaceInfo->GetIsNeighborInterfaceFound();
+
+    int nbz, le, re, ie;
+
+    //! Interfaces count from 0.
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        if (isNeighborInterfaceFound[iFace] == true)
+        {
+            //! The neighbor of this face has been found and paired, so skip it.
+            continue;
+        }
+
+        //! Neighbor zone index.
+        nbz = interFace2ZoneID[iFace];
+        le  = left_cell_of_face [iFace + nphysi];
+        re  = right_cell_of_face[iFace + nphysi];
+        ie  = MAX(le, re);
+
+        if (nbz >= iZone)
+        {
+            UnstructGrid *grid_t = UnstructGridCast(grids[nbz]);
+            if (!FindMatchPart(grid_t, iZone, iFace, ie, interFace2InterFaceID))
+            {
+                TK_Exit::ExceptionExit("!FindMatchPart\n");
+            }
+            else
+            {
+                isNeighborInterfaceFound[iFace] = true;
+            }
+        }
+    }
+}
+
+void Pre_UnstructGridPartition::SetCoorPart(UnstructGrid *gridpart)
+{
+    int nTotalNode = gridpart->GetNTotalNode();
+    RDouble *x = new RDouble[nTotalNode];
+    RDouble *y = new RDouble[nTotalNode];
+    RDouble *z = new RDouble[nTotalNode];
+
+    gridpart->SetX(x);
+    gridpart->SetY(y);
+    gridpart->SetZ(z);
+
+    int nTNodeSrc = gridSource->GetNTotalNode();
+    RDouble *x_src = gridSource->GetX();
+    RDouble *y_src = gridSource->GetY();
+    RDouble *z_src = gridSource->GetZ();
+
+    int count = 0;
+    for (int iNode = 0; iNode < nTNodeSrc; ++ iNode)
+    {
+        if (node_mark[iNode] > -1)
+        {
+            x[count] = x_src[iNode];
+            y[count] = y_src[iNode];
+            z[count] = z_src[iNode];
+            ++ count;
+        }
+    }
+
+    if (count != nTotalNode)
+    {
+        cout << "error in SetCoorPart\n";
+    }
+}
+
+void Pre_UnstructGridPartition::SetNodeNumberOfEachFaceAndFace2Node(UnstructGrid *gridpart)
+{
+    int *node_number_of_each_face_src = gridSource->GetNodeNumberOfEachFace();
+    int *face2node_src = gridSource->GetFace2Node();
+
+    int nTotalFace = gridpart->GetNTotalFace();
+    int *node_number_of_each_face = new int[nTotalFace];
+    gridpart->SetNodeNumberOfEachFace(node_number_of_each_face);
+
+    //! Extract node_number_of_each_face from the original unstructured grid.
+    long long int count = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        int faceid = face2all[iFace];
+        node_number_of_each_face[iFace] = node_number_of_each_face_src[faceid];
+        count += node_number_of_each_face[iFace];
+    }
+
+    int *face2node = new int[count];
+    gridpart->SetFace2Node(face2node);
+
+    long long int *face2NodeSubscript = gridSource->GetFace2NodeSubscript();
+
+    count = 0;
+    long long int jnode;
+    jnode = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        //! faceid is the index of global face.
+        int faceid = face2all[iFace];
+        for (jnode = face2NodeSubscript[faceid]; jnode < face2NodeSubscript[faceid + 1]; ++ jnode)
+        {
+            face2node[count ++] = node_mark[face2node_src[jnode]];
+        }
+    }
+}
+
+void Pre_UnstructGridPartition::SetFace2CellAndBC(int iZone, UnstructGrid *gridpart)
+{
+    int nBFace_src = gridSource->GetNBoundFace();
+    int *left_cell_of_face_src  = gridSource->GetLeftCellOfFace();
+    int *right_cell_of_face_src = gridSource->GetRightCellOfFace();
+
+    int nTotalFace = gridpart->GetNTotalFace();
+    int nBoundFace = gridpart->GetNBoundFace();
+
+    //! Face cell.
+    int *left_cell_of_face  = new int[nTotalFace]();
+    int *right_cell_of_face = new int[nTotalFace]();
+    gridpart->SetLeftCellOfFace (left_cell_of_face);
+    gridpart->SetRightCellOfFace(right_cell_of_face);
+
+    UnstructBCSet **bcr = new UnstructBCSet * [nBoundFace];
+    gridpart->SetBCRecord(bcr);
+
+    UnstructBCSet *unstructBCSetSrc = gridSource->GetUnstructBCSet();
+    int *bcRegionIDofBCFaceSrc = unstructBCSetSrc->GetBCFaceInfo();
+
+    vector <string> bcNameList;
+    vector <int> bcTypeList;
+    set<string> bcNameSet;
+
+    int le_src = 0, re_src = 0, le = 0, re = 0, bctype = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int faceid = face2all[iFace];
+
+        le_src = left_cell_of_face_src [faceid];
+        re_src = right_cell_of_face_src[faceid];
+
+        string bcName = " ";
+        if (faceid < nBFace_src)
+        {     
+            UnstructBC *bcRegion = unstructBCSetSrc->GetBCRegion(bcRegionIDofBCFaceSrc[faceid]);
+
+            re = - 1;
+            le = cell_mark[le_src];
+            bctype = bcRegion->GetBCType();
+            bcName = bcRegion->GetBCName();
+        }
+        else
+        {
+            bctype = -1;
+            bcName = "Interface";
+            //! int face.
+            if (part[le_src] == iZone)
+            {
+                le = cell_mark[le_src];
+                re = - 1;
+            }
+            else if (part[re_src] == iZone)
+            {
+                re = cell_mark[re_src];
+                le = - 1;
+            }
+            else
+            {
+                cout << "error in SetLinkPart\n";
+            }
+        }
+
+        bcTypeList.push_back(bctype);
+        bcNameList.push_back(bcName);
+        bcNameSet.insert(bcNameList[iFace]);
+
+        bcr[iFace] = new UnstructBCSet();
+        bcr[iFace]->SetKey(bctype);
+        bcr[iFace]->SetBCName(bcName);
+
+        left_cell_of_face [iFace] = le;
+        right_cell_of_face[iFace] = re;
+    }
+    int nBCRegionUnstruct = static_cast<int>(bcNameSet.size());
+    gridpart->CreateUnstructBCSet(nBCRegionUnstruct);
+
+    UnstructBCSet *unstructBCSet = gridpart->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = new int[nBoundFace];
+    set<string>::iterator iter;
+
+    int count = 0;
+    for (iter = bcNameSet.begin(); iter != bcNameSet.end(); iter++)
+    {
+        UnstructBC *unstructBC = new UnstructBC(count);
+        unstructBCSet->SetBCRegion(count, unstructBC);
+        unstructBC->SetBCName(*iter);
+
+        for (int iFace = 0; iFace < nBoundFace; iFace++)
+        {
+            if (bcNameList[iFace] == unstructBC->GetBCName())
+            {
+                unstructBC->SetBCType(bcTypeList[iFace]);
+                bcRegionIDofBCFace[iFace] = count;
+                vector<int> *faceIndex = unstructBC->GetFaceIndex();
+                faceIndex->push_back(iFace);
+            }
+
+        }
+        count++;
+    }
+    unstructBCSet->SetBCFaceInfo(bcRegionIDofBCFace);
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int faceid = face2all[iFace];
+        le_src = left_cell_of_face_src[faceid];
+        re_src = right_cell_of_face_src[faceid];
+
+        left_cell_of_face [iFace] = cell_mark[le_src];
+        right_cell_of_face[iFace] = cell_mark[re_src];
+    }
+}
+
+void Pre_UnstructGridPartition::SetLinkPart(int iZone, UnstructGrid *gridpart)
+{
+    SetNodeNumberOfEachFaceAndFace2Node(gridpart);
+    SetFace2CellAndBC(iZone, gridpart);
+}
+
+void Pre_UnstructGridPartition::SetInterfaceInfoPart(int iZone, UnstructGrid *gridpart)
+{
+    if (IsParallelPartition())
+    {
+        SetInterfaceInfoPartForParallelPartition(iZone, gridpart);
+        return;
+    }
+
+    if (npartmethod != 1) return;
+
+    InterfaceInfo *interfaceInfo = gridpart->GetInterfaceInfo();
+
+    int i_nIFace = interfaceInfo->GetNIFace();
+    int i_nBFace = gridpart->GetNBoundFace();
+
+    int nTotalFace = gridSource->GetNTotalFace();
+    int nBoundFace = gridSource->GetNBoundFace();
+    int *left_cell_of_face  = gridSource->GetLeftCellOfFace();
+    int *right_cell_of_face = gridSource->GetRightCellOfFace();
+
+    int le, re;
+
+    int *interFace2ZoneID       = interfaceInfo->GetInterFace2ZoneID();
+    int *interFace2CellID       = interfaceInfo->GetInterFace2CellID();
+    int *interFace2InterFaceID  = interfaceInfo->GetInterFace2InterFaceID();
+    int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+    int *interFaceDirection     = interfaceInfo->GetInterFaceDirection();
+
+    int nphysi = i_nBFace - i_nIFace;
+
+    //! Here,the interFace2InterFaceID temporarily stores the cells index of neighbor zone.
+
+    int count = 0;
+    //! Interfaces in the original interior field.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        //! face_mark: the corresponding relationship from global face index to local face index.
+        //! The following judgment condition means that this face is the interface of the zone.
+        //! the index of a face is greater than 0 and less than i_nBFace in new partition zone, and it is the internal face of the original grid.
+        //! So it must be interface.
+        if (face_mark[iFace] < i_nBFace && face_mark[iFace] > -1)
+        {
+            ++ count;
+            le = left_cell_of_face [iFace];
+            re = right_cell_of_face[iFace];
+
+            //! ii_local: the index of interface counts from 0.
+            int ii_local = face_mark[iFace] - nphysi;
+
+            //! interface_interfaceid��temporarily records local index of the neighbor interface cell.
+            //! It will be modified to the interface index of neighbor zone.
+            if (part[le] == iZone)
+            {
+                interFaceDirection    [ii_local] = 1;
+                interFace2ZoneID      [ii_local] = static_cast<int>(part[re]);
+                interFace2CellID      [ii_local] = cell_mark[re];
+                interFace2InterFaceID [ii_local] = cell_mark[re];
+                interFace2BoundaryFace[ii_local] = face_mark[iFace];
+            }
+            else if (part[re] == iZone)
+            {
+                interFaceDirection    [ii_local] = - 1;
+                interFace2ZoneID      [ii_local] = static_cast<int>(part[le]);
+                interFace2CellID      [ii_local] = cell_mark[le];
+                interFace2InterFaceID [ii_local] = cell_mark[le];
+                interFace2BoundaryFace[ii_local] = face_mark[iFace];
+            }
+            else
+            {
+                TK_Exit::ExceptionExit("Error: CAN NOT find neighbor interface cell!");
+            }
+        }
+    }
+}
+
+void Pre_UnstructGridPartition::SetInterpointInfoPart(int iZone, UnstructGrid *gridpart)
+{
+    if (npartmethod != 1) return;
+
+    gridpart->computeBoundaryPointLabel();
+    map<int, int> boundaryPointLabel_gridpart = gridpart->GetBoundaryPointLabel();
+    map<int, int> boundaryPointLabel_gridSource = gridSource->GetBoundaryPointLabel();
+
+    int i_nTNode = gridpart->GetNTotalNode();
+
+    int i_nIPoint = 0;
+
+    //! Compute the number of interpoints in current zone.
+    for (int i = 0; i < i_nTNode; i ++)
+    {
+        int numberofnode2all = node2all[i];
+        i_nIPoint += pointPosition2zoneID[numberofnode2all+1] - pointPosition2zoneID[numberofnode2all] -1;
+    }
+
+    if (i_nIPoint == 0)
+    {
+        return;
+    }
+
+    InterpointInformation *interpointInformation = new InterpointInformation(i_nIPoint);
+    gridpart->SetInterpointInfo(interpointInformation);
+
+    //! Only partition procedure need the data of isNeighborInterpointFound, so new it here.
+    bool *isNeighborInterpointFound = new bool [i_nIPoint];
+    PHSPACE::SetField(isNeighborInterpointFound, false, i_nIPoint);
+    interpointInformation->SetIsNeighborInterpointFound(isNeighborInterpointFound);
+
+    int *interPoint2ZoneID = interpointInformation->GetInterPoint2ZoneID();
+    int *interPoint2InterPointID = interpointInformation->GetInterPoint2InterPointID();
+    int *interPoint2GlobalPoint = interpointInformation->GetInterPoint2GlobalPoint();
+    int *cellNumberOfInterPoint = interpointInformation->GetCellNumberOfInterPoint();
+    int *totalZonesOfInterPoint = interpointInformation->GetTotalZonesOfInterPoint();
+    int *labelOfInterPoint = interpointInformation->GetLabelOfInterPoint();
+
+    int count = 0;
+    for (int iNode = 0; iNode < i_nTNode; iNode ++)
+    {
+        int numberofnode2all = node2all[iNode];
+        if (pointPosition2zoneID[numberofnode2all+1] - pointPosition2zoneID[numberofnode2all] == 1) continue;
+        for (int i = pointPosition2zoneID[numberofnode2all]; i < pointPosition2zoneID[numberofnode2all+1]; i ++)
+        {
+            if (point2ZoneID[i] != iZone)
+            {
+                interPoint2ZoneID[count] = point2ZoneID[i];
+                interPoint2InterPointID[count] = node2all[iNode];    //! Temporarily to stores the index of global points,it is modified to the index of interpoints later.
+                interPoint2GlobalPoint[count] = iNode;
+                cellNumberOfInterPoint[count] = cellNumberForNodeValue[numberofnode2all];
+                totalZonesOfInterPoint[count] = pointPosition2zoneID[numberofnode2all+1] - pointPosition2zoneID[numberofnode2all];
+                if (boundaryPointLabel_gridpart[iNode] != boundaryPointLabel_gridSource[numberofnode2all])
+                {
+                    labelOfInterPoint[count] = 0;
+                }
+                else
+                {
+                    labelOfInterPoint[count] = 1;
+                }
+                count ++;
+            }
+        }
+    }
+}
+
+void Pre_UnstructGridPartition::ModifyInterpointInfoPart(Grid **grids)
+{
+    for (int iproc = 0; iproc < maxProcessor; ++ iproc)
+    {
+        UnstructGrid *gridpart = static_cast<UnstructGrid*>(grids[iproc]);
+        InterpointInformation *interpointInformation = gridpart->GetInterpointInfo();
+
+        int i_nIPoint = interpointInformation->GetNumberOfInterpoints();
+        int *interPoint2ZoneID = interpointInformation->GetInterPoint2ZoneID();
+        int *interPoint2InterPointID = interpointInformation->GetInterPoint2InterPointID();
+
+        for (int iPoint = 0; iPoint < i_nIPoint; iPoint ++)
+        {
+            int neighbor_zone = interPoint2ZoneID[iPoint];
+            if (iproc > neighbor_zone) continue;
+            UnstructGrid *gridpart_neighbor = static_cast<UnstructGrid *>(grids[neighbor_zone]);
+            int i_nIPoint_neightbor = gridpart_neighbor->GetInterpointInfo()->GetNumberOfInterpoints();
+            int *interPoint2InterPointID_neightbor = gridpart_neighbor->GetInterpointInfo()->GetInterPoint2InterPointID();
+            int *interPoint2ZoneID_neightbor = gridpart_neighbor->GetInterpointInfo()->GetInterPoint2ZoneID();
+            
+            for (int jPoint = 0; jPoint <i_nIPoint_neightbor; jPoint ++)
+            {
+                if (interPoint2InterPointID[iPoint] == interPoint2InterPointID_neightbor[jPoint] &&
+                    interPoint2ZoneID_neightbor[jPoint] == iproc)
+                {
+                    interPoint2InterPointID[iPoint] = jPoint;
+                    interPoint2InterPointID_neightbor[jPoint] = iPoint;
+                    break;
+                }
+            }
+        }
+    }
+}
+
+void Pre_UnstructGridPartition::SetInterfaceInfoPartForParallelPartition(int iZone, UnstructGrid *gridpart)
+{
+    if (npartmethod != 1) return;
+
+    InterfaceInfo *interfaceInfo = gridpart->GetInterfaceInfo();
+
+    int i_nIFace = interfaceInfo->GetNIFace();
+    int i_nBFace = gridpart->GetNBoundFace();
+
+    int nTotalFace = gridSource->GetNTotalFace();
+    int nBoundFace = gridSource->GetNBoundFace();
+    int *left_cell_of_face  = gridSource->GetLeftCellOfFace();
+    int *right_cell_of_face = gridSource->GetRightCellOfFace();
+
+    int le, re;
+
+    int *interFace2ZoneID       = interfaceInfo->GetInterFace2ZoneID();
+    int *interFace2InterFaceID  = interfaceInfo->GetInterFace2InterFaceID();
+    int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+    int *interFaceDirection     = interfaceInfo->GetInterFaceDirection();
+
+    int nphysi = i_nBFace - i_nIFace;
+
+    //! Set default value for parallel partition.
+    for (int iFace = 0; iFace < i_nIFace; ++ iFace)
+    {
+        interFace2BoundaryFace[iFace] = -1;
+        interFace2InterFaceID[iFace]  = -1;
+        interFace2ZoneID[iFace]       = -1;
+    }
+
+    //! Here,the interFace2InterFaceID temporarily stores the cells index of neighbor zone.
+
+    int count = 0;
+    //! Interfaces in the original interior field.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        //! face_mark: the corresponding relationship from global face index to local face index.
+        //! The following judgment condition means that this face is the interface of the zone.
+        //! the index of a face is greater than 0 and less than i_nBFace in new partition zone, and it is the internal face of the original grid.
+        //! So it must be interface.
+        if (face_mark[iFace] < i_nBFace && face_mark[iFace] > -1)
+        {
+            ++ count;
+            le = left_cell_of_face [iFace];
+            re = right_cell_of_face[iFace];
+
+            //! ii_local: the index of interface counts from 0.
+            int ii_local = face_mark[iFace] - nphysi;
+
+            //! interface_interfaceid��temporarily records local index of the neighbor interface cell.
+            //! It will be modified to the interface index of neighbor zone.
+            if (part[le] == iZone)
+            {
+                interFaceDirection    [ii_local] = 1;
+                interFace2ZoneID      [ii_local] = static_cast<int>(part[re]);
+                interFace2InterFaceID [ii_local] = cell_mark[re];
+                interFace2BoundaryFace[ii_local] = face_mark[iFace];
+            }
+            else if (part[re] == iZone)
+            {
+                interFaceDirection    [ii_local] = -1;
+                interFace2ZoneID      [ii_local] = static_cast<int>(part[le]);
+                interFace2InterFaceID [ii_local] = cell_mark[le];
+                interFace2BoundaryFace[ii_local] = face_mark[iFace];
+            }
+            else
+            {
+                TK_Exit::ExceptionExit("Error: CAN NOT find neighbor interface cell!");
+            }
+        }
+    }
+}
+
+void Pre_UnstructGridPartition::ComputeNodeMark(UnstructGrid *gridpart)
+{
+    int nTotalFace = gridSource->GetNTotalFace();
+    int nTotalNode = gridSource->GetNTotalNode();
+    int *node_number_of_each_face  = gridSource->GetNodeNumberOfEachFace();
+    int *face2node = gridSource->GetFace2Node();
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        node_mark[iNode] = NOT_IN_THIS_ZONE;
+    }
+
+    //! Set all the node_mark belong to iZone to -1.
+   long long int count = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        if (face_mark[iFace] > -1)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                node_mark[face2node[count ++]] = IN_THIS_ZONE;
+            }
+        }
+        else
+        {
+            count += node_number_of_each_face[iFace];
+        }
+    }
+
+    int i_nTNode = 0;
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        if (IsBelongtoThisZone(node_mark[iNode]))
+        {
+            node_mark[iNode] = i_nTNode ++;
+        }
+    }
+
+    gridpart->SetNTotalNode(i_nTNode);
+}
+
+void Pre_UnstructGridPartition::ComputeFaceMark(int iZone, UnstructGrid *gridpart)
+{
+    int nTotalCell = gridSource->GetNTotalCell();
+    int nTotalFace = gridSource->GetNTotalFace();
+    int nBoundFace = gridSource->GetNBoundFace();
+    int *left_cell_of_face  = gridSource->GetLeftCellOfFace();
+    int *right_cell_of_face = gridSource->GetRightCellOfFace();
+    
+    UnstructBCSet *unstructBCSet = gridSource->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    int le = 0, re = 0;
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        face_mark[iFace] = NOT_IN_THIS_ZONE;
+    }
+
+    //! The face belong to this zone is set to be 'IN_THIS_ZONE'.
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        le = left_cell_of_face [iFace];
+        re = right_cell_of_face[iFace];
+
+        if (part[le] == iZone)
+        {
+            face_mark[iFace] = IN_THIS_ZONE;
+        }
+        else if (re < nTotalCell && part[re] == iZone)
+        {
+            face_mark[iFace] = IN_THIS_ZONE;
+        }
+    }
+
+    int i_nTFace = 0;
+    int i_nIFace = 0;
+
+    //! BC faces.
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        if (IsBelongtoThisZone(face_mark[iFace]))
+        {
+            face_mark[iFace] = i_nTFace ++;
+
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+
+            int bcType = bcRegion->GetBCType();
+            if (bcType == PHENGLEI::INTERFACE)
+            {
+                //! Parallel partition.
+                interfaceIndexInBC_send[iFace] = i_nIFace;
+                i_nIFace ++;
+            }
+        }
+    }
+
+    nIFaceInOrgBC[iZone] = i_nIFace;
+
+    //! Interior interfaces.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        if (IsBelongtoThisZone(face_mark[iFace]))
+        {
+            le = left_cell_of_face [iFace];
+            re = right_cell_of_face[iFace];
+            if (part[le] != part[re])
+            {
+                face_mark[iFace] = i_nTFace ++;
+                i_nIFace ++;
+            }
+        }
+    }
+
+    int i_nBFace = i_nTFace;
+
+    //! Interior NON-interface.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        if (face_mark[iFace] < 0)
+        {
+            //! Has not been set.
+            if (IsBelongtoThisZone(face_mark[iFace]))
+            {
+                le = left_cell_of_face [iFace];
+                re = right_cell_of_face[iFace];
+
+                if (part[le] == part[re])
+                {
+                    face_mark[iFace] = i_nTFace ++;
+                }
+            }
+        }
+    }
+
+    gridpart->SetNTotalFace(i_nTFace);
+    gridpart->SetNBoundFace(i_nBFace);
+    if (i_nIFace > 0)
+    {
+        InterfaceInfo *interfaceInfo = new InterfaceInfo(i_nIFace);
+        gridpart->SetInterfaceInfo(interfaceInfo);
+
+        //! Only partition procedure need the data of isNeighborInterfaceFound,
+        //! so new it here.
+        bool *isNeighborInterfaceFound = new bool [i_nIFace];
+        PHSPACE::SetField(isNeighborInterfaceFound, false, i_nIFace);
+        interfaceInfo->SetIsNeighborInterfaceFound(isNeighborInterfaceFound);
+    }
+}
+
+int Pre_UnstructGridPartition::GetNTotalCell(int iZone, idx_t *part)
+{
+    int nTotalCell = gridSource->GetNTotalCell();
+    int count = 0;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        if (part[iCell] == iZone)
+        {
+            count ++;
+        }
+    }
+    return count;
+}
+
+int * Pre_UnstructGridPartition::GetNode2All(UnstructGrid *gridpart)
+{
+    int i_nTNode = gridpart->GetNTotalNode();
+
+    int *node2all = new int[i_nTNode];    //! node2all, record the connection relationship from nodes in partition zone to all nodes.
+
+    int nTotalNode = gridSource->GetNTotalNode();
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        if (node_mark[iNode] > -1)
+        {
+            node2all[node_mark[iNode]] = iNode;
+        }
+    }
+
+    return node2all;
+}
+
+int * Pre_UnstructGridPartition::GetFace2All(UnstructGrid *gridpart)
+{
+    int i_nTFace = gridpart->GetNTotalFace();
+
+    int *face2all = new int[i_nTFace];    //! face2all,record the connection relationship from faces in partition zone to all faces(after ordering).
+
+    int nTotalFace = gridSource->GetNTotalFace();
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        if (face_mark[iFace] > -1)
+        {
+            face2all[face_mark[iFace]] = iFace;
+        }
+    }
+
+    return face2all;
+}
+
+int * Pre_UnstructGridPartition::GetCell2All(int iZone, UnstructGrid *gridpart)
+{
+    int nTotalCell = gridpart->GetNTotalCell();
+
+    int *cell2all = new int[nTotalCell];    //! cell2all,record the connection relationship from cells in partition zone to all cells.
+
+    int nTotalCell_All = gridSource->GetNTotalCell();
+
+    int count = 0;
+    for (int iCell = 0; iCell < nTotalCell_All; ++ iCell)
+    {
+        if (part[iCell] == iZone)
+        {
+            cell2all[count] = iCell;
+            ++ count;
+        }
+    }
+
+    return cell2all;
+}
+
+void Pre_UnstructGridPartition::ComputePoint2ZoneID()
+{
+    int *n2c = gridSource->GetNode2Cell();
+    int nTotalCell = gridSource->GetNTotalCell();
+    int *nCPN = gridSource->GetCellNumberOfEachNode();
+    int nTotalNode = gridSource->GetNTotalNode();
+
+    set<int> *point2ZoneIDSet = new set<int>[nTotalNode];
+    vector <int> pointsForPartition;
+    vector <int> point2ZoneID_Vector;
+
+    pointPosition2zoneID = new int [nTotalNode + 1];
+    pointPosition2zoneID[0] = 0;
+
+    long long int count = 0;
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        //! node2ZoneSet is used to store and filter the repeated corresponding relationship from nodes to zone.
+        for (int jcell = 0; jcell < nCPN[iNode]; ++ jcell)
+        {
+            if (!(n2c[count + jcell] < nTotalCell))
+            {
+                continue;
+            }
+                point2ZoneIDSet[iNode].insert(static_cast<int>(part[n2c[count + jcell]]));
+        }
+        count += nCPN[iNode];
+
+        //! The size of the corresponding relationship from nodes to zone can not be determined,we can not creat static array to store.
+        //! So it can only be stored with vector.
+        for (set<int>::iterator iter = point2ZoneIDSet[iNode].begin(); iter != point2ZoneIDSet[iNode].end(); ++ iter)
+        {
+            pointsForPartition.push_back(iNode);
+            point2ZoneID_Vector.push_back((*iter));
+        }
+        pointPosition2zoneID[iNode+1] = pointPosition2zoneID[iNode] + static_cast<int>(point2ZoneIDSet[iNode].size());
+    }
+
+    int pointsSize = static_cast<int>(pointsForPartition.size());
+    pointNumber2zoneID = new int [pointsSize];
+    point2ZoneID = new int [pointsSize];
+    
+    for (int iPoint =0; iPoint < pointsSize; iPoint ++)
+    {
+        pointNumber2zoneID[iPoint] = pointsForPartition[iPoint];
+        point2ZoneID[iPoint] = point2ZoneID_Vector[iPoint];
+    }
+
+    delete [] point2ZoneIDSet;
+}
+
+void Pre_UnstructGridPartition::ComputeCellNumberForNodeValue()
+{
+    int nTotalNode = gridSource->GetNTotalNode();
+    cellNumberForNodeValue = new int[nTotalNode];
+
+    int nBoundFace = gridSource->GetNBoundFace();
+    int nTotalFace = gridSource->GetNTotalFace();
+
+    int *face2node = gridSource->GetFace2Node();
+    int *node_number_of_each_face = gridSource->GetNodeNumberOfEachFace();
+
+    for (int iNode = 0; iNode < nTotalNode; iNode ++)
+    {
+        cellNumberForNodeValue[iNode] = 0;
+    }
+
+    int pt;
+    long long int nodepos = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+        {
+            pt = face2node[nodepos + j];
+            //! From left.
+            cellNumberForNodeValue[pt] += 1;
+            //! From right.
+            cellNumberForNodeValue[pt] += 1;
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    nodepos = 0;
+    UnstructBCSet **bcr = gridSource->GetBCRecord();
+    int bcType = 0;
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        bcType = bcr[iFace]->GetKey();
+        if (bcType == PHENGLEI::SYMMETRY)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt = face2node[nodepos + j];
+                cellNumberForNodeValue[pt] = 0;
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        bcType = bcr[iFace]->GetKey();
+        if (bcType == PHENGLEI::SYMMETRY)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt = face2node[nodepos + j];
+                //! From left.
+                cellNumberForNodeValue[pt] += 1;
+                //! From right.
+                cellNumberForNodeValue[pt] += 1;
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        bcType = bcr[iFace]->GetKey();
+        if (bcType == PHENGLEI::FARFIELD)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt = face2node[nodepos + j];
+
+                cellNumberForNodeValue[pt] = 0;
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        bcType = bcr[iFace]->GetKey();
+        if (bcType == PHENGLEI::FARFIELD)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt = face2node[nodepos + j];
+                //! From left.
+                cellNumberForNodeValue[pt] += 1;
+                //! From right.
+                cellNumberForNodeValue[pt] += 1;
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        bcType = bcr[iFace]->GetKey();
+        if (bcType == PHENGLEI::SOLID_SURFACE)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt = face2node[nodepos + j];
+
+                cellNumberForNodeValue[pt] = 0;
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        bcType = bcr[iFace]->GetKey();
+        if (bcType == PHENGLEI::SOLID_SURFACE)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                pt = face2node[nodepos + j];
+                //! From left.
+                cellNumberForNodeValue[pt] += 1;
+                //! From right.
+                cellNumberForNodeValue[pt] += 1;
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+}
+
+void Pre_UnstructGridPartition::SetNTotalCell(int iZone, UnstructGrid *gridpart)
+{
+    int i_nTotalCell = GetNTotalCell(iZone, part);
+    gridpart->SetNTotalCell(i_nTotalCell);
+}
+
+void Pre_UnstructGridPartition::CreateLocal2All(int iZone, UnstructGrid *gridpart)
+{
+    node2all = GetNode2All(gridpart);
+    face2all = GetFace2All(gridpart);
+    cell2all = GetCell2All(iZone, gridpart);
+}
+
+void Pre_UnstructGridPartition::ComputeGridForPartition(UnstructGrid *gridpart, int iZone)
+{
+    SetNTotalCell(iZone, gridpart);
+    ComputeFaceMark(iZone, gridpart);
+    ComputeNodeMark(gridpart);
+
+    CreateLocal2All(iZone, gridpart);
+
+    SetCoorPart(gridpart);
+    SetLinkPart(iZone, gridpart);
+    SetInterfaceInfoPart(iZone, gridpart);
+    SetInterpointInfoPart(iZone, gridpart);
+    SetVolumeCondition(gridpart);
+    SetWallDist(gridpart);
+    SetPartitionInfo(gridpart);
+
+    FreeLocal2All();
+}
+
+void Pre_UnstructGridPartition::SetVolumeCondition(UnstructGrid *gridpart)
+{
+    SimpleVC *volumeCondition = gridSource->GetVolumeConditionIn();
+    if (!volumeCondition)
+    {
+        return;
+    }
+
+    int hasVolumeCondition = 1;
+    GlobalDataBase::UpdateData("hasVolumeCondition", &hasVolumeCondition, PHINT, 1);
+
+    string vcName = volumeCondition->GetVCName();
+    int vcType = volumeCondition->GetVCType();
+
+    SimpleVC *volumeConditionPart = new SimpleVC();
+    volumeConditionPart->SetVCName(vcName);
+    volumeConditionPart->SetVCType(vcType);
+    gridpart->SetVolumeCondition(volumeConditionPart);
+}
+
+void Pre_UnstructGridPartition::SetWallDist(UnstructGrid *gridpart)
+{
+    if (!partitionWallDist) return;
+    
+    int nTotalCell = gridpart->GetNTotalCell();
+    gridpart->InitWallDist();
+    
+    RDouble *walldist = gridpart->GetWallDist();
+    RDouble *walldist_src = gridSource->GetWallDist();
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        int iCell2ALL = cell2all[iCell];
+        walldist[iCell] = walldist_src[iCell2ALL];
+    }
+}
+
+void Pre_UnstructGridPartition::SetPartitionInfo(UnstructGrid *gridpart)
+{
+    int nTotalNode = gridpart->GetNTotalNode();
+    int nTotalFace = gridpart->GetNTotalFace();
+    int nTotalCell = gridpart->GetNTotalCell();
+
+    int *ordinaryNodeIndex = new int[nTotalNode];
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        ordinaryNodeIndex[iNode] = node2all[iNode];
+    }
+
+    int *ordinaryFaceIndex = new int[nTotalFace];
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        ordinaryFaceIndex[iFace] = face2all[iFace];
+    }
+
+    int *ordinaryCellIndex = new int[nTotalCell];
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        ordinaryCellIndex[iCell] = cell2all[iCell];
+    }
+
+    gridpart->SetOrdinaryGridIndex(gridSource->GetZoneID());
+    gridpart->SetOrdinaryNodeIndex(ordinaryNodeIndex);
+    gridpart->SetOrdinaryFaceIndex(ordinaryFaceIndex);
+    gridpart->SetOrdinaryCellIndex(ordinaryCellIndex);
+}
+
+void Pre_UnstructGridPartition::WriteAdditionalData(const string &out_grid_file)
+{
+    WriteInterpointInfo(out_grid_file);
+
+    //! Write cell to node connection.
+    WriteCellToNode(out_grid_file);
+
+    //! Write face boundary condition information.
+    WriteFaceBC(out_grid_file);
+
+    //! Write walldist information.
+    WriteWalldist(out_grid_file);
+}
+
+void Pre_UnstructGridPartition::WriteWalldist(const string &out_grid_file)
+{
+    if (!partitionWallDist) return;
+    string walldistfile = ChangeExtensionOfFileName(out_grid_file, "wdt");
+
+    ActionKey *actkey = new ActionKey();
+    actkey->filename = (walldistfile);
+
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    string finalFileName = PHSPACE::AddSymbolToFileName(walldistfile, '_', currentProcessorIndex);
+    actkey->filepos = H5Fcreate(finalFileName.c_str(), H5F_ACC_TRUNC, H5P_DEFAULT, H5P_DEFAULT);
+
+    using namespace PHMPI;
+    for (int iZone = 0; iZone < maxProcessor; ++ iZone)
+    {
+        if (!grids[iZone]) continue;
+
+        UnstructGrid *grid = UnstructGridCast(grids[iZone]);
+        WriteWalldist(actkey, grid);
+    }
+    
+    H5Fclose(actkey->filepos);
+    delete actkey;    actkey = NULL;
+}
+
+void Pre_UnstructGridPartition::WriteWalldist(ActionKey *actkey, UnstructGrid *gridPart)
+{
+    ostringstream oss;
+    oss << "Grid-" << gridPart->GetZoneID();
+    string dataName = oss.str();
+
+    int nTotalCell = gridPart->GetNTotalCell();
+    RDouble *walldist = gridPart->GetWallDist();
+
+    CreateAndWriteData(actkey->filepos, dataName, 1, nTotalCell, PHDOUBLE, walldist);
+}
+
+void Pre_UnstructGridPartition::WriteCellToNode(const string &out_grid_file)
+{
+    if (!partitionCellToNode) return;
+    string partitionedCellToNodeFileName = ChangeExtensionOfFileName(out_grid_file, "c2n");
+    fstream file;
+    PHSPACE::OpenFile(file, partitionedCellToNodeFileName, ios_base::out|ios_base::binary);
+
+    PHWrite(file, maxProcessor);
+    for (int iproc = 0; iproc < maxProcessor; ++ iproc)
+    {
+        if (!grids[iproc]) continue;
+
+        UnstructGrid *gridPart = UnstructGridCast(grids[iproc]);
+        WriteCellToNode(file, gridPart);
+    }
+
+    PHSPACE::CloseFile(file);
+}
+
+void Pre_UnstructGridPartition::WriteCellToNode(fstream &file, UnstructGrid *gridPart)
+{
+    VirtualFile *virtualFile = new VirtualFile(&file);
+    virtualFile->BeginWriteWork();
+
+    int *cellNodeIndexContainer  = gridPart->GetCell2Node();
+    int *cellNodeNumberContainer = gridPart->GetNodeNumberOfEachCell();
+    int iZone = gridPart->GetGridID()->GetIndex();
+
+    int numberOfCells = gridPart->GetNTotalCell();
+
+    PHWrite(virtualFile, iZone);
+    PHWrite(virtualFile, numberOfCells);
+
+    int iPosition = 0;
+    for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+    {
+        int nodeNumber = cellNodeNumberContainer[iCell];
+
+        PHWrite(virtualFile, nodeNumber);
+
+        for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+        {
+            PHWrite(virtualFile, cellNodeIndexContainer[iPosition ++]);
+        }
+    }
+
+    virtualFile->EndWriteWork();
+
+    delete virtualFile;
+}
+
+void Pre_UnstructGridPartition::WriteInterpointInfo(const string &out_grid_file)
+{
+    if (IsParallelPartition() && (parallelPartitionMethod == PARMETIS_METHOD))
+    {
+        return;
+    }
+
+    string interpointInfoFileName = ChangeExtensionOfFileName(out_grid_file, "interpoint");
+    fstream file;
+    PHSPACE::OpenFile(file, interpointInfoFileName, ios_base::out|ios_base::binary);
+
+    PHWrite(file, maxProcessor);
+    for (int iproc = 0; iproc < maxProcessor; ++ iproc)
+    {
+        if (!grids[iproc])
+        {
+            continue;
+        }
+        UnstructGrid *gridPart = UnstructGridCast(grids[iproc]);
+        WriteInterpointInfo(file, gridPart);
+    }
+
+    PHSPACE::CloseFile(file);
+}
+
+void Pre_UnstructGridPartition::WriteInterpointInfo(fstream &file, UnstructGrid *gridPart)
+{
+    VirtualFile *virtualFile = new VirtualFile(&file);
+    virtualFile->BeginWriteWork();
+    
+    int iZone = gridPart->GetGridID()->GetIndex();
+    
+    InterpointInformation *interpointInformation = gridPart->GetInterpointInfo();
+    
+    int i_nIPoint = interpointInformation->GetNumberOfInterpoints();
+    int *interPoint2ZoneID = interpointInformation->GetInterPoint2ZoneID();
+    int *interPoint2InterPointID = interpointInformation->GetInterPoint2InterPointID();
+    int *interPoint2GlobalPoint = interpointInformation->GetInterPoint2GlobalPoint();
+    int *cellNumberOfInterPoint = interpointInformation->GetCellNumberOfInterPoint();
+    int *totalZonesOfInterPoint = interpointInformation->GetTotalZonesOfInterPoint();
+    int *labelOfInterPoint = interpointInformation->GetLabelOfInterPoint();
+
+    PHWrite(virtualFile, iZone);
+    PHWrite(virtualFile, i_nIPoint);
+    
+    for (int iPoint = 0; iPoint < i_nIPoint; iPoint ++)
+    {
+        PHWrite(virtualFile, interPoint2ZoneID[iPoint]);
+        PHWrite(virtualFile, interPoint2InterPointID[iPoint]);
+        PHWrite(virtualFile, interPoint2GlobalPoint[iPoint]);
+        PHWrite(virtualFile, cellNumberOfInterPoint[iPoint]);
+        PHWrite(virtualFile, totalZonesOfInterPoint[iPoint]);
+        PHWrite(virtualFile, labelOfInterPoint[iPoint]);
+    }
+
+    virtualFile->EndWriteWork();
+
+    delete virtualFile;
+}
+
+void Pre_UnstructGridPartition::WriteFaceBC(const string &out_grid_file)
+{
+    if (!partitionFaceBC) return;
+    string partitionedFaceBCFileName = ChangeExtensionOfFileName(out_grid_file, "bc");
+    fstream file;
+    PHSPACE::OpenFile(file, partitionedFaceBCFileName, ios_base::out|ios_base::binary);
+
+    PHWrite(file, maxProcessor);
+    for (int iproc = 0; iproc < maxProcessor; ++ iproc)
+    {
+        if (!grids[iproc]) continue;
+
+        UnstructGrid *gridPart = UnstructGridCast(grids[iproc]);
+        WriteFaceBC(file, gridPart);
+    }
+
+    PHSPACE::CloseFile(file);
+}
+
+void Pre_UnstructGridPartition::WriteFaceBC(fstream &file, UnstructGrid *gridPart)
+{
+    gridPart->WriteFaceBC(file);
+}
+
+void Pre_UnstructGridPartition::ComputeGlobalToLocalCellToNodeMapping(UnstructGrid *gridpart, int iZone)
+{
+    if (!partitionCellToNode) return;
+
+    int *cellToNodeGlobal       = gridSource->GetCell2Node();
+    int *nodeNumberOfCellGlobal = gridSource->GetNodeNumberOfEachCell();
+
+    int numberOfCells = gridpart->GetNTotalCell();
+    
+    int *nodeNumberOfCellLocal = new int [numberOfCells];
+    gridpart->SetNodeNumberOfEachCell(nodeNumberOfCellLocal);
+
+    int numberOfGlobalCells = gridSource->GetNTotalCell();
+    int *globalToLocalNodeIndexMapping = this->node_mark;
+    idx_t *globalCellIndexToLocalZoneIndexMapping = this->part;
+
+    int iCount = 0;
+    long long int count = 0;
+    for (int iCell = 0; iCell < numberOfGlobalCells; ++ iCell)
+    {
+        if (globalCellIndexToLocalZoneIndexMapping[iCell] == iZone)
+        {
+            int nodeNumber = nodeNumberOfCellGlobal[iCell];
+            nodeNumberOfCellLocal[iCount ++] = nodeNumber;
+            count += nodeNumber;
+        }
+    }
+
+    int *cellToNodeLocal = new int [count];
+    gridpart->SetCell2Node(cellToNodeLocal);
+
+    long long int iPositionGlobal = 0;
+    count = 0;
+    for (int iCell = 0; iCell < numberOfGlobalCells; ++ iCell)
+    {
+        int nodeNumber = nodeNumberOfCellGlobal[iCell];
+
+        if (globalCellIndexToLocalZoneIndexMapping[iCell] == iZone)
+        {
+            for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+            {
+                int globalNodeIndex = cellToNodeGlobal[iPositionGlobal + iNode];
+                int nodeIndex = globalToLocalNodeIndexMapping[globalNodeIndex];
+                cellToNodeLocal[count ++] = nodeIndex;
+            }
+        }
+        iPositionGlobal += nodeNumber;
+    }
+    gridpart->SetCell2Node(cellToNodeLocal);
+    gridpart->SetNodeNumberOfEachCell(nodeNumberOfCellLocal);
+}
+
+bool Pre_UnstructGridPartition::IsParallelPartition()
+{
+    //if(PHMPI::GetNumberofGlobalZones() > 1)
+    if (vtxdist)
+    {
+        return true;
+    }
+    else
+    {
+        return false;
+    }
+}
+
+void Pre_UnstructGridPartition::FillnTCellofEachZone(int *&nTCellOfZones)
+{
+    WriteLogFile("Start to Fill nTotalCell of Each Zone");
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    int myid   = PHMPI::GetCurrentProcessorID();
+
+    int nTProcessor = PHMPI::GetNumberOfProcessor();
+
+    if (nTProcessor == nZones)
+    {
+        //! Each processors has ONE zone.
+        int nTCellInThisZone = gridSource->GetNTotalCell();
+
+        int *localSizeTemp = new int [nTProcessor];
+        SetField(localSizeTemp, 1, nTProcessor);
+        int **nTCellListTemp = new int * [nTProcessor];
+
+        PHMPI::FillGobalDataCollectBcast(&nTCellInThisZone, localSizeTemp, nTCellListTemp);
+
+        for (int iProc = 0; iProc < nTProcessor; ++ iProc)
+        {
+            nTCellOfZones[iProc] = nTCellListTemp[iProc][0];
+        }
+
+        DelPointer2(nTCellListTemp);
+        DelPointer(localSizeTemp);
+    }
+    else
+    {
+        //! Each processors has multiple zone.
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            int procID = PHMPI::GetZoneProcessorID(iZone);
+            int nTCellInThisZone;
+
+            if (myid == procID)
+            {
+                nTCellInThisZone = GetGrid(iZone, 0)->GetNTotalCell();
+            }
+
+            PHMPI::PH_Bcast(&nTCellInThisZone, sizeof(int), procID);
+
+            nTCellOfZones[iZone] = nTCellInThisZone;
+        }
+    }
+
+    WriteLogFile("End to Fill nTCell of Each Zone");
+}
+
+LIB_EXPORT void Pre_UnstructGridPartition::DumpPartitionGrids(const string &out_grid_file)
+{
+    if (IsParallelPartition())
+    {
+        DumpParallelPartitionGrid(out_grid_file, grids, maxProcessor);
+    }
+    else
+    {
+        DumpSerialPartitionGrid(out_grid_file, grids);
+    }
+}
+
+void Pre_UnstructGridPartition::DumpSerialPartitionGrid(const string &gridFileName, Grid **grids)
+{
+    DumpGrid(gridFileName, grids, maxProcessor);
+
+    string partitionedGridFileName = AddSymbolToFileName(gridFileName, '_', PHMPI::GetCurrentProcessorID());
+
+    int dumpOldGrid = GlobalDataBase::GetIntParaFromDB("dumpOldGrid");
+    if (dumpOldGrid)
+    {
+        WriteAdditionalData(partitionedGridFileName);
+    }
+
+    WriteWalldist(gridFileName);
+}
+
+void Pre_UnstructGridPartition::DumpParallelPartitionGrid(const string &gridFileName, Grid **grids, int nBlocks)
+{
+    int dumpOldGrid = GlobalDataBase::GetIntParaFromDB("dumpOldGrid");
+    if (!dumpOldGrid)
+    {
+        DumpGrid(gridFileName, grids, nBlocks);
+
+        WriteWalldist(gridFileName);
+        return;
+    }
+
+    //! Compute the actual number of parts in this processor.
+    int nBlocksActual = 0;
+    for (int iBlock = 0; iBlock < nBlocks; ++ iBlock)
+    {
+        if (grids[iBlock])
+        {
+            ++ nBlocksActual;
+        }
+    }
+    
+    Grid **gridsActual = new Grid * [nBlocksActual];
+    nBlocksActual = 0;
+    for (int iBlock = 0; iBlock < nBlocks; ++ iBlock)
+    {
+        if (grids[iBlock])
+        {
+            gridsActual[nBlocksActual] = grids[iBlock];
+            ++ nBlocksActual;
+        }
+    }
+    
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    int nProc  = PHMPI::GetNumberOfProcessor();
+    ASSERT(nProc == nZones);
+    int myid = PHMPI::GetCurrentProcessorID();
+    int *nPartOfEachProcessor = new int[nZones];
+
+    if (nProc == nZones)
+    {
+        //! Each processors has ONE zone.
+        int *localSizeTemp = new int [nProc];
+        SetField(localSizeTemp, 1, nProc);
+        int **nPartListTemp = new int * [nProc];
+
+        PHMPI::FillGobalDataCollectBcast(&nBlocksActual, localSizeTemp, nPartListTemp);
+
+        for (int iProc = 0; iProc < nProc; ++ iProc)
+        {
+            nPartOfEachProcessor[iProc] = nPartListTemp[iProc][0];
+        }
+
+        DelPointer2(nPartListTemp);
+        DelPointer(localSizeTemp);
+    }
+    else
+    {
+        PHMPI::FillGobalData(nBlocksActual, nPartOfEachProcessor);
+    }
+
+    int *block_index = new int[nBlocksActual];
+    int count = 0;
+    for (int iProc = 0; iProc < myid; ++ iProc)
+    {
+        count += nPartOfEachProcessor[iProc];
+    }
+    for (int iBlock = 0; iBlock < nBlocksActual; ++ iBlock)
+    {
+        block_index[iBlock] = iBlock + count;
+    }
+
+    string partitionedGridFileName = AddSymbolToFileName(gridFileName, '_', PHMPI::GetCurrentProcessorID());
+    DumpParallelPartitionGrid(partitionedGridFileName, gridsActual, nBlocksActual, block_index);
+    WriteAdditionalData(partitionedGridFileName);
+
+    delete [] gridsActual;
+    delete [] nPartOfEachProcessor;
+    delete [] block_index;
+}
+
+void Pre_UnstructGridPartition::DumpParallelPartitionGrid(const string &gridFileName, Grid **grids, int nBlocks, int *block_index_in)
+{
+    if (gridFileName == "") return;
+    fstream file;
+    PHSPACE::OpenFile(file, gridFileName, ios_base::out|ios_base::binary|ios_base::trunc);
+
+    int *block_proc     = new int [nBlocks];
+    int *block_idx      = new int [nBlocks];
+    int *block_type     = new int [nBlocks];
+    int *block_proc_inp = new int [nBlocks];
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        block_proc[iZone] = grids[iZone]->GetGridID()->GetIndex();  // Processor ID actually.
+        block_idx [iZone] = block_index_in[iZone];
+        block_type[iZone] = grids[iZone]->Type();
+    }
+
+    if (parallelPartitionMethod == METIS_OPENMP_METHOD)
+    {
+        //! For OpenMP case, reset the processor ID of sub-zone to the source grid's.
+        int zoneID = gridSource->GetGridID()->GetIndex();
+        int processorID = PHMPI::GetZoneProcessorID(zoneID);
+        for (int iZone = 0; iZone < nBlocks; ++ iZone)
+        {
+            block_proc[iZone] = processorID;
+        }
+    }
+
+    file.write(reinterpret_cast<char*>(&nBlocks), sizeof(int));
+    file.write(reinterpret_cast<char*>(block_proc), nBlocks * sizeof(int));
+    file.write(reinterpret_cast<char*>(block_idx), nBlocks * sizeof(int));
+    file.write(reinterpret_cast<char*>(block_type), nBlocks * sizeof(int));
+    
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        grids[iZone]->WriteGrid(file);
+    }
+
+    file.close();
+    file.clear();
+
+    delete [] block_idx;
+    delete [] block_proc;
+    delete [] block_proc_inp;
+    delete [] block_type;
+}
+
+}
diff --git a/API/PreProcess/src/Pre_WalldistCompute.cpp b/API/PreProcess/src/Pre_WalldistCompute.cpp
new file mode 100644
index 0000000..e67e974
--- /dev/null
+++ b/API/PreProcess/src/Pre_WalldistCompute.cpp
@@ -0,0 +1,5784 @@
+#include "Pre_WalldistCompute.h"
+#include "Geo_StructBC.h"
+#include "Geo_UnstructBC.h"
+#include "Glb_Dimension.h"
+#include "Math_BasisFunction.h"
+#include "TK_Exit.h"
+#include "Geo_StructGrid.h"
+#include "Geo_Grid.h"
+#include "Geo_UnstructGrid.h"
+#include "Pre_HDF5File.h"
+#ifdef USE_TecplotLib
+#include "TECXXX.h"
+#endif
+#pragma warning(disable:6386)
+#pragma warning(disable:6385)
+#pragma warning(disable:26451)
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+RDouble DistSQ(RDouble *a1, RDouble *a2, int dim)
+{
+    RDouble distSQ = 0.0;
+    while (--dim >= 0)
+    {
+        RDouble diff = a1[dim] - a2[dim];
+        distSQ += diff * diff;
+    }
+    return distSQ;
+}
+
+LIB_EXPORT Pre_WalldistCompute::Pre_WalldistCompute(int walldistComputeMethod, int level)
+{
+    this->wallstructureList = new vector<WallStructure *>;
+    this->walldistComputeMethod = walldistComputeMethod;
+    this->level = level;
+    this->myid = PHMPI::GetCurrentProcessorID();
+    nTWFace = 0;
+    wallFaceTree = 0;
+    wallFaceKDTree = 0;
+    wallNodeKDTree = 0;
+    rotateDegree = 33.33 * PI / 180.0;
+    presentBlock = 0;
+    *wallMin = 0;
+    *wallMax = 0;
+    wallTolerance = 0.0;
+    nTWallFace = 0;
+    rotateAxis = 0;
+
+    cellMethodOrNodeMethod = GlobalDataBase::GetIntParaFromDB("cellMethodOrNodeMethod");
+}
+
+LIB_EXPORT Pre_WalldistCompute::~Pre_WalldistCompute()
+{
+    for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+    {
+        WallStructure *walldist = (*wallstructureList)[iWall];
+        delete walldist;
+    }
+    wallstructureList->clear();
+    delete wallstructureList; wallstructureList = NULL;
+
+    WriteLogFile("  Wall face structure deleting ...\n");
+    delete wallFaceTree;
+}
+
+LIB_EXPORT void Pre_WalldistCompute::Run()
+{
+    WriteLogFile("  Start Wall Distance Computing ...");
+
+    FillWallStructureNew();
+
+    InitWallDistance();
+
+    int systemGridType = GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    int dimension = PHSPACE::GetDim();
+    if (dimension == TWO_D)
+    {
+        walldistComputeMethod = ACCURATE_METHOD;
+    }
+
+    TimeSpan *timeSpan = new TimeSpan();
+
+    int parallelAxis = JudgeInitialRotateAxis();
+    this->rotateAxis = 1;
+    while (!IsWalldistComputOver())
+    {
+        WriteLogFile("Wall dist computing for axis: ", this->rotateAxis);
+        PrintToWindow("Wall dist computing for axis: ", this->rotateAxis, "\n");
+
+        if (this->rotateAxis == 5) break;
+
+        if (this->rotateAxis == parallelAxis)
+        {
+            ++ this->rotateAxis;
+            continue;
+        }
+
+        if (walldistComputeMethod == FAST_METHOD || walldistComputeMethod == SUPER_FAST_METHOD)
+        {
+            BuildWallStructTree();
+        }
+        else if (walldistComputeMethod == KDTREE_METHOD && systemGridType == STRUCTGRID)
+        {
+            BuildWallStructKDTree();
+        }
+
+        ComputeWallDistance();
+        
+        if (walldistComputeMethod != FAST_METHOD) break;
+
+        ++ this->rotateAxis;
+        delete wallFaceTree;    wallFaceTree = nullptr;
+
+        if (walldistComputeMethod == KDTREE_METHOD && systemGridType == STRUCTGRID)
+        {
+            delete wallFaceKDTree;    wallFaceKDTree = nullptr;
+        }
+
+        if (this->rotateAxis == 4)
+        {
+            //! The last search time.
+            walldistComputeMethod = ACCURATE_METHOD;
+        }
+
+        if (this->rotateAxis == 5) break;
+    }
+
+    PrintToWindow("    Wall distance computed over, waiting for other processors ...\n");
+
+    CheckWallDistance();
+
+    PostWallDistance();
+
+    timeSpan->ShowTimeSpanToLogFile("Wall distance computing");
+    WriteLogFile("  End Wall Distance Computing ...");
+    delete timeSpan;    timeSpan = nullptr;
+}
+
+LIB_EXPORT void Pre_WalldistCompute::ComputeNodeDistance()
+{
+    FillWallStructureNew();
+
+    ComputeNodeDistanceByKDTreeMethod();
+
+    PrintToWindow("    Node Wall distance computed over, waiting for other processors ...\n");
+
+    PH_Barrier();
+
+    WriteLogFile("  End Grid Node Distance To Wall Compute ...");
+}
+
+LIB_EXPORT void Pre_WalldistCompute::ComputeNodeDistanceInOtherBlock()
+{
+    FillWallStructureNew();
+
+    ComputeNodeDistanceByKDTreeMethodInOtherBlock();
+}
+
+void Pre_WalldistCompute::FillWallStructureNew()
+{
+    TimeSpan *timeSpan = new TimeSpan();
+
+    ServerCollection();
+    timeSpan->ShowTimeSpanToLogFile("Wall structure collection to server");
+
+    ServerBcast();
+    timeSpan->ShowTimeSpanToLogFile("Wall structure BCasting from server");
+
+    PrintToWindow("Barrier for wall structure filling ...\n");
+    PrintToWindow("End for wall structure filling ...\n");
+    delete timeSpan;    timeSpan = nullptr;
+}
+
+void Pre_WalldistCompute::FillWallStructure()
+{
+    WriteLogFile("  Start to fill wall structure ...");
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int tag  = GetSendRecvTag(GRID_BASED, 0, iZone);
+        int proc = GetZoneProcessorID(iZone);
+
+        DataContainer *cdata = new DataContainer();
+
+        if (myid == proc)
+        {
+            Grid *grid = GetGrid(iZone, this->level);
+            CompressWallStructure(cdata, grid);
+        }
+
+        PH_Bcast(cdata, proc, tag);
+
+        DeCompressWallStructure(cdata, true);
+
+        delete cdata;
+    }
+
+    WriteLogFile("  End filling wall structure ...");
+}
+
+void Pre_WalldistCompute::InitWallDistance()
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Grid *grid = GetGrid(zoneID, this->level);
+        InitWallDistance(grid);
+    }
+}
+
+void Pre_WalldistCompute::InitWallDistance(Grid *grid)
+{
+    if (grid->Type() == PHSPACE::STRUCTGRID)
+    {
+        StructGrid *structGrid = StructGridCast(grid);
+        InitWallDistance(structGrid);
+    }
+    else
+    {
+        UnstructGrid *unstructGrid = UnstructGridCast(grid);
+        InitWallDistance(unstructGrid);
+    }
+}
+
+void Pre_WalldistCompute::InitWallDistance(StructGrid *grid)
+{
+    RDouble3D &walldist = *grid->GetWallDist();
+    RDouble3D &nearestwallfacenormalx = *grid->GetNearestWallFaceNormalX();
+    RDouble3D &nearestwallfacenormaly = *grid->GetNearestWallFaceNormalY();
+    RDouble3D &nearestwallfacenormalz = *grid->GetNearestWallFaceNormalZ();
+
+    //! Initialization.
+    walldist = LARGE;
+    nearestwallfacenormalx = LARGE;
+    nearestwallfacenormaly = LARGE;
+    nearestwallfacenormalz = LARGE;
+}
+
+void Pre_WalldistCompute::InitWallDistance(UnstructGrid *grid)
+{
+    RDouble *walldist = grid->GetWallDist();
+    RDouble *wallDistNode = grid->GetWallDistNode();
+    RDouble *nearestwallfacenormalx = grid->GetNearestWallFaceNormalX();
+    RDouble *nearestwallfacenormaly = grid->GetNearestWallFaceNormalY();
+    RDouble *nearestwallfacenormalz = grid->GetNearestWallFaceNormalZ();
+
+    int nTotalNode = grid->GetNTotalNode();
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    //! Initialization.
+    PHSPACE::SetField(walldist, LARGE, nTotal);
+    PHSPACE::SetField(wallDistNode, LARGE, nTotalNode);
+    PHSPACE::SetField(nearestwallfacenormalx, LARGE, nTotal);
+    PHSPACE::SetField(nearestwallfacenormaly, LARGE, nTotal);
+    PHSPACE::SetField(nearestwallfacenormalz, LARGE, nTotal);
+
+    int **faceNodeIndex = grid->GetFace2NodeArray();
+    int *faceNodeNumber = grid->GetNodeNumberOfEachFace();
+
+    UnstructBCSet **bcr = grid->GetBCRecord();
+    
+    for (int iFace = 0; iFace < nBoundFace; ++iFace)
+    {
+        int bcType = bcr[iFace]->GetKey();
+        if (IsWall(bcType))
+        {
+            int nNode = faceNodeNumber[iFace];
+            for (int iNode = 0; iNode < nNode; ++iNode)
+            {
+                int nodeID = faceNodeIndex[iFace][iNode];
+                wallDistNode[nodeID] = 0.0;
+            }
+        }
+    }
+}
+
+void Pre_WalldistCompute::ComputeWallDistance()
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    PrintToWindow("  Number of wall structure:", wallstructureList->size(), "\n");
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Grid *grid = GetGrid(zoneID, this->level);
+
+        ComputeWallDistance(grid);
+    }
+}
+
+void Pre_WalldistCompute::ComputeWallDistance(Grid *grid)
+{
+    if (grid->Type() == PHSPACE::STRUCTGRID)
+    {
+        StructGrid *structGrid = StructGridCast(grid);
+        if (walldistComputeMethod == Pre_WalldistCompute::KDTREE_METHOD)
+        {
+            ComputeWallDistanceKDTree(structGrid);
+        }
+        else if (walldistComputeMethod == Pre_WalldistCompute::FAST_METHOD)
+        {
+            ComputeWallDist3DByProjectingFast(structGrid);
+        }
+        else
+        {
+            ComputeWallDistance(structGrid);
+        }
+    }
+    else
+    {
+        UnstructGrid *unstructGrid = UnstructGridCast(grid);
+        ComputeWallDistance(unstructGrid);
+    }
+}
+
+void Pre_WalldistCompute::ComputeWallDistance(UnstructGrid *grid)
+{
+    if (grid->GetDim() == PHSPACE::TWO_D)
+    {
+        ComputeWallDist2DByBinarySearching(grid);
+    }
+    else
+    {
+        if (walldistComputeMethod == Pre_WalldistCompute::ACCURATE_METHOD)
+        {
+            if (cellMethodOrNodeMethod == CELL_METHOD)
+            {
+                ComputeWallDist3DByProjectingAccurate(grid);
+            }
+            else
+            {
+                ComputeWallDist3DByProjectingAccurateAndNodeMethod(grid);
+            }
+        }
+        else
+        {
+            if (cellMethodOrNodeMethod == CELL_METHOD)
+            {
+                ComputeWallDist3DByProjectingFast(grid);
+            }
+            else
+            {
+                ComputeWallDist3DByProjectingFastAndNodeMethod(grid);
+            }
+        }
+    }
+}
+
+void Pre_WalldistCompute::ComputeWallDist2DByBinarySearching(UnstructGrid *grid)
+{
+    using namespace PHMPI;
+
+    RDouble *walldist = grid->GetWallDist();
+
+    RDouble *nearestwallfacenormalx = grid->GetNearestWallFaceNormalX();
+    RDouble *nearestwallfacenormaly = grid->GetNearestWallFaceNormalY();
+    RDouble *nearestwallfacenormalz = grid->GetNearestWallFaceNormalZ();
+
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+    int *wallCellLabel = grid->GetWallCellLabel();
+
+    cout.unsetf(ios::scientific);
+    cout.setf(ios::fixed);
+    cout.precision(0);
+
+    int interval = GetProgressInterval(nTotalCell, 10);
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        if (viscousType <= LAMINAR && wallCellLabel[iCell] != 1 && iLES == NOLES_SOLVER) continue;
+
+        if (myid == 0 && iCell > 0 && iCell % interval == 0)
+        {
+            ProgressMonitorToWindows(iCell, nTotalCell, "wall distance");
+        }
+
+        RDouble xcc0 = xcc[iCell];
+        RDouble ycc0 = ycc[iCell];
+        RDouble zcc0 = zcc[iCell];
+
+        for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+        {
+            WallStructure *cwalldist = (*wallstructureList)[iWall];
+
+            uint_t nWallFaces = cwalldist->GetNumberOfWallFaces();
+            WallStructure::value_type &xfc = cwalldist->GetXFaceCenter();
+            WallStructure::value_type &yfc = cwalldist->GetYFaceCenter();
+            WallStructure::value_type &zfc = cwalldist->GetZFaceCenter();
+            WallStructure::value_type &x = cwalldist->GetX();
+            WallStructure::value_type &y = cwalldist->GetY();
+            WallStructure::value_type &z = cwalldist->GetZ();
+           
+            int *nPointPerFace = cwalldist->GetnPointPerFace();
+            int *wallFace2Node = cwalldist->GetWallFace2Node();
+
+            vector<vector<int> > face2node;
+            ConstructFace2Node(nPointPerFace, wallFace2Node, nWallFaces, face2node);
+
+            int markFace = -1;
+            for (uint_t iFace = 0; iFace < nWallFaces; ++ iFace)
+            {
+                RDouble &xMid = xfc[iFace];
+                RDouble &yMid = yfc[iFace];
+                RDouble &zMid = zfc[iFace];
+
+                //! The following computing would be executed two times for 2d case,
+                //! but it's regardless, because the time consuming is little.
+                uint_t numberofPointsOfTheFace = face2node[iFace].size();
+                for (int index = 0; index < numberofPointsOfTheFace; ++ index)
+                {
+                    int iStart = index;
+                    int iEnd = (index + 1) % numberofPointsOfTheFace;
+
+                    int startPoint = face2node[iFace][iStart];
+                    int endPoint   = face2node[iFace][iEnd];
+
+                    const RDouble xStart = x[startPoint];
+                    const RDouble yStart = y[startPoint];
+                    const RDouble zStart = z[startPoint];
+
+                    const RDouble xEnd = x[endPoint];
+                    const RDouble yEnd = y[endPoint];
+                    const RDouble zEnd = z[endPoint];
+
+                    RDouble dx = xEnd - xStart;
+                    RDouble dy = yEnd - yStart;
+                    RDouble dz = zEnd - zStart;
+                    RDouble lengthOfTwoPoints = SQR(dx, dy, dz);
+                    if (lengthOfTwoPoints <= 1.0e-16)
+                    {
+                        //! Two points are overlapped.
+                        continue;
+                    }
+
+                    RDouble wdst = ComputeDistanceOfANodeToSegment(xcc0, ycc0, zcc0, xStart, yStart, zStart,
+                                                                   xMid, yMid, zMid, xEnd, yEnd, zEnd);
+
+                    if (walldist[iCell] > wdst)
+                    {
+                        walldist[iCell] = wdst;
+                        markFace = static_cast<int>(iFace);
+                    }
+                }
+            }
+
+            if (markFace <= -1)
+            {
+                continue;
+            }
+
+            WallStructure::value_type& xfn = cwalldist->GetXFaceNormal();
+            WallStructure::value_type& yfn = cwalldist->GetYFaceNormal();
+            WallStructure::value_type& zfn = cwalldist->GetZFaceNormal();
+
+            nearestwallfacenormalx[iCell] = xfn[markFace];
+            nearestwallfacenormaly[iCell] = yfn[markFace];
+            nearestwallfacenormalz[iCell] = zfn[markFace];
+        }
+    }
+}
+
+void Pre_WalldistCompute::ComputeWallDist3DByProjectingAccurateAndNodeMethod(UnstructGrid *grid)
+{
+    using namespace PHMPI;
+
+    RDouble *wallDistNode = grid->GetWallDistNode();
+
+    int nTotalNode = grid->GetNTotalNode();
+
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    RDouble *nearestwallfacenormalx = grid->GetNearestWallFaceNormalX();
+    RDouble *nearestwallfacenormaly = grid->GetNearestWallFaceNormalY();
+    RDouble *nearestwallfacenormalz = grid->GetNearestWallFaceNormalZ();
+
+    RDouble nodeCoord[3], faceCenter[3], faceNormal[3];
+
+    int interval = GetProgressInterval(nTotalNode, 10);
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        if (iNode > 0 && iNode % interval == 0)
+        {
+            ProgressMonitorToWindows(iNode, nTotalNode, "wall distance");
+            ProgressMonitorToLogFile(iNode, nTotalNode, "wall distance");
+
+            if (rotateAxis >= 3 || timeSpan.GetTimeSpan() > 3600.0)
+            {
+                ostringstream oss;
+                oss.unsetf(ios::scientific);
+                oss.setf(ios::fixed);
+                oss.precision(0);
+                oss << "     rotateAxis = " << this->rotateAxis << ", " << floor((iNode * 1.0) / nTotalNode * 100 + 0.5) << "% " << "wall distance" << " completed ...";
+                WriteLogFile(oss, false);
+            }
+        }
+
+        if (wallDistNode[iNode] < LARGE * 0.9)
+        {
+            continue;
+        }
+
+        nodeCoord[0] = x[iNode];
+        nodeCoord[1] = y[iNode];
+        nodeCoord[2] = z[iNode];
+
+        for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+        {
+            WallStructure *cwalldist = (*wallstructureList)[iWall];
+
+            uint_t nWallFaces              = cwalldist->GetNumberOfWallFaces();
+            WallStructure::value_type &xfc = cwalldist->GetXFaceCenter();
+            WallStructure::value_type &yfc = cwalldist->GetYFaceCenter();
+            WallStructure::value_type &zfc = cwalldist->GetZFaceCenter();
+            WallStructure::value_type &xW   = cwalldist->GetX();
+            WallStructure::value_type &yW   = cwalldist->GetY();
+            WallStructure::value_type &zW   = cwalldist->GetZ();
+            WallStructure::value_type &xfn = cwalldist->GetXFaceNormal();
+            WallStructure::value_type &yfn = cwalldist->GetYFaceNormal();
+            WallStructure::value_type &zfn = cwalldist->GetZFaceNormal();
+
+            int *nPointPerFace = cwalldist->GetnPointPerFace();
+            int *wallFace2Node = cwalldist->GetWallFace2Node();
+
+            int nodeCount = 0;
+            int markFace = -1;
+            for (int iFace = 0; iFace < nWallFaces; ++ iFace)
+            {
+                faceCenter[0] = xfc[iFace];
+                faceCenter[1] = yfc[iFace];
+                faceCenter[2] = zfc[iFace];
+
+                faceNormal[0] = xfn[iFace];
+                faceNormal[1] = yfn[iFace];
+                faceNormal[2] = zfn[iFace];
+
+                vector<int> face2node;
+                face2node.resize(nPointPerFace[iFace]);
+                for (int jNode = 0; jNode < nPointPerFace[iFace]; ++jNode)
+                {
+                    face2node[jNode] = wallFace2Node[nodeCount++];
+                }
+
+                RDouble wdst = ComputeDistanceOfANodeToAFace(nodeCoord, faceCenter, faceNormal, face2node, xW, yW, zW);
+                if (wallDistNode[iNode] > wdst)
+                {
+                    wallDistNode[iNode] = wdst;
+                    markFace = iFace;
+                }
+            }
+
+            if (markFace <= -1)
+            {
+                return;
+            }
+
+            nearestwallfacenormalx[iNode] = xfn[markFace];
+            nearestwallfacenormaly[iNode] = yfn[markFace];
+            nearestwallfacenormalz[iNode] = zfn[markFace];
+
+        }
+    }
+}
+
+void Pre_WalldistCompute::ComputeWallDist3DByProjectingAccurate(UnstructGrid *grid)
+{
+    using namespace PHMPI;
+
+    RDouble *walldist = grid->GetWallDist();
+
+    RDouble *nearestwallfacenormalx = grid->GetNearestWallFaceNormalX();
+    RDouble *nearestwallfacenormaly = grid->GetNearestWallFaceNormalY();
+    RDouble *nearestwallfacenormalz = grid->GetNearestWallFaceNormalZ();
+
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+    int *wallCellLabel = grid->GetWallCellLabel();
+
+    cout.unsetf(ios::scientific);
+    cout.setf(ios::fixed);
+    cout.precision(0);
+
+    RDouble cellCenter[3], faceCenter[3], faceNormal[3];
+
+    //int interval = GetProgressInterval(nTotal, 10);
+    int interval = GetProgressInterval(nTotalCell, 10);
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        if (viscousType <= LAMINAR && wallCellLabel[iCell] != 1 && iLES == NOLES_SOLVER) continue;
+
+        if (iCell > 0 && iCell % interval == 0)
+        {
+            //ProgressMonitorToWindows(iCell, nTotal, "wall distance");
+            //ProgressMonitorToLogFile(iCell, nTotal, "wall distance");
+            ProgressMonitorToWindows(iCell, nTotalCell, "wall distance");
+            ProgressMonitorToLogFile(iCell, nTotalCell, "wall distance");
+
+            if (rotateAxis >= 3 || timeSpan.GetTimeSpan() > 3600.0)
+            {
+                ostringstream oss;
+                oss.unsetf(ios::scientific);
+                oss.setf(ios::fixed);
+                oss.precision(0);
+                oss << "     rotateAxis = " << this->rotateAxis << ", " << floor((iCell * 1.0) / nTotalCell * 100 + 0.5) << "% " << "wall distance" << " completed ...";
+                WriteLogFile(oss, false);
+            }
+        }
+
+        if (walldist[iCell] < LARGE * 0.9)
+        {
+            continue;
+        }
+
+        cellCenter[0] = xcc[iCell];
+        cellCenter[1] = ycc[iCell];
+        cellCenter[2] = zcc[iCell];
+
+        for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+        {
+            WallStructure *cwalldist = (*wallstructureList)[iWall];
+
+            uint_t nWallFaces = cwalldist->GetNumberOfWallFaces();
+            WallStructure::value_type &xfc = cwalldist->GetXFaceCenter();
+            WallStructure::value_type &yfc = cwalldist->GetYFaceCenter();
+            WallStructure::value_type &zfc = cwalldist->GetZFaceCenter();
+            WallStructure::value_type &x = cwalldist->GetX();
+            WallStructure::value_type &y = cwalldist->GetY();
+            WallStructure::value_type &z = cwalldist->GetZ();
+            WallStructure::value_type &xfn = cwalldist->GetXFaceNormal();
+            WallStructure::value_type &yfn = cwalldist->GetYFaceNormal();
+            WallStructure::value_type &zfn = cwalldist->GetZFaceNormal();
+
+            int *nPointPerFace = cwalldist->GetnPointPerFace(); 
+            int *wallFace2Node = cwalldist->GetWallFace2Node();
+
+            int nodeCount = 0;
+            int markFace = -1;
+            for (int iFace = 0; iFace < nWallFaces; ++ iFace)
+            {
+                faceCenter[0] = xfc[iFace];
+                faceCenter[1] = yfc[iFace];
+                faceCenter[2] = zfc[iFace];
+
+                faceNormal[0] = xfn[iFace];
+                faceNormal[1] = yfn[iFace];
+                faceNormal[2] = zfn[iFace];
+
+                vector<int> face2node;
+                face2node.resize(nPointPerFace[iFace]);
+                for (int iNode = 0; iNode < nPointPerFace[iFace]; ++ iNode)
+                {
+                    face2node[iNode] = wallFace2Node[nodeCount ++];
+                }
+
+                RDouble wdst = ComputeDistanceOfANodeToAFace(cellCenter, faceCenter, faceNormal, face2node, x, y, z);
+                if (walldist[iCell] > wdst)
+                {
+                    walldist[iCell] = wdst;
+                    markFace = iFace;
+                }
+            }
+
+            if (markFace <= -1)
+            {
+                continue;
+            }
+
+            nearestwallfacenormalx[iCell] = xfn[markFace];
+            nearestwallfacenormaly[iCell] = yfn[markFace];
+            nearestwallfacenormalz[iCell] = zfn[markFace];
+
+        }
+    }
+}
+
+void Pre_WalldistCompute::ComputeWallDist3DByProjectingFastAndNodeMethod(UnstructGrid *grid)
+{
+    using namespace PHMPI;
+
+    RDouble *wallDistNode = grid->GetWallDistNode();
+    int nTotalNode = grid->GetNTotalNode();
+    RDouble *nearestwallfacenormalx = grid->GetNearestWallFaceNormalX();
+    RDouble *nearestwallfacenormaly = grid->GetNearestWallFaceNormalY();
+    RDouble *nearestwallfacenormalz = grid->GetNearestWallFaceNormalZ();
+
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    RDouble oldNodeCoord[3], oldFaceCenter[3], oldFaceNormal[3];
+    RDouble nodeCoord[3], faceCenter[3], faceNormal[3];
+
+    RDouble *rmin, *rmax;
+    rmin = wallFaceTree->GetMin();
+    rmax = wallFaceTree->GetMax();
+    RDouble pmin[6], pmax[6];
+    RDouble dis = 0.1 * wallTolerance;
+    RDouble globalGridSize = GetGlobalGridSize();
+
+    PrintToWindow("    Number of total wall faces: ", nTWallFace, "\n");
+
+    //! The maximum wanted wall faces that in the box,
+    //! it is set to be sqrt(nTWallFace), usually.
+    uint_t nBoxLimitedMax = MAX(1 * (int)sqrt(nTWallFace * 1.0), 1);
+    nBoxLimitedMax = MIN(nBoxLimitedMax, nTWallFace);
+    uint_t fixed_nBoxLimitedMax = 1000;
+    nBoxLimitedMax = MIN(nBoxLimitedMax, fixed_nBoxLimitedMax);
+    int nBoxLimitedMin = MAX((int)(nBoxLimitedMax * 0.1), 0);
+
+    PrintToWindow("    Min & Max wall faces in box: ", nBoxLimitedMin, nBoxLimitedMax, "\n");
+
+    TimeSpan partTime;
+    int interval = GetProgressInterval(nTotalNode, 10);
+    for (int iNode = 0; iNode < nTotalNode; ++iNode)
+    {
+        if (iNode > 0 && iNode % interval == 0)
+        {
+            ProgressMonitorToWindows(iNode, nTotalNode, "wall distance");
+            ProgressMonitorToLogFile(iNode, nTotalNode, "wall distance");
+
+            if (rotateAxis >= 1 || timeSpan.GetTimeSpan() > 600.0)
+            {
+                ostringstream oss;
+                oss.unsetf(ios::scientific);
+                oss.setf(ios::fixed);
+                oss.precision(0);
+                oss << "     rotateAxis = " << this->rotateAxis << ", " << floor((iNode * 1.0) / nTotalNode * 100 + 0.5) << "% " << "wall distance" << " completed ...";
+                WriteLogFile(oss, true);
+            }
+        }
+
+        if (wallDistNode[iNode] < LARGE * 0.9)
+        {
+            //! This cell wall distance has been computed.
+            continue;
+        }
+
+        bool finalFound = false;
+        int boxMin = nBoxLimitedMin;
+        uint_t boxMax = nBoxLimitedMax;
+
+        WallFaceTree::AdtNodeList nList;
+
+        //! Enlarge time, the number of probe time.
+        //! If lose once, enlarge the search scope then, by multiple 2 times.
+        int nEnlargeTime = 3;
+        int iEnlarge = 0;
+        while (iEnlarge < nEnlargeTime)
+        {
+            ++ iEnlarge;
+
+            oldNodeCoord[0] = x[iNode];
+            oldNodeCoord[1] = y[iNode];
+            oldNodeCoord[2] = z[iNode];
+            this->RotateAxis(oldNodeCoord, nodeCoord);
+
+            RDouble x0 = nodeCoord[0];
+            RDouble y0 = nodeCoord[1];
+            RDouble z0 = nodeCoord[2];
+
+            pmin[0] = rmin[0];
+            pmin[1] = rmin[1];
+            pmin[2] = rmin[2];
+            pmax[3] = rmax[3];
+            pmax[4] = rmax[4];
+            pmax[5] = rmax[5];
+
+            pmin[3] = x0 - dis;
+            pmin[4] = y0 - dis;
+            pmin[5] = z0 - dis;
+
+            pmax[0] = x0 + dis;
+            pmax[1] = y0 + dis;
+            pmax[2] = z0 + dis;
+
+            RDouble size_min = 0;
+            RDouble size_max = dis * 2.0;
+            RDouble ra;
+
+            int iSearch = 0;
+            bool isFoundNearestFace = false;
+            int nSearchTimes = 100;
+            while (iSearch < nSearchTimes)
+            {
+                ++ iSearch;
+
+                if (size_min >= globalGridSize) break;
+
+                ra = 0.5 * (size_min + size_max);
+                pmin[3] = x0 - ra;
+                pmin[4] = y0 - ra;
+                pmin[5] = z0 - ra;
+
+                pmax[0] = x0 + ra;
+                pmax[1] = y0 + ra;
+                pmax[2] = z0 + ra;
+
+                nList.clear();
+                nList.reserve(boxMax + 1);
+                wallFaceTree->FindNodesInRegion(pmin, pmax, nList, boxMax + 1);
+
+                uint_t nNearWallFace = nList.size();
+                if ((nNearWallFace > boxMin && nNearWallFace <= boxMax))
+                {
+                    int markFace = -1;
+                    for (int iWall = 0; iWall < nNearWallFace; ++iWall)
+                    {
+                        uint_t wallStructID = nList[iWall]->GetData().first;
+                        int faceID = nList[iWall]->GetData().second;
+                        WallStructure *cwalldist = (*wallstructureList)[wallStructID];
+
+                        vector<int> face2node;
+                        cwalldist->GetFace2NodeVector(face2node, faceID);
+                        WallStructure::value_type &xfc = cwalldist->GetXFaceCenter();
+                        WallStructure::value_type &yfc = cwalldist->GetYFaceCenter();
+                        WallStructure::value_type &zfc = cwalldist->GetZFaceCenter();
+                        WallStructure::value_type &xW   = cwalldist->GetX();
+                        WallStructure::value_type &yW   = cwalldist->GetY();
+                        WallStructure::value_type &zW   = cwalldist->GetZ();
+                        WallStructure::value_type &xfn = cwalldist->GetXFaceNormal();
+                        WallStructure::value_type &yfn = cwalldist->GetYFaceNormal();
+                        WallStructure::value_type &zfn = cwalldist->GetZFaceNormal();
+
+                        oldFaceCenter[0] = xfc[faceID];
+                        oldFaceCenter[1] = yfc[faceID];
+                        oldFaceCenter[2] = zfc[faceID];
+                        this->RotateAxis(oldFaceCenter, faceCenter);
+
+                        oldFaceNormal[0] = xfn[faceID];
+                        oldFaceNormal[1] = yfn[faceID];
+                        oldFaceNormal[2] = zfn[faceID];
+                        this->RotateAxis(oldFaceNormal, faceNormal);
+
+                        RDouble wdst;
+                        wdst = ComputeDistanceOfANodeToAFace(nodeCoord, faceCenter, faceNormal, face2node, xW, yW, zW);
+                        if (wallDistNode[iNode] > wdst && wdst < 1.0e30)
+                        {
+                            wallDistNode[iNode] = wdst;
+                            isFoundNearestFace = true;
+                            markFace = iWall;
+                        }
+                    }
+                    uint_t wallStructID = nList[markFace]->GetData().first;
+                    int faceID = nList[markFace]->GetData().second;
+                    WallStructure* cwalldist = (*wallstructureList)[wallStructID];
+
+                    WallStructure::value_type& xfn = cwalldist->GetXFaceNormal();
+                    WallStructure::value_type& yfn = cwalldist->GetYFaceNormal();
+                    WallStructure::value_type& zfn = cwalldist->GetZFaceNormal();
+
+                    nearestwallfacenormalx[iNode] = xfn[faceID];
+                    nearestwallfacenormaly[iNode] = yfn[faceID];
+                    nearestwallfacenormalz[iNode] = zfn[faceID];
+
+                    break;
+                }
+                else if (nNearWallFace > boxMax && (size_max - size_min) > 0.01 * dis)
+                {
+                    //! The box is too large and so lead to too large number of wall faces,
+                    //! in order to reduce the wall faces, decrease the search radius.
+                    size_max = ra;
+                    continue;
+                }
+                else
+                {
+                    //! The box is too small and so lead to nearly non wall faces,
+                    //! in order to get more the wall faces, increase the search radius.
+                    size_min = ra;
+                    size_max = size_max * 2.0;
+                    continue;
+                }
+            }
+
+            if (isFoundNearestFace)
+            {
+                finalFound = true;
+                break;
+            }
+            else
+            {
+                //! Enlarge the limitation.
+                boxMax *= 2;
+                boxMin = MAX(1 * (int)sqrt(boxMax * 1.0), 1);
+                continue;
+            }
+        }
+    }
+}
+
+void Pre_WalldistCompute::ComputeWallDist3DByProjectingFast(UnstructGrid *grid)
+{
+    using namespace PHMPI;
+
+    RDouble *walldist = grid->GetWallDist();
+    RDouble *nearestwallfacenormalx = grid->GetNearestWallFaceNormalX();
+    RDouble *nearestwallfacenormaly = grid->GetNearestWallFaceNormalY();
+    RDouble *nearestwallfacenormalz = grid->GetNearestWallFaceNormalZ();
+
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+    int *wallCellLabel = grid->GetWallCellLabel();
+
+    cout.unsetf(ios::scientific);
+    cout.setf(ios::fixed);
+    cout.precision(0);
+
+    RDouble oldCellCenter[3], oldFaceCenter[3], oldFaceNormal[3];
+    RDouble cellCenter[3], faceCenter[3], faceNormal[3];
+
+    RDouble *rmin, *rmax;
+    rmin = wallFaceTree->GetMin();
+    rmax = wallFaceTree->GetMax();
+    RDouble pmin[6], pmax[6];
+    RDouble dis = 0.1 * wallTolerance;
+    RDouble globalGridSize = GetGlobalGridSize();
+
+    PrintToWindow("    Number of total wall faces: ", nTWallFace, "\n");
+
+    //! The maximum wanted wall faces that in the box,
+    //! it is set to be sqrt(nTWallFace), usually.
+    uint_t nBoxLimitedMax = MAX(1 * (int)sqrt(nTWallFace * 1.0), 1);
+    nBoxLimitedMax = MIN(nBoxLimitedMax, nTWallFace);
+    uint_t fixed_nBoxLimitedMax = 1000;
+    nBoxLimitedMax = MIN(nBoxLimitedMax, fixed_nBoxLimitedMax);
+    int nBoxLimitedMin = MAX((int)(nBoxLimitedMax * 0.1), 0);
+
+    PrintToWindow("    Min & Max wall faces in box: ", nBoxLimitedMin, nBoxLimitedMax, "\n");
+
+    TimeSpan partTime;
+    int interval = GetProgressInterval(nTotalCell, 10);
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        if (viscousType <= LAMINAR && wallCellLabel[iCell] != 1 && iLES == NOLES_SOLVER) continue;
+
+        if (iCell > 0 && iCell % interval == 0)
+        {
+            ProgressMonitorToWindows(iCell, nTotalCell, "wall distance");
+            ProgressMonitorToLogFile(iCell, nTotalCell, "wall distance");
+
+            if (rotateAxis >= 1 || timeSpan.GetTimeSpan() > 600.0)
+            {
+                ostringstream oss;
+                oss.unsetf(ios::scientific);
+                oss.setf(ios::fixed);
+                oss.precision(0);
+                oss << "     rotateAxis = " << this->rotateAxis << ", " << floor((iCell * 1.0) / nTotalCell * 100 + 0.5) << "% " << "wall distance" << " completed ...";
+                WriteLogFile(oss, false);
+            }
+        }
+
+        if (walldist[iCell] < LARGE * 0.9)
+        {
+            //! This cell wall distance has been computed.
+            continue;
+        }
+
+        bool finalFound = false;
+        int boxMin = nBoxLimitedMin;
+        uint_t boxMax = nBoxLimitedMax;
+
+        WallFaceTree::AdtNodeList nList;
+
+        //! Enlarge time, the number of probe time.
+        //! If lose once, enlarge the search scope then, by multiple 2 times.
+        int nEnlargeTime = 3;
+        int iEnlarge = 0;
+        while (iEnlarge < nEnlargeTime)
+        {
+            ++ iEnlarge;
+
+            //! i-th test.
+            oldCellCenter[0] = xcc[iCell];
+            oldCellCenter[1] = ycc[iCell];
+            oldCellCenter[2] = zcc[iCell];
+            this->RotateAxis(oldCellCenter, cellCenter);
+
+            //! For method 0: loop over the nearest several box.
+            RDouble x0 = cellCenter[0];
+            RDouble y0 = cellCenter[1];
+            RDouble z0 = cellCenter[2];
+
+            pmin[0] = rmin[0];
+            pmin[1] = rmin[1];
+            pmin[2] = rmin[2];
+            pmax[3] = rmax[3];
+            pmax[4] = rmax[4];
+            pmax[5] = rmax[5];
+
+            pmin[3] = x0 - dis;
+            pmin[4] = y0 - dis;
+            pmin[5] = z0 - dis;
+
+            pmax[0] = x0 + dis;
+            pmax[1] = y0 + dis;
+            pmax[2] = z0 + dis;
+
+            RDouble size_min = 0;
+            RDouble size_max = dis * 2.0;
+            RDouble ra;
+
+            int iSearch = 0;
+            bool isFoundNearestFace = false;
+            int nSearchTimes = 100;
+            while (iSearch < nSearchTimes)
+            {
+                ++ iSearch;
+
+                if (size_min >= globalGridSize) break;
+
+                ra = 0.5 * (size_min + size_max);
+                pmin[3] = x0 - ra;
+                pmin[4] = y0 - ra;
+                pmin[5] = z0 - ra;
+
+                pmax[0] = x0 + ra;
+                pmax[1] = y0 + ra;
+                pmax[2] = z0 + ra;
+
+                nList.clear();
+                nList.reserve(boxMax + 1);
+                wallFaceTree->FindNodesInRegion(pmin, pmax, nList, boxMax + 1);
+                
+                uint_t nNearWallFace = nList.size();
+                if ((nNearWallFace > boxMin && nNearWallFace <= boxMax))
+                // || (iEnlarge == nEnlargeTime && nNearWallFace > 0 && nNearWallFace < boxMax * 5 && iSearch >= 0.8 * nSearchTimes))
+                {
+                    //! Case 1: the number of wall faces in the box is according with the anticipate.
+                    //! Case 2: the worst case, to ensure the success, accept this case, although 
+                    //!         the wall faces found are to much.
+                    int markFace = -1;
+                    for (int iWall = 0; iWall < nNearWallFace; ++ iWall)
+                    {
+                        uint_t wallStructID = nList[iWall]->GetData().first;
+                        int faceID = nList[iWall]->GetData().second;
+                        WallStructure *cwalldist = (*wallstructureList)[wallStructID];
+
+                        vector<int> face2node;
+                        cwalldist->GetFace2NodeVector(face2node, faceID);
+                        WallStructure::value_type &xfc = cwalldist->GetXFaceCenter();
+                        WallStructure::value_type &yfc = cwalldist->GetYFaceCenter();
+                        WallStructure::value_type &zfc = cwalldist->GetZFaceCenter();
+                        WallStructure::value_type &x = cwalldist->GetX();
+                        WallStructure::value_type &y = cwalldist->GetY();
+                        WallStructure::value_type &z = cwalldist->GetZ();
+                        WallStructure::value_type &xfn = cwalldist->GetXFaceNormal();
+                        WallStructure::value_type &yfn = cwalldist->GetYFaceNormal();
+                        WallStructure::value_type &zfn = cwalldist->GetZFaceNormal();
+
+                        oldFaceCenter[0] = xfc[faceID];
+                        oldFaceCenter[1] = yfc[faceID];
+                        oldFaceCenter[2] = zfc[faceID];
+                        this->RotateAxis(oldFaceCenter, faceCenter);
+
+                        oldFaceNormal[0] = xfn[faceID];
+                        oldFaceNormal[1] = yfn[faceID];
+                        oldFaceNormal[2] = zfn[faceID];
+                        this->RotateAxis(oldFaceNormal, faceNormal);
+
+                        RDouble wdst;
+                        wdst = ComputeDistanceOfANodeToAFace(cellCenter, faceCenter, faceNormal, face2node, x, y, z);
+
+                        //RDouble distTemp = sqrt(wdst);
+
+                        if (walldist[iCell] > wdst && wdst < 1.0e30)
+                        {
+                            walldist[iCell] = wdst;
+                            isFoundNearestFace = true;
+                            markFace = iWall;
+                        }
+                    }
+
+                    uint_t wallStructID = nList[markFace]->GetData().first;
+                    int faceID = nList[markFace]->GetData().second;
+                    WallStructure* cwalldist = (*wallstructureList)[wallStructID];
+
+                    WallStructure::value_type& xfn = cwalldist->GetXFaceNormal();
+                    WallStructure::value_type& yfn = cwalldist->GetYFaceNormal();
+                    WallStructure::value_type& zfn = cwalldist->GetZFaceNormal();
+
+                    nearestwallfacenormalx[iCell] = xfn[faceID];
+                    nearestwallfacenormaly[iCell] = yfn[faceID];
+                    nearestwallfacenormalz[iCell] = zfn[faceID];
+
+                    break;
+                } 
+                else if (nNearWallFace > boxMax && (size_max - size_min) > 0.01 * dis)
+                {
+                    //! The box is too large and so lead to too large number of wall faces,
+                    //! in order to reduce the wall faces, decrease the search radius.
+                    size_max = ra;
+                    continue;
+                }
+                else
+                {
+                    //! The box is too small and so lead to nearly non wall faces,
+                    //! in order to get more the wall faces, increase the search radius.
+                    size_min = ra;
+                    size_max = size_max * 2.0;
+                    continue;
+                }
+            }    //! iSearch while.
+
+            if (isFoundNearestFace)
+            {
+                finalFound = true;
+                break;
+            }
+            else
+            {
+                //! Enlarge the limitation.
+                //boxMin = floor((boxMin + boxMax) * 0.5 + 0.5);
+                boxMax *= 2;
+                boxMin = MAX(1 * (int)sqrt(boxMax * 1.0), 1);
+                continue;
+            }
+        }
+    }    //! iCell.
+}
+
+void Pre_WalldistCompute::ComputeWallDist3DByProjectingFast(StructGrid *grid)
+{
+    using namespace PHMPI;
+
+    RDouble3D &walldist = *grid->GetWallDist();
+    RDouble3D &nearestwallfacenormalx = *grid->GetNearestWallFaceNormalX();
+    RDouble3D &nearestwallfacenormaly = *grid->GetNearestWallFaceNormalY();
+    RDouble3D &nearestwallfacenormalz = *grid->GetNearestWallFaceNormalZ();
+
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble3D &xcc = *grid->GetCellCenterX();
+    RDouble3D &ycc = *grid->GetCellCenterY();
+    RDouble3D &zcc = *grid->GetCellCenterZ();
+
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+
+    cout.unsetf(ios::scientific);
+    cout.setf(ios::fixed);
+    cout.precision(0);
+
+    RDouble oldCellCenter[3], oldFaceCenter[3], oldFaceNormal[3];
+    RDouble cellCenter[3], faceCenter[3], faceNormal[3];
+
+    RDouble *rmin, *rmax;
+    rmin = wallFaceTree->GetMin();
+    rmax = wallFaceTree->GetMax();
+    RDouble pmin[6], pmax[6];
+    RDouble dis = 0.1 * wallTolerance;
+    RDouble globalGridSize = GetGlobalGridSize();
+
+    PrintToWindow("    Number of total wall faces: ", nTWallFace, "\n");
+
+    //! The maximum wanted wall faces that in the box,
+    //! it is set to be sqrt(nTWallFace), usually.
+    uint_t nBoxLimitedMax = MAX(1 * (int)sqrt(nTWallFace * 1.0), 1);
+    nBoxLimitedMax = MIN(nBoxLimitedMax, nTWallFace);
+    uint_t fixed_nBoxLimitedMax = 1000;
+    nBoxLimitedMax = MIN(nBoxLimitedMax, fixed_nBoxLimitedMax);
+    int nBoxLimitedMin = MAX((int)(nBoxLimitedMax * 0.1), 0);
+
+    PrintToWindow("    Min & Max wall faces in box: ", nBoxLimitedMin, nBoxLimitedMax, "\n");
+
+    TimeSpan partTime;
+    int interval = GetProgressInterval(nTotalCell, 10);
+    int count = 0;
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                ++count;
+                if (viscousType <= LAMINAR && iLES == NOLES_SOLVER)
+                {
+                    continue;
+                }
+
+                if (count > 1 && count % interval == 0)
+                {
+                    ProgressMonitorToWindows(count, nTotalCell, "wall distance");
+                    ProgressMonitorToLogFile(count, nTotalCell, "wall distance");
+                }
+
+                if (walldist(i, j, k) < LARGE * 0.9)
+                {
+                    //! This cell wall distance has been computed.
+                    continue;
+                }
+
+                bool finalFound = false;
+                int boxMin = nBoxLimitedMin;
+                uint_t boxMax = nBoxLimitedMax;
+
+                WallFaceTree::AdtNodeList nList;
+
+                //! Enlarge time, the number of probe time.
+                //! If lose once, enlarge the search scope then, by multiple 2 times.
+                int nEnlargeTime = 3;
+                int iEnlarge = 0;
+                while (iEnlarge < nEnlargeTime)
+                {
+                    ++ iEnlarge;
+
+                    //! i-th test.
+                    oldCellCenter[0] = xcc(i, j, k);
+                    oldCellCenter[1] = ycc(i, j, k);
+                    oldCellCenter[2] = zcc(i, j, k);
+                    this->RotateAxis(oldCellCenter, cellCenter);
+
+                    //! For method 0: loop over the nearest several box.
+                    RDouble x0 = cellCenter[0];
+                    RDouble y0 = cellCenter[1];
+                    RDouble z0 = cellCenter[2];
+
+                    pmin[0] = rmin[0];
+                    pmin[1] = rmin[1];
+                    pmin[2] = rmin[2];
+                    pmax[3] = rmax[3];
+                    pmax[4] = rmax[4];
+                    pmax[5] = rmax[5];
+
+                    pmin[3] = x0 - dis;
+                    pmin[4] = y0 - dis;
+                    pmin[5] = z0 - dis;
+
+                    pmax[0] = x0 + dis;
+                    pmax[1] = y0 + dis;
+                    pmax[2] = z0 + dis;
+
+                    RDouble size_min = 0;
+                    RDouble size_max = dis * 2.0;
+                    RDouble ra;
+
+                    int iSearch = 0;
+                    bool isFoundNearestFace = false;
+                    int nSearchTimes = 100;
+                    while (iSearch < nSearchTimes)
+                    {
+                        ++ iSearch;
+                        
+                        if (size_min >= globalGridSize) break;
+                        
+                        ra = 0.5 * (size_min + size_max);
+                        pmin[3] = x0 - ra;
+                        pmin[4] = y0 - ra;
+                        pmin[5] = z0 - ra;
+                        
+                        pmax[0] = x0 + ra;
+                        pmax[1] = y0 + ra;
+                        pmax[2] = z0 + ra;
+
+                        nList.clear();
+                        nList.reserve(boxMax + 1);
+                        wallFaceTree->FindNodesInRegion(pmin, pmax, nList, boxMax + 1);
+
+                        uint_t nNearWallFace = nList.size();
+                        if ((nNearWallFace > boxMin && nNearWallFace <= boxMax))
+                            // || (iEnlarge == nEnlargeTime && nNearWallFace > 0 && nNearWallFace < boxMax * 5 && iSearch >= 0.8 * nSearchTimes))
+                        {
+                            //! Case 1: the number of wall faces in the box is according with the anticipate.
+                            //! Case 2: the worst case, to ensure the success, accept this case, although 
+                            //!         the wall faces found are to much.
+                            int markFace = -1;
+                            for (int iWall = 0; iWall < nNearWallFace; ++ iWall)
+                            {
+                                uint_t wallStructID = nList[iWall]->GetData().first;
+                                int faceID = nList[iWall]->GetData().second;
+                                WallStructure *cwalldist = (*wallstructureList)[wallStructID];
+
+                                vector<int> face2node;
+                                cwalldist->GetFace2NodeVector(face2node, faceID);
+                                WallStructure::value_type &xfc = cwalldist->GetXFaceCenter();
+                                WallStructure::value_type &yfc = cwalldist->GetYFaceCenter();
+                                WallStructure::value_type &zfc = cwalldist->GetZFaceCenter();
+                                WallStructure::value_type &x = cwalldist->GetX();
+                                WallStructure::value_type &y = cwalldist->GetY();
+                                WallStructure::value_type &z = cwalldist->GetZ();
+                                WallStructure::value_type &xfn = cwalldist->GetXFaceNormal();
+                                WallStructure::value_type &yfn = cwalldist->GetYFaceNormal();
+                                WallStructure::value_type &zfn = cwalldist->GetZFaceNormal();
+
+                                oldFaceCenter[0] = xfc[faceID];
+                                oldFaceCenter[1] = yfc[faceID];
+                                oldFaceCenter[2] = zfc[faceID];
+                                this->RotateAxis(oldFaceCenter, faceCenter);
+
+                                oldFaceNormal[0] = -xfn[faceID];
+                                oldFaceNormal[1] = -yfn[faceID];
+                                oldFaceNormal[2] = -zfn[faceID];
+                                this->RotateAxis(oldFaceNormal, faceNormal);
+
+                                RDouble wdst;
+                                wdst = ComputeDistanceOfANodeToAFace(cellCenter, faceCenter, faceNormal, face2node, x, y, z);
+
+                                if (walldist(i, j, k) > wdst && wdst < 1.0e30)
+                                {
+                                    walldist(i, j, k) = wdst;
+                                    isFoundNearestFace = true;
+                                    markFace = iWall;
+                                }
+                            }
+
+                            uint_t wallStructID = nList[markFace]->GetData().first;
+                            int faceID = nList[markFace]->GetData().second;
+                            WallStructure* cwalldist = (*wallstructureList)[wallStructID];
+
+                            WallStructure::value_type& xfn = cwalldist->GetXFaceNormal();
+                            WallStructure::value_type& yfn = cwalldist->GetYFaceNormal();
+                            WallStructure::value_type& zfn = cwalldist->GetZFaceNormal();
+
+                            nearestwallfacenormalx(i, j, k) = xfn[faceID];
+                            nearestwallfacenormaly(i, j, k) = yfn[faceID];
+                            nearestwallfacenormalz(i, j, k) = zfn[faceID];
+
+                            break;
+                        }
+                        else if (nNearWallFace > boxMax && (size_max - size_min) > 0.01 * dis)
+                        {
+                            //! The box is too large and so lead to too large number of wall faces,
+                            //! in order to reduce the wall faces, decrease the search radius.
+                            size_max = ra;
+                            continue;
+                        }
+                        else
+                        {
+                            //! The box is too small and so lead to nearly non wall faces,
+                            //! in order to get more the wall faces, increase the search radius.
+                            size_min = ra;
+                            size_max = size_max * 2.0;
+                            continue;
+                        }
+                    }    //! iSearch while.
+
+                    if (isFoundNearestFace)
+                    {
+                        finalFound = true;
+                        break;
+                    }
+                    else
+                    {
+                        //! Enlarge the limitation.
+                        //boxMin = floor((boxMin + boxMax) * 0.5 + 0.5);
+                        boxMax *= 2;
+                        boxMin = MAX(1 * (int)sqrt(boxMax * 1.0), 1);
+                        continue;
+                    }
+                }
+            }
+        }
+    }    //! iCell.
+}
+
+void Pre_WalldistCompute::ComputeNodeWallDist3DByProjectingFast(int nTotalNode, RDouble *x, RDouble *y, RDouble *z, RDouble *nodeWalldist)
+{
+    using namespace PHMPI;
+
+    //RDouble3D &nearestwallfacenormalx = *grid->GetNearestWallFaceNormalX();
+    //RDouble3D &nearestwallfacenormaly = *grid->GetNearestWallFaceNormalY();
+    //RDouble3D &nearestwallfacenormalz = *grid->GetNearestWallFaceNormalZ();
+
+    cout.unsetf(ios::scientific);
+    cout.setf(ios::fixed);
+    cout.precision(0);
+
+    RDouble oldCellCenter[3], oldFaceCenter[3], oldFaceNormal[3];
+    RDouble cellCenter[3], faceCenter[3], faceNormal[3];
+
+    RDouble *rmin, *rmax;
+    rmin = wallFaceTree->GetMin();
+    rmax = wallFaceTree->GetMax();
+    RDouble pmin[6], pmax[6];
+    RDouble dis = 0.1 * wallTolerance;
+    RDouble globalGridSize = GetGlobalGridSize();
+
+    //! The maximum wanted wall faces that in the box,
+    //! it is set to be sqrt(nTWallFace), usually.
+    uint_t nBoxLimitedMax = MAX(1 * (int)sqrt(nTWallFace * 1.0), 1);
+    nBoxLimitedMax = MIN(nBoxLimitedMax, nTWallFace);
+    uint_t fixed_nBoxLimitedMax = 1000;
+    nBoxLimitedMax = MIN(nBoxLimitedMax, fixed_nBoxLimitedMax);
+    int nBoxLimitedMin = 0;
+
+    PrintToWindow("    Min & Max wall faces in box: ", nBoxLimitedMin, nBoxLimitedMax, "\n");
+
+    int interval = GetProgressInterval(nTotalNode, 10);
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        int nodeIndex = iNode + 1;
+        if (nodeIndex % interval == 0 || nodeIndex == nTotalNode)
+        {
+            ProgressMonitorToWindows(nodeIndex, nTotalNode, "wall distance");
+            ProgressMonitorToLogFile(nodeIndex, nTotalNode, "wall distance");
+        }
+
+        if (nodeWalldist[iNode] < LARGE * 0.9)
+        {
+            //! This cell wall distance has been computed.
+            continue;
+        }
+
+        bool finalFound = false;
+        int boxMin = nBoxLimitedMin;
+        uint_t boxMax = nBoxLimitedMax;
+
+        WallFaceTree::AdtNodeList nList;
+
+        //! Enlarge time, the number of probe time.
+        //! If lose once, enlarge the search scope then, by multiple 2 times.
+        int nEnlargeTime = 3;
+        int iEnlarge = 0;
+        while (iEnlarge < nEnlargeTime)
+        {
+            ++ iEnlarge;
+
+            //! i-th test.
+            oldCellCenter[0] = x[iNode];
+            oldCellCenter[1] = y[iNode];
+            oldCellCenter[2] = z[iNode];
+            this->RotateAxis(oldCellCenter, cellCenter);
+
+            //! For method 0: loop over the nearest several box.
+            RDouble x0 = cellCenter[0];
+            RDouble y0 = cellCenter[1];
+            RDouble z0 = cellCenter[2];
+
+            pmin[0] = rmin[0];
+            pmin[1] = rmin[1];
+            pmin[2] = rmin[2];
+            pmax[3] = rmax[3];
+            pmax[4] = rmax[4];
+            pmax[5] = rmax[5];
+
+            pmin[3] = x0 - dis;
+            pmin[4] = y0 - dis;
+            pmin[5] = z0 - dis;
+
+            pmax[0] = x0 + dis;
+            pmax[1] = y0 + dis;
+            pmax[2] = z0 + dis;
+
+            RDouble size_min = 0;
+            RDouble size_max = dis * 2.0;
+            RDouble ra;
+
+            int iSearch = 0;
+            bool isFoundNearestFace = false;
+            int nSearchTimes = 100;
+            while (iSearch < nSearchTimes)
+            {
+                ++ iSearch;
+
+                if (size_min >= globalGridSize) break;
+
+                ra = 0.5 * (size_min + size_max);
+                pmin[3] = x0 - ra;
+                pmin[4] = y0 - ra;
+                pmin[5] = z0 - ra;
+
+                pmax[0] = x0 + ra;
+                pmax[1] = y0 + ra;
+                pmax[2] = z0 + ra;
+
+                nList.clear();
+                nList.reserve(boxMax + 1);
+                wallFaceTree->FindNodesInRegion(pmin, pmax, nList, boxMax + 1);
+
+                uint_t nNearWallFace = nList.size();
+                if ((nNearWallFace > boxMin && nNearWallFace <= boxMax))
+                // || (iEnlarge == nEnlargeTime && nNearWallFace > 0 && nNearWallFace < boxMax * 5 && iSearch >= 0.8 * nSearchTimes))
+                {
+                    //! Case 1: the number of wall faces in the box is according with the anticipate.
+                    //! Case 2: the worst case, to ensure the success, accept this case, although 
+                    //!         the wall faces found are to much.
+                    //int markFace = -1;
+                    for (uint_t iWall = 0; iWall < nNearWallFace; ++ iWall)
+                    {
+                        uint_t wallStructID = nList[iWall]->GetData().first;
+                        int faceID = nList[iWall]->GetData().second;
+                        WallStructure *cwalldist = (*wallstructureList)[wallStructID];
+
+                        vector<int> face2node;
+                        cwalldist->GetFace2NodeVector(face2node, faceID);
+                        WallStructure::value_type &xfc = cwalldist->GetXFaceCenter();
+                        WallStructure::value_type &yfc = cwalldist->GetYFaceCenter();
+                        WallStructure::value_type &zfc = cwalldist->GetZFaceCenter();
+                        WallStructure::value_type &xWD = cwalldist->GetX();
+                        WallStructure::value_type &yWD = cwalldist->GetY();
+                        WallStructure::value_type &zWD = cwalldist->GetZ();
+                        WallStructure::value_type &xfn = cwalldist->GetXFaceNormal();
+                        WallStructure::value_type &yfn = cwalldist->GetYFaceNormal();
+                        WallStructure::value_type &zfn = cwalldist->GetZFaceNormal();
+
+                        oldFaceCenter[0] = xfc[faceID];
+                        oldFaceCenter[1] = yfc[faceID];
+                        oldFaceCenter[2] = zfc[faceID];
+                        this->RotateAxis(oldFaceCenter, faceCenter);
+
+                        oldFaceNormal[0] = xfn[faceID];
+                        oldFaceNormal[1] = yfn[faceID];
+                        oldFaceNormal[2] = zfn[faceID];
+                        this->RotateAxis(oldFaceNormal, faceNormal);
+
+                        RDouble wdst;
+                        wdst = ComputeDistanceOfANodeToAFace(cellCenter, faceCenter, faceNormal, face2node, xWD, yWD, zWD);
+
+                        wdst = sqrt(wdst);
+
+                        if (nodeWalldist[iNode] > wdst && wdst < 1.0e30)
+                        {
+                            nodeWalldist[iNode] = wdst;
+                            isFoundNearestFace = true;
+                            //markFace = iWall;
+                        }
+                    }
+                    //uint_t wallStructID = nList[markFace]->GetData().first;
+                    //int faceID = nList[markFace]->GetData().second;
+                    //WallStructure* cwalldist = (*wallstructureList)[wallStructID];
+
+                    //WallStructure::value_type& xfn = cwalldist->GetXFaceNormal();
+                    //WallStructure::value_type& yfn = cwalldist->GetYFaceNormal();
+                    //WallStructure::value_type& zfn = cwalldist->GetZFaceNormal();
+
+                    //nearestwallfacenormalx[iNode] = xfn[faceID];
+                    //nearestwallfacenormaly[iNode] = yfn[faceID];
+                    //nearestwallfacenormalz[iNode] = zfn[faceID];
+
+                    break;
+                } 
+                else if (nNearWallFace > boxMax && (size_max - size_min) > 0.01 * dis)
+                {
+                    //! The box is too large and so lead to too large number of wall faces,
+                    //! in order to reduce the wall faces, decrease the search radius.
+                    size_max = ra;
+                    continue;
+                }
+                else
+                {
+                    //! The box is too small and so lead to nearly non wall faces,
+                    //! in order to get more the wall faces, increase the search radius.
+                    size_min = ra;
+                    size_max = size_max * 2.0;
+                    continue;
+                }
+
+            }    //! iSearch while.
+
+            if (isFoundNearestFace)
+            {
+                finalFound = true;
+                break;
+            }
+            else
+            {
+                //! Enlarge the limitation.
+                boxMax *= 2;
+                boxMin = MAX(1 * (int)sqrt(boxMax * 1.0), 1);
+                continue;
+            }
+        }
+    }
+}
+
+void Pre_WalldistCompute::ComputeNodeWallDist3DByKDTreeMethod(int nTotalNode, RDouble *x, RDouble *y, RDouble *z, RDouble *nodeWalldist)
+{
+    using namespace PHMPI;
+    if (!wallNodeKDTree) return;
+    RDouble *xyz = new RDouble[3];
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        xyz[0] = x[iNode];
+        xyz[1] = y[iNode];
+        xyz[2] = z[iNode];
+        KDRes *minResults = KDNearest(wallNodeKDTree, xyz);
+        RDouble wdst = sqrt(DistSQ(minResults->Position(), xyz, 3));
+
+        if (nodeWalldist[iNode] > wdst && wdst < 1.0e30)
+        {
+            nodeWalldist[iNode] = wdst;
+        }
+     }
+    delete [] xyz;    xyz = NULL;
+}
+
+void Pre_WalldistCompute::ComputeWallDistance(StructGrid *grid)
+{
+    RDouble3D &walldist = *grid->GetWallDist();
+    RDouble3D &xcc = *grid->GetCellCenterX();
+    RDouble3D &ycc = *grid->GetCellCenterY();
+    RDouble3D &zcc = *grid->GetCellCenterZ();
+    RDouble3D &nearestwallfacenormalx = *grid->GetNearestWallFaceNormalX();
+    RDouble3D &nearestwallfacenormaly = *grid->GetNearestWallFaceNormalY();
+    RDouble3D &nearestwallfacenormalz = *grid->GetNearestWallFaceNormalZ();
+
+    RDouble cellCenter[3], faceCenter[3], faceNormal[3];
+
+    int count = 0;
+
+    int nTotalCell = grid->GetNTotalCell();
+
+    cout.unsetf(ios::scientific);
+    cout.setf(ios::fixed);
+    cout.precision(0);
+    if (myid == 0)
+    {
+        cout << "  Wall distance computing for zone " << grid->GetZoneID() << ": \n";
+    }
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int interval = GetProgressInterval(nTotalCell, 10);
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                ++ count;
+                if (count > 1 && count % interval == 0)
+                {
+                    ProgressMonitorToWindows(count, nTotalCell, "wall distance");
+                    ProgressMonitorToLogFile(count, nTotalCell, "wall distance");
+                }
+                if (walldist(i, j, k) < LARGE * 0.9)
+                {
+                    continue;
+                }
+
+                cellCenter[0] = xcc(i, j, k);
+                cellCenter[1] = ycc(i, j, k);
+                cellCenter[2] = zcc(i, j, k);
+                
+                for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+                {
+                    WallStructure *cwalldist = (*wallstructureList)[iWall];
+
+                    uint_t nWallFaces = cwalldist->GetNumberOfWallFaces();
+
+                    WallStructure::value_type &xfc = cwalldist->GetXFaceCenter();
+                    WallStructure::value_type &yfc = cwalldist->GetYFaceCenter();
+                    WallStructure::value_type &zfc = cwalldist->GetZFaceCenter();
+                    WallStructure::value_type &x = cwalldist->GetX();
+                    WallStructure::value_type &y = cwalldist->GetY();
+                    WallStructure::value_type &z = cwalldist->GetZ();
+                    WallStructure::value_type &xfn = cwalldist->GetXFaceNormal();
+                    WallStructure::value_type &yfn = cwalldist->GetYFaceNormal();
+                    WallStructure::value_type &zfn = cwalldist->GetZFaceNormal();
+
+                    int *nPointPerFace = cwalldist->GetnPointPerFace();
+                    int *wallFace2Node = cwalldist->GetWallFace2Node();
+                    int nodeCount = 0;
+                    vector <int> face2node;
+
+                    int markFace = -1;
+                    for (int iFace = 0; iFace < nWallFaces; ++ iFace)
+                    {
+                        faceCenter[0] = xfc[iFace];
+                        faceCenter[1] = yfc[iFace];
+                        faceCenter[2] = zfc[iFace];
+
+                        faceNormal[0] = -xfn[iFace];
+                        faceNormal[1] = -yfn[iFace];
+                        faceNormal[2] = -zfn[iFace];
+
+                        face2node.resize(nPointPerFace[iFace]);
+                        for (int iNode = 0; iNode < nPointPerFace[iFace]; ++ iNode)
+                        {
+                            face2node[iNode] = wallFace2Node[nodeCount ++];
+                        }
+
+                        RDouble wdst = ComputeDistanceOfANodeToAFace(cellCenter, faceCenter, faceNormal, face2node, x, y, z);
+
+                        if (walldist(i, j, k) > wdst)
+                        {
+                            walldist(i, j, k) = wdst;
+                            markFace = static_cast<int>(iWall);
+                        }
+                    }
+
+                    if (markFace <= -1)
+                    {
+                        continue;
+                    }
+
+                    nearestwallfacenormalx(i, j, k) = -xfn[markFace];
+                    nearestwallfacenormaly(i, j, k) = -yfn[markFace];
+                    nearestwallfacenormalz(i, j, k) = -zfn[markFace];
+
+                }
+            }
+        }
+    }
+}
+
+void Pre_WalldistCompute::BuildWallStructKDTree()
+{ 
+    int nDim = 3;
+
+    wallFaceKDTree = CreatKDTree(nDim);
+
+    if (wallFaceKDTree == NULL)
+    {
+        return;
+    }
+
+    for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+    {
+        WallStructure *cwalldist = (*wallstructureList)[iWall];
+        WallStructure::value_type &xfc = cwalldist->GetXFaceCenter();
+        WallStructure::value_type &yfc = cwalldist->GetYFaceCenter();
+        WallStructure::value_type &zfc = cwalldist->GetZFaceCenter();
+
+        for (std::size_t m = 0; m < cwalldist->GetNumberOfWallFaces(); ++ m)
+        {
+            RDouble *xyzWall = new RDouble [nDim];
+            xyzWall[0] = xfc[m];
+            xyzWall[1] = yfc[m];
+            xyzWall[2] = zfc[m];
+
+            KDInsert(wallFaceKDTree, xyzWall, NULL);
+            delete []xyzWall;
+        }
+    }
+}
+
+void Pre_WalldistCompute::BuildWallStructKDTreeNode()
+{ 
+    int nDim = 3;
+
+    nTWallFace = 0;
+    for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+    {
+        WallStructure *cwalldist = (*wallstructureList)[iWall];
+        if (cwalldist->GetIBlock() != presentBlock)
+        {
+            continue;
+        }
+
+        uint_t nWallFaces = cwalldist->GetNumberOfWallFaces();
+        uint_t nWallNodes = cwalldist->GetNumberOfWallPoints();
+        nTWallFace += nWallFaces;
+
+        WallStructure::value_type &x = cwalldist->GetX();
+        WallStructure::value_type &y = cwalldist->GetY();
+        WallStructure::value_type &z = cwalldist->GetZ();
+
+        for (std::size_t iNode = 0; iNode < nWallNodes; ++ iNode)
+        {
+            RDouble *xyzWall = new RDouble [nDim];
+            xyzWall[0] = x[iNode];
+            xyzWall[1] = y[iNode];
+            if(nDim == 3)xyzWall[2] = z[iNode];
+
+            KDInsert(wallNodeKDTree, xyzWall, NULL);
+            delete [] xyzWall;
+        }
+    }
+}
+
+void Pre_WalldistCompute::BuildWallStructKDTreeNodeInOtherBlock()
+{ 
+    int nDim = 3;
+    nTWallFace = 0;
+
+    for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+    {
+        WallStructure *cwalldist = (*wallstructureList)[iWall];
+        if (cwalldist->GetIBlock() == presentBlock)
+        {
+            continue;
+        }
+
+        WallStructure::value_type &x = cwalldist->GetX();
+        WallStructure::value_type &y = cwalldist->GetY();
+        WallStructure::value_type &z = cwalldist->GetZ();
+
+        uint_t nWallFaces = cwalldist->GetNumberOfWallFaces();
+        nTWallFace += nWallFaces;
+
+        uint_t nWallNodes = cwalldist->GetNumberOfWallPoints();
+
+        for (std::size_t iNode = 0; iNode < nWallNodes; ++ iNode)
+        {
+            RDouble *xyzWall = new RDouble [nDim];
+            xyzWall[0] = x[iNode];
+            xyzWall[1] = y[iNode];
+            if(nDim == 3)xyzWall[2] = z[iNode];
+
+            KDInsert(wallNodeKDTree, xyzWall, NULL);
+            delete [] xyzWall;
+        }
+    }
+}
+
+void Pre_WalldistCompute::ComputeWallDistanceKDTree(StructGrid *grid)
+{
+    RDouble3D &walldist = *grid->GetWallDist();
+    RDouble *xyzCellCenter = new RDouble[3];
+
+    int count = 0;
+
+    int nTotalCell = grid->GetNTotalCell();
+
+    cout.unsetf(ios::scientific);
+    cout.setf(ios::fixed);
+    cout.precision(0);
+    if (myid == 0)
+
+    {
+        cout << "  Wall distance computing for zone " << grid->GetZoneID() << ": \n";
+    }
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int interval = GetProgressInterval(nTotalCell, 10);
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                ++ count;
+                if (count > 1 && count % interval == 0)
+                {
+                    ProgressMonitorToWindows(count, nTotalCell, "wall distance");
+                    ProgressMonitorToLogFile(count, nTotalCell, "wall distance");
+                }
+                grid->CenterCoor(i, j, k, xyzCellCenter[0], xyzCellCenter[1], xyzCellCenter[2]);
+                KDRes *minResults = KDNearest(wallFaceKDTree, xyzCellCenter);
+                RDouble wdst = DistSQ(minResults->Position(), xyzCellCenter, 3);
+                walldist(i, j, k) = wdst;
+            }
+        }
+    }
+    delete[] xyzCellCenter;    xyzCellCenter = NULL;
+}
+
+//! New method: communicate with each processor, after compress all zones of each processor.
+void Pre_WalldistCompute::ServerCollection()
+{
+    //WriteLogFile("Wall structure server collecting ...");
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    int serverTmp = GetServerSepMode();
+    int numberOfOriginalprocessor = GetNumberOfProcessor();
+    int numberOfGridprocessor = GetNumberOfGridProcessor();
+
+    DataContainer *cdata = new DataContainer();
+    cdata->moveto_begin();
+
+    //! Write the number of zones in this processor.
+    int nZonesInThisProc = 0;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int proc = GetZoneProcessorIDSepMode(iZone);
+        if (myid == proc)
+        {
+            ++ nZonesInThisProc;
+        }
+    }
+    PHWrite(cdata, nZonesInThisProc);
+    
+    //! Compress all of the wall structure in this processor into data-container.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int proc = GetZoneProcessorIDSepMode(iZone);
+
+        if (myid == proc)
+        {
+            Grid *grid = GetGrid(iZone, this->level);
+            CompressWallStructure(cdata, grid);
+        }
+    }
+
+    WriteLogFile("  End compressing, start decompressing ...\n");
+
+    //! Send the data-container to server.
+    if (myid != serverTmp)
+    {
+        int tag = myid;
+        send(cdata, serverTmp, tag);
+        delete cdata;    cdata = nullptr;
+    }
+    else
+    {
+        int startProcessor = 0;
+        int endProcessor = numberOfOriginalprocessor;
+
+        if (CurrentProcessorIsGridProcessor())
+        {
+            startProcessor = numberOfOriginalprocessor;
+            endProcessor = numberOfOriginalprocessor + numberOfGridprocessor;
+        }
+
+        for (int iProc = startProcessor; iProc < endProcessor; ++ iProc)
+        {
+            int tag = iProc;
+
+            if (myid != iProc)
+            {
+                delete cdata;    cdata = nullptr;
+                cdata = new DataContainer();
+                receive(cdata, iProc, tag);
+            }
+
+            int nZonesInProc;
+            cdata->moveto_begin();
+            PHRead(cdata, &nZonesInProc, 1);
+            for (int iZone = 0; iZone < nZonesInProc; ++ iZone)
+            {
+                DeCompressWallStructure(cdata, false);
+            }
+
+            delete cdata;    cdata = nullptr;
+        }
+    }
+}
+
+void Pre_WalldistCompute::ServerBcast()
+{
+    //WriteLogFile("Wall structure server broad casting ...");
+    using namespace PHMPI;
+    int number_of_processor = GetNumberOfProcessor();
+    if (number_of_processor <= 1) return;
+
+    int tag = 0;
+    int serverTmp = GetServerSepMode();
+
+    DataContainer *cdata = new DataContainer();
+
+    if (myid == serverTmp)
+    {
+        cdata->moveto_begin();
+
+        uint_t nWall = wallstructureList->size();
+        PHWrite(cdata, &nWall, 1);
+        for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+        {
+            WallStructure *wallStruct = (*wallstructureList)[iWall];
+            wallStruct->Encode(cdata, false);
+        }
+    }
+
+    PH_BcastByServerSepMode(cdata, tag);
+
+    if (myid != serverTmp)
+    {
+        cdata->moveto_begin();
+
+        uint_t nWall;
+        PHRead(cdata, &nWall, 1);
+
+        wallstructureList->resize(nWall);
+        for (int iWall = 0; iWall < nWall; ++ iWall)
+        {
+            WallStructure *wallStruct = new WallStructure();
+
+            wallStruct->Decode(cdata, false);
+
+            (*wallstructureList)[iWall] = wallStruct;
+        }
+    }
+
+    delete cdata;
+}
+
+void Pre_WalldistCompute::CompressWallStructure(DataContainer *&cdata, Grid *grid)
+{
+    if (grid->Type() == PHSPACE::STRUCTGRID)
+    {
+        StructGrid *structGrid = StructGridCast(grid);
+        CompressWallStructure(cdata, structGrid);
+    }
+    else
+    {
+        UnstructGrid *unstructGrid = UnstructGridCast(grid);
+        CompressWallStructure(cdata, unstructGrid);
+    }
+}
+
+void Pre_WalldistCompute::CompressWallStructure(DataContainer *&cdata, StructGrid *grid)
+{
+    int nSolidFace = 0;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int bctype = bcregion->GetBCType();
+
+        if (IsWall(bctype))
+        {
+            int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+            bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+            nSolidFace += (ied - ist + 1) * (jed - jst + 1) * (ked - kst + 1);
+        }
+    }
+
+    cdata->write(&nSolidFace, sizeof(int));
+    if (!nSolidFace)
+    {
+        return;
+    }
+
+    int iBlock = grid->GetIBlock();
+    cdata->write(&iBlock, sizeof(int));
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int bctype = bcregion->GetBCType();
+
+        if (IsWall(bctype))
+        {
+            int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+            bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+            int nsurf = bcregion->GetFaceDirection() + 1;
+
+            int in = 0, jn = 0, kn = 0;
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        bcregion->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                        RDouble xc, yc, zc;
+                        grid->FaceCoor(in, jn, kn, nsurf, xc, yc, zc);
+                        cdata->write(&xc, sizeof(RDouble));
+                        cdata->write(&yc, sizeof(RDouble));
+                        cdata->write(&zc, sizeof(RDouble));
+                    }
+                }
+            }
+        }
+    }
+
+    //! Compute nWallPoints.
+    int nWallPoints = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int bctype = bcregion->GetBCType();
+
+        if (IsWall(bctype))
+        {
+            int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+            bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+            //! Get the node scope.
+            int s_st[3] = {ist, jst, kst};
+            int s_ed[3] = {ied, jed, ked};
+
+            for (int m = 0; m < GetDim(); ++ m)
+            {
+                if (bcregion->GetFaceDirection() == m)
+                {
+                    if (s_st[m] != 1)
+                    {
+                        s_st[m] += 1;
+                        s_ed[m] += 1;
+                    }
+                }
+                else
+                {
+                    s_ed[m] += 1;
+                }
+            }
+
+            int ni = s_ed[0] - s_st[0] + 1;
+            int nj = s_ed[1] - s_st[1] + 1;
+            int nk = s_ed[2] - s_st[2] + 1;
+
+            nWallPoints += ni * nj * nk;
+        }
+    }
+    cdata->write(&nWallPoints, sizeof(int));
+
+    vector<Int3D *> structNode2UnstrNodeID;
+    structNode2UnstrNodeID.resize(nBCRegion);
+    for (int iBC = 0; iBC < nBCRegion; ++ iBC)
+    {
+        structNode2UnstrNodeID[iBC] = 0;
+    }
+
+    RDouble3D &xx = *grid->GetStructX();
+    RDouble3D &yy = *grid->GetStructY();
+    RDouble3D &zz = *grid->GetStructZ();
+
+    nWallPoints = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int bctype = bcregion->GetBCType();
+
+        if (IsWall(bctype))
+        {
+            int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+            bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+            //! Get the node scope.
+            int s_st[3] = {ist, jst, kst};
+            int s_ed[3] = {ied, jed, ked};
+
+            for (int m = 0; m < GetDim(); ++ m)
+            {
+                if (bcregion->GetFaceDirection() == m)
+                {
+                    if (s_st[m] != 1)
+                    {
+                        s_st[m] += 1;
+                        s_ed[m] += 1;
+                    }
+                }
+                else
+                {
+                    s_ed[m] += 1;
+                }
+            }
+
+            int ni = s_ed[0] - s_st[0] + 1;
+            int nj = s_ed[1] - s_st[1] + 1;
+            int nk = s_ed[2] - s_st[2] + 1;
+            Range I(1, ni);
+            Range J(1, nj);
+            Range K(1, nk);
+
+            structNode2UnstrNodeID[iBCRegion] = new Int3D(I, J, K, fortranArray);
+            Int3D &nodeMap = *(structNode2UnstrNodeID[iBCRegion]);
+
+            for (int k = s_st[2]; k <= s_ed[2]; ++ k)
+            {
+                for (int j = s_st[1]; j <= s_ed[1]; ++ j)
+                {
+                    for (int i = s_st[0]; i <= s_ed[0]; ++ i)
+                    {
+                        RDouble x0 = xx(i, j, k);
+                        RDouble y0 = yy(i, j, k);
+                        RDouble z0 = zz(i, j, k);
+                        cdata->write(&x0, sizeof(RDouble));
+                        cdata->write(&y0, sizeof(RDouble));
+                        cdata->write(&z0, sizeof(RDouble));
+
+                        int iLocal = i - s_st[0] + 1;
+                        int jLocal = j - s_st[1] + 1;
+                        int kLocal = k - s_st[2] + 1;
+                        nodeMap(iLocal, jLocal, kLocal) = nWallPoints;
+                        ++ nWallPoints;
+                    }
+                }
+            }
+        }
+    }
+
+    //! Third: face to node connection.
+    int count = 0;
+    int *nPointsPerWallFace = new int [nSolidFace]();
+    if (GetDim() == TWO_D)
+    {
+        for (int iFace = 0; iFace < nSolidFace; ++ iFace)
+        {
+            nPointsPerWallFace[iFace] = 2;
+            count += 2;
+        }
+    }
+    else
+    {
+        //! pole?
+        for (int iFace = 0; iFace < nSolidFace; ++ iFace)
+        {
+            nPointsPerWallFace[iFace] = 4;
+            count += 4;
+        }
+    }
+
+    for (int iFace = 0; iFace < nSolidFace; ++ iFace)
+    {
+        int nNPF = nPointsPerWallFace[iFace];
+        cdata->write(&nNPF, sizeof(int));
+    }
+
+    //! Wall face to node.
+    int *wallface2node = new int [count]();
+
+    int nk = grid->GetNK();
+    count = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int bctype = bcregion->GetBCType();
+
+        if (IsWall(bctype))
+        {
+            int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+            bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+            //! Get the node scope.
+            int s_st[3] = {ist, jst, kst};
+            int s_ed[3] = {ied, jed, ked};
+
+            for (int m = 0; m < GetDim(); ++ m)
+            {
+                if (bcregion->GetFaceDirection() == m)
+                {
+                    if (s_st[m] != 1)
+                    {
+                        s_st[m] += 1;
+                        s_ed[m] += 1;
+                    }
+                }
+                else
+                {
+                    s_ed[m] += 1;
+                }
+            }
+
+            int nsurf = bcregion->GetFaceDirection() + 1;
+            Int3D &nodeMap = *(structNode2UnstrNodeID[iBCRegion]);
+            int in, jn, kn;
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        bcregion->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                        int il1 = 1;
+                        int jl1 = 1;
+                        int kl1 = 1;
+                        if (nk == 1) kl1 = 0;
+
+                        int il, jl, kl;
+
+                        il = in + il1;
+                        jl = jn + jl1;
+                        kl = kn + kl1;
+
+                        //! Map the global node to local node ID.
+
+                        int iLocal = in - s_st[0] + 1;
+                        int jLocal = jn - s_st[1] + 1;
+                        int kLocal = kn - s_st[2] + 1;
+
+                        int ilLocal = il - s_st[0] + 1;
+                        int jlLocal = jl - s_st[1] + 1;
+                        int klLocal = kl - s_st[2] + 1;
+
+                        if (GetDim() == THREE_D)
+                        {
+                            //! 3D.
+                            if (nsurf == 1)
+                            {
+                                wallface2node[count ++] = nodeMap(iLocal, jLocal, kLocal);
+                                wallface2node[count ++] = nodeMap(iLocal, jlLocal, kLocal);
+                                wallface2node[count ++] = nodeMap(iLocal, jlLocal, klLocal);
+                                wallface2node[count ++] = nodeMap(iLocal, jLocal, klLocal);
+                            }
+                            else if (nsurf == 2)
+                            {
+                                wallface2node[count ++] = nodeMap(iLocal, jLocal, kLocal);
+                                wallface2node[count ++] = nodeMap(ilLocal, jLocal, kLocal);
+                                wallface2node[count ++] = nodeMap(ilLocal, jLocal, klLocal);
+                                wallface2node[count ++] = nodeMap(iLocal, jLocal, klLocal);
+                            }
+                            else if (nsurf == 3)
+                            {
+                                wallface2node[count ++] = nodeMap(iLocal, jLocal, kLocal);
+                                wallface2node[count ++] = nodeMap(ilLocal, jLocal, kLocal);
+                                wallface2node[count ++] = nodeMap(ilLocal, jlLocal, kLocal);
+                                wallface2node[count ++] = nodeMap(iLocal, jlLocal, kLocal);
+                            }
+                        }
+                        else
+                        {
+                            //! 2D.
+                            if (nsurf == 1)
+                            {
+                                wallface2node[count ++] = nodeMap(iLocal, jLocal, kLocal);
+                                wallface2node[count ++] = nodeMap(iLocal, jlLocal, kLocal);
+                            }
+                            else if (nsurf == 2)
+                            {
+                                wallface2node[count ++] = nodeMap(iLocal, jLocal, kLocal);
+                                wallface2node[count ++] = nodeMap(ilLocal, jLocal, kLocal);
+                            }
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    count = 0;
+    for (int iFace = 0; iFace < nSolidFace; ++ iFace)
+    {
+        int nNPF = nPointsPerWallFace[iFace];
+        for (int j = 0; j < nNPF; ++ j)
+        {
+            int nodeIndex = wallface2node[count ++];
+            cdata->write(&nodeIndex, sizeof(int));
+        }
+    }
+
+    //! Face normal.
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+    
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int bctype = bcregion->GetBCType();
+
+        if (IsWall(bctype))
+        {
+            int nsurf = bcregion->GetFaceDirection() + 1;
+
+            int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+            bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int iFace, jFace, kFace;
+                        bcregion->GetBoundaryFaceIndex(i, j, k, iFace, jFace, kFace);
+
+                        RDouble nxs = xfn(iFace, jFace, kFace, nsurf);
+                        RDouble nys = yfn(iFace, jFace, kFace, nsurf);
+                        RDouble nzs = zfn(iFace, jFace, kFace, nsurf);
+
+                        cdata->write(&nxs, sizeof(RDouble));
+                        cdata->write(&nys, sizeof(RDouble));
+                        cdata->write(&nzs, sizeof(RDouble));
+                    }
+                }
+            }
+        }
+    }
+
+    delete [] nPointsPerWallFace;    nPointsPerWallFace = NULL;
+    delete [] wallface2node;    wallface2node = NULL;
+
+    for (int iBC = 0; iBC < nBCRegion; ++ iBC)
+    {
+        delete structNode2UnstrNodeID[iBC];
+    }
+}
+
+void Pre_WalldistCompute::CompressWallStructure(DataContainer *&cdata, UnstructGrid *grid)
+{
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalNode = grid->GetNTotalNode();
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+    int count = 0;
+
+    int *face2node = grid->GetFace2Node();
+    int *node_number_of_each_face = grid->GetNodeNumberOfEachFace();
+
+    int nSolidFace = 0;
+
+    //! Compute the number of the wall faces.
+    bool *isWallFace = new bool [nBoundFace]();
+    SetField(isWallFace, false, nBoundFace);
+
+    grid->FindOutWallFaces(isWallFace, nSolidFace);
+
+    cdata->write(&nSolidFace, sizeof(int));
+
+    if (!nSolidFace)
+    {
+        //! If there are not solid cell, do nothing and return.
+        delete [] isWallFace;    isWallFace = nullptr;
+        return;
+    }
+
+    //! Write the block information into wallstruc.
+    int iBlock = grid->GetIBlock();
+    cdata->write(&iBlock, sizeof(int));
+
+    int *localWallFace2Global = new int [nSolidFace]();
+    SetField(localWallFace2Global, -1, nSolidFace);
+    count = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        if (isWallFace[iFace])
+        {
+            localWallFace2Global[count] = iFace;
+            ++ count;
+        }
+    }
+
+    //! Construct the wall faces structure.
+    bool *isWallPoint = new bool [nTotalNode]();
+    int nWallPoints = 0;
+    grid->FindOutWallPoints(isWallPoint, nWallPoints);
+
+    int *globalPoint2Wall = new int [nTotalNode]();
+    PHSPACE::SetField(globalPoint2Wall, -1, nTotalNode);
+
+    RDouble *xWall = new RDouble [nWallPoints]();
+    RDouble *yWall = new RDouble [nWallPoints]();
+    RDouble *zWall = new RDouble [nWallPoints]();
+    count = 0;
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        if (isWallPoint[iNode])
+        {
+            xWall[count] = x[iNode];
+            yWall[count] = y[iNode];
+            zWall[count] = z[iNode];
+
+            globalPoint2Wall[iNode] = count;
+            ++ count;
+        }
+    }
+
+    //! Number of nodes per wall face.
+    count = 0;
+    int *nPointsPerWallFace = new int [nSolidFace]();
+    for (int iFace = 0; iFace < nSolidFace; ++ iFace)
+    {
+        int globalFaceIndex = localWallFace2Global[iFace];
+        nPointsPerWallFace[iFace] = node_number_of_each_face[globalFaceIndex];
+        count += nPointsPerWallFace[iFace];
+    }
+
+    //! Wall face to node.
+    int *wallface2node = new int [count]();
+    count = 0;
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        if (isWallFace[iFace])
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++ j)
+            {
+                int index = face2node[nodepos + j];
+                wallface2node[count ++] = globalPoint2Wall[index];
+            }
+        }
+
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    //! Write the wall face data structure into the data-container.
+    //! First: wall face center.
+    for (int iFace = 0; iFace < nSolidFace; ++ iFace)
+    {
+        int faceIndex = localWallFace2Global[iFace];
+
+        RDouble xc = 0, yc = 0, zc = 0;
+        xc = xfc[faceIndex];
+        yc = yfc[faceIndex];
+        zc = zfc[faceIndex];
+
+        cdata->write(&xc, sizeof(RDouble));
+        cdata->write(&yc, sizeof(RDouble));
+        cdata->write(&zc, sizeof(RDouble));
+    }
+
+    //! Second: points coordinates.
+    cdata->write(&nWallPoints, sizeof(int));
+
+    for (int iNode = 0; iNode < nWallPoints; ++ iNode)
+    {
+        RDouble x0 = xWall[iNode];
+        RDouble y0 = yWall[iNode];
+        RDouble z0 = zWall[iNode];
+        cdata->write(&x0, sizeof(RDouble));
+        cdata->write(&y0, sizeof(RDouble));
+        cdata->write(&z0, sizeof(RDouble));
+    }
+
+    //! Third: face to node connection.
+    for (int iFace = 0; iFace < nSolidFace; ++ iFace)
+    {
+        int nNPF = nPointsPerWallFace[iFace];
+        cdata->write(&nNPF, sizeof(int));
+    }
+
+    count = 0;
+    for (int iFace = 0; iFace < nSolidFace; ++ iFace)
+    {
+        int nNPF = nPointsPerWallFace[iFace];
+        for (int j = 0; j < nNPF; ++ j)
+        {
+            int nodeIndex = wallface2node[count ++];
+            cdata->write(&nodeIndex, sizeof(int));
+        }
+    }
+
+    //! Forth: wall face normal.
+    for (int iFace = 0; iFace < nSolidFace; ++ iFace)
+    {
+        int faceIndex = localWallFace2Global[iFace];
+
+        RDouble xfn0 = xfn[faceIndex];
+        RDouble yfn0 = yfn[faceIndex];
+        RDouble zfn0 = zfn[faceIndex];
+
+        cdata->write(&xfn0, sizeof(RDouble));
+        cdata->write(&yfn0, sizeof(RDouble));
+        cdata->write(&zfn0, sizeof(RDouble));
+    }
+
+    delete [] isWallPoint;    isWallPoint = nullptr;
+    delete [] globalPoint2Wall;    globalPoint2Wall = nullptr;
+    delete [] xWall;    xWall = nullptr;
+    delete [] yWall;    yWall = nullptr;
+    delete [] zWall;    zWall = nullptr;
+    delete [] nPointsPerWallFace;    nPointsPerWallFace = nullptr;
+    delete [] isWallFace;    isWallFace = nullptr;
+    delete [] localWallFace2Global;    localWallFace2Global = nullptr;
+    delete [] wallface2node;    wallface2node = nullptr;
+}
+
+void Pre_WalldistCompute::FilterWallStructureList()
+{
+    int nWallStruct = (int)this->wallstructureList->size();
+    bool *isSelect = new bool [nWallStruct];
+    SetField(isSelect, false, nWallStruct);
+
+    //! Build the wall struct tree.
+    WallStructTree *wallStructTree = new WallStructTree(6, wallMin, wallMax);
+    for (int iWall = 0; iWall < nWallStruct; ++ iWall)
+    {
+        WallStructure *wallStruct = (*wallstructureList)[iWall];
+        RDouble *box = wallStruct->GetBox();
+        WallStructNode *wallNode = new WallStructNode(6, box, iWall);
+        wallStructTree->AddNode(wallNode);
+    }
+
+    //! Near wall structure searching ...
+    int nBoxLimitedMax = MAX(8 * (int)sqrt(nWallStruct * 1.0), 1);
+    nBoxLimitedMax     = MIN(nBoxLimitedMax, nWallStruct);
+    int nBoxLimitedMin = MAX(4 * (int)(sqrt(nWallStruct * 1.0)), 1);
+    nBoxLimitedMin     = MAX(nBoxLimitedMin, 5);
+    RDouble dis = 0.1 * wallTolerance;
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int proc = PHMPI::GetZoneProcessorID(iZone);
+        if (myid == proc)
+        {
+            Grid *grid = GetGrid(iZone, this->level);
+            
+            int boxMin = nBoxLimitedMin;
+            int boxMax = nBoxLimitedMax;
+
+            WallStructTree::AdtNodeList nList;
+            bool finalFound = false;
+
+            int nEnlargeTime = 3;
+            int iEnlarge = 0;
+            while (iEnlarge < nEnlargeTime)
+            {
+                ++ iEnlarge;
+
+                //! Finding ...
+                RDouble *gridMinBox = grid->GetMinBox();
+                RDouble *gridMaxBox = grid->GetMaxBox();
+
+                RDouble pmin[6], pmax[6];
+                RDouble *rmin, *rmax;
+                rmin = wallStructTree->GetMin();
+                rmax = wallStructTree->GetMax();
+
+                pmin[0] = rmin[0];
+                pmin[1] = rmin[1];
+                pmin[2] = rmin[2];
+                pmax[3] = rmax[3];
+                pmax[4] = rmax[4];
+                pmax[5] = rmax[5];
+
+                pmin[3] = gridMinBox[0] - dis;
+                pmin[4] = gridMinBox[1] - dis;
+                pmin[5] = gridMinBox[2] - dis;
+
+                pmax[0] = gridMaxBox[0] + dis;
+                pmax[1] = gridMaxBox[1] + dis;
+                pmax[2] = gridMaxBox[2] + dis;
+
+                RDouble size_min = 0;
+                RDouble size_max = dis * 2.0;
+                RDouble ra;
+
+                int iSearch = 0;
+                int nSearchTimes = 100;
+                while (iSearch <nSearchTimes)
+                {
+                    ++ iSearch;
+
+                    ra = 0.5 * (size_min + size_max);
+                    pmin[3] = gridMinBox[0] - ra;
+                    pmin[4] = gridMinBox[1] - ra;
+                    pmin[5] = gridMinBox[2] - ra;
+
+                    pmax[0] = gridMaxBox[0] + ra;
+                    pmax[1] = gridMaxBox[1] + ra;
+                    pmax[2] = gridMaxBox[2] + ra;
+
+                    nList.clear();
+                    wallStructTree->FindNodesInRegion(pmin, pmax, nList, boxMax + 1);
+
+                    uint_t nNearWallStruct = nList.size();
+                    if ((nNearWallStruct > boxMin && nNearWallStruct <= boxMax) ||
+                        (iEnlarge == nEnlargeTime && nNearWallStruct > 0 && iSearch >= 0.8 * nSearchTimes))
+                    {
+                        finalFound = true;
+                        break;
+                    }
+                    else if (nNearWallStruct > boxMax && (size_max - size_min) > 0.01 * dis)
+                    {
+                        size_max = ra;
+                        continue;
+                    }  
+                    else
+                    {
+                        size_min = ra;
+                        size_max = size_max * 2.0;
+                        continue;
+                    }
+                }
+
+                if (finalFound)
+                {
+                    for (std::size_t iWall = 0; iWall < nList.size(); ++ iWall)
+                    {
+                        int wallIndex = nList[iWall]->GetData();
+                        isSelect[wallIndex] = true;
+                    }
+                    break;
+                }
+                else
+                {
+                    //! Enlarge the limitation.
+                    boxMax *= 2;
+                    continue;
+                }
+            }    //! Enlarge while.
+
+            if (!finalFound)
+            {
+                //! Dump out the bad cell, that it is failure to find the right wall face.
+                ostringstream oss;
+                oss << "Error: could not find the nearest wall structure for zone " << 
+                       grid->GetGridID()->GetIndex() << endl;
+                oss << "Use other wall distance computing method please!" << endl;
+                TK_Exit::ExceptionExit(oss.str());
+            }
+        }    // if (myid == proc)
+    }        //! For each zone.
+
+    //! Create new list.
+    vector<WallStructure *> *newWallstructureList = new vector<WallStructure *>;
+    for (int iWall = 0; iWall < nWallStruct; ++ iWall)
+    {
+        WallStructure *wallStruct = (*wallstructureList)[iWall];
+        if (isSelect[iWall])
+        {
+            newWallstructureList->push_back(wallStruct);
+        }
+        else
+        {
+            delete wallStruct;
+        }
+    }
+
+    if (newWallstructureList->size() == 0)
+    {
+        ostringstream oss1;
+        oss1 << "Error: could not find the nearest wall structure in processor " << myid << endl;
+        TK_Exit::ExceptionExit(oss1);
+    }
+    else
+    {
+        wallstructureList->clear();
+        delete wallstructureList;
+        wallstructureList = newWallstructureList;
+    }
+
+    ostringstream oss;
+    oss << "Actual wall structure: " << newWallstructureList->size() << endl;
+    WriteLogFile(oss);
+
+    delete [] isSelect;    isSelect = NULL;
+    delete wallStructTree;    wallStructTree = NULL;
+    delete newWallstructureList;    newWallstructureList = NULL;
+}
+
+void Pre_WalldistCompute::FindNearstWallStructureOld(RDouble *cellCenter, vector<WallStructure *> &nearestWallStruct)
+{
+    int nWallStruct = (int)this->wallstructureList->size();
+
+    if (walldistComputeMethod == Pre_WalldistCompute::ACCURATE_METHOD)
+    {
+        //! For method 1, loop over all of the wall structure.
+        nearestWallStruct.resize(nWallStruct);
+        for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+        {
+            nearestWallStruct[iWall] = (*wallstructureList)[iWall];
+        }
+        return;
+    }
+
+    //! For method 0: loop over the nearest several box.
+    RDouble x = cellCenter[0];
+    RDouble y = cellCenter[1];
+    RDouble z = cellCenter[2];
+
+    //! Compute the distance between point input and each wall structure.
+    RDouble xmin, ymin, zmin, xmax, ymax, zmax;
+    for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+    {
+        WallStructure *wallStruct = (*wallstructureList)[iWall];
+        RDouble *box = wallStruct->GetBox();
+
+        xmin = box[0]; xmax = box[3];
+        ymin = box[1]; ymax = box[4];
+        zmin = box[2]; zmax = box[5];
+
+        RDouble dis;
+        if (xmin > x)
+        {
+            if (ymin > y)
+            {
+                if (zmin > z)
+                {
+                    dis = sqrt((xmin - x) * (xmin - x) +
+                               (ymin - y) * (ymin - y) +
+                               (zmin - z) * (zmin - z));
+                }
+                else if (zmin <= z && z <= zmax)
+                {
+                    dis = sqrt((xmin - x) * (xmin - x) +
+                               (ymin - y) * (ymin - y));
+                }
+                else
+                {
+                    dis = sqrt((xmin - x) * (xmin - x) +
+                               (ymin - y) * (ymin - y) +
+                               (zmax - z) * (zmax - z));
+                }
+            }
+            else if (ymin <= y && y <= ymax)
+            {
+                if (zmin > z)
+                {
+                    dis = sqrt((xmin - x) * (xmin - x) +
+                               (zmin - z) * (zmin - z));
+                }
+                else if (zmin <= z && z <= zmax)
+                {
+                    dis = sqrt((xmin - x) * (xmin - x));
+                }
+                else
+                {
+                    dis = sqrt((xmin - x) * (xmin - x) +
+                               (zmax - z) * (zmax - z));
+                }
+            }
+            else
+            {
+                if (zmin > z)
+                {
+                    dis = sqrt((xmin - x) * (xmin - x) +
+                               (ymax - y) * (ymax - y) +
+                               (zmin - z) * (zmin - z));
+                }
+                else if (zmin <= z && z <= zmax)
+                {
+                    dis = sqrt((xmin - x) * (xmin - x) +
+                               (ymax - y) * (ymax - y));
+                }
+                else
+                {
+                    dis = sqrt((xmin - x) * (xmin - x) +
+                               (ymax - y) * (ymax - y) +
+                               (zmax - z) * (zmax - z));
+                }
+            }
+        }
+        else if (xmin <= x && x <= xmax)
+        {
+            if (ymin > y)
+            {
+                if (zmin > z)
+                {
+                    dis = sqrt((ymin - y) * (ymin - y) +
+                               (zmin - z) * (zmin - z));
+                }
+                else if (zmin <= z && z <= zmax)
+                {
+                    dis = sqrt((ymin - y) * (ymin - y));
+                }
+                else
+                {
+                    dis = sqrt((ymin - y) * (ymin - y) +
+                               (zmax - z) * (zmax - z));
+                }
+            }
+            else if (ymin <= y && y <= ymax)
+            {
+                if (zmin > z)
+                {
+                    dis = sqrt((zmin - z) * (zmin - z));
+                }
+                else if (zmin <= z && z <= zmax)
+                {
+                    dis = -1;
+                }
+                else
+                {
+                    dis = sqrt((zmax - z) * (zmax - z));
+                }
+            }
+            else
+            {
+                if (zmin > z)
+                {
+                    dis = sqrt((ymax - y) * (ymax - y) +
+                               (zmin - z) * (zmin - z));
+                }
+                else if (zmin <= z && z <= zmax)
+                {
+                    dis = sqrt((ymax - y) * (ymax - y));
+                }
+                else
+                {
+                    dis = sqrt((ymax - y) * (ymax - y) +
+                               (zmax - z) * (zmax - z));
+                }
+            }
+        }
+        else
+        {
+            if (ymin > y)
+            {
+                if (zmin > z)
+                {
+                    dis = sqrt((xmax - x) * (xmax - x) +
+                               (ymin - y) * (ymin - y) +
+                               (zmin - z) * (zmin - z));
+                }
+                else if (zmin <= z && z <= zmax)
+                {
+                    dis = sqrt((xmax - x) * (xmax - x) +
+                               (ymin - y) * (ymin - y));
+                }
+                else
+                {
+                    dis = sqrt((xmax - x) * (xmax - x) +
+                               (ymin - y) * (ymin - y) +
+                               (zmax - z) * (zmax - z));
+                }
+            }
+            else if (ymin <= y && y <= ymax)
+            {
+                if (zmin > z)
+                {
+                    dis = sqrt((xmax - x) * (xmax - x) +
+                               (zmin - z) * (zmin - z));
+                }
+                else if (zmin <= z && z <= zmax)
+                {
+                    dis = sqrt((xmax - x) * (xmax - x));
+                }
+                else
+                {
+                    dis = sqrt((xmax - x) * (xmax - x) +
+                               (zmax - z) * (zmax - z));
+                }
+            }
+            else
+            {
+                if (zmin > z)
+                {
+                    dis = sqrt((xmax - x) * (xmax - x) +
+                               (ymax - y) * (ymax - y) +
+                               (zmin - z) * (zmin - z));
+                }
+                else if (zmin <= z && z <= zmax)
+                {
+                    dis = sqrt((xmax - x) * (xmax - x) +
+                               (ymax - y) * (ymax - y));
+                }
+                else
+                {
+                    dis = sqrt((xmax - x) * (xmax - x) +
+                               (ymax - y) * (ymax - y) +
+                               (zmax - z) * (zmax - z));
+                }
+            }
+        }
+
+        wallStruct->SetDistance(dis);
+    }
+
+    //! Find out the nearest wall structure.
+    int nBox = MAX(4 * (int)sqrt(nWallStruct * 1.0), 1);
+    nBox     = MIN(nBox, nWallStruct);
+
+    nearestWallStruct.reserve(nBox);
+    bool *isSelected = new bool [nWallStruct];
+    SetField(isSelected, false, nWallStruct);
+
+    for (int iBox = 0; iBox < nBox; ++ iBox)
+    {
+        RDouble minDist = LARGE;
+
+        int targetBoxID = -1;
+        for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+        {
+            WallStructure *wallStruct = (*wallstructureList)[iWall];
+            RDouble distance = wallStruct->GetDistance();
+            if (!isSelected[iWall] && distance < minDist)
+            {
+                minDist = distance;
+                targetBoxID = static_cast<int>(iWall);
+            }
+        }
+        if (targetBoxID == -1)
+        {
+            TK_Exit::ExceptionExit(" Error: non nearest wall structure was found!\n");
+        }
+
+        nearestWallStruct.push_back((*wallstructureList)[targetBoxID]);
+        isSelected[targetBoxID] = true;
+    }
+
+    //! Add the neighbor overlapping boxes into the list.
+    for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+    {
+        if (!isSelected[iWall])
+        {
+            WallStructure *wallStruct0 = (*wallstructureList)[iWall];
+            RDouble *box0 = wallStruct0->GetBox();
+            RDouble xmin0 = box0[0]; RDouble xmax0 = box0[3];
+            RDouble ymin0 = box0[1]; RDouble ymax0 = box0[4];
+            RDouble zmin0 = box0[2]; RDouble zmax0 = box0[5];
+
+            for (int iBox = 0; iBox < nBox; ++ iBox)
+            {
+                WallStructure *wallStruct1 = nearestWallStruct[iBox];
+                RDouble *box1 = wallStruct1->GetBox();
+                RDouble xmin1 = box1[0]; RDouble xmax1 = box1[3];
+                RDouble ymin1 = box1[1]; RDouble ymax1 = box1[4];
+                RDouble zmin1 = box1[2]; RDouble zmax1 = box1[5];
+
+                if (xmin1 > xmax0 || xmax1 < xmin0 ||
+                    ymin1 > ymax0 || ymax1 < ymin0 ||
+                    zmin1 > zmax0 || zmax1 < zmin0)
+                {
+                    //! Non-overlapping.
+                }
+                else
+                {
+                    //! Overlapping.
+                    nearestWallStruct.push_back(wallStruct0);
+                    isSelected[iWall] = true;
+                    break;
+                }
+            }
+        }
+    }
+
+    delete [] isSelected;
+}
+
+void Pre_WalldistCompute::DeCompressWallStructure(DataContainer *&cdata, const bool &ifMoveToBegin)
+{
+    if (ifMoveToBegin)
+    {
+        cdata->moveto_begin();
+    }
+
+    int nSolidFace;
+    cdata->read(&nSolidFace, sizeof(int));
+
+    if (nSolidFace == 0)
+    {
+        //! If there are not solid cell, do nothing and return.
+        return;
+    }
+
+    nTWFace += nSolidFace;
+    
+    WallStructure *wallStructure = new WallStructure();
+    wallstructureList->push_back(wallStructure);
+
+    //! Set iBlock to wallStructure.
+    int iBlock;
+    cdata->read(&iBlock, sizeof(int));
+    wallStructure->SetIBlock(iBlock);
+
+    //! Face center.
+    WallStructure::value_type &xfc = wallStructure->GetXFaceCenter();
+    WallStructure::value_type &yfc = wallStructure->GetYFaceCenter();
+    WallStructure::value_type &zfc = wallStructure->GetZFaceCenter();
+    xfc.reserve(nSolidFace);
+    yfc.reserve(nSolidFace);
+    zfc.reserve(nSolidFace);
+    for (int i = 0; i < nSolidFace; ++ i)
+    {
+        RDouble xc, yc, zc;
+        cdata->read(&xc, sizeof(RDouble));
+        cdata->read(&yc, sizeof(RDouble));
+        cdata->read(&zc, sizeof(RDouble));
+
+        xfc.push_back(xc);
+        yfc.push_back(yc);
+        zfc.push_back(zc);
+    }
+
+    //! Wall points coordinates.
+    int nWallPoints;
+    cdata->read(&nWallPoints, sizeof(int));
+    if (nWallPoints == 0)
+    {
+        //! If the wall points are not including, return.
+        return;
+    }
+
+    WallStructure::value_type &x = wallStructure->GetX();
+    WallStructure::value_type &y = wallStructure->GetY();
+    WallStructure::value_type &z = wallStructure->GetZ();
+    x.reserve(nWallPoints);
+    y.reserve(nWallPoints);
+    z.reserve(nWallPoints);
+    for (int i = 0; i < nWallPoints; ++ i)
+    {
+        RDouble x0, y0, z0;
+        cdata->read(&x0, sizeof(RDouble));
+        cdata->read(&y0, sizeof(RDouble));
+        cdata->read(&z0, sizeof(RDouble));
+
+        x.push_back(x0);
+        y.push_back(y0);
+        z.push_back(z0);
+    }
+
+    int *nPointPerFace = new int [nSolidFace];
+
+    int count = 0;
+    for (int iFace = 0; iFace < nSolidFace; ++ iFace)
+    {
+        int nPoint;
+        cdata->read(&nPoint, sizeof(int));
+        nPointPerFace[iFace] = nPoint;
+        count += nPoint;
+    }
+
+    int *wallFace2Node = new int [count];
+    count = 0;
+    for (int iFace = 0; iFace < nSolidFace; ++ iFace)
+    {
+        for (int j = 0; j < nPointPerFace[iFace]; ++ j)
+        {
+            int nodeIndex;
+            cdata->read(&nodeIndex, sizeof(int));
+            wallFace2Node[count ++] = nodeIndex;
+        }
+    }
+
+    //! Analyze node position of each face.
+    int *nodePosition = new int [nSolidFace + 1];
+    nodePosition[0] = 0;
+    int positionCount = 0;
+    for (int iFace = 0; iFace < nSolidFace; ++ iFace)
+    {
+        positionCount += nPointPerFace[iFace];
+        nodePosition[iFace + 1] = positionCount;
+    }
+    wallStructure->SetNodePosition(nodePosition);
+
+    //! Face normal.
+    WallStructure::value_type &xfn = wallStructure->GetXFaceNormal();
+    WallStructure::value_type &yfn = wallStructure->GetYFaceNormal();
+    WallStructure::value_type &zfn = wallStructure->GetZFaceNormal();
+    xfn.reserve(nSolidFace);
+    yfn.reserve(nSolidFace);
+    zfn.reserve(nSolidFace);
+    for (int i = 0; i < nSolidFace; ++ i)
+    {
+        RDouble xfn0, yfn0, zfn0;
+        cdata->read(&xfn0, sizeof(RDouble));
+        cdata->read(&yfn0, sizeof(RDouble));
+        cdata->read(&zfn0, sizeof(RDouble));
+
+        xfn.push_back(xfn0);
+        yfn.push_back(yfn0);
+        zfn.push_back(zfn0);
+    }
+
+    wallStructure->SetnPointPerFace(nPointPerFace);
+    wallStructure->SetWallFace2Node(wallFace2Node);
+    wallStructure->Box();
+}
+
+void Pre_WalldistCompute::BuildWallStructTree()
+{
+    //PrintToWindow("Wall structure tree building ...\n");
+    //WriteLogFile("Wall structure tree building ...\n");
+
+    //! Compute the boundary.
+    RDouble wallBound[6];
+    for (int iDim = 0; iDim < 3; ++ iDim)
+    {
+        wallBound[iDim]     = LARGE;
+        wallBound[iDim + 3] = -LARGE;
+    }
+
+    RDouble oldPoint[3], newPoint[3];
+
+    for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+    {
+        WallStructure *wallStruct = (*wallstructureList)[iWall];
+        RDouble *box = wallStruct->GetBox();
+
+        RDouble x0 = box[0], y0 = box[1], z0 = box[2];
+        RDouble x1 = box[3], y1 = box[4], z1 = box[5];
+
+        //! Check each of the eight points of the CUBE box!
+        RDouble xRange[2], yRange[2], zRange[2];
+        xRange[0] = x0; xRange[1] = x1;
+        yRange[0] = y0; yRange[1] = y1;
+        zRange[0] = z0; zRange[1] = z1;
+        for (int i = 0; i < 2; ++ i)
+        {
+            for (int j = 0; j < 2; ++ j)
+            {
+                for (int k = 0; k < 2; ++ k)
+                {
+                    oldPoint[0] = xRange[i];
+                    oldPoint[1] = yRange[j];
+                    oldPoint[2] = zRange[k];
+
+                    this->RotateAxis(oldPoint, newPoint);
+
+                    wallBound[0] = MIN(newPoint[0], wallBound[0]);
+                    wallBound[1] = MIN(newPoint[1], wallBound[1]);
+                    wallBound[2] = MIN(newPoint[2], wallBound[2]);
+
+                    wallBound[3] = MAX(newPoint[0], wallBound[3]);
+                    wallBound[4] = MAX(newPoint[1], wallBound[4]);
+                    wallBound[5] = MAX(newPoint[2], wallBound[5]);
+                }
+            }
+        }
+    }
+
+    wallTolerance = 0;
+    for (int iDim = 0; iDim < 3; ++ iDim)
+    {
+        wallTolerance = MAX(wallTolerance, wallBound[iDim + 3] - wallBound[iDim]);
+    }
+    wallTolerance *= 0.01;
+
+    for (int iDim = 0; iDim < 3; ++ iDim)
+    {
+        wallBound[iDim]     -= wallTolerance;
+        wallBound[iDim + 3] += wallTolerance;
+    }
+
+    //! Build Tree.
+    for (int iDim = 0; iDim < 3; ++ iDim)
+    {
+        wallMin[iDim] = wallBound[iDim];
+        wallMax[iDim] = wallBound[iDim + 3];
+    }
+    for (int iDim = 3; iDim < 6; ++ iDim)
+    {
+        wallMin[iDim] = wallBound[iDim - 3];
+        wallMax[iDim] = wallBound[iDim];
+    }
+
+    if (!wallFaceTree)
+    {
+        wallFaceTree = new WallFaceTree(6, wallMin, wallMax);
+    }
+
+    if (walldistComputeMethod == SUPER_FAST_METHOD)
+    {
+        if (rotateAxis > 0)
+        {
+            TK_Exit::ExceptionExit("Error: has not considered rotate coordinates for super fast wall dist computing method!");
+        }
+        FilterWallStructureList();
+    }
+
+    RDouble triBox[6];
+    RDouble oldCoord[3], newCoord[3];
+
+    nTWallFace = 0;
+    for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+    {
+        WallStructure *cwalldist = (*wallstructureList)[iWall];
+
+        if (cwalldist->GetIBlock() != presentBlock)
+        {
+            continue;
+        }
+
+        uint_t nWallFaces = cwalldist->GetNumberOfWallFaces();
+        nTWallFace += nWallFaces;
+
+        WallStructure::value_type &x = cwalldist->GetX();
+        WallStructure::value_type &y = cwalldist->GetY();
+        WallStructure::value_type &z = cwalldist->GetZ();
+
+        int *nPointPerFace = cwalldist->GetnPointPerFace();
+        int *wallFace2Node = cwalldist->GetWallFace2Node();
+
+        int count = 0;
+        for (int iFace = 0; iFace < nWallFaces; ++ iFace)
+        {
+            //! Insert into the tree.
+            for (int iDim = 0; iDim < 3; ++ iDim)
+            {
+                triBox[iDim]     = LARGE;
+                triBox[iDim + 3] = -LARGE;
+            }
+
+            int nNode = nPointPerFace[iFace];
+            for (int iNode = 0; iNode < nNode; ++ iNode)
+            {
+                int nodeID = wallFace2Node[count ++];
+
+                oldCoord[0] = x[nodeID];
+                oldCoord[1] = y[nodeID];
+                oldCoord[2] = z[nodeID];
+
+                this->RotateAxis(oldCoord, newCoord);
+                triBox[0] = MIN(triBox[0], newCoord[0]);
+                triBox[1] = MIN(triBox[1], newCoord[1]);
+                triBox[2] = MIN(triBox[2], newCoord[2]);
+
+                triBox[3] = MAX(triBox[3], newCoord[0]);
+                triBox[4] = MAX(triBox[4], newCoord[1]);
+                triBox[5] = MAX(triBox[5], newCoord[2]);
+            }
+
+            WallFaceNode *triNode = new WallFaceNode(6, triBox, FaceID(iWall, iFace));
+            wallFaceTree->AddNode(triNode);
+        }
+    }
+
+    //PrintToWindow("Wall structure tree building over ...\n");
+    //WriteLogFile("Wall structure tree building over ...\n");
+}
+
+bool Pre_WalldistCompute::IsWalldistComputOver()
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    bool isOver = true;
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Grid *grid = GetGrid(zoneID, this->level);
+        if (IsWalldistComputOver(grid) == false)
+        {
+            isOver = false;
+            break;
+        }
+    }
+    return isOver;
+}
+
+bool Pre_WalldistCompute::IsWalldistComputOver(Grid *grid)
+{
+    if (grid->Type() == PHSPACE::STRUCTGRID)
+    {
+        StructGrid *structGrid = StructGridCast(grid);
+        return IsWalldistComputOver(structGrid);
+    }
+    else
+    {
+        UnstructGrid *unstructGrid = UnstructGridCast(grid);
+        return IsWalldistComputOver(unstructGrid);
+    }
+}
+
+bool Pre_WalldistCompute::IsWalldistComputOver(StructGrid *grid)
+{
+    bool isOver = true;
+
+    RDouble3D &walldist = *grid->GetWallDist();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                if (walldist(i, j, k) >= LARGE * 0.9)
+                {
+                    isOver = false;
+                    return isOver;
+                }
+            }
+        }
+    }
+    return isOver;
+}
+
+bool Pre_WalldistCompute::IsWalldistComputOver(UnstructGrid *grid)
+{
+    bool isOver = true;
+
+    if (cellMethodOrNodeMethod == CELL_METHOD)
+    {
+        RDouble *walldist = grid->GetWallDist();
+
+        int nTotalCell = grid->GetNTotalCell();
+
+        int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+        int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+        int *wallCellLabel = grid->GetWallCellLabel();
+
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            if (viscousType <= LAMINAR && wallCellLabel[iCell] != 1 && iLES == NOLES_SOLVER) continue;
+
+            if (walldist[iCell] >= LARGE * 0.9)
+            {
+                isOver = false;
+                break;
+            }
+        }
+    }
+    else
+    {
+        RDouble *wallDistNode = grid->GetWallDistNode();
+
+        int nTotalNode = grid->GetNTotalNode();
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            if (wallDistNode[iNode] >= LARGE * 0.9)
+            {
+                isOver = false;
+                break;
+            }
+        }
+    }
+
+    return isOver;
+}
+
+bool Pre_WalldistCompute::IsNodeWalldistComputOver()
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        UnstructGrid *grid = UnstructGridCast(GetGrid(zoneID, this->level));
+
+        if (grid->GetIBlock() != presentBlock)
+        {
+            continue;
+        }
+
+        vector<RDouble> &nodeWalldist = grid->GetNodeWallDist();
+
+        int nTotalNode = grid->GetNTotalNode();
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            if (nodeWalldist[iNode] >= LARGE * 0.9)
+            {
+                return false;
+            }
+        }
+    }
+
+    return true;
+}
+
+void Pre_WalldistCompute::CheckWallDistance()
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Grid *grid = GetGrid(zoneID, this->level);
+
+        if ((grid->Type() == PHSPACE::UNSTRUCTGRID) && (grid->GetDim() == PHSPACE::THREE_D))
+        {
+            UnstructGrid *unstructGrid = UnstructGridCast(grid);
+            if (cellMethodOrNodeMethod == CELL_METHOD)
+            {
+                CheckWallDistance(unstructGrid);
+            }
+            else
+            {
+                CheckWallDistanceByNodeMethod(unstructGrid);
+            }
+        }
+    }
+}
+
+void Pre_WalldistCompute::CheckWallDistanceByNodeMethod(UnstructGrid *grid)
+{
+    using namespace PHMPI;
+
+    RDouble *wallDistNode = grid->GetWallDistNode();
+
+    int nTotalNode = grid->GetNTotalNode();
+
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    RDouble nodeCoord[3], faceCenter[3], faceNormal[3];
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        if (wallDistNode[iNode] < LARGE * 0.9)
+        {
+            continue;
+        }
+
+        nodeCoord[0] = x[iNode];
+        nodeCoord[1] = y[iNode];
+        nodeCoord[2] = z[iNode];
+
+        for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+        {
+            WallStructure *cwalldist = (*wallstructureList)[iWall];
+
+            uint_t nWallFaces              = cwalldist->GetNumberOfWallFaces();
+            WallStructure::value_type &xfc = cwalldist->GetXFaceCenter();
+            WallStructure::value_type &yfc = cwalldist->GetYFaceCenter();
+            WallStructure::value_type &zfc = cwalldist->GetZFaceCenter();
+            WallStructure::value_type &xW   = cwalldist->GetX();
+            WallStructure::value_type &yW   = cwalldist->GetY();
+            WallStructure::value_type &zW   = cwalldist->GetZ();
+            WallStructure::value_type &xfn = cwalldist->GetXFaceNormal();
+            WallStructure::value_type &yfn = cwalldist->GetYFaceNormal();
+            WallStructure::value_type &zfn = cwalldist->GetZFaceNormal();
+
+            int *nPointPerFace = cwalldist->GetnPointPerFace();
+            int *wallFace2Node = cwalldist->GetWallFace2Node();
+
+            int nodeCount = 0;
+            for (int iFace = 0; iFace < nWallFaces; ++ iFace)
+            {
+                faceCenter[0] = xfc[iFace];
+                faceCenter[1] = yfc[iFace];
+                faceCenter[2] = zfc[iFace];
+
+                faceNormal[0] = xfn[iFace];
+                faceNormal[1] = yfn[iFace];
+                faceNormal[2] = zfn[iFace];
+
+                vector<int> face2node;
+                face2node.resize(nPointPerFace[iFace]);
+                for (int jNode = 0; jNode < nPointPerFace[iFace]; ++jNode)
+                {
+                    face2node[jNode] = wallFace2Node[nodeCount++];
+                }
+
+                RDouble wdst = ComputeDistanceOfANodeToAFace(nodeCoord, faceCenter, faceNormal, face2node, xW, yW, zW);
+                if (wallDistNode[iNode] > wdst)
+                {
+                    wallDistNode[iNode] = wdst;
+                }
+            }
+        }
+    }
+}
+
+void Pre_WalldistCompute::CheckWallDistance(UnstructGrid *grid)
+{
+    using namespace PHMPI;
+
+    RDouble *walldist = grid->GetWallDist();
+
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+    int *wallCellLabel = grid->GetWallCellLabel();
+
+    cout.unsetf(ios::scientific);
+    cout.setf(ios::fixed);
+    cout.precision(0);
+
+    RDouble cellCenter[3], faceCenter[3], faceNormal[3];
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        if (viscousType <= LAMINAR && wallCellLabel[iCell] != 1 && iLES == NOLES_SOLVER) continue;
+
+        if (walldist[iCell] < LARGE * 0.9)
+        {
+            continue;
+        }
+
+        cellCenter[0] = xcc[iCell];
+        cellCenter[1] = ycc[iCell];
+        cellCenter[2] = zcc[iCell];
+
+        for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+        {
+            WallStructure *cwalldist = (*wallstructureList)[iWall];
+
+            uint_t nWallFaces = cwalldist->GetNumberOfWallFaces();
+            WallStructure::value_type &xfc = cwalldist->GetXFaceCenter();
+            WallStructure::value_type &yfc = cwalldist->GetYFaceCenter();
+            WallStructure::value_type &zfc = cwalldist->GetZFaceCenter();
+            WallStructure::value_type &x = cwalldist->GetX();
+            WallStructure::value_type &y = cwalldist->GetY();
+            WallStructure::value_type &z = cwalldist->GetZ();
+            WallStructure::value_type &xfn = cwalldist->GetXFaceNormal();
+            WallStructure::value_type &yfn = cwalldist->GetYFaceNormal();
+            WallStructure::value_type &zfn = cwalldist->GetZFaceNormal();
+
+            int *nPointPerFace = cwalldist->GetnPointPerFace();
+            int *wallFace2Node = cwalldist->GetWallFace2Node();
+
+            int nodeCount = 0;
+            for (int iFace = 0; iFace < nWallFaces; ++ iFace)
+            {
+                faceCenter[0] = xfc[iFace];
+                faceCenter[1] = yfc[iFace];
+                faceCenter[2] = zfc[iFace];
+
+                faceNormal[0] = xfn[iFace];
+                faceNormal[1] = yfn[iFace];
+                faceNormal[2] = zfn[iFace];
+
+                vector<int> face2node;
+                face2node.resize(nPointPerFace[iFace]);
+                for (int iNode = 0; iNode < nPointPerFace[iFace]; ++ iNode)
+                {
+                    face2node[iNode] = wallFace2Node[nodeCount ++];
+                }
+
+                RDouble wdst = ComputeDistanceOfANodeToAFace(cellCenter, faceCenter, faceNormal, face2node, x, y, z);
+                if (walldist[iCell] > wdst)
+                {
+                    walldist[iCell] = wdst;
+                }
+            }
+        }
+    }
+}
+
+void Pre_WalldistCompute::PostWallDistance()
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Grid *grid = GetGrid(zoneID, this->level);
+        PostWallDistance(grid);
+    }
+}
+
+void Pre_WalldistCompute::PostWallDistance(Grid *grid)
+{
+    if (grid->Type() == PHSPACE::STRUCTGRID)
+    {
+        StructGrid *structGrid = StructGridCast(grid);
+        PostWallDistance(structGrid);
+    }
+    else
+    {
+        UnstructGrid *unstructGrid = UnstructGridCast(grid);
+
+        if (cellMethodOrNodeMethod == CELL_METHOD)
+        {
+            PostWallDistance(unstructGrid);
+        }
+        else
+        {
+            PostWallDistanceByNodeMethod(unstructGrid);
+        }
+    }
+}
+
+void Pre_WalldistCompute::PostWallDistance(StructGrid *grid)
+{
+    RDouble3D &walldist = *grid->GetWallDist();
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                walldist(i, j, k) = sqrt(walldist(i, j, k));
+            }
+        }
+    }
+    GhostCell3D(walldist, ni, nj, nk);
+}
+
+void Pre_WalldistCompute::PostWallDistanceByNodeMethod(UnstructGrid *grid)
+{
+    RDouble *walldist = grid->GetWallDist();
+    RDouble *wallDistNode = grid->GetWallDistNode();
+
+    int nTotalNode = grid->GetNTotalNode();
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        wallDistNode[iNode] = sqrt(wallDistNode[iNode]);
+    }
+
+    int nTotalCell = grid->GetNTotalCell();
+    int **cellNodeIndex = grid->GetCell2NodeArray();
+    int  *cellNodeNumber = grid->GetNodeNumberOfEachCell();
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        int nNode = cellNodeNumber[iCell];
+        walldist[iCell] = 0.0;
+        for (int iNode = 0; iNode < nNode; ++ iNode)
+        {
+            int nodeID = cellNodeIndex[iCell][iNode];
+            walldist[iCell] += wallDistNode[nodeID];
+
+        }
+        walldist[iCell] /= nNode;
+    }
+
+    int *node_number_of_each_face = grid->GetNodeNumberOfEachFace();
+    int *face2node = grid->GetFace2Node();
+
+    int nBoundFace = grid->GetNBoundFace();
+    UnstructBCSet **bcr = grid->GetBCRecord();
+
+    bool *nodeOnWall = new bool[nTotalNode];
+    std::fill_n(nodeOnWall, nTotalNode, false);
+
+    int nodeCount = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int bcType = bcr[iFace]->GetKey();
+        if (!(IsWall(bcType)))
+        {
+            nodeCount = nodeCount + node_number_of_each_face[iFace];
+            continue;
+        }
+
+        for (int iNode = 0; iNode < node_number_of_each_face[iFace]; ++ iNode)
+        {
+            int nodeIndex = face2node[nodeCount];
+            nodeOnWall[nodeIndex] = true;
+            nodeCount++;
+        }
+    }
+
+    int countCellOnWall = 0;
+    vector < int > cellIndexOnWall;
+    cellIndexOnWall.resize(0);
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        bool allNodeOnWall = true;
+        int nNodes = cellNodeNumber[iCell];
+        for (int iNode = 0; iNode < nNodes; ++ iNode)
+        {
+            int nodeIndex = cellNodeIndex[iCell][iNode];
+            if (!(nodeOnWall[nodeIndex]))
+            {
+                allNodeOnWall = false;
+                break;
+            }
+        }
+
+        if (allNodeOnWall)
+        {
+            cellIndexOnWall.push_back(iCell);
+            countCellOnWall++;
+        }
+    }
+
+    if (countCellOnWall > 0)
+    {
+        RDouble *xcc = grid->GetCellCenterX();
+        RDouble *ycc = grid->GetCellCenterY();
+        RDouble *zcc = grid->GetCellCenterZ();
+
+        RDouble cellCenter[3], faceCenter[3], faceNormal[3];
+        for (int iCell = 0; iCell < countCellOnWall; ++ iCell)
+        {
+            int cellIndex = cellIndexOnWall[iCell];
+            walldist[cellIndex] = LARGE;
+
+            cellCenter[0] = xcc[cellIndex];
+            cellCenter[1] = ycc[cellIndex];
+            cellCenter[2] = zcc[cellIndex];
+
+            for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+            {
+                WallStructure *cwalldist = (*wallstructureList)[iWall];
+
+                uint_t nWallFaces              = cwalldist->GetNumberOfWallFaces();
+                WallStructure::value_type &xfc = cwalldist->GetXFaceCenter();
+                WallStructure::value_type &yfc = cwalldist->GetYFaceCenter();
+                WallStructure::value_type &zfc = cwalldist->GetZFaceCenter();
+                WallStructure::value_type &x   = cwalldist->GetX();
+                WallStructure::value_type &y   = cwalldist->GetY();
+                WallStructure::value_type &z   = cwalldist->GetZ();
+                WallStructure::value_type &xfn = cwalldist->GetXFaceNormal();
+                WallStructure::value_type &yfn = cwalldist->GetYFaceNormal();
+                WallStructure::value_type &zfn = cwalldist->GetZFaceNormal();
+
+                int *nPointPerFace = cwalldist->GetnPointPerFace();
+                int *wallFace2Node = cwalldist->GetWallFace2Node();
+
+                nodeCount = 0;
+                for (int iFace = 0; iFace < nWallFaces; ++ iFace)
+                {
+                    faceCenter[0] = xfc[iFace];
+                    faceCenter[1] = yfc[iFace];
+                    faceCenter[2] = zfc[iFace];
+
+                    faceNormal[0] = xfn[iFace];
+                    faceNormal[1] = yfn[iFace];
+                    faceNormal[2] = zfn[iFace];
+
+                    vector<int> currentWallFace2Node;
+                    currentWallFace2Node.resize(nPointPerFace[iFace]);
+                    for (int iNode = 0; iNode < nPointPerFace[iFace]; ++ iNode)
+                    {
+                        currentWallFace2Node[iNode] = wallFace2Node[nodeCount++];
+                    }
+
+                    RDouble wdst = ComputeDistanceOfANodeToAFace(cellCenter, faceCenter, faceNormal, currentWallFace2Node, x, y, z);
+                    RDouble iCellWalldist = sqrt(wdst);
+                    if (walldist[cellIndex] > iCellWalldist)
+                    {
+                        walldist[cellIndex] = iCellWalldist;
+                    }
+                }
+            }
+        }
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        if (walldist[iCell] < 1.0e-10)
+        {
+            PrintToWindow("     Warning: all cell nodes may lay on solid wall !!!\n");
+            ostringstream oss;
+            oss << "  cellIndex = " << iCell << endl;
+            PrintToWindow(oss);
+        }
+    }
+
+    delete[] nodeOnWall;    nodeOnWall = nullptr;
+}
+
+void Pre_WalldistCompute::PostWallDistance(UnstructGrid *grid)
+{
+    RDouble *walldist = grid->GetWallDist();
+
+    int nTotalCell = grid->GetNTotalCell();
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        walldist[iCell] = sqrt(walldist[iCell]);
+    }
+}
+#pragma warning(disable:4100)
+RDouble Pre_WalldistCompute::GetGlobalGridSize(int type)
+{
+    RDouble globalMinBox[3], globalMaxBox[3];
+    GetGlobalMinMaxBox(globalMinBox, globalMaxBox);
+
+    RDouble xMin = globalMinBox[0], yMin = globalMinBox[1], zMin = globalMinBox[2];
+    RDouble xMax = globalMaxBox[0], yMax = globalMaxBox[1], zMax = globalMaxBox[2];
+    RDouble dx = xMax - xMin, dy = yMax - yMin, dz = zMax - zMin;
+    return DISTANCE(dx, dy, dz);
+}
+#pragma warning(default:4100)
+int Pre_WalldistCompute::JudgeInitialRotateAxis()
+{
+    if (this->walldistComputeMethod == ACCURATE_METHOD)
+    {
+        return -1;
+    }
+
+    RDouble zeroTolerance = 1.0e-10;
+    int nFaceX = 0, nFaceY = 0, nFaceZ = 0;
+
+    for (std::size_t iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+    {
+        WallStructure *cwalldist = (*wallstructureList)[iWall];
+
+        if (cwalldist->GetIBlock() != presentBlock)
+        {
+            continue;
+        }
+
+        uint_t nWallFaces = cwalldist->GetNumberOfWallFaces();
+
+        WallStructure::value_type &xfc = cwalldist->GetXFaceNormal();
+        WallStructure::value_type &yfc = cwalldist->GetYFaceNormal();
+        WallStructure::value_type &zfc = cwalldist->GetZFaceNormal();
+
+        for (int iFace = 0; iFace < nWallFaces; ++ iFace)
+        {
+            //! If this face is perpendicular to the rotate axis, count it.
+            RDouble fabsNormalX = fabs(xfc[iFace]);
+            RDouble fabsNormalY = fabs(yfc[iFace]);
+            RDouble fabsNormalZ = fabs(zfc[iFace]);
+
+            if (fabsNormalY < zeroTolerance && fabsNormalZ < zeroTolerance)
+            {
+                ++ nFaceX;
+            }
+            else if (fabsNormalX < zeroTolerance && fabsNormalZ < zeroTolerance)
+            {
+                ++ nFaceY;
+            }
+            else if (fabsNormalX < zeroTolerance && fabsNormalY < zeroTolerance)
+            {
+                ++ nFaceZ;
+            }
+        }
+    }
+
+    int rotateDirection = 1;
+    if (nFaceX < 500 && nFaceY < 500 && nFaceZ < 500)
+    {
+        //! Has few faces perpendicular to axis, do not rotate.
+        rotateDirection = -1;
+    }
+    else
+    {
+        if (nFaceX > nFaceY && nFaceX > nFaceZ)
+        {
+            //! Plane is perpendicular to X axis.
+            rotateDirection = 1;
+        }
+        else if (nFaceY > nFaceX && nFaceY > nFaceZ)
+        {
+            rotateDirection = 2;
+        }
+        else if (nFaceZ > nFaceX && nFaceZ > nFaceY)
+        {
+            rotateDirection = 3;
+        }
+    }
+
+    ostringstream oss;
+    oss << "  The axis with maximum parallel faces is: " << rotateDirection << endl;
+    WriteLogFile(oss.str());
+    PrintToWindow(oss.str());
+
+    return rotateDirection;
+}
+
+WallStructure::WallStructure()
+{
+    nPointPerFace = 0;
+    wallFace2Node = 0;
+    nodePosition  = 0;
+    *box = 0;
+    distance = 0.0;
+    iBlock = 0;
+    xfc.resize(0);
+    x.resize(0);
+}
+
+WallStructure::~WallStructure()
+{
+    delete [] nPointPerFace;
+    delete [] wallFace2Node;
+    delete [] nodePosition;
+
+    for (std::size_t iFace = 0; iFace < face2node.size(); ++ iFace)
+    {
+        face2node[iFace].clear();
+    }
+    face2node.clear();
+}
+
+void WallStructure::Box()
+{
+    for (int iDim = 0; iDim < 3; ++ iDim)
+    {
+        box[iDim]     = LARGE;
+        box[iDim + 3] = SMALL;
+    }
+
+    for (std::size_t iNode = 0; iNode < this->GetNumberOfWallPoints(); ++ iNode)
+    {
+        box[0] = MIN(box[0], x[iNode]);
+        box[1] = MIN(box[1], y[iNode]);
+        box[2] = MIN(box[2], z[iNode]);
+
+        box[3] = MAX(box[3], x[iNode]);
+        box[4] = MAX(box[4], y[iNode]);
+        box[5] = MAX(box[5], z[iNode]);
+    }
+}
+
+void WallStructure::Encode(DataContainer *&cdata, const bool &ifMoveToBegin)
+{
+    if (ifMoveToBegin)
+    {
+        cdata->moveto_begin();
+    }
+
+    uint_t nSolidFace = GetNumberOfWallFaces();
+    PHWrite(cdata, &nSolidFace, 1);
+
+    if (!nSolidFace)
+    {
+        //! If there are not solid cell, do nothing and return.
+        return;
+    }
+
+    PHWrite(cdata, &iBlock, 1);
+
+    //! Write the wall face data structure into the data-container.
+    //! First: wall face center.
+    for (uint_t iFace = 0; iFace < nSolidFace; ++ iFace)
+    {
+        RDouble xc, yc, zc;
+
+        xc = xfc[iFace];
+        yc = yfc[iFace];
+        zc = zfc[iFace];
+        
+        cdata->write(&xc, sizeof(RDouble));
+        cdata->write(&yc, sizeof(RDouble));
+        cdata->write(&zc, sizeof(RDouble));
+    }
+
+    //! Second: points coordinates.
+    uint_t nWallPoints = GetNumberOfWallPoints();
+    PHWrite(cdata, &nWallPoints, 1);
+    if (!nWallPoints)
+    {
+        return;
+    }
+
+    for (uint_t iNode = 0; iNode < nWallPoints; ++ iNode)
+    {
+        RDouble x0 = x[iNode];
+        RDouble y0 = y[iNode];
+        RDouble z0 = z[iNode];
+        cdata->write(&x0, sizeof(RDouble));
+        cdata->write(&y0, sizeof(RDouble));
+        cdata->write(&z0, sizeof(RDouble));
+    }
+
+    //! Third: face to node connection.
+    PHWrite(cdata, nPointPerFace, nSolidFace);
+
+    int count = 0;
+    for (uint_t iFace = 0; iFace < nSolidFace; ++ iFace)
+    {
+        count += nPointPerFace[iFace];
+    }
+    PHWrite(cdata, wallFace2Node, count);
+
+    //! Forth: wall face normal.
+    for (uint_t iFace = 0; iFace < nSolidFace; ++ iFace)
+    {
+        RDouble xfn0 = xfn[iFace];
+        RDouble yfn0 = yfn[iFace];
+        RDouble zfn0 = zfn[iFace];
+
+        cdata->write(&xfn0, sizeof(RDouble));
+        cdata->write(&yfn0, sizeof(RDouble));
+        cdata->write(&zfn0, sizeof(RDouble));
+    }
+}
+
+void WallStructure::Decode(DataContainer *&cdata, const bool &ifMoveToBegin)
+{
+    if (ifMoveToBegin)
+    {
+        cdata->moveto_begin();
+    }
+
+    uint_t nSolidFace;
+    PHRead(cdata, &nSolidFace, 1);
+
+    if (nSolidFace == 0)
+    {
+        //! If there are not solid cell, do nothing and return.
+        return;
+    }
+
+    PHRead(cdata, &iBlock, 1);
+
+    //! Face center.
+    xfc.resize(nSolidFace);
+    yfc.resize(nSolidFace);
+    zfc.resize(nSolidFace);
+    for (uint_t i = 0; i < nSolidFace; ++ i)
+    {
+        RDouble xc, yc, zc;
+        cdata->read(&xc, sizeof(RDouble));
+        cdata->read(&yc, sizeof(RDouble));
+        cdata->read(&zc, sizeof(RDouble));
+
+        xfc[i] = xc;
+        yfc[i] = yc;
+        zfc[i] = zc;
+    }
+
+    //! Second: points coordinates.
+    uint_t nWallPoints;
+    PHRead(cdata, &nWallPoints, 1);
+
+    if (nWallPoints == 0)
+    {
+        return;
+    }
+
+    x.resize(nWallPoints);
+    y.resize(nWallPoints);
+    z.resize(nWallPoints);
+    for (uint_t iNode = 0; iNode < nWallPoints; ++ iNode)
+    {
+        RDouble x0, y0, z0;
+        cdata->read(&x0, sizeof(RDouble));
+        cdata->read(&y0, sizeof(RDouble));
+        cdata->read(&z0, sizeof(RDouble));
+
+        x[iNode] = x0;
+        y[iNode] = y0;
+        z[iNode] = z0;
+    }
+
+    //! Third: face to node connection.
+    nPointPerFace = new int [nSolidFace];
+    PHRead(cdata, nPointPerFace, nSolidFace);
+
+    int count = 0;
+    for (int iFace = 0; iFace < nSolidFace; ++ iFace)
+    {
+        count += nPointPerFace[iFace];
+    }
+    wallFace2Node = new int [count];
+    PHRead(cdata, wallFace2Node, count);
+
+    //! Analyze node position of each face.
+    int *nodePosition = new int [nSolidFace + 1];
+    nodePosition[0] = 0;
+    int positionCount = 0;
+    for (int iFace = 0; iFace < nSolidFace; ++ iFace)
+    {
+        positionCount += nPointPerFace[iFace];
+        nodePosition[iFace + 1] = positionCount;
+    }
+    this->SetNodePosition(nodePosition);
+
+    //! Forth: wall face normal.
+    xfn.resize(nSolidFace);
+    yfn.resize(nSolidFace);
+    zfn.resize(nSolidFace);
+    for (int iFace = 0; iFace < nSolidFace; ++ iFace)
+    {
+        RDouble xfn0, yfn0, zfn0;
+        cdata->read(&xfn0, sizeof(RDouble));
+        cdata->read(&yfn0, sizeof(RDouble));
+        cdata->read(&zfn0, sizeof(RDouble));
+
+        xfn[iFace] = xfn0;
+        yfn[iFace] = yfn0;
+        zfn[iFace] = zfn0;
+    }
+
+    this->Box();
+}
+
+vector<vector<int> > & WallStructure::GetFace2NodeVector()
+{
+    if (this->face2node.size() != 0)
+    {
+        return this->face2node;
+    }
+
+    ConstructFace2Node(this->GetnPointPerFace(), this->GetWallFace2Node(), this->GetNumberOfWallFaces(), this->face2node);
+    
+    return this->face2node;
+}
+
+void WallStructure::GetFace2NodeVector(vector<int> &face2node, int faceID)
+{
+    int num = nPointPerFace[faceID];
+    face2node.resize(num);
+    int count = 0;
+    for (int iNode = nodePosition[faceID]; iNode < nodePosition[faceID + 1]; ++ iNode)
+    {
+        face2node[count ++] = wallFace2Node[iNode];
+    }
+}
+
+RDouble Pre_WalldistCompute::ComputeDistanceOfANodeToSegment(const RDouble xcc, const RDouble ycc, const RDouble zcc, 
+                                                             const RDouble xStart, const RDouble yStart, const RDouble zStart, 
+                                                             const RDouble xMid, const RDouble yMid, const RDouble zMid, 
+                                                             const RDouble xEnd, const RDouble yEnd, const RDouble zEnd)
+{
+    RDouble distance;
+    RDouble distMid, distStart, distEnd;
+    RDouble dx, dy, dz;
+    RDouble x1, y1, z1, x2, y2, z2, dist1, dist2;
+    RDouble xmin = xStart, ymin = yStart, zmin = zStart;
+    RDouble xmax = xEnd, ymax = yEnd, zmax = zEnd;
+    RDouble xHalf = xMid, yHalf = yMid, zHalf = zMid;
+
+    dx = xcc - xHalf;
+    dy = ycc - yHalf;
+    dz = zcc - zHalf;
+    distMid = SQR(dx, dy, dz);
+
+    dx = xcc - xmin;
+    dy = ycc - ymin;
+    dz = zcc - zmin;
+    distStart = SQR(dx, dy, dz);
+
+    dx = xcc - xmax;
+    dy = ycc - ymax;
+    dz = zcc - zmax;
+    distEnd = SQR(dx, dy, dz);
+
+    if (distStart < distMid)
+    {
+        return distStart;
+    }
+
+    if (distEnd < distMid)
+    {
+        return distEnd;
+    }
+
+    distance = distMid;
+    int iter = 0;
+    while (iter < 30)
+    {
+        ++ iter;
+        x1 = (xmin + xHalf) * 0.5;
+        y1 = (ymin + yHalf) * 0.5;
+        z1 = (zmin + zHalf) * 0.5;
+        dx = xcc - x1;
+        dy = ycc - y1;
+        dz = zcc - z1;
+        dist1 = SQR(dx, dy, dz);
+
+        x2 = (xmax + xHalf) * 0.5;
+        y2 = (ymax + yHalf) * 0.5;
+        z2 = (zmax + zHalf) * 0.5;
+        dx = xcc - x2;
+        dy = ycc - y2;
+        dz = zcc - z2;
+        dist2 = SQR(dx, dy, dz);
+
+        bool isInMidlle = false;
+        if (distance < dist1 && distance < dist2)
+        {
+            xmin = x1;
+            ymin = y1;
+            zmin = z1;
+            xmax = x2;
+            ymax = y2;
+            zmax = z2;
+            isInMidlle = true;    //! Do not judge if iteration is converged, if the mid-point is the shortest distance!
+        }
+        else if (dist1 < dist2)
+        {
+            xmax = xHalf;
+            ymax = yHalf;
+            zmax = zHalf;
+            xHalf = x1;
+            yHalf = y1;
+            zHalf = z1;
+            distance = dist1;
+        }
+        else
+        {
+            xmin = xHalf;
+            ymin = yHalf;
+            zmin = zHalf;
+            xHalf = x2;
+            yHalf = y2;
+            zHalf = z2;
+            distance = dist2;
+        }
+    }
+
+    return distance;
+}
+
+RDouble Pre_WalldistCompute::ComputeDistanceOfANodeToAFace(RDouble *cellCenter, RDouble *faceCenter, RDouble *faceNormal,
+                                                           const vector<int> &face2node, value_type &x, value_type &y, value_type &z)
+{
+    RDouble distance = 0.0;
+    RDouble dx = 0.0, dy = 0.0, dz = 0.0;
+    dx = cellCenter[0] - faceCenter[0];
+    dy = cellCenter[1] - faceCenter[1];
+    dz = cellCenter[2] - faceCenter[2];
+
+    //! Judge if the cellCenter at the contrary side of the face normal.
+    distance = dx * faceNormal[0] + dy * faceNormal[1] + dz * faceNormal[2];
+
+    distance = fabs(distance);
+
+    //! Projecting the cell center point on to the face plan.
+    RDouble x0 = cellCenter[0] + distance * faceNormal[0];
+    RDouble y0 = cellCenter[1] + distance * faceNormal[1];
+    RDouble z0 = cellCenter[2] + distance * faceNormal[2];
+    RDouble projectPoint[3] = {x0, y0, z0};
+
+    //! Judge if the projecting point in one of the sub-triangle or not.
+    RDouble coord1[3] = {faceCenter[0], faceCenter[1], faceCenter[2]};
+    RDouble oldCoord3[3], coord3[3];
+    RDouble oldCoord2[3], coord2[3];
+
+    RDouble distanceTolerance = 1.0e-16;
+    RDouble minDistance = LARGE;
+    uint_t numberofPointsOfTheFace = face2node.size();
+    for (int index = 0; index < numberofPointsOfTheFace; ++ index)
+    {
+        int p2 = index;
+        int p3 = (index + 1) % numberofPointsOfTheFace;
+
+        int node2 = face2node[p2];
+        int node3 = face2node[p3];
+
+        oldCoord2[0] = x[node2]; oldCoord2[1] = y[node2]; oldCoord2[2] = z[node2];
+        oldCoord3[0] = x[node3]; oldCoord3[1] = y[node3]; oldCoord3[2] = z[node3];
+        this->RotateAxis(oldCoord2, coord2);
+        this->RotateAxis(oldCoord3, coord3);
+
+        dx = coord2[0] - coord3[0];
+        dy = coord2[1] - coord3[1];
+        dz = coord2[2] - coord3[2];
+
+        RDouble xn, yn, zn, norm, xx, yy, zz, xa, xb, xc, ya, yb, yc, za, zb, zc;
+        RDouble xint, yint, zint, lamda;
+        RDouble dotp, dx1, dy1, dz1, dx2, dy2, dz2;
+        RDouble disMin = LARGE, dis;
+        bool inside = 1;
+
+        xa = coord1[0];
+        ya = coord1[1];
+        za = coord1[2];
+        xb = coord2[0];
+        yb = coord2[1];
+        zb = coord2[2];
+        xc = coord3[0];
+        yc = coord3[1];
+        zc = coord3[2];
+
+        xx = cellCenter[0];
+        yy = cellCenter[1];
+        zz = cellCenter[2];
+
+        dx1 = xb - xa;
+        dy1 = yb - ya;
+        dz1 = zb - za;
+
+        dx2 = xc - xa;
+        dy2 = yc - ya;
+        dz2 = zc - za;
+
+        xn = dy1 * dz2 - dz1 * dy2;
+        yn = dz1 * dx2 - dx1 * dz2;
+        zn = dx1 * dy2 - dy1 * dx2;
+        norm = sqrt(xn * xn + yn * yn + zn * zn);
+
+        if (norm <= distanceTolerance)
+        {
+            //! three points co-linear, do something here.
+            norm = dx1 * dx1 + dy1 * dy1 + dz1 * dz1;
+            if (norm <= distanceTolerance)
+            {
+                norm = dx2 * dx2 + dy2 * dy2 + dz2 * dz2;
+                if (norm <= distanceTolerance)
+                {
+                    //return SQR(cellCenter, coord1);
+                    minDistance = MIN(minDistance, SQR(cellCenter, coord1));
+                    continue;
+                }
+                else
+                {
+                    norm = 1. / sqrt(norm);
+                    xn = dx2 * norm; yn = dy2 * norm; zn = dz2 * norm;
+                }
+            }
+            else
+            {
+                norm = 1. / sqrt(norm);
+                xn = dx1 * norm; yn = dy1 * norm; zn = dz1 * norm;
+            }
+
+            //! now the distance from the point to the plane.
+            RDouble disa, disb, disc;
+            disa = xn * (xa - xx) + yn * (ya - yy) + zn * (za - zz);
+            disb = xn * (xb - xx) + yn * (yb - yy) + zn * (zb - zz);
+            disc = xn * (xc - xx) + yn * (yc - yy) + zn * (zc - zz);
+            if (disa * disb <= 0. || disa * disc <= 0.)
+            {
+                projectPoint[0] = xa - disa * xn;
+                projectPoint[1] = ya - disa * yn;
+                projectPoint[2] = za - disa * zn;
+                minDistance = MIN(minDistance, SQR(cellCenter, projectPoint));
+                continue;
+            }
+            else
+            {
+                disa = fabs(disa);
+                disb = fabs(disb);
+                disc = fabs(disc);
+                //! all on the same side.
+                if (disa > disb)
+                {
+                    if (disb < disc)
+                    {
+                        minDistance = MIN(minDistance, SQR(cellCenter, coord2));
+                        continue;
+                    }
+                    else
+                    {
+                        minDistance = MIN(minDistance, SQR(cellCenter, coord3));
+                        continue;
+                    }
+                }
+                else
+                {
+                    if (disa < disc)
+                    {
+                        minDistance = MIN(minDistance, SQR(cellCenter, coord1));
+                        continue;
+                    }
+                    else
+                    {
+                        minDistance = MIN(minDistance, SQR(cellCenter, coord3));
+                        continue;
+                    }
+                }
+            }
+        }
+
+        norm = 1. / norm;
+        xn *= norm;
+        yn *= norm;
+        zn *= norm;
+
+        dotp = (xa - xx) * xn + (ya - yy) * yn + (za - zz) * zn;
+
+        xint = xx + dotp * xn;
+        yint = yy + dotp * yn;
+        zint = zz + dotp * zn;
+
+        dx2 = xint - xa;
+        dy2 = yint - ya;
+        dz2 = zint - za;
+
+        dotp = (dy1 * dz2 - dz1 * dy2) * xn + (dz1 * dx2 - dx1 * dz2) * yn + (dx1 * dy2 - dy1 * dx2) * zn;
+
+        if (dotp < 0.)
+        {
+            inside = 0;
+            lamda = (dx1 * dx2 + dy1 * dy2 + dz1 * dz2) / (dx1 * dx1 + dy1 * dy1 + dz1 * dz1);
+            if (lamda >= 0. && lamda <= 1.)
+            {
+                projectPoint[0] = xa + lamda * dx1;
+                projectPoint[1] = ya + lamda * dy1;
+                projectPoint[2] = za + lamda * dz1;
+                minDistance = MIN(minDistance, SQR(cellCenter, projectPoint));
+                continue;
+            }
+            else if (lamda < 0.)
+            {
+                dis = ((xa - xx) * (xa - xx) + (ya - yy) * (ya - yy) + (za - zz) * (za - zz));
+                if (dis < disMin)
+                {
+                    projectPoint[0] = coord1[0];
+                    projectPoint[1] = coord1[1];
+                    projectPoint[2] = coord1[2];
+                    disMin = dis;
+                }
+            }
+            else
+            {
+                dis = ((xb - xx) * (xb - xx) + (yb - yy) * (yb - yy) + (zb - zz) * (zb - zz));
+                if (dis < disMin)
+                {
+                    projectPoint[0] = coord2[0];
+                    projectPoint[1] = coord2[1];
+                    projectPoint[2] = coord2[2];
+                    disMin = dis;
+                }
+            }
+        }
+
+        dx1 = xc - xb;
+        dy1 = yc - yb;
+        dz1 = zc - zb;
+
+        dx2 = xint - xb;
+        dy2 = yint - yb;
+        dz2 = zint - zb;
+
+        dotp = (dy1 * dz2 - dz1 * dy2) * xn + (dz1 * dx2 - dx1 * dz2) * yn + (dx1 * dy2 - dy1 * dx2) * zn;
+
+        if (dotp < 0.)
+        {
+            inside = 0;
+            lamda = (dx1 * dx2 + dy1 * dy2 + dz1 * dz2) / (dx1 * dx1 + dy1 * dy1 + dz1 * dz1);
+            if (lamda <= 0.) 
+            {
+                dis = ((xb - xx) * (xb - xx) + (yb - yy) * (yb - yy) + (zb - zz) * (zb - zz));
+                if (dis < disMin)
+                {
+                    projectPoint[0] = coord2[0];
+                    projectPoint[1] = coord2[1];
+                    projectPoint[2] = coord2[2];
+                    disMin = dis;
+                }
+            }
+            else if (lamda >= 1.)
+            {
+                dis = ((xc - xx) * (xc - xx) + (yc - yy) * (yc - yy) + (zc - zz) * (zc - zz));
+                if (dis < disMin)
+                {
+                    projectPoint[0] = coord3[0];
+                    projectPoint[1] = coord3[1];
+                    projectPoint[2] = coord3[2];
+                    disMin = dis;
+                }
+            }
+            else
+            {
+                projectPoint[0] = xb + lamda * dx1;
+                projectPoint[1] = yb + lamda * dy1;
+                projectPoint[2] = zb + lamda * dz1;
+
+                minDistance = MIN(minDistance, SQR(cellCenter, projectPoint));
+                continue;
+            }
+        }
+
+        dx1 = xa - xc;
+        dy1 = ya - yc;
+        dz1 = za - zc;
+        dx2 = xint - xc;
+        dy2 = yint - yc;
+        dz2 = zint - zc;
+
+        dotp = (dy1 * dz2 - dz1 * dy2) * xn + (dz1 * dx2 - dx1 * dz2) * yn + (dx1 * dy2 - dy1 * dx2) * zn;
+
+        if (dotp < 0.)
+        {
+            inside = 0;
+            lamda = (dx1 * dx2 + dy1 * dy2 + dz1 * dz2) / (dx1 * dx1 + dy1 * dy1 + dz1 * dz1);
+            if (lamda <= 0.)
+            {
+                dis = ((xc - xx) * (xc - xx) + (yc - yy) * (yc - yy) + (zc - zz) * (zc - zz));
+                if (dis < disMin)
+                {
+                    projectPoint[0] = coord3[0];
+                    projectPoint[1] = coord3[1];
+                    projectPoint[2] = coord3[2];
+                    disMin = dis;
+                }
+            } 
+            else if (lamda >= 1.)
+            {
+                dis = ((xa - xx) * (xa - xx) + (ya - yy) * (ya - yy) + (za - zz) * (za - zz));
+                if (dis < disMin)
+                {
+                    projectPoint[0] = coord1[0];
+                    projectPoint[1] = coord1[1];
+                    projectPoint[2] = coord1[2];
+                    disMin = dis;
+                }
+            }
+            else
+            {
+                projectPoint[0] = xc + lamda * dx1;
+                projectPoint[1] = yc + lamda * dy1;
+                projectPoint[2] = zc + lamda * dz1;
+
+                minDistance = MIN(minDistance, SQR(cellCenter, projectPoint));
+                continue;
+            }
+        }
+
+        if (inside)
+        {
+            projectPoint[0] = xint;
+            projectPoint[1] = yint;
+            projectPoint[2] = zint;
+        }
+        minDistance = MIN(minDistance, SQR(cellCenter, projectPoint));
+
+    }  //! loop over face nodes.
+
+    if (minDistance >= 1.0e30)
+    {
+        TK_Exit::ExceptionExit("minDistance >= 1.0e30 during wall distance computing!\n");
+    }
+    return minDistance;
+}
+
+void Pre_WalldistCompute::ComputeNodeDistanceByDirectMethod()
+{
+    int nZones = PHMPI::GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int zoneProcessor = PHMPI::GetZoneProcessorIDSepMode(iZone);
+        if (myid == zoneProcessor)
+        {
+            Grid *grid = GetGrid(iZone, this->level);
+
+            UnstructGrid *unstructGrid = UnstructGridCast(grid);
+
+            ComputeNodeDistanceByDirectMethod(unstructGrid);
+        }
+    }
+}
+
+void Pre_WalldistCompute::ComputeNodeDistanceByDirectMethod(UnstructGrid *grid)
+{
+    int numberOfNodes = grid->GetNTotalNode();
+
+    int blockIndexOfGrid = grid->GetIBlock();
+
+    RDouble *nodeCoordinateX = grid->GetX();
+    RDouble *nodeCoordinateY = grid->GetY();
+    RDouble *nodeCoordinateZ = grid->GetZ();
+
+    vector<RDouble> &nodeWalldistDistance = grid->GetNodeWallDist();
+
+    nodeWalldistDistance.resize(numberOfNodes);
+
+    SetField(nodeWalldistDistance, LARGE, numberOfNodes);
+
+    int numberOfWallStructureInPresentBlock = 0;
+
+    for (unsigned int iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+    {
+        WallStructure *wallStructure = (*wallstructureList)[iWall];
+
+        int blockIndexOfWall = wallStructure->GetIBlock();
+
+        if (blockIndexOfWall != blockIndexOfGrid)
+        {
+            continue;
+        }
+
+        numberOfWallStructureInPresentBlock ++;
+
+        WallStructure::value_type &wallNodeCoordinateX = wallStructure->GetX();
+        WallStructure::value_type &wallNodeCoordinateY = wallStructure->GetY();
+        WallStructure::value_type &wallNodeCoordinateZ = wallStructure->GetZ();
+
+        for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+        {
+            for (unsigned int iWallNode = 0; iWallNode < wallStructure->GetNumberOfWallPoints(); ++ iWallNode)
+            {
+                RDouble dx = nodeCoordinateX[iNode] - wallNodeCoordinateX[iWallNode];
+                RDouble dy = nodeCoordinateY[iNode] - wallNodeCoordinateY[iWallNode];
+                RDouble dz = nodeCoordinateZ[iNode] - wallNodeCoordinateZ[iWallNode];
+                RDouble dis = DISTANCE(dx, dy, dz);
+
+                nodeWalldistDistance[iNode] = MIN(dis , nodeWalldistDistance[iNode]);
+            }
+        }
+    }
+
+    if (numberOfWallStructureInPresentBlock == 0)
+    {
+        RDouble dist = GlobalDataBase::GetDoubleParaFromDB("walldistMainZone");
+        RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+
+        SetField(nodeWalldistDistance, dist / gridScaleFactor, numberOfNodes);
+
+        return;
+    }
+}
+
+void Pre_WalldistCompute::ComputeNodeDistanceForSphere(UnstructGrid *grid)
+{
+    int numberOfNodes = grid->GetNTotalNode();
+
+    int blockIndexOfGrid = grid->GetIBlock();
+
+    RDouble *nodeCoordinateX = grid->GetX();
+    RDouble *nodeCoordinateY = grid->GetY();
+    RDouble *nodeCoordinateZ = grid->GetZ();
+
+    vector<RDouble> &nodeWalldistDistance = grid->GetNodeWallDist();
+
+    nodeWalldistDistance.resize(numberOfNodes);
+
+    SetField(nodeWalldistDistance, LARGE, numberOfNodes);
+
+    int numberOfWallStructureInPresentBlock = 0;
+
+    for (unsigned int iWall = 0; iWall < wallstructureList->size(); ++ iWall)
+    {
+        WallStructure *wallStructure = (*wallstructureList)[iWall];
+
+        int blockIndexOfWall = wallStructure->GetIBlock();
+
+        if (blockIndexOfWall != blockIndexOfGrid)
+        {
+            continue;
+        }
+
+        numberOfWallStructureInPresentBlock ++;
+    }
+
+    if (numberOfWallStructureInPresentBlock == 0)
+    {
+        RDouble dist = GlobalDataBase::GetDoubleParaFromDB("walldistMainZone");
+        RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+
+        SetField(nodeWalldistDistance, dist / gridScaleFactor, numberOfNodes);
+
+        return;
+    }
+
+    for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        RDouble xc = 0.0;
+        RDouble yc = 0.0;
+        RDouble zc = 0.0;
+
+        if (blockIndexOfGrid == 2)
+        {
+            yc += 1.4;
+        }
+        else if (blockIndexOfGrid == 3)
+        {
+            yc -= 1.4;
+        }
+        else if (blockIndexOfGrid == 4)
+        {
+            xc -= 1.4;
+        }
+        else if (blockIndexOfGrid == 5)
+        {
+            xc += 1.4;
+        }
+
+        RDouble dx = nodeCoordinateX[iNode] - xc;
+        RDouble dy = nodeCoordinateY[iNode] - yc;
+        RDouble dz = nodeCoordinateZ[iNode] - zc;
+
+        nodeWalldistDistance[iNode] = DISTANCE(dx, dy, dz) - 0.5;
+    }
+}
+
+void Pre_WalldistCompute::ComputeNodeDistanceByADTMethod()
+{
+    TimeSpan *timeSpan = new TimeSpan();
+    using namespace PHMPI;
+
+    int nLocalZones = GetNumberofLocalZones();
+
+    //! Set initial value.
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        UnstructGrid *grid = UnstructGridCast(GetGrid(zoneID, this->level));
+
+        vector<RDouble> &nodeWallDis = grid->GetNodeWallDist();
+
+        int numberOfNodes = grid->GetNTotalNode();
+
+        nodeWallDis.resize(numberOfNodes);
+
+        SetField(&nodeWallDis[0], LARGE, numberOfNodes);
+    }
+
+    int nBlocks = GlobalDataBase::GetIntParaFromDB("numberOfGridGroups");
+
+    for (int iBlock = 0; iBlock < nBlocks; ++ iBlock)
+    {
+        PrintToWindow("\n    Computing Wall dist for block: ", iBlock, "\n\n");
+        ComputeNodeDistanceByADTMethodForBlock(iBlock);
+    }
+    timeSpan->ShowTimeSpanToLogFile("Compute Node Distance By ADT Method");
+    delete timeSpan;
+}
+
+void Pre_WalldistCompute::ComputeNodeDistanceByKDTreeMethod()
+{
+    TimeSpan *timeSpan = new TimeSpan();
+
+    using namespace PHMPI;
+
+    int nLocalZones = GetNumberofLocalZones();
+
+    //! Set initial value.
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        UnstructGrid * grid = UnstructGridCast(GetGrid(zoneID, this->level));
+
+        vector<RDouble> & nodeWallDis = grid->GetNodeWallDist();
+
+        int numberOfNodes = grid->GetNTotalNode();
+
+        nodeWallDis.resize(numberOfNodes);
+
+        SetField(&nodeWallDis[0], LARGE, numberOfNodes);
+    }
+
+    ComputeNodeDistanceByKDTreeMethodForBlock();
+
+    timeSpan->ShowTimeSpanToLogFile("Compute Node Distance By KDTree Method");
+    delete timeSpan;
+}
+
+void Pre_WalldistCompute::ComputeNodeDistanceByKDTreeMethodInOtherBlock()
+{
+    using namespace PHMPI;
+
+    int nLocalZones = GetNumberofLocalZones();
+
+    //! Set initial value.
+    for (int izone = 0; izone < nLocalZones; ++ izone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(izone);
+
+        UnstructGrid * grid = UnstructGridCast(GetGrid(zoneID, this->level));
+
+        vector<RDouble> &nodeWallDistanceInOtherBlock = grid->GetNodeWallDistInOtherBlock();
+
+        int numberOfNodes = grid->GetNTotalNode();
+
+        nodeWallDistanceInOtherBlock.resize(numberOfNodes);
+
+        SetField(&nodeWallDistanceInOtherBlock[0], LARGE, numberOfNodes);
+    }
+
+    ComputeNodeDistanceByKDTreeMethodForBlockInOtherBlock();
+}
+
+void Pre_WalldistCompute::ComputeNodeDistanceByKDTreeMethodForBlock()
+{
+    using namespace PHMPI;
+
+    int nDim = 3;
+
+    int nLocalZones = GetNumberofLocalZones();
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        UnstructGrid *grid = UnstructGridCast(GetGrid(zoneID, this->level));
+        int iBlock = grid->GetIBlock();
+        this->presentBlock = iBlock;
+
+        if (!wallNodeKDTree)
+        {
+            wallNodeKDTree = CreatKDTree(nDim);
+        }
+        BuildWallStructKDTreeNode();
+
+        ostringstream oss;
+        oss << "  iBlock = " << iBlock << " nTWallFace = " << nTWallFace;
+        WriteLogFile(oss);
+
+        vector<RDouble> &nodeWalldist = grid->GetNodeWallDist();
+
+        int nTotalNode = grid->GetNTotalNode();
+
+        //! if nTWallFace = 0, this must be the main back ground block
+        if (nTWallFace == 0)
+        {
+            RDouble dist = GlobalDataBase::GetDoubleParaFromDB("walldistMainZone");
+            RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+
+            SetField(nodeWalldist, dist / gridScaleFactor, nTotalNode);
+
+            continue;
+        }
+
+        RDouble *x = grid->GetX();
+        RDouble *y = grid->GetY();
+        RDouble *z = grid->GetZ();
+
+        PrintToWindow("  Wall distance computing for zone: ", iZone, "\n");
+        WriteLogFile("  Wall distance computing for zone: ", iZone);
+
+        ComputeNodeWallDist3DByKDTreeMethod(nTotalNode, x, y, z, &nodeWalldist[0]);
+
+        if (wallNodeKDTree)
+        {
+            delete wallNodeKDTree;
+            wallNodeKDTree = 0;
+        }
+    }
+}
+
+void Pre_WalldistCompute::ComputeNodeDistanceByKDTreeMethodForBlockInOtherBlock()
+{
+    using namespace PHMPI;
+
+    int nDim = 3;
+
+    int nLocalZones = GetNumberofLocalZones();
+
+    for (int izone = 0; izone < nLocalZones; ++ izone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(izone);
+
+        UnstructGrid *grid = UnstructGridCast(GetGrid(zoneID, this->level));
+        presentBlock = grid->GetIBlock();
+
+        wallNodeKDTree = CreatKDTree(nDim);
+        BuildWallStructKDTreeNodeInOtherBlock();
+
+        vector<RDouble> &nodeWalldist = grid->GetNodeWallDistInOtherBlock();
+
+        int nTotalNode = grid->GetNTotalNode();
+
+        RDouble *x = grid->GetX();
+        RDouble *y = grid->GetY();
+        RDouble *z = grid->GetZ();
+
+        ComputeNodeWallDist3DByKDTreeMethod(nTotalNode, x, y, z, &nodeWalldist[0]);
+
+        if (wallNodeKDTree)
+        {
+            delete wallNodeKDTree;
+            wallNodeKDTree = 0;
+        }
+    }
+}
+
+void Pre_WalldistCompute::ComputeNodeDistanceByADTMethodForBlock(int iBlock)
+{
+    using namespace PHMPI;
+
+    int nLocalZones = GetNumberofLocalZones();
+
+    this->presentBlock = iBlock;
+
+    this->rotateAxis = 0;
+
+    while (!IsNodeWalldistComputOver())
+    {
+        PrintToWindow("Wall dist computing for axis: ", this->rotateAxis, "\n");
+
+        BuildWallStructTree();
+
+        ostringstream oss;
+        oss << " iBlock = " << iBlock << " nTWallFace = " << nTWallFace << "\n";
+        WriteLogFile(oss);
+
+        for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+        {
+            int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+            UnstructGrid *grid = UnstructGridCast(GetGrid(zoneID, this->level));
+
+            if (grid->GetIBlock()!= presentBlock)
+            {
+                continue;
+            }
+
+            vector<RDouble> &nodeWalldist = grid->GetNodeWallDist();
+
+            int nTotalNode = grid->GetNTotalNode();
+
+            //! if nTWallFace = 0, this must be the main back ground block
+            if (nTWallFace == 0)
+            {
+                RDouble dist = GlobalDataBase::GetDoubleParaFromDB("walldistMainZone");
+                RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+
+                SetField(nodeWalldist, dist / gridScaleFactor, nTotalNode);
+
+                continue;
+            }
+            
+            RDouble *x = grid->GetX();
+            RDouble *y = grid->GetY();
+            RDouble *z = grid->GetZ();
+
+            ComputeNodeWallDist3DByProjectingFast(nTotalNode, x, y, z, &nodeWalldist[0]);
+        }
+        
+        ++ this->rotateAxis;
+
+        delete wallFaceTree;
+
+        wallFaceTree = 0;
+
+        if (this->rotateAxis == 5) break;
+    }
+}
+
+LIB_EXPORT void Pre_WalldistCompute::ComputeWallDistForNodesList(int blockIndex, int nTotalNode, RDouble *x,  RDouble *y, RDouble *z,  RDouble *dist)
+{
+    if (walldistComputeMethod == FAST_METHOD || walldistComputeMethod == SUPER_FAST_METHOD)
+    {
+        ComputeWallDistForNodesListByADT(blockIndex, nTotalNode, x, y, z, dist);
+    }
+    else
+    {
+        //ComputeWallDistForNodesListByDirectMethod(blockIndex, nTotalNode, x, y, z, dist);
+        ComputeWallDistForNodesListByKDT(blockIndex, nTotalNode, x, y, z, dist);
+    }
+}
+
+void Pre_WalldistCompute::ComputeWallDistForNodesListByDirectMethod(int blockIndex, int nTotalNode, RDouble *x,  RDouble *y, RDouble *z,  RDouble *dist)
+{
+    uint_t numberOfWalls = wallstructureList->size();
+
+    int numberOfWallStructureInPresentBlock = 0;
+
+    for (int iWall = 0; iWall < numberOfWalls; ++ iWall)
+    {
+        int iBlockOfWall = (*wallstructureList)[iWall]->GetIBlock();
+
+        if (iBlockOfWall != blockIndex)
+        {
+            continue;
+        }
+
+        numberOfWallStructureInPresentBlock ++;
+
+        vector<RDouble> wallFaceCoordinateX = (*wallstructureList)[iWall]->GetXFaceCenter();
+        vector<RDouble> wallFaceCoordinateY = (*wallstructureList)[iWall]->GetYFaceCenter();
+        vector<RDouble> wallFaceCoordinateZ = (*wallstructureList)[iWall]->GetZFaceCenter();
+
+        uint_t numberOfWallFace = (*wallstructureList)[iWall]->GetNumberOfWallFaces();
+
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            for (int iWallFace = 0; iWallFace < numberOfWallFace; ++ iWallFace)
+            {
+                RDouble dx = x[iNode] - wallFaceCoordinateX[iWallFace];
+                RDouble dy = y[iNode] - wallFaceCoordinateY[iWallFace];
+                RDouble dz = z[iNode] - wallFaceCoordinateZ[iWallFace];
+                RDouble dis = DISTANCE(dx, dy, dz);
+
+                dist[iNode] = MIN(dis, dist[iNode]);
+            }
+        }
+    }
+
+    if (numberOfWallStructureInPresentBlock == 0)
+    {
+        RDouble distByfile = GlobalDataBase::GetDoubleParaFromDB("walldistMainZone");
+        RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+
+        SetField(dist, distByfile / gridScaleFactor, nTotalNode);
+    }
+}
+
+void Pre_WalldistCompute::ComputeWallDistForNodesListForSphere(int blockIndex, int nTotalNode, RDouble *x,  RDouble *y, RDouble *z,  RDouble *dist)
+{
+    uint_t numberOfWalls = wallstructureList->size();
+
+    int numberOfWallStructureInPresentBlock = 0;
+
+    for (int iWall = 0; iWall < numberOfWalls; ++ iWall)
+    {
+        int iBlockOfWall = (*wallstructureList)[iWall]->GetIBlock();
+
+        if (iBlockOfWall != blockIndex)
+        {
+            continue;
+        }
+
+        numberOfWallStructureInPresentBlock ++;
+    }
+
+    if (numberOfWallStructureInPresentBlock == 0)
+    {
+        RDouble distByfile = GlobalDataBase::GetDoubleParaFromDB("walldistMainZone");
+        RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+        SetField(dist, distByfile / gridScaleFactor, nTotalNode);
+        return;
+    }
+
+    RDouble minDist = LARGE;
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        RDouble xc = 0.0;
+        RDouble yc = 0.0;
+        RDouble zc = 0.0;
+
+        if (blockIndex == 2)
+        {
+            yc += 1.4;
+        }
+        else if (blockIndex == 3)
+        {
+            yc -= 1.4;
+        }
+        else if (blockIndex == 4)
+        {
+            xc -= 1.4;
+        }
+        else if (blockIndex == 5)
+        {
+            xc += 1.4;
+        }
+
+        RDouble dx = x[iNode] - xc;
+        RDouble dy = y[iNode] - yc;
+        RDouble dz = z[iNode] - zc;
+
+        dist[iNode] = DISTANCE(dx, dy, dz) - 0.5;
+
+        minDist = MIN(minDist, dist[iNode]);
+    }
+
+    ostringstream oss;
+    oss << "For block : " << blockIndex << "Min dist = " << minDist << endl;
+    WriteLogFile(oss.str());
+}
+
+void Pre_WalldistCompute::ComputeWallDistForNodesListByADT(int blockIndex, int nTotalNode, RDouble *x,  RDouble *y, RDouble *z,  RDouble *dist)
+{
+    using namespace PHMPI;
+
+    this->presentBlock = blockIndex;
+
+    this->rotateAxis = 0;
+
+    bool cycle = true;
+
+    while (cycle)
+    {
+        PrintToWindow("Wall dist computing for axis: ", this->rotateAxis, "\n");
+
+        BuildWallStructTree();
+
+        //! If nTWallFace = 0, this must be the main back ground block.
+        if (nTWallFace == 0)
+        {
+            RDouble distByFile = GlobalDataBase::GetDoubleParaFromDB("walldistMainZone");
+            RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+
+            SetField(dist, distByFile / gridScaleFactor, nTotalNode);
+
+            break;
+        }
+        
+        ComputeNodeWallDist3DByProjectingFast(nTotalNode, x, y, z, dist);
+        
+        ++ this->rotateAxis;
+
+        delete wallFaceTree;
+
+        wallFaceTree = 0;
+
+        if (this->rotateAxis == 5) break;
+
+        cycle = false;
+
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            if (dist[iNode] >= LARGE * 0.9)
+            {
+                cycle = true;
+                break;
+            }
+        }
+    }
+}
+
+void Pre_WalldistCompute::ComputeWallDistForNodesListByKDT(int blockIndex, int nTotalNode, RDouble *x, RDouble *y, RDouble *z, RDouble *dist)
+{
+    using namespace PHMPI;
+
+    int nDim = 3;
+
+    this->presentBlock = blockIndex;
+
+    bool cycle = true;
+
+    while (cycle)
+    {
+        if (!wallNodeKDTree)
+        {
+            wallNodeKDTree = CreatKDTree(nDim);
+        }
+        BuildWallStructKDTreeNode();
+
+        //! If nTWallFace = 0, this must be the main back ground block.
+        if (nTWallFace == 0)
+        {
+            RDouble distByFile = GlobalDataBase::GetDoubleParaFromDB("walldistMainZone");
+            RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+
+            SetField(dist, distByFile / gridScaleFactor, nTotalNode);
+
+            break;
+        }
+
+        ComputeNodeWallDist3DByKDTreeMethod(nTotalNode, x, y, z, dist);
+
+        if (wallNodeKDTree)
+        {
+            delete wallNodeKDTree;
+            wallNodeKDTree = 0;
+        }
+
+        cycle = false;
+
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            if (dist[iNode] >= LARGE * 0.9)
+            {
+                cycle = true;
+                break;
+            }
+        }
+    }
+}
+
+vector<WallStructure *> * Pre_WalldistCompute::GetWallstructureList()
+{
+    return wallstructureList;
+};
+
+void GenerateWalldist()
+{
+    if (GetTaskCode() == HO_SOLVER) return;
+    
+    if (PHMPI::CurrentProcessorIsGridProcessor())
+    {
+        return;
+    }
+
+    int viscousType = 0;
+    GlobalDataBase::GetData("viscousType", &viscousType, PHINT, 1);
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+    int nIsComputeWallDist = GlobalDataBase::GetIntParaFromDB("nIsComputeWallDist");    //! just for laminar or Euler flow.  by dms
+
+    int sysGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if(viscousType > 1 || sysGridType != STRUCTGRID)    //! turbulence flow  or not STRUCTGRID
+    {
+        nIsComputeWallDist = 0;
+    }
+
+    if (GetTaskCode() == CAL_WALL_DIST || (viscousType != INVISCID && IsReadWalldist() == false))
+    {
+        if(nIsComputeWallDist == 0)
+        {
+            AllocateWalldist();
+
+            ComputeWalldist();
+
+            WriteWalldist();
+        }
+        //VisualWalldist();
+    }
+
+    if (viscousType > LAMINAR || iLES == LES_SOLVER)
+    {
+        WalldistStatics();
+    }
+
+    if (viscousType != INVISCID)
+    {
+        CompMaxBoundaryLayerWalldist();
+    }
+}
+
+void CompMaxBoundaryLayerWalldist()
+{
+    RDouble globalMaxBoundaryLayerWalldist = -1.0;
+    if (!IsBoundaryLayerExist())
+    {
+        GlobalDataBase::UpdateData("maxBoundaryLayerWalldist", &globalMaxBoundaryLayerWalldist, PHDOUBLE, 1);
+        return;
+    }
+
+    int dimension = GetDim();
+    RDouble maxBoundaryLayerWalldist = - LARGE;
+
+    int myid   = PHMPI::GetCurrentProcessorID();
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int procID = PHMPI::GetZoneProcessorID(iZone);
+        if (myid == procID)
+        {
+            Grid *grid0 = GetGrid(iZone, 0);
+            if (grid0->Type() == STRUCTGRID)
+            {
+                continue;
+            }
+
+            UnstructGrid *grid = UnstructGridCast(grid0);
+            int nTotalCell = grid->GetNTotalCell();
+            int *nodeNumOfEachCell = grid->GetNodeNumberOfEachCell();
+            RDouble *allWallDist = grid->GetWallDist();
+
+            for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+            {
+                int nodeNum = nodeNumOfEachCell[iCell];
+                int cellType = GetCellType(dimension, nodeNum);
+                if ((dimension == THREE_D && (cellType == TETRA_4 || cellType == PYRA_5))
+                 || (dimension == TWO_D   && cellType == TRI_3))
+                {
+                    continue;
+                }
+
+                RDouble dist = allWallDist[iCell];
+                if (dist > maxBoundaryLayerWalldist)
+                {
+                    maxBoundaryLayerWalldist = dist;
+                }
+            }
+        }
+    }
+
+    PH_AllReduce(&maxBoundaryLayerWalldist, &globalMaxBoundaryLayerWalldist, 1, MPI_MAX);
+    GlobalDataBase::UpdateData("maxBoundaryLayerWalldist", &globalMaxBoundaryLayerWalldist, PHDOUBLE, 1);
+}
+
+bool IsBoundaryLayerExist()
+{
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    int myid   = PHMPI::GetCurrentProcessorID();
+    int dimension = GetDim();
+
+    set < int > cellTypeSet;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int procID = PHMPI::GetZoneProcessorID(iZone);
+        if (myid == procID)
+        {
+            Grid *grid0 = GetGrid(iZone, 0);
+            if (grid0->Type() == STRUCTGRID)
+            {
+                continue;
+            }
+
+            UnstructGrid *grid = UnstructGridCast(grid0);
+            int nTotalCell = grid->GetNTotalCell();
+            int *nodeNumOfEachCell = grid->GetNodeNumberOfEachCell();
+
+            for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+            {
+                int nodeNum = nodeNumOfEachCell[iCell];
+                int cellType = GetCellType(dimension, nodeNum);
+                if (cellType == -1)
+                {
+                    return false;
+                }
+                cellTypeSet.insert(cellType);
+            }
+        }
+    }
+
+    int localCellTypeSize = static_cast<int>(cellTypeSet.size());
+    int globalCellTypeSize = 0;
+    PH_AllReduce(&localCellTypeSize, &globalCellTypeSize, 1, MPI_MAX);
+
+    if (globalCellTypeSize > 1)
+    {
+        return true;
+    }
+
+    return false;
+}
+
+bool IsReadWalldist()
+{
+    using namespace PHMPI;
+
+    int nZones = GetNumberofGlobalZones();
+    int myid   = GetCurrentProcessorID();
+
+    int isWDTExist = 0;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int procID = GetZoneProcessorID(iZone);
+
+        if (!CurrentProcessorIsGridProcessor())
+        {
+            if (myid == procID)
+            {
+                Grid *grid0 = GetGrid(iZone, 0);
+                if (grid0->Type() == UNSTRUCTGRID)
+                {
+                    UnstructGrid *grid = UnstructGridCast(grid0);
+                    if (grid->GetWallDist()) isWDTExist = 1;
+                }
+                else
+                {
+                    StructGrid *grid = StructGridCast(grid0);
+                    if (grid->GetWallDist()) isWDTExist = 1;
+                }
+            }
+        }
+    }
+
+    PH_CompareMaxMin(isWDTExist, 1);
+
+    if (isWDTExist == 1)
+    {
+        return true;
+    }
+
+    return false;
+}
+
+void ComputeWalldist()
+{
+    int walldistMethod;
+    GlobalDataBase::GetData("walldistMethod", &walldistMethod, PHINT, 1);
+
+    int level = 0;
+
+    Pre_WalldistCompute walldistCompute(walldistMethod, level);
+
+    walldistCompute.Run();
+}
+
+void AllocateWalldist()
+{
+    ActionKey *actkey = new ActionKey();
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    int myid = GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int proc = GetZoneProcessorIDSepMode(iZone);
+
+        if (myid == proc)
+        {
+            Grid *grid = GetGrid(iZone, actkey->level);
+            grid->AllocateWalldist();
+        }
+    }
+    delete actkey;    actkey = nullptr;
+}
+
+#ifdef USE_TecplotLib
+void VisualWalldist()
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    ostringstream oss;
+    oss << "x y z dist";
+
+    string Variable = oss.str();
+    const char *Variables = Variable.c_str();
+
+    string filename = "./in/WallDistVisual.plt";
+    const char *pltname = filename.c_str();
+
+    INTEGER4 Debug     = 1;
+    INTEGER4 VIsDouble = 0;
+    INTEGER4 FileType  = 0;
+    INTEGER4 I;
+
+    I = TECINI112((char*)"PHengLEI Grid Videotex",
+                  (char*)Variables,
+                  (char*)pltname,
+                  (char*)".",
+                  &FileType,
+                  &Debug,
+                  &VIsDouble);
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+        UnstructGrid *grid = UnstructGridCast(GetGrid(zoneID, 0));
+
+        INTEGER4 IMxOrNumPts, JMxOrNumElements, KMxOrNumFaces;
+        INTEGER4 ZoneType;
+
+        IMxOrNumPts = grid->GetNTotalNode();
+        JMxOrNumElements = grid->GetNTotalCell();
+        KMxOrNumFaces = grid->GetNTotalFace();
+
+        int dimension = grid->GetDim();
+
+        if (dimension == 2)
+        {
+            ZoneType = 6;
+        }
+        else
+        {
+            ZoneType = 7;
+        }
+
+        int GridID = grid->GetGridID()->GetIndex();
+
+        RDouble *x = grid->GetX();
+        RDouble *y = grid->GetY();
+        RDouble *z = grid->GetZ();
+
+        INTEGER4 ValueLocation[4] = {1, 1, 1, 0};
+
+        INTEGER4 ICellMax           = 0;
+        INTEGER4 JCellMax           = 0;
+        INTEGER4 KCellMax           = 0;
+        double   SolutionTime       = 0.0;
+        INTEGER4 StrandID           = 0;
+        INTEGER4 ParentZone         = 0;
+        INTEGER4 IsBlock            = 1;
+        INTEGER4 NumFaceConnections = 0;
+        INTEGER4 FaceNeighborMode   = 0;
+
+        INTEGER4 TotalNumFaceNodes_Rect = 0;
+
+        //int * cell2node = grid->GetCell2Node();
+
+        int *faceNodeNumberContainer = grid->GetNodeNumberOfEachFace();
+        int *faceNodeIndexContainer  = grid->GetFace2Node();
+    
+        for (int iFace = 0; iFace < KMxOrNumFaces; ++ iFace)
+        {
+            TotalNumFaceNodes_Rect += faceNodeNumberContainer[iFace];
+        }
+
+        INTEGER4 *FaceNodes_Rect = new INTEGER4[TotalNumFaceNodes_Rect];
+        for (INTEGER4 i = 0; i < TotalNumFaceNodes_Rect; ++ i)
+        {
+            FaceNodes_Rect[i] = faceNodeIndexContainer[i] + 1;
+        }
+
+        INTEGER4 NumConnBndryFaces_Rect  = 0;    /* interface */
+        INTEGER4 TotalNumBndryConns_Rect = 0;
+        INTEGER4 SharConn                = 0;
+
+        ostringstream oss;
+
+        //Zonetitle = Zone + zonenum;
+        oss << "Zone"<< GridID;
+    
+        //const char * ZoneTitle = Zonetitle.c_str();
+        string Zonetitle = oss.str();
+        const char *ZoneTitle = Zonetitle.c_str();
+
+        I = TECZNE112((char*)ZoneTitle,
+                          &ZoneType,
+                          &IMxOrNumPts,
+                          &JMxOrNumElements,
+                          &KMxOrNumFaces,
+                          &ICellMax,
+                          &JCellMax,
+                          &KCellMax,
+                          &SolutionTime,
+                          &StrandID,
+                          &ParentZone,
+                          &IsBlock,
+                          &NumFaceConnections,
+                          &FaceNeighborMode,
+                          &TotalNumFaceNodes_Rect,
+                          &NumConnBndryFaces_Rect,
+                          &TotalNumBndryConns_Rect,
+                          NULL,
+                          ValueLocation,
+                          NULL,
+                          &SharConn);
+
+        INTEGER4 IsDouble = 1;
+        I = TECDAT112(&IMxOrNumPts, x, &IsDouble);
+        I = TECDAT112(&IMxOrNumPts, y, &IsDouble);
+        I = TECDAT112(&IMxOrNumPts, z, &IsDouble);
+
+        RDouble *walldist = grid->GetWallDist();
+        I = TECDAT112(&JMxOrNumElements, walldist, &IsDouble);
+
+        INTEGER4 *FaceLeftElems  = new INTEGER4[KMxOrNumFaces];
+        INTEGER4 *FaceRightElems = new INTEGER4[KMxOrNumFaces];
+
+        int *leftCellIndexContainer  = grid->GetLeftCellOfFace();
+        int *rightCellIndexContainer = grid->GetRightCellOfFace();
+
+        for (INTEGER4 iFace = 0; iFace < KMxOrNumFaces; ++ iFace)
+        {
+            FaceLeftElems [iFace] = leftCellIndexContainer [iFace] + 1;
+            FaceRightElems[iFace] = rightCellIndexContainer[iFace] + 1;
+            if (FaceRightElems[iFace] > JMxOrNumElements || FaceRightElems[iFace] < 0) FaceRightElems[iFace] = 0;
+            if (FaceLeftElems[iFace] > JMxOrNumElements || FaceLeftElems[iFace] < 0) FaceLeftElems[iFace] = 0;
+        }
+
+        INTEGER4 FaceBndryConnectionCounts = 0;
+                 INTEGER4 FaceBndryConnectionElems = 0;
+                 INTEGER4 FaceBndryConnectionZones = 0;
+
+        I = TECPOLY112(faceNodeNumberContainer,
+                       FaceNodes_Rect,
+                       FaceLeftElems,
+                       FaceRightElems,
+                       &FaceBndryConnectionCounts,
+                       &FaceBndryConnectionElems,
+                       &FaceBndryConnectionZones);
+
+        delete [] FaceLeftElems;
+        delete [] FaceRightElems;
+        delete [] FaceNodes_Rect;
+    }
+
+    I = TECEND112();
+}
+#endif
+
+void WriteWalldist()
+{
+    string walldistfile = "walldist.dat";
+    GlobalDataBase::GetData("walldistfile", &walldistfile, PHSTRING, 1);
+
+    ActionKey *actkey = new ActionKey();
+    actkey->filename = (walldistfile);
+
+    ParallelCreateHDF5File(actkey);
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int send_proc = GetZoneProcessorID(iZone);
+        int recv_proc = GetZoneFileID(iZone);
+
+        int myid = GetCurrentProcessorID();
+        int tag = GetSendRecvTag(actkey, iZone);
+
+        if (myid == send_proc)
+        {
+            Grid *grid = GetGrid(iZone, 0);
+            grid->DumpWalldist(actkey);
+        }
+
+        PH_Trade(actkey, send_proc, recv_proc, tag);
+
+        if (myid == recv_proc)
+        {
+            DumpWalldistToFile(actkey, iZone);
+        }
+    }
+
+    ParallelCloseHDF5File(actkey);
+    delete actkey;    actkey = nullptr;
+}
+
+void DumpWalldistToFile(ActionKey *actkey, int iZone)
+{
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+
+    int nTotalCell = 0;
+    cdata->read(&nTotalCell, sizeof(int));
+
+    RDouble *walldist = new RDouble[nTotalCell];
+    cdata->read(walldist, sizeof(RDouble) * nTotalCell);
+    RDouble *nearestwallfacenormalx = new RDouble[nTotalCell];
+    cdata->read(nearestwallfacenormalx, sizeof(RDouble) * nTotalCell);
+    RDouble *nearestwallfacenormaly = new RDouble[nTotalCell];
+    cdata->read(nearestwallfacenormaly, sizeof(RDouble) * nTotalCell);
+    RDouble *nearestwallfacenormalz = new RDouble[nTotalCell];
+    cdata->read(nearestwallfacenormalz, sizeof(RDouble) * nTotalCell);
+
+    ostringstream oss;
+    oss << "Grid-" << iZone;
+    string dataName = oss.str();
+
+    double *wdt = new double[nTotalCell];
+    double *nwfnx = new double[nTotalCell];
+    double *nwfny = new double[nTotalCell];
+    double *nwfnz = new double[nTotalCell];
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        wdt[iCell] = static_cast<double>(walldist[iCell]);
+        nwfnx[iCell] = static_cast<double>(nearestwallfacenormalx[iCell]);
+        nwfny[iCell] = static_cast<double>(nearestwallfacenormaly[iCell]);
+        nwfnz[iCell] = static_cast<double>(nearestwallfacenormalz[iCell]);
+    }
+
+    string nearestwallfacenormalxname = dataName + "_nwfnx";
+    string nearestwallfacenormalyname = dataName + "_nwfny";
+    string nearestwallfacenormalzname = dataName + "_nwfnz";
+    CreateAndWriteData(actkey->filepos, dataName, 1, nTotalCell, PHDOUBLE, wdt);
+    CreateAndWriteData(actkey->filepos, nearestwallfacenormalxname, 1, nTotalCell, PHDOUBLE, nwfnx);
+    CreateAndWriteData(actkey->filepos, nearestwallfacenormalyname, 1, nTotalCell, PHDOUBLE, nwfny);
+    CreateAndWriteData(actkey->filepos, nearestwallfacenormalzname, 1, nTotalCell, PHDOUBLE, nwfnz);
+
+    /*test
+    ostringstream oss2;
+    oss2 << nTotalCell << endl;
+    oss2.setf(ios::scientific);
+    oss2.precision(10);
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        oss2 << iCell << " " << walldist[iCell] << endl;
+    }
+    WriteLogFile(oss2);
+    //*/
+
+    delete [] walldist;    walldist = nullptr;
+    delete [] wdt;    wdt = nullptr;
+    delete [] nearestwallfacenormalx;    nearestwallfacenormalx = nullptr;
+    delete [] nearestwallfacenormaly;    nearestwallfacenormaly = nullptr;
+    delete [] nearestwallfacenormalz;    nearestwallfacenormalz = nullptr;
+    delete [] nwfnx;    nwfnx = nullptr;
+    delete [] nwfny;    nwfny = nullptr;
+    delete [] nwfnz;    nwfnz = nullptr;
+}
+
+void WalldistStatics()
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    int myid = GetCurrentProcessorID();
+
+    RDouble minWalldist = PHSPACE::LARGE;
+    RDouble maxWalldist = PHSPACE::SMALL;
+    
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int proc = GetZoneProcessorIDSepMode(iZone);
+
+        if (myid == proc)
+        {
+            Grid *grid = GetGrid(iZone, 0);
+
+            if (grid->Type() == UNSTRUCTGRID)
+            {
+                int nTotalCell = grid->GetNTotalCell();
+                RDouble *walldist = UnstructGridCast(grid)->GetWallDist();
+                for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+                {
+                    minWalldist = MIN(minWalldist, walldist[iCell]);
+                    maxWalldist = MAX(maxWalldist, walldist[iCell]);
+                    if (maxWalldist > 1.0e8)
+                    {
+                        cout << iCell << endl;
+                        ostringstream oss1;
+                        oss1 << "iCell=" << iCell << endl;
+                        TK_Exit::ExceptionExit(oss1);
+                    }
+                }
+            }
+            else
+            {
+                StructGrid *structGrid = StructGridCast(grid);
+
+                RDouble3D &walldist = *structGrid->GetWallDist();
+
+                int ist, ied, jst, jed, kst, ked;
+                structGrid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+                for (int k = kst; k <= ked; ++ k)
+                {
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        for (int i = ist; i <= ied; ++ i)
+                        {
+                            minWalldist = MIN(minWalldist, walldist(i, j, k));
+                            maxWalldist = MAX(maxWalldist, walldist(i, j, k));
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    PH_CompareMaxMin(minWalldist, 2);
+
+    PH_CompareMaxMin(maxWalldist, 1);
+
+    ostringstream oss;
+    oss << "Min && Max wall distance : " << minWalldist << ", " << maxWalldist << endl;
+    PrintToWindow(oss);
+}
+
+}
\ No newline at end of file
diff --git a/API/Toolkit/include/TK_Exit.h b/API/Toolkit/include/TK_Exit.h
new file mode 100644
index 0000000..ed8ea88
--- /dev/null
+++ b/API/Toolkit/include/TK_Exit.h
@@ -0,0 +1,86 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      TK_Exit.h
+//! @brief     Exit or abort the problem because of different reasons.
+//! @author    Bell, Zhang Jian.
+
+#pragma once
+#include "PHMpi.h"
+using namespace std;
+
+namespace PHSPACE
+{
+
+//! @brief TK_Exit is a class that integrate several methods that terminate the program.
+class TK_Exit
+{
+public:
+    //! Normal Exit PHengLEI.
+    //! @example: TK_Exit::ExitPHengLEI().
+    LIB_EXPORT static void ExitPHengLEI();
+
+    //! Abnormal Exit PHengLEI and dumping error information to Log file.
+    //! @param[in] errorMessage    string type error information need to dump.
+    //! @param[in] onlyServer      default false. If true, whether or not to abort program requires 
+    //!                            to judge if the current process is server. Only server process call abort.
+    //!                            Warning!!! Do not set true unless you ensure server process meets an exception.
+    //! @example: TK_Exit::ExceptionExit("Front edge is not exist !");
+    LIB_EXPORT static void ExceptionExit(const string &errorMessage, bool onlyServer = false);
+
+    //! Abnormal Exit PHengLEI and dumping error information to Log file.
+    //! @param[in] errorMessage    ostringstream type error information need to dump.
+    //! @param[in] onlyServer      Default false. If true, whether or not to abort program requires 
+    //!                            to judge if the current process is server. Only server process call abort.
+    //!                            Warning!!! Do not set true unless you ensure server process meet an exception.
+    //! @example: ostringstream oss;
+    //!           oss << "Out of Range: pos " << pos << endl;
+    //!           TK_Exit::ExceptionExit(oss);
+    LIB_EXPORT static void ExceptionExit(const ostringstream &errorMessage, bool onlyServer = false);
+
+    //! Print debug information to log file or screen.
+    //! This function is used by developers to debug.
+    //! Information include filename, line number, compile date and time.
+    //! @param[in] debuginfo    what developers want to say.
+    //! @example: TK_Exit::PrintDebugInfoExit("Error: numberOfTotalCompositeFaces != 0");
+    LIB_EXPORT static void PrintDebugInfoExit(const string &debuginfo);
+
+    //! Print debug information to log file or screen.
+    //! This function is used by developers to debug.
+    //! Information include filename, line number, compile date and time.
+    //! @param[in] debuginfo    what developers want to say.
+    //! @example: TK_Exit::PrintDebugInfoExit("Error: numberOfTotalCompositeFaces != 0");
+    LIB_EXPORT static void PrintDebugInfoExit(const ostringstream &debuginfo);
+
+    //! Print "Could not open [filename]" and exit when errors occurs during opening a file.
+    //! @param[in] filename    file name.
+    LIB_EXPORT static void FileOpenErrorExit(const string &filename);
+
+    //! An unexpected situation occurs because of a variable's value is not right.
+    //! It will cause unexpected error so that program will dump an information like 
+    //! "Error: this situation has not been considered, for [variableName] = [value]" 
+    //! and abort.
+    //! @param[in] variableName    variable's name.
+    //! @param[in] value           variable's value.
+    //! @example: TK_Exit::UnexpectedVarValue("force_component", 0);
+    template < typename T >
+    static void UnexpectedVarValue(const string &variableName, const T &value);
+
+private:
+    //! Constructor private.
+    TK_Exit();
+
+    //! Called by PrintDebugInfoExit(string debuginfo).
+    static void PrintDebugInfoExit(const string &stopInformation, const string &fileName, const int &fileLine, const string &dateName, const string &timeName);
+};
+
+#include "TK_Exit.hxx"
+}
\ No newline at end of file
diff --git a/API/Toolkit/include/TK_Exit.hxx b/API/Toolkit/include/TK_Exit.hxx
new file mode 100644
index 0000000..d3ce442
--- /dev/null
+++ b/API/Toolkit/include/TK_Exit.hxx
@@ -0,0 +1,7 @@
+template < typename T >
+inline void TK_Exit::UnexpectedVarValue(const string &variableName, const T &value)
+{
+    ostringstream oss;
+    oss << "  Error: this situation has not been considered, for " << variableName << " = " << value << endl;
+    ExceptionExit(oss.str());
+}
\ No newline at end of file
diff --git a/API/Toolkit/include/TK_Log.h b/API/Toolkit/include/TK_Log.h
new file mode 100644
index 0000000..9f69f49
--- /dev/null
+++ b/API/Toolkit/include/TK_Log.h
@@ -0,0 +1,193 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      TK_Log.h
+//! @brief     some functions about Log file.
+//! @author    He Xin.
+
+#pragma once
+#include "PHMpi.h"
+using namespace std;
+//#define LOG_DEBUG
+#ifdef LOG_DEBUG
+#include "Math_BasisFunction.h"
+#endif
+
+namespace PHSPACE
+{
+//! Open the log file.
+//! @param[in] file_id    file ID.
+//! @param[in] file       file stream flow.
+void OpenLogFile(int file_id, fstream &file);
+
+//! Close the log file.
+//! @param[in] file    file stream flow.
+void CloseLogFile(fstream &file);
+
+//! Output information to log file.
+//! @param[in] data    string data.
+void WriteLogFile(const string &data);
+
+//! Output information to log file.
+//! @param[in] data    string data.
+//! @param[in] writeEachProcessor    whether write each processor.
+void WriteLogFile(const string &data, bool writeEachProcessor);
+
+//! Output information to log file.
+//! @param[in] oss    information string stream.
+//! @param[in] writeEachProcessor    whether write each processor.
+void WriteLogFile(const ostringstream &oss, bool writeEachProcessor = false);
+
+//! Open warning information to log file.
+//! @param[in] file_id    file ID.
+//! @param[in] file       file stream flow.
+void OpenWarningLogFile(int file_id, fstream &file);
+
+//! Output warning information to log file.
+//! @param[in] warningInfo    warning information.
+void WriteWarningLogFile(const string &warningInfo);
+
+//! Print information to window.
+//! @param[in] information    information.
+void PrintToWindow(const string &information);
+
+//! Print information to window.
+//! @param[in] information    information string stream.
+void PrintToWindow(const ostringstream &information);
+
+//! Create file directory.
+//! @param[in] dir_name    file directory name.
+void PHMakeDir(const string &dir_name);
+
+template < typename T >
+void WriteLogFile(const string &name, const T &data, bool writeEachProcessor = false)
+{
+    using namespace PHMPI;
+#ifdef LOG_DEBUG
+    int interval = GetProgressInterval((int)GetNumberOfProcessor(), 64);
+    if (writeEachProcessor || GetCurrentProcessorID() % interval == 0 || GetCurrentProcessorID() == (GetNumberOfProcessor() - 1))
+#else
+    if (GetCurrentProcessorID() == server || writeEachProcessor)
+#endif
+    {
+        fstream file;
+        int myid = PHMPI::GetCurrentProcessorID();
+        OpenLogFile(myid, file);
+        file << name << data << "\n";
+        CloseLogFile(file);
+    }
+}
+
+template < typename T1, typename T2 >
+void WriteLogFile(const string &name, const T1 &data1, const T2 &data2, bool writeEachProcessor = false)
+{
+    using namespace PHMPI;
+#ifdef LOG_DEBUG
+    int interval = GetProgressInterval((int)GetNumberOfProcessor(), 64);
+    if (writeEachProcessor || GetCurrentProcessorID() % interval == 0 || GetCurrentProcessorID() == (GetNumberOfProcessor() - 1))
+#else
+    if (GetCurrentProcessorID() == server || writeEachProcessor)
+#endif
+    {
+        fstream file;
+        int myid = PHMPI::GetCurrentProcessorID();
+        OpenLogFile(myid, file);
+        file << name << data1 << " " << data2 << "\n";
+        CloseLogFile(file);
+    }
+}
+
+template < typename T1, typename T2, typename T3 >
+void WriteLogFile(const string &name, const T1 &data1, const T2 &data2, const T3 &data3, bool writeEachProcessor = false)
+{
+    using namespace PHMPI;
+#ifdef LOG_DEBUG
+    int interval = GetProgressInterval((int)GetNumberOfProcessor(), 64);
+    if (writeEachProcessor || GetCurrentProcessorID() % interval == 0 || GetCurrentProcessorID() == (GetNumberOfProcessor() - 1))
+#else
+    if (GetCurrentProcessorID() == server || writeEachProcessor)
+#endif
+    {
+        fstream file;
+        int myid = PHMPI::GetCurrentProcessorID();
+        OpenLogFile(myid, file);
+        file << name << data1 << " " << data2  << " " << data3 << "\n";
+        CloseLogFile(file);
+    }
+}
+
+template < typename T >
+void PrintToWindow(const string &name, const T &data)
+{
+    if (PHMPI::GetCurrentProcessorID() != 0) return;
+
+    ostringstream oss;
+    oss << name << " " << data;
+    PrintToWindow(oss.str());
+}
+
+template < typename T1, typename T2 >
+void PrintToWindow(const string &name, const T1 &data1, const T2 &data2)
+{
+    if (PHMPI::GetCurrentProcessorID() != 0) return;
+
+    ostringstream oss;
+    oss << name << " " << data1 << " " << data2;
+    PrintToWindow(oss.str());
+}
+
+template < typename T1, typename T2, typename T3 >
+void PrintToWindow(const string &name, const T1 &data1, const T2 &data2, const T3 &data3)
+{
+    if (PHMPI::GetCurrentProcessorID() != 0) return;
+
+    ostringstream oss;
+    oss << name << " " << data1 << " " << data2 << " " << data3;
+    PrintToWindow(oss.str());
+}
+
+template < typename T1, typename T2, typename T3, typename T4, typename T5, typename T6, typename T7, typename T8, typename T9 >
+void PrintToWindow(const string &name, const T1 &data1, const T2 &data2, const T3 &data3, const T4 &data4, const T5 &data5, const T6 &data6, const T7 &data7, const T8 &data8, const T9 &data9)
+{
+    if (PHMPI::GetCurrentProcessorID() != 0) return;
+
+    ostringstream oss;
+    oss << name << " " << data1 << " " << data2 << " " << data3 << " " << data4 << " " << data5 << " " << data6 << " " << data7 << " " << data8 << " " << data9;
+    PrintToWindow(oss.str());
+}
+
+template < typename T1, typename T2, typename T3, typename T4>
+void PrintToWindow(const string &name, const T1 &data1, const T2 &data2, const T3 &data3,  const T4 &data4)
+{
+    if (PHMPI::GetCurrentProcessorID() != 0) return;
+
+    ostringstream oss;
+    oss << name << " " << data1 << " " << data2 << " " << data3 << " " << data4 ;
+    PrintToWindow(oss.str());
+}
+
+template < typename T1, typename T2, typename T3, typename T4, typename T5 >
+void PrintToWindow(const string &name, const T1 &data1, const T2 &data2, const T3 &data3, const T4 &data4, const T5 &data5)
+{
+    if (PHMPI::GetCurrentProcessorID() != 0) return;
+
+    ostringstream oss;
+    oss << name << " " << data1 << " " << data2 << " " << data3 << " " << data4 << " " << data5;
+    PrintToWindow(oss.str());
+}
+
+//! Monitor the progress to log files.
+void ProgressMonitorToLogFile(const int &iNow, const int &nTotal, const string &monitorName);
+
+//! Monitor the progress by printing to windows.
+void ProgressMonitorToWindows(const int &iNow, const int &nTotal, const string &monitorName);
+
+}
\ No newline at end of file
diff --git a/API/Toolkit/include/TK_Parse.h b/API/Toolkit/include/TK_Parse.h
new file mode 100644
index 0000000..f7cbeae
--- /dev/null
+++ b/API/Toolkit/include/TK_Parse.h
@@ -0,0 +1,149 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      TK_Parse.h
+//! @brief     Parsing parameters from files to database.
+//! @author    Zhang Jian.
+
+#pragma once
+#include <fstream>
+#include "LIB_Macro.h"
+#include <sstream>
+using namespace std;
+
+namespace PHSPACE
+{
+class Data_Param;
+
+class TK_Parse
+{
+public:
+    //! Read and parse data from file, then update to global database.
+    //! @param[in] file        file stream, the file stores parameter data, e.g. cfd_para.hypara.
+    //! @param[in] database    database that stores parameters.
+    LIB_EXPORT static void ReadBasicData(fstream &file, Data_Param *database);
+
+private:
+    TK_Parse();
+};
+
+class GSStringToLowerCase
+{
+public:
+    char operator()(char val)
+    {
+        return static_cast<char>(tolower(val));
+    }
+};
+
+class GSStringToUpperCase
+{
+public:
+    char operator()(char val)
+    {
+        return static_cast<char>(toupper(val));
+    }
+};
+
+class ToLower
+{
+public:
+    char operator()(char val)
+    {
+        return static_cast<char>(tolower(val));
+    }
+};
+
+template < typename T >
+inline T StringToDigit(const string &str, ios_base & (*f)(ios_base &))
+{
+    T value;
+    istringstream stream(str);
+    stream >> f >> value;
+    return value;
+}
+
+//! Converts string to streamable value, and returns true on success and false otherwise.
+template < typename T >
+inline bool from_string(T &Value, const std::string &str, std::ios_base & (*f)(std::ios_base&))
+{
+    std::istringstream stream(str);
+    stream >> f >> Value;
+    return (!stream.fail()) && stream.get() == std::istringstream::traits_type::eof();
+}
+
+//! Converts value to string.
+template < typename T >
+inline std::string to_string(T t, std::ios_base & (*f)(std::ios_base&))
+{
+    std::ostringstream oss;
+    oss << f << t;
+    return oss.str();
+}
+
+template < typename T1, typename T2 >
+string AggregateGeneralString(const T1 &v1, const T2 &v2)
+{
+    ostringstream oss;
+    oss << v1 << v2;
+    return oss.str();
+}
+
+template < typename T1, typename T2, typename T3 >
+string AggregateGeneralString(const T1 &v1, const T2 &v2, const T3 &v3)
+{
+    ostringstream oss;
+    oss << v1 << v2 << v3;
+    return oss.str();
+}
+
+template < typename T1, typename T2, typename T3, typename T4 >
+string AggregateGeneralString(const T1 &v1, const T2 &v2, const T3 &v3, const T4 &v4)
+{
+    ostringstream oss;
+    oss << v1 << v2 << v3 << v4;
+    return oss.str();
+}
+
+template < typename T1, typename T2, typename T3, typename T4, typename T5 >
+string AggregateGeneralString(const T1 &v1, const T2 &v2, const T3 &v3, const T4 &v4, const T5 &v5)
+{
+    ostringstream oss;
+    oss << v1 << v2 << v3 << v4 << v5;
+    return oss.str();
+}
+
+template < typename T1, typename T2, typename T3, typename T4, typename T5, typename T6 >
+string AggregateGeneralString(const T1 &v1, const T2 &v2, const T3 &v3, const T4 &v4, const T5 &v5, const T6 &v6)
+{
+    ostringstream oss;
+    oss << v1 << v2 << v3 << v4 << v5 << v6;
+    return oss.str();
+}
+
+void ToLowerCase(string &word);
+void ToUpperCase(string &word);
+void TrimBlanks(string &source);
+void SkipLines(fstream &file, int nline);
+void SkipWords(string &line, int nword);
+bool IsEmptyLine(const string &line);
+void ReadNextNonEmptyLine(fstream &file, string &line);
+string FindNextWord(const string &source, string &word, const string &separator);
+bool IsArrayParameter(const string &lineOfName);
+void ReadNextLine(fstream &file, string &line);
+bool IsCommentLine(const string &line);
+string FindNextWord(string &source, string &word, const string &separator);
+string FindNextWord(string &source, const string &separator);
+void GetNameExt(const string &fullname, string &fname, string &fext, const string &sep);
+void ReadNewLine(fstream &file, string &line);
+string Dec2Hex(int data_in);
+
+}
\ No newline at end of file
diff --git a/API/Toolkit/include/TK_Time.h b/API/Toolkit/include/TK_Time.h
new file mode 100644
index 0000000..121b84b
--- /dev/null
+++ b/API/Toolkit/include/TK_Time.h
@@ -0,0 +1,137 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      TK_Time.h
+//! @brief     Time computing tools.
+//! @author    Xu Qingxin, Bell.
+
+#pragma once
+#include "TK_Log.h"
+#include <sys/types.h>
+#include <sys/stat.h>
+#ifndef WIN32
+#include <sys/time.h>
+#include <unistd.h>
+#endif
+
+#ifdef WIN32
+#define stat _stat
+#endif
+using namespace std;
+
+namespace PHSPACE
+{
+namespace TIME_SPACE
+{
+
+//! Set time type index value.
+enum TimeTypeIndex
+{
+    CPUTimeIndex  = 0,
+    SYSTimeIndex  = 1,
+    WallTimeIndex = 2
+};
+
+//! Get Wall Time from first call.
+LIB_EXPORT double GetWallTime();
+
+//! Get Wall Time when dumping residuals.
+LIB_EXPORT double GetWallTimeForResidual();
+
+//! Get CPU Time from first call.
+LIB_EXPORT int GetCPUTime(double *ptr_time);
+
+//! Collect CPU time, system time, wall time, and write to log file.
+LIB_EXPORT int WriStatTime();
+
+//! Collect CPU time, system time, wall time from last_time, and write to log file.
+//! @param[in] title    testing tag.
+//! @param[in] last_time
+LIB_EXPORT int WriStatTime(const char *title, double *last_time);
+
+//! Write starting CPU time, system time, wall time to pri_time.
+//! @param[in] pri_time    must be a vector of three element.
+LIB_EXPORT void StartTime(double *ptr_time);
+
+//! Get the last modification time of files.
+LIB_EXPORT void GetFileModifiedTime(string &fileName, RDouble &TimeFile);
+}
+
+#ifdef WIN32
+//! @brief The main interface class of time computing functions.
+//! Windows.
+class TimeSpan
+{
+public:
+    LIB_EXPORT TimeSpan();
+
+    LIB_EXPORT ~TimeSpan(){};
+
+    //! Reset the starting testing time.
+    void ResetTime();
+
+    //! Get the elapsed time from ResetTime.
+    //! @return (nowtime - lasttime).
+    double GetTimeSpan();
+
+    //! Print the elapsed time to screen.
+    //! @param[in] title    testing tag.
+    //! -# default is null("").
+    void ShowTimeSpan(const string &title = "");
+
+    //! Write the elapsed time to log file.
+    //! @param[in] title    testing tag.
+    //! -# default is null("").
+    void ShowTimeSpanToLogFile(const string &title = "");
+
+private:
+    double last_time, now_time;
+
+private:
+    double GetWallTime();
+    double GetSecondTime(const double &time_elapsed);
+};
+
+#else
+//! Linux/Unix.
+class TimeSpan
+{
+public:
+    TimeSpan();
+
+    ~TimeSpan(){};
+
+    //! Reset the stating testing time.
+    void ResetTime();
+
+    //! Get the elapsed time from ResetTime.
+    //! @return (nowtime - lasttime).
+    double GetTimeSpan();
+
+    //! Print the elapsed time to screen.
+    //! @param[in] title    testing tag.
+    //! -# default is null("").
+    void ShowTimeSpan(const string &title = "");
+
+    //! Write the elapsed time to log file.
+    //! @param[in] title    testing tag.
+    //! -# default is null("").
+    void ShowTimeSpanToLogFile(const string &title = "");
+
+private:
+    struct timeval last_time, now_time;
+    //! tv_sec : second.
+    //! tv_usec: microsecond.
+};
+#endif
+
+#include "TK_Time.hxx"
+}
\ No newline at end of file
diff --git a/API/Toolkit/include/TK_Time.hxx b/API/Toolkit/include/TK_Time.hxx
new file mode 100644
index 0000000..8482fff
--- /dev/null
+++ b/API/Toolkit/include/TK_Time.hxx
@@ -0,0 +1,77 @@
+#ifdef WIN32
+inline double TimeSpan::GetWallTime()
+{
+    return static_cast<double>(clock());
+}
+
+inline double TimeSpan::GetSecondTime(const double &time_elapsed)
+{ 
+    return time_elapsed / CLOCKS_PER_SEC;
+}
+
+inline void TimeSpan::ResetTime()
+{
+    last_time = GetWallTime();
+    now_time = last_time;
+}
+
+inline double TimeSpan::GetTimeSpan()
+{
+    now_time = GetWallTime();
+    double time_elapsed = now_time - last_time;
+    last_time = now_time;
+    return GetSecondTime(time_elapsed);
+}
+
+inline void TimeSpan::ShowTimeSpan(const string &title)
+{
+    now_time = GetWallTime();
+    double time_elapsed = now_time - last_time;
+    last_time = now_time;
+    cout.setf(ios::fixed);
+    cout.precision(2);
+    cout << title << "time elapsed : " << GetSecondTime(time_elapsed) << " seconds" << "\n";
+}
+
+inline void TimeSpan::ShowTimeSpanToLogFile(const string &title)
+{
+    ostringstream oss;
+    now_time = GetWallTime();
+    double time_elapsed = now_time - last_time;
+    last_time = now_time;
+
+    //oss << title << " time elapsed : " << GetSecondTime(time_elapsed) << " seconds" << "\n";
+    oss << setiosflags(ios::fixed) << setprecision(3) << setw(6) << GetSecondTime(time_elapsed) << "  seconds: " << title;
+    WriteLogFile(oss.str());
+}
+#else
+inline void TimeSpan::ResetTime()
+{
+    gettimeofday(&last_time, NULL);
+}
+
+inline double TimeSpan::GetTimeSpan()
+{
+    gettimeofday(&now_time, NULL);
+    double time_elapsed = (now_time.tv_sec - last_time.tv_sec) + (now_time.tv_usec - last_time.tv_usec) * 1.0e-6;
+    double timespan = ((now_time.tv_sec - last_time.tv_sec) + (now_time.tv_usec - last_time.tv_usec) * 1.0e-6);
+    last_time = now_time;
+    return timespan;
+}
+
+inline void TimeSpan::ShowTimeSpan(const string &title)
+{
+    cout.setf(ios::fixed);
+    cout.precision(2);
+    cout << title << "time elapsed : " << GetTimeSpan() << " seconds" << "\n";
+}
+
+inline void TimeSpan::ShowTimeSpanToLogFile(const string &title)
+{
+    PH_BarrierSepMode();
+
+    ostringstream oss;
+    oss << title << " time elapsed : " << GetTimeSpan() << " seconds" << "\n";
+    WriteLogFile(oss.str());
+}
+#endif
\ No newline at end of file
diff --git a/API/Toolkit/include/TK_Warning.h b/API/Toolkit/include/TK_Warning.h
new file mode 100644
index 0000000..7a7f1a0
--- /dev/null
+++ b/API/Toolkit/include/TK_Warning.h
@@ -0,0 +1,48 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      TK_Warning.h
+//! @brief     Write or print different warning information.
+//! @author    Zhang Jian.
+//#include <vld.h>
+#pragma once
+#include "TK_Log.h"
+#include "LIB_Macro.h"
+using namespace std;
+
+namespace PHSPACE
+{
+class TK_Warning
+{
+public:
+    //! Print warning information because of function will be deprecated.
+    //! @param[in] oldFunctionName    old function's name which will be deprecated.
+    LIB_EXPORT static void FunctionDeprecation(const string &oldFunctionName);
+
+    //! Print warning information because of function will be deprecated.
+    //! @param[in] oldFunctionName    old function's name which will be deprecated.
+    //! @param[in] newFunctionName    new function's name.
+    LIB_EXPORT static void FunctionDeprecation(const string &oldFunctionName, const string &newFunctionName);
+
+    //! Print warning information to the window.
+    //! @param[in] information    the warning information will be print to the window.
+    LIB_EXPORT static void Warning(const string &information);
+
+    //! Print warning information because of variable's value is not recommended.
+    template < typename T >
+    static void UnexpectedVarValue(const string &variableName, const T &value);
+
+private:
+    TK_Warning();
+};
+
+#include "TK_Warning.hxx"
+}
\ No newline at end of file
diff --git a/API/Toolkit/include/TK_Warning.hxx b/API/Toolkit/include/TK_Warning.hxx
new file mode 100644
index 0000000..74cca35
--- /dev/null
+++ b/API/Toolkit/include/TK_Warning.hxx
@@ -0,0 +1,8 @@
+template < typename T >
+inline void TK_Warning::UnexpectedVarValue(const string &variableName, const T &value)
+{
+    ostringstream oss;
+    oss << "Warning!!! " << "This situation has not been considered, for " << variableName << " = " << value << endl;
+    PrintToWindow(oss.str());
+    WriteWarningLogFile(oss.str());
+}
\ No newline at end of file
diff --git a/API/Toolkit/src/TK_Exit.cpp b/API/Toolkit/src/TK_Exit.cpp
new file mode 100644
index 0000000..fc0817e
--- /dev/null
+++ b/API/Toolkit/src/TK_Exit.cpp
@@ -0,0 +1,89 @@
+#include <stdarg.h>
+#include "TK_Exit.h"
+#include "TK_Time.h"
+
+namespace PHSPACE
+{
+LIB_EXPORT void TK_Exit::ExitPHengLEI()
+{
+    PHMPI::FreeBlockData();
+
+    TIME_SPACE::WriStatTime();
+    PH_Finalize();
+}
+
+LIB_EXPORT void TK_Exit::ExceptionExit(const string &errorMessage, bool onlyServer)
+{
+    if (onlyServer)
+    {
+        int myid = PHMPI::GetCurrentProcessorID();
+        int server = PHMPI::GetServerProcessorID();
+        if (myid == server)
+        {
+            PHMPI::FreeBlockData();
+            PrintToWindow(errorMessage);
+            WriteLogFile(errorMessage, true);
+            MPI_Abort(MPI_COMM_WORLD, -1);
+        }
+    }
+    else
+    {
+        PHMPI::FreeBlockData();
+        cout << errorMessage << endl;
+        WriteLogFile(errorMessage, true);
+        MPI_Abort(MPI_COMM_WORLD, -1);
+    }
+}
+
+LIB_EXPORT void TK_Exit::ExceptionExit(const ostringstream &errorMessage, bool onlyServer)
+{
+    ExceptionExit(errorMessage.str(), onlyServer);
+}
+
+/*LIB_EXPORT void TK_Exit::ExceptionExit(const char *format, ...)
+{
+    string var_str;
+    va_list argList;
+    va_start(argList, format);
+    int len = vsnprintf(NULL, 0 ,format, argList);
+    if (len > 0)
+    {
+        vector<char> buf(len+1);
+        vsprintf(&buf.front(), format, argList);
+        var_str.assign(buf.begin(), buf.end()-1);
+    }
+    va_end(argList);
+    ExceptionExit(var_str);
+}*/
+
+LIB_EXPORT void TK_Exit::PrintDebugInfoExit(const string &debuginfo)
+{
+    PrintDebugInfoExit(debuginfo, __FILE__, __LINE__, __DATE__, __TIME__);
+}
+
+LIB_EXPORT void TK_Exit::PrintDebugInfoExit(const ostringstream &debuginfo)
+{
+    PrintDebugInfoExit(debuginfo.str());
+}
+
+LIB_EXPORT void TK_Exit::FileOpenErrorExit(const string &filename)
+{
+    ostringstream oss;
+    oss << "Could not open " << filename << endl;
+    ExceptionExit(oss.str());
+}
+
+void TK_Exit::PrintDebugInfoExit(const string &stopInformation, const string &fileName, const int &fileLine, const string &dateName, const string &timeName)
+{
+    ostringstream oss;
+    oss << "\n";
+    oss << "++++++++++++++++++  StopProgram Information  +++++++++++++++++++++++++++\n";
+    oss <<  stopInformation << "\n";
+    oss << " The stop filename is: " << fileName << "\n";
+    oss << " at line " << fileLine << "\n";
+    oss << " Compiled On line " << dateName << " at " << timeName << "\n";
+    oss << "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++\n";
+    ExceptionExit(oss.str());
+}
+
+}
\ No newline at end of file
diff --git a/API/Toolkit/src/TK_Log.cpp b/API/Toolkit/src/TK_Log.cpp
new file mode 100644
index 0000000..8c33e7e
--- /dev/null
+++ b/API/Toolkit/src/TK_Log.cpp
@@ -0,0 +1,179 @@
+#include "TK_Log.h"
+#include "TK_Exit.h"
+#include <cmath>
+#ifdef WIN32
+#include <direct.h>
+#else
+#include <sys/stat.h>
+#endif
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+void OpenLogFile(int file_id, fstream &file)
+{
+    PHMakeDir("results");
+
+    static int if_rewrite = 0;
+
+    std::ostringstream oss;
+    oss << "results/log" << file_id << ".log";
+
+    if (if_rewrite == 0)
+    {
+        file.open(oss.str().c_str(), ios_base::out|ios_base::trunc);
+    }
+    else
+    {
+        file.open(oss.str().c_str(), ios_base::out|ios_base::app);
+    }
+
+    if_rewrite = 1;
+
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(oss.str());
+    }
+}
+
+void CloseLogFile(fstream &file)
+{
+    file.close();
+    file.clear();
+}
+
+void WriteLogFile(const string &data)
+{
+    WriteLogFile(data, false);
+}
+
+void WriteLogFile(const string &data, bool writeEachProcessor)
+{
+    using namespace PHMPI;
+    if(writeEachProcessor)
+    {
+        fstream file;
+        OpenLogFile(GetCurrentProcessorID(), file);
+        file << data << "\n";
+        CloseLogFile(file);
+    }
+    else
+    {
+#ifndef LOG_DEBUG
+        //! Only server write log.
+        if(GetCurrentProcessorID() == server)
+#endif
+        {
+            fstream file;
+            OpenLogFile(GetCurrentProcessorID(), file);
+            file << data << "\n";
+            CloseLogFile(file);
+        }
+    }
+}
+
+void WriteLogFile(const ostringstream &oss, bool writeEachProcessor)
+{
+    if (writeEachProcessor == true)
+    {
+        fstream file;
+        OpenLogFile(PHMPI::GetCurrentProcessorID(), file);
+        file << oss.str() << "\n";
+        CloseLogFile(file);
+    }
+    else
+    {
+        WriteLogFile(oss.str());
+    }
+}
+
+void OpenWarningLogFile(int file_id, fstream &file)
+{
+    PHMakeDir("results");
+    static int if_rewrite = 0;
+
+    std::ostringstream oss;
+    oss << "results/warning" << file_id << ".log";
+
+    if (if_rewrite == 0)
+    {
+        file.open(oss.str().c_str(), ios_base::out|ios_base::trunc);
+    }
+    else
+    {
+        file.open(oss.str().c_str(), ios_base::out|ios_base::app);
+    }
+
+    if_rewrite = 1;
+
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(oss.str());
+    }
+}
+
+void WriteWarningLogFile(const string &warningInfo)
+{
+    if (PHMPI::GetCurrentProcessorID() == PHMPI::server)
+    {
+        fstream file;
+        OpenWarningLogFile(PHMPI::GetCurrentProcessorID(), file);
+        file << warningInfo << "\n";
+        CloseLogFile(file);
+    }
+}
+
+void PrintToWindow(const string &information)
+{
+    if (PHMPI::GetCurrentProcessorID() != PHMPI::GetServerProcessorID()) return;
+
+    cout << information;
+}
+
+void PrintToWindow(const ostringstream &information)
+{
+    PrintToWindow(information.str());
+}
+
+void PHMakeDir(const string &dir_name)
+{
+    using namespace PHMPI;
+    //if (GetCurrentProcessorID() == server)
+    {
+        int flag;
+
+        #ifdef WIN32
+            flag = _mkdir(dir_name.c_str());
+        #else
+            flag = mkdir(dir_name.c_str(), S_IRWXU);
+        #endif
+            if (flag == 0)
+            {
+                cout << dir_name<< " directory has been created successfully !\n";
+            }
+    }
+}
+
+void ProgressMonitorToLogFile(const int &iNow, const int &nTotal, const string &monitorName)
+{
+    ostringstream oss;
+    oss.unsetf(ios::scientific);
+    oss.setf(ios::fixed);
+    oss.precision(0);
+    oss << "     " << floor((iNow * 1.0) / nTotal * 100 + 0.5) << "% " << monitorName << " completed ...";
+    WriteLogFile(oss);
+}
+
+void ProgressMonitorToWindows(const int &iNow, const int &nTotal, const string &monitorName)
+{
+    ostringstream oss;
+    oss.unsetf(ios::scientific);
+    oss.setf(ios::fixed);
+    oss.precision(0);
+    oss << "     " << floor((iNow * 1.0) / nTotal * 100 + 0.5) << "% " << monitorName << " completed ..." << endl;
+    PrintToWindow(oss);
+}
+
+}
\ No newline at end of file
diff --git a/API/Toolkit/src/TK_Parse.cpp b/API/Toolkit/src/TK_Parse.cpp
new file mode 100644
index 0000000..23b4304
--- /dev/null
+++ b/API/Toolkit/src/TK_Parse.cpp
@@ -0,0 +1,367 @@
+#include <map>
+#include "TK_Parse.h"
+#include "Data_Param.h"
+#include "PHHeader.h"
+#include "TK_Exit.h"
+#include "Constants.h"
+#include "TK_Log.h"
+
+namespace PHSPACE
+{
+LIB_EXPORT void TK_Parse::ReadBasicData(fstream &file, Data_Param *database)
+{
+    string line, keyword, name, word;
+    //string *value;
+    vector <string> values;
+    //string separator  = " =\t\r\n#$,;\"";
+    //! \t is the tab key.
+    string separator = " =\r\n\t#$,;\"";
+    string sep1 = "\r\n";
+    string::size_type npos = string::npos;
+
+    string errMsg = "error in parameter file";
+
+    map <string, int> keywordmap;
+
+    keywordmap.insert(pair<string, int>("int"   , PHINT));
+    keywordmap.insert(pair<string, int>("float" , PHFLOAT));
+    keywordmap.insert(pair<string, int>("double", PHDOUBLE));
+    keywordmap.insert(pair<string, int>("string", PHSTRING));
+
+    //Always loop until the file is end
+    while (!file.eof())
+    {
+        getline(file, line);
+        if (line == "") continue;
+        FindNextWord(line, word, sep1);
+
+        if (word == "{") continue;    //! Get into sub-domain.
+        if (word == "}") break;       //! Get out of sub-domain.
+
+        //Ignore comment
+        if (word.substr(0, 1) == "#" || word.substr(0, 2) == "//") continue;
+
+        line = FindNextWord(line, keyword, separator);
+
+        if (keyword == "") continue;
+
+        line = FindNextWord(line, name, separator);
+
+        int count = 0;
+        if (name.find_first_of("[") != npos) ++ count;
+        if (name.find_first_of("]") != npos) ++ count;
+        int arraysize = 1;
+        if (count == 2)
+        {
+            //! Array mode.
+            string line1 = name;
+            //string sep = " =\t\r\n#$,;\"[]";
+            string sep = " =\r\n\t#$,;\"[]";
+            line1 = FindNextWord(line1, name, sep);
+
+            string value;
+            line = FindNextWord(line, value, sep);
+            while (value != "")
+            {
+                values.push_back(value);
+                line = FindNextWord(line, value, sep);
+            }
+
+            arraysize = static_cast<int>(values.size());
+        }
+        else if (count == 0)
+        {
+            string value;
+            if (name == "speciesName" || name == "initMassFraction")
+            {
+                value = line;
+            }
+            else
+            {
+                line = FindNextWord(line, value, separator);
+            }
+            values.push_back(value);
+        }
+        else
+        {
+            ostringstream oss;
+            oss << errMsg << "\n";
+            TK_Exit::ExceptionExit(oss.str(), true);
+        }
+
+        int type, size = arraysize;
+        //PrintToWindow("TK_Parse.cpp,Keyword is :", keyword);
+        type = keywordmap[keyword];
+        if (type == PHSTRING)
+        {
+            string *data = new string [size];
+            for (int i = 0; i < size; ++ i)
+            {
+                data[i] = values[i];
+            }
+            database->UpdateData(name, data, type, size);
+            delete [] data;
+        }
+        else if (type == PHINT)
+        {
+            int *data = new int [size];
+            for (int i = 0; i < size; ++ i)
+            {
+                from_string<int>(data[i], values[i], std::dec);
+            }
+
+            database->UpdateData(name, data, type, size);
+            delete [] data;
+        }
+        else if (type == PHFLOAT)
+        {
+            RFloat *data = new RFloat [size];
+            for (int i = 0; i < size; ++ i)
+            {
+                from_string<RFloat>(data[i], values[i], std::dec);
+            }
+            database->UpdateData(name, data, type, size);
+            delete [] data;
+        }
+        else if (type == PHDOUBLE)
+        {
+            RDouble *data = new RDouble [size];
+            for (int i = 0; i < size; ++ i)
+            {
+                from_string<RDouble>(data[i], values[i], std::dec);
+            }
+            database->UpdateData(name, data, type, size);
+            delete [] data;
+        }
+        //delete [] value;
+        values.resize(0);
+    }
+}
+
+void ToLowerCase(string &word)
+{
+    transform(word.begin(), word.end(), word.begin(), GSStringToLowerCase());
+}
+
+void ToUpperCase(string &word)
+{
+    transform(word.begin(), word.end(), word.begin(), GSStringToUpperCase());
+}
+
+void TrimBlanks(string &source)
+{
+    string::size_type firstindex, nextindex;
+    firstindex = source.find_first_not_of(" ");
+    nextindex  = source.find_last_not_of(" ");
+
+    source = source.substr(firstindex, nextindex - firstindex + 1);
+}
+
+void SkipLines(fstream &file, int nline)
+{
+    string line;
+    for (int i = 0; i < nline; ++ i)
+    {
+        getline(file, line);
+        if (file.eof()) return;
+    }
+}
+
+void SkipWords(string &line, int nword)
+{
+    string word;
+    string separator  = " =\t\r\n#$,;\"'";
+    for (int i = 0; i < nword; ++ i)
+    {
+        line = FindNextWord(line, word, separator);
+    }
+}
+
+bool IsEmptyLine(const string &line)
+{
+    if (line == "")
+    {
+        return true;
+    }
+    else
+    {
+        const string notReadableSeparator = " \r\n\t";
+        string word;
+        PHSPACE::FindNextWord(line, word, notReadableSeparator);
+        return word == "";
+    }
+}
+
+void ReadNextNonEmptyLine(fstream &file, string &line)
+{
+    bool isSpaceLine = true;
+
+    do
+    {
+        PHSPACE::ReadNextLine(file, line);
+
+        for (string::iterator iter = line.begin(); iter != line.end(); ++ iter)
+        {
+            if (! isspace(* iter))
+            {
+                isSpaceLine = false;
+                break;
+            }
+        }
+        if (file.eof()) break;
+    }
+    while (isSpaceLine);
+
+    return;
+}
+
+string FindNextWord(const string &source, string &word, const string &separator)
+{
+    int firstIndex, nextIndex, notFindIndex = -1;
+    string emptyString = "";
+    firstIndex = static_cast<int>(source.find_first_not_of(separator, 0));
+
+    if (firstIndex == notFindIndex)
+    {
+        word = emptyString;
+        return emptyString;
+    }
+    nextIndex = static_cast<int>(source.find_first_of(separator, firstIndex));
+    if (nextIndex == notFindIndex)
+    {
+        word = source.substr(firstIndex);
+        return emptyString;
+    }
+    else
+    {
+        word = source.substr(firstIndex, nextIndex - firstIndex);
+        return source.substr(nextIndex);
+    }
+}
+
+bool IsArrayParameter(const string &lineOfName)
+{
+    if (lineOfName.find_first_of("[") == string::npos)
+    {
+        return false;
+    }
+
+    if (lineOfName.find_first_of("]") == string::npos)
+    {
+        return false;
+    }
+
+    return true;
+}
+
+bool IsCommentLine(const string &line)
+{
+    const string notReadableSeparator = " \r\n\t";
+    string word;
+    PHSPACE::FindNextWord(line, word, notReadableSeparator);
+    return (word.substr(0, 1) == "#" || word.substr(0, 2) == "//");
+}
+
+void ReadNextLine(fstream &file, string &line)
+{
+    std::getline(file, line);
+}
+
+string FindNextWord(string &source, string &word, const string &separator)
+{
+    string::size_type firstindex, nextindex, npos = string::npos;
+    string nullstring = "";
+    firstindex = source.find_first_not_of(separator, 0);
+
+    if (firstindex == npos)
+    {
+        word = nullstring;
+        return nullstring;
+    }
+
+    nextindex = source.find_first_of(separator, firstindex);
+    if (nextindex == npos)
+    {
+        word = source.substr(firstindex);
+        return nullstring;
+    }
+    else
+    {
+        word = source.substr(firstindex, nextindex - firstindex);
+        return source.substr(nextindex);
+    }
+    return nullstring;
+}
+
+string FindNextWord(string &source, const string &separator)
+{
+    int firstIndex, nextIndex, notFindIndex = -1;
+    string emptyString = "";
+    firstIndex = static_cast<int>(source.find_first_not_of(separator, 0));
+
+    if (firstIndex == notFindIndex)
+    {
+        return emptyString;
+    }
+
+    nextIndex = static_cast<int>(source.find_first_of(separator, firstIndex));
+    if (nextIndex == notFindIndex)
+    {
+        string word = source.substr(firstIndex);
+        source = emptyString;
+        return word;
+    }
+    else
+    {
+        string word = source.substr(firstIndex, nextIndex - firstIndex);
+        source = source.substr(nextIndex);
+        return word;
+    }
+}
+
+void GetNameExt(const string &fullname, string &fname, string &fext, const string &sep)
+{
+    basic_string <char>::size_type index;
+
+    if (fullname.empty()) return;
+
+    index = fullname.find_last_of(sep);
+    fname = fullname.substr(0, index);
+    fext  = fullname.substr(index+1, fullname.length() - index - 1);
+}
+
+void ReadNewLine(fstream &file, string &line)
+{
+    bool IsSpaceLine = true;
+
+    do
+    {
+        getline(file, line);
+
+        for (string::iterator iter = line.begin(); iter != line.end(); ++ iter)
+        {
+            if (!isspace(*iter))
+            {
+                IsSpaceLine = false;
+                break;
+            }
+        }
+        if (file.eof()) break;
+    }
+    while (IsSpaceLine);
+
+    return;
+}
+
+string Dec2Hex(int data_in)
+{
+    stringstream oss;
+    string temp;
+
+    oss<< setiosflags(ios::uppercase)<<hex<<data_in;
+    oss>>temp;
+
+    return temp;
+}
+
+}
\ No newline at end of file
diff --git a/API/Toolkit/src/TK_Time.cpp b/API/Toolkit/src/TK_Time.cpp
new file mode 100644
index 0000000..86b45c9
--- /dev/null
+++ b/API/Toolkit/src/TK_Time.cpp
@@ -0,0 +1,339 @@
+#include "TK_Time.h"
+#include "TK_Log.h"
+#ifndef WIN32
+#include <sys/time.h>
+#include <unistd.h>
+#include <sys/times.h>
+#endif
+
+namespace PHSPACE
+{
+namespace TIME_SPACE
+{
+
+LIB_EXPORT double GetWallTime()
+{
+    static time_t first_time[2];
+
+    static int count = 1;
+
+    time_t now_time[2];
+
+    double GreenTime;
+
+    double iCLK_TCK = 1.0;
+
+#ifndef WIN32
+    struct timeval va1;
+    int ErrCode = 0;
+    ErrCode = gettimeofday(&va1, (struct timezone *)0);
+
+    now_time[0] = va1.tv_sec;
+    now_time[1] = va1.tv_usec;
+#else
+    clock_t tnow;
+    tnow = clock();
+    iCLK_TCK = CLOCKS_PER_SEC;
+
+    now_time[0] = tnow;
+    now_time[1] = 0;
+#endif
+
+    if (count == 1)
+    {
+        first_time[0] = now_time[0];
+        first_time[1] = now_time[1];
+
+        count = 2;
+    }
+
+    now_time[0] -= first_time[0];
+    now_time[1] -= first_time[1];
+
+    GreenTime = now_time[0] + 0.000001 * now_time[1];
+    GreenTime = GreenTime / iCLK_TCK;
+
+    return GreenTime;
+}
+
+LIB_EXPORT double GetWallTimeForResidual()
+{
+    static int count = 1;
+
+    double GreenTime;
+
+    static double time0 = 0.0;
+
+    if (count == 1)
+    {
+        time0 = (double)clock() / CLOCKS_PER_SEC;
+
+        count = 2;
+    }
+
+    GreenTime = (double)clock() / CLOCKS_PER_SEC - time0;
+
+    return GreenTime;
+}
+
+LIB_EXPORT int GetCPUTime(double *ptr_time)
+{
+    int ErrCode = 0;
+
+    static clock_t first_time[2];
+
+    static int count = 1;
+
+    clock_t now_time[2];
+
+    long iCLK_TCK;
+
+    double time_array[2];
+
+#ifndef WIN32
+    struct tms tp;
+    times(&tp);
+
+    iCLK_TCK = sysconf(_SC_CLK_TCK);
+
+    now_time[CPUTimeIndex] = tp.tms_utime;
+    now_time[SYSTimeIndex] = tp.tms_stime;
+#else
+    iCLK_TCK = CLOCKS_PER_SEC;
+
+    now_time[CPUTimeIndex] = clock();
+    now_time[SYSTimeIndex] = 0;
+#endif
+
+    now_time[CPUTimeIndex] += now_time[SYSTimeIndex];
+
+    if (count == 1)
+    {
+        first_time[CPUTimeIndex] = now_time[CPUTimeIndex];
+        first_time[SYSTimeIndex] = now_time[SYSTimeIndex];
+
+        count = 2;
+    }
+
+    now_time[CPUTimeIndex] -= first_time[CPUTimeIndex];
+    now_time[SYSTimeIndex] -= first_time[SYSTimeIndex];
+
+    time_array[CPUTimeIndex] = now_time[CPUTimeIndex] * 1.0 / iCLK_TCK;
+    time_array[SYSTimeIndex] = now_time[SYSTimeIndex] * 1.0 / iCLK_TCK;
+
+    if (ptr_time)
+    {
+        ptr_time[CPUTimeIndex] = time_array[CPUTimeIndex];
+        ptr_time[SYSTimeIndex] = time_array[SYSTimeIndex];
+    }
+
+    return ErrCode;
+}
+
+LIB_EXPORT int WriStatTime()
+{
+    using namespace PHMPI;
+
+    int ErrCode = 0;
+
+    double cpu_time, sys_time, wall_time;
+
+    double *time_array1 = new double[2]();
+
+    ErrCode = GetCPUTime(time_array1);
+    wall_time = GetWallTime();
+
+    cpu_time = time_array1[CPUTimeIndex];
+    sys_time = time_array1[SYSTimeIndex];
+
+    delete [] time_array1;
+
+    string cs;
+    ostringstream oss;
+
+    oss.setf(ios::fixed);
+    oss.precision(3);
+
+    oss << "\n    ----- Time statistics -----\n"
+        << "          Wall time = " << wall_time << "\n"    //! Don't modify, ATP related.
+        << "    ----- End time statistics -----\n";
+    cs = oss.str();
+
+    int root_proc           = 0;
+    int myid                = GetCurrentProcessorID();
+    int number_of_processor = GetNumberOfProcessor();
+
+    double max_cpu_time  = -999.;
+    double max_sys_time  = -999.;
+    double max_wall_time = -999.;
+
+    double min_cpu_time  = 999.;
+    double min_sys_time  = 999.;
+    double min_wall_time = 999.;
+
+    double total_cpu_time  = 0.;
+    double total_sys_time  = 0.;
+    double total_wall_time = 0.;
+
+    if (number_of_processor <= 1)
+    {
+        number_of_processor = 1;
+
+        max_sys_time  = sys_time;
+        max_cpu_time  = cpu_time;
+        max_wall_time = wall_time;
+
+        min_sys_time  = sys_time;
+        min_cpu_time  = cpu_time;
+        min_wall_time = wall_time;
+
+        total_sys_time  = sys_time;
+        total_cpu_time  = cpu_time;
+        total_wall_time = wall_time;
+    }
+    else
+    {
+        int tag = 1;
+        int proc;
+
+        double *time_array = new double[3];
+
+        if (myid == root_proc)
+        {
+            max_sys_time  = sys_time;
+            max_cpu_time  = cpu_time;
+            max_wall_time = wall_time;
+
+            min_sys_time  = sys_time;
+            min_cpu_time  = cpu_time;
+            min_wall_time = wall_time;
+
+            total_sys_time  = sys_time;
+            total_cpu_time  = cpu_time;
+            total_wall_time = wall_time;
+
+            for (int i = 1; i < number_of_processor; ++ i)
+            {
+                proc = PH_Receive(time_array, 3*sizeof(double), tag);
+
+                if (time_array[SYSTimeIndex]  > max_sys_time) max_sys_time  = time_array[SYSTimeIndex];
+                if (time_array[CPUTimeIndex]  > max_cpu_time) max_cpu_time  = time_array[CPUTimeIndex];
+                if (time_array[WallTimeIndex] > max_wall_time) max_wall_time = time_array[WallTimeIndex];
+
+                if (time_array[SYSTimeIndex]  < min_sys_time) min_sys_time  = time_array[SYSTimeIndex];
+                if (time_array[CPUTimeIndex]  < min_cpu_time) min_cpu_time  = time_array[CPUTimeIndex];
+                if (time_array[WallTimeIndex] < min_wall_time) min_wall_time = time_array[WallTimeIndex];
+
+                total_sys_time  += time_array[SYSTimeIndex];
+                total_cpu_time  += time_array[CPUTimeIndex];
+                total_wall_time += time_array[WallTimeIndex];
+            }
+        }
+        else
+        {
+            time_array[SYSTimeIndex]  = sys_time;
+            time_array[CPUTimeIndex]  = cpu_time;
+            time_array[WallTimeIndex] = wall_time;
+
+            PH_Send(time_array, 3 * sizeof(double), root_proc, tag);
+        }
+
+        delete [] time_array;
+    }
+
+    if (myid == root_proc)
+    {
+        cout << cs << endl;
+    }
+
+    (void)oss.flags();
+
+    WriteLogFile(cs);
+
+    return ErrCode;
+}
+
+LIB_EXPORT int WriStatTime(const char *title, double *last_time)
+{
+    int ErrCode = 0;
+
+    double cpu_time, sys_time, wall_time;
+
+    double *time_array = new double[2]();
+
+    ErrCode   = GetCPUTime(time_array);
+    wall_time = GetWallTime();
+
+    cpu_time = time_array[CPUTimeIndex];
+    sys_time = time_array[SYSTimeIndex];
+
+    if (last_time)
+    {
+        time_array[0]           = sys_time;
+        sys_time               -= last_time[SYSTimeIndex];
+        last_time[SYSTimeIndex] = time_array[0];
+
+        time_array[0]           = cpu_time;
+        cpu_time               -= last_time[CPUTimeIndex];
+        last_time[CPUTimeIndex] = time_array[0];
+
+        time_array[0]            = wall_time;
+        wall_time               -= last_time[WallTimeIndex];
+        last_time[WallTimeIndex] = time_array[0];
+    }
+
+    delete [] time_array;
+
+    string cs;
+    ostringstream oss;
+
+    oss.setf(ios::fixed);
+    oss.precision(3);
+    oss << title << " Time Statistics: SYS = " << sys_time
+        << ", CPU=" << cpu_time << ", Wall = " << wall_time;
+    cs = oss.str();
+    (void)oss.flags();
+
+    WriteLogFile(cs);
+
+    return ErrCode;
+}
+
+LIB_EXPORT void StartTime(double *last_time)
+{
+    double *ptr_time = new double[2];
+
+    TIME_SPACE::GetCPUTime(ptr_time);
+
+    last_time[TIME_SPACE::WallTimeIndex] = TIME_SPACE::GetWallTime();
+    last_time[TIME_SPACE::CPUTimeIndex]  = ptr_time[TIME_SPACE::CPUTimeIndex];
+    last_time[TIME_SPACE::SYSTimeIndex]  = ptr_time[TIME_SPACE::SYSTimeIndex];
+
+    delete [] ptr_time;
+}
+
+LIB_EXPORT void GetFileModifiedTime(string &fileName, RDouble &TimeFile)
+{
+    string filename = fileName;
+    struct stat result;
+    if (stat(filename.c_str(), &result) == 0 )
+    {
+        RDouble mod_time = static_cast<RDouble>(result.st_mtime);
+        TimeFile = mod_time;
+    }
+}
+
+}
+#ifdef WIN32
+LIB_EXPORT TimeSpan::TimeSpan()
+{
+    last_time = GetWallTime();
+    now_time = last_time;
+}
+#else
+TimeSpan::TimeSpan()
+{
+    gettimeofday(&last_time, NULL);
+}
+#endif
+}
\ No newline at end of file
diff --git a/API/Toolkit/src/TK_Warning.cpp b/API/Toolkit/src/TK_Warning.cpp
new file mode 100644
index 0000000..e8689aa
--- /dev/null
+++ b/API/Toolkit/src/TK_Warning.cpp
@@ -0,0 +1,33 @@
+#include "TK_Warning.h"
+#include "TK_Log.h"
+
+namespace PHSPACE
+{
+
+TK_Warning::TK_Warning() {}
+
+LIB_EXPORT void TK_Warning::FunctionDeprecation(const string &oldFunctionName)
+{
+    ostringstream oss;
+    oss << "Warning!!! " << oldFunctionName << " will be deprecated soon, please abandon it!" << endl;
+    PrintToWindow(oss.str());
+    WriteWarningLogFile(oss.str());
+}
+
+LIB_EXPORT void TK_Warning::FunctionDeprecation(const string &oldFunctionName, const string &newFunctionName)
+{
+    ostringstream oss;
+    oss << "Warning!!! " << oldFunctionName << " will be deprecated soon, please replace it with " << newFunctionName << "." << endl;
+    PrintToWindow(oss.str());
+    WriteWarningLogFile(oss.str());
+}
+
+LIB_EXPORT void TK_Warning::Warning(const string &information)
+{
+    ostringstream oss;
+    oss << "Warning: " << information << " !!!"<< endl;
+    PrintToWindow(oss.str());
+    WriteWarningLogFile(oss.str());
+}
+
+}
\ No newline at end of file
diff --git a/CFD/CMakeLists.txt b/CFD/CMakeLists.txt
new file mode 100644
index 0000000..faf08da
--- /dev/null
+++ b/CFD/CMakeLists.txt
@@ -0,0 +1,676 @@
+#+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+#          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+#          P   P  H   H  E      NN   N  G      L      E       I          +
+#          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+#          P      H   H  E      N  N N  G   G  L      E       I          +
+#          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+#------------------------------------------------------------------------+
+#          Platform for Hybrid Engineering Simulation of Flows           +
+#           China Aerodynamics Research and Development Center           +
+#                     (C) Copyright, Since 2010                          +
+#+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+#! @file      CMakeLists.txt
+#! @brief     It defines the project.
+#! @author    Bell, Xu Qingxin, He Kun, He Xin.
+cmake_minimum_required(VERSION 2.6)
+
+#set working directory:
+set(EXEC_WORKING_DIR PHengLEIv3d0)
+
+#set cmake environment:
+set(CMAKE_USE_RELATIVE_PATHS ON)
+
+#output message:
+message(STATUS "Welcome to Build Project ${CMAKE_PROJECT_NAME}.")
+message(STATUS "The OS is ${CMAKE_SYSTEM_NAME}, version ${CMAKE_SYSTEM_VERSION}.")
+message(STATUS "The working directory is ${CMAKE_BINARY_DIR}/${EXEC_WORKING_DIR}/${DLL_WORKING_DIR}.")
+message(STATUS "--- Start to call ${CMAKE_CURRENT_LIST_FILE} ---") 
+message(STATUS "This current binary directory is ${CMAKE_CURRENT_BINARY_DIR}.")
+message(STATUS "This current source directory is ${CMAKE_CURRENT_SOURCE_DIR}.")
+
+# Define some pre-definition.
+include(${PROJECT_SOURCE_DIR}/../PHengLEI/PHMacro.cmake)
+if(USE_OCC)
+  message(STATUS "USE_OCC is turned on!")
+  add_definitions(-DUSE_OCC)
+endif()
+if(USE_DOUBLE_PRECISION)
+  message(STATUS "USE_DOUBLE_PRECISION is turned on!")
+  add_definitions(-DPH_DOUBLE_PREC)
+endif()
+if(USE_SMARTARRAY)
+  message(STATUS "USE_SMARTARRAY is turned on!")
+  add_definitions(-DUSE_SMARTARRAY)
+endif()
+if(WIN32)
+if(USE_Windows_X64)
+  message(STATUS "USE_Windows_X64 is turned on!")
+  add_definitions(-DUSE_WINDOWS_X64)
+endif(USE_Windows_X64)
+endif(WIN32)
+if(BUILD_SpecDiffHybSolver)
+  message(STATUS "BUILD_SpecDiffHybSolver is turned on!")
+  add_definitions(-DUSE_SpecDiffHybSolver)
+endif()
+
+if(BUILD_IncomSolver)
+  message(STATUS "BUILD_IncomSolver is turned on!")
+  add_definitions(-DUSE_INCOMSOLVER)
+  if(USE_HypreLib)
+    add_definitions(-DUSE_HypreLib)
+  endif()
+  
+  if(USE_UnapLib)
+    add_definitions(-DUSE_UnapLib)
+  endif()
+  
+  if(USE_YhamgLib)
+    add_definitions(-DUSE_YhamgLib)
+  endif()
+endif()
+
+
+#1. output message:
+message(STATUS "") 
+message(STATUS "--- Enter subdirectory <CFD>, Start to call ${CMAKE_CURRENT_LIST_FILE} ---") 
+message(STATUS "This current binary directory is ${CMAKE_CURRENT_BINARY_DIR}.")
+message(STATUS "This current source directory is ${CMAKE_CURRENT_SOURCE_DIR}.")
+
+if(WIN32)
+if(USE_Windows_X64)
+  set(LIB_API_EXPORT_PATH ${PROJECT_SOURCE_DIR}/../API/bin/${CMAKE_SYSTEM_NAME}-x64/${CMAKE_BUILD_TYPE})
+  set(CMAKE_EXE_LINKER_FLAGS "/machine:x64")
+else(USE_Windows_X64)
+  set(LIB_API_EXPORT_PATH ${PROJECT_SOURCE_DIR}/../API/bin/${CMAKE_SYSTEM_NAME}-x86/${CMAKE_BUILD_TYPE})
+endif(USE_Windows_X64)
+else(WIN32)
+  set(LIB_API_EXPORT_PATH ${PROJECT_SOURCE_DIR}/../API/bin/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR})
+endif(WIN32)
+link_directories("${LIB_API_EXPORT_PATH}")
+
+set(CFD_TARGET_NAME "PHCFD")
+set(LIBRARY_OUTPUT_PATH)
+if(WIN32)
+if(USE_Windows_X64)
+ set(LIBRARY_OUTPUT_PATH ${PROJECT_SOURCE_DIR}/../CFD/bin/${CMAKE_SYSTEM_NAME}-x64/${CMAKE_BUILD_TYPE})
+ set(CMAKE_EXE_LINKER_FLAGS "/machine:x64")
+else(USE_Windows_X64)
+  set(LIBRARY_OUTPUT_PATH ${PROJECT_SOURCE_DIR}/../CFD/bin/${CMAKE_SYSTEM_NAME}-x86/${CMAKE_BUILD_TYPE})
+endif(USE_Windows_X64)
+else(WIN32)
+  set(LIBRARY_OUTPUT_PATH ${PROJECT_SOURCE_DIR}/../CFD/bin/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR})
+endif(WIN32)
+message(STATUS "CFD library path is: ${LIBRARY_OUTPUT_PATH}.")
+
+#set options
+if (NOT BUILD_LIBRARY_TYPE)
+  set (BUILD_LIBRARY_TYPE "Static" CACHE STRING "The type of PHengLEI libraries" FORCE)
+  SET_PROPERTY(CACHE BUILD_LIBRARY_TYPE PROPERTY STRINGS Shared Static)
+endif()
+
+#3. set environment for MPICH and 3rdParty lib directory:
+if(WIN32)
+  include_directories("${MSMPI_HOME_DIRECTORY}/Include")
+  link_directories("${MSMPI_HOME_DIRECTORY}/lib")
+  if(USE_Windows_X64)
+    link_directories("${MSMPI_HOME_DIRECTORY}/Lib/x64")
+    set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/${THIRD_PARTY_COMPILER_FLAG}/win-x64")
+  else(USE_Windows_X64) 
+    link_directories("${MSMPI_HOME_DIRECTORY}/Lib/x86")
+    set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/${THIRD_PARTY_COMPILER_FLAG}/win-x86")
+  endif(USE_Windows_X64)
+else(WIN32)
+  set(CMAKE_CXX_COMPILER  mpicxx)
+  set(CMAKE_C_COMPILER    mpicc)
+  if(${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR} MATCHES "Linux-x86_64")
+    if(USE_INTEL_COMPILER)
+      set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/liblinux/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR}/intel")
+      message(STATUS "USE_INTEL_COMPILER is turned on!")
+    else(USE_INTEL_COMPILER)
+      set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/liblinux/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR}/gcc")
+      message(STATUS "USE_INTEL_COMPILER is turned off!")
+    endif()
+  else(${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR} MATCHES "Linux-aarch64")
+    set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/liblinux/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR}")
+  endif()
+endif(WIN32)
+# specify directory in which the linker will look for libraries for myself libraries:
+message(STATUS "The 3rdparty path is: ${THIRDPARTY_LIB_DIR}.") 
+link_directories("${THIRDPARTY_LIB_DIR}")
+
+includeHeadFiles()
+
+set(HDF5_H_PATH    ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/HDF5/include)
+include_directories("${HDF5_H_PATH}")
+if(USE_TecplotLib)
+set(TECIO_H_PATH   ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/TECIO/include)
+include_directories("${TECIO_H_PATH}")
+endif(USE_TecplotLib)
+
+set(MEITIS_H_PATH  ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/metis/include)
+include_directories("${MEITIS_H_PATH}")
+set(CGNS_H_PATH    ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/cgns/include)
+include_directories("${CGNS_H_PATH}")
+set(MGRID_H_PATH    ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/mgrid/include)
+include_directories("${MGRID_H_PATH}")
+
+
+if(USE_HypreLib)
+  set(HYPRE_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/hypre/include)
+  include_directories("${HYPRE_H_PATH}")
+endif(USE_HypreLib)
+
+if(USE_UnapLib)
+  set(UNAP_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/unapLib/include)
+  include_directories("${UNAP_H_PATH}")
+endif(USE_UnapLib)
+
+if(USE_YhamgLib)
+  set(YHAMG_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/yhamg/include)
+  include_directories("${YHAMG_H_PATH}")
+endif(USE_YhamgLib)
+
+
+#set(API_H_DIR ${PROJECT_SOURCE_DIR}/3rdparty)
+
+#5. set current directory:
+# set directory of Solver
+set(SOLVER_H_PATH    Solver/include)
+set(SOLVER_H_LIST
+${SOLVER_H_PATH}/CFDSolver.h
+${SOLVER_H_PATH}/Controller.h
+${SOLVER_H_PATH}/Param_CFDSolver.h
+)
+source_group(Solver\\include FILES ${SOLVER_H_LIST}) 
+include_directories(${SOLVER_H_PATH})
+
+set(SOLVER_CPP_PATH      Solver/src)
+set(SOLVER_CPP_LIST
+${SOLVER_CPP_PATH}/CFDSolver.cpp
+${SOLVER_CPP_PATH}/Controller.cpp
+${SOLVER_CPP_PATH}/Param_CFDSolver.cpp
+)
+source_group(Solver\\src FILES ${SOLVER_CPP_LIST})
+
+# set directory of NSSolver:
+set(NSSOLVER_H_PATH    NSSolver/include)
+set(NSSOLVER_H_LIST
+${NSSOLVER_H_PATH}/NSSolver.h
+${NSSOLVER_H_PATH}/NSSolverStruct.h
+${NSSOLVER_H_PATH}/NCCRSolverStruct.h
+${NSSOLVER_H_PATH}/NSSolverStructFD.h
+${NSSOLVER_H_PATH}/NSSolverStructFV.h
+${NSSOLVER_H_PATH}/NSSolverUnstruct.h
+${NSSOLVER_H_PATH}/MultiGridOperation.h
+${NSSOLVER_H_PATH}/Param_NSSolver.h
+${NSSOLVER_H_PATH}/Param_NSSolverUnstruct.h
+${NSSOLVER_H_PATH}/Param_NSSolverStruct.h
+)
+source_group(NSSolver\\include FILES ${NSSOLVER_H_LIST}) 
+include_directories(${NSSOLVER_H_PATH})
+
+set(NSSOLVER_CPP_PATH      NSSolver/src)
+set(NSSOLVER_CPP_LIST
+${NSSOLVER_CPP_PATH}/NSSolver.cpp
+${NSSOLVER_CPP_PATH}/NCCRSolverStruct.cpp
+${NSSOLVER_CPP_PATH}/NSSolverStruct.cpp
+${NSSOLVER_CPP_PATH}/NSSolverStructFD.cpp
+${NSSOLVER_CPP_PATH}/NSSolverStructFV.cpp
+${NSSOLVER_CPP_PATH}/NSSolverUnstruct.cpp
+${NSSOLVER_CPP_PATH}/Param_NSSolver.cpp
+${NSSOLVER_CPP_PATH}/Param_NSSolverUnstruct.cpp
+${NSSOLVER_CPP_PATH}/Param_NSSolverStruct.cpp
+)
+source_group(NSSolver\\src FILES ${NSSOLVER_CPP_LIST})
+
+# set directory of TurbSolver:
+set(TurbSOLVER_H_PATH        TurbSolver/include)
+set(TurbSOLVER_H_LIST
+${TurbSOLVER_H_PATH}/TurbSolver.h
+${TurbSOLVER_H_PATH}/TurbSolverStruct.h
+${TurbSOLVER_H_PATH}/TransitionSolver.h
+${TurbSOLVER_H_PATH}/TransitionSolverStruct.h
+${TurbSOLVER_H_PATH}/TurbSolverUnstr.h
+${TurbSOLVER_H_PATH}/TransitionSolverUnstr.h
+${TurbSOLVER_H_PATH}/Transition.h
+${TurbSOLVER_H_PATH}/LESSolver.h
+${TurbSOLVER_H_PATH}/LESSolverStruct.h
+${TurbSOLVER_H_PATH}/LESSolverUnstr.h
+${TurbSOLVER_H_PATH}/TurbSolverStructFD.h
+${TurbSOLVER_H_PATH}/Param_TurbSolver.h
+${TurbSOLVER_H_PATH}/Param_TransitionSolver.h
+${TurbSOLVER_H_PATH}/Param_TurbSolverStruct.h
+${TurbSOLVER_H_PATH}/Param_TurbSolverUnstruct.h
+${TurbSOLVER_H_PATH}/Param_LESSolver.h
+${TurbSOLVER_H_PATH}/Param_LESSolverStruct.h
+${TurbSOLVER_H_PATH}/Param_LESSolverUnstruct.h
+)
+source_group(TurbSolver\\include FILES ${TurbSOLVER_H_LIST}) 
+include_directories(${TurbSOLVER_H_PATH})
+
+set(TurbSOLVER_CPP_PATH      TurbSolver/src)
+set(TurbSOLVER_CPP_LIST
+${TurbSOLVER_CPP_PATH}/TurbSolver.cpp
+${TurbSOLVER_CPP_PATH}/TransitionSolver.cpp
+${TurbSOLVER_CPP_PATH}/TurbSolverStruct.cpp
+${TurbSOLVER_CPP_PATH}/TransitionSolverStruct.cpp
+${TurbSOLVER_CPP_PATH}/TurbSolverStructFD.cpp
+${TurbSOLVER_CPP_PATH}/TurbSolverUnstr.cpp
+${TurbSOLVER_CPP_PATH}/TransitionSolverUnstr.cpp
+${TurbSOLVER_CPP_PATH}/Transition.cpp
+${TurbSOLVER_CPP_PATH}/LESSolver.cpp
+${TurbSOLVER_CPP_PATH}/LESSolverStruct.cpp
+${TurbSOLVER_CPP_PATH}/LESSolverUnstr.cpp
+${TurbSOLVER_CPP_PATH}/Param_TurbSolver.cpp
+${TurbSOLVER_CPP_PATH}/Param_TransitionSolver.cpp
+${TurbSOLVER_CPP_PATH}/Param_TurbSolverStruct.cpp
+${TurbSOLVER_CPP_PATH}/Param_TurbSolverUnstruct.cpp
+${TurbSOLVER_CPP_PATH}/Param_LESSolver.cpp
+${TurbSOLVER_CPP_PATH}/Param_LESSolverStruct.cpp
+${TurbSOLVER_CPP_PATH}/Param_LESSolverUnstruct.cpp
+)
+source_group(TurbSolver\\src FILES ${TurbSOLVER_CPP_LIST})
+
+# set directory of HOSolverUnstruct:
+set(HOSOLVERUNSTRUCT_H_PATH        HOSolverUnstruct/include)
+set(HOSOLVERUNSTRUCT_H_LIST
+${HOSOLVERUNSTRUCT_H_PATH}/HOBasisFunction.h
+${HOSOLVERUNSTRUCT_H_PATH}/HOBoundary.h
+${HOSOLVERUNSTRUCT_H_PATH}/HODefine.h
+${HOSOLVERUNSTRUCT_H_PATH}/HOGaussJacobiQuadrature.h
+${HOSOLVERUNSTRUCT_H_PATH}/HOGeometryStructure.h
+${HOSOLVERUNSTRUCT_H_PATH}/HOInviscidFlux.h
+${HOSOLVERUNSTRUCT_H_PATH}/HOShapeFunction.h
+${HOSOLVERUNSTRUCT_H_PATH}/HOSimulation.h
+${HOSOLVERUNSTRUCT_H_PATH}/HOSolverUnstruct.h
+${HOSOLVERUNSTRUCT_H_PATH}/HOSolverUnstructParam.h
+${HOSOLVERUNSTRUCT_H_PATH}/HOStandardElement.h
+)
+source_group(HOSolverUnstruct\\include FILES ${HOSOLVERUNSTRUCT_H_LIST}) 
+include_directories(${HOSOLVERUNSTRUCT_H_PATH})
+
+set(HOSOLVERUNSTRUCT_CPP_PATH      HOSolverUnstruct/src)
+set(HOSOLVERUNSTRUCT_CPP_LIST
+${HOSOLVERUNSTRUCT_CPP_PATH}/HOBasisFunction.cpp
+${HOSOLVERUNSTRUCT_CPP_PATH}/HOBoundary.cpp
+${HOSOLVERUNSTRUCT_CPP_PATH}/HOGaussJacobiQuadrature.cpp
+${HOSOLVERUNSTRUCT_CPP_PATH}/HOGeometryDtructure.cpp
+${HOSOLVERUNSTRUCT_CPP_PATH}/HOInviscidFlux.cpp
+${HOSOLVERUNSTRUCT_CPP_PATH}/HOShapeFunction.cpp
+${HOSOLVERUNSTRUCT_CPP_PATH}/HOSimulation.cpp
+${HOSOLVERUNSTRUCT_CPP_PATH}/HOSolverUnstruct.cpp
+${HOSOLVERUNSTRUCT_CPP_PATH}/HOSolverUnstructParam.cpp
+${HOSOLVERUNSTRUCT_CPP_PATH}/HOStandardElement.cpp
+)
+source_group(HOSolverUnstruct\\src FILES ${HOSOLVERUNSTRUCT_CPP_LIST})
+
+# Build In-house version:
+# set directory of IncomSolver:
+if(BUILD_IncomSolver)
+set(INCOMSOLVER_H_PATH IncomSolver/include)
+set(INCOMSOLVER_H_LIST
+${INCOMSOLVER_H_PATH}/MomEqCalculator.h
+${INCOMSOLVER_H_PATH}/PPEqCalculator.h
+${INCOMSOLVER_H_PATH}/IncomCalculator.h
+${INCOMSOLVER_H_PATH}/IncomScalarEqCalculator.h
+${INCOMSOLVER_H_PATH}/IncomEnergyEqCalculator.h
+${INCOMSOLVER_H_PATH}/IncomKETurbKEqCalculator.h
+${INCOMSOLVER_H_PATH}/IncomSATurbKEqCalculator.h
+${INCOMSOLVER_H_PATH}/IncomKETurbEpsilonEqCalculator.h
+${INCOMSOLVER_H_PATH}/IncomSpeciesEqCalculator.h
+${INCOMSOLVER_H_PATH}/IncomUnstructSolver.h
+${INCOMSOLVER_H_PATH}/hypreCalculator.h
+${INCOMSOLVER_H_PATH}/unapCalculator.h
+${INCOMSOLVER_H_PATH}/yhamgCalculator.h
+${INCOMSOLVER_H_PATH}/LinearEquationSystemCalculator.h
+${INCOMSOLVER_H_PATH}/Param_INCompSolverUnstruct.h
+)
+source_group(IncomSolver\\include FILES ${INCOMSOLVER_H_LIST})
+include_directories(${INCOMSOLVER_H_PATH})
+
+set(INCOMSOLVER_CPP_PATH IncomSolver/src)
+set(INCOMSOLVER_CPP_LIST
+${INCOMSOLVER_CPP_PATH}/MomEqCalculator.cpp
+${INCOMSOLVER_CPP_PATH}/PPEqCalculator.cpp
+${INCOMSOLVER_CPP_PATH}/IncomCalculator.cpp
+${INCOMSOLVER_CPP_PATH}/IncomScalarEqCalculator.cpp
+${INCOMSOLVER_CPP_PATH}/IncomEnergyEqCalculator.cpp
+${INCOMSOLVER_CPP_PATH}/IncomKETurbEpsilonEqCalculator.cpp
+${INCOMSOLVER_CPP_PATH}/IncomKETurbKEqCalculator.cpp
+${INCOMSOLVER_CPP_PATH}/IncomSATurbKEqCalculator.cpp
+${INCOMSOLVER_CPP_PATH}/IncomSpeciesEqCalculator.cpp
+${INCOMSOLVER_CPP_PATH}/IncomUnstructSolver.cpp
+${INCOMSOLVER_CPP_PATH}/hypreCalculator.cpp
+${INCOMSOLVER_CPP_PATH}/unapCalculator.cpp
+${INCOMSOLVER_CPP_PATH}/yhamgCalculator.cpp
+${INCOMSOLVER_CPP_PATH}/LinearEquationSystemCalculator.cpp
+${INCOMSOLVER_CPP_PATH}/Param_INCompSolverUnstruct.cpp
+)
+source_group(IncomSolver\\src FILES ${INCOMSOLVER_CPP_LIST})
+endif(BUILD_IncomSolver)
+
+# set directory of SpecDiffHybSolver:
+if(BUILD_SpecDiffHybSolver)
+set(SpecDiffHybSolver_H_PATH SpecDiffHybSolver/include)
+set(SpecDiffHybSolver_H_LIST
+${SpecDiffHybSolver_H_PATH}/SpecDiffHybSolver.h
+${SpecDiffHybSolver_H_PATH}/SpecGrid.h
+${SpecDiffHybSolver_H_PATH}/SpecDiffHybGrid.h
+${SpecDiffHybSolver_H_PATH}/ExplicitDifferenceBoundary.h
+${SpecDiffHybSolver_H_PATH}/CompactDifferenceFirstDerivative.h
+${SpecDiffHybSolver_H_PATH}/CompactDifferenceSecondDerivative.h
+${SpecDiffHybSolver_H_PATH}/PoissonSolver.h
+${SpecDiffHybSolver_H_PATH}/CorrectWallDivergence.h
+${SpecDiffHybSolver_H_PATH}/Complex.h
+${SpecDiffHybSolver_H_PATH}/RescaleField.h
+${SpecDiffHybSolver_H_PATH}/Statistics.h
+${SpecDiffHybSolver_H_PATH}/p3dfft.h
+${SpecDiffHybSolver_H_PATH}/fftw3.h
+${SpecDiffHybSolver_H_PATH}/SpecDiffHybFieldView.h
+${SpecDiffHybSolver_H_PATH}/LES.h
+${SpecDiffHybSolver_H_PATH}/SpecSolver.h
+${SpecDiffHybSolver_H_PATH}/Spectrum.h
+${SpecDiffHybSolver_H_PATH}/Param_SpecSolver.h
+${SpecDiffHybSolver_H_PATH}/Param_SpecDiffHybSolver.h
+)
+source_group(SpecDiffHybSolver\\include FILES ${SpecDiffHybSolver_H_LIST})
+include_directories(${SpecDiffHybSolver_H_PATH})
+
+set(SpecDiffHybSolver_CPP_PATH SpecDiffHybSolver/src)
+set(SpecDiffHybSolver_CPP_LIST
+${SpecDiffHybSolver_CPP_PATH}/SpecDiffHybSolver.cpp
+${SpecDiffHybSolver_CPP_PATH}/SpecGrid.cpp
+${SpecDiffHybSolver_CPP_PATH}/SpecDiffHybGrid.cpp
+${SpecDiffHybSolver_CPP_PATH}/ExplicitDifferenceBoundary.cpp
+${SpecDiffHybSolver_CPP_PATH}/CompactDifferenceFirstDerivative.cpp
+${SpecDiffHybSolver_CPP_PATH}/CompactDifferenceSecondDerivative.cpp
+${SpecDiffHybSolver_CPP_PATH}/PoissonSolver.cpp
+${SpecDiffHybSolver_CPP_PATH}/CorrectWallDivergence.cpp
+${SpecDiffHybSolver_CPP_PATH}/RescaleField.cpp
+${SpecDiffHybSolver_CPP_PATH}/Statistics.cpp
+${SpecDiffHybSolver_CPP_PATH}/SpecDiffHybFieldView.cpp
+${SpecDiffHybSolver_CPP_PATH}/LES.cpp
+${SpecDiffHybSolver_CPP_PATH}/SpecSolver.cpp
+${SpecDiffHybSolver_CPP_PATH}/Spectrum.cpp
+${SpecDiffHybSolver_CPP_PATH}/Param_SpecSolver.cpp
+${SpecDiffHybSolver_CPP_PATH}/Param_SpecDiffHybSolver.cpp
+)
+source_group(SpecDiffHybSolver\\src FILES ${SpecDiffHybSolver_CPP_LIST})
+endif(BUILD_SpecDiffHybSolver)
+
+# set directory of DemoSolver:
+if(BUILD_DEMOSOLVER)
+set(DEMOSOLVER_H_PATH DemoSolver/include)
+set(DEMOSOLVER_H_LIST
+${DEMOSOLVER_H_PATH}/DemoSolver.h
+${DEMOSOLVER_H_PATH}/Param_DemoSolver.h
+)
+source_group(DemoSolver\\include FILES ${DEMOSOLVER_H_LIST})
+include_directories(${DEMOSOLVER_H_PATH})
+
+set(DEMOSOLVER_CPP_PATH DemoSolver/src)
+set(DEMOSOLVER_CPP_LIST
+${DEMOSOLVER_CPP_PATH}/DemoSolver.cpp
+${DEMOSOLVER_CPP_PATH}/Param_DemoSolver.cpp
+)
+source_group(DemoSolver\\src FILES ${DEMOSOLVER_CPP_LIST})
+endif(BUILD_DEMOSOLVER)
+
+#LBMSolverMPI
+if(BUILD_LBMSolverMPI)
+set(LBMSolverMPI_H_PATH LBMSolverMPI/include)
+set(LBMSolverMPI_H_LIST
+${LBMSolverMPI_H_PATH}/LBMSolverMPI.hpp
+${LBMSolverMPI_H_PATH}/vector3.hpp
+)
+source_group(LBMSolverMPI\\include FILES ${LBMSolverMPI_H_LIST})
+include_directories(${LBMSolverMPI_H_PATH})
+
+set(LBMSolverMPI_CPP_PATH LBMSolverMPI/src)
+set(LBMSolverMPI_CPP_LIST
+${LBMSolverMPI_CPP_PATH}/bcs.cpp
+${LBMSolverMPI_CPP_PATH}/inout.cpp
+${LBMSolverMPI_CPP_PATH}/lbmMPI.cpp
+${LBMSolverMPI_CPP_PATH}/lbmMRT.cpp
+${LBMSolverMPI_CPP_PATH}/lbmSolver.cpp
+${LBMSolverMPI_CPP_PATH}/LBMSolverMPISimulation.cpp
+${LBMSolverMPI_CPP_PATH}/vector3.cpp
+)
+source_group(LBMSolverMPI\\src FILES ${LBMSolverMPI_CPP_LIST})
+endif(BUILD_LBMSolverMPI)
+
+#LBMSolverOMP
+if(BUILD_LBMSolverOMP)
+set(LBMSolverOMP_H_PATH LBMSolverOMP/include)
+set(LBMSolverOMP_H_LIST
+${LBMSolverOMP_H_PATH}/LBMSolverOMP.hpp
+${LBMSolverOMP_H_PATH}/vector3.hpp
+)
+source_group(LBMSolverOMP\\include FILES ${LBMSolverOMP_H_LIST})
+include_directories(${LBMSolverOMP_H_PATH})
+
+set(LBMSolverOMP_CPP_PATH LBMSolverOMP/src)
+set(LBMSolverOMP_CPP_LIST
+${LBMSolverOMP_CPP_PATH}/bcs.cpp
+${LBMSolverOMP_CPP_PATH}/bouzidi.cpp
+${LBMSolverOMP_CPP_PATH}/collisionstream.cpp
+${LBMSolverOMP_CPP_PATH}/exchange.cpp
+${LBMSolverOMP_CPP_PATH}/LBMSolverOMPSimulation.cpp
+${LBMSolverOMP_CPP_PATH}/MRT.cpp
+${LBMSolverOMP_CPP_PATH}/read.cpp
+${LBMSolverOMP_CPP_PATH}/readGeo.cpp
+${LBMSolverOMP_CPP_PATH}/vector3.cpp
+${LBMSolverOMP_CPP_PATH}/write.cpp
+)
+source_group(LBMSolverOMP\\src FILES ${LBMSolverOMP_CPP_LIST})
+endif(BUILD_LBMSolverOMP)
+
+
+#20.1 set header file list
+set(CFD_HEAD_LIST 
+${SOLVER_H_LIST}
+${NSSOLVER_H_LIST}
+${TurbSOLVER_H_LIST}
+${SpecDiffHybSolver_H_LIST}
+${HOSOLVERUNSTRUCT_H_LIST}
+)
+
+# add INCOMSOLVER_H_LIST
+if(BUILD_IncomSolver)
+list(APPEND CFD_HEAD_LIST ${INCOMSOLVER_H_LIST})
+endif()
+
+# add SpecDiffHybSolver_H_LIST
+if(BUILD_SpecDiffHybSolver)
+list(APPEND CFD_HEAD_LIST ${SpecDiffHybSolver_H_LIST})
+endif()
+
+# add DEMOSOLVER_H_LIST
+if(BUILD_DEMOSOLVER)
+list(APPEND CFD_HEAD_LIST ${DEMOSOLVER_H_LIST})
+endif()
+
+# add LBMSolverMPI_H_LIST
+if(BUILD_LBMSolverMPI)
+list(APPEND CFD_HEAD_LIST ${LBMSolverMPI_H_LIST})
+endif()
+
+# add LBMSolverOMP_H_LIST
+if(BUILD_LBMSolverOMP)
+list(APPEND CFD_HEAD_LIST ${LBMSolverOMP_H_LIST})
+endif()
+#20.2 set source file list:
+set(CFD_CPP_LIST 
+${SOLVER_CPP_LIST}
+${NSSOLVER_CPP_LIST}
+${TurbSOLVER_CPP_LIST}
+${SpecDiffHybSolver_CPP_LIST}
+${HOSOLVERUNSTRUCT_CPP_LIST}
+${DEMOSOLVER_CPP_LIST}
+)
+# add SpecDiffHybSolver_CPP_LIST
+if(BUILD_SpecDiffHybSolver)
+list(APPEND CFD_CPP_LIST ${SpecDiffHybSolver_CPP_LIST})
+endif()
+
+# add DEMOSOLVER_CPP_LIST
+if(BUILD_DEMOSOLVER)
+list(APPEND CFD_CPP_LIST ${DEMOSOLVER_CPP_LIST})
+endif()
+
+# add LBMSolverMPI_CPP_LIST
+if(BUILD_LBMSolverMPI)
+list(APPEND CFD_CPP_LIST ${LBMSolverMPI_CPP_LIST})
+endif()
+
+# add LBMSolverOMP_CPP_LIST
+if(BUILD_LBMSolverOMP)
+list(APPEND CFD_CPP_LIST ${LBMSolverOMP_CPP_LIST})
+endif()
+
+# add INCOMSOLVER_CPP_LIST
+if(BUILD_IncomSolver)
+list(APPEND CFD_CPP_LIST ${INCOMSOLVER_CPP_LIST})
+endif()
+
+#21. adds flags to the compiler command line for sources in the current directory and below:
+add_definitions(-DPH_PARALLEL -DPH_CGNS)
+
+# For OCC.
+set(OCC_LIBS)
+if(USE_OCC)
+  message(STATUS "Using OpenCasCade ...... ")
+  set(OCC_LIBS_REQUIRED
+      # subset of DataExchange
+      TKSTEP TKSTEP209 TKSTEPAttr TKSTEPBase TKIGES TKSTL TKXSBase
+      # ModelingAlgorithms
+      TKOffset TKFeat TKFillet TKBool TKShHealing TKMesh TKHLR TKBO TKPrim
+      TKTopAlgo TKGeomAlgo
+      # ModelingData
+      TKBRep TKGeomBase TKG3d TKG2d
+      # FoundationClasses
+      # TKAdvTools -- not necessary? (and removed from OCC 6.8)
+      TKMath TKernel)
+  
+  # Set the path of the OCC library.
+  set(3RDPARTY_LIB_PATH ${PROJECT_SOURCE_DIR}/3rdparty/occ730-vc11-bit64-release)
+  set(OCC_LIB_PATH ${3RDPARTY_LIB_PATH} CACHE PATH "path to OpenCasCade library.")
+  message(STATUS "Path to OpenCasCade library: " ${OCC_LIB_PATH})
+  
+  # Check if all the library exist -- it's need to be checked. 
+  foreach(OCC ${OCC_LIBS_REQUIRED})     
+      list(APPEND OCC_LIBS ${OCC})
+      unset(OCC CACHE)
+  endforeach(OCC)
+  
+  if(WIN32)           
+    MESSAGE(STATUS "Using Win32 OpenCasCade.")
+    MESSAGE(STATUS "${OCC_LIB_PATH}/lib")
+    MESSAGE(STATUS "${OCC_LIB_PATH}/bin")
+    link_directories("${OCC_LIB_PATH}/lib")
+    link_directories("${OCC_LIB_PATH}/bin") 
+    include_directories("${OCC_LIB_PATH}/inc")
+  else(WIN32)
+    MESSAGE(STATUS "Using NON-Win32 OpenCasCade.")
+    MESSAGE(STATUS "${OCC_LIB_PATH}/lin64/gcc/lib")
+    MESSAGE(STATUS "${OCC_LIB_PATH}/inc")
+    link_directories("${OCC_LIB_PATH}/lin64/gcc/lib")
+    include_directories("${OCC_LIB_PATH}/inc")
+  endif(WIN32)
+endif()
+
+# Some pre-definitions that occ need.
+if(USE_OCC)
+  #target_link_libraries(${EXECUTABLE_TARGET_NAME} ${OCC_LIBS})  
+  add_definitions(-DWNT)
+  add_definitions(-DNOTCL)
+endif()
+
+# build executable program or library to the project using the specified source files and header files:
+if ("${BUILD_LIBRARY_TYPE}" STREQUAL "Shared")
+  # Building Shared Library.   
+  message(STATUS "Building Shared Library ${CFD_TARGET_NAME} ...")
+  add_library(${CFD_TARGET_NAME} SHARED ${CFD_CPP_LIST} ${CFD_HEAD_LIST})
+elseif ("${BUILD_LIBRARY_TYPE}" STREQUAL "Static")
+  # Building Static Library.
+  message(STATUS "Building Static Library ${CFD_TARGET_NAME} ...")
+  add_library(${CFD_TARGET_NAME} STATIC ${CFD_CPP_LIST} ${CFD_HEAD_LIST}) 
+endif() 
+
+# link API library:
+set(API_TARGET_NAME "PHAPI")
+list(APPEND LINK_LIBRARY_LIST ${API_TARGET_NAME} metis parmetis cgns hdf5)
+
+if(USE_HypreLib)
+  list(APPEND LINK_LIBRARY_LIST hypre)
+endif(USE_HypreLib)
+
+if(USE_UnapLib)
+  list(APPEND LINK_LIBRARY_LIST unap utilities)
+endif(USE_UnapLib)
+
+if(USE_YhamgLib)
+  list(APPEND LINK_LIBRARY_LIST yhamg)
+endif(USE_YhamgLib)
+
+
+if(USE_TecplotLib)
+  list(APPEND LINK_LIBRARY_LIST tecio)
+endif(USE_TecplotLib)
+
+if(WIN32)
+  list(APPEND LINK_LIBRARY_LIST ${mpiname})
+endif(WIN32)
+
+if(BUILD_SpecDiffHybSolver)
+  list(APPEND LINK_LIBRARY_LIST p3dfft fftw3 mpifort gfortran)
+endif(BUILD_SpecDiffHybSolver)
+
+if(BUILD_GMRESSolver)
+  # sacado library
+  list(APPEND LINK_LIBRARY_LIST ${Sacado_LIBRARIES})
+  # PETSc library
+  list(APPEND LINK_LIBRARY_LIST ${PETSC_Libraries})
+endif()
+
+target_link_libraries(${CFD_TARGET_NAME} ${LINK_LIBRARY_LIST})
+
+message(STATUS "Link library list: ${LINK_LIBRARY_LIST}.")
+
+
+# For OpenMP
+if(USE_OMP)
+find_package (OpenMP)
+if (OpenMP_FOUND)
+
+if(WIN32)
+target_include_directories (${CFD_TARGET_NAME}
+    PRIVATE
+        ${OpenMP_CXX_INCLUDE_DIRS}
+)
+
+target_compile_options (${CFD_TARGET_NAME}
+    PRIVATE
+        ${OpenMP_CXX_FLAGS}
+)
+
+target_compile_features (${CFD_TARGET_NAME}
+    PUBLIC 
+        cxx_std_14
+)
+
+target_link_libraries (${CFD_TARGET_NAME}
+    PRIVATE 
+        ${OpenMP_CXX_LIBRARIES}
+)
+else(WIN32) 
+  set(CMAKE_C_FLAGS "${CMAKE_C_FLAGS} ${OpenMP_C_FLAGS}")
+  set(CMAKE_CXX_FLAGS "${CMAKE_CXX_FLAGS} ${OpenMP_CXX_FLAGS}")
+  set(CMAKE_EXE_LINKER_FLAGS "${CMAKE_EXE_LINKER_FLAGS} ${OpenMP_EXE_LINKER_FLAGS}")
+endif(WIN32)
+endif (OpenMP_FOUND)
+endif(USE_OMP)
+
+#24. exit:
+message(STATUS "--- Exit ${CMAKE_CURRENT_LIST_FILE}! ---")
+
diff --git a/CFD/DemoSolver/include/DemoSolver.h b/CFD/DemoSolver/include/DemoSolver.h
new file mode 100644
index 0000000..50ca06d
--- /dev/null
+++ b/CFD/DemoSolver/include/DemoSolver.h
@@ -0,0 +1,44 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      DemoSolver.h
+//! @brief     Demo solver.
+//! @author    Meng Liyuan.
+#pragma once
+#include "CFDSolver.h"
+namespace PHSPACE
+{
+class Grid;
+class Param_DemoSolver;
+class DemoSolver : public CFDSolver
+{
+public:
+    DemoSolver();
+    ~DemoSolver();
+public:
+    LIB_EXPORT void InitControlParameters();
+    LIB_EXPORT Param_DemoSolver *GetControlParameters() const;
+    void AllocateGlobalVar(Grid * grid);
+    void DeAllocateGlobalVar(Grid *grid);
+    void ZeroResiduals(Grid * grid);
+    void TimeStep(Grid * grid);
+    void ComputeResidual(Grid *grid, FieldProxy *rhs_proxy);
+    void SourceFlux(Grid *grid);
+    void InviscidFlux(Grid *grid);
+    void ViscousFlux(Grid *grid);
+    void RungeKutta(Grid *grid, FieldProxy *rhs_proxy);
+    void Post();
+    void PostSolve(Grid * grid, int stage, int level);
+
+private:
+};
+
+}
\ No newline at end of file
diff --git a/CFD/DemoSolver/include/Param_DemoSolver.h b/CFD/DemoSolver/include/Param_DemoSolver.h
new file mode 100644
index 0000000..bfa063d
--- /dev/null
+++ b/CFD/DemoSolver/include/Param_DemoSolver.h
@@ -0,0 +1,56 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Param_DemoSolver.h
+//! @brief     Record parameters of demo solver.
+//! @author    Meng Liyuan.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "Param_CFDSolver.h"
+
+namespace PHSPACE
+{
+
+class Param_DemoSolver : public Param_CFDSolver
+{
+public:
+    LIB_EXPORT Param_DemoSolver();
+
+    LIB_EXPORT ~Param_DemoSolver();
+
+public:
+
+    //! Init all parameters.
+    LIB_EXPORT void Init();
+
+    //! Get wall temperature.
+    RDouble GetWallTemperature() const;
+    //! Get angle of attacked.
+    RDouble GetAoA() const;
+    //! Get angle of slide.
+    RDouble GetAngleOfSlide () const;
+
+private:
+    //! Wall temperature.
+    RDouble wallTemperature;
+
+    //! Angle of attacked.
+    double AoA;
+
+    //! Angle of slide.
+    RDouble angleSlide;
+};
+
+#include "Param_DemoSolver.hxx"
+}
+
+
diff --git a/CFD/DemoSolver/include/Param_DemoSolver.hxx b/CFD/DemoSolver/include/Param_DemoSolver.hxx
new file mode 100644
index 0000000..e82adb7
--- /dev/null
+++ b/CFD/DemoSolver/include/Param_DemoSolver.hxx
@@ -0,0 +1,14 @@
+inline RDouble Param_DemoSolver::GetWallTemperature() const
+{
+    return wallTemperature;
+}
+
+inline RDouble Param_DemoSolver::GetAoA() const
+{
+    return AoA;
+}
+
+inline RDouble Param_DemoSolver::GetAngleOfSlide () const
+{
+    return angleSlide;
+}
\ No newline at end of file
diff --git a/CFD/DemoSolver/src/DemoSolver.cpp b/CFD/DemoSolver/src/DemoSolver.cpp
new file mode 100644
index 0000000..3c7f81c
--- /dev/null
+++ b/CFD/DemoSolver/src/DemoSolver.cpp
@@ -0,0 +1,92 @@
+#include "DemoSolver.h"
+#include "Param_DemoSolver.h"
+#include "TK_Log.h"
+
+namespace PHSPACE
+{
+
+DemoSolver::DemoSolver()
+{
+
+}
+
+DemoSolver::~DemoSolver()
+{
+
+}
+
+LIB_EXPORT void DemoSolver::InitControlParameters()
+{
+    FreeControlParameters();
+    controlParameters = new Param_DemoSolver();
+    controlParameters->Init();
+}
+
+LIB_EXPORT Param_DemoSolver *DemoSolver::GetControlParameters() const
+{
+    return static_cast <Param_DemoSolver *> (controlParameters);
+}
+
+void DemoSolver::AllocateGlobalVar(Grid * grid)
+{
+    int nTotalNode = grid->GetNTotalNode();
+
+    if (grid->GetLevel() == 0)
+    {
+        int *nodeBCType = new int[nTotalNode];
+        PHSPACE::SetField(nodeBCType, 0, nTotalNode);
+        grid->UpdateDataPtr("nodeBCType", nodeBCType);
+    }
+}
+
+void DemoSolver::DeAllocateGlobalVar(Grid * grid)
+{
+    PrintToWindow("DemoSolver::DeAllocateGlobalVar\n");
+}
+
+void DemoSolver::ZeroResiduals(Grid * grid)
+{
+    PrintToWindow("DemoSolver::ZeroResiduals\n");
+}
+
+void DemoSolver::TimeStep(Grid * grid)
+{
+    PrintToWindow("DemoSolver::TimeStep\n");
+}
+
+void DemoSolver::ComputeResidual(Grid *grid_in, FieldProxy *rhs_proxy)
+{
+    PrintToWindow("DemoSolver::ComputeResidual\n");
+}
+
+void DemoSolver::SourceFlux(Grid *grid)
+{
+    PrintToWindow("DemoSolver::SourceFlux\n");
+}
+
+void DemoSolver::InviscidFlux(Grid *grid)
+{
+    PrintToWindow("DemoSolver::InviscidFlux\n");
+}
+
+void DemoSolver::ViscousFlux(Grid *grid)
+{
+    PrintToWindow("DemoSolver::ViscousFlux\n");
+}
+
+void DemoSolver::RungeKutta(Grid *grid, FieldProxy *rhs_proxy)
+{
+    PrintToWindow("DemoSolver::RungeKutta\n");
+}
+
+void DemoSolver::Post()
+{
+    PrintToWindow("DemoSolver::Post\n");
+}
+
+void DemoSolver::PostSolve(Grid * grid, int stage, int level)
+{
+    PrintToWindow("DemoSolver::PostSolve\n");
+}
+
+}
\ No newline at end of file
diff --git a/CFD/DemoSolver/src/Param_DemoSolver.cpp b/CFD/DemoSolver/src/Param_DemoSolver.cpp
new file mode 100644
index 0000000..5f5ce2e
--- /dev/null
+++ b/CFD/DemoSolver/src/Param_DemoSolver.cpp
@@ -0,0 +1,25 @@
+#include "Param_DemoSolver.h"
+#include "GlobalDataBase.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Param_DemoSolver::Param_DemoSolver()
+{
+
+}
+
+LIB_EXPORT Param_DemoSolver::~Param_DemoSolver()
+{
+
+}
+
+LIB_EXPORT void Param_DemoSolver::Init()
+{
+    Param_CFDSolver::Init();
+    wallTemperature     = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+    AoA                 = GlobalDataBase::GetDoubleParaFromDB("attackd");
+    angleSlide          = GlobalDataBase::GetDoubleParaFromDB("angleSlide");
+}
+
+}
diff --git a/CFD/HOSolverUnstruct/include/HOBasisFunction.h b/CFD/HOSolverUnstruct/include/HOBasisFunction.h
new file mode 100644
index 0000000..e0faedc
--- /dev/null
+++ b/CFD/HOSolverUnstruct/include/HOBasisFunction.h
@@ -0,0 +1,32 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      HOBasisFunction.h
+//! @brief     basis function, such as monomial, orthogonalized etc.
+//! @author    liming, gxq, Wan yunbo, Xu gang.
+//! @date      2019-10-17
+//! @version   A001
+
+#pragma once
+
+#include "Precision.h"
+
+namespace HOUnstruct
+{
+
+PHSPACE::RDouble MonomialBasis(const PHSPACE::RDouble * refCoord, unsigned int i);
+PHSPACE::RDouble MonomialBasisGrad(const PHSPACE::RDouble * refCoord, unsigned int i, unsigned int j);
+
+PHSPACE::RDouble MonomialBasis2d(const PHSPACE::RDouble * refCoord, unsigned int i);
+
+void TestBasisFunction();
+
+}
\ No newline at end of file
diff --git a/CFD/HOSolverUnstruct/include/HOBoundary.h b/CFD/HOSolverUnstruct/include/HOBoundary.h
new file mode 100644
index 0000000..8592f5a
--- /dev/null
+++ b/CFD/HOSolverUnstruct/include/HOBoundary.h
@@ -0,0 +1,32 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      HOBoundary.h
+//! @brief     basis function, such as monomial, orthogonalized etc.
+//! @author    gongxq, liming, Wan yunbo, Xu gang.
+//! @date      2019-11-09
+//! @version   A001
+
+#pragma once
+
+#include "Precision.h"
+
+namespace HOUnstruct
+{
+    void SymmetryBoundary(int iGausspoint, int numberGaussPoint, RDouble xNormal, RDouble yNormal, RDouble zNormal, vector < vector < RDouble > > & conservationQ);
+    void SymmetryBC(RDouble *prims, RDouble *primt, RDouble nxs, RDouble nys, RDouble nzs, RDouble vgn, int nl, int nchem);
+    void ViscousAdiabaticWallBC(RDouble *prims, RDouble *primt, RDouble nxs, RDouble nys, RDouble nzs, RDouble xfv, RDouble yfv, RDouble zfv, RDouble refMachNumber, int nl, int nchem);
+    void ViscousIsotropicWallBC(RDouble *prims, RDouble *primt, RDouble nxs, RDouble nys, RDouble nzs, RDouble xfv, RDouble yfv, RDouble zfv, RDouble refMachNumber, RDouble tw, int nl, int nchem);
+    void FarfieldBC(RDouble *prims, RDouble *primInflow, RDouble *primt, RDouble gama0, RDouble gama, RDouble nxs, RDouble nys, RDouble nzs, RDouble vgn, int nl, int nchem);
+    void FarFieldRiemannInvariants(RDouble *prims, RDouble *primInflow, RDouble *primt, RDouble gama0, RDouble gama, RDouble nxs, RDouble nys, RDouble nzs, RDouble vgn, int nl, int nchem);
+    void InflowBC(RDouble *prims, RDouble *primt, int nl, int nchem);
+    void OutflowBC(RDouble *prims, RDouble *primt, int nl, int nchem);
+}
\ No newline at end of file
diff --git a/CFD/HOSolverUnstruct/include/HODefine.h b/CFD/HOSolverUnstruct/include/HODefine.h
new file mode 100644
index 0000000..519774f
--- /dev/null
+++ b/CFD/HOSolverUnstruct/include/HODefine.h
@@ -0,0 +1,279 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      HODefine.h
+//! @brief     Constant variables definition for High Order Solver.
+//! @author    xxx
+
+#pragma once
+#include <vector>
+#include "Precision.h"
+#include "Constants.h"
+#include "cgnslib.h"    //! ElementType_t
+#include "../../../PHengLEI/3rdparty/eigen/Eigen/Eigen"
+
+using namespace std;
+using namespace PHSPACE;
+
+namespace HOUnstruct
+{
+#define HO_UNIT_TEST
+
+//#define HODebug     true
+#define HODebug     false
+
+#define HO_USE_REAL_DOUBLE
+
+//! ----------------------------------------------------------------------------*/
+//!
+//!   Basic constants, copy from PETSC
+//!
+
+#if defined(HO_USE_REAL___FLOAT128)
+#define HO_PI                 M_PIq
+#elif defined(M_PI)
+#define HO_PI                 M_PI
+#else
+#define HO_PI                 3.14159265358979323846264338327950288419716939937510582
+#endif
+
+#if !defined(HO_USE_64BIT_INDICES)
+#define HO_MAX_INT            2147483647
+#define HO_MIN_INT            (-HO_MAX_INT - 1)
+#else
+#define HO_MAX_INT            9223372036854775807L
+#define HO_MIN_INT            (-HO_MAX_INT - 1)
+#endif
+
+
+#if defined(HO_USE_REAL_SINGLE)
+#define HO_MAX_REAL                3.40282346638528860e+38F
+#define HO_MIN_REAL                -HO_MAX_REAL
+#define HO_MACHINE_EPSILON         1.19209290e-07F
+#define HO_SQRT_MACHINE_EPSILON    3.45266983e-04F
+#define HO_SMALL                   1.e-5
+#define HO_TOLERANCE               2.5e-3
+#elif defined(HO_USE_REAL_DOUBLE)
+#define HO_MAX_REAL                1.7976931348623157e+308
+#define HO_MIN_REAL                -HO_MAX_REAL
+#define HO_MACHINE_EPSILON         2.2204460492503131e-16
+#define HO_SQRT_MACHINE_EPSILON    1.490116119384766e-08
+#define HO_SMALL                   1.e-10
+#define HO_TOLERANCE               1.e-6
+#elif defined(HO_USE_REAL___FLOAT128)
+#define HO_MAX_REAL                FLT128_MAX
+#define HO_MIN_REAL                -FLT128_MAX
+#define HO_MACHINE_EPSILON         FLT128_EPSILON
+#define HO_SQRT_MACHINE_EPSILON    1.38777878078e-17
+#define HO_SMALL                   1.e-20
+#define HO_TOLERANCE               1.e-8
+#endif
+
+#define HO_INFINITY                HO_MAX_REAL/4.0
+#define HO_NINFINITY              -HO_INFINITY
+
+#define HO_GAMA                    1.4
+#define HO_GAMAM1                  0.4
+
+//! ----------------------------------------------------------------------------*/
+//!
+//!   Basic constants, copy from MOOSE
+//!
+/**
+ * \enum ::Order defines an \p enum for polynomial orders.
+ * Fixing each label to a specific int, since \p InfFE and p refinement
+ * may cast between them
+ */
+enum Order
+{
+    CONSTANT     =  0,
+    FIRST        =  1,
+    SECOND       =  2,
+    THIRD        =  3,
+    FOURTH       =  4,
+    FIFTH        =  5,
+    SIXTH        =  6,
+    SEVENTH      =  7,
+    EIGHTH       =  8,
+    NINTH        =  9,
+    TENTH        = 10,
+
+    ELEVENTH     = 11,
+    TWELFTH      = 12,
+    THIRTEENTH   = 13,
+    FOURTEENTH   = 14,
+    FIFTEENTH    = 15,
+    SIXTEENTH    = 16,
+    SEVENTEENTH  = 17,
+    EIGHTTEENTH  = 18,
+    NINTEENTH    = 19, // deprecated
+    NINETEENTH   = 19,
+    TWENTIETH    = 20,
+
+    TWENTYFIRST   = 21,
+    TWENTYSECOND  = 22,
+    TWENTYTHIRD   = 23,
+    TWENTYFOURTH  = 24,
+    TWENTYFIFTH   = 25,
+    TWENTYSIXTH   = 26,
+    TWENTYSEVENTH = 27,
+    TWENTYEIGHTH  = 28,
+    TWENTYNINTH   = 29,
+    THIRTIETH     = 30,
+
+    THIRTYFIRST   = 31,
+    THIRTYSECOND  = 32,
+    THIRTYTHIRD   = 33,
+    THIRTYFOURTH  = 34,
+    THIRTYFIFTH   = 35,
+    THIRTYSIXTH   = 36,
+    THIRTYSEVENTH = 37,
+    THIRTYEIGHTH  = 38,
+    THIRTYNINTH   = 39,
+    FORTIETH      = 40,
+
+    FORTYFIRST   = 41,
+    FORTYSECOND  = 42,
+    FORTYTHIRD   = 43,
+
+    INVALID_ORDER
+};
+
+enum 
+{
+    HO_STEADY   =  0,
+    HO_UNSTEADY =  1
+};
+
+// ------------------------------------------------------------
+// enum FEFamily definition
+
+/**
+ * \enum ::FEFamily defines an \p enum for finite element families.
+ */
+// vanilla C0
+enum FEFamily
+{
+    LAGRANGE     = 0,
+    HIERARCHIC   = 1,
+
+    // discontinuous, in local coordinates
+    MONOMIAL      = 2,
+    L2_HIERARCHIC = 6,
+    L2_LAGRANGE   = 7,
+
+    // higher-order
+    BERNSTEIN    = 3,
+    SZABAB       = 4,
+
+    // discontinuous, in global coordinates
+    XYZ          = 5,
+
+    // infinite element stuff
+    INFINITE_MAP = 11,     //   for 1/r-map
+    JACOBI_20_00 = 12,     //   i_max = 19
+    JACOBI_30_00 = 13,     //   i_max = 19
+    LEGENDRE     = 14,     //   i_max = 19
+
+    // C1 elements
+    CLOUGH       = 21,
+    HERMITE      = 22,
+    SUBDIVISION  = 23,
+
+    // A scalar variable that couples to
+    // all other DOFs in the system
+    SCALAR       = 31,
+
+    // Vector-valued elements
+    LAGRANGE_VEC = 41,
+    NEDELEC_ONE  = 42,
+
+    INVALID_FE   = 99
+};
+
+/**
+ * \enum ::FEContinuity defines an \p enum for finite element
+ * types to _assert a certain level (or type? Hcurl?) of continuity.
+ */
+enum FEContinuity {DISCONTINUOUS,
+                   C_ZERO,
+                   C_ONE,
+                   H_CURL};
+
+/**
+ * \enum ::FEFieldType defines an \p enum for finite element
+ * field types - i.e. is it a scalar element, vector, tensor, etc.
+ */
+enum FEFieldType {TYPE_SCALAR = 0,
+                  TYPE_VECTOR};
+
+
+/*!
+ * \brief types of geometric entities based on VTK nomenclature
+ */
+enum GEO_TYPE
+{
+    TRIANGLE = 5,       /*!< \brief VTK nomenclature for defining a triangle element. */
+    QUADRILATERAL = 8,      /*!< \brief VTK nomenclature for defining a quadrilateral element. */
+    TETRAHEDRON = 11,       /*!< \brief VTK nomenclature for defining a tetrahedron element. */
+    HEXAHEDRON = 14,        /*!< \brief VTK nomenclature for defining a hexahedron element. */
+    PRISM = 17,             /*!< \brief VTK nomenclature for defining a prism element. */
+    PYRAMID = 20        /*!< \brief VTK nomenclature for defining a pyramid element. */
+};
+
+//enum GEO_TYPE {
+//  VERTEX = 1,   		/*!< \brief VTK nomenclature for defining a vertex element. */
+//  LINE = 3,			/*!< \brief VTK nomenclature for defining a line element. */
+//  TRIANGLE = 5, 		/*!< \brief VTK nomenclature for defining a triangle element. */
+//  QUADRILATERAL = 9,		/*!< \brief VTK nomenclature for defining a quadrilateral element. */
+//  TETRAHEDRON = 10,     	/*!< \brief VTK nomenclature for defining a tetrahedron element. */
+//  HEXAHEDRON = 12,      	/*!< \brief VTK nomenclature for defining a hexahedron element. */
+//  PRISM = 13,     		/*!< \brief VTK nomenclature for defining a prism element. */
+//  PYRAMID = 14  		/*!< \brief VTK nomenclature for defining a pyramid element. */
+//};
+
+template < typename T >
+T ComputePressure(T * conserv)
+{
+    return HO_GAMAM1 * (conserv[4] - 0.5 * (pow(conserv[1],2) + pow(conserv[2],2) + pow(conserv[3],2))/conserv[0]);
+}
+
+class HOMemoryHandler
+{
+public:
+    HOMemoryHandler()
+    {
+
+    }
+
+private:
+    int d_level,*d_orderP;  //level:p-multigrid,order:orderP,
+    RDouble *** u_h, *** w_h; //u_h[iCell][iEqu][iDof], w_h[0] -> high order rho 's dof for DG/FV
+
+    RDouble * massMatrix;
+    RDouble * invMassMatrix; // dof X dof //
+    RDouble * reconstruMatrix; //DG/FV reconstruction massmatrix
+
+    int * nGaussPtsOfCell;  //number of gauss points for each Cell,nGaussPtsOfCell[nTCell]
+
+    RDouble (* gaussPtsOfCell)[3]; //volume gauss point coordinate, gaussPtsOfCell[Cell][0-2]
+    RDouble *** basisGaussPtsOfCell; //volume gauss point coordinate, basisGaussPtsOfCell[iCell][iGauss][iDof]
+    RDouble *** basisGradGaussPtsOfCell; //volume gauss point coordinate, basisGradGaussPtsOfCell[iCell][iGauss][3*iDof]
+
+    int * nGaussPtsOfFace;   //number of gauss points for each Face,nGaussPtsOfFace[nTFace]
+
+    RDouble (* gaussPtsOfFace)[3]; //face gauss points coordinate xyz, gaussPtsOfFace[iFace][0-2]
+    RDouble *** basisGaussPtsOfFace; //face gauss point coordinate basis, basisGaussPtsOfFace[2*iFace][iGauss][iDof]
+    RDouble *** basisGradGaussPtsOfFace; //face gauss point coordinate, basisGradGaussPtsOfFace[2*iFace][iGauss][3*iDof]
+
+};
+
+}
\ No newline at end of file
diff --git a/CFD/HOSolverUnstruct/include/HOGaussJacobiQuadrature.h b/CFD/HOSolverUnstruct/include/HOGaussJacobiQuadrature.h
new file mode 100644
index 0000000..0c2f057
--- /dev/null
+++ b/CFD/HOSolverUnstruct/include/HOGaussJacobiQuadrature.h
@@ -0,0 +1,114 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      HOGaussJacobiQuadrature.h
+//! @brief     compute Gauss Jacobi Quadrature point for High Order Solver.
+//! @author    Li Ming, Gong Xiaoquan, Zhang Jian, Wan yunbo, Xu gang.
+#pragma once
+
+#include <vector>
+
+using namespace PHSPACE;
+using namespace std;
+
+namespace HOUnstruct
+{
+
+class CGaussJacobiQuadrature;
+/*!
+* \class CGaussJacobiQuadrature
+* \brief Class used to determine the quadrature points of the Gauss Jacobi integration rules.
+*/
+class CGaussJacobiQuadrature
+{
+public:
+    CGaussJacobiQuadrature() {}
+    ~CGaussJacobiQuadrature() {}
+
+    /*!
+    * \brief Function, which serves as the API to compute the integration points
+    and weights.
+    * \param[in]     alpha     Parameter in the weighting function (b-x)^alpha*(x-a)^beta
+    in the Gauss Jacobi rule.
+    * \param[in]     beta      Parameter in the weighting function (b-x)^alpha*(x-a)^beta
+    in the Gauss Jacobi rule.
+    * \param[in]     a         Lower bound of the integration interval, usually -1.0.
+    * \param[in]     b         Upper bound of the integration interval, usually  1.0.
+    * \param[in,out] GJPoints  Location of the Gauss-Jacobi integration points.
+    * \param[in,out] GJWeights Weights of the Gauss-Jacobi integration points.
+    */
+    void GetQuadraturePoints(const RDouble alpha,const RDouble beta,const RDouble a,const RDouble b,
+                            vector<RDouble> &GJPoints, vector<RDouble> &GJWeights);
+private:
+    /*!
+    * \brief Function in the original implementation of John Burkardt to compute
+    the integration points of the Gauss-Jacobi quadrature rule.
+    */
+    void cdgqf(int nt, int kind, RDouble alpha, RDouble beta, RDouble t[],
+        RDouble wts[]);
+
+    /*!
+    * \brief Function in the original implementation of John Burkardt to compute
+    the integration points of the Gauss-Jacobi quadrature rule.
+    */
+    void cgqf(int nt, int kind, RDouble alpha, RDouble beta, RDouble a,
+        RDouble b, RDouble t[], RDouble wts[]);
+
+    /*!
+    * \brief Function in the original implementation of John Burkardt to compute
+    the integration points of the Gauss-Jacobi quadrature rule.
+    */
+    RDouble class_matrix(int kind, int m, RDouble alpha, RDouble beta,
+        RDouble aj[], RDouble bj[]);
+
+    /*!
+    * \brief Function in the original implementation of John Burkardt to compute
+    the integration points of the Gauss-Jacobi quadrature rule.
+    */
+    void imtqlx(int n, RDouble d[], RDouble e[], RDouble z[]);
+
+    /*!
+    * \brief Function in the original implementation of John Burkardt to compute
+    the integration points of the Gauss-Jacobi quadrature rule.
+    */
+    void parchk(int kind, int m, RDouble alpha, RDouble beta);
+
+    /*!
+    * \brief Function in the original implementation of John Burkardt to compute
+    the integration points of the Gauss-Jacobi quadrature rule.
+    */
+    RDouble r8_epsilon();
+
+    /*!
+    * \brief Function in the original implementation of John Burkardt to compute
+    the integration points of the Gauss-Jacobi quadrature rule.
+    */
+    RDouble r8_sign(RDouble x);
+
+    /*!
+    * \brief Function in the original implementation of John Burkardt to compute
+    the integration points of the Gauss-Jacobi quadrature rule.
+    */
+    void scqf(int nt, RDouble t[], int mlt[], RDouble wts[], int ndx[],
+        RDouble swts[], RDouble st[], int kind, RDouble alpha,
+        RDouble beta, RDouble a, RDouble b);
+
+    /*!
+    * \brief Function in the original implementation of John Burkardt to compute
+    the integration points of the Gauss-Jacobi quadrature rule.
+    */
+    void sgqf(int nt, RDouble aj[], RDouble bj[], RDouble zemu, RDouble t[],
+        RDouble wts[]);
+};
+
+void TestGaussLegendrePoints1D();
+
+}
\ No newline at end of file
diff --git a/CFD/HOSolverUnstruct/include/HOGeometryStructure.h b/CFD/HOSolverUnstruct/include/HOGeometryStructure.h
new file mode 100644
index 0000000..52d4357
--- /dev/null
+++ b/CFD/HOSolverUnstruct/include/HOGeometryStructure.h
@@ -0,0 +1,437 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      HOGeometryStructure.h
+//! @brief     High Order Geometry_structure
+//! @author    Li Ming, Gong Xiaoquan, Zhang Jian, Wan yunbo, Xu gang.
+
+#pragma once
+
+#include "HODefine.h"
+#include "Geo_UnstructGrid.h"
+#include "HOStandardElement.h"
+
+#include <vector>
+#pragma warning(disable:4100)
+namespace HOUnstruct
+{
+
+//class HighOrderCell;
+//class HighOrderFace;
+//class HO_Point;
+
+/*!
+ * \class HO_Point
+ * \brief Class to a point for the unstr high-order solver.
+ * \author 
+ * \version 
+ */
+class HighOrderNode
+{
+public:
+    unsigned long ID;    /*!< \brief The global ID of this point in the grid. */
+
+    RDouble coor[3];         /*!< \brief Array with the coordinates of the node. */
+
+    vector<unsigned long> cellIDsOfPoint; /*!< \brief Vector with the cell IDs of this point. */
+
+    /*!
+    * \brief Default constructor of the class. Initialize the coordinates to zero
+    to avoid a valgrind warning in two space dimensions.
+    */
+    HighOrderNode(void) {}
+
+    /*!
+    * \brief Destructor of the class. Nothing to be done.
+    */
+    ~HighOrderNode(void) {}
+
+    /*!
+    * \brief Copy constructor of the class.
+    */
+    HighOrderNode(const HighOrderNode &other) {}
+
+    /*!
+    * \brief Assignment operator of the class.
+    */
+    HighOrderNode& operator=(const HighOrderNode &other) { return * this; }
+
+    /*!
+    * \brief Less than operator of the class. Needed for the sorting.
+    */
+    bool operator<(const HighOrderNode &other) const;
+
+    /*!
+    * \brief Equal operator of the class. Needed for the removal of double entities.
+    */
+    bool operator==(const HighOrderNode &other) const;
+
+private:
+    /*!
+    * \brief Copy function. Needed for the copy constructor and assignment operator.
+    */
+    void Copy(const HighOrderNode &other);
+};
+
+/*!
+ * \class HighOrderFace
+ * \brief Class to store a cell for the unstr high-order solver.
+ * \only geometry information,using for h-multigrid
+ * \author 
+ * \version
+ */
+class HighOrderFace
+{
+public:
+    unsigned long ID;    /*!< \brief The global ID of this face in the grid. */
+    unsigned int nNodes;
+    vector<unsigned long> nodeIDs; /*!< \brief Vector with the node IDs of the grid for this element.
+                                                 In this vector the original sequence of the grid file is stored. */
+    unsigned short nPolyGrid;    /*!< \brief Polynomial degree for the geometry of the element. */
+    unsigned short VTK_Type;     /*!< \brief Element type using the VTK convention. */
+                                            /*!< different VTK_Type,  VTK_Type only mark the type, no linear or quadratic type */
+    unsigned short nDOFsGrid;    /*!< \brief Number of DOFs for the geometry of the element. */
+
+    //unsigned short indStandardElement; /*!< \brief Index in the vector of standard face elements. */
+
+    unsigned long cellID0;              /*!< \brief cell ID adjacent to side 0 of the face. */
+    unsigned long cellID1;              /*!< \brief cell ID adjacent to side 1 of the face. */
+
+    unsigned short standardElementIndex;     /*!< \brief mark standard Element type , standardFaceElements[standardElementType]
+
+    //unsigned short localIDInCell0;   /*!< \brief face ID in adjacent cell 0. */
+    //unsigned short localIDInCell1;   /*!< \brief face ID in adjacent cell 1. */
+
+    RDouble area;
+    RDouble centerCoord[3];
+
+    /*!
+    * \brief Constructor of the class. Initialize some pointers to NULL.
+    */
+    HighOrderFace(void) {}
+
+    /*!
+    * \brief Destructor of the class. Nothing to be done.
+    */
+    ~HighOrderFace(void) {}
+
+    /*!
+    * \brief Copy constructor of the class.
+    */
+    HighOrderFace(const HighOrderFace &other) {}
+
+    /*!
+    * \brief Assignment operator of the class.
+    */
+    HighOrderFace& operator=(const HighOrderFace &other) { return * this; }
+
+    /*!
+    * \brief Less than operator of the class. Needed for the sorting.
+    The criterion for comparison are the standard element and
+    adjacent volume ID's.
+    */
+    bool operator<(const HighOrderFace &other) const;
+    const unsigned long * GetnodeIDsGrid(void) const { return nodeIDs.data();}
+
+private:
+    /*!
+    * \brief Copy function. Needed for the copy constructor and assignment operator.
+    */
+    void Copy(const HighOrderFace &other);
+};
+
+/*!
+ * \class HighOrderFaceSol
+ * \brief Class to store a Face for the unstr high-order solver.
+ * \only solution information, using for Hp-multigrid
+ * \author 
+ * \version
+ */
+class HighOrderFaceSol
+{
+public:
+    unsigned long globalID;                 /*!< \brief The global ID of this face in the grid. */
+    unsigned short nPolySol;                /*!< \brief Polynomial degree for this face. */
+    //unsigned short nDOFsSol;                /*!< \brief Number of DOFs for the solution of the element of this face. */
+    unsigned short integNumberOfGaussPoint;
+    unsigned long offsetGaussPoint;         //! the location of gausspoint in all face gausspoint
+    unsigned short accuracyOfFaceIntigration;  //! @the max accuracy of face for left and right gauss numerical integration
+    vector< vector< RDouble > > metricNormalsFace;     /*!< \brief The normals in the integration points of the face.
+                                               The normals point from side 0 to side 1. 0-2:nx,ny,nz,[iGausspoint][normal]*/
+                   
+    vector< RDouble > JacDetFaceIntegration;   /*!< \brief The Jacobian determinant for the integration points of this face. */
+    vector< RDouble > coorXIntegrationPoints;  /*!< \brief Coordinates for the integration points of this face. */
+    vector< RDouble > coorYIntegrationPoints;  /*!< \brief Coordinates for the integration points of this face. */
+    vector< RDouble > coorZIntegrationPoints;  /*!< \brief Coordinates for the integration points of this face. */
+    vector< vector< RDouble > > leftBasisFuncFaceIntegration; /*!< \brief the cell basis functions at the integration points. */
+    vector< vector< RDouble > > rightBasisFuncFaceIntegration; /*!< \brief the cell basis functions at the integration points. */
+
+   //vector<RDouble> gridVelocities;         /*!< \brief Grid velocities in the integration points of this face. */
+    vector< RDouble > wallDistance;           /*!< \brief The wall distance to the viscous walls for
+                                              the integration points of this face. */
+    //[nequ][GaussPointIndex]
+    vector< vector< RDouble > > q;           /*!< \conservation variable of gauss point,cuurect step n. */
+    //[GaussPointIndex]
+    vector< RDouble > visl;             /*!< \the visl in face gauss point*/
+    vector< RDouble > vist;             /*!< \the vist in face gauss point*/
+    /*!
+    * \brief Constructor of the class. Initialize some pointers to NULL.
+    */
+    HighOrderFaceSol(void) {}
+
+    /*!
+    * \brief Destructor of the class. Nothing to be done.
+    */
+    ~HighOrderFaceSol(void) {}
+
+    /*!
+    * \brief Copy constructor of the class.
+    */
+    HighOrderFaceSol(const HighOrderFaceSol &other) {}
+
+    /*!
+    * \brief Assignment operator of the class.
+    */
+    HighOrderFaceSol& operator=(const HighOrderFaceSol &other) { return * this; }
+
+    /*!
+    * \brief Less than operator of the class. Needed for the sorting.
+    The criterion for comparison are the standard element and
+    adjacent volume ID's.
+    */
+    bool operator<(const HighOrderFaceSol &other) const;
+
+    void ComputeCoorOfIntegrationPoint(int nodeNumber, const unsigned long *nodeID, const RDouble *pointX, const RDouble *pointY, const RDouble *pointZ,
+         const vector < vector < RDouble > > & shapeFunctionFacePoint);
+    
+    void ComputeBasisFunction(int iGaussPoint, int leftCell, int rightCell, int nTotalCell, int nPloyOfLeftCell, int nPloyOfRightCell, 
+         RDouble lenScaleOfLeftCell, RDouble lenScaleOfRightCell, const RDouble *Xcc, const RDouble *Ycc, const RDouble *Zcc, const RDouble *leftOrthMatrix, const RDouble *rightOrthMatrix);
+
+    void ComputeMetricNormalsFace(int iGaussPoint, int iFaceVTKType, int nodenumber, const unsigned long *nodeID, const RDouble *pointX, const RDouble *pointY, const RDouble *pointZ,
+                                                        RDouble *gradXiShapeFunction, RDouble *gradEtShapeFunction);
+
+private:
+    /*!
+    * \brief Copy function. Needed for the copy constructor and assignment operator.
+    */
+    void Copy(const HighOrderFaceSol &other);
+};
+
+/*!
+ * \class HighOrderCell
+ * \brief Class to store a cell for the unstr high-order solver.
+ * \only geometry information,using for h-multigrid
+ * \author 
+ * \version
+ */
+class HighOrderCell 
+{
+public:
+    unsigned long ID;             /*!< \brief Global element ID of this element. */
+    
+    unsigned short nFaces;                  /*!< \brief Number of faces of the element. */
+    vector<unsigned long> faceIDs;      /*!< \brief Vector with the node IDs of the grid for this element. */
+    unsigned short nNodes;
+    vector<unsigned long> nodeIDs;      /*!< \brief Vector with the node IDs of the grid for this element. */
+
+    //unsigned short indStandardElement;      /*!< \brief Index in the vector of standard elements. */
+    //bool IsOwnedCell;                       /*!< \brief Whether or not this is an owned element. */
+    //bool JacIsConsideredConstant;           /*!< \brief Whether or not the Jacobian of the transformation to the standard element is considered constant. */
+    
+    unsigned short nPolyGrid;               /*!< \brief Polynomial degree for the geometry of the element. */
+    unsigned short VTK_Type;                /*!< \brief Element type using the VTK convention. */
+    unsigned short nDOFsGrid;               /*!< \brief Number of DOFs for the geometry of the element. */
+   
+    unsigned short standardElementIndex;     /*!< \brief mark standard Element type , standardCellElements[standardElementType]
+                                            /*!< different VTK_Type,  VTK_Type only mark the type, no linear or quadratic type */
+    RDouble volume;
+    RDouble centerCoord[3];
+    RDouble lenScale;                /*!< \brief Length scale of the element. */
+
+    //RDouble shockSensorValue;               /*!< \brief Value for sensing a shock */
+    //RDouble shockArtificialViscosity;       /*!< \brief Artificial viscosity for a shock */
+       
+    /*!
+    * \brief Constructor of the class. Initialize the pointers to NULL.
+    */
+    HighOrderCell(void) {}
+
+    /*!
+    * \brief Destructor of the class. Nothing to be done.
+    */
+    ~HighOrderCell(void) {}
+
+    /*!
+    * \brief Get all the corner points of all the faces of this element. It must be made sure
+    that the numbering of the faces is identical to the numbering used for the
+    standard elements.
+    * \param[out] nFaces         - Number of faces of this element.
+    * \param[out] nPointsPerFace - Number of corner points for each of the faces.
+    * \param[out] faceConn       - Global IDs of the corner points of the faces.
+    */
+    //void GetCornerPointsAllFaces(unsigned short &numFaces, unsigned short nPointsPerFace[], unsigned long  faceConn[6][4]);
+    const unsigned long * GetnodeIDsGrid(void) const { return nodeIDs.data();}
+};
+
+/*!
+ * \class HighOrderCellSol
+ * \brief Class to store a cell for the unstr high-order solver.
+ * \only solution information, using for Hp-multigrid
+ * \author 
+ * \version
+ */
+
+class HighOrderCellSol
+{
+public:
+    //unsigned short VTK_Type;             /*!< \brief Element type using the VTK convention. */
+    unsigned long ID;                      /*!< \brief Global element ID of this element. */
+    unsigned short nPolySol;               /*!< \brief Polynomial degree for the solution of the element. */
+    unsigned short nFVPolySol;             /*!< \brief Polynomial degree for the solution of the element. */
+    unsigned short nDOFsSol;               /*!< \brief Number of DOFs for the solution of the element. */
+    unsigned short integNumberOfGaussPoint;      
+    
+    unsigned long offsetDOFsSolGlobal;     /*!< \brief Global offset of the solution DOFs of this element. */
+    unsigned long offsetDOFsSolLocal;      /*!< \brief Local offset of the solution DOFs of this element. */
+
+    vector<RDouble> massMatrix;             /*!< \brief Mass matrix for this element. */
+    vector<RDouble> invMassMatrix;          /*!< \brief Inverse mass matrix for this element. */
+    vector<RDouble> orthogonalizedMatrix;   /*!< \brief orthogonalized matrix for basis function. */
+
+    vector<RDouble> coorXIntegrationPoints; /*!< \brief The coordinates X of the integration points of this element. */
+    vector<RDouble> coorYIntegrationPoints; /*!< \brief The coordinates Y of the integration points of this element. */
+    vector<RDouble> coorZIntegrationPoints; /*!< \brief The coordinates Z of the integration points of this element. */
+    
+    //[GaussPointIndex][basisFuncIndex]
+    vector< vector<RDouble> > basisFuncCellIntegration;   /*!< \brief the cell basis functions at the integration points. */
+    vector< vector<RDouble> > dxBasisFuncCellIntegration; /*!< \brief x-derivatives of the cell basis functions at the integration points. */
+    vector< vector<RDouble> > dyBasisFuncCellIntegration; /*!< \brief y-derivatives of the cell basis functions at the integration points. */
+    vector< vector<RDouble> > dzBasisFuncCellIntegration; /*!< \brief z-derivatives of the cell basis functions at the integration points. */
+    vector<RDouble> JacDetCellIntegration;                /*!< \brief The Jacobian determinant for the integration points of this cell. */
+
+    vector<RDouble> wallDistance;            /*!< \brief The wall distance to the viscous walls for
+                                              the integration points of this element. */
+
+    vector<RDouble> reconstructMatrix;       /*!< \brief reconstruction matrix for this element. */
+    //[nequ][NDOF]
+    vector< vector< RDouble > > dofQ;        /*!< \dof of conservation variable,cuurect step n. */
+    vector< vector< RDouble > > dofQ1;       /*!< \dof of conservation variable, step n-1. */
+    vector< vector< RDouble > > dofQ2;       /*!< \dof of conservation variable, step n-2. */
+    vector< vector< RDouble > > res;         /*!< \res of cuurect step n. */
+    //[nequ][GaussPointIndex]
+    vector< vector< RDouble > > q;           /*!< \conservation variable of gauss point,cuurect step n. */
+    //[nequ]
+    vector< RDouble > qAverage;              /*!< \conservation variable of CellSol */
+    //[GaussPointIndex]
+    vector< RDouble > visl;                  /*!< \the visl  in volume gauss point*/
+    vector< RDouble > vist;                  /*!< \the vist  in volume gauss point*/
+    RDouble vislAverage;                     /*!< \average of visl */
+    RDouble vistAverage;                     /*!< \average of vist */
+
+    typedef Eigen::Matrix<RDouble, Eigen::Dynamic, Eigen::Dynamic> HighOrderMatrix;
+
+    //! @Compute Coordinate of integration point  
+    //! @param[in]   nodenumber                               node number of iCell
+    //! @param[in]   nodeID                                   node ID of iCell
+    //! @param[in]   pointX                                   the coord_X of grid
+    //! @param[in]   pointY                                   the coord_Y of grid
+    //! @param[in]   pointZ                                   the coord_Z of grid
+    //! @param[in]   shapeFunctionVolumPoint                  the shape Function of volum gauss point
+    //! @param[out]  return                                   Coordinate of integration point    
+    void ComputeCoorOfIntegrationPoint(int nodeNumber, const unsigned long *nodeID, const RDouble *pointX, const RDouble *pointY, const RDouble *pointZ,
+         const vector < vector < RDouble > > & shapeFunctionVolumPoint);
+    
+    void ComputeOriginalBasisFunction(int currentOrder, RDouble lenScaleOfCell, const RDouble Xcc, const RDouble Ycc, const RDouble Zcc);
+
+    void ComputeOriginalMassmatrix(HighOrderMatrix & taylorBasisMassMatrix, const RDouble *weightCoeff);
+
+    void ComputeJacobianDeterminant(int iGaussPoint, int iCellVTKType, int nodenumber, const unsigned long *nodeID, const RDouble *pointX, const RDouble *pointY, const RDouble *pointZ,
+        RDouble *gradXiShapeFunction, RDouble *gradEtShapeFunction, RDouble *gradZtShapeFunction);
+
+    void ComputeOrthogonalBasisFunction(int degreeOfFreedom, HighOrderMatrix & orthogonalizationMatrix);
+    void TestOrthogonalBasisFunction(const RDouble *weight);
+
+    void ComputeGradOfBasisFunctionIntegrationPoint(HighOrderMatrix & orthogonalizationMatrix, int iGaussPoint, 
+        RDouble lenScaleOfCell);
+
+    RDouble * GetOrthogonalizedMatrix()
+    {
+        return orthogonalizedMatrix.data();
+    }
+    /*!
+    * \brief Constructor of the class. Initialize the pointers to NULL.
+    */
+    //HighOrderCellSol(void) {}
+    HighOrderCellSol(void);
+
+    /*!
+    * \brief Destructor of the class. Nothing to be done.
+    */
+    ~HighOrderCellSol(void) {}
+};
+
+//class HighOrderStandardCell;
+
+class HighOrderGrid
+{
+public:
+    //[iCell]
+    std::vector<HighOrderCell> highOrderCells;
+    std::vector<HighOrderFace> highOrderFaces;
+    std::vector<HighOrderNode> highOrderNodes;
+
+    //[pLevel][iCell]
+    typedef std::vector< std::vector<HighOrderCellSol> > CellSolType;
+    typedef std::vector< std::vector<HighOrderFaceSol> > FaceSolType;
+    typedef Eigen::Matrix<RDouble, Eigen::Dynamic, Eigen::Dynamic> HighOrderMatrix;
+
+    //[pLevel][iCell]
+    CellSolType highOrderCellsSol;
+    FaceSolType highOrderFacesSol;
+    //[pLevel]
+    std::vector< int > totalFaceGaussPoint;
+    
+    vector< HighOrderStandardCell > standardCellElements;
+    vector< HighOrderStandardFace > standardFaceElements;
+
+public:
+    HighOrderGrid(void) {}
+    ~HighOrderGrid(void) {}
+
+    void CopyGeometryInfoToHighOrderCell(UnstructGrid * grid);
+    void CopyGeometryInfoToHighOrderFace(UnstructGrid * grid);
+    void CopyGeometryInfoToHighOrderNode(UnstructGrid * grid);
+
+    //! @Initialize HighOrderCellSol for different p_multigrid 
+    //! @param[in]   grid                      the input unstructgrid
+    //! @param[in]   dgSolOrder                the accuracy of DG solution
+    //! @param[in]   pMultiGrid                pmultigrid number
+    //! @param[out]                            initialize HighOrderCellSol and build HighOrderStandardCell 
+    void InitHighOrderCellSol(UnstructGrid *grid, int dgSolOrder, int pMultiGrid, int isUnsteady, int viscousType);
+    
+    //! @Initialize HighOrderFaceSol for different p_multigrid 
+    //! @param[in]   grid                      the input unstructgrid
+    //! @param[in]   dgSolOrder                the accuracy of DG solution
+    //! @param[in]   pMultiGrid                pmultigrid number
+    //! @param[out]                            initialize HighOrderFaceSol and build HighOrderStandardFace
+    void InitHighOrderFaceSol(UnstructGrid *grid, int pMultiGrid, int viscousType);
+    void InitDofOfCell(UnstructGrid *grid, vector < RDouble > & conserValue, int nequ);
+    void InitDofOfCellUnsteady(UnstructGrid * grid, vector < RDouble > & conserValue, int nequ);
+    void InitValueOfFace(const UnstructGrid * grid, const vector < RDouble > & conserValue, int nequ);
+    void InitValueOfFace(const UnstructGrid * grid, const RDouble * conserValue, int nequ);
+
+    void GetNumberOfDOFs(int nCells, int * dofsOfCells);
+
+    //q[iCell][iEqn][iDof]
+    void GetQDOFs(const UnstructGrid *grid, int nequ, RDouble *** q);
+};
+
+}
\ No newline at end of file
diff --git a/CFD/HOSolverUnstruct/include/HOInviscidFlux.h b/CFD/HOSolverUnstruct/include/HOInviscidFlux.h
new file mode 100644
index 0000000..cc23a69
--- /dev/null
+++ b/CFD/HOSolverUnstruct/include/HOInviscidFlux.h
@@ -0,0 +1,26 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      HOInviscidFlux.h
+//! @brief     basis function, such as monomial, orthogonalized etc.
+//! @author    gongxq, liming, Wan yunbo, Xu gang.
+//! @date      2019-11-15
+//! @version   A001
+
+#pragma once
+
+#include "Precision.h"
+
+using PHSPACE::RDouble;
+namespace HOUnstruct
+{
+    void Vanleer_Scheme(int totalGaussPoint, RDouble ** ql, RDouble ** qr, RDouble *areax, RDouble *areay, RDouble *areaz, RDouble gama, RDouble ** flux);    
+}
\ No newline at end of file
diff --git a/CFD/HOSolverUnstruct/include/HOShapeFunction.h b/CFD/HOSolverUnstruct/include/HOShapeFunction.h
new file mode 100644
index 0000000..d5f31b9
--- /dev/null
+++ b/CFD/HOSolverUnstruct/include/HOShapeFunction.h
@@ -0,0 +1,43 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      HOShapeFunction.h
+//! @brief     shape function of all element types supported (such as tri trip2, quad etc.).
+//! @author    liming, gxq, Wan yunbo, Xu gang.
+//! @date      2019-10-15
+//! @version   A001
+
+#pragma once
+
+#include "Precision.h"
+
+namespace HOUnstruct
+{
+
+void ShapeFunctionOfTri(const PHSPACE::RDouble * refCoord, PHSPACE::RDouble * ret);
+void ShapeFunctionOfTriGrad(PHSPACE::RDouble * ret);
+
+void ShapeFunctionOfQuad(const PHSPACE::RDouble * refCoord, PHSPACE::RDouble * ret);
+void ShapeFunctionOfQuadGrad(const PHSPACE::RDouble * refCoord, PHSPACE::RDouble * ret);
+
+void ShapeFunctionOfTetr(const PHSPACE::RDouble * refCoord, PHSPACE::RDouble * ret);
+void ShapeFunctionOfTetrGrad(PHSPACE::RDouble * ret);
+
+void ShapeFunctionOfHex(const PHSPACE::RDouble * refCoord, PHSPACE::RDouble * ret);
+void ShapeFunctionOfHexGrad(const PHSPACE::RDouble * refCoord, PHSPACE::RDouble * ret);
+
+void ShapeFunctionOfPrism(const PHSPACE::RDouble * refCoord, PHSPACE::RDouble * ret);
+void ShapeFunctionOfPrismGrad(const PHSPACE::RDouble * refCoord, PHSPACE::RDouble * ret);
+
+void ShapeFunctionOfPyra(const PHSPACE::RDouble * refCoord, PHSPACE::RDouble * ret);
+void ShapeFunctionOfPyraGrad(const PHSPACE::RDouble * refCoord, PHSPACE::RDouble * ret);
+
+}
\ No newline at end of file
diff --git a/CFD/HOSolverUnstruct/include/HOSimulation.h b/CFD/HOSolverUnstruct/include/HOSimulation.h
new file mode 100644
index 0000000..88d1a31
--- /dev/null
+++ b/CFD/HOSolverUnstruct/include/HOSimulation.h
@@ -0,0 +1,84 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      HOSimulation.h
+//! @brief     High Order Solver Simulation.
+//! @author    xxx
+
+#pragma once
+#include "Region.h"
+using namespace PHSPACE;
+class Zone;
+class TimeSpan;
+class Region;
+
+#include "HODefine.h"
+
+namespace HOUnstruct
+{
+    
+class HOSimulation
+{
+private:
+    PHSPACE::Region * region;
+    PHSPACE::TimeSpan * simu_ts;
+
+    int isUnsteady;
+
+public:
+    HOSimulation(int dimension=3);
+    ~HOSimulation();
+public:
+    void Start();
+    void SolveSimu();
+    void PostSimu();
+    void MultiGridInitFlow();
+    void InitializeProtoTable();
+    void Run();
+
+private:
+    void InitGeometry();
+    void ReadGeometry();
+    void SwapGeommetry();
+    void InitOversetGrid() {}
+    void OversetGridConfig();
+    void ReadGrid();
+    void ReadSimulationInfo();
+
+    //! Define solver names for all zones and create the newly defined solvers.
+    //! IMPORTANT for solver developers:
+    //! Define your solver name which is same with the solver class name here!
+    void DefineAndCreateSolvers();
+
+    //! Initialize each solver on each zone.
+    void InitializeSolvers();
+
+    void ComputeWallDistance();
+
+    void UpdateAllZonesPara();
+    void RunPostProcessing();
+
+    void SolveOneOuterStep();
+    void UpdateOuterIterationStep(int & outnstep);
+    void PreSolve();
+    void MainSolve();
+    void PostSolve();
+
+    void InitGlobalBoundaryCondition();
+
+    void SolveUnsteady();
+    void SolveSteady();
+    void SolveSteadyField();
+
+    bool IsSubIterationConvergence(const int & innstep, const int & min_sub_iter, const int & max_sub_iter, const RDouble & tol_sub_iter, const RDouble & averageQuotientMaxInSolvers);
+};
+
+}
\ No newline at end of file
diff --git a/CFD/HOSolverUnstruct/include/HOSolverUnstruct.h b/CFD/HOSolverUnstruct/include/HOSolverUnstruct.h
new file mode 100644
index 0000000..f1558db
--- /dev/null
+++ b/CFD/HOSolverUnstruct/include/HOSolverUnstruct.h
@@ -0,0 +1,187 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      HOSolverUnstruct.h
+//! @brief     High Order Solver.
+//! @author    Zhang Jian, Wan yunbo, Xu gang.
+
+#pragma once
+#include <vector>
+
+#include "CFDSolver.h"
+#include "HODefine.h"
+#include "HOGeometryStructure.h"
+#include "HOStandardElement.h"
+
+using namespace HOUnstruct;
+//using namespace std;
+
+namespace PHSPACE
+{
+class ActionKey;
+class ActionTag;
+class Grid;
+class FaceProxy;
+
+//! HighOrderSolverUnsruct solver
+class HOSolverUnstruct : public CFDSolver
+{
+private:
+    //[hlevel]
+    std::vector< HighOrderGrid > highOrderGrids;
+
+public:
+    HOSolverUnstruct();
+    ~HOSolverUnstruct();
+    
+public:
+    //! These are cfd solver interface:
+
+    //! Create and init ControlParameters
+    LIB_EXPORT void InitControlParameters();
+
+    //! Update some specific parameters, not in control parameter files.
+    void ReadParameter();
+
+    //! Allocate varibales and update to grid:
+    void AllocateGlobalVar(Grid * gridIn);
+    void DeAllocateGlobalVar(Grid *gridIn);
+
+    //! Register variables that need to MPI communication.
+    void RegisterCFDSolverInterfaceField();
+
+    //! Initialize flow field.
+    //! For NS Solver as example, Will call some other virtual funcions:
+    //! 1. InitFlowAsRestart
+    //! 2. InitFlowAsReadingRestart
+    //! 3. InitDependentVariables
+    //void InitFlow();
+    bool JudgeIfRestart();
+    bool JudgeIfReadAverage();
+    void InitFlowAsRestart();
+    //void InitFlowAsRestart();
+
+    void InitMemory();
+    void ReleaseMemory();
+    void AllocateGlobalVariables();
+    void InitFlow();
+
+    virtual void InitDependentVariables();
+    virtual void Boundary(Grid *gridIn);
+    void CompViscousCoef(Grid *gridIn);
+    void InitViscousCoefTurb(Grid *gridIn);
+
+    void CompGamaAndTField(Grid *gridIn);
+    void ComputeGaussPointQ(Grid *gridIn);
+    void ComputeQAverage(Grid *gridIn);
+
+    //! Init coarse grids flow
+    void InitCoarseGridsFlow();
+    virtual void RestrictAllQ(Grid *fgridIn, Grid *cgridIn);
+
+    void LocalTimeStep(Grid *gridIn);
+    void GlobalTimeStep(Grid *gridIn);
+    void LocalGlobalTimeStep(Grid *gridIn);
+    RDouble ComputeCFL(int hLevel);
+    void InvSpectrumRadius(Grid *grid, RDouble * invSpectrum);
+    void VisSpectrumRadius(Grid *grid, RDouble * visSpectrum);
+
+
+    //! Register action for communicate interface data.
+    //! Usually, using ActionReflect function.
+    //void CommunicationInterfaceData();
+    void UploadInterfaceData(ActionKey *actkey);
+    void DownloadInterfaceData(ActionKey *actkey);
+
+    virtual void ActionReflect(ActionTag *acttag);
+
+    //! Set resiudals to zero
+    //! "res" is a pointer store in grid.
+    void ZeroResiduals(Grid *gridIn);
+    FieldProxy * GetResidualProxy(Grid *gridIn);
+
+    virtual FieldProxy * CreateFieldProxy(Grid *gridIn);
+    virtual void StoreRhsByResidual(Grid *gridIn, FieldProxy *rhsProxy);
+
+    void LoadQ(Grid *gridIn, FieldProxy *qProxy);
+    void Lhs(Grid *gridIn, FieldProxy *dqProxy, double coef);
+
+    //! Compute local time step "dt".
+    //! "dt" is a pointer stored in grid.
+    void TimeStep(Grid *gridIn);
+    void ComputeMinTimeStep(Grid *grid, RDouble & minDt, RDouble & maxDt);
+    virtual void ReduceMaxTimeStep(Grid *gridIn, RDouble globalMinDt);
+
+    //! Integrate one time step
+    //! Including ComputeResidual and time integration(e.g. ForwardLUSGS).
+    //void ForwardStep(Grid *grid, FieldProxy *rhsProxy);
+
+    //! Compute residuals.
+    //! For NS Solver as example, will call some other virutal functions:
+    //! LoadResidual, UpdateResidual
+    //! UpdateResidual includes Boundary, RightHandSide
+    //! RightHandSide includes InviscidFlux, ViscousFlux, SourceFlux
+    //void ComputeResidual(Grid *grid, FieldProxy *rhsProxy);
+
+    virtual void LoadResiduals(Grid *gridIn, FieldProxy *rhsProxy);
+    virtual void UpdateResiduals(Grid *gridIn);
+    virtual void RightHandSide(Grid *gridIn);
+
+    //! Inviscid flux.
+    virtual void InviscidFlux(Grid *gridIn);
+
+    //! Viscous flux.
+    virtual void ViscousFlux (Grid *gridIn);
+
+    //! Source flux, such as chemical source term.
+    virtual void SourceFlux   (Grid *gridIn);
+
+    //! res = res/vol;
+    void ResDivideVol   (Grid *gridIn);
+
+    virtual void RungeKutta(Grid *grid, FieldProxy *rhsProxy);
+    void InviscidFluxForFace(Grid *grid_in);
+    //! Inviscid flux of cell
+    void InviscidFluxForCell(Grid *grid_in);
+
+    //! Time integration using lusgs scheme.
+    void ForwardLUSGS(Grid *gridIn);
+
+    //! sweeps == 1.
+    virtual void FillField(Grid *gridIn, FieldProxy *field1_proxy, FieldProxy *field2_proxy);
+    virtual void SolveLUSGS(Grid *gridIn, FieldProxy *dq_proxy);
+
+    //! sweeps > 1.
+    virtual void FillField(Grid *gridIn, FieldProxy *field_proxy, RDouble value);
+    virtual void SolveLUSGS(Grid *gridIn, FieldProxy *dq_proxy, FieldProxy *rhsProxy, int sweeps, double epsilon);
+
+    virtual void UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dq_proxy);
+
+    virtual void RecoverResidual(Grid *gridIn, FieldProxy *rhsProxy);
+
+    //! After one time step inner integration, do some post solve work
+    //! e.g CommunicationInterfaceData, dump restart file, dump aerodynamic coefficient et, al.
+    virtual int GetNPostSolve();
+    void PostSolve(Grid *gridIn, int stage, int level);
+    int GetSchemeID(const string &scheme_name);
+
+    virtual void GetResidual(ActionKey *actkey);
+
+    void Post() {};
+    //! Prepare post visualization variables, store it in to  postVisualization database.
+    LIB_EXPORT void ComputePostVisualVariables(Post_Visual * postVisualization);
+
+public:
+    //! These are HOSolverUnstruct defined interface.
+
+};
+
+}
\ No newline at end of file
diff --git a/CFD/HOSolverUnstruct/include/HOSolverUnstructParam.h b/CFD/HOSolverUnstruct/include/HOSolverUnstructParam.h
new file mode 100644
index 0000000..607c0b6
--- /dev/null
+++ b/CFD/HOSolverUnstruct/include/HOSolverUnstructParam.h
@@ -0,0 +1,111 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      HOSolverUnstructParam.h
+//! @brief     Record paramters of NS Solver.
+//! @author    Zhang Jian, Wan yunbo, Xu gang.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "Param_CFDSolver.h"
+#include "Precision.h"
+namespace PHSPACE
+{
+
+class HOSolverUnstruct;
+
+class HOSolverUnstructParam : public Param_CFDSolver
+{
+public:
+    LIB_EXPORT HOSolverUnstructParam();
+
+    LIB_EXPORT ~HOSolverUnstructParam();
+
+    friend class HOSolverUnstruct;
+
+public:
+    //! Init all parameters
+    LIB_EXPORT void Init();
+
+    //! Get restart flow file name
+    const string & GetRestartNSFile() const;
+
+    //! Get res file name
+    const string & GetResSaveFile() const;
+
+    //! Get flow field name
+    const string & GetFlowFieldTecFile() const;
+
+    //! Get interval steps of dumping force
+    int GetIntervalStepForce() const;
+
+    //! Get wall temperature
+    RDouble GetWallTemperature() const;
+
+    //! Get number of temperature model
+    int GetNTemperatureModel () const;
+
+    //! Get if carry out precondition or not
+    int GetIfLowSpeedPrecon() const;
+
+    //! Get attacked of angle
+    double GetAoA() const;
+
+    //! Get the entropy fix coefficient 1 of Roe method
+    RDouble GetRoeEntropyFixCoef1() const;
+    
+    //! Get the entropy fix coefficient 2 of Roe method
+    RDouble GetRoeEntropyFixCoef2() const;
+
+    //! Get angle of slide
+    RDouble GetAngleOfSlide () const;
+    
+    //! Get inviscos flux type
+    string GetSpaceSecheme () const;
+
+    //! Get p_multigrid type
+    int GetPMultiGrid () const;
+
+    RDouble GetR() const;
+
+private:
+    string restartNSFile;
+    string resSaveFile;
+    string flowFieldTecFile;
+    int intervalStepForce;
+    RDouble wallTemperature;
+    int nTemperatureModel;
+    int ifLowSpeedPrecon;
+    RDouble RoeEntropyFixCoef1;
+    double AoA;
+    RDouble RoeEntropyFixCoef2;
+    RDouble angleSlide;
+
+    int dgSolOrder, fvSolOrder;
+    int dgSolDof, fvSolDof;
+    int pMultiGrid;
+    string uns_scheme_name;
+
+    RDouble R; // p = rho R T
+};
+
+inline string HOSolverUnstructParam::GetSpaceSecheme() const
+{
+    return uns_scheme_name;
+}
+
+inline int HOSolverUnstructParam::GetPMultiGrid() const
+{
+    return pMultiGrid;
+}
+
+#include "HOSolverUnstructParam.hxx"
+}
\ No newline at end of file
diff --git a/CFD/HOSolverUnstruct/include/HOSolverUnstructParam.hxx b/CFD/HOSolverUnstruct/include/HOSolverUnstructParam.hxx
new file mode 100644
index 0000000..4b7afe6
--- /dev/null
+++ b/CFD/HOSolverUnstruct/include/HOSolverUnstructParam.hxx
@@ -0,0 +1,60 @@
+#pragma once
+
+inline const string & HOSolverUnstructParam::GetRestartNSFile() const
+{
+	return restartNSFile;
+}
+
+inline const string & HOSolverUnstructParam::GetResSaveFile() const
+{
+	return resSaveFile;
+}
+
+inline const string & HOSolverUnstructParam::GetFlowFieldTecFile() const
+{
+	return flowFieldTecFile;
+}
+
+inline int HOSolverUnstructParam::GetIntervalStepForce() const
+{
+	return intervalStepForce;
+}
+
+inline RDouble HOSolverUnstructParam::GetWallTemperature() const
+{
+	return wallTemperature;
+}
+
+inline int HOSolverUnstructParam::GetNTemperatureModel() const
+{
+	return nTemperatureModel;
+}
+
+inline int HOSolverUnstructParam::GetIfLowSpeedPrecon() const
+{
+	return ifLowSpeedPrecon;
+}
+
+inline double HOSolverUnstructParam::GetAoA() const
+{
+	return AoA;
+}
+inline RDouble HOSolverUnstructParam::GetRoeEntropyFixCoef1() const
+{
+	return RoeEntropyFixCoef1;
+}
+
+inline RDouble HOSolverUnstructParam::GetRoeEntropyFixCoef2() const
+{
+	return RoeEntropyFixCoef2;
+}
+
+inline RDouble HOSolverUnstructParam::GetAngleOfSlide () const
+{
+    return angleSlide;
+}
+
+inline RDouble HOSolverUnstructParam::GetR() const
+{
+    return R;
+}
\ No newline at end of file
diff --git a/CFD/HOSolverUnstruct/include/HOStandardElement.h b/CFD/HOSolverUnstruct/include/HOStandardElement.h
new file mode 100644
index 0000000..00571e8
--- /dev/null
+++ b/CFD/HOSolverUnstruct/include/HOStandardElement.h
@@ -0,0 +1,253 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      HOStandardElement.h
+//! @brief     Cell class definition for High Order Solver.
+//! @author    Li Ming, Gong Xiaoquan, Zhang Jian, Wan yunbo, Xu gang.
+
+#pragma once
+
+#include "HODefine.h"
+#include "Geo_UnstructGrid.h"
+
+#include <vector>
+
+using namespace PHSPACE;
+using namespace std;
+
+namespace HOUnstruct
+{
+
+class HighOrderStandardElementBase;
+class HighOrderStandardCell;
+class HighOrderStandardFace;
+
+//! HighOrderStandardElementBase get nIntegrationPoint /location of Integration_Point/ the weights of the integration points
+class HighOrderStandardElementBase 
+{
+protected:
+    unsigned short VTK_Type;                 //!  @StandardElement Type
+    unsigned short integrationOrder;         //!  @order of integration
+    unsigned short nIntegrationPoint;        //!  @integration point's number for this standard element
+    bool constJacobian;             //!  @brief Whether or not the element has a constant Jacobian 
+
+    vector< RDouble > xiIntegration; //! @< \brief xi-location of the integration points for this standard element. */
+    vector< RDouble > etIntegration; //! @< \brief et-location of the integration points for this standard element, if needed. */
+    vector< RDouble > ztIntegration; //! @< \brief zt-location of the integration points for this standard element, if needed. */
+    vector< RDouble > wtIntegration; //! @< \brief The weights of the integration points for this standard element. */
+
+public:
+    HighOrderStandardElementBase() {}
+    virtual ~HighOrderStandardElementBase() {}
+    HighOrderStandardElementBase(unsigned short iVTK_Type,unsigned short iIntegrationOrder);  //! import:VTK_Type and integrationOrder��define:xiIntegration,wtIntegration
+
+    int GetVTK_Type(void) const {return VTK_Type; }; //Get StandardElementBase type
+    int GetNumberOfIntegrationPoint(void) const {return nIntegrationPoint;}          //Get integration point's number of StandardElementBase
+    int GetOrderExact(void){return integrationOrder;}                                //Get integrationOrder of  StandardElementBase
+    const RDouble* GetXiIntegrationCoor(void) const { return xiIntegration.data();}  //Get coord[Xi] Integration_point of StandardElementBase
+    const RDouble* GetEtIntegrationCoor(void) const { return etIntegration.data();}  //Get coord[Et] Integration_point of StandardElementBase
+    const RDouble* GetZtIntegrationCoor(void) const { return ztIntegration.data();}  //Get coord[Zt] Integration_point of StandardElementBase
+    const RDouble* GetWtIntegration(void) const { return wtIntegration.data();}  //Get weights of the integration points for StandardElementBase
+
+    /*!
+    * \brief Function, which determines the integration points for a triangle/quadrilateral/tetrahedron/pyramid/prism/hexahedron
+    such that polynomials of orderExact are integrated exactly.
+    */
+    void IntegrationPointsTriangle(void);
+    void IntegrationPointsQuadrilateral(void);
+    void IntegrationPointsTetrahedron(void);
+    void IntegrationPointsPyramid(void);
+    void IntegrationPointsPrism(void);
+    void IntegrationPointsHexahedron(void);
+
+    /*!
+    * \brief Function, which determines the 1D Gauss Legendre integration points and weights.
+    * \param[in,out] GLPoints  - The location of the Gauss-Legendre integration points.
+    * \param[in,out] GLWeights - The weights of the Gauss-Legendre integration points.
+    */
+    void GaussLegendrePoints1D(vector<RDouble> & GLPoints, vector<RDouble> & GLWeights);
+
+    /*!
+    * \brief Function, which copies the data of the given object into the current object.
+    * \param[in] other - Object, whose data is copied.
+    */
+    void Copy(const HighOrderStandardElementBase & other);
+
+    void ComputeOrthogoMatrix();
+};
+
+void TestOrthogoMatrix();
+
+//StandardElement 
+class HighOrderStandardCell : public HighOrderStandardElementBase
+{
+protected:
+    //bool constJacobian;           //brief Whether or not the element has a constant Jacobian 
+
+    unsigned short nPoly;        /*!< \brief Polynomial degree of the element. */
+    unsigned short nNodes;        /*!< \brief Number of DOFs of the element, the total vertex number. */
+
+    //vector<RDouble> BasisFunction, nNodes defining element;
+    vector< RDouble > vertexXi;     /*!< \brief r-location of vertexs for this standard element. */
+    vector< RDouble > vertexEt;     /*!< \brief s-location of vertexs for this standard element, if needed. */
+    vector< RDouble > vertexZt;     /*!< \brief t-location of vertexs for this standard element, if needed. */
+
+    //[GaussPointsIdx][ShapeDOFsIdx]
+    vector< vector< RDouble > > shapeFunctionAtIntegration;       /*!< \brief Lagrangian basis functions in the integration points. */
+    vector< vector< RDouble > > dXiShapeFunctionAtIntegration; /*!< \brief xi-derivatives of the Lagrangian basis functions in the integration points. */
+    vector< vector< RDouble > > dEtShapeFunctionAtIntegration; /*!< \brief et-derivatives of the Lagrangian basis functions in the integration points. */
+    vector< vector< RDouble > > dZtShapeFunctionAtIntegration; /*!< \brief zt-derivatives of the Lagrangian basis functions in the integration points. */
+
+    vector< unsigned short > connFace0; /*!< \brief Local connectivity of face 0 of the element. The numbering of the DOFs is
+                                        such that the element is to the left of the face. */
+    vector< unsigned short > connFace1; /*!< \brief Local connectivity of face 1 of the element. The numbering of the DOFs is
+                                        such that the element is to the left of the face. */
+    vector< unsigned short > connFace2; /*!< \brief Local connectivity of face 2 of the element, if present. The numbering
+                                        of the DOFs is such that the element is to the left of the face. */
+    vector< unsigned short > connFace3; /*!< \brief Local connectivity of face 3 of the element, if present. The numbering
+                                        of the DOFs is such that the element is to the left of the face. */
+    vector< unsigned short > connFace4; /*!< \brief Local connectivity of face 4 of the element, if present. The numbering
+                                        of the DOFs is such that the element is to the left of the face. */
+    vector< unsigned short > connFace5; /*!< \brief Local connectivity of face 5 of the element, if present. The numbering
+                                        of the DOFs is such that the element is to the left of the face. */    
+public:
+    HighOrderStandardCell() {}
+    virtual ~HighOrderStandardCell() {}
+    HighOrderStandardCell(unsigned short VTK_Type, unsigned short nCellNodes, unsigned short integrationOrder); //! import:VTK_Type and integrationOrder��export:integrationOrder��nIntegrationPoint\
+    //! position of xi,et,zt
+
+    HighOrderStandardCell(const HighOrderStandardCell &other) : HighOrderStandardElementBase(other) {Copy(other);}
+
+    HighOrderStandardCell& operator= (const HighOrderStandardCell &other) {Copy(other); return (*this);}
+
+    void ShapeFunctionsAtGaussPoints();  //compute shape functions of all points
+    void ShapeFunctionsAndDerivativesAtPoint();
+
+    const vector< vector< RDouble > > & GetShapeFunctionsIntegration() { return shapeFunctionAtIntegration; }
+    //RDouble * GetShapeFunctionsIntegration(int iGaussPoint);
+    RDouble * GetdXiShapeFunctionAtIntegration(int iGaussPoint)
+    {
+        return dXiShapeFunctionAtIntegration[iGaussPoint].data();
+    }
+
+    RDouble * GetdEtShapeFunctionAtIntegration(int iGaussPoint)
+    {
+        return dEtShapeFunctionAtIntegration[iGaussPoint].data();
+    }
+
+    RDouble * GetdZtShapeFunctionAtIntegration(int iGaussPoint)
+    {
+        return dZtShapeFunctionAtIntegration[iGaussPoint].data();
+    }
+
+    /*!
+    * \brief Function, which makes available the connectivity of face faceIdx.
+    * \return  The pointer to data, which stores the connectivity of face faceIdx.
+    */
+    unsigned short * GetConnFace(short int faceIdx);
+
+    /*!
+    * \brief Function, which makes available the number of DOFs for this standard element.
+    * \return  The number of DOFs of this standard element.
+    */
+    unsigned short GetNnode(void) const { return nNodes; };
+    /*!
+    * \brief Function, which makes available the polynomial degree for this standard element.
+    * \return  The polynomial degree of this standard element.
+    */
+    unsigned short GetNpoly(void) const { return nPoly; };
+
+    //! @brief Function, which checks if the function arguments correspond to this standard element.
+    //! @param[in] val_VTK_Type           - Type of the face using the VTK convention.
+    //! @param[in] nCellNodes             - the nodes of cell (linear, quadratic).
+    //! @param[in] valIntegrationOrder    - integration order of cell .
+    //! @return Whether or not the function arguments correspond to this standard element.
+    bool SameStandardElement(unsigned short val_VTK_Type, unsigned short val_nPoly, unsigned short valIntegrationOrder);
+
+    const vector<RDouble> *GetVertexXi(void) const;
+    const vector<RDouble> *GetVertexEt(void) const;
+    const vector<RDouble> *GetVertexZt(void) const;
+
+    void Copy(const HighOrderStandardCell &other);
+
+    //! @Determine shape function and its derivativew
+    void DataStandardTetrahedron(void);
+    void DataStandardPyramid(void);
+    void DataStandardPrism(void);
+    void DataStandardHexahedron(void);
+};
+
+//StandardFace
+class HighOrderStandardFace : public HighOrderStandardElementBase
+{
+protected:
+    unsigned short nPoly;             //! @the face grid is linear or quadratic
+    unsigned short nNodes;            //! @the number of nodes on face
+
+    vector< RDouble > vertexXiFace;   /*!< \brief r-location of the DOFs on side 0 of the face. the vertex of face using for shapefunction  */
+    vector< RDouble > vertexEtFace;   /*!< \brief s-location of the DOFs on side 0 of the face */
+    //[GaussPointsIdx][ShapeDOFsIdx]
+    vector< vector< RDouble > > shapeFuncAtFaceIntegration;
+                             
+    vector< vector< RDouble > > dXiShapeFuncFaceIntegration;
+    vector< vector< RDouble > > dEtShapeFuncFaceIntegration;
+
+public:
+    HighOrderStandardFace(){}
+    ~HighOrderStandardFace(){}
+    HighOrderStandardFace(unsigned short VTK_Type, unsigned short nFaceNodes,unsigned short integrationOrder);  //����VTK_Type�Լ�integrationOrder�����constJacobian�Լ���Ԫ���ֵ������λ�ü�Ȩ��ϵ��
+    HighOrderStandardFace(const HighOrderStandardFace &other) : HighOrderStandardElementBase(other) {Copy(other);}
+    HighOrderStandardFace& operator= (const HighOrderStandardFace &other) {Copy(other); return (*this);}
+    void Copy(const HighOrderStandardFace &other);
+
+    /*!
+    * \brief Function, which makes available the r-derivatives of the elements
+    basis functions of side 0 in the integration points.
+    * \return  The pointer to data, which stores this information.
+    */
+    RDouble * GetdXiShapeFunctionAtIntegration(int iGaussPoint)
+    {
+        return dXiShapeFuncFaceIntegration[iGaussPoint].data();
+    }
+
+    RDouble * GetdEtShapeFunctionAtIntegration(int iGaussPoint)
+    {
+        return dEtShapeFuncFaceIntegration[iGaussPoint].data();
+    }
+    /*!
+    * \brief Function, which makes available the face basis functions of side 0
+    in the integration points.
+    * \return  The pointer to data, which stores this information.
+    */
+    const vector< vector< RDouble > > & GetShapeFuncFaceIntegration(void) const { return shapeFuncAtFaceIntegration; }
+    /*!
+    * \brief Function, which makes available the polynomial degree for this standard element.
+    * \return  The polynomial degree of this standard element.
+    */
+    unsigned short GetNpoly(void) const { return nPoly; };
+    unsigned short GetNnode(void) const { return nNodes; };
+    
+    //! @brief Function, which checks if the function arguments correspond to this standard element.
+    //! @param[in] val_VTK_Type        - Type of the face using the VTK convention.
+    //! @param[in] nFaceNodes          - the nodes of face (linear, quadratic).
+    //! @param[in] integrationOrder    - integration order of face .
+    //! @return Whether or not the function arguments correspond to this standard element.
+    
+    bool SameStandardElement(unsigned short val_VTK_Type, unsigned short val_nPoly, unsigned short integrationOrder);
+    //! @Determine shape function and its derivativew
+    void DataStandardTriangle(void);
+    void DataStandardQuadrilateral(void);
+};
+typedef Eigen::Matrix<RDouble, Eigen::Dynamic, Eigen::Dynamic> HighOrderMatrix;
+void Orthogonalize(int degreeOfFreedom, const HighOrderMatrix & taylorBasisMassMatrix, 
+                   HighOrderMatrix & orthogonalizationMatrix);
+
+}
\ No newline at end of file
diff --git a/CFD/HOSolverUnstruct/src/HOBasisFunction.cpp b/CFD/HOSolverUnstruct/src/HOBasisFunction.cpp
new file mode 100644
index 0000000..98ac25e
--- /dev/null
+++ b/CFD/HOSolverUnstruct/src/HOBasisFunction.cpp
@@ -0,0 +1,316 @@
+#include "HODefine.h"
+#include "HOShapeFunction.h"
+
+using PHSPACE::RDouble;
+
+namespace HOUnstruct
+{
+//! calculate monomial basis function
+//! @param[in]   refCoord   coordinates
+//! @param[in]  i        the i-th basis
+//!
+//! @return      basis function value
+RDouble MonomialBasis(const PHSPACE::RDouble * refCoord, unsigned int i)
+{
+    const RDouble xi = refCoord[0];
+    const RDouble et = refCoord[1];
+    const RDouble zt = refCoord[2];
+
+    //(i < ((order)+1)*((order)+2)*((order)+3)/6);
+
+    // monomials. since they are hierarchic we only need one case block.
+    switch (i)
+    {
+    // constant
+    case 0:
+        return 1.0;
+
+    // linears
+    case 1:
+        return xi;
+
+    case 2:
+        return et;
+
+    case 3:
+        return zt;
+
+    // quadratics
+    case 4:
+        return xi*xi;
+
+    case 5:
+        return xi*et;
+
+    case 6:
+        return et*et;
+
+    case 7:
+        return xi*zt;
+
+    case 8:
+        return zt*et;
+
+    case 9:
+        return zt*zt;
+
+    default:
+        return 0.0;
+    }
+}
+
+//! calculate monomial basis function 's grad
+//! @param[in]   refCoord   coordinates
+//! @param[in]  i        the i-th basis
+//! @param[in]  j        the j-th grad 0,1,2 means dxi, dzt, dzt
+//!
+//! @return      basis function grad value
+RDouble MonomialBasisGrad(const PHSPACE::RDouble * refCoord, const unsigned int i, const unsigned int j)
+{
+    const RDouble xi = refCoord[0];
+    const RDouble et = refCoord[1];
+    const RDouble zt = refCoord[2];
+
+    // monomials. since they are hierarchic we only need one case block.
+    switch (j)
+    {
+    // d()/dxi
+    case 0:
+        {
+            switch (i)
+            {
+                // constant
+            case 0:
+                return 0.;
+
+            // linear
+            case 1:
+                return 1.;
+
+            case 2:
+                return 0.;
+
+            case 3:
+                return 0.;
+
+            // quadratic
+            case 4:
+                return 2.*xi;
+
+            case 5:
+                return et;
+
+            case 6:
+                return 0.;
+
+            case 7:
+                return zt;
+
+            case 8:
+                return 0.;
+
+            case 9:
+                return 0.;
+
+            default:
+                return 0.0;
+            }
+        }
+
+    // d()/deta
+    case 1:
+        {
+            switch (i)
+            {
+                // constant
+            case 0:
+                return 0.;
+
+                // linear
+            case 1:
+                return 0.;
+
+            case 2:
+                return 1.;
+
+            case 3:
+                return 0.;
+
+                // quadratic
+            case 4:
+                return 0.;
+
+            case 5:
+                return xi;
+
+            case 6:
+                return 2.*et;
+
+            case 7:
+                return 0.;
+
+            case 8:
+                return zt;
+
+            case 9:
+                return 0.;
+
+            default:
+                return 0.0;
+            }
+        }
+
+    // d()/dzeta
+    case 2:
+        {
+            switch (i)
+            {
+                // constant
+            case 0:
+                return 0.;
+
+                // linear
+            case 1:
+                return 0.;
+
+            case 2:
+                return 0.;
+
+            case 3:
+                return 1.;
+
+                // quadratic
+            case 4:
+                return 0.;
+
+            case 5:
+                return 0.;
+
+            case 6:
+                return 0.;
+
+            case 7:
+                return xi;
+
+            case 8:
+                return et;
+
+            case 9:
+                return 2.*zt;
+
+            default:
+                return 0.0;
+            }
+        }
+
+    default:
+        return 0.0;//("Invalid shape function derivative j = " << j);
+    }
+}
+
+//! calculate monomial basis function
+//! @param[in]   refCoord   coordinates
+//! @param[in]  i        the i-th basis
+//!
+//! @return      basis function value
+RDouble MonomialBasis2d(const PHSPACE::RDouble * refCoord, const unsigned int i)
+{
+    const RDouble xi = refCoord[0];
+    const RDouble et = refCoord[1];
+
+    //(i < ((order)+1)*((order)+2)/2);
+
+    // monomials. since they are hierarchic we only need one case block.
+    switch (i)
+    {
+    // constant
+    case 0:
+        return 1.0;
+
+    // linears
+    case 1:
+        return xi;
+
+    case 2:
+        return et;
+
+    // quadratics
+    case 3:
+        return xi*xi;
+
+    case 4:
+        return xi*et;
+
+    case 5:
+        return et*et;
+
+    // cubics
+    case 6:
+        return xi*xi*xi;
+
+    case 7:
+        return xi*xi*et;
+
+    case 8:
+        return xi*et*et;
+
+    case 9:
+        return et*et*et;
+
+    default:
+        return 0.0;
+    }
+}
+}
+
+#include <iostream>
+#include <cmath>
+//using namespace std;
+
+//using namespace HOUnstruct;
+
+namespace HOUnstruct
+{
+//! test shape function, print some info.
+//! @param[in]   
+//! @param[out]  
+//!
+//! @return        void
+void TestBasisFunction()
+{
+    const RDouble refCoord[3] = { 0.1, 0.2, 0.3 };
+
+    std::cout << "monomial basis function:" << std::endl;
+    for(int i = 0; i < 10; ++i)
+    {
+        std::cout <<  MonomialBasis(refCoord, i) << " ";
+    }
+    std::cout << std::endl;
+
+    for(int j = 0; j < 3; ++j)
+    {
+        std::cout << "monomial basis function grad:" << j << std::endl;
+
+        for(int i = 0; i < 10; ++i)
+        {
+            std::cout <<  MonomialBasisGrad(refCoord, i, j) << " ";
+        }
+        std::cout << std::endl;
+    }
+
+    /*/ out
+    monomial basis function:
+    1 0.1 0.2 0.3 0.01 0.02 0.04 0.03 0.06 0.09
+    monomial basis function grad:0
+    0 1 0 0 0.2 0.2 0 0.3 0 0
+    monomial basis function grad:1
+    0 0 1 0 0 0.1 0.4 0 0.3 0
+    monomial basis function grad:2
+    0 0 0 1 0 0 0 0.1 0.2 0.6
+    */
+
+    //char c;
+    //cin.get(c);
+}
+
+}
\ No newline at end of file
diff --git a/CFD/HOSolverUnstruct/src/HOBoundary.cpp b/CFD/HOSolverUnstruct/src/HOBoundary.cpp
new file mode 100644
index 0000000..633070a
--- /dev/null
+++ b/CFD/HOSolverUnstruct/src/HOBoundary.cpp
@@ -0,0 +1,317 @@
+#include "HODefine.h"
+#include "HOBoundary.h"
+#include "Constants.h"
+#include "Math_BasisFunction.h"
+
+using PHSPACE::RDouble;
+namespace HOUnstruct
+{
+void SymmetryBoundary(int iGausspoint, int numberGaussPoint, RDouble xNormal, RDouble yNormal, RDouble zNormal, vector < vector < RDouble > > & conservationQ)
+{
+    RDouble rhom,um, vm, wm, pm, rhoem, vn;
+    RDouble rhoR,uR, vR, wR;
+
+    rhom  = conservationQ[0][iGausspoint];
+    um    = conservationQ[1][iGausspoint]/rhom;
+    vm    = conservationQ[2][iGausspoint]/rhom;
+    wm    = conservationQ[3][iGausspoint]/rhom;
+    rhoem = conservationQ[4][iGausspoint];
+    pm    = HO_GAMAM1 * (rhoem - 0.5 * rhom * (um * um + vm * vm + wm * wm));
+
+    vn = xNormal * um + yNormal * vm + zNormal * wm;
+
+    int iGaussPointR = iGausspoint + numberGaussPoint;
+
+    rhoR  = rhom;
+    uR    = um - two * xNormal * vn;
+    vR    = vm - two * yNormal * vn;
+    wR    = wm - two * zNormal * vn;
+
+    conservationQ[0][iGaussPointR] = rhoR;
+    conservationQ[1][iGaussPointR] = rhoR*uR;
+    conservationQ[2][iGaussPointR] = rhoR*vR;
+    conservationQ[3][iGaussPointR] = rhoR*wR;
+    conservationQ[4][iGaussPointR] = pm/HO_GAMAM1 + 0.5 * rhoR * (uR * uR + vR * vR + wR * wR);
+}
+
+void SymmetryBC(RDouble *prims, RDouble *primt, RDouble nxs, RDouble nys, RDouble nzs, RDouble vgn, int nl, int nchem)
+{
+    using namespace IDX;
+    int neqn = nl + nchem;
+    for (int m = 0; m < neqn; ++ m)
+    {
+        primt[m] = prims[m];
+    }
+
+    double um, vm, wm, vn;
+    um = prims[IU];
+    vm = prims[IV];
+    wm = prims[IW];
+
+    vn = nxs * um + nys * vm + nzs * wm - vgn;
+
+    primt[IU] = um - two * nxs * vn;
+    primt[IV] = vm - two * nys * vn;
+    primt[IW] = wm - two * nzs * vn;
+}
+
+//! 3D.
+//! Viscous adiabatic wall.
+void ViscousAdiabaticWallBC(RDouble *prims, RDouble *primt, RDouble nxs, RDouble nys, RDouble nzs, RDouble xfv, RDouble yfv, RDouble zfv, RDouble refMachNumber, int nl, int nchem)
+{
+    using namespace IDX;
+    int neqn = nl + nchem;
+    for (int m = 0; m < neqn; ++ m)
+    {
+        primt[m] = prims[m];
+    }
+
+    primt[IU] = - prims[IU] + two * xfv;
+    primt[IV] = - prims[IV] + two * yfv;
+    primt[IW] = - prims[IW] + two * zfv;
+}
+
+void ViscousIsotropicWallBC(RDouble *prims, RDouble *primt, RDouble nxs, RDouble nys, RDouble nzs, RDouble xfv, RDouble yfv, RDouble zfv, RDouble refMachNumber, RDouble tw, int nl, int nchem)
+{
+    using namespace IDX;
+    int neqn = nl + nchem;
+    for (int m = 0; m < neqn; ++ m)
+    {
+        primt[m] = prims[m];
+    }
+
+    primt[IU] = - prims[IU] + two * xfv;
+    primt[IV] = - prims[IV] + two * yfv;
+    primt[IW] = - prims[IW] + two * zfv;
+
+    RDouble omav = one;
+    RDouble coefficientOfStateEquation = 1.0 / (HO_GAMA * refMachNumber * refMachNumber);
+
+    RDouble tm = (1.0 / coefficientOfStateEquation) * prims[IP] / prims[IR];
+
+    RDouble rg, pg, tg; //g ����ghost
+
+    pg = prims[IP];
+    tg = two * tw - tm;
+    if (tg <= 0.0) tg = tw;
+
+    rg = pg / (coefficientOfStateEquation * tg * omav);
+
+    primt[IR] = rg;
+    primt[IP] = pg;
+}
+
+void FarfieldBC(RDouble *prims, RDouble *primInflow, RDouble *primt, RDouble gama0, RDouble gama, RDouble nxs, RDouble nys, RDouble nzs, RDouble vgn, int nl, int nchem)
+{
+    using namespace IDX;
+    int neqn = nl + nchem;
+
+    RDouble rin,uin,vin,win,pin,cIN,vni;
+    RDouble roo,uoo,voo,woo,poo,coo,vno;
+    RDouble lam1,lam2,lam3,gamm1,vei;
+    RDouble vtx ,vty ,vtz ,entr ;
+    RDouble riemm,riemp;
+    RDouble rb,ub,vb,wb,pb,vnb,cb;
+
+    //!inner cells
+    rin = prims[IR];
+    uin = prims[IU];
+    vin = prims[IV];
+    win = prims[IW];
+    pin = prims[IP];
+
+    //!far field
+    roo = primInflow[IR];
+    uoo = primInflow[IU];
+    voo = primInflow[IV];
+    woo = primInflow[IW];
+    poo = primInflow[IP];
+
+    vno = nxs * uoo + nys * voo + nzs * woo - vgn;
+    vni = nxs * uin + nys * vin + nzs * win - vgn;
+
+    coo = sqrt(ABS(gama0 * poo / roo));
+    cIN = sqrt(ABS(gama  * pin / rin));
+
+    gamm1 = gama - one;
+
+    lam1  = vni;
+    lam2  = vni - cIN;
+    lam3  = vni + cIN;
+
+    vei = sqrt(uin * uin + vin * vin + win * win);
+
+    //supersonic flows.
+    if (vei > cIN)
+    {
+        if (vni >= 0.0)
+        {
+            for (int m = 0; m < neqn; ++ m)
+            {
+                primt[m] = prims[m];
+            }
+        }
+        else
+        {
+            for (int m = 0; m < neqn; ++ m)
+            {
+                primt[m] = primInflow[m];
+            }
+        }
+        return;
+    }
+
+    //! if can reach here, it must be the subsonic flow.
+    riemp = vni + 2.0 * cIN / gamm1;
+    riemm = vno - 2.0 * coo / gamm1;
+    vnb =  half * (riemp + riemm);
+    cb  =  0.25 * (riemp - riemm) * gamm1;
+    if (vnb >= 0.0)
+    {
+        // exit
+        entr = pin / pow(rin, gama);
+        vtx  = uin - nxs * vni;
+        vty  = vin - nys * vni;
+        vtz  = win - nzs * vni;
+    }
+    else
+    {
+        //inlet
+        entr = poo / pow(roo, gama);
+        vtx  = uoo - nxs * vno;
+        vty  = voo - nys * vno;
+        vtz  = woo - nzs * vno;
+        //cb  =   0.25 * (riemp - riemm) * gamm1;
+    }
+
+    rb  = pow((cb * cb / (entr * gama)), static_cast<RDouble>(one) / gamm1);
+    ub  = vtx + nxs * vnb;
+    vb  = vty + nys * vnb;
+    wb  = vtz + nzs * vnb;
+    pb  = cb * cb * rb / gama;
+
+    primt[IR] = rb;
+    primt[IU] = ub;
+    primt[IV] = vb;
+    primt[IW] = wb;
+    primt[IP] = pb;
+}
+
+void FarFieldRiemannInvariants(RDouble *prims, RDouble *primInflow, RDouble *primt, RDouble gama0, RDouble gama, RDouble nxs, RDouble nys, RDouble nzs, RDouble vgn, int nl, int nchem)
+{
+    using namespace IDX;
+    int neqn = nl + nchem;
+
+    RDouble rin, uin, vin, win, pin, vnin, cinner, vein;
+    RDouble roo, uoo, voo, woo, poo, vnoo, coo;
+    RDouble rb , ub , vb , wb , pb , vnb , cb;
+
+    //! inner point variables.
+    rin = prims[ IR ];
+    uin = prims[ IU ];
+    vin = prims[ IV ];
+    win = prims[ IW ];
+    pin = prims[ IP ];
+
+    //! infinite variables.
+    roo = primInflow[ IR ];
+    uoo = primInflow[ IU ];
+    voo = primInflow[ IV ];
+    woo = primInflow[ IW ];
+    poo = primInflow[ IP ];
+
+    vnin = nxs * uin + nys * vin + nzs * win - vgn;
+    vnoo = nxs * uoo + nys * voo + nzs * woo - vgn;
+
+    cinner = sqrt(ABS(gama  * pin / rin));
+    coo    = sqrt(ABS(gama0 * poo / roo));
+
+    vein   = sqrt(uin * uin + vin * vin + win * win);
+
+    if (vein > cinner)
+    {
+        //! supersonic.
+        if (vnin >= 0.0)
+        {
+            //! supersonic outlet.
+            for (int m = 0; m < neqn; ++ m)
+            {
+                primt[ m ] = prims[ m ];
+            }
+        }
+        else
+        {
+            //! supersonic inlet.
+            for (int m = 0; m < neqn; ++ m)
+            {
+                primt[ m ] = primInflow[ m ];
+            }
+        }
+    }
+    else
+    {
+        //! subsonic.
+        RDouble gama1 = gama - one;
+        RDouble riemp; //! Riemann invariant for inner.
+        RDouble riemm; //! Riemann invariant for infinite.
+        riemp = vnin + 2.0 * cinner / gama1;
+        riemm = vnoo - 2.0 * coo    / gama1;
+
+        vnb   = half   * (riemp + riemm);
+        cb    = fourth * (riemp - riemm) * gama1;
+
+        double sb;                      //! entropy at the boundary.
+        double uref, vref, wref, vnref; //! Outlet refers to inner point, and inlet refers to infinite.
+        
+        if (vnb > 0.0)
+        {
+            //! subsonic outlet.
+            sb    = pin / pow(rin, gama);
+            uref  = uin;
+            vref  = vin;
+            wref  = win;
+            vnref = vnin;
+        }
+        else
+        {
+            //! subsonic inlet.
+            sb    = poo / pow(roo, gama0);
+            uref  = uoo;
+            vref  = voo;
+            wref  = woo;
+            vnref = vnoo;
+        }
+
+        rb  = pow((cb * cb / (sb * gama)), 1.0 / gama1);
+        ub  = uref + nxs * (vnb - vnref);
+        vb  = vref + nys * (vnb - vnref);
+        wb  = wref + nzs * (vnb - vnref);
+        pb  = cb * cb * rb / gama0; //! The same to "pb = sb * pow(rb, gama0);"
+
+        primt[IR] = rb;
+        primt[IU] = ub;
+        primt[IV] = vb;
+        primt[IW] = wb;
+        primt[IP] = pb;
+    }
+}
+
+void InflowBC(RDouble *prims, RDouble *primt, int nl, int nchem)
+{
+    int neqn = nl + nchem;
+    for (int m = 0; m < neqn; ++ m)
+    {
+        primt[m] = prims[m];
+    }
+}
+
+void OutflowBC(RDouble *prims, RDouble *primt, int nl, int nchem)
+{
+    int neqn = nl + nchem;
+    for (int m = 0; m < neqn; ++ m)
+    {
+        primt[m] = prims[m];
+    }
+}
+}
+
diff --git a/CFD/HOSolverUnstruct/src/HOGaussJacobiQuadrature.cpp b/CFD/HOSolverUnstruct/src/HOGaussJacobiQuadrature.cpp
new file mode 100644
index 0000000..72dfc09
--- /dev/null
+++ b/CFD/HOSolverUnstruct/src/HOGaussJacobiQuadrature.cpp
@@ -0,0 +1,1216 @@
+#include "HODefine.h"
+#include "HOStandardElement.h"
+#include "HOGaussJacobiQuadrature.h"
+#include <vector>
+
+/*----------------------------------------------------------------------------------*/
+/*         Protected member functions of CFEMStandardElementBase.                   */
+/*----------------------------------------------------------------------------------*/
+namespace HOUnstruct
+{
+//****************************************************************************80
+//
+//  gongxq note:tgamma needs to be update
+//*****************************************************************************
+double tgamma(double x)
+{//x>0
+    if(x > 2 && x<= 3)
+    {
+        const double c0 =  0.0000677106;
+        const double c1 = -0.0003442342;
+        const double c2 =  0.0015397681;
+        const double c3 = -0.0024467480;
+        const double c4 =  0.0109736958;
+        const double c5 = -0.0002109075;
+        const double c6 =  0.0742379071;
+        const double c7 =  0.0815782188;
+        const double c8 =  0.4118402518;
+        const double c9 =  0.4227843370;
+        const double c10 = 1.0000000000;
+        double temp = 0;
+        temp = temp + c0*pow(x-2.0, 10.0) + c1*pow(x-2.0, 9.0);
+        temp = temp + c2*pow(x-2.0, 8.0) + c3*pow(x-2.0 , 7.0);
+        temp = temp + c4*pow(x-2.0, 6.0) + c5*pow(x-2.0, 5.0);
+        temp = temp + c6*pow(x-2.0, 4.0) + c7*pow(x-2.0, 3.0);
+        temp = temp + c8*pow(x-2.0, 2.0) + c9*(x-2.0) + c10;
+        return temp;
+    }   
+    else if(x>0 && x<=1)
+    {   
+        return tgamma(x+2)/(x*(x+1));
+    }
+    else if(x > 1 && x<=2)
+    {   
+        return tgamma(x+1)/x;
+    }
+    else if(x > 3)
+    {
+        int i = 1;
+        double temp = 1;
+        while(((x-i)>2 && (x-i) <= 3) == false)
+        {
+            temp = (x-i) * temp;
+            i++;
+        }
+        temp = temp*(x-i);
+        return temp*tgamma(x-i);
+    }
+    else
+    {
+        return 0;
+    }
+}
+
+void CGaussJacobiQuadrature::GetQuadraturePoints(const RDouble   alpha,     const RDouble   beta,
+                                                 const RDouble   a,         const RDouble   b,
+                                                 vector<RDouble> &GJPoints, vector<RDouble> &GJWeights)
+{
+
+    /*--- Determine the number of integration points. Check if the number makes sense. ---*/
+    unsigned int nIntPoints = (unsigned int)GJPoints.size();
+    if(nIntPoints < 1 || nIntPoints > 100)
+        cout<< "Error!!!,Invalid number of Gauss Jacobi integration points" <<endl;
+
+    /*--- Call the function cgqf to do the actual work. ---*/
+    int kind = 4;
+    cgqf(nIntPoints, kind, alpha, beta, a, b, GJPoints.data(), GJWeights.data());
+}
+
+//****************************************************************************80
+void CGaussJacobiQuadrature::cdgqf(int nt, int kind, RDouble alpha, RDouble beta,
+                                    RDouble t[], RDouble wts[])
+//****************************************************************************80
+//
+//  Purpose:
+//
+//    CDGQF computes a Gauss quadrature formula with default A, B and simple knots.
+//
+//  Discussion:
+//
+//    This routine computes all the knots and weights of a Gauss quadrature
+//    formula with a classical weight function with default values for A and B,
+//    and only simple knots.
+//
+//    There are no moments checks and no printing is done.
+//
+//    Use routine EIQFS to evaluate a quadrature computed by CGQFS.
+//
+//  Licensing:
+//
+//    This code is distributed under the GNU LGPL license. 
+//
+//  Modified:
+//
+//    08 January 2010
+//
+//  Author:
+//
+//    Original FORTRAN77 version by Sylvan Elhay, Jaroslav Kautsky.
+//    C++ version by John Burkardt.
+//
+//  Reference:
+//
+//    Sylvan Elhay, Jaroslav Kautsky,
+//    Algorithm 655: IQPACK, FORTRAN Subroutines for the Weights of 
+//    Interpolatory Quadrature,
+//    ACM Transactions on Mathematical Software,
+//    Volume 13, Number 4, December 1987, pages 399-415.
+//
+//  Parameters:
+//
+//    Input, int NT, the number of knots.
+//
+//    Input, int KIND, the rule.
+//    1, Legendre,             (a,b)       1.0
+//    2, Chebyshev,            (a,b)       ((b-x)*(x-a))^(-0.5)
+//    3, Gegenbauer,           (a,b)       ((b-x)*(x-a))^alpha
+//    4, Jacobi,               (a,b)       (b-x)^alpha*(x-a)^beta
+//    5, Generalized Laguerre, (a,inf)     (x-a)^alpha*exp(-b*(x-a))
+//    6, Generalized Hermite,  (-inf,inf)  |x-a|^alpha*exp(-b*(x-a)^2)
+//    7, Exponential,          (a,b)       |x-(a+b)/2.0|^alpha
+//    8, Rational,             (a,inf)     (x-a)^alpha*(x+b)^beta
+//
+//    Input, RDouble ALPHA, the value of Alpha, if needed.
+//
+//    Input, RDouble BETA, the value of Beta, if needed.
+//
+//    Output, RDouble T[NT], the knots.
+//
+//    Output, RDouble WTS[NT], the weights.
+//
+{
+    RDouble *aj;
+    RDouble *bj;
+    RDouble zemu;
+
+    parchk(kind, 2 * nt, alpha, beta);
+    //
+    //  Get the Jacobi matrix and zero-th moment.
+    //
+    aj = new RDouble[nt];
+    bj = new RDouble[nt];
+
+    zemu = class_matrix(kind, nt, alpha, beta, aj, bj);
+    //
+    //  Compute the knots and weights.
+    //
+    sgqf (nt, aj, bj, zemu, t, wts);
+
+    delete [] aj;
+    delete [] bj;
+
+    return;
+}
+
+//****************************************************************************80
+void CGaussJacobiQuadrature::cgqf(int nt, int kind, RDouble alpha, RDouble beta,
+                                  RDouble a, RDouble b, RDouble t[], RDouble wts[])
+//****************************************************************************80
+//
+//  Purpose:
+//
+//    CGQF computes knots and weights of a Gauss quadrature formula.
+//
+//  Discussion:
+//
+//    The user may specify the interval (A,B).
+//
+//    Only simple knots are produced.
+//
+//    Use routine EIQFS to evaluate this quadrature formula.
+//
+//  Licensing:
+//
+//    This code is distributed under the GNU LGPL license. 
+//
+//  Modified:
+//
+//    16 February 2010
+//
+//  Author:
+//
+//    Original FORTRAN77 version by Sylvan Elhay, Jaroslav Kautsky.
+//    C++ version by John Burkardt.
+//
+//  Reference:
+//
+//    Sylvan Elhay, Jaroslav Kautsky,
+//    Algorithm 655: IQPACK, FORTRAN Subroutines for the Weights of 
+//    Interpolatory Quadrature,
+//    ACM Transactions on Mathematical Software,
+//    Volume 13, Number 4, December 1987, pages 399-415.
+//
+//  Parameters:
+//
+//    Input, int NT, the number of knots.
+//
+//    Input, int KIND, the rule.
+//    1, Legendre,             (a,b)       1.0
+//    2, Chebyshev Type 1,     (a,b)       ((b-x)*(x-a))^-0.5)
+//    3, Gegenbauer,           (a,b)       ((b-x)*(x-a))^alpha
+//    4, Jacobi,               (a,b)       (b-x)^alpha*(x-a)^beta
+//    5, Generalized Laguerre, (a,+oo)     (x-a)^alpha*exp(-b*(x-a))
+//    6, Generalized Hermite,  (-oo,+oo)   |x-a|^alpha*exp(-b*(x-a)^2)
+//    7, Exponential,          (a,b)       |x-(a+b)/2.0|^alpha
+//    8, Rational,             (a,+oo)     (x-a)^alpha*(x+b)^beta
+//    9, Chebyshev Type 2,     (a,b)       ((b-x)*(x-a))^(+0.5)
+//
+//    Input, RDouble ALPHA, the value of Alpha, if needed.
+//
+//    Input, RDouble BETA, the value of Beta, if needed.
+//
+//    Input, RDouble A, B, the interval endpoints, or other parameters.
+//
+//    Output, RDouble T[NT], the knots.
+//
+//    Output, RDouble WTS[NT], the weights.
+//
+{
+    int i;
+    int *mlt;
+    int *ndx;
+    //
+    //  Compute the Gauss quadrature formula for default values of A and B.
+    //
+    cdgqf(nt, kind, alpha, beta, t, wts);
+    //
+    //  Prepare to scale the quadrature formula to other weight function with 
+    //  valid A and B.
+    //
+    mlt = new int[nt];
+    for (i = 0; i < nt; i++)
+    {
+        mlt[i] = 1;
+    }
+    ndx = new int[nt];
+    for (i = 0; i < nt; i++)
+    {
+        ndx[i] = i + 1;
+    }
+    scqf(nt, t, mlt, wts, ndx, wts, t, kind, alpha, beta, a, b);
+
+    delete [] mlt;
+    delete [] ndx;
+
+    return;
+}
+//****************************************************************************80
+
+RDouble CGaussJacobiQuadrature::class_matrix(int kind, int m, RDouble alpha, RDouble beta, RDouble aj[], RDouble bj[])
+//****************************************************************************80
+//
+//  Purpose:
+//
+//    CLASS_MATRIX computes the Jacobi matrix for a quadrature rule.
+//
+//  Discussion:
+//
+//    This routine computes the diagonal AJ and sub-diagonal BJ
+//    elements of the order M tridiagonal symmetric Jacobi matrix
+//    associated with the polynomials orthogonal with respect to
+//    the weight function specified by KIND.
+//
+//    For weight functions 1-7, M elements are defined in BJ even
+//    though only M-1 are needed.  For weight function 8, BJ(M) is
+//    set to zero.
+//
+//    The zero-th moment of the weight function is returned in ZEMU.
+//
+//  Licensing:
+//
+//    This code is distributed under the GNU LGPL license. 
+//
+//  Modified:
+//
+//    08 January 2010
+//
+//  Author:
+//
+//    Original FORTRAN77 version by Sylvan Elhay, Jaroslav Kautsky.
+//    C++ version by John Burkardt.
+//
+//  Reference:
+//
+//    Sylvan Elhay, Jaroslav Kautsky,
+//    Algorithm 655: IQPACK, FORTRAN Subroutines for the Weights of 
+//    Interpolatory Quadrature,
+//    ACM Transactions on Mathematical Software,
+//    Volume 13, Number 4, December 1987, pages 399-415.
+//
+//  Parameters:
+//
+//    Input, int KIND, the rule.
+//    1, Legendre,             (a,b)       1.0
+//    2, Chebyshev,            (a,b)       ((b-x)*(x-a))^(-0.5)
+//    3, Gegenbauer,           (a,b)       ((b-x)*(x-a))^alpha
+//    4, Jacobi,               (a,b)       (b-x)^alpha*(x-a)^beta
+//    5, Generalized Laguerre, (a,inf)     (x-a)^alpha*exp(-b*(x-a))
+//    6, Generalized Hermite,  (-inf,inf)  |x-a|^alpha*exp(-b*(x-a)^2)
+//    7, Exponential,          (a,b)       |x-(a+b)/2.0|^alpha
+//    8, Rational,             (a,inf)     (x-a)^alpha*(x+b)^beta
+//
+//    Input, int M, the order of the Jacobi matrix.
+//
+//    Input, RDouble ALPHA, the value of Alpha, if needed.
+//
+//    Input, RDouble BETA, the value of Beta, if needed.
+//
+//    Output, RDouble AJ[M], BJ[M], the diagonal and subdiagonal
+//    of the Jacobi matrix.
+//
+//    Output, RDouble CLASS_MATRIX, the zero-th moment.
+//
+{
+    RDouble a2b2;
+    RDouble ab;
+    RDouble aba;
+    RDouble abi;
+    RDouble abj;
+    RDouble abti;
+    RDouble apone;
+    int i;
+    RDouble pi = 3.14159265358979;
+    RDouble temp;
+    RDouble temp2;
+    RDouble zemu;
+
+    temp = r8_epsilon ();
+
+    parchk (kind, 2 * m - 1, alpha, beta);
+
+    temp2 = 0.5;
+
+    if (500.0 * temp < fabs (pow (tgamma (temp2), 2) - pi))
+    {
+        //cout << fabs (pow (tgamma (temp2), 2) - pi) << "\n";
+        //cout << "CLASS_MATRIX - Fatal error!\n";
+        //cout << "  Gamma function does not match machine parameters.\n";
+        //exit (1);
+    }
+
+    if (kind == 1)
+    {
+        ab = 0.0;
+
+        zemu = 2.0 / (ab + 1.0);
+
+        for (i = 0; i < m; i++)
+        {
+            aj[i] = 0.0;
+        }
+
+        for (i = 1; i <= m; i++)
+        {
+            abi = i + ab * (i % 2);
+            abj = 2 * i + ab;
+            bj[i-1] = sqrt (abi * abi / (abj * abj - 1.0));
+        }
+    }
+    else if (kind == 2)
+    {
+        zemu = pi;
+
+        for (i = 0; i < m; i++)
+        {
+            aj[i] = 0.0;
+        }
+
+        bj[0] =  sqrt (0.5);
+        for (i = 1; i < m; i++)
+        {
+            bj[i] = 0.5;
+        }
+    }
+    else if (kind == 3)
+    {
+        ab = alpha * 2.0;
+        zemu = pow (2.0, ab + 1.0) * pow (tgamma (alpha + 1.0), 2)
+            / tgamma (ab + 2.0);
+
+        for (i = 0; i < m; i++)
+        {
+            aj[i] = 0.0;
+        }
+
+        bj[0] = sqrt (1.0 / (2.0 * alpha + 3.0));
+        for (i = 2; i <= m; i++)
+        {
+            bj[i-1] = sqrt (i * (i + ab) / (4.0 * pow (i + alpha, 2) - 1.0));
+        }
+    }
+    else if (kind == 4)
+    {
+        ab = alpha + beta;
+        abi = 2.0 + ab;
+        zemu = pow (2.0, ab + 1.0) * tgamma (alpha + 1.0) 
+            * tgamma (beta + 1.0) / tgamma (abi);
+        aj[0] = (beta - alpha) / abi;
+        bj[0] = sqrt (4.0 * (1.0 + alpha) * (1.0 + beta) 
+            / ((abi + 1.0) * abi * abi));
+        a2b2 = beta * beta - alpha * alpha;
+
+        for (i = 2; i <= m; i++)
+        {
+            abi = 2.0 * i + ab;
+            aj[i-1] = a2b2 / ((abi - 2.0) * abi);
+            abi = abi * abi;
+            bj[i-1] = sqrt (4.0 * i * (i + alpha) * (i + beta) * (i + ab) 
+                / ((abi - 1.0) * abi));
+        }
+    }
+    else if (kind == 5)
+    {
+        zemu = tgamma (alpha + 1.0);
+
+        for (i = 1; i <= m; i++)
+        {
+            aj[i-1] = 2.0 * i - 1.0 + alpha;
+            bj[i-1] = sqrt (i * (i + alpha));
+        }
+    }
+    else if (kind == 6)
+    {
+        zemu = tgamma ((alpha + 1.0) / 2.0);
+
+        for (i = 0; i < m; i++)
+        {
+            aj[i] = 0.0;
+        }
+
+        for (i = 1; i <= m; i++)
+        {
+            bj[i-1] = sqrt ((i + alpha * (i % 2)) / 2.0);
+        }
+    }
+    else if (kind == 7)
+    {
+        ab = alpha;
+        zemu = 2.0 / (ab + 1.0);
+
+        for (i = 0; i < m; i++)
+        {
+            aj[i] = 0.0;
+        }
+
+        for (i = 1; i <= m; i++)
+        {
+            abi = i + ab * (i % 2);
+            abj = 2 * i + ab;
+            bj[i-1] = sqrt (abi * abi / (abj * abj - 1.0));
+        }
+    }
+    else   // if (kind == 8)
+    {
+        ab = alpha + beta;
+        zemu = tgamma (alpha + 1.0) * tgamma (- (ab + 1.0)) 
+            / tgamma (- beta);
+        apone = alpha + 1.0;
+        aba = ab * apone;
+        aj[0] = - apone / (ab + 2.0);
+        bj[0] = - aj[0] * (beta + 1.0) / (ab + 2.0) / (ab + 3.0);
+        for (i = 2; i <= m; i++)
+        {
+            abti = ab + 2.0 * i;
+            aj[i-1] = aba + 2.0 * (ab + i) * (i - 1);
+            aj[i-1] = - aj[i-1] / abti / (abti - 2.0);
+        }
+
+        for (i = 2; i <= m - 1; i++)
+        {
+            abti = ab + 2.0 * i;
+            bj[i-1] = i * (alpha + i) / (abti - 1.0) * (beta + i) 
+                / (abti * abti) * (ab + i) / (abti + 1.0);
+        }
+        bj[m-1] = 0.0;
+        for (i = 0; i < m; i++)
+        {
+            bj[i] =  sqrt (bj[i]);
+        }
+    }
+
+    return zemu;
+}
+//****************************************************************************80
+
+void CGaussJacobiQuadrature::imtqlx(int n, RDouble d[], RDouble e[], RDouble z[])
+//****************************************************************************80
+//
+//  Purpose:
+//
+//    IMTQLX diagonalizes a symmetric tridiagonal matrix.
+//
+//  Discussion:
+//
+//    This routine is a slightly modified version of the EISPACK routine to 
+//    perform the implicit QL algorithm on a symmetric tridiagonal matrix. 
+//
+//    The authors thank the authors of EISPACK for permission to use this
+//    routine. 
+//
+//    It has been modified to produce the product Q' * Z, where Z is an input 
+//    vector and Q is the orthogonal matrix diagonalizing the input matrix.  
+//    The changes consist (essentialy) of applying the orthogonal transformations
+//    directly to Z as they are generated.
+//
+//  Licensing:
+//
+//    This code is distributed under the GNU LGPL license. 
+//
+//  Modified:
+//
+//    08 January 2010
+//
+//  Author:
+//
+//    Original FORTRAN77 version by Sylvan Elhay, Jaroslav Kautsky.
+//    C++ version by John Burkardt.
+//
+//  Reference:
+//
+//    Sylvan Elhay, Jaroslav Kautsky,
+//    Algorithm 655: IQPACK, FORTRAN Subroutines for the Weights of 
+//    Interpolatory Quadrature,
+//    ACM Transactions on Mathematical Software,
+//    Volume 13, Number 4, December 1987, pages 399-415.
+//
+//    Roger Martin, James Wilkinson,
+//    The Implicit QL Algorithm,
+//    Numerische Mathematik,
+//    Volume 12, Number 5, December 1968, pages 377-383.
+//
+//  Parameters:
+//
+//    Input, int N, the order of the matrix.
+//
+//    Input/output, RDouble D(N), the diagonal entries of the matrix.
+//    On output, the information in D has been overwritten.
+//
+//    Input/output, RDouble E(N), the subdiagonal entries of the 
+//    matrix, in entries E(1) through E(N-1).  On output, the information in
+//    E has been overwritten.
+//
+//    Input/output, RDouble Z(N).  On input, a vector.  On output,
+//    the value of Q' * Z, where Q is the matrix that diagonalizes the
+//    input symmetric tridiagonal matrix.
+//
+{
+    RDouble b;
+    RDouble c;
+    RDouble f;
+    RDouble g;
+    int i;
+    int ii;
+    int itn = 30;
+    int j;
+    int k;
+    int l;
+    int m = 0;  // To avoid a compiler warning.
+    int mml;
+    RDouble p;
+    RDouble prec;
+    RDouble r;
+    RDouble s;
+
+    prec = r8_epsilon ();
+
+    if (n == 1)
+    {
+        return;
+    }
+
+    e[n-1] = 0.0;
+
+    for (l = 1; l <= n; l++)
+    {
+        j = 0;
+        for (; ;)
+        {
+            for (m = l; m <= n; m++)
+            {
+                if (m == n)
+                {
+                    break;
+                }
+
+                if (fabs (e[m-1]) <= prec * (fabs (d[m-1]) + fabs (d[m])))
+                {
+                    break;
+                }
+            }
+            p = d[l-1];
+            if (m == l)
+            {
+                break;
+            }
+            if (itn <= j)
+            {
+                cout << "\n";
+                cout << "IMTQLX - Fatal error!\n";
+                cout << "  Iteration limit exceeded\n";
+                exit (1);
+            }
+            j = j + 1;
+            g = (d[l] - p) / (2.0 * e[l-1]);
+            r =  sqrt (g * g + 1.0);
+            g = d[m-1] - p + e[l-1] / (g + fabs (r) * r8_sign (g));
+            s = 1.0;
+            c = 1.0;
+            p = 0.0;
+            mml = m - l;
+
+            for (ii = 1; ii <= mml; ii++)
+            {
+                i = m - ii;
+                f = s * e[i-1];
+                b = c * e[i-1];
+
+                if (fabs (g) <= fabs (f))
+                {
+                    c = g / f;
+                    r =  sqrt (c * c + 1.0);
+                    e[i] = f * r;
+                    s = 1.0 / r;
+                    c = c * s;
+                }
+                else
+                {
+                    s = f / g;
+                    r =  sqrt (s * s + 1.0);
+                    e[i] = g * r;
+                    c = 1.0 / r;
+                    s = s * c;
+                }
+                g = d[i] - p;
+                r = (d[i-1] - g) * s + 2.0 * c * b;
+                p = s * r;
+                d[i] = g + p;
+                g = c * r - b;
+                f = z[i];
+                z[i] = s * z[i-1] + c * f;
+                z[i-1] = c * z[i-1] - s * f;
+            }
+            d[l-1] = d[l-1] - p;
+            e[l-1] = g;
+            e[m-1] = 0.0;
+        }
+    }
+    //
+    //  Sorting.
+    //
+    for (ii = 2; ii <= m; ii++)
+    {
+        i = ii - 1;
+        k = i;
+        p = d[i-1];
+
+        for (j = ii; j <= n; j++)
+        {
+            if (d[j-1] < p)
+            {
+                k = j;
+                p = d[j-1];
+            }
+        }
+
+        if (k != i)
+        {
+            d[k-1] = d[i-1];
+            d[i-1] = p;
+            p = z[i-1];
+            z[i-1] = z[k-1];
+            z[k-1] = p;
+        }
+    }
+    return;
+}
+//****************************************************************************80
+
+void CGaussJacobiQuadrature::parchk(int kind, int m, RDouble alpha, RDouble beta)
+//****************************************************************************80
+//
+//  Purpose:
+//
+//    PARCHK checks parameters ALPHA and BETA for classical weight functions. 
+//
+//  Licensing:
+//
+//    This code is distributed under the GNU LGPL license. 
+//
+//  Modified:
+//
+//    07 January 2010
+//
+//  Author:
+//
+//    Original FORTRAN77 version by Sylvan Elhay, Jaroslav Kautsky.
+//    C++ version by John Burkardt.
+//
+//  Reference:
+//
+//    Sylvan Elhay, Jaroslav Kautsky,
+//    Algorithm 655: IQPACK, FORTRAN Subroutines for the Weights of 
+//    Interpolatory Quadrature,
+//    ACM Transactions on Mathematical Software,
+//    Volume 13, Number 4, December 1987, pages 399-415.
+//
+//  Parameters:
+//
+//    Input, int KIND, the rule.
+//    1, Legendre,             (a,b)       1.0
+//    2, Chebyshev,            (a,b)       ((b-x)*(x-a))^(-0.5)
+//    3, Gegenbauer,           (a,b)       ((b-x)*(x-a))^alpha
+//    4, Jacobi,               (a,b)       (b-x)^alpha*(x-a)^beta
+//    5, Generalized Laguerre, (a,inf)     (x-a)^alpha*exp(-b*(x-a))
+//    6, Generalized Hermite,  (-inf,inf)  |x-a|^alpha*exp(-b*(x-a)^2)
+//    7, Exponential,          (a,b)       |x-(a+b)/2.0|^alpha
+//    8, Rational,             (a,inf)     (x-a)^alpha*(x+b)^beta
+//
+//    Input, int M, the order of the highest moment to
+//    be calculated.  This value is only needed when KIND = 8.
+//
+//    Input, RDouble ALPHA, BETA, the parameters, if required
+//    by the value of KIND.
+//
+{
+    RDouble tmp;
+
+    if (kind <= 0)
+    {
+        cout << "\n";
+        cout << "PARCHK - Fatal error!\n";
+        cout << "  KIND <= 0.\n";
+        exit (1);
+    }
+    //
+    //  Check ALPHA for Gegenbauer, Jacobi, Laguerre, Hermite, Exponential.
+    //
+    if (3 <= kind && alpha <= -1.0)
+    {
+        cout << "\n";
+        cout << "PARCHK - Fatal error!\n";
+        cout << "  3 <= KIND and ALPHA <= -1.\n";
+        exit (1);
+    }
+    //
+    //  Check BETA for Jacobi.
+    //
+    if (kind == 4 && beta <= -1.0)
+    {
+        cout << "\n";
+        cout << "PARCHK - Fatal error!\n";
+        cout << "  KIND == 4 and BETA <= -1.0.\n";
+        exit (1);
+    }
+    //
+    //  Check ALPHA and BETA for rational.
+    //
+    if (kind == 8)
+    {
+        tmp = alpha + beta + m + 1.0;
+        if (0.0 <= tmp || tmp <= beta)
+        {
+            cout << "\n";
+            cout << "PARCHK - Fatal error!\n";
+            cout << "  KIND == 8 but condition on ALPHA and BETA fails.\n";
+            exit (1);
+        }
+    }
+    return;
+}
+//****************************************************************************80
+
+RDouble CGaussJacobiQuadrature::r8_epsilon()
+//****************************************************************************80
+//
+//  Purpose:
+//
+//    R8_EPSILON returns the R8 roundoff unit.
+//
+//  Discussion:
+//
+//    The roundoff unit is a number R which is a power of 2 with the
+//    property that, to the precision of the computer's arithmetic,
+//      1 < 1 + R
+//    but
+//      1 = (1 + R / 2)
+//
+//  Licensing:
+//
+//    This code is distributed under the GNU LGPL license.
+//
+//  Modified:
+//
+//    01 September 2012
+//
+//  Author:
+//
+//    John Burkardt
+//
+//  Parameters:
+//
+//    Output, RDouble R8_EPSILON, the R8 round-off unit.
+//
+{
+    //HO_MACHINE_EPSILON   2.2204460492503131e-16
+    //const RDouble value = 2.220446049250313E-016;
+
+    return HO_MACHINE_EPSILON;
+}
+//****************************************************************************80
+
+RDouble CGaussJacobiQuadrature::r8_sign(RDouble x)
+//****************************************************************************80
+//
+//  Purpose:
+//
+//    R8_SIGN returns the sign of an R8.
+//
+//  Licensing:
+//
+//    This code is distributed under the GNU LGPL license. 
+//
+//  Modified:
+//
+//    18 October 2004
+//
+//  Author:
+//
+//    John Burkardt
+//
+//  Parameters:
+//
+//    Input, RDouble X, the number whose sign is desired.
+//
+//    Output, RDouble R8_SIGN, the sign of X.
+//
+{
+    RDouble value;
+
+    if (x < 0.0)
+    {
+        value = -1.0;
+    } 
+    else
+    {
+        value = 1.0;
+    }
+    return value;
+}
+//****************************************************************************80
+
+void CGaussJacobiQuadrature::scqf(int nt, RDouble t[], int mlt[], RDouble wts[],
+                                  int ndx[], RDouble swts[], RDouble st[],
+                                  int kind, RDouble alpha, RDouble beta, RDouble a, 
+                                  RDouble b)
+//****************************************************************************80
+//
+//  Purpose:
+//
+//    SCQF scales a quadrature formula to a nonstandard interval.
+//
+//  Discussion:
+//
+//    The arrays WTS and SWTS may coincide.
+//
+//    The arrays T and ST may coincide.
+//
+//  Licensing:
+//
+//    This code is distributed under the GNU LGPL license. 
+//
+//  Modified:
+//
+//    16 February 2010
+//
+//  Author:
+//
+//    Original FORTRAN77 version by Sylvan Elhay, Jaroslav Kautsky.
+//    C++ version by John Burkardt.
+//
+//  Reference:
+//
+//    Sylvan Elhay, Jaroslav Kautsky,
+//    Algorithm 655: IQPACK, FORTRAN Subroutines for the Weights of 
+//    Interpolatory Quadrature,
+//    ACM Transactions on Mathematical Software,
+//    Volume 13, Number 4, December 1987, pages 399-415.
+//
+//  Parameters:
+//
+//    Input, int NT, the number of knots.
+//
+//    Input, RDouble T[NT], the original knots.
+//
+//    Input, int MLT[NT], the multiplicity of the knots.
+//
+//    Input, RDouble WTS[NWTS], the weights.
+//
+//    Input, int NWTS, the number of weights.
+//
+//    Input, int NDX[NT], used to index the array WTS.  
+//    For more details see the comments in CAWIQ.
+//
+//    Output, RDouble SWTS[NWTS], the scaled weights.
+//
+//    Output, RDouble ST[NT], the scaled knots.
+//
+//    Input, int KIND, the rule.
+//    1, Legendre,             (a,b)       1.0
+//    2, Chebyshev Type 1,     (a,b)       ((b-x)*(x-a))^(-0.5)
+//    3, Gegenbauer,           (a,b)       ((b-x)*(x-a))^alpha
+//    4, Jacobi,               (a,b)       (b-x)^alpha*(x-a)^beta
+//    5, Generalized Laguerre, (a,+oo)     (x-a)^alpha*exp(-b*(x-a))
+//    6, Generalized Hermite,  (-oo,+oo)   |x-a|^alpha*exp(-b*(x-a)^2)
+//    7, Exponential,          (a,b)       |x-(a+b)/2.0|^alpha
+//    8, Rational,             (a,+oo)     (x-a)^alpha*(x+b)^beta
+//    9, Chebyshev Type 2,     (a,b)       ((b-x)*(x-a))^(+0.5)
+//
+//    Input, RDouble ALPHA, the value of Alpha, if needed.
+//
+//    Input, RDouble BETA, the value of Beta, if needed.
+//
+//    Input, RDouble A, B, the interval endpoints.
+//
+{
+    RDouble al;
+    RDouble be;
+    int i;
+    int k;
+    int l;
+    RDouble p;
+    RDouble shft;
+    RDouble slp;
+    RDouble temp;
+    RDouble tmp;
+
+    temp = r8_epsilon ();
+
+    parchk (kind, 1, alpha, beta);
+
+    if (kind == 1)
+    {
+        al = 0.0;
+        be = 0.0;
+        if (fabs (b - a) <= temp)
+        {
+            cout << "\n";
+            cout << "SCQF - Fatal error!\n";
+            cout << "  |B - A| too small.\n";
+            exit (1);
+        }
+        shft = (a + b) / 2.0;
+        slp = (b - a) / 2.0;
+    }
+    else if (kind == 2)
+    {
+        al = -0.5;
+        be = -0.5;
+        if (fabs (b - a) <= temp)
+        {
+            cout << "\n";
+            cout << "SCQF - Fatal error!\n";
+            cout << "  |B - A| too small.\n";
+            exit (1);
+        }
+        shft = (a + b) / 2.0;
+        slp = (b - a) / 2.0;
+    }
+    else if (kind == 3)
+    {
+        al = alpha;
+        be = alpha;
+        if (fabs (b - a) <= temp)
+        {
+            cout << "\n";
+            cout << "SCQF - Fatal error!\n";
+            cout << "  |B - A| too small.\n";
+            exit (1);
+        }
+        shft = (a + b) / 2.0;
+        slp = (b - a) / 2.0;
+    }
+    else if (kind == 4)
+    {
+        al = alpha;
+        be = beta;
+
+        if (fabs (b - a) <= temp)
+        {
+            cout << "\n";
+            cout << "SCQF - Fatal error!\n";
+            cout << "  |B - A| too small.\n";
+            exit (1);
+        }
+        shft = (a + b) / 2.0;
+        slp = (b - a) / 2.0;
+    }
+    else if (kind == 5)
+    {
+        if (b <= 0.0)
+        {
+            cout << "\n";
+            cout << "SCQF - Fatal error!\n";
+            cout << "  B <= 0\n";
+            exit (1);
+        }
+        shft = a;
+        slp = 1.0 / b;
+        al = alpha;
+        be = 0.0;
+    }
+    else if (kind == 6)
+    {
+        if (b <= 0.0)
+        {
+            cout << "\n";
+            cout << "SCQF - Fatal error!\n";
+            cout << "  B <= 0.\n";
+            exit (1);
+        }
+        shft = a;
+        slp = 1.0 / sqrt (b);
+        al = alpha;
+        be = 0.0;
+    }
+    else if (kind == 7)
+    {
+        al = alpha;
+        be = 0.0;
+        if (fabs (b - a) <= temp)
+        {
+            cout << "\n";
+            cout << "SCQF - Fatal error!\n";
+            cout << "  |B - A| too small.\n";
+            exit (1);
+        }
+        shft = (a + b) / 2.0;
+        slp = (b - a) / 2.0;
+    }
+    else if (kind == 8)
+    {
+        if (a + b <= 0.0)
+        {
+            cout << "\n";
+            cout << "SCQF - Fatal error!\n";
+            cout << "  A + B <= 0.\n";
+            exit (1);
+        }
+        shft = a;
+        slp = a + b;
+        al = alpha;
+        be = beta;
+    }
+    else  // if (kind == 9)
+    {
+        al = 0.5;
+        be = 0.5;
+        if (fabs (b - a) <= temp)
+        {
+            cout << "\n";
+            cout << "SCQF - Fatal error!\n";
+            cout << "  |B - A| too small.\n";
+            exit (1);
+        }
+        shft = (a + b) / 2.0;
+        slp = (b - a) / 2.0;
+    }
+
+    p = pow (slp, al + be + 1.0);
+
+    for (k = 0; k < nt; k++)
+    {
+        st[k] = shft + slp * t[k];
+        l = abs (ndx[k]);
+
+        if (l != 0)
+        {
+            tmp = p;
+            for (i = l - 1; i <= l - 1 + mlt[k] - 1; i++)
+            {
+                swts[i] = wts[i] * tmp;
+                tmp = tmp * slp;
+            }
+        }
+    }
+    return;
+}
+//****************************************************************************80
+
+void CGaussJacobiQuadrature::sgqf(int nt, RDouble aj[], RDouble bj[], RDouble zemu, RDouble t[], RDouble wts[])
+//****************************************************************************80
+//
+//  Purpose:
+//
+//    SGQF computes knots and weights of a Gauss Quadrature formula.
+//
+//  Discussion:
+//
+//    This routine computes all the knots and weights of a Gauss quadrature
+//    formula with simple knots from the Jacobi matrix and the zero-th
+//    moment of the weight function, using the Golub-Welsch technique.
+//
+//  Licensing:
+//
+//    This code is distributed under the GNU LGPL license. 
+//
+//  Modified:
+//
+//    08 January 2010
+//
+//  Author:
+//
+//    Original FORTRAN77 version by Sylvan Elhay, Jaroslav Kautsky.
+//    C++ version by John Burkardt.
+//
+//  Reference:
+//
+//    Sylvan Elhay, Jaroslav Kautsky,
+//    Algorithm 655: IQPACK, FORTRAN Subroutines for the Weights of 
+//    Interpolatory Quadrature,
+//    ACM Transactions on Mathematical Software,
+//    Volume 13, Number 4, December 1987, pages 399-415.
+//
+//  Parameters:
+//
+//    Input, int NT, the number of knots.
+//
+//    Input, RDouble AJ[NT], the diagonal of the Jacobi matrix.
+//
+//    Input/output, RDouble BJ[NT], the subdiagonal of the Jacobi 
+//    matrix, in entries 1 through NT-1.  On output, BJ has been overwritten.
+//
+//    Input, RDouble ZEMU, the zero-th moment of the weight function.
+//
+//    Output, RDouble T[NT], the knots.
+//
+//    Output, RDouble WTS[NT], the weights.
+//
+{
+    int i;
+    //
+    //  Exit if the zero-th moment is not positive.
+    //
+    if (zemu <= 0.0)
+    {
+        cout << "\n";
+        cout << "SGQF - Fatal error!\n";
+        cout << "  ZEMU <= 0.\n";
+        exit (1);
+    }
+    //
+    //  Set up vectors for IMTQLX.
+    //
+    for (i = 0; i < nt; i++)
+    {
+        t[i] = aj[i];
+    }
+    wts[0] = sqrt (zemu);
+    for (i = 1; i < nt; i++)
+    {
+        wts[i] = 0.0;
+    }
+    //
+    //  Diagonalize the Jacobi matrix.
+    //
+    imtqlx (nt, t, bj, wts);
+
+    for (i = 0; i < nt; i++)
+    {
+        wts[i] = wts[i] * wts[i];
+    }
+
+    return;
+}
+
+#include <iostream>
+#include <cmath>
+
+void TestGaussLegendrePoints1D()
+{
+    /* The class used to determine the integration points. Allocate the memory for the help vectors. */
+    vector<RDouble> GLPoints;
+    vector<RDouble> GLWeights;
+
+    for(int i = 1; i <= 10; ++i)
+    {
+        GLPoints.resize(i);
+        GLWeights.resize(i);
+
+        /* Gauss Legendre quadrature is a special case of Gauss Jacobi integration.
+        Determine the integration points for this case. */
+        CGaussJacobiQuadrature GaussJacobi;
+        GaussJacobi.GetQuadraturePoints(0.0, 0.0, 0, 1.0, GLPoints, GLWeights);
+
+        /* Copy the data back into GLPoints and GLWeights. */
+        for(unsigned long j=0; j<GLPoints.size(); ++j)
+        {
+            ///std::cout << GLPoints[j] << " " << GLWeights[j] << std::endl;
+        }
+
+        //char c;
+        //cin.get(c);
+    }
+}
+
+}
+
diff --git a/CFD/HOSolverUnstruct/src/HOGeometryDtructure.cpp b/CFD/HOSolverUnstruct/src/HOGeometryDtructure.cpp
new file mode 100644
index 0000000..d0cd8fd
--- /dev/null
+++ b/CFD/HOSolverUnstruct/src/HOGeometryDtructure.cpp
@@ -0,0 +1,1544 @@
+#include "HODefine.h"
+#include "HOGeometryStructure.h"
+#include "HOStandardElement.h"
+#include <vector>
+#include "Geo_UnstructBC.h"
+#include "HOSolverUnstructParam.h"
+
+using namespace std;
+using namespace HOUnstruct;
+using namespace PHENGLEI;
+
+namespace HOUnstruct
+{
+
+HighOrderCellSol::HighOrderCellSol(void) 
+{
+    nPolySol                = 0;
+    nFVPolySol              = 0;
+    nDOFsSol                = 0;
+
+    integNumberOfGaussPoint = 0;
+    ID                      = 0;
+    offsetDOFsSolGlobal     = 0;
+    offsetDOFsSolLocal      = 0;
+}
+
+void HighOrderCellSol::ComputeCoorOfIntegrationPoint(int nodenumber, const unsigned long *nodeID, 
+    const RDouble *pointX, const RDouble *pointY, const RDouble *pointZ, const vector < vector < RDouble > > & shapeFunctionVolumPoint)
+{
+    //The dof of shape function is equal to the number of nodes;
+    const int dofOfShapeFunction = nodenumber;
+    for(int iGaussPoint = 0; iGaussPoint < integNumberOfGaussPoint; ++iGaussPoint)
+    {
+        coorXIntegrationPoints[iGaussPoint] = 0.0;
+        coorYIntegrationPoints[iGaussPoint] = 0.0;
+        coorZIntegrationPoints[iGaussPoint] = 0.0;
+
+        for(int iDofShapeFun = 0; iDofShapeFun < dofOfShapeFunction; ++iDofShapeFun)
+        {
+            coorXIntegrationPoints[iGaussPoint] += pointX[nodeID[iDofShapeFun]] * shapeFunctionVolumPoint[iGaussPoint][iDofShapeFun];
+            coorYIntegrationPoints[iGaussPoint] += pointY[nodeID[iDofShapeFun]] * shapeFunctionVolumPoint[iGaussPoint][iDofShapeFun];
+            coorZIntegrationPoints[iGaussPoint] += pointZ[nodeID[iDofShapeFun]] * shapeFunctionVolumPoint[iGaussPoint][iDofShapeFun];
+        }
+    }
+}
+
+void HighOrderCellSol::ComputeOriginalMassmatrix(HighOrderMatrix & taylorBasisMassMatrix, const RDouble *weightCoeff)
+{
+    //compute upper mass matrix
+    RDouble volumJacobian = 0.0;
+    for(int iGaussPoint = 0; iGaussPoint < integNumberOfGaussPoint; ++iGaussPoint)
+    {
+        volumJacobian += weightCoeff[iGaussPoint] * JacDetCellIntegration[iGaussPoint];
+    }
+
+    for(int idof = 0; idof < nDOFsSol; ++idof)
+    {
+        for(int jdof = idof; jdof < nDOFsSol; ++jdof)
+        {
+            for(int iGaussPoint = 0; iGaussPoint < integNumberOfGaussPoint; ++iGaussPoint)
+            {
+                taylorBasisMassMatrix(idof, jdof) += weightCoeff[iGaussPoint] * JacDetCellIntegration[iGaussPoint]
+                * basisFuncCellIntegration[iGaussPoint][idof] * basisFuncCellIntegration[iGaussPoint][jdof];
+            }
+            taylorBasisMassMatrix(idof, jdof) /= volumJacobian;
+        }
+    }
+
+    //Get lower mass matrix
+    for(int idof = 1; idof < nDOFsSol; ++idof)
+    {
+        for(int jdof = 0; jdof < idof; ++jdof)
+        {
+            taylorBasisMassMatrix(idof, jdof) = taylorBasisMassMatrix(jdof, idof);
+        }
+    }
+}
+
+void HighOrderCellSol::ComputeOriginalBasisFunction(int currentOrder, RDouble lenScaleOfCell, const RDouble Xcc, const RDouble Ycc, const RDouble Zcc)
+{
+    //The dof of shape function is equal to the number of nodes;
+    RDouble refCoord[3];
+    RDouble oneDLenScal = 1.0/lenScaleOfCell;
+    // currentOrder is the accurry of polynomial 
+    if(currentOrder == 0)
+    {
+        for(int iGaussPoint = 0; iGaussPoint < integNumberOfGaussPoint; ++iGaussPoint)
+        {
+            basisFuncCellIntegration[iGaussPoint][0] = 1.0;  
+        }
+    }
+    else if(currentOrder == 1)
+    {
+        for(int iGaussPoint = 0; iGaussPoint < integNumberOfGaussPoint; ++iGaussPoint)
+        {
+            refCoord[0] = (coorXIntegrationPoints[iGaussPoint] - Xcc) * oneDLenScal;
+            refCoord[1] = (coorYIntegrationPoints[iGaussPoint] - Ycc) * oneDLenScal;
+            refCoord[2] = (coorZIntegrationPoints[iGaussPoint] - Zcc) * oneDLenScal;
+
+            basisFuncCellIntegration[iGaussPoint][0] = 1.0;  
+            basisFuncCellIntegration[iGaussPoint][1] = refCoord[0];
+            basisFuncCellIntegration[iGaussPoint][2] = refCoord[1];
+            basisFuncCellIntegration[iGaussPoint][3] = refCoord[2];
+        }
+    }
+    else if(currentOrder == 2)
+    {
+        for(int iGaussPoint = 0; iGaussPoint < integNumberOfGaussPoint; ++iGaussPoint)
+        {
+            refCoord[0] = (coorXIntegrationPoints[iGaussPoint] - Xcc) * oneDLenScal;
+            refCoord[1] = (coorYIntegrationPoints[iGaussPoint] - Ycc) * oneDLenScal;
+            refCoord[2] = (coorZIntegrationPoints[iGaussPoint] - Zcc) * oneDLenScal;
+
+            basisFuncCellIntegration[iGaussPoint][0] = 1.0;  
+            basisFuncCellIntegration[iGaussPoint][1] = refCoord[0];
+            basisFuncCellIntegration[iGaussPoint][2] = refCoord[1];
+            basisFuncCellIntegration[iGaussPoint][3] = refCoord[2];
+
+            basisFuncCellIntegration[iGaussPoint][4] = refCoord[0] * refCoord[0];
+            basisFuncCellIntegration[iGaussPoint][5] = refCoord[1] * refCoord[1];
+            basisFuncCellIntegration[iGaussPoint][6] = refCoord[2] * refCoord[2];
+            basisFuncCellIntegration[iGaussPoint][7] = refCoord[0] * refCoord[1];
+            basisFuncCellIntegration[iGaussPoint][8] = refCoord[0] * refCoord[2];
+            basisFuncCellIntegration[iGaussPoint][9] = refCoord[1] * refCoord[2];
+        }
+    }
+}
+
+void HighOrderCellSol::ComputeJacobianDeterminant(int iGaussPoint, int iCellVTKType, int nodeNumber, const unsigned long *nodeID, 
+    const RDouble *pointX, const RDouble *pointY, const RDouble *pointZ, RDouble *gradXiShapeFunction, RDouble *gradEtShapeFunction, RDouble *gradZtShapeFunction)
+{
+    RDouble dxDxi = 0.0;
+    RDouble dxDet = 0.0;
+    RDouble dxDzt = 0.0;
+    RDouble dyDxi = 0.0;
+    RDouble dyDet = 0.0;
+    RDouble dyDzt = 0.0;
+    RDouble dzDxi = 0.0;
+    RDouble dzDet = 0.0;
+    RDouble dzDzt = 0.0;
+
+    //The dof of shape function is equal to the number of nodes;
+    JacDetCellIntegration[iGaussPoint] = 0.0;
+    for(int localNode = 0; localNode < nodeNumber; ++localNode)
+    {
+        dxDxi += pointX[nodeID[localNode]] * gradXiShapeFunction[localNode];
+        dxDet += pointX[nodeID[localNode]] * gradEtShapeFunction[localNode];
+        dxDzt += pointX[nodeID[localNode]] * gradZtShapeFunction[localNode];
+
+        dyDxi += pointY[nodeID[localNode]] * gradXiShapeFunction[localNode];
+        dyDet += pointY[nodeID[localNode]] * gradEtShapeFunction[localNode];
+        dyDzt += pointY[nodeID[localNode]] * gradZtShapeFunction[localNode];
+
+        dzDxi += pointZ[nodeID[localNode]] * gradXiShapeFunction[localNode];
+        dzDet += pointZ[nodeID[localNode]] * gradEtShapeFunction[localNode];
+        dzDzt += pointZ[nodeID[localNode]] * gradZtShapeFunction[localNode];
+    }
+
+    JacDetCellIntegration[iGaussPoint] = dxDxi * dyDet * dzDzt + dxDzt * dyDxi * dzDet + dxDet * dyDzt * dzDxi - 
+        dxDzt * dyDet * dzDxi - dxDxi * dyDzt * dzDet - dxDet * dyDxi * dzDzt;
+
+    switch(iCellVTKType)
+    {
+    case HOUnstruct::TETRAHEDRON:
+        JacDetCellIntegration[iGaussPoint] /= 6.0;
+        break;
+    case HOUnstruct::PYRAMID:
+        JacDetCellIntegration[iGaussPoint] /= (9.0/5.0);
+        break;
+    case HOUnstruct::PRISM:
+        JacDetCellIntegration[iGaussPoint] /= 2.0;
+        break;
+    case HOUnstruct::HEXAHEDRON:
+        JacDetCellIntegration[iGaussPoint] *= 1.0;
+        break;
+    default:
+        break;
+    }
+}
+
+void HighOrderCellSol::ComputeOrthogonalBasisFunction(int degreeOfFreedom, HighOrderMatrix & orthogonalizationMatrix)
+{
+    //20 is the dof for P3,if
+    if(degreeOfFreedom > 20)
+    {
+        cout<<"Currect code only suports fourth-order accuracy,if the accuracy is higher, the number of this function needs to be modified"<<endl;
+    }
+
+    RDouble tmpBasisFunction[20];
+    for(int iGaussPoint = 0; iGaussPoint < integNumberOfGaussPoint; ++iGaussPoint)
+    {
+        for(int idof = 0; idof < nDOFsSol; ++idof)
+        {
+            tmpBasisFunction[idof] = 0.0;
+            for(int jdof = 0; jdof < nDOFsSol; ++jdof)
+            {
+                tmpBasisFunction[idof] += orthogonalizationMatrix(idof,jdof) * basisFuncCellIntegration[iGaussPoint][jdof]; 
+            }
+        }
+        for(int idof = 0; idof < nDOFsSol; ++idof)
+        {
+            basisFuncCellIntegration[iGaussPoint][idof] = tmpBasisFunction[idof];
+        }
+    }        
+}
+
+void HighOrderCellSol::TestOrthogonalBasisFunction(const RDouble *weight)
+{
+    //20 is the dof for P3,if
+    RDouble tmpMatrix[10][10];
+    for(int n=0;n<10;n++)
+    {
+        for(int m=0;m<10;m++)
+        {
+            tmpMatrix[n][m] = 0.0;
+            for(int iGaussPoint = 0; iGaussPoint < integNumberOfGaussPoint; ++iGaussPoint)
+            {
+                tmpMatrix[n][m] += weight[iGaussPoint] *JacDetCellIntegration[iGaussPoint] * basisFuncCellIntegration[iGaussPoint][n] * basisFuncCellIntegration[iGaussPoint][m] ;
+            } 
+            cout<<"n:  "<<n<<"  m:   "<<m<<"    tmpMatrix[n][m]   "<<tmpMatrix[n][m]<<endl;
+        }
+    }
+           
+}
+
+void HighOrderCellSol::ComputeGradOfBasisFunctionIntegrationPoint(HighOrderMatrix & orthogonalizationMatrix, int iGaussPoint, 
+    RDouble lenScaleOfCell)
+{
+    //dxBasisFuncCellIntegration;
+    RDouble oneDLenScal = 1.0/lenScaleOfCell;
+    RDouble dxdBasis[35] = {0};  //number=10:P2,number=20:P3
+    RDouble dydBasis[35] = {0};
+    RDouble dzdBasis[35] = {0};
+
+    if(nPolySol == 0)
+    {
+        dxdBasis[0] = 0.0;
+        dydBasis[0] = 0.0;
+        dzdBasis[0] = 0.0;
+    }
+    else if(nPolySol == 1)
+    {
+        dxdBasis[0] = 0.0;
+        dxdBasis[1] = oneDLenScal;
+        dxdBasis[2] = 0.0;
+        dxdBasis[3] = 0.0;
+
+        dydBasis[0] = 0.0;
+        dydBasis[1] = 0.0;
+        dydBasis[2] = oneDLenScal;
+        dydBasis[3] = 0.0;
+
+        dzdBasis[0] = 0.0;
+        dzdBasis[1] = 0.0;
+        dzdBasis[2] = 0.0;
+        dzdBasis[3] = oneDLenScal;
+    }
+    else if(nPolySol == 2)
+    {
+        dxdBasis[0] = 0.0;
+        dxdBasis[1] = oneDLenScal;
+        dxdBasis[2] = 0.0;
+        dxdBasis[3] = 0.0;
+        dxdBasis[4] = 2.0 * basisFuncCellIntegration[iGaussPoint][1] * oneDLenScal;
+        dxdBasis[5] = 0.0;
+        dxdBasis[6] = 0.0;
+        dxdBasis[7] =       basisFuncCellIntegration[iGaussPoint][2] * oneDLenScal;
+        dxdBasis[8] =       basisFuncCellIntegration[iGaussPoint][3] * oneDLenScal;
+        dxdBasis[9] = 0.0;
+
+        dydBasis[0] = 0.0;
+        dydBasis[1] = 0.0;
+        dydBasis[2] = oneDLenScal;
+        dydBasis[3] = 0.0;
+        dydBasis[4] = 0.0;
+        dydBasis[5] = 2.0 * basisFuncCellIntegration[iGaussPoint][2] * oneDLenScal;
+        dydBasis[6] = 0.0;
+        dydBasis[7] =       basisFuncCellIntegration[iGaussPoint][1] * oneDLenScal;
+        dydBasis[8] = 0.0;
+        dydBasis[9] =       basisFuncCellIntegration[iGaussPoint][3] * oneDLenScal;
+
+        dzdBasis[0] = 0.0;
+        dzdBasis[1] = 0.0;
+        dzdBasis[2] = 0.0;
+        dzdBasis[3] = oneDLenScal;
+        dzdBasis[4] = 0.0;
+        dzdBasis[5] = 0.0;
+        dzdBasis[6] = 2.0 * basisFuncCellIntegration[iGaussPoint][3] * oneDLenScal;
+        dzdBasis[7] = 0.0;
+        dzdBasis[8] =       basisFuncCellIntegration[iGaussPoint][1] * oneDLenScal;
+        dzdBasis[9] =       basisFuncCellIntegration[iGaussPoint][2] * oneDLenScal;
+    }
+
+    for(int idof = 0; idof < nDOFsSol; ++idof)
+    {
+        dxBasisFuncCellIntegration[iGaussPoint][idof] = 0.0;
+        dyBasisFuncCellIntegration[iGaussPoint][idof] = 0.0;
+        dzBasisFuncCellIntegration[iGaussPoint][idof] = 0.0;
+
+        for(int jdof = 0; jdof < nDOFsSol;++jdof)
+        {
+            dxBasisFuncCellIntegration[iGaussPoint][idof] += orthogonalizationMatrix(idof, jdof) * dxdBasis[jdof];
+            dyBasisFuncCellIntegration[iGaussPoint][idof] += orthogonalizationMatrix(idof, jdof) * dydBasis[jdof];
+            dzBasisFuncCellIntegration[iGaussPoint][idof] += orthogonalizationMatrix(idof, jdof) * dzdBasis[jdof];
+        }
+    }
+}
+
+void HighOrderFaceSol::ComputeCoorOfIntegrationPoint(int nodenumber, const unsigned long *nodeID, const RDouble *pointX, const RDouble *pointY, const RDouble *pointZ,
+    const vector < vector < RDouble > > & shapeFunctionFacePoint)
+{
+    //The dof of shape function is equal to the number of nodes;
+    const int dofOfShapeFunction = nodenumber;
+
+    for(int iGaussPoint = 0; iGaussPoint < integNumberOfGaussPoint; ++iGaussPoint)
+    {
+        coorXIntegrationPoints[iGaussPoint] = 0.0;
+        coorYIntegrationPoints[iGaussPoint] = 0.0;
+        coorZIntegrationPoints[iGaussPoint] = 0.0;
+
+        for(int iDofShapeFun = 0; iDofShapeFun < dofOfShapeFunction; ++iDofShapeFun)
+        {
+            coorXIntegrationPoints[iGaussPoint] += pointX[nodeID[iDofShapeFun]]*shapeFunctionFacePoint[iGaussPoint][iDofShapeFun];
+            coorYIntegrationPoints[iGaussPoint] += pointY[nodeID[iDofShapeFun]]*shapeFunctionFacePoint[iGaussPoint][iDofShapeFun];
+            coorZIntegrationPoints[iGaussPoint] += pointZ[nodeID[iDofShapeFun]]*shapeFunctionFacePoint[iGaussPoint][iDofShapeFun];
+        }    
+    }
+}
+
+void HighOrderFaceSol::ComputeBasisFunction(int iGaussPoint, int leftCell, int rightCell, int nTotalCell, int nPloyOfLeftCell, int nPloyOfRightCell, 
+    RDouble lenScaleOfLeftCell, RDouble lenScaleOfRightCell, const RDouble *Xcc, const RDouble *Ycc, const RDouble *Zcc, 
+    const RDouble *leftOrthMatrix, const RDouble *rightOrthMatrix)
+{
+    //leftBasisFuncFaceIntegration;
+    RDouble oneDLeftLenScal  = 1.0/lenScaleOfLeftCell;
+    RDouble oneDRightLenScal = 1.0/lenScaleOfRightCell;
+    //10 if only for P1/P2, if accuracy is P3, 10 should be 20 
+    RDouble refCoord[3],leftBasis[10], rightBasis[10], orthMatrix[10][10];
+    int leftDof = 0, rightDof = 0, counter = 0;
+    if(nPloyOfLeftCell == 0)
+    {
+        leftDof = 1;
+
+        leftBasis[0] = 1.0;
+    }    
+    else if(nPloyOfLeftCell == 1)
+    {
+        leftDof = 4;
+
+        leftBasis[0] = 1.0;
+        leftBasis[1] = (coorXIntegrationPoints[iGaussPoint] - Xcc[leftCell]) * oneDLeftLenScal;
+        leftBasis[2] = (coorYIntegrationPoints[iGaussPoint] - Ycc[leftCell]) * oneDLeftLenScal;
+        leftBasis[3] = (coorZIntegrationPoints[iGaussPoint] - Zcc[leftCell]) * oneDLeftLenScal;
+    }
+    else if(nPloyOfLeftCell == 2)
+    {
+        leftDof = 10;
+        refCoord[0] = (coorXIntegrationPoints[iGaussPoint] - Xcc[leftCell]) * oneDLeftLenScal;
+        refCoord[1] = (coorYIntegrationPoints[iGaussPoint] - Ycc[leftCell]) * oneDLeftLenScal;
+        refCoord[2] = (coorZIntegrationPoints[iGaussPoint] - Zcc[leftCell]) * oneDLeftLenScal;
+
+        leftBasis[0] = 1.0;
+        leftBasis[1] = refCoord[0];
+        leftBasis[2] = refCoord[1];
+        leftBasis[3] = refCoord[2];
+
+        leftBasis[4] = refCoord[0] * refCoord[0];
+        leftBasis[5] = refCoord[1] * refCoord[1];
+        leftBasis[6] = refCoord[2] * refCoord[2];
+        leftBasis[7] = refCoord[0] * refCoord[1];
+        leftBasis[8] = refCoord[0] * refCoord[2];
+        leftBasis[9] = refCoord[1] * refCoord[2];
+    }
+
+    //left side of face
+    counter = 0;
+    for(int iDof = 0; iDof < leftDof; ++iDof)
+    {
+        for(int jDof = 0; jDof < leftDof; ++jDof)
+        {
+            orthMatrix[iDof][jDof] = leftOrthMatrix[counter ++];
+        }
+    }
+
+    for(int iDof = 0; iDof < leftDof; ++iDof)
+    {
+        leftBasisFuncFaceIntegration[iGaussPoint][iDof] = 0.0;
+        for(int jDof = 0; jDof < leftDof; ++jDof)
+        {
+            leftBasisFuncFaceIntegration[iGaussPoint][iDof] += orthMatrix[iDof][jDof] * leftBasis[jDof];
+        }
+    }
+
+    if(rightCell < nTotalCell)
+    {
+        if(nPloyOfRightCell == 0) 
+        {
+            rightDof = 1;
+
+            rightBasis[0] = 1.0;
+        }
+        else if(nPloyOfRightCell == 1) 
+        {
+            rightDof = 4;
+
+            rightBasis[0] = 1.0;
+            rightBasis[1] = (coorXIntegrationPoints[iGaussPoint] - Xcc[rightCell]) * oneDRightLenScal;
+            rightBasis[2] = (coorYIntegrationPoints[iGaussPoint] - Ycc[rightCell]) * oneDRightLenScal;
+            rightBasis[3] = (coorZIntegrationPoints[iGaussPoint] - Zcc[rightCell]) * oneDRightLenScal;
+        }
+        else if(nPloyOfRightCell == 2)
+        {
+            rightDof = 10;
+
+            refCoord[0] = (coorXIntegrationPoints[iGaussPoint] - Xcc[rightCell]) * oneDRightLenScal;
+            refCoord[1] = (coorYIntegrationPoints[iGaussPoint] - Ycc[rightCell]) * oneDRightLenScal;
+            refCoord[2] = (coorZIntegrationPoints[iGaussPoint] - Zcc[rightCell]) * oneDRightLenScal;
+
+            rightBasis[0] = 1.0;
+            rightBasis[1] = refCoord[0];
+            rightBasis[2] = refCoord[1];
+            rightBasis[3] = refCoord[2];
+
+            rightBasis[4] = refCoord[0] * refCoord[0];
+            rightBasis[5] = refCoord[1] * refCoord[1];
+            rightBasis[6] = refCoord[2] * refCoord[2];
+            rightBasis[7] = refCoord[0] * refCoord[1];
+            rightBasis[8] = refCoord[0] * refCoord[2];
+            rightBasis[9] = refCoord[1] * refCoord[2];            
+        }
+
+        //right side of face
+        counter = 0;
+        for(int iDof = 0; iDof < rightDof; ++iDof)
+        {
+            for(int jDof = 0; jDof < rightDof; ++jDof)
+            {
+                orthMatrix[iDof][jDof] = rightOrthMatrix[counter ++];
+            }
+        }
+        for(int iDof = 0; iDof < rightDof; ++iDof)
+        {
+            rightBasisFuncFaceIntegration[iGaussPoint][iDof] = 0.0;
+            for(int jDof = 0; jDof < rightDof; ++jDof)
+            {
+                rightBasisFuncFaceIntegration[iGaussPoint][iDof] += orthMatrix[iDof][jDof] * rightBasis[jDof];
+            }
+        }
+    }
+    else
+    {
+        for(int iDof = 0; iDof < rightDof; ++iDof)
+        {
+            rightBasisFuncFaceIntegration[iGaussPoint][iDof] = leftBasisFuncFaceIntegration[iGaussPoint][iDof];
+        }
+    }
+}
+
+void HighOrderFaceSol::ComputeMetricNormalsFace(int iGaussPoint, int iFaceVTKType, int nodenumber, const unsigned long * nodeID, 
+    const RDouble * pointX, const RDouble * pointY, const RDouble * pointZ, RDouble * gradXiShapeFunction, RDouble * gradEtShapeFunction)
+{   
+    RDouble dxDxi = 0.0;
+    RDouble dxDet = 0.0;
+    RDouble dyDxi = 0.0;
+    RDouble dyDet = 0.0;
+    RDouble dzDxi = 0.0;
+    RDouble dzDet = 0.0;
+    RDouble totalJacobin = 0.0;
+
+    //The dof of shape function is equal to the number of nodes;
+    metricNormalsFace[iGaussPoint][0] = 0.0;
+    metricNormalsFace[iGaussPoint][1] = 0.0;
+    metricNormalsFace[iGaussPoint][2] = 0.0;
+
+    for (int iLocalNode = 0; iLocalNode < nodenumber; ++ iLocalNode)
+    {
+        dxDxi += pointX[nodeID[iLocalNode]] * gradXiShapeFunction[iLocalNode];
+        dxDet += pointX[nodeID[iLocalNode]] * gradEtShapeFunction[iLocalNode];
+
+        dyDxi += pointY[nodeID[iLocalNode]] * gradXiShapeFunction[iLocalNode];
+        dyDet += pointY[nodeID[iLocalNode]] * gradEtShapeFunction[iLocalNode];
+
+        dzDxi += pointZ[nodeID[iLocalNode]] * gradXiShapeFunction[iLocalNode];
+        dzDet += pointZ[nodeID[iLocalNode]] * gradEtShapeFunction[iLocalNode];
+    }
+
+    metricNormalsFace[iGaussPoint][0] = dyDxi * dzDet - dyDet * dzDxi;
+    metricNormalsFace[iGaussPoint][1] = dzDxi * dxDet - dzDet * dxDxi;
+    metricNormalsFace[iGaussPoint][2] = dxDxi * dyDet - dxDet * dyDxi;
+    totalJacobin = sqrt(pow(metricNormalsFace[iGaussPoint][0], 2) + pow(metricNormalsFace[iGaussPoint][1], 2) + pow(metricNormalsFace[iGaussPoint][2], 2));
+
+    metricNormalsFace[iGaussPoint][0] /= totalJacobin;
+    metricNormalsFace[iGaussPoint][1] /= totalJacobin;
+    metricNormalsFace[iGaussPoint][2] /= totalJacobin;
+
+    switch(iFaceVTKType)
+    {
+    case HOUnstruct::TRIANGLE:
+        JacDetFaceIntegration[iGaussPoint] = totalJacobin/2.0;
+        break;
+    case HOUnstruct::QUADRILATERAL:
+        JacDetFaceIntegration[iGaussPoint] = totalJacobin/1.0;
+        break;
+    default:
+        break;
+    }
+}
+
+//! @Application memory for high order cell and  copy the geometry of grid to high order cell,containing 
+//! @param[in]   grid                      the input unstructgrid
+//! @param[out]                            initialize HighOrderCellSol and build HighOrderStandardCell   
+void HighOrderGrid::CopyGeometryInfoToHighOrderCell(UnstructGrid * grid)
+{
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    highOrderCells.resize(nTotal);
+
+    const int * pFaceNumberOfCells = grid->GetFaceNumberOfEachCell();
+    int ** ppFacesOfCells = grid->GetCell2Face();
+    int * pNodeNumberOfCell = grid->GetNodeNumberOfEachCell();
+    //int ** ppNodesOfCells = grid->GetCell2NodeArray();
+    int * pNodesOfCells = grid->GetCell2Node();
+    int cellToNodeIndex = 0;
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        highOrderCells[iCell].ID = iCell;
+
+        highOrderCells[iCell].nFaces = static_cast<unsigned short>(pFaceNumberOfCells[iCell]);
+        for (int ilocalface = 0; ilocalface < highOrderCells[iCell].nFaces; ++ ilocalface)
+        {
+            highOrderCells[iCell].faceIDs.push_back(ppFacesOfCells[iCell][ilocalface]);
+        }
+
+        highOrderCells[iCell].nNodes = static_cast<unsigned short>(pNodeNumberOfCell[iCell]);
+        for (int ilocalnode = 0; ilocalnode < highOrderCells[iCell].nNodes; ++ ilocalnode)
+        {
+            //highOrderCells[iCell].nodeIDsGrid.push_back(ppNodesOfCells[iCell][ilocalnode]);
+            highOrderCells[iCell].nodeIDs.push_back(pNodesOfCells[cellToNodeIndex++]);
+        }
+        if (highOrderCells[iCell].nNodes == 4)
+        {
+            highOrderCells[iCell].nPolyGrid = 1;
+            highOrderCells[iCell].VTK_Type = HOUnstruct::TETRAHEDRON;
+        }
+        else if (highOrderCells[iCell].nNodes == 5)
+        {
+            highOrderCells[iCell].nPolyGrid = 1;
+            highOrderCells[iCell].VTK_Type = HOUnstruct::PYRAMID;
+        }
+        else if (highOrderCells[iCell].nNodes == 6)
+        {
+            highOrderCells[iCell].nPolyGrid = 1;
+            highOrderCells[iCell].VTK_Type = HOUnstruct::PRISM;
+        }
+        else if (highOrderCells[iCell].nNodes == 8)
+        {
+            highOrderCells[iCell].nPolyGrid = 1;
+            highOrderCells[iCell].VTK_Type = HOUnstruct::HEXAHEDRON;
+        }
+        else if (highOrderCells[iCell].nNodes == 10)
+        {
+            highOrderCells[iCell].nPolyGrid = 2;
+            highOrderCells[iCell].VTK_Type = HOUnstruct::TETRAHEDRON;
+        }
+        else if (highOrderCells[iCell].nNodes == 14)
+        {
+            highOrderCells[iCell].nPolyGrid = 1;
+            highOrderCells[iCell].VTK_Type = HOUnstruct::PYRAMID;
+        }
+        else if (highOrderCells[iCell].nNodes == 18)
+        {
+            highOrderCells[iCell].nPolyGrid = 2;
+            highOrderCells[iCell].VTK_Type = HOUnstruct::PRISM;
+        }
+        else if (highOrderCells[iCell].nNodes == 27)
+        {
+            highOrderCells[iCell].nPolyGrid = 2;
+            highOrderCells[iCell].VTK_Type = HOUnstruct::HEXAHEDRON;
+        }
+
+        highOrderCells[iCell].nDOFsGrid = highOrderCells[iCell].nNodes;
+
+        //highOrderCells[iCell].volume = grid->GetVolume()[iCell];
+        //highOrderCells[iCell].centerCoord[0] = grid->GetCellCenterX()[iCell];
+        //highOrderCells[iCell].centerCoord[1] = grid->GetCellCenterY()[iCell];
+        //highOrderCells[iCell].centerCoord[2] = grid->GetCellCenterZ()[iCell];
+
+        //highOrderCells[iCell].lenScale = pow(abs(highOrderCells[iCell].volume), 1.0/3.0);
+    }
+
+    //ghost cell value , we should attention parallel BC
+    int *left_cell_of_face  = grid->GetLeftCellOfFace();
+    int *right_cell_of_face = grid->GetRightCellOfFace();
+    
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    int le = 0, re = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            // iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            le = left_cell_of_face [ iFace ];
+            re = right_cell_of_face[ iFace ];
+            // if is parallel BC, we should get the physical cell 
+            if (IsInterface(bcType)) //interface
+            {
+                continue;
+            }
+            else
+            {
+                highOrderCells[re].ID = re;
+
+                highOrderCells[re].nFaces = highOrderCells[le].nFaces;
+                highOrderCells[re].nNodes = highOrderCells[le].nNodes;
+
+                highOrderCells[re].nPolyGrid = highOrderCells[le].nPolyGrid;
+                highOrderCells[re].VTK_Type = highOrderCells[le].VTK_Type;
+                highOrderCells[re].nDOFsGrid =  highOrderCells[le].nDOFsGrid;
+
+                //highOrderCells[re].volume = grid->GetVolume()[re];
+                //highOrderCells[re].centerCoord[0] = grid->GetCellCenterX()[re];
+                //highOrderCells[re].centerCoord[1] = grid->GetCellCenterY()[re];
+                //highOrderCells[re].centerCoord[2] = grid->GetCellCenterZ()[re];
+
+                //highOrderCells[re].lenScale = pow(abs(highOrderCells[re].volume), 1.0/3.0);
+            }
+        }
+    }
+}
+
+//! @Application memory for high order face and  copy the geometry of grid to high order face,containing 
+void HighOrderGrid::CopyGeometryInfoToHighOrderFace(UnstructGrid *grid)
+{
+    int nTotalFace = grid->GetNTotalFace();
+
+    highOrderFaces.resize(nTotalFace);
+    int * pNodeNumberOfFaces = grid->GetNodeNumberOfEachFace();
+    int ** ppNodesOfFaces = grid->GetFace2NodeArray();
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        highOrderFaces[iFace].ID = iFace;
+
+        highOrderFaces[iFace].nNodes = pNodeNumberOfFaces[iFace];
+        for (unsigned int ilocalnode = 0; ilocalnode < highOrderFaces[iFace].nNodes; ++ ilocalnode)
+        {
+            highOrderFaces[iFace].nodeIDs.push_back(ppNodesOfFaces[iFace][ilocalnode]);
+        }
+
+        if (highOrderFaces[iFace].nNodes == 3)
+        {
+            highOrderFaces[iFace].nPolyGrid = 1;
+            highOrderFaces[iFace].VTK_Type = TRIANGLE;
+        }
+        else if (highOrderFaces[iFace].nNodes == 4)
+        {
+            highOrderFaces[iFace].nPolyGrid = 1;
+            highOrderFaces[iFace].VTK_Type = QUADRILATERAL;
+        }
+        else if (highOrderFaces[iFace].nNodes == 6)
+        {
+            highOrderFaces[iFace].nPolyGrid = 2;
+            highOrderFaces[iFace].VTK_Type = TRIANGLE;
+        }
+        else if (highOrderFaces[iFace].nNodes == 9)
+        {
+            highOrderFaces[iFace].nPolyGrid = 2;
+            highOrderFaces[iFace].VTK_Type = QUADRILATERAL;
+        }
+
+        highOrderFaces[iFace].nDOFsGrid = static_cast<unsigned short>(highOrderFaces[iFace].nNodes);
+        highOrderFaces[iFace].cellID0 = grid->GetLeftCellOfFace()[iFace];
+        highOrderFaces[iFace].cellID1 = grid->GetRightCellOfFace()[iFace];
+
+        //highOrderFaces[iFace].area = grid->GetFaceArea()[iFace];
+        //highOrderFaces[iFace].centerCoord[0] = grid->GetFaceCenterX()[iFace];
+        //highOrderFaces[iFace].centerCoord[1] = grid->GetFaceCenterY()[iFace];
+        //highOrderFaces[iFace].centerCoord[2] = grid->GetFaceCenterZ()[iFace];
+    }
+}
+
+//! @Application memory for high order node and  copy the geometry of grid to high order node,containing 
+void HighOrderGrid::CopyGeometryInfoToHighOrderNode(UnstructGrid *grid)
+{
+    int nTotalNode = grid->GetNTotalNode();
+
+    highOrderNodes.resize(nTotalNode);
+
+    int **ppCellsOfNodes = grid->GetNode2CellArray();
+
+    /*  Xu-Gang
+    int * ppCellsOfNodes = grid->GetCell2Node();
+    int * NodeNumberOfEachCell = grid->GetNodeNumberOfEachCell();
+    */
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        highOrderNodes[iNode].ID = iNode;
+
+        highOrderNodes[iNode].coor[0] = grid->GetX()[iNode];
+        highOrderNodes[iNode].coor[1] = grid->GetY()[iNode];
+        highOrderNodes[iNode].coor[2] = grid->GetZ()[iNode];
+
+        highOrderNodes[iNode].cellIDsOfPoint.resize(grid->GetCellNumberOfEachNode()[iNode]);
+
+        for (int ilocalcell = 0; ilocalcell < highOrderNodes[iNode].cellIDsOfPoint.size(); ++ ilocalcell)
+        {
+            highOrderNodes[iNode].cellIDsOfPoint[ilocalcell] = ppCellsOfNodes[iNode][ilocalcell];
+        }
+       // highOrderNodes[iNode].cellIDsOfPoint.resize(grid->GetCellNumberOfEachNode()[iNode]);
+       //
+       // for (int ilocalcell = 0; ilocalcell < highOrderNodes[iNode].cellIDsOfPoint.size(); ++ ilocalcell)
+       // {
+       //     highOrderNodes[iNode].cellIDsOfPoint[ilocalcell] = ppCellsOfNodes[iNode][ilocalcell];
+       // }
+    }
+}
+
+//! @Initialize HighOrderCellSol for different p_multigrid 
+//! @param[in]   grid_in                   the input unstructgrid
+//! @param[in]   dgSolOrder                the accuracy of DG solution
+//! @param[in]   pMultiGrid                pmultigrid number
+//! @param[out]                            initialize HighOrderCellSol and build HighOrderStandardCell
+void HighOrderGrid::InitHighOrderCellSol(UnstructGrid *grid_in, int dgSolOrder, int pMultiGridLevel, int isUnsteady, int viscousType)
+{     
+    UnstructGrid *grid = UnstructGridCast(grid_in);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    const RDouble * pointX = grid->GetX();
+    const RDouble * pointY = grid->GetY();
+    const RDouble * pointZ = grid->GetZ();
+    RDouble * Xcc = grid->GetCellCenterX();
+    RDouble * Ycc = grid->GetCellCenterY();
+    RDouble * Zcc = grid->GetCellCenterZ();
+    RDouble * vol = grid->GetCellVolume();
+
+    int pMultiGridOrder = 0;                            //! @p_multigrid order
+    unsigned long positionOfDof = 0;                    //! @the dof position of curret cell,using for
+    unsigned short int elementNumberOfOrth = 0;         //! @the number of orth matirx
+    unsigned short int integNumberOfGauss = 0; 
+    unsigned short int accuracyOfVolumeIntegration = 0; //! @the volume integation accuracy
+    unsigned short int iCellVTKType = 0;
+    unsigned short int nCellNodes = 0;
+    unsigned short int degreeOfFreedom = 0;
+    RDouble lenScaleOfCell = 0.0;
+
+    positionOfDof = 0;
+
+    highOrderCellsSol[pMultiGridLevel].resize(nTotal);
+
+    int nDim = grid->GetDim();
+    int neqn = 5;
+
+    if(nDim == 3)
+    {
+        neqn = 5;
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+
+        highOrderCellsSol[pMultiGridLevel][iCell].ID = iCell;
+        highOrderCellsSol[pMultiGridLevel][iCell].nPolySol = static_cast<unsigned short>(dgSolOrder - pMultiGridLevel); //polynomial order
+        // the volume integation accuracy
+        accuracyOfVolumeIntegration = 2 * highOrderCellsSol[pMultiGridLevel][iCell].nPolySol + 2;
+        // unsigned short iCellVTKType = 
+        iCellVTKType = highOrderCells[iCell].VTK_Type;
+        //highOrderCells[iCell].VTK_Type = highOrderCells[iCell].VTK_Type;
+        // get nodes of cell
+        nCellNodes = highOrderCells[iCell].nNodes;
+        unsigned short int iStandElemIndex = 0;                                   //! @the HigOrderStandardCell type
+
+        for(iStandElemIndex = 0; iStandElemIndex < standardCellElements.size(); ++iStandElemIndex)
+        {
+            if(standardCellElements[iStandElemIndex].SameStandardElement(iCellVTKType, highOrderCells[iCell].nPolyGrid, accuracyOfVolumeIntegration))
+            {
+                break;
+            }
+        }
+
+        if(iStandElemIndex == standardCellElements.size())
+        {
+            standardCellElements.push_back(HighOrderStandardCell(iCellVTKType, nCellNodes, accuracyOfVolumeIntegration));
+        }
+        //! highOrderCellsSol[pMultiGrid][iCell].nPolySol = dgSolOrder - pMultiGrid;
+        pMultiGridOrder = highOrderCellsSol[pMultiGridLevel][iCell].nPolySol;
+        highOrderCellsSol[pMultiGridLevel][iCell].nDOFsSol = static_cast<unsigned short>(((pMultiGridOrder + 1) * (pMultiGridOrder + 2) * (pMultiGridOrder + 3)) / 6);
+        highOrderCellsSol[pMultiGridLevel][iCell].offsetDOFsSolLocal = positionOfDof;
+
+        positionOfDof += highOrderCellsSol[pMultiGridLevel][iCell].nDOFsSol;
+
+        highOrderCellsSol[pMultiGridLevel][iCell].integNumberOfGaussPoint = static_cast<unsigned short>(standardCellElements[iStandElemIndex].GetNumberOfIntegrationPoint());
+        integNumberOfGauss = highOrderCellsSol[pMultiGridLevel][iCell].integNumberOfGaussPoint;
+        const unsigned long * nodeID = highOrderCells[iCell].GetnodeIDsGrid();
+
+        //apply memory to save coord of integration
+        highOrderCellsSol[pMultiGridLevel][iCell].coorXIntegrationPoints.resize(integNumberOfGauss);
+        highOrderCellsSol[pMultiGridLevel][iCell].coorYIntegrationPoints.resize(integNumberOfGauss);
+        highOrderCellsSol[pMultiGridLevel][iCell].coorZIntegrationPoints.resize(integNumberOfGauss);
+
+        //compute Coor of volume integration
+        highOrderCellsSol[pMultiGridLevel][iCell].ComputeCoorOfIntegrationPoint(standardCellElements[iStandElemIndex].GetNnode(), nodeID, pointX, pointY, pointZ, 
+            standardCellElements[iStandElemIndex].GetShapeFunctionsIntegration());
+
+        //compute basis function of volume integration
+        //1:compute Jacobian determinant of Guass point
+        highOrderCellsSol[pMultiGridLevel][iCell].JacDetCellIntegration.resize(integNumberOfGauss);
+
+        RDouble * gradXiShapeFunction;
+        RDouble * gradEtShapeFunction;
+        RDouble * gradZtShapeFunction;
+        for(int iGaussPoint = 0; iGaussPoint < integNumberOfGauss; ++iGaussPoint)
+        {
+            gradXiShapeFunction = standardCellElements[iStandElemIndex].GetdXiShapeFunctionAtIntegration(iGaussPoint);
+            gradEtShapeFunction = standardCellElements[iStandElemIndex].GetdEtShapeFunctionAtIntegration(iGaussPoint);
+            gradZtShapeFunction = standardCellElements[iStandElemIndex].GetdZtShapeFunctionAtIntegration(iGaussPoint);
+            highOrderCellsSol[pMultiGridLevel][iCell].ComputeJacobianDeterminant(iGaussPoint, iCellVTKType, standardCellElements[iStandElemIndex].GetNnode(), nodeID, pointX, pointY, pointZ,
+                gradXiShapeFunction, gradEtShapeFunction, gradZtShapeFunction);
+        }
+        const RDouble *weightCoeff = 0;
+        
+        if (pMultiGridLevel == 0)
+        {
+            RDouble volumJacobian = 0.0;
+            weightCoeff = standardCellElements[iStandElemIndex].GetWtIntegration();
+
+            double xcc = 0, ycc = 0, zcc = 0;
+            for (int iGaussPoint = 0; iGaussPoint < integNumberOfGauss; ++ iGaussPoint)
+            {
+                volumJacobian += weightCoeff[iGaussPoint] * highOrderCellsSol[pMultiGridLevel][iCell].JacDetCellIntegration[iGaussPoint];
+                xcc += weightCoeff[iGaussPoint] * highOrderCellsSol[pMultiGridLevel][iCell].JacDetCellIntegration[iGaussPoint] * highOrderCellsSol[pMultiGridLevel][iCell].coorXIntegrationPoints[iGaussPoint];
+                ycc += weightCoeff[iGaussPoint] * highOrderCellsSol[pMultiGridLevel][iCell].JacDetCellIntegration[iGaussPoint] * highOrderCellsSol[pMultiGridLevel][iCell].coorYIntegrationPoints[iGaussPoint];
+                zcc += weightCoeff[iGaussPoint] * highOrderCellsSol[pMultiGridLevel][iCell].JacDetCellIntegration[iGaussPoint] * highOrderCellsSol[pMultiGridLevel][iCell].coorZIntegrationPoints[iGaussPoint];
+            }
+
+            vol[iCell] = volumJacobian;
+            Xcc[iCell] = xcc / volumJacobian;
+            Ycc[iCell] = ycc / volumJacobian;
+            Zcc[iCell] = zcc / volumJacobian;
+            
+            highOrderCells[iCell].volume = volumJacobian;
+            highOrderCells[iCell].centerCoord[0] = Xcc[iCell];
+            highOrderCells[iCell].centerCoord[1] = Ycc[iCell];
+            highOrderCells[iCell].centerCoord[2] = Zcc[iCell];
+
+            highOrderCells[iCell].lenScale = pow(abs(highOrderCells[iCell].volume), 1.0/3.0);
+        }
+
+        //2:compute original basis function
+        degreeOfFreedom = highOrderCellsSol[pMultiGridLevel][iCell].nDOFsSol;
+        lenScaleOfCell = highOrderCells[iCell].lenScale;
+
+        highOrderCellsSol[pMultiGridLevel][iCell].basisFuncCellIntegration.resize(integNumberOfGauss);
+        for(int iGaussPoint = 0; iGaussPoint < integNumberOfGauss; ++iGaussPoint)
+        {
+            highOrderCellsSol[pMultiGridLevel][iCell].basisFuncCellIntegration[iGaussPoint].resize(degreeOfFreedom);
+        }
+
+        highOrderCellsSol[pMultiGridLevel][iCell].ComputeOriginalBasisFunction(pMultiGridOrder, lenScaleOfCell, Xcc[iCell], Ycc[iCell], Zcc[iCell]);
+
+        //3:compute original massmatrix
+        HighOrderMatrix taylorBasisMassMatrix(degreeOfFreedom, degreeOfFreedom);
+        taylorBasisMassMatrix.setConstant(0.0);          
+        highOrderCellsSol[pMultiGridLevel][iCell].ComputeOriginalMassmatrix(taylorBasisMassMatrix, weightCoeff);
+
+        //4:compute orthogonalizationMatrix for basis function
+        HighOrderMatrix orthogonalizationMatrix(degreeOfFreedom, degreeOfFreedom);
+        orthogonalizationMatrix.setConstant(0.0);
+
+        Orthogonalize(degreeOfFreedom, taylorBasisMassMatrix, orthogonalizationMatrix);
+
+        //5:apply memory to save orthogonal matrix, get the orthogonalizedMatrix
+        elementNumberOfOrth = highOrderCellsSol[pMultiGridLevel][iCell].nDOFsSol * highOrderCellsSol[pMultiGridLevel][iCell].nDOFsSol;
+        highOrderCellsSol[pMultiGridLevel][iCell].orthogonalizedMatrix.resize(elementNumberOfOrth);
+        unsigned short int numberOfMatrix = 0;
+        for(int idof = 0; idof < degreeOfFreedom; ++idof)
+        {
+            for(int jdof = 0; jdof < degreeOfFreedom; ++jdof)
+            {
+                highOrderCellsSol[pMultiGridLevel][iCell].orthogonalizedMatrix[ numberOfMatrix++ ] = orthogonalizationMatrix(idof,jdof);
+            }
+        }
+
+        //6:compute the grad of basis function  for volume gauss point.
+        highOrderCellsSol[pMultiGridLevel][iCell].dxBasisFuncCellIntegration.resize(integNumberOfGauss);
+        highOrderCellsSol[pMultiGridLevel][iCell].dyBasisFuncCellIntegration.resize(integNumberOfGauss);
+        highOrderCellsSol[pMultiGridLevel][iCell].dzBasisFuncCellIntegration.resize(integNumberOfGauss);
+
+        for(int iGaussPoint = 0; iGaussPoint < integNumberOfGauss; ++iGaussPoint)
+        {                
+            highOrderCellsSol[pMultiGridLevel][iCell].dxBasisFuncCellIntegration[iGaussPoint].resize(degreeOfFreedom);
+            highOrderCellsSol[pMultiGridLevel][iCell].dyBasisFuncCellIntegration[iGaussPoint].resize(degreeOfFreedom);
+            highOrderCellsSol[pMultiGridLevel][iCell].dzBasisFuncCellIntegration[iGaussPoint].resize(degreeOfFreedom);
+
+            highOrderCellsSol[pMultiGridLevel][iCell].ComputeGradOfBasisFunctionIntegrationPoint(orthogonalizationMatrix, iGaussPoint, lenScaleOfCell);
+        }
+        
+        //7:compute new basis function for volume gauss point,the new basis function is orthogonal
+        highOrderCellsSol[pMultiGridLevel][iCell].ComputeOrthogonalBasisFunction(degreeOfFreedom, orthogonalizationMatrix);
+        //highOrderCellsSol[pMultiGrid][iCell].TestOrthogonalBasisFunction(weightCoeff);
+
+        //8:finish init HighOrderCellSol
+
+        //allocate memory for q and res
+        highOrderCellsSol[pMultiGridLevel][iCell].dofQ.resize(neqn);
+        highOrderCellsSol[pMultiGridLevel][iCell].res.resize(neqn);
+        highOrderCellsSol[pMultiGridLevel][iCell].q.resize(neqn);
+        highOrderCellsSol[pMultiGridLevel][iCell].qAverage.resize(neqn);
+
+        for(int ieqn = 0; ieqn < neqn; ++ieqn)
+        {
+            highOrderCellsSol[pMultiGridLevel][iCell].dofQ[ieqn].resize(highOrderCellsSol[pMultiGridLevel][iCell].nDOFsSol);
+            highOrderCellsSol[pMultiGridLevel][iCell].res[ieqn].resize(highOrderCellsSol[pMultiGridLevel][iCell].nDOFsSol);
+            highOrderCellsSol[pMultiGridLevel][iCell].q[ieqn].resize(highOrderCellsSol[pMultiGridLevel][iCell].integNumberOfGaussPoint);            
+        }
+    }
+
+    for (int iCell = nTotalCell; iCell < nTotal; ++ iCell)
+    {
+        highOrderCellsSol[pMultiGridLevel][iCell].ID = iCell;
+        highOrderCellsSol[pMultiGridLevel][iCell].nPolySol = static_cast<unsigned short>(dgSolOrder - pMultiGridLevel); //polynomial order
+
+        //! highOrderCellsSol[pMultiGrid][iCell].nPolySol = dgSolOrder - pMultiGrid;
+        pMultiGridOrder = highOrderCellsSol[pMultiGridLevel][iCell].nPolySol;
+        highOrderCellsSol[pMultiGridLevel][iCell].nDOFsSol = static_cast<unsigned short>(((pMultiGridOrder + 1) * (pMultiGridOrder + 2) * (pMultiGridOrder + 3)) / 6);
+        highOrderCellsSol[pMultiGridLevel][iCell].offsetDOFsSolLocal = positionOfDof;
+        positionOfDof += highOrderCellsSol[pMultiGridLevel][iCell].nDOFsSol;
+
+        //allocate memory for q and res
+        highOrderCellsSol[pMultiGridLevel][iCell].dofQ.resize(neqn);
+        highOrderCellsSol[pMultiGridLevel][iCell].qAverage.resize(neqn);
+
+        for(int ieqn = 0; ieqn < neqn; ++ieqn)
+        {
+            highOrderCellsSol[pMultiGridLevel][iCell].dofQ[ieqn].resize(highOrderCellsSol[pMultiGridLevel][iCell].nDOFsSol);
+        }
+    }
+
+    //HighOrderCell��type
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        //! Determine the standardElementType, pMultiGrid
+        iCellVTKType = highOrderCells[iCell].VTK_Type;
+        int nPolyGrid = highOrderCells[iCell].nPolyGrid;
+
+        for(int iStandElemIndex = 0; iStandElemIndex < standardCellElements.size(); ++iStandElemIndex)
+        {
+            if(iCellVTKType == standardCellElements[iStandElemIndex].GetVTK_Type()  && 
+                nPolyGrid   == standardCellElements[iStandElemIndex].GetNpoly())
+            {
+                highOrderCells[iCell].standardElementIndex = static_cast<unsigned short>(iStandElemIndex);
+            }
+        }
+    }
+
+    if (isUnsteady)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            highOrderCellsSol[pMultiGridLevel][iCell].dofQ1.resize(neqn);
+            highOrderCellsSol[pMultiGridLevel][iCell].dofQ2.resize(neqn);
+            for(int ieqn = 0; ieqn < neqn; ++ieqn)
+            {
+                highOrderCellsSol[pMultiGridLevel][iCell].dofQ1[ieqn].resize(highOrderCellsSol[pMultiGridLevel][iCell].nDOFsSol);
+                highOrderCellsSol[pMultiGridLevel][iCell].dofQ2[ieqn].resize(highOrderCellsSol[pMultiGridLevel][iCell].nDOFsSol);
+            }
+        }
+    }
+
+    if(viscousType == LAMINAR)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            highOrderCellsSol[pMultiGridLevel][iCell].visl.resize(highOrderCellsSol[pMultiGridLevel][iCell].integNumberOfGaussPoint);
+        }
+    }
+    else if(viscousType > LAMINAR)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            highOrderCellsSol[pMultiGridLevel][iCell].visl.resize(highOrderCellsSol[pMultiGridLevel][iCell].integNumberOfGaussPoint);
+            highOrderCellsSol[pMultiGridLevel][iCell].vist.resize(highOrderCellsSol[pMultiGridLevel][iCell].integNumberOfGaussPoint);
+        }
+    }
+}
+
+//! @Initialize HighOrderFaceSol for different p_multigrid
+//! @param[in]   grid_in                   the input unstructgrid
+//! @param[in]   dgSolOrder                the accuracy of DG solution
+//! @param[in]   pMultiGrid                pmultigrid number
+//! @param[out]                            initialize HighOrderfaceSol and build HighOrderStandardface
+void HighOrderGrid::InitHighOrderFaceSol(UnstructGrid * grid, int pMultiGrid, int viscousType)
+{     
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+    const RDouble *pointX = grid->GetX();
+    const RDouble *pointY = grid->GetY();
+    const RDouble *pointZ = grid->GetZ();
+    const RDouble *Xcc = grid->GetCellCenterX();
+    const RDouble *Ycc = grid->GetCellCenterY();
+    const RDouble *Zcc = grid->GetCellCenterZ();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+
+    int * leftCellOfFace = grid->GetLeftCellOfFace();
+    int * rightCellOfFace = grid->GetRightCellOfFace();
+
+    unsigned long positionOfDof = 0;                    //! @the dof position of curret cell,using for 
+    unsigned short int integNumberOfGauss = 0; 
+    unsigned short int accuracyOfIntigration = 0;       //! @the face integation accuracy
+    unsigned short int iFaceVTKType = 0;
+    unsigned short int iStandElemIndex = 0;             //! @the type of face
+    unsigned short int nFaceNodes = 0;
+    unsigned short int leftCell = 0, rightCell = 0;
+    unsigned short int dofOfLeftCell = 0, dofOfRightCell = 0;
+    unsigned short int nPloyOfLeftCell = 0, nPloyOfRightCell = 0;
+    RDouble lenScaleOfLeftCell = 0.0, lenScaleOfRightCell = 0.0;
+    RDouble *leftOrthMatrix, *rightOrthMatrix; 
+    positionOfDof = 0;
+    int nDim = grid->GetDim();
+    int neqn = 5;
+    unsigned long pTotalGaussPoint = 0;
+
+    if(nDim == 3)
+    {
+        neqn = 5;
+    }
+
+    highOrderFacesSol[pMultiGrid].resize(nTotalFace);
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        if (bcType == INTERFACE)
+        {
+            vector<int>* faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                // iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+                highOrderFacesSol[pMultiGrid][iFace].globalID = iFace;
+
+                leftCell  = static_cast<unsigned short>(leftCellOfFace[iFace]);
+                rightCell = static_cast<unsigned short>(rightCellOfFace[iFace]);
+                highOrderFacesSol[pMultiGrid][iFace].offsetGaussPoint = pTotalGaussPoint;
+
+                nPloyOfLeftCell  = highOrderCellsSol[pMultiGrid][leftCell].nPolySol;
+                nPloyOfRightCell = highOrderCellsSol[pMultiGrid][rightCell].nPolySol;
+
+                highOrderFacesSol[pMultiGrid][iFace].nPolySol = max(nPloyOfLeftCell, nPloyOfRightCell);   //polynomial order
+                                                                                                          // the face integation accuracy
+                highOrderFacesSol[pMultiGrid][iFace].accuracyOfFaceIntigration = 2 * highOrderFacesSol[pMultiGrid][iFace].nPolySol + 2;
+                accuracyOfIntigration = highOrderFacesSol[pMultiGrid][iFace].accuracyOfFaceIntigration;
+
+                // unsigned short iFaceVTKType 
+                iFaceVTKType = highOrderFaces[iFace].VTK_Type;
+
+                // get nodes of face
+                nFaceNodes = static_cast<unsigned short>(highOrderFaces[iFace].nNodes);
+
+                //! Determine the VTK type
+                for(iStandElemIndex = 0; iStandElemIndex < standardFaceElements.size(); ++iStandElemIndex) 
+                {
+                    if(standardFaceElements[iStandElemIndex].SameStandardElement(iFaceVTKType, highOrderFaces[iFace].nPolyGrid, accuracyOfIntigration))
+                    {
+                        break;
+                    }
+                }
+
+                if(iStandElemIndex == standardFaceElements.size())
+                    standardFaceElements.push_back(HighOrderStandardFace (iFaceVTKType, nFaceNodes, accuracyOfIntigration));
+
+                highOrderFacesSol[pMultiGrid][iFace].integNumberOfGaussPoint = static_cast<unsigned short>(standardFaceElements[iStandElemIndex].GetNumberOfIntegrationPoint());
+                integNumberOfGauss = highOrderFacesSol[pMultiGrid][iFace].integNumberOfGaussPoint;
+                pTotalGaussPoint += integNumberOfGauss;
+                //apply memory to save coord of integration
+                highOrderFacesSol[pMultiGrid][iFace].coorXIntegrationPoints.resize(integNumberOfGauss);
+                highOrderFacesSol[pMultiGrid][iFace].coorYIntegrationPoints.resize(integNumberOfGauss);
+                highOrderFacesSol[pMultiGrid][iFace].coorZIntegrationPoints.resize(integNumberOfGauss);
+                const unsigned long * nodeID = highOrderFaces[iFace].GetnodeIDsGrid();
+
+                //1:compute Coor of face integration
+                highOrderFacesSol[pMultiGrid][iFace].ComputeCoorOfIntegrationPoint(standardFaceElements[iStandElemIndex].GetNnode(), nodeID, pointX, pointY, pointZ, 
+                    standardFaceElements[iStandElemIndex].GetShapeFuncFaceIntegration());
+
+                //compute basis function of face integration
+                //2:compute orthgonal basis function    
+                dofOfLeftCell = highOrderCellsSol[pMultiGrid][leftCell].nDOFsSol;
+                dofOfRightCell = highOrderCellsSol[pMultiGrid][rightCell].nDOFsSol;
+                lenScaleOfLeftCell  = highOrderCells[leftCell].lenScale;
+                lenScaleOfRightCell = highOrderCells[rightCell].lenScale;
+                leftOrthMatrix = highOrderCellsSol[pMultiGrid][leftCell].GetOrthogonalizedMatrix();
+                rightOrthMatrix = highOrderCellsSol[pMultiGrid][rightCell].GetOrthogonalizedMatrix();
+
+                highOrderFacesSol[pMultiGrid][iFace].leftBasisFuncFaceIntegration.resize(integNumberOfGauss);
+                highOrderFacesSol[pMultiGrid][iFace].rightBasisFuncFaceIntegration.resize(integNumberOfGauss);
+                for(int iGaussPoint = 0; iGaussPoint < integNumberOfGauss; ++iGaussPoint)
+                {                
+                    highOrderFacesSol[pMultiGrid][iFace].leftBasisFuncFaceIntegration[iGaussPoint].resize(dofOfLeftCell); 
+                    highOrderFacesSol[pMultiGrid][iFace].rightBasisFuncFaceIntegration[iGaussPoint].resize(dofOfRightCell);
+
+                    highOrderFacesSol[pMultiGrid][iFace].ComputeBasisFunction(iGaussPoint, leftCell, rightCell, nTotalCell, nPloyOfLeftCell, nPloyOfRightCell, 
+                        lenScaleOfLeftCell, lenScaleOfRightCell, Xcc, Ycc, Zcc, leftOrthMatrix, rightOrthMatrix);
+                }
+
+                //3:compute the normals in the integration points of the face
+                highOrderFacesSol[pMultiGrid][iFace].metricNormalsFace.resize(integNumberOfGauss);
+                highOrderFacesSol[pMultiGrid][iFace].JacDetFaceIntegration.resize(integNumberOfGauss);
+                //3-1: compute dx/dxi,dx/det,   dy/dxi,dy/det,   dz/dxi,dz/det
+                RDouble * gradXiShapeFunction;
+                RDouble * gradEtShapeFunction;
+
+                for (int iGaussPoint = 0; iGaussPoint < integNumberOfGauss; ++ iGaussPoint)
+                {
+                    gradXiShapeFunction = standardFaceElements[iStandElemIndex].GetdXiShapeFunctionAtIntegration(iGaussPoint);
+                    gradEtShapeFunction = standardFaceElements[iStandElemIndex].GetdEtShapeFunctionAtIntegration(iGaussPoint);
+
+                    //0:nx,1:ny,2:nz
+                    highOrderFacesSol[pMultiGrid][iFace].metricNormalsFace[iGaussPoint].resize(3);
+
+                    highOrderFacesSol[pMultiGrid][iFace].ComputeMetricNormalsFace(iGaussPoint, iFaceVTKType, standardFaceElements[iStandElemIndex].GetNnode(), nodeID, pointX, pointY, pointZ,
+                        gradXiShapeFunction, gradEtShapeFunction);
+                }
+
+            }
+        }
+        else if (bcType != INTERFACE)   //need modify to fit parallel
+        {
+            vector<int>* faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                // iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+
+                highOrderFacesSol[pMultiGrid][iFace].globalID = iFace;
+
+                leftCell  = static_cast<unsigned short>(leftCellOfFace[iFace]);
+                rightCell = static_cast<unsigned short>(rightCellOfFace[iFace]);
+                highOrderFacesSol[pMultiGrid][iFace].offsetGaussPoint = pTotalGaussPoint;
+
+
+                nPloyOfLeftCell  = highOrderCellsSol[pMultiGrid][leftCell].nPolySol;
+                nPloyOfRightCell = nPloyOfLeftCell;
+                highOrderFacesSol[pMultiGrid][iFace].nPolySol = nPloyOfLeftCell;   //polynomial order
+                                                                                   // the face integation accuracy
+                highOrderFacesSol[pMultiGrid][iFace].accuracyOfFaceIntigration = 2 * highOrderFacesSol[pMultiGrid][iFace].nPolySol + 2;
+                accuracyOfIntigration = highOrderFacesSol[pMultiGrid][iFace].accuracyOfFaceIntigration;
+
+                // unsigned short iFaceVTKType
+                iFaceVTKType = highOrderFaces[iFace].VTK_Type;
+
+                // get nodes of face
+                nFaceNodes = static_cast<unsigned short>(highOrderFaces[iFace].nNodes);
+
+                //! Determine the VTK type
+                for (iStandElemIndex = 0; iStandElemIndex < standardFaceElements.size(); ++ iStandElemIndex)
+                {
+                    if(standardFaceElements[iStandElemIndex].SameStandardElement(iFaceVTKType, highOrderFaces[iFace].nPolyGrid, accuracyOfIntigration))
+                    {
+                        break;
+                    }
+                }
+
+                if(iStandElemIndex == standardFaceElements.size())
+                    standardFaceElements.push_back(HighOrderStandardFace (iFaceVTKType, nFaceNodes, accuracyOfIntigration));
+
+                highOrderFacesSol[pMultiGrid][iFace].integNumberOfGaussPoint = static_cast<unsigned short>(standardFaceElements[iStandElemIndex].GetNumberOfIntegrationPoint());
+                integNumberOfGauss = highOrderFacesSol[pMultiGrid][iFace].integNumberOfGaussPoint;
+                pTotalGaussPoint += integNumberOfGauss;
+                //apply memory to save coord of integration
+                highOrderFacesSol[pMultiGrid][iFace].coorXIntegrationPoints.resize(integNumberOfGauss);
+                highOrderFacesSol[pMultiGrid][iFace].coorYIntegrationPoints.resize(integNumberOfGauss);
+                highOrderFacesSol[pMultiGrid][iFace].coorZIntegrationPoints.resize(integNumberOfGauss);
+                const unsigned long *nodeID = highOrderFaces[iFace].GetnodeIDsGrid();
+
+                //1:compute Coor of face integration
+                highOrderFacesSol[pMultiGrid][iFace].ComputeCoorOfIntegrationPoint(standardFaceElements[iStandElemIndex].GetNnode(), nodeID, pointX, pointY, pointZ, 
+                    standardFaceElements[iStandElemIndex].GetShapeFuncFaceIntegration());
+
+                //compute basis function of face integration
+                //2:compute orthgonal basis function    
+                dofOfLeftCell = highOrderCellsSol[pMultiGrid][leftCell].nDOFsSol;
+                dofOfRightCell = dofOfLeftCell;
+                lenScaleOfLeftCell  = highOrderCells[leftCell].lenScale;
+                lenScaleOfRightCell = lenScaleOfLeftCell;
+                leftOrthMatrix = highOrderCellsSol[pMultiGrid][leftCell].GetOrthogonalizedMatrix();
+                rightOrthMatrix = leftOrthMatrix;
+
+                highOrderFacesSol[pMultiGrid][iFace].leftBasisFuncFaceIntegration.resize(integNumberOfGauss);
+                highOrderFacesSol[pMultiGrid][iFace].rightBasisFuncFaceIntegration.resize(integNumberOfGauss);
+
+                for (int iGaussPoint = 0; iGaussPoint < integNumberOfGauss; ++ iGaussPoint)
+                {
+                    highOrderFacesSol[pMultiGrid][iFace].leftBasisFuncFaceIntegration[iGaussPoint].resize(dofOfLeftCell);
+                    highOrderFacesSol[pMultiGrid][iFace].rightBasisFuncFaceIntegration[iGaussPoint].resize(dofOfRightCell);
+                    highOrderFacesSol[pMultiGrid][iFace].ComputeBasisFunction(iGaussPoint, leftCell, rightCell, nTotalCell, nPloyOfLeftCell, nPloyOfRightCell, 
+                        lenScaleOfLeftCell, lenScaleOfRightCell, Xcc, Ycc, Zcc, leftOrthMatrix, rightOrthMatrix);
+                }
+
+                //3:compute the normals in the integration points of the face
+                highOrderFacesSol[pMultiGrid][iFace].metricNormalsFace.resize(integNumberOfGauss);
+                highOrderFacesSol[pMultiGrid][iFace].JacDetFaceIntegration.resize(integNumberOfGauss);
+
+                //3-1: compute dx/dxi,dx/det, dy/dxi,dy/det, dz/dxi,dz/det
+                RDouble * gradXiShapeFunction;
+                RDouble * gradEtShapeFunction;
+
+                for (int iGaussPoint = 0; iGaussPoint < integNumberOfGauss; ++ iGaussPoint)
+                {
+                    gradXiShapeFunction = standardFaceElements[iStandElemIndex].GetdXiShapeFunctionAtIntegration(iGaussPoint);
+                    gradEtShapeFunction = standardFaceElements[iStandElemIndex].GetdEtShapeFunctionAtIntegration(iGaussPoint);
+
+                    //0:nx,1:ny,2:nz
+                    highOrderFacesSol[pMultiGrid][iFace].metricNormalsFace[iGaussPoint].resize(3);
+
+                    highOrderFacesSol[pMultiGrid][iFace].ComputeMetricNormalsFace(iGaussPoint, iFaceVTKType, standardFaceElements[iStandElemIndex].GetNnode(), 
+                        nodeID, pointX, pointY, pointZ, gradXiShapeFunction, gradEtShapeFunction);
+                }
+
+            }
+
+        }
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        highOrderFacesSol[pMultiGrid][iFace].globalID = iFace;
+
+        leftCell  = static_cast<unsigned short>(leftCellOfFace[iFace]);
+        rightCell = static_cast<unsigned short>(rightCellOfFace[iFace]);
+
+        nPloyOfLeftCell  = highOrderCellsSol[pMultiGrid][leftCell].nPolySol;
+        nPloyOfRightCell = highOrderCellsSol[pMultiGrid][rightCell].nPolySol;
+
+        highOrderFacesSol[pMultiGrid][iFace].nPolySol = max(nPloyOfLeftCell, nPloyOfRightCell);   //polynomial order
+        // the face integation accuracy
+        highOrderFacesSol[pMultiGrid][iFace].accuracyOfFaceIntigration = 2 * highOrderFacesSol[pMultiGrid][iFace].nPolySol + 2;
+        accuracyOfIntigration = highOrderFacesSol[pMultiGrid][iFace].accuracyOfFaceIntigration;
+
+        // unsigned short iFaceVTKType
+        iFaceVTKType = highOrderFaces[iFace].VTK_Type;
+
+        // get nodes of face
+        nFaceNodes = static_cast<unsigned short>(highOrderFaces[iFace].nNodes);
+
+        //! Determine the VTK type
+        for(iStandElemIndex = 0; iStandElemIndex < standardFaceElements.size(); ++iStandElemIndex)
+        {
+            if(standardFaceElements[iStandElemIndex].SameStandardElement(iFaceVTKType, highOrderFaces[iFace].nPolyGrid, accuracyOfIntigration))
+            {
+                break;
+            }
+        }
+
+        if(iStandElemIndex == standardFaceElements.size())
+            standardFaceElements.push_back(HighOrderStandardFace (iFaceVTKType, nFaceNodes, accuracyOfIntigration));
+
+        highOrderFacesSol[pMultiGrid][iFace].integNumberOfGaussPoint = static_cast<unsigned short>(standardFaceElements[iStandElemIndex].GetNumberOfIntegrationPoint());
+        integNumberOfGauss = highOrderFacesSol[pMultiGrid][iFace].integNumberOfGaussPoint;
+        highOrderFacesSol[pMultiGrid][iFace].offsetGaussPoint = pTotalGaussPoint;
+        pTotalGaussPoint += integNumberOfGauss;
+        //apply memory to save coord of integration
+        highOrderFacesSol[pMultiGrid][iFace].coorXIntegrationPoints.resize(integNumberOfGauss);
+        highOrderFacesSol[pMultiGrid][iFace].coorYIntegrationPoints.resize(integNumberOfGauss);
+        highOrderFacesSol[pMultiGrid][iFace].coorZIntegrationPoints.resize(integNumberOfGauss);
+        const unsigned long *nodeID = highOrderFaces[iFace].GetnodeIDsGrid();
+
+        //1:compute Coor of face integration
+        highOrderFacesSol[pMultiGrid][iFace].ComputeCoorOfIntegrationPoint(standardFaceElements[iStandElemIndex].GetNnode(), nodeID, pointX, pointY, pointZ, 
+            standardFaceElements[iStandElemIndex].GetShapeFuncFaceIntegration());
+
+        //compute basis function of face integration
+        //2:compute orthgonal basis function    
+        dofOfLeftCell = highOrderCellsSol[pMultiGrid][leftCell].nDOFsSol;
+        dofOfRightCell = highOrderCellsSol[pMultiGrid][rightCell].nDOFsSol;
+        lenScaleOfLeftCell  = highOrderCells[leftCell].lenScale;
+        lenScaleOfRightCell = highOrderCells[rightCell].lenScale;
+        leftOrthMatrix = highOrderCellsSol[pMultiGrid][leftCell].GetOrthogonalizedMatrix();
+        rightOrthMatrix = highOrderCellsSol[pMultiGrid][rightCell].GetOrthogonalizedMatrix();
+
+        highOrderFacesSol[pMultiGrid][iFace].leftBasisFuncFaceIntegration.resize(integNumberOfGauss);
+        highOrderFacesSol[pMultiGrid][iFace].rightBasisFuncFaceIntegration.resize(integNumberOfGauss);
+        for (int iGaussPoint = 0; iGaussPoint < integNumberOfGauss; ++ iGaussPoint)
+        {
+            highOrderFacesSol[pMultiGrid][iFace].leftBasisFuncFaceIntegration[iGaussPoint].resize(dofOfLeftCell);
+            highOrderFacesSol[pMultiGrid][iFace].rightBasisFuncFaceIntegration[iGaussPoint].resize(dofOfRightCell);
+            highOrderFacesSol[pMultiGrid][iFace].ComputeBasisFunction(iGaussPoint, leftCell, rightCell, nTotalCell, nPloyOfLeftCell, nPloyOfRightCell, 
+                lenScaleOfLeftCell, lenScaleOfRightCell, Xcc, Ycc, Zcc, leftOrthMatrix, rightOrthMatrix);
+        }
+
+        //3:compute the normals in the integration points of the face
+        highOrderFacesSol[pMultiGrid][iFace].metricNormalsFace.resize(integNumberOfGauss);
+        highOrderFacesSol[pMultiGrid][iFace].JacDetFaceIntegration.resize(integNumberOfGauss);
+        //3-1: compute dx/dxi,dx/det,   dy/dxi,dy/det,   dz/dxi,dz/det
+        RDouble *gradXiShapeFunction;
+        RDouble *gradEtShapeFunction;
+
+        for (int iGaussPoint = 0; iGaussPoint < integNumberOfGauss; ++ iGaussPoint)
+        { 
+            gradXiShapeFunction = standardFaceElements[iStandElemIndex].GetdXiShapeFunctionAtIntegration(iGaussPoint);
+            gradEtShapeFunction = standardFaceElements[iStandElemIndex].GetdEtShapeFunctionAtIntegration(iGaussPoint);
+
+            //0:nx,1:ny,2:nz
+            highOrderFacesSol[pMultiGrid][iFace].metricNormalsFace[iGaussPoint].resize(3);
+
+            highOrderFacesSol[pMultiGrid][iFace].ComputeMetricNormalsFace(iGaussPoint, iFaceVTKType, standardFaceElements[iStandElemIndex].GetNnode(), nodeID, pointX, pointY, pointZ,
+                gradXiShapeFunction, gradEtShapeFunction);
+        }
+    }
+
+    totalFaceGaussPoint[pMultiGrid] = pTotalGaussPoint;
+
+    //HighOrderFace��standardFaceElements type
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        //! Determine the standardElementType, pMultiGrid
+        iFaceVTKType = highOrderFaces[iFace].VTK_Type;
+        int nPolyGrid = highOrderFaces[iFace].nPolyGrid;
+        for(iStandElemIndex = 0; iStandElemIndex < standardFaceElements.size(); ++iStandElemIndex)
+        {
+            if(iFaceVTKType == standardFaceElements[iStandElemIndex].GetVTK_Type() && 
+                nPolyGrid   == standardFaceElements[iStandElemIndex].GetNpoly())
+            {
+                highOrderFaces[iFace].standardElementIndex = static_cast<unsigned short>(iStandElemIndex);
+            }
+        } 
+        if(pMultiGrid == 0)
+        {
+            RDouble areaTmp = 0.0, xfc = 0.0, yfc = 0.0, zfc = 0.0;
+            const RDouble *weightCoeff;
+            int iCurStandElemIndex = highOrderFaces[iFace].standardElementIndex;
+            weightCoeff = standardFaceElements[iCurStandElemIndex].GetWtIntegration();
+            for (int iGaussPoint = 0; iGaussPoint < highOrderFacesSol[pMultiGrid][iFace].integNumberOfGaussPoint; ++ iGaussPoint)
+            {
+                areaTmp += weightCoeff[iGaussPoint] * highOrderFacesSol[pMultiGrid][iFace].JacDetFaceIntegration[iGaussPoint];
+                xfc += weightCoeff[iGaussPoint] * highOrderFacesSol[pMultiGrid][iFace].coorXIntegrationPoints[iGaussPoint] * highOrderFacesSol[pMultiGrid][iFace].JacDetFaceIntegration[iGaussPoint]; 
+                yfc += weightCoeff[iGaussPoint] * highOrderFacesSol[pMultiGrid][iFace].coorYIntegrationPoints[iGaussPoint] * highOrderFacesSol[pMultiGrid][iFace].JacDetFaceIntegration[iGaussPoint];
+                zfc += weightCoeff[iGaussPoint] * highOrderFacesSol[pMultiGrid][iFace].coorZIntegrationPoints[iGaussPoint] * highOrderFacesSol[pMultiGrid][iFace].JacDetFaceIntegration[iGaussPoint];
+            }         
+            highOrderFaces[iFace].area = areaTmp;
+            highOrderFaces[iFace].centerCoord[0] = xfc / areaTmp;
+            highOrderFaces[iFace].centerCoord[1] = yfc / areaTmp;
+            highOrderFaces[iFace].centerCoord[2] = zfc / areaTmp;
+        }
+    }
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        highOrderFacesSol[pMultiGrid][iFace].q.resize(neqn);
+        highOrderFacesSol[pMultiGrid][iFace].visl.resize(highOrderFacesSol[pMultiGrid][iFace].integNumberOfGaussPoint);
+
+        for(int ieqn = 0; ieqn < neqn; ++ieqn)
+        {
+            //[neqn][2*gausspoint], [neqn][0]:L,[neqn][0+nTotalFace]:R
+            highOrderFacesSol[pMultiGrid][iFace].q[ieqn].resize(2 * highOrderFacesSol[pMultiGrid][iFace].integNumberOfGaussPoint);
+        }
+    }
+
+    if(viscousType == LAMINAR)
+    {
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            highOrderFacesSol[pMultiGrid][iFace].visl.resize(2 * highOrderFacesSol[pMultiGrid][iFace].integNumberOfGaussPoint);
+        }
+    }
+    else if(viscousType > LAMINAR)
+    {
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            highOrderFacesSol[pMultiGrid][iFace].visl.resize(2 * highOrderFacesSol[pMultiGrid][iFace].integNumberOfGaussPoint);
+            highOrderFacesSol[pMultiGrid][iFace].vist.resize(2 * highOrderFacesSol[pMultiGrid][iFace].integNumberOfGaussPoint);
+        }
+    }
+}
+
+void HighOrderGrid::InitDofOfCell(UnstructGrid * grid, vector < RDouble > & conserValue, int neqn)
+{
+    int nTotalCell = grid->GetNTotalCell();
+    const RDouble *weightCoeff;
+    RDouble dofQTmp[35], weigthMultJac = 0.0; //35------>P4
+    RDouble volumTmp = 0.0;
+
+    for (int ieqn = 0; ieqn < neqn; ++ ieqn)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+
+            for (int iDof = 0; iDof < highOrderCellsSol[0][iCell].nDOFsSol; ++ iDof)
+            {
+                dofQTmp[iDof] = 0.0;
+            }
+            volumTmp = 0.0;
+            weightCoeff = standardCellElements[highOrderCells[iCell].standardElementIndex].GetWtIntegration();
+
+            for (int iGaussPoint = 0; iGaussPoint < highOrderCellsSol[0][iCell].integNumberOfGaussPoint; ++ iGaussPoint)
+            {
+                weigthMultJac = weightCoeff[iGaussPoint] * highOrderCellsSol[0][iCell].JacDetCellIntegration[iGaussPoint];
+
+                for(int iDof = 0; iDof < highOrderCellsSol[0][iCell].nDOFsSol; ++ iDof)
+                {
+                    dofQTmp[iDof] += weigthMultJac * highOrderCellsSol[0][iCell].basisFuncCellIntegration[iGaussPoint][iDof];
+                }
+                volumTmp += weigthMultJac;
+            }
+            for (int iDof = 0; iDof < highOrderCellsSol[0][iCell].nDOFsSol; ++ iDof)
+            {
+                highOrderCellsSol[0][iCell].dofQ[ieqn][iDof] = dofQTmp[iDof] * conserValue[ieqn] / volumTmp;
+            }
+        }
+    }
+
+    //init res of cell
+    for (int ieqn = 0; ieqn < neqn; ++ ieqn)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            for(int iDof = 0;iDof < highOrderCellsSol[0][iCell].nDOFsSol; ++iDof)
+            {
+                highOrderCellsSol[0][iCell].res[ieqn][iDof] = 0.0;
+            }
+        }
+    }
+
+    //init gauss point value of cell
+    for (int ieqn = 0; ieqn < neqn; ++ ieqn)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            for(int iGaussPoint = 0;iGaussPoint < highOrderCellsSol[0][iCell].integNumberOfGaussPoint; ++iGaussPoint)
+            {
+                highOrderCellsSol[0][iCell].q[ieqn][iGaussPoint] = conserValue[ieqn];
+            }
+        }
+    }
+}
+
+void HighOrderGrid::InitDofOfCellUnsteady(UnstructGrid * grid, vector < RDouble > & conserValue, int neqn)
+{
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    for (int ieqn = 0; ieqn < neqn; ++ ieqn)
+    {
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            highOrderCellsSol[0][iCell].dofQ1[ieqn][0] = conserValue[ieqn];
+            highOrderCellsSol[0][iCell].dofQ2[ieqn][0] = conserValue[ieqn];
+
+            for (int iDof = 1;iDof < highOrderCellsSol[0][iCell].nDOFsSol; ++ iDof)
+            {
+                highOrderCellsSol[0][iCell].dofQ1[ieqn][iDof] = 0.0;
+                highOrderCellsSol[0][iCell].dofQ2[ieqn][iDof] = 0.0;
+            }
+        }
+    }
+}
+
+void HighOrderGrid::InitValueOfFace(const UnstructGrid * grid, const vector < RDouble > & conserValue, int neqn)
+{
+    //int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    //int nBoundFace = grid->GetNBoundFace();
+    //int nTotal = nTotalCell + nBoundFace;
+
+    //init gauss point value of cell
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        HighOrderFaceSol & faceSol = highOrderFacesSol[0][iFace];
+
+        for (int iEqn = 0; iEqn < neqn; ++ iEqn)
+        {
+            for (int iGaussPoint = 0; iGaussPoint < (2 * faceSol.integNumberOfGaussPoint); ++ iGaussPoint)
+            {
+                faceSol.q[iEqn][iGaussPoint] = conserValue[iEqn];
+            }
+        }
+    }
+}
+
+void HighOrderGrid::InitValueOfFace(const UnstructGrid * grid, const RDouble * conserValue, int neqn)
+{
+    //int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    //int nBoundFace = grid->GetNBoundFace();
+    //int nTotal = nTotalCell + nBoundFace;
+
+    //init gauss point value of cell
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        HighOrderFaceSol & faceSol = highOrderFacesSol[0][iFace];
+
+        for (int iEqn = 0; iEqn < neqn; ++ iEqn)
+        {
+            for (int iGaussPoint = 0; iGaussPoint < (2 * faceSol.integNumberOfGaussPoint); ++ iGaussPoint)
+            {
+                faceSol.q[iEqn][iGaussPoint] = conserValue[iEqn];
+            }
+        }
+    }
+}
+
+void HighOrderGrid::GetNumberOfDOFs(int nCells, int * dofsOfCells)
+{
+    for (int iCell = 0; iCell < nCells; ++ iCell)
+    {
+        dofsOfCells[ iCell ] = highOrderCellsSol[0][iCell].nDOFsSol;
+    }
+}
+
+void HighOrderGrid::GetQDOFs(const UnstructGrid * grid, int neqn, RDouble *** q)
+{
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        for (int iEqn = 0; iEqn < neqn; ++ iEqn)
+        {
+            for(int iDof = 0;iDof < highOrderCellsSol[0][iCell].nDOFsSol; ++iDof)
+            {
+                q[iCell][iEqn][iDof] = highOrderCellsSol[0][iCell].dofQ[iEqn][iDof];
+            }
+        }
+    }
+}
+
+}
\ No newline at end of file
diff --git a/CFD/HOSolverUnstruct/src/HOInviscidFlux.cpp b/CFD/HOSolverUnstruct/src/HOInviscidFlux.cpp
new file mode 100644
index 0000000..75d7d4a
--- /dev/null
+++ b/CFD/HOSolverUnstruct/src/HOInviscidFlux.cpp
@@ -0,0 +1,91 @@
+#include "HODefine.h"
+#include "Constants.h"
+#include <iostream>
+
+using PHSPACE::RDouble;
+namespace HOUnstruct
+{
+void Vanleer_Scheme(int totalGaussPoint, RDouble **ql, RDouble **qr, RDouble *areax, RDouble *areay, RDouble *areaz, RDouble gama, RDouble **flux)
+{
+    RDouble vn_l, c2_l, c_l, mach_l, h_l;
+    RDouble vn_r, c2_r, c_r, mach_r, h_r;
+    RDouble gamm1, gamp1, gami, tmp, fmass;
+
+    gamm1 = gama - 1.0;
+    gamp1 = gama + 1.0;
+    gami = 1.0 / gama;
+
+    for (int iGaussPoint = 0; iGaussPoint < totalGaussPoint; ++ iGaussPoint)
+    {
+
+        vn_l = areax[iGaussPoint] * ql[1][iGaussPoint] + areay[iGaussPoint] * ql[2][iGaussPoint] + areaz[iGaussPoint] * ql[3][iGaussPoint];
+        c2_l = gama * (ql[4][iGaussPoint]) / ql[0][iGaussPoint];
+        c_l    = sqrt(abs(c2_l));
+        mach_l = vn_l / c_l;
+        h_l = c2_l / gamm1 + 0.5 * (ql[1][iGaussPoint] * ql[1][iGaussPoint] + ql[2][iGaussPoint] * ql[2][iGaussPoint] + ql[3][iGaussPoint] * ql[3][iGaussPoint]);
+
+        if (mach_l > 1.)
+        {
+            tmp = ql[0][iGaussPoint] * vn_l;
+            flux[0][iGaussPoint] = tmp;
+            flux[1][iGaussPoint] = (ql[1][iGaussPoint] * tmp + areax[iGaussPoint] * (ql[4][iGaussPoint]));
+            flux[2][iGaussPoint] = (ql[2][iGaussPoint] * tmp + areay[iGaussPoint] * (ql[4][iGaussPoint]));
+            flux[3][iGaussPoint] = (ql[3][iGaussPoint] * tmp + areaz[iGaussPoint] * (ql[4][iGaussPoint]));
+            flux[4][iGaussPoint] = h_l * tmp;
+        }
+        else if (mach_l < -1.)
+        {
+            flux[0][iGaussPoint] = 0.;
+            flux[1][iGaussPoint] = 0.;
+            flux[2][iGaussPoint] = 0.;
+            flux[3][iGaussPoint] = 0.;
+            flux[4][iGaussPoint] = 0.; 
+        }
+        else
+        {
+            fmass = 0.25 * ql[0][iGaussPoint] * c_l * (mach_l + 1.) * (mach_l + 1.);
+            tmp = (2. * c_l - vn_l) * gami;
+            flux[0][iGaussPoint] = fmass;
+            flux[1][iGaussPoint] = fmass * (areax[iGaussPoint] * tmp + ql[1][iGaussPoint]);
+            flux[2][iGaussPoint] = fmass * (areay[iGaussPoint] * tmp + ql[2][iGaussPoint]);
+            flux[3][iGaussPoint] = fmass * (areaz[iGaussPoint] * tmp + ql[3][iGaussPoint]);
+            flux[4][iGaussPoint] = fmass * h_l;
+        }
+
+        // Right contribution
+        vn_r = areax[iGaussPoint] * qr[1][iGaussPoint] + areay[iGaussPoint] * qr[2][iGaussPoint] + areaz[iGaussPoint] * qr[3][iGaussPoint];
+        c2_r = gama * (qr[4][iGaussPoint]) / qr[0][iGaussPoint];
+        c_r    = sqrt(abs(c2_r));
+        mach_r = vn_r / c_r;
+        h_r = c2_r / gamm1
+            + 0.5 * (qr[1][iGaussPoint] * qr[1][iGaussPoint] + qr[2][iGaussPoint] * qr[2][iGaussPoint] + qr[3][iGaussPoint] * qr[3][iGaussPoint]);
+
+        if (mach_r < -1.)
+        {
+            tmp = qr[0][iGaussPoint] * vn_r;
+            flux[0][iGaussPoint] += tmp;
+            flux[1][iGaussPoint] += (qr[1][iGaussPoint] * tmp + areax[iGaussPoint] * (qr[4][iGaussPoint]));
+            flux[2][iGaussPoint] += (qr[2][iGaussPoint] * tmp + areay[iGaussPoint] * (qr[4][iGaussPoint]));
+            flux[3][iGaussPoint] += (qr[3][iGaussPoint] * tmp + areaz[iGaussPoint] * (qr[4][iGaussPoint]));
+            flux[4][iGaussPoint] += h_r * tmp;
+        }
+        else if (mach_r <= 1.)
+        {
+            fmass = -0.25 * qr[0][iGaussPoint] * c_r * (mach_r - 1.) * (mach_r - 1.);
+            tmp = -(2. * c_r + vn_r) * gami;
+            flux[0][iGaussPoint] += fmass;
+            flux[1][iGaussPoint] += fmass * (areax[iGaussPoint] * tmp + qr[1][iGaussPoint]);
+            flux[2][iGaussPoint] += fmass * (areay[iGaussPoint] * tmp + qr[2][iGaussPoint]);
+            flux[3][iGaussPoint] += fmass * (areaz[iGaussPoint] * tmp + qr[3][iGaussPoint]);
+            flux[4][iGaussPoint] += fmass * h_r;
+        }
+
+        for (int ieqn = 0; ieqn < 5; ++ieqn)
+        if ((flux[ieqn][iGaussPoint] != flux[ieqn][iGaussPoint]) || fabs(flux[ieqn][iGaussPoint]) > 1.0e20)
+        {
+            cout << "flux " << ieqn << " = " << flux[ieqn][iGaussPoint] << endl;
+        }
+    }
+}
+
+}
\ No newline at end of file
diff --git a/CFD/HOSolverUnstruct/src/HOShapeFunction.cpp b/CFD/HOSolverUnstruct/src/HOShapeFunction.cpp
new file mode 100644
index 0000000..5d3fed8
--- /dev/null
+++ b/CFD/HOSolverUnstruct/src/HOShapeFunction.cpp
@@ -0,0 +1,270 @@
+#include "HODefine.h"
+#include "HOShapeFunction.h"
+
+using PHSPACE::RDouble;
+
+namespace HOUnstruct
+{
+//! calculate shape function
+//! @param[in]   refCoord   reference coordinates
+//! @param[out]  ret        shape function
+//!
+//! @return        void
+
+void ShapeFunctionOfTri(const RDouble * refCoord, RDouble * ret)
+{
+    RDouble xi = refCoord[0];
+    RDouble et = refCoord[1];
+
+    ret[0] = 1.0 - xi - et;
+    ret[1] = xi;
+    ret[2] = et;
+}
+
+void ShapeFunctionOfTriGrad(RDouble * ret)
+{
+    ret[0] = -1.0;
+    ret[1] = -1.0;
+
+    ret[2] =  1.0;
+    ret[3] =  0.0;
+
+    ret[4] =  0.0;
+    ret[5] =  1.0;
+}
+
+void ShapeFunctionOfQuad(const RDouble * refCoord, RDouble * ret)
+{
+    RDouble xi = refCoord[0];
+    RDouble et = refCoord[1];
+
+    ret[0] = (1.0 - et) * (1.0 - xi);
+    ret[1] = xi * (1.0 - et);
+    ret[2] = xi * et;
+    ret[3] = (1.0 - xi) * et;
+}
+
+void ShapeFunctionOfQuadGrad(const RDouble * refCoord, RDouble * ret)
+{
+    RDouble xi = refCoord[0];
+    RDouble et = refCoord[1];
+
+    ret[0] = et - 1.0;
+    ret[1] = xi - 1.0;
+
+    ret[2] =  1.0 - et;
+    ret[3] = -xi;
+
+    ret[4] =  et;
+    ret[5] =  xi;
+
+    ret[6] = -et;
+    ret[7] =  1.0 - xi;
+}
+
+void ShapeFunctionOfTetr(const RDouble * refCoord, RDouble * ret)
+{
+    RDouble xi = refCoord[0];
+    RDouble et = refCoord[1];
+    RDouble zt = refCoord[2];
+
+    ret[0] = 1.0 - xi - et - zt;
+    ret[1] =       xi;
+    ret[2] =            et;
+    ret[3] =                 zt;
+}
+
+void ShapeFunctionOfTetrGrad(RDouble * ret)
+{
+    ret[ 0] = -1.0;
+    ret[ 1] = -1.0;
+    ret[ 2] = -1.0;
+
+    ret[ 3] =  1.0;
+    ret[ 4] =  0.0;
+    ret[ 5] =  0.0;
+
+    ret[ 6] =  0.0;
+    ret[ 7] =  1.0;
+    ret[ 8] =  0.0;
+
+    ret[ 9] =  0.0;
+    ret[10] =  0.0;
+    ret[11] =  1.0;
+}
+
+void ShapeFunctionOfHex(const RDouble * refCoord, RDouble * ret)
+{
+    RDouble xi = refCoord[0];
+    RDouble et = refCoord[1];
+    RDouble zt = refCoord[2];
+
+    ret[0] = (1 - xi) * (1 - et) * (1 - zt);
+    ret[1] = xi  * (1 - et) * (1 - zt);
+    ret[2] = xi  * et  * (1 - zt);
+    ret[3] = (1 - xi) * et  * (1 - zt);
+    ret[4] = (1 - xi) * (1 - et) * zt;
+    ret[5] = xi  * (1 - et) * zt;
+    ret[6] = xi  * et  * zt;
+    ret[7] = (1 - xi) * et  * zt;
+}
+
+void ShapeFunctionOfHexGrad(const RDouble * refCoord, RDouble * ret)
+{
+    RDouble xi = refCoord[0];
+    RDouble et = refCoord[1];
+    RDouble zt = refCoord[2];
+
+    ret[0] = -(1 - et) * (1 - zt);
+    ret[1] = -(1 - xi) * (1 - zt);
+    ret[2] = -(1 - xi) * (1 - et);
+
+    ret[3] =  (1 - et) * (1 - zt);
+    ret[4] = -xi  * (1 - zt);
+    ret[5] = -xi  * (1 - et);
+
+    ret[6] =  et  * (1 - zt);
+    ret[7] =  xi  * (1 - zt);
+    ret[8] = -xi  * et;
+
+    ret[9 ] = -et  * (1 - zt);
+    ret[10] =  (1 - xi) * (1 - zt);
+    ret[11] = -(1 - xi) * et;
+
+    ret[12] = -(1 - et) * zt;
+    ret[13] = -(1 - xi) * zt;
+    ret[14] =  (1 - xi) * (1 - et);
+
+    ret[15] =  (1 - et) * zt;
+    ret[16] = -xi  * zt;
+    ret[17] =  xi  * (1 - et);
+
+    ret[18] =  et  * zt;
+    ret[19] =  xi  * zt;
+    ret[20] =  xi  * et;
+
+    ret[21] = -et  * zt;
+    ret[22] =  (1 - xi) * zt;
+    ret[23] =  (1 - xi) * et;
+}
+
+void ShapeFunctionOfPrism(const RDouble * refCoord, RDouble * ret)
+{
+    RDouble xi = refCoord[0];
+    RDouble et = refCoord[1];
+    RDouble zt = refCoord[2];
+
+    ret[0] = (1.0 - xi - et) * (1.0 - zt);
+    ret[1] = xi * (1.0 - zt);
+    ret[2] = et * (1.0 - zt);
+    ret[3] = (1.0 - xi - et) * zt;
+    ret[4] = xi * zt;
+    ret[5] = et * zt;
+}
+
+void ShapeFunctionOfPrismGrad(const RDouble * refCoord, RDouble * ret)
+{
+    RDouble xi = refCoord[0];
+    RDouble et = refCoord[1];
+    RDouble zt = refCoord[2];
+
+    ret[0] =  zt-1.0;
+    ret[1] =  zt-1.0;
+    ret[2] =  xi+et-1.0;
+
+    ret[3] =  1.0-zt;
+    ret[4] =  0.0;
+    ret[5] = -xi;
+
+    ret[6] =  0.0;
+    ret[7] =  1.0-zt;
+    ret[8] = -et;
+
+    ret[9 ] = -zt;
+    ret[10] = -zt;
+    ret[11] =  1.0-xi-et;
+
+    ret[12] =  zt;
+    ret[13] =  0.0;
+    ret[14] =  xi;
+
+    ret[15] =  0.0;
+    ret[16] =  zt;
+    ret[17] =  et;
+}
+
+void ShapeFunctionOfPyra(const RDouble * refCoord, RDouble * ret)
+{
+    RDouble xi = refCoord[0];
+    RDouble et = refCoord[1];
+    RDouble zt = refCoord[2];
+
+    ret[0] = (1.0 - xi) * (1.0 - et) * (1.0 - zt);
+    ret[1] = xi * (1.0 - et) * (1.0 - zt);
+    ret[2] = xi * et * (1.0 - zt);
+    ret[3] = (1.0 - xi) * et * (1.0 - zt);
+    ret[4] = zt;
+}
+
+void ShapeFunctionOfPyraGrad(const RDouble * refCoord, RDouble * ret)
+{
+    RDouble xi = refCoord[0];
+    RDouble et = refCoord[1];
+    RDouble zt = refCoord[2];
+
+    ret[0] = -(1.0 - et) * (1.0 - zt);
+    ret[1] = -(1.0 - xi) * (1.0 - zt);
+    ret[2] = -(1.0 - xi) * (1.0 - et);
+
+    ret[3] =  (1.0 - et) * (1.0 - zt);
+    ret[4] = -xi  * (1.0 - zt);
+    ret[5] = -xi  * (1.0 - et);
+
+    ret[6] =  et  * (1.0 - zt);
+    ret[7] =  xi  * (1.0 - zt);
+    ret[8] = -xi  * et;
+
+    ret[9 ] = -et  * (1.0 - zt);
+    ret[10] =  (1.0 - xi) * (1.0 - zt);
+    ret[11] = -(1.0 - xi) * et;
+
+    ret[12] =  0.0;
+    ret[13] =  0.0;
+    ret[14] =  1.0;
+}
+
+}
+
+#include <iostream>
+#include <cmath>
+//using namespace std;
+
+//using namespace HOUnstruct;
+
+namespace HOUnstruct
+{
+//! test input 0 or 1
+//! @param[in]   valToTest
+//! @param[in]   eps = HO_SMALL
+//! @param[out]  
+//!
+//! @return        int , result of test
+//! @retval        ��return��0  valToTest near 0
+//! @retval        ��return��1  valToTest near 1
+//! @retval        ��return��2  unknown
+
+int Test0Or1(RDouble & valToTest, RDouble eps = HO_SMALL)
+{
+    if(abs(valToTest) < eps)
+    {
+        if(abs(valToTest-1) < eps) return 2;
+        else return 0;
+    }
+    else
+    {
+        if(abs(valToTest-1) < eps) return 1;
+        else return 2;
+    }
+}
+
+}
\ No newline at end of file
diff --git a/CFD/HOSolverUnstruct/src/HOSimulation.cpp b/CFD/HOSolverUnstruct/src/HOSimulation.cpp
new file mode 100644
index 0000000..52b25b9
--- /dev/null
+++ b/CFD/HOSolverUnstruct/src/HOSimulation.cpp
@@ -0,0 +1,485 @@
+#include <cstdlib>
+#include "PHMpi.h"
+#include "PHHeader.h"
+#include "Region.h"
+#include "Zone.h"
+//#include "AleModel.h"
+#include "Glb_Dimension.h"
+#include "Constants.h"
+#include "TK_Log.h"
+#include "Controller.h"
+#include "TK_Exit.h"
+#include "TK_Time.h"
+#include "Geo_SimpleBC.h"
+//#include "UnstructuredOversetConfig.h"
+#include "OversetInformation.h"
+#include "Post_WriteVisualFile.h"
+#include "Task.h"
+#include "PostProcess.h"
+#include "TK_Exit.h"
+#include "Math_BasisFunction.h"
+#include "HOSimulation.h"
+#include "Geometry.h"
+#include "GridType.h"
+#include "HOSolverUnstruct.h"
+#include "TurbSolverUnstr.h"
+
+using namespace std;
+
+namespace HOUnstruct
+{
+using namespace PHSPACE;
+
+HOSimulation::HOSimulation(int dimension)
+{
+    using namespace PHMPI;
+    //InitFantasyMPI();
+
+    SetDim(dimension);
+
+    region = new PHSPACE::Region();
+
+    isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+}
+
+HOSimulation::~HOSimulation()
+{
+    using namespace PHMPI;
+
+    delete region;
+
+    TK_Exit::ExitPHengLEI();
+}
+
+void HOSimulation::InitializeProtoTable()
+{
+
+}
+
+void HOSimulation::Run()
+{
+    ReadGeometry();
+
+    UpdateAllZonesPara();
+
+    InitGeometry();
+    
+    SwapGeommetry();
+
+    InitOversetGrid();
+
+    if(PHMPI::CurrentProcessorIsGridProcessor())
+    {
+        return;
+    }
+
+    InitializeProtoTable();
+     
+    //! Define solver names for all zones and create the newly defined solvers.
+    //! IMPORTANT for solver developers:
+    //! Define your solver name which is same with the solver class name here! 
+    DefineAndCreateSolvers();
+
+    //! Initialize each solver on each zone.
+    InitializeSolvers();
+
+    InitGlobalBoundaryCondition();
+
+    MultiGridInitFlow();
+    
+    SolveSimu();
+
+    PostSimu();
+}
+
+void HOSimulation::SolveSimu()
+{
+    WriteLogFile("In SolveSimu, Start iterating ...");
+
+    int outnstep = PHSPACE::GlobalDataBase::GetIntParaFromDB("outnstep");
+    int maxSimuStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("maxSimuStep");
+
+    while (true)
+    {
+        UpdateOuterIterationStep(outnstep);
+
+        SolveOneOuterStep();
+
+        if (outnstep >= maxSimuStep && maxSimuStep > 0) break;
+    }
+}
+
+void HOSimulation::UpdateOuterIterationStep(int &outnstep)
+{
+    outnstep = outnstep + 1;
+    GlobalDataBase::UpdateData("outnstep", &outnstep, PHINT, 1);
+
+    int newnstep = GlobalDataBase::GetIntParaFromDB("newnstep");
+    newnstep ++;
+    GlobalDataBase::UpdateData("newnstep", &newnstep, PHINT, 1);
+
+    //int isUnsteady = 0;
+    //GlobalDataBase::GetData("iunsteady", &isUnsteady, PHINT, 1);
+    if (isUnsteady == HO_STEADY) return;
+
+    int ifStaticsFlowField = GlobalDataBase::GetIntParaFromDB("ifStaticsFlowField");
+    if (ifStaticsFlowField == 1)
+    {
+        int startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+        if(outnstep >= startStatisticStep)
+        {
+            int nStatisticalStep = GlobalDataBase::GetIntParaFromDB("nStatisticalStep");
+            ++ nStatisticalStep;
+            GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+        }
+    }
+}
+
+void HOSimulation::SolveOneOuterStep()
+{
+    //PreSolve();
+
+    MainSolve();
+
+    PostSolve();
+}
+
+void HOSimulation::PostSolve()
+{
+    int intervalStepPlot = GlobalDataBase::GetIntParaFromDB("intervalStepPlot");
+    int outnstep  = GlobalDataBase::GetIntParaFromDB("outnstep");
+    if (outnstep % intervalStepPlot == 0)
+    {
+        WriteVisualFile();
+    }
+}
+
+void HOSimulation::MainSolve()
+{
+    //int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+
+    if (isUnsteady == HO_STEADY)
+    {
+        SolveSteady();
+    }
+    else
+    {
+        SolveUnsteady();
+    }
+}
+
+void HOSimulation::PostSimu()
+{
+    //this->region->PostSimu();
+}
+
+void HOSimulation::ComputeWallDistance()
+{
+    ReadGeometry();
+
+    UpdateAllZonesPara();
+
+    InitGeometry();
+}
+
+void HOSimulation::SwapGeommetry()
+{
+    this->region->SwapGeommetry();
+}
+
+void HOSimulation::InitGeometry()
+{
+    this->region->InitGeometry();
+}
+
+void HOSimulation::ReadGeometry()
+{
+    PHSPACE::TimeSpan testTime;
+    ReadGrid();
+    testTime.ShowTimeSpanToLogFile("Grid Reading");
+}
+
+void HOSimulation::InitializeSolvers()
+{
+    WriteLogFile("Creating and initialization solvers start\n");
+
+    int nSolver = GlobalDataBase::GetIntParaFromDB("maxNumOfSolver");
+    for (int iSolver = 0; iSolver < nSolver; ++ iSolver)
+    {
+        Controller * controller = new Controller(iSolver, this->region);
+
+        controller->Initialize(iSolver);
+
+        delete controller;
+    }
+
+    WriteLogFile("Creating and initialization solvers over\n");
+}
+
+void HOSimulation::DefineAndCreateSolvers()
+{
+    InitGlobalValuesOfAllZones();
+
+    int maxNumOfSolver = 0;
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        PHSPACE::Zone * zone = this->region->GetZone(iZone);
+        if (!zone) continue;
+
+        //! For each zone, define the solver names on it.
+        //! If you are solver developer, define your solve name here,
+        //! according your solver logic.
+
+        vector<PHSolver *> solverList;
+
+        PHGeometry *geometry = zone->GetGeometry();
+
+        int gridType = geometry->GetGrid()->Type();
+        if (gridType != UNSTRUCTGRID)
+        {
+            TK_Exit::ExceptionExit("HOSolverUnstruct support unstr grid only!");
+        }
+
+        PHSolver *solver = new HOSolverUnstruct();
+        solver->SetName("HOSolverUnstruct");
+        solver->SetKey(DENSITY_BASED_SOLVER);
+        solverList.push_back(solver);
+
+        int viscousType = LAMINAR;
+        zone->GetData("viscousType",&viscousType, PHINT, 1);
+
+        if (viscousType > LAMINAR)
+        {
+            PHSolver *solverT = new TurbSolverUnstr();
+            solverT->SetName("TurbSolverUnstr");
+            solverT->SetKey(DENSITY_BASED_SOLVER);
+            solverList.push_back(solverT);
+        }
+
+        for (std::size_t iSolver = 0; iSolver < solverList.size(); ++ iSolver)
+        {
+            PHSolver *solveri = solverList[iSolver];
+
+            solveri->SetGeometry(geometry);
+            solveri->SetIndex(static_cast<int> (iSolver));
+            zone->AddSolver(solveri);
+        }
+
+        if (maxNumOfSolver < solverList.size())
+        {
+            maxNumOfSolver = solverList.size();
+        }
+    }
+
+    GlobalDataBase::UpdateData("maxNumOfSolver", &maxNumOfSolver, PHINT, 1);
+}
+
+void HOSimulation::PreSolve()
+{
+    //FYAleModel::UnsteadyPreSolve();
+}
+
+void HOSimulation::ReadGrid()
+{
+    region->ReadGrid();
+}
+
+void HOSimulation::UpdateAllZonesPara()
+{
+    this->region->UpdateAllZonesPara();
+}
+
+void HOSimulation::InitGlobalBoundaryCondition()
+{
+    this->region->ReSetBoundaryConditionByGlobalBC();
+}
+
+void HOSimulation::MultiGridInitFlow()
+{
+    WriteLogFile("Multi-Grid Init Flow ...");
+
+    int nMGLevel = GlobalDataBase::GetIntParaFromDB("nMGLevel");
+    if (nMGLevel <= 1) return;
+
+    int outnstep = PHSPACE::GlobalDataBase::GetIntParaFromDB("outnstep");
+    if(outnstep > 0)
+    {
+//      int newnstep = outnstep;
+//      GlobalDataBase::UpdateData("newnstep",&newnstep, PHINT, 1);
+        return; //! Read from flow file.
+    }
+
+    int mgInitStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("mgInitStep");
+    if(mgInitStep <= 0) return;
+
+    int mgvist = GlobalDataBase::GetIntParaFromDB("mgvist");
+    int nSolver = 1;    //! Consider NS solver only.
+    if (mgvist) 
+    {
+        nSolver = GlobalDataBase::GetIntParaFromDB("maxNumOfSolver");
+    }
+
+    int isInMGIniting = 1;
+    GlobalDataBase::UpdateData("isInMGIniting", &isInMGIniting, PHINT, 1);
+
+    for (int level = nMGLevel - 1; level > 0; -- level)
+    {
+        int levelStep = 0;
+        int totalLevelStep = mgInitStep * level;
+
+        ostringstream oss;
+        oss << "Start init flow on level " << level << ", " << totalLevelStep << " iterations ...";
+        WriteLogFile(oss.str()); oss << endl;
+        PrintToWindow(oss.str());
+
+        while (levelStep < totalLevelStep)
+        {
+            ++ levelStep;
+
+            UpdateOuterIterationStep(outnstep);
+
+            //using namespace PHMPI;
+            for (int iSolver = 0; iSolver < nSolver; ++ iSolver)
+            {
+                Controller *controller = new Controller(iSolver, this->region);
+                controller->MultiGridInitFlow(level);
+                controller->PostSolve(level);
+                delete controller;
+            }
+        }
+
+        //! Interpolate from coarse grid to fine grid.
+        for (int iSolver = 0; iSolver < nSolver; ++ iSolver)
+        {
+            Controller *controller = new Controller(iSolver, this->region);
+            controller->InterpolatFineGrid(iSolver, level - 1);
+            delete controller;
+        }
+    }
+
+    isInMGIniting = 0;
+    GlobalDataBase::UpdateData("isInMGIniting", &isInMGIniting, PHINT, 1);
+
+    int newnstep = 0;
+    GlobalDataBase::UpdateData("newnstep",&newnstep, PHINT, 1);
+
+    PrintToWindow("End init flow by coarse grid ...\n");
+    WriteLogFile("End init flow by coarse grid ...");
+}
+
+void HOSimulation::SolveSteady()
+{
+    int nSolver = GlobalDataBase::GetIntParaFromDB("maxNumOfSolver");
+    //! Get iteration number.
+    int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int turbInterval = GlobalDataBase::GetIntParaFromDB("turbInterval");
+
+    for (int iSolver = 0; iSolver < nSolver; ++ iSolver)
+    {
+        //! iSolver = 1 or 2, is supposed as turbulence computing.
+        if ((iSolver != NS_SOLVER) && (outnstep % turbInterval != 0))
+        {
+            return;
+        }
+
+        Controller *controller = new Controller(iSolver, this->region);
+
+        controller->SolveSteadyField();
+
+        controller->PostSolve();
+
+        delete controller;
+    }
+}
+
+void HOSimulation::SolveSteadyField()
+{
+    //MultiGrid(0);
+}
+
+void HOSimulation::SolveUnsteady()
+{
+    int     min_sub_iter = GlobalDataBase::GetIntParaFromDB("min_sub_iter");
+    int     max_sub_iter = GlobalDataBase::GetIntParaFromDB("max_sub_iter");
+    RDouble tol_sub_iter = GlobalDataBase::GetDoubleParaFromDB("tol_sub_iter");
+
+    int innstep = 0;
+    int nSolver = GlobalDataBase::GetIntParaFromDB("maxNumOfSolver");
+
+    bool isSubIterationDump = false;
+    GlobalDataBase::UpdateData("isSubIterationDump", &isSubIterationDump, PHBOOL, 1);
+
+    bool isSubIterationConvergence = false;
+    while(!isSubIterationConvergence)
+    {
+        innstep += 1;
+        GlobalDataBase::UpdateData("innstep", &innstep, PHINT, 1);
+
+        RDouble subIterationNormOneSolver     =  zero;
+        RDouble maxSubIterationNormAllSolvers = -LARGE;
+
+        for (int iSolver = 0; iSolver < nSolver; ++ iSolver)
+        {
+            Controller * controller = new Controller(iSolver, this->region);
+
+            controller->SolveSteadyField();
+
+            //! Here is in the sub-iteration, PostSolve is only for the CommunicationInterfaceData and dumps the "res.dat", which contains index of the sub-iteration residual.
+            controller->PostSolve();
+
+            subIterationNormOneSolver     = controller->ComputeSubIterationNorm(iSolver, 0);
+            maxSubIterationNormAllSolvers = MAX(maxSubIterationNormAllSolvers, subIterationNormOneSolver);
+
+            delete controller;
+        }
+
+        PH_CompareMaxMin(maxSubIterationNormAllSolvers, 1);
+
+        //! Sub-iteration continue or not judgement.
+        isSubIterationConvergence = IsSubIterationConvergence(innstep, min_sub_iter, max_sub_iter, tol_sub_iter, maxSubIterationNormAllSolvers);
+    }
+
+    //! Here is already (innstep == max_sub_iter || isSubIterationConvergence).
+    isSubIterationDump = true;
+    GlobalDataBase::UpdateData("isSubIterationDump", &isSubIterationDump, PHBOOL, 1);
+
+    //! Update physical time step flowfield after sub-iteration convergence.
+    for (int iSolver = 0; iSolver < nSolver; ++ iSolver)
+    {
+        Controller * controller = new Controller(iSolver, this->region);
+
+        controller->UpdateUnsteadyFlow(iSolver, 0);
+
+        //! Here is out of the sub-iteration, PostSolve is to dump various files according to the parameters in the "cfd_para.hypara", such as intervalStepFlow, intervalStepPlot, intervalStepForce, intervalStepRes, et al.
+        controller->PostSolve();
+
+        delete controller;
+    }
+}
+
+bool HOSimulation::IsSubIterationConvergence(const int & innstep, const int & min_sub_iter, const int & max_sub_iter, const RDouble & tol_sub_iter, const RDouble & averageQuotientMaxInSolvers)
+{
+    bool isSubIterationConvergence = false;
+
+    if (innstep < min_sub_iter)
+    {
+        isSubIterationConvergence = false;
+    }
+    else if (averageQuotientMaxInSolvers <= tol_sub_iter)
+    {
+        isSubIterationConvergence = true;
+    }
+    else if (innstep >= max_sub_iter)
+    {
+        isSubIterationConvergence = true;
+    }
+    else
+    {
+        isSubIterationConvergence = false;
+    }
+
+    return isSubIterationConvergence;
+}
+
+}
diff --git a/CFD/HOSolverUnstruct/src/HOSolverUnstruct.cpp b/CFD/HOSolverUnstruct/src/HOSolverUnstruct.cpp
new file mode 100644
index 0000000..bd584bf
--- /dev/null
+++ b/CFD/HOSolverUnstruct/src/HOSolverUnstruct.cpp
@@ -0,0 +1,2728 @@
+using namespace std;
+
+#include "HODefine.h"
+
+#include "ActionKey.h"
+#include "Math_BasisFunction.h"
+#include "MultiGridOperation.h"
+#include "Pointer.h"
+#include "Precision.h"
+#include "TK_Exit.h"
+#include "HOSolverUnstruct.h"
+#include "HOGeometryStructure.h"
+
+#include "HOSolverUnstructParam.h"
+
+#include "HOBasisFunction.h"
+#include "HOShapeFunction.h"
+#include "HOStandardElement.h"
+#include "HOGaussJacobiQuadrature.h"
+#include "Geo_UnstructBC.h"
+#include "HOBoundary.h"
+#include "HOInviscidFlux.h"
+
+#include "Residual.h"
+#include "Post_Visual.h"
+#include "IO_FileName.h"
+
+namespace PHSPACE
+{
+
+HOSolverUnstruct::HOSolverUnstruct()
+{
+#ifdef HO_UNIT_TEST
+
+    //TestOrthogoMatrix();
+
+    //TestBasisFunction();
+
+    //TestShapeFunction();
+
+    //TestGaussLegendrePoints1D();
+#endif
+}
+
+HOSolverUnstruct::~HOSolverUnstruct()
+{
+
+}
+
+LIB_EXPORT void HOSolverUnstruct::InitControlParameters()
+{
+    if(HODebug) cout << "InitControlParameters: init. params, check params" << endl;
+
+    controlParameters = new HOSolverUnstructParam();
+    controlParameters->Init();
+}
+
+void HOSolverUnstruct::ReadParameter()
+{
+    if(HODebug) cout << "ReadParameter" << endl;
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    string uns_scheme_name = parameters->GetSpaceSecheme();
+
+    int uns_scheme = GetSchemeID(uns_scheme_name);
+    GlobalDataBase::UpdateData("uns_scheme", &uns_scheme, PHINT, 1);
+}
+
+void HOSolverUnstruct::AllocateGlobalVar(Grid * gridIn)
+{
+    CFDSolver::AllocateGlobalVar(gridIn);
+    
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int hLevel = grid->GetLevel();
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+
+    if(hLevel == 0) highOrderGrids.resize(parameters->GetNMGLevel());
+ 
+    int nTotalCell = grid->GetNTotalCell();
+    //int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+    int nTotalNode = grid->GetNTotalNode();
+
+    //int nm = 5;
+    //! GlobalDataBase::GetData("nm", &nm, PHINT, 1);
+
+    int nl = 5;
+    GlobalDataBase::GetData("nl", &nl, PHINT, 1);
+    int nchem = 0;
+    GlobalDataBase::GetData("nchem", &nchem, PHINT, 1);
+    int neqn = nl + nchem;
+
+    if(hLevel == 0) highOrderGrids.resize(parameters->GetNMGLevel());
+    HighOrderGrid & highOrderGrid = highOrderGrids[hLevel];
+
+    //! Cell
+    //std::vector< HighOrderCell > & highOrderCells = highOrderGrids[hLevel].highOrderCells;
+    highOrderGrid.CopyGeometryInfoToHighOrderCell(grid);
+  
+    //! Face
+    //std::vector< HighOrderFace > & highOrderFaces = highOrderGrids[hLevel].highOrderFaces;
+    highOrderGrid.CopyGeometryInfoToHighOrderFace(grid);
+
+    //! Node
+    //std::vector< HighOrderNode > & highOrderNodes = highOrderGrids[hLevel].highOrderNodes;
+    highOrderGrid.CopyGeometryInfoToHighOrderNode(grid);
+
+    HighOrderGrid::CellSolType & highOrderCellsSol = highOrderGrid.highOrderCellsSol;
+    HighOrderGrid::FaceSolType & highOrderFacesSol = highOrderGrid.highOrderFacesSol;
+
+    int pNLevels   = parameters->pMultiGrid;
+    int dgSolOrder = parameters->dgSolOrder;
+    const int isUnsteady  = parameters->GetIsUnsteady();
+    const int viscousType = parameters->GetViscousType();
+
+    if (hLevel == 0)
+    {
+        if (pNLevels <= 0)
+        {
+            pNLevels = 1;
+        }
+
+        if((pNLevels != (dgSolOrder + 1)) && (pNLevels > 1))
+        {
+            cout<<" The P_multigrid of DG_parm is wrong, please checking  "<<endl;
+        }
+
+        //! totalFaceGaussPoint
+        highOrderGrids[hLevel].totalFaceGaussPoint.resize(pNLevels);
+        highOrderCellsSol.resize(pNLevels);
+        highOrderFacesSol.resize(pNLevels);
+
+        for(int img = 0; img < pNLevels; ++ img)
+        {
+            highOrderGrid.InitHighOrderCellSol(grid, dgSolOrder, img, isUnsteady, viscousType);
+            highOrderGrid.InitHighOrderFaceSol(grid, img, viscousType);
+        }
+    }
+    else
+    {
+        //! totalFaceGaussPoint
+        highOrderGrids[hLevel].totalFaceGaussPoint.resize(1);
+        highOrderCellsSol.resize(1);
+        highOrderFacesSol.resize(1);
+        highOrderGrid.InitHighOrderCellSol(grid, 0, 0, isUnsteady, viscousType);
+        highOrderGrid.InitHighOrderFaceSol(grid, 0, viscousType);
+    }    
+
+    RDouble *dt = new RDouble [ nTotal ];
+    grid->UpdateDataPtr("dt" , dt);
+
+    int *dofsOfCells = new int[nTotalCell];
+    highOrderGrid.GetNumberOfDOFs(nTotalCell, dofsOfCells);
+
+    RDouble ***q   = NewPointer3<RDouble>(nTotalCell, neqn, dofsOfCells);
+    RDouble ***res = NewPointer3<RDouble>(nTotalCell, neqn, dofsOfCells);
+
+    delete [] dofsOfCells;
+    
+    grid->UpdateDataPtr("q"  , q );
+    grid->UpdateDataPtr("res", res);
+
+    if (grid->GetLevel() == 0)
+    {
+        int *nodeBCType = new int[nTotalNode];
+        PHSPACE::SetField(nodeBCType, 0, nTotalNode);
+        grid->UpdateDataPtr("nodeBCType", nodeBCType);
+    }
+}
+
+void HOSolverUnstruct::DeAllocateGlobalVar(Grid * gridIn)
+{
+    if(HODebug)  cout << "DeAllocateGlobalVar" << endl;
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble *dt = reinterpret_cast<RDouble *> (gridIn->GetDataPtr("dt"));
+    delete [] dt;
+
+    RDouble ***q   = reinterpret_cast< RDouble *** > (gridIn->GetDataPtr("q" ));
+    RDouble ***res = reinterpret_cast< RDouble *** > (gridIn->GetDataPtr("res"));
+
+    DelPointer3(q );
+    DelPointer3(res);
+
+    if (grid->GetLevel() == 0)
+    {
+        int *nodeBCType = reinterpret_cast <int *> (grid->GetDataPtr("nodeBCType"));
+        delete[] nodeBCType;
+    }
+}
+
+void HOSolverUnstruct::RegisterCFDSolverInterfaceField()
+{
+    if(HODebug) cout << "RegisterCFDSolverInterfaceField" << endl;
+}
+
+void HOSolverUnstruct::InitMemory()
+{
+    InitControlParameters();
+    ReadParameter();
+    AllocateGlobalVariables();
+}
+
+void HOSolverUnstruct::ReleaseMemory()
+{
+    DeAllocateGlobalVariables();
+}
+
+void HOSolverUnstruct::AllocateGlobalVariables()
+{
+    Grid *grid = GetGrid();
+    while (grid)
+    {
+        AllocateGlobalVar(grid);
+        grid = grid->GetCoarseGrid();
+    }
+}
+
+bool HOSolverUnstruct::JudgeIfReadAverage()
+{
+    string restartNSFile = ".\results\flow.dat";
+    GlobalDataBase::GetData("restartNSFile", &restartNSFile, PHSTRING, 1);
+    string averageFlowFile = AddSymbolToFileName(restartNSFile, "_", "Average");
+
+    if (PHMPI::IsParallelRun())
+    {
+        averageFlowFile = PHSPACE::AddSymbolToFileName(averageFlowFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(averageFlowFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+bool HOSolverUnstruct::JudgeIfRestart()
+{
+    string restartNSFile = ".\results\flow.dat";
+    GlobalDataBase::GetData("restartNSFile", &restartNSFile, PHSTRING, 1);
+
+    if(PHMPI::IsParallelRun())
+    {
+        restartNSFile = PHSPACE::AddSymbolToFileName(restartNSFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(restartNSFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+void HOSolverUnstruct::InitFlow()
+{
+    int nstart;
+
+    Param_CFDSolver *parameters = GetControlParameters();
+
+    //! This method would be wrong when turbulent computational from laminar flow field.
+    //! But this situation breaks the law, so it is not considered.
+    bool readFlowFile = false;
+    if (JudgeIfRestart())
+    {
+        readFlowFile = true;
+
+        nstart = 1;
+        GlobalDataBase::UpdateData("nstart", &nstart, PHINT, 1);
+    }
+
+    if (!readFlowFile)
+    {
+        int outnstep = 0;
+        GlobalDataBase::UpdateData("outnstep",&outnstep, PHINT, 1);
+
+        nstart = 0;
+        GlobalDataBase::UpdateData("nstart", &nstart, PHINT, 1);
+
+        InitFlowAsRestart();
+    }
+    else
+    {
+        //! To read data in restart file for continual simulation.
+        ActionKey *actkeyReadRestartData = new ActionKey();
+        FillActionKey(actkeyReadRestartData, READ_RESTART, 0);
+        InitFlowAsReadingRestart(actkeyReadRestartData);
+        delete actkeyReadRestartData;
+    }
+
+    RDouble globalMinTimeStep = -LARGE;
+    GlobalDataBase::UpdateData("globalMinTimeStep",&globalMinTimeStep, PHDOUBLE, 1);
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady)
+    {
+        int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+        int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+        int startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+        bool isReadAverageFlow = ifStaticsFlowField && (outnstep >= startStatisticStep);
+        if (isReadAverageFlow && readFlowFile && JudgeIfReadAverage())
+        {
+            //! To dump restart data for continual simulation.
+            ActionKey *actkeyReadAverageFlow = new ActionKey();
+            FillActionKey(actkeyReadAverageFlow, READ_AVERAGE_FLOW, 0);
+            //ReadAverageFlow(actkeyReadAverageFlow);
+            delete actkeyReadAverageFlow;
+        }
+        else
+        {
+            int nStatisticalStep = 0;
+            GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+        }
+    }
+
+    //! Compute gama, temperature, viscousity, and set boundary condition once.
+    InitDependentVariables();
+}
+
+void HOSolverUnstruct::InitFlowAsRestart()
+{
+    UnstructGrid * grid = UnstructGridCast(GetGrid(0));
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+
+    int outnstep = 0;
+    GlobalDataBase::UpdateData("outnstep",&outnstep, PHINT, 1);
+
+    RDouble physicalTime = 0.0;
+    GlobalDataBase::UpdateData("physicalTime",&physicalTime, PHFLOAT, 1);
+
+    int nTotalCell = grid->GetNTotalCell();
+
+    int nl = 5;
+    GlobalDataBase::GetData("nl", &nl, PHINT, 1);
+    int nchem = 0;
+    GlobalDataBase::GetData("nchem", &nchem, PHINT, 1);
+    int neqn = nl + nchem;
+
+    RDouble *prim_inf = reinterpret_cast<RDouble *> (GlobalDataBase::GetDataPtr("prim_inf" ));
+    RDouble refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+
+    vector < RDouble > conserValue(5,0.0);
+
+    conserValue[0] = prim_inf[0];
+    conserValue[1] = prim_inf[0] * prim_inf[1];
+    conserValue[2] = prim_inf[0] * prim_inf[2];
+    conserValue[3] = prim_inf[0] * prim_inf[3];
+    conserValue[4] = prim_inf[4]/(refGama - 1) + 0.5 * prim_inf[0] * (pow(prim_inf[1],2) + pow(prim_inf[2],2) + pow(prim_inf[3],2));
+
+    //! Init dof of cell and initialize value of gausspoint
+    highOrderGrids[0].InitDofOfCell(grid, conserValue, neqn);
+
+    //! Initialize value of gausspoint for face
+    highOrderGrids[0].InitValueOfFace(grid, conserValue, neqn);
+
+    int hLevel = grid->GetLevel();
+
+    RDouble *** q = reinterpret_cast< RDouble *** > (grid->GetDataPtr("q"));
+
+    int ndof = 0;
+    for (int ieqn = 0; ieqn < neqn; ++ ieqn)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            ndof = highOrderGrids[hLevel].highOrderCellsSol[0][iCell].nDOFsSol;
+
+            for(int idof = 0; idof < ndof; ++ idof)
+            {
+                q[iCell][ieqn][idof] = highOrderGrids[hLevel].highOrderCellsSol[0][iCell].dofQ[ieqn][idof];
+            }
+        }
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+
+    if (!isUnsteady) return;
+    //! For unsteady problem, the initial condition must be high order
+    cout<<" the initial condition must be high order for unsteady problem------> InitFlowAsRestart()"<<endl;
+
+    highOrderGrids[0].InitDofOfCellUnsteady(grid, conserValue, neqn);
+}
+
+void HOSolverUnstruct::InitDependentVariables()
+{
+    Grid *fgrid = GetGrid(0);
+    Boundary(fgrid);
+    
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    int viscousType = parameters->GetViscousType();
+    if (viscousType > INVISCID)
+    {
+        CompViscousCoef(fgrid);
+        InitViscousCoefTurb(fgrid);
+    }
+}
+
+void HOSolverUnstruct::Boundary(Grid *gridIn)
+{
+    if(HODebug) cout << "Boundary: set the ghost cell q��DG needs to implement the special BC accroding to the BC type." << endl;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int       *left_cell_of_face   = grid->GetLeftCellOfFace();
+    int       *right_cell_of_face  = grid->GetRightCellOfFace();
+
+    UnstructBCSet **bcr = grid->GetBCRecord();
+
+    int       nBoundFace = grid->GetNBoundFace();
+    
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    int hLevel = grid->GetLevel(); 
+    int pLevel = parameters->pMultiGrid;
+    
+    if(pLevel == 1)
+    {
+        pLevel = 0;
+    }
+
+    if(hLevel > 1 && pLevel > 1)
+    {
+        cout<<"the multigrid para is wrong for unstructure high order in HOSolverUnstruct::Boundary(Grid *gridIn)"<<endl;
+    }
+
+    int nm = 5;
+    GlobalDataBase::GetData("nm", &nm, PHINT, 1);
+
+    int nl;
+    GlobalDataBase::GetData("nl", &nl, PHINT, 1);
+
+    int nchem;
+    GlobalDataBase::GetData("nchem", &nchem, PHINT, 1);
+    int nEquation = nl + nchem;
+
+    double refGama = parameters->GetRefGama();
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble wallTemperature = parameters->GetWallTemperature();
+
+    double refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+
+    double tw = wallTemperature / refDimensionalTemperature;
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    RDouble *prims, *primt;
+    prims = new RDouble[nl+nchem];
+    primt = new RDouble[nl+nchem];
+
+    RDouble *primInflow = reinterpret_cast< RDouble * >(GlobalDataBase::GetDataPtr("prim_inf"));
+    bool massFlow = false;
+    RDouble massAlpha = 1.0;
+    double massIn  = 1.0;
+    double massOut = 1.0;
+
+    if (massFlow)
+    {
+        //ComputeMassFlow(grid);
+        GlobalDataBase::GetData("massIn", &massIn, PHDOUBLE, 1);
+        GlobalDataBase::GetData("massOut", &massOut, PHDOUBLE, 1);
+        massAlpha = massIn / massOut;
+        cout << " massAlpha = " << massAlpha << "\n";
+    }
+
+    using namespace IDX;
+    using namespace PHENGLEI;
+
+    int le, re, bcType, numberGaussPoint, rGausspoint;
+    RDouble xNormal, yNormal, zNormal, vgn;
+    RDouble xtn = 0.0, ytn = 0.0, ztn = 0.0;
+    //vector< vector< RDouble > > conservationQ;
+
+    bool isViscous = parameters->IsViscous();
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = left_cell_of_face [ iFace ];
+        re = right_cell_of_face[ iFace ];
+        bcType = bcr[iFace]->GetKey();
+        HighOrderFaceSol & highOrderFaceSol = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace];
+        numberGaussPoint = highOrderFaceSol.integNumberOfGaussPoint;
+
+        if (IsInterface(bcType)) //! Interface
+        {
+            continue;
+        }
+        else if(bcType == SYMMETRY)
+        {
+            for(int iGaussPoint = 0; iGaussPoint < numberGaussPoint; ++iGaussPoint)
+            {
+                xNormal = highOrderFaceSol.metricNormalsFace[iGaussPoint][0];
+                yNormal = highOrderFaceSol.metricNormalsFace[iGaussPoint][1];
+                zNormal = highOrderFaceSol.metricNormalsFace[iGaussPoint][2];
+
+                vector< vector< RDouble > > & conservationQ = highOrderFaceSol.q;
+
+                vgn = 0.0;
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    prims[m] = conservationQ[m][iGaussPoint];
+                }
+
+                prims[1] = prims[1] / prims[0];
+                prims[2] = prims[2] / prims[0];
+                prims[3] = prims[3] / prims[0];
+                prims[4] = HO_GAMAM1 * (prims[4] - 0.5 * prims[0] * (pow(prims[1],2) + pow(prims[2],2) + pow(prims[3],2)));
+
+                SymmetryBC(prims, primt, xNormal, yNormal, zNormal, vgn, nl, nchem);
+
+                int rGaussPoint = iGaussPoint + numberGaussPoint;
+                conservationQ[0][rGaussPoint] = primt[0];
+                conservationQ[1][rGaussPoint] = primt[0] * primt[1];
+                conservationQ[2][rGaussPoint] = primt[0] * primt[2];
+                conservationQ[3][rGaussPoint] = primt[0] * primt[3];
+                conservationQ[4][rGaussPoint] = primt[4]/HO_GAMAM1 + 0.5 * primt[0] * (pow(primt[1],2) + pow(primt[2],2) + pow(primt[3],2));
+            }
+
+            continue;
+        }
+        else if (IsWall(bcType))
+        {
+            if (!isViscous)
+            {
+                for(int iGausspoint = 0; iGausspoint < numberGaussPoint; ++iGausspoint)
+                {
+                    xNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][0];
+                    yNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][1];
+                    zNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][2];
+                    vector< vector< RDouble > > & conservationQ = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].q;
+
+                    vgn = 0.0;
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        prims[m] = conservationQ[m][iGausspoint];
+                    }
+                    prims[1] = prims[1] / prims[0];
+                    prims[2] = prims[2] / prims[0];
+                    prims[3] = prims[3] / prims[0];
+                    prims[4] = HO_GAMAM1 * (prims[4] - 0.5 * prims[0] * (pow(prims[1],2) + pow(prims[2],2) + pow(prims[3],2)));
+
+                    SymmetryBC(prims, primt, xNormal, yNormal, zNormal, vgn, nl, nchem);
+
+                    rGausspoint = iGausspoint + numberGaussPoint;
+                    conservationQ[0][rGausspoint] = primt[0];
+                    conservationQ[1][rGausspoint] = primt[0] * primt[1];
+                    conservationQ[2][rGausspoint] = primt[0] * primt[2];
+                    conservationQ[3][rGausspoint] = primt[0] * primt[3];
+                    conservationQ[4][rGausspoint] = primt[4]/HO_GAMAM1 + 0.5 * primt[0] * (pow(primt[1],2) + pow(primt[2],2) + pow(primt[3],2));
+                }
+            }
+            else if (wallTemperature <= 0.0)
+            {
+                //! Viscous adiabatic wall
+                for(int iGausspoint = 0; iGausspoint < numberGaussPoint; ++iGausspoint)
+                {
+                    xNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][0];
+                    yNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][1];
+                    zNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][2];
+                    vector< vector< RDouble > > & conservationQ = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].q;                    
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        prims[m] = conservationQ[m][iGausspoint];
+                    }
+                    prims[1] = prims[1] / prims[0];
+                    prims[2] = prims[2] / prims[0];
+                    prims[3] = prims[3] / prims[0];
+                    prims[4] = HO_GAMAM1 * (prims[4] - 0.5 * prims[0] * (pow(prims[1],2) + pow(prims[2],2) + pow(prims[3],2)));
+
+                    ViscousAdiabaticWallBC(prims, primt, xNormal, yNormal, zNormal, xtn, ytn, ztn, refMachNumber, nl, nchem);
+                    
+                    rGausspoint = iGausspoint + numberGaussPoint;
+                    conservationQ[0][rGausspoint]  =   primt[0];
+                    conservationQ[1][rGausspoint]  =   primt[0] * primt[1];
+                    conservationQ[2][rGausspoint]  =   primt[0] * primt[2];
+                    conservationQ[3][rGausspoint]  =   primt[0] * primt[3];
+                    conservationQ[4][rGausspoint]  =   primt[4]/HO_GAMAM1 + 0.5 * primt[0] * (pow(primt[1],2) + pow(primt[2],2) + pow(primt[3],2));
+                }
+            }
+            else
+            {
+                //! Viscous iso-thermal wall
+                for(int iGausspoint = 0; iGausspoint < numberGaussPoint; ++iGausspoint)
+                {
+                    xNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][0];
+                    yNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][1];
+                    zNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][2];
+                    vector< vector< RDouble > > & conservationQ = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].q;
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        prims[m] = conservationQ[m][iGausspoint];
+                    }
+                    prims[1] = prims[1] / prims[0];
+                    prims[2] = prims[2] / prims[0];
+                    prims[3] = prims[3] / prims[0];
+                    prims[4] = HO_GAMAM1 * (prims[4] - 0.5 * prims[0] * (pow(prims[1],2) + pow(prims[2],2) + pow(prims[3],2)));
+
+                    ViscousIsotropicWallBC(prims, primt, xNormal, yNormal, zNormal, xtn, ytn, ztn, refMachNumber, tw, nl, nchem);
+                    
+                    rGausspoint = iGausspoint + numberGaussPoint;
+                    conservationQ[0][rGausspoint]  =   primt[0];
+                    conservationQ[1][rGausspoint]  =   primt[0] * primt[1];
+                    conservationQ[2][rGausspoint]  =   primt[0] * primt[2];
+                    conservationQ[3][rGausspoint]  =   primt[0] * primt[3];
+                    conservationQ[4][rGausspoint]  =   primt[4]/HO_GAMAM1 + 0.5 * primt[0] * (pow(primt[1],2) + pow(primt[2],2) + pow(primt[3],2));
+                }
+            }
+            
+            continue;
+        }
+        else if (bcType == FARFIELD)
+        {
+            if(ifLowSpeedPrecon == 0)
+            {
+                for (int iGausspoint = 0; iGausspoint < numberGaussPoint; ++ iGausspoint)
+                {
+                    xNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][0];
+                    yNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][1];
+                    zNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][2];
+                    vector< vector< RDouble > > & conservationQ = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].q;
+                    vgn = 0.0;
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        prims[m] = conservationQ[m][iGausspoint];
+                    }
+
+                    prims[1] = prims[1] / prims[0];
+                    prims[2] = prims[2] / prims[0];
+                    prims[3] = prims[3] / prims[0];
+
+                    prims[4] = HO_GAMAM1 * (prims[4] - 0.5 * prims[0] * (pow(prims[1],2) + pow(prims[2],2) + pow(prims[3],2)));
+
+                    //FarfieldBC(prims, primInflow, primt, refGama, HO_GAMA, xNormal, yNormal, zNormal, vgn, nl, nchem);
+                    FarFieldRiemannInvariants(prims, primInflow, primt, refGama, HO_GAMA, xNormal, yNormal, zNormal, vgn, nl, nchem);
+
+                    rGausspoint = iGausspoint + numberGaussPoint;
+                    conservationQ[0][rGausspoint] = primt[0];
+                    conservationQ[1][rGausspoint] = primt[0] * primt[1];
+                    conservationQ[2][rGausspoint] = primt[0] * primt[2];
+                    conservationQ[3][rGausspoint] = primt[0] * primt[3];
+                    conservationQ[4][rGausspoint] = primt[4] / HO_GAMAM1 + 0.5 * primt[0] * (pow(primt[1],2) + pow(primt[2],2) + pow(primt[3],2));
+                }
+            }
+            else
+            {
+            }
+        }
+        else if (bcType == INFLOW)
+        {
+            for (int iGausspoint = 0; iGausspoint < numberGaussPoint; ++ iGausspoint)
+            {
+                xNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][0];
+                yNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][1];
+                zNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][2];
+                vector< vector< RDouble > > & conservationQ = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].q;
+                vgn = 0.0;
+
+                InflowBC(primInflow, primt, nl, nchem);
+
+                rGausspoint = iGausspoint + numberGaussPoint;
+                conservationQ[0][rGausspoint] = primt[0];
+                conservationQ[1][rGausspoint] = primt[0] * primt[1];
+                conservationQ[2][rGausspoint] = primt[0] * primt[2];
+                conservationQ[3][rGausspoint] = primt[0] * primt[3];
+                conservationQ[4][rGausspoint] = primt[4] / HO_GAMAM1 + 0.5 * primt[0] * (pow(primt[1],2) + pow(primt[2],2) + pow(primt[3],2));
+            } 
+
+            continue;
+        }
+        else if (bcType == OUTFLOW)
+        { 
+            for (int iGausspoint = 0; iGausspoint < numberGaussPoint; ++ iGausspoint)
+            {
+                xNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][0];
+                yNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][1];
+                zNormal = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].metricNormalsFace[iGausspoint][2];
+                vector< vector< RDouble > > & conservationQ = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].q;
+                vgn = 0.0;
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    prims[m] = conservationQ[m][iGausspoint];
+                }
+                prims[1] = prims[1] / prims[0];
+                prims[2] = prims[2] / prims[0];
+                prims[3] = prims[3] / prims[0];
+                prims[4] = HO_GAMAM1 * (prims[4] - 0.5 * prims[0] * (pow(prims[1],2) + pow(prims[2],2) + pow(prims[3],2)));
+
+                OutflowBC(prims, primt, nl, nchem);
+
+                rGausspoint = iGausspoint + numberGaussPoint;
+                conservationQ[0][rGausspoint]  =   primt[0];
+                conservationQ[1][rGausspoint]  =   primt[0] * primt[1];
+                conservationQ[2][rGausspoint]  =   primt[0] * primt[2];
+                conservationQ[3][rGausspoint]  =   primt[0] * primt[3];
+                conservationQ[4][rGausspoint]  =   primt[4]/HO_GAMAM1 + 0.5 * primt[0] * (pow(primt[1],2) + pow(primt[2],2) + pow(primt[3],2));
+            }
+
+            continue;
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("Error: this boundary type does not exist!\n");
+        }
+    }
+    delete [] prims;
+    delete [] primt;
+}
+
+void HOSolverUnstruct::CompViscousCoef(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int      nTotalCell = grid->GetNTotalCell();
+    int      nTotalFace = grid->GetNTotalFace();
+    int      nBoundFace = grid->GetNBoundFace();
+    int      nTotal = nTotalCell + nBoundFace;
+
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    int hLevel = grid->GetLevel(); 
+    int pLevel     = parameters->pMultiGrid;
+    if(pLevel == 1)
+    {
+        pLevel = 0;
+    }
+
+    RDouble tsuth;
+    GlobalDataBase::GetData("tsuth", &tsuth, PHDOUBLE, 1);
+
+    RDouble visl_min;
+    GlobalDataBase::GetData("visl_min", &visl_min, PHDOUBLE, 1);
+
+    RDouble R = parameters->GetR();
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        //! Compute gauss point temperature of volume
+        int numberGaussPoint = highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell].integNumberOfGaussPoint;
+        for(int iGaussPoint = 0; iGaussPoint < numberGaussPoint; ++ iGaussPoint)
+        {
+            RDouble conserValue[5];
+            //! Get conservation variable
+            conserValue[0] = highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell].q[0][iGaussPoint];
+            conserValue[1] = highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell].q[1][iGaussPoint];
+            conserValue[2] = highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell].q[2][iGaussPoint];
+            conserValue[3] = highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell].q[3][iGaussPoint];
+            conserValue[4] = highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell].q[4][iGaussPoint];
+
+            RDouble pre = ComputePressure(conserValue);
+            RDouble T = pre / conserValue[0] / R;
+            highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell].visl[iGaussPoint] = pow(T,1.5) * (1.0 + tsuth) / (T + tsuth);
+        }
+    }
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        //! Compute gauss point temperature of volume
+        int numberGaussPoint = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].integNumberOfGaussPoint;
+        for(int iGaussPoint = 0; iGaussPoint < numberGaussPoint; ++ iGaussPoint)
+        {
+            RDouble conserValue[5];
+            //! Get conservation variable
+            conserValue[0] = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].q[0][iGaussPoint];
+            conserValue[1] = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].q[1][iGaussPoint];
+            conserValue[2] = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].q[2][iGaussPoint];
+            conserValue[3] = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].q[3][iGaussPoint];
+            conserValue[4] = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].q[4][iGaussPoint];
+
+            RDouble pre = ComputePressure(conserValue);
+            RDouble T = pre / conserValue[0] / R;
+
+            highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].visl[iGaussPoint] = pow(T,1.5) * (1.0 + tsuth) / (T + tsuth);
+        }
+    }
+}
+
+void HOSolverUnstruct::ComputeGaussPointQ(Grid * gridIn)
+{
+    UnstructGrid * grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int * left_cell_of_face  = grid->GetLeftCellOfFace();
+    int * right_cell_of_face = grid->GetRightCellOfFace();
+
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    int hLevel = grid->GetLevel();
+    int pLevel = parameters->pMultiGrid;
+
+    if(pLevel == 1)
+    {
+        pLevel = 0;
+    }
+
+    RDouble tsuth;
+    GlobalDataBase::GetData("tsuth", &tsuth, PHDOUBLE, 1);
+
+    RDouble visl_min;
+    GlobalDataBase::GetData("visl_min", &visl_min, PHDOUBLE, 1);
+
+    int nl = 5;
+    GlobalDataBase::GetData("nl", &nl, PHINT, 1);
+    int nchem;
+    GlobalDataBase::GetData("nchem", &nchem, PHINT, 1);
+    int nEquation = nl + nchem;
+
+    int numberGaussPoint = 0, rGaussPoint = 0, ndof = 0;
+    int leftCell = 0, rightCell = 0;
+
+    RDouble qTmp = 0.0, qLTmp, qRTmp;
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        //! Compute gauss point temperature of volume
+        HighOrderCellSol & uHOCellSol = highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell];
+        numberGaussPoint = uHOCellSol.integNumberOfGaussPoint;
+        ndof = uHOCellSol.nDOFsSol;        
+        for (int iGaussPoint = 0; iGaussPoint < numberGaussPoint; ++ iGaussPoint)
+        {
+            //! Compute conservation variable
+            for (int ieqn = 0; ieqn < nEquation; ++ ieqn)
+            {
+                //uHOCellSol.q[ieqn][iGaussPoint] = 0.0;
+                qTmp = 0.0;
+                for (int idof =0; idof < ndof; ++ idof)
+                {
+                    qTmp += uHOCellSol.basisFuncCellIntegration[iGaussPoint][idof] * uHOCellSol.dofQ[ieqn][idof];
+                }
+
+                uHOCellSol.q[ieqn][iGaussPoint] = qTmp;
+            }
+        }
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        HighOrderFaceSol & uHOFaceSol = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace];
+        //! Compute gauss point temperature of face
+        numberGaussPoint = uHOFaceSol.integNumberOfGaussPoint;
+        leftCell = left_cell_of_face[iFace];
+        HighOrderCellSol & uHOLeftCellSol = highOrderGrids[hLevel].highOrderCellsSol[pLevel][leftCell];
+
+        for (int iGaussPoint = 0; iGaussPoint < numberGaussPoint; ++ iGaussPoint)
+        {
+            //! Compute conservation variable
+            rGaussPoint = iGaussPoint + numberGaussPoint;
+            for (int ieqn = 0; ieqn < nEquation; ++ ieqn)
+            {
+                qLTmp = 0.0;
+                for(int idof =0; idof < ndof; ++ idof)
+                {
+                    qLTmp += uHOFaceSol.leftBasisFuncFaceIntegration[iGaussPoint][idof] * uHOLeftCellSol.dofQ[ieqn][idof];
+                }
+                uHOFaceSol.q[ieqn][iGaussPoint] = qLTmp;
+                uHOFaceSol.q[ieqn][rGaussPoint] = 0.0;
+            }
+        }
+    }
+    
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        HighOrderFaceSol & uHOFaceSol = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace];
+        //! Compute gauss point temperature of face
+        numberGaussPoint = uHOFaceSol.integNumberOfGaussPoint;
+        leftCell  = left_cell_of_face[iFace];
+        rightCell = right_cell_of_face[iFace];
+        HighOrderCellSol & uHOLeftCellSol = highOrderGrids[hLevel].highOrderCellsSol[pLevel][leftCell];
+        HighOrderCellSol & uHORigtCellSol = highOrderGrids[hLevel].highOrderCellsSol[pLevel][rightCell];
+        for (int iGaussPoint = 0; iGaussPoint < numberGaussPoint; ++ iGaussPoint)
+        {
+            //! Compute conservation variable
+            rGaussPoint = iGaussPoint + numberGaussPoint;
+            for (int ieqn = 0; ieqn < nEquation; ++ ieqn)
+            {
+                qLTmp = 0.0;
+                qRTmp = 0.0;
+                for (int idof =0; idof < ndof; ++ idof)
+                {
+                    qLTmp += uHOFaceSol.leftBasisFuncFaceIntegration[iGaussPoint][idof] * uHOLeftCellSol.dofQ[ieqn][idof];
+                    qRTmp += uHOFaceSol.rightBasisFuncFaceIntegration[iGaussPoint][idof] * uHORigtCellSol.dofQ[ieqn][idof];
+                }
+                uHOFaceSol.q[ieqn][iGaussPoint] = qLTmp;
+                uHOFaceSol.q[ieqn][rGaussPoint] = qRTmp;
+            }
+        }
+    }
+}
+
+void HOSolverUnstruct::ComputeQAverage(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int      nTotalCell = grid->GetNTotalCell();
+
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    int hLevel = grid->GetLevel(); 
+    int pLevel     = parameters->pMultiGrid;
+    bool isViscous = parameters->IsViscous();
+    if(pLevel == 1)
+    {
+        pLevel = 0;
+    }
+
+    RDouble tsuth;
+    GlobalDataBase::GetData("tsuth", &tsuth, PHDOUBLE, 1);
+
+    RDouble visl_min;
+    GlobalDataBase::GetData("visl_min", &visl_min, PHDOUBLE, 1);
+
+    int nl = 5;
+    GlobalDataBase::GetData("nl", &nl, PHINT, 1);
+
+    int nchem;
+    GlobalDataBase::GetData("nchem", &nchem, PHINT, 1);
+    int nEquation = nl + nchem;
+    int numberGaussPoint = 0; 
+
+    const RDouble *weightCoeff;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        //! Compute QAverage of volume
+        HighOrderCellSol & uHOCellSol = highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell];
+        HighOrderCell    & uHOCell    = highOrderGrids[hLevel].highOrderCells[iCell];
+        numberGaussPoint = uHOCellSol.integNumberOfGaussPoint;
+        for(int ieqn = 0; ieqn < nEquation; ++ ieqn)
+        {
+            uHOCellSol.qAverage[ieqn] = 0.0;
+        }
+
+        weightCoeff = highOrderGrids[hLevel].standardCellElements[uHOCell.standardElementIndex].GetWtIntegration();
+
+        for(int iGaussPoint = 0; iGaussPoint < numberGaussPoint; ++ iGaussPoint)
+        {
+            //! Compute conservation variable
+            for(int ieqn = 0; ieqn < nEquation; ++ ieqn)
+            {
+                uHOCellSol.qAverage[ieqn] += weightCoeff[iGaussPoint] * uHOCellSol.q[ieqn][iGaussPoint] * uHOCellSol.JacDetCellIntegration[iGaussPoint];
+            }
+        }
+        for(int ieqn = 0; ieqn < nEquation; ++ ieqn)
+        {
+            uHOCellSol.qAverage[ieqn] /= uHOCell.volume;
+        }
+    }
+
+    if(isViscous == 1)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            //! Compute QAverage of volume
+            HighOrderCellSol & uHOCellSol = highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell];
+            HighOrderCell    & uHOCell    = highOrderGrids[hLevel].highOrderCells[iCell];
+            numberGaussPoint = uHOCellSol.integNumberOfGaussPoint;
+            
+            uHOCellSol.vislAverage = 0.0;
+            weightCoeff   =   highOrderGrids[hLevel].standardCellElements[uHOCell.standardElementIndex].GetWtIntegration();
+            for(int iGaussPoint = 0; iGaussPoint < numberGaussPoint; ++ iGaussPoint)
+            {
+                //! Compute conservation variable.
+                uHOCellSol.vislAverage += weightCoeff[iGaussPoint] * uHOCellSol.visl[iGaussPoint] * uHOCellSol.JacDetCellIntegration[iGaussPoint];
+            }
+            uHOCellSol.vislAverage /= uHOCell.volume;
+        }
+    }
+    else if(isViscous > 1)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            //! Compute QAverage of volume
+            HighOrderCellSol & uHOCellSol = highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell];
+            HighOrderCell    & uHOCell    = highOrderGrids[hLevel].highOrderCells[iCell];
+            numberGaussPoint = uHOCellSol.integNumberOfGaussPoint;
+
+            uHOCellSol.vistAverage = 0.0;
+            weightCoeff = highOrderGrids[hLevel].standardCellElements[uHOCell.standardElementIndex].GetWtIntegration();
+            for(int iGaussPoint = 0; iGaussPoint < numberGaussPoint; ++ iGaussPoint)
+            {
+                //! Compute conservation variable
+                uHOCellSol.vistAverage += weightCoeff[iGaussPoint] * uHOCellSol.vist[iGaussPoint] * uHOCellSol.JacDetCellIntegration[iGaussPoint];
+            }
+            uHOCellSol.vistAverage /= uHOCell.volume;
+        }
+    }
+}
+
+void HOSolverUnstruct::InitViscousCoefTurb(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int      nTotalCell = grid->GetNTotalCell();
+    int      nTotalFace = grid->GetNTotalFace();
+    int      nBoundFace = grid->GetNBoundFace();
+    int      nTotal = nTotalCell + nBoundFace;
+
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    int hLevel = grid->GetLevel(); 
+    int pLevel     = parameters->pMultiGrid;
+    if(pLevel == 1)
+    {
+        pLevel = 0;
+    }
+    int numberGaussPoint = 0;
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        //! Compute gauss point temperature of volume
+        numberGaussPoint = highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell].integNumberOfGaussPoint;
+        for(int iGaussPoint = 0; iGaussPoint < numberGaussPoint; ++ iGaussPoint)
+        {
+            highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell].vist[iGaussPoint] = 0.0;
+        }        
+    }
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        //! Compute gauss point temperature of volume
+        numberGaussPoint = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].integNumberOfGaussPoint;
+        for(int iGaussPoint = 0; iGaussPoint < numberGaussPoint; ++ iGaussPoint)
+        {
+            highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace].vist[iGaussPoint] = 0.0;
+        }        
+    }
+}
+
+void HOSolverUnstruct::CompGamaAndTField(Grid *gridIn)
+{
+    int nl = 5;
+    GlobalDataBase::GetData("nl", &nl, PHINT, 1);
+
+    int nchem = 0;
+    GlobalDataBase::GetData("nchem", &nchem, PHINT, 1);
+}
+
+void HOSolverUnstruct::InitCoarseGridsFlow()
+{
+    if(HODebug) cout << "InitCoarseGridsFlow: Restrict from fine to coarse grid for all q set ghost cell q" << endl;
+
+    Grid *fgrid = GetGrid(0);
+
+    Grid * cgrid = fgrid->GetCoarseGrid();
+    while (cgrid)
+    {
+        RestrictAllQ(fgrid, cgrid);
+        Boundary(cgrid);
+
+        fgrid = cgrid;
+        cgrid = cgrid->GetCoarseGrid();
+    }
+}
+
+//! Restrict from fine to coarse grid for all q
+void HOSolverUnstruct::RestrictAllQ(Grid *fgrid, Grid *cgrid)
+{
+    if(HODebug) cout << "RestrictAllQ: Restrict from fine to coarse grid for all q" << endl;
+}
+
+void HOSolverUnstruct::ActionReflect(ActionTag *acttag)
+{
+}
+
+void HOSolverUnstruct::UploadInterfaceData(ActionKey *actkey)
+{
+}
+
+void HOSolverUnstruct::DownloadInterfaceData(ActionKey *actkey)
+{
+}
+
+void HOSolverUnstruct::ZeroResiduals(Grid * gridIn)
+{
+    if(HODebug) cout << "ZeroResiduals:  \"res\" = 0" << endl;
+    
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+
+    int nl = 5;
+    GlobalDataBase::GetData("nl", &nl, PHINT, 1);
+
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    int hLevel = grid->GetLevel(); 
+    int pLevel = parameters->pMultiGrid;
+    
+    if(pLevel == 1)
+    {
+        pLevel = 0;
+    }
+
+    int ndof = 0;
+    int neqn = nl;
+
+    RDouble *** res = reinterpret_cast< RDouble *** > (grid->GetDataPtr("res"));
+
+    for (int ieqn = 0; ieqn < neqn; ++ ieqn)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            ndof = highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell].nDOFsSol;
+
+            for(int idof = 0; idof < ndof; ++ idof)
+            {
+                highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell].res[ieqn][idof] = 0.0;
+
+                res[iCell][ieqn][idof] = 0.0;
+            }
+        }
+    }
+}
+
+FieldProxy * HOSolverUnstruct::GetResidualProxy(Grid *gridIn)
+{
+    if(HODebug) cout << "GetResidualProxy: return proxy of \"res\"" << endl;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble ***res = reinterpret_cast< RDouble *** > (grid->GetDataPtr("res"));
+
+    FieldProxy *res_proxy = new FieldProxy();
+
+    res_proxy->SetField_UHO(res);
+
+    return res_proxy;
+}
+
+FieldProxy * HOSolverUnstruct::CreateFieldProxy(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int hLevel = grid->GetLevel();
+    int nTotalCell = grid->GetNTotalCell();
+
+    int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nEquation  = nl + nchem;
+
+    HighOrderGrid & highOrderGrid = highOrderGrids[hLevel];
+    
+    int * dofsOfCells = new int[nTotalCell];
+    highOrderGrid.GetNumberOfDOFs(nTotalCell, dofsOfCells);
+
+    RDouble *** field = NewPointer3<RDouble>(nTotalCell, nEquation, dofsOfCells);
+
+    delete [] dofsOfCells;
+
+    FieldProxy *fieldProxy = new FieldProxy();
+
+    fieldProxy->SetField_UHO(field, true);
+
+    return fieldProxy;
+}
+
+//! Load flow variables stored in grid to q
+void HOSolverUnstruct::LoadQ(Grid *gridIn, FieldProxy *qProxy)
+{
+    if(HODebug) cout << "LoadQ: qProxy = \"q\"" << endl;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int hLevel = grid->GetLevel();
+    int nTotalCell = grid->GetNTotalCell();
+    //int nBoundFace = grid->GetNBoundFace();
+    //int nTotal = nTotalCell + nBoundFace;
+
+    RDouble ***qPro = qProxy->GetField_UHO();
+    RDouble ***qold = reinterpret_cast< RDouble *** > (grid->GetDataPtr("q"));
+
+    int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nEquation  = nl + nchem;
+
+    HighOrderGrid & highOrderGrid = highOrderGrids[hLevel];
+
+    int * dofsOfCells = new int[nTotalCell];
+    highOrderGrid.GetNumberOfDOFs(nTotalCell, dofsOfCells);
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            for (int iDof = 0; iDof < dofsOfCells[iCell]; ++ iDof)
+            {
+                qPro[iCell][m][iDof] = qold[iCell][m][iDof];
+            }
+        }
+    }
+
+    delete [] dofsOfCells;
+}
+
+void HOSolverUnstruct::Lhs(Grid *gridIn, FieldProxy *dqProxy, double coef)
+{
+    if(HODebug) cout << "Lhs: dqProxy *= dt * coef" << endl;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int hLevel = grid->GetLevel();
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble ***dq = dqProxy->GetField_UHO();
+
+    int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nEquation  = nl + nchem;
+
+    RDouble * dt = reinterpret_cast< RDouble * > (grid->GetDataPtr("dt" ));
+
+    HighOrderGrid & highOrderGrid = highOrderGrids[hLevel];
+
+    int * dofsOfCells = new int[nTotalCell];
+    highOrderGrid.GetNumberOfDOFs(nTotalCell, dofsOfCells);
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            for (int iDof = 0; iDof < dofsOfCells[iCell]; ++ iDof)
+            {
+                dq[iCell][m][iDof] *= dt[iCell] * coef;
+            }
+        }
+    }
+
+    delete [] dofsOfCells;
+}
+
+void HOSolverUnstruct::StoreRhsByResidual(Grid *gridIn, FieldProxy *rhsProxy)
+{
+    if(HODebug) cout << "StoreRhsByResidual:  rhsProxy = res" << endl;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int hLevel = grid->GetLevel();
+    int nTotalCell = grid->GetNTotalCell();
+    //int nBoundFace = grid->GetNBoundFace();
+   // int nTotal = nTotalCell + nBoundFace;
+
+    int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nEquation  = nl + nchem;
+
+    RDouble ***res = reinterpret_cast< RDouble *** > (grid->GetDataPtr("res"));
+    RDouble ***rhs = rhsProxy->GetField_UHO();
+
+    HighOrderGrid & highOrderGrid = highOrderGrids[hLevel];
+
+    int * dofsOfCells = new int[nTotalCell];
+    highOrderGrid.GetNumberOfDOFs(nTotalCell, dofsOfCells);
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            for (int iDof = 0; iDof < dofsOfCells[iCell]; ++ iDof)
+            {
+                rhs[iCell][m][iDof] = res[iCell][m][iDof];
+            }
+        }
+    }
+
+    delete [] dofsOfCells;
+}
+
+void HOSolverUnstruct::TimeStep(Grid *gridIn)
+{
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    int pLevel     = parameters->pMultiGrid;
+    if(pLevel == 1)
+    {
+        pLevel = 0;
+    }
+
+    //! Compute varible in GaussPoint 
+    ComputeGaussPointQ(gridIn);
+    //! Compute varible of cellAverage 
+    ComputeQAverage(gridIn);
+
+    int ifLocalTimeStep = parameters->GetIfLocalTimeStep();
+
+    if (ifLocalTimeStep == 0)
+    {
+        LocalTimeStep(gridIn);
+    }
+    else if (ifLocalTimeStep == 1)
+    {
+        GlobalTimeStep(gridIn);
+    }
+    else
+    {
+        LocalGlobalTimeStep(gridIn);
+    }
+
+}
+
+void HOSolverUnstruct::ComputeMinTimeStep(Grid *gridIn, RDouble &minDt, RDouble &maxDt)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble *dt = reinterpret_cast< RDouble *  > (grid->GetDataPtr("dt"));
+
+    minDt = LARGE;
+    maxDt = - LARGE;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        minDt = MIN(minDt, dt[iCell]);
+        maxDt = MAX(maxDt, dt[iCell]);
+    }
+}
+
+void HOSolverUnstruct::ReduceMaxTimeStep(Grid *grid, RDouble globalMinDt)
+{
+    if(HODebug) cout << "ReduceMaxTimeStep" << endl;
+}
+
+void HOSolverUnstruct::LoadResiduals(Grid *gridIn, FieldProxy *rhsProxy)
+{
+    if(HODebug) cout << "LoadResiduals  \"res\" = - rhsProxy" << endl;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int hLevel = grid->GetLevel();
+    int nTotalCell = grid->GetNTotalCell();
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    int pLevel = parameters->pMultiGrid;
+    if(pLevel == 1)
+    {
+        pLevel = 0;
+    }
+
+    RDouble ***rhs = rhsProxy->GetField_UHO();
+
+    int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nEquation  = nl + nchem;
+
+    RDouble ***res = reinterpret_cast< RDouble *** > (grid->GetDataPtr("res"));
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        HighOrderCellSol & uHOCellSol = highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell];
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            for (int iDof = 0; iDof < uHOCellSol.nDOFsSol; ++ iDof)
+            {
+                res[iCell][m][iDof] = -rhs[iCell][m][iDof];
+            }
+        }
+    }
+}
+
+//! Drive functions to calculate residuals for different orders and dimensions
+void HOSolverUnstruct::UpdateResiduals(Grid *grid)
+{
+    if(HODebug) cout << "UpdateResiduals" << endl;
+
+    ComputeGaussPointQ(grid);
+    
+    ComputeQAverage(grid);
+
+    Boundary(grid);
+
+    //CompGamaAndTField(grid);
+
+    RightHandSide(grid);
+}
+
+void HOSolverUnstruct::RightHandSide(Grid *grid)
+{
+    if(HODebug) cout << "RightHandSide" << endl;
+
+    InviscidFlux(grid);
+
+    ViscousFlux(grid);
+
+    SourceFlux(grid);
+
+    //ZeroResidualOfSpecialCells(grid); //Added By Guo Yongheng 20160825
+    //delete simu_ts_RightHandSide;
+
+    ResDivideVol(grid);
+}
+
+//! Drive individaul functions to calculate inviscid fluxes
+void HOSolverUnstruct::InviscidFlux(Grid * gridIn)
+{
+    if(HODebug) cout << "InviscidFlux" << endl;
+
+    InviscidFluxForFace(gridIn);
+
+    InviscidFluxForCell(gridIn);
+}
+
+void HOSolverUnstruct::ViscousFlux(Grid * gridIn)
+{
+}
+
+void HOSolverUnstruct::SourceFlux(Grid * gridIn)
+{
+}
+
+void HOSolverUnstruct::InviscidFluxForFace(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int      nTotalFace = grid->GetNTotalFace();
+    int      nBoundFace = grid->GetNBoundFace();
+    int      *leftCellOfFace    = grid->GetLeftCellOfFace();
+    int      *rigtCellOfFace    = grid->GetRightCellOfFace();
+
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    int hLevel = grid->GetLevel(); 
+    int pLevel = parameters->pMultiGrid;
+    if(pLevel == 1)
+    {
+        pLevel = 0;
+    }
+
+    int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nEquation  = nl + nchem;
+
+    RDouble ***res = reinterpret_cast< RDouble *** > (grid->GetDataPtr("res"));
+    
+    RDouble **flux  = new RDouble *[nEquation];
+    RDouble **primL = new RDouble *[nEquation];
+    RDouble **primR = new RDouble *[nEquation];
+    RDouble **fluxLeftTotal = new RDouble * [nEquation];
+    RDouble **fluxRigtTotal = new RDouble * [nEquation];
+    
+    int maxDof= 100; //! A arbitrarily number of dof related to accuracy!!!
+                     //! The number need to be modified of different accuracy!!!
+    fluxLeftTotal[0] = new RDouble[nEquation*maxDof];
+    fluxRigtTotal[0] = new RDouble[nEquation*maxDof];
+    primL[0]         = new RDouble[nEquation * (highOrderGrids[hLevel].totalFaceGaussPoint[pLevel])];
+    primR[0]         = new RDouble[nEquation * (highOrderGrids[hLevel].totalFaceGaussPoint[pLevel])];
+    flux[0]          = new RDouble[nEquation * (highOrderGrids[hLevel].totalFaceGaussPoint[pLevel])];
+
+    for(int i=1;i<nEquation;i++)
+    {
+        fluxLeftTotal[i] = &(fluxLeftTotal[i-1][maxDof]);
+        fluxRigtTotal[i] = &(fluxRigtTotal[i-1][maxDof]);
+        primL[i]         = &(primL[i-1][highOrderGrids[hLevel].totalFaceGaussPoint[pLevel]]);
+        primR[i]         = &(primR[i-1][highOrderGrids[hLevel].totalFaceGaussPoint[pLevel]]);
+        flux[i]          = &(flux[i-1][highOrderGrids[hLevel].totalFaceGaussPoint[pLevel]]);
+    }
+
+    int numberGaussPoint = 0, rGaussPoint = 0, nLeftDof = 0, nRigtDof = 0, curGaussPoint = 0, offsetGaussPoint = 0;
+    int leftCell = 0, rigtCell = 0, faceVTKType = 0;
+    
+    int uns_scheme = GlobalDataBase::GetIntParaFromDB("uns_scheme");
+
+    RDouble * xNormal = new RDouble [highOrderGrids[hLevel].totalFaceGaussPoint[pLevel]];
+    RDouble * yNormal = new RDouble [highOrderGrids[hLevel].totalFaceGaussPoint[pLevel]];
+    RDouble * zNormal = new RDouble [highOrderGrids[hLevel].totalFaceGaussPoint[pLevel]];
+
+    curGaussPoint = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        HighOrderFaceSol & uHOFaceSol = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace];
+        HighOrderFace & uHOFace       = highOrderGrids[hLevel].highOrderFaces[iFace];
+        numberGaussPoint = uHOFaceSol.integNumberOfGaussPoint;
+        offsetGaussPoint = uHOFaceSol.offsetGaussPoint;
+        faceVTKType      = uHOFace.VTK_Type;
+        
+        for(int iGaussPoint = 0; iGaussPoint < numberGaussPoint; ++ iGaussPoint)
+        {
+            //! Compute conservation variable
+            curGaussPoint = offsetGaussPoint + iGaussPoint;
+            primL[0][curGaussPoint] = uHOFaceSol.q[0][iGaussPoint];
+            primL[1][curGaussPoint] = uHOFaceSol.q[1][iGaussPoint]/primL[0][curGaussPoint];
+            primL[2][curGaussPoint] = uHOFaceSol.q[2][iGaussPoint]/primL[0][curGaussPoint];
+            primL[3][curGaussPoint] = uHOFaceSol.q[3][iGaussPoint]/primL[0][curGaussPoint];
+            primL[4][curGaussPoint] = uHOFaceSol.q[4][iGaussPoint];
+            primL[4][curGaussPoint] = HO_GAMAM1 * (primL[4][curGaussPoint] - 0.5 * primL[0][curGaussPoint] * 
+                (pow(primL[1][curGaussPoint],2) + pow(primL[2][curGaussPoint],2) + pow(primL[3][curGaussPoint],2)));
+
+            if(primL[4][curGaussPoint] < 0)
+            {
+                cout<<"Negative Pressure of Face:  "<<iFace<<" P L =  "<<primL[4][curGaussPoint]<<endl;
+            }
+
+            rGaussPoint   = iGaussPoint + numberGaussPoint;
+            primR[0][curGaussPoint] = uHOFaceSol.q[0][rGaussPoint];
+            primR[1][curGaussPoint] = uHOFaceSol.q[1][rGaussPoint]/primR[0][curGaussPoint];
+            primR[2][curGaussPoint] = uHOFaceSol.q[2][rGaussPoint]/primR[0][curGaussPoint];
+            primR[3][curGaussPoint] = uHOFaceSol.q[3][rGaussPoint]/primR[0][curGaussPoint];
+            primR[4][curGaussPoint] = uHOFaceSol.q[4][rGaussPoint];
+            primR[4][curGaussPoint] = HO_GAMAM1 * (primR[4][curGaussPoint] - 0.5 * primR[0][curGaussPoint] * 
+                (pow(primR[1][curGaussPoint],2) + pow(primR[2][curGaussPoint],2) + pow(primR[3][curGaussPoint],2)));
+
+            if(primR[4][curGaussPoint]<0)
+            {
+                cout<<"Negative Pressure of Face:  "<<iFace<<" P R =  "<<primR[4][curGaussPoint]<<endl;
+            }
+
+            xNormal[curGaussPoint] = uHOFaceSol.metricNormalsFace[iGaussPoint][0];
+            yNormal[curGaussPoint] = uHOFaceSol.metricNormalsFace[iGaussPoint][1];
+            zNormal[curGaussPoint] = uHOFaceSol.metricNormalsFace[iGaussPoint][2];
+        }
+    }
+
+    switch(uns_scheme)
+    {
+    case ISCHEME_ROE:
+        break;
+    case ISCHEME_VANLEER:
+        Vanleer_Scheme(highOrderGrids[hLevel].totalFaceGaussPoint[pLevel], primL, primR, xNormal, yNormal, zNormal, HO_GAMA, flux);             
+        break;
+    case ISCHEME_HLLE:
+        break;
+    default:
+        break;
+    }
+
+    RDouble fluxTmp = 0.0;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        HighOrderFaceSol & uHOFaceSol = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace];
+        HighOrderFace & uHOFace       = highOrderGrids[hLevel].highOrderFaces[iFace];        
+        numberGaussPoint = uHOFaceSol.integNumberOfGaussPoint;
+        offsetGaussPoint = uHOFaceSol.offsetGaussPoint;
+        faceVTKType      = uHOFace.VTK_Type;
+        //const RDouble *weightCoeff;        
+        leftCell = leftCellOfFace[iFace];
+        HighOrderCellSol & uHOCellSol = highOrderGrids[hLevel].highOrderCellsSol[pLevel][leftCell];
+        nLeftDof    =   uHOCellSol.nDOFsSol; 
+        const RDouble *weightCoeff = highOrderGrids[hLevel].standardFaceElements[uHOFace.standardElementIndex].GetWtIntegration();
+        for(int ieqn = 0; ieqn < nEquation; ++ ieqn)
+        {
+            for(int idof = 0; idof < nLeftDof; ++ idof)
+            {
+                fluxLeftTotal[ieqn][idof] = 0.0;
+                for(int iGaussPoint = 0; iGaussPoint < numberGaussPoint; ++ iGaussPoint)
+                {
+                    curGaussPoint = offsetGaussPoint + iGaussPoint;
+                    fluxTmp = flux[ieqn][curGaussPoint] * weightCoeff[iGaussPoint] * uHOFaceSol.JacDetFaceIntegration[iGaussPoint];
+                    fluxLeftTotal[ieqn][idof] += fluxTmp * uHOFaceSol.leftBasisFuncFaceIntegration[iGaussPoint][idof];    
+                }
+                res[leftCell][ieqn][idof] -= fluxLeftTotal[ieqn][idof];
+
+                if((res[leftCell][ieqn][idof] != res[leftCell][ieqn][idof]) || fabs(res[leftCell][ieqn][idof]) > 1.0e20)
+                {
+                    cout << "iface res " << iFace << " = " << res[leftCell][ieqn][idof] << endl;
+                }
+            }
+        }
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        HighOrderFaceSol & uHOFaceSol = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace];
+        HighOrderFace & uHOFace       = highOrderGrids[hLevel].highOrderFaces[iFace];
+        numberGaussPoint =   uHOFaceSol.integNumberOfGaussPoint;
+        offsetGaussPoint =   uHOFaceSol.offsetGaussPoint;
+        faceVTKType      =   uHOFace.VTK_Type;
+        //HighOrderFaceSold��type
+        leftCell    =   leftCellOfFace[iFace];
+        HighOrderCellSol & uHOLeftCellSol       =   highOrderGrids[hLevel].highOrderCellsSol[pLevel][leftCell];
+        nLeftDof    =   uHOLeftCellSol.nDOFsSol;
+
+        rigtCell    =   rigtCellOfFace[iFace];
+        HighOrderCellSol & uHORigtCellSol       =   highOrderGrids[hLevel].highOrderCellsSol[pLevel][rigtCell];
+        nRigtDof    =   uHORigtCellSol.nDOFsSol;
+        const RDouble *weightCoeff  = highOrderGrids[hLevel].standardFaceElements[uHOFace.standardElementIndex].GetWtIntegration();
+        for(int ieqn = 0; ieqn < nEquation; ++ ieqn)
+        {
+            for(int idof = 0; idof < nLeftDof; ++ idof)
+            {
+                fluxLeftTotal[ieqn][idof] = 0.0;
+                for(int iGaussPoint = 0; iGaussPoint < numberGaussPoint; ++ iGaussPoint)
+                {
+                    curGaussPoint = offsetGaussPoint + iGaussPoint;  
+                    fluxTmp = flux[ieqn][curGaussPoint] * weightCoeff[iGaussPoint] * uHOFaceSol.JacDetFaceIntegration[iGaussPoint];
+                    fluxLeftTotal[ieqn][idof] += fluxTmp * uHOFaceSol.leftBasisFuncFaceIntegration[iGaussPoint][idof];
+                }
+                res[leftCell][ieqn][idof] -= fluxLeftTotal[ieqn][idof];
+            }
+        }
+        for(int ieqn = 0; ieqn < nEquation; ++ ieqn)
+        {
+            for(int idof = 0; idof < nRigtDof; ++ idof)
+            {
+                fluxRigtTotal[ieqn][idof] = 0.0;
+                for(int iGaussPoint = 0; iGaussPoint < numberGaussPoint; ++ iGaussPoint)
+                {
+                    curGaussPoint = offsetGaussPoint + iGaussPoint;
+                    fluxTmp = flux[ieqn][curGaussPoint] * weightCoeff[iGaussPoint] * uHOFaceSol.JacDetFaceIntegration[iGaussPoint];
+                    fluxRigtTotal[ieqn][idof] += fluxTmp * uHOFaceSol.rightBasisFuncFaceIntegration[iGaussPoint][idof];
+                }
+                res[rigtCell][ieqn][idof] += fluxRigtTotal[ieqn][idof];
+
+                if((res[rigtCell][ieqn][idof] != res[rigtCell][ieqn][idof]) || fabs(res[rigtCell][ieqn][idof]) > 1.0e20)
+                {
+                    cout << "iface res " << iFace << " = " << res[rigtCell][ieqn][idof] << endl;
+                }
+            }
+        }
+    }
+
+    delete [] flux[0];
+    delete [] primL[0];
+    delete [] primR[0];
+    delete [] flux;
+    delete [] primL;
+    delete [] primR;
+    delete [] fluxLeftTotal[0];
+    delete [] fluxLeftTotal;
+    delete [] fluxRigtTotal[0];
+    delete [] fluxRigtTotal;
+    delete [] xNormal;
+    delete [] yNormal;
+    delete [] zNormal;
+}
+
+void HOSolverUnstruct::InviscidFluxForCell(Grid *grid_in)
+{
+    UnstructGrid *grid = UnstructGridCast(grid_in);
+    int      nTotalCell = grid->GetNTotalCell();
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    
+    int hLevel = grid->GetLevel();
+    int pLevel     = parameters->pMultiGrid;
+    if(pLevel == 1)
+    {
+        pLevel = 0;
+    }
+
+    int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nEquation  = nl + nchem;
+
+    RDouble ***res = reinterpret_cast< RDouble *** > (grid->GetDataPtr("res"));
+
+    RDouble *fluxTotal = new RDouble [nEquation];
+
+    int numberGaussPoint, cellVTKType, ndof;
+    RDouble flux[5][3], gradFia[3], ro, u, v, w, p, e, rou, rov, row, fluxTmp;
+    
+    for(int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        HighOrderCellSol & uHOCellSol = highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell];
+        HighOrderCell & uHOCell       = highOrderGrids[hLevel].highOrderCells[iCell];
+        numberGaussPoint              = uHOCellSol.integNumberOfGaussPoint;
+        cellVTKType                   = uHOCell.VTK_Type;
+        const RDouble * weightCoeff = highOrderGrids[hLevel].standardCellElements[uHOCell.standardElementIndex].GetWtIntegration();
+        ndof = uHOCellSol.nDOFsSol;
+        for(int idof = 0; idof < ndof; ++ idof)
+        {
+            fluxTotal[0] = 0.0;
+            fluxTotal[1] = 0.0;
+            fluxTotal[2] = 0.0;
+            fluxTotal[3] = 0.0;
+            fluxTotal[4] = 0.0;
+            for(int iGaussPoint = 0; iGaussPoint < numberGaussPoint; ++ iGaussPoint)
+            {
+                gradFia[0] = uHOCellSol.dxBasisFuncCellIntegration[iGaussPoint][idof];
+                gradFia[1] = uHOCellSol.dyBasisFuncCellIntegration[iGaussPoint][idof];
+                gradFia[2] = uHOCellSol.dzBasisFuncCellIntegration[iGaussPoint][idof];
+
+                ro  = uHOCellSol.q[0][iGaussPoint];
+                rou = uHOCellSol.q[1][iGaussPoint];
+                rov = uHOCellSol.q[2][iGaussPoint];
+                row = uHOCellSol.q[3][iGaussPoint];
+                e   = uHOCellSol.q[4][iGaussPoint];
+
+                u   = rou/ro;
+                v   = rov/ro;
+                w   = row/ro;
+                p   = HO_GAMAM1 * (e - 0.5*(rou*rou + rov*rov + row*row)/ro);
+
+                flux[0][0] = rou;
+                flux[0][1] = rov;
+                flux[0][2] = row;
+
+                flux[1][0] = rou*rou/ro + p;
+                flux[1][1] = rou*rov/ro;
+                flux[1][2] = rou*row/ro;
+                    
+                flux[2][0] = rov*rou/ro;
+                flux[2][1] = rov*rov/ro + p;
+                flux[2][2] = rov*row/ro;
+                    
+                flux[3][0] = row*rou/ro;
+                flux[3][1] = row*rov/ro;
+                flux[3][2] = row*row/ro + p;
+
+                flux[4][0] = (e + p)*u;
+                flux[4][1] = (e + p)*v;
+                flux[4][2] = (e + p)*w;
+
+                fluxTmp = weightCoeff[iGaussPoint] * uHOCellSol.JacDetCellIntegration[iGaussPoint];
+
+                for (int ieqn = 0; ieqn < nEquation; ++ ieqn)
+                {
+                    fluxTotal[ieqn] += fluxTmp * (gradFia[0] * flux[ieqn][0] + gradFia[1] * flux[ieqn][1] + gradFia[2] * flux[ieqn][2]);
+                }
+            }
+
+            for (int ieqn = 0; ieqn < nEquation; ++ ieqn)
+            {
+                res[iCell][ieqn][idof] += fluxTotal[ieqn];
+            }
+        }
+    }
+
+    delete [] fluxTotal;
+}
+
+void HOSolverUnstruct::ResDivideVol(Grid *grid_in)
+{
+    UnstructGrid *grid = UnstructGridCast(grid_in);
+    int      nTotalCell = grid->GetNTotalCell();
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+
+    int hLevel = grid->GetLevel();
+    int pLevel     = parameters->pMultiGrid;
+    if(pLevel == 1)
+    {
+        pLevel = 0;
+    }
+
+    int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nEquation  = nl + nchem;
+
+    RDouble ***res = reinterpret_cast< RDouble *** > (grid->GetDataPtr("res"));
+
+    for(int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        HighOrderCellSol & uHOCellSol = highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell];
+        HighOrderCell & uHOCell       = highOrderGrids[hLevel].highOrderCells[iCell];
+        int ndof = uHOCellSol.nDOFsSol;
+        for(int iDof = 0; iDof < ndof; ++ iDof)
+        {
+            for (int ieqn = 0; ieqn < nEquation; ++ ieqn)
+            {
+                res[iCell][ieqn][iDof] /= uHOCell.volume;
+            }
+        }
+    }
+}
+
+void HOSolverUnstruct::ForwardLUSGS(Grid *grid_in)
+{
+
+}
+
+void HOSolverUnstruct::SolveLUSGS(Grid *gridIn, FieldProxy *dq_proxy)
+{
+}
+
+
+void HOSolverUnstruct::SolveLUSGS(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *rhsProxy, int sweeps, double epsilon)
+{
+    if(HODebug) cout << "SolveLUSGS solve dq" << endl;
+}
+
+//! Explicit multi-stage time marching method
+void HOSolverUnstruct::RungeKutta(Grid *grid, FieldProxy *rhsProxy)
+{
+    int RKStage = 1;
+    GlobalDataBase::GetData("RKStage", &RKStage, PHINT, 1);
+
+    FieldProxy *resProxy = GetResidualProxy(grid);
+    FieldProxy *qProxy = CreateFieldProxy(grid);
+    FieldProxy *qProxyTemp = CreateFieldProxy(grid);
+
+    if (grid->GetLevel() == 0)
+    {
+        RDouble *lamda = new RDouble[RKStage];
+        GlobalDataBase::GetData("lamda", lamda, PHDOUBLE, RKStage);
+
+        LoadQ(grid, qProxy);
+        FillField(grid, qProxyTemp, qProxy);
+        for (int istage = 0; istage < RKStage; ++ istage)
+        {
+            LoadResiduals(grid, rhsProxy);            
+            UpdateResiduals(grid);
+            Lhs(grid, resProxy, lamda[istage]);
+            FillField(grid, qProxy, qProxyTemp);
+            UpdateFlowField(grid, qProxy, resProxy);
+        }
+
+        delete []lamda;
+    }
+    else
+    {
+        LoadQ(grid, qProxy);
+        LoadResiduals(grid, rhsProxy);
+        UpdateResiduals(grid);
+        Lhs(grid,resProxy,1.0);
+        UpdateFlowField(grid, qProxy, resProxy);
+    }
+
+    delete qProxy;
+    delete qProxyTemp;
+    delete resProxy;
+}
+
+void HOSolverUnstruct::FillField(Grid *gridIn, FieldProxy *field1Proxy, FieldProxy *field2Proxy)
+{
+    if(HODebug) cout << "FillField: field1Proxy = field2Proxy" << endl;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int hLevel = grid->GetLevel();
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble ***field1 = field1Proxy->GetField_UHO();
+    RDouble ***field2 = field2Proxy->GetField_UHO();
+
+    int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nEquation  = nl + nchem;
+
+    HighOrderGrid & highOrderGrid = highOrderGrids[hLevel];
+
+    int * dofsOfCells = new int[nTotalCell];
+    highOrderGrid.GetNumberOfDOFs(nTotalCell, dofsOfCells);
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            for (int iDof = 0; iDof < dofsOfCells[iCell]; ++ iDof)
+            {
+                field1[iCell][m][iDof] = field2[iCell][m][iDof];
+            }
+        }
+    }
+
+    delete [] dofsOfCells;
+}
+
+void HOSolverUnstruct::FillField(Grid *gridIn, FieldProxy *fieldProxy, RDouble value)
+{
+    if(HODebug) cout << "FillField: fieldProxy = value" << endl;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int hLevel = grid->GetLevel();
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble ***field = fieldProxy->GetField_UHO();
+
+    int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nEquation  = nl + nchem;
+
+    HighOrderGrid & highOrderGrid = highOrderGrids[hLevel];
+
+    int * dofsOfCells = new int[nTotalCell];
+    highOrderGrid.GetNumberOfDOFs(nTotalCell, dofsOfCells);
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            for (int iDof = 0; iDof < dofsOfCells[iCell]; ++ iDof)
+            {
+                field[iCell][m][iDof] = value;
+            }
+        }
+    }
+
+    delete [] dofsOfCells;
+}
+
+void HOSolverUnstruct::UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy)
+{
+    if(HODebug) cout << "UpdateFlowField solve dq" << endl;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int hLevel = grid->GetLevel();
+    int nTotalCell = grid->GetNTotalCell();
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    int pLevel = parameters->pMultiGrid;
+    if(pLevel == 1)
+    {
+        pLevel = 0;
+    }
+
+    RDouble ***q = reinterpret_cast< RDouble *** > (grid->GetDataPtr("q"));
+
+    RDouble *** dq = dqProxy->GetField_UHO();
+
+    int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nEquation  = nl + nchem;
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+         HighOrderCellSol & uHOCellSol = highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell];
+        for (int ieqn = 0; ieqn < nEquation; ++ ieqn)
+        {
+            for (int iDof = 0; iDof < uHOCellSol.nDOFsSol; ++ iDof)
+            {
+                q[iCell][ieqn][iDof] += dq[iCell][ieqn][iDof];
+                highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell].dofQ[ieqn][iDof] = q[iCell][ieqn][iDof];
+            }
+        }
+    }
+}
+
+void HOSolverUnstruct::RecoverResidual(Grid *gridIn, FieldProxy *rhsProxy)
+{
+}
+
+int HOSolverUnstruct::GetNPostSolve()
+{
+    return 3;
+}
+
+extern ResidualGlobal residual;
+extern MaxResidual *maxResidual;
+
+void HOSolverUnstruct::GetResidual(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = UnstructGridCast(GetGrid(level));
+
+    RDouble ***res = reinterpret_cast< RDouble *** > (grid->GetDataPtr("res"));
+
+    int nl = 5;
+    GlobalDataBase::GetData("nl", &nl, PHINT, 1);
+
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    int ntmodel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+    int neqn = nl + nchem + ntmodel - 1;
+
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    vector< RDouble > residualNormal(neqn);
+
+    //! Initialization.
+    for (int m = 0; m < neqn; ++ m)
+    {
+        residualNormal[m] = 0.0;
+    }
+
+    RDouble maximumResidual = maxResidual->GetMaxRes();
+
+    RDouble maxResLocal = maximumResidual;
+    RDouble maxResCoorXLocal, maxResCoorYLocal, maxResCoorZLocal;
+    int maxResIndexMLocal;
+
+    bool maxResChange = false;
+
+    int * cellIBlank = grid->GetBlankIndex();
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        if(cellIBlank[ iCell ] != 1) continue;
+
+        for (int m = 0; m < neqn; ++ m)
+        {
+            RDouble res2 = res[iCell][m][0] * res[iCell][m][0];
+            residualNormal[m] += res2;
+
+            if (res2 > maxResLocal)
+            {
+                maxResChange = true;
+
+                maxResLocal = res2;
+
+                maxResCoorXLocal = xcc[iCell];
+                maxResCoorYLocal = ycc[iCell];
+                maxResCoorZLocal = zcc[iCell];
+
+                maxResIndexMLocal = m;
+            }
+        }
+    }
+
+    if (maxResChange)
+    {
+        maxResidual->SetMaxRes(maxResLocal);
+        maxResidual->SetMaxResCoorX(maxResCoorXLocal);
+        maxResidual->SetMaxResCoorY(maxResCoorYLocal);
+        maxResidual->SetMaxResCoorZ(maxResCoorZLocal);
+        maxResidual->setMaxResVariableIndex(maxResIndexMLocal);
+    }
+
+    DataContainer *cdata = actkey->GetData();
+    PHWrite(cdata, neqn);
+    PHWrite(cdata, residualNormal, neqn);
+}
+
+LIB_EXPORT void HOSolverUnstruct::ComputePostVisualVariables(Post_Visual * postVisualization)
+{
+    UnstructGrid * grid = UnstructGridCast(postVisualization->GetGrid());
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    int nl = 5;
+    GlobalDataBase::GetData("nl", &nl, PHINT, 1);
+    int nchem = 0;
+    GlobalDataBase::GetData("nchem", &nchem, PHINT, 1);
+    int neqn = nl + nchem;
+
+    int hLevel = grid->GetLevel();
+
+    ComputeQAverage(grid);
+
+    RDouble ** qToOut = NewPointer2<RDouble>(neqn, nTotal);
+    
+    for (int ieqn = 0; ieqn < neqn; ++ ieqn)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            qToOut[ieqn][iCell] = highOrderGrids[hLevel].highOrderCellsSol[0][iCell].qAverage[ieqn];
+        }
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        RDouble conserValue[5];
+
+        for (int ieqn = 0; ieqn < neqn; ++ ieqn)
+        {
+            conserValue[ieqn] = qToOut[ieqn][iCell];
+        }
+
+        qToOut[1][iCell] /= qToOut[0][iCell];
+        qToOut[2][iCell] /= qToOut[0][iCell];
+        qToOut[3][iCell] /= qToOut[0][iCell];
+
+        qToOut[4][iCell] = ComputePressure(conserValue);
+    }
+
+    int *left_cell_of_face  = grid->GetLeftCellOfFace();
+    int *right_cell_of_face = grid->GetRightCellOfFace();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    UnstructBCSet **bcr = grid->GetBCRecord();
+
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    int pLevel = parameters->pMultiGrid;
+
+    if(pLevel == 1)
+    {
+        pLevel = 0;
+    }
+
+    if(hLevel > 1 && pLevel > 1)
+    {
+        cout<<"the multigrid para is wrong for unstructure high order in HOSolverUnstruct::Boundary(Grid *gridIn)"<<endl;
+    }
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble wallTemperature = parameters->GetWallTemperature();
+
+    double refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+
+    double tw = wallTemperature / refDimensionalTemperature;
+
+    RDouble *prims, *primt;
+    prims = new RDouble[nl+nchem];
+    primt = new RDouble[nl+nchem];
+
+    bool massFlow = false;
+    RDouble massAlpha = 1.0;
+    double massIn  = 1.0;
+    double massOut = 1.0;
+
+    if (massFlow)
+    {
+        //ComputeMassFlow(grid);
+        GlobalDataBase::GetData("massIn", &massIn, PHDOUBLE, 1);
+        GlobalDataBase::GetData("massOut", &massOut, PHDOUBLE, 1);
+        massAlpha = massIn / massOut;
+        cout << " massAlpha = " << massAlpha << "\n";
+    }
+
+    using namespace IDX;
+    using namespace PHENGLEI;
+
+    int le, re, bcType, numberGaussPoint;
+    RDouble vgn = 0.0;
+    RDouble xtn = 0.0, ytn = 0.0, ztn = 0.0;
+
+    bool isViscous = parameters->IsViscous();
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = left_cell_of_face [ iFace ];
+        re = right_cell_of_face[ iFace ];
+        bcType = bcr[iFace]->GetKey();
+        HighOrderFaceSol & highOrderFaceSol = highOrderGrids[hLevel].highOrderFacesSol[pLevel][iFace];
+        numberGaussPoint = highOrderFaceSol.integNumberOfGaussPoint;
+
+        if (IsInterface(bcType)) //! Interface
+        {
+            continue;
+        }
+        else if(bcType == SYMMETRY)
+        {
+            using namespace IDX;
+
+            qToOut[IR][re] = qToOut[IR][le];
+            qToOut[IP][re] = qToOut[IP][le];
+
+            RDouble um = qToOut[IU][le];
+            RDouble vm = qToOut[IV][le];
+            RDouble wm = qToOut[IW][le];
+
+            RDouble vn = xfn[iFace] * um + yfn[iFace] * vm + zfn[iFace] * wm - vgn;
+
+            qToOut[IU][re] = um - two * xfn[iFace] * vn;
+            qToOut[IV][re] = vm - two * yfn[iFace] * vn;
+            qToOut[IW][re] = wm - two * zfn[iFace] * vn;
+
+            continue;
+        }
+        else if (IsWall(bcType))
+        {
+            if (!isViscous)
+            {
+                using namespace IDX;
+
+                qToOut[IR][re] = qToOut[IR][le];
+                qToOut[IP][re] = qToOut[IP][le];
+
+                RDouble um = qToOut[IU][le];
+                RDouble vm = qToOut[IV][le];
+                RDouble wm = qToOut[IW][le];
+
+                RDouble vn = xfn[iFace] * um + yfn[iFace] * vm + zfn[iFace] * wm - vgn;
+
+                qToOut[IU][re] = um - two * xfn[iFace] * vn;
+                qToOut[IV][re] = vm - two * yfn[iFace] * vn;
+                qToOut[IW][re] = wm - two * zfn[iFace] * vn;
+            }
+            else if (wallTemperature <= 0.0) //! Viscous adiabatic wall.
+            {
+                using namespace IDX;
+
+                qToOut[IR][re] = qToOut[IR][le];
+                qToOut[IP][re] = qToOut[IP][le];
+
+                qToOut[IU][re] = - qToOut[IU][le] + two * xtn;
+                qToOut[IV][re] = - qToOut[IV][le] + two * ytn;
+                qToOut[IW][re] = - qToOut[IW][le] + two * ztn;
+            }
+            else //! Viscous iso-thermal wall
+            {
+                using namespace IDX;
+
+                qToOut[IR][re] = qToOut[IR][le];
+                qToOut[IP][re] = qToOut[IP][le];
+
+                qToOut[IU][re] = - qToOut[IU][le] + two * xtn;
+                qToOut[IV][re] = - qToOut[IV][le] + two * ytn;
+                qToOut[IW][re] = - qToOut[IW][le] + two * ztn;
+
+                RDouble omav = one;
+                RDouble coefficientOfStateEquation = 1.0 / (HO_GAMA * refMachNumber * refMachNumber);
+
+                RDouble tm = (1.0 / coefficientOfStateEquation) * qToOut[IP][le] / qToOut[IR][le];
+
+                RDouble rg, pg, tg; //! g for ghost
+
+                pg = qToOut[IP][le];
+                tg = two * tw - tm;
+                if (tg <= 0.0) tg = tw;
+
+                rg = pg / (coefficientOfStateEquation * tg * omav);
+
+                qToOut[IR][re] = rg;
+                qToOut[IP][re] = pg;
+            }
+
+            continue;
+        }
+        else if (bcType == FARFIELD)
+        {
+            using namespace IDX;
+
+            qToOut[IR][re] = qToOut[IR][le];
+            qToOut[IP][re] = qToOut[IP][le];
+            qToOut[IU][re] = qToOut[IU][le];
+            qToOut[IV][re] = qToOut[IV][le];
+            qToOut[IW][re] = qToOut[IW][le];
+        }
+        else if (bcType == INFLOW)
+        {
+            qToOut[IR][re] = qToOut[IR][le];
+            qToOut[IP][re] = qToOut[IP][le];
+            qToOut[IU][re] = qToOut[IU][le];
+            qToOut[IV][re] = qToOut[IV][le];
+            qToOut[IW][re] = qToOut[IW][le];
+
+            continue;
+        }
+        else if (bcType == OUTFLOW)
+        { 
+            qToOut[IR][re] = qToOut[IR][le];
+            qToOut[IP][re] = qToOut[IP][le];
+            qToOut[IU][re] = qToOut[IU][le];
+            qToOut[IV][re] = qToOut[IV][le];
+            qToOut[IW][re] = qToOut[IW][le];
+
+            continue;
+        }
+        else //if (bcType == PRESSURE_OUTLET)
+        {
+            qToOut[IR][re] = qToOut[IR][le];
+            qToOut[IP][re] = qToOut[IP][le];
+            qToOut[IU][re] = qToOut[IU][le];
+            qToOut[IV][re] = qToOut[IV][le];
+            qToOut[IW][re] = qToOut[IW][le];
+
+            continue;
+        }
+    }
+    delete [] prims;
+    delete [] primt;
+
+
+    using namespace IDX;
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DENSITY))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DENSITY);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qToOut[IDX::IR]);
+    }
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_U))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_U);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qToOut[IDX::IU]);
+    }
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_V))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_V);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qToOut[IDX::IV]);
+    }
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_W))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_W);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qToOut[IDX::IW]);
+    }
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_PRESSURE))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_PRESSURE);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qToOut[IDX::IP]);
+    }
+
+    DelPointer2(qToOut);
+}
+
+void HOSolverUnstruct::PostSolve(Grid *gridIn, int stage, int level)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int hLevel = grid->GetLevel();
+    int nTotalCell = grid->GetNTotalCell();
+
+    HighOrderGrid & highOrderGrid = highOrderGrids[hLevel];
+
+    int * dofsOfCells = new int[nTotalCell];
+    highOrderGrid.GetNumberOfDOFs(nTotalCell, dofsOfCells);
+
+    delete [] dofsOfCells;
+
+    if (stage == 0)
+    {
+        CommunicationInterfaceData();
+        return;
+    }
+
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    int intervalStepFlow = parameters->GetIntervalStepFlow();
+
+    int intervalStepPlot = parameters->GetIntervalStepPlot();
+    int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    bool isSubIterationDump = true;
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady == HO_UNSTEADY)
+    {
+        GlobalDataBase::GetData("isSubIterationDump", &isSubIterationDump, PHBOOL, 1);
+    }
+
+    if (stage == 1)
+    {
+        return;
+    }
+
+    if (outnstep % intervalStepFlow == 0 && level == 0 && isSubIterationDump)
+    {
+        //! To dump restart data for continual simulation.
+        ActionKey *actkeyDumpRestartData = new ActionKey();
+        FillActionKey(actkeyDumpRestartData, DUMP_RESTART, level);
+        DumpRestartData(actkeyDumpRestartData);
+        delete actkeyDumpRestartData;
+    }
+
+    if (outnstep % intervalStepPlot == 0 && isSubIterationDump)
+    {
+    }
+
+    int intervalStepRes = parameters->GetIntervalStepRes();
+    if (outnstep % intervalStepRes == 0 && (!isUnsteady || !isSubIterationDump))
+    {
+        //! To dump residual data.
+        ActionKey *actkeyDumpResidual = new ActionKey();
+        FillActionKey(actkeyDumpResidual, DUMP_RESIDUAL, level);
+        DumpResidual(actkeyDumpResidual);
+        delete actkeyDumpResidual;
+    }
+
+    int intervalStepForce = parameters->GetIntervalStepForce();
+    if (intervalStepForce > 0)
+    {
+        if (outnstep % intervalStepForce == 0 && isSubIterationDump)
+        {
+            if (level == 0)
+            {
+                //! To dump airforce coeference data.
+                ActionKey *actkeyDumpAirForceCoef = new ActionKey();
+                FillActionKey(actkeyDumpAirForceCoef, DUMP_AIR_FORCE_COEF, level);
+                DumpAirForceCoef(actkeyDumpAirForceCoef);
+                delete actkeyDumpAirForceCoef;
+
+                //! To dump wall airforce coeference data.
+                ActionKey *actkeyDumpWallAircoef = new ActionKey();
+                FillActionKey(actkeyDumpWallAircoef, DUMP_CP_DISTRI, 0);
+                DumpCpDistri(actkeyDumpWallAircoef);
+                delete actkeyDumpWallAircoef;
+
+                //! To dump surface information data.
+                ActionKey *actkeyDumpSurfaceInfo = new ActionKey();
+                FillActionKey(actkeyDumpSurfaceInfo, DUMP_SURFACE_INFO, 0);
+                DumpSurfaceInfo(actkeyDumpSurfaceInfo);
+                delete actkeyDumpSurfaceInfo;
+            }
+        }
+    }
+}
+
+int HOSolverUnstruct::GetSchemeID(const string &scheme_name)
+{
+    int scheme_id = ISCHEME_ROE;
+    if (scheme_name.substr(0,3) == "roe")
+    {
+        scheme_id = ISCHEME_ROE;
+    }
+    else if (scheme_name.substr(0,7) == "ausmpw+")
+    {
+        scheme_id = ISCHEME_AUSMPW_PLUS;
+    }
+    else if (scheme_name.substr(0,6) == "ausmpw")
+    {
+        scheme_id = ISCHEME_AUSMPW;
+    }
+    else if (scheme_name.substr(0,6) == "ausm+w")
+    {
+        scheme_id = ISCHEME_AUSM_W;
+    }
+    else if (scheme_name.substr(0,7) == "ausm+up")
+    {
+        scheme_id = ISCHEME_AUSMPUP;
+    }
+    else if (scheme_name.substr(0,5) == "ausm+")
+    {    
+        scheme_id = ISCHEME_AUSMP;
+    }
+    else if (scheme_name.substr(0,6) == "ausmdv")
+    {
+        scheme_id = ISCHEME_AUSMDV;
+    }
+    else if (scheme_name.substr(0,14) == "vanleer_Rotate")
+    {
+        scheme_id = ISCHEME_Rotate;
+    }
+    else if (scheme_name.substr(0,7) == "vanleer")
+    {
+        scheme_id = ISCHEME_VANLEER;
+    }
+    else if (scheme_name.substr(0,6) == "steger")
+    {
+        scheme_id = ISCHEME_STEGER;
+    }
+    else if (scheme_name.substr(0,4) == "hlle")
+    {
+        scheme_id = ISCHEME_HLLE;
+    }
+    else if (scheme_name.substr(0,5) == "lax_f")
+    {
+        scheme_id = ISCHEME_LAX_FRIEDRICHS;
+    }
+    //! Bell 20130418 add
+    else
+    {
+        TK_Exit::ExceptionExit("Error: this inv-scheme is not exist !\n", true);
+    }
+    
+    return scheme_id;
+}
+
+void HOSolverUnstruct::LocalTimeStep(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble *volume  = grid->GetCellVolume();
+
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble *dt   = reinterpret_cast< RDouble *  > (grid->GetDataPtr("dt"));
+
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    int hLevel = gridIn->GetLevel(); 
+    int pLevel     = parameters->pMultiGrid;
+    if(pLevel == 1)
+    {
+        pLevel = 0;
+    }
+
+    double cfl = ComputeCFL(grid->GetLevel());
+
+    //! Set dt to zero
+    PHSPACE::SetField(dt, 0.0, nTotalCell);
+
+    //! Inviscid time step.
+    RDouble *invSpectrumRadius = new RDouble [nTotalCell];
+    InvSpectrumRadius(gridIn, invSpectrumRadius);
+
+    int nPolySol = 1;
+
+    RDouble dtMin = 1.0e30;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        nPolySol  = highOrderGrids[hLevel].highOrderCellsSol[pLevel][iCell].nPolySol; //polynomial order
+        nPolySol  = 2 * nPolySol + 1;
+        dt[iCell] = cfl * volume[iCell] / invSpectrumRadius[iCell]/nPolySol;
+        dtMin = min(dtMin, dt[iCell]);
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        dt[iCell] = dtMin;
+    }
+
+    delete []invSpectrumRadius;
+
+    bool isViscous = parameters->IsViscous();
+    if (isViscous)
+    {
+        //! Viscous time step.
+        RDouble *visSpectrumRadius = new RDouble [nTotalCell];
+        PHSPACE::SetField(visSpectrumRadius, 0.0, nTotalCell);
+
+        VisSpectrumRadius(gridIn, visSpectrumRadius);
+
+        RDouble *dtViscous = new RDouble [nTotalCell];
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            dtViscous[iCell] = cfl * volume[iCell] / visSpectrumRadius[iCell];
+        }
+
+        delete []visSpectrumRadius;
+
+
+        //! Consider the viscous time step.
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            dt[iCell] = dt[iCell] * dtViscous[iCell] / (dt[iCell] + dtViscous[iCell]);
+        }
+
+        delete []dtViscous;
+    }
+}
+
+void HOSolverUnstruct::GlobalTimeStep(Grid *gridIn)
+{
+}
+
+void HOSolverUnstruct::LocalGlobalTimeStep(Grid *gridIn)
+{
+}
+
+RDouble HOSolverUnstruct::ComputeCFL(int level)
+{
+    int iterationStep = 0;
+
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+
+    bool isUnsteady = parameters->GetIsUnsteady();
+    if(isUnsteady)
+    {
+        //! Unsteady.
+        GlobalDataBase::GetData("innstep", &iterationStep, PHINT, 1);
+    }
+    else
+    {
+        int nMGLevel = parameters->GetNMGLevel();
+        //! Steady
+        if (nMGLevel <= 1)
+        {
+            //! Finest grid.
+            GlobalDataBase::GetData("outnstep", &iterationStep, PHINT, 1);
+        }
+        else
+        {
+            //! Coarse grid.
+            GlobalDataBase::GetData("newnstep", &iterationStep, PHINT, 1);
+        }
+    }
+
+    int cflNstep    = parameters->GetCFLVaryStep();
+    RDouble cflStart = parameters->GetCFLStart();
+    RDouble cflEnd   = parameters->GetCFLEnd();
+
+    RDouble cfl = cflEnd;
+    if (iterationStep < cflNstep)
+    {
+        cfl  = cflStart * (cflNstep - iterationStep) + cflEnd * iterationStep;
+        cfl /= cflNstep;
+    }
+
+    return cfl;
+}
+
+void HOSolverUnstruct::InvSpectrumRadius(Grid *gridIn, RDouble *invSpectrum)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+
+    RDouble rl, ul, vl, wl, pl, el, cl, vnl, rr, ur, vr, wr, pr, er, cr, vnr;
+    RDouble specificHeatRatio, inviscidSpectrumRadius, pm, rm, vn, cm;
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    int hLevel = gridIn->GetLevel(); 
+    int pLevel     = parameters->pMultiGrid;
+    if(pLevel == 1)
+    {
+        pLevel = 0;
+    }
+    int leftCell, rigtCell;
+
+    PHSPACE::SetField(invSpectrum, 0.0, nTotalCell);
+
+    for(int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        leftCell = leftCellofFace [iFace];
+        HighOrderCellSol & uHOLeftCellSol  =   highOrderGrids[hLevel].highOrderCellsSol[pLevel][leftCell];     
+        rl  = uHOLeftCellSol.qAverage[0];
+        ul  = uHOLeftCellSol.qAverage[1]/uHOLeftCellSol.qAverage[0];
+        vl  = uHOLeftCellSol.qAverage[2]/uHOLeftCellSol.qAverage[0];
+        wl  = uHOLeftCellSol.qAverage[3]/uHOLeftCellSol.qAverage[0];
+        el  = uHOLeftCellSol.qAverage[4];  
+        pl  = HO_GAMAM1 * (el - 0.5 * rl *(ul * ul + vl * vl + wl * wl));
+        cl  = sqrt(HO_GAMA * pl / rl);
+        vnl = xfn[iFace] * ul + yfn[iFace] * vl + zfn[iFace] * wl;
+
+        specificHeatRatio = HO_GAMA;
+        pm = pl;
+        rm = rl;
+        vn = vnl;
+        cm = sqrt(specificHeatRatio * pm / rm);
+
+        inviscidSpectrumRadius = half * area[iFace] * (ABS(vn) + cm);
+
+        invSpectrum[leftCell] += inviscidSpectrumRadius;
+    }
+
+    for(int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        leftCell = leftCellofFace [iFace];
+        rigtCell = rightCellofFace[iFace];
+        HighOrderCellSol & uHOLeftCellSol  =   highOrderGrids[hLevel].highOrderCellsSol[pLevel][leftCell];
+        HighOrderCellSol & uHORigtCellSol  =   highOrderGrids[hLevel].highOrderCellsSol[pLevel][rigtCell];      
+        rl  = uHOLeftCellSol.qAverage[0];
+        ul  = uHOLeftCellSol.qAverage[1]/uHOLeftCellSol.qAverage[0];
+        vl  = uHOLeftCellSol.qAverage[2]/uHOLeftCellSol.qAverage[0];
+        wl  = uHOLeftCellSol.qAverage[3]/uHOLeftCellSol.qAverage[0];
+        el  = uHOLeftCellSol.qAverage[4];  
+        pl  = HO_GAMAM1 * (el - 0.5 * rl *(ul * ul + vl * vl + wl * wl));
+        cl  = sqrt(HO_GAMA * pl / rl);
+        vnl = xfn[iFace] * ul + yfn[iFace] * vl + zfn[iFace] * wl;
+
+        rr  = uHORigtCellSol.qAverage[0];
+        ur  = uHORigtCellSol.qAverage[1]/uHORigtCellSol.qAverage[0];
+        vr  = uHORigtCellSol.qAverage[2]/uHORigtCellSol.qAverage[0];
+        wr  = uHORigtCellSol.qAverage[3]/uHORigtCellSol.qAverage[0];
+        er  = uHORigtCellSol.qAverage[4];  
+        pr  = HO_GAMAM1 * (er - 0.5 * rr *(ur * ur + vr * vr + wr * wr));
+        cr  = sqrt(HO_GAMA * pr / rr);
+        vnr = xfn[iFace] * ur + yfn[iFace] * vr + zfn[iFace] * wr;
+
+        specificHeatRatio = HO_GAMA;
+        pm = half * (pl + pr);
+        rm = half * (rl + rr);
+        vn = half * (vnl + vnr);
+        cm = sqrt(specificHeatRatio * pm / rm);
+
+        inviscidSpectrumRadius = half * area[iFace] * (ABS(vn) + cm);
+
+        invSpectrum[leftCell] += inviscidSpectrumRadius;
+        if(rigtCell < nTotalCell)
+        {
+            //! The re cell is the interior cell.
+            invSpectrum[rigtCell] += inviscidSpectrumRadius;
+        }
+    }
+}
+
+void HOSolverUnstruct::VisSpectrumRadius(Grid *gridIn, RDouble *visSpectrum)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+
+    RDouble *xfn    = grid->GetFaceNormalX();
+    RDouble *yfn    = grid->GetFaceNormalY();
+    RDouble *zfn    = grid->GetFaceNormalZ();
+    RDouble *xcc    = grid->GetCellCenterX();
+    RDouble *ycc    = grid->GetCellCenterY();
+    RDouble *zcc    = grid->GetCellCenterZ();
+    RDouble *area   = grid->GetFaceArea();
+    RDouble *volume = grid->GetCellVolume();
+
+    HOSolverUnstructParam * parameters = dynamic_cast< HOSolverUnstructParam * > (controlParameters);
+    int hLevel = gridIn->GetLevel(); 
+    int pLevel     = parameters->pMultiGrid;
+    if(pLevel == 1)
+    {
+        pLevel = 0;
+    }
+    int leftCell, rigtCell;
+
+    PHSPACE::SetField(visSpectrum, 0.0, nTotalCell);
+
+    RDouble refReNumber = GetControlParameters()->GetRefReNumber();
+
+    RDouble prl = GlobalDataBase::GetDoubleParaFromDB("prl"); //! default 0.72
+    RDouble prt = GlobalDataBase::GetDoubleParaFromDB("prt"); //! default 0.9
+
+    const RDouble fourthThird = 4.0 / 3.0;
+    RDouble oprl = 1.0 / prl;
+    RDouble oprt = 1.0 / prt;
+
+    RDouble visLaminar, visTurb, density, viscosity, specificHeatRatio;
+    RDouble coefOfSpectrum1, coefOfSpectrum2, coefOfSpectrum; 
+    RDouble faceArea, faceAera2, viscousSpectrumRadius;
+    RDouble dx, dy, dz, ds;
+    
+    int visSpetrumMethod = 2;
+    if(visSpetrumMethod == 1)
+    {
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            leftCell = leftCellofFace [iFace];
+            rigtCell = rightCellofFace[iFace];
+
+            HighOrderCellSol & uHOLeftCellSol  =   highOrderGrids[hLevel].highOrderCellsSol[pLevel][leftCell];
+            HighOrderCellSol & uHORigtCellSol  =   highOrderGrids[hLevel].highOrderCellsSol[pLevel][rigtCell];      
+
+            visLaminar = half * (uHOLeftCellSol.vislAverage + uHORigtCellSol.vislAverage);
+            visTurb    = half * (uHOLeftCellSol.vistAverage + uHORigtCellSol.vistAverage);
+            density    = half * (uHOLeftCellSol.qAverage[0] + uHORigtCellSol.qAverage[0]);
+            viscosity  = visLaminar + visTurb;
+
+            specificHeatRatio = HO_GAMA;
+            coefOfSpectrum1 = fourthThird * (visLaminar + visTurb);
+            coefOfSpectrum2 = specificHeatRatio * (visLaminar * oprl + visTurb * oprt);
+            coefOfSpectrum  = two * PHSPACE::MAX(coefOfSpectrum1, coefOfSpectrum2) / (refReNumber * density);
+
+            faceArea = area[iFace];
+            faceAera2 = PHSPACE::SQR(faceArea);
+
+            viscousSpectrumRadius = faceAera2 * coefOfSpectrum;
+
+            visSpectrum[leftCell] += viscousSpectrumRadius / volume[leftCell];
+            if(rigtCell < nTotalCell)
+            {
+                visSpectrum[rigtCell] += viscousSpectrumRadius / volume[rigtCell];
+            }
+        }
+    }
+    else if(visSpetrumMethod == 2)
+    {
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            leftCell = leftCellofFace [iFace];
+            rigtCell = rightCellofFace[iFace];
+
+            HighOrderCellSol & uHOLeftCellSol  =   highOrderGrids[hLevel].highOrderCellsSol[pLevel][leftCell];
+            HighOrderCellSol & uHORigtCellSol  =   highOrderGrids[hLevel].highOrderCellsSol[pLevel][rigtCell];      
+
+            dx  = xcc[rigtCell] - xcc[leftCell];
+            dy  = ycc[rigtCell] - ycc[leftCell];
+            dz  = zcc[rigtCell] - zcc[leftCell];
+            ds  = ABS(xfn[iFace] * dx + yfn[iFace] * dy + zfn[iFace] * dz);
+
+            visLaminar = half * (uHOLeftCellSol.vislAverage + uHORigtCellSol.vislAverage);
+            visTurb    = half * (uHOLeftCellSol.vistAverage + uHORigtCellSol.vistAverage);
+            density    = half * (uHOLeftCellSol.qAverage[0] + uHORigtCellSol.qAverage[0]);
+            viscosity  = visLaminar + visTurb;
+
+            faceArea  = area[iFace];
+            viscousSpectrumRadius  = 2.0 * viscosity / (density * ds * refReNumber + SMALL);
+            viscousSpectrumRadius *= half * faceArea;
+
+            visSpectrum[leftCell] += viscousSpectrumRadius;
+            if(rigtCell < nTotalCell)
+            {
+                visSpectrum[rigtCell] += viscousSpectrumRadius;
+            }
+        }
+    }
+}
+
+}
\ No newline at end of file
diff --git a/CFD/HOSolverUnstruct/src/HOSolverUnstructParam.cpp b/CFD/HOSolverUnstruct/src/HOSolverUnstructParam.cpp
new file mode 100644
index 0000000..71280ae
--- /dev/null
+++ b/CFD/HOSolverUnstruct/src/HOSolverUnstructParam.cpp
@@ -0,0 +1,47 @@
+#include "HOSolverUnstructParam.h"
+#include "GlobalDataBase.h"
+
+#include "HODefine.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT HOSolverUnstructParam::HOSolverUnstructParam()
+{
+}
+
+LIB_EXPORT HOSolverUnstructParam::~HOSolverUnstructParam()
+{
+}
+
+LIB_EXPORT void HOSolverUnstructParam::Init()
+{
+    Param_CFDSolver::Init();
+
+    restartNSFile = GlobalDataBase::GetStrParaFromDB("restartNSFile");
+    resSaveFile = GlobalDataBase::GetStrParaFromDB("resSaveFile");
+    intervalStepForce = GlobalDataBase::GetIntParaFromDB("intervalStepForce");
+    wallTemperature = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+    nTemperatureModel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+    ifLowSpeedPrecon = GlobalDataBase::GetIntParaFromDB("ifLowSpeedPrecon");
+    AoA  = GlobalDataBase::GetDoubleParaFromDB("attackd");
+    GlobalDataBase::GetData("alf_l", &RoeEntropyFixCoef1, PHDOUBLE, 1);
+    GlobalDataBase::GetData("alf_n", &RoeEntropyFixCoef2, PHDOUBLE, 1);
+    angleSlide = GlobalDataBase::GetDoubleParaFromDB("angleSlide");
+
+    dgSolOrder = GlobalDataBase::GetIntParaFromDB("dg_sol_order");
+    fvSolOrder = GlobalDataBase::GetIntParaFromDB("fv_sol_order");
+
+    dgSolDof = (dgSolOrder+1)*(dgSolOrder+2)*(dgSolOrder+3)/6;
+    fvSolDof = (fvSolOrder+1)*(fvSolOrder+2)*(fvSolOrder+3)/6;
+
+    pMultiGrid = GlobalDataBase::GetIntParaFromDB("p_multigrid");
+    if(pMultiGrid < 1) pMultiGrid = 1;
+
+    uns_scheme_name = GlobalDataBase::GetStrParaFromDB("uns_scheme_name");
+
+    RDouble Ma = GetRefMachNumber();
+    R = 1/(HO_GAMA * Ma * Ma);
+}
+
+}
diff --git a/CFD/HOSolverUnstruct/src/HOStandardElement.cpp b/CFD/HOSolverUnstruct/src/HOStandardElement.cpp
new file mode 100644
index 0000000..96ba4c1
--- /dev/null
+++ b/CFD/HOSolverUnstruct/src/HOStandardElement.cpp
@@ -0,0 +1,2370 @@
+#include <vector>
+
+#include "HOBasisFunction.h"
+#include "HODefine.h"
+#include "HOStandardElement.h"
+#include "HOGaussJacobiQuadrature.h"
+#include "HOShapeFunction.h"
+
+/*----------------------------------------------------------------------------------*/
+/*         Protected member functions of CFEMStandardElementBase.                   */
+/*----------------------------------------------------------------------------------*/
+namespace HOUnstruct
+{
+HighOrderStandardElementBase::HighOrderStandardElementBase(unsigned short iVTK_Type,unsigned short iIntegrationOrder) 
+{
+    /*--- Copy the function arguments that must be stored in the member variables. ---*/
+    VTK_Type = iVTK_Type;
+
+    integrationOrder  = iIntegrationOrder;
+    
+    /*--- Determine the integration points. This depends on the element type. ---*/
+    switch(VTK_Type)
+    {
+      case HOUnstruct::TRIANGLE:
+          IntegrationPointsTriangle();
+          break;
+      case HOUnstruct::QUADRILATERAL:
+          IntegrationPointsQuadrilateral();
+          break;
+      case HOUnstruct::TETRAHEDRON:
+          IntegrationPointsTetrahedron();
+          break;
+      case HOUnstruct::PYRAMID:
+          IntegrationPointsPyramid();
+          break;
+      case HOUnstruct::PRISM:
+          IntegrationPointsPrism();
+          break;
+      case HOUnstruct::HEXAHEDRON:
+          IntegrationPointsHexahedron();
+          break;
+      default:
+          cout<<"Wrong grid Type..../HighOrderStandardElementBase"<<endl;
+          break;
+    }
+}
+
+void HighOrderStandardElementBase::IntegrationPointsQuadrilateral(void)
+{
+    /*--- The 2D quadrature rule is a tensor product of the 1D Gauss-Legendre quadrature rule. 
+        First determine the number of integration points in 1D, which is stored in M, and determine them. ---*/
+  unsigned short M = integrationOrder/2 + 1;
+
+  vector<RDouble> GLPoints(M), GLWeights(M);
+  GaussLegendrePoints1D(GLPoints, GLWeights);
+
+  /*--- Allocate the memory for the integration points and weights and determine them.                ---*/
+  nIntegrationPoint = M*M;
+  xiIntegration.resize(nIntegrationPoint);
+  etIntegration.resize(nIntegrationPoint);
+  wtIntegration.resize(nIntegrationPoint);
+
+  unsigned int ii = 0;
+  for(unsigned short j=0; j<M; ++j)
+  {
+    for(unsigned short i=0; i<M; ++i, ++ii)
+    {
+      xiIntegration[ii] = GLPoints[i];
+      etIntegration[ii] = GLPoints[j];
+      wtIntegration[ii] = GLWeights[i]*GLWeights[j];
+    }
+  }
+}
+
+void HighOrderStandardElementBase::IntegrationPointsPrism(void)
+{
+  /*--- The 3D quadrature rule for a prism is a tensor product of the 1D Gauss-Legendre
+        quadrature rule with the triangle quadrature rule. Determine the number of
+        integration points in 1D, which is stored in M, and the actual integration
+        1D integration points. ---*/
+  unsigned short M = integrationOrder/2 + 1;
+
+  vector<RDouble> GLPoints(M), GLWeights(M);
+  GaussLegendrePoints1D(GLPoints, GLWeights);
+
+  /*--- Also determine the integration rule for a triangle. ---*/
+  IntegrationPointsTriangle();
+
+  unsigned short nIntTriangle = nIntegrationPoint;
+  vector<RDouble> rTriangle    = xiIntegration;
+  vector<RDouble> sTriangle    = etIntegration;
+  vector<RDouble> wTriangle    = wtIntegration;
+
+  /*--- Allocate the memory for the integration points and weights
+        of the prism and determine them.                ---*/
+  nIntegrationPoint = M*nIntTriangle;
+  xiIntegration.resize(nIntegrationPoint);
+  etIntegration.resize(nIntegrationPoint);
+  ztIntegration.resize(nIntegrationPoint);
+  wtIntegration.resize(nIntegrationPoint);
+
+  unsigned int ii = 0;
+  for(unsigned short k=0; k<M; ++k)
+  {
+      for(unsigned short j=0; j<nIntTriangle; ++j, ++ii)
+      {
+      xiIntegration[ii] = rTriangle[j];
+      etIntegration[ii] = sTriangle[j];
+      ztIntegration[ii] = GLPoints[k];
+      wtIntegration[ii] = wTriangle[j]*GLWeights[k];
+    }
+  }
+}
+
+void HighOrderStandardElementBase::IntegrationPointsHexahedron(void)
+{
+  /*--- The 3D quadrature rule is a tensor product of the 1D Gauss-Legendre
+        quadrature rule. Determine the number of integration points in 1D, which
+        is stored in M, and the actual integration 1D integration points. ---*/
+  unsigned short M = integrationOrder/2 + 1;
+
+  vector<RDouble> GLPoints(M), GLWeights(M);
+  GaussLegendrePoints1D(GLPoints, GLWeights);
+
+  /*--- Allocate the memory for the integration points and weights
+        of the hexahedron and determine them.                ---*/
+  nIntegrationPoint = M*M*M;
+  xiIntegration.resize(nIntegrationPoint);
+  etIntegration.resize(nIntegrationPoint);
+  ztIntegration.resize(nIntegrationPoint);
+  wtIntegration.resize(nIntegrationPoint);
+
+  unsigned int ii = 0;
+  for(unsigned short k=0; k<M; ++k) {
+    for(unsigned short j=0; j<M; ++j) {
+      for(unsigned short i=0; i<M; ++i, ++ii) {
+        xiIntegration[ii] = GLPoints[i];
+        etIntegration[ii] = GLPoints[j];
+        ztIntegration[ii] = GLPoints[k];
+        wtIntegration[ii] = GLWeights[i]*GLWeights[j]*GLWeights[k];
+      }
+    }
+  }
+}
+
+void HighOrderStandardElementBase::IntegrationPointsTriangle(void)
+{
+    /*--- Set the number of integration points, depending on the order of
+    polynomials that must be integrated exactly. ---*/
+    switch(integrationOrder)
+    {
+    case  0:
+    case  1: nIntegrationPoint =   1; break;
+    case  2: nIntegrationPoint =   3; break;
+    case  3:
+    case  4: nIntegrationPoint =   6; break;
+    case  5: nIntegrationPoint =   7; break;
+    case  6: nIntegrationPoint =  12; break;
+    case  7: nIntegrationPoint =  15; break;
+    case  8: nIntegrationPoint =  16; break;
+    case  9: nIntegrationPoint =  19; break;
+    case 10: nIntegrationPoint =  25; break;
+    case 11: nIntegrationPoint =  28; break;
+    case 12: nIntegrationPoint =  36; break;
+    case 13: nIntegrationPoint =  40; break;
+    case 14: nIntegrationPoint =  46; break;
+    case 15: nIntegrationPoint =  54; break;
+    case 16: nIntegrationPoint =  58; break;
+    case 17: nIntegrationPoint =  66; break;
+    case 18: nIntegrationPoint =  73; break;
+    case 19: nIntegrationPoint =  82; break;
+    case 20: nIntegrationPoint =  85; break;
+    default:
+        //notation MPI
+        cout << "Error : HighOrderStandardElementBase has wrong integrationOrder " << endl;
+    }
+
+  /*--- Allocate the memory for the integration points and their weights. ---*/
+  xiIntegration.resize(nIntegrationPoint);
+  etIntegration.resize(nIntegrationPoint);
+  wtIntegration.resize(nIntegrationPoint);
+
+  /*--- Set the pointers to the data arrays of the variables just allocated, such
+        that the names are shorter. This is useful for the code below. ---*/
+  RDouble *r = xiIntegration.data();
+  RDouble *s = etIntegration.data();
+  RDouble *w = wtIntegration.data();
+
+  /*--- Set the data for the integration points, depending on the order.
+        These integration rules come from the Matlab codes corresponding to
+        the book "Nodal Discontinuous Methods: Algorithms, Analysis, and Applications"
+        by Jan S. Hesthaven and Tim Warburton. ---*/
+  switch(integrationOrder)
+  {
+    case  0:
+    case  1: {
+      r[0] = -0.333333333333333; s[0] = -0.333333333333333; w[0] = 2.000000000000000;
+
+      break;
+    }
+    case  2: {
+      r[0] = -0.666666666666667; s[0] = -0.666666666666667; w[0] = 0.666666666666667;
+      r[1] =  0.333333333333333; s[1] = -0.666666666666667; w[1] = 0.666666666666667;
+      r[2] = -0.666666666666667; s[2] =  0.333333333333333; w[2] = 0.666666666666667;
+
+      break;
+    }
+    case  3:
+    case  4: {
+      r[0] = -0.816847572980458; s[0] = -0.816847572980458; w[0] = 0.219903487310644;
+      r[1] =  0.633695145960917; s[1] = -0.816847572980459; w[1] = 0.219903487310644;
+      r[2] = -0.816847572980459; s[2] =  0.633695145960917; w[2] = 0.219903487310644;
+      r[3] = -0.108103018168070; s[3] = -0.108103018168070; w[3] = 0.446763179356023;
+      r[4] = -0.783793963663860; s[4] = -0.108103018168070; w[4] = 0.446763179356023;
+      r[5] = -0.108103018168070; s[5] = -0.783793963663860; w[5] = 0.446763179356023;
+
+      break;
+    }
+    case  5: {
+      r[0] = -0.333333333333333; s[0] = -0.333333333333333; w[0] = 0.450000000000000;
+      r[1] = -0.059715871789770; s[1] = -0.059715871789770; w[1] = 0.264788305577012;
+      r[2] = -0.880568256420460; s[2] = -0.059715871789770; w[2] = 0.264788305577012;
+      r[3] = -0.059715871789770; s[3] = -0.880568256420460; w[3] = 0.264788305577012;
+      r[4] = -0.797426985353087; s[4] = -0.797426985353087; w[4] = 0.251878361089654;
+      r[5] =  0.594853970706175; s[5] = -0.797426985353087; w[5] = 0.251878361089654;
+      r[6] = -0.797426985353087; s[6] =  0.594853970706175; w[6] = 0.251878361089654;
+
+      break;
+    }
+    case  6: {
+      r[0]  = -0.501426509658179; s[0]  = -0.501426509658179; w[0]  = 0.233572551452759;
+      r[1]  =  0.002853019316358; s[1]  = -0.501426509658179; w[1]  = 0.233572551452759;
+      r[2]  = -0.501426509658179; s[2]  =  0.002853019316358; w[2]  = 0.233572551452759;
+      r[3]  = -0.873821971016996; s[3]  = -0.873821971016996; w[3]  = 0.101689812740414;
+      r[4]  =  0.747643942033991; s[4]  = -0.873821971016996; w[4]  = 0.101689812740414;
+      r[5]  = -0.873821971016996; s[5]  =  0.747643942033991; w[5]  = 0.101689812740414;
+      r[6]  = -0.379295097932431; s[6]  = -0.893709900310366; w[6]  = 0.165702151236747;
+      r[7]  = -0.893709900310366; s[7]  = -0.379295097932431; w[7]  = 0.165702151236747;
+      r[8]  =  0.273004998242797; s[8]  = -0.893709900310366; w[8]  = 0.165702151236747;
+      r[9]  = -0.893709900310366; s[9]  =  0.273004998242797; w[9]  = 0.165702151236747;
+      r[10] =  0.273004998242797; s[10] = -0.379295097932431; w[10] = 0.165702151236747;
+      r[11] = -0.379295097932431; s[11] =  0.273004998242797; w[11] = 0.165702151236747;
+
+      break;
+    }
+    case  7: {
+      r[0]  = -0.158765070723907; s[0]  = -0.158765070723907; w[0]  = 0.278402959350494;
+      r[1]  = -0.682469858552186; s[1]  = -0.158765070723907; w[1]  = 0.278402959350494;
+      r[2]  = -0.158765070723907; s[2]  = -0.682469858552186; w[2]  = 0.278402959350494;
+      r[3]  = -0.901937632421608; s[3]  = -0.901937632421608; w[3]  = 0.063653882657145;
+      r[4]  =  0.803875264843215; s[4]  = -0.901937632421608; w[4]  = 0.063653882657145;
+      r[5]  = -0.901937632421608; s[5]  =  0.803875264843215; w[5]  = 0.063653882657145;
+      r[6]  = -0.696696002590528; s[6]  = -0.696696002590528; w[6]  = 0.168642646759703;
+      r[7]  =  0.393392005181056; s[7]  = -0.696696002590528; w[7]  = 0.168642646759703;
+      r[8]  = -0.696696002590528; s[8]  =  0.393392005181056; w[8]  = 0.168642646759703;
+      r[9]  =  0.348275575962283; s[9]  = -0.375762055856278; w[9]  = 0.077983588949662;
+      r[10] = -0.375762055856278; s[10] =  0.348275575962283; w[10] = 0.077983588949662;
+      r[11] = -0.972513520106005; s[11] = -0.375762055856278; w[11] = 0.077983588949662;
+      r[12] = -0.375762055856278; s[12] = -0.972513520106005; w[12] = 0.077983588949662;
+      r[13] = -0.972513520106005; s[13] =  0.348275575962283; w[13] = 0.077983588949662;
+      r[14] =  0.348275575962283; s[14] = -0.972513520106005; w[14] = 0.077983588949662;
+
+      break;
+    }
+    case  8: {
+      r[0]  = -0.333333333333333; s[0]  = -0.333333333333333; w[0]  = 0.288631215355574;
+      r[1]  = -0.081414823414554; s[1]  = -0.081414823414554; w[1]  = 0.190183268534569;
+      r[2]  = -0.837170353170893; s[2]  = -0.081414823414554; w[2]  = 0.190183268534569;
+      r[3]  = -0.081414823414554; s[3]  = -0.837170353170893; w[3]  = 0.190183268534569;
+      r[4]  = -0.658861384496480; s[4]  = -0.658861384496480; w[4]  = 0.206434741069437;
+      r[5]  =  0.317722768992959; s[5]  = -0.658861384496480; w[5]  = 0.206434741069437;
+      r[6]  = -0.658861384496480; s[6]  =  0.317722768992959; w[6]  = 0.206434741069437;
+      r[7]  = -0.898905543365938; s[7]  = -0.898905543365938; w[7]  = 0.064916995246396;
+      r[8]  =  0.797811086731876; s[8]  = -0.898905543365938; w[8]  = 0.064916995246396;
+      r[9]  = -0.898905543365938; s[9]  =  0.797811086731876; w[9]  = 0.064916995246396;
+      r[10] = -0.473774340730724; s[10] =  0.456984785910809; w[10] = 0.054460628348870;
+      r[11] =  0.456984785910809; s[11] = -0.473774340730724; w[11] = 0.054460628348870;
+      r[12] = -0.983210445180085; s[12] =  0.456984785910809; w[12] = 0.054460628348870;
+      r[13] =  0.456984785910809; s[13] = -0.983210445180085; w[13] = 0.054460628348870;
+      r[14] = -0.983210445180085; s[14] = -0.473774340730724; w[14] = 0.054460628348870;
+      r[15] = -0.473774340730724; s[15] = -0.983210445180085; w[15] = 0.054460628348870;
+
+      break;
+    }
+    case  9: {
+      r[0]  = -0.333333333333333; s[0]  = -0.333333333333333; w[0]  = 0.194271592565598;
+      r[1]  = -0.020634961602525; s[1]  = -0.020634961602525; w[1]  = 0.062669400454278;
+      r[2]  = -0.958730076794950; s[2]  = -0.020634961602525; w[2]  = 0.062669400454278;
+      r[3]  = -0.020634961602525; s[3]  = -0.958730076794950; w[3]  = 0.062669400454278;
+      r[4]  = -0.125820817014127; s[4]  = -0.125820817014127; w[4]  = 0.155655082009549;
+      r[5]  = -0.748358365971746; s[5]  = -0.125820817014127; w[5]  = 0.155655082009549;
+      r[6]  = -0.125820817014127; s[6]  = -0.748358365971746; w[6]  = 0.155655082009549;
+      r[7]  = -0.623592928761935; s[7]  = -0.623592928761935; w[7]  = 0.159295477854420;
+      r[8]  =  0.247185857523869; s[8]  = -0.623592928761935; w[8]  = 0.159295477854420;
+      r[9]  = -0.623592928761935; s[9]  =  0.247185857523869; w[9]  = 0.159295477854420;
+      r[10] = -0.910540973211095; s[10] = -0.910540973211095; w[10] = 0.051155351317396;
+      r[11] =  0.821081946422189; s[11] = -0.910540973211095; w[11] = 0.051155351317396;
+      r[12] = -0.910540973211095; s[12] =  0.821081946422189; w[12] = 0.051155351317396;
+      r[13] =  0.482397197568996; s[13] = -0.556074021678469; w[13] = 0.086567078754579;
+      r[14] = -0.556074021678469; s[14] =  0.482397197568996; w[14] = 0.086567078754579;
+      r[15] = -0.926323175890527; s[15] = -0.556074021678469; w[15] = 0.086567078754579;
+      r[16] = -0.556074021678469; s[16] = -0.926323175890527; w[16] = 0.086567078754579;
+      r[17] = -0.926323175890527; s[17] =  0.482397197568996; w[17] = 0.086567078754579;
+      r[18] =  0.482397197568996; s[18] = -0.926323175890527; w[18] = 0.086567078754579;
+
+      break;
+    }
+    case 10: {
+      r[0]  = -0.333333333333333; s[0]  = -0.333333333333333; w[0]  = 0.167046799610393;
+      r[1]  = -0.004269134091050; s[1]  = -0.004269134091050; w[1]  = 0.014459701184113;
+      r[2]  = -0.991461731817899; s[2]  = -0.004269134091050; w[2]  = 0.014459701184113;
+      r[3]  = -0.004269134091050; s[3]  = -0.991461731817899; w[3]  = 0.014459701184113;
+      r[4]  = -0.143975100541888; s[4]  = -0.143975100541888; w[4]  = 0.148984355841961;
+      r[5]  = -0.712049798916225; s[5]  = -0.143975100541888; w[5]  = 0.148984355841961;
+      r[6]  = -0.143975100541888; s[6]  = -0.712049798916225; w[6]  = 0.148984355841961;
+      r[7]  = -0.630487174513551; s[7]  = -0.630487174513551; w[7]  = 0.157292946806217;
+      r[8]  =  0.260974349027102; s[8]  = -0.630487174513551; w[8]  = 0.157292946806217;
+      r[9]  = -0.630487174513551; s[9]  =  0.260974349027102; w[9]  = 0.157292946806217;
+      r[10] = -0.959037562856645; s[10] = -0.959037562856645; w[10] = 0.013856646174215;
+      r[11] =  0.918075125713290; s[11] = -0.959037562856645; w[11] = 0.013856646174215;
+      r[12] = -0.959037562856645; s[12] =  0.918075125713290; w[12] = 0.013856646174215;
+      r[13] = -0.726852847487933; s[13] =  0.656846867693389; w[13] = 0.059036640669559;
+      r[14] =  0.656846867693389; s[14] = -0.726852847487933; w[14] = 0.059036640669559;
+      r[15] = -0.929994020205456; s[15] =  0.656846867693389; w[15] = 0.059036640669559;
+      r[16] =  0.656846867693389; s[16] = -0.929994020205456; w[16] = 0.059036640669559;
+      r[17] = -0.929994020205456; s[17] = -0.726852847487933; w[17] = 0.059036640669559;
+      r[18] = -0.726852847487933; s[18] = -0.929994020205456; w[18] = 0.059036640669559;
+      r[19] = -0.334512798822723; s[19] =  0.259414658305837; w[19] = 0.079158734392122;
+      r[20] =  0.259414658305837; s[20] = -0.334512798822723; w[20] = 0.079158734392122;
+      r[21] = -0.924901859483115; s[21] =  0.259414658305837; w[21] = 0.079158734392122;
+      r[22] =  0.259414658305837; s[22] = -0.924901859483115; w[22] = 0.079158734392122;
+      r[23] = -0.924901859483115; s[23] = -0.334512798822723; w[23] = 0.079158734392122;
+      r[24] = -0.334512798822723; s[24] = -0.924901859483115; w[24] = 0.079158734392122;
+
+      break;
+    }
+    case 11: {
+      r[0]  = -0.333333333333333; s[0]  = -0.333333333333333; w[0]  = 0.171542269659139;
+      r[1]  = -0.008227986519701; s[1]  = -0.008227986519701; w[1]  = 0.033232309648099;
+      r[2]  = -0.983544026960598; s[2]  = -0.008227986519701; w[2]  = 0.033232309648099;
+      r[3]  = -0.008227986519701; s[3]  = -0.983544026960598; w[3]  = 0.033232309648099;
+      r[4]  = -0.123062767323470; s[4]  = -0.123062767323470; w[4]  = 0.134650934561697;
+      r[5]  = -0.753874465353061; s[5]  = -0.123062767323470; w[5]  = 0.134650934561697;
+      r[6]  = -0.123062767323470; s[6]  = -0.753874465353061; w[6]  = 0.134650934561697;
+      r[7]  = -0.579583807314522; s[7]  = -0.579583807314522; w[7]  = 0.141045284213931;
+      r[8]  =  0.159167614629044; s[8]  = -0.579583807314522; w[8]  = 0.141045284213931;
+      r[9]  = -0.579583807314522; s[9]  =  0.159167614629044; w[9]  = 0.141045284213931;
+      r[10] = -0.794793191450311; s[10] = -0.794793191450311; w[10] = 0.077255352409353;
+      r[11] =  0.589586382900622; s[11] = -0.794793191450311; w[11] = 0.077255352409353;
+      r[12] = -0.794793191450311; s[12] =  0.589586382900622; w[12] = 0.077255352409353;
+      r[13] = -0.943045809035533; s[13] = -0.943045809035533; w[13] = 0.020851693311810;
+      r[14] =  0.886091618071066; s[14] = -0.943045809035533; w[14] = 0.020851693311810;
+      r[15] = -0.943045809035533; s[15] =  0.886091618071066; w[15] = 0.020851693311810;
+      r[16] = -0.701412405190965; s[16] =  0.686811031831200; w[16] = 0.020556454130106;
+      r[17] =  0.686811031831200; s[17] = -0.701412405190965; w[17] = 0.020556454130106;
+      r[18] = -0.985398626640235; s[18] =  0.686811031831200; w[18] = 0.020556454130106;
+      r[19] =  0.686811031831200; s[19] = -0.985398626640235; w[19] = 0.020556454130106;
+      r[20] = -0.985398626640235; s[20] = -0.701412405190966; w[20] = 0.020556454130106;
+      r[21] = -0.701412405190966; s[21] = -0.985398626640235; w[21] = 0.020556454130106;
+      r[22] = -0.420944470627256; s[22] =  0.328932876191794; w[22] = 0.080668713854259;
+      r[23] =  0.328932876191794; s[23] = -0.420944470627256; w[23] = 0.080668713854259;
+      r[24] = -0.907988405564538; s[24] =  0.328932876191794; w[24] = 0.080668713854259;
+      r[25] =  0.328932876191794; s[25] = -0.907988405564538; w[25] = 0.080668713854259;
+      r[26] = -0.907988405564538; s[26] = -0.420944470627256; w[26] = 0.080668713854259;
+      r[27] = -0.420944470627256; s[27] = -0.907988405564538; w[27] = 0.080668713854259;
+
+      break;
+    }
+    case 12: {
+      r[0]  = -0.115127288420454; s[0]  = -0.115127288420454; w[0]  = 0.088694050812375;
+      r[1]  = -0.769745423159092; s[1]  = -0.115127288420454; w[1]  = 0.088694050812375;
+      r[2]  = -0.115127288420454; s[2]  = -0.769745423159092; w[2]  = 0.088694050812375;
+      r[3]  = -0.241326933740970; s[3]  = -0.241326933740970; w[3]  = 0.083486638970495;
+      r[4]  = -0.517346132518060; s[4]  = -0.241326933740970; w[4]  = 0.083486638970495;
+      r[5]  = -0.241326933740970; s[5]  = -0.517346132518060; w[5]  = 0.083486638970495;
+      r[6]  = -0.773435586772427; s[6]  = -0.773435586772427; w[6]  = 0.061949370456958;
+      r[7]  =  0.546871173544855; s[7]  = -0.773435586772427; w[7]  = 0.061949370456958;
+      r[8]  = -0.773435586772427; s[8]  =  0.546871173544855; w[8]  = 0.061949370456958;
+      r[9]  = -0.550360151853422; s[9]  = -0.550360151853422; w[9]  = 0.096926744607805;
+      r[10] =  0.100720303706844; s[10] = -0.550360151853422; w[10] = 0.096926744607805;
+      r[11] = -0.550360151853422; s[11] =  0.100720303706844; w[11] = 0.096926744607805;
+      r[12] = -0.949850839686919; s[12] = -0.949850839686919; w[12] = 0.016284715813394;
+      r[13] =  0.899701679373837; s[13] = -0.949850839686919; w[13] = 0.016284715813394;
+      r[14] = -0.949850839686919; s[14] =  0.899701679373837; w[14] = 0.016284715813394;
+      r[15] = -0.023247583079632; s[15] = -0.023247583079632; w[15] = 0.047730162209543;
+      r[16] = -0.953504833840737; s[16] = -0.023247583079632; w[16] = 0.047730162209543;
+      r[17] = -0.023247583079632; s[17] = -0.953504833840737; w[17] = 0.047730162209543;
+      r[18] =  0.701114686742190; s[18] = -0.956341185792092; w[18] = 0.030740478172077;
+      r[19] = -0.956341185792092; s[19] =  0.701114686742190; w[19] = 0.030740478172077;
+      r[20] = -0.744773500950097; s[20] = -0.956341185792092; w[20] = 0.030740478172077;
+      r[21] = -0.956341185792092; s[21] = -0.744773500950097; w[21] = 0.030740478172077;
+      r[22] = -0.744773500950097; s[22] =  0.701114686742189; w[22] = 0.030740478172077;
+      r[23] =  0.701114686742189; s[23] = -0.744773500950097; w[23] = 0.030740478172077;
+      r[24] =  0.280974603820889; s[24] = -0.820754518409649; w[24] = 0.073364295183933;
+      r[25] = -0.820754518409649; s[25] =  0.280974603820889; w[25] = 0.073364295183933;
+      r[26] = -0.460220085411240; s[26] = -0.820754518409649; w[26] = 0.073364295183933;
+      r[27] = -0.820754518409649; s[27] = -0.460220085411240; w[27] = 0.073364295183933;
+      r[28] = -0.460220085411240; s[28] =  0.280974603820889; w[28] = 0.073364295183933;
+      r[29] =  0.280974603820889; s[29] = -0.460220085411240; w[29] = 0.073364295183933;
+      r[30] =  0.380092839755442; s[30] = -0.412599349012509; w[30] = 0.031692718542038;
+      r[31] = -0.412599349012509; s[31] =  0.380092839755442; w[31] = 0.031692718542038;
+      r[32] = -0.967493490742933; s[32] = -0.412599349012509; w[32] = 0.031692718542038;
+      r[33] = -0.412599349012509; s[33] = -0.967493490742933; w[33] = 0.031692718542038;
+      r[34] = -0.967493490742933; s[34] =  0.380092839755442; w[34] = 0.031692718542038;
+      r[35] =  0.380092839755442; s[35] = -0.967493490742933; w[35] = 0.031692718542038;
+
+      break;
+    }
+    case 13: {
+      r[0]  = -0.333333333333333; s[0]  = -0.333333333333333; w[0]  = 0.097649880256618;
+      r[1]  = -0.178369512906405; s[1]  = -0.178369512906405; w[1]  = 0.090830392435257;
+      r[2]  = -0.643260974187191; s[2]  = -0.178369512906405; w[2]  = 0.090830392435257;
+      r[3]  = -0.178369512906405; s[3]  = -0.643260974187191; w[3]  = 0.090830392435257;
+      r[4]  = -0.542160866418819; s[4]  = -0.542160866418819; w[4]  = 0.093688172298398;
+      r[5]  =  0.084321732837639; s[5]  = -0.542160866418819; w[5]  = 0.093688172298398;
+      r[6]  = -0.542160866418819; s[6]  =  0.084321732837639; w[6]  = 0.093688172298398;
+      r[7]  = -0.771083702251175; s[7]  = -0.771083702251175; w[7]  = 0.062636625766914;
+      r[8]  =  0.542167404502350; s[8]  = -0.771083702251175; w[8]  = 0.062636625766914;
+      r[9]  = -0.771083702251175; s[9]  =  0.542167404502350; w[9]  = 0.062636625766914;
+      r[10] = -0.951222762153923; s[10] = -0.951222762153923; w[10] = 0.015384123058757;
+      r[11] =  0.902445524307847; s[11] = -0.951222762153923; w[11] = 0.015384123058757;
+      r[12] = -0.951222762153923; s[12] =  0.902445524307847; w[12] = 0.015384123058757;
+      r[13] = -0.071124044893491; s[13] = -0.071124044893491; w[13] = 0.063336411850675;
+      r[14] = -0.857751910213018; s[14] = -0.071124044893491; w[14] = 0.063336411850675;
+      r[15] = -0.071124044893491; s[15] = -0.857751910213018; w[15] = 0.063336411850675;
+      r[16] =  0.089497598920545; s[16] = -0.972567007080596; w[16] = 0.017363112895214;
+      r[17] = -0.972567007080596; s[17] =  0.089497598920545; w[17] = 0.017363112895214;
+      r[18] = -0.116930591839948; s[18] = -0.972567007080596; w[18] = 0.017363112895214;
+      r[19] = -0.972567007080596; s[19] = -0.116930591839948; w[19] = 0.017363112895214;
+      r[20] = -0.116930591839948; s[20] =  0.089497598920545; w[20] = 0.017363112895214;
+      r[21] =  0.089497598920545; s[21] = -0.116930591839948; w[21] = 0.017363112895214;
+      r[22] =  0.708303576893352; s[22] = -0.752827405974001; w[22] = 0.030203519313196;
+      r[23] = -0.752827405974001; s[23] =  0.708303576893352; w[23] = 0.030203519313196;
+      r[24] = -0.955476170919351; s[24] = -0.752827405974001; w[24] = 0.030203519313196;
+      r[25] = -0.752827405974001; s[25] = -0.955476170919351; w[25] = 0.030203519313196;
+      r[26] = -0.955476170919351; s[26] =  0.708303576893352; w[26] = 0.030203519313196;
+      r[27] =  0.708303576893352; s[27] = -0.955476170919351; w[27] = 0.030203519313196;
+      r[28] =  0.400693795223418; s[28] = -0.438009873048077; w[28] = 0.032954120635442;
+      r[29] = -0.438009873048077; s[29] =  0.400693795223418; w[29] = 0.032954120635442;
+      r[30] = -0.962683922175342; s[30] = -0.438009873048076; w[30] = 0.032954120635442;
+      r[31] = -0.438009873048076; s[31] = -0.962683922175342; w[31] = 0.032954120635442;
+      r[32] = -0.962683922175342; s[32] =  0.400693795223419; w[32] = 0.032954120635442;
+      r[33] =  0.400693795223419; s[33] = -0.962683922175342; w[33] = 0.032954120635442;
+      r[34] = -0.461147708177324; s[34] = -0.809703416305633; w[34] = 0.073599737741711;
+      r[35] = -0.809703416305633; s[35] = -0.461147708177324; w[35] = 0.073599737741711;
+      r[36] =  0.270851124482956; s[36] = -0.809703416305633; w[36] = 0.073599737741711;
+      r[37] = -0.809703416305633; s[37] =  0.270851124482956; w[37] = 0.073599737741711;
+      r[38] =  0.270851124482956; s[38] = -0.461147708177324; w[38] = 0.073599737741711;
+      r[39] = -0.461147708177324; s[39] =  0.270851124482956; w[39] = 0.073599737741711;
+
+      break;
+    }
+    case 14: {
+      r[0]  = -0.333333333333333; s[0]  = -0.333333333333333; w[0]  = 0.086016161940337;
+      r[1]  = -0.031437623162377; s[1]  = -0.031437623162377; w[1]  = 0.020861042581505;
+      r[2]  = -0.937124753675245; s[2]  = -0.031437623162377; w[2]  = 0.020861042581505;
+      r[3]  = -0.031437623162377; s[3]  = -0.937124753675245; w[3]  = 0.020861042581505;
+      r[4]  = -0.190179067155837; s[4]  = -0.190179067155837; w[4]  = 0.084906577433761;
+      r[5]  = -0.619641865688325; s[5]  = -0.190179067155837; w[5]  = 0.084906577433761;
+      r[6]  = -0.190179067155837; s[6]  = -0.619641865688325; w[6]  = 0.084906577433761;
+      r[7]  = -0.544945017724160; s[7]  = -0.544945017724160; w[7]  = 0.094412955694385;
+      r[8]  =  0.089890035448320; s[8]  = -0.544945017724160; w[8]  = 0.094412955694385;
+      r[9]  = -0.544945017724160; s[9]  =  0.089890035448320; w[9]  = 0.094412955694385;
+      r[10] = -0.829084434528895; s[10] = -0.829084434528895; w[10] = 0.036931420530108;
+      r[11] =  0.658168869057790; s[11] = -0.829084434528895; w[11] = 0.036931420530108;
+      r[12] = -0.829084434528895; s[12] =  0.658168869057790; w[12] = 0.036931420530108;
+      r[13] = -0.961731843229187; s[13] = -0.961731843229187; w[13] = 0.009566859223433;
+      r[14] =  0.923463686458374; s[14] = -0.961731843229187; w[14] = 0.009566859223433;
+      r[15] = -0.961731843229187; s[15] =  0.923463686458374; w[15] = 0.009566859223433;
+      r[16] = -0.228055909294146; s[16] =  0.200257489743243; w[16] = 0.023873332102599;
+      r[17] =  0.200257489743243; s[17] = -0.228055909294146; w[17] = 0.023873332102599;
+      r[18] = -0.972201580449098; s[18] =  0.200257489743243; w[18] = 0.023873332102599;
+      r[19] =  0.200257489743243; s[19] = -0.972201580449098; w[19] = 0.023873332102599;
+      r[20] = -0.972201580449097; s[20] = -0.228055909294146; w[20] = 0.023873332102599;
+      r[21] = -0.228055909294146; s[21] = -0.972201580449097; w[21] = 0.023873332102599;
+      r[22] = -0.801926305237733; s[22] =  0.769518568627872; w[22] = 0.018006541968931;
+      r[23] =  0.769518568627872; s[23] = -0.801926305237733; w[23] = 0.018006541968931;
+      r[24] = -0.967592263390139; s[24] =  0.769518568627872; w[24] = 0.018006541968931;
+      r[25] =  0.769518568627872; s[25] = -0.967592263390139; w[25] = 0.018006541968931;
+      r[26] = -0.967592263390139; s[26] = -0.801926305237733; w[26] = 0.018006541968931;
+      r[27] = -0.801926305237733; s[27] = -0.967592263390139; w[27] = 0.018006541968931;
+      r[28] = -0.544893784145096; s[28] =  0.504355701557747; w[28] = 0.030117913357456;
+      r[29] =  0.504355701557747; s[29] = -0.544893784145096; w[29] = 0.030117913357456;
+      r[30] = -0.959461917412651; s[30] =  0.504355701557747; w[30] = 0.030117913357456;
+      r[31] =  0.504355701557747; s[31] = -0.959461917412651; w[31] = 0.030117913357456;
+      r[32] = -0.959461917412651; s[32] = -0.544893784145095; w[32] = 0.030117913357456;
+      r[33] = -0.544893784145095; s[33] = -0.959461917412651; w[33] = 0.030117913357456;
+      r[34] = -0.288429073961769; s[34] =  0.109399611316741; w[34] = 0.067035335144205;
+      r[35] =  0.109399611316741; s[35] = -0.288429073961769; w[35] = 0.067035335144205;
+      r[36] = -0.820970537354972; s[36] =  0.109399611316741; w[36] = 0.067035335144205;
+      r[37] =  0.109399611316741; s[37] = -0.820970537354972; w[37] = 0.067035335144205;
+      r[38] = -0.820970537354972; s[38] = -0.288429073961769; w[38] = 0.067035335144205;
+      r[39] = -0.288429073961769; s[39] = -0.820970537354972; w[39] = 0.067035335144205;
+      r[40] = -0.593507885280605; s[40] =  0.397658756992448; w[40] = 0.056624756038490;
+      r[41] =  0.397658756992448; s[41] = -0.593507885280605; w[41] = 0.056624756038490;
+      r[42] = -0.804150871711842; s[42] =  0.397658756992447; w[42] = 0.056624756038490;
+      r[43] =  0.397658756992447; s[43] = -0.804150871711842; w[43] = 0.056624756038490;
+      r[44] = -0.804150871711842; s[44] = -0.593507885280605; w[44] = 0.056624756038490;
+      r[45] = -0.593507885280605; s[45] = -0.804150871711842; w[45] = 0.056624756038490;
+
+      break;
+    }
+    case 15: {
+      r[0]  = -0.083438407261750; s[0]  = -0.083438407261750; w[0]  = 0.065323637697611;
+      r[1]  = -0.833123185476500; s[1]  = -0.083438407261750; w[1]  = 0.065323637697611;
+      r[2]  = -0.083438407261750; s[2]  = -0.833123185476500; w[2]  = 0.065323637697611;
+      r[3]  = -0.192779070841739; s[3]  = -0.192779070841739; w[3]  = 0.054825636062729;
+      r[4]  = -0.614441858316522; s[4]  = -0.192779070841739; w[4]  = 0.054825636062729;
+      r[5]  = -0.192779070841739; s[5]  = -0.614441858316522; w[5]  = 0.054825636062729;
+      r[6]  = -0.413605664173949; s[6]  = -0.413605664173949; w[6]  = 0.053020073197407;
+      r[7]  = -0.172788671652101; s[7]  = -0.413605664173949; w[7]  = 0.053020073197407;
+      r[8]  = -0.413605664173949; s[8]  = -0.172788671652101; w[8]  = 0.053020073197407;
+      r[9]  = -0.707064426114454; s[9]  = -0.707064426114454; w[9]  = 0.058431924272972;
+      r[10] =  0.414128852228908; s[10] = -0.707064426114454; w[10] = 0.058431924272972;
+      r[11] = -0.707064426114454; s[11] =  0.414128852228908; w[11] = 0.058431924272972;
+      r[12] = -0.887274264668793; s[12] = -0.887274264668793; w[12] = 0.021169216132488;
+      r[13] =  0.774548529337586; s[13] = -0.887274264668793; w[13] = 0.021169216132488;
+      r[14] = -0.887274264668793; s[14] =  0.774548529337586; w[14] = 0.021169216132488;
+      r[15] = -0.966849746283259; s[15] = -0.966849746283259; w[15] = 0.007229286128184;
+      r[16] =  0.933699492566519; s[16] = -0.966849746283259; w[16] = 0.007229286128184;
+      r[17] = -0.966849746283259; s[17] =  0.933699492566519; w[17] = 0.007229286128184;
+      r[18] = -0.520930891690411; s[18] =  0.501106485071962; w[18] = 0.017055496203419;
+      r[19] =  0.501106485071962; s[19] = -0.520930891690411; w[19] = 0.017055496203419;
+      r[20] = -0.980175593381550; s[20] =  0.501106485071962; w[20] = 0.017055496203419;
+      r[21] =  0.501106485071962; s[21] = -0.980175593381550; w[21] = 0.017055496203419;
+      r[22] = -0.980175593381550; s[22] = -0.520930891690411; w[22] = 0.017055496203419;
+      r[23] = -0.520930891690411; s[23] = -0.980175593381550; w[23] = 0.017055496203419;
+      r[24] = -0.190242385363320; s[24] =  0.158634844102864; w[24] = 0.027832353033384;
+      r[25] =  0.158634844102864; s[25] = -0.190242385363320; w[25] = 0.027832353033384;
+      r[26] = -0.968392458739544; s[26] =  0.158634844102864; w[26] = 0.027832353033384;
+      r[27] =  0.158634844102864; s[27] = -0.968392458739544; w[27] = 0.027832353033384;
+      r[28] = -0.968392458739544; s[28] = -0.190242385363320; w[28] = 0.027832353033384;
+      r[29] = -0.190242385363320; s[29] = -0.968392458739544; w[29] = 0.027832353033384;
+      r[30] = -0.809995773773910; s[30] =  0.799708556139969; w[30] = 0.008583865881470;
+      r[31] =  0.799708556139969; s[31] = -0.809995773773910; w[31] = 0.008583865881470;
+      r[32] = -0.989712782366059; s[32] =  0.799708556139969; w[32] = 0.008583865881470;
+      r[33] =  0.799708556139969; s[33] = -0.989712782366059; w[33] = 0.008583865881470;
+      r[34] = -0.989712782366059; s[34] = -0.809995773773910; w[34] = 0.008583865881470;
+      r[35] = -0.809995773773910; s[35] = -0.989712782366059; w[35] = 0.008583865881470;
+      r[36] = -0.700493785355452; s[36] =  0.602649133849474; w[36] = 0.032470658563550;
+      r[37] =  0.602649133849474; s[37] = -0.700493785355452; w[37] = 0.032470658563550;
+      r[38] = -0.902155348494022; s[38] =  0.602649133849474; w[38] = 0.032470658563550;
+      r[39] =  0.602649133849474; s[39] = -0.902155348494022; w[39] = 0.032470658563550;
+      r[40] = -0.902155348494023; s[40] = -0.700493785355452; w[40] = 0.032470658563550;
+      r[41] = -0.700493785355452; s[41] = -0.902155348494023; w[41] = 0.032470658563550;
+      r[42] = -0.426160775117330; s[42] =  0.288623277852292; w[42] = 0.051214681842525;
+      r[43] =  0.288623277852292; s[43] = -0.426160775117330; w[43] = 0.051214681842525;
+      r[44] = -0.862462502734962; s[44] =  0.288623277852292; w[44] = 0.051214681842525;
+      r[45] =  0.288623277852292; s[45] = -0.862462502734962; w[45] = 0.051214681842525;
+      r[46] = -0.862462502734962; s[46] = -0.426160775117330; w[46] = 0.051214681842525;
+      r[47] = -0.426160775117330; s[47] = -0.862462502734962; w[47] = 0.051214681842525;
+      r[48] = -0.436328663801831; s[48] =  0.099519827552432; w[48] = 0.066176391063291;
+      r[49] =  0.099519827552432; s[49] = -0.436328663801831; w[49] = 0.066176391063291;
+      r[50] = -0.663191163750602; s[50] =  0.099519827552432; w[50] = 0.066176391063291;
+      r[51] =  0.099519827552432; s[51] = -0.663191163750602; w[51] = 0.066176391063291;
+      r[52] = -0.663191163750602; s[52] = -0.436328663801831; w[52] = 0.066176391063291;
+      r[53] = -0.436328663801831; s[53] = -0.663191163750602; w[53] = 0.066176391063291;
+
+      break;
+    }
+    case 16: {
+      r[0]  = -0.333333333333333; s[0]  = -0.333333333333333; w[0]  = 0.092421202321849;
+      r[1]  = -0.015796436959213; s[1]  = -0.015796436959213; w[1]  = 0.027991652734724;
+      r[2]  = -0.968407126081574; s[2]  = -0.015796436959213; w[2]  = 0.027991652734724;
+      r[3]  = -0.015796436959213; s[3]  = -0.968407126081574; w[3]  = 0.027991652734724;
+      r[4]  = -0.087376299046785; s[4]  = -0.087376299046785; w[4]  = 0.036406763596424;
+      r[5]  = -0.825247401906431; s[5]  = -0.087376299046785; w[5]  = 0.036406763596424;
+      r[6]  = -0.087376299046785; s[6]  = -0.825247401906431; w[6]  = 0.036406763596424;
+      r[7]  = -0.640498098534045; s[7]  = -0.640498098534045; w[7]  = 0.062729423327251;
+      r[8]  =  0.280996197068091; s[8]  = -0.640498098534045; w[8]  = 0.062729423327251;
+      r[9]  = -0.640498098534045; s[9]  =  0.280996197068091; w[9]  = 0.062729423327251;
+      r[10] = -0.828211591878549; s[10] = -0.828211591878549; w[10] = 0.032217170192673;
+      r[11] =  0.656423183757099; s[11] = -0.828211591878549; w[11] = 0.032217170192673;
+      r[12] = -0.828211591878549; s[12] =  0.656423183757099; w[12] = 0.032217170192673;
+      r[13] = -0.977882767295650; s[13] = -0.977882767295650; w[13] = 0.003676792575648;
+      r[14] =  0.955765534591299; s[14] = -0.977882767295650; w[14] = 0.003676792575648;
+      r[15] = -0.977882767295650; s[15] =  0.955765534591299; w[15] = 0.003676792575648;
+      r[16] = -0.648594849699253; s[16] =  0.619534954455185; w[16] = 0.019075686313307;
+      r[17] =  0.619534954455185; s[17] = -0.648594849699253; w[17] = 0.019075686313307;
+      r[18] = -0.970940104755933; s[18] =  0.619534954455185; w[18] = 0.019075686313307;
+      r[19] =  0.619534954455185; s[19] = -0.970940104755933; w[19] = 0.019075686313307;
+      r[20] = -0.970940104755933; s[20] = -0.648594849699253; w[20] = 0.019075686313307;
+      r[21] = -0.648594849699253; s[21] = -0.970940104755933; w[21] = 0.019075686313307;
+      r[22] = -0.355089058161032; s[22] =  0.324703448463838; w[22] = 0.025111336723323;
+      r[23] =  0.324703448463838; s[23] = -0.355089058161032; w[23] = 0.025111336723323;
+      r[24] = -0.969614390302806; s[24] =  0.324703448463838; w[24] = 0.025111336723323;
+      r[25] =  0.324703448463838; s[25] = -0.969614390302806; w[25] = 0.025111336723323;
+      r[26] = -0.969614390302806; s[26] = -0.355089058161032; w[26] = 0.025111336723323;
+      r[27] = -0.355089058161032; s[27] = -0.969614390302806; w[27] = 0.025111336723323;
+      r[28] = -0.863082725186344; s[28] =  0.829810165174004; w[28] = 0.014134510743040;
+      r[29] =  0.829810165174004; s[29] = -0.863082725186344; w[29] = 0.014134510743040;
+      r[30] = -0.966727439987660; s[30] =  0.829810165174004; w[30] = 0.014134510743040;
+      r[31] =  0.829810165174004; s[31] = -0.966727439987660; w[31] = 0.014134510743040;
+      r[32] = -0.966727439987660; s[32] = -0.863082725186344; w[32] = 0.014134510743040;
+      r[33] = -0.863082725186344; s[33] = -0.966727439987660; w[33] = 0.014134510743040;
+      r[34] = -0.650110471151428; s[34] =  0.511910525190604; w[34] = 0.025255543672496;
+      r[35] =  0.511910525190604; s[35] = -0.650110471151428; w[35] = 0.025255543672496;
+      r[36] = -0.861800054039176; s[36] =  0.511910525190604; w[36] = 0.025255543672496;
+      r[37] =  0.511910525190604; s[37] = -0.861800054039176; w[37] = 0.025255543672496;
+      r[38] = -0.861800054039176; s[38] = -0.650110471151428; w[38] = 0.025255543672496;
+      r[39] = -0.650110471151428; s[39] = -0.861800054039176; w[39] = 0.025255543672496;
+      r[40] = -0.282624366842035; s[40] =  0.131065359625217; w[40] = 0.038432852520849;
+      r[41] =  0.131065359625217; s[41] = -0.282624366842035; w[41] = 0.038432852520849;
+      r[42] = -0.848440992783182; s[42] =  0.131065359625217; w[42] = 0.038432852520849;
+      r[43] =  0.131065359625217; s[43] = -0.848440992783182; w[43] = 0.038432852520849;
+      r[44] = -0.848440992783182; s[44] = -0.282624366842035; w[44] = 0.038432852520849;
+      r[45] = -0.282624366842035; s[45] = -0.848440992783182; w[45] = 0.038432852520849;
+      r[46] = -0.500121711290305; s[46] =  0.333566061453817; w[46] = 0.032993291211606;
+      r[47] =  0.333566061453817; s[47] = -0.500121711290305; w[47] = 0.032993291211606;
+      r[48] = -0.833444350163512; s[48] =  0.333566061453817; w[48] = 0.032993291211606;
+      r[49] =  0.333566061453817; s[49] = -0.833444350163512; w[49] = 0.032993291211606;
+      r[50] = -0.833444350163512; s[50] = -0.500121711290305; w[50] = 0.032993291211606;
+      r[51] = -0.500121711290305; s[51] = -0.833444350163512; w[51] = 0.032993291211606;
+      r[52] = -0.353308953197778; s[52] = -0.027538833736648; w[52] = 0.081415677215044;
+      r[53] = -0.027538833736648; s[53] = -0.353308953197778; w[53] = 0.081415677215044;
+      r[54] = -0.619152213065573; s[54] = -0.027538833736648; w[54] = 0.081415677215044;
+      r[55] = -0.027538833736648; s[55] = -0.619152213065573; w[55] = 0.081415677215044;
+      r[56] = -0.619152213065573; s[56] = -0.353308953197778; w[56] = 0.081415677215044;
+      r[57] = -0.353308953197778; s[57] = -0.619152213065573; w[57] = 0.081415677215044;
+
+      break;
+    }
+    case 17: {
+      r[0]  = -0.013565183960096; s[0]  = -0.013565183960096; w[0]  = 0.022448424077156;
+      r[1]  = -0.972869632079808; s[1]  = -0.013565183960096; w[1]  = 0.022448424077156;
+      r[2]  = -0.013565183960096; s[2]  = -0.972869632079808; w[2]  = 0.022448424077156;
+      r[3]  = -0.918012666387151; s[3]  = -0.918012666387151; w[3]  = 0.011377816766740;
+      r[4]  =  0.836025332774302; s[4]  = -0.918012666387151; w[4]  = 0.011377816766740;
+      r[5]  = -0.918012666387151; s[5]  =  0.836025332774302; w[5]  = 0.011377816766740;
+      r[6]  = -0.469265478050798; s[6]  = -0.469265478050798; w[6]  = 0.056148078797670;
+      r[7]  = -0.061469043898404; s[7]  = -0.469265478050798; w[7]  = 0.056148078797670;
+      r[8]  = -0.469265478050798; s[8]  = -0.061469043898404; w[8]  = 0.056148078797670;
+      r[9]  = -0.278161974512876; s[9]  = -0.278161974512876; w[9]  = 0.031804753050686;
+      r[10] = -0.443676050974249; s[10] = -0.278161974512876; w[10] = 0.031804753050686;
+      r[11] = -0.278161974512876; s[11] = -0.443676050974249; w[11] = 0.031804753050686;
+      r[12] = -0.743831619059579; s[12] = -0.743831619059579; w[12] = 0.042944604159838;
+      r[13] =  0.487663238119159; s[13] = -0.743831619059579; w[13] = 0.042944604159838;
+      r[14] = -0.743831619059579; s[14] =  0.487663238119159; w[14] = 0.042944604159838;
+      r[15] = -0.975086972700342; s[15] = -0.975086972700342; w[15] = 0.004138336267131;
+      r[16] =  0.950173945400684; s[16] = -0.975086972700342; w[16] = 0.004138336267131;
+      r[17] = -0.975086972700342; s[17] =  0.950173945400684; w[17] = 0.004138336267131;
+      r[18] = -0.331485915788080; s[18] =  0.305875449252880; w[18] = 0.020094111670483;
+      r[19] =  0.305875449252880; s[19] = -0.331485915788080; w[19] = 0.020094111670483;
+      r[20] = -0.974389533464800; s[20] =  0.305875449252880; w[20] = 0.020094111670483;
+      r[21] =  0.305875449252880; s[21] = -0.974389533464800; w[21] = 0.020094111670483;
+      r[22] = -0.974389533464800; s[22] = -0.331485915788080; w[22] = 0.020094111670483;
+      r[23] = -0.331485915788080; s[23] = -0.974389533464800; w[23] = 0.020094111670483;
+      r[24] = -0.617368143234940; s[24] =  0.598534426856625; w[24] = 0.013023443943004;
+      r[25] =  0.598534426856625; s[25] = -0.617368143234940; w[25] = 0.013023443943004;
+      r[26] = -0.981166283621686; s[26] =  0.598534426856625; w[26] = 0.013023443943004;
+      r[27] =  0.598534426856625; s[27] = -0.981166283621686; w[27] = 0.013023443943004;
+      r[28] = -0.981166283621686; s[28] = -0.617368143234940; w[28] = 0.013023443943004;
+      r[29] = -0.617368143234940; s[29] = -0.981166283621686; w[29] = 0.013023443943004;
+      r[30] = -0.846737941679184; s[30] =  0.837351785097968; w[30] = 0.005856954369545;
+      r[31] =  0.837351785097968; s[31] = -0.846737941679184; w[31] = 0.005856954369545;
+      r[32] = -0.990613843418784; s[32] =  0.837351785097968; w[32] = 0.005856954369545;
+      r[33] =  0.837351785097968; s[33] = -0.990613843418784; w[33] = 0.005856954369545;
+      r[34] = -0.990613843418784; s[34] = -0.846737941679184; w[34] = 0.005856954369545;
+      r[35] = -0.846737941679184; s[35] = -0.990613843418784; w[35] = 0.005856954369545;
+      r[36] = -0.530582382227094; s[36] =  0.412831673770520; w[36] = 0.037746172643499;
+      r[37] =  0.412831673770520; s[37] = -0.530582382227094; w[37] = 0.037746172643499;
+      r[38] = -0.882249291543426; s[38] =  0.412831673770520; w[38] = 0.037746172643499;
+      r[39] =  0.412831673770520; s[39] = -0.882249291543426; w[39] = 0.037746172643499;
+      r[40] = -0.882249291543426; s[40] = -0.530582382227094; w[40] = 0.037746172643499;
+      r[41] = -0.530582382227094; s[41] = -0.882249291543426; w[41] = 0.037746172643499;
+      r[42] = -0.230167008731505; s[42] =  0.092655855430620; w[42] = 0.048362752988591;
+      r[43] =  0.092655855430620; s[43] = -0.230167008731505; w[43] = 0.048362752988591;
+      r[44] = -0.862488846699115; s[44] =  0.092655855430620; w[44] = 0.048362752988591;
+      r[45] =  0.092655855430620; s[45] = -0.862488846699115; w[45] = 0.048362752988591;
+      r[46] = -0.862488846699115; s[46] = -0.230167008731505; w[46] = 0.048362752988591;
+      r[47] = -0.230167008731505; s[47] = -0.862488846699115; w[47] = 0.048362752988591;
+      r[48] = -0.769841956364772; s[48] =  0.681416462088999; w[48] = 0.023467126169388;
+      r[49] =  0.681416462088999; s[49] = -0.769841956364772; w[49] = 0.023467126169388;
+      r[50] = -0.911574505724228; s[50] =  0.681416462088999; w[50] = 0.023467126169388;
+      r[51] =  0.681416462088999; s[51] = -0.911574505724228; w[51] = 0.023467126169388;
+      r[52] = -0.911574505724228; s[52] = -0.769841956364772; w[52] = 0.023467126169388;
+      r[53] = -0.769841956364772; s[53] = -0.911574505724228; w[53] = 0.023467126169388;
+      r[54] = -0.502901760016855; s[54] =  0.206946937904245; w[54] = 0.054703428836887;
+      r[55] =  0.206946937904245; s[55] = -0.502901760016855; w[55] = 0.054703428836887;
+      r[56] = -0.704045177887389; s[56] =  0.206946937904245; w[56] = 0.054703428836887;
+      r[57] =  0.206946937904245; s[57] = -0.704045177887389; w[57] = 0.054703428836887;
+      r[58] = -0.704045177887389; s[58] = -0.502901760016855; w[58] = 0.054703428836887;
+      r[59] = -0.502901760016855; s[59] = -0.704045177887389; w[59] = 0.054703428836887;
+      r[60] = -0.258115377755090; s[60] = -0.067105414124881; w[60] = 0.045648336152327;
+      r[61] = -0.067105414124881; s[61] = -0.258115377755090; w[61] = 0.045648336152327;
+      r[62] = -0.674779208120030; s[62] = -0.067105414124880; w[62] = 0.045648336152327;
+      r[63] = -0.067105414124880; s[63] = -0.674779208120030; w[63] = 0.045648336152327;
+      r[64] = -0.674779208120030; s[64] = -0.258115377755090; w[64] = 0.045648336152327;
+      r[65] = -0.258115377755090; s[65] = -0.674779208120030; w[65] = 0.045648336152327;
+
+      break;
+    }
+    case 18: {
+      r[0]  = -0.333333333333333; s[0]  = -0.333333333333333; w[0]  = 0.044365924378076;
+      r[1]  = -0.012131216528029; s[1]  = -0.012131216528029; w[1]  = 0.019118866558615;
+      r[2]  = -0.975737566943942; s[2]  = -0.012131216528029; w[2]  = 0.019118866558615;
+      r[3]  = -0.012131216528029; s[3]  = -0.975737566943942; w[3]  = 0.019118866558615;
+      r[4]  = -0.230136518749796; s[4]  = -0.230136518749796; w[4]  = 0.049294282264207;
+      r[5]  = -0.539726962500408; s[5]  = -0.230136518749796; w[5]  = 0.049294282264207;
+      r[6]  = -0.230136518749796; s[6]  = -0.539726962500408; w[6]  = 0.049294282264207;
+      r[7]  = -0.499402807850562; s[7]  = -0.499402807850562; w[7]  = 0.060654125981259;
+      r[8]  = -0.001194384298875; s[8]  = -0.499402807850563; w[8]  = 0.060654125981259;
+      r[9]  = -0.499402807850563; s[9]  = -0.001194384298875; w[9]  = 0.060654125981259;
+      r[10] = -0.710045241598598; s[10] = -0.710045241598598; w[10] = 0.031366231844497;
+      r[11] =  0.420090483197196; s[11] = -0.710045241598598; w[11] = 0.031366231844497;
+      r[12] = -0.710045241598598; s[12] =  0.420090483197196; w[12] = 0.031366231844497;
+      r[13] = -0.903019171569391; s[13] = -0.903019171569391; w[13] = 0.016173035699059;
+      r[14] =  0.806038343138783; s[14] = -0.903019171569391; w[14] = 0.016173035699059;
+      r[15] = -0.903019171569391; s[15] =  0.806038343138783; w[15] = 0.016173035699059;
+      r[16] = -0.972866921676664; s[16] = -0.972866921676664; w[16] = 0.004750076743416;
+      r[17] =  0.945733843353328; s[17] = -0.972866921676664; w[17] = 0.004750076743416;
+      r[18] = -0.972866921676664; s[18] =  0.945733843353328; w[18] = 0.004750076743416;
+      r[19] = -0.859848143426920; s[19] =  0.852682278520227; w[19] = 0.004329998364046;
+      r[20] =  0.852682278520227; s[20] = -0.859848143426920; w[20] = 0.004329998364046;
+      r[21] = -0.992834135093306; s[21] =  0.852682278520227; w[21] = 0.004329998364046;
+      r[22] =  0.852682278520227; s[22] = -0.992834135093306; w[22] = 0.004329998364046;
+      r[23] = -0.992834135093306; s[23] = -0.859848143426920; w[23] = 0.004329998364046;
+      r[24] = -0.859848143426920; s[24] = -0.992834135093306; w[24] = 0.004329998364046;
+      r[25] = -0.592208428296456; s[25] =  0.573110619333459; w[25] = 0.012300136592151;
+      r[26] =  0.573110619333459; s[26] = -0.592208428296456; w[26] = 0.012300136592151;
+      r[27] = -0.980902191037003; s[27] =  0.573110619333459; w[27] = 0.012300136592151;
+      r[28] =  0.573110619333459; s[28] = -0.980902191037003; w[28] = 0.012300136592151;
+      r[29] = -0.980902191037003; s[29] = -0.592208428296456; w[29] = 0.012300136592151;
+      r[30] = -0.592208428296456; s[30] = -0.980902191037003; w[30] = 0.012300136592151;
+      r[31] = -0.316660705097116; s[31] =  0.294011442575493; w[31] = 0.017146550496094;
+      r[32] =  0.294011442575493; s[32] = -0.316660705097116; w[32] = 0.017146550496094;
+      r[33] = -0.977350737478378; s[33] =  0.294011442575493; w[33] = 0.017146550496094;
+      r[34] =  0.294011442575493; s[34] = -0.977350737478378; w[34] = 0.017146550496094;
+      r[35] = -0.977350737478378; s[35] = -0.316660705097116; w[35] = 0.017146550496094;
+      r[36] = -0.316660705097116; s[36] = -0.977350737478378; w[36] = 0.017146550496094;
+      r[37] = -0.762708275393600; s[37] =  0.720805143081058; w[37] = 0.010992784367686;
+      r[38] =  0.720805143081058; s[38] = -0.762708275393600; w[38] = 0.010992784367686;
+      r[39] = -0.958096867687458; s[39] =  0.720805143081058; w[39] = 0.010992784367686;
+      r[40] =  0.720805143081058; s[40] = -0.958096867687458; w[40] = 0.010992784367686;
+      r[41] = -0.958096867687458; s[41] = -0.762708275393600; w[41] = 0.010992784367686;
+      r[42] = -0.762708275393600; s[42] = -0.958096867687458; w[42] = 0.010992784367686;
+      r[43] = -0.499464753852078; s[43] =  0.389673957377540; w[43] = 0.033988423627451;
+      r[44] =  0.389673957377540; s[44] = -0.499464753852078; w[44] = 0.033988423627451;
+      r[45] = -0.890209203525462; s[45] =  0.389673957377540; w[45] = 0.033988423627451;
+      r[46] =  0.389673957377540; s[46] = -0.890209203525462; w[46] = 0.033988423627451;
+      r[47] = -0.890209203525462; s[47] = -0.499464753852078; w[47] = 0.033988423627451;
+      r[48] = -0.499464753852078; s[48] = -0.890209203525462; w[48] = 0.033988423627451;
+      r[49] = -0.730193961187213; s[49] =  0.595225312221749; w[49] = 0.025768775250048;
+      r[50] =  0.595225312221749; s[50] = -0.730193961187213; w[50] = 0.025768775250048;
+      r[51] = -0.865031351034536; s[51] =  0.595225312221749; w[51] = 0.025768775250048;
+      r[52] =  0.595225312221749; s[52] = -0.865031351034536; w[52] = 0.025768775250048;
+      r[53] = -0.865031351034535; s[53] = -0.730193961187213; w[53] = 0.025768775250048;
+      r[54] = -0.730193961187213; s[54] = -0.865031351034535; w[54] = 0.025768775250048;
+      r[55] = -0.213662181077459; s[55] =  0.092159471784540; w[55] = 0.040023698716305;
+      r[56] =  0.092159471784540; s[56] = -0.213662181077459; w[56] = 0.040023698716305;
+      r[57] = -0.878497290707081; s[57] =  0.092159471784540; w[57] = 0.040023698716305;
+      r[58] =  0.092159471784540; s[58] = -0.878497290707081; w[58] = 0.040023698716305;
+      r[59] = -0.878497290707081; s[59] = -0.213662181077459; w[59] = 0.040023698716305;
+      r[60] = -0.213662181077459; s[60] = -0.878497290707081; w[60] = 0.040023698716305;
+      r[61] = -0.268906542375276; s[61] = -0.010964677486621; w[61] = 0.045277248097616;
+      r[62] = -0.010964677486621; s[62] = -0.268906542375276; w[62] = 0.045277248097616;
+      r[63] = -0.720128780138103; s[63] = -0.010964677486621; w[63] = 0.045277248097616;
+      r[64] = -0.010964677486621; s[64] = -0.720128780138103; w[64] = 0.045277248097616;
+      r[65] = -0.720128780138103; s[65] = -0.268906542375276; w[65] = 0.045277248097616;
+      r[66] = -0.268906542375276; s[66] = -0.720128780138103; w[66] = 0.045277248097616;
+      r[67] = -0.507963230765286; s[67] =  0.233062121320884; w[67] = 0.045433087546729;
+      r[68] =  0.233062121320884; s[68] = -0.507963230765286; w[68] = 0.045433087546729;
+      r[69] = -0.725098890555598; s[69] =  0.233062121320884; w[69] = 0.045433087546729;
+      r[70] =  0.233062121320884; s[70] = -0.725098890555598; w[70] = 0.045433087546729;
+      r[71] = -0.725098890555598; s[71] = -0.507963230765286; w[71] = 0.045433087546729;
+      r[72] = -0.507963230765286; s[72] = -0.725098890555598; w[72] = 0.045433087546729;
+
+      break;
+    }
+    case 19: {
+      r[0]  = -0.333333333333333; s[0]  = -0.333333333333333; w[0]  = 0.041424760048010;
+      r[1]  = -0.121193890022463; s[1]  = -0.121193890022463; w[1]  = 0.031784855337689;
+      r[2]  = -0.757612219955075; s[2]  = -0.121193890022463; w[2]  = 0.031784855337689;
+      r[3]  = -0.121193890022463; s[3]  = -0.757612219955075; w[3]  = 0.031784855337689;
+      r[4]  = -0.227921589064499; s[4]  = -0.227921589064499; w[4]  = 0.048406599909930;
+      r[5]  = -0.544156821871001; s[5]  = -0.227921589064499; w[5]  = 0.048406599909930;
+      r[6]  = -0.227921589064499; s[6]  = -0.544156821871001; w[6]  = 0.048406599909930;
+      r[7]  = -0.480832787187258; s[7]  = -0.480832787187258; w[7]  = 0.048177661858475;
+      r[8]  = -0.038334425625484; s[8]  = -0.480832787187258; w[8]  = 0.048177661858475;
+      r[9]  = -0.480832787187258; s[9]  = -0.038334425625484; w[9]  = 0.048177661858475;
+      r[10] = -0.607587000462791; s[10] = -0.607587000462791; w[10] = 0.042691162490028;
+      r[11] =  0.215174000925582; s[11] = -0.607587000462791; w[11] = 0.042691162490028;
+      r[12] = -0.607587000462791; s[12] =  0.215174000925582; w[12] = 0.042691162490028;
+      r[13] = -0.728032884013154; s[13] = -0.728032884013154; w[13] = 0.031889013978028;
+      r[14] =  0.456065768026307; s[14] = -0.728032884013154; w[14] = 0.031889013978028;
+      r[15] = -0.728032884013154; s[15] =  0.456065768026307; w[15] = 0.031889013978028;
+      r[16] = -0.884999963315497; s[16] = -0.884999963315497; w[16] = 0.015529272923518;
+      r[17] =  0.769999926630994; s[17] = -0.884999963315497; w[17] = 0.015529272923518;
+      r[18] = -0.884999963315497; s[18] =  0.769999926630994; w[18] = 0.015529272923518;
+      r[19] = -0.973927705240279; s[19] = -0.973927705240279; w[19] = 0.004442852871415;
+      r[20] =  0.947855410480559; s[20] = -0.973927705240279; w[20] = 0.004442852871415;
+      r[21] = -0.973927705240279; s[21] =  0.947855410480559; w[21] = 0.004442852871415;
+      r[22] = -0.419340397282846; s[22] =  0.418549313572482; w[22] = 0.004599409024561;
+      r[23] =  0.418549313572482; s[23] = -0.419340397282846; w[23] = 0.004599409024561;
+      r[24] = -0.999208916289636; s[24] =  0.418549313572482; w[24] = 0.004599409024561;
+      r[25] =  0.418549313572482; s[25] = -0.999208916289636; w[25] = 0.004599409024561;
+      r[26] = -0.999208916289636; s[26] = -0.419340397282846; w[26] = 0.004599409024561;
+      r[27] = -0.419340397282846; s[27] = -0.999208916289636; w[27] = 0.004599409024561;
+      r[28] = -0.154285565801825; s[28] =  0.131285016869205; w[28] = 0.016608327001253;
+      r[29] =  0.131285016869205; s[29] = -0.154285565801825; w[29] = 0.016608327001253;
+      r[30] = -0.976999451067380; s[30] =  0.131285016869205; w[30] = 0.016608327001253;
+      r[31] =  0.131285016869205; s[31] = -0.976999451067380; w[31] = 0.016608327001253;
+      r[32] = -0.976999451067380; s[32] = -0.154285565801825; w[32] = 0.016608327001253;
+      r[33] = -0.154285565801825; s[33] = -0.976999451067380; w[33] = 0.016608327001253;
+      r[34] = -0.864328042937615; s[34] =  0.842262778125134; w[34] = 0.008508350664254;
+      r[35] =  0.842262778125134; s[35] = -0.864328042937615; w[35] = 0.008508350664254;
+      r[36] = -0.977934735187519; s[36] =  0.842262778125134; w[36] = 0.008508350664254;
+      r[37] =  0.842262778125134; s[37] = -0.977934735187519; w[37] = 0.008508350664254;
+      r[38] = -0.977934735187519; s[38] = -0.864328042937615; w[38] = 0.008508350664254;
+      r[39] = -0.864328042937615; s[39] = -0.977934735187519; w[39] = 0.008508350664254;
+      r[40] = -0.676980679779850; s[40] =  0.654351228666662; w[40] = 0.012752760516072;
+      r[41] =  0.654351228666662; s[41] = -0.676980679779850; w[41] = 0.012752760516072;
+      r[42] = -0.977370548886812; s[42] =  0.654351228666662; w[42] = 0.012752760516072;
+      r[43] =  0.654351228666662; s[43] = -0.977370548886812; w[43] = 0.012752760516072;
+      r[44] = -0.977370548886812; s[44] = -0.676980679779850; w[44] = 0.012752760516072;
+      r[45] = -0.676980679779850; s[45] = -0.977370548886812; w[45] = 0.012752760516072;
+      r[46] = -0.451038034994882; s[46] =  0.391933493150074; w[46] = 0.024864731137205;
+      r[47] =  0.391933493150074; s[47] = -0.451038034994882; w[47] = 0.024864731137205;
+      r[48] = -0.940895458155192; s[48] =  0.391933493150074; w[48] = 0.024864731137205;
+      r[49] =  0.391933493150074; s[49] = -0.940895458155192; w[49] = 0.024864731137205;
+      r[50] = -0.940895458155192; s[50] = -0.451038034994882; w[50] = 0.024864731137205;
+      r[51] = -0.451038034994882; s[51] = -0.940895458155192; w[51] = 0.024864731137205;
+      r[52] = -0.755079003035426; s[52] =  0.643775758022122; w[52] = 0.012779469878381;
+      r[53] =  0.643775758022122; s[53] = -0.755079003035426; w[53] = 0.012779469878381;
+      r[54] = -0.888696754986697; s[54] =  0.643775758022122; w[54] = 0.012779469878381;
+      r[55] =  0.643775758022122; s[55] = -0.888696754986697; w[55] = 0.012779469878381;
+      r[56] = -0.888696754986697; s[56] = -0.755079003035426; w[56] = 0.012779469878381;
+      r[57] = -0.755079003035426; s[57] = -0.888696754986697; w[57] = 0.012779469878381;
+      r[58] = -0.668500025831376; s[58] =  0.544622467980326; w[58] = 0.017801502950615;
+      r[59] =  0.544622467980326; s[59] = -0.668500025831376; w[59] = 0.017801502950615;
+      r[60] = -0.876122442148950; s[60] =  0.544622467980326; w[60] = 0.017801502950615;
+      r[61] =  0.544622467980326; s[61] = -0.876122442148950; w[61] = 0.017801502950615;
+      r[62] = -0.876122442148950; s[62] = -0.668500025831376; w[62] = 0.017801502950615;
+      r[63] = -0.668500025831376; s[63] = -0.876122442148950; w[63] = 0.017801502950615;
+      r[64] = -0.205954158284095; s[64] =  0.090524206162520; w[64] = 0.035738233266717;
+      r[65] =  0.090524206162520; s[65] = -0.205954158284095; w[65] = 0.035738233266717;
+      r[66] = -0.884570047878425; s[66] =  0.090524206162520; w[66] = 0.035738233266717;
+      r[67] =  0.090524206162520; s[67] = -0.884570047878425; w[67] = 0.035738233266717;
+      r[68] = -0.884570047878425; s[68] = -0.205954158284095; w[68] = 0.035738233266717;
+      r[69] = -0.205954158284095; s[69] = -0.884570047878425; w[69] = 0.035738233266717;
+      r[70] = -0.488476686471250; s[70] =  0.295757669634562; w[70] = 0.038344199404453;
+      r[71] =  0.295757669634562; s[71] = -0.488476686471250; w[71] = 0.038344199404453;
+      r[72] = -0.807280983163311; s[72] =  0.295757669634562; w[72] = 0.038344199404453;
+      r[73] =  0.295757669634562; s[73] = -0.807280983163311; w[73] = 0.038344199404453;
+      r[74] = -0.807280983163311; s[74] = -0.488476686471250; w[74] = 0.038344199404453;
+      r[75] = -0.488476686471250; s[75] = -0.807280983163311; w[75] = 0.038344199404453;
+      r[76] = -0.342507806805715; s[76] =  0.042214391480752; w[76] = 0.042971513130613;
+      r[77] =  0.042214391480752; s[77] = -0.342507806805715; w[77] = 0.042971513130613;
+      r[78] = -0.699706584675037; s[78] =  0.042214391480751; w[78] = 0.042971513130613;
+      r[79] =  0.042214391480751; s[79] = -0.699706584675037; w[79] = 0.042971513130613;
+      r[80] = -0.699706584675037; s[80] = -0.342507806805715; w[80] = 0.042971513130613;
+      r[81] = -0.342507806805715; s[81] = -0.699706584675037; w[81] = 0.042971513130613;
+
+      break;
+    }
+    case 20: {
+      r[0]  = -0.333333333333333; s[0]  = -0.333333333333333; w[0]  = 0.055220853995399;
+      r[1]  = -0.001500649324429; s[1]  = -0.001500649324429; w[1]  = 0.003558059094653;
+      r[2]  = -0.996998701351142; s[2]  = -0.001500649324429; w[2]  = 0.003558059094653;
+      r[3]  = -0.001500649324429; s[3]  = -0.996998701351142; w[3]  = 0.003558059094653;
+      r[4]  = -0.094139751938951; s[4]  = -0.094139751938951; w[4]  = 0.040224796227922;
+      r[5]  = -0.811720496122098; s[5]  = -0.094139751938951; w[5]  = 0.040224796227922;
+      r[6]  = -0.094139751938951; s[6]  = -0.811720496122098; w[6]  = 0.040224796227922;
+      r[7]  = -0.204472124089526; s[7]  = -0.204472124089526; w[7]  = 0.053635694518663;
+      r[8]  = -0.591055751820947; s[8]  = -0.204472124089526; w[8]  = 0.053635694518663;
+      r[9]  = -0.204472124089526; s[9]  = -0.591055751820947; w[9]  = 0.053635694518663;
+      r[10] = -0.470999594934425; s[10] = -0.470999594934425; w[10] = 0.049046267603004;
+      r[11] = -0.058000810131149; s[11] = -0.470999594934425; w[11] = 0.049046267603004;
+      r[12] = -0.470999594934425; s[12] = -0.058000810131149; w[12] = 0.049046267603004;
+      r[13] = -0.577962071815846; s[13] = -0.577962071815846; w[13] = 0.032789156821391;
+      r[14] =  0.155924143631693; s[14] = -0.577962071815846; w[14] = 0.032789156821391;
+      r[15] = -0.577962071815846; s[15] =  0.155924143631693; w[15] = 0.032789156821391;
+      r[16] = -0.784528785657457; s[16] = -0.784528785657457; w[16] = 0.029591814797299;
+      r[17] =  0.569057571314915; s[17] = -0.784528785657457; w[17] = 0.029591814797299;
+      r[18] = -0.784528785657457; s[18] =  0.569057571314915; w[18] = 0.029591814797299;
+      r[19] = -0.921861824324395; s[19] = -0.921861824324395; w[19] = 0.009158564555409;
+      r[20] =  0.843723648648789; s[20] = -0.921861824324395; w[20] = 0.009158564555409;
+      r[21] = -0.921861824324395; s[21] =  0.843723648648789; w[21] = 0.009158564555409;
+      r[22] = -0.977651240541341; s[22] = -0.977651240541341; w[22] = 0.003303653031152;
+      r[23] =  0.955302481082681; s[23] = -0.977651240541341; w[23] = 0.003303653031152;
+      r[24] = -0.977651240541341; s[24] =  0.955302481082681; w[24] = 0.003303653031152;
+      r[25] = -0.872900668183296; s[25] =  0.862201431808621; w[25] = 0.004698341817151;
+      r[26] =  0.862201431808621; s[26] = -0.872900668183296; w[26] = 0.004698341817151;
+      r[27] = -0.989300763625325; s[27] =  0.862201431808621; w[27] = 0.004698341817151;
+      r[28] =  0.862201431808621; s[28] = -0.989300763625325; w[28] = 0.004698341817151;
+      r[29] = -0.989300763625325; s[29] = -0.872900668183295; w[29] = 0.004698341817151;
+      r[30] = -0.872900668183295; s[30] = -0.989300763625325; w[30] = 0.004698341817151;
+      r[31] = -0.685786162118586; s[31] =  0.669876527986188; w[31] = 0.008931851508364;
+      r[32] =  0.669876527986188; s[32] = -0.685786162118586; w[32] = 0.008931851508364;
+      r[33] = -0.984090365867602; s[33] =  0.669876527986188; w[33] = 0.008931851508364;
+      r[34] =  0.669876527986188; s[34] = -0.984090365867602; w[34] = 0.008931851508364;
+      r[35] = -0.984090365867602; s[35] = -0.685786162118586; w[35] = 0.008931851508364;
+      r[36] = -0.685786162118586; s[36] = -0.984090365867602; w[36] = 0.008931851508364;
+      r[37] = -0.208715771271252; s[37] =  0.187870974708724; w[37] = 0.012199133615816;
+      r[38] =  0.187870974708724; s[38] = -0.208715771271252; w[38] = 0.012199133615816;
+      r[39] = -0.979155203437472; s[39] =  0.187870974708724; w[39] = 0.012199133615816;
+      r[40] =  0.187870974708724; s[40] = -0.979155203437472; w[40] = 0.012199133615816;
+      r[41] = -0.979155203437472; s[41] = -0.208715771271252; w[41] = 0.012199133615816;
+      r[42] = -0.208715771271252; s[42] = -0.979155203437472; w[42] = 0.012199133615816;
+      r[43] = -0.453664858574179; s[43] =  0.431736028981932; w[43] = 0.013782162654376;
+      r[44] =  0.431736028981932; s[44] = -0.453664858574179; w[44] = 0.013782162654376;
+      r[45] = -0.978071170407753; s[45] =  0.431736028981932; w[45] = 0.013782162654376;
+      r[46] =  0.431736028981932; s[46] = -0.978071170407753; w[46] = 0.013782162654376;
+      r[47] = -0.978071170407753; s[47] = -0.453664858574179; w[47] = 0.013782162654376;
+      r[48] = -0.453664858574179; s[48] = -0.978071170407753; w[48] = 0.013782162654376;
+      r[49] = -0.796429235029966; s[49] =  0.719295810859041; w[49] = 0.015994950144956;
+      r[50] =  0.719295810859041; s[50] = -0.796429235029966; w[50] = 0.015994950144956;
+      r[51] = -0.922866575829075; s[51] =  0.719295810859041; w[51] = 0.015994950144956;
+      r[52] =  0.719295810859041; s[52] = -0.922866575829075; w[52] = 0.015994950144956;
+      r[53] = -0.922866575829075; s[53] = -0.796429235029966; w[53] = 0.015994950144956;
+      r[54] = -0.796429235029966; s[54] = -0.922866575829075; w[54] = 0.015994950144956;
+      r[55] = -0.106682901647172; s[55] =  0.035521886012736; w[55] = 0.014772268570672;
+      r[56] =  0.035521886012736; s[56] = -0.106682901647172; w[56] = 0.014772268570672;
+      r[57] = -0.928838984365563; s[57] =  0.035521886012736; w[57] = 0.014772268570672;
+      r[58] =  0.035521886012736; s[58] = -0.928838984365563; w[58] = 0.014772268570672;
+      r[59] = -0.928838984365564; s[59] = -0.106682901647172; w[59] = 0.014772268570672;
+      r[60] = -0.106682901647172; s[60] = -0.928838984365564; w[60] = 0.014772268570672;
+      r[61] = -0.601978411700994; s[61] =  0.502636778975466; w[61] = 0.025598663757297;
+      r[62] =  0.502636778975466; s[62] = -0.601978411700994; w[62] = 0.025598663757297;
+      r[63] = -0.900658367274472; s[63] =  0.502636778975466; w[63] = 0.025598663757297;
+      r[64] =  0.502636778975466; s[64] = -0.900658367274472; w[64] = 0.025598663757297;
+      r[65] = -0.900658367274472; s[65] = -0.601978411700994; w[65] = 0.025598663757297;
+      r[66] = -0.601978411700994; s[66] = -0.900658367274472; w[66] = 0.025598663757297;
+      r[67] = -0.351477632615435; s[67] =  0.234438182446771; w[67] = 0.034516142351393;
+      r[68] =  0.234438182446771; s[68] = -0.351477632615435; w[68] = 0.034516142351393;
+      r[69] = -0.882960549831337; s[69] =  0.234438182446771; w[69] = 0.034516142351393;
+      r[70] =  0.234438182446771; s[70] = -0.882960549831337; w[70] = 0.034516142351393;
+      r[71] = -0.882960549831337; s[71] = -0.351477632615435; w[71] = 0.034516142351393;
+      r[72] = -0.351477632615435; s[72] = -0.882960549831337; w[72] = 0.034516142351393;
+      r[73] = -0.582937273579734; s[73] =  0.339941699570946; w[73] = 0.037345891805871;
+      r[74] =  0.339941699570946; s[74] = -0.582937273579734; w[74] = 0.037345891805871;
+      r[75] = -0.757004425991211; s[75] =  0.339941699570946; w[75] = 0.037345891805871;
+      r[76] =  0.339941699570946; s[76] = -0.757004425991211; w[76] = 0.037345891805871;
+      r[77] = -0.757004425991211; s[77] = -0.582937273579734; w[77] = 0.037345891805871;
+      r[78] = -0.582937273579734; s[78] = -0.757004425991211; w[78] = 0.037345891805871;
+      r[79] = -0.353658866927485; s[79] =  0.072237177039608; w[79] = 0.045636448116791;
+      r[80] =  0.072237177039608; s[80] = -0.353658866927485; w[80] = 0.045636448116791;
+      r[81] = -0.718578310112123; s[81] =  0.072237177039608; w[81] = 0.045636448116791;
+      r[82] =  0.072237177039608; s[82] = -0.718578310112123; w[82] = 0.045636448116791;
+      r[83] = -0.718578310112123; s[83] = -0.353658866927485; w[83] = 0.045636448116791;
+      r[84] = -0.353658866927485; s[84] = -0.718578310112123; w[84] = 0.045636448116791;
+
+      break;
+    }
+  }
+
+  for(int i = 0; i < nIntegrationPoint; ++i)
+  {
+        r[i] = 0.5 * (r[i] + 1.0);
+        s[i] = 0.5 * (s[i] + 1.0);
+        w[i] = 0.5 * (w[i]      );
+  }
+}
+
+void HighOrderStandardElementBase::IntegrationPointsTetrahedron(void)
+{
+  /*--- Set the number of integration points, depending on the order of
+        polynomials that must be integrated exactly. ---*/
+  switch(integrationOrder)
+  {
+    case  0: nIntegrationPoint =   1; break;
+    case  1: nIntegrationPoint =   1; break;
+    case  2: nIntegrationPoint =   4; break;
+    case  3: nIntegrationPoint =   8; break;
+    case  4: nIntegrationPoint =  14; break;
+    case  5: nIntegrationPoint =  14; break;
+    case  6: nIntegrationPoint =  24; break;
+    case  7: nIntegrationPoint =  35; break;
+    case  8: nIntegrationPoint =  46; break;
+    case  9: nIntegrationPoint =  59; break;
+    case 10: nIntegrationPoint =  81; break;
+    default:
+      //notation MPI
+        cout << "Error : HighOrderStandardElementBase has wrong integrationOrder " << endl;
+  }
+
+  /*--- Allocate the memory for the integration points and their weights. ---*/
+  xiIntegration.resize(nIntegrationPoint);
+  etIntegration.resize(nIntegrationPoint);
+  ztIntegration.resize(nIntegrationPoint);
+  wtIntegration.resize(nIntegrationPoint);
+
+  /*--- Set the pointers to the data arrays of the variables just allocated, such
+        that the names are shorter. This is useful for the code below. ---*/
+  RDouble *r = xiIntegration.data();
+  RDouble *s = etIntegration.data();
+  RDouble *t = ztIntegration.data();
+  RDouble *w = wtIntegration.data();
+
+  /*--- Set the data for the integration points, depending on the order.
+        These integration rules are obtained with the open source program
+        Polyquad, developed by Freddie Witherden.           ---*/
+  switch(integrationOrder)
+  {
+    case  0:
+    case  1: {
+      r[0] = -0.500000000000000; s[0] = -0.500000000000000; t[0] = -0.500000000000000; w[0] = 1.333333333333333;
+
+      break;
+    }
+    case  2: {
+      r[0] =-0.723606797749979; s[0] = -0.723606797749979; t[0] = 0.1708203932499369; w[0] = 0.3333333333333333;
+      r[1] =-0.723606797749979; s[1] = 0.1708203932499369; t[1] = -0.723606797749979; w[1] = 0.3333333333333333;
+      r[2] = 0.170820393249937; s[2] = -0.723606797749979; t[2] = -0.723606797749979; w[2] = 0.3333333333333333;
+      r[3] =-0.723606797749979; s[3] = -0.723606797749979; t[3] = -0.723606797749979; w[3] = 0.3333333333333333;
+
+      break;
+    }
+    case  3: {
+      r[0] =-0.7860119704589262; s[0] =-0.7860119704589262; t[0] = 0.3580359113767786; w[0] = 0.1487451997767295;
+      r[1] =-0.7860119704589262; s[1] = 0.3580359113767786; t[1] =-0.7860119704589262; w[1] = 0.1487451997767295;
+      r[2] = 0.3580359113767786; s[2] =-0.7860119704589262; t[2] =-0.7860119704589262; w[2] = 0.1487451997767295;
+      r[3] =-0.7860119704589262; s[3] =-0.7860119704589262; t[3] =-0.7860119704589262; w[3] = 0.1487451997767295;
+      r[4] =-0.3438828566749746; s[4] =-0.3438828566749746; t[4] =-0.9683514299750762; w[4] = 0.1845881335566038;
+      r[5] =-0.3438828566749746; s[5] =-0.9683514299750762; t[5] =-0.3438828566749746; w[5] = 0.1845881335566038;
+      r[6] =-0.9683514299750762; s[6] =-0.3438828566749746; t[6] =-0.3438828566749746; w[6] = 0.1845881335566038;
+      r[7] =-0.3438828566749746; s[7] =-0.3438828566749746; t[7] =-0.3438828566749746; w[7] = 0.1845881335566038;
+
+      break;
+    }
+    case  4:
+    case  5: {
+      r[0]   = -0.8145294993782175; s[0]  = -0.8145294993782175; t[0]  =  0.4435884981346525; w[0]  = 0.09799072415514934;
+      r[1]   = -0.8145294993782175; s[1]  =  0.4435884981346525; t[1]  = -0.8145294993782175; w[1]  = 0.09799072415514934;
+      r[2]   =  0.4435884981346525; s[2]  = -0.8145294993782175; t[2]  = -0.8145294993782175; w[2]  = 0.09799072415514934;
+      r[3]   = -0.8145294993782175; s[3]  = -0.8145294993782175; t[3]  = -0.8145294993782175; w[3]  = 0.09799072415514934;
+      r[4]   = -0.3782281614733985; s[4]  = -0.3782281614733985; t[4]  = -0.8653155155798045; w[4]  =  0.1502505676240211;
+      r[5]   = -0.3782281614733985; s[5]  = -0.8653155155798045; t[5]  = -0.3782281614733985; w[5]  =  0.1502505676240211;
+      r[6]   = -0.8653155155798045; s[6]  = -0.3782281614733985; t[6]  = -0.3782281614733985; w[6]  =  0.1502505676240211;
+      r[7]   = -0.3782281614733985; s[7]  = -0.3782281614733985; t[7]  = -0.3782281614733985; w[7]  =  0.1502505676240211;
+      r[8]   =  -0.908992591748701; s[8]  =-0.09100740825129899; t[8]  =-0.09100740825129899; w[8]  =  0.0567280277027752;
+      r[9]   =-0.09100740825129902; s[9]  =  -0.908992591748701; t[9]  =-0.09100740825129902; w[9]  =  0.0567280277027752;
+      r[10]  =  -0.908992591748701; s[10] =  -0.908992591748701; t[10] =-0.09100740825129905; w[10] =  0.0567280277027752;
+      r[11]  =  -0.908992591748701; s[11] =-0.09100740825129905; t[11] =  -0.908992591748701; w[11] =  0.0567280277027752;
+      r[12]  =-0.09100740825129899; s[12] =  -0.908992591748701; t[12] =  -0.908992591748701; w[12] =  0.0567280277027752;
+      r[13]  =-0.09100740825129902; s[13] =-0.09100740825129902; t[13] =  -0.908992591748701; w[13] =  0.0567280277027752;
+
+      break;
+    }
+    case  6: {
+      r[0]  =-0.5707942574816954; s[0]  =-0.5707942574816954; t[0]  =  -0.2876172275549138; w[0]  =  0.05323033367755636;
+      r[1]  =-0.5707942574816954; s[1]  =-0.2876172275549138; t[1]  =  -0.5707942574816954; w[1]  =  0.05323033367755636;
+      r[2]  =-0.2876172275549138; s[2]  =-0.5707942574816954; t[2]  =  -0.5707942574816954; w[2]  =  0.05323033367755636;
+      r[3]  =-0.5707942574816954; s[3]  =-0.5707942574816954; t[3]  =  -0.5707942574816954; w[3]  =  0.05323033367755636;
+      r[4]  =-0.3553242197154491; s[4]  =-0.3553242197154491; t[4]  =  -0.9340273408536528; w[4]  =  0.07380957539153983;
+      r[5]  =-0.3553242197154491; s[5]  =-0.9340273408536528; t[5]  =  -0.3553242197154491; w[5]  =  0.07380957539153983;
+      r[6]  =-0.9340273408536528; s[6]  =-0.3553242197154491; t[6]  =  -0.3553242197154491; w[6]  =  0.07380957539153983;
+      r[7]  =-0.3553242197154491; s[7]  =-0.3553242197154491; t[7]  =  -0.3553242197154491; w[7]  =  0.07380957539153983;
+      r[8]  =-0.9186520829307774; s[8]  =-0.9186520829307774; t[8]  =   0.7559562487923321; w[8]  =  0.01343628140709418;
+      r[9]  =-0.9186520829307774; s[9]  = 0.7559562487923321; t[9]  =  -0.9186520829307774; w[9]  =  0.01343628140709418;
+      r[10] = 0.7559562487923321; s[10] =-0.9186520829307774; t[10] =  -0.9186520829307774; w[10] =  0.01343628140709418;
+      r[11] =-0.9186520829307774; s[11] =-0.9186520829307774; t[11] =  -0.9186520829307774; w[11] =  0.01343628140709418;
+      r[12] = 0.2060113295832982; s[12] =-0.8726779962499649; t[12] =  -0.4606553370833684; w[12] =  0.06428571428571428;
+      r[13] = 0.2060113295832982; s[13] =-0.8726779962499649; t[13] =  -0.8726779962499649; w[13] =  0.06428571428571428;
+      r[14] =-0.8726779962499649; s[14] =-0.8726779962499649; t[14] =   0.2060113295832982; w[14] =  0.06428571428571428;
+      r[15] =-0.4606553370833684; s[15] = 0.2060113295832982; t[15] =  -0.8726779962499649; w[15] =  0.06428571428571428;
+      r[16] =-0.8726779962499649; s[16] =-0.4606553370833684; t[16] =   0.2060113295832982; w[16] =  0.06428571428571428;
+      r[17] =-0.8726779962499649; s[17] = 0.2060113295832982; t[17] =  -0.8726779962499649; w[17] =  0.06428571428571428;
+      r[18] =-0.4606553370833684; s[18] =-0.8726779962499649; t[18] =   0.2060113295832982; w[18] =  0.06428571428571428;
+      r[19] =-0.8726779962499649; s[19] =-0.4606553370833684; t[19] =  -0.8726779962499649; w[19] =  0.06428571428571428;
+      r[20] =-0.8726779962499649; s[20] =-0.8726779962499649; t[20] =  -0.4606553370833684; w[20] =  0.06428571428571428;
+      r[21] =-0.8726779962499649; s[21] = 0.2060113295832982; t[21] =  -0.4606553370833684; w[21] =  0.06428571428571428;
+      r[22] =-0.4606553370833684; s[22] =-0.8726779962499649; t[22] =  -0.8726779962499649; w[22] =  0.06428571428571428;
+      r[23] = 0.2060113295832982; s[23] =-0.4606553370833684; t[23] =  -0.8726779962499649; w[23] =  0.06428571428571428;
+
+      break;
+    }
+    case  7: {
+      r[0]  =               -0.5; s[0]  =               -0.5; t[0]  =               -0.5; w[0]  =  0.1273137192855079;
+      r[1]  =-0.3685977004435944; s[1]  =-0.3685977004435944; t[1]  =-0.8942068986692169; w[1]  = 0.05643944161328927;
+      r[2]  =-0.3685977004435944; s[2]  =-0.8942068986692169; t[2]  =-0.3685977004435944; w[2]  = 0.05643944161328927;
+      r[3]  =-0.8942068986692169; s[3]  =-0.3685977004435944; t[3]  =-0.3685977004435944; w[3]  = 0.05643944161328927;
+      r[4]  =-0.3685977004435944; s[4]  =-0.3685977004435944; t[4]  =-0.3685977004435944; w[4]  = 0.05643944161328927;
+      r[5]  =-0.1009796451967928; s[5]  =-0.8990203548032072; t[5]  =-0.8990203548032072; w[5]  = 0.04252923711047679;
+      r[6]  =-0.8990203548032072; s[6]  =-0.1009796451967928; t[6]  =-0.8990203548032072; w[6]  = 0.04252923711047679;
+      r[7]  =-0.1009796451967928; s[7]  =-0.1009796451967928; t[7]  =-0.8990203548032072; w[7]  = 0.04252923711047679;
+      r[8]  =-0.1009796451967928; s[8]  =-0.8990203548032072; t[8]  =-0.1009796451967928; w[8]  = 0.04252923711047679;
+      r[9]  =-0.8990203548032072; s[9]  =-0.1009796451967928; t[9]  =-0.1009796451967928; w[9]  = 0.04252923711047679;
+      r[10] =-0.8990203548032072; s[10] =-0.8990203548032072; t[10] =-0.1009796451967928; w[10] = 0.04252923711047679;
+      r[11] = 0.6216604821970968; s[11] =-0.9574690549170335; t[11] =-0.7067223723630298; w[11] = 0.01081436110653779;
+      r[12] = 0.6216604821970968; s[12] =-0.9574690549170335; t[12] =-0.9574690549170335; w[12] = 0.01081436110653779;
+      r[13] =-0.9574690549170335; s[13] =-0.9574690549170335; t[13] = 0.6216604821970968; w[13] = 0.01081436110653779;
+      r[14] =-0.7067223723630298; s[14] = 0.6216604821970968; t[14] =-0.9574690549170335; w[14] = 0.01081436110653779;
+      r[15] =-0.9574690549170335; s[15] =-0.7067223723630298; t[15] = 0.6216604821970968; w[15] = 0.01081436110653779;
+      r[16] =-0.9574690549170335; s[16] = 0.6216604821970968; t[16] =-0.9574690549170335; w[16] = 0.01081436110653779;
+      r[17] =-0.7067223723630298; s[17] =-0.9574690549170335; t[17] = 0.6216604821970968; w[17] = 0.01081436110653779;
+      r[18] =-0.9574690549170335; s[18] =-0.7067223723630298; t[18] =-0.9574690549170335; w[18] = 0.01081436110653779;
+      r[19] =-0.9574690549170335; s[19] =-0.9574690549170335; t[19] =-0.7067223723630298; w[19] = 0.01081436110653779;
+      r[20] =-0.9574690549170335; s[20] = 0.6216604821970968; t[20] =-0.7067223723630298; w[20] = 0.01081436110653779;
+      r[21] =-0.7067223723630298; s[21] =-0.9574690549170335; t[21] =-0.9574690549170335; w[21] = 0.01081436110653779;
+      r[22] = 0.6216604821970968; s[22] =-0.7067223723630298; t[22] =-0.9574690549170335; w[22] = 0.01081436110653779;
+      r[23] = 0.1503432751739998; s[23] =-0.6223323379479977; t[23] =-0.9056785992780041; w[23] = 0.04960950763777947;
+      r[24] = 0.1503432751739997; s[24] =-0.6223323379479978; t[24] =-0.6223323379479978; w[24] = 0.04960950763777947;
+      r[25] =-0.6223323379479977; s[25] =-0.6223323379479978; t[25] = 0.1503432751739997; w[25] = 0.04960950763777947;
+      r[26] =-0.9056785992780041; s[26] = 0.1503432751739997; t[26] =-0.6223323379479978; w[26] = 0.04960950763777947;
+      r[27] =-0.6223323379479978; s[27] =-0.9056785992780041; t[27] = 0.1503432751739997; w[27] = 0.04960950763777947;
+      r[28] =-0.6223323379479977; s[28] = 0.1503432751739997; t[28] =-0.6223323379479978; w[28] = 0.04960950763777947;
+      r[29] =-0.9056785992780041; s[29] =-0.6223323379479978; t[29] = 0.1503432751739997; w[29] = 0.04960950763777947;
+      r[30] =-0.6223323379479978; s[30] =-0.9056785992780041; t[30] =-0.6223323379479978; w[30] = 0.04960950763777947;
+      r[31] =-0.6223323379479978; s[31] =-0.6223323379479978; t[31] =-0.9056785992780041; w[31] = 0.04960950763777947;
+      r[32] =-0.6223323379479978; s[32] = 0.1503432751739997; t[32] =-0.9056785992780041; w[32] = 0.04960950763777947;
+      r[33] =-0.9056785992780041; s[33] =-0.6223323379479978; t[33] =-0.6223323379479978; w[33] = 0.04960950763777947;
+      r[34] = 0.1503432751739998; s[34] =-0.9056785992780041; t[34] =-0.6223323379479977; w[34] = 0.04960950763777947;
+
+      break;
+    }
+    case  8: {
+      r[0]  =-0.6320721895815339; s[0]  =-0.6320721895815339; t[0]  =-0.1037834312553985; w[0]  =  0.07440058157405982;
+      r[1]  =-0.6320721895815339; s[1]  =-0.1037834312553985; t[1]  =-0.6320721895815339; w[1]  =  0.07440058157405982;
+      r[2]  =-0.1037834312553985; s[2]  =-0.6320721895815339; t[2]  =-0.6320721895815339; w[2]  =  0.07440058157405982;
+      r[3]  =-0.6320721895815339; s[3]  =-0.6320721895815339; t[3]  =-0.6320721895815339; w[3]  =  0.07440058157405982;
+      r[4]  = -0.923300199653955; s[4]  = -0.923300199653955; t[4]  = 0.7699005989618649; w[4]  = 0.007857765854252971;
+      r[5]  = -0.923300199653955; s[5]  = 0.7699005989618649; t[5]  = -0.923300199653955; w[5]  = 0.007857765854252971;
+      r[6]  =  0.769900598961865; s[6]  = -0.923300199653955; t[6]  = -0.923300199653955; w[6]  = 0.007857765854252971;
+      r[7]  = -0.923300199653955; s[7]  = -0.923300199653955; t[7]  = -0.923300199653955; w[7]  = 0.007857765854252971;
+      r[8]  =-0.8009956129757766; s[8]  =-0.8009956129757766; t[8]  = 0.4029868389273299; w[8]  =  0.03149884873824373;
+      r[9]  =-0.8009956129757766; s[9]  = 0.4029868389273299; t[9]  =-0.8009956129757766; w[9]  =  0.03149884873824373;
+      r[10] = 0.4029868389273298; s[10] =-0.8009956129757766; t[10] =-0.8009956129757766; w[10] =  0.03149884873824373;
+      r[11] =-0.8009956129757766; s[11] =-0.8009956129757766; t[11] =-0.8009956129757766; w[11] =  0.03149884873824373;
+      r[12] =-0.3707849034682734; s[12] =-0.3707849034682734; t[12] =-0.8876452895951799; w[12] =  0.05270161842714149;
+      r[13] =-0.3707849034682734; s[13] =-0.8876452895951799; t[13] =-0.3707849034682734; w[13] =  0.05270161842714149;
+      r[14] =-0.8876452895951799; s[14] =-0.3707849034682734; t[14] =-0.3707849034682734; w[14] =  0.05270161842714149;
+      r[15] =-0.3707849034682734; s[15] =-0.3707849034682734; t[15] =-0.3707849034682734; w[15] =  0.05270161842714149;
+      r[16] =-0.1260500583716688; s[16] =-0.8739499416283312; t[16] =-0.8739499416283312; w[16] =  0.04730584876233031;
+      r[17] =-0.8739499416283312; s[17] =-0.1260500583716688; t[17] =-0.8739499416283312; w[17] =  0.04730584876233031;
+      r[18] =-0.1260500583716688; s[18] =-0.1260500583716688; t[18] =-0.8739499416283312; w[18] =  0.04730584876233031;
+      r[19] =-0.1260500583716688; s[19] =-0.8739499416283312; t[19] =-0.1260500583716688; w[19] =  0.04730584876233031;
+      r[20] =-0.8739499416283312; s[20] =-0.1260500583716688; t[20] =-0.1260500583716688; w[20] =  0.04730584876233031;
+      r[21] =-0.8739499416283312; s[21] =-0.8739499416283312; t[21] =-0.1260500583716688; w[21] =  0.04730584876233031;
+      r[22] = 0.1583084315814429; s[22] =-0.5906770163268148; t[22] =-0.9769543989278133; w[22] =   0.0223681938462459;
+      r[23] = 0.1583084315814429; s[23] =-0.5906770163268148; t[23] =-0.5906770163268148; w[23] =   0.0223681938462459;
+      r[24] =-0.5906770163268148; s[24] =-0.5906770163268148; t[24] = 0.1583084315814429; w[24] =   0.0223681938462459;
+      r[25] =-0.9769543989278133; s[25] = 0.1583084315814429; t[25] =-0.5906770163268148; w[25] =   0.0223681938462459;
+      r[26] =-0.5906770163268148; s[26] =-0.9769543989278133; t[26] = 0.1583084315814429; w[26] =   0.0223681938462459;
+      r[27] =-0.5906770163268148; s[27] = 0.1583084315814429; t[27] =-0.5906770163268148; w[27] =   0.0223681938462459;
+      r[28] =-0.9769543989278133; s[28] =-0.5906770163268148; t[28] = 0.1583084315814429; w[28] =   0.0223681938462459;
+      r[29] =-0.5906770163268148; s[29] =-0.9769543989278133; t[29] =-0.5906770163268148; w[29] =   0.0223681938462459;
+      r[30] =-0.5906770163268148; s[30] =-0.5906770163268148; t[30] =-0.9769543989278133; w[30] =   0.0223681938462459;
+      r[31] =-0.5906770163268148; s[31] = 0.1583084315814429; t[31] =-0.9769543989278133; w[31] =   0.0223681938462459;
+      r[32] =-0.9769543989278133; s[32] =-0.5906770163268148; t[32] =-0.5906770163268148; w[32] =   0.0223681938462459;
+      r[33] = 0.1583084315814429; s[33] =-0.9769543989278133; t[33] =-0.5906770163268148; w[33] =   0.0223681938462459;
+      r[34] = 0.4419106530449903; s[34] =-0.9563482048314847; t[34] =-0.5292142433820209; w[34] = 0.009603721352467381;
+      r[35] = 0.4419106530449903; s[35] =-0.9563482048314847; t[35] =-0.9563482048314847; w[35] = 0.009603721352467381;
+      r[36] =-0.9563482048314847; s[36] =-0.9563482048314847; t[36] = 0.4419106530449902; w[36] = 0.009603721352467381;
+      r[37] =-0.5292142433820209; s[37] = 0.4419106530449903; t[37] =-0.9563482048314847; w[37] = 0.009603721352467381;
+      r[38] =-0.9563482048314847; s[38] =-0.5292142433820209; t[38] = 0.4419106530449903; w[38] = 0.009603721352467381;
+      r[39] =-0.9563482048314847; s[39] = 0.4419106530449902; t[39] =-0.9563482048314847; w[39] = 0.009603721352467381;
+      r[40] =-0.5292142433820209; s[40] =-0.9563482048314847; t[40] = 0.4419106530449903; w[40] = 0.009603721352467381;
+      r[41] =-0.9563482048314849; s[41] =-0.5292142433820208; t[41] =-0.9563482048314847; w[41] = 0.009603721352467381;
+      r[42] =-0.9563482048314849; s[42] =-0.9563482048314847; t[42] =-0.5292142433820208; w[42] = 0.009603721352467381;
+      r[43] =-0.9563482048314847; s[43] = 0.4419106530449903; t[43] =-0.5292142433820209; w[43] = 0.009603721352467381;
+      r[44] =-0.5292142433820208; s[44] =-0.9563482048314847; t[44] =-0.9563482048314847; w[44] = 0.009603721352467381;
+      r[45] = 0.4419106530449903; s[45] =-0.5292142433820209; t[45] =-0.9563482048314847; w[45] = 0.009603721352467381;
+
+      break;
+    }
+    case  9: {
+      r[0]  =                -0.5; s[0]  =                -0.5; t[0]  =                -0.5; w[0]  =  0.07327761647615459;
+      r[1]  = -0.8198449760801311; s[1]  = -0.8198449760801311; t[1]  =   0.459534928240393; w[1]  = 0.002848036499465571;
+      r[2]  = -0.8198449760801311; s[2]  =   0.459534928240393; t[2]  = -0.8198449760801311; w[2]  = 0.002848036499465571;
+      r[3]  =   0.459534928240393; s[3]  = -0.8198449760801311; t[3]  = -0.8198449760801311; w[3]  = 0.002848036499465571;
+      r[4]  = -0.8198449760801311; s[4]  = -0.8198449760801311; t[4]  = -0.8198449760801311; w[4]  = 0.002848036499465571;
+      r[5]  = -0.9160617305090143; s[5]  = -0.9160617305090143; t[5]  =  0.7481851915270431; w[5]  =  0.00957623445188957;
+      r[6]  = -0.9160617305090143; s[6]  =  0.7481851915270431; t[6]  = -0.9160617305090143; w[6]  =  0.00957623445188957;
+      r[7]  =  0.7481851915270431; s[7]  = -0.9160617305090143; t[7]  = -0.9160617305090143; w[7]  =  0.00957623445188957;
+      r[8]  = -0.9160617305090143; s[8]  = -0.9160617305090143; t[8]  = -0.9160617305090143; w[8]  =  0.00957623445188957;
+      r[9]  = -0.3560564433877504; s[9]  = -0.3560564433877504; t[9]  = -0.9318306698367487; w[9]  =  0.04059381195379974;
+      r[10] = -0.3560564433877504; s[10] = -0.9318306698367487; t[10] = -0.3560564433877504; w[10] =  0.04059381195379974;
+      r[11] = -0.9318306698367487; s[11] = -0.3560564433877504; t[11] = -0.3560564433877504; w[11] =  0.04059381195379974;
+      r[12] = -0.3560564433877504; s[12] = -0.3560564433877504; t[12] = -0.3560564433877504; w[12] =  0.04059381195379974;
+      r[13] =  -0.658427438836176; s[13] =  -0.658427438836176; t[13] =-0.02471768349147202; w[13] =  0.03397956979508031;
+      r[14] =  -0.658427438836176; s[14] =-0.02471768349147202; t[14] =  -0.658427438836176; w[14] =  0.03397956979508031;
+      r[15] =-0.02471768349147199; s[15] =  -0.658427438836176; t[15] =  -0.658427438836176; w[15] =  0.03397956979508031;
+      r[16] =  -0.658427438836176; s[16] =  -0.658427438836176; t[16] =  -0.658427438836176; w[16] =  0.03397956979508031;
+      r[17] = -0.2129618822280694; s[17] = -0.7870381177719306; t[17] = -0.7870381177719306; w[17] =  0.04875647105046832;
+      r[18] = -0.7870381177719306; s[18] = -0.2129618822280694; t[18] = -0.7870381177719306; w[18] =  0.04875647105046832;
+      r[19] = -0.2129618822280694; s[19] = -0.2129618822280694; t[19] = -0.7870381177719306; w[19] =  0.04875647105046832;
+      r[20] = -0.2129618822280694; s[20] = -0.7870381177719306; t[20] = -0.2129618822280694; w[20] =  0.04875647105046832;
+      r[21] = -0.7870381177719306; s[21] = -0.2129618822280694; t[21] = -0.2129618822280694; w[21] =  0.04875647105046832;
+      r[22] = -0.7870381177719306; s[22] = -0.7870381177719306; t[22] = -0.2129618822280694; w[22] =  0.04875647105046832;
+      r[23] =                -1.0; s[23] =-0.07906724107645879; t[23] = -0.8418655178470824; w[23] =  0.01022387218776507;
+      r[24] =                -1.0; s[24] =-0.07906724107645879; t[24] =-0.07906724107645879; w[24] =  0.01022387218776507;
+      r[25] =-0.07906724107645879; s[25] =-0.07906724107645879; t[25] =                -1.0; w[25] =  0.01022387218776507;
+      r[26] = -0.8418655178470824; s[26] =                -1.0; t[26] =-0.07906724107645879; w[26] =  0.01022387218776507;
+      r[27] =-0.07906724107645879; s[27] = -0.8418655178470824; t[27] =                -1.0; w[27] =  0.01022387218776507;
+      r[28] =-0.07906724107645879; s[28] =                -1.0; t[28] =-0.07906724107645879; w[28] =  0.01022387218776507;
+      r[29] = -0.8418655178470824; s[29] =-0.07906724107645879; t[29] =                -1.0; w[29] =  0.01022387218776507;
+      r[30] =-0.07906724107645879; s[30] = -0.8418655178470824; t[30] =-0.07906724107645879; w[30] =  0.01022387218776507;
+      r[31] =-0.07906724107645879; s[31] =-0.07906724107645879; t[31] = -0.8418655178470824; w[31] =  0.01022387218776507;
+      r[32] =-0.07906724107645879; s[32] =                -1.0; t[32] = -0.8418655178470824; w[32] =  0.01022387218776507;
+      r[33] = -0.8418655178470824; s[33] =-0.07906724107645879; t[33] =-0.07906724107645879; w[33] =  0.01022387218776507;
+      r[34] =                -1.0; s[34] = -0.8418655178470824; t[34] =-0.07906724107645879; w[34] =  0.01022387218776507;
+      r[35] =  0.1968616506697061; s[35] = -0.6334882372417514; t[35] = -0.9298851761862033; w[35] =  0.02791006448800061;
+      r[36] =  0.1968616506697061; s[36] = -0.6334882372417514; t[36] = -0.6334882372417514; w[36] =  0.02791006448800061;
+      r[37] = -0.6334882372417514; s[37] = -0.6334882372417514; t[37] =  0.1968616506697061; w[37] =  0.02791006448800061;
+      r[38] = -0.9298851761862033; s[38] =  0.1968616506697061; t[38] = -0.6334882372417514; w[38] =  0.02791006448800061;
+      r[39] = -0.6334882372417514; s[39] = -0.9298851761862033; t[39] =  0.1968616506697061; w[39] =  0.02791006448800061;
+      r[40] = -0.6334882372417514; s[40] =  0.1968616506697061; t[40] = -0.6334882372417514; w[40] =  0.02791006448800061;
+      r[41] = -0.9298851761862033; s[41] = -0.6334882372417514; t[41] =  0.1968616506697061; w[41] =  0.02791006448800061;
+      r[42] = -0.6334882372417514; s[42] = -0.9298851761862033; t[42] = -0.6334882372417514; w[42] =  0.02791006448800061;
+      r[43] = -0.6334882372417514; s[43] = -0.6334882372417514; t[43] = -0.9298851761862033; w[43] =  0.02791006448800061;
+      r[44] = -0.6334882372417514; s[44] =  0.1968616506697061; t[44] = -0.9298851761862033; w[44] =  0.02791006448800061;
+      r[45] = -0.9298851761862033; s[45] = -0.6334882372417514; t[45] = -0.6334882372417514; w[45] =  0.02791006448800061;
+      r[46] =  0.1968616506697061; s[46] = -0.9298851761862033; t[46] = -0.6334882372417514; w[46] =  0.02791006448800061;
+      r[47] =  0.4372341714004844; s[47] = -0.9329857011557074; t[47] = -0.5712627690890695; w[47] =  0.01349325330368666;
+      r[48] =  0.4372341714004844; s[48] = -0.9329857011557074; t[48] = -0.9329857011557074; w[48] =  0.01349325330368666;
+      r[49] = -0.9329857011557074; s[49] = -0.9329857011557074; t[49] =  0.4372341714004844; w[49] =  0.01349325330368666;
+      r[50] = -0.5712627690890695; s[50] =  0.4372341714004844; t[50] = -0.9329857011557074; w[50] =  0.01349325330368666;
+      r[51] = -0.9329857011557074; s[51] = -0.5712627690890695; t[51] =  0.4372341714004844; w[51] =  0.01349325330368666;
+      r[52] = -0.9329857011557074; s[52] =  0.4372341714004844; t[52] = -0.9329857011557074; w[52] =  0.01349325330368666;
+      r[53] = -0.5712627690890695; s[53] = -0.9329857011557074; t[53] =  0.4372341714004844; w[53] =  0.01349325330368666;
+      r[54] = -0.9329857011557074; s[54] = -0.5712627690890695; t[54] = -0.9329857011557074; w[54] =  0.01349325330368666;
+      r[55] = -0.9329857011557074; s[55] = -0.9329857011557074; t[55] = -0.5712627690890695; w[55] =  0.01349325330368666;
+      r[56] = -0.9329857011557074; s[56] =  0.4372341714004844; t[56] = -0.5712627690890695; w[56] =  0.01349325330368666;
+      r[57] = -0.5712627690890695; s[57] = -0.9329857011557074; t[57] = -0.9329857011557074; w[57] =  0.01349325330368666;
+      r[58] =  0.4372341714004844; s[58] = -0.5712627690890695; t[58] = -0.9329857011557074; w[58] =  0.01349325330368666;
+
+      break;
+    }
+    case 10: {
+      r[0]  =                -0.5; s[0]  =                -0.5; t[0]  =                -0.5; w[0]  =  0.06111729903668942;
+      r[1]  = -0.3902379693282467; s[1]  = -0.3902379693282467; t[1]  =   -0.82928609201526; w[1]  =  0.03648653859255376;
+      r[2]  = -0.3902379693282467; s[2]  =   -0.82928609201526; t[2]  = -0.3902379693282467; w[2]  =  0.03648653859255376;
+      r[3]  =   -0.82928609201526; s[3]  = -0.3902379693282467; t[3]  = -0.3902379693282467; w[3]  =  0.03648653859255376;
+      r[4]  = -0.3902379693282467; s[4]  = -0.3902379693282467; t[4]  = -0.3902379693282467; w[4]  =  0.03648653859255376;
+      r[5]  = -0.8646773501288808; s[5]  = -0.8646773501288808; t[5]  =  0.5940320503866422; w[5]  =  0.01772043697176758;
+      r[6]  = -0.8646773501288808; s[6]  =  0.5940320503866422; t[6]  = -0.8646773501288808; w[6]  =  0.01772043697176758;
+      r[7]  =  0.5940320503866422; s[7]  = -0.8646773501288808; t[7]  = -0.8646773501288808; w[7]  =  0.01772043697176758;
+      r[8]  = -0.8646773501288808; s[8]  = -0.8646773501288808; t[8]  = -0.8646773501288808; w[8]  =  0.01772043697176758;
+      r[9]  = -0.9473346828260848; s[9]  =-0.05266531717391518; t[9]  =-0.05266531717391518; w[9]  =  0.00811057586155056;
+      r[10] =-0.05266531717391519; s[10] = -0.9473346828260848; t[10] =-0.05266531717391519; w[10] =  0.00811057586155056;
+      r[11] = -0.9473346828260848; s[11] = -0.9473346828260848; t[11] = -0.0526653171739152; w[11] =  0.00811057586155056;
+      r[12] = -0.9473346828260848; s[12] = -0.0526653171739152; t[12] = -0.9473346828260848; w[12] =  0.00811057586155056;
+      r[13] =-0.05266531717391515; s[13] = -0.9473346828260848; t[13] = -0.9473346828260848; w[13] =  0.00811057586155056;
+      r[14] =-0.05266531717391519; s[14] =-0.05266531717391519; t[14] = -0.9473346828260848; w[14] =  0.00811057586155056;
+      r[15] = -0.2038789111878272; s[15] = -0.7961210888121728; t[15] = -0.7961210888121728; w[15] =  0.03066711559292157;
+      r[16] = -0.7961210888121728; s[16] = -0.2038789111878272; t[16] = -0.7961210888121728; w[16] =  0.03066711559292157;
+      r[17] = -0.2038789111878272; s[17] = -0.2038789111878272; t[17] = -0.7961210888121728; w[17] =  0.03066711559292157;
+      r[18] = -0.2038789111878272; s[18] = -0.7961210888121728; t[18] = -0.2038789111878272; w[18] =  0.03066711559292157;
+      r[19] = -0.7961210888121728; s[19] = -0.2038789111878272; t[19] = -0.2038789111878272; w[19] =  0.03066711559292157;
+      r[20] = -0.7961210888121728; s[20] = -0.7961210888121728; t[20] = -0.2038789111878272; w[20] =  0.03066711559292157;
+      r[21] = 0.06411454763598279; s[21] = -0.6048469883044114; t[21] =   -0.85442057102716; w[21] =  0.03277830640502917;
+      r[22] = 0.06411454763598282; s[22] = -0.6048469883044114; t[22] = -0.6048469883044114; w[22] =  0.03277830640502917;
+      r[23] = -0.6048469883044114; s[23] = -0.6048469883044114; t[23] = 0.06411454763598282; w[23] =  0.03277830640502917;
+      r[24] =   -0.85442057102716; s[24] = 0.06411454763598279; t[24] = -0.6048469883044114; w[24] =  0.03277830640502917;
+      r[25] = -0.6048469883044114; s[25] =   -0.85442057102716; t[25] = 0.06411454763598279; w[25] =  0.03277830640502917;
+      r[26] = -0.6048469883044114; s[26] = 0.06411454763598282; t[26] = -0.6048469883044114; w[26] =  0.03277830640502917;
+      r[27] =   -0.85442057102716; s[27] = -0.6048469883044114; t[27] = 0.06411454763598279; w[27] =  0.03277830640502917;
+      r[28] = -0.6048469883044114; s[28] =   -0.85442057102716; t[28] = -0.6048469883044114; w[28] =  0.03277830640502917;
+      r[29] = -0.6048469883044114; s[29] = -0.6048469883044114; t[29] =   -0.85442057102716; w[29] =  0.03277830640502917;
+      r[30] = -0.6048469883044114; s[30] = 0.06411454763598279; t[30] =   -0.85442057102716; w[30] =  0.03277830640502917;
+      r[31] =   -0.85442057102716; s[31] = -0.6048469883044114; t[31] = -0.6048469883044114; w[31] =  0.03277830640502917;
+      r[32] = 0.06411454763598279; s[32] =   -0.85442057102716; t[32] = -0.6048469883044114; w[32] =  0.03277830640502917;
+      r[33] =  0.8117588817115982; s[33] =                -1.0; t[33] = -0.8117588817115982; w[33] = 0.001276432944056112;
+      r[34] =  0.8117588817115982; s[34] =                -1.0; t[34] =                -1.0; w[34] = 0.001276432944056112;
+      r[35] =                -1.0; s[35] =                -1.0; t[35] =  0.8117588817115982; w[35] = 0.001276432944056112;
+      r[36] = -0.8117588817115982; s[36] =  0.8117588817115982; t[36] =                -1.0; w[36] = 0.001276432944056112;
+      r[37] =                -1.0; s[37] = -0.8117588817115982; t[37] =  0.8117588817115982; w[37] = 0.001276432944056112;
+      r[38] =                -1.0; s[38] =  0.8117588817115982; t[38] =                -1.0; w[38] = 0.001276432944056112;
+      r[39] = -0.8117588817115982; s[39] =                -1.0; t[39] =  0.8117588817115982; w[39] = 0.001276432944056112;
+      r[40] =                -1.0; s[40] = -0.8117588817115982; t[40] =                -1.0; w[40] = 0.001276432944056112;
+      r[41] =                -1.0; s[41] =                -1.0; t[41] = -0.8117588817115982; w[41] = 0.001276432944056112;
+      r[42] =                -1.0; s[42] =  0.8117588817115982; t[42] = -0.8117588817115982; w[42] = 0.001276432944056112;
+      r[43] = -0.8117588817115982; s[43] =                -1.0; t[43] =                -1.0; w[43] = 0.001276432944056112;
+      r[44] =  0.8117588817115982; s[44] = -0.8117588817115982; t[44] =                -1.0; w[44] = 0.001276432944056112;
+      r[45] =  0.3854615068170896; s[45] = -0.6928701162511337; t[45] = -0.9997212743148225; w[45] = 0.006560363793425748;
+      r[46] =  0.3854615068170896; s[46] = -0.6928701162511336; t[46] = -0.6928701162511336; w[46] = 0.006560363793425748;
+      r[47] = -0.6928701162511337; s[47] = -0.6928701162511335; t[47] =  0.3854615068170896; w[47] = 0.006560363793425748;
+      r[48] = -0.9997212743148225; s[48] =  0.3854615068170896; t[48] = -0.6928701162511335; w[48] = 0.006560363793425748;
+      r[49] = -0.6928701162511335; s[49] = -0.9997212743148225; t[49] =  0.3854615068170896; w[49] = 0.006560363793425748;
+      r[50] = -0.6928701162511337; s[50] =  0.3854615068170896; t[50] = -0.6928701162511335; w[50] = 0.006560363793425748;
+      r[51] = -0.9997212743148225; s[51] = -0.6928701162511335; t[51] =  0.3854615068170896; w[51] = 0.006560363793425748;
+      r[52] = -0.6928701162511337; s[52] = -0.9997212743148225; t[52] = -0.6928701162511337; w[52] = 0.006560363793425748;
+      r[53] = -0.6928701162511337; s[53] = -0.6928701162511337; t[53] = -0.9997212743148225; w[53] = 0.006560363793425748;
+      r[54] = -0.6928701162511335; s[54] =  0.3854615068170896; t[54] = -0.9997212743148225; w[54] = 0.006560363793425748;
+      r[55] = -0.9997212743148225; s[55] = -0.6928701162511336; t[55] = -0.6928701162511336; w[55] = 0.006560363793425748;
+      r[56] =  0.3854615068170896; s[56] = -0.9997212743148225; t[56] = -0.6928701162511337; w[56] = 0.006560363793425748;
+      r[57] = -0.6460142846738401; s[57] = -0.1823369737573523; t[57] = -0.9893117678114551; w[57] =  0.01289761909705229;
+      r[58] = -0.6460142846738401; s[58] = -0.1823369737573524; t[58] = -0.1823369737573524; w[58] =  0.01289761909705229;
+      r[59] = -0.1823369737573524; s[59] = -0.1823369737573524; t[59] = -0.6460142846738401; w[59] =  0.01289761909705229;
+      r[60] = -0.9893117678114551; s[60] = -0.6460142846738401; t[60] = -0.1823369737573524; w[60] =  0.01289761909705229;
+      r[61] = -0.1823369737573524; s[61] = -0.9893117678114551; t[61] = -0.6460142846738401; w[61] =  0.01289761909705229;
+      r[62] = -0.1823369737573524; s[62] = -0.6460142846738401; t[62] = -0.1823369737573524; w[62] =  0.01289761909705229;
+      r[63] = -0.9893117678114551; s[63] = -0.1823369737573524; t[63] = -0.6460142846738401; w[63] =  0.01289761909705229;
+      r[64] = -0.1823369737573523; s[64] = -0.9893117678114551; t[64] = -0.1823369737573523; w[64] =  0.01289761909705229;
+      r[65] = -0.1823369737573523; s[65] = -0.1823369737573523; t[65] = -0.9893117678114551; w[65] =  0.01289761909705229;
+      r[66] = -0.1823369737573524; s[66] = -0.6460142846738401; t[66] = -0.9893117678114551; w[66] =  0.01289761909705229;
+      r[67] = -0.9893117678114551; s[67] = -0.1823369737573524; t[67] = -0.1823369737573524; w[67] =  0.01289761909705229;
+      r[68] = -0.6460142846738401; s[68] = -0.9893117678114551; t[68] = -0.1823369737573523; w[68] =  0.01289761909705229;
+      r[69] =  0.3166885452555603; s[69] = -0.9215201459821879; t[69] = -0.4736482532911847; w[69] =  0.01504744303648042;
+      r[70] =  0.3166885452555603; s[70] = -0.9215201459821878; t[70] = -0.9215201459821878; w[70] =  0.01504744303648042;
+      r[71] = -0.9215201459821878; s[71] = -0.9215201459821878; t[71] =  0.3166885452555603; w[71] =  0.01504744303648042;
+      r[72] = -0.4736482532911847; s[72] =  0.3166885452555603; t[72] = -0.9215201459821878; w[72] =  0.01504744303648042;
+      r[73] = -0.9215201459821878; s[73] = -0.4736482532911847; t[73] =  0.3166885452555603; w[73] =  0.01504744303648042;
+      r[74] = -0.9215201459821878; s[74] =  0.3166885452555603; t[74] = -0.9215201459821878; w[74] =  0.01504744303648042;
+      r[75] = -0.4736482532911847; s[75] = -0.9215201459821878; t[75] =  0.3166885452555603; w[75] =  0.01504744303648042;
+      r[76] = -0.9215201459821878; s[76] = -0.4736482532911847; t[76] = -0.9215201459821878; w[76] =  0.01504744303648042;
+      r[77] = -0.9215201459821878; s[77] = -0.9215201459821878; t[77] = -0.4736482532911847; w[77] =  0.01504744303648042;
+      r[78] = -0.9215201459821878; s[78] =  0.3166885452555603; t[78] = -0.4736482532911847; w[78] =  0.01504744303648042;
+      r[79] = -0.4736482532911847; s[79] = -0.9215201459821878; t[79] = -0.9215201459821878; w[79] =  0.01504744303648042;
+      r[80] =  0.3166885452555603; s[80] = -0.4736482532911847; t[80] = -0.9215201459821879; w[80] =  0.01504744303648042;
+
+      break;
+    }
+  }
+
+  for(int i = 0; i < nIntegrationPoint; ++i)
+  {
+      r[i] = 0.5 * (r[i] + 1.0);
+      s[i] = 0.5 * (s[i] + 1.0);
+      t[i] = 0.5 * (t[i] + 1.0);
+      w[i] = 0.75* (w[i]      );
+  }
+}
+
+void HighOrderStandardElementBase::IntegrationPointsPyramid(void)
+{
+/*--- The 3D quadrature rule for a pyramid is obtained by transforming the
+      standard pyramid into a standard hexahedron by means of the Duffy
+      transformation. On the created hexahedron a tensor product rule is used,
+      but in the t-direction a Gauss-Jacobi rule with alpha = 2, beta = 0 is
+      used to account for the transformation from the pyramid to the
+      hexahedron. The determinant of the Jacobian of this transformation
+      is 0.25*(1-t)^2, which explains the alpha = 2 in the Gauss-Jacobi.
+      Determine the number of integration points in 1D, which is stored in M,
+      and the actual integration 1D integration points. ---*/
+  unsigned short M = integrationOrder/2 + 1;
+
+  vector<RDouble> GLPoints(M), GLWeights(M);
+  GaussLegendrePoints1D(GLPoints, GLWeights);
+
+  vector<RDouble> GJPoints(M), GJWeights(M);
+
+  switch(M) // copy from MOOSE
+  {
+      case  1:
+      {
+          GJPoints[0]  = 0.25;
+          GJWeights[0] = 1./3.;
+          break;
+      }
+      case  2:
+      {
+          GJPoints[ 0] =1.225148226554413e-01;
+          GJPoints[ 1] =5.441518440112252e-01;
+          GJWeights[ 0]=2.325474512535079e-01;
+          GJWeights[ 1]=1.007858820798254e-01;
+
+          break;
+      }
+      case  3:
+      {
+          GJPoints[ 0] =7.299402407314973e-02;
+          GJPoints[ 1] =3.470037660383518e-01;
+          GJPoints[ 2] =7.050022098884983e-01;
+          GJWeights[ 0]=1.571363610648866e-01;
+          GJWeights[ 1]=1.462462692598660e-01;
+          GJWeights[ 2]=2.995070300858069e-02;
+
+          break;
+      }
+
+      default:
+      {
+          CGaussJacobiQuadrature GaussJacobi;
+          GaussJacobi.GetQuadraturePoints(2.0, 0.0, 0, 1.0, GJPoints, GJWeights);
+      }
+  }
+
+  for(unsigned short i=0; i<M; ++i)
+  {
+      GJWeights[i] *= 3;
+  }
+
+  /*--- Allocate the memory for the integration points and weights
+        of the pyramid and determine them.                ---*/
+  nIntegrationPoint = M*M*M;
+  xiIntegration.resize(nIntegrationPoint);
+  etIntegration.resize(nIntegrationPoint);
+  ztIntegration.resize(nIntegrationPoint);
+  wtIntegration.resize(nIntegrationPoint);
+
+  unsigned int ii = 0;
+  for(unsigned short k=0; k<M; ++k) {
+    for(unsigned short j=0; j<M; ++j) {
+      for(unsigned short i=0; i<M; ++i, ++ii) {
+        const RDouble xi   = GLPoints[i];
+        const RDouble eta  = GLPoints[j];
+        const RDouble zeta = GJPoints[k];
+        //xiIntegration[ii] = 0.5*(1.0-zeta)*xi;
+        //etIntegration[ii] = 0.5*(1.0-zeta)*eta;
+        //wtIntegration[ii] = 0.25*GLWeights[i]*GLWeights[j]*GJWeights[k];
+        //xiIntegration[ii] = 0.5+(1.0-zeta)*(xi-0.5);
+        //etIntegration[ii] = 0.5+(1.0-zeta)*(eta-0.5);
+        xiIntegration[ii] = xi;
+        etIntegration[ii] = eta;
+        ztIntegration[ii] = zeta;
+        wtIntegration[ii] = GLWeights[i]*GLWeights[j]*GJWeights[k];
+      }
+    }
+  }
+}
+
+/*----------------------------------------------------------------------------------  */
+/*          Private member functions of HighOrderStandardElementBase.               */
+/*----------------------------------------------------------------------------------  */
+void HighOrderStandardElementBase::GaussLegendrePoints1D(vector<RDouble> & GLPoints, vector<RDouble> & GLWeights)
+{
+    /*--- Set the number of integration points, depending on the order of
+    polynomials that must be integrated exactly. ---*/
+    //switch(integrationOrder)
+    //{
+    //case  0:
+    //case  1: nIntegrationPoint =   1; break;
+    //case  2: 
+    //case  3: nIntegrationPoint =   2; break;
+    //case  4: 
+    //case  5: nIntegrationPoint =   3; break;
+    //case  6: 
+    //case  7: nIntegrationPoint =   4; break;
+    //case  8: 
+    //case  9: nIntegrationPoint =   5; break;
+    //case 10: 
+    //case 11: nIntegrationPoint =   6; break;
+    //case 12: 
+    //case 13: nIntegrationPoint =   7; break;
+    //default:
+    //notation MPI
+    //cout << "Error : HighOrderStandardElementBase has wrong integrationOrder " << endl;
+    //}
+
+  /*--- Set the pointers to the data arrays of the variables just allocated, such
+        that the names are shorter. This is useful for the code below. ---*/
+  RDouble * r = GLPoints.data();
+  RDouble * w = GLWeights.data();
+
+  /*--- Set the data for the integration points, depending on the order.
+        These integration rules come from the Matlab codes corresponding to
+        the book "Nodal Discontinuous Methods: Algorithms, Analysis, and Applications"
+        by Jan S. Hesthaven and Tim Warburton. ---*/
+  switch(integrationOrder)
+  {
+    case  0:
+    case  1:
+    {
+      r[0] =  0.500000000000000; w[0] = 1.000000000000000;
+
+      break;
+    }
+    case  2:
+    case  3:
+    {
+      r[0] =  0.211324865405187; w[0] = 0.500000000000000;
+      r[1] =  0.788675134594812; w[1] = 0.500000000000000;
+
+      break;
+    }
+    case  4:
+    case  5:
+    {
+      r[0] =  0.112701665379258; w[0] = 0.277777777777778;
+      r[1] =  0.500000000000000; w[1] = 0.444444444444444;
+      r[2] =  0.887298334620741; w[2] = 0.277777777777778;
+
+      break;
+    }
+    case  6:
+    case  7:
+    {
+        r[0] =  0.069431844202973; w[0] = 0.173927422568726;
+        r[1] =  0.330009478207571; w[1] = 0.326072577431273;
+        r[2] =  0.669990521792428; w[2] = 0.326072577431273;
+        r[3] =  0.930568155797026; w[3] = 0.173927422568726;
+
+        break;
+    }
+    default:
+    {
+        /* The class used to determine the integration points. Allocate the memory for the help vectors. */
+        vector<RDouble> GLPointsPas(GLPoints.size());
+        vector<RDouble> GLWeightsPas(GLWeights.size());
+
+        /* Gauss Legendre quadrature is a special case of Gauss Jacobi integration.
+        Determine the integration points for this case. */
+        CGaussJacobiQuadrature GaussJacobi;
+        GaussJacobi.GetQuadraturePoints(0.0, 0.0, 0.0, 1.0, GLPointsPas, GLWeightsPas);
+
+        /* Copy the data back into GLPoints and GLWeights. */
+        for(unsigned long i=0; i<GLPoints.size(); ++i)
+        {
+            GLPoints[i]  = GLPointsPas[i];
+            GLWeights[i] = GLWeightsPas[i];
+        }
+    }
+  }
+}
+
+void HighOrderStandardElementBase::Copy(const HighOrderStandardElementBase &other)
+{
+    VTK_Type      = other.VTK_Type;
+    integrationOrder  = other.integrationOrder;
+    nIntegrationPoint  = other.nIntegrationPoint;
+    constJacobian = other.constJacobian;
+
+    xiIntegration = other.xiIntegration;
+    etIntegration = other.etIntegration;
+    ztIntegration = other.ztIntegration;
+    wtIntegration = other.wtIntegration;
+}
+
+typedef Eigen::Matrix<RDouble, Eigen::Dynamic, Eigen::Dynamic> HighOrderMatrix;
+
+void Orthogonalize(int degreeOfFreedom, const HighOrderMatrix & taylorBasisMassMatrix, 
+                   HighOrderMatrix & orthogonalizationMatrix)
+{
+    orthogonalizationMatrix(0, 0) = 1.0 / sqrt(taylorBasisMassMatrix(0, 0));
+    HighOrderMatrix upperMatrix(degreeOfFreedom, degreeOfFreedom);
+    upperMatrix.setConstant(0.0);
+
+    for (int n = 1; n < degreeOfFreedom; ++ n)
+    {
+        RDouble rhs[ 10 ];
+
+        for (int i = 0; i < n; ++ i)
+        {
+            rhs[ i ] = 0.0;
+            for (int j = 0; j <= i; ++ j) // rhs[ i ] = - fai_i * b_n;
+            {
+                rhs[ i ] -= orthogonalizationMatrix(i, j) * taylorBasisMassMatrix(n, j);
+            }
+            // upperMatrix(i, n - 1) = fai_i * b_n - 1;// upperMatrix(i, n - 1) = 0.0;
+            for (int k = 0; k <= i; ++ k)
+            {
+                upperMatrix(i, n - 1) += orthogonalizationMatrix(i, k) * taylorBasisMassMatrix(n - 1, k);
+            }
+        }
+
+        RDouble thisRow[ 10 ];
+        for (int i = n-1; i >= 0; -- i)
+        {
+            thisRow[ i ] = rhs[ i ];
+            for (int j = i + 1; j < n; ++ j)
+                thisRow[ i ] -= upperMatrix(i, j) * thisRow[ j ];
+
+            thisRow[ i ] /= upperMatrix(i, i);
+        }
+
+        thisRow[ n ] = 1.0;
+        RDouble normal = 0.0;
+        for (int i = 0; i <= n; ++ i)
+        {
+            for (int j = 0; j < i; ++ j)
+            {
+                normal += thisRow[ i ] * thisRow[ j ] * taylorBasisMassMatrix(i, j);
+            }
+            for (int j = i; j <= n; ++ j)
+            {
+                normal += thisRow[ i ] * thisRow[ j ] * taylorBasisMassMatrix(j, i);
+            }
+        }
+
+        RDouble temp = 1.0 / sqrt(normal);
+        for (int i = 0; i <= n; ++ i)
+            orthogonalizationMatrix(n, i) = thisRow[ i ] * temp;
+    }
+}
+
+void HighOrderStandardElementBase::ComputeOrthogoMatrix()
+{
+    int degreeOfFreedom;
+    switch(VTK_Type)
+    {
+    case HOUnstruct::QUADRILATERAL: degreeOfFreedom = 6;    break;
+    case HOUnstruct::HEXAHEDRON:    degreeOfFreedom = 10;   break;
+    default: break;
+    }
+
+    //HighOrderMatrix taylorBasisMassMatrix(degreeOfFreedom, degreeOfFreedom);
+    //HighOrderMatrix orthogonalizationMatrix(degreeOfFreedom, degreeOfFreedom, 0.0);
+
+    //Orthogonalize(degreeOfFreedom, taylorBasisMassMatrix, orthogonalizationMatrix);
+}
+
+}
+
+#include <iostream>
+#include <cmath>
+//using namespace std;
+
+//using namespace HOUnstruct;
+
+namespace HOUnstruct
+{
+
+void TestOrthogoMatrix()
+{
+    HighOrderStandardElementBase elem(TRIANGLE, 6);
+
+    int degreeOfFreedom = 10;
+
+    HighOrderMatrix taylorBasisMassMatrix(degreeOfFreedom, degreeOfFreedom);
+    taylorBasisMassMatrix.setConstant(0.0);
+
+    const RDouble * xi = elem.GetXiIntegrationCoor();
+    const RDouble * et = elem.GetEtIntegrationCoor();
+    const RDouble * wt = elem.GetWtIntegration();
+
+    std::cout << "taylorBasisMassMatrix:" << std::endl;
+    for(int iIntegratPoint = 0; iIntegratPoint < elem.GetNumberOfIntegrationPoint(); ++iIntegratPoint)
+    {
+        RDouble refCoord[2];
+        refCoord[0] = xi[iIntegratPoint];
+        refCoord[1] = et[iIntegratPoint];
+
+        RDouble basis[10];
+
+        for(int idof = 0; idof < degreeOfFreedom; ++idof)
+        {
+            basis[idof] = MonomialBasis2d(refCoord, idof);
+        }
+        
+        for(int idof = 0; idof < degreeOfFreedom; ++idof)
+        {
+            //for(int jdof = 0; jdof < degreeOfFreedom; ++jdof)
+            for(int jdof = 0; jdof <= idof; ++jdof)
+            {
+                taylorBasisMassMatrix(idof, jdof) += basis[idof] * basis[jdof] * wt[iIntegratPoint];
+            }
+        }
+    }
+    
+    for(int idof = 0; idof < degreeOfFreedom; ++idof)
+    {
+        //for(int jdof = 0; jdof < degreeOfFreedom; ++jdof)
+        for(int jdof = idof+1; jdof < degreeOfFreedom; ++jdof)
+        {
+            taylorBasisMassMatrix(idof, jdof) = taylorBasisMassMatrix(jdof, idof);
+        }
+    }
+
+    std::cout << taylorBasisMassMatrix << std::endl;
+
+    HighOrderMatrix orthogonalizationMatrix(degreeOfFreedom, degreeOfFreedom);
+    orthogonalizationMatrix.setConstant(0.0);
+
+    Orthogonalize(degreeOfFreedom, taylorBasisMassMatrix, orthogonalizationMatrix);
+
+    std::cout << "orthogonalizationMatrix:" << std::endl;
+    std::cout << orthogonalizationMatrix << std::endl;
+
+    std::cout << "after orthogonalized BasisMassMatrix:" << std::endl;
+    taylorBasisMassMatrix.setConstant(0.0);
+    for(int iIntegratPoint = 0; iIntegratPoint < elem.GetNumberOfIntegrationPoint(); ++iIntegratPoint)
+    {
+        RDouble refCoord[3];
+        refCoord[0] = xi[iIntegratPoint];
+        refCoord[1] = et[iIntegratPoint];
+
+        RDouble originalBasis[10];
+
+        for(int idof = 0; idof < degreeOfFreedom; ++idof)
+        {
+            originalBasis[idof] = MonomialBasis2d(refCoord, idof);
+        }
+
+        RDouble basis[10];
+        for(int idof = 0; idof < degreeOfFreedom; ++idof)
+        {
+            basis[idof] = 0.0;
+
+            for(int jdof = 0; jdof <= idof; ++jdof)
+            {
+                basis[idof] += orthogonalizationMatrix(idof, jdof) * originalBasis[jdof];
+            }
+        }
+
+        for(int idof = 0; idof < degreeOfFreedom; ++idof)
+        {
+            //for(int jdof = 0; jdof < degreeOfFreedom; ++jdof)
+            for(int jdof = 0; jdof <= idof; ++jdof)
+            {
+                taylorBasisMassMatrix(idof, jdof) += basis[idof] * basis[jdof] * wt[iIntegratPoint];
+            }
+        }
+    }
+
+    for(int idof = 0; idof < degreeOfFreedom; ++idof)
+    {
+        //for(int jdof = 0; jdof < degreeOfFreedom; ++jdof)
+        for(int jdof = idof+1; jdof < degreeOfFreedom; ++jdof)
+        {
+            taylorBasisMassMatrix(idof, jdof) = taylorBasisMassMatrix(jdof, idof);
+        }
+    }
+
+    std::cout << taylorBasisMassMatrix << std::endl;
+    std::cout << std::endl;
+}
+
+//! @ the function of HighOrderStandardCell definition
+/*
+HighOrderStandardCell::HighOrderStandardCell(unsigned short VTK_Type, unsigned short integrationOrder):HighOrderStandardElementBase()
+{
+
+}
+*/
+
+bool HighOrderStandardCell::SameStandardElement(unsigned short val_VTK_Type, unsigned short val_nPoly, unsigned short valIntegrationOrder) 
+{
+  
+    if(val_VTK_Type           != VTK_Type       )      return false;
+    if(val_nPoly              != nPoly         )      return false;
+    if(valIntegrationOrder    != integrationOrder)      return false;
+    return true;
+}
+
+/*----------------------------------------------------------------------------------*/
+/*           Private member functions of HighOrderStandardCell.                       */
+/*----------------------------------------------------------------------------------*/
+
+void HighOrderStandardCell::Copy(const HighOrderStandardCell &other) 
+{
+    HighOrderStandardElementBase::Copy(other);
+
+    nPoly = other.nPoly;
+    nNodes = other.nNodes;
+
+    connFace0 = other.connFace0;
+    connFace1 = other.connFace1;
+    connFace2 = other.connFace2;
+    connFace3 = other.connFace3;
+    connFace4 = other.connFace4;
+    connFace5 = other.connFace5;
+
+    vertexXi = other.vertexXi;
+    vertexEt = other.vertexEt;
+    vertexZt = other.vertexZt;
+
+    shapeFunctionAtIntegration   = other.shapeFunctionAtIntegration;
+    dXiShapeFunctionAtIntegration = other.dXiShapeFunctionAtIntegration;
+    dEtShapeFunctionAtIntegration = other.dEtShapeFunctionAtIntegration;
+    dZtShapeFunctionAtIntegration  = other.dZtShapeFunctionAtIntegration;
+}
+
+HighOrderStandardCell::HighOrderStandardCell(unsigned short VTK_Type, unsigned short nCellNodes, unsigned short integrationOrder) : 
+    HighOrderStandardElementBase(VTK_Type, integrationOrder)
+{
+    /*--- Copy the function arguments to the member variables. ---*/
+
+    //nPoly = val_nPoly;
+    //! @define the node of HighOrderStandardCell
+    nNodes = nCellNodes;
+
+    /*--- Determine the element type and compute the other member variables. ---*/
+    switch(VTK_Type)
+    {
+    case HOUnstruct::TETRAHEDRON:
+        DataStandardTetrahedron();
+        break;
+    case HOUnstruct::PYRAMID:       
+        DataStandardPyramid();
+        break;
+    case HOUnstruct::PRISM:
+        DataStandardPrism();
+        break;
+    case HOUnstruct::HEXAHEDRON:
+        DataStandardHexahedron();
+        break;
+    default:
+        break;
+    }
+}
+
+//! @brief Function, which creates all the data for a tetrahedral element.
+void HighOrderStandardCell::DataStandardTetrahedron(void)
+{
+    /*--- Determine the shape functions and its derivatives in the integration points. ---*/
+    const RDouble refCoordOfTetrNodes2[10][3] =
+    {
+        { 0.0, 0.0, 0.0 }, { 1.0, 0.0, 0.0 }, { 0.0, 1.0, 0.0 }, { 0.0, 0.0, 1.0 }, //4 corner points
+        { 0.5, 0.0, 0.0 }, { 0.5, 0.5, 0.0 }, { 0.0, 0.5, 0.0 },
+        { 0.0, 0.0, 0.5 }, { 0.5, 0.0, 0.5 }, { 0.0, 0.5, 0.5 }
+    };
+
+    if(nNodes == 4)
+    {
+        nPoly = 1;
+        nNodes = 4;
+    }
+    else // if(nNodes == 10) //
+    {
+        nPoly = 2;
+        nNodes = 10;
+    }
+
+    vertexXi.resize(nNodes);
+    vertexEt.resize(nNodes);
+    vertexZt.resize(nNodes);
+
+    for(int iCornerPoint = 0; iCornerPoint < nNodes; ++ iCornerPoint)
+    {
+        vertexXi[iCornerPoint] = refCoordOfTetrNodes2[iCornerPoint][0];
+        vertexEt[iCornerPoint] = refCoordOfTetrNodes2[iCornerPoint][1];
+        vertexZt[iCornerPoint] = refCoordOfTetrNodes2[iCornerPoint][2];
+    }
+
+    const int dofOfShapeFunction = nNodes;
+    RDouble CoordIntegrationOfStand[3];
+    RDouble *ret = new RDouble [dofOfShapeFunction];  //the number of shape function equal to nNodes
+    RDouble *dShapeFun = new RDouble [3*dofOfShapeFunction];  //the number of shape function equal to nNodes
+
+    shapeFunctionAtIntegration.resize(nIntegrationPoint);
+    dXiShapeFunctionAtIntegration.resize(nIntegrationPoint);
+    dEtShapeFunctionAtIntegration.resize(nIntegrationPoint);
+    dZtShapeFunctionAtIntegration.resize(nIntegrationPoint);
+
+    switch(nPoly)
+    {
+    case 1:  //! @linear element
+        //  shapeFunctionAtIntegration
+        for(int iGaussPoint = 0; iGaussPoint < nIntegrationPoint; ++ iGaussPoint)
+        {
+            shapeFunctionAtIntegration[iGaussPoint].resize(dofOfShapeFunction);
+
+            dXiShapeFunctionAtIntegration[iGaussPoint].resize(dofOfShapeFunction);
+            dEtShapeFunctionAtIntegration[iGaussPoint].resize(dofOfShapeFunction);
+            dZtShapeFunctionAtIntegration[iGaussPoint].resize(dofOfShapeFunction);
+
+            CoordIntegrationOfStand[0] = xiIntegration[iGaussPoint];
+            CoordIntegrationOfStand[1] = etIntegration[iGaussPoint];
+            CoordIntegrationOfStand[2] = ztIntegration[iGaussPoint];
+
+            //! @get shape Function At Integration
+            ShapeFunctionOfTetr(CoordIntegrationOfStand, ret);           
+            for(int iDofShapeFunction = 0; iDofShapeFunction < dofOfShapeFunction; ++ iDofShapeFunction)
+            {
+                shapeFunctionAtIntegration[iGaussPoint][iDofShapeFunction] = ret[iDofShapeFunction]; //the number of shape function equal to nNodes
+            }
+
+            //! @get the grad of shape Function At Integration
+            int curDofOfShape = 0;
+            ShapeFunctionOfTetrGrad(dShapeFun);
+            for(int iDofShapeFunction = 0; iDofShapeFunction < dofOfShapeFunction; ++ iDofShapeFunction)
+            {
+                dXiShapeFunctionAtIntegration[iGaussPoint][iDofShapeFunction] = dShapeFun[curDofOfShape++];
+                dEtShapeFunctionAtIntegration[iGaussPoint][iDofShapeFunction] = dShapeFun[curDofOfShape++];
+                dZtShapeFunctionAtIntegration[iGaussPoint][iDofShapeFunction] = dShapeFun[curDofOfShape++];
+            }
+        }
+
+        break;
+
+    default:
+        break;
+    }
+
+    delete [] ret;    ret = NULL;
+    delete [] dShapeFun;    dShapeFun = NULL;
+}
+
+//! @brief Function, which creates all the data for a Pyramid element.
+void HighOrderStandardCell::DataStandardPyramid(void) 
+{
+/*--- Determine the shape functions and its derivatives in the integration points. ---*/
+    const RDouble refCoordOfPyraNodes[5][3] = 
+    {
+        { 0.0, 0.0, 0.0 }, { 1.0, 0.0, 0.0 }, { 1.0, 1.0, 0.0 }, { 0.0, 1.0, 0.0 }, // 4 corner points @ lower surface
+        { 0.0, 0.0, 1.0 } // 1 corner points @ upper surface
+    };
+
+    if(nNodes == 5)
+    {
+        nPoly = 1;
+        nNodes = 5;
+    }
+    else //if(nNodes == 13)
+    {
+        nPoly = 1;
+        nNodes = 5;
+    }
+
+    vertexXi.resize(nNodes);
+    vertexEt.resize(nNodes);
+    vertexZt.resize(nNodes);
+
+    for(int iCornerPoint = 0; iCornerPoint < nNodes; ++ iCornerPoint)
+    {
+        vertexXi[iCornerPoint] = refCoordOfPyraNodes[iCornerPoint][0];
+        vertexEt[iCornerPoint] = refCoordOfPyraNodes[iCornerPoint][1];
+        vertexZt[iCornerPoint] = refCoordOfPyraNodes[iCornerPoint][2];
+    }
+
+    const int dofOfShapeFunction = nNodes;
+    RDouble CoordIntegrationOfStand[3];
+    RDouble *ret = new RDouble [dofOfShapeFunction];  //the number of shape function equal to nNodes
+    RDouble *dShapeFun = new RDouble [3*dofOfShapeFunction];  //the number of shape function equal to nNodes
+
+    shapeFunctionAtIntegration.resize(nIntegrationPoint);
+    dXiShapeFunctionAtIntegration.resize(nIntegrationPoint);
+    dEtShapeFunctionAtIntegration.resize(nIntegrationPoint);
+    dZtShapeFunctionAtIntegration.resize(nIntegrationPoint);
+
+    switch(nPoly)
+    {
+    case 1:  //! @linear element
+        //  shapeFunctionAtIntegration
+        for(int iGaussPoint = 0; iGaussPoint < nIntegrationPoint; ++ iGaussPoint)
+        {
+            shapeFunctionAtIntegration[iGaussPoint].resize(dofOfShapeFunction);
+
+            dXiShapeFunctionAtIntegration[iGaussPoint].resize(dofOfShapeFunction);
+            dEtShapeFunctionAtIntegration[iGaussPoint].resize(dofOfShapeFunction);
+            dZtShapeFunctionAtIntegration[iGaussPoint].resize(dofOfShapeFunction);
+
+            CoordIntegrationOfStand[0] = xiIntegration[iGaussPoint];
+            CoordIntegrationOfStand[1] = etIntegration[iGaussPoint];
+            CoordIntegrationOfStand[2] = ztIntegration[iGaussPoint];
+
+            //! @get shape Function At Integration
+            ShapeFunctionOfPyra(CoordIntegrationOfStand, ret);           
+            for(int iDofShapeFunction = 0; iDofShapeFunction < dofOfShapeFunction; ++ iDofShapeFunction)
+            {
+                shapeFunctionAtIntegration[iGaussPoint][iDofShapeFunction] = ret[iDofShapeFunction]; //the number of shape function equal to nNodes
+            }
+
+            //! @get the grad of shape Function At Integration
+            int curDofOfShape = 0;
+            ShapeFunctionOfPyraGrad(CoordIntegrationOfStand, dShapeFun);
+            for(int iDofShapeFunction = 0; iDofShapeFunction < dofOfShapeFunction; ++ iDofShapeFunction)
+            {
+                dXiShapeFunctionAtIntegration[iGaussPoint][iDofShapeFunction] = dShapeFun[curDofOfShape++];
+                dEtShapeFunctionAtIntegration[iGaussPoint][iDofShapeFunction] = dShapeFun[curDofOfShape++];
+                dZtShapeFunctionAtIntegration[iGaussPoint][iDofShapeFunction] = dShapeFun[curDofOfShape++];
+            }
+        }
+
+        break;
+    case 2:  //! @quadratic element
+        //  shapeFunctionAtIntegration
+        cout << "Need add code for pyramid quadratic element" << endl;
+        break;
+    default:
+        break;
+    }
+
+    delete [] ret;    ret = NULL;
+    delete [] dShapeFun;    dShapeFun = NULL;
+}
+
+//! @brief Function, which creates all the data for a Prim element.
+void HighOrderStandardCell::DataStandardPrism(void)
+{
+
+  /*--- Determine the shape functions and its derivatives in the integration points. ---*/
+    const RDouble refCoordOfPrismNodes2[15][3] = 
+    {
+        { 0.0, 0.0, 0.0 }, // 6 corner points
+        { 1.0, 0.0, 0.0 },
+        { 0.0, 1.0, 0.0 },
+        { 0.0, 0.0, 1.0 },
+        { 1.0, 0.0, 1.0 },
+        { 0.0, 1.0, 1.0 },
+        { 0.5, 0.0, 0.0 }, // 3 edge mid-points @ lower surface
+        { 0.5, 0.5, 0.0 },
+        { 0.0, 0.5, 0.0 },
+        { 0.0, 0.0, 0.5 }, // 3 edge mid-points @ vertical edge
+        { 1.0, 0.0, 0.5 },
+        { 0.0, 1.0, 0.5 },
+        { 0.5, 0.0, 1.0 }, // 3 edge mid-points @ upper surface
+        { 0.5, 0.5, 1.0 },
+        { 0.0, 0.5, 1.0 }
+    };
+
+    if(nNodes == 6)
+    {
+        nPoly = 1;
+        nNodes = 6;
+    }
+    else //if(nNodes == 15)
+    {
+        nPoly = 2;
+        nNodes = 15;
+    }
+
+    vertexXi.resize(nNodes);
+    vertexEt.resize(nNodes);
+    vertexZt.resize(nNodes);
+
+    for(int iCornerPoint = 0; iCornerPoint < nNodes; ++iCornerPoint)
+    {
+        vertexXi[iCornerPoint] = refCoordOfPrismNodes2[iCornerPoint][0];
+        vertexEt[iCornerPoint] = refCoordOfPrismNodes2[iCornerPoint][1];
+        vertexZt[iCornerPoint] = refCoordOfPrismNodes2[iCornerPoint][2];
+    }
+
+    const int dofOfShapeFunction = nNodes;
+    RDouble CoordIntegrationOfStand[3];
+    RDouble *ret = new RDouble [dofOfShapeFunction];  //the number of shape function equal to nNodes
+    RDouble *dShapeFun = new RDouble [3*dofOfShapeFunction];  //the number of shape function equal to nNodes
+
+    shapeFunctionAtIntegration.resize(nIntegrationPoint);
+    dXiShapeFunctionAtIntegration.resize(nIntegrationPoint);
+    dEtShapeFunctionAtIntegration.resize(nIntegrationPoint);
+    dZtShapeFunctionAtIntegration.resize(nIntegrationPoint);
+
+    switch(nPoly)
+    {
+    case 1:  //! @linear element
+        //  shapeFunctionAtIntegration
+        for(int iGaussPoint = 0; iGaussPoint < nIntegrationPoint; ++ iGaussPoint)
+        {
+            shapeFunctionAtIntegration[iGaussPoint].resize(dofOfShapeFunction);
+
+            dXiShapeFunctionAtIntegration[iGaussPoint].resize(dofOfShapeFunction);
+            dEtShapeFunctionAtIntegration[iGaussPoint].resize(dofOfShapeFunction);
+            dZtShapeFunctionAtIntegration[iGaussPoint].resize(dofOfShapeFunction);
+
+            CoordIntegrationOfStand[0] = xiIntegration[iGaussPoint];
+            CoordIntegrationOfStand[1] = etIntegration[iGaussPoint];
+            CoordIntegrationOfStand[2] = ztIntegration[iGaussPoint];
+
+            //! @get shape Function At Integration
+            ShapeFunctionOfPrism(CoordIntegrationOfStand, ret);           
+            for(int iDofShapeFunction = 0; iDofShapeFunction < dofOfShapeFunction; ++ iDofShapeFunction)
+            {
+                shapeFunctionAtIntegration[iGaussPoint][iDofShapeFunction] = ret[iDofShapeFunction]; //the number of shape function equal to nNodes
+            }
+
+            //! @get the grad of shape Function At Integration
+            int curDofOfShape = 0;
+            ShapeFunctionOfPrismGrad(CoordIntegrationOfStand, dShapeFun);
+            for(int iDofShapeFunction = 0; iDofShapeFunction < dofOfShapeFunction; ++ iDofShapeFunction)
+            {
+                dXiShapeFunctionAtIntegration[iGaussPoint][iDofShapeFunction] = dShapeFun[curDofOfShape++];
+                dEtShapeFunctionAtIntegration[iGaussPoint][iDofShapeFunction] = dShapeFun[curDofOfShape++];
+                dZtShapeFunctionAtIntegration[iGaussPoint][iDofShapeFunction] = dShapeFun[curDofOfShape++];
+            }
+        }
+
+        break;
+
+    default:
+        break;
+    }
+
+    delete [] ret;    ret = NULL;
+    delete [] dShapeFun;    dShapeFun = NULL;
+}
+
+//! @brief Function, which creates all the data for a Hexahedron element.
+void HighOrderStandardCell::DataStandardHexahedron(void) {
+
+  /*--- Determine the shape functions and its derivatives in the integration points. ---*/
+    //const RDouble refCoordOfHexNodes2[20][3] = 
+    //{
+    //    { 0.0, 0.0, 0.0 }, { 1.0, 0.0, 0.0 }, { 1.0, 1.0, 0.0 }, { 0.0, 1.0, 0.0 }, // 4 corner points @ lower surface
+    //    { 0.0, 0.0, 1.0 }, { 1.0, 0.0, 1.0 }, { 1.0, 1.0, 1.0 }, { 0.0, 1.0, 1.0 }, // 4 corner points @ upper surface
+    //    { 0.5, 0.0, 0.0 }, { 1.0, 0.5, 0.0 }, { 0.5, 1.0, 0.0 }, { 0.0, 0.5, 0.0 }, // 4 edge mid-points @ lower surface
+    //    { 0.0, 0.0, 0.5 }, { 1.0, 0.0, 0.5 }, { 1.0, 1.0, 0.5 }, { 0.0, 1.0, 0.5 }, // 4 edge mid-points @ vertical surface
+    //    { 0.5, 0.0, 1.0 }, { 1.0, 0.5, 1.0 }, { 0.5, 1.0, 1.0 }, { 0.0, 0.5, 1.0 }  // 4 edge mid-points @ upper surface
+    //};
+
+    const RDouble refCoordOfHexNodes2[27][3] = 
+    {
+        { 0.0, 0.0, 0.0 }, { 1.0, 0.0, 0.0 }, { 1.0, 1.0, 0.0 }, { 0.0, 1.0, 0.0 }, // 4 corner points @ lower surface
+        { 0.0, 0.0, 1.0 }, { 1.0, 0.0, 1.0 }, { 1.0, 1.0, 1.0 }, { 0.0, 1.0, 1.0 }, // 4 corner points @ upper surface
+        { 0.5, 0.0, 0.0 }, { 1.0, 0.5, 0.0 }, { 0.5, 1.0, 0.0 }, { 0.0, 0.5, 0.0 }, // 4 edge mid-points @ lower surface
+        { 0.0, 0.0, 0.5 }, { 1.0, 0.0, 0.5 }, { 1.0, 1.0, 0.5 }, { 0.0, 1.0, 0.5 }, // 4 edge mid-points @ vertical surface
+        { 0.5, 0.0, 1.0 }, { 1.0, 0.5, 1.0 }, { 0.5, 1.0, 1.0 }, { 0.0, 0.5, 1.0 }, // 4 edge mid-points @ upper surface
+        { 0.5, 0.5, 0.0 },                                                          // 1 face mid-points @ lower surface
+        { 0.5, 0.0, 0.5 }, { 1.0, 0.5, 0.5 }, { 0.5, 1.0, 0.5 }, { 0.0, 0.5, 0.5 }, // 4 edge mid-points @ mid-surface
+        { 0.5, 0.5, 1.0 },                                                          // 1 face mid-points @ upper surface
+        { 0.5, 0.5, 0.5 }                                                           // 1 cell mid-points
+    };
+
+    if(nNodes == 8)
+    {
+        nPoly = 1;
+        nNodes = 8;
+    }
+    else //if(nNodes == 20)
+    {
+        nPoly = 2;
+        nNodes = 27;
+    }
+
+    vertexXi.resize(nNodes);
+    vertexEt.resize(nNodes);
+    vertexZt.resize(nNodes);
+
+    for(int iCornerPoint = 0; iCornerPoint < nNodes; ++iCornerPoint)
+    {
+        vertexXi[iCornerPoint] = refCoordOfHexNodes2[iCornerPoint][0];
+        vertexEt[iCornerPoint] = refCoordOfHexNodes2[iCornerPoint][1];
+        vertexZt[iCornerPoint] = refCoordOfHexNodes2[iCornerPoint][2];
+    }
+
+    const int dofOfShapeFunction = nNodes;
+    RDouble CoordIntegrationOfStand[3];
+    RDouble *ret = new RDouble [dofOfShapeFunction];  //the number of shape function equal to nNodes
+    RDouble *dShapeFun = new RDouble [3*dofOfShapeFunction];  //the number of shape function equal to nNodes
+
+    shapeFunctionAtIntegration.resize(nIntegrationPoint);
+    dXiShapeFunctionAtIntegration.resize(nIntegrationPoint);
+    dEtShapeFunctionAtIntegration.resize(nIntegrationPoint);
+    dZtShapeFunctionAtIntegration.resize(nIntegrationPoint);
+
+    switch(nPoly)
+    {
+    case 1:  //! @linear element
+        //  shapeFunctionAtIntegration
+        for(int iGaussPoint = 0; iGaussPoint < nIntegrationPoint; ++ iGaussPoint)
+        {
+            shapeFunctionAtIntegration[iGaussPoint].resize(dofOfShapeFunction);
+
+            dXiShapeFunctionAtIntegration[iGaussPoint].resize(dofOfShapeFunction);
+            dEtShapeFunctionAtIntegration[iGaussPoint].resize(dofOfShapeFunction);
+            dZtShapeFunctionAtIntegration[iGaussPoint].resize(dofOfShapeFunction);
+
+            CoordIntegrationOfStand[0] = xiIntegration[iGaussPoint];
+            CoordIntegrationOfStand[1] = etIntegration[iGaussPoint];
+            CoordIntegrationOfStand[2] = ztIntegration[iGaussPoint];
+
+            //! @get shape Function At Integration
+            ShapeFunctionOfHex(CoordIntegrationOfStand, ret);           
+            for(int iDofShapeFunction = 0; iDofShapeFunction < dofOfShapeFunction; ++ iDofShapeFunction)
+            {
+                shapeFunctionAtIntegration[iGaussPoint][iDofShapeFunction] = ret[iDofShapeFunction]; //the number of shape function equal to nNodes
+            }
+
+            //! @get the grad of shape Function At Integration
+            int curDofOfShape = 0;
+            ShapeFunctionOfHexGrad(CoordIntegrationOfStand, dShapeFun);
+            for(int iDofShapeFunction = 0; iDofShapeFunction < dofOfShapeFunction; ++ iDofShapeFunction)
+            {
+                dXiShapeFunctionAtIntegration[iGaussPoint][iDofShapeFunction] = dShapeFun[curDofOfShape++];
+                dEtShapeFunctionAtIntegration[iGaussPoint][iDofShapeFunction] = dShapeFun[curDofOfShape++];
+                dZtShapeFunctionAtIntegration[iGaussPoint][iDofShapeFunction] = dShapeFun[curDofOfShape++];
+            }
+        }
+
+        break;
+
+    default:
+        break;
+    }
+
+    delete [] ret;    ret = NULL;
+    delete [] dShapeFun;    dShapeFun = NULL;
+}
+
+bool HighOrderStandardFace::SameStandardElement(unsigned short val_VTK_Type, unsigned short val_nPoly, unsigned short valIntegrationOrder) 
+{
+  
+    if(val_VTK_Type           != VTK_Type       )      return false;
+    if(val_nPoly              != nPoly          )      return false;
+    if(valIntegrationOrder    != integrationOrder)      return false;
+    return true;
+}
+
+/*----------------------------------------------------------------------------------*/
+/*           Private member functions of HighOrderStandardCell.                       */
+/*----------------------------------------------------------------------------------*/
+
+void HighOrderStandardFace::Copy(const HighOrderStandardFace &other) 
+{
+    HighOrderStandardElementBase::Copy(other);
+
+    nPoly = other.nPoly;
+    nNodes = other.nNodes;  
+
+    vertexXiFace = other.vertexXiFace;
+    vertexEtFace = other.vertexEtFace;
+
+    shapeFuncAtFaceIntegration   = other.shapeFuncAtFaceIntegration;
+    dXiShapeFuncFaceIntegration = other.dXiShapeFuncFaceIntegration;
+    dEtShapeFuncFaceIntegration = other.dEtShapeFuncFaceIntegration;
+}
+
+HighOrderStandardFace::HighOrderStandardFace(unsigned short VTK_Type, unsigned short nFaceNodes, unsigned short integrationOrder) : 
+    HighOrderStandardElementBase(VTK_Type, integrationOrder)
+{
+    /*--- Copy the function arguments to the member variables. ---*/
+
+    //nPoly = val_nPoly;
+    nNodes = nFaceNodes;
+
+    /*--- Determine the element type and compute the other member variables. ---*/
+    switch(VTK_Type)
+    {
+    case TRIANGLE:
+        DataStandardTriangle();
+        break;
+    case QUADRILATERAL:
+        DataStandardQuadrilateral();
+        break;
+    default:
+        break;
+    }
+}
+
+//! @brief Function, which creates all the data for a triangle element.
+void HighOrderStandardFace::DataStandardTriangle(void)
+{
+/*--- Determine the shape functions and its derivatives in the integration points. ---*/
+    const RDouble refCoordOfTriNodes2[6][2] =
+    {
+        { 0.0, 0.0 }, // 3 corner points
+        { 1.0, 0.0 },
+        { 0.0, 1.0 },
+        { 0.5, 0.0 }, // 3 edge mid-points
+        { 0.5, 0.5 },
+        { 0.0, 0.5 }
+    };
+
+    if(nNodes == 3)
+    {
+        nPoly = 1;
+        nNodes = 3;
+    }
+    else //if(nNodes == 6)
+    {
+        nPoly = 2;
+        nNodes = 6;
+    }
+    
+    vertexXiFace.resize(nNodes);
+    vertexEtFace.resize(nNodes);
+
+    for(int iCornerPoint = 0; iCornerPoint < nNodes; ++iCornerPoint)
+    {
+        vertexXiFace[iCornerPoint] = refCoordOfTriNodes2[iCornerPoint][0];
+        vertexEtFace[iCornerPoint] = refCoordOfTriNodes2[iCornerPoint][1];
+    }
+    
+    const int dofOfShapeFunction = nNodes;
+    RDouble CoordIntegrationOfStand[2];
+    RDouble *ret = new RDouble [dofOfShapeFunction];  //the number of shape function equal to nNodes
+    RDouble *dShapeFun = new RDouble [2*dofOfShapeFunction];  //the number of shape function equal to nNodes
+    
+    shapeFuncAtFaceIntegration.resize(nIntegrationPoint);
+    dXiShapeFuncFaceIntegration.resize(nIntegrationPoint);
+    dEtShapeFuncFaceIntegration.resize(nIntegrationPoint);
+
+    switch(nPoly)
+    {
+    case 1:  //! @linear element
+        //  shapeFunctionAtIntegration
+        for(int iGaussPoint = 0; iGaussPoint < nIntegrationPoint; ++ iGaussPoint)
+        {
+            shapeFuncAtFaceIntegration[iGaussPoint].resize(dofOfShapeFunction);
+
+            dXiShapeFuncFaceIntegration[iGaussPoint].resize(dofOfShapeFunction);
+            dEtShapeFuncFaceIntegration[iGaussPoint].resize(dofOfShapeFunction);
+
+            CoordIntegrationOfStand[0] = xiIntegration[iGaussPoint];
+            CoordIntegrationOfStand[1] = etIntegration[iGaussPoint];
+
+            //! @get shape Function At Integration
+            ShapeFunctionOfTri(CoordIntegrationOfStand, ret);
+            for(int iDofShapeFunction = 0; iDofShapeFunction < dofOfShapeFunction; ++ iDofShapeFunction)
+            {
+                shapeFuncAtFaceIntegration[iGaussPoint][iDofShapeFunction] = ret[iDofShapeFunction]; //the number of shape function equal to nNodes
+            }
+
+            //! @get the grad of shape Function At Integration
+            int curDofOfShape = 0;
+            ShapeFunctionOfTriGrad(dShapeFun);
+            for(int iDofShapeFunction = 0; iDofShapeFunction < dofOfShapeFunction; ++ iDofShapeFunction)
+            {
+                dXiShapeFuncFaceIntegration[iGaussPoint][iDofShapeFunction] = dShapeFun[curDofOfShape++];
+                dEtShapeFuncFaceIntegration[iGaussPoint][iDofShapeFunction] = dShapeFun[curDofOfShape++];
+            }
+        }
+        break;
+
+    default:
+        break;
+    }
+    delete [] ret;    ret = NULL;
+    delete [] dShapeFun;    dShapeFun = NULL;
+}
+
+//! @brief Function, which creates all the data for a Quadrilateral element.
+void HighOrderStandardFace::DataStandardQuadrilateral(void)
+{
+    /*--- Determine the shape functions and its derivatives in the integration points. ---*/
+    const RDouble refCoordOfQuadNodes2[8][2] =
+    {
+        { 0.0, 0.0 }, // 4 corner points
+        { 1.0, 0.0 },
+        { 1.0, 1.0 },
+        { 0.0, 1.0 },
+        { 0.5, 0.0 }, // 4 edge mid-points
+        { 1.0, 0.5 },
+        { 0.5, 1.0 },
+        { 0.0, 0.5 }
+    };
+
+    if(nNodes == 4)
+    {
+        nPoly = 1;
+        nNodes = 4;
+    }
+    else //if(nNodes == 8)
+    {
+        nPoly = 2;
+        nNodes = 8;
+    }
+    
+    vertexXiFace.resize(nNodes);
+    vertexEtFace.resize(nNodes);
+
+    for(int iCornerPoint = 0; iCornerPoint < nNodes; ++iCornerPoint)
+    {
+        vertexXiFace[iCornerPoint] = refCoordOfQuadNodes2[iCornerPoint][0];
+        vertexEtFace[iCornerPoint] = refCoordOfQuadNodes2[iCornerPoint][1];
+    }
+
+    const int dofOfShapeFunction = nNodes;
+    RDouble CoordIntegrationOfStand[2];
+    RDouble *ret = new RDouble [dofOfShapeFunction];  //the number of shape function equal to nNodes
+    RDouble *dShapeFun = new RDouble [2*dofOfShapeFunction];  //the number of shape function equal to nNodes
+
+    shapeFuncAtFaceIntegration.resize(nIntegrationPoint);
+    dXiShapeFuncFaceIntegration.resize(nIntegrationPoint);
+    dEtShapeFuncFaceIntegration.resize(nIntegrationPoint);
+
+    switch(nPoly)
+    {
+    case 1:  //! @linear element
+        //  shapeFunctionAtIntegration
+        for(int iGaussPoint = 0; iGaussPoint < nIntegrationPoint; ++ iGaussPoint)
+        {
+            shapeFuncAtFaceIntegration[iGaussPoint].resize(dofOfShapeFunction);
+
+            dXiShapeFuncFaceIntegration[iGaussPoint].resize(dofOfShapeFunction);
+            dEtShapeFuncFaceIntegration[iGaussPoint].resize(dofOfShapeFunction);
+
+            CoordIntegrationOfStand[0] = xiIntegration[iGaussPoint];
+            CoordIntegrationOfStand[1] = etIntegration[iGaussPoint];
+
+            //! @get shape Function At Integration
+            ShapeFunctionOfQuad(CoordIntegrationOfStand, ret);           
+            for(int iDofShapeFunction = 0; iDofShapeFunction < dofOfShapeFunction; ++ iDofShapeFunction)
+            {
+                shapeFuncAtFaceIntegration[iGaussPoint][iDofShapeFunction] = ret[iDofShapeFunction]; //the number of shape function equal to nNodes
+            }
+
+            //! @get the grad of shape Function At Integration
+            int curDofOfShape = 0;
+            ShapeFunctionOfQuadGrad(CoordIntegrationOfStand, dShapeFun);
+            for(int iDofShapeFunction = 0; iDofShapeFunction < dofOfShapeFunction; ++ iDofShapeFunction)
+            {
+                dXiShapeFuncFaceIntegration[iGaussPoint][iDofShapeFunction] = dShapeFun[curDofOfShape++];
+                dEtShapeFuncFaceIntegration[iGaussPoint][iDofShapeFunction] = dShapeFun[curDofOfShape++];
+            }
+        }
+        break;
+
+    default:
+        break;
+    }
+    delete [] ret;    ret = NULL;
+    delete [] dShapeFun;    dShapeFun = NULL;
+
+}
+
+}
+
diff --git a/CFD/IncomSolver/include/IncomCalculator.h b/CFD/IncomSolver/include/IncomCalculator.h
new file mode 100644
index 0000000..b9081c2
--- /dev/null
+++ b/CFD/IncomSolver/include/IncomCalculator.h
@@ -0,0 +1,84 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      IncomCalculator.h
+//! @brief     SIMPLE class solver.
+//! @author    WanYunbo, Bell, XuGang.
+
+#pragma once
+
+#include <map>
+#include <iostream>
+#include "IncomCalculator.h"
+#include "CFDSolver.h"
+#include "hypreCalculator.h"
+
+
+namespace PHSPACE
+{
+    class UnstructGrid;
+
+    class IncomCalculator
+    {
+
+    public:
+        IncomCalculator() {};
+        ~IncomCalculator() {};
+
+    public:
+
+        virtual void SetSolverIndex(int solverIndex) { this->solverIndex = solverIndex; }
+        virtual int GetSolverIndex() { return this->solverIndex; }
+        virtual int GetSolverIndex(int iEquation);
+
+        virtual void calculateLinearEquation(Grid* grid, int iEquation,
+            RDouble* x, RDouble* diagCoef, RDouble* b, RDouble* upACOFFace, RDouble* downACOFFace);
+
+        virtual void SetAxEqualbCalculator(LinearEquationSystemCalculator* hypreAxEqbSolverIn);
+
+        virtual void CalcRes(Grid* grid, int iEquation,
+            RDouble* x, RDouble* diagCoef, RDouble* b, RDouble* upACOFFace, RDouble* downACOFFace);
+
+
+        void SkewnessCorrection(Grid*  grid, RDouble* phi, RDouble* dphidx, RDouble* dphidy, RDouble* dphidz);
+
+        void FaceGradCorrection(Grid*  grid, RDouble* dphidxf, RDouble* dphidyf, RDouble* dphidzf, RDouble* phi, RDouble* dphidx, RDouble* dphidy, RDouble* dphidz);
+
+        void FaceValueCorretion(Grid*  grid, RDouble* dphidxf, RDouble* dphidyf, RDouble* dphidzf, RDouble* phif, RDouble* phi);
+
+        void GradCorrection(Grid*  grid, RDouble* phif, RDouble* phi, RDouble* dphidx, RDouble* dphidy, RDouble* dphidz);
+
+        virtual void GradientCalculation(Grid*  grid, string phiName, string dphidxName, string dphidyName, string dphidzName, bool isComm = false);
+        void calcFaceWeight(Grid*  grid);
+    public:
+
+        void CompressAnInterfaceVar(RDouble *field);
+        void CommunicateAnInterfaceVar();
+        void DecompressAnInterfaceVar(RDouble *field);
+        void CommunicateAnInterfaceVar(RDouble *field);
+
+        void CompressAnInterfaceVar(DataContainer *&dataContainer, RDouble *field, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex);
+        void DecompressAnInterfaceVar(DataContainer *&dataContainer, RDouble *field, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex);
+
+        void InitializeMatrixACoeff(Grid* gridIn);
+        void InitializeBCoeff(Grid* gridIn);
+
+    public:
+        LinearEquationSystemCalculator* AxEqualbCalculator;
+
+        int solverIndex;
+
+        vector <PH_Request > requestContainer;
+        vector <vector <DataContainer *> > receivedDataBuffer;
+        vector <vector <DataContainer *> > sendDataBuffer;
+
+    };
+}
diff --git a/CFD/IncomSolver/include/IncomEnergyEqCalculator.h b/CFD/IncomSolver/include/IncomEnergyEqCalculator.h
new file mode 100644
index 0000000..aedc425
--- /dev/null
+++ b/CFD/IncomSolver/include/IncomEnergyEqCalculator.h
@@ -0,0 +1,63 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      IncomEnergyEqCalculator.h
+//! @brief     energy equation solver.
+//! @author    WanYunbo, Bell, XuGang.
+
+#pragma once
+
+#include "IncomScalarEqCalculator.h"
+#include "IncomGas.h"
+
+namespace PHSPACE
+{
+class IncomEnergyEqCalculator : public IncomScalarEqCalculator
+{
+public:
+    IncomEnergyEqCalculator();
+    ~IncomEnergyEqCalculator();
+
+public:
+
+    void InitFlowAsRestart(Grid* gridIn);
+    void AllocateGlobalVar(Grid *gridIn);
+    void IncompressibleInitial(Grid* grid);
+    void UpdateProperties(Grid* grid);
+
+    void CalcGrad(Grid*  grid);
+    void CalcOtherbCoeff(Grid* grid, int iEquation);
+
+    void calWallBC(Grid*  grid, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+        RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff);
+
+    void calVelocityInletBC(Grid*  grid, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+        RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff);
+
+    void calPressureInletBC(Grid*  grid, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+        RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff);
+    
+    void calPressureOutletBC(Grid*  grid, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+        RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff);
+    
+    void calFarfieldBC(Grid*  grid, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+        RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff);
+
+    void calInterfaceBC(Grid* gridIn, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+        RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff);
+
+    void GetResidual(Grid *grid, vector<RDouble>& res);
+    void InitialUnsteadyVar(Grid* grid);
+    void UpdateUnsteadyVariable(Grid* grid);
+    void UpdateBCValue(Grid*  grid);
+};
+
+}
\ No newline at end of file
diff --git a/CFD/IncomSolver/include/IncomGas.h b/CFD/IncomSolver/include/IncomGas.h
new file mode 100644
index 0000000..28747b2
--- /dev/null
+++ b/CFD/IncomSolver/include/IncomGas.h
@@ -0,0 +1,138 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      IncomGas.h
+//! @brief     Explain this file briefly.
+//! @author    Ming Pingjian, Sun Huawen, Huang Jin.
+
+#pragma once
+#include "Precision.h"
+#include "PerfectGas.h"
+#include "Geo_UnstructGrid.h"
+#include <string>
+using namespace std;
+
+namespace PHSPACE
+{
+namespace GAS_SPACE
+{
+
+class IncomGas :public PerfectGas
+{
+public:
+	IncomGas();
+	~IncomGas();
+
+	typedef enum
+	{
+		rhoConstant = 0,
+		rhoIncompressibleIdealGas,
+		rhoIdealGas,
+		rhoVolumnWeightedMixingLaw
+	}RhoProperty;
+
+	typedef enum
+	{
+		muConstant = 0,
+		muSutherLand,
+		muIdealGasMixingLaw,
+		muMassWeightedMixingLaw,
+		muPiecewiseLinear,
+		muPiecewisePolynomial,
+		muPolynomial,
+		muPowerLaw
+	}MuProperty;
+
+	typedef enum
+	{
+		cpConstant = 0,
+		cpMixing,
+		cpPiecewiseLinear,
+		cpPiecewisePolynomial,
+		cpPolynomial
+	}CpProperty;
+
+	typedef enum
+	{
+		kConstant = 0,
+		kMassWeightedMixingLaw,
+		kIdealGasMixingLaw,
+		kPiecewiseLinear,
+		kPiecewisePolynomial,
+		kPolynomial
+	}KProperty;
+
+	typedef enum
+	{
+		massDiffConstantDiluteApprox = 0,
+		massDiffDiluteApprox,
+		massDiffMulticomponent,
+		massDiffUnityLewisNumber
+	}MassDiffProperty;
+
+public:
+	void InitCommonParameter();
+
+	void InitParameterForMu();
+	void InitParameterForK();
+	void InitParameterForMassdiff();
+
+	void SetGasName(string gasName);
+	void SetGasMolarMass(string gasMolarMass);
+	void SetGasRho(string gasRho);
+	void SetGasMu(string gasMu);
+	void SetGasCp(string gasCp);
+	void SetGasK(string gasK);
+
+	string* GetGasName() { return gasNameList; }
+	RDouble* GetGasMolarMass() { return gasMolarMassList; }
+	RDouble* GetGasRho() { return gasRhoList; }
+	RDouble* GetGasMu() { return gasMuList; }
+	RDouble* GetGasCp() { return gasCpList; }
+	RDouble* GetGasK() { return gasKList; }
+
+
+public:
+	void UpdateRg(UnstructGrid* grid, RDouble* Rg);
+	void UpdateRho(UnstructGrid* grid, RDouble* rho);
+	void UpdateMu(UnstructGrid* grid, RDouble* mu);
+	void UpdateCp(UnstructGrid* grid, RDouble* cp);
+	void UpdateK(UnstructGrid* grid, RDouble* k);
+	void UpdateMassDiff(UnstructGrid* grid, int iGas, RDouble* massdiff);
+
+protected:
+	void ComputePhiIJ();
+	void ComputeAmountOfSubstance(UnstructGrid* grid, RDouble** amountOfSubstance, RDouble** amountFracOfSubstance);
+	void SetPropertyLib();
+
+private:
+	vector<string> componentLib;
+	typedef struct {
+		RDouble molarMass;
+		RDouble rho;
+		RDouble mu;
+		RDouble cp;
+		RDouble k;
+	} propertySp;
+	map<string, propertySp> propertyLib;
+
+	enum propertyIndex
+	{
+		sp_rho = 0,
+	    sp_mu  = 1,
+		sp_k   = 2,
+		sp_cp  = 3,
+		sp_molarMass = 4,
+	};
+};
+
+}
+}
\ No newline at end of file
diff --git a/CFD/IncomSolver/include/IncomKETurbEpsilonEqCalculator.h b/CFD/IncomSolver/include/IncomKETurbEpsilonEqCalculator.h
new file mode 100644
index 0000000..a17256e
--- /dev/null
+++ b/CFD/IncomSolver/include/IncomKETurbEpsilonEqCalculator.h
@@ -0,0 +1,58 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      IncomKETurbEpsilonEqCalculator.h
+//! @brief     Epsilon equation of KE solver.
+//! @author    WanYunbo, Bell, XuGang.
+
+#pragma once
+
+#include <vector>
+#include "IncomScalarEqCalculator.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+class IncomKETurbEpsilonEqCalculator : public IncomScalarEqCalculator
+{
+public:
+    IncomKETurbEpsilonEqCalculator();
+    virtual ~IncomKETurbEpsilonEqCalculator();
+
+    void SetDiffusionCoeff(Grid* gridIn);
+    void InitFlowAsRestart(Grid* gridIn);
+    
+    void solveScalarEquation(Grid* grid, int iEquation);
+    
+    void UpdateProperties(Grid* grid);
+    
+    void CalcOtherMatrixACoeff(Grid* grid);
+    void CalcOtherbCoeff(Grid* grid, int iEquation);
+    
+    void GetResidual(Grid *grid, vector<RDouble>& res);
+    void InitialUnsteadyVar(Grid* grid);
+    void UpdateUnsteadyVariable(Grid* grid);
+    void UpdateBCValue(Grid*  grid);
+
+public:
+    void calWallBC(Grid*  grid, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+        RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff);
+
+    void WallModification(Grid*  grid);
+    
+    void CalcGenTerm(Grid*  grid);
+    void UpdateWallGen(Grid*  grid);
+
+public:
+};
+
+}
diff --git a/CFD/IncomSolver/include/IncomKETurbKEqCalculator.h b/CFD/IncomSolver/include/IncomKETurbKEqCalculator.h
new file mode 100644
index 0000000..ebf96ff
--- /dev/null
+++ b/CFD/IncomSolver/include/IncomKETurbKEqCalculator.h
@@ -0,0 +1,49 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      IncomKETurbKEqCalculator.h
+//! @brief     Kinetic equation of KE solver.
+//! @author    WanYunbo, Bell, XuGang.
+
+
+#pragma once
+
+#include <vector>
+#include "IncomScalarEqCalculator.h"
+#include "CFDSolver.h"
+#include "TK_Exit.h"
+
+using namespace std;
+namespace PHSPACE
+{
+class IncomKETurbKEqCalculator : public IncomScalarEqCalculator
+{
+public:
+    IncomKETurbKEqCalculator();
+    virtual ~IncomKETurbKEqCalculator();
+
+    void AllocateGlobalVar(Grid *grid);
+    void InitFlowAsRestart(Grid* grid);
+    void IncompressibleInitial(Grid* grid);
+    void SetDiffusionCoeff(Grid* grid);
+    void UpdateProperties(Grid* grid);
+
+    void CalcOtherMatrixACoeff(Grid* grid);
+    void CalcOtherbCoeff(Grid* grid, int iEquation);
+    
+    void GetResidual(Grid *grid, vector<RDouble>& res);
+    void InitialUnsteadyVar(Grid* grid);
+    void UpdateUnsteadyVariable(Grid* grid);
+    void UpdateBCValue(Grid*  grid);
+
+};
+
+}
diff --git a/CFD/IncomSolver/include/IncomSATurbKEqCalculator.h b/CFD/IncomSolver/include/IncomSATurbKEqCalculator.h
new file mode 100644
index 0000000..8eabd05
--- /dev/null
+++ b/CFD/IncomSolver/include/IncomSATurbKEqCalculator.h
@@ -0,0 +1,63 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      IncomSATurbKEqCalculator.h
+//! @brief     Kinetic equation of SA solver.
+//! @author    WanYunbo, Bell, XuGang.
+#pragma once
+
+#include <vector>
+#include "IncomScalarEqCalculator.h"
+#include "TK_Exit.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+class IncomSATurbKEqCalculator : public IncomScalarEqCalculator
+{
+public:
+    IncomSATurbKEqCalculator();
+    virtual ~IncomSATurbKEqCalculator();
+
+    void InitFlowAsRestart(Grid* gridIn);
+    void AllocateGlobalVar(Grid *gridIn);
+    void IncompressibleInitial(Grid* grid);
+    void SetDiffusionCoeff(Grid* gridIn);
+    void UpdateAfterIterloop(Grid* grid);//! Updates the viscosity of the momentum equation
+
+    void calWallBC(Grid*  grid, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+        RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff);
+
+    void calVelocityInletBC(Grid*  grid, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+        RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff);
+
+    void calPressureOutletBC(Grid*  grid, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+        RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff);
+
+
+    void CalcOtherMatrixACoeff(Grid* grid);
+    void CalcOtherbCoeff(Grid* grid, int iEquation);
+    
+    void GetResidual(Grid *grid, vector<RDouble>& res);
+
+    void InitialUnsteadyVar(Grid* grid);
+    void UpdateUnsteadyVariable(Grid* grid);
+    void UpdateBCValue(Grid*  grid);
+
+    void CalcGrad(Grid*  grid);
+
+
+
+};
+
+}
+
diff --git a/CFD/IncomSolver/include/IncomScalarEqCalculator.h b/CFD/IncomSolver/include/IncomScalarEqCalculator.h
new file mode 100644
index 0000000..f9c6e6f
--- /dev/null
+++ b/CFD/IncomSolver/include/IncomScalarEqCalculator.h
@@ -0,0 +1,133 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      IncomScalarEqCalculator.h
+//! @brief     scalar solver.
+//! @author    WanYunbo, Bell, XuGang.
+#pragma once
+
+#include "IO_FileName.h"
+#include "IncomCalculator.h"
+
+#include "TK_Exit.h"
+
+
+namespace PHSPACE
+{
+class IncomScalarEqCalculator : public IncomCalculator
+{
+public:
+
+public:
+    IncomScalarEqCalculator();
+    ~IncomScalarEqCalculator();
+
+public:
+    virtual void GetResidual(Grid *grid, vector<RDouble>& res);
+
+    virtual void InitFlowAsRestart(Grid* gridIn);
+    virtual void AllocateGlobalVar(Grid *gridIn);
+    virtual void InitialUnsteadyVar(Grid* grid) {};
+    virtual void IncompressibleInitial(Grid* grid);
+    virtual void UpdateUnsteadyVariable(Grid *grid);
+
+public:
+    virtual void solveScalarEquation(Grid* grid, int iEquation);
+    virtual void constructMatrixACoeff(Grid* grid, int iEquation);
+    virtual void constructBCoeff(Grid* grid, int iEquation);
+    
+    virtual void UpdateBCValue(Grid* grid);
+    virtual void UpdateProperties(Grid* grid) {};
+    virtual void UpdateAfterIterloop(Grid* grid) {};
+    virtual void UpdateUnsteadyProperties(Grid* grid) {};
+    virtual void UpdateUnsteadyFlux(Grid* grid) {};
+
+    void Post() {};
+
+public:
+    virtual void AllocateUnsteadyVar(Grid*  grid);
+    virtual void CalcGrad(Grid*  grid);
+    virtual void SetDiffusionCoeff(Grid* grid);
+    virtual void CalcOtherMatrixACoeff(Grid* grid) {};
+    virtual void CalcOtherbCoeff(Grid* grid, int iEquation) {};
+    
+public:
+
+    void treatBC(Grid*  grid, int iVariable, RDouble matrixCoeff);
+
+    virtual void calWallBC(Grid*  grid, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+        RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff);
+    virtual void calSymmetryBC(Grid*  grid, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+        RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff);
+
+    virtual void calVelocityInletBC(Grid*  grid, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+        RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff);
+
+    virtual void calPressureOutletBC(Grid*  grid, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+        RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff);
+
+    virtual void calInterfaceBC(Grid*  grid, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+        RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff);
+    
+    virtual void calPressureInletBC(Grid*  grid, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+        RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff);
+
+    virtual void calFarfieldBC(Grid*  grid, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+        RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff);
+
+
+    void  calcInvisSourceTerm(Grid*  grid, int solverIndex);
+
+    void  FirstUpwindInvisTerm(Grid*  grid);
+
+    void  SecondUpWindSourceTerm(Grid*  grid, int solverIndex);
+
+    void  QUICKSourceTerm(Grid*  grid, int solverIndex);
+
+    void  SecondCentralSourceTerm(Grid*  grid, int solverIndex);
+
+    void VisMatrixTerm(Grid*  grid, int solverIndex);
+
+    void VisSourceTerm(Grid*  grid, int solverIndex);
+
+
+    void calcTransMatrixTerm(Grid*  grid);
+
+    void TransMatrixTerm_1st(Grid*  grid);
+
+    void TransMatrixTerm_2nd(Grid*  grid);
+
+    void calcTransSourceTerm(Grid*  grid, int iVariable);
+
+    void TransSourceTerm_1st(Grid*  grid, int iVariable);
+
+    void TransSourceTerm_2nd(Grid*  grid, int iVariable);
+
+    void relaxMatrixTerm(Grid*  grid, int iVariable);
+
+    void relaxSourceTerm(Grid*  grid, int iVariable);
+
+    void ImplicitEuler_AllocateMemory(Grid *grid, vector<string> &phiName);
+    void ImplicitEuler_ReInitTimeVar(Grid*  grid, vector<string>& phiName);
+    void ImplicitEuler_SaveOldTimeValue(Grid *grid, vector<string> &phiName);
+    void ImplicitEuler_InitRestartTimeVar(Grid* grid, vector<string>& nameLists);
+    void ImplicitEuler_ReadRestartFile(Grid* grid, vector<string>& nameLists, hid_t grploc);
+
+
+    void Implicit2ndOrder_AllocateMemory(Grid *grid, vector<string> &phiName);
+    void Implicit2ndOrder_ReInitTimeVar(Grid*  grid, vector<string>& phiName);
+    void Implicit2ndOrder_SaveOldTimeValue(Grid *grid, vector<string> &phiName);
+    void Implicit2ndOrder_InitRestartTimeVar(Grid* grid, vector<string>& nameLists);
+    void Implicit2ndOrder_ReadRestartFile(Grid* grid, vector<string>& nameLists, hid_t grploc);
+    
+};
+
+}
diff --git a/CFD/IncomSolver/include/IncomSpeciesEqCalculator.h b/CFD/IncomSolver/include/IncomSpeciesEqCalculator.h
new file mode 100644
index 0000000..fba7dfe
--- /dev/null
+++ b/CFD/IncomSolver/include/IncomSpeciesEqCalculator.h
@@ -0,0 +1,44 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      IncomSpeciesEqCalculator.h
+//! @brief     Species solver.
+//! @author    WanYunbo, Bell, XuGang.
+
+#pragma once
+
+#include "IncomScalarEqCalculator.h"
+#include "IncomGas.h"
+
+namespace PHSPACE
+{
+class IncomSpeciesEqCalculator : public IncomScalarEqCalculator
+{
+public:
+    IncomSpeciesEqCalculator();
+    ~IncomSpeciesEqCalculator();
+
+public:
+    void InitFlowAsRestart(Grid* gridIn);
+    void IncompressibleInitial(Grid* grid);
+
+    virtual void UpdateProperties(Grid* grid);
+    void UpdateAfterIterloop(Grid* grid);
+    void UpdateSpBoundary(Grid* grid);
+
+    void GetResidual(Grid *grid, vector<RDouble>& res);
+    void InitialUnsteadyVar(Grid* grid);
+    void UpdateUnsteadyVariable(Grid* grid);
+    void UpdateBCValue(Grid*  grid);
+    void SetDiffusionCoeff(Grid* gridIn);
+};
+
+}
\ No newline at end of file
diff --git a/CFD/IncomSolver/include/IncomUnstructSolver.h b/CFD/IncomSolver/include/IncomUnstructSolver.h
new file mode 100644
index 0000000..bfbf299
--- /dev/null
+++ b/CFD/IncomSolver/include/IncomUnstructSolver.h
@@ -0,0 +1,96 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      IncomUnstructSolver.h
+//! @brief     Species solver.
+//! @author    WanYunbo, Bell, XuGang.
+
+#pragma once
+
+#include <map>
+#include <iostream>
+
+#include "IncomSpeciesEqCalculator.h"
+#include "IncomEnergyEqCalculator.h"
+#include "IncomKETurbKEqCalculator.h"
+#include "IncomKETurbEpsilonEqCalculator.h"
+#include "IncomSATurbKEqCalculator.h"
+#include "MomEqCalculator.h"
+#include "PPEqCalculator.h"
+#include "hypreCalculator.h"
+#include "Param_INCompSolverUnstruct.h"
+
+namespace PHSPACE
+{
+
+    class IncomUnstructSolver : public CFDSolver
+    {
+    public:
+        IncomUnstructSolver();
+        ~IncomUnstructSolver();
+
+    public:
+        void DumpResultFile(Grid* grid, int level = 0);
+        void DumpResidual(Grid* grid);
+        
+        void InitFlowAsReadingRestart(ActionKey* actkey);
+        void ReadRestartH5(ActionKey* actkey);
+        void DumpRestartH5(ActionKey* actkey);
+        void CreateH5RestartFile(ActionKey* actkey);
+
+        void AirForceCoef(ActionKey* actkey);
+        void AirForceCoefParts(ActionKey* actkey, int partID, int Coordinate = GlobalCoordinate);
+        void CpDistriCoef(ActionKey* actkey);
+
+        void IncompressibleInitial(Grid* grid);
+        void UpdateUnsteadyProperties(Grid* grid);
+        void UpdateUnsteadyFlux(Grid* grid);
+        void UpdateUnsteadyVariable(Grid* grid);
+        void GetResidual(Grid *grid, vector<RDouble>& res);
+        void GetPhiName(vector<string>& phiName);
+        void SolveIncomSteadyField();
+        void SolveTurbulenceEquation(Grid* gridIn);
+        void SolveEnergyEquation(Grid* gridIn);
+        void SolveSpeciesEquation(Grid* gridIn);
+
+        void SolutionIsConverged(Grid* grid, bool* flag);
+        virtual void AllocateGlobalVar(Grid * gridIn);
+        void InitControlParameters();
+        LIB_EXPORT Param_INCompSolverUnstruct * GetControlParameters() const;
+        virtual void ComputePostVisualVariables(Post_Visual *postVisualization);
+        
+        void CommunicationInterfaceData() {};
+
+        void InitFlowAsRestart();
+        bool JudgeIfRestart();
+        void InitDependentVariables();
+        void ConstructLocalCell2GlobalCellMap(Grid* grid);
+        void SetAxEqbSolver (Grid* grid);
+
+        void UpdateUnsteadyFlow(Grid* grid);
+
+    public:
+
+        MomEqCalculator* momEqCalculator;
+        PPEqCalculator* PPEquaCalculator;
+        IncomScalarEqCalculator* IncomTurbKSolver;
+        IncomScalarEqCalculator* IncomTurbEplisionSolver;
+        IncomScalarEqCalculator* IncomTurbSASolver;
+        IncomScalarEqCalculator* IncomEnergySolver;
+        IncomScalarEqCalculator** IncomSpeciesSolver;
+
+        LinearEquationSystemCalculator* AxEqualbCalculator;
+
+    public:
+        virtual void Post() {}
+    };
+
+}
diff --git a/CFD/IncomSolver/include/LinearEquationSystemCalculator.h b/CFD/IncomSolver/include/LinearEquationSystemCalculator.h
new file mode 100644
index 0000000..80b28b8
--- /dev/null
+++ b/CFD/IncomSolver/include/LinearEquationSystemCalculator.h
@@ -0,0 +1,41 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      LinearEquationSystemCalculator.h
+//! @brief     solve Linear Equation System.
+//! @author    WanYunbo, Bell.
+
+#pragma once
+
+#include "Geo_UnstructGrid.h"
+
+namespace PHSPACE
+{
+class LinearEquationSystemCalculator
+{
+
+public:
+    // constructor & destructor
+    LinearEquationSystemCalculator() {};
+
+    virtual ~LinearEquationSystemCalculator() {};
+
+public:
+    virtual void explicitSolve(Grid* gridIn, RDouble* x, RDouble* diagCoef, RDouble* b, RDouble* upACOFFace, RDouble* downACOFFace) {};
+    virtual void mathLibSolveInit(Grid* gridIn){};
+    virtual void mathLibSolve(Grid* gridIn, int iEquation, RDouble * x, RDouble * diagCoef, RDouble *b, RDouble * upACOFFace, RDouble * downACOFFace) {};
+    virtual void mathLibSolveFinalize(){};
+
+};
+
+
+}
+
diff --git a/CFD/IncomSolver/include/MomEqCalculator.h b/CFD/IncomSolver/include/MomEqCalculator.h
new file mode 100644
index 0000000..205165d
--- /dev/null
+++ b/CFD/IncomSolver/include/MomEqCalculator.h
@@ -0,0 +1,69 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      MomEqCalculator.h
+//! @brief     mom equation solver.
+//! @author    WanYunbo, Bell.
+#pragma once
+
+#include <map>
+#include <iostream>
+#include "IncomGas.h"
+#include "IncomScalarEqCalculator.h"
+
+namespace PHSPACE
+{
+    class UnstructGrid;
+    class MomEqCalculator : public IncomScalarEqCalculator
+    {
+
+    public:
+        MomEqCalculator();
+        ~MomEqCalculator() {};
+
+    public:
+
+        void CalcGrad(Grid* grid);
+        void solveMomentumEquations(Grid*  grid);
+        void solveScalarEquation(Grid*  grid, int iEquation);
+        
+        void CalcVelocityRes(UnstructGrid *grid);
+
+        void CoefPrepForPres(Grid*  grid);
+        void CorrectFaceFlux(Grid*  grid);
+        void calcFaceFlux(Grid*  grid);
+        void updateBCValue(Grid*  grid);
+        void pressureSourceTerm(Grid*  grid, int iVariable);
+        void BulkVisSourceTerm(Grid*  grid, int iVariable);
+        void GravitySourceTerm(Grid*  grid, int iVariable);
+
+        virtual void CalcOtherbCoeff(Grid* gridIn, int iVariable);
+        
+        void SolveExplicitVelocityEquations(Grid*  grid);
+        void UpdateUnsteadyFlux(Grid*  grid);
+        void IncompressibleInitial(Grid*  grid);
+        void CalcWalldistOnWall(Grid*  grid);
+        void UpdateBoundaryPressureAndVelocity(Grid*  grid);
+        void InitFlowAsRestart(Grid*  grid);
+        void AllocateGlobalVar(Grid*  grid);
+        
+        void AllocateUnsteadyVar(Grid*  grid);
+        void InitialUnsteadyVar(Grid*  grid);
+        void UpdateUnsteadyProperties(Grid*  grid);
+        void UpdateProperties(Grid* grid);
+        
+        void GetResidual(Grid *grid, vector<RDouble>& res);
+        void UpdateUnsteadyVariable(Grid *grid);
+    };
+
+    void FlowFarField_GetBoundrayData(Grid*  grid, Data_Param* bcData);
+
+}
diff --git a/CFD/IncomSolver/include/PPEqCalculator.h b/CFD/IncomSolver/include/PPEqCalculator.h
new file mode 100644
index 0000000..83f6502
--- /dev/null
+++ b/CFD/IncomSolver/include/PPEqCalculator.h
@@ -0,0 +1,51 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Param_INCompSolverUnstruct.h
+//! @brief     pressure poission solver.
+//! @author    WanYunbo, Bell.
+
+#pragma once
+
+#include <map>
+#include <iostream>
+#include "PPEqCalculator.h"
+#include "IncomCalculator.h"
+
+
+namespace PHSPACE
+{
+    class UnstructGrid;
+
+    class PPEqCalculator : public IncomCalculator
+    {
+
+    public:
+        PPEqCalculator();
+        ~PPEqCalculator();
+
+    public:
+        void correctPressureAndVelocity(Grid*  grid);
+        void correctBoundaryVelocity(Grid*  grid);
+        void UpdateBCValue(Grid*  grid);
+        
+        void solvePPEquation(Grid*  grid);
+        void Post() {};
+        
+        void treatBC(Grid*  grid);
+        void constructMatrixACoeff(Grid*  grid);
+        void constructBCoeff(Grid*  grid);
+        void calcTransMatrixTerm(Grid*  grid);
+        void TransMatrixTerm_1st(Grid*  grid);
+        void TransMatrixTerm_2nd(Grid*  grid);
+
+    };
+}
diff --git a/CFD/IncomSolver/include/Param_INCompSolverUnstruct.h b/CFD/IncomSolver/include/Param_INCompSolverUnstruct.h
new file mode 100644
index 0000000..1d3b0f7
--- /dev/null
+++ b/CFD/IncomSolver/include/Param_INCompSolverUnstruct.h
@@ -0,0 +1,41 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Param_INCompSolverUnstruct.h
+//! @brief     parameter files.
+//! @author    WanYunbo, Bell.
+
+#pragma once
+#include "Constants.h"
+#include "Param_CFDSolver.h"
+
+namespace PHSPACE
+{
+
+class Param_INCompSolverUnstruct : public Param_CFDSolver
+{
+public:
+    LIB_EXPORT Param_INCompSolverUnstruct();
+
+    LIB_EXPORT ~Param_INCompSolverUnstruct();
+
+public:
+    LIB_EXPORT void Init();
+    
+    void setInComEquaMap();
+
+private:
+
+};
+
+#include"Param_INCompSolverUnstruct.hxx"
+
+}
diff --git a/CFD/IncomSolver/include/Param_INCompSolverUnstruct.hxx b/CFD/IncomSolver/include/Param_INCompSolverUnstruct.hxx
new file mode 100644
index 0000000..e69de29
diff --git a/CFD/IncomSolver/include/hypreCalculator.h b/CFD/IncomSolver/include/hypreCalculator.h
new file mode 100644
index 0000000..9dee940
--- /dev/null
+++ b/CFD/IncomSolver/include/hypreCalculator.h
@@ -0,0 +1,74 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      hypreCalculator.h
+//! @brief     call hypre lib.
+//! @author    WanYunbo, Bell, XuGang.
+
+#pragma once
+
+#include "Geo_UnstructGrid.h"
+#include "LinearEquationSystemCalculator.h"
+
+#ifdef USE_HypreLib
+#include "HYPRE_krylov.h"
+#include "HYPRE.h"
+#include "HYPRE_parcsr_ls.h"
+#include "PHMpi.h"
+#include "_hypre_parcsr_ls.h"
+#endif
+
+namespace PHSPACE
+{
+class hypreCalculator : public LinearEquationSystemCalculator
+{
+
+#ifdef USE_HypreLib
+private:
+    Grid* grid;
+    HYPRE_IJMatrix A_hypre;
+    HYPRE_ParCSRMatrix parcsr_A_hypre;
+    HYPRE_IJVector b_hypre;
+    HYPRE_ParVector par_b_hypre;
+    HYPRE_IJVector x_hypre;
+    HYPRE_ParVector par_x_hypre;
+    HYPRE_Solver** solverList;
+    HYPRE_Solver** precondList;
+    vector<int>* ColVectors;
+    vector<double>* ValuesVector;
+
+    int ilower;
+    int iupper;
+    int localSize;
+    int *rows;
+    RDouble* colValueOfOneRow;
+    int* colNumberOfOneRow;
+#endif
+public:
+    // constructor & destructor
+    hypreCalculator();
+
+    virtual ~hypreCalculator();
+
+public:
+    void mathLibSolveInit(Grid* gridIn);
+    void mathLibSolve(Grid* gridIn, int iEquation, RDouble * x, RDouble * diagCoef, RDouble *b, RDouble * upACOFFace, RDouble * downACOFFace);
+    void mathLibSolveFinalize();
+
+#ifdef USE_HypreLib
+    void SetAMGDDPrecondParameters(HYPRE_Solver& amg_precond);
+    void destoryTempDataInAMGDD(HYPRE_Solver& amgddsolver);
+#endif
+};
+
+
+}
+
diff --git a/CFD/IncomSolver/include/unapCalculator.h b/CFD/IncomSolver/include/unapCalculator.h
new file mode 100644
index 0000000..d064e6a
--- /dev/null
+++ b/CFD/IncomSolver/include/unapCalculator.h
@@ -0,0 +1,85 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      unapCalculator.h
+//! @brief     call unap lib.
+//! @author    WanYunbo, Bell.
+
+#pragma once
+
+#include "Geo_UnstructGrid.h"
+#include <sstream>
+#include "LinearEquationSystemCalculator.h"
+
+#ifdef USE_UnapLib
+#include "PBiCGStab.hpp"
+#include "PCG.hpp"
+#include "GMRES.hpp"
+#include "chebySmoother.hpp"
+#include "lduAgglomeration.hpp"
+#include "lduDICPrecond.hpp"
+#include "lduDILUPrecond.hpp"
+#include "lduDiagPrecond.hpp"
+#include "lduGaussSeidelSmoother.hpp"
+#include "matrixConversion.hpp"
+#include "printUNAP.hpp"
+#include "rcmf.h"
+#include "readFromOpenFOAM.hpp"
+#include "unapMultigrid.hpp"
+#include "directionalAgglomeration.hpp"
+#include "lduMGPrecond.hpp"
+#include "unapLduMatrix.hpp"
+
+using namespace UNAP;
+#endif
+
+namespace PHSPACE
+{
+class unapCalculator : public LinearEquationSystemCalculator
+{
+#ifdef USE_UnapLib
+private:
+    LduMatrix* lduA;
+
+    labelVector* upperAddr;
+    labelVector* lowerAddr;
+    scalarVector* upper;
+    scalarVector* lower;
+    scalarVector* diag;
+    scalarVector* b;
+    scalarVector* x;
+    SolverPerformance solverPerf;
+
+    UNAP::Solver* unapSolver;
+    UNAP::Preconditioner* unapPrecond;
+
+    label nNeiProcs;
+    label* destRank;
+    label* offDiagRows;
+    label* offDiagCols;
+    label* offDiagStarts;
+    scalar* offDiagCoeffs;
+#endif
+public:
+
+    unapCalculator();
+
+    virtual ~unapCalculator();
+
+public:
+    void mathLibSolveInit(Grid* gridIn);
+    void mathLibSolve(Grid* gridIn, int iEquation, RDouble * x, RDouble * diagCoef, RDouble *b, RDouble * upACOFFace, RDouble * downACOFFace);
+    void mathLibSolveFinalize();
+};
+
+
+}
+
diff --git a/CFD/IncomSolver/include/yhamgCalculator.h b/CFD/IncomSolver/include/yhamgCalculator.h
new file mode 100644
index 0000000..cc7d2c2
--- /dev/null
+++ b/CFD/IncomSolver/include/yhamgCalculator.h
@@ -0,0 +1,56 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      unapCalculator.h
+//! @brief     call yhamg lib.
+//! @author    WanYunbo, Bell.
+
+#pragma once
+
+#include "Geo_UnstructGrid.h"
+#include "LinearEquationSystemCalculator.h"
+#ifdef USE_YhamgLib
+#include "yhamg.h"
+using namespace YHAMG;
+#endif
+namespace PHSPACE
+{
+    
+    class yhamgCalculator : public LinearEquationSystemCalculator
+    {
+#ifdef USE_YhamgLib
+    private:
+        Grid* grid;
+        ParOperator* A;
+        ParOperator** PrecondList;
+        vector<int>* ColVectors;
+        int* exter_colind2Face;
+
+        ParVector *b;
+        ParVector *x;
+#endif
+
+    public:
+        // constructor & destructor
+        yhamgCalculator();
+
+        virtual ~yhamgCalculator();
+
+    public:
+        void mathLibSolveInit(Grid* gridIn);
+        void mathLibSolve(Grid* gridIn, int iEquation, RDouble * x, RDouble * diagCoef, RDouble *b, RDouble * upACOFFace, RDouble * downACOFFace);
+        void mathLibSolveFinalize();
+
+    };
+
+
+}
+
diff --git a/CFD/IncomSolver/src/IncomCalculator.cpp b/CFD/IncomSolver/src/IncomCalculator.cpp
new file mode 100644
index 0000000..a75f238
--- /dev/null
+++ b/CFD/IncomSolver/src/IncomCalculator.cpp
@@ -0,0 +1,744 @@
+#include "IncomCalculator.h"
+
+
+
+
+namespace PHSPACE
+{
+
+    int IncomCalculator::GetSolverIndex(int iEquation)
+    {
+        int equationIndex;
+        if (iEquation < IDX::S_IP)
+        {
+            equationIndex = iEquation;
+        }
+        else
+        {
+            equationIndex = GetSolverIndex();
+        }
+        return equationIndex;
+    }
+
+    void IncomCalculator::calculateLinearEquation(Grid* grid, int iEquation, RDouble * x, RDouble * diagCoef, RDouble *b, RDouble * upACOFFace, RDouble * downACOFFace)
+    {
+        int *linearSolverID = reinterpret_cast <int *>(GlobalDataBase::GetDataPtr("linearSolverID"));
+        int *constVarNumToSolveVarNum = reinterpret_cast <int*> (grid->GetDataPtr("constVarNumToSolveVarNum"));
+
+        AxEqualbCalculator->mathLibSolve(grid, iEquation, x, diagCoef, b, upACOFFace, downACOFFace);
+        CalcRes(grid, iEquation, x, diagCoef, b, upACOFFace, downACOFFace);
+    }
+
+    void IncomCalculator::SetAxEqualbCalculator(LinearEquationSystemCalculator* AxEqualbCalculatorIn)
+    {
+        this->AxEqualbCalculator = AxEqualbCalculatorIn;
+    }
+
+    void IncomCalculator::CalcRes(Grid* gridIn, int iEquation,
+        RDouble* x, RDouble* diagCoef, RDouble* b, RDouble* upACOFFace, RDouble* downACOFFace)
+    {
+        UnstructGrid * grid = UnstructGridCast(gridIn);
+        int nTotalFace = grid->GetNTotalFace();
+        int nTotalCell = grid->GetNTotalCell();
+        int nBoundFace = grid->GetNBoundFace();
+        int *leftCellOfFace = grid->GetLeftCellOfFace();
+        int *rightCellOfFace = grid->GetRightCellOfFace();
+        RDouble *vol = grid->GetCellVolume();
+
+        RDouble* residualError = new RDouble[nTotalCell];
+        string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+        string varName = varNameIncom[iEquation];
+
+        for (int iCell = 0; iCell < nTotalCell; iCell++ )
+        {
+            residualError[iCell] = b[iCell] - diagCoef[iCell] * x[iCell];
+        }
+
+        for (int iFace = nBoundFace; iFace < nTotalFace; iFace++)
+        {
+            int re = rightCellOfFace[iFace];
+            int le = leftCellOfFace[iFace];
+
+            residualError[le] -= upACOFFace[iFace] * x[re];
+            residualError[re] -= downACOFFace[iFace] * x[le];
+        }
+
+        UnstructBCSet **bcr = grid->GetBCRecord();
+        for (int iFace = 0; iFace < nBoundFace; iFace++)
+        {
+            int bcType = bcr[iFace]->GetKey();
+            if (bcType == PHENGLEI::INTERFACE)
+            {
+                int le = leftCellOfFace[iFace];
+                int re = rightCellOfFace[iFace];
+                residualError[le] -= upACOFFace[iFace] * x[re];
+            }
+        }
+
+        if (iEquation == IDX::S_IP)
+        {
+            RDouble globalTotalCells = GlobalDataBase::GetDoubleParaFromDB("GlobalTotalCells");
+            for (int iCell = 0; iCell < nTotalCell; iCell++ )
+            {
+                residualError[iCell] = x[iCell] / globalTotalCells;
+            }
+        }
+
+        RDouble varTotalRes = 0.0;        
+        RDouble globalTotalCells = 1.0;
+        int ResType = L1Res;
+        if (GlobalDataBase::IsExist("ResType", PHINT, 1))
+        {
+            ResType = GlobalDataBase::GetIntParaFromDB("ResType");
+        }
+
+        if(ResType == L1Res)
+        {
+            for (int iCell = 0; iCell < nTotalCell; ++iCell)
+            {
+                varTotalRes += ABS(residualError[iCell]) / globalTotalCells;
+            }
+            RDouble temp1 = varTotalRes ;
+            PH_AllreduceSepMode(&temp1, &varTotalRes, 1, MPI_DOUBLE, MPI_SUM);
+        }
+        else if(ResType == L2Res)
+        {
+            for (int iCell = 0; iCell < nTotalCell; ++iCell)
+            {
+                varTotalRes += pow(residualError[iCell], 2) / globalTotalCells;
+            }
+            RDouble temp1 = varTotalRes;
+            PH_AllreduceSepMode(&temp1, &varTotalRes, 1, MPI_DOUBLE, MPI_SUM);
+        }
+        else if(ResType == LinfRes)
+        {
+            for (int iCell = 0; iCell < nTotalCell; ++iCell)
+            {
+                if (varTotalRes < ABS(residualError[iCell]))
+                {
+                    varTotalRes = ABS(residualError[iCell]);
+                }
+            }
+            RDouble temp1 = varTotalRes;
+            PH_AllreduceSepMode(&temp1, &varTotalRes, 1, MPI_DOUBLE, MPI_MAX);
+        }
+
+        grid->UpdateData(varName + "ResNow", &varTotalRes, PHDOUBLE, 1);
+
+        delete [] residualError;
+    }
+
+
+
+    void IncomCalculator::SkewnessCorrection(Grid*  grid, RDouble* phi, RDouble* dphidx, RDouble* dphidy, RDouble* dphidz)
+    {
+        int nInteriorFaces = grid->GetNTotalFace() - grid->GetNBoundFace() + grid->GetNIFace();
+        RDouble* dphidxf = new RDouble[nInteriorFaces];
+        RDouble* dphidyf = new RDouble[nInteriorFaces];
+        RDouble* dphidzf = new RDouble[nInteriorFaces];
+        RDouble* phif = new RDouble[nInteriorFaces];
+
+        for (int iter = 0; iter < 3; ++iter)
+        {
+            FaceGradCorrection(grid, dphidxf, dphidyf, dphidzf, phi, dphidx, dphidy, dphidz);
+            FaceValueCorretion(grid, dphidxf, dphidyf, dphidzf, phif, phi);
+            GradCorrection(grid, phif, phi, dphidx, dphidy, dphidz);
+        }
+
+        delete[]dphidxf;
+        delete[]dphidyf;
+        delete[]dphidzf;
+        delete[]phif;
+    }
+
+    void IncomCalculator::FaceGradCorrection(Grid*  gridIn, RDouble* dphidxf, RDouble* dphidyf, RDouble* dphidzf, RDouble* phi, RDouble* dphidx, RDouble* dphidy, RDouble* dphidz)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+
+        int nbfaces = grid->GetNBoundFace();
+        int nIFaces = grid->GetNIFace();
+        int nInteriorFaces = grid->GetNTotalFace() - nbfaces + nIFaces;
+        int* leftCellOfFace = grid->GetLeftCellOfFace();
+        int* rightCellOfFace = grid->GetRightCellOfFace();
+        RDouble* faceWeightOfLeftCell = reinterpret_cast<RDouble*>(grid->GetDataPtr("faceWeightOfLeftCell"));
+
+        RDouble* xcc = grid->GetCellCenterX();
+        RDouble* ycc = grid->GetCellCenterY();
+        RDouble* zcc = grid->GetCellCenterZ();
+
+        for (int iface = nIFaces; iface < nInteriorFaces; ++iface)
+        {
+            int faceIndex = iface + nbfaces - nIFaces;
+            int le = leftCellOfFace[faceIndex];
+            int re = rightCellOfFace[faceIndex];
+
+            RDouble adphidxf = faceWeightOfLeftCell[faceIndex] * dphidx[le] + (1.0 - faceWeightOfLeftCell[faceIndex]) * dphidx[re];
+            RDouble adphidyf = faceWeightOfLeftCell[faceIndex] * dphidy[le] + (1.0 - faceWeightOfLeftCell[faceIndex]) * dphidy[re];
+            RDouble adphidzf = faceWeightOfLeftCell[faceIndex] * dphidz[le] + (1.0 - faceWeightOfLeftCell[faceIndex]) * dphidz[re];
+
+            RDouble dCFx = xcc[re] - xcc[le];
+            RDouble dCFy = ycc[re] - ycc[le];
+            RDouble dCFz = zcc[re] - zcc[le];
+            RDouble dCFNorm = sqrt(dCFx * dCFx + dCFy * dCFy + dCFz * dCFz);
+            RDouble correction1 = (phi[re] - phi[le]) / dCFNorm;
+
+            RDouble eCFx = dCFx / dCFNorm;
+            RDouble eCFy = dCFy / dCFNorm;
+            RDouble eCFz = dCFz / dCFNorm;
+            RDouble a2 = correction1 - adphidxf * eCFx + adphidyf * eCFy + adphidzf * eCFz;
+            RDouble correction2x = a2 * eCFx;
+            RDouble correction2y = a2 * eCFy;
+            RDouble correction2z = a2 * eCFz;
+
+            dphidxf[iface] = adphidxf + correction2x;
+            dphidyf[iface] = adphidyf + correction2y;
+            dphidzf[iface] = adphidzf + correction2z;
+        }
+
+        for (int iface = 0; iface < nIFaces; ++iface)
+        {
+            int faceIndex = iface + nbfaces - nIFaces;
+            int le = leftCellOfFace[faceIndex];
+            int re = rightCellOfFace[faceIndex];
+
+            RDouble adphidxf = dphidx[le];
+            RDouble adphidyf = dphidy[le];
+            RDouble adphidzf = dphidz[le];
+
+            RDouble dCFx = xcc[re] - xcc[le];
+            RDouble dCFy = ycc[re] - ycc[le];
+            RDouble dCFz = zcc[re] - zcc[le];
+            RDouble dCFNorm = sqrt(dCFx * dCFx + dCFy * dCFy + dCFz * dCFz);
+            RDouble correction1 = (phi[re] - phi[le]) / dCFNorm;
+
+            RDouble eCFx = dCFx / dCFNorm;
+            RDouble eCFy = dCFy / dCFNorm;
+            RDouble eCFz = dCFz / dCFNorm;
+            RDouble a2 = correction1 - adphidxf * eCFx + adphidyf * eCFy + adphidzf * eCFz;
+            RDouble correction2x = a2 * eCFx;
+            RDouble correction2y = a2 * eCFy;
+            RDouble correction2z = a2 * eCFz;
+
+            dphidxf[iface] = adphidxf + correction2x;
+            dphidyf[iface] = adphidyf + correction2y;
+            dphidzf[iface] = adphidzf + correction2z;
+        }
+    }
+
+    void IncomCalculator::FaceValueCorretion(Grid*  gridIn, RDouble* dphidxf, RDouble* dphidyf, RDouble* dphidzf, RDouble* phif, RDouble* phi)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+        int nbfaces = grid->GetNBoundFace();
+        int nIFaces = grid->GetNIFace();
+        int nInteriorFaces = grid->GetNTotalFace() - nbfaces + nIFaces;
+        int* leftCellOfFace = grid->GetLeftCellOfFace();
+        int* rightCellOfFace = grid->GetRightCellOfFace();
+        RDouble* faceWeightOfLeftCell = reinterpret_cast<RDouble*>(grid->GetDataPtr("faceWeightOfLeftCell"));
+        RDouble* area = grid->GetFaceArea();
+        RDouble* xfn = grid->GetFaceNormalX();
+        RDouble* yfn = grid->GetFaceNormalY();
+        RDouble* zfn = grid->GetFaceNormalZ();
+        RDouble* xfc = grid->GetFaceCenterX();
+        RDouble* yfc = grid->GetFaceCenterY();
+        RDouble* zfc = grid->GetFaceCenterZ();
+        RDouble* xcc = grid->GetCellCenterX();
+        RDouble* ycc = grid->GetCellCenterY();
+        RDouble* zcc = grid->GetCellCenterZ();
+
+        for (int iface = 0; iface < nInteriorFaces; ++iface)
+        {
+            int ifaceIndex = iface + nbfaces - nIFaces;
+            int le = leftCellOfFace[ifaceIndex];
+            int re = rightCellOfFace[ifaceIndex];
+
+            RDouble dCfx = xfc[ifaceIndex] - xcc[le];
+            RDouble dCfy = yfc[ifaceIndex] - ycc[le];
+            RDouble dCfz = zfc[ifaceIndex] - zcc[le];
+            RDouble dCfNorm = sqrt(dCfx * dCfx + dCfy * dCfy + dCfz * dCfz);
+
+            RDouble dCFx = xcc[re] - xcc[le];
+            RDouble dCFy = ycc[re] - ycc[le];
+            RDouble dCFz = zcc[re] - zcc[le];
+            RDouble dCFNorm = sqrt(dCFx * dCFx + dCFy * dCFy + dCFz * dCFz);
+
+            RDouble ax = area[ifaceIndex] * xfn[ifaceIndex];
+            RDouble ay = area[ifaceIndex] * yfn[ifaceIndex];
+            RDouble az = area[ifaceIndex] * zfn[ifaceIndex];
+
+            RDouble proj1 = dCfx * ax + dCfy * ay + dCfz * az;
+            RDouble proj2 = dCFx * ax + dCFy * ay + dCFz * az;
+            RDouble ratio = proj1 / proj2;
+
+            // f': CF intersects the surface
+            RDouble fQuotex = xcc[le] + dCFx * ratio;
+            RDouble fQuotey = ycc[le] + dCFy * ratio;
+            RDouble fQuotez = zcc[le] + dCFz * ratio;
+
+            // ffQuotex: vec f'f
+            RDouble ffQuotex = xfc[ifaceIndex] - fQuotex;
+            RDouble ffQuotey = yfc[ifaceIndex] - fQuotey;
+            RDouble ffQuotez = zfc[ifaceIndex] - fQuotez;
+
+            RDouble correction = dphidxf[iface] * ffQuotex + dphidyf[iface] * ffQuotey + dphidzf[iface] * ffQuotez;
+            RDouble phifQuote = faceWeightOfLeftCell[ifaceIndex] * phi[le] + (1.0 - faceWeightOfLeftCell[ifaceIndex]) * phi[re];
+            phif[iface] = phifQuote + correction;
+        }
+    }
+
+    void IncomCalculator::GradCorrection(Grid*  gridIn, RDouble* phif, RDouble* phi, RDouble* dphidx, RDouble* dphidy, RDouble* dphidz)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+
+        RDouble* xfn = grid->GetFaceNormalX();
+        RDouble* yfn = grid->GetFaceNormalY();
+        RDouble* zfn = grid->GetFaceNormalZ();
+        RDouble* area = grid->GetFaceArea();
+        RDouble* vol = grid->GetCellVolume();
+
+        int* leftCellofFace = grid->GetLeftCellOfFace();
+        int* rightCellofFace = grid->GetRightCellOfFace();
+
+        int nTotalCell = grid->GetNTotalCell();
+        int nTotalFace = grid->GetNTotalFace();
+        int nBoundFace = grid->GetNBoundFace();
+        int nInterFace = grid->GetNIFace();
+        int nBoundFaces = nBoundFace - nInterFace;          //! except interface
+        int nTotal = nTotalCell + nBoundFace;
+
+        for (int iCell = 0; iCell < nTotalCell; ++iCell)
+        {
+            dphidx[iCell] = 0.0;
+            dphidy[iCell] = 0.0;
+            dphidz[iCell] = 0.0;
+        }
+
+        for (int iFace = 0; iFace < nBoundFaces; ++iFace)
+        {
+            int le = leftCellofFace[iFace];
+            int re = iFace + nTotalCell;
+
+            RDouble qfc = phi[re];
+            RDouble nx = xfn[iFace] * area[iFace];
+            RDouble ny = yfn[iFace] * area[iFace];
+            RDouble nz = zfn[iFace] * area[iFace];
+            dphidx[le] += qfc * nx;
+            dphidy[le] += qfc * ny;
+            dphidz[le] += qfc * nz;
+        }
+
+        for (int iFace = nBoundFaces; iFace < nBoundFace; ++iFace)
+        {
+            int le = leftCellofFace[iFace];
+            int re = rightCellofFace[iFace];
+            int faceIndex = iFace - nBoundFaces;
+
+            RDouble nx = xfn[iFace] * area[iFace];
+            RDouble ny = yfn[iFace] * area[iFace];
+            RDouble nz = zfn[iFace] * area[iFace];
+
+            RDouble qfc = phif[faceIndex];
+            dphidx[le] += qfc * nx;
+            dphidy[le] += qfc * ny;
+            dphidz[le] += qfc * nz;
+        }
+
+        for (int iFace = nBoundFace; iFace < nTotalFace; ++iFace)
+        {
+            int le = leftCellofFace[iFace];
+            int re = rightCellofFace[iFace];
+            int faceIndex = iFace - nBoundFaces;
+
+            RDouble nx = xfn[iFace] * area[iFace];
+            RDouble ny = yfn[iFace] * area[iFace];
+            RDouble nz = zfn[iFace] * area[iFace];
+
+            RDouble qfc = phif[faceIndex];
+            dphidx[le] += qfc * nx;
+            dphidy[le] += qfc * ny;
+            dphidz[le] += qfc * nz;
+            dphidx[re] -= qfc * nx;
+            dphidy[re] -= qfc * ny;
+            dphidz[re] -= qfc * nz;
+        }
+
+        for (int iCell = 0; iCell < nTotalCell; ++iCell)
+        {
+            dphidx[iCell] *= one / vol[iCell];
+            dphidy[iCell] *= one / vol[iCell];
+            dphidz[iCell] *= one / vol[iCell];
+        }
+    }
+
+    void IncomCalculator::GradientCalculation(Grid *gridIn, string phiName, string dphidxName, string dphidyName, string dphidzName, bool isComm)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+
+        RDouble *phi = reinterpret_cast<RDouble *>(grid->GetDataPtr(phiName));
+        RDouble *dphidx = reinterpret_cast<RDouble *>(grid->GetDataPtr(dphidxName));
+        RDouble *dphidy = reinterpret_cast<RDouble *>(grid->GetDataPtr(dphidyName));
+        RDouble *dphidz = reinterpret_cast<RDouble *>(grid->GetDataPtr(dphidzName));
+
+        string GradCalcMethod = GlobalDataBase::GetStrParaFromDB("GradCalcMethod");
+        if (GradCalcMethod == "GAUSS")
+        {
+            RDouble *faceWeightOfLeftCell= reinterpret_cast<RDouble *>(grid->GetDataPtr("faceWeightOfLeftCell"));
+            grid->CompGradientGGCell2(phi, faceWeightOfLeftCell, dphidx, dphidy, dphidz);
+
+            int isSkewness = GlobalDataBase::GetIntParaFromDB("isSkewness");
+            if (isSkewness)
+            {
+                SkewnessCorrection(grid, phi, dphidx, dphidy, dphidz);
+            }
+        }
+        else if (GradCalcMethod == "LSQ")
+        {
+            grid->ComputeWeight();
+            grid->CompGradientLSQ(phi, dphidx, dphidy, dphidz);
+        }
+
+        CommunicateAnInterfaceVar(dphidx);
+        CommunicateAnInterfaceVar(dphidy);
+        CommunicateAnInterfaceVar(dphidz);
+    }
+
+    void IncomCalculator::calcFaceWeight(Grid *gridIn)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+        RDouble* faceWeightOfLeftCell = reinterpret_cast<RDouble*>(grid->GetDataPtr("faceWeightOfLeftCell"));
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotalFace = grid->GetNTotalFace();
+        int *leftCellOfFace = grid->GetLeftCellOfFace();
+        int *rightCellOfFace = grid->GetRightCellOfFace();
+
+        RDouble *xfc = grid->GetFaceCenterX();
+        RDouble *yfc = grid->GetFaceCenterY();
+        RDouble *zfc = grid->GetFaceCenterZ();
+        RDouble *xcc = grid->GetCellCenterX();
+        RDouble *ycc = grid->GetCellCenterY();
+        RDouble *zcc = grid->GetCellCenterZ();
+
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            int le = leftCellOfFace [ iFace ];
+            int re = rightCellOfFace[ iFace ];
+
+            RDouble dxL = xfc[iFace] - xcc[le];
+            RDouble dyL = yfc[iFace] - ycc[le];
+            RDouble dzL = zfc[iFace] - zcc[le];
+
+            RDouble dxR = xfc[iFace] - xcc[re];
+            RDouble dyR = yfc[iFace] - ycc[re];
+            RDouble dzR = zfc[iFace] - zcc[re];
+
+            // Left
+            RDouble delta1 = DISTANCE(dxL, dyL, dzL);
+            RDouble delta2 = DISTANCE(dxR, dyR, dzR);
+            RDouble delta = one / (delta1 + delta2 + SMALL);
+
+            faceWeightOfLeftCell[iFace] = delta2 * delta;
+        }
+
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+        for(int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+            int bcType = bcRegion->GetBCType();
+
+            if (!IsInterface(bcType))
+            {
+                faceWeightOfLeftCell[iFace] = 1.0;
+            }
+        }
+    }
+
+
+    void IncomCalculator::CompressAnInterfaceVar(RDouble *field)
+    {
+        int currentProcessor = PHMPI::GetCurrentProcessorID();
+        int numberOfSimulationZones = PHMPI::GetNumberofGlobalZones();
+        receivedDataBuffer.resize(numberOfSimulationZones);
+        sendDataBuffer.resize(numberOfSimulationZones);
+
+        //! Step 0: Compressing data firstly.
+        for (int iZone = 0; iZone < numberOfSimulationZones; ++ iZone)
+        {
+            int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+
+            ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+            int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+            if (currentProcessor == sendProcessor)
+            {
+                sendDataBuffer[iZone].resize(numberOfNeighbor);
+            }
+
+            for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+            {
+                int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+                int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+                if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+                {
+                    continue;
+                }
+
+                //! Allocate and compress the buffers for sending.
+                DataContainer *sendBuffer = 0;
+                if (currentProcessor == sendProcessor)
+                {
+                    sendBuffer = new DataContainer;
+                    sendDataBuffer[iZone][iNeighbor] = sendBuffer;
+
+                    int localZoneID = PHMPI::GetGlobalZoneIDToLocalZoneID(iZone);
+
+                    //! Compress the send information into the actkey.
+                    Grid *grid = PHSPACE::GetGrid(iZone, 0);
+                    CompressAnInterfaceVar(sendBuffer, field, grid, iZone, neighborZone);
+                }
+            }
+        }
+    }
+
+    void IncomCalculator::CommunicateAnInterfaceVar()
+    {
+        int currentProcessor = PHMPI::GetCurrentProcessorID();
+        int numberOfSimulationZones = PHMPI::GetNumberofGlobalZones();
+        //! Step 1: Communication.
+        for (int iZone = 0; iZone < numberOfSimulationZones; ++ iZone)
+        {
+            ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+            int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+            //! Communicating.
+            for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+            {
+                int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+                int sendProcessor    = PHMPI::GetZoneProcessorID(iZone);
+                int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+                if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+                {
+                    continue;
+                }
+
+                //! Allocate the buffers for sending and receiving.
+                DataContainer *receivedBuffer = 0;
+                DataContainer *sendBuffer = 0;
+                if (currentProcessor == receiveProcessor)
+                {
+                    receivedBuffer = new DataContainer;
+                    receivedDataBuffer[iZone].push_back(receivedBuffer);
+                }
+                if (currentProcessor == sendProcessor)
+                {
+                    sendBuffer = sendDataBuffer[iZone][iNeighbor];
+                }
+
+                int tag = iZone;
+
+                //! Communication.
+                if (currentProcessor == sendProcessor)
+                {
+                    if (sendProcessor != receiveProcessor)
+                    {
+                        streamsize nlen = sendBuffer->size();
+
+                        // Send the data to neighbors.
+                        send(sendBuffer, receiveProcessor, nlen, requestContainer, tag);
+                    }
+                }
+                if (currentProcessor == receiveProcessor)
+                {
+                    //! Get the neighbor order: which order that 'iZone' on neighbors of neighborZone.
+                    int neighborOrer = -1;
+                    ZoneNeighbor *globalNeighborZonesTemp = zoneConnectivity->GetZoneNeighbor(neighborZone);
+                    int numberOfNeighborTemp = globalNeighborZonesTemp->GetNumberOfNeighbor();
+
+                    for (int neighborID = 0; neighborID < numberOfNeighborTemp; ++ neighborID)
+                    {
+                        int neighborZoneTemp = globalNeighborZonesTemp->GetZoneIndexOfNeighbor(neighborID);
+                        if (neighborZoneTemp == iZone)
+                        {
+                            neighborOrer = neighborID;
+                            break;
+                        }
+                    }
+
+                    ASSERT(neighborOrer != -1);
+
+                    if (sendProcessor != receiveProcessor)
+                    {
+                        //! The data length of the received data is same to the length that send to the neighbor.
+                        CharVecSizeType nlen = sendDataBuffer[neighborZone][neighborOrer]->size();
+
+                        //! Receive data from neighbors.
+                        receive(receivedBuffer, sendProcessor, nlen, requestContainer, tag);
+                    }
+                    else
+                    {
+                        SWAP(receivedDataBuffer[iZone].back(), sendDataBuffer[iZone][iNeighbor]);
+                    }
+                }
+            }
+        }
+
+        //! Step2: MPI waiting for Non-blocking communications.
+        if (PHMPI::GetNumberOfProcessor() > 1)
+        {
+            PH_Wait(static_cast<int>(requestContainer.size()), &(requestContainer[0]));
+        }
+    }
+
+    void IncomCalculator::DecompressAnInterfaceVar(RDouble *field)
+    {
+        int currentProcessor = PHMPI::GetCurrentProcessorID();
+        int numberOfSimulationZones = PHMPI::GetNumberofGlobalZones();
+        //! Step3: Translate the data container.
+        for (int iZone = 0; iZone < numberOfSimulationZones; ++ iZone)
+        {
+            ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+            int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+            int count = 0;
+            for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+            {
+                int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+                int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+                if (currentProcessor == receiveProcessor)
+                {
+                    DataContainer *receiveData = receivedDataBuffer[iZone][count];
+
+                    //! Because get into here when currentProcessor==receiveProcessor,
+                    //! so, use zoneGridSolver of neighborZone, this zone is on the current processor!
+
+                    //! Decompress the interface data from data-container.
+                    int localZoneID = PHMPI::GetGlobalZoneIDToLocalZoneID(neighborZone);
+
+                    Grid *grid = PHSPACE::GetGrid(neighborZone, 0);
+                    DecompressAnInterfaceVar(receiveData, field, grid, neighborZone, iZone);
+
+                    ++ count;
+                }
+            }
+        }
+
+        //! Step4: Free the buffers.
+        for (int iDim = 0; iDim < receivedDataBuffer.size(); ++ iDim)
+        {
+            for (int jDim = 0; jDim < receivedDataBuffer[iDim].size(); ++ jDim)
+            {
+                delete receivedDataBuffer[iDim][jDim];
+            }
+        }
+        receivedDataBuffer.clear();
+        for (int iDim = 0; iDim < sendDataBuffer.size(); ++ iDim)
+        {
+            for (int jDim = 0; jDim < sendDataBuffer[iDim].size(); ++ jDim)
+            {
+                delete sendDataBuffer[iDim][jDim];
+            }
+        }
+        sendDataBuffer.clear();
+        requestContainer.clear();
+    }
+
+    void IncomCalculator::CommunicateAnInterfaceVar(RDouble *field)
+    {
+        CompressAnInterfaceVar(field);
+        CommunicateAnInterfaceVar();
+        DecompressAnInterfaceVar(field);
+    }
+
+    void IncomCalculator::CompressAnInterfaceVar(DataContainer *&dataContainer, RDouble *field, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex)
+    {
+        UnstructGrid * grid = UnstructGridCast(gridIn);
+
+        InterfaceInfo * interfaceInformation = grid->GetInterfaceInfo();
+        if (!interfaceInformation) return;
+
+        int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+        int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+        int * interfaceIndexContainerForSend         = interfaceInformation->GetFaceIndexForSend(iNeighborZone);
+        dataContainer->moveto_begin();
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int sourceCell;
+                int iFace = interfaceIndexContainerForSend[ iLocalFace ];
+                grid->GetSourceIndex(iFace, iGhostLayer + 1, sourceCell);
+                PHWrite(dataContainer, field[sourceCell]);
+            }
+        }
+    }
+
+    void IncomCalculator::DecompressAnInterfaceVar(DataContainer *&dataContainer, RDouble *field, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex)
+    {
+        UnstructGrid * grid = UnstructGridCast(gridIn);
+
+        InterfaceInfo * interfaceInformation = grid->GetInterfaceInfo();
+        if (!interfaceInformation) return;
+
+        int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+        int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+        int * interfaceIndexContainerForReceive      = interfaceInformation->GetFaceIndexForRecv(iNeighborZone);
+
+        dataContainer->moveto_begin();
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int iFace = interfaceIndexContainerForReceive[ iLocalFace ];
+                int targetCell;
+                grid->GetTargetIndex(iFace, iGhostLayer + 1, targetCell);
+
+                PHRead(dataContainer, field[targetCell]);
+            }
+        }
+    }
+
+    void IncomCalculator::InitializeMatrixACoeff(Grid* gridIn)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn); 
+        int nTotalCell = grid->GetNTotalCell();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotalFace = grid->GetNTotalFace();
+        RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+        RDouble *upperMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("upperMatrixCoeff"));
+        RDouble *lowerMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("lowerMatrixCoeff"));
+
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            diagMatrixCoeff[iCell] = 0.0;
+        }
+
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            upperMatrixCoeff[iFace] = 0.0;
+            lowerMatrixCoeff[iFace] = 0.0;
+        }
+    }
+
+    void IncomCalculator::InitializeBCoeff(Grid* gridIn)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn); 
+        int nTotalCell = grid->GetNTotalCell();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotalFace = grid->GetNTotalFace();
+        RDouble *bCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("bCoeff"));
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            bCoeff[iCell] = 0.0;
+        }
+    }
+
+
+
+}
\ No newline at end of file
diff --git a/CFD/IncomSolver/src/IncomEnergyEqCalculator.cpp b/CFD/IncomSolver/src/IncomEnergyEqCalculator.cpp
new file mode 100644
index 0000000..2db755f
--- /dev/null
+++ b/CFD/IncomSolver/src/IncomEnergyEqCalculator.cpp
@@ -0,0 +1,905 @@
+#include "IncomEnergyEqCalculator.h"
+
+
+namespace PHSPACE
+{
+IncomEnergyEqCalculator::IncomEnergyEqCalculator():IncomScalarEqCalculator()
+{
+
+}
+
+IncomEnergyEqCalculator::~IncomEnergyEqCalculator()
+{
+}
+
+void IncomEnergyEqCalculator::CalcGrad(Grid* gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    string varName = varNameIncom[solverIndex];
+
+    GradientCalculation(grid, "T", "d" + varName + "dx", "d" + varName + "dy", "d" + varName + "dz");
+}
+
+void IncomEnergyEqCalculator::calWallBC(Grid*  gridIn, vector<int>* faceIndex, Data_Param* bcData, RDouble *diagMatrixCoeff, RDouble *bCoeff,  RDouble *q,
+    RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, RDouble *mu, RDouble matrixCoeff)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nTotalCell = grid->GetNTotalCell();
+    int* leftCellOfFace = grid->GetLeftCellOfFace();
+
+    RDouble* xfn = grid->GetFaceNormalX();
+    RDouble* yfn = grid->GetFaceNormalY();
+    RDouble* zfn = grid->GetFaceNormalZ();
+    RDouble* area = grid->GetFaceArea();
+
+    RDouble* xcc = grid->GetCellCenterX();
+    RDouble* ycc = grid->GetCellCenterY();
+    RDouble* zcc = grid->GetCellCenterZ();
+
+    RDouble* xfc = grid->GetFaceCenterX();
+    RDouble* yfc = grid->GetFaceCenterY();
+    RDouble* zfc = grid->GetFaceCenterZ();
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    string varName = varNameIncom[solverIndex];
+
+    RDouble* phi = reinterpret_cast<RDouble*>(grid->GetDataPtr("T"));
+    RDouble* cp = reinterpret_cast<RDouble*>(grid->GetDataPtr("cp"));
+    RDouble* u = reinterpret_cast<RDouble*>(grid->GetDataPtr("U"));
+    RDouble* v = reinterpret_cast<RDouble*>(grid->GetDataPtr("V"));
+    RDouble* w = reinterpret_cast<RDouble*>(grid->GetDataPtr("W"));
+    RDouble* dphidx = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dx"));
+    RDouble* dphidy = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dy"));
+    RDouble* dphidz = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dz"));
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    
+    for (std::size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+    {
+        int iFacelocal = (*faceIndex)[iFace]; //! The boundary element serial number is arranged in front of the element face.
+        int le = leftCellOfFace[iFacelocal];
+        int re = grid->GetRightCellOfFace()[iFacelocal];
+
+        RDouble dx = xfc[iFacelocal] - xcc[le];
+        RDouble dy = yfc[iFacelocal] - ycc[le];
+        RDouble dz = zfc[iFacelocal] - zcc[le];
+
+        RDouble area2 = DiffusionCoeff[solverIndex][re] * 
+            area[iFacelocal] / (xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz);
+        RDouble ax = DiffusionCoeff[solverIndex][re] * xfn[iFacelocal] * area[iFacelocal] - dx * area2;
+        RDouble ay = DiffusionCoeff[solverIndex][re] * yfn[iFacelocal] * area[iFacelocal] - dy * area2;
+        RDouble az = DiffusionCoeff[solverIndex][re] * zfn[iFacelocal] * area[iFacelocal] - dz * area2;
+
+        diagMatrixCoeff[le] += area2 / cp[le] * matrixCoeff;
+        bCoeff[le] += area2 * phi[re] + dphidx[le] * ax + dphidy[le] * ay + dphidz[le] * az;
+
+    }
+}
+
+void IncomEnergyEqCalculator::calVelocityInletBC(Grid*  gridIn, vector<int>* faceIndex, Data_Param* bcData, RDouble *diagMatrixCoeff, RDouble *bCoeff,  RDouble *q,
+    RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, RDouble *mu, RDouble matrixCoeff)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nTotalCell =grid->GetNTotalCell();
+    int* leftCellOfFace  = grid->GetLeftCellOfFace();
+
+    RDouble* xfn  = grid->GetFaceNormalX();
+    RDouble* yfn  = grid->GetFaceNormalY();
+    RDouble* zfn  = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+
+    RDouble* xcc  = grid->GetCellCenterX();
+    RDouble* ycc  = grid->GetCellCenterY();
+    RDouble* zcc  = grid->GetCellCenterZ();
+
+    RDouble* xfc  = grid->GetFaceCenterX();
+    RDouble* yfc  = grid->GetFaceCenterY();
+    RDouble* zfc  = grid->GetFaceCenterZ();
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    string varName = varNameIncom[solverIndex];
+
+    RDouble* Enthalpy = reinterpret_cast<RDouble*>(grid->GetDataPtr(varName));
+    RDouble* phi= reinterpret_cast<RDouble *>(grid->GetDataPtr("T"));
+    RDouble* cp = reinterpret_cast<RDouble *>(grid->GetDataPtr("cp"));
+    RDouble* u = reinterpret_cast<RDouble *>(grid->GetDataPtr("U"));
+    RDouble* v = reinterpret_cast<RDouble *>(grid->GetDataPtr("V"));
+    RDouble* w = reinterpret_cast<RDouble *>(grid->GetDataPtr("W"));
+    RDouble* dphidx = reinterpret_cast<RDouble *>(grid->GetDataPtr("d" + varName + "dx"));
+    RDouble* dphidy = reinterpret_cast<RDouble *>(grid->GetDataPtr("d" + varName + "dy"));
+    RDouble* dphidz = reinterpret_cast<RDouble *>(grid->GetDataPtr("d" + varName + "dz"));
+    RDouble* FaceFlux = reinterpret_cast<RDouble *>(grid->GetDataPtr("FaceFlux"));
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    
+    for (int iFace = 0; iFace < faceIndex->size(); ++ iFace)
+    {
+        int iFacelocal = (*faceIndex)[iFace]; //! The boundary element serial number is arranged in front of the element face.
+        int le = leftCellOfFace[iFacelocal];
+        int re = grid->GetRightCellOfFace()[iFacelocal];
+
+        RDouble dx = xfc[iFacelocal] - xcc[le];
+        RDouble dy = yfc[iFacelocal] - ycc[le];
+        RDouble dz = zfc[iFacelocal] - zcc[le];
+
+        RDouble area2 = DiffusionCoeff[solverIndex][re] * 
+            area[iFacelocal] / (xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz);
+        RDouble ax = DiffusionCoeff[solverIndex][re] * xfn[iFacelocal] * area[iFacelocal] - dx * area2;
+        RDouble ay = DiffusionCoeff[solverIndex][re] * yfn[iFacelocal] * area[iFacelocal] - dy * area2;
+        RDouble az = DiffusionCoeff[solverIndex][re] * zfn[iFacelocal] * area[iFacelocal] - dz * area2;
+
+        diagMatrixCoeff[le] += area2 / cp[re] * matrixCoeff;
+        bCoeff[le] += area2 * phi[re] + dphidx[le] * ax + dphidy[le] * ay + dphidz[le] * az;
+
+
+        if (FaceFlux[iFacelocal] < 0)
+        {
+            diagMatrixCoeff[le] -= FaceFlux[iFacelocal] * matrixCoeff;
+            bCoeff[le] -= FaceFlux[iFacelocal] * Enthalpy[re];
+        }
+    }
+}
+
+void IncomEnergyEqCalculator::calPressureOutletBC(Grid*  gridIn, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+    RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nTotalCell = grid->GetNTotalCell();
+    int* leftCellOfFace = grid->GetLeftCellOfFace();
+
+    RDouble* xfn = grid->GetFaceNormalX();
+    RDouble* yfn = grid->GetFaceNormalY();
+    RDouble* zfn = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+
+    RDouble* xcc = grid->GetCellCenterX();
+    RDouble* ycc = grid->GetCellCenterY();
+    RDouble* zcc = grid->GetCellCenterZ();
+
+    RDouble* xfc = grid->GetFaceCenterX();
+    RDouble* yfc = grid->GetFaceCenterY();
+    RDouble* zfc = grid->GetFaceCenterZ();
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    string varName = varNameIncom[solverIndex];
+
+    RDouble* Enthalpy = reinterpret_cast<RDouble*>(grid->GetDataPtr(varName));
+    RDouble* phi = reinterpret_cast<RDouble*>(grid->GetDataPtr("T"));
+    
+    RDouble* cp = reinterpret_cast<RDouble*>(grid->GetDataPtr("cp"));
+    RDouble* u = reinterpret_cast<RDouble*>(grid->GetDataPtr("U"));
+    RDouble* v = reinterpret_cast<RDouble*>(grid->GetDataPtr("V"));
+    RDouble* w = reinterpret_cast<RDouble*>(grid->GetDataPtr("W"));
+    RDouble* dphidx = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dx"));
+    RDouble* dphidy = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dy"));
+    RDouble* dphidz = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dz"));
+    RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    
+    for (int iFace = 0; iFace < faceIndex->size(); ++iFace)
+    {
+        int iFacelocal = (*faceIndex)[iFace]; //! The boundary element serial number is arranged in front of the element face.
+        int le = leftCellOfFace[iFacelocal];
+        int re = grid->GetRightCellOfFace()[iFacelocal];
+
+        RDouble dx = xfc[iFacelocal] - xcc[le];
+        RDouble dy = yfc[iFacelocal] - ycc[le];
+        RDouble dz = zfc[iFacelocal] - zcc[le];
+
+        RDouble area2 = DiffusionCoeff[solverIndex][re] * 
+            area[iFacelocal] / (xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz);
+        RDouble ax = DiffusionCoeff[solverIndex][re] * xfn[iFacelocal] * area[iFacelocal] - dx * area2;
+        RDouble ay = DiffusionCoeff[solverIndex][re] * yfn[iFacelocal] * area[iFacelocal] - dy * area2;
+        RDouble az = DiffusionCoeff[solverIndex][re] * zfn[iFacelocal] * area[iFacelocal] - dz * area2;
+
+        diagMatrixCoeff[le] += area2 / cp[re] * matrixCoeff;
+        bCoeff[le] += area2 * phi[re] + dphidx[le] * ax + dphidy[le] * ay + dphidz[le] * az;
+
+        if (FaceFlux[iFacelocal] < 0)
+        {
+            diagMatrixCoeff[le] -= FaceFlux[iFacelocal] * matrixCoeff;
+            bCoeff[le] -= FaceFlux[iFacelocal] * Enthalpy[re];
+        }
+    }
+}
+
+void IncomEnergyEqCalculator::calPressureInletBC(Grid*  grid, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+    RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff)
+{
+    calVelocityInletBC(grid, faceIndex, bcData, diagMatrixCoeff, bCoeff, q, dqdx, dqdy, dqdz, mu, matrixCoeff);
+}
+
+void IncomEnergyEqCalculator::calFarfieldBC(Grid*  gridIn, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+    RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nTotalCell = grid->GetNTotalCell();
+    int* leftCellOfFace = grid->GetLeftCellOfFace();
+
+    RDouble* xfn = grid->GetFaceNormalX();
+    RDouble* yfn = grid->GetFaceNormalY();
+    RDouble* zfn = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+
+    RDouble* xcc = grid->GetCellCenterX();
+    RDouble* ycc = grid->GetCellCenterY();
+    RDouble* zcc = grid->GetCellCenterZ();
+
+    RDouble* xfc = grid->GetFaceCenterX();
+    RDouble* yfc = grid->GetFaceCenterY();
+    RDouble* zfc = grid->GetFaceCenterZ();
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    string varName = varNameIncom[solverIndex];
+
+    RDouble* Enthalpy = reinterpret_cast<RDouble*>(grid->GetDataPtr(varName));
+    RDouble* phi = reinterpret_cast<RDouble*>(grid->GetDataPtr("T"));
+    
+    RDouble* cp = reinterpret_cast<RDouble*>(grid->GetDataPtr("cp"));
+    RDouble* u = reinterpret_cast<RDouble*>(grid->GetDataPtr("U"));
+    RDouble* v = reinterpret_cast<RDouble*>(grid->GetDataPtr("V"));
+    RDouble* w = reinterpret_cast<RDouble*>(grid->GetDataPtr("W"));
+    RDouble* dphidx = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dx"));
+    RDouble* dphidy = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dy"));
+    RDouble* dphidz = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dz"));
+    RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    
+    for (int iFace = 0; iFace < faceIndex->size(); ++iFace)
+    {
+        int iFacelocal = (*faceIndex)[iFace]; //! The boundary element serial number is arranged in front of the element face.
+        int le = leftCellOfFace[iFacelocal];
+        int re = grid->GetRightCellOfFace()[iFacelocal];
+
+        RDouble dx = xfc[iFacelocal] - xcc[le];
+        RDouble dy = yfc[iFacelocal] - ycc[le];
+        RDouble dz = zfc[iFacelocal] - zcc[le];
+
+        RDouble area2 = DiffusionCoeff[solverIndex][re] * 
+            area[iFacelocal] / (xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz);
+
+        RDouble ax = DiffusionCoeff[solverIndex][re] * xfn[iFacelocal] * area[iFacelocal] - dx * area2;
+        RDouble ay = DiffusionCoeff[solverIndex][re] * yfn[iFacelocal] * area[iFacelocal] - dy * area2;
+        RDouble az = DiffusionCoeff[solverIndex][re] * zfn[iFacelocal] * area[iFacelocal] - dz * area2;
+
+        diagMatrixCoeff[le] += area2 / cp[re] * matrixCoeff;
+        bCoeff[le] += area2 * phi[re] + dphidx[le] * ax + dphidy[le] * ay + dphidz[le] * az;
+
+        if (FaceFlux[iFacelocal] < 0)
+        {
+            diagMatrixCoeff[le] -= FaceFlux[iFacelocal] * matrixCoeff;
+            bCoeff[le] -= FaceFlux[iFacelocal] * Enthalpy[re];
+        }
+    }
+}
+
+void IncomEnergyEqCalculator::calInterfaceBC(Grid*  gridIn, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+    RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+    RDouble *faceWeightOfLeftCell = reinterpret_cast<RDouble *>(grid->GetDataPtr("faceWeightOfLeftCell"));
+    RDouble *upperMatrixCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("upperMatrixCoeff"));
+    RDouble *lowerMatrixCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("lowerMatrixCoeff"));
+    RDouble *FaceFlux = reinterpret_cast<RDouble *>(grid->GetDataPtr("FaceFlux"));
+    RDouble* cp = reinterpret_cast<RDouble*>(grid->GetDataPtr("cp"));
+
+    for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+    {
+        int iFacelocal = (*faceIndex)[iFace];
+        int le = leftCellOfFace[iFacelocal];
+        int re = rightCellOfFace[iFacelocal];
+
+        RDouble muLocal = faceWeightOfLeftCell[iFace] * mu[le] + (1.0 - faceWeightOfLeftCell[iFace]) * mu[re];
+        RDouble dx = xcc[re] - xcc[le];
+        RDouble dy = ycc[re] - ycc[le];
+        RDouble dz = zcc[re] - zcc[le];
+        RDouble area2 = muLocal * 
+            area[iFacelocal] / (xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz);
+        RDouble ax = muLocal * xfn[iFacelocal] * area[iFacelocal] - dx * area2;
+        RDouble ay = muLocal * yfn[iFacelocal] * area[iFacelocal] - dy * area2;
+        RDouble az = muLocal * zfn[iFacelocal] * area[iFacelocal] - dz * area2;
+
+
+        diagMatrixCoeff[le] = diagMatrixCoeff[le] + area2 / cp[re] * matrixCoeff;
+        upperMatrixCoeff[iFacelocal] = upperMatrixCoeff[iFacelocal] - area2 / cp[re] * matrixCoeff;
+
+        RDouble a12 = MAX(FaceFlux[iFacelocal], 0.0);
+        RDouble a21 = a12 - FaceFlux[iFacelocal];
+
+        diagMatrixCoeff[le] = diagMatrixCoeff[le] + a21 * matrixCoeff;
+        upperMatrixCoeff[iFacelocal] = upperMatrixCoeff[iFacelocal] - a21 * matrixCoeff;
+
+        RDouble sLR = ax * (faceWeightOfLeftCell[iFace] * dqdx[le] + (1.0 - faceWeightOfLeftCell[iFace]) * dqdx[re]) +
+            ay * (faceWeightOfLeftCell[iFace] * dqdy[le] + (1.0 - faceWeightOfLeftCell[iFace]) * dqdy[re]) +
+            az * (faceWeightOfLeftCell[iFace] * dqdz[le] + (1.0 - faceWeightOfLeftCell[iFace]) * dqdz[re]);
+
+        bCoeff[le] += sLR;
+
+    }
+}
+
+void IncomEnergyEqCalculator::CalcOtherbCoeff(Grid* gridIn, int iEquation)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int nInteriorFace = nTotalFace - nBoundFace;
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble *u = reinterpret_cast<RDouble *>(grid->GetDataPtr("U"));
+    RDouble *v = reinterpret_cast<RDouble *>(grid->GetDataPtr("V"));
+    RDouble *w = reinterpret_cast<RDouble *>(grid->GetDataPtr("W"));
+    RDouble *mu= reinterpret_cast<RDouble *>(grid->GetDataPtr("mu"));
+    RDouble *bCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("bCoeff"));
+    RDouble *k     = reinterpret_cast<RDouble *>(grid->GetDataPtr("k"));
+    RDouble *dudx  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdx"));
+    RDouble *dudy  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdy"));
+    RDouble *dudz  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdz"));
+    RDouble *dvdx  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdx"));
+    RDouble *dvdy  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdy"));
+    RDouble *dvdz  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdz"));
+    RDouble *dwdx  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdx"));
+    RDouble *dwdy  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdy"));
+    RDouble *dwdz  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdz"));
+    RDouble *faceWeightOfLeftCell  = reinterpret_cast<RDouble *>(grid->GetDataPtr("faceWeightOfLeftCell"));
+    RDouble **tau1 = NewPointer2<RDouble> (3, 3);
+    RDouble **tau2 = NewPointer2<RDouble> (3, 3);
+    RDouble *tauu1 = new double [3];
+    RDouble *tauu2 = new double [3];
+    RDouble *sf = new double [3];
+
+    RDouble* vol = grid->GetCellVolume();
+    RDouble* dpdx = reinterpret_cast<RDouble*>(grid->GetDataPtr("dpdx"));
+    RDouble* dpdy = reinterpret_cast<RDouble*>(grid->GetDataPtr("dpdy"));
+    RDouble* dpdz = reinterpret_cast<RDouble*>(grid->GetDataPtr("dpdz"));
+    RDouble* p= reinterpret_cast<RDouble*>(grid->GetDataPtr("P"));
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    UnstructBCSet **bcr = grid->GetBCRecord();
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int bcType = bcr[iFace]->GetKey();
+        if (bcType != PHENGLEI::INTERFACE)
+        {
+            continue;
+        }
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+        RDouble muf = faceWeightOfLeftCell[iFace] * mu[le] + (1.0 - faceWeightOfLeftCell[iFace]) * mu[re];
+        tau1[0][0] = 2 * dudx[le];
+        tau1[1][1] = 2 * dvdy[le];
+        tau1[2][2] = 2 * dwdz[le];
+        tau1[0][1] = dudy[le] + dvdx[le];
+        tau1[1][0] = tau1[0][1];
+        tau1[0][2] = dudz[le] + dwdx[le];
+        tau1[2][0] = tau1[0][2];
+        tau1[1][2] = dvdz[le] + dwdy[le];
+        tau1[2][1] = tau1[1][2];
+        tauu1[0] = tau1[0][0] * u[le] + tau1[0][1] * v[le] + tau1[0][2] * w[le];
+        tauu1[1] = tau1[1][0] * u[le] + tau1[1][1] * v[le] + tau1[1][2] * w[le];
+        tauu1[2] = tau1[1][0] * u[le] + tau1[2][1] * v[le] + tau1[2][2] * w[le];
+
+        tau2[0][0] = 2 * dudx[re];
+        tau2[1][1] = 2 * dvdy[re];
+        tau2[2][2] = 2 * dwdz[re];
+        tau2[0][1] = dudy[re] + dvdx[re];
+        tau2[1][0] = tau2[0][1];
+        tau2[0][2] = dudz[re] + dwdx[re];
+        tau2[2][0] = tau2[0][2];
+        tau2[1][2] = dvdz[re] + dwdy[re];
+        tau2[2][1] = tau2[1][2];
+        tauu2[0] = tau2[0][0] * u[re] + tau2[0][1] * v[re] + tau2[0][2] * w[re];
+        tauu2[1] = tau2[1][0] * u[re] + tau2[1][1] * v[re] + tau2[1][2] * w[re];
+        tauu2[2] = tau2[1][0] * u[re] + tau2[2][1] * v[re] + tau2[2][2] * w[re];
+
+        sf[0] = faceWeightOfLeftCell[iFace] * tauu1[0] + (1.0 - faceWeightOfLeftCell[iFace]) * tauu2[0];
+        sf[1] = faceWeightOfLeftCell[iFace] * tauu1[1] + (1.0 - faceWeightOfLeftCell[iFace]) * tauu2[1];
+        sf[2] = faceWeightOfLeftCell[iFace] * tauu1[2] + (1.0 - faceWeightOfLeftCell[iFace]) * tauu2[2];
+
+        RDouble s1 = muf * (xfn[iFace] * sf[0] + yfn[iFace] * sf[1] + zfn[iFace] * sf[2]) * area[iFace];
+        bCoeff[le] += s1;
+    }
+
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+        RDouble muf = faceWeightOfLeftCell[iFace] * mu[le] + (1.0 - faceWeightOfLeftCell[iFace]) * mu[re];
+        tau1[0][0] = 2 * dudx[le];
+        tau1[1][1] = 2 * dvdy[le];
+        tau1[2][2] = 2 * dwdz[le];
+        tau1[0][1] = dudy[le] + dvdx[le];
+        tau1[1][0] = tau1[0][1];
+        tau1[0][2] = dudz[le] + dwdx[le];
+        tau1[2][0] = tau1[0][2];
+        tau1[1][2] = dvdz[le] + dwdy[le];
+        tau1[2][1] = tau1[1][2];
+        tauu1[0] = tau1[0][0] * u[le] + tau1[0][1] * v[le] + tau1[0][2] * w[le];
+        tauu1[1] = tau1[1][0] * u[le] + tau1[1][1] * v[le] + tau1[1][2] * w[le];
+        tauu1[2] = tau1[1][0] * u[le] + tau1[2][1] * v[le] + tau1[2][2] * w[le];
+
+        tau2[0][0] = 2 * dudx[re];
+        tau2[1][1] = 2 * dvdy[re];
+        tau2[2][2] = 2 * dwdz[re];
+        tau2[0][1] = dudy[re] + dvdx[re];
+        tau2[1][0] = tau2[0][1];
+        tau2[0][2] = dudz[re] + dwdx[re];
+        tau2[2][0] = tau2[0][2];
+        tau2[1][2] = dvdz[re] + dwdy[re];
+        tau2[2][1] = tau2[1][2];
+        tauu2[0] = tau2[0][0] * u[re] + tau2[0][1] * v[re] + tau2[0][2] * w[re];
+        tauu2[1] = tau2[1][0] * u[re] + tau2[1][1] * v[re] + tau2[1][2] * w[re];
+        tauu2[2] = tau2[1][0] * u[re] + tau2[2][1] * v[re] + tau2[2][2] * w[re];
+
+        sf[0] = faceWeightOfLeftCell[iFace] * tauu1[0] + (1.0 - faceWeightOfLeftCell[iFace]) * tauu2[0];
+        sf[1] = faceWeightOfLeftCell[iFace] * tauu1[1] + (1.0 - faceWeightOfLeftCell[iFace]) * tauu2[1];
+        sf[2] = faceWeightOfLeftCell[iFace] * tauu1[2] + (1.0 - faceWeightOfLeftCell[iFace]) * tauu2[2];
+
+        RDouble s1 = muf * (xfn[iFace] * sf[0] + yfn[iFace] * sf[1] + zfn[iFace] * sf[2]) * area[iFace];
+        bCoeff[le] += s1;
+        bCoeff[re] -= s1;
+    }
+    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+    {
+        bCoeff[iCell] += (u[iCell] * dpdx[iCell] + v[iCell] * dpdy[iCell] + w[iCell] * dpdz[iCell]) * vol[iCell];
+    }
+    if (isUnsteady==1)
+    {
+        RDouble dt = GlobalDataBase::GetDoubleParaFromDB("dt");
+
+        RDouble* pOld = reinterpret_cast<RDouble*>(grid->GetDataPtr("POld"));
+        for (int iCell = 0; iCell < nTotalCell; ++iCell)
+        {
+            bCoeff[iCell] += ((p[iCell]-pOld[iCell])/dt) * vol[iCell];
+        }
+    }
+    DelPointer2(tau1);
+    DelPointer2(tau2);
+    delete[] tauu1;
+    delete[] tauu2;
+    delete[] sf;
+}
+
+void IncomEnergyEqCalculator::GetResidual(Grid *gridIn, vector<RDouble>& res)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble resNow = 0.0;
+
+    grid->GetData("EnthalpyResNow", &resNow, PHDOUBLE, 1);
+
+    res.push_back(resNow);
+}
+
+void IncomEnergyEqCalculator::InitialUnsteadyVar(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    PHString1D phiNameList;
+    phiNameList.push_back("Enthalpy");
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady == 0)
+    {
+        return;
+    }
+
+    string TranCalcMethod = GlobalDataBase::GetStrParaFromDB("TranCalcMethod");
+    if (TranCalcMethod == "IMPLICIT_EULER")
+    {
+        ImplicitEuler_ReInitTimeVar(grid, phiNameList);
+    }
+    else if (TranCalcMethod == "IMPLICIT_2ND_ORDER")
+    {
+        Implicit2ndOrder_ReInitTimeVar(grid, phiNameList);
+    }
+
+    PHString1D().swap(phiNameList);
+}
+
+void IncomEnergyEqCalculator::UpdateUnsteadyVariable(Grid *grid)
+{
+    UnstructGrid *gridIn = UnstructGridCast(grid); 
+    std::vector<std::string> phiNameList;
+    phiNameList.push_back("Enthalpy");
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady == 0)
+    {
+        return;
+    }
+
+    string TranCalcMethod = GlobalDataBase::GetStrParaFromDB("TranCalcMethod");
+    if (TranCalcMethod == "IMPLICIT_EULER")
+    {
+        ImplicitEuler_SaveOldTimeValue(gridIn, phiNameList);
+    }
+    else if (TranCalcMethod == "IMPLICIT_2ND_ORDER")
+    {
+        Implicit2ndOrder_SaveOldTimeValue(gridIn, phiNameList);
+    }
+    else
+    {
+        cout << "we not support Tran Method : " << TranCalcMethod  << endl;
+    }
+
+}
+
+void IncomEnergyEqCalculator::UpdateBCValue(Grid*  gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    string varName = varNameIncom[solverIndex];
+
+    int nTotalCell = grid->GetNTotalCell();
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    RDouble *phi = reinterpret_cast<RDouble *>(grid->GetDataPtr("T"));
+    RDouble* Enthalpy = reinterpret_cast<RDouble*>(grid->GetDataPtr(varName));
+    RDouble* cp = reinterpret_cast<RDouble*>(grid->GetDataPtr("cp"));
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+    int* rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble* faceCenterX = grid->GetFaceCenterX();
+    RDouble* faceCenterY = grid->GetFaceCenterY();
+    RDouble* faceCenterZ = grid->GetFaceCenterZ();
+    RDouble *FaceFlux = reinterpret_cast<RDouble *>(grid->GetDataPtr("FaceFlux"));
+    
+    for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+        int bcType = bcRegion->GetBCType();
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        Data_Param *bcData = bcRegion->GetBCParamDataBase();
+
+        if (bcType == PHENGLEI::SOLID_SURFACE)
+        {
+            RDouble spBound;
+
+            for (std::size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                spBound = phi[le];
+                if (bcData->IsExist("initT", PHDOUBLE, 1))
+                {
+                    bcData->GetData("initT", &spBound, PHDOUBLE, 1);
+                }
+                else if (bcData->IsExist("TPolynomial", PHDOUBLE, 4))
+                {
+                    RDouble* TPolynomial = new RDouble[4];
+                    bcData->GetData("TPolynomial", TPolynomial, PHDOUBLE, 4);
+                    spBound = TPolynomial[0] + TPolynomial[1] * faceCenterX[iFacelocal] + TPolynomial[2] * faceCenterY[iFacelocal]
+                        + TPolynomial[3] * faceCenterZ[iFacelocal];
+                }
+
+                phi[re] = spBound;
+                Enthalpy[re] = cp[re] * spBound;
+            }
+
+        }
+        else if (bcType == PHENGLEI::SYMMETRY)
+        {
+            //! not this boundary!
+        }
+        else if (bcType == PHENGLEI::FARFIELD)
+        {
+            RDouble spBound;
+            if (bcData->IsExist("initT", PHDOUBLE, 1))
+            {
+                bcData->GetData("initT", &spBound, PHDOUBLE, 1);
+            }
+            else
+            {
+                cout << " No initial value has assigned to the boundary " << endl;
+            }
+
+            for (int iFace = 0; iFace < faceIndex->size(); ++iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                if (FaceFlux[iFacelocal] < 0)
+                {
+                    phi[re] = spBound;
+                    Enthalpy[re] = cp[re] * spBound;
+                }
+                else
+                {
+                    phi[re] = phi[le];
+                    Enthalpy[re] =  cp[iFacelocal] * phi[le];
+                }
+            }
+        }
+        else if (bcType == PHENGLEI::INFLOW)
+        {
+            RDouble spBound;
+
+            if (bcData->IsExist("initT", PHDOUBLE, 1))
+            {
+                bcData->GetData("initT", &spBound, PHDOUBLE, 1);
+
+                for (int iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int re = rightCellOfFace[iFacelocal];
+                    phi[re] = spBound;
+                    Enthalpy[re] = cp[re] * spBound;
+                }
+            }
+            else if(bcData->IsExist("TPolynomial", PHDOUBLE, 3))
+            {
+                RDouble* TPolynomial = new RDouble[3];
+                bcData->GetData("TPolynomial", TPolynomial, PHDOUBLE, 3);
+                for (int iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int re = rightCellOfFace[iFacelocal];
+                    spBound = TPolynomial[0] * faceCenterX[iFacelocal] + TPolynomial[1] * faceCenterY[iFacelocal] 
+                        + TPolynomial[2] * faceCenterZ[iFacelocal];
+
+                    phi[re] = spBound;
+                    Enthalpy[re] = cp[re] * spBound;
+                }
+            }
+            else
+            {
+                cout << " No initial value has assigned to the boundary " << endl;
+            }
+        }
+        else if (bcType == PHENGLEI::OUTFLOW)
+        {
+            RDouble spBound;
+
+            if (bcData->IsExist("initT", PHDOUBLE, 1))
+            {
+                bcData->GetData("initT", &spBound, PHDOUBLE, 1);
+            }
+
+            for (int iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                phi[re] = phi[le];
+                Enthalpy[re] = cp[re] * phi[re];
+                if (FaceFlux[iFacelocal] < 0.0)
+                {            
+                    phi[re] = spBound;
+                    Enthalpy[re] = cp[re] * spBound;
+                }
+            }
+        }
+        else if (bcType == PHENGLEI::PRESSURE_INLET)
+        {
+            RDouble spBound;
+            if (bcData->IsExist("initT", PHDOUBLE, 1))
+            {
+                bcData->GetData("initT", &spBound, PHDOUBLE, 1);
+
+                for (int iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int re = rightCellOfFace[iFacelocal];
+                    phi[re] = spBound;
+                    Enthalpy[re] = cp[re] * spBound;
+                }
+            }
+            else if(bcData->IsExist("TPolynomial", PHDOUBLE, 3))
+            {
+                RDouble* TPolynomial = new RDouble[3];
+                bcData->GetData("TPolynomial", TPolynomial, PHDOUBLE, 3);
+                for (int iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int re = rightCellOfFace[iFacelocal];
+                    spBound = TPolynomial[0] * faceCenterX[iFacelocal] + TPolynomial[1] * faceCenterY[iFacelocal] 
+                        + TPolynomial[2] * faceCenterZ[iFacelocal];
+
+                    phi[re] = spBound;
+                    Enthalpy[re] = cp[re] * spBound;
+                }
+            }
+            else
+            {
+                cout << " No initial value has assigned to the boundary " << endl;
+            }
+        }
+        else if (bcType == PHENGLEI::PRESSURE_OUTLET)
+        {
+            RDouble spBound;
+
+            if (bcData->IsExist("initT", PHDOUBLE, 1))
+            {
+                bcData->GetData("initT", &spBound, PHDOUBLE, 1);
+            }
+
+            for (int iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                phi[re] = phi[le];
+                Enthalpy[re] = cp[re] * phi[re];
+                if (FaceFlux[iFacelocal] < 0.0)
+                {            
+                    phi[re] = spBound;
+                    Enthalpy[re] = cp[re] * spBound;
+                }
+            }
+        }
+    }
+
+    CommunicateAnInterfaceVar(phi);
+    CommunicateAnInterfaceVar(Enthalpy);
+}
+
+void IncomEnergyEqCalculator::InitFlowAsRestart(Grid* gridIn)
+{
+    IncomScalarEqCalculator::InitFlowAsRestart(gridIn);
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+
+    RDouble initCPg = GlobalDataBase::GetDoubleParaFromDB("initCPg");
+    RDouble initT = GlobalDataBase::GetDoubleParaFromDB("initT");
+    RDouble initPhi = initCPg * initT;
+    RDouble* phi = reinterpret_cast<RDouble*>(grid->GetDataPtr(varNameIncom[solverIndex]));
+    PHSPACE::SetField(phi, initPhi, nTotal);
+
+    GAS_SPACE::gas->SetGasCp("gasCp");
+    GAS_SPACE::gas->SetGasK("gasK");
+    GAS_SPACE::gas->InitParameterForK();
+
+    RDouble *t = reinterpret_cast<RDouble *>(grid->GetDataPtr("T"));
+    PHSPACE::SetField(t, initT, nTotal);
+
+    RDouble *cpg = reinterpret_cast<RDouble *>(grid->GetDataPtr("cp"));
+    PHSPACE::SetField(cpg, initCPg, nTotal);
+
+    RDouble initk = GlobalDataBase::GetDoubleParaFromDB("initK");
+    RDouble *k = reinterpret_cast<RDouble *>(grid->GetDataPtr("k"));
+    PHSPACE::SetField(k, initk, nTotal);
+}
+
+void IncomEnergyEqCalculator::AllocateGlobalVar(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    IncomScalarEqCalculator::AllocateGlobalVar(grid);
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    
+    RDouble *t = NewPointer<RDouble>(nTotal);
+    grid->UpdateDataPtr("T", t);
+
+    RDouble *cpg = NewPointer<RDouble>(nTotal);
+    grid->UpdateDataPtr("cp", cpg);
+
+    RDouble *k = NewPointer<RDouble>(nTotal);
+    grid->UpdateDataPtr("k", k);
+
+    RDouble* wallq = NewPointer<RDouble>(nBoundFace);
+    grid->UpdateDataPtr("wallq", wallq);
+
+    RDouble* heatFlux = NewPointer<RDouble>(nTotal);
+    grid->UpdateDataPtr("heatFlux", heatFlux);
+}
+
+void IncomEnergyEqCalculator::IncompressibleInitial(Grid * gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    RDouble usq;
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+    int nTotalInnerFace = nTotalFace - nBoundFace;
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    int nTotal = nTotalCell + nBoundFace;
+    RDouble *u = reinterpret_cast<RDouble *>(grid->GetDataPtr("U"));
+    RDouble *v = reinterpret_cast<RDouble *>(grid->GetDataPtr("V"));
+    RDouble *w = reinterpret_cast<RDouble *>(grid->GetDataPtr("W"));
+    RDouble *t = reinterpret_cast<RDouble *>(grid->GetDataPtr("T"));
+    RDouble *k = reinterpret_cast<RDouble *>(grid->GetDataPtr("k"));
+    RDouble *h = reinterpret_cast<RDouble *>(grid->GetDataPtr("Enthalpy"));
+    RDouble *cpg = reinterpret_cast<RDouble *>(grid->GetDataPtr("cp"));
+
+    GAS_SPACE::gas->UpdateK(grid, k);
+    GAS_SPACE::gas->UpdateCp(grid, cpg);
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    int solverIndex = GetSolverIndex();
+    
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        DiffusionCoeff[solverIndex][iCell] = k[iCell];
+
+        usq = (u[iCell] * u[iCell] + v[iCell] * v[iCell] + w[iCell] * w[iCell]) / 2;
+        h[iCell] = cpg[iCell] * t[iCell] + usq;
+    }
+
+    UpdateBCValue(grid);
+
+    InitialUnsteadyVar(grid);
+}
+
+void IncomEnergyEqCalculator::UpdateProperties(Grid* gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    RDouble *u = reinterpret_cast<RDouble *>(grid->GetDataPtr("U"));
+    RDouble *v = reinterpret_cast<RDouble *>(grid->GetDataPtr("V"));
+    RDouble *w = reinterpret_cast<RDouble *>(grid->GetDataPtr("W"));
+    RDouble *t = reinterpret_cast<RDouble *>(grid->GetDataPtr("T"));
+    RDouble *h = reinterpret_cast<RDouble *>(grid->GetDataPtr("Enthalpy"));
+    RDouble *cp = reinterpret_cast<RDouble *>(grid->GetDataPtr("cp"));
+    RDouble *k = reinterpret_cast<RDouble *>(grid->GetDataPtr("k"));
+
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nIFace = grid->GetNIFace();
+    int* rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble tMin = 1.0;
+    RDouble tMax = 5000.0;
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        t[iCell] = h[iCell] / cp[iCell];
+
+        if (t[iCell] < tMin)
+        {
+            t[iCell] = tMin;
+        }
+        else if (t[iCell] > tMax)
+        {
+            t[iCell] = tMax;
+        }
+    }
+
+    UpdateBCValue(grid);
+
+    GAS_SPACE::gas->UpdateK(grid, k);
+    GAS_SPACE::gas->UpdateCp(grid, cp);
+
+    CommunicateAnInterfaceVar(h);
+    CommunicateAnInterfaceVar(t);
+    CommunicateAnInterfaceVar(k);
+    CommunicateAnInterfaceVar(cp);
+
+}
+
+}
\ No newline at end of file
diff --git a/CFD/IncomSolver/src/IncomGas.cpp b/CFD/IncomSolver/src/IncomGas.cpp
new file mode 100644
index 0000000..e70c2e7
--- /dev/null
+++ b/CFD/IncomSolver/src/IncomGas.cpp
@@ -0,0 +1,809 @@
+#include "IncomGas.h"
+#include "GlobalDataBase.h"
+#include "PHIO.h"
+#include <algorithm>
+
+using namespace std;
+
+namespace PHSPACE
+{
+namespace GAS_SPACE
+{
+    IncomGas::IncomGas()
+    {
+        
+        componentLib = {"AIR", "H2", "H2_l", "NH3_l", "CH4", "C2H4", "C2H6", "C3H8", "NG", "LNG", "H2S", "Cl2", "NH3"};
+        SetPropertyLib();
+    }
+
+    IncomGas::~IncomGas()
+    {
+        int muType = GlobalDataBase::GetIntParaFromDB("muType");
+        if (muType == muIdealGasMixingLaw)
+        {
+            DelPointer2(phiij);
+        }
+        int massdiffType = GlobalDataBase::GetIntParaFromDB("massdiffType");
+        if (massdiffType == massDiffDiluteApprox)
+        {
+            delete[] dilute;
+        }
+    }
+
+    void IncomGas::InitCommonParameter()
+    {
+        PerfectGas::InitCommonParameter();
+
+           //! Operating Pressure
+           //! Operating Pressure
+        
+    }
+
+    void IncomGas::InitParameterForMu()
+    {
+        RDouble refT = GlobalDataBase::GetDoubleParaFromDB("refT");
+        int muType = GlobalDataBase::GetIntParaFromDB("muType");
+        if (muType == muIdealGasMixingLaw)
+        {
+            ComputePhiIJ();
+        }
+    }
+
+    void IncomGas::InitParameterForK()
+    {
+        int kType = GlobalDataBase::GetIntParaFromDB("kType");
+        if (kType == kIdealGasMixingLaw)
+        {
+            ComputePhiIJ();
+        }
+    }
+
+    void IncomGas::InitParameterForMassdiff()
+    {
+        int massdiffType = GlobalDataBase::GetIntParaFromDB("massdiffType");
+        int numOfGas = GlobalDataBase::GetIntParaFromDB("numOfGas");
+        if (massdiffType == massDiffConstantDiluteApprox)
+        {
+            dilute = new RDouble[1];
+            if (GlobalDataBase::IsExist("dilute", PHINT, 1))
+            {
+                GlobalDataBase::GetData("dilute", dilute, PHDOUBLE, 1);
+            }
+            else
+            {
+                dilute[0] = 2.88e-5;
+            }
+        }
+        else if (massdiffType == massDiffDiluteApprox)
+        {
+            dilute = new RDouble[numOfGas];
+            GlobalDataBase::GetData("dilute", dilute, PHDOUBLE, numOfGas);
+        }
+        else if (massdiffType == massDiffMulticomponent)
+        {
+
+        }
+    }
+
+    void IncomGas::SetGasName(string gasName)
+    {
+        int numOfGas = GlobalDataBase::GetIntParaFromDB("numOfGas");
+        gasNameList = new string[numOfGas];
+        GlobalDataBase::GetData(gasName, gasNameList, PHSTRING, numOfGas);
+    }
+
+    void IncomGas::SetGasMolarMass(string gasMolarMass)
+    {
+        int numOfGas = GlobalDataBase::GetIntParaFromDB("numOfGas");
+        gasMolarMassList = new RDouble[numOfGas];
+        for (int iSp = 0; iSp < numOfGas; ++iSp)
+        {
+            auto iter = find(componentLib.begin(), componentLib.end(), gasNameList[iSp]);
+            if (iter != componentLib.end())
+            {
+                gasMolarMassList[iSp] = propertyLib[gasNameList[iSp]].molarMass;
+            }
+        }
+    }
+
+    void IncomGas::SetGasRho(string gasRho)
+    {
+        int numOfGas = GlobalDataBase::GetIntParaFromDB("numOfGas");
+        gasRhoList = new RDouble[numOfGas];
+        for (int iSp = 0; iSp < numOfGas; ++iSp)
+        {
+            auto iter = find(componentLib.begin(), componentLib.end(), gasNameList[iSp]);
+            if (iter != componentLib.end())
+            {
+                gasRhoList[iSp] = propertyLib[gasNameList[iSp]].rho;
+            }
+
+        }
+    }
+
+    void IncomGas::SetGasMu(string gasMu)
+    {
+        int numOfGas = GlobalDataBase::GetIntParaFromDB("numOfGas");
+        gasMuList = new RDouble[numOfGas];
+        for (int iSp = 0; iSp < numOfGas; ++iSp)
+        {
+            auto iter = find(componentLib.begin(), componentLib.end(), gasNameList[iSp]);
+            if (iter != componentLib.end())
+            {
+                gasMuList[iSp] = propertyLib[gasNameList[iSp]].mu;
+            }
+        }
+    }
+
+    void IncomGas::SetGasCp(string gasCp)
+    {
+        int numOfGas = GlobalDataBase::GetIntParaFromDB("numOfGas");
+        gasCpList = new RDouble[numOfGas];
+        for (int iSp = 0; iSp < numOfGas; ++iSp)
+        {
+            auto iter = find(componentLib.begin(), componentLib.end(), gasNameList[iSp]);
+            if (iter != componentLib.end())
+            {
+                gasCpList[iSp] = propertyLib[gasNameList[iSp]].cp;
+            }
+        }
+    }
+
+    void IncomGas::SetGasK(string gasK)
+    {
+        int numOfGas = GlobalDataBase::GetIntParaFromDB("numOfGas");
+        gasKList = new RDouble[numOfGas];
+        for (int iSp = 0; iSp < numOfGas; ++iSp)
+        {
+            auto iter = find(componentLib.begin(), componentLib.end(), gasNameList[iSp]);
+            if (iter != componentLib.end())
+            {
+                gasKList[iSp] = propertyLib[gasNameList[iSp]].k;
+            }
+        }
+    }
+
+    void IncomGas::UpdateRg(UnstructGrid* grid, RDouble* Rg)
+    {
+        int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+        int numOfGas = GlobalDataBase::GetIntParaFromDB("numOfGas");
+        string gasName = gasNameList[0];
+        RDouble* massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(gasName));
+        RDouble gasR = 8.314;
+        if (massFracOfGas == NULL)
+        {
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                Rg[iCell] = gasR / gasMolarMassList[0];
+            }
+        }
+        else
+        {
+            SetField(Rg, 0.0 , nTotal);
+            for (int iGas = 0; iGas < numOfGas; ++iGas)
+            {
+                massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(gasNameList[iGas]));
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    Rg[iCell] += massFracOfGas[iCell] * gasR / gasMolarMassList[iGas];
+                }
+            }
+        }        
+    }
+
+    void IncomGas::UpdateRho(UnstructGrid* grid, RDouble* rho)
+    {
+        RDouble refT = GlobalDataBase::GetDoubleParaFromDB("refT");
+        RDouble refP = GlobalDataBase::GetDoubleParaFromDB("refP");
+        int rhoType = GlobalDataBase::GetIntParaFromDB("rhoType");
+        switch (rhoType)
+        {
+        case rhoConstant:
+        {
+            break;
+        }
+
+        case rhoIncompressibleIdealGas:
+        {
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            RDouble* T = reinterpret_cast<RDouble*>(grid->GetDataPtr("T"));
+            RDouble* Rg = reinterpret_cast<RDouble*>(grid->GetDataPtr("Rg"));
+            RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+            
+            if (T == NULL)
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    cRho[iCell] = 1 / (Rg[iCell] * refT);
+                    rho[iCell] = refP * cRho[iCell];
+                }
+            }
+            else
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    cRho[iCell] = 1 / (Rg[iCell] * T[iCell]);
+                    rho[iCell] = refP * cRho[iCell];
+                }
+            }        
+
+            break;
+        }
+
+        case rhoIdealGas:
+        {
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            RDouble* T = reinterpret_cast<RDouble*>(grid->GetDataPtr("T"));
+            RDouble* p = reinterpret_cast<RDouble*>(grid->GetDataPtr("P"));
+            RDouble* Rg = reinterpret_cast<RDouble*>(grid->GetDataPtr("Rg"));
+            RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+
+            if (T == NULL)
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    cRho[iCell] = 1 / (Rg[iCell] * refT);
+                    rho[iCell] = (refP + p[iCell]) * cRho[iCell];
+                }
+            }
+            else
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    cRho[iCell] = 1 / (Rg[iCell] * T[iCell]);
+                    rho[iCell] = (refP + p[iCell]) * cRho[iCell];
+                }
+            }        
+
+            break;
+        }
+
+        case rhoVolumnWeightedMixingLaw:
+        {
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            string gasName = gasNameList[0];
+            RDouble* massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(gasName));
+            int numOfGas = GlobalDataBase::GetIntParaFromDB("numOfGas");
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                rho[iCell] = massFracOfGas[iCell] / gasRhoList[0];
+            }
+
+            for (int iGas = 1; iGas < numOfGas; ++iGas)
+            {
+                gasName = gasNameList[iGas];
+                massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(gasName));
+
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    rho[iCell] += massFracOfGas[iCell] / gasRhoList[iGas];
+                }
+            }
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                rho[iCell] = 1 / rho[iCell];
+            }
+
+            break;
+        }
+        }
+    }
+
+    void IncomGas::UpdateMu(UnstructGrid* grid, RDouble* mu)
+    {
+        RDouble refT = GlobalDataBase::GetDoubleParaFromDB("refT");
+        int muType = GlobalDataBase::GetIntParaFromDB("muType");
+        switch (muType)
+        {
+        case muConstant:
+        {
+            break;
+        }
+
+        case muSutherLand:
+        {
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            RDouble* T = reinterpret_cast<RDouble*>(grid->GetDataPtr("T"));
+            int coeOfSutherland = GlobalDataBase::GetIntParaFromDB("numOfCoeSutherland");
+
+            if (coeOfSutherland == 2)
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    mu[iCell] = 1.458e-6 * pow(T[iCell], 3/2) / (T[iCell] + 110.4);
+                }
+            }
+            else if (coeOfSutherland == 3)
+            {
+                RDouble referenceValue = refT + 110.56;
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    mu[iCell] = 1.716e-5 * pow(T[iCell] / refT, 3 / 2) * referenceValue / (T[iCell] + 110.56);
+                }
+            }
+            
+            break;
+        }
+
+        case muIdealGasMixingLaw:
+        {
+            int numOfGas = GlobalDataBase::GetIntParaFromDB("numOfGas");
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            RDouble* sumOfAmount = NewPointer<RDouble>(nTotal);
+            RDouble** amountOfSubstance = NewPointer2<RDouble>(numOfGas, nTotal);
+            RDouble** amountFracOfSubstance = NewPointer2<RDouble>(numOfGas, nTotal);
+            ComputeAmountOfSubstance(grid, amountOfSubstance, amountFracOfSubstance);
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                sumOfAmount[iCell] = amountFracOfSubstance[0][iCell] * phiij[0][0];
+            }
+
+            for (int iGas = 1; iGas < numOfGas; ++iGas)
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    sumOfAmount[iCell] += amountFracOfSubstance[iGas][iCell] * phiij[0][iGas];
+                }
+            }
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                mu[iCell] = amountFracOfSubstance[0][iCell] * gasMuList[0] / sumOfAmount[iCell];
+            }
+
+            for (int iGas = 1; iGas < numOfGas; ++iGas)
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    mu[iCell] += amountFracOfSubstance[iGas][iCell] * gasMuList[iGas] / sumOfAmount[iCell];
+                }
+            }
+
+            DelPointer(sumOfAmount);
+            DelPointer2(amountOfSubstance);
+            DelPointer2(amountFracOfSubstance);
+            break;
+        }
+
+        case muMassWeightedMixingLaw:
+        {
+            int numOfGas = GlobalDataBase::GetIntParaFromDB("numOfGas");
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            string gasName = gasNameList[0];
+            RDouble* massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(gasName));
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                mu[iCell] = massFracOfGas[iCell] * gasMuList[0];
+            }
+
+            for (int iGas = 1; iGas < numOfGas; ++iGas)
+            {
+                gasName = gasNameList[iGas];
+                massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(gasName));
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    mu[iCell] += massFracOfGas[iCell] * gasMuList[iGas];
+                }
+            }
+
+            break;
+        }
+
+        case muPiecewiseLinear:
+        {
+
+            break;
+        }
+
+        case muPolynomial:
+        {
+            break;
+        }
+
+        case muPowerLaw:
+        {
+            break;
+        }
+        }
+    }
+
+    void IncomGas::UpdateCp(UnstructGrid* grid, RDouble* cp)
+    {
+        int cpType = GlobalDataBase::GetIntParaFromDB("cpType");
+        switch (cpType)
+        {
+        case cpConstant:
+        {
+            break;
+        }
+
+        case cpMixing:
+        {
+            int numOfGas = GlobalDataBase::GetIntParaFromDB("numOfGas");
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            string gasName = gasNameList[0];
+            RDouble* massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(gasName));
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                cp[iCell] = massFracOfGas[iCell] * gasCpList[0];
+            }
+
+            for (int iGas = 1; iGas < numOfGas; ++iGas)
+            {
+                gasName = gasNameList[iGas];
+                massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(gasName));
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    cp[iCell] += massFracOfGas[iCell] * gasCpList[iGas];
+                }
+            }
+
+            break;
+        }
+
+        case cpPiecewiseLinear:
+        {
+            break;
+        }
+
+        case cpPiecewisePolynomial:
+        {
+            break;
+        }
+
+        case cpPolynomial:
+        {
+            break;
+        }
+
+        }
+    }
+
+    void IncomGas::UpdateK(UnstructGrid* grid, RDouble* k)
+    {
+        int kType = GlobalDataBase::GetIntParaFromDB("kType");
+        switch (kType)
+        {
+        case kConstant:
+        {
+            break;
+        }
+
+        case kMassWeightedMixingLaw:
+        {
+            int numOfGas = GlobalDataBase::GetIntParaFromDB("numOfGas");
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            string gasName = gasNameList[0];
+            RDouble* massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(gasName));
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                k[iCell] = massFracOfGas[iCell] * gasKList[0];
+            }
+
+            for (int iGas = 1; iGas < numOfGas; ++iGas)
+            {
+                gasName = gasNameList[iGas];
+                massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(gasName));
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    k[iCell] += massFracOfGas[iCell] * gasKList[iGas];
+                }
+            }
+
+            break;
+        }
+
+        case kIdealGasMixingLaw:
+        {
+            int numOfGas = GlobalDataBase::GetIntParaFromDB("numOfGas");
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            RDouble* sumOfAmount = NewPointer<RDouble>(nTotal);
+            RDouble** amountOfSubstance = NewPointer2<RDouble>(numOfGas, nTotal);
+            RDouble** amountFracOfSubstance = NewPointer2<RDouble>(numOfGas, nTotal);
+            ComputeAmountOfSubstance(grid, amountOfSubstance, amountFracOfSubstance);
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                sumOfAmount[iCell] = amountFracOfSubstance[0][iCell] * phiij[0][0];
+            }
+
+            for (int iGas = 1; iGas < numOfGas; ++iGas)
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    sumOfAmount[iCell] += amountFracOfSubstance[iGas][iCell] * phiij[0][iGas];
+                }
+            }
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                k[iCell] = amountFracOfSubstance[0][iCell] * gasKList[0] / sumOfAmount[iCell];
+            }
+
+            for (int iGas = 1; iGas < numOfGas; ++iGas)
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    k[iCell] += amountFracOfSubstance[iGas][iCell] * gasKList[iGas] / sumOfAmount[iCell];
+                }
+            }
+
+            DelPointer(sumOfAmount);
+            DelPointer2(amountOfSubstance);
+            DelPointer2(amountFracOfSubstance);
+
+            break;
+        }
+
+        case kPiecewiseLinear:
+        {
+            break;
+        }
+
+        case kPiecewisePolynomial:
+        {
+            break;
+        }
+
+        case kPolynomial:
+        {
+            break;
+        }
+
+        }
+    }
+
+    void IncomGas::UpdateMassDiff(UnstructGrid* grid, int iGas, RDouble* massdiff)
+    {
+        RDouble sct = 0.7;
+        int isSolveTurb = GlobalDataBase::GetIntParaFromDB("isSolveTurb");
+        int massdiffType = GlobalDataBase::GetIntParaFromDB("massdiffType");
+        switch (massdiffType)
+        {
+        case massDiffConstantDiluteApprox:
+        {
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+
+            if (isSolveTurb == 0)
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    massdiff[iCell] = rho[iCell] * dilute[0];
+                }
+            }
+            else
+            {
+                RDouble* vist = reinterpret_cast<RDouble*>(grid->GetDataPtr("vist"));
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    massdiff[iCell] = rho[iCell] * dilute[0];
+                    massdiff[iCell] += vist[iCell] / sct;
+                }
+            }
+            break;
+        }
+
+        case massDiffDiluteApprox:
+        {
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+
+            if (isSolveTurb == 0)
+            {
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    massdiff[iCell] = rho[iCell] * dilute[iGas];
+                }
+            }
+            else
+            {
+                RDouble* vist = reinterpret_cast<RDouble*>(grid->GetDataPtr("vist"));
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    massdiff[iCell] = rho[iCell] * dilute[iGas];
+                    massdiff[iCell] += vist[iCell] / sct;
+                }
+            }
+            break;
+        }
+
+        case massDiffMulticomponent:
+        {
+            break;
+        }
+
+        case massDiffUnityLewisNumber:
+        {
+            int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+            RDouble* k = reinterpret_cast<RDouble*>(grid->GetDataPtr("k"));
+            RDouble* cp = reinterpret_cast<RDouble*>(grid->GetDataPtr("cp"));
+            RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                massdiff[iCell] = k[iCell] / (rho[iCell] * cp[iCell]);
+            }
+            break;
+        }
+        }
+    }
+
+    void IncomGas::ComputePhiIJ()
+    {
+        int numOfGas = GlobalDataBase::GetIntParaFromDB("numOfGas");
+        phiij = NewPointer2<RDouble>(numOfGas, numOfGas);
+
+        for (int iGas = 0; iGas < numOfGas; ++iGas)
+        {
+            for (int jGas = 0; jGas < numOfGas; ++jGas)
+            {
+                RDouble molarMassI = gasMolarMassList[iGas];
+                RDouble molarMassJ = gasMolarMassList[jGas];
+                RDouble muI = gasMuList[iGas];
+                RDouble muJ = gasMuList[jGas];
+
+                RDouble molarMassRatio = molarMassJ / molarMassI;
+                RDouble muRatio = muI / muJ;
+
+                phiij[iGas][jGas] = pow(1 + pow(muRatio, 1 / 2) * pow(molarMassRatio, 1 / 4), 2) / pow((1 + molarMassRatio) * 8, 1 / 2);
+            }
+        }
+    }
+
+    void IncomGas::ComputeAmountOfSubstance(UnstructGrid* grid, RDouble** amountOfSubstance, RDouble** amountFracOfSubstance)
+    {
+        int numOfGas = GlobalDataBase::GetIntParaFromDB("numOfGas");
+        int nTotal = grid->GetNTotalCell() + grid->GetNBoundFace();
+        RDouble* vol = grid->GetCellVolume();
+        RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+        RDouble* totalAmountOfSubstance = new RDouble[nTotal];
+        for (int iCell = 0; iCell < nTotal; ++iCell)
+        {
+            totalAmountOfSubstance[iCell] = 0.0;
+        }
+
+        if (numOfGas == 1)
+        {
+            string gasName = gasNameList[0];
+            RDouble molarMass = gasMolarMassList[0];
+
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                amountOfSubstance[0][iCell] = rho[iCell] * vol[iCell] / molarMass;
+                totalAmountOfSubstance[iCell] += amountOfSubstance[0][iCell];
+            }
+        }
+        else
+        {
+            for (int iGas = 0; iGas < numOfGas; ++iGas)
+            {
+                string gasName = gasNameList[iGas];
+                RDouble molarMass = gasMolarMassList[iGas];
+                RDouble* massFracOfGas = reinterpret_cast<RDouble*>(grid->GetDataPtr(gasName));
+
+                for (int iCell = 0; iCell < nTotal; ++iCell)
+                {
+                    amountOfSubstance[iGas][iCell] = massFracOfGas[iCell] * rho[iCell] * vol[iCell] / molarMass;
+                    totalAmountOfSubstance[iCell] += amountOfSubstance[iGas][iCell];
+                }
+            }
+        }        
+
+        for (int iGas = 0; iGas < numOfGas; ++iGas)
+        {
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                amountFracOfSubstance[iGas][iCell] = amountOfSubstance[iGas][iCell] / totalAmountOfSubstance[iCell];
+            }
+        }
+
+        delete[] totalAmountOfSubstance;
+    }
+
+    void IncomGas::SetPropertyLib()
+    {
+        propertySp p_AIR;
+        propertySp p_H2;
+        propertySp p_H2_l;
+        propertySp p_NH3_l;
+        propertySp p_CH4;
+        propertySp p_C2H4;
+        propertySp p_C3H8;
+        propertySp p_C2H6;
+        propertySp p_NG;
+        propertySp p_LNG;
+        propertySp p_H2S;
+        propertySp p_Cl2;
+        propertySp p_NH3;        
+
+        p_AIR.rho = 1.225;
+        p_AIR.mu  = 1.7894e-5;
+        p_AIR.k   = 0.0242;
+        p_AIR.cp  = 1006.43;
+        p_AIR.molarMass  = 0.028;
+
+        p_H2.rho = 0.08189;
+        p_H2.mu  = 8.411e-06;
+        p_H2.k   = 0.1672;
+        p_H2.cp  = 14283;
+        p_H2.molarMass  = 0.00201594;
+
+        p_H2_l.rho = 70.85;
+        p_H2_l.mu  = 1.332e-5;
+        p_H2_l.k   = 0.10382;
+        p_H2_l.cp  = 9772.2;
+        p_H2_l.molarMass = 0.00201594;
+
+        p_NH3_l.rho = 610;
+        p_NH3_l.mu  = 0.000152;
+        p_NH3_l.k   = 0.493;
+        p_NH3_l.cp  = 4758;
+        p_NH3_l.molarMass = 0.01703061;
+
+        p_CH4.rho = 0.6679;
+        p_CH4.mu  = 1.087e-05;
+        p_CH4.k   = 0.0332;
+        p_CH4.cp  = 2222;
+        p_CH4.molarMass = 0.01604303;
+
+        p_C2H4.rho = 1.137;
+        p_C2H4.mu  = 1.03e-05;
+        p_C2H4.k   = 0.0214;
+        p_C2H4.cp  = 2233;
+        p_C2H4.molarMass = 0.02805418;
+
+        p_C3H8.rho = 1.91;
+        p_C3H8.mu  = 7.95e-06;
+        p_C3H8.k   = 0.0177;
+        p_C3H8.cp  = 1549;
+        p_C3H8.molarMass = 0.04409;
+
+
+        p_C2H6.rho = 1.263;
+        p_C2H6.mu  = 9.29e-6;
+        p_C2H6.k   = 0.0207;
+        p_C2H6.cp  = 1731;
+        p_C2H6.molarMass = 0.03;
+
+        p_NG.rho = 0.753;
+        p_NG.mu  = 1.07e-5;
+        p_NG.k   = 0.0318;
+        p_NG.cp  = 2188.9;
+        p_NG.molarMass = 0.018046;
+
+        p_LNG.rho = 434.5566;
+        p_LNG.mu  = 0.14331;
+        p_LNG.k = 0.019549;
+        p_LNG.cp  = 3425.3;
+        p_LNG.molarMass = 0.018046;
+
+        p_H2S.rho = 1.46;
+        p_H2S.mu  = 1.2e-05;
+        p_H2S.k   = 0.0134;
+        p_H2S.cp  = 1170;
+        p_H2S.molarMass = 0.03407994;
+
+        p_Cl2.rho = 2.95;
+        p_Cl2.mu  = 1.33e-05;
+        p_Cl2.k   = 0.00882;
+        p_Cl2.cp  = 650;
+        p_Cl2.molarMass = 0.070906;
+
+        p_NH3.rho = 0.6894;
+        p_NH3.mu  = 1.015e-05;
+        p_NH3.k   = 0.0247;
+        p_NH3.cp  = 2158;
+        p_NH3.molarMass = 0.01703061;
+
+        propertyLib = { {"AIR", p_AIR}, {"H2", p_H2}, {"H2_l", p_H2_l}, {"NH3_l", p_NH3_l}, {"CH4", p_CH4}, 
+            {"C2H4",p_C2H4}, {"C3H8", p_C3H8},  {"C2H6", p_C2H6}, {"NG", p_NG}, {"LNG", p_LNG}, 
+            {"H2S", p_H2S}, {"Cl2", p_Cl2}, {"NH3", p_NH3}};
+    }
+
+}
+}
\ No newline at end of file
diff --git a/CFD/IncomSolver/src/IncomKETurbEpsilonEqCalculator.cpp b/CFD/IncomSolver/src/IncomKETurbEpsilonEqCalculator.cpp
new file mode 100644
index 0000000..04d602e
--- /dev/null
+++ b/CFD/IncomSolver/src/IncomKETurbEpsilonEqCalculator.cpp
@@ -0,0 +1,651 @@
+#include <iostream>
+#include "IncomKETurbEpsilonEqCalculator.h"
+
+
+
+
+using namespace std;
+
+namespace PHSPACE
+{
+IncomKETurbEpsilonEqCalculator::IncomKETurbEpsilonEqCalculator():IncomScalarEqCalculator()
+{
+
+}
+
+IncomKETurbEpsilonEqCalculator::~IncomKETurbEpsilonEqCalculator()
+{
+
+}
+
+void IncomKETurbEpsilonEqCalculator::SetDiffusionCoeff(Grid* gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int* leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble* visl = reinterpret_cast<RDouble*>(grid->GetDataPtr("visl"));
+    RDouble* vist = reinterpret_cast<RDouble*>(grid->GetDataPtr("vist"));
+    RDouble prandtl = 1.3;
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    int solverIndex = GetSolverIndex();
+
+    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+    {
+        DiffusionCoeff[solverIndex][iCell] = visl[iCell] + vist[iCell] / prandtl;
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++iFace)
+    {
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+        DiffusionCoeff[solverIndex][re] = DiffusionCoeff[solverIndex][le];
+    }
+
+    CommunicateAnInterfaceVar(DiffusionCoeff[solverIndex]);
+}
+
+void IncomKETurbEpsilonEqCalculator::InitFlowAsRestart(Grid* gridIn)
+{
+    IncomScalarEqCalculator::InitFlowAsRestart(gridIn);
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    RDouble initPhi = GlobalDataBase::GetDoubleParaFromDB("init" + varNameIncom[solverIndex]);
+    RDouble* phi = reinterpret_cast<RDouble*>(grid->GetDataPtr(varNameIncom[solverIndex]));
+    PHSPACE::SetField(phi, initPhi, nTotal);
+}
+
+void IncomKETurbEpsilonEqCalculator::solveScalarEquation(Grid *gridIn, int iEquation)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    int solverIndex = GetSolverIndex();
+    CalcGrad(grid);
+    SetDiffusionCoeff(grid);
+
+    constructMatrixACoeff(grid, solverIndex);
+    constructBCoeff(grid, solverIndex);
+
+    WallModification(grid);
+
+    RDouble* diagMatrixCoeff = reinterpret_cast<RDouble*>(grid->GetDataPtr("diagMatrixCoeff"));
+    RDouble* upperMatrixCoeff  = reinterpret_cast<RDouble*>(grid->GetDataPtr("upperMatrixCoeff"));
+    RDouble* lowerMatrixCoeff = reinterpret_cast<RDouble*>(grid->GetDataPtr("lowerMatrixCoeff"));
+    RDouble* bCoeff = reinterpret_cast<RDouble*>(grid->GetDataPtr("bCoeff"));
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    string varName = varNameIncom[solverIndex];
+    RDouble* q = reinterpret_cast<RDouble*>(grid->GetDataPtr(varName));
+    calculateLinearEquation(grid, solverIndex, q, diagMatrixCoeff, bCoeff, upperMatrixCoeff , lowerMatrixCoeff);
+
+    UpdateBCValue(grid);
+    UpdateAfterIterloop(grid);
+    UpdateProperties(grid);
+}
+
+void IncomKETurbEpsilonEqCalculator::calWallBC(Grid*  gridIn, vector<int>* faceIndex, Data_Param* bcData, RDouble *diagMatrixCoeff, RDouble *bCoeff,  RDouble *q,
+    RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, RDouble *mu, RDouble matrixCoeff)
+{
+    
+}
+
+
+void IncomKETurbEpsilonEqCalculator::WallModification(Grid*  gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nTotalCells = grid->GetNTotalCell();
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFaces = grid->GetNBoundFace() - grid->GetNIFace();
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *faceNumberOfEachCell = grid->GetFaceNumberOfEachCell();
+    int **cell2face  = grid->GetCell2Face();
+
+    RDouble* Epsilon = reinterpret_cast<RDouble*>(grid->GetDataPtr("Epsilon"));
+    RDouble *upperMatrixCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("upperMatrixCoeff"));
+    RDouble *lowerMatrixCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("lowerMatrixCoeff"));
+    RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("diagMatrixCoeff"));
+    RDouble *bCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("bCoeff"));
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+    for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+        int bcType = bcRegion->GetBCType();
+        vector<int>* faceIndex = bcRegion->GetFaceIndex();
+
+        if (bcType == PHENGLEI::SOLID_SURFACE)
+        {
+            for (int i = 0; i < faceIndex->size(); ++ i)
+            {
+                int bface = (*faceIndex)[i];
+                int le = leftCellOfFace[bface];
+
+                bCoeff[le] = Epsilon[le];
+                diagMatrixCoeff[le] = 1.0;
+
+                for (int j = 0; j < grid->GetFaceNumberOfEachCell()[le]; ++j)
+                {
+                    int iFace = grid->GetCell2Face()[le][j];
+
+                    if (iFace < nBoundFaces)
+                    {
+                        continue;
+                    }
+                    else
+                    {
+                        if (grid->GetLeftCellOfFace()[iFace] == le)
+                        {
+                            upperMatrixCoeff[iFace] = 0.0;
+                        }
+                        else
+                        {
+                            lowerMatrixCoeff[iFace] = 0.0;
+                        }
+                    }
+                }
+            }
+        }
+    }
+    
+}
+
+void IncomKETurbEpsilonEqCalculator::CalcOtherMatrixACoeff(Grid * gridIn)
+{
+    UnstructGrid* grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble *k = reinterpret_cast<RDouble *>(grid->GetDataPtr("Kinetic"));
+    RDouble *rho = reinterpret_cast<RDouble *>(grid->GetDataPtr("rho"));
+    RDouble *Epsilon = reinterpret_cast<RDouble *>(grid->GetDataPtr("Epsilon"));
+    RDouble *vol = reinterpret_cast<RDouble *>(grid->GetCellVolume());
+    RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("diagMatrixCoeff"));
+    RDouble c1m_ = 1.44;
+    RDouble c2m_ = 1.92;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        diagMatrixCoeff[iCell] += c2m_ * rho[iCell] * vol[iCell] * Epsilon[iCell] / (k[iCell] + 1e-20);
+    }
+}
+
+void IncomKETurbEpsilonEqCalculator::CalcOtherbCoeff(Grid* gridIn, int iEquation)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble *k = reinterpret_cast<RDouble *>(grid->GetDataPtr("Kinetic"));
+    RDouble *gen = reinterpret_cast<RDouble *>(grid->GetDataPtr("gen"));
+    RDouble *rho = reinterpret_cast<RDouble *>(grid->GetDataPtr("rho"));
+    RDouble *Epsilon = reinterpret_cast<RDouble *>(grid->GetDataPtr("Epsilon"));
+    RDouble *vol = reinterpret_cast<RDouble *>(grid->GetCellVolume());
+    RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("diagMatrixCoeff"));
+    RDouble *bCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("bCoeff"));
+    RDouble c1m_ = 1.44;
+    RDouble c2m_ = 1.92;
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    CalcGenTerm(grid);
+
+    UnstructBCSet* unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+        int bcType = bcRegion->GetBCType();
+        if (2 == bcType)
+        {
+            vector<int>* faceIndex = bcRegion->GetFaceIndex();
+
+            for (int iFace = 0; iFace < faceIndex->size(); ++iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+
+                gen[le] = 0.0;
+                Epsilon[le] = 0.0;
+            }
+        }
+    }
+
+    UpdateWallGen(grid);
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        RDouble ke = vol[iCell] * Epsilon[iCell] / (k[iCell] + 1e-20);
+        bCoeff[iCell] += c1m_ * gen[iCell] * ke;
+        bCoeff[iCell] = max(bCoeff[iCell], 0.0);
+    }
+}
+
+void IncomKETurbEpsilonEqCalculator::GetResidual(Grid *gridIn, vector<RDouble>& res)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble resNow = 0.0;
+
+    grid->GetData("EpsilonResNow", &resNow, PHDOUBLE, 1);
+
+    res.push_back(resNow);
+}
+
+
+void IncomKETurbEpsilonEqCalculator::InitialUnsteadyVar(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    PHString1D phiNameList;
+    phiNameList.push_back("Epsilon");
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady == 0)
+    {
+        return;
+    }
+
+    string TranCalcMethod = GlobalDataBase::GetStrParaFromDB("TranCalcMethod");
+    if (TranCalcMethod == "IMPLICIT_EULER")
+    {
+        ImplicitEuler_ReInitTimeVar(grid, phiNameList);
+    }
+    else if (TranCalcMethod == "IMPLICIT_2ND_ORDER")
+    {
+        Implicit2ndOrder_ReInitTimeVar(grid, phiNameList);
+    }
+
+    PHString1D().swap(phiNameList);
+}
+
+void IncomKETurbEpsilonEqCalculator::UpdateUnsteadyVariable(Grid *grid)
+{
+    UnstructGrid *gridIn = UnstructGridCast(grid); 
+    std::vector<std::string> phiNameList;
+    phiNameList.push_back("Epsilon");
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady == 0)
+    {
+        return;
+    }
+
+    string TranCalcMethod = GlobalDataBase::GetStrParaFromDB("TranCalcMethod");
+    if (TranCalcMethod == "IMPLICIT_EULER")
+    {
+        ImplicitEuler_SaveOldTimeValue(gridIn, phiNameList);
+    }
+    else if (TranCalcMethod == "IMPLICIT_2ND_ORDER")
+    {
+        Implicit2ndOrder_SaveOldTimeValue(gridIn, phiNameList);
+    }
+
+}
+
+void IncomKETurbEpsilonEqCalculator::UpdateBCValue(Grid*  gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    int nTotalCell = grid->GetNTotalCell();
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    RDouble *phi = reinterpret_cast<RDouble *>(grid->GetDataPtr("Epsilon"));
+    RDouble *wDist = reinterpret_cast<RDouble *>(grid->GetWallDist());
+    RDouble *k = reinterpret_cast<RDouble *>(grid->GetDataPtr("Kinetic"));
+    RDouble *rho = reinterpret_cast<RDouble *>(grid->GetDataPtr("rho"));
+    RDouble *visl = reinterpret_cast<RDouble *>(grid->GetDataPtr("visl"));
+    RDouble *yplus = reinterpret_cast<RDouble*>(grid->GetDataPtr("yplus")) + nTotalCell;
+    RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+    int* rightCellOfFace = grid->GetRightCellOfFace();
+    for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+        int bcType = bcRegion->GetBCType();
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        Data_Param *bcData = bcRegion->GetBCParamDataBase();
+
+        if (bcType == PHENGLEI::SOLID_SURFACE)
+        {
+            for (int i = 0; i < faceIndex->size(); ++i)
+            {
+                int bface = (*faceIndex)[i];
+                int le = grid->GetLeftCellOfFace()[bface];
+                int re = rightCellOfFace[bface];
+                phi[re] = 2 * phi[le];
+            }
+        }
+        else if (bcType == PHENGLEI::SYMMETRY)
+        {
+            for (size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                phi[re] = phi[le];
+            }
+        }
+        else if (bcType == PHENGLEI::FARFIELD)
+        {
+            RDouble epsilonb = 0.0;
+
+            for (std::size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+            {
+                const int iFacelocal = (*faceIndex)[iFace];
+
+                if (bcData->IsExist("initEpsilon", PHDOUBLE, 1))
+                {
+                    bcData->GetData("initEpsilon", &epsilonb, PHDOUBLE, 1);
+                }
+                else
+                {
+                    std::cout << "Please assign a value of Epsilon on inlet" << std::endl;;
+                }
+            }
+            for (int iFace = 0; iFace < faceIndex->size(); ++iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+                if (FaceFlux[iFacelocal] < 0)
+                {
+
+                    phi[re] = epsilonb;
+                }
+                else
+                {
+
+                    phi[re] = phi[le];
+                }
+            }
+        }
+        else if (bcType == PHENGLEI::INFLOW)
+        {
+            RDouble epsilonb = 0.0;
+
+            RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+            for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                const int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                if (bcData->IsExist("initEpsilon", PHDOUBLE, 1))
+                {
+                    bcData->GetData("initEpsilon", &epsilonb, PHDOUBLE, 1);
+                }
+                else
+                {
+                    std::cout << "Please assign a value of Epsilon on inlet" << std::endl;;
+                }
+                if (FaceFlux[iFacelocal] < 0)
+                {
+                    phi[re] = epsilonb;
+                }
+                else
+                {
+                    phi[re] = phi[le];
+                }
+            }
+        }
+        else if (bcType == PHENGLEI::OUTFLOW)
+        {
+            RDouble epsilonb = 0.0;
+            RDouble *FaceFlux= reinterpret_cast<RDouble *>(grid->GetDataPtr("FaceFlux"));
+            RDouble *phi = reinterpret_cast<RDouble *>(grid->GetDataPtr("Epsilon"));
+            string varName = "Epsilon";
+            RDouble *dphidx = reinterpret_cast<RDouble *>(grid->GetDataPtr("d" + varName + "dx"));
+            RDouble* dphidy = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dy"));
+            RDouble* dphidz = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dz"));
+            
+            for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                if (FaceFlux[iFacelocal] < 0.0)
+                {
+                    if (bcData->IsExist("initEpsilon", PHDOUBLE, 1))
+                    {
+                        bcData->GetData("initEpsilon", &epsilonb, PHDOUBLE, 1);
+                        phi[re] = RDouble(epsilonb);
+                    }
+                    else
+                    {
+                        std::cout << " Please assign a value " << std::endl;
+                    }
+                }
+                else
+                {
+                    phi[re] = phi[le];
+                }
+            }
+        }
+        else if (bcType == PHENGLEI::PRESSURE_INLET)
+        {
+            RDouble epsilonb = 0.0;
+
+            for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                const int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                if (bcData->IsExist("initEpsilon", PHDOUBLE, 1))
+                {
+                    bcData->GetData("initEpsilon", &epsilonb, PHDOUBLE, 1);
+                }
+                else
+                {
+                    std::cout << "Please assign a value of Epsilon on inlet" << std::endl;;
+                }
+                if (FaceFlux[iFacelocal] < 0)
+                {
+                    phi[re] = epsilonb;
+                }
+                else
+                {
+                    phi[re] = phi[le];
+                }
+            }
+        }
+        else if (bcType == PHENGLEI::PRESSURE_OUTLET)
+        {
+            RDouble epsilonb = 0.0;
+            for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+
+                if (FaceFlux[iFacelocal] < 0.0)
+                {
+                    if (bcData->IsExist("initEpsilon", PHDOUBLE, 1))
+                    {
+                        bcData->GetData("initEpsilon", &epsilonb, PHDOUBLE, 1);
+                        phi[re] = RDouble(epsilonb);
+                    }
+                    else
+                    {
+                        std::cout << " Please assign a value " << std::endl;
+                    }
+                }
+                else
+                {
+                    phi[re] = phi[le];
+                }
+            }
+        }
+        else 
+        {
+            for (size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                phi[re] = phi[le];
+            }
+        }
+    }
+    CommunicateAnInterfaceVar(phi);
+}
+
+void IncomKETurbEpsilonEqCalculator::UpdateProperties(Grid* gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble* Epsilon = reinterpret_cast<RDouble*>(grid->GetDataPtr("Epsilon"));
+
+    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+    {
+        if (fabs(Epsilon[iCell]) < 1e-20)
+        {
+            Epsilon[iCell] = 1e-20;
+        }
+        else if (Epsilon[iCell] < 0.0)
+        {
+            Epsilon[iCell] = -Epsilon[iCell];
+        }
+    }
+}
+
+void IncomKETurbEpsilonEqCalculator::CalcGenTerm(Grid*  gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble* u = reinterpret_cast<RDouble*>(grid->GetDataPtr("U"));
+    RDouble* v = reinterpret_cast<RDouble*>(grid->GetDataPtr("V"));
+    RDouble* w = reinterpret_cast<RDouble*>(grid->GetDataPtr("W"));
+    RDouble* dudx = reinterpret_cast<RDouble*>(grid->GetDataPtr("dUdx"));
+    RDouble* dudy = reinterpret_cast<RDouble*>(grid->GetDataPtr("dUdy"));
+    RDouble* dudz = reinterpret_cast<RDouble*>(grid->GetDataPtr("dUdz"));
+    RDouble* dvdx = reinterpret_cast<RDouble*>(grid->GetDataPtr("dVdx"));
+    RDouble* dvdy = reinterpret_cast<RDouble*>(grid->GetDataPtr("dVdy"));
+    RDouble* dvdz = reinterpret_cast<RDouble*>(grid->GetDataPtr("dVdz"));
+    RDouble* dwdx = reinterpret_cast<RDouble*>(grid->GetDataPtr("dWdx"));
+    RDouble* dwdy = reinterpret_cast<RDouble*>(grid->GetDataPtr("dWdy"));
+    RDouble* dwdz = reinterpret_cast<RDouble*>(grid->GetDataPtr("dWdz"));
+    RDouble* vist = reinterpret_cast<RDouble*>(grid->GetDataPtr("vist"));
+    RDouble* visl = reinterpret_cast<RDouble*>(grid->GetDataPtr("visl"));
+    RDouble* gen = reinterpret_cast<RDouble*>(grid->GetDataPtr("gen"));
+    RDouble* yplus = reinterpret_cast<RDouble*>(grid->GetDataPtr("yplus"));
+    RDouble* Epsilon = reinterpret_cast<RDouble*>(grid->GetDataPtr("Epsilon"));
+    RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+    
+    GradientCalculation(grid, "U", "dUdx", "dUdy", "dUdz");
+    GradientCalculation(grid, "V", "dVdx", "dVdy", "dVdz");
+    GradientCalculation(grid, "W", "dWdx", "dWdy", "dWdz");
+
+    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+    {
+        RDouble _dudx = dudx[iCell];
+        RDouble _dudy = dudy[iCell];
+        RDouble _dudz = dudz[iCell];
+        RDouble _dvdx = dvdx[iCell];
+        RDouble _dvdy = dvdy[iCell];
+        RDouble _dvdz = dvdz[iCell];
+        RDouble _dwdx = dwdx[iCell];
+        RDouble _dwdy = dwdy[iCell];
+        RDouble _dwdz = dwdz[iCell];
+
+        gen[iCell] = (vist[iCell] + visl[iCell]) * (2.0 * (pow(_dudx, 2) + pow(_dvdy, 2) + pow(_dwdz, 2)) +
+            pow((_dvdx + _dudy), 2) + pow((_dwdx + _dudz), 2) + pow((_dwdy + _dvdz), 2));
+
+        gen[iCell] = min(gen[iCell], 10.0 * rho[iCell] * Epsilon[iCell]);
+    }
+
+}
+
+void IncomKETurbEpsilonEqCalculator::UpdateWallGen(Grid*  gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    UnstructBCSet* unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+        int bcType = bcRegion->GetBCType();
+        vector<int>* faceIndex = bcRegion->GetFaceIndex();
+        Data_Param* bcData = bcRegion->GetBCParamDataBase();
+
+        if (bcType == PHENGLEI::SOLID_SURFACE)
+
+        {
+            int nTotalCell = grid->GetNTotalCell();
+            int* leftCellOfFace = grid->GetLeftCellOfFace();
+            int* rightCellOfFace = grid->GetRightCellOfFace();
+            int nBoundFace = grid->GetNBoundFace();
+            RDouble* xfn = grid->GetFaceNormalX();
+            RDouble* yfn = grid->GetFaceNormalY();
+            RDouble* zfn = grid->GetFaceNormalZ();
+            RDouble* WD = reinterpret_cast<RDouble*>(grid->GetDataPtr("wd"));
+            RDouble* gen = reinterpret_cast<RDouble*>(grid->GetDataPtr("gen"));
+            RDouble* k = reinterpret_cast<RDouble*>(grid->GetDataPtr("Kinetic"));
+            RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+            RDouble* visl = reinterpret_cast<RDouble*>(grid->GetDataPtr("visl"));
+            RDouble* vist = reinterpret_cast<RDouble*>(grid->GetDataPtr("vist"));
+            RDouble* vistb = vist + nTotalCell;
+            RDouble* u = reinterpret_cast<RDouble*>(grid->GetDataPtr("U"));
+            RDouble* v = reinterpret_cast<RDouble*>(grid->GetDataPtr("V"));
+            RDouble* w = reinterpret_cast<RDouble*>(grid->GetDataPtr("W"));
+            RDouble* mu = reinterpret_cast<RDouble*>(grid->GetDataPtr("mu"));
+            RDouble* yplus = reinterpret_cast<RDouble*>(grid->GetDataPtr("yplus")) + nTotalCell;
+            RDouble* Epsilon = reinterpret_cast<RDouble*>(grid->GetDataPtr("Epsilon"));
+            RDouble* nu_eff_w = reinterpret_cast<RDouble*>(grid->GetDataPtr("nu_eff")) + nTotalCell;
+            RDouble* wallFlag = reinterpret_cast<RDouble*>(grid->GetDataPtr("wallFlag"));
+
+            RDouble cmu75_ = 0.1643;
+            RDouble cappa_ = 0.4187;
+            RDouble cmu = 0.09;
+            RDouble cmu25_ = 0.5477;
+            RDouble yptr_ = 11.225;
+            RDouble yvstar_ = 20.0;
+            RDouble cl_ = 2.55;
+            RDouble elog_ = 9.793;
+
+            for (int iFace = 0; iFace < faceIndex->size(); ++iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+
+                RDouble wd = WD[re];
+                RDouble cmute = cmu25_ * sqrt(k[le]);
+                yplus[iFacelocal] = rho[le] * wd * cmute / (visl[le]);
+
+                RDouble du = u[re] - u[le];
+                RDouble dv = v[re] - v[le];
+                RDouble dw = w[re] - w[le];
+                RDouble ax = grid->GetFaceNormalX()[iFacelocal];
+                RDouble ay = grid->GetFaceNormalY()[iFacelocal];
+                RDouble az = grid->GetFaceNormalZ()[iFacelocal];
+                RDouble dun = (du * ax + dv * ay + dw * az);
+                RDouble Ux = du - dun * ax;
+                RDouble Uy = dv - dun * ay;
+                RDouble Uz = dw - dun * az;
+                RDouble Uwall = std::sqrt(Ux * Ux + Uy * Uy + Uz * Uz);//���������ٶ�
+
+
+                yplus[iFacelocal] = max(yplus[iFacelocal], yptr_);
+                double tau_w = Uwall * cmute * rho[le] / (std::log(elog_ * yplus[iFacelocal]) / cappa_);
+                double d = yplus[iFacelocal] * visl[le] / (rho[le] * cmute);
+                nu_eff_w[iFacelocal] = tau_w * wd / Uwall;
+                gen[le] += (tau_w * tau_w / (cappa_ * rho[le] * cmute * d)) / wallFlag[le];
+                Epsilon[le] += (cmu75_ * std::pow(k[le], 1.5) / (cappa_ * d)) / wallFlag[le];
+
+            }
+        }
+    }
+}
+
+}
\ No newline at end of file
diff --git a/CFD/IncomSolver/src/IncomKETurbKEqCalculator.cpp b/CFD/IncomSolver/src/IncomKETurbKEqCalculator.cpp
new file mode 100644
index 0000000..3a26b0f
--- /dev/null
+++ b/CFD/IncomSolver/src/IncomKETurbKEqCalculator.cpp
@@ -0,0 +1,555 @@
+#include <iostream>
+#include <memory>
+#include <cmath>
+#include "IncomKETurbKEqCalculator.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+IncomKETurbKEqCalculator::IncomKETurbKEqCalculator():IncomScalarEqCalculator()
+{
+}
+
+IncomKETurbKEqCalculator::~IncomKETurbKEqCalculator()
+{
+
+}
+
+void IncomKETurbKEqCalculator::InitFlowAsRestart(Grid* gridIn)
+{
+    IncomScalarEqCalculator::InitFlowAsRestart(gridIn);
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    RDouble initPhi = GlobalDataBase::GetDoubleParaFromDB("init" + varNameIncom[solverIndex]);
+    RDouble* phi = reinterpret_cast<RDouble*>(grid->GetDataPtr(varNameIncom[solverIndex]));
+    PHSPACE::SetField(phi, initPhi, nTotal);
+
+    RDouble *visl = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+    PHSPACE::SetField(visl, 0.0, nTotal);
+
+    RDouble *vist = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+    PHSPACE::SetField(vist, 0.0, nTotal);
+
+    RDouble *nu_eff = reinterpret_cast<RDouble *> (grid->GetDataPtr("nu_eff"));
+    PHSPACE::SetField(nu_eff, 0.0, nTotal);
+
+    RDouble *yplus = reinterpret_cast<RDouble *>(grid->GetDataPtr("yplus"));
+    PHSPACE::SetField(yplus, 0.0, nTotal);
+
+    RDouble *gen = reinterpret_cast<RDouble *> (grid->GetDataPtr("gen"));
+    PHSPACE::SetField(gen, 0.0, nTotalCell);
+
+    RDouble *wallFlag = reinterpret_cast<RDouble *> (grid->GetDataPtr("wallFlag"));
+    PHSPACE::SetField(wallFlag, 0.0, nTotalCell);
+}
+
+void IncomKETurbKEqCalculator::AllocateGlobalVar(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    IncomScalarEqCalculator::AllocateGlobalVar(grid);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble *visl = NewPointer<RDouble>(nTotal);
+    grid->UpdateDataPtr("visl", visl);
+    
+    RDouble *vist = NewPointer<RDouble>(nTotal);
+    grid->UpdateDataPtr("vist", vist);
+
+    RDouble* nu_eff = NewPointer<RDouble>(nTotal);
+    grid->UpdateDataPtr("nu_eff", nu_eff);
+
+    RDouble* yplus = NewPointer<RDouble>(nTotal);
+    grid->UpdateDataPtr("yplus", yplus);
+
+    RDouble* gen = NewPointer<RDouble>(nTotalCell);
+    grid->UpdateDataPtr("gen", gen);
+
+    RDouble* wallFlag = NewPointer<RDouble>(nTotalCell);
+    grid->UpdateDataPtr("wallFlag", wallFlag);
+}
+
+void IncomKETurbKEqCalculator::IncompressibleInitial(Grid * gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble* k = reinterpret_cast<RDouble *>(grid->GetDataPtr("Kinetic"));
+    RDouble* Epsilon = reinterpret_cast<RDouble *>(grid->GetDataPtr("Epsilon"));
+    RDouble *visl = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+    RDouble *vist = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+    RDouble *wallFlag = reinterpret_cast<RDouble *> (grid->GetDataPtr("wallFlag"));
+    RDouble *nu_eff = reinterpret_cast<RDouble *> (grid->GetDataPtr("nu_eff"));
+    RDouble* nu_eff_w = nu_eff + nTotalCell;
+    RDouble cmu = 0.09; 
+    RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+    RDouble* mu   = reinterpret_cast<RDouble*>(grid->GetDataPtr("mu"));
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        vist[iCell] = rho[iCell] * cmu * k[iCell] * k[iCell] / Epsilon[iCell];
+        visl[iCell] = mu[iCell];
+        
+        if (vist[iCell] > 1e5 * visl[iCell])
+        {
+            vist[iCell] = visl[iCell] * 1e5;
+        }
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+        vist[re] = vist[le];
+        mu[re] = mu[le];
+        nu_eff_w[iFace] = mu[le];
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; iCell++)
+    {
+        wallFlag[iCell] = 0.0;
+    }
+
+    UnstructBCSet* unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+        int bcType = bcRegion->GetBCType();
+        if (2 == bcType)
+        {
+            vector<int>* faceIndex = bcRegion->GetFaceIndex();
+
+            for (int iFace = 0; iFace < faceIndex->size(); ++iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int leftCell = leftCellOfFace[iFacelocal];
+                
+                wallFlag[leftCell] += 1.0;
+            }
+        }
+    }
+  
+    UpdateBCValue(grid);
+
+    InitialUnsteadyVar(grid);
+}
+
+
+void IncomKETurbKEqCalculator::SetDiffusionCoeff(Grid* gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int* leftCellOfFace = grid->GetLeftCellOfFace();
+    int* rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *visl = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+    RDouble *vist = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+    RDouble prandtl = 1.0;
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    int solverIndex = GetSolverIndex();
+    
+    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+    {
+        DiffusionCoeff[solverIndex][iCell] = visl[iCell] + vist[iCell] / prandtl;
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++iFace)
+    {
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+        DiffusionCoeff[solverIndex][re] = DiffusionCoeff[solverIndex][le];
+    }
+    CommunicateAnInterfaceVar(DiffusionCoeff[solverIndex]);
+}
+
+void IncomKETurbKEqCalculator::UpdateProperties(Grid* gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int* leftCellOfFace = grid->GetLeftCellOfFace();
+    int* rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble* k = reinterpret_cast<RDouble*>(grid->GetDataPtr("Kinetic"));
+    RDouble* Epsilon = reinterpret_cast<RDouble*>(grid->GetDataPtr("Epsilon"));
+    RDouble *visl = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+    RDouble *vist = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+    RDouble cmu = 0.09; 
+    RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+    RDouble* mu   = reinterpret_cast<RDouble*>(grid->GetDataPtr("mu"));
+    for (int iCell = 0; iCell < nTotalCell; iCell++)
+    {
+        if (fabs(k[iCell]) < 1e-14)
+        {
+            k[iCell] = 1e-14;
+        }
+        else if (k[iCell] < 0.0)
+        {
+            k[iCell] = -k[iCell];
+        }
+
+        vist[iCell] = rho[iCell] * cmu * k[iCell] * k[iCell] / Epsilon[iCell];
+
+        mu[iCell] = visl[iCell] + vist[iCell];
+
+        if (mu[iCell] > 1e5 * visl[iCell])
+        {
+            mu[iCell] = visl[iCell] * 1e5;
+            vist[iCell] = visl[iCell] * 1e5;
+        }
+    }
+
+    UnstructBCSet* unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int>* faceIndex = bcRegion->GetFaceIndex();
+        Data_Param* bcData = bcRegion->GetBCParamDataBase();
+
+        if (bcType == PHENGLEI::SOLID_SURFACE)
+        {
+            int nTotalCell = grid->GetNTotalCell();
+            int *leftCellOfFace = grid->GetLeftCellOfFace();
+            int* rightCellOfFace = grid->GetRightCellOfFace();
+
+            RDouble *mu = reinterpret_cast<RDouble *>(grid->GetDataPtr("mu"));
+            RDouble* nu_eff_w = reinterpret_cast<RDouble*>(grid->GetDataPtr("nu_eff")) + nTotalCell;
+
+            for (int iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                mu[re] = nu_eff_w[iFacelocal];
+            }
+        }
+    }
+
+    CommunicateAnInterfaceVar(mu);
+    CommunicateAnInterfaceVar(visl);
+    CommunicateAnInterfaceVar(vist);
+}
+
+
+void IncomKETurbKEqCalculator::CalcOtherMatrixACoeff(Grid * gridIn)
+{
+    UnstructGrid* grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble *k = reinterpret_cast<RDouble *>(grid->GetDataPtr("Kinetic"));
+    RDouble *gen = reinterpret_cast<RDouble *>(grid->GetDataPtr("gen"));
+    RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("diagMatrixCoeff"));
+    RDouble *bCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("bCoeff"));
+    RDouble *rho = reinterpret_cast<RDouble *>(grid->GetDataPtr("rho"));
+    RDouble *Epsilon = reinterpret_cast<RDouble *>(grid->GetDataPtr("Epsilon"));
+    RDouble *vol = reinterpret_cast<RDouble *>(grid->GetCellVolume());
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        diagMatrixCoeff[iCell] += rho[iCell] * Epsilon[iCell] / (k[iCell] + 1e-20) * vol[iCell];
+    }
+}
+
+void IncomKETurbKEqCalculator::CalcOtherbCoeff(Grid* gridIn, int iEquation)
+{
+    UnstructGrid* grid = UnstructGridCast(gridIn);
+
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble *k = reinterpret_cast<RDouble *>(grid->GetDataPtr("Kinetic"));
+    RDouble *gen = reinterpret_cast<RDouble *>(grid->GetDataPtr("gen"));
+    RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("diagMatrixCoeff"));
+    RDouble *bCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("bCoeff"));
+    RDouble *rho = reinterpret_cast<RDouble *>(grid->GetDataPtr("rho"));
+    RDouble *Epsilon = reinterpret_cast<RDouble *>(grid->GetDataPtr("Epsilon"));
+    RDouble *vol = reinterpret_cast<RDouble *>(grid->GetCellVolume());
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        bCoeff[iCell] += gen[iCell] * vol[iCell];
+    }
+}
+
+
+void IncomKETurbKEqCalculator::GetResidual(Grid *gridIn, vector<RDouble>& res)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    RDouble resNow = 0.0;
+
+    grid->GetData("KineticResNow", &resNow, PHDOUBLE, 1);
+
+    res.push_back(resNow);
+}
+
+void IncomKETurbKEqCalculator::InitialUnsteadyVar(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    PHString1D phiNameList;
+    phiNameList.push_back("Kinetic");
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady == 0)
+    {
+        return;
+    }
+
+    string TranCalcMethod = GlobalDataBase::GetStrParaFromDB("TranCalcMethod");
+    if (TranCalcMethod == "IMPLICIT_EULER")
+    {
+        ImplicitEuler_ReInitTimeVar(grid, phiNameList);
+    }
+    else if (TranCalcMethod == "IMPLICIT_2ND_ORDER")
+    {
+        Implicit2ndOrder_ReInitTimeVar(grid, phiNameList);
+    }
+
+    PHString1D().swap(phiNameList);
+}
+
+void IncomKETurbKEqCalculator::UpdateUnsteadyVariable(Grid *grid)
+{
+    UnstructGrid *gridIn = UnstructGridCast(grid); 
+    std::vector<std::string> phiNameList;
+    phiNameList.push_back("Kinetic");
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady == 0)
+    {
+        return;
+    }
+
+    string TranCalcMethod = GlobalDataBase::GetStrParaFromDB("TranCalcMethod");
+    if (TranCalcMethod == "IMPLICIT_EULER")
+    {
+        ImplicitEuler_SaveOldTimeValue(gridIn, phiNameList);
+    }
+    else if (TranCalcMethod == "IMPLICIT_2ND_ORDER")
+    {
+        Implicit2ndOrder_SaveOldTimeValue(gridIn, phiNameList);
+    }
+
+}
+
+void IncomKETurbKEqCalculator::UpdateBCValue(Grid*  gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    int nTotalCell = grid->GetNTotalCell();
+    string varName = "Kinetic";
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    RDouble *phi = reinterpret_cast<RDouble *>(grid->GetDataPtr("Kinetic"));
+    RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+    
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+    int* rightCellOfFace = grid->GetRightCellOfFace();
+    for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+        int bcType = bcRegion->GetBCType();
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        Data_Param *bcData = bcRegion->GetBCParamDataBase();
+
+        if (bcType == PHENGLEI::SOLID_SURFACE)
+        {
+            for (size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                phi[re] = phi[le];
+            }
+        }
+        else if (bcType == PHENGLEI::FARFIELD)
+        {
+            RDouble kb = 0.0;
+            for (std::size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+
+                if (bcData)
+                {
+                    if (bcData->IsExist("initKinetic", PHDOUBLE, 1))
+                    {
+                        bcData->GetData("initKinetic", &kb, PHDOUBLE, 1);
+                    }
+                }
+                else
+                {
+                    std::cout << " No initial value has assigned to the boundary " << std::endl;
+                }
+            }
+            for (int iFace = 0; iFace < faceIndex->size(); ++iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                if (FaceFlux[iFacelocal] < 0)
+                {
+
+                    phi[re] = kb;
+                }
+                else
+                {
+
+                    phi[re] = phi[le];
+                }
+            }
+        }
+        else if (bcType == PHENGLEI::INFLOW)
+        {
+            RDouble kb = 0.0;
+            for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                if (bcData)
+                {
+                    if (bcData->IsExist("initKinetic", PHDOUBLE, 1))
+                    {
+                        bcData->GetData("initKinetic", &kb, PHDOUBLE, 1);
+                    }
+                }
+                else
+                {
+                    std::cout << " No initial value has assigned to the boundary " << std::endl;
+                }
+                if (FaceFlux[iFacelocal] < 0)
+                {
+                    phi[re] = kb;
+                }
+                else
+                {
+                    phi[re] = phi[le];
+                }
+            }
+        }
+        else if (bcType == PHENGLEI::OUTFLOW)
+        {
+            int nTotalCell = grid->GetNTotalCell();
+            int *leftCellOfFace = grid->GetLeftCellOfFace();
+
+            RDouble *xfc = grid->GetFaceCenterX();
+            RDouble *yfc = grid->GetFaceCenterY();
+            RDouble *zfc = grid->GetFaceCenterZ();
+            RDouble *xcc = grid->GetCellCenterX();
+            RDouble *ycc = grid->GetCellCenterY();
+            RDouble *zcc = grid->GetCellCenterZ();
+
+            RDouble kb = 0.0;
+            for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                if (FaceFlux[iFacelocal] < 0.0)
+                {
+                    if (bcData)
+                    {
+                        if (bcData->IsExist("init" + varName, PHDOUBLE, 1))
+                        {
+                            bcData->GetData("init" + varName, &kb, PHDOUBLE, 1);
+                            phi[re] = RDouble(kb);
+                        }
+                        else
+                        {
+                            std::cout << " Please assign a value " << std::endl;
+                        }
+                    }
+                }
+                else
+                {
+                    phi[re] = phi[le];
+                }
+            }
+        }
+        else if (bcType == PHENGLEI::PRESSURE_INLET)
+        {
+            RDouble kb = 0.0;
+            for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                if (bcData)
+                {
+                    if (bcData->IsExist("initKinetic", PHDOUBLE, 1))
+                    {
+                        bcData->GetData("initKinetic", &kb, PHDOUBLE, 1);
+                    }
+                }
+                else
+                {
+                    std::cout << " No initial value has assigned to the boundary " << std::endl;
+                }
+                if (FaceFlux[iFacelocal] < 0)
+                {
+                    phi[re] = kb;
+                }
+                else
+                {
+                    phi[re] = phi[le];
+                }
+            }
+        }
+        else if (bcType == PHENGLEI::PRESSURE_OUTLET)
+        {
+            RDouble kb = 0.0;
+            for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+
+                if (FaceFlux[iFacelocal] < 0.0)
+                {
+                    if (bcData)
+                    {
+                        if (bcData->IsExist("init" + varName, PHDOUBLE, 1))
+                        {
+                            bcData->GetData("init" + varName, &kb, PHDOUBLE, 1);
+                            phi[re] = RDouble(kb);
+                        }
+                        else
+                        {
+                            std::cout << " Please assign a value " << std::endl;
+                        }
+                    }
+                }
+                else
+                {
+                    phi[re] = phi[le];
+                }
+            }
+        }
+        else 
+        {
+            for (size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                phi[re] = phi[le];
+            }
+        }
+    }
+    CommunicateAnInterfaceVar(phi);
+}
+
+}
\ No newline at end of file
diff --git a/CFD/IncomSolver/src/IncomSATurbKEqCalculator.cpp b/CFD/IncomSolver/src/IncomSATurbKEqCalculator.cpp
new file mode 100644
index 0000000..5e43d5a
--- /dev/null
+++ b/CFD/IncomSolver/src/IncomSATurbKEqCalculator.cpp
@@ -0,0 +1,796 @@
+#include <iostream>
+#include <memory>
+#include <cmath>
+#include "IncomSATurbKEqCalculator.h"
+
+
+
+using namespace std;
+
+namespace PHSPACE
+{
+IncomSATurbKEqCalculator::IncomSATurbKEqCalculator():IncomScalarEqCalculator()
+{
+    
+}
+
+IncomSATurbKEqCalculator::~IncomSATurbKEqCalculator()
+{
+
+}
+
+void IncomSATurbKEqCalculator::InitFlowAsRestart(Grid* gridIn)
+{
+    IncomScalarEqCalculator::InitFlowAsRestart(gridIn);
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    RDouble initPhi = GlobalDataBase::GetDoubleParaFromDB("init" + varNameIncom[solverIndex]);
+    RDouble* phi = reinterpret_cast<RDouble*>(grid->GetDataPtr(varNameIncom[solverIndex]));
+    PHSPACE::SetField(phi, initPhi, nTotal);
+
+    RDouble* visl = reinterpret_cast<RDouble*>(grid->GetDataPtr("visl"));
+    PHSPACE::SetField(visl, 0.0, nTotal);
+
+    RDouble* vist = reinterpret_cast<RDouble*>(grid->GetDataPtr("vist"));
+    PHSPACE::SetField(vist, 0.0, nTotal);
+
+    RDouble* gen = reinterpret_cast<RDouble*>(grid->GetDataPtr("gen"));
+    PHSPACE::SetField(gen, 0.0, nTotal);
+
+    RDouble* des = reinterpret_cast<RDouble*>(grid->GetDataPtr("des"));
+    PHSPACE::SetField(des, 0.0, nTotal);
+
+    RDouble* gra = reinterpret_cast<RDouble*>(grid->GetDataPtr("gra"));
+    PHSPACE::SetField(gra, 0.0, nTotal);
+
+    RDouble* fv1 = reinterpret_cast<RDouble*>(grid->GetDataPtr("fv1"));
+    PHSPACE::SetField(fv1, 0.0, nTotal);
+
+    RDouble* dKineticdx = reinterpret_cast<RDouble*>(grid->GetDataPtr("dKineticdx"));
+    RDouble* dKineticdy = reinterpret_cast<RDouble*>(grid->GetDataPtr("dKineticdy"));
+    RDouble* dKineticdz = reinterpret_cast<RDouble*>(grid->GetDataPtr("dKineticdz"));
+    PHSPACE::SetField(dKineticdx, 0.0, nTotal);
+    PHSPACE::SetField(dKineticdy, 0.0, nTotal);
+    PHSPACE::SetField(dKineticdz, 0.0, nTotal);
+
+    RDouble* WD = reinterpret_cast<RDouble*>(grid->GetDataPtr("WD"));
+    PHSPACE::SetField(WD, 0.0, nTotal);
+}
+
+void IncomSATurbKEqCalculator::AllocateGlobalVar(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    IncomScalarEqCalculator::AllocateGlobalVar(grid);
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble *visl = NewPointer<RDouble>(nTotal);
+    grid->UpdateDataPtr("visl", visl);
+
+    RDouble *vist = NewPointer<RDouble>(nTotal);
+    grid->UpdateDataPtr("vist", vist);
+
+    RDouble *gen = NewPointer<RDouble>(nTotal);
+    grid->UpdateDataPtr("gen", gen);
+
+    RDouble *des = NewPointer<RDouble>(nTotal);
+    grid->UpdateDataPtr("des", des);
+
+    RDouble *gra = NewPointer<RDouble>(nTotal);
+    grid->UpdateDataPtr("gra", gra);
+
+    RDouble *fv1 = NewPointer<RDouble>(nTotal);
+    grid->UpdateDataPtr("fv1", fv1);
+
+    RDouble *WD = NewPointer<RDouble>(nTotal);
+    grid->UpdateDataPtr("WD", WD);
+}
+
+//! The initialization of each solver depends on the associated variables of other solvers.
+void IncomSATurbKEqCalculator::IncompressibleInitial(Grid * gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *k = reinterpret_cast<RDouble*>(grid->GetDataPtr("Kinetic"));
+    RDouble* visl = reinterpret_cast<RDouble*>(grid->GetDataPtr("visl"));
+    RDouble* vist = reinterpret_cast<RDouble*>(grid->GetDataPtr("vist"));
+    RDouble* fv1 = reinterpret_cast<RDouble*>(grid->GetDataPtr("fv1"));
+    RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+
+    RDouble delatv = 0.6666;
+    RDouble Cb2    = 0.622;
+    RDouble Cv1    = 7.1;
+    RDouble Cb1    = 0.1355;
+    RDouble kappa  = 0.4187;
+    RDouble Cw2    = 0.3;
+    RDouble Cw3    = 2;
+    RDouble* mu   = reinterpret_cast<RDouble*>(grid->GetDataPtr("mu"));
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        RDouble chi = rho[iCell] * k[iCell] / mu[iCell];
+        fv1[iCell] = (pow(chi, 3)) / ((pow(chi, 3)) + (pow(Cv1, 3)));
+        vist[iCell] = rho[iCell] * k[iCell] * fv1[iCell];
+        visl[iCell] = mu[iCell];
+        mu[iCell] = visl[iCell] + vist[iCell];
+        
+        if (vist[iCell] > 1e5 * visl[iCell])
+        {
+            vist[iCell] = visl[iCell] * 1e5;
+        }
+    }
+    UpdateBCValue(grid);
+}
+
+void IncomSATurbKEqCalculator::CalcOtherMatrixACoeff(Grid * gridIn)
+{
+    UnstructGrid* grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble *k = reinterpret_cast<RDouble *>(grid->GetDataPtr("Kinetic"));
+    RDouble *gen = reinterpret_cast<RDouble *>(grid->GetDataPtr("gen"));
+    RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("diagMatrixCoeff"));
+    RDouble *bCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("bCoeff"));
+    RDouble *gra = reinterpret_cast<RDouble *>(grid->GetDataPtr("gra"));
+    RDouble *des = reinterpret_cast<RDouble *>(grid->GetDataPtr("des"));
+    RDouble *vol = reinterpret_cast<RDouble *>(grid->GetCellVolume());
+    RDouble *dudx = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdx"));
+    RDouble *dudy = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdy"));
+    RDouble *dudz = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdz"));
+    RDouble *dvdx = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdx"));
+    RDouble *dvdy = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdy"));
+    RDouble *dvdz = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdz"));
+    RDouble *dwdx = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdx"));
+    RDouble *dwdy = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdy"));
+    RDouble *dwdz = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdz"));
+    RDouble* visl = reinterpret_cast<RDouble*>(grid->GetDataPtr("visl"));
+    RDouble* vist = reinterpret_cast<RDouble*>(grid->GetDataPtr("vist"));
+    RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+    RDouble *fv1 = reinterpret_cast<RDouble *>(grid->GetDataPtr("fv1"));
+    RDouble* wDist = reinterpret_cast<RDouble *>(grid->GetWallDist());
+    RDouble *WD = reinterpret_cast<RDouble *>(grid->GetDataPtr("WD"));
+
+    RDouble delatv = 0.6666;
+    RDouble Cb2    = 0.622;
+    RDouble Cv1    = 7.1;
+    RDouble Cb1    = 0.1355;
+    RDouble kappa  = 0.4187;
+    RDouble Cw2    = 0.3;
+    RDouble Cw3    = 2;
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+
+        RDouble wd = wDist[iCell];
+        WD[iCell] = wd;
+
+        RDouble _dudy = dudy[iCell];
+        RDouble _dudz = dudz[iCell];
+        RDouble _dvdx = dvdx[iCell];
+        RDouble _dvdz = dvdz[iCell];
+        RDouble _dwdx = dwdx[iCell];
+        RDouble _dwdy = dwdy[iCell];
+
+        RDouble chi = rho[iCell] * k[iCell] / visl[iCell];
+        fv1[iCell] = (pow(chi, 3)) / ((pow(chi, 3)) + (pow(Cv1, 3)));
+
+        RDouble fv2 = 1 - chi / (1 + chi * fv1[iCell]);
+
+        RDouble S = sqrt(pow((_dwdy - _dvdz), 2) + pow((_dudz - _dwdx), 2) + pow((_dvdx - _dudy), 2));
+        RDouble S_0 = S + k[iCell] * fv2 / (kappa * kappa * wd * wd);
+        RDouble S_ = MAX(S_0, 0.3 * S);
+
+        RDouble Cw1 = Cb1 / (kappa * kappa) + (1 + Cb2) / delatv;
+        RDouble r = MIN((k[iCell]) / (S_ * kappa * kappa * wd * wd), 10.0);
+
+        RDouble g = r + Cw2 * (pow(r, 6) - r);
+        RDouble fw = g * pow(((1+Cw3)/(pow(g,6)+pow(Cw3,6))),1.0/6.0);
+
+        des[iCell] = Cw1 * rho[iCell] * fw * (k[iCell] / wd) * (k[iCell] / wd);
+
+        diagMatrixCoeff[iCell] +=  des[iCell] / (k[iCell] + 1e-20) * vol[iCell];
+    }
+}
+
+void IncomSATurbKEqCalculator::CalcOtherbCoeff(Grid* gridIn, int iEquation)
+{
+    UnstructGrid* grid = UnstructGridCast(gridIn);
+
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble *k = reinterpret_cast<RDouble *>(grid->GetDataPtr("Kinetic"));
+    RDouble *gen = reinterpret_cast<RDouble *>(grid->GetDataPtr("gen"));
+    RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("diagMatrixCoeff"));
+    RDouble *bCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("bCoeff"));
+    RDouble *gra = reinterpret_cast<RDouble *>(grid->GetDataPtr("gra"));
+    RDouble *des = reinterpret_cast<RDouble *>(grid->GetDataPtr("des"));
+    RDouble *vol = reinterpret_cast<RDouble *>(grid->GetCellVolume());
+
+    RDouble *dKineticdx = reinterpret_cast<RDouble *>(grid->GetDataPtr("dKineticdx"));
+    RDouble *dKineticdy = reinterpret_cast<RDouble *>(grid->GetDataPtr("dKineticdy"));
+    RDouble *dKineticdz = reinterpret_cast<RDouble *>(grid->GetDataPtr("dKineticdz"));
+
+
+    RDouble *WD = reinterpret_cast<RDouble *>(grid->GetDataPtr("WD"));
+    RDouble *dudx = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdx"));
+    RDouble *dudy = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdy"));
+    RDouble *dudz = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdz"));
+    RDouble *dvdx = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdx"));
+    RDouble *dvdy = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdy"));
+    RDouble *dvdz = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdz"));
+    RDouble *dwdx = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdx"));
+    RDouble *dwdy = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdy"));
+    RDouble *dwdz = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdz"));
+    RDouble* visl = reinterpret_cast<RDouble*>(grid->GetDataPtr("visl"));
+    RDouble* vist = reinterpret_cast<RDouble*>(grid->GetDataPtr("vist"));
+    RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+    RDouble *fv1 = reinterpret_cast<RDouble *>(grid->GetDataPtr("fv1"));
+    RDouble* wDist = reinterpret_cast<RDouble *>(grid->GetWallDist());
+
+    RDouble delatv = 0.6666;
+    RDouble Cb2    = 0.622;
+    RDouble Cv1    = 7.1;
+    RDouble Cb1    = 0.1355;
+    RDouble kappa  = 0.4187;
+    RDouble Cw2    = 0.3;
+    RDouble Cw3    = 2;
+
+    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+    {
+
+        RDouble wd = wDist[iCell];
+        WD[iCell] = wd;
+
+        RDouble _dudy = dudy[iCell];
+        RDouble _dudz = dudz[iCell];
+        RDouble _dvdx = dvdx[iCell];
+        RDouble _dvdz = dvdz[iCell];
+        RDouble _dwdx = dwdx[iCell];
+        RDouble _dwdy = dwdy[iCell];
+
+        RDouble chi = rho[iCell] * k[iCell] / visl[iCell];
+        fv1[iCell] = (pow(chi, 3)) / ((pow(chi, 3)) + (pow(Cv1, 3)));
+
+        RDouble fv2 = 1 - chi / (1 + chi * fv1[iCell]);
+        RDouble S = sqrt(pow((_dwdy - _dvdz), 2) + pow((_dudz - _dwdx), 2) + pow((_dvdx - _dudy), 2));
+        RDouble S_0 = S + k[iCell] * fv2 / (kappa * kappa * wd * wd);
+        RDouble S_ = MAX(S_0, 0.3 * S);
+
+        gen[iCell] = Cb1 * rho[iCell] * S_ * k[iCell];
+        gen[iCell] = MAX(gen[iCell], 0.0);
+
+        RDouble _dkdx = dKineticdx[iCell];
+        RDouble _dkdy = dKineticdy[iCell];
+        RDouble _dkdz = dKineticdz[iCell];
+        gra[iCell] = Cb2 * rho[iCell] * (_dkdx * _dkdx + _dkdy * _dkdy + _dkdz * _dkdz) / delatv;
+
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        bCoeff[iCell] += (gen[iCell] + gra[iCell] ) * vol[iCell];
+    }
+}
+
+void IncomSATurbKEqCalculator::calVelocityInletBC(Grid*  gridIn, vector<int>* faceIndex, Data_Param* bcData, RDouble *diagMatrixCoeff, RDouble *bCoeff,  RDouble *q,
+    RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, RDouble *mu, RDouble matrixCoeff)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nTotalCell = grid->GetNTotalCell();
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+
+    RDouble *area = grid->GetFaceArea();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+    int* rightCellOfFace = grid->GetRightCellOfFace();
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    string varName = varNameIncom[solverIndex];
+
+    RDouble *phi = reinterpret_cast<RDouble *>(grid->GetDataPtr(varName));
+    
+    RDouble *dphidx = reinterpret_cast<RDouble *>(grid->GetDataPtr("d" + varName + "dx"));
+    RDouble* dphidy = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dy"));
+    RDouble* dphidz = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dz"));
+    RDouble *FaceFlux = reinterpret_cast<RDouble *>(grid->GetDataPtr("FaceFlux"));
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    
+    for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+    {
+        if (bcData->IsExist("init" + varName, PHDOUBLE, 1))
+        {
+            int iFacelocal = (*faceIndex)[iFace];
+            int le = leftCellOfFace[iFacelocal];
+            int re = grid->GetRightCellOfFace()[iFacelocal];
+
+            RDouble dx = xfc[iFacelocal] - xcc[le];
+            RDouble dy = yfc[iFacelocal] - ycc[le];
+            RDouble dz = zfc[iFacelocal] - zcc[le];
+            RDouble area2 = DiffusionCoeff[solverIndex][re] * 
+                area[iFacelocal] / (xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz);
+            RDouble ax = DiffusionCoeff[solverIndex][re] * xfn[iFacelocal] * area[iFacelocal] - dx * area2;
+            RDouble ay = DiffusionCoeff[solverIndex][re] * yfn[iFacelocal] * area[iFacelocal] - dy * area2;
+            RDouble az = DiffusionCoeff[solverIndex][re] * zfn[iFacelocal] * area[iFacelocal] - dz * area2;
+
+            diagMatrixCoeff[le] += area2 * matrixCoeff;
+            bCoeff[le] += area2 * phi[re] + dphidx[le] * ax + dphidy[le] * ay + dphidz[le] * az;
+
+            if (FaceFlux[iFacelocal] < 0)
+            {
+                diagMatrixCoeff[le] -= FaceFlux[iFacelocal] * matrixCoeff;
+                bCoeff[le] -= FaceFlux[iFacelocal] * phi[re];
+            }
+        }
+        else
+        {
+            int iFacelocal = (*faceIndex)[iFace];
+            int le = leftCellOfFace[iFacelocal];
+            int re = rightCellOfFace[iFacelocal];
+            if (FaceFlux[iFacelocal] < 0)
+            {
+                diagMatrixCoeff[le] -= FaceFlux[iFacelocal] * matrixCoeff;
+                bCoeff[le] -= FaceFlux[iFacelocal] * phi[re];
+            }
+        }
+    }
+}
+
+
+
+
+void IncomSATurbKEqCalculator::calPressureOutletBC(Grid*  gridIn, vector<int>* faceIndex, Data_Param* bcData, RDouble *diagMatrixCoeff, RDouble *bCoeff,  RDouble *q,
+    RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, RDouble *mu, RDouble matrixCoeff)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    int nTotalCell = grid->GetNTotalCell();
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+
+    RDouble *area = grid->GetFaceArea();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+    int* rightCellOfFace = grid->GetRightCellOfFace();
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    string varName = varNameIncom[solverIndex];
+
+    RDouble *phi = reinterpret_cast<RDouble *>(grid->GetDataPtr(varName));
+    
+    RDouble *dphidx = reinterpret_cast<RDouble *>(grid->GetDataPtr("d" + varName + "dx"));
+    RDouble* dphidy = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dy"));
+    RDouble* dphidz = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dz"));
+    RDouble *FaceFlux = reinterpret_cast<RDouble *>(grid->GetDataPtr("FaceFlux"));
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    
+    for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+    {
+        if (bcData->IsExist("init" + varName, PHDOUBLE, 1))
+        {
+            int iFacelocal = (*faceIndex)[iFace];  
+            int le = leftCellOfFace[iFacelocal];
+            int re = grid->GetRightCellOfFace()[iFacelocal];
+
+            RDouble dx = xfc[iFacelocal] - xcc[le];
+            RDouble dy = yfc[iFacelocal] - ycc[le];
+            RDouble dz = zfc[iFacelocal] - zcc[le];
+            RDouble area2 = DiffusionCoeff[solverIndex][re] * 
+                area[iFacelocal] / (xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz);
+            RDouble ax = DiffusionCoeff[solverIndex][re] * xfn[iFacelocal] * area[iFacelocal] - dx * area2;
+            RDouble ay = DiffusionCoeff[solverIndex][re] * yfn[iFacelocal] * area[iFacelocal] - dy * area2;
+            RDouble az = DiffusionCoeff[solverIndex][re] * zfn[iFacelocal] * area[iFacelocal] - dz * area2;
+
+            diagMatrixCoeff[le] += area2 * matrixCoeff;
+            bCoeff[le] += area2 * phi[re] + dphidx[le] * ax + dphidy[le] * ay + dphidz[le] * az;
+
+            if (FaceFlux[iFacelocal] < 0)
+            {
+                diagMatrixCoeff[le] -= FaceFlux[iFacelocal] * matrixCoeff;
+                bCoeff[le] -= FaceFlux[iFacelocal] * phi[re];
+            }
+        }
+        else
+        {
+            int iFacelocal = (*faceIndex)[iFace];
+            int le = grid->GetLeftCellOfFace()[iFacelocal];
+            int re = rightCellOfFace[iFacelocal];
+            if (FaceFlux[iFacelocal] < 0)
+            {
+                diagMatrixCoeff[le] -= FaceFlux[iFacelocal] * matrixCoeff;
+                bCoeff[le] -= FaceFlux[iFacelocal] * phi[re];
+            }
+        }
+    }
+}
+
+
+void IncomSATurbKEqCalculator::calWallBC(Grid*  gridIn, vector<int>* faceIndex, Data_Param* bcData, RDouble *diagMatrixCoeff, RDouble *bCoeff,  RDouble *q,
+    RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, RDouble *mu, RDouble matrixCoeff)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+
+    RDouble *area = grid->GetFaceArea();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    string varName = varNameIncom[solverIndex];
+
+    RDouble *phi = reinterpret_cast<RDouble *>(grid->GetDataPtr(varName));
+    RDouble *visl = reinterpret_cast<RDouble *>(grid->GetDataPtr("visl"));
+    RDouble *dphidx = reinterpret_cast<RDouble *>(grid->GetDataPtr("d" + varName + "dx"));
+    RDouble* dphidy = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dy"));
+    RDouble* dphidz = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dz"));
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    
+    for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+    {
+        int iFacelocal = (*faceIndex)[iFace]; 
+        int le = leftCellOfFace[iFacelocal];
+        int re = grid->GetRightCellOfFace()[iFacelocal];
+
+        RDouble dx = xfc[iFacelocal] - xcc[le];
+        RDouble dy = yfc[iFacelocal] - ycc[le];
+        RDouble dz = zfc[iFacelocal] - zcc[le];
+        RDouble area2 = DiffusionCoeff[solverIndex][re] * 
+            area[iFacelocal] / (xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz);
+        RDouble ax = DiffusionCoeff[solverIndex][re] * xfn[iFacelocal] * area[iFacelocal] - dx * area2;
+        RDouble ay = DiffusionCoeff[solverIndex][re] * yfn[iFacelocal] * area[iFacelocal] - dy * area2;
+        RDouble az = DiffusionCoeff[solverIndex][re] * zfn[iFacelocal] * area[iFacelocal] - dz * area2;
+
+        diagMatrixCoeff[le] += area2  * matrixCoeff;
+        bCoeff[le] += dphidx[le] * ax + dphidy[le] * ay + dphidz[le] * az;
+    }
+}
+
+void IncomSATurbKEqCalculator::GetResidual(Grid *gridIn, vector<RDouble>& res)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    RDouble resNow = 0.0;
+
+    grid->GetData("KineticResNow", &resNow, PHDOUBLE, 1);
+
+    res.push_back(resNow);
+}
+
+void IncomSATurbKEqCalculator::InitialUnsteadyVar(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    PHString1D phiNameList;
+    phiNameList.push_back("Kinetic");
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady == 0)
+    {
+        return;
+    }
+
+    string TranCalcMethod = GlobalDataBase::GetStrParaFromDB("TranCalcMethod");
+    if (TranCalcMethod == "IMPLICIT_EULER")
+    {
+        ImplicitEuler_ReInitTimeVar(grid, phiNameList);
+    }
+    else if (TranCalcMethod == "IMPLICIT_2ND_ORDER")
+    {
+        Implicit2ndOrder_ReInitTimeVar(grid, phiNameList);
+    }
+
+    PHString1D().swap(phiNameList);
+}
+
+void IncomSATurbKEqCalculator::UpdateUnsteadyVariable(Grid *grid)
+{
+    UnstructGrid *gridIn = UnstructGridCast(grid); 
+    std::vector<std::string> phiNameList;
+    phiNameList.push_back("Kinetic");
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady == 0)
+    {
+        return;
+    }
+
+    string TranCalcMethod = GlobalDataBase::GetStrParaFromDB("TranCalcMethod");
+    if (TranCalcMethod == "IMPLICIT_EULER")
+    {
+        ImplicitEuler_SaveOldTimeValue(gridIn, phiNameList);
+    }
+    else if (TranCalcMethod == "IMPLICIT_2ND_ORDER")
+    {
+        Implicit2ndOrder_SaveOldTimeValue(gridIn, phiNameList);
+    }
+
+}
+
+void IncomSATurbKEqCalculator::UpdateBCValue(Grid*  gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    string varName = varNameIncom[solverIndex];
+    int nTotalCell = grid->GetNTotalCell();
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+    RDouble *FaceFlux = reinterpret_cast<RDouble *>(grid->GetDataPtr("FaceFlux"));
+    RDouble *phi = reinterpret_cast<RDouble *>(grid->GetDataPtr(varName));
+    RDouble *dphidx = reinterpret_cast<RDouble *>(grid->GetDataPtr("d" + varName + "dx"));
+    RDouble* dphidy = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dy"));
+    RDouble* dphidz = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dz"));
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+    for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+        int bcType = bcRegion->GetBCType();
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        Data_Param *bcData = bcRegion->GetBCParamDataBase();
+
+        if (bcType == PHENGLEI::INFLOW)
+        {
+            RDouble kb = 0.0;
+            for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                kb = phi[le];
+                if (bcData->IsExist("init" + varName, PHDOUBLE, 1))
+                {
+                    bcData->GetData("init" + varName, &kb, PHDOUBLE, 1);
+                }
+                phi[re] = kb;
+            }
+        }
+        else if (bcType == PHENGLEI::OUTFLOW)
+        {
+            RDouble kb = 0.0;
+            for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                RDouble dx = xfc[iFacelocal] - xcc[le];
+                RDouble dy = yfc[iFacelocal] - ycc[le];
+                RDouble dz = zfc[iFacelocal] - zcc[le];
+                phi[re] = phi[le] + dphidx[le] * dx + dphidy[le] * dy + dphidz[le] * dz;
+                if (FaceFlux[iFacelocal] < 0.0)
+                {
+                    if (bcData->IsExist("init" + varName, PHDOUBLE, 1))
+                    {
+                        bcData->GetData("init" + varName, &kb, PHDOUBLE, 1);
+                        phi[re] = RDouble(kb);
+                    }
+                    else
+                    {
+                        std::cout << " Please assign a value " << std::endl;
+                    }
+                }
+            }
+        }
+        else if (bcType == PHENGLEI::PRESSURE_INLET)
+        {
+            RDouble kb = 0.0;
+            for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                kb = phi[le];
+                if (bcData->IsExist("init" + varName, PHDOUBLE, 1))
+                {
+                    bcData->GetData("init" + varName, &kb, PHDOUBLE, 1);
+                }
+                phi[re] = kb;
+            }
+        }
+        else if (bcType == PHENGLEI::PRESSURE_OUTLET)
+        {
+            RDouble kb = 0.0;
+            for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+
+                RDouble dx = xfc[iFacelocal] - xcc[le];
+                RDouble dy = yfc[iFacelocal] - ycc[le];
+                RDouble dz = zfc[iFacelocal] - zcc[le];
+                phi[re] = phi[le] + dphidx[le] * dx + dphidy[le] * dy + dphidz[le] * dz;
+                if (FaceFlux[iFacelocal] < 0.0)
+                {
+                    if (bcData->IsExist("init" + varName, PHDOUBLE, 1))
+                    {
+                        bcData->GetData("init" + varName, &kb, PHDOUBLE, 1);
+                        phi[re] = RDouble(kb);
+                    }
+                    else
+                    {
+                        std::cout << " Please assign a value " << std::endl;
+                    }
+                }
+            }
+        }
+        else 
+        {
+            for (size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                phi[re] = phi[le];
+            }
+        }
+    }
+    CommunicateAnInterfaceVar(phi);
+}
+
+void IncomSATurbKEqCalculator::SetDiffusionCoeff(Grid* gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int nIFace = grid->GetNIFace();
+    int* leftCellOfFace = grid->GetLeftCellOfFace();
+    int* rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *k = reinterpret_cast<RDouble*>(grid->GetDataPtr("Kinetic"));
+    RDouble* visl = reinterpret_cast<RDouble*>(grid->GetDataPtr("visl"));
+    RDouble* vist = reinterpret_cast<RDouble*>(grid->GetDataPtr("vist"));
+    RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+    RDouble* rhoFace = reinterpret_cast<RDouble*>(grid->GetDataPtr("rhoFace"));
+
+    RDouble delatv = 0.6666;
+    RDouble Cb2    = 0.622;
+    RDouble Cv1    = 7.1;
+    RDouble Cb1    = 0.1355;
+    RDouble kappa  = 0.4187;
+    RDouble Cw2    = 0.3;
+    RDouble Cw3    = 2;
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    int solverIndex = GetSolverIndex();
+    
+    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+    {
+        DiffusionCoeff[solverIndex][iCell] = (visl[iCell] + rho[iCell] * k[iCell]) / delatv;
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++iFace)
+    {
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+        DiffusionCoeff[solverIndex][re] = (visl[le] + rhoFace[iFace] * k[le]) / delatv;
+    }
+    CommunicateAnInterfaceVar(DiffusionCoeff[solverIndex]);
+}
+
+void IncomSATurbKEqCalculator::CalcGrad(Grid* gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    GradientCalculation(grid, "U", "dUdx", "dUdy", "dUdz");
+    GradientCalculation(grid, "V", "dVdx", "dVdy", "dVdz");
+    GradientCalculation(grid, "W", "dWdx", "dWdy", "dWdz");
+
+    RDouble *dudx  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdx"));
+    RDouble *dudy  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdy"));
+    RDouble *dudz  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdz"));
+    RDouble *dvdx  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdx"));
+    RDouble *dvdy  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdy"));
+    RDouble *dvdz  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdz"));
+    RDouble *dwdx  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdx"));
+    RDouble *dwdy  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdy"));
+    RDouble *dwdz  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdz"));
+    CommunicateAnInterfaceVar(dudx);
+    CommunicateAnInterfaceVar(dvdx);
+    CommunicateAnInterfaceVar(dwdx);
+    CommunicateAnInterfaceVar(dudy);
+    CommunicateAnInterfaceVar(dvdy);
+    CommunicateAnInterfaceVar(dwdy);
+    CommunicateAnInterfaceVar(dudz);
+    CommunicateAnInterfaceVar(dvdz);
+    CommunicateAnInterfaceVar(dwdz);
+
+    IncomScalarEqCalculator::CalcGrad(grid);
+}
+
+void IncomSATurbKEqCalculator::UpdateAfterIterloop(Grid* gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int nINFace = grid->GetNIFace();
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble* visl = reinterpret_cast<RDouble*>(grid->GetDataPtr("visl"));
+    RDouble* vist = reinterpret_cast<RDouble*>(grid->GetDataPtr("vist"));
+    RDouble *k = reinterpret_cast<RDouble*>(grid->GetDataPtr("Kinetic"));
+    RDouble* fv1 = reinterpret_cast<RDouble*>(grid->GetDataPtr("fv1"));
+    RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+    RDouble* rhoFace = reinterpret_cast<RDouble*>(grid->GetDataPtr("rhoFace"));
+    RDouble* mu   = reinterpret_cast<RDouble*>(grid->GetDataPtr("mu"));
+    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+    {
+        RDouble vistold = vist[iCell];
+        vist[iCell] = vistold + (rho[iCell] * k[iCell] * fv1[iCell] - vistold);
+        mu[iCell] = visl[iCell] + vist[iCell];
+        
+        if (vist[iCell] > 1e5 * visl[iCell])
+        {
+            mu[iCell] = visl[iCell] * 1e5;
+            vist[iCell] = visl[iCell] * 1e5;
+        }
+    }
+
+    for (int iFace = 0; iFace < nBoundFace - nINFace; ++iFace)
+    {
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+        vist[re] = vist[le];
+        mu[re] = mu[le];
+    }
+
+    UnstructBCSet* unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+        int bcType = bcRegion->GetBCType();
+        if (bcType == 2)
+        {
+            vector<int>* faceIndex = bcRegion->GetFaceIndex();
+            for (std::size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                mu[re] = visl[le];
+            }
+        }
+    }
+
+    CommunicateAnInterfaceVar(mu);
+    CommunicateAnInterfaceVar(visl);
+    CommunicateAnInterfaceVar(vist);
+
+}
+
+}
\ No newline at end of file
diff --git a/CFD/IncomSolver/src/IncomScalarEqCalculator.cpp b/CFD/IncomSolver/src/IncomScalarEqCalculator.cpp
new file mode 100644
index 0000000..b8233ee
--- /dev/null
+++ b/CFD/IncomSolver/src/IncomScalarEqCalculator.cpp
@@ -0,0 +1,1306 @@
+#include "IncomScalarEqCalculator.h"
+
+
+
+namespace PHSPACE
+{
+IncomScalarEqCalculator::IncomScalarEqCalculator():IncomCalculator()
+{
+
+}
+
+IncomScalarEqCalculator::~IncomScalarEqCalculator()
+{
+
+}
+
+void IncomScalarEqCalculator::GetResidual(Grid *gridIn, vector<RDouble>& res)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+}
+
+void IncomScalarEqCalculator::InitFlowAsRestart(Grid* gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    int solverIndex = GetSolverIndex();
+
+    RDouble initMu = GlobalDataBase::GetDoubleParaFromDB("initMu");
+    PHSPACE::SetField(DiffusionCoeff[solverIndex], initMu, nTotal);
+
+
+    RDouble* dphidx = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varNameIncom[solverIndex] + "dx"));
+    RDouble* dphidy = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varNameIncom[solverIndex] + "dy"));
+    RDouble* dphidz = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varNameIncom[solverIndex] + "dz"));
+
+    PHSPACE::SetField(dphidx, 0.0, nTotal);
+    PHSPACE::SetField(dphidy, 0.0, nTotal);
+    PHSPACE::SetField(dphidz, 0.0, nTotal);
+
+
+}
+
+void IncomScalarEqCalculator::AllocateGlobalVar(Grid *gridIn)
+{     
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    int solverIndex = GetSolverIndex();
+
+    DiffusionCoeff[solverIndex] = NewPointer<RDouble>(nTotal);
+    
+    RDouble* phi = NewPointer<RDouble>(nTotal);
+    grid->UpdateDataPtr(varNameIncom[solverIndex], phi);
+
+    RDouble* dphidx = NewPointer<RDouble>(nTotal);
+    RDouble* dphidy = NewPointer<RDouble>(nTotal);
+    RDouble* dphidz = NewPointer<RDouble>(nTotal);
+
+    grid->UpdateDataPtr("d" + varNameIncom[solverIndex] + "dx", dphidx);
+    grid->UpdateDataPtr("d" + varNameIncom[solverIndex] + "dy", dphidy);
+    grid->UpdateDataPtr("d" + varNameIncom[solverIndex] + "dz", dphidz);
+
+    AllocateUnsteadyVar(grid);
+}
+
+void IncomScalarEqCalculator::AllocateUnsteadyVar(Grid*  gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    string varName = varNameIncom[solverIndex];
+
+    PHString1D phiNameList;
+    phiNameList.push_back(varName);
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady == 0)
+    {
+        return;
+    }
+
+    string TranCalcMethod = GlobalDataBase::GetStrParaFromDB("TranCalcMethod");
+    if (TranCalcMethod == "IMPLICIT_EULER")
+    {
+        ImplicitEuler_AllocateMemory(grid, phiNameList);
+    }
+    else if (TranCalcMethod == "IMPLICIT_2ND_ORDER")
+    {
+        Implicit2ndOrder_AllocateMemory(grid, phiNameList);
+    }
+
+    PHString1D().swap(phiNameList);
+}
+
+void IncomScalarEqCalculator::IncompressibleInitial(Grid * gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    UpdateBCValue(grid);
+
+    InitialUnsteadyVar(grid);
+}
+
+void IncomScalarEqCalculator::UpdateUnsteadyVariable(Grid *grid)
+{
+}
+
+
+void IncomScalarEqCalculator::solveScalarEquation(Grid* gridIn, int iEquation)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+
+    int nTotalCell = grid->GetNTotalCell();
+    int  nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+
+    RDouble* diagMatrixCoeff = reinterpret_cast<RDouble*>(grid->GetDataPtr("diagMatrixCoeff"));
+    RDouble* upperMatrixCoeff  = reinterpret_cast<RDouble*>(grid->GetDataPtr("upperMatrixCoeff"));
+    RDouble* lowerMatrixCoeff = reinterpret_cast<RDouble*>(grid->GetDataPtr("lowerMatrixCoeff"));
+    RDouble* bCoeff = reinterpret_cast<RDouble*>(grid->GetDataPtr("bCoeff"));
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    string varName = varNameIncom[solverIndex];
+
+    CalcGrad(grid);
+    SetDiffusionCoeff(grid);
+
+    constructMatrixACoeff(grid, solverIndex);
+
+    constructBCoeff(grid, solverIndex);
+
+    RDouble* q = reinterpret_cast<RDouble*>(grid->GetDataPtr(varName));
+    calculateLinearEquation(grid, solverIndex, q, diagMatrixCoeff, bCoeff, upperMatrixCoeff , lowerMatrixCoeff);
+
+    UpdateBCValue(grid);
+    UpdateAfterIterloop(grid);
+    UpdateProperties(grid);
+}
+
+void IncomScalarEqCalculator::constructMatrixACoeff(Grid* gridIn, int iEquation)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+
+    int solverIndex = GetSolverIndex(iEquation);
+
+    InitializeMatrixACoeff(grid);
+
+    treatBC(grid, solverIndex, 1.0);
+
+    FirstUpwindInvisTerm(grid);
+
+    VisMatrixTerm(grid, solverIndex);
+
+    calcTransMatrixTerm(grid);
+
+    CalcOtherMatrixACoeff(grid);
+
+    relaxMatrixTerm(grid, solverIndex);
+}
+
+void IncomScalarEqCalculator::constructBCoeff(Grid* gridIn, int iEquation)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+
+    int solverIndex = GetSolverIndex(iEquation);
+
+    InitializeBCoeff(grid);
+
+    treatBC(grid, solverIndex, 0.0);
+
+    calcInvisSourceTerm(grid, solverIndex);
+
+    VisSourceTerm(grid, solverIndex);
+
+    calcTransSourceTerm(grid, solverIndex);
+
+    CalcOtherbCoeff(grid, solverIndex);
+
+    relaxSourceTerm(grid, solverIndex);
+}
+
+void IncomScalarEqCalculator::UpdateBCValue(Grid*  gridIn)
+{
+
+}
+
+void IncomScalarEqCalculator::CalcGrad(Grid* gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    string varName = varNameIncom[solverIndex];
+    RDouble* dphidx = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dx"));
+    RDouble* dphidy = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dy"));
+    RDouble* dphidz = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dz"));
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        dphidx[iCell] = 0.0;
+        dphidy[iCell] = 0.0;
+        dphidz[iCell] = 0.0;
+    }
+
+    GradientCalculation(grid, varName, "d" + varName + "dx", "d" + varName + "dy",
+        "d" + varName + "dz");
+}
+
+
+void IncomScalarEqCalculator::SetDiffusionCoeff(Grid* gridIn) 
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int solverIndex = this->GetSolverIndex();
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    CommunicateAnInterfaceVar(DiffusionCoeff[solverIndex]);
+}
+
+void IncomScalarEqCalculator::treatBC(Grid*  gridIn, int iVariable, RDouble matrixCoeff)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    RDouble* diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+    RDouble* bCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("bCoeff"));
+    int solverIndex = GetSolverIndex(iVariable);
+
+    RDouble* mu = DiffusionCoeff[solverIndex];
+    string varName = varNameIncom[solverIndex];
+    RDouble* q = reinterpret_cast<RDouble*>(grid->GetDataPtr(varName));
+    RDouble* dqdx = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dx"));
+    RDouble* dqdy = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dy"));
+    RDouble* dqdz = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dz"));
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+    for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+        int bcType = bcRegion->GetBCType();
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        Data_Param* bcData = bcRegion->GetBCParamDataBase();
+
+        if (bcType == PHENGLEI::SOLID_SURFACE)
+        {
+            calWallBC(grid, faceIndex, bcData, diagMatrixCoeff, bCoeff, q, dqdx, dqdy, dqdz, mu, matrixCoeff);
+        }
+        else if (bcType == PHENGLEI::SYMMETRY)
+        {
+            if (iVariable == IDX::S_IU || iVariable == IDX::S_IV || iVariable == IDX::S_IW)
+            {
+                calSymmetryBC(grid, faceIndex, bcData, diagMatrixCoeff, bCoeff, q, dqdx, dqdy, dqdz, mu, matrixCoeff);
+            }
+        }
+        else if (bcType == PHENGLEI::FARFIELD)
+        {
+            calFarfieldBC(grid, faceIndex, bcData, diagMatrixCoeff, bCoeff, q, dqdx, dqdy, dqdz, mu, matrixCoeff);
+        }
+        else if (bcType == PHENGLEI::INFLOW)
+        {
+            calVelocityInletBC(grid, faceIndex, bcData, diagMatrixCoeff, bCoeff, q, dqdx, dqdy, dqdz, mu, matrixCoeff);
+        }
+        else if (bcType == PHENGLEI::OUTFLOW)
+        {
+            calPressureOutletBC(grid, faceIndex, bcData, diagMatrixCoeff, bCoeff, q, dqdx, dqdy, dqdz, mu, matrixCoeff);
+        }
+        else if (bcType == PHENGLEI::PRESSURE_INLET)
+        {
+            calPressureInletBC(grid, faceIndex, bcData, diagMatrixCoeff, bCoeff, q, dqdx, dqdy, dqdz, mu, matrixCoeff);
+        }
+        else if (bcType == PHENGLEI::PRESSURE_OUTLET)
+        {
+            calPressureOutletBC(grid, faceIndex, bcData, diagMatrixCoeff, bCoeff, q, dqdx, dqdy, dqdz, mu, matrixCoeff);
+        }
+        else if (bcType == PHENGLEI::INTERFACE)
+        {
+            calInterfaceBC(grid, faceIndex, bcData, diagMatrixCoeff, bCoeff, q, dqdx, dqdy, dqdz, mu, matrixCoeff);
+
+        }
+    }
+
+}
+
+
+void IncomScalarEqCalculator::calFarfieldBC(Grid*  gridIn, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+    RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    RDouble *FaceFlux = reinterpret_cast<RDouble *>(grid->GetDataPtr("FaceFlux"));
+
+    for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+    {
+        int iFacelocal = (*faceIndex)[iFace];
+        int le = leftCellOfFace[iFacelocal];
+        int re = rightCellOfFace[iFacelocal];
+
+        RDouble muLocal = mu[le];
+
+        RDouble dx = xfc[iFacelocal] - xcc[le];
+        RDouble dy = yfc[iFacelocal] - ycc[le];
+        RDouble dz = zfc[iFacelocal] - zcc[le];
+        RDouble area2 = muLocal * 
+            area[iFacelocal] / (xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz);
+        RDouble ax = muLocal * xfn[iFacelocal] * area[iFacelocal] - dx * area2;
+        RDouble ay = muLocal * yfn[iFacelocal] * area[iFacelocal] - dy * area2;
+        RDouble az = muLocal * zfn[iFacelocal] * area[iFacelocal] - dz * area2;
+
+        diagMatrixCoeff[le] = diagMatrixCoeff[le] + area2 * matrixCoeff;
+        bCoeff[le] = bCoeff[le] + area2 * q[re] + dqdx[le] * ax + dqdy[le] * ay + dqdz[le] * az;
+
+        if (FaceFlux[iFacelocal] <0)
+        {
+            RDouble a12 = MAX(FaceFlux[iFacelocal], 0.0);
+            RDouble a21 = a12 - FaceFlux[iFacelocal];
+            diagMatrixCoeff[le] = diagMatrixCoeff[le] + a21 * matrixCoeff;
+            bCoeff[le] = bCoeff[le] + a21 * q[re];
+        }
+    }
+}
+
+void IncomScalarEqCalculator::calPressureInletBC(Grid*  gridIn, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+    RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    RDouble *FaceFlux = reinterpret_cast<RDouble *>(grid->GetDataPtr("FaceFlux"));
+
+    for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+    {
+        int iFacelocal = (*faceIndex)[iFace];
+        int le = leftCellOfFace[iFacelocal];
+        int re = rightCellOfFace[iFacelocal];
+
+        RDouble muLocal = mu[le];
+
+        RDouble dx = xfc[iFacelocal] - xcc[le];
+        RDouble dy = yfc[iFacelocal] - ycc[le];
+        RDouble dz = zfc[iFacelocal] - zcc[le];
+
+        RDouble area2 = muLocal * 
+            area[iFacelocal] / (xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz);
+        RDouble ax = muLocal * xfn[iFacelocal] * area[iFacelocal] - dx * area2;
+        RDouble ay = muLocal * yfn[iFacelocal] * area[iFacelocal] - dy * area2;
+        RDouble az = muLocal * zfn[iFacelocal] * area[iFacelocal] - dz * area2;
+
+        diagMatrixCoeff[le] = diagMatrixCoeff[le] + area2 * matrixCoeff;
+        bCoeff[le] = bCoeff[le] + area2 * q[re] + dqdx[le] * ax + dqdy[le] * ay + dqdz[le] * az;
+
+        if (FaceFlux[iFacelocal] < 0)
+        {
+            RDouble a12 = std::max(FaceFlux[iFacelocal], 0.0);
+            RDouble a21 = a12 - FaceFlux[iFacelocal];
+
+            diagMatrixCoeff[le] = diagMatrixCoeff[le] + a21 * matrixCoeff;
+            bCoeff[le] = bCoeff[le] + a21 * q[re];
+        }
+    }
+}
+
+
+void IncomScalarEqCalculator::calPressureOutletBC(Grid*  gridIn, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+    RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    RDouble *FaceFlux = reinterpret_cast<RDouble *>(grid->GetDataPtr("FaceFlux"));
+
+    for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+    {
+        int iFacelocal = (*faceIndex)[iFace];
+        int le = leftCellOfFace[iFacelocal];
+        int re = rightCellOfFace[iFacelocal];
+
+        RDouble muLocal = mu[le];
+        RDouble dx = xfc[iFacelocal] - xcc[le];
+        RDouble dy = yfc[iFacelocal] - ycc[le];
+        RDouble dz = zfc[iFacelocal] - zcc[le];
+
+        RDouble area2 = muLocal * 
+            area[iFacelocal] / (xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz);
+        RDouble ax = muLocal * xfn[iFacelocal] * area[iFacelocal] - dx * area2;
+        RDouble ay = muLocal * yfn[iFacelocal] * area[iFacelocal] - dy * area2;
+        RDouble az = muLocal * zfn[iFacelocal] * area[iFacelocal] - dz * area2;
+
+
+        diagMatrixCoeff[le] = diagMatrixCoeff[le] + area2 * matrixCoeff;
+        bCoeff[le] = bCoeff[le] + area2 * q[re] + dqdx[le] * ax + dqdy[le] * ay + dqdz[le] * az;
+
+        if (FaceFlux[iFacelocal] < 0)
+        {
+            RDouble a12 = MAX(FaceFlux[iFacelocal], 0.0);
+            RDouble a21 = a12 - FaceFlux[iFacelocal];
+
+            diagMatrixCoeff[le] = diagMatrixCoeff[le] + a21 * matrixCoeff;
+            bCoeff[le] = bCoeff[le] + a21 * q[re];
+        }
+    }
+}
+
+void IncomScalarEqCalculator::calInterfaceBC(Grid*  gridIn, vector<int>* faceIndex, Data_Param* bcData, RDouble* diagMatrixCoeff, RDouble* bCoeff, RDouble* q,
+    RDouble* dqdx, RDouble* dqdy, RDouble* dqdz, RDouble* mu, RDouble matrixCoeff)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+    RDouble *faceWeightOfLeftCell = reinterpret_cast<RDouble *>(grid->GetDataPtr("faceWeightOfLeftCell"));
+    RDouble *upperMatrixCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("upperMatrixCoeff"));
+    RDouble *lowerMatrixCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("lowerMatrixCoeff"));
+    RDouble *FaceFlux = reinterpret_cast<RDouble *>(grid->GetDataPtr("FaceFlux"));
+
+    for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+    {
+        int iFacelocal = (*faceIndex)[iFace];
+        int le = leftCellOfFace[iFacelocal];
+        int re = rightCellOfFace[iFacelocal];
+
+        RDouble muLocal = faceWeightOfLeftCell[iFace] * mu[le] + (1.0 - faceWeightOfLeftCell[iFace]) * mu[re];
+        RDouble dx = xcc[re] - xcc[le];
+        RDouble dy = ycc[re] - ycc[le];
+        RDouble dz = zcc[re] - zcc[le];
+        RDouble area2 = muLocal * 
+            area[iFacelocal] / (xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz);
+        RDouble ax = muLocal * xfn[iFacelocal] * area[iFacelocal] - dx * area2;
+        RDouble ay = muLocal * yfn[iFacelocal] * area[iFacelocal] - dy * area2;
+        RDouble az = muLocal * zfn[iFacelocal] * area[iFacelocal] - dz * area2;
+
+
+        diagMatrixCoeff[le] = diagMatrixCoeff[le] + area2 * matrixCoeff;
+        upperMatrixCoeff[iFacelocal] = upperMatrixCoeff[iFacelocal] - area2 * matrixCoeff;
+
+        RDouble a12 = MAX(FaceFlux[iFacelocal], 0.0);
+        RDouble a21 = a12 - FaceFlux[iFacelocal];
+
+        diagMatrixCoeff[le] = diagMatrixCoeff[le] + a21 * matrixCoeff;
+        upperMatrixCoeff[iFacelocal] = upperMatrixCoeff[iFacelocal] - a21 * matrixCoeff;
+
+        RDouble sLR = ax * (faceWeightOfLeftCell[iFace] * dqdx[le] + (1.0 - faceWeightOfLeftCell[iFace]) * dqdx[re]) +
+            ay * (faceWeightOfLeftCell[iFace] * dqdy[le] + (1.0 - faceWeightOfLeftCell[iFace]) * dqdy[re]) +
+            az * (faceWeightOfLeftCell[iFace] * dqdz[le] + (1.0 - faceWeightOfLeftCell[iFace]) * dqdz[re]);
+
+        bCoeff[le] += sLR;
+
+    }
+}
+
+void IncomScalarEqCalculator::calSymmetryBC(Grid*  gridIn, vector<int>* faceIndex, Data_Param* bcData, RDouble *diagMatrixCoeff, RDouble *bCoeff,  RDouble *q,
+    RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, RDouble *mu, RDouble matrixCoeff)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int* leftCellOfFace = grid->GetLeftCellOfFace();
+    int* rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *area = grid->GetFaceArea();
+    RDouble* xfn = grid->GetFaceNormalX();
+    RDouble* yfn = grid->GetFaceNormalY();
+    RDouble* zfn = grid->GetFaceNormalZ();
+    RDouble* xfc = grid->GetFaceCenterX();
+    RDouble* yfc = grid->GetFaceCenterY();
+    RDouble* zfc = grid->GetFaceCenterZ();
+    RDouble* xcc = grid->GetCellCenterX();
+    RDouble* ycc = grid->GetCellCenterY();
+    RDouble* zcc = grid->GetCellCenterZ();
+    int nTotalCell = grid->GetNTotalCell();
+
+    for (std::size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+    {
+        int iFacelocal = (*faceIndex)[iFace];
+        int le = leftCellOfFace[iFacelocal];
+        int re = rightCellOfFace[iFacelocal];
+        RDouble muLocal = mu[le];
+
+        RDouble dx = xfc[iFacelocal] - xcc[le];
+        RDouble dy = yfc[iFacelocal] - ycc[le];
+        RDouble dz = zfc[iFacelocal] - zcc[le];
+
+        RDouble area2 = muLocal * 
+            area[iFacelocal] / (xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz);
+        RDouble ax = muLocal * xfn[iFacelocal] * area[iFacelocal] - dx * area2;
+        RDouble ay = muLocal * yfn[iFacelocal] * area[iFacelocal] - dy * area2;
+        RDouble az = muLocal * zfn[iFacelocal] * area[iFacelocal] - dz * area2;
+
+        diagMatrixCoeff[le] = diagMatrixCoeff[le] + area2 * matrixCoeff;
+        bCoeff[le] = bCoeff[le] + area2 * q[re] + dqdx[le] * ax + dqdy[le] * ay + dqdz[le] * az;
+    }
+}
+
+void IncomScalarEqCalculator::calVelocityInletBC(Grid*  gridIn, vector<int>* faceIndex, Data_Param* bcData, RDouble *diagMatrixCoeff, RDouble *bCoeff,  RDouble *q,
+    RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, RDouble *mu, RDouble matrixCoeff)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *area    = grid->GetFaceArea();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    RDouble *FaceFlux = reinterpret_cast<RDouble *>(grid->GetDataPtr("FaceFlux"));
+
+    for (size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+    {
+        int iFacelocal = (*faceIndex)[iFace];
+        int le = leftCellOfFace[iFacelocal];
+        int re = rightCellOfFace[iFacelocal];
+
+        RDouble dx = xfc[iFacelocal] - xcc[le];
+        RDouble dy = yfc[iFacelocal] - ycc[le];
+        RDouble dz = zfc[iFacelocal] - zcc[le];
+
+        RDouble area2 = mu[le] * 
+            area[iFacelocal] / (xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz);
+        RDouble ax = mu[le] * xfn[iFacelocal] * area[iFacelocal] - dx * area2;
+        RDouble ay = mu[le] * yfn[iFacelocal] * area[iFacelocal] - dy * area2;
+        RDouble az = mu[le] * zfn[iFacelocal] * area[iFacelocal] - dz * area2;
+
+        diagMatrixCoeff[le] = diagMatrixCoeff[le] + area2 * matrixCoeff;
+        bCoeff[le] = bCoeff[le] + area2 * q[re] + dqdx[le] * ax + dqdy[le] * ay + dqdz[le] * az;
+
+        if (FaceFlux[iFacelocal] < 0)
+        {
+            RDouble a12 = MAX(FaceFlux[iFacelocal], 0.0);
+            RDouble a21 = a12 - FaceFlux[iFacelocal];
+            diagMatrixCoeff[le] = diagMatrixCoeff[le] + a21 * matrixCoeff;
+            bCoeff[le] = bCoeff[le] + a21 * q[re];
+        }
+    }
+}
+
+
+void IncomScalarEqCalculator::calWallBC(Grid*  gridIn, vector<int>* faceIndex, Data_Param* bcData, RDouble *diagMatrixCoeff, RDouble *bCoeff,  RDouble *q,
+    RDouble *dqdx, RDouble *dqdy, RDouble *dqdz, RDouble *mu, RDouble matrixCoeff)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble *area = grid->GetFaceArea();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+    {
+        int iFacelocal = (*faceIndex)[iFace];
+        int le = leftCellOfFace[iFacelocal];
+        int re = rightCellOfFace[iFacelocal];
+
+        RDouble muLocal = mu[re];
+
+        RDouble dx = xfc[iFacelocal] - xcc[le];
+        RDouble dy = yfc[iFacelocal] - ycc[le];
+        RDouble dz = zfc[iFacelocal] - zcc[le];
+
+        RDouble area2 = muLocal * 
+            area[iFacelocal] / (xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz);
+        RDouble ax = muLocal * xfn[iFacelocal] * area[iFacelocal] - dx * area2;
+        RDouble ay = muLocal * yfn[iFacelocal] * area[iFacelocal] - dy * area2;
+        RDouble az = muLocal * zfn[iFacelocal] * area[iFacelocal] - dz * area2;
+
+        diagMatrixCoeff[le] = diagMatrixCoeff[le] + area2 * matrixCoeff;
+        bCoeff[le] = bCoeff[le] + area2 * q[re] + dqdx[le] * ax + dqdy[le] * ay + dqdz[le] * az;
+    }
+}
+
+
+void IncomScalarEqCalculator::calcInvisSourceTerm(Grid*  grid, int solverIndex) 
+{
+    string ConvCalcMethod = GlobalDataBase::GetStrParaFromDB("ConvCalcMethod");
+    if (ConvCalcMethod == "UPWIND")
+    {
+    } 
+    else if (ConvCalcMethod == "CDS")
+    {
+        SecondCentralSourceTerm(grid, solverIndex);
+    }
+    else if (ConvCalcMethod == "QUICK")
+    {
+        QUICKSourceTerm(grid, solverIndex);
+    }
+    else if (ConvCalcMethod == "SUDS")
+    {
+        SecondUpWindSourceTerm(grid, solverIndex);
+    }
+}
+
+
+void IncomScalarEqCalculator::FirstUpwindInvisTerm(Grid*  gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+    RDouble *upperMatrixCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("upperMatrixCoeff"));
+    RDouble *lowerMatrixCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("lowerMatrixCoeff"));
+    RDouble *FaceFlux = reinterpret_cast<RDouble *>(grid->GetDataPtr("FaceFlux"));
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        RDouble a12 = MAX(FaceFlux[iFace], 0.0);
+        RDouble a21 = a12 - FaceFlux[iFace];
+
+        int le = leftCellOfFace [iFace];
+        int re = rightCellOfFace[iFace];
+
+        upperMatrixCoeff[iFace] -= a21;
+        diagMatrixCoeff[le]  += a21;
+
+        lowerMatrixCoeff[iFace] -= a12;
+        diagMatrixCoeff[re]  += a12;
+    }
+}
+
+void IncomScalarEqCalculator::QUICKSourceTerm(Grid*  gridIn, int solverIndex)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    
+    RDouble *FaceFlux = reinterpret_cast<RDouble *>(grid->GetDataPtr("FaceFlux"));
+    RDouble *bCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("bCoeff"));
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    string varName = varNameIncom[solverIndex];
+    RDouble* q = reinterpret_cast<RDouble*>(grid->GetDataPtr(varName));
+    RDouble* dqdx = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dx"));
+    RDouble* dqdy = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dy"));
+    RDouble* dqdz = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dz"));
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace [iFace];
+        int re = rightCellOfFace[iFace];
+        int ic = le;
+        int id = re;
+        if (FaceFlux[iFace] < 0)
+        {
+            ic = re;
+            id = le;
+        }
+        RDouble dx = xcc[id] - xcc[ic];
+        RDouble dy = ycc[id] - ycc[ic];
+        RDouble dz = zcc[id] - zcc[ic];
+        RDouble cq = q[id] - 2 * (dqdx[ic] * dx + dqdy[ic] * dy + dqdz[ic] * dz);
+        RDouble cq_r = MAX((q[ic] - cq) / (q[id] - q[ic] + SMALL),0);
+        RDouble b = MIN(2 * cq_r, 2);
+        RDouble a12 = fabs(FaceFlux[iFace]) * (0.5 * MIN((3 + cq_r) / 4, b) * (q[ic] - q[id]));
+        bCoeff[ic] += a12;
+        bCoeff[id] -= a12;
+    }
+}
+
+
+void IncomScalarEqCalculator::SecondUpWindSourceTerm(Grid*  gridIn, int solverIndex)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble *FaceFlux = reinterpret_cast<RDouble *>(grid->GetDataPtr("FaceFlux"));
+    RDouble *bCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("bCoeff"));
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    string varName = varNameIncom[solverIndex];
+    RDouble* q = reinterpret_cast<RDouble*>(grid->GetDataPtr(varName));
+    RDouble* dqdx = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dx"));
+    RDouble* dqdy = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dy"));
+    RDouble* dqdz = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dz"));
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace [iFace];
+        int re = rightCellOfFace[iFace];
+        int ic = le;
+        int id = re;
+        if (FaceFlux[iFace] < 0)
+        {
+            ic = re;
+            id = le;
+        }
+        RDouble dx = xcc[id] - xcc[ic];
+        RDouble dy = ycc[id] - ycc[ic];
+        RDouble dz = zcc[id] - zcc[ic];
+        RDouble cu = q[id] - 2 * (dqdx[ic] * dx + dqdy[ic] * dy + dqdz[ic] * dz);
+        RDouble cu_r = MAX((q[ic] - cu) / (q[id] - q[ic] + SMALL),0);
+
+        RDouble a12 = fabs(FaceFlux[iFace]) * (0.5 * MIN(cu_r, 2)) * (q[ic] - q[id]);
+        bCoeff[ic] += a12;
+        bCoeff[id] -= a12;
+    }
+
+}
+
+void IncomScalarEqCalculator::SecondCentralSourceTerm(Grid*  gridIn, int solverIndex)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble *FaceFlux = reinterpret_cast<RDouble *>(grid->GetDataPtr("FaceFlux"));
+    RDouble *bCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("bCoeff"));
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    string varName = varNameIncom[solverIndex];
+    RDouble* q = reinterpret_cast<RDouble*>(grid->GetDataPtr(varName));
+    RDouble* dqdx = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dx"));
+    RDouble* dqdy = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dy"));
+    RDouble* dqdz = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dz"));
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace [iFace];
+        int re = rightCellOfFace[iFace];
+        int ic = le;
+        int id = re;
+        if (FaceFlux[iFace] < 0)
+        {
+            ic = re;
+            id = le;
+        }
+        RDouble dx = xcc[id] - xcc[ic];
+        RDouble dy = ycc[id] - ycc[ic];
+        RDouble dz = zcc[id] - zcc[ic];
+        RDouble cq = q[id] - 2 * (dqdx[ic] * dx + dqdy[ic] * dy + dqdz[ic] * dz);
+        RDouble cq_r = MAX((q[ic] - cq) / (q[id] - q[ic] + SMALL),0);
+        RDouble b = MIN(2 * cq_r, 2);
+        RDouble a12 = fabs(FaceFlux[iFace]) * (0.5 * MIN((3 + cq_r) / 4, b) * (q[ic] - q[id]));
+        bCoeff[ic] += a12;
+        bCoeff[id] -= a12;
+    }
+}
+
+void IncomScalarEqCalculator::VisMatrixTerm(Grid*  gridIn, int solverIndex)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    RDouble *faceWeightOfLeftCell = reinterpret_cast<RDouble *>(grid->GetDataPtr("faceWeightOfLeftCell"));
+
+    RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+    RDouble *upperMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("upperMatrixCoeff"));
+    RDouble *lowerMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("lowerMatrixCoeff"));
+
+    RDouble* mu;
+    RDouble* tempmu;
+    using namespace IDX;
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    
+    mu = DiffusionCoeff[solverIndex];
+    if (solverIndex == S_ITEMP) 
+    {
+        int nTotalCell = grid->GetNTotalCell();
+        RDouble *cp = reinterpret_cast<RDouble*>(grid->GetDataPtr("cp"));
+        tempmu = new RDouble [nTotalCell];
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            tempmu[iCell] = DiffusionCoeff[solverIndex][iCell] / cp[iCell];
+        }
+        mu = tempmu;
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+
+        RDouble ax = area[iFace] * xfn[iFace];
+        RDouble ay = area[iFace] * yfn[iFace];
+        RDouble az = area[iFace] * zfn[iFace];
+
+        RDouble ex = xcc[re] - xcc[le];
+        RDouble ey = ycc[re] - ycc[le];
+        RDouble ez = zcc[re] - zcc[le];
+
+        RDouble diffCoeF = faceWeightOfLeftCell[iFace] * mu[le] + (1.0 - faceWeightOfLeftCell[iFace]) * mu[re];
+
+        RDouble aLR = diffCoeF * (ax * ax + ay * ay + az * az) / (ax * ex + ay * ey + az * ez);
+
+        upperMatrixCoeff[iFace] -= aLR;
+        diagMatrixCoeff[le]  += aLR;
+
+        lowerMatrixCoeff[iFace] -= aLR;
+        diagMatrixCoeff[re]  += aLR;
+    }
+
+    if (solverIndex == S_ITEMP)
+    {
+        delete[] tempmu;
+    }
+}
+
+
+void IncomScalarEqCalculator::VisSourceTerm(Grid*  gridIn, int solverIndex)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    RDouble *faceWeightOfLeftCell = reinterpret_cast<RDouble *>(grid->GetDataPtr("faceWeightOfLeftCell"));
+
+    RDouble *bCoeff = reinterpret_cast<RDouble*>(grid->GetDataPtr("bCoeff"));
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    string varName = varNameIncom[solverIndex];
+    RDouble* q = reinterpret_cast<RDouble*>(grid->GetDataPtr(varName));
+    RDouble* dqdx = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dx"));
+    RDouble* dqdy = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dy"));
+    RDouble* dqdz = reinterpret_cast<RDouble*>(grid->GetDataPtr("d" + varName + "dz"));
+
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    RDouble* mu = DiffusionCoeff[solverIndex];
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+
+        RDouble ax = area[iFace] * xfn[iFace];
+        RDouble ay = area[iFace] * yfn[iFace];
+        RDouble az = area[iFace] * zfn[iFace];
+
+        RDouble ex = xcc[re] - xcc[le];
+        RDouble ey = ycc[re] - ycc[le];
+        RDouble ez = zcc[re] - zcc[le];
+
+        RDouble diffCoeF = faceWeightOfLeftCell[iFace] * mu[le] + (1.0 - faceWeightOfLeftCell[iFace]) * mu[re];
+
+        RDouble aLR = diffCoeF * (ax * ax + ay * ay + az * az) / (ax * ex + ay * ey + az * ez);
+
+        ax = diffCoeF * ax - ex * aLR;
+        ay = diffCoeF * ay - ey * aLR;
+        az = diffCoeF * az - ez * aLR;
+
+        RDouble sLR = ax * (faceWeightOfLeftCell[iFace] * dqdx[le] + (1.0 - faceWeightOfLeftCell[iFace]) * dqdx[re]) +
+            ay * (faceWeightOfLeftCell[iFace] * dqdy[le] + (1.0 - faceWeightOfLeftCell[iFace]) * dqdy[re]) +
+            az * (faceWeightOfLeftCell[iFace] * dqdz[le] + (1.0 - faceWeightOfLeftCell[iFace]) * dqdz[re]);
+
+        bCoeff[le] += sLR;
+        bCoeff[re] -= sLR;
+    }
+
+}
+
+
+void IncomScalarEqCalculator::calcTransMatrixTerm(Grid*  grid)
+{
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady == 1)
+    {
+        string TranCalcMethod = GlobalDataBase::GetStrParaFromDB("TranCalcMethod");
+        if (TranCalcMethod == "IMPLICIT_EULER")
+        {
+            TransMatrixTerm_1st(grid);
+        }
+        else if (TranCalcMethod == "IMPLICIT_2ND_ORDER")
+        {
+            TransMatrixTerm_2nd(grid);
+        }
+    }
+}
+
+void IncomScalarEqCalculator::TransMatrixTerm_1st(Grid*  gridIn) 
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble dt = GlobalDataBase::GetDoubleParaFromDB("dt");
+    RDouble* cvOld = grid->GetCellVolume();
+    RDouble *rho = reinterpret_cast<RDouble *>(grid->GetDataPtr("rho"));
+    RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("diagMatrixCoeff"));
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        diagMatrixCoeff[iCell]  += rho[iCell] * cvOld[iCell] / dt;
+    }
+}
+
+void IncomScalarEqCalculator::TransMatrixTerm_2nd(Grid*  gridIn) 
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble dt = GlobalDataBase::GetDoubleParaFromDB("dt");
+
+    int timeStepNow;
+    GlobalDataBase::GetData("timeStepNow", &timeStepNow, PHINT, 1);
+
+    RDouble* cvOld = grid->GetCellVolume();
+    RDouble *rho = reinterpret_cast<RDouble *>(grid->GetDataPtr("rho"));
+    RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("diagMatrixCoeff"));
+
+    if (timeStepNow == 0)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++iCell)
+        {
+            diagMatrixCoeff[iCell] += rho[iCell] * cvOld[iCell] / dt;
+        }
+    }
+    else
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++iCell)
+        {
+            diagMatrixCoeff[iCell] += 3 * rho[iCell] * cvOld[iCell] / (2 * dt);
+        }
+    }
+}
+
+void IncomScalarEqCalculator::calcTransSourceTerm(Grid*  grid, int iVariable)
+{
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady == 1)
+    {
+        string TranCalcMethod = GlobalDataBase::GetStrParaFromDB("TranCalcMethod");
+        if (TranCalcMethod == "IMPLICIT_EULER")
+        {
+            TransSourceTerm_1st(grid, iVariable);
+        }
+        else if (TranCalcMethod == "IMPLICIT_2ND_ORDER")
+        {
+            TransSourceTerm_2nd(grid, iVariable);
+        }
+    }
+}
+
+void IncomScalarEqCalculator::TransSourceTerm_1st(Grid*  gridIn, int iVariable) 
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble* cvOld = grid->GetCellVolume();
+    RDouble dt = GlobalDataBase::GetDoubleParaFromDB("dt");
+    RDouble *rhoOld = reinterpret_cast<RDouble *>(grid->GetDataPtr("rhoOld"));
+    RDouble *bCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("bCoeff"));
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    string varName = varNameIncom[iVariable];
+    RDouble* qOld = reinterpret_cast<RDouble*>(grid->GetDataPtr(varName + "Old"));
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        bCoeff[iCell]  += rhoOld[iCell] * cvOld[iCell] / dt * qOld[iCell];
+    }
+}
+
+void IncomScalarEqCalculator::TransSourceTerm_2nd(Grid*  gridIn, int iVariable) 
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble* cvOld = grid->GetCellVolume();
+    RDouble dt = GlobalDataBase::GetDoubleParaFromDB("dt");
+
+    int timeStepNow;
+    GlobalDataBase::GetData("timeStepNow", &timeStepNow, PHINT, 1);
+    RDouble *rhoOld = reinterpret_cast<RDouble *>(grid->GetDataPtr("rhoOld"));
+    RDouble *rhoOldOld = reinterpret_cast<RDouble *>(grid->GetDataPtr("rhoOldOld"));
+    RDouble *bCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("bCoeff"));
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    string varName = varNameIncom[iVariable];
+    RDouble* qOld = reinterpret_cast<RDouble*>(grid->GetDataPtr(varName + "Old"));
+    RDouble* qOldOld = reinterpret_cast<RDouble*>(grid->GetDataPtr(varName + "OldOld"));
+
+    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+    {
+        RDouble tmpOld = 2 * rhoOld[iCell] * cvOld[iCell] / dt;
+        RDouble tmpOldOld = -rhoOldOld[iCell] * cvOld[iCell] / (2 * dt);
+        bCoeff[iCell] += tmpOld * qOld[iCell] + tmpOldOld * qOldOld[iCell];
+    }
+}
+
+void IncomScalarEqCalculator::relaxMatrixTerm(Grid*  grid, int iVariable)
+{
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble* diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+    RDouble *soluRelaxCoeff = reinterpret_cast <RDouble *> (GlobalDataBase::GetDataPtr("soluRelaxCoeff"));
+
+    RDouble RelaxCoeff = soluRelaxCoeff[iVariable];
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        diagMatrixCoeff[iCell] =  diagMatrixCoeff[iCell] / RelaxCoeff;
+    }
+}
+
+void IncomScalarEqCalculator::relaxSourceTerm(Grid*  grid, int iVariable)
+{
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble* diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+    RDouble* bCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("bCoeff"));
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    string varName = varNameIncom[iVariable];
+    RDouble* q = reinterpret_cast<RDouble*>(grid->GetDataPtr(varName));
+
+    RDouble *soluRelaxCoeff = reinterpret_cast <RDouble *> (GlobalDataBase::GetDataPtr("soluRelaxCoeff"));
+    RDouble RelaxCoeff = soluRelaxCoeff[iVariable];
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        bCoeff[iCell] = bCoeff[iCell] + (1 - RelaxCoeff) * diagMatrixCoeff[iCell] * q[iCell];
+    }
+}
+
+
+void IncomScalarEqCalculator::ImplicitEuler_AllocateMemory(Grid *grid, vector<string> &phiName)
+{
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    for (vector<string>::iterator iter = phiName.begin(); iter != phiName.end(); ++ iter)
+    {
+        RDouble* phi = NewPointer<RDouble>(nTotal);
+        grid->UpdateDataPtr((*iter) + "Old", phi);
+    }
+}
+
+void IncomScalarEqCalculator::ImplicitEuler_ReInitTimeVar(Grid*  grid, vector<string>& phiName)
+{
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    for (vector<string>::iterator iter = phiName.begin(); iter != phiName.end(); ++iter)
+    {
+        RDouble* initPhi = reinterpret_cast<RDouble*>(grid->GetDataPtr(*iter));
+        RDouble* phi = reinterpret_cast<RDouble*>(grid->GetDataPtr((*iter) + "Old")); 
+
+        for (int iCell = 0; iCell < nTotal; ++iCell)
+        {
+            phi[iCell] = initPhi[iCell];
+        }
+    }
+}
+
+void IncomScalarEqCalculator::ImplicitEuler_SaveOldTimeValue(Grid *gridIn, vector<string> &phiName)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    int nTotalCell = grid->GetNTotalCell();
+    vector<RDouble *> phiNow;
+    vector<RDouble *> phiOld;
+    for (vector<string>::iterator iter = phiName.begin(); iter != phiName.end(); ++ iter)
+    {
+        RDouble *phi = reinterpret_cast<RDouble *>(grid->GetDataPtr((*iter)));
+        RDouble *phiOldPtr = reinterpret_cast<RDouble *>(grid->GetDataPtr((*iter) + "Old"));
+        phiNow.push_back(phi);
+        phiOld.push_back(phiOldPtr);
+    }
+
+    for (int index = 0; index < phiName.size(); ++ index)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            phiOld[index][iCell] = phiNow[index][iCell];
+
+        }
+    }
+
+    vector<RDouble *>().swap(phiNow);
+    vector<RDouble *>().swap(phiOld);
+}
+
+void IncomScalarEqCalculator::ImplicitEuler_InitRestartTimeVar(Grid* grid, vector<string>& nameLists)
+{
+    int nTotalCell = grid->GetNTotalCell();
+    for (vector<string>::iterator iter = nameLists.begin(); iter != nameLists.end(); ++iter)
+    {
+        RDouble* phi = reinterpret_cast<RDouble*>(grid->GetDataPtr(*iter));
+        RDouble* phiOldPtr = reinterpret_cast<RDouble*>(grid->GetDataPtr((*iter) + "Old"));
+
+        for (int iCell = 0; iCell < nTotalCell; ++iCell)
+        {
+            phiOldPtr[iCell] = phi[iCell];
+        }
+    }
+}
+
+void IncomScalarEqCalculator::ImplicitEuler_ReadRestartFile(Grid * grid, vector<string>&nameLists, hid_t grploc)
+{
+    for (vector<string>::iterator iter = nameLists.begin(); iter != nameLists.end(); ++iter)
+    {
+        RDouble* phiOldPtr = reinterpret_cast<RDouble*>(grid->GetDataPtr((*iter) + "Old"));
+        if (phiOldPtr != nullptr)
+        {
+            ReadData(grploc, &phiOldPtr[0], (*iter));
+        }
+    }
+}
+
+
+
+void IncomScalarEqCalculator::Implicit2ndOrder_AllocateMemory(Grid *grid, vector<string> &phiName)
+{
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+    RDouble* phiOld;
+    RDouble* phiOldOld;
+
+    for (vector<string>::iterator iter = phiName.begin(); iter != phiName.end(); ++ iter)
+    {
+        phiOld = NewPointer<RDouble>(nTotal);
+        grid->UpdateDataPtr((*iter) + "Old", phiOld);
+
+        phiOldOld = NewPointer<RDouble>(nTotal);
+        grid->UpdateDataPtr((*iter) + "OldOld", phiOldOld);
+    }
+}
+
+void IncomScalarEqCalculator::Implicit2ndOrder_ReInitTimeVar(Grid*  grid, vector<string>& phiName)
+{
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    for (vector<string>::iterator iter = phiName.begin(); iter != phiName.end(); ++iter)
+    {
+        RDouble * initPhi = reinterpret_cast<RDouble*>(grid->GetDataPtr(*iter));
+        RDouble * phiOld = reinterpret_cast<RDouble*>(grid->GetDataPtr((*iter) + "Old"));
+        RDouble * phiOldOld = reinterpret_cast<RDouble*>(grid->GetDataPtr((*iter) + "OldOld"));
+
+        for (int iCell = 0; iCell < nTotal; ++iCell)
+        {
+            phiOld[iCell] = initPhi[iCell];
+            phiOldOld[iCell] = initPhi[iCell];
+        }
+    }
+}
+
+
+void IncomScalarEqCalculator::Implicit2ndOrder_SaveOldTimeValue(Grid *gridIn, vector<string> &phiName)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    int nTotalCell = grid->GetNTotalCell();
+    vector<RDouble *> phiNow;
+    vector<RDouble *> phiOld;
+    vector<RDouble *> phiOldOld;
+
+    for (vector<string>::iterator iter = phiName.begin(); iter != phiName.end(); ++ iter)
+    {
+        RDouble *phiNowPtr = reinterpret_cast<RDouble *>(grid->GetDataPtr((*iter)));
+        RDouble *phiOldPtr = reinterpret_cast<RDouble *>(grid->GetDataPtr((*iter) + "Old"));
+        RDouble *phiOldOldPtr = reinterpret_cast<RDouble *>(grid->GetDataPtr((*iter) + "OldOld"));
+        phiNow.push_back(phiNowPtr);
+        phiOld.push_back(phiOldPtr);
+        phiOldOld.push_back(phiOldOldPtr);
+    }
+
+    for (int index = 0; index < phiName.size(); ++ index)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            phiOldOld[index][iCell] = phiOld[index][iCell];
+            phiOld[index][iCell]    = phiNow[index][iCell];
+        }
+    }
+
+    vector<RDouble *>().swap(phiNow);
+    vector<RDouble *>().swap(phiOld);
+    vector<RDouble *>().swap(phiOldOld);
+}
+
+void IncomScalarEqCalculator::Implicit2ndOrder_InitRestartTimeVar(Grid* grid, vector<string>& nameLists)
+{
+    int nTotalCell = grid->GetNTotalCell();
+    for (vector<string>::iterator iter = nameLists.begin(); iter != nameLists.end(); ++iter)
+    {
+        RDouble* phi = reinterpret_cast<RDouble*>(grid->GetDataPtr(*iter));
+        RDouble* phiOldPtr = reinterpret_cast<RDouble*>(grid->GetDataPtr((*iter) + "Old"));
+        RDouble* phiOldOldPtr = reinterpret_cast<RDouble*>(grid->GetDataPtr((*iter) + "OldOld"));
+
+        for (int iCell = 0; iCell < nTotalCell; ++iCell)
+        {
+            phiOldPtr[iCell] = phi[iCell];
+            phiOldOldPtr[iCell] = phi[iCell];
+        }
+    }
+}
+
+void IncomScalarEqCalculator::Implicit2ndOrder_ReadRestartFile(Grid* grid, vector<string>& nameLists, hid_t grploc)
+{
+    for (vector<string>::iterator iter = nameLists.begin(); iter != nameLists.end(); ++iter)
+    {
+        RDouble* phiOldPtr = reinterpret_cast<RDouble*>(grid->GetDataPtr((*iter) + "Old"));
+        if (phiOldPtr != nullptr)
+        {
+            ReadData(grploc, &phiOldPtr[0], (*iter));
+        }
+
+        RDouble* phiOldOldPtr = reinterpret_cast<RDouble*>(grid->GetDataPtr((*iter) + "OldOld"));
+        if (phiOldOldPtr != nullptr)
+        {
+            ReadData(grploc, &phiOldOldPtr[0], (*iter));
+        }
+    }
+}
+
+
+}
diff --git a/CFD/IncomSolver/src/IncomSpeciesEqCalculator.cpp b/CFD/IncomSolver/src/IncomSpeciesEqCalculator.cpp
new file mode 100644
index 0000000..6e7c404
--- /dev/null
+++ b/CFD/IncomSolver/src/IncomSpeciesEqCalculator.cpp
@@ -0,0 +1,571 @@
+#include "IncomSpeciesEqCalculator.h"
+
+
+
+
+namespace PHSPACE
+{
+IncomSpeciesEqCalculator::IncomSpeciesEqCalculator():IncomScalarEqCalculator()
+{
+
+}
+
+IncomSpeciesEqCalculator::~IncomSpeciesEqCalculator()
+{
+
+}
+
+void IncomSpeciesEqCalculator::InitFlowAsRestart(Grid* gridIn)
+{
+    IncomScalarEqCalculator::InitFlowAsRestart(gridIn);
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    int *localSolverIndex = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("localSolverIndex"));
+    int localIndex = localSolverIndex[solverIndex];
+
+    int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+    RDouble* initMassFractionIncom = new RDouble[numberOfSpeciesIncom];
+    GlobalDataBase::GetData("initMassFractionIncom", initMassFractionIncom, PHDOUBLE, numberOfSpeciesIncom);
+    RDouble initPhi = initMassFractionIncom[localIndex];
+    RDouble* phi = reinterpret_cast<RDouble*>(grid->GetDataPtr(varNameIncom[solverIndex]));
+    PHSPACE::SetField(phi, initPhi, nTotal);
+
+    GAS_SPACE::gas->InitParameterForMassdiff();
+
+    delete[] initMassFractionIncom;
+}
+
+void IncomSpeciesEqCalculator::IncompressibleInitial(Grid * gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    int *localSolverIndex = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("localSolverIndex"));
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    int solverIndex = GetSolverIndex();
+
+    GAS_SPACE::gas->UpdateMassDiff(grid, localSolverIndex[solverIndex], DiffusionCoeff[solverIndex]);
+
+    UpdateBCValue(grid);
+
+    InitialUnsteadyVar(grid);
+}
+
+
+void IncomSpeciesEqCalculator::GetResidual(Grid *gridIn, vector<RDouble>& res)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    string varName = varNameIncom[solverIndex];
+    RDouble resNow = 0.0;
+    grid->GetData(varName + "ResNow", &resNow, PHDOUBLE, 1);
+
+    res.push_back(resNow);
+}
+
+void IncomSpeciesEqCalculator::InitialUnsteadyVar(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    string varName = varNameIncom[solverIndex];
+    PHString1D phiNameList;
+    phiNameList.push_back(varName);
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady == 0)
+    {
+        return;
+    }
+
+    string TranCalcMethod = GlobalDataBase::GetStrParaFromDB("TranCalcMethod");
+    if (TranCalcMethod == "IMPLICIT_EULER")
+    {
+        ImplicitEuler_ReInitTimeVar(grid, phiNameList);
+    }
+    else if (TranCalcMethod == "IMPLICIT_2ND_ORDER")
+    {
+        Implicit2ndOrder_ReInitTimeVar(grid, phiNameList);
+    }
+
+    PHString1D().swap(phiNameList);
+}
+
+void IncomSpeciesEqCalculator::UpdateUnsteadyVariable(Grid *grid)
+{
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    string varName = varNameIncom[solverIndex];
+    UnstructGrid *gridIn = UnstructGridCast(grid); 
+    std::vector<std::string> phiNameList;
+    string *scalarNameList = GAS_SPACE::gas->GetGasName();
+    phiNameList.push_back(varName);
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (isUnsteady == 0)
+    {
+        return;
+    }
+
+    string TranCalcMethod = GlobalDataBase::GetStrParaFromDB("TranCalcMethod");
+    if (TranCalcMethod == "IMPLICIT_EULER")
+    {
+        ImplicitEuler_SaveOldTimeValue(gridIn, phiNameList);
+    }
+    else if (TranCalcMethod == "IMPLICIT_2ND_ORDER")
+    {
+        Implicit2ndOrder_SaveOldTimeValue(gridIn, phiNameList);
+    }
+
+}
+
+void IncomSpeciesEqCalculator::UpdateBCValue(Grid*  gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+    int solverIndex = GetSolverIndex();
+    string varName = varNameIncom[solverIndex];
+    int nTotalCell = grid->GetNTotalCell();
+    int* leftCellOfFace = grid->GetLeftCellOfFace();
+    int* rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+    RDouble* phi = reinterpret_cast<RDouble*>(grid->GetDataPtr(varName));
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+    
+    for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+        int bcType = bcRegion->GetBCType();
+        vector<int>* faceIndex = bcRegion->GetFaceIndex();
+        Data_Param* bcData = bcRegion->GetBCParamDataBase();
+
+        if (bcType == PHENGLEI::SOLID_SURFACE)
+        {
+            for (std::size_t i = 0; i < faceIndex->size(); ++i)
+            {
+                const int iface = (*faceIndex)[i];
+                int le = leftCellOfFace[iface];
+                int re = rightCellOfFace[iface];
+                RDouble  spBound = phi[le];
+
+                int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+                if (bcData->IsExist("initMassFractionIncom", PHDOUBLE, numberOfSpeciesIncom))
+                {
+                    RDouble* initMassFractionIncom = new RDouble[numberOfSpeciesIncom];
+                    bcData->GetData("initMassFractionIncom", initMassFractionIncom, PHDOUBLE, numberOfSpeciesIncom);
+
+                    int *localSolverIndex = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("localSolverIndex"));
+                    int localIndex = localSolverIndex[solverIndex];
+                    spBound = initMassFractionIncom[localIndex];
+
+                    delete[] initMassFractionIncom;
+                }
+                phi[re] = RDouble(spBound);
+            }
+
+        }
+        else if (bcType == PHENGLEI::INFLOW)
+        {
+            for (std::size_t i = 0; i < faceIndex->size(); ++i)
+            {
+                const int iface = (*faceIndex)[i];
+                int re = rightCellOfFace[iface];
+                RDouble spBound;
+                int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+                if (bcData->IsExist("initMassFractionIncom", PHDOUBLE, numberOfSpeciesIncom))
+                {
+                    RDouble* initMassFractionIncom = new RDouble[numberOfSpeciesIncom];
+                    bcData->GetData("initMassFractionIncom", initMassFractionIncom, PHDOUBLE, numberOfSpeciesIncom);
+
+                    int *localSolverIndex = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("localSolverIndex"));
+                    int localIndex = localSolverIndex[solverIndex];
+                    spBound = initMassFractionIncom[localIndex];
+
+                    delete[] initMassFractionIncom;
+                }
+                else
+                {
+                    std::cout << " No initial value has assigned to the boundary " << std::endl;
+                }
+                if (re == 3908)
+                {
+                    int mm = 0;
+                }
+                phi[re] = RDouble(spBound);
+            }
+
+        }
+        else if (bcType == PHENGLEI::OUTFLOW)
+        {
+            for (std::size_t i = 0; i < faceIndex->size(); ++i)
+            {
+                const int iface = (*faceIndex)[i];
+                int le = leftCellOfFace[iface];
+                int re = rightCellOfFace[iface];
+                RDouble spBound = phi[le];
+
+                if (FaceFlux[iface] < 0.0)
+                {
+                    int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+                    if (bcData->IsExist("initMassFractionIncom", PHDOUBLE, numberOfSpeciesIncom))
+                    {
+                        RDouble* initMassFractionIncom = new RDouble[numberOfSpeciesIncom];
+                        bcData->GetData("initMassFractionIncom", initMassFractionIncom, PHDOUBLE, numberOfSpeciesIncom);
+
+                        int *localSolverIndex = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("localSolverIndex"));
+                        int localIndex = localSolverIndex[solverIndex];
+                        spBound = initMassFractionIncom[localIndex];
+
+                        delete[] initMassFractionIncom;
+                    }
+                }
+
+                phi[re] = spBound;
+            }
+        }
+        else if (bcType == PHENGLEI::PRESSURE_INLET)
+        {
+            for (std::size_t i = 0; i < faceIndex->size(); ++i)
+            {
+                RDouble spBound;
+
+                const int iface = (*faceIndex)[i];
+                int re = rightCellOfFace[iface];
+                int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+                if (bcData->IsExist("initMassFractionIncom", PHDOUBLE, numberOfSpeciesIncom))
+                {
+                    RDouble* initMassFractionIncom = new RDouble[numberOfSpeciesIncom];
+                    bcData->GetData("initMassFractionIncom", initMassFractionIncom, PHDOUBLE, numberOfSpeciesIncom);
+
+                    int *localSolverIndex = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("localSolverIndex"));
+                    int localIndex = localSolverIndex[solverIndex];
+                    spBound = initMassFractionIncom[localIndex];
+
+                    delete[] initMassFractionIncom;
+                }
+                else
+                {
+                    std::cout << " No initial value has assigned to the boundary " << std::endl;
+                }
+
+                phi[re] = spBound;
+            }
+
+        }
+        else if (bcType == PHENGLEI::PRESSURE_OUTLET)
+        {
+            for (std::size_t i = 0; i < faceIndex->size(); ++i)
+            {
+                const int iface = (*faceIndex)[i];
+                int le = leftCellOfFace[iface];
+                int re = rightCellOfFace[iface];
+
+                RDouble spBound = phi[le];
+
+                if (FaceFlux[iface] < 0.0)
+                {
+                    int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+                    if (bcData->IsExist("initMassFractionIncom", PHDOUBLE, numberOfSpeciesIncom))
+                    {
+                        RDouble* initMassFractionIncom = new RDouble[numberOfSpeciesIncom];
+                        bcData->GetData("initMassFractionIncom", initMassFractionIncom, PHDOUBLE, numberOfSpeciesIncom);
+
+                        int *localSolverIndex = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("localSolverIndex"));
+                        int localIndex = localSolverIndex[solverIndex];
+                        spBound = initMassFractionIncom[localIndex];
+
+                        delete[] initMassFractionIncom;
+                    }
+                }
+                phi[re] = spBound;
+            }
+        }
+        else
+        {
+            for (size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+            {
+                int iFacelocal = (*faceIndex)[iFace];
+                int le = leftCellOfFace[iFacelocal];
+                int re = rightCellOfFace[iFacelocal];
+                phi[re] = phi[le];
+            }
+        }
+    }
+
+    CommunicateAnInterfaceVar(phi);
+}
+
+void IncomSpeciesEqCalculator::UpdateAfterIterloop(Grid*  gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn); 
+    int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+    int *localSolverIndex = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("localSolverIndex"));
+    int solverIndex = GetSolverIndex();
+    if (localSolverIndex[solverIndex] != numberOfSpeciesIncom - 1)
+    {
+        return;
+    }
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    int* leftCellOfFace = grid->GetLeftCellOfFace();
+
+    RDouble* u = reinterpret_cast<RDouble*>(grid->GetDataPtr("U"));
+    RDouble* v = reinterpret_cast<RDouble*>(grid->GetDataPtr("V"));
+    RDouble* w = reinterpret_cast<RDouble*>(grid->GetDataPtr("W"));
+    RDouble* T = reinterpret_cast<RDouble*>(grid->GetDataPtr("T"));
+    RDouble* p = reinterpret_cast<RDouble*>(grid->GetDataPtr("P"));
+
+    RDouble* Rg = reinterpret_cast<RDouble*>(grid->GetDataPtr("Rg"));
+    RDouble* cp = reinterpret_cast<RDouble*>(grid->GetDataPtr("cp"));
+    RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+
+    RDouble *spSum = new RDouble[nTotalCell];
+    string *scalarNameList = GAS_SPACE::gas->GetGasName();
+    RDouble *sp = (RDouble *)grid->GetDataPtr(scalarNameList[0]);
+
+    SetField(spSum, 0.0, nTotalCell);
+    
+    int numOfSpecies = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+    for (int iSp = 0; iSp < numOfSpecies; ++iSp)
+    {
+        sp = (RDouble*)grid->GetDataPtr(scalarNameList[iSp]);
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            if (sp[iCell] < 0.0)
+            {
+                sp[iCell] = 0.0;
+            }
+    
+            spSum[iCell] += sp[iCell];
+        }
+    }
+    
+    for (int iSp = 0; iSp < numOfSpecies; iSp++)
+    {
+        sp = (RDouble*)grid->GetDataPtr(scalarNameList[iSp]);
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            sp[iCell] /= spSum[iCell];
+        }
+    }
+
+    UpdateSpBoundary(grid);
+
+    delete[] spSum;
+
+    for (int iSp = 0; iSp < numOfSpecies; iSp++)
+    {
+        sp = (RDouble*)grid->GetDataPtr(scalarNameList[iSp]);
+        CommunicateAnInterfaceVar(sp);
+    }
+}
+
+void IncomSpeciesEqCalculator::UpdateSpBoundary(Grid* gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int* rightCellOfFace = grid->GetRightCellOfFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int* leftCellOfFace = grid->GetLeftCellOfFace();
+    RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+
+    UnstructBCSet* unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+    string *scalarNameList = GAS_SPACE::gas->GetGasName();
+    int numOfSpecies = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+    for (int iSp = 0; iSp < numOfSpecies; ++iSp)
+    {
+        RDouble* phi = reinterpret_cast<RDouble*>(grid->GetDataPtr(scalarNameList[iSp]));
+        for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+        {
+            UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+            int bcType = bcRegion->GetBCType();
+            vector<int>* faceIndex = bcRegion->GetFaceIndex();
+            Data_Param* bcData = bcRegion->GetBCParamDataBase();
+
+            if (bcType == PHENGLEI::SOLID_SURFACE)
+            {
+                for (std::size_t i = 0; i < faceIndex->size(); ++i)
+                {
+                    const int iface = (*faceIndex)[i];
+                    int le = leftCellOfFace[iface];
+                    int re = rightCellOfFace[iface];
+                    RDouble spBound = phi[le];
+
+                    int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+                    if (bcData->IsExist("initMassFractionIncom", PHDOUBLE, numberOfSpeciesIncom))
+                    {
+                        RDouble* initMassFractionIncom = new RDouble[numberOfSpeciesIncom];
+                        bcData->GetData("initMassFractionIncom", initMassFractionIncom, PHDOUBLE, numberOfSpeciesIncom);
+                        spBound = initMassFractionIncom[iSp];
+                        delete[] initMassFractionIncom;
+                    }
+
+                    phi[re] = spBound;
+                }
+            }
+            else if (bcType == PHENGLEI::INFLOW)
+            {
+                for (std::size_t i = 0; i < faceIndex->size(); ++i)
+                {
+                    RDouble spBound;
+
+                    const int iface = (*faceIndex)[i];
+                    int re = rightCellOfFace[iface];
+                    int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+                    if (bcData->IsExist("initMassFractionIncom", PHDOUBLE, numberOfSpeciesIncom))
+                    {
+                        RDouble* initMassFractionIncom = new RDouble[numberOfSpeciesIncom];
+                        bcData->GetData("initMassFractionIncom", initMassFractionIncom, PHDOUBLE, numberOfSpeciesIncom);
+                        spBound = initMassFractionIncom[iSp];
+                        delete[] initMassFractionIncom;
+                    }
+                    else
+                    {
+                        std::cout << " No initial value has assigned to the boundary " << std::endl;
+                    }
+
+                    phi[re] = spBound;
+                }
+
+            }
+            else if (bcType == PHENGLEI::OUTFLOW)
+            {
+                for (std::size_t i = 0; i < faceIndex->size(); ++i)
+                {
+                    const int iface = (*faceIndex)[i];
+                    int le = leftCellOfFace[iface];
+                    int re = rightCellOfFace[iface];
+
+                    RDouble spBound = phi[le];
+                    if (FaceFlux[iface] < 0.0)
+                    {
+                        int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+                        if (bcData->IsExist("initMassFractionIncom", PHDOUBLE, numberOfSpeciesIncom))
+                        {
+                            RDouble* initMassFractionIncom = new RDouble[numberOfSpeciesIncom];
+                            bcData->GetData("initMassFractionIncom", initMassFractionIncom, PHDOUBLE, numberOfSpeciesIncom);
+                            spBound = initMassFractionIncom[iSp];
+                            delete[] initMassFractionIncom;
+                        }
+                    }
+                    phi[re] = spBound;
+                }
+            }
+            else if (bcType == PHENGLEI::PRESSURE_INLET)
+            {
+                for (std::size_t i = 0; i < faceIndex->size(); ++i)
+                {
+                    RDouble spBound;
+
+                    const int iface = (*faceIndex)[i];
+                    int re = rightCellOfFace[iface];
+
+                    int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+                    if (bcData->IsExist("initMassFractionIncom", PHDOUBLE, numberOfSpeciesIncom))
+                    {
+                        RDouble* initMassFractionIncom = new RDouble[numberOfSpeciesIncom];
+                        bcData->GetData("initMassFractionIncom", initMassFractionIncom, PHDOUBLE, numberOfSpeciesIncom);
+                        spBound = initMassFractionIncom[iSp];
+                        delete[] initMassFractionIncom;
+                    }
+                    else
+                    {
+                        std::cout << " No initial value has assigned to the boundary " << std::endl;
+                    }
+
+                    phi[re] = spBound;
+                }
+
+            }
+            else if (bcType == PHENGLEI::PRESSURE_OUTLET)
+            {
+                for (std::size_t i = 0; i < faceIndex->size(); ++i)
+                {
+                    const int iface = (*faceIndex)[i];
+                    int le = leftCellOfFace[iface];
+                    int re = rightCellOfFace[iface];
+                    RDouble spBound = phi[le];
+                    
+                    if (FaceFlux[iface] < 0.0)
+                    {
+                        int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+                        if (bcData->IsExist("initMassFractionIncom", PHDOUBLE, numberOfSpeciesIncom))
+                        {
+                            RDouble* initMassFractionIncom = new RDouble[numberOfSpeciesIncom];
+                            bcData->GetData("initMassFractionIncom", initMassFractionIncom, PHDOUBLE, numberOfSpeciesIncom);
+                            spBound = initMassFractionIncom[iSp];
+                            delete[] initMassFractionIncom;
+                        }
+                    }
+                    phi[re] = spBound;
+                }
+            }
+            else
+            {
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+                    phi[re] = phi[le];
+                }
+            }
+        }
+    }
+}
+
+void IncomSpeciesEqCalculator::UpdateProperties(Grid* gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+    int *localSolverIndex = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("localSolverIndex"));
+    int solverIndex = GetSolverIndex();
+    if (localSolverIndex[solverIndex] != numberOfSpeciesIncom - 1)
+    {
+        return;
+    }
+
+    int isStableUnsteadyMethod = GlobalDataBase::GetIntParaFromDB("isStableUnsteadyMethod");
+    if (isStableUnsteadyMethod)
+    {
+        return;
+    }
+
+    RDouble* Rg = reinterpret_cast<RDouble*>(grid->GetDataPtr("Rg"));
+    RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+    GAS_SPACE::gas->UpdateRg(grid, Rg);
+    GAS_SPACE::gas->UpdateRho(grid, rho);
+
+    CommunicateAnInterfaceVar(Rg);
+    CommunicateAnInterfaceVar(rho);
+
+}
+
+void IncomSpeciesEqCalculator::SetDiffusionCoeff(Grid* gridIn)
+{
+    UnstructGrid* grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int* leftCellOfFace = grid->GetLeftCellOfFace();
+    int* rightCellOfFace = grid->GetRightCellOfFace();
+    int *localSolverIndex = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("localSolverIndex"));
+    RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+    int solverIndex = GetSolverIndex();
+    GAS_SPACE::gas->UpdateMassDiff(grid, localSolverIndex[solverIndex], DiffusionCoeff[solverIndex]);
+    CommunicateAnInterfaceVar(DiffusionCoeff[solverIndex]);
+
+}
+
+
+}
\ No newline at end of file
diff --git a/CFD/IncomSolver/src/IncomUnstructSolver.cpp b/CFD/IncomSolver/src/IncomUnstructSolver.cpp
new file mode 100644
index 0000000..085d31a
--- /dev/null
+++ b/CFD/IncomSolver/src/IncomUnstructSolver.cpp
@@ -0,0 +1,2321 @@
+#pragma once
+#include"IncomUnstructSolver.h"
+#include"TK_Time.h"
+#include"unapCalculator.h"
+#include"yhamgCalculator.h"
+#include"Post_ForceMoment.h"
+#include"GradientOperation.h"
+#include "PHIO.h"
+
+
+namespace PHSPACE
+{
+    IncomUnstructSolver::IncomUnstructSolver()
+    {
+        FreeControlParameters();
+        controlParameters = new Param_INCompSolverUnstruct();
+
+        
+        int mathLibType = GlobalDataBase::GetIntParaFromDB("mathLibType");
+        if (mathLibType == HYPRELib)
+        {
+            AxEqualbCalculator = new hypreCalculator();
+        }
+        else if (mathLibType == UNAPLib)
+        {
+            AxEqualbCalculator = new unapCalculator();
+        }
+        else if (mathLibType == YHAMGLib)
+        {
+            AxEqualbCalculator = new yhamgCalculator();
+        }
+
+        momEqCalculator = new MomEqCalculator();
+
+        PPEquaCalculator = new PPEqCalculator();
+
+        RDouble *soluRelaxCoeff = reinterpret_cast <RDouble *> (GlobalDataBase::GetDataPtr("soluRelaxCoeff"));
+        RDouble MomEqRelaxCoeff = GlobalDataBase::GetDoubleParaFromDB("MomEqRelaxCoeff");
+        RDouble PPEqRelaxCoeff = GlobalDataBase::GetDoubleParaFromDB("PPEqRelaxCoeff");
+
+        soluRelaxCoeff[IDX::S_IU] = MomEqRelaxCoeff;
+        soluRelaxCoeff[IDX::S_IV] = MomEqRelaxCoeff;
+        soluRelaxCoeff[IDX::S_IW] = MomEqRelaxCoeff;
+        soluRelaxCoeff[IDX::S_IP] = PPEqRelaxCoeff;
+
+        int *localSolverIndex = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("localSolverIndex"));
+        localSolverIndex[IDX::S_IU] = 0;
+        localSolverIndex[IDX::S_IV] = 1;
+        localSolverIndex[IDX::S_IW] = 2;
+        localSolverIndex[IDX::S_IP] = 3;
+
+        int *solMethodOfLinEqSystem = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("solMethodOfLinEqSystem"));
+        int MomEqSolMethod = GlobalDataBase::GetIntParaFromDB("MomEqSolMethod");
+        int PPEqSolMethod = GlobalDataBase::GetIntParaFromDB("PPEqSolMethod");
+        solMethodOfLinEqSystem[IDX::S_IU] = MomEqSolMethod;
+        solMethodOfLinEqSystem[IDX::S_IV] = MomEqSolMethod;
+        solMethodOfLinEqSystem[IDX::S_IW] = MomEqSolMethod;
+        solMethodOfLinEqSystem[IDX::S_IP] = PPEqSolMethod;
+
+        int *precondMethodOfLinEqSystem = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("precondMethodOfLinEqSystem"));
+        int MomEqPrecondMethod = GlobalDataBase::GetIntParaFromDB("MomEqPrecondMethod");
+        int PPEqPrecondMethod = GlobalDataBase::GetIntParaFromDB("PPEqPrecondMethod");
+        precondMethodOfLinEqSystem[IDX::S_IU] = MomEqPrecondMethod;
+        precondMethodOfLinEqSystem[IDX::S_IV] = MomEqPrecondMethod;
+        precondMethodOfLinEqSystem[IDX::S_IW] = MomEqPrecondMethod;
+        precondMethodOfLinEqSystem[IDX::S_IP] = PPEqPrecondMethod;
+        
+        int *maxIterOfEachEq = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("maxIterOfEachEq"));
+        int MomEqMaxSweep = GlobalDataBase::GetIntParaFromDB("MomEqMaxSweep");
+        int PPEqMaxSweep = GlobalDataBase::GetIntParaFromDB("PPEqMaxSweep");
+        maxIterOfEachEq[IDX::S_IU] = MomEqMaxSweep;
+        maxIterOfEachEq[IDX::S_IV] = MomEqMaxSweep;
+        maxIterOfEachEq[IDX::S_IW] = MomEqMaxSweep;
+        maxIterOfEachEq[IDX::S_IP] = PPEqMaxSweep;
+
+        RDouble *iterTolOfEachEq = reinterpret_cast <RDouble *> (GlobalDataBase::GetDataPtr("iterTolOfEachEq"));
+        RDouble MomEqIterSolvTol = GlobalDataBase::GetDoubleParaFromDB("MomEqIterSolvTol");
+        RDouble PPEqIterSolvTol = GlobalDataBase::GetDoubleParaFromDB("PPEqIterSolvTol");
+        iterTolOfEachEq[IDX::S_IU] = MomEqIterSolvTol;
+        iterTolOfEachEq[IDX::S_IV] = MomEqIterSolvTol;
+        iterTolOfEachEq[IDX::S_IW] = MomEqIterSolvTol;
+        iterTolOfEachEq[IDX::S_IP] = PPEqIterSolvTol;
+
+        int isSolveTurb = GlobalDataBase::GetIntParaFromDB("isSolveTurb");
+        if (isSolveTurb == 1)
+        {
+            string TurbEqSolverName = GlobalDataBase::GetStrParaFromDB("TurbEqSolverName");
+            if (TurbEqSolverName == "KE")
+            {
+                RDouble TurbEqRelaxCoeff = GlobalDataBase::GetDoubleParaFromDB("TurbEqRelaxCoeff");
+                RDouble *soluRelaxCoeff = reinterpret_cast <RDouble *> (GlobalDataBase::GetDataPtr("soluRelaxCoeff"));
+                int *localSolverIndex = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("localSolverIndex"));
+
+
+                IncomTurbKSolver = new IncomKETurbKEqCalculator();
+                IncomTurbKSolver->SetSolverIndex(IDX::S_ITURBK);
+                soluRelaxCoeff[IDX::S_ITURBK] = TurbEqRelaxCoeff;
+                localSolverIndex[IDX::S_ITURBK] = 0;
+
+                int TurbEqSolMethod = GlobalDataBase::GetIntParaFromDB("TurbEqSolMethod");
+                solMethodOfLinEqSystem[IDX::S_ITURBK] = TurbEqSolMethod;
+                int TurbEqPrecondMethod = GlobalDataBase::GetIntParaFromDB("TurbEqPrecondMethod");
+                precondMethodOfLinEqSystem[IDX::S_ITURBK] = TurbEqPrecondMethod;
+                int TurbEqMaxSweep = GlobalDataBase::GetIntParaFromDB("TurbEqMaxSweep");
+                maxIterOfEachEq[IDX::S_ITURBK] = TurbEqMaxSweep;
+                RDouble TurbEqIterSolvTol = GlobalDataBase::GetDoubleParaFromDB("TurbEqIterSolvTol");
+                iterTolOfEachEq[IDX::S_ITURBK] = TurbEqIterSolvTol;
+
+                IncomTurbEplisionSolver = new IncomKETurbEpsilonEqCalculator();
+                IncomTurbEplisionSolver->SetSolverIndex(IDX::S_IEPSILON);
+                soluRelaxCoeff[IDX::S_IEPSILON] = TurbEqRelaxCoeff;
+                localSolverIndex[IDX::S_IEPSILON] = 1;
+                solMethodOfLinEqSystem[IDX::S_IEPSILON] = TurbEqSolMethod;
+                precondMethodOfLinEqSystem[IDX::S_IEPSILON] = TurbEqPrecondMethod;
+                maxIterOfEachEq[IDX::S_IEPSILON] = TurbEqMaxSweep;
+                iterTolOfEachEq[IDX::S_IEPSILON] = TurbEqIterSolvTol;
+            }
+            else if (TurbEqSolverName == "SA")
+            {
+                IncomTurbSASolver = new IncomSATurbKEqCalculator();
+                IncomTurbSASolver->SetSolverIndex(IDX::S_ISA);
+
+                RDouble TurbEqRelaxCoeff = GlobalDataBase::GetDoubleParaFromDB("TurbEqRelaxCoeff");
+                RDouble *soluRelaxCoeff = reinterpret_cast <RDouble *> (GlobalDataBase::GetDataPtr("soluRelaxCoeff"));
+                soluRelaxCoeff[IDX::S_ISA] = TurbEqRelaxCoeff;
+
+                int *localSolverIndex = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("localSolverIndex"));
+                localSolverIndex[IDX::S_ISA] = 0;
+
+                int TurbEqSolMethod = GlobalDataBase::GetIntParaFromDB("TurbEqSolMethod");
+                solMethodOfLinEqSystem[IDX::S_ISA] = TurbEqSolMethod;
+
+                int TurbEqPrecondMethod = GlobalDataBase::GetIntParaFromDB("TurbEqPrecondMethod");
+                precondMethodOfLinEqSystem[IDX::S_ISA] = TurbEqPrecondMethod;
+
+                int TurbEqMaxSweep = GlobalDataBase::GetIntParaFromDB("TurbEqMaxSweep");
+                maxIterOfEachEq[IDX::S_ISA] = TurbEqMaxSweep;
+
+                RDouble TurbEqIterSolvTol = GlobalDataBase::GetDoubleParaFromDB("TurbEqIterSolvTol");
+                iterTolOfEachEq[IDX::S_ISA] = TurbEqIterSolvTol;
+            }
+        }
+
+        int isSolveEnergy = GlobalDataBase::GetIntParaFromDB("isSolveEnergy");
+        if (isSolveEnergy == 1)
+        {
+            IncomEnergySolver = new IncomEnergyEqCalculator();
+            IncomEnergySolver->SetSolverIndex(IDX::S_ITEMP);
+            RDouble EnergyEqRelaxCoeff = GlobalDataBase::GetDoubleParaFromDB("EnergyEqRelaxCoeff");
+            RDouble *soluRelaxCoeff = reinterpret_cast <RDouble *> (GlobalDataBase::GetDataPtr("soluRelaxCoeff"));
+            soluRelaxCoeff[IDX::S_ITEMP] = EnergyEqRelaxCoeff;
+
+            int *localSolverIndex = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("localSolverIndex"));
+            localSolverIndex[IDX::S_ITEMP] = 0;
+
+            int EnergyEqSolMethod = GlobalDataBase::GetIntParaFromDB("EnergyEqSolMethod");
+            solMethodOfLinEqSystem[IDX::S_ITEMP] = EnergyEqSolMethod;
+
+            int EnergyEqPrecondMethod = GlobalDataBase::GetIntParaFromDB("EnergyEqPrecondMethod");
+            precondMethodOfLinEqSystem[IDX::S_ITEMP] = EnergyEqPrecondMethod;
+
+            int EnergyEqMaxSweep = GlobalDataBase::GetIntParaFromDB("EnergyEqMaxSweep");
+            maxIterOfEachEq[IDX::S_ITEMP] = EnergyEqMaxSweep;
+
+            RDouble EnergyEqIterSolvTol = GlobalDataBase::GetDoubleParaFromDB("EnergyEqIterSolvTol");
+            iterTolOfEachEq[IDX::S_ITEMP] = EnergyEqIterSolvTol;
+        }
+
+        int isSolveSpecies = GlobalDataBase::GetIntParaFromDB("isSolveSpecies");
+        if (isSolveSpecies == 1)
+        {
+
+            RDouble SpeciesEqRelaxCoeff = GlobalDataBase::GetDoubleParaFromDB("SpeciesEqRelaxCoeff");
+            RDouble *soluRelaxCoeff = reinterpret_cast <RDouble *> (GlobalDataBase::GetDataPtr("soluRelaxCoeff"));
+            int *localSolverIndex = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("localSolverIndex"));
+            int SpeciesEqSolMethod = GlobalDataBase::GetIntParaFromDB("SpeciesEqSolMethod");
+            int SpeciesEqPrecondMethod = GlobalDataBase::GetIntParaFromDB("SpeciesEqPrecondMethod");
+            int SpeciesEqMaxSweep = GlobalDataBase::GetIntParaFromDB("SpeciesEqMaxSweep");
+            RDouble SpeciesEqIterSolvTol = GlobalDataBase::GetDoubleParaFromDB("SpeciesEqIterSolvTol");
+
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            IncomSpeciesSolver = new IncomScalarEqCalculator * [numberOfSpeciesIncom];
+            string *gasNameList = new string[numberOfSpeciesIncom];
+            GlobalDataBase::GetData("speciesNameIncom", gasNameList, PHSTRING, numberOfSpeciesIncom);
+            for (int iGas = 0; iGas < numberOfSpeciesIncom; iGas++)
+            {
+                IncomSpeciesSolver[iGas] = new IncomSpeciesEqCalculator();
+
+                string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+                for (int iIndex = 0; iIndex < 50; iIndex++)
+                {
+                    if (varNameIncom[iIndex] == gasNameList[iGas])
+                    {
+                        IncomSpeciesSolver[iGas]->SetSolverIndex(iIndex);
+                        soluRelaxCoeff[iIndex] = SpeciesEqRelaxCoeff;
+                        localSolverIndex[iIndex] = iGas;
+                        
+                        solMethodOfLinEqSystem[iIndex] = SpeciesEqSolMethod;
+                        precondMethodOfLinEqSystem[iIndex] = SpeciesEqPrecondMethod;
+                        maxIterOfEachEq[iIndex] = SpeciesEqMaxSweep;
+                        iterTolOfEachEq[iIndex] = SpeciesEqIterSolvTol;
+                    }
+                }
+            }
+            delete[] gasNameList;
+        }
+
+    }
+
+    IncomUnstructSolver::~IncomUnstructSolver()
+    {
+
+    }
+
+    void IncomUnstructSolver::DumpResultFile(Grid *grid, int level)
+    {
+        int outnstep = PHSPACE::GlobalDataBase::GetIntParaFromDB("outnstep");
+        int intervalStepRes = GlobalDataBase::GetIntParaFromDB("intervalStepRes");
+        int intervalStepFlow = GlobalDataBase::GetIntParaFromDB("intervalStepFlow");
+        int intervalStepPlot = GlobalDataBase::GetIntParaFromDB("intervalStepPlot");
+        int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+
+        if (outnstep % intervalStepRes == 0)
+        {
+            DumpResidual(grid);
+        }
+
+        bool isSubIterationDump = true;
+        if (isUnsteady)
+        {
+            isSubIterationDump = GlobalDataBase::GetIntParaFromDB("isSubIterationDump");
+        }
+
+        if (outnstep % intervalStepFlow == 0 && level == 0 && isSubIterationDump)
+        {
+            //! To dump restart data for continual simulation.
+            ActionKey* actkeyDumpRestartData = new ActionKey();
+            FillActionKey(actkeyDumpRestartData, DUMP_RESTART, 0);
+            DumpRestartData(actkeyDumpRestartData);
+            delete actkeyDumpRestartData;
+        }
+
+        int intervalStepForce = GlobalDataBase::GetIntParaFromDB("intervalStepForce");
+        if (intervalStepForce > 0)
+        {
+            if (outnstep % intervalStepForce == 0 && isSubIterationDump || outnstep == 1)
+            {
+                if (level == 0)
+                {
+                    //! To dump airforce coefficient data.
+                    ActionKey* actkeyDumpAirForceCoef = new ActionKey();
+                    FillActionKey(actkeyDumpAirForceCoef, DUMP_AIR_FORCE_COEF, level);
+                    DumpAirForceCoef(actkeyDumpAirForceCoef);
+                    delete actkeyDumpAirForceCoef;
+
+                    //! To dump wall airforce coefficient data.
+                    ActionKey* actkeyDumpWallAircoef = new ActionKey();
+                    FillActionKey(actkeyDumpWallAircoef, DUMP_CP_DISTRI, 0);
+                    //DumpCpDistri(actkeyDumpWallAircoef);
+                    delete actkeyDumpWallAircoef;
+                }
+            }
+        }
+    }
+
+    void IncomUnstructSolver::AirForceCoef(ActionKey* actkey)
+    {
+        const int ALL_PART = -1;
+        AirForceCoefParts(actkey, ALL_PART);
+
+        int Coordinate = LocalCoordinate;
+        uint_t nTBC = GlobalBoundaryCondition::GetNumberOfBC();
+        for (int iPart = 0; iPart < nTBC; ++iPart)
+        {
+            if (!GlobalBoundaryCondition::IsSolidWallBC(iPart)) continue;
+
+            //! Compute local part force.
+            AirForceCoefParts(actkey, iPart, Coordinate);
+
+            //! Compute global part force.
+            AirForceCoefParts(actkey, iPart);
+        }
+    }
+
+    void IncomUnstructSolver::AirForceCoefParts(ActionKey *actkey, int partID, int Coordinate)
+    {
+        int level = actkey->level;
+
+        using namespace PHMPI;
+        //fstream file;
+
+        UnstructGrid * grid = UnstructGridCast(GetGrid(level));
+
+        const int ALL_PART = -1;
+        SimpleBC * boundaryCondition = NULL;
+        string partBCName = "";
+        RDouble TorqueRefX = 0.0, TorqueRefY = 0.0, TorqueRefZ = 0.0;
+
+        //! Used to compute hinge moment:
+        int dumpHingeMoment = 0;
+        RDouble localCoordAxis0[3];
+        RDouble localCoordAxis1[3];
+        RDouble hingeMoment = 0.0;
+
+        if(partID == ALL_PART)
+        {
+            TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+            TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+            TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+        }
+        else if ((partID != ALL_PART) && (Coordinate == GlobalCoordinate))
+        {
+            boundaryCondition = GlobalBoundaryCondition::GetBC(partID);
+            partBCName = boundaryCondition->GetBCName();
+
+            TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+            TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+            TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+        }
+        else if ((partID != ALL_PART) && (Coordinate == LocalCoordinate))
+        {
+            boundaryCondition = GlobalBoundaryCondition::GetBC(partID);
+            partBCName = boundaryCondition->GetBCName();
+
+            boundaryCondition->GetParamData("TorqueRefX", &TorqueRefX, PHDOUBLE, 1);
+            boundaryCondition->GetParamData("TorqueRefY", &TorqueRefY, PHDOUBLE, 1);
+            boundaryCondition->GetParamData("TorqueRefZ", &TorqueRefZ, PHDOUBLE, 1);
+
+
+            boundaryCondition->GetParamData("dumpHingeMoment", &dumpHingeMoment, PHINT, 1);
+            boundaryCondition->GetParamData("localCoordAxis0", localCoordAxis0, PHDOUBLE, 3);
+            boundaryCondition->GetParamData("localCoordAxis1", localCoordAxis1, PHDOUBLE, 3);
+        }
+
+        using namespace IDX;
+
+        RDouble *xfn  = grid->GetFaceNormalX();
+        RDouble *yfn  = grid->GetFaceNormalY();
+        RDouble *zfn  = grid->GetFaceNormalZ();
+        RDouble *area = grid->GetFaceArea() ;
+
+        RDouble *xfc = grid->GetFaceCenterX();
+        RDouble *yfc = grid->GetFaceCenterY();
+        RDouble *zfc = grid->GetFaceCenterZ();
+        RDouble *xcc = grid->GetCellCenterX();
+        RDouble *ycc = grid->GetCellCenterY();
+        RDouble *zcc = grid->GetCellCenterZ();
+
+        int * leftCellofFace = grid->GetLeftCellOfFace();
+        int * rightCellofFace = grid->GetRightCellOfFace();
+
+        RDouble* u = reinterpret_cast<RDouble*>(grid->GetDataPtr("U"));
+        RDouble* v = reinterpret_cast<RDouble*>(grid->GetDataPtr("V"));
+        RDouble* w = reinterpret_cast<RDouble*>(grid->GetDataPtr("W"));
+        RDouble* p = reinterpret_cast<RDouble*>(grid->GetDataPtr("P"));
+
+        RDouble *dUdx  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdx"));
+        RDouble *dUdy  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdy"));
+        RDouble *dUdz  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdz"));
+        RDouble *dVdx  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdx"));
+        RDouble *dVdy  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdy"));
+        RDouble *dVdz  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdz"));
+        RDouble *dWdx  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdx"));
+        RDouble *dWdy  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdy"));
+        RDouble *dWdz  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdz"));
+        RDouble poo = GlobalDataBase::GetDoubleParaFromDB("initP");
+        RDouble *visl = reinterpret_cast< RDouble * > (grid->GetDataPtr("mu"));
+
+        RDouble initRho = GlobalDataBase::GetDoubleParaFromDB("initRho");
+        RDouble initU = GlobalDataBase::GetDoubleParaFromDB("initU");
+        RDouble initV = GlobalDataBase::GetDoubleParaFromDB("initV");
+        RDouble initW = GlobalDataBase::GetDoubleParaFromDB("initW");
+        RDouble refVelocity = sqrt(initU * initU + initV * initV + initW * initW);
+        if (refVelocity < 1.0e-10) refVelocity = 1.0e-10;
+
+        RDouble refDynamicPressure = initRho * refVelocity * refVelocity;
+
+        RDouble cpx,cpy,cpz;
+        cpx = 0.0;
+        cpy = 0.0;
+        cpz = 0.0;
+
+        RDouble CA_f = 0.0;
+        RDouble CA_p = 0.0;
+        RDouble CN_f = 0.0;
+        RDouble CN_p = 0.0;
+        RDouble CZ_f = 0.0;
+        RDouble CZ_p = 0.0;
+        RDouble Cl_f = 0.0;
+        RDouble Cl_p = 0.0;
+        RDouble Cn_f = 0.0;
+        RDouble Cn_p = 0.0;
+        RDouble Cm_f = 0.0;
+        RDouble Cm_p = 0.0;
+
+        RDouble pw,cp;
+        RDouble dfx,dfy,dfz,dpx,dpy,dpz,fvsx,fvsy,fvsz;
+        RDouble nx,ny,nz;
+        RDouble vis,txx,txy,txz,tyx,tyy,tyz,tzx,tzy,tzz;
+        RDouble dudx,dudy,dudz,dvdx,dvdy,dvdz,dwdx,dwdy,dwdz;
+        RDouble xc,yc,zc,dx,dy,dz,ods;
+
+        using namespace IDX;
+
+        // get the bcRegion information of unstruct grid.
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int nBCRegion = unstructBCSet->GetnBCRegion();
+
+        // cycle all bcregions and find the solid surface type of boundary.
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+            int bcType = bcRegion->GetBCType();
+            string bcName = bcRegion->GetBCName();
+
+            // if the bc type is wall, calculate the wall coefficient.
+            if(bcType == PHENGLEI::SOLID_SURFACE)
+            {
+                if (partID != ALL_PART && bcName != partBCName)
+                {
+                    continue;
+                }
+                vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                int iFace, le, re;
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    iFace = *iter;
+                    le = leftCellofFace [ iFace ];
+                    re = rightCellofFace[ iFace ];
+
+                    nx  = xfn[iFace] * area[iFace];
+                    ny  = yfn[iFace] * area[iFace];
+                    nz  = zfn[iFace] * area[iFace];
+
+                    dx  = xfc[iFace] - xcc[le];
+                    dy  = yfc[iFace] - ycc[le];
+                    dz  = zfc[iFace] - zcc[le];
+
+                    //pressure drag
+                    pw = p[le];
+                    cp    = two * (pw - poo);
+
+                    dpx = nx * cp;
+                    dpy = ny * cp;
+                    dpz = nz * cp;
+
+                    CA_p += dpx;
+                    CN_p += dpy;
+                    CZ_p += dpz;
+
+                    dfx = dpx;
+                    dfy = dpy;
+                    dfz = dpz;
+
+                    xc = xfc[iFace];
+                    yc = yfc[iFace];
+                    zc = zfc[iFace];
+
+                    {
+                        dudx = dUdx[le];
+                        dudy = dUdy[le];
+                        dudz = dUdz[le];
+
+                        dvdx = dVdx[le];
+                        dvdy = dVdy[le];
+                        dvdz = dVdz[le];
+
+                        dwdx = dWdx[le];
+                        dwdy = dWdy[le];
+                        dwdz = dWdz[le];
+
+                        //! Gradient correction.
+                        dx  = xcc[re] - xcc[le];
+                        dy  = ycc[re] - ycc[le];
+                        dz  = zcc[re] - zcc[le];
+                        ods = 1.0 / sqrt(dx * dx + dy * dy + dz * dz);
+                        dx  = dx * ods;
+                        dy  = dy * ods;
+                        dz  = dz * ods;
+
+                        CorrectGradient(u[le], u[re],dudx,dudy,dudz,dx,dy,dz,ods);
+                        CorrectGradient(v[le], v[re],dvdx,dvdy,dvdz,dx,dy,dz,ods);
+                        CorrectGradient(w[le], w[re],dwdx,dwdy,dwdz,dx,dy,dz,ods);
+
+                        //! It is unnecessary to consider because the turbulence viscosity coefficient is 0.
+                        vis = visl[le];
+
+                        const RDouble c23 = 2.0 / 3.0;
+                        txx = vis * c23 * (2.0 * dudx - dvdy - dwdz);
+                        tyy = vis * c23 * (2.0 * dvdy - dwdz - dudx);
+                        tzz = vis * c23 * (2.0 * dwdz - dudx - dvdy);
+                        txy = vis * (dudy + dvdx);
+                        txz = vis * (dudz + dwdx);
+                        tyz = vis * (dvdz + dwdy);
+                        tyx = txy;
+                        tzx = txz;
+                        tzy = tyz;
+
+                        fvsx = - two * (nx * txx + ny * tyx + nz * tzx);
+                        fvsy = - two * (nx * txy + ny * tyy + nz * tzy);
+                        fvsz = - two * (nx * txz + ny * tyz + nz * tzz);
+
+                        CA_f += fvsx;
+                        CN_f += fvsy;
+                        CZ_f += fvsz;
+
+                        dfx += fvsx;
+                        dfy += fvsy;
+                        dfz += fvsz;
+
+                        Cl_f += (yc - TorqueRefY) * fvsz - (zc - TorqueRefZ) * fvsy;
+                        Cn_f += (zc - TorqueRefZ) * fvsx - (xc - TorqueRefX) * fvsz;
+                        Cm_f += (xc - TorqueRefX) * fvsy - (yc - TorqueRefY) * fvsx;
+                    }
+
+                    Cl_p += (yc - TorqueRefY) * dpz - (zc - TorqueRefZ) * dpy;
+                    Cn_p += (zc - TorqueRefZ) * dpx - (xc - TorqueRefX) * dpz;
+                    Cm_p += (xc - TorqueRefX) * dpy - (yc - TorqueRefY) * dpx;
+
+                    cpx += dpx;
+                    cpy += dpy;
+                    cpz += dpz;
+
+                    if(dumpHingeMoment)
+                    {
+                        Post_ForceMoment forceMoment;
+                        RDouble point[3] = {xfc[iFace], yfc[iFace], zfc[iFace]};
+                        RDouble faceForce[3] = {dfx, dfy, dfz};
+                        hingeMoment += forceMoment.ComputeMoment(point, localCoordAxis0, localCoordAxis1, faceForce);
+                    }
+                }
+            }
+        }
+
+        CA_f   /= refDynamicPressure;
+        CA_p   /= refDynamicPressure;
+        CN_f   /= refDynamicPressure;
+        CN_p   /= refDynamicPressure;
+        CZ_f   /= refDynamicPressure;
+        CZ_p   /= refDynamicPressure;
+        cpx    /= refDynamicPressure;
+        cpy    /= refDynamicPressure;
+        cpz    /= refDynamicPressure;
+        Cl_f   /= refDynamicPressure;
+        Cl_p   /= refDynamicPressure;
+        Cn_f   /= refDynamicPressure;
+        Cn_p   /= refDynamicPressure;
+        Cm_f   /= refDynamicPressure;
+        Cm_p   /= refDynamicPressure;
+
+        DataContainer *cdata = actkey->GetData();
+
+        cdata->write(&CA_f,sizeof(RDouble));
+        cdata->write(&CA_p,sizeof(RDouble));
+        cdata->write(&CN_f,sizeof(RDouble));
+        cdata->write(&CN_p,sizeof(RDouble));
+        cdata->write(&CZ_f,sizeof(RDouble));
+        cdata->write(&CZ_p,sizeof(RDouble));
+
+        cdata->write(&cpx,sizeof(RDouble));
+        cdata->write(&cpy,sizeof(RDouble));
+        cdata->write(&cpz,sizeof(RDouble));
+
+        cdata->write(&Cl_f,sizeof(RDouble));
+        cdata->write(&Cl_p,sizeof(RDouble));
+        cdata->write(&Cn_f,sizeof(RDouble));
+        cdata->write(&Cn_p,sizeof(RDouble));
+        cdata->write(&Cm_f,sizeof(RDouble));
+        cdata->write(&Cm_p,sizeof(RDouble));
+
+        cdata->write(&hingeMoment, sizeof(RDouble));
+    }
+
+    void IncomUnstructSolver::InitFlowAsReadingRestart(ActionKey *actkey)
+    {
+        InitFlowAsRestart();
+        actkey->filename = GetRestartFileName();
+        if (actkey->filename == "")
+        {
+            return;
+        }
+
+        if(PHMPI::IsParallelRun())
+        {
+            actkey->filename = PHSPACE::AddSymbolToFileName(actkey->filename, "_", 0);
+        }
+
+        hid_t file;
+        file = OpenHDF5File(actkey->filename);
+        actkey->filepos = file;
+
+        ReadRestartH5(actkey);
+
+        H5Fclose(file);
+        actkey->filepos = 0;
+    }
+
+    void IncomUnstructSolver::ReadRestartH5(ActionKey *actkey)
+    {
+        Grid *grid = GetGrid(actkey->level);
+        int gridID = grid->GetZoneID();
+
+        int outnstep = 0;
+        ReadData(actkey->filepos, &outnstep, "outnstep");
+        GlobalDataBase::UpdateData("outnstep", &outnstep, PHINT, 1);
+
+        RDouble* u = reinterpret_cast<RDouble*>(grid->GetDataPtr("U"));
+        RDouble* v = reinterpret_cast<RDouble*>(grid->GetDataPtr("V"));
+        RDouble* w = reinterpret_cast<RDouble*>(grid->GetDataPtr("W"));
+        RDouble* p = reinterpret_cast<RDouble*>(grid->GetDataPtr("P"));
+        RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotalCell = grid->GetNTotalCell();
+        int nTotal = nTotalCell + nBoundFace;
+
+        hid_t grploc;
+        string grpName;
+
+        ostringstream oss;
+        oss<<"Group"<<gridID;
+        grpName = oss.str();
+
+        grploc = OpenGroup(actkey->filepos, grpName);
+
+        int nTotalCellRestart = 0;
+        ReadData(grploc, &nTotalCellRestart, "nTotalCell");
+
+        if(nTotalCellRestart != nTotalCell)
+        {
+            ostringstream erroeInfo;
+            erroeInfo << " Error: the cell number in flow.dat is not equal to the cell number in grid file !" << endl;
+            TK_Exit::ExceptionExit(erroeInfo.str());
+        }
+
+        ReadData(grploc, u, "U");
+        ReadData(grploc, v, "V");
+        ReadData(grploc, w, "W");
+        ReadData(grploc, p, "P");
+        ReadData(grploc, rho, "rho");
+        string flowSolverName = GlobalDataBase::GetStrParaFromDB("flowSolverName");
+        if (flowSolverName == "CompressibleSIMPLE")
+        {
+            RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+            ReadData(grploc, cRho, "cRho");
+        }
+
+        int isSolveTurb = GlobalDataBase::GetIntParaFromDB("isSolveTurb");
+        if (isSolveTurb == 1)
+        {
+            RDouble *k = reinterpret_cast<RDouble *> (grid->GetDataPtr("Kinetic"));
+            RDouble *e = reinterpret_cast<RDouble *> (grid->GetDataPtr("Epsilon"));
+
+            string TurbEqSolverName = GlobalDataBase::GetStrParaFromDB("TurbEqSolverName");
+            if (TurbEqSolverName == "KE")
+            {
+                ReadData(grploc, k, "Kinetic");
+                ReadData(grploc, e, "Epsilon");
+            }
+            else if (TurbEqSolverName == "SA")
+            {
+                ReadData(grploc, k, "Kinetic");
+            }
+        }
+
+        int isSolveEnergy = GlobalDataBase::GetIntParaFromDB("isSolveEnergy");
+        if (isSolveEnergy == 1)
+        {
+            RDouble *T = reinterpret_cast<RDouble*> (grid->GetDataPtr("T"));
+            ReadData(grploc, T, "T");
+        }
+
+        int isSolveSpecies = GlobalDataBase::GetIntParaFromDB("isSolveSpecies");
+        if (isSolveSpecies == 1)
+        {
+            string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            for (int iGas = 0; iGas < numberOfSpeciesIncom; iGas++)
+            {
+                IncomSpeciesEqCalculator* SpeciesSolver = static_cast<IncomSpeciesEqCalculator *>(IncomSpeciesSolver[iGas]);
+                int solverIndex = SpeciesSolver->GetSolverIndex();
+                string varName = varNameIncom[solverIndex];
+                RDouble *q = reinterpret_cast<RDouble*> (grid->GetDataPtr(varName));
+                ReadData(grploc, q, varName);
+            }
+        }
+
+        H5Gclose(grploc);
+    }
+
+    void IncomUnstructSolver::DumpRestartH5(ActionKey *actkey)
+    {
+        using namespace PHMPI;
+        int currentProcessorID = GetCurrentProcessorID();
+        int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+        int version = 1;
+        if (currentProcessorID == GetServerProcessorID())
+        {
+            WriteData(actkey->filepos, &version, "Version");
+            WriteData(actkey->filepos, &outnstep, "outnstep");
+        }
+
+        Grid *grid = GetGrid(actkey->level);
+        int gridID = grid->GetZoneID();
+
+        int nEquation = GetNumberOfEquations();
+
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotalCell = grid->GetNTotalCell();
+        int nTotal = nTotalCell + nBoundFace;
+
+        RDouble* u = reinterpret_cast<RDouble*>(grid->GetDataPtr("U"));
+        RDouble* v = reinterpret_cast<RDouble*>(grid->GetDataPtr("V"));
+        RDouble* w = reinterpret_cast<RDouble*>(grid->GetDataPtr("W"));
+        RDouble* p = reinterpret_cast<RDouble*>(grid->GetDataPtr("P"));
+        RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+
+        hid_t grploc;
+        string grpName;
+
+        ostringstream oss;
+        oss<<"Group"<<gridID;
+        grpName = oss.str();
+
+        grploc = OpenGroup(actkey->filepos, grpName);
+
+        WriteData(grploc, u, "U");
+        WriteData(grploc, v, "V");
+        WriteData(grploc, w, "W");
+        WriteData(grploc, p, "P");
+        WriteData(grploc, rho, "rho");
+
+        string flowSolverName = GlobalDataBase::GetStrParaFromDB("flowSolverName");
+        if (flowSolverName == "CompressibleSIMPLE")
+        {
+            RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+            WriteData(grploc, cRho, "cRho");
+        }
+
+        int isSolveTurb = GlobalDataBase::GetIntParaFromDB("isSolveTurb");
+        if (isSolveTurb == 1)
+        {
+            RDouble *k = reinterpret_cast<RDouble *> (grid->GetDataPtr("Kinetic"));
+            RDouble *e = reinterpret_cast<RDouble *> (grid->GetDataPtr("Epsilon"));
+
+            string TurbEqSolverName = GlobalDataBase::GetStrParaFromDB("TurbEqSolverName");
+            if (TurbEqSolverName == "KE")
+            {
+                WriteData(grploc, k, "Kinetic");
+                WriteData(grploc, e, "Epsilon");
+            }
+            else if (TurbEqSolverName == "SA")
+            {
+                WriteData(grploc, k, "Kinetic");
+            }
+        }
+
+        int isSolveEnergy = GlobalDataBase::GetIntParaFromDB("isSolveEnergy");
+        if (isSolveEnergy == 1)
+        {
+            RDouble *T = reinterpret_cast<RDouble*> (grid->GetDataPtr("T"));
+            WriteData(grploc, T, "T");
+        }
+
+        int isSolveSpecies = GlobalDataBase::GetIntParaFromDB("isSolveSpecies");
+        if (isSolveSpecies == 1)
+        {
+            string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            for (int iGas = 0; iGas < numberOfSpeciesIncom; iGas++)
+            {
+                IncomSpeciesEqCalculator* SpeciesSolver = static_cast<IncomSpeciesEqCalculator *>(IncomSpeciesSolver[iGas]);
+                int solverIndex = SpeciesSolver->GetSolverIndex();
+                string varName = varNameIncom[solverIndex];
+                RDouble *q = reinterpret_cast<RDouble*> (grid->GetDataPtr(varName));
+                WriteData(grploc, q, varName);
+            }
+        }
+
+        WriteData(grploc, &nTotalCell, "nTotalCell");
+
+        H5Gclose(grploc);
+
+    }
+
+    void IncomUnstructSolver::CreateH5RestartFile(ActionKey *actkey)
+    {
+        using namespace PHMPI;
+        int nZones = GetNumberofGlobalZones();
+        int currentProcessorID = GetCurrentProcessorID();
+        int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            ostringstream oss;
+            oss<<"Group"<<iZone;
+
+            string grpName;
+
+            grpName = oss.str();
+            CreateGroup(actkey->filepos, grpName);
+
+            int length = 0;
+            int faceLength = 0;
+            int nWallBC = 0, nCurMaxCellNum = 0;
+            int sendProcessID = GetZoneProcessorID(iZone);
+            if (currentProcessorID == sendProcessID)
+            {
+                int gridTypeofLocalZone = GetZoneGridType(iZone);
+                Grid *grid = PHSPACE::GetGrid(iZone, actkey->level);
+                int nBoundFace = grid->GetNBoundFace();
+                int nTotalCell = grid->GetNTotalCell();
+                faceLength = grid->GetNTotalFace();
+                length = nBoundFace + nTotalCell;
+            }
+
+            int getherLength;
+            MPI_Allreduce(&length, &getherLength, 1, MPI_INT, MPI_SUM, MPI_COMM_WORLD);
+
+            int getherFaceLength;
+            MPI_Allreduce(&faceLength, &getherFaceLength, 1, MPI_INT, MPI_SUM, MPI_COMM_WORLD);
+
+            hid_t  grpData;
+            grpData = OpenGroup(actkey->filepos, grpName);
+
+            CreateEmptyData(grpData, "U", 1, getherLength, PHDOUBLE);
+            CreateEmptyData(grpData, "V", 1, getherLength, PHDOUBLE);
+            CreateEmptyData(grpData, "W", 1, getherLength, PHDOUBLE);
+            CreateEmptyData(grpData, "P", 1, getherLength, PHDOUBLE);
+            CreateEmptyData(grpData, "rho", 1, getherLength, PHDOUBLE);
+
+            string flowSolverName = GlobalDataBase::GetStrParaFromDB("flowSolverName");
+            if (flowSolverName == "CompressibleSIMPLE")
+            {
+                CreateEmptyData(grpData, "cRho", 1, getherLength, PHDOUBLE);
+            }
+
+            int isSolveTurb = GlobalDataBase::GetIntParaFromDB("isSolveTurb");
+            if (isSolveTurb == 1)
+            {
+                string TurbEqSolverName = GlobalDataBase::GetStrParaFromDB("TurbEqSolverName");
+                if (TurbEqSolverName == "KE")
+                {
+                    CreateEmptyData(grpData, "Kinetic", 1, getherLength, PHDOUBLE);
+                    CreateEmptyData(grpData, "Epsilon", 1, getherLength, PHDOUBLE);
+                }
+                else if (TurbEqSolverName == "SA")
+                {
+                    CreateEmptyData(grpData, "Kinetic", 1, getherLength, PHDOUBLE);
+                }
+            }
+
+            int isSolveEnergy = GlobalDataBase::GetIntParaFromDB("isSolveEnergy");
+            if (isSolveEnergy == 1)
+            {
+                CreateEmptyData(grpData, "T", 1, getherLength, PHDOUBLE);
+            }
+
+            int isSolveSpecies = GlobalDataBase::GetIntParaFromDB("isSolveSpecies");
+            if (isSolveSpecies == 1)
+            {
+                string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+                int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+                for (int iGas = 0; iGas < numberOfSpeciesIncom; iGas++)
+                {
+                    IncomSpeciesEqCalculator* SpeciesSolver = static_cast<IncomSpeciesEqCalculator *>(IncomSpeciesSolver[iGas]);
+                    int solverIndex = SpeciesSolver->GetSolverIndex();
+                    string varName = varNameIncom[solverIndex];
+                    CreateEmptyData(grpData, varName, 1, getherLength, PHDOUBLE);
+                }
+            }
+
+            CreateEmptyData(grpData, "nTotalCell", 1, 1, PHINT);
+
+            H5Gclose(grpData);
+        }
+
+        CreateEmptyData(actkey->filepos, "Version", 1, 1, PHINT);
+        CreateEmptyData(actkey->filepos, "outnstep", 1, 1, PHINT);
+    }
+
+    void IncomUnstructSolver::CpDistriCoef(ActionKey *actkey)
+    {
+        int level = actkey->level;
+        DataContainer *cdata = actkey->GetData();
+        cdata->moveto_begin();
+
+        UnstructGrid *grid = UnstructGridCast(GetGrid(level));
+        int GridID = grid->GetGridID()->GetIndex();
+        PHWrite(cdata, GridID);
+
+        using namespace PHMPI;
+        using namespace PHENGLEI;
+        using namespace IDX;
+
+        RDouble* u = reinterpret_cast<RDouble*>(grid->GetDataPtr("U"));
+        RDouble* v = reinterpret_cast<RDouble*>(grid->GetDataPtr("V"));
+        RDouble* w = reinterpret_cast<RDouble*>(grid->GetDataPtr("W"));
+        RDouble* p = reinterpret_cast<RDouble*>(grid->GetDataPtr("P"));
+        RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+
+        RDouble *dUdx  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdx"));
+        RDouble *dUdy  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdy"));
+        RDouble *dUdz  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdz"));
+        RDouble *dVdx  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdx"));
+        RDouble *dVdy  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdy"));
+        RDouble *dVdz  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdz"));
+        RDouble *dWdx  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdx"));
+        RDouble *dWdy  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdy"));
+        RDouble *dWdz  = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdz"));
+
+        RDouble refDimensionalDensity = GlobalDataBase::GetDoubleParaFromDB("initRho");
+        RDouble initU = GlobalDataBase::GetDoubleParaFromDB("initU");
+        RDouble initV = GlobalDataBase::GetDoubleParaFromDB("initV");
+        RDouble initW = GlobalDataBase::GetDoubleParaFromDB("initW");
+        RDouble refVelocity = sqrt(initU * initU + initV * initV + initW * initW );
+        RDouble attack= atan(initV/initU);
+        RDouble *visl = reinterpret_cast< RDouble * > (grid->GetDataPtr("mu"));
+        RDouble poo = GlobalDataBase::GetDoubleParaFromDB("initP");
+
+        RDouble TorqueRefX, TorqueRefY, TorqueRefZ;
+        TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+        TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+        TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+
+        RDouble *x = grid->GetX();
+        RDouble *y = grid->GetY();
+        RDouble *z = grid->GetZ();
+
+        RDouble *xfn  = grid->GetFaceNormalX();
+        RDouble *yfn  = grid->GetFaceNormalY();
+        RDouble *zfn  = grid->GetFaceNormalZ();
+        RDouble *area = grid->GetFaceArea() ;
+
+        RDouble *xfc = grid->GetFaceCenterX();
+        RDouble *yfc = grid->GetFaceCenterY();
+        RDouble *zfc = grid->GetFaceCenterZ();
+        RDouble *xcc = grid->GetCellCenterX();
+        RDouble *ycc = grid->GetCellCenterY();
+        RDouble *zcc = grid->GetCellCenterZ();
+
+        int *leftCellofFace  = grid->GetLeftCellOfFace();
+        int *rightCellofFace = grid->GetRightCellOfFace();
+        int *node_number_of_each_face  = grid->GetNodeNumberOfEachFace();
+        long long int *nodePosi  = grid->GetFace2NodeSubscript();
+        int *face2node = grid->GetFace2Node();
+
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int nBCRegion = unstructBCSet->GetnBCRegion();
+
+        int nTotalCell = grid->GetNTotalCell();
+        int nTotalNode = grid->GetNTotalNode();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotal = nTotalCell + nBoundFace;
+
+        RDouble cfx, cfy, cfz, cpx, cpy, cpz, cmx, cmy, cmz;
+        cfx = 0.0;
+        cfy = 0.0;
+        cfz = 0.0;
+        cpx = 0.0;
+        cpy = 0.0;
+        cpz = 0.0;
+        cmx = 0.0;
+        cmy = 0.0;
+        cmz = 0.0;
+
+
+        RDouble sina = 0, cosa = 0;
+        sina = sin(attack);
+        cosa = cos(attack);
+
+
+        RDouble pw = 0, cp = 0, pw_Dim = 0;
+        RDouble dfx = 0, dfy = 0, dfz = 0, dpx = 0, dpy = 0, dpz = 0, dmx = 0, dmy = 0, dmz = 0, fvsx = 0, fvsy = 0, fvsz = 0;
+        RDouble nx = 0, ny = 0, nz = 0;
+        RDouble normalComponetX = 0, normalComponetY = 0, normalComponetZ = 0;
+        RDouble vis = 0, txx = 0, txy = 0, txz = 0, tyx = 0, tyy = 0, tyz = 0, tzx = 0, tzy = 0, tzz = 0;
+        RDouble dudx = 0, dudy = 0, dudz = 0, dvdx = 0, dvdy = 0, dvdz = 0, dwdx = 0, dwdy = 0, dwdz = 0;
+        RDouble xc = 0, yc = 0, zc = 0, dx = 0, dy = 0, dz = 0, ods = 0;
+
+        RDouble *wallDistance = grid->GetWallDist();
+
+        RDouble *faceCP    = new RDouble[nBoundFace]();
+        RDouble *faceCF    = new RDouble[nBoundFace]();
+        RDouble *faceQ     = new RDouble[nBoundFace]();
+        RDouble *faceYPlus = new RDouble[nBoundFace]();
+        RDouble *facePW    = new RDouble[nBoundFace]();
+
+        //! Compute cp and cf on wall face.
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+            int bcType = bcRegion->GetBCType();
+            if (IsWall(bcType))
+            {
+                vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    // iFace is the face number in the set of faceIndex.
+                    int iFace = *iter;
+                    int le = leftCellofFace[iFace];
+                    int re = rightCellofFace[iFace];
+
+                    normalComponetX = xfn[iFace];
+                    normalComponetY = yfn[iFace];
+                    normalComponetZ = zfn[iFace];
+
+                    nx  = normalComponetX * area[iFace];
+                    ny  = normalComponetY * area[iFace];
+                    nz  = normalComponetZ * area[iFace];
+
+                    //! Pressure drag.
+                    dx  = xfc[iFace] - xcc[le];
+                    dy  = yfc[iFace] - ycc[le];
+                    dz  = zfc[iFace] - zcc[le];
+                    pw = p[le];
+                    cp = two * (pw - poo);
+
+                    //! Change the nondimensional pressure into dimensional pressure(Pa).
+                    pw_Dim = pw * refDimensionalDensity * pow(refVelocity, 2);
+
+                    //! Note that the definition of cp is right here and now, but dpx and dfx have multiplied by area.
+                    dpx = nx * cp;
+                    dpy = ny * cp;
+                    dpz = nz * cp;
+
+                    dfx = dpx;
+                    dfy = dpy;
+                    dfz = dpz;
+
+                    fvsx = 0.0;
+                    fvsy = 0.0;
+                    fvsz = 0.0;
+
+                    //if (viscousType > INVISCID)
+                    {
+                        dudx = dUdx[le];
+                        dudy = dUdy[le];
+                        dudz = dUdz[le];
+
+                        dvdx = dVdx[le];
+                        dvdy = dVdy[le];
+                        dvdz = dVdz[le];
+
+                        dwdx = dWdx[le];
+                        dwdy = dWdy[le];
+                        dwdz = dWdz[le];
+
+                        //! Gradient correction.
+                        dx  = xcc[re] - xcc[le];
+                        dy  = ycc[re] - ycc[le];
+                        dz  = zcc[re] - zcc[le];
+                        ods = 1.0 / sqrt(dx * dx + dy * dy + dz * dz);
+                        dx  = dx * ods;
+                        dy  = dy * ods;
+                        dz  = dz * ods;
+
+                        CorrectGradient(u[le],u[re],dudx,dudy,dudz,dx,dy,dz,ods);
+                        CorrectGradient(v[le],v[re],dvdx,dvdy,dvdz,dx,dy,dz,ods);
+                        CorrectGradient(w[le],w[re],dwdx,dwdy,dwdz,dx,dy,dz,ods);
+
+                        //! It is unnecessary to consider because the turbulence viscosity coefficient is 0.
+                        vis = visl[le];
+
+                        txx = vis * two3rd * (2.0 * dudx - dvdy - dwdz);
+                        tyy = vis * two3rd * (2.0 * dvdy - dwdz - dudx);
+                        tzz = vis * two3rd * (2.0 * dwdz - dudx - dvdy);
+                        txy = vis * (dudy + dvdx);
+                        txz = vis * (dudz + dwdx);
+                        tyz = vis * (dvdz + dwdy);
+                        tyx = txy;
+                        tzx = txz;
+                        tzy = tyz;
+
+                        fvsx = - two * (nx * txx + ny * tyx + nz * tzx);
+                        fvsy = - two * (nx * txy + ny * tyy + nz * tzy);
+                        fvsz = - two * (nx * txz + ny * tyz + nz * tzz);
+
+                        dfx += fvsx;
+                        dfy += fvsy;
+                        dfz += fvsz;
+                    }
+                    xc = xfc[iFace];
+                    yc = yfc[iFace];
+                    zc = zfc[iFace];
+
+                    dmx = (yc - TorqueRefY) * dfz - (zc - TorqueRefZ) * dfy;
+                    dmy = (zc - TorqueRefZ) * dfx - (xc - TorqueRefX) * dfz;
+                    dmz = (xc - TorqueRefX) * dfy - (yc - TorqueRefY) * dfx;
+
+                    cpx += dpx;
+                    cpy += dpy;
+                    cpz += dpz;
+
+                    cfx += dfx;
+                    cfy += dfy;
+                    cfz += dfz;
+
+                    cmx += dmx;
+                    cmy += dmy;
+                    cmz += dmz;
+
+                    RDouble dir = cosa * fvsx + sina * fvsy;
+
+                    RDouble density = rho[le];
+
+                    //! Compute taoWall.
+                    RDouble cfn  = fvsx * normalComponetX + fvsy * normalComponetY + fvsz * normalComponetZ;
+                    RDouble cfxt = fvsx - cfn * normalComponetX;
+                    RDouble cfyt = fvsy - cfn * normalComponetY;
+                    RDouble cfzt = fvsz - cfn * normalComponetZ;
+
+                    RDouble cft = sqrt(cfxt * cfxt + cfyt * cfyt + cfzt * cfzt);
+
+                    RDouble cf = cft / area[iFace] * SIGN(1.0,dir);
+                    RDouble taoWall = half * cft / area[iFace];
+
+                    //! Compute yplus.
+                    RDouble yPlus = 0.0;
+                    //if (viscousType > INVISCID)
+                    {
+                        yPlus = sqrt(taoWall * density) * wallDistance[le] / vis;
+                    }
+
+                    faceCP   [iFace] = cp;
+                    faceCF   [iFace] = cf;
+                    faceYPlus[iFace] = yPlus;
+                    facePW   [iFace] = pw_Dim;
+                }
+            }
+        }
+
+        //! Communicate data on interface.
+        int *lableCell = new int[nTotalCell];
+        std::fill_n(lableCell, nTotalCell, 0);
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+            int bcType = bcRegion->GetBCType();
+
+            if (IsWall(bcType))
+            {
+                vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    int iFace = *iter;
+                    int le = leftCellofFace[iFace];
+                    lableCell[le] = 1;
+                }
+            }
+            if (bcType == INTERFACE)
+            {
+                vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    int iFace = *iter;
+                    int cL = leftCellofFace[iFace];
+                    if (lableCell[cL] == 1)
+                    {
+                        lableCell[cL] = 2;
+                    }
+                }
+            }
+        }
+
+        RDouble **cellQ2D = NewPointer2<RDouble>(1, nTotal);
+        RDouble * cellQ   = cellQ2D[0];
+        std::fill_n(cellQ, nTotal, 0);
+
+        RDouble **cellCP2D = NewPointer2<RDouble>(1, nTotal);
+        RDouble * cellCP   = cellCP2D[0];
+        std::fill_n(cellCP, nTotal, 0);
+
+        RDouble **cellCF2D = NewPointer2<RDouble>(1, nTotal);
+        RDouble * cellCF   = cellCF2D[0];
+        std::fill_n(cellCF, nTotal, 0);
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+            int bcType = bcRegion->GetBCType();
+
+            if (IsWall(bcType))
+            {
+                vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    int iFace = *iter;
+                    int le = leftCellofFace[iFace];
+                    if(lableCell[le] == 2)
+                    {
+                        cellCF[le] = faceCF[iFace];
+                        cellCP[le] = faceCP[iFace];
+                    }
+                }
+            }
+        }
+
+        delete []lableCell;    lableCell = NULL;
+
+        momEqCalculator->CommunicateAnInterfaceVar(cellCP2D[0]);
+        momEqCalculator->CommunicateAnInterfaceVar(cellCF2D[0]);
+
+        //! Compute data on wall node.
+        RDouble *nodeWeight = new RDouble[nTotalNode]();
+        std::fill_n(nodeWeight, nTotalNode, 0.0);
+
+        RDouble *nodeQ = new RDouble[nTotalNode]();
+        std::fill_n(nodeQ, nTotalNode, 0.0);
+
+        RDouble *nodeCP = new RDouble[nTotalNode]();
+        std::fill_n(nodeCP, nTotalNode, 0.0);
+
+        RDouble *nodeCF = new RDouble[nTotalNode]();
+        std::fill_n(nodeCF, nTotalNode, 0.0);
+
+        RDouble *nodeYPlus = new RDouble[nTotalNode]();
+        std::fill_n(nodeYPlus, nTotalNode, 0.0);
+
+        RDouble *nodePW = new RDouble[nTotalNode]();
+        std::fill_n(nodePW, nTotalNode, 0.0);
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+            int bcType = bcRegion->GetBCType();
+
+            if (IsWall(bcType))
+            {
+                vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    int iFace = *iter;
+                    int leftCellIndex = leftCellofFace[iFace];
+                    for (int iNode = nodePosi[iFace]; iNode < nodePosi[iFace+1]; ++ iNode)
+                    {
+                        int nodeIndex = face2node[iNode];
+                        RDouble dx = x[nodeIndex] - xcc[leftCellIndex];
+                        RDouble dy = y[nodeIndex] - ycc[leftCellIndex];
+                        RDouble dz = z[nodeIndex] - zcc[leftCellIndex];
+                        RDouble dist = DISTANCE(dx, dy, dz);
+                        RDouble weightTemp = 1.0 / dist;
+
+                        nodeCP   [nodeIndex] += faceCP[iFace] * weightTemp;
+                        nodeCF   [nodeIndex] += faceCF[iFace] * weightTemp;
+                        nodeYPlus[nodeIndex] += faceYPlus[iFace] * weightTemp;
+                        nodePW   [nodeIndex] += facePW[iFace] * weightTemp;
+
+                        nodeWeight[nodeIndex] += weightTemp;
+                    }
+                }
+            }
+        }
+
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            if (nodeWeight[iNode] > SMALL)
+            {
+                nodeYPlus[iNode] /= nodeWeight[iNode];
+                nodePW   [iNode] /= nodeWeight[iNode];
+            }
+        }
+
+        //! For interface.
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+            int bcType = bcRegion->GetBCType();
+
+            if (bcType == INTERFACE)
+            {
+                vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    int iFace = *iter;
+                    int cR = rightCellofFace[iFace];
+                    if (ABS(cellQ[cR]) > SMALL)
+                    {
+                        for (int iNode = nodePosi[iFace]; iNode < nodePosi[iFace+1]; ++ iNode)
+                        {
+                            int nodeIndex = face2node[iNode];
+                            if (nodeWeight[nodeIndex] > SMALL)
+                            {
+                                RDouble dx = x[nodeIndex] - xcc[cR];
+                                RDouble dy = y[nodeIndex] - ycc[cR];
+                                RDouble dz = z[nodeIndex] - zcc[cR];
+                                RDouble dist = DISTANCE(dx, dy, dz);
+                                RDouble weightTemp = 1.0 / dist;
+
+                                nodeCP[nodeIndex] += cellCP[cR] * weightTemp;
+                                nodeCF[nodeIndex] += cellCF[cR] * weightTemp;
+                                nodeWeight[nodeIndex] += weightTemp;
+                            }
+                        }
+                    }
+                }
+            }
+        }
+
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            if (nodeWeight[iNode] > SMALL)
+            {
+                nodeCP[iNode] /= nodeWeight[iNode];
+                nodeCF[iNode] /= nodeWeight[iNode];
+            }
+        }
+
+        delete []faceCP;     faceCP = NULL;
+        delete []faceCF;     faceCF = NULL;
+        delete []faceQ;      faceQ = NULL;
+        delete []nodeWeight; nodeWeight = NULL;
+        delete []faceYPlus;  faceYPlus = NULL;
+        delete []facePW;     facePW = NULL;
+        DelPointer2(cellQ2D);
+        DelPointer2(cellCP2D);
+        DelPointer2(cellCF2D);
+
+        //! Compute data on wall face center.
+        RDouble *cpFaceCenter    = new RDouble[nBoundFace]();
+        RDouble *cfFaceCenter    = new RDouble[nBoundFace]();
+        RDouble *qFaceCenter     = new RDouble[nBoundFace]();
+        RDouble *yPlusFaceCenter = new RDouble[nBoundFace]();
+        RDouble *PWFaceCenter    = new RDouble[nBoundFace]();
+
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            if (face2node[iFace] > 4)
+            {
+                RDouble valueCP    = 0.0;
+                RDouble valueCF    = 0.0;
+                RDouble valueQ     = 0.0;
+                RDouble valueYPlus = 0.0;
+                RDouble valuePW    = 0.0;
+
+                int nodeIndex;
+                for (int iNode = nodePosi[iFace]; iNode < nodePosi[iFace+1]; ++ iNode)
+                {
+                    nodeIndex   = face2node[iNode];
+                    valueCP    += nodeCP   [nodeIndex];
+                    valueCF    += nodeCF   [nodeIndex];
+                    valueYPlus += nodeYPlus[nodeIndex];
+                    valuePW    += nodePW   [nodeIndex];
+                }
+                cpFaceCenter[iFace]    = valueCP    / node_number_of_each_face[iFace];
+                cfFaceCenter[iFace]    = valueCF    / node_number_of_each_face[iFace];
+                qFaceCenter [iFace]    = valueQ     / node_number_of_each_face[iFace];
+                yPlusFaceCenter[iFace] = valueYPlus / node_number_of_each_face[iFace];
+                PWFaceCenter[iFace] = valuePW / node_number_of_each_face[iFace];
+            }
+        }
+
+        //! Reconstruct grid mesh of wall.
+        vector < vector < int > > face2nodelist(nBoundFace);
+        vector < int > linkmap;
+        GetFace2NodeList(grid, SOLID_SURFACE, linkmap, face2nodelist);
+
+        int NumPts      = static_cast<int>(linkmap.size());
+        int NumElements = static_cast<int>(face2nodelist.size());
+        int NumFaces    = NumElements * 4;
+        int TotalNumFaceNodes = NumElements * 4;
+        int *cell2node        = new int[TotalNumFaceNodes]();
+
+        int count = 0;
+        for (std::size_t iFace = 0; iFace < face2nodelist.size(); ++ iFace)
+        {
+            uint_t nodes  = face2nodelist[iFace].size();
+            int nodeIndex = face2nodelist[iFace][0];
+            for (int iNode = 0; iNode < nodes; ++ iNode)
+            {
+                cell2node[count] = face2nodelist[iFace][iNode] + 1;
+                count ++;
+            }
+
+            for (uint_t ip = nodes; ip < 4; ++ ip)
+            {
+                cell2node[count] = nodeIndex + 1;
+                count ++;
+            }
+        }
+
+        RDouble *coorX     = new RDouble[NumPts]();
+        RDouble *coorY     = new RDouble[NumPts]();
+        RDouble *coorZ     = new RDouble[NumPts]();
+        RDouble *dumpCP    = new RDouble[NumPts]();
+        RDouble *dumpCF    = new RDouble[NumPts]();
+        RDouble *dumpYPlus = new RDouble[NumPts]();
+        RDouble *dumpPW    = new RDouble[NumPts]();
+
+        for (std::size_t iNode = 0; iNode < linkmap.size(); ++ iNode)
+        {
+            int nodeIndex = linkmap[iNode];
+
+            if (nodeIndex < nTotalNode)
+            {
+                coorX[iNode] = x[nodeIndex];
+                coorY[iNode] = y[nodeIndex];
+                coorZ[iNode] = z[nodeIndex];
+
+                dumpCP   [iNode] = nodeCP   [nodeIndex];
+                dumpCF   [iNode] = nodeCF   [nodeIndex];
+                dumpYPlus[iNode] = nodeYPlus[nodeIndex];
+                dumpPW   [iNode] = nodePW   [nodeIndex];
+            }
+            else
+            {
+                int faceIndex = nodeIndex - nTotalNode;
+                coorX[iNode] = xfc[faceIndex];
+                coorY[iNode] = yfc[faceIndex];
+                coorZ[iNode] = zfc[faceIndex];
+
+                dumpCP   [iNode] = cpFaceCenter   [faceIndex];
+                dumpCF   [iNode] = cfFaceCenter   [faceIndex];
+                dumpYPlus[iNode] = yPlusFaceCenter[faceIndex];
+                dumpPW   [iNode] = PWFaceCenter   [faceIndex];
+            }
+        }
+
+        delete []nodeQ;    nodeQ = NULL;
+        delete []nodeCP;    nodeCP = NULL;
+        delete []nodeCF;    nodeCF = NULL;
+        delete []nodeYPlus;    nodeYPlus = NULL;
+        delete []nodePW;    nodePW = NULL;
+        delete []cpFaceCenter;    cpFaceCenter = NULL;
+        delete []cfFaceCenter;    cfFaceCenter = NULL;
+        delete []qFaceCenter;    qFaceCenter = NULL;
+        delete []yPlusFaceCenter;    yPlusFaceCenter = NULL;
+        delete []PWFaceCenter;    PWFaceCenter = NULL;
+
+        int TecioMission = 1;
+        PHWrite(cdata, &TecioMission, 1);
+
+        PHWrite(cdata, &NumPts, 1);
+        PHWrite(cdata, &NumElements, 1);
+        PHWrite(cdata, &NumFaces, 1);
+
+        PHWrite(cdata, NumPts);
+        PHWrite(cdata, coorX, NumPts);
+        PHWrite(cdata, coorY, NumPts);
+        PHWrite(cdata, coorZ, NumPts);
+
+        int ValueLocation = 1;
+
+        PHWrite(cdata, NumPts);
+        PHWrite(cdata, ValueLocation);
+        PHWrite(cdata, dumpCP, NumPts);
+
+        PHWrite(cdata, NumPts);
+        PHWrite(cdata, ValueLocation);
+        PHWrite(cdata, dumpCF, NumPts);
+
+        PHWrite(cdata, NumPts);
+        PHWrite(cdata, ValueLocation);
+        PHWrite(cdata, dumpYPlus, NumPts);
+
+        ValueLocation = 1;
+
+        PHWrite(cdata, NumPts);
+        PHWrite(cdata, ValueLocation);
+
+        PHWrite(cdata, NumPts);
+        PHWrite(cdata, ValueLocation);
+
+        PHWrite(cdata, NumPts);
+        PHWrite(cdata, ValueLocation);
+        PHWrite(cdata, dumpPW, NumPts);
+
+        PHWrite(cdata, &TotalNumFaceNodes, 1);
+        PHWrite(cdata, cell2node, TotalNumFaceNodes);
+
+        delete []coorX;    coorX = NULL;
+        delete []coorY;    coorY = NULL;
+        delete []coorZ;    coorZ = NULL;
+        delete []dumpCP;    dumpCP = NULL;
+        delete []dumpCF;    dumpCF = NULL;
+        delete []dumpYPlus;    dumpYPlus = NULL;
+        delete []dumpPW;    dumpPW = NULL;
+        delete []cell2node;    cell2node = NULL;
+    }
+
+    void IncomUnstructSolver::IncompressibleInitial(Grid * gridIn)
+    {
+        UnstructGrid * grid = UnstructGridCast(gridIn);
+        momEqCalculator->IncompressibleInitial(grid);
+
+        int isSolveTurb = GlobalDataBase::GetIntParaFromDB("isSolveTurb");
+        if (isSolveTurb == 1)
+        {
+            string TurbEqSolverName = GlobalDataBase::GetStrParaFromDB("TurbEqSolverName");
+            if (TurbEqSolverName == "KE")
+            {
+                IncomTurbKSolver->IncompressibleInitial(grid);
+                IncomTurbEplisionSolver->IncompressibleInitial(grid);
+            }
+            else if (TurbEqSolverName == "SA")
+            {
+                IncomTurbSASolver->IncompressibleInitial(grid);
+            }
+        }
+
+        int isSolveEnergy = GlobalDataBase::GetIntParaFromDB("isSolveEnergy");
+        if (isSolveEnergy == 1)
+        {
+            IncomEnergySolver->IncompressibleInitial(grid);
+        }
+
+        int isSolveSpecies = GlobalDataBase::GetIntParaFromDB("isSolveSpecies");
+        if (isSolveSpecies == 1)
+        {
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            for (int iGas = 0; iGas < numberOfSpeciesIncom; iGas++)
+            {
+                IncomSpeciesEqCalculator* SpeciesSolver = static_cast<IncomSpeciesEqCalculator *>(IncomSpeciesSolver[iGas]);
+                SpeciesSolver->IncompressibleInitial(grid);
+            }
+        }
+    }
+
+    void IncomUnstructSolver::UpdateUnsteadyProperties(Grid* gridIn)
+    {
+        UnstructGrid * grid = UnstructGridCast(gridIn);
+        momEqCalculator->UpdateUnsteadyProperties(grid);
+
+        int isSolveTurb = GlobalDataBase::GetIntParaFromDB("isSolveTurb");
+        if (isSolveTurb == 1)
+        {
+            string TurbEqSolverName = GlobalDataBase::GetStrParaFromDB("TurbEqSolverName");
+            if (TurbEqSolverName == "KE")
+            {
+                IncomTurbKSolver->UpdateUnsteadyProperties(grid);
+                IncomTurbEplisionSolver->UpdateUnsteadyProperties(grid);
+            }
+            else if (TurbEqSolverName == "SA")
+            {
+                IncomTurbSASolver->UpdateUnsteadyProperties(grid);
+            }
+        }
+
+        int isSolveEnergy = GlobalDataBase::GetIntParaFromDB("isSolveEnergy");
+        if (isSolveEnergy == 1)
+        {
+            IncomEnergySolver->UpdateUnsteadyProperties(grid);
+        }
+
+        int isSolveSpecies = GlobalDataBase::GetIntParaFromDB("isSolveSpecies");
+        if (isSolveSpecies == 1)
+        {
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            for (int iGas = 0; iGas < numberOfSpeciesIncom; iGas++)
+            {
+                IncomSpeciesEqCalculator* SpeciesSolver = static_cast<IncomSpeciesEqCalculator *>(IncomSpeciesSolver[iGas]);
+                SpeciesSolver->UpdateUnsteadyProperties(grid);
+            }
+        }
+    }
+    
+    void IncomUnstructSolver::UpdateUnsteadyFlux(Grid* gridIn)
+    {
+        UnstructGrid * grid = UnstructGridCast(gridIn);
+        int isSolveTurb = GlobalDataBase::GetIntParaFromDB("isSolveTurb");
+        int isSolveEnergy = GlobalDataBase::GetIntParaFromDB("isSolveEnergy");
+        int isSolveSpecies = GlobalDataBase::GetIntParaFromDB("isSolveSpecies");
+        momEqCalculator->UpdateUnsteadyFlux(grid);
+
+        if (isSolveTurb == 1)
+        {
+            string TurbEqSolverName = GlobalDataBase::GetStrParaFromDB("TurbEqSolverName");
+            if (TurbEqSolverName == "KE")
+            {
+                IncomTurbKSolver->UpdateUnsteadyFlux(grid);
+                IncomTurbEplisionSolver->UpdateUnsteadyFlux(grid);
+            }
+            else if (TurbEqSolverName == "SA")
+            {
+                IncomTurbSASolver->UpdateUnsteadyFlux(grid);
+            }
+        }
+
+        if (isSolveEnergy == 1)
+        {
+            IncomEnergySolver->UpdateUnsteadyFlux(grid);
+        }
+
+        if (isSolveSpecies == 1)
+        {
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            for (int iGas = 0; iGas < numberOfSpeciesIncom; iGas++)
+            {
+                IncomSpeciesEqCalculator* SpeciesSolver = static_cast<IncomSpeciesEqCalculator *>(IncomSpeciesSolver[iGas]);
+                SpeciesSolver->UpdateUnsteadyFlux(grid);
+            }
+        }
+    }
+
+    void IncomUnstructSolver::UpdateUnsteadyVariable(Grid* grid)
+    {
+        int isSolveTurb = GlobalDataBase::GetIntParaFromDB("isSolveTurb");
+        int isSolveEnergy = GlobalDataBase::GetIntParaFromDB("isSolveEnergy");
+        int isSolveSpecies = GlobalDataBase::GetIntParaFromDB("isSolveSpecies");
+        momEqCalculator->UpdateUnsteadyVariable(grid);
+
+        if (isSolveTurb == 1)
+        {
+            string TurbEqSolverName = GlobalDataBase::GetStrParaFromDB("TurbEqSolverName");
+            if (TurbEqSolverName == "KE")
+            {
+                IncomTurbKSolver->UpdateUnsteadyVariable(grid);
+                IncomTurbEplisionSolver->UpdateUnsteadyVariable(grid);
+            }
+            else if (TurbEqSolverName == "SA")
+            {
+                IncomTurbSASolver->UpdateUnsteadyVariable(grid);
+            }
+        }
+
+        if (isSolveEnergy == 1)
+        {
+            IncomEnergySolver->UpdateUnsteadyVariable(grid);
+        }
+
+        if (isSolveSpecies == 1)
+        {
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            for (int iGas = 0; iGas < numberOfSpeciesIncom; iGas++)
+            {
+                IncomSpeciesEqCalculator* SpeciesSolver = static_cast<IncomSpeciesEqCalculator *>(IncomSpeciesSolver[iGas]);
+                SpeciesSolver->UpdateUnsteadyVariable(grid);
+            }
+        }
+    }
+
+    void IncomUnstructSolver::GetResidual(Grid *gridIn, vector<RDouble>& res)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+
+        int isSolveTurb = GlobalDataBase::GetIntParaFromDB("isSolveTurb");
+        int isSolveEnergy = GlobalDataBase::GetIntParaFromDB("isSolveEnergy");
+        int isSolveSpecies = GlobalDataBase::GetIntParaFromDB("isSolveSpecies");
+        momEqCalculator->GetResidual(grid, res);
+
+        if (isSolveTurb == 1)
+        {
+            string TurbEqSolverName = GlobalDataBase::GetStrParaFromDB("TurbEqSolverName");
+            if (TurbEqSolverName == "KE")
+            {
+                IncomTurbKSolver->GetResidual(grid, res);
+                IncomTurbEplisionSolver->GetResidual(grid, res);
+            }
+            else if (TurbEqSolverName == "SA")
+            {
+                IncomTurbSASolver->GetResidual(grid, res);
+            }
+        }
+
+        if (isSolveEnergy == 1)
+        {
+            IncomEnergySolver->GetResidual(grid, res);
+        }
+
+        if (isSolveSpecies == 1)
+        {
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            for (int iGas = 0; iGas < numberOfSpeciesIncom; iGas++)
+            {
+                IncomSpeciesEqCalculator* SpeciesSolver = static_cast<IncomSpeciesEqCalculator *>(IncomSpeciesSolver[iGas]);
+                SpeciesSolver->GetResidual(grid, res);
+            }
+        }
+    }
+
+    void IncomUnstructSolver::GetPhiName(vector<string>& phiName)
+    {
+        phiName.push_back("U");
+        phiName.push_back("V");
+        phiName.push_back("W");
+        phiName.push_back("P");
+
+        int isSolveTurb = GlobalDataBase::GetIntParaFromDB("isSolveTurb");
+        if (isSolveTurb == 1)
+        {
+            string TurbEqSolverName = GlobalDataBase::GetStrParaFromDB("TurbEqSolverName");
+            if (TurbEqSolverName == "KE")
+            {
+                phiName.push_back("TE");
+                phiName.push_back("ED");
+            }
+            else if (TurbEqSolverName == "SA")
+            {
+                phiName.push_back("TE");
+            }
+        }
+
+        int isSolveEnergy = GlobalDataBase::GetIntParaFromDB("isSolveEnergy");
+        if (isSolveEnergy == 1)
+        {
+            phiName.push_back("H");
+        }
+
+        int isSolveSpecies = GlobalDataBase::GetIntParaFromDB("isSolveSpecies");
+        if (isSolveSpecies == 1)
+        {
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            for (int iGas = 0; iGas < numberOfSpeciesIncom; iGas++)
+            {
+                IncomSpeciesEqCalculator* SpeciesSolver = static_cast<IncomSpeciesEqCalculator *>(IncomSpeciesSolver[iGas]);
+                string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+                int solverIndex = SpeciesSolver->GetSolverIndex();
+                string varName = varNameIncom[solverIndex];
+
+                phiName.push_back(varName);
+            }
+        }
+    }
+
+
+    void IncomUnstructSolver::SolveIncomSteadyField()
+    {
+        UnstructGrid* grid = UnstructGridCast(GetGeometry()->GetGrid());
+
+        int loopTimes = 1;
+        string flowSolverName = GlobalDataBase::GetStrParaFromDB("flowSolverName");
+        if (flowSolverName == "PISO")
+        {
+            loopTimes = 4;
+        }
+
+        for (int i = 0; i < loopTimes; i++)
+        {
+            if (i == 0)
+            {
+                momEqCalculator->solveMomentumEquations(grid);
+            }
+            else
+            {
+                momEqCalculator->SolveExplicitVelocityEquations(grid);
+            }
+
+            momEqCalculator->calcFaceFlux(grid);
+
+            PPEquaCalculator->solvePPEquation(grid);
+
+            momEqCalculator->UpdateProperties(grid);
+            momEqCalculator->CorrectFaceFlux(grid);
+        }
+
+        SolveTurbulenceEquation(grid);
+
+        SolveEnergyEquation(grid);
+
+        SolveSpeciesEquation(grid);
+    }
+
+    void IncomUnstructSolver::SolveTurbulenceEquation(Grid* gridIn) 
+    {
+        int isSolveTurb = GlobalDataBase::GetIntParaFromDB("isSolveTurb");
+        if (isSolveTurb != 1)
+        {
+            return;
+        }
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+        
+        string TurbEqSolverName = GlobalDataBase::GetStrParaFromDB("TurbEqSolverName");
+        if (TurbEqSolverName == "KE")
+        {
+            IncomTurbKSolver->solveScalarEquation(grid, IDX::S_ITURBK);
+
+            IncomTurbEplisionSolver->solveScalarEquation(grid, IDX::S_IEPSILON);
+        }
+        else if (TurbEqSolverName == "SA")
+        {
+            IncomTurbSASolver->solveScalarEquation(grid, IDX::S_ISA);
+        }
+    }
+
+    void IncomUnstructSolver::SolveEnergyEquation(Grid* gridIn) 
+    {
+        int isSolveEnergy = GlobalDataBase::GetIntParaFromDB("isSolveEnergy");
+        if (isSolveEnergy != 1)
+        {
+            return;
+        }
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        IncomEnergySolver->solveScalarEquation(grid, IDX::S_ITEMP);
+    }
+
+    void IncomUnstructSolver::SolveSpeciesEquation(Grid* gridIn) 
+    {
+        int isSolveSpecies = GlobalDataBase::GetIntParaFromDB("isSolveSpecies");
+        if (isSolveSpecies != 1)
+        {
+            return;
+        }
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+        int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+        for (int iGas = 0; iGas < numberOfSpeciesIncom; iGas++)
+        {
+            IncomSpeciesEqCalculator* SpeciesSolver = static_cast<IncomSpeciesEqCalculator *>(IncomSpeciesSolver[iGas]);
+            int *localSolverIndex = reinterpret_cast <int *> (GlobalDataBase::GetDataPtr("localSolverIndex"));
+            int solverIndex = SpeciesSolver->GetSolverIndex();
+            SpeciesSolver->solveScalarEquation(grid, solverIndex);
+        }
+    }
+
+    void IncomUnstructSolver::SolutionIsConverged(Grid* gridIn, bool* flag)
+    {
+        UnstructGrid * grid = UnstructGridCast(gridIn);
+        int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+        RDouble uResNow;
+        RDouble vResNow;
+        RDouble wResNow;
+        RDouble pResNow;
+        grid->GetData("UResNow", &uResNow, PHDOUBLE, 1);
+        grid->GetData("VResNow", &vResNow, PHDOUBLE, 1);
+        grid->GetData("WResNow", &wResNow, PHDOUBLE, 1);
+        grid->GetData("PResNow", &pResNow, PHDOUBLE, 1);
+        RDouble resU = GlobalDataBase::GetDoubleParaFromDB("resU");
+        RDouble resV = GlobalDataBase::GetDoubleParaFromDB("resV");
+        RDouble resW = GlobalDataBase::GetDoubleParaFromDB("resW");
+        RDouble resP = GlobalDataBase::GetDoubleParaFromDB("resP");
+
+        if (outnstep > 0)
+        {
+            if ((uResNow < resU) && (vResNow < resV) && (wResNow < resW) && (pResNow < resP))
+            {
+                *flag = true;
+            }
+            else
+            {
+                *flag = false;
+            }
+        }
+        else
+        {
+            *flag = false;
+        }
+    }
+
+    void IncomUnstructSolver::AllocateGlobalVar(Grid * gridIn)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+        CFDSolver::AllocateGlobalVar(grid);
+
+        int isSolveTurb = GlobalDataBase::GetIntParaFromDB("isSolveTurb");
+        int isSolveEnergy = GlobalDataBase::GetIntParaFromDB("isSolveEnergy");
+        int isSolveSpecies = GlobalDataBase::GetIntParaFromDB("isSolveSpecies");
+        momEqCalculator->AllocateGlobalVar(grid);
+
+        if (isSolveTurb == 1)
+        {
+            string TurbEqSolverName = GlobalDataBase::GetStrParaFromDB("TurbEqSolverName");
+            if (TurbEqSolverName == "KE")
+            {
+                IncomTurbKSolver->AllocateGlobalVar(grid);
+                IncomTurbEplisionSolver->AllocateGlobalVar(grid);
+            }
+            else if (TurbEqSolverName == "SA")
+            {
+                IncomTurbSASolver->AllocateGlobalVar(grid);
+            }
+        }
+
+        if (isSolveEnergy == 1)
+        {
+            IncomEnergySolver->AllocateGlobalVar(grid);
+        }
+
+        if (isSolveSpecies == 1)
+        {
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            for (int iGas = 0; iGas < numberOfSpeciesIncom; iGas++)
+            {
+                IncomSpeciesEqCalculator* SpeciesSolver = static_cast<IncomSpeciesEqCalculator *>(IncomSpeciesSolver[iGas]);
+                SpeciesSolver->AllocateGlobalVar(grid);
+            }
+        }
+    }
+
+    void IncomUnstructSolver::InitControlParameters()
+    {
+        controlParameters->Init();
+    }
+
+    LIB_EXPORT Param_INCompSolverUnstruct * IncomUnstructSolver::GetControlParameters() const
+    {
+        return static_cast< Param_INCompSolverUnstruct * > (controlParameters);
+    }
+
+    void IncomUnstructSolver::ComputePostVisualVariables(Post_Visual* postVisualization)
+    {
+        UnstructGrid *grid = UnstructGridCast(postVisualization->GetGrid());
+        RDouble *u = reinterpret_cast<RDouble *> (grid->GetDataPtr("U"));
+        RDouble *v = reinterpret_cast<RDouble *> (grid->GetDataPtr("V"));
+        RDouble *w = reinterpret_cast<RDouble *> (grid->GetDataPtr("W"));
+        RDouble *p = reinterpret_cast<RDouble *> (grid->GetDataPtr("P"));
+        RDouble* rho = reinterpret_cast<RDouble*> (grid->GetDataPtr("rho"));
+        RDouble* mu = reinterpret_cast<RDouble*> (grid->GetDataPtr("mu"));
+
+        postVisualization->UpdateVisualNodeVarPtr("U", u);
+        postVisualization->UpdateVisualNodeVarPtr("V", v);
+        postVisualization->UpdateVisualNodeVarPtr("W", w);
+        postVisualization->UpdateVisualNodeVarPtr("P", p);
+        postVisualization->UpdateVisualNodeVarPtr("DEN", rho);
+        postVisualization->UpdateVisualNodeVarPtr("MU", mu);
+
+        int isSolveTurb = GlobalDataBase::GetIntParaFromDB("isSolveTurb");
+        if (isSolveTurb == 1)
+        {
+            string TurbEqSolverName = GlobalDataBase::GetStrParaFromDB("TurbEqSolverName");
+            if (TurbEqSolverName == "KE")
+            {
+                RDouble *k = reinterpret_cast<RDouble *> (grid->GetDataPtr("Kinetic"));
+                RDouble *e = reinterpret_cast<RDouble *> (grid->GetDataPtr("Epsilon"));
+                RDouble *visl = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+                RDouble *vist = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+                RDouble *gen = reinterpret_cast<RDouble *> (grid->GetDataPtr("gen"));
+                RDouble *yplus = reinterpret_cast<RDouble *>(grid->GetDataPtr("yplus"));
+                RDouble *wDist = reinterpret_cast<RDouble *>(grid->GetWallDist());
+
+                postVisualization->UpdateVisualNodeVarPtr("VIS", vist);
+                postVisualization->UpdateVisualNodeVarPtr("TE", k);
+                postVisualization->UpdateVisualNodeVarPtr("ED", e);
+            }
+            else if (TurbEqSolverName == "SA")
+            {
+                RDouble* k = reinterpret_cast<RDouble*> (grid->GetDataPtr("Kinetic"));
+                RDouble *vist = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+
+                postVisualization->UpdateVisualNodeVarPtr("VIS", vist);
+                postVisualization->UpdateVisualNodeVarPtr("TE", k);
+            }
+        }
+
+        int isSolveEnergy = GlobalDataBase::GetIntParaFromDB("isSolveEnergy");
+        if (isSolveEnergy == 1)
+        {
+            RDouble *Enthalpy = reinterpret_cast<RDouble*> (grid->GetDataPtr("Enthalpy"));
+            RDouble *T = reinterpret_cast<RDouble*> (grid->GetDataPtr("T"));
+            RDouble *cp = reinterpret_cast<RDouble*> (grid->GetDataPtr("cp"));
+            RDouble *k = reinterpret_cast<RDouble*> (grid->GetDataPtr("k"));
+
+            postVisualization->UpdateVisualNodeVarPtr("Enthalpy", Enthalpy);
+            postVisualization->UpdateVisualNodeVarPtr("T", T);   
+            postVisualization->UpdateVisualNodeVarPtr("CP", cp);   
+            postVisualization->UpdateVisualNodeVarPtr("K", k);   
+        }
+
+        int isSolveSpecies = GlobalDataBase::GetIntParaFromDB("isSolveSpecies");
+        if (isSolveSpecies == 1)
+        {
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            for (int iGas = 0; iGas < numberOfSpeciesIncom; iGas++)
+            {
+                IncomSpeciesEqCalculator* SpeciesSolver = static_cast<IncomSpeciesEqCalculator *>(IncomSpeciesSolver[iGas]);
+                string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+                int solverIndex = SpeciesSolver->GetSolverIndex();
+                RDouble* specieDataPtr = reinterpret_cast<RDouble*> (grid->GetDataPtr( varNameIncom[solverIndex]));
+                postVisualization->UpdateVisualNodeVarPtr(varNameIncom[solverIndex], specieDataPtr);
+            }
+        }
+
+    }
+
+    void IncomUnstructSolver::InitFlowAsRestart() 
+    {
+        Grid *gridIn = this->GetGeometry()->GetGrid();
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+        int nTotalCell = grid->GetNTotalCell();
+        int nTotalFace = grid->GetNTotalFace();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotal = nTotalCell + nBoundFace;
+
+        int isSolveTurb = GlobalDataBase::GetIntParaFromDB("isSolveTurb");
+        int isSolveEnergy = GlobalDataBase::GetIntParaFromDB("isSolveEnergy");
+        int isSolveSpecies = GlobalDataBase::GetIntParaFromDB("isSolveSpecies");
+        momEqCalculator->InitFlowAsRestart(grid);
+
+        if (isSolveTurb == 1)
+        {
+            string TurbEqSolverName = GlobalDataBase::GetStrParaFromDB("TurbEqSolverName");
+            if (TurbEqSolverName == "KE")
+            {
+                IncomTurbKSolver->InitFlowAsRestart(grid);
+                IncomTurbEplisionSolver->InitFlowAsRestart(grid);
+            }
+            else if (TurbEqSolverName == "SA")
+            {
+                IncomTurbSASolver->InitFlowAsRestart(grid);
+            }
+        }
+
+        if (isSolveEnergy == 1)
+        {
+            IncomEnergySolver->InitFlowAsRestart(grid);
+        }
+
+        if (isSolveSpecies == 1)
+        {
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            for (int iGas = 0; iGas < numberOfSpeciesIncom; iGas++)
+            {
+                IncomSpeciesEqCalculator* SpeciesSolver = static_cast<IncomSpeciesEqCalculator *>(IncomSpeciesSolver[iGas]);
+                SpeciesSolver->InitFlowAsRestart(grid);
+            }
+        }
+    }
+
+
+    bool IncomUnstructSolver::JudgeIfRestart()
+    {
+        string restartNSFile = ".\results\flow.dat";
+        GlobalDataBase::GetData("restartNSFile", &restartNSFile, PHSTRING, 1);
+
+        if(PHMPI::IsParallelRun())
+        {
+            restartNSFile = PHSPACE::AddSymbolToFileName(restartNSFile, "_", 0);
+        }
+
+        bool restart_flag = false;
+
+        ifstream infile(restartNSFile.c_str(), ios::in);
+        if (infile)
+        {
+            restart_flag = true;
+            infile.close();
+            infile.clear();
+        }
+
+        return restart_flag;
+    }
+
+
+    void IncomUnstructSolver::InitDependentVariables()
+    {
+        Grid* gridIn = this->GetGeometry()->GetGrid();
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+
+        ConstructLocalCell2GlobalCellMap(grid);
+
+        SetAxEqbSolver(grid);
+
+        IncompressibleInitial(grid);
+    }
+
+    void IncomUnstructSolver::ConstructLocalCell2GlobalCellMap(Grid* gridIn)
+    {
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        int nTotalCell = grid->GetNTotalCell();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotalFace = grid->GetNTotalFace();
+        int nTotal = nTotalCell + nBoundFace;
+        int* leftCellOfFace = grid->GetLeftCellOfFace();
+        int* rightCellOfFace = grid->GetRightCellOfFace();
+
+        RDouble* neighborCellNumber = NewPointer<RDouble>(nTotal);
+        RDouble* zoneNumberOfNeighborCell = NewPointer<RDouble>(nTotal);
+
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            neighborCellNumber[iCell] = iCell;
+        }
+
+        for (int iFace = 0; iFace < nBoundFace; iFace++)
+        {
+            int le = leftCellOfFace[iFace];
+            int re = rightCellOfFace[iFace];
+            neighborCellNumber[re] = le;
+        }
+
+        int zoneID = grid->GetZoneID();
+        for (int iCell = 0; iCell < nTotal; iCell++)
+        {
+            zoneNumberOfNeighborCell[iCell] = zoneID;
+        }
+
+        momEqCalculator->CommunicateAnInterfaceVar(neighborCellNumber);
+
+        momEqCalculator->CommunicateAnInterfaceVar(zoneNumberOfNeighborCell);
+
+        int* localCell2GlobalMap = grid->GetLocalCell2GlobalMap();
+        if (localCell2GlobalMap == NULL)
+        {
+            localCell2GlobalMap = new int[nTotal];
+            grid->SetLocalCell2GlobalMap(localCell2GlobalMap);
+        }
+
+        int* localCell2LocalMap = grid->GetLocalCell2LocalMap();
+        if (localCell2LocalMap == NULL)
+        {
+            localCell2LocalMap = new int[nTotal];
+            grid->SetLocalCell2LocalMap(localCell2LocalMap);
+        }
+
+        int * cell2ZoneIDMap = grid->GetCell2ZoneIDMap();
+        if (cell2ZoneIDMap == NULL)
+        {
+            cell2ZoneIDMap = new int[nTotal];
+            grid->SetCell2ZoneIDMap(cell2ZoneIDMap);
+        }
+
+        int* globalCellNoOfGlobalZones = reinterpret_cast<int*> (GlobalDataBase::GetDataPtr("globalCellNoOfGlobalZones"));
+
+        for (int iCell = 0; iCell < nTotal; iCell++)
+        {
+            int zoneID = zoneNumberOfNeighborCell[iCell];
+            int cellStartOfThisZone = globalCellNoOfGlobalZones[zoneID];
+            localCell2GlobalMap[iCell] = cellStartOfThisZone + neighborCellNumber[iCell];
+            localCell2LocalMap[iCell] = neighborCellNumber[iCell];
+            cell2ZoneIDMap[iCell] = zoneNumberOfNeighborCell[iCell];
+        }
+
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            localCell2LocalMap[iCell] = -2;
+        }
+
+        UnstructBCSet **bcr = grid->GetBCRecord();
+        for (int iFace = 0; iFace < nBoundFace; iFace++)
+        {
+            int le = leftCellOfFace[iFace];
+            int re = rightCellOfFace[iFace];
+            int bcType = bcr[iFace]->GetKey();
+            if (bcType != PHENGLEI::INTERFACE)
+            {
+                localCell2GlobalMap[re] = -1;
+                localCell2LocalMap[re] = -1;
+            }
+        }
+
+        DelPointer(neighborCellNumber);
+        DelPointer(zoneNumberOfNeighborCell);
+    }
+
+    void IncomUnstructSolver::SetAxEqbSolver(Grid* gridIn)
+    {
+        UnstructGrid * grid = UnstructGridCast(gridIn);
+        int isSolveTurb = GlobalDataBase::GetIntParaFromDB("isSolveTurb");
+        int isSolveEnergy = GlobalDataBase::GetIntParaFromDB("isSolveEnergy");
+        int isSolveSpecies = GlobalDataBase::GetIntParaFromDB("isSolveSpecies");
+
+        AxEqualbCalculator->mathLibSolveInit(grid);
+
+        momEqCalculator->SetAxEqualbCalculator(AxEqualbCalculator);
+        PPEquaCalculator->SetAxEqualbCalculator(AxEqualbCalculator);
+
+
+        if (isSolveTurb == 1)
+        {
+            string TurbEqSolverName = GlobalDataBase::GetStrParaFromDB("TurbEqSolverName");
+            if (TurbEqSolverName == "KE")
+            {
+                IncomTurbKSolver->SetAxEqualbCalculator(AxEqualbCalculator);
+                IncomTurbEplisionSolver->SetAxEqualbCalculator(AxEqualbCalculator);
+            }
+            else if (TurbEqSolverName == "SA")
+            {
+                IncomTurbSASolver->SetAxEqualbCalculator(AxEqualbCalculator);
+            }
+        }
+
+        if (isSolveEnergy == 1)
+        {
+            IncomEnergySolver->SetAxEqualbCalculator(AxEqualbCalculator);
+        }
+
+        if (isSolveSpecies == 1)
+        {
+            int numberOfSpeciesIncom = GlobalDataBase::GetIntParaFromDB("numberOfSpeciesIncom");
+            for (int iGas = 0; iGas < numberOfSpeciesIncom; iGas++)
+            {
+                IncomSpeciesEqCalculator* SpeciesSolver = static_cast<IncomSpeciesEqCalculator *>(IncomSpeciesSolver[iGas]);
+                SpeciesSolver->SetAxEqualbCalculator(AxEqualbCalculator);
+            }
+        }
+    }
+
+    void IncomUnstructSolver::DumpResidual(Grid* gridIn)
+    {
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        using namespace PHMPI;
+        int currentProcessor = GetCurrentProcessorID();
+        if (currentProcessor != server)
+        {
+            return;
+        }
+
+        int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+        int maxSimuStep = GlobalDataBase::GetIntParaFromDB("maxSimuStep");
+        int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+        int intervalStepRes = GlobalDataBase::GetIntParaFromDB("intervalStepRes");
+        
+        bool isSubIterationDump = true;
+        if (isUnsteady)
+        {
+            GlobalDataBase::GetData("isSubIterationDump", &isSubIterationDump, PHBOOL, 1);
+        }
+        
+        if ((outnstep == 1 || outnstep % intervalStepRes == 0 || outnstep == maxSimuStep) && (!isUnsteady || !isSubIterationDump))
+        {
+            string fileName = "res.dat";
+            string outputFileName = string("results/") + fileName;
+
+            if ((outnstep == 1 && !isUnsteady))
+            {
+                remove(&outputFileName[0]);
+            }
+            else
+            {
+                int innstep = 0;
+                GlobalDataBase::GetData("innstep", &innstep, PHINT, 1);
+                if (outnstep == 1 && innstep == 1)
+                {
+                    remove(&outputFileName[0]);
+                }
+            }
+
+            ios_base::openmode openmode = ios_base::out | ios_base::app;
+
+            ofstream file(outputFileName.c_str(), openmode);
+            ostringstream oss;
+
+            if (!isUnsteady && outnstep == 1)
+            {
+                file << "Title=\"THE RESIDUAL\"\n";
+                file << "Variables=\n";
+                file << "\"iter\"\n";
+                oss << "iter" << "    ";
+
+                vector<string> phiName;
+                this->GetPhiName(phiName);
+
+                int numOfVar = phiName.size();
+                for (int iVar = 0; iVar < numOfVar; ++iVar)
+                {
+                    file << "\"" << phiName[iVar] + "Res" << "\"\n";
+                    oss << setw(7) << phiName[iVar] + "Res" << "    ";
+                }
+                file << "\"" << "WallTime" << "\"\n";
+                oss << setw(7) << "WallTime" << std::endl;
+            }
+
+            if (isUnsteady)
+            {
+                int innstep = 0;
+                GlobalDataBase::GetData("innstep", &innstep, PHINT, 1);
+                if (outnstep == 1 && innstep == 1)
+                {
+                    file << "Title=\"THE RESIDUAL\"\n";
+                    file << "Variables=\n";
+                    file << "\"iter\"\n";
+                    file << "\"Sub-iter\"\n";
+                    oss  << "iter" << "    " << "Sub-iter" << "    ";
+
+                    vector<string> phiName;
+
+                    this->GetPhiName(phiName);
+
+                    int numOfVar = phiName.size();
+                    for (int iVar = 0; iVar < numOfVar; ++iVar)
+                    {
+                        file << "\"" << phiName[iVar] + "Res" << "\"\n";
+                        oss << setw(7) << phiName[iVar] + "Res" << "    ";
+                    }
+                    file << "\"" << "WallTime" << "\"\n";
+                    oss << setw(10) << "WallTime" << std::endl;
+                }
+            }
+
+            file << setiosflags(std::ios::left);
+            file << setprecision(5);
+            file << setiosflags(std::ios::scientific);
+            file << setiosflags(ios::showpoint);
+
+            oss << setiosflags(std::ios::left);
+            oss << setprecision(5);
+            oss << setiosflags(std::ios::scientific);
+            oss << setiosflags(ios::showpoint);
+
+            if (isUnsteady)
+            {
+                int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+                int innerStep = GlobalDataBase::GetIntParaFromDB("innstep");
+                file << setw(5) << outnstep << "    " << innerStep << "    ";
+                oss << setw(5) << outnstep << "    " << innerStep << "    ";
+            }
+            else
+            {
+                file << setw(5) << outnstep << "    ";
+                oss << setw(5) << outnstep << "    ";
+            }
+
+            vector<RDouble> res;
+
+            this->GetResidual(grid, res);
+
+            int numOfSolver = res.size();
+            for (int iVar = 0; iVar < numOfSolver; ++iVar)
+            {
+                file << setw(1) << res[iVar] << "  ";
+                oss << setw(1) << res[iVar] << "  ";
+            }
+
+            RDouble step_time = PHSPACE::TIME_SPACE::GetWallTime();
+            file << setw(5) << setprecision(2) << setiosflags(ios::hex) << step_time << endl;
+            oss << setw(2) << setprecision(2) << setiosflags(ios::hex) << step_time << endl;
+            cout << oss.str();
+            vector<RDouble>().swap(res);
+
+        }
+    }
+
+
+    void IncomUnstructSolver::UpdateUnsteadyFlow(Grid *grid)
+    {
+        UpdateUnsteadyProperties(grid);
+        UpdateUnsteadyFlux(grid);
+        UpdateUnsteadyVariable(grid);
+    }
+
+}
diff --git a/CFD/IncomSolver/src/LinearEquationSystemCalculator.cpp b/CFD/IncomSolver/src/LinearEquationSystemCalculator.cpp
new file mode 100644
index 0000000..cec1788
--- /dev/null
+++ b/CFD/IncomSolver/src/LinearEquationSystemCalculator.cpp
@@ -0,0 +1,9 @@
+#include <iostream>
+#include <iomanip>
+#include "LinearEquationSystemCalculator.h"
+
+namespace PHSPACE
+{
+
+
+}
diff --git a/CFD/IncomSolver/src/MomEqCalculator.cpp b/CFD/IncomSolver/src/MomEqCalculator.cpp
new file mode 100644
index 0000000..b58ce92
--- /dev/null
+++ b/CFD/IncomSolver/src/MomEqCalculator.cpp
@@ -0,0 +1,2506 @@
+#include "MomEqCalculator.h"
+#include "TK_Log.h"
+#include "TK_Time.h"
+#include "Post_Probes.h"
+#include "Post_Visual.h"
+#include "Geo_UnstructBC.h"
+#include "Data_Param.h"
+
+#include "Post_WriteTecplot.h"
+#include "PHMpi.h"
+
+
+namespace PHSPACE
+{
+    
+    MomEqCalculator::MomEqCalculator():IncomScalarEqCalculator()
+    {
+    }
+
+    void MomEqCalculator::solveMomentumEquations(Grid *gridIn)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+        CalcGrad(grid);
+        
+        constructMatrixACoeff(grid, IDX::S_IU);
+        CoefPrepForPres(grid);
+
+        solveScalarEquation(grid, IDX::S_IU);
+        solveScalarEquation(grid, IDX::S_IV);
+        solveScalarEquation(grid, IDX::S_IW);
+
+        updateBCValue(grid);
+    }
+
+    void MomEqCalculator::CalcGrad(Grid *gridIn)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+        GradientCalculation(grid, "P","dpdx", "dpdy", "dpdz");
+        GradientCalculation(grid, "U", "dUdx", "dUdy", "dUdz");
+        GradientCalculation(grid, "V", "dVdx", "dVdy", "dVdz");
+        GradientCalculation(grid, "W", "dWdx", "dWdy", "dWdz");
+    }
+
+    void MomEqCalculator::solveScalarEquation(Grid* gridIn, int iEquation)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+        int solverIndex = GetSolverIndex(iEquation);
+        RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+        RDouble *bCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("bCoeff"));
+        RDouble *upperMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("upperMatrixCoeff"));
+        RDouble *lowerMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("lowerMatrixCoeff"));
+        string *varNameIncom = reinterpret_cast <string *> (GlobalDataBase::GetDataPtr("varNameIncom"));
+
+        constructBCoeff(grid, solverIndex);
+        RDouble *q = reinterpret_cast<RDouble *> (grid->GetDataPtr(varNameIncom[solverIndex]));
+        calculateLinearEquation(grid, solverIndex, q, diagMatrixCoeff, bCoeff, upperMatrixCoeff , lowerMatrixCoeff);
+    }
+
+
+    void MomEqCalculator::calcFaceFlux(Grid*  gridIn)
+    {
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        int nTotalCell = grid->GetNTotalCell();
+        int nIFace = grid->GetNIFace();
+        int nTotalFace = grid->GetNTotalFace();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotalInFace = nTotalFace - nBoundFace;
+        RDouble *pc = reinterpret_cast<RDouble *> (grid->GetDataPtr("pc"));
+        RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+        RDouble *bCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("bCoeff"));
+
+        int *leftCellOfFace = grid->GetLeftCellOfFace();
+        int *rightCellOfFace = grid->GetRightCellOfFace();
+        RDouble *area    = grid->GetFaceArea();
+        RDouble *xfn = grid->GetFaceNormalX();
+        RDouble *yfn = grid->GetFaceNormalY();
+        RDouble *zfn = grid->GetFaceNormalZ();
+        RDouble *xfc = grid->GetFaceCenterX();
+        RDouble *yfc = grid->GetFaceCenterY();
+        RDouble *zfc = grid->GetFaceCenterZ();
+        RDouble *xcc = grid->GetCellCenterX();
+        RDouble *ycc = grid->GetCellCenterY();
+        RDouble *zcc = grid->GetCellCenterZ();
+        RDouble FaceFluxRelaxCoeff = GlobalDataBase::GetDoubleParaFromDB("FaceFluxRelaxCoeff");
+        RDouble *u = reinterpret_cast<RDouble *> (grid->GetDataPtr("U"));
+        RDouble *v = reinterpret_cast<RDouble *> (grid->GetDataPtr("V"));
+        RDouble *w = reinterpret_cast<RDouble *> (grid->GetDataPtr("W"));
+        RDouble *p = reinterpret_cast<RDouble *> (grid->GetDataPtr("P"));
+        RDouble *InverseAp = reinterpret_cast<RDouble *> (grid->GetDataPtr("InverseAp"));
+        RDouble *bfU = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfU"));
+        RDouble *bfV = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfV"));
+        RDouble *bfW = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfW"));
+        RDouble *dpdx = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpdx"));
+        RDouble *dpdy = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpdy"));
+        RDouble *dpdz = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpdz"));
+        RDouble* rho  = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+        RDouble* mu   = reinterpret_cast<RDouble*>(grid->GetDataPtr("mu"));
+        RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+        RDouble* dun  = reinterpret_cast<RDouble*>(grid->GetDataPtr("dun"));
+        RDouble *rhoFace = reinterpret_cast<RDouble*>(grid->GetDataPtr("rhoFace"));
+        RDouble *faceWeightOfLeftCell = reinterpret_cast<RDouble *>(grid->GetDataPtr("faceWeightOfLeftCell"));
+        RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+        RDouble* ptotal = reinterpret_cast<RDouble*>(grid->GetDataPtr("Ptotal"));
+
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+
+        for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+        {
+            int le = leftCellOfFace[iFace];
+            int re = rightCellOfFace[iFace];
+
+            RDouble ax = area[iFace] * xfn[iFace];
+            RDouble ay = area[iFace] * yfn[iFace];
+            RDouble az = area[iFace] * zfn[iFace];
+
+            RDouble dx = xcc[re] - xcc[le];
+            RDouble dy = ycc[re] - ycc[le];
+            RDouble dz = zcc[re] - zcc[le];
+
+            RDouble ad = ax * dx + ay * dy + az * dz;
+            RDouble a2 = ax * ax + ay * ay + az * az;
+
+            RDouble ubar_a = (faceWeightOfLeftCell[iFace] * u[le] + (1.0 - faceWeightOfLeftCell[iFace]) * u[re]) * ax 
+                + (faceWeightOfLeftCell[iFace] * v[le] + (1.0 - faceWeightOfLeftCell[iFace]) * v[re]) * ay 
+                + (faceWeightOfLeftCell[iFace] * w[le] + (1.0 - faceWeightOfLeftCell[iFace]) * w[re]) * az;
+
+            RDouble pDiff;
+            RDouble pdf;
+
+            int bodyForceFlag = GlobalDataBase::GetIntParaFromDB("bodyForceFlag");
+            if (bodyForceFlag != 1)
+            {
+                pDiff = (InverseAp[le] * faceWeightOfLeftCell[iFace] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace])) *( p[re] - p[le]) ;
+                pdf = ((InverseAp[le] * faceWeightOfLeftCell[iFace] * dpdx[le] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * dpdx[re]) * dx +
+                    (InverseAp[le] * faceWeightOfLeftCell[iFace] * dpdy[le] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * dpdy[re]) * dy+
+                    (InverseAp[le] * faceWeightOfLeftCell[iFace] * dpdz[le] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * dpdz[re]) * dz);
+            }
+            else
+            {
+                RDouble dxfL = xfc[iFace] - xcc[le];
+                RDouble dyfL = yfc[iFace] - ycc[le];
+                RDouble dzfL = zfc[iFace] - zcc[le];
+                RDouble dxfR = xfc[iFace] - xcc[re];
+                RDouble dyfR = yfc[iFace] - ycc[re];
+                RDouble dzfR = zfc[iFace] - zcc[re];
+
+                pDiff = (InverseAp[le] * faceWeightOfLeftCell[iFace] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace])) * (p[re] - p[le] +
+                    (bfU[re] * dxfR + bfV[re] * dyfR + bfW[re] * dzfR)- (bfU[le] * dxfL + bfV[le] * dyfL + bfW[le] * dzfL));
+                pdf = ((InverseAp[le] * faceWeightOfLeftCell[iFace] * (dpdx[le] - bfU[le]) + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * (dpdx[re] - bfU[re])) * dx +
+                    (InverseAp[le] * faceWeightOfLeftCell[iFace] * (dpdy[le] - bfV[le]) + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * (dpdy[re] - bfV[re])) * dy +
+                    (InverseAp[le] * faceWeightOfLeftCell[iFace] * (dpdz[le] - bfW[le]) + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * (dpdz[re] - bfW[re]) * dz));
+
+            };
+
+            pDiff *= a2/ad;
+            pdf*= a2 / ad;
+
+            FaceFlux[iFace] = rhoFace[iFace] * (ubar_a - pDiff + pdf + FaceFluxRelaxCoeff * dun[iFace]);
+        }
+
+
+        for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+            int bcType = bcRegion->GetBCType();
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            Data_Param* bcData = bcRegion->GetBCParamDataBase();
+
+            if (bcType == PHENGLEI::SOLID_SURFACE)
+            {
+            }
+            else if (bcType == PHENGLEI::SYMMETRY)
+            {
+            }
+            else if (bcType == PHENGLEI::FARFIELD)
+            {
+                RDouble refflowU;
+                RDouble refflowV;
+                RDouble refflowW;
+                bcData->GetData("initU", &refflowU, PHDOUBLE, 1);
+                bcData->GetData("initV", &refflowV, PHDOUBLE, 1);
+                bcData->GetData("initW", &refflowW, PHDOUBLE, 1);
+
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+                    if (FaceFlux[iFacelocal] < 0)
+                    {
+                        u[re] = refflowU;
+                        v[re] = refflowV;
+                        w[re] = refflowW;
+                        RDouble muLocal = mu[le];
+
+                        RDouble fluxbValue = rho[re] * area[iFacelocal] * (u[re] * xfn[iFacelocal] + v[re] * yfn[iFacelocal] + w[re] * zfn[iFacelocal]);
+                        RDouble fluxbCorrectValue = FaceFlux[iFacelocal] / rho[le] * cRho[re] * pc[re];
+                        FaceFlux[iFacelocal] = fluxbValue + fluxbCorrectValue;
+                    }
+                    else
+                    {
+                        RDouble muLocal = mu[le];
+
+                        RDouble dx = xfc[iFacelocal] - xcc[le];
+                        RDouble dy = yfc[iFacelocal] - ycc[le];
+                        RDouble dz = zfc[iFacelocal] - zcc[le];
+
+                        RDouble ad = xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz;
+
+                        RDouble ub = u[le] + InverseAp[le] * xfn[iFacelocal]  / ad *
+                            (p[re] - p[le] - dpdx[le] * dx - dpdy[le] * dy - dpdz[le] * dz);
+                        RDouble vb = v[le] + InverseAp[le] * yfn[iFacelocal]  / ad *
+                            (p[re] - p[le] - dpdx[le] * dx - dpdy[le] * dy - dpdz[le] * dz);
+                        RDouble wb = w[le] + InverseAp[le] * zfn[iFacelocal]  / ad *
+                            (p[re] - p[le] - dpdx[le] * dx - dpdy[le] * dy - dpdz[le] * dz);
+
+                        RDouble fluxbValue = rho[le] * 
+                            (area[iFacelocal] * (ub * xfn[iFacelocal]  + vb * yfn[iFacelocal] + wb * zfn[iFacelocal]) 
+                                + FaceFluxRelaxCoeff * dun[iFacelocal]);
+                        RDouble fluxbCorrectValue = FaceFlux[iFacelocal] / rho[le] * cRho[re] * pc[le];
+                        FaceFlux[iFacelocal] = fluxbValue + fluxbCorrectValue;
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::INFLOW)
+            {
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+                    FaceFlux[iFacelocal] = rho[re] * area[iFacelocal] * (u[re] * xfn[iFacelocal] + v[re] * yfn[iFacelocal] + w[re] * zfn[iFacelocal]);
+                }
+
+                if (cRho != nullptr)
+                {
+                    for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                    {
+                        int iFacelocal = (*faceIndex)[iFace];
+                        int re = rightCellOfFace[iFacelocal];
+                        FaceFlux[iFacelocal] += FaceFlux[iFacelocal] / rho[re] * cRho[re] * pc[re];
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::OUTFLOW)
+            {
+
+                for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+
+                    RDouble muLocal = mu[le];
+
+                    RDouble dx = xfc[iFacelocal] - xcc[le];
+                    RDouble dy = yfc[iFacelocal] - ycc[le];
+                    RDouble dz = zfc[iFacelocal] - zcc[le];
+
+                    RDouble ad = xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz;
+
+                    RDouble ub = u[le] + InverseAp[le] * xfn[iFacelocal] / ad *
+                        ( p[re] - p[le] - dpdx[le] * dx - dpdy[le] * dy - dpdz[le] * dz );
+                    RDouble vb = v[le] + InverseAp[le] * yfn[iFacelocal]  / ad *
+                        ( p[re] - p[le] - dpdx[le] * dx - dpdy[le] * dy - dpdz[le] * dz );
+                    RDouble wb = w[le] + InverseAp[le] * zfn[iFacelocal]  / ad *
+                        ( p[re] - p[le] - dpdx[le] * dx - dpdy[le] * dy - dpdz[le] * dz );
+
+                    FaceFlux[iFacelocal] = rho[re] * area[iFacelocal] * 
+                        ((ub * xfn[iFacelocal]  + vb * yfn[iFacelocal] + wb * zfn[iFacelocal])+ FaceFluxRelaxCoeff * dun[iFacelocal]);
+                }
+
+                if (cRho != nullptr)
+                {
+                    for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                    {
+                        int iFacelocal = (*faceIndex)[iFace];
+                        int re = rightCellOfFace[iFacelocal];
+                        FaceFlux[iFacelocal] += FaceFlux[iFacelocal] / rho[re] * cRho[re] * pc[re];
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::PRESSURE_INLET)
+            {
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+
+                    RDouble dx = xfc[iFacelocal] - xcc[le];
+                    RDouble dy = yfc[iFacelocal] - ycc[le];
+                    RDouble dz = zfc[iFacelocal] - zcc[le];
+
+                    if (p[re] > ptotal[re])
+                    {
+                        p[re] = ptotal[re];
+                    }
+
+                    u[re] = u[le];
+                    v[re] = v[le];
+                    w[re] = w[le];
+                    FaceFlux[iFacelocal] = rho[re] * area[iFacelocal] * (u[re] * xfn[iFacelocal] + v[re] * yfn[iFacelocal] + w[re] * zfn[iFacelocal]);
+                }
+            }
+            else if (bcType == PHENGLEI::PRESSURE_OUTLET)
+            {
+                for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+
+                    RDouble dx = xfc[iFacelocal] - xcc[le];
+                    RDouble dy = yfc[iFacelocal] - ycc[le];
+                    RDouble dz = zfc[iFacelocal] - zcc[le];
+
+                    RDouble ad = xfn[iFacelocal] * area[iFacelocal] * dx + yfn[iFacelocal] * area[iFacelocal] * dy + zfn[iFacelocal] * area[iFacelocal] * dz;
+
+                    RDouble ub = u[le] + InverseAp[le] * xfn[iFacelocal] * area[iFacelocal] / ad *
+                        ( p[re] - p[le] - dpdx[le] * dx - dpdy[le] * dy - dpdz[le] * dz );
+                    RDouble vb = v[le] + InverseAp[le] * yfn[iFacelocal] * area[iFacelocal] / ad *
+                        ( p[re] - p[le] - dpdx[le] * dx - dpdy[le] * dy - dpdz[le] * dz );
+                    RDouble wb = w[le] + InverseAp[le] * zfn[iFacelocal] * area[iFacelocal] / ad *
+                        ( p[re] - p[le] - dpdx[le] * dx - dpdy[le] * dy - dpdz[le] * dz );
+
+                    FaceFlux[iFacelocal] = rho[re] * 
+                        ((ub * xfn[iFacelocal] * area[iFacelocal] + vb * yfn[iFacelocal] * area[iFacelocal] + wb * zfn[iFacelocal] * area[iFacelocal])
+                            + FaceFluxRelaxCoeff * dun[iFacelocal]);
+                }
+
+                if (cRho != nullptr)
+                {
+                    for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                    {
+                        int iFacelocal = (*faceIndex)[iFace];
+                        int le = leftCellOfFace[iFacelocal];
+                        int re = rightCellOfFace[iFacelocal];
+                        FaceFlux[iFacelocal] += FaceFlux[iFacelocal] / rho[re] * cRho[re] * pc[re];
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::INTERFACE)
+            {
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    int iFace = *iter;
+                    int le = leftCellOfFace[iFace];
+                    int re = rightCellOfFace[iFace];
+
+                    RDouble ax = area[iFace] * xfn[iFace];
+                    RDouble ay = area[iFace] * yfn[iFace];
+                    RDouble az = area[iFace] * zfn[iFace];
+
+                    RDouble dx = xcc[re] - xcc[le];
+                    RDouble dy = ycc[re] - ycc[le];
+                    RDouble dz = zcc[re] - zcc[le];
+
+                    RDouble ad = ax * dx + ay * dy + az * dz;
+                    RDouble a2 = ax * ax + ay * ay + az * az;
+
+                    RDouble ubar_a = (faceWeightOfLeftCell[iFace] * u[le] + (1.0 - faceWeightOfLeftCell[iFace]) * u[re]) * ax 
+                        + (faceWeightOfLeftCell[iFace] * v[le] + (1.0 - faceWeightOfLeftCell[iFace]) * v[re]) * ay 
+                        + (faceWeightOfLeftCell[iFace] * w[le] + (1.0 - faceWeightOfLeftCell[iFace]) * w[re]) * az;
+
+                    RDouble pDiff;
+                    RDouble pdf;
+
+                    int bodyForceFlag = GlobalDataBase::GetIntParaFromDB("bodyForceFlag");
+                    if (bodyForceFlag != 1)
+                    {
+                        pDiff = (InverseAp[le] * faceWeightOfLeftCell[iFace] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace])) *( p[re] - p[le]) ;
+                        pdf = ((InverseAp[le] * faceWeightOfLeftCell[iFace] * dpdx[le] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * dpdx[re]) * dx +
+                            (InverseAp[le] * faceWeightOfLeftCell[iFace] * dpdy[le] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * dpdy[re]) * dy+
+                            (InverseAp[le] * faceWeightOfLeftCell[iFace] * dpdz[le] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * dpdz[re]) * dz);
+                    }
+                    else
+                    {
+                        RDouble dxfL = xfc[iFace] - xcc[le];
+                        RDouble dyfL = yfc[iFace] - ycc[le];
+                        RDouble dzfL = zfc[iFace] - zcc[le];
+                        RDouble dxfR = xfc[iFace] - xcc[re];
+                        RDouble dyfR = yfc[iFace] - ycc[re];
+                        RDouble dzfR = zfc[iFace] - zcc[re];
+
+                        pDiff = (InverseAp[le] * faceWeightOfLeftCell[iFace] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace])) * (p[re] - p[le] +
+                            (bfU[re] * dxfR + bfV[re] * dyfR + bfW[re] * dzfR)- (bfU[le] * dxfL + bfV[le] * dyfL + bfW[le] * dzfL));
+                        pdf = ((InverseAp[le] * faceWeightOfLeftCell[iFace] * (dpdx[le] - bfU[le]) + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * (dpdx[re] - bfU[re])) * dx +
+                            (InverseAp[le] * faceWeightOfLeftCell[iFace] * (dpdy[le] - bfV[le]) + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * (dpdy[re] - bfV[re])) * dy +
+                            (InverseAp[le] * faceWeightOfLeftCell[iFace] * (dpdz[le] - bfW[le]) + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * (dpdz[re] - bfW[re]) * dz));
+
+                    };
+
+                    pDiff *= a2/ad;
+                    pdf*= a2 / ad;
+
+                    FaceFlux[iFace] = rhoFace[iFace] * (ubar_a - pDiff + pdf + FaceFluxRelaxCoeff * dun[iFace]);
+                }
+            }
+        }
+    }
+
+    void MomEqCalculator::updateBCValue(Grid*  gridIn)
+    {
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        int nTotalCell = grid->GetNTotalCell();
+        int nIFace = grid->GetNIFace();
+        int nTotalFace = grid->GetNTotalFace();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotalInFace = nTotalFace - nBoundFace;
+        RDouble *pc = reinterpret_cast<RDouble *> (grid->GetDataPtr("pc"));
+        RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+        RDouble *bCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("bCoeff"));
+
+        int *leftCellOfFace = grid->GetLeftCellOfFace();
+        int *rightCellOfFace = grid->GetRightCellOfFace();
+        RDouble *area    = grid->GetFaceArea();
+        RDouble *xfn = grid->GetFaceNormalX();
+        RDouble *yfn = grid->GetFaceNormalY();
+        RDouble *zfn = grid->GetFaceNormalZ();
+        RDouble *xfc = grid->GetFaceCenterX();
+        RDouble *yfc = grid->GetFaceCenterY();
+        RDouble *zfc = grid->GetFaceCenterZ();
+        RDouble *xcc = grid->GetCellCenterX();
+        RDouble *ycc = grid->GetCellCenterY();
+        RDouble *zcc = grid->GetCellCenterZ();
+        RDouble *u = reinterpret_cast<RDouble *> (grid->GetDataPtr("U"));
+        RDouble *v = reinterpret_cast<RDouble *> (grid->GetDataPtr("V"));
+        RDouble *w = reinterpret_cast<RDouble *> (grid->GetDataPtr("W"));
+        RDouble *p = reinterpret_cast<RDouble *> (grid->GetDataPtr("P"));
+        RDouble *InverseAp = reinterpret_cast<RDouble *> (grid->GetDataPtr("InverseAp"));
+        RDouble *bfU = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfU"));
+        RDouble *bfV = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfV"));
+        RDouble *bfW = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfW"));
+        RDouble *dpdx = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpdx"));
+        RDouble *dpdy = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpdy"));
+        RDouble *dpdz = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpdz"));
+        RDouble* rho  = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+        RDouble* mu   = reinterpret_cast<RDouble*>(grid->GetDataPtr("mu"));
+        RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+        RDouble* dun  = reinterpret_cast<RDouble*>(grid->GetDataPtr("dun"));
+        RDouble *faceWeightOfLeftCell = reinterpret_cast<RDouble *>(grid->GetDataPtr("faceWeightOfLeftCell"));
+
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+
+        for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+        {
+            UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+            int bcType = bcRegion->GetBCType();
+            vector<int>* faceIndex = bcRegion->GetFaceIndex();
+            Data_Param* bcData = bcRegion->GetBCParamDataBase();
+
+            if (bcType == PHENGLEI::FARFIELD)
+            {
+                RDouble refflowU;
+                RDouble refflowV;
+                RDouble refflowW;
+                bcData->GetData("initU", &refflowU, PHDOUBLE, 1);
+                bcData->GetData("initV", &refflowV, PHDOUBLE, 1);
+                bcData->GetData("initW", &refflowW, PHDOUBLE, 1);
+
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+                    if (FaceFlux[iFacelocal] < 0)
+                    {
+                        u[re] = refflowU;
+                        v[re] = refflowV;
+                        w[re] = refflowW;
+                    }
+                    else
+                    {
+                        RDouble muLocal = mu[le];
+
+                        RDouble dx = xfc[iFacelocal] - xcc[le];
+                        RDouble dy = yfc[iFacelocal] - ycc[le];
+                        RDouble dz = zfc[iFacelocal] - zcc[le];
+
+                        RDouble ad = xfn[iFacelocal] * area[iFacelocal] * dx + yfn[iFacelocal] * area[iFacelocal] * dy + zfn[iFacelocal] * area[iFacelocal] * dz;
+
+                        RDouble tempTerm = (p[re] - p[le] - dpdx[le] * dx - dpdy[le] * dy - dpdz[le] * dz);
+                        u[re] = u[le] + InverseAp[le] * xfn[iFacelocal] * area[iFacelocal] / ad * tempTerm;
+                        v[re] = v[le] + InverseAp[le] * yfn[iFacelocal] * area[iFacelocal] / ad * tempTerm;
+                        w[re] = w[le] + InverseAp[le] * zfn[iFacelocal] * area[iFacelocal] / ad * tempTerm;
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::INFLOW)
+            {
+            }
+            else if (bcType == PHENGLEI::SOLID_SURFACE)
+            {
+                RDouble ub = 0.0;
+                if (bcData->IsExist("initU", PHDOUBLE, 1))
+                {
+                    bcData->GetData("initU", &ub, PHDOUBLE, 1);
+                }
+
+                RDouble vb = 0.0;
+                if (bcData->IsExist("initV", PHDOUBLE, 1))
+                {
+                    bcData->GetData("initV", &vb, PHDOUBLE, 1);
+                }
+
+                RDouble wb = 0.0;
+                if (bcData->IsExist("initW", PHDOUBLE, 1))
+                {
+                    bcData->GetData("initW", &wb, PHDOUBLE, 1);
+                }
+
+                for (std::size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+
+                    u[re] = RDouble(ub);
+                    v[re] = RDouble(vb);
+                    w[re] = RDouble(wb);
+                }
+            }
+            else if (bcType == PHENGLEI::OUTFLOW)
+            {
+                for (std::size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+
+                    RDouble muLocal = mu[le];
+
+                    RDouble dx = xfc[iFacelocal] - xcc[le];
+                    RDouble dy = yfc[iFacelocal] - ycc[le];
+                    RDouble dz = zfc[iFacelocal] - zcc[le];
+
+                    RDouble ad = xfn[iFacelocal] * area[iFacelocal] * dx + yfn[iFacelocal] * area[iFacelocal] * dy + zfn[iFacelocal] * area[iFacelocal] * dz;
+
+                    RDouble tempTerm = (p[re] - p[le] - dpdx[le] * dx - dpdy[le] * dy - dpdz[le] * dz);
+                    u[re] = u[le] + InverseAp[le] * xfn[iFacelocal] * area[iFacelocal] / ad * tempTerm;
+                    v[re] = v[le] + InverseAp[le] * yfn[iFacelocal] * area[iFacelocal] / ad * tempTerm;
+                    w[re] = w[le] + InverseAp[le] * zfn[iFacelocal] * area[iFacelocal] / ad * tempTerm;
+                }
+            }
+            else if (bcType == PHENGLEI::PRESSURE_INLET)
+            {
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+
+                    u[re] = u[le];
+                    v[re] = v[le];
+                    w[re] = w[le];
+
+                }
+            }
+            else if (bcType == PHENGLEI::PRESSURE_OUTLET)
+            {
+                for (std::size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+
+                    RDouble muLocal = mu[le];
+
+                    RDouble dx = xfc[iFacelocal] - xcc[le];
+                    RDouble dy = yfc[iFacelocal] - ycc[le];
+                    RDouble dz = zfc[iFacelocal] - zcc[le];
+
+                    RDouble ad = xfn[iFacelocal] * area[iFacelocal] * dx + yfn[iFacelocal] * area[iFacelocal] * dy + zfn[iFacelocal] * area[iFacelocal] * dz;
+
+                    RDouble tempTerm = (p[re] - p[le] - dpdx[le] * dx - dpdy[le] * dy - dpdz[le] * dz);
+                    u[re] = u[le] + InverseAp[le] * xfn[iFacelocal] * area[iFacelocal] / ad * tempTerm;
+                    v[re] = v[le] + InverseAp[le] * yfn[iFacelocal] * area[iFacelocal] / ad * tempTerm;
+                    w[re] = w[le] + InverseAp[le] * zfn[iFacelocal] * area[iFacelocal] / ad * tempTerm;
+                }
+            }
+        }
+
+        CommunicateAnInterfaceVar(u);
+        CommunicateAnInterfaceVar(v);
+        CommunicateAnInterfaceVar(w);
+    }
+
+    void MomEqCalculator::CalcVelocityRes(UnstructGrid *grid)
+    {
+        int nTotalCell = grid->GetNTotalCell();
+        RDouble *scU = reinterpret_cast<RDouble *> (grid->GetDataPtr("scU"));
+        RDouble *scV = reinterpret_cast<RDouble *> (grid->GetDataPtr("scV"));
+        RDouble *scW = reinterpret_cast<RDouble *> (grid->GetDataPtr("scW"));
+
+        RDouble uResNow = 0.0;
+        RDouble vResNow = 0.0;
+        RDouble wResNow = 0.0;
+
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            uResNow += std::abs(scU[iCell]);
+            vResNow += std::abs(scV[iCell]);
+            wResNow += std::abs(scW[iCell]);
+        }
+
+        RDouble temp = uResNow;
+        PH_AllreduceSepMode(&temp, &uResNow, 1, MPI_DOUBLE, MPI_SUM);
+
+        temp = vResNow;
+        PH_AllreduceSepMode(&temp, &vResNow, 1, MPI_DOUBLE, MPI_SUM);
+
+        temp = wResNow;
+        PH_AllreduceSepMode(&temp, &wResNow, 1, MPI_DOUBLE, MPI_SUM);
+
+        grid->UpdateData("UResNow", &uResNow, PHDOUBLE, 1);
+        grid->UpdateData("VResNow", &vResNow, PHDOUBLE, 1);
+        grid->UpdateData("WResNow", &wResNow, PHDOUBLE, 1);
+    }
+
+    void MomEqCalculator::CoefPrepForPres(Grid*  gridIn)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+        int nTotalCell = grid->GetNTotalCell();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotalFace = grid->GetNTotalFace();
+        int *leftCellOfFace = grid->GetLeftCellOfFace();
+        int *rightCellOfFace = grid->GetRightCellOfFace();
+        RDouble* vol = grid->GetCellVolume();
+        RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+        RDouble *upperMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("upperMatrixCoeff"));
+        RDouble *lowerMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("lowerMatrixCoeff"));
+        RDouble *hu = reinterpret_cast<RDouble *> (grid->GetDataPtr("hu"));
+        RDouble *InverseAp = reinterpret_cast<RDouble *> (grid->GetDataPtr("InverseAp"));
+
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            hu[iCell] = diagMatrixCoeff[iCell];
+        }
+
+        int isSIMPLEC = GlobalDataBase::GetIntParaFromDB("SIMPLEC");
+        if (isSIMPLEC)
+        {
+            for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+            {
+                int le = leftCellOfFace[iFace];
+                int re = rightCellOfFace[iFace];
+                hu[le] += upperMatrixCoeff[iFace];
+                hu[re] += lowerMatrixCoeff[iFace];
+            }
+            UnstructBCSet **bcr = grid->GetBCRecord();
+            for (int iFace = 0; iFace < nBoundFace; ++iFace)
+            {
+                int le = leftCellOfFace[iFace];
+                int re = rightCellOfFace[iFace];
+                int bcType = bcr[iFace]->GetKey();
+                if (bcType == PHENGLEI::INTERFACE)
+                {
+                    hu[le] += upperMatrixCoeff[iFace];
+                }
+            }
+        }
+
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            hu[iCell] = vol[iCell] / hu[iCell];
+            InverseAp[iCell] = vol[iCell] / diagMatrixCoeff[iCell];
+        }
+
+        string flowSolverName = GlobalDataBase::GetStrParaFromDB("flowSolverName");
+        if (flowSolverName == "PISO")
+        {
+            SetField(hu, InverseAp, nTotalCell);
+        }
+
+        CommunicateAnInterfaceVar(hu);
+        CommunicateAnInterfaceVar(InverseAp);
+
+    }
+
+    void MomEqCalculator:: CorrectFaceFlux(Grid*  gridIn)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+        int nTotalCell = grid->GetNTotalCell();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotalFace = grid->GetNTotalFace();
+        int *leftCellOfFace = grid->GetLeftCellOfFace();
+        int *rightCellOfFace = grid->GetRightCellOfFace();
+        RDouble *area    = grid->GetFaceArea();
+        RDouble *xfn = grid->GetFaceNormalX();
+        RDouble *yfn = grid->GetFaceNormalY();
+        RDouble *zfn = grid->GetFaceNormalZ();
+        RDouble *xfc = grid->GetFaceCenterX();
+        RDouble *yfc = grid->GetFaceCenterY();
+        RDouble *zfc = grid->GetFaceCenterZ();
+        RDouble *xcc = grid->GetCellCenterX();
+        RDouble *ycc = grid->GetCellCenterY();
+        RDouble *zcc = grid->GetCellCenterZ();
+        RDouble *u = reinterpret_cast<RDouble *> (grid->GetDataPtr("U"));
+        RDouble *v = reinterpret_cast<RDouble *> (grid->GetDataPtr("V"));
+        RDouble *w = reinterpret_cast<RDouble *> (grid->GetDataPtr("W"));
+        RDouble *p = reinterpret_cast<RDouble *> (grid->GetDataPtr("P"));
+        RDouble *pc = reinterpret_cast<RDouble *> (grid->GetDataPtr("pc"));
+        RDouble *upperMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("upperMatrixCoeff"));
+        RDouble* rho  = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+        RDouble* mu   = reinterpret_cast<RDouble*>(grid->GetDataPtr("mu"));
+        RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+        RDouble* dun  = reinterpret_cast<RDouble*>(grid->GetDataPtr("dun"));
+        RDouble *rhoFace = reinterpret_cast<RDouble*>(grid->GetDataPtr("rhoFace"));
+        RDouble *faceWeightOfLeftCell = reinterpret_cast<RDouble *>(grid->GetDataPtr("faceWeightOfLeftCell"));
+
+        RDouble* cellCenterX = grid->GetCellCenterX();
+        RDouble* cellCenterY = grid->GetCellCenterY();
+        RDouble* cellCenterZ = grid->GetCellCenterZ();
+        RDouble *hu = reinterpret_cast<RDouble *> (grid->GetDataPtr("hu"));
+        RDouble *cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+
+        string flowSolverName = GlobalDataBase::GetStrParaFromDB("flowSolverName");
+        if (flowSolverName == "CompressibleSIMPLE")
+        {
+            for (int iFace = nBoundFace; iFace < nTotalFace; ++iFace)
+            {
+                int le = leftCellOfFace[iFace];
+                int re = rightCellOfFace[iFace];
+
+                RDouble ax = area[iFace] * xfn[iFace];
+                RDouble ay = area[iFace] * yfn[iFace];
+                RDouble az = area[iFace] * zfn[iFace];
+                RDouble cRhof = faceWeightOfLeftCell[iFace] * cRho[le] + (1.0 - faceWeightOfLeftCell[iFace]) * cRho[re];
+                RDouble pcf = faceWeightOfLeftCell[iFace] * pc[le] + (1.0 - faceWeightOfLeftCell[iFace]) * pc[re];
+                RDouble dx = cellCenterX[re] - cellCenterX[le];
+                RDouble dy = cellCenterY[re] - cellCenterY[le];
+                RDouble dz = cellCenterZ[re] - cellCenterZ[le];
+                RDouble ad = ax * dx + ay * dy + az * dz;
+                RDouble a2 = ax * ax + ay * ay + az * az;
+                RDouble uf = faceWeightOfLeftCell[iFace] * u[le] + (1.0 - faceWeightOfLeftCell[iFace]) * u[re];
+                RDouble vf = faceWeightOfLeftCell[iFace] * v[le] + (1.0 - faceWeightOfLeftCell[iFace]) * v[re];
+                RDouble wf = faceWeightOfLeftCell[iFace] * w[le] + (1.0 - faceWeightOfLeftCell[iFace]) * w[re];
+                RDouble un = uf * ax + vf * ay + wf * az;
+
+                if (FaceFlux[iFace] > 0)
+                {
+                    rhoFace[iFace] = rho[le];
+                }
+                else
+                {
+                    rhoFace[iFace] = rho[re];
+                }
+
+                FaceFlux[iFace] += FaceFlux[iFace] * cRhof * pcf / rhoFace[iFace];
+
+                FaceFlux[iFace] -= rhoFace[iFace] * 
+                    ((hu[le] * faceWeightOfLeftCell[iFace] + hu[re] * (1.0 - faceWeightOfLeftCell[iFace])) * a2) / ad * (pc[re] - pc[le]);
+                dun[iFace] = FaceFlux[iFace] / rhoFace[iFace] - un;
+            }
+        }
+        else
+        {
+            for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+            {
+                int le = leftCellOfFace[iFace];
+                int re = rightCellOfFace[iFace];
+
+                RDouble ax = area[iFace] * xfn[iFace];
+                RDouble ay = area[iFace] * yfn[iFace];
+                RDouble az = area[iFace] * zfn[iFace];
+                RDouble uf = faceWeightOfLeftCell[iFace] * u[le] + (1.0 - faceWeightOfLeftCell[iFace]) * u[re];
+                RDouble vf = faceWeightOfLeftCell[iFace] * v[le] + (1.0 - faceWeightOfLeftCell[iFace]) * v[re];
+                RDouble wf = faceWeightOfLeftCell[iFace] * w[le] + (1.0 - faceWeightOfLeftCell[iFace]) * w[re];
+                RDouble un = uf * ax + vf * ay + wf * az;
+
+                FaceFlux[iFace] += upperMatrixCoeff[iFace] * (pc[re] - pc[le]);
+                dun[iFace] = FaceFlux[iFace] / rhoFace[iFace] - un;
+            }
+        }
+
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+
+        for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+        {
+            UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+            int bcType = bcRegion->GetBCType();
+            vector<int>* faceIndex = bcRegion->GetFaceIndex();
+            Data_Param* bcData = bcRegion->GetBCParamDataBase();
+
+
+            if (bcType == PHENGLEI::FARFIELD)
+            {
+                RDouble un;
+
+                RDouble refflowU;
+                RDouble refflowV;
+                RDouble refflowW;
+                bcData->GetData("initU", &refflowU, PHDOUBLE, 1);
+                bcData->GetData("initV", &refflowV, PHDOUBLE, 1);
+                bcData->GetData("initW", &refflowW, PHDOUBLE, 1);
+
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+
+                    if (FaceFlux[iFacelocal] < 0)
+                    {
+                        FaceFlux[iFacelocal] = 0;
+                        RDouble fluxbCorrectValue = rho[re] * (u[re] * xfn[iFacelocal] * area[iFacelocal] + v[re] * yfn[iFacelocal] * area[iFacelocal] + w[re] * zfn[iFacelocal] * area[iFacelocal]);
+                        if (fluxbCorrectValue < 0)
+                        {
+                            FaceFlux[iFacelocal] = fluxbCorrectValue;
+                        }
+                    }
+                    else
+                    {
+                        RDouble fluxbValue = rho[re] * area[iFacelocal] * (u[re] * xfn[iFacelocal] + v[re] * yfn[iFacelocal] + w[re] * zfn[iFacelocal]);
+                        FaceFlux[iFacelocal] = fluxbValue;
+                        un = u[re] * xfn[iFacelocal] * area[iFacelocal] + v[re] * yfn[iFacelocal] * area[iFacelocal] + w[re] * zfn[iFacelocal] * area[iFacelocal];
+                        dun[iFacelocal] = fluxbValue / rho[le] - un;
+                        FaceFlux[iFacelocal] = fluxbValue;
+                        un = u[re] * xfn[iFacelocal] * area[iFacelocal] + v[re] * yfn[iFacelocal] * area[iFacelocal] + w[re] * zfn[iFacelocal] * area[iFacelocal];
+                        dun[iFacelocal] = fluxbValue / rho[le] - un;
+                        RDouble fluxbCorrectValue = FaceFlux[iFacelocal] / rho[le] * cRho[re] * pc[le];
+                        FaceFlux[iFacelocal] += fluxbCorrectValue;
+                        if (FaceFlux[iFacelocal] < 0)
+                        {
+                            FaceFlux[iFacelocal] = 0;
+
+                            RDouble fluxbCorrectValue = rho[re] * area[iFacelocal] * (u[re] * xfn[iFacelocal]  + v[re] * yfn[iFacelocal] + w[re] * zfn[iFacelocal]);
+
+                            if (fluxbCorrectValue < 0)
+                            {
+                                FaceFlux[iFacelocal] = fluxbCorrectValue;
+                            }
+                        }
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::INFLOW)
+            {
+                if (cRho != nullptr)
+                {
+                    for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                    {
+                        int iFacelocal = (*faceIndex)[iFace];
+                        int re = rightCellOfFace[iFacelocal];
+                        FaceFlux[iFacelocal] += FaceFlux[iFacelocal] / rho[re] * cRho[re] * pc[re];
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::OUTFLOW)
+            {
+                for (std::size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+
+
+                    FaceFlux[iFacelocal] = rho[re] * (u[re] * xfn[iFacelocal] * area[iFacelocal] + v[re] * yfn[iFacelocal] * area[iFacelocal] + w[re] * zfn[iFacelocal] * area[iFacelocal]);
+
+                    RDouble un = u[re] * xfn[iFacelocal] * area[iFacelocal] + v[re] * yfn[iFacelocal] * area[iFacelocal] + w[re] * zfn[iFacelocal] * area[iFacelocal];
+                    dun[iFacelocal] = rho[re] * (u[re] * xfn[iFacelocal] * area[iFacelocal] + v[re] * yfn[iFacelocal] * area[iFacelocal] + w[re] * zfn[iFacelocal] * area[iFacelocal]) / rho[re] - un;
+                }
+
+                RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+                if (cRho != nullptr)
+                {
+                    RDouble* pc = reinterpret_cast<RDouble*>(grid->GetDataPtr("pc"));
+                    for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                    {
+                        int iFacelocal = (*faceIndex)[iFace];
+                        int re = rightCellOfFace[iFacelocal];
+                        FaceFlux[iFacelocal] += FaceFlux[iFacelocal] / rho[re] * cRho[re] * pc[re];
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::PRESSURE_INLET)
+            {
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+
+                    FaceFlux[iFacelocal] = rho[re] * (u[re] * xfn[iFacelocal] * area[iFacelocal] + v[re] * yfn[iFacelocal] * area[iFacelocal] + w[re] * zfn[iFacelocal] * area[iFacelocal]);
+                }
+            }
+            else if (bcType == PHENGLEI::PRESSURE_OUTLET)
+            {
+                for (std::size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+
+                    RDouble fluxbValue = rho[re] * area[iFacelocal] * (u[re] * xfn[iFacelocal] + v[re] * yfn[iFacelocal] + w[re] * zfn[iFacelocal]);
+
+                    FaceFlux[iFacelocal] = fluxbValue;
+
+                    RDouble un = u[re] * xfn[iFacelocal] * area[iFacelocal] + v[re] * yfn[iFacelocal] * area[iFacelocal] + w[re] * zfn[iFacelocal] * area[iFacelocal];
+                    dun[iFacelocal] = fluxbValue / rho[re] - un;
+                }
+
+                RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+                if (cRho != nullptr)
+                {
+                    RDouble* pc = reinterpret_cast<RDouble*>(grid->GetDataPtr("pc"));
+                    for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                    {
+                        int iFacelocal = (*faceIndex)[iFace];
+                        int le = leftCellOfFace[iFacelocal];
+                        int re = rightCellOfFace[iFacelocal];
+                        FaceFlux[iFacelocal] += FaceFlux[iFacelocal] / rho[re] * cRho[re] * pc[re];
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::INTERFACE)
+            {
+                for (std::size_t iFaceLocal = 0; iFaceLocal < faceIndex->size(); ++iFaceLocal)
+                {
+                    int iFace = (*faceIndex)[iFaceLocal];
+                    int le = leftCellOfFace[iFace];
+                    int re = rightCellOfFace[iFace];
+                    RDouble ax = area[iFace] * xfn[iFace];
+                    RDouble ay = area[iFace] * yfn[iFace];
+                    RDouble az = area[iFace] * zfn[iFace];
+                    RDouble uf = faceWeightOfLeftCell[iFace] * u[le] + (1.0 - faceWeightOfLeftCell[iFace]) * u[re];
+                    RDouble vf = faceWeightOfLeftCell[iFace] * v[le] + (1.0 - faceWeightOfLeftCell[iFace]) * v[re];
+                    RDouble wf = faceWeightOfLeftCell[iFace] * w[le] + (1.0 - faceWeightOfLeftCell[iFace]) * w[re];
+                    RDouble un = uf * ax + vf * ay + wf * az;
+                    if (flowSolverName == "CompressibleSIMPLE")
+                    {
+                        RDouble cRhof = faceWeightOfLeftCell[iFace] * cRho[le] + (1.0 - faceWeightOfLeftCell[iFace]) * cRho[re];
+                        RDouble pcf = faceWeightOfLeftCell[iFace] * pc[le] + (1.0 - faceWeightOfLeftCell[iFace]) * pc[re];
+                        RDouble dx = cellCenterX[re] - cellCenterX[le];
+                        RDouble dy = cellCenterY[re] - cellCenterY[le];
+                        RDouble dz = cellCenterZ[re] - cellCenterZ[le];
+                        RDouble ad = ax * dx + ay * dy + az * dz;
+                        RDouble a2 = ax * ax + ay * ay + az * az;
+
+                        if (FaceFlux[iFace] > 0)
+                        {
+                            rhoFace[iFace] = rho[le];
+                        }
+                        else
+                        {
+                            rhoFace[iFace] = rho[re];
+                        }
+
+                        FaceFlux[iFace] += FaceFlux[iFace] * cRhof * pcf / rhoFace[iFace];
+
+                        FaceFlux[iFace] -= rhoFace[iFace] *
+                            ((hu[le] * faceWeightOfLeftCell[iFace] + hu[re] * (1.0 - faceWeightOfLeftCell[iFace])) * a2) / ad * (pc[re] - pc[le]);
+                        dun[iFace] = FaceFlux[iFace] / rhoFace[iFace] - un;
+                    }
+                    else
+                    {
+                        FaceFlux[iFace] += upperMatrixCoeff[iFace] * (pc[re] - pc[le]);
+                        dun[iFace] = FaceFlux[iFace] / rhoFace[iFace] - un;
+                    }
+                }
+            }
+        }
+    }
+
+    void MomEqCalculator:: pressureSourceTerm(Grid*  gridIn, int iVariable)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+
+        int nTotalCell = grid->GetNTotalCell();
+        RDouble *vol = grid->GetCellVolume();
+        RDouble *bCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("bCoeff"));
+        RDouble *dpdx = reinterpret_cast<RDouble *>(grid->GetDataPtr("dpdx"));
+        RDouble *dpdy = reinterpret_cast<RDouble *>(grid->GetDataPtr("dpdy"));
+        RDouble *dpdz = reinterpret_cast<RDouble *>(grid->GetDataPtr("dpdz"));
+        RDouble* gradp;
+
+        switch (iVariable)
+        {
+            case 0:
+                gradp = dpdx;
+                break;
+            case 1:
+                gradp = dpdy;
+                break;
+            case 2:
+                gradp = dpdz;
+                break;
+        }
+
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            bCoeff[iCell] -= gradp[iCell] * vol[iCell];
+        }
+    }
+
+    void MomEqCalculator:: BulkVisSourceTerm(Grid*  gridIn, int iVariable)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+        int nTotalCell = grid->GetNTotalCell();
+        int nTotalFace = grid->GetNTotalFace();
+        int nBoundFace = grid->GetNBoundFace();
+
+        int* leftCellOfFace = grid->GetLeftCellOfFace();
+        int* rightCellOfFace = grid->GetRightCellOfFace();
+        RDouble* area = grid->GetFaceArea();
+        RDouble* faceNormalX = grid->GetFaceNormalX();
+        RDouble* faceNormalY = grid->GetFaceNormalY();
+        RDouble* faceNormalZ = grid->GetFaceNormalZ();
+
+        RDouble *bCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("bCoeff"));
+        RDouble* faceWeightOfLeftCell = reinterpret_cast<RDouble*>(grid->GetDataPtr("faceWeightOfLeftCell"));
+        RDouble* mu = reinterpret_cast<RDouble*>(grid->GetDataPtr("mu"));
+        RDouble *dudx = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdx"));
+        RDouble *dvdy = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdy"));
+        RDouble *dwdz = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdz"));
+
+        RDouble* gradq;
+        RDouble* faceNormal;
+
+        switch (iVariable)
+        {
+            case IDX::S_IU:
+                gradq = dudx;
+                faceNormal = faceNormalX;
+                break;
+            case IDX::S_IV:
+                gradq = dvdy;
+                faceNormal = faceNormalY;
+                break;
+            case IDX::S_IW:
+                gradq = dwdz;
+                faceNormal = faceNormalZ;
+                break;
+        }
+
+        for (int iFace = nBoundFace; iFace < nTotalFace; ++iFace)
+        {
+            int icL = leftCellOfFace[iFace];
+            int icR = rightCellOfFace[iFace];
+            RDouble ax = area[iFace] * faceNormal[iFace];
+            RDouble muF = faceWeightOfLeftCell[iFace] * mu[icL] + (1.0 - faceWeightOfLeftCell[iFace]) * mu[icR];
+            RDouble dudxF = faceWeightOfLeftCell[iFace] * gradq[icL] + (1.0 - faceWeightOfLeftCell[iFace]) * gradq[icR];
+            bCoeff[icL] -= (2 / 3) * muF * dudxF * ax;
+            bCoeff[icR] -= (2 / 3) * muF * dudxF * ax;
+        }
+
+        for (int ibFace = 0; ibFace < nBoundFace; ++ibFace)
+        {
+            int icL = leftCellOfFace[ibFace];
+            int icR = rightCellOfFace[ibFace];
+            RDouble muF = mu[icR];
+            RDouble ax = area[ibFace] * faceNormal[ibFace];
+            RDouble dudxF = gradq[icL];
+
+            bCoeff[icL] -= (2 / 3) * muF * dudxF * ax;
+        }
+    }
+
+    void MomEqCalculator:: GravitySourceTerm(Grid*  gridIn, int iVariable)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+
+        int nTotalCell = grid->GetNTotalCell();
+        RDouble *vol = grid->GetCellVolume();
+        RDouble *rho = reinterpret_cast<RDouble *>(grid->GetDataPtr("rho"));
+        RDouble *bCoeff = reinterpret_cast<RDouble *>(grid->GetDataPtr("bCoeff"));
+
+        int isBoussinesqApproximation = GlobalDataBase::GetIntParaFromDB("isBoussinesqApproximation");
+
+        RDouble gx = GlobalDataBase::GetDoubleParaFromDB("gravityX");
+        RDouble gy = GlobalDataBase::GetDoubleParaFromDB("gravityY");
+        RDouble gz = GlobalDataBase::GetDoubleParaFromDB("gravityZ");
+
+        RDouble gDir;
+        if (iVariable ==IDX::S_IU)
+        {
+            gDir = gx;
+        }
+        else if (iVariable ==IDX::S_IV)
+        {
+            gDir = gy;
+        }
+        else if (iVariable ==IDX::S_IW)
+        {
+            gDir = gz;
+        }
+
+        for (int iCell = 0; iCell < nTotalCell; ++iCell)
+        {
+            RDouble bouCoe = 1.0;
+            if (isBoussinesqApproximation)
+            {
+                RDouble thermalExpansionCoeff = GlobalDataBase::GetDoubleParaFromDB("thermalExpansionCoeff");  //! coefficient of thermal expansion.
+                RDouble refT = GlobalDataBase::GetDoubleParaFromDB("refT");
+                RDouble *T = reinterpret_cast<RDouble *>(grid->GetDataPtr("T"));
+
+                bouCoe = -thermalExpansionCoeff * (T[iCell] - refT);
+            }
+            bCoeff[iCell] += gDir * rho[iCell] * vol[iCell] * bouCoe;
+        }
+    }
+
+    void MomEqCalculator::CalcOtherbCoeff(Grid* gridIn, int iVariable)
+    {
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+
+        pressureSourceTerm(grid, iVariable);
+
+        BulkVisSourceTerm(grid, iVariable);
+
+        int isCalGravityVisSource = GlobalDataBase::GetIntParaFromDB("isCalGravityVisSource"); 
+        if (isCalGravityVisSource == 1)
+        {
+            GravitySourceTerm(grid, iVariable);
+        }
+    }
+
+
+    void MomEqCalculator::SolveExplicitVelocityEquations(Grid*  gridIn)
+    {  
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+        int nTotalCell = grid->GetNTotalCell();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotalFace = grid->GetNTotalFace();
+        int nTotalInnerFace = nTotalFace - nBoundFace;
+
+        int* leftCellOfFace = grid->GetLeftCellOfFace();
+        int* rightCellOfFace = grid->GetRightCellOfFace();
+        RDouble* vol = grid->GetCellVolume();
+        RDouble *uc = reinterpret_cast<RDouble *> (grid->GetDataPtr("uc"));
+        RDouble *vc = reinterpret_cast<RDouble *> (grid->GetDataPtr("vc"));
+        RDouble *wc = reinterpret_cast<RDouble *> (grid->GetDataPtr("wc"));
+        RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+        RDouble *upperMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("upperMatrixCoeff"));
+        RDouble *lowerMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("lowerMatrixCoeff"));
+        RDouble *dpcdx = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpcdx"));
+        RDouble *dpcdy = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpcdy"));
+        RDouble *dpcdz = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpcdz"));
+        RDouble PPEqRelaxCoeff = GlobalDataBase::GetDoubleParaFromDB("PPEqRelaxCoeff");
+        RDouble *u = reinterpret_cast<RDouble *> (grid->GetDataPtr("U"));
+        RDouble *v = reinterpret_cast<RDouble *> (grid->GetDataPtr("V"));
+        RDouble *w = reinterpret_cast<RDouble *> (grid->GetDataPtr("W"));
+        RDouble *p = reinterpret_cast<RDouble *> (grid->GetDataPtr("P"));
+        RDouble *InverseAp = reinterpret_cast<RDouble *> (grid->GetDataPtr("InverseAp"));
+
+        CalcGrad(grid);
+
+        constructMatrixACoeff(grid, IDX::S_IU);
+        CoefPrepForPres(grid);
+
+        for (int iFace = nBoundFace; iFace < nTotalFace; ++iFace)
+        {
+            int le = leftCellOfFace [iFace];
+            int re = rightCellOfFace[iFace];
+
+            u[le] += (InverseAp[le]  * dpcdx[le] * PPEqRelaxCoeff * upperMatrixCoeff[iFace]) / diagMatrixCoeff[le];
+            v[le] += (InverseAp[le]  * dpcdy[le] * PPEqRelaxCoeff * upperMatrixCoeff[iFace]) / diagMatrixCoeff[le];
+            w[le] += (InverseAp[le]  * dpcdz[le] * PPEqRelaxCoeff * upperMatrixCoeff[iFace]) / diagMatrixCoeff[le];
+
+            u[re] += (InverseAp[re]  * dpcdx[re] * PPEqRelaxCoeff * lowerMatrixCoeff[iFace]) / diagMatrixCoeff[re];
+            v[re] += (InverseAp[re]  * dpcdy[re] * PPEqRelaxCoeff * lowerMatrixCoeff[iFace]) / diagMatrixCoeff[re];
+            w[re] += (InverseAp[re]  * dpcdz[re] * PPEqRelaxCoeff * lowerMatrixCoeff[iFace]) / diagMatrixCoeff[re];
+        }
+
+        updateBCValue(grid);
+    }
+
+
+    void MomEqCalculator::UpdateUnsteadyFlux(Grid*  gridIn)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+
+        string flowSolverName = GlobalDataBase::GetStrParaFromDB("flowSolverName");
+        if (flowSolverName == "CompressibleSIMPLE")
+        {
+            int nTotalCell = grid->GetNTotalCell();
+            int nBoundFace = grid->GetNBoundFace();
+            int nTotalFace = grid->GetNTotalFace();
+            int* leftCellOfFace = grid->GetLeftCellOfFace();
+            int* rightCellOfFace = grid->GetRightCellOfFace();
+            RDouble* area = grid->GetFaceArea();
+            RDouble* xfn = grid->GetFaceNormalX();
+            RDouble* yfn = grid->GetFaceNormalY();
+            RDouble* zfn = grid->GetFaceNormalZ();
+            RDouble* cellCenterX = grid->GetCellCenterX();
+            RDouble* cellCenterY = grid->GetCellCenterY();
+            RDouble* cellCenterZ = grid->GetCellCenterZ();
+            unsigned int nTotal = nTotalCell + nBoundFace;
+            RDouble *u = reinterpret_cast<RDouble *> (grid->GetDataPtr("U"));
+            RDouble *v = reinterpret_cast<RDouble *> (grid->GetDataPtr("V"));
+            RDouble *w = reinterpret_cast<RDouble *> (grid->GetDataPtr("W"));
+            RDouble *p = reinterpret_cast<RDouble *> (grid->GetDataPtr("P"));
+            RDouble *pc = reinterpret_cast<RDouble *> (grid->GetDataPtr("pc"));
+            RDouble *hu = reinterpret_cast<RDouble *> (grid->GetDataPtr("hu"));
+            RDouble* rho  = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+            RDouble* mu   = reinterpret_cast<RDouble*>(grid->GetDataPtr("mu"));
+            RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+            RDouble* dun  = reinterpret_cast<RDouble*>(grid->GetDataPtr("dun"));
+            RDouble *rhoFace = reinterpret_cast<RDouble*>(grid->GetDataPtr("rhoFace"));
+            RDouble *cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+            RDouble *faceWeightOfLeftCell = reinterpret_cast<RDouble*>(grid->GetDataPtr("faceWeightOfLeftCell"));
+
+            for (int iFace = nBoundFace; iFace < nTotalFace; ++iFace)
+            {
+                int le = leftCellOfFace[iFace];
+                int re = rightCellOfFace[iFace];
+
+                RDouble ax = area[iFace] * xfn[iFace];
+                RDouble ay = area[iFace] * yfn[iFace];
+                RDouble az = area[iFace] * zfn[iFace];
+
+                RDouble cRhof = faceWeightOfLeftCell[iFace] * cRho[le] + (1.0 - faceWeightOfLeftCell[iFace]) * cRho[re];
+                RDouble pcf = faceWeightOfLeftCell[iFace] * pc[le] + (1.0 - faceWeightOfLeftCell[iFace]) * pc[re];
+                RDouble dx = cellCenterX[re] - cellCenterX[le];
+                RDouble dy = cellCenterY[re] - cellCenterY[le];
+                RDouble dz = cellCenterZ[re] - cellCenterZ[le];
+                RDouble ad = ax * dx + ay * dy + az * dz;
+                RDouble a2 = ax * ax + ay * ay + az * az;
+                RDouble uFace = faceWeightOfLeftCell[iFace] * u[le] + (1.0 - faceWeightOfLeftCell[iFace]) * u[re];
+                RDouble vFace = faceWeightOfLeftCell[iFace] * v[le] + (1.0 - faceWeightOfLeftCell[iFace]) * v[re];
+                RDouble wFace = faceWeightOfLeftCell[iFace] * w[le] + (1.0 - faceWeightOfLeftCell[iFace]) * w[re];
+                RDouble un = uFace * ax + vFace * ay + wFace * az;
+
+                if (FaceFlux[iFace] > 0)
+                {
+                    rhoFace[iFace] = rho[le];
+                }
+                else
+                {
+                    rhoFace[iFace] = rho[re];
+                }
+
+                FaceFlux[iFace] += FaceFlux[iFace] * cRhof * pcf / rhoFace[iFace];
+
+                RDouble aj = rhoFace[iFace] * ((hu[le] * faceWeightOfLeftCell[iFace] + hu[re] * (1.0 - faceWeightOfLeftCell[iFace])) * a2) / ad;
+                FaceFlux[iFace] -= aj * (pc[re] - pc[le]);
+                dun[iFace] = FaceFlux[iFace] / rhoFace[iFace] - un;
+            }
+
+            InterfaceInfo* iinfo = grid->GetInterfaceInfo();
+            int nIFace = grid->GetNIFace();
+
+            for (int iFace = 0; iFace < nIFace; ++iFace)
+            {
+                int* interFace2BoundaryFace = iinfo->GetInterFace2BoundaryFace();
+                int boundFace = interFace2BoundaryFace[iFace];
+                int le = leftCellOfFace[boundFace];
+                int re = rightCellOfFace[boundFace];
+
+                RDouble ax = area[boundFace] * xfn[boundFace];
+                RDouble ay = area[boundFace] * yfn[boundFace];
+                RDouble az = area[boundFace] * zfn[boundFace];
+                RDouble cRhof = faceWeightOfLeftCell[boundFace] * cRho[le] + (1.0 - faceWeightOfLeftCell[boundFace]) * cRho[re];
+                RDouble pcf = faceWeightOfLeftCell[boundFace] * pc[le] + (1.0 - faceWeightOfLeftCell[boundFace]) * pc[re];
+                RDouble dx = cellCenterX[re] - cellCenterX[le];
+                RDouble dy = cellCenterY[re] - cellCenterY[le];
+                RDouble dz = cellCenterZ[re] - cellCenterZ[le];
+                RDouble ad = ax * dx + ay * dy + az * dz;
+                RDouble a2 = ax * ax + ay * ay + az * az;
+                RDouble uFace = faceWeightOfLeftCell[boundFace] * u[le] + (1.0 - faceWeightOfLeftCell[boundFace]) * u[re];
+                RDouble vFace = faceWeightOfLeftCell[boundFace] * v[le] + (1.0 - faceWeightOfLeftCell[boundFace]) * v[re];
+                RDouble wFace = faceWeightOfLeftCell[boundFace] * w[le] + (1.0 - faceWeightOfLeftCell[boundFace]) * w[re];
+                RDouble un = uFace * ax + vFace * ay + wFace * az;
+
+                if (FaceFlux[boundFace] > 0)
+                {
+                    rhoFace[boundFace] = rho[le];
+                }
+                else
+                {
+                    rhoFace[boundFace] = rho[re];
+                }
+
+                FaceFlux[boundFace] += FaceFlux[boundFace] * cRhof * pcf / rhoFace[boundFace];
+
+                RDouble aj = rhoFace[boundFace] * ((hu[le] * faceWeightOfLeftCell[boundFace] + hu[re] * (1.0 - faceWeightOfLeftCell[boundFace])) * a2) / ad;
+                FaceFlux[boundFace] -= aj * (pc[re] - pc[le]);
+                dun[boundFace] = FaceFlux[boundFace] / rhoFace[boundFace] - un;
+            }
+        }
+    }
+
+    void MomEqCalculator::IncompressibleInitial(Grid*  gridIn)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+
+        string flowSolverName = GlobalDataBase::GetStrParaFromDB("flowSolverName");
+        if (flowSolverName == "CompressibleSIMPLE")
+        {
+            RDouble* Rg = reinterpret_cast<RDouble*>(grid->GetDataPtr("Rg"));
+            GAS_SPACE::gas->UpdateRg(grid, Rg);
+        }
+
+
+        RDouble* rho  = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+        RDouble* mu   = reinterpret_cast<RDouble*>(grid->GetDataPtr("mu"));
+        RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+        RDouble* dun  = reinterpret_cast<RDouble*>(grid->GetDataPtr("dun"));
+        GAS_SPACE::gas->UpdateRho(grid, rho);
+        GAS_SPACE::gas->UpdateMu(grid, mu);
+
+        int nTotalCell = grid->GetNTotalCell();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotalFace = grid->GetNTotalFace();
+        int *leftCellOfFace = grid->GetLeftCellOfFace();
+        int *rightCellOfFace = grid->GetRightCellOfFace();
+        RDouble *area    = grid->GetFaceArea();
+        RDouble *xfn = grid->GetFaceNormalX();
+        RDouble *yfn = grid->GetFaceNormalY();
+        RDouble *zfn = grid->GetFaceNormalZ();
+        RDouble *u = reinterpret_cast<RDouble *> (grid->GetDataPtr("U"));
+        RDouble *v = reinterpret_cast<RDouble *> (grid->GetDataPtr("V"));
+        RDouble *w = reinterpret_cast<RDouble *> (grid->GetDataPtr("W"));
+        RDouble *p = reinterpret_cast<RDouble *> (grid->GetDataPtr("P"));
+        RDouble *bfU = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfU"));
+        RDouble *bfV = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfV"));
+        RDouble *bfW = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfW"));
+
+        RDouble *dpdx = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpdx"));
+        RDouble *dpdy = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpdy"));
+        RDouble *dpdz = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpdz"));
+        RDouble *rhoFace = reinterpret_cast<RDouble*>(grid->GetDataPtr("rhoFace"));
+        RDouble *faceWeightOfLeftCell = reinterpret_cast<RDouble *>(grid->GetDataPtr("faceWeightOfLeftCell"));
+
+        for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+        {
+            int le = leftCellOfFace[iFace];
+            int re = rightCellOfFace[iFace];
+            rhoFace[iFace] = faceWeightOfLeftCell[iFace] * rho[le] + (1.0 - faceWeightOfLeftCell[iFace]) * rho[re];
+            RDouble uFace = faceWeightOfLeftCell[iFace] * u[le] + (1.0 - faceWeightOfLeftCell[iFace]) * u[re];
+            RDouble vFace = faceWeightOfLeftCell[iFace] * v[le] + (1.0 - faceWeightOfLeftCell[iFace]) * v[re];
+            RDouble wFace = faceWeightOfLeftCell[iFace] * w[le] + (1.0 - faceWeightOfLeftCell[iFace]) * w[re];
+
+            RDouble ax = area[iFace] * xfn[iFace];
+            RDouble ay = area[iFace] * yfn[iFace];
+            RDouble az = area[iFace] * zfn[iFace];
+            FaceFlux[iFace] = rhoFace[iFace] * (uFace * ax + vFace * ay + wFace * az);
+            dun[iFace] = 0;
+        }
+
+        int bodyForceFlag = GlobalDataBase::GetIntParaFromDB("bodyForceFlag");
+        if (bodyForceFlag == 1)
+        {
+            for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+            {
+                bfU[iCell] = 0.0;
+                bfV[iCell] = 0.0;
+                bfW[iCell] = 0.0;
+                dpdx[iCell] = 0.0;
+                dpdy[iCell] = 0.0;
+                dpdz[iCell] = 0.0;
+            }
+        }
+
+        UpdateBoundaryPressureAndVelocity(grid);
+
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            int le = leftCellOfFace[iFace];
+            int re = rightCellOfFace[iFace];
+            RDouble uFace = u[re];
+            RDouble vFace = v[re];
+            RDouble wFace = w[re];
+
+            RDouble ax = area[iFace] * xfn[iFace];
+            RDouble ay = area[iFace] * yfn[iFace];
+            RDouble az = area[iFace] * zfn[iFace];
+            rhoFace[iFace] = rho[le];
+            FaceFlux[iFace] = rho[le] * (uFace * ax + vFace * ay + wFace * az);
+            dun[iFace] = 0;
+        }
+
+        InterfaceInfo* iinfo = grid->GetInterfaceInfo();
+        int nIFace = grid->GetNIFace();
+
+        for (int iFace = 0; iFace < nIFace; ++iFace)
+        {
+            int* interFace2BoundaryFace = iinfo->GetInterFace2BoundaryFace();
+            int boundFace = interFace2BoundaryFace[iFace];
+
+            int le = leftCellOfFace[boundFace];
+            int re = rightCellOfFace[boundFace];
+            rhoFace[boundFace] = faceWeightOfLeftCell[boundFace] * rho[le] + (1.0 - faceWeightOfLeftCell[boundFace]) * rho[re];
+            RDouble uFace = faceWeightOfLeftCell[boundFace] * u[le] + (1.0 - faceWeightOfLeftCell[boundFace]) * u[re];
+            RDouble vFace = faceWeightOfLeftCell[boundFace] * v[le] + (1.0 - faceWeightOfLeftCell[boundFace]) * v[re];
+            RDouble wFace = faceWeightOfLeftCell[boundFace] * w[le] + (1.0 - faceWeightOfLeftCell[boundFace]) * w[re];
+            RDouble ax = area[boundFace] * xfn[boundFace];
+            RDouble ay = area[boundFace] * yfn[boundFace];
+            RDouble az = area[boundFace] * zfn[boundFace];
+            FaceFlux[boundFace] = rhoFace[boundFace] * (uFace * ax + vFace * ay + wFace * az);
+            dun[boundFace] = 0;
+        }
+
+        InitialUnsteadyVar(grid);
+
+        CalcWalldistOnWall(grid);
+    }
+
+    void MomEqCalculator::CalcWalldistOnWall(Grid*  gridIn)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+
+        RDouble *xfn = grid->GetFaceNormalX();
+        RDouble *yfn = grid->GetFaceNormalY();
+        RDouble *zfn = grid->GetFaceNormalZ();
+        RDouble *xfc = grid->GetFaceCenterX();
+        RDouble *yfc = grid->GetFaceCenterY();
+        RDouble *zfc = grid->GetFaceCenterZ();
+        RDouble *xcc = grid->GetCellCenterX();
+        RDouble *ycc = grid->GetCellCenterY();
+        RDouble *zcc = grid->GetCellCenterZ();
+        int* leftCellOfFace = grid->GetLeftCellOfFace();
+        int* rightCellOfFace = grid->GetRightCellOfFace();
+        RDouble *wd = reinterpret_cast<RDouble *> (grid->GetDataPtr("wd"));
+
+        UnstructBCSet* unstructBCSet = grid->GetUnstructBCSet();
+        int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+        for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+        {
+            UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+            int bcType = bcRegion->GetBCType();
+            if (bcType == 2)
+            {
+                vector<int>* faceIndex = bcRegion->GetFaceIndex();
+
+                for (int iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+
+                    double FaceNormalX = -xfn[iFacelocal];
+                    double FaceNormalY = -yfn[iFacelocal];
+                    double FaceNormalZ = -zfn[iFacelocal];
+
+                    double DisCelltoFaceX = xcc[le] - xfc[iFacelocal];
+                    double DisCelltoFaceY = ycc[le] - yfc[iFacelocal];
+                    double DisCelltoFaceZ = zcc[le] - zfc[iFacelocal];
+                    wd[re] = (FaceNormalX * DisCelltoFaceX + FaceNormalY * DisCelltoFaceY + FaceNormalZ * DisCelltoFaceZ)
+                        / std::sqrt(FaceNormalX * FaceNormalX + FaceNormalY * FaceNormalY + FaceNormalZ * FaceNormalZ);
+                }
+            }
+        }
+    }
+
+    void MomEqCalculator::UpdateBoundaryPressureAndVelocity(Grid*  gridIn)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+        RDouble *area    = grid->GetFaceArea();
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+
+        for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+            int bcType = bcRegion->GetBCType();
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            Data_Param *bcData = bcRegion->GetBCParamDataBase();
+
+            const int SubsonicInletBC       = 100001;
+            const int SupersonicInletBC       = 100002;
+            const int SupersonicOutletBC       = 100003;
+
+            if (bcType == PHENGLEI::SOLID_SURFACE)
+            {
+                RDouble ub, vb, wb;
+                int *leftCellOfFace = grid->GetLeftCellOfFace();
+                int *rightCellOfFace = grid->GetRightCellOfFace();
+                RDouble *u = reinterpret_cast<RDouble *>(grid->GetDataPtr("U"));
+                RDouble *v = reinterpret_cast<RDouble *>(grid->GetDataPtr("V"));
+                RDouble *w = reinterpret_cast<RDouble *>(grid->GetDataPtr("W"));
+
+                for (std::size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+
+                    int re = rightCellOfFace[iFacelocal];
+
+                    if (bcData)
+                    {
+                        if (bcData->IsExist("initU", PHDOUBLE, 1))
+                        {
+                            bcData->GetData("initU", &ub, PHDOUBLE, 1);
+                        }
+                        else
+                        {
+                            ub = 0.0;
+                        }
+
+                        if (bcData->IsExist("initV", PHDOUBLE, 1))
+                        {
+                            bcData->GetData("initV", &vb, PHDOUBLE, 1);
+                        }
+                        else
+                        {
+                            vb = 0.0;
+                        }
+
+                        if (bcData->IsExist("initW", PHDOUBLE, 1))
+                        {
+                            bcData->GetData("initW", &wb, PHDOUBLE, 1);
+                        }
+                        else
+                        {
+                            wb = 0.0;
+                        }
+
+                        u[re] = RDouble(ub);
+                        v[re] = RDouble(vb);
+                        w[re] = RDouble(wb);
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::SYMMETRY)
+            {
+                int* leftCellOfFace = grid->GetLeftCellOfFace();
+                int* rightCellOfFace = grid->GetRightCellOfFace();
+                int nTotalCell = grid->GetNTotalCell();
+                RDouble* u = reinterpret_cast<RDouble*>(grid->GetDataPtr("U"));
+                RDouble* v = reinterpret_cast<RDouble*>(grid->GetDataPtr("V"));
+                RDouble* w = reinterpret_cast<RDouble*>(grid->GetDataPtr("W"));
+                RDouble* mu = reinterpret_cast<RDouble*>(grid->GetDataPtr("mu"));
+                RDouble* xfn = grid->GetFaceNormalX();
+                RDouble* yfn = grid->GetFaceNormalY();
+                RDouble* zfn = grid->GetFaceNormalZ();
+
+                for (std::size_t i = 0; i < faceIndex->size(); ++i)
+                {
+                    int iFace = (*faceIndex)[i];
+                    int le = leftCellOfFace[iFace];
+                    int re = rightCellOfFace[iFace];
+                    RDouble muLocal = mu[le];
+
+                    u[re] = u[le] - u[le] * xfn[iFace];
+                    v[re] = v[le] - v[le] * yfn[iFace];
+                    w[re] = w[le] - w[le] * zfn[iFace];
+                }
+            }
+            else if (bcType == PHENGLEI::FARFIELD)
+            {
+                FlowFarField_GetBoundrayData(grid, bcData);
+
+                RDouble* u = reinterpret_cast<RDouble*>(grid->GetDataPtr("U"));
+                RDouble* v = reinterpret_cast<RDouble*>(grid->GetDataPtr("V"));
+                RDouble* w = reinterpret_cast<RDouble*>(grid->GetDataPtr("W"));
+                RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));        
+                RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+                RDouble* p = reinterpret_cast<RDouble*>(grid->GetDataPtr("P"));
+                RDouble* T = reinterpret_cast<RDouble*>(grid->GetDataPtr("T"));
+                RDouble refflowU;
+                RDouble refflowV;
+                RDouble refflowW;
+                bcData->GetData("initU", &refflowU, PHDOUBLE, 1);
+                bcData->GetData("initV", &refflowV, PHDOUBLE, 1);
+                bcData->GetData("initW", &refflowW, PHDOUBLE, 1);
+
+
+                RDouble refflowT;
+                RDouble refflowP;
+                bcData->GetData("initT", &refflowT, PHDOUBLE, 1);
+                bcData->GetData("initP", &refflowP, PHDOUBLE, 1);
+
+                int* leftCellOfFace = grid->GetLeftCellOfFace();
+                int* rightCellOfFace = grid->GetRightCellOfFace();
+                RDouble* xfn = grid->GetFaceNormalX();
+                RDouble* yfn = grid->GetFaceNormalY();
+                RDouble* zfn = grid->GetFaceNormalZ();
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+                    if (FaceFlux[iFacelocal] < 0)
+                    {
+                        u[re] = refflowU;
+                        v[re] = refflowV;
+                        w[re] = refflowW;
+                        p[re] = p[le];
+
+                        FaceFlux[iFacelocal] = rho[re]* (u[re] * xfn[iFacelocal] + v[re] * yfn[iFacelocal] + w[re] * zfn[iFacelocal]);
+
+                    }
+                    else
+                    {
+                        u[re] = u[le];
+                        v[re] = v[le];
+                        w[re] = w[le];
+                        p[re] = refflowP;
+                        FaceFlux[iFacelocal] = rho[le] * (u[le] * xfn[iFacelocal] + v[le] * yfn[iFacelocal] + w[le] * zfn[iFacelocal]);
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::INFLOW)
+            {
+                RDouble ub, vb, wb;
+                int *leftCellOfFace = grid->GetLeftCellOfFace();
+                int *rightCellOfFace = grid->GetRightCellOfFace();
+                RDouble *u = reinterpret_cast<RDouble *>(grid->GetDataPtr("U"));
+                RDouble *v = reinterpret_cast<RDouble *>(grid->GetDataPtr("V"));
+                RDouble *w = reinterpret_cast<RDouble *>(grid->GetDataPtr("W"));
+
+                RDouble* xfn = grid->GetFaceNormalX();
+                RDouble* yfn = grid->GetFaceNormalY();
+                RDouble* zfn = grid->GetFaceNormalZ();
+
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+
+                    int re = rightCellOfFace[iFacelocal];
+
+                    if (bcData)
+                    {
+                        if (bcData->IsExist("initU", PHDOUBLE, 1))
+                        {
+                            bcData->GetData("initU", &ub, PHDOUBLE, 1);
+                        }
+                        else
+                        {
+                            ub = 0.0;
+                        }
+
+                        if (bcData->IsExist("initV", PHDOUBLE, 1))
+                        {
+                            bcData->GetData("initV", &vb, PHDOUBLE, 1);
+                        }
+                        else
+                        {
+                            vb = 0.0;
+                        }
+
+                        if (bcData->IsExist("initW", PHDOUBLE, 1))
+                        {
+                            bcData->GetData("initW", &wb, PHDOUBLE, 1);
+                        }
+                        else
+                        {
+                            wb = 0.0;
+                        }
+
+                        if (bcData->IsExist("totalVelocity", PHDOUBLE, 1))
+                        {
+                            RDouble totalVelocity;
+                            bcData->GetData("totalVelocity", &totalVelocity, PHDOUBLE, 1);
+                            ub = -totalVelocity * xfn[iFacelocal];
+                            vb = -totalVelocity * yfn[iFacelocal];
+                            wb = -totalVelocity * zfn[iFacelocal];
+                        }
+
+                        u[re] = ub;
+                        v[re] = vb;
+                        w[re] = wb;
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::OUTFLOW)
+            {
+            }
+            else if (bcType == PHENGLEI::PRESSURE_INLET)
+            {
+                int* leftCellOfFace = grid->GetLeftCellOfFace();
+                int* rightCellOfFace = grid->GetRightCellOfFace();
+                RDouble* u = reinterpret_cast<RDouble*>(grid->GetDataPtr("U"));
+                RDouble* v = reinterpret_cast<RDouble*>(grid->GetDataPtr("V"));
+                RDouble* w = reinterpret_cast<RDouble*>(grid->GetDataPtr("W"));
+                RDouble* area = grid->GetFaceArea();
+                RDouble* xfn = grid->GetFaceNormalX();
+                RDouble* yfn = grid->GetFaceNormalY();
+                RDouble* zfn = grid->GetFaceNormalZ();
+                RDouble* xfc = grid->GetFaceCenterX();
+                RDouble* yfc = grid->GetFaceCenterY();
+                RDouble* zfc = grid->GetFaceCenterZ();
+                RDouble* xcc = grid->GetCellCenterX();
+                RDouble* ycc = grid->GetCellCenterY();
+                RDouble* zcc = grid->GetCellCenterZ();
+                RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+                RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+                RDouble* p = reinterpret_cast<RDouble*>(grid->GetDataPtr("P"));
+                RDouble* ptotal = reinterpret_cast<RDouble*>(grid->GetDataPtr("Ptotal"));
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+                    RDouble ptotalb;
+                    if (bcData)
+                    {
+                        if (bcData->IsExist("totalPressure", PHDOUBLE, 1))
+                        {
+                            bcData->GetData("totalPressure", &ptotalb, PHDOUBLE, 1);
+                        }
+                        else
+                        {
+                            ptotalb = 0.0;
+                        }
+            
+                        ptotal[re] = ptotalb;
+                        p[re] = 1;
+                    }
+                    RDouble vtotal = pow(((ptotal[re] - p[re]) * 2 / rho[re]), 0.5);
+                    u[re] = -vtotal * xfn[iFacelocal];
+                    v[re] = -vtotal * yfn[iFacelocal];
+                    w[re] = -vtotal * zfn[iFacelocal];
+                    FaceFlux[iFacelocal] = rho[re] * (u[re] * xfn[iFacelocal] * area[iFacelocal] + v[re] * yfn[iFacelocal] * area[iFacelocal] + w[re] * zfn[iFacelocal] * area[iFacelocal]);
+                }
+            }
+            else if (bcType == PHENGLEI::PRESSURE_OUTLET)
+            {
+            }
+            else 
+            {
+            }
+
+
+
+            if (bcType == PHENGLEI::SOLID_SURFACE)
+
+            {
+                int *leftCellOfFace = grid->GetLeftCellOfFace();
+                int *rightCellOfFace = grid->GetRightCellOfFace();
+
+                RDouble *xfc = grid->GetFaceCenterX();
+                RDouble *yfc = grid->GetFaceCenterY();
+                RDouble *zfc = grid->GetFaceCenterZ();
+
+                RDouble *xcc = grid->GetCellCenterX();
+                RDouble *ycc = grid->GetCellCenterY();
+                RDouble *zcc = grid->GetCellCenterZ();
+
+                RDouble *p = reinterpret_cast<RDouble *>(grid->GetDataPtr("P"));
+                RDouble *dpdx = reinterpret_cast<RDouble *>(grid->GetDataPtr("dpdx"));
+                RDouble *dpdy = reinterpret_cast<RDouble *>(grid->GetDataPtr("dpdy"));
+                RDouble *dpdz = reinterpret_cast<RDouble *>(grid->GetDataPtr("dpdz"));
+                if (GlobalDataBase::GetIntParaFromDB("bodyForceFlag"))
+                {
+                    RDouble *bfU = reinterpret_cast<RDouble *>(grid->GetDataPtr("bfU"));
+                    RDouble *bfV = reinterpret_cast<RDouble *>(grid->GetDataPtr("bfV"));
+                    RDouble *bfW = reinterpret_cast<RDouble *>(grid->GetDataPtr("bfW"));
+                    RDouble *cellVolume = grid->GetCellVolume();
+
+                    for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                    {
+                        int iFacelocal = (*faceIndex)[iFace];
+                        int le = leftCellOfFace[iFacelocal];
+                        int re = rightCellOfFace[iFacelocal];
+                        RDouble faceCenterX = xfc[iFacelocal];
+                        RDouble faceCenterY = yfc[iFacelocal];
+                        RDouble faceCenterZ = zfc[iFacelocal];
+                        RDouble cellCenterXle = xcc[le];
+                        RDouble cellCenterYle = ycc[le];
+                        RDouble cellCenterZle = zcc[le];
+
+                        RDouble dx = faceCenterX - cellCenterXle;
+                        RDouble dy = faceCenterY - cellCenterYle;
+                        RDouble dz = faceCenterZ - cellCenterZle;
+                        p[re] = p[le] + bfU[le] * dx + bfV[le] * dy + bfW[le] * dz;
+                    }
+                }
+                else
+                {
+                    for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                    {
+                        int iFacelocal = (*faceIndex)[iFace];
+                        int le = leftCellOfFace[iFacelocal];
+                        int re = rightCellOfFace[iFacelocal];
+                        RDouble faceCenterX = xfc[iFacelocal];
+                        RDouble faceCenterY = yfc[iFacelocal];
+                        RDouble faceCenterZ = zfc[iFacelocal];
+                        RDouble cellCenterXle = xcc[le];
+                        RDouble cellCenterYle = ycc[le];
+                        RDouble cellCenterZle = zcc[le];
+                        RDouble dx = faceCenterX - cellCenterXle;
+                        RDouble dy = faceCenterY - cellCenterYle;
+                        RDouble dz = faceCenterZ - cellCenterZle;
+                        p[re] = p[le];
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::SYMMETRY)
+
+            {
+                int* leftCellOfFace = grid->GetLeftCellOfFace();
+                int* rightCellOfFace = grid->GetRightCellOfFace();
+                RDouble* p = reinterpret_cast<RDouble*>(grid->GetDataPtr("P"));
+                RDouble* dpdx = (RDouble*)grid->GetDataPtr("dpdx");
+                RDouble* dpdy = (RDouble*)grid->GetDataPtr("dpdy");
+                RDouble* dpdz = (RDouble*)grid->GetDataPtr("dpdz");
+                RDouble* xfn = grid->GetFaceNormalX();
+                RDouble* yfn = grid->GetFaceNormalY();
+                RDouble* zfn = grid->GetFaceNormalZ();
+
+                for (std::size_t i = 0; i < faceIndex->size(); ++i)
+                {
+                    int iFace = (*faceIndex)[i];
+                    int re = rightCellOfFace[iFace];
+                    int le = leftCellOfFace[iFace];
+
+                    RDouble dpbdx = dpdx[le] - (dpdx[le] * xfn[iFace] + dpdy[le] * yfn[iFace] + dpdz[le] * zfn[iFace]) * xfn[iFace];
+                    RDouble dpbdy = dpdy[le] - (dpdx[le] * xfn[iFace] + dpdy[le] * yfn[iFace] + dpdz[le] * zfn[iFace]) * yfn[iFace];
+                    RDouble dpbdz = dpdz[le] - (dpdx[le] * xfn[iFace] + dpdy[le] * yfn[iFace] + dpdz[le] * zfn[iFace]) * zfn[iFace];
+                    p[re] = p[le];
+                }
+            }
+            else if (bcType == PHENGLEI::FARFIELD)
+
+            {
+                RDouble refMachNumber = 0.0;
+                int* leftCellOfFace = grid->GetLeftCellOfFace();
+                int* rightCellOfFace = grid->GetRightCellOfFace();
+                RDouble* p = reinterpret_cast<RDouble*>(grid->GetDataPtr("P"));
+                RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+                RDouble* u = reinterpret_cast<RDouble*>(grid->GetDataPtr("U"));
+                RDouble* v = reinterpret_cast<RDouble*>(grid->GetDataPtr("V"));
+                RDouble* w = reinterpret_cast<RDouble*>(grid->GetDataPtr("W"));
+                RDouble* xfn = grid->GetFaceNormalX();
+                RDouble* yfn = grid->GetFaceNormalY();
+                RDouble* zfn = grid->GetFaceNormalZ();
+
+                RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+                RDouble initRg = GlobalDataBase::GetDoubleParaFromDB("initRg");
+                RDouble refflowU;
+                RDouble refflowV;
+                RDouble refflowW;
+                bcData->GetData("initU", &refflowU, PHDOUBLE, 1);
+                bcData->GetData("initV", &refflowV, PHDOUBLE, 1);
+                bcData->GetData("initW", &refflowW, PHDOUBLE, 1);
+                RDouble refflowT;
+                RDouble refflowP;
+                bcData->GetData("initT", &refflowT, PHDOUBLE, 1);
+                bcData->GetData("initP", &refflowP, PHDOUBLE, 1);
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+                    if (FaceFlux[iFacelocal] < 0)
+                    {
+                        u[re] = refflowU;
+                        v[re] = refflowV;
+                        w[re] = refflowW;
+                        p[re] = p[le];
+                        RDouble fluxbValue = rho[re] * area[iFacelocal] * (u[re] * xfn[iFacelocal] + v[re] * yfn[iFacelocal] + w[re] * zfn[iFacelocal]);
+                        if (fluxbValue < 0)
+                        {
+                            FaceFlux[iFacelocal] = fluxbValue;
+                        }
+                        else
+                        {
+                            FaceFlux[iFacelocal] = 0;
+                        }
+                    }
+                    else
+                    {
+                        u[re] = u[le];
+                        v[re] = v[le];
+                        w[re] = w[le];
+                        p[re] = refflowP;
+                        RDouble fluxbValue = rho[re] * area[iFacelocal] * (u[re] * xfn[iFacelocal] + v[re] * yfn[iFacelocal] + w[re] * zfn[iFacelocal]);
+
+                        if (fluxbValue >= 0)
+                        {
+                            FaceFlux[iFacelocal] = fluxbValue;
+                        }
+                        else
+                        {
+                            FaceFlux[iFacelocal] = 0;
+                        }
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::INFLOW)
+
+            {
+                int *leftCellOfFace = grid->GetLeftCellOfFace();
+                int *rightCellOfFace = grid->GetRightCellOfFace();
+                RDouble *p = reinterpret_cast<RDouble *>(grid->GetDataPtr("P"));
+                RDouble *pc = reinterpret_cast<RDouble *>(grid->GetDataPtr("pc"));
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+                    p[re] = p[le];
+                }
+            }
+            else if (bcType == PHENGLEI::OUTFLOW)
+
+            {
+                RDouble pb;
+                int *rightCellOfFace = grid->GetRightCellOfFace();
+                RDouble *p = reinterpret_cast<RDouble *>(grid->GetDataPtr("P"));
+                for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+                {
+                    const int iFacelocal = (*faceIndex)[iFace];
+                    int re = rightCellOfFace[iFacelocal];
+
+                    if (bcData)
+                    {
+                        if (bcData->IsExist("initP", PHDOUBLE, 1))
+                        {
+                            bcData->GetData("initP", &pb, PHDOUBLE, 1);
+                        }
+                        else
+                        {
+                            pb = 0.0;
+                        }
+
+                        p[re] = pb;
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::PRESSURE_INLET)
+            {
+                RDouble ptotalb;
+                int* leftCellOfFace = grid->GetLeftCellOfFace();
+                int* rightCellOfFace = grid->GetRightCellOfFace();
+            
+                RDouble* p = reinterpret_cast<RDouble*>(grid->GetDataPtr("P"));
+                RDouble* ptotal = reinterpret_cast<RDouble*>(grid->GetDataPtr("Ptotal"));
+                RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+                    RDouble* u = reinterpret_cast<RDouble*>(grid->GetDataPtr("U"));
+                    RDouble* v = reinterpret_cast<RDouble*>(grid->GetDataPtr("V"));
+                    RDouble* w = reinterpret_cast<RDouble*>(grid->GetDataPtr("W"));
+                    if (bcData)
+                    {
+                        if (bcData->IsExist("totalPressure", PHDOUBLE, 1))
+                        {
+                            bcData->GetData("totalPressure", &ptotalb, PHDOUBLE, 1);
+                        }
+                        else
+                        {
+                            ptotalb = 0.0;
+                        }
+            
+                        ptotal[re] = ptotalb;
+                        p[re] = ptotal[re]-0.5*rho[le]*(pow(u[re],2)+pow(v[re], 2)+pow(w[re], 2));
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::PRESSURE_OUTLET)
+            
+            {
+                RDouble pb;
+                int *rightCellOfFace = grid->GetRightCellOfFace();
+                RDouble *p = reinterpret_cast<RDouble *>(grid->GetDataPtr("P"));
+                for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+                {
+                    const int iFacelocal = (*faceIndex)[iFace];
+                    int re = rightCellOfFace[iFacelocal];
+            
+                    if (bcData)
+                    {
+                        if (bcData->IsExist("initP", PHDOUBLE, 1))
+                        {
+                            bcData->GetData("initP", &pb, PHDOUBLE, 1);
+                        }
+                        else
+                        {
+                            pb = 0.0;
+                        }
+            
+                        p[re] = pb;
+                    }
+                }
+            }
+            else if (bcType == SubsonicInletBC)
+            {
+            }
+            else if (bcType == SupersonicInletBC)
+            {
+            }
+            else if (bcType == SupersonicOutletBC)
+            
+            {
+                RDouble pb;
+                int* leftCellOfFace = grid->GetLeftCellOfFace();
+                int* rightCellOfFace = grid->GetRightCellOfFace();
+                RDouble* p = reinterpret_cast<RDouble*>(grid->GetDataPtr("P"));
+            
+                int isSupersonic = GlobalDataBase::GetIntParaFromDB("isSupersonic");
+                if (isSupersonic)
+                {
+                    for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                    {
+                        int iFacelocal = (*faceIndex)[iFace];
+                        int le = leftCellOfFace[iFacelocal];
+                        int re = rightCellOfFace[iFacelocal];
+                        p[re] = p[le];
+                    }
+                }
+                else
+                {
+                    for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                    {
+                        int iFacelocal = (*faceIndex)[iFace];
+                        int le = leftCellOfFace[iFacelocal];
+                        int re = rightCellOfFace[iFacelocal];
+            
+                        if (bcData)
+                        {
+                            if (bcData->IsExist("initP", PHDOUBLE, 1))
+                            {
+                                bcData->GetData("initP", &pb, PHDOUBLE, 1);
+                            }
+                            else
+                            {
+                                pb = 0.0;
+                            }
+            
+                            p[re] = pb;
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    void MomEqCalculator::AllocateGlobalVar(Grid*  gridIn)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+        int nTotalFace = grid->GetNTotalFace();
+        int nTotalCell = grid->GetNTotalCell();
+        int nBoundFace = grid->GetNBoundFace();
+        int nIFace = grid->GetNIFace();
+        int nTotal = nTotalCell + nBoundFace;
+
+        RDouble *u = NewPointer<RDouble>(nTotal);
+        grid->UpdateDataPtr("U", u);
+
+        RDouble *v = NewPointer<RDouble>(nTotal);
+        grid->UpdateDataPtr("V", v);
+
+        RDouble *w = NewPointer<RDouble>(nTotal);
+        grid->UpdateDataPtr("W", w);
+
+        RDouble *p = NewPointer<RDouble>(nTotal);
+        grid->UpdateDataPtr("P", p);
+
+        RDouble *pc = NewPointer<RDouble>(nTotal);
+        grid->UpdateDataPtr("pc", pc);
+
+        RDouble *ptotal = NewPointer<RDouble>(nTotal);
+        grid->UpdateDataPtr("Ptotal", ptotal);
+
+        RDouble *diagMatrixCoeff = NewPointer<RDouble>(nTotal);
+        grid->UpdateDataPtr("diagMatrixCoeff", diagMatrixCoeff);
+
+        RDouble *bCoeff = NewPointer<RDouble>(nTotal);
+        grid->UpdateDataPtr("bCoeff", bCoeff);
+
+        RDouble *upperMatrixCoeff = NewPointer<RDouble>(nTotalFace);
+        grid->UpdateDataPtr("upperMatrixCoeff", upperMatrixCoeff);
+
+        RDouble *lowerMatrixCoeff = NewPointer<RDouble>(nTotalFace);
+        grid->UpdateDataPtr("lowerMatrixCoeff", lowerMatrixCoeff);
+
+
+        RDouble *FaceFlux = NewPointer<RDouble>(nTotalFace);
+        grid->UpdateDataPtr("FaceFlux", FaceFlux);
+
+
+        int bodyForceFlag = GlobalDataBase::GetIntParaFromDB("bodyForceFlag");
+        if (bodyForceFlag == 1)
+        {
+            RDouble *bfU = NewPointer<RDouble>(nTotal);
+            grid->UpdateDataPtr("bfU", bfU);
+
+            RDouble *bfV = NewPointer<RDouble>(nTotal);
+            grid->UpdateDataPtr("bfV", bfV);
+
+            RDouble *bfW = NewPointer<RDouble>(nTotal);
+            grid->UpdateDataPtr("bfW", bfW);
+
+            RDouble* dbfdx = NewPointer<RDouble>(nTotalCell);
+            RDouble* dbfdy = NewPointer<RDouble>(nTotalCell);
+            RDouble* dbfdz = NewPointer<RDouble>(nTotalCell);
+
+            grid->UpdateDataPtr("dbfdx", dbfdx);
+            grid->UpdateDataPtr("dbfdy", dbfdy);
+            grid->UpdateDataPtr("dbfdz", dbfdz);
+        }
+
+        RDouble *dun = NewPointer<RDouble>(nTotalFace);
+        grid->UpdateDataPtr("dun", dun);
+
+        RDouble *rho = NewPointer<RDouble>(nTotal);
+        grid->UpdateDataPtr("rho", rho);
+
+        RDouble *rhoFace = NewPointer<RDouble>(nTotalFace);
+        grid->UpdateDataPtr("rhoFace", rhoFace);
+
+        RDouble *mu = NewPointer<RDouble>(nTotal);
+        grid->UpdateDataPtr("mu", mu);
+
+
+        RDouble *hu = NewPointer<RDouble>(nTotal);
+        grid->UpdateDataPtr("hu", hu);
+
+        RDouble *InverseAp = NewPointer<RDouble>(nTotal);
+        grid->UpdateDataPtr("InverseAp", InverseAp);
+
+        RDouble *dudx = NewPointer<RDouble>(nTotal);
+        RDouble *dudy = NewPointer<RDouble>(nTotal);
+        RDouble *dudz = NewPointer<RDouble>(nTotal);
+        RDouble *dvdx = NewPointer<RDouble>(nTotal);
+        RDouble *dvdy = NewPointer<RDouble>(nTotal);
+        RDouble *dvdz = NewPointer<RDouble>(nTotal);
+        RDouble *dwdx = NewPointer<RDouble>(nTotal);
+        RDouble *dwdy = NewPointer<RDouble>(nTotal);
+        RDouble *dwdz = NewPointer<RDouble>(nTotal);
+        RDouble *dpdx = NewPointer<RDouble>(nTotal);
+        RDouble *dpdy = NewPointer<RDouble>(nTotal);
+        RDouble *dpdz = NewPointer<RDouble>(nTotal);
+        RDouble *dpcdx = NewPointer<RDouble>(nTotal);
+        RDouble *dpcdy = NewPointer<RDouble>(nTotal);
+        RDouble *dpcdz = NewPointer<RDouble>(nTotal);
+
+        grid->UpdateDataPtr("dUdx", dudx);
+        grid->UpdateDataPtr("dUdy", dudy);
+        grid->UpdateDataPtr("dUdz", dudz);
+        grid->UpdateDataPtr("dVdx", dvdx);
+        grid->UpdateDataPtr("dVdy", dvdy);
+        grid->UpdateDataPtr("dVdz", dvdz);
+        grid->UpdateDataPtr("dWdx", dwdx);
+        grid->UpdateDataPtr("dWdy", dwdy);
+        grid->UpdateDataPtr("dWdz", dwdz);
+        grid->UpdateDataPtr("dpdx", dpdx);
+        grid->UpdateDataPtr("dpdy", dpdy);
+        grid->UpdateDataPtr("dpdz", dpdz);
+        grid->UpdateDataPtr("dpcdx", dpcdx);
+        grid->UpdateDataPtr("dpcdy", dpcdy);
+        grid->UpdateDataPtr("dpcdz", dpcdz);
+
+
+        RDouble* faceWeightOfLeftCell = NewPointer<RDouble>(nTotalFace);
+        grid->UpdateDataPtr("faceWeightOfLeftCell", faceWeightOfLeftCell);
+        
+        RDouble* wd = NewPointer<RDouble>(nTotal);
+        grid->UpdateDataPtr("wd", wd);
+
+        AllocateUnsteadyVar(grid);
+
+        string flowSolverName = GlobalDataBase::GetStrParaFromDB("flowSolverName");
+        if (flowSolverName == "CompressibleSIMPLE")
+        {
+            RDouble* cRho = NewPointer<RDouble>(nTotal);
+            grid->UpdateDataPtr("cRho", cRho);
+            PHSPACE::SetField(cRho, 0.0, nTotal);
+
+            RDouble initRg = GlobalDataBase::GetDoubleParaFromDB("initRg");
+            RDouble* Rg = NewPointer<RDouble>(nTotal);
+            grid->UpdateDataPtr("Rg", Rg);
+            PHSPACE::SetField(Rg, initRg, nTotal);
+        }
+    }
+
+    void MomEqCalculator::InitFlowAsRestart(Grid*  grid)
+    {
+        GAS_SPACE::gas->SetGasName("speciesNameIncom");
+        GAS_SPACE::gas->SetGasMolarMass("gasMolarMass");
+        GAS_SPACE::gas->SetGasRho("gasRho");
+        GAS_SPACE::gas->SetGasMu("gasMu");
+
+        int iunsteady =  GlobalDataBase::GetIntParaFromDB("iunsteady");
+        if (iunsteady)
+        {
+            int timeStepNow = 0;
+            GlobalDataBase::UpdateData("timeStepNow", &timeStepNow, PHINT, 1);
+            RDouble startTime = GlobalDataBase::GetDoubleParaFromDB("startTime");
+            GlobalDataBase::UpdateData("currentTime", &startTime, PHDOUBLE, 1);
+        }
+
+        int nTotalFace = grid->GetNTotalFace();
+        int nTotalCell = grid->GetNTotalCell();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotal = nTotalCell + nBoundFace;
+
+
+        RDouble* u = reinterpret_cast<RDouble *>(grid->GetDataPtr("U"));
+        RDouble initU = GlobalDataBase::GetDoubleParaFromDB("initU");
+        PHSPACE::SetField(u, initU, nTotal);
+
+        RDouble* v = reinterpret_cast<RDouble *>(grid->GetDataPtr("V"));
+        RDouble initV = GlobalDataBase::GetDoubleParaFromDB("initV");
+        PHSPACE::SetField(v, initV, nTotal);
+
+        RDouble* w = reinterpret_cast<RDouble *>(grid->GetDataPtr("W"));
+        RDouble initW = GlobalDataBase::GetDoubleParaFromDB("initW");
+        PHSPACE::SetField(w, initW, nTotal);
+
+        RDouble *p = reinterpret_cast<RDouble *> (grid->GetDataPtr("P"));
+        RDouble initP = GlobalDataBase::GetDoubleParaFromDB("initP");
+        PHSPACE::SetField(p, initP, nTotal);
+
+        RDouble* ptotal = reinterpret_cast<RDouble*>(grid->GetDataPtr("Ptotal"));
+        PHSPACE::SetField(ptotal, initP, nTotal);
+
+        RDouble *pc = reinterpret_cast<RDouble *> (grid->GetDataPtr("pc"));
+        PHSPACE::SetField(pc, 0.0, nTotal);
+
+        RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+        PHSPACE::SetField(diagMatrixCoeff, 0.0, nTotal);
+
+        RDouble *bCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("bCoeff"));
+        PHSPACE::SetField(bCoeff, 0.0, nTotal);
+
+        RDouble *upperMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("upperMatrixCoeff"));
+        PHSPACE::SetField(upperMatrixCoeff, 0.0, nTotalFace);
+
+        RDouble *lowerMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("lowerMatrixCoeff"));
+        PHSPACE::SetField(lowerMatrixCoeff, 0.0, nTotalFace);
+
+        RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+        PHSPACE::SetField(FaceFlux, 0.0, nTotalFace);
+
+        RDouble* dun  = reinterpret_cast<RDouble*>(grid->GetDataPtr("dun"));
+        PHSPACE::SetField(dun, 0.0, nTotalFace);
+
+        RDouble* rho  = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+        RDouble initRho = GlobalDataBase::GetDoubleParaFromDB("initRho");
+        PHSPACE::SetField(rho, initRho, nTotal);
+
+        RDouble *rhoFace = reinterpret_cast<RDouble*>(grid->GetDataPtr("rhoFace"));
+        PHSPACE::SetField(rhoFace, 0.0, nTotalFace);
+
+        RDouble* mu   = reinterpret_cast<RDouble*>(grid->GetDataPtr("mu"));
+        RDouble initMu = GlobalDataBase::GetDoubleParaFromDB("initMu");
+        PHSPACE::SetField(mu, initMu, nTotal);
+
+        RDouble **DiffusionCoeff = reinterpret_cast <RDouble **> (GlobalDataBase::GetDataPtr("DiffusionCoeff"));
+        DiffusionCoeff[IDX::S_IU] = mu;
+        DiffusionCoeff[IDX::S_IV] = mu;
+        DiffusionCoeff[IDX::S_IW] = mu;
+
+        calcFaceWeight(grid);
+
+        RDouble *hu = reinterpret_cast<RDouble *> (grid->GetDataPtr("hu"));
+        PHSPACE::SetField(hu, 0.0, nTotal);
+
+        RDouble *InverseAp = reinterpret_cast<RDouble *> (grid->GetDataPtr("InverseAp"));
+        PHSPACE::SetField(InverseAp, 0.0, nTotal);
+
+        RDouble *wd = reinterpret_cast<RDouble *> (grid->GetDataPtr("wd"));
+        PHSPACE::SetField(wd, 0.0, nTotal);
+
+
+        RDouble *dudx = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdx"));
+        RDouble *dudy = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdy"));
+        RDouble *dudz = reinterpret_cast<RDouble *>(grid->GetDataPtr("dUdz"));
+        RDouble *dvdx = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdx"));
+        RDouble *dvdy = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdy"));
+        RDouble *dvdz = reinterpret_cast<RDouble *>(grid->GetDataPtr("dVdz"));
+        RDouble *dwdx = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdx"));
+        RDouble *dwdy = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdy"));
+        RDouble *dwdz = reinterpret_cast<RDouble *>(grid->GetDataPtr("dWdz"));
+        RDouble* dpdx = reinterpret_cast<RDouble*>(grid->GetDataPtr("dpdx"));
+        RDouble* dpdy = reinterpret_cast<RDouble*>(grid->GetDataPtr("dpdy"));
+        RDouble* dpdz = reinterpret_cast<RDouble*>(grid->GetDataPtr("dpdz"));
+        RDouble *dpcdx = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpcdx"));
+        RDouble *dpcdy = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpcdy"));
+        RDouble *dpcdz = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpcdz"));
+        PHSPACE::SetField(dudx, 0.0, nTotal);
+        PHSPACE::SetField(dudy, 0.0, nTotal);
+        PHSPACE::SetField(dudz, 0.0, nTotal);
+        PHSPACE::SetField(dvdx, 0.0, nTotal);
+        PHSPACE::SetField(dvdy, 0.0, nTotal);
+        PHSPACE::SetField(dvdz, 0.0, nTotal);
+        PHSPACE::SetField(dwdx, 0.0, nTotal);
+        PHSPACE::SetField(dwdy, 0.0, nTotal);
+        PHSPACE::SetField(dwdz, 0.0, nTotal);
+        PHSPACE::SetField(dpdx, 0.0, nTotal);
+        PHSPACE::SetField(dpdy, 0.0, nTotal);
+        PHSPACE::SetField(dpdz, 0.0, nTotal);
+        PHSPACE::SetField(dpcdx, 0.0, nTotal);
+        PHSPACE::SetField(dpcdy, 0.0, nTotal);
+        PHSPACE::SetField(dpcdz, 0.0, nTotal);
+
+
+        string flowSolverName = GlobalDataBase::GetStrParaFromDB("flowSolverName");
+        if (flowSolverName == "CompressibleSIMPLE")
+        {
+            RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+            PHSPACE::SetField(cRho, 0.0, nTotal);
+
+            RDouble* Rg = reinterpret_cast<RDouble*>(grid->GetDataPtr("Rg"));
+            RDouble initRg = GlobalDataBase::GetDoubleParaFromDB("initRg");
+            PHSPACE::SetField(Rg, initRg, nTotal);
+        }
+
+        int bodyForceFlag = GlobalDataBase::GetIntParaFromDB("bodyForceFlag");
+        if (bodyForceFlag == 1)
+        {
+            RDouble *bfU = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfU"));
+            RDouble *bfV = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfV"));
+            RDouble *bfW = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfW"));
+            PHSPACE::SetField(bfU, 0.0, nTotal);
+            PHSPACE::SetField(bfV, 0.0, nTotal);
+            PHSPACE::SetField(bfW, 0.0, nTotal);
+
+            RDouble *dbfdx = reinterpret_cast<RDouble *> (grid->GetDataPtr("dbfdx"));
+            RDouble *dbfdy = reinterpret_cast<RDouble *> (grid->GetDataPtr("dbfdy"));
+            RDouble *dbfdz = reinterpret_cast<RDouble *> (grid->GetDataPtr("dbfdz"));
+            PHSPACE::SetField(dbfdx, 0.0, nTotalCell);
+            PHSPACE::SetField(dbfdy, 0.0, nTotalCell);
+            PHSPACE::SetField(dbfdz, 0.0, nTotalCell);
+        }
+    }
+
+    void MomEqCalculator::AllocateUnsteadyVar(Grid*  grid)
+    {
+        PHString1D phiNameList;
+        phiNameList.resize(4);
+
+        phiNameList[0] = "U";
+        phiNameList[1] = "V";
+        phiNameList[2] = "W";
+        phiNameList[3] = "P";
+        phiNameList.push_back("rho");
+
+        int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+        if (isUnsteady == 0)
+        {
+            return;
+        }
+
+        string TranCalcMethod = GlobalDataBase::GetStrParaFromDB("TranCalcMethod");
+        if (TranCalcMethod == "IMPLICIT_EULER")
+        {
+            ImplicitEuler_AllocateMemory(grid, phiNameList);
+        }
+        else if (TranCalcMethod == "IMPLICIT_2ND_ORDER")
+        {
+            Implicit2ndOrder_AllocateMemory(grid, phiNameList);
+        }
+
+        PHString1D().swap(phiNameList);
+    }
+
+    void MomEqCalculator::InitialUnsteadyVar(Grid*  grid)
+    {
+        PHString1D phiNameList;
+        phiNameList.resize(4);
+
+        phiNameList[0] = "U";
+        phiNameList[1] = "V";
+        phiNameList[2] = "W";
+        phiNameList[3] = "P";
+
+
+        string flowSolverName = GlobalDataBase::GetStrParaFromDB("flowSolverName");
+        if (flowSolverName == "CompressibleSIMPLE")
+        {
+            PHString1D phiNameList;
+
+            phiNameList.push_back("rho");
+        }
+
+        int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+        if (isUnsteady == 0)
+        {
+            return;
+        }
+
+        string TranCalcMethod = GlobalDataBase::GetStrParaFromDB("TranCalcMethod");
+        if (TranCalcMethod == "IMPLICIT_EULER")
+        {
+            ImplicitEuler_ReInitTimeVar(grid, phiNameList);
+        }
+        else if (TranCalcMethod == "IMPLICIT_2ND_ORDER")
+        {
+            Implicit2ndOrder_ReInitTimeVar(grid, phiNameList);
+        }
+
+        PHString1D().swap(phiNameList);
+    }
+
+    void MomEqCalculator::UpdateUnsteadyProperties(Grid* gridIn)
+    {
+        UnstructGrid * grid = UnstructGridCast(gridIn);
+        UpdateProperties(grid);
+    }
+
+    void MomEqCalculator::UpdateProperties(Grid* gridIn)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+        string flowSolverName = GlobalDataBase::GetStrParaFromDB("flowSolverName");
+        if (flowSolverName == "CompressibleSIMPLE")
+        {
+            int isStableUnsteadyMethod = GlobalDataBase::GetIntParaFromDB("isStableUnsteadyMethod");
+            if (isStableUnsteadyMethod)
+            {
+                return;
+            }
+        }
+
+        RDouble* rho  = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+        RDouble* mu   = reinterpret_cast<RDouble*>(grid->GetDataPtr("mu"));
+        GAS_SPACE::gas->UpdateRho(grid, rho);
+        GAS_SPACE::gas->UpdateMu(grid, mu);
+
+        CommunicateAnInterfaceVar(rho);
+        CommunicateAnInterfaceVar(mu);
+
+        RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+
+        if (cRho != nullptr)
+        {
+            CommunicateAnInterfaceVar(cRho);
+        }
+    }
+
+    void MomEqCalculator::GetResidual(Grid *gridIn, vector<RDouble>& res)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+
+        RDouble resNow = 0.0;
+
+        grid->GetData("UResNow", &resNow, PHDOUBLE, 1);
+        res.push_back(resNow);
+        grid->GetData("VResNow", &resNow, PHDOUBLE, 1);
+        res.push_back(resNow);
+        grid->GetData("WResNow", &resNow, PHDOUBLE, 1);
+        res.push_back(resNow);
+        grid->GetData("PResNow", &resNow, PHDOUBLE, 1);
+        res.push_back(resNow);
+    }
+
+    void MomEqCalculator::UpdateUnsteadyVariable(Grid *grid)
+    {
+        UnstructGrid *gridIn = UnstructGridCast(grid);
+
+        vector<string> phiNameList;
+        phiNameList.push_back("U");
+        phiNameList.push_back("V");
+        phiNameList.push_back("W");
+        phiNameList.push_back("P");
+
+        string flowSolverName = GlobalDataBase::GetStrParaFromDB("flowSolverName");
+        if (flowSolverName == "CompressibleSIMPLE")
+        {
+            phiNameList.push_back("rho");
+        }
+
+        int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+        if (isUnsteady == 0)
+        {
+            return;
+        }
+
+        string TranCalcMethod = GlobalDataBase::GetStrParaFromDB("TranCalcMethod");
+        if (TranCalcMethod == "IMPLICIT_EULER")
+        {
+            ImplicitEuler_SaveOldTimeValue(gridIn, phiNameList);
+        }
+        else if (TranCalcMethod == "IMPLICIT_2ND_ORDER")
+        {
+            Implicit2ndOrder_SaveOldTimeValue(gridIn, phiNameList);
+        }
+        vector<string>().swap(phiNameList);
+    }
+
+    void FlowFarField_GetBoundrayData(Grid*  grid, Data_Param* bcData)
+    {
+        RDouble refMachNumber = 0.0;
+        RDouble nx;
+        RDouble ny;
+        RDouble nz;
+        RDouble refflowT;
+        RDouble refflowP;
+        if (bcData)
+        {
+            if (bcData->IsExist("refMachNumber", PHDOUBLE, 1))
+            {
+                bcData->GetData("refMachNumber", &refMachNumber, PHDOUBLE, 1);
+                bcData->GetData("nx", &nx, PHDOUBLE, 1);
+                bcData->GetData("ny", &ny, PHDOUBLE, 1);
+                bcData->GetData("nz", &nz, PHDOUBLE, 1);
+                bcData->GetData("initT", &refflowT, PHDOUBLE, 1);
+                bcData->GetData("initP", &refflowP, PHDOUBLE, 1);
+            }
+        }
+        RDouble gama = 1.4;
+        RDouble initRg = GlobalDataBase::GetDoubleParaFromDB("initRg");
+        RDouble totalVelocity = sqrt(gama * initRg * refflowT) * refMachNumber;
+        RDouble refflowU = totalVelocity * nx;
+        RDouble refflowV = totalVelocity * ny;
+        RDouble refflowW = totalVelocity * nz;
+
+        bcData->UpdateData("initU", &refflowU, PHDOUBLE, 1);
+        bcData->UpdateData("initV", &refflowV, PHDOUBLE, 1);
+        bcData->UpdateData("initW", &refflowW, PHDOUBLE, 1);
+        bcData->UpdateData("initT", &refflowT, PHDOUBLE, 1);
+        bcData->UpdateData("initP", &refflowP, PHDOUBLE, 1);
+    }
+
+
+}
\ No newline at end of file
diff --git a/CFD/IncomSolver/src/PPEqCalculator.cpp b/CFD/IncomSolver/src/PPEqCalculator.cpp
new file mode 100644
index 0000000..7a966b9
--- /dev/null
+++ b/CFD/IncomSolver/src/PPEqCalculator.cpp
@@ -0,0 +1,804 @@
+#include "PPEqCalculator.h"
+
+
+
+
+namespace PHSPACE
+{
+
+    PPEqCalculator::PPEqCalculator():IncomCalculator()
+    {
+    }
+
+    PPEqCalculator::~PPEqCalculator()
+    {
+
+    }
+
+    void PPEqCalculator::correctPressureAndVelocity(Grid *gridIn)
+    {
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        int nTotalCell = grid->GetNTotalCell();
+        RDouble PPEqRelaxCoeff = GlobalDataBase::GetDoubleParaFromDB("PPEqRelaxCoeff");
+        RDouble *u = reinterpret_cast<RDouble *> (grid->GetDataPtr("U"));
+        RDouble *v = reinterpret_cast<RDouble *> (grid->GetDataPtr("V"));
+        RDouble *w = reinterpret_cast<RDouble *> (grid->GetDataPtr("W"));
+        RDouble *p = reinterpret_cast<RDouble *> (grid->GetDataPtr("P"));
+        RDouble *dpcdx = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpcdx"));
+        RDouble *dpcdy = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpcdy"));
+        RDouble *dpcdz = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpcdz"));
+        RDouble *pc = reinterpret_cast<RDouble *> (grid->GetDataPtr("pc"));
+        RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+        RDouble *hu = reinterpret_cast<RDouble *> (grid->GetDataPtr("hu"));
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+        int* leftCellOfFace = grid->GetLeftCellOfFace();
+        int* rightCellOfFace = grid->GetRightCellOfFace();
+
+        for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+            int bcType = bcRegion->GetBCType();
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            Data_Param* bcData = bcRegion->GetBCParamDataBase();
+
+            if (bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::SYMMETRY
+                || bcType == PHENGLEI::PRESSURE_INLET || bcType == PHENGLEI::INFLOW)
+            {
+                int* leftCellOfFace = grid->GetLeftCellOfFace();
+                int* rightCellOfFace = grid->GetRightCellOfFace();
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+                    pc[re] = pc[le];
+                }
+            }
+            else if (bcType == PHENGLEI::OUTFLOW || bcType == PHENGLEI::PRESSURE_OUTLET)
+            {
+                int* leftCellOfFace = grid->GetLeftCellOfFace();
+                int* rightCellOfFace = grid->GetRightCellOfFace();
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+                    pc[re] = 0.0;
+                }
+            }
+            else if (bcType == PHENGLEI::FARFIELD)
+            {
+                RDouble refflowT;
+                RDouble refflowP;
+                bcData->GetData("initT", &refflowT, PHDOUBLE, 1);
+                bcData->GetData("initP", &refflowP, PHDOUBLE, 1);
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+                    if (FaceFlux[iFacelocal] < 0)
+                    {
+                        pc[re] = pc[le];
+                    }
+                    else
+                    {
+                        p[re] = refflowP;
+                    }
+                }
+            }
+        }
+
+        CommunicateAnInterfaceVar(pc);
+
+        GradientCalculation(grid, "pc", "dpcdx", "dpcdy", "dpcdz");
+        
+        RDouble refPressureOfLocatePos = 0.0;
+        int refPLocate = GlobalDataBase::GetIntParaFromDB("refPLocate");
+        if (refPLocate == 1)
+        {
+            refPressureOfLocatePos = pc[0];
+        }
+
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            u[iCell] -= hu[iCell] * dpcdx[iCell];
+            v[iCell] -= hu[iCell] * dpcdy[iCell];
+            w[iCell] -= hu[iCell] * dpcdz[iCell];
+            p[iCell] += PPEqRelaxCoeff * (pc[iCell] - refPressureOfLocatePos);
+        }
+
+        CommunicateAnInterfaceVar(u);
+        CommunicateAnInterfaceVar(v);
+        CommunicateAnInterfaceVar(w);
+        CommunicateAnInterfaceVar(p);
+    }
+
+
+    void PPEqCalculator::correctBoundaryVelocity(Grid*  gridIn)
+    {
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        int* leftCellOfFace = grid->GetLeftCellOfFace();
+        int* rightCellOfFace = grid->GetRightCellOfFace();
+        RDouble* p = reinterpret_cast<RDouble*>(grid->GetDataPtr("P"));
+        RDouble* ptotal = reinterpret_cast<RDouble*>(grid->GetDataPtr("Ptotal"));
+        RDouble* u = reinterpret_cast<RDouble*>(grid->GetDataPtr("U"));
+        RDouble* v = reinterpret_cast<RDouble*>(grid->GetDataPtr("V"));
+        RDouble* w = reinterpret_cast<RDouble*>(grid->GetDataPtr("W"));
+        RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+        RDouble* dpdx = (RDouble*)grid->GetDataPtr("dpdx");
+        RDouble* dpdy = (RDouble*)grid->GetDataPtr("dpdy");
+        RDouble* dpdz = (RDouble*)grid->GetDataPtr("dpdz");
+        RDouble* dpcdx = (RDouble*)grid->GetDataPtr("dpcdx");
+        RDouble* dpcdy = (RDouble*)grid->GetDataPtr("dpcdy");
+        RDouble* dpcdz = (RDouble*)grid->GetDataPtr("dpcdz");
+        RDouble* xfn = grid->GetFaceNormalX();
+        RDouble* yfn = grid->GetFaceNormalY();
+        RDouble* zfn = grid->GetFaceNormalZ();
+        RDouble *xfc = grid->GetFaceCenterX();
+        RDouble *yfc = grid->GetFaceCenterY();
+        RDouble *zfc = grid->GetFaceCenterZ();
+        RDouble *xcc = grid->GetCellCenterX();
+        RDouble *ycc = grid->GetCellCenterY();
+        RDouble *zcc = grid->GetCellCenterZ();
+
+        RDouble* dunb = reinterpret_cast<RDouble*>(grid->GetDataPtr("dun"));
+        RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+        int nTotalCell = grid->GetNTotalCell();
+        RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+        RDouble* pc = reinterpret_cast<RDouble*>(grid->GetDataPtr("pc"));
+        RDouble initRg = GlobalDataBase::GetDoubleParaFromDB("initRg");
+
+        RDouble *mu   = reinterpret_cast<RDouble *>(grid->GetDataPtr("mu"));
+        RDouble *hu   = reinterpret_cast<RDouble *>(grid->GetDataPtr("hu"));
+        RDouble *InverseAp = reinterpret_cast<RDouble *> (grid->GetDataPtr("InverseAp"));
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+
+        for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+        {
+            UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+            int bcType = bcRegion->GetBCType();
+            vector<int>* faceIndex = bcRegion->GetFaceIndex();
+            Data_Param* bcData = bcRegion->GetBCParamDataBase();
+
+            if (bcType == PHENGLEI::SYMMETRY)
+            {
+                for (std::size_t i = 0; i < faceIndex->size(); ++i)
+                {
+                    int iFace = (*faceIndex)[i];
+                    int le = leftCellOfFace[iFace];
+                    int re = rightCellOfFace[iFace];
+
+                    u[re] = u[le] - u[le] * xfn[iFace];
+                    v[re] = v[le] - v[le] * yfn[iFace];
+                    w[re] = w[le] - w[le] * zfn[iFace];    
+                }
+            }
+            else if (bcType == PHENGLEI::FARFIELD)
+            {
+                RDouble refflowU;
+                RDouble refflowV;
+                RDouble refflowW;
+                bcData->GetData("initU", &refflowU, PHDOUBLE, 1);
+                bcData->GetData("initV", &refflowV, PHDOUBLE, 1);
+                bcData->GetData("initW", &refflowW, PHDOUBLE, 1);
+
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+
+                    u[re] -= hu[le] * dpcdx[le];
+                    v[re] -= hu[le] * dpcdy[le];
+                    w[re] -= hu[le] * dpcdz[le];
+
+                    if (FaceFlux[iFacelocal] < 0)
+                    {
+                        u[re] = refflowU;
+                        v[re] = refflowV;
+                        w[re] = refflowW;
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::OUTFLOW || bcType == PHENGLEI::PRESSURE_OUTLET)
+            {
+                for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+            
+                    u[re] -= hu[le] * dpcdx[le];
+                    v[re] -= hu[le] * dpcdy[le];
+                    w[re] -= hu[le] * dpcdz[le];
+                }
+            }
+            else if (bcType == PHENGLEI::PRESSURE_INLET )
+            {
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+                    u[re] = u[le];
+                    v[re] = v[le];
+                    w[re] = w[le];
+                }
+            }
+        }
+
+        CommunicateAnInterfaceVar(u);
+        CommunicateAnInterfaceVar(v);
+        CommunicateAnInterfaceVar(w);
+    }
+
+    void PPEqCalculator::UpdateBCValue(Grid* gridIn)
+    {
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        int* leftCellOfFace = grid->GetLeftCellOfFace();
+        int* rightCellOfFace = grid->GetRightCellOfFace();
+        RDouble* p = reinterpret_cast<RDouble*>(grid->GetDataPtr("P"));
+        RDouble* ptotal = reinterpret_cast<RDouble*>(grid->GetDataPtr("Ptotal"));
+        RDouble* u = reinterpret_cast<RDouble*>(grid->GetDataPtr("U"));
+        RDouble* v = reinterpret_cast<RDouble*>(grid->GetDataPtr("V"));
+        RDouble* w = reinterpret_cast<RDouble*>(grid->GetDataPtr("W"));
+        RDouble* rho = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+        RDouble* dpdx = (RDouble*)grid->GetDataPtr("dpdx");
+        RDouble* dpdy = (RDouble*)grid->GetDataPtr("dpdy");
+        RDouble* dpdz = (RDouble*)grid->GetDataPtr("dpdz");
+        RDouble* dpcdx = (RDouble*)grid->GetDataPtr("dpcdx");
+        RDouble* dpcdy = (RDouble*)grid->GetDataPtr("dpcdy");
+        RDouble* dpcdz = (RDouble*)grid->GetDataPtr("dpcdz");
+        RDouble* xfn = grid->GetFaceNormalX();
+        RDouble* yfn = grid->GetFaceNormalY();
+        RDouble* zfn = grid->GetFaceNormalZ();
+        RDouble* xfc = grid->GetFaceCenterX();
+        RDouble* yfc = grid->GetFaceCenterY();
+        RDouble* zfc = grid->GetFaceCenterZ();
+        RDouble* xcc = grid->GetCellCenterX();
+        RDouble* ycc = grid->GetCellCenterY();
+        RDouble* zcc = grid->GetCellCenterZ();
+
+        RDouble* dunb = reinterpret_cast<RDouble*>(grid->GetDataPtr("dun"));
+        RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+        int nTotalCell = grid->GetNTotalCell();
+        RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+        RDouble* pc = reinterpret_cast<RDouble*>(grid->GetDataPtr("pc"));
+        RDouble initRg = GlobalDataBase::GetDoubleParaFromDB("initRg");
+
+        RDouble* mu = reinterpret_cast<RDouble*>(grid->GetDataPtr("mu"));
+        RDouble* InverseAp = reinterpret_cast<RDouble*> (grid->GetDataPtr("InverseAp"));
+        UnstructBCSet* unstructBCSet = grid->GetUnstructBCSet();
+        int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+
+        for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+        {
+            UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+            int bcType = bcRegion->GetBCType();
+            vector<int>* faceIndex = bcRegion->GetFaceIndex();
+            Data_Param* bcData = bcRegion->GetBCParamDataBase();
+
+            if (bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::SYMMETRY
+                || bcType == PHENGLEI::INFLOW)
+            {
+                for (std::size_t i = 0; i < faceIndex->size(); ++i)
+                {
+                    int iFace = (*faceIndex)[i];
+                    int re = rightCellOfFace[iFace];
+                    int le = leftCellOfFace[iFace];
+
+                    p[re] = p[le];
+                }
+            }
+            else if (bcType == PHENGLEI::FARFIELD)
+            {
+                RDouble refMachNumber = 0.0;
+                RDouble refflowU;
+                RDouble refflowV;
+                RDouble refflowW;
+                bcData->GetData("initU", &refflowU, PHDOUBLE, 1);
+                bcData->GetData("initV", &refflowV, PHDOUBLE, 1);
+                bcData->GetData("initW", &refflowW, PHDOUBLE, 1);
+                RDouble refflowT;
+                RDouble refflowP;
+                bcData->GetData("initT", &refflowT, PHDOUBLE, 1);
+                bcData->GetData("initP", &refflowP, PHDOUBLE, 1);
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+                    if (FaceFlux[iFacelocal] < 0)
+                    {
+                        p[re] = p[le];
+                    }
+                    else
+                    {
+                        p[re] = refflowP;
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::OUTFLOW || bcType == PHENGLEI::PRESSURE_OUTLET)
+            {
+                for (std::size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    const int iFacelocal = (*faceIndex)[iFace];
+                    int re = rightCellOfFace[iFacelocal];
+                    RDouble pb = 0.0;
+                    if (bcData->IsExist("initP", PHDOUBLE, 1))
+                    {
+                        bcData->GetData("initP", &pb, PHDOUBLE, 1);
+                    }
+                    p[re] = pb;
+                }
+            }
+            else if (bcType == PHENGLEI::PRESSURE_INLET)
+            {
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+                    RDouble ptotalb = 0.0;
+                    if (bcData->IsExist("totalPressure", PHDOUBLE, 1))
+                    {
+                        bcData->GetData("totalPressure", &ptotalb, PHDOUBLE, 1);
+                    }
+                    ptotal[re] = ptotalb;
+                    p[re] = ptotal[re] - 0.5 * rho[le] * (pow(u[re], 2) + pow(v[re], 2) + pow(w[re], 2));
+                }
+            }
+        }
+
+        CommunicateAnInterfaceVar(p);
+    }
+
+    void PPEqCalculator::solvePPEquation(Grid*  gridIn)
+    {
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        int nTotalCell = grid->GetNTotalCell();
+        int nTotalFace = grid->GetNTotalFace();
+        RDouble *pc = reinterpret_cast<RDouble *> (grid->GetDataPtr("pc"));
+        RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+        RDouble *bCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("bCoeff"));
+        RDouble *upperMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("upperMatrixCoeff"));
+        RDouble *lowerMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("lowerMatrixCoeff"));
+
+        SetField(pc, 0.0, nTotalCell);
+
+        InitializeMatrixACoeff(grid);
+
+        treatBC(grid);
+
+        constructMatrixACoeff(grid);
+
+        constructBCoeff(grid);
+
+        calculateLinearEquation(grid, IDX::S_IP, pc, diagMatrixCoeff, bCoeff, upperMatrixCoeff , lowerMatrixCoeff);
+        
+        correctPressureAndVelocity(grid);
+
+        UpdateBCValue(grid);
+        
+        correctBoundaryVelocity(grid);
+    }
+
+
+    void PPEqCalculator::constructMatrixACoeff(Grid* gridIn)
+    {
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        int nTotalCell = grid->GetNTotalCell();
+        int nIFace = grid->GetNIFace();
+        int nTotalFace = grid->GetNTotalFace();
+        int nBoundFace = grid->GetNBoundFace();
+        RDouble *pc = reinterpret_cast<RDouble *> (grid->GetDataPtr("pc"));
+        RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+        RDouble *bCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("bCoeff"));
+        RDouble *upperMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("upperMatrixCoeff"));
+        RDouble *lowerMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("lowerMatrixCoeff"));
+
+        int *leftCellOfFace = grid->GetLeftCellOfFace();
+        int *rightCellOfFace = grid->GetRightCellOfFace();
+        RDouble *area    = grid->GetFaceArea();
+        RDouble *xfn = grid->GetFaceNormalX();
+        RDouble *yfn = grid->GetFaceNormalY();
+        RDouble *zfn = grid->GetFaceNormalZ();
+        RDouble *xfc = grid->GetFaceCenterX();
+        RDouble *yfc = grid->GetFaceCenterY();
+        RDouble *zfc = grid->GetFaceCenterZ();
+        RDouble *xcc = grid->GetCellCenterX();
+        RDouble *ycc = grid->GetCellCenterY();
+        RDouble *zcc = grid->GetCellCenterZ();
+        RDouble *u = reinterpret_cast<RDouble *> (grid->GetDataPtr("U"));
+        RDouble *v = reinterpret_cast<RDouble *> (grid->GetDataPtr("V"));
+        RDouble *w = reinterpret_cast<RDouble *> (grid->GetDataPtr("W"));
+        RDouble *p = reinterpret_cast<RDouble *> (grid->GetDataPtr("P"));
+        RDouble *InverseAp = reinterpret_cast<RDouble *> (grid->GetDataPtr("InverseAp"));
+        RDouble *bfU = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfU"));
+        RDouble *bfV = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfV"));
+        RDouble *bfW = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfW"));
+        RDouble *dpdx = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpdx"));
+        RDouble *dpdy = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpdy"));
+        RDouble *dpdz = reinterpret_cast<RDouble *> (grid->GetDataPtr("dpdz"));
+        RDouble *hu = reinterpret_cast<RDouble *> (grid->GetDataPtr("hu"));
+        RDouble* rho  = reinterpret_cast<RDouble*>(grid->GetDataPtr("rho"));
+        RDouble* mu   = reinterpret_cast<RDouble*>(grid->GetDataPtr("mu"));
+        RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+        RDouble* dun  = reinterpret_cast<RDouble*>(grid->GetDataPtr("dun"));
+        RDouble *rhoFace = reinterpret_cast<RDouble*>(grid->GetDataPtr("rhoFace"));
+        RDouble *faceWeightOfLeftCell = reinterpret_cast<RDouble *>(grid->GetDataPtr("faceWeightOfLeftCell"));
+        RDouble* ptotal = reinterpret_cast<RDouble*>(grid->GetDataPtr("Ptotal"));
+        RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+
+        for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+        {
+            int le = leftCellOfFace[iFace];
+            int re = rightCellOfFace[iFace];
+
+            RDouble ax = area[iFace] * xfn[iFace];
+            RDouble ay = area[iFace] * yfn[iFace];
+            RDouble az = area[iFace] * zfn[iFace];
+
+            RDouble dx = xcc[re] - xcc[le];
+            RDouble dy = ycc[re] - ycc[le];
+            RDouble dz = zcc[re] - zcc[le];
+
+            RDouble ad = ax * dx + ay * dy + az * dz;
+            RDouble a2 = ax * ax + ay * ay + az * az;
+
+            RDouble ubar_a = (faceWeightOfLeftCell[iFace] * u[le] + (1.0 - faceWeightOfLeftCell[iFace]) * u[re]) * ax + (faceWeightOfLeftCell[iFace] * v[le] + (1.0 - faceWeightOfLeftCell[iFace]) * v[re]) * ay + (faceWeightOfLeftCell[iFace] * w[le] + (1.0 - faceWeightOfLeftCell[iFace]) * w[re]) * az;
+
+            RDouble pDiff;
+            RDouble pdf;
+
+            int bodyForceFlag = GlobalDataBase::GetIntParaFromDB("bodyForceFlag");
+            if (bodyForceFlag != 1)
+            {
+                pDiff = (InverseAp[le] * faceWeightOfLeftCell[iFace] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace])) *( p[re] - p[le]) ;
+                pdf = ((InverseAp[le] * faceWeightOfLeftCell[iFace] * dpdx[le] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * dpdx[re]) * dx +
+                    (InverseAp[le] * faceWeightOfLeftCell[iFace] * dpdy[le] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * dpdy[re]) * dy+
+                    (InverseAp[le] * faceWeightOfLeftCell[iFace] * dpdz[le] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * dpdz[re]) * dz);
+            }
+            else
+            {
+                RDouble dxfL = xfc[iFace] - xcc[le];
+                RDouble dyfL = yfc[iFace] - ycc[le];
+                RDouble dzfL = zfc[iFace] - zcc[le];
+                RDouble dxfR = xfc[iFace] - xcc[re];
+                RDouble dyfR = yfc[iFace] - ycc[re];
+                RDouble dzfR = zfc[iFace] - zcc[re];
+
+                pDiff = (InverseAp[le] * faceWeightOfLeftCell[iFace] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace])) * (p[re] - p[le] +
+                    (bfU[re] * dxfR + bfV[re] * dyfR + bfW[re] * dzfR)- (bfU[le] * dxfL + bfV[le] * dyfL + bfW[le] * dzfL));
+                pdf = ((InverseAp[le] * faceWeightOfLeftCell[iFace] * (dpdx[le] - bfU[le]) + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * (dpdx[re] - bfU[re])) * dx +
+                    (InverseAp[le] * faceWeightOfLeftCell[iFace] * (dpdy[le] - bfV[le]) + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * (dpdy[re] - bfV[re])) * dy +
+                    (InverseAp[le] * faceWeightOfLeftCell[iFace] * (dpdz[le] - bfW[le]) + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * (dpdz[re] - bfW[re]) * dz));
+
+            }
+
+            pDiff *= a2/ad;
+            pdf*= a2 / ad;
+            RDouble aj = rhoFace[iFace] * ((hu[le] * faceWeightOfLeftCell[iFace] + hu[re] * (1.0 - faceWeightOfLeftCell[iFace])) * a2) / ad;
+
+            upperMatrixCoeff[iFace] = -aj;
+            diagMatrixCoeff[le] += aj;
+
+            lowerMatrixCoeff[iFace] = -aj;
+            diagMatrixCoeff[re] += aj;
+
+            string flowSolverName = GlobalDataBase::GetStrParaFromDB("flowSolverName");
+            if (flowSolverName == "CompressibleSIMPLE")
+            {
+                RDouble a12 = max(FaceFlux[iFace], 0.0);
+                RDouble a21 = a12 - FaceFlux[iFace];
+                RDouble cRhoFace = cRho[le] * faceWeightOfLeftCell[iFace] + cRho[re] * (1.0 - faceWeightOfLeftCell[iFace]);
+                a21 = a21 * cRhoFace / rhoFace[iFace];
+                a12 = a12 * cRhoFace / rhoFace[iFace];
+                upperMatrixCoeff[iFace] -= a21;
+                diagMatrixCoeff[le] += a12;
+
+                lowerMatrixCoeff[iFace] -= a12;
+                diagMatrixCoeff[re] += a21;
+            }
+        }
+
+        calcTransMatrixTerm(grid);
+    }
+
+    void PPEqCalculator::treatBC(Grid* gridIn)
+    {
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        int nTotalCell = grid->GetNTotalCell();
+        int nIFace = grid->GetNIFace();
+        int nTotalFace = grid->GetNTotalFace();
+        int nBoundFace = grid->GetNBoundFace();
+        RDouble *pc = reinterpret_cast<RDouble *> (grid->GetDataPtr("pc"));
+        RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+        RDouble *bCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("bCoeff"));
+        RDouble *upperMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("upperMatrixCoeff"));
+        RDouble *lowerMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("lowerMatrixCoeff"));
+        RDouble* area = grid->GetFaceArea();
+
+        int *leftCellOfFace = grid->GetLeftCellOfFace();
+        int *rightCellOfFace = grid->GetRightCellOfFace();
+        RDouble *xfn = grid->GetFaceNormalX();
+        RDouble *yfn = grid->GetFaceNormalY();
+        RDouble *zfn = grid->GetFaceNormalZ();
+        RDouble *xfc = grid->GetFaceCenterX();
+        RDouble *yfc = grid->GetFaceCenterY();
+        RDouble *zfc = grid->GetFaceCenterZ();
+        RDouble *xcc = grid->GetCellCenterX();
+        RDouble *ycc = grid->GetCellCenterY();
+        RDouble *zcc = grid->GetCellCenterZ();
+        RDouble *u = reinterpret_cast<RDouble *> (grid->GetDataPtr("U"));
+        RDouble *v = reinterpret_cast<RDouble *> (grid->GetDataPtr("V"));
+        RDouble *w = reinterpret_cast<RDouble *> (grid->GetDataPtr("W"));
+        RDouble *p = reinterpret_cast<RDouble *> (grid->GetDataPtr("P"));
+        RDouble *FaceFlux = reinterpret_cast<RDouble *> (grid->GetDataPtr("FaceFlux"));
+        RDouble *rho = reinterpret_cast<RDouble *> (grid->GetDataPtr("rho"));
+        RDouble *hu = reinterpret_cast<RDouble *> (grid->GetDataPtr("hu"));
+        RDouble *ptotal = reinterpret_cast<RDouble *> (grid->GetDataPtr("Ptotal"));
+        RDouble *rhoFace = reinterpret_cast<RDouble*>(grid->GetDataPtr("rhoFace"));
+        RDouble *faceWeightOfLeftCell = reinterpret_cast<RDouble *>(grid->GetDataPtr("faceWeightOfLeftCell"));
+        RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+        RDouble *InverseAp = reinterpret_cast<RDouble *> (grid->GetDataPtr("InverseAp"));
+        RDouble *dpdx = reinterpret_cast<RDouble *>(grid->GetDataPtr("dpdx"));
+        RDouble *dpdy = reinterpret_cast<RDouble *>(grid->GetDataPtr("dpdy"));
+        RDouble *dpdz = reinterpret_cast<RDouble *>(grid->GetDataPtr("dpdz"));
+        RDouble *bfU = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfU"));
+        RDouble *bfV = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfV"));
+        RDouble *bfW = reinterpret_cast<RDouble *> (grid->GetDataPtr("bfW"));
+
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+        for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+            int bcType = bcRegion->GetBCType();
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            Data_Param* bcData = bcRegion->GetBCParamDataBase();
+
+            if (bcType == PHENGLEI::FARFIELD)
+            {
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+                    if (FaceFlux[iFacelocal] > 0)
+                    {
+                        RDouble ad = xfn[iFacelocal] * (xfc[iFacelocal] - xcc[le]) 
+                            + yfn[iFacelocal] * (yfc[iFacelocal] - ycc[le]) 
+                            + zfn[iFacelocal] * (zfc[iFacelocal] - zcc[le]);
+                        diagMatrixCoeff[le] += rho[re] * ( hu[le] * area[iFacelocal] ) / ad;
+                    }
+                }
+            }
+            else if (bcType == PHENGLEI::INFLOW)
+            {
+
+            }
+            else if (bcType == PHENGLEI::OUTFLOW || bcType == PHENGLEI::PRESSURE_OUTLET)
+            {
+                for (std::size_t iFace = 0; iFace < faceIndex->size(); ++ iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+
+                    RDouble ad = xfn[iFacelocal] * (xfc[iFacelocal] - xcc[le]) 
+                        + yfn[iFacelocal] * (yfc[iFacelocal] - ycc[le]) 
+                        + zfn[iFacelocal] * (zfc[iFacelocal] - zcc[le]);
+                    diagMatrixCoeff[le] += rho[re] * ( hu[le] * area[iFacelocal] ) / ad;
+                }
+            }
+            else if (bcType == PHENGLEI::PRESSURE_INLET)
+            {
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    int re = rightCellOfFace[iFacelocal];
+
+                    RDouble dx = xfc[iFacelocal] - xcc[le];
+                    RDouble dy = yfc[iFacelocal] - ycc[le];
+                    RDouble dz = zfc[iFacelocal] - zcc[le];
+
+                    RDouble ad = xfn[iFacelocal] * dx + yfn[iFacelocal] * dy + zfn[iFacelocal] * dz;
+                    if (p[re] > ptotal[re])
+                    {
+                        p[re] = ptotal[re];
+                    }
+
+                    RDouble vtotal = sqrt(pow(u[re],2) + pow(v[re],2) + pow(w[re],2));
+                    RDouble fluxbValue = rho[re] * area[iFacelocal] * (u[re] * xfn[iFacelocal]  + v[re] * yfn[iFacelocal] + w[re] * zfn[iFacelocal]);
+                    RDouble Df=(hu[le] * area[iFacelocal]) / ad;
+
+                    diagMatrixCoeff[le] += fluxbValue * rho[le] * Df / (fluxbValue - Df * (pow(rho[le] * vtotal, 2)));
+                }
+            }
+            else if (bcType == PHENGLEI::INTERFACE)
+            {
+                for (size_t iFaceLocal = 0; iFaceLocal < faceIndex->size(); ++iFaceLocal)
+                {
+                    int iFace = (*faceIndex)[iFaceLocal];
+                    int le = leftCellOfFace[iFace];
+                    int re = rightCellOfFace[iFace];
+
+                    RDouble ax = area[iFace] * xfn[iFace];
+                    RDouble ay = area[iFace] * yfn[iFace];
+                    RDouble az = area[iFace] * zfn[iFace];
+
+                    RDouble dx = xcc[re] - xcc[le];
+                    RDouble dy = ycc[re] - ycc[le];
+                    RDouble dz = zcc[re] - zcc[le];
+
+                    RDouble ad = ax * dx + ay * dy + az * dz;
+                    RDouble a2 = ax * ax + ay * ay + az * az;
+
+                    RDouble ubar_a = (faceWeightOfLeftCell[iFace] * u[le] + (1.0 - faceWeightOfLeftCell[iFace]) * u[re]) * ax + (faceWeightOfLeftCell[iFace] * v[le] + (1.0 - faceWeightOfLeftCell[iFace]) * v[re]) * ay + (faceWeightOfLeftCell[iFace] * w[le] + (1.0 - faceWeightOfLeftCell[iFace]) * w[re]) * az;
+
+                    RDouble pDiff;
+                    RDouble pdf;
+
+                    pDiff = (InverseAp[le] * faceWeightOfLeftCell[iFace] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace])) *( p[re] - p[le]) ;
+                    pdf = ((InverseAp[le] * faceWeightOfLeftCell[iFace] * dpdx[le] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * dpdx[re]) * dx +
+                        (InverseAp[le] * faceWeightOfLeftCell[iFace] * dpdy[le] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * dpdy[re]) * dy+
+                        (InverseAp[le] * faceWeightOfLeftCell[iFace] * dpdz[le] + InverseAp[re] * (1.0 - faceWeightOfLeftCell[iFace]) * dpdz[re]) * dz);
+
+                    pDiff *= a2/ad;
+                    pdf*= a2 / ad;
+                    RDouble aj = rhoFace[iFace] * ((hu[le] * faceWeightOfLeftCell[iFace] + hu[re] * (1.0 - faceWeightOfLeftCell[iFace])) * a2) / ad;
+
+                    upperMatrixCoeff[iFace] = -aj;
+                    diagMatrixCoeff[le] += aj;
+
+                    string flowSolverName = GlobalDataBase::GetStrParaFromDB("flowSolverName");
+                    if (flowSolverName == "CompressibleSIMPLE")
+                    {
+                        RDouble a12 = max(FaceFlux[iFace], 0.0);
+                        RDouble a21 = a12 - FaceFlux[iFace];
+                        RDouble cRhoFace = cRho[le] * faceWeightOfLeftCell[iFace] + cRho[re] * (1.0 - faceWeightOfLeftCell[iFace]);
+                        a21 = a21 * cRhoFace / rhoFace[iFace];
+                        a12 = a12 * cRhoFace / rhoFace[iFace];
+                        upperMatrixCoeff[iFace] -= a21;
+                        diagMatrixCoeff[le] += a12;
+                    }
+                }
+            }
+        }
+    }
+
+    void PPEqCalculator::constructBCoeff(Grid* gridIn)
+    {
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        int nTotalCell = grid->GetNTotalCell();
+        int nTotalFace = grid->GetNTotalFace();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotalInFace = nTotalFace - nBoundFace;
+        RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+        RDouble *bCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("bCoeff"));
+
+        int *leftCellOfFace = grid->GetLeftCellOfFace();
+        int *rightCellOfFace = grid->GetRightCellOfFace();
+        RDouble* FaceFlux = reinterpret_cast<RDouble*>(grid->GetDataPtr("FaceFlux"));
+
+        InitializeBCoeff(grid);
+
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int nBCRegionUnstruct = unstructBCSet->GetnBCRegion();
+        for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegionUnstruct; iBCRegionUnstruct++)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+            int bcType = bcRegion->GetBCType();
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            if (bcType == PHENGLEI::FARFIELD || bcType == PHENGLEI::INFLOW || bcType == PHENGLEI::OUTFLOW
+                || bcType == PHENGLEI::PRESSURE_INLET || bcType == PHENGLEI::PRESSURE_OUTLET)
+            {
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    bCoeff[le] -= FaceFlux[iFacelocal];
+                }
+            }
+            else if (bcType == PHENGLEI::INTERFACE)
+            {
+                for (size_t iFace = 0; iFace < faceIndex->size(); ++iFace)
+                {
+                    int iFacelocal = (*faceIndex)[iFace];
+                    int le = leftCellOfFace[iFacelocal];
+                    bCoeff[le] -= FaceFlux[iFacelocal];
+                }
+            }
+        }
+
+        for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+        {
+            int le = leftCellOfFace[iFace];
+            int re = rightCellOfFace[iFace];
+            bCoeff[le] -= FaceFlux[iFace];
+            bCoeff[re] += FaceFlux[iFace];
+        }
+    }
+
+    void PPEqCalculator::calcTransMatrixTerm(Grid*  gridIn)
+    {
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+        if (isUnsteady == 0)
+        {
+            return;
+        }
+
+        string flowSolverName = GlobalDataBase::GetStrParaFromDB("flowSolverName");
+        if (flowSolverName == "CompressibleSIMPLE")
+        {
+            string TranCalcMethod = GlobalDataBase::GetStrParaFromDB("TranCalcMethod");
+            if (TranCalcMethod == "IMPLICIT_EULER")
+            {
+                TransMatrixTerm_1st(grid);
+            }
+            else if (TranCalcMethod == "IMPLICIT_2ND_ORDER")
+            {
+                TransMatrixTerm_2nd(grid);
+            }
+        }
+    }
+
+    void PPEqCalculator::TransMatrixTerm_1st(Grid*  gridIn) 
+    {
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        int nTotalCell = grid->GetNTotalCell();
+        RDouble *rho = reinterpret_cast<RDouble *> (grid->GetDataPtr("rho"));
+        RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+        RDouble dt = GlobalDataBase::GetDoubleParaFromDB("dt");
+
+        RDouble* cvOld = grid->GetCellVolume();
+        RDouble* rhoOld = reinterpret_cast<RDouble*>(grid->GetDataPtr("rhoOld"));
+
+        RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+        rhoOld = rho;
+        for (int iCell = 0; iCell < nTotalCell; ++iCell)
+        {
+            diagMatrixCoeff[iCell] += cvOld[iCell] * cRho[iCell] / dt;
+        }
+    }
+
+    void PPEqCalculator::TransMatrixTerm_2nd(Grid*  gridIn) 
+    {
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        int nTotalCell = grid->GetNTotalCell();
+        RDouble *rho = reinterpret_cast<RDouble *> (grid->GetDataPtr("rho"));
+        RDouble *diagMatrixCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("diagMatrixCoeff"));
+        RDouble *bCoeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("bCoeff"));
+        RDouble dt = GlobalDataBase::GetDoubleParaFromDB("dt");
+
+        RDouble* cvOld = grid->GetCellVolume();
+        RDouble* rhoOld = reinterpret_cast<RDouble*>(grid->GetDataPtr("rhoOld"));
+        RDouble* cRho = reinterpret_cast<RDouble*>(grid->GetDataPtr("cRho"));
+        RDouble* rhoOldOld = reinterpret_cast<RDouble*>(grid->GetDataPtr("rhoOldOld"));
+        rhoOld = rho;
+        rhoOldOld = rho;
+        int timeStepNow;
+        GlobalDataBase::GetData("timeStepNow", &timeStepNow, PHINT, 1);
+        if (timeStepNow == 0)
+        {
+            for (int iCell = 0; iCell < nTotalCell; ++iCell)
+            {
+                diagMatrixCoeff[iCell] += cvOld[iCell] * cRho[iCell] / dt;
+            }
+        }
+        else
+        {
+            for (int iCell = 0; iCell < nTotalCell; ++iCell)
+            {
+                diagMatrixCoeff[iCell] += 3 * cvOld[iCell] * cRho[iCell] / (2 * dt);
+            }
+        }
+    }
+
+}
\ No newline at end of file
diff --git a/CFD/IncomSolver/src/Param_INCompSolverUnstruct.cpp b/CFD/IncomSolver/src/Param_INCompSolverUnstruct.cpp
new file mode 100644
index 0000000..6985506
--- /dev/null
+++ b/CFD/IncomSolver/src/Param_INCompSolverUnstruct.cpp
@@ -0,0 +1,123 @@
+#include"Param_INCompSolverUnstruct.h"
+#include "GlobalDataBase.h"
+#include "Glb_Dimension.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Param_INCompSolverUnstruct::Param_INCompSolverUnstruct()
+{
+    setInComEquaMap();
+}
+
+LIB_EXPORT Param_INCompSolverUnstruct::~Param_INCompSolverUnstruct()
+{
+
+}
+
+LIB_EXPORT void Param_INCompSolverUnstruct::Init()
+{
+
+}
+
+
+void Param_INCompSolverUnstruct::setInComEquaMap()
+{
+    using namespace IDX;
+
+    int* varIndex = new int[50];
+    for (int iIndex = 0; iIndex < 50; iIndex++)
+    {
+        varIndex[iIndex] = 0;
+    }
+    GlobalDataBase::UpdateDataPtr("varIndex", varIndex);
+
+
+    string* varNameIncom = new string[50];
+    for (int iIndex = 0; iIndex < 50; iIndex++)
+    {
+        varNameIncom[iIndex] = "";
+    }
+    varNameIncom[S_IU] = "U";
+    varNameIncom[S_IV] = "V";
+    varNameIncom[S_IW] = "W";
+    varNameIncom[S_IP] = "P";
+    varNameIncom[S_ITEMP] = "Enthalpy";
+    varNameIncom[S_ITURBK] = "Kinetic";
+    varNameIncom[S_IEPSILON] = "Epsilon";
+    varNameIncom[S_ISA] = "Kinetic";
+    varNameIncom[S_IAIR  ] = "AIR";
+    varNameIncom[S_IH2   ] = "H2";
+    varNameIncom[S_IH2_l ] = "H2_l";
+    varNameIncom[S_INH3_l] = "NH3_l";
+    varNameIncom[S_ICH4  ] = "CH4";
+    varNameIncom[S_IC2H4 ] = "C2H4";
+    varNameIncom[S_IC3H8 ] = "C3H8";
+    varNameIncom[S_IC2H6 ] = "C2H6";
+    varNameIncom[S_ING   ] = "NG";
+    varNameIncom[S_ILNG  ] = "LNG";
+    varNameIncom[S_IH2S  ] = "H2S";
+    varNameIncom[S_ICl2  ] = "Cl2";
+    varNameIncom[S_INH3  ] = "NH3";
+
+    GlobalDataBase::UpdateDataPtr("varNameIncom", varNameIncom);
+
+    RDouble* soluRelaxCoeff = new RDouble[50];
+    for (int iIndex = 0; iIndex < 50; iIndex++)
+    {
+        soluRelaxCoeff[iIndex] = 0.0;
+    }
+    GlobalDataBase::UpdateDataPtr("soluRelaxCoeff", soluRelaxCoeff);
+
+    RDouble* solutionRes = new RDouble[50];
+    for (int iIndex = 0; iIndex < 50; iIndex++)
+    {
+        solutionRes[iIndex] = 0.0;
+    }
+    GlobalDataBase::UpdateDataPtr("solutionRes", solutionRes);
+
+    RDouble** DiffusionCoeff = new RDouble*[50];
+    for (int iIndex = 0; iIndex < 50; iIndex++)
+    {
+        DiffusionCoeff[iIndex] = nullptr;
+    }
+    GlobalDataBase::UpdateDataPtr("DiffusionCoeff", DiffusionCoeff);
+
+    int* localSolverIndex = new int[50];
+    for (int iSolverIndex = 0; iSolverIndex < 50; iSolverIndex++)
+    {
+        localSolverIndex[iSolverIndex] = -1;
+    }
+    GlobalDataBase::UpdateDataPtr("localSolverIndex", localSolverIndex);
+
+    int* maxIterOfEachEq = new int[50];
+    for (int iEquation = 0; iEquation < 50; iEquation++)
+    {
+        maxIterOfEachEq[iEquation] = -1;
+    }
+    GlobalDataBase::UpdateDataPtr("maxIterOfEachEq", maxIterOfEachEq);
+
+    RDouble* iterTolOfEachEq = new RDouble [50];
+    for (int iEquation = 0; iEquation < 50; iEquation++)
+    {
+        iterTolOfEachEq[iEquation] = 1.0e-2;
+    }
+    GlobalDataBase::UpdateDataPtr("iterTolOfEachEq", iterTolOfEachEq);
+
+    int* solMethodOfLinEqSystem = new int[50];
+    for (int iEquation = 0; iEquation < 50; iEquation++)
+    {
+        solMethodOfLinEqSystem[iEquation] = -1;
+    }
+    GlobalDataBase::UpdateDataPtr("solMethodOfLinEqSystem", solMethodOfLinEqSystem);
+
+    int* precondMethodOfLinEqSystem = new int[50];
+    for (int iEquation = 0; iEquation < 50; iEquation++)
+    {
+        precondMethodOfLinEqSystem[iEquation] = -1;
+    }
+    GlobalDataBase::UpdateDataPtr("precondMethodOfLinEqSystem", precondMethodOfLinEqSystem);
+}
+
+
+}
diff --git a/CFD/IncomSolver/src/hypreCalculator.cpp b/CFD/IncomSolver/src/hypreCalculator.cpp
new file mode 100644
index 0000000..2bcd14f
--- /dev/null
+++ b/CFD/IncomSolver/src/hypreCalculator.cpp
@@ -0,0 +1,1168 @@
+#include <iostream>
+#include <iomanip>
+#include "hypreCalculator.h"
+#include "Geo_UnstructGrid.h"
+#include "TK_Time.h"
+#include "TK_Exit.h"
+
+namespace PHSPACE
+{
+hypreCalculator::hypreCalculator() : LinearEquationSystemCalculator()
+{
+#ifndef USE_HypreLib
+  TK_Exit::ExceptionExit("hypre lib is not opened in CMAKEFile!");
+#endif
+}
+
+hypreCalculator::~hypreCalculator()
+{
+    mathLibSolveFinalize();
+}
+
+void hypreCalculator::mathLibSolveInit(Grid* gridIn)
+{
+#ifdef USE_HypreLib
+    UnstructGrid* grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+    int* leftCellOfFace = grid->GetLeftCellOfFace();
+    int* rightCellOfFace = grid->GetRightCellOfFace();
+    int zoneID = grid->GetZoneID();
+
+    int* globalCellNoOfGlobalZones = reinterpret_cast<int*> (GlobalDataBase::GetDataPtr("globalCellNoOfGlobalZones"));
+    int* maxIterOfEachEq = reinterpret_cast<int*> (GlobalDataBase::GetDataPtr("maxIterOfEachEq"));
+    RDouble* iterTolOfEachEq = reinterpret_cast<RDouble*> (GlobalDataBase::GetDataPtr("iterTolOfEachEq"));
+
+    localSize = nTotalCell;
+    ilower = globalCellNoOfGlobalZones[zoneID];
+    iupper = globalCellNoOfGlobalZones[zoneID + 1] - 1;
+    rows = new int [localSize];
+    for (int i = 0; i < localSize; i++)
+    {
+        rows[i] = ilower + i;
+    }
+
+    colValueOfOneRow = new RDouble [100];
+    colNumberOfOneRow = new int [100];
+
+    //HYPRE_IJMatrixCreate(MPI_COMM_WORLD, ilower, iupper, ilower, iupper, &A_hypre);
+    //HYPRE_IJMatrixSetObjectType(A_hypre, HYPRE_PARCSR);
+    //HYPRE_IJMatrixInitialize(A_hypre);
+
+    ///* Create the rhs and solution */
+    //HYPRE_IJVectorCreate(MPI_COMM_WORLD, ilower, iupper, &b_hypre);
+    //HYPRE_IJVectorSetObjectType(b_hypre, HYPRE_PARCSR);
+    //HYPRE_IJVectorInitialize(b_hypre);
+
+    //HYPRE_IJVectorCreate(MPI_COMM_WORLD, ilower, iupper, &x_hypre);
+    //HYPRE_IJVectorSetObjectType(x_hypre, HYPRE_PARCSR);
+    //HYPRE_IJVectorInitialize(x_hypre);
+
+    
+    int linearSolverSize = 50;
+    int *precondID = reinterpret_cast <int *>(GlobalDataBase::GetDataPtr("precondMethodOfLinEqSystem"));
+    precondList = new HYPRE_Solver* [linearSolverSize];
+    for (int iSolver = 0 ; iSolver < linearSolverSize; iSolver++)
+    {
+        if (maxIterOfEachEq[iSolver] > 0)
+        {
+            precondList[iSolver] = new HYPRE_Solver();
+        }
+    }
+    HYPRE_PtrToSolverFcn *SolvePtr = new HYPRE_PtrToSolverFcn[linearSolverSize];
+    HYPRE_PtrToSolverFcn *SetupPtr = new HYPRE_PtrToSolverFcn[linearSolverSize];
+    for (int iSolver = 0 ; iSolver < linearSolverSize; iSolver++)
+    {
+        SolvePtr[iSolver] = NULL;
+        SetupPtr[iSolver] = NULL;
+    }
+
+    for (int iSolver = 0 ; iSolver < linearSolverSize; iSolver++)
+    {
+        if (maxIterOfEachEq[iSolver] < 0)
+        {
+            continue;
+        }
+
+        int precondType = precondID[iSolver];
+        HYPRE_Solver* precond = precondList[iSolver];
+        if (precondType == iNone)
+        {
+
+        }
+        else if (precondType == iILU)
+        {
+            HYPRE_ILUCreate(&(*precond));
+            HYPRE_ILUSetTol(*precond, 0.0);
+            HYPRE_ILUSetMaxIter(*precond, 1);
+            HYPRE_ILUSetLogging(*precond, 0);
+            
+            SolvePtr[iSolver] = (HYPRE_PtrToSolverFcn) HYPRE_ILUSolve;
+            SetupPtr[iSolver] = (HYPRE_PtrToSolverFcn) HYPRE_ILUSetup;
+        }
+        else if (precondType == iAMG)
+        {
+            HYPRE_BoomerAMGCreate(&(*precond));
+            HYPRE_BoomerAMGSetTol            ((*precond), 0.0); // Only the number of iteration is important
+            HYPRE_BoomerAMGSetMaxIter        ((*precond), 1);   // Do only one iteration
+            HYPRE_BoomerAMGSetLogging(*precond, 0);
+
+            SolvePtr[iSolver] = (HYPRE_PtrToSolverFcn) HYPRE_BoomerAMGSolve;
+            SetupPtr[iSolver] = (HYPRE_PtrToSolverFcn) HYPRE_BoomerAMGSetup;
+        }
+        else if (precondType == iAMGDD)
+        {
+            HYPRE_BoomerAMGDDCreate(&(*precond));
+            HYPRE_Solver amg_solver;
+            HYPRE_BoomerAMGDDGetAMG((*precond), &amg_solver);
+
+            HYPRE_Int amgdd_start_level = 0;
+            HYPRE_Int amgdd_padding = 1;
+            HYPRE_Int amgdd_fac_num_relax = 1;
+            HYPRE_Int amgdd_num_comp_cycles = 2;
+            HYPRE_Int amgdd_fac_relax_type = 3;
+            HYPRE_Int amgdd_fac_cycle_type = 1;
+            HYPRE_Int amgdd_num_ghost_layers = 1;
+
+            HYPRE_BoomerAMGDDSetStartLevel((*precond), amgdd_start_level);
+            HYPRE_BoomerAMGDDSetPadding((*precond), amgdd_padding);
+            HYPRE_BoomerAMGDDSetFACNumRelax((*precond), amgdd_fac_num_relax);
+            HYPRE_BoomerAMGDDSetFACNumCycles((*precond), amgdd_num_comp_cycles);
+            HYPRE_BoomerAMGDDSetFACRelaxType((*precond), amgdd_fac_relax_type);
+            HYPRE_BoomerAMGDDSetFACCycleType((*precond), amgdd_fac_cycle_type);
+            HYPRE_BoomerAMGDDSetNumGhostLayers((*precond), amgdd_num_ghost_layers);
+
+            HYPRE_BoomerAMGSetTol            (amg_solver, 0.0); // Only the number of iteration is important
+            HYPRE_BoomerAMGSetMaxIter        (amg_solver, 1);   // Do only one iteration
+            HYPRE_BoomerAMGSetLogging(amg_solver, 0);
+
+            SolvePtr[iSolver] = (HYPRE_PtrToSolverFcn) HYPRE_BoomerAMGDDSolve;
+            SetupPtr[iSolver] = (HYPRE_PtrToSolverFcn) HYPRE_BoomerAMGDDSetup;
+        }
+        else if (precondType == iEuclid)
+        {
+            HYPRE_EuclidCreate(MPI_COMM_WORLD, &(*precond));
+
+            // Hardcoded parameters
+            //HYPRE_EuclidSetSparseA ((*precond), 0.1);
+            //HYPRE_EuclidSetRowScale((*precond), 1);
+            SolvePtr[iSolver] = (HYPRE_PtrToSolverFcn) HYPRE_EuclidSolve;
+            SetupPtr[iSolver] = (HYPRE_PtrToSolverFcn) HYPRE_EuclidSetup;
+        }
+        else if (precondType == DiagScale)
+        {
+            *precond = NULL;
+            SolvePtr[iSolver] = (HYPRE_PtrToSolverFcn) HYPRE_ParCSRDiagScale;
+            SetupPtr[iSolver] = (HYPRE_PtrToSolverFcn) HYPRE_ParCSRDiagScaleSetup;
+        }
+        else if (precondType == PILUT)
+        {
+            HYPRE_ParCSRPilutCreate( MPI_COMM_WORLD, &(*precond) );
+
+            SolvePtr[iSolver] = (HYPRE_PtrToSolverFcn) HYPRE_ParCSRPilutSolve;
+            SetupPtr[iSolver] = (HYPRE_PtrToSolverFcn) HYPRE_ParCSRPilutSetup;
+        }
+        else if (precondType == GSMG)
+        {
+            HYPRE_BoomerAMGCreate(&(*precond));
+            HYPRE_BoomerAMGSetGSMG((*precond), 4);
+
+            SolvePtr[iSolver] = (HYPRE_PtrToSolverFcn) HYPRE_BoomerAMGSolve;
+            SetupPtr[iSolver] = (HYPRE_PtrToSolverFcn) HYPRE_BoomerAMGSetup;
+        }
+        else if (precondType == ParaSails)
+        {
+            HYPRE_ParaSailsCreate( MPI_COMM_WORLD, &(*precond) );
+            SolvePtr[iSolver] = (HYPRE_PtrToSolverFcn) HYPRE_ParaSailsSolve;
+            SetupPtr[iSolver] = (HYPRE_PtrToSolverFcn) HYPRE_ParaSailsSetup;
+        }
+    }
+
+    int *solMethodOfLinEqSystem = reinterpret_cast <int *>(GlobalDataBase::GetDataPtr("solMethodOfLinEqSystem"));
+    solverList = new HYPRE_Solver* [linearSolverSize];
+    for (int iSolver = 0 ; iSolver < linearSolverSize; iSolver++)
+    {
+        if (maxIterOfEachEq[iSolver] < 0)
+        {
+            continue;
+        }
+        solverList[iSolver] = new HYPRE_Solver();
+    }
+
+    for (int iSolver = 0 ; iSolver < linearSolverSize; iSolver++)
+    {
+        if (maxIterOfEachEq[iSolver] < 0)
+        {
+            continue;
+        }
+
+        int linearSolver = solMethodOfLinEqSystem[iSolver];
+        HYPRE_Solver* solver = solverList[iSolver];
+        int maxIterStep = maxIterOfEachEq[iSolver];
+        RDouble iterTol = iterTolOfEachEq[iSolver];
+        
+        if (linearSolver == GMRESMethod)
+        {
+            HYPRE_ParCSRGMRESCreate(MPI_COMM_WORLD, solver);
+            HYPRE_GMRESSetKDim((*solver), 10);
+            HYPRE_GMRESSetMaxIter((*solver), maxIterStep);
+            HYPRE_GMRESSetTol((*solver), iterTol);
+            HYPRE_GMRESSetPrintLevel((*solver), 0);
+            HYPRE_GMRESSetLogging((*solver), 0);
+            if (precondID[iSolver] > 0)
+            {
+                HYPRE_GMRESSetPrecond((*solver), SolvePtr[iSolver], 
+                            SetupPtr[iSolver], *(precondList[iSolver]));
+            }
+        }
+        else if (linearSolver == BicgstabMethod)
+        {
+            HYPRE_ParCSRBiCGSTABCreate(MPI_COMM_WORLD, &(*solver));
+            HYPRE_ParCSRBiCGSTABSetMaxIter((*solver), maxIterStep);
+            HYPRE_ParCSRBiCGSTABSetTol((*solver), iterTol);
+            HYPRE_ParCSRBiCGSTABSetPrintLevel((*solver), 0);
+            HYPRE_ParCSRBiCGSTABSetLogging((*solver), 0);
+
+            if (precondID[iSolver] > 0)
+            {
+                HYPRE_BiCGSTABSetPrecond((*solver), SolvePtr[iSolver], 
+                                        SetupPtr[iSolver], *(precondList[iSolver]));
+            }
+        }
+        else if (linearSolver == AMGMethod)
+        {
+            HYPRE_BoomerAMGCreate(&(*solver));
+            HYPRE_BoomerAMGSetTol((*solver), iterTol);
+            HYPRE_BoomerAMGSetMaxIter((*solver), maxIterStep);
+            HYPRE_BoomerAMGSetPrintLevel((*solver), 0);
+            HYPRE_BoomerAMGSetLogging((*solver), 0);
+
+            HYPRE_BoomerAMGSetAggNumLevels((*solver), 1);
+            HYPRE_BoomerAMGSetRelaxType((*solver), 3);
+            HYPRE_BoomerAMGSetCoarsenType((*solver), 10);
+            HYPRE_BoomerAMGSetInterpType((*solver), 3);
+        }
+        else if (linearSolver == PCGMethod)
+        {
+            HYPRE_ParCSRPCGCreate(MPI_COMM_WORLD, &(*solver));
+            HYPRE_PCGSetMaxIter((*solver), maxIterStep); /* max iterations */
+            HYPRE_PCGSetTol((*solver), iterTol); /* conv. tolerance */
+            HYPRE_PCGSetTwoNorm((*solver), 1); /* use the two norm as the stopping criteria */
+            HYPRE_PCGSetPrintLevel((*solver), 0); /* prints out the iteration info */
+            HYPRE_PCGSetLogging((*solver), 0); /* needed to get run info later */
+            if (precondID[iSolver] > 0)
+            {
+                HYPRE_PCGSetPrecond((*solver), SolvePtr[iSolver], 
+                                    SetupPtr[iSolver], *(precondList[iSolver]));
+            }
+        }
+        else if (linearSolver == FlexGMRESMethod)
+        {
+            HYPRE_ParCSRFlexGMRESCreate(MPI_COMM_WORLD, solver);
+            HYPRE_FlexGMRESSetKDim((*solver), 5);
+            HYPRE_FlexGMRESSetMaxIter((*solver), maxIterStep);
+            HYPRE_FlexGMRESSetTol((*solver), iterTol);
+            HYPRE_FlexGMRESSetPrintLevel((*solver), 0);
+            HYPRE_FlexGMRESSetLogging((*solver), 0);
+            if (precondID[iSolver] > 0)
+            {
+                HYPRE_FlexGMRESSetPrecond((*solver), SolvePtr[iSolver], 
+                    SetupPtr[iSolver], *(precondList[iSolver]));
+            }
+        }
+        else if (linearSolver == LGMRESMethod)
+        {
+
+            HYPRE_ParCSRLGMRESCreate(MPI_COMM_WORLD, solver);
+
+            HYPRE_ParCSRLGMRESSetTol((*solver), iterTol);
+            HYPRE_ParCSRLGMRESSetMaxIter((*solver), maxIterStep);
+
+            if (precondID[iSolver] > 0)
+            {
+                HYPRE_LGMRESSetPrecond((*solver), SolvePtr[iSolver], 
+                    SetupPtr[iSolver], *(precondList[iSolver]));
+            }
+        }
+        else if (linearSolver == COGMRESMethod)
+        {
+
+            HYPRE_ParCSRCOGMRESCreate(MPI_COMM_WORLD, solver);
+            HYPRE_ParCSRCOGMRESSetTol((*solver), iterTol);
+            HYPRE_ParCSRCOGMRESSetMaxIter((*solver), maxIterStep);
+
+            //if (precondID[iSolver] > 0)
+            //{
+            //    HYPRE_ParCSRCOGMRESSetPrecond((*solver), SolvePtr[iSolver], 
+            //        SetupPtr[iSolver], *(precondList[iSolver]));
+            //}
+        }
+        else if (linearSolver == CGNRMethod)
+        {
+            //HYPRE_ParCSRCGNRCreate(MPI_COMM_WORLD, solver);
+            //HYPRE_ParCSRCGNRSetLogging(*solver,0);
+            //if (precondID[iSolver] > 0)
+            //{
+            //    HYPRE_CGNRSetPrecond((*solver), SolvePtr[iSolver], SolvePtr[iSolver], 
+            //        SetupPtr[iSolver], *(precondList[iSolver]));
+            //}
+        }
+        else if (linearSolver == MGRMethod)
+        {
+            //! not complete.
+            HYPRE_MGRCreate(solver);
+            
+            if (precondID[iSolver] > 0)
+            {
+                HYPRE_CGNRSetPrecond((*solver), SolvePtr[iSolver], SolvePtr[iSolver], 
+                    SetupPtr[iSolver], *(precondList[iSolver]));
+            }
+        }
+        else if (linearSolver == ILUMethod)
+        {
+            //! not complete.
+            HYPRE_ILUCreate(solver);
+            HYPRE_ILUSetMaxIter(*solver, maxIterStep );
+            HYPRE_ILUSetTol(*solver, iterTol );
+        }
+        else if (linearSolver == AMGDDMethod)
+        {
+        HYPRE_BoomerAMGDDCreate(solver);
+        }
+        else if (linearSolver == HybridMethod)
+        {
+            //! not complete.
+            HYPRE_ParCSRHybridCreate(solver);
+            HYPRE_ParCSRHybridSetTol(*solver, iterTol);
+            if (precondID[iSolver] > 0)
+            {
+                //HYPRE_ParCSRHybridSetPrecond((*solver), SolvePtr[iSolver], SolvePtr[iSolver], 
+                //    SetupPtr[iSolver], *(precondList[iSolver]));
+            }
+        }
+        else
+        {
+            HYPRE_ParCSRGMRESCreate(MPI_COMM_WORLD, &(*solver));
+            HYPRE_GMRESSetKDim((*solver), 5);
+            HYPRE_GMRESSetMaxIter((*solver), 100);
+            HYPRE_GMRESSetTol((*solver), iterTol);
+            HYPRE_GMRESSetPrintLevel((*solver), 0);
+            HYPRE_GMRESSetLogging((*solver), 0);
+        }
+    }
+
+    RDouble GlobalTotalCells = GlobalDataBase::GetDoubleParaFromDB("GlobalTotalCells");
+    int* localCell2GlobalMap = grid->GetLocalCell2GlobalMap();
+    UnstructBCSet **bcr = grid->GetBCRecord();
+
+    ColVectors = new vector<int>[localSize];
+    for (int iCell = 0; iCell < localSize; iCell++)
+    {
+        int globalCellNumber = localCell2GlobalMap[iCell];
+        ColVectors[iCell].push_back(globalCellNumber);
+    }
+
+    for (int iFace = 0; iFace < nTotalFace; iFace++)
+    {
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+        if (re < localSize)
+        {
+            ColVectors[le].push_back(localCell2GlobalMap[re]);
+            ColVectors[re].push_back(localCell2GlobalMap[le]);
+        }
+        else
+        {
+            int bcType = bcr[iFace]->GetKey();
+            if (bcType != PHENGLEI::INTERFACE)
+            {
+                continue;
+            }
+            if (localCell2GlobalMap[re] < GlobalTotalCells)
+            {
+                if (localCell2GlobalMap[re] > localCell2GlobalMap[le])
+                {
+                    ColVectors[le].push_back(localCell2GlobalMap[re]);
+                }
+                else if (localCell2GlobalMap[re] < localCell2GlobalMap[le])
+                {
+                    ColVectors[le].push_back(localCell2GlobalMap[re]);
+                }
+            }
+        }    
+    }
+
+    delete [] SolvePtr;
+    delete [] SetupPtr;
+#endif
+}
+
+void hypreCalculator::mathLibSolve(Grid* gridIn, int iEquation, RDouble * fi, RDouble * diagCoef, RDouble *b, RDouble * upNeighCoef, RDouble * dnNeighCoef)
+{
+#ifdef USE_HypreLib
+    UnstructGrid* grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+    int* leftCellOfFace = grid->GetLeftCellOfFace();
+    int* rightCellOfFace = grid->GetRightCellOfFace();
+    
+    int* localCell2GlobalMap = grid->GetLocalCell2GlobalMap();
+    RDouble GlobalTotalCells = GlobalDataBase::GetDoubleParaFromDB("GlobalTotalCells");
+    
+    //int *constVarNumToSolveVarNum = reinterpret_cast <int*> (grid->GetDataPtr("constVarNumToSolveVarNum"));
+    HYPRE_Solver *solver = solverList[iEquation];
+    int *linearSolverID = reinterpret_cast <int *>(GlobalDataBase::GetDataPtr("solMethodOfLinEqSystem"));
+    int linearSolver = linearSolverID[iEquation];
+    
+    int *cell2ZoneIDMap = grid->GetCell2ZoneIDMap();
+    
+    UnstructBCSet **bcr = grid->GetBCRecord();
+
+    int* maxIterOfEachEq = reinterpret_cast<int*> (GlobalDataBase::GetDataPtr("maxIterOfEachEq"));
+    RDouble* iterTolOfEachEq = reinterpret_cast<RDouble*> (GlobalDataBase::GetDataPtr("iterTolOfEachEq"));
+
+    int maxIterStep = maxIterOfEachEq[iEquation];
+    RDouble iterTol = iterTolOfEachEq[iEquation];
+    //int *ActualIterStepNum = reinterpret_cast <int * > (GlobalDataBase::GetDataPtr("ActualIterStepNum"));
+    //RDouble *ActualIterTol = reinterpret_cast <RDouble * > (GlobalDataBase::GetDataPtr("ActualIterTol"));
+    //RDouble *ActualSolveTime = reinterpret_cast <RDouble * > (GlobalDataBase::GetDataPtr("ActualSolveTime"));
+    ////RDouble timeStartSolve = PHSPACE::TIME_SPACE::GetWallTime();
+
+    int num_iterations;
+    RDouble residual;
+
+    HYPRE_IJMatrixCreate(MPI_COMM_WORLD, ilower, iupper, ilower, iupper, &A_hypre);
+    HYPRE_IJMatrixSetObjectType(A_hypre, HYPRE_PARCSR);
+    HYPRE_IJMatrixInitialize(A_hypre);
+    
+    /* Create the rhs and solution */
+    HYPRE_IJVectorCreate(MPI_COMM_WORLD, ilower, iupper, &b_hypre);
+    HYPRE_IJVectorSetObjectType(b_hypre, HYPRE_PARCSR);
+    HYPRE_IJVectorInitialize(b_hypre);
+    
+    HYPRE_IJVectorCreate(MPI_COMM_WORLD, ilower, iupper, &x_hypre);
+    HYPRE_IJVectorSetObjectType(x_hypre, HYPRE_PARCSR);
+    HYPRE_IJVectorInitialize(x_hypre);
+    
+    
+    ValuesVector = new vector<double>[localSize];
+    for (int iCell = 0; iCell < localSize; iCell++)
+    {
+        ValuesVector[iCell].push_back(diagCoef[iCell]);
+    }
+    for (int iFace = 0; iFace < nTotalFace; iFace++)
+    {
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+        if (re < localSize)
+        {
+            ValuesVector[le].push_back(upNeighCoef[iFace]);
+            ValuesVector[re].push_back(dnNeighCoef[iFace]);
+        }
+        else
+        {
+            int bcType = bcr[iFace]->GetKey();
+            if (bcType != PHENGLEI::INTERFACE)
+            {
+                continue;
+            }
+            if (localCell2GlobalMap[re] < GlobalTotalCells)
+            {
+                if (localCell2GlobalMap[re] > localCell2GlobalMap[le])
+                {
+                    ValuesVector[le].push_back(upNeighCoef[iFace]);
+                }
+                else if (localCell2GlobalMap[re] < localCell2GlobalMap[le])
+                {
+                    ValuesVector[le].push_back(upNeighCoef[iFace]);
+                }
+            }
+        }    
+    }
+    
+    for (int i = 0; i < localSize; i++)
+    {
+        int colSize = ColVectors[i].size();
+        int globalRowNumber = rows[i];
+        for (int jCell = 0; jCell < ColVectors[i].size(); jCell++)
+        {
+            colNumberOfOneRow[jCell] = ColVectors[i][jCell];
+        }
+    
+        for (int jCell = 0; jCell < ColVectors[i].size(); jCell++)
+        {
+            colValueOfOneRow[jCell] = ValuesVector[i][jCell];
+        }
+    
+        HYPRE_IJMatrixSetValues(A_hypre, 1, &colSize, &globalRowNumber, colNumberOfOneRow, colValueOfOneRow);
+    }
+    
+    HYPRE_IJMatrixAssemble(A_hypre);
+    HYPRE_IJMatrixGetObject(A_hypre, (void**)&parcsr_A_hypre);  
+    
+    HYPRE_IJVectorSetValues(b_hypre, localSize, rows, b);
+    HYPRE_IJVectorAssemble(b_hypre);
+    HYPRE_IJVectorGetObject(b_hypre, (void**)&par_b_hypre);
+    
+    HYPRE_IJVectorSetValues(x_hypre, localSize, rows, fi);
+    HYPRE_IJVectorAssemble(x_hypre);
+    HYPRE_IJVectorGetObject(x_hypre, (void**)&par_x_hypre);
+    
+    int *precondID = reinterpret_cast <int *>(GlobalDataBase::GetDataPtr("precondID"));
+    HYPRE_Solver* precond = precondList[iEquation];
+
+    //if (precondID[iEquation] == iAMGDD)
+    //{
+    //    destoryTempDataInAMGDD(*precond);
+    //}
+
+    RDouble timeStartSolve = PHSPACE::TIME_SPACE::GetWallTime();
+    if (linearSolver == GaussSeidelMethod) 
+    {
+        explicitSolve(gridIn, fi, diagCoef, b, upNeighCoef, dnNeighCoef);
+    }
+    else if (linearSolver == GMRESMethod) 
+    {
+        HYPRE_ParCSRGMRESSetup((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_ParCSRGMRESSolve((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_IJVectorGetValues(x_hypre, localSize, rows, fi);
+
+        HYPRE_ParCSRGMRESGetNumIterations((*solver), &num_iterations);
+        HYPRE_ParCSRGMRESGetFinalRelativeResidualNorm((*solver), &residual);
+    }
+    else if (linearSolver == BicgstabMethod)
+    {
+        HYPRE_ParCSRBiCGSTABSetup((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_ParCSRBiCGSTABSolve((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_IJVectorGetValues(x_hypre, localSize, rows, fi);
+        
+        HYPRE_ParCSRBiCGSTABGetNumIterations((*solver), &num_iterations);
+        HYPRE_ParCSRBiCGSTABGetFinalRelativeResidualNorm((*solver), &residual);
+    }
+    else if (linearSolver == AMGMethod)
+    {
+        HYPRE_BoomerAMGSetup((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_BoomerAMGSolve((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_IJVectorGetValues(x_hypre, localSize, rows, fi);
+        HYPRE_BoomerAMGGetNumIterations((*solver), &num_iterations);
+        HYPRE_BoomerAMGGetFinalRelativeResidualNorm((*solver), &residual);
+    }
+    else if (linearSolver == PCGMethod)
+    {
+        HYPRE_ParCSRPCGSetup((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_ParCSRPCGSolve((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_IJVectorGetValues(x_hypre, localSize, rows, fi);
+        HYPRE_ParCSRPCGGetNumIterations((*solver), &num_iterations);
+        HYPRE_ParCSRPCGGetFinalRelativeResidualNorm((*solver), &residual);
+    }
+    else if (linearSolver == FlexGMRESMethod) 
+    {
+        HYPRE_ParCSRFlexGMRESSetup((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_ParCSRFlexGMRESSolve((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_IJVectorGetValues(x_hypre, localSize, rows, fi);
+        HYPRE_ParCSRFlexGMRESGetNumIterations((*solver), &num_iterations);
+        HYPRE_ParCSRFlexGMRESGetFinalRelativeResidualNorm((*solver), &residual);
+    }
+    else if (linearSolver == LGMRESMethod)
+    {
+        HYPRE_ParCSRLGMRESSetup((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_ParCSRLGMRESSolve((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_IJVectorGetValues(x_hypre, localSize, rows, fi);
+        HYPRE_ParCSRLGMRESGetNumIterations((*solver), &num_iterations);
+        HYPRE_ParCSRLGMRESGetFinalRelativeResidualNorm((*solver), &residual);
+    }
+    else if (linearSolver == COGMRESMethod)
+    {
+        HYPRE_ParCSRCOGMRESSetup((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_ParCSRCOGMRESSolve((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_IJVectorGetValues(x_hypre, localSize, rows, fi);
+        HYPRE_ParCSRCOGMRESGetNumIterations((*solver), &num_iterations);
+        HYPRE_ParCSRCOGMRESGetFinalRelativeResidualNorm((*solver), &residual);
+    }
+    else if (linearSolver == CGNRMethod)
+    {
+        HYPRE_ParCSRCGNRCreate(MPI_COMM_WORLD, solver);
+        HYPRE_ParCSRCGNRSetup((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_ParCSRCGNRSolve((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_IJVectorGetValues(x_hypre, localSize, rows, fi);
+        HYPRE_ParCSRCGNRDestroy((*solver));
+        HYPRE_ParCSRCGNRGetNumIterations((*solver), &num_iterations);
+        HYPRE_ParCSRCGNRGetFinalRelativeResidualNorm((*solver), &residual);
+    }
+    else if (linearSolver == MGRMethod)
+    {
+        HYPRE_MGRSetup((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_MGRSolve((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_IJVectorGetValues(x_hypre, localSize, rows, fi);
+        HYPRE_MGRGetNumIterations((*solver), &num_iterations);
+        HYPRE_MGRGetFinalRelativeResidualNorm((*solver), &residual);
+    }
+    else if (linearSolver == ILUMethod)
+    {
+        HYPRE_ILUSetup((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_ILUSolve((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_IJVectorGetValues(x_hypre, localSize, rows, fi);
+        HYPRE_ILUGetNumIterations((*solver), &num_iterations);
+        HYPRE_ILUGetFinalRelativeResidualNorm((*solver), &residual);
+    }
+    else if (linearSolver == AMGDDMethod)
+    {
+        
+        destoryTempDataInAMGDD((*solver));
+
+        HYPRE_BoomerAMGDDSetup((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_BoomerAMGDDSolve((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_IJVectorGetValues(x_hypre, localSize, rows, fi);
+        
+        HYPRE_BoomerAMGDDGetNumIterations((*solver), &num_iterations);
+        HYPRE_BoomerAMGDDGetFinalRelativeResidualNorm((*solver), &residual);
+        
+    }
+    else if (linearSolver == HybridMethod)
+    {
+        HYPRE_ParCSRHybridSetup((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_ParCSRHybridSolve((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_IJVectorGetValues(x_hypre, localSize, rows, fi);
+        HYPRE_ParCSRHybridGetNumIterations((*solver), &num_iterations);
+        HYPRE_ParCSRHybridGetFinalRelativeResidualNorm((*solver), &residual);
+    }
+    else 
+    {
+        HYPRE_ParCSRGMRESSetup((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_ParCSRGMRESSolve((*solver), parcsr_A_hypre, par_b_hypre, par_x_hypre);
+        HYPRE_IJVectorGetValues(x_hypre, localSize, rows, fi);
+        HYPRE_ParCSRGMRESGetNumIterations((*solver), &num_iterations);
+        HYPRE_ParCSRGMRESGetFinalRelativeResidualNorm((*solver), &residual);
+    }
+
+
+    if (precondID[iEquation] == iAMGDD)
+    {
+        //HYPRE_BoomerAMGDDDestroy(AMGDDPrecond);
+    }
+
+    RDouble timeEndSolve = PHSPACE::TIME_SPACE::GetWallTime();
+    //ActualIterStepNum[iEquation] = num_iterations;
+    //ActualIterTol[iEquation] = residual;
+    //ActualSolveTime[iEquation] = timeEndSolve - timeStartSolve;
+
+    for (int iCell = 0; iCell < localSize; iCell++)
+    {
+        ValuesVector[iCell].clear();
+    }
+    delete [] ValuesVector;  
+    HYPRE_IJMatrixDestroy(A_hypre);
+    HYPRE_IJVectorDestroy(b_hypre);
+    HYPRE_IJVectorDestroy(x_hypre);
+#endif
+}
+
+void hypreCalculator::mathLibSolveFinalize()
+{
+#ifdef USE_HypreLib
+    delete [] rows;
+    for (int iCell = 0; iCell < localSize; iCell++)
+    {
+        ColVectors[iCell].clear();
+    }
+    delete [] ColVectors;
+    delete [] colValueOfOneRow;
+    delete [] colNumberOfOneRow;
+
+    int linearSolverSize = GlobalDataBase::GetIntParaFromDB("linearSolverSize");
+
+
+    int *linearSolverID = reinterpret_cast <int *>(GlobalDataBase::GetDataPtr("solMethodOfLinEqSystem"));
+    for (int iSolver = 0 ; iSolver < linearSolverSize; iSolver++)
+    {
+        int linearSolver = linearSolverID[iSolver];
+        HYPRE_Solver* solver = solverList[iSolver];
+
+        if (linearSolver == GMRESMethod)
+        {
+            /* clean up */
+            HYPRE_ParCSRGMRESDestroy((*solver));
+        }
+        else if (linearSolver == BicgstabMethod)
+        {
+            HYPRE_ParCSRBiCGSTABDestroy((*solver));
+        }
+        else if (linearSolver == AMGMethod)
+        {
+            /* Destroy solver */
+            HYPRE_BoomerAMGDestroy((*solver));
+        }
+        else if (linearSolver == AMGDDMethod)
+        {
+            //HYPRE_BoomerAMGDDDestroy((*solver));
+        }
+        else if (linearSolver == PCGMethod)
+        {
+            /* Destroy solver */
+            HYPRE_ParCSRPCGDestroy((*solver));
+        }
+        else if (linearSolver == FlexGMRESMethod)
+        {
+            HYPRE_ParCSRFlexGMRESDestroy((*solver));
+        }
+        else if (linearSolver == LGMRESMethod)
+        {
+            HYPRE_ParCSRLGMRESDestroy((*solver));
+        }
+        else if (linearSolver == COGMRESMethod)
+        {
+            HYPRE_ParCSRCOGMRESDestroy((*solver));
+        }
+        else if (linearSolver == CGNRMethod)
+        {
+            //HYPRE_ParCSRCGNRDestroy((*solver));
+        }
+        else if (linearSolver == MGRMethod)
+        {
+            HYPRE_MGRDestroy((*solver));
+        }
+        else if (linearSolver == ILUMethod)
+        {
+            HYPRE_ILUDestroy((*solver));
+        }
+        else
+        {
+            HYPRE_ParCSRGMRESDestroy((*solver));
+        }
+    }
+
+    int *precondID = reinterpret_cast <int *>(GlobalDataBase::GetDataPtr("precondID"));
+    
+    for (int iSolver = 0 ; iSolver < linearSolverSize; iSolver++)
+    {
+        if (precondID[iSolver] == iAMG)
+        {
+            HYPRE_BoomerAMGDestroy(*(precondList[iSolver]));
+        }
+        else if (precondID[iSolver] == iEuclid)
+        {
+            HYPRE_EuclidDestroy(*(precondList[iSolver]));
+        }
+        else
+        {
+            delete precondList[iSolver];
+        }
+    }
+    delete [] precondList;
+#endif
+}
+
+#ifdef USE_HypreLib
+void hypreCalculator::SetAMGDDPrecondParameters(HYPRE_Solver& AMGDDPrecond)
+{
+
+    HYPRE_Int amgdd_start_level = 0;
+    HYPRE_Int amgdd_padding = 1;
+    HYPRE_Int amgdd_fac_num_relax = 1;
+    HYPRE_Int amgdd_num_comp_cycles = 2;
+    HYPRE_Int amgdd_fac_relax_type = 3;
+    HYPRE_Int amgdd_fac_cycle_type = 1;
+    HYPRE_Int amgdd_num_ghost_layers = 1;
+
+    HYPRE_BoomerAMGDDSetStartLevel(AMGDDPrecond, amgdd_start_level);
+    HYPRE_BoomerAMGDDSetPadding(AMGDDPrecond, amgdd_padding);
+    HYPRE_BoomerAMGDDSetFACNumRelax(AMGDDPrecond, amgdd_fac_num_relax);
+    HYPRE_BoomerAMGDDSetFACNumCycles(AMGDDPrecond, amgdd_num_comp_cycles);
+    HYPRE_BoomerAMGDDSetFACRelaxType(AMGDDPrecond, amgdd_fac_relax_type);
+    HYPRE_BoomerAMGDDSetFACCycleType(AMGDDPrecond, amgdd_fac_cycle_type);
+    HYPRE_BoomerAMGDDSetNumGhostLayers(AMGDDPrecond, amgdd_num_ghost_layers);
+
+    HYPRE_Solver        amg_precond = NULL;
+    HYPRE_BoomerAMGDDGetAMG(AMGDDPrecond, &amg_precond);
+
+    /* for CGC BM Aug 25, 2006 */
+    HYPRE_Int      cgcits = 1;
+    /* for coordinate plotting BM Oct 24, 2006 */
+    HYPRE_Int      plot_grids = 0;
+    HYPRE_Int      coord_dim  = 3;
+    float         *coordinates = NULL;
+
+    /* parameters for ParaSAILS */
+    HYPRE_Real   sai_threshold = 0.1;
+    HYPRE_Real   sai_filter = 0.1;
+
+    /* parameters for PILUT */
+    HYPRE_Real   drop_tol = -1;
+    HYPRE_Int    nonzeros_to_keep = -1;
+
+    /* parameters for Euclid or ILU smoother in AMG */
+    HYPRE_Real   eu_ilut = 0.0;
+    HYPRE_Real   eu_sparse_A = 0.0;
+    HYPRE_Int    eu_bj = 0;
+    HYPRE_Int    eu_level = -1;
+    HYPRE_Int    eu_stats = 0;
+    HYPRE_Int    eu_mem = 0;
+    HYPRE_Int    eu_row_scale = 0; /* Euclid only */
+
+                                   /* parameters for GMRES */
+                                   //HYPRE_Int    k_dim;
+                                   /* parameters for COGMRES */
+    HYPRE_Int    cgs = 1;
+    HYPRE_Int    unroll = 0;
+    /* parameters for LGMRES */
+    //HYPRE_Int    aug_dim;
+    /* parameters for GSMG */
+    HYPRE_Int    gsmg_samples = 5;
+    /* interpolation */
+    HYPRE_Int    interp_type  = 6; /* default value */
+    HYPRE_Int    post_interp_type  = 0; /* default value */
+                                        /* RL: restriction */
+    HYPRE_Int    restri_type = 0;
+    /* aggressive coarsening */
+    HYPRE_Int    agg_interp_type  = 4; /* default value */
+    HYPRE_Int    agg_P_max_elmts  = 0; /* default value */
+    HYPRE_Int    agg_P12_max_elmts  = 0; /* default value */
+    HYPRE_Real   agg_trunc_factor  = 0; /* default value */
+    HYPRE_Real   agg_P12_trunc_factor  = 0; /* default value */
+
+    HYPRE_Int    print_system = 0;
+    HYPRE_Int    rel_change = 0;
+
+    /* begin lobpcg */
+    HYPRE_Int    hybrid = 1;
+    HYPRE_Int    num_sweep = 1;
+    HYPRE_Int    relax_default = 3;
+
+    HYPRE_Int  lobpcgFlag = 0;
+    HYPRE_Int  lobpcgGen = 0;
+    HYPRE_Int  constrained = 0;
+    HYPRE_Int  vFromFileFlag = 0;
+    HYPRE_Int  lobpcgSeed = 0;
+    HYPRE_Int  blockSize = 1;
+    HYPRE_Int  verbosity = 1;
+    //HYPRE_Int  iterations;
+    //HYPRE_Int  maxIterations = 100;
+    HYPRE_Int  checkOrtho = 0;
+    HYPRE_Int  printLevel = 0; /* also c.f. poutdat */
+    HYPRE_Int  two_norm = 1;
+    //HYPRE_Int  pcgIterations = 0;
+    HYPRE_Int  pcgMode = 1;
+    HYPRE_Real pcgTol = 1e-2;
+    //HYPRE_Real nonOrthF;
+
+
+    /* parameters for BoomerAMG */
+    HYPRE_Real     A_drop_tol = 0.0;
+    HYPRE_Int      A_drop_type = -1;
+    HYPRE_Int      coarsen_cut_factor = 0;
+    HYPRE_Real     strong_threshold;
+    HYPRE_Real     strong_thresholdR;
+    HYPRE_Real     filter_thresholdR;
+    HYPRE_Real     trunc_factor;
+    HYPRE_Real     jacobi_trunc_threshold;
+    HYPRE_Real     S_commpkg_switch = 1.0;
+    HYPRE_Real     CR_rate = 0.7;
+    HYPRE_Real     CR_strong_th = 0.0;
+    HYPRE_Int      CR_use_CG = 0;
+    HYPRE_Int      P_max_elmts = 4;
+    HYPRE_Int      cycle_type;
+    HYPRE_Int      fcycle;
+    HYPRE_Int      coarsen_type = 10;
+    HYPRE_Int      measure_type = 0;
+    HYPRE_Int      num_sweeps = 1;
+    HYPRE_Int      IS_type = 1;
+    HYPRE_Int      num_CR_relax_steps = 2;
+    HYPRE_Int      relax_type = -1;
+    HYPRE_Int      add_relax_type = 18;
+    HYPRE_Int      relax_coarse = -1;
+    HYPRE_Int      relax_up = -1;
+    HYPRE_Int      relax_down = -1;
+    HYPRE_Int      relax_order = 0;
+    HYPRE_Int      level_w = -1;
+    HYPRE_Int      level_ow = -1;
+    /* HYPRE_Int    smooth_lev; */
+    /* HYPRE_Int    smooth_rlx = 8; */
+    HYPRE_Int      smooth_type = 6;
+    HYPRE_Int      smooth_num_levels = 0;
+    HYPRE_Int      smooth_num_sweeps = 1;
+    HYPRE_Int      coarse_threshold = 9;
+    HYPRE_Int      min_coarse_size = 0;
+    /* redundant coarse grid solve */
+    HYPRE_Int      seq_threshold = 0;
+    HYPRE_Int      redundant = 0;
+    /* additive versions */
+    HYPRE_Int    additive = -1;
+    HYPRE_Int    mult_add = -1;
+    HYPRE_Int    simple = -1;
+    HYPRE_Int    add_last_lvl = -1;
+    HYPRE_Int    add_P_max_elmts = 0;
+    HYPRE_Real   add_trunc_factor = 0;
+    HYPRE_Int    rap2     = 0;
+    HYPRE_Int    mod_rap2 = 0;
+    HYPRE_Int    keepTranspose = 0;
+#ifdef HYPRE_USING_DSUPERLU
+    HYPRE_Int    dslu_threshold = -1;
+#endif
+    //HYPRE_Real   relax_wt;
+    HYPRE_Real   add_relax_wt = 1.0;
+    //HYPRE_Real   relax_wt_level;
+    //HYPRE_Real   outer_wt;
+    //HYPRE_Real   outer_wt_level;
+    HYPRE_Real   tol = 1.e-8, pc_tol = 0.;
+    HYPRE_Real   atol = 0.0;
+    HYPRE_Real   max_row_sum = 1.;
+    HYPRE_Int    converge_type = 0;
+
+    HYPRE_Int  cheby_order = 2;
+    HYPRE_Int  cheby_eig_est = 10;
+    HYPRE_Int  cheby_variant = 0;
+    HYPRE_Int  cheby_scale = 1;
+    HYPRE_Real cheby_fraction = .3;
+
+    HYPRE_Int           max_levels = 25;
+    //HYPRE_Int           num_iterations;
+    //HYPRE_Int           pcg_num_its, dscg_num_its;
+    //HYPRE_Int           max_iter = 1000;
+    //HYPRE_Int           mg_max_iter = 100;
+    HYPRE_Int           nodal = 0;
+    HYPRE_Int           nodal_diag = 0;
+    HYPRE_Int           keep_same_sign = 0;
+    HYPRE_Real          cf_tol = 0.9;
+
+    /* coasening data */
+    HYPRE_Int     num_cpt = 0;
+    HYPRE_Int     num_fpt = 0;
+    HYPRE_Int     num_isolated_fpt = 0;
+    HYPRE_BigInt *cpt_index = NULL;
+    HYPRE_BigInt *fpt_index = NULL;
+    HYPRE_BigInt *isolated_fpt_index = NULL;
+
+    HYPRE_BigInt *row_nums = NULL;
+    HYPRE_Int *num_cols = NULL;
+    HYPRE_BigInt *col_nums = NULL;
+    HYPRE_Real *data = NULL;
+
+    HYPRE_Int air = 0;
+    HYPRE_Int **grid_relax_points = NULL;
+
+    /* amg-dd options */
+    //HYPRE_Int amgdd_start_level = 0;
+    //HYPRE_Int amgdd_padding = 1;
+    //HYPRE_Int amgdd_fac_num_relax = 1;
+    //HYPRE_Int amgdd_num_comp_cycles = 2;
+    //HYPRE_Int amgdd_fac_relax_type = 3;
+    //HYPRE_Int amgdd_fac_cycle_type = 1;
+    //HYPRE_Int amgdd_num_ghost_layers = 1;
+
+
+    strong_threshold = 0.25;
+    strong_thresholdR = 0.25;
+    filter_thresholdR = 0.00;
+    trunc_factor = 0.;
+    jacobi_trunc_threshold = 0.01;
+    cycle_type = 1;
+    fcycle = 0;
+    HYPRE_Real relax_wt = 1.;
+    HYPRE_Real outer_wt = 1.;
+
+    HYPRE_Int           build_matrix_type = 2;
+    //build_matrix_arg_index = argc;
+    HYPRE_Int           build_rhs_type = 2;
+    //build_rhs_arg_index = argc;
+    HYPRE_Int           build_src_type = -1;
+    //build_src_arg_index = argc;
+    HYPRE_Int           build_x0_type = -1;
+    //build_x0_arg_index = argc;
+    HYPRE_Int           build_funcs_type = 0;
+    //build_funcs_arg_index = argc;
+    HYPRE_Int           build_fpt_arg_index = 0;
+    HYPRE_Int           build_sfpt_arg_index = 0;
+    HYPRE_Int           build_cpt_arg_index = 0;
+    //IS_type = 1;
+    HYPRE_Int           debug_flag = 0;
+    HYPRE_Int           solver_id = 0;
+    HYPRE_Int           ioutdat = 3;
+    HYPRE_Int           poutdat = 0;
+
+
+    HYPRE_Int           num_functions = 1;
+    HYPRE_Int           num_paths = 1;
+    HYPRE_Int           agg_num_levels = 0;
+    HYPRE_Int           ns_coarse = 1, ns_down = -1, ns_up = -1;
+
+
+    /* defaults for Schwarz */
+    HYPRE_Int           variant = 0;  /* multiplicative */
+    HYPRE_Int           overlap = 1;  /* 1 layer overlap */
+    HYPRE_Int           domain_type = 2; /* through agglomeration */
+    HYPRE_Real          schwarz_rlx_weight = 1.;
+
+    HYPRE_Int           use_nonsymm_schwarz = 0;
+
+    /* default execution policy and memory space */
+    HYPRE_ExecutionPolicy default_exec_policy = HYPRE_EXEC_DEVICE;
+    HYPRE_MemoryLocation  memory_location     = HYPRE_MEMORY_DEVICE;
+
+    HYPRE_BoomerAMGSetCGCIts(amg_precond, cgcits);
+    HYPRE_BoomerAMGSetInterpType(amg_precond, interp_type);
+    HYPRE_BoomerAMGSetRestriction(amg_precond, restri_type); /* 0: P^T, 1: AIR, 2: AIR-2 */
+    HYPRE_BoomerAMGSetPostInterpType(amg_precond, post_interp_type);
+    HYPRE_BoomerAMGSetNumSamples(amg_precond, gsmg_samples);
+    HYPRE_BoomerAMGSetTol(amg_precond, pc_tol);
+    HYPRE_BoomerAMGSetCoarsenType(amg_precond, coarsen_type);
+    HYPRE_BoomerAMGSetCoarsenCutFactor(amg_precond, coarsen_cut_factor);
+    HYPRE_BoomerAMGSetCPoints(amg_precond, max_levels, num_cpt, cpt_index);
+    HYPRE_BoomerAMGSetFPoints(amg_precond, num_fpt, fpt_index);
+    HYPRE_BoomerAMGSetIsolatedFPoints(amg_precond, num_isolated_fpt, isolated_fpt_index);
+    HYPRE_BoomerAMGSetMeasureType(amg_precond, measure_type);
+    HYPRE_BoomerAMGSetStrongThreshold(amg_precond, strong_threshold);
+    HYPRE_BoomerAMGSetSeqThreshold(amg_precond, seq_threshold);
+    HYPRE_BoomerAMGSetRedundant(amg_precond, redundant);
+    HYPRE_BoomerAMGSetMaxCoarseSize(amg_precond, coarse_threshold);
+    HYPRE_BoomerAMGSetMinCoarseSize(amg_precond, min_coarse_size);
+    HYPRE_BoomerAMGSetTruncFactor(amg_precond, trunc_factor);
+    HYPRE_BoomerAMGSetPMaxElmts(amg_precond, P_max_elmts);
+    HYPRE_BoomerAMGSetJacobiTruncThreshold(amg_precond, jacobi_trunc_threshold);
+    HYPRE_BoomerAMGSetSCommPkgSwitch(amg_precond, S_commpkg_switch);
+    HYPRE_BoomerAMGSetPrintLevel(amg_precond, poutdat);
+    HYPRE_BoomerAMGSetPrintFileName(amg_precond, "driver.out.log");
+    HYPRE_BoomerAMGSetMaxIter(amg_precond, 1);
+    HYPRE_BoomerAMGSetCycleType(amg_precond, cycle_type);
+    HYPRE_BoomerAMGSetFCycle(amg_precond, fcycle);
+    HYPRE_BoomerAMGSetNumSweeps(amg_precond, num_sweeps);
+    HYPRE_BoomerAMGSetISType(amg_precond, IS_type);
+    HYPRE_BoomerAMGSetNumCRRelaxSteps(amg_precond, num_CR_relax_steps);
+    HYPRE_BoomerAMGSetCRRate(amg_precond, CR_rate);
+    HYPRE_BoomerAMGSetCRStrongTh(amg_precond, CR_strong_th);
+    HYPRE_BoomerAMGSetCRUseCG(amg_precond, CR_use_CG);
+
+
+    HYPRE_BoomerAMGSetAddRelaxType(amg_precond, add_relax_type);
+    HYPRE_BoomerAMGSetAddRelaxWt(amg_precond, add_relax_wt);
+    HYPRE_BoomerAMGSetChebyOrder(amg_precond, cheby_order);
+    HYPRE_BoomerAMGSetChebyFraction(amg_precond, cheby_fraction);
+    HYPRE_BoomerAMGSetChebyEigEst(amg_precond, cheby_eig_est);
+    HYPRE_BoomerAMGSetChebyVariant(amg_precond, cheby_variant);
+    HYPRE_BoomerAMGSetChebyScale(amg_precond, cheby_scale);
+    HYPRE_BoomerAMGSetRelaxOrder(amg_precond, relax_order);
+    HYPRE_BoomerAMGSetRelaxWt(amg_precond, relax_wt);
+    HYPRE_BoomerAMGSetOuterWt(amg_precond, outer_wt);
+
+    HYPRE_BoomerAMGSetSmoothType(amg_precond, smooth_type);
+    HYPRE_BoomerAMGSetSmoothNumLevels(amg_precond, smooth_num_levels);
+    HYPRE_BoomerAMGSetSmoothNumSweeps(amg_precond, smooth_num_sweeps);
+    HYPRE_BoomerAMGSetMaxLevels(amg_precond, max_levels);
+    HYPRE_BoomerAMGSetMaxRowSum(amg_precond, max_row_sum);
+    HYPRE_BoomerAMGSetDebugFlag(amg_precond, debug_flag);
+    HYPRE_BoomerAMGSetNumFunctions(amg_precond, num_functions);
+    HYPRE_BoomerAMGSetAggNumLevels(amg_precond, agg_num_levels);
+    HYPRE_BoomerAMGSetAggInterpType(amg_precond, agg_interp_type);
+    HYPRE_BoomerAMGSetAggTruncFactor(amg_precond, agg_trunc_factor);
+    HYPRE_BoomerAMGSetAggP12TruncFactor(amg_precond, agg_P12_trunc_factor);
+    HYPRE_BoomerAMGSetAggPMaxElmts(amg_precond, agg_P_max_elmts);
+    HYPRE_BoomerAMGSetAggP12MaxElmts(amg_precond, agg_P12_max_elmts);
+    HYPRE_BoomerAMGSetNumPaths(amg_precond, num_paths);
+    HYPRE_BoomerAMGSetNodal(amg_precond, nodal);
+    HYPRE_BoomerAMGSetNodalDiag(amg_precond, nodal_diag);
+    HYPRE_BoomerAMGSetVariant(amg_precond, variant);
+    HYPRE_BoomerAMGSetOverlap(amg_precond, overlap);
+    HYPRE_BoomerAMGSetDomainType(amg_precond, domain_type);
+    HYPRE_BoomerAMGSetSchwarzUseNonSymm(amg_precond, use_nonsymm_schwarz);
+    HYPRE_BoomerAMGSetSchwarzRlxWeight(amg_precond, schwarz_rlx_weight);
+
+    HYPRE_BoomerAMGSetEuLevel(amg_precond, eu_level);
+    HYPRE_BoomerAMGSetEuBJ(amg_precond, eu_bj);
+    HYPRE_BoomerAMGSetEuSparseA(amg_precond, eu_sparse_A);
+    HYPRE_BoomerAMGSetCycleNumSweeps(amg_precond, ns_coarse, 3);
+
+
+    HYPRE_BoomerAMGSetAdditive(amg_precond, additive);
+    HYPRE_BoomerAMGSetMultAdditive(amg_precond, mult_add);
+    HYPRE_BoomerAMGSetSimple(amg_precond, simple);
+    HYPRE_BoomerAMGSetAddLastLvl(amg_precond, add_last_lvl);
+    HYPRE_BoomerAMGSetMultAddPMaxElmts(amg_precond, add_P_max_elmts);
+    HYPRE_BoomerAMGSetMultAddTruncFactor(amg_precond, add_trunc_factor);
+    HYPRE_BoomerAMGSetRAP2(amg_precond, rap2);
+    HYPRE_BoomerAMGSetModuleRAP2(amg_precond, mod_rap2);
+    HYPRE_BoomerAMGSetKeepTranspose(amg_precond, keepTranspose);
+}
+
+void hypreCalculator::destoryTempDataInAMGDD(HYPRE_Solver& amgddsolver)
+{
+    HYPRE_Solver amg_solver;
+
+    HYPRE_BoomerAMGDDGetAMG(amgddsolver, &amg_solver);
+
+    hypre_ParAMGData* amg_data = (hypre_ParAMGData*)(amg_solver);
+
+    HYPRE_Int     num_levels = hypre_ParAMGDataNumLevels(amg_data);
+
+    if (hypre_ParAMGDataDofFuncArray(amg_data))
+    {
+        for (int i = 1; i < num_levels; i++)
+        {
+            hypre_IntArrayDestroy(hypre_ParAMGDataDofFuncArray(amg_data)[i]);
+        }
+        hypre_TFree(hypre_ParAMGDataDofFuncArray(amg_data), HYPRE_MEMORY_HOST);
+        hypre_ParAMGDataDofFuncArray(amg_data) = NULL;
+    }
+
+    for (int i = 1; i < num_levels; i++)
+    {
+        hypre_ParVectorDestroy(hypre_ParAMGDataFArray(amg_data)[i]);
+        hypre_ParVectorDestroy(hypre_ParAMGDataUArray(amg_data)[i]);
+
+        if (hypre_ParAMGDataAArray(amg_data)[i])
+        {
+            hypre_ParCSRMatrixDestroy(hypre_ParAMGDataAArray(amg_data)[i]);
+        }
+
+        if (hypre_ParAMGDataPArray(amg_data)[i - 1])
+        {
+            hypre_ParCSRMatrixDestroy(hypre_ParAMGDataPArray(amg_data)[i - 1]);
+        }
+
+        if (hypre_ParAMGDataRestriction(amg_data))
+        {
+            if (hypre_ParAMGDataRArray(amg_data)[i - 1])
+            {
+                hypre_ParCSRMatrixDestroy(hypre_ParAMGDataRArray(amg_data)[i - 1]);
+            }
+        }
+
+        hypre_IntArrayDestroy(hypre_ParAMGDataCFMarkerArray(amg_data)[i - 1]);
+
+        /* get rid of any block structures */
+        if (hypre_ParAMGDataABlockArray(amg_data)[i])
+        {
+            hypre_ParCSRBlockMatrixDestroy(hypre_ParAMGDataABlockArray(amg_data)[i]);
+        }
+
+        if (hypre_ParAMGDataPBlockArray(amg_data)[i - 1])
+        {
+            hypre_ParCSRBlockMatrixDestroy(hypre_ParAMGDataPBlockArray(amg_data)[i - 1]);
+        }
+
+        /* RL */
+        if (hypre_ParAMGDataRestriction(amg_data))
+        {
+            if (hypre_ParAMGDataRBlockArray(amg_data)[i - 1])
+            {
+                hypre_ParCSRBlockMatrixDestroy(hypre_ParAMGDataRBlockArray(amg_data)[i - 1]);
+            }
+        }
+    }
+
+    hypre_ParAMGDataAArray(amg_data) = NULL;
+    hypre_ParAMGDataPArray(amg_data) = NULL;
+    hypre_ParAMGDataRArray(amg_data) = NULL;
+    hypre_ParAMGDataCFMarkerArray(amg_data) = NULL;
+    hypre_ParAMGDataFArray(amg_data) = NULL;
+    hypre_ParAMGDataUArray(amg_data) = NULL;
+    hypre_ParAMGDataDofFuncArray(amg_data) = NULL;
+
+    hypre_ParAMGDataABlockArray(amg_data) = NULL;
+    hypre_ParAMGDataPBlockArray(amg_data) = NULL;
+    hypre_ParAMGDataRBlockArray(amg_data) = NULL;
+
+}
+#endif
+
+}
diff --git a/CFD/IncomSolver/src/unapCalculator.cpp b/CFD/IncomSolver/src/unapCalculator.cpp
new file mode 100644
index 0000000..2afaea0
--- /dev/null
+++ b/CFD/IncomSolver/src/unapCalculator.cpp
@@ -0,0 +1,333 @@
+#include <iostream>
+#include <iomanip>
+#include "unapCalculator.h"
+#include "TK_Time.h"
+#include "TK_Exit.h"
+
+namespace PHSPACE
+{
+unapCalculator::unapCalculator() : LinearEquationSystemCalculator()
+{
+#ifndef USE_UnapLib
+    TK_Exit::ExceptionExit("unap lib is not opened in CMAKEFile!");
+#endif
+}
+
+unapCalculator::~unapCalculator()
+{
+    mathLibSolveFinalize();
+}
+
+void unapCalculator::mathLibSolveInit(Grid* gridIn)
+{
+#ifdef USE_UnapLib
+    UnstructGrid* grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+    int* leftCellOfFace = grid->GetLeftCellOfFace();
+    int* rightCellOfFace = grid->GetRightCellOfFace();
+    
+    int nInternalFaces = nTotalFace - nBoundFace;
+    
+#if defined(REORDER)
+#else
+    initUtility();
+#endif
+    
+	Communicator* comm = &COMM::getGlobalComm();
+    
+    using namespace UNAP;
+    
+    label nProcs = comm->getMySize();
+    label myId = comm->getMyId();
+    
+    lduA = new LduMatrix(comm);
+    upperAddr = new labelVector(nInternalFaces, comm);
+    lowerAddr = new labelVector(nInternalFaces, comm);
+    upper = new scalarVector(nInternalFaces, comm);
+    lower = new scalarVector(nInternalFaces, comm);
+    diag  = new scalarVector(nTotalCell, comm);
+    b = new scalarVector(nTotalCell, comm);
+    x = new scalarVector(nTotalCell, 1.0, comm);
+    
+    for (int iFace = nBoundFace; iFace < nTotalFace; iFace++)
+    {
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+        int jFace = iFace - nBoundFace;
+    
+        (*lowerAddr)[jFace] = le;
+        (*upperAddr)[jFace] = re;
+    }
+    
+    lduA->setMatrixTopology(nTotalCell, *upperAddr, *lowerAddr, false);
+
+    int* localCell2GlobalMap = grid->GetLocalCell2GlobalMap();
+    InterfaceInfo * interfaceInfo= grid->GetInterfaceInfo();
+    if (interfaceInfo != NULL) 
+    {
+        nNeiProcs = interfaceInfo->GetNumberOfNeighbor();
+        destRank = new int[nNeiProcs];
+        int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+        vector <InterfacePatch *> interfacePatch = interfaceInfo->GetInterfacePatch();
+        for (int iNeighbor = 0; iNeighbor < nNeiProcs; iNeighbor++)
+        {
+            label neighborID = interfacePatch[iNeighbor]->GetZoneIndexOfNeighbor();
+            destRank[iNeighbor] = neighborID;
+        }
+
+        int nIterFace = interfaceInfo->GetNIFace();
+        offDiagRows = new int[nIterFace];
+        offDiagCols = new int[nIterFace];
+        offDiagCoeffs = new double[nIterFace];
+        offDiagStarts = new int[nNeiProcs + 1];
+        offDiagStarts[0] = 0;
+        int InterFaceCount = 0;
+        for (int iNeighbor = 0; iNeighbor < nNeiProcs; iNeighbor++)
+        {
+            label nPatchFace = interfacePatch[iNeighbor]->GetNumberOfFace();
+
+            label neighborID = interfacePatch[iNeighbor]->GetZoneIndexOfNeighbor();
+
+            for (int iPatchFace = 0; iPatchFace < nPatchFace; iPatchFace++)
+            {
+                int* faceIndexForSend = interfacePatch[iNeighbor]->GetFaceIndexForSend();
+                int sendFaceIndex = faceIndexForSend[iPatchFace];
+                int faceIndex = interFace2BoundaryFace[sendFaceIndex];
+                int le = leftCellOfFace[faceIndex];
+                int re = rightCellOfFace[faceIndex];
+
+                offDiagRows[InterFaceCount] = le;
+                offDiagCols[InterFaceCount] = localCell2GlobalMap[re];
+
+                InterFaceCount += 1;
+            }
+            offDiagStarts[iNeighbor + 1] = InterFaceCount;
+        }
+        lduA->createInterfacesTopology(nNeiProcs, destRank, offDiagRows, offDiagCols, offDiagStarts);
+    }
+#endif
+}
+
+void unapCalculator::mathLibSolve(Grid* gridIn, int iEquation, RDouble * fi, RDouble * diagCoef, RDouble *binput, RDouble * upNeighCoef, RDouble * dnNeighCoef)
+{
+#ifdef USE_UnapLib
+    UnstructGrid * grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+    int* leftCellOfFace = grid->GetLeftCellOfFace();
+    int* rightCellOfFace = grid->GetRightCellOfFace();
+    int nInternalFaces = nTotalFace - nBoundFace;
+    RDouble *area = grid->GetFaceArea();
+    int* localCell2GlobalMap = grid->GetLocalCell2GlobalMap();
+
+    Communicator *comm = &COMM::getGlobalComm();
+    label nProcs = comm->getMySize();
+    label myId = comm->getMyId();
+    RDouble tol = 0.0;
+    int minIter = 1;
+    int *linearSolverID = reinterpret_cast <int *>(GlobalDataBase::GetDataPtr("solMethodOfLinEqSystem"));
+    int *precondID = reinterpret_cast <int *>(GlobalDataBase::GetDataPtr("precondMethodOfLinEqSystem"));
+    int* maxIterOfEachEq = reinterpret_cast<int*> (GlobalDataBase::GetDataPtr("maxIterOfEachEq"));
+    RDouble* iterTolOfEachEq = reinterpret_cast<RDouble*> (GlobalDataBase::GetDataPtr("iterTolOfEachEq"));
+
+    int maxIterStep = maxIterOfEachEq[iEquation];
+    RDouble iterTol = iterTolOfEachEq[iEquation];
+    bool isPrintLinearSolver = false;
+    //int *ActualIterStepNum = reinterpret_cast <int * > (GlobalDataBase::GetDataPtr("ActualIterStepNum"));
+    //RDouble *ActualIterTol = reinterpret_cast <RDouble * > (GlobalDataBase::GetDataPtr("ActualIterTol"));
+    //RDouble *ActualSolveTime = reinterpret_cast <RDouble * > (GlobalDataBase::GetDataPtr("ActualSolveTime"));
+    RDouble timeStartSolve = PHSPACE::TIME_SPACE::GetWallTime();
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; iFace++)
+    {
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+        int jFace = iFace - nBoundFace;
+        (*lower)[jFace] = dnNeighCoef[iFace]; 
+        (*upper)[jFace] = upNeighCoef[iFace];
+    }
+    
+    for (int iCell = 0; iCell < nTotalCell; iCell++)
+    {
+        (*diag)[iCell] = diagCoef[iCell];
+        (*b)[iCell] = binput[iCell];
+        (*x)[iCell] = 1.0;
+    }
+    
+    lduA->setMatrixCoeffients(*diag, *upper, *lower, false);
+    
+    InterfaceInfo * interfaceInfo= grid->GetInterfaceInfo();
+    if (interfaceInfo != NULL) 
+    {
+        nNeiProcs = interfaceInfo->GetNumberOfNeighbor();
+        int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+        vector <InterfacePatch *> interfacePatch = interfaceInfo->GetInterfacePatch();
+        int InterFaceCount = 0;
+        for (int iNeighbor = 0; iNeighbor < nNeiProcs; iNeighbor++)
+        {
+            label nPatchFace = interfacePatch[iNeighbor]->GetNumberOfFace();
+            for (int iPatchFace = 0; iPatchFace < nPatchFace; iPatchFace++)
+            {
+                int* faceIndexForSend = interfacePatch[iNeighbor]->GetFaceIndexForSend();
+                int sendFaceIndex = faceIndexForSend[iPatchFace];
+                int faceIndex = interFace2BoundaryFace[sendFaceIndex];
+
+                offDiagCoeffs[InterFaceCount] = upNeighCoef[faceIndex];
+                InterFaceCount += 1;
+            }
+        }
+        lduA->fillInterfacesCofficients(offDiagStarts, offDiagCoeffs);
+    }
+
+    if (precondID[iEquation] == iAMG) 
+    {
+        unapPrecond = new LduMGPrecond(*lduA);
+    }
+    else if (precondID[iEquation] == LduDiag) 
+    {
+        unapPrecond = new LduDiagPrecond(*lduA);
+    }
+    else if (precondID[iEquation] == LduDIC)
+    {
+        unapPrecond = new LduDICPrecond(*lduA);
+    }
+    else if (precondID[iEquation] == LduDILU)
+    {
+        unapPrecond = new LduDILUPrecond(*lduA);
+    }
+    else if (precondID[iEquation] == LduBJacobi)
+    {
+        //precond = new LduBJacobiPrecond(*lduA);
+    }
+    
+    #if defined(DSWACC)
+    lduA->constructRSSIterator();
+    #endif
+
+    if (linearSolverID[iEquation] == GaussSeidelMethod) 
+    {
+        explicitSolve(gridIn, fi, diagCoef, binput, upNeighCoef, dnNeighCoef);
+    }
+    else if (linearSolverID[iEquation] == GMRESMethod) 
+    {
+        unapSolver = new GMRES(*unapPrecond, 10);
+        unapSolver->SET_minIter(minIter);
+        unapSolver->SET_maxIter(maxIterStep);
+        unapSolver->SET_ifPrint(isPrintLinearSolver);
+        unapSolver->SET_relTol(iterTol);
+        unapSolver->SET_tolerance(tol);
+    
+        solverPerf = static_cast<GMRES *>(unapSolver)->solve(*x, *lduA, *b);
+        static_cast<GMRES*>(unapSolver)->~GMRES();
+    }
+    else if (linearSolverID[iEquation] == BicgstabMethod)
+    {
+        unapSolver = new PBiCGStab(*unapPrecond);
+        unapSolver->SET_minIter(minIter);
+        unapSolver->SET_maxIter(maxIterStep);
+        unapSolver->SET_ifPrint(isPrintLinearSolver);
+        unapSolver->SET_relTol(iterTol);
+        unapSolver->SET_tolerance(tol);
+    
+        solverPerf = unapSolver->solve(*x, *lduA, *b);
+        static_cast<PBiCGStab*>(unapSolver)->~PBiCGStab();
+    }
+    else if (linearSolverID[iEquation] == AMGMethod) 
+    {
+        DirectionalAgglomeration aggl(*lduA);
+        aggl.SET_maxLevels(50);
+        aggl.SET_rowSizeInCoarsestLevel(200);
+        aggl.agglomerate();
+        
+        //unapSolver = new MGSolver(*lduA, aggl);
+
+        unapSolver->SET_tolerance(tol);
+        unapSolver->SET_relTol(iterTol);
+        static_cast<MGSolver*>(unapSolver)->SET_nPreSweeps(2);
+        unapSolver->SET_minIter(minIter);
+        unapSolver->SET_maxIter(maxIterStep);
+        unapSolver->SET_ifPrint(isPrintLinearSolver);
+        //static_cast<MGSolver*>(unapSolver)->SET_smootherType("Jacobi");
+        static_cast<MGSolver*>(unapSolver)->initSmoothers();
+        static_cast<MGSolver*>(unapSolver)->setUp();
+        solverPerf = static_cast<MGSolver*>(unapSolver)->solve(*x, *lduA, *b);
+        
+        static_cast<MGSolver*>(unapSolver)->~MGSolver();
+    }
+    else if (linearSolverID[iEquation] == PCGMethod) 
+    {
+        unapSolver = new PCG(*unapPrecond);
+        unapSolver->SET_minIter(minIter);
+        unapSolver->SET_maxIter(maxIterStep);
+        unapSolver->SET_ifPrint(isPrintLinearSolver);
+        unapSolver->SET_tolerance(tol);
+        unapSolver->SET_relTol(iterTol);
+        
+        solverPerf = static_cast<PCG *>(unapSolver)->solve(*x, *lduA, *b);
+        static_cast<PCG*>(unapSolver)->~PCG();
+    }
+    
+
+    RDouble timeEndSolve = PHSPACE::TIME_SPACE::GetWallTime();
+    //ActualIterStepNum[constVarNumToSolveVarNum[iEquation]] = solverPerf.nIterations();
+    //ActualIterTol[constVarNumToSolveVarNum[iEquation]] = solverPerf.finalResidual();
+    //ActualSolveTime[constVarNumToSolveVarNum[iEquation]] = timeEndSolve - timeStartSolve;
+
+    if (precondID[iEquation] == iAMG) 
+    {
+        static_cast<LduMGPrecond*>(unapPrecond)->~LduMGPrecond();
+    }
+    else if (precondID[iEquation] == LduDiag) 
+    {
+        static_cast<LduDiagPrecond*>(unapPrecond)->~LduDiagPrecond();
+    }
+    else if (precondID[iEquation] == LduDIC)
+    {
+        static_cast<LduDICPrecond*>(unapPrecond)->~LduDICPrecond();
+    }
+    else if (precondID[iEquation] == LduDILU)
+    {
+        static_cast<LduDILUPrecond*>(unapPrecond)->~LduDILUPrecond();
+    }
+    else if (precondID[iEquation] == LduBJacobi)
+    {
+        //static_cast<LduBJacobiPrecond*>(precond)->~LduBJacobiPrecond();
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; iCell++)
+    {
+        fi[iCell] = (*x)[iCell];
+    }
+#endif
+}
+
+void unapCalculator::mathLibSolveFinalize()
+{
+#ifdef USE_UnapLib
+
+    DELETE_POINTERS(upperAddr);
+    DELETE_POINTERS(lowerAddr);
+    DELETE_POINTERS(upper);
+    DELETE_POINTERS(lower);
+    DELETE_POINTERS(diag);
+    DELETE_POINTERS(b);
+    DELETE_POINTERS(x);
+
+    DELETE_POINTERS(destRank);
+    DELETE_POINTERS(offDiagRows);
+    DELETE_POINTERS(offDiagCols);
+    DELETE_POINTERS(offDiagStarts);
+    DELETE_POINTERS(offDiagCoeffs);
+
+    lduA->~LduMatrix();
+
+    delete unapSolver ;
+    delete unapPrecond;
+
+#endif
+}
+
+}
diff --git a/CFD/IncomSolver/src/yhamgCalculator.cpp b/CFD/IncomSolver/src/yhamgCalculator.cpp
new file mode 100644
index 0000000..dcc889f
--- /dev/null
+++ b/CFD/IncomSolver/src/yhamgCalculator.cpp
@@ -0,0 +1,497 @@
+#include <iostream>
+#include <iomanip>
+#include "yhamgCalculator.h"
+#include "TK_Time.h"
+#include "TK_Exit.h"
+
+namespace PHSPACE
+{
+    yhamgCalculator::yhamgCalculator() : LinearEquationSystemCalculator()
+    {
+#ifndef USE_YhamgLib
+        TK_Exit::ExceptionExit("yhamg lib is not opened in CMAKEFile!");
+#endif
+    }
+
+    yhamgCalculator::~yhamgCalculator()
+    {
+        mathLibSolveFinalize();
+    }
+
+    void yhamgCalculator::mathLibSolveInit(Grid* gridIn)
+    {
+#ifdef USE_YhamgLib
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        int nTotalCell = grid->GetNTotalCell();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotalFace = grid->GetNTotalFace();
+        int* leftCellOfFace = grid->GetLeftCellOfFace();
+        int* rightCellOfFace = grid->GetRightCellOfFace();
+        int zoneID = grid->GetZoneID();
+        int* localCell2LocalMap = grid->GetLocalCell2LocalMap();
+        int* globalCellNoOfGlobalZones = reinterpret_cast<int*> (GlobalDataBase::GetDataPtr("globalCellNoOfGlobalZones"));
+        int *precondID = reinterpret_cast <int *>(GlobalDataBase::GetDataPtr("precondMethodOfLinEqSystem"));
+
+        int linearSolverSize = 50;
+        A = new ParCSRMatrix;
+        PrecondList = new ParOperator* [linearSolverSize];
+        for (int iSolver = 0 ; iSolver < linearSolverSize; iSolver++)
+        {
+            int precondType = precondID[iSolver];
+            ParOperator* precond = PrecondList[iSolver];
+            if (precondType == iNone)
+            {
+                precond = nullptr;
+            }
+            else if (precondType == iILU)
+            {
+                precond = new ParCSRPrecondILU0();
+            }
+            else if (precondType == iAMG)
+            {
+                precond = new ParCSRPrecondAMG();
+                int    max_levels = 20;
+                int    coarse_size = 8;
+                RDouble strength_threshold = 0.25;
+                int    aggressive_levels = 1;
+                int    coarsen_type = 0; // 0: HMIS, 1: PMIS
+                int    interp_type = 0;  // 0: Long-Range Interpolation, 1: Smoothed Aggregation
+                int    interp_min_elements = 4;
+                int    interp_max_elements = 6;
+                RDouble truncation_factor = 0.1;
+                RDouble sparsification_threshold = 0.01;
+                int    cycle_type = 0; // 0: V-Cycle, 1: W-Cycle, 2: F-Cycle
+                int    pre_sweeps = 2;
+                int    post_sweeps = 2;
+                int    coarse_sweeps = 2;
+                int    smooth_type = 1; // 0: Jacobi, 1: SOR, 2: ILU, 3: Chebyshev
+
+                RDouble jacobi_factor = 0.75;
+
+                int    sor_type = 2; // 0: Forward, 1: Backword, 2: Symmetric
+                RDouble sor_factor = 1.0;
+
+                int    ilu_maxfil = 0;
+                RDouble ilu_droptol = 0.01;
+
+                int    chebyshev_order = 4;
+                RDouble chebyshev_eigen_ratio = 0.3;
+                bool   print_stats = 0;
+                ((ParCSRPrecondAMG*)precond)->MaxLevels = max_levels;
+                ((ParCSRPrecondAMG*)precond)->CoarseSize = coarse_size;
+                ((ParCSRPrecondAMG*)precond)->StrengthThreshold = strength_threshold;
+                ((ParCSRPrecondAMG*)precond)->AggressiveLevels = aggressive_levels;
+                ((ParCSRPrecondAMG*)precond)->CoarsenType = coarsen_type;
+                ((ParCSRPrecondAMG*)precond)->InterpType = interp_type;
+                ((ParCSRPrecondAMG*)precond)->InterpMinElements = interp_min_elements;
+                ((ParCSRPrecondAMG*)precond)->InterpMaxElements = interp_max_elements;
+                ((ParCSRPrecondAMG*)precond)->TruncationFactor = truncation_factor;
+                ((ParCSRPrecondAMG*)precond)->SparsificationThreshold = sparsification_threshold;
+                ((ParCSRPrecondAMG*)precond)->CycleType = cycle_type;
+                ((ParCSRPrecondAMG*)precond)->PreSweeps = pre_sweeps;
+                ((ParCSRPrecondAMG*)precond)->PostSweeps = post_sweeps;
+                ((ParCSRPrecondAMG*)precond)->CoarseSweeps = coarse_sweeps;
+                ((ParCSRPrecondAMG*)precond)->SmoothType = smooth_type;
+                ((ParCSRPrecondAMG*)precond)->JacobiFactor = jacobi_factor;
+                ((ParCSRPrecondAMG*)precond)->SORType = sor_type;
+                ((ParCSRPrecondAMG*)precond)->SORFactor = sor_factor;
+                ((ParCSRPrecondAMG*)precond)->ILUMaxFillins = ilu_maxfil;
+                ((ParCSRPrecondAMG*)precond)->ILUDropTolerance = ilu_droptol;
+                ((ParCSRPrecondAMG*)precond)->ChebyshevEigenRatio = chebyshev_eigen_ratio;
+                ((ParCSRPrecondAMG*)precond)->PrintStats = print_stats;
+
+
+            }
+            else if (precondType == iBJILU)
+            {
+                precond = new ParCSRPrecondBJILU();
+            }
+            else if (precondType == iBJSOR)
+            {
+                precond = new ParCSRPrecondBJSOR();
+            }
+            else if (precondType == iJacobi)
+            {
+                precond = new ParCSRPrecondJacobi();
+            }
+            else if (precondType == iSOR)
+            {
+                precond = new ParCSRPrecondSOR();
+            }
+            PrecondList[iSolver] = precond;
+        }
+
+        int * local_rowptr = new int[nTotalCell + 1];
+
+        ColVectors = new vector<int>[nTotalCell];
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            ColVectors[iCell].push_back(iCell);
+        }
+
+        for (int iFace = 0; iFace < nTotalFace; iFace++)
+        {
+            int le = leftCellOfFace[iFace];
+            int re = rightCellOfFace[iFace];
+            if (re < nTotalCell)
+            {
+                ColVectors[le].push_back(re);
+                ColVectors[re].push_back(le);
+            }
+        }
+
+        int nonZeroNum = 0;
+        local_rowptr[0] = nonZeroNum;
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            nonZeroNum += ColVectors[iCell].size();
+            local_rowptr[iCell + 1] = nonZeroNum;
+        }
+
+        int * local_colind = new int[nonZeroNum];
+        int count = 0;
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            for (int jCell = 0; jCell < ColVectors[iCell].size(); jCell++)
+            {
+                local_colind[count] = ColVectors[iCell][jCell];
+                count += 1;
+            }
+        }
+
+        RDouble* local_values = new RDouble[nonZeroNum];
+
+        b = new ParVector(MPI_COMM_WORLD);
+        b->Resize(nTotalCell);
+
+        x = new ParVector(MPI_COMM_WORLD);
+        x->Resize(nTotalCell);
+
+        ParCSRMatrix* CSRMatrixA = reinterpret_cast <ParCSRMatrix*>(A);
+        CSRMatrixA->Free();
+        CSRMatrixA->comm = MPI_COMM_WORLD;
+        CSRMatrixA->local.size[0] = nTotalCell;
+        CSRMatrixA->local.size[1] = nTotalCell;
+        CSRMatrixA->local.rowptr = local_rowptr;
+        CSRMatrixA->local.colind = local_colind;
+        CSRMatrixA->local.values = local_values;
+
+        int nnb = 0;
+        int* nbrank;
+        int* recvptr;
+
+        InterfaceInfo * interfaceInfo= grid->GetInterfaceInfo();
+        if (interfaceInfo != NULL) 
+        {
+            int numberOfNeighbor = interfaceInfo->GetNumberOfNeighbor();
+            nnb = numberOfNeighbor;
+        }
+
+        nbrank = new int[nnb];
+        if (interfaceInfo != NULL) 
+        {
+            int numberOfNeighbor = interfaceInfo->GetNumberOfNeighbor();
+            vector <InterfacePatch *> interfacePatch = interfaceInfo->GetInterfacePatch();
+            for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; iNeighbor++)
+            {
+                int neighborID = interfacePatch[iNeighbor]->GetZoneIndexOfNeighbor();
+                nbrank[iNeighbor] = neighborID;
+            }
+        }
+
+        recvptr = new int[nnb + 1];
+        int faceCount = 0;
+        recvptr[0] = faceCount;
+        if (interfaceInfo != NULL) 
+        {
+            int numberOfNeighbor = interfaceInfo->GetNumberOfNeighbor();
+            vector <InterfacePatch *> interfacePatch = interfaceInfo->GetInterfacePatch();
+            for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; iNeighbor++)
+            {
+                int nPatchFace = interfacePatch[iNeighbor]->GetNumberOfFace();
+                faceCount += nPatchFace;
+                recvptr[iNeighbor + 1] = faceCount;
+            }
+        }
+
+        int * exter_colind = new int[faceCount];
+        exter_colind2Face = new int[faceCount];
+        RDouble* exter_values = new RDouble[faceCount];
+        int * recvind = new int[faceCount];
+        vector<int>* exterMatrixInfo = new vector<int>[nTotalCell];
+        vector<int>* exterMatrixInfo2Face = new vector<int>[nTotalCell];
+
+        faceCount = 0;
+        if (interfaceInfo != NULL) 
+        {
+            int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+            int numberOfNeighbor = interfaceInfo->GetNumberOfNeighbor();
+            vector <InterfacePatch *> interfacePatch = interfaceInfo->GetInterfacePatch();
+            for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; iNeighbor++)
+            {
+                int nPatchFace = interfacePatch[iNeighbor]->GetNumberOfFace();
+                int neighborID = interfacePatch[iNeighbor]->GetZoneIndexOfNeighbor();
+
+                for (int iPatchFace = 0; iPatchFace < nPatchFace; iPatchFace++)
+                {
+                    int* faceIndexForSend = interfacePatch[iNeighbor]->GetFaceIndexForSend();
+                    int sendFaceIndex = faceIndexForSend[iPatchFace];
+                    int faceIndex = interFace2BoundaryFace[sendFaceIndex];
+                    int le = leftCellOfFace[faceIndex];
+                    int re = rightCellOfFace[faceIndex];
+                    recvind[faceCount] = localCell2LocalMap[re];
+                    if (localCell2LocalMap[re] > -1) 
+                    {
+                        exterMatrixInfo[le].push_back(faceCount);
+                        exterMatrixInfo2Face[le].push_back(faceIndex);
+                    }
+                    faceCount += 1;
+                }
+            }
+        }
+
+        int* exter_rowptr = new int[nTotalCell + 1];
+        exter_rowptr[0] = 0;
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            exter_rowptr[iCell + 1] = exter_rowptr[iCell] + exterMatrixInfo[iCell].size();
+        }
+
+        int cellCount = 0;
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            for (int jCell = exter_rowptr[iCell]; jCell < exter_rowptr[iCell + 1]; jCell++)
+            {
+                exter_colind[cellCount] = exterMatrixInfo[iCell][jCell - exter_rowptr[iCell]];
+                exter_colind2Face[cellCount] = exterMatrixInfo2Face[iCell][jCell - exter_rowptr[iCell]];
+                cellCount += 1;
+            }
+        }
+
+        delete[] exterMatrixInfo;
+        delete[] exterMatrixInfo2Face;
+
+        CSRMatrixA->exter.size[0] = nTotalCell;
+        CSRMatrixA->exter.size[1] = recvptr[nnb];
+        CSRMatrixA->exter.rowptr = exter_rowptr;
+        CSRMatrixA->exter.colind = exter_colind;
+        CSRMatrixA->exter.values = exter_values;
+        CSRMatrixA->nnb = nnb;
+        CSRMatrixA->nbrank = nbrank;
+        CSRMatrixA->recvptr = recvptr;
+        CSRMatrixA->recvind = recvind;
+#endif
+    }
+
+
+    void yhamgCalculator::mathLibSolve(Grid* gridIn, int iEquation, RDouble * fi, RDouble * diagCoef, RDouble *bold, RDouble * upNeighCoef, RDouble * dnNeighCoef)
+    {
+#ifdef USE_YhamgLib
+        UnstructGrid* grid = UnstructGridCast(gridIn);
+        int nTotalCell = grid->GetNTotalCell();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotalFace = grid->GetNTotalFace();
+        int* leftCellOfFace = grid->GetLeftCellOfFace();
+        int* rightCellOfFace = grid->GetRightCellOfFace();
+
+        int* localCell2GlobalMap = grid->GetLocalCell2GlobalMap();
+        RDouble GlobalTotalCells = GlobalDataBase::GetDoubleParaFromDB("GlobalTotalCells");
+        int *linearSolverID = reinterpret_cast <int *>(GlobalDataBase::GetDataPtr("solMethodOfLinEqSystem"));
+        int *precondID = reinterpret_cast <int *>(GlobalDataBase::GetDataPtr("precondMethodOfLinEqSystem"));
+        int* maxIterOfEachEq = reinterpret_cast<int*> (GlobalDataBase::GetDataPtr("maxIterOfEachEq"));
+        RDouble* iterTolOfEachEq = reinterpret_cast<RDouble*> (GlobalDataBase::GetDataPtr("iterTolOfEachEq"));
+
+        int maxIterStep = maxIterOfEachEq[iEquation];
+        RDouble iterTol = iterTolOfEachEq[iEquation];
+        int *ActualIterStepNum = reinterpret_cast <int * > (GlobalDataBase::GetDataPtr("ActualIterStepNum"));
+        RDouble *ActualIterTol = reinterpret_cast <RDouble * > (GlobalDataBase::GetDataPtr("ActualIterTol"));
+        RDouble *ActualSolveTime = reinterpret_cast <RDouble * > (GlobalDataBase::GetDataPtr("ActualSolveTime"));
+        int linearSolver = linearSolverID[iEquation];
+        RDouble timeStartSolve = PHSPACE::TIME_SPACE::GetWallTime();
+
+        int    gmres_restart = 10;
+        bool   print_stats = 0;
+        int iter;
+        RDouble relres;
+        RDouble setup_time;
+        RDouble solve_time;
+        ParCSRMatrix* CSRMatrixA = reinterpret_cast <ParCSRMatrix*>(A);
+        UnstructBCSet **bcr = grid->GetBCRecord();
+        vector<RDouble>* ValuesVector = new vector<RDouble>[nTotalCell];
+        RDouble* local_values = CSRMatrixA->local.values;
+
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            ValuesVector[iCell].push_back(diagCoef[iCell]);
+        }
+        for (int iFace = 0; iFace < nTotalFace; iFace++)
+        {
+            int le = leftCellOfFace[iFace];
+            int re = rightCellOfFace[iFace];
+            if (re < nTotalCell)
+            {
+                ValuesVector[le].push_back(upNeighCoef[iFace]);
+                ValuesVector[re].push_back(dnNeighCoef[iFace]);
+            }
+        }
+
+        int cellCount = 0;
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            for (int jCell = 0; jCell < ColVectors[iCell].size(); jCell++)
+            {
+                local_values[cellCount] = ValuesVector[iCell][jCell];
+                cellCount += 1;
+            }
+        }
+
+        cellCount = 0;
+        int* exter_rowptr = CSRMatrixA->exter.rowptr;
+        RDouble* exter_values = CSRMatrixA->exter.values;
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            for (int jCell = exter_rowptr[iCell]; jCell < exter_rowptr[iCell + 1]; jCell++)
+            {
+                int faceIndex = exter_colind2Face[cellCount];
+                exter_values[cellCount] = upNeighCoef[faceIndex];
+                cellCount += 1;
+            }
+        }
+
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            (*x)[iCell] =  fi[iCell];
+            (*b)[iCell] =  bold[iCell] + SMALL;
+        }
+
+        reinterpret_cast <ParCSRMatrix*>(A)->SetupHalo();
+
+        ParOperator* precond = PrecondList[iEquation];
+        int precondType = precondID[iEquation];
+
+        if (linearSolver == GaussSeidelMethod) 
+        {
+            explicitSolve(gridIn, fi, diagCoef, bold, upNeighCoef, dnNeighCoef);
+        }
+        else if (linearSolver == GMRESMethod) 
+        {
+            if (precondType != 0)
+            {
+                ((ParCSRPrecond*)precond)->Setup(*(ParCSRMatrix*)A);
+                ParSolverGMRES(gmres_restart, maxIterStep, iterTol, print_stats)(*A, *precond, *b, *x, iter, relres);
+            }
+            else if (precondType == 0)
+            {
+                ParSolverGMRES(gmres_restart, maxIterStep, iterTol, print_stats)(*A, *b, *x, iter, relres);
+            }
+        }
+        else if (linearSolver == BicgstabMethod)
+        {
+            if (precondType != 0)
+            {
+                ((ParCSRPrecond*)precond)->Setup(*(ParCSRMatrix*)A);
+                ParSolverBCGS(maxIterStep, iterTol, print_stats)(*A, *precond, *b, *x, iter, relres);
+            }
+            else
+            {
+                ParSolverBCGS(maxIterStep, iterTol, print_stats)(*A, *b, *x, iter, relres);
+            }
+        }
+        else if (linearSolver == PCGMethod)
+        {
+            if (precondType != 0)
+            {
+                ((ParCSRPrecond*)precond)->Setup(*(ParCSRMatrix*)A);
+                ParSolverCG(maxIterStep, iterTol, print_stats)(*A, *precond, *b, *x, iter, relres);
+            }
+            else
+            {
+                ParSolverCG(maxIterStep, iterTol, print_stats)(*A, *b, *x, iter, relres);
+            }
+        }
+        else if (linearSolver == PipeBicgstabMethod)
+        {
+            if (precondType != 0)
+            {
+                ((ParCSRPrecond*)precond)->Setup(*(ParCSRMatrix*)A);
+                ParSolverPipeBCGS(maxIterStep, iterTol, print_stats)(*A, *precond, *b, *x, iter, relres);
+            }
+            else
+            {
+                ParSolverPipeBCGS(maxIterStep, iterTol, print_stats)(*A, *b, *x, iter, relres);
+            }
+        }
+        else if (linearSolver == PipeCGMethod)
+        {
+            if (precondType != 0)
+            {
+                ((ParCSRPrecond*)precond)->Setup(*(ParCSRMatrix*)A);
+                ParSolverPipeCG(maxIterStep, iterTol, print_stats)(*A, *precond, *b, *x, iter, relres);
+            }
+            else
+            {
+                ParSolverPipeCG(maxIterStep, iterTol, print_stats)(*A, *b, *x, iter, relres);
+            }
+        }
+        else if (linearSolver == PipeGMRESMethod) 
+        {
+            if (precondType != 0)
+            {
+                ((ParCSRPrecond*)precond)->Setup(*(ParCSRMatrix*)A);
+                ParSolverPipeGMRES(gmres_restart, maxIterStep, iterTol, print_stats)(*A, *precond, *b, *x, iter, relres);
+            }
+            else
+            {
+                ParSolverPipeGMRES(gmres_restart, maxIterStep, iterTol, print_stats)(*A, *b, *x, iter, relres);
+            }
+        }
+
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            fi[iCell] = (*x)[iCell];
+        }
+
+        //RDouble timeEndSolve = PHSPACE::TIME_SPACE::GetWallTime();
+        //ActualIterStepNum[iEquation]] = iter;
+        //ActualIterTol[constVarNumToSolveVarNum[iEquation]] = relres;
+        //ActualSolveTime[constVarNumToSolveVarNum[iEquation]] = timeEndSolve - timeStartSolve;
+
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            ValuesVector[iCell].clear();
+        }
+        delete [] ValuesVector; 
+#endif
+    }
+
+    void yhamgCalculator::mathLibSolveFinalize()
+    {
+#ifdef USE_YhamgLib
+        ParCSRMatrix* CSRMatrixA = reinterpret_cast <ParCSRMatrix*>(A);
+        if (A)
+        {
+            CSRMatrixA->Free();
+            delete[] CSRMatrixA->local.rowptr;
+            delete[] CSRMatrixA->local.colind;
+            delete[] CSRMatrixA->local.values;
+            delete[] CSRMatrixA->exter.rowptr;
+            delete[] CSRMatrixA->exter.colind;
+            delete[] CSRMatrixA->exter.values;
+            delete A;
+        }
+        int linearSolverSize = GlobalDataBase::GetIntParaFromDB("linearSolverSize");
+        int *precondID = reinterpret_cast <int *>(GlobalDataBase::GetDataPtr("precondID"));
+        for (int iSolver = 0 ; iSolver < linearSolverSize; iSolver++)
+        {
+            int precondType = precondID[iSolver];
+            if (precondType > 0)
+            {
+                delete PrecondList[iSolver];
+            }
+        }
+
+        delete[] PrecondList;
+#endif
+    }
+
+}
diff --git a/CFD/LBMSolverMPI/include/LBMSolverMPI.hpp b/CFD/LBMSolverMPI/include/LBMSolverMPI.hpp
new file mode 100644
index 0000000..4b840a7
--- /dev/null
+++ b/CFD/LBMSolverMPI/include/LBMSolverMPI.hpp
@@ -0,0 +1,170 @@
+#pragma once
+#include <stdio.h>
+#include <iostream>
+#include <string>
+#include <fstream>
+#include <mpi.h>
+#include <math.h>
+#include "vector3.hpp"
+
+void RunLBMSolverMPI();
+//����:  �ƺ������ż�幣��й���ѧ������ѧ
+
+//#define PARALLEL  1   //�����Ƿ��б���Ŀ���
+
+using namespace std;
+
+struct Boundary_Condition
+{ //types :�ٶȱ߽�����velocity;   ѹ���߽�����pressure�� ���ڱ߽�periodic
+	char xminFace[20];
+	char xmaxFace[20];
+	char yminFace[20];
+	char ymaxFace[20];
+	char zminFace[20];
+	char zmaxFace[20];
+	vector3<double>  vel_specified[6];  //�����ٶȱ߽磺6���棨�߽磩�ϵ��ٶ�ʸ��
+	double rho_specified[6];   //����ѹ���߽�:  6���߽��ϵ��ܶȣ�ѹ����
+};
+
+struct Params_Pakage {
+	char in[50];
+	char out[50];
+	char velocity_set[20];
+	char bc[20];
+};
+
+class LBM
+{
+
+private:
+	int FINE, iMRT, iLES, iContinue, iGEO, CONV;		//���򿪹�
+	double conv_v;
+	string conti_file, geo_file;
+	int time = 0;
+	int total_NX, total_NY, total_NZ;
+	int NX, NY, NZ, x_np, y_np, z_np, x_id, y_id, z_id;
+	//MRT
+	double** M_MRT, ** M_MRTI, ** MSM;
+	//fine
+	int fine_NX, fine_NY, fine_NZ;
+	int LefLowx, LefLowy, LefLowz;
+	int Fdimx, Fdimy, Fdimz;
+	int MeshType;
+	int Xori, Yori, Zori;
+	int finelocal[6];
+	int border_node_num;
+	//
+	int FrameRate, ttstep;
+	double density0;
+	double tau;
+	double gx, gy, gz;
+	const double c_s = 1.0 / sqrt(3);
+
+	string boundary_condition;
+	string velocity_set;
+	Boundary_Condition BC;
+	MPI_Comm* comm0;
+	MPI_Comm* comm1;
+	//
+	double* rho;
+	vector3<double> vel0; // ini_vel
+	vector3<double>* vel; //, bc_specified_vel;
+	double* pdf2;
+	double* pdf;
+	int* obst;
+	double* rhoTotal{};
+	vector3<double>* velTotal{};
+	vector3<double>* velTotalConv{};
+	int* obstTotal{};
+	int* n_myid;
+	int direction_size;
+	int send_direction_size;
+	vector3<int>* ei;
+	double* weights;
+	int* reverse_indexes;
+	//
+	vector3<double> *force;
+	int* node2;
+	double* delta;
+	int num_node2;
+
+	//
+	inline int index(int x, int y, int z) const {
+		return ((z + 2) * (NX + 4) * (NY + 4) + (y + 2) * (NX + 4) + (x + 2));
+	}
+	inline int index(int x, int y, int z, int w) const {
+		return ((x + 2) + (y + 2) * (NX + 4) + (z + 2) * (NX + 4) * (NY + 4) + w * (NX + 4) * (NY + 4) * (NZ + 4));
+	}
+	inline int index(int x, int y, int z, int NX, int NY) {
+		return (z + 2) * (NX + 4) * (NY + 4) + (y + 2) * (NX + 4) + (x + 2);
+	}
+	inline int total_index(int x, int y, int z) const {
+		return (z * total_NX * total_NY) + (y * total_NX) + x;
+	}
+
+public:
+	LBM();
+	~LBM();
+	int  initialise(Params_Pakage* p, int mpi_rank);//�ܳ�ʼ�����������
+	void perform_timestep();				//�ܼ��㲽
+	void output(int t, int mpi_rank);		//�������
+
+	int  get_time();
+	int  get_NX();
+	int  get_NY();
+	int  get_NZ();
+	int  get_MeshType();
+	int  get_border_node_num();
+	int  get_total_steps();
+	int  get_FrameRate();
+	int  getdirs();
+	int  getalldirs();
+	vector3<int>* get_ei();
+
+private:
+		//MPI
+	void mpi_ini(int mpi_rank); //���м����ʼ��
+	void mpi_send();			//���ݱ߽�pdf2
+	void mpi_total(int mpi_rank);//���ܸ�CPU����
+		//��ʼ����
+	void ReadParameter(Params_Pakage* p, int mpi_rank);//�������
+	void iniFlow();			//���������ʼ��
+	void iniobst();			//���������ʼ��
+		//output	
+	void write_binary(string filename);
+	void read_all(std::string filename);  //�����������ݣ��ļ�Ӧ�������ƥ��
+	void output_all(std::string filename);//�����������
+	void output_all(std::string filename, int xmin, int xmax, int ymin, int ymax, int zmin, int zmax);
+		//LBM iteration
+	void compute_density_momentum(int xmin, int xmax, int ymin, int ymax, int zmin, int zmax); //��������
+	void stream(int xmin, int xmax, int ymin, int ymax, int zmin, int zmax);//Stream the current equilibrium distribution to the next distribution.
+	void collision(int xmin, int xmax, int ymin, int ymax, int zmin, int zmax);//Perform the collision step. Assumes delta t / tau = 1.
+		//BC
+	void bouzidi();
+	void wall_bounce_back(); //����ƽֱ�����޻��ƣ�simple bounce-back��
+	void velocity_boundary_condition();  //�����ٶȱ߽�����
+	void pressure_boundary_condition();  //����ѹ���߽�����
+	void set_velocity_set();//Used to internally generate velocity_set.
+		//
+	void set_velocity(int x_field, int y_field, int z_field, double u_x, double u_y, double u_z);//Set velocity at position in velocity field.
+	void set_density(int x_field, int y_field, int z_field, double density);//Set density at position in density field.
+	double calculate_feq(int i, int j, int k, int w);
+	double calculate_feq(int i, int j, int k, int w, double u_le_x);
+	//���غ������ú�����Ϊ�ƶ��߽����f_i= f_i^eq��rho, (u+u_le_x), v, w���� ����u_le_xΪ�廬���ٶ�
+	double calculate_fg(int i, int j, int k, int w, double feq);//���������
+	double calculate_fneq(int i, int j, int k, int w, double feq);//�����ƽ��ֲ�����
+	double calculate_pij(double* fneq);	//���㶯��...	
+	void lookup_reverse();     //�� i ����ķ�����
+		//MRT
+	void iniMRT();			//MRT�����ʼ��
+	void calculate_MSM(double tau);		//MRT�������
+	void read_Geo(std::string filename, int mpi_rank);	//���븴������
+	void getNumberFromString(string s, int* a, int n);
+	bool IntersectTriangle(vector3<double>& orig, vector3<double>& dir,	//�жϹ����
+		vector3<double>& v0, vector3<double>& v1, vector3<double>& v2,
+		double* t, double* u, double* v);
+	void check_converge();		//��֤�Ƿ�����
+};
+
+void RUNPHLBM(int mpi_rank);
+void dumpstring(char* str, FILE* file);
\ No newline at end of file
diff --git a/CFD/LBMSolverMPI/include/vector3.hpp b/CFD/LBMSolverMPI/include/vector3.hpp
new file mode 100644
index 0000000..5312b43
--- /dev/null
+++ b/CFD/LBMSolverMPI/include/vector3.hpp
@@ -0,0 +1,41 @@
+#ifndef VECTOR_H_FILE
+#define VECTOR_H_FILE
+
+//作者:  黄海波，张嘉骞，中国科学技术大学
+
+template<class myType>
+class vector3 {
+
+public:
+	vector3(myType x, myType y, myType z);
+	vector3();
+	myType dot(vector3<myType> other);
+	vector3<myType> cross(vector3<myType> other);
+	myType norm_square();
+	myType x;
+	myType y;
+	myType z;
+	myType get_x()	const
+	{
+		return x;
+	}
+	myType get_y()	const
+	{
+		return y;
+	}
+	myType get_z()	const
+	{
+		return z;
+	}
+	vector3<myType> operator- (const vector3<myType>& rhs) const {
+		return vector3<myType>(x - rhs.x, y - rhs.y, z - rhs.z);
+	}
+	vector3<myType> operator+ (const vector3<myType>& rhs) const {
+		return vector3<myType>(x + rhs.x, y + rhs.y, z + rhs.z);
+	}
+	vector3<myType> operator/ (const myType& rhs) const {
+		return vector3<myType>(x/rhs, y/rhs, z/rhs);
+	}
+};
+
+#endif
diff --git a/CFD/LBMSolverMPI/src/LBMSolverMPISimulation.cpp b/CFD/LBMSolverMPI/src/LBMSolverMPISimulation.cpp
new file mode 100644
index 0000000..1c3708e
--- /dev/null
+++ b/CFD/LBMSolverMPI/src/LBMSolverMPISimulation.cpp
@@ -0,0 +1,39 @@
+#include <streambuf>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <time.h>
+#include <mpi.h>
+#include "LBMSolverMPI.hpp"
+#include "vector3.cpp"
+//����:  �ƺ������ż�幣��й���ѧ������ѧ
+using namespace std;
+
+void RunLBMSolverMPI() { //int argc, char** argv
+    // Initialize the MPI environment
+    //MPI_Init(NULL, NULL);
+
+    int mpi_rank;
+    MPI_Comm_rank(MPI_COMM_WORLD, &mpi_rank);
+
+    int mpi_size;
+    MPI_Comm_size(MPI_COMM_WORLD, &mpi_size);
+
+    RUNPHLBM(mpi_rank);
+    // Finalize the MPI environment.
+    MPI_Finalize();
+}
+
+void RUNPHLBM(int mpi_rank) {
+    LBM* solver = new LBM();
+    struct Params_Pakage parameters = { "./bin/input.txt","./params_out.txt" };
+
+    solver->initialise(&parameters, mpi_rank);
+
+    int runs = solver->get_total_steps();
+    for (int i = 0; i < runs; i = i + 1) {
+        solver->perform_timestep();
+        solver->output(i, mpi_rank);
+    }
+
+    delete solver;
+}
\ No newline at end of file
diff --git a/CFD/LBMSolverMPI/src/bcs.cpp b/CFD/LBMSolverMPI/src/bcs.cpp
new file mode 100644
index 0000000..b6d64d8
--- /dev/null
+++ b/CFD/LBMSolverMPI/src/bcs.cpp
@@ -0,0 +1,357 @@
+#include "LBMSolverMPI.hpp"
+#include "vector3.cpp"
+#include <iomanip>
+#include <iostream>
+
+void LBM::wall_bounce_back()
+{ //nonslip���棬bounce-backʵ���޻��Ʊ߽�����.
+    for (int x = 0; x < NX; x++) {
+        for (int y = 0; y < NY; y++) {
+            for (int z = 0; z < NZ; z++) {
+                if (obst[index(x, y, z)] == 3) {
+                    for (int i = 0; i < direction_size; i++) {
+                        pdf[index(x, y, z, i)] = pdf[index(x, y, z, reverse_indexes[i])];
+                    }
+                }
+            }
+        }
+    }
+}
+
+void LBM::velocity_boundary_condition()
+{
+    const double tauinv = 1.0 / tau;
+    const double omtauinv = 1.0 - tauinv;
+    std::string Astring;
+    if (x_id == 0) {
+        Astring = BC.xminFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ�׼��
+        if (Astring == "velocity") {
+            int x = 0;
+            for (int y = 0; y < NY; y++) {
+                for (int z = 0; z < NZ; z++) {
+                    vel[index(x, y, z)].x = BC.vel_specified[0].x;
+                    vel[index(x, y, z)].y = BC.vel_specified[0].y;
+                    vel[index(x, y, z)].z = BC.vel_specified[0].z;
+                    rho[index(x, y, z)] = rho[index(x + 1, y, z)]; //rho �����������������(x+1, y, z)��ֵ����
+                    for (int i = 0; i < direction_size; i++) {
+                        double feq = calculate_feq(x, y, z, i);
+                        double feq1 = calculate_feq(x + 1, y, z, i);
+                        pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x + 1, y, z, i)] - feq1);
+                        //��ƽ�ⲿ��(pdf2[index(x+1, y, z, i)] - feq1) �����������������(x+1, y, z)��ֵ����
+                    }
+                }
+            }
+        }
+    }
+    if (x_id == x_np - 1) {
+        Astring = BC.xmaxFace;
+        if (Astring == "velocity") {
+            int x = NX - 1;
+            for (int y = 0; y < NY; y++) {
+                for (int z = 0; z < NZ; z++) {
+                    vel[index(x, y, z)].x = BC.vel_specified[1].x;
+                    vel[index(x, y, z)].y = BC.vel_specified[1].y;
+                    vel[index(x, y, z)].z = BC.vel_specified[1].z;
+                    rho[index(x, y, z)] = rho[index(x - 1, y, z)]; //rho �����������������(x-1, y, z)��ֵ����
+                    for (int i = 0; i < direction_size; i++) {
+                        double feq = calculate_feq(x, y, z, i);
+                        double feq1 = calculate_feq(x - 1, y, z, i);
+                        pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x - 1, y, z, i)] - feq1);
+                        //��ƽ�ⲿ��(pdf2[index(x-1, y, z, i)] - feq1) �����������������(x-1, y, z)��ֵ����
+                    }
+                }
+            }
+        }
+    }
+
+    if (y_id == 0) {
+        Astring = BC.yminFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ�׼��
+        //���¸���������ϵ��ٶȣ����������ⷽ�򣨰�����ֱ�ڸ���Ľ����ٶȣ�Ҳ�����ǻ������棨ƽ�и�����ٶȣ���
+        if (Astring == "velocity") {
+            int y = 0;
+            for (int x = 0; x < NX; x++) {
+                for (int z = 0; z < NZ; z++) {
+                    vel[index(x, y, z)].x = BC.vel_specified[2].x;
+                    vel[index(x, y, z)].y = BC.vel_specified[2].y;
+                    vel[index(x, y, z)].z = BC.vel_specified[2].z;
+                    rho[index(x, y, z)] = rho[index(x, y + 1, z)]; //rho �����������������(x, y+1, z)��ֵ����
+                    for (int i = 0; i < direction_size; i++) {
+                        double feq = calculate_feq(x, y, z, i);
+                        double feq1 = calculate_feq(x, y + 1, z, i);
+                        pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x, y + 1, z, i)] - feq1);
+                        //��ƽ�ⲿ��(pdf2[index(x, y+1, z, i)] - feq1) �����������������(x, y+1, z)��ֵ����
+                    }
+                }
+            }
+        }
+    }
+
+    if (y_id == y_np - 1) {
+        Astring = BC.ymaxFace;
+        if (Astring == "velocity") {
+            int y = NY - 1;
+            for (int x = 0; x < NX; x++) {
+                for (int z = 0; z < NZ; z++) {
+                    vel[index(x, y, z)].x = BC.vel_specified[3].x;
+                    vel[index(x, y, z)].y = BC.vel_specified[3].y;
+                    vel[index(x, y, z)].z = BC.vel_specified[3].z;
+                    rho[index(x, y, z)] = rho[index(x, y - 1, z)]; //rho �����������������(x, y-1, z)��ֵ����
+                    for (int i = 0; i < direction_size; i++) {
+                        double feq = calculate_feq(x, y, z, i);
+                        double feq1 = calculate_feq(x, y - 1, z, i);
+                        pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x, y - 1, z, i)] - feq1);
+                        //��ƽ�ⲿ��(pdf2[index(x, y+1, z, i)] - feq1) �����������������(x, y+1, z)��ֵ����
+                    }
+                }
+            }
+        }
+    }
+    if (direction_size != 9) {
+        if (z_id == 0) {
+            Astring = BC.zminFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ�׼��
+            if (Astring == "velocity") {
+                int z = 0;
+                for (int x = 0; x < NX; x++) {
+                    for (int y = 0; y < NY; y++) {
+                        vel[index(x, y, z)].x = BC.vel_specified[4].x;
+                        vel[index(x, y, z)].y = BC.vel_specified[4].y;
+                        vel[index(x, y, z)].z = BC.vel_specified[4].z;
+                        rho[index(x, y, z)] = rho[index(x, y, z + 1)]; //rho �����������������(x, y, z+1)��ֵ����
+                        for (int i = 0; i < direction_size; i++) {
+                            double feq = calculate_feq(x, y, z, i);
+                            double feq1 = calculate_feq(x, y, z + 1, i);
+                            pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x, y, z + 1, i)] - feq1);
+                            //��ƽ�ⲿ��(pdf2[index(x, y, z+1, i)] - feq1) �����������������(x, y, z+1)��ֵ����
+                        }
+                    }
+                }
+            }
+        }
+
+        if (z_id == z_np - 1) {
+            Astring = BC.zmaxFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ�׼��
+            if (Astring == "velocity") {
+                int z = NZ - 1;
+                for (int x = 0; x < NX; x++) {
+                    for (int y = 0; y < NY; y++) {
+                        vel[index(x, y, z)].x = BC.vel_specified[5].x;
+                        vel[index(x, y, z)].y = BC.vel_specified[5].y;
+                        vel[index(x, y, z)].z = BC.vel_specified[5].z;
+                        rho[index(x, y, z)] = rho[index(x, y, z - 1)]; //rho �����������������(x, y, z-1)��ֵ����
+                        for (int i = 0; i < direction_size; i++) {
+                            double feq = calculate_feq(x, y, z, i);
+                            double feq1 = calculate_feq(x, y, z - 1, i);
+                            pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x, y, z - 1, i)] - feq1);
+                            //��ƽ�ⲿ��(pdf2[index(x, y, z-1, i)] - feq1) �����������������(x, y, z-1)��ֵ����
+                        }
+                    }
+                }
+            }
+        }
+    }
+}
+
+void LBM::pressure_boundary_condition()
+{
+    const double tauinv = 1.0 / tau;
+    const double omtauinv = 1.0 - tauinv;
+    std::string Astring;
+    if (x_id == 0) {
+        Astring = BC.xminFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ�׼��
+        //���¸������ϵ�ѹǿ���ܶȣ�
+        if (Astring == "pressure") {
+            int x = 0;
+            for (int y = 0; y < NY; y++) {
+                for (int z = 0; z < NZ; z++) {
+                    vel[index(x, y, z)].x = vel[index(x + 1, y, z)].x;//�ٶ������������������(x+1, y, z)��ֵ����
+                    vel[index(x, y, z)].y = vel[index(x + 1, y, z)].y;
+                    vel[index(x, y, z)].z = vel[index(x + 1, y, z)].z;
+                    rho[index(x, y, z)] = BC.rho_specified[0];
+                    for (int i = 0; i < direction_size; i++) {
+                        double feq = calculate_feq(x, y, z, i);
+                        double feq1 = calculate_feq(x + 1, y, z, i);
+                        pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x + 1, y, z, i)] - feq1);
+                        //��ƽ�ⲿ��(pdf2[index(x+1, y, z, i)] - feq1) �����������������(x+1, y, z)��ֵ����
+                    }
+                }
+            }
+        }
+    }
+
+    if (x_id == x_np - 1) {
+        Astring = BC.xmaxFace;
+        if (Astring == "pressure") {
+            int x = NX - 1;
+            for (int y = 0; y < NY; y++) {
+                for (int z = 0; z < NZ; z++) {
+                    vel[index(x, y, z)].x = vel[index(x - 1, y, z)].x;
+                    vel[index(x, y, z)].y = vel[index(x - 1, y, z)].y;
+                    vel[index(x, y, z)].z = vel[index(x - 1, y, z)].z;
+                    rho[index(x, y, z)] = BC.rho_specified[1];
+                    for (int i = 0; i < direction_size; i++) {
+                        double feq = calculate_feq(x, y, z, i);
+                        double feq1 = calculate_feq(x - 1, y, z, i);
+                        pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x - 1, y, z, i)] - feq1);
+                        //��ƽ�ⲿ��(pdf2[index(x-1, y, z, i)] - feq1) �����������������(x-1, y, z)��ֵ����
+                    }
+                }
+            }
+        }
+    }
+
+    if (y_id == 0) {
+        Astring = BC.yminFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ�׼��
+        if (Astring == "pressure") {
+            int y = 0;
+            for (int x = 0; x < NX; x++) {
+                for (int z = 0; z < NZ; z++) {
+                    vel[index(x, y, z)].x = vel[index(x, y + 1, z)].x;
+                    vel[index(x, y, z)].y = vel[index(x, y + 1, z)].y;
+                    vel[index(x, y, z)].z = vel[index(x, y + 1, z)].z;
+                    rho[index(x, y, z)] = BC.rho_specified[2];
+                    for (int i = 0; i < direction_size; i++) {
+                        double feq = calculate_feq(x, y, z, i);
+                        double feq1 = calculate_feq(x, y + 1, z, i);
+                        pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x, y + 1, z, i)] - feq1);
+                        //��ƽ�ⲿ��(pdf2[index(x, y+1, z, i)] - feq1) �����������������(x, y+1, z)��ֵ����
+                    }
+                }
+            }
+        }
+    }
+
+    if (y_id == y_np - 1) {
+        Astring = BC.ymaxFace;
+        if (Astring == "pressure") {
+            int y = NY - 1;
+            for (int x = 0; x < NX; x++) {
+                for (int z = 0; z < NZ; z++) {
+                    vel[index(x, y, z)].x = vel[index(x, y - 1, z)].x;
+                    vel[index(x, y, z)].y = vel[index(x, y - 1, z)].y;
+                    vel[index(x, y, z)].z = vel[index(x, y - 1, z)].z;
+                    rho[index(x, y, z)] = BC.rho_specified[3];
+                    for (int i = 0; i < direction_size; i++) {
+                        double feq = calculate_feq(x, y, z, i);
+                        double feq1 = calculate_feq(x, y - 1, z, i);
+                        pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x, y - 1, z, i)] - feq1);
+                        //��ƽ�ⲿ��(pdf2[index(x, y+1, z, i)] - feq1) �����������������(x, y+1, z)��ֵ����
+                    }
+                }
+            }
+        }
+    }
+
+    if (z_id == 0) {
+        Astring = BC.zminFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ�׼��
+        if (Astring == "pressure") {
+            int z = 0;
+            for (int x = 0; x < NX; x++) {
+                for (int y = 0; y < NY; y++) {
+                    vel[index(x, y, z)].x = vel[index(x, y, z + 1)].x;
+                    vel[index(x, y, z)].y = vel[index(x, y, z + 1)].y;
+                    vel[index(x, y, z)].z = vel[index(x, y, z + 1)].z;
+                    rho[index(x, y, z)] = BC.rho_specified[4];
+                    for (int i = 0; i < direction_size; i++) {
+                        double feq = calculate_feq(x, y, z, i);
+                        double feq1 = calculate_feq(x, y, z + 1, i);
+                        pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x, y, z + 1, i)] - feq1);
+                        //��ƽ�ⲿ��(pdf2[index(x, y, z+1, i)] - feq1) �����������������(x, y, z+1)��ֵ����
+                    }
+                }
+            }
+        }
+    }
+
+    if (z_id == z_np - 1) {
+        Astring = BC.zmaxFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ�׼��
+        if (Astring == "pressure") {
+            int z = NZ - 1;
+            for (int x = 0; x < NX; x++) {
+                for (int y = 0; y < NY; y++) {
+                    vel[index(x, y, z)].x = vel[index(x, y, z - 1)].x; //�����������������(x, y, z - 1)��ֵ����
+                    vel[index(x, y, z)].y = vel[index(x, y, z - 1)].y;
+                    vel[index(x, y, z)].z = vel[index(x, y, z - 1)].z;
+                    rho[index(x, y, z)] = BC.rho_specified[5];
+                    for (int i = 0; i < direction_size; i++) {
+                        double feq = calculate_feq(x, y, z, i);
+                        double feq1 = calculate_feq(x, y, z - 1, i);
+                        pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x, y, z - 1, i)] - feq1);
+                        //��ƽ�ⲿ��(pdf2[index(x, y, z-1, i)] - feq1) �����������������(x, y, z-1)��ֵ����
+                    }
+                }
+            }
+        }
+    }
+
+}
+
+void  LBM::bouzidi() //Bouzidi ��ֵ���������׿ռ侫��
+{ // post-stream (after stream is performed)
+    force[0].x = 0.0; force[0].y = 0.0; force[0].z = 0.0;
+    for (int i = 0; i < num_node2; i++)
+    {
+        int j = node2[i];
+        int z = (int)floor((double)(j) / (double)((NX+4) * (NY+4)));          //relocate 
+        int y = (int)floor((double)(j % ((NX+4) * (NY+4))) / (double)(NX+4));
+        int x = (j) % (NX+4);
+        //#pragma omp parallel for
+        for (int l = 0; l < direction_size; l++) //
+        {
+            if (x >= 0 && x < NX && y >= 0 && y < NY && z >= 0 && z < NZ) {
+
+                if (delta[l + i * direction_size] >= 0.00001)
+                {
+                    double q = delta[l + i * direction_size];
+                    int ip = ei[l].x, jp = ei[l].y, kp = ei[l].z;
+                    int m = reverse_indexes[l];
+
+                    if (q < 0.5) {
+                        int n1 = index(x + 1 * ip, y + 1 * jp, z + 1 * kp);
+                        int n2 = index(x + 2 * ip, y + 2 * jp, z + 2 * kp);
+
+                        if (obst[n2] == 0) {
+                            pdf[index(x + ip, y + jp, z + kp, l)] = q * (1. + 2. * q) * pdf[index(x, y, z, m)]
+                                + (1. - 4. * q * q) * pdf[index(x + ip, y + jp, z + kp, m)] - q * (1. - 2. * q) *
+                                pdf[index(x + 2 * ip, y + 2 * jp, z + 2 * kp, m)];
+                        }
+                        else
+                        {//the following is seldem used ����һ���ò���
+                            if (obst[n1] == 0)
+                            {
+                                pdf[index(x + ip, y + jp, z + kp, l)] = 2. * q * pdf[index(x, y, z, m)]
+                                    + (1. - 2. * q) * pdf[index(x + ip, y + jp, z + kp, m)];
+                            }
+                            else
+                            {
+                                pdf[index(x + ip, y + jp, z + kp, l)] = pdf[index(x, y, z, m)];
+                            }
+                        }
+                    }
+                    else
+                    {
+                        int n1 = index(x + 1 * ip, y + 1 * jp, z + 1 * kp);
+                        //int n2 = index(x + 2 * ip, y + 2 * jp, z + 2 * kp);
+                        //if (obst[n2] == 0) {
+                        //    pdf[index(x + ip, y + jp, z + kp, l)] = 1.0 / (q * (2. * q + 1.0)) * pdf[index(x, y, z, m)]
+                        //        + (2. * q - 1.) / q * pdf2[index(x + 1 * ip, y + 1 * jp, z + 1 * kp, l)] - (2. * q - 1.) /
+                        //        (2. * q + 1.) * pdf2[index(x + 2 * ip, y + 2 * jp, z + 2 * kp, l)];
+                        //}
+                        //else //the following is seldem used ����һ���ò���
+                        //{
+                            if (obst[n1] == 0) {
+                                pdf[index(x + ip, y + jp, z + kp, l)] = 1. / (2. * q) * pdf[index(x, y, z, m)] +
+                                    (2. * q - 1.) / (2. * q) * pdf[index(x + 2 * ip, y + 2 * jp, z + 2 * kp, l)];
+                            }
+                        /*}*/
+                    }
+
+                    force[0].x = force[0].x + ei[m].x * (pdf[index(x, y, z, m)] + pdf[index(x + ip, y + jp, z + kp, l)]);
+                    force[0].y = force[0].y + ei[m].y * (pdf[index(x, y, z, m)] + pdf[index(x + ip, y + jp, z + kp, l)]);
+                    force[0].z = force[0].z + ei[m].z * (pdf[index(x, y, z, m)] + pdf[index(x + ip, y + jp, z + kp, l)]);
+                }
+            }
+        }
+    }
+
+
+}
\ No newline at end of file
diff --git a/CFD/LBMSolverMPI/src/inout.cpp b/CFD/LBMSolverMPI/src/inout.cpp
new file mode 100644
index 0000000..50a15b2
--- /dev/null
+++ b/CFD/LBMSolverMPI/src/inout.cpp
@@ -0,0 +1,552 @@
+#include "LBMSolverMPI.hpp"
+#include "vector3.cpp"
+#include <iomanip>
+#include <iostream>
+#include <cmath>
+#include <stdio.h>
+#include <stdlib.h>
+#include <fstream>
+#include <string>
+#include <vector>
+#include <iomanip>
+#include<sstream>
+#include<algorithm>
+using namespace std;
+
+void LBM::output_all(std::string filename) {
+    std::ofstream output_stream;
+    output_stream.open(filename, std::ofstream::out);
+    //����ʱ��option��	| std::ofstream::app���� app׷���ļ�������ΪĬ�ϸ���
+    output_stream.precision(8);
+    output_stream << "variables = x, y, z, rho, u, v, w" << '\n';
+    output_stream << "zone i=" << total_NX << ",j=" << total_NY << ", k=" << total_NZ << ", f=point" << '\n';
+
+    for (int z = 0; z < total_NZ; z++) {
+        for (int y = 0; y < total_NY; y++) {
+            for (int x = 0; x < total_NX; x++) {
+                output_stream << x << " " << y << " " << z << " " <<
+                    rhoTotal[this->total_index(x, y, z)] << " " <<
+                    velTotal[this->total_index(x, y, z)].x << " " <<
+                    velTotal[this->total_index(x, y, z)].y << " " <<
+                    velTotal[this->total_index(x, y, z)].z << " " << '\n';
+            }
+        }
+    }
+    output_stream.close();
+}
+
+void LBM::output_all(std::string filename, int xmin, int xmax, int ymin, int ymax, int zmin, int zmax) {
+    std::ofstream output_stream;
+    output_stream.open(filename, std::ofstream::out);
+    //����ʱ��option��	| std::ofstream::app���� app׷���ļ�������ΪĬ�ϸ���
+    output_stream.precision(8);
+    output_stream << "variables = x, y, z, rho, u, v, w" << '\n';
+    output_stream << "zone i=" << total_NX + xmax - xmin << ",j=" << total_NY + ymax - ymin << ", k=" << total_NZ + zmax - zmin << ", f=point" << '\n';
+
+    for (int z = zmin; z < total_NZ + zmax; z++) {
+        for (int y = ymin; y < total_NY + ymax; y++) {
+            for (int x = xmin; x < total_NX + xmax; x++) {
+                output_stream << x << " " << y << " " << z << " " <<
+                    rhoTotal[this->total_index(x, y, z)] << " " <<
+                    velTotal[this->total_index(x, y, z)].x << " " <<
+                    velTotal[this->total_index(x, y, z)].y << " " <<
+                    velTotal[this->total_index(x, y, z)].z << " " << '\n';
+            }
+        }
+    }
+    output_stream.close();
+}
+
+void LBM::read_all(std::string filename) {
+    std::ifstream input_stream;
+    int ab[3];
+    char buffer[256];
+    double temprho;
+    double tempuvw[3];
+    int x0, y0, z0;
+    input_stream.open(filename, ios::in);
+    input_stream.getline(buffer, 200);
+    input_stream.getline(buffer, 200);
+
+    for (int z = 0; z < total_NZ; z++) {
+        for (int y = 0; y < total_NY; y++) {
+            for (int x = 0; x < total_NX; x++) {
+                input_stream.getline(buffer, 100);
+                sscanf_s(buffer, "%d %d %d %lf %lf %lf %lf", &ab[0], &ab[1], &ab[2], &temprho, &tempuvw[0], &tempuvw[1], &tempuvw[2]);
+                x0 = x - Xori;
+                y0 = y - Yori;
+                z0 = z - Zori;
+                if (x0 >= 0 && x0 < NX && y0 >= 0 && y0 < NY && z0 >= 0 && z0 < NZ) {
+                    rho[index(x0, y0, z0)] = (double)temprho;
+                    vel[index(x0, y0, z0)].x = (double)tempuvw[0];
+                    vel[index(x0, y0, z0)].y = (double)tempuvw[1];
+                    vel[index(x0, y0, z0)].z = (double)tempuvw[2];
+                }
+
+            }
+        }
+    }
+    input_stream.close();
+
+    for (int x = 0; x < NX; x++) {
+        for (int y = 0; y < NY; y++) {
+            for (int z = 0; z < NZ; z++) {
+                for (int i = 0; i < direction_size; i++) {
+                    pdf[index(x, y, z, i)] = calculate_feq(x, y, z, i);
+                }
+            }
+        }
+    }
+
+    input_stream.close();
+}
+
+void LBM::read_Geo(std::string filename, int mpi_rank)
+{
+    int x0, y0, z0;
+    force = new vector3<double>[1]();
+    //for (int k = 0; k < direction_size; k++)
+    //{
+    //	cout << "(" << ei[k].x << " " << ei[k].y << "  " << ei[k].z << ")" << '\n';
+    //}
+
+    char buffer[256];
+    int ele_point = 0, total_ibpoint = 0, * a;
+
+    double x_min, x_max, y_min, y_max, z_min, z_max;
+    double x_length, y_length, z_length;
+    double* lagx, * lagy, * lagz;
+    int* Ep0, * Ep1, * Ep2;
+
+    a = new int[2]();
+
+
+    ifstream infile(filename);
+    //ofstream outfile("out.plt");  //����ļ�	
+    if (!infile) {
+        cout << "Unable to open input complex geometry (shape) file:mesh_3d.dat or mesh_2d.dat";
+        exit(1); // terminate with error
+
+    }
+    /*	if (!outfile) {
+            cout << "Unable to open output file";
+            exit(1); // terminate with error
+
+        }*/
+    infile.getline(buffer, 60);  //����
+    infile.getline(buffer, 60);  //����
+    infile.getline(buffer, 90);  //�������������Ԫ����, !before numbers there should be at least a blank
+    string str1 = buffer;
+    //		cout << str1 << '\n';
+            //			sscanf_s(buffer, "%*s, %*s %d", &total_ibpoint); // &total_ibpoint,&ele_point);&buf, _countof(buf)
+            //			cout<<total_ibpoint<<endl;
+    getNumberFromString(str1, a, 2);
+    total_ibpoint = a[0];
+    ele_point = a[1];
+
+    //cout << "total_ibpoint=" << total_ibpoint << "    ele_point=" << ele_point << '\n';
+
+    lagx = new double[total_ibpoint]();
+    lagy = new double[total_ibpoint]();
+    lagz = new double[total_ibpoint]();
+
+    Ep0 = new int[ele_point]();
+    Ep1 = new int[ele_point]();
+    Ep2 = new int[ele_point]();
+
+    while (!infile.eof()) //���ж�������� ���ļ�������Ϊ��־�����ļ������һ�пհ��л�һ��δԤ�����ݣ��������ܻ�������
+    {
+
+        for (int k = 0; k < total_ibpoint; k++) {
+            infile.getline(buffer, 100);  //60̫С������
+            //				string str1 = buffer;
+            //				cout << str1 << '\n';
+            sscanf_s(buffer, "%lf  %lf  %lf", &lagx[k], &lagy[k], &lagz[k]);
+            //	cout << lagx[k] << "     " << lagy[k] << "  " << lagz[k] << '\n';
+        }
+
+
+        for (int k = 0; k < ele_point; k++) {
+            infile.getline(buffer, 40);
+            //				string str1 = buffer;
+            //				cout << str1 << '\n';
+            sscanf_s(buffer, "%d       %d       %d", &Ep0[k], &Ep1[k], &Ep2[k]);
+            //cout << Ep0[k] << "     " << Ep1[k] << "  " << Ep2[k] << '\n';
+        }
+    }
+
+    ////Ϊ�˼��һ�飬�������Finite element�������ļ�
+    //std::ofstream output_stream;
+    //output_stream.open("out.plt", std::ofstream::out);
+    ////����ʱ��option��	| std::ofstream::app���� app׷���ļ�������ΪĬ�ϸ���
+    //if (true) {
+    //	output_stream << "Title = " << '"' << "finite-element data" << '"' << '\n';
+    //	output_stream << "variables = x, y, z" << '\n';
+    //	output_stream << "zone n=" << total_ibpoint << ", E=" << ele_point << ",f=FEpoint,et = triangle" << '\n';
+    //}
+
+    //for (int k = 0; k < total_ibpoint; k++) {
+    //	output_stream << lagx[k] << "  " << lagy[k] << "  " << lagz[k] << '\n';
+    //}
+    //for (int k = 0; k < ele_point; k++) {
+    //	output_stream << Ep0[k] << "  " << Ep1[k] << "  " << Ep2[k] << "  " << '\n';
+    //}
+    //output_stream.close();
+    //-----------------------------------------------------
+    x_max = *max_element(lagx, lagx + total_ibpoint);
+    x_min = *min_element(lagx, lagx + total_ibpoint);
+    y_max = *max_element(lagy, lagy + total_ibpoint);
+    y_min = *min_element(lagy, lagy + total_ibpoint);
+    z_max = *max_element(lagz, lagz + total_ibpoint);
+    z_min = *min_element(lagz, lagz + total_ibpoint);
+
+    //cout << "x_max=" << x_max << "  " << "xmin=" << x_min << '\n';
+    //cout << "y_max=" << y_max << "  " << "ymin=" << y_min << '\n';
+    //cout << "z_max=" << z_max << "  " << "zmin=" << z_min << '\n';
+    x_length = x_max - x_min;
+    y_length = y_max - y_min;
+    z_length = z_max - z_min;
+    //std::cout << "xlength=" << x_length << "   " << "ylength=" << y_length << "   " << "zlength=" << z_length << '\n';
+
+    //		std::cout << ac << "   " << "t=" << t << "   " << "u=" << u << "   " << "v=" << v << '\n';
+
+
+    bool judge;
+    vector3<double> v0, v1, v2;
+    double t, u, v;
+    int* t_rcd;
+    t_rcd = new int[2]();
+    int zmin0 = (int)floor(z_min);
+    int zmax0 = (int)floor(z_max) + 2; //3D
+    if (direction_size == 9) { zmin0 = 0; zmax0 = 1; }      //2D
+
+    for (int x = (int)floor(x_min); x < (int)floor(x_max) + 2; x++) {
+        for (int y = (int)floor(y_min); y < (int)floor(y_max) + 2; y++) {
+            //		for (int z = (int)floor(z_min); z < (int)floor(z_max) + 2; z++) {
+            for (int z = zmin0; z < zmax0; z++) {
+                double origx = x; double origy = y; double origz = z;
+                vector3<double> orig = { origx,origy,origz }, dir = { 0.0, 0.0, 1.0 };
+                if (direction_size == 9) dir = { 0.0, 1.0, 0.0 };
+                t_rcd[0] = 0;
+                t_rcd[1] = 0;
+                for (int k = 0; k < ele_point; k++) {
+                    v0 = { lagx[Ep0[k] - 1],lagy[Ep0[k] - 1],lagz[Ep0[k] - 1] };
+                    v1 = { lagx[Ep1[k] - 1],lagy[Ep1[k] - 1],lagz[Ep1[k] - 1] };
+                    v2 = { lagx[Ep2[k] - 1],lagy[Ep2[k] - 1],lagz[Ep2[k] - 1] };
+                    if (direction_size == 9) { //2D
+                        v0 = { lagx[Ep0[k] - 1],lagy[Ep0[k] - 1],1.0 };
+                        v1 = { lagx[Ep1[k] - 1],lagy[Ep1[k] - 1],0.0 };
+                        v2 = { lagx[Ep2[k] - 1],lagy[Ep2[k] - 1], -1.0 };
+                    }
+                    //ע�⣺ÿ�����ǵ�Ԫ�Ķ��㣨��㣩���Ep0[k]��Ep1[k]��Ep2[k]���Ǵ�1��ʼ�ģ��������ǵĽ����������lagx[]�Ǵ�0��ʼ�ġ�
+                    //����ر�ע�⣺��ȷ�õ�Ep0[k]��x����ֵӦ�ò���lagx[Ep0[k]-1]
+                    judge = IntersectTriangle(orig, dir, v0, v1, v2, &t, &u, &v);
+                    if (judge == true) {  // && u > 0.00001 && v > 0.00001
+                        if (t > 0) {
+                            t_rcd[0] ++; // tΪ��ֵ�Ĵ���
+                        }
+                        else {
+                            t_rcd[1] ++;  // tΪ��ֵ�Ĵ��� }
+
+                        }
+                    }
+
+                    if (t_rcd[0] > 0 && t_rcd[1] > 0) {
+                        //			std::cout << "p" << t_rcd[0] << "  n" << t_rcd[1] << '\n'; 
+                        x0 = x - Xori;
+                        y0 = y - Yori;
+                        z0 = z - Zori;
+                        if (x0 >= -2 && x0 < NX + 2 && y0 >= -2 && y0 < NY + 2 && z0 >= -2 && z0 < NZ + 2) {
+                            obst[index(x0, y0, z0, NX, NY)] = 1;
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    //���  obst=1  tecplot�ۿ�
+    //std::ofstream output1_stream;
+    //output1_stream.open("del" + std::to_string(mpi_rank) + ".plt", std::ofstream::out);
+    ////����ʱ��option��	| std::ofstream::app���� app׷���ļ�������ΪĬ�ϸ���
+    //if (true) {
+    //	output1_stream << "variables = x, y, z, obst" << '\n';
+    //	output1_stream << "zone i=" << NX << ",j=" << NY << ", k=" << NZ << ", f=point" << '\n';
+    //}
+
+    //for (int z = 0; z < NZ; z++) {
+    //	for (int y = 0; y < NY; y++) {
+    //		for (int x = 0; x < NX; x++) {
+    //			output1_stream << x << " " << y << " " << z << " " <<
+    //				obst[index(x, y, z, NX, NY)] << '\n';
+    //		}
+    //	}
+    //}
+    //output1_stream.close();
+    //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~	
+    int m = 0;
+    //�������Ĺ����obstֵ�ij�2
+    for (int x = -2; x < NX + 2; x++) {
+        for (int y = -2; y < NY + 2; y++) {
+            for (int z = -2; z < NZ + 2; z++) {
+                if (obst[index(x, y, z, NX, NY)] == 1) {
+                    int n = 0;
+                    for (int k = 0; k < direction_size; k++) {
+                        int ind = index(x + ei[k].x, y + ei[k].y, z + ei[k].z, NX, NY);
+                        if (ind >= 0 && ind <= index(NX + 1, NY + 1, NZ + 1)) {
+                            if (obst[ind] == 0) { n++; }
+                        }
+                    }
+                    if (n > 0) { obst[index(x, y, z, NX, NY)] = 2;   m++; }
+                }
+            }
+        }
+    }//Ŀ���ǵõ�obst2�Ľ����  ��ȷ��������Ĵ�С
+
+    num_node2 = m;
+    node2 = new int[num_node2]();
+    delta = new double[num_node2 * direction_size]();
+
+    m = 0;
+    for (int x = -1; x < NX + 1; x++) {
+        for (int y = -1; y < NY + 1; y++) {
+            for (int z = -1; z < NZ + 1; z++) {
+                if (obst[index(x, y, z, NX, NY)] == 2) {
+                    node2[m] = index(x, y, z, NX, NY);
+                    for (int k1 = 0; k1 < direction_size; k1++) {
+                        int ip = ei[k1].x, jp = ei[k1].y, kp = ei[k1].z;
+                        int ind = index(x + ip, y + jp, z + kp, NX, NY);
+                        bool judge;
+                        double t, u, v;
+                        vector3<double> v0, v1, v2;
+                        vector3<double> orig = { (double)x,(double)y,(double)z },
+                            dir = { (double)ip, (double)jp, (double)kp };
+                        double b1 = 0., a1 = dir.norm_square(); //�ٶ�ģ�����ٶȳ��� 1, sqrt2, sqrt3...
+                        if (ind >= 0 && ind <= index(NX + 1, NY + 1, NZ + 1)) {
+                            if (obst[ind] == 0) {
+                                for (int k = 0; k < ele_point; k++) {
+                                    v0 = { lagx[Ep0[k] - 1],lagy[Ep0[k] - 1],lagz[Ep0[k] - 1] };
+                                    v1 = { lagx[Ep1[k] - 1],lagy[Ep1[k] - 1],lagz[Ep1[k] - 1] };
+                                    v2 = { lagx[Ep2[k] - 1],lagy[Ep2[k] - 1],lagz[Ep2[k] - 1] };
+                                    if (direction_size == 9) {
+                                        v0 = { lagx[Ep0[k] - 1],lagy[Ep0[k] - 1],1.0 };
+                                        v1 = { lagx[Ep1[k] - 1],lagy[Ep1[k] - 1],0.0 };
+                                        v2 = { lagx[Ep2[k] - 1],lagy[Ep2[k] - 1],-1.0 };
+                                    }
+                                    judge = IntersectTriangle(orig, dir, v0, v1, v2, &t, &u, &v);
+                                    if (judge == true && t > 0) { b1 = t; }     //&& t<b1
+                                }
+                                if (b1 / a1 > 1) delta[m * direction_size + k1] = 0.;
+                                else	delta[m * direction_size + k1] = 1.0 - b1 / sqrt(a1);
+                                //		cout <<"q="<< 1.0- b1/a1<<"    " <<"a1=" <<a1 <<'\n';
+                                //		if (b1 / a1 > 1) cout <<"b1="<<b1<<" a1="<<a1<<" error!!!!!!"<< '\n';
+                            }
+                        }
+                    }
+                    m++;
+                }
+            }
+        }
+    }
+
+    delete[] lagx;
+    delete[] lagy;
+    delete[] lagz;
+    delete[] Ep0;
+    delete[] Ep1;
+    delete[] Ep2;
+    delete[] t_rcd;
+}
+
+void LBM::getNumberFromString(string s, int* a, int n)
+{
+    stringstream str_strm;
+    str_strm << s; //convert the string s into stringstream
+    string temp_str;
+    int temp_int;
+    int k = 0;
+    while (!str_strm.eof()) {
+        str_strm >> temp_str; //take words into temp_str one by one
+        if (stringstream(temp_str) >> temp_int) { //try to convert string to int
+            a[k] = temp_int;	//cout << temp_int << endl;
+            k++;
+        }
+        temp_str = ""; //clear temp string
+    }
+}
+
+bool LBM::IntersectTriangle(vector3<double>& orig, vector3<double>& dir,
+    vector3<double>& v0, vector3<double>& v1, vector3<double>& v2,
+    double* t, double* u, double* v)
+{
+    // E1
+    vector3<double> E1 = v1 - v0;
+
+    // E2
+    vector3<double> E2 = v2 - v0;
+
+    // P
+    vector3<double> P = dir.cross(E2);
+
+    // determinant
+    double det = E1.dot(P);
+
+    // keep det > 0, modify T accordingly
+    vector3<double> T;
+    if (det > 0)
+    {
+        T = orig - v0;
+    }
+    else
+    {
+        T = v0 - orig;
+        det = -det;
+    }
+
+    // If determinant is near zero, ray lies in plane of triangle
+    if (det < 0.0001f)
+        return false;
+
+    // Calculate u and make sure u <= 1
+    *u = T.dot(P);
+    if (*u < 0.0f || *u > det)
+        return false;
+
+    // Q
+    vector3<double> Q = T.cross(E1);
+
+    // Calculate v and make sure u + v <= 1
+    *v = dir.dot(Q);
+    if (*v < 0.0f || *u + *v > det)
+        return false;
+
+    // Calculate t, scale parameters, ray intersects triangle
+    *t = E2.dot(Q);
+
+    double fInvDet = 1.0f / det;
+    *t *= fInvDet;
+    *u *= fInvDet;
+    *v *= fInvDet;
+
+    return true;
+}
+
+void LBM::write_binary(std::string filename) //int im, int jm, int km
+{
+    int VarN = 7; //Number of variables(VarN) 
+    //	char filename[100];
+    //	sprintf_s(filename, 100, "%s", "P.plt");  //sprintf(filename, "P.plt");
+    FILE* fp;
+    errno_t err;
+    if ((err = fopen_s(&fp, filename.c_str(), "wb")) != 0) std::cout << "error to open file: " << filename << '\n';
+    int im = this->total_NX;
+    int jm = this->total_NY;
+    int km = this->total_NZ;
+
+    char Title[] = "TubeFlow";
+    char Vname[7][5] = { "X","Y","Z","u","v","w","p" }; // "XYZp";
+
+    char Zonename1[] = "Zone 001";
+    float ZONEMARKER = 299.0;
+    float EOHMARKER = 357.0;
+    //==============Header Secontion =================//
+    //------1.1 Magic number, Version number
+    char MagicNumber[] = "#!TDV101";
+
+    fwrite(MagicNumber, 8, 1, fp);
+    //---- - 1.2.Integer value of 1.----------------------------------------------------------
+    int IntegerValue = 1;
+    fwrite(&IntegerValue, sizeof(IntegerValue), 1, fp);
+    //---- - 1.3.Title and variable names.------------------------------------------------ -
+    //---- - 1.3.1.The TITLE.
+    dumpstring(Title, fp);
+
+    fwrite(&VarN, sizeof(VarN), 1, fp);
+    //------1.3.3 Variable names.
+    for (int i = 0; i < VarN; i++) { dumpstring(Vname[i], fp); }
+
+    //---- - 1.4.Zones------------------------------------------------------------------ -
+    //--------Zone marker.Value = 299.0
+    fwrite(&ZONEMARKER, 1, sizeof(ZONEMARKER), fp);
+    //--------Zone name.
+    //fwrite(Zonename1, sizeof(Zonename1), 1, fp);
+    dumpstring(Zonename1, fp);
+
+    int ZoneStuff[5] = { -1,0,1,0,0 };
+    //--------Zone color
+    //--------ZoneType
+    //--------DaraPacking 0=Block, 1=Point
+    //--------Specify Var Location. 0 = Don't specify, all c_str is located at the nodes. 1 = Specify
+    //--------Number of user defined face neighbor connections(value >= 0)
+    for (int i = 0; i < 5; i++)
+    {
+        fwrite(&ZoneStuff[i], sizeof(int), 1, fp);
+    }
+
+    //-------- - im, jm, km
+    fwrite(&im, sizeof(im), 1, fp);
+    fwrite(&jm, sizeof(jm), 1, fp);
+    fwrite(&km, sizeof(km), 1, fp);
+    //----------// -1 = Auxiliary name / value pair to follow 0 = No more Auxiliar name / value pairs.
+
+    int AuxiliaryName = 0;
+    fwrite(&AuxiliaryName, sizeof(AuxiliaryName), 1, fp);
+    //----I HEADER OVER--------------------------------------------------------------------------------------------
+    //=============================Geometries section=======================
+    //=============================Text section======================
+    // EOHMARKER, value = 357.0
+    fwrite(&EOHMARKER, sizeof(EOHMARKER), 1, fp);
+    //================II.Data section===============//
+    //---- - 2.1 zone---------------------------------------------------------------------- -
+    fwrite(&ZONEMARKER, sizeof(ZONEMARKER), 1, fp);
+    //--------variable format, 1 = Float, 2 = Double, 3 = LongInt, 4 = ShortInt, 5 = Byte, 6 = Bit
+    int VariableType[7] = { 3,3,3,2,2,2,2 };
+    for (int i = 0; i < VarN; i++)
+    {
+        fwrite(&VariableType[i], sizeof(int), 1, fp);
+    }
+
+    //--------Has variable sharing 0 = no, 1 = yes.
+    int HasVarSharing = 0;
+    fwrite(&HasVarSharing, sizeof(HasVarSharing), 1, fp);
+    //----------Zone number to share connectivity list with(-1 = no sharing).
+    int ZoneNumToShareConnectivity = -1;
+    fwrite(&ZoneNumToShareConnectivity, sizeof(ZoneNumToShareConnectivity), 1, fp);
+    //----------Zone c_str.Each variable is in c_str format asspecified above.
+
+    for (int k = 0; k < km; k++)
+    {
+        for (int j = 0; j < jm; j++)
+        {
+            for (int i = 0; i < im; i++)
+            {
+                int Va1 = i;
+                int Va2 = j;
+                int Va3 = k;
+                fwrite(&Va1, sizeof(Va1), 1, fp);
+                fwrite(&Va2, sizeof(Va2), 1, fp);
+                fwrite(&Va3, sizeof(Va3), 1, fp);
+                fwrite(&velTotal[this->total_index(i, j, k)].x, sizeof(double), 1, fp);
+                fwrite(&velTotal[this->total_index(i, j, k)].y, sizeof(double), 1, fp);
+                fwrite(&velTotal[this->total_index(i, j, k)].z, sizeof(double), 1, fp);
+                fwrite(&rhoTotal[this->total_index(i, j, k)], sizeof(double), 1, fp);
+            }
+        }
+    }
+    fclose(fp);
+    //	getchar();
+}
+
+void dumpstring(char* str, FILE* file)
+{
+    int value = 0;
+    while ((*str) != '\0')
+    {
+        value = (int)*str;
+        fwrite(&value, sizeof(int), 1, file);
+        str++;
+    }
+    char null_char[] = "";
+    value = (int)*null_char;
+    fwrite(&value, sizeof(int), 1, file);
+}
\ No newline at end of file
diff --git a/CFD/LBMSolverMPI/src/lbmMPI.cpp b/CFD/LBMSolverMPI/src/lbmMPI.cpp
new file mode 100644
index 0000000..f561ba8
--- /dev/null
+++ b/CFD/LBMSolverMPI/src/lbmMPI.cpp
@@ -0,0 +1,522 @@
+#include "LBMSolverMPI.hpp"
+#include "vector3.cpp"
+#include <mpi.h>
+
+using namespace std;
+
+void LBM::mpi_ini(int mpi_rank)
+{
+    n_myid = new int[6];
+    NX = total_NX / x_np;
+    NY = total_NY / y_np;
+    NZ = total_NZ / z_np;
+    z_id = int(mpi_rank / (x_np * y_np));
+    y_id = int((mpi_rank % (x_np * y_np)) / x_np);
+    x_id = (mpi_rank % (x_np * y_np)) % x_np;
+
+    n_myid[0] = mpi_rank + 1;//x+1�ڵ�
+    if (x_id == (x_np - 1)) {
+        n_myid[0] = mpi_rank - x_np + 1;
+    }
+
+    n_myid[1] = mpi_rank - 1;//x-1�ڵ�
+    if (x_id == (0)) {
+        n_myid[1] = mpi_rank + x_np - 1;
+    }
+
+    n_myid[2] = mpi_rank + x_np;//y+1�ڵ�
+    if (y_id == (y_np - 1)) {
+        n_myid[2] = mpi_rank - x_np * (y_np - 1);
+    }
+
+    n_myid[3] = mpi_rank - x_np;//y-1�ڵ�
+    if (y_id == (0)) {
+        n_myid[3] = mpi_rank + x_np * (y_np - 1);
+    }
+
+    n_myid[4] = mpi_rank + y_np * x_np;//z+1�ڵ�
+    if (z_id == (z_np - 1)) {
+        n_myid[4] = mpi_rank - x_np * y_np * (z_np - 1);
+    }
+
+    n_myid[5] = mpi_rank - y_np * x_np;//z-1�ڵ�
+    if (z_id == (0)) {
+        n_myid[5] = mpi_rank + x_np * y_np * (z_np - 1);
+    }
+    Xori = x_id * NX;
+    Yori = y_id * NY;
+    Zori = z_id * NZ;
+
+    if (mpi_rank == (x_np * y_np * z_np - 1)) {
+        int NumNodes = total_NX * total_NY * total_NZ;
+        rhoTotal = new double[NumNodes] {};
+        obstTotal = new int[NumNodes] {};
+        velTotal = new vector3<double>[NumNodes] {};
+        if (CONV == 1) {
+            velTotalConv = new vector3<double>[NumNodes] {};
+        }
+    }
+}
+
+void LBM::mpi_send() {
+    int num;
+    MPI_Request r1, r2;
+    MPI_Status  status;
+    //MPI��ֵ x����
+    int send_numx = NZ * NY * direction_size;
+    double* send_fx = new double[send_numx] {};
+    double* recv_fx = new double[send_numx] {};
+
+    int x = NX - 1;
+    num = 0;
+    for (int z = 0; z < NZ; z++) {
+        for (int y = 0; y < NY; y++) {
+            for (int i = 0; i < direction_size; i++) {
+                send_fx[num] = pdf2[index(x, y, z, i)];
+                num++;
+            }
+        }
+    }
+
+    MPI_Isend(send_fx, send_numx, MPI_DOUBLE_PRECISION, n_myid[0], 200, MPI_COMM_WORLD, &r1);
+    MPI_Irecv(recv_fx, send_numx, MPI_DOUBLE_PRECISION, n_myid[1], 200, MPI_COMM_WORLD, &r2);
+
+    MPI_Wait(&r1, &status);
+    MPI_Wait(&r2, &status);
+
+    x = -1;
+    num = 0;
+    for (int z = 0; z < NZ; z++) {
+        for (int y = 0; y < NY; y++) {
+            for (int i = 0; i < direction_size; i++) {
+                pdf2[index(x, y, z, i)] = recv_fx[num];
+                num++;
+            }
+        }
+    }
+
+    x = 0;
+    num = 0;
+    for (int z = 0; z < NZ; z++) {
+        for (int y = 0; y < NY; y++) {
+            for (int i = 0; i < direction_size; i++) {
+                send_fx[num] = pdf2[index(x, y, z, i)];
+                num++;
+
+            }
+        }
+    }
+
+    MPI_Isend(send_fx, send_numx, MPI_DOUBLE_PRECISION, n_myid[1], 201, MPI_COMM_WORLD, &r1);
+    MPI_Irecv(recv_fx, send_numx, MPI_DOUBLE_PRECISION, n_myid[0], 201, MPI_COMM_WORLD, &r2);
+
+    MPI_Wait(&r1, &status);
+    MPI_Wait(&r2, &status);
+
+    x = NX;
+    num = 0;
+    for (int z = 0; z < NZ; z++) {
+        for (int y = 0; y < NY; y++) {
+            for (int i = 0; i < direction_size; i++) {
+                pdf2[index(x, y, z, i)] = recv_fx[num];
+                num++;
+            }
+        }
+    }
+    MPI_Barrier(MPI_COMM_WORLD);
+    //
+    x = NX - 2;
+    num = 0;
+    for (int z = 0; z < NZ; z++) {
+        for (int y = 0; y < NY; y++) {
+            for (int i = 0; i < direction_size; i++) {
+                send_fx[num] = pdf2[index(x, y, z, i)];
+                num++;
+            }
+        }
+    }
+
+    MPI_Isend(send_fx, send_numx, MPI_DOUBLE_PRECISION, n_myid[0], 200, MPI_COMM_WORLD, &r1);
+    MPI_Irecv(recv_fx, send_numx, MPI_DOUBLE_PRECISION, n_myid[1], 200, MPI_COMM_WORLD, &r2);
+
+    MPI_Wait(&r1, &status);
+    MPI_Wait(&r2, &status);
+
+    x = -2;
+    num = 0;
+    for (int z = 0; z < NZ; z++) {
+        for (int y = 0; y < NY; y++) {
+            for (int i = 0; i < direction_size; i++) {
+                pdf2[index(x, y, z, i)] = recv_fx[num];
+                num++;
+            }
+        }
+    }
+
+    x = 1;
+    num = 0;
+    for (int z = 0; z < NZ; z++) {
+        for (int y = 0; y < NY; y++) {
+            for (int i = 0; i < direction_size; i++) {
+                send_fx[num] = pdf2[index(x, y, z, i)];
+                num++;
+
+            }
+        }
+    }
+
+    MPI_Isend(send_fx, send_numx, MPI_DOUBLE_PRECISION, n_myid[1], 201, MPI_COMM_WORLD, &r1);
+    MPI_Irecv(recv_fx, send_numx, MPI_DOUBLE_PRECISION, n_myid[0], 201, MPI_COMM_WORLD, &r2);
+
+    MPI_Wait(&r1, &status);
+    MPI_Wait(&r2, &status);
+
+    x = NX + 1;
+    num = 0;
+    for (int z = 0; z < NZ; z++) {
+        for (int y = 0; y < NY; y++) {
+            for (int i = 0; i < direction_size; i++) {
+                pdf2[index(x, y, z, i)] = recv_fx[num];
+                num++;
+            }
+        }
+    }
+
+    delete[] send_fx;
+    delete[] recv_fx;
+    MPI_Barrier(MPI_COMM_WORLD);
+
+    //MPI��ֵ y����
+    int send_numy = (NX + 4) * NZ * direction_size;
+    double* send_fy = new double[send_numy] {};
+    double* recv_fy = new double[send_numy] {};
+
+    int y = NY - 1;
+    num = 0;
+    for (int z = 0; z < NZ; z++) {
+        for (int x = -2; x < NX + 2; x++) {
+            for (int i = 0; i < direction_size; i++) {
+                send_fy[num] = pdf2[index(x, y, z, i)];
+                num++;
+            }
+        }
+    }
+
+    MPI_Isend(send_fy, send_numy, MPI_DOUBLE_PRECISION, n_myid[2], 202, MPI_COMM_WORLD, &r1);
+    MPI_Irecv(recv_fy, send_numy, MPI_DOUBLE_PRECISION, n_myid[3], 202, MPI_COMM_WORLD, &r2);
+
+    MPI_Wait(&r1, &status);
+    MPI_Wait(&r2, &status);
+
+    y = -1;
+    num = 0;
+    for (int z = 0; z < NZ; z++) {
+        for (int x = -2; x < NX + 2; x++) {
+            for (int i = 0; i < direction_size; i++) {
+                pdf2[index(x, y, z, i)] = recv_fy[num];
+                num++;
+            }
+        }
+    }
+
+    y = 0;
+    num = 0;
+    for (int z = 0; z < NZ; z++) {
+        for (int x = -2; x < NX + 2; x++) {
+            for (int i = 0; i < direction_size; i++) {
+                send_fy[num] = pdf2[index(x, y, z, i)];
+                num++;
+            }
+        }
+    }
+    MPI_Isend(send_fy, send_numy, MPI_DOUBLE_PRECISION, n_myid[3], 203, MPI_COMM_WORLD, &r1);
+    MPI_Irecv(recv_fy, send_numy, MPI_DOUBLE_PRECISION, n_myid[2], 203, MPI_COMM_WORLD, &r2);
+
+    MPI_Wait(&r1, &status);
+    MPI_Wait(&r2, &status);
+
+    y = NY;
+    num = 0;
+    for (int z = 0; z < NZ; z++) {
+        for (int x = -2; x < NX + 2; x++) {
+            for (int i = 0; i < direction_size; i++) {
+                pdf2[index(x, y, z, i)] = recv_fy[num];
+                num++;
+            }
+        }
+    }
+
+    MPI_Barrier(MPI_COMM_WORLD);
+    //
+    y = NY - 2;
+    num = 0;
+    for (int z = 0; z < NZ; z++) {
+        for (int x = -2; x < NX + 2; x++) {
+            for (int i = 0; i < direction_size; i++) {
+                send_fy[num] = pdf2[index(x, y, z, i)];
+                num++;
+            }
+        }
+    }
+
+    MPI_Isend(send_fy, send_numy, MPI_DOUBLE_PRECISION, n_myid[2], 202, MPI_COMM_WORLD, &r1);
+    MPI_Irecv(recv_fy, send_numy, MPI_DOUBLE_PRECISION, n_myid[3], 202, MPI_COMM_WORLD, &r2);
+
+    MPI_Wait(&r1, &status);
+    MPI_Wait(&r2, &status);
+
+    y = -2;
+    num = 0;
+    for (int z = 0; z < NZ; z++) {
+        for (int x = -2; x < NX + 2; x++) {
+            for (int i = 0; i < direction_size; i++) {
+                pdf2[index(x, y, z, i)] = recv_fy[num];
+                num++;
+            }
+        }
+    }
+
+    y = 1;
+    num = 0;
+    for (int z = 0; z < NZ; z++) {
+        for (int x = -2; x < NX + 2; x++) {
+            for (int i = 0; i < direction_size; i++) {
+                send_fy[num] = pdf2[index(x, y, z, i)];
+                num++;
+            }
+        }
+    }
+    MPI_Isend(send_fy, send_numy, MPI_DOUBLE_PRECISION, n_myid[3], 203, MPI_COMM_WORLD, &r1);
+    MPI_Irecv(recv_fy, send_numy, MPI_DOUBLE_PRECISION, n_myid[2], 203, MPI_COMM_WORLD, &r2);
+
+    MPI_Wait(&r1, &status);
+    MPI_Wait(&r2, &status);
+
+    y = NY + 1;
+    num = 0;
+    for (int z = 0; z < NZ; z++) {
+        for (int x = -2; x < NX + 2; x++) {
+            for (int i = 0; i < direction_size; i++) {
+                pdf2[index(x, y, z, i)] = recv_fy[num];
+                num++;
+            }
+        }
+    }
+    delete[] send_fy;
+    delete[] recv_fy;
+    MPI_Barrier(MPI_COMM_WORLD);
+
+    //MPI��ֵ z����
+
+    if (direction_size != 9) {
+        int send_numz = (NX + 4) * (NY + 4) * direction_size;
+        double* send_fz = new double[send_numz] {};
+        double* recv_fz = new double[send_numz] {};
+
+        int z = NZ - 1;
+        num = 0;
+        for (int y = -2; y < NY + 2; y++) {
+            for (int x = -2; x < NX + 2; x++) {
+                for (int i = 0; i < direction_size; i++) {
+                    send_fz[num] = pdf2[index(x, y, z, i)];
+                    num++;
+                }
+            }
+        }
+
+        MPI_Isend(send_fz, send_numz, MPI_DOUBLE_PRECISION, n_myid[4], 204, MPI_COMM_WORLD, &r1);
+        MPI_Irecv(recv_fz, send_numz, MPI_DOUBLE_PRECISION, n_myid[5], 204, MPI_COMM_WORLD, &r2);
+
+        MPI_Wait(&r1, &status);
+        MPI_Wait(&r2, &status);
+
+        z = -1;
+        num = 0;
+        for (int y = -2; y < NY + 2; y++) {
+            for (int x = -2; x < NX + 2; x++) {
+                for (int i = 0; i < direction_size; i++) {
+                    pdf2[index(x, y, z, i)] = recv_fz[num];
+                    num++;
+                }
+            }
+        }
+
+        z = 0;
+        num = 0;
+        for (int y = -2; y < NY + 2; y++) {
+            for (int x = -2; x < NX + 2; x++) {
+                for (int i = 0; i < direction_size; i++) {
+                    send_fz[num] = pdf2[index(x, y, z, i)];
+                    num++;
+                }
+            }
+        }
+        MPI_Isend(send_fz, send_numz, MPI_DOUBLE_PRECISION, n_myid[5], 205, MPI_COMM_WORLD, &r1);
+        MPI_Irecv(recv_fz, send_numz, MPI_DOUBLE_PRECISION, n_myid[4], 205, MPI_COMM_WORLD, &r2);
+
+        MPI_Wait(&r1, &status);
+        MPI_Wait(&r2, &status);
+
+        z = NZ;
+        num = 0;
+        for (int y = -2; y < NY + 2; y++) {
+            for (int x = -2; x < NX + 2; x++) {
+                for (int i = 0; i < direction_size; i++) {
+                    pdf2[index(x, y, z, i)] = recv_fz[num];
+                    num++;
+                }
+            }
+        }
+
+        MPI_Barrier(MPI_COMM_WORLD);
+        //
+        z = NZ - 2;
+        num = 0;
+        for (int y = -2; y < NY + 2; y++) {
+            for (int x = -2; x < NX + 2; x++) {
+                for (int i = 0; i < direction_size; i++) {
+                    send_fz[num] = pdf2[index(x, y, z, i)];
+                    num++;
+                }
+            }
+        }
+
+        MPI_Isend(send_fz, send_numz, MPI_DOUBLE_PRECISION, n_myid[4], 204, MPI_COMM_WORLD, &r1);
+        MPI_Irecv(recv_fz, send_numz, MPI_DOUBLE_PRECISION, n_myid[5], 204, MPI_COMM_WORLD, &r2);
+
+        MPI_Wait(&r1, &status);
+        MPI_Wait(&r2, &status);
+
+        z = -2;
+        num = 0;
+        for (int y = -2; y < NY + 2; y++) {
+            for (int x = -2; x < NX + 2; x++) {
+                for (int i = 0; i < direction_size; i++) {
+                    pdf2[index(x, y, z, i)] = recv_fz[num];
+                    num++;
+                }
+            }
+        }
+
+        z = 1;
+        num = 0;
+        for (int y = -2; y < NY + 2; y++) {
+            for (int x = -2; x < NX + 2; x++) {
+                for (int i = 0; i < direction_size; i++) {
+                    send_fz[num] = pdf2[index(x, y, z, i)];
+                    num++;
+                }
+            }
+        }
+        MPI_Isend(send_fz, send_numz, MPI_DOUBLE_PRECISION, n_myid[5], 205, MPI_COMM_WORLD, &r1);
+        MPI_Irecv(recv_fz, send_numz, MPI_DOUBLE_PRECISION, n_myid[4], 205, MPI_COMM_WORLD, &r2);
+
+        MPI_Wait(&r1, &status);
+        MPI_Wait(&r2, &status);
+
+        z = NZ + 1;
+        num = 0;
+        for (int y = -2; y < NY + 2; y++) {
+            for (int x = -2; x < NX + 2; x++) {
+                for (int i = 0; i < direction_size; i++) {
+                    pdf2[index(x, y, z, i)] = recv_fz[num];
+                    num++;
+                }
+            }
+        }
+        delete[] send_fz;
+        delete[] recv_fz;
+        MPI_Barrier(MPI_COMM_WORLD);
+    }
+
+}
+
+void LBM::mpi_total(int mpi_rank) {
+    int send_num = NX * NZ * NY * 5 + 6;
+    int np = x_np * y_np * z_np;
+    int recv_num;
+    int num;
+    double* send_all{}, * recv_all{};
+    int* recv_Count{}, * displs{};;
+
+    if (mpi_rank == (np - 1)) {
+        recv_Count = new int[np] {};
+        displs = new int[np] {};
+    }
+
+    MPI_Gather(&send_num, 1, MPI_INT, recv_Count, 1, MPI_INT, np - 1, MPI_COMM_WORLD);
+
+    if (mpi_rank == (np - 1)) {
+        displs[0] = 0;
+        for (int i = 0; i < np - 1; i++) {
+            displs[i + 1] = displs[i] + recv_Count[i];
+        }
+        recv_num = displs[np - 1] + recv_Count[np - 1];
+    }
+
+    MPI_Barrier(MPI_COMM_WORLD);
+
+    send_all = new double[send_num] {};
+    num = 0;
+    for (int z = 0; z < NZ; z++) {
+        for (int y = 0; y < NY; y++) {
+            for (int x = 0; x < NX; x++) {
+                send_all[num] = vel[index(x, y, z)].x;
+                send_all[num + NX * NZ * NY] = vel[index(x, y, z)].y;
+                send_all[num + NX * NZ * NY * 2] = vel[index(x, y, z)].z;
+                send_all[num + NX * NZ * NY * 3] = rho[index(x, y, z)];
+                send_all[num + NX * NZ * NY * 4] = obst[index(x, y, z)];
+                num = num + 1;
+            }
+        }
+        send_all[NX * NZ * NY * 5 + 0] = static_cast<double>(Xori);
+        send_all[NX * NZ * NY * 5 + 1] = static_cast<double>(Yori);
+        send_all[NX * NZ * NY * 5 + 2] = static_cast<double>(Zori);
+        send_all[NX * NZ * NY * 5 + 3] = static_cast<double>(NX);
+        send_all[NX * NZ * NY * 5 + 4] = static_cast<double>(NY);
+        send_all[NX * NZ * NY * 5 + 5] = static_cast<double>(NZ);
+    }
+
+    if (mpi_rank == (np - 1)) {
+        recv_all = new double[recv_num] {};
+    }
+
+    MPI_Gatherv(send_all, send_num, MPI_DOUBLE, recv_all, recv_Count, displs, MPI_DOUBLE, np - 1, MPI_COMM_WORLD);
+
+    if (mpi_rank == (np - 1)) {
+        for (int i = 0; i < np; i++) {
+            int num_n = displs[i];
+            int num_m = recv_Count[i];
+            int x0, y0, z0;
+            int NX1, NY1, NZ1;
+            x0 = static_cast<int>(recv_all[num_n + num_m - 6]);
+            y0 = static_cast<int>(recv_all[num_n + num_m - 5]);
+            z0 = static_cast<int>(recv_all[num_n + num_m - 4]);
+            NX1 = static_cast<int>(recv_all[num_n + num_m - 3]);
+            NY1 = static_cast<int>(recv_all[num_n + num_m - 2]);
+            NZ1 = static_cast<int>(recv_all[num_n + num_m - 1]);
+            num = 0;
+            for (int z = 0; z < NZ1; z++) {
+                for (int y = 0; y < NY1; y++) {
+                    for (int x = 0; x < NX1; x++) {
+                        velTotal[total_index(x + x0, y + y0, z + z0)].x = recv_all[num_n + num];
+                        velTotal[total_index(x + x0, y + y0, z + z0)].y = recv_all[num_n + num + NX1 * NZ1 * NY1];
+                        velTotal[total_index(x + x0, y + y0, z + z0)].z = recv_all[num_n + num + NX1 * NZ1 * NY1 * 2];
+                        rhoTotal[total_index(x + x0, y + y0, z + z0)] = recv_all[num_n + num + NX1 * NZ1 * NY1 * 3];
+                        obstTotal[total_index(x + x0, y + y0, z + z0)] = static_cast<int>(recv_all[num_n + num + NX1 * NZ1 * NY1 * 4]);
+                        num = num + 1;
+                    }
+                }
+            }
+        }
+        delete[]recv_all;
+        delete[]recv_Count;
+        delete[]displs;
+        if (CONV == 1) {
+            check_converge();
+        }
+    }
+    delete[]send_all;
+    MPI_Barrier(MPI_COMM_WORLD);
+}
+
diff --git a/CFD/LBMSolverMPI/src/lbmMRT.cpp b/CFD/LBMSolverMPI/src/lbmMRT.cpp
new file mode 100644
index 0000000..f7de3d0
--- /dev/null
+++ b/CFD/LBMSolverMPI/src/lbmMRT.cpp
@@ -0,0 +1,233 @@
+#include "LBMSolverMPI.hpp"
+
+inline int indexM(int x, int y, int NX) {
+    return  (y * NX) + x;
+}
+
+void LBM::iniMRT()
+{
+    double* Mtemp2 = new double[direction_size * direction_size];
+    double* F_diag2 = new double[direction_size];
+
+    if (velocity_set == "D2Q9") {
+        double Mtemp[9][9] = {
+            {	1.,  1., 1., 1.,  1., 1., 1., 1., 1.}, //!M11, M12, M13, M14, M15, ...
+            {  -4., -1.,-1.,-1., -1., 2., 2., 2., 2.},
+            {   4., -2.,-2.,-2., -2., 1., 1., 1., 1.},
+            {   0.,  1., 0.,-1.,  0., 1.,-1.,-1., 1.},
+            {   0., -2., 0., 2.,  0., 1.,-1.,-1., 1.},
+            {   0.,  0., 1., 0., -1., 1., 1.,-1.,-1.},
+            {   0.,  0.,-2., 0.,  2., 1., 1.,-1.,-1.},
+            {   0.,  1.,-1., 1., -1., 0., 0., 0., 0.},
+            {   0.,  0., 0., 0.,  0., 1.,-1., 1.,-1.}
+        };
+        double F_diag[9] = { 9.0, 36.0,36.0,6.0,12.0,6.0,12.0,4.0,4.0 };
+        for (int i = 0; i < direction_size; i++) {
+            F_diag2[i] = F_diag[i];
+            for (int j = 0; j < direction_size; j++) {
+                Mtemp2[indexM(i, j, direction_size)] = Mtemp[i][j];
+            }
+        }
+    }
+    else if (velocity_set == "D3Q15") {
+        double Mtemp[15][15] = {
+            //{  0   1   2   3   4   5   6   7   8   9  10  11  12  13  14 },
+               { 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1},
+               {-2 ,-1, -1 ,-1 ,-1 ,-1 ,-1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1},
+               {16 ,-4, -4 ,-4 ,-4 ,-4 ,-4 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1},
+               { 0 , 1 ,-1 , 0 , 0 , 0 , 0 , 1 ,-1 , 1 ,-1 , 1 ,-1 , 1 ,-1},
+               { 0 ,-4 , 4 , 0 , 0 , 0 , 0 , 1 ,-1 , 1 ,-1 , 1 ,-1 , 1 ,-1},
+               { 0 , 0 , 0 , 1 ,-1 , 0 , 0 , 1 , 1 ,-1 ,-1 , 1 , 1 ,-1 ,-1},
+               { 0 , 0 , 0 ,-4 , 4 , 0 , 0 , 1 , 1 ,-1 ,-1 , 1 , 1 ,-1 ,-1},
+               { 0 , 0 , 0 , 0 , 0 , 1 ,-1 , 1 , 1 , 1 , 1 ,-1 ,-1 ,-1 ,-1},
+               { 0 , 0 , 0 , 0 , 0 ,-4 , 4 , 1 , 1 , 1 , 1 ,-1 ,-1 ,-1 ,-1},
+               { 0 , 2 , 2 ,-1 ,-1 ,-1 ,-1 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0},
+               { 0 , 0 , 0 , 1 , 1 ,-1 ,-1 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0},
+               { 0 , 0 , 0 , 0 , 0 , 0 , 0 , 1 ,-1 ,-1 , 1 , 1 ,-1 ,-1 , 1},
+               { 0 , 0 , 0 , 0 , 0 , 0 , 0 , 1 , 1 ,-1 ,-1 ,-1 ,-1 , 1 , 1},
+               { 0 , 0 , 0 , 0 , 0 , 0 , 0 , 1 ,-1 , 1 ,-1 ,-1 , 1 ,-1 , 1},
+               { 0 , 0 , 0 , 0 , 0 , 0 , 0 , 1 ,-1 ,-1 , 1 ,-1 , 1 , 1 ,-1}
+        };
+        double F_diag[15] = { 15.,18.,360.,10.,40.,10.,40.,10.,40.,12.,4.,8.,8.,8.,8. };
+        for (int i = 0; i < direction_size; i++) {
+            F_diag2[i] = F_diag[i];
+            for (int j = 0; j < direction_size; j++) {
+                Mtemp2[indexM(i, j, direction_size)] = Mtemp[i][j];
+            }
+        }
+
+    }
+    else if (velocity_set == "D3Q19") {
+        double Mtemp[19][19] = {
+            //{  0   1   2   3   4   5   6  7   8  9 10 11 12 13 14 15 16 17 18},
+              {  1,  1,  1,  1,  1,  1,  1, 1,  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1},
+              {-30,-11,-11,-11,-11,-11,-11, 8,  8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8},
+              { 12, -4, -4, -4, -4, -4, -4, 1,  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1},
+              {  0,  1, -1,  0,  0,  0,  0, 1,  1,-1,-1, 1,-1, 1,-1, 0, 0, 0, 0},//ex
+              {  0, -4,  4,  0,  0,  0,  0, 1,  1,-1,-1, 1,-1, 1,-1, 0, 0, 0, 0},
+              {  0,  0,  0,  1, -1,  0,  0, 1, -1, 1,-1, 0, 0, 0, 0, 1, 1,-1,-1},//ey
+              {  0,  0,  0, -4,  4,  0,  0, 1, -1, 1,-1, 0, 0, 0, 0, 1, 1,-1,-1},
+              {  0,  0,  0,  0,  0,  1, -1, 0,  0, 0, 0, 1, 1,-1,-1, 1,-1, 1,-1},//ez
+              {  0,  0,  0,  0,  0, -4,  4, 0,  0, 0, 0, 1, 1,-1,-1, 1,-1, 1,-1},
+              {  0,  2,  2, -1, -1, -1, -1, 1,  1, 1, 1, 1, 1, 1, 1,-2,-2,-2,-2},
+              {  0, -4, -4,  2,  2,  2,  2, 1,  1, 1, 1, 1, 1, 1, 1,-2,-2,-2,-2},
+              {  0,  0,  0,  1,  1, -1, -1, 1,  1, 1, 1,-1,-1,-1,-1, 0, 0, 0, 0},
+              {  0,  0,  0, -2, -2,  2,  2, 1,  1, 1, 1,-1,-1,-1,-1, 0, 0, 0, 0},
+              {  0,  0,  0,  0,  0,  0,  0, 1, -1,-1, 1, 0, 0, 0, 0, 0, 0, 0, 0},
+              {  0,  0,  0,  0,  0,  0,  0, 0,  0, 0, 0, 0, 0, 0, 0, 1,-1,-1, 1},
+              {  0,  0,  0,  0,  0,  0,  0, 0,  0, 0, 0, 1,-1,-1, 1, 0, 0, 0, 0},
+              {  0,  0,  0,  0,  0,  0,  0, 1,  1,-1,-1,-1, 1,-1, 1, 0, 0, 0, 0},
+              {  0,  0,  0,  0,  0,  0,  0,-1,  1,-1, 1, 0, 0, 0, 0, 1, 1,-1,-1},
+              {  0,  0,  0,  0,  0,  0,  0, 0,  0, 0, 0, 1, 1,-1,-1,-1, 1,-1, 1}
+        };
+
+        double F_diag[19] = { 19.0,2394.0,252.0,10.0,40.0,10.0,40.0,10.0,40.0,36.0,72.0,12.0,24.0,4.0,4.0,4.0,8.0,8.0,8.0 };
+        for (int i = 0; i < direction_size; i++) {
+            F_diag2[i] = F_diag[i];
+            for (int j = 0; j < direction_size; j++) {
+                Mtemp2[indexM(i, j, direction_size)] = Mtemp[i][j];
+            }
+        }
+    }
+
+    else if (velocity_set == "D3Q27") { //A D3Q27 multiple-relaxation-time lattice Boltzmann method for turbulent flows
+        double Mtemp[27][27] = {
+            {1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1},
+            {0,1,0,-1,0,0,0,1,-1,-1,1,1,0,-1,0,1,0,-1,0,1,-1,-1,1,1,-1,-1,1},//ex
+            {0,0,1,0,-1,0,0,1,1,-1,-1,0,1,0,-1,0,1,0,-1,1,1,-1,-1,1,1,-1,-1},//ey
+            {0,0,0,0,0,1,-1,0,0,0,0,1,1,1,1,-1,-1,-1,-1,1,1,1,1,-1,-1,-1,-1},//ez
+            {-2,-1,-1,-1,-1,-1,-1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1},
+            {0,2,-1,2,-1,-1,-1,1,1,1,1,1,-2,1,-2,1,-2,1,-2,0,0,0,0,0,0,0,0},
+            {0,0,1,0,1,-1,-1,1,1,1,1,-1,0,-1,0,-1,0,-1,0,0,0,0,0,0,0,0,0},
+            {0,0,0,0,0,0,0,1,-1,1,-1,0,0,0,0,0,0,0,0,1,-1,1,-1,1,-1,1,-1},
+            {0,0,0,0,0,0,0,0,0,0,0,0,1,0,-1,0,-1,0,1,1,1,-1,-1,-1,-1,1,1},
+            {0,0,0,0,0,0,0,0,0,0,0,1,0,-1,0,-1,0,1,0,1,-1,-1,1,-1,1,1,-1},
+            {0,-4,0,4,0,0,0,-1,1,1,-1,-1,0,1,0,-1,0,1,0,2,-2,-2,2,2,-2,-2,2},
+            {0,0,-4,0,4,0,0,-1,-1,1,1,0,-1,0,1,0,-1,0,1,2,2,-2,-2,2,2,-2,-2},
+            {0,0,0,0,0,-4,4,0,0,0,0,-1,-1,-1,-1,1,1,1,1,2,2,2,2,-2,-2,-2,-2},
+            {0,4,0,-4,0,0,0,-2,2,2,-2,-2,0,2,0,-2,0,2,0,1,-1,-1,1,1,-1,-1,1},
+            {0,0,4,0,-4,0,0,-2,-2,2,2,0,-2,0,2,0,-2,0,2,1,1,-1,-1,1,1,-1,-1},
+            {0,0,0,0,0,4,-4,0,0,0,0,-2,-2,-2,-2,2,2,2,2,1,1,1,1,-1,-1,-1,-1},
+            {4,0,0,0,0,0,0,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,1,1,1,1,1,1,1,1},
+            {-8,4,4,4,4,4,4,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,1,1,1,1,1,1,1,1},
+            {0,-4,2,-4,2,2,2,1,1,1,1,1,-2,1,-2,1,-2,1,-2,0,0,0,0,0,0,0,0},
+            {0,0,-2,0,-2,2,2,1,1,1,1,-1,0,-1,0,-1,0,-1,0,0,0,0,0,0,0,0,0},
+            {0,0,0,0,0,0,0,-2,2,-2,2,0,0,0,0,0,0,0,0,1,-1,1,-1,1,-1,1,-1},
+            {0,0,0,0,0,0,0,0,0,0,0,0,-2,0,2,0,2,0,-2,1,1,-1,-1,-1,-1,1,1},
+            {0,0,0,0,0,0,0,0,0,0,0,-2,0,2,0,2,0,-2,0,1,-1,-1,1,-1,1,1,-1},
+            {0,0,0,0,0,0,0,1,-1,-1,1,-1,0,1,0,-1,0,1,0,0,0,0,0,0,0,0,0},
+            {0,0,0,0,0,0,0,-1,-1,1,1,0,1,0,-1,0,1,0,-1,0,0,0,0,0,0,0,0},
+            {0,0,0,0,0,0,0,0,0,0,0,1,-1,1,-1,-1,1,-1,1,0,0,0,0,0,0,0,0},
+            {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,-1,1,-1,-1,1,-1,1}
+        };
+
+        double F_diag[27] = { 27.,18.,18,18,18,36,12,12,12,12,72,72,72,72,72,72,36,216,72,24,24,24,24,8,8,8,8 };
+        for (int i = 0; i < direction_size; i++) {
+            F_diag2[i] = F_diag[i];
+            for (int j = 0; j < direction_size; j++) {
+                Mtemp2[indexM(i, j, direction_size)] = Mtemp[i][j];
+            }
+        }
+
+    }
+    M_MRT = new double* [direction_size];
+    M_MRTI = new double* [direction_size];
+    MSM = new double* [direction_size];
+    for (int i = 0; i < direction_size; i++)
+    {
+        M_MRT[i] = new double[direction_size];
+        M_MRTI[i] = new double[direction_size];
+        MSM[i] = new double[direction_size];
+        for (int j = 0; j < direction_size; j++)
+        {
+
+            M_MRT[i][j] = Mtemp2[indexM(i, j, direction_size)];
+
+        }
+    }
+    for (int j = 0; j < direction_size; j++)
+    {
+        for (int i = 0; i < direction_size; i++)
+        {
+            M_MRTI[j][i] = M_MRT[i][j] / F_diag2[i];
+        }
+    }
+    calculate_MSM(tau);
+}
+
+void LBM::calculate_MSM(double tau)
+{
+    double* Inv_MS = new double[direction_size * direction_size];
+    double* S_diag2 = new double[direction_size];
+
+    if (velocity_set == "D2Q9")
+    {
+        double S_diag[9] = { 1.64, 1.64, 1.54, 1.6, 1.9, 1.6, 1.9, 1., 1. };// !s0, ...s8, s8 = s7, s2 = 1.54, s4 = s6 = 1.9
+        S_diag[7] = 1.0 / tau;
+        S_diag[8] = S_diag[7];
+        for (int i = 0; i < direction_size; i++) {
+            S_diag2[i] = S_diag[i];
+        }
+
+    }
+    else if (velocity_set == "D3Q15")
+    {
+        double S_diag[15] = { 0.0, 1.6,1.2,0.0,1.6,0.0,1.6,0.0,1.6, 1.0,1.0,1.0,1.0,1.0,1.2 };
+        S_diag[9] = 1.0 / tau;
+        S_diag[10] = S_diag[9];
+        S_diag[11] = S_diag[9];
+        S_diag[12] = S_diag[9];
+        S_diag[13] = S_diag[9];
+        for (int i = 0; i < direction_size; i++) {
+            S_diag2[i] = S_diag[i];
+        }
+    }
+    else if (velocity_set == "D3Q19")
+    {
+        double S_diag[19] = { 0.0, 1.19,1.4,0.0,1.2,0.0,1.2,0.0,1.2,1.0,1.4,1.0,1.4,1.0,1.0,1.0,1.98,1.98,1.98 };
+        S_diag[9] = 1.0 / tau;
+        S_diag[11] = S_diag[9];
+        S_diag[13] = S_diag[9];
+        S_diag[14] = S_diag[9];
+        S_diag[15] = S_diag[9];
+        for (int i = 0; i < direction_size; i++) {
+            S_diag2[i] = S_diag[i];
+        }
+    }
+    else if (velocity_set == "D3Q27")
+    {
+        double s4, s5, s7, s10, s13, s16, s17, s18, s20, s23, s26;
+        s5 = 1.0 / tau;
+        s7 = 1.0 / tau;
+        s4 = 1.54; s10 = 1.5; s13 = 1.83; s16 = 1.4; s17 = 1.61;
+        s18 = s20 = 1.98; s23 = s26 = 1.74;
+        double S_diag[27] = { 0, 0, 0, 0, s4, s5, s5, s7, s7, s7, s10, s10, s10, s13, s13, s13, s16, s17, s18, s18, s20, s20, s20, s23, s23, s23, s26 };
+
+        for (int i = 0; i < direction_size; i++) {
+            S_diag2[i] = S_diag[i];
+        }
+    }
+
+
+
+    for (int i = 0; i < direction_size; i++)
+    {
+        for (int j = 0; j < direction_size; j++)
+        {
+            Inv_MS[indexM(i, j, direction_size)] = -M_MRTI[i][j] * S_diag2[j];
+        }
+    }
+    for (int j = 0; j < direction_size; j++)
+    {
+        for (int i = 0; i < direction_size; i++)
+        {
+            MSM[i][j] = 0.0;
+            for (int k = 0; k < direction_size; k++)
+            {
+                MSM[i][j] = MSM[i][j] + Inv_MS[indexM(i, k, direction_size)] * M_MRT[k][j];
+            }
+        }
+    }
+    delete[] Inv_MS;
+    delete[] S_diag2;
+}
\ No newline at end of file
diff --git a/CFD/LBMSolverMPI/src/lbmSolver.cpp b/CFD/LBMSolverMPI/src/lbmSolver.cpp
new file mode 100644
index 0000000..8b9eb49
--- /dev/null
+++ b/CFD/LBMSolverMPI/src/lbmSolver.cpp
@@ -0,0 +1,847 @@
+#include "LBMSolverMPI.hpp"
+#include "vector3.cpp"
+#include <iomanip>
+#include <iostream>
+#include <cmath>
+#include <mpi.h>
+using namespace std;
+
+LBM::LBM()
+{
+
+}
+
+LBM::~LBM()
+{
+    delete[] rho;
+    delete[] pdf;
+    delete[] pdf2;
+    delete[] n_myid;
+    delete[] obst;
+    delete[] vel;
+    delete[] weights;
+    delete[] reverse_indexes;
+    delete[] ei;
+    if (iMRT == 1) {
+        delete[] M_MRT;
+        delete[] M_MRTI;
+        delete[] MSM;
+    }
+    if (iGEO == 1) {
+        delete[] force;
+        delete[] node2;
+        delete[] delta;
+    }
+}
+
+void LBM::ReadParameter(Params_Pakage* p, int mpi_rank)
+{
+    char buffer[256];
+    std::string A;  //�ַ���
+    char conti_f[20], geo_f[20];
+    vector3<double> aa;
+    double rho_specified;
+    ifstream infile(p->in);   //�����ļ�
+    ofstream outfile(p->out);  //����ļ�	
+
+    if (!infile) {
+        cout << "Unable to open input file";
+        exit(1); // terminate with error
+
+    }
+    if (!outfile) {
+        cout << "Unable to open output file";
+        exit(1); // terminate with error
+
+    }
+    //	sscanf_s(tokenstring, "%s", s, _countof(s));
+    //	sscanf_s(tokenstring, "%c", &c, sizeof(char));ggggg
+    while (!infile.eof()) //���ж�������� ���ļ�������Ϊ��־�����ļ������һ�пհ��л�һ��δԤ�����ݣ��������ܻ�������
+    {
+        infile.getline(buffer, 100);  //�����־�Ƿ����㣬��Ϊ1����Ϊ0������������������������ļ���
+        sscanf_s(buffer, "%d", &this->iMRT);
+        infile.getline(buffer, 120);  //�����־�Ƿ����㣬��Ϊ1����Ϊ0������������������������ļ���
+        sscanf_s(buffer, "%d", &this->iContinue);
+        if (this->iContinue == 1) {
+            sscanf_s(buffer, "%d %s", &this->iContinue, &conti_f, (unsigned int)sizeof(conti_f));
+            conti_file = conti_f;
+        }
+        infile.getline(buffer, 100);  //�����־�Ƿ����ģ�⣬��Ϊ1����Ϊ0
+        sscanf_s(buffer, "%d", &this->iLES);
+        infile.getline(buffer, 120);  //�����־�Ƿ���Ҫ���븴���������壬��Ϊ1����Ϊ0����Ҫ���������ͼ��tecplot�����ļ���
+        sscanf_s(buffer, "%d", &this->iGEO);
+        if (this->iGEO == 1) {
+            sscanf_s(buffer, "%d %s", &this->iGEO, &geo_f, (unsigned int)sizeof(geo_f));
+            geo_file = geo_f;
+        }
+        infile.getline(buffer, 100);  //�����־�Ƿ���������Ϊ1����Ϊ0
+        sscanf_s(buffer, "%d", &this->FINE);
+        infile.getline(buffer, 100);  //�����־�Ƿ���Ҫ�����оݣ���Ϊ1����Ϊ0������Ҫ���������������ֵ
+        sscanf_s(buffer, "%d", &this->CONV);
+        if (this->CONV == 1) sscanf_s(buffer, "%d %lf", &this->CONV, &this->conv_v);
+
+        infile.getline(buffer, 60);  //��������� X ����������
+        sscanf_s(buffer, "%d", &this->total_NX);
+        infile.getline(buffer, 60);  //������ Y ����������
+        sscanf_s(buffer, "%d", &this->total_NY);
+        infile.getline(buffer, 60);  //������ Z ����������
+        sscanf_s(buffer, "%d", &this->total_NZ);
+
+        infile.getline(buffer, 60);  //���������� X ����������
+        sscanf_s(buffer, "%d", &this->fine_NX);
+        infile.getline(buffer, 60);  // ������Y ����������
+        sscanf_s(buffer, "%d", &this->fine_NY);
+        infile.getline(buffer, 60);  //������ Z ����������
+        sscanf_s(buffer, "%d", &this->fine_NZ);
+        infile.getline(buffer, 60);  //������ԭ������
+        sscanf_s(buffer, "%d", &this->LefLowx);
+        infile.getline(buffer, 60);
+        sscanf_s(buffer, "%d", &this->LefLowy);
+        infile.getline(buffer, 60);
+        sscanf_s(buffer, "%d", &this->LefLowz);
+
+        infile.getline(buffer, 60);  //������ X �������
+        sscanf_s(buffer, "%d", &this->x_np);
+        infile.getline(buffer, 60);  //������ Y �������
+        sscanf_s(buffer, "%d", &this->y_np);
+        infile.getline(buffer, 60);  //������ Z �������
+        sscanf_s(buffer, "%d", &this->z_np);
+
+        infile.getline(buffer, 60);  //ÿ�����ٲ����һ���ļ�
+        sscanf_s(buffer, "%d", &this->FrameRate);
+        infile.getline(buffer, 60);  //�ܹ����ٲ���ֹ����
+        sscanf_s(buffer, "%d", &this->ttstep);
+        infile.getline(buffer, 60);  //��ʼ�ܶ�
+        sscanf_s(buffer, "%lf", &this->density0);
+        infile.getline(buffer, 60);  //�ɳ����ӣ����˶�ճ�Թ�ϵ:\nu=c_s^2*(\tau-0.5)\delta t
+        sscanf_s(buffer, "%lf", &this->tau);
+        infile.getline(buffer, 100);//�����
+        sscanf_s(buffer, "(%lf, %lf, %lf)", &this->gx, &this->gy, &this->gz);
+        infile.getline(buffer, 60);  //LBM�ٶ�ģ��
+        sscanf_s(buffer, "%s", &p->velocity_set, (unsigned int)sizeof(p->velocity_set));
+        this->velocity_set = p->velocity_set;
+        //�ַ�����ȡʱ��Ĭ���Կո�ָ�
+        infile.getline(buffer, 60);  //�߽���������
+        sscanf_s(buffer, "%s", &p->bc, (unsigned int)sizeof(p->bc));
+        this->boundary_condition = p->bc;
+        infile.getline(buffer, 256);  //�ļ��е�˵���У���ȡ��Ϣ��������
+        infile.getline(buffer, 256);  //�ļ��е�˵���У���ȡ��Ϣ��������
+        infile.getline(buffer, 100);
+        sscanf_s(buffer, "%s", &this->BC.xminFace, (unsigned int)sizeof(this->BC.xminFace));
+        A = this->BC.xminFace;
+        if (A == "velocity") {
+            sscanf_s(buffer, "velocity (%lf, %lf, %lf)", &aa.x, &aa.y, &aa.z);
+            this->BC.vel_specified[0] = aa;
+        }
+        if (A == "pressure") {
+            sscanf_s(buffer, "pressure %lf", &rho_specified);
+            this->BC.rho_specified[0] = rho_specified;
+        }
+
+        infile.getline(buffer, 100);
+        sscanf_s(buffer, "%s", &this->BC.xmaxFace, (unsigned int)sizeof(this->BC.xmaxFace));
+        A = this->BC.xmaxFace;
+        if (A == "velocity") {
+            sscanf_s(buffer, "velocity (%lf, %lf, %lf)", &aa.x, &aa.y, &aa.z);
+            this->BC.vel_specified[1] = aa;
+        }
+        if (A == "pressure") {
+            sscanf_s(buffer, "pressure %lf", &rho_specified);
+            this->BC.rho_specified[1] = rho_specified;
+        }
+
+        infile.getline(buffer, 100);
+        sscanf_s(buffer, "%s", &this->BC.yminFace, (unsigned int)sizeof(this->BC.yminFace));
+        A = this->BC.yminFace;
+        if (A == "velocity") {
+            sscanf_s(buffer, "velocity (%lf, %lf, %lf)", &aa.x, &aa.y, &aa.z);
+            this->BC.vel_specified[2] = aa;
+        }
+        if (A == "pressure") {
+            sscanf_s(buffer, "pressure %lf", &rho_specified);
+            this->BC.rho_specified[2] = rho_specified;
+        }
+
+        infile.getline(buffer, 256);
+        sscanf_s(buffer, "%s", &this->BC.ymaxFace, (unsigned int)sizeof(this->BC.ymaxFace));
+        A = this->BC.ymaxFace;
+        if (A == "velocity") {
+            sscanf_s(buffer, "velocity (%lf, %lf, %lf)", &aa.x, &aa.y, &aa.z);
+            this->BC.vel_specified[3] = aa;
+        }
+        if (A == "pressure") {
+            sscanf_s(buffer, "pressure %lf", &rho_specified);
+            this->BC.rho_specified[3] = rho_specified;
+        }
+
+        infile.getline(buffer, 100);
+        sscanf_s(buffer, "%s", &this->BC.zminFace, (unsigned int)sizeof(this->BC.zminFace));
+        A = this->BC.zminFace;
+        if (A == "velocity") {
+            sscanf_s(buffer, "velocity (%lf, %lf, %lf)", &aa.x, &aa.y, &aa.z);
+            this->BC.vel_specified[4] = aa;
+        }
+        if (A == "pressure") {
+            sscanf_s(buffer, "pressure %lf", &rho_specified);
+            this->BC.rho_specified[4] = rho_specified;
+        }
+
+        infile.getline(buffer, 100);
+        sscanf_s(buffer, "%s", &this->BC.zmaxFace, (unsigned int)sizeof(this->BC.zmaxFace));
+        A = this->BC.zmaxFace;
+        if (A == "velocity") {
+            sscanf_s(buffer, "velocity (%lf, %lf, %lf)", &aa.x, &aa.y, &aa.z);
+            this->BC.vel_specified[5] = aa;
+        }
+        if (A == "pressure") {
+            sscanf_s(buffer, "pressure %lf", &rho_specified);
+            this->BC.rho_specified[5] = rho_specified;
+        }
+        infile.getline(buffer, 100);//��һ��
+        infile.getline(buffer, 100);
+        sscanf_s(buffer, "(%lf, %lf, %lf)", &vel0.x, &vel0.y, &vel0.z);
+
+        if (mpi_rank == 0) {
+            cout << "Computational domain size:   " << total_NX << "  " << total_NY << "   " << total_NZ << endl;
+            cout << "number of timesteps per frame: " << FrameRate << endl;
+            cout << "The velocity model used:   " << velocity_set << endl;
+            cout << "Tau: " << tau << '\n';
+            cout << "G: (" << gx <<","<< gy <<"," << gz <<")" << '\n';
+            cout << boundary_condition << '\n' << endl;
+            //�������
+            if (tau < 0.5) {
+                std::cout << "Error: Tau must be greater than 0.5 for numerical stability." << '\n';
+                exit(1);
+            }
+            if (velocity_set != "D3Q15" && velocity_set != "D3Q19" && velocity_set != "D3Q27" && velocity_set != "D2Q9") {
+                std::cout << "Error: Please specify a valid velocity set such as D3Q15,D3Q27,D3Q19 or D2Q9." << '\n';
+                exit(1);
+            }
+            if (total_NZ != 1 && velocity_set == "D2Q9") {
+                std::cout << "Warning: NZ=1 for D2Q9.";
+                exit(1);
+            }
+        }
+    }
+
+    infile.close();
+
+    //�����ͬʱ������ϲ�������һ�ļ�������֤��ȡ����ȷ��
+    outfile << "MRT:" << "   " << iMRT << endl;
+    outfile << "CONTI:" << "   " << iContinue << endl;
+    outfile << "LES:" << "   " << iLES << endl;
+    outfile << "GEO:" << "   " << iGEO << endl;
+    outfile << "MB:" << "   " << FINE << endl;
+    outfile << "total_NX:" << "   " << total_NX << endl;
+    outfile << "total_NY:" << "   " << total_NY << endl;
+    outfile << "total_NZ:" << "   " << total_NZ << endl;
+    outfile << "fine_NX:" << "   " << fine_NX << endl;
+    outfile << "fine_NY:" << "   " << fine_NY << endl;
+    outfile << "fine_NZ:" << "   " << fine_NZ << endl;
+    outfile << "LefLowx:" << "   " << LefLowx << endl;
+    outfile << "LefLowy:" << "   " << LefLowy << endl;
+    outfile << "LefLowz:" << "   " << LefLowz << endl;
+    outfile << "x_np:" << "   " << x_np << endl;
+    outfile << "y_np:" << "   " << y_np << endl;
+    outfile << "z_np:" << "   " << z_np << endl;
+    outfile << "FrameRate:" << "   " << FrameRate << endl;
+    outfile << "Total steps:" << " " << ttstep << endl;
+    outfile << "LBM.initial density:" << " " << density0 << endl;
+    outfile << "LBM.tau:" << " " << tau << endl;
+    outfile << "LBM.gx:" << " " << gx << endl;
+    outfile << "LBM.gy:" << " " << gy << endl;
+    outfile << "LBM.gz:" << " " << gz << endl;
+    outfile << "velocity model:" << " " << velocity_set << endl;
+    outfile << "Boundary condition type:" << " " << boundary_condition << endl;
+    outfile << "xmin Face BC:  " << " " << BC.xminFace << endl;
+    outfile << "xmax Face BC:  " << " " << BC.xmaxFace << endl;
+    outfile << "ymin Face BC:  " << " " << BC.yminFace << endl;
+    outfile << "ymax Face BC:  " << " " << BC.ymaxFace << endl;
+    outfile << "zmin Face BC:  " << " " << BC.zminFace << endl;
+    outfile << "zmax Face BC:  " << " " << BC.zmaxFace << endl;
+    outfile << "initial vel  " << " " << vel0.x << " " << vel0.y << " " << vel0.z << endl;
+    outfile.close();
+};
+
+int LBM::initialise(Params_Pakage* p, int mpi_rank)
+{
+    ReadParameter(p, mpi_rank);
+    mpi_ini(mpi_rank);
+
+    set_velocity_set();
+    iniFlow();
+
+    if (iMRT == 1) {
+        iniMRT();
+    }
+
+    if (iGEO == 1) {
+        read_Geo(geo_file, mpi_rank);
+    }
+
+    iniobst();
+    
+    if (iContinue == 1) {
+        read_all(conti_file);
+    }
+    else {
+        //cout << "Loaded default initial conditions" << endl;
+        double density = { 1 }, u_x = vel0.x, u_y = vel0.y, u_z = vel0.z; //ȱʡ��ʼ��
+        density = density0;
+        for (int i = 0; i < NX; i++) {
+            for (int j = 0; j < NY; j++) {
+                for (int k = 0; k < NZ; k++) {
+                    set_density(i, j, k, density);
+                    set_velocity(i, j, k, u_x, u_y, u_z);
+                }
+            }
+        }
+        //		std::cout << "If you wish to use your own initial conditions, please run the program but with command: generate_ic as a argument which will output ic.csv in format of p,u_x,u_y,u_z, assume indexes are incrementing i,j,k for i<NX,j<NY and k<NZ" << '\n';
+
+    }
+
+    //cout << "Kinematic shear viscosity: " << viscosity << '\n';
+
+    //cout << "For velocity set D2Q9,D3Q15,D3Q19 and D3Q27, |u_max|<0.577\n";
+    //output_tecplot("output/rank" + std::to_string(mpi_rank) + "_" + "0.plt");
+    
+    if (mpi_rank == 0) {
+        string command;
+        command = "mkdir output";
+        system(command.c_str());
+    }
+    return 0;
+
+}
+
+void LBM::iniFlow() {
+    int NumNodes = (NX + 4) * (NY + 4) * (NZ + 4);
+    int distributions_memo_size = NumNodes * direction_size;
+    rho = new double[NumNodes];
+    obst = new int[NumNodes];
+    vel = new vector3<double>[NumNodes];
+    pdf2 = new double[distributions_memo_size];
+    pdf = new double[distributions_memo_size];
+    for (int i = 0; i < NumNodes; i++) {
+        rho[i] = 1.0;
+        obst[i] = 0;
+    }
+    for (int x = -2; x < NX + 2; x++) {
+        for (int y = -2; y < NY + 2; y++) {
+            for (int z = -2; z < NZ + 2; z++) {
+                for (int i = 0; i < direction_size; i++) {
+                    pdf2[index(x, y, z, i)] = weights[i];
+                    pdf[index(x, y, z, i)] = weights[i];
+                }
+            }
+        }
+    }
+
+}
+
+void LBM::iniobst()
+{
+    //  ��ʼ��obst
+    string Astring;
+    if (x_id == 0) {
+        int x = 0;
+        Astring = BC.xminFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ�׼��
+        if (Astring == "nonslip") {
+            for (int y = 0; y < NY; y++) {
+                for (int z = 0; z < NZ; z++) {
+                    obst[index(x, y, z)] = 3;
+                }
+            }
+        }
+        else if (Astring == "velocity") {
+            for (int y = 0; y < NY; y++) {
+                for (int z = 0; z < NZ; z++) {
+                    obst[index(x, y, z)] = -1;
+                }
+            }
+        }
+        else if (Astring == "pressure") {
+            for (int y = 0; y < NY; y++) {
+                for (int z = 0; z < NZ; z++) {
+                    obst[index(x, y, z)] = -2;
+                }
+            }
+        }
+    }
+
+    if (x_id == x_np - 1) {
+        int x = NX - 1;
+        Astring = BC.xmaxFace;
+        if (Astring == "nonslip") {
+            for (int y = 0; y < NY; y++) {
+                for (int z = 0; z < NZ; z++) {
+                    obst[index(x, y, z)] = 3;
+                }
+            }
+        }
+        else if (Astring == "velocity") {
+            for (int y = 0; y < NY; y++) {
+                for (int z = 0; z < NZ; z++) {
+                    obst[index(x, y, z)] = -1;
+                }
+            }
+        }
+        else if (Astring == "pressure") {
+            for (int y = 0; y < NY; y++) {
+                for (int z = 0; z < NZ; z++) {
+                    obst[index(x, y, z)] = -2;
+                }
+            }
+        }
+    }
+
+    if (y_id == 0) {
+        int y = 0;
+        Astring = BC.yminFace;
+        if (Astring == "nonslip") {
+            for (int x = 0; x < NX; x++) {
+                for (int z = 0; z < NZ; z++) {
+                    obst[index(x, y, z)] = 3;
+                }
+            }
+        }
+        else if (Astring == "velocity") {
+            for (int x = 0; x < NX; x++) {
+                for (int z = 0; z < NZ; z++) {
+                    obst[index(x, y, z)] = -1;
+                }
+            }
+        }
+        else if (Astring == "pressure") {
+            for (int x = 0; x < NX; x++) {
+                for (int z = 0; z < NZ; z++) {
+                    obst[index(x, y, z)] = -2;
+                }
+            }
+        }
+    }
+
+    if (y_id == y_np - 1) {
+        int y = NY - 1;
+        Astring = BC.ymaxFace;
+        if (Astring == "nonslip") {
+            for (int x = 0; x < NX; x++) {
+                for (int z = 0; z < NZ; z++) {
+                    obst[index(x, y, z)] = 3;
+                }
+            }
+        }
+        else if (Astring == "velocity") {
+            for (int x = 0; x < NX; x++) {
+                for (int z = 0; z < NZ; z++) {
+                    obst[index(x, y, z)] = -1;
+                }
+            }
+        }
+        else if (Astring == "pressure") {
+            for (int x = 0; x < NX; x++) {
+                for (int z = 0; z < NZ; z++) {
+                    obst[index(x, y, z)] = -2;
+                }
+            }
+        }
+    }
+
+    if (z_id == 0) {
+        int z = 0;
+        Astring = BC.zminFace;
+        if (Astring == "nonslip") {
+            for (int x = 0; x < NX; x++) {
+                for (int y = 0; y < NY; y++) {
+                    obst[index(x, y, z)] = 3;
+                }
+            }
+        }
+        else if (Astring == "velocity") {
+            for (int x = 0; x < NX; x++) {
+                for (int y = 0; y < NY; y++) {
+                    obst[index(x, y, z)] = -1;
+                }
+            }
+        }
+        else if (Astring == "pressure") {
+            for (int x = 0; x < NX; x++) {
+                for (int y = 0; y < NY; y++) {
+                    obst[index(x, y, z)] = -2;
+                }
+            }
+        }
+    }
+
+    if (z_id == z_np - 1) {
+        int z = NZ - 1;
+        Astring = BC.zmaxFace;
+        if (Astring == "nonslip") {
+            for (int x = 0; x < NX; x++) {
+                for (int y = 0; y < NY; y++) {
+                    obst[index(x, y, z)] = 3;
+                }
+            }
+        }
+        else if (Astring == "velocity") {
+            for (int x = 0; x < NX; x++) {
+                for (int y = 0; y < NY; y++) {
+                    obst[index(x, y, z)] = -1;
+                }
+            }
+        }
+        else if (Astring == "pressure") {
+            for (int x = 0; x < NX; x++) {
+                for (int y = 0; y < NY; y++) {
+                    obst[index(x, y, z)] = -2;
+                }
+            }
+        }
+    }
+}
+
+void LBM::set_velocity_set() {
+    if (velocity_set == "D3Q15") {
+        direction_size = 15;
+        send_direction_size = 5;
+        ei = new vector3<int>[15] { {0, 0, 0}, { 1,0,0 }, { -1,0,0 }, { 0,1,0 }, { 0,-1,0 }, { 0,0,1 }, { 0,0,-1 },
+            { 1,1,1 }, { -1,-1,-1 }, { 1,1,-1 }, { -1,-1,1 }, { 1,-1,1 }, { -1,1,-1 }, { -1,1,1 }, { 1,-1,-1 } };
+        weights = new double[15] { 2.0 / 9.0, 1.0 / 9.0, 1.0 / 9.0, 1.0 / 9.0, 1.0 / 9.0, 1.0 / 9.0, 1.0 / 9.0,
+            1.0 / 72.0, 1.0 / 72.0, 1.0 / 72.0, 1.0 / 72.0, 1.0 / 72.0, 1.0 / 72.0, 1.0 / 72.0, 1.0 / 72.0  };
+    }
+    else if (velocity_set == "D3Q19") {
+        direction_size = 19;
+        send_direction_size = 5;
+        ei = new vector3<int>[19] { {0, 0, 0}, { 1,0,0 }, { -1,0,0 }, { 0,1,0 }, { 0,-1,0 }, { 0,0,1 }, { 0,0,-1 },
+            { 1,1,0 }, { 1,-1,0 }, { -1,1,0 }, { -1,-1,0 }, { 1,0,1 }, { -1,0,1 }, { 1,0,-1 }, { -1,0,-1 }, { 0,1,1 },
+            { 0,1,-1 }, { 0,-1,1 }, { 0,-1,-1 } };
+
+        weights = new double[19] {1.0 / 3.0, 1.0 / 18.0, 1.0 / 18.0, 1.0 / 18.0,
+            1.0 / 18.0, 1.0 / 18.0, 1.0 / 18.0, 1.0 / 36.0, 1.0 / 36.0, 1.0 / 36.0,
+            1.0 / 36.0, 1.0 / 36.0, 1.0 / 36.0, 1.0 / 36.0, 1.0 / 36.0, 1.0 / 36.0,
+            1.0 / 36.0, 1.0 / 36.0, 1.0 / 36.0};
+    }
+    else if (velocity_set == "D3Q27") {
+        direction_size = 27;
+        send_direction_size = 9;
+        ei = new vector3<int>[27] { {0, 0, 0}, { 1,0,0 }, { 0,1,0 }, { -1,0,0 }, { 0,-1,0 }, { 0,0,1 }, { 0,0,-1 },
+            { 1,1,0 }, { -1,1,0 }, { -1,-1,0 }, { 1,-1,0 }, { 1,0,1 }, { 0,1,1 }, { -1,0,1 }, { 0,-1,1 }, { 1,0,-1 }, { 0,1,-1 }, { -1,0,-1 }, { 0,-1,-1 },
+            { 1,1,1 }, { -1,1,1 }, { -1,-1,1 }, { 1,-1,1 }, { 1,1,-1 }, { -1,1,-1 }, { -1,-1,-1 }, { 1,-1,-1 }};
+
+        weights = new double[27] {8.0 / 27.0, 2.0 / 27.0, 2.0 / 27.0, 2.0 / 27.0,
+            2.0 / 27.0, 2.0 / 27.0, 2.0 / 27.0, 1.0 / 54.0, 1.0 / 54.0, 1.0 / 54.0
+            , 1.0 / 54.0, 1.0 / 54.0, 1.0 / 54.0, 1.0 / 54.0, 1.0 / 54.0, 1.0 / 54.0,
+            1.0 / 54.0, 1.0 / 54.0, 1.0 / 54.0, 1.0 / 216.0, 1.0 / 216.0, 1.0 / 216.0, 1.0 / 216.0
+            , 1.0 / 216.0, 1.0 / 216.0, 1.0 / 216.0, 1.0 / 216.0};
+    }
+    else if (velocity_set == "D2Q9") {
+        direction_size = 9;
+        send_direction_size = 3;
+        ei = new vector3<int>[9] { {1, 0, 0}, { 0,1,0 }, { -1,0,0 }, { 0,-1,0 }, { 1,1,0 }, { -1,1,0 }, { -1,-1,0 }, { 1,-1,0 }, { 0,0,0 }};
+        weights = new double[9] {1.0 / 9.0, 1.0 / 9.0, 1.0 / 9.0, 1.0 / 9.0, 1.0 / 36.0, 1.0 / 36.0, 1.0 / 36.0, 1.0 / 36.0, 4.0 / 9.0};
+    }
+    lookup_reverse();
+
+}
+
+void LBM::lookup_reverse() {
+    reverse_indexes = new int[direction_size];
+    for (int i = 0; i < direction_size; i++) {
+        for (int j = 0; j < direction_size; j++) {
+            if (ei[i].x == -ei[j].x && ei[i].y == -ei[j].y && ei[i].z == -ei[j].z) {
+                reverse_indexes[i] = j;
+            }
+        }
+    }
+}
+
+double LBM::calculate_feq(int x, int y, int z, int i) {
+    double dot_product = (double)vel[index(x, y, z)].x * (double)ei[i].x + (double)vel[index(x, y, z)].y * (double)ei[i].y +
+        (double)vel[index(x, y, z)].z * (double)ei[i].z;
+
+    double feq = weights[i] * rho[index(x, y, z)] * (1.0 + dot_product / (c_s * c_s) + dot_product * dot_product / (2 * c_s * c_s * c_s * c_s) - vel[index(x, y, z)].norm_square() / (2 * c_s * c_s));
+    return feq;
+}
+
+double LBM::calculate_feq(int x, int y, int z, int i, double u_le_x) {
+    double dot_product = (vel[index(x, y, z)].x + u_le_x) * ei[i].x + vel[index(x, y, z)].y * ei[i].y +
+        vel[index(x, y, z)].z * ei[i].z;
+
+    double feq = weights[i] * rho[index(x, y, z)] * (1.0 + dot_product / (c_s * c_s) + dot_product * dot_product / (2 * c_s * c_s * c_s * c_s) - vel[index(x, y, z)].norm_square() / (2 * c_s * c_s));
+    return feq;
+}
+
+double LBM::calculate_fg(int x, int y, int z, int i, double feq) {
+    double dot_product = gx * ((double)ei[i].x - (double)vel[index(x, y, z)].x) + gy * ((double)ei[i].y - (double)vel[index(x, y, z)].y) +
+        gz * ((double)ei[i].z - (double)vel[index(x, y, z)].z);
+
+    double c_s_squ = 1.0 / 3.0;
+    double fg = (1.0 - 1.0 / (2 * tau)) / c_s_squ * dot_product * feq;
+    return fg;
+}
+
+double LBM::calculate_fneq(int x, int y, int z, int i, double feq) {
+    double fneq = pdf[index(x, y, z, i)] - feq;
+    return fneq;
+}
+
+double LBM::calculate_pij(double* fneq) {
+    double p_xx = 0.0;
+    double p_yy = 0.0;
+    double p_zz = 0.0;
+    double p_xy = 0.0;
+    double p_yz = 0.0;
+    double p_zx = 0.0;
+    for (int i = 0; i < direction_size; i++) {
+        p_xx += (double)ei[i].x * (double)ei[i].x * fneq[i];
+        p_yy += (double)ei[i].y * (double)ei[i].y * fneq[i];
+        p_zz += (double)ei[i].z * (double)ei[i].z * fneq[i];
+        p_xy += (double)ei[i].x * (double)ei[i].y * fneq[i];
+        p_yz += (double)ei[i].y * (double)ei[i].z * fneq[i];
+        p_zx += (double)ei[i].z * (double)ei[i].x * fneq[i];
+    }
+    double p_ij = sqrt(p_xx * p_xx + p_yy * p_yy + p_zz * p_zz + 2 * p_xy * p_xy + 2 * p_zx * p_zx + 2 * p_yz * p_yz);
+    return p_ij;
+}
+
+void LBM::set_velocity(int x_field, int y_field, int z_field, double u_x, double u_y, double u_z) {
+    vel[index(x_field, y_field, z_field)].x = u_x;
+    vel[index(x_field, y_field, z_field)].y = u_y;
+    vel[index(x_field, y_field, z_field)].z = u_z;
+}
+
+void LBM::set_density(int x_field, int y_field, int z_field, double density) {
+    rho[index(x_field, y_field, z_field)] = density;
+}
+
+void LBM::compute_density_momentum(int xmin, int xmax, int ymin, int ymax, int zmin, int zmax) {
+    for (int x = xmin; x < xmax; x++) {
+        for (int y = ymin; y < ymax; y++) {
+            for (int z = zmin; z < zmax; z++) {
+                if (obst[index(x, y, z)] <= 0) {
+                    double new_density = 0;
+                    vector3<double> u;
+                    for (int i = 0; i < direction_size; i++) {
+                        new_density += pdf[index(x, y, z, i)];
+                        u.x += pdf[index(x, y, z, i)] * ei[i].x;
+                        u.y += pdf[index(x, y, z, i)] * ei[i].y;
+                        u.z += pdf[index(x, y, z, i)] * ei[i].z;
+                    }
+                    rho[index(x, y, z)] = new_density;
+                    vel[index(x, y, z)].x = (u.x + 0.5 * gx) / new_density;
+                    vel[index(x, y, z)].y = (u.y + 0.5 * gy) / new_density;
+                    vel[index(x, y, z)].z = (u.z + 0.5 * gz) / new_density;
+                }
+                else {
+                    rho[index(x, y, z)] = 1.0;
+                    vel[index(x, y, z)].x = 0.0;
+                    vel[index(x, y, z)].y = 0.0;
+                    vel[index(x, y, z)].z = 0.0;
+                }
+            }
+        }
+    }
+}
+
+void LBM::stream(int xmin, int xmax, int ymin, int ymax, int zmin, int zmax) {
+    for (int x = xmin; x < xmax; x++) {
+        for (int y = ymin; y < ymax; y++) {
+            for (int z = zmin; z < zmax; z++) {
+                if (obst[index(x, y, z)] <= 0) {
+                    for (int i = 0; i < direction_size; i++) {
+                        //��ȱʡ�������Ե�
+                        int xmd = x - (int)ei[i].x;
+                        int ymd = y - (int)ei[i].y;
+                        int zmd = z - (int)ei[i].z;
+                        pdf[index(x, y, z, i)] = pdf2[index(xmd, ymd, zmd, i)];
+                    }
+                }
+            }
+        }
+    }
+}
+
+void LBM::collision(int xmin, int xmax, int ymin, int ymax, int zmin, int zmax) {//Performs the collision step.
+    double tauinv = 1.0 / tau;
+    double omtauinv = 1.0 - tauinv;     // 1 - 1/tau
+    if (iMRT == 0) {
+        if (iLES == 1) {
+            double* fneq = new double[direction_size];
+            double* feq = new double[direction_size];
+            double* fg = new double[direction_size];
+            for (int x = xmin; x < xmax; x++) {
+                for (int y = ymin; y < ymax; y++) {
+                    for (int z = zmin; z < zmax; z++) {
+                        for (int i = 0; i < direction_size; i++) {
+                            feq[i] = calculate_feq(x, y, z, i);
+                            fg[i] = calculate_fg(x, y, z, i, feq[i]);
+                            fneq[i] = pdf[index(x, y, z, i)] - feq[i];
+                        }
+                        double p_ij = calculate_pij(fneq);
+                        const double tau_t = 0.5 * (sqrt(tau * tau + 2 * sqrt(2) * c_s * c_s * p_ij / (c_s * c_s * c_s * c_s)) - tau);
+                        const double omega = 1.0 / (tau + tau_t);
+                        for (int i = 0; i < direction_size; i++) {
+                            pdf2[index(x, y, z, i)] = (1.0 - omega) * pdf[index(x, y, z, i)] + omega * feq[i] + fg[i];
+                        }
+                    }
+                }
+            }
+            delete[]fneq;
+            delete[]feq;
+            delete[]fg;
+        }
+        else {
+            for (int x = xmin; x < xmax; x++) {
+                for (int y = ymin; y < ymax; y++) {
+                    for (int z = zmin; z < zmax; z++) {
+                        for (int i = 0; i < direction_size; i++) {
+                            double feq = calculate_feq(x, y, z, i);
+                            double fg = calculate_fg(x, y, z, i, feq);
+                            pdf2[index(x, y, z, i)] = omtauinv * pdf[index(x, y, z, i)] + tauinv * feq + fg;
+                        }
+                    }
+                }
+            }
+        }
+    }
+    else {
+        double* fneq = new double[direction_size];
+        double* feq = new double[direction_size];
+        double* fg = new double[direction_size];
+        double* colli = new double[direction_size];
+        if (iLES == 1) {
+            for (int x = xmin; x < xmax; x++) {
+                for (int y = ymin; y < ymax; y++) {
+                    for (int z = zmin; z < zmax; z++) {
+                        for (int i = 0; i < direction_size; i++) {
+                            feq[i] = calculate_feq(x, y, z, i);
+                            fg[i] = calculate_fg(x, y, z, i, feq[i]);
+                            fneq[i] = pdf[index(x, y, z, i)] - feq[i];
+                        }
+                        double p_ij = calculate_pij(fneq);
+                        const double tau_t = 0.5 * (sqrt(tau * tau + 2 * sqrt(2) * c_s * c_s * p_ij / (c_s * c_s * c_s * c_s)) - tau);
+                        calculate_MSM(tau + tau_t);
+                        for (int i = 0; i < direction_size; i++) {
+                            colli[i] = 0.0;
+                            for (int k = 0; k < direction_size; k++)
+                            {
+                                colli[i] = colli[i] + MSM[i][k] * fneq[k];
+                            }
+                            pdf2[index(x, y, z, i)] = pdf[index(x, y, z, i)] + colli[i] + fg[i];
+                        }
+                    }
+                }
+            }
+        }
+        else {
+            for (int x = xmin; x < xmax; x++) {
+                for (int y = ymin; y < ymax; y++) {
+                    for (int z = zmin; z < zmax; z++) {
+                        for (int i = 0; i < direction_size; i++) {
+                            feq[i] = calculate_feq(x, y, z, i);
+                            fg[i] = calculate_fg(x, y, z, i, feq[i]);
+                            fneq[i] = pdf[index(x, y, z, i)] - feq[i];
+                        }
+                        for (int i = 0; i < direction_size; i++) {
+                            colli[i] = 0.0;
+                            for (int k = 0; k < direction_size; k++)
+                            {
+                                colli[i] = colli[i] + MSM[i][k] * fneq[k];
+                            }
+                            pdf2[index(x, y, z, i)] = pdf[index(x, y, z, i)] + colli[i] + fg[i];
+                        }
+                    }
+                }
+            }
+        }
+        delete[]colli;
+        delete[]fneq;
+        delete[]feq;
+        delete[]fg;
+    }
+}
+
+void LBM::perform_timestep() {
+    time++;
+    compute_density_momentum(0, NX, 0, NY, 0, NZ);
+    collision(0, NX, 0, NY, 0, NZ);
+
+    mpi_send();
+    stream(0, NX, 0, NY, 0, NZ);
+    wall_bounce_back(); 	 //����ƽֱ�����޻��ƣ�simple bounce-back�� 
+
+    if (iGEO == 1) {
+        bouzidi();
+    }
+
+    velocity_boundary_condition();  //�ٶȱ߽�����
+    pressure_boundary_condition();  //ѹ���߽�����
+    
+}
+
+void LBM::output(int i,int mpi_rank) {
+    if ((i + 1) % FrameRate == 0) {
+        if (mpi_rank == 0) {
+            double percentage = (double)(i + 1) / (double)(ttstep) * 100.0;
+            cout << "Saving data - " << (i + 1) << "/" << ttstep << " (" << percentage << "%)" << endl;
+        }
+        mpi_total(mpi_rank);
+        if (mpi_rank ==x_np * y_np * z_np - 1) {
+            write_binary("output/" + std::to_string(i + 1) + ".plt");
+            if ((i + 1) % (10 * FrameRate) == 0) {
+                output_all("continue.plt");
+            }
+        }
+    }
+}
+
+void LBM::check_converge() {
+    double Err = 0;
+    double R = 0;
+    for (int z = 0; z < total_NZ; z++) {
+        for (int y = 0; y < total_NY; y++) {
+            for (int x = 0; x < total_NX; x++) {
+                Err = Err + fabs(velTotal[total_index(x, y, z)].x - velTotalConv[total_index(x, y, z)].x)
+                    + fabs(velTotal[total_index(x, y, z)].y - velTotalConv[total_index(x, y, z)].y)
+                    + fabs(velTotal[total_index(x, y, z)].z - velTotalConv[total_index(x, y, z)].z);
+                R = R + fabs(velTotal[total_index(x, y, z)].x)
+                    + fabs(velTotal[total_index(x, y, z)].y)
+                    + fabs(velTotal[total_index(x, y, z)].z);
+                velTotalConv[total_index(x, y, z)].x = velTotal[total_index(x, y, z)].x;
+                velTotalConv[total_index(x, y, z)].y = velTotal[total_index(x, y, z)].y;
+                velTotalConv[total_index(x, y, z)].z = velTotal[total_index(x, y, z)].z;
+            }
+        }
+    }
+    Err = Err / R;
+    if (Err <= conv_v) {
+        output_all("output/convfinal.plt");
+        cout << "CONV Condition Finish" << endl;
+        exit (1);
+    }
+}
+
+int LBM::get_time() { return time; }
+
+int LBM::get_NX() { return NX; }
+
+int LBM::get_NY() { return NY; }
+
+int LBM::get_NZ() { return NZ; }
+
+int LBM::get_MeshType() { return MeshType; }
+
+int LBM::get_border_node_num() { return border_node_num; }
+
+int LBM::get_total_steps() { return ttstep; }
+
+int LBM::get_FrameRate() { return FrameRate; }
+
+int LBM::getdirs() { return send_direction_size; }
+
+int LBM::getalldirs() { return direction_size; }
+
+vector3<int>* LBM::get_ei() {
+    return ei;
+}
+
diff --git a/CFD/LBMSolverMPI/src/vector3.cpp b/CFD/LBMSolverMPI/src/vector3.cpp
new file mode 100644
index 0000000..8c0e3ad
--- /dev/null
+++ b/CFD/LBMSolverMPI/src/vector3.cpp
@@ -0,0 +1,31 @@
+#include "vector3.hpp"
+
+template<class myType> // ����ģ�� function templates,�������͵����ݲ���
+vector3<myType>::vector3(myType x, myType y, myType z) : x(x), y(y), z(z) {
+}
+
+template<class myType>
+myType vector3<myType>::dot(vector3<myType> other) {
+	return (x * other.get_x() +
+		y * other.get_y() +
+		z * other.get_z()
+	);
+}
+template<class myType>
+vector3<myType> vector3<myType>::cross(vector3<myType> other) {
+	return vector3<myType>(
+		(y * other.get_z()) - (z * other.get_y()),
+		(z * other.get_x()) - (x * other.get_z()),
+		(x * other.get_y()) - (y * other.get_x())
+		);
+}
+
+template<class myType>
+vector3<myType>::vector3() : x(0), y(0), z(0) {
+}
+
+template<class myType>
+myType vector3<myType>::norm_square() {
+	return (x * x + y * y + z * z);
+}
+
diff --git a/CFD/LBMSolverOMP/include/LBMSolverOMP.hpp b/CFD/LBMSolverOMP/include/LBMSolverOMP.hpp
new file mode 100644
index 0000000..2da8389
--- /dev/null
+++ b/CFD/LBMSolverOMP/include/LBMSolverOMP.hpp
@@ -0,0 +1,158 @@
+#include <stdio.h>
+#include <iostream>
+#include <string>
+#include <fstream>
+#include "vector3.hpp"
+#ifndef LBM_HILE
+#define LBM_HILE
+
+//����:  �ƺ������ż�幣��й���ѧ������ѧ
+
+#define PARALLEL  1   //�����Ƿ��б���Ŀ���
+
+int RunLBMSolverOMP();
+struct Boundary_Condition
+{ //types :�ٶȱ߽�����velocity;   ѹ���߽�����pressure�� ���ڱ߽�periodic
+	char xminFace[20];
+	char xmaxFace[20];
+	char yminFace[20];
+	char ymaxFace[20];
+	char zminFace[20];
+	char zmaxFace[20];
+	vector3<double>  vel_specified[6];  //�����ٶȱ߽磺6���棨�߽磩�ϵ��ٶ�ʸ��
+	double rho_specified[6];   //����ѹ���߽�:  6���߽��ϵ��ܶȣ�ѹ����
+};
+
+
+class LBM {
+
+public:
+//	LBM(int grid_size, std::string velocity_set, double c_s, double tau );
+	LBM(int nx, int ny, int nz, std::string velocity_set, double c_s, double tau, vector3<double> gf, Boundary_Condition BC, vector3<double> vel0);
+	~LBM();
+	void set_velocity(int x_field, int y_field, int z_field, double u_x, double u_y, double u_z);//Set velocity at position in velocity field.
+	void set_density(int x_field, int y_field, int z_field, double density);//Set density at position in density field.
+	double calculate_feq(int i, int j, int k, int w);
+	void calculate_feq2(int i, int j, int k, double *feq);
+    double calculate_feq(int i, int j, int k, int w, double u_le_x);
+	//���غ������ú�����Ϊ�ƶ��߽����f_i= f_i^eq��rho, (u+u_le_x), v, w���� ����u_le_xΪ�廬���ٶ�
+	void calculate_fg(int i, int j, int k, double *feq, double *fg);//���������
+	double calculate_fneq(int i, int j, int k, int w, double feq);//�����ƽ��ֲ�����
+	double calculate_pij(double *fneq);	//���㶯��...
+//BC
+	
+	void bouzidi(int num_node2, int *node2,double *delta, vector3<double> *force);
+	void wall_bounce_back(); //����ƽֱ�����޻��ƣ�simple bounce-back��
+	void velocity_boundary_condition();  //�����ٶȱ߽�����
+	void pressure_boundary_condition();  //����ѹ���߽�����
+	void lookup_reverse();     //�� i ����ķ�����
+//LBM iteration
+	void compute_density_momentum(int xmin, int xmax, int ymin, int ymax, int zmin, int zmax);
+	void stream();//Stream the current equilibrium distribution to the next distribution.
+	void collision(int xmin, int xmax, int ymin, int ymax, int zmin, int zmax);//Perform the collision step. Assumes delta t / tau = 1.
+	void collision_BF(int xmin, int xmax, int ymin, int ymax, int zmin, int zmax);//include body force
+	void collision_LES(int xmin, int xmax, int ymin, int ymax, int zmin, int zmax); //including LES  SGS model
+	void collision_zip(int MRT, int BF, int LES, int xmin, int xmax, int ymin, int ymax, int zmin, int zmax); //all collisons in a whole
+	void perform_timestep(int MRT, int BF, int LES);//Delta t = 1 lattice unit.
+//output	
+	void output_history(std::string filename, bool header, int i, vector3<double> *force);
+
+	void output_velocity_profile_at_a_section(); //���ij�����ϵ��ٶ�����
+	void output_indices_file();
+	void output_tecplot(std::string filename, bool header = true);
+	void output_all_fi(std::string filename);
+	int  get_time();
+	void write_binary(std::string filename);
+	
+//MPI
+	void mpi_id(int mpi_rank);
+	void mpi_send();
+//MRT
+	void iniMRT();
+	void iniMRT2();
+	void calculate_MSM(double tau);
+	void D3Q19calculate_meq(int x, int y, int z,  double *meq);
+	//void D3Q19MRTcollision();
+	void D2Q9calculate_meq(int x, int y, double *meq);
+	//void D2Q9MRTcollision();
+	void MRTcollision(int iLES, int xmin, int xmax, int ymin, int ymax, int zmin, int zmax);
+//C2F, F2C
+	int getdirs();
+	int getalldirs();
+	void exchange(int id,int border_node_num, int *border, int *border_dir, double *f_border_all_dir, double *f_border_dir, int *Low, int *NN);
+	void init_border(int *Low, int Fdimx, int Fdimy, int Fdimz, int &num, int *border, int *border_dir);
+	void copy_data(int id, vector3<double>*vel, double *rho, int *Low, int *NN);  //copy macrovariable data from fine to coarse
+	vector3<int>* get_ei();
+
+private:
+	int MRT, CONTI, LES, GEO, CONV;
+	//MRT
+	double** M_MRT, ** M_MRTI, ** MSM;
+    int time = 0;
+	int NX;
+	int NY;
+	int NZ;
+	double c_s;
+	double nu;
+	double tau;
+	vector3<double> gf;
+	int *obst;  //obst 0: fluid nodes, // 1: solid nodes.  //2: solid nodes which is most closest to fluid 
+	int *lab;  //label the node type to detect the directions of streaming in the CF interface
+	double* rho;
+	vector3<double>* vel; //, bc_specified_vel;
+	double* pdf2;
+	double* pdf;
+	int x_id;
+	int y_id;
+	int z_id;
+	int x_np=2;
+	int y_np=1;
+	int z_np=1;
+    int n_myid[6];
+	inline int index(int x, int y, int z) const {
+        return (z * NX * NY) + (y * NX) + x;
+    }
+	inline int index(int x, int y, int z, int w) const {
+        return (x + y * NX + z * NX * NY + w * NX * NY * NZ);
+	}
+	void output_array(double *array);  //Ŀǰû����
+	void set_velocity_set(std::string velocity_set);//Used to internally generate velocity_set.
+	void initialise(vector3<double> vel0);
+	//void initialise_re();
+	//Lattice ei using D3DQ15. assumed speed of sound c_s = 1/sqrt(3).
+	int direction_size ;  
+	int send_direction_size;
+	vector3<int>* ei;
+	double* weights;
+	int* reverse_indexes;
+	std::string boundary_condition;
+//	double gamma_dot;
+	std::string velocity_set;
+    Boundary_Condition BC;
+};
+
+struct Params_Pakage {
+	char in[50]; 
+	char out[50];
+	int MRT, CONTI, LES, GEO, MB, CONV;
+	int LX, LY, LZ;
+	int LX2, LY2, LZ2;
+	int LowX, LowY, LowZ;
+	int FrameRate;
+	int ttstep;
+	double density0, conv_v;
+	vector3<double> vel0;
+	double tau;
+	vector3<double> gf;
+	char velocity_set[20];
+	char conti_file[20],geo_file[20];
+	char  bc[20];
+	Boundary_Condition BC;
+
+};
+
+void read_params( Params_Pakage* p);
+
+
+
+#endif
diff --git a/CFD/LBMSolverOMP/include/vector3.hpp b/CFD/LBMSolverOMP/include/vector3.hpp
new file mode 100644
index 0000000..eb8da40
--- /dev/null
+++ b/CFD/LBMSolverOMP/include/vector3.hpp
@@ -0,0 +1,42 @@
+#ifndef VECTOR_H_FILE
+#define VECTOR_H_FILE
+
+//作者:  黄海波，张嘉骞，中国科学技术大学
+
+template<class myType>
+class vector3 {
+
+public:
+	vector3(myType x, myType y, myType z);
+	vector3();
+	myType dot(vector3<myType> other);
+	vector3<myType> cross(vector3<myType> other);
+	myType norm_square();
+	vector3* multiply_by_scalar(myType scalar);
+	myType x;
+	myType y;
+	myType z;
+	myType get_x()	const
+	{
+		return x;
+	}
+	myType get_y()	const
+	{
+		return y;
+	}
+	myType get_z()	const
+	{
+		return z;
+	}
+	vector3<myType> operator- (const vector3<myType>& rhs) const {
+		return vector3<myType>(x - rhs.x, y - rhs.y, z - rhs.z);
+	}
+	vector3<myType> operator+ (const vector3<myType>& rhs) const {
+		return vector3<myType>(x + rhs.x, y + rhs.y, z + rhs.z);
+	}
+	vector3<myType> operator/ (const myType& rhs) const {
+		return vector3<myType>(x/rhs, y/rhs, z/rhs);
+	}
+};
+
+#endif
diff --git a/CFD/LBMSolverOMP/src/LBMSolverOMPSimulation.cpp b/CFD/LBMSolverOMP/src/LBMSolverOMPSimulation.cpp
new file mode 100644
index 0000000..3c50590
--- /dev/null
+++ b/CFD/LBMSolverOMP/src/LBMSolverOMPSimulation.cpp
@@ -0,0 +1,369 @@
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <iostream>
+#include <fstream>
+#include <streambuf>
+//Now Linux only.
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <time.h>
+#include <omp.h>
+//#include <mpi.h>
+#include "LBMSolverOMP.hpp"
+#include "vector3.hpp"
+
+
+void read_Geo(int direction_size, vector3<int> *ei, int *obst, int *NN2, int &num_node2, int *node2, double *delta);
+
+inline bool file_exists (const std::string& name) {
+  struct stat buffer;
+  return (stat (name.c_str(), &buffer) == 0);
+}
+
+inline int index(int x, int y, int z, int NX, int NY)  {
+	return (z * NX * NY) + (y * NX) + x;
+}
+
+//int main(int argc, char** argv) {
+int RunLBMSolverOMP() {
+
+	std::cout.precision(4);  //��ֵ8�ij�4�ˣ�Ҫ��Ȼλ��̫��
+	clock_t tStart = clock();	// report timing information
+
+	std::string command;
+	command = "mkdir output";
+	system(command.c_str());
+
+	struct Params_Pakage parameters = { "./bin/input.txt","./params_out.txt" }; //�ಿ�ֳ�ʼ��
+								 //input filename     //output filename
+
+/*	std::cout << "Do you want to clean the previous run? (1 - Yes, 0 - No): ";
+	int choice;
+	std::cin >> choice;
+	if(choice == 1) {
+		system("rm -rf output");
+		system("mkdir output");
+	}
+*/
+
+	omp_set_num_threads(1);
+	read_params(&parameters);  //��read.cpp�����ļ�./input.txt����ģ�����
+
+
+	int NX = parameters.LX; // ������x������������
+	int NY = parameters.LY; // ������y������������
+	int NZ = parameters.LZ; // ������z������������
+	int NX2 = parameters.LX2; // FINE������x������������
+	int NY2 = parameters.LY2; // FINE������y������������
+	int NZ2 = parameters.LZ2; // FINE������z������������
+	int LowX = parameters.LowX;
+	int LowY = parameters.LowY;
+	int LowZ = parameters.LowZ;
+	int Fdimx = (NX2) / 2;
+	int Fdimy = (NY2) / 2;
+	int Fdimz = (NZ2) / 2;
+	if (Fdimz == 0) Fdimz = 1; //serve for 2D cases D2Q9
+
+	std::cout << "Grid size: " << NX << "x" << NY << "x" << NZ << '\n';
+	if (parameters.MB == 1) { std::cout << "Fine Grid size: " << NX2 << "x" << NY2 << "x" << NZ2 << '\n'; }
+	int FrameRate = parameters.FrameRate; // FrameRate is the number of timesteps per frame.
+	std::cout << "number of timesteps per frame: " << FrameRate << '\n';
+
+	double c_s = 1.0 / sqrt(3);
+	std::cout << "c_s (Speed of sound): " << c_s << '\n';
+
+	double tau = parameters.tau;     //initial tau value;
+	double tau2 = (tau - 0.50)*2.0 + 0.50;
+	std::cout << "Tau: " << tau << '\n';
+	if (parameters.MB == 1) { std::cout << "TauFine: " << tau2 << '\n'; }
+
+	vector3<double> gf = parameters.gf;//initial Gx,Gy,Gz value;
+	int BF = 0; //no body force
+	if (fabs(gf.x) > 1.e-12 || fabs(gf.y) > 1.e-12 || fabs(gf.y) > 1.e-12)  BF = 1; //Body force ��־
+	std::cout << "Body force?   " << BF << '\n';
+
+	if (tau < 0.5) {
+		//Section 3.5.5.1 with delta t=1.
+		std::cout << "Error: Tau must be greater than 0.5 for numerical stability." << '\n';
+		return -1;
+	}
+
+	std::string velocity_set = parameters.velocity_set; // �����ٶ�ģ��;
+
+//	std::string boundary_conditions = parameters.bc;   //�߽���������;
+	if (velocity_set != "D3Q15" && velocity_set != "D3Q19" && velocity_set != "D3Q27" && velocity_set != "D2Q9") {
+		std::cout << "Error: Please specify a valid velocity set such as D3Q15,D3Q27 or D2Q9." << '\n';
+		return -1;
+	}
+	std::cout << "Velocity set: " << velocity_set << '\n';
+	//	if(boundary_conditions != "xxx") {
+	//	    std::cout << "Errors: boundary_conditions in *****)";
+	//	    return -1;
+	//	}���Լ���һ����������ļ�һ���Ե�������һ������������ȡ����check consistency�������ʲô��һ�µĵط�������ʾ����������˵������ѹ���߽�������Ȼ�������ļ��� Pressure�����ָ����ٶ�ʸ����
+
+
+
+	if (NZ != 1 && velocity_set == "D2Q9") {
+		std::cout << "Warning: Please set NZ=1 for D2Q9.";
+		return -1;
+	}
+	int total_steps = parameters.ttstep;     //total steps to terminate the simulation;
+
+	LBM *solver = new LBM(NX, NY, NZ, velocity_set, c_s, tau, gf, parameters.BC, parameters.vel0);
+	if (parameters.MB == 0) { NX2 = 1; NY2 = 1; NZ2 = 1; }
+	LBM *solver2 = new LBM(NX2, NY2, NZ2, velocity_set, c_s, tau2, gf, parameters.BC, parameters.vel0);
+
+
+	int Low[3] = { LowX,LowY,LowZ };
+	int NN[3] = { NX,NY,NZ };
+	//	solver->mpi_id(mpi_rank);
+	//serve for data exchange between solver (Coarse mesh) and solver2 (Fine mesh)
+	int *border, *border_dir;
+	double *f_border_dir;
+	double *f_border_all_dir;
+	int dirs = solver->getdirs(); // get dirs
+	int direction_size = solver->getalldirs(); //get direction size
+
+	//NX2 = 50; NY2 = 50; NZ2 = 50;//remove it!
+	int NN2[3] = { NX2,NY2,NZ2 };//serve for "read_Geo"  only!
+	int NH[3] = { NX2,NY2,NZ2 }; //serve for "read_Geo" in single block
+	vector3<int> *ei;
+	ei = solver2->get_ei();
+	int *obst;
+	if (parameters.MB == 0) NH[0] = NX; NH[1] = NY; NH[2] = NZ;
+	obst = new int[NH[0] * NH[1] * NH[2]](); //()��ʼ��Ϊ0
+	int num_node2 = 10000;
+	int *node2;
+	double *delta;
+	node2 = new int[num_node2]();
+	delta = new double[num_node2 * direction_size](); //��ʼ��Ϊ0
+	if (parameters.GEO == 1 ) {  //&& velocity_set != "D2Q9"
+		if(parameters.MB==0) read_Geo(direction_size, ei, obst, NN, num_node2, node2, delta);//
+		if (parameters.MB == 1) read_Geo(direction_size, ei, obst, NN2, num_node2, node2, delta);//
+	}
+		
+    //if(parameters.GEO==1 && velocity_set == "D2Q9")	read_Geo(2, direction_size, ei, obst, NN2, num_node2, node2, delta);
+
+	vector3<double> *velF;
+	double	*rhoF;
+	velF = new vector3<double>[Fdimx*Fdimy*Fdimz]();
+	rhoF = new double[Fdimx*Fdimy*Fdimz]();
+	vector3<double> *force;
+	force = new vector3<double>[1]();
+
+	int border_node_num = 2 * (Fdimx* Fdimy + Fdimy * Fdimz + Fdimz * Fdimx)
+		- 4 * (Fdimx + Fdimy + Fdimz) + 8;
+
+	if (velocity_set == "D2Q9") border_node_num = 2 * (Fdimx + Fdimy) - 4;
+	if (velocity_set == "D3Q19") border_node_num = border_node_num - 8;
+
+	border = new int[border_node_num];
+	border_dir = new int[border_node_num* dirs]();//()��ʼ��Ϊ0��model dependent,for D3Q19, at most outward directions: 5
+	//actually dirs= send_direction_size
+	f_border_dir = new double[border_node_num* dirs]();
+	f_border_all_dir = new double[border_node_num*direction_size]();//direction_size
+	int b_node_num = 1;
+
+	int NZ2min = 2;    //general 3D
+	int NZ2max = NZ2 - 2;  //general 3D
+	if (velocity_set == "D2Q9") { NZ2min = 0; NZ2max = 1; }//��ά���⴦����
+
+	if (parameters.MB == 1) solver->init_border(Low, Fdimx, Fdimy, Fdimz, b_node_num, border, border_dir);
+
+	std::cout << "actual num " << b_node_num << "  theory num " << border_node_num << '\n';
+
+
+/*	for (int i = 0; i < argc; i++) {
+		if (std::string(argv[i]) == "generate_ic") {
+			solver->output_tecplot("ic.plt", true);
+			std::cout << "Generated ic.plt" << '\n';
+			return 0;
+		}
+	}*/
+	if (file_exists("ic.plt")) {
+		/*		���г����ļ����˴�Ӧ����
+		*/
+		int i, j, k,m=0;
+		double density, u_x , u_y , u_z, den_avg=0. ; //ȱʡ��ʼ��
+		char buffer[256];
+		std::ifstream infile("ic.plt");
+		if (!infile) {
+			std::cout << "Unable to open input file";
+			exit(1); // terminate with error
+
+		}
+		infile.getline(buffer, 100);
+		infile.getline(buffer, 100);
+		while (!infile.eof()){
+			m++;
+					infile.getline(buffer, 100);
+					sscanf_s(buffer, "%d %d %d %lf %lf %lf %lf", &i,&j,&k,&density,
+						&u_x, &u_y,&u_z);
+					solver->set_density(i, j, k, density);
+					solver->set_velocity(i, j, k, u_x, u_y, u_z);
+					den_avg = den_avg + density;
+		}
+		//solver->initialise_re();
+		den_avg = den_avg / (double)m;
+		std::cout << "Averged density:" <<den_avg << '\n';
+		std::cout << "1Loaded initial conditions (read from file)" << '\n';
+	} 
+	if (file_exists("ic2.plt")) {
+		/*		���г����ļ����˴�Ӧ����
+		*/
+		int i, j, k, m = 0;
+		double density, u_x, u_y, u_z; //ȱʡ��ʼ��
+		char buffer[256];
+		std::ifstream infile("ic2.plt");
+		if (!infile) {
+			std::cout << "Unable to open input file";
+			exit(1); // terminate with error
+
+		}
+		infile.getline(buffer, 100);
+		infile.getline(buffer, 100);
+		while (!infile.eof()) {
+			m++;
+			infile.getline(buffer, 100);
+			sscanf_s(buffer, "%d %d %d %lf %lf %lf %lf", &i, &j, &k, &density,
+				&u_x, &u_y, &u_z);
+			solver2->set_density(i, j, k, density);
+			solver2->set_velocity(i, j, k, u_x, u_y, u_z);
+			
+		}
+		//solver->initialise_re();
+		
+		std::cout << "2Loaded initial conditions (read from file)" << '\n';
+	}
+	if(!file_exists("ic2.plt")&& !file_exists("ic.plt")) {
+		std::cout << "Loaded default initial conditions" << '\n';
+
+		double density = { 1 }, u_x = parameters.vel0.x, u_y = parameters.vel0.y, u_z = parameters.vel0.z; //ȱʡ��ʼ��
+		std::cout<< u_x << " " << u_y <<"  "<<u_z << '\n';
+		density = parameters.density0;
+		for (int i = 0; i < NX; i++) {
+			for (int j = 0; j < NY; j++) {
+				for (int k = 0; k < NZ; k++) {
+					solver->set_density(i, j, k, density);
+					solver->set_velocity(i, j, k, u_x, u_y, u_z);
+				}
+			}
+		}
+		if (parameters.MB == 1) {
+			for (int i = 0; i < NX2; i++) {
+				for (int j = 0; j < NY2; j++) {
+					for (int k = 0; k < NZ2; k++) {
+						solver2->set_density(i, j, k, density);
+						solver2->set_velocity(i, j, k, u_x, u_y, u_z);
+					}
+				}
+			}
+		}
+		//		std::cout << "If you wish to use your own initial conditions, please run the program but with command: generate_ic as a argument which will output ic.csv in format of p,u_x,u_y,u_z, assume indexes are incrementing i,j,k for i<NX,j<NY and k<NZ" << '\n';
+	}
+	
+	//
+	double viscosity = c_s * c_s * (tau - 0.5);
+	std::cout << "Kinematic shear viscosity: " << viscosity << '\n';
+   
+    std::cout << "For velocity set D2Q9,D3Q15,D3Q19 and D3Q27, |u_max|<0.577\n";
+//	solver->mpi_id(mpi_rank);
+	solver->output_tecplot("0.plt");  //output/
+	if (parameters.MB == 1) solver2->output_tecplot("00.plt");  //output/
+	//solver->output_indicesile(); //���output/indices.csv�����ļ��ô����󣬲������ASCII tecplot�ļ�
+
+	int scale = 1;
+	int runs = total_steps * scale * scale * scale; //Ŀǰruns = total_steps
+
+	if (parameters.MRT == 1) {
+		solver->iniMRT();
+		if(parameters.MB==1) solver2->iniMRT();
+	}
+
+	for(int i = 0; i < runs; i = i + 1) {
+		
+		if (parameters.MB == 0)
+		{
+			solver->compute_density_momentum(0, NX, 0, NY, 0, NZ);
+			solver->collision_zip(parameters.MRT, BF, parameters.LES, 0, NX, 0, NY, 0, NZ);
+			solver->stream();
+			if(parameters.GEO == 1) solver->bouzidi(num_node2, node2, delta, force);//
+			solver->wall_bounce_back(); 	 //����ƽֱ�����޻��ƣ�simple bounce-back��
+			solver->velocity_boundary_condition();  //�ٶȱ߽�����
+			solver->pressure_boundary_condition();  //ѹ���߽�����
+
+//			solver->perform_timestep(parameters.MRT, BF, parameters.LES); //ͬʱִ�� ��������collision,��streaming �����������裬 �μ�LBM.cpp
+		}
+		else
+		{
+			//solver->time++;
+				solver->compute_density_momentum(0, NX, 0, NY, 0, NZ);
+				solver->collision_zip(parameters.MRT, BF, parameters.LES, 0, NX, 0, NY, 0, NZ);
+				
+				solver->exchange(1, border_node_num, border, border_dir, f_border_all_dir, f_border_dir, Low, NN); //id=1, fetch data from coarse mesh
+
+				solver2->compute_density_momentum(2, NX2 - 2, 2, NY2 - 2, NZ2min, NZ2max);
+				solver2->collision_zip(parameters.MRT, BF, parameters.LES, 2, NX2-2, 2, NY2-2, NZ2min, NZ2max);
+				
+				solver2->exchange(3, border_node_num, border, border_dir, f_border_all_dir, f_border_dir, Low, NN); //id=3, C2F
+
+				solver->stream();
+				solver->wall_bounce_back(); 	 //����ƽֱ�����޻��ƣ�simple bounce-back��
+		        //---
+				solver2->stream();
+				solver2->bouzidi(num_node2, node2, delta, force);//
+				//solver2->wall_bounce_back();//
+				
+				for (int i = 0; i < 1; i++) {   //fine mesh, one more iteration
+					solver2->compute_density_momentum(2, NX2 - 2, 2, NY2 - 2, NZ2min, NZ2max);
+					solver2->collision_zip(parameters.MRT, BF, parameters.LES, 2, NX2 - 2, 2, NY2 - 2, NZ2min, NZ2max);
+					solver2->stream();
+					solver2->bouzidi(num_node2, node2, delta, force);//
+				}
+
+				solver2->exchange(2, border_node_num, border, border_dir, f_border_all_dir, f_border_dir, Low, NN); //id=2, fetch data from fine mesh
+
+				solver->exchange(4, border_node_num, border, border_dir, f_border_all_dir, f_border_dir, Low, NN); //id=4, F2C
+
+//				solver2->wall_bounce_back();//
+				solver->velocity_boundary_condition();  //�ٶȱ߽�����
+				solver->pressure_boundary_condition();  //ѹ���߽�����
+				//solver2->velocity_boundary_condition();  //�ٶȱ߽�����
+				//solver2->pressure_boundary_condition();  //ѹ���߽�����
+		}
+		if ((i + 1) % 10 == 0) {
+			if (parameters.GEO == 1) solver2->output_history("output/force.plt", true, i, force);
+		}
+//		std::cout <<"i="<<i<< std::endl;
+		if((i+1) % FrameRate == 0) {
+#pragma warning(disable : 4996) //��ȡʱ�䣬��������
+			time_t now = time(0);
+			char* dt = ctime(&now);
+			std::cout << "present time��" << dt << std::endl;
+
+			std::cout << "Executed in " << (clock() - tStart) << " clock cycles\n";
+//			double ttt=(double)(clock() - tStart) / CLOCKS_PER_SEC;
+//			std::cout << "Executed in " << ttt << " seconds\n";
+			tStart = clock();  
+
+
+			if (parameters.MB == 1) solver2->copy_data(2, velF, rhoF, Low,NN2);
+			if (parameters.MB == 1) solver->copy_data(1, velF, rhoF, Low, NN2);
+            double percentage = (double) (i + 1) / (double) (runs) * 100.0;
+            
+			std::cout << "Saving data - " << (i + 1) << "/" << runs << " (" << percentage << "%)" << '\n';
+ 
+//			solver->output_tecplot("output/" +std::to_string(mpi_rank) + std::to_string(i + 1) + ".plt");//���tecplot
+		//	solver->output_tecplot("output/solver" + std::to_string(i + 1) + "a.plt");//���tecplot	
+			solver->write_binary("output/solver" + std::to_string(i + 1) + "b.plt");
+		//	if (parameters.MB == 1) solver2->output_tecplot("output/solver2_" + std::to_string(i + 1) + "a.plt");//���tecplot	
+			if (parameters.MB == 1) solver2->write_binary("output/solver2_" + std::to_string(i + 1) + "b.plt");
+		  //solver->output_velocity_profile_at_a_section();
+        }
+	}
+	std::cout << std::endl;
+	delete solver;
+
+	return 0;
+}
diff --git a/CFD/LBMSolverOMP/src/MRT.cpp b/CFD/LBMSolverOMP/src/MRT.cpp
new file mode 100644
index 0000000..194fdfd
--- /dev/null
+++ b/CFD/LBMSolverOMP/src/MRT.cpp
@@ -0,0 +1,429 @@
+#include "LBMSolverOMP.hpp"
+//reference: MRT_3Dsimplest/
+
+inline int indexM(int x, int y,  int NX) {
+	return  (y * NX) + x;
+}
+
+void LBM::iniMRT()
+{
+	double *Mtemp2 = new double[direction_size*direction_size];
+	double *F_diag2 = new double[direction_size];
+	
+	if (velocity_set == "D2Q9") {
+		double Mtemp[9][9] = {
+			{	1.,  1., 1., 1.,  1., 1., 1., 1., 1.}, //!M11, M12, M13, M14, M15, ...
+			{  -4., -1.,-1.,-1., -1., 2., 2., 2., 2.},
+			{   4., -2.,-2.,-2., -2., 1., 1., 1., 1.},
+			{   0.,  1., 0.,-1.,  0., 1.,-1.,-1., 1.},
+			{   0., -2., 0., 2.,  0., 1.,-1.,-1., 1.},
+			{   0.,  0., 1., 0., -1., 1., 1.,-1.,-1.},
+			{   0.,  0.,-2., 0.,  2., 1., 1.,-1.,-1.},
+			{   0.,  1.,-1., 1., -1., 0., 0., 0., 0.},
+			{   0.,  0., 0., 0.,  0., 1.,-1., 1.,-1.}
+		};
+		double F_diag[9] = { 9.0, 36.0,36.0,6.0,12.0,6.0,12.0,4.0,4.0 };
+		for (int i = 0; i < direction_size; i++) {
+			F_diag2[i] = F_diag[i];
+			for (int j = 0; j < direction_size; j++) {
+				Mtemp2[indexM(i, j, direction_size)] = Mtemp[i][j];
+			}
+		}
+	}
+	else if (velocity_set == "D3Q15") {
+		double Mtemp[15][15] = {
+			//{  0   1   2   3   4   5   6   7   8   9  10  11  12  13  14 },
+			   { 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1},
+			   {-2 ,-1, -1 ,-1 ,-1 ,-1 ,-1 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1},
+			   {16 ,-4, -4 ,-4 ,-4 ,-4 ,-4 , 1 , 1 , 1 , 1 , 1 , 1 , 1 , 1},
+			   { 0 , 1 ,-1 , 0 , 0 , 0 , 0 , 1 ,-1 , 1 ,-1 , 1 ,-1 , 1 ,-1},
+			   { 0 ,-4 , 4 , 0 , 0 , 0 , 0 , 1 ,-1 , 1 ,-1 , 1 ,-1 , 1 ,-1},
+			   { 0 , 0 , 0 , 1 ,-1 , 0 , 0 , 1 , 1 ,-1 ,-1 , 1 , 1 ,-1 ,-1},
+			   { 0 , 0 , 0 ,-4 , 4 , 0 , 0 , 1 , 1 ,-1 ,-1 , 1 , 1 ,-1 ,-1},
+			   { 0 , 0 , 0 , 0 , 0 , 1 ,-1 , 1 , 1 , 1 , 1 ,-1 ,-1 ,-1 ,-1},
+			   { 0 , 0 , 0 , 0 , 0 ,-4 , 4 , 1 , 1 , 1 , 1 ,-1 ,-1 ,-1 ,-1},
+			   { 0 , 2 , 2 ,-1 ,-1 ,-1 ,-1 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0},
+			   { 0 , 0 , 0 , 1 , 1 ,-1 ,-1 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0},
+			   { 0 , 0 , 0 , 0 , 0 , 0 , 0 , 1 ,-1 ,-1 , 1 , 1 ,-1 ,-1 , 1},
+			   { 0 , 0 , 0 , 0 , 0 , 0 , 0 , 1 , 1 ,-1 ,-1 ,-1 ,-1 , 1 , 1},
+			   { 0 , 0 , 0 , 0 , 0 , 0 , 0 , 1 ,-1 , 1 ,-1 ,-1 , 1 ,-1 , 1},
+			   { 0 , 0 , 0 , 0 , 0 , 0 , 0 , 1 ,-1 ,-1 , 1 ,-1 , 1 , 1 ,-1}
+		};
+		double F_diag[15] = { 15.,18.,360.,10.,40.,10.,40.,10.,40.,12.,4.,8.,8.,8.,8. };
+		for (int i = 0; i < direction_size; i++) {
+			F_diag2[i] = F_diag[i];
+			for (int j = 0; j < direction_size; j++) {
+				Mtemp2[indexM(i, j, direction_size)] = Mtemp[i][j];
+			}
+		}
+	
+	}
+	else if (velocity_set == "D3Q19") {
+		double Mtemp[19][19] = {
+			//{  0   1   2   3   4   5   6  7   8  9 10 11 12 13 14 15 16 17 18},
+			  {  1,  1,  1,  1,  1,  1,  1, 1,  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1},
+			  {-30,-11,-11,-11,-11,-11,-11, 8,  8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8},
+			  { 12, -4, -4, -4, -4, -4, -4, 1,  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1},
+			  {  0,  1, -1,  0,  0,  0,  0, 1,  1,-1,-1, 1,-1, 1,-1, 0, 0, 0, 0},//ex
+			  {  0, -4,  4,  0,  0,  0,  0, 1,  1,-1,-1, 1,-1, 1,-1, 0, 0, 0, 0},
+			  {  0,  0,  0,  1, -1,  0,  0, 1, -1, 1,-1, 0, 0, 0, 0, 1, 1,-1,-1},//ey
+			  {  0,  0,  0, -4,  4,  0,  0, 1, -1, 1,-1, 0, 0, 0, 0, 1, 1,-1,-1},
+			  {  0,  0,  0,  0,  0,  1, -1, 0,  0, 0, 0, 1, 1,-1,-1, 1,-1, 1,-1},//ez
+			  {  0,  0,  0,  0,  0, -4,  4, 0,  0, 0, 0, 1, 1,-1,-1, 1,-1, 1,-1},
+			  {  0,  2,  2, -1, -1, -1, -1, 1,  1, 1, 1, 1, 1, 1, 1,-2,-2,-2,-2},
+			  {  0, -4, -4,  2,  2,  2,  2, 1,  1, 1, 1, 1, 1, 1, 1,-2,-2,-2,-2},
+			  {  0,  0,  0,  1,  1, -1, -1, 1,  1, 1, 1,-1,-1,-1,-1, 0, 0, 0, 0},
+			  {  0,  0,  0, -2, -2,  2,  2, 1,  1, 1, 1,-1,-1,-1,-1, 0, 0, 0, 0},
+			  {  0,  0,  0,  0,  0,  0,  0, 1, -1,-1, 1, 0, 0, 0, 0, 0, 0, 0, 0},
+			  {  0,  0,  0,  0,  0,  0,  0, 0,  0, 0, 0, 0, 0, 0, 0, 1,-1,-1, 1},
+			  {  0,  0,  0,  0,  0,  0,  0, 0,  0, 0, 0, 1,-1,-1, 1, 0, 0, 0, 0},
+			  {  0,  0,  0,  0,  0,  0,  0, 1,  1,-1,-1,-1, 1,-1, 1, 0, 0, 0, 0},
+			  {  0,  0,  0,  0,  0,  0,  0,-1,  1,-1, 1, 0, 0, 0, 0, 1, 1,-1,-1},
+			  {  0,  0,  0,  0,  0,  0,  0, 0,  0, 0, 0, 1, 1,-1,-1,-1, 1,-1, 1}
+		};
+
+		double F_diag[19] = { 19.0,2394.0,252.0,10.0,40.0,10.0,40.0,10.0,40.0,36.0,72.0,12.0,24.0,4.0,4.0,4.0,8.0,8.0,8.0 };
+		for (int i = 0; i < direction_size; i++) {
+			F_diag2[i] = F_diag[i];
+			for (int j = 0; j < direction_size; j++) {
+				Mtemp2[indexM(i, j, direction_size)] = Mtemp[i][j];
+			}
+		}
+	}
+	 
+	else if (velocity_set == "D3Q27") { //A D3Q27 multiple-relaxation-time lattice Boltzmann method for turbulent flows
+		double Mtemp[27][27] = {
+			{	1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1},
+		{0,1,0,-1,0,0,0,1,-1,-1,1,1,0,-1,0,1,0,-1,0,1,-1,-1,1,1,-1,-1,1},//ex
+		{0,0,1,0,-1,0,0,1,1,-1,-1,0,1,0,-1,0,1,0,-1,1,1,-1,-1,1,1,-1,-1},//ey
+		{0,0,0,0,0,1,-1,0,0,0,0,1,1,1,1,-1,-1,-1,-1,1,1,1,1,-1,-1,-1,-1},//ez
+		{-2,-1,-1,-1,-1,-1,-1,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1},
+		{0,2,-1,2,-1,-1,-1,1,1,1,1,1,-2,1,-2,1,-2,1,-2,0,0,0,0,0,0,0,0},
+		{0,0,1,0,1,-1,-1,1,1,1,1,-1,0,-1,0,-1,0,-1,0,0,0,0,0,0,0,0,0},
+		{0,0,0,0,0,0,0,1,-1,1,-1,0,0,0,0,0,0,0,0,1,-1,1,-1,1,-1,1,-1},
+{0,0,0,0,0,0,0,0,0,0,0,0,1,0,-1,0,-1,0,1,1,1,-1,-1,-1,-1,1,1},
+{0,0,0,0,0,0,0,0,0,0,0,1,0,-1,0,-1,0,1,0,1,-1,-1,1,-1,1,1,-1},
+{0,-4,0,4,0,0,0,-1,1,1,-1,-1,0,1,0,-1,0,1,0,2,-2,-2,2,2,-2,-2,2},
+{0,0,-4,0,4,0,0,-1,-1,1,1,0,-1,0,1,0,-1,0,1,2,2,-2,-2,2,2,-2,-2},
+{0,0,0,0,0,-4,4,0,0,0,0,-1,-1,-1,-1,1,1,1,1,2,2,2,2,-2,-2,-2,-2},
+{0,4,0,-4,0,0,0,-2,2,2,-2,-2,0,2,0,-2,0,2,0,1,-1,-1,1,1,-1,-1,1},
+{0,0,4,0,-4,0,0,-2,-2,2,2,0,-2,0,2,0,-2,0,2,1,1,-1,-1,1,1,-1,-1},
+{0,0,0,0,0,4,-4,0,0,0,0,-2,-2,-2,-2,2,2,2,2,1,1,1,1,-1,-1,-1,-1},
+{4,0,0,0,0,0,0,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,1,1,1,1,1,1,1,1},
+{-8,4,4,4,4,4,4,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,1,1,1,1,1,1,1,1},
+{0,-4,2,-4,2,2,2,1,1,1,1,1,-2,1,-2,1,-2,1,-2,0,0,0,0,0,0,0,0},
+{0,0,-2,0,-2,2,2,1,1,1,1,-1,0,-1,0,-1,0,-1,0,0,0,0,0,0,0,0,0},
+{0,0,0,0,0,0,0,-2,2,-2,2,0,0,0,0,0,0,0,0,1,-1,1,-1,1,-1,1,-1},
+{0,0,0,0,0,0,0,0,0,0,0,0,-2,0,2,0,2,0,-2,1,1,-1,-1,-1,-1,1,1},
+{0,0,0,0,0,0,0,0,0,0,0,-2,0,2,0,2,0,-2,0,1,-1,-1,1,-1,1,1,-1},
+{0,0,0,0,0,0,0,1,-1,-1,1,-1,0,1,0,-1,0,1,0,0,0,0,0,0,0,0,0},
+{0,0,0,0,0,0,0,-1,-1,1,1,0,1,0,-1,0,1,0,-1,0,0,0,0,0,0,0,0},
+{0,0,0,0,0,0,0,0,0,0,0,1,-1,1,-1,-1,1,-1,1,0,0,0,0,0,0,0,0},
+{0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,-1,1,-1,-1,1,-1,1}
+		};
+
+		double F_diag[27] = { 27.,18.,18,18,18,36,12,12,12,12,72,72,72,72,72,72,36,216,72,24,24,24,24,8,8,8,8 };
+		for (int i = 0; i < direction_size; i++) {
+			F_diag2[i] = F_diag[i];
+			for (int j = 0; j < direction_size; j++) {
+				Mtemp2[indexM(i, j, direction_size)] = Mtemp[i][j];
+			}
+		}
+
+	}
+		M_MRT = new double*[direction_size];
+		M_MRTI = new double*[direction_size];
+		MSM = new double*[direction_size];
+		for (int i = 0; i < direction_size; i++)
+		{
+			M_MRT[i] = new double[direction_size];
+			M_MRTI[i] = new double[direction_size];
+			MSM[i] = new double[direction_size];
+			for (int j = 0; j < direction_size; j++)
+			{
+
+				M_MRT[i][j] = Mtemp2[indexM(i, j, direction_size)];
+				
+			}
+		}
+		for (int j = 0; j < direction_size; j++)
+		{
+			for (int i = 0; i < direction_size; i++)
+			{
+				M_MRTI[j][i] = M_MRT[i][j] / F_diag2[i];
+			}
+		}
+	
+
+	calculate_MSM(tau);  
+}
+
+
+
+
+void LBM::calculate_MSM(double tau)
+{
+	double *Inv_MS = new double[direction_size*direction_size];
+	double *S_diag2 = new double[direction_size];
+
+	if (velocity_set == "D2Q9")
+	{
+		double S_diag[9] = { 1.64, 1.64, 1.54, 1.6, 1.9, 1.6, 1.9, 1., 1. };// !s0, ...s8, s8 = s7, s2 = 1.54, s4 = s6 = 1.9
+		S_diag[7] = 1.0 / tau;
+		S_diag[8] = S_diag[7];
+		for (int i = 0; i < direction_size; i++) {
+			S_diag2[i] = S_diag[i];
+		}
+		
+	}
+	else if (velocity_set == "D3Q15")
+	{
+		double S_diag[15] = { 0.0, 1.6,1.2,0.0,1.6,0.0,1.6,0.0,1.6, 1.0,1.0,1.0,1.0,1.0,1.2};
+		S_diag[9] = 1.0 / tau;
+		S_diag[10] = S_diag[9];
+		S_diag[11] = S_diag[9];
+		S_diag[12] = S_diag[9];
+		S_diag[13] = S_diag[9];
+		for (int i = 0; i < direction_size; i++) {
+			S_diag2[i] = S_diag[i];
+		}
+	}
+	else if (velocity_set == "D3Q19")
+	{
+		double S_diag[19] = { 0.0, 1.19,1.4,0.0,1.2,0.0,1.2,0.0,1.2,1.0,1.4,1.0,1.4,1.0,1.0,1.0,1.98,1.98,1.98 };
+		S_diag[9] = 1.0 / tau;
+		S_diag[11] = S_diag[9];
+		S_diag[13] = S_diag[9];
+		S_diag[14] = S_diag[9];
+		S_diag[15] = S_diag[9];
+		for (int i = 0; i < direction_size; i++) {
+			S_diag2[i] = S_diag[i];
+		}
+	}
+	else if (velocity_set == "D3Q27")
+	{
+		double s4, s5, s7, s10, s13, s16, s17, s18, s20, s23, s26;
+		s5= 1.0 / tau;
+		s7 = 1.0 / tau;
+		s4 = 1.54; s10 = 1.5; s13 = 1.83; s16 = 1.4; s17 = 1.61;
+		s18 = s20 = 1.98; s23 = s26 = 1.74;
+		double S_diag[27] = { 0, 0, 0, 0, s4, s5, s5, s7, s7, s7, s10, s10, s10, s13, s13, s13, s16, s17, s18, s18, s20, s20, s20, s23, s23, s23, s26 };
+
+		for (int i = 0; i < direction_size; i++) {
+			S_diag2[i] = S_diag[i];
+		}
+	}
+
+	
+
+	for (int i = 0; i < direction_size; i++)
+	{
+		for (int j = 0; j < direction_size; j++)
+		{
+			Inv_MS[indexM(i, j, direction_size)] = -M_MRTI[i][j] * S_diag2[j];
+		}
+	}
+	for (int j = 0; j < direction_size; j++)
+	{
+		for (int i = 0; i < direction_size; i++)
+		{
+			MSM[i][j] = 0.0;
+			for (int k = 0; k < direction_size; k++)
+			{
+				MSM[i][j] = MSM[i][j] + Inv_MS[indexM(i, k, direction_size)] * M_MRT[k][j];
+			}
+		}
+	}
+}
+
+void LBM::MRTcollision(int iLES, int xmin, int xmax, int ymin, int ymax, int zmin, int zmax)
+{
+	double tauinv = 1.0 / tau;
+	double omtauinv = 1.0 - tauinv;     // 1 - 1/tau
+	double* fneq = new double[direction_size];
+	double* feq = new double[direction_size];
+	double* fg = new double[direction_size];
+	double* colli = new double[direction_size];
+	if (iLES == 1) {
+		for (int x = xmin; x < xmax; x++) {
+			for (int y = ymin; y < ymax; y++) {
+				for (int z = zmin; z < zmax; z++) {
+					for (int i = 0; i < direction_size; i++) {
+						feq[i] = calculate_feq(x, y, z, i);
+						//fg[i] = calculate_fg(x, y, z, i, feq[i]);
+						fneq[i] = pdf[index(x, y, z, i)] - feq[i];
+					}
+					double p_ij = calculate_pij(fneq);
+					const double tau_t = 0.5 * (sqrt(tau * tau + 2 * sqrt(2) * c_s * c_s * p_ij / (c_s * c_s * c_s * c_s)) - tau);
+					const double omega = 1.0 / (tau + tau_t);
+					calculate_MSM(tau + tau_t);
+					for (int i = 0; i < direction_size; i++) {
+						colli[i] = 0.0;
+						for (int k = 0; k < direction_size; k++)
+						{
+							colli[i] = colli[i] + MSM[i][k] * fneq[k];
+						}
+						pdf2[index(x, y, z, i)] = pdf[index(x, y, z, i)] + colli[i] + fg[i];
+					}
+				}
+			}
+		}
+	}
+	else {
+		int y, z, i, k;
+//#pragma omp parallel for private(y, z, i, k)
+		for (int x = xmin; x < xmax; x++) {
+			for (int y = ymin; y < ymax; y++) {
+				for (int z = zmin; z < zmax; z++) {
+					
+					for (int i = 0; i < direction_size; i++) {
+						feq[i] = calculate_feq(x, y, z, i);
+						//fg[i] = calculate_fg(x, y, z, i, feq[i]);
+						fneq[i] = pdf[index(x, y, z, i)] - feq[i];
+					}
+					
+
+					for (int i = 0; i < direction_size; i++) {
+						colli[i] = 0.0;
+						for (int k = 0; k < direction_size; k++)
+						{
+							colli[i] = colli[i] + MSM[i][k] * fneq[k];
+						}
+						pdf2[index(x, y, z, i)] = pdf[index(x, y, z, i)] + colli[i];// +fg[i];
+					}
+				}
+			}
+		}
+	}
+	delete[]colli;
+	delete[]fneq;
+	delete[]feq;
+	delete[]fg;
+
+
+	//
+	//double* m_eq = new double[direction_size];
+	//double* Dm = new double[direction_size];
+	/*	for (int x = 0; x < NX; x++) {
+			for (int y = 0; y < NY; y++) {
+					D2Q9calculate_meq(x, y,  m_eq);
+					for (int i = 0; i < direction_size; i++)
+					{
+						mmt[i] = 0.0;
+						for (int k = 0; k < direction_size; k++)
+						{
+							mmt[i] = mmt[i] + Mm[i][k] * pdf[index(x, y, z, k)];
+						}
+					}
+					for (int i = 0; i < direction_size; i++)
+					{
+						Dm[i] = 0.0;
+						for (int k = 0; k < direction_size; k++)
+						{
+							Dm[i] = Dm[i] + Inv_MS[i][k] * (mmt[k] - m_eq[k]);
+						}
+					}
+					for (int i = 0; i < direction_size; i++)
+					{
+						pdf2[index(x, y, z, i)] = pdf[index(x, y, z, i)] + Dm[i];
+					}
+			}
+		}
+		*/
+}
+
+
+
+//	double S_diag[9] = { 1.0, 1.6, 1.5, 1.0, 1.2, 1.0, 1.2, 1., 1. };// !s0, ...s8, s8 = s7, s2 = 1.54, s4 = s6 = 1.9
+
+
+
+void LBM::D2Q9calculate_meq(int x, int y, double *m_eq) {
+	int z = 0;
+	double u_squ = vel[index(x, y, z)].x*vel[index(x, y, z)].x;
+	double v_squ = vel[index(x, y, z)].y*vel[index(x, y, z)].y;
+	double jx = vel[index(x, y, z)].x*rho[index(x, y, z)];
+	double jy = vel[index(x, y, z)].y*rho[index(x, y, z)];
+
+	m_eq[0] = rho[index(x, y, z)];
+	m_eq[1] = -2.0*rho[index(x, y, z)] + 3.0*(jx*jx + jy * jy) / rho[index(x, y, z)];//  !energy
+	m_eq[2] = rho[index(x, y, z)] - 3.0*(jx*jx + jy * jy) / rho[index(x, y, z)]; //  !energy square
+	m_eq[3] = jx; //!momentum in x - dir
+	m_eq[4] = -jx; //!energy flux in x - dir
+	m_eq[5] = jy; //!momentum in y - dir
+	m_eq[6] = -jy; //!energy flux in y - dir
+	m_eq[7] = (jx*jx - jy * jy) / rho[index(x, y, z)];// !diagonal comp of stress tensor
+	m_eq[8] = jx * jy / rho[index(x, y, z)]; // !off diagonal comp of stress tensor
+
+	/*double jx = rho_[n] * field_.u[n][0];
+	double jy = rho_[n] * field_.u[n][1];
+
+	mEq_[n][0] = rho_[n];
+	mEq_[n][1] = -2.0 * rho_[n] + 3.0 * (jx * jx + jy * jy);
+	mEq_[n][2] = rho_[n] - 3.0 * (jx * jx + jy * jy);
+	mEq_[n][3] = jx;
+	mEq_[n][4] = -jx;
+	mEq_[n][5] = jy;
+	mEq_[n][6] = -jy;
+	mEq_[n][7] = (jx * jx - jy * jy);
+	mEq_[n][8] = jx * jy;
+			S_eq(1) = 0.d0
+		c	S_eq(2) = 6.d0*(ux(i, j)*Fx(i, j) + uy(i, j)*Fy(i, j))
+		c	S_eq(3) = -S_eq(2)
+		c	S_eq(4) = Fx(i, j)
+		c	S_eq(5) = -Fx(i, j)
+		c	S_eq(6) = Fy(i, j)
+		c	S_eq(7) = -Fy(i, j)
+		c	S_eq(8) = 2.d0*(ux(i, j)*Fx(i, j) - uy(i, j)*Fy(i, j))
+		c	S_eq(9) = (ux(i, j)*Fy(i, j) + uy(i, j)*Fx(i, j))*/
+
+}
+
+/*	    MRTS1 = 1.19d0
+		MRTS2 = 1.4d0
+		MRTS4 = 1.2d0
+		MRTS9 = 1.d0 / tau
+		MRTS10 = 1.4d0
+		MRTS13 = MRTS9
+		MRTS16 = 1.98d0       !correct
+		*/
+
+
+
+
+void LBM::D3Q19calculate_meq(int x, int y, int z,  double *m_eq) {
+	double u_squ = vel[index(x, y, z)].x*vel[index(x, y, z)].x;
+	double v_squ = vel[index(x, y, z)].y*vel[index(x, y, z)].y;
+	double w_squ = vel[index(x, y, z)].z*vel[index(x, y, z)].z;
+/*	    we = 3.d0  !0.d0
+		wej = -11.d0 / 2.d0 !- 475.d0 / 63.d0 !
+		wxx = -0.5d0     !0.d0 !
+	    meq(2) = we * rho(x, y, z) + wej / density * (u_xsqu + u_ysqu + u_zsqu)
+		meq(10) = wxx * meq(9)  !!!!!
+		meq(11) = (u_ysqu - u_zsqu) / density
+		meq(12) = wxx * meq(11)*/
+
+	m_eq[0] = rho[index(x, y, z)];
+	m_eq[1] = (-11.0 * rho[index(x, y, z)] + 19.0 * (u_squ+ v_squ + w_squ)); //  /density
+	m_eq[2] = (-475.0 / 63.0) * (u_squ + v_squ + w_squ); 
+	m_eq[3] = vel[index(x, y, z)].x;
+	m_eq[4] = (-2.0 / 3.0) * vel[index(x, y, z)].x;
+	m_eq[5] = vel[index(x, y, z)].y;
+	m_eq[6] = (-2.0 / 3.0) * vel[index(x, y, z)].y;
+	m_eq[7] = vel[index(x, y, z)].z;
+	m_eq[8] = (-2.0 / 3.0) * vel[index(x, y, z)].z;
+	m_eq[9] = 2.0 * u_squ -( v_squ + w_squ);   //  / density
+	m_eq[10] = 0.0;       //wxx * meq(9)  !!!!!
+	m_eq[11] = (v_squ - w_squ);                 //  / density
+	m_eq[12] = 0.0;         //wxx * meq(11)
+	m_eq[13] = vel[index(x, y, z)].x * vel[index(x, y, z)].y;  //*density
+	m_eq[14] = vel[index(x, y, z)].y * vel[index(x, y, z)].z;  //*density
+	m_eq[15] = vel[index(x, y, z)].z * vel[index(x, y, z)].x;   //*density
+	m_eq[16] = 0.0;
+	m_eq[17] = 0.0;
+	m_eq[18] = 0.0;
+	
+}
+
+
+
diff --git a/CFD/LBMSolverOMP/src/bcs.cpp b/CFD/LBMSolverOMP/src/bcs.cpp
new file mode 100644
index 0000000..214e103
--- /dev/null
+++ b/CFD/LBMSolverOMP/src/bcs.cpp
@@ -0,0 +1,357 @@
+#include "LBMSolverOMP.hpp"
+#include "vector3.cpp"
+#include <iomanip>
+#include <iostream>
+
+
+void LBM::wall_bounce_back()
+{//  nonslip���棬bounce-backʵ���޻��Ʊ߽�����.
+	std::string ymin = BC.yminFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ���׼��
+	if (ymin == "nonslip") {
+		int y = 0;
+		for (int x = 0; x < NX; x++) {
+			for (int z = 0; z < NZ; z++) {
+				for (int i = 0; i < direction_size; i++) {
+  				 if (ei[i].y == 1) pdf[index(x, y, z, i)] = pdf[index(x, y, z, reverse_indexes[i])];
+				}
+			}
+		}
+	}
+	std::string ymax = BC.ymaxFace;
+	if (ymax == "nonslip") {
+		int y = NY-1;
+		for (int x = 0; x < NX; x++) {
+			for (int z = 0; z < NZ; z++) {
+				for (int i = 0; i < direction_size; i++) {
+				 if (ei[i].y == -1) pdf[index(x, y, z, i)] = pdf[index(x, y, z, reverse_indexes[i])];
+				}
+			}
+		}
+	}
+	// x direction
+	std::string xmin = BC.xminFace;
+	if (xmin == "nonslip") {
+		int x = 0;
+		for (int y = 0; y < NY; y++) {
+			for (int z = 0; z < NZ; z++) {
+				for (int i = 0; i < direction_size; i++) {
+					if (ei[i].x == 1) pdf[index(x, y, z, i)] = pdf[index(x, y, z, reverse_indexes[i])];
+				}
+			}
+		}
+	}
+	std::string xmax = BC.xmaxFace;
+	if (xmax == "nonslip") {
+		int x = NX - 1;
+		for (int y = 0; y < NY; y++) {
+			for (int z = 0; z < NZ; z++) {
+				for (int i = 0; i < direction_size; i++) {
+					if (ei[i].x == -1) pdf[index(x, y, z, i)] = pdf[index(x, y, z, reverse_indexes[i])];
+				}
+			}
+		}
+	}
+	// z direction
+	std::string zmin = BC.zminFace;
+	if (zmin == "nonslip") {
+		int z = 0;
+		for (int x = 0; x < NX; x++) {
+			for (int y = 0; y < NY; y++) {
+				for (int i = 0; i < direction_size; i++) {
+					if (ei[i].z == 1) pdf[index(x, y, z, i)] = pdf[index(x, y, z, reverse_indexes[i])];
+				}
+			}
+		}
+	}
+	std::string zmax = BC.zmaxFace;
+	if (zmax == "nonslip") {
+		int z = NZ - 1;
+		for (int x = 0; x < NX; x++) {
+			for (int y = 0; y < NY; y++) {
+				for (int i = 0; i < direction_size; i++) {
+					if (ei[i].z == -1) pdf[index(x, y, z, i)] = pdf[index(x, y, z, reverse_indexes[i])];
+				}
+			}
+		}
+	}
+
+}
+
+void LBM::velocity_boundary_condition()
+{
+	const double tauinv = 1.0 / tau;
+	const double omtauinv = 1.0 - tauinv;
+
+	std::string Astring = BC.xminFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ�׼��
+	if (Astring == "velocity") {
+		int x = 0;
+		for (int y = 0; y < NY; y++) {
+			for (int z = 0; z < NZ; z++) {
+				vel[index(x, y, z)].x = BC.vel_specified[0].x;
+				vel[index(x, y, z)].y = BC.vel_specified[0].y;
+				vel[index(x, y, z)].z = BC.vel_specified[0].z;
+				rho[index(x, y, z)] = rho[index(x+1, y, z)]; //rho �����������������(x+1, y, z)��ֵ����
+				for (int i = 0; i < direction_size; i++) {
+					double feq = calculate_feq(x, y, z, i);
+					double feq1 = calculate_feq(x+1, y, z, i);
+					pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x+1, y, z, i)] - feq1);
+					//��ƽ�ⲿ��(pdf2[index(x+1, y, z, i)] - feq1) �����������������(x+1, y, z)��ֵ����
+				}
+			}
+		}
+	}
+
+	Astring = BC.xmaxFace;
+	if (Astring == "velocity") {
+		int x = NX-1;
+		for (int y = 0; y < NY; y++) {
+			for (int z = 0; z < NZ; z++) {
+				vel[index(x, y, z)].x = BC.vel_specified[1].x;
+				vel[index(x, y, z)].y = BC.vel_specified[1].y;
+				vel[index(x, y, z)].z = BC.vel_specified[1].z;
+				rho[index(x, y, z)] = rho[index(x - 1, y, z)]; //rho �����������������(x-1, y, z)��ֵ����
+				for (int i = 0; i < direction_size; i++) {
+					double feq = calculate_feq(x, y, z, i);
+					double feq1 = calculate_feq(x - 1, y, z, i);
+					pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x - 1, y, z, i)] - feq1);
+					//��ƽ�ⲿ��(pdf2[index(x-1, y, z, i)] - feq1) �����������������(x-1, y, z)��ֵ����
+				}
+			}
+		}
+	}
+
+
+
+	Astring = BC.yminFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ�׼��
+	/*if (Astring == "velocity"&& BC.vel_specified[2].y == 0.0) {//�������棺�����ٶ� 
+		int y = 0;
+		for (int x = 0; x < NX; x++) {
+			for (int z = 0; z < NZ; z++) {
+				for (int i = 0; i < direction_size; i++) {
+					if (ei[i].y == 1) {
+						pdf[index(x, y, z, i)] = pdf2[index(x, y, z, reverse_indexes[i])] 
+							+ 2 * weights[i] / (c_s * c_s) *( ei[i].x * BC.vel_specified[2].x 
+								+ ei[i].z * BC.vel_specified[2].z);
+					}
+				}
+			}
+		}
+	}*/
+
+
+//���¸���������ϵ��ٶȣ����������ⷽ�򣨰�����ֱ�ڸ���Ľ����ٶȣ�Ҳ�����ǻ������棨ƽ�и�����ٶȣ���
+	if (Astring == "velocity") { 
+		int y = 0;
+		for (int x = 0; x < NX; x++) {
+			for (int z = 0; z < NZ; z++) {
+				vel[index(x, y, z)].x = BC.vel_specified[2].x;
+				vel[index(x, y, z)].y = BC.vel_specified[2].y;
+				vel[index(x, y, z)].z = BC.vel_specified[2].z;
+				rho[index(x, y, z)] = rho[index(x, y + 1, z)]; //rho �����������������(x, y+1, z)��ֵ����
+				for (int i = 0; i < direction_size; i++) {
+					double feq = calculate_feq(x, y, z, i);
+					double feq1 = calculate_feq(x, y + 1, z, i);
+	                pdf[index(x, y, z, i)] =feq +omtauinv * (pdf2[index(x, y+1, z, i)] - feq1) ;
+			//��ƽ�ⲿ��(pdf2[index(x, y+1, z, i)] - feq1) �����������������(x, y+1, z)��ֵ����
+				}
+			}
+		}
+	}
+
+	Astring = BC.ymaxFace;
+/*	if (Astring == "velocity"&& BC.vel_specified[3].y == 0.0) {
+		int y = NY - 1;
+		for (int x = 0; x < NX; x++) {
+			for (int z = 0; z < NZ; z++) {
+				for (int i = 0; i < direction_size; i++) {//�������棺�����ٶ� 
+					if (ei[i].y == -1) {
+						
+						pdf[index(x, y, z, i)] = pdf2[index(x, y, z, reverse_indexes[i])] 
+							+ 2 * weights[i] / (c_s * c_s) *(ei[i].x * BC.vel_specified[3].x
+								+ ei[i].z * BC.vel_specified[3].z);
+					}
+				}
+			}
+		}
+	}*/
+	if (Astring == "velocity") {
+		int y = NY-1;
+		for (int x = 0; x < NX; x++) {
+			for (int z = 0; z < NZ; z++) {
+				vel[index(x, y, z)].x = BC.vel_specified[3].x;
+				vel[index(x, y, z)].y = BC.vel_specified[3].y;
+				vel[index(x, y, z)].z = BC.vel_specified[3].z;
+				rho[index(x, y, z)] = rho[index(x, y - 1, z)]; //rho �����������������(x, y-1, z)��ֵ����
+				for (int i = 0; i < direction_size; i++) {
+					double feq = calculate_feq(x, y, z, i);
+					double feq1 = calculate_feq(x, y - 1, z, i);
+					pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x, y - 1, z, i)] - feq1);
+					//��ƽ�ⲿ��(pdf2[index(x, y+1, z, i)] - feq1) �����������������(x, y+1, z)��ֵ����
+				}
+			}
+		}
+	}
+
+	Astring = BC.zminFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ�׼��
+	if (Astring == "velocity") {
+		int z = 0;
+		for (int x = 0; x < NX; x++) {
+			for (int y = 0; y < NY; y++) {
+				vel[index(x, y, z)].x = BC.vel_specified[4].x;
+				vel[index(x, y, z)].y = BC.vel_specified[4].y;
+				vel[index(x, y, z)].z = BC.vel_specified[4].z;
+				rho[index(x, y, z)] = rho[index(x, y, z+1)]; //rho �����������������(x, y, z+1)��ֵ����
+				for (int i = 0; i < direction_size; i++) {
+					double feq = calculate_feq(x, y, z, i);
+					double feq1 = calculate_feq(x, y, z+1, i);
+					pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x, y, z+1, i)] - feq1);
+					//��ƽ�ⲿ��(pdf2[index(x, y, z+1, i)] - feq1) �����������������(x, y, z+1)��ֵ����
+				}
+			}
+		}
+	}
+
+	Astring = BC.zmaxFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ�׼��
+	if (Astring == "velocity") {
+		int z = NZ-1;
+		for (int x = 0; x < NX; x++) {
+			for (int y = 0; y < NY; y++) {
+				vel[index(x, y, z)].x = BC.vel_specified[5].x;
+				vel[index(x, y, z)].y = BC.vel_specified[5].y;
+				vel[index(x, y, z)].z = BC.vel_specified[5].z;
+				rho[index(x, y, z)] = rho[index(x, y, z - 1)]; //rho �����������������(x, y, z-1)��ֵ����
+				for (int i = 0; i < direction_size; i++) {
+					double feq = calculate_feq(x, y, z, i);
+					double feq1 = calculate_feq(x, y, z-1, i);
+					pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x, y, z - 1, i)] - feq1);
+					//��ƽ�ⲿ��(pdf2[index(x, y, z-1, i)] - feq1) �����������������(x, y, z-1)��ֵ����
+				}
+			}
+		}
+	}
+
+}
+
+
+
+void LBM::pressure_boundary_condition()
+{
+	const double tauinv = 1.0 / tau;
+	const double omtauinv = 1.0 - tauinv;
+
+	std::string Astring = BC.xminFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ�׼��
+	//���¸������ϵ�ѹǿ���ܶȣ�
+	if (Astring == "pressure") {
+		int x = 0;
+		for (int y = 0; y < NY; y++) {
+			for (int z = 0; z < NZ; z++) {
+				vel[index(x, y, z)].x = vel[index(x + 1, y, z)].x;//�ٶ������������������(x+1, y, z)��ֵ����
+				vel[index(x, y, z)].y = vel[index(x + 1, y, z)].y;
+				vel[index(x, y, z)].z = vel[index(x + 1, y, z)].z;
+				rho[index(x, y, z)] = BC.rho_specified[0]; 
+				for (int i = 0; i < direction_size; i++) {
+					double feq = calculate_feq(x, y, z, i);
+					double feq1 = calculate_feq(x + 1, y, z, i);
+					pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x + 1, y, z, i)] - feq1);
+					//��ƽ�ⲿ��(pdf2[index(x+1, y, z, i)] - feq1) �����������������(x+1, y, z)��ֵ����
+				}
+			}
+		}
+	}
+
+	Astring = BC.xmaxFace;
+	if (Astring == "pressure") {
+		int x = NX - 1;
+		for (int y = 0; y < NY; y++) {
+			for (int z = 0; z < NZ; z++) {
+				vel[index(x, y, z)].x = vel[index(x - 1, y, z)].x;
+				vel[index(x, y, z)].y = vel[index(x - 1, y, z)].y;
+				vel[index(x, y, z)].z = vel[index(x - 1, y, z)].z;
+				rho[index(x, y, z)] = BC.rho_specified[1]; 
+				for (int i = 0; i < direction_size; i++) {
+					double feq = calculate_feq(x, y, z, i);
+					double feq1 = calculate_feq(x - 1, y, z, i);
+					pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x - 1, y, z, i)] - feq1);
+					//��ƽ�ⲿ��(pdf2[index(x-1, y, z, i)] - feq1) �����������������(x-1, y, z)��ֵ����
+				}
+			}
+		}
+	}
+	
+	Astring = BC.yminFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ�׼��
+	if (Astring == "pressure") {
+		int y = 0;
+		for (int x = 0; x < NX; x++) {
+			for (int z = 0; z < NZ; z++) {
+				vel[index(x, y, z)].x = vel[index(x, y+1, z)].x;
+				vel[index(x, y, z)].y = vel[index(x, y+1, z)].y;
+				vel[index(x, y, z)].z = vel[index(x, y+1, z)].z;
+				rho[index(x, y, z)] = BC.rho_specified[2]; 
+				for (int i = 0; i < direction_size; i++) {
+					double feq = calculate_feq(x, y, z, i);
+					double feq1 = calculate_feq(x, y + 1, z, i);
+					pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x, y + 1, z, i)] - feq1);
+					//��ƽ�ⲿ��(pdf2[index(x, y+1, z, i)] - feq1) �����������������(x, y+1, z)��ֵ����
+				}
+			}
+		}
+	}
+
+	Astring = BC.ymaxFace;
+		if (Astring == "pressure") {
+		int y = NY - 1;
+		for (int x = 0; x < NX; x++) {
+			for (int z = 0; z < NZ; z++) {
+				vel[index(x, y, z)].x = vel[index(x, y - 1, z)].x;
+				vel[index(x, y, z)].y = vel[index(x, y - 1, z)].y;
+				vel[index(x, y, z)].z = vel[index(x, y - 1, z)].z;
+				rho[index(x, y, z)] = BC.rho_specified[3]; 
+				for (int i = 0; i < direction_size; i++) {
+					double feq = calculate_feq(x, y, z, i);
+					double feq1 = calculate_feq(x, y - 1, z, i);
+					pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x, y - 1, z, i)] - feq1);
+					//��ƽ�ⲿ��(pdf2[index(x, y+1, z, i)] - feq1) �����������������(x, y+1, z)��ֵ����
+				}
+			}
+		}
+	}
+
+	Astring = BC.zminFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ�׼��
+	if (Astring == "pressure") {
+		int z = 0;
+		for (int x = 0; x < NX; x++) {
+			for (int y = 0; y < NY; y++) {
+				vel[index(x, y, z)].x = vel[index(x, y, z+1)].x;
+				vel[index(x, y, z)].y = vel[index(x, y, z+1)].y;
+				vel[index(x, y, z)].z = vel[index(x, y, z+1)].z;
+				rho[index(x, y, z)] = BC.rho_specified[4]; 
+				for (int i = 0; i < direction_size; i++) {
+					double feq = calculate_feq(x, y, z, i);
+					double feq1 = calculate_feq(x, y, z + 1, i);
+					pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x, y, z + 1, i)] - feq1);
+					//��ƽ�ⲿ��(pdf2[index(x, y, z+1, i)] - feq1) �����������������(x, y, z+1)��ֵ����
+				}
+			}
+		}
+	}
+
+	Astring = BC.zmaxFace; //�ַ����鸳ֵ��string��Ϊ�ַ����Ƚ�׼��
+	if (Astring == "pressure") {
+		int z = NZ - 1;
+		for (int x = 0; x < NX; x++) {
+			for (int y = 0; y < NY; y++) {
+				vel[index(x, y, z)].x = vel[index(x, y, z - 1)].x; //�����������������(x, y, z - 1)��ֵ����
+				vel[index(x, y, z)].y = vel[index(x, y, z - 1)].y;
+				vel[index(x, y, z)].z = vel[index(x, y, z - 1)].z;
+				rho[index(x, y, z)] = BC.rho_specified[5]; 
+				for (int i = 0; i < direction_size; i++) {
+					double feq = calculate_feq(x, y, z, i);
+					double feq1 = calculate_feq(x, y, z - 1, i);
+					pdf[index(x, y, z, i)] = feq + omtauinv * (pdf2[index(x, y, z - 1, i)] - feq1);
+					//��ƽ�ⲿ��(pdf2[index(x, y, z-1, i)] - feq1) �����������������(x, y, z-1)��ֵ����
+				}
+			}
+		}
+	}
+
+}
diff --git a/CFD/LBMSolverOMP/src/bouzidi.cpp b/CFD/LBMSolverOMP/src/bouzidi.cpp
new file mode 100644
index 0000000..828f41f
--- /dev/null
+++ b/CFD/LBMSolverOMP/src/bouzidi.cpp
@@ -0,0 +1,73 @@
+#include "LBMSolverOMP.hpp"
+
+void  LBM::bouzidi(int num_node2, int *node2, double *delta, vector3<double> *force ) //Bouzidi ��ֵ���������׿ռ侫��
+{ // post-stream (after stream is performed)
+
+	force[0].x = 0.0; force[0].y = 0.0; force[0].z = 0.0;
+	for (int i = 0; i < num_node2; i++)
+	{
+		int j = node2[i];
+		int z = (int)floor((double)(j) / (double)(NX*NY));          //relocate 
+		int y = (int)floor((double)(j % (NX*NY)) / (double)(NX));
+		int x = (j) % (NX);
+//#pragma omp parallel for
+		for (int l = 0; l < direction_size; l++) //
+		{
+			if (delta[l+i*direction_size] >= 0.00001)
+			{
+				double q = delta[l + i * direction_size];
+				int ip = ei[l].x, jp = ei[l].y, kp = ei[l].z;
+				int m = reverse_indexes[l];
+
+				if (q < 0.5) {
+					int n1 = index(x + 1 * ip, y + 1 * jp, z + 1 * kp);
+					int n2 = index(x + 2 * ip, y + 2 * jp, z + 2 * kp);
+
+					if (obst[n2] == 0) {
+						pdf[index(x + ip, y + jp, z + kp, l)] = q * (1. + 2.*q)* pdf[index(x, y, z, m)]
+							+ (1. - 4.*q*q)* pdf[index(x + ip, y + jp, z + kp, m)] - q * (1. - 2.*q)*
+							pdf[index(x + 2 * ip, y + 2 * jp, z + 2 * kp, m)];
+					}
+					else
+					{//the following is seldem used ����һ���ò���
+						if (obst[n1] == 0)
+						{
+							pdf[index(x + ip, y + jp, z + kp, l)] = 2.* q * pdf[index(x, y, z, m)]
+								+ (1. - 2.* q) * pdf[index(x + ip, y + jp, z + kp, m)];
+						}
+						else
+						{
+							pdf[index(x + ip, y + jp, z + kp, l)] = pdf[index(x, y, z, m)];
+						}
+					}
+				}
+				else
+				{
+					int n2 = index(x + 2 * ip, y + 2 * jp, z + 2 * kp);
+					int n3 = index(x + 3 * ip, y + 3 * jp, z + 3 * kp);
+					if (obst[n3] == 0) {
+						pdf[index(x + ip, y + jp, z + kp, l)] = 1.0 / (q*(2.*q + 1.0)) *  pdf[index(x, y, z, m)]
+							+ (2.*q - 1.) / q * pdf[index(x + 2 * ip, y + 2 * jp, z + 2 * kp, l)] - (2.*q - 1.) /
+							(2.*q + 1.)* pdf[index(x + 3 * ip, y + 3 * jp, z + 3 * kp, l)];
+					}
+					else //the following is seldem used ����һ���ò���
+					{
+						if (obst[n2] == 0) {
+							pdf[index(x + ip, y + jp, z + kp, l)] = 1. / (2.* q)*pdf[index(x, y, z, m)] +
+								(2.*q - 1.) / (2.*q) *pdf[index(x + 2 * ip, y + 2 * jp, z + 2 * kp, l)];
+						}
+						else {
+							//the following is simple bounce back , seldem used
+							pdf[index(x + ip, y + jp, z + kp, l)] = pdf[index(x + ip, y + jp, z + kp, m)]; //just bounce - back 
+						}
+					}
+				}
+
+				force[0].x = force[0].x + ei[m].x * (pdf[index(x, y, z, m)] + pdf[index(x + ip, y + jp, z + kp, l)]);
+				force[0].y = force[0].y + ei[m].y * (pdf[index(x, y, z, m)] + pdf[index(x + ip, y + jp, z + kp, l)]);
+				force[0].z = force[0].z + ei[m].z * (pdf[index(x, y, z, m)] + pdf[index(x + ip, y + jp, z + kp, l)]);
+			}
+		}
+	}
+
+}	
diff --git a/CFD/LBMSolverOMP/src/collisionstream.cpp b/CFD/LBMSolverOMP/src/collisionstream.cpp
new file mode 100644
index 0000000..a662862
--- /dev/null
+++ b/CFD/LBMSolverOMP/src/collisionstream.cpp
@@ -0,0 +1,478 @@
+#include "LBMSolverOMP.hpp"
+#include "vector3.cpp"
+#include <iomanip>
+#include <cmath>
+//#include <mpi.h>
+/*LBM::LBM(int grid_size, std::string velocity_set, double m_c_s, double m_tau, std::string m_boundary_condition, double m_gamma_dot) : NX(grid_size),NY(grid_size),NZ(grid_size),
+        c_s(m_c_s), tau(m_tau), boundary_condition(m_boundary_condition), gamma_dot(m_gamma_dot), velocity_set(velocity_set) {
+	set_velocity_set(velocity_set);
+	initialise();
+}*/
+//�ƺ��ò�����ô��(��)���캯��������������캯��û�ã�����ɾ��
+LBM::LBM(int nx, int ny, int nz, std::string velocity_set, double m_c_s, double m_tau, vector3<double> m_gf, Boundary_Condition m_BC, vector3<double> m_vel0) : NX(nx), NY(ny), NZ(nz),
+        c_s(m_c_s), tau(m_tau), gf(m_gf),  BC(m_BC), velocity_set(velocity_set){
+	set_velocity_set(velocity_set);
+	initialise(m_vel0);
+}
+
+void LBM::initialise(vector3<double> vel0) {
+	int NumNodes = NX * NY * NZ;
+	int distributions_memo_size = NumNodes * direction_size;
+	lab = new int[NumNodes];
+	obst= new int[NumNodes]();   //initial obst
+	rho = new double[NumNodes];
+	vel = new vector3<double>[NumNodes];
+    pdf2 = new double[distributions_memo_size];
+	pdf = new double[distributions_memo_size];
+	for(int i = 0; i < NX * NY * NZ; i++) {
+		rho[i] = 1;
+		vel[i] = vel0;
+	}
+	int y, z;
+//#pragma omp parallel for private(y,z)
+	for(int x = 0; x < NX; x++) {
+		for(int y = 0; y < NY; y++) {
+			for(int z = 0; z < NZ; z++) {
+				for(int i = 0; i < direction_size; i++) {
+					pdf2[index(x, y, z, i)] =  weights[i];  //calculate_feq(x,y,z,i);//
+					pdf[index(x, y, z, i)] = weights[i];  // calculate_feq(x, y, z, i);
+				}
+			}
+		}
+	}
+}
+
+void LBM::calculate_feq2(int x, int y, int z, double *feq) {
+	//	double c_s_squ = 1.0 / 3.0;
+	double a=vel[index(x, y, z)].norm_square();
+//#pragma omp parallel for 
+	for (int i = 0; i < direction_size; i++) {
+		double dot_product = (double)vel[index(x, y, z)].x * (double)ei[i].x + (double)vel[index(x, y, z)].y * (double)ei[i].y +
+			(double)vel[index(x, y, z)].z * (double)ei[i].z;
+		feq[i] = weights[i] * rho[index(x, y, z)] * (1.0 + dot_product *3.0 
+			+ dot_product * dot_product*4.5 - a*1.5);
+	}
+	//return &feq;
+}
+
+double LBM::calculate_feq(int x, int y, int z, int i) {
+    double dot_product = (double)vel[index(x,y,z)].x * (double)ei[i].x + (double)vel[index(x,y,z)].y * (double)ei[i].y +
+                         (double)vel[index(x,y,z)].z * (double)ei[i].z;
+
+	double c_s_squ= 1.0/3.0;
+    double feq = weights[i] * rho[index(x,y,z)] * (1.0 + dot_product / (c_s * c_s) + dot_product * dot_product / (2 * c_s * c_s * c_s * c_s) - vel[index(x,y,z)].norm_square() / (2 * c_s * c_s));
+    return feq;
+}
+
+double LBM::calculate_feq(int x, int y, int z, int i, double u_le_x) {
+    double dot_product = (vel[index(x,y,z)].x + u_le_x) * ei[i].x + vel[index(x,y,z)].y * ei[i].y +
+                          vel[index(x,y,z)].z * ei[i].z;
+    double norm_square = (vel[index(x,y,z)].x + u_le_x) * (vel[index(x,y,z)].x + u_le_x) + vel[index(x,y,z)].y * ei[i].y +
+                          vel[index(x,y,z)].z * ei[i].z;
+
+	double feq = weights[i] * rho[index(x,y,z)] * (1.0 + dot_product / (c_s * c_s) + dot_product * dot_product / (2 * c_s * c_s * c_s * c_s) - norm_square / (2 * c_s * c_s));
+    return feq;
+}
+
+void LBM::calculate_fg(int x, int y, int z, double *feq, double *fg) {
+	for (int i = 0; i < direction_size; i++) {
+		double dot_product = gf.x * ((double)ei[i].x - (double)vel[index(x, y, z)].x) + gf.y * ((double)ei[i].y - (double)vel[index(x, y, z)].y) +
+			gf.z * ((double)ei[i].z - (double)vel[index(x, y, z)].z);
+//		double c_s_squ = 1.0 / 3.0;
+	fg[i] = (1.0 - 1.0 / (2 * tau)) *3.0 * dot_product * feq[i];
+	}
+}
+
+double LBM::calculate_fneq(int x, int y, int z, int i, double feq) {
+	double fneq = pdf[index(x, y, z, i)] - feq;
+	return fneq;
+}
+
+double LBM::calculate_pij(double *fneq) {
+	double p_xx = 0.0;
+	double p_yy = 0.0;
+	double p_zz = 0.0;
+	double p_xy = 0.0;
+	double p_yz = 0.0;
+	double p_zx = 0.0;
+	for (int i = 0; i < direction_size; i++) {
+		p_xx += (double)ei[i].x * (double)ei[i].x * fneq[i];
+		p_yy += (double)ei[i].y * (double)ei[i].y * fneq[i];
+		p_zz += (double)ei[i].z * (double)ei[i].z * fneq[i];
+		p_xy += (double)ei[i].x * (double)ei[i].y * fneq[i];
+		p_yz += (double)ei[i].y * (double)ei[i].z * fneq[i];
+		p_zx += (double)ei[i].z * (double)ei[i].x * fneq[i];
+	}
+	double p_ij = sqrt(p_xx * p_xx + p_yy * p_yy + p_zz * p_zz + 2 * p_xy * p_xy + 2 * p_zx * p_zx + 2 * p_yz * p_yz);
+	return p_ij;
+}
+
+
+void LBM::set_velocity_set(std::string velocity_set) {
+
+	if(velocity_set == "D3Q15") {
+//{ 0   1   2   3   4   5   6   7   8   9  10  11  12  13  14 },
+//{ 0,  1, -1,  0,  0 , 0 , 0 , 1, -1,  1 , -1, 1, -1,  1, -1 },
+//{ 0 , 0 , 0 , 1 ,-1 , 0 , 0 , 1 , 1 ,-1 ,-1 , 1 , 1 ,-1 ,-1 },
+//{ 0 , 0 , 0 , 0 , 0 , 1 ,-1 , 1 , 1 , 1 , 1 ,-1 ,-1 ,-1 ,-1 },
+		direction_size = 15;
+		send_direction_size = 5;
+	 	ei = new vector3<int>[15]{ {0,0,0},{1,0,0},{-1,0,0},{0,1,0},{0,-1,0},{0,0,1},{0,0,-1},
+		{1,1,1},{-1,1,1},{1,-1,1},{-1,-1,1},{1,1,-1},{-1,1,-1},{1,-1,-1},{-1,-1,-1} };
+		weights = new double[15] { 2.0/9.0, 1.0/9.0, 1.0/9.0, 1.0/9.0, 1.0/9.0, 1.0/9.0, 1.0/9.0,
+			1.0/72.0, 1.0/72.0, 1.0/72.0, 1.0/72.0, 1.0/72.0, 1.0/72.0, 1.0/72.0, 1.0/72.0  };
+	}else if(velocity_set=="D3Q19"){
+		direction_size=19;
+		send_direction_size=5;
+//		ei = new vector3<int>[19]{{0,0,0},{1,0,0},{-1,0,0},{0,1,0},{0,-1,0},{0,0,1},{0,0,-1},
+//			{1,1,0},{-1,-1,0},{1,0,1},{-1,0,-1},{0,1,1},{0,-1,-1},{1,-1,0},{-1,1,0},{1,0,-1},
+//			{-1,0,1},{0,1,-1},{0,-1,1}};
+		ei = new vector3<int>[19]{ {0,0,0},{1,0,0},{-1,0,0},{0,1,0},{0,-1,0},{0,0,1},{0,0,-1},
+			{1,1,0},{1,-1,0},{-1,1,0},{-1,-1,0},{1,0,1},{-1,0,1},{1,0,-1},{-1,0,-1},{0,1,1},
+			{0,1,-1},{0,-1,1},{0,-1,-1} };
+//		c   data ex / 1,-1, 0, 0, 0, 0, 1, 1,-1, -1, 1, -1, 1, -1, 0, 0,  0, 0 / ,
+//		c     &  ey / 0, 0, 1,-1, 0, 0, 1,-1, 1, -1, 0, 0,  0,  0, 1, 1, -1, -1 / ,
+//		c     &  ez / 0, 0, 0, 0, 1,-1, 0, 0, 0,  0, 1, 1, -1, -1, 1, -1, 1, -1 /
+		weights = new double[19]{1.0/3.0,1.0/18.0,1.0/18.0,1.0/18.0,
+			1.0/18.0,1.0/18.0,1.0/18.0,1.0/36.0,1.0/36.0,1.0/36.0,
+			1.0/36.0,1.0/36.0,1.0/36.0,1.0/36.0,1.0/36.0,1.0/36.0,
+			1.0/36.0,1.0/36.0,1.0/36.0};
+	}else if (velocity_set == "D3Q27") {
+		direction_size = 27;
+		send_direction_size = 9;
+		ei = new vector3<int>[27]{{0,0,0}, {1,0,0},{0,1,0},{-1,0,0},{0,-1,0},{0,0,1},{0,0,-1},
+		{1,1,0},{-1,1,0},{-1,-1,0},{1,-1,0},{1,0,1},{0,1,1},{-1,0,1},{0,-1,1},{1,0,-1},{0,1,-1},{-1,0,-1},{0,-1,-1},
+		{1,1,1},{-1,1,1},{-1,-1,1},{1,-1,1},{1,1,-1},{-1,1,-1},{-1,-1,-1},{1,-1,-1}};
+		weights = new double[27] {8.0/27.0,2.0/27.0,2.0/27.0,2.0/27.0,
+			2.0/27.0,2.0/27.0,2.0/27.0, 1.0/54.0,1.0/54.0,1.0/54.0
+		,1.0/54.0,1.0/54.0,1.0/54.0,1.0/54.0,1.0/54.0,1.0/54.0,
+	    1.0/54.0,1.0/54.0,1.0/54.0, 1.0/216.0, 1.0/216.0, 1.0/216.0, 1.0/216.0
+        ,1.0/216.0, 1.0/216.0, 1.0/216.0, 1.0/216.0};
+	} else if(velocity_set == "D2Q9") {
+	    direction_size = 9;
+		send_direction_size = 3;
+        ei = new vector3<int>[9]{ {0,0,0},{1,0,0},{0,1,0},{-1,0,0},{0,-1,0},{1,1,0},{-1,1,0},{-1,-1,0},{1,-1,0}};
+        weights = new double[9]{ 4.0 / 9.0,1.0/9.0,1.0/9.0,1.0/9.0,1.0/9.0,1.0/36.0,1.0/36.0,1.0/36.0,1.0/36.0};
+	}
+	lookup_reverse();
+
+}
+
+void LBM::lookup_reverse() {
+    reverse_indexes = new int[direction_size];
+    for(int i = 0; i < direction_size; i++) {
+        for(int j = 0; j < direction_size; j++) {
+            if(ei[i].x == -ei[j].x && ei[i].y == -ei[j].y && ei[i].z == -ei[j].z) {
+                reverse_indexes[i] = j;
+            }
+        }
+    }
+}
+
+LBM::~LBM() {
+	delete[] rho;
+	delete[] pdf;
+}
+
+void LBM::output_array(double* array) {
+	std::cout << "x,y,z value" << std::endl;
+	for(int x = 0; x < NX; x++) {
+		for(int y = 0; y < NY; y++) {
+			for(int z = 0; z < NZ; z++) {
+				std::cout << x << "," << y << "," << z << ": " << array[this->index(x,y,z)] << std::endl;
+			}
+		}
+	}
+}
+
+
+
+void LBM::output_velocity_profile_at_a_section() {
+    int z_index = 0;
+    for(int x = 0; x < NX; x++) {
+        for(int y = 0; y < NY; y++) {
+            std::cout << vel[index(x,y,z_index)].x << " ";
+        }
+        std::cout << std::endl;
+    }
+    std::cout << std::endl;
+}
+
+void LBM::set_velocity(int x_field, int y_field, int z_field, double u_x, double u_y, double u_z) {
+	vel[index(x_field, y_field, z_field)].x = u_x;
+	vel[index(x_field, y_field, z_field)].y = u_y;
+	vel[index(x_field, y_field, z_field)].z = u_z;
+
+	for (int i = 0; i < direction_size; i++) {
+		pdf2[index(x_field, y_field, z_field, i)] = calculate_feq(x_field, y_field, z_field, i);//
+		pdf[index(x_field, y_field, z_field, i)] = calculate_feq(x_field, y_field, z_field, i);
+	}
+}
+
+void LBM::set_density(int x_field, int y_field, int z_field, double density) {
+	rho[index(x_field,y_field,z_field)] = density;
+}
+
+
+void LBM::compute_density_momentum(int xmin, int xmax, int ymin, int ymax, int zmin, int zmax) {
+	int y ; int z ; int i;
+#pragma omp parallel for private(y,z,i)		
+	for (int x = xmin; x < xmax; x++) {
+		for (int y = ymin; y < ymax; y++) {
+			for (int z = zmin; z < zmax; z++) {
+				double new_density = 0;
+//				vector3<double> u;
+				double a=0.0, b=0.0, c=0.0;
+//#pragma omp parallel reduction(+:a,b,c) 
+				for(int i = 0; i < direction_size; i++) { 
+					new_density += pdf[index(x,y,z,i)];
+					a += pdf[index(x, y, z, i)] * ei[i].x;
+					b += pdf[index(x, y, z, i)] * ei[i].y;
+					c += pdf[index(x,y,z,i)] * ei[i].z;
+				}
+
+				rho[index(x,y,z)] = new_density;
+				vel[index(x,y,z)].x = (a + 0.5 * gf.x) / new_density;
+				vel[index(x,y,z)].y = (b + 0.5 * gf.y) / new_density;
+				vel[index(x,y,z)].z = (c + 0.5 * gf.z) / new_density;
+			}
+		}
+	}
+}
+
+void LBM::stream() {
+	int y, z ,i;
+#pragma omp parallel for //private(y,z,i)
+    for(int x = 0; x < NX; x++) {
+        for(int y = 0; y < NY; y++) {
+            for(int z = 0; z < NZ; z++) {
+                for(int i = 0; i < direction_size; i++) {
+                    //��ȱʡ�������Ե�
+                        int xmd = (NX + x - (int)ei[i].x) % NX;
+                        int ymd = (NY + y - (int)ei[i].y) % NY;
+                        int zmd = (NZ + z - (int)ei[i].z) % NZ;
+                        pdf[index(x,y,z,i)] = pdf2[index(xmd,ymd,zmd,i)];
+                }
+            }
+        }
+    }
+}
+
+
+
+void LBM::output_indices_file() {
+    std::ofstream output("output/indices.csv");
+    output << "x,y,z" << '\n';
+    for(int i = 0; i < NX; i++) {
+        for(int j = 0; j < NY; j++) {
+            for(int k = 0; k < NZ; k++) {
+                output << i << "," << j << "," << k << '\n';
+            }
+        }
+    }
+    std::cout << std::endl;
+    output.close();
+}
+
+void LBM::collision_zip(int MRT, int BF, int LES,int xmin, int xmax, int ymin, int ymax, int zmin, int zmax)
+{
+	if (LES == 0 && BF == 0 && MRT == 0)  collision(xmin, xmax, ymin, ymax, zmin, zmax);
+	if (LES == 0 && BF == 1 && MRT == 0) collision_BF(xmin, xmax, ymin, ymax, zmin, zmax);
+	if (LES == 1) collision_LES(xmin, xmax, ymin, ymax, zmin, zmax);
+
+	if (MRT == 1) MRTcollision(LES, xmin, xmax, ymin, ymax, zmin, zmax);
+}
+
+
+void LBM::collision(int xmin, int xmax, int ymin, int ymax, int zmin, int zmax) {//Performs the collision step. //����collisionִ�з�Χ 12.17
+	double tauinv = 1.0 / tau;
+	double omtauinv = 1.0-tauinv;     // 1 - 1/tau
+	
+	double *feq = new double[direction_size]();
+	
+//firstprivate(feq,fg)//ordered //flush(feq,fg)//schedule(dynamic) //#pragma omp flush(a,b)  //firstprivate(feq)//schedule(dynamic)
+	int i,j,y, z;
+	double temp;
+//#pragma omp parallel for ordered//private(i, feq)
+#pragma omp parallel  for //private(j,i)
+	for(int x = xmin; x < xmax; x++) {
+		for(int y = ymin; y < ymax; y++) {
+			for(int z = zmin; z < zmax; z++) {
+//					calculate_feq2(x, y, z, feq);
+									double a = vel[index(x, y, z)].norm_square();
+
+									for (int i = 0; i < direction_size; i++) {
+										double dot_product = (double)vel[index(x, y, z)].x * (double)ei[i].x + (double)vel[index(x, y, z)].y * (double)ei[i].y +
+											(double)vel[index(x, y, z)].z * (double)ei[i].z;
+										feq[i] = weights[i] * rho[index(x, y, z)] * (1.0 + dot_product * 3.0
+											+ dot_product * dot_product*4.5 - a * 1.5);
+										pdf2[index(x, y, z, i)] = omtauinv * pdf[index(x, y, z, i)] + tauinv * feq[i];
+									}
+				
+//					for (int j = 0; j < direction_size; j++) {
+//						pdf2[index(x, y, z, j)] = omtauinv * pdf[index(x, y, z, j)] + tauinv * feq[j];
+//					}
+				
+			}
+		}
+	}
+	delete[]feq;
+}
+
+void LBM::collision_BF(int xmin, int xmax, int ymin, int ymax, int zmin, int zmax) {//includes body force
+	double tauinv = 1.0 / tau;
+	double omtauinv = 1.0 - tauinv;     // 1 - 1/tau
+	double* fg = new double[direction_size]();
+	double *feq = new double[direction_size]();
+//#pragma omp parallel for
+	for (int x = xmin; x < xmax; x++) {
+		for (int y = ymin; y < ymax; y++) {
+			for (int z = zmin; z < zmax; z++) {
+				calculate_feq2(x, y, z, feq);
+				calculate_fg(x, y, z, feq, fg);
+
+				for (int i = 0; i < direction_size; i++) {
+					pdf2[index(x, y, z, i)] = omtauinv * pdf[index(x, y, z, i)] + tauinv * feq[i] + fg[i];
+				}
+			}
+		}
+	}
+	delete[]feq;
+	delete[]fg;
+}
+
+void LBM::collision_LES(int xmin, int xmax, int ymin, int ymax, int zmin, int zmax) {//includes LES SGS model, now "tau" is local
+	double* fg = new double[direction_size]();
+	double *feq = new double[direction_size]();
+	double* fneq = new double[direction_size];
+
+//#pragma omp for
+	for (int x = xmin; x < xmax; x++) {
+		for (int y = ymin; y < ymax; y++) {
+			for (int z = zmin; z < zmax; z++) {
+				calculate_feq2(x, y, z, feq);
+				calculate_fg(x, y, z, feq, fg);
+				int i = 0;
+//#pragma omp parallel private(i)
+				for (i = 0; i < direction_size; i++) {
+					fneq[i] = calculate_fneq(x, y, z, i, feq[i]);
+				}
+				double p_ij = calculate_pij(fneq);
+				const double tau_t = 0.5 * (sqrt(tau * tau + 2 * sqrt(2) * c_s * c_s * p_ij / ( c_s * c_s * c_s * c_s)) - tau);
+				const double omega = 1.0 / (tau + tau_t);
+				for (int i = 0; i < direction_size; i++) {
+					pdf2[index(x, y, z, i)] = (1.0- omega) * pdf[index(x, y, z, i)] + omega * feq[i] + fg[i];
+				}
+			}
+		}
+	}
+	delete[]feq;
+	delete[]fneq;
+	delete[]fg;
+}
+
+
+int LBM::get_time() {return time;}
+
+
+void LBM::perform_timestep(int MRT, int BF, int LES) {
+    time++;
+	compute_density_momentum(0, NX, 0, NY, 0, NZ);
+	
+	collision_zip(MRT, BF, LES, 0, NX, 0, NY, 0, NZ);
+//	mpi_send();
+	stream();
+	//bouzidi(num_node2, node2, delta, force);//
+	wall_bounce_back(); 	 //����ƽֱ�����޻��ƣ�simple bounce-back��
+	velocity_boundary_condition();  //�ٶȱ߽�����
+	pressure_boundary_condition();  //ѹ���߽�����
+}
+
+
+
+
+void LBM::output_all_fi(std::string filename) {
+	std::ofstream output_stream;
+	output_stream.open(filename, std::ofstream::out);
+	for (int x = 0; x < NX; x++) {
+		for (int y = 0; y < NY; y++) {
+			for (int z = 0; z < NZ; z++) {
+				for (int i = 0; i < direction_size; i++) {
+					output_stream << pdf[index(x, y, z, i)]<<" ";
+				}
+			}
+		}
+	}	 
+	output_stream.close();
+}
+
+
+void LBM::output_tecplot(std::string filename, bool header) {
+	std::ofstream output_stream;
+  output_stream.open (filename, std::ofstream::out );
+  //����ʱ��option��	| std::ofstream::app���� app׷���ļ�������ΪĬ�ϸ���
+	if(header) {
+		output_stream << "variables = x, y, z, rho, u, v, w" << '\n'; //, psi, psi1
+		output_stream << "zone i="<<NX<< ",j="<<NY<<", k="<<NZ<<", f=point" << '\n';
+	}
+	double *psi,*psi1 ;
+	psi = new double[NX*NY];
+	psi1 = new double[NX*NY];
+	if (0 == 1) {
+		int z = 0;
+		for (int x = 0; x < NX; x++) {
+			psi[index(x, 0, 0)] = 0.0;
+			for (int y = 1; y < NY; y++) {
+				psi[index(x, y, z)] = psi[index(x, y - 1, z)] + 0.5*(vel[index(x, y - 1, z)].x + vel[index(x, y, z)].x);
+			}
+		}
+		for (int y = 0; y < NY; y++) {
+			psi1[index(0, y, 0)] = 0.0;
+			for (int x = 1; x < NX; x++) {
+				psi1[index(x, y, z)] = psi1[index(x - 1, y, z)] + 0.5*(vel[index(x - 1, y, z)].y + vel[index(x, y, z)].y);
+			}
+		}
+	}
+		for (int z = 0; z < NZ; z++) {
+			for(int y = 0; y < NY; y++) {
+		     	for (int x = 0; x < NX; x++) {
+					output_stream << x << " " << y << " " << z << " " <<
+						rho[this->index(x, y, z)] << " " <<
+						vel[this->index(x, y, z)].x << " " <<
+						vel[this->index(x, y, z)].y << " " <<
+						vel[this->index(x, y, z)].z << " " << '\n';
+			//		psi[this->index(x, y, z)] << " " <<-psi1[this->index(x, y, z)] <<'\n';
+			}
+		}
+	}
+	output_stream.close();
+}
+
+void LBM::output_history(std::string filename, bool header, int i, vector3<double> *force) {
+	std::ofstream output_stream;
+	output_stream.open(filename, std::ofstream::app);
+	//����ʱ��option��	| std::ofstream::app���� app׷���ļ�������ΪĬ�ϸ���
+	if (header) {
+		output_stream << i << "  " << force[0].x << "  " << force[0].y << "  " << force[0].z << '\n';
+	}
+	output_stream.close();
+}
+
+
+//
+//void LBM::setNX(int a) {
+//	NX = a;
+//}
+//int LBM::getNX() {
+//	return NX;
+//}
+
+int LBM::getdirs() {
+		return send_direction_size;
+}
+int LBM::getalldirs() {
+	return direction_size;
+}
+vector3<int>* LBM::get_ei() {
+	return ei;
+}
\ No newline at end of file
diff --git a/CFD/LBMSolverOMP/src/exchange.cpp b/CFD/LBMSolverOMP/src/exchange.cpp
new file mode 100644
index 0000000..a7c990c
--- /dev/null
+++ b/CFD/LBMSolverOMP/src/exchange.cpp
@@ -0,0 +1,217 @@
+#include "LBMSolverOMP.hpp"
+#include "vector3.cpp"
+#include <iomanip>
+#include <cmath>
+//#include <mpi.h>
+
+void LBM::init_border(int *Low, int Fdimx, int Fdimy, int Fdimz, int &num, int *border, int *border_dir) // in solver (C)
+{  //function: ��ʼ����¼���������ס�����Ե�������
+	int dirs =  send_direction_size;
+	int m ;
+
+	int Zmin = Low[2];
+	int Zmax = Low[2] + Fdimz - 1;  //general 3D
+	if (dirs == 3) { Zmin = -1; Zmax = 1; } //specifically for D2Q9 ! possible bug
+
+	for (int x = 0; x < NX; x++) {
+		for (int y = 0; y < NY; y++) {
+			for (int z = 0; z < NZ; z++) {
+				lab[index(x, y, z)] = 0;
+				if (x > Low[0] &&  x<Low[0] + Fdimx-1 && y>Low[1] &&  y < Low[1] + Fdimy-1
+					&& z>Zmin &&  z < Zmax) 
+				{	lab[index(x, y, z)] = 1;
+				}			
+			}
+		}
+	}
+	std::cout << "Lower Left corner("<<Low[0] << ", " << Low[1] << " ," << Low[2]  <<")"<< '\n';
+	std::cout << Fdimx << " " << Fdimy << " " << Fdimz << '\n';
+	m = 0; //initialize m
+	for (int x = 0; x < NX; x++) {
+		for (int y = 0; y < NY; y++) {
+			for (int z = 0; z < NZ; z++) {
+				int count = 0; //initialize direction count
+				for (int k = 0; k < direction_size; k++) {
+					int xmd = (NX + x + ei[k].x) % NX;
+					int ymd = (NY + y + ei[k].y) % NY;
+					int zmd = (NZ + z + ei[k].z) % NZ;
+					if (lab[index(x, y, z)] == 0 &&
+						lab[index(xmd, ymd, zmd)] == 1) {
+						border[m] = index(x, y, z); //record border node index��¼���������ס�����Ե�������
+						border_dir[m*dirs + count] = k;//record associated directions��¼������ķ���
+//						std::cout << x <<" " <<y << " " <<z << " " <<k  << '\n';
+						count++;
+					}
+				}
+				if (count > 0) m++;
+			}
+		}
+	}
+	num = m ;  //actual border_node_number
+		
+}
+
+
+
+void LBM::exchange(int id, int border_node_num, int *border, int *border_dir, double *f_border_all_dir, double *f_border_dir, int *Low, int *NN)
+{
+	int dirs = send_direction_size;
+	double temp = 0.0;
+	
+	if (id == 1) {// fetch data from coarse mesh, perform inside solver
+
+		for (int m = 0; m < border_node_num; m++) {
+			
+			/*			for (int k = 0; k < dirs; k++) {
+				int i = border_dir[m*dirs + k];
+				if ( i!= 0) {
+					f_border_dir[dirs*m + k] = pdf2[border[m] + i * NX * NY * NZ];
+				}
+			}*/
+		   for (int k = 0; k < direction_size; k++) {
+				f_border_all_dir[direction_size*m + k] = pdf2[border[m] + k * NX * NY * NZ];
+		}
+
+		}
+	}
+
+	
+	if (id == 3) { //trasfer data from Coarse to Fine , perform inside solver2 (fine mesh), 
+		for (int m = 0; m < border_node_num; m++) {
+			int z = (int)floor((double)(border[m]) / (double)((NN[0])*(NN[1])));          //relocate grobal location in coarse mesh
+			int y = (int)floor((double)((border[m]) % ((NN[0])*(NN[1]))) / (double)(NN[0]));
+			int x = (border[m]) % (NN[0]);
+			int x2 = 2 * (x - Low[0]);
+			int y2 = 2 * (y - Low[1]);
+			int z2 = 2 * (z - Low[2]);
+			int z2p = z2 + 1;
+			if (dirs == 3) z2p = z2;//D2Q9 model
+/*		for (int k = 0; k < dirs; k++) {
+				int i = border_dir[m*dirs + k];
+				if(i!=0){
+				{			
+				temp = f_border_dir[m*dirs + k]; 
+			pdf2[index(x2,     y2,    z2, i)] = temp;
+			pdf2[index(x2 + 1, y2,    z2, i)] = temp;
+			pdf2[index(x2,    y2 + 1, z2, i)] = temp;
+			pdf2[index(x2,    y2,     z2p, i)] = temp;
+			pdf2[index(x2 + 1, y2 + 1, z2, i)] = temp;
+			pdf2[index(x2 + 1, y2,    z2p, i)] = temp;
+			pdf2[index(x2,    y2 + 1, z2p, i)] = temp;
+			pdf2[index(x2 + 1,y2 + 1, z2p, i)] = temp;
+		}
+	}
+}*/
+					for (int k = 0; k < direction_size; k++) {
+					{
+						temp = f_border_all_dir[m*direction_size + k];  
+						pdf2[index(x2,  y2,  z2,   k)] = temp;
+						pdf2[index(x2+1,y2,  z2,   k)] = temp;
+						pdf2[index(x2,  y2+1,z2,   k)] = temp;
+						pdf2[index(x2,  y2,  z2p,  k)] = temp;
+						pdf2[index(x2+1,y2+1,z2,   k)] = temp;
+						pdf2[index(x2+1, y2, z2p,  k)] = temp;
+						pdf2[index(x2,  y2+1,z2p,  k)] = temp;
+						pdf2[index(x2+1,y2+1, z2p, k)] = temp;
+					}
+				}
+			}
+		}
+
+	
+	//----------------------------------------------------------------------------------------
+	if (id == 2) {// fetch data from fine mesh��perform inside fine mesh
+		for (int m = 0; m < border_node_num; m++) {
+			int z = (int)floor((double)(border[m]) / (double)((NN[0])*(NN[1])));          //relocate grobal location in coarse mesh
+			int y = (int)floor((double)((border[m]) % ((NN[0])*(NN[1]))) / (double)(NN[0]));
+			int x = (border[m]) % (NN[0]);
+			
+			for (int k = 0; k < dirs; k++) {
+				int re_dir = reverse_indexes[border_dir[dirs*m + k]]; //������
+				
+				if (re_dir != 0) {
+					int x2 = 2 * (x - Low[0]);
+					int y2 = 2 * (y - Low[1]);
+					int z2 = 2 * (z - Low[2]);
+					int z2p = z2 + 1;
+					if (dirs == 3) z2p = z2;//D2Q9 model
+					temp = pdf[index(x2, y2, z2, re_dir)] + pdf[index(x2 + 1, y2, z2, re_dir)] + pdf[index(x2, y2 + 1, z2, re_dir)];
+					temp += pdf[index(x2, y2, z2p, re_dir)] + pdf[index(x2 + 1, y2 + 1, z2, re_dir)] + pdf[index(x2, y2 + 1, z2p, re_dir)];
+					temp += pdf[index(x2 + 1, y2, z2p, re_dir)] + pdf[index(x2 + 1, y2 + 1, z2p, re_dir)];
+					temp = temp / 8.0;
+					f_border_dir[dirs*m + k] = temp;
+				}
+				
+			}
+		}
+		
+	}
+
+
+	if (id == 4) {
+		// trandfer data from fine to coarse, perform inside Coarse mesh
+		for (int m = 0; m < border_node_num; m++) {
+			for (int k = 0; k < dirs; k++) {
+				int re_dir = reverse_indexes[border_dir[dirs*m + k]]; //������
+				if (re_dir != 0) { pdf[border[m] + re_dir * NX * NY * NZ] = f_border_dir[dirs*m + k]; }
+			}
+		}
+	}
+
+}
+
+
+
+
+inline int indexa(int x, int y, int z, int NX, int NY) {
+	return (z * NX * NY) + (y * NX) + x;
+}
+
+void LBM::copy_data(int id, vector3<double>*vels,double *rhos, int *Low, int *NN)
+{
+	if (id == 1) { //copy data from fine to coarse
+		if (NN[2] == 1) //����NZ2=0
+		{
+			for (int x = 1; x < NN[0] / 2 - 1; x++) {
+				for (int y = 1; y < NN[1] / 2 - 1; y++) {
+						vel[index(Low[0] + x, Low[1] + y, Low[2])] = vels[indexa(x, y, 0, NN[0] / 2, NN[1] / 2)];
+						rho[index(Low[0] + x, Low[1] + y, Low[2])] = rhos[indexa(x, y, 0, NN[0] / 2, NN[1] / 2)];
+					}
+				}
+		}
+		else {
+			for (int x = 1; x < NN[0] / 2 - 1; x++) {
+				for (int y = 1; y < NN[1] / 2 - 1; y++) {
+					for (int z = 1; z < NN[2] / 2 - 1; z++) {
+						vel[index(Low[0] + x, Low[1] + y, Low[2] + z)] = vels[indexa(x, y, z, NN[0] / 2, NN[1] / 2)];
+						rho[index(Low[0] + x, Low[1] + y, Low[2] + z)] = rhos[indexa(x, y, z, NN[0] / 2, NN[1] / 2)];
+					}
+				}
+			}
+		}
+	
+	}
+	else {  //id==2    //get data from fine mesh
+		for (int x = 0; x < NN[0]; x=x+2) {
+			for (int y = 0; y < NN[1]; y=y+2) {
+				for (int z = 0; z < NN[2]; z=z+2) {
+					int zp = (z + 1)%NN[2];
+					vels[indexa(x / 2, y / 2, z / 2, NN[0] / 2, NN[1] / 2)] = (vel[index(x, y, z)] + vel[index(x + 1, y, z)]
+					+vel[index(x, y+1, z)] + vel[index(x, y, zp)]+vel[index(x+1, y+1, z)] + vel[index(x +1, y, zp)]
+					+ vel[index(x, y+1, zp)] + vel[index(x + 1, y+1, zp)])/8.0;
+				
+					rhos[indexa(x /2, y /2, z /2, NN[0]/2,NN[1]/2)] = (rho[index(x, y, z)] + rho[index(x + 1, y, z)]
+					+ rho[index(x, y + 1, z)] + rho[index(x, y, zp)] + rho[index(x + 1, y + 1, z)] + rho[index(x + 1, y, zp)]
+					+ rho[index(x, y + 1, zp)] + rho[index(x + 1, y + 1, zp)]) / 8.0;
+				}
+			}
+		}
+		
+
+
+
+	}
+
+
+
+}
\ No newline at end of file
diff --git a/CFD/LBMSolverOMP/src/read.cpp b/CFD/LBMSolverOMP/src/read.cpp
new file mode 100644
index 0000000..414bc1e
--- /dev/null
+++ b/CFD/LBMSolverOMP/src/read.cpp
@@ -0,0 +1,217 @@
+#include <stdio.h>
+#include <stdlib.h>
+#include <iostream>
+#include <fstream>
+#include <string>
+#include <vector>
+#include <iomanip>
+#include "LBMSolverOMP.hpp"
+using namespace std;
+//******************************************
+// R E A D   P A R A M S (simulation parameters)
+//
+//  - Read the problem parameters from a file.
+//
+
+void read_params(Params_Pakage* p)
+{	char buffer[256];
+    std::string A;  //�ַ���
+	vector3<double> aa;
+	double rho_specified;
+	ifstream infile(p->in);   //�����ļ�
+	ofstream outfile(p->out);  //����ļ�	
+
+	if (!infile) {
+		cout << "Unable to open input file";
+		exit(1); // terminate with error
+
+	}
+	if (!outfile) {
+		cout << "Unable to open output file";
+		exit(1); // terminate with error
+
+	}
+	//	sscanf_s(tokenstring, "%s", s, _countof(s));
+	//	sscanf_s(tokenstring, "%c", &c, sizeof(char));
+
+	while (!infile.eof()) //���ж�������� ���ļ�������Ϊ��־�����ļ������һ�пհ��л�һ��δԤ�����ݣ��������ܻ�������
+	{
+		infile.getline(buffer, 100);  //�����־�Ƿ����㣬��Ϊ1����Ϊ0������������������������ļ���
+		sscanf_s(buffer, "%d", &p->MRT );
+		infile.getline(buffer, 120);  //�����־�Ƿ����㣬��Ϊ1����Ϊ0������������������������ļ���
+		sscanf_s(buffer, "%d", &p->CONTI);
+		if(p->CONTI==1) sscanf_s(buffer, "%s", &p->conti_file, (unsigned int)sizeof(p->conti_file));
+		infile.getline(buffer, 100);  //�����־�Ƿ����ģ�⣬��Ϊ1����Ϊ0
+		sscanf_s(buffer, "%d", &p->LES);
+		infile.getline(buffer, 120);  //�����־�Ƿ���Ҫ���븴���������壬��Ϊ1����Ϊ0����Ҫ���������ͼ��tecplot�����ļ���
+		sscanf_s(buffer, "%d", &p->GEO);
+		if (p->GEO == 1) sscanf_s(buffer, "%s", &p->geo_file, (unsigned int)sizeof(p->geo_file));
+		infile.getline(buffer, 100);  //�����־�Ƿ���������Ϊ1����Ϊ0
+		sscanf_s(buffer, "%d", &p->MB);
+		infile.getline(buffer, 100);  //�����־�Ƿ���Ҫ�����оݣ���Ϊ1����Ϊ0������Ҫ���������������ֵ
+		sscanf_s(buffer, "%d", &p->CONV);
+		if (p->CONV == 1) sscanf_s(buffer, "%lf", &p->conv_v);
+
+		infile.getline(buffer, 100);  //��������� X ����������
+		sscanf_s(buffer, "%d", &p->LX);
+		infile.getline(buffer, 100);  //������ Y ����������
+		sscanf_s(buffer, "%d", &p->LY);
+		infile.getline(buffer, 100);  //������ Z ����������
+		sscanf_s(buffer, "%d", &p->LZ);
+		infile.getline(buffer, 100);  //ÿ�����ٲ����һ���ļ�
+		sscanf_s(buffer, "%d", &p->LX2);
+		infile.getline(buffer, 100);  //������ Y ����������
+		sscanf_s(buffer, "%d", &p->LY2);
+		infile.getline(buffer, 100);  //������ Z ����������
+		sscanf_s(buffer, "%d", &p->LZ2);
+		infile.getline(buffer, 100);  //ÿ�����ٲ����һ���ļ�
+		sscanf_s(buffer, "%d", &p->LowX);
+		infile.getline(buffer, 100);  //������ Y ����������
+		sscanf_s(buffer, "%d", &p->LowY);
+		infile.getline(buffer, 100);  //������ Z ����������
+		sscanf_s(buffer, "%d", &p->LowZ);
+		infile.getline(buffer, 100);  //ÿ�����ٲ����һ���ļ�
+
+		sscanf_s(buffer, "%d", &p->FrameRate);
+		infile.getline(buffer, 100);  //�ܹ����ٲ���ֹ����
+		sscanf_s(buffer, "%d", &p->ttstep);
+		infile.getline(buffer, 100);  //��ʼ�ܶ�
+		sscanf_s(buffer, "%lf", &p->density0);
+		infile.getline(buffer, 100);  //�ɳ����ӣ����˶�ճ�Թ�ϵ:\nu=c_s^2*(\tau-0.5)\delta t
+		sscanf_s(buffer, "%lf", &p->tau);
+		infile.getline(buffer, 120);  //�����ʸ��
+		sscanf_s(buffer, "(%lf, %lf, %lf)", &p->gf.x, &p->gf.y, &p->gf.z);
+		infile.getline(buffer, 100);  //LBM�ٶ�ģ��
+		sscanf_s(buffer, "%s", &p->velocity_set, (unsigned int)sizeof(p->velocity_set));
+		//�ַ�����ȡʱ��Ĭ���Կո�ָ�
+		infile.getline(buffer, 100);  //�߽���������
+		sscanf_s(buffer, "%s", &p->bc, (unsigned int)sizeof(p->bc));
+		infile.getline(buffer, 256);  //�ļ��е�˵���У���ȡ��Ϣ��������
+		infile.getline(buffer, 256);  //�ļ��е�˵���У���ȡ��Ϣ��������
+
+		infile.getline(buffer, 100);
+		sscanf_s(buffer, "%s", &p->BC.xminFace, (unsigned int)sizeof(p->BC.xminFace));
+		A = p->BC.xminFace;
+		if (A == "velocity") {
+			sscanf_s(buffer, "velocity (%lf, %lf, %lf)", &aa.x, &aa.y, &aa.z);
+			p->BC.vel_specified[0] = aa;
+		}
+		if (A == "pressure") {
+			sscanf_s(buffer, "pressure %lf", &rho_specified);
+			p->BC.rho_specified[0] = rho_specified;
+		}
+		
+		infile.getline(buffer, 100);
+		sscanf_s(buffer, "%s", &p->BC.xmaxFace, (unsigned int)sizeof(p->BC.xmaxFace));
+		A = p->BC.xmaxFace;
+		if (A == "velocity") {
+			sscanf_s(buffer, "velocity (%lf, %lf, %lf)", &aa.x, &aa.y, &aa.z);
+			p->BC.vel_specified[1] = aa;
+		}
+		if (A == "pressure") {
+			sscanf_s(buffer, "pressure %lf", &rho_specified);
+			p->BC.rho_specified[1] = rho_specified;
+		}
+		
+		infile.getline(buffer, 100);
+		sscanf_s(buffer, "%s", &p->BC.yminFace, (unsigned int)sizeof(p->BC.yminFace));
+		A = p->BC.yminFace;
+		if (A == "velocity") {
+			sscanf_s(buffer, "velocity (%lf, %lf, %lf)", &aa.x, &aa.y, &aa.z);
+			p->BC.vel_specified[2] = aa;
+		}
+		if (A == "pressure") {
+			sscanf_s(buffer, "pressure %lf", &rho_specified);
+			p->BC.rho_specified[2] = rho_specified;
+		}
+
+		infile.getline(buffer, 256);
+		sscanf_s(buffer, "%s", &p->BC.ymaxFace, (unsigned int)sizeof(p->BC.ymaxFace));
+		A = p->BC.ymaxFace;
+		if (A == "velocity") {
+			sscanf_s(buffer, "velocity (%lf, %lf, %lf)", &aa.x, &aa.y, &aa.z);
+			p->BC.vel_specified[3] = aa;
+		}
+		if (A == "pressure") {
+			sscanf_s(buffer, "pressure %lf", &rho_specified);
+			p->BC.rho_specified[3] = rho_specified;
+		}
+
+		infile.getline(buffer, 100);
+		sscanf_s(buffer, "%s", &p->BC.zminFace, (unsigned int)sizeof(p->BC.zminFace));
+		A = p->BC.zminFace;
+		if (A == "velocity") {
+			sscanf_s(buffer, "velocity (%lf, %lf, %lf)", &aa.x, &aa.y, &aa.z);
+			p->BC.vel_specified[4] = aa;
+		}
+		if (A == "pressure") {
+			sscanf_s(buffer, "pressure %lf", &rho_specified);
+			p->BC.rho_specified[4] = rho_specified;
+		}
+
+		infile.getline(buffer, 100);
+		sscanf_s(buffer, "%s", &p->BC.zmaxFace, (unsigned int)sizeof(p->BC.zmaxFace));
+		A = p->BC.zmaxFace;
+		if (A == "velocity") {
+			sscanf_s(buffer, "velocity (%lf, %lf, %lf)", &aa.x, &aa.y, &aa.z);
+			p->BC.vel_specified[5] = aa;
+		}
+		if (A == "pressure") {
+			sscanf_s(buffer, "pressure %lf", &rho_specified);
+			p->BC.rho_specified[5] = rho_specified;
+		}
+	
+		infile.getline(buffer, 100);//��һ��
+		infile.getline(buffer, 100);
+		sscanf_s(buffer, "(%lf, %lf, %lf)", &p->vel0.x, &p->vel0.y, &p->vel0.z);
+
+		cout <<"Computational domain size:   "<< p->LX  <<"  "<< p->LY<<"   "<< p->LZ<< endl;
+		cout <<"The velocity model used:   "<< p->velocity_set <<'\n'<< endl;
+
+		cout << p->bc << '\n' << endl;
+
+	}
+	
+		infile.close();
+
+//�����ͬʱ������ϲ�������һ�ļ�������֤��ȡ����ȷ��
+		outfile << "MRT:" << "   " << p->MRT << endl;
+		outfile << "CONTI:" << "   " << p->CONTI << endl;
+		outfile << "LES:" << "   " << p->LES << endl; 
+		outfile << "GEO:" << "   " << p->GEO << endl;
+		outfile << "MB:" << "   " << p->MB << endl;
+		outfile << "LX:" << "   " << p->LX << endl;
+		outfile << "LY:" << "   " << p->LY << endl;
+		outfile << "LZ:" << "   " << p->LZ << endl;
+		outfile << "LX2:" << "   " << p->LX2 << endl;
+		outfile << "LY2:" << "   " << p->LY2<< endl;
+		outfile << "LZ2:" << "   " << p->LZ2 << endl;
+		outfile << "LowX:" << "   " << p->LowX << endl;
+		outfile << "LowY:" << "   " << p->LowY << endl;
+		outfile << "LowZ:" << "   " << p->LowZ << endl;
+		outfile << "FrameRate:" << "   " << p->FrameRate<< endl;
+		outfile << "Total steps:" << " " << p->ttstep << endl;
+		outfile << "LBM.initial density:" << " " << p->density0<< endl;
+		outfile << "LBM.tau:" << " " << p->tau << endl;
+		outfile << "LBM.gx:" << " " << p->gf.x << endl;
+		outfile << "LBM.gy:" << " " << p->gf.y << endl;
+		outfile << "LBM.gz:" << " " << p->gf.z << endl;
+		outfile << "velocity model:" << " " << p->velocity_set << endl;
+		outfile << "Boundary condition type:" << " " << p->bc << endl;
+		outfile << "xmin Face BC:  " << " " << p->BC.xminFace << endl;
+		outfile << "xmax Face BC:  " << " " << p->BC.xmaxFace << endl;
+		outfile << "ymin Face BC:  " << " " << p->BC.yminFace << endl;
+		outfile << "ymax Face BC:  " << " " << p->BC.ymaxFace << endl;
+		outfile << "zmin Face BC:  " << " " << p->BC.zminFace << endl;
+		outfile << "zmax Face BC:  " << " " << p->BC.zmaxFace << endl;
+		outfile << "initial vel  " << " " << p->vel0.x << " " << p->vel0.y << " " << p->vel0.z << endl;
+
+	outfile.close();
+
+//	return 0;
+}
+
+
+
+
+
diff --git a/CFD/LBMSolverOMP/src/readGeo.cpp b/CFD/LBMSolverOMP/src/readGeo.cpp
new file mode 100644
index 0000000..e799e7d
--- /dev/null
+++ b/CFD/LBMSolverOMP/src/readGeo.cpp
@@ -0,0 +1,344 @@
+#include <stdio.h>
+#include <stdlib.h>
+#include <iostream>
+#include <fstream>
+#include <string>
+#include <vector>
+#include <iomanip>
+#include<sstream>
+#include<algorithm>
+#include "vector3.cpp"  //ע��Ӧ����vector3.cpp���ǽ���vector3.hpp
+using namespace std;
+
+void getNumberFromString(string s, int *a, int n);
+bool IntersectTriangle( vector3<double>& orig, vector3<double>& dir,
+	vector3<double>& v0, vector3<double>& v1, vector3<double>& v2,
+	double* t, double* u, double* v);
+
+inline int index(int x, int y, int z, int NX, int NY) {
+	return (z * NX * NY) + (y * NX) + x;
+}
+
+
+void read_Geo(int direction_size, vector3<int> *ei, int *obst, int *NN, int &num_node2, int *node2, double *delta)
+{
+	int NX = NN[0], NY = NN[1], NZ = NN[2];
+	
+	for (int k = 0; k < direction_size; k++)
+	{
+		cout << "(" << ei[k].x << " " << ei[k].y << "  " << ei[k].z << ")" << '\n';
+	}
+
+	char buffer[256];
+	int ele_point = 0, total_ibpoint = 0, *a;
+
+	double x_min, x_max, y_min, y_max, z_min, z_max;
+	double x_length, y_length, z_length;
+	double *lagx, *lagy, *lagz;
+	int *Ep0, *Ep1, *Ep2;
+
+	a = new int[2]();
+
+	   //�����ļ�
+	string filename1;
+	filename1 = "mesh_3d.dat";
+	if (direction_size == 9) filename1 = "mesh_2d.dat";
+	ifstream infile(filename1);
+	//ofstream outfile("out.plt");  //����ļ�	
+	if (!infile) {
+		cout << "Unable to open input complex geometry (shape) file:mesh_3d.dat or mesh_2d.dat";
+		exit(1); // terminate with error
+
+	}
+	/*	if (!outfile) {
+			cout << "Unable to open output file";
+			exit(1); // terminate with error
+
+		}*/
+	infile.getline(buffer, 60);  //����
+	infile.getline(buffer, 60);  //����
+	infile.getline(buffer, 90);  //�������������Ԫ����, !before numbers there should be at least a blank
+	string str1 = buffer;
+	//		cout << str1 << '\n';
+			//			sscanf_s(buffer, "%*s, %*s %d", &total_ibpoint); // &total_ibpoint,&ele_point);&buf, _countof(buf)
+			//			cout<<total_ibpoint<<endl;
+	getNumberFromString(str1, a, 2);
+	total_ibpoint = a[0];
+	ele_point = a[1];
+
+	cout << "total_ibpoint=" << total_ibpoint << "    ele_point=" << ele_point << '\n';
+
+	lagx = new double[total_ibpoint]();
+	lagy = new double[total_ibpoint]();
+	lagz = new double[total_ibpoint]();
+
+	Ep0 = new int[ele_point]();
+	Ep1 = new int[ele_point]();
+	Ep2 = new int[ele_point]();
+
+	while (!infile.eof()) //���ж�������� ���ļ�������Ϊ��־�����ļ������һ�пհ��л�һ��δԤ�����ݣ��������ܻ�������
+	{
+
+		for (int k = 0; k < total_ibpoint; k++) {
+			infile.getline(buffer, 100);  //60̫С������
+//				string str1 = buffer;
+//				cout << str1 << '\n';
+			sscanf_s(buffer, "%lf  %lf  %lf", &lagx[k], &lagy[k], &lagz[k]);
+						//	cout << lagx[k] << "     " << lagy[k] << "  " << lagz[k] << '\n';
+		}
+
+
+		for (int k = 0; k < ele_point; k++) {
+			infile.getline(buffer, 40);
+			//				string str1 = buffer;
+			//				cout << str1 << '\n';
+			sscanf_s(buffer, "%d       %d       %d", &Ep0[k], &Ep1[k], &Ep2[k]);
+							//cout << Ep0[k] << "     " << Ep1[k] << "  " << Ep2[k] << '\n';
+		}
+	}
+
+//Ϊ�˼��һ�飬�������Finite element�������ļ�
+	std::ofstream output_stream;
+	output_stream.open("out.plt", std::ofstream::out);
+	//����ʱ��option��	| std::ofstream::app���� app׷���ļ�������ΪĬ�ϸ���
+	if (true) {
+		output_stream << "Title = " << '"' << "finite-element data" << '"' << '\n';
+		output_stream << "variables = x, y, z" << '\n';
+		output_stream << "zone n=" << total_ibpoint << ", E=" << ele_point << ",f=FEpoint,et = triangle" << '\n';
+	}
+
+	for (int k = 0; k < total_ibpoint; k++) {
+		output_stream << lagx[k] << "  " << lagy[k] << "  " << lagz[k] << '\n';
+	}
+	for (int k = 0; k < ele_point; k++) {
+		output_stream << Ep0[k] << "  " << Ep1[k] << "  " << Ep2[k] << "  " << '\n';
+	}
+	output_stream.close();
+//-----------------------------------------------------
+	x_max = *max_element(lagx, lagx + total_ibpoint);
+	x_min = *min_element(lagx, lagx + total_ibpoint);
+	y_max = *max_element(lagy, lagy + total_ibpoint);
+	y_min = *min_element(lagy, lagy + total_ibpoint);
+	z_max = *max_element(lagz, lagz + total_ibpoint);
+	z_min = *min_element(lagz, lagz + total_ibpoint);
+
+	cout << "x_max=" << x_max << "  " << "xmin=" << x_min << '\n';
+	cout << "y_max=" << y_max << "  " << "ymin=" << y_min << '\n';
+	cout << "z_max=" << z_max << "  " << "zmin=" << z_min << '\n';
+	x_length = x_max - x_min;
+	y_length = y_max - y_min;
+	z_length = z_max - z_min;
+	std::cout <<"xlength=" << x_length << "   " << "ylength=" << y_length << "   " << "zlength=" << z_length << '\n';
+
+	//		std::cout << ac << "   " << "t=" << t << "   " << "u=" << u << "   " << "v=" << v << '\n';
+	
+	
+	bool judge;
+	vector3<double> v0, v1, v2;
+	double t, u, v;
+	int *t_rcd;
+	t_rcd = new int[2]();
+	int zmin0 = (int)floor(z_min); 
+	int zmax0 = (int)floor(z_max) + 2; //3D
+	if (direction_size == 9) { zmin0 = 0; zmax0 = 1; }      //2D
+
+	for (int x = (int)floor(x_min); x < (int)floor(x_max) + 2; x++) {
+		for (int y = (int)floor(y_min); y < (int)floor(y_max) + 2; y++) {
+//		for (int z = (int)floor(z_min); z < (int)floor(z_max) + 2; z++) {
+			for (int z =zmin0; z < zmax0; z++) {
+				double origx = x; double origy = y; double origz = z;
+				vector3<double> orig = { origx,origy,origz }, dir = { 0.0, 0.0, 1.0 };
+				if (direction_size == 9) dir = { 0.0, 1.0, 0.0 };
+				t_rcd[0] = 0;
+				t_rcd[1] = 0;
+				for (int k = 0; k < ele_point; k++) {
+					v0 = { lagx[Ep0[k]-1],lagy[Ep0[k]-1],lagz[Ep0[k]-1] };
+					v1 = { lagx[Ep1[k]-1],lagy[Ep1[k]-1],lagz[Ep1[k]-1] };
+					v2 = { lagx[Ep2[k]-1],lagy[Ep2[k]-1],lagz[Ep2[k]-1] };
+					if (direction_size == 9) { //2D
+						v0 = { lagx[Ep0[k] - 1],lagy[Ep0[k] - 1],1.0 };
+						v1 = { lagx[Ep1[k] - 1],lagy[Ep1[k] - 1],0.0 };
+						v2 = { lagx[Ep2[k] - 1],lagy[Ep2[k] - 1], -1.0 };
+					}
+//ע�⣺ÿ�����ǵ�Ԫ�Ķ��㣨��㣩���Ep0[k]��Ep1[k]��Ep2[k]���Ǵ�1��ʼ�ģ��������ǵĽ����������lagx[]�Ǵ�0��ʼ�ġ�
+//����ر�ע�⣺��ȷ�õ�Ep0[k]��x����ֵӦ�ò���lagx[Ep0[k]-1]
+					judge = IntersectTriangle(orig, dir, v0, v1, v2, &t, &u, &v);
+					if (judge == true ) {  // && u > 0.00001 && v > 0.00001
+						if (t > 0) {
+							t_rcd[0] ++; // tΪ��ֵ�Ĵ���
+						}
+						else {
+							t_rcd[1] ++;  // tΪ��ֵ�Ĵ��� }
+
+						}
+					}
+					
+					if (t_rcd[0] > 0 && t_rcd[1] > 0) { 
+			//			std::cout << "p" << t_rcd[0] << "  n" << t_rcd[1] << '\n'; 
+					obst[index(x, y, z, NX, NY)] = 1; }
+				}
+			}
+		}
+	}
+
+
+
+//���  obst=1  tecplot�ۿ�
+	
+		std::ofstream output1_stream;
+		output1_stream.open("del.plt", std::ofstream::out);
+		//����ʱ��option��	| std::ofstream::app���� app׷���ļ�������ΪĬ�ϸ���
+		if (true) {
+			output1_stream << "variables = x, y, z, obst" << '\n';
+			output1_stream << "zone i=" << NX << ",j=" << NY << ", k=" << NZ << ", f=point" << '\n';
+		}
+
+		for (int z = 0; z < NZ; z++) {
+			for (int y = 0; y < NY; y++) {
+				for (int x = 0; x < NX; x++) {
+					output1_stream << x << " " << y << " " << z << " " <<
+						obst[index(x, y, z, NX, NY)] << '\n';
+				}
+			}
+		}
+		output1_stream.close();
+//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~	
+		int m = 0;
+		//�������Ĺ����obstֵ�ij�2
+		for (int x = 0; x < NX; x++) {
+			for (int y = 0; y < NY; y++) {
+				for (int z = 0; z < NZ; z++) {
+					if (obst[index(x, y, z,NX,NY)] == 1) {
+						int n = 0;
+						for (int k = 0; k < direction_size; k++) {
+							int ind = index(x + ei[k].x, y + ei[k].y, z + ei[k].z,NX,NY);
+							if (obst[ind] == 0) { n++; }
+						}
+						if (n > 0) { obst[index(x, y, z, NX, NY)] = 2;   m++; }
+					}
+				}
+			}
+		}//Ŀ���ǵõ�obst2�Ľ����  ��ȷ��������Ĵ�С
+
+		num_node2 = m;
+	
+		m = 0;
+		for (int x = 0; x < NX; x++) {
+			for (int y = 0; y < NY; y++) {
+				for (int z = 0; z < NZ; z++) {
+					if (obst[index(x, y, z,NX,NY)] == 2) {
+
+						node2[m] = index(x, y, z, NX, NY);
+						for (int k1 = 0; k1 < direction_size; k1++) {
+							int ip = ei[k1].x, jp = ei[k1].y, kp = ei[k1].z;
+							int ind = index(x + ip, y + jp, z + kp, NX, NY);
+							bool judge;
+							double t, u, v;
+							vector3<double> v0, v1, v2;
+							vector3<double> orig = { (double)x,(double)y,(double)z },
+								dir = { (double)ip, (double)jp, (double)kp };
+							double b1 = 0., a1 =  dir.norm_square(); //�ٶ�ģ�����ٶȳ��� 1, sqrt2, sqrt3...
+							if (obst[ind] == 0) {
+
+								for (int k = 0; k < ele_point; k++) {
+									v0 = { lagx[Ep0[k] - 1],lagy[Ep0[k] - 1],lagz[Ep0[k] - 1] };
+									v1 = { lagx[Ep1[k] - 1],lagy[Ep1[k] - 1],lagz[Ep1[k] - 1] };
+									v2 = { lagx[Ep2[k] - 1],lagy[Ep2[k] - 1],lagz[Ep2[k] - 1] };
+									if (direction_size == 9) {
+										v0 = { lagx[Ep0[k] - 1],lagy[Ep0[k] - 1],1.0 };
+										v1 = { lagx[Ep1[k] - 1],lagy[Ep1[k] - 1],0.0 };
+										v2 = { lagx[Ep2[k] - 1],lagy[Ep2[k] - 1],-1.0 };
+									}
+									judge = IntersectTriangle(orig, dir, v0, v1, v2, &t, &u, &v);
+									if (judge == true && t>0  ) { b1 = t; }     //&& t<b1
+								}
+								if (b1 / a1 > 1) delta[m * direction_size + k1] = 0.;
+								else	delta[m * direction_size + k1] = 1.0- b1/sqrt(a1);
+							//		cout <<"q="<< 1.0- b1/a1<<"    " <<"a1=" <<a1 <<'\n';
+							//		if (b1 / a1 > 1) cout <<"b1="<<b1<<" a1="<<a1<<" error!!!!!!"<< '\n';
+							}
+						}
+						m++;
+					}
+				}
+			}
+		}
+
+	//	int  aaa;
+}
+
+
+
+void getNumberFromString(string s, int *a, int n) 
+{
+	stringstream str_strm;
+	str_strm << s; //convert the string s into stringstream
+	string temp_str;
+	int temp_int;
+	int k = 0;
+	while (!str_strm.eof()) {
+		str_strm >> temp_str; //take words into temp_str one by one
+		if (stringstream(temp_str) >> temp_int) { //try to convert string to int
+			a[k] = temp_int;	cout << temp_int << endl;
+			k++;
+		}
+		temp_str = ""; //clear temp string
+	}
+}
+
+
+bool IntersectTriangle( vector3<double>& orig, vector3<double>& dir,
+	vector3<double>& v0, vector3<double>& v1, vector3<double>& v2,
+	double* t, double* u, double* v)
+{
+	// E1
+	vector3<double> E1 = v1 - v0;
+
+	// E2
+	vector3<double> E2 = v2 - v0;
+
+	// P
+	vector3<double> P = dir.cross(E2);
+
+	// determinant
+	double det = E1.dot(P);
+
+	// keep det > 0, modify T accordingly
+	vector3<double> T;
+	if (det > 0)
+	{
+		T = orig - v0;
+	}
+	else
+	{
+		T = v0 - orig;
+		det = -det;
+	}
+
+	// If determinant is near zero, ray lies in plane of triangle
+	if (det < 0.0001f)
+		return false;
+
+	// Calculate u and make sure u <= 1
+	*u = T.dot(P);
+	if (*u < 0.0f || *u > det)
+		return false;
+
+	// Q
+	vector3<double> Q = T.cross(E1);
+
+	// Calculate v and make sure u + v <= 1
+	*v = dir.dot(Q);
+	if (*v < 0.0f || *u + *v > det)
+		return false;
+
+	// Calculate t, scale parameters, ray intersects triangle
+	*t = E2.dot(Q);
+
+	double fInvDet = 1.0f / det;
+	*t *= fInvDet;
+	*u *= fInvDet;
+	*v *= fInvDet;
+
+	return true;
+}
\ No newline at end of file
diff --git a/CFD/LBMSolverOMP/src/vector3.cpp b/CFD/LBMSolverOMP/src/vector3.cpp
new file mode 100644
index 0000000..8c0e3ad
--- /dev/null
+++ b/CFD/LBMSolverOMP/src/vector3.cpp
@@ -0,0 +1,31 @@
+#include "vector3.hpp"
+
+template<class myType> // ����ģ�� function templates,�������͵����ݲ���
+vector3<myType>::vector3(myType x, myType y, myType z) : x(x), y(y), z(z) {
+}
+
+template<class myType>
+myType vector3<myType>::dot(vector3<myType> other) {
+	return (x * other.get_x() +
+		y * other.get_y() +
+		z * other.get_z()
+	);
+}
+template<class myType>
+vector3<myType> vector3<myType>::cross(vector3<myType> other) {
+	return vector3<myType>(
+		(y * other.get_z()) - (z * other.get_y()),
+		(z * other.get_x()) - (x * other.get_z()),
+		(x * other.get_y()) - (y * other.get_x())
+		);
+}
+
+template<class myType>
+vector3<myType>::vector3() : x(0), y(0), z(0) {
+}
+
+template<class myType>
+myType vector3<myType>::norm_square() {
+	return (x * x + y * y + z * z);
+}
+
diff --git a/CFD/LBMSolverOMP/src/write.cpp b/CFD/LBMSolverOMP/src/write.cpp
new file mode 100644
index 0000000..e46705f
--- /dev/null
+++ b/CFD/LBMSolverOMP/src/write.cpp
@@ -0,0 +1,133 @@
+#include "LBMSolverOMP.hpp"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <conio.h>
+#include <iostream>
+#include <Windows.h>
+#include <time.h>
+#include <fstream>
+
+using namespace std;
+
+void dumpstring(char * str, FILE *file);
+
+void LBM::write_binary(std::string filename) //int im, int jm, int km
+{
+	int VarN=7; //Number of variables(VarN) 
+//	char filename[100];
+//	sprintf_s(filename, 100, "%s", "P.plt");  //sprintf(filename, "P.plt");
+	FILE *fp;
+	errno_t err;
+	if ((err = fopen_s(&fp, filename.c_str(), "wb")) != 0) std::cout << "error to open file: " << filename << '\n';
+	int im = this->NX; 
+	int jm = this->NY; 
+	int km = this->NZ;
+	
+	char Title[] = "TubeFlow";
+	char Vname[7][5] = { "X","Y","Z","u","v","w","p" }; // "XYZp";
+
+	char Zonename1[] = "Zone 001";
+	float ZONEMARKER = 299.0;
+	float EOHMARKER = 357.0;
+	//==============Header Secontion =================//
+	//------1.1 Magic number, Version number
+	char MagicNumber[] = "#!TDV101";
+//	cout<< "ok" << sizeof(MagicNumber) << endl;
+	fwrite(MagicNumber, 8, 1, fp);
+	//---- - 1.2.Integer value of 1.----------------------------------------------------------
+	int IntegerValue = 1;
+	fwrite(&IntegerValue, sizeof(IntegerValue), 1, fp);
+	//---- - 1.3.Title and variable names.------------------------------------------------ -
+	//---- - 1.3.1.The TITLE.
+	dumpstring(Title, fp);
+	
+	fwrite(&VarN, sizeof(VarN), 1, fp);
+	//------1.3.3 Variable names.
+	for (int i = 0; i < VarN; i++){ dumpstring(Vname[i], fp); }
+
+	//---- - 1.4.Zones------------------------------------------------------------------ -
+	//--------Zone marker.Value = 299.0
+	fwrite(&ZONEMARKER, 1, sizeof(ZONEMARKER), fp);
+	//--------Zone name.
+	//fwrite(Zonename1, sizeof(Zonename1), 1, fp);
+	dumpstring(Zonename1, fp);
+	
+		int ZoneStuff[5] = { -1,0,1,0,0 };
+		//--------Zone color
+		//--------ZoneType
+		//--------DaraPacking 0=Block, 1=Point
+		//--------Specify Var Location. 0 = Don't specify, all c_str is located at the nodes. 1 = Specify
+		//--------Number of user defined face neighbor connections(value >= 0)
+		for (int i = 0; i < 5; i++)
+		{
+			fwrite(&ZoneStuff[i], sizeof(int), 1, fp);
+		}
+	
+		//-------- - im, jm, km
+		fwrite(&im, sizeof(im), 1, fp);
+		fwrite(&jm, sizeof(jm), 1, fp);
+		fwrite(&km, sizeof(km), 1, fp);
+		//----------// -1 = Auxiliary name / value pair to follow 0 = No more Auxiliar name / value pairs.
+
+		int AuxiliaryName = 0;
+		fwrite(&AuxiliaryName, sizeof(AuxiliaryName), 1, fp);
+		//----I HEADER OVER--------------------------------------------------------------------------------------------
+		//=============================Geometries section=======================
+		//=============================Text section======================
+		// EOHMARKER, value = 357.0
+		fwrite(&EOHMARKER, sizeof(EOHMARKER), 1, fp);
+		//================II.Data section===============//
+		//---- - 2.1 zone---------------------------------------------------------------------- -
+		fwrite(&ZONEMARKER, sizeof(ZONEMARKER), 1, fp);
+		//--------variable format, 1 = Float, 2 = Double, 3 = LongInt, 4 = ShortInt, 5 = Byte, 6 = Bit
+		int VariableType[7] = { 3,3,3,2,2,2,2 };
+		for (int i = 0; i < VarN; i++) 
+		{ fwrite(&VariableType[i], sizeof(int), 1, fp); }
+
+		//--------Has variable sharing 0 = no, 1 = yes.
+		int HasVarSharing = 0;
+		fwrite(&HasVarSharing, sizeof(HasVarSharing), 1, fp);
+		//----------Zone number to share connectivity list with(-1 = no sharing).
+		int ZoneNumToShareConnectivity = -1;
+		fwrite(&ZoneNumToShareConnectivity, sizeof(ZoneNumToShareConnectivity), 1, fp);
+		//----------Zone c_str.Each variable is in c_str format asspecified above.
+
+		for (int k = 0; k < km; k++)
+		{
+			for (int j = 0; j < jm; j++)
+			{
+				for (int i = 0; i < im; i++)
+				{
+					int Va1 = i;
+					int Va2 = j;
+					int Va3 = k;
+					fwrite(&Va1, sizeof(Va1), 1, fp);
+					fwrite(&Va2, sizeof(Va2), 1, fp);
+					fwrite(&Va3, sizeof(Va3), 1, fp);
+					fwrite(&vel[this->index(i, j, k)].x, sizeof(double), 1, fp);
+					fwrite(&vel[this->index(i, j, k)].y, sizeof(double), 1, fp);
+					fwrite(&vel[this->index(i, j, k)].z, sizeof(double), 1, fp);
+					fwrite(&rho[this->index(i, j, k)], sizeof(double), 1, fp);
+				}
+			}
+		}
+	fclose(fp);
+//	getchar();
+}
+
+///д���ַ�������
+
+void dumpstring(char * str, FILE * file)
+{
+	int value = 0;
+	while ((*str) != '\0')
+	{
+		value = (int)*str;
+		fwrite(&value, sizeof(int), 1, file);
+		str++;
+	}
+	char null_char[] = "";
+	value = (int)*null_char;
+	fwrite(&value, sizeof(int), 1, file);
+}
\ No newline at end of file
diff --git a/CFD/NSSolver/include/MultiGridOperation.h b/CFD/NSSolver/include/MultiGridOperation.h
new file mode 100644
index 0000000..22f8b4c
--- /dev/null
+++ b/CFD/NSSolver/include/MultiGridOperation.h
@@ -0,0 +1,755 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      MultiGridOperation.h
+//! @brief     multigrid operation.
+//! @author    He Xin.
+
+#pragma once
+#include "Geo_StructGrid.h"
+#include "Geo_UnstructGrid.h"
+#include "Math_BasisFunction.h"
+#include "Constants.h"
+#include "Glb_Dimension.h"
+
+namespace PHSPACE
+{
+template < typename T >
+void RestrictQ(StructGrid *fgrid, PHArray< T, 2> &fq, StructGrid *cgrid, PHArray< T, 2> &cq)
+{
+    RDouble3D & fvol = * (fgrid->GetCellVolume());
+    RDouble3D & cvol = * (cgrid->GetCellVolume());
+
+    int fni = fgrid->GetNI();
+    int fnj = fgrid->GetNJ();
+
+    int cni = cgrid->GetNI();
+    int cnj = cgrid->GetNJ();
+
+    cq = 0.0;
+
+    int istp = (fni - 1) / (cni - 1);
+    int jstp = (fnj - 1) / (cnj - 1);
+
+    int id = istp / 2;
+    int jd = jstp / 2;
+
+    int i0,j0,i,j,ip,jp;
+
+    int k = 1;
+
+    RDouble v1,v2,v3,v4,ovol;
+    for (j0 = 1; j0 <= cnj - 1; ++ j0)
+    {
+        j  = (j0 - 1) * jstp + 1;
+        jp = j + jd;
+        for (i0 = 1; i0 <= cni - 1; ++ i0)
+        {
+            i  = (i0 - 1) * istp + 1;
+            ip = i + id;
+            v1 = fvol(i ,j ,k);
+            v2 = fvol(ip,j ,k);
+            v3 = fvol(ip,jp,k);
+            v4 = fvol(i ,jp,k);
+
+            ovol = one / (v1 + v2 + v3 + v4);
+            cq(i0,j0) = (fq(i ,j) * v1 + fq(ip,j) * v2 + fq(ip,jp) * v3 + fq(i ,jp) * v4) * ovol;
+        }
+    }
+
+    //! And secondly, restrict the first layer of ghost cells.
+    for (j0 = 0; j0 <= cnj; ++ j0)
+    {
+        j  = (j0 - 1) * jstp + 1;
+        jp = j + jd;
+        i  = 0;
+        i0 = 0;
+        v1 = fvol(i ,j ,k);
+        v2 = fvol(i ,jp,k);
+        ovol = one / (v1 + v2);
+        cq(i0,j0) = (fq(i ,j) * v1 + fq(i ,jp) * v2) * ovol;
+
+        i  = fni;
+        i0 = cni;
+        v1 = fvol(i ,j ,k);
+        v2 = fvol(i ,jp,k);
+        ovol = one / (v1 + v2);
+        cq(i0,j0) = (fq(i ,j) * v1 + fq(i ,jp) * v2) * ovol;
+    }
+
+    for (i0 = 0; i0 <= cni; ++ i0)
+    {
+        i  = (i0 - 1) * istp + 1;
+        ip = i + id;
+        j  = 0;
+        j0 = 0;
+        v1 = fvol(i ,j ,k);
+        v2 = fvol(ip,j ,k);
+        ovol = one / (v1 + v2);
+        cq(i0,j0) = (fq(i ,j) * v1 + fq(ip,j) * v2) * ovol;
+
+        j  = fnj;
+        j0 = cnj;
+        v1 = fvol(i ,j ,k);
+        v2 = fvol(ip,j ,k);
+        ovol = one / (v1 + v2);
+        cq(i0,j0) = (fq(i ,j) * v1 + fq(ip,j) * v2) * ovol;
+    }
+}
+
+template < typename T >
+void RestrictQ(StructGrid *fgrid, PHArray< T, 3> &fq, StructGrid *cgrid, PHArray< T, 3> &cq, int nm)
+{
+    RDouble3D & fvol = * (fgrid->GetCellVolume());
+    RDouble3D & cvol = * (cgrid->GetCellVolume());
+
+    int fni = fgrid->GetNI();
+    int fnj = fgrid->GetNJ();
+
+    int cni = cgrid->GetNI();
+    int cnj = cgrid->GetNJ();
+
+    cq = 0.0;
+
+    int istp = (fni - 1) / (cni - 1);
+    int jstp = (fnj - 1) / (cnj - 1);
+
+    int id = istp / 2;
+    int jd = jstp / 2;
+
+    int i0,j0,i,j,ip,jp;
+
+    int k = 1;
+
+    RDouble v1,v2,v3,v4,ovol;
+    for (j0 = 1; j0 <= cnj - 1; ++ j0)
+    {
+        j  = (j0 - 1) * jstp + 1;
+        jp = j + jd;
+        for (i0 = 1; i0 <= cni - 1; ++ i0)
+        {
+            i  = (i0 - 1) * istp + 1;
+            ip = i + id;
+            v1 = fvol(i ,j ,k);
+            v2 = fvol(ip,j ,k);
+            v3 = fvol(ip,jp,k);
+            v4 = fvol(i ,jp,k);
+
+            ovol = one / (v1 + v2 + v3 + v4);
+
+            for (int m = 0; m < nm; ++ m)
+            {
+                cq(i0,j0,m) = (fq(i ,j ,m) * v1 + fq(ip,j ,m) * v2 +
+                                fq(ip,jp,m) * v3 + fq(i ,jp,m) * v4) * ovol;
+            }
+        }
+    }
+    //! And secondly, restrict the first layer of ghost cells.
+    for (j0 = 0; j0 <= cnj; ++ j0)
+    {
+        j  = (j0 - 1) * jstp + 1;
+        jp = j + jd;
+        i  = 0;
+        i0 = 0;
+        v1 = fvol(i ,j ,k);
+        v2 = fvol(i ,jp,k);
+        ovol = one / (v1 + v2);
+        for (int m = 0; m < nm; ++ m)
+        {
+            cq(i0,j0,m) = (fq(i ,j ,m) * v1 + fq(i ,jp,m) * v2) * ovol;
+        }
+
+        i  = fni;
+        i0 = cni;
+        v1 = fvol(i ,j ,k);
+        v2 = fvol(i ,jp,k);
+        ovol = one / (v1 + v2);
+        for (int m = 0; m < nm; ++ m)
+        {
+            cq(i0,j0,m) = (fq(i ,j ,m) * v1 + fq(i ,jp,m) * v2) * ovol;
+        }
+    }
+
+    for (i0 = 0; i0 <= cni; ++ i0)
+    {
+        i  = (i0 - 1) * istp + 1;
+        ip = i + id;
+        j  = 0;
+        j0 = 0;
+        v1 = fvol(i ,j ,k);
+        v2 = fvol(ip,j ,k);
+        ovol = one / (v1 + v2);
+        for (int m = 0; m < nm; ++ m)
+        {
+            cq(i0,j0,m) = (fq(i ,j ,m) * v1 + fq(ip,j ,m) * v2) * ovol;
+        }
+
+        j  = fnj;
+        j0 = cnj;
+        v1 = fvol(i ,j ,k);
+        v2 = fvol(ip,j ,k);
+        ovol = one / (v1 + v2);
+        for (int m = 0; m < nm; ++ m)
+        {
+            cq(i0,j0,m) = (fq(i ,j ,m) * v1 + fq(ip,j ,m) * v2) * ovol;
+        }
+    }
+}
+
+template < typename T >
+void RestrictQ(StructGrid *fgrid, PHArray< T, 3> &fq, StructGrid *cgrid, PHArray< T, 3> &cq)
+{
+    RDouble3D & fvol = * (fgrid->GetCellVolume());
+
+    int fni = fgrid->GetNI();
+    int fnj = fgrid->GetNJ();
+    int fnk = fgrid->GetNK();
+
+    int cni = cgrid->GetNI();
+    int cnj = cgrid->GetNJ();
+    int cnk = cgrid->GetNK();
+
+    cq = 0.0;
+
+    int istp = fgrid->GetMultigridStepI();
+    int jstp = fgrid->GetMultigridStepJ();
+    int kstp = fgrid->GetMultigridStepK();
+
+    int id = istp / 2;
+    int jd = jstp / 2;
+    int kd = kstp / 2;
+
+    Range I0(1,MAX(cni-1,1));
+    Range J0(1,MAX(cnj-1,1));
+    Range K0(1,MAX(cnk-1,1));
+
+    Range CI0(0,cni);
+    Range CJ0(0,cnj);
+    Range CK0(0,cnk);
+
+    if (cnk == 1) CK0.setRange(1,1);
+
+    int nDim = fgrid->GetDim();
+
+    int i0,j0,k0,i,j,k,ip,jp,kp;
+
+    RDouble v1,v2,v3,v4,v5,v6,v7,v8,ovol;
+    for (k0 = K0.first(); k0 <= K0.last(); ++ k0)
+    {
+        k  = (k0 - 1) * kstp + 1;
+        kp = k + kd;
+        for (j0 = J0.first(); j0 <= J0.last(); ++ j0)
+        {
+            j  = (j0 - 1) * jstp + 1;
+            jp = j + jd;
+            for (i0 = I0.first(); i0 <= I0.last(); ++ i0)
+            {
+                i  = (i0 - 1) * istp + 1;
+                ip = i + id;
+                v1 = fvol(i ,j ,k);
+                v2 = fvol(ip,j ,k);
+                v3 = fvol(ip,jp,k);
+                v4 = fvol(i ,jp,k);
+                v5 = fvol(i ,j ,kp);
+                v6 = fvol(ip,j ,kp);
+                v7 = fvol(ip,jp,kp);
+                v8 = fvol(i ,jp,kp);
+
+                ovol = one / (v1 + v2 + v3 + v4 + v5 + v6 + v7 + v8);
+                cq(i0,j0,k0) = (fq(i ,j ,k) * v1
+                               + fq(ip,j ,k) * v2
+                               + fq(ip,jp,k) * v3
+                               + fq(i ,jp,k) * v4
+                               + fq(i ,j ,kp) * v5
+                               + fq(ip,j ,kp) * v6
+                               + fq(ip,jp,kp) * v7
+                               + fq(i ,jp,kp) * v8
+                              ) * ovol;
+            }
+        }
+    }
+
+    //! And secondly, restrict the first layer of ghost cells.
+    for (k0 = CK0.first(); k0 <= CK0.last(); ++ k0)
+    {
+        k  = (k0 - 1) * kstp + 1;
+        kp = k + kd;
+        for (j0 = CJ0.first(); j0 <= CJ0.last(); ++ j0)
+        {
+            j  = (j0 - 1) * jstp + 1;
+            jp = j + jd;
+            i  = 0;
+            i0 = 0;
+            v1 = fvol(i ,j ,k);
+            v2 = fvol(i ,j ,kp);
+            v3 = fvol(i ,jp,k);
+            v4 = fvol(i ,jp,kp);
+            ovol = one / (v1 + v2 + v3 + v4);
+            cq(i0,j0,k0) = (fq(i ,j ,k) * v1
+                           + fq(i ,j ,kp) * v2
+                           + fq(i ,jp,k) * v3
+                           + fq(i ,jp,kp) * v4
+                          ) * ovol;
+
+            //! Second layer.
+            cq(i0-1,j0,k0) = cq(i0,j0,k0);
+
+            i  = fni;
+            i0 = cni;
+            v1 = fvol(i ,j ,k);
+            v2 = fvol(i ,j ,kp);
+            v3 = fvol(i ,jp,k);
+            v4 = fvol(i ,jp,kp);
+            ovol = one / (v1 + v2 + v3 + v4);
+            cq(i0,j0,k0) = (fq(i ,j ,k) * v1
+                           + fq(i ,j ,kp) * v2
+                           + fq(i ,jp,k) * v3
+                           + fq(i ,jp,kp) * v4
+                          ) * ovol;
+
+            //! Second layer.
+            cq(i0+1,j0,k0) = cq(i0,j0,k0);
+        }
+
+        for (i0 = CI0.first(); i0 <= CI0.last(); ++ i0)
+        {
+            i  = (i0 - 1) * istp + 1;
+            ip = i + id;
+            j  = 0;
+            j0 = 0;
+            v1 = fvol(i ,j ,k);
+            v2 = fvol(ip,j ,k);
+            v3 = fvol(i ,j ,kp);
+            v4 = fvol(ip,j ,kp);
+            ovol = one / (v1 + v2 + v3 + v4);
+            cq(i0,j0,k0) = (fq(i ,j ,k) * v1
+                           + fq(ip,j ,k) * v2
+                           + fq(i ,j ,kp) * v3
+                           + fq(ip,j ,kp) * v4
+                          ) * ovol;
+
+            //! Second layer.
+            cq(i0,j0-1,k0) = cq(i0,j0,k0);
+
+            j  = fnj;
+            j0 = cnj;
+            v1 = fvol(i ,j ,k);
+            v2 = fvol(ip,j ,k);
+            v3 = fvol(i ,j ,kp);
+            v4 = fvol(ip,j ,kp);
+            ovol = one / (v1 + v2 + v3 + v4);
+            cq(i0,j0,k0) = (fq(i ,j ,k) * v1
+                           + fq(ip,j ,k) * v2
+                           + fq(i ,j ,kp) * v3
+                           + fq(ip,j ,kp) * v4
+                          ) * ovol;
+
+            //! Second layer.
+            cq(i0,j0+1,k0) = cq(i0,j0,k0);
+        }
+    }
+
+    if (nDim == THREE_D)
+    {
+        for (j0 = CJ0.first(); j0 <= CJ0.last(); ++ j0)
+        {
+            j  = (j0 - 1) * jstp + 1;
+            jp = j + jd;
+
+            for (i0 = CI0.first(); i0 <= CI0.last(); ++ i0)
+            {
+                i  = (i0 - 1) * istp + 1;
+                ip = i + id;
+                k  = 0;
+                k0 = 0;
+       
+                v1 = fvol(i ,j ,k);
+                v2 = fvol(ip,j ,k);
+                v3 = fvol(i ,jp,k);
+                v4 = fvol(ip,jp,k);
+                ovol = one / (v1 + v2 + v3 + v4);
+                cq(i0,j0,k0) = (fq(i ,j ,k) * v1
+                               + fq(ip,j ,k) * v2
+                               + fq(i ,jp,k) * v3
+                               + fq(ip,jp,k) * v4
+                              ) * ovol;
+
+                //! Second layer.
+                cq(i0,j0,k0-1) = cq(i0,j0,k0);
+
+
+                k  = fnk;
+                k0 = cnk;
+       
+                v1 = fvol(i ,j ,k);
+                v2 = fvol(ip,j ,k);
+                v3 = fvol(i ,jp,k);
+                v4 = fvol(ip,jp,k);
+                ovol = one / (v1 + v2 + v3 + v4);
+                cq(i0,j0,k0) = (fq(i ,j ,k) * v1
+                               + fq(ip,j ,k) * v2
+                               + fq(i ,jp,k) * v3
+                               + fq(ip,jp,k) * v4
+                              ) * ovol;
+
+                //! Second layer.
+                cq(i0,j0,k0+1) = cq(i0,j0,k0);
+            }
+        }
+    }
+}
+
+template < typename T >
+void RestrictQ(StructGrid *fgrid, PHArray< T, 4> &fq, StructGrid *cgrid, PHArray< T, 4> &cq, int nm)
+{
+    RDouble3D & fvol = * (fgrid->GetCellVolume());
+
+    int fni = fgrid->GetNI();
+    int fnj = fgrid->GetNJ();
+    int fnk = fgrid->GetNK();
+
+    int cni = cgrid->GetNI();
+    int cnj = cgrid->GetNJ();
+    int cnk = cgrid->GetNK();
+
+    Range I0(1,MAX(cni-1,1));
+    Range J0(1,MAX(cnj-1,1));
+    Range K0(1,MAX(cnk-1,1));
+
+    Range CI0(0,cni);
+    Range CJ0(0,cnj);
+    Range CK0(0,cnk);
+
+    if (cnk == 1) CK0.setRange(1,1);
+
+    int istp = fgrid->GetMultigridStepI();
+    int jstp = fgrid->GetMultigridStepJ();
+    int kstp = fgrid->GetMultigridStepK();
+
+    int id = istp / 2;
+    int jd = jstp / 2;
+    int kd = kstp / 2;
+
+    int i0,j0,k0,i,j,k,ip,jp,kp;
+    RDouble v1,v2,v3,v4,v5,v6,v7,v8,ovol;
+
+    int nDim = fgrid->GetDim();
+
+    cq = 0.0;
+    for (int m = 0; m < nm; ++ m)
+    {
+        for (k0 = K0.first(); k0 <= K0.last(); ++ k0)
+        {
+            k  = (k0 - 1) * kstp + 1;
+            kp = k + kd;
+            for (j0 = J0.first(); j0 <= J0.last(); ++ j0)
+            {
+                j  = (j0 - 1) * jstp + 1;
+                jp = j + jd;
+                for (i0 = I0.first(); i0 <= I0.last(); ++ i0)
+                {
+                    i  = (i0 - 1) * istp + 1;
+                    ip = i + id;
+                    v1 = fvol(i ,j ,k);
+                    v2 = fvol(ip,j ,k);
+                    v3 = fvol(ip,jp,k);
+                    v4 = fvol(i ,jp,k);
+                    v5 = fvol(i ,j ,kp);
+                    v6 = fvol(ip,j ,kp);
+                    v7 = fvol(ip,jp,kp);
+                    v8 = fvol(i ,jp,kp);
+
+                    ovol = one / (v1 + v2 + v3 + v4 + v5 + v6 + v7 + v8);
+                    cq(i0,j0,k0,m) = (fq(i ,j ,k ,m) * v1
+                                     + fq(ip,j ,k ,m) * v2
+                                     + fq(ip,jp,k ,m) * v3
+                                     + fq(i ,jp,k ,m) * v4
+                                     + fq(i ,j ,kp,m) * v5
+                                     + fq(ip,j ,kp,m) * v6
+                                     + fq(ip,jp,kp,m) * v7
+                                     + fq(i ,jp,kp,m) * v8
+                                    ) * ovol;
+                }
+            }
+        }
+
+        //! And secondly, restrict the first layer of ghost cells.
+        for (k0 = CK0.first(); k0 <= CK0.last(); ++ k0)
+        {
+            k  = (k0 - 1) * kstp + 1;
+            kp = k + kd;
+            for (j0 = CJ0.first(); j0 <= CJ0.last(); ++ j0)
+            {
+                j  = (j0 - 1) * jstp + 1;
+                jp = j + jd;
+                i  = 0;
+                i0 = 0;
+                v1 = fvol(i ,j ,k);
+                v2 = fvol(i ,j ,kp);
+                v3 = fvol(i ,jp,k);
+                v4 = fvol(i ,jp,kp);
+                ovol = one / (v1 + v2 + v3 + v4);
+                cq(i0,j0,k0,m) = (fq(i ,j ,k ,m) * v1
+                                 + fq(i ,j ,kp,m) * v2
+                                 + fq(i ,jp,k ,m) * v3
+                                 + fq(i ,jp,kp,m) * v4
+                                ) * ovol;
+                //! Second layer.
+                cq(i0-1,j0,k0,m) = cq(i0,j0,k0,m);
+
+                i  = fni;
+                i0 = cni;
+                v1 = fvol(i ,j ,k);
+                v2 = fvol(i ,j ,kp);
+                v3 = fvol(i ,jp,k);
+                v4 = fvol(i ,jp,kp);
+                ovol = one / (v1 + v2 + v3 + v4);
+                cq(i0,j0,k0,m) = (fq(i ,j ,k ,m) * v1
+                                 + fq(i ,j ,kp,m) * v2
+                                 + fq(i ,jp,k ,m) * v3
+                                 + fq(i ,jp,kp,m) * v4
+                                ) * ovol;
+                //! Second layer.
+                cq(i0+1,j0,k0,m) = cq(i0,j0,k0,m);
+            }
+
+            for (i0 = CI0.first(); i0 <= CI0.last(); ++ i0)
+            {
+                i  = (i0 - 1) * istp + 1;
+                ip = i + id;
+                j  = 0;
+                j0 = 0;
+                v1 = fvol(i ,j ,k);
+                v2 = fvol(ip,j ,k);
+                v3 = fvol(i ,j ,kp);
+                v4 = fvol(ip,j ,kp);
+                ovol = one / (v1 + v2 + v3 + v4);
+                cq(i0,j0,k0,m) = (fq(i ,j ,k ,m) * v1
+                                 + fq(ip,j ,k ,m) * v2
+                                 + fq(i ,j ,kp,m) * v3
+                                 + fq(ip,j ,kp,m) * v4
+                                ) * ovol;
+                //! Second layer.
+                cq(i0,j0-1,k0,m) = cq(i0,j0,k0,m);
+
+                j  = fnj;
+                j0 = cnj;
+                v1 = fvol(i ,j ,k);
+                v2 = fvol(ip,j ,k);
+                v3 = fvol(i ,j ,kp);
+                v4 = fvol(ip,j ,kp);
+                ovol = one / (v1 + v2 + v3 + v4);
+                cq(i0,j0,k0,m) = (fq(i ,j ,k ,m) * v1
+                                 + fq(ip,j ,k ,m) * v2
+                                 + fq(i ,j ,kp,m) * v3
+                                 + fq(ip,j ,kp,m) * v4
+                                ) * ovol;
+                //! Second layer.
+                cq(i0,j0+1,k0,m) = cq(i0,j0,k0,m);
+            }
+        }
+
+        if (nDim == TWO_D) continue;
+
+        for (j0 = CJ0.first(); j0 <= CJ0.last(); ++ j0)
+        {
+            j  = (j0 - 1) * jstp + 1;
+            jp = j + jd;
+
+            for (i0 = CI0.first(); i0 <= CI0.last(); ++ i0)
+            {
+                i  = (i0 - 1) * istp + 1;
+                ip = i + id;
+                k  = 0;
+                k0 = 0;
+       
+                v1 = fvol(i ,j ,k);
+                v2 = fvol(ip,j ,k);
+                v3 = fvol(i ,jp,k);
+                v4 = fvol(ip,jp,k);
+                ovol = one / (v1 + v2 + v3 + v4);
+                cq(i0,j0,k0,m) = (fq(i ,j ,k,m) * v1
+                                 + fq(ip,j ,k,m) * v2
+                                 + fq(i ,jp,k,m) * v3
+                                 + fq(ip,jp,k,m) * v4
+                                ) * ovol;
+                //! Second layer.
+                cq(i0,j0,k0-1,m) = cq(i0,j0,k0,m);
+
+                k  = fnk;
+                k0 = cnk;
+       
+                v1 = fvol(i ,j ,k);
+                v2 = fvol(ip,j ,k);
+                v3 = fvol(i ,jp,k);
+                v4 = fvol(ip,jp,k);
+                ovol = one / (v1 + v2 + v3 + v4);
+                cq(i0,j0,k0,m) = (fq(i ,j ,k,m) * v1
+                                 + fq(ip,j ,k,m) * v2
+                                 + fq(i ,jp,k,m) * v3
+                                 + fq(ip,jp,k,m) * v4
+                                ) * ovol;
+                //! Second layer.
+                cq(i0,j0,k0+1,m) = cq(i0,j0,k0,m);
+            }
+        }
+    }
+}
+
+template < typename T >
+void RestrictQ(Grid *fgrid_in, T *fq, Grid *cgrid_in, T *cq)
+{
+    UnstructGrid *fgrid = UnstructGridCast(fgrid_in);
+    UnstructGrid *cgrid = UnstructGridCast(cgrid_in);
+
+    int      fnTotalCell  = fgrid->GetNTotalCell();
+    int      cnTotalCell  = cgrid->GetNTotalCell();
+    int      *cell2coarsegridcell = fgrid->GetCell2CoarseGridCell();
+    RDouble *fvol    = fgrid->GetCellVolume();
+    RDouble *cvol    = cgrid->GetCellVolume();
+
+    for (int iCell = 0; iCell < cnTotalCell; ++ iCell)
+    {
+        cq[iCell] = 0.0;
+    }
+
+    for (int iCell = 0; iCell < fnTotalCell; ++ iCell)
+    {
+        cq[ cell2coarsegridcell[iCell] ] += fvol[iCell] * fq[iCell];
+    }
+
+    for (int iCell = 0; iCell < cnTotalCell; ++ iCell)
+    {
+        cq[iCell] /= cvol[iCell];
+    }
+}
+
+template < typename T >
+void InterpolatQ(Grid *fgrid_in, T *fq, Grid *cgrid_in, T *cq)
+{
+    UnstructGrid *fgrid = UnstructGridCast(fgrid_in);
+
+    int fnTotalCell = fgrid->GetNTotalCell();
+
+    int *cell2coarsegridcell   = fgrid->GetCell2CoarseGridCell();
+    int cc;
+    for (int iCell = 0; iCell < fnTotalCell; ++ iCell)
+    {
+        cc = cell2coarsegridcell[iCell];
+
+        fq[iCell] = cq[cc];
+    }
+}
+
+template < typename T >
+void InterpolatQ(StructGrid *fgrid, PHArray< T, 4> &fq, StructGrid *cgrid, PHArray< T, 4> &cq, int nm)
+{
+    int cni = cgrid->GetNI();
+    int cnj = cgrid->GetNJ();
+    int cnk = cgrid->GetNK();
+
+    int istp = fgrid->GetMultigridStepI();
+    int jstp = fgrid->GetMultigridStepJ();
+    int kstp = fgrid->GetMultigridStepK();
+
+    int id = istp / 2;
+    int jd = jstp / 2;
+    int kd = kstp / 2;
+
+    Range I(1,MAX(cni-1,1));
+    Range J(1,MAX(cnj-1,1));
+    Range K(1,MAX(cnk-1,1));
+
+    int i0,j0,k0,i,j,k,ip,jp,kp;
+    for (k0 = K.first(); k0 <= K.last(); ++ k0)
+    {
+        k  = (k0 - 1) * kstp + 1;
+        kp = k + kd;
+        for (j0 = J.first(); j0 <= J.last(); ++ j0)
+        {
+            j  = (j0 - 1) * jstp + 1;
+            jp = j + jd;
+            for (i0 = I.first(); i0 <= I.last(); ++ i0)
+            {
+                i  = (i0 - 1) * istp + 1;
+                ip = i + id;
+
+                for (int m = 0; m < nm; ++ m)
+                {
+                    RDouble temp = cq(i0,j0,k0,m);
+
+                    fq(i ,j ,k ,m) = temp;
+                    fq(ip,j ,k ,m) = temp;
+                    fq(ip,jp,k ,m) = temp;
+                    fq(i ,jp,k ,m) = temp;
+                    fq(i ,j ,kp,m) = temp;
+                    fq(ip,j ,kp,m) = temp;
+                    fq(ip,jp,kp,m) = temp;
+                    fq(i ,jp,kp,m) = temp;
+                }
+            }
+        }
+    }
+
+    GhostCell3D(cq, cni, cnj, cnk, nm);
+}
+
+template < typename T >
+void InterpolatQ(StructGrid *fgrid, PHArray< T, 3> &fq, StructGrid *cgrid, PHArray< T, 3> &cq)
+{
+    int cni = cgrid->GetNI();
+    int cnj = cgrid->GetNJ();
+    int cnk = cgrid->GetNK();
+
+    int istp = fgrid->GetMultigridStepI();
+    int jstp = fgrid->GetMultigridStepJ();
+    int kstp = fgrid->GetMultigridStepK();
+
+    int id = istp / 2;
+    int jd = jstp / 2;
+    int kd = kstp / 2;
+
+    Range I(1,MAX(cni-1,1));
+    Range J(1,MAX(cnj-1,1));
+    Range K(1,MAX(cnk-1,1));
+
+    int i0,j0,k0,i,j,k,ip,jp,kp;
+    for (k0 = K.first(); k0 <= K.last(); ++ k0)
+    {
+        k  = (k0 - 1) * kstp + 1;
+        kp = k + kd;
+        for (j0 = J.first(); j0 <= J.last(); ++ j0)
+        {
+            j  = (j0 - 1) * jstp + 1;
+            jp = j + jd;
+            for (i0 = I.first(); i0 <= I.last(); ++ i0)
+            {
+                i  = (i0 - 1) * istp + 1;
+                ip = i + id;
+
+                RDouble temp = cq(i0, j0, k0);
+
+                fq(i ,j ,k) = temp;
+                fq(ip,j ,k) = temp;
+                fq(ip,jp,k) = temp;
+                fq(i ,jp,k) = temp;
+                fq(i ,j ,kp) = temp;
+                fq(ip,j ,kp) = temp;
+                fq(ip,jp,kp) = temp;
+                fq(i ,jp,kp) = temp;
+            }
+        }
+    }
+
+    GhostCell3D(cq, cni, cnj, cnk);
+}
+
+}
diff --git a/CFD/NSSolver/include/NCCRSolverStruct.h b/CFD/NSSolver/include/NCCRSolverStruct.h
new file mode 100644
index 0000000..5254d2b
--- /dev/null
+++ b/CFD/NSSolver/include/NCCRSolverStruct.h
@@ -0,0 +1,425 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      NCCRSolverStruct.h
+//! @brief     NS solver for struct grid.
+//! @author    He Xin, Bell, He Kun, He Xianyao, Wan Yunbo, Liu Jian, Xu Qingxin, Zhang Zipei, Li peng, Ma Yankai, 
+//!            Min Yaobing, Meng Liyuan, Xu Gang, Guo Yongyan, Zhang Yang.
+
+#pragma once
+#include "NSSolver.h"
+using namespace std;
+
+namespace PHSPACE
+{
+class GeomProxy;
+class StructBC;
+class Param_NSSolverStruct;
+class GradientCellCenter;
+class Gradient;
+
+class StructIterNCCR
+{
+public:
+    int i0,j0,k0;
+    int i1,j1,k1;
+    int il1,jl1,kl1;
+    int ist, ied, jst, jed, kst, ked;
+    int nsurf;
+    int nsize;
+  //  int surfaceSize; //  Size of  surface
+};
+
+class NCCRSolverStruct : public NSSolver
+{
+private:
+    GradientCellCenter *gradientCellCenterUVWT[5];
+    int systemgridtype;
+public:
+    int nWallBC; //The number of surface boundary conditions.
+    int nMaxSurfaceCell; //The number of surface cells.
+    int nIonizationFlag;
+    NCCRSolverStruct();
+    ~NCCRSolverStruct();
+private:
+    void ReadParameter();
+    void AllocateGlobalVar  (Grid *gridIn);
+    void DeAllocateGlobalVar(Grid *gridIn);
+    void GetSurfaceCellNumber(Grid *gridIn);
+    void InitializeSurfaceParameters(Grid *gridIn);
+    void InitializeSurfaceParametersFromFile(Grid *gridIn);
+    void ChangeSurfaceTemperature(Grid *gridIn);
+    void ChangeSurfaceMassFractions(Grid *gridIn);
+
+    //! Judge if the flow field variables file already exists in NS solver.
+    bool JudgeIfRestart();
+    bool JudgeIfReadAverage();
+
+    bool JudgeIfProtectedRestart();
+
+    void InitFlowAsRestart();
+    void InitialSetPartialParameter(StructGrid *grid, bool flowTag = true);
+
+    void InitGrad(Grid *gridIn);
+    void InitCGrid(Grid *fineGridIn, Grid *coarseGridIn);
+    void ZeroResiduals(Grid *grid);
+
+    void CreateStandardADT(Grid *grid, DataStruct_AdtTree<int,RDouble> *&adtTree, RDouble &tol);
+
+    void CompNodeVar(Grid *gridIn, FieldProxy *qnProxy, FieldProxy *qProxy);
+    void InterfaceValueFix(Grid *gridIn, FieldProxy *qnProxy, FieldProxy *qProxy);
+    void WallValueFix(Grid *gridIn, FieldProxy *qnProxy, FieldProxy *qProxy);
+    
+    void CompNodeVar(Grid *gridIn, RDouble4D &qn, int m, RDouble4D &q, int n);
+    void CompNodeVar(Grid *gridIn, RDouble4D &qn, int m, RDouble3D &q);
+    
+    void LoadQ(Grid *grid, FieldProxy *qProxy);
+    void LoadResiduals(Grid *gridIn, FieldProxy *rightHandSideProxy);
+    void ComputeMinTimeStep(Grid *grid, RDouble &minDt, RDouble &maxDt);
+    void ReduceMaxTimeStep(Grid *grid, RDouble globalMinDt);
+    void LocalTimeStep(Grid *gridIn);
+    void GlobalTimeStep(Grid *gridIn);
+    void LocalGlobalTimeStep(Grid *gridIn);
+    void SpectrumRadius(Grid *grid);
+    void SpectrumRadiusInviscid(Grid *gridIn);
+    void SpectrumRadiusViscous(Grid *gridIn);
+    void ConservativePreconMatrix(Grid *gridIn);
+
+    void Diagonal(Grid *gridIn);    //! Source linear.
+    //Compute the local time scale.
+    void ComputeTimeScale(Grid *gridIn);
+    //Compute the local time scale of flow.
+    void ComputeFlowTimeScale(Grid *gridIn);
+
+    //! Set the boundary conditions.
+    void Boundary(Grid *grid);
+    void CalculateBoundaryData();
+    void CalPressureFactor(Grid *gridIn);
+    void GetHeatTransferCoeff(Grid *gridIn);
+    void InviscidFlux(Grid *gridIn);
+    void ZeroResidualOfSpecialCells(Grid *gridIn);    //! Added By Guo Yongheng 20160825.
+    void ViscousFlux(Grid *gridIn);
+    void DualTimeSource(Grid *gridIn);
+
+    //! Compute the chemical source terms.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void ChemicalSource(Grid *gridIn);  //! Source.
+    
+    void gravitySource(Grid* gridIn) {};  //! Source.
+
+    void RotatingSource(Grid* gridIn) {};  //! Source.
+
+    void AverageMixingPlane(Grid *grid) {};
+    void MixingPlaneDataTransfer(Grid *grid, Grid *Neighborgrid) {};
+    void NonReflective(Grid *grid, Grid *NeighborGrid) {};
+    void SetMixingPlaneData(Grid *grid) {};
+
+    //! Compute the distance between the center of the grid cell on the first layer and the center of the surface cell.
+    void ComputeFirstLayerGridHeight(Grid *gridIn);
+    void UpdateUnsteadyFlow(Grid *gridIn);
+    RDouble UnsteadyConvergence(Grid *gridIn);
+
+    void ComputeViscousCoeff(Grid *gridIn);
+    void ComputeViscousCoefficientWithoutChemical(Grid *gridIn);
+    void ComputePreconditionCoefficient(Grid *gridIn);
+
+    void ComputeGamaAndTemperature(Grid *gridIn);                 //Gama ��Temperature
+    void RungeKuttaResidual(Grid *gridIn, FieldProxy *dqProxy, RDouble coef);
+    
+    void SolutionFix(Grid *gridIn, RDouble *prim, int i, int j, int k);
+    void UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy);    //! Primitive vs Conservative.
+
+    void UpdateQlQrOnlyforMixGrid(Grid *grid);
+    void UpdateInviscidfluxOnlyforMixGrid(Grid *grid);
+    void UpdateViscousfluxOnlyforMixGrid(Grid *grid);
+    void LoadGlobalfacefluxtoResOnlyforMixGrid(Grid *gridIn);
+
+    void LoadFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+    void CompVisFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+    //! To correct the viscous fluxes of solid boundaries under the non-equilibrium condition.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out]: fluxProxy is an array that stores the inviscid fluxes of grid faces.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void CorrectViscousFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+    void CorrectNCCRViscousFlux(Grid* gridIn, FieldProxy* fluxProxy, int iSurface);
+
+    void CompVisFluxnew(Grid *gridIn, Gradient *gradientUVWT, FieldProxy *fluxProxy, int iSurface);
+    void CompVisFluxnew(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+    void CompVisFluxNCCRMonoatomic(Grid* gridIn, FieldProxy* fluxProxy, int iSurface);
+    void CompVisFluxNCCRDiatomic(Grid* gridIn, FieldProxy* fluxProxy, int iSurface);
+
+    void monosolver_speedestdescend(RDouble& ttxxux0, RDouble& ttxxvy0, RDouble& ttxxwz0, RDouble& ttyyux0, RDouble& ttyyvy0, RDouble& ttyywz0, RDouble& ttzzux0, RDouble& ttzzvy0, RDouble& ttzzwz0, RDouble& ttxyvx0, RDouble& ttyxuy0, RDouble& ttxzwx0, RDouble& ttzxuz0, RDouble& ttyzwy0, RDouble& ttzyvz0, RDouble& qx0, RDouble& qy0, RDouble& qz0, RDouble& ttxx, RDouble& ttyy, RDouble& ttzz, RDouble& ttxy, RDouble& ttxz, RDouble& ttyz, RDouble& qx, RDouble& qy, RDouble& qz, int& sumstep, RDouble& c_nccr);
+    void fun_nccr_monatomic(RDouble ttxx, RDouble ttyy, RDouble ttxy, RDouble ttxz, RDouble ttyz, RDouble qx, RDouble qy, RDouble qz, RDouble c_nccr, RDouble ttxx0, RDouble ttyy0, RDouble ttxy0, RDouble ttxz0, RDouble ttyz0, RDouble qx0, RDouble qy0, RDouble qz0, RDouble ux, RDouble uy, RDouble uz, RDouble vx, RDouble vy, RDouble vz, RDouble wx, RDouble wy, RDouble wz, vector<RDouble>& fun);
+    void dfun_nccr_monatomic(RDouble ttxx, RDouble ttyy, RDouble ttxy, RDouble ttxz, RDouble ttyz, RDouble qx, RDouble qy, RDouble qz, RDouble c_NCCR, RDouble ttxx0, RDouble ttyy0, RDouble ttxy0, RDouble ttxz0, RDouble ttyz0, RDouble qx0, RDouble qy0, RDouble qz0, RDouble ux, RDouble uy, RDouble uz, RDouble vx, RDouble vy, RDouble vz, RDouble wx, RDouble wy, RDouble wz, vector<vector<double>>& dfun);
+    RDouble ndf(RDouble x);
+    RDouble gradient_tfun_monatomic(vector<RDouble> fun, vector<vector<double>> dfun, vector<RDouble>& gradtf);
+    void Gaussian_elimination(vector<vector<double>>& dfun, vector<double>& fun, vector<double>& DX_NT, int parametersnumber);
+
+    void fun_nccr_diatomic(RDouble ttxx, RDouble ttyy, RDouble ttxy, RDouble ttxz, RDouble ttyz, RDouble qx, RDouble qy, RDouble qz, RDouble delt_bk, RDouble c_nccr, RDouble gamapie,RDouble ttxx0, RDouble ttyy0, RDouble ttxy0, RDouble ttxz0, RDouble ttyz0, RDouble qx0, RDouble qy0, RDouble qz0, RDouble delt0_bk,RDouble ux, RDouble uy, RDouble uz, RDouble vx, RDouble vy, RDouble vz, RDouble wx, RDouble wy, RDouble wz, vector<RDouble>& fun);
+    void dfun_nccr_diatomic(RDouble ttxx, RDouble ttyy, RDouble ttxy, RDouble ttxz, RDouble ttyz, RDouble qx, RDouble qy, RDouble qz, RDouble delt_bk, RDouble c_NCCR, RDouble gamapie, RDouble ttxx0, RDouble ttyy0, RDouble ttxy0, RDouble ttxz0, RDouble ttyz0, RDouble qx0, RDouble qy0, RDouble qz0, RDouble delt0_bk, RDouble ux, RDouble uy, RDouble uz, RDouble vx, RDouble vy, RDouble vz, RDouble wx, RDouble wy, RDouble wz, vector<vector<double>>& dfun);
+    RDouble gradient_tfun_diatomic(vector<RDouble> fun, vector<vector<double>> dfun, vector<RDouble> gradtf, RDouble& norm);
+    
+    void monosolver_CoupledCalculation(RDouble& ttxxux0, RDouble& ttxxvy0, RDouble& ttxxwz0, RDouble& ttyyux0, RDouble& ttyyvy0, RDouble& ttyywz0, RDouble& ttzzux0, RDouble& ttzzvy0, RDouble& ttzzwz0, RDouble& ttxyvx0, RDouble& ttyxuy0, RDouble& ttxzwx0, RDouble& ttzxuz0, RDouble& ttyzwy0, RDouble& ttzyvz0, RDouble& qx0, RDouble& qy0, RDouble& qz0, RDouble& ttxx, RDouble& ttyy, RDouble& ttzz, RDouble& ttxy, RDouble& ttxz, RDouble& ttyz, RDouble& qx, RDouble& qy, RDouble& qz, int& sumstep, RDouble& c_nccr);
+    void monosolver_NT(RDouble& ttxxux0, RDouble& ttxxvy0, RDouble& ttxxwz0, RDouble& ttyyux0, RDouble& ttyyvy0, RDouble& ttyywz0, RDouble& ttzzux0, RDouble& ttzzvy0, RDouble& ttzzwz0, RDouble& ttxyvx0, RDouble& ttyxuy0, RDouble& ttxzwx0, RDouble& ttzxuz0, RDouble& ttyzwy0, RDouble& ttzyvz0, RDouble& qx0, RDouble& qy0, RDouble& qz0, RDouble& ttxx, RDouble& ttyy, RDouble& ttzz, RDouble& ttxy, RDouble& ttxz, RDouble& ttyz, RDouble& qx, RDouble& qy, RDouble& qz, int& sumstep, RDouble& c_nccr, int& ERROR_NCCR);
+
+    void diatsolver_CoupledCalculation(RDouble& ttxxux0, RDouble& ttxxvy0, RDouble& ttxxwz0, RDouble& ttyyux0, RDouble& ttyyvy0, RDouble& ttyywz0, RDouble& ttzzux0, RDouble& ttzzvy0, RDouble& ttzzwz0, RDouble& ttxyvx0, RDouble& ttyxuy0, RDouble& ttxzwx0, RDouble& ttzxuz0, RDouble& ttyzwy0, RDouble& ttzyvz0, RDouble& delt0_bk, RDouble& qx0, RDouble& qy0, RDouble& qz0, RDouble& ttxx, RDouble& ttyy, RDouble& ttzz, RDouble& ttxy, RDouble& ttxz, RDouble& ttyz, RDouble& delt_bk, RDouble& qx, RDouble& qy, RDouble& qz, int& sumstep, RDouble& c_nccr, RDouble gamapie);
+    void diatsolver_NT(RDouble ttxxux0, RDouble ttxxvy0, RDouble ttxxwz0, RDouble ttyyux0, RDouble ttyyvy0, RDouble ttyywz0, RDouble ttzzux0, RDouble ttzzvy0, RDouble ttzzwz0, RDouble ttxyvx0, RDouble ttyxuy0, RDouble ttxzwx0, RDouble ttzxuz0, RDouble ttyzwy0, RDouble ttzyvz0, RDouble qx0, RDouble qy0, RDouble qz0, RDouble delt0_bk, RDouble& ttxx, RDouble& ttyy, RDouble& ttzz, RDouble& ttxy, RDouble& ttxz, RDouble& ttyz, RDouble& qx, RDouble& qy, RDouble& qz, RDouble& delt_bk, int& sumstep, RDouble c_nccr, RDouble gamapie, int& ERROR_NCCR, int& successed);
+
+    void CompVisFluxLES(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+    void ComputeInviscidFlux(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface);
+    void InviscidFluxWrap(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, FieldProxy *fluxProxy, INVScheme inviscidScheme, int iSurface);
+    //! To correct the inviscid fluxes of solid boundaries under the non-equilibrium condition.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out]: fluxProxy is an array that stores the inviscid fluxes of grid faces.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void CorrectInviscidFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+
+    //! To correct the primitive variables of faces nearby the wall.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out]: inviscidFaceProxy is an array that stores the primitive variables of grid faces.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void CorrectFaceVar(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface);
+    void CorrectFaceVarR(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface);
+    void CorrectChemicalFaceVar(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface);
+
+    void GetInvFaceVar(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface);
+    
+    //! Compute gradient of primitive variables & temperature for viscous flux computation.
+    void ComputeGradient(Grid *grid);
+    void ComputeGradientCellCenter(Grid *grid);
+    void ComputeGradientCellCenterForLES(Grid *grid);
+    void ComputeGradientCellCenterOfruvwptOnlyForMixGrid(Grid *grid);
+    void ReconGrad(Grid *gridIn, int iSurface);
+
+    void RegisterCFDSolverInterfaceField();
+    void RegisterOversetField();
+    void ReleaseCFDSolverInterfaceField();
+    void RotateVectorFromInterface(Grid *grid, const int &neighborZoneIndex, const int &neqn);
+
+    void CompressGradientandLimitToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+    void DecompressGradientandLimitToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+
+    void CompressQlQrToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+    void DecompressQlQrToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+
+    void CompressFacefluxToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+    void DecompressFacefluxToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+
+    void CompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+    void DecompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+
+    void RestrictAllQ(Grid *fineGridIn, Grid *coarseGridIn);
+    void RestrictDefect(Grid *fineGridIn, Grid *coarseGridIn);
+    void PutCorrectionBack(Grid *grid, FieldProxy *qProxy);
+    void CorrectFineGrid(Grid *fineGridIn, Grid *coarseGridIn);
+    void InterpolatFineGrid(Grid *fineGridIn, Grid *coarseGridIn);
+    void prol   (Grid *fineGridIn, Grid *coarseGridIn, FieldProxy *workProxy);
+    void prolhic_eric(Grid *fineGridIn, Grid *coarseGridIn, FieldProxy *workProxy);
+    void PositiveUpdate(Grid *grid, FieldProxy *qProxy, FieldProxy *dqProxy);
+
+    void SolveLUSGSForward(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+    void SolveLUSGSBackward(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+
+    //! To determine the CFL number of the next iteration step.
+    void DetermineCFLNumber(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *dqProxy1);
+
+
+    //! To execute the forward sweep of the Matrix LU-SGS method.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out]: dqProxy is an array that stores the difference values between the conservative variables at n and n+1 time step.
+    void SolveMatrixLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal);
+    //! To execute the backward sweep of the Matix LU-SGS method.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out]: dqProxy is an array that stores the difference values between the conservative variables at n and n+1 time step.
+    void SolveMatrixLUSGSBackward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal);
+
+    void SetGhostDQLUSGS(Grid *gridIn, RDouble4D &dq);
+
+    //calculate the total area of all BC regions with the same BC name.
+    void calculateBCArea(Grid *gridIn, StructBC *structBC);
+
+    //calculate the mass flux ratio of all mass outlet BC regions with the same BC name.
+    void CalculateMassFluxRatio();
+
+    void ViscousAdiabaticWall(Grid *gridIn, StructBC *structBC);
+    void ViscousIsotropicWall(Grid *gridIn, StructBC *structBC, int iWallBC);
+    void SymmetryBC3D(Grid *gridIn, StructBC *structBC);
+    void SingularAxisBC3D(Grid *gridIn, StructBC *structBC);
+    void SingularAxisFullPlaneBC3D(Grid *gridIn, StructBC *structBC);
+    void FarFieldRiemannInvariants(Grid *gridIn, StructBC *structBC, RDouble refGama);
+    void InFlowBC3D(Grid *gridIn, StructBC *structBC);
+    void OutFlowBC3D(Grid *gridIn, StructBC *structBC);
+    void PressureInletBCRiemann(Grid *gridIn, StructBC *structBC);
+    void PressureOutletBC(Grid *gridIn, StructBC *structBC);
+
+    //! Get the primitiveVar of Inflow BC by Interrpolate from trajectory data.
+    void SetBCInitialValuesByInterpolation(StructBC *structBC, RDouble *primitiveVar);
+
+    //! Modify primitiveVar of Inflow BC by SpeedCoef.
+    void SetBCInitialValuesBySpeedCoef(int nNumberOfSpeedStep, RDouble *primitiveVar);
+
+    //! Mass flow in boundary condition.
+    void MassFlowInletBC(Grid *gridIn, StructBC *structBC);
+
+    //! Mass flow out boundary condition.
+    void MassFlowOutletBC(Grid *gridIn, StructBC *structBC);
+
+    void NozzleInletFlow(Grid *gridIn, StructBC *structBC);
+    void NozzleOutFlow(Grid *gridIn, StructBC *structBC);
+
+    void CornerPoint(Grid *gridIn);
+    
+    void FillField(Grid *gridIn, FieldProxy *fieldProxy, RDouble value);
+    void FillField(Grid *gridIn, FieldProxy *field1Proxy, FieldProxy *field2Proxy);
+    
+    FieldProxy * GetFieldProxy(Grid *gridIn, const string &field_name);
+    FieldProxy * CreateFieldProxy(Grid *gridIn);
+    FieldProxy * GetResidualProxy(Grid *gridIn);
+
+    void ReconGradVolWeightedwithCorrection(Grid *gridIn, int nSurface);
+    void GetGradientAtFace_CorrectionAtPhysicalBoundary(Grid *gridin, int iSurface);
+
+    void StoreRhsByResidual(Grid *gridIn, FieldProxy *rightHandSideProxy);
+    void InitResidual(Grid *gridIn, FieldProxy *rightHandSideProxy);
+    void RecoverResidual(Grid *gridIn, FieldProxy *rightHandSideProxy);
+    
+    FaceProxy * CreateFaceProxy(Grid *gridIn);
+    GeomProxy * CreateGeomProxy(Grid *gridIn);
+    
+    StructIterNCCR * CreateInvStructIter(Grid *gridIn, int iSurface);
+    
+    bool GetInviscidFaceValue(Grid *gridIn, FaceProxy *faceProxy, StructIterNCCR *structIter, FieldProxy *qlProxy, FieldProxy *qrProxy, int nlen);
+    bool LoadFaceFlux(Grid *gridIn, FaceProxy *faceProxy, StructIterNCCR *structIter, FieldProxy *fluxProxy, int nlen);
+
+    //! Restart from perfect gas flow field for chemical reaction simulation.
+    void ReadPrefectGasRestartH5(ActionKey *actkey);
+
+    void DumpRestart(ActionKey *actkey);
+    void ReadRestart(ActionKey *actkey);
+
+    void DumpRestartH5(ActionKey *actkey);
+    void ReadRestartH5(ActionKey *actkey);
+    void ReadRestartFlowH5(ActionKey *actkey);
+
+    void AirForceCoef(ActionKey *actkey);
+
+    //! Set the temperatures using the variables reading from the previous file.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: nChemical denotes the flow type of the previous computation.
+    //! @param[in ]: nTemperatureModel denotes the temperature type of the previous computation.
+    //! @param[in ]: primTemperature denotes the temperatures of the previous computation.
+    void SetFlowfieldTemperature(Grid *grid, int nChemical, int nTemperatureModel, RDouble4D *primTemperature);
+
+    //! Set the primitive variables using the variables reading from the previous file.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: nChemical denotes the flow type of the previous computation.
+    //! @param[in ]: nTemperatureModel denotes the temperature type of the previous computation.
+    //! @param[in ]: numberOfSpecies denotes the species number of the previous computation.
+    //! @param[in ]: speciesOrder denotes the species order of the previous computation.
+    //! @param[in ]: primVariables denotes the primitive variables of the previous computation.
+    void SetPrimitiveVariables(Grid *grid, int nChemical, int nTemperatureModel, int numberOfSpecies, Int1D *speciesOrder, RDouble4D *primVariables);
+
+    //! Set the surface mass fractions using the variables reading from the previous file.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: nChemical denotes the flow type of the previous computation.
+    //! @param[in ]: numberOfSpecies denotes the species number of the previous computation.
+    //! @param[in ]: speciesOrder denotes the species order of the previous computation.
+    //! @param[in ]: primMassFractions denotes the surface mass fractions of the previous computation.
+    void SetSurfaceMassFractions(Grid *grid, int nChemical, int numberOfSpecies, Int1D *speciesOrder, RDouble3D *primMassFractions);
+
+    //! Set the surface slip variables using the variables reading from the previous file.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: nChemical denotes the flow type of the previous computation.
+    //! @param[in ]: numberOfSpecies denotes the species number of the previous computation.
+    //! @param[in ]: speciesOrder denotes the species order of the previous computation.
+    //! @param[in ]: primSlipVar denotes the surface slip variables of the previous computation.
+    void SetSurfaceSlipVariables(Grid *grid, int nChemical, int numberOfSpecies, Int1D *speciesOrder, RDouble3D *primSlipVar);
+
+private:
+    void AirForceCoefParts(ActionKey *actkey, int partID, int Coordinate = GlobalCoordinate);
+    void AirForceCoefBodies(ActionKey *actkey);
+    
+    //! Write the variables of Cp, Cf, Qw, y+ etc. on surface to the file.
+    void CpDistriCoef(ActionKey *actkey);
+    
+    //! To write variables on surface such as p, rho, T etc. to the file. added by Li Peng on Mar.5, 2019.
+    //! Add this function in order to verify the chemical codes and the related algorithm of computing thermal distribution.
+    void ExportSurfaceVariables(ActionKey *actkey);
+
+    //! Compute the surface heating change and obtain the maximum change of the surface heating ratio.
+    void GetSurfaceHeatingChange(ActionKey *actkey, RDouble &localMaxHeatChange);
+
+    //! Write the surface information to the file.
+    void WriteSurfaceInfo(ActionKey *actkey);
+
+    //! To obtain the derivatives of the designate primary variable whose sequence number in the array is marked with the valued of nIndex.
+    void GetDerivatives(int nIndex, int iSurface, int ndim, int nlr, int i, int j, int k, int ni,int nj, int nk, RDouble4D &q,
+                        RDouble4D &xvn, RDouble4D &yvn, RDouble4D &zvn, RDouble3D &vol, RDouble &dvdx, RDouble &dvdy, RDouble &dvdz);
+    
+    void GetResidual(ActionKey *actkey);
+    void GetResidual(ActionKey *actkey, RDouble &localMaxRes);
+    void GetResidual(Grid *gridIn, RDouble &localMaxRes);
+
+    //! Obtain the CFL number.
+    void ObtainCFLNumber(Grid *gridIn, RDouble &globalMinCFL, RDouble &globalMaxCFL);
+
+    void VisualizationAverageFlow(ActionKey *actkey);
+
+    void ComputeHeatFlux(ActionKey *actkey, RDouble *HeatFlux);
+
+public:
+    RDouble4D * CompMachNumber(Grid *gridIn);
+    RDouble4D * CompMachNodeNumber(Grid* gridIn, Post_Visual *postVisualization);
+    RDouble4D * ComputeMachNumberField(Grid *gridIn);
+
+    void ComputeVorticitybyQCriteria(Grid *gridIn, RDouble3D *&vorticity_x, RDouble3D *&vorticity_y, RDouble3D *&vorticity_z, RDouble3D *&vorticityMagnitude,  RDouble3D *&strain_rate, RDouble3D *&Q_criteria);
+    void ComputeCp(Grid *gridIn, RDouble4D *&cp);
+
+    //! Compute the dimensional variables for density, pressure, temperature and the number density of electron.
+    RDouble4D * ComputeDimensionalElectron(Grid *gridIn);
+
+    RDouble4D * ComputeDimensionalVariables(Grid *gridIn);
+
+    RDouble4D * ComputePrimitiveVariablesWithMoleFraction(Grid *gridIn);
+
+    //! Compute the non-equilibrium number, such as the Damkohler number, Vibrational non-equilibrium number, etc.
+    RDouble4D * ComputeNonequiliriumNumber(Grid *gridIn);
+
+public:
+    void VisualizationVariables(Grid *gridIn, FieldProxy *workProxy, const string &filename);
+
+    void UploadInterfaceData  (ActionKey *actkey);
+
+    void DownloadInterfaceData(ActionKey *actkey);
+
+    void UploadOversetData  (ActionKey *actkey);
+
+    void DownloadOversetData(ActionKey *actkey);
+
+    GradientCellCenter *GetGradientCellCenterUVWT(Grid *gridIn, FieldProxy *q);
+    GradientCellCenter *GetGradientCellCenterUVWT(Grid *gridIn);
+
+    //! Prepare post visualization variables, store it in to grid's postVisualization database.
+    LIB_EXPORT void ComputePostVisualVariables(Post_Visual * postVisualization);
+    //! Prepare monitored probes variables for post-processing , store it into postProbesVar database.
+    LIB_EXPORT void ComputePostProbesVariables(Post_Probes * postProbesVar);
+    //! Create and init control parameters.
+    LIB_EXPORT void InitControlParameters();
+
+    //! Get controlParamters(a Para_NSSolver type pointer).
+    LIB_EXPORT Param_NSSolverStruct *GetControlParameters() const;
+
+    void Monitor(Grid *gridIn, RDouble4D *dq=NULL);
+};
+
+    bool iterijkNCCR(int &i, int &j, int &k, int ist, int ied, int jst, int jed, int kst, int ked);
+}
+
diff --git a/CFD/NSSolver/include/NSSolver.h b/CFD/NSSolver/include/NSSolver.h
new file mode 100644
index 0000000..cd310c3
--- /dev/null
+++ b/CFD/NSSolver/include/NSSolver.h
@@ -0,0 +1,170 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      NSSolver.h
+//! @brief     The base NS solver, which will derive both structured and unstructured NS solver,
+//!            these two solvers are actually used instead of this NSSolver.
+//! @author    He Xin, Bell, He Kun, He Xianyao, Wan Yunbo, Liu Jian, Xu Qingxin, Zhang Zipei, Li peng, Ma Yankai, 
+//!            Min Yaobing, Meng Liyuan, Xu Gang, Guo Yongyan, Zhang Yang.
+
+#pragma once
+#include "CFDSolver.h"
+#include "Flux_Inviscid.h"
+
+namespace PHSPACE
+{
+class ActionKey;
+class Grid;
+class FaceProxy;
+class Param_NSSolver;
+
+//! @brief The base class of all other NS solvers.
+//!        The inherit order is: NSSolver->NSSolverStructFV/NSSolverStructFD/NSSolverUnstruct.\n
+//!        Note that, the finally actually used solver are NSSolverStructFV/NSSolverStructFD/NSSolverUnstruct,
+//!        rather than the NSSolver. This solver contains the common components and functions which are 
+//!        independent on the grid type is structured or unstructured.
+class NSSolver : public CFDSolver
+{
+public:
+    NSSolver();
+    ~NSSolver();
+
+public:
+    //! Return the control parameters of the NS solver.
+    //! It is important that, each level of inherit class has their own control parameter.
+    LIB_EXPORT Param_NSSolver *GetControlParameters() const;
+
+    //! To get the number of equations to be solve in the solver.
+    //! which is the instantiation of the one in Solver.
+    int GetNumberOfEquations();    
+    
+    //! Compute viscous coefficient only for the perfect gas.
+    //! Here it is a pure virtual function, it will be re-defined in NSSolverStructFV/NSSolverStructFD/NSSolverUnstruct.
+    virtual void ComputeViscousCoefficientWithoutChemical(Grid *grid)  = 0;
+    virtual void ComputeViscousCoefficient(Grid *grid) {};
+    //! Compute specific heat ratio 'gama' and temperature.
+    //! Here it is a pure virtual function, it will be re-defined in NSSolverStructFV/NSSolverStructFD/NSSolverUnstruct.
+    virtual void ComputeGamaAndTemperature(Grid *grid) = 0;
+
+    //! Compute time step of steady simulation. Using Local Time Step method default.
+    void TimeStep(Grid *grid);
+
+    //! Compute time step using local method, meaning that the time step of each cell element
+    //! depends on it's volume.
+    //! Here it is a pure virtual function, it will be re-defined in NSSolverStructFV/NSSolverStructFD/NSSolverUnstruct.
+    virtual void LocalTimeStep(Grid *grid_in) = 0;
+
+    //! Compute time step using global method, meaning that using the minimum time step of cells.
+    //! Here it is a pure virtual function, it will be re-defined in NSSolverStructFV/NSSolverStructFD/NSSolverUnstruct.
+    virtual void GlobalTimeStep(Grid *grid_in) = 0;
+
+    virtual void LocalGlobalTimeStep(Grid *grid_in) = 0;
+    
+    //! Compute the residual of the Right-Hand-Side of the equations.
+    //! The residual is the flux actually, including inviscid flux, viscous flux,
+    //! source flux, etc. These fluxes are defined in NSSolverStructFV/NSSolverStructFD/NSSolverUnstruct.
+    //! This function is an very important main function of the NS solver.
+    void UpdateResiduals(Grid *grid);
+
+    //! =======Some special post-process: END==============
+
+    //! Return the Residual file name for dumping.
+    virtual const string GetResidualFileName();
+
+    //! Do some post-process work after simulation over.
+    void Post();
+
+    //! Do some post-process work after each iteration over.
+    void PostSolve(Grid *grid, int stage, int level = 0);
+
+    void DumpResultFile(Grid *grid, int level = 0);
+
+    //! switch the compute method used for self-adaption calculation.
+    void CheckResult(Grid *grid, int level = 0);
+
+    void CheckResiduals(Grid *grid, int level = 0);
+
+    //! dump CFL number.
+    void DumpCFLNumber(Grid *grid, int level = 0);
+
+    //! exam the surface heating change.
+    void CheckSurfaceHeatingChange(Grid *grid, int level = 0);
+
+    //! Fill the action.
+    //! @param[in ]: action     The task type.
+    //! @param[in ]: level      The multi-grid level.
+    void FillActionKey(ActionKey *actkey, int action, int level);
+
+    //! The following three functions are used in LUSGS, which will be consider more latter.
+    virtual void GetResidual(ActionKey *actkey);
+    
+    //! The following three functions are used in overset grid, consider more latter.
+    void DeAllocateOversetInterfaceVar(Data_ParamFieldSuite *dataStore);    
+    void PrepareOversetInterfaceData(Data_ParamFieldSuite *dataStore, InterfaceDataProxy *interfaceDataProxy);
+
+    virtual void ZeroResidualOfSpecialCells(Grid * gridIn) {};
+
+protected:
+    //! Compute CFL number at each iteration.
+    RDouble ComputeCFL(RDouble partialCFL = -1.0);
+
+    //! Source flux, such as chemical source, unsteady source, volume force, etc.
+    void SourceFlux(Grid *grid);
+
+    //! Source flux: Compute the chemical source terms.
+    //! @param[in]: gridIn denotes the current computational regions of the grids.
+    virtual void ChemicalSource(Grid *grid) = 0;
+
+    //! Source flux: compute the rotating source term.
+    virtual void RotatingSource(Grid *grid) = 0;
+
+    //! Source flux: Compute the gravity source terms.
+    //! @param[in]: gridIn denotes the current computational regions of the grids.
+    virtual void gravitySource(Grid *grid) = 0;
+
+    //! Source flux: compute the unsteady dual time source.
+    virtual void DualTimeSource(Grid *grid) = 0;
+
+    virtual void Turb_Sengy(Grid *grid) {};
+
+    //! Return if need to dump out the field data.
+    bool WantVisualField(Grid *grid);
+
+    //! Register interface variables into field of NS Solver.
+    //! The common part of structured and unstructured solver.
+    virtual void RegisterCFDSolverInterfaceField();
+
+    virtual void ReleaseCFDSolverInterfaceField();
+
+    //! Register interface variables into field of NS Solver.
+    //! The unstructured part.
+    virtual void RegisterCFDSolverInterfaceFieldUnstruct();
+
+    void RegisterOversetField();
+
+    //! Register the interpoint field in the NS solver.
+    virtual void RegisterCFDSolverInterpointField();
+
+    //! Dump out typical standard case: turbulent flat plate.
+    virtual void Turbulence_Flat_Plate_Output_NASA(Grid *gridIn) {};
+
+private:
+    //! Initialize the flow on the coarse grid if using multigrid.
+    void InitCoarseGridsFlow();
+
+    //! Initialize some dependent variables, such as gama, viscous coefficients, temperature,
+    //! before each iteration.
+    void InitDependentVariables();
+};
+
+void SetInviscidSchemeParameters(InviscidSchemeParameter *invSchemePara, FaceProxy *face_proxy, Param_NSSolver *parameters);
+
+}
diff --git a/CFD/NSSolver/include/NSSolverStruct.h b/CFD/NSSolver/include/NSSolverStruct.h
new file mode 100644
index 0000000..25c84de
--- /dev/null
+++ b/CFD/NSSolver/include/NSSolverStruct.h
@@ -0,0 +1,405 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      NSSolverStruct.h
+//! @brief     NS solver for struct grid.
+//! @author    He Xin, Bell, He Kun, He Xianyao, Wan Yunbo, Liu Jian, Xu Qingxin, Zhang Zipei, Li peng, Ma Yankai, 
+//!            Min Yaobing, Meng Liyuan, Xu Gang, Guo Yongyan, Zhang Yang.
+
+#pragma once
+#include "NSSolver.h"
+using namespace std;
+
+namespace PHSPACE
+{
+class GeomProxy;
+class StructBC;
+class Param_NSSolverStruct;
+class GradientCellCenter;
+class Gradient;
+
+class StructIter
+{
+public:
+    int i0,j0,k0;
+    int i1,j1,k1;
+    int il1,jl1,kl1;
+    int ist, ied, jst, jed, kst, ked;
+    int nsurf;
+    int nsize;
+  //  int surfaceSize; //  Size of  surface
+};
+
+class NSSolverStruct : public NSSolver
+{
+private:
+    GradientCellCenter *gradientCellCenterUVWT[5];
+    int systemgridtype;
+public:
+    int nWallBC; //The number of surface boundary conditions.
+    int nMaxSurfaceCell; //The number of surface cells.
+    int nIonizationFlag;
+    NSSolverStruct();
+    ~NSSolverStruct();
+private:
+    void ReadParameter();
+    void AllocateGlobalVar  (Grid *gridIn);
+    void DeAllocateGlobalVar(Grid *gridIn);
+    void GetSurfaceCellNumber(Grid *gridIn);
+    void InitializeSurfaceParameters(Grid *gridIn);
+    void InitializeSurfaceParametersFromFile(Grid *gridIn);
+    void ChangeSurfaceTemperature(Grid *gridIn);
+    void ChangeSurfaceMassFractions(Grid *gridIn);
+
+    //! Judge if the flow field variables file already exists in NS solver.
+    bool JudgeIfRestart();
+    bool JudgeIfReadAverage();
+
+    bool JudgeIfProtectedRestart();
+
+    void InitFlowAsRestart();
+    void InitialSetPartialParameter(StructGrid *grid, bool flowTag = true);
+
+    void InitGrad(Grid *gridIn);
+    void InitCGrid(Grid *fineGridIn, Grid *coarseGridIn);
+    void ZeroResiduals(Grid *grid);
+
+    void CreateStandardADT(Grid *grid, DataStruct_AdtTree<int,RDouble> *&adtTree, RDouble &tol);
+
+    void CompNodeVar(Grid *gridIn, FieldProxy *qnProxy, FieldProxy *qProxy);
+    void InterfaceValueFix(Grid *gridIn, FieldProxy *qnProxy, FieldProxy *qProxy);
+    void WallValueFix(Grid *gridIn, FieldProxy *qnProxy, FieldProxy *qProxy);
+    
+    void CompNodeVar(Grid *gridIn, RDouble4D &qn, int m, RDouble4D &q, int n);
+    void CompNodeVar(Grid *gridIn, RDouble4D &qn, int m, RDouble3D &q);
+    
+    void LoadQ(Grid *grid, FieldProxy *qProxy);
+    void LoadResiduals(Grid *gridIn, FieldProxy *rightHandSideProxy);
+    void ComputeMinTimeStep(Grid *grid, RDouble &minDt, RDouble &maxDt);
+    void ReduceMaxTimeStep(Grid *grid, RDouble globalMinDt);
+    void LocalTimeStep(Grid *gridIn);
+    void GlobalTimeStep(Grid *gridIn);
+    void LocalGlobalTimeStep(Grid *gridIn);
+    void SpectrumRadius(Grid *grid);
+    void SpectrumRadiusInviscid(Grid *gridIn);
+    void SpectrumRadiusViscous(Grid *gridIn);
+    void ConservativePreconMatrix(Grid *gridIn);
+
+    void Diagonal(Grid *gridIn);    //! Source linear.
+    //Compute the local time scale.
+    void ComputeTimeScale(Grid *gridIn);
+    //Compute the local time scale of flow.
+    void ComputeFlowTimeScale(Grid *gridIn);
+
+    //! Set the boundary conditions.
+    void Boundary(Grid *grid);
+    void CalculateBoundaryData();
+    void CalPressureFactor(Grid *gridIn);
+    void GetHeatTransferCoeff(Grid *gridIn);
+    void InviscidFlux(Grid *gridIn);
+    void ZeroResidualOfSpecialCells(Grid *gridIn);    //! Added By Guo Yongheng 20160825.
+    void ViscousFlux(Grid *gridIn);
+    void DualTimeSource(Grid *gridIn);
+
+    //! Compute the chemical source terms.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void ChemicalSource(Grid *gridIn);  //! Source.
+    
+    void gravitySource(Grid* gridIn) {};  //! Source.
+
+    void RotatingSource(Grid* gridIn) {};  //! Source.
+
+    void AverageMixingPlane(Grid *grid) {};
+    void MixingPlaneDataTransfer(Grid *grid, Grid *Neighborgrid) {};
+    void NonReflective(Grid *grid, Grid *NeighborGrid) {};
+    void SetMixingPlaneData(Grid *grid) {};
+
+    //! Compute the distance between the center of the grid cell on the first layer and the center of the surface cell.
+    void ComputeFirstLayerGridHeight(Grid *gridIn);
+    void UpdateUnsteadyFlow(Grid *gridIn);
+    RDouble UnsteadyConvergence(Grid *gridIn);
+
+    void ComputeViscousCoeff(Grid *gridIn);
+    void ComputeViscousCoefficientWithoutChemical(Grid *gridIn);
+    void ComputePreconditionCoefficient(Grid *gridIn);
+
+    void ComputeGamaAndTemperature(Grid *gridIn);                 //Gama ��Temperature
+    void RungeKuttaResidual(Grid *gridIn, FieldProxy *dqProxy, RDouble coef);
+    
+    void SolutionFix(Grid *gridIn, RDouble *prim, int i, int j, int k);
+    void UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy);    //! Primitive vs Conservative.
+
+    void UpdateQlQrOnlyforMixGrid(Grid *grid);
+    void UpdateInviscidfluxOnlyforMixGrid(Grid *grid);
+    void UpdateViscousfluxOnlyforMixGrid(Grid *grid);
+    void LoadGlobalfacefluxtoResOnlyforMixGrid(Grid *gridIn);
+
+    void LoadFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+    void CompVisFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+    //! To correct the viscous fluxes of solid boundaries under the non-equilibrium condition.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out]: fluxProxy is an array that stores the inviscid fluxes of grid faces.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void CorrectViscousFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+
+    void CompVisFluxnew(Grid *gridIn, Gradient *gradientUVWT, FieldProxy *fluxProxy, int iSurface);
+    void CompVisFluxnew(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+
+    void CompVisFluxLES(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+    void ComputeInviscidFlux(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface);
+    void InviscidFluxWrap(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, FieldProxy *fluxProxy, INVScheme inviscidScheme, int iSurface);
+    //! To correct the inviscid fluxes of solid boundaries under the non-equilibrium condition.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out]: fluxProxy is an array that stores the inviscid fluxes of grid faces.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void CorrectInviscidFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+
+    //! To correct the primitive variables of faces nearby the wall.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out]: inviscidFaceProxy is an array that stores the primitive variables of grid faces.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void CorrectFaceVar(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface);
+    void CorrectFaceVarR(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface);
+    void CorrectChemicalFaceVar(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface);
+
+    void GetInvFaceVar(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface);
+    
+    //! Compute gradient of primitive variables & temperature for viscous flux computation.
+    void ComputeGradient(Grid *grid);
+    void ComputeGradientCellCenter(Grid *grid);
+    void ComputeGradientCellCenterForLES(Grid *grid);
+    void ComputeGradientCellCenterOfruvwptOnlyForMixGrid(Grid *grid);
+    void ReconGrad(Grid *gridIn, int iSurface);
+
+    void RegisterCFDSolverInterfaceField();
+    void RegisterOversetField();
+    void ReleaseCFDSolverInterfaceField();
+    void RotateVectorFromInterface(Grid *grid, const int &neighborZoneIndex, const int &neqn);
+
+    void CompressGradientandLimitToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+    void DecompressGradientandLimitToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+
+    void CompressQlQrToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+    void DecompressQlQrToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+
+    void CompressFacefluxToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+    void DecompressFacefluxToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+
+    void CompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+    void DecompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+
+    void RestrictAllQ(Grid *fineGridIn, Grid *coarseGridIn);
+    void RestrictDefect(Grid *fineGridIn, Grid *coarseGridIn);
+    void PutCorrectionBack(Grid *grid, FieldProxy *qProxy);
+    void CorrectFineGrid(Grid *fineGridIn, Grid *coarseGridIn);
+    void InterpolatFineGrid(Grid *fineGridIn, Grid *coarseGridIn);
+    void prol   (Grid *fineGridIn, Grid *coarseGridIn, FieldProxy *workProxy);
+    void prolhic_eric(Grid *fineGridIn, Grid *coarseGridIn, FieldProxy *workProxy);
+    void PositiveUpdate(Grid *grid, FieldProxy *qProxy, FieldProxy *dqProxy);
+
+    void SolveLUSGSForward(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+    void SolveLUSGSBackward(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+
+    //! To determine the CFL number of the next iteration step.
+    void DetermineCFLNumber(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *dqProxy1);
+
+
+    //! To execute the forward sweep of the Matrix LU-SGS method.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out]: dqProxy is an array that stores the difference values between the conservative variables at n and n+1 time step.
+    void SolveMatrixLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal);
+    //! To execute the backward sweep of the Matix LU-SGS method.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out]: dqProxy is an array that stores the difference values between the conservative variables at n and n+1 time step.
+    void SolveMatrixLUSGSBackward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal);
+
+    void SetGhostDQLUSGS(Grid *gridIn, RDouble4D &dq);
+
+    //calculate the total area of all BC regions with the same BC name.
+    void calculateBCArea(Grid *gridIn, StructBC *structBC);
+
+    //calculate the mass flux ratio of all mass outlet BC regions with the same BC name.
+    void CalculateMassFluxRatio();
+
+    void ViscousAdiabaticWall(Grid *gridIn, StructBC *structBC);
+    void ViscousIsotropicWall(Grid *gridIn, StructBC *structBC, int iWallBC);
+    void SymmetryBC3D(Grid *gridIn, StructBC *structBC);
+    void SingularAxisBC3D(Grid *gridIn, StructBC *structBC);
+    void SingularAxisFullPlaneBC3D(Grid *gridIn, StructBC *structBC);
+    void FarFieldRiemannInvariants(Grid *gridIn, StructBC *structBC, RDouble refGama);
+    void InFlowBC3D(Grid *gridIn, StructBC *structBC);
+    void OutFlowBC3D(Grid *gridIn, StructBC *structBC);
+    void PressureInletBCRiemann(Grid *gridIn, StructBC *structBC);
+    void PressureOutletBC(Grid *gridIn, StructBC *structBC);
+
+    //! Get the primitiveVar of Inflow BC by Interrpolate from trajectory data.
+    void SetBCInitialValuesByInterpolation(StructBC *structBC, RDouble *primitiveVar);
+
+    //! Modify primitiveVar of Inflow BC by SpeedCoef.
+    void SetBCInitialValuesBySpeedCoef(int nNumberOfSpeedStep, RDouble *primitiveVar);
+
+    //! Mass flow in boundary condition.
+    void MassFlowInletBC(Grid *gridIn, StructBC *structBC);
+
+    //! Mass flow out boundary condition.
+    void MassFlowOutletBC(Grid *gridIn, StructBC *structBC);
+
+    void NozzleInletFlow(Grid *gridIn, StructBC *structBC);
+    void NozzleOutFlow(Grid *gridIn, StructBC *structBC);
+
+    void CornerPoint(Grid *gridIn);
+    
+    void FillField(Grid *gridIn, FieldProxy *fieldProxy, RDouble value);
+    void FillField(Grid *gridIn, FieldProxy *field1Proxy, FieldProxy *field2Proxy);
+    
+    FieldProxy * GetFieldProxy(Grid *gridIn, const string &field_name);
+    FieldProxy * CreateFieldProxy(Grid *gridIn);
+    FieldProxy * GetResidualProxy(Grid *gridIn);
+
+    void ReconGradVolWeightedwithCorrection(Grid *gridIn, int nSurface);
+    void GetGradientAtFace_CorrectionAtPhysicalBoundary(Grid *gridin, int iSurface);
+
+    void StoreRhsByResidual(Grid *gridIn, FieldProxy *rightHandSideProxy);
+    void InitResidual(Grid *gridIn, FieldProxy *rightHandSideProxy);
+    void RecoverResidual(Grid *gridIn, FieldProxy *rightHandSideProxy);
+    
+    FaceProxy * CreateFaceProxy(Grid *gridIn);
+    GeomProxy * CreateGeomProxy(Grid *gridIn);
+    
+    StructIter * CreateInvStructIter(Grid *gridIn, int iSurface);
+    
+    bool GetInviscidFaceValue(Grid *gridIn, FaceProxy *faceProxy, StructIter *structIter, FieldProxy *qlProxy, FieldProxy *qrProxy, int nlen);
+    bool LoadFaceFlux(Grid *gridIn, FaceProxy *faceProxy, StructIter *structIter, FieldProxy *fluxProxy, int nlen);
+
+    //! Restart from perfect gas flow field for chemical reaction simulation.
+    void ReadPrefectGasRestartH5(ActionKey *actkey);
+
+    void DumpRestart(ActionKey *actkey);
+    void ReadRestart(ActionKey *actkey);
+
+    void DumpRestartH5(ActionKey *actkey);
+    void ReadRestartH5(ActionKey *actkey);
+    void ReadRestartFlowH5(ActionKey *actkey);
+
+    void AirForceCoef(ActionKey *actkey);
+
+    //! Set the temperatures using the variables reading from the previous file.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: nChemical denotes the flow type of the previous computation.
+    //! @param[in ]: nTemperatureModel denotes the temperature type of the previous computation.
+    //! @param[in ]: primTemperature denotes the temperatures of the previous computation.
+    void SetFlowfieldTemperature(Grid *grid, int nChemical, int nTemperatureModel, RDouble4D *primTemperature);
+
+    //! Set the primitive variables using the variables reading from the previous file.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: nChemical denotes the flow type of the previous computation.
+    //! @param[in ]: nTemperatureModel denotes the temperature type of the previous computation.
+    //! @param[in ]: numberOfSpecies denotes the species number of the previous computation.
+    //! @param[in ]: speciesOrder denotes the species order of the previous computation.
+    //! @param[in ]: primVariables denotes the primitive variables of the previous computation.
+    void SetPrimitiveVariables(Grid *grid, int nChemical, int nTemperatureModel, int numberOfSpecies, Int1D *speciesOrder, RDouble4D *primVariables);
+
+    //! Set the surface mass fractions using the variables reading from the previous file.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: nChemical denotes the flow type of the previous computation.
+    //! @param[in ]: numberOfSpecies denotes the species number of the previous computation.
+    //! @param[in ]: speciesOrder denotes the species order of the previous computation.
+    //! @param[in ]: primMassFractions denotes the surface mass fractions of the previous computation.
+    void SetSurfaceMassFractions(Grid *grid, int nChemical, int numberOfSpecies, Int1D *speciesOrder, RDouble3D *primMassFractions);
+
+    //! Set the surface slip variables using the variables reading from the previous file.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: nChemical denotes the flow type of the previous computation.
+    //! @param[in ]: numberOfSpecies denotes the species number of the previous computation.
+    //! @param[in ]: speciesOrder denotes the species order of the previous computation.
+    //! @param[in ]: primSlipVar denotes the surface slip variables of the previous computation.
+    void SetSurfaceSlipVariables(Grid *grid, int nChemical, int numberOfSpecies, Int1D *speciesOrder, RDouble3D *primSlipVar);
+
+private:
+    void AirForceCoefParts(ActionKey *actkey, int partID, int Coordinate = GlobalCoordinate);
+    void AirForceCoefBodies(ActionKey *actkey);
+    
+    //! Write the variables of Cp, Cf, Qw, y+ etc. on surface to the file.
+    void CpDistriCoef(ActionKey *actkey);
+    
+    //! To write variables on surface such as p, rho, T etc. to the file. added by Li Peng on Mar.5, 2019.
+    //! Add this function in order to verify the chemical codes and the related algorithm of computing thermal distribution.
+    void ExportSurfaceVariables(ActionKey *actkey);
+
+    //! Compute the surface heating change and obtain the maximum change of the surface heating ratio.
+    void GetSurfaceHeatingChange(ActionKey *actkey, RDouble &localMaxHeatChange);
+
+    //! Write the surface information to the file.
+    void WriteSurfaceInfo(ActionKey *actkey);
+
+    //! To obtain the derivatives of the designate primary variable whose sequence number in the array is marked with the valued of nIndex.
+    void GetDerivatives(int nIndex, int iSurface, int ndim, int nlr, int i, int j, int k, int ni,int nj, int nk, RDouble4D &q,
+                        RDouble4D &xvn, RDouble4D &yvn, RDouble4D &zvn, RDouble3D &vol, RDouble &dvdx, RDouble &dvdy, RDouble &dvdz);
+    
+    void GetResidual(ActionKey *actkey);
+    void GetResidual(ActionKey *actkey, RDouble &localMaxRes);
+    void GetResidual(Grid *gridIn, RDouble &localMaxRes);
+
+    //! Obtain the CFL number.
+    void ObtainCFLNumber(Grid *gridIn, RDouble &globalMinCFL, RDouble &globalMaxCFL);
+
+    void VisualizationAverageFlow(ActionKey *actkey);
+
+    void ComputeHeatFlux(ActionKey *actkey, RDouble *HeatFlux);
+
+public:
+    RDouble4D * CompMachNumber(Grid *gridIn);
+    RDouble4D * CompMachNodeNumber(Grid* gridIn, Post_Visual *postVisualization);
+    RDouble4D * ComputeMachNumberField(Grid *gridIn);
+
+    void ComputeVorticitybyQCriteria(Grid *gridIn, RDouble3D *&vorticity_x, RDouble3D *&vorticity_y, RDouble3D *&vorticity_z, RDouble3D *&vorticityMagnitude,  RDouble3D *&strain_rate, RDouble3D *&Q_criteria);
+    void ComputeCp(Grid *gridIn, RDouble4D *&cp);
+
+    //! Compute the dimensional variables for density, pressure, temperature and the number density of electron.
+    RDouble4D * ComputeDimensionalElectron(Grid *gridIn);
+
+    RDouble4D * ComputeDimensionalVariables(Grid *gridIn);
+
+    RDouble4D * ComputePrimitiveVariablesWithMoleFraction(Grid *gridIn);
+
+    //! Compute the non-equilibrium number, such as the Damkohler number, Vibrational non-equilibrium number, etc.
+    RDouble4D * ComputeNonequiliriumNumber(Grid *gridIn);
+
+public:
+    void VisualizationVariables(Grid *gridIn, FieldProxy *workProxy, const string &filename);
+
+    void UploadInterfaceData  (ActionKey *actkey);
+
+    void DownloadInterfaceData(ActionKey *actkey);
+
+    void UploadOversetData  (ActionKey *actkey);
+
+    void DownloadOversetData(ActionKey *actkey);
+
+    GradientCellCenter *GetGradientCellCenterUVWT(Grid *gridIn, FieldProxy *q);
+    GradientCellCenter *GetGradientCellCenterUVWT(Grid *gridIn);
+
+    //! Prepare post visualization variables, store it in to grid's postVisualization database.
+    LIB_EXPORT void ComputePostVisualVariables(Post_Visual * postVisualization);
+    //! Prepare monitored probes variables for post-processing , store it into postProbesVar database.
+    LIB_EXPORT void ComputePostProbesVariables(Post_Probes * postProbesVar);
+    //! Create and init control parameters.
+    LIB_EXPORT void InitControlParameters();
+
+    //! Get controlParamters(a Para_NSSolver type pointer).
+    LIB_EXPORT Param_NSSolverStruct *GetControlParameters() const;
+
+    void Monitor(Grid *gridIn, RDouble4D *dq=NULL);
+};
+
+    bool iterijk(int &i, int &j, int &k, int ist, int ied, int jst, int jed, int kst, int ked);
+}
+
diff --git a/CFD/NSSolver/include/NSSolverStructFD.h b/CFD/NSSolver/include/NSSolverStructFD.h
new file mode 100644
index 0000000..fc306f2
--- /dev/null
+++ b/CFD/NSSolver/include/NSSolverStructFD.h
@@ -0,0 +1,153 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      NSSolverStructFD.h
+//! @brief     NS solver for struct grid with finite difference method.
+//! @author    Min Yaobing, Ma Yankai.
+
+//! CHEN J Q, MA Y K, MIN Y B, et al. Design and development of homogeneous hybrid 
+//! solvers on National Numerical Windtunnel(NNW) PHengLEI[J]. Acta Aerodynamica Sinica,
+//! 2020, 38(6): 1103-1110.
+
+#pragma once
+#include "NSSolverStruct.h"
+
+namespace PHSPACE
+{
+class NSSolverStructFD : public NSSolverStruct
+{
+public:
+    NSSolverStructFD();
+    ~NSSolverStructFD();
+private:
+    void AllocateGlobalVar  (Grid *gridIn);
+    void DeAllocateGlobalVar(Grid *gridIn);
+    void GetSurfaceCellNumber(Grid *gridIn, int &nWall, int &nCell);
+    void ComputeFirstLayerGridHeight(Grid *gridIn, RDouble2D *firstLayerHeight);
+    
+    void Primitive2Conservative(RDouble prim[5], RDouble q[5]);
+    void Conservative2Primitive(RDouble q[5], RDouble prim[5]);
+    
+    void InFlowBC3D(Grid *gridIn, StructBC *structBC);
+    void OutFlowBC3D(Grid *gridIn, StructBC *structBC);
+    void SymmetryBC3D(Grid *gridIn, StructBC *structBC);
+    void ViscousAdiabaticWall(Grid *gridIn, StructBC *structBC);
+    void ViscousIsotropicWall(Grid *gridIn, StructBC *structBC);
+    void FarFieldRiemannInvariants(Grid *gridIn, StructBC *structBC);
+    void CornerPoint(Grid *gridIn);
+    
+    void GetIndependentVariablesforStructHighOrder(Grid *gridIn);
+    void GetDependentVariablesforStructHighOrder(Grid *gridIn);
+    void ObtainBoundaryValue(Grid *gridIn);
+    void ObtainGamaAndTemperature(Grid *gridIn);
+    void ObtainPressureFactor(Grid *gridIn);
+    void ObtainViscousCoef(Grid *gridIn);
+    void ObtainGradientCellCenter(Grid *gridIn);
+    
+    void Boundary(Grid *gridIn);
+    void ComputeGamaAndTemperature(Grid *gridIn);
+    void CalPressureFactor(Grid *gridIn);
+    void GetHeatTransferCoeff(Grid *gridIn);
+    void ComputeViscousCoeff(Grid *gridIn);
+    void ComputeViscousCoefficientWithoutChemical(Grid *gridIn);
+    
+    void ZeroResiduals(Grid *grid);
+    void InitFlowAsRestart();
+    void InitLocalMemory(Grid *gridIn);
+    void SetWeightedInterpolationCoef(Grid *gridIn);
+    
+    int total_negative;
+    string solvername;//!WCNS,HDCS
+    double EPSILON;//! epsilon within weighted interpolation
+    string fluxname;
+    FieldProxy *CellfluxProxy;//! only used for HDCS
+
+    RDouble6D *WeightedInterpolationCoef;
+    
+    string gradient_method;
+    FieldProxy *UVWTproxy;
+    FieldProxy *UVWTfaceIproxy;
+    FieldProxy *UVWTfaceJproxy;
+    FieldProxy *UVWTfaceKproxy;
+    FieldProxy *dqdxFaceProxy;
+    FieldProxy *dqdyFaceProxy;
+    FieldProxy *dqdzFaceProxy;
+    
+    void InviscidFlux(Grid *grid);
+    
+    void GetFaceVariable_WCNS(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int nsurf);
+    void GetFaceVariable_HDCS_firstlayerExplicit(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int nsurf);
+    void GetFaceVariable_HDCS_otherlayerImplicit(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int nsurf);
+    void GetFaceVariable_HDCS_otherlayerImplicit_nsurf1(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy);
+    void GetFaceVariable_HDCS_otherlayerImplicit_nsurf2(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy);
+    void GetFaceVariable_HDCS_otherlayerImplicit_nsurf3(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy);
+    void SolveTridiagonalEquations(int Nod, RDouble BL, RDouble BR, RDouble *F);
+
+    RDouble LinearExplicitInterpolation5th(RDouble prim[5]);
+    RDouble LinearImplicitInterpolation7th(RDouble prim[5]);
+    void GetFaceVariableCorrectionAtPhysicalBoundary(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int nsurf); 
+    
+    void InterpolationRUVWP5th(RDouble Coef[30], RDouble PrimPlate[5][5], RDouble Primhalf[5]);
+    void InterpolationRUVWP3rd(RDouble Prim[5][5], RDouble Primhalf[5]);
+
+    RDouble BasicWeightedInterpolation5th(RDouble Coef[30], RDouble QmPlate[5]);
+    RDouble BasicInterpolation3rd(RDouble Qp[5], int m);
+    RDouble Limiter_ThirdSmooth(const RDouble &x, const RDouble &y);
+    
+    void GetFaceInviscidFlux(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, FieldProxy *fluxProxy, int nsurf);
+    void FluxSteger(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, FieldProxy *fluxProxy, int nsurf);
+    void FluxRoe(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, FieldProxy *fluxProxy, int nsurf);
+    void FluxDifference     (Grid *gridIn, FieldProxy *fluxProxy, int nsurf);
+    void FluxDifference_WCNS(Grid *gridIn, FieldProxy *fluxProxy, int nsurf);
+    void FluxDifference_HDCS(Grid *gridIn, FieldProxy *fluxProxy, int nsurf);
+    void GetCellInviscidFlux(Grid *gridIn, int nsurf);
+    void GetCellViscousFlux(Grid *gridIn, int nsurf);
+    
+    void GetUVWTproxy(Grid *gridIn);
+    void GetUVWTfaceproxy(Grid *gridIn, int nsurf);
+    void GetUVWTfaceproxy_HDCS(Grid *gridIn, int nsurf);
+    void GetdqdkxietactaCellCenter(Grid *gridIn, int nsurf);
+    void GetdqdkxietactaCellCenter_HDCS(Grid *gridIn, int nsurf);
+    void ComputeGradientCellCenter(Grid *gridIn);
+    
+    void ViscousFlux(Grid *gridIn);
+    void GetFaceViscousFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+    void GetGradientAtFace(Grid *gridIn, int nSurface);
+    
+    void GetGradientAtFaceconservation(Grid *gridIn, int nSurface);
+    void GetGradientAtFaceconservation_HDCS(Grid *gridIn, int nSurface);
+    void GetGradientAtFacechainrule(Grid *gridIn, int nSurface);
+    void GetGradientAtFaceCorrectionAtPhysicalBoundary(Grid *gridin, int iSurface);
+
+    void SpectrumRadius(Grid *grid);
+    void SpectrumRadiusInviscid(Grid *gridIn);
+    void SpectrumRadiusViscous(Grid *gridIn);
+    void TimeStep(Grid *gridIn);
+    void ReduceMaxTimeStep(Grid *gridIn, RDouble globalMinDt);
+    void Diagonal(Grid *gridIn);
+    void SolveLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+    void SolveLUSGSBackward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+    void SolveLUSGSbyJacobiIteration(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *dqtmpProxy, RDouble &sweepNormal);
+    void LUSGSInitializationStructHighOrder(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ);
+    void UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy);
+
+    void GetMXDQ(RDouble *prim, RDouble KX, RDouble KY, RDouble KZ, RDouble *dq, RDouble *f, RDouble radius, int ipn);
+    void SolutionFix(FieldProxy *qProxy, RDouble prim[5], int i, int j, int k);
+
+    void UpdateQlQrOnlyforMixGrid(Grid *gridIn);
+    void UpdateInviscidfluxOnlyforMixGrid(Grid *gridIn);
+    void UpdateViscousfluxOnlyforMixGrid(Grid *gridIn);
+    void LoadGlobalfacefluxtoResOnlyforMixGrid(Grid *gridIn);
+
+    void GetFaceViscousFluxLES(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+};
+
+}
diff --git a/CFD/NSSolver/include/NSSolverStructFV.h b/CFD/NSSolver/include/NSSolverStructFV.h
new file mode 100644
index 0000000..2166fdd
--- /dev/null
+++ b/CFD/NSSolver/include/NSSolverStructFV.h
@@ -0,0 +1,29 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      NSSolverStructFV.h
+//! @brief     NS solver for struct grid with finite volume method.
+//! @author    xxx
+
+#pragma once
+#include "NSSolverStruct.h"
+
+namespace PHSPACE
+{
+
+class NSSolverStructFV : public NSSolverStruct
+{
+public:
+    NSSolverStructFV();
+    ~NSSolverStructFV();
+};
+
+}
diff --git a/CFD/NSSolver/include/NSSolverUnstruct.h b/CFD/NSSolver/include/NSSolverUnstruct.h
new file mode 100644
index 0000000..06610fa
--- /dev/null
+++ b/CFD/NSSolver/include/NSSolverUnstruct.h
@@ -0,0 +1,447 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      NSSolverUnstruct.h
+//! @brief     NS solver for unstructured grid.
+//! @author    Bell, He Xin, Zhang Laiping, Dr. Wang, Zhang Yang, He Kun, 
+//!            Wan Yunbo, Xu Gang, Meng Liyuan, Zhang Yaobing.
+
+#pragma once
+#include "NSSolver.h"
+#include "PHMatrix.h"
+#include "Limiter.h"
+
+namespace PHSPACE
+{
+class GeomProxy;
+class Gradient;
+class Param_NSSolverUnstruct;
+
+class NSSolverUnstruct : public NSSolver
+{
+private:
+    Gradient * gradientNSField;
+    Gradient * gradientTemperature;
+    int systemgridtype;
+    Limiter *limiterOnlyForMixGrid;
+    FaceProxy *InviscidfaceProxyOnlyForMixGrid;
+    FaceProxy *ViscousfaceProxyOnlyForMixGrid;
+public:
+    NSSolverUnstruct();
+    ~NSSolverUnstruct();
+public:
+    void ReadParameter();
+
+    void AllocateGlobalVar(Grid *gridIn);
+    void DeAllocateGlobalVar(Grid *gridIn);
+
+#ifdef USE_GMRESSOLVER
+    // GMRESCSR
+    void FindNeighborOfRoot(int root, int& neighbor, int nTotalFace, int nBoundFace, int* leftCellofFace, int* rightCellofFace, vector<int>& AI, vector<int>& AJ, int counter);
+    void AllocateJacobianMatrix4GMRES(Grid *gridIn);
+    void AllocateJacobianMatrix4GMRES_Neighbor(Grid *gridIn);
+#endif
+
+    //! Judge if the flow field variables file already exists in NS solver.
+    bool JudgeIfRestart();
+    bool JudgeIfReadAverage();
+
+    void DumpRestart(ActionKey *actkey);
+    void ReadRestart(ActionKey *actkey);
+
+    void DumpRestartH5(ActionKey *actkey);
+    void ReadRestartH5(ActionKey *actkey);
+
+    void InitFlowAsRestart();
+    void LoadQ(Grid *gridIn, FieldProxy *qProxy);
+    void RestrictDefect(Grid *fgrid_in, Grid *cgrid_in);
+    void PutCorrectionBack(Grid *gridIn, FieldProxy *qProxy);
+
+    //! Prolongation operator, from coarse mesh to fine mesh.
+    void CorrectFineGrid(Grid *fgrid_in, Grid *cgrid_in);
+
+    //! Prolongation by the current coarse cell directly.
+    void CorrectFineGridZeroOrder(Grid *fgrid_in, Grid *cgrid_in);
+
+    //! Prolongation by the current and the neighbor coarse cells.
+    void CorrectFineGridHighOrder(Grid *fgrid_in, Grid *cgrid_in);
+
+    void InterpolatFineGrid(Grid *fgrid_in, Grid *cgrid_in);
+
+
+    void LoadResiduals(Grid *gridIn, FieldProxy *rhsProxy);   
+
+    void Boundary(Grid *gridIn);
+    void CornerPoint(Grid *gridIn);
+    void CalculateBoundaryData();
+    void ComputeMassFlow(Grid *gridIn);
+    void ComputeMassInFlow(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+    void ComputeMassOutFlow(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+
+    void ComputeGamaAndTemperature(Grid *gridIn);
+
+    //! Compute the node value in the flow.
+    //! @param[in] gridIn         the mesh in the computing.
+    void ComputeNodeValue(Grid *gridIn);
+
+    //! Modify the node value for the interpoint.
+    //! @param[in] gridIn         the mesh in the computing.
+    void ModifyNodeValue(Grid *gridIn);
+
+    void CompNodeVarForGGNodeLaplacian(Grid *gridIn);
+
+    void GetQlQr  (Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd);
+    void GetGamaLR(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd);
+    void GetPressureFactorLR(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd);
+    void GetTimeCoefficientLR(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd);
+    void GetPreconCoefficientLR(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd);
+    void ReConstructFaceValue(Grid *gridIn, FaceProxy *faceProxy, Limiter * limiter, int localStart, int localEnd);
+    void ZeroResiduals(Grid *gridIn);
+    void SpectrumRadiusInviscid(Grid *grid);
+    void SpectrumRadiusViscous(Grid *grid);
+    void SpectrumRadiusChemical(Grid *grid);
+    void ConservativePreconMatrix(Grid *gridIn);
+    void Diagonal(Grid *gridIn);
+    void ComputeMinTimeStep(Grid *grid, RDouble & minDt, RDouble & maxDt);
+    void ReduceMaxTimeStep(Grid *grid, RDouble globalMinDt);
+    void LocalTimeStep(Grid *grid);
+
+    //! calculate time step by another methods different with PHengLEI code.
+    void LocalTimeStep_Prince(Grid *grid);
+    
+    void GlobalTimeStep(Grid *grid);
+    void LocalGlobalTimeStep(Grid *grid);
+    void RungeKuttaResidual(Grid *gridIn, FieldProxy *dqProxy, RDouble coef);
+    void LoadFlux(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd);
+
+    void ZeroResidualOfSpecialCells(Grid *gridIn);
+
+    void UpdateQlQrOnlyforMixGrid(Grid *grid);
+    void UpdateInviscidfluxOnlyforMixGrid(Grid *grid);
+    void UpdateViscousfluxOnlyforMixGrid(Grid *grid);
+    void LoadGlobalfacefluxtoResOnlyforMixGrid(Grid *gridIn);
+    void RestrictAllQ(Grid *fgrid, Grid *cgrid);
+    void ComputeViscousCoeff(Grid *gridIn);
+    void ComputeViscousCoefficient(Grid *gridIn);
+    void ComputeViscousCoefficientWithoutChemical(Grid *gridIn);
+
+    void BoundaryQlQrFix(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd);
+    void InitCGrid(Grid *fgrid_in, Grid *cgrid_in);
+    RDouble * CompSoundSpeed(Grid *gridIn);
+    RDouble * CompMachNumber(Grid *gridIn);
+    RDouble** ComputeDimensionalVariables(Grid *gridIn);
+    RDouble** ComputePrimitiveVariablesWithMoleFraction(Grid *gridIn);
+
+    RDouble * ComputeVorticitybyQCriteria(Grid *gridIn);
+    void ComputeVorticitybyQCriteria(Grid *gridIn, RDouble * vorticity_x, RDouble * vorticity_y, RDouble * vorticity_z, RDouble * vorticityMagnitude,  RDouble * strain_rate,  RDouble * Q_criteria);
+    RDouble * ComputeCp(Grid *gridIn);
+    RDouble * ComputeCpAverage(Grid *gridIn);
+
+    void ComputeGradient(Grid *grid);
+    void ComputeLimiter(Grid *grid);
+    void ComputelimiterOnlyForMixGrid(Grid *grid);
+    void InitiallimiterOnlyForMixGrid(Grid *grid);
+    void InitialInviscidfaceproxyOnlyForMixGrid(Grid *grid);
+    void InitialViscousfaceproxyOnlyForMixGrid(Grid *grid);
+
+    void FillField(Grid *gridIn, FieldProxy *field_proxy, RDouble value);
+    void FillField(Grid *gridIn, FieldProxy *fieldTarget, FieldProxy *fieldSource);
+    FieldProxy * CreateFieldProxy(Grid *gridIn);
+    FieldProxy * GetFieldProxy(Grid *gridIn, const string &field_name);
+    FieldProxy * GetResidualProxy(Grid *gridIn);
+
+    void RecoverResidual(Grid *gridIn, FieldProxy *rhsProxy);
+    void InitResidual(Grid *gridIn, FieldProxy *rhsProxy);
+    void StoreRhsByResidual(Grid *gridIn, FieldProxy *rhsProxy);
+
+    FaceProxy     * CreateFaceProxy    (Grid *gridIn);
+    GeomProxy     * CreateGeomProxy    (Grid *gridIn);
+    NSFaceValue   * CreateNSFaceValue  (Grid *gridIn);
+
+    void FillGeomProxy(Grid *gridIn, GeomProxy *geom_proxy, int localStart, int localEnd);
+
+    void CalPressureFactor(Grid *gridIn);
+    void GetHeatTransferCoeff(Grid *gridIn);
+
+    void FreeGradientProxy(Grid *grid);
+
+    void DumpLeakageInformation(Grid *grid);
+
+    void InviscidFlux  (Grid *gridIn);
+    void ViscousFlux   (Grid *gridIn);
+    void ChemicalSource(Grid *gridIn);
+    void gravitySource(Grid *gridIn);
+    void RotatingSource(Grid *gridIn);
+    void DualTimeSource(Grid *gridIn);
+    void StoreHistoricalResidual(Grid *gridIn);
+    void UpdateUnsteadyFlow(Grid *gridIn);
+    void ComputePreconditionCoefficient(Grid *grid);
+    RDouble UnsteadyConvergence(Grid *gridIn);
+
+    //Compute the distance between the center of the grid cell on the first layer and the center of the surface cell.
+    void ComputeFirstLayerGridHeight(Grid *gridIn);
+
+    void Turb_Sengy(Grid *gridIn);
+    void GetInviscidFaceValue(Grid *gridIn, FaceProxy *faceProxy, Limiter * limiter, int localStart, int localEnd);
+    void GetVisFaceValue(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd);
+ 
+    void ComputeVisflux(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd);
+    void ModifyVisflux(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd);
+
+    #ifdef USE_GMRESSOLVER
+    // GMRESVis
+    void ComputeVisflux_FD(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd);
+    void ComputeVisflux_GMRES(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd);
+    // GMRESVis GMRESVisFD
+    void Cal_GMRES_Visflux(RDouble* fL, RDouble* fR, RDouble* primitiveVariableFace, RDouble* dqdxL,
+                           RDouble* dqdyL, RDouble* dqdzL, RDouble* dqdxR, RDouble* dqdyR, RDouble* dqdzR, int iFace,
+                           int jFace, RDouble* flux, Grid *gridIn, FaceProxy *faceProxy);
+    // GMRESAD
+    template <typename T>
+    void Cal_GMRES_Visflux_AD(T* fL, T* fR, T* dqdxL,
+                           T* dqdyL, T* dqdzL, T* dqdxR, T* dqdyR, T* dqdzR, int iFace,
+                           int jFace, T* flux, Grid *gridIn, FaceProxy *faceProxy, Param_NSSolverUnstruct *parameters);
+
+    // GMRESCoupled
+    template <typename T>
+    void Cal_GMRES_Visflux_AD_Coupled(T* fL, T* fR, T fLturb, T fRturb, T* dqdxL,
+                                    T* dqdyL, T* dqdzL, T* dqdxR, T* dqdyR, T* dqdzR, int iFace,
+                                    int jFace, T* flux, Grid *gridIn, FaceProxy *faceProxy, Param_NSSolverUnstruct *parameters);
+
+
+    //! GMRES solver -- a linear system solver
+    //! This method can be referenced "Sen Zhang, Boqian Wang, et al. Implementation of a Newton-Krylov Algorithm in the Open-source Solver PHengLEI[C]."
+    //! GPPS Hong Kong , October 17-19, 2023.
+    void GMRESSolver(Grid *gridIn, FieldProxy *dqProxy);
+    void GMRESSolverRow(Grid *gridIn, FieldProxy *dqProxy);
+    void GMRESSolverSingle(Grid *gridIn, FieldProxy *dqProxy);
+#endif
+
+    void ComputeFaceWeight(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd);
+    void ComputeInviscidFlux(Grid *grid, FaceProxy *faceProxy, int localStart, int localEnd);
+    void SolutionFix(Grid *gridIn, RDouble *prim, int iCell);
+
+    void UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy);
+    void SetGhostDQLUSGS(Grid *gridIn, RDouble **dq, RDouble **q);
+    void SetSymmBCGhostDQLUSGS(Grid *gridIn, UnstructBC *bcRegionUnstruct, RDouble **dq, RDouble **q);
+    void SetWallBCGhostDQLUSGS(Grid *gridIn, UnstructBC *bcRegionUnstruct, RDouble **dq, RDouble **q);
+    void SetExtraBCGhostDQLUSGS(Grid *gridIn, UnstructBC *bcRegionUnstruct, RDouble **dq, RDouble **q);
+    
+    void SwapNeighborsDQNonblocking(Grid *gridIn, FieldProxy *dqProxy);
+    void CompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+    void DecompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+    RDouble GetRad(RDouble *prim, RDouble *nxyz, RDouble gama);
+    void SolveLUSGSForward(Grid *grid, FieldProxy * dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+    void SolveLUSGSBackward(Grid *grid, FieldProxy * dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+
+
+    void AirForceCoef(ActionKey *actkey);
+    void AirForceCoefParts(ActionKey *actkey, int partID, int Coordinate = GlobalCoordinate);
+    void AirForceCoefBodies(ActionKey *actkey);
+    void CpDistriCoef(ActionKey *actkey);
+    void GetResidual(ActionKey *actkey);
+
+    //! Dump out typical standard case: turbulent flat plate.
+    void Turbulence_Flat_Plate_Output_NASA(Grid *gridIn);
+    void CreateNodeVariable(Grid *gridIn, RDouble **nodeVariable);
+
+    void ComputeResidual(ActionKey *actkey);
+    void VisualizationAverageFlow(ActionKey *actkey);
+
+    void ComputeAverageVisualNodeField(Grid *gridIn, RDouble **qn);
+    void BoundaryVisualization(Grid *gridIn, ActionKey *actkey, RDouble **qn, int nvarplot);
+
+    void BoundaryVisualization(Grid *gridIn, std::ostringstream &oss, vector<string> &title, RDouble **qn, int nvarplot);
+    void SliceVisualization(Grid *gridIn, ActionKey *actkey, RDouble **qn, int nvarplot);
+
+    void SpectrumRadius(Grid *gridIn);
+
+    void RestrictDQ(RDouble *dqtry, int nm, RDouble lim_max);
+    void ModifyDensity(RDouble *dq, int nNSEquation,int nLaminar,int nEquation,RDouble &densityRelax);
+
+    void UploadInterfaceData(ActionKey *actkey);
+    void DownloadInterfaceData(ActionKey *actkey);
+
+    //! Upload the interpoint variables for send.
+    //! @param[in] actkey         the actkey store the information of the interpoint.
+    void UploadInterpointData(ActionKey *actkey);
+
+    //! Download the interpoint variables from the receive data.
+    //! @param[in] actkey         the actkey store the information of the interpoint.
+    void DownloadInterpointData(ActionKey *actkey);
+
+    void CommunicationInterpointWeight(ActionKey *actkey);
+    void DownloadInterpointWeight(ActionKey *actkey);
+
+    void UploadOversetData  (ActionKey *actkey);
+    void DownloadOversetData(ActionKey *actkey);
+
+    //Gradient * GetGradientNSField(Grid *gridIn);
+    //Gradient * GetGradientTemperature(Grid *gridIn);
+
+    void GetGradientField(Grid *gridIn);
+
+    //! Prepare post visualization variables, store it in to postVisualization database.
+    LIB_EXPORT void ComputePostVisualVariables(Post_Visual * postVisualization);
+    //! Prepare monitored probes variables for post-processing , store it into postProbesVar database.
+    LIB_EXPORT void ComputePostProbesVariables(Post_Probes * postProbesVar);
+    //! Create and init ControlParameters
+    LIB_EXPORT void InitControlParameters();
+
+    //! Get controlParamters(a Para_NSSolver type pointer)
+    LIB_EXPORT Param_NSSolverUnstruct * GetControlParameters() const;
+
+    void CompressSpecificArrayToInterface(DataContainer *&dataContainer, const string &fieldName, Grid *grid, const int &neighborZoneIndex, const int &neqn);
+    void DecompressArrayFromInterface(DataContainer *&dataContainer, const string &fieldName, Grid *grid, const int &neighborZoneIndex, const int &neqn);
+
+    void CompressGradientandLimitToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+    void DecompressGradientandLimitToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+
+    void CompressQlQrToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+    void DecompressQlQrToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+
+    void CompressFacefluxToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+    void DecompressFacefluxToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex);
+
+    //! Out flow boundary condition for one Region of a bounday.
+    //! A BC Region Contains lots of faces with the same boundary name.
+    //! @param[in] gridIn              an unstruct grid pointer.
+    //! @param[in] bcRegionUnstruct    an object of some BCRegionUnstruct class, contain the information of this BC.
+    void OutflowBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+
+    //! Symmetry boundary condition for one Region of a bounday.
+    //! @param[in] gridIn              an unstruct grid pointer.
+    //! @param[in] bcRegionUnstruct    an object of some BCRegionUnstruct class, contain the information of this BC.
+    void SymmetryBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+
+#ifdef USE_GMRESSOLVER
+    // GMRESBoundary
+    //! GMRES Symmetry boundary condition for one Region of a bounday.
+    //! @param[in] gridIn              an unstruct grid pointer.
+    //! @param[in] bcRegionUnstruct    an object of some BCRegionUnstruct class, contain the information of this BC.
+    // GMRESAD GMRESBoundary perturbation about the primitive variables with AD
+    void GMRES_SymmetryBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstr);
+
+    // GMRESPV GMRESBoundary perturbation about the primitive variables with FD
+    void GMRES_SymmetryBCRegion_FD(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+
+    // GMRESBoundary perturbation about the conservative variables
+    void GMRES_SymmetryBCRegion_CV(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+
+    void Cal_GMRES_SymmetryBCRegion(Grid *gridIn, RDouble *PrimL, RDouble *PrimR, const int &iFace);  
+
+     // GMRESVis GMRESBoundary GMRESAD
+    //! Viscous Adiabatic wall boundary condition for one Region of a bounday.
+    //! @param[in] gridIn              an unstruct grid pointer.
+    //! @param[in] bcRegionUnstruct    an object of some BCRegionUnstruct class, contain the information of this BC.
+    // GMRESBoundary perturbation about the primitive variables with AD
+    void GMRES_ViscousAdiabaticWallBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+
+    // GMRESBoundary perturbation about the primitive variables with FD
+    void GMRES_ViscousAdiabaticWallBCRegion_FD(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+    void Cal_GMRES_ViscousAdiabaticWallBCRegion(Grid *gridIn, RDouble *PrimL, RDouble *PrimR, int iFace, RDouble uwall, RDouble vwall, RDouble wwall);
+
+    //! Viscous Isotropic wall boundary condition for one Region of a bounday. 
+    //! for GMRES  GMRES3D
+    //! @param[in] gridIn              an unstruct grid pointer.
+    //! @param[in] bcRegionUnstruct    an object of some BCRegionUnstruct class, contain the information of this BC.
+    void GMRES_ViscousIsotropicWallBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+
+    // GMRESBoundary
+    //! GMRES Farfield boundary condition for one Region of a bounday.
+    //! @param[in] gridIn              an unstruct grid pointer.
+    //! @param[in] bcRegionUnstruct    an object of some BCRegionUnstruct class, contain the information of this BC.
+    // GMRESBoundary GMRESAD
+    void GMRES_FarfieldBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstrct);
+
+    // GMRESPV GMRESBoundary
+    void GMRES_FarfieldBCRegion_FD(Grid *gridIn, UnstructBC *bcRegionUnstruct); 
+    
+    // GMRESBoundary using the conservative variables
+    void GMRES_FarfieldBCRegion_CV(Grid *gridIn, UnstructBC *bcRegionUnstruct); 
+
+    // GMRESBoundary
+    //! Calculate GMRES Farfield boundary condition for one Region of a bounday.
+    //! @param[in] gridIn              an unstruct grid pointer.
+    //! @param[in] bcRegionUnstruct    an object of some BCRegionUnstruct class, contain the information of this BC.
+    template <typename T>
+    void Cal_GMRES_FarfieldBCRegion(T* qL,T* qR,int le, int iFace, Grid *gridIn, UnstructBC *bcRegionUnstruct);
+#endif 
+
+    //! Viscous Adiabatic wall boundary condition for one Region of a bounday.
+    //! @param[in] gridIn              an unstruct grid pointer.
+    //! @param[in] bcRegionUnstruct    an object of some BCRegionUnstruct class, contain the information of this BC.
+    void ViscousAdiabaticWallBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+    
+    //! Viscous Isotropic wall boundary condition for one Region of a bounday.
+    //! @param[in] gridIn              an unstruct grid pointer.
+    //! @param[in] bcRegionUnstruct    an object of some BCRegionUnstruct class, contain the information of this BC.
+    void ViscousIsotropicWallBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+    
+    //! Farfield boundary condition for one Region of a bounday.
+    //! @param[in] gridIn              an unstruct grid pointer.
+    //! @param[in] bcRegionUnstruct    an object of some BCRegionUnstruct class, contain the information of this BC.
+    void FarfieldBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+    
+    //! Inflow boundary condition for one Region of a bounday.
+    //! @param[in] gridIn              an unstruct grid pointer.
+    //! @param[in] bcRegionUnstruct    an object of some BCRegionUnstruct class, contain the information of this BC.
+    void InflowBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);   
+    
+    //! PressureOutlet boundary condition for one Region of a bounday.
+    //! @param[in] gridIn              an unstruct grid pointer.
+    //! @param[in] bcRegionUnstruct    an object of some BCRegionUnstruct class, contain the information of this BC.
+    void PressureOutletBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);   
+    
+    //! PressureInlet boundary condition for one Region of a bounday.
+    //! @param[in] gridIn              an unstruct grid pointer.
+    //! @param[in] bcRegionUnstruct    an object of some BCRegionUnstruct class, contain the information of this BC.
+    void PressureInletBCRiemannRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct); 
+    
+    //! calculate the total area of all BC regions with the same BC name.
+    void calculateBCArea(Grid *gridIn, UnstructBC *bcRegionUnstruct); 
+
+    //! calculate the mass flux ratio of all mass outlet BC regions with the same BC name.
+    void CalculateMassFluxRatio();
+
+    //! mass flow in boundary condition.
+    void MassFlowInletBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct); 
+    
+    //! mass flow out boundary condition.
+    void MassFlowOutletBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+
+    //! mixing plane for multi row turbomachinery.
+    void MixingPlaneInterface(Grid *gridIn);
+
+private:
+    void InviscidFluxWrap(Grid *gridIn, FaceProxy *faceProxy, INVScheme inv_scheme, int localStart, int localEnd);
+    void RegisterCFDSolverInterfaceField();
+    //! Register the interpoint field in the NS unstructured solver.
+    void RegisterCFDSolverInterpointField();
+    void RegisterOversetField();
+
+    void RotateVelocity(Grid *grid, RDouble **q);
+    void RotateVectorFromInterface(Grid *grid, const int &neighborZoneIndex, const int &neqn);
+
+    void InitMixingPlane(RDouble ***MixingPlaneVar,int Dim1,int Dim2, int Dim3,RDouble Value);
+
+    void AverageMixingPlane(Grid *grid);
+    void MixingPlaneDataTransfer(Grid *grid, Grid *NeighborGrid);
+    void NonReflective(Grid *grid, Grid *NeighborGrid);
+    void SetMixingPlaneData(Grid *grid);
+
+    RDouble P0Wall(RDouble p1, RDouble gama, RDouble mach);
+    RDouble R0Wall(RDouble r1, RDouble gama, RDouble mach);
+    Limiter * CreateLimiter(Grid *gridIn);
+};
+
+}
+
diff --git a/CFD/NSSolver/include/Param_NSSolver.h b/CFD/NSSolver/include/Param_NSSolver.h
new file mode 100644
index 0000000..fff69e1
--- /dev/null
+++ b/CFD/NSSolver/include/Param_NSSolver.h
@@ -0,0 +1,308 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Param_NSSolver.h
+//! @brief     Record paramters of NS Solver.
+//! @author    Bell, Zhang Jian, Wan Yunbo, Meng Liyuan.
+
+#pragma once
+#include "Param_CFDSolver.h"
+
+namespace PHSPACE
+{
+
+class Param_NSSolver : public Param_CFDSolver
+{
+public:
+    LIB_EXPORT Param_NSSolver();
+
+    LIB_EXPORT ~Param_NSSolver();
+
+public:
+    //! Init all parameters.
+    LIB_EXPORT void Init();
+
+    //! Get interval steps of dumping force.
+    int GetIntervalStepForce() const;
+
+    //! Get wall temperature.
+    RDouble GetWallTemperature() const; 
+
+    //! Get the flag of the gas model.
+    int GetChemicalFlag() const;
+
+    //! Get the set of WallMultiTemperature.
+    int GetWallMultiTemperature() const;
+
+    //! Get the number of N-S equations without the species transport equations and Tv-Te.
+    int GetNSEquationNumber() const;
+
+    //! Get the number of the equations including the species transport equations,but without Tv-Te.
+    int GetLaminarNumber() const;
+
+    //! Get the number of N-S equations for all.
+    int GetnEquation() const;
+
+    //! Get the flag of thermodynamic temperature model.
+    int GetTemperatureModel() const;
+
+    //! Get coefficient K for preconditioned reference Mach number.
+    RDouble GetPreconCoefficient() const;
+
+    //! Get precondition method for Farfield Boundary Condition.
+    int GetPreconFarFieldBCMethod() const;
+
+    //! Get if ideal gas state .
+    int GetIfIdealGasState() const;
+
+    //! Get Reference dimensional velocity .
+    RDouble GetReferenceDimensionalVelocity() const;
+
+    //! Get attacked of angle.
+    RDouble GetAoA() const;
+
+    //! Get the Entropy fix (correction) method.
+    int GetRoeEntropyFixMethod() const;
+
+    //! Get the Entropy coefficient scale, default is 1.0.
+    RDouble GetRoeEntropyScale() const;
+
+    //! Get the entropy fix coefficient 1 of Roe method.
+    RDouble GetRoeEntropyFixCoef1() const; 
+    
+    //! Get the entropy fix coefficient 2 of Roe method.
+    RDouble GetRoeEntropyFixCoef2() const; 
+
+    //! Get angle of slide.
+    RDouble GetAngleOfSlide () const;
+
+    //! Set the entropy fix coefficients by the inflow mach number.
+    void SetEntropyFixCoefficients();
+
+    //! Get prandtlLaminar.
+    RDouble GetPrandtlLaminar() const;
+
+    //! Get prandtlTurbulence.
+    RDouble GetPrandtlTurbulence() const;
+
+    //! Get oPrandtlLaminar.
+    RDouble GetoPrandtlLaminar() const;
+
+    //! Get oPrandtlTurbulence.
+    RDouble GetoPrandtlTurbulence() const;
+
+    int GetNChemicalRadius() const;
+
+    int GetNChemicalSource() const;
+
+    //! Get timeIntegration.
+    int GetTimeIntegration() const;
+
+    //! Get nonDimensionalSutherlandTemperature.
+    RDouble  GetNonDimensionalSutherlandTemperature() const;
+    
+    int GetMgProlongationType() const;
+
+    RDouble* GetPrimitiveVarFarfield() const;
+
+    RDouble* GetFullyCatalyticMassFraction() const;
+
+    int GetNumberOfSpecies() const;
+
+    int GetIndexOfNitrogen() const; //! The index of the species with the maximum mass fraction.
+    //for Earth air, Nitrogen is the species with the maximum mass fraction, so it is used as the variable name.
+
+    int GetIndexOfElectron() const; //! The index of Electron in the array of species.
+
+    int GetFlagOfEquilibriumGas() const;
+
+    int GetnDensityModify() const;
+
+    int GetThermoEnergyModelFlag() const;
+
+    int GetnDebug() const;
+
+    int GetmTT() const;
+
+    int GetmTV() const;
+
+    int GetmTE() const;
+
+    int GetnEnergyRecycle() const;
+
+    int GetTransitionType() const;
+
+    int GetnTurblenceForChemical() const;
+
+    int GetnViscosityFluxSublevelModified() const;
+
+    RDouble  GetDensityMin() const;
+
+    RDouble  GetdensityMinFactor() const;
+
+    int GetSelfAdaptionSolveFlag() const;
+
+    int GetnGradPrimtiveMethod() const;
+
+    int GetnInviscidFluxModify() const;    
+
+    int GetnQlLimitMethod() const;
+
+    int GetSurfaceGradientMethod() const;
+
+    int GetRapidFlowfieldMethod() const;
+
+    int GetSurfaceHeatingMonitor() const;
+
+    int GetInitialPressureSteps() const;
+
+    int GetLocalCFLFlag() const;
+
+    RDouble GetCharacteristicLength() const;
+
+    int GetNonequilibriumConditionFlag() const;
+
+    void SetNonequilibriumConditionFlag(int nUseNoneqCond) {isUseNoneqCond = nUseNoneqCond;}
+
+private:
+    int intervalStepForce;
+
+    int transitionType;
+
+    RDouble wallTemperature;
+
+    //! The number of N-S equations without the species transport equations.
+    int nNSEquation;
+    //! The number of the equations including the species transport equations.
+    int nLaminar;
+    //! The flag of the gas model, 1 indicates the chemical non-equilibrium gas, 0 indicates the perfect gas.
+    int nChemical;
+
+    int nEquation;
+
+    int wallMultiTemperature;
+
+    //! The flag of thermodynamic temperature model, 1, 2 and 3 denote one/two/three temperature model for chemical non-equilibrium gas.
+    int nTemperatureModel;
+
+    //! Coefficient K for preconditioned reference Mach number.
+    RDouble kPreconCoeff;
+
+    //! For incompressible flow (mach < 0.3), choose precondition method for Farfield Boundary Condition.
+    int preconFarfieldBCMethod;
+
+    //! judge if ideal gas state or not.
+    int nIdealState;
+
+    //! Reference dimensional velocity.
+    RDouble refDimensionalVelocity;
+
+    //! Angle of attacked.
+    double AoA;
+
+    //! Angle of slide.
+    RDouble angleSlide;
+
+    //! Entropy fix (correction) method.\n
+    //!   -# 1: direct fix, which limits the minimum eigenvalue directly.\n
+    //!   -# 2: multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.\n
+    //!   -# 3: Harten type, which is default used.
+    int roeEntropyFixMethod;
+
+    //! Entropy coefficient scale, default is 1.0.
+    //! It is used to scale the default RoeEntropyFixCoef1 and RoeEntropyFixCoef2.
+    RDouble roeEntropyScale;
+
+    //! Entropy fix for Acoustic eigenvalue.
+    RDouble RoeEntropyFixCoef1;
+
+    //! Entropy fix for convective eigenvalue.
+    RDouble RoeEntropyFixCoef2;
+
+    RDouble prandtlLaminar;
+
+    RDouble prandtlTurbulence;
+
+    RDouble oPrandtlLaminar;
+
+    RDouble oPrandtlTurbulence;
+
+    int nChemicalRadius;
+
+    int nChemicalSource;
+
+    int timeIntegration;
+
+    RDouble nonDimensionalSutherlandTemperature;
+
+    int mgProlongationType;
+
+    RDouble *primitiveVarFarfield;
+    RDouble *catalyticMassFraction;
+
+    int numberOfSpecies; //! The number of species.
+
+    int indexOfNitrogen; //! The index of Nitrogen in the array of species, it indicates the species with the maximum mass fraction.
+    int indexOfElectron; //! The index of Electron in the array of species.
+
+    int nEquilibriumGas; //! The flag of equilibrium gas, 0 is for perfect gas, while > 0 is for equilibrium gas.
+    //! Attention: this variable is valid when the condition nChemical=0 is satisfied, meanwhile its value denotes the number of gas components.
+
+    int nDensityModify;
+
+    int nDebug;
+
+    //! nTEnergyModel=0 indicates the energy terms are computed using the conventional method.
+    //! nTEnergyModel=1 indicates the energy terms are computed using the curve-fitting method.
+    int nTEnergyModel;
+
+    int mTT, mTV, mTE;
+    int nEnergyRecycle;
+
+    int nTurblenceForChemical;
+
+    int nViscosityFluxSublevelModified;
+
+    RDouble densityMin;
+
+    RDouble densityMinFactor;
+
+    int nGradPrimtiveMethod;
+
+    int isSelfAdaptionSolve;
+
+    int nInviscidFluxModify;
+
+    int nQlLimitMethod;
+
+    //! The method to compute the gradient of variable on surface.
+    int nSurfGradMethod;
+
+    //! To utilize the rapid method that can directly obtain the initial flowfield in boundary layer.
+    int nRapidFlowfield;
+
+    //! To utilize the monitor which exam the surface heating change during the iteration.
+    int nSurfHeatMonitor;
+
+    //! The steps to initialize the boundary variables with the rapid flowfield values.
+    int nInitPressureStep;
+
+    //! Use local CFL number or not.
+    //!   -# 0: Global unified CFL number.\n
+    //!   -# 1: Local CFL number.
+    int isUseLocalCFL;
+
+    RDouble knLength; //the characteristic length for computation of Knudsen number.
+    int isUseNoneqCond; //Use the non-equilibrium condition or not.
+};
+
+#include "Param_NSSolver.hxx"
+}
\ No newline at end of file
diff --git a/CFD/NSSolver/include/Param_NSSolver.hxx b/CFD/NSSolver/include/Param_NSSolver.hxx
new file mode 100644
index 0000000..cad497b
--- /dev/null
+++ b/CFD/NSSolver/include/Param_NSSolver.hxx
@@ -0,0 +1,282 @@
+inline int Param_NSSolver::GetIntervalStepForce() const
+{
+    return intervalStepForce;
+}
+
+inline RDouble Param_NSSolver::GetWallTemperature() const
+{
+    return wallTemperature;
+}
+
+inline int Param_NSSolver::GetChemicalFlag() const
+{
+    return nChemical;
+}
+
+inline int Param_NSSolver::GetWallMultiTemperature() const
+{
+    return wallMultiTemperature;
+}
+
+inline int Param_NSSolver::GetNSEquationNumber() const
+{
+    return nNSEquation;
+}
+
+inline int Param_NSSolver::GetLaminarNumber() const
+{
+    return nLaminar;
+}
+
+inline int Param_NSSolver::GetnEquation() const
+{
+    return nEquation;
+}
+
+inline int Param_NSSolver::GetTemperatureModel() const
+{
+    return nTemperatureModel;
+}
+
+inline RDouble Param_NSSolver::GetPreconCoefficient() const
+{
+    return kPreconCoeff;
+}
+
+inline int Param_NSSolver::GetPreconFarFieldBCMethod() const
+{
+    return preconFarfieldBCMethod;
+}
+
+inline int Param_NSSolver::GetIfIdealGasState() const
+{
+    return nIdealState;
+}
+
+inline RDouble Param_NSSolver::GetReferenceDimensionalVelocity() const
+{
+    return refDimensionalVelocity;
+}
+
+inline RDouble Param_NSSolver::GetAoA() const
+{
+	return AoA;
+}
+
+inline int Param_NSSolver::GetRoeEntropyFixMethod() const
+{
+    return roeEntropyFixMethod;
+}
+
+inline RDouble Param_NSSolver::GetRoeEntropyScale() const
+{
+    return roeEntropyScale;
+}
+
+inline RDouble Param_NSSolver::GetRoeEntropyFixCoef1() const
+{
+	return RoeEntropyFixCoef1;
+}
+
+inline RDouble Param_NSSolver::GetRoeEntropyFixCoef2() const
+{
+	return RoeEntropyFixCoef2;
+}
+
+inline RDouble Param_NSSolver::GetAngleOfSlide () const
+{
+    return angleSlide;
+}
+
+inline RDouble Param_NSSolver::GetPrandtlLaminar() const
+{
+    return prandtlLaminar;
+}
+
+inline RDouble Param_NSSolver::GetPrandtlTurbulence() const
+{
+    return prandtlTurbulence;
+}
+
+inline RDouble Param_NSSolver::GetoPrandtlLaminar() const
+{
+    return oPrandtlLaminar;
+}
+
+inline RDouble Param_NSSolver::GetoPrandtlTurbulence() const
+{
+    return oPrandtlTurbulence;
+}
+
+inline int Param_NSSolver::GetNChemicalRadius() const
+{
+    return nChemicalRadius;
+}
+
+inline int Param_NSSolver::GetNChemicalSource() const
+{
+    return nChemicalSource;
+}
+
+inline int Param_NSSolver::GetTimeIntegration() const
+{
+    return timeIntegration;
+}
+
+inline RDouble Param_NSSolver::GetNonDimensionalSutherlandTemperature() const
+{
+    return nonDimensionalSutherlandTemperature;
+}
+
+inline int Param_NSSolver::GetMgProlongationType() const
+{
+    return mgProlongationType;
+}
+
+inline RDouble* Param_NSSolver::GetPrimitiveVarFarfield() const
+{
+    return primitiveVarFarfield;
+}
+
+inline RDouble* Param_NSSolver::GetFullyCatalyticMassFraction() const
+{
+    return catalyticMassFraction;
+}
+
+inline int Param_NSSolver::GetNumberOfSpecies() const
+{
+    return numberOfSpecies;
+}
+
+inline int Param_NSSolver::GetIndexOfNitrogen() const
+{
+    //! The index of Nitrogen in the array of species, it indicates the species with the maximum mass fraction.
+    return indexOfNitrogen;
+}
+
+inline int Param_NSSolver::GetIndexOfElectron() const
+{
+    //! The index of Electron in the array of species.
+    return indexOfElectron;
+}
+
+
+inline int Param_NSSolver::GetnDensityModify() const
+{
+    return nDensityModify;
+}
+
+inline int Param_NSSolver::GetnDebug() const
+{
+    return nDebug;
+}
+
+inline int Param_NSSolver::GetmTT() const
+{
+    return mTT;
+}
+
+inline int Param_NSSolver::GetmTV() const
+{
+    return mTV;
+}
+
+inline int Param_NSSolver::GetmTE() const
+{
+    return mTE;
+}
+
+inline int Param_NSSolver::GetnEnergyRecycle() const
+{
+    return nEnergyRecycle;
+}
+
+inline int Param_NSSolver::GetTransitionType() const
+{
+    return transitionType;
+}
+
+inline int Param_NSSolver::GetnViscosityFluxSublevelModified() const
+{
+    return nViscosityFluxSublevelModified;
+}
+
+inline int Param_NSSolver::GetFlagOfEquilibriumGas() const
+{
+    return nEquilibriumGas;
+}
+
+inline int Param_NSSolver::GetThermoEnergyModelFlag() const
+{
+    return nTEnergyModel;
+}
+
+inline int Param_NSSolver::GetnTurblenceForChemical() const
+{
+    return nTurblenceForChemical;
+}
+
+inline RDouble Param_NSSolver::GetDensityMin() const
+{
+    return densityMin;
+}
+
+inline RDouble Param_NSSolver::GetdensityMinFactor() const
+{
+    return densityMinFactor;
+}
+
+inline int Param_NSSolver::GetnGradPrimtiveMethod() const
+{
+    return nGradPrimtiveMethod;
+}
+
+inline int Param_NSSolver::GetnInviscidFluxModify() const
+{
+    return nInviscidFluxModify;
+}
+
+inline int Param_NSSolver::GetSelfAdaptionSolveFlag() const
+{
+    return isSelfAdaptionSolve;
+}
+
+inline int Param_NSSolver::GetnQlLimitMethod() const
+{
+    return nQlLimitMethod;
+}
+
+inline int Param_NSSolver::GetSurfaceGradientMethod() const
+{
+    return nSurfGradMethod;
+}
+
+inline int Param_NSSolver:: GetRapidFlowfieldMethod() const
+{
+    return nRapidFlowfield;
+}
+
+inline int Param_NSSolver::GetSurfaceHeatingMonitor() const
+{
+    return nSurfHeatMonitor;
+}
+
+inline int Param_NSSolver::GetInitialPressureSteps() const
+{
+    return nInitPressureStep;
+}
+
+inline int Param_NSSolver::GetLocalCFLFlag() const
+{
+    return isUseLocalCFL;
+}
+
+inline RDouble Param_NSSolver::GetCharacteristicLength() const
+{
+    return knLength;
+}
+
+inline int Param_NSSolver::GetNonequilibriumConditionFlag() const
+{
+    return isUseNoneqCond;
+}
\ No newline at end of file
diff --git a/CFD/NSSolver/include/Param_NSSolverStruct.h b/CFD/NSSolver/include/Param_NSSolverStruct.h
new file mode 100644
index 0000000..b149d84
--- /dev/null
+++ b/CFD/NSSolver/include/Param_NSSolverStruct.h
@@ -0,0 +1,91 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Param_NSSolverStruct.h
+//! @brief     Record parameters of NS Solver for structured grid.
+//! @author    Bell, Zhang Jian, Wan Yunbo, Meng Liyuan.
+
+#pragma once
+#include "Param_NSSolver.h"
+
+namespace PHSPACE
+{
+
+class Param_NSSolverStruct : public Param_NSSolver
+{
+public:
+    LIB_EXPORT Param_NSSolverStruct();
+
+    LIB_EXPORT ~Param_NSSolverStruct();
+
+public:
+
+    //! Init all parameters.
+    LIB_EXPORT void Init();
+
+    //! Get parameter of MUSCL interpolations.
+    RDouble GetMUSCLCoefXk() const;
+
+    //! Get the limiter parameter of MUSCL.
+    RDouble GetMUSCLCoefXb() const;
+
+    //! Get catalyticCoef.
+    RDouble GetCatalyticCoef() const;
+
+    //! Get ChemicalSpectrumRadiusCoef.
+    RDouble GetChemicalSpectrumRadiusCoef() const;
+
+    //! Get ChemicalSpectrumRadiusCoef.
+    RDouble GetViscousSpectrumRadiusCoef() const;
+
+    //! Get GetInviscidSpectrumRadiusCoef.
+    RDouble GetInviscidSpectrumRadiusCoef() const;
+
+    //! Get chemicalRelaxCorf.
+    RDouble GetChemicalRelaxCorf() const;
+
+    //! Get staticPressureRelaxCorf.
+    RDouble GetStaticPressureRelaxCorf() const;
+
+    //! Get inviscidSchemeName.
+    string GetInviscidSchemeName() const;
+
+    //! Get iniSpeedCoef.
+    RDouble GetIniSpeedCoef() const;
+
+    //! Get iniSpeedMode.
+    int GetIniSpeedMode() const;
+
+private:
+    RDouble MUSCLCoefXk;
+    RDouble MUSCLCoefXb;
+
+    RDouble catalyticCoef;
+
+    RDouble chemicalSpectrumRadiusCoef;
+
+    RDouble viscousSpectrumRadiusCoef;
+
+    RDouble inviscidSpectrumRadiusCoef;
+
+    RDouble chemicalRelaxCorf;
+
+    RDouble staticPressureRelaxCorf;
+
+    string inviscidSchemeName;
+
+    RDouble iniSpeedCoef;
+
+    int iniSpeedMode;
+};
+
+#include "Param_NSSolverStruct.hxx"
+}
diff --git a/CFD/NSSolver/include/Param_NSSolverStruct.hxx b/CFD/NSSolver/include/Param_NSSolverStruct.hxx
new file mode 100644
index 0000000..082a590
--- /dev/null
+++ b/CFD/NSSolver/include/Param_NSSolverStruct.hxx
@@ -0,0 +1,54 @@
+inline RDouble Param_NSSolverStruct::GetMUSCLCoefXk() const
+{
+    return MUSCLCoefXk;
+}
+
+inline RDouble Param_NSSolverStruct::GetMUSCLCoefXb() const
+{
+    return MUSCLCoefXb;
+}
+
+inline RDouble Param_NSSolverStruct::GetCatalyticCoef() const
+{
+    return catalyticCoef;
+}
+
+inline RDouble Param_NSSolverStruct::GetChemicalSpectrumRadiusCoef() const
+{
+    return chemicalSpectrumRadiusCoef;
+}
+
+inline RDouble Param_NSSolverStruct::GetViscousSpectrumRadiusCoef() const
+{
+    return viscousSpectrumRadiusCoef;
+}
+
+inline RDouble Param_NSSolverStruct::GetInviscidSpectrumRadiusCoef() const
+{
+    return inviscidSpectrumRadiusCoef;
+}
+
+inline RDouble Param_NSSolverStruct::GetChemicalRelaxCorf() const
+{
+    return chemicalRelaxCorf;
+}
+
+inline RDouble Param_NSSolverStruct::GetStaticPressureRelaxCorf() const
+{
+    return staticPressureRelaxCorf;
+}
+
+inline string Param_NSSolverStruct::GetInviscidSchemeName() const
+{
+    return inviscidSchemeName;
+}
+
+inline RDouble Param_NSSolverStruct::GetIniSpeedCoef() const
+{
+    return iniSpeedCoef;
+}
+
+inline int Param_NSSolverStruct::GetIniSpeedMode() const
+{
+    return iniSpeedMode;
+}
diff --git a/CFD/NSSolver/include/Param_NSSolverUnstruct.h b/CFD/NSSolver/include/Param_NSSolverUnstruct.h
new file mode 100644
index 0000000..f8fb2bf
--- /dev/null
+++ b/CFD/NSSolver/include/Param_NSSolverUnstruct.h
@@ -0,0 +1,96 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Param_NSSolverUnstruct.h
+//! @brief     Record parameters of NS Solver for unstructured grid.
+//! @author    Bell, Zhang Jian, Wan Yunbo, Meng Liyuan.
+
+#pragma once
+#include "Param_NSSolver.h"
+
+namespace PHSPACE
+{
+
+class Param_NSSolverUnstruct : public Param_NSSolver
+{
+public:
+    LIB_EXPORT Param_NSSolverUnstruct();
+
+    LIB_EXPORT ~Param_NSSolverUnstruct();
+
+public:
+
+    //! Init all parameters.
+    LIB_EXPORT void Init();
+
+    //! Get Spatial discretization scheme of Unstructured grid solver.
+    string GetSpaceSecheme () const;
+
+    string GetGradientName() const;
+
+    int GetLimitVector() const;
+
+    int GetLimitVariables() const;
+
+    int GetSliceAxis() const;
+
+    RDouble GetSlicePostion() const;
+
+    RDouble GetMgCFLScale() const;
+
+    RDouble GetMgCorrectionLimit() const;
+
+    int GetLimiterType() const;
+
+    void SetLimiterType(int type){this->limiterType = type;}
+
+    //! Get catalyticCoef.
+    RDouble GetCatalyticCoef() const;
+
+    //! Get ChemicalSpectrumRadiusCoef.
+    RDouble GetChemicalSpectrumRadiusCoef() const;
+
+    //! Get chemicalRelaxCorf.
+    RDouble GetChemicalRelaxCorf() const;
+
+    //! Get staticPressureRelaxCorf.
+    RDouble GetStaticPressureRelaxCorf() const;
+     
+private:
+    string uns_scheme_name;
+
+    string gradientName;
+
+    int limitVector;
+
+    int limitVariables;
+
+    int sliceAxis;
+
+    RDouble slicePostion;
+
+    RDouble mgCFLScale;
+
+    RDouble mgCorrectionLimit;
+
+    int limiterType;
+
+    RDouble catalyticCoef;
+
+    RDouble chemicalSpectrumRadiusCoef;
+
+    RDouble chemicalRelaxCorf;
+
+    RDouble staticPressureRelaxCorf;
+};
+
+#include "Param_NSSolverUnstruct.hxx"
+}
diff --git a/CFD/NSSolver/include/Param_NSSolverUnstruct.hxx b/CFD/NSSolver/include/Param_NSSolverUnstruct.hxx
new file mode 100644
index 0000000..8734e80
--- /dev/null
+++ b/CFD/NSSolver/include/Param_NSSolverUnstruct.hxx
@@ -0,0 +1,64 @@
+inline string Param_NSSolverUnstruct::GetSpaceSecheme() const
+{
+	return uns_scheme_name;
+}
+
+inline string Param_NSSolverUnstruct::GetGradientName() const
+{
+    return gradientName;
+}
+
+inline int Param_NSSolverUnstruct::GetLimitVector() const
+{
+    return limitVector;
+}
+
+inline int Param_NSSolverUnstruct::GetLimitVariables() const
+{
+    return limitVariables;
+}
+
+inline int Param_NSSolverUnstruct::GetSliceAxis() const
+{
+    return sliceAxis;
+}
+
+inline RDouble  Param_NSSolverUnstruct::GetSlicePostion() const
+{
+    return slicePostion;
+}
+
+inline RDouble Param_NSSolverUnstruct::GetMgCFLScale() const
+{
+    return mgCFLScale;
+}
+
+inline RDouble Param_NSSolverUnstruct::GetMgCorrectionLimit() const
+{
+    return mgCorrectionLimit;
+}
+
+inline int Param_NSSolverUnstruct::GetLimiterType() const
+{
+    return limiterType;
+}
+
+inline RDouble Param_NSSolverUnstruct::GetCatalyticCoef() const
+{
+    return catalyticCoef;
+}
+
+inline RDouble Param_NSSolverUnstruct::GetChemicalSpectrumRadiusCoef() const
+{
+    return chemicalSpectrumRadiusCoef;
+}
+
+inline RDouble Param_NSSolverUnstruct::GetChemicalRelaxCorf() const
+{
+    return chemicalRelaxCorf;
+}
+
+inline RDouble Param_NSSolverUnstruct::GetStaticPressureRelaxCorf() const
+{
+    return staticPressureRelaxCorf;
+}
\ No newline at end of file
diff --git a/CFD/NSSolver/src/NCCRSolverStruct.cpp b/CFD/NSSolver/src/NCCRSolverStruct.cpp
new file mode 100644
index 0000000..8aeb66f
--- /dev/null
+++ b/CFD/NSSolver/src/NCCRSolverStruct.cpp
@@ -0,0 +1,23693 @@
+#include "NCCRSolverStruct.h"
+#include "Glb_Dimension.h"
+#include "Geo_StructBC.h"
+#include "MultiGridOperation.h"
+#include "GradientOperation.h"
+#include "Force.h"
+#include "AleForceManager.h"
+#include "OversetGridFactory.h"
+#include "TK_Exit.h"
+#include "Gradient.h"
+#include "FieldProxy.h"
+#include "IO_FileName.h"
+#include "Geo_UnstructGrid.h"
+#include "Param_NSSolverStruct.h"
+#include "Math_Limiter.h"
+#include "Post_ForceMoment.h"
+#include "Residual.h"
+#include "Limiter.h"
+#include "Jacobian.h"
+#include "TK_Log.h"
+
+
+#include "MatrixLUSGS.h"
+
+#include "Gas.h"
+#include "TK_Time.h"
+using namespace std;
+#pragma warning (disable:26451)
+#pragma warning(disable:6386)
+#pragma warning(disable:6385)
+
+namespace PHSPACE
+{
+
+using namespace GAS_SPACE;
+
+NCCRSolverStruct::NCCRSolverStruct()
+{
+    for (int i = 0; i < 5; ++ i)
+    {
+        gradientCellCenterUVWT[i] = 0;
+    }
+    nWallBC = 1; //! The number of surface boundary conditions.
+    nMaxSurfaceCell = 1; //! The number of surface cells.
+    nIonizationFlag = 0; //! The flag of chemical reactions.
+}
+
+NCCRSolverStruct::~NCCRSolverStruct()
+{
+    DeAllocateGlobalVariables();
+    FreeControlParameters();
+}
+
+void NCCRSolverStruct::ReadParameter()
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    string structSchemeName = parameters->GetInviscidSchemeName();
+    int structScheme = GetSchemeID(structSchemeName);
+    GlobalDataBase::UpdateData("str_scheme", &structScheme, PHINT, 1);
+
+    if (structScheme == ISCHEME_ROE)
+    {
+        parameters->SetEntropyFixCoefficients();
+
+        Grid *grid = GetGrid();
+        int zoneID = grid->GetZoneID();
+
+        RDouble entropyAcoustic = parameters->GetRoeEntropyFixCoef1();
+
+        //! The output of Entropy fix coefficient for ROE scheme.
+        if (zoneID == 0)  //! When grid->GetZoneID() = 0 and GetCurrentProcessorID() = 0.
+        {
+            PrintToWindow("Entropy fix coefficient for ROE scheme: ", entropyAcoustic, "\n");
+        }
+    }
+
+    string structLimiterName = GlobalDataBase::GetStrParaFromDB("str_limiter_name");
+    int structLimiter = GetLimiterID(structLimiterName);
+    GlobalDataBase::UpdateData("str_limiter", &structLimiter, PHINT, 1);
+
+    string unstructLimiterName = GlobalDataBase::GetStrParaFromDB("uns_limiter_name");
+    int unstructLimiter = GetLimiterID(unstructLimiterName);
+    GlobalDataBase::UpdateData("uns_limiter", &unstructLimiter, PHINT, 1);
+}
+
+void NCCRSolverStruct::AllocateGlobalVar(Grid *gridIn)
+{
+    CFDSolver::AllocateGlobalVar(gridIn);
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Range IFACE, JFACE, KFACE;
+    GetRange(ni, nj, nk, -2, 2, IFACE, JFACE, KFACE);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int isWennScheme = parameters->GetWennSchemeFlag();
+
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int nSourceTerm = nEquation - nNSEquation;    //! The number of source term.
+    int nDim = GetDim();
+    const int nUVWTIndex = nTemperatureModel + 3;
+
+    int nLayer = GetNumberOfGhostCellLayers();
+
+    if (isWennScheme == 1)
+    {
+        GetRange(ni, nj, nk, -3, 2, I, J, K);
+    }
+
+    Range M(0, nEquation - 1);
+    Range N(0, nUVWTIndex - 1);
+    Range T(0, nTemperatureModel - 1);
+    Range D(0, nDim - 1);
+
+    RDouble4D *q = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *residual = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble3D *dt = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *gama = new RDouble3D(I, J, K, fortranArray);
+    RDouble4D *t = new RDouble4D(I, J, K, T, fortranArray);
+    RDouble4D *visSpectralRadius = new RDouble4D(I, J, K, D, fortranArray);
+    RDouble4D *invSpectralRadius = new RDouble4D(I, J, K, D, fortranArray);
+    RDouble4D *diagonal = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *diagonal0 = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble3D *localCFL = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *localCFLLast = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *deltPressure = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *minCFL = new RDouble3D(I, J, K, fortranArray);
+    Int3D *iterCFL = new Int3D(I, J, K, fortranArray);
+
+    //!
+    int nVisualVariables = GlobalDataBase::GetIntParaFromDB("nVisualVariables");
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        using namespace GAS_SPACE;
+        int nm = GlobalDataBase::GetIntParaFromDB("nm");
+        int nl = GlobalDataBase::GetIntParaFromDB("nl");
+        int neqn = nl + nchem;
+        nVisualVariables = nVisualVariables + (neqn - nm);
+    }
+
+    Range MFace(0, nVisualVariables - 1);
+    RDouble4D *postFaceValue = new RDouble4D(I, J, K, MFace, fortranArray);
+    grid->UpdateDataPtr("postFaceValue", postFaceValue);
+
+
+    RDouble5D *diagonalMatrix = new RDouble5D(I, J, K, M, M, fortranArray);
+    RDouble2D *inverseDiaMatrix = new RDouble2D(M, M, fortranArray);
+    RDouble cflStart = parameters->GetCFLStart();
+    int isUseLocalCFL = parameters->GetLocalCFLFlag();
+    RDouble4D *diagonal1 = NULL;
+    if (isUseLocalCFL == 1)
+    {
+        diagonal1 = new RDouble4D(I, J, K, M, fortranArray);
+    }
+    else if (isUseLocalCFL == 2)
+    {
+        int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+        grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                        (*deltPressure)(i, j, k) = 0.0;
+                        (*iterCFL)(i, j, k) = 0;
+                        (*minCFL)(i, j, k) = 0.0;
+                    }
+                }
+            }
+        }
+    grid->UpdateDataPtr("deltPressure", deltPressure);
+    grid->UpdateDataPtr("iterCFL", iterCFL);
+    grid->UpdateDataPtr("minCFL", minCFL);
+    grid->UpdateDataPtr("diagonal1", diagonal1);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, nLayer);
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                for (int it = 0; it < nTemperatureModel; ++ it)
+                {
+                    (*t)(i, j, k, it) = 0.0;   //
+                } 
+                    (*localCFL)(i, j, k) = cflStart;
+                    (*localCFLLast)(i, j, k) = cflStart;
+                }
+            }
+        }
+
+    grid->UpdateDataPtr("q", q);    //! Scalar flow field variable(rho/u/v/w/p).
+    grid->UpdateDataPtr("res", residual);    //! Residual or right-hand side.
+    grid->UpdateDataPtr("dt", dt);    //! Time step.
+    grid->UpdateDataPtr("gama", gama);    //! Ratio of specific heat coefficients at constant pressure and volume.
+    grid->UpdateDataPtr("t", t);    //! Static temperature.
+    grid->UpdateDataPtr("visSpectralRadius", visSpectralRadius);    //! Viscous spectral radius.
+    grid->UpdateDataPtr("invSpectralRadius", invSpectralRadius);    //! Inviscid spectral radius.
+    grid->UpdateDataPtr("diagonal", diagonal);    //! Sacrificing space to improve efficiency.
+    grid->UpdateDataPtr("diagonal0", diagonal0);    //! Sacrificing space to improve efficiency.
+    grid->UpdateDataPtr("diagonalMatrix", diagonalMatrix);    //! Diaganol matrix for Matrix-LUSGS calculation.
+    grid->UpdateDataPtr("inverseDiaMatrix", inverseDiaMatrix);    //!  Inverse diaganol matrix for Matrix-LUSGS calculation.
+    grid->UpdateDataPtr("localCFL", localCFL);      //! Local CFL number.
+    grid->UpdateDataPtr("localCFLLast", localCFLLast);      //! Local CFL number.
+
+    //! Allocate memories.
+    int timeIntegration = parameters->GetTimeIntegration();
+    if (timeIntegration == 5)
+    {
+        RDouble5D *diagonalMatrice = new RDouble5D(I, J, K, M, M, fortranArray);
+        grid->UpdateDataPtr("diagonalMatrice", diagonalMatrice);
+    }
+    if (nSourceTerm > 0)
+    {
+        //! To store the Jacobian matrix of source term.
+        RDouble4D *sourceJacobian = new RDouble4D(I, J, K, Range(0, nSourceTerm * nSourceTerm - 1), fortranArray);
+        RDouble4D *sourceChemical = new RDouble4D(I, J, K, Range(0, nSourceTerm - 1), fortranArray);
+        RDouble5D *sourceDerivatives = new RDouble5D(I, J, K, Range(0, nSourceTerm - 1), Range(0, nSourceTerm - 1), fortranArray);
+        grid->UpdateDataPtr("sourceJacobian", sourceJacobian);
+        grid->UpdateDataPtr("sourceChemical", sourceChemical);
+        grid->UpdateDataPtr("sourceDerivatives", sourceDerivatives);
+
+        //! To store the partial derivatives of source terms in the main diagonal position.
+        RDouble4D *srs = new RDouble4D(I, J, K, Range(0, nSourceTerm - 1), fortranArray);
+        grid->UpdateDataPtr("srs", srs);
+    }
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        RDouble3D *preconCoefficient = new RDouble3D(I, J, K, fortranArray);
+        RDouble3D *timeCoefficient = new RDouble3D(I, J, K, fortranArray);
+        RDouble3D *timeCoefficientInverse = new RDouble3D(I, J, K, fortranArray);
+
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    (*preconCoefficient)(i, j, k) = 1.0;
+                    (*timeCoefficient)(i, j, k) = 1.0;
+                    (*timeCoefficientInverse)(i, j, k) = 1.0;
+                }
+            }
+        }
+        grid->UpdateDataPtr("preconCoefficient", preconCoefficient);
+        grid->UpdateDataPtr("timeCoefficient", timeCoefficient);
+        grid->UpdateDataPtr("timeCoefficientInverse", timeCoefficientInverse);
+
+        RDouble4D *preconMatrix = new RDouble4D(I, J, K, Range(0, nEquation * nEquation - 1), fortranArray);
+        grid->UpdateDataPtr("preconMatrix", preconMatrix);
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble4D *q_unsteady_n1 = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *q_unsteady_n2 = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *res_unsteady_n1 = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *res_unsteady_n2 = new RDouble4D(I, J, K, M, fortranArray);
+
+        //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dual-time method.
+        RDouble4D *res_unsteady_tmp = new RDouble4D(I, J, K, M, fortranArray);
+
+        grid->UpdateDataPtr("q_unsteady_n1", q_unsteady_n1);
+        grid->UpdateDataPtr("q_unsteady_n2", q_unsteady_n2);
+        grid->UpdateDataPtr("res_unsteady_n1", res_unsteady_n1);
+        grid->UpdateDataPtr("res_unsteady_n2", res_unsteady_n2);
+        grid->UpdateDataPtr("res_unsteady_tmp", res_unsteady_tmp);
+
+        //! Statistical variables for unsteady simulation.
+        RDouble4D *qAverage = new RDouble4D(I, J, K, M, fortranArray);
+        *qAverage = 0.0;
+        grid->UpdateDataPtr("qAverage", qAverage);
+
+        //! Statistical Reynolds stress for unsteady simulation.
+        RDouble4D *tauAverage = new RDouble4D(I, J, K, Range(0, 5), fortranArray);
+        *tauAverage = 0.0;
+        grid->UpdateDataPtr("tauAverage", tauAverage);
+
+        RDouble4D *q2Average = new RDouble4D(I, J, K, Range(0, 5), fortranArray);
+        *q2Average = 0.0;
+        grid->UpdateDataPtr("q2Average", q2Average);
+    }
+
+    RDouble3D *rtem = new RDouble3D(I, J, K, fortranArray);
+    *rtem = 0.0;
+    grid->UpdateDataPtr("rtem", rtem);    //! Pressure factor.
+
+    //RDouble3D &rtem_initial = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("rtem"));
+    //rtem_initial = 0.0;
+    //! rtem is used in timestep(), it should be initialed.
+
+    int viscousType = parameters->GetViscousType();    //! Viscous model.
+    if (viscousType > INVISCID)
+    {
+        RDouble3D *viscousLaminar = new RDouble3D(I, J, K, fortranArray);
+        RDouble3D *viscousTurbulence = new RDouble3D(I, J, K, fortranArray);
+        RDouble4D *heatTransferCoeff = new RDouble4D(I, J, K, T, fortranArray);
+        grid->UpdateDataPtr("heatTransferCoeff", heatTransferCoeff);
+        grid->UpdateDataPtr("visl", viscousLaminar);    //! Laminar viscous coefficient.
+        grid->UpdateDataPtr("vist", viscousTurbulence);    //! Turbulence viscous coefficient.
+        *viscousLaminar = 1.0;
+        *viscousTurbulence = 0.0;
+        *heatTransferCoeff = 0.0;
+    }
+
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+    if (iLES == LES_SOLVER)
+    {
+        RDouble3D *subgridScaleEnergy = new RDouble3D(I, J, K, fortranArray);
+        grid->UpdateDataPtr("subgridScaleEnergy", subgridScaleEnergy);
+        *subgridScaleEnergy = 0.0;
+    }
+    if (nSourceTerm > 0 && viscousType > INVISCID) //Save the heat conductivity and mass diffusion coefficient.
+    {
+        RDouble4D *heatConductivity = new RDouble4D(I, J, K, T, fortranArray);
+        RDouble4D *massDiffusionCoef = new RDouble4D(I, J, K, Range(0, nSourceTerm - 1), fortranArray);
+        grid->UpdateDataPtr("lambda", heatConductivity);    //! Thermal conductivity coefficient.
+        grid->UpdateDataPtr("rhoD", massDiffusionCoef);    //! Mass Diffusion coefficient.
+    }
+
+    RDouble4D *gradPrimtiveVarFaceX = new RDouble4D(IFACE, JFACE, KFACE, M, fortranArray);
+    RDouble4D *gradPrimtiveVarFaceY = new RDouble4D(IFACE, JFACE, KFACE, M, fortranArray);
+    RDouble4D *gradPrimtiveVarFaceZ = new RDouble4D(IFACE, JFACE, KFACE, M, fortranArray);
+    grid->UpdateDataPtr("gradPrimtiveVarFaceX", gradPrimtiveVarFaceX);    //! Gradient of scalar flow field variable at face, for x direction.
+    grid->UpdateDataPtr("gradPrimtiveVarFaceY", gradPrimtiveVarFaceY);    //! Gradient of scalar flow field variable at face, for y direction.
+    grid->UpdateDataPtr("gradPrimtiveVarFaceZ", gradPrimtiveVarFaceZ);    //! Gradient of scalar flow field variable at face, for z direction.
+
+    RDouble4D *gradUVWTCellCenterX = new RDouble4D(I, J, K, N, fortranArray);
+    RDouble4D *gradUVWTCellCenterY = new RDouble4D(I, J, K, N, fortranArray);
+    RDouble4D *gradUVWTCellCenterZ = new RDouble4D(I, J, K, N, fortranArray);
+    grid->UpdateDataPtr("gradUVWTCellCenterX", gradUVWTCellCenterX);    //! Gradient of velocity components(u/v/w) and temperature at cell center in x-direction.
+    grid->UpdateDataPtr("gradUVWTCellCenterY", gradUVWTCellCenterY);    //! Gradient of velocity components(u/v/w) and temperature at cell center in y-direction.
+    grid->UpdateDataPtr("gradUVWTCellCenterZ", gradUVWTCellCenterZ);    //! Gradient of velocity components(u/v/w) and temperature at cell center in z-direction.
+
+    //! Temporary variable for periodic boundary condition.
+    RDouble4D *rotNSgradValueX = new RDouble4D(I, J, K, N, fortranArray);
+    RDouble4D *rotNSgradValueY = new RDouble4D(I, J, K, N, fortranArray);
+    RDouble4D *rotNSgradValueZ = new RDouble4D(I, J, K, N, fortranArray);
+    grid->UpdateDataPtr("rotNSgradValueX", rotNSgradValueX);
+    grid->UpdateDataPtr("rotNSgradValueY", rotNSgradValueY);
+    grid->UpdateDataPtr("rotNSgradValueZ", rotNSgradValueZ);
+
+    RDouble4D *gradTemperatureFaceX = new RDouble4D(IFACE, JFACE, KFACE, T, fortranArray);
+    RDouble4D *gradTemperatureFaceY = new RDouble4D(IFACE, JFACE, KFACE, T, fortranArray);
+    RDouble4D *gradTemperatureFaceZ = new RDouble4D(IFACE, JFACE, KFACE, T, fortranArray);
+    grid->UpdateDataPtr("gradTemperatureFaceX", gradTemperatureFaceX);    //! Gradient of static temperature at face, for x direction.
+    grid->UpdateDataPtr("gradTemperatureFaceY", gradTemperatureFaceY);    //! Gradient of static temperature at face, for y direction.
+    grid->UpdateDataPtr("gradTemperatureFaceZ", gradTemperatureFaceZ);    //! Gradient of static temperature at face, for z direction.
+
+    RDouble4D *ql1 = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *qr1 = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *ql2 = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *qr2 = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *ql3 = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *qr3 = new RDouble4D(I, J, K, M, fortranArray);
+    grid->UpdateDataPtr("ql1", ql1);
+    grid->UpdateDataPtr("qr1", qr1);
+    grid->UpdateDataPtr("ql2", ql2);
+    grid->UpdateDataPtr("qr2", qr2);
+    grid->UpdateDataPtr("ql3", ql3);
+    grid->UpdateDataPtr("qr3", qr3);
+
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+    int nTotalNumber = 16;
+    Int1D *speciesOrder = new Int1D(Range(0, nTotalNumber - 1), fortranArray);
+    grid->UpdateDataPtr("speciesOrder", speciesOrder);
+    for (int n = 0; n < nTotalNumber; ++ n)
+    {
+        (*speciesOrder)(n) = -1;
+    }
+    int isAdaptiveSolver = GlobalDataBase::GetIntParaFromDB("isAdaptiveSolver");
+    int isUseNoneqCond = parameters->GetNonequilibriumConditionFlag();
+    if (isAdaptiveSolver > 0 || isUseNoneqCond > 0)
+    {
+        int nKeyVariableIndex = 1; //The temperature.
+        GlobalDataBase::UpdateData("nKeyVariableIndex", &nKeyVariableIndex, PHINT, 1);
+
+        RDouble *maxResidualVariation = new RDouble[nEquation];
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            maxResidualVariation[m] = 0.0;
+        }
+        grid->UpdateDataPtr("maxResidualVariation", maxResidualVariation);
+    }
+
+    if (nChemical > 0 && nSpeciesNumber > 0)
+    {
+        string *nameList = gas->GetNameOfSpecies();
+        SpeciesNameToInteger(nSpeciesNumber, nameList, speciesOrder);
+
+        RDouble4D *gradSpeciesCellCenterX = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *gradSpeciesCellCenterY = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *gradSpeciesCellCenterZ = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        grid->UpdateDataPtr("dcdx", gradSpeciesCellCenterX);    //! Gradient of chemical species at cell center in x-direction.
+        grid->UpdateDataPtr("dcdy", gradSpeciesCellCenterY);    //! Gradient of chemical species at cell center in y-direction.
+        grid->UpdateDataPtr("dcdz", gradSpeciesCellCenterZ);    //! Gradient of chemical species at cell center in z-direction.
+
+        RDouble4D *speciesEnthalpy = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        grid->UpdateDataPtr("hSpecies", speciesEnthalpy);    //! Enthalpy of chemical species.
+
+        RDouble3D *totalEnergy = new RDouble3D(I, J, K, fortranArray);
+        RDouble3D *totalEnthalpy = new RDouble3D(I, J, K, fortranArray);
+        RDouble3D *totalCp = new RDouble3D(I, J, K, fortranArray);
+        RDouble3D *totalCv = new RDouble3D(I, J, K, fortranArray);
+
+        grid->UpdateDataPtr("totalEnergy", totalEnergy);    //! total energy.
+        grid->UpdateDataPtr("totalEnthalpy", totalEnthalpy);    //! total Enthalpy.
+        grid->UpdateDataPtr("totalCp", totalCp);    //! total Cp.
+        grid->UpdateDataPtr("totalCv", totalCv);    //! total Cv.
+
+        //int nEnergyRecycle = parameters->GetnEnergyRecycle();
+        //if (nTemperatureModel > 1 && nEnergyRecycle == 2)
+        //{
+        //    RDouble4D *temporaryEve = new RDouble4D(I, J, K, Range(1, MAX(1, nTemperatureModel - 1)), fortranArray);
+        //    grid->UpdateDataPtr("temporaryEve", temporaryEve);    //! temporaryEve.
+        //}
+
+        RDouble3D *totalCvtr = new RDouble3D(I, J, K, fortranArray);
+        RDouble3D *totalCvv = new RDouble3D(I, J, K, fortranArray);
+        RDouble3D *totalCve = new RDouble3D(I, J, K, fortranArray);
+        RDouble4D *speciesCvs = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *speciesCps = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *speciesCvvs = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *speciesCves = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *speciesEtrs = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *speciesEvs = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *speciesEes = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *speciesEs = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+
+
+        grid->UpdateDataPtr("totalCvtr", totalCvtr);   //! total Cvtr.
+        grid->UpdateDataPtr("totalCvv", totalCvv);    //! total Cvv.
+        grid->UpdateDataPtr("totalCve", totalCve);    //! total Cve.
+        grid->UpdateDataPtr("speciesCvs", speciesCvs);    //! Cvs for species.
+        grid->UpdateDataPtr("speciesCps", speciesCps);    //! Cps for species.
+        grid->UpdateDataPtr("speciesCvvs", speciesCvvs);    //! Cvvs for species.
+        grid->UpdateDataPtr("speciesCves", speciesCves);    //! Cves for species.
+        grid->UpdateDataPtr("speciesEtrs", speciesEtrs);    //! Etrs for species.
+        grid->UpdateDataPtr("speciesEvs", speciesEvs);    //! Evs for species.
+        grid->UpdateDataPtr("speciesEes", speciesEes);    //! Ees for species.
+        grid->UpdateDataPtr("speciesEs", speciesEs);    //! Es for species.
+
+        RDouble3D *tflag = new RDouble3D(I, J, K, fortranArray);
+        *tflag = 0.0;
+
+        grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd);
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    (*tflag)(i, j, k) = 1.0;
+                }
+            }
+        }
+        grid->UpdateDataPtr("tflag", tflag);
+
+        //Thermo_Energy_DB * Thermo_Energy_Para = new Thermo_Energy_DB(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd ,nSpeciesNumber);
+        //grid->UpdateDataPtr("Thermo_Energy_Para", Thermo_Energy_Para);
+
+
+        grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    }
+
+    //! Save the temperature on wall.
+    GetSurfaceCellNumber(gridIn);
+    RDouble2D *firstLayerHeight = NULL;
+    if (nWallBC > 0)    //! The current grid includes wall boundary conditions.
+    {
+        firstLayerHeight = new RDouble2D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), fortranArray);
+    }
+    grid->UpdateDataPtr("firstLayerHeight", firstLayerHeight);
+    //! Compute the heights of cells on the first grid layer.
+    ComputeFirstLayerGridHeight(gridIn);
+
+    //! Allocate the memories for temperatures on wall.
+    RDouble2D *temperatureWall = NULL;
+    if (nWallBC > 0)
+    {
+        temperatureWall = new RDouble2D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), fortranArray);
+    }
+    grid->UpdateDataPtr("surfaceTemperature", temperatureWall);
+
+    //! Allocate the memories for catalytic wall.
+    if (nChemical > 0 && nSpeciesNumber > 0)
+    {
+        RDouble3D *surfaceMassFraction = NULL;
+        if (nWallBC > 0)
+        {
+            surfaceMassFraction = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, nSpeciesNumber - 1), fortranArray);
+        }
+        grid->UpdateDataPtr("surfaceMassFraction", surfaceMassFraction);
+    }
+
+    int isAblationWall = GlobalDataBase::GetIntParaFromDB("nAblation");
+    int Injection = GlobalDataBase::GetIntParaFromDB("isInjection");
+    if (isAblationWall > 0 && Injection > 0)
+    {
+        RDouble2D *injectionVelocity = NULL;
+        if (nWallBC > 0)
+        {
+            injectionVelocity = new RDouble2D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), fortranArray);
+        }
+
+        for (int iWall = 0; iWall < nWallBC; ++ iWall)
+        {
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                (*injectionVelocity)(iWall, iCell) = 0.0;
+            }
+        }
+        grid->UpdateDataPtr("injectionVelocity", injectionVelocity);
+    }
+
+    //! added by myk 202010, for conservation of flux
+    systemgridtype = GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if (MIXGRID == systemgridtype)
+    {
+        RDouble4D *dqdx_cc_ruvwpt = new RDouble4D(I, J, K, Range(0, 5), fortranArray);
+        RDouble4D *dqdy_cc_ruvwpt = new RDouble4D(I, J, K, Range(0, 5), fortranArray);
+        RDouble4D *dqdz_cc_ruvwpt = new RDouble4D(I, J, K, Range(0, 5), fortranArray);
+        grid->UpdateDataPtr("dqdx_cc_ruvwpt", dqdx_cc_ruvwpt);    //! Gradient of flow field variable(rho/u/v/w/p/t) at cell center in x-direction.
+        grid->UpdateDataPtr("dqdy_cc_ruvwpt", dqdy_cc_ruvwpt);    //! Gradient of flow field variable(rho/u/v/w/p/t) at cell center in y-direction.
+        grid->UpdateDataPtr("dqdz_cc_ruvwpt", dqdz_cc_ruvwpt);    //! Gradient of flow field variable(rho/u/v/w/p/t) at cell center in z-direction.
+
+        RDouble4D *faceInviscidfluxI = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *faceInviscidfluxJ = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *faceInviscidfluxK = new RDouble4D(I, J, K, M, fortranArray);
+        grid->UpdateDataPtr("faceInviscidfluxI", faceInviscidfluxI);    //! Inviscid flux at face, for I direction.
+        grid->UpdateDataPtr("faceInviscidfluxJ", faceInviscidfluxJ);    //! Inviscid flux at face, for J direction.
+        grid->UpdateDataPtr("faceInviscidfluxK", faceInviscidfluxK);    //! Inviscid flux at face, for K direction.
+
+        if (viscousType > INVISCID)
+        {
+            RDouble4D *faceViscousfluxI = new RDouble4D(I, J, K, M, fortranArray);
+            RDouble4D *faceViscousfluxJ = new RDouble4D(I, J, K, M, fortranArray);
+            RDouble4D *faceViscousfluxK = new RDouble4D(I, J, K, M, fortranArray);
+            grid->UpdateDataPtr("faceViscousfluxI", faceViscousfluxI);    //! Viscous flux at face, for I direction.
+            grid->UpdateDataPtr("faceViscousfluxJ", faceViscousfluxJ);    //! Viscous flux at face, for J direction.
+            grid->UpdateDataPtr("faceViscousfluxK", faceViscousfluxK);    //! Viscous flux at face, for K direction.
+        }
+    }
+
+    //! Allocate the memories for the slip parameters.
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    if (nSlipBCModel > 0)
+    {
+        //! The array includes variables such as slip temperatures(Tts, Tvs, Tes), slip velocity(Vx, Vy, Vz) and slip mass fractions of species.
+        int nSlipVar = nSpeciesNumber + 6;
+        RDouble3D *surfaceSlipVariables = NULL;
+        if (nWallBC > 0)
+        {
+            surfaceSlipVariables = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, nSlipVar - 1), fortranArray);
+        }
+        grid->UpdateDataPtr("surfaceSlipVariables", surfaceSlipVariables);
+    }
+
+    int nRapidFlowfield = parameters->GetRapidFlowfieldMethod();
+    if (nRapidFlowfield > 0)
+    {
+        RDouble3D *surfacePressure = NULL;
+        if (nWallBC > 0)
+        {
+            surfacePressure = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, 1), fortranArray);
+        }
+        grid->UpdateDataPtr("surfacePressure", surfacePressure);
+    }
+
+    //! To exam the surface heating change.
+    int nSurfHeatMonitor = parameters->GetSurfaceHeatingMonitor();
+    if (nSurfHeatMonitor > 0)
+    {
+        RDouble3D *surfaceHeatFlux = NULL;
+        if (nWallBC > 0)
+        {
+            surfaceHeatFlux = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, 1), fortranArray);
+            *surfaceHeatFlux = 0.0;
+        }
+        grid->UpdateDataPtr("surfaceHeatFlux", surfaceHeatFlux);
+    }
+
+    if (isUseNoneqCond > 0)
+    {
+        //To save the difference of variable.
+        RDouble4D *deltaQ = new RDouble4D(I, J, K, Range(0, 1), fortranArray);
+        *deltaQ = 1.0;
+        grid->UpdateDataPtr("deltaQ", deltaQ);
+
+        //To use the non-equilibrium condition.
+        if (nChemical > 0)
+        {
+            RDouble4D *timeScale = new RDouble4D(I, J, K, Range(0, 2), fortranArray);
+            *timeScale = 0.0;
+            grid->UpdateDataPtr("timeScale", timeScale);
+
+            RDouble4D *noneqNumber = new RDouble4D(I, J, K, Range(0, 1), fortranArray);
+            *noneqNumber = 0.0;
+            grid->UpdateDataPtr("noneqNumber", noneqNumber);
+
+            //To save the Damkohler number.
+            RDouble3D *damkohlerNumber = new RDouble3D(I, J, K, fortranArray);
+            //To save the vibrational non-equilibrium number.
+            RDouble3D *vibNoneqNumber = new RDouble3D(I, J, K, fortranArray);
+            *damkohlerNumber = 0.0;
+            *vibNoneqNumber = 0.0;
+            grid->UpdateDataPtr("DamkohlerNumber", damkohlerNumber);
+            grid->UpdateDataPtr("VibNoneqNumber", vibNoneqNumber);
+        }
+    }
+
+    //! Initialization of parameters on surface.
+    InitializeSurfaceParameters(gridIn);
+
+    //! Set the temperature on wall by reading data from file.
+    InitializeSurfaceParametersFromFile(gridIn);
+}
+
+void NCCRSolverStruct::DeAllocateGlobalVar(Grid *gridIn)
+{
+    CFDSolver::DeAllocateGlobalVar(gridIn);
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D *q = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D *residual = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble3D *dt = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+    RDouble3D *localCFL = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("localCFL"));
+    RDouble3D *localCFLLast = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("localCFLLast"));
+    RDouble3D *gama = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble4D *t = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble4D *visSpectralRadius = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+    RDouble4D *invSpectralRadius = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D *diagonal = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+    RDouble5D *diagonalMatrix = reinterpret_cast <RDouble5D *> (grid->GetDataPtr("diagonalMatrix"));
+    RDouble2D *inverseDiaMatrix = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("inverseDiaMatrix"));
+    RDouble4D *postFaceValue = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("postFaceValue"));
+
+    delete q; q = 0;
+    delete residual; residual = 0;
+    delete dt; dt = 0;
+    delete localCFL; localCFL = 0;
+    delete localCFLLast; localCFLLast = 0;
+    delete gama; gama = 0;
+    delete t; t = 0;
+    delete visSpectralRadius; visSpectralRadius = 0;
+    delete invSpectralRadius; invSpectralRadius = 0;
+    delete diagonal; diagonal = 0;
+    delete diagonalMatrix;
+    delete inverseDiaMatrix;
+    delete postFaceValue; postFaceValue = 0;
+    //Remove data pointer.
+    grid->DeleteDataPtr("q");
+    grid->DeleteDataPtr("res");
+    grid->DeleteDataPtr("dt");
+    grid->DeleteDataPtr("gama");
+    grid->DeleteDataPtr("t");
+    grid->DeleteDataPtr("localCFL");
+    grid->DeleteDataPtr("localCFLLast");
+    grid->DeleteDataPtr("visSpectralRadius");
+    grid->DeleteDataPtr("invSpectralRadius");
+    grid->DeleteDataPtr("diagonal");
+    grid->DeleteDataPtr("diagonalMatrix");
+    grid->DeleteDataPtr("inverseDiaMatrix");
+    grid->DeleteDataPtr("postFaceValue");
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int timeIntegration = parameters->GetTimeIntegration();
+
+    if (timeIntegration == 5)
+    {
+        RDouble5D *diagonalMatrice = reinterpret_cast <RDouble5D *> (grid->GetDataPtr("diagonalMatrice"));
+        delete diagonalMatrice; diagonalMatrice = 0;
+        grid->DeleteDataPtr("diagonalMatrice");
+    }
+
+    int isUseLocalCFL = parameters->GetLocalCFLFlag();
+    RDouble4D *diagonal1 = NULL;
+    if (isUseLocalCFL == 1)
+    {
+        diagonal1 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal1"));
+        delete diagonal1; diagonal1 = 0;
+    }
+    
+    RDouble3D *deltPressure = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("deltPressure"));
+    Int3D *iterCFL = reinterpret_cast <Int3D *> (grid->GetDataPtr("iterCFL"));
+    RDouble3D *minCFL = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("minCFL"));
+
+    delete deltPressure; deltPressure = 0;
+    delete iterCFL; iterCFL = 0;
+    delete minCFL; minCFL = 0;
+    grid->DeleteDataPtr("deltPressure");
+    grid->DeleteDataPtr("iterCFL");
+    grid->DeleteDataPtr("minCFL");
+
+    grid->DeleteDataPtr("q0");
+    grid->DeleteDataPtr("diagonal1");
+
+    int nEquation = GetNumberOfEquations();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nSourceTerm = nEquation - nNSEquation;     //! Number of source term.
+    if (nSourceTerm > 0)
+    {
+        RDouble4D *sourceJacobian = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("sourceJacobian"));
+        RDouble4D *sourceChemical = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("sourceChemical"));
+        RDouble5D *sourceDerivatives = reinterpret_cast <RDouble5D *> (grid->GetDataPtr("sourceDerivatives"));
+        delete sourceJacobian; sourceJacobian = 0;
+        delete sourceChemical; sourceChemical = 0;
+        delete sourceDerivatives; sourceDerivatives = 0;
+        grid->DeleteDataPtr("sourceJacobian");
+        grid->DeleteDataPtr("sourceChemical");
+        grid->DeleteDataPtr("sourceDerivatives");
+
+        RDouble4D *srs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("srs"));
+        delete srs; srs = 0;
+        grid->DeleteDataPtr("srs");
+    }
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+    if (ifLowSpeedPrecon != 0)
+    {
+        RDouble3D *preconCoefficient = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+        RDouble3D *timeCoefficient = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("timeCoefficient"));
+        RDouble3D *timeCoefficientInverse = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("timeCoefficientInverse"));
+        RDouble4D *preconMatrix = reinterpret_cast< RDouble4D *> (grid->GetDataPtr("preconMatrix"));
+        delete preconCoefficient; preconCoefficient = 0;
+        grid->DeleteDataPtr("preconCoefficient");
+        delete timeCoefficient; timeCoefficient = 0;
+        grid->DeleteDataPtr("timeCoefficient");
+        delete timeCoefficientInverse; timeCoefficientInverse = 0;
+        grid->DeleteDataPtr("timeCoefficientInverse");
+        delete preconMatrix; preconMatrix = 0;
+        grid->DeleteDataPtr("preconMatrix");
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble4D *q_unsteady_n1 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+        RDouble4D *q_unsteady_n2 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+        RDouble4D *res_unsteady_n1 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+        RDouble4D *res_unsteady_n2 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+
+        //! Store the historical sum of InviscidFlux, ViscousFlux, et al. /n
+        //! exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dual-time method.
+        RDouble4D *res_unsteady_tmp = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_tmp"));
+
+        delete q_unsteady_n1; q_unsteady_n1 = 0;
+        delete q_unsteady_n2; q_unsteady_n2 = 0;
+        delete res_unsteady_n1; res_unsteady_n1 = 0;
+        delete res_unsteady_n2; res_unsteady_n2 = 0;
+        delete res_unsteady_tmp; res_unsteady_tmp = 0;
+        grid->DeleteDataPtr("q_unsteady_n1");
+        grid->DeleteDataPtr("q_unsteady_n2");
+        grid->DeleteDataPtr("res_unsteady_n1");
+        grid->DeleteDataPtr("res_unsteady_n2");
+        grid->DeleteDataPtr("res_unsteady_tmp");
+
+        //! Statistical variables for unsteady simulation.
+        int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+        if (ifStaticsFlowField > 0)
+        {
+            RDouble4D *qAverage = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage"));
+            delete qAverage; qAverage = 0;
+            grid->DeleteDataPtr("qAverage");
+        }
+
+        //! Statistical Reynolds stress for unsteady simulation.
+        RDouble4D *tauAverage = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("tauAverage"));
+        delete tauAverage; tauAverage = 0;
+        grid->DeleteDataPtr("tauAverage");
+
+        RDouble4D *q2Average = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q2Average"));
+        delete q2Average; q2Average = 0;
+        grid->DeleteDataPtr("q2Average");
+    }
+
+    RDouble3D *rtem = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("rtem"));
+    delete rtem; rtem = 0;
+    grid->DeleteDataPtr("rtem");
+
+    int viscousType = parameters->GetViscousType();
+    if (viscousType > INVISCID)
+    {
+        RDouble3D *viscousLaminar = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+        RDouble3D *viscousTurbulence = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+        RDouble4D *heatTransferCoeff = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("heatTransferCoeff"));
+        delete viscousLaminar; viscousLaminar = 0;
+        delete viscousTurbulence; viscousTurbulence = 0;
+        delete heatTransferCoeff; heatTransferCoeff = 0;
+        grid->DeleteDataPtr("visl");
+        grid->DeleteDataPtr("vist");
+        grid->DeleteDataPtr("heatTransferCoeff");
+    }
+
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+    if (iLES == LES_SOLVER)
+    {
+        RDouble3D *subgridScaleEnergy = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+        delete subgridScaleEnergy; subgridScaleEnergy = 0;
+        grid->DeleteDataPtr("subgridScaleEnergy");
+    }
+
+    if (nSourceTerm > 0 && viscousType > INVISCID) //! Save the heat conductivity and mass diffusion coefficient.
+    {
+        RDouble4D *heatConductivity = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("lambda"));
+        RDouble4D *massDiffusionCoef = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rhoD"));
+        delete heatConductivity; heatConductivity = 0;
+        delete massDiffusionCoef; massDiffusionCoef = 0;
+        grid->DeleteDataPtr("lambda");
+        grid->DeleteDataPtr("rhoD");
+    }
+
+    RDouble4D *gradPrimtiveVarFaceX = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D *gradPrimtiveVarFaceY = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D *gradPrimtiveVarFaceZ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+    delete gradPrimtiveVarFaceX; gradPrimtiveVarFaceX = 0;
+    delete gradPrimtiveVarFaceY; gradPrimtiveVarFaceY = 0;
+    delete gradPrimtiveVarFaceZ; gradPrimtiveVarFaceZ = 0;
+    grid->DeleteDataPtr("gradPrimtiveVarFaceX");
+    grid->DeleteDataPtr("gradPrimtiveVarFaceY");
+    grid->DeleteDataPtr("gradPrimtiveVarFaceZ");
+
+    RDouble4D *gradTemperatureFaceX = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D *gradTemperatureFaceY = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D *gradTemperatureFaceZ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceZ"));
+    delete gradTemperatureFaceX; gradTemperatureFaceX = 0;
+    delete gradTemperatureFaceY; gradTemperatureFaceY = 0;
+    delete gradTemperatureFaceZ; gradTemperatureFaceZ = 0;
+    grid->DeleteDataPtr("gradTemperatureFaceX");
+    grid->DeleteDataPtr("gradTemperatureFaceY");
+    grid->DeleteDataPtr("gradTemperatureFaceZ");
+
+    RDouble4D *gradUVWTCellCenterX = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D *gradUVWTCellCenterY = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D *gradUVWTCellCenterZ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+    delete gradUVWTCellCenterX; gradUVWTCellCenterX = 0;
+    delete gradUVWTCellCenterY; gradUVWTCellCenterY = 0;
+    delete gradUVWTCellCenterZ; gradUVWTCellCenterZ = 0;
+    grid->DeleteDataPtr("gradUVWTCellCenterX");
+    grid->DeleteDataPtr("gradUVWTCellCenterY");
+    grid->DeleteDataPtr("gradUVWTCellCenterZ");
+
+    RDouble4D *rotNSgradValueX = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotNSgradValueX"));
+    RDouble4D *rotNSgradValueY = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotNSgradValueY"));
+    RDouble4D *rotNSgradValueZ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotNSgradValueZ"));
+    delete rotNSgradValueX; rotNSgradValueX = 0;
+    delete rotNSgradValueY; rotNSgradValueY = 0;
+    delete rotNSgradValueZ; rotNSgradValueZ = 0;
+    grid->DeleteDataPtr("rotNSgradValueX");
+    grid->DeleteDataPtr("rotNSgradValueY");
+    grid->DeleteDataPtr("rotNSgradValueZ");
+
+    RDouble4D *ql1 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1"));
+    RDouble4D *qr1 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1"));
+    RDouble4D *ql2 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2"));
+    RDouble4D *qr2 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2"));
+    RDouble4D *ql3 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3"));
+    RDouble4D *qr3 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3"));
+    delete ql1; ql1 = 0;
+    delete qr1; qr1 = 0;
+    delete ql2; ql2 = 0;
+    delete qr2; qr2 = 0;
+    delete ql3; ql3 = 0;
+    delete qr3; qr3 = 0;
+    grid->DeleteDataPtr("ql1");
+    grid->DeleteDataPtr("qr1");
+    grid->DeleteDataPtr("ql2");
+    grid->DeleteDataPtr("qr2");
+    grid->DeleteDataPtr("ql3");
+    grid->DeleteDataPtr("qr3");
+
+    Int1D *speciesOrder = reinterpret_cast <Int1D *> (grid->GetDataPtr("speciesOrder"));
+    delete speciesOrder; speciesOrder = 0;
+    grid->DeleteDataPtr("speciesOrder");
+
+    int isAdaptiveSolver = GlobalDataBase::GetIntParaFromDB("isAdaptiveSolver");
+    int isUseNoneqCond = parameters->GetNonequilibriumConditionFlag();
+    if (isAdaptiveSolver > 0 || isUseNoneqCond > 0)
+    {
+        RDouble *maxResidualVariation = reinterpret_cast <RDouble *> (grid->GetDataPtr("maxResidualVariation"));
+        delete[]maxResidualVariation;
+        grid->DeleteDataPtr("maxResidualVariation");
+    }
+
+    int nChemical = parameters->GetChemicalFlag();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+    if (nChemical > 0 && nSpeciesNumber > 0)
+    {
+        RDouble4D *gradSpeciesCellCenterX = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdx"));
+        RDouble4D *gradSpeciesCellCenterY = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdy"));
+        RDouble4D *gradSpeciesCellCenterZ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdz"));
+        delete gradSpeciesCellCenterX; gradSpeciesCellCenterX = 0;
+        delete gradSpeciesCellCenterY; gradSpeciesCellCenterY = 0;
+        delete gradSpeciesCellCenterZ; gradSpeciesCellCenterZ = 0;
+        grid->DeleteDataPtr("dcdx");
+        grid->DeleteDataPtr("dcdy");
+        grid->DeleteDataPtr("dcdz");
+
+        RDouble4D *speciesEnthalpy = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("hSpecies"));
+        delete speciesEnthalpy; speciesEnthalpy = 0;
+        grid->DeleteDataPtr("hSpecies");
+        if (nWallBC > 0)
+        {
+            RDouble3D *surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+            delete surfaceMassFraction; surfaceMassFraction = 0;
+        }
+        grid->DeleteDataPtr("surfaceMassFraction");
+
+        RDouble3D *tflag = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("tflag"));
+        delete tflag; tflag = 0;
+        grid->DeleteDataPtr("tflag");
+
+        /*Thermo_Energy_DB * Thermo_Energy_Para = reinterpret_cast <Thermo_Energy_DB *> (grid->GetDataPtr("Thermo_Energy_Para"));
+        delete Thermo_Energy_Para; Thermo_Energy_Para = 0;
+        grid->DeleteDataPtr("Thermo_Energy_Para");*/
+
+        RDouble3D *totalCvtr = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvtr"));
+        RDouble3D *totalCvv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvv"));
+        RDouble3D *totalCve = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCve"));
+        RDouble4D *speciesCvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCvs"));
+        RDouble4D *speciesCps = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCps"));
+        RDouble4D *speciesCvvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCvvs"));
+        RDouble4D *speciesCves = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCves"));
+        RDouble4D *speciesEtrs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEtrs"));
+        RDouble4D *speciesEvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEvs"));
+        RDouble4D *speciesEes = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEes"));
+        RDouble4D *speciesEs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEs"));
+        delete totalCvtr; totalCvtr = 0;
+        delete totalCvv; totalCvv = 0;
+        delete totalCve; totalCve = 0;
+        delete speciesCvs; speciesCvs = 0;
+        delete speciesCps; speciesCps = 0;
+        delete speciesCvvs; speciesCvvs = 0;
+        delete speciesCves; speciesCves = 0;
+        delete speciesEtrs; speciesEtrs = 0;
+        delete speciesEvs; speciesEvs = 0;
+        delete speciesEes; speciesEes = 0;
+        delete speciesEs; speciesEs = 0;
+        grid->DeleteDataPtr("totalCvtr");
+        grid->DeleteDataPtr("totalCvv");
+        grid->DeleteDataPtr("totalCve");
+        grid->DeleteDataPtr("speciesCvs");
+        grid->DeleteDataPtr("speciesCps");
+        grid->DeleteDataPtr("speciesCvvs");
+        grid->DeleteDataPtr("speciesCves");
+        grid->DeleteDataPtr("speciesEtrs");
+        grid->DeleteDataPtr("speciesEvs");
+        grid->DeleteDataPtr("speciesEes");
+        grid->DeleteDataPtr("speciesEs");
+
+        RDouble3D *totalEnergy = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalEnergy"));
+        RDouble3D *totalEnthalpy = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalEnthalpy"));
+        RDouble3D *totalCp = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCp"));
+        RDouble3D *totalCv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCv"));
+        delete totalEnergy; totalEnergy = 0;
+        delete totalEnthalpy; totalEnthalpy = 0;
+        delete totalCp; totalCp = 0;
+        delete totalCv; totalCv = 0;
+        grid->DeleteDataPtr("totalEnergy");
+        grid->DeleteDataPtr("totalEnthalpy");
+        grid->DeleteDataPtr("totalCp");
+        grid->DeleteDataPtr("totalCv");
+
+        //int nTemperatureModel = parameters->GetTemperatureModel();
+        //int nEnergyRecycle = parameters->GetnEnergyRecycle();
+        //if (nTemperatureModel > 1 && nEnergyRecycle == 2)
+        //{
+        //    RDouble4D *temporaryEve = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("temporaryEve"));
+        //    delete temporaryEve; temporaryEve = 0;   //! temporaryEve.
+        //    grid->DeleteDataPtr("temporaryEve");
+        //}
+        }
+
+    if (nWallBC > 0)
+    {
+        RDouble2D *firstLayerHeight = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("firstLayerHeight"));
+        delete firstLayerHeight; firstLayerHeight = 0;
+
+        RDouble2D *temperatureWall = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+        delete temperatureWall; temperatureWall = 0;
+    }
+    grid->DeleteDataPtr("surfaceTemperature");
+    grid->DeleteDataPtr("firstLayerHeight");
+
+    systemgridtype = GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if (MIXGRID == systemgridtype)
+    {
+        RDouble4D *dqdx_cc_ruvwpt = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdx_cc_ruvwpt"));
+        RDouble4D *dqdy_cc_ruvwpt = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdy_cc_ruvwpt"));
+        RDouble4D *dqdz_cc_ruvwpt = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdz_cc_ruvwpt"));
+        delete dqdx_cc_ruvwpt; dqdx_cc_ruvwpt = 0;
+        delete dqdy_cc_ruvwpt; dqdy_cc_ruvwpt = 0;
+        delete dqdz_cc_ruvwpt; dqdz_cc_ruvwpt = 0;
+        grid->DeleteDataPtr("dqdx_cc_ruvwpt");    
+        grid->DeleteDataPtr("dqdy_cc_ruvwpt");
+        grid->DeleteDataPtr("dqdz_cc_ruvwpt");
+
+        RDouble4D *faceInviscidfluxI = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI"));
+        RDouble4D *faceInviscidfluxJ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ"));
+        RDouble4D *faceInviscidfluxK = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK"));
+        delete faceInviscidfluxI; faceInviscidfluxI = 0;
+        delete faceInviscidfluxJ; faceInviscidfluxJ = 0;
+        delete faceInviscidfluxK; faceInviscidfluxK = 0;
+        grid->DeleteDataPtr("faceInviscidfluxI");    
+        grid->DeleteDataPtr("faceInviscidfluxJ");    
+        grid->DeleteDataPtr("faceInviscidfluxK");    
+
+        if (viscousType > INVISCID)
+        {
+            RDouble4D *faceViscousfluxI = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxI"));
+            RDouble4D *faceViscousfluxJ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxJ"));
+            RDouble4D *faceViscousfluxK = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxK"));
+            delete faceViscousfluxI; faceViscousfluxI = 0;
+            delete faceViscousfluxJ; faceViscousfluxJ = 0;
+            delete faceViscousfluxK; faceViscousfluxK = 0;
+            grid->DeleteDataPtr("faceViscousfluxI");
+            grid->DeleteDataPtr("faceViscousfluxJ");
+            grid->DeleteDataPtr("faceViscousfluxK");
+        }
+    }
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    if (nSlipBCModel > 0)
+    {
+        if (nWallBC > 0)
+        {
+            RDouble3D *surfaceSlipVariables = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+            delete surfaceSlipVariables; surfaceSlipVariables = 0;
+        }
+        grid->DeleteDataPtr("surfaceSlipVariables");
+    }
+    int isAblationWall = GlobalDataBase::GetIntParaFromDB("nAblation");
+    int Injection = GlobalDataBase::GetIntParaFromDB("isInjection");
+    if (isAblationWall > 0 && Injection > 0)
+    {
+        if (nWallBC > 0)
+        {
+            RDouble2D *injectionVelocity = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("injectionVelocity"));
+            delete injectionVelocity; injectionVelocity = 0;
+            grid->DeleteDataPtr("injectionVelocity");
+        }
+    }
+
+    int nRapidFlowfield = parameters->GetRapidFlowfieldMethod();
+    if (nRapidFlowfield > 0)
+    {
+        if (nWallBC > 0)
+        {
+            RDouble3D *surfacePressure = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfacePressure"));
+            delete surfacePressure; surfacePressure = 0;
+        }
+        grid->DeleteDataPtr("surfacePressure");
+    }
+
+    int nSurfHeatMonitor = parameters->GetSurfaceHeatingMonitor();
+    if (nSurfHeatMonitor > 0)
+    {
+        if (nWallBC > 0)
+        {
+            RDouble3D *surfaceHeatFlux = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceHeatFlux"));
+            delete surfaceHeatFlux; surfaceHeatFlux = 0;
+        }
+        grid->DeleteDataPtr("surfaceHeatFlux");
+    }
+
+    if (isUseNoneqCond > 0)
+    {
+        RDouble4D *deltaQ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("deltaQ"));
+        delete deltaQ; deltaQ = 0;
+        grid->DeleteDataPtr("deltaQ");
+
+        if (nChemical > 0)
+        {
+            RDouble4D *timeScale = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("timeScale"));
+            delete timeScale; timeScale = 0;
+            grid->DeleteDataPtr("timeScale");
+
+            RDouble4D *noneqNumber = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("noneqNumber"));
+            delete noneqNumber; noneqNumber = 0;
+            grid->DeleteDataPtr("noneqNumber");
+
+            RDouble3D *damkohlerNumber = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("DamkohlerNumber"));
+            delete damkohlerNumber; damkohlerNumber = 0;
+            grid->DeleteDataPtr("DamkohlerNumber");
+
+            RDouble3D *vibNoneqNumber = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("VibNoneqNumber"));
+            delete vibNoneqNumber; vibNoneqNumber = 0;
+            grid->DeleteDataPtr("VibNoneqNumber");
+        }
+    }
+
+    nWallBC = 1; //! The number of surface boundary conditions.
+    nMaxSurfaceCell = 1; //! The number of surface cells.
+    nIonizationFlag = 0; //! The flag of chemical reactions.
+}
+
+void NCCRSolverStruct::GetSurfaceCellNumber(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    //! Obtain the number of boundary condition regions.
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    nWallBC = 0;
+    nMaxSurfaceCell = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!IsWall(BCType) && BCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+        ++ nWallBC; //! The number of surface regions.
+
+        //! The following are surface boundary codes.
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        int ni = ied - ist + 1;
+        int nj = jed - jst + 1;
+        int nk = ked - kst + 1;
+        int nCell = ni * nj * nk;
+        nMaxSurfaceCell = MAX(nCell, nMaxSurfaceCell);
+    }
+}
+
+/*
+    void NCCRSolverStruct::InitializeSurfaceParameters(Grid *gridIn)
+    {
+        StructGrid *grid = StructGridCast(gridIn);
+        Param_NSSolverStruct *parameters = GetControlParameters();
+
+        //! Set surface temperatures.
+        RDouble Twall = parameters->GetWallTemperature();
+        RDouble refTemperature = parameters->GetRefDimensionalTemperature();
+        RDouble refT = Twall / refTemperature;
+        if (nWallBC > 0)
+        {
+            if (Twall <= EPSILON)
+            {
+                refT = 1.0; //! Radiation equilibrium temperature wall.
+            }
+
+            RDouble2D *temperatureWall = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+            if (temperatureWall == NULL)
+            {
+                temperatureWall = new RDouble2D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), fortranArray);
+                grid->UpdateDataPtr("surfaceTemperature", temperatureWall);
+            }
+
+            //! Initialization with the freestream temperature.
+            for (int iWall = 0; iWall < nWallBC; ++ iWall)
+            {
+                for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+                {
+                    (*temperatureWall)(iWall, iCell) = refT;
+                }
+            }
+        }
+
+        //! Set surface mass fractions of species.
+        RDouble initMassFraction[MAX_SPECIES_NUM] = { 0 };
+        int nChemical = parameters->GetChemicalFlag();
+        int nSpeciesNumber = parameters->GetNumberOfSpecies();
+        int nNSEquation = parameters->GetNSEquationNumber();
+
+        if (nChemical > 0 && nSpeciesNumber > 0)
+        {
+            int nIndexOfElectron = parameters->GetIndexOfElectron();
+            if (nIndexOfElectron >= 0)
+            {
+                this->nIonizationFlag = 1;
+            }
+
+            RDouble *fcwMassFraction = parameters->GetFullyCatalyticMassFraction();
+            for (int s = 0; s < nSpeciesNumber; ++ s)
+            {
+                initMassFraction[s] = fcwMassFraction[s];
+            }
+
+            RDouble catalyticCoef = parameters->GetCatalyticCoef();
+            if (ABS(catalyticCoef) <= EPSILON) //! Initialization of the initial mass fraction of species.
+            {
+                RDouble *primitiveVar = parameters->GetPrimitiveVarFarfield();
+                for (int s = 0; s < nSpeciesNumber; ++ s)
+                {
+                    initMassFraction[s] = primitiveVar[nNSEquation + s];
+                }
+            }
+
+            RDouble3D *surfaceMassFraction = NULL;
+            if (nWallBC > 0)
+            {
+                surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+                if (surfaceMassFraction == NULL)
+                {
+                    surfaceMassFraction = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, nSpeciesNumber - 1), fortranArray);
+                    grid->UpdateDataPtr("surfaceMassFraction", surfaceMassFraction);
+                }
+            }
+
+            for (int iWall = 0; iWall < nWallBC; ++ iWall)
+            {
+                for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+                {
+                    for (int s = 0; s < nSpeciesNumber; ++ s)
+                    {
+                        (*surfaceMassFraction)(iWall, iCell, s) = initMassFraction[s];
+                    }
+                }
+            }
+        }
+
+        //! Set surface slip parameters.
+        int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+        if (nSlipBCModel > 0)
+        {
+            //! The array includes variables such as slip temperatures(Tts, Tvs, Tes), slip velocity(Vx, Vy, Vz) and slip mass fractions of species.
+            int nSlipVar = nSpeciesNumber + 6;
+            RDouble3D *surfaceSlipVariables = NULL;
+            if (nWallBC > 0)
+            {
+                surfaceSlipVariables = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+                if (surfaceSlipVariables == NULL)
+                {
+                    surfaceSlipVariables = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, nSlipVar - 1), fortranArray);
+                    grid->UpdateDataPtr("surfaceSlipVariables", surfaceSlipVariables);
+                }
+            }
+            for (int iWall = 0; iWall < nWallBC; ++ iWall)
+            {
+                for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+                {
+                    (*surfaceSlipVariables)(iWall, iCell, 0) = refT; //! Temperature.
+                    (*surfaceSlipVariables)(iWall, iCell, 1) = refT;
+                    (*surfaceSlipVariables)(iWall, iCell, 2) = refT;
+                    (*surfaceSlipVariables)(iWall, iCell, 3) = 0.0; //! Velocity.
+                    (*surfaceSlipVariables)(iWall, iCell, 4) = 0.0;
+                    (*surfaceSlipVariables)(iWall, iCell, 5) = 0.0;
+                    for (int s = 6; s < nSlipVar; ++ s) //! Species mass fractions.
+                    {
+                        (*surfaceSlipVariables)(iWall, iCell, s) = initMassFraction[s - 6];
+                    }
+                }
+            }
+        }
+    }
+*/
+
+void NCCRSolverStruct::InitializeSurfaceParameters(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    //! Set surface temperatures.
+    RDouble Twall = parameters->GetWallTemperature();
+    RDouble refTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble refT = Twall / refTemperature;
+    int wallMultiTemperature = gas->GetwallMultiTemperature();
+
+    if (nWallBC > 0)
+    {
+        RDouble2D *temperatureWall = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+        if (temperatureWall == NULL)
+        {
+            temperatureWall = new RDouble2D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), fortranArray);
+            grid->UpdateDataPtr("surfaceTemperature", temperatureWall);
+        }
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+        int nBCRegion = structBCSet->GetnBCRegion();
+        int indexOfWall = 0;
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+            int nBCType = structBC->GetBCType();
+
+            if (!IsWall(nBCType) && nBCType != PHENGLEI::ABLATION_SURFACE)
+            {
+                continue;
+            }
+
+            if (wallMultiTemperature == 1)
+            {
+                Data_Param *bcParamDB = structBC->GetBCParamDataBase();
+
+                if (bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+                {
+                    bcParamDB->GetData("wallTemperature", &Twall, PHDOUBLE, 1);
+                }
+                else
+                {
+                    Twall = parameters->GetWallTemperature();
+                }
+                refT = Twall / refTemperature;
+            }
+
+            if (Twall <= EPSILON)
+            {
+                refT = 1.0; //! Radiation equilibrium temperature wall.
+            }
+
+            //! Initialization with the wall temperature.
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                (*temperatureWall)(indexOfWall, iCell) = refT;
+            }
+            ++ indexOfWall;
+        }
+    }
+
+    //! Set surface mass fractions of species.
+    RDouble initMassFraction[MAX_SPECIES_NUM] = { 0 };
+    int nChemical = parameters->GetChemicalFlag();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+    int nNSEquation = parameters->GetNSEquationNumber();
+
+    if (nChemical > 0 && nSpeciesNumber > 0)
+    {
+        int nIndexOfElectron = parameters->GetIndexOfElectron();
+        if (nIndexOfElectron >= 0)
+        {
+            this->nIonizationFlag = 1;
+        }
+
+        RDouble *fcwMassFraction = parameters->GetFullyCatalyticMassFraction();
+        for (int s = 0; s < nSpeciesNumber; ++ s)
+        {
+            initMassFraction[s] = fcwMassFraction[s];
+        }
+
+        RDouble catalyticCoef = parameters->GetCatalyticCoef();
+        if (ABS(catalyticCoef) <= EPSILON) //! Initialization of the initial mass fraction of species.
+        {
+            RDouble *primitiveVar = parameters->GetPrimitiveVarFarfield();
+            for (int s = 0; s < nSpeciesNumber; ++ s)
+            {
+                initMassFraction[s] = primitiveVar[nNSEquation + s];
+            }
+        }
+
+        RDouble3D *surfaceMassFraction = NULL;
+        if (nWallBC > 0)
+        {
+            surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+            if (surfaceMassFraction == NULL)
+            {
+                surfaceMassFraction = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, nSpeciesNumber - 1), fortranArray);
+                grid->UpdateDataPtr("surfaceMassFraction", surfaceMassFraction);
+            }
+        }
+
+        for (int iWall = 0; iWall < nWallBC; ++ iWall)
+        {
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                for (int s = 0; s < nSpeciesNumber; ++ s)
+                {
+                    (*surfaceMassFraction)(iWall, iCell, s) = initMassFraction[s];
+                }
+            }
+        }
+    }
+
+    //! Set surface slip parameters.
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    if (nSlipBCModel > 0)
+    {
+        //! The array includes variables such as slip temperatures(Tts, Tvs, Tes), slip velocity(Vx, Vy, Vz) and slip mass fractions of species.
+        int nSlipVar = nSpeciesNumber + 6;
+        RDouble3D *surfaceSlipVariables = NULL;
+        if (nWallBC > 0)
+        {
+            surfaceSlipVariables = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+            if (surfaceSlipVariables == NULL)
+            {
+                surfaceSlipVariables = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, nSlipVar - 1), fortranArray);
+                grid->UpdateDataPtr("surfaceSlipVariables", surfaceSlipVariables);
+            }
+        }
+            
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+        int nBCRegion = structBCSet->GetnBCRegion();
+        int indexOfWall = 0;
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+            int nBCType = structBC->GetBCType();
+
+            if (!IsWall(nBCType) && nBCType != PHENGLEI::ABLATION_SURFACE)
+            {
+                continue;
+            }
+
+            if (wallMultiTemperature == 1)
+            {
+                Data_Param *bcParamDB = structBC->GetBCParamDataBase();
+                if (bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+                {
+                    bcParamDB->GetData("wallTemperature", &Twall, PHDOUBLE, 1);
+                }
+                else
+                {
+                    Twall = parameters->GetWallTemperature();
+                }
+                refT = Twall / refTemperature;
+            }
+
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                (*surfaceSlipVariables)(indexOfWall, iCell, 0) = refT; //! Temperature.
+                (*surfaceSlipVariables)(indexOfWall, iCell, 1) = refT;
+                (*surfaceSlipVariables)(indexOfWall, iCell, 2) = refT;
+                (*surfaceSlipVariables)(indexOfWall, iCell, 3) = 0.0; //! Velocity.
+                (*surfaceSlipVariables)(indexOfWall, iCell, 4) = 0.0;
+                (*surfaceSlipVariables)(indexOfWall, iCell, 5) = 0.0;
+                for (int s = 6; s < nSlipVar; ++ s) //! Species mass fractions.
+                {
+                    (*surfaceSlipVariables)(indexOfWall, iCell, s) = initMassFraction[s - 6];
+                }
+            }
+            ++ indexOfWall;
+        }
+    }
+}
+
+void NCCRSolverStruct::InitializeSurfaceParametersFromFile(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble refTemperature = parameters->GetRefDimensionalTemperature();
+
+    //! Obtain the number of boundary condition regions.
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int nIndexOfWall = 0, nIndexOfCell = 0;
+
+    RDouble2D *temperatureWall = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!IsWall(BCType) && BCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        RDouble3D *wallTempArray;
+        if (structBC->CheckFieldData("wallTempArray"))
+        {
+            wallTempArray = reinterpret_cast <RDouble3D *> (structBC->GetFieldDataPtr("wallTempArray"));
+        }
+        else
+        {
+            continue;
+        }
+
+        //! The following are surface boundary codes.
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        nIndexOfCell = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*temperatureWall)(nIndexOfWall, nIndexOfCell) = (*wallTempArray)(i, j, k) / refTemperature;
+
+                    ++ nIndexOfCell; //! Next grid cell.
+                }
+            }
+        }
+
+
+
+
+
+        ++ nIndexOfWall; //! Next wall boundary.
+    }
+}
+
+void NCCRSolverStruct::ChangeSurfaceTemperature(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    //! Set surface temperatures.
+    RDouble Twall = parameters->GetWallTemperature();
+    RDouble refTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble refT = Twall / refTemperature;
+    if (nWallBC > 0)
+    {
+        if (Twall <= EPSILON)
+        {
+            refT = 1.0; //! Radiation equilibrium temperature wall.
+        }
+
+        RDouble2D *temperatureWall = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+
+        //! Initialization with the freestream temperature.
+        for (int iWall = 0; iWall < nWallBC; ++ iWall)
+        {
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                (*temperatureWall)(iWall, iCell) = refT;
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::ChangeSurfaceMassFractions(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    //! Set surface mass fractions of species.
+    RDouble initMassFraction[MAX_SPECIES_NUM];
+    int nChemical = parameters->GetChemicalFlag();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+    int nNSEquation = parameters->GetNSEquationNumber();
+
+    if (nChemical > 0 && nSpeciesNumber > 0)
+    {
+        RDouble *fcwMassFraction = parameters->GetFullyCatalyticMassFraction();
+        for (int s = 0; s < nSpeciesNumber; ++ s)
+        {
+            initMassFraction[s] = fcwMassFraction[s];
+        }
+
+        RDouble catalyticCoef = parameters->GetCatalyticCoef();
+        if (ABS(catalyticCoef) <= EPSILON) //! Initialization of the initial mass fraction of species.
+        {
+            RDouble *primitiveVar = parameters->GetPrimitiveVarFarfield();
+            for (int s = 0; s < nSpeciesNumber; ++ s)
+            {
+                initMassFraction[s] = primitiveVar[nNSEquation + s];
+            }
+        }
+
+        RDouble3D *surfaceMassFraction = NULL;
+        if (nWallBC > 0)
+        {
+            surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+        }
+
+        for (int iWall = 0; iWall < nWallBC; ++ iWall)
+        {
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                for (int s = 0; s < nSpeciesNumber; ++ s)
+                {
+                    (*surfaceMassFraction)(iWall, iCell, s) = initMassFraction[s];
+                }
+            }
+        }
+    }
+}
+
+bool NCCRSolverStruct::JudgeIfRestart()
+{
+    string restartNSFile = ".\results\flow.dat";
+    GlobalDataBase::GetData("restartNSFile", &restartNSFile, PHSTRING, 1);
+
+    if (PHMPI::IsParallelRun())
+    {
+        restartNSFile = PHSPACE::AddSymbolToFileName(restartNSFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(restartNSFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+bool NCCRSolverStruct::JudgeIfProtectedRestart()
+{
+    string protectionFile0 = "./results/flow0.dat";
+    GlobalDataBase::GetData("protectionFile0", &protectionFile0, PHSTRING, 1);
+    if (PHMPI::IsParallelRun())
+    {
+        protectionFile0 = PHSPACE::AddSymbolToFileName(protectionFile0, "_", 0);
+    }
+
+    string protectionFile1 = "./results/flow1.dat";
+    GlobalDataBase::GetData("protectionFile1", &protectionFile1, PHSTRING, 1);
+    if (PHMPI::IsParallelRun())
+    {
+        protectionFile1 = PHSPACE::AddSymbolToFileName(protectionFile1, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile_0(protectionFile0.c_str(), ios::in);
+    if (infile_0)
+    {
+        restart_flag = true;
+        infile_0.close();
+        infile_0.clear();
+    }
+
+    ifstream infile_1(protectionFile1.c_str(), ios::in);
+    if (infile_1)
+    {
+        restart_flag = true;
+        infile_1.close();
+        infile_1.clear();
+    }
+
+    return restart_flag;
+}
+
+bool NCCRSolverStruct::JudgeIfReadAverage()
+{
+    string restartNSFile = ".\results\flow.dat";
+    GlobalDataBase::GetData("restartNSFile", &restartNSFile, PHSTRING, 1);
+    string averageFlowFile = AddSymbolToFileName(restartNSFile, "_", "Average");
+
+    if (PHMPI::IsParallelRun())
+    {
+        averageFlowFile = PHSPACE::AddSymbolToFileName(averageFlowFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(averageFlowFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+void NCCRSolverStruct::DumpRestart(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nEquation = GetNumberOfEquations();
+
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    DataContainer *restartData = actkey->GetData();
+    restartData->moveto_begin();
+    restartData->write(&outIterStep, sizeof(int));
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    restartData->write(&q(i, j, k, m), sizeof(RDouble));
+                }
+            }
+        }
+    }
+
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    if (nChemical == 1)
+    {
+        for (int m = 0; m < nTemperatureModel; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        restartData->write(&temperatures(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        return;
+    }
+
+    RDouble physicalTime = GlobalDataBase::GetDoubleParaFromDB("physicalTime");
+    restartData->write(&physicalTime, sizeof(RDouble));
+
+    RDouble4D &qn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble4D &qn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    restartData->write(&qn1(i, j, k, m), sizeof(RDouble));
+                }
+            }
+        }
+    }
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    restartData->write(&qn2(i, j, k, m), sizeof(RDouble));
+                }
+            }
+        }
+    }
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &residualn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble4D &residualn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    restartData->write(&residual(i, j, k, m), sizeof(RDouble));
+                }
+            }
+        }
+    }
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    restartData->write(&residualn1(i, j, k, m), sizeof(RDouble));
+                }
+            }
+        }
+    }
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    restartData->write(&residualn2(i, j, k, m), sizeof(RDouble));
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::DumpRestartH5(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int currentProcessorID = GetCurrentProcessorID();
+
+    int version = 1;
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    int isWennScheme= parameters->GetWennSchemeFlag();
+    int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    if (currentProcessorID == GetServerProcessorID())
+    {
+        WriteData(actkey->filepos, &version, "Version");
+        WriteData(actkey->filepos, &outIterStep, "outnstep");
+
+        if (isUnsteady == 1)
+        {
+            RDouble physicalTime = GlobalDataBase::GetDoubleParaFromDB("physicalTime");
+            WriteData(actkey->filepos, &physicalTime, "physicalTime");
+
+            if (IsNeedStatistics())
+            {
+                int nStatisticalStep = 0;
+                GlobalDataBase::GetData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+                WriteData(actkey->filepos, &nStatisticalStep, "nStatisticalStep");
+            }
+        }
+    }
+
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    StructGrid *strGrid = StructGridCast(GetGrid(actkey->level));
+    int nTotalCell = strGrid->GetNTotalCell();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+    if (isWennScheme == 1)
+    {
+        strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, THREE_GHOST_LAYER);
+    }
+
+    int nEquation = GetNumberOfEquations();
+
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    //RFloat * primitiveVariables = &q(ist, jst, kst, mst);
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    //WriteData(grploc, primitiveVariables, "q");
+    WriteData(grploc, &primitiveVariables(iCellStart, jCellStart, kCellStart, 0), "q");
+    WriteData(grploc, &nTotalCell, "nTotalCell");
+
+    //! Dump data for surface info
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();
+    int nChemical = parameters->GetChemicalFlag();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    WriteData(grploc, &wallTemperature, "surfaceTemperatureFlag");
+    WriteData(grploc, &catalyticCoef, "catalyticCoefFlag");
+    WriteData(grploc, &nChemical, "nIsChemicalFlow");
+    WriteData(grploc, &numberOfSpecies, "numberOfSpecies");
+    WriteData(grploc, &nTemperatureModel, "nTemperatureModel");
+
+    Int1D &speciesOrder = *reinterpret_cast <Int1D *> (grid->GetDataPtr("speciesOrder"));
+    WriteData(grploc, &speciesOrder(0), "speciesNameList");
+
+    //! Dump temperatures to file.
+    //if (nChemical > 0)
+    //{
+    WriteData(grploc, &temperatures(iCellStart, jCellStart, kCellStart, mst), "t");
+    //}
+
+    if (nWallBC > 0)    //! The wall boundary condition exists.
+    {
+        //! Write the temperature on wall.
+        RDouble2D &temperatureWall = *reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+        WriteData(grploc, &temperatureWall(0, 0), "surfaceTemperature");
+
+        //! Write the mass fractions of species on wall.
+        if (nChemical > 0 && numberOfSpecies > 0)
+        {
+            RDouble3D &surfaceMassFraction = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+            WriteData(grploc, &surfaceMassFraction(0, 0, 0), "surfaceMassFraction");
+        }
+    }
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    if (nSlipBCModel > 0 && nWallBC > 0)
+    {
+        RDouble3D &surfaceParameterSlip = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+        WriteData(grploc, &surfaceParameterSlip(0, 0, 0), "surfaceSlipVariables");
+    }
+
+    if (isUnsteady)
+    {
+        RDouble4D &qn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+        WriteData(grploc, &qn1(iCellStart, jCellStart, kCellStart, mst), "q_unsteady_n1");
+
+        RDouble4D &qn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+        WriteData(grploc, &qn2(iCellStart, jCellStart, kCellStart, mst), "q_unsteady_n2");
+
+        RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+        WriteData(grploc, &residual(iCellStart, jCellStart, kCellStart, mst), "res");
+
+        RDouble4D &residualn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+        WriteData(grploc, &residualn1(iCellStart, jCellStart, kCellStart, mst), "res_unsteady_n1");
+
+        RDouble4D &residualn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+        WriteData(grploc, &residualn2(iCellStart, jCellStart, kCellStart, mst), "res_unsteady_n2");
+
+        RDouble4D &qAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage"));
+        WriteData(grploc, &qAverage(iCellStart, jCellStart, kCellStart, mst), "qAverage");
+
+        RDouble4D &tauAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("tauAverage"));
+        WriteData(grploc, &tauAverage(iCellStart, jCellStart, kCellStart, 0), "tauAverage");
+
+        RDouble4D &q2Average = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q2Average"));
+        WriteData(grploc, &q2Average(iCellStart, jCellStart, kCellStart, 0), "q2Average");
+    }
+
+    H5Gclose(grploc);
+}
+
+void NCCRSolverStruct::ReadRestartFlowH5(ActionKey *actkey)
+{
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    StructGrid *strGrid = StructGridCast(grid);
+    int nTotalCell = strGrid->GetNTotalCell();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isWennScheme= parameters->GetWennSchemeFlag();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    if (isWennScheme == 1)
+    {
+        strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, THREE_GHOST_LAYER);
+    }
+
+    int nEquation = GetNumberOfEquations();
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble4D &heatTransferCoeff = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("heatTransferCoeff"));
+    Int1D &speciesOrder = *reinterpret_cast <Int1D *> (grid->GetDataPtr("speciesOrder"));
+    heatTransferCoeff = 0.0;
+
+    int outIterStep = 0;
+    ReadData(actkey->filepos, &outIterStep, "outnstep");
+    GlobalDataBase::UpdateData("outnstep", &outIterStep, PHINT, 1);
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    int nTotalCellRestart = 0;
+    ReadData(grploc, &nTotalCellRestart, "nTotalCell");
+    if (nTotalCellRestart != nTotalCell)
+    {
+        ostringstream erroeInfo;
+        erroeInfo << " Error: the cell number in flow.dat is not equal to the cell number in grid file !" << endl;
+        TK_Exit::ExceptionExit(erroeInfo.str());
+    }
+
+    //! add the data for surface info.
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSEqn = parameters->GetNSEquationNumber();
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble preWallTemperature = wallTemperature, preCatalyticCoef = catalyticCoef;
+    int preChemical = nChemical, preTemperatureModel = nTemperatureModel, preSpeciesNumber = numberOfSpecies;
+    int isUsePreTwall = 0;
+    if (GlobalDataBase::IsExist("isUsePreTwall", PHINT, 1))
+    {
+        isUsePreTwall = GlobalDataBase::GetIntParaFromDB("isUsePreTwall");
+    }
+
+    if (CheckDataExist(grploc, "surfaceTemperatureFlag"))
+    {
+        ReadData(grploc, &preWallTemperature, "surfaceTemperatureFlag");
+    }
+    if (CheckDataExist(grploc, "catalyticCoefFlag"))
+    {
+        ReadData(grploc, &preCatalyticCoef, "catalyticCoefFlag");
+    }
+    if (CheckDataExist(grploc, "nIsChemicalFlow"))
+    {
+        ReadData(grploc, &preChemical, "nIsChemicalFlow");
+    }
+    if (CheckDataExist(grploc, "numberOfSpecies"))
+    {
+        ReadData(grploc, &preSpeciesNumber, "numberOfSpecies");
+    }
+    if (CheckDataExist(grploc, "nTemperatureModel"))
+    {
+        ReadData(grploc, &preTemperatureModel, "nTemperatureModel");
+    }
+    int nTotalNumber = 16;
+    Int1D *speciesOrder2 = new Int1D(Range(0, nTotalNumber - 1), fortranArray);
+    //! Initialization
+    for (int n = 0; n < nTotalNumber; ++ n)
+    {
+        (*speciesOrder2)(n) = speciesOrder(n);
+    }
+    if (CheckDataExist(grploc, "speciesNameList"))
+    {
+        ReadData(grploc, &(*speciesOrder2)(0), "speciesNameList");
+    }
+
+    //! Read temperatures of flowfield.
+    //if (nChemical > 0)
+    //{
+    if (CheckDataExist(grploc, "t"))
+    {
+        if (preTemperatureModel == nTemperatureModel)
+        {
+            ReadData(grploc, &temperatures(iCellStart, jCellStart, kCellStart, mst), "t");
+        }
+        else
+        {
+            RDouble4D *tmpTemperature = new RDouble4D(Range(iCellStart, iCellEnd), Range(jCellStart, jCellEnd), Range(kCellStart, kCellEnd), Range(0, preTemperatureModel - 1), fortranArray);
+            ReadData(grploc, &(*tmpTemperature)(iCellStart, jCellStart, kCellStart, mst), "t");
+            SetFlowfieldTemperature(grid, preChemical, preTemperatureModel, tmpTemperature);
+            delete tmpTemperature;
+        }
+    }
+    //}
+
+    //! Read the flowfield data.
+    if (preChemical == nChemical && preTemperatureModel == nTemperatureModel && IsEqualGasModel(&speciesOrder, speciesOrder2))
+    {
+        ReadData(grploc, &primitiveVariables(iCellStart, jCellStart, kCellStart, mst), "q");
+    }
+    else
+    {
+        int nEqn = nNSEqn + preSpeciesNumber + preTemperatureModel - 1;
+        RDouble4D *tmpVariables = new RDouble4D(Range(iCellStart, iCellEnd), Range(jCellStart, jCellEnd), Range(kCellStart, kCellEnd), Range(0, nEqn - 1), fortranArray);
+        ReadData(grploc, &(*tmpVariables)(iCellStart, jCellStart, kCellStart, mst), "q");
+        SetPrimitiveVariables(grid, preChemical, preTemperatureModel, preSpeciesNumber, speciesOrder2, tmpVariables);
+        delete tmpVariables;
+    }
+
+    if (nWallBC > 0)    //! The wall boundary condition exists.
+    {
+        //! Write the temperature on wall.
+        RDouble2D &temperatureWall = *reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+        if (CheckDataExist(grploc, "surfaceTemperature"))
+        {
+            ReadData(grploc, &temperatureWall(0, 0), "surfaceTemperature");
+            if (wallTemperature != preWallTemperature && isUsePreTwall == 0)
+            {
+                ChangeSurfaceTemperature(grid);
+            }
+        }
+
+        //! Write the mass fractions of species on wall.
+        if (nChemical > 0 && numberOfSpecies > 0)
+        {
+            RDouble3D &surfaceMassFraction = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+            if (CheckDataExist(grploc, "surfaceMassFraction"))
+            {
+                if (IsEqualGasModel(&speciesOrder, speciesOrder2))
+                {
+                    ReadData(grploc, &surfaceMassFraction(0, 0, 0), "surfaceMassFraction");
+                }
+                else
+                {
+                    RDouble3D *tmpSurfaceMassFraction = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, preSpeciesNumber - 1), fortranArray);
+                    ReadData(grploc, &(*tmpSurfaceMassFraction)(0, 0, 0), "surfaceMassFraction");
+                    SetSurfaceMassFractions(grid, preChemical, preSpeciesNumber, speciesOrder2, tmpSurfaceMassFraction);
+                    delete tmpSurfaceMassFraction;
+                }
+            }
+
+            if (catalyticCoef != preCatalyticCoef)
+            {
+                ChangeSurfaceMassFractions(grid);
+            }
+        }
+    }
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    if (nSlipBCModel > 0 && nWallBC > 0)
+    {
+        RDouble3D &surfaceParameterSlip = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+        if (CheckDataExist(grploc, "surfaceSlipVariables"))
+        {
+            if (IsEqualGasModel(&speciesOrder, speciesOrder2))
+            {
+                ReadData(grploc, &surfaceParameterSlip(0, 0, 0), "surfaceSlipVariables");
+            }
+            else
+            {
+                int nLen = 6 + preSpeciesNumber;
+                RDouble3D *tmpSurfaceSlipVar = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, nLen - 1), fortranArray);
+                ReadData(grploc, &(*tmpSurfaceSlipVar)(0, 0, 0), "surfaceSlipVariables");
+                SetSurfaceSlipVariables(grid, preChemical, preSpeciesNumber, speciesOrder2, tmpSurfaceSlipVar);
+                delete tmpSurfaceSlipVar;
+            }
+        }
+    }
+
+    //! Remove dynamic memories.
+    delete speciesOrder2;
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+        for (int m = mst; m <= med; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        residual(i, j, k, m) = 0.0;
+                    }
+                }
+            }
+        }
+
+        H5Gclose(grploc);
+        return;
+    }
+
+    RDouble4D &qn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble4D &qn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &residualn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble4D &residualn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+    RDouble4D &qAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage"));
+    RDouble4D &tauAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("tauAverage"));
+    RDouble4D &q2Average = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q2Average"));
+
+    int ifStartFromSteadyResults = parameters->GetIfStartFromSteadyResults();
+    RDouble physicalTime = 0.0;
+    if (!CheckDataExist(actkey->filepos, "physicalTime"))
+    {
+        ifStartFromSteadyResults = 1;
+    }
+
+    if (ifStartFromSteadyResults)
+    {
+        if (grid->GetGridID()->GetIndex() == 0)
+        {
+            PrintToWindow("Restart from steady NS flow field, reset outer step to be zero!\n");
+        }
+
+        //! Start from steady flow field.
+        //! Reset the outer step when start from steady flow.
+        outIterStep = 0;
+        GlobalDataBase::UpdateData("outnstep", &outIterStep, PHINT, 1);
+
+        qn1 = primitiveVariables;
+        qn2 = primitiveVariables;
+
+        residual = 0.0;
+        residualn1 = 0.0;
+        residualn2 = 0.0;
+    }
+    else
+    {
+        ReadData(actkey->filepos, &physicalTime, "physicalTime");
+
+        ReadData(grploc, &qn1(iCellStart, jCellStart, kCellStart, mst), "q_unsteady_n1");
+        ReadData(grploc, &qn2(iCellStart, jCellStart, kCellStart, mst), "q_unsteady_n2");
+        ReadData(grploc, &residual(iCellStart, jCellStart, kCellStart, mst), "res");
+        ReadData(grploc, &residualn1(iCellStart, jCellStart, kCellStart, mst), "res_unsteady_n1");
+        ReadData(grploc, &residualn2(iCellStart, jCellStart, kCellStart, mst), "res_unsteady_n2");
+    }
+
+    int nStatisticalStep = 0;
+
+    if (IsNeedStatistics())
+    {
+        if (ifStartFromSteadyResults)
+        {
+            qAverage = primitiveVariables;
+        }
+        else
+        {
+            ReadData(grploc, &qAverage(iCellStart, jCellStart, kCellStart, mst), "qAverage");
+
+            ReadData(actkey->filepos, &nStatisticalStep, "nStatisticalStep");
+        }
+    }
+
+    if (IsNeedReynoldsStressStatistics())
+    {
+        if (ifStartFromSteadyResults)
+        {
+            tauAverage = 0.0;
+
+            q2Average = 0.0;
+        }
+        else
+        {
+            ReadData(grploc, &tauAverage(iCellStart, jCellStart, kCellStart, 0), "tauAverage");
+
+            ReadData(grploc, &q2Average(iCellStart, jCellStart, kCellStart, 0), "q2Average");
+        }
+    }
+
+    GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+
+    GlobalDataBase::UpdateData("physicalTime", &physicalTime, PHDOUBLE, 1);
+
+    H5Gclose(grploc);
+}
+
+void NCCRSolverStruct::SetFlowfieldTemperature(Grid *grid, int nChemical, int nTemperatureModel, RDouble4D *primTemperature)
+{
+    StructGrid *strGrid = StructGridCast(grid);
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int curTModel = parameters->GetTemperatureModel();
+
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    if (curTModel <= nTemperatureModel) //The collection of the reading data is bigger.
+    {
+        for (int m = 0; m < curTModel; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        temperatures(i, j, k, m) = (*primTemperature)(i, j, k, m);
+                    }
+                }
+            }
+        }
+    }
+    else //! The collection of the reading data is smaller.
+    {
+        for (int m = 0; m < nTemperatureModel; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        temperatures(i, j, k, m) = (*primTemperature)(i, j, k, m);
+                    }
+                }
+            }
+        }
+
+        for (int m = nTemperatureModel; m < curTModel; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        temperatures(i, j, k, m) = (*primTemperature)(i, j, k, nTemperatureModel - 1);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::SetPrimitiveVariables(Grid *grid, int nChemical, int nTemperatureModel, int numberOfSpecies, Int1D *speciesOrder, RDouble4D *primVariables)
+{
+    StructGrid *strGrid = StructGridCast(grid);
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int curChem = parameters->GetChemicalFlag();
+    int nNSEqn = parameters->GetNSEquationNumber();
+    int curTModel = parameters->GetTemperatureModel();
+    int curNumberOfSpecies = parameters->GetNumberOfSpecies();
+
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    RDouble *fcwMassFraction = parameters->GetFullyCatalyticMassFraction();
+    Int1D &curSpeciesOrder = *reinterpret_cast <Int1D *> (grid->GetDataPtr("speciesOrder"));
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble prim[MAX_SPECIES_NUM] = { 0.0 };
+
+    //! Set the variables of density, velocityU, velocityV, velocityW, and pressure.
+    for (int m = 0; m < nNSEqn; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    primitiveVariables(i, j, k, m) = (*primVariables)(i, j, k, m);
+                }
+            }
+        }
+    }
+
+    //! Set the mass fractions of species.
+    int nIndex1, nIndex2, totalNumber = 16;
+    if (nChemical == 0) //the previous gas model is perfect gas.
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    for (int m = 0; m < curNumberOfSpecies; ++ m)
+                    {
+                        primitiveVariables(i, j, k, nNSEqn + m) = fcwMassFraction[m];
+                    }
+                }
+            }
+        }
+    }
+    else //! The previous gas model is real gas.
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    for (int m = 0; m < totalNumber; ++ m)
+                    {
+                        nIndex1 = curSpeciesOrder(m);
+                        if (nIndex1 >= 0)
+                        {
+                            nIndex2 = (*speciesOrder)(m);
+                            if (nIndex2 >= 0)
+                            {
+                                prim[nNSEqn + nIndex1] = (*primVariables)(i, j, k, nNSEqn + nIndex2);
+                            }
+                            else
+                            {
+                                //prim[nNSEqn + nIndex1] = primitiveVarFarfield[nNSEqn + nIndex1];
+                                prim[nNSEqn + nIndex1] = 0.0;
+                            }
+                        }
+                    }
+
+                    //! Normalize.
+                    if (curChem > 0)
+                    {
+                        gas->NormalizePrimitive(prim);
+                        for (int m = 0; m < curNumberOfSpecies; ++ m)
+                        {
+                            primitiveVariables(i, j, k, nNSEqn + m) = prim[nNSEqn + m];
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    //! Set the variables of vibrational energy and electron energy.
+    if (curChem > 0 && curTModel > 1)
+    {
+        nIndex1 = nNSEqn + curNumberOfSpecies;
+        nIndex2 = nNSEqn + numberOfSpecies;
+        if (nChemical == 0) //! The previous is perfect gas.
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        for (int m = 0; m < curTModel - 1; ++ m)
+                        {
+                            primitiveVariables(i, j, k, nIndex1 + m) = primitiveVarFarfield[nIndex1 + m];
+                        }
+                    }
+                }
+            }
+        }
+        else //! The previous is chemical flow.
+        {
+            if (curTModel <= nTemperatureModel) //! The collection of the reading data is bigger.
+            {
+                for (int m = 0; m < curTModel - 1; ++ m)
+                {
+                    for (int k = kCellStart; k <= kCellEnd; ++ k)
+                    {
+                        for (int j = jCellStart; j <= jCellEnd; ++ j)
+                        {
+                            for (int i = iCellStart; i <= iCellEnd; ++ i)
+                            {
+                                primitiveVariables(i, j, k, nIndex1 + m) = (*primVariables)(i, j, k, nIndex2 + m);
+                            }
+                        }
+                    }
+                }
+            }
+            else //! The collection of the reading data is smaller.
+            {
+                for (int m = 0; m < nTemperatureModel - 1; ++ m)
+                {
+                    for (int k = kCellStart; k <= kCellEnd; ++ k)
+                    {
+                        for (int j = jCellStart; j <= jCellEnd; ++ j)
+                        {
+                            for (int i = iCellStart; i <= iCellEnd; ++ i)
+                            {
+                                primitiveVariables(i, j, k, nIndex1 + m) = (*primVariables)(i, j, k, nIndex2 + m);
+                            }
+                        }
+                    }
+                }
+
+                RDouble vibEnergy = 0.0, eleEnergy = 0.0;
+                for (int k = kCellStart; k <= kCellEnd; ++ k)
+                {
+                    for (int j = jCellStart; j <= jCellEnd; ++ j)
+                    {
+                        for (int i = iCellStart; i <= iCellEnd; ++ i)
+                        {
+                            for (int m = 0; m < curNumberOfSpecies; ++ m)
+                            {
+                                prim[m] = primitiveVariables(i, j, k, nNSEqn + m);
+                            }
+                            RDouble temperature = temperatures(i, j, k, nTemperatureModel - 1);
+                            if (temperature <= 0.0)
+                            {
+                                temperature = 1.0;
+                            }
+                            vibEnergy = gas->GetMixedGasVibrationEnergy(temperature, prim);
+                            eleEnergy = gas->GetMixedGasElectronEnergy(temperature, prim);
+
+                            if (nTemperatureModel == 1)
+                            {
+                                if (curTModel == 2)
+                                {
+                                    primitiveVariables(i, j, k, nIndex1) = vibEnergy + eleEnergy;
+                                }
+                                else if (curTModel == 3)
+                                {
+                                    primitiveVariables(i, j, k, nIndex1) = vibEnergy;
+                                    primitiveVariables(i, j, k, nIndex1 + 1) = eleEnergy;
+                                }
+                            }
+                            else if (nTemperatureModel == 2)
+                            {
+                                if (curTModel == 3)
+                                {
+                                    primitiveVariables(i, j, k, nIndex1 + 1) = eleEnergy;
+                                }
+                            }
+                        }
+                    }
+                }
+                //! The collection of the reading data is bigger.
+            }
+            //! The previous is chemical flow.
+        }
+        //! Set vibrational energy and electron energy.
+    }
+}
+
+void NCCRSolverStruct::SetSurfaceMassFractions(Grid *grid, int nChemical, int numberOfSpecies, Int1D *speciesOrder, RDouble3D *primMassFractions)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEqn = parameters->GetNSEquationNumber();
+    int curNumberOfSpecies = parameters->GetNumberOfSpecies();
+    RDouble catalytic = parameters->GetCatalyticCoef();
+
+    RDouble *fcwMassFraction = parameters->GetFullyCatalyticMassFraction();
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    Int1D &curSpeciesOrder = *reinterpret_cast <Int1D *> (grid->GetDataPtr("speciesOrder"));
+    RDouble3D &surfaceMassFraction = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+    RDouble prim[MAX_SPECIES_NUM] = { 0.0 };
+
+    //! Set the mass fractions of species.
+    if (fabs(catalytic - 1.0) <= EPSILON) //! Fully catalytic wall condition.
+    {
+        for (int iWall = 0; iWall < nWallBC; ++ iWall)
+        {
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                for (int m = 0; m < curNumberOfSpecies; ++ m)
+                {
+                    surfaceMassFraction(iWall, iCell, m) = fcwMassFraction[m];
+                }
+            }
+        }
+    }
+    else if (fabs(catalytic) <= EPSILON) //! Non-catalytic wall condition.
+    {
+        for (int iWall = 0; iWall < nWallBC; ++ iWall)
+        {
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                for (int m = 0; m < curNumberOfSpecies; ++ m)
+                {
+                    surfaceMassFraction(iWall, iCell, m) = primitiveVarFarfield[nNSEqn + m];
+                }
+            }
+        }
+    }
+    else //! Partial catalytic wall condition.
+    {
+        int nIndex1, nIndex2, totalNumber = 16;
+        for (int iWall = 0; iWall < nWallBC; ++ iWall)
+        {
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                for (int m = 0; m < totalNumber; ++ m)
+                {
+                    nIndex1 = curSpeciesOrder(m);
+                    if (nIndex1 >= 0)
+                    {
+                        nIndex2 = (*speciesOrder)(m);
+                        if (nIndex2 >= 0)
+                        {
+                            prim[nNSEqn + nIndex1] = (*primMassFractions)(iWall, iCell, nIndex2);
+                        }
+                        else
+                        {
+                            prim[nNSEqn + nIndex1] = 0.0;
+                        }
+                    }
+                }
+
+                //! Normalize.
+                gas->NormalizePrimitive(prim);
+                for (int m = 0; m < curNumberOfSpecies; ++ m)
+                {
+                    surfaceMassFraction(iWall, iCell, m) = prim[nNSEqn + m];
+                }
+
+            }
+        }
+        //! Partial catalytic wall condition.
+    }
+}
+
+void NCCRSolverStruct::SetSurfaceSlipVariables(Grid *grid, int nChemical, int numberOfSpecies, Int1D *speciesOrder, RDouble3D *primSlipVar)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int curChem = parameters->GetChemicalFlag();
+    int nNSEqn = parameters->GetNSEquationNumber();
+    int curNumberOfSpecies = parameters->GetNumberOfSpecies();
+
+    Int1D &curSpeciesOrder = *reinterpret_cast <Int1D *> (grid->GetDataPtr("speciesOrder"));
+    RDouble3D &surfaceParameterSlip = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+    RDouble3D &surfaceMassFraction = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+    RDouble prim[MAX_SPECIES_NUM] = { 0.0 };
+
+    //! Set the temperature and velocity.
+    int nIndex1, nIndex2, totalNumber = 6;
+    for (int iWall = 0; iWall < nWallBC; ++ iWall)
+    {
+        for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+        {
+            for (int m = 0; m < totalNumber; ++ m)
+            {
+                surfaceParameterSlip(iWall, iCell, m) = (*primSlipVar)(iWall, iCell, m);
+            }
+        }
+    }
+
+    //! Set the mass fractions.
+    if (curChem > 0)
+    {
+        totalNumber = 16;
+        for (int iWall = 0; iWall < nWallBC; ++ iWall)
+        {
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                for (int m = 0; m < totalNumber; ++ m)
+                {
+                    nIndex1 = curSpeciesOrder(m);
+                    if (nIndex1 >= 0)
+                    {
+                        nIndex2 = (*speciesOrder)(m);
+                        if (nIndex2 >= 0)
+                        {
+                            prim[nNSEqn + nIndex1] = (*primSlipVar)(iWall, iCell, nIndex2 + 6);
+                        }
+                        else
+                        {
+                            prim[nNSEqn + nIndex1] = surfaceMassFraction(iWall, iCell, nIndex1);
+                        }
+                    }
+                }
+
+                //! Normalize.
+                gas->NormalizePrimitive(prim);
+                for (int m = 0; m < curNumberOfSpecies; ++ m)
+                {
+                    surfaceParameterSlip(iWall, iCell, m + 6) = prim[nNSEqn + m];
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::ReadPrefectGasRestartH5(ActionKey *actkey)
+{
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    StructGrid *strGrid = StructGridCast(GetGrid(actkey->level));
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nEquation = GetNumberOfEquations();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    Range M(0, nNSEquation - 1);
+    int mst = M.first();
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    int outIterStep = 0;
+    ReadData(actkey->filepos, &outIterStep, "outnstep");
+    GlobalDataBase::UpdateData("outnstep", &outIterStep, PHINT, 1);
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    ReadData(grploc, &primitiveVariables(iCellStart, jCellStart, kCellStart, mst), "q");
+
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    Range N(nNSEquation, nEquation - 1);
+    int nst = N.first();
+    int ned = N.last();
+
+    for (int n = nst; n <= ned; ++ n)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    primitiveVariables(i, j, k, n) = primitiveVarFarfield[n];
+                }
+            }
+        }
+    }
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    Range I, J, K;
+    GetRange(I, J, K, iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd);
+    residual(I, J, K, M) = 0.0;
+    residual(I, J, K, N) = 0.0;
+
+    H5Gclose(grploc);
+
+    //! The unsteady flow is not considered here.
+    //int isUnsteady = parameters->GetIsUnsteady();
+}
+
+void NCCRSolverStruct::ReadRestartH5(ActionKey *actkey)
+{
+    int ifStartFromPerfectGasResults = GlobalDataBase::GetIntParaFromDB("ifStartFromPerfectGasResults");
+    int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nChemical && ifStartFromPerfectGasResults)
+    {
+        ReadPrefectGasRestartH5(actkey);
+        return;
+    }
+
+    int nContinueModel = 0;
+    if (GlobalDataBase::IsExist("nContinueModel", PHINT, 1))
+    {
+        nContinueModel = GlobalDataBase::GetIntParaFromDB("nContinueModel");
+    }
+    if (nContinueModel == 1)
+    {
+        ReadRestartFlowH5(actkey);
+        return;
+    }
+
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    StructGrid *strGrid = StructGridCast(GetGrid(actkey->level));
+    int nTotalCell = strGrid->GetNTotalCell();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isWennScheme= parameters->GetWennSchemeFlag();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    if (isWennScheme == 1)
+    {
+        strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, THREE_GHOST_LAYER);
+    }
+
+    int nEquation = GetNumberOfEquations();
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    int outIterStep = 0;
+    ReadData(actkey->filepos, &outIterStep, "outnstep");
+    GlobalDataBase::UpdateData("outnstep", &outIterStep, PHINT, 1);
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    int nTotalCellRestart = 0;
+    ReadData(grploc, &nTotalCellRestart, "nTotalCell");
+    if (nTotalCellRestart != nTotalCell)
+    {
+        ostringstream erroeInfo;
+        erroeInfo << " Error: the cell number in flow.dat is not equal to the cell number in grid file !" << endl;
+        TK_Exit::ExceptionExit(erroeInfo.str());
+    }
+
+    //! Read the flowfield data.
+    ReadData(grploc, &primitiveVariables(iCellStart, jCellStart, kCellStart, mst), "q");
+
+    //! add the data for surface info.
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble preWallTemperature = wallTemperature, preCatalyticCoef = catalyticCoef;
+    int preChemical = nChemical, preTemperatureModel = nTemperatureModel, preSpeciesNumber = numberOfSpecies;
+
+    if (CheckDataExist(grploc, "surfaceTemperatureFlag"))
+    {
+        ReadData(grploc, &preWallTemperature, "surfaceTemperatureFlag");
+    }
+    if (CheckDataExist(grploc, "catalyticCoefFlag"))
+    {
+        ReadData(grploc, &preCatalyticCoef, "catalyticCoefFlag");
+    }
+    if (CheckDataExist(grploc, "nIsChemicalFlow"))
+    {
+        ReadData(grploc, &preChemical, "nIsChemicalFlow");
+    }
+    if (CheckDataExist(grploc, "numberOfSpecies"))
+    {
+        ReadData(grploc, &preSpeciesNumber, "numberOfSpecies");
+    }
+    if (CheckDataExist(grploc, "nTemperatureModel"))
+    {
+        ReadData(grploc, &preTemperatureModel, "nTemperatureModel");
+    }
+
+    //! Read temperatures.
+    //if (nChemical > 0)
+    //{
+    if (CheckDataExist(grploc, "t"))
+    {
+        ReadData(grploc, &temperatures(iCellStart, jCellStart, kCellStart, mst), "t");
+    }
+    //}
+    if (nWallBC > 0)    //! The wall boundary condition exists.
+    {
+        //! Write the temperature on wall.
+        RDouble2D &temperatureWall = *reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+        if (CheckDataExist(grploc, "surfaceTemperature"))
+        {
+            ReadData(grploc, &temperatureWall(0, 0), "surfaceTemperature");
+            if (wallTemperature != preWallTemperature)
+            {
+                ChangeSurfaceTemperature(grid);
+            }
+        }
+
+        //! Write the mass fractions of species on wall.
+        if (nChemical > 0 && numberOfSpecies > 0)
+        {
+            RDouble3D &surfaceMassFraction = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+            if (CheckDataExist(grploc, "surfaceMassFraction"))
+            {
+                ReadData(grploc, &surfaceMassFraction(0, 0, 0), "surfaceMassFraction");
+            }
+
+            if (catalyticCoef != preCatalyticCoef)
+            {
+                ChangeSurfaceMassFractions(grid);
+            }
+        }
+    }
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    if (nSlipBCModel > 0 && nWallBC > 0)
+    {
+        RDouble3D &surfaceParameterSlip = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+        if (CheckDataExist(grploc, "surfaceSlipVariables"))
+        {
+            ReadData(grploc, &surfaceParameterSlip(0, 0, 0), "surfaceSlipVariables");
+        }
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+        for (int m = mst; m <= med; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        residual(i, j, k, m) = 0.0;
+                    }
+                }
+            }
+        }
+
+        H5Gclose(grploc);
+        return;
+    }
+
+    RDouble4D &qn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble4D &qn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &residualn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble4D &residualn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+    RDouble4D &qAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage"));
+    RDouble4D &tauAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("tauAverage"));
+    RDouble4D &q2Average = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q2Average"));
+
+    int ifStartFromSteadyResults = parameters->GetIfStartFromSteadyResults();
+    RDouble physicalTime = 0.0;
+
+    if (ifStartFromSteadyResults)
+    {
+        if (grid->GetGridID()->GetIndex() == 0)
+        {
+            PrintToWindow("Restart from steady NS flow field, reset outer step to be zero!\n");
+        }
+
+        //! Start from steady flow field.
+        //! Reset the outer step when start from steady flow.
+        outIterStep = 0;
+        GlobalDataBase::UpdateData("outnstep", &outIterStep, PHINT, 1);
+
+        qn1 = primitiveVariables;
+        qn2 = primitiveVariables;
+
+        residual = 0.0;
+        residualn1 = 0.0;
+        residualn2 = 0.0;
+    }
+    else
+    {
+        ReadData(actkey->filepos, &physicalTime, "physicalTime");
+
+        ReadData(grploc, &qn1(iCellStart, jCellStart, kCellStart, mst), "q_unsteady_n1");
+        ReadData(grploc, &qn2(iCellStart, jCellStart, kCellStart, mst), "q_unsteady_n2");
+        ReadData(grploc, &residual(iCellStart, jCellStart, kCellStart, mst), "res");
+        ReadData(grploc, &residualn1(iCellStart, jCellStart, kCellStart, mst), "res_unsteady_n1");
+        ReadData(grploc, &residualn2(iCellStart, jCellStart, kCellStart, mst), "res_unsteady_n2");
+    }
+
+    int nStatisticalStep = 0;
+
+    if (IsNeedStatistics())
+    {
+        if (ifStartFromSteadyResults)
+        {
+            qAverage = primitiveVariables;
+        }
+        else
+        {
+            ReadData(grploc, &qAverage(iCellStart, jCellStart, kCellStart, mst), "qAverage");
+
+            ReadData(actkey->filepos, &nStatisticalStep, "nStatisticalStep");
+        }
+    }
+
+    if (IsNeedReynoldsStressStatistics())
+    {
+        if (ifStartFromSteadyResults)
+        {
+            tauAverage = 0.0;
+
+            q2Average = 0.0;
+        }
+        else
+        {
+            ReadData(grploc, &tauAverage(iCellStart, jCellStart, kCellStart, 0), "tauAverage");
+
+            ReadData(grploc, &q2Average(iCellStart, jCellStart, kCellStart, 0), "q2Average");
+        }
+    }
+
+    GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+
+    GlobalDataBase::UpdateData("physicalTime", &physicalTime, PHDOUBLE, 1);
+
+    H5Gclose(grploc);
+}
+
+void NCCRSolverStruct::ReadRestart(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nEquation = GetNumberOfEquations();
+
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    DataContainer *restartData = actkey->GetData();
+    restartData->moveto_begin();
+
+    int outputStepInterval = 0;
+    restartData->read(&outputStepInterval, sizeof(int));
+    GlobalDataBase::UpdateData("outnstep", &outputStepInterval, PHINT, 1);
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    restartData->read(&q(i, j, k, m), sizeof(RDouble));
+                }
+            }
+        }
+    }
+
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    if (nChemical == 1)
+    {
+        for (int m = 0; m < nTemperatureModel; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        restartData->read(&temperatures(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+        for (int m = mst; m <= med; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        residual(i, j, k, m) = 0.0;
+                    }
+                }
+            }
+        }
+        return;
+    }
+
+    RDouble4D &qn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble4D &qn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &residualn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble4D &residualn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+
+    int ifStartFromSteadyResults = parameters->GetIfStartFromSteadyResults();
+
+    RDouble physicalTime = 0.0;
+
+    if (ifStartFromSteadyResults)
+    {
+        if (grid->GetGridID()->GetIndex() == 0)
+        {
+            PrintToWindow("Restart from steady NS flow field, reset outer step to be zero!\n");
+        }
+
+        //! Start from steady flow field.
+        //! Reset the outer step when start from steady flow.
+        outputStepInterval = 0;
+        GlobalDataBase::UpdateData("outnstep", &outputStepInterval, PHINT, 1);
+
+        qn1 = q;
+        qn2 = q;
+
+        residual = 0.0;
+        residualn1 = 0.0;
+        residualn2 = 0.0;
+    }
+    else
+    {
+        //! Start from unsteady flow field.
+        restartData->read(&physicalTime, sizeof(RDouble));
+
+        for (int m = mst; m <= med; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        restartData->read(&qn1(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+
+        for (int m = mst; m <= med; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        restartData->read(&qn2(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+
+        for (int m = mst; m <= med; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        restartData->read(&residual(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+
+        for (int m = mst; m <= med; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        restartData->read(&residualn1(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+
+        for (int m = mst; m <= med; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        restartData->read(&residualn2(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+    }
+
+    GlobalDataBase::UpdateData("physicalTime", &physicalTime, PHDOUBLE, 1);
+}
+
+void NCCRSolverStruct::AirForceCoef(ActionKey *actkey)
+{
+    const int ALL_PART = -1;
+    AirForceCoefParts(actkey, ALL_PART);
+
+    int coordinate = LocalCoordinate;
+    uint_t nTotalBC = GlobalBoundaryCondition::GetNumberOfBC();
+    for (int iPart = 0; iPart < nTotalBC; ++ iPart)
+    {
+        if ((!GlobalBoundaryCondition::IsSolidWallBC(iPart)) && ((GlobalBoundaryCondition::GetBC(iPart)->GetBCType() != PHENGLEI::ABLATION_SURFACE)))
+        {
+            continue;
+        }
+
+        //! Compute local part force.
+        AirForceCoefParts(actkey, iPart, coordinate);
+
+        //! Compute global part force.
+        AirForceCoefParts(actkey, iPart);
+    }
+}
+
+void NCCRSolverStruct::AirForceCoefParts(ActionKey *actkey, int partID, int coordinate)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int viscousType = parameters->GetViscousType();
+
+    const int ALL_PART = -1;
+    SimpleBC *boundaryCondition = NULL;
+    string partBCName = "";
+    RDouble TorqueRefX = 0.0, TorqueRefY = 0.0, TorqueRefZ = 0.0;
+
+    //! Compute hinge moment.
+    int dumpHingeMoment = 0;
+    RDouble localCoordAxis0[3] = { 0 };
+    RDouble localCoordAxis1[3] = { 0 };
+
+    if (partID == ALL_PART)
+    {
+        TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+        TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+        TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+    }
+    else if ((partID != ALL_PART) && (coordinate == GlobalCoordinate))
+    {
+        boundaryCondition = GlobalBoundaryCondition::GetBC(partID);
+        partBCName = boundaryCondition->GetBCName();
+
+        TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+        TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+        TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+    }
+    else if ((partID != ALL_PART) && (coordinate == LocalCoordinate))
+    {
+        boundaryCondition = GlobalBoundaryCondition::GetBC(partID);
+        partBCName = boundaryCondition->GetBCName();
+        boundaryCondition->GetParamData("TorqueRefX", &TorqueRefX, PHDOUBLE, 1);
+        boundaryCondition->GetParamData("TorqueRefY", &TorqueRefY, PHDOUBLE, 1);
+        boundaryCondition->GetParamData("TorqueRefZ", &TorqueRefZ, PHDOUBLE, 1);
+       
+
+        boundaryCondition->GetParamData("dumpHingeMoment", &dumpHingeMoment, PHINT, 1);
+        boundaryCondition->GetParamData("localCoordAxis0", localCoordAxis0, PHDOUBLE, 3);
+        boundaryCondition->GetParamData("localCoordAxis1", localCoordAxis1, PHDOUBLE, 3);
+    }
+
+    using namespace IDX;
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    RDouble pressureFarfield = primitiveVarFarfield[IP];
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+    RDouble3D &vol = *(grid->GetCellVolume());
+
+    RDouble cpx = 0.0;
+    RDouble cpy = 0.0;
+    RDouble cpz = 0.0;
+    RDouble hingeMoment = 0.0;
+
+    RDouble CA_f = 0.0;
+    RDouble CA_p = 0.0;
+    RDouble CN_f = 0.0;
+    RDouble CN_p = 0.0;
+    RDouble CZ_f = 0.0;
+    RDouble CZ_p = 0.0;
+    RDouble Cl_f = 0.0;
+    RDouble Cl_p = 0.0;
+    RDouble Cn_f = 0.0;
+    RDouble Cn_p = 0.0;
+    RDouble Cm_f = 0.0;
+    RDouble Cm_p = 0.0;
+
+    int ndim = GetDim();
+
+    using namespace IDX;
+
+    int ix = 0;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcRegion = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = bcRegion->GetBCType();
+
+        int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+        bcRegion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        bool isNeedComputeAirForce = (BCType == PHENGLEI::SOLID_SURFACE || BCType == PHENGLEI::ABLATION_SURFACE);
+        if (isNeedComputeAirForce && partID != ALL_PART)
+        {
+            const string &bcName = bcRegion->GetBCName();
+            isNeedComputeAirForce = isNeedComputeAirForce && (bcName == partBCName);
+        }
+
+        if (!isNeedComputeAirForce)
+        {
+            ix += (ied - ist + 1) * (jed - jst + 1) * (ked - kst + 1);
+            continue;
+        }
+
+        int *s_lr3d = bcRegion->GetFaceDirectionIndex();
+        int nSurface = bcRegion->GetFaceDirection() + 1;
+        int leftOrRightIndex = bcRegion->GetFaceLeftOrRightIndex();
+
+        int iWall = 0, jWall = 0, kWall = 0;
+
+        RDouble dfx = 0, dfy = 0, dfz = 0, dpx = 0, dpy = 0, dpz = 0;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! i, j, k - is first cell index near SOLID_SURFACE.
+                    bcRegion->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                    //! The surface direction of SOLID_SURFACE.
+                    RDouble nx = leftOrRightIndex * xfv(iWall, jWall, kWall, nSurface);
+                    RDouble ny = leftOrRightIndex * yfv(iWall, jWall, kWall, nSurface);
+                    RDouble nz = leftOrRightIndex * zfv(iWall, jWall, kWall, nSurface);
+
+                    //! The index of  first ghost cell layer near SOLID_SURFACE.
+                    int iCellGhostLayer = i + s_lr3d[0];
+                    int jCellGhostLayer = j + s_lr3d[1];
+                    int kCellGhostLayer = k + s_lr3d[2];
+
+                    RDouble pCellfirstLayer = primitiveVars(i, j, k, IP);
+
+                    RDouble pressureWall = pCellfirstLayer;
+                    RDouble pressureCoef = two * (pressureWall - pressureFarfield);
+
+                    dpx = nx * pressureCoef;
+                    dpy = ny * pressureCoef;
+                    dpz = nz * pressureCoef;
+
+                    CA_p += dpx;
+                    CN_p += dpy;
+                    CZ_p += dpz;
+
+                    dfx = dpx;
+                    dfy = dpy;
+                    dfz = dpz;
+
+                    RDouble xc = 0, yc = 0, zc = 0;
+                    grid->FaceCoor(iWall, jWall, kWall, nSurface, xc, yc, zc);
+
+                    RDouble visLaminar = 0, visTurbulence = 0;
+                    RDouble dudx = 0, dudy = 0, dudz = 0, dvdx = 0, dvdy = 0, dvdz = 0, dwdx = 0, dwdy = 0, dwdz = 0;
+                    if (viscousType > INVISCID)
+                    {
+                        Geometry3D *geometry3D = new Geometry3D;
+
+                        if (nSurface == 1)
+                        {
+                            //! Get i-th face vector on the wall surface.
+                            Get_GEO_I(i, j, k, iWall, iWall, ndim, geometry3D, xfv, yfv, zfv, vol);
+                            //! Get derivative to the wall in i-direction of u,v,w.
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, ndim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, ndim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, ndim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(iCellGhostLayer, j, k));
+                            visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(iCellGhostLayer, j, k));
+                        }
+                        else if (nSurface == 2)
+                        {
+                            //! Get j-th face vector on the wall surface.
+                            Get_GEO_J(i, j, k, jWall, jWall, ndim, geometry3D, xfv, yfv, zfv, vol);
+                            //! Get derivative to the wall in j-direction of u,v,w.
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, ndim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, ndim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, ndim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, jCellGhostLayer, k));
+                            visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, jCellGhostLayer, k));
+                        }
+                        else
+                        {
+                            //! Get k-th face vector on the wall surface.
+                            Get_GEO_K(i, j, k, kWall, kWall, geometry3D, xfv, yfv, zfv, vol);
+                            //! Get derivative to the wall in k-direction of u,v,w.
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, j, kCellGhostLayer));
+                            visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, j, kCellGhostLayer));
+                        }
+
+                        //! It is unnecessary to consider because the turbulence viscosity coefficient is 0.
+                        //visTurbulence = 0.0;
+                        RDouble viscousCoef = visLaminar + visTurbulence;
+
+                        RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+                        //! Stress components.
+                        RDouble txx = viscousCoef * (two * dudx - divv2p3);
+                        RDouble tyy = viscousCoef * (two * dvdy - divv2p3);
+                        RDouble tzz = viscousCoef * (two * dwdz - divv2p3);
+                        RDouble txy = viscousCoef * (dudy + dvdx);
+                        RDouble txz = viscousCoef * (dudz + dwdx);
+                        RDouble tyz = viscousCoef * (dvdz + dwdy);
+
+                        RDouble fvsx = -two * (nx * txx + ny * txy + nz * txz) * oRefReNumber;
+                        RDouble fvsy = -two * (nx * txy + ny * tyy + nz * tyz) * oRefReNumber;
+                        RDouble fvsz = -two * (nx * txz + ny * tyz + nz * tzz) * oRefReNumber;
+
+                        dfx += fvsx;
+                        dfy += fvsy;
+                        dfz += fvsz;
+
+                        CA_f += fvsx;
+                        CN_f += fvsy;
+                        CZ_f += fvsz;
+
+                        Cl_f += (yc - TorqueRefY) * fvsz - (zc - TorqueRefZ) * fvsy;
+                        Cn_f += (zc - TorqueRefZ) * fvsx - (xc - TorqueRefX) * fvsz;
+                        Cm_f += (xc - TorqueRefX) * fvsy - (yc - TorqueRefY) * fvsx;
+
+                        delete geometry3D;
+                    }
+
+                    Cl_p += (yc - TorqueRefY) * dpz - (zc - TorqueRefZ) * dpy;
+                    Cn_p += (zc - TorqueRefZ) * dpx - (xc - TorqueRefX) * dpz;
+                    Cm_p += (xc - TorqueRefX) * dpy - (yc - TorqueRefY) * dpx;
+
+                    cpx += dpx;
+                    cpy += dpy;
+                    cpz += dpz;
+
+                    if (dumpHingeMoment)
+                    {
+                        Post_ForceMoment forceMoment;
+                        RDouble point[3] = { xc, yc, zc };
+                        RDouble faceForce[3] = { dfx, dfy, dfz };
+                        hingeMoment += forceMoment.ComputeMoment(point, localCoordAxis0, localCoordAxis1, faceForce);
+                    }
+
+                    ++ ix;
+                }
+            }
+        }
+    }
+
+    DataContainer *aerodynamicForceData = actkey->GetData();
+
+    aerodynamicForceData->write(&CA_f, sizeof(RDouble));
+    aerodynamicForceData->write(&CA_p, sizeof(RDouble));
+    aerodynamicForceData->write(&CN_f, sizeof(RDouble));
+    aerodynamicForceData->write(&CN_p, sizeof(RDouble));
+    aerodynamicForceData->write(&CZ_f, sizeof(RDouble));
+    aerodynamicForceData->write(&CZ_p, sizeof(RDouble));
+
+    aerodynamicForceData->write(&cpx, sizeof(RDouble));
+    aerodynamicForceData->write(&cpy, sizeof(RDouble));
+    aerodynamicForceData->write(&cpz, sizeof(RDouble));
+
+    aerodynamicForceData->write(&Cl_f, sizeof(RDouble));
+    aerodynamicForceData->write(&Cl_p, sizeof(RDouble));
+    aerodynamicForceData->write(&Cn_f, sizeof(RDouble));
+    aerodynamicForceData->write(&Cn_p, sizeof(RDouble));
+    aerodynamicForceData->write(&Cm_f, sizeof(RDouble));
+    aerodynamicForceData->write(&Cm_p, sizeof(RDouble));
+
+    aerodynamicForceData->write(&hingeMoment, sizeof(RDouble));
+}
+
+void NCCRSolverStruct::AirForceCoefBodies(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    RDouble4D &faceVelocityX = *reinterpret_cast <RDouble4D *> (grid->GetFaceVelocityX());
+    RDouble4D &faceVelocityY = *reinterpret_cast <RDouble4D *> (grid->GetFaceVelocityY());
+    RDouble4D &faceVelocityZ = *reinterpret_cast <RDouble4D *> (grid->GetFaceVelocityZ());
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int viscousType = parameters->GetViscousType();
+
+    RDouble TorqueRefXGlobal = 0.0, TorqueRefYGlobal = 0.0, TorqueRefZGlobal = 0.0;
+
+    TorqueRefXGlobal = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+    TorqueRefYGlobal = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+    TorqueRefZGlobal = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+
+    //! Compute hinge moment.
+    using namespace IDX;
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    RDouble pressureFarfield = primitiveVarFarfield[IP];
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+    RDouble3D &vol = *(grid->GetCellVolume());
+
+    int ndim = GetDim();
+
+    using namespace IDX;
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    int isAle = parameters->GetIsCodeOfAleModel();
+
+    int numberOfMovingBodies = GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+    vector< BasicAerodynamicForce * > *basicAerodynamicForceVector = CreateBasicAerodynamicForceVector();
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    for (int iBody = 0; iBody < numberOfMovingBodies; ++ iBody)
+    {
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            StructBC *bcRegion = structBCSet->GetBCRegion(iBCRegion);
+            int BCType = bcRegion->GetBCType();
+            bool isNeedComputeAirForce = (BCType == PHENGLEI::SOLID_SURFACE || BCType == PHENGLEI::ABLATION_SURFACE);
+            if (!isNeedComputeAirForce)
+            {
+                continue;
+            }
+
+            string bodyName = bcRegion->GetBodyName();
+            if (FaceInAerodynamicForceBodies(bodyName, iBody))
+            {
+                int ist, ied, jst, jed, kst, ked;
+                bcRegion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+                int nSurface = bcRegion->GetFaceDirection() + 1;
+                int leftOrRightIndex = bcRegion->GetFaceLeftOrRightIndex();
+
+                int iWall, jWall, kWall;
+                int iCellGhostLayer, jCellGhostLayer, kCellGhostLayer;
+
+                RDouble dfx, dfy, dfz, dpx, dpy, dpz;
+
+                for (int k = kst; k <= ked; ++ k)
+                {
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        for (int i = ist; i <= ied; ++ i)
+                        {
+                            BasicAerodynamicForce aerodynamicForceGlobal;
+                            aerodynamicForceGlobal.SetMomentReferencePoint(TorqueRefXGlobal, TorqueRefYGlobal, TorqueRefZGlobal);
+                            //! i, j, k - is first face index near SOLID_SURFACE.
+                            bcRegion->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                            //! The index of  first ghost cell layer near SOLID_SURFACE.
+                            bcRegion->GetGhostCellIndex(i, j, k, iCellGhostLayer, jCellGhostLayer, kCellGhostLayer, 1);
+
+                            //! The surface direction of SOLID_SURFACE.
+                            RDouble nx = leftOrRightIndex * xfv(iWall, jWall, kWall, nSurface);
+                            RDouble ny = leftOrRightIndex * yfv(iWall, jWall, kWall, nSurface);
+                            RDouble nz = leftOrRightIndex * zfv(iWall, jWall, kWall, nSurface);
+
+                            RDouble pCellfirstLayer = primitiveVars(i, j, k, IP);
+
+                            RDouble pressureWall = pCellfirstLayer;
+                            RDouble pressureCoef = two * (pressureWall - pressureFarfield);
+
+                            dpx = nx * pressureCoef;
+                            dpy = ny * pressureCoef;
+                            dpz = nz * pressureCoef;
+
+                            if (isUnsteady && isAle)
+                            {
+                                RDouble rhoWall = half * (primitiveVars(i, j, k, IR) + primitiveVars(iCellGhostLayer, jCellGhostLayer, kCellGhostLayer, IR));
+                                RDouble uWall = half * (primitiveVars(i, j, k, IU) + primitiveVars(iCellGhostLayer, jCellGhostLayer, kCellGhostLayer, IU));
+                                RDouble vWall = half * (primitiveVars(i, j, k, IV) + primitiveVars(iCellGhostLayer, jCellGhostLayer, kCellGhostLayer, IV));
+                                RDouble wWall = half * (primitiveVars(i, j, k, IW) + primitiveVars(iCellGhostLayer, jCellGhostLayer, kCellGhostLayer, IW));
+
+                                RDouble uGrid = faceVelocityX(iWall, jWall, kWall, nSurface);
+                                RDouble vGrid = faceVelocityY(iWall, jWall, kWall, nSurface);
+                                RDouble wGrid = faceVelocityZ(iWall, jWall, kWall, nSurface);
+
+                                RDouble gridVelocity = 2.0 * (uGrid * nx + vGrid * ny + wGrid * nz);
+
+                                dpx += rhoWall * uWall * gridVelocity;
+                                dpy += rhoWall * vWall * gridVelocity;
+                                dpz += rhoWall * wWall * gridVelocity;
+                            }
+
+                            aerodynamicForceGlobal.SetPressureAerodynamicForce(dpx, dpy, dpz);
+
+                            dfx = dpx;
+                            dfy = dpy;
+                            dfz = dpz;
+
+                            RDouble xc, yc, zc;
+                            grid->FaceCoor(iWall, jWall, kWall, nSurface, xc, yc, zc);
+
+                            aerodynamicForceGlobal.SetPressureAerodynamicMoment(xc, yc, zc);
+
+                            RDouble dudx = 0.0, dudy = 0.0, dudz = 0.0;
+                            RDouble dvdx = 0.0, dvdy = 0.0, dvdz = 0.0;
+                            RDouble dwdx = 0.0, dwdy = 0.0, dwdz = 0.0;
+                            RDouble visLaminar = 0.0, visTurbulence = 0.0;
+                            if (viscousType > INVISCID)
+                            {
+                                Geometry3D *geometry3D = new Geometry3D;
+
+                                if (nSurface == 1)
+                                {
+                                    //! Get i-th face vector on the wall surface.
+                                    Get_GEO_I(i, j, k, iWall, iWall, ndim, geometry3D, xfv, yfv, zfv, vol);
+                                    //! Get derivative to the wall in i-direction of u,v,w.
+                                    DXDYDZ_I(primitiveVars, geometry3D, i, j, k, ndim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                                    DXDYDZ_I(primitiveVars, geometry3D, i, j, k, ndim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                                    DXDYDZ_I(primitiveVars, geometry3D, i, j, k, ndim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                                    visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(iCellGhostLayer, j, k));
+                                    visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(iCellGhostLayer, j, k));
+                                }
+                                else if (nSurface == 2)
+                                {
+                                    //! Get j-th face vector on the wall surface.
+                                    Get_GEO_J(i, j, k, jWall, jWall, ndim, geometry3D, xfv, yfv, zfv, vol);
+                                    //! Get derivative to the wall in j-direction of u,v,w.
+                                    DXDYDZ_J(primitiveVars, geometry3D, i, j, k, ndim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                                    DXDYDZ_J(primitiveVars, geometry3D, i, j, k, ndim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                                    DXDYDZ_J(primitiveVars, geometry3D, i, j, k, ndim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                                    visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, jCellGhostLayer, k));
+                                    visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, jCellGhostLayer, k));
+                                }
+                                else
+                                {
+                                    //! Get k-th face vector on the wall surface.
+                                    Get_GEO_K(i, j, k, kWall, kWall, geometry3D, xfv, yfv, zfv, vol);
+                                    //! Get derivative to the wall in k-direction of u,v,w.
+                                    DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IU, dudx, dudy, dudz, leftOrRightIndex);
+                                    DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                                    DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                                    visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, j, kCellGhostLayer));
+                                    visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, j, kCellGhostLayer));
+                                }
+
+                                //! It is unnecessary to consider because the turbulence viscosity coefficient is 0.
+                                //visTurbulence = 0.0;
+                                RDouble viscousCoef = visLaminar + visTurbulence;
+
+                                RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+                                //! Stress components.
+                                RDouble txx = viscousCoef * (two * dudx - divv2p3);
+                                RDouble tyy = viscousCoef * (two * dvdy - divv2p3);
+                                RDouble tzz = viscousCoef * (two * dwdz - divv2p3);
+                                RDouble txy = viscousCoef * (dudy + dvdx);
+                                RDouble txz = viscousCoef * (dudz + dwdx);
+                                RDouble tyz = viscousCoef * (dvdz + dwdy);
+
+                                RDouble fvsx = -two * (nx * txx + ny * txy + nz * txz) * oRefReNumber;
+                                RDouble fvsy = -two * (nx * txy + ny * tyy + nz * tyz) * oRefReNumber;
+                                RDouble fvsz = -two * (nx * txz + ny * tyz + nz * tzz) * oRefReNumber;
+
+                                aerodynamicForceGlobal.SetViscousAerodynamicForce(fvsx, fvsy, fvsz);
+
+                                aerodynamicForceGlobal.SetViscousAerodynamicMoment(xc, yc, zc);
+
+                                delete geometry3D;
+
+                                aerodynamicForceGlobal.ComputeResultantAerodynamicForce();
+
+                                aerodynamicForceGlobal.ComputeResultantAerodynamicMoment();
+
+                                (*basicAerodynamicForceVector)[iBody]->AddAerodynamicForce(&aerodynamicForceGlobal);
+                            }
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    PHSPACE::WriteAerodynamicForceToActionKey(actkey, basicAerodynamicForceVector);
+    PHSPACE::FreeBasicAerodynamicForceVector(basicAerodynamicForceVector);
+}
+
+//! Write the variables of Cp, Cf, Qw, y+ etc. on surface to the file.
+void NCCRSolverStruct::CpDistriCoef(ActionKey* actkey)
+{
+    int level = actkey->level;
+    DataContainer* wallDistributeData = actkey->GetData();
+    wallDistributeData->moveto_begin();
+
+    StructGrid* grid = StructGridCast(GetGrid(level));
+
+    int oriGridIndex = grid->GetOrdinaryGridIndex();
+    PHWrite(wallDistributeData, oriGridIndex);
+
+    int GridID = grid->GetGridID()->GetIndex();
+    PHWrite(wallDistributeData, GridID);
+
+    if (level != 0) return;
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D& primitiveVars = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("q"));
+    RDouble4D& temperature = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("t"));
+    RDouble3D& viscousLaminar = *reinterpret_cast <RDouble3D*> (grid->GetDataPtr("visl"));
+    RDouble3D& viscousTurbulence = *reinterpret_cast <RDouble3D*> (grid->GetDataPtr("vist"));
+
+    Param_NSSolverStruct* parameters = GetControlParameters();
+
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    RDouble refGama = parameters->GetRefGama();
+
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    int viscousType = parameters->GetViscousType();
+
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    using namespace IDX;
+    RDouble* primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    RDouble pressureFarfield = primitiveVarFarfield[IP];
+
+    RDouble4D& heatTransferCoeff = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("heatTransferCoeff"));
+
+    RDouble4D& xfv = *(grid->GetFaceVectorX());
+    RDouble4D& yfv = *(grid->GetFaceVectorY());
+    RDouble4D& zfv = *(grid->GetFaceVectorZ());
+
+    RDouble4D& faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D& faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D& faceNormalComponentZ = *(grid->GetFaceNormalZ());
+    RDouble4D& faceArea = *(grid->GetFaceArea());
+    RDouble3D& cellVolume = *(grid->GetCellVolume());
+
+    RDouble3D& xx = *grid->GetStructX();
+    RDouble3D& yy = *grid->GetStructY();
+    RDouble3D& zz = *grid->GetStructZ();
+
+    Int3D& cellType = *grid->GetCellBoundaryType();
+
+    int nsolid_surface = grid->GetNumberOfWallCell();
+
+    if (nsolid_surface == 0)
+    {
+        return;
+    }
+
+    RDouble AoA = 0.0, attack = 0.0;
+    AoA = parameters->GetAoA();
+    attack = AoA * PI / 180.0;
+
+    RDouble sina = sin(attack);
+    RDouble cosa = cos(attack);
+
+    int nDim = GetDim();
+    int js = 1;
+    int ks = 1;
+    if (nDim == TWO_D)
+    {
+        ks = 0;
+    }
+
+    if (nDim == ONE_D)
+    {
+        js = 0;
+    }
+
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+
+    using namespace IDX;
+
+    StructBCSet* structBCSet = grid->GetStructBCSet();
+    //! Obtain the number of boundary condition regions.
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    int coorCount, dataCount;
+
+    int TecioMission = 0;
+
+    //! Non-equilibrium Gas
+    //! The universal gas constant.
+    RDouble gasConstant = gas->GetUniversalGasConstant();
+    //! The type of catalytic wall condition.
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();
+    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble Twall = parameters->GetWallTemperature();    //! Temperature on wall.
+    RDouble referenceTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble2D* surfaceTemperature;
+    surfaceTemperature = reinterpret_cast <RDouble2D*> (grid->GetDataPtr("surfaceTemperature"));
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D* surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D*> (grid->GetDataPtr("surfaceSlipVariables"));
+    }
+    RDouble2D* firstLayerHeight = reinterpret_cast <RDouble2D*> (grid->GetDataPtr("firstLayerHeight"));
+    int wallFunctionType = GlobalDataBase::GetIntParaFromDB("wallFunctionType");
+
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int wallMultiTemperature = parameters->GetWallMultiTemperature();
+
+    //! Allocate the dynamic memory space to save the primitive variables on wall.
+    int nEquation = numberOfSpecies + nNSEquation + nTemperatureModel - 1;
+    RDouble* wallVariables = new RDouble[nEquation];
+    RDouble nondimTwall = Twall / referenceTemperature;
+    RDouble wallTemperature[3] = { nondimTwall, nondimTwall, nondimTwall };
+    RDouble Qw = 0.0, Qtr = 0.0, Qs = 0.0, Qv = 0.0, Qe = 0.0, Pw = 0.0, Tw = 0.0, Rhow = 0.0, absVelocity = 0.0;
+    RDouble StantonNumber = 0.0, HeatCoef = 0.0, deltaT = 0.0, wallTotalEnthalpy = 0.0;
+
+    int nSurfGradMethod = parameters->GetSurfaceGradientMethod();
+    RDouble gradTx[3] = { 0.0, 0.0, 0.0 }, gradTy[3] = { 0.0, 0.0, 0.0 }, gradTz[3] = { 0.0, 0.0, 0.0 };
+    RDouble gradCx[MAX_SPECIES_NUM] = { 0.0 }, gradCy[MAX_SPECIES_NUM] = { 0.0 }, gradCz[MAX_SPECIES_NUM] = { 0.0 };
+
+    //! The mass fraction of oxygen and nitrogen under the fully catalytic condition.
+    RDouble speciesEnthalpy[MAX_SPECIES_NUM], densityDiffusivity[MAX_SPECIES_NUM];
+    string* speciesName;
+    RDouble3D* surfaceMassFraction = NULL;
+    if (nChemical > 0 && numberOfSpecies > 0)
+    {
+        speciesName = gas->GetNameOfSpecies();
+        surfaceMassFraction = reinterpret_cast <RDouble3D*> (grid->GetDataPtr("surfaceMassFraction"));
+    }
+
+    int nRapidFlowfield = parameters->GetRapidFlowfieldMethod();
+    RDouble3D* surfacePressure = NULL;
+    if (nRapidFlowfield > 0)
+    {
+        surfacePressure = reinterpret_cast <RDouble3D*> (grid->GetDataPtr("surfacePressure"));
+    }
+
+    //! To obtain the reference values.
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble refVelocity = refDimensionalSonicSpeed * refMachNumber;
+    RDouble refSquareVelocity = refVelocity * refVelocity;
+    RDouble refDynamicPressure = refDimensionalDensity * refSquareVelocity;
+    RDouble refEnergy = refDimensionalDensity * refVelocity * refSquareVelocity;
+    RDouble refHeatFluxDimension = refEnergy * 0.001; //! The dimensional value of total heat flux (kW/m2).
+    RDouble refTotalEnthalpy = gas->ComputeReferenceTotalEnthalpy();
+    RDouble refLenth = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+    FluidParameter refParam;
+    gas->GetReferenceParameters(refParam);
+    RDouble refVicosity = refParam.GetViscosity();
+    RDouble refDimensionalMolecular = refParam.GetAverageMolecularWeight();
+
+    int* visualVariablesType = postVisualWall->GetVisualVariablesType();
+    int nWallVariables = postVisualWall->GetVisualVariablesNumber();
+    int dataNumber = nWallVariables;
+    for (int m = 0; m < nWallVariables; ++m)
+    {
+        if (visualVariablesType[m] == VISUAL_WALL_NS)
+        {
+            dataNumber += numberOfSpecies - 1;
+        }
+    }
+    RDouble knudsenNumber = 0.0, meanFreePath = 0.0, massReciprocal = 1.0;
+    RDouble knLength = parameters->GetCharacteristicLength();
+
+    Range M(0, dataNumber - 1);
+    RDouble visualVariables[50]; //! Store the values of variables.
+    //! the order of variables in the computational array, eg. 0 denotes the coefficient of pressure,
+    //! and the value of array indicates the index of the variable in the computation array.
+    int variablesOrder[50];
+    for (int m = 0; m < 50; ++m)
+    {
+        variablesOrder[m] = m;
+    }
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int isWennScheme = parameters->GetWennSchemeFlag();
+    if (isWennScheme == 1)
+    {
+        GetRange(ni, nj, nk, -3, 2, I, J, K);
+    }
+
+    RDouble4D dataStore(I, J, K, M, fortranArray);
+    dataStore = 0.0;
+
+    int indexOfWall = 0, indexOfCell = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++iBCRegion)
+    {
+        StructBC* structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!IsWall(BCType) && BCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        Data_Param* bcParamDB = structBC->GetBCParamDataBase();
+        if (bcParamDB->IsExist("catalyticCoef", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("catalyticCoef", &catalyticCoef, PHDOUBLE, 1);
+        }
+
+        if (wallMultiTemperature == 1)
+        {
+
+            if (bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+            {
+                bcParamDB->GetData("wallTemperature", &Twall, PHDOUBLE, 1);
+            }
+            else
+            {
+                Twall = parameters->GetWallTemperature();
+            }
+            nondimTwall = Twall / referenceTemperature;
+            wallTemperature[0] = nondimTwall;
+            wallTemperature[1] = nondimTwall;
+            wallTemperature[2] = nondimTwall;
+        }
+
+        int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        //! Obtain the surface information.
+        int* s_lr3d = structBC->GetFaceDirectionIndex();
+        int nSurface = structBC->GetFaceDirection() + 1;
+        int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+
+        indexOfCell = 0;
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    //! i, j, k - is first CELL index near SOLID_SURFACE.
+                    //! iWall, jWall, kWall - is NODE index on SOLID_SURFACE.
+                    int iWall, jWall, kWall;
+                    structBC->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                    RDouble nx = leftOrRightIndex * xfv(iWall, jWall, kWall, nSurface);
+                    RDouble ny = leftOrRightIndex * yfv(iWall, jWall, kWall, nSurface);
+                    RDouble nz = leftOrRightIndex * zfv(iWall, jWall, kWall, nSurface);
+
+                    ////! Obtain the centroid of the surface.
+                    //RDouble xCenterWall, yCenterWall, zCenterWall;
+                    //grid->FaceCoor(iWall, jWall, kWall, nSurface, xCenterWall, yCenterWall, zCenterWall);
+                    ////! Obtain the centroid of the cell on the positive first layer.
+                    //RDouble xCellCenter, yCellCenter, zCellCenter;
+                    //grid->CenterCoor(i, j, k, xCellCenter, yCellCenter, zCellCenter);
+
+                    RDouble normalComponetX = leftOrRightIndex * faceNormalComponentX(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetY = leftOrRightIndex * faceNormalComponentY(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetZ = leftOrRightIndex * faceNormalComponentZ(iWall, jWall, kWall, nSurface);
+                    RDouble surfaceArea = faceArea(iWall, jWall, kWall, nSurface);
+
+                    //! The projection of the dy called the distance between the center of the cell and that of the surface on normal vector.
+                    //RDouble deltaHeight = fabs((xCellCenter - xCenterWall) * normalComponetX + (yCellCenter - yCenterWall) * normalComponetY + (zCellCenter - zCenterWall) * normalComponetZ);
+                    RDouble deltaHeight = (*firstLayerHeight)(indexOfWall, indexOfCell);
+
+                    //! The index of  first ghost cell layer near SOLID_SURFACE.
+                    int iCellGhostLayer = i + s_lr3d[0];
+                    int jCellGhostLayer = j + s_lr3d[1];
+                    int kCellGhostLayer = k + s_lr3d[2];
+
+                    RDouble pressureFirstCell = primitiveVars(i, j, k, IP);
+                    wallVariables[IP] = pressureFirstCell;
+                    //! Obtain temperature of solid on wall.
+                    if (Twall < 0.0) //Adabatic wall.
+                    {
+                        nondimTwall = temperature(i, j, k, mTT); //solid temperature.
+                    }
+                    else //Isothermal wall or radiation equilibrium temperature wall.
+                    {
+                        nondimTwall = (*surfaceTemperature)(indexOfWall, indexOfCell); //solid temperature.
+                    }
+
+                    //! To obtain the variables on wall.
+                    if (nSlipBCModel > 0)
+                    {
+                        //! Obtain temperature of flow on wall.
+                        for (int m = 0; m < 3; ++m)
+                        {
+                            //flow temperature.
+                            wallTemperature[m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m);
+                            wallVariables[m + 1] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m + 3);
+                        }
+                        deltaT = wallTemperature[ITT] - nondimTwall;
+                    }
+                    else
+                    {
+                        if (viscousType > INVISCID)
+                        {
+                            wallVariables[IU] = 0.0;
+                            wallVariables[IV] = 0.0;
+                            wallVariables[IW] = 0.0;
+                        }
+                        else
+                        {
+                            //The velocity is used to extract the wall streamline, so this velocity is not the real velocity on wall.
+                            wallVariables[IU] = primitiveVars(i, j, k, IU);
+                            wallVariables[IV] = primitiveVars(i, j, k, IV);
+                            wallVariables[IW] = primitiveVars(i, j, k, IW);
+                        }
+
+                        deltaT = 0.0;
+                        //! Obtain temperature of flow on wall.
+                        if (Twall < 0.0) //Adabatic wall.
+                        {
+                            wallTemperature[ITT] = temperature(i, j, k, mTT);
+                            wallTemperature[ITV] = temperature(i, j, k, mTV);
+                            wallTemperature[ITE] = temperature(i, j, k, mTE);
+                        }
+                        else //Isothermal wall or radiation equilibrium temperature wall.
+                        {
+                            wallTemperature[ITT] = (*surfaceTemperature)(indexOfWall, indexOfCell);
+                            wallTemperature[ITV] = wallTemperature[ITT];
+                            wallTemperature[ITE] = wallTemperature[ITT];
+                        }
+                    }
+
+                    //! Compute the density on wall using the state equation.
+                    massReciprocal = 1.0;
+                    wallVariables[IR] = refGama * refMachNumber * refMachNumber * wallVariables[IP] / wallTemperature[ITT];
+                    if (nChemical >= 1)
+                    {
+                        //! To obtain the mass fraction on wall.
+                        if (ABS(catalyticCoef) <= EPSILON && BCType != PHENGLEI::ABLATION_SURFACE) // Fully non-catalytic wall.
+                        {
+                            for (int s = nNSEquation; s < numberOfSpecies + nNSEquation; ++s)
+                            {
+                                wallVariables[s] = primitiveVars(i, j, k, s);
+                            }
+                        }
+                        else // Fully catalytic wall or finite catalytic wall.
+                        {
+                            for (int s = nNSEquation; s < numberOfSpecies + nNSEquation; ++s)
+                            {
+                                wallVariables[s] = (*surfaceMassFraction)(indexOfWall, indexOfCell, s - nNSEquation);
+                            }
+                        }
+
+                        if (nTemperatureModel > 1)     //! Multi-Temperature model.
+                        {
+                            RDouble ceDivideMe = 0.0;
+                            massReciprocal = gas->ComputeMolecularWeightReciprocalWithoutElectron(wallVariables, ceDivideMe);
+                            wallVariables[IR] = wallVariables[IP] / (gasConstant * wallTemperature[ITT] * massReciprocal + gasConstant * wallTemperature[ITE] * ceDivideMe);
+                        }
+                        else         //! One-Temperature model.
+                        {
+                            //! Obtain molecular weight of the mixture gas.
+                            massReciprocal = gas->ComputeMolecularWeightReciprocal(wallVariables);
+                            wallVariables[IR] = wallVariables[IP] / (gasConstant * wallTemperature[ITT] * massReciprocal);
+                        }
+                    }
+
+                    //! The pressure on wall.
+                    Rhow = wallVariables[IR] * refDimensionalDensity;
+                    Pw = wallVariables[IP] * refDynamicPressure;
+                    Tw = nondimTwall * referenceTemperature;
+                    absVelocity = wallVariables[IU] * wallVariables[IU] + wallVariables[IV] * wallVariables[IV] + wallVariables[IW] * wallVariables[IW];
+
+                    wallTotalEnthalpy = 0.0;
+                    gas->ComputeEnthalpyByPrimitive(wallVariables, refGama, wallTotalEnthalpy, wallTemperature);
+                    wallTotalEnthalpy += 0.5 * absVelocity;
+                    absVelocity = sqrt(absVelocity) * refVelocity;
+                    wallTotalEnthalpy = wallTotalEnthalpy * refSquareVelocity;
+
+                    //! Pressure drag.
+                    RDouble pressureWall = pressureFirstCell;
+                    RDouble pressCoef = two * (pressureWall - pressureFarfield);
+
+                    RDouble dpx = nx * pressCoef;
+                    RDouble dpy = ny * pressCoef;
+                    RDouble dpz = nz * pressCoef;
+
+                    RDouble dfx = dpx;
+                    RDouble dfy = dpy;
+                    RDouble dfz = dpz;
+
+                    RDouble fvsx = 0.0;
+                    RDouble fvsy = 0.0;
+                    RDouble fvsz = 0.0;
+
+                    RDouble heatFlux = zero;
+                    RDouble viscousCoef;
+
+                    RDouble dudx, dudy, dudz, dvdx, dvdy, dvdz, dwdx, dwdy, dwdz;
+                    RDouble dtdx, dtdy, dtdz;
+                    RDouble visLaminar = 0.0, visTurbulence = 0.0;
+                    RDouble heatCoeff = 0.0;
+                    if (viscousType > INVISCID)
+                    {
+                        Geometry3D* geometry3D = new Geometry3D;
+
+                        if (nSurface == 1)
+                        {
+                            //! Get i-th face vector on the wall surface.
+                            Get_GEO_I(i, j, k, iWall, iWall, nDim, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in i-direction of u,v,w,T.
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            //DXDYDZ_I(temperature, geometry3D, i, j, k, nDim, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            for (int m = 0; m < nTemperatureModel; ++m)
+                            {
+                                DXDYDZ_I(temperature, geometry3D, i, j, k, nDim, m, gradTx[m], gradTy[m], gradTz[m], leftOrRightIndex);
+                            }
+                            for (int m = 0; m < numberOfSpecies; ++m)
+                            {
+                                DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, m + nNSEquation, gradCx[m], gradCy[m], gradCz[m], leftOrRightIndex);
+                            }
+
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(iCellGhostLayer, j, k));
+                            visTurbulence = 0.0;
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(iCellGhostLayer, j, k));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(iCellGhostLayer, j, k, ITT);
+                            }
+                        }
+                        else if (nSurface == 2)
+                        {
+                            //! Get j-th face vector on the wall surface;.
+                            Get_GEO_J(i, j, k, jWall, jWall, nDim, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in j-direction of u,v,w,T.
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            //DXDYDZ_J(temperature, geometry3D, i, j, k, nDim, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            for (int m = 0; m < nTemperatureModel; ++m)
+                            {
+                                DXDYDZ_J(temperature, geometry3D, i, j, k, nDim, m, gradTx[m], gradTy[m], gradTz[m], leftOrRightIndex);
+                            }
+                            for (int m = 0; m < numberOfSpecies; ++m)
+                            {
+                                DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, m + nNSEquation, gradCx[m], gradCy[m], gradCz[m], leftOrRightIndex);
+                            }
+
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, jCellGhostLayer, k));
+                            visTurbulence = 0.0;
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, jCellGhostLayer, k));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(i, jCellGhostLayer, k, ITT);
+                            }
+                        }
+                        else
+                        {
+                            //! Get k-th face vector on the wall surface.
+                            Get_GEO_K(i, j, k, kWall, kWall, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in k-direction of u,v,w,T.
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            //DXDYDZ_K(temperature, geometry3D, i, j, k, nDim, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            for (int m = 0; m < nTemperatureModel; ++m)
+                            {
+                                DXDYDZ_K(temperature, geometry3D, i, j, k, m, gradTx[m], gradTy[m], gradTz[m], leftOrRightIndex);
+                            }
+                            for (int m = 0; m < numberOfSpecies; ++m)
+                            {
+                                DXDYDZ_K(primitiveVars, geometry3D, i, j, k, m + nNSEquation, gradCx[m], gradCy[m], gradCz[m], leftOrRightIndex);
+                            }
+
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, j, kCellGhostLayer));
+                            visTurbulence = 0.0;
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, j, kCellGhostLayer));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(i, j, kCellGhostLayer, ITT);
+                            }
+                        }
+                        dtdx = gradTx[ITT];
+                        dtdy = gradTy[ITT];
+                        dtdz = gradTz[ITT];
+                        viscousCoef = visLaminar + visTurbulence;
+
+                        //! To Compute the heat flux on wall.
+                        if (nChemical == 0)
+                        {
+                            RDouble kSpecificHeat = (visLaminar * oPrandtlLaminar + visTurbulence * oPrandtlTurbulence) * specificHeatAtConstantPressure;
+                            if (wallFunctionType == WALLFUNCTION::STANDARD)
+                            {
+                                if (abs(heatCoeff) > SMALL)
+                                {
+                                    kSpecificHeat += heatCoeff;
+                                }
+                            }
+                            RDouble qx = kSpecificHeat * dtdx;
+                            RDouble qy = kSpecificHeat * dtdy;
+                            RDouble qz = kSpecificHeat * dtdz;
+                            //! This value is not the real heat rate on wall, it is just the first term on the right side of the energy equation.\n
+                            //! To obtain the real value, hf = nxs * qx + nys * qy + nzs * qz, and hf is just the non-dimensional variables.\n
+                            //! To obtain the dimensional value of heat rate, hf = (nxs * qx + nys * qy + nzs * qz) * (ref_miu * ref_vel^2/ref_len).
+                            heatFlux += -(normalComponetX * qx + normalComponetY * qy + normalComponetZ * qz) * oRefReNumber;
+                        }
+                        else      //! Non-equilibrium gas.
+                        {
+                            //! Compute Heat conductivity.
+                            RDouble heatConductivity[3] = { 0.0, 0.0, 0.0 };
+                            //! To obtain the enthalpy of each species.
+                            gas->GetEverySpeciesEnthalpy(wallTemperature[ITT], wallTemperature[ITV], wallTemperature[ITE], speciesEnthalpy);
+
+                            //! To Modify the viscosity on wall.
+                            gas->ComputeViscosityByPrimitive(wallVariables, wallTemperature[ITT], wallTemperature[ITE], nonDimensionalSutherlandTemperature, visLaminar);
+                            viscousCoef = visLaminar + visTurbulence;
+
+                            //! To obtain the mass diffusion coefficients of each species.
+                            gas->GetSpeciesMassDiffusionCoef(wallVariables, visLaminar, visTurbulence, densityDiffusivity);
+
+                            //! To compute heat conductivity of mixture gas using the Eucken formula and Wassilewa formula.
+                            gas->ComputeMixtureGasHeatConductivity(wallVariables, wallTemperature[ITT], wallTemperature[ITV], wallTemperature[ITE], heatConductivity[ITT], heatConductivity[ITV], heatConductivity[ITE]);
+
+                            if (nSurfGradMethod > 0)
+                            {
+                                //! Compute the heat flux caused by the gradient of translation-rotation temperature near wall.
+                                Qtr = -heatConductivity[ITT] * (normalComponetX * gradTx[ITT] + normalComponetY * gradTy[ITT] + normalComponetZ * gradTz[ITT]) * oRefReNumber;
+
+                                //! Compute the heat flux caused by the gradient of species enthalpies near wall.
+                                Qs = 0.0;
+                                for (int s = 0; s < numberOfSpecies; ++s)
+                                {
+                                    //! Compute the diffusion coefficient.
+                                    RDouble diffusionCoefficient = densityDiffusivity[s] * speciesEnthalpy[s];
+                                    //! Compute the mass diffusion energy.
+                                    Qs += -diffusionCoefficient * (normalComponetX * gradCx[s] + normalComponetY * gradCy[s] + normalComponetZ * gradCz[s]);
+                                }
+                                Qs *= oRefReNumber;
+
+                                //! Compute the heat flux caused by the gradient of vibration-electron temperature near wall.
+                                Qv = 0.0;
+                                Qe = 0.0;
+                                if (nTemperatureModel == 2)
+                                {
+                                    Qv = -(heatConductivity[ITV] + heatConductivity[ITE]) * (normalComponetX * gradTx[ITV] + normalComponetY * gradTy[ITV] + normalComponetZ * gradTz[ITV]) * oRefReNumber;
+                                }
+                                else if (nTemperatureModel == 3)
+                                {
+                                    Qv = -heatConductivity[ITV] * (normalComponetX * gradTx[ITV] + normalComponetY * gradTy[ITV] + normalComponetZ * gradTz[ITV]) * oRefReNumber;
+                                    Qe = -heatConductivity[ITE] * (normalComponetX * gradTx[ITE] + normalComponetY * gradTy[ITE] + normalComponetZ * gradTz[ITE]) * oRefReNumber;
+                                }
+                            }
+                            else
+                            {
+                                //! Compute the heat flux caused by the gradient of translation-rotation temperature near wall.
+                                Qtr = heatConductivity[ITT] * (temperature(i, j, k, ITT) - wallTemperature[ITT]) / deltaHeight * oRefReNumber;
+
+                                //! Compute the heat flux caused by the gradient of species enthalpies near wall.
+                                Qs = 0.0;
+                                for (int s = 0; s < numberOfSpecies; ++s)
+                                {
+                                    //! Compute the diffusion coefficient.
+                                    RDouble diffusionCoefficient = densityDiffusivity[s] * speciesEnthalpy[s];
+                                    //! Compute the mass diffusion energy.
+                                    Qs += diffusionCoefficient * (primitiveVars(i, j, k, nNSEquation + s) - wallVariables[nNSEquation + s]) / deltaHeight;
+                                }
+                                Qs *= oRefReNumber;
+
+                                //! Compute the heat flux caused by the gradient of vibration-electron temperature near wall.
+                                Qv = 0.0;
+                                Qe = 0.0;
+                                if (nTemperatureModel == 2)
+                                {
+                                    Qv = (heatConductivity[ITV] + heatConductivity[ITE]) * (temperature(i, j, k, ITV) - wallTemperature[ITV]) / deltaHeight * oRefReNumber;
+                                }
+                                else if (nTemperatureModel == 3)
+                                {
+                                    Qv = heatConductivity[ITV] * (temperature(i, j, k, ITV) - wallTemperature[ITV]) / deltaHeight * oRefReNumber;
+                                    Qe = heatConductivity[ITE] * (temperature(i, j, k, ITE) - wallTemperature[ITE]) / deltaHeight * oRefReNumber;
+                                }
+                            }
+
+                            //! Set the total heat flux on wall.
+                            heatFlux = Qtr + Qs + Qv + Qe;
+                            Qtr *= refHeatFluxDimension;
+                            Qs *= refHeatFluxDimension;
+                            Qv *= refHeatFluxDimension;
+                            Qe *= refHeatFluxDimension;
+                        }
+
+                        Qw = heatFlux * refHeatFluxDimension;
+                        HeatCoef = 2.0 * heatFlux;
+                        RDouble deltaH = refTotalEnthalpy - wallTotalEnthalpy;
+                        StantonNumber = Qw * 1000 / (refDimensionalDensity * refVelocity * deltaH);
+
+                        //Compute the mean free path.
+                        meanFreePath = ((viscousCoef * refVicosity) / Pw) * sqrt(0.5 * PI * rjmk * massReciprocal * Tw / refDimensionalMolecular);
+                        knudsenNumber = meanFreePath / knLength;
+
+                        RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+                        //! Stress components.
+                        RDouble txx = viscousCoef * (two * dudx - divv2p3);
+                        RDouble tyy = viscousCoef * (two * dvdy - divv2p3);
+                        RDouble tzz = viscousCoef * (two * dwdz - divv2p3);
+                        RDouble txy = viscousCoef * (dudy + dvdx);
+                        RDouble txz = viscousCoef * (dudz + dwdx);
+                        RDouble tyz = viscousCoef * (dvdz + dwdy);
+
+                        fvsx = -two * (nx * txx + ny * txy + nz * txz) * oRefReNumber;
+                        fvsy = -two * (nx * txy + ny * tyy + nz * tyz) * oRefReNumber;
+                        fvsz = -two * (nx * txz + ny * tyz + nz * tzz) * oRefReNumber;
+
+                        dfx += fvsx;
+                        dfy += fvsy;
+                        dfz += fvsz;
+
+                        delete geometry3D;
+                    }
+
+                    RDouble dir = cosa * fvsx + sina * fvsy;
+
+                    RDouble cfn = fvsx * normalComponetX + fvsy * normalComponetY + fvsz * normalComponetZ;
+                    RDouble cfxt = fvsx - cfn * normalComponetX;
+                    RDouble cfyt = fvsy - cfn * normalComponetY;
+                    RDouble cfzt = fvsz - cfn * normalComponetZ;
+
+                    RDouble cft = sqrt(cfxt * cfxt + cfyt * cfyt + cfzt * cfzt);
+
+                    RDouble frictionCoef = cft / surfaceArea * SIGN(1.0, dir);
+
+                    RDouble densityWall = primitiveVars(i, j, k, IR);
+                    RDouble taoWall = half * cft / surfaceArea;
+
+                    RDouble yPlus = 0.0;
+                    RDouble gridReynoldsNumber = 0.0;
+                    if (viscousType > INVISCID)
+                    {
+                        // RDouble3D &wallDistant = *grid->GetWallDist();
+                        // RDouble wallDistantOfFirstCell = wallDistant(i, j, k);   //by dms
+                        RDouble wallDistantOfFirstCell = deltaHeight;
+                        yPlus = refReNumber * sqrt(taoWall * densityWall) * wallDistantOfFirstCell / visLaminar;
+                        gridReynoldsNumber = refDimensionalDensity * refVelocity * deltaHeight * refLenth / refVicosity;
+                    }
+
+                    //if (nRapidFlowfield > 0)
+                    //{
+                    //    pressCoef = (*surfacePressure)(indexOfWall, indexOfCell, 0);
+                    //    Pw = (*surfacePressure)(indexOfWall, indexOfCell, 1) * refDynamicPressure;
+                    //}
+
+                    visualVariables[VISUAL_WALL_CP] = pressCoef;
+                    visualVariables[VISUAL_WALL_CF] = frictionCoef;
+                    visualVariables[VISUAL_WALL_YPLUS] = yPlus;
+                    visualVariables[VISUAL_WALL_QNONDIM] = heatFlux;
+                    visualVariables[VISUAL_WALL_QDIM] = Qw;
+                    visualVariables[VISUAL_WALL_PW] = Pw;
+                    visualVariables[VISUAL_WALL_TW] = Tw;
+                    visualVariables[VISUAL_WALL_RHOW] = Rhow;
+                    visualVariables[VISUAL_WALL_VX] = wallVariables[IU] * refVelocity;
+                    visualVariables[VISUAL_WALL_VY] = wallVariables[IV] * refVelocity;
+                    visualVariables[VISUAL_WALL_VZ] = wallVariables[IW] * refVelocity;
+                    visualVariables[VISUAL_WALL_VS] = absVelocity;
+                    visualVariables[VISUAL_WALL_ST] = StantonNumber;
+                    visualVariables[VISUAL_WALL_CH] = HeatCoef;
+                    visualVariables[VISUAL_WALL_RE] = gridReynoldsNumber;
+                    visualVariables[VISUAL_WALL_KN] = knudsenNumber;
+
+                    if (nChemical > 0)
+                    {
+                        visualVariables[VISUAL_WALL_QT] = Qtr;
+                        visualVariables[VISUAL_WALL_QS] = Qs;
+                        visualVariables[VISUAL_WALL_QV] = Qv;
+                        visualVariables[VISUAL_WALL_QE] = Qe;
+                        for (int iSpecies = 0; iSpecies < numberOfSpecies; ++iSpecies)
+                        {
+                            visualVariables[VISUAL_SPECIES_START + iSpecies] = wallVariables[nNSEquation + iSpecies];
+                        }
+                    }
+
+                    if (nSlipBCModel > 0)//The slip temperature of flow.
+                    {
+                        visualVariables[VISUAL_SLIP_TS] = wallTemperature[ITT] * referenceTemperature;
+                        visualVariables[VISUAL_SLIP_TV] = wallTemperature[ITV] * referenceTemperature;
+                        visualVariables[VISUAL_SLIP_TE] = wallTemperature[ITE] * referenceTemperature;
+                        visualVariables[VISUAL_SLIP_DTS] = deltaT * referenceTemperature;
+                    }
+
+                    int nIndex = -1;
+                    for (int iVar = 0; iVar < nWallVariables; ++iVar)
+                    {
+                        int varType = visualVariablesType[iVar];
+                        int varIndex = variablesOrder[varType];
+                        //The mass fractions of species will be exported.
+                        if (varType == VISUAL_WALL_NS)
+                        {
+                            continue;
+                        }
+                        else //Obtain the other variables.
+                        {
+                            ++nIndex;
+                            dataStore(i, j, k, nIndex) = visualVariables[varIndex];
+                        }
+                    }
+
+                    //Obtain the mass fractions of species.
+                    if (nWallVariables != dataNumber)
+                    {
+                        for (int iSpecies = 0; iSpecies < numberOfSpecies; ++iSpecies)
+                        {
+                            dataStore(i, j, k, nWallVariables + iSpecies - 1) = visualVariables[VISUAL_SPECIES_START + iSpecies];
+                        }
+                    }
+
+                    //! Next grid cell.
+                    ++indexOfCell;
+                }//! i end
+            }//! j end
+        }//! k end
+        ++indexOfWall; //! Next surface region.
+    }//! iBCRegion end
+
+    GhostCell3D(dataStore, ni, nj, nk, dataNumber);
+
+    //CommunicateInterfaceValue(grid, &isWall, "wallCell");
+    CommunicateInterfaceValue(grid, &dataStore, "wallAircoefData", dataNumber);
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++iBCRegion)
+    {
+        StructBC* structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+        if (!IsWall(BCType) && BCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        int s_nd = structBC->GetFaceDirection();
+        if (s_nd == 0)
+        {
+            ked++;
+            jed++;
+        }
+        else if (s_nd == 1)
+        {
+            ied++;
+            ked++;
+        }
+        else
+        {
+            ied++;
+            jed++;
+        }
+
+        if (nDim == TWO_D)
+        {
+            ked = 1;
+        }
+
+        int* s_lr3d = structBC->GetFaceDirectionIndex();
+        int nSurface = structBC->GetFaceDirection() + 1;
+        int id, jd, kd;
+        GetBCFaceIDX(s_lr3d, id, jd, kd);
+
+        vector <RDouble> vectorXCoordinate, vectorYCoordinate, vectorZCoordinate;
+        vectorXCoordinate.resize(0);
+        vectorYCoordinate.resize(0);
+        vectorZCoordinate.resize(0);
+        dataCount = 0;
+        coorCount = 0;
+
+        vector < vector <RDouble> > dumpDate;
+        dumpDate.resize(dataNumber);
+
+        kst += kd;
+        ked += kd;
+        jst += jd;
+        jed += jd;
+        ist += id;
+        ied += id;
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    vectorXCoordinate.push_back(xx(i, j, k));
+                    vectorYCoordinate.push_back(yy(i, j, k));
+                    vectorZCoordinate.push_back(zz(i, j, k));
+                    coorCount++;
+
+                    int iIndex = i - id;
+                    int jIndex = j - jd;
+                    int kIndex = k - kd;
+                    if (i == ied && nSurface != 1) iIndex = i - 1;
+                    if (j == jed && nSurface != 2) jIndex = j - 1;
+                    if (k == ked && nSurface != 3) kIndex = k - 1;
+                    if (nDim == TWO_D) kIndex = 1;
+
+                    int iLeftCell, iRightCell, jLeftCell, jRightCell, kLeftCell, kRightCell;
+                    if (i == ist && (cellType(i - 1, jIndex, kIndex) != BCType))
+                    {
+                        iLeftCell = i;
+                    }
+                    else
+                    {
+                        iLeftCell = i - 1;
+                    }
+
+                    if (i == ied && cellType(i, jIndex, kIndex) != BCType)
+                    {
+                        iRightCell = i - 1;
+                    }
+                    else
+                    {
+                        iRightCell = i;
+                    }
+
+                    if (nSurface == 1)
+                    {
+                        iLeftCell = i - id;
+                        iRightCell = i - id;
+                    }
+
+                    if (j == jst && cellType(iIndex, j - 1, kIndex) != BCType)
+                    {
+                        jLeftCell = j;
+                    }
+                    else
+                    {
+                        jLeftCell = j - 1;
+                    }
+
+                    if (j == jed && cellType(iIndex, j, kIndex) != BCType)
+                    {
+                        jRightCell = j - 1;
+                    }
+                    else
+                    {
+                        jRightCell = j;
+                    }
+
+                    if (nSurface == 2)
+                    {
+                        jLeftCell = j - jd;
+                        jRightCell = j - jd;
+                    }
+
+                    if (nDim == 3)
+                    {
+                        if (k == kst && cellType(iIndex, jIndex, k - 1) != BCType)
+                        {
+                            kLeftCell = k;
+                        }
+                        else
+                        {
+                            kLeftCell = k - 1;
+                        }
+
+                        if (k == ked && cellType(iIndex, jIndex, k) != BCType)
+                        {
+                            kRightCell = k - 1;
+                        }
+                        else
+                        {
+                            kRightCell = k;
+                        }
+
+                        if (nSurface == 3)
+                        {
+                            kLeftCell = k - kd;
+                            kRightCell = k - kd;
+                        }
+                    }
+                    else
+                    {
+                        kLeftCell = 1;
+                        kRightCell = 1;
+                    }
+
+                    RDouble nodeValue = 0.0;
+                    for (int iData = 0; iData < dataNumber; ++iData)
+                    {
+                        nodeValue = eighth * (dataStore(iLeftCell, jLeftCell, kLeftCell, iData) + dataStore(iLeftCell, jRightCell, kLeftCell, iData) +
+                            dataStore(iLeftCell, jLeftCell, kRightCell, iData) + dataStore(iLeftCell, jRightCell, kRightCell, iData) +
+                            dataStore(iRightCell, jLeftCell, kLeftCell, iData) + dataStore(iRightCell, jRightCell, kLeftCell, iData) +
+                            dataStore(iRightCell, jLeftCell, kRightCell, iData) + dataStore(iRightCell, jRightCell, kRightCell, iData));
+                        dumpDate[iData].push_back(nodeValue);
+                    }
+                }
+            }
+        }
+
+        TecioMission = 1;
+        PHWrite(wallDistributeData, &TecioMission, 1);
+
+        string bcName = structBC->GetBCName();
+        wallDistributeData->write_string(bcName);
+
+        int IMxOrNumPts = ied - ist + 1;
+        int JMxOrNumElements = jed - jst + 1;
+        int KMxOrNumFaces = ked - kst + 1;
+
+        PHWrite(wallDistributeData, &IMxOrNumPts, 1);
+        PHWrite(wallDistributeData, &JMxOrNumElements, 1);
+        PHWrite(wallDistributeData, &KMxOrNumFaces, 1);
+
+        PHWrite(wallDistributeData, coorCount);
+        PHWrite(wallDistributeData, vectorXCoordinate, coorCount);
+        PHWrite(wallDistributeData, vectorYCoordinate, coorCount);
+        PHWrite(wallDistributeData, vectorZCoordinate, coorCount);
+
+        int ValueLocation = 1;
+        for (int iData = 0; iData < dataNumber; ++iData)
+        {
+            PHWrite(wallDistributeData, coorCount);
+            PHWrite(wallDistributeData, ValueLocation);
+            PHWrite(wallDistributeData, dumpDate[iData], coorCount);
+        }
+    }
+
+    delete[]wallVariables;
+}
+
+void NCCRSolverStruct::ComputeHeatFlux(ActionKey *actkey, RDouble *HeatFlux)
+{
+    int level = actkey->level;
+    int nEquation = GetNumberOfEquations();
+    StructGrid *grid = StructGridCast(GetGrid(level));
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    using namespace IDX;
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+    RDouble3D &cellVolume = *(grid->GetCellVolume());
+
+    RDouble4D &heatTransferCoeff = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("heatTransferCoeff"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nDim = GetDim();
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    int wallFunctionType = GlobalDataBase::GetIntParaFromDB("wallFunctionType");
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperature = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble referenceTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    int viscousType = parameters->GetViscousType();
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+
+    RDouble gasConstant = gas->GetUniversalGasConstant();
+    //! The type of catalytic wall condition.
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();
+    int wallMultiTemperature = parameters->GetWallMultiTemperature();
+
+    RDouble2D *firstLayerHeight = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("firstLayerHeight"));
+    RDouble Twall = parameters->GetWallTemperature();    //! Temperature on wall.
+    RDouble nondimTwall = Twall / referenceTemperature;
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    RDouble wallTemperature[3] = { nondimTwall, nondimTwall, nondimTwall };
+    RDouble speciesEnthalpy[MAX_SPECIES_NUM], densityDiffusivity[MAX_SPECIES_NUM];
+
+    //! To obtain the reference values.
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble refVelocity = refDimensionalSonicSpeed * refMachNumber;
+    RDouble refSquareVelocity = refVelocity * refVelocity;
+    RDouble refDynamicPressure = refDimensionalDensity * refSquareVelocity;
+
+    RDouble2D *surfaceTemperature;
+    surfaceTemperature = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+    }
+
+    string *speciesName;
+    RDouble3D *surfaceMassFraction = NULL;
+    if (nChemical > 0 && numberOfSpecies > 0)
+    {
+        speciesName = gas->GetNameOfSpecies();
+        surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+    }
+
+    RDouble *wallVariables = new RDouble[nEquation];
+    RDouble Qtr = 0.0, Qs = 0.0, Qv = 0.0, Qe = 0.0, deltaT = 0.0;
+    RDouble Pw = 0.0, Tw = 0.0, Rhow = 0.0, absVelocity = 0.0, wallTotalEnthalpy = 0.0;
+    RDouble MaxHeatFlux = HeatFlux[0];
+    RDouble Q_total = HeatFlux[2];
+    RDouble Tw_total = HeatFlux[3];
+    RDouble Pw_total = HeatFlux[5];
+    int indexOfWall = 0, indexOfCell = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!IsWall(BCType) && BCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        Data_Param *bcParamDB = structBC->GetBCParamDataBase();
+        if (bcParamDB->IsExist("catalyticCoef", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("catalyticCoef", &catalyticCoef, PHDOUBLE, 1);
+        }
+
+        if (wallMultiTemperature == 1)
+        {
+
+            if (bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+            {
+                bcParamDB->GetData("wallTemperature", &Twall, PHDOUBLE, 1);
+            }
+            else
+            {
+                Twall = parameters->GetWallTemperature();
+            }
+            nondimTwall = Twall / referenceTemperature;
+            wallTemperature[0] = nondimTwall;
+            wallTemperature[1] = nondimTwall;
+            wallTemperature[2] = nondimTwall;
+        }
+
+            if(wallMultiTemperature == 1)
+            {
+                if(bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+                {
+                    bcParamDB->GetData("wallTemperature", &Twall, PHDOUBLE, 1);
+                }
+                else
+                {
+                    Twall = parameters->GetWallTemperature();
+                }
+                nondimTwall = Twall / referenceTemperature;
+                wallTemperature[0] = nondimTwall;
+                wallTemperature[1] = nondimTwall;
+                wallTemperature[2] = nondimTwall;
+            }
+        int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        //! Obtain the surface information.
+        int *s_lr3d = structBC->GetFaceDirectionIndex();
+        int nSurface = structBC->GetFaceDirection() + 1;
+        int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+
+        //RDouble WallTotalCells = ied * jed * ked;
+        indexOfCell = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int iWall, jWall, kWall;
+                    structBC->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                    RDouble normalComponetX = leftOrRightIndex * faceNormalComponentX(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetY = leftOrRightIndex * faceNormalComponentY(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetZ = leftOrRightIndex * faceNormalComponentZ(iWall, jWall, kWall, nSurface);
+
+                    RDouble deltaHeight = (*firstLayerHeight)(indexOfWall, indexOfCell);
+
+                    int iCellGhostLayer = i + s_lr3d[0];
+                    int jCellGhostLayer = j + s_lr3d[1];
+                    int kCellGhostLayer = k + s_lr3d[2];
+                    RDouble pressureFirstCell = primitiveVars(i, j, k, IP);
+                    wallVariables[IP] = pressureFirstCell;
+
+                    //! To obtain the variables on wall.
+                    if (nSlipBCModel > 0)
+                    {
+                        for (int m = 0; m < 3; ++ m)
+                        {
+                            wallTemperature[m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m);
+                            wallVariables[m + 1] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m + 3);
+                        }
+                        deltaT = wallTemperature[ITT] - nondimTwall;
+                    }
+                    else
+                    {
+                        if (viscousType > INVISCID)
+                        {
+                            wallVariables[IU] = 0.0;
+                            wallVariables[IV] = 0.0;
+                            wallVariables[IW] = 0.0;
+                        }
+                        else
+                        {
+                            //The velocity is used to extract the wall streamline, so this velocity is not the real velocity on wall.
+                            wallVariables[IU] = primitiveVars(i, j, k, IU);
+                            wallVariables[IV] = primitiveVars(i, j, k, IV);
+                            wallVariables[IW] = primitiveVars(i, j, k, IW);
+                        }
+
+                        deltaT = 0.0;
+                        //! Set temperature on wall.
+                        if (Twall < 0.0) //Adabatic wall.
+                        {
+                            wallTemperature[ITT] = temperature(i, j, k, mTT);
+                            wallTemperature[ITV] = temperature(i, j, k, mTV);
+                            wallTemperature[ITE] = temperature(i, j, k, mTE);
+
+                        }
+                        else //Isothermal wall or radiation equilibrium temperature wall.
+                        {
+                            wallTemperature[ITT] = (*surfaceTemperature)(indexOfWall, indexOfCell);
+                            wallTemperature[ITV] = wallTemperature[ITT];
+                            wallTemperature[ITE] = wallTemperature[ITT];
+                        }
+                    }
+
+                    //! Compute the density on wall using the state equation.
+                    wallVariables[IR] = refGama * refMachNumber * refMachNumber * wallVariables[IP] / wallTemperature[ITT];
+                    if (nChemical >= 1)
+                    {
+                        //! To obtain the mass fraction on wall.
+                        if (ABS(catalyticCoef) <= EPSILON && BCType != PHENGLEI::ABLATION_SURFACE) // Fully non-catalytic wall.
+                        {
+                            for (int s = nNSEquation; s < numberOfSpecies + nNSEquation; ++ s)
+                            {
+                                wallVariables[s] = primitiveVars(i, j, k, s);
+                            }
+                        }
+                        else // Fully catalytic wall or finite catalytic wall.
+                        {
+                            for (int s = nNSEquation; s < numberOfSpecies + nNSEquation; ++ s)
+                            {
+                                wallVariables[s] = (*surfaceMassFraction)(indexOfWall, indexOfCell, s - nNSEquation);
+                            }
+                        }
+
+                        RDouble massReciprocal = 0.0;
+                        if (nTemperatureModel > 1)     //! Multi-Temperature model.
+                        {
+                            RDouble ceDivideMe = 0.0;
+                            massReciprocal = gas->ComputeMolecularWeightReciprocalWithoutElectron(wallVariables, ceDivideMe);
+                            wallVariables[IR] = wallVariables[IP] / (gasConstant * wallTemperature[ITT] * massReciprocal + gasConstant * wallTemperature[ITE] * ceDivideMe);
+                        }
+                        else         //! One-Temperature model.
+                        {
+                            //! Obtain molecular weight of the mixture gas.
+                            massReciprocal = gas->ComputeMolecularWeightReciprocal(wallVariables);
+                            wallVariables[IR] = wallVariables[IP] / (gasConstant * wallTemperature[ITT] * massReciprocal);
+                        }
+                    }
+
+                    //! The pressure on wall.
+                    Rhow = wallVariables[IR] * refDimensionalDensity;
+                    Pw = wallVariables[IP] * refDynamicPressure;
+                    Tw = wallTemperature[ITT] * referenceTemperature;
+                    absVelocity = wallVariables[IU] * wallVariables[IU] + wallVariables[IV] * wallVariables[IV] + wallVariables[IW] * wallVariables[IW];
+
+                    wallTotalEnthalpy = 0.0;
+                    gas->ComputeEnthalpyByPrimitive(wallVariables, refGama, wallTotalEnthalpy, wallTemperature);
+                    wallTotalEnthalpy += 0.5 * absVelocity;
+                    absVelocity = sqrt(absVelocity) * refVelocity;
+                    wallTotalEnthalpy = wallTotalEnthalpy * refSquareVelocity;
+
+                    //! Pressure drag.
+
+                    RDouble heatFlux = zero;
+                    RDouble viscousCoef;
+                    RDouble dudx, dudy, dudz, dvdx, dvdy, dvdz, dwdx, dwdy, dwdz;
+                    RDouble dtdx, dtdy, dtdz;
+                    RDouble visLaminar = 0.0, visTurbulence = 0.0;
+                    RDouble heatCoeff = 0.0;
+                    if (viscousType > INVISCID)
+                    {
+                        Geometry3D *geometry3D = new Geometry3D;
+
+                        if (nSurface == 1)
+                        {
+                            //! Get i-th face vector on the wall surface.
+                            Get_GEO_I(i, j, k, iWall, iWall, nDim, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in i-direction of u,v,w,T.
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            DXDYDZ_I(temperature, geometry3D, i, j, k, nDim, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(iCellGhostLayer, j, k));
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(iCellGhostLayer, j, k));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(iCellGhostLayer, j, k, ITT);
+                            }
+                        }
+                        else if (nSurface == 2)
+                        {
+                            //! Get j-th face vector on the wall surface;.
+                            Get_GEO_J(i, j, k, jWall, jWall, nDim, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in j-direction of u,v,w,T.
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            DXDYDZ_J(temperature, geometry3D, i, j, k, nDim, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, jCellGhostLayer, k));
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, jCellGhostLayer, k));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(i, jCellGhostLayer, k, ITT);
+                            }
+                        }
+                        else
+                        {
+                            //! Get k-th face vector on the wall surface.
+                            Get_GEO_K(i, j, k, kWall, kWall, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in k-direction of u,v,w,T.
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            DXDYDZ_K(temperature, geometry3D, i, j, k, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, j, kCellGhostLayer));
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, j, kCellGhostLayer));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(i, j, kCellGhostLayer, ITT);
+                            }
+                        }
+
+                        viscousCoef = visLaminar + visTurbulence;
+                        //! To Compute the heat flux on wall.
+                        if (nChemical == 0)
+                        {
+                            RDouble kSpecificHeat = (visLaminar * oPrandtlLaminar + visTurbulence * oPrandtlTurbulence) * specificHeatAtConstantPressure;
+                            if (wallFunctionType == WALLFUNCTION::STANDARD)
+                            {
+                                if (abs(heatCoeff) > SMALL)
+                                {
+                                    kSpecificHeat = heatCoeff;
+                                }
+                            }
+                            RDouble qx = kSpecificHeat * dtdx;
+                            RDouble qy = kSpecificHeat * dtdy;
+                            RDouble qz = kSpecificHeat * dtdz;
+                            //! This value is not the real heat rate on wall, it is just the first term on the right side of the energy equation.\n
+                            //! To obtain the real value, hf = nxs * qx + nys * qy + nzs * qz, and hf is just the non-dimensional variables.\n
+                            //! To obtain the dimensional value of heat rate, hf = (nxs * qx + nys * qy + nzs * qz) * (ref_miu * ref_vel^2/ref_len).
+                            heatFlux += -(normalComponetX * qx + normalComponetY * qy + normalComponetZ * qz) * oRefReNumber;
+                        }
+                        else      //! Non-equilibrium gas.
+                        {
+                            //! Compute Heat conductivity.
+                            RDouble heatConductivity[3] = { 0.0, 0.0, 0.0 };
+                            //! To obtain the enthalpy of each species.
+                            gas->GetEverySpeciesEnthalpy(wallTemperature[ITT], wallTemperature[ITV], wallTemperature[ITE], speciesEnthalpy);
+
+                            //! To Modify the viscosity on wall.
+                            gas->ComputeViscosityByPrimitive(wallVariables, wallTemperature[ITT], wallTemperature[ITE], nonDimensionalSutherlandTemperature, visLaminar);
+                            viscousCoef = visLaminar + visTurbulence;
+
+                            //! To obtain the mass diffusion coefficients of each species.
+                            gas->GetSpeciesMassDiffusionCoef(wallVariables, visLaminar, visTurbulence, densityDiffusivity);
+
+                            //! To compute heat conductivity of mixture gas using the Eucken formula and Wassilewa formula.
+                            gas->ComputeMixtureGasHeatConductivity(wallVariables, wallTemperature[ITT], wallTemperature[ITV], wallTemperature[ITE], heatConductivity[ITT], heatConductivity[ITV], heatConductivity[ITE]);
+
+                            //! Compute the heat flux caused by the gradient of translation-rotation temperature near wall.
+                            Qtr = heatConductivity[ITT] * (temperature(i, j, k, ITT) - wallTemperature[ITT]) / deltaHeight * oRefReNumber;
+
+                            //! Compute the heat flux caused by the gradient of species enthalpies near wall.
+                            Qs = 0.0;
+                            for (int s = 0; s < numberOfSpecies; ++ s)
+                            {
+                                //! Compute the diffusion coefficient.
+                                RDouble diffusionCoefficient = densityDiffusivity[s] * speciesEnthalpy[s];
+                                //! Compute the mass diffusion energy.
+                                Qs += diffusionCoefficient * (primitiveVars(i, j, k, nNSEquation + s) - wallVariables[nNSEquation + s]) / deltaHeight;
+                            }
+                            Qs *= oRefReNumber;
+
+                            //! Compute the heat flux caused by the gradient of vibration-electron temperature near wall.
+                            Qv = 0.0;
+                            Qe = 0.0;
+                            if (nTemperatureModel == 2)
+                            {
+                                Qv = (heatConductivity[ITV] + heatConductivity[ITE]) * (temperature(i, j, k, ITV) - wallTemperature[ITV]) / deltaHeight * oRefReNumber;
+                            }
+                            else if (nTemperatureModel == 3)
+                            {
+                                Qv = heatConductivity[ITV] * (temperature(i, j, k, ITV) - wallTemperature[ITV]) / deltaHeight * oRefReNumber;
+                                Qe = heatConductivity[ITE] * (temperature(i, j, k, ITE) - wallTemperature[ITE]) / deltaHeight * oRefReNumber;
+                            }
+
+                            //! Set the total heat flux on wall.
+                            heatFlux = Qtr + Qs + Qv + Qe;
+                        }
+                        if (heatFlux > MaxHeatFlux)
+                        {
+                            MaxHeatFlux = heatFlux;
+                        }
+                        Q_total += heatFlux;
+                        Tw_total += wallTemperature[ITT];
+                        Pw_total += pressureFirstCell;
+
+                        delete geometry3D;
+                    }
+                }
+            }
+        }
+    }
+    HeatFlux[0] = MaxHeatFlux;
+    HeatFlux[1] = Q_total;
+    HeatFlux[2] = Q_total;
+    HeatFlux[3] = Tw_total;
+    HeatFlux[4] = Tw_total;
+    HeatFlux[5] = Pw_total;
+    HeatFlux[6] = Pw_total;
+    delete[]wallVariables;
+}
+
+//! To obtain the derivatives of the designate primary variable whose sequence number in the array is marked with the valued of nIndex.
+void NCCRSolverStruct::GetDerivatives(int nIndex, int iSurface, int ndim, int nlr, int i, int j, int k, int ni, int nj, int nk, RDouble4D &q,
+    RDouble4D &xfv, RDouble4D &yfv, RDouble4D &zfv, RDouble3D &vol, RDouble &dvdx, RDouble &dvdy, RDouble &dvdz)
+{
+    int p, m;
+    //! Allocate.
+    Geometry3D *geometry3D = new Geometry3D;
+
+    if (iSurface == 1)
+    {
+        p = min(i, ni - 1);
+        m = max(i - 1, 1);
+        //! Initialize.
+        Get_GEO_I(i, j, k, m, p, ndim, geometry3D, xfv, yfv, zfv, vol);
+        //! To compute the derivatives.
+        DXDYDZ_I(q, geometry3D, i, j, k, ndim, nIndex, dvdx, dvdy, dvdz, nlr);
+    }
+    else if (iSurface == 2)
+    {
+        p = min(j, nj - 1);
+        m = max(j - 1, 1);
+        //! Initialize.
+        Get_GEO_J(i, j, k, m, p, ndim, geometry3D, xfv, yfv, zfv, vol);
+        //! To compute the derivatives.
+        DXDYDZ_J(q, geometry3D, i, j, k, ndim, nIndex, dvdx, dvdy, dvdz, nlr);
+    }
+    else
+    {
+        p = min(k, nk - 1);
+        m = max(k - 1, 1);
+        //! Initialize.
+        Get_GEO_K(i, j, k, m, p, geometry3D, xfv, yfv, zfv, vol);
+        //! To compute the derivatives.
+        DXDYDZ_K(q, geometry3D, i, j, k, nIndex, dvdx, dvdy, dvdz, nlr);
+    }
+
+    delete geometry3D;
+}
+
+void NCCRSolverStruct::ExportSurfaceVariables(ActionKey *actkey)
+{
+    int level = actkey->level;
+    if (level != 0)
+    {
+        return;
+    }
+    int nDumpSurfaceInfo = GlobalDataBase::GetIntParaFromDB("nDumpSurfaceInfo");
+    if (nDumpSurfaceInfo == 1)
+    {
+        WriteSurfaceInfo(actkey);
+        return;
+    }
+
+    StructGrid *grid = StructGridCast(GetGrid(level));
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    //! The primitive temperatures.
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    //! Obtain the viscosity of turbulence.
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    RDouble refReNumber = parameters->GetRefReNumber();
+
+    RDouble refGama = parameters->GetRefGama();
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    int viscousType = parameters->GetViscousType();
+
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+    //! The area normal equals to the area multiplies the normal of the face.
+    RDouble4D &faceAreaNormalComponentX = *(grid->GetFaceVectorX());
+    RDouble4D &faceAreaNormalComponentY = *(grid->GetFaceVectorY());
+    RDouble4D &faceAreaNormalComponentZ = *(grid->GetFaceVectorZ());
+    RDouble4D &faceArea = *(grid->GetFaceArea());
+    RDouble3D &cellVolume = *(grid->GetCellVolume());
+
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    //! Compute the number of species.
+    int nSpecies = nLaminar + nChemical - nNSEquation;
+    //! The total number of equation.
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    int nSolidSurface = grid->GetNumberOfWallCell();
+    if (nSolidSurface == 0)
+    {
+        return;
+    }
+
+    RDouble speciesEnthalpy[MAX_SPECIES_NUM] = { 0 }, densityDiffusivity[MAX_SPECIES_NUM] = { 0 };
+    string *speciesName = 0;
+    RDouble3D *surfaceMassFraction = NULL;
+    if (nChemical > 0 && nSpecies > 0)   //! Allocate the memory.
+    {
+        speciesName = gas->GetNameOfSpecies();
+        surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+    }
+    //! Allocate the dynamic memory space to save the primitive variables on wall.
+    RDouble *wallVariables = new RDouble[nEquation]();
+
+    //! The type of catalytic wall condition.
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();
+    //! Temperature on wall.
+    RDouble temperatureWall = parameters->GetWallTemperature();
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    //! The non-dimensional temperature on wall.
+    RDouble temperatureWallNonDimensional = temperatureWall / refDimensionalTemperature;
+    RDouble2D *surfaceTemperature = 0;
+    if (temperatureWall >= 0.0)
+    {
+        surfaceTemperature = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+    }
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+    }
+
+    RDouble2D *firstLayerHeight = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("firstLayerHeight"));
+
+    //! The heating rate on wall. totalHeatViaGradients and totalHeatWall is the total heat rate, the former is computed with gradients,\n
+    //! while the latter is computed with the first-order difference. transRotationHeat, vibrationHeat, eletronHeat, and speciesHeat are \n
+    //! heat rate of translation-rotation, vibration, electron and species enthalpy, respectively.
+    RDouble totalHeatViaGradients = 0.0, totalHeatWall = 0.0;
+    RDouble transRotationHeat = 0.0, vibrationHeat = 0.0, eletronHeat = 0.0, speciesHeat = 0.0;
+
+    //! The computations of Qhf and Qw are different. Qhf applies the partial derivative of temperature to compute heating rate,\n
+    //! while Qw equals to (T1 - Tw)/dy, T1 denotes the temperature of the cell near the surface, Tw is the temperature on wall,\n
+    //! and dy is computed by projecting the distant vector to the surface normal, the distant vector is constructed from the center\n
+    //! of the surface to that of the cell near this surface.
+
+    RDouble wallTemperature[3] = { temperatureWallNonDimensional, temperatureWallNonDimensional, temperatureWallNonDimensional };
+    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+
+    //! Obtain the reference values.
+    RDouble refLenth = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refVelocity = parameters->GetRefDimensionalVelocity();
+    RDouble refViscosity = refDimensionalDensity * refVelocity * refLenth / refReNumber;
+    RDouble refDynamicPressure = refDimensionalDensity * refVelocity * refVelocity;
+    RDouble refHeatFluxDimension = refViscosity * refVelocity * refVelocity / refLenth;
+
+    std::ostringstream oss;
+    using namespace IDX;
+
+    vector<string> title_tecplot;
+    title_tecplot.push_back("title=\"Flow Fields of PHengLEI\"");
+    title_tecplot.push_back("variables=");
+    title_tecplot.push_back("\"x\"");
+    title_tecplot.push_back("\"y\"");
+    title_tecplot.push_back("\"z\"");
+    title_tecplot.push_back("\"rho\""); //(kg/m3)
+    title_tecplot.push_back("\"p\""); //(Pa)
+    title_tecplot.push_back("\"Ttr\""); //(K)
+    title_tecplot.push_back("\"Qhf\""); //(W/m2)
+    title_tecplot.push_back("\"Qw\""); //(W/m2)
+    title_tecplot.push_back("\"Qtr\""); //(W/m2)
+    title_tecplot.push_back("\"Qv\""); //(W/m2)
+    title_tecplot.push_back("\"Qe\""); //(W/m2)
+    title_tecplot.push_back("\"Qs\""); //(W/m2)
+
+    for (int iSpecies = 0; iSpecies < nSpecies; iSpecies ++)
+    {
+        title_tecplot.push_back(speciesName[iSpecies]);
+    }
+
+    int nDim = GetDim();
+    int js = 1;
+    int ks = 1;
+    if (nDim == 2)
+    {
+        ks = 0;
+    }
+    if (nDim == 1)
+    {
+        js = 0;
+    }
+
+    //! The non-dimensional value of constant pressure specific heat.
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+    //! The universal gas constant.
+    RDouble gasConstant = gas->GetUniversalGasConstant();
+
+    int nIndex = 0, indexOfWall = 0, indexOfCell = 0;
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();    //! Obtain the number of boundary condition regions.
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int nBCType = structBC->GetBCType();
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (!IsWall(nBCType) && nBCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            nIndex += (ied - ist + 1) * (jed - jst + 1) * (ked - kst + 1);
+            continue;
+        }
+
+        //! Obtain the surface information.
+        int *faceDirectionIndex = structBC->GetFaceDirectionIndex();
+
+        int nSurface = structBC->GetFaceDirection() + 1;
+        int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+
+        RDouble normalComponetX, normalComponetY, normalComponetZ, surfaceArea, dtdx, dtdy, dtdz, dqdx, dqdy, dqdz;
+
+        for (std::size_t i = 0; i < title_tecplot.size(); ++ i)
+        {
+            oss << title_tecplot[i] << "\n";
+        }
+        oss << "zone  i = " << ied - ist + 1
+            << " j = " << jed - jst + 1
+            << " k = " << ked - kst + 1
+            << " f = point " << " \n";
+
+        indexOfCell = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! i, j, k - is first CELL index near SOLID_SURFACE.
+                    //! iWall, jWall, kWall - is NODE index on SOLID_SURFACE.
+                    int iWall, jWall, kWall;
+                    structBC->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                    //! The index of ghost cell on the negative first layer.
+                    int iCellGhostLayer = i + faceDirectionIndex[0];
+                    int jCellGhostLayer = j + faceDirectionIndex[1];
+                    int kCellGhostLayer = k + faceDirectionIndex[2];
+
+                    normalComponetX = faceNormalComponentX(iWall, jWall, kWall, nSurface);
+                    normalComponetY = faceNormalComponentY(iWall, jWall, kWall, nSurface);
+                    normalComponetZ = faceNormalComponentZ(iWall, jWall, kWall, nSurface);
+                    surfaceArea = faceArea(iWall, jWall, kWall, nSurface);
+                    RDouble deltaHeight = (*firstLayerHeight)(indexOfWall, indexOfCell);
+
+                    RDouble xCenterWall, yCenterWall, zCenterWall;
+                    grid->FaceCoor(iWall, jWall, kWall, nSurface, xCenterWall, yCenterWall, zCenterWall);
+
+                    //! To obtain the real value, hf = nxs * qx + nys * qy + nzs * qz, and hf is just the non-dimensional variables.\n
+                    //! To obtain the dimensional value of heat rate, hf = (nxs * qx + nys * qy + nzs * qz) * (ref_miu * ref_vel^2/ref_len).
+                    //! To compute the heat rate on wall.
+                    totalHeatViaGradients = 0.0;
+                    totalHeatWall = 0.0;
+                    transRotationHeat = 0.0;
+                    vibrationHeat = 0.0;
+                    eletronHeat = 0.0;
+                    speciesHeat = 0.0;
+
+                    //! Obtain the viscosity.
+                    RDouble viscosityLaminar, viscosityTurbulence;
+                    if (viscousType > INVISCID)
+                    {
+                        viscosityLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(iCellGhostLayer, jCellGhostLayer, kCellGhostLayer));
+                        viscosityTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(iCellGhostLayer, jCellGhostLayer, kCellGhostLayer));
+                    }
+                    else
+                    {
+                        viscosityLaminar = 0.0;
+                        viscosityTurbulence = 0.0;
+                    }
+
+                    //! To obtain the variables on wall.
+                    if (nSlipBCModel > 0)
+                    {
+                        for (int m = 0; m < 3; ++ m)
+                        {
+                            wallTemperature[m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m);
+                            wallVariables[m + 1] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m + 3);
+                        }
+                    }
+                    else
+                    {
+                        if (viscousType > INVISCID)
+                        {
+                            wallVariables[IU] = 0.0;
+                            wallVariables[IV] = 0.0;
+                            wallVariables[IW] = 0.0;
+                        }
+                        else
+                        {
+                            wallVariables[IU] = primitiveVariables(i, j, k, IU);
+                            wallVariables[IV] = primitiveVariables(i, j, k, IV);
+                            wallVariables[IW] = primitiveVariables(i, j, k, IW);
+                        }
+
+                        if (temperatureWall < 0.0)
+                        {
+                            wallTemperature[ITT] = temperatures(i, j, k, mTT);
+                            wallTemperature[ITV] = temperatures(i, j, k, mTV);
+                            wallTemperature[ITE] = temperatures(i, j, k, mTE);
+                        }
+                        else
+                        {
+                            wallTemperature[ITT] = (*surfaceTemperature)(indexOfWall, indexOfCell);
+                            wallTemperature[ITV] = wallTemperature[ITT];
+                            wallTemperature[ITE] = wallTemperature[ITT];
+                        }
+                    }
+
+                    //! Obtain the pressure on wall.
+                    wallVariables[IP] = primitiveVariables(i, j, k, IP);
+                    //! Compute Heat conductivity.
+                    RDouble heatConductivity[3] = { 0.0, 0.0, 0.0 };
+                    //! Initialize heat conductivity of translation and rotation.
+                    heatConductivity[ITT] = specificHeatAtConstantPressure * (viscosityLaminar * oPrandtlLaminar + viscosityTurbulence * oPrandtlTurbulence);
+                    wallVariables[IR] = refGama * refMachNumber * refMachNumber * wallVariables[IP] / wallTemperature[ITT];
+
+                    //! Compute the heat rate of the species diffusion, added by Li Peng on Mar 11,2019.
+                    //! Chemical reaction flow.
+                    if (nChemical >= 1)
+                    {
+                        //! The isothermal wall condition and full catalytic condition.
+                        if (ABS(catalyticCoef) <= EPSILON && nBCType != PHENGLEI::ABLATION_SURFACE) //Fully non-catalytic wall.
+                        {
+                            for (int iLaminar = nNSEquation; iLaminar < nNSEquation + nSpecies; ++ iLaminar)
+                            {
+                                wallVariables[iLaminar] = primitiveVariables(i, j, k, iLaminar);
+                            }
+                        }
+                        else //Fully catalytic wall or finite catalytic wall.
+                        {
+                            for (int iLaminar = nNSEquation; iLaminar < nNSEquation + nSpecies; ++ iLaminar)
+                            {
+                                wallVariables[iLaminar] = (*surfaceMassFraction)(indexOfWall, indexOfCell, iLaminar - nNSEquation);
+                            }
+                        }
+
+                        // Compute density on surface.
+                        RDouble massReciprocal = 0.0;
+                        if (nTemperatureModel > 1)    //! Multi-Temperature model.
+                        {
+                            RDouble ceDivideMe = 0.0;
+                            massReciprocal = gas->ComputeMolecularWeightReciprocalWithoutElectron(wallVariables, ceDivideMe);
+                            wallVariables[IR] = wallVariables[IP] / (gasConstant * wallTemperature[ITT] * massReciprocal + gasConstant * wallTemperature[ITE] * ceDivideMe);
+                        }
+                        else     //! One-Temperature model.
+                        {
+                            //! Obtain molecular weight of the mixture gas.
+                            massReciprocal = gas->ComputeMolecularWeightReciprocal(wallVariables);
+                            wallVariables[IR] = wallVariables[IP] / (gasConstant * wallTemperature[ITT] * massReciprocal);
+                        }
+
+                        //! Compute internal energy of ghost cells.
+                        if (nTemperatureModel == 2) // Two-Temperature model.
+                        {
+                            //! Set the internal energy of vibration-eletron on wall.
+                            wallVariables[nLaminar + nChemical] = gas->GetMixedGasVibrationEnergy(wallVariables, wallTemperature[ITV]);
+                            wallVariables[nLaminar + nChemical] += gas->GetMixedGasElectronEnergy(wallVariables, wallTemperature[ITV]);
+                        }
+                        else if (nTemperatureModel == 3)    //! Three-Temperature model.
+                        {
+                            //! Set the internal energy of vibration-eletron on wall.
+                            wallVariables[nLaminar + nChemical] = gas->GetMixedGasVibrationEnergy(wallVariables, wallTemperature[ITV]);
+                            wallVariables[nLaminar + nChemical + 1] = gas->GetMixedGasElectronEnergy(wallVariables, wallTemperature[ITE]);
+                        }
+
+                        //! To obtain the enthalpy of each species.
+                        gas->GetEverySpeciesEnthalpy(wallTemperature[ITT], wallTemperature[ITV], wallTemperature[ITE], speciesEnthalpy);
+
+                        //! To Modify the viscosity on wall.
+                        gas->ComputeViscosityByPrimitive(wallVariables, wallTemperature[ITT], wallTemperature[ITE], nonDimensionalSutherlandTemperature, viscosityLaminar);
+
+                        //! To obtain the mass diffusion coefficients of each species.
+                        gas->GetSpeciesMassDiffusionCoef(wallVariables, viscosityLaminar, viscosityTurbulence, densityDiffusivity);
+
+                        //! To compute heat conductivity of mixture gas using the Eucken formula and Wassilewa formula.
+                        gas->ComputeMixtureGasHeatConductivity(wallVariables, wallTemperature[ITT], wallTemperature[ITV], wallTemperature[ITE], heatConductivity[0], heatConductivity[1], heatConductivity[2]);
+
+                        RDouble diffusionCoefficient = 0.0;
+                        dqdx = 0.0;
+                        dqdy = 0.0;
+                        dqdz = 0.0;
+                        //! Get the partial derivatives of species.
+                        for (int iSpecies = 0; iSpecies < nSpecies; ++ iSpecies)
+                        {
+                            //! To compute the gradients of species density on wall.
+                            RDouble dcdx, dcdy, dcdz;
+                            GetDerivatives(nNSEquation + iSpecies, nSurface, nDim, leftOrRightIndex, i, j, k, ni, nj, nk, primitiveVariables,
+                                faceAreaNormalComponentX, faceAreaNormalComponentY, faceAreaNormalComponentZ, cellVolume, dcdx, dcdy, dcdz);
+                            //! Compute the diffusion coefficient.
+                            diffusionCoefficient = densityDiffusivity[iSpecies] * speciesEnthalpy[iSpecies];
+                            dqdx += diffusionCoefficient * dcdx;
+                            dqdy += diffusionCoefficient * dcdy;
+                            dqdz += diffusionCoefficient * dcdz;
+
+                            //! Compute the mass diffusion energy.
+                            speciesHeat += diffusionCoefficient * (primitiveVariables(i, j, k, nNSEquation + iSpecies) - wallVariables[nNSEquation + iSpecies]) / deltaHeight;
+                        }
+
+                        //! The non-dimensional value of heat rate, to obtain the dimensional value by multiplying the Reynold number.
+                        totalHeatViaGradients += -leftOrRightIndex * (normalComponetX * dqdx + normalComponetY * dqdy + normalComponetZ * dqdz); //The species diffusion energy
+
+                        //! The first method using the difference of the mass fractions in the actual cell and the ghost cell.
+                        totalHeatWall += speciesHeat;
+                    }
+
+                    //! Compute the heat rate caused by the gradient of temperature.
+                    if (viscousType > INVISCID)
+                    {
+                        //! Obtain the partial derivative of temperature.
+                        GetDerivatives(ITT, nSurface, nDim, leftOrRightIndex, i, j, k, ni, nj, nk, temperatures,
+                            faceAreaNormalComponentX, faceAreaNormalComponentY, faceAreaNormalComponentZ, cellVolume, dtdx, dtdy, dtdz);
+                        dqdx = heatConductivity[0] * dtdx;
+                        dqdy = heatConductivity[0] * dtdy;
+                        dqdz = heatConductivity[0] * dtdz;
+                        //! The non-dimensional value of heat rate, to obtain the dimensional value by multiplying the Reynold number.
+                        totalHeatViaGradients += -leftOrRightIndex * (normalComponetX * dqdx + normalComponetY * dqdy + normalComponetZ * dqdz);     //! Used for comparison.
+
+                        //! Compute heat rate on wall caused by gradient of temperature.
+                        transRotationHeat = heatConductivity[0] * (temperatures(i, j, k, ITT) - wallTemperature[ITT]) / deltaHeight;
+                        totalHeatWall += transRotationHeat;
+
+                        if (nTemperatureModel == 2)     //! Two-Temperature model.
+                        {
+                            GetDerivatives(ITV, nSurface, nDim, leftOrRightIndex, i, j, k, ni, nj, nk, temperatures,
+                                faceAreaNormalComponentX, faceAreaNormalComponentY, faceAreaNormalComponentZ, cellVolume, dtdx, dtdy, dtdz);
+                            dqdx = (heatConductivity[ITV] + heatConductivity[ITE]) * dtdx;
+                            dqdy = (heatConductivity[ITV] + heatConductivity[ITE]) * dtdy;
+                            dqdz = (heatConductivity[ITV] + heatConductivity[ITE]) * dtdz;
+                            totalHeatViaGradients += -leftOrRightIndex * (normalComponetX * dqdx + normalComponetY * dqdy + normalComponetZ * dqdz); //! Addition of vibration-electron energy.
+
+                            vibrationHeat = (heatConductivity[ITV] + heatConductivity[ITE]) * (temperatures(i, j, k, ITV) - wallTemperature[ITV]) / deltaHeight;
+                            totalHeatWall += vibrationHeat;
+                        }
+                        else if (nTemperatureModel == 3)    //! Three-Temperature model.
+                        {
+                            GetDerivatives(ITV, nSurface, nDim, leftOrRightIndex, i, j, k, ni, nj, nk, temperatures,
+                                faceAreaNormalComponentX, faceAreaNormalComponentY, faceAreaNormalComponentZ, cellVolume, dtdx, dtdy, dtdz);
+                            dqdx = heatConductivity[ITV] * dtdx;
+                            dqdy = heatConductivity[ITV] * dtdy;
+                            dqdz = heatConductivity[ITV] * dtdz;
+                            totalHeatViaGradients += -leftOrRightIndex * (normalComponetX * dqdx + normalComponetY * dqdy + normalComponetZ * dqdz);// Addition of vibration energy.
+
+                            GetDerivatives(ITE, nSurface, nDim, leftOrRightIndex, i, j, k, ni, nj, nk, temperatures,
+                                faceAreaNormalComponentX, faceAreaNormalComponentY, faceAreaNormalComponentZ, cellVolume, dtdx, dtdy, dtdz);
+                            dqdx = heatConductivity[ITE] * dtdx;
+                            dqdy = heatConductivity[ITE] * dtdy;
+                            dqdz = heatConductivity[ITE] * dtdz;
+                            totalHeatViaGradients += -leftOrRightIndex * (normalComponetX * dqdx + normalComponetY * dqdy + normalComponetZ * dqdz); // Addition of electron energy.
+
+                            vibrationHeat = heatConductivity[ITV] * (temperatures(i, j, k, ITV) - wallTemperature[ITV]) / deltaHeight;
+                            eletronHeat = heatConductivity[ITE] * (temperatures(i, j, k, ITE) - wallTemperature[ITE]) / deltaHeight;
+                            totalHeatWall += vibrationHeat + eletronHeat;
+                        }
+                    }
+
+                    //! Trans the value of the heat rate to the dimensional value.
+                    totalHeatViaGradients *= refHeatFluxDimension;
+                    totalHeatWall *= refHeatFluxDimension;
+                    transRotationHeat *= refHeatFluxDimension;
+                    vibrationHeat *= refHeatFluxDimension;
+                    eletronHeat *= refHeatFluxDimension;
+                    speciesHeat *= refHeatFluxDimension;
+                    //! Trans the non-dimensional values to the dimensional values.
+                    wallVariables[IR] *= refDimensionalDensity;
+                    wallVariables[IP] *= refDynamicPressure;
+                    wallTemperature[ITT] *= refDimensionalTemperature;
+
+                    //! Write to file.
+                    int wordwidth = 20;
+                    oss << setiosflags(ios::left);
+                    oss << setiosflags(ios::scientific);
+                    oss << setprecision(10);
+                    oss << setw(wordwidth) << xCenterWall;
+                    oss << setw(wordwidth) << yCenterWall;
+                    oss << setw(wordwidth) << zCenterWall;
+                    oss << setw(wordwidth) << wallVariables[IR];
+                    oss << setw(wordwidth) << wallVariables[IP];
+                    oss << setw(wordwidth) << wallTemperature[ITT];
+                    oss << setw(wordwidth) << totalHeatViaGradients;
+                    oss << setw(wordwidth) << totalHeatWall;
+                    oss << setw(wordwidth) << transRotationHeat;
+                    oss << setw(wordwidth) << vibrationHeat;
+                    oss << setw(wordwidth) << eletronHeat;
+                    oss << setw(wordwidth) << speciesHeat;
+
+                    for (int iSpecies = 0; iSpecies < nSpecies; ++ iSpecies)
+                    {
+                        oss << setw(wordwidth) << wallVariables[iSpecies + nNSEquation];
+                    }
+                    oss << "\n";
+                    ++ nIndex;
+                    ++ indexOfCell; //Next grid cell.
+                }
+            }
+        }
+        ++ indexOfWall; //Next surface region.
+    }
+
+    //! Deallocate the dynamic memory space.
+    delete[]wallVariables;
+
+    string str = oss.str();
+
+    DataContainer *chemicalSurfaceData = actkey->GetData();
+    chemicalSurfaceData->moveto_begin();
+    chemicalSurfaceData->write(const_cast <char *> (str.data()), str.size() * sizeof(char));
+}
+
+void NCCRSolverStruct::GetSurfaceHeatingChange(ActionKey *actkey, RDouble &localMaxHeatChange)
+{
+    using namespace IDX;
+    int nDim = GetDim();
+    StructGrid *grid = StructGridCast(GetGrid(actkey->level));
+
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperature = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble *primitiveVarFarfield = reinterpret_cast <RDouble *> (GlobalDataBase::GetDataPtr("prim_inf"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+
+    int viscousType = parameters->GetViscousType();
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+    RDouble3D &cellVolume = *(grid->GetCellVolume());
+
+    RDouble gasConstant = gas->GetUniversalGasConstant();//! The universal gas constant.
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();//! The type of catalytic wall condition.
+    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+    RDouble Twall = parameters->GetWallTemperature();    //! Temperature on wall.
+    RDouble referenceTemperature = parameters->GetRefDimensionalTemperature();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nNSEquation + numberOfSpecies + nTemperatureModel - 1;
+    int wallFunctionType = GlobalDataBase::GetIntParaFromDB("wallFunctionType");
+
+    RDouble2D *surfaceTemperature = NULL;
+    if (Twall >= 0.0)
+    {
+        surfaceTemperature = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+    }
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+    }
+
+    RDouble2D *firstLayerHeight = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("firstLayerHeight"));
+    RDouble4D &heatTransferCoeff = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("heatTransferCoeff"));
+
+    //! Allocate the dynamic memory space to save the primitive variables on wall.
+    RDouble *wallVariables = new RDouble[nEquation];
+    RDouble nondimTwall = Twall / referenceTemperature;
+    RDouble wallTemperature[3] = { nondimTwall, nondimTwall, nondimTwall };
+    RDouble Qw = 0.0, Qtr = 0.0, Qs = 0.0, Qv = 0.0, Qe = 0.0, prevHeat = 0.0;
+    RDouble maxHeatChangeRatio = 0.0, localHeatChangeRatio = 0.0;
+
+    int nSurfGradMethod = 0;
+    if (GlobalDataBase::IsExist("nSurfGradMethod", PHINT, 1))
+    {
+        nSurfGradMethod = GlobalDataBase::GetIntParaFromDB("nSurfGradMethod");
+    }
+    RDouble gradTx[3] = { 0.0, 0.0, 0.0 }, gradTy[3] = { 0.0, 0.0, 0.0 }, gradTz[3] = { 0.0, 0.0, 0.0 };
+    RDouble gradCx[MAX_SPECIES_NUM] = { 0.0 }, gradCy[MAX_SPECIES_NUM] = { 0.0 }, gradCz[MAX_SPECIES_NUM] = { 0.0 };
+
+    //! The mass fraction of oxygen and nitrogen under the fully catalytic condition.
+    RDouble speciesEnthalpy[MAX_SPECIES_NUM], densityDiffusivity[MAX_SPECIES_NUM];
+    string *speciesName = NULL;
+    RDouble3D *surfaceMassFraction = NULL;
+    if (nChemical > 0 && numberOfSpecies > 0)
+    {
+        speciesName = gas->GetNameOfSpecies();
+        surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+    }
+
+    RDouble3D *surfaceHeatFlux = NULL;
+    int nSurfHeatMonitor = parameters->GetSurfaceHeatingMonitor();
+    if (nSurfHeatMonitor > 0)
+    {
+        surfaceHeatFlux = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceHeatFlux"));
+    }
+
+    //! To obtain the reference values.
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble refVelocity = refDimensionalSonicSpeed * refMachNumber;
+    RDouble refSquareVelocity = refVelocity * refVelocity;
+    RDouble refEnergy = refDimensionalDensity * refVelocity * refSquareVelocity;
+    RDouble refHeatFluxDimension = refEnergy * 0.001; // The dimensional value of total heat flux (kW/m2).
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    //! Obtain the number of boundary condition regions.
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int indexOfWall = 0, indexOfCell = 0, nStagCount = 0;
+    RDouble alpha1 = 4 * PI / 9.0, alpha2 = PI / 2.0;
+    RDouble stagHeat = 0.0; //count the heat flux of stagnation region.
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!IsWall(BCType) && BCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        //! Obtain the surface information.
+        int *s_lr3d = structBC->GetFaceDirectionIndex();
+        int nSurface = structBC->GetFaceDirection() + 1;
+        int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+
+        indexOfCell = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! i, j, k - is first CELL index near SOLID_SURFACE.
+                    //! iWall, jWall, kWall - is NODE index on SOLID_SURFACE.
+                    int iWall, jWall, kWall;
+                    structBC->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                    RDouble normalComponetX = leftOrRightIndex * faceNormalComponentX(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetY = leftOrRightIndex * faceNormalComponentY(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetZ = leftOrRightIndex * faceNormalComponentZ(iWall, jWall, kWall, nSurface);
+
+                    //! The projection of the dy called the distance between the center of the cell and that of the surface on normal vector.
+                    //RDouble deltaHeight = fabs((xCellCenter - xCenterWall) * normalComponetX + (yCellCenter - yCenterWall) * normalComponetY + (zCellCenter - zCenterWall) * normalComponetZ);
+                    RDouble deltaHeight = (*firstLayerHeight)(indexOfWall, indexOfCell);
+
+                    //Compute the collision angle.
+                    RDouble nx = -normalComponetX;
+                    RDouble ny = -normalComponetY;
+                    RDouble nz = -normalComponetZ;
+                    RDouble product = primitiveVarFarfield[IU] * nx + primitiveVarFarfield[IV] * ny + primitiveVarFarfield[IW] * nz;
+                    RDouble modNormal = sqrt(nx * nx + ny * ny + nz * nz);
+                    RDouble modVelocity = sqrt(primitiveVarFarfield[IU] * primitiveVarFarfield[IU] + primitiveVarFarfield[IV] * primitiveVarFarfield[IV] + primitiveVarFarfield[IW] * primitiveVarFarfield[IW]);
+                    RDouble alpha = acos(product / (modVelocity * modNormal)) - PI / 2.0;
+
+                    //! The index of  first ghost cell layer near SOLID_SURFACE.
+                    int iCellGhostLayer = i + s_lr3d[0];
+                    int jCellGhostLayer = j + s_lr3d[1];
+                    int kCellGhostLayer = k + s_lr3d[2];
+
+                    //! To obtain the variables on wall.
+                    wallVariables[IP] = primitiveVars(i, j, k, IP);
+                    if (nSlipBCModel > 0)
+                    {
+                        for (int m = 0; m < 3; ++ m)
+                        {
+                            wallTemperature[m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m);
+                            wallVariables[m + 1] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m + 3);
+                        }
+                    }
+                    else
+                    {
+                        if (viscousType > INVISCID)
+                        {
+                            wallVariables[IU] = 0.0;
+                            wallVariables[IV] = 0.0;
+                            wallVariables[IW] = 0.0;
+                        }
+                        else
+                        {
+                            //The velocity is used to extract the wall streamline, so this velocity is not the real velocity on wall.
+                            wallVariables[IU] = primitiveVars(i, j, k, IU);
+                            wallVariables[IV] = primitiveVars(i, j, k, IV);
+                            wallVariables[IW] = primitiveVars(i, j, k, IW);
+                        }
+
+                        //! Set temperature on wall.
+                        if (Twall < 0.0) //Adabatic wall.
+                        {
+                            wallTemperature[ITT] = temperature(i, j, k, mTT);
+                            wallTemperature[ITV] = temperature(i, j, k, mTV);
+                            wallTemperature[ITE] = temperature(i, j, k, mTE);
+                        }
+                        else //Isothermal wall or radiation equilibrium temperature wall.
+                        {
+                            wallTemperature[ITT] = (*surfaceTemperature)(indexOfWall, indexOfCell);
+                            wallTemperature[ITV] = wallTemperature[ITT];
+                            wallTemperature[ITE] = wallTemperature[ITT];
+                        }
+                    }
+
+                    //! Compute the density on wall using the state equation.
+                    wallVariables[IR] = refGama * refMachNumber * refMachNumber * wallVariables[IP] / wallTemperature[ITT];
+                    if (nChemical >= 1)
+                    {
+                        //! To obtain the mass fraction on wall.
+                        if (ABS(catalyticCoef) <= EPSILON && BCType != PHENGLEI::ABLATION_SURFACE) // Fully non-catalytic wall.
+                        {
+                            for (int s = nNSEquation; s < numberOfSpecies + nNSEquation; ++ s)
+                            {
+                                wallVariables[s] = primitiveVars(i, j, k, s);
+                            }
+                        }
+                        else // Fully catalytic wall or finite catalytic wall.
+                        {
+                            for (int s = nNSEquation; s < numberOfSpecies + nNSEquation; ++ s)
+                            {
+                                wallVariables[s] = (*surfaceMassFraction)(indexOfWall, indexOfCell, s - nNSEquation);
+                            }
+                        }
+
+                        RDouble massReciprocal = 0.0;
+                        if (nTemperatureModel > 1)     //! Multi-Temperature model.
+                        {
+                            RDouble ceDivideMe = 0.0;
+                            massReciprocal = gas->ComputeMolecularWeightReciprocalWithoutElectron(wallVariables, ceDivideMe);
+                            wallVariables[IR] = wallVariables[IP] / (gasConstant * wallTemperature[ITT] * massReciprocal + gasConstant * wallTemperature[ITE] * ceDivideMe);
+                        }
+                        else         //! One-Temperature model.
+                        {
+                            //! Obtain molecular weight of the mixture gas.
+                            massReciprocal = gas->ComputeMolecularWeightReciprocal(wallVariables);
+                            wallVariables[IR] = wallVariables[IP] / (gasConstant * wallTemperature[ITT] * massReciprocal);
+                        }
+                    }
+
+                    RDouble dudx, dudy, dudz, dvdx, dvdy, dvdz, dwdx, dwdy, dwdz;
+                    RDouble dtdx, dtdy, dtdz;
+                    RDouble visLaminar = 0.0, visTurbulence = 0.0;
+                    RDouble heatCoeff = 0.0, heatFlux = 0.0;
+                    if (viscousType > INVISCID)
+                    {
+                        Geometry3D *geometry3D = new Geometry3D;
+
+                        if (nSurface == 1)
+                        {
+                            //! Get i-th face vector on the wall surface.
+                            Get_GEO_I(i, j, k, iWall, iWall, nDim, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in i-direction of u,v,w,T.
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            //DXDYDZ_I(temperature, geometry3D, i, j, k, nDim, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            for (int m = 0; m < nTemperatureModel; ++ m)
+                            {
+                                DXDYDZ_I(temperature, geometry3D, i, j, k, nDim, m, gradTx[m], gradTy[m], gradTz[m], leftOrRightIndex);
+                            }
+                            for (int m = 0; m < numberOfSpecies; ++ m)
+                            {
+                                DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, m + nNSEquation, gradCx[m], gradCy[m], gradCz[m], leftOrRightIndex);
+                            }
+
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(iCellGhostLayer, j, k));
+                            visTurbulence = 0.0;
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(iCellGhostLayer, j, k));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(iCellGhostLayer, j, k, ITT);
+                            }
+                        }
+                        else if (nSurface == 2)
+                        {
+                            //! Get j-th face vector on the wall surface;.
+                            Get_GEO_J(i, j, k, jWall, jWall, nDim, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in j-direction of u,v,w,T.
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            //DXDYDZ_J(temperature, geometry3D, i, j, k, nDim, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            for (int m = 0; m < nTemperatureModel; ++ m)
+                            {
+                                DXDYDZ_J(temperature, geometry3D, i, j, k, nDim, m, gradTx[m], gradTy[m], gradTz[m], leftOrRightIndex);
+                            }
+                            for (int m = 0; m < numberOfSpecies; ++ m)
+                            {
+                                DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, m + nNSEquation, gradCx[m], gradCy[m], gradCz[m], leftOrRightIndex);
+                            }
+
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, jCellGhostLayer, k));
+                            visTurbulence = 0.0;
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, jCellGhostLayer, k));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(i, jCellGhostLayer, k, ITT);
+                            }
+                        }
+                        else
+                        {
+                            //! Get k-th face vector on the wall surface.
+                            Get_GEO_K(i, j, k, kWall, kWall, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in k-direction of u,v,w,T.
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            //DXDYDZ_K(temperature, geometry3D, i, j, k, nDim, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            for (int m = 0; m < nTemperatureModel; ++ m)
+                            {
+                                DXDYDZ_K(temperature, geometry3D, i, j, k, m, gradTx[m], gradTy[m], gradTz[m], leftOrRightIndex);
+                            }
+                            for (int m = 0; m < numberOfSpecies; ++ m)
+                            {
+                                DXDYDZ_K(primitiveVars, geometry3D, i, j, k, m + nNSEquation, gradCx[m], gradCy[m], gradCz[m], leftOrRightIndex);
+                            }
+
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, j, kCellGhostLayer));
+                            visTurbulence = 0.0;
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, j, kCellGhostLayer));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(i, j, kCellGhostLayer, ITT);
+                            }
+                        }
+                        dtdx = gradTx[ITT];
+                        dtdy = gradTy[ITT];
+                        dtdz = gradTz[ITT];
+                        RDouble viscousCoef = visLaminar + visTurbulence;
+
+                        //! To Compute the heat flux on wall.
+                        if (nChemical == 0)
+                        {
+                            RDouble kSpecificHeat = (visLaminar * oPrandtlLaminar + visTurbulence * oPrandtlTurbulence) * specificHeatAtConstantPressure;
+                            if (wallFunctionType == WALLFUNCTION::STANDARD)
+                            {
+                                if (abs(heatCoeff) > SMALL)
+                                {
+                                    kSpecificHeat = heatCoeff;
+                                }
+                            }
+                            RDouble qx = kSpecificHeat * dtdx;
+                            RDouble qy = kSpecificHeat * dtdy;
+                            RDouble qz = kSpecificHeat * dtdz;
+                            //! This value is not the real heat rate on wall, it is just the first term on the right side of the energy equation.\n
+                            //! To obtain the real value, hf = nxs * qx + nys * qy + nzs * qz, and hf is just the non-dimensional variables.\n
+                            //! To obtain the dimensional value of heat rate, hf = (nxs * qx + nys * qy + nzs * qz) * (ref_miu * ref_vel^2/ref_len).
+                            heatFlux += -(normalComponetX * qx + normalComponetY * qy + normalComponetZ * qz) * oRefReNumber;
+                        }
+                        else      //! Non-equilibrium gas.
+                        {
+                            //! Compute Heat conductivity.
+                            RDouble heatConductivity[3] = { 0.0, 0.0, 0.0 };
+                            //! To obtain the enthalpy of each species.
+                            gas->GetEverySpeciesEnthalpy(wallTemperature[ITT], wallTemperature[ITV], wallTemperature[ITE], speciesEnthalpy);
+
+                            //! To Modify the viscosity on wall.
+                            gas->ComputeViscosityByPrimitive(wallVariables, wallTemperature[ITT], wallTemperature[ITE], nonDimensionalSutherlandTemperature, visLaminar);
+                            viscousCoef = visLaminar + visTurbulence;
+
+                            //! To obtain the mass diffusion coefficients of each species.
+                            gas->GetSpeciesMassDiffusionCoef(wallVariables, visLaminar, visTurbulence, densityDiffusivity);
+
+                            //! To compute heat conductivity of mixture gas using the Eucken formula and Wassilewa formula.
+                            gas->ComputeMixtureGasHeatConductivity(wallVariables, wallTemperature[ITT], wallTemperature[ITV], wallTemperature[ITE], heatConductivity[ITT], heatConductivity[ITV], heatConductivity[ITE]);
+
+                            if (nSurfGradMethod > 0)
+                            {
+                                //! Compute the heat flux caused by the gradient of translation-rotation temperature near wall.
+                                Qtr = -heatConductivity[ITT] * (normalComponetX * gradTx[ITT] + normalComponetY * gradTy[ITT] + normalComponetZ * gradTz[ITT]) * oRefReNumber;
+
+                                //! Compute the heat flux caused by the gradient of species enthalpies near wall.
+                                Qs = 0.0;
+                                for (int s = 0; s < numberOfSpecies; ++ s)
+                                {
+                                    //! Compute the diffusion coefficient.
+                                    RDouble diffusionCoefficient = densityDiffusivity[s] * speciesEnthalpy[s];
+                                    //! Compute the mass diffusion energy.
+                                    Qs += -diffusionCoefficient * (normalComponetX * gradCx[s] + normalComponetY * gradCy[s] + normalComponetZ * gradCz[s]);
+                                }
+                                Qs *= oRefReNumber;
+
+                                //! Compute the heat flux caused by the gradient of vibration-electron temperature near wall.
+                                Qv = 0.0;
+                                Qe = 0.0;
+                                if (nTemperatureModel == 2)
+                                {
+                                    Qv = -(heatConductivity[ITV] + heatConductivity[ITE]) * (normalComponetX * gradTx[ITV] + normalComponetY * gradTy[ITV] + normalComponetZ * gradTz[ITV]) * oRefReNumber;
+                                }
+                                else if (nTemperatureModel == 3)
+                                {
+                                    Qv = -heatConductivity[ITV] * (normalComponetX * gradTx[ITV] + normalComponetY * gradTy[ITV] + normalComponetZ * gradTz[ITV]) * oRefReNumber;
+                                    Qe = -heatConductivity[ITE] * (normalComponetX * gradTx[ITE] + normalComponetY * gradTy[ITE] + normalComponetZ * gradTz[ITE]) * oRefReNumber;
+                                }
+                            }
+                            else
+                            {
+                                //! Compute the heat flux caused by the gradient of translation-rotation temperature near wall.
+                                Qtr = heatConductivity[ITT] * (temperature(i, j, k, ITT) - wallTemperature[ITT]) / deltaHeight * oRefReNumber;
+
+                                //! Compute the heat flux caused by the gradient of species enthalpies near wall.
+                                Qs = 0.0;
+                                for (int s = 0; s < numberOfSpecies; ++ s)
+                                {
+                                    //! Compute the diffusion coefficient.
+                                    RDouble diffusionCoefficient = densityDiffusivity[s] * speciesEnthalpy[s];
+                                    //! Compute the mass diffusion energy.
+                                    Qs += diffusionCoefficient * (primitiveVars(i, j, k, nNSEquation + s) - wallVariables[nNSEquation + s]) / deltaHeight;
+                                }
+                                Qs *= oRefReNumber;
+
+                                //! Compute the heat flux caused by the gradient of vibration-electron temperature near wall.
+                                Qv = 0.0;
+                                Qe = 0.0;
+                                if (nTemperatureModel == 2)
+                                {
+                                    Qv = (heatConductivity[ITV] + heatConductivity[ITE]) * (temperature(i, j, k, ITV) - wallTemperature[ITV]) / deltaHeight * oRefReNumber;
+                                }
+                                else if (nTemperatureModel == 3)
+                                {
+                                    Qv = heatConductivity[ITV] * (temperature(i, j, k, ITV) - wallTemperature[ITV]) / deltaHeight * oRefReNumber;
+                                    Qe = heatConductivity[ITE] * (temperature(i, j, k, ITE) - wallTemperature[ITE]) / deltaHeight * oRefReNumber;
+                                }
+                            }
+
+                            //! Set the total heat flux on wall.
+                            heatFlux = Qtr + Qs + Qv + Qe;
+                            Qtr *= refHeatFluxDimension;
+                            Qs *= refHeatFluxDimension;
+                            Qv *= refHeatFluxDimension;
+                            Qe *= refHeatFluxDimension;
+                        }
+                        //The dimensional value of total surface heating ratio.
+                        Qw = heatFlux * refHeatFluxDimension;
+                        delete geometry3D;
+                    }
+
+                    prevHeat = (*surfaceHeatFlux)(indexOfWall, indexOfCell, 0);
+                    deltaHeight = heatFlux - prevHeat;
+                    if (fabs(prevHeat) <= EPSILON)
+                    {
+                        localHeatChangeRatio = fabs(deltaHeight / EPSILON);
+                    }
+                    else
+                    {
+                        localHeatChangeRatio = fabs(deltaHeight / prevHeat);
+                    }
+                    (*surfaceHeatFlux)(indexOfWall, indexOfCell, 0) = heatFlux;
+                    (*surfaceHeatFlux)(indexOfWall, indexOfCell, 1) = deltaHeight;
+
+                    maxHeatChangeRatio = MAX(maxHeatChangeRatio, localHeatChangeRatio);
+
+                    //! Obtain the heat flux of stagnation point.
+                    if (alpha >= alpha1 && alpha <= alpha2) //Find the stagnation region.
+                    {
+                        stagHeat += heatFlux;
+                        ++ nStagCount;
+                    }
+
+                    //! Next grid cell.
+                    ++ indexOfCell;
+                }//! i end
+            }//! j end
+        }//! k end
+        ++ indexOfWall; //! Next surface region.
+    }//! iBCRegion end
+
+    RDouble stagPointHeat = 0.0;
+    if (nStagCount > 0)
+    {
+        stagPointHeat = stagHeat / nStagCount;
+    }
+    localMaxHeatChange = maxHeatChangeRatio;
+}
+
+void NCCRSolverStruct::WriteSurfaceInfo(ActionKey *actkey)
+{
+    StructGrid *grid = StructGridCast(GetGrid(actkey->level));
+    int nSurfaceCell = grid->GetNumberOfWallCell();
+    if (nSurfaceCell == 0)
+    {
+        return;
+    }
+
+    RDouble4D &faceArea = *(grid->GetFaceArea());
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble temperatureWall = parameters->GetWallTemperature();
+    RDouble2D *surfaceTemperature = NULL;
+    if (temperatureWall >= 0.0)
+    {
+        surfaceTemperature = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+    }
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble refTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble refLenth = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+    RDouble refAera = refLenth * refLenth;
+
+    std::ostringstream oss;
+    using namespace IDX;
+    vector<string> title_tecplot;
+    title_tecplot.push_back("title=\"Surface Information of PHengLEI\"");
+    title_tecplot.push_back("variables=");
+    title_tecplot.push_back("\"x\"");
+    title_tecplot.push_back("\"y\"");
+    title_tecplot.push_back("\"z\"");
+    title_tecplot.push_back("\"T\"");
+    title_tecplot.push_back("\"S\"");
+
+    int nDim = GetDim();
+    int js = 1;
+    int ks = 1;
+    if (nDim == 2)
+    {
+        ks = 0;
+        refAera = refLenth;
+    }
+    if (nDim == 1)
+    {
+        js = 0;
+    }
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    //! Obtain the number of boundary condition regions.
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int nIndex = 0, indexOfWall = 0, indexOfCell = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int nBCType = structBC->GetBCType();
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (!IsWall(nBCType))
+        {
+            nIndex += (ied - ist + 1) * (jed - jst + 1) * (ked - kst + 1);
+            continue;
+        }
+
+        //! Obtain the surface information.
+        int nSurface = structBC->GetFaceDirection() + 1;
+
+        //! Write the title information.
+        for (std::size_t i = 0; i < title_tecplot.size(); ++ i)
+        {
+            oss << title_tecplot[i] << "\n";
+        }
+        oss << "zone  i = " << ied - ist + 1
+            << " j = " << jed - jst + 1
+            << " k = " << ked - kst + 1
+            << " f = point " << " \n";
+
+        RDouble Tw = 1.0, surfaceAera = SMALL;
+        indexOfCell = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! i, j, k - is first CELL index near SOLID_SURFACE.
+                    //! iWall, jWall, kWall - is NODE index on SOLID_SURFACE.
+                    int iWall, jWall, kWall;
+                    structBC->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                    //! Obtain the surface aera.
+                    surfaceAera = faceArea(iWall, jWall, kWall, nSurface);
+                    RDouble xCenterWall, yCenterWall, zCenterWall;
+                    grid->FaceCoor(iWall, jWall, kWall, nSurface, xCenterWall, yCenterWall, zCenterWall);
+
+                    //! Obtain the temperature on wall.
+                    if (temperatureWall >= 0.0)
+                    {
+                        Tw = (*surfaceTemperature)(indexOfWall, indexOfCell);
+                    }
+                    else
+                    {
+                        Tw = temperatures(i, j, k, ITT);
+                    }
+                    Tw *= refTemperature;
+                    surfaceAera *= refAera;
+
+                    //! Write to file.
+                    int wordwidth = 20;
+                    oss << setiosflags(ios::left);
+                    oss << setiosflags(ios::scientific);
+                    oss << setprecision(10);
+                    oss << setw(wordwidth) << xCenterWall;
+                    oss << setw(wordwidth) << yCenterWall;
+                    oss << setw(wordwidth) << zCenterWall;
+                    oss << setw(wordwidth) << Tw;
+                    oss << setw(wordwidth) << surfaceAera;
+                    oss << "\n";
+
+                    ++ nIndex;
+                    ++ indexOfCell; //! Next grid cell.
+                }
+            }
+        }
+        ++ indexOfWall; //! Next surface region.
+    }
+
+    string str = oss.str();
+    DataContainer *chemicalSurfaceData = actkey->GetData();
+    chemicalSurfaceData->moveto_begin();
+    chemicalSurfaceData->write(const_cast <char *> (str.data()), str.size() * sizeof(char));
+}
+
+void NCCRSolverStruct::GetResidual(ActionKey *actkey)
+{
+    int level = actkey->level;
+    int nEquation = GetNumberOfEquations();
+
+    StructGrid *grid = StructGridCast(GetGrid(level));
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+
+    PHSPACE::ComputeResidualonGrid(grid, actkey, residual, nEquation);
+}
+
+void NCCRSolverStruct::GetResidual(ActionKey *actkey, RDouble &localMaxRes)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+
+    int varIndex = 0;
+    if (GlobalDataBase::IsExist("nKeyVariableIndex", PHINT, 1))
+    {
+        varIndex = GlobalDataBase::GetIntParaFromDB("nKeyVariableIndex");
+    }
+
+    RDouble *maxResidualVariation = reinterpret_cast <RDouble *> (grid->GetDataPtr("maxResidualVariation"));
+
+    localMaxRes = maxResidualVariation[varIndex];
+}
+
+void NCCRSolverStruct::GetResidual(Grid *gridIn, RDouble &localMaxRes)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    
+    int varIndex = 0;
+    if (GlobalDataBase::IsExist("nKeyVariableIndex", PHINT, 1))
+    {
+        varIndex = GlobalDataBase::GetIntParaFromDB("nKeyVariableIndex");
+    }
+
+    RDouble *maxResidualVariation = reinterpret_cast <RDouble *> (grid->GetDataPtr("maxResidualVariation"));
+
+    localMaxRes = maxResidualVariation[varIndex];
+}
+
+void NCCRSolverStruct::ObtainCFLNumber(Grid *gridIn, RDouble &globalMinCFL, RDouble &globalMaxCFL)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    RDouble3D *localCFL = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("localCFL"));
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    globalMinCFL = LARGE;
+    globalMaxCFL = SMALL;
+    RDouble cfl = 0.0;
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                cfl = (*localCFL)(i, j, k);
+                globalMinCFL = MIN(globalMinCFL, cfl);
+                globalMaxCFL = MAX(globalMaxCFL, cfl);
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::ComputeVorticitybyQCriteria(Grid *gridIn, RDouble3D *&XVorticity, RDouble3D *&YVorticity, RDouble3D *&ZVorticity, RDouble3D *&vorticityMagnitude, RDouble3D *&strainRate, RDouble3D *&QCriteria)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    using namespace IDX;
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                RDouble dudx = gradUVWTCellCenterX(i, j, k, 0);
+                RDouble dudy = gradUVWTCellCenterY(i, j, k, 0);
+                RDouble dudz = gradUVWTCellCenterZ(i, j, k, 0);
+
+                RDouble dvdx = gradUVWTCellCenterX(i, j, k, 1);
+                RDouble dvdy = gradUVWTCellCenterY(i, j, k, 1);
+                RDouble dvdz = gradUVWTCellCenterZ(i, j, k, 1);
+
+                RDouble dwdx = gradUVWTCellCenterX(i, j, k, 2);
+                RDouble dwdy = gradUVWTCellCenterY(i, j, k, 2);
+                RDouble dwdz = gradUVWTCellCenterZ(i, j, k, 2);
+
+                RDouble s11 = dudx;
+                RDouble s22 = dvdy;
+                RDouble s33 = dwdz;
+                RDouble s12 = half * (dudy + dvdx);
+                RDouble s13 = half * (dudz + dwdx);
+                RDouble s23 = half * (dvdz + dwdy);
+                RDouble S = two * (s11 * s11 + s22 * s22 + s33 * s33 + two * (s12 * s12 + s13 * s13 + s23 * s23));
+                S = sqrt(S);
+                (*strainRate)(i, j, k) = S;
+
+                RDouble Omx = dwdy - dvdz;
+                RDouble Omy = dudz - dwdx;
+                RDouble Omz = dvdx - dudy;
+                RDouble Om = DISTANCE(Omx, Omy, Omz);
+
+                (*XVorticity)(i, j, k) = Omx;
+                (*YVorticity)(i, j, k) = Omy;
+                (*ZVorticity)(i, j, k) = Omz;
+                (*vorticityMagnitude)(i, j, k) = Om;
+
+                (*QCriteria)(i, j, k) = fourth * (Om * Om - S * S);
+
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::ComputeCp(Grid *gridIn, RDouble4D *&pressureCoef)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Range M(0, 0);
+
+    pressureCoef = new RDouble4D(I, J, K, M, fortranArray);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    using namespace IDX;
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    RDouble presureFarfield = primitiveVarFarfield[IP];
+
+    int m = 0;
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                (*pressureCoef)(i, j, k, m) = two * (primitiveVars(i, j, k, IP) - presureFarfield);
+            }
+        }
+    }
+}
+
+    RDouble4D *NCCRSolverStruct::ComputePrimitiveVariablesWithMoleFraction(Grid *gridIn)
+    {
+        StructGrid *grid = StructGridCast(gridIn);
+        int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();
+
+        Range I, J, K;
+        GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+        int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+        grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+        RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+        using namespace IDX;
+        using namespace GAS_SPACE;
+        Param_NSSolverStruct *parameters = GetControlParameters();
+        int nm = parameters->GetNSEquationNumber();
+        int nSpeciesNumber = parameters->GetNumberOfSpecies();
+
+        Range M(0, nSpeciesNumber - 1);
+
+        RDouble4D *moleFraction = new RDouble4D(I, J, K, M, fortranArray);
+
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    RDouble *massFractionTemp = new RDouble[nSpeciesNumber];
+                    RDouble *moleFractionTemp = new RDouble[nSpeciesNumber];
+                    for (int m = 0; m < nSpeciesNumber; ++ m)
+                    {
+                        massFractionTemp[m] = primitiveVars(i, j, k, nm + m);
+                    }
+                    gas->ComputeMoleFractionByMassFraction(massFractionTemp,moleFractionTemp);
+
+                    for (int m = 0; m < nSpeciesNumber; ++ m)
+                    {
+                        (*moleFraction)(i, j, k, m) = moleFractionTemp[m];
+                    }
+                    delete []massFractionTemp;
+                    delete []moleFractionTemp;
+                }
+            }
+        }
+        return moleFraction;
+    }
+
+RDouble4D *NCCRSolverStruct::ComputeDimensionalVariables(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    //! Allocate the memories for density, pressure, temperature and the number density of electron.
+    Range M(0, 5);
+    RDouble4D *dimensionalVariables = new RDouble4D(I, J, K, M, fortranArray);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble refDensity = parameters->GetRefDimensionalDensity();
+    RDouble refTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble refVelocity = parameters->GetRefDimensionalVelocity();//parameters->GetRefMachNumber() * parameters->GetRefDimensionalSonicSpeed();
+    RDouble refPressure = refDensity * refVelocity * refVelocity;
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                //! Compute the dimensional density.
+                (*dimensionalVariables)(i, j, k, 0) = refDensity * primitiveVars(i, j, k, IR);
+
+                //! Compute the dimensional velocity.
+                (*dimensionalVariables)(i, j, k, 1) = refVelocity * primitiveVars(i, j, k, IU);
+                (*dimensionalVariables)(i, j, k, 2) = refVelocity * primitiveVars(i, j, k, IV);
+                (*dimensionalVariables)(i, j, k, 3) = refVelocity * primitiveVars(i, j, k, IW);
+
+                //! Compute the dimensional pressure.
+                (*dimensionalVariables)(i, j, k, 4) = refPressure * primitiveVars(i, j, k, IP);
+
+                //! Compute the dimensional temperature.
+                (*dimensionalVariables)(i, j, k, 5) = refTemperature * temperatures(i, j, k, ITT);
+            }
+        }
+    }
+
+    return dimensionalVariables;
+}
+
+RDouble4D *NCCRSolverStruct::ComputeDimensionalElectron(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    //! Allocate the memories for density, pressure, temperature and the number density of electron.
+    Range M(0, 0);
+    RDouble4D *tmpArray = new RDouble4D(I, J, K, M, fortranArray);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble refDensity = parameters->GetRefDimensionalDensity();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int indexOfElectron = parameters->GetIndexOfElectron();
+
+    RDouble rho = 0.0, Ce = 0.0;
+    if (indexOfElectron >= 0)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    //! Compute the dimensional density.
+                    rho = refDensity * primitiveVars(i, j, k, IR);
+
+                    //! Compute the number density of electron.
+                    Ce = primitiveVars(i, j, k, nNSEquation + indexOfElectron);
+
+                    (*tmpArray)(i, j, k, 0) = MAX(1.0e-25, rho * Ce * AVOGADRO_CONSTANT / 5.486e-7);
+                }
+            }
+        }
+    }
+    else
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    (*tmpArray)(i, j, k, 0) = 0.0;
+                }
+            }
+        }
+    }
+
+    return tmpArray;
+}
+
+RDouble4D *NCCRSolverStruct::ComputeNonequiliriumNumber(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    //Allocate the memories for the non-equilibrium number.
+    Range M(0, 1);
+    RDouble4D *tmpArray = new RDouble4D(I, J, K, M, fortranArray);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    RDouble4D *timeScale;
+    RDouble3D *damkohlerNumber = NULL;
+    RDouble3D *vibNoneqNumber = NULL;
+    FluidParameter refParam;
+    gas->GetReferenceParameters(refParam);
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    int nUseNoneqCond = parameters->GetNonequilibriumConditionFlag();
+    if (nUseNoneqCond > 0)
+    {
+        timeScale = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("timeScale"));
+        if (nChemical > 0)
+        {
+            damkohlerNumber = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("DamkohlerNumber"));
+            vibNoneqNumber = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("VibNoneqNumber"));
+        }
+    }
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                (*tmpArray)(i, j, k, 0) = 0.0;
+                (*tmpArray)(i, j, k, 1) = 0.0;
+                if (nChemical > 0&& nUseNoneqCond > 0)
+                {
+                    (*tmpArray)(i, j, k, 0) = (*damkohlerNumber)(i, j, k);
+                    (*tmpArray)(i, j, k, 1) = (*vibNoneqNumber)(i, j, k);
+                }
+            }
+        }
+    }
+
+    return tmpArray;
+}
+RDouble4D *NCCRSolverStruct::ComputeMachNumberField(Grid *gridIn)
+{
+    const RDouble gamma = 1.4;
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+    Range M(0, 0);
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D *mach = new RDouble4D(I, J, K, M, fortranArray);
+
+    using namespace IDX;
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    int m = 0;
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                RDouble rm = q(i, j, k, IR);
+                RDouble um = q(i, j, k, IU);
+                RDouble vm = q(i, j, k, IV);
+                RDouble wm = q(i, j, k, IW);
+                RDouble pm = q(i, j, k, IP);
+                RDouble c2 = abs(gamma * pm / (rm + SMALL));
+                RDouble v2 = um * um + vm * vm + wm * wm;
+
+                (*mach)(i, j, k, m) = sqrt(v2 / (c2 + SMALL));
+            }
+        }
+    }
+
+    return mach;
+}
+
+RDouble4D *NCCRSolverStruct::CompMachNodeNumber(Grid *gridIn, Post_Visual *postVisualization)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, 0, I, J, K);
+    Range M(0, 0);
+
+    RDouble4D *r = (RDouble4D *)postVisualization->GetVisualNodeVarPtr("density");
+    RDouble4D *u = (RDouble4D *)postVisualization->GetVisualNodeVarPtr("u");
+    RDouble4D *v = (RDouble4D *)postVisualization->GetVisualNodeVarPtr("v");
+    RDouble4D *w = (RDouble4D *)postVisualization->GetVisualNodeVarPtr("w");
+    RDouble4D *p = (RDouble4D *)postVisualization->GetVisualNodeVarPtr("pressure");
+    RDouble4D *gama = (RDouble4D *)postVisualization->GetVisualNodeVarPtr("gama");
+
+    RDouble4D *mach = new RDouble4D(I, J, K, M, fortranArray);
+
+    int iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd;
+    grid->GetNodeIterationIndex(iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd);
+
+    int m = 0;
+    for (int k = kNodeStart; k <= kNodeEnd; ++k)
+    {
+        for (int j = jNodeStart; j <= jNodeEnd; ++j)
+        {
+            for (int i = iNodeStart; i <= iNodeEnd; ++i)
+            {
+                RDouble rm = (*r)(i, j, k, 0);
+                RDouble um = (*u)(i, j, k, 0);
+                RDouble vm = (*v)(i, j, k, 0);
+                RDouble wm = (*w)(i, j, k, 0);
+                RDouble pm = (*p)(i, j, k, 0);
+                RDouble c2 = abs((*gama)(i, j, k, 0) * pm / (rm + SMALL));
+                RDouble v2 = um * um + vm * vm + wm * wm;
+
+                (*mach)(i, j, k, m) = sqrt(v2 / (c2 + SMALL));
+            }
+        }
+    }
+
+    if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_GAMA)))
+    {
+        delete gama;
+    }
+
+    if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DENSITY)))
+    {
+        delete r;
+    }
+
+    if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_U)))
+    {
+        delete u;
+    }
+
+    if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_V)))
+    {
+        delete v;
+    }
+
+    if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_W)))
+    {
+        delete w;
+    }
+
+    if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_PRESSURE)))
+    {
+        delete p;
+    }
+
+    return mach;
+}
+
+RDouble4D *NCCRSolverStruct::CompMachNumber(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+    Range M(0, 0);
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &gama = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble4D *mach = new RDouble4D(I, J, K, M, fortranArray);
+
+    using namespace IDX;
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    int m = 0;
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                RDouble rm = q(i, j, k, IR);
+                RDouble um = q(i, j, k, IU);
+                RDouble vm = q(i, j, k, IV);
+                RDouble wm = q(i, j, k, IW);
+                RDouble pm = q(i, j, k, IP);
+                RDouble c2 = abs(gama(i, j, k) * pm / (rm + SMALL));
+                RDouble v2 = um * um + vm * vm + wm * wm;
+
+                (*mach)(i, j, k, m) = sqrt(v2 / (c2 + SMALL));
+            }
+        }
+    }
+
+    return mach;
+}
+
+void NCCRSolverStruct::VisualizationAverageFlow(ActionKey *actkey)
+{
+
+}
+
+//! Restrict from fine to coarse grid for all q.
+void NCCRSolverStruct::RestrictAllQ(Grid *fineGridIn, Grid *coarseGridIn)
+{
+    StructGrid *fineGrid = StructGridCast(fineGridIn);
+    StructGrid *coarseGrid = StructGridCast(coarseGridIn);
+
+    int coarseNi = coarseGrid->GetNI();
+    int coarseNj = coarseGrid->GetNJ();
+    int coarseNk = coarseGrid->GetNK();
+
+    RDouble4D &finePrimitiveVars = *reinterpret_cast <RDouble4D *> (fineGrid->GetDataPtr("q"));
+    RDouble4D &coarsePrimitiveVars = *reinterpret_cast <RDouble4D *> (coarseGrid->GetDataPtr("q"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    //! Zero Setting.
+    coarsePrimitiveVars = 0.0;
+    RestrictQ(fineGrid, finePrimitiveVars, coarseGrid, coarsePrimitiveVars, nEquation);
+    //coarseGrid->GhostCell3DExceptInterface(coarsePrimitiveVars, nEquation);
+    //GhostCell3D(coarsePrimitiveVars, coarseNi, coarseNj, coarseNk, nEquation);
+
+    RDouble3D &fineGama = *reinterpret_cast <RDouble3D *> (fineGrid->GetDataPtr("gama"));
+    RDouble3D &coarseGama = *reinterpret_cast <RDouble3D *> (coarseGrid->GetDataPtr("gama"));
+    RestrictQ(fineGrid, fineGama, coarseGrid, coarseGama);
+    //GhostCell3D(coarseGama, coarseNi, coarseNj, coarseNk);
+
+    int viscousType = parameters->GetViscousType();
+    if (viscousType > INVISCID)
+    {
+        RDouble3D &fineViscosityLaminar = *reinterpret_cast <RDouble3D *> (fineGrid->GetDataPtr("visl"));
+        RDouble3D &coarseViscosityLaminar = *reinterpret_cast <RDouble3D *> (coarseGrid->GetDataPtr("visl"));
+        coarseViscosityLaminar = 0.0;
+        RestrictQ(fineGrid, fineViscosityLaminar, coarseGrid, coarseViscosityLaminar);
+
+        GhostCell3D(coarseViscosityLaminar, coarseNi, coarseNj, coarseNk);
+
+        if (viscousType > LAMINAR)
+        {
+            RDouble3D &fineViscosityTurbulence = *reinterpret_cast <RDouble3D *> (fineGrid->GetDataPtr("vist"));
+            RDouble3D &coarseViscosityTurbulence = *reinterpret_cast <RDouble3D *> (coarseGrid->GetDataPtr("vist"));
+            coarseViscosityTurbulence = 0.0;
+            RestrictQ(fineGrid, fineViscosityTurbulence, coarseGrid, coarseViscosityTurbulence);
+
+            GhostCell3D(coarseViscosityTurbulence, coarseNi, coarseNj, coarseNk);
+            //coarseGrid->GhostCell3DExceptInterface(coarseViscosityTurbulence);
+        }
+    }
+}
+
+//! Restrict defect from fine to coarse grid.
+void NCCRSolverStruct::RestrictDefect(Grid *fineGridIn, Grid *coarseGridIn)
+{
+    StructGrid *fineGrid = StructGridCast(fineGridIn);
+    StructGrid *coarseGrid = StructGridCast(coarseGridIn);
+
+    //! The following statement is important.
+    ZeroResiduals(coarseGrid);
+
+    RDouble4D &coarseResidual = *reinterpret_cast <RDouble4D *> (coarseGrid->GetDataPtr("res"));
+    RDouble4D &fineResidual = *reinterpret_cast <RDouble4D *> (fineGrid->GetDataPtr("res"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nEquation = GetNumberOfEquations();
+
+    int coarseNi = coarseGrid->GetNI();
+    int coarseNj = coarseGrid->GetNJ();
+    int coarseNk = coarseGrid->GetNK();
+
+    int iMultigrid = fineGrid->GetMultigridStepI();
+    int jMultigrid = fineGrid->GetMultigridStepJ();
+    int kMultigrid = fineGrid->GetMultigridStepK();
+
+    int id = iMultigrid / 2;
+    int jd = jMultigrid / 2;
+    int kd = kMultigrid / 2;
+
+    Range I(1, MAX(coarseNi - 1, 1));
+    Range J(1, MAX(coarseNj - 1, 1));
+    Range K(1, MAX(coarseNk - 1, 1));
+    Range M(0, nEquation - 1);
+
+    RDouble coeff = eighth * static_cast<RDouble>(iMultigrid * jMultigrid * kMultigrid);
+
+    int i0, j0, k0, i, j, k, ip, jp, kp;
+    for (k0 = K.first(); k0 <= K.last(); ++ k0)
+    {
+        k = (k0 - 1) * kMultigrid + 1;
+        kp = k + kd;
+        for (j0 = J.first(); j0 <= J.last(); ++ j0)
+        {
+            j = (j0 - 1) * jMultigrid + 1;
+            jp = j + jd;
+            for (i0 = I.first(); i0 <= I.last(); ++ i0)
+            {
+                i = (i0 - 1) * iMultigrid + 1;
+                ip = i + id;
+                for (int iLaminar = 0; iLaminar < nLaminar; ++ iLaminar)
+                {
+                    coarseResidual(i0, j0, k0, iLaminar) -= coeff * (fineResidual(i, j, k, iLaminar) + fineResidual(ip, j, k, iLaminar)
+                        + fineResidual(ip, jp, k, iLaminar) + fineResidual(i, jp, k, iLaminar)
+                        + fineResidual(i, j, kp, iLaminar) + fineResidual(ip, j, kp, iLaminar)
+                        + fineResidual(ip, jp, kp, iLaminar) + fineResidual(i, jp, kp, iLaminar));
+                }
+            }
+        }
+    }
+}
+
+//! Put correction back on the coarse grid.
+void NCCRSolverStruct::PutCorrectionBack(Grid *grid, FieldProxy *qProxy)
+{
+    RDouble4D &qold = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &q = qProxy->GetField_STR();
+    qold += q;
+}
+
+//! Correct variable in fine grid using correction in coarse grid.
+void NCCRSolverStruct::CorrectFineGrid(Grid *fineGridIn, Grid *coarseGridIn)
+{
+    StructGrid *fineGrid = StructGridCast(fineGridIn);
+    StructGrid *coarseGrid = StructGridCast(coarseGridIn);
+
+    RDouble4D &finePrimitiveVars = *reinterpret_cast <RDouble4D *> (fineGrid->GetDataPtr("q"));
+
+    int fineNi = fineGrid->GetNI();
+    int fineNj = fineGrid->GetNJ();
+    int fineNk = fineGrid->GetNK();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int mgProlongationType = parameters->GetMgProlongationType();
+
+    int nEquation = GetNumberOfEquations();
+
+    Range I, J, K;
+    GetRange(fineNi, fineNj, fineNk, -2, 1, I, J, K);
+    Range M(0, nEquation - 1);
+
+    if (fineNk == 1)
+    {
+        K.setRange(1, 1);
+    }
+
+    RDouble4D work(I, J, K, M, fortranArray);
+
+    FieldProxy *workProxy = new FieldProxy();
+    workProxy->SetField_STR(&work);
+
+    FieldProxy *finePrimitiveVarsProxy = new FieldProxy();
+    finePrimitiveVarsProxy->SetField_STR(&finePrimitiveVars);
+
+    if (mgProlongationType == 1)
+    {
+        prol(fineGrid, coarseGrid, workProxy);
+    }
+    else if (mgProlongationType == 2)
+    {
+        prolhic_eric(fineGrid, coarseGrid, workProxy);
+    }
+
+    //! Perform 'w = w + work' to update the state vector.
+    PositiveUpdate(fineGrid, finePrimitiveVarsProxy, workProxy);
+
+    delete finePrimitiveVarsProxy;
+    delete workProxy;
+}
+
+void NCCRSolverStruct::InterpolatFineGrid(Grid *fineGridIn, Grid *coarseGridIn)
+{
+    StructGrid *fineGrid = StructGridCast(fineGridIn);
+    StructGrid *coarseGrid = StructGridCast(coarseGridIn);
+
+    RDouble4D &finePrimitiveVars = *reinterpret_cast <RDouble4D *> (fineGrid->GetDataPtr("q"));
+    RDouble4D &coarsePrimitiveVars = *reinterpret_cast <RDouble4D *> (coarseGrid->GetDataPtr("q"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    InterpolatQ(fineGrid, finePrimitiveVars, coarseGrid, coarsePrimitiveVars, nEquation);
+
+    RDouble3D &fineGama = *reinterpret_cast <RDouble3D *> (fineGrid->GetDataPtr("gama"));
+    RDouble3D &coarseGama = *reinterpret_cast <RDouble3D *> (coarseGrid->GetDataPtr("gama"));
+    InterpolatQ(fineGrid, fineGama, coarseGrid, coarseGama);
+
+    int viscousType = parameters->GetViscousType();
+    if (viscousType > INVISCID)
+    {
+        RDouble3D &fineViscosityLaminar = *reinterpret_cast <RDouble3D *> (fineGrid->GetDataPtr("visl"));
+        RDouble3D &coarseViscosityLaminar = *reinterpret_cast <RDouble3D *> (coarseGrid->GetDataPtr("visl"));
+        InterpolatQ(fineGrid, fineViscosityLaminar, coarseGrid, coarseViscosityLaminar);
+
+        if (viscousType > LAMINAR)
+        {
+            RDouble3D &fineViscosityTurbulence = *reinterpret_cast <RDouble3D *> (fineGrid->GetDataPtr("vist"));
+            RDouble3D &coarseViscosityTurbulence = *reinterpret_cast <RDouble3D *> (coarseGrid->GetDataPtr("vist"));
+            InterpolatQ(fineGrid, fineViscosityTurbulence, coarseGrid, coarseViscosityTurbulence);
+        }
+    }
+}
+
+void NCCRSolverStruct::prol(Grid *fineGridIn, Grid *coarseGridIn, FieldProxy *workProxy)
+{
+    StructGrid *fineGrid = StructGridCast(fineGridIn);
+    StructGrid *coarseGrid = StructGridCast(coarseGridIn);
+
+    RDouble4D &work = workProxy->GetField_STR();
+
+    RDouble4D &coarsePrimitiveVars = *reinterpret_cast <RDouble4D *> (coarseGrid->GetDataPtr("q"));
+
+    int nEquation = GetNumberOfEquations();
+
+    int fineNi = fineGrid->GetNI();
+    int fineNj = fineGrid->GetNJ();
+    int fineNk = fineGrid->GetNK();
+
+    int coarseNi = coarseGrid->GetNI();
+    int coarseNj = coarseGrid->GetNJ();
+    int coarseNk = coarseGrid->GetNK();
+
+    int iMultigridStep = fineGrid->GetMultigridStepI();
+    int jMultigridStep = fineGrid->GetMultigridStepJ();
+    int kMultigridStep = fineGrid->GetMultigridStepK();
+
+    int id = iMultigridStep / 2;
+    int jd = jMultigridStep / 2;
+    int kd = kMultigridStep / 2;
+
+    Range I(1, MAX(coarseNi - 1, 1));
+    Range J(1, MAX(coarseNj - 1, 1));
+    Range K(1, MAX(coarseNk - 1, 1));
+
+    int i0, j0, k0, i, j, k, ip, jp, kp;
+    for (k0 = K.first(); k0 <= K.last(); ++ k0)
+    {
+        k = (k0 - 1) * kMultigridStep + 1;
+        kp = k + kd;
+        for (j0 = J.first(); j0 <= J.last(); ++ j0)
+        {
+            j = (j0 - 1) * jMultigridStep + 1;
+            jp = j + jd;
+            for (i0 = I.first(); i0 <= I.last(); ++ i0)
+            {
+                i = (i0 - 1) * iMultigridStep + 1;
+                ip = i + id;
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    RDouble w0diff = coarsePrimitiveVars(i0, j0, k0, m);
+
+                    work(i, j, k, m) = w0diff;
+                    work(ip, j, k, m) = w0diff;
+                    work(ip, jp, k, m) = w0diff;
+                    work(i, jp, k, m) = w0diff;
+                    work(i, j, kp, m) = w0diff;
+                    work(ip, j, kp, m) = w0diff;
+                    work(ip, jp, kp, m) = w0diff;
+                    work(i, jp, kp, m) = w0diff;
+                }
+            }
+        }
+    }
+
+    GhostCell3D(work, fineNi, fineNj, fineNk, nEquation);
+}
+
+void NCCRSolverStruct::prolhic_eric(Grid *fineGridIn, Grid *coarseGridIn, FieldProxy *workProxy)
+{
+    StructGrid *fineGrid = StructGridCast(fineGridIn);
+    StructGrid *coarseGrid = StructGridCast(coarseGridIn);
+
+    RDouble4D &work = workProxy->GetField_STR();
+    RDouble4D &coarsePrimitiveVars = *reinterpret_cast <RDouble4D *> (coarseGrid->GetDataPtr("q"));
+
+    int nEquation = GetNumberOfEquations();
+
+    int fineNi = fineGrid->GetNI();
+    int fineNj = fineGrid->GetNJ();
+    int fineNk = fineGrid->GetNK();
+
+    int coarseNi = coarseGrid->GetNI();
+    int coarseNj = coarseGrid->GetNJ();
+    int coarseNk = coarseGrid->GetNK();
+
+    int iMultigridStep = fineGrid->GetMultigridStepI();
+    int jMultigridStep = fineGrid->GetMultigridStepJ();
+    int kMultigridStep = fineGrid->GetMultigridStepK();
+
+    int id = iMultigridStep / 2;
+    int jd = jMultigridStep / 2;
+    int kd = kMultigridStep / 2;
+
+    int nDim = fineGrid->GetDim();
+
+    Range I, J, K;
+    GetRange(fineNi, fineNj, fineNk, -2, 1, I, J, K);
+
+    Range CoarseI, CoarseJ, CoarseK;
+    GetRange(coarseNi, coarseNj, coarseNk, -2, 1, CoarseI, CoarseJ, CoarseK);
+
+    RDouble3D wq(CoarseI, CoarseJ, CoarseK, fortranArray);
+
+    RDouble3D wdiff1(I, J, K, fortranArray);
+    RDouble3D wdiff2(I, J, K, fortranArray);
+
+    const RDouble v0 = 0.25;
+    const RDouble v1 = 0.75;
+
+    if (nDim == TWO_D)
+    {
+        //! Two-dimensional computations.
+
+        int ist, ied, jst, jed, kst, ked;
+        ist = 1;
+        ied = coarseNi - 1;
+        jst = 1;
+        jed = coarseNj - 1;
+        kst = 1;
+        ked = 1;
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            for (int kk = kst; kk <= ked; ++ kk)
+            {
+                for (int jj = jst; jj <= jed; ++ jj)
+                {
+                    for (int ii = ist; ii <= ied; ++ ii)
+                    {
+                        wq(ii, jj, kk) = coarsePrimitiveVars(ii, jj, kk, m);
+                    }
+                }
+            }
+
+            GhostCell3D(wq, coarseNi, coarseNj, coarseNk);
+            FillCornerPoint3D(wq, coarseNi, coarseNj, coarseNk);
+
+            //! Interpolation in I direction.
+            int k0 = 1;
+            int j = 0;
+
+            for (int j0 = 0; j0 <= coarseNj; ++ j0)
+            {
+                int i = 0;
+                for (int i0 = 0; i0 <= coarseNi - 1; ++ i0)
+                {
+                    RDouble w0diff0 = wq(i0, j0, k0);
+                    RDouble w0diff1 = wq(i0 + id, j0, k0);
+
+                    wdiff1(i, j0, k0) = v1 * w0diff0 + v0 * w0diff1;
+                    wdiff1(i + id, j0, k0) = v0 * w0diff0 + v1 * w0diff1;
+
+                    i += 1 + id;
+                }
+                j += 1 + jd;
+            }
+
+            //! Interpolation in J direction.
+            for (int i = 0; i <= fineNi; ++ i)
+            {
+                j = 0;
+                for (int j0 = 0; j0 <= coarseNj - 1; ++ j0)
+                {
+                    RDouble w0diff0 = wdiff1(i, j0, k0);
+                    RDouble w0diff1 = wdiff1(i, j0 + jd, k0);
+                    work(i, j, k0, m) = v1 * w0diff0 + v0 * w0diff1;
+                    work(i, j + jd, k0, m) = v0 * w0diff0 + v1 * w0diff1;
+                    j += 1 + jd;
+                }
+            }
+
+        }
+    }
+    else
+    {
+
+        int ist, ied, jst, jed, kst, ked;
+        ist = 1;
+        ied = coarseNi - 1;
+        jst = 1;
+        jed = coarseNj - 1;
+        kst = 1;
+        ked = coarseNk - 1;
+
+        work = 0.0;
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            for (int kk = kst; kk <= ked; ++ kk)
+            {
+                for (int jj = jst; jj <= jed; ++ jj)
+                {
+                    for (int ii = ist; ii <= ied; ++ ii)
+                    {
+                        wq(ii, jj, kk) = coarsePrimitiveVars(ii, jj, kk, m);
+                    }
+                }
+            }
+
+            GhostCell3D(wq, coarseNi, coarseNj, coarseNk);
+            FillCornerPoint3D(wq, coarseNi, coarseNj, coarseNk);
+
+            //! Interpolation in I direction.
+            for (int k0 = 0; k0 <= coarseNk; ++ k0)
+            {
+                for (int j0 = 0; j0 <= coarseNj; ++ j0)
+                {
+                    int i = 0;
+                    for (int i0 = 0; i0 <= coarseNi - 1; ++ i0)
+                    {
+                        RDouble w0diff0 = wq(i0, j0, k0);
+                        RDouble w0diff1 = wq(i0 + id, j0, k0);
+
+                        wdiff1(i, j0, k0) = v1 * w0diff0 + v0 * w0diff1;
+                        wdiff1(i + id, j0, k0) = v0 * w0diff0 + v1 * w0diff1;
+
+                        work(i, j0, k0, m) = v1 * w0diff0 + v0 * w0diff1;
+                        work(i + id, j0, k0, m) = v0 * w0diff0 + v1 * w0diff1;
+
+                        i += 1 + id;
+                    }
+                }
+            }
+
+            //! Interpolation in J direction.
+            for (int k0 = 0; k0 <= coarseNk; ++ k0)
+            {
+                for (int i = 0; i <= fineNi; ++ i)
+                {
+                    int j = 0;
+                    for (int j0 = 0; j0 <= coarseNj - 1; ++ j0)
+                    {
+                        RDouble w0diff0 = wdiff1(i, j0, k0);
+                        RDouble w0diff1 = wdiff1(i, j0 + jd, k0);
+
+                        wdiff2(i, j, k0) = v1 * w0diff0 + v0 * w0diff1;
+                        wdiff2(i, j + jd, k0) = v0 * w0diff0 + v1 * w0diff1;
+
+                        work(i, j, k0, m) = v1 * w0diff0 + v0 * w0diff1;
+                        work(i, j + jd, k0, m) = v0 * w0diff0 + v1 * w0diff1;
+                        j += 1 + jd;
+                    }
+                }
+            }
+
+            //! Interpolation in K direction.
+            for (int j = 0; j <= fineNj; ++ j)
+            {
+                for (int i = 0; i <= fineNi; ++ i)
+                {
+                    int k = 0;
+                    for (int k0 = 0; k0 <= coarseNk - 1; ++ k0)
+                    {
+                        RDouble w0diff0 = wdiff2(i, j, k0);
+                        RDouble w0diff1 = wdiff2(i, j, k0 + kd);
+
+                        work(i, j, k, m) = v1 * w0diff0 + v0 * w0diff1;
+                        work(i, j, k + kd, m) = v0 * w0diff0 + v1 * w0diff1;
+
+                        k += 1 + kd;
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::PositiveUpdate(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &q = qProxy->GetField_STR();
+    RDouble4D &dq = dqProxy->GetField_STR();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    RDouble alpha = half;
+
+    using namespace IDX;
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                RDouble rm = q(i, j, k, IR);
+                RDouble um = q(i, j, k, IU);
+                RDouble vm = q(i, j, k, IV);
+                RDouble wm = q(i, j, k, IW);
+                RDouble pm = q(i, j, k, IP);
+
+                rm += alpha * dq(i, j, k, IR);
+                um += alpha * dq(i, j, k, IU);
+                vm += alpha * dq(i, j, k, IV);
+                wm += alpha * dq(i, j, k, IW);
+                pm += alpha * dq(i, j, k, IP);
+
+                if (pm <= 0.0 || rm <= 0.0)
+                {
+                    //! Let dt be one order smaller.
+                    RDouble coef = 0.9;
+                    rm -= dq(i, j, k, IR) * coef;
+                    um -= dq(i, j, k, IU) * coef;
+                    vm -= dq(i, j, k, IV) * coef;
+                    wm -= dq(i, j, k, IW) * coef;
+                    pm -= dq(i, j, k, IP) * coef;
+
+                    if (pm <= 0.0 || rm <= 0.0)
+                    {
+                        coef = 0.09;
+                        rm -= dq(i, j, k, IR) * coef;
+                        um -= dq(i, j, k, IU) * coef;
+                        vm -= dq(i, j, k, IV) * coef;
+                        wm -= dq(i, j, k, IW) * coef;
+                        pm -= dq(i, j, k, IP) * coef;
+                    }
+                }
+
+                if (pm > 0.0 && rm > 0.0)
+                {
+                    q(i, j, k, IR) = rm;
+                    q(i, j, k, IU) = um;
+                    q(i, j, k, IV) = vm;
+                    q(i, j, k, IW) = wm;
+                    q(i, j, k, IP) = pm;
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::VisualizationVariables(Grid *gridIn, FieldProxy *workProxy, const string &filename)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int nEquation = GetNumberOfEquations();
+
+    vector <string> title_tecplot;
+    title_tecplot.push_back("title=\"Flow Fields of PHengLEI\"");
+    title_tecplot.push_back("variables=");
+    title_tecplot.push_back("\"x\"");
+    title_tecplot.push_back("\"y\"");
+    title_tecplot.push_back("\"z\"");
+    title_tecplot.push_back("\"work1\"");
+    title_tecplot.push_back("\"work2\"");
+    title_tecplot.push_back("\"work3\"");
+    title_tecplot.push_back("\"work4\"");
+    title_tecplot.push_back("\"work5\"");
+
+    int nvarplot;
+    nvarplot = 10;
+
+    Range II, JJ, KK;
+    GetRange(ni, nj, nk, 0, 0, II, JJ, KK);
+    Range MM(0, nEquation - 1);
+
+    RDouble4D workn(II, JJ, KK, MM, fortranArray);
+
+    FieldProxy *worknProxy = new FieldProxy();
+
+    worknProxy->SetField_STR(&workn);
+    CompNodeVar(grid, worknProxy, workProxy);
+
+    delete worknProxy;
+
+    RDouble3D &xx = *grid->GetStructX();
+    RDouble3D &yy = *grid->GetStructY();
+    RDouble3D &zz = *grid->GetStructZ();
+
+    using namespace PHSPACE;
+
+    std::ostringstream oss;
+
+    for (std::size_t i = 0; i < title_tecplot.size(); ++ i)
+    {
+        oss << title_tecplot[i] << "\n";
+    }
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalNode = grid->GetNTotalNode();
+
+    int wordwidth = 20;
+
+    if (nk == 1)
+    {
+        oss << "zone  N = " << nTotalNode << "  E = " << nTotalCell << " f = FEPOINT, ET = QUADRILATERAL\n";
+
+        int iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd;
+        grid->GetNodeIterationIndex(iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd);
+
+        for (int k = kNodeStart; k <= kNodeEnd; ++ k)
+        {
+            for (int j = jNodeStart; j <= jNodeEnd; ++ j)
+            {
+                for (int i = iNodeStart; i <= iNodeEnd; ++ i)
+                {
+                    oss << setiosflags(ios::left);
+                    oss << setiosflags(ios::scientific);
+                    oss << setprecision(10);
+                    oss << setw(wordwidth) << xx(i, j, k)
+                        << setw(wordwidth) << yy(i, j, k)
+                        << setw(wordwidth) << zz(i, j, k);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        oss << setw(wordwidth) << workn(i, j, k, m);
+                    }
+                    oss << "\n";
+                }
+            }
+        }
+
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            for (int i = 1; i <= ni - 1; ++ i)
+            {
+                oss << i + (j - 1) * ni << " ";
+                oss << i + 1 + (j - 1) * ni << " ";
+                oss << i + 1 + (j)*ni << " ";
+                oss << i + (j)*ni << "\n";
+            }
+        }
+    }
+
+    int s_st[3], s_ed[3];
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+        bool flag;
+        flag = (IsWall(BCType))
+            || (BCType == PHENGLEI::SYMMETRY)
+            || (BCType == PHENGLEI::OUTFLOW);
+
+        if (!flag)
+        {
+            continue;
+        }
+
+        int *s_lr3d = structBC->GetFaceDirectionIndex();
+        int nDim = GetDim();
+
+        for (int m = 0; m < nDim; ++ m)
+        {
+            s_st[m] = structBC->GetStartPoint(m);
+            s_ed[m] = structBC->GetEndPoint(m);
+            if (structBC->GetFaceDirection() == m)
+            {
+                if (s_st[m] > 1 || s_lr3d[m] == 1)
+                {
+                    s_st[m] += 1;
+                    s_ed[m] += 1;
+                }
+            }
+            else
+            {
+                s_ed[m] += 1;
+            }
+        }
+
+        int ist = s_st[0];
+        int ied = s_ed[0];
+        int jst = s_st[1];
+        int jed = s_ed[1];
+        int kst = s_st[2];
+        int ked = s_ed[2];
+
+        Range I, J, K;
+        GetRange(I, J, K, ist, ied, jst, jed, kst, ked);
+
+        if (nDim != THREE_D)
+        {
+            K.setRange(1, 1);
+            kst = 1;
+            ked = 1;
+        }
+
+        Int3D newindex(I, J, K, fortranArray);
+
+        int nSurface = structBC->GetFaceDirection() + 1;
+
+        int count = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    newindex(i, j, k) = count;
+                    ++ count;
+                }
+            }
+        }
+
+        int nTotalNode1 = count;
+        int nTotalCell1 = 1;
+
+        for (int m = 0; m < 3; ++ m)
+        {
+            nTotalCell1 *= (structBC->GetEndPoint(m) - structBC->GetStartPoint(m) + 1);
+        }
+
+        oss << "zone N = " << nTotalNode1 << "  E = " << nTotalCell1 << " f = FEPOINT, ET = QUADRILATERAL\n";
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    oss << setiosflags(ios::left);
+                    oss << setiosflags(ios::scientific);
+                    oss << setprecision(10);
+                    oss << setw(wordwidth) << xx(i, j, k)
+                        << setw(wordwidth) << yy(i, j, k)
+                        << setw(wordwidth) << zz(i, j, k);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        oss << setw(wordwidth) << workn(i, j, k, m);
+                    }
+                    oss << "\n";
+                }
+            }
+        }
+
+        int il1, jl1, kl1;
+        grid->GetNsurfIndex(il1, jl1, kl1, nSurface);
+
+
+        il1 = 1 - il1;
+        jl1 = 1 - jl1;
+        kl1 = 1 - kl1;
+
+        if (nk == 1)
+        {
+            kl1 = 0;
+        }
+
+        for (int k = kst; k <= ked - kl1; ++ k)
+        {
+            for (int j = jst; j <= jed - jl1; ++ j)
+            {
+                for (int i = ist; i <= ied - il1; ++ i)
+                {
+                    int p1, p2, p3, p4;
+
+                    int il, jl, kl;
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    if (nSurface == 1)
+                    {
+                        p1 = newindex(i, j, k) + 1;
+                        p2 = newindex(i, jl, k) + 1;
+                        p3 = newindex(i, jl, kl) + 1;
+                        p4 = newindex(i, j, kl) + 1;
+                    }
+                    else if (nSurface == 2)
+                    {
+                        p1 = newindex(i, j, k) + 1;
+                        p2 = newindex(il, j, k) + 1;
+                        p3 = newindex(il, j, kl) + 1;
+                        p4 = newindex(i, j, kl) + 1;
+                    }
+                    else
+                    {
+                        p1 = newindex(i, j, k) + 1;
+                        p2 = newindex(il, j, k) + 1;
+                        p3 = newindex(il, jl, k) + 1;
+                        p4 = newindex(i, jl, k) + 1;
+                    }
+                    oss << p1 << " ";
+                    oss << p2 << " ";
+                    oss << p3 << " ";
+                    oss << p4 << "\n";
+                }
+            }
+        }
+    }
+
+    fstream file;
+    file.open(filename.c_str(), ios_base::out | ios_base::trunc);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(filename);
+    }
+
+    file << oss.str();
+    file.close();
+}
+
+void NCCRSolverStruct::CompNodeVar(Grid *gridIn, RDouble4D &qn, int m, RDouble4D &q, int n)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int nk = grid->GetNK();
+
+    int il1 = 1;
+    int jl1 = 1;
+    int kl1 = 1;
+    if (nk == 1)
+    {
+        kl1 = 0;
+    }
+
+    int il, jl, kl;
+
+    int iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd;
+    grid->GetNodeIterationIndex(iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd);
+
+    for (int k = kNodeStart; k <= kNodeEnd; ++ k)
+    {
+        for (int j = jNodeStart; j <= jNodeEnd; ++ j)
+        {
+            for (int i = iNodeStart; i <= iNodeEnd; ++ i)
+            {
+                il = i - il1;
+                jl = j - jl1;
+                kl = k - kl1;
+                qn(i, j, k, m) = eighth * (q(il, jl, kl, n) + q(il, j, kl, n) + q(i, jl, kl, n) + q(i, j, kl, n) +
+                    q(il, jl, k, n) + q(il, j, k, n) + q(i, jl, k, n) + q(i, j, k, n));
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::CompNodeVar(Grid *gridIn, RDouble4D &qn, int m, RDouble3D &q)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int nk = grid->GetNK();
+
+    int il1 = 1;
+    int jl1 = 1;
+    int kl1 = 1;
+    if (nk == 1)
+    {
+        kl1 = 0;
+    }
+
+    int il, jl, kl;
+
+    int iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd;
+    grid->GetNodeIterationIndex(iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd);
+
+    for (int k = kNodeStart; k <= kNodeEnd; ++ k)
+    {
+        for (int j = jNodeStart; j <= jNodeEnd; ++ j)
+        {
+            for (int i = iNodeStart; i <= iNodeEnd; ++ i)
+            {
+                il = i - il1;
+                jl = j - jl1;
+                kl = k - kl1;
+                qn(i, j, k, m) = eighth * (q(il, jl, kl) + q(il, j, kl) + q(i, jl, kl) + q(i, j, kl) +
+                    q(il, jl, k) + q(il, j, k) + q(i, jl, k) + q(i, j, k));
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::CompNodeVar(Grid *gridIn, FieldProxy *qnProxy, FieldProxy *qProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int nk = grid->GetNK();
+
+    RDouble4D &q = qProxy->GetField_STR();
+    RDouble4D &q_n = qnProxy->GetField_STR();
+
+    int nEquation = GetNumberOfEquations();
+
+    int il1 = 1;
+    int jl1 = 1;
+    int kl1 = 1;
+    if (nk == 1)
+    {
+        kl1 = 0;
+    }
+
+    int il, jl, kl;
+
+    int iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd;
+    grid->GetNodeIterationIndex(iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd);
+
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kNodeStart; k <= kNodeEnd; ++ k)
+        {
+            for (int j = jNodeStart; j <= jNodeEnd; ++ j)
+            {
+                for (int i = iNodeStart; i <= iNodeEnd; ++ i)
+                {
+                    il = i - il1;
+                    jl = j - jl1;
+                    kl = k - kl1;
+                    q_n(i, j, k, m) = eighth * (q(il, jl, kl, m) + q(il, j, kl, m) + q(i, jl, kl, m) + q(i, j, kl, m) +
+                        q(il, jl, k, m) + q(il, j, k, m) + q(i, jl, k, m) + q(i, j, k, m));
+                }
+            }
+        }
+    }
+
+    InterfaceValueFix(gridIn, qnProxy, qProxy);
+    WallValueFix(gridIn, qnProxy, qProxy);
+}
+
+void NCCRSolverStruct::InterfaceValueFix(Grid *gridIn, FieldProxy *qnProxy, FieldProxy *qProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &q = qProxy->GetField_STR();
+    RDouble4D &q_n = qnProxy->GetField_STR();
+
+    int nEquation = GetNumberOfEquations();
+
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo)
+    {
+        return;
+    }
+
+    int nTotalNode = grid->GetNTotalNode();
+
+    int nlist = 4;
+    if (grid->GetDim() == TWO_D)
+    {
+        nlist = 2;
+    }
+
+    int ijk[4][3];
+    int irot[3], jrot[3], krot[3];
+
+    GetIJKROT(ijk, irot, jrot, krot);
+
+    //VVInt node_list;
+    //set< PHSort< VInt > > node_sort;
+    //VInt  nodeindex(3);
+
+    int ist, ied, jst, jed, kst, ked;
+    int iSurface, BCType, index;
+    int il, jl, kl;
+    int is, js, ks;
+    int it, jt, kt;
+    int ir, jr, kr;
+    int in, jn, kn;
+
+    RDouble *qtmp = new RDouble[nEquation];
+    int *n_count = new int[nTotalNode];
+    RDouble **q_n_list = NewPointer2<RDouble>(nEquation, nTotalNode);
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        n_count[iNode] = 0;
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q_n_list[m][iNode] = 0.0;
+        }
+    }
+
+    typedef DataStruct_AdtTree<int, RDouble> AdtTree;
+    AdtTree *adtTree;
+    AdtTree::AdtNodeList nodeList;
+    RDouble tol;
+    CreateStandardADT(grid, adtTree, tol);
+    RDouble coor[3], minwin[3], maxwin[3];
+
+    RDouble3D &xs = *grid->GetStructX();
+    RDouble3D &ys = *grid->GetStructY();
+    RDouble3D &zs = *grid->GetStructZ();
+
+    int count = 0;
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        BCType = structBC->GetBCType();
+        //if ((!(ISInterfaceBC(BCType))) && (!IsWall(true, BCType, 0))) continue;
+        if (!(IsInterface(BCType)))
+        {
+            continue;
+        }
+
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        iSurface = structBC->GetFaceDirection() + 1;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+
+                    RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, 1);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        qtmp[m] = half * (q(is, js, ks, m) + q(it, jt, kt, m));
+                    }
+
+                    structBC->GetBoundaryFaceIndex(i, j, k, il, jl, kl);
+
+                    ir = irot[iSurface - 1];
+                    jr = jrot[iSurface - 1];
+                    kr = krot[iSurface - 1];
+
+                    for (int m = 0; m < nlist; ++ m)
+                    {
+                        in = il + ijk[m][ir];
+                        jn = jl + ijk[m][jr];
+                        kn = kl + ijk[m][kr];
+
+                        coor[0] = xs(in, jn, kn);
+                        coor[1] = ys(in, jn, kn);
+                        coor[2] = zs(in, jn, kn);
+
+                        minwin[0] = coor[0] - tol;
+                        minwin[1] = coor[1] - tol;
+                        minwin[2] = coor[2] - tol;
+
+                        maxwin[0] = coor[0] + tol;
+                        maxwin[1] = coor[1] + tol;
+                        maxwin[2] = coor[2] + tol;
+                        GetCoorIndex(adtTree, coor, minwin, maxwin, count, index);
+
+                        n_count[index] ++;
+
+                        for (int mm = 0; mm < nEquation; ++ mm)
+                        {
+                            q_n_list[mm][index] += qtmp[mm];
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    int nINode = count;
+
+    for (int i = 0; i < nINode; ++ i)
+    {
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q_n_list[m][i] /= n_count[i];
+        }
+    }
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        BCType = structBC->GetBCType();
+        if (!(IsInterface(BCType)))
+        {
+            continue;
+        }
+
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        iSurface = structBC->GetFaceDirection() + 1;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    structBC->GetBoundaryFaceIndex(i, j, k, il, jl, kl);
+
+                    ir = irot[iSurface - 1];
+                    jr = jrot[iSurface - 1];
+                    kr = krot[iSurface - 1];
+
+                    for (int m = 0; m < nlist; ++ m)
+                    {
+                        in = il + ijk[m][ir];
+                        jn = jl + ijk[m][jr];
+                        kn = kl + ijk[m][kr];
+
+                        coor[0] = xs(in, jn, kn);
+                        coor[1] = ys(in, jn, kn);
+                        coor[2] = zs(in, jn, kn);
+
+                        minwin[0] = coor[0] - tol;
+                        minwin[1] = coor[1] - tol;
+                        minwin[2] = coor[2] - tol;
+
+                        maxwin[0] = coor[0] + tol;
+                        maxwin[1] = coor[1] + tol;
+                        maxwin[2] = coor[2] + tol;
+
+                        GetCoorIndex(adtTree, coor, minwin, maxwin, count, index);
+
+                        for (int mm = 0; mm < nEquation; ++ mm)
+                        {
+                            q_n(in, jn, kn, mm) = q_n_list[mm][index];
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    delete adtTree;
+    delete[]n_count;
+    delete[]qtmp;
+    DelPointer2(q_n_list);
+}
+
+void NCCRSolverStruct::CreateStandardADT(Grid *grid, DataStruct_AdtTree<int, RDouble> *&adtTree, RDouble &tol)
+{
+    typedef DataStruct_AdtTree<int, RDouble> AdtTree;
+    RDouble mindis, maxdis;
+    grid->GetMinMaxDS(mindis, maxdis);
+
+    tol = mindis / 4;
+
+    RDouble pmin[3], pmax[3];
+
+    RDouble *ptmin = grid->GetMinBox();
+    RDouble *ptmax = grid->GetMaxBox();
+
+    pmin[0] = ptmin[0];
+    pmin[1] = ptmin[1];
+    pmin[2] = ptmin[2];
+
+    pmax[0] = ptmax[0];
+    pmax[1] = ptmax[1];
+    pmax[2] = ptmax[2];
+
+    ShiftMinMaxBox(pmin, pmax, two * tol);
+
+    adtTree = new AdtTree(3, pmin, pmax);
+}
+
+void NCCRSolverStruct::WallValueFix(Grid *gridIn, FieldProxy *qnProxy, FieldProxy *qProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &q = qProxy->GetField_STR();
+    RDouble4D &q_n = qnProxy->GetField_STR();
+
+    int nEquation = GetNumberOfEquations();
+
+    int nTotalNode = grid->GetNTotalNode();
+
+    int nlist = 4;
+    if (grid->GetDim() == TWO_D)
+    {
+        nlist = 2;
+    }
+
+    int ijk[4][3];
+    int irot[3], jrot[3], krot[3];
+
+    GetIJKROT(ijk, irot, jrot, krot);
+
+    int ist, ied, jst, jed, kst, ked;
+    int iSurface, BCType, index;
+    int il, jl, kl;
+    int is, js, ks;
+    int it, jt, kt;
+    int ir, jr, kr;
+
+    RDouble *qtmp = new RDouble[nEquation];
+    int *n_count = new int[nTotalNode];
+    RDouble **q_n_list = NewPointer2<RDouble>(nEquation, nTotalNode);
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        n_count[iNode] = 0;
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q_n_list[m][iNode] = 0.0;
+        }
+    }
+
+    typedef DataStruct_AdtTree<int, RDouble> AdtTree;
+    AdtTree *adtTree;
+    AdtTree::AdtNodeList nodeList;
+    RDouble tol;
+    CreateStandardADT(grid, adtTree, tol);
+    RDouble coor[3], minwin[3], maxwin[3];
+
+    RDouble3D &xs = *grid->GetStructX();
+    RDouble3D &ys = *grid->GetStructY();
+    RDouble3D &zs = *grid->GetStructZ();
+
+    int count = 0;
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        BCType = structBC->GetBCType();
+        if ((!IsWall(BCType)))
+        {
+            continue;
+        }
+
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        iSurface = structBC->GetFaceDirection() + 1;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+
+                    RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, 1);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        qtmp[m] = half * (q(is, js, ks, m) + q(it, jt, kt, m));
+                    }
+
+                    structBC->GetBoundaryFaceIndex(i, j, k, il, jl, kl);
+
+                    ir = irot[iSurface - 1];
+                    jr = jrot[iSurface - 1];
+                    kr = krot[iSurface - 1];
+
+                    for (int m = 0; m < nlist; ++ m)
+                    {
+                        int in = il + ijk[m][ir];
+                        int jn = jl + ijk[m][jr];
+                        int kn = kl + ijk[m][kr];
+
+                        coor[0] = xs(in, jn, kn);
+                        coor[1] = ys(in, jn, kn);
+                        coor[2] = zs(in, jn, kn);
+
+                        minwin[0] = coor[0] - tol;
+                        minwin[1] = coor[1] - tol;
+                        minwin[2] = coor[2] - tol;
+
+                        maxwin[0] = coor[0] + tol;
+                        maxwin[1] = coor[1] + tol;
+                        maxwin[2] = coor[2] + tol;
+                        GetCoorIndex(adtTree, coor, minwin, maxwin, count, index);
+                        n_count[index] ++;
+                        for (int mm = 0; mm < nEquation; ++ mm)
+                        {
+                            q_n_list[mm][index] += qtmp[mm];
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    int nINode = count;
+
+    for (int i = 0; i < nINode; ++ i)
+    {
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q_n_list[m][i] /= n_count[i];
+        }
+    }
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        BCType = structBC->GetBCType();
+        if ((!IsWall(BCType)))
+        {
+            continue;
+        }
+
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        iSurface = structBC->GetFaceDirection() + 1;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    structBC->GetBoundaryFaceIndex(i, j, k, il, jl, kl);
+
+                    ir = irot[iSurface - 1];
+                    jr = jrot[iSurface - 1];
+                    kr = krot[iSurface - 1];
+
+                    for (int m = 0; m < nlist; ++ m)
+                    {
+                        int in = il + ijk[m][ir];
+                        int jn = jl + ijk[m][jr];
+                        int kn = kl + ijk[m][kr];
+
+                        coor[0] = xs(in, jn, kn);
+                        coor[1] = ys(in, jn, kn);
+                        coor[2] = zs(in, jn, kn);
+
+                        minwin[0] = coor[0] - tol;
+                        minwin[1] = coor[1] - tol;
+                        minwin[2] = coor[2] - tol;
+
+                        maxwin[0] = coor[0] + tol;
+                        maxwin[1] = coor[1] + tol;
+                        maxwin[2] = coor[2] + tol;
+
+                        GetCoorIndex(adtTree, coor, minwin, maxwin, count, index);
+
+                        for (int mm = 0; mm < nEquation; ++ mm)
+                        {
+                            q_n(in, jn, kn, mm) = q_n_list[mm][index];
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    delete adtTree;
+    delete[]n_count;
+    delete[]qtmp;
+    DelPointer2(q_n_list);
+}
+
+void NCCRSolverStruct::InitFlowAsRestart()
+{
+    StructGrid *grid = StructGridCast(GetGrid());
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int outputStepInterval = 0;
+    GlobalDataBase::UpdateData("outnstep", &outputStepInterval, PHINT, 1);
+
+    RDouble physicalTime = 0.0;
+    GlobalDataBase::UpdateData("physicalTime", &physicalTime, PHDOUBLE, 1);
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    int nEquation = GetNumberOfEquations();
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    primitiveVariables(i, j, k, m) = primitiveVarFarfield[m];
+                }
+            }
+        }
+    }
+
+    temperatures = 1.0;
+
+    InitGrad(grid);
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+        residual = 0.0;
+        return;
+    }
+
+    RDouble4D &primitiveVariablen1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble4D &primitiveVariablen2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+
+    primitiveVariablen1 = primitiveVariables;
+    primitiveVariablen2 = primitiveVariablen1;
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &residualn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble4D &residualn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+
+    residual = 0.0;
+    residualn1 = 0.0;
+    residualn2 = 0.0;
+
+    int nStatisticalStep = 0;
+    GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+
+    //! Store the historical sum of InviscidFlux, ViscousFlux, et al.,
+    //! exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+    RDouble4D &resTmp = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_tmp"));
+
+    resTmp = 0.0;
+}
+
+void NCCRSolverStruct::InitGrad(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &gradPrimtiveVarFaceX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D &gradPrimtiveVarFaceY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D &gradPrimtiveVarFaceZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+    gradPrimtiveVarFaceX = 0.0;
+    gradPrimtiveVarFaceY = 0.0;
+    gradPrimtiveVarFaceZ = 0.0;
+
+    RDouble4D &gradTemperatureFaceX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D &gradTemperatureFaceY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D &gradTemperatureFaceZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceZ"));
+    gradTemperatureFaceX = 0.0;
+    gradTemperatureFaceY = 0.0;
+    gradTemperatureFaceZ = 0.0;
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+    gradUVWTCellCenterX = 0.0;
+    gradUVWTCellCenterY = 0.0;
+    gradUVWTCellCenterZ = 0.0;
+}
+
+void NCCRSolverStruct::InitCGrid(Grid *fineGrid, Grid *coarseGrid)
+{
+
+}
+
+void NCCRSolverStruct::CalculateBoundaryData()
+{
+    CalculateMassFluxRatio();
+}
+
+void NCCRSolverStruct::Boundary(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+
+    CalculateBoundaryData();
+
+    int viscousType;
+    RDouble wallTemperature;
+
+    using namespace PHENGLEI;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int iWallBC = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        Data_Param *bcParamDB = structBC->GetBCParamDataBase();
+        int BCType = structBC->GetBCType();
+
+        if (IsInterface(BCType))
+        {
+            continue;
+        }
+        else if (BCType == EXTRAPOLATION)
+        {
+            OutFlowBC3D(grid, structBC);
+        }
+        else if (IsWall(BCType))
+        {
+            structBC->GetParamData("viscousType", &viscousType, PHINT, 1);
+            structBC->GetParamData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+
+            if (viscousType == INVISCID)
+            {
+                SymmetryBC3D(grid, structBC);
+            }
+            else
+            {
+                if (nChemical > 0)
+                {
+                }
+                else if (wallTemperature < 0.0)
+                {
+                    ViscousAdiabaticWall(grid, structBC);
+                }
+                else//! Viscous iso-thermal wall condition.
+                {
+                    ViscousIsotropicWall(grid, structBC, iWallBC);
+                }
+            }
+            ++iWallBC;
+        }
+        else if (BCType == ABLATION_SURFACE)
+        {
+            ++ iWallBC;
+        }
+        else if (BCType == SYMMETRY)
+        {
+            SymmetryBC3D(grid, structBC);
+        }
+        else if (BCType == FARFIELD)
+        {
+            RDouble refGama = parameters->GetRefGama();
+            FarFieldRiemannInvariants(grid, structBC, refGama);
+        }
+        else if (BCType == INFLOW)
+        {
+            InFlowBC3D(grid, structBC);
+        }
+        else if (BCType == OUTFLOW)
+        {
+            OutFlowBC3D(grid, structBC);
+        }
+        else if (BCType == POLE || BCType / 10 == POLE)
+        {
+            SingularAxisBC3D(grid, structBC);
+        }
+        else if (BCType == GENERIC_1)
+        {
+            //! Do not deal with this condition now!
+            continue;
+        }
+        else if (BCType == PRESSURE_INLET)
+        {
+            PressureInletBCRiemann(grid, structBC);
+        }
+        else if (BCType == PRESSURE_OUTLET)
+        {
+            PressureOutletBC(grid, structBC);
+        }
+        else if (BCType == MASS_FLOW_INLET)
+        {
+            MassFlowInletBC(grid, structBC);
+        }
+        else if (BCType == MASS_FLOW_OUTLET)
+        {
+            MassFlowOutletBC(grid, structBC);
+        }
+        else if (BCType == EXTERNAL_BC)
+        {
+            OutFlowBC3D(grid, structBC);
+        }
+        else if (BCType == NOZZLE_INFLOW)
+        {
+            NozzleInletFlow(grid, structBC);
+        }
+        else if (BCType == NOZZLE_OUTFLOW)
+        {
+            NozzleOutFlow(grid, structBC);
+        }
+        else if (BCType == OVERSET)
+        {
+            OutFlowBC3D(grid, structBC);
+        }
+        else
+        {
+            //! In order to avoid illegal BCtype ID.
+            ostringstream oss;
+            oss << "Error : Illegal BCtype ID " << BCType << endl;
+            TK_Exit::ExceptionExit(oss);
+        }
+    }
+    //! The corner point is only a temporary solution and should be replaced as much as possible.
+    CornerPoint(grid);
+}
+
+void NCCRSolverStruct::CornerPoint(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    FillCornerPoint3D(q, ni, nj, nk, nEquation);
+}
+
+void NCCRSolverStruct::calculateBCArea(Grid *gridIn, StructBC *bcRegion)
+{
+    Data_Param *bcData = bcRegion->GetBCParamDataBase();
+
+    //! BC total area does not change with calculating, so it only calculates once.
+    if (bcData->IsExist("BCTotalArea", PHDOUBLE, 1))
+    {
+        return;
+    }
+
+    using namespace PHMPI;
+    string bcName = bcRegion->GetBCName();
+    RDouble BCTotalArea = 0.0;
+
+    //! One processor may owe some zones, so calculate all BC area in one processor.
+    int nLocalZones = GetNumberofLocalZones();
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int iZoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+        Grid *iGrid = PHSPACE::GetGrid(iZoneID);
+
+        StructGrid *grid = StructGridCast(iGrid);
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+        int nBCRegion = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            StructBC *jBCRegion = structBCSet->GetBCRegion(iBCRegion);
+            string jBCName = jBCRegion->GetBCName();
+
+            //! Judge the same BC region according the BC name.
+            if (jBCName == bcName)
+            {
+                int ist, ied, jst, jed, kst, ked;
+                int in, jn, kn;
+                jBCRegion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+                int iSurface = jBCRegion->GetFaceDirection() + 1;
+                RDouble4D &area = *(grid->GetFaceArea());
+
+                for (int k = kst; k <= ked; ++ k)
+                {
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        for (int i = ist; i <= ied; ++ i)
+                        {
+                            jBCRegion->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+                            BCTotalArea += area(in, jn, kn, iSurface);
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    //! Get the total area in all processors with the same BC name.
+    RDouble GLB_BCTotalArea;
+    PH_AllReduce(&BCTotalArea, &GLB_BCTotalArea, 1, MPI_SUM);
+    BCTotalArea = GLB_BCTotalArea;
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int iZoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+        Grid *iGrid = PHSPACE::GetGrid(iZoneID);
+
+        StructGrid *grid = StructGridCast(iGrid);
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+        int nBCRegion = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            StructBC *jBCRegion = structBCSet->GetBCRegion(iBCRegion);
+            string jBCName = jBCRegion->GetBCName();
+
+            if (jBCName == bcName)
+            {
+                Data_Param *bcData1 = jBCRegion->GetBCParamDataBase();
+                bcData1->UpdateData("BCTotalArea", &BCTotalArea, PHDOUBLE, 1);
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::CalculateMassFluxRatio()
+{
+    vector<SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+    if (globalBCList == 0)
+    {
+        return;
+    }
+
+    for (int iBC = 0; iBC < globalBCList->size(); ++ iBC)
+    {
+        SimpleBC *boundaryCondition = (*globalBCList)[iBC];
+        int bcType = boundaryCondition->GetBCType();
+
+        if (bcType == PHENGLEI::MASS_FLOW_OUTLET)
+        {
+            RDouble massFlux = 0.0;
+            string bcName = boundaryCondition->GetBCName();
+
+            Param_NSSolverStruct *parameters = GetControlParameters();
+            RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+
+            int nLocalZones = PHMPI::GetNumberofLocalZones();
+            for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+            {
+                int iZoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+                Grid *iGrid = PHSPACE::GetGrid(iZoneID);
+                StructGrid *grid = StructGridCast(iGrid);
+
+                StructBCSet *structBCSet = grid->GetStructBCSet();
+                int nBCRegion = structBCSet->GetnBCRegion();
+                for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+                {
+                    StructBC *jBCRegion = structBCSet->GetBCRegion(iBCRegion);
+                    string jBCName = jBCRegion->GetBCName();
+
+                    //! Judge the same BC region according the BC name.
+                    if (jBCName == bcName)
+                    {
+                        int ist, ied, jst, jed, kst, ked;
+                        int in, jn, kn;
+                        int is, js, ks;
+                        RDouble nxs, nys, nzs;
+                        int layer = 1;
+                        jBCRegion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+                        int iSurface = jBCRegion->GetFaceDirection() + 1;
+                        int lr = jBCRegion->GetFaceLeftOrRightIndex();
+                        RDouble4D &area = *(grid->GetFaceArea());
+                        RDouble4D &xfn = *(grid->GetFaceNormalX());
+                        RDouble4D &yfn = *(grid->GetFaceNormalY());
+                        RDouble4D &zfn = *(grid->GetFaceNormalZ());
+                        RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+                        using namespace IDX;
+                        for (int k = kst; k <= ked; ++ k)
+                        {
+                            for (int j = jst; j <= jed; ++ j)
+                            {
+                                for (int i = ist; i <= ied; ++ i)
+                                {
+                                    jBCRegion->GetInsideCellIndex(i, j, k, is, js, ks, layer);
+                                    jBCRegion->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                                    if (ABS(q(is, js, ks, IU)) > LARGE)
+                                    {
+                                        q(is, js, ks, IR) = primitiveVarFarfield[IR];
+                                        q(is, js, ks, IU) = primitiveVarFarfield[IU];
+                                        q(is, js, ks, IV) = primitiveVarFarfield[IV];
+                                        q(is, js, ks, IW) = primitiveVarFarfield[IW];
+                                    }
+
+                                    nxs = lr * xfn(in, jn, kn, iSurface);
+                                    nys = lr * yfn(in, jn, kn, iSurface);
+                                    nzs = lr * zfn(in, jn, kn, iSurface);
+                                    RDouble vn_c1 = q(is, js, ks, IU) * nxs + q(is, js, ks, IV) * nys + q(is, js, ks, IW) * nzs;
+
+                                    massFlux += q(is, js, ks, IR) * vn_c1 * area(in, jn, kn, iSurface);
+                                }
+                            }
+                        }
+                    }
+                }
+            }
+
+            RDouble GLB_MassFlux;
+            PH_AllReduce(&massFlux, &GLB_MassFlux, 1, MPI_SUM);
+
+            RDouble refMachNumber = parameters->GetRefMachNumber();
+            RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+            RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+
+            GLB_MassFlux *= refDimensionalDensity * refDimensionalSonicSpeed * refMachNumber;
+
+            for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+            {
+                int iZoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+                Grid *iGrid = PHSPACE::GetGrid(iZoneID);
+                StructGrid *grid = StructGridCast(iGrid);
+
+                StructBCSet *structBCSet = grid->GetStructBCSet();
+                int nBCRegion = structBCSet->GetnBCRegion();
+                for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+                {
+                    StructBC *jBCRegion = structBCSet->GetBCRegion(iBCRegion);
+                    string jBCName = jBCRegion->GetBCName();
+
+                    if (jBCName == bcName)
+                    {
+                        Data_Param *bcData = jBCRegion->GetBCParamDataBase();
+                        RDouble massFlow = 0.0;
+                        bcData->GetData("massFlow", &massFlow, PHDOUBLE, 1);
+
+                        RDouble massFluxRatio = massFlow / (GLB_MassFlux + TINY);
+
+                        massFluxRatio = MAX(0.8, MIN(massFluxRatio, 1.2));
+                        bcData->UpdateData("massFluxRatio", &massFluxRatio, PHDOUBLE, 1);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::OutFlowBC3D(Grid *gridIn, StructBC *structBC)
+{
+    using namespace IDX;
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    int isWennScheme = parameters->GetWennSchemeFlag();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                //! First cell index inside flowfield.
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+
+                //! Second cell index inside flowfield.
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                RestrictIndex(is2, js2, ks2, ni - 1, nj - 1, nk - 1);
+
+                //! First cell index of ghostcell.
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+
+                //! Second cell index of ghostcell.
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    q(it1, jt1, kt1, m) = q(is1, js1, ks1, m);
+                    q(it2, jt2, kt2, m) = q(it1, jt1, kt1, m);
+                }
+
+
+                if (isWennScheme == 1)
+                {
+                    int is3, js3, ks3;
+                    int it3, jt3, kt3;
+
+                    //! Third cell index inside flow field.
+                    structBC->GetInsideCellIndex(i, j, k, is3, js3, ks3, 3);
+
+                    RestrictIndex(is3, js3, ks3, ni - 1, nj - 1, nk - 1);
+
+                    //! Third cell index of ghost cell.
+                    structBC->GetGhostCellIndex(i, j, k, it3, jt3, kt3, 3);
+
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        q(it3, jt3, kt3, m) = q(it1, jt1, kt1, m);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::SymmetryBC3D(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &faceNormalVelocity = *(grid->GetFaceNormalVelocity());
+
+    int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+
+    RDouble nxs = 0, nys = 0, nzs = 0;
+
+    int is = 0, js = 0, ks = 0, it = 0, jt = 0, kt = 0, in = 0, jn = 0, kn = 0;
+    RDouble vx = 0, vy = 0, vz = 0, vn = 0, vgn = 0;
+    int nLayer = GetNumberOfGhostCellLayers();
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                nxs = xfn(in, jn, kn, iSurface);
+                nys = yfn(in, jn, kn, iSurface);
+                nzs = zfn(in, jn, kn, iSurface);
+                vgn = faceNormalVelocity(in, jn, kn, iSurface);
+
+                for (int layer = 1; layer <= nLayer; ++ layer)
+                {
+                    structBC->GetInsideCellIndex(i, j, k, is, js, ks, layer);
+                    RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    vx = q(is, js, ks, IU);
+                    vy = q(is, js, ks, IV);
+                    vz = q(is, js, ks, IW);
+                    vn = nxs * vx + nys * vy + nzs * vz - vgn;
+
+                    q(it, jt, kt, IR) = q(is, js, ks, IR);
+                    q(it, jt, kt, IU) = q(is, js, ks, IU) - 2.0 * nxs * vn;
+                    q(it, jt, kt, IV) = q(is, js, ks, IV) - 2.0 * nys * vn;
+                    q(it, jt, kt, IW) = q(is, js, ks, IW) - 2.0 * nzs * vn;
+                    q(it, jt, kt, IP) = q(is, js, ks, IP);
+
+                    for (int m = nNSEquation; m < nEquation; ++ m)
+                    {
+                        q(it, jt, kt, m) = q(is, js, ks, m);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::SingularAxisBC3D(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &faceNormalVelocity = *(grid->GetFaceNormalVelocity());
+
+    int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+
+    int iii[3][3] = { 1, 0, 0, 0, 1, 0, 0, 0, 1 };
+    //! To judge if the singular axis using half-plane symmetry boundary conditions or using full plane boundary conditions
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int iSingularDim = 0;
+    bool isWhole = 1;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBCTmp = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBCTmp->GetBCType();
+        if (BCType == PHENGLEI::SYMMETRY)
+        {
+            isWhole = 0;
+            iSingularDim = structBCTmp->GetFaceDirection() + 1;
+            if (iSingularDim != iSurface) break;
+        }
+
+        if (IsInterface(BCType))
+        {
+            if (structBCTmp->GetRegionBlock() == structBCTmp->GetTargetRegionBlock())
+            {
+                if (structBCTmp->GetFaceDirectionOfTargetBlock() == iSingularDim)
+                {
+                    isWhole = 1;
+                    iSingularDim = structBCTmp->GetFaceDirection() + 1;
+                    if (iSingularDim != iSurface) break;
+                }
+            }
+        }
+    }
+
+    int *startPoint = structBC->GetStartPoint();
+    int *endPoint = structBC->GetEndPoint();
+    int *faceDirectionIndex = structBC->GetFaceDirectionIndex();
+    if (iSingularDim == 0)
+    {
+        SingularAxisFullPlaneBC3D(grid, structBC);
+        return;
+    }
+    int nd3 = 6 - iSingularDim - iSurface;
+    RDouble nxs = 0, nys = 0, nzs = 0, vgn = 0;
+    if (isWhole == 0)
+    {
+        if (iSingularDim == 1)
+        {
+            int i = startPoint[0];
+            int j = (endPoint[1] + startPoint[1]) / 2 - 3 * faceDirectionIndex[1];
+            int k = (endPoint[2] + startPoint[2]) / 2 - 3 * faceDirectionIndex[2];
+            nxs = xfn(i, j, k, iSingularDim);
+            nys = yfn(i, j, k, iSingularDim);
+            nzs = zfn(i, j, k, iSingularDim);
+            vgn = faceNormalVelocity(i, j, k, iSingularDim);
+        }
+        else if (iSingularDim == 2)
+        {
+            int i = (endPoint[0] + startPoint[0]) / 2 - 3 * faceDirectionIndex[0];
+            int j = startPoint[1];
+            int k = (endPoint[2] + startPoint[2]) / 2 - 3 * faceDirectionIndex[2];
+            nxs = xfn(i, j, k, iSingularDim);
+            nys = yfn(i, j, k, iSingularDim);
+            nzs = zfn(i, j, k, iSingularDim);
+            vgn = faceNormalVelocity(i, j, k, iSingularDim);
+        }
+        else if (iSingularDim == 3)
+        {
+            int i = (endPoint[0] + startPoint[0]) / 2 - 3 * faceDirectionIndex[0];
+            int j = (endPoint[1] + startPoint[1]) / 2 - 3 * faceDirectionIndex[1];
+            int k = startPoint[2];
+            nxs = xfn(i, j, k, iSingularDim);
+            nys = yfn(i, j, k, iSingularDim);
+            nzs = zfn(i, j, k, iSingularDim);
+            vgn = faceNormalVelocity(i, j, k, iSingularDim);
+        }
+    }
+    else
+    {
+        nxs = 0.0;
+        nys = 0.0;
+        nzs = 0.0;
+        vgn = 0.0;
+    }
+
+    int halfDim = startPoint[iSingularDim - 1] + (endPoint[iSingularDim - 1] - startPoint[iSingularDim - 1]) / (1 + isWhole);
+    int wholeDim = endPoint[iSingularDim - 1];
+
+    RDouble vx = 0, vy = 0, vz = 0, vn = 0;
+
+    using namespace IDX;
+
+    for (int i = startPoint[iSurface - 1]; i <= endPoint[iSurface - 1]; ++ i)
+    {
+        for (int iLayer = 1; iLayer <= 2; ++ iLayer)
+        {
+            int it1 = i + iLayer * structBC->GetFaceLeftOrRightIndex();
+            int is1 = i - (iLayer - 1) * structBC->GetFaceLeftOrRightIndex();
+            for (int j = startPoint[iSingularDim - 1]; j <= endPoint[iSingularDim - 1]; ++ j)
+            {
+                int jj = 0;
+                if (isWhole == 0)
+                {
+                    jj = wholeDim - j + 1;
+                }
+                else
+                {
+                    jj = halfDim + j;
+                    if (jj > wholeDim) jj = wholeDim;
+                }
+
+                for (int k = startPoint[nd3 - 1]; k <= endPoint[nd3 - 1]; ++ k)
+                {
+                    int it = iii[iSurface - 1][0] * it1 + iii[iSingularDim - 1][0] * j + iii[nd3 - 1][0] * k;
+                    int jt = iii[iSurface - 1][1] * it1 + iii[iSingularDim - 1][1] * j + iii[nd3 - 1][1] * k;
+                    int kt = iii[iSurface - 1][2] * it1 + iii[iSingularDim - 1][2] * j + iii[nd3 - 1][2] * k;
+                    int is = iii[iSurface - 1][0] * is1 + iii[iSingularDim - 1][0] * jj + iii[nd3 - 1][0] * k;
+                    int js = iii[iSurface - 1][1] * is1 + iii[iSingularDim - 1][1] * jj + iii[nd3 - 1][1] * k;
+                    int ks = iii[iSurface - 1][2] * is1 + iii[iSingularDim - 1][2] * jj + iii[nd3 - 1][2] * k;
+
+                    vx = q(is, js, ks, IU);
+                    vy = q(is, js, ks, IV);
+                    vz = q(is, js, ks, IW);
+                    vn = nxs * vx + nys * vy + nzs * vz - vgn;
+
+                    q(it, jt, kt, IR) = q(is, js, ks, IR);
+                    q(it, jt, kt, IU) = q(is, js, ks, IU) - 2.0 * nxs * vn;
+                    q(it, jt, kt, IV) = q(is, js, ks, IV) - 2.0 * nys * vn;
+                    q(it, jt, kt, IW) = q(is, js, ks, IW) - 2.0 * nzs * vn;
+                    q(it, jt, kt, IP) = q(is, js, ks, IP);
+
+                    for (int m = nNSEquation; m < nEquation; ++ m)
+                    {
+                        q(it, jt, kt, m) = q(is, js, ks, m);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::SingularAxisFullPlaneBC3D(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int bcType = structBC->GetBCType();
+    int SingularDim = bcType - 71;
+
+    int is1, js1, ks1;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    if (SingularDim == 0)
+    {
+        for (int i = ist; i <= ied; ++ i)
+        {
+            for (int iEq = 0; iEq < nEquation; ++ iEq)
+            {
+                RDouble sumQ = 0.0;
+                if (jst == jed)
+                {
+                    int j = jst;
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                        RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                        sumQ += q(is1, js1, ks1, iEq);
+                    }
+                    sumQ = sumQ / static_cast<RDouble>(ked - kst + 1);
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                        structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+                        q(it1, jt1, kt1, iEq) = sumQ;
+                        q(it2, jt2, kt2, iEq) = q(it1, jt1, kt1, iEq);
+                    }
+                }
+                else
+                {
+                    int k = kst;
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                        RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                        sumQ += q(is1, js1, ks1, iEq);
+                    }
+                    sumQ = sumQ / static_cast<RDouble>(jed - jst + 1);
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                        structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+                        q(it1, jt1, kt1, iEq) = sumQ;
+                        q(it2, jt2, kt2, iEq) = q(it1, jt1, kt1, iEq);
+                    }
+                }
+            }
+        }
+    }
+    else if (SingularDim == 1)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int iEq = 0; iEq < nEquation; ++ iEq)
+            {
+                RDouble sumQ = 0.0;
+                if (ist == ied)
+                {
+                    int i = ist;
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                        sumQ += q(is1, js1, ks1, iEq);
+                    }
+                    sumQ = sumQ / static_cast<RDouble>(ked - kst + 1);
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                        structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+                        q(it1, jt1, kt1, iEq) = sumQ;
+                        q(it2, jt2, kt2, iEq) = q(it1, jt1, kt1, iEq);
+                    }
+                }
+                else
+                {
+                    int k = kst;
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                        sumQ += q(is1, js1, ks1, iEq);
+                    }
+                    sumQ = sumQ / static_cast<RDouble>(ied - ist + 1);
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                        structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+                        q(it1, jt1, kt1, iEq) = sumQ;
+                        q(it2, jt2, kt2, iEq) = q(it1, jt1, kt1, iEq);
+                    }
+                }
+            }
+        }
+    }
+    else if (SingularDim == 2)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int iEq = 0; iEq < nEquation; ++ iEq)
+            {
+                RDouble sumQ = 0.0;
+                if (jst == jed)
+                {
+                    int j = jst;
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                        RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                        sumQ += q(is1, js1, ks1, iEq);
+                    }
+                    sumQ = sumQ / static_cast<RDouble>(ied - ist + 1);
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                        structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+                        q(it1, jt1, kt1, iEq) = sumQ;
+                        q(it2, jt2, kt2, iEq) = q(it1, jt1, kt1, iEq);
+                    }
+                }
+                else
+                {
+                    int i = ist;
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                        RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                        sumQ += q(is1, js1, ks1, iEq);
+                    }
+                    sumQ = sumQ / static_cast<RDouble>(jed - jst + 1);
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                        structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+                        q(it1, jt1, kt1, iEq) = sumQ;
+                        q(it2, jt2, kt2, iEq) = q(it1, jt1, kt1, iEq);
+                    }
+                }
+            }
+        }
+    }
+}
+
+//! Set viscous adiabatic wall condition.
+void NCCRSolverStruct::ViscousAdiabaticWall(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int isWennScheme = parameters->GetWennSchemeFlag();
+    //! Obtain the number of the physical equations.
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    int isAle = parameters->GetIsCodeOfAleModel();
+
+    RDouble4D &faceVelocityX = *(grid->GetFaceVelocityX());
+    RDouble4D &faceVelocityY = *(grid->GetFaceVelocityY());
+    RDouble4D &faceVelocityZ = *(grid->GetFaceVelocityZ());
+
+    RDouble uWall = 0.0;
+    RDouble vWall = 0.0;
+    RDouble wWall = 0.0;
+    Data_Param *bcData = structBC->GetBCParamDataBase();
+
+    if (bcData)
+    {
+        if (bcData->IsExist("uWall", PHDOUBLE, 1))
+        {
+            bcData->GetData("uWall", &uWall, PHDOUBLE, 1);
+            bcData->GetData("vWall", &vWall, PHDOUBLE, 1);
+            bcData->GetData("wWall", &wWall, PHDOUBLE, 1);
+        }
+    }
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int in, jn, kn;
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                RestrictIndex(is2, js2, ks2, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                RDouble velocityXWall = uWall;
+                RDouble velocityYWall = vWall;
+                RDouble velocityZWall = wWall;
+                if (isUnsteady && isAle)
+                {
+                    velocityXWall += faceVelocityX(in, jn, kn, iSurface);
+                    velocityYWall += faceVelocityY(in, jn, kn, iSurface);
+                    velocityZWall += faceVelocityZ(in, jn, kn, iSurface);
+                }
+
+                q(it1, jt1, kt1, IR) = q(is1, js1, ks1, IR);
+                q(it1, jt1, kt1, IU) = -q(is1, js1, ks1, IU) + 2.0 * velocityXWall;
+                q(it1, jt1, kt1, IV) = -q(is1, js1, ks1, IV) + 2.0 * velocityYWall;
+                q(it1, jt1, kt1, IW) = -q(is1, js1, ks1, IW) + 2.0 * velocityZWall;
+                q(it1, jt1, kt1, IP) = q(is1, js1, ks1, IP);
+
+                q(it2, jt2, kt2, IR) = q(it1, jt1, kt1, IR);
+                q(it2, jt2, kt2, IU) = q(it1, jt1, kt1, IU);
+                q(it2, jt2, kt2, IV) = q(it1, jt1, kt1, IV);
+                q(it2, jt2, kt2, IW) = q(it1, jt1, kt1, IW);
+                q(it2, jt2, kt2, IP) = q(it1, jt1, kt1, IP);
+
+                for (int m = nNSEquation; m < nEquation; ++ m)
+                {
+                    q(it1, jt1, kt1, m) = q(is1, js1, ks1, m);
+                    q(it2, jt2, kt2, m) = q(it1, jt1, kt1, m);
+                }
+
+                if (isWennScheme == 1)
+                {
+                    int is3, js3, ks3;
+                    int it3, jt3, kt3;
+
+                    //! Third cell index inside flowfield.
+                    structBC->GetInsideCellIndex(i, j, k, is3, js3, ks3, 3);
+
+                    RestrictIndex(is3, js3, ks3, ni - 1, nj - 1, nk - 1);
+
+                    //! Third cell index of ghostcell.
+                    structBC->GetGhostCellIndex(i, j, k, it3, jt3, kt3, 3);
+
+                    q(it3, jt3, kt3, IR) = q(it1, jt1, kt1, IR);
+                    q(it3, jt3, kt3, IU) = q(it1, jt1, kt1, IU);
+                    q(it3, jt3, kt3, IV) = q(it1, jt1, kt1, IV);
+                    q(it3, jt3, kt3, IW) = q(it1, jt1, kt1, IW);
+                    q(it3, jt3, kt3, IP) = q(it1, jt1, kt1, IP);
+
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        q(it3, jt3, kt3, m) = q(it1, jt1, kt1, m);
+                    }
+                }
+            }
+        }
+    }
+}
+
+//! Set viscous isothermal wall condition.
+void NCCRSolverStruct::ViscousIsotropicWall(Grid *gridIn, StructBC *structBC, int iWallBC)
+{
+    //! chemical = 1 is not need to be cared, it is treated in another function.
+    //! temperature array should not appear here, it has not been updated.
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    int isAle = parameters->GetIsCodeOfAleModel();
+
+    RDouble refGama = parameters->GetRefGama();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+
+    RDouble uWall = 0.0;
+    RDouble vWall = 0.0;
+    RDouble wWall = 0.0;
+
+    RDouble wallTemperature = 0.0;
+    structBC->GetParamData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+
+    if (structBC->CheckParamData("uWall"))
+    {
+        structBC->GetParamData("uWall", &uWall, PHDOUBLE, 1);
+        structBC->GetParamData("vWall", &vWall, PHDOUBLE, 1);
+        structBC->GetParamData("wWall", &wWall, PHDOUBLE, 1);
+    }
+
+    bool wallTempArrayExist = false;
+    RDouble3D *wallTempArray = NULL;
+    if (structBC->CheckFieldData("wallTempArray"))
+    {
+        wallTempArrayExist = true;
+        wallTempArray = reinterpret_cast <RDouble3D *> (structBC->GetFieldDataPtr("wallTempArray"));
+    }
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (gridIn->GetDataPtr("surfaceSlipVariables"));
+    }
+    RDouble2D *surfaceTemperature = NULL;
+    if (wallTemperature >= 0.0)
+    {
+        surfaceTemperature = reinterpret_cast <RDouble2D *> (gridIn->GetDataPtr("surfaceTemperature"));
+    }
+    bool isRadiationEquilibrium = false;
+    if (fabs(wallTemperature) <= EPSILON)
+    {
+        isRadiationEquilibrium = true;
+    }
+
+    int nRapidFlowfield = parameters->GetRapidFlowfieldMethod();
+    RDouble3D *surfacePressure = NULL;
+    if (nRapidFlowfield > 0)
+    {
+        surfacePressure = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfacePressure"));
+    }
+    int nInitPressureStep = parameters->GetInitialPressureSteps();
+    int nCurrentIteration = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    bool isUseRapidMethod = false;
+    if (nRapidFlowfield > 0 && nCurrentIteration <= nInitPressureStep)
+    {
+        isUseRapidMethod = true;
+    }
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+    int iSurface = structBC->GetFaceDirection() + 1;
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &faceVelocityX = *(grid->GetFaceVelocityX());
+    RDouble4D &faceVelocityY = *(grid->GetFaceVelocityY());
+    RDouble4D &faceVelocityZ = *(grid->GetFaceVelocityZ());
+
+    RDouble temperatureWallNonDimensional = wallTemperature / refDimensionalTemperature;  //! non-dimensional temperature.
+    RDouble temperaturelimitation = 1.E-6;
+
+    //! Usually, it is 2.
+    int nLayer = GetNumberOfGhostCellLayers();
+
+    using namespace IDX;
+
+    int is, js, ks, it, jt, kt;
+    int nIndexOfCell = 0;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int layer = 1; layer <= nLayer; ++ layer)
+                {
+                    int in, jn, kn;
+                    structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                    structBC->GetInsideCellIndex(i, j, k, is, js, ks, layer);
+                    RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    RDouble rs = q(is, js, ks, 0);
+                    RDouble us = q(is, js, ks, 1);
+                    RDouble vs = q(is, js, ks, 2);
+                    RDouble ws = q(is, js, ks, 3);
+                    RDouble ps = q(is, js, ks, 4);
+                    RDouble ts = refGama * refMachNumber * refMachNumber * ps / rs;
+
+                    //if (isUseRapidMethod)
+                    //{
+                    //    ps = (*surfacePressure)(iWallBC, nIndexOfCell, 1);
+                    //}
+
+                    RDouble velocityXWall = uWall;
+                    RDouble velocityYWall = vWall;
+                    RDouble velocityZWall = wWall;
+
+                    if (nSlipBCModel > 0)
+                    {
+                        velocityXWall += (*surfaceSlipVariables)(iWallBC, nIndexOfCell, 3);
+                        velocityYWall += (*surfaceSlipVariables)(iWallBC, nIndexOfCell, 4);
+                        velocityZWall += (*surfaceSlipVariables)(iWallBC, nIndexOfCell, 5);
+                    }
+
+                    if (isUnsteady && isAle)
+                    {
+                        velocityXWall += faceVelocityX(in, jn, kn, iSurface);
+                        velocityYWall += faceVelocityY(in, jn, kn, iSurface);
+                        velocityZWall += faceVelocityZ(in, jn, kn, iSurface);
+                    }
+
+                    RDouble ut = -us + 2.0 * velocityXWall;
+                    RDouble vt = -vs + 2.0 * velocityYWall;
+                    RDouble wt = -ws + 2.0 * velocityZWall;
+                    RDouble pt = ps;
+                    if (wallTempArrayExist)
+                    {
+                        temperatureWallNonDimensional = (*wallTempArray)(i, j, k) / refDimensionalTemperature;
+                    }
+                    if (isRadiationEquilibrium)
+                    {
+                        temperatureWallNonDimensional = (*surfaceTemperature)(iWallBC, nIndexOfCell);
+                    }
+                    if (nSlipBCModel > 0)
+                    {
+                        temperatureWallNonDimensional = (*surfaceSlipVariables)(iWallBC, nIndexOfCell, ITT);
+                    }
+
+                    RDouble tt = 2.0 * temperatureWallNonDimensional - ts;
+                    if (tt < temperaturelimitation)
+                    {
+                        tt = temperatureWallNonDimensional;
+                    }
+
+                    RDouble rt = refGama * refMachNumber * refMachNumber * pt / tt;
+
+                    q(it, jt, kt, 0) = rt;
+                    q(it, jt, kt, 1) = ut;
+                    q(it, jt, kt, 2) = vt;
+                    q(it, jt, kt, 3) = wt;
+                    q(it, jt, kt, 4) = pt;
+                }
+                ++ nIndexOfCell;
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::SetBCInitialValuesByInterpolation(StructBC *structBC, RDouble *primitiveVar)
+{
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (!isUnsteady)
+    {
+        return;
+    }
+
+    using namespace GAS_SPACE;
+    //! Obtain the local parameters on boundary.
+    int nTrajectoryVariables = 1;
+    structBC->GetBCParamDataBase()->GetData("nTrajectoryVariables", &nTrajectoryVariables, PHINT, 1);
+    
+    RDouble *time = new RDouble[nTrajectoryVariables];
+    RDouble *pressure = new RDouble[nTrajectoryVariables];
+    RDouble *velocity = new RDouble[nTrajectoryVariables];
+    RDouble *temperature = new RDouble[nTrajectoryVariables];
+
+    structBC->GetBCParamDataBase()->GetData("time", &time[0], PHDOUBLE, nTrajectoryVariables);
+    structBC->GetBCParamDataBase()->GetData("pressure", &pressure[0], PHDOUBLE, nTrajectoryVariables);
+    structBC->GetBCParamDataBase()->GetData("velocity", &velocity[0], PHDOUBLE, nTrajectoryVariables);
+    structBC->GetBCParamDataBase()->GetData("temperature", &temperature[0], PHDOUBLE, nTrajectoryVariables);
+
+    RDouble localDimensionalVelocity = 0, localDimensionalTemperature = 0, localDimensionalPressure = 0, localDimensionalDensity = 0;
+
+    //! Obtain the reference parameters.
+    RDouble refDimensionalDensity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+    RDouble refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+    RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+
+    RDouble physicalTime = GlobalDataBase::GetDoubleParaFromDB("physicalTime");
+    RDouble reynoldsReferenceLengthDimensional = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+    RDouble unit = reynoldsReferenceLengthDimensional / refDimensionalVelocity;
+    RDouble physicalTimeStepDimensional = physicalTime * unit;
+
+    localDimensionalVelocity = velocity[0];
+    localDimensionalPressure = pressure[0];
+    localDimensionalTemperature = temperature[0];
+    for (int iData = 1; iData < nTrajectoryVariables; ++ iData)
+    {
+        if (physicalTimeStepDimensional > time[iData - 1] && physicalTimeStepDimensional < time[iData])
+        {
+            RDouble delta = (physicalTimeStepDimensional - time[iData - 1]) / (time[iData] - time[iData - 1]);
+            localDimensionalVelocity = velocity[iData - 1] + delta * (velocity[iData] - velocity[iData - 1]);
+            localDimensionalPressure = pressure[iData - 1] + delta * (pressure[iData] - pressure[iData - 1]);
+            localDimensionalTemperature = temperature[iData - 1] + delta * (temperature[iData] - temperature[iData - 1]);
+        }
+    }
+    if (physicalTimeStepDimensional > time[nTrajectoryVariables - 1])
+    {
+        localDimensionalVelocity = velocity[nTrajectoryVariables - 1];
+        localDimensionalPressure = pressure[nTrajectoryVariables - 1];
+        localDimensionalTemperature = temperature[nTrajectoryVariables - 1];
+    }
+
+    RDouble attackd = 0, angleSlide = 0;
+    if (structBC->GetBCParamDataBase()->IsExist("attackd", PHDOUBLE, 1))
+    {
+        structBC->GetBCParamDataBase()->GetData("attackd", &attackd, PHDOUBLE, 1);
+    }
+    else
+    {
+        attackd = GlobalDataBase::GetDoubleParaFromDB("attackd");
+    }
+    if (structBC->GetBCParamDataBase()->IsExist("angleSlide", PHDOUBLE, 1))
+    {
+        structBC->GetBCParamDataBase()->GetData("angleSlide", &angleSlide, PHDOUBLE, 1);
+    }
+    RDouble attack = attackd * PI / 180.0;
+    RDouble sideslip = angleSlide * PI / 180.0;
+
+    int nchem = gas->GetChemicalType();
+    if (nchem == 0)
+    {
+        RDouble reference_general_gas_constant = GlobalDataBase::GetDoubleParaFromDB("reference_average_general_gas_constant");
+        localDimensionalDensity = localDimensionalPressure / reference_general_gas_constant / localDimensionalTemperature;
+    }
+    else
+    {
+        int nNSEqn = gas->GetNSEquationNumber();
+        int numberOfSpecies = gas->GetNumberOfSpecies();
+        RDouble initMassFraction[MAX_SPECIES_NUM] = { 0 }, primVars[MAX_SPECIES_NUM] = { 0 };
+        if (structBC->GetBCParamDataBase()->IsExist("initMassFraction", PHDOUBLE, numberOfSpecies))
+        {
+            structBC->GetBCParamDataBase()->GetData("initMassFraction", &initMassFraction, PHDOUBLE, numberOfSpecies);
+        }
+        else
+        {
+            RDouble *speciesMass = gas->GetInitMassFraction();
+            for (int s = 0; s < numberOfSpecies; ++ s)
+            {
+                initMassFraction[s] = speciesMass[s];
+            }
+        }
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primVars[nNSEqn + s] = initMassFraction[s];
+        }
+
+        RDouble oMass = 0.0, gasR = 0.0;
+        gas->ComputeMolecularWeightReciprocalDimensional(primVars, oMass);
+        gasR = rjmk * oMass;
+        localDimensionalDensity = localDimensionalPressure / (gasR * localDimensionalTemperature);
+
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primitiveVar[nNSEqn + s] = initMassFraction[s];
+        }
+
+        int ntmodel = gas->GetTemperatureModel();
+        RDouble nonDimTv = localDimensionalTemperature / refDimensionalTemperature;
+
+        if (ntmodel > 1)       //! multi-temperature model.
+        {
+            RDouble vibrationEnergy = gas->GetMixedGasDimensionalVibrationEnergy(nonDimTv, initMassFraction);
+            RDouble electronEnergy  = gas->GetMixedGasDimensionalElectronEnergy(nonDimTv, initMassFraction);
+            RDouble squareVelocity = refDimensionalVelocity * refDimensionalVelocity;
+            vibrationEnergy = vibrationEnergy / squareVelocity;
+            electronEnergy  = electronEnergy  / squareVelocity;
+            if (ntmodel == 2)
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy + electronEnergy;
+    }
+            else
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy;
+                primitiveVar[nNSEqn + numberOfSpecies + 1] = electronEnergy;
+            }
+        }
+    }
+    using namespace IDX;
+    primitiveVar[IR] = localDimensionalDensity / refDimensionalDensity;
+    primitiveVar[IU] = localDimensionalVelocity / refDimensionalVelocity * cos(attack) * cos(sideslip);
+    primitiveVar[IV] = localDimensionalVelocity / refDimensionalVelocity * sin(attack) * cos(sideslip);
+    primitiveVar[IW] = localDimensionalVelocity / refDimensionalVelocity * sin(sideslip);
+    primitiveVar[IP] = localDimensionalPressure / (refDimensionalDensity * refDimensionalVelocity * refDimensionalVelocity);
+    delete[]time; time = NULL;
+    delete[]pressure; pressure = NULL;
+    delete[]velocity; velocity = NULL;
+    delete[]temperature; temperature = NULL;
+}
+
+void NCCRSolverStruct::SetBCInitialValuesBySpeedCoef(int nNumberOfSpeedStep, RDouble *primitiveVar)
+{
+    int iterationStep;
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nMGLevel = parameters->GetNMGLevel();
+    if (nMGLevel <= 1)
+    {
+        //! Finest grid.
+        GlobalDataBase::GetData("outnstep", &iterationStep, PHINT, 1);
+    }
+    else
+    {
+        //! Coarse grid.
+        GlobalDataBase::GetData("newnstep", &iterationStep, PHINT, 1);
+    }
+}
+
+void NCCRSolverStruct::InitialSetPartialParameter(StructGrid *grid, bool flowTag)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int nNumberOfPartialField = 0 ;
+    if (GlobalDataBase::IsExist("nNumberOfPartialField", PHINT, 1))
+    {
+        nNumberOfPartialField = GlobalDataBase::GetIntParaFromDB("nNumberOfPartialField");
+    }
+    if (nNumberOfPartialField == 0)
+    {
+        return;
+    }
+    int nPartialParameter = 0 ;
+    if (GlobalDataBase::IsExist("nPartialParameter", PHINT, 1))
+    {
+        nPartialParameter = GlobalDataBase::GetIntParaFromDB("nPartialParameter");
+    }
+    if (nPartialParameter == 0)
+    {
+        return;
+    }
+////////////////////////////////////////////// read "nStartGridIndex" and "nEndGridIndex"
+
+    int *nStartGridIndex = new int[nNumberOfPartialField];
+
+    int *nEndGridIndex = new int[nNumberOfPartialField];
+
+    if (GlobalDataBase::IsExist("nStartGridIndex", PHINT, nNumberOfPartialField))
+    {
+        GlobalDataBase::GetData("nStartGridIndex", &nStartGridIndex[0], PHINT, nNumberOfPartialField);
+    }
+    else
+    {
+        delete[] nStartGridIndex;
+        delete[] nEndGridIndex;
+        return;
+    }
+
+    if (GlobalDataBase::IsExist("nEndGridIndex", PHINT, nNumberOfPartialField))
+    {
+        GlobalDataBase::GetData("nEndGridIndex", &nEndGridIndex[0], PHINT, nNumberOfPartialField);
+    }
+    else
+    {
+        for (int m = 0; m < nNumberOfPartialField; ++ m) nEndGridIndex[m] = nStartGridIndex[m];
+    }
+
+//////////////////////////////////////////////judge "IsPartialField",and set "IndexOfPartialField"
+    int ordinaryGridIndex = grid->GetOrdinaryGridIndex() + 1;
+   // int ordinaryGridIndex = grid->GetZoneID() + 1;
+    bool IsPartialField = false;
+    int IndexOfPartialField = 0;
+
+    for (int m = 0; m < nNumberOfPartialField; ++ m)
+    {
+        for (int GridIndex = nStartGridIndex[m]; GridIndex <= nEndGridIndex[m]; ++ GridIndex)
+        {
+            if(IsPartialField == false && GridIndex == ordinaryGridIndex) 
+            {
+                IsPartialField = true;
+                IndexOfPartialField = m;
+            }
+        }
+    }
+
+    delete[] nStartGridIndex;
+    delete[] nEndGridIndex;
+
+    if(IsPartialField == false) return;
+
+    int nmax;
+    if (nPartialParameter == 1)     //the same Variables
+    {
+        nmax = 1;
+        IndexOfPartialField = 0;
+    }
+    else                            //different Variables
+    {
+        nmax = nNumberOfPartialField;
+    }
+
+////////////////////////////////////////////// read and set "partialCFL"
+    if( flowTag == false)
+    {
+        grid->SetPartialCFL(parameters->GetCFLEnd());
+
+        int ifPartialCFL = 0;
+        if (GlobalDataBase::IsExist("ifPartialCFL", PHINT, 1))
+        {
+            GlobalDataBase::GetData("ifPartialCFL", &ifPartialCFL, PHINT, 1);
+        }
+        if(ifPartialCFL <= 0)return;
+
+        RDouble *partialCFL = new RDouble[nmax];
+        if (GlobalDataBase::IsExist("partialCFL", PHDOUBLE, nmax))
+        {
+            GlobalDataBase::GetData("partialCFL", &partialCFL[0], PHDOUBLE, nmax);
+            grid->SetPartialCFL(partialCFL[IndexOfPartialField]);
+
+            //RDouble cfl10= partialCFL[IndexOfPartialField];
+            //RDouble cfl11= grid->GetPartialCFL();
+            //RDouble cfl12= grid->GetPartialCFL();
+        }
+        delete[] partialCFL;
+        return;
+    }
+//////////////////////////////////////////////read and set "partialSpeedCoef"
+    int ifPartialIniFlow = 0;
+    if (GlobalDataBase::IsExist("ifPartialIniFlow", PHINT, 1))
+    {
+        GlobalDataBase::GetData("ifPartialIniFlow", &ifPartialIniFlow, PHINT, 1);
+    }
+    if(ifPartialIniFlow <= 0)return;
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+    using namespace IDX;
+
+    RDouble *partialSpeedCoef = new RDouble[nmax];
+    if (GlobalDataBase::IsExist("partialSpeedCoef", PHDOUBLE, nmax) && ifPartialIniFlow == 1)
+    {
+        GlobalDataBase::GetData("partialSpeedCoef", &partialSpeedCoef[0], PHDOUBLE, nmax);
+
+        RDouble iniSpeedCoef = min(1.0, max(0.0, partialSpeedCoef[IndexOfPartialField]));
+        
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    primitiveVariables(i, j, k, IU) *= iniSpeedCoef;
+                    primitiveVariables(i, j, k, IV) *= iniSpeedCoef;
+                    primitiveVariables(i, j, k, IW) *= iniSpeedCoef;
+                }
+            }
+        }
+    }
+    delete[] partialSpeedCoef;
+
+//////////////////////////////////////////////read and set "partialPrimitiveVariables"
+    
+    if(ifPartialIniFlow <= 1)return;
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+
+    //Obtain the reference parameters.
+    RDouble refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+    RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+    RDouble refDimensionalPressure = GlobalDataBase::GetDoubleParaFromDB("refDimensionalPressure");
+
+    RDouble *partialPressure = new RDouble[nmax];
+    RDouble *partialTemperature = new RDouble[nmax];
+    RDouble *partialSpeed = new RDouble[nmax];
+    RDouble *partialAttackd = new RDouble[nmax];
+    RDouble *partialSlide = new RDouble[nmax];
+
+    RDouble pressure, density, temperature[3] = {1.0, 1.0, 1.0};
+    RDouble speedU, speedV, speedW, Speed, Attackd ,Slide;
+    bool densityTag = false, tag = false;
+
+    density  = primitiveVarFarfield[IR];
+    pressure = primitiveVarFarfield[IP];
+    speedU   = primitiveVarFarfield[IU];
+    speedV   = primitiveVarFarfield[IV];
+    speedW   = primitiveVarFarfield[IW];
+
+    Speed = sqrt(speedU * speedU + speedV * speedV + speedW * speedW);
+    Attackd = 0.0; Slide   = 0.0;
+
+    if (GlobalDataBase::IsExist("partialPressure", PHDOUBLE, nmax))
+    {
+        GlobalDataBase::GetData("partialPressure", &partialPressure[0], PHDOUBLE, nmax);
+        pressure = partialPressure[IndexOfPartialField] / refDimensionalPressure;
+        tag = true;
+    }
+
+    if (GlobalDataBase::IsExist("partialTemperature", PHDOUBLE, nmax))
+    {
+        GlobalDataBase::GetData("partialTemperature", &partialTemperature[0], PHDOUBLE, nmax);
+        temperature[0] = partialTemperature[IndexOfPartialField] / refDimensionalTemperature;
+        temperature[1] = temperature[0];
+        temperature[2] = temperature[0];
+
+        densityTag = true;
+        tag = true;
+    }
+
+    if (GlobalDataBase::IsExist("partialAttackd", PHDOUBLE, nmax))
+    {
+        GlobalDataBase::GetData("partialAttackd", &partialAttackd[0], PHDOUBLE, nmax);
+        Attackd = partialAttackd[IndexOfPartialField] * PI / 180.0;
+        tag = true;
+    }
+
+    if (GlobalDataBase::IsExist("partialSlide", PHDOUBLE, nmax))
+    {
+        GlobalDataBase::GetData("partialSlide", &partialSlide[0], PHDOUBLE, nmax);
+        Slide = partialSlide[IndexOfPartialField] * PI / 180.0;
+        tag = true;
+    }
+
+    if (GlobalDataBase::IsExist("partialSpeed", PHDOUBLE, nmax))
+    {
+        GlobalDataBase::GetData("partialSpeed", &partialSpeed[0], PHDOUBLE, nmax);
+        Speed = partialSpeed[IndexOfPartialField] / refDimensionalVelocity;
+
+        speedU   = Speed * cos(Attackd) * cos(Slide);
+        speedV   = Speed * sin(Attackd) * cos(Slide);
+        speedW   = Speed * sin(Slide);
+        tag = true;
+    }
+
+    delete[] partialPressure;
+    delete[] partialTemperature;
+    delete[] partialSpeed;
+    delete[] partialAttackd;
+    delete[] partialSlide;
+
+    int nEquation = parameters->GetnEquation();
+    RDouble *prim = new RDouble[nEquation];
+
+    prim[IP] = pressure;
+    prim[IU] = speedU;
+    prim[IV] = speedV;
+    prim[IW] = speedW;
+
+    int nchem = gas->GetChemicalType();
+    RDouble gasConstant = gas->GetUniversalGasConstant();
+
+    if (nchem == 0)     //! Perfect gas.
+    {
+        if(densityTag) 
+        {
+            density = pressure / (temperature[0] * gasConstant);
+        }
+        else
+        {
+            temperature[0] = pressure / (density * gasConstant);
+            temperature[1] = temperature[0];
+            temperature[2] = temperature[0];
+        }
+        prim[IR] = density;
+    }
+    else if (nchem == 1)//! Real gas.
+    {
+        int numberOfSpecies = gas->GetNumberOfSpecies();
+        int nNSEquation = parameters->GetNSEquationNumber();
+
+        RDouble *MassFractions = new RDouble[numberOfSpecies];
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            MassFractions[s] = primitiveVarFarfield[nNSEquation + s];
+        }
+
+        if (nPartialParameter == 1)
+        {
+            nmax = numberOfSpecies;
+            IndexOfPartialField = 0;
+        }
+        else
+        {
+            nmax = nNumberOfPartialField * numberOfSpecies;
+            IndexOfPartialField *= numberOfSpecies;
+        }
+
+        RDouble *partialMassFractions = new RDouble[nmax];
+
+        if (GlobalDataBase::IsExist("partialMassFractions", PHDOUBLE, nmax))
+        {
+            GlobalDataBase::GetData("partialMassFractions", &partialMassFractions[0], PHDOUBLE, nmax);
+            for (int s = 0; s < numberOfSpecies; ++ s)
+            {
+                MassFractions[s] = partialMassFractions[IndexOfPartialField + s];
+            }
+            tag = true;
+        }
+
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+             prim[nNSEquation + s]= MassFractions[s];
+        }
+
+        RDouble massReciprocal, ceDivideMe;
+        massReciprocal = gas->GetMixedGasMolecularWeightReciprocalWithoutElectron(MassFractions, ceDivideMe);
+
+        if(densityTag) 
+        {
+            density = pressure / (temperature[0] * gasConstant * (massReciprocal + ceDivideMe));
+        }
+        else
+        {
+            gas->GetTemperatureR(primitiveVarFarfield, temperature[0], temperature[1], temperature[2]);
+        }
+
+        prim[IR] = density;
+
+        int ntmodel = gas->GetTemperatureModel();
+        if (ntmodel ==2)       //! multi-temperature model.
+        {
+            gas->ComputeMixtureEve(MassFractions, temperature[1], prim[nEquation-1]);
+        }
+        else if (ntmodel ==3)       //! multi-temperature model.
+        {
+            gas->ComputeMixtureEv(MassFractions, temperature[1], prim[nEquation-2]);
+            gas->ComputeMixtureEe(MassFractions, temperature[2], prim[nEquation-1]);
+        }
+
+        delete[] MassFractions, partialMassFractions;
+    }
+
+    if(tag)
+    {
+        RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    for (int s = 0; s < nEquation; ++ s)
+                    {
+                         primitiveVariables( i, j, k, s)= prim[s];
+                    }
+
+                    for (int m = 0; m < parameters->GetTemperatureModel(); ++ m)
+                    {
+                        temperatures(i, j, k, m) = temperature[m];
+                    }
+                }
+            }
+        }
+    }
+}
+
+
+void NCCRSolverStruct::InFlowBC3D(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    RDouble *primitiveVarFarfield = new RDouble[nEquation];
+    structBC->GetParamData("primitiveVarFarfield", primitiveVarFarfield, PHDOUBLE, nEquation);
+
+    int inflowParaType = -1;
+    if (structBC->CheckParamData("inflowParaType"))
+    {
+        structBC->GetParamData("inflowParaType", &inflowParaType, PHINT, 1);
+    }
+
+    if (inflowParaType == TRAJECTORY)
+    {
+        SetBCInitialValuesByInterpolation(structBC, primitiveVarFarfield);
+    }
+
+    int nNumberOfSpeedStep = parameters->GetnNumberOfSpeedStep();
+    if (nNumberOfSpeedStep > 0)
+    {
+        SetBCInitialValuesBySpeedCoef(nNumberOfSpeedStep, primitiveVarFarfield);
+    }
+
+    int it, jt, kt;
+
+    int nLayer = GetNumberOfGhostCellLayers();
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int layer = 1; layer <= nLayer; ++ layer)
+                {
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        primitiveVars(it, jt, kt, m) = primitiveVarFarfield[m];
+                    }
+                }
+            }
+        }
+    }
+    delete[] primitiveVarFarfield;
+}
+
+//! He Xin. Numerical simulation and qualitative analysis investigation of the supersonic flows over sharp cones at high angle of attack[D].
+//! China Aerodynamics Research and Development Center graduate department, December 2002.
+void NCCRSolverStruct::FarFieldRiemannInvariants(Grid *gridIn, StructBC *structBC, RDouble refGama)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isWennScheme = parameters->GetWennSchemeFlag();
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    RDouble3D *preconCoefficient = NULL;
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        preconCoefficient = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+    }
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *primitiveVarFarfield = new RDouble[nEquation];
+    structBC->GetParamData("primitiveVarFarfield", primitiveVarFarfield, PHDOUBLE, nEquation);
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+    RDouble4D &faceNormalVelocity = *(grid->GetFaceNormalVelocity());
+
+    //! s_lr3d is used for calculating id, jd, kd, and the latters are further used for calculating in, jn, kn.
+    //! in, jn, kn, iSurface and lr are used for calculating nx, ny, nz.
+    int iSurface = structBC->GetFaceDirection() + 1;
+    int lr = structBC->GetFaceLeftOrRightIndex();
+
+    int in, jn, kn;
+    RDouble nxs, nys, nzs;
+
+    //! The index of infinite condition.
+    using namespace IDX;
+    RDouble roo, uoo, voo, woo, poo, vnoo, coo; //! vnoo is the projection on (nx,ny,nz).
+    roo = primitiveVarFarfield[IR];
+    uoo = primitiveVarFarfield[IU];
+    voo = primitiveVarFarfield[IV];
+    woo = primitiveVarFarfield[IW];
+    poo = primitiveVarFarfield[IP];
+
+    //! The index of inner, ghost and boundary points.
+    int is1, js1, ks1, is2, js2, ks2;    //! The first and second inner points.
+    int it1, jt1, kt1, it2, jt2, kt2;    //! The first and second ghost points.
+
+    RDouble *prims1, *prims2;    //! The inner point.
+    RDouble *primt1, *primt2;    //! The ghost point.
+    prims1 = new RDouble[nEquation];
+    prims2 = new RDouble[nEquation];
+    primt1 = new RDouble[nEquation];
+    primt2 = new RDouble[nEquation];
+
+    RDouble rin, uin, vin, win, pin, vnin, cinner, vein; //! inner point variables.
+    RDouble rb, ub, vb, wb, pb, vnb, cb;           //! boundary point variables.
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                //! The function of "RestrictIndex" has no use generally, and it may enforce the wrong value to the unknown value and lead to unexpected calculation.
+                //! However, it need more tests to decide whether delete it here or not.
+                RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                RestrictIndex(is2, js2, ks2, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                //! Initialization.
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    prims1[m] = q(is1, js1, ks1, m);
+                    prims2[m] = q(is2, js2, ks2, m);
+
+                    primt1[m] = prims1[m];
+                    primt2[m] = prims2[m];
+                }
+
+                //! The needed (nx, ny, nz) is stored in the cell of (in, jn, kn).
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                nxs = lr * xfn(in, jn, kn, iSurface);
+                nys = lr * yfn(in, jn, kn, iSurface);
+                nzs = lr * zfn(in, jn, kn, iSurface);
+                RDouble vgn = faceNormalVelocity(in, jn, kn, iSurface);
+
+                //! The first inner point.
+                rin = prims1[IR];
+                uin = prims1[IU];
+                vin = prims1[IV];
+                win = prims1[IW];
+                pin = prims1[IP];
+                vnin = nxs * uin + nys * vin + nzs * win - vgn;
+                cinner = sqrt(ABS(refGama * pin / rin));
+                vein = sqrt(uin * uin + vin * vin + win * win);
+
+                //! Infinite.
+                vnoo = nxs * uoo + nys * voo + nzs * woo - vgn;
+                coo = sqrt(ABS(refGama * poo / roo));
+
+                if (vein > cinner)
+                {
+                    //! Supersonic.
+                    if (vnin >= 0.0)
+                    {
+                        //! Supersonic outlet.
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            q(it1, jt1, kt1, m) = prims1[m];
+                            q(it2, jt2, kt2, m) = 2.0 * prims1[m] - prims2[m];
+                        }
+
+                        if (q(it2, jt2, kt2, IR) <= 0.0 || q(it2, jt2, kt2, IP) <= 0.0)
+                        {
+                            for (int m = 0; m < nEquation; ++ m)
+                            {
+                                q(it2, jt2, kt2, m) = prims1[m];
+                            }
+                        }
+                    }
+                    else
+                    {
+                        //! Supersonic inlet.
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            q(it1, jt1, kt1, m) = primitiveVarFarfield[m];
+                            q(it2, jt2, kt2, m) = primitiveVarFarfield[m];
+                        }
+                    }
+                }
+                else
+                {
+                    //! Subsonic.
+                    if(ifLowSpeedPrecon == 0)
+                    {
+
+                        RDouble gama1 = refGama - 1.0;
+                        RDouble riemp;     //! Riemann invariant for inner.
+                        RDouble riemm;     //! Riemann invariant for infinite.
+                        riemp = vnin + 2.0 * cinner / gama1;
+                        riemm = vnoo - 2.0 * coo / gama1;
+
+                        vnb = half * (riemp + riemm);
+                        cb = fourth * (riemp - riemm) * gama1;
+
+                        RDouble sb;                          //! Entropy at the boundary.
+                        RDouble uref, vref, wref, vnref;     //! Outlet refers to inner point, and inlet refers to infinite.
+
+                        if (vnb > 0.0)
+                        {
+                            //! Subsonic outlet.
+                            sb = pin / pow(rin, refGama);
+                            uref = uin;
+                            vref = vin;
+                            wref = win;
+                            vnref = vnin;
+                        }
+                        else
+                        {
+                            //! Subsonic inlet.
+                            sb = poo / pow(roo, refGama);
+                            uref = uoo;
+                            vref = voo;
+                            wref = woo;
+                            vnref = vnoo;
+                        }
+
+                        rb = pow((cb * cb / (sb * refGama)), 1.0 / gama1);
+                        ub = uref + nxs * (vnb - vnref);
+                        vb = vref + nys * (vnb - vnref);
+                        wb = wref + nzs * (vnb - vnref);
+                        pb = cb * cb * rb / refGama;     //! The same to "pb = sb * pow(rb, refGama);".
+
+                        primt1[IR] = rb;
+                        primt1[IU] = ub;
+                        primt1[IV] = vb;
+                        primt1[IW] = wb;
+                        primt1[IP] = pb;
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            primt2[m] = primt1[m];
+                        }
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            q(it1, jt1, kt1, m) = primt1[m];
+                            q(it2, jt2, kt2, m) = primt2[m];
+                        }
+                    }
+                    else
+                    {
+                        int preconFarfieldBCMethod = parameters->GetPreconFarFieldBCMethod();
+
+                        if(preconFarfieldBCMethod == 0)
+                        {
+                            RDouble gama1 = refGama - 1.0;
+                            RDouble preconCoeff, B0, A0, cPrecondition;
+                            preconCoeff = (*preconCoefficient)(is1, js1, ks1);
+                            cPrecondition = half * sqrt(((preconCoeff - 1) * vnin) * ((preconCoeff - 1) * vnin) + 4 * preconCoeff * cinner * cinner);
+
+                            A0 = 2.0 * cinner/((-preconCoeff * vnin * 0.5) + cPrecondition + 0.5 * vnin) / gama1;
+                            B0 = 2.0 * cinner/((-preconCoeff * vnin * 0.5) - cPrecondition + 0.5 * vnin) / gama1;
+
+                            RDouble riemp;     //! Riemann invariant for inner.
+                            RDouble riemm;     //! Riemann invariant for infinite.
+                            riemp = A0 * cinner + vnin;
+                            riemm = B0 * coo + vnoo;
+                            cb = (riemp - riemm) / (A0 - B0);
+                            vnb = riemp - A0 * cb;
+
+                            RDouble sb;                          //! Entropy at the boundary.
+                            RDouble uref, vref, wref, vnref;     //! Outlet refers to inner point, and inlet refers to infinite.
+
+                            if (vnb > 0.0)
+                            {
+                                //! Subsonic outlet.
+                                sb = pin / pow(rin, refGama);
+                                uref = uin;
+                                vref = vin;
+                                wref = win;
+                                vnref = vnin;
+                            }
+                            else
+                            {
+                                //! Subsonic inlet.
+                                sb = poo / pow(roo, refGama);
+                                uref = uoo;
+                                vref = voo;
+                                wref = woo;
+                                vnref = vnoo;
+                            }
+
+                            rb = pow((cb * cb / (sb * refGama)), 1.0 / gama1);
+                            ub = uref + nxs * (vnb - vnref);
+                            vb = vref + nys * (vnb - vnref);
+                            wb = wref + nzs * (vnb - vnref);
+                            pb = cb * cb * rb / refGama;     //! The same to "pb = sb * pow(rb, refGama);".
+
+                            primt1[IR] = rb;
+                            primt1[IU] = ub;
+                            primt1[IV] = vb;
+                            primt1[IW] = wb;
+                            primt1[IP] = pb;
+
+                            for (int m = 0; m < nEquation; ++ m)
+                            {
+                                primt2[m] = primt1[m];
+                            }
+
+                            for (int m = 0; m < nEquation; ++ m)
+                            {
+                                q(it1, jt1, kt1, m) = primt1[m];
+                                q(it2, jt2, kt2, m) = primt2[m];
+                            }
+                        }
+                        else if(preconFarfieldBCMethod == 1)
+                        {
+                           RDouble gama1 = refGama - 1.0;
+                            RDouble riemp;     //! Riemann invariant for inner.
+                            RDouble riemm;     //! Riemann invariant for infinite.
+                            riemp = vnin + 2.0 * cinner / gama1;
+                            riemm = vnoo - 2.0 * coo / gama1;
+
+                            vnb = half * (riemp + riemm);
+                            if (vnb > 0.0)
+                            {
+                                ub = uin;
+                                vb = vin;
+                                wb = win;
+                                pb = poo;
+                                rb = rin;
+                            }
+                            else
+                            {
+
+                                ub = uoo;
+                                vb = voo;
+                                wb = woo;
+                                pb = pin;
+                                rb = roo;
+                            }
+
+                            primt1[IR] = rb;
+                            primt1[IU] = ub;
+                            primt1[IV] = vb;
+                            primt1[IW] = wb;
+                            primt1[IP] = pb;
+
+                            for (int m = 0; m < nEquation; ++ m)
+                            {
+                                primt2[m] = primt1[m];
+                            }
+
+                            for (int m = 0; m < nEquation; ++ m)
+                            {
+                                q(it1, jt1, kt1, m) = primt1[m];
+                                q(it2, jt2, kt2, m) = primt2[m];
+                            }
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    if (isWennScheme == 1)
+    {
+        int is3, js3, ks3;
+        int it3, jt3, kt3;
+        RDouble* prims3;
+        RDouble* primt3;
+        prims3 = new RDouble[nEquation];
+        primt3 = new RDouble[nEquation];
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    //! Third cell index inside flowfield.
+                    structBC->GetInsideCellIndex(i, j, k, is3, js3, ks3, 3);
+
+                    RestrictIndex(is3, js3, ks3, ni - 1, nj - 1, nk - 1);
+
+                    //! Third cell index of ghostcell.
+                    structBC->GetGhostCellIndex(i, j, k, it3, jt3, kt3, 3);
+
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        prims3[m] = q(is3, js3, ks3, m);
+                        primt3[m] = prims3[m];
+                    }
+                    //! The needed (nx, ny, nz) is stored in the cell of (in, jn, kn).
+                    structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                    nxs = lr * xfn(in, jn, kn, iSurface);
+                    nys = lr * yfn(in, jn, kn, iSurface);
+                    nzs = lr * zfn(in, jn, kn, iSurface);
+                    RDouble vgn = faceNormalVelocity(in, jn, kn, iSurface);
+
+                    //! The first inner point.
+                    rin = prims1[IR];
+                    uin = prims1[IU];
+                    vin = prims1[IV];
+                    win = prims1[IW];
+                    pin = prims1[IP];
+                    vnin = nxs * uin + nys * vin + nzs * win - vgn;
+                    cinner = sqrt(ABS(refGama * pin / rin));
+                    vein = sqrt(uin * uin + vin * vin + win * win);
+
+                    //! Infinite.
+                    vnoo = nxs * uoo + nys * voo + nzs * woo - vgn;
+                    coo = sqrt(ABS(refGama * poo / roo));
+
+                    if (vein > cinner)
+                    {
+                        //! Supersonic.
+                        if (vnin >= 0.0)
+                        {
+                            //! Supersonic outlet.
+                            for (int m = 0; m < nEquation; ++m)
+                            {
+                                q(it3, jt3, kt3, m) = 3.0 * prims1[m] - 2.0 * prims2[m];
+                            }
+
+                            if (q(it3, jt3, kt3, IR) <= 0.0 || q(it3, jt3, kt3, IP) <= 0.0)
+                            {
+                                for (int m = 0; m < nEquation; ++m)
+                                {
+                                    q(it3, jt3, kt3, m) = prims1[m];
+                                }
+                            }
+                        }
+                        else
+                        {
+                            //! Supersonic inlet.
+                            for (int m = 0; m < nEquation; ++m)
+                            {
+                                q(it3, jt3, kt3, m) = primitiveVarFarfield[m];
+                            }
+                        }
+                    }
+                    else
+                    {
+                        //! Subsonic.
+                        RDouble gama1 = refGama - 1.0;
+                        RDouble riemp;     //! Riemann invariant for inner.
+                        RDouble riemm;     //! Riemann invariant for infinite.
+                        riemp = vnin + 2.0 * cinner / gama1;
+                        riemm = vnoo - 2.0 * coo / gama1;
+
+                        vnb = half * (riemp + riemm);
+                        cb = fourth * (riemp - riemm) * gama1;
+
+                        RDouble sb;                          //! Entropy at the boundary.
+                        RDouble uref, vref, wref, vnref;     //! Outlet refers to inner point, and inlet refers to infinite.
+
+                        if (vnb > 0.0)
+                        {
+                            //! Subsonic outlet.
+                            sb = pin / pow(rin, refGama);
+                            uref = uin;
+                            vref = vin;
+                            wref = win;
+                            vnref = vnin;
+                        }
+                        else
+                        {
+                            //! Subsonic inlet.
+                            sb = poo / pow(roo, refGama);
+                            uref = uoo;
+                            vref = voo;
+                            wref = woo;
+                            vnref = vnoo;
+                        }
+
+                        rb = pow((cb * cb / (sb * refGama)), 1.0 / gama1);
+                        ub = uref + nxs * (vnb - vnref);
+                        vb = vref + nys * (vnb - vnref);
+                        wb = wref + nzs * (vnb - vnref);
+                        pb = cb * cb * rb / refGama;     //! The same to "pb = sb * pow(rb, refGama);".
+
+                        primt1[IR] = rb;
+                        primt1[IU] = ub;
+                        primt1[IV] = vb;
+                        primt1[IW] = wb;
+                        primt1[IP] = pb;
+
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            primt3[m] = primt1[m];
+                        }
+
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            q(it3, jt3, kt3, m) = primt3[m];
+                        }
+                    }
+                }
+            }
+        }
+
+        delete[] prims3;
+        delete[] primt3;
+    }
+
+    delete[] prims1;
+    delete[] prims2;
+    delete[] primt1;
+    delete[] primt2;
+
+    delete[] primitiveVarFarfield;
+}
+
+void NCCRSolverStruct::PressureInletBCRiemann(Grid *gridIn, StructBC *structBC)
+{
+    using namespace IDX;
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isWennScheme = parameters->GetWennSchemeFlag();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *primitiveVarFarfield = new RDouble[nEquation];
+    Data_Param *bcData = structBC->GetBCParamDataBase();
+    bcData->GetData("primitiveVarFarfield", primitiveVarFarfield, PHDOUBLE, nEquation);
+
+    RDouble totalPressure, totalTemperature, direction_inlet[3];
+    bcData->GetData("totalPressure", &totalPressure, PHDOUBLE, 1);
+    bcData->GetData("totalTemperature", &totalTemperature, PHDOUBLE, 1);
+    bcData->GetData("direction_inlet", &direction_inlet, PHDOUBLE, 3);
+
+    RDouble refGama, localNonDimensionalTemperature;
+
+    bcData->GetData("refGama", &refGama, PHDOUBLE, 1);
+    bcData->GetData("localNonDimensionalTemperature", &localNonDimensionalTemperature, PHDOUBLE, 1);
+
+    //! Dimensional.
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble velocity = refMachNumber * refDimensionalSonicSpeed;
+    RDouble dynamic_pressure = refDimensionalDensity * velocity * velocity;
+    //RDouble refGama = parameters->GetRefGama();
+    RDouble gama1 = refGama - 1;
+
+    //int nChemical = parameters->GetChemicalFlag();
+    //int numberOfSpecies = gas->GetNumberOfSpecies();
+    //Thermo_Energy &Thermo_Energy_temparay = *gas->GetThermo_Energy_temparay();
+    //int nNSEquation = parameters->GetNSEquationNumber();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    // RDouble initMassFraction[MAX_SPECIES_NUM] = {0};
+
+        //int mTT = parameters->GetmTT();
+        //int mTV = parameters->GetmTV();
+        //int mTE = parameters->GetmTE();
+        //int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+        /*if(nChemical > 0)
+        {
+            if (bcData->IsExist("initMassFraction", PHDOUBLE, numberOfSpecies))
+            {
+                bcData->GetData("initMassFraction", &initMassFraction, PHDOUBLE, numberOfSpecies);
+                for (int s = 0; s < numberOfSpecies; ++ s)
+                {
+                    primitiveVarFarfield[nNSEquation + s] = initMassFraction[s];
+                }
+            }
+            else
+            {
+                RDouble *speciesMass = gas->GetInitMassFraction();
+                for (int s = 0; s < numberOfSpecies; ++ s)
+                {
+                    initMassFraction[s] = speciesMass[s];
+                }
+            }
+        }*/
+
+        //! Nondimensionalization.
+    totalPressure /= dynamic_pressure;
+    totalTemperature /= refDimensionalTemperature;
+
+    RDouble coefficientOfStateEquation = 1.0 / (refGama * refMachNumber * refMachNumber);
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+    int lr = structBC->GetFaceLeftOrRightIndex();
+    int is, js, ks, it, jt, kt;
+    int in, jn, kn;
+    RDouble nxs, nys, nzs;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+                RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                nxs = lr * xfn(in, jn, kn, iSurface);
+                nys = lr * yfn(in, jn, kn, iSurface);
+                nzs = lr * zfn(in, jn, kn, iSurface);
+
+                //if(nChemical > 0)  //  for chemical  by dms
+                //{
+                //    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, 1);  //ghost
+                //    if(outIterStep > 1)
+                //    {
+                //        gas->ComputeMixturegasThermalParameter(initMassFraction, t(it, jt, kt,mTT), t(it, jt, kt, mTT), t(it, jt, kt, mTT), 0);   //  equlibrim
+                //    }
+                //    else
+                //    {
+                //        gas->ComputeMixturegasThermalParameter(initMassFraction, totalTemperature, totalTemperature, totalTemperature, 0);   //  equlibrim
+                //    }
+                //    
+                //    refGama = Thermo_Energy_temparay.gama;
+                //    gama1 = refGama - 1;
+                //    coefficientOfStateEquation = 1.0 / (refGama * refMachNumber * refMachNumber);
+
+                //    if(nTemperatureModel == 2)
+                //    {
+                //        primitiveVarFarfield[nEquation - 1] = Thermo_Energy_temparay.Ev + Thermo_Energy_temparay.Ee;
+                //    }
+                //    else if(nTemperatureModel == 3)
+                //    {
+                //        primitiveVarFarfield[nEquation - 1] = Thermo_Energy_temparay.Ee;
+                //        primitiveVarFarfield[nEquation - 2] = Thermo_Energy_temparay.Ev;
+                //    }
+                //}
+
+                for (int layer = 1; layer <= 1; ++ layer)
+                {
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    //! Get inner cell flow field information.
+                    RDouble rInside = q(is, js, ks, IR);
+                    RDouble V2Inside = q(is, js, ks, IU) * q(is, js, ks, IU) + q(is, js, ks, IV) * q(is, js, ks, IV)
+                        + q(is, js, ks, IW) * q(is, js, ks, IW);
+                    RDouble pInside = q(is, js, ks, IP);
+
+                    //! Calculate the total energy, total enthalpy and sound speed.
+                    RDouble totalEnergy = pInside / (rInside * gama1) + 0.5 * V2Inside;
+                    RDouble totalEnthalpy = (refGama * coefficientOfStateEquation / gama1) * totalTemperature;
+                    RDouble c2 = refGama * pInside / rInside;
+
+                    //! Calculate the riemann invariants R+.
+                    RDouble Riemann = 2.0 * sqrt(c2) / gama1;
+                    Riemann += q(is, js, ks, IU) * nxs + q(is, js, ks, IV) * nys + q(is, js, ks, IW) * nzs;
+
+                    RDouble theta = nxs * direction_inlet[0] + nys * direction_inlet[1] + nzs * direction_inlet[2];
+
+                    RDouble totalc2 = gama1 * (totalEnthalpy - (totalEnergy + pInside / rInside) + 0.5 * V2Inside) + c2;     //Co^2
+
+                    RDouble a = 1.0 + 0.5 * gama1 * theta * theta;
+                    RDouble b = -1.0 * gama1 * theta * Riemann;
+                    RDouble c = 0.5 * gama1 * Riemann * Riemann - 2.0 * totalc2 / gama1;
+
+                    RDouble d = b * b - 4.0 * a * c;
+                    d = sqrt(max(zero, d));
+                    RDouble VInside = (-b + d) / (2.0 * a);
+                    VInside = max(zero, VInside);
+                    V2Inside = VInside * VInside;
+
+                    c2 = totalc2 - 0.5 * gama1 * V2Inside;
+
+                    RDouble Mach2 = V2Inside / c2;
+                    Mach2 = min(one, Mach2);
+                    V2Inside = Mach2 * c2;
+                    VInside = sqrt(V2Inside);
+                    c2 = totalc2 - 0.5 * gama1 * V2Inside;
+
+                    RDouble tInside = c2 / (refGama * coefficientOfStateEquation);
+                    pInside = totalPressure * pow((tInside / totalTemperature), refGama / gama1);
+                    rInside = pInside / (coefficientOfStateEquation * tInside);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        q(it, jt, kt, m) = primitiveVarFarfield[m];
+                    }
+
+                    q(it, jt, kt, IR) = rInside;
+                    q(it, jt, kt, IU) = VInside * direction_inlet[0];
+                    q(it, jt, kt, IV) = VInside * direction_inlet[1];
+                    q(it, jt, kt, IW) = VInside * direction_inlet[2];
+                    q(it, jt, kt, IP) = pInside;
+
+                    for (int m = 0; m < nTemperatureModel; ++ m)
+                    {
+                        t(it, jt, kt, m) = tInside;
+                    }
+                }
+
+                int it2, jt2, kt2;
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    q(it2, jt2, kt2, m) = q(it, jt, kt, m);
+                }
+
+                if (isWennScheme == 1)
+                {
+                    int it3, jt3, kt3;
+                    structBC->GetGhostCellIndex(i, j, k, it3, jt3, kt3, 3);
+
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        q(it3, jt3, kt3, m) = q(it, jt, kt, m);
+                    }
+                }
+            }
+        }
+    }
+    delete[] primitiveVarFarfield;
+}
+
+void NCCRSolverStruct::MassFlowInletBC(Grid *gridIn, StructBC *structBC)
+{
+    //! Get the basic mesh information.
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    //! Get the flow field information.
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    int nEquation = GetNumberOfEquations();
+
+    using namespace IDX;
+    Data_Param *bcData = structBC->GetBCParamDataBase();
+
+    //! Get the basic variables for mass flow in boundary.
+    RDouble totalTemperature, massFlow, BCTotalArea, direction_inlet[3];
+    bcData->GetData("massFlow", &massFlow, PHDOUBLE, 1);
+    bcData->GetData("totalTemperature", &totalTemperature, PHDOUBLE, 1);
+    bcData->GetData("direction_inlet", &direction_inlet, PHDOUBLE, 3);
+    bcData->GetData("BCTotalArea", &BCTotalArea, PHDOUBLE, 1);
+
+    //! Dimensional.
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble refGama = parameters->GetRefGama();
+    int isWennScheme = parameters->GetWennSchemeFlag();
+
+    //! Nondimensionalization.
+    massFlow /= BCTotalArea;
+    totalTemperature /= refDimensionalTemperature;
+    RDouble coefficientOfStateEquation = 1.0 / (refGama * refMachNumber * refMachNumber);
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+    int lr = structBC->GetFaceLeftOrRightIndex();
+    int is, js, ks, it, jt, kt;
+    int in, jn, kn;
+    RDouble nxs, nys, nzs;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+                RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                nxs = lr * xfn(in, jn, kn, iSurface);
+                nys = lr * yfn(in, jn, kn, iSurface);
+                nzs = lr * zfn(in, jn, kn, iSurface);
+
+                for (int layer = 1; layer <= 1; ++ layer)
+                {
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    q(it, jt, kt, IR) = q(is, js, ks, IR);
+                    RDouble Vnb = massFlow / (refDimensionalDensity * refDimensionalSonicSpeed * refMachNumber) / q(is, js, ks, IR);  //ע�⣺�˴�massFlowΪ��λ�������
+
+                    q(it, jt, kt, IU) = Vnb * direction_inlet[0];
+                    q(it, jt, kt, IV) = Vnb * direction_inlet[1];
+                    q(it, jt, kt, IW) = Vnb * direction_inlet[2];
+
+                    //! Square of the stagnation sound speed.
+                    RDouble c2 = refGama * coefficientOfStateEquation * totalTemperature;
+                    //! Square of the critical sound speed.
+                    RDouble c2_ct = 2.0 * c2 / (refGama + 1.0);
+                    RDouble lamd2 = Vnb * Vnb / c2_ct;
+                    RDouble tb = totalTemperature * (1.0 - (refGama - 1.0) / (refGama + 1.0) * lamd2);
+                    q(it, jt, kt, IP) = q(is, js, ks, IR) * coefficientOfStateEquation * tb;
+                }
+
+                int it2, jt2, kt2;
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    q(it2, jt2, kt2, m) = q(it, jt, kt, m);
+                }
+
+                if (isWennScheme == 1)
+                {
+                    int it3, jt3, kt3;
+                    structBC->GetGhostCellIndex(i, j, k, it3, jt3, kt3, 3);
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        q(it3, jt3, kt3, m) = q(it, jt, kt, m);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::MassFlowOutletBC(Grid *gridIn, StructBC *structBC)
+{
+    using namespace IDX;
+    //! Dimensional.
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refGama = parameters->GetRefGama();
+
+    Data_Param *bcData = structBC->GetBCParamDataBase();
+    RDouble massFluxRatio, massFlow, BCTotalArea;
+    bcData->GetData("massFluxRatio", &massFluxRatio, PHDOUBLE, 1);
+    bcData->GetData("massFlow", &massFlow, PHDOUBLE, 1);
+    bcData->GetData("BCTotalArea", &BCTotalArea, PHDOUBLE, 1);
+
+    //! Nondimensionalization.
+    RDouble coefficientOfStateEquation = 1.0 / (refGama * refMachNumber * refMachNumber);
+
+    //! FluxDensity : rho * u;
+    RDouble fluxDensity = massFlow / (refDimensionalDensity * refDimensionalDensity * refMachNumber) / BCTotalArea;
+
+    RDouble mfTbCoeff = 0.5 * (refGama - 1.0) / refGama / coefficientOfStateEquation *
+        (1.0 - massFluxRatio * massFluxRatio);
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+    int lr = structBC->GetFaceLeftOrRightIndex();
+    int is, js, ks, it, jt, kt;
+    int in, jn, kn;
+    RDouble nxs, nys, nzs;
+
+    int nLayer = GetNumberOfGhostCellLayers();
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+                RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                nxs = lr * xfn(in, jn, kn, iSurface);
+                nys = lr * yfn(in, jn, kn, iSurface);
+                nzs = lr * zfn(in, jn, kn, iSurface);
+
+                //! calculate the temperature of the inside cell.
+                RDouble staticTemperature = q(is, js, ks, IP) / q(is, js, ks, IR) / coefficientOfStateEquation;
+
+                RDouble tb = staticTemperature + mfTbCoeff * (q(is, js, ks, IU) * q(is, js, ks, IU) +
+                    q(is, js, ks, IV) * q(is, js, ks, IV) + q(is, js, ks, IW) * q(is, js, ks, IW));
+
+                if (tb < TINY) tb = staticTemperature;
+                RDouble pb = q(is, js, ks, IP) * pow(tb / staticTemperature, refGama / (refGama - 1.0));
+                RDouble rb = pb / tb / coefficientOfStateEquation;
+
+                RDouble ub = q(is, js, ks, IU) * massFluxRatio;
+                RDouble vb = q(is, js, ks, IV) * massFluxRatio;
+                RDouble wb = q(is, js, ks, IW) * massFluxRatio;
+
+                //! judge the unusual situation, Vn < 0.
+                RDouble Vn = ub * nxs + vb * nys + wb * nzs;
+                if (Vn < 0.0)
+                {
+                    Vn = fluxDensity / rb;
+                    ub = Vn * xfn[i];
+                    vb = Vn * yfn[i];
+                    wb = Vn * zfn[i];
+                }
+
+                //! If the outlet is supersonic flow.
+                RDouble cb = sqrt(refGama * coefficientOfStateEquation * tb);
+                if (Vn >= cb)
+                {
+                    rb = q(is, js, ks, IR);
+                    ub = q(is, js, ks, IU);
+                    vb = q(is, js, ks, IV);
+                    wb = q(is, js, ks, IW);
+                    pb = q(is, js, ks, IP);
+                }
+
+                //! allocate value to the ghost cell.
+                for (int layer = 1; layer <= nLayer; ++ layer)
+                {
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+                    q(it, jt, kt, IR) = rb;
+                    q(it, jt, kt, IU) = ub;
+                    q(it, jt, kt, IV) = vb;
+                    q(it, jt, kt, IW) = wb;
+                    q(it, jt, kt, IP) = pb;
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::NozzleInletFlow(Grid *gridIn, StructBC *structBC)
+{
+    using namespace IDX;
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    Data_Param *bcData = structBC->GetBCParamDataBase();
+
+    RDouble inletVelocity, totalPressure, totalTemperature, direction_inlet[3];
+    bcData->GetData("velocity", &inletVelocity, PHDOUBLE, 1);
+    bcData->GetData("totalPressure", &totalPressure, PHDOUBLE, 1);
+    bcData->GetData("totalTemperature", &totalTemperature, PHDOUBLE, 1);
+    bcData->GetData("direction_inlet", &direction_inlet, PHDOUBLE, 3);
+
+    //! Dimensional.
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble refVelocity = refMachNumber * refDimensionalSonicSpeed;
+    int isWennScheme = parameters->GetWennSchemeFlag();
+
+    inletVelocity = inletVelocity / refVelocity;
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    int nEquation = GetNumberOfEquations();
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+    int lr = structBC->GetFaceLeftOrRightIndex();
+    int is, js, ks, it, jt, kt;
+    int in, jn, kn;
+    RDouble nxs, nys, nzs;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+                RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                nxs = lr * xfn(in, jn, kn, iSurface);
+                nys = lr * yfn(in, jn, kn, iSurface);
+                nzs = lr * zfn(in, jn, kn, iSurface);
+
+                for (int layer = 1; layer <= 1; ++ layer)
+                {
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        q(it, jt, kt, m) = primitiveVarFarfield[m];
+                    }
+                    q(it, jt, kt, IR) = 0.0;
+                    q(it, jt, kt, IU) = inletVelocity * direction_inlet[0];
+                    q(it, jt, kt, IV) = inletVelocity * direction_inlet[1];
+                    q(it, jt, kt, IW) = inletVelocity * direction_inlet[2];
+                    q(it, jt, kt, IP) = 0.0;
+                }
+
+                int it2, jt2, kt2;
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    q(it2, jt2, kt2, m) = q(it, jt, kt, m);
+                }
+
+                if (isWennScheme == 1)
+                {
+                    int it3, jt3, kt3;
+                    structBC->GetGhostCellIndex(i, j, k, it3, jt3, kt3, 3);
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        q(it3, jt3, kt3, m) = q(it, jt, kt, m);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::NozzleOutFlow(Grid *gridIn, StructBC *structBC)
+{
+
+}
+
+void NCCRSolverStruct::PressureOutletBC(Grid *gridIn, StructBC *structBC)
+{
+    using namespace IDX;
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    Data_Param *bcData = structBC->GetBCParamDataBase();
+
+    RDouble staticPressure;
+    bcData->GetData("staticPressure", &staticPressure, PHDOUBLE, 1);
+
+    //! Dimensional.
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble velocity = refMachNumber * refDimensionalSonicSpeed;
+    RDouble dynamicPressure = refDimensionalDensity * velocity * velocity;
+
+    staticPressure /= dynamicPressure;
+
+    RDouble staticPressureRelaxCorf = parameters->GetStaticPressureRelaxCorf();
+    if (bcData->IsExist("staticPressureRelaxCorf", PHDOUBLE, 1))
+    {
+        bcData->GetData("staticPressureRelaxCorf", &staticPressureRelaxCorf, PHDOUBLE, 1);
+    }
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int is, js, ks, it, jt, kt;
+    int nLayer = GetNumberOfGhostCellLayers();
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+
+                RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+
+                for (int layer = 1; layer <= nLayer; ++ layer)
+                {
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+                    {
+                        q(it, jt, kt, iEquation) = q(is, js, ks, iEquation);
+                    }
+                    //
+                    q(it, jt, kt, IP) = staticPressure;
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::ZeroResiduals(Grid *grid)
+{
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    residual = 0.0;
+}
+
+void NCCRSolverStruct::FillField(Grid *gridIn, FieldProxy *fieldProxy, RDouble valueIn)
+{
+    RDouble4D &field = fieldProxy->GetField_STR();
+    field = valueIn;
+}
+
+void NCCRSolverStruct::FillField(Grid *gridIn, FieldProxy *fieldTargetProxy, FieldProxy *fieldSourceProxy)
+{
+    RDouble4D &fieldTarget = fieldTargetProxy->GetField_STR();
+    RDouble4D &fieldSource = fieldSourceProxy->GetField_STR();
+
+    fieldTarget = fieldSource;
+}
+
+FieldProxy *NCCRSolverStruct::CreateFieldProxy(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isWennScheme = parameters->GetWennSchemeFlag();
+
+    int nEquation = GetNumberOfEquations();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    if (isWennScheme == 1)
+    {
+        GetRange(ni, nj, nk, -3, 2, I, J, K);
+    }
+
+    Range M(0, nEquation - 1);
+
+    RDouble4D *field = new RDouble4D(I, J, K, M, fortranArray);
+
+    FieldProxy *field_proxy = new FieldProxy();
+    field_proxy->SetField_STR(field, true);
+
+    return field_proxy;
+}
+
+FieldProxy *NCCRSolverStruct::GetFieldProxy(Grid *gridIn, const string &fieldName)
+{
+    RDouble4D *field = reinterpret_cast <RDouble4D *> (gridIn->GetDataPtr(fieldName));
+
+    FieldProxy *field_proxy = new FieldProxy();
+
+    field_proxy->SetField_STR(field);
+
+    return field_proxy;
+}
+
+void NCCRSolverStruct::StoreRhsByResidual(Grid *gridIn, FieldProxy *rightHandSideProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &rightHandSide = rightHandSideProxy->GetField_STR();
+
+    rightHandSide = residual;
+}
+
+void NCCRSolverStruct::InitResidual(Grid *gridIn, FieldProxy *rightHandSideProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int nEquation = GetNumberOfEquations();
+
+    Range M(0, nEquation - 1);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    int mst = M.first();
+    int med = M.last();
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &rightHandSide = rightHandSideProxy->GetField_STR();
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    residual(i, j, k, m) = -rightHandSide(i, j, k, m);
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::RecoverResidual(Grid *gridIn, FieldProxy *rightHandSideProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &rightHandSide = rightHandSideProxy->GetField_STR();
+
+    if (grid->GetLevel() != 0)
+    {
+        residual = rightHandSide;
+    }
+}
+
+FieldProxy *NCCRSolverStruct::GetResidualProxy(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+
+    FieldProxy *residualProxy = new FieldProxy();
+
+    residualProxy->SetField_STR(&residual);
+
+    return residualProxy;
+}
+
+//! Load flow variables stored in grid to q.
+void NCCRSolverStruct::LoadQ(Grid *grid, FieldProxy *qProxy)
+{
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &primitiveVarsOfProxy = qProxy->GetField_STR();
+    primitiveVarsOfProxy = primitiveVariables;
+}
+
+void NCCRSolverStruct::ComputeViscousCoeff(Grid *gridIn)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    if (nChemical == 0)
+    {
+        ComputeViscousCoefficientWithoutChemical(gridIn);
+    }
+    else
+    {
+    }
+}
+
+void NCCRSolverStruct::ComputeViscousCoefficientWithoutChemical(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+
+    //! The visl of ghost cell is computed directly.
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    using namespace IDX;
+
+    int nGasModel = 0;
+    if (GlobalDataBase::IsExist("nGasModel", PHINT, 1))
+    {
+        nGasModel = GlobalDataBase::GetIntParaFromDB("nGasModel");
+    }
+
+    if (nGasModel > 0)
+    {
+        RDouble primitiveVariables[MAX_SPECIES_NUM], temperature, viscosity;
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    temperature = temperatures(i, j, k, ITT);
+                    gas->ComputeViscosityByPrimitive(primitiveVariables, temperature, temperature, nonDimensionalSutherlandTemperature, viscosity);
+                    viscousLaminar(i, j, k) = viscosity;
+                }
+            }
+        }
+    }
+    else
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    RDouble temperature = temperatures(i, j, k, ITT);
+                    viscousLaminar(i, j, k) = temperature * sqrt(temperature) * (1.0 + nonDimensionalSutherlandTemperature) / (temperature + nonDimensionalSutherlandTemperature);
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::ComputePreconditionCoefficient(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble3D &preconCoefficient = *reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+
+    RDouble3D &dt = *reinterpret_cast< RDouble3D * > (grid->GetDataPtr("dt"));
+    RDouble3D &timeCoefficient = *reinterpret_cast< RDouble3D * > (grid->GetDataPtr("timeCoefficient"));
+    RDouble3D &timeCoefficientInverse = *reinterpret_cast< RDouble3D * > (grid->GetDataPtr("timeCoefficientInverse"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble kPreconCoeff = parameters->GetPreconCoefficient();
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+    RDouble machinf2 = refMachNumber * refMachNumber;
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd);
+
+    using namespace IDX;
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                RDouble rm = q(i, j, k, IR);
+                RDouble um = q(i, j, k, IU);
+                RDouble vm = q(i, j, k, IV);
+                RDouble wm = q(i, j, k, IW);
+                RDouble pm = q(i, j, k, IP);
+                RDouble gama = gamma(i, j, k);
+
+                RDouble c2 = gama * pm / rm;
+                RDouble v2 = um * um + vm * vm + wm * wm;
+                RDouble mach2 = v2 / c2;
+                RDouble machPrec2 = MIN(MAX(mach2, kPreconCoeff * machinf2),1.0);
+                if (!isUnsteady)
+                {
+                    preconCoefficient(i, j, k) = machPrec2;
+                }
+                else
+                {
+                    timeCoefficient(i, j, k) = 1.0 + 2.0 / 3.0 * dt(i, j, k) / physicalTimeStep;
+                    timeCoefficientInverse(i, j, k) = 1.0 / timeCoefficient(i, j, k);
+                    preconCoefficient(i, j, k) = machPrec2 / (timeCoefficientInverse(i, j, k) + (1.0 - timeCoefficientInverse(i, j, k)) * machPrec2);
+                }
+            }
+        }
+    }
+
+    GhostCell3D(preconCoefficient, ni, nj, nk);
+}
+
+void NCCRSolverStruct::ComputeMinTimeStep(Grid *gridIn, RDouble &minDt, RDouble &maxDt)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    minDt = LARGE;
+    maxDt = -LARGE;
+
+    RDouble3D &vol = *grid->GetCellVolume();
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                minDt = MIN(minDt, static_cast <RDouble> (dt(i, j, k) * vol(i, j, k))); //! When dt*vol is minimum, it doesnot mean that dt is minimum.
+                maxDt = MAX(maxDt, static_cast <RDouble> (dt(i, j, k) * vol(i, j, k))); //! When dt*vol is minimum, it doesnot mean that dt is minimum.
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::ReduceMaxTimeStep(Grid *gridIn, RDouble globalMinDt)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    RDouble3D &vol = *grid->GetCellVolume();
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+
+    //! ktmax is Used for restricting the time step.
+    //! When the value is big, the simulation can be faster but may be divergent. When the value is small, the simulation will be more stable but slower.
+    //! The suitable value can improve the stability.
+    RDouble ktmax = GlobalDataBase::GetDoubleParaFromDB("ktmax");
+
+    if (ktmax > 0.0)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    dt(i, j, k) = MIN(dt(i, j, k), static_cast <RDouble> (ktmax * globalMinDt / vol(i, j, k)));
+                }
+            }
+        }
+    }
+    GhostCell3D(dt, ni, nj, nk);
+    //grid->GhostCell3DExceptInterface(dt);
+    return;
+}
+
+void NCCRSolverStruct::LocalTimeStep(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    RDouble3D &vol = *grid->GetCellVolume();
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+    RDouble3D &localCFL = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("localCFL"));
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+
+    int nDim = GetDim();
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isUseLocalCFL = parameters->GetLocalCFLFlag();
+    RDouble cfl = 0.1, timedt = 0.01;
+
+    if (isUseLocalCFL == 0)
+    {
+        //int ordinaryGridIndex = grid->GetOrdinaryGridIndex();
+        //int ordinaryGridIndex = grid->GetZoneID();
+        //int cfl2 = grid->GetPartialCFL();
+        cfl = ComputeCFL(grid->GetPartialCFL()) ;
+        localCFL = cfl;
+    }
+
+    timedt = 1.0e+30;
+    for (int k = kCellStart; k <= kCellEnd; ++ k)     //! Viscous spectrum radius is not considered in computing time step of original code ,modified by liujian 2020-01-09
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                RDouble rad = 0.0;
+                for (int iSurface = 0; iSurface < nDim; ++ iSurface)
+                {
+                    rad += invSpectralRadius(i, j, k, iSurface) + visSpectralRadius(i, j, k, iSurface);
+                }
+
+                cfl = localCFL(i, j, k);
+                dt(i, j, k) = cfl / rad;
+                timedt = min(timedt, dt(i, j, k) * vol(i, j, k));
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::GlobalTimeStep(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble dtau = GlobalDataBase::GetDoubleParaFromDB("dtau");
+    RDouble reynoldsReferenceLengthDimensional = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+
+    RDouble3D &vol = *grid->GetCellVolume();
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                dt(i, j, k) = dtau / reynoldsReferenceLengthDimensional / vol(i, j, k);
+            }
+        }
+    }
+
+    RDouble dtmin = dtau;
+    GlobalDataBase::UpdateData("dtmin", &dtmin, PHDOUBLE, 1);
+}
+
+void NCCRSolverStruct::LocalGlobalTimeStep(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble cfl = ComputeCFL(grid->GetPartialCFL());
+
+    //! Compute the spectrum radius.
+    //SpectrumRadius(grid);
+
+    RDouble3D &vol = *grid->GetCellVolume();
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+
+    RDouble rad = 0.0;
+    RDouble dtmin = 1.0e30;
+
+    int nDim = GetDim();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                rad = 0.0;
+                for (int iSurface = 0; iSurface < nDim; ++ iSurface)
+                {
+                    rad += invSpectralRadius(i, j, k, iSurface);
+                }
+                RDouble rabc = cfl / rad * vol(i, j, k);
+
+                dtmin = MIN(dtmin, rabc);
+            }
+        }
+    }
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                dt(i, j, k) = dtmin / vol(i, j, k);
+            }
+        }
+    }
+    //grid->GhostCell3DExceptInterface(dt);
+    //GhostCell3D(dt, ni, nj, nk);
+
+    GlobalDataBase::UpdateData("dtmin", &dtmin, PHDOUBLE, 1);
+}
+
+void NCCRSolverStruct::SpectrumRadius(Grid *grid)
+{
+    SpectrumRadiusInviscid(grid);
+
+    SpectrumRadiusViscous(grid);
+
+#ifdef REMOVE_CODE
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    int nChemicalSource = parameters->GetNChemicalSource();
+    int nChemicalRadius = parameters->GetNChemicalRadius();
+
+    if (nChemical == 1 && nChemicalSource && nChemicalRadius == 1)
+    {
+    }
+#endif
+
+}
+
+void NCCRSolverStruct::SpectrumRadiusInviscid(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    int RoeEntropyFixMethod = this->GetControlParameters()->GetRoeEntropyFixMethod();
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+    RDouble4D &area = *(grid->GetFaceArea());
+    RDouble4D &vgn = *(grid->GetFaceNormalVelocity());
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble3D &gama = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble3D &rtem = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("rtem"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    RDouble3D *timeCoefficientInverse = NULL;
+    RDouble3D *preconCoefficient = NULL;
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        timeCoefficientInverse = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("timeCoefficientInverse"));
+        preconCoefficient = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+    }
+
+    invSpectralRadius = 0.0;
+
+    int nDim = GetDim();
+
+    using namespace IDX;
+
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        int il1, jl1, kl1;
+        grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    int il, jl, kl;
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    RDouble rm = q(i, j, k, IR);
+                    RDouble um = q(i, j, k, IU);
+                    RDouble vm = q(i, j, k, IV);
+                    RDouble wm = q(i, j, k, IW);
+                    RDouble pm = q(i, j, k, IP);
+
+                    RDouble cm = sqrt(gama(i, j, k) * pm / rm);
+
+                    RDouble nx = half * (xfv(i, j, k, iSurface) + xfv(il, jl, kl, iSurface));
+                    RDouble ny = half * (yfv(i, j, k, iSurface) + yfv(il, jl, kl, iSurface));
+                    RDouble nz = half * (zfv(i, j, k, iSurface) + zfv(il, jl, kl, iSurface));
+                    RDouble ub = half * (vgn(i, j, k, iSurface) * area(i, j, k, iSurface) + vgn(il, jl, kl, iSurface) * area(il, jl, kl, iSurface));
+                    RDouble vn = nx * um + ny * vm + nz * wm - ub;
+                    RDouble ns = sqrt(nx * nx + ny * ny + nz * nz);
+
+                    if(ifLowSpeedPrecon != 0)
+                    {
+                        RDouble c2 = gama(i, j, k) * pm / rm;
+                        RDouble timeCoeff = (*timeCoefficientInverse)(i, j, k);
+                        RDouble preconCoeff = (*preconCoefficient)(i, j, k);
+                        vn = half * timeCoeff * vn * (1.0 + preconCoeff);
+                        cm = half * timeCoeff * sqrt(((1.0 - preconCoeff) * vn) * ((1.0 - preconCoeff) * vn) + 4.0 * preconCoeff * c2);
+                    }
+
+                    invSpectralRadius(i, j, k, iSurface - 1) = ABS(vn) + cm * ns;
+
+                    if (RoeEntropyFixMethod == 2)  //! Entropy fix, add by liujian 2019 From JCP ,1995, Lin H-C
+                    {
+                        RDouble kp = rtem(i, j, k);
+                        RDouble Spec_rad_temp = invSpectralRadius(i, j, k, iSurface - 1);
+
+                        RDouble k1 = 0.25;
+                        RDouble k2 = 5.0;
+                        RDouble eig_lim = Spec_rad_temp * (k1 + k2 * kp);
+
+                        if (Spec_rad_temp < eig_lim)
+                        {
+                            invSpectralRadius(i, j, k, iSurface - 1) = 0.5 * (Spec_rad_temp * Spec_rad_temp + eig_lim * eig_lim) / (eig_lim + 1.E-20);
+                        }
+                    }
+
+                }
+            }
+        }
+    }
+
+
+    GhostCell3D(invSpectralRadius, ni, nj, nk, nDim);
+}
+
+void NCCRSolverStruct::SpectrumRadiusViscous(Grid *gridIn)
+{
+    //! Compute the spectrum radius of the viscous terms, modified by LiPeng in 2019.
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+    RDouble3D &vol = *(grid->GetCellVolume());
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+
+    RDouble3D &gama = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    visSpectralRadius = 0.0;
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int ifViscous = parameters->GetViscousType();
+    if (ifViscous == 0)
+    {
+        return;
+    }
+
+    //! Jiri Blazek. Computational fluid dynamics principles and applications (Third Edition)[M]. Elsevier Butterworth-Heinemann, 2015.
+
+    RDouble csrv = 1.0, csrvist = 1.0;
+    csrv = GlobalDataBase::GetDoubleParaFromDB("csrv");
+
+    int nDim = GetDim();
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble prandtlLaminar = parameters->GetPrandtlLaminar();
+    RDouble prandtlTurbulence = parameters->GetPrandtlTurbulence();
+    const RDouble foth = 4.0 / 3.0;
+
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nEquation = GetNumberOfEquations();
+    int nEnergyRecycle = parameters->GetnEnergyRecycle();
+
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    RDouble *primitiveVars = new RDouble[nEquation]();
+    RDouble *massFractions = NULL;
+    RDouble kTurbCoef = 1.0;
+
+    RDouble4D *heatConductivity = NULL, *massDiffusionCoef = NULL;
+    RDouble3D *totalCvtr = NULL, *totalCvv = NULL, *totalCve = NULL;
+    if (nChemical > 0 && numberOfSpecies > 0)
+    {
+        massFractions = new RDouble[numberOfSpecies];
+        heatConductivity = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("lambda"));
+        massDiffusionCoef = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rhoD"));
+        totalCvtr = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvtr"));
+        totalCvv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvv"));
+        totalCve = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCve"));
+    }
+
+    using namespace IDX;
+
+#define CFL3D_METHOD
+
+
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        int il1, jl1, kl1;
+        grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    int il, jl, kl;
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    RDouble nx = half * (xfv(i, j, k, iSurface) + xfv(il, jl, kl, iSurface));
+                    RDouble ny = half * (yfv(i, j, k, iSurface) + yfv(il, jl, kl, iSurface));
+                    RDouble nz = half * (zfv(i, j, k, iSurface) + zfv(il, jl, kl, iSurface));
+
+                    RDouble ns = nx * nx + ny * ny + nz * nz;
+                    RDouble ns2 = 2.0 * ns;
+
+                    //visSpectralRadius(i, j, k, iSurface - 1) = ns2;
+                    RDouble rm = q(i, j, k, IR);
+                    RDouble vvol = vol(i, j, k);
+
+                    RDouble viscLaminar = viscousLaminar(i, j, k);
+                    RDouble viscTurbulence = viscousTurbulence(i, j, k);
+                    RDouble gam_ma = gama(i, j, k);
+
+                    RDouble coef;
+#ifdef CFL3D_METHOD
+                    RDouble coef1 = foth * (viscLaminar + csrvist * viscTurbulence);
+                    RDouble coef2 = gam_ma * (viscLaminar / prandtlLaminar + viscTurbulence / prandtlTurbulence);
+                    coef = MAX(coef1, coef2);
+#else
+                    coef = (viscLaminar + csrvist * viscTurbulence);
+#endif
+
+                    //! Compute chemical diffusion terms, added by LiPeng on Feb. 19, 2019
+                    RDouble coef3 = 0.0;
+                    if (nChemical == 1)       //! The diffusion coefficient of the chemical reaction.
+                    {
+                        for (int ivar = 0; ivar < nEquation; ++ ivar)
+                        {
+                            primitiveVars[ivar] = q(i, j, k, ivar);
+                        }
+
+                        for (int ivar = 0; ivar < numberOfSpecies; ++ ivar)
+                        {
+                            massFractions[ivar] = primitiveVars[nNSEquation + ivar];
+                        }
+                        //! Obtain the maximum value of (ro*Ds).
+                        //coef3 = gas->GetMaximumSpeciesMassDiffusionCoef(primitiveVars, viscLaminar, viscTurbulence);
+                        for (int ivar = 0; ivar < gas->GetnLastSpeciesIndex(); ++ ivar)
+                        {
+                            coef3 = MAX(coef3, (*massDiffusionCoef)(i, j, k, ivar));
+                        }
+
+                        //! Multi-temperature model.
+                        if (nTemperatureModel > 1)
+                        {
+                            //! Obtain the temperature.
+                            RDouble Tv = t(i, j, k, mTV);
+                            RDouble Te = t(i, j, k, mTE);
+
+                            //! Compute heat conductivity./n
+                            RDouble Ktr, Kv, Ke;
+                            //gas->ComputeMixtureGasHeatConductivity(primitiveVars, Ttr, Tv, Te, Ktr, Kv, Ke);
+                            Ktr = (*heatConductivity)(i, j, k, ITT);
+                            Kv = (*heatConductivity)(i, j, k, ITV);
+                            RDouble cvtr, cvv, cve;
+                            if (nEnergyRecycle == 0)
+                            {
+                                cvtr = gas->GetMixedGasTranslationAndRotationSpecificHeatAtConstantVolume(massFractions);
+                                cvv = gas->GetMixedGasVibrationSpecificHeatAtConstantVolume(primitiveVars, Tv);
+                                cve = gas->GetMixedGasElectronSpecificHeatAtConstantVolume(primitiveVars, Te);
+                            }
+                            else
+                            {
+                                cvtr = (*totalCvtr)(i, j, k);
+                                cvv = (*totalCvv)(i, j, k);
+                                cve = (*totalCve)(i, j, k);
+                            }
+
+                            kTurbCoef = 1.0 + viscTurbulence * prandtlLaminar / (viscLaminar * prandtlTurbulence + SMALL);    //modified by dms
+
+                            coef3 = MAX(coef3, Ktr / cvtr * kTurbCoef);
+                            RDouble coef4 = 0.0;
+                            if (nTemperatureModel == 2)
+                            {
+                                Ke = 0.0;
+                                coef4 = (Kv + Ke) / (cvv + cve);
+                            }
+                            else
+                            {
+                                Ke = (*heatConductivity)(i, j, k, ITE);
+                                coef4 = MAX(Kv / cvv, Ke / cve);
+                            }
+                            coef3 = MAX(coef3, coef4 * kTurbCoef);
+                        }
+                    }
+                    coef = MAX(coef, coef3);
+                    //! End computation.
+
+                    coef *= csrv / (refReNumber * rm * vvol);
+
+                    visSpectralRadius(i, j, k, iSurface - 1) = ns2 * coef;
+
+                }
+            }
+        }
+    }
+
+    delete[]primitiveVars;
+    if (nChemical > 0 && numberOfSpecies > 0)
+    {
+        delete[] massFractions;
+    }
+}
+
+void NCCRSolverStruct::ConservativePreconMatrix(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    //! Get flow variables.
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble3D &preconCoefficient = *reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+    RDouble4D &preconMatrix = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("preconMatrix"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nEquation = nLaminar + nChemical;
+
+    int nElement = nEquation * nEquation;
+    RDouble *qPrecondition = new RDouble [nEquation];
+    RDouble **MG   = NewPointer2 <RDouble> (nEquation, nEquation);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd);
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                RDouble gama = gamma(i, j, k);
+                RDouble preconCoeff = preconCoefficient(i, j, k);
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    qPrecondition[m] = q(i, j, k, m);
+                }
+
+                ComputeConservativePreconMatrix(-1, MG, qPrecondition, gama, preconCoeff, nNSEquation, nEquation);
+
+                for (int row = 0; row < nEquation; ++ row)
+                {
+                    for (int col = 0; col < nEquation; ++ col)
+                    {
+                        int index = row * nEquation + col;
+                        preconMatrix(i, j, k, index) = MG[row][col];
+                    }
+                }
+            }
+        }
+    }
+
+        GhostCell3D(preconMatrix, ni, nj, nk, nElement);
+
+    delete []qPrecondition;
+    delete []MG;
+}
+
+//! Load rhs to residual res stored in grid.
+void NCCRSolverStruct::LoadResiduals(Grid *gridIn, FieldProxy *rightHandSideProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int nEquation = GetNumberOfEquations();
+    Range M(0, nEquation - 1);
+
+    RDouble4D &rightHandSide = rightHandSideProxy->GetField_STR();
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+
+
+    residual(I, J, K, M) = -rightHandSide(I, J, K, M);
+}
+
+RDouble NCCRSolverStruct::UnsteadyConvergence(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int isUnsteady = parameters->GetIsUnsteady();
+
+    if (!isUnsteady) return zero;
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble4D &qn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble4D &qn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    RDouble refGama = parameters->GetRefGama();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    RDouble *prim0 = new RDouble[nEquation];
+    RDouble *prim1 = new RDouble[nEquation];
+    RDouble *prim2 = new RDouble[nEquation];
+
+    RDouble *qcsv0 = new RDouble[nEquation];
+    RDouble *qcsv1 = new RDouble[nEquation];
+    RDouble *qcsv2 = new RDouble[nEquation];
+
+    RDouble Ttr[3] = { 0.0 }, Tv[3] = { 0.0 }, Te[3] = { 0.0 };
+
+    using namespace GAS_SPACE;
+    using namespace IDX;
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    RDouble sum1 = zero;
+    RDouble sum2 = zero;
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    prim0[m] = q(i, j, k, m);
+                    prim1[m] = qn1(i, j, k, m);
+                    prim2[m] = qn2(i, j, k, m);
+                }
+
+                if (nChemical == 1)
+                {
+                    Ttr[0] = t(i, j, k, mTT);
+                    Tv[0]  = t(i, j, k, mTV);
+                    Te[0]  = t(i, j, k, mTE);
+
+                    gas->Primitive2ConservativeR2(prim0, Ttr[0], Tv[0], Te[0], qcsv0);  //only for realgas
+                    gas->Primitive2ConservativeR2(prim1, Ttr[0], Tv[0], Te[0], qcsv1);
+                    gas->Primitive2ConservativeR2(prim2, Ttr[0], Tv[0], Te[0], qcsv2);
+                }
+                else
+                {
+                //! Primitive2Conservative function does not need to input gama in fact.
+                //! It will be modified later.
+                gas->Primitive2Conservative(prim0, refGama, Tv[0], Te[0], qcsv0);
+                gas->Primitive2Conservative(prim1, refGama, Tv[1], Te[1], qcsv1);
+                gas->Primitive2Conservative(prim2, refGama, Tv[2], Te[2], qcsv2);
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    //! Now res has been converted to dq. It means that residual is not right hand side term,but dq.
+                    RDouble dq_p = residual(i, j, k, m);        //! qn+1,p+1 - qn+1,p.
+                    RDouble dq_n = qcsv0[m] - qcsv1[m];         //! qn+1,p+1 - qn.
+                    sum1 += dq_p * dq_p;
+                    sum2 += dq_n * dq_n;
+                }
+            }
+        }
+    }
+
+    delete[]prim0;
+    delete[]prim1;
+    delete[]prim2;
+    delete[]qcsv0;
+    delete[]qcsv1;
+    delete[]qcsv2;
+
+    RDouble cvg = sqrt(ABS(sum1 / (sum2 + SMALL)));
+    return cvg;
+}
+
+void NCCRSolverStruct::UpdateUnsteadyFlow(Grid *gridIn)
+{
+    using namespace IDX;
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady) return;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &qn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble4D &qn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+
+    RDouble4D &resTmp = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_tmp"));
+    RDouble4D &resn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble4D &resn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+
+    int nEquation = GetNumberOfEquations();
+
+    qn2 = qn1;
+    qn1 = q;
+
+    resn2 = resn1;
+    resn1 = resTmp; //! Here the current outnstep is over, the value of the stored resTmp should be assigned to resn1 for the next outnstep. It should be noticed that resTmp only contain the inviscid and viscous flux.
+
+    //voln2 = voln1;
+    //voln1 = vol  ;
+
+    //! Statistical variables for DES simulation.
+    if (IsNeedStatistics())
+    {
+        int nStatisticalStep = GlobalDataBase::GetIntParaFromDB("nStatisticalStep");
+        RDouble statisticalTimePeriod = GlobalDataBase::GetDoubleParaFromDB("statisticalTimePeriod");
+        RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+        RDouble c1 = 1.0 / (nStatisticalStep * 1.0);
+        if (statisticalTimePeriod > 0.0)
+        {
+            c1 = MAX(c1, physicalTimeStep / statisticalTimePeriod);
+        }
+        RDouble c2 = 1.0 - c1;
+
+        RDouble4D &qAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage"));
+
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        //qAverage(i, j, k, m) = c1 * qAverage(i, j, k, m) + c2 * q(i, j, k, m);
+                        qAverage(i, j, k, m) = c2 * qAverage(i, j, k, m) + c1 * q(i, j, k, m);
+                    }
+                }
+            }
+        }
+    }
+
+    //! added by zzp 202108, for computing Reynolds Stress.
+    if (IsNeedReynoldsStressStatistics())
+    {
+        int nStatisticalStep = GlobalDataBase::GetIntParaFromDB("nStatisticalStep");
+        RDouble statisticalTimePeriod = GlobalDataBase::GetDoubleParaFromDB("statisticalTimePeriod");
+        RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+        RDouble c1 = 1.0 / (nStatisticalStep * 1.0);
+        if (statisticalTimePeriod > 0.0)
+        {
+            c1 = MAX(c1, physicalTimeStep / statisticalTimePeriod);
+        }
+        RDouble c2 = 1.0 - c1;
+
+        RDouble4D &tauAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("tauAverage"));
+        RDouble4D &qAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage"));
+        RDouble4D &q2Average = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q2Average"));
+
+        int statisticMethod = parameters->GetStatisticMethod();
+        if (statisticMethod == 0)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        RDouble u = q(i, j, k, IU);
+                        RDouble v = q(i, j, k, IV);
+                        RDouble w = q(i, j, k, IW);
+
+                        q2Average(i, j, k, 0) = c2 * q2Average(i, j, k, 0) + c1 * u * u;
+                        q2Average(i, j, k, 1) = c2 * q2Average(i, j, k, 1) + c1 * v * v;
+                        q2Average(i, j, k, 2) = c2 * q2Average(i, j, k, 2) + c1 * w * w;
+                        q2Average(i, j, k, 3) = c2 * q2Average(i, j, k, 3) + c1 * u * v;
+                        q2Average(i, j, k, 4) = c2 * q2Average(i, j, k, 4) + c1 * u * w;
+                        q2Average(i, j, k, 5) = c2 * q2Average(i, j, k, 5) + c1 * v * w;
+                    }
+                }
+            }
+
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        RDouble uavg = qAverage(i, j, k, IU);
+                        RDouble vavg = qAverage(i, j, k, IV);
+                        RDouble wavg = qAverage(i, j, k, IW);
+
+                        tauAverage(i, j, k, 0) = q2Average(i, j, k, 0) - uavg * uavg;
+                        tauAverage(i, j, k, 1) = q2Average(i, j, k, 1) - vavg * vavg;
+                        tauAverage(i, j, k, 2) = q2Average(i, j, k, 2) - wavg * wavg;
+                        tauAverage(i, j, k, 3) = q2Average(i, j, k, 3) - uavg * vavg;
+                        tauAverage(i, j, k, 4) = q2Average(i, j, k, 4) - uavg * wavg;
+                        tauAverage(i, j, k, 5) = q2Average(i, j, k, 5) - vavg * wavg;
+                    }
+                }
+            }
+        }
+        else
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        RDouble uprm = q(i, j, k, IU) - qAverage(i, j, k, IU);
+                        RDouble vprm = q(i, j, k, IV) - qAverage(i, j, k, IV);
+                        RDouble wprm = q(i, j, k, IW) - qAverage(i, j, k, IW);
+
+                        tauAverage(i, j, k, 0) = c2 * tauAverage(i, j, k, 0) + c1 * uprm * uprm;
+                        tauAverage(i, j, k, 1) = c2 * tauAverage(i, j, k, 1) + c1 * vprm * vprm;
+                        tauAverage(i, j, k, 2) = c2 * tauAverage(i, j, k, 2) + c1 * wprm * wprm;
+                        tauAverage(i, j, k, 3) = c2 * tauAverage(i, j, k, 3) + c1 * uprm * vprm;
+                        tauAverage(i, j, k, 4) = c2 * tauAverage(i, j, k, 4) + c1 * uprm * wprm;
+                        tauAverage(i, j, k, 5) = c2 * tauAverage(i, j, k, 5) + c1 * vprm * wprm;
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::DualTimeSource(Grid *gridIn)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady) return;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble4D &qn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble4D &qn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &residualn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble4D &residualn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+    RDouble4D &residualTmp = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_tmp"));
+
+    RDouble3D &vol = grid->GetVolume(0); //! The volume at current timestep. If it is dualtime step method, it represents the volume at timestep of n+1.
+    RDouble3D &voln1 = grid->GetVolume(1); //! The volume at timestep of n  .
+    RDouble3D &voln2 = grid->GetVolume(2); //! the volume at timestep of n-1.
+
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    RDouble refGama = parameters->GetRefGama();
+
+    //! The primitive variables
+    RDouble *prim0 = new RDouble[nEquation];
+    RDouble *prim1 = new RDouble[nEquation];
+    RDouble *prim2 = new RDouble[nEquation];
+
+    //! The conservative variables
+    RDouble *qcsv0 = new RDouble[nEquation];
+    RDouble *qcsv1 = new RDouble[nEquation];
+    RDouble *qcsv2 = new RDouble[nEquation];
+
+    RDouble Ttr[3] = { 0.0 }, Tv[3] = { 0.0 }, Te[3] = { 0.0 }, staticE[3] = { 0.0 };
+
+    using namespace GAS_SPACE;
+
+    //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+    residualTmp = residual;
+
+    //! Computation of dualtime coefficients, including three coefficients for Residual of R(p), R(n) and R(n-1).
+    //! and three coefficients for conservative variables of qcsv(p), qcsv(n), and qcsv(n-1).
+    RDouble dualTimeCoefficient[7];
+    const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+    ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+
+    RDouble dualTimeResC1 = dualTimeCoefficient[0];
+    RDouble dualTimeResC2 = dualTimeCoefficient[1];
+    RDouble dualTimeResC3 = dualTimeCoefficient[2];
+    RDouble dualTimeQC1 = dualTimeCoefficient[3];
+    RDouble dualTimeQC2 = dualTimeCoefficient[4];
+    RDouble dualTimeQC3 = dualTimeCoefficient[5];
+
+    using namespace IDX;
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    prim0[m] = q(i, j, k, m);
+                    prim1[m] = qn1(i, j, k, m);
+                    prim2[m] = qn2(i, j, k, m);
+                }
+
+                if (nChemical == 1)
+                {
+                    Ttr[0] = t(i, j, k, mTT);
+                    Tv[0]  = t(i, j, k, mTV);
+                    Te[0]  = t(i, j, k, mTE);
+
+                    gas->Primitive2ConservativeR2(prim0, Ttr[0], Tv[0], Te[0], qcsv0);  //only for realgas
+                    gas->Primitive2ConservativeR2(prim1, Ttr[0], Tv[0], Te[0], qcsv1);
+                    gas->Primitive2ConservativeR2(prim2, Ttr[0], Tv[0], Te[0], qcsv2);
+                }
+                else
+                {
+                gas->Primitive2Conservative(prim0, refGama, Tv[0], Te[0], qcsv0);
+                gas->Primitive2Conservative(prim1, refGama, Tv[1], Te[1], qcsv1);
+                gas->Primitive2Conservative(prim2, refGama, Tv[2], Te[2], qcsv2);
+                }
+                //! In fact, there is no need to input the variable of refGama for the function of Primitive2Conservative, it is to be improved.
+
+
+                //! Here only for "nLaminar", because the formula is to be improved for "nEquation".
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    RDouble dualSrcRes = dualTimeResC1 * residual(i, j, k, m) +
+                        dualTimeResC2 * residualn1(i, j, k, m) +
+                        dualTimeResC3 * residualn2(i, j, k, m);
+
+                    RDouble dualSrcQ = dualTimeQC1 * qcsv0[m] * vol(i, j, k) +
+                        dualTimeQC2 * qcsv1[m] * voln1(i, j, k) +
+                        dualTimeQC3 * qcsv2[m] * voln2(i, j, k);
+
+                    residual(i, j, k, m) = dualSrcRes + dualSrcQ;
+                }
+            }
+        }
+    }
+    delete[]prim0;
+    delete[]prim1;
+    delete[]prim2;
+    delete[]qcsv0;
+    delete[]qcsv1;
+    delete[]qcsv2;
+}
+
+void NCCRSolverStruct::ChemicalSource(Grid *gridIn)
+{
+}
+
+//Compute the distance between the center of the grid cell on the first layer and the center of the surface cell.
+void NCCRSolverStruct::ComputeFirstLayerGridHeight(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+    RDouble2D *firstLayerHeight = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("firstLayerHeight"));
+
+    using namespace IDX;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    //! Obtain the number of boundary condition regions.
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int indexOfWall = 0, indexOfCell = 0;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!IsWall(BCType) && BCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+        //! The following are surface boundary codes.
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        indexOfCell = 0;
+        int nSurface = structBC->GetFaceDirection() + 1;
+        int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int iWall, jWall, kWall;
+                    structBC->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                    //! Obtain the centroid of the surface.
+                    RDouble xCenterWall, yCenterWall, zCenterWall;
+                    grid->FaceCoor(iWall, jWall, kWall, nSurface, xCenterWall, yCenterWall, zCenterWall);
+                    //! Obtain the centroid of the cell on the positive first layer.
+                    RDouble xCellCenter, yCellCenter, zCellCenter;
+                    grid->CenterCoor(i, j, k, xCellCenter, yCellCenter, zCellCenter);
+
+                    RDouble normalComponetX = leftOrRightIndex * faceNormalComponentX(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetY = leftOrRightIndex * faceNormalComponentY(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetZ = leftOrRightIndex * faceNormalComponentZ(iWall, jWall, kWall, nSurface);
+
+#ifdef USE_ALTERNATIVE_CODE
+                    RDouble3D& gridCellVolume = *(grid->GetCellVolume());
+                    RDouble cellVolume = gridCellVolume(iWall, jWall, kWall); //The volume of first cell.
+                    RDouble deltaHeight = half * cellVolume / surfaceArea;
+#else
+                    //! The projection of the dy called the distance between the center of the cell and that of the surface on normal vector.
+                    RDouble deltaHeight = fabs((xCellCenter - xCenterWall) * normalComponetX + (yCellCenter - yCenterWall) * normalComponetY + (zCellCenter - zCenterWall) * normalComponetZ);
+#endif
+
+                    (*firstLayerHeight)(indexOfWall, indexOfCell) = deltaHeight;
+                    ++ indexOfCell; //! Next grid cell.
+                }
+            }
+        }
+        ++ indexOfWall; //! Next surface regions.
+    }
+
+}
+
+void NCCRSolverStruct::ComputeGamaAndTemperature(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &gama = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+
+    int nEquation = GetNumberOfEquations();
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    int nEquilibriumGas = parameters->GetFlagOfEquilibriumGas();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+    int nEnergyRecycle = parameters->GetnEnergyRecycle();
+
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    RDouble refGama = parameters->GetRefGama();
+
+    RDouble4D *speciesEs = NULL, *speciesEnthalpy = NULL, *speciesCvs = NULL, *speciesCps = NULL, *speciesCvvs = NULL, *speciesCves = NULL, *speciesEtrs = NULL, *speciesEvs = NULL, *speciesEes = NULL;
+    RDouble3D *totalEnthalpy = NULL, *totalEnergy = NULL, *totalCp = NULL, *totalCv = NULL;
+    Thermo_Energy *Thermo_Energy_temparay = NULL;
+    RDouble3D *tflag = NULL, *totalCvtr = NULL, *totalCvv = NULL, *totalCve = NULL;
+    if (nChemical > 0)
+    {
+        Thermo_Energy_temparay = gas->GetThermo_Energy_temparay();
+        speciesEnthalpy = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("hSpecies"));
+
+        totalEnergy = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalEnergy"));
+        totalEnthalpy = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalEnthalpy"));
+        totalCv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCv"));
+        totalCp = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCp"));
+
+        tflag = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("tflag"));
+        totalCvtr = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvtr"));
+        totalCvv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvv"));
+        totalCve = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCve"));
+        speciesCvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCvs"));
+        speciesCps = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCps"));
+        speciesCvvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCvvs"));
+        speciesCves = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCves"));
+        speciesEtrs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEtrs"));
+        speciesEvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEvs"));
+        speciesEes = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEes"));
+        speciesEs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEs"));
+    }
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    int iInnerCellStart, iInnerCellEnd, jInnerCellStart, jInnerCellEnd, kInnerCellStart, kInnerCellEnd;
+    grid->GetCellIterationIndex(iInnerCellStart, iInnerCellEnd, jInnerCellStart, jInnerCellEnd, kInnerCellStart, kInnerCellEnd);
+
+    using namespace GAS_SPACE;
+    using namespace IDX;
+
+    if (nChemical == 1)
+    {
+        RDouble *hSpecies = new RDouble[nSpeciesNumber];
+        RDouble *primitiveVars = new RDouble[nEquation];
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        primitiveVars[m] = primitiveVariables(i, j, k, m);
+                    }
+                    if (nEnergyRecycle == 0)
+                    {
+                        gas->GetSpecificHeatRatioAndTemperatute(primitiveVars, gama(i, j, k), temperatures(i, j, k, mTT), temperatures(i, j, k, mTV), temperatures(i, j, k, mTE));
+                        gas->GetEverySpeciesEnthalpy(temperatures(i, j, k, mTT), temperatures(i, j, k, mTV), temperatures(i, j, k, mTE), hSpecies);
+
+                        for (int s = 0; s < nSpeciesNumber; ++ s)
+                        {
+                            (*speciesEnthalpy)(i, j, k, s) = hSpecies[s];
+                        }
+                    }
+                    else
+                    {
+                        if ((*tflag)(i, j, k) < 0.5)
+                        {
+                            gas->GetTemperatureR(primitiveVars, temperatures(i, j, k, mTT), temperatures(i, j, k, mTV), temperatures(i, j, k, mTE));
+                        }
+
+                        gas->ComputeMixturegasThermalParameter(&primitiveVars[IP + 1], temperatures(i, j, k, mTT), temperatures(i, j, k, mTV), temperatures(i, j, k, mTE));
+                        gama(i, j, k) = Thermo_Energy_temparay->gama;
+                        (*totalCv)(i, j, k) = Thermo_Energy_temparay->Cv;
+                        (*totalCp)(i, j, k) = Thermo_Energy_temparay->Cp;
+                        (*totalEnergy)(i, j, k) = Thermo_Energy_temparay->E;
+                        (*totalEnthalpy)(i, j, k) = Thermo_Energy_temparay->H;
+
+                        for (int s = 0; s < nSpeciesNumber; ++ s)
+                        {
+                            (*speciesEs)(i, j, k, s) = Thermo_Energy_temparay->Es[s];
+                            (*speciesEnthalpy)(i, j, k, s) = Thermo_Energy_temparay->Hs[s];
+                            (*speciesCvs)(i, j, k, s) = Thermo_Energy_temparay->Cvs[s];
+                            (*speciesCps)(i, j, k, s) = Thermo_Energy_temparay->Cps[s];
+                        }
+
+                        if (nTemperatureModel > 1)
+                        {
+                            (*totalCvtr)(i, j, k) = Thermo_Energy_temparay->Cvtr;
+                            (*totalCvv)(i, j, k) = Thermo_Energy_temparay->Cvv;
+                            (*totalCve)(i, j, k) = Thermo_Energy_temparay->Cve;
+
+                            for (int s = 0; s < nSpeciesNumber; ++ s)
+                            {
+                                (*speciesCvvs)(i, j, k, s) = Thermo_Energy_temparay->Cvvs[s];
+                                (*speciesCves)(i, j, k, s) = Thermo_Energy_temparay->Cves[s];
+                                (*speciesEtrs)(i, j, k, s) = Thermo_Energy_temparay->Etrs[s];
+                                (*speciesEvs)(i, j, k, s) = Thermo_Energy_temparay->Evs[s];
+                                (*speciesEes)(i, j, k, s) = Thermo_Energy_temparay->Ees[s];
+                            }
+                        }
+                    }
+                }
+            }
+        }
+        delete[] hSpecies;
+        delete[] primitiveVars;
+    }
+    else
+    {
+        if (nEquilibriumGas == 0)
+        {
+            RDouble omav = one;
+            RDouble coefficientOfStateEquation = gas->GetCoefficientOfStateEquation();
+
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        RDouble &density = primitiveVariables(i, j, k, IR);
+                        RDouble &pressure = primitiveVariables(i, j, k, IP);
+                        gama(i, j, k) = refGama;
+                        temperatures(i, j, k, ITT) = pressure / (coefficientOfStateEquation * density * omav);
+                }
+            }
+        }
+        }
+    }
+
+    // added by clz : 2012-8-3
+    //! begin
+    //int nTemperatureModel = parameters->GetNTemperatureModel();
+    FillCornerPoint3D(temperatures, ni, nj, nk, nTemperatureModel);
+    FillCornerPoint3D(gama, ni, nj, nk);
+    //! end
+    //! Added by clz : 2012-8-3
+}
+
+void NCCRSolverStruct::RungeKuttaResidual(Grid *gridIn, FieldProxy *dqProxy, RDouble coef)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D &dq = dqProxy->GetField_STR();
+
+    RDouble4D &res = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    dq(i, j, k, m) = dt(i, j, k) * coef * res(i, j, k, m);
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::SolutionFix(Grid *gridIn, RDouble *prim, int i, int j, int k)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int nEquation = GetNumberOfEquations();
+
+    using namespace GAS_SPACE;
+    using namespace IDX;
+
+    int np = 0;
+    int nDim = GetDim();
+
+    for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+    {
+        prim[iEquation] = zero;
+    }
+
+    for (int ii = -1; ii <= 1; ++ ii)
+    {
+        for (int jj = -1; jj <= 1; ++ jj)
+        {
+            for (int kk = -1; kk <= 1; ++ kk)
+            {
+                int kk2d = kk;
+                if (nDim == 2)
+                {
+                    kk2d = 0;
+                }
+                if ((ABS(ii) + ABS(jj) + ABS(kk2d)) == 1)
+                {
+                    np = np + 1;
+                    for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+                    {
+                        RDouble f = q(i + ii, j + jj, k + kk2d, iEquation);
+                        if (iEquation == IR || iEquation == IP)
+                        {
+                            f = ABS(f);
+                        }
+                        prim[iEquation] += f;
+                    }
+                }
+            }
+        }
+    }
+
+    for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+    {
+        prim[iEquation] /= np;
+    }
+}
+
+void NCCRSolverStruct::UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy)
+{
+    //return;
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &q = qProxy->GetField_STR();
+    RDouble4D &dq = dqProxy->GetField_STR();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    RDouble4D &qnew = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble3D &localCFL = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("localCFL"));
+    RDouble3D &minCFL = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("minCFL"));
+
+    RDouble3D &Xm = *(grid->GetCellCenterX());
+    RDouble3D &Ym = *(grid->GetCellCenterY());
+    RDouble3D &Zm = *(grid->GetCellCenterZ());
+
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    //int nSpecies = nLaminar + nChemical - nNSEquation;
+    int nElectronIndex = parameters->GetIndexOfElectron();
+    int isUseLocalCFL = parameters->GetLocalCFLFlag();
+    RDouble errLimit = 0.1;
+    RDouble cfl = 0.0;
+    if (GlobalDataBase::IsExist("predictCFLError", PHDOUBLE, 1))
+    {
+        errLimit = GlobalDataBase::GetDoubleParaFromDB("predictCFLError");
+    }
+
+    bool updateFlow = true;
+
+    int nDensityModify = parameters->GetnDensityModify();
+    int nDebug = parameters->GetnDebug();
+    int nEnergyRecycle = parameters->GetnEnergyRecycle();
+    RDouble densityMin = parameters->GetDensityMin();
+    RDouble densityMinFactor = parameters->GetdensityMinFactor();
+
+    /*int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble temperatureWall = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+    bool isRadiationEquilibrium = false;
+    if (fabs(temperatureWall) <= EPSILON)
+    {
+        isRadiationEquilibrium = true;
+    }*/
+   
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    RDouble3D *totalEnergy = NULL;
+    if (nChemical > 0)
+    {
+        totalEnergy = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalEnergy"));
+    }
+
+    RDouble gama = 0.0, tm = 0.0;
+    //! Three modes for temperature, including the translational-rotational temperature, vibrational temperature and electron temperature.
+    RDouble rm = 0.0, pm = 0.0, temperature[3] = {0.0, 0.0, 0.0};
+
+    RDouble *prim = new RDouble[nEquation]();
+    RDouble *qtry = new RDouble[nEquation]();
+    RDouble *dqlocal = new RDouble[nEquation]();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    using namespace GAS_SPACE;
+    using namespace IDX;
+
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    RDouble roo = primitiveVarFarfield[IR];
+    RDouble poo = primitiveVarFarfield[IP];
+    RDouble density_limit = 1.0e-12 * roo;
+    RDouble pressure_limit = 1.0e-12 * poo;
+    int     nNegativeCell = 0;
+
+    RDouble densityRelax = 1.0;
+    RDouble *residualVariation = new RDouble[nEquation];
+    RDouble *localMaxResidual = NULL;
+    int varIndex = 4;
+    int isAdaptiveSolver = GlobalDataBase::GetIntParaFromDB("isAdaptiveSolver");
+    int isUseNoneqCond = parameters->GetNonequilibriumConditionFlag();
+    if (isAdaptiveSolver > 0 || isUseNoneqCond > 0)
+    {
+        if (GlobalDataBase::IsExist("nKeyVariableIndex", PHINT, 1))
+        {
+        varIndex = GlobalDataBase::GetIntParaFromDB("nKeyVariableIndex");
+        }
+        localMaxResidual = reinterpret_cast <RDouble *> (grid->GetDataPtr("maxResidualVariation"));
+        
+        //! Initialization.
+        for (int m = 0; m < nEquation; ++m)
+        {
+            localMaxResidual[m] = 0.0;
+        }
+    }
+
+    RDouble4D *deltaQ = NULL;
+    if (isUseNoneqCond > 0)
+    {
+        deltaQ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("deltaQ"));
+    }
+
+    RDouble minCFL1, minCFL2, C100;
+
+    C100 = 100.0;
+
+    if (isUseLocalCFL == 2)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    minCFL(i, j, k) = 1.0e36;
+                    for (int jj = max(jCellStart, j - 1); jj <= min(jCellEnd, j + 1); ++ jj)
+                    {
+                        for (int kk = max(kCellStart, k - 1); kk <= min(kCellEnd, k + 1); ++ kk)
+                        {
+                            if (localCFL(i, jj, kk) < minCFL(i, j, k))minCFL(i, j, k) = localCFL(i, jj, kk);
+                        }
+                    }
+                }
+
+                minCFL1 = min(minCFL(iCellStart, j, k), minCFL(iCellStart + 1, j, k));
+
+                for (int i = iCellStart + 1; i <= iCellEnd - 1; ++ i)
+                {
+                    minCFL2 = min(minCFL(i - 1, j, k), min(minCFL(i, j, k), minCFL(i + 1, j, k)));
+
+                    minCFL(i - 1, j, k) = minCFL1;
+
+                    minCFL1 = minCFL2;
+                }
+
+                minCFL2 = min(minCFL(iCellEnd - 1, j, k), minCFL(iCellEnd, j, k));
+                minCFL(iCellEnd - 1, j, k) = minCFL1;
+                minCFL(iCellEnd, j, k) = minCFL2;
+            }
+        }
+    }
+    else if (isUseLocalCFL == 3)
+    {
+        cfl = ComputeCFL(grid->GetPartialCFL()) ; //* InviscidSpectrumRadiusCoef;
+        localCFL = cfl;
+    }
+
+    RDouble *dqtry = new RDouble[nEquation];
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    prim[m] = q(i, j, k, m);
+                    dqtry[m] = dq(i, j, k, m);
+                }
+                gama = gamma(i, j, k);
+                //! Obtain the temperature.
+                temperature[ITT] = t(i, j, k, mTT);
+                temperature[ITV] = t(i, j, k, mTV);
+                temperature[ITE] = t(i, j, k, mTE);
+
+                if (isAdaptiveSolver > 0 || isUseNoneqCond > 0)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        residualVariation[m] = prim[m];
+                    }
+                    for (int m = 0; m < 3; ++ m)
+                    {
+                        residualVariation[m + 1] = temperature[m];
+                    }
+                    tm = sqrt(temperature[ITT] * temperature[ITV]);
+                }
+
+                //! Tv and Te is the temperature of the previous iteration step.
+                if (nEnergyRecycle == 0)
+                {
+                    gas->Primitive2Conservative(prim, gama, t(i, j, k, mTV), t(i, j, k, mTE), qtry);
+                }
+                else
+                {
+                    gas->Primitive2ConservativeR(prim, gama, temperature[ITV], temperature[ITE], (*totalEnergy)(i, j, k), qtry);
+                }
+
+                if (nDensityModify == 1)
+                {
+                    if (dq(i, j, k, 0) > 0.0)
+                    {
+                        qtry[0] += dq(i, j, k, 0);
+                    }
+                    else
+                    {
+                        densityRelax = qtry[0];
+                        qtry[0] = qtry[0] * MAX(densityMinFactor, exp(dq(i, j, k, 0) / (qtry[0] + density_limit)));    //! high freestream density.
+                        qtry[0] = MAX(densityMin, qtry[0]);
+                        densityRelax = (densityRelax - qtry[0] + SMALL) / (-dq(i, j, k, 0) + SMALL);
+                    }
+
+                    if (dq(i, j, k, 0) > 0.0 || nChemical == 0)
+                    {
+                        for (int m = 1; m < nEquation; ++ m)
+                        {
+                            qtry[m] += dq(i, j, k, m);
+                        }
+                    }
+                    else
+                    {
+                        for (int m = 1; m < nEquation; ++ m)
+                        {
+                            qtry[m] += dq(i, j, k, m);    //! used in chemical.
+                        }
+                    }
+                }
+                else
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        qtry[m] += dq(i, j, k, m);
+                    }
+                    qtry[IR] = ABS(qtry[IR]);
+                }
+
+                //pm = prim[IP];
+
+                //! As returned parameter, temperature saves the temperatures of the next time-advancing step.
+                if (nEnergyRecycle == 0)
+                {
+                    gas->Conservative2Primitive(qtry, gama, prim, temperature);
+                }
+                else
+                {
+                    gas->Conservative2PrimitiveR(qtry, gama, prim, temperature);
+                }
+
+                if (nChemical == 1)    //! Modify the value of dq in the index of nl.
+                {
+                    dq(i, j, k, nLaminar) = prim[IR] * prim[nLaminar] - q(i, j, k, IR) * q(i, j, k, nLaminar);
+                    if (nElectronIndex >= 0)
+                    {
+                        dq(i, j, k, nLaminar - 1) = prim[IR] * prim[nLaminar - 1] - q(i, j, k, IR) * q(i, j, k, nLaminar - 1);
+                    }
+                    if (nTemperatureModel == 2)
+                    {
+                        dq(i, j, k, nLaminar + 1) = prim[IR] * prim[nLaminar + 1] - q(i, j, k, IR) * q(i, j, k, nLaminar + 1);
+                    }
+                    else if (nTemperatureModel == 3)
+                    {
+                        dq(i, j, k, nLaminar + 1) = prim[IR] * prim[nLaminar + 1] - q(i, j, k, IR) * q(i, j, k, nLaminar + 1);
+                        dq(i, j, k, nLaminar + 2) = prim[IR] * prim[nLaminar + 2] - q(i, j, k, IR) * q(i, j, k, nLaminar + 2);
+                    }
+
+                    for (int m = IP; m <= nLaminar; ++m)
+                    {
+                        qtry[m] = q(i, j, k, m);
+                    }
+                }
+                else
+                {
+                    qtry[IP] = q(i, j, k, IP);
+                }
+
+                //! Determine the CFL number of the next iteration step.
+                rm = prim[IR];
+                pm = prim[IP];
+
+                if (rm < density_limit || pm < pressure_limit)
+                {
+                    nNegativeCell += 1;
+                    SolutionFix(grid, prim, i, j, k);
+
+                    if (nDebug != 0)
+                    {
+                        int iZone = grid->GetZoneID();
+                        int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+                        cout << "  i=   " << i << "  j=    " << j << "   k=    " << k << endl;
+                        cout << "  X=   " << Xm(i, j, k) << "  Y=    " << Ym(i, j, k) << "   Z=    " << Zm(i, j, k) << endl;
+                        cout << "  density=   " << rm << "  pressure=    " << pm << endl;
+                        cout << "  iZone=   " << iZone << "  outIterStep=    " << outIterStep << endl;
+                        abort();
+                    }
+                }
+
+                if (isAdaptiveSolver > 0 || isUseNoneqCond > 0)
+                {
+                    //! The variation of the variable density.
+                    residualVariation[IR] = ABS((prim[IR] - residualVariation[IR])) / (residualVariation[IR] + SMALL);
+                    //! The variation of the variable pressure.
+                    residualVariation[IP] = ABS((prim[IP] - residualVariation[IP])) / (residualVariation[IP] + SMALL);
+
+                    //! Compute the variation of the variable temperature.
+                    for (int m = 0; m < 3; ++ m)
+                    {
+                        residualVariation[m + 1] = ABS((temperature[m] - residualVariation[m + 1])) / (residualVariation[m + 1] + SMALL);
+                    }
+                    //! Compute the variation of the species mass fractions.
+                    for (int m = nNSEquation; m < nEquation; ++ m)
+                    {
+                        residualVariation[m] = ABS((prim[m] - residualVariation[m])) / (residualVariation[m] + SMALL);
+                    }
+
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        localMaxResidual[m] = MAX(residualVariation[m], localMaxResidual[m]);
+                    }
+
+                    if (isUseNoneqCond > 0)
+                    {
+                        (*deltaQ)(i, j, k, 0) = ABS(sqrt(temperature[ITT] * temperature[ITV]) - tm);
+                }
+                }
+
+                //! Update the values.
+                if (updateFlow)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        qnew(i, j, k, m) = prim[m];
+                    }
+
+                    if (nEnergyRecycle != 0)
+                    {
+                        for (int m = 0; m < nTemperatureModel; ++ m)
+                        {
+                            t(i, j, k, m) = temperature[m];
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    // begin
+    if (nNegativeCell > 0)
+    {
+        cout << "      Warning: negative pressure or density appears in " << nNegativeCell << " cells ... " << endl;
+        cout << "               level = " << grid->GetLevel() << endl;
+    }
+    // end
+
+
+    delete[] prim;
+    delete[] qtry;
+    delete[] dqtry;
+    delete[] dqlocal;
+    delete[] residualVariation;
+}
+
+void NCCRSolverStruct::ViscousFlux(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int viscousType = parameters->GetViscousType();
+    if (viscousType == INVISCID) return; 
+
+    FieldProxy *fluxProxy = CreateFieldProxy(grid);
+
+    int nDim = GetDim();
+    
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+
+    string sgsmodel = " ";
+    GlobalDataBase::GetData("sgsmodel", &sgsmodel, PHSTRING, 1);
+
+    int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    if (iLES == NOLES_SOLVER || sgsmodel.substr(0, 6) == "dsmOld")
+    {
+        for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+        {
+#ifdef USE_PRE_CODE
+            cout << "PRE_CODE is used" << endl;
+            
+            int nChemical = parameters->GetChemicalFlag();
+
+            if (nChemical == 0)
+            {
+                ReconGradVolWeightedwithCorrection(gridIn, iSurface);
+
+                CompVisFluxnew(grid, fluxProxy, iSurface);
+            }
+            else
+            {
+                ReconGrad(gridIn, iSurface);
+
+                CompVisFlux(grid, fluxProxy, iSurface);
+                //! To correct the viscous flux on wall.
+                CorrectViscousFlux(grid, fluxProxy, iSurface);
+            }
+#else
+            ReconGradVolWeightedwithCorrection(gridIn, iSurface);
+
+            
+
+            if (outIterStep <=5000)
+            {
+                CompVisFluxnew(grid, fluxProxy, iSurface);
+            }
+            else
+            {
+                //! CompVisFluxNCCRMonoatomic(grid, fluxProxy, iSurface);
+                CompVisFluxNCCRDiatomic(grid, fluxProxy, iSurface);
+                
+            }
+#endif
+            //! To compute the fluxes of cells by plusing the fluxes of all the surrounded faces.
+            CorrectViscousFlux(grid, fluxProxy, iSurface);
+            LoadFlux(grid, fluxProxy, iSurface);
+        }
+    }
+    else
+    {
+        //ReconGradVolWeightedwithCorrectionLES(gridIn);
+
+        for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+        {
+            ReconGradVolWeightedwithCorrection(gridIn, iSurface);
+
+            CompVisFluxLES(grid, fluxProxy, iSurface);
+
+            CorrectViscousFlux(grid, fluxProxy, iSurface);
+
+            //! To compute the fluxes of cells by plusing the fluxes of all the surrounded faces.
+            LoadFlux(grid, fluxProxy, iSurface);
+        }
+    }
+
+    delete fluxProxy;
+}
+
+void NCCRSolverStruct::ComputeGradient(Grid *gridIn)
+{
+
+}
+
+void NCCRSolverStruct::ComputeGradientCellCenter(Grid *gridIn)
+{
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &xfv = *(strgrid->GetFaceVectorX());
+    RDouble4D &yfv = *(strgrid->GetFaceVectorY());
+    RDouble4D &zfv = *(strgrid->GetFaceVectorZ());
+    RDouble3D &vol = *(strgrid->GetCellVolume());
+
+    int ndim = GetDim();
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSNumber = parameters->GetNSEquationNumber();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+    int nGradPrimtiveMethod = parameters->GetnGradPrimtiveMethod();
+    int viscousType = parameters->GetViscousType();
+    if (nGradPrimtiveMethod == 1 && viscousType < 2)return;
+
+    RDouble4D &primitiveVaiables = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("q"));
+    RDouble4D &temperature = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("t"));
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    gradUVWTCellCenterX = 0.0;
+    gradUVWTCellCenterY = 0.0;
+    gradUVWTCellCenterZ = 0.0;
+
+    RDouble4D *gradSpeciesCellCenterX = 0, *gradSpeciesCellCenterY = 0, *gradSpeciesCellCenterZ = 0;
+    if (nChemical > 0 && nSpeciesNumber > 0)
+    {
+        gradSpeciesCellCenterX = reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dcdx"));
+        gradSpeciesCellCenterY = reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dcdy"));
+        gradSpeciesCellCenterZ = reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dcdz"));
+        *gradSpeciesCellCenterX = 0.0;
+        *gradSpeciesCellCenterY = 0.0;
+        *gradSpeciesCellCenterZ = 0.0;
+    }
+
+
+    for (int nsurf = 1; nsurf <= ndim; ++ nsurf)
+    {
+        int il1, jl1, kl1;
+        strgrid->GetNsurfIndex(il1, jl1, kl1, nsurf);
+
+        int ist = 1;
+        int ied = ni - 1 + il1;
+        int jst = 1;
+        int jed = nj - 1 + jl1;
+        int kst = 1;
+        int ked = nk - 1 + kl1;
+
+        if (ndim == TWO_D) ked = 1;
+
+
+        //! The gradient of u,v,w.
+        for (int m = 0; m < ndim; ++ m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int il, jl, kl;
+                        strgrid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                        RDouble phis = primitiveVaiables(i, j, k, m + 1) + primitiveVaiables(il, jl, kl, m + 1);
+
+                        RDouble ddx = phis * xfv(i, j, k, nsurf);
+                        RDouble ddy = phis * yfv(i, j, k, nsurf);
+                        RDouble ddz = phis * zfv(i, j, k, nsurf);
+
+                        gradUVWTCellCenterX(i, j, k, m) -= ddx;
+                        gradUVWTCellCenterY(i, j, k, m) -= ddy;
+                        gradUVWTCellCenterZ(i, j, k, m) -= ddz;
+
+                        gradUVWTCellCenterX(il, jl, kl, m) += ddx;
+                        gradUVWTCellCenterY(il, jl, kl, m) += ddy;
+                        gradUVWTCellCenterZ(il, jl, kl, m) += ddz;
+                    }
+                }
+            }
+        }
+
+        //! The gradient of temperature.
+        for (int m = 0; m < nTemperatureModel; ++ m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int il, jl, kl;
+                        strgrid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                        RDouble phis = temperature(i, j, k, m) + temperature(il, jl, kl, m);
+
+                        RDouble ddx = phis * xfv(i, j, k, nsurf);
+                        RDouble ddy = phis * yfv(i, j, k, nsurf);
+                        RDouble ddz = phis * zfv(i, j, k, nsurf);
+
+                        gradUVWTCellCenterX(i, j, k, m + 3) -= ddx;
+                        gradUVWTCellCenterY(i, j, k, m + 3) -= ddy;
+                        gradUVWTCellCenterZ(i, j, k, m + 3) -= ddz;
+
+                        gradUVWTCellCenterX(il, jl, kl, m + 3) += ddx;
+                        gradUVWTCellCenterY(il, jl, kl, m + 3) += ddy;
+                        gradUVWTCellCenterZ(il, jl, kl, m + 3) += ddz;
+                    }
+                }
+            }
+        }
+
+        if (nChemical == 0)
+            continue;
+
+        //! The gradient of mass fraction of species.
+        for (int s = 0; s < nSpeciesNumber; ++ s)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int il, jl, kl;
+                        strgrid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                        RDouble phis = primitiveVaiables(i, j, k, nNSNumber + s) + primitiveVaiables(il, jl, kl, nNSNumber + s);
+
+                        RDouble ddx = phis * xfv(i, j, k, nsurf);
+                        RDouble ddy = phis * yfv(i, j, k, nsurf);
+                        RDouble ddz = phis * zfv(i, j, k, nsurf);
+
+                        (*gradSpeciesCellCenterX)(i, j, k, s) -= ddx;
+                        (*gradSpeciesCellCenterY)(i, j, k, s) -= ddy;
+                        (*gradSpeciesCellCenterZ)(i, j, k, s) -= ddz;
+
+                        (*gradSpeciesCellCenterX)(il, jl, kl, s) += ddx;
+                        (*gradSpeciesCellCenterY)(il, jl, kl, s) += ddy;
+                        (*gradSpeciesCellCenterZ)(il, jl, kl, s) += ddz;
+                    }
+                }
+            }
+        }
+
+    }
+
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+
+
+
+    if (ndim == TWO_D) ked = 1;
+
+    int nTotalVariable = nTemperatureModel + 3;
+    for (int m = 0; m < nTotalVariable; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble oov = half / vol(i, j, k);
+                    gradUVWTCellCenterX(i, j, k, m) *= oov;
+                    gradUVWTCellCenterY(i, j, k, m) *= oov;
+                    gradUVWTCellCenterZ(i, j, k, m) *= oov;
+                }
+            }
+        }
+    }
+
+    if (nChemical > 0)
+    {
+        for (int m = 0; m < nSpeciesNumber; ++ m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        RDouble oov = half / vol(i, j, k);
+                        (*gradSpeciesCellCenterX)(i, j, k, m) *= oov;
+                        (*gradSpeciesCellCenterY)(i, j, k, m) *= oov;
+                        (*gradSpeciesCellCenterZ)(i, j, k, m) *= oov;
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::ComputeGradientCellCenterForLES(Grid *gridIn)
+{
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &xfv = *(strgrid->GetFaceVectorX());
+    RDouble4D &yfv = *(strgrid->GetFaceVectorY());
+    RDouble4D &zfv = *(strgrid->GetFaceVectorZ());
+    RDouble3D &vol = *(strgrid->GetCellVolume());
+
+    int ndim = GetDim();
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSNumber = parameters->GetNSEquationNumber();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+
+    RDouble4D &primitiveVaiables = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("q"));
+    RDouble4D &temperature = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("t"));
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    gradUVWTCellCenterX = 0.0;
+    gradUVWTCellCenterY = 0.0;
+    gradUVWTCellCenterZ = 0.0;
+
+    RDouble4D *gradSpeciesCellCenterX = 0, *gradSpeciesCellCenterY = 0, *gradSpeciesCellCenterZ = 0;
+    if (nChemical > 0 && nSpeciesNumber > 0)
+    {
+        gradSpeciesCellCenterX = reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dcdx"));
+        gradSpeciesCellCenterY = reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dcdy"));
+        gradSpeciesCellCenterZ = reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dcdz"));
+        *gradSpeciesCellCenterX = 0.0;
+        *gradSpeciesCellCenterY = 0.0;
+        *gradSpeciesCellCenterZ = 0.0;
+    }
+
+
+    for (int nsurf = 1; nsurf <= ndim; ++ nsurf)
+    {
+        int il1, jl1, kl1;
+        strgrid->GetNsurfIndex(il1, jl1, kl1, nsurf);
+
+        int ist = 1;
+        int ied = ni - 1 + il1;
+        int jst = 1;
+        int jed = nj - 1 + jl1;
+        int kst = 1;
+        int ked = nk - 1 + kl1;
+
+        if (ndim == TWO_D) ked = 1;
+
+        //! The gradient of u,v,w.
+        for (int m = 0; m < ndim; ++ m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int il, jl, kl;
+                        strgrid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                        RDouble phis = primitiveVaiables(i, j, k, m + 1) + primitiveVaiables(il, jl, kl, m + 1);
+
+                        RDouble ddx = phis * xfv(i, j, k, nsurf);
+                        RDouble ddy = phis * yfv(i, j, k, nsurf);
+                        RDouble ddz = phis * zfv(i, j, k, nsurf);
+
+                        gradUVWTCellCenterX(i, j, k, m) -= ddx;
+                        gradUVWTCellCenterY(i, j, k, m) -= ddy;
+                        gradUVWTCellCenterZ(i, j, k, m) -= ddz;
+
+                        gradUVWTCellCenterX(il, jl, kl, m) += ddx;
+                        gradUVWTCellCenterY(il, jl, kl, m) += ddy;
+                        gradUVWTCellCenterZ(il, jl, kl, m) += ddz;
+                    }
+                }
+            }
+        }
+
+        //! The gradient of temperature.
+        for (int m = 0; m < nTemperatureModel; ++ m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int il, jl, kl;
+                        strgrid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                        RDouble phis = temperature(i, j, k, m) + temperature(il, jl, kl, m);
+
+                        RDouble ddx = phis * xfv(i, j, k, nsurf);
+                        RDouble ddy = phis * yfv(i, j, k, nsurf);
+                        RDouble ddz = phis * zfv(i, j, k, nsurf);
+
+                        gradUVWTCellCenterX(i, j, k, m + 3) -= ddx;
+                        gradUVWTCellCenterY(i, j, k, m + 3) -= ddy;
+                        gradUVWTCellCenterZ(i, j, k, m + 3) -= ddz;
+
+                        gradUVWTCellCenterX(il, jl, kl, m + 3) += ddx;
+                        gradUVWTCellCenterY(il, jl, kl, m + 3) += ddy;
+                        gradUVWTCellCenterZ(il, jl, kl, m + 3) += ddz;
+                    }
+                }
+            }
+        }
+
+        if (nChemical == 0)
+            continue;
+
+        //! The gradient of mass fraction of species.
+        for (int s = 0; s < nSpeciesNumber; ++ s)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int il, jl, kl;
+                        strgrid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                        RDouble phis = primitiveVaiables(i, j, k, nNSNumber + s) + primitiveVaiables(il, jl, kl, nNSNumber + s);
+
+                        RDouble ddx = phis * xfv(i, j, k, nsurf);
+                        RDouble ddy = phis * yfv(i, j, k, nsurf);
+                        RDouble ddz = phis * zfv(i, j, k, nsurf);
+
+                        (*gradSpeciesCellCenterX)(i, j, k, s) -= ddx;
+                        (*gradSpeciesCellCenterY)(i, j, k, s) -= ddy;
+                        (*gradSpeciesCellCenterZ)(i, j, k, s) -= ddz;
+
+                        (*gradSpeciesCellCenterX)(il, jl, kl, s) += ddx;
+                        (*gradSpeciesCellCenterY)(il, jl, kl, s) += ddy;
+                        (*gradSpeciesCellCenterZ)(il, jl, kl, s) += ddz;
+                    }
+                }
+            }
+        }
+
+    }
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+
+
+    if (ndim == TWO_D) ked = 1;
+
+    int nTotalVariable = nTemperatureModel + 3;
+    for (int m = 0; m < nTotalVariable; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble oov = half / vol(i, j, k);
+                    gradUVWTCellCenterX(i, j, k, m) *= oov;
+                    gradUVWTCellCenterY(i, j, k, m) *= oov;
+                    gradUVWTCellCenterZ(i, j, k, m) *= oov;
+                }
+            }
+        }
+    }
+
+    GhostCell3D(gradUVWTCellCenterX, ni, nj, nk, ndim);
+    GhostCell3D(gradUVWTCellCenterY, ni, nj, nk, ndim);
+    GhostCell3D(gradUVWTCellCenterZ, ni, nj, nk, ndim);
+
+    if (nChemical > 0)
+    {
+        for (int m = 0; m < nSpeciesNumber; ++ m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        RDouble oov = half / vol(i, j, k);
+                        (*gradSpeciesCellCenterX)(i, j, k, m) *= oov;
+                        (*gradSpeciesCellCenterY)(i, j, k, m) *= oov;
+                        (*gradSpeciesCellCenterZ)(i, j, k, m) *= oov;
+                    }
+                }
+            }
+        }
+    }
+
+}
+
+void NCCRSolverStruct::ComputeGradientCellCenterOfruvwptOnlyForMixGrid(Grid *gridIn)
+{
+    //! only first layer need these data, to transfer.
+    //! added by myk 20201024
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &xfv = *(strgrid->GetFaceVectorX());
+    RDouble4D &yfv = *(strgrid->GetFaceVectorY());
+    RDouble4D &zfv = *(strgrid->GetFaceVectorZ());
+    RDouble3D &vol = *(strgrid->GetCellVolume());
+
+    int ndim = GetDim();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("t"));
+    RDouble4D &dqdx = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdx_cc_ruvwpt"));
+    RDouble4D &dqdy = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdy_cc_ruvwpt"));
+    RDouble4D &dqdz = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdz_cc_ruvwpt"));
+
+    dqdx = 0.0;
+    dqdy = 0.0;
+    dqdz = 0.0;
+
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+    if (ndim == TWO_D) ked = 1;
+
+    int ibc[2];
+    int jbc[2];
+    int kbc[2];
+    ibc[0] = ist;
+    jbc[0] = jst;
+    kbc[0] = kst;
+    ibc[1] = ied;
+    jbc[1] = jed;
+    kbc[1] = ked;
+
+    if (ndim == TWO_D)
+    {
+        int k = 1;
+
+        RDouble q_IL[6], q_IR[6];
+        RDouble q_JL[6], q_JR[6];
+
+        RDouble xfv_IL, xfv_IR;
+        RDouble yfv_IL, yfv_IR;
+        RDouble zfv_IL, zfv_IR;
+
+        RDouble xfv_JL, xfv_JR;
+        RDouble yfv_JL, yfv_JR;
+        RDouble zfv_JL, zfv_JR;
+        for (int bcindex = 0; bcindex <= 1; ++ bcindex)
+        {
+            int j = jbc[bcindex];
+            for (int i = ist; i <= ied; ++ i)
+            {
+                xfv_IL = xfv(i, j, k, 1);
+                yfv_IL = yfv(i, j, k, 1);
+                zfv_IL = zfv(i, j, k, 1);
+
+                xfv_IR = xfv(i + 1, j, k, 1);
+                yfv_IR = yfv(i + 1, j, k, 1);
+                zfv_IR = zfv(i + 1, j, k, 1);
+
+                xfv_JL = xfv(i, j, k, 2);
+                yfv_JL = yfv(i, j, k, 2);
+                zfv_JL = zfv(i, j, k, 2);
+
+                xfv_JR = xfv(i, j + 1, k, 2);
+                yfv_JR = yfv(i, j + 1, k, 2);
+                zfv_JR = zfv(i, j + 1, k, 2);
+
+                for (int m = 0; m <= 4; ++ m)
+                {
+                    q_IL[m] = half * (q(i, j, k, m) + q(i - 1, j, k, m));
+                    q_IR[m] = half * (q(i, j, k, m) + q(i + 1, j, k, m));
+
+                    q_JL[m] = half * (q(i, j, k, m) + q(i, j - 1, k, m));
+                    q_JR[m] = half * (q(i, j, k, m) + q(i, j + 1, k, m));
+                }
+
+                q_IL[5] = half * (t(i, j, k, 0) + t(i - 1, j, k, 0));
+                q_IR[5] = half * (t(i, j, k, 0) + t(i + 1, j, k, 0));
+
+                q_JL[5] = half * (t(i, j, k, 0) + t(i, j - 1, k, 0));
+                q_JR[5] = half * (t(i, j, k, 0) + t(i, j + 1, k, 0));
+
+                for (int m = 0; m <= 5; ++ m)
+                {
+                    dqdx(i, j, k, m) = (-q_IL[m] * xfv_IL + q_IR[m] * xfv_IR) + (-q_JL[m] * xfv_JL + q_JR[m] * xfv_JR);
+                    dqdy(i, j, k, m) = (-q_IL[m] * yfv_IL + q_IR[m] * yfv_IR) + (-q_JL[m] * yfv_JL + q_JR[m] * yfv_JR);
+                    dqdz(i, j, k, m) = (-q_IL[m] * zfv_IL + q_IR[m] * zfv_IR) + (-q_JL[m] * zfv_JL + q_JR[m] * zfv_JR);
+                }
+            }
+        }
+
+        for (int bcindex = 0; bcindex <= 1; ++ bcindex)
+        {
+            int i = ibc[bcindex];
+            for (int j = jst; j <= jed; ++ j)
+            {
+                xfv_IL = xfv(i, j, k, 1);
+                yfv_IL = yfv(i, j, k, 1);
+                zfv_IL = zfv(i, j, k, 1);
+
+                xfv_IR = xfv(i + 1, j, k, 1);
+                yfv_IR = yfv(i + 1, j, k, 1);
+                zfv_IR = zfv(i + 1, j, k, 1);
+
+                xfv_JL = xfv(i, j, k, 2);
+                yfv_JL = yfv(i, j, k, 2);
+                zfv_JL = zfv(i, j, k, 2);
+
+                xfv_JR = xfv(i, j + 1, k, 2);
+                yfv_JR = yfv(i, j + 1, k, 2);
+                zfv_JR = zfv(i, j + 1, k, 2);
+
+                for (int m = 0; m <= 4; ++ m)
+                {
+                    q_IL[m] = half * (q(i, j, k, m) + q(i - 1, j, k, m));
+                    q_IR[m] = half * (q(i, j, k, m) + q(i + 1, j, k, m));
+
+                    q_JL[m] = half * (q(i, j, k, m) + q(i, j - 1, k, m));
+                    q_JR[m] = half * (q(i, j, k, m) + q(i, j + 1, k, m));
+                }
+
+                q_IL[5] = half * (t(i, j, k, 0) + t(i - 1, j, k, 0));
+                q_IR[5] = half * (t(i, j, k, 0) + t(i + 1, j, k, 0));
+
+                q_JL[5] = half * (t(i, j, k, 0) + t(i, j - 1, k, 0));
+                q_JR[5] = half * (t(i, j, k, 0) + t(i, j + 1, k, 0));
+
+                for (int m = 0; m <= 5; ++ m)
+                {
+                    dqdx(i, j, k, m) = (-q_IL[m] * xfv_IL + q_IR[m] * xfv_IR) + (-q_JL[m] * xfv_JL + q_JR[m] * xfv_JR);
+                    dqdy(i, j, k, m) = (-q_IL[m] * yfv_IL + q_IR[m] * yfv_IR) + (-q_JL[m] * yfv_JL + q_JR[m] * yfv_JR);
+                    dqdz(i, j, k, m) = (-q_IL[m] * zfv_IL + q_IR[m] * zfv_IR) + (-q_JL[m] * zfv_JL + q_JR[m] * zfv_JR);
+                }
+            }
+        }
+    }
+    else
+    {
+        RDouble q_IL[6], q_IR[6];
+        RDouble q_JL[6], q_JR[6];
+        RDouble q_KL[6], q_KR[6];
+
+        RDouble xfv_IL, xfv_IR;
+        RDouble yfv_IL, yfv_IR;
+        RDouble zfv_IL, zfv_IR;
+
+        RDouble xfv_JL, xfv_JR;
+        RDouble yfv_JL, yfv_JR;
+        RDouble zfv_JL, zfv_JR;
+
+        RDouble xfv_KL, xfv_KR;
+        RDouble yfv_KL, yfv_KR;
+        RDouble zfv_KL, zfv_KR;
+
+        for (int bcindex = 0; bcindex <= 1; ++ bcindex)
+        {
+            int k = kbc[bcindex];
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    xfv_IL = xfv(i, j, k, 1);
+                    yfv_IL = yfv(i, j, k, 1);
+                    zfv_IL = zfv(i, j, k, 1);
+
+                    xfv_IR = xfv(i + 1, j, k, 1);
+                    yfv_IR = yfv(i + 1, j, k, 1);
+                    zfv_IR = zfv(i + 1, j, k, 1);
+
+                    xfv_JL = xfv(i, j, k, 2);
+                    yfv_JL = yfv(i, j, k, 2);
+                    zfv_JL = zfv(i, j, k, 2);
+
+                    xfv_JR = xfv(i, j + 1, k, 2);
+                    yfv_JR = yfv(i, j + 1, k, 2);
+                    zfv_JR = zfv(i, j + 1, k, 2);
+
+                    xfv_KL = xfv(i, j, k, 3);
+                    yfv_KL = yfv(i, j, k, 3);
+                    zfv_KL = zfv(i, j, k, 3);
+
+                    xfv_KR = xfv(i, j, k + 1, 3);
+                    yfv_KR = yfv(i, j, k + 1, 3);
+                    zfv_KR = zfv(i, j, k + 1, 3);
+
+                    for (int m = 0; m <= 4; ++ m)
+                    {
+                        q_IL[m] = half * (q(i, j, k, m) + q(i - 1, j, k, m));
+                        q_IR[m] = half * (q(i, j, k, m) + q(i + 1, j, k, m));
+
+                        q_JL[m] = half * (q(i, j, k, m) + q(i, j - 1, k, m));
+                        q_JR[m] = half * (q(i, j, k, m) + q(i, j + 1, k, m));
+
+                        q_KL[m] = half * (q(i, j, k, m) + q(i, j, k - 1, m));
+                        q_KR[m] = half * (q(i, j, k, m) + q(i, j, k + 1, m));
+                    }
+
+                    q_IL[5] = half * (t(i, j, k, 0) + t(i - 1, j, k, 0));
+                    q_IR[5] = half * (t(i, j, k, 0) + t(i + 1, j, k, 0));
+
+                    q_JL[5] = half * (t(i, j, k, 0) + t(i, j - 1, k, 0));
+                    q_JR[5] = half * (t(i, j, k, 0) + t(i, j + 1, k, 0));
+
+                    q_KL[5] = half * (t(i, j, k, 0) + t(i, j, k - 1, 0));
+                    q_KR[5] = half * (t(i, j, k, 0) + t(i, j, k + 1, 0));
+
+                    for (int m = 0; m <= 5; ++ m)
+                    {
+                        dqdx(i, j, k, m) = (-q_IL[m] * xfv_IL + q_IR[m] * xfv_IR) + (-q_JL[m] * xfv_JL + q_JR[m] * xfv_JR) + (-q_KL[m] * xfv_KL + q_KR[m] * xfv_KR);
+                        dqdy(i, j, k, m) = (-q_IL[m] * yfv_IL + q_IR[m] * yfv_IR) + (-q_JL[m] * yfv_JL + q_JR[m] * yfv_JR) + (-q_KL[m] * yfv_KL + q_KR[m] * yfv_KR);
+                        dqdz(i, j, k, m) = (-q_IL[m] * zfv_IL + q_IR[m] * zfv_IR) + (-q_JL[m] * zfv_JL + q_JR[m] * zfv_JR) + (-q_KL[m] * zfv_KL + q_KR[m] * zfv_KR);
+                    }
+                }
+            }
+        }
+
+        for (int bcindex = 0; bcindex <= 1; ++ bcindex)
+        {
+            int j = jbc[bcindex];
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    xfv_IL = xfv(i, j, k, 1);
+                    yfv_IL = yfv(i, j, k, 1);
+                    zfv_IL = zfv(i, j, k, 1);
+
+                    xfv_IR = xfv(i + 1, j, k, 1);
+                    yfv_IR = yfv(i + 1, j, k, 1);
+                    zfv_IR = zfv(i + 1, j, k, 1);
+
+                    xfv_JL = xfv(i, j, k, 2);
+                    yfv_JL = yfv(i, j, k, 2);
+                    zfv_JL = zfv(i, j, k, 2);
+
+                    xfv_JR = xfv(i, j + 1, k, 2);
+                    yfv_JR = yfv(i, j + 1, k, 2);
+                    zfv_JR = zfv(i, j + 1, k, 2);
+
+                    xfv_KL = xfv(i, j, k, 3);
+                    yfv_KL = yfv(i, j, k, 3);
+                    zfv_KL = zfv(i, j, k, 3);
+
+                    xfv_KR = xfv(i, j, k + 1, 3);
+                    yfv_KR = yfv(i, j, k + 1, 3);
+                    zfv_KR = zfv(i, j, k + 1, 3);
+
+                    for (int m = 0; m <= 4; ++ m)
+                    {
+                        q_IL[m] = half * (q(i, j, k, m) + q(i - 1, j, k, m));
+                        q_IR[m] = half * (q(i, j, k, m) + q(i + 1, j, k, m));
+
+                        q_JL[m] = half * (q(i, j, k, m) + q(i, j - 1, k, m));
+                        q_JR[m] = half * (q(i, j, k, m) + q(i, j + 1, k, m));
+
+                        q_KL[m] = half * (q(i, j, k, m) + q(i, j, k - 1, m));
+                        q_KR[m] = half * (q(i, j, k, m) + q(i, j, k + 1, m));
+                    }
+
+                    q_IL[5] = half * (t(i, j, k, 0) + t(i - 1, j, k, 0));
+                    q_IR[5] = half * (t(i, j, k, 0) + t(i + 1, j, k, 0));
+
+                    q_JL[5] = half * (t(i, j, k, 0) + t(i, j - 1, k, 0));
+                    q_JR[5] = half * (t(i, j, k, 0) + t(i, j + 1, k, 0));
+
+                    q_KL[5] = half * (t(i, j, k, 0) + t(i, j, k - 1, 0));
+                    q_KR[5] = half * (t(i, j, k, 0) + t(i, j, k + 1, 0));
+
+                    for (int m = 0; m <= 5; ++ m)
+                    {
+                        dqdx(i, j, k, m) = (-q_IL[m] * xfv_IL + q_IR[m] * xfv_IR) + (-q_JL[m] * xfv_JL + q_JR[m] * xfv_JR) + (-q_KL[m] * xfv_KL + q_KR[m] * xfv_KR);
+                        dqdy(i, j, k, m) = (-q_IL[m] * yfv_IL + q_IR[m] * yfv_IR) + (-q_JL[m] * yfv_JL + q_JR[m] * yfv_JR) + (-q_KL[m] * yfv_KL + q_KR[m] * yfv_KR);
+                        dqdz(i, j, k, m) = (-q_IL[m] * zfv_IL + q_IR[m] * zfv_IR) + (-q_JL[m] * zfv_JL + q_JR[m] * zfv_JR) + (-q_KL[m] * zfv_KL + q_KR[m] * zfv_KR);
+                    }
+                }
+            }
+        }
+
+        for (int bcindex = 0; bcindex <= 1; ++ bcindex)
+        {
+            int i = ibc[bcindex];
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    xfv_IL = xfv(i, j, k, 1);
+                    yfv_IL = yfv(i, j, k, 1);
+                    zfv_IL = zfv(i, j, k, 1);
+
+                    xfv_IR = xfv(i + 1, j, k, 1);
+                    yfv_IR = yfv(i + 1, j, k, 1);
+                    zfv_IR = zfv(i + 1, j, k, 1);
+
+                    xfv_JL = xfv(i, j, k, 2);
+                    yfv_JL = yfv(i, j, k, 2);
+                    zfv_JL = zfv(i, j, k, 2);
+
+                    xfv_JR = xfv(i, j + 1, k, 2);
+                    yfv_JR = yfv(i, j + 1, k, 2);
+                    zfv_JR = zfv(i, j + 1, k, 2);
+
+                    xfv_KL = xfv(i, j, k, 3);
+                    yfv_KL = yfv(i, j, k, 3);
+                    zfv_KL = zfv(i, j, k, 3);
+
+                    xfv_KR = xfv(i, j, k + 1, 3);
+                    yfv_KR = yfv(i, j, k + 1, 3);
+                    zfv_KR = zfv(i, j, k + 1, 3);
+
+                    for (int m = 0; m <= 4; ++ m)
+                    {
+                        q_IL[m] = half * (q(i, j, k, m) + q(i - 1, j, k, m));
+                        q_IR[m] = half * (q(i, j, k, m) + q(i + 1, j, k, m));
+
+                        q_JL[m] = half * (q(i, j, k, m) + q(i, j - 1, k, m));
+                        q_JR[m] = half * (q(i, j, k, m) + q(i, j + 1, k, m));
+
+                        q_KL[m] = half * (q(i, j, k, m) + q(i, j, k - 1, m));
+                        q_KR[m] = half * (q(i, j, k, m) + q(i, j, k + 1, m));
+                    }
+
+                    q_IL[5] = half * (t(i, j, k, 0) + t(i - 1, j, k, 0));
+                    q_IR[5] = half * (t(i, j, k, 0) + t(i + 1, j, k, 0));
+
+                    q_JL[5] = half * (t(i, j, k, 0) + t(i, j - 1, k, 0));
+                    q_JR[5] = half * (t(i, j, k, 0) + t(i, j + 1, k, 0));
+
+                    q_KL[5] = half * (t(i, j, k, 0) + t(i, j, k - 1, 0));
+                    q_KR[5] = half * (t(i, j, k, 0) + t(i, j, k + 1, 0));
+
+                    for (int m = 0; m <= 5; ++ m)
+                    {
+                        dqdx(i, j, k, m) = (-q_IL[m] * xfv_IL + q_IR[m] * xfv_IR) + (-q_JL[m] * xfv_JL + q_JR[m] * xfv_JR) + (-q_KL[m] * xfv_KL + q_KR[m] * xfv_KR);
+                        dqdy(i, j, k, m) = (-q_IL[m] * yfv_IL + q_IR[m] * yfv_IR) + (-q_JL[m] * yfv_JL + q_JR[m] * yfv_JR) + (-q_KL[m] * yfv_KL + q_KR[m] * yfv_KR);
+                        dqdz(i, j, k, m) = (-q_IL[m] * zfv_IL + q_IR[m] * zfv_IR) + (-q_JL[m] * zfv_JL + q_JR[m] * zfv_JR) + (-q_KL[m] * zfv_KL + q_KR[m] * zfv_KR);
+                    }
+                }
+            }
+        }
+    }
+
+    for (int m = 0; m <= 5; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    dqdx(i, j, k, m) /= vol(i, j, k);
+                    dqdy(i, j, k, m) /= vol(i, j, k);
+                    dqdz(i, j, k, m) /= vol(i, j, k);
+                }
+            }
+        }
+    }
+}
+
+
+void NCCRSolverStruct::ReconGrad(Grid *gridIn, int nsurf)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    //! This subroutine is developed to calculate the gradients of a.
+    //! Variable phi at a surfaces in the direction nsurf.
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int mst = 0;
+    int med = GetNumberOfEquations() - 1;
+
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int mtst = 0;
+    int mted = nTemperatureModel - 1;
+
+    RDouble4D &q_4d = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t_4d = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    RDouble4D &dqdx_4d = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D &dqdy_4d = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D &dqdz_4d = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+
+    RDouble4D &dtdx_4d = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D &dtdy_4d = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D &dtdz_4d = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceZ"));
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+    RDouble3D &vol = *(grid->GetCellVolume());
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, 1, I, J, K);
+
+    int ndim = GetDim();
+
+    int index[] = { 1,2,3,1,2 };
+
+    int ns1 = nsurf;
+    int ns2 = index[nsurf];
+    int ns3 = index[nsurf + 1];
+
+    int il1 = 0;
+    int il2 = 0;
+    int il3 = 0;
+    int jl1 = 0;
+    int jl2 = 0;
+    int jl3 = 0;
+    int kl1 = 0;
+    int kl2 = 0;
+    int kl3 = 0;
+
+    if (nsurf == 1)
+    {
+        il1 = 1;
+        jl2 = 1;
+        kl3 = 1;
+    }
+    else if (nsurf == 2)
+    {
+        jl1 = 1;
+        kl2 = 1;
+        il3 = 1;
+    }
+    else if (nsurf == 3)
+    {
+        kl1 = 1;
+        il2 = 1;
+        jl3 = 1;
+    }
+
+    Range M(mst, med);
+
+    dqdx_4d = 0.0;
+    dqdy_4d = 0.0;
+    dqdz_4d = 0.0;
+
+    dtdx_4d = 0.0;
+    dtdy_4d = 0.0;
+    dtdz_4d = 0.0;
+
+    Range IW, JW, KW;
+    GetRange(ni, nj, nk, -2, 1, IW, JW, KW);
+
+    RDouble3D worksx(IW, JW, KW, fortranArray);
+    RDouble3D worksy(IW, JW, KW, fortranArray);
+    RDouble3D worksz(IW, JW, KW, fortranArray);
+    RDouble3D worksx1(IW, JW, KW, fortranArray);
+    RDouble3D worksy1(IW, JW, KW, fortranArray);
+    RDouble3D worksz1(IW, JW, KW, fortranArray);
+    RDouble3D workqm(IW, JW, KW, fortranArray);
+    RDouble3D worktm(IW, JW, KW, fortranArray);
+
+    worksx(I, J, K) = xfv(I, J, K, ns1) + xfv(I - il1, J - jl1, K - kl1, ns1);
+    worksy(I, J, K) = yfv(I, J, K, ns1) + yfv(I - il1, J - jl1, K - kl1, ns1);
+    worksz(I, J, K) = zfv(I, J, K, ns1) + zfv(I - il1, J - jl1, K - kl1, ns1);
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        dqdx_4d(I, J, K, m) = -worksx(I, J, K) * q_4d(I - il1, J - jl1, K - kl1, m);
+        dqdy_4d(I, J, K, m) = -worksy(I, J, K) * q_4d(I - il1, J - jl1, K - kl1, m);
+        dqdz_4d(I, J, K, m) = -worksz(I, J, K) * q_4d(I - il1, J - jl1, K - kl1, m);
+    }
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        dqdx_4d(I - il1, J - jl1, K - kl1, m) += worksx(I, J, K) * q_4d(I - il1, J - jl1, K - kl1, m);
+        dqdy_4d(I - il1, J - jl1, K - kl1, m) += worksy(I, J, K) * q_4d(I - il1, J - jl1, K - kl1, m);
+        dqdz_4d(I - il1, J - jl1, K - kl1, m) += worksz(I, J, K) * q_4d(I - il1, J - jl1, K - kl1, m);
+    }
+
+    for (int m = mtst; m <= mted; ++ m)
+    {
+        dtdx_4d(I, J, K, m) = -worksx(I, J, K) * t_4d(I - il1, J - jl1, K - kl1, m);
+        dtdy_4d(I, J, K, m) = -worksy(I, J, K) * t_4d(I - il1, J - jl1, K - kl1, m);
+        dtdz_4d(I, J, K, m) = -worksz(I, J, K) * t_4d(I - il1, J - jl1, K - kl1, m);
+    }
+
+    for (int m = mtst; m <= mted; ++ m)
+    {
+        dtdx_4d(I - il1, J - jl1, K - kl1, m) += worksx(I, J, K) * t_4d(I - il1, J - jl1, K - kl1, m);
+        dtdy_4d(I - il1, J - jl1, K - kl1, m) += worksy(I, J, K) * t_4d(I - il1, J - jl1, K - kl1, m);
+        dtdz_4d(I - il1, J - jl1, K - kl1, m) += worksz(I, J, K) * t_4d(I - il1, J - jl1, K - kl1, m);
+    }
+
+    if ((nsurf != 2) || (ndim != TWO_D))
+    {
+        worksx(I, J, K) = xfv(I, J, K, ns2) + xfv(I - il1, J - jl1, K - kl1, ns2);
+        worksy(I, J, K) = yfv(I, J, K, ns2) + yfv(I - il1, J - jl1, K - kl1, ns2);
+        worksz(I, J, K) = zfv(I, J, K, ns2) + zfv(I - il1, J - jl1, K - kl1, ns2);
+
+        for (int m = mst; m <= med; ++ m)
+        {
+            workqm(I, J, K) = fourth * (q_4d(I, J, K, m) + q_4d(I - il1, J - jl1, K - kl1, m) + q_4d(I - il2, J - jl2, K - kl2, m) + q_4d(I - il1 - il2, J - jl1 - jl2, K - kl1 - kl2, m));
+            dqdx_4d(I, J, K, m) -= worksx(I, J, K) * workqm(I, J, K);
+            dqdy_4d(I, J, K, m) -= worksy(I, J, K) * workqm(I, J, K);
+            dqdz_4d(I, J, K, m) -= worksz(I, J, K) * workqm(I, J, K);
+
+            dqdx_4d(I - il2, J - jl2, K - kl2, m) += worksx(I, J, K) * workqm(I, J, K);
+            dqdy_4d(I - il2, J - jl2, K - kl2, m) += worksy(I, J, K) * workqm(I, J, K);
+            dqdz_4d(I - il2, J - jl2, K - kl2, m) += worksz(I, J, K) * workqm(I, J, K);
+        }
+
+        for (int m = mtst; m <= mted; ++ m)
+        {
+            worktm(I, J, K) = fourth * (t_4d(I, J, K, m) + t_4d(I - il1, J - jl1, K - kl1, m) + t_4d(I - il2, J - jl2, K - kl2, m) + t_4d(I - il1 - il2, J - jl1 - jl2, K - kl1 - kl2, m));
+            dtdx_4d(I, J, K, m) -= worksx(I, J, K) * worktm(I, J, K);
+            dtdy_4d(I, J, K, m) -= worksy(I, J, K) * worktm(I, J, K);
+            dtdz_4d(I, J, K, m) -= worksz(I, J, K) * worktm(I, J, K);
+
+            dtdx_4d(I - il2, J - jl2, K - kl2, m) += worksx(I, J, K) * worktm(I, J, K);
+            dtdy_4d(I - il2, J - jl2, K - kl2, m) += worksy(I, J, K) * worktm(I, J, K);
+            dtdz_4d(I - il2, J - jl2, K - kl2, m) += worksz(I, J, K) * worktm(I, J, K);
+        }
+    }
+
+    if ((nsurf != 1) || (ndim != TWO_D))
+    {
+        worksx(I, J, K) = xfv(I, J, K, ns3) + xfv(I - il1, J - jl1, K - kl1, ns3);
+        worksy(I, J, K) = yfv(I, J, K, ns3) + yfv(I - il1, J - jl1, K - kl1, ns3);
+        worksz(I, J, K) = zfv(I, J, K, ns3) + zfv(I - il1, J - jl1, K - kl1, ns3);
+
+        for (int m = mst; m <= med; ++ m)
+        {
+            workqm(I, J, K) = fourth * (q_4d(I, J, K, m) + q_4d(I - il1, J - jl1, K - kl1, m) + q_4d(I - il3, J - jl3, K - kl3, m) + q_4d(I - il1 - il3, J - jl1 - jl3, K - kl1 - kl3, m));
+            dqdx_4d(I, J, K, m) -= worksx(I, J, K) * workqm(I, J, K);
+            dqdy_4d(I, J, K, m) -= worksy(I, J, K) * workqm(I, J, K);
+            dqdz_4d(I, J, K, m) -= worksz(I, J, K) * workqm(I, J, K);
+
+            dqdx_4d(I - il3, J - jl3, K - kl3, m) += worksx(I, J, K) * workqm(I, J, K);
+            dqdy_4d(I - il3, J - jl3, K - kl3, m) += worksy(I, J, K) * workqm(I, J, K);
+            dqdz_4d(I - il3, J - jl3, K - kl3, m) += worksz(I, J, K) * workqm(I, J, K);
+        }
+
+        for (int m = mtst; m <= mted; ++ m)
+        {
+            worktm(I, J, K) = fourth * (t_4d(I, J, K, m) + t_4d(I - il1, J - jl1, K - kl1, m) + t_4d(I - il3, J - jl3, K - kl3, m) + t_4d(I - il1 - il3, J - jl1 - jl3, K - kl1 - kl3, m));
+            dtdx_4d(I, J, K, m) -= worksx(I, J, K) * worktm(I, J, K);
+            dtdy_4d(I, J, K, m) -= worksy(I, J, K) * worktm(I, J, K);
+            dtdz_4d(I, J, K, m) -= worksz(I, J, K) * worktm(I, J, K);
+
+            dtdx_4d(I - il3, J - jl3, K - kl3, m) += worksx(I, J, K) * worktm(I, J, K);
+            dtdy_4d(I - il3, J - jl3, K - kl3, m) += worksy(I, J, K) * worktm(I, J, K);
+            dtdz_4d(I - il3, J - jl3, K - kl3, m) += worksz(I, J, K) * worktm(I, J, K);
+        }
+    }
+
+    Range I0(1, ni);
+    Range J0(1, nj);
+    Range K0(1, nk);
+
+    workqm(I0, J0, K0) = 1.0 / (vol(I0, J0, K0) + vol(I0 - il1, J0 - jl1, K0 - kl1));
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        dqdx_4d(I0, J0, K0, m) *= workqm(I0, J0, K0);
+        dqdy_4d(I0, J0, K0, m) *= workqm(I0, J0, K0);
+        dqdz_4d(I0, J0, K0, m) *= workqm(I0, J0, K0);
+    }
+
+    for (int m = mtst; m <= mted; ++ m)
+    {
+        dtdx_4d(I0, J0, K0, m) *= workqm(I0, J0, K0);
+        dtdy_4d(I0, J0, K0, m) *= workqm(I0, J0, K0);
+        dtdz_4d(I0, J0, K0, m) *= workqm(I0, J0, K0);
+    }
+}
+
+void NCCRSolverStruct::ReconGradVolWeightedwithCorrection(Grid *gridIn, int nSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &primitiveVaiables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperature = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    RDouble4D &gradPrimtiveVarFaceX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D &gradPrimtiveVarFaceY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D &gradPrimtiveVarFaceZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+    gradPrimtiveVarFaceX = 0.0;
+    gradPrimtiveVarFaceY = 0.0;
+    gradPrimtiveVarFaceZ = 0.0;
+
+    RDouble4D &gradTemperatureFaceX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D &gradTemperatureFaceY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D &gradTemperatureFaceZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceZ"));
+    gradTemperatureFaceX = 0.0;
+    gradTemperatureFaceY = 0.0;
+    gradTemperatureFaceZ = 0.0;
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSNumber = parameters->GetNSEquationNumber();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble4D *gradSpeciesCellCenterX = 0, *gradSpeciesCellCenterY = 0, *gradSpeciesCellCenterZ = 0;
+    if (nChemical > 0 && nSpeciesNumber)
+    {
+        gradSpeciesCellCenterX = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdx"));
+        gradSpeciesCellCenterY = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdy"));
+        gradSpeciesCellCenterZ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdz"));
+    }
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+    RDouble3D &vol = *(grid->GetCellVolume());
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, nSurface);
+
+    Range I(1, ni - 1 + il1);
+    Range J(1, nj - 1 + jl1);
+    Range K(1, nk - 1 + kl1);
+    if (nk == 1)
+    {
+        K.setRange(1, 1);
+    }
+
+    int nIndex = 0;
+    //! Compute gradient of velocity.
+    for (int m = 1; m <= 3; ++ m)
+    {
+        nIndex = m - 1;
+        gradPrimtiveVarFaceX(I, J, K, m) = vol(I, J, K) * gradUVWTCellCenterX(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * gradUVWTCellCenterX(I - il1, J - jl1, K - kl1, nIndex);
+        gradPrimtiveVarFaceY(I, J, K, m) = vol(I, J, K) * gradUVWTCellCenterY(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * gradUVWTCellCenterY(I - il1, J - jl1, K - kl1, nIndex);
+        gradPrimtiveVarFaceZ(I, J, K, m) = vol(I, J, K) * gradUVWTCellCenterZ(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * gradUVWTCellCenterZ(I - il1, J - jl1, K - kl1, nIndex);
+
+        gradPrimtiveVarFaceX(I, J, K, m) = gradPrimtiveVarFaceX(I, J, K, m) + (xfv(I, J, K, nSurface) * (primitiveVaiables(I, J, K, m) - primitiveVaiables(I - il1, J - jl1, K - kl1, m)) - 0.5 * xfv(I + il1, J + jl1, K + kl1, nSurface) * (primitiveVaiables(I + il1, J + jl1, K + kl1, m) - primitiveVaiables(I, J, K, m)) - 0.5 * xfv(I - il1, J - jl1, K - kl1, nSurface) * (primitiveVaiables(I - il1, J - jl1, K - kl1, m) - primitiveVaiables(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+        gradPrimtiveVarFaceY(I, J, K, m) = gradPrimtiveVarFaceY(I, J, K, m) + (yfv(I, J, K, nSurface) * (primitiveVaiables(I, J, K, m) - primitiveVaiables(I - il1, J - jl1, K - kl1, m)) - 0.5 * yfv(I + il1, J + jl1, K + kl1, nSurface) * (primitiveVaiables(I + il1, J + jl1, K + kl1, m) - primitiveVaiables(I, J, K, m)) - 0.5 * yfv(I - il1, J - jl1, K - kl1, nSurface) * (primitiveVaiables(I - il1, J - jl1, K - kl1, m) - primitiveVaiables(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+        gradPrimtiveVarFaceZ(I, J, K, m) = gradPrimtiveVarFaceZ(I, J, K, m) + (zfv(I, J, K, nSurface) * (primitiveVaiables(I, J, K, m) - primitiveVaiables(I - il1, J - jl1, K - kl1, m)) - 0.5 * zfv(I + il1, J + jl1, K + kl1, nSurface) * (primitiveVaiables(I + il1, J + jl1, K + kl1, m) - primitiveVaiables(I, J, K, m)) - 0.5 * zfv(I - il1, J - jl1, K - kl1, nSurface) * (primitiveVaiables(I - il1, J - jl1, K - kl1, m) - primitiveVaiables(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+
+        gradPrimtiveVarFaceX(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+        gradPrimtiveVarFaceY(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+        gradPrimtiveVarFaceZ(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+    }
+
+    //! Compute gradient of temperature.
+    for (int m = 0; m < nTemperatureModel; ++ m)
+    {
+        nIndex = m + 3;
+        gradTemperatureFaceX(I, J, K, m) = vol(I, J, K) * gradUVWTCellCenterX(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * gradUVWTCellCenterX(I - il1, J - jl1, K - kl1, nIndex);
+        gradTemperatureFaceY(I, J, K, m) = vol(I, J, K) * gradUVWTCellCenterY(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * gradUVWTCellCenterY(I - il1, J - jl1, K - kl1, nIndex);
+        gradTemperatureFaceZ(I, J, K, m) = vol(I, J, K) * gradUVWTCellCenterZ(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * gradUVWTCellCenterZ(I - il1, J - jl1, K - kl1, nIndex);
+
+        gradTemperatureFaceX(I, J, K, m) = gradTemperatureFaceX(I, J, K, m) + (xfv(I, J, K, nSurface) * (temperature(I, J, K, m) - temperature(I - il1, J - jl1, K - kl1, m)) - 0.5 * xfv(I + il1, J + jl1, K + kl1, nSurface) * (temperature(I + il1, J + jl1, K + kl1, m) - temperature(I, J, K, m)) - 0.5 * xfv(I - il1, J - jl1, K - kl1, nSurface) * (temperature(I - il1, J - jl1, K - kl1, m) - temperature(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+        gradTemperatureFaceY(I, J, K, m) = gradTemperatureFaceY(I, J, K, m) + (yfv(I, J, K, nSurface) * (temperature(I, J, K, m) - temperature(I - il1, J - jl1, K - kl1, m)) - 0.5 * yfv(I + il1, J + jl1, K + kl1, nSurface) * (temperature(I + il1, J + jl1, K + kl1, m) - temperature(I, J, K, m)) - 0.5 * yfv(I - il1, J - jl1, K - kl1, nSurface) * (temperature(I - il1, J - jl1, K - kl1, m) - temperature(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+        gradTemperatureFaceZ(I, J, K, m) = gradTemperatureFaceZ(I, J, K, m) + (zfv(I, J, K, nSurface) * (temperature(I, J, K, m) - temperature(I - il1, J - jl1, K - kl1, m)) - 0.5 * zfv(I + il1, J + jl1, K + kl1, nSurface) * (temperature(I + il1, J + jl1, K + kl1, m) - temperature(I, J, K, m)) - 0.5 * zfv(I - il1, J - jl1, K - kl1, nSurface) * (temperature(I - il1, J - jl1, K - kl1, m) - temperature(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+
+        gradTemperatureFaceX(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+        gradTemperatureFaceY(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+        gradTemperatureFaceZ(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+    }
+
+    //! Compute gradient of species.
+    if (nChemical > 0)
+    {
+        for (int m = nNSNumber; m < nNSNumber + nSpeciesNumber; ++ m)
+        {
+            nIndex = m - nNSNumber;
+            gradPrimtiveVarFaceX(I, J, K, m) = vol(I, J, K) * (*gradSpeciesCellCenterX)(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * (*gradSpeciesCellCenterX)(I - il1, J - jl1, K - kl1, nIndex);
+            gradPrimtiveVarFaceY(I, J, K, m) = vol(I, J, K) * (*gradSpeciesCellCenterY)(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * (*gradSpeciesCellCenterY)(I - il1, J - jl1, K - kl1, nIndex);
+            gradPrimtiveVarFaceZ(I, J, K, m) = vol(I, J, K) * (*gradSpeciesCellCenterZ)(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * (*gradSpeciesCellCenterZ)(I - il1, J - jl1, K - kl1, nIndex);
+
+            gradPrimtiveVarFaceX(I, J, K, m) = gradPrimtiveVarFaceX(I, J, K, m) + (xfv(I, J, K, nSurface) * (primitiveVaiables(I, J, K, m) - primitiveVaiables(I - il1, J - jl1, K - kl1, m)) - 0.5 * xfv(I + il1, J + jl1, K + kl1, nSurface) * (primitiveVaiables(I + il1, J + jl1, K + kl1, m) - primitiveVaiables(I, J, K, m)) - 0.5 * xfv(I - il1, J - jl1, K - kl1, nSurface) * (primitiveVaiables(I - il1, J - jl1, K - kl1, m) - primitiveVaiables(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+            gradPrimtiveVarFaceY(I, J, K, m) = gradPrimtiveVarFaceY(I, J, K, m) + (yfv(I, J, K, nSurface) * (primitiveVaiables(I, J, K, m) - primitiveVaiables(I - il1, J - jl1, K - kl1, m)) - 0.5 * yfv(I + il1, J + jl1, K + kl1, nSurface) * (primitiveVaiables(I + il1, J + jl1, K + kl1, m) - primitiveVaiables(I, J, K, m)) - 0.5 * yfv(I - il1, J - jl1, K - kl1, nSurface) * (primitiveVaiables(I - il1, J - jl1, K - kl1, m) - primitiveVaiables(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+            gradPrimtiveVarFaceZ(I, J, K, m) = gradPrimtiveVarFaceZ(I, J, K, m) + (zfv(I, J, K, nSurface) * (primitiveVaiables(I, J, K, m) - primitiveVaiables(I - il1, J - jl1, K - kl1, m)) - 0.5 * zfv(I + il1, J + jl1, K + kl1, nSurface) * (primitiveVaiables(I + il1, J + jl1, K + kl1, m) - primitiveVaiables(I, J, K, m)) - 0.5 * zfv(I - il1, J - jl1, K - kl1, nSurface) * (primitiveVaiables(I - il1, J - jl1, K - kl1, m) - primitiveVaiables(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+
+            gradPrimtiveVarFaceX(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+            gradPrimtiveVarFaceY(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+            gradPrimtiveVarFaceZ(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+        }
+    }
+
+    GetGradientAtFace_CorrectionAtPhysicalBoundary(grid, nSurface);
+}
+
+void NCCRSolverStruct::GetGradientAtFace_CorrectionAtPhysicalBoundary(Grid *gridin, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridin);
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    // printf("xfn is %f", xfn);
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    RDouble3D &vol = *(grid->GetCellVolume());
+    
+    RDouble4D &gradPrimtiveVarFaceX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D &gradPrimtiveVarFaceY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D &gradPrimtiveVarFaceZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+
+    RDouble4D &gradTemperatureFaceX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D &gradTemperatureFaceY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D &gradTemperatureFaceZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceZ"));
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSNumber = parameters->GetNSEquationNumber();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble4D *gradSpeciesCellCenterX = 0, *gradSpeciesCellCenterY = 0, *gradSpeciesCellCenterZ = 0;
+    int nViscosityFluxSublevelModified = parameters->GetnViscosityFluxSublevelModified();
+    if (nChemical > 0 && nSpeciesNumber)
+    {
+        gradSpeciesCellCenterX = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdx"));
+        gradSpeciesCellCenterY = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdy"));
+        gradSpeciesCellCenterZ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdz"));
+    }
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    
+    int nBCRegion = structBCSet->GetnBCRegion();
+    
+    using namespace PHENGLEI;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = bcregion->GetBCType();
+        int nsurf_bc = bcregion->GetFaceDirection() + 1;
+
+        if (IsInterface(BCType) || nsurf_bc != iSurface)
+        {
+            continue;
+        }
+
+        else if (IsWall(BCType) || BCType == PHENGLEI::ABLATION_SURFACE)
+        {
+            int ist, ied, jst, jed, kst, ked;
+            bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+            int il1, jl1, kl1;
+            grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+            int leftOrRightIndex = bcregion->GetFaceLeftOrRightIndex();  //! left -1; right 1.
+
+            RDouble nx, ny, nz, vhalf, f_kc_et_ct;
+
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int ibc1, jbc1, kbc1;
+                        bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                        nx = xfv(ibc1, jbc1, kbc1, iSurface);
+                        ny = yfv(ibc1, jbc1, kbc1, iSurface);
+                        nz = zfv(ibc1, jbc1, kbc1, iSurface);
+
+                        //! Modify the gradient of velocity.
+                        for (int m = 1; m <= 3; ++ m)
+                        {
+                            f_kc_et_ct = q(ibc1, jbc1, kbc1, m) - q(ibc1 - il1, jbc1 - jl1, kbc1 - kl1, m);
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, m) = nx * f_kc_et_ct / vol(i, j, k);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, m) = ny * f_kc_et_ct / vol(i, j, k);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, m) = nz * f_kc_et_ct / vol(i, j, k);
+                        }
+
+                        //! Modify the gradient of temperature.
+                        for (int m = 0; m < nTemperatureModel; ++ m)
+                        {
+                            f_kc_et_ct = t(ibc1, jbc1, kbc1, m) - t(ibc1 - il1, jbc1 - jl1, kbc1 - kl1, m);
+                            gradTemperatureFaceX(ibc1, jbc1, kbc1, m) = nx * f_kc_et_ct / vol(i, j, k);
+                            gradTemperatureFaceY(ibc1, jbc1, kbc1, m) = ny * f_kc_et_ct / vol(i, j, k);
+                            gradTemperatureFaceZ(ibc1, jbc1, kbc1, m) = nz * f_kc_et_ct / vol(i, j, k);
+                        }
+
+                        if (nChemical == 0)
+                        {
+                            continue;
+                        }
+                        //! Modify the gradient of species.
+                        for (int m = nNSNumber; m < nNSNumber + nSpeciesNumber; ++ m)
+                        {
+                            f_kc_et_ct = q(ibc1, jbc1, kbc1, m) - q(ibc1 - il1, jbc1 - jl1, kbc1 - kl1, m);
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, m) = nx * f_kc_et_ct / vol(i, j, k);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, m) = ny * f_kc_et_ct / vol(i, j, k);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, m) = nz * f_kc_et_ct / vol(i, j, k);
+                        }
+
+                        if (nViscosityFluxSublevelModified == 0)
+                        {
+                            continue;
+                        }
+
+                        ibc1 = ibc1 - il1 * leftOrRightIndex;
+                        jbc1 = jbc1 - jl1 * leftOrRightIndex;
+                        kbc1 = kbc1 - kl1 * leftOrRightIndex;
+
+                        vhalf = 2.0 / (vol(ibc1, jbc1, kbc1) + vol(ibc1 - il1, jbc1 - jl1, kbc1 - kl1));
+                        //vhalf = 1.0 / vol(i,j,k);
+
+                        nx = xfv(ibc1, jbc1, kbc1, iSurface) * vhalf;
+                        ny = yfv(ibc1, jbc1, kbc1, iSurface) * vhalf;
+                        nz = zfv(ibc1, jbc1, kbc1, iSurface) * vhalf;
+
+
+                        //! Modify the gradient of velocity.
+                        for (int m = 1; m <= 3; ++ m)
+                        {
+                            f_kc_et_ct = q(ibc1, jbc1, kbc1, m) - q(ibc1 - il1, jbc1 - jl1, kbc1 - kl1, m);
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, m) = nx * f_kc_et_ct;
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, m) = ny * f_kc_et_ct;
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, m) = nz * f_kc_et_ct;
+                        }
+
+                        //! Modify the gradient of temperature.
+                        for (int m = 0; m < nTemperatureModel; ++ m)
+                        {
+                            f_kc_et_ct = t(ibc1, jbc1, kbc1, m) - t(ibc1 - il1, jbc1 - jl1, kbc1 - kl1, m);
+                            gradTemperatureFaceX(ibc1, jbc1, kbc1, m) = nx * f_kc_et_ct;
+                            gradTemperatureFaceY(ibc1, jbc1, kbc1, m) = ny * f_kc_et_ct;
+                            gradTemperatureFaceZ(ibc1, jbc1, kbc1, m) = nz * f_kc_et_ct;
+                        }
+
+                        //! Modify the gradient of species.
+                        for (int m = nNSNumber; m < nNSNumber + nSpeciesNumber; ++ m)
+                        {
+                            f_kc_et_ct = q(ibc1, jbc1, kbc1, m) - q(ibc1 - il1, jbc1 - jl1, kbc1 - kl1, m);
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, m) = nx * f_kc_et_ct;
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, m) = ny * f_kc_et_ct;
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, m) = nz * f_kc_et_ct;
+                        }
+                    }
+                }
+            }
+        }
+
+        else if (BCType == SYMMETRY)
+        {
+            RDouble xfnSign;
+            RDouble yfnSign;
+            RDouble zfnSign;
+
+            int ist, ied, jst, jed, kst, ked;
+            bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+            xfnSign = ABS(xfn(ist, jst, kst, iSurface)) - 0.1;
+            yfnSign = ABS(yfn(ist, jst, kst, iSurface)) - 0.1;
+            zfnSign = ABS(zfn(ist, jst, kst, iSurface)) - 0.1;
+
+            if (xfnSign > 0.0) //! For Y-Z symmetry plane
+            {
+                for (int k = kst; k <= ked; ++ k)
+                {
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        for (int i = ist; i <= ied; ++ i)
+                        {
+                            int ibc1, jbc1, kbc1;
+                            bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 1) = gradUVWTCellCenterX(i, j, k, 0);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 1) = 0.0;
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 1) = 0.0;
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 2) = 0.0;
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 2) = gradUVWTCellCenterY(i, j, k, 1);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 2) = gradUVWTCellCenterZ(i, j, k, 1);
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 3) = 0.0;
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 3) = gradUVWTCellCenterY(i, j, k, 2);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 3) = gradUVWTCellCenterZ(i, j, k, 2);
+
+                            //! Modify the gradient of temperature.
+                            for (int it = 0; it < nTemperatureModel; ++ it)
+                            {
+                                gradTemperatureFaceX(ibc1, jbc1, kbc1, it) = 0.0;
+                                gradTemperatureFaceY(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterY(i, j, k, it + 3);
+                                gradTemperatureFaceZ(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterZ(i, j, k, it + 3);
+                            }
+
+                            if (nChemical == 0)
+                            {
+                                continue;
+                            }
+                            //! Modify the gradient of species.
+                            for (int s = nNSNumber; s < nNSNumber + nSpeciesNumber; ++ s)
+                            {
+                                gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, s) = 0.0;
+                                gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterY)(i, j, k, s - nNSNumber);
+                                gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterZ)(i, j, k, s - nNSNumber);
+                            }
+
+                        }
+                    }
+                }
+            }
+
+            if (yfnSign > 0.0) //! For X-Z symmetry plane
+            {
+                for (int k = kst; k <= ked; ++ k)
+                {
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        for (int i = ist; i <= ied; ++ i)
+                        {
+                            int ibc1, jbc1, kbc1;
+                            bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 1) = gradUVWTCellCenterX(i, j, k, 0);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 1) = 0.0;
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 1) = gradUVWTCellCenterZ(i, j, k, 0);
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 2) = 0.0;
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 2) = gradUVWTCellCenterY(i, j, k, 1);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 2) = 0.0;
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 3) = gradUVWTCellCenterX(i, j, k, 2);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 3) = 0.0;
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 3) = gradUVWTCellCenterZ(i, j, k, 2);
+
+                            //! Modify the gradient of temperature.
+                            for (int it = 0; it < nTemperatureModel; ++ it)
+                            {
+                                gradTemperatureFaceX(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterX(i, j, k, it + 3);
+                                gradTemperatureFaceY(ibc1, jbc1, kbc1, it) = 0.0;
+                                gradTemperatureFaceZ(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterZ(i, j, k, it + 3);
+                            }
+
+                            if (nChemical == 0)
+                            {
+                                continue;
+                            }
+                            //! Modify the gradient of species.
+                            for (int s = nNSNumber; s < nNSNumber + nSpeciesNumber; ++ s)
+                            {
+                                gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterX)(i, j, k, s - nNSNumber);
+                                gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, s) = 0.0;
+                                gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterZ)(i, j, k, s - nNSNumber);
+                            }
+
+                        }
+                    }
+                }
+            }
+
+            if (zfnSign > 0.0) //! For X-Y symmetry plane
+            {
+                for (int k = kst; k <= ked; ++ k)
+                {
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        for (int i = ist; i <= ied; ++ i)
+                        {
+                            int ibc1, jbc1, kbc1;
+                            bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 1) = gradUVWTCellCenterX(i, j, k, 0);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 1) = gradUVWTCellCenterY(i, j, k, 0);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 1) = 0.0;
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 2) = gradUVWTCellCenterX(i, j, k, 1);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 2) = gradUVWTCellCenterY(i, j, k, 1);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 2) = 0.0;
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 3) = 0.0;
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 3) = 0.0;
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 3) = gradUVWTCellCenterZ(i, j, k, 2);
+
+                            //! Modify the gradient of temperature.
+                            for (int it = 0; it < nTemperatureModel; ++ it)
+                            {
+                                gradTemperatureFaceX(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterX(i, j, k, it + 3);
+                                gradTemperatureFaceY(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterY(i, j, k, it + 3);
+                                gradTemperatureFaceZ(ibc1, jbc1, kbc1, it) = 0.0;
+                            }
+
+                            if (nChemical == 0)
+                            {
+                                continue;
+                            }
+                            //! Modify the gradient of species.
+                            for (int s = nNSNumber; s < nNSNumber + nSpeciesNumber; ++ s)
+                            {
+                                gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterX)(i, j, k, s - nNSNumber);
+                                gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterY)(i, j, k, s - nNSNumber);
+                                gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, s) = 0.0;
+                            }
+
+                        }
+                    }
+                }
+            }
+        }
+        else //! Other boundary conditions.
+        {
+            int ist, ied, jst, jed, kst, ked;
+            bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int ibc1, jbc1, kbc1;
+                        bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                        for (int m = 1; m <= 3; ++ m)
+                        {
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, m) = gradUVWTCellCenterX(i, j, k, m - 1);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, m) = gradUVWTCellCenterY(i, j, k, m - 1);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, m) = gradUVWTCellCenterZ(i, j, k, m - 1);
+                        }
+
+                        //! Modify the gradient of temperature.
+                        for (int it = 0; it < nTemperatureModel; ++ it)
+                        {
+                            gradTemperatureFaceX(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterX(i, j, k, it + 3);
+                            gradTemperatureFaceY(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterY(i, j, k, it + 3);
+                            gradTemperatureFaceZ(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterZ(i, j, k, it + 3);
+                        }
+
+                        if (nChemical == 0)
+                        {
+                            continue;
+                        }
+                        //! Modify the gradient of species.
+                        for (int s = nNSNumber; s < nNSNumber + nSpeciesNumber; ++ s)
+                        {
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterX)(i, j, k, s - nNSNumber);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterY)(i, j, k, s - nNSNumber);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterZ)(i, j, k, s - nNSNumber);
+                        }
+
+                    }
+                }
+            }
+
+        }
+    }
+}
+
+void NCCRSolverStruct::CompVisFlux(Grid *gridIn, FieldProxy *fluxProxy, int nSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &gradqx = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D &gradqy = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D &gradqz = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+
+    RDouble4D &gradtx = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D &gradty = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D &gradtz = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceZ"));
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int nElectronIndex = parameters->GetIndexOfElectron();
+
+    RDouble refGama = parameters->GetRefGama();
+
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int nrokplus = GlobalDataBase::GetIntParaFromDB("nrokplus");
+
+    RDouble4D *q_turb = 0, *aniss = 0;
+    if (nrokplus > 0)
+    {
+        q_turb = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_turb"));
+        aniss = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("aniss"));
+    }
+
+    RDouble nx = 0, ny = 0, nz = 0;
+    RDouble qx = 0, qy = 0, qz = 0, qvex = 0, qvey = 0, qvez = 0;
+
+    RDouble um = 0, vm = 0, wm = 0, tm = 0, tvm = 0, tem = 0;
+
+    RDouble mul = 0, mut = 0, vis = 0, divv2p3 = 0;
+    RDouble txx = 0, tyy = 0, tzz = 0;
+    RDouble txy = 0, txz = 0, tyz = 0;
+
+    RDouble dudx = 0, dudy = 0, dudz = 0;
+    RDouble dvdx = 0, dvdy = 0, dvdz = 0;
+    RDouble dwdx = 0, dwdy = 0, dwdz = 0;
+    RDouble dtdx = 0, dtdy = 0, dtdz = 0;
+
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+    RDouble kcp = 0.0, kv = 0.0, ke = 0.0;      //! The heat conductivity.
+
+    RDouble *qlr = new RDouble[nEquation]();
+    RDouble *dfsdx = new RDouble[numberOfSpecies]();
+    RDouble *dfsdy = new RDouble[numberOfSpecies]();
+    RDouble *dfsdz = new RDouble[numberOfSpecies]();
+    RDouble *fvis = new RDouble[nEquation]();
+    RDouble *work = new RDouble[nEquation]();
+
+    int iFaceStart = 0, iFaceEnd = 0, jFaceStart = 0, jFaceEnd = 0, kFaceStart = 0, kFaceEnd = 0;
+    grid->GetFaceIterationIndex(iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd, nSurface);
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, nSurface);
+
+    using namespace IDX;
+
+    for (int k = kFaceStart; k <= kFaceEnd; ++ k)
+    {
+        for (int j = jFaceStart; j <= jFaceEnd; ++ j)
+        {
+            for (int i = iFaceStart; i <= iFaceEnd; ++ i)
+            {
+                int il, jl, kl;
+                grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                //! Note that if we use iSurface,there must be no omission.
+                nx = xfv(il, jl, kl, nSurface);
+                ny = yfv(il, jl, kl, nSurface);
+                nz = zfv(il, jl, kl, nSurface);
+
+                um = half * (q(il, jl, kl, IU) + q(i, j, k, IU));
+                vm = half * (q(il, jl, kl, IV) + q(i, j, k, IV));
+                wm = half * (q(il, jl, kl, IW) + q(i, j, k, IW));
+                tm = half * (t(il, jl, kl, ITT) + t(i, j, k, ITT));
+
+                if (nTemperatureModel == 1)
+                {
+                    tvm = tm;  tem = tm;
+                }
+                else if (nTemperatureModel == 2)
+                {
+                    tvm = half * (t(il, jl, kl, ITV) + t(i, j, k, ITV));
+                    tem = tvm;
+                }
+                else if (nTemperatureModel == 3)
+                {
+                    tvm = half * (t(il, jl, kl, ITV) + t(i, j, k, ITV));
+                    tem = half * (t(il, jl, kl, ITE) + t(i, j, k, ITE));
+                }
+
+                mul = half * (viscousLaminar(il, jl, kl) + viscousLaminar(i, j, k));
+                mut = half * (viscousTurbulence(il, jl, kl) + viscousTurbulence(i, j, k));
+                //mut = 0.0;
+                vis = mul + mut;
+
+                dudx = gradqx(il, jl, kl, IU);
+                dudy = gradqy(il, jl, kl, IU);
+                dudz = gradqz(il, jl, kl, IU);
+
+                dvdx = gradqx(il, jl, kl, IV);
+                dvdy = gradqy(il, jl, kl, IV);
+                dvdz = gradqz(il, jl, kl, IV);
+
+                dwdx = gradqx(il, jl, kl, IW);
+                dwdy = gradqy(il, jl, kl, IW);
+                dwdz = gradqz(il, jl, kl, IW);
+
+                dtdx = gradtx(il, jl, kl, ITT);
+                dtdy = gradty(il, jl, kl, ITT);
+                dtdz = gradtz(il, jl, kl, ITT);
+
+                qx = 0.0;
+                qy = 0.0;
+                qz = 0.0;
+
+                if (nChemical == 1)
+                {
+                    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+                    {
+                        dfsdx[ispecies] = gradqx(il, jl, kl, nNSEquation + ispecies);
+                        dfsdy[ispecies] = gradqy(il, jl, kl, nNSEquation + ispecies);
+                        dfsdz[ispecies] = gradqz(il, jl, kl, nNSEquation + ispecies);
+                    }
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        qlr[m] = half * (q(il, jl, kl, m) + q(i, j, k, m));
+                    }
+
+                    gas->ComputeSpeciesMassDiffusionFlux(qlr, dfsdx, dfsdy, dfsdz, tm, tvm, tem, mul, mut, nx, ny, nz, qx, qy, qz, fvis);
+                    //! Compute the heat conductivity of multi-component gas.
+                    gas->ComputeMixtureGasHeatConductivity(qlr, tm, tvm, tem, kcp, kv, ke);
+                }
+
+                if (nChemical == 0)    //! Compute the heat conductivity of perfect gas.
+                {
+                    kcp = (mul * oPrandtlLaminar + mut * oPrandtlTurbulence) * specificHeatAtConstantPressure;
+                }
+
+                qx += kcp * dtdx;
+                qy += kcp * dtdy;
+                qz += kcp * dtdz;
+                if (nTemperatureModel == 2)
+                {
+                    qvex = (kv + ke) * gradtx(il, jl, kl, ITV);
+                    qvey = (kv + ke) * gradty(il, jl, kl, ITV);
+                    qvez = (kv + ke) * gradtz(il, jl, kl, ITV);
+                    fvis[nLaminar + nChemical] += (nx * qvex + ny * qvey + nz * qvez);
+                }
+                else if (nTemperatureModel == 3)
+                {
+                    qvex = kv * gradtx(il, jl, kl, ITV);
+                    qvey = kv * gradty(il, jl, kl, ITV);
+                    qvez = kv * gradtz(il, jl, kl, ITV);
+                    fvis[nLaminar + nChemical] += (nx * qvex + ny * qvey + nz * qvez);
+                    qx += qvex;
+                    qy += qvey;
+                    qz += qvez;
+
+                    qvex = ke * gradtx(il, jl, kl, ITE);
+                    qvey = ke * gradty(il, jl, kl, ITE);
+                    qvez = ke * gradtz(il, jl, kl, ITE);
+                    fvis[nLaminar + nChemical + 1] += (nx * qvex + ny * qvey + nz * qvez);
+                }
+                else
+                {
+                    qvex = 0.0;
+                    qvey = 0.0;
+                    qvez = 0.0;
+                }
+                qx += qvex;
+                qy += qvey;
+                qz += qvez;
+
+                divv2p3 = two3rd * (dudx + dvdy + dwdz);
+                //! Stress components.
+                txx = vis * (two * dudx - divv2p3);
+                tyy = vis * (two * dvdy - divv2p3);
+                tzz = vis * (two * dwdz - divv2p3);
+                txy = vis * (dudy + dvdx);
+                txz = vis * (dudz + dwdx);
+                tyz = vis * (dvdz + dwdy);
+
+                fvis[IDX::IR] = 0.0;
+                fvis[IDX::IRU] = nx * txx + ny * txy + nz * txz;
+                fvis[IDX::IRV] = nx * txy + ny * tyy + nz * tyz;
+                fvis[IDX::IRW] = nx * txz + ny * tyz + nz * tzz;
+                fvis[IDX::IRE] = um * fvis[IDX::IRU] + vm * fvis[IDX::IRV] + wm * fvis[IDX::IRW] + (nx * qx + ny * qy + nz * qz);
+
+                for (int m = 0; m < nLaminar; ++ m)
+                {
+                    flux(il, jl, kl, m) = -oRefReNumber * fvis[m];
+                }
+
+                for (int m = nLaminar + nChemical; m < nEquation; ++ m) //! Multi-temperature model.
+                {
+                    flux(il, jl, kl, m) = -oRefReNumber * fvis[m];
+                }
+
+                //! Modify the fluxes of the species whose transport equations need not to be computed.
+                if (nChemical == 1)
+                {
+                    flux(il, jl, kl, nLaminar) = 0.0;
+                    if (nElectronIndex >= 0)
+                    {
+                        flux(il, jl, kl, nLaminar - 1) = 0.0;
+                    }
+                }
+            }
+        }
+    }
+
+    delete[] fvis;     fvis = NULL;
+    delete[] work;     work = NULL;
+    delete[] qlr;      qlr = NULL;
+    delete[] dfsdx;    dfsdx = NULL;
+    delete[] dfsdy;    dfsdy = NULL;
+    delete[] dfsdz;    dfsdz = NULL;
+}
+
+void NCCRSolverStruct::CorrectViscousFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    //! Apply the original method, it is no need to modify the flux on wall.
+    if (nChemical == 0)
+    {
+        return;
+    }
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    int wallMultiTemperature = gas->GetwallMultiTemperature();
+   
+    //! The adiabatic wall applies the primary method.
+    if (wallMultiTemperature == 0 && wallTemperature < 0.0)
+    {
+        return;
+    }
+    //! Otherwise, to modify the viscous flux on wall.
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+
+    RDouble4D &faceVelocityX = *(grid->GetFaceVelocityX());
+    RDouble4D &faceVelocityY = *(grid->GetFaceVelocityY());
+    RDouble4D &faceVelocityZ = *(grid->GetFaceVelocityZ());
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+
+    RDouble4D &faceArea = *(grid->GetFaceArea());
+    RDouble3D &gridCellVolume = *(grid->GetCellVolume());
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble2D *surfaceTemperature = reinterpret_cast <RDouble2D *> (gridIn->GetDataPtr("surfaceTemperature"));
+    RDouble4D &faceFluxes = fluxProxy->GetField_STR();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    //! The number of species.
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nSpecies = nLaminar + nChemical - nNSEquation;
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    int viscousType = parameters->GetViscousType();
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble nondimensionalTemperatureWall = wallTemperature / refDimensionalTemperature;
+    RDouble gasConstant = gas->GetUniversalGasConstant();
+
+    //! The type of catalytic wall condition.
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();
+    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+    RDouble localSurfaceTemperature[3] = { nondimensionalTemperatureWall, nondimensionalTemperatureWall, nondimensionalTemperatureWall };
+
+    RDouble *wallVariables = new RDouble[nEquation]();    //! Save the variables on wall.
+    RDouble *wallFluxes = new RDouble[nEquation]();
+    RDouble *speciesEnthalpy = new RDouble[nSpecies]();
+    RDouble *densityDiffusivity = new RDouble[nSpecies]();
+    RDouble *vibrationEnergy = new RDouble[nSpecies]();   //! Save the internal energies of vibration.
+    RDouble *electronEnergy = new RDouble[nSpecies]();    //! Save the internal energies of electron.
+    RDouble3D *surfaceMassFraction = 0;
+    RDouble2D *injectionVelocity = 0;
+    if (nChemical > 0 && nSpecies > 0)         //! The fully catalytic condition.
+    {
+        surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+    }
+    int isInjection = GlobalDataBase::GetIntParaFromDB("isInjection");
+    if (isInjection == 1)
+    {
+        injectionVelocity = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("injectionVelocity"));
+    }
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (gridIn->GetDataPtr("surfaceSlipVariables"));
+    }
+
+    using namespace IDX;
+    //RDouble normalComponentX, normalComponentY, normalComponentZ, surfaceArea;
+    RDouble transportHeatFlux = 0, speciesHeatFlux = 0;
+    RDouble laminarViscosity = 0, turbulentViscosity = 0, viscosity = 0;
+    RDouble dudx = 0, dudy = 0, dudz = 0, dvdx = 0, dvdy = 0, dvdz = 0, dwdx = 0, dwdy = 0, dwdz = 0;
+    RDouble divv2p3 = 0, txx = 0, tyy = 0, tzz = 0, txy = 0, txz = 0, tyz = 0;
+
+    int indexOfWall = 0, indexOfCell = 0;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int nBCType = structBC->GetBCType();
+
+        if (!(IsWall(nBCType) && viscousType > INVISCID) && nBCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        Data_Param *bcParamDB = structBC->GetBCParamDataBase();
+        if (bcParamDB->IsExist("catalyticCoef", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("catalyticCoef", &catalyticCoef, PHDOUBLE, 1);
+        }
+
+        if (wallMultiTemperature == 1)
+        {
+            if (bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+            {
+                bcParamDB->GetData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+            }
+            else
+            {
+                wallTemperature = parameters->GetWallTemperature();
+            }
+
+            if (wallTemperature < 0.0)
+            {
+                return;
+            }
+
+            nondimensionalTemperatureWall = wallTemperature / refDimensionalTemperature;
+            localSurfaceTemperature[0] = nondimensionalTemperatureWall;
+            localSurfaceTemperature[1] = nondimensionalTemperatureWall;
+            localSurfaceTemperature[2] = nondimensionalTemperatureWall;
+        }
+
+        RDouble uWall = 0.0;
+        RDouble vWall = 0.0;
+        RDouble wWall = 0.0;
+        vector<SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+
+        if (globalBCList != 0)
+        {
+            vector<SimpleBC *>::iterator iter;
+            for (iter = globalBCList->begin(); iter != globalBCList->end(); ++ iter)
+            {
+                SimpleBC *boundaryCondition = *iter;
+                string BCName = structBC->GetBCName();
+
+                if (BCName != boundaryCondition->GetBCName())
+                {
+                    continue;
+                }
+
+                if (boundaryCondition->CheckParamData("uWall"))
+                {
+                    boundaryCondition->GetParamData("uWall", &uWall, PHDOUBLE, 1);
+                }
+
+                if (boundaryCondition->CheckParamData("vWall"))
+                {
+                    boundaryCondition->GetParamData("vWall", &vWall, PHDOUBLE, 1);
+                }
+
+                if (boundaryCondition->CheckParamData("wWall"))
+                {
+                    boundaryCondition->GetParamData("wWall", &wWall, PHDOUBLE, 1);
+                }
+            }
+        }
+
+        int *faceDirectionIndex = structBC->GetFaceDirectionIndex();
+        //! 0 stands for i-direction, 1 stands for j-direction, and 2 for k-direction.
+        int directionIndex = structBC->GetFaceDirection() + 1;
+        //! Judge the face is on the left side or right side in the current zone,-1 stands for left side, and 1 for right side.
+        int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+        leftOrRightIndex *= -1;
+
+        int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (directionIndex != iSurface)
+        {
+            continue;
+        }
+
+        int id = 0, jd = 0, kd = 0;
+        GetBCFaceIDX(faceDirectionIndex, id, jd, kd);
+
+        kst = kst + kd;
+        ked = ked + kd;
+        jst = jst + jd;
+        jed = jed + jd;
+        ist = ist + id;
+        ied = ied + id;
+
+        RDouble velocityXWall = 0.0;
+        RDouble velocityYWall = 0.0;
+        RDouble velocityZWall = 0.0;
+
+        indexOfCell = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! The index of cell near the wall.
+                    int iCell = i - id;
+                    int jCell = j - jd;
+                    int kCell = k - kd;
+
+                    //! The index of ghost cell on the first layer.
+                    int iL = iCell + faceDirectionIndex[0];
+                    int jL = jCell + faceDirectionIndex[1];
+                    int kL = kCell + faceDirectionIndex[2];
+
+                    //! Obtain the normal vector.
+                    RDouble normalComponentX = faceNormalComponentX(i, j, k, iSurface);
+                    RDouble normalComponentY = faceNormalComponentY(i, j, k, iSurface);
+                    RDouble normalComponentZ = faceNormalComponentZ(i, j, k, iSurface);
+
+                    velocityXWall = uWall;
+                    velocityYWall = vWall;
+                    velocityZWall = wWall;
+                    if (isUnsteady && isAle)
+                    {
+                        velocityXWall += faceVelocityX(i, j, k, iSurface);
+                        velocityYWall += faceVelocityY(i, j, k, iSurface);
+                        velocityZWall += faceVelocityZ(i, j, k, iSurface);
+                    }
+
+                    if (isInjection == 1)
+                    {
+                        RDouble wallVelocity = leftOrRightIndex * (*injectionVelocity)(indexOfWall, indexOfCell);
+                        velocityXWall += wallVelocity * normalComponentX;
+                        velocityYWall += wallVelocity * normalComponentY;
+                        velocityZWall += wallVelocity * normalComponentZ;    //Z
+                    }
+
+                    if (nSlipBCModel > 0)
+                    {
+                        velocityXWall += (*surfaceSlipVariables)(indexOfWall, indexOfCell, 3);
+                        velocityYWall += (*surfaceSlipVariables)(indexOfWall, indexOfCell, 4);
+                        velocityZWall += (*surfaceSlipVariables)(indexOfWall, indexOfCell, 5);
+                        for (int m = 0; m < 3; ++ m)
+                        {
+                            localSurfaceTemperature[m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m);
+                        }
+                    }
+                    else
+                    {
+                        //! Obtain the local surface temperatures.Tve=Tv=Te=Tw.
+                        localSurfaceTemperature[ITT] = (*surfaceTemperature)(indexOfWall, indexOfCell);
+                        localSurfaceTemperature[ITV] = localSurfaceTemperature[ITT];
+                        localSurfaceTemperature[ITE] = localSurfaceTemperature[ITT];
+                    }
+
+                    //! Compute variables on wall.
+                    wallVariables[IU] = velocityXWall;
+                    wallVariables[IV] = velocityYWall;
+                    wallVariables[IW] = velocityZWall;
+                    wallVariables[IP] = primitiveVariables(iCell, jCell, kCell, IP);
+
+                    //! Obtain the mass fractions of species on wall.
+                    if (ABS(catalyticCoef) <= EPSILON && nBCType != PHENGLEI::ABLATION_SURFACE) //! Fully non-catalytic wall.
+                    {
+                        for (int m = nNSEquation; m < nNSEquation + nSpecies; ++ m)
+                        {
+                            wallVariables[m] = primitiveVariables(iCell, jCell, kCell, m);
+                        }
+                    }
+                    else //! Fully catalytic wall or finite catalytic wall.
+                    {
+                        for (int m = nNSEquation; m < nNSEquation + nSpecies; ++ m)
+                        {
+                            wallVariables[m] = (*surfaceMassFraction)(indexOfWall, indexOfCell, m - nNSEquation);
+                        }
+                    }
+
+                    if (nSlipBCModel > 0) //! Modify the mass fractions on wall.
+                    {
+                        for (int m = 0; m < nSpecies; ++ m)
+                        {
+                            wallVariables[nNSEquation + m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m + 6);
+                        }
+                    }
+
+                    //! Modify density on wall.
+                    RDouble massReciprocal = gas->ComputeMolecularWeightReciprocal(wallVariables);
+                    wallVariables[IR] = wallVariables[IP] / (gasConstant * localSurfaceTemperature[ITT] * massReciprocal);
+
+                    RDouble surfaceArea = faceArea(i, j, k, iSurface); //! The area of side face.
+                    RDouble cellVolume = gridCellVolume(iCell, jCell, kCell); //! The volume of first cell.
+                    RDouble deltaHeight = half * cellVolume / surfaceArea;
+
+                    //ComputeTransportCoefficientsR(RDouble *massFractions, RDouble *temperature, RDouble density, RDouble *speciesCps, RDouble *speciesCvvs,RDouble *speciesCves, RDouble visTurbulence, RDouble &viscosity, RDouble *heatConductivity, RDouble *rhoDs)
+                    //gas->ComputeTransportCoefficientsR(&wallVariables[IP+1], localSurfaceTemperature, wallVariables[IR], Cps, Cvvs, Cves, viscousTurbulence(i, j, k), laminarViscosity, lamda, rhoDs);
+
+                    //! Compute viscosity on wall.
+                    gas->ComputeViscosityByPrimitive(wallVariables, localSurfaceTemperature[ITT], localSurfaceTemperature[ITE], nonDimensionalSutherlandTemperature, laminarViscosity); //Tve=Tv=Te=Tw
+                    turbulentViscosity = half * (viscousTurbulence(iL, jL, kL) + viscousTurbulence(iCell, jCell, kCell));
+                    viscosity = laminarViscosity + turbulentViscosity;
+                    viscousLaminar(iL, jL, kL) = 2.0 * laminarViscosity - viscousLaminar(iCell, jCell, kCell);
+
+                    //! To obtain the enthalpy of each species.
+                    gas->GetEverySpeciesEnthalpy(localSurfaceTemperature[ITT], localSurfaceTemperature[ITV], localSurfaceTemperature[ITE], speciesEnthalpy); //Tve=Tv=Te=Tw
+
+                    //! To obtain the mass diffusion coefficients of each species.
+                    gas->GetSpeciesMassDiffusionCoef(wallVariables, laminarViscosity, turbulentViscosity, densityDiffusivity);
+
+                    //! To compute heat conductivity of mixture gas using the Eucken formula and Wassilewa formula.
+                    RDouble transRotationHeatCoef, vibrationHeatCoef, electronHeatCoef;
+                    gas->ComputeMixtureGasHeatConductivity(wallVariables, localSurfaceTemperature[ITT], localSurfaceTemperature[ITV], localSurfaceTemperature[ITE],
+                        transRotationHeatCoef, vibrationHeatCoef, electronHeatCoef);//Tve=Tv=Te=Tw
+
+                    //! Compute the heat flux caused by temperature difference.
+                    transportHeatFlux = leftOrRightIndex * transRotationHeatCoef * surfaceArea * ((temperatures(iCell, jCell, kCell, ITT) - localSurfaceTemperature[ITT]) / deltaHeight);
+                    if (nTemperatureModel == 2)         //! Two-Temperature Model.
+                    {
+                        wallFluxes[nLaminar + nChemical] = leftOrRightIndex * (vibrationHeatCoef + electronHeatCoef) * surfaceArea * ((temperatures(iCell, jCell, kCell, ITV) - localSurfaceTemperature[ITV]) / deltaHeight);
+                        transportHeatFlux += wallFluxes[nLaminar + nChemical];
+                    }
+                    else if (nTemperatureModel == 3)    //! Three-Temperature Model.
+                    {
+                        wallFluxes[nLaminar + nChemical] = leftOrRightIndex * vibrationHeatCoef * surfaceArea * ((temperatures(iCell, jCell, kCell, ITV) - localSurfaceTemperature[ITV]) / deltaHeight);
+                        wallFluxes[nLaminar + nChemical + 1] = leftOrRightIndex * electronHeatCoef * surfaceArea * ((temperatures(iCell, jCell, kCell, ITE) - localSurfaceTemperature[ITE]) / deltaHeight);
+                        transportHeatFlux += wallFluxes[nLaminar + nChemical] + wallFluxes[nLaminar + nChemical + 1];
+                    }
+
+                    //! Compute internal energy of vibration.
+                    RDouble peDivideDensity = 0.0;
+                    //gas->GetElectronPressure(wallVariables, surfaceTemperature[ITE]) / wallVariables[IR];
+                    if (nTemperatureModel > 1)
+                    {
+                        //! Tve=Tv=Te=Tw.
+                        gas->ComputeVibrationEnergy(localSurfaceTemperature[ITV], vibrationEnergy);
+                        gas->ComputeElectronEnergy(localSurfaceTemperature[ITE], electronEnergy);
+                    }
+
+                    //! Compute the heat flux of species density diffusion.
+                    speciesHeatFlux = 0.0;
+                    for (int m = 0; m < nSpecies; ++ m)
+                    {
+                        wallFluxes[nNSEquation + m] = leftOrRightIndex * densityDiffusivity[m] * surfaceArea * ((primitiveVariables(iCell, jCell, kCell, nNSEquation + m) - wallVariables[nNSEquation + m]) / deltaHeight);
+                        speciesHeatFlux += speciesEnthalpy[m] * wallFluxes[nNSEquation + m];
+
+                        if (nTemperatureModel == 2)
+                        {
+                            wallFluxes[nLaminar + nChemical] += (vibrationEnergy[m] + electronEnergy[m] + peDivideDensity) * wallFluxes[nNSEquation + m];    //! modified by dms.
+                        }
+                        else if (nTemperatureModel == 3)
+                        {
+                            wallFluxes[nLaminar + nChemical] += vibrationEnergy[m] * wallFluxes[nNSEquation + m];
+                            wallFluxes[nLaminar + nChemical + 1] += (electronEnergy[m] + peDivideDensity) * wallFluxes[nNSEquation + m];    //! modified by dms.
+                        }
+                    }
+
+                    RDouble deltaVelocity = leftOrRightIndex * (primitiveVariables(iCell, jCell, kCell, IU) - wallVariables[IU]);
+                    dudx = (deltaVelocity / deltaHeight) * normalComponentX;
+                    dudy = (deltaVelocity / deltaHeight) * normalComponentY;
+                    dudz = (deltaVelocity / deltaHeight) * normalComponentZ;
+
+                    deltaVelocity = leftOrRightIndex * (primitiveVariables(iCell, jCell, kCell, IV) - wallVariables[IV]);
+                    dvdx = (deltaVelocity / deltaHeight) * normalComponentX;
+                    dvdy = (deltaVelocity / deltaHeight) * normalComponentY;
+                    dvdz = (deltaVelocity / deltaHeight) * normalComponentZ;
+
+                    deltaVelocity = leftOrRightIndex * (primitiveVariables(iCell, jCell, kCell, IW) - wallVariables[IW]);
+                    dwdx = (deltaVelocity / deltaHeight) * normalComponentX;
+                    dwdy = (deltaVelocity / deltaHeight) * normalComponentY;
+                    dwdz = (deltaVelocity / deltaHeight) * normalComponentZ;
+
+                    divv2p3 = 2.0 / 3.0 * (dudx + dvdy + dwdz);
+                    //! Compute stress components.
+                    txx = viscosity * (2.0 * dudx - divv2p3);
+                    tyy = viscosity * (2.0 * dvdy - divv2p3);
+                    tzz = viscosity * (2.0 * dwdz - divv2p3);
+                    txy = viscosity * (dudy + dvdx);
+                    txz = viscosity * (dudz + dwdx);
+                    tyz = viscosity * (dvdz + dwdy);
+
+                    wallFluxes[IR] = 0.0;
+                    wallFluxes[IRU] = (normalComponentX * txx + normalComponentY * txy + normalComponentZ * txz) * surfaceArea;
+                    wallFluxes[IRV] = (normalComponentX * txy + normalComponentY * tyy + normalComponentZ * tyz) * surfaceArea;
+                    wallFluxes[IRW] = (normalComponentX * txz + normalComponentY * tyz + normalComponentZ * tzz) * surfaceArea;
+                    wallFluxes[IRE] = wallVariables[IU] * wallFluxes[IRU] + wallVariables[IV] * wallFluxes[IRV] + wallVariables[IW] * wallFluxes[IRW] + transportHeatFlux + speciesHeatFlux;
+
+                    for (int m = 0; m < nLaminar - nIonizationFlag; ++ m)
+                    {
+                        faceFluxes(i, j, k, m) = -oRefReNumber * wallFluxes[m];
+#ifdef USE_ERROR_DATA_DEBUG
+                        if (isErrorData(faceFluxes(i, j, k, m)))
+                        {
+                            int zoneID = grid->GetZoneID();
+                            PrintToWindow(" zoneID = ", zoneID, "i = ", i, "j = ", j, "k = ", k, "m = ", m);
+                            TK_Exit::ExceptionExit("This is in function CorrectViscousFlux", true);
+                        }
+#endif
+                    }
+
+                    for (int m = 0; m < nTemperatureModel - 1; ++ m)
+                    {
+                        faceFluxes(i, j, k, nLaminar + nChemical + m) = -oRefReNumber * wallFluxes[nLaminar + nChemical + m];
+#ifdef USE_ERROR_DATA_DEBUG
+                        if (isErrorData(faceFluxes(i, j, k, nLaminar + nChemical + m)))
+                        {
+                            int zoneID = grid->GetZoneID();
+                            PrintToWindow(" zoneID = ", zoneID, "i = ", i, "j = ", j, "k = ", k, "nLaminar + nChemical + m = ", nLaminar + nChemical + m);
+                            TK_Exit::ExceptionExit("This is in function CorrectViscousFlux", true);
+                        }
+#endif
+                    }
+                    //! Next grid cell.
+                    ++ indexOfCell;
+                }//! end.
+            }//! end.
+        }//! k end.
+        ++ indexOfWall; //! Next surface region.
+    }//! nBCRegion end.
+
+    delete[]wallVariables;    wallVariables = NULL;
+    delete[]wallFluxes;    wallFluxes = NULL;
+    delete[]speciesEnthalpy;    speciesEnthalpy = NULL;
+    delete[]densityDiffusivity;    densityDiffusivity = NULL;
+    delete[]vibrationEnergy;    vibrationEnergy = NULL;
+    delete[]electronEnergy;    electronEnergy = NULL;
+}
+
+void NCCRSolverStruct::CorrectNCCRViscousFlux(Grid* gridIn, FieldProxy* fluxProxy, int iSurface)
+{
+    Param_NSSolverStruct* parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+
+    RDouble wallTemperature = parameters->GetWallTemperature();
+
+    //! Otherwise, to modify the viscous flux on wall.
+    StructGrid* grid = StructGridCast(gridIn);
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+
+    RDouble4D& faceVelocityX = *(grid->GetFaceVelocityX());
+    RDouble4D& faceVelocityY = *(grid->GetFaceVelocityY());
+    RDouble4D& faceVelocityZ = *(grid->GetFaceVelocityZ());
+
+    RDouble4D& faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D& faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D& faceNormalComponentZ = *(grid->GetFaceNormalZ());
+
+    RDouble4D& faceArea = *(grid->GetFaceArea());
+    RDouble3D& gridCellVolume = *(grid->GetCellVolume());
+
+    RDouble4D& primitiveVariables = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("q"));
+    RDouble4D& temperatures = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("t"));
+    RDouble3D& viscousTurbulence = *reinterpret_cast <RDouble3D*> (grid->GetDataPtr("vist"));
+    RDouble3D& viscousLaminar = *reinterpret_cast <RDouble3D*> (grid->GetDataPtr("visl"));
+    RDouble2D* surfaceTemperature = reinterpret_cast <RDouble2D*> (gridIn->GetDataPtr("surfaceTemperature"));
+    RDouble4D& faceFluxes = fluxProxy->GetField_STR();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    //! The number of species.
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nSpecies = nLaminar + nChemical - nNSEquation; //! 0;
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1; //! 5;
+
+    int viscousType = parameters->GetViscousType();
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble nondimensionalTemperatureWall = wallTemperature / refDimensionalTemperature;
+    RDouble gasConstant = gas->GetUniversalGasConstant();
+
+    //! The type of catalytic wall condition.
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();
+    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+    RDouble localSurfaceTemperature[3] = { nondimensionalTemperatureWall, nondimensionalTemperatureWall, nondimensionalTemperatureWall };
+
+    RDouble* wallVariables = new RDouble[nEquation]();    //! Save the variables on wall.
+    RDouble* wallFluxes = new RDouble[nEquation]();
+    
+    RDouble refGama = parameters->GetRefGama();
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+
+    RDouble fb = 0.8;
+    RDouble c_nccr = 1.0179;
+    RDouble e_nccr = oPrandtlLaminar / ((refGama - 1) * refMachNumber * refMachNumber);
+    RDouble n_delta = oRefReNumber;
+    RDouble kcp = 0;
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D* surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D*> (gridIn->GetDataPtr("surfaceSlipVariables"));
+    }
+
+    using namespace IDX;
+    //RDouble normalComponentX, normalComponentY, normalComponentZ, surfaceArea;
+    RDouble heatFlux = 0;
+    RDouble laminarViscosity = 0, turbulentViscosity = 0, mul = 0, mul_bk = 0;
+    RDouble dudx = 0, dudy = 0, dudz = 0, dvdx = 0, dvdy = 0, dvdz = 0, dwdx = 0, dwdy = 0, dwdz = 0, dtdx = 0, dtdy = 0, dtdz = 0;
+
+    int indexOfWall = 0, indexOfCell = 0;
+
+    StructBCSet* structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++iBCRegion)
+    {
+        StructBC* structBC = structBCSet->GetBCRegion(iBCRegion);
+        int nBCType = structBC->GetBCType();
+
+        if (!(IsWall(nBCType) && viscousType > INVISCID) && nBCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        Data_Param* bcParamDB = structBC->GetBCParamDataBase();
+        if (bcParamDB->IsExist("catalyticCoef", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("catalyticCoef", &catalyticCoef, PHDOUBLE, 1);
+        }
+
+        RDouble uWall = 0.0;
+        RDouble vWall = 0.0;
+        RDouble wWall = 0.0;
+        vector<SimpleBC*>* globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+
+        if (globalBCList != 0)
+        {
+            vector<SimpleBC*>::iterator iter;
+            for (iter = globalBCList->begin(); iter != globalBCList->end(); ++iter)
+            {
+                SimpleBC* boundaryCondition = *iter;
+                string BCName = structBC->GetBCName();
+
+                if (BCName != boundaryCondition->GetBCName())
+                {
+                    continue;
+                }
+
+                if (boundaryCondition->CheckParamData("uWall"))
+                {
+                    boundaryCondition->GetParamData("uWall", &uWall, PHDOUBLE, 1);
+                }
+
+                if (boundaryCondition->CheckParamData("vWall"))
+                {
+                    boundaryCondition->GetParamData("vWall", &vWall, PHDOUBLE, 1);
+                }
+
+                if (boundaryCondition->CheckParamData("wWall"))
+                {
+                    boundaryCondition->GetParamData("wWall", &wWall, PHDOUBLE, 1);
+                }
+            }
+        }
+
+        int* faceDirectionIndex = structBC->GetFaceDirectionIndex();
+        //! 0 stands for i-direction, 1 stands for j-direction, and 2 for k-direction.
+        int directionIndex = structBC->GetFaceDirection() + 1;
+        //! Judge the face is on the left side or right side in the current zone,-1 stands for left side, and 1 for right side.
+        int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+        leftOrRightIndex *= -1;
+
+        int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (directionIndex != iSurface)
+        {
+            continue;
+        }
+
+        int id = 0, jd = 0, kd = 0;
+        GetBCFaceIDX(faceDirectionIndex, id, jd, kd);
+
+        kst = kst + kd;
+        ked = ked + kd;
+        jst = jst + jd;
+        jed = jed + jd;
+        ist = ist + id;
+        ied = ied + id;
+
+        RDouble velocityXWall = 0.0;
+        RDouble velocityYWall = 0.0;
+        RDouble velocityZWall = 0.0;
+
+        indexOfCell = 0;
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    //! The index of cell near the wall.
+                    int iCell = i - id;
+                    int jCell = j - jd;
+                    int kCell = k - kd;
+
+                    //! The index of ghost cell on the first layer.
+                    int iL = iCell + faceDirectionIndex[0];
+                    int jL = jCell + faceDirectionIndex[1];
+                    int kL = kCell + faceDirectionIndex[2];
+
+                    //! Obtain the normal vector.
+                    RDouble normalComponentX = faceNormalComponentX(i, j, k, iSurface);
+                    RDouble normalComponentY = faceNormalComponentY(i, j, k, iSurface);
+                    RDouble normalComponentZ = faceNormalComponentZ(i, j, k, iSurface);
+
+                    velocityXWall = uWall;
+                    velocityYWall = vWall;
+                    velocityZWall = wWall;
+                    if (isUnsteady && isAle)
+                    {
+                        velocityXWall += faceVelocityX(i, j, k, iSurface);
+                        velocityYWall += faceVelocityY(i, j, k, iSurface);
+                        velocityZWall += faceVelocityZ(i, j, k, iSurface);
+                    }
+
+                    if (nSlipBCModel > 0)
+                    {
+                        velocityXWall += (*surfaceSlipVariables)(indexOfWall, indexOfCell, 3);
+                        velocityYWall += (*surfaceSlipVariables)(indexOfWall, indexOfCell, 4);
+                        velocityZWall += (*surfaceSlipVariables)(indexOfWall, indexOfCell, 5);
+                        for (int m = 0; m < 3; ++m)
+                        {
+                            localSurfaceTemperature[m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m);
+                        }
+                    }
+                    else
+                    {
+                        //! Obtain the local surface temperatures.Tve=Tv=Te=Tw.
+                        localSurfaceTemperature[ITT] = (*surfaceTemperature)(indexOfWall, indexOfCell);
+                        localSurfaceTemperature[ITV] = localSurfaceTemperature[ITT];
+                        localSurfaceTemperature[ITE] = localSurfaceTemperature[ITT];
+                    }
+
+                    //! Compute variables on wall.
+                    wallVariables[IU] = velocityXWall;
+                    wallVariables[IV] = velocityYWall;
+                    wallVariables[IW] = velocityZWall;
+                    wallVariables[IP] = primitiveVariables(iCell, jCell, kCell, IP);
+
+                    //! Modify density on wall.
+                    wallVariables[IR] = wallVariables[IP] / (gasConstant * localSurfaceTemperature[ITT]);
+
+                    RDouble surfaceArea = faceArea(i, j, k, iSurface); //! The area of side face.
+                    RDouble cellVolume = gridCellVolume(iCell, jCell, kCell); //! The volume of first cell.
+                    RDouble deltaHeight = half * cellVolume / surfaceArea;
+
+                    //ComputeTransportCoefficientsR(RDouble *massFractions, RDouble *temperature, RDouble density, RDouble *speciesCps, RDouble *speciesCvvs,RDouble *speciesCves, RDouble visTurbulence, RDouble &viscosity, RDouble *heatConductivity, RDouble *rhoDs)
+                    //gas->ComputeTransportCoefficientsR(&wallVariables[IP+1], localSurfaceTemperature, wallVariables[IR], Cps, Cvvs, Cves, viscousTurbulence(i, j, k), laminarViscosity, lamda, rhoDs);
+
+                    //! Compute viscosity on wall.
+                    gas->ComputeViscosityByPrimitive(wallVariables, localSurfaceTemperature[ITT], localSurfaceTemperature[ITE], nonDimensionalSutherlandTemperature, laminarViscosity); //Tve=Tv=Te=Tw
+                    mul = laminarViscosity;
+
+                    viscousLaminar(iL, jL, kL) = 2.0 * laminarViscosity - viscousLaminar(iCell, jCell, kCell);
+
+                    //! Compute the heat flux caused by temperature difference.
+                    RDouble deltaTemperature = leftOrRightIndex * ((temperatures(iCell, jCell, kCell, ITT) - localSurfaceTemperature[ITT]) / deltaHeight);
+                    dtdx = deltaTemperature * normalComponentX;
+                    dtdy = deltaTemperature * normalComponentY;
+                    dtdz = deltaTemperature * normalComponentZ;
+
+                    RDouble deltaVelocity = leftOrRightIndex * (primitiveVariables(iCell, jCell, kCell, IU) - wallVariables[IU]);
+                    dudx = (deltaVelocity / deltaHeight) * normalComponentX;
+                    dudy = (deltaVelocity / deltaHeight) * normalComponentY;
+                    dudz = (deltaVelocity / deltaHeight) * normalComponentZ;
+
+                    deltaVelocity = leftOrRightIndex * (primitiveVariables(iCell, jCell, kCell, IV) - wallVariables[IV]);
+                    dvdx = (deltaVelocity / deltaHeight) * normalComponentX;
+                    dvdy = (deltaVelocity / deltaHeight) * normalComponentY;
+                    dvdz = (deltaVelocity / deltaHeight) * normalComponentZ;
+
+                    deltaVelocity = leftOrRightIndex * (primitiveVariables(iCell, jCell, kCell, IW) - wallVariables[IW]);
+                    dwdx = (deltaVelocity / deltaHeight) * normalComponentX;
+                    dwdy = (deltaVelocity / deltaHeight) * normalComponentY;
+                    dwdz = (deltaVelocity / deltaHeight) * normalComponentZ;
+
+                    RDouble np = wallVariables[IP];
+                    RDouble temperature = nondimensionalTemperatureWall;
+
+                    //! NCCR correct start.
+                    RDouble ttxx = 0.0, ttyy = 0.0, ttzz = 0.0, ttxy = 0.0, ttxz = 0.0, ttyz = 0.0, qx = 0.0, qy = 0.0, qz = 0.0, delt_bk = 0.0;
+
+                    mul_bk = fb * mul;
+
+                    //NCCR stress
+                    RDouble ttxxux0 = -4.0 / 3.0 * mul * dudx; RDouble ttxxvy0 = 2.0 / 3.0 * mul * dvdy; RDouble ttxxwz0 = 2.0 / 3.0 * mul * dwdz;
+                    RDouble ttyyux0 = 2.0 / 3.0 * mul * dudx; RDouble ttyyvy0 = -4.0 / 3.0 * mul * dvdy; RDouble ttyywz0 = 2.0 / 3.0 * mul * dwdz;
+                    RDouble ttzzux0 = 2.0 / 3.0 * mul * dudx; RDouble ttzzvy0 = 2.0 / 3.0 * mul * dvdy; RDouble ttzzwz0 = -4.0 / 3.0 * mul * dwdz;
+                    RDouble ttxyvx0 = -mul * dvdx; RDouble ttyxuy0 = -mul * dudy;
+                    RDouble ttxzwx0 = -mul * dwdx; RDouble ttzxuz0 = -mul * dudz;
+                    RDouble ttyzwy0 = -mul * dwdy; RDouble ttzyvz0 = -mul * dvdz;
+
+                    RDouble ttxxvx0 = 0.0; RDouble ttxxwx0 = 0.0;
+                    RDouble ttyywy0 = 0.0; RDouble ttyyuy0 = 0.0;
+                    RDouble ttzzuz0 = 0.0; RDouble ttzzvz0 = 0.0;
+
+
+                    RDouble deltux0_bk = -mul_bk * dudx;
+                    RDouble deltvy0_bk = -mul_bk * dvdy;
+                    RDouble deltwz0_bk = -mul_bk * dwdz;
+
+                    //! NCCR heatflux
+                    kcp = mul * n_delta;
+
+                    RDouble qx0 = -kcp * dtdx; RDouble qy0 = -kcp * dtdy; RDouble qz0 = -kcp * dtdz;
+
+                    //NCCR Simplification
+                    ttxxux0 = ttxxux0 * n_delta / np; ttxxvy0 = ttxxvy0 * n_delta / np; ttxxwz0 = ttxxwz0 * n_delta / np;
+                    ttyyux0 = ttyyux0 * n_delta / np; ttyyvy0 = ttyyvy0 * n_delta / np; ttyywz0 = ttyywz0 * n_delta / np;
+                    ttzzux0 = ttzzux0 * n_delta / np; ttzzvy0 = ttzzvy0 * n_delta / np; ttzzwz0 = ttzzwz0 * n_delta / np;
+                    ttxyvx0 = ttxyvx0 * n_delta / np; ttyxuy0 = ttyxuy0 * n_delta / np;
+                    ttxzwx0 = ttxzwx0 * n_delta / np; ttzxuz0 = ttzxuz0 * n_delta / np;
+                    ttyzwy0 = ttyzwy0 * n_delta / np; ttzyvz0 = ttzyvz0 * n_delta / np;
+
+                    ttxxvx0 = ttxxvx0 * n_delta / np; ttxxwx0 = ttxxwx0 * n_delta / np;
+                    ttyywy0 = ttyywy0 * n_delta / np; ttyyuy0 = ttyyuy0 * n_delta / np;
+                    ttzzuz0 = ttzzuz0 * n_delta / np; ttzzvz0 = ttzzvz0 * n_delta / np;
+
+                    deltux0_bk = deltux0_bk * n_delta / np;
+                    deltvy0_bk = deltvy0_bk * n_delta / np;
+                    deltwz0_bk = deltwz0_bk * n_delta / np;
+                    RDouble delt0_bk = deltux0_bk + deltvy0_bk + deltwz0_bk;
+
+                    qx0 = qx0 * n_delta / np / sqrt(temperature * e_nccr / 2.0);
+                    qy0 = qy0 * n_delta / np / sqrt(temperature * e_nccr / 2.0);
+                    qz0 = qz0 * n_delta / np / sqrt(temperature * e_nccr / 2.0);
+
+                    int sumstep = 0;
+
+                    int NCCRSOlVER = 4;
+                    if (NCCRSOlVER == 2)
+                    {
+                        //! diatomic molecules coupled calculation method
+                        diatsolver_CoupledCalculation(ttxxux0, ttxxvy0, ttxxwz0, ttyyux0, ttyyvy0, ttyywz0, ttzzux0, ttzzvy0, ttzzwz0, ttxyvx0, ttyxuy0, ttxzwx0, ttzxuz0, ttyzwy0, ttzyvz0, delt0_bk, qx0, qy0, qz0, ttxx, ttyy, ttzz, ttxy, ttxz, ttyz, delt_bk, qx, qy, qz, sumstep, c_nccr, 0.4);
+                    }
+                    else if (NCCRSOlVER == 4)
+                    {
+                        int ERROR_NCCR = 0;
+                        int successed = 1;
+                        diatsolver_NT(ttxxux0, ttxxvy0, ttxxwz0, ttyyux0, ttyyvy0, ttyywz0, ttzzux0, ttzzvy0, ttzzwz0, ttxyvx0, ttyxuy0, ttxzwx0, ttzxuz0, ttyzwy0, ttzyvz0, qx0, qy0, qz0, delt0_bk, ttxx, ttyy, ttzz, ttxy, ttxz, ttyz, qx, qy, qz, delt_bk, sumstep, c_nccr, 0.4, ERROR_NCCR, successed);
+
+                        if (isnan(ttxx) || isnan(ttyy) || isnan(ttxy) || isnan(ttxz) || isnan(ttyz) || isnan(qx) || isnan(qy) || isnan(qz) || isnan(delt_bk))
+                        {
+                            ERROR_NCCR = 1;
+                            diatsolver_NT(ttxxux0, ttxxvy0, ttxxwz0, ttyyux0, ttyyvy0, ttyywz0, ttzzux0, ttzzvy0, ttzzwz0, ttxyvx0, ttyxuy0, ttxzwx0, ttzxuz0, ttyzwy0, ttzyvz0, qx0, qy0, qz0, delt0_bk, ttxx, ttyy, ttzz, ttxy, ttxz, ttyz, qx, qy, qz, delt_bk, sumstep, c_nccr, 0.4, ERROR_NCCR, successed);
+                        }
+
+                        if (isnan(ttxx) || isnan(ttyy) || isnan(ttxy) || isnan(ttxz) || isnan(ttyz) || isnan(qx) || isnan(qy) || isnan(qz) || isnan(delt_bk))
+                        {
+                            ERROR_NCCR = 2;
+                            diatsolver_NT(ttxxux0, ttxxvy0, ttxxwz0, ttyyux0, ttyyvy0, ttyywz0, ttzzux0, ttzzvy0, ttzzwz0, ttxyvx0, ttyxuy0, ttxzwx0, ttzxuz0, ttyzwy0, ttzyvz0, qx0, qy0, qz0, delt0_bk, ttxx, ttyy, ttzz, ttxy, ttxz, ttyz, qx, qy, qz, delt_bk, sumstep, c_nccr, 0.4, ERROR_NCCR, successed);
+                        }
+
+                        if (isnan(ttxx) || isnan(ttyy) || isnan(ttxy) || isnan(ttxz) || isnan(ttyz) || isnan(qx) || isnan(qy) || isnan(qz) || isnan(delt_bk))
+                        {
+                            ERROR_NCCR = 3;
+                            diatsolver_NT(ttxxux0, ttxxvy0, ttxxwz0, ttyyux0, ttyyvy0, ttyywz0, ttzzux0, ttzzvy0, ttzzwz0, ttxyvx0, ttyxuy0, ttxzwx0, ttzxuz0, ttyzwy0, ttzyvz0, qx0, qy0, qz0, delt0_bk, ttxx, ttyy, ttzz, ttxy, ttxz, ttyz, qx, qy, qz, delt_bk, sumstep, c_nccr, 0.4, ERROR_NCCR, successed);
+                        }
+                        if (isnan(ttxx) || isnan(ttyy) || isnan(ttxy) || isnan(ttxz) || isnan(ttyz) || isnan(qx) || isnan(qy) || isnan(qz) || isnan(delt_bk) ||
+                            !successed)
+                        {
+                            //! cout << "Coupled and Newton method is useless!" << endl;
+                            diatsolver_CoupledCalculation(ttxxux0, ttxxvy0, ttxxwz0, ttyyux0, ttyyvy0, ttyywz0, ttzzux0, ttzzvy0, ttzzwz0, ttxyvx0, ttyxuy0, ttxzwx0, ttzxuz0, ttyzwy0, ttzyvz0, delt0_bk, qx0, qy0, qz0, ttxx, ttyy, ttzz, ttxy, ttxz, ttyz, delt_bk, qx, qy, qz, sumstep, c_nccr, 0.4);
+                        }
+                    }
+
+
+                    //restore
+                    ttxx = -ttxx * np / n_delta;
+                    ttyy = -ttyy * np / n_delta;
+                    ttzz = -ttzz * np / n_delta;
+                    ttxy = -ttxy * np / n_delta;
+                    ttxz = -ttxz * np / n_delta;
+                    ttyz = -ttyz * np / n_delta;
+
+                    delt_bk = -delt_bk * np / n_delta;
+
+                    qx = qx / n_delta * np * sqrt(temperature * e_nccr / 2.0);
+                    qy = qy / n_delta * np * sqrt(temperature * e_nccr / 2.0);
+                    qz = qz / n_delta * np * sqrt(temperature * e_nccr / 2.0);
+
+                    heatFlux = -1 * (normalComponentX * qx + normalComponentY * qy + normalComponentZ * qz) * e_nccr;
+
+                    ttxx = ttxx + delt_bk;
+                    ttyy = ttyy + delt_bk;
+                    ttzz = ttzz + delt_bk;
+                    //! NCCR correct end.
+
+                    wallFluxes[IR] = 0.0;
+                    wallFluxes[IRU] = (normalComponentX * ttxx + normalComponentY * ttxy + normalComponentZ * ttxz) * surfaceArea;
+                    wallFluxes[IRV] = (normalComponentX * ttxy + normalComponentY * ttyy + normalComponentZ * ttyz) * surfaceArea;
+                    wallFluxes[IRW] = (normalComponentX * ttxz + normalComponentY * ttyz + normalComponentZ * ttzz) * surfaceArea;
+                    wallFluxes[IRE] = wallVariables[IU] * wallFluxes[IRU] + wallVariables[IV] * wallFluxes[IRV] + wallVariables[IW] * wallFluxes[IRW] + heatFlux/n_delta;
+
+                    for (int m = 0; m < nLaminar - nIonizationFlag; ++m)
+                    {
+                        faceFluxes(i, j, k, m) = -oRefReNumber * wallFluxes[m];
+#ifdef USE_ERROR_DATA_DEBUG
+                        if (isErrorData(faceFluxes(i, j, k, m)))
+                        {
+                            int zoneID = grid->GetZoneID();
+                            PrintToWindow(" zoneID = ", zoneID, "i = ", i, "j = ", j, "k = ", k, "m = ", m);
+                            TK_Exit::ExceptionExit("This is in function CorrectViscousFlux", true);
+                        }
+#endif
+                    }
+
+                    //! Next grid cell.
+                    ++indexOfCell;
+                }//! end.
+            }//! end.
+        }//! k end.
+        ++indexOfWall; //! Next surface region.
+    }//! nBCRegion end.
+
+    delete[]wallVariables;    wallVariables = NULL;
+    delete[]wallFluxes;    wallFluxes = NULL;
+}
+
+void NCCRSolverStruct::CompVisFluxnew(Grid *gridIn, Gradient *gradient_uvwt, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &graduvwtx = gradient_uvwt->GetGradX()->GetField_STR();
+    RDouble4D &graduvwty = gradient_uvwt->GetGradY()->GetField_STR();
+    RDouble4D &graduvwtz = gradient_uvwt->GetGradZ()->GetField_STR();
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+
+    RDouble refGama = parameters->GetRefGama();
+
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int nrokplus = GlobalDataBase::GetIntParaFromDB("nrokplus");
+
+    RDouble4D *q_turb, *aniss;
+    if (nrokplus > 0)
+    {
+        q_turb = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_turb"));
+        aniss = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("aniss"));
+    }
+
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+
+    RDouble *qlr = new RDouble[nEquation];
+    RDouble *fslr = new RDouble[numberOfSpecies];
+    RDouble *dfsdx = new RDouble[numberOfSpecies];
+    RDouble *dfsdy = new RDouble[numberOfSpecies];
+    RDouble *dfsdz = new RDouble[numberOfSpecies];
+    RDouble *fvis = new RDouble[nEquation];
+    RDouble *work = new RDouble[nEquation];
+
+    int il1, jl1, kl1;
+    GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+    int iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd;
+    grid->GetFaceIterationIndex(iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd, iSurface);
+
+    using namespace IDX;
+
+    for (int k = kFaceStart; k <= kFaceEnd; ++k)
+    {
+        for (int j = jFaceStart; j <= jFaceEnd; ++j)
+        {
+            for (int i = iFaceStart; i <= iFaceEnd; ++i)
+            {
+                int il = i + il1;
+                int jl = j + jl1;
+                int kl = k + kl1;
+
+                //! Note that if we use iSurface,there must be no omission.
+                RDouble nx = xfv(il, jl, kl, iSurface);
+                RDouble ny = yfv(il, jl, kl, iSurface);
+                RDouble nz = zfv(il, jl, kl, iSurface);
+
+                RDouble um = half * (q(il, jl, kl, IU) + q(i, j, k, IU));
+                RDouble vm = half * (q(il, jl, kl, IV) + q(i, j, k, IV));
+                RDouble wm = half * (q(il, jl, kl, IW) + q(i, j, k, IW));
+
+                RDouble mul = half * (viscousLaminar(il, jl, kl) + viscousLaminar(i, j, k));
+                RDouble mut = half * (viscousTurbulence(il, jl, kl) + viscousTurbulence(i, j, k));
+                //mut = 0.0;
+                RDouble vis = mul + mut;
+
+                RDouble dudx = graduvwtx(il, jl, kl, 0);
+                RDouble dudy = graduvwty(il, jl, kl, 0);
+                RDouble dudz = graduvwtz(il, jl, kl, 0);
+
+                RDouble dvdx = graduvwtx(il, jl, kl, 1);
+                RDouble dvdy = graduvwty(il, jl, kl, 1);
+                RDouble dvdz = graduvwtz(il, jl, kl, 1);
+
+                RDouble dwdx = graduvwtx(il, jl, kl, 2);
+                RDouble dwdy = graduvwty(il, jl, kl, 2);
+                RDouble dwdz = graduvwtz(il, jl, kl, 2);
+
+                RDouble dtdx = graduvwtx(il, jl, kl, 3);
+                RDouble dtdy = graduvwty(il, jl, kl, 3);
+                RDouble dtdz = graduvwtz(il, jl, kl, 3);
+
+                RDouble qx = 0.0;
+                RDouble qy = 0.0;
+                RDouble qz = 0.0;
+
+                RDouble kcp = (mul * oPrandtlLaminar + mut * oPrandtlTurbulence) * specificHeatAtConstantPressure;
+
+                qx += kcp * dtdx;
+                qy += kcp * dtdy;
+                qz += kcp * dtdz;
+
+                RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+                //! Stress components.
+                RDouble txx = vis * (two * dudx - divv2p3);
+                RDouble tyy = vis * (two * dvdy - divv2p3);
+                RDouble tzz = vis * (two * dwdz - divv2p3);
+                RDouble txy = vis * (dudy + dvdx);
+                RDouble txz = vis * (dudz + dwdx);
+                RDouble tyz = vis * (dvdz + dwdy);
+
+                fvis[IR] = 0.0;
+                fvis[IDX::IRU] = nx * txx + ny * txy + nz * txz;
+                fvis[IDX::IRV] = nx * txy + ny * tyy + nz * tyz;
+                fvis[IDX::IRW] = nx * txz + ny * tyz + nz * tzz;
+                fvis[IDX::IRE] = um * fvis[IDX::IRU] + vm * fvis[IDX::IRV] + wm * fvis[IDX::IRW] + (nx * qx + ny * qy + nz * qz);
+
+                for (int m = 0; m < nLaminar; ++m)
+                {
+                    flux(il, jl, kl, m) = -oRefReNumber * fvis[m];
+                }
+            }
+        }
+    }
+    delete [] fvis;     fvis  = NULL;
+    delete [] work;     work  = NULL;
+    delete [] qlr;      qlr   = NULL;
+    delete [] fslr;     fslr  = NULL;
+    delete [] dfsdx;    dfsdx = NULL;
+    delete [] dfsdy;    dfsdy = NULL;
+    delete [] dfsdz;    dfsdz = NULL;
+}
+
+void NCCRSolverStruct::CompVisFluxnew(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &gradqx = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D &gradqy = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D &gradqz = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+
+    RDouble4D &gradtx = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D &gradty = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D &gradtz = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceZ"));
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    RDouble refGama = parameters->GetRefGama();
+    int nElectronIndex = parameters->GetIndexOfElectron();
+    int nTurblenceForChemical = parameters->GetnTurblenceForChemical();
+    int nEnergyRecycle = parameters->GetnEnergyRecycle();
+
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int nrokplus = GlobalDataBase::GetIntParaFromDB("nrokplus");
+    RDouble4D *heatConductivity = 0, *massDiffusionCoef = 0, *speciesEnthalpy = 0, *speciesEvs = 0, *speciesEes = 0;
+    RDouble3D *totalCp = 0;
+    if (nChemical > 0)
+    {
+        heatConductivity = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("lambda"));
+        massDiffusionCoef = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rhoD"));
+        speciesEnthalpy = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("hSpecies"));
+        totalCp = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCp"));
+
+        speciesEvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEvs"));
+        speciesEes = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEes"));
+    }
+    RDouble kcp[3] = { 0 }, heatFlux = 0.0, dcsdx = 0.0, dcsdy = 0.0, dcsdz = 0.0, hs = 0.0, roDs = 0.0;
+    RDouble Tv = 0.0, Te = 0.0, energy = 0.0;
+    RDouble4D *q_turb = 0, *aniss = 0;
+    if (nrokplus > 0)
+    {
+        q_turb = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_turb"));
+        aniss = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("aniss"));
+    }
+
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+    RDouble *qlr = new RDouble[nEquation]();
+    RDouble *fslr = new RDouble[numberOfSpecies]();
+    RDouble *dfsdx = new RDouble[numberOfSpecies]();
+    RDouble *dfsdy = new RDouble[numberOfSpecies]();
+    RDouble *dfsdz = new RDouble[numberOfSpecies]();
+    RDouble *fvis = new RDouble[nEquation]();
+    RDouble *work = new RDouble[nEquation]();
+    RDouble *vibrationEnergy = new RDouble[numberOfSpecies]();
+    RDouble *electronEnergy = new RDouble[numberOfSpecies]();
+    //RDouble primVars[MAX_SPECIES_NUM], speciesEtr[MAX_SPECIES_NUM], speciesH[MAX_SPECIES_NUM], totalEtr, totalEv, totalH0;
+    RDouble wallTemperature = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+    RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+    RDouble twRatio = 1.0;
+    if (wallTemperature > 0.0)
+    {
+        twRatio = wallTemperature / (refDimensionalTemperature * (1.0 + 0.2 * refMachNumber * refMachNumber * 0.85));
+    }
+    twRatio = sqrt(twRatio);
+
+    int iFaceStart = 0, iFaceEnd = 0, jFaceStart = 0, jFaceEnd = 0, kFaceStart = 0, kFaceEnd = 0;
+    grid->GetFaceIterationIndex(iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd, iSurface);
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    using namespace IDX;
+
+    for (int k = kFaceStart; k <= kFaceEnd; ++ k)
+    {
+        for (int j = jFaceStart; j <= jFaceEnd; ++ j)
+        {
+            for (int i = iFaceStart; i <= iFaceEnd; ++ i)
+            {
+                int il, jl, kl;
+                grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                //! Note that if we use iSurface,there must be no omission. obtain the present point location in three surfaces.
+                RDouble nx = xfv(il, jl, kl, iSurface);
+                RDouble ny = yfv(il, jl, kl, iSurface);
+                RDouble nz = zfv(il, jl, kl, iSurface);
+
+                //Average of two points.
+                RDouble um = half * (q(il, jl, kl, IU) + q(i, j, k, IU));
+                RDouble vm = half * (q(il, jl, kl, IV) + q(i, j, k, IV));
+                RDouble wm = half * (q(il, jl, kl, IW) + q(i, j, k, IW));
+
+                RDouble mul = half * (viscousLaminar(il, jl, kl) + viscousLaminar(i, j, k));
+                RDouble mut = half * (viscousTurbulence(il, jl, kl) + viscousTurbulence(i, j, k));
+                RDouble vis = mul + mut;
+
+                RDouble dudx = gradqx(il, jl, kl, IU);
+                RDouble dudy = gradqy(il, jl, kl, IU);
+                RDouble dudz = gradqz(il, jl, kl, IU);
+
+                RDouble dvdx = gradqx(il, jl, kl, IV);
+                RDouble dvdy = gradqy(il, jl, kl, IV);
+                RDouble dvdz = gradqz(il, jl, kl, IV);
+
+                RDouble dwdx = gradqx(il, jl, kl, IW);
+                RDouble dwdy = gradqy(il, jl, kl, IW);
+                RDouble dwdz = gradqz(il, jl, kl, IW);
+
+                RDouble dtdx = gradtx(il, jl, kl, ITT);
+                RDouble dtdy = gradty(il, jl, kl, ITT);
+                RDouble dtdz = gradtz(il, jl, kl, ITT);
+
+                if (nChemical == 0)
+                {
+                    kcp[ITT] = (mul * oPrandtlLaminar + mut * oPrandtlTurbulence) * specificHeatAtConstantPressure;
+
+                    heatFlux = kcp[ITT] * (nx * dtdx + ny * dtdy + nz * dtdz);
+                }
+                else
+                {
+                    kcp[ITT] = 0.5 * ((*heatConductivity)(i, j, k, ITT) + (*heatConductivity)(il, jl, kl, ITT));
+                    if (nTurblenceForChemical == 0)
+                    {
+                        kcp[ITT] *= (1.0 + mut * oPrandtlTurbulence / (mul * oPrandtlLaminar + SMALL));//! modified by dms.
+                    }
+                    else
+                    {
+                        kcp[ITT] += mut * oPrandtlTurbulence * half * ((*totalCp)(il, jl, kl) + (*totalCp)(i, j, k));  //! modified by dms. 
+                    }
+
+                    heatFlux = kcp[ITT] * (nx * dtdx + ny * dtdy + nz * dtdz);
+
+                    for (int it = 1; it < nTemperatureModel; ++ it)
+                    {
+                        dtdx = gradtx(il, jl, kl, it);
+                        dtdy = gradty(il, jl, kl, it);
+                        dtdz = gradtz(il, jl, kl, it);
+                        kcp[it] = 0.5 * ((*heatConductivity)(i, j, k, it) + (*heatConductivity)(il, jl, kl, it)); // * kturb; //! modified by dms. 
+                        fvis[nLaminar + it] = kcp[it] * (nx * dtdx + ny * dtdy + nz * dtdz);
+                        heatFlux += fvis[nLaminar + it];
+                    }
+
+                    //! Obtain the gradient of species.
+                    for (int s = 0; s < numberOfSpecies; ++ s)
+                    {
+                        dcsdx = gradqx(il, jl, kl, nNSEquation + s);
+                        dcsdy = gradqy(il, jl, kl, nNSEquation + s);
+                        dcsdz = gradqz(il, jl, kl, nNSEquation + s);
+                        hs = 0.5 * ((*speciesEnthalpy)(i, j, k, s) + (*speciesEnthalpy)(il, jl, kl, s));
+                        roDs = 0.5 * ((*massDiffusionCoef)(i, j, k, s) + (*massDiffusionCoef)(il, jl, kl, s));    //! modified by dms.
+
+                        fvis[nNSEquation + s] = roDs * (nx * dcsdx + ny * dcsdy + nz * dcsdz);
+                        heatFlux += hs * fvis[nNSEquation + s];
+                    }
+
+                    if (nTemperatureModel == 2)
+                    {
+                        if (nEnergyRecycle == 0)
+                        {
+                            Tv = 0.5 * (t(i, j, k, ITV) + t(il, jl, kl, ITV));
+                            //! Compute the vibration and electron energies.
+                            gas->ComputeVibrationEnergy(Tv, vibrationEnergy);
+                            gas->ComputeElectronEnergy(Tv, electronEnergy);
+
+                            for (int s = 0; s < numberOfSpecies; ++ s)
+                            {
+                                energy = vibrationEnergy[s] + electronEnergy[s];
+                                fvis[nLaminar + 1] += energy * fvis[nNSEquation + s];
+                            }
+                        }
+                        else
+                        {
+                            for (int s = 0; s < numberOfSpecies; ++ s)
+                            {
+                                energy = (*speciesEvs)(i, j, k, s) + (*speciesEvs)(il, jl, kl, s);
+                                energy += (*speciesEes)(i, j, k, s) + (*speciesEes)(il, jl, kl, s);
+                                fvis[nLaminar + 1] += 0.5 * energy * fvis[nNSEquation + s];
+                            }
+                        }
+
+                    }
+                    else if (nTemperatureModel == 3)
+                    {
+                        if (nEnergyRecycle == 0)
+                        {
+                            Tv = 0.5 * (t(i, j, k, ITV) + t(il, jl, kl, ITV));
+                            Te = 0.5 * (t(i, j, k, ITE) + t(il, jl, kl, ITE));
+                            //! Compute the vibration and electron energies.
+                            gas->ComputeVibrationEnergy(Tv, vibrationEnergy);
+                            gas->ComputeElectronEnergy(Te, electronEnergy);
+                            for (int s = 0; s < numberOfSpecies; ++ s)
+                            {
+                                fvis[nLaminar + 1] += vibrationEnergy[s] * fvis[nNSEquation + s];
+                                fvis[nLaminar + 2] += electronEnergy[s] * fvis[nNSEquation + s];
+                            }
+                        }
+                        else
+                        {
+                            for (int s = 0; s < numberOfSpecies; ++ s)
+                            {
+                                fvis[nLaminar + 1] += 0.5 * ((*speciesEvs)(i, j, k, s) + (*speciesEvs)(il, jl, kl, s)) * fvis[nNSEquation + s];
+                                fvis[nLaminar + 2] += 0.5 * ((*speciesEes)(i, j, k, s) + (*speciesEes)(il, jl, kl, s)) * fvis[nNSEquation + s];
+                            }
+                        }
+                    }
+                    fvis[nLaminar] = 0.0;
+                    if (nElectronIndex >= 0)
+                    {
+                        fvis[nLaminar - 1] = 0.0;
+                    }
+                }
+
+                RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+                //! Stress components.
+                RDouble txx = vis * (two * dudx - divv2p3);
+                RDouble tyy = vis * (two * dvdy - divv2p3);
+                RDouble tzz = vis * (two * dwdz - divv2p3);
+                RDouble txy = vis * (dudy + dvdx);
+                RDouble txz = vis * (dudz + dwdx);
+                RDouble tyz = vis * (dvdz + dwdy);
+
+                fvis[IR] = 0.0;
+                fvis[IDX::IRU] = nx * txx + ny * txy + nz * txz;
+                fvis[IDX::IRV] = nx * txy + ny * tyy + nz * tyz;
+                fvis[IDX::IRW] = nx * txz + ny * tyz + nz * tzz;
+                fvis[IDX::IRE] = um * fvis[IDX::IRU] + vm * fvis[IDX::IRV] + wm * fvis[IDX::IRW] + heatFlux;
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    flux(il, jl, kl, m) = -oRefReNumber * fvis[m];
+#ifdef USE_ERROR_DATA_DEBUG
+                    if (isErrorData(flux(il, jl, kl, m)))
+                    {
+                        int zoneID = grid->GetZoneID();
+                        PrintToWindow(" zoneID = ", zoneID, "il = ", il, "jl = ", jl, "kl = ", kl, "m = ", m);
+                        TK_Exit::ExceptionExit("This is in function CompVisFluxnew", true);
+                    }
+#endif
+                }
+            }
+        }
+    }
+
+    delete[] fvis;    fvis = NULL;
+    delete[] work;    work = NULL;
+    delete[] qlr;     qlr = NULL;
+    delete[] fslr;    fslr = NULL;
+    delete[] dfsdx;    dfsdx = NULL;
+    delete[] dfsdy;    dfsdy = NULL;
+    delete[] dfsdz;    dfsdz = NULL;
+    delete[] vibrationEnergy;    vibrationEnergy = NULL;
+    delete[] electronEnergy;    electronEnergy = NULL;
+}
+
+void NCCRSolverStruct::CompVisFluxNCCRMonoatomic(Grid* gridIn, FieldProxy* fluxProxy, int iSurface)
+{
+
+    
+    StructGrid* grid = StructGridCast(gridIn);
+
+    RDouble4D& gradqx = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D& gradqy = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D& gradqz = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+
+    RDouble4D& gradtx = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D& gradty = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D& gradtz = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("gradTemperatureFaceZ"));
+
+    RDouble4D& flux = fluxProxy->GetField_STR();
+    RDouble4D& xfv = *(grid->GetFaceVectorX());
+    RDouble4D& yfv = *(grid->GetFaceVectorY());
+    RDouble4D& zfv = *(grid->GetFaceVectorZ());
+
+    RDouble4D& q = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("q"));
+    RDouble4D& t = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("t"));
+    RDouble3D& viscousLaminar = *reinterpret_cast <RDouble3D*> (grid->GetDataPtr("visl"));
+    RDouble3D& viscousTurbulence = *reinterpret_cast <RDouble3D*> (grid->GetDataPtr("vist"));
+
+
+    Param_NSSolverStruct* parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    RDouble refGama = parameters->GetRefGama();
+    
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    RDouble c_nccr = 1.0179; 
+    RDouble4D* heatConductivity = 0;
+    RDouble kcp[3] = { 0 }, heatFlux = 0.0;
+
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+    RDouble* fvis = new RDouble[nEquation]();
+
+    RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+    RDouble e_nccr = 1 * oPrandtlLaminar / ((refGama - 1.0) * refMachNumber * refMachNumber);
+    RDouble n_delta = 1 * oRefReNumber;
+    
+    //! cout << "refDimensionalTemperature is " << refDimensionalTemperature << endl;
+
+    //! refrence viscous coefficient calculate.
+    //! RDouble pows = 0.75;
+    //! RDouble refmiu = 0.00002272;
+    //! RDouble refPowTemperature = 300;
+    //! RDouble inflowViscousCoefficient = refmiu * pow((refDimensionalTemperature / refPowTemperature), pows);
+
+    int iFaceStart = 0, iFaceEnd = 0, jFaceStart = 0, jFaceEnd = 0, kFaceStart = 0, kFaceEnd = 0;
+    grid->GetFaceIterationIndex(iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd, iSurface);
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    using namespace IDX;
+    
+    for (int k = kFaceStart; k <= kFaceEnd; ++k)
+    {
+        for (int j = jFaceStart; j <= jFaceEnd; ++j)
+        {
+            for (int i = iFaceStart; i <= iFaceEnd; ++i)
+            {
+                int il, jl, kl;
+                grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                //! Note that if we use iSurface,there must be no omission.
+                RDouble nx = xfv(il, jl, kl, iSurface);
+                RDouble ny = yfv(il, jl, kl, iSurface);
+                RDouble nz = zfv(il, jl, kl, iSurface);
+
+                // write in data
+                RDouble um = half * (q(il, jl, kl, IU) + q(i, j, k, IU));
+                RDouble vm = half * (q(il, jl, kl, IV) + q(i, j, k, IV));
+                RDouble wm = half * (q(il, jl, kl, IW) + q(i, j, k, IW));
+
+                //! The np is the nondimensional pressure.
+                RDouble np = half * (q(il, jl, kl, IP) + q(i, j, k, IP));
+                
+                RDouble temperature = half * (t(il, jl, kl, ITT) + t(i, j, k, ITT));
+
+                //! RDouble mul = refmiu * pow((temperature / refPowTemperature), pows) / inflowViscousCoefficient;
+                
+                RDouble mul = half * (viscousLaminar(il, jl, kl) + viscousLaminar(i, j, k));
+                //! RDouble mut = half * (viscousTurbulence(il, jl, kl) + viscousTurbulence(i, j, k));
+                //! RDouble vis = mul + mut;               
+
+                RDouble dudx = gradqx(il, jl, kl, IU);
+                RDouble dudy = gradqy(il, jl, kl, IU);
+                RDouble dudz = gradqz(il, jl, kl, IU);
+
+                RDouble dvdx = gradqx(il, jl, kl, IV);
+                RDouble dvdy = gradqy(il, jl, kl, IV);
+                RDouble dvdz = gradqz(il, jl, kl, IV);
+
+                RDouble dwdx = gradqx(il, jl, kl, IW);
+                RDouble dwdy = gradqy(il, jl, kl, IW);
+                RDouble dwdz = gradqz(il, jl, kl, IW);
+
+                RDouble dtdx = gradtx(il, jl, kl, ITT);
+                RDouble dtdy = gradty(il, jl, kl, ITT);
+                RDouble dtdz = gradtz(il, jl, kl, ITT);
+
+                RDouble ttxx = 0.0, ttyy = 0.0, ttzz = 0.0, ttxy = 0.0, ttxz = 0.0, ttyz = 0.0, qx = 0.0, qy = 0.0, qz = 0;
+
+
+                //NCCR stress
+                RDouble ttxxux0 = - 4.0 / 3.0 * mul * dudx; RDouble ttxxvy0 = 2.0 / 3.0 * mul * dvdy; RDouble ttxxwz0 = 2.0 / 3.0 * mul * dwdz;
+                RDouble ttyyux0 = 2.0 / 3.0 * mul * dudx; RDouble ttyyvy0 = -4.0 / 3.0 * mul * dvdy; RDouble ttyywz0 = 2.0 / 3.0 * mul * dwdz;
+                RDouble ttzzux0 = 2.0 / 3.0 * mul * dudx; RDouble ttzzvy0 = 2.0 / 3.0 * mul * dvdy; RDouble ttzzwz0 = -4.0 / 3.0 * mul * dwdz;
+                RDouble ttxyvx0 = -mul * dvdx; RDouble ttyxuy0 = -mul * dudy;
+                RDouble ttxzwx0 = -mul * dwdx; RDouble ttzxuz0 = -mul * dudz;
+                RDouble ttyzwy0 = -mul * dwdy; RDouble ttzyvz0 = -mul * dvdz;
+
+                RDouble ttxxvx0 = 0.0; RDouble ttxxwx0 = 0.0;
+                RDouble ttyywy0 = 0.0; RDouble ttyyuy0 = 0.0;
+                RDouble ttzzuz0 = 0.0; RDouble ttzzvz0 = 0.0;
+
+                //! NCCR heatflux
+                kcp[ITT] = n_delta * mul; 
+
+                RDouble qx0 = -kcp[ITT] * dtdx; RDouble qy0 = -kcp[ITT] * dtdy; RDouble qz0 = -kcp[ITT] * dtdz;
+
+                //NCCR Simplification
+                ttxxux0 = ttxxux0 * n_delta / np; ttxxvy0 = ttxxvy0 * n_delta / np; ttxxwz0 = ttxxwz0 * n_delta / np;
+                ttyyux0 = ttyyux0 * n_delta / np; ttyyvy0 = ttyyvy0 * n_delta / np; ttyywz0 = ttyywz0 * n_delta / np;
+                ttzzux0 = ttzzux0 * n_delta / np; ttzzvy0 = ttzzvy0 * n_delta / np; ttzzwz0 = ttzzwz0 * n_delta / np;
+                ttxyvx0 = ttxyvx0 * n_delta / np; ttyxuy0 = ttyxuy0 * n_delta / np;
+                ttxzwx0 = ttxzwx0 * n_delta / np; ttzxuz0 = ttzxuz0 * n_delta / np;
+                ttyzwy0 = ttyzwy0 * n_delta / np; ttzyvz0 = ttzyvz0 * n_delta / np;
+
+                ttxxvx0 = ttxxvx0 * n_delta / np; ttxxwx0 = ttxxwx0 * n_delta / np;
+                ttyywy0 = ttyywy0 * n_delta / np; ttyyuy0 = ttyyuy0 * n_delta / np;
+                ttzzuz0 = ttzzuz0 * n_delta / np; ttzzvz0 = ttzzvz0 * n_delta / np;
+
+                qx0 = qx0 * n_delta  / np / sqrt(temperature * e_nccr / 2.0);
+                qy0 = qy0 * n_delta  / np / sqrt(temperature * e_nccr / 2.0);
+                qz0 = qz0 * n_delta  / np / sqrt(temperature * e_nccr / 2.0);
+
+                int sumstep = 0;
+                int NCCRSolver = 2;
+                int ERROR_NCCR = 0;
+                if (NCCRSolver == 2)
+                {
+                    //! monoatomic molecules coupled calculation method
+                    monosolver_CoupledCalculation(ttxxux0, ttxxvy0, ttxxwz0, ttyyux0, ttyyvy0, ttyywz0, ttzzux0, ttzzvy0, ttzzwz0, ttxyvx0, ttyxuy0, ttxzwx0, ttzxuz0, ttyzwy0, ttzyvz0, qx0, qy0, qz0, ttxx, ttyy, ttzz, ttxy, ttxz, ttyz, qx, qy, qz, sumstep, c_nccr);
+                }
+                else
+                {
+                    monosolver_NT(ttxxux0, ttxxvy0, ttxxwz0, ttyyux0, ttyyvy0, ttyywz0, ttzzux0, ttzzvy0, ttzzwz0, ttxyvx0, ttyxuy0, ttxzwx0, ttzxuz0, ttyzwy0, ttzyvz0, qx0, qy0, qz0, ttxx, ttyy, ttzz, ttxy, ttxz, ttyz, qx, qy, qz, sumstep, c_nccr, ERROR_NCCR);
+                }
+                //restore
+                ttxx = -1 * ttxx * np / n_delta ;
+                ttyy = -1 * ttyy * np / n_delta ;
+                ttzz = -1 * ttzz * np / n_delta ;
+                ttxy = -1 * ttxy * np / n_delta ;
+                ttxz = -1 * ttxz * np / n_delta ;
+                ttyz = -1 * ttyz * np / n_delta ;
+
+                qx =  qx / n_delta * np * sqrt(temperature * e_nccr / 2.0) ;
+                qy =  qy / n_delta * np * sqrt(temperature * e_nccr / 2.0) ;
+                qz =  qz / n_delta * np * sqrt(temperature * e_nccr / 2.0) ;
+
+                heatFlux = -1 * (nx * qx + ny * qy + nz * qz)* e_nccr;
+
+                fvis[IR] = 0.0;
+                fvis[IDX::IRU] = nx * ttxx + ny * ttxy + nz * ttxz;
+                fvis[IDX::IRV] = nx * ttxy + ny * ttyy + nz * ttyz;
+                fvis[IDX::IRW] = nx * ttxz + ny * ttyz + nz * ttzz;
+                fvis[IDX::IRE] = um * fvis[IDX::IRU] + vm * fvis[IDX::IRV] + wm * fvis[IDX::IRW] + heatFlux / n_delta;
+
+               
+                for (int m = 0; m < nEquation; ++m)
+                {
+                    flux(il, jl, kl, m) = -oRefReNumber * fvis[m];
+#ifdef USE_ERROR_DATA_DEBUG
+                    if (isErrorData(flux(il, jl, kl, m)))
+                    {
+                        int zoneID = grid->GetZoneID();
+                        PrintToWindow(" zoneID = ", zoneID, "il = ", il, "jl = ", jl, "kl = ", kl, "m = ", m);
+                        TK_Exit::ExceptionExit("This is in function CompVisFluxnew", true);
+                    }
+#endif  
+                }
+            }
+        }
+    }
+    
+    delete[] fvis;    fvis = NULL;
+}
+
+void NCCRSolverStruct::CompVisFluxNCCRDiatomic(Grid* gridIn, FieldProxy* fluxProxy, int iSurface)
+{
+
+    StructGrid* grid = StructGridCast(gridIn);
+
+    RDouble4D& gradqx = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D& gradqy = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D& gradqz = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+
+    RDouble4D& gradtx = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D& gradty = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D& gradtz = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("gradTemperatureFaceZ"));
+
+    RDouble4D& flux = fluxProxy->GetField_STR();
+    RDouble4D& xfv = *(grid->GetFaceVectorX());
+    RDouble4D& yfv = *(grid->GetFaceVectorY());
+    RDouble4D& zfv = *(grid->GetFaceVectorZ());
+
+    RDouble4D& q = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("q"));
+    RDouble4D& t = *reinterpret_cast <RDouble4D*> (grid->GetDataPtr("t"));
+    RDouble3D& viscousLaminar = *reinterpret_cast <RDouble3D*> (grid->GetDataPtr("visl"));
+    RDouble3D& viscousTurbulence = *reinterpret_cast <RDouble3D*> (grid->GetDataPtr("vist"));
+
+    Param_NSSolverStruct* parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    RDouble refGama = parameters->GetRefGama();
+
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+    RDouble fb_nccr = 0.8;
+    RDouble c_nccr = 1.0179;
+
+    //int nrokplus = GlobalDataBase::GetIntParaFromDB("nrokplus");
+    RDouble4D* heatConductivity = 0, * massDiffusionCoef = 0, * speciesEnthalpy = 0, * speciesEvs = 0, * speciesEes = 0;
+
+    RDouble kcp[3] = { 0 }, heatFlux = 0.0;
+
+    RDouble* fvis = new RDouble[nEquation]();
+
+    RDouble e_nccr = oPrandtlLaminar / ((refGama - 1.0) * refMachNumber * refMachNumber);
+    RDouble n_delta = oRefReNumber;
+
+    int iFaceStart = 0, iFaceEnd = 0, jFaceStart = 0, jFaceEnd = 0, kFaceStart = 0, kFaceEnd = 0;
+    grid->GetFaceIterationIndex(iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd, iSurface);
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    using namespace IDX;
+
+    for (int k = kFaceStart; k <= kFaceEnd; ++k)
+    {
+        for (int j = jFaceStart; j <= jFaceEnd; ++j)
+        {
+            for (int i = iFaceStart; i <= iFaceEnd; ++i)
+            {
+                int il, jl, kl;
+                grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                //! Note that if we use iSurface,there must be no omission.
+                RDouble nx = xfv(il, jl, kl, iSurface);
+                RDouble ny = yfv(il, jl, kl, iSurface);
+                RDouble nz = zfv(il, jl, kl, iSurface);
+
+                // write in data
+                RDouble um = half * (q(il, jl, kl, IU) + q(i, j, k, IU));
+                RDouble vm = half * (q(il, jl, kl, IV) + q(i, j, k, IV));
+                RDouble wm = half * (q(il, jl, kl, IW) + q(i, j, k, IW));
+
+                //! The np is the nondimensional pressure.
+                RDouble np = half * (q(il, jl, kl, IP) + q(i, j, k, IP));
+
+                RDouble temperature = half * (t(il, jl, kl, ITT) + t(i, j, k, ITT));
+
+                RDouble mul = half * (viscousLaminar(il, jl, kl) + viscousLaminar(i, j, k));
+                RDouble mul_bk = fb_nccr * mul;
+
+                RDouble dudx = gradqx(il, jl, kl, IU);
+                RDouble dudy = gradqy(il, jl, kl, IU);
+                RDouble dudz = gradqz(il, jl, kl, IU);
+
+                RDouble dvdx = gradqx(il, jl, kl, IV);
+                RDouble dvdy = gradqy(il, jl, kl, IV);
+                RDouble dvdz = gradqz(il, jl, kl, IV);
+
+                RDouble dwdx = gradqx(il, jl, kl, IW);
+                RDouble dwdy = gradqy(il, jl, kl, IW);
+                RDouble dwdz = gradqz(il, jl, kl, IW);
+
+                RDouble dtdx = gradtx(il, jl, kl, ITT);
+                RDouble dtdy = gradty(il, jl, kl, ITT);
+                RDouble dtdz = gradtz(il, jl, kl, ITT);
+
+                RDouble ttxx = 0.0, ttyy = 0.0, ttzz = 0.0, ttxy = 0.0, ttxz = 0.0, ttyz = 0.0, qx = 0.0, qy = 0.0, qz = 0.0, delt_bk = 0.0;
+
+
+                //NCCR stress
+                RDouble ttxxux0 = -4.0 / 3.0 * mul * dudx; RDouble ttxxvy0 = 2.0 / 3.0 * mul * dvdy; RDouble ttxxwz0 = 2.0 / 3.0 * mul * dwdz;
+                RDouble ttyyux0 = 2.0 / 3.0 * mul * dudx; RDouble ttyyvy0 = -4.0 / 3.0 * mul * dvdy; RDouble ttyywz0 = 2.0 / 3.0 * mul * dwdz;
+                RDouble ttzzux0 = 2.0 / 3.0 * mul * dudx; RDouble ttzzvy0 = 2.0 / 3.0 * mul * dvdy; RDouble ttzzwz0 = -4.0 / 3.0 * mul * dwdz;
+                RDouble ttxyvx0 = -mul * dvdx; RDouble ttyxuy0 = -mul * dudy;
+                RDouble ttxzwx0 = -mul * dwdx; RDouble ttzxuz0 = -mul * dudz;
+                RDouble ttyzwy0 = -mul * dwdy; RDouble ttzyvz0 = -mul * dvdz;
+
+                RDouble ttxxvx0 = 0.0; RDouble ttxxwx0 = 0.0;
+                RDouble ttyywy0 = 0.0; RDouble ttyyuy0 = 0.0;
+                RDouble ttzzuz0 = 0.0; RDouble ttzzvz0 = 0.0;
+
+
+                RDouble deltux0_bk = -mul_bk * dudx;
+                RDouble deltvy0_bk = -mul_bk * dvdy;
+                RDouble deltwz0_bk = -mul_bk * dwdz;
+
+                //! NCCR heatflux
+                kcp[ITT] = mul * e_nccr * n_delta;
+
+                RDouble qx0 = -kcp[ITT] * dtdx; RDouble qy0 = -kcp[ITT] * dtdy; RDouble qz0 = -kcp[ITT] * dtdz;
+
+                //NCCR Simplification
+                ttxxux0 = ttxxux0 * n_delta / np; ttxxvy0 = ttxxvy0 * n_delta / np; ttxxwz0 = ttxxwz0 * n_delta / np;
+                ttyyux0 = ttyyux0 * n_delta / np; ttyyvy0 = ttyyvy0 * n_delta / np; ttyywz0 = ttyywz0 * n_delta / np;
+                ttzzux0 = ttzzux0 * n_delta / np; ttzzvy0 = ttzzvy0 * n_delta / np; ttzzwz0 = ttzzwz0 * n_delta / np;
+                ttxyvx0 = ttxyvx0 * n_delta / np; ttyxuy0 = ttyxuy0 * n_delta / np;
+                ttxzwx0 = ttxzwx0 * n_delta / np; ttzxuz0 = ttzxuz0 * n_delta / np;
+                ttyzwy0 = ttyzwy0 * n_delta / np; ttzyvz0 = ttzyvz0 * n_delta / np;
+
+                ttxxvx0 = ttxxvx0 * n_delta / np; ttxxwx0 = ttxxwx0 * n_delta / np;
+                ttyywy0 = ttyywy0 * n_delta / np; ttyyuy0 = ttyyuy0 * n_delta / np;
+                ttzzuz0 = ttzzuz0 * n_delta / np; ttzzvz0 = ttzzvz0 * n_delta / np;
+
+                deltux0_bk = deltux0_bk * n_delta / np;
+                deltvy0_bk = deltvy0_bk * n_delta / np;
+                deltwz0_bk = deltwz0_bk * n_delta / np;
+                RDouble delt0_bk = deltux0_bk + deltvy0_bk + deltwz0_bk;
+
+                qx0 = qx0 / np / sqrt(temperature * e_nccr / 2.0);
+                qy0 = qy0 / np / sqrt(temperature * e_nccr / 2.0);
+                qz0 = qz0 / np / sqrt(temperature * e_nccr / 2.0);
+
+                int sumstep = 0;
+
+                int NCCRSOlVER = 4;
+                if (NCCRSOlVER == 2)
+                {
+                    //! diatomic molecules coupled calculation method
+                    diatsolver_CoupledCalculation(ttxxux0, ttxxvy0, ttxxwz0, ttyyux0, ttyyvy0, ttyywz0, ttzzux0, ttzzvy0, ttzzwz0, ttxyvx0, ttyxuy0, ttxzwx0, ttzxuz0, ttyzwy0, ttzyvz0, delt0_bk, qx0, qy0, qz0, ttxx, ttyy, ttzz, ttxy, ttxz, ttyz, delt_bk, qx, qy, qz, sumstep, c_nccr, 0.4);
+                }
+                else if (NCCRSOlVER == 4)
+                {
+                    int ERROR_NCCR = 0;
+                    int successed = 1;
+                    diatsolver_NT(ttxxux0, ttxxvy0, ttxxwz0, ttyyux0, ttyyvy0, ttyywz0, ttzzux0, ttzzvy0, ttzzwz0, ttxyvx0, ttyxuy0, ttxzwx0, ttzxuz0, ttyzwy0, ttzyvz0, qx0, qy0, qz0, delt0_bk, ttxx, ttyy, ttzz, ttxy, ttxz, ttyz, qx, qy, qz, delt_bk, sumstep, c_nccr, 0.4, ERROR_NCCR, successed);
+
+                    if (isnan(ttxx) || isnan(ttyy) || isnan(ttxy) || isnan(ttxz) || isnan(ttyz) || isnan(qx) || isnan(qy) || isnan(qz) || isnan(delt_bk))
+                    {
+                        ERROR_NCCR = 1;
+                        diatsolver_NT(ttxxux0, ttxxvy0, ttxxwz0, ttyyux0, ttyyvy0, ttyywz0, ttzzux0, ttzzvy0, ttzzwz0, ttxyvx0, ttyxuy0, ttxzwx0, ttzxuz0, ttyzwy0, ttzyvz0, qx0, qy0, qz0, delt0_bk, ttxx, ttyy, ttzz, ttxy, ttxz, ttyz, qx, qy, qz, delt_bk, sumstep, c_nccr, 0.4, ERROR_NCCR, successed);
+                    }
+
+                    if (isnan(ttxx) || isnan(ttyy) || isnan(ttxy) || isnan(ttxz) || isnan(ttyz) || isnan(qx) || isnan(qy) || isnan(qz) || isnan(delt_bk))
+                    {
+                        ERROR_NCCR = 2;
+                        diatsolver_NT(ttxxux0, ttxxvy0, ttxxwz0, ttyyux0, ttyyvy0, ttyywz0, ttzzux0, ttzzvy0, ttzzwz0, ttxyvx0, ttyxuy0, ttxzwx0, ttzxuz0, ttyzwy0, ttzyvz0, qx0, qy0, qz0, delt0_bk, ttxx, ttyy, ttzz, ttxy, ttxz, ttyz, qx, qy, qz, delt_bk, sumstep, c_nccr, 0.4, ERROR_NCCR, successed);
+                    }
+
+                    if (isnan(ttxx) || isnan(ttyy) || isnan(ttxy) || isnan(ttxz) || isnan(ttyz) || isnan(qx) || isnan(qy) || isnan(qz) || isnan(delt_bk))
+                    {
+                        ERROR_NCCR = 3;
+                        diatsolver_NT(ttxxux0, ttxxvy0, ttxxwz0, ttyyux0, ttyyvy0, ttyywz0, ttzzux0, ttzzvy0, ttzzwz0, ttxyvx0, ttyxuy0, ttxzwx0, ttzxuz0, ttyzwy0, ttzyvz0, qx0, qy0, qz0, delt0_bk, ttxx, ttyy, ttzz, ttxy, ttxz, ttyz, qx, qy, qz, delt_bk, sumstep, c_nccr, 0.4, ERROR_NCCR, successed);
+                    }
+                    if (isnan(ttxx) || isnan(ttyy) || isnan(ttxy) || isnan(ttxz) || isnan(ttyz) || isnan(qx) || isnan(qy) || isnan(qz) || isnan(delt_bk) ||
+                        !successed)
+                    {
+                        //! cout << "Coupled and Newton method is useless!" << endl;
+                        diatsolver_CoupledCalculation(ttxxux0, ttxxvy0, ttxxwz0, ttyyux0, ttyyvy0, ttyywz0, ttzzux0, ttzzvy0, ttzzwz0, ttxyvx0, ttyxuy0, ttxzwx0, ttzxuz0, ttyzwy0, ttzyvz0, delt0_bk, qx0, qy0, qz0, ttxx, ttyy, ttzz, ttxy, ttxz, ttyz, delt_bk, qx, qy, qz, sumstep, c_nccr, 0.4);
+                    }
+                }
+
+
+                //restore
+                ttxx = - ttxx * np / n_delta;
+                ttyy = - ttyy * np / n_delta;
+                ttzz = - ttzz * np / n_delta;
+                ttxy = - ttxy * np / n_delta;
+                ttxz = - ttxz * np / n_delta;
+                ttyz = - ttyz * np / n_delta;
+
+                delt_bk = - delt_bk * np / n_delta;
+
+                qx = qx * np * sqrt(temperature * e_nccr / 2.0);
+                qy = qy * np * sqrt(temperature * e_nccr / 2.0);
+                qz = qz * np * sqrt(temperature * e_nccr / 2.0);
+
+                heatFlux = -(nx * qx + ny * qy + nz * qz);
+
+                ttxx = ttxx + delt_bk;
+                ttyy = ttyy + delt_bk;
+                ttzz = ttzz + delt_bk;
+
+                fvis[IR] = 0.0;
+                fvis[IDX::IRU] = nx * ttxx + ny * ttxy + nz * ttxz;
+                fvis[IDX::IRV] = nx * ttxy + ny * ttyy + nz * ttyz;
+                fvis[IDX::IRW] = nx * ttxz + ny * ttyz + nz * ttzz;
+                fvis[IDX::IRE] = um * fvis[IDX::IRU] + vm * fvis[IDX::IRV] + wm * fvis[IDX::IRW] + heatFlux / n_delta;
+                //! fvis[IDX::IRE] = um * fvis[IDX::IRU] + vm * fvis[IDX::IRV] + wm * fvis[IDX::IRW] + heatFlux;
+
+
+                for (int m = 0; m < nEquation; ++m)
+                {
+                    flux(il, jl, kl, m) = -oRefReNumber * fvis[m];
+#ifdef USE_ERROR_DATA_DEBUG
+                    if (isErrorData(flux(il, jl, kl, m)))
+                    {
+                        int zoneID = grid->GetZoneID();
+                        PrintToWindow(" zoneID = ", zoneID, "il = ", il, "jl = ", jl, "kl = ", kl, "m = ", m);
+                        TK_Exit::ExceptionExit("This is in function CompVisFluxnew", true);
+                    }
+#endif  
+                }
+            }
+        }
+    }
+
+    delete[] fvis;    fvis = NULL;
+}
+
+void NCCRSolverStruct::monosolver_speedestdescend(RDouble& ttxxux0, RDouble& ttxxvy0, RDouble& ttxxwz0, RDouble& ttyyux0, RDouble& ttyyvy0, RDouble& ttyywz0, RDouble& ttzzux0, RDouble& ttzzvy0, RDouble& ttzzwz0, RDouble& ttxyvx0, RDouble& ttyxuy0, RDouble& ttxzwx0, RDouble& ttzxuz0, RDouble& ttyzwy0, RDouble& ttzyvz0, RDouble& qx0, RDouble& qy0, RDouble& qz0, RDouble& ttxx, RDouble& ttyy, RDouble& ttzz, RDouble& ttxy, RDouble& ttxz, RDouble& ttyz, RDouble& qx, RDouble& qy, RDouble& qz, int& sumstep, RDouble& c_nccr)
+{
+    RDouble ttxx0, ttyy0, ttzz0, ttxy0, ttxz0, ttyz0, ux, uy, uz, vx, vy, vz, wx, wy, wz, ttxx1, ttyy1, ttzz1, ttxy1, ttxz1, ttyz1, ttyx1, ttzx1, ttzy1, qx1, qy1, qz1;
+    RDouble ttxx_sd, ttyy_sd, ttxy_sd, ttxz_sd, ttyz_sd, qx_sd, qy_sd, qz_sd;
+    RDouble tol, sd_step0, sd_step1, sd_step2, sd_step3, sd_h1, sd_h2, sd_h3;
+    vector<vector<double>> dfun(8, vector<double>(8)); 
+    vector<double> fun0(9), fun1(9), fun2(9), fun3(9), Gradtf(8);
+    int ite_step = 0;
+    RDouble norm = 0.0;
+
+    tol = 1E-3;
+
+    ttxx0 = ttxxux0 + ttxxvy0 + ttxxwz0;
+    ttyy0 = ttyyux0 + ttyyvy0 + ttyywz0;
+    ttzz0 = ttzzux0 + ttzzvy0 + ttzzwz0;
+    ttxy0 = ttxyvx0 + ttyxuy0;
+    ttxz0 = ttxzwx0 + ttzxuz0;
+    ttyz0 = ttyzwy0 + ttzyvz0;
+
+    ux = 3.0 / 2.0 * ttxxux0, vx = 2 * ttxyvx0, wx = 2 * ttxzwx0;
+    uy = 2 * ttyxuy0; vy = 3.0 / 2.0 * ttyyvy0; wy = 2 * ttyzwy0;
+    uz = 2 * ttzxuz0; vz = 2 * ttzyvz0; wz = 3.0 / 2.0 * ttzzwz0;
+
+    RDouble RN0 = sqrt(ttxx0 * ttxx0 + ttyy0 * ttyy0 + ttzz0 * ttzz0 + 2 * (ttxy0 * ttxy0 + ttxz0 * ttxz0 + ttyz0 * ttyz0) + qx0 * qx0 + qy0 * qy0 + qz0 * qz0);
+
+    ttxx1 = asinh(c_nccr * RN0) / c_nccr * RN0 * ttxx0;
+    ttyy1 = asinh(c_nccr * RN0) / c_nccr * RN0 * ttyy0;
+    ttzz1 = asinh(c_nccr * RN0) / c_nccr * RN0 * ttzz0;
+    ttxy1 = asinh(c_nccr * RN0) / c_nccr * RN0 * ttxy0;
+    ttxz1 = asinh(c_nccr * RN0) / c_nccr * RN0 * ttxz0;
+    ttyz1 = asinh(c_nccr * RN0) / c_nccr * RN0 * ttyz0;
+    ttyx1 = ttxy1;
+    ttzx1 = ttxz1;
+    ttzy1 = ttyz1;
+    qx1 = asinh(c_nccr * RN0) / c_nccr * RN0 * qx0;
+    qy1 = asinh(c_nccr * RN0) / c_nccr * RN0 * qy0;
+    qz1 = asinh(c_nccr * RN0) / c_nccr * RN0 * qz0;
+
+    fun_nccr_monatomic(ttxx1, ttyy1, ttxy1, ttxz1, ttyz1, qx1, qy1, qz1, c_nccr, ttxx0, ttyy0, ttxy0, ttxz0, ttyz0, qx0, qy0, qz0, ux, uy, uz, vx, vy, vz, wx, wy, wz, fun0);
+    dfun_nccr_monatomic(ttxx1, ttyy1, ttxy1, ttxz1, ttyz1, qx1, qy1, qz1, c_nccr, ttxx0, ttyy0, ttxy0, ttxz0, ttyz0, qx0, qy0, qz0, ux, uy, uz, vx, vy, vz, wx, wy, wz, dfun);
+    norm = gradient_tfun_monatomic(fun1, dfun, Gradtf);
+
+    while (norm > tol)
+    {
+        sd_step1 = 0.0;
+        sd_step3 = 1.0;
+
+        ttxx_sd = ttxx1 - sd_step3 * Gradtf[0] / norm;
+        ttyy_sd = ttyy1 - sd_step3 * Gradtf[1] / norm;
+        ttxy_sd = ttxy1 - sd_step3 * Gradtf[2] / norm;
+        ttxz_sd = ttxz1 - sd_step3 * Gradtf[3] / norm;
+        ttyz_sd = ttyz1 - sd_step3 * Gradtf[4] / norm;
+        qx_sd = qx1 - sd_step3 * Gradtf[5] / norm;
+        qy_sd = qy1 - sd_step3 * Gradtf[6] / norm;
+        qz_sd = qz1 - sd_step3 * Gradtf[7] / norm;
+
+        fun_nccr_monatomic(ttxx_sd, ttyy_sd, ttxy_sd, ttxz_sd, ttyz_sd, qx_sd, qy_sd, qz_sd, c_nccr, ttxx0, ttyy0, ttxy0, ttxz0, ttyz0, qx0, qy0, qz0, ux, uy, uz, vx, vy, vz, wx, wy, wz, fun3);
+        while (fun3[8] >= fun1[8])
+        {
+            sd_step3 = sd_step3 / 2;
+            if (sd_step3 < tol / 2)
+            {
+                sumstep = ite_step;
+                ttxx = ttxx1; ttyy = ttyy1; ttzz = -ttxx - ttyy; ttxy = ttxy1; ttxz = ttxz1; ttyz = ttyz1; qx = qx1; qy = qy1; qz = qz1;
+                return;
+            }
+
+            ttxx_sd = ttxx1 - sd_step3 * Gradtf[0] / norm;
+            ttyy_sd = ttyy1 - sd_step3 * Gradtf[1] / norm;
+            ttxy_sd = ttxy1 - sd_step3 * Gradtf[2] / norm;
+            ttxz_sd = ttxz1 - sd_step3 * Gradtf[3] / norm;
+            ttyz_sd = ttyz1 - sd_step3 * Gradtf[4] / norm;
+            qx_sd = qx1 - sd_step3 * Gradtf[5] / norm;
+            qy_sd = qy1 - sd_step3 * Gradtf[6] / norm;
+            qz_sd = qz1 - sd_step3 * Gradtf[7] / norm;
+            fun_nccr_monatomic(ttxx_sd, ttyy_sd, ttxy_sd, ttxz_sd, ttyz_sd, qx_sd, qy_sd, qz_sd, c_nccr, ttxx0, ttyy0, ttxy0, ttxz0, ttyz0, qx0, qy0, qz0, ux, uy, uz, vx, vy, vz, wx, wy, wz, fun3);
+        }
+        sd_step2 = sd_step3 / 2.0;
+        ttxx_sd = ttxx1 - sd_step2 * Gradtf[0] / norm;
+        ttyy_sd = ttyy1 - sd_step2 * Gradtf[1] / norm;
+        ttxy_sd = ttxy1 - sd_step2 * Gradtf[2] / norm;
+        ttxz_sd = ttxz1 - sd_step2 * Gradtf[3] / norm;
+        ttyz_sd = ttyz1 - sd_step2 * Gradtf[4] / norm;
+        qx_sd = qx1 - sd_step2 * Gradtf[5] / norm;
+        qy_sd = qy1 - sd_step2 * Gradtf[6] / norm;
+        qz_sd = qz1 - sd_step2 * Gradtf[7] / norm;
+        fun_nccr_monatomic(ttxx_sd, ttyy_sd, ttxy_sd, ttxz_sd, ttyz_sd, qx_sd, qy_sd, qz_sd, c_nccr, ttxx0, ttyy0, ttxy0, ttxz0, ttyz0, qx0, qy0, qz0, ux, uy, uz, vx, vy, vz, wx, wy, wz, fun2);
+
+        sd_h1 = (fun2[8] - fun1[8]) / sd_step2;
+        sd_h2 = (fun3[8] - fun2[8]) / (sd_step3 - sd_step2);
+        sd_h3 = (sd_h2 - sd_h1) / sd_step3;
+        sd_step0 = 0.5 * (sd_step2 - sd_h1 / sd_h3);
+
+        ttxx_sd = ttxx1 - sd_step0 * Gradtf[0] / norm;
+        ttyy_sd = ttyy1 - sd_step0 * Gradtf[1] / norm;
+        ttxy_sd = ttxy1 - sd_step0 * Gradtf[2] / norm;
+        ttxz_sd = ttxz1 - sd_step0 * Gradtf[3] / norm;
+        ttyz_sd = ttyz1 - sd_step0 * Gradtf[4] / norm;
+        qx_sd = qx1 - sd_step0 * Gradtf[5] / norm;
+        qy_sd = qy1 - sd_step0 * Gradtf[6] / norm;
+        qz_sd = qz1 - sd_step0 * Gradtf[7] / norm;
+        fun_nccr_monatomic(ttxx_sd, ttyy_sd, ttxy_sd, ttxz_sd, ttyz_sd, qx_sd, qy_sd, qz_sd, c_nccr, ttxx0, ttyy0, ttxy0, ttxz0, ttyz0, qx0, qy0, qz0, ux, uy, uz, vx, vy, vz, wx, wy, wz, fun0);
+
+        //!find the best step
+        if (fun0[8] > fun3[8])
+        {
+            ttxx1 = ttxx1 - sd_step3 * Gradtf[0] / norm;
+            ttyy1 = ttyy1 - sd_step3 * Gradtf[1] / norm;
+            ttxy1 = ttxy1 - sd_step3 * Gradtf[2] / norm;
+            ttxz1 = ttxz1 - sd_step3 * Gradtf[3] / norm;
+            ttyz1 = ttyz1 - sd_step3 * Gradtf[4] / norm;
+            qx1 = qx1 - sd_step3 * Gradtf[5] / norm;
+            qy1 = qy1 - sd_step3 * Gradtf[6] / norm;
+            qz1 = qz1 - sd_step3 * Gradtf[7] / norm;
+            for (auto i = 0; i < 9; i++)
+            {
+                fun1[i] = fun3[i];
+            }
+        }
+        else
+        {
+            ttxx1 = ttxx1 - sd_step0 * Gradtf[0] / norm;
+            ttyy1 = ttyy1 - sd_step0 * Gradtf[1] / norm;
+            ttxy1 = ttxy1 - sd_step0 * Gradtf[2] / norm;
+            ttxz1 = ttxz1 - sd_step0 * Gradtf[3] / norm;
+            ttyz1 = ttyz1 - sd_step0 * Gradtf[4] / norm;
+            qx1 = qx1 - sd_step0 * Gradtf[5] / norm;
+            qy1 = qy1 - sd_step0 * Gradtf[6] / norm;
+            qz1 = qz1 - sd_step0 * Gradtf[7] / norm;
+
+            for (auto i = 0; i < 9; i++)
+            {
+                fun1[i] = fun0[i];
+            }
+        }
+        dfun_nccr_monatomic(ttxx1, ttyy1, ttxy1, ttxz1, ttyz1, qx1, qy1, qz1, c_nccr, ttxx0, ttyy0, ttxy0, ttxz0, ttyz0, qx0, qy0, qz0, ux, uy, uz, vx, vy, vz, wx, wy, wz, dfun);
+        norm = gradient_tfun_monatomic(fun1, dfun, Gradtf);
+        ite_step++;
+    }
+    sumstep = ite_step;
+    ttxx = ttxx1; ttyy = ttyy1; ttzz = -ttxx - ttyy; ttxy = ttxy1; ttxz = ttxz1; ttyz = ttyz1; qx = qx1; qy = qy1; qz = qz1;
+}
+
+void NCCRSolverStruct::fun_nccr_monatomic(RDouble ttxx, RDouble ttyy, RDouble ttxy, RDouble ttxz, RDouble ttyz, RDouble qx, RDouble qy, RDouble qz, RDouble c_nccr, RDouble ttxx0, RDouble ttyy0, RDouble ttxy0, RDouble ttxz0, RDouble ttyz0, RDouble qx0, RDouble qy0, RDouble qz0, RDouble ux, RDouble uy, RDouble uz, RDouble vx, RDouble vy, RDouble vz, RDouble wx, RDouble wy, RDouble wz, vector<RDouble>& fun)
+{
+    RDouble rn = sqrt(ttxx * ttxx + ttyy * ttyy + (ttxx + ttyy) * (ttxx + ttyy) + 2 * (ttxy * ttxy + ttxz * ttxz + ttyz * ttyz) + qx * qx + qy * qy + qz * qz);
+    fun[0] = ttxx * ndf(c_nccr * rn) - ttxx0 - 2.0 / 3 * (ttxx * ux + ttxy * uy + ttxz * uz) + 1.0 / 3 * ((ttxy * vx + ttyy * vy + ttyz * vz) + (ttxz * wx + ttyz * wy - (ttxx + ttyy) * wz));
+    fun[1] = ttyy * ndf(c_nccr * rn) - ttyy0 - 2.0 / 3 * (ttxy * vx + ttyy * vy + ttyz * vz) + 1.0 / 3 * ((ttxx * ux + ttxy * uy + ttxz * uz) + (ttxz * wx + ttyz * wy - (ttxx + ttyy) * wz));
+    fun[2] = ttxy * ndf(c_nccr * rn) - ttxy0 - 0.5 * (ttxx * vx + ttyy * uy) - 0.5 * ttxy * (vy + ux) - 0.5 * (ttxz * vz + ttyz * uz);
+    fun[3] = ttxz * ndf(c_nccr * rn) - ttxz0 - 0.5 * (ttxx * wx - (ttxx + ttyy) * uz) - 0.5 * ttxz * (wz + ux) - 0.5 * (ttxy * wy + ttyz * uy);
+    fun[4] = ttyz * ndf(c_nccr * rn) - ttyz0 - 0.5 * (ttyy * wy - (ttxx + ttyy) * vz) - 0.5 * ttyz * (wz + vy) - 0.5 * (ttxy * wx + ttxz * vx);
+    fun[5] = qx * ndf(c_nccr * rn) - qx0 - ttxx * qx0 - ttxy * qy0 - ttxz * qz0;
+    fun[6] = qy * ndf(c_nccr * rn) - qy0 - ttxy * qx0 - ttyy * qy0 - ttyz * qz0;
+    fun[7] = qz * ndf(c_nccr * rn) - qz0 - ttxz * qx0 - ttyz * qy0 + (ttxx + ttyy) * qz0;
+    fun[8] = fun[0] * fun[0] + fun[1] * fun[1] + fun[2] * fun[2] + fun[3] * fun[3] + fun[4] * fun[4] + fun[5] * fun[5] + fun[6] * fun[6] + fun[7] * fun[7];
+}
+
+void NCCRSolverStruct::dfun_nccr_monatomic(RDouble ttxx, RDouble ttyy, RDouble ttxy, RDouble ttxz, RDouble ttyz, RDouble qx, RDouble qy, RDouble qz, RDouble c_NCCR, RDouble ttxx0, RDouble ttyy0, RDouble ttxy0, RDouble ttxz0, RDouble ttyz0, RDouble qx0, RDouble qy0, RDouble qz0, RDouble ux, RDouble uy, RDouble uz, RDouble vx, RDouble vy, RDouble vz, RDouble wx, RDouble wy, RDouble wz, vector<vector<double>>& dfun)
+{
+    double rn, ndf1;
+    double df1_dttxx, df1_dttyy, df1_dttxy, df1_dttxz, df1_dttyz, df1_dqx, df1_dqy, df1_dqz;
+    double df2_dttxx, df2_dttyy, df2_dttxy, df2_dttxz, df2_dttyz, df2_dqx, df2_dqy, df2_dqz;
+    double df3_dttxx, df3_dttyy, df3_dttxy, df3_dttxz, df3_dttyz, df3_dqx, df3_dqy, df3_dqz;
+    double df4_dttxx, df4_dttyy, df4_dttxy, df4_dttxz, df4_dttyz, df4_dqx, df4_dqy, df4_dqz;
+    double df5_dttxx, df5_dttyy, df5_dttxy, df5_dttxz, df5_dttyz, df5_dqx, df5_dqy, df5_dqz;
+    double df6_dttxx, df6_dttyy, df6_dttxy, df6_dttxz, df6_dttyz, df6_dqx, df6_dqy, df6_dqz;
+    double df7_dttxx, df7_dttyy, df7_dttxy, df7_dttxz, df7_dttyz, df7_dqx, df7_dqy, df7_dqz;
+    double df8_dttxx, df8_dttyy, df8_dttxy, df8_dttxz, df8_dttyz, df8_dqx, df8_dqy, df8_dqz;
+    rn = sqrt(ttxx * ttxx + ttyy * ttyy + (ttxx + ttyy) * (ttxx + ttyy) + 2 * (ttxy * ttxy + ttxz * ttxz + ttyz * ttyz) + qx * qx + qy * qy + qz * qz);
+    ndf1 = (cosh(c_NCCR * rn) - ndf(c_NCCR * rn)) / (rn * rn);
+
+    df1_dttxx = ndf(c_NCCR * rn) - 2.0 / 3 * ux - 1.0 / 3.0 * wz + ttxx * (2 * ttxx + ttyy) * ndf1;
+    df1_dttyy = 1.0 / 3 * vy - 1.0 / 3 * wz + ttxx * (2.0 * ttyy + ttxx) * ndf1;
+    df1_dttxy = -2.0 / 3 * uy + 1.0 / 3 * vx + 2 * ttxx * ttxy * ndf1;
+    df1_dttxz = -2.0 / 3 * uz + 1.0 / 3 * wx + 2 * ttxx * ttxz * ndf1;
+    df1_dttyz = 1.0 / 3 * vz + 1.0 / 3 * wy + 2 * ttxx * ttyz * ndf1;
+    df1_dqx = ttxx * qx * ndf1;
+    df1_dqy = ttxx * qy * ndf1;
+    df1_dqz = ttxx * qz * ndf1;
+
+    df2_dttxx = 1.0 / 3 * ux - 1.0 / 3 * wz + ttyy * (2 * ttxx + ttyy) * ndf1;
+    df2_dttyy = ndf(c_NCCR * rn) - 2.0 / 3 * vy - 1.0 / 3 * wz + ttyy * (2 * ttyy + ttxx) * ndf1;
+    df2_dttxy = 1.0 / 3 * uy - 2.0 / 3 * vx + 2 * ttxy * ttyy * ndf1;
+    df2_dttxz = 1.0 / 3 * uz + 1.0 / 3 * wx + 2 * ttxz * ttyy * ndf1;
+    df2_dttyz = -2.0 / 3 * vz + 1.0 / 3 * wy + 2 * ttyz * ttyy * ndf1;
+    df2_dqx = ttyy * qx * ndf1;
+    df2_dqy = ttyy * qy * ndf1;
+    df2_dqz = ttyy * qz * ndf1;
+
+    df3_dttxx = -0.5 * vx + ttxy * (2 * ttxx + ttyy) * ndf1;
+    df3_dttyy = -0.5 * uy + ttxy * (2 * ttyy + ttxx) * ndf1;
+    df3_dttxy = ndf(c_NCCR * rn) - 0.5 * (ux + vy) + 2 * ttxy * ttxy * ndf1;
+    df3_dttxz = -0.5 * vz + 2 * ttxy * ttxz * ndf1;
+    df3_dttyz = -0.5 * uz + 2 * ttxy * ttyz * ndf1;
+    df3_dqx = ttxy * qx * ndf1;
+    df3_dqy = ttxy * qy * ndf1;
+    df3_dqz = ttxy * qz * ndf1;
+
+    df4_dttxx = -0.5 * (wx - uz) + ttxz * (2 * ttxx + ttyy) * ndf1;
+    df4_dttyy = 0.5 * uz + ttxz * (2 * ttyy + ttxx) * ndf1;
+    df4_dttxy = -0.5 * wy + 2 * ttxz * ttxy * ndf1;
+    df4_dttxz = ndf(c_NCCR * rn) - 0.5 * (ux + wz) + 2 * ttxz * ttxz * ndf1;
+    df4_dttyz = -0.5 * uy + 2 * ttxz * ttyz * ndf1;
+    df4_dqx = ttxz * qx * ndf1;
+    df4_dqy = ttxz * qy * ndf1;
+    df4_dqz = ttxz * qz * ndf1;
+
+    df5_dttxx = 0.5 * vz + ttyz * (2 * ttxx + ttyy) * ndf1;
+    df5_dttyy = -0.5 * (wy - vz) + ttyz * (2 * ttyy + ttxx) * ndf1;
+    df5_dttxy = -0.5 * wx + 2 * ttyz * ttxy * ndf1;
+    df5_dttxz = -0.5 * vx + 2 * ttyz * ttxz * ndf1;
+    df5_dttyz = ndf(c_NCCR * rn) - 0.5 * (vy + wz) + 2 * ttyz * ttyz * ndf1;
+    df5_dqx = ttyz * qx * ndf1;
+    df5_dqy = ttyz * qy * ndf1;
+    df5_dqz = ttyz * qz * ndf1;
+
+    df6_dttxx = -qx0 + qx * (2 * ttxx + ttyy) * ndf1;
+    df6_dttyy = qx * (2 * ttyy + ttxx) * ndf1;
+    df6_dttxy = -qy0 + 2 * qx * ttxy * ndf1;
+    df6_dttxz = -qz0 + 2 * qx * ttxz * ndf1;
+    df6_dttyz = 2 * qx * ttyz * ndf1;
+    df6_dqx = ndf(c_NCCR * rn) + qx * qx * ndf1;
+    df6_dqy = qx * qy * ndf1;
+    df6_dqz = qx * qz * ndf1;
+
+    df7_dttxx = qy * (2 * ttxx + ttyy) * ndf1;
+    df7_dttyy = -qy0 + qy * (2 * ttyy + ttxx) * ndf1;
+    df7_dttxy = -qx0 + 2 * qy * ttxy * ndf1;
+    df7_dttxz = 2 * qy * ttxz * ndf1;
+    df7_dttyz = -qz0 + 2 * qy * ttyz * ndf1;
+    df7_dqx = qx * qy * ndf1;
+    df7_dqy = ndf(c_NCCR * rn) + qy * qy * ndf1;
+    df7_dqz = qy * qz * ndf1;
+
+    df8_dttxx = qz0 + qz * (2 * ttxx + ttyy) * ndf1;
+    df8_dttyy = qz0 + qz * (2 * ttyy + ttxx) * ndf1;
+    df8_dttxy = 2 * qz * ttxy * ndf1;
+    df8_dttxz = -qx0 + 2 * qz * ttxz * ndf1;
+    df8_dttyz = -qy0 + 2 * qz * ttyz * ndf1;
+    df8_dqx = qx * qz * ndf1;
+    df8_dqy = qy * qz * ndf1;
+    df8_dqz = ndf(c_NCCR * rn) + qz * qz * ndf1;
+
+    dfun[0][0] = df1_dttxx;      dfun[1][0] = df2_dttxx;      dfun[2][0] = df3_dttxx;      dfun[3][0] = df4_dttxx;      dfun[4][0] = df5_dttxx;      dfun[5][0] = df6_dttxx;      dfun[6][0] = df7_dttxx;      dfun[7][0] = df8_dttxx;
+    dfun[0][1] = df1_dttyy;      dfun[1][1] = df2_dttyy;      dfun[2][1] = df3_dttyy;      dfun[3][1] = df4_dttyy;      dfun[4][1] = df5_dttyy;      dfun[5][1] = df6_dttyy;      dfun[6][1] = df7_dttyy;      dfun[7][1] = df8_dttyy;
+    dfun[0][2] = df1_dttxy;      dfun[1][2] = df2_dttxy;      dfun[2][2] = df3_dttxy;      dfun[3][2] = df4_dttxy;      dfun[4][2] = df5_dttxy;      dfun[5][2] = df6_dttxy;      dfun[6][2] = df7_dttxy;      dfun[7][2] = df8_dttxy;
+    dfun[0][3] = df1_dttxz;      dfun[1][3] = df2_dttxz;      dfun[2][3] = df3_dttxz;      dfun[3][3] = df4_dttxz;      dfun[4][3] = df5_dttxz;      dfun[5][3] = df6_dttxz;      dfun[6][3] = df7_dttxz;      dfun[7][3] = df8_dttxz;
+    dfun[0][4] = df1_dttyz;      dfun[1][4] = df2_dttyz;      dfun[2][4] = df3_dttyz;      dfun[3][4] = df4_dttyz;      dfun[4][4] = df5_dttyz;      dfun[5][4] = df6_dttyz;      dfun[6][4] = df7_dttyz;      dfun[7][4] = df8_dttyz;
+    dfun[0][5] = df1_dqx;        dfun[1][5] = df2_dqx;        dfun[2][5] = df3_dqx;        dfun[3][5] = df4_dqx;        dfun[4][5] = df5_dqx;        dfun[5][5] = df6_dqx;        dfun[6][5] = df7_dqx;        dfun[7][5] = df8_dqx;
+    dfun[0][6] = df1_dqy;        dfun[1][6] = df2_dqy;        dfun[2][6] = df3_dqy;        dfun[3][6] = df4_dqy;        dfun[4][6] = df5_dqy;        dfun[5][6] = df6_dqy;        dfun[6][6] = df7_dqy;        dfun[7][6] = df8_dqy;
+    dfun[0][7] = df1_dqz;        dfun[1][7] = df2_dqz;        dfun[2][7] = df3_dqz;        dfun[3][7] = df4_dqz;        dfun[4][7] = df5_dqz;        dfun[5][7] = df6_dqz;        dfun[6][7] = df7_dqz;        dfun[7][7] = df8_dqz;
+}
+
+RDouble NCCRSolverStruct::ndf(RDouble x)
+{
+    double ndf = 1;
+    if (fabs(x) < 1e-30)
+    {
+        ndf = 1.0;
+    }
+    else
+    {
+        ndf = sinh(x) / x;
+    }
+    return ndf;
+}
+
+
+RDouble NCCRSolverStruct::gradient_tfun_monatomic(vector<RDouble> fun, vector<vector<double>> dfun, vector<RDouble>& gradtf)
+{
+    RDouble norm = 0;
+    for (auto i = 0; i < 8; i++)
+    {
+        gradtf[i] = 0;
+    }
+
+    for (auto j = 0; j < 8; j++)
+    {
+        for (auto k = 0; k < 8; k++)
+        {
+            gradtf[j] += 2 * fun[k] * dfun[k][j];
+        }
+    }
+
+    for (auto s = 0; s < 8; s++)
+    {
+        norm += gradtf[s] * gradtf[s];
+    }
+    norm = sqrt(norm);
+    return norm;
+}
+
+void NCCRSolverStruct::Gaussian_elimination(vector<vector<double>>& dfun, vector<double>& fun, vector<double>& DX_NT, int parametersnumber)
+{
+    vector<int> PROW(parametersnumber);
+    vector<vector<double>> A_GE(parametersnumber, vector<double>(parametersnumber + 1));
+
+    for (int i = 0; i < parametersnumber; i++) 
+    {
+        for (int j = 0; j < parametersnumber + 1; j++) 
+        {
+            if (j == parametersnumber) 
+            {
+                A_GE[i][j] = fun[i];
+            }
+            else {
+                A_GE[i][j] = dfun[i][j];
+            }
+        }
+    }
+
+    for (int i = 0; i < parametersnumber; i++) {
+        PROW[i] = i;
+    }
+
+    for (int i = 0; i < parametersnumber - 1; i++) 
+    {
+        int P_GE = i;
+        RDouble S_GE = A_GE[PROW[P_GE]][i];
+        for (int j = i + 1; j < parametersnumber; j++) 
+        {
+            if (abs(S_GE) < abs(A_GE[PROW[j]][i])) 
+            {
+                P_GE = j;
+                S_GE = A_GE[PROW[P_GE]][i];
+            }
+        }
+
+        if (A_GE[PROW[P_GE]][i] == 0) {
+            cout << "NO UNIQUE SOLUTION EXISTS" << endl;
+            return;
+        }
+
+        if (PROW[P_GE] != PROW[i]) 
+        {
+            int PCOPY_GE = PROW[i];
+            PROW[i] = PROW[P_GE];
+            PROW[P_GE] = PCOPY_GE;
+        }
+
+        for (int j = i + 1; j < parametersnumber; j++) {
+            RDouble M_GE = A_GE[PROW[j]][i] / A_GE[PROW[i]][i];
+            for (int k = i; k < parametersnumber + 1; k++) {
+                A_GE[PROW[j]][k] -= M_GE * A_GE[PROW[i]][k];
+            }
+        }
+    }
+
+    if (A_GE[PROW[parametersnumber - 1]][parametersnumber - 1] == 0) 
+    {
+        cout << "NO UNIQUE SOLUTION EXISTS" << endl;
+        return;
+    }
+
+    DX_NT[parametersnumber - 1] = A_GE[PROW[parametersnumber - 1]][parametersnumber] / A_GE[PROW[parametersnumber - 1]][parametersnumber - 1];
+    for (int i = parametersnumber - 2; i >= 0; i--) 
+    {
+        RDouble S_GE = 0;
+        for (int j = i + 1; j < parametersnumber; j++) {
+            S_GE += A_GE[PROW[i]][j] * DX_NT[j];
+        }
+        DX_NT[i] = (A_GE[PROW[i]][parametersnumber] - S_GE) / A_GE[PROW[i]][i];
+    }
+
+}
+
+
+
+void NCCRSolverStruct::fun_nccr_diatomic(RDouble ttxx, RDouble ttyy, RDouble ttxy, RDouble ttxz, RDouble ttyz, RDouble qx, RDouble qy, RDouble qz, RDouble delt_bk, RDouble c_nccr, RDouble gamapie, RDouble ttxx0, RDouble ttyy0, RDouble ttxy0, RDouble ttxz0, RDouble ttyz0, RDouble qx0, RDouble qy0, RDouble qz0, RDouble delt0_bk, RDouble ux, RDouble uy, RDouble uz, RDouble vx, RDouble vy, RDouble vz, RDouble wx, RDouble wy, RDouble wz, vector<RDouble>& fun)
+{
+    RDouble fb_nccr = 0.8;
+
+    RDouble rn = sqrt(ttxx * ttxx + ttyy * ttyy + (ttxx + ttyy) * (ttxx + ttyy) + 2.0 * (ttxy * ttxy + ttxz * ttxz + ttyz * ttyz) + qx * qx + qy * qy + qz * qz + 2.0 * gamapie / fb_nccr * delt_bk * delt_bk);
+    fun[0] = ttxx * ndf(c_nccr * rn) - (1.0 + delt_bk) * ttxx0 - 2.0 / 3.0 * (ttxx * ux + ttxy * uy + ttxz * uz) + 1.0 / 3.0 * ((ttxy * vx + ttyy * vy + ttyz * vz) + (ttxz * wx + ttyz * wy - (ttxx + ttyy) * wz));
+    fun[1] = ttyy * ndf(c_nccr * rn) - (1.0 + delt_bk) * ttyy0 - 2.0 / 3.0 * (ttxy * vx + ttyy * vy + ttyz * vz) + 1.0 / 3.0 * ((ttxx * ux + ttxy * uy + ttxz * uz) + (ttxz * wx + ttyz * wy - (ttxx + ttyy) * wz));
+    fun[2] = ttxy * ndf(c_nccr * rn) - (1.0 + delt_bk) * ttxy0 - 0.50 * (ttxx * vx + ttyy * uy) - 0.50 * ttxy * (vy + ux) - 0.50 * (ttxz * vz + ttyz * uz);
+    fun[3] = ttxz * ndf(c_nccr * rn) - (1.0 + delt_bk) * ttxz0 - 0.50 * (ttxx * wx - (ttxx + ttyy) * uz) - 0.50 * ttxz * (wz + ux) - 0.50 * (ttxy * wy + ttyz * uy);
+    fun[4] = ttyz * ndf(c_nccr * rn) - (1.0 + delt_bk) * ttyz0 - 0.50 * (ttyy * wy - (ttxx + ttyy) * vz) - 0.50 * ttyz * (wz + vy) - 0.50 * (ttxy * wx + ttxz * vx);
+    fun[5] = qx * ndf(c_nccr * rn) - (1.0 + delt_bk) * qx0 - ttxx * qx0 - ttxy * qy0 - ttxz * qz0;
+    fun[6] = qy * ndf(c_nccr * rn) - (1.0 + delt_bk) * qy0 - ttxy * qx0 - ttyy * qy0 - ttyz * qz0;
+    fun[7] = qz * ndf(c_nccr * rn) - (1.0 + delt_bk) * qz0 - ttxz * qx0 - ttyz * qy0 + (ttxx + ttyy) * qz0;
+    fun[8] = delt_bk * ndf(c_nccr * rn) - delt0_bk - 1.50 * fb_nccr * (ttxx * ux + ttxy * (vx + uy) + ttxz * (wx + uz) + ttyy * vy + ttyz * (wy + vz) - (ttxx + ttyy) * wz + delt_bk * (ux + vy + wz));
+}
+
+void NCCRSolverStruct::dfun_nccr_diatomic(RDouble ttxx, RDouble ttyy, RDouble ttxy, RDouble ttxz, RDouble ttyz, RDouble qx, RDouble qy, RDouble qz, RDouble delt_bk, RDouble c_NCCR, RDouble gamapie, RDouble ttxx0, RDouble ttyy0, RDouble ttxy0, RDouble ttxz0, RDouble ttyz0, RDouble qx0, RDouble qy0, RDouble qz0, RDouble delt0_bk, RDouble ux, RDouble uy, RDouble uz, RDouble vx, RDouble vy, RDouble vz, RDouble wx, RDouble wy, RDouble wz, vector<vector<double>>& dfun)
+{
+    RDouble df1_dttxx, df1_dttyy, df1_dttxy, df1_dttxz, df1_dttyz, df1_dqx, df1_dqy, df1_dqz, df1_ddelt_bk;
+    RDouble df2_dttxx, df2_dttyy, df2_dttxy, df2_dttxz, df2_dttyz, df2_dqx, df2_dqy, df2_dqz, df2_ddelt_bk;
+    RDouble df3_dttxx, df3_dttyy, df3_dttxy, df3_dttxz, df3_dttyz, df3_dqx, df3_dqy, df3_dqz, df3_ddelt_bk;
+    RDouble df4_dttxx, df4_dttyy, df4_dttxy, df4_dttxz, df4_dttyz, df4_dqx, df4_dqy, df4_dqz, df4_ddelt_bk;
+    RDouble df5_dttxx, df5_dttyy, df5_dttxy, df5_dttxz, df5_dttyz, df5_dqx, df5_dqy, df5_dqz, df5_ddelt_bk;
+    RDouble df6_dttxx, df6_dttyy, df6_dttxy, df6_dttxz, df6_dttyz, df6_dqx, df6_dqy, df6_dqz, df6_ddelt_bk;
+    RDouble df7_dttxx, df7_dttyy, df7_dttxy, df7_dttxz, df7_dttyz, df7_dqx, df7_dqy, df7_dqz, df7_ddelt_bk;
+    RDouble df8_dttxx, df8_dttyy, df8_dttxy, df8_dttxz, df8_dttyz, df8_dqx, df8_dqy, df8_dqz, df8_ddelt_bk;
+    RDouble df9_dttxx, df9_dttyy, df9_dttxy, df9_dttxz, df9_dttyz, df9_dqx, df9_dqy, df9_dqz, df9_ddelt_bk;
+
+    RDouble fb_nccr = 0.8;
+
+    RDouble rn = sqrt(ttxx * ttxx + ttyy * ttyy + (ttxx + ttyy) * (ttxx + ttyy) + 2.0 * (ttxy * ttxy + ttxz * ttxz + ttyz * ttyz) + qx * qx + qy * qy + qz * qz + 2.0 * gamapie / fb_nccr * delt_bk * delt_bk);
+    RDouble ndf1 = (cosh(c_NCCR * rn) - ndf(c_NCCR * rn)) / (rn * rn);
+
+    df1_dttxx = ndf(c_NCCR * rn) - 2.0 / 3.0 * ux - 1.0 / 3.0 * wz + ttxx * (2.0 * ttxx + ttyy) * ndf1;
+    df1_dttyy = 1.0 / 3.0 * vy - 1.0 / 3.0 * wz + ttxx * (2.0 * ttyy + ttxx) * ndf1;
+    df1_dttxy = -2.0 / 3.0 * uy + 1.0 / 3.0 * vx + 2.0 * ttxx * ttxy * ndf1;
+    df1_dttxz = -2.0 / 3.0 * uz + 1.0 / 3.0 * wx + 2.0 * ttxx * ttxz * ndf1;
+    df1_dttyz = 1.0 / 3.0 * vz + 1.0 / 3.0 * wy + 2.0 * ttxx * ttyz * ndf1;
+    df1_dqx = ttxx * qx * ndf1;
+    df1_dqy = ttxx * qy * ndf1;
+    df1_dqz = ttxx * qz * ndf1;
+    df1_ddelt_bk = -ttxx0 + 2.0 * gamapie / fb_nccr * delt_bk * ttxx * ndf1;
+
+    df2_dttxx = 1.0 / 3.0 * ux - 1.0 / 3.0 * wz + ttyy * (2.0 * ttxx + ttyy) * ndf1;
+    df2_dttyy = ndf(c_NCCR * rn) - 2.0 / 3.0 * vy - 1.0 / 3.0 * wz + ttyy * (2.0 * ttyy + ttxx) * ndf1;
+    df2_dttxy = 1.0 / 3.0 * uy - 2.0 / 3.0 * vx + 2.0 * ttxy * ttyy * ndf1;
+    df2_dttxz = 1.0 / 3.0 * uz + 1.0 / 3.0 * wx + 2.0 * ttxz * ttyy * ndf1;
+    df2_dttyz = -2.0 / 3.0 * vz + 1.0 / 3.0 * wy + 2.0 * ttyz * ttyy * ndf1;
+    df2_dqx = ttyy * qx * ndf1;
+    df2_dqy = ttyy * qy * ndf1;
+    df2_dqz = ttyy * qz * ndf1;
+    df2_ddelt_bk = -ttyy0 + 2.0 * gamapie / fb_nccr * delt_bk * ttyy * ndf1;
+
+    df3_dttxx = -0.50 * vx + ttxy * (2.0 * ttxx + ttyy) * ndf1;
+    df3_dttyy = -0.50 * uy + ttxy * (2.0 * ttyy + ttxx) * ndf1;
+    df3_dttxy = ndf(c_NCCR * rn) - 0.50 * (ux + vy) + 2.0 * ttxy * ttxy * ndf1;
+    df3_dttxz = -0.50 * vz + 2.0 * ttxy * ttxz * ndf1;
+    df3_dttyz = -0.50 * uz + 2.0 * ttxy * ttyz * ndf1;
+    df3_dqx = ttxy * qx * ndf1;
+    df3_dqy = ttxy * qy * ndf1;
+    df3_dqz = ttxy * qz * ndf1;
+    df3_ddelt_bk = -ttxy0 + 2.0 * gamapie / fb_nccr * delt_bk * ttxy * ndf1;
+
+    df4_dttxx = -0.50 * (wx - uz) + ttxz * (2.0 * ttxx + ttyy) * ndf1;
+    df4_dttyy = 0.50 * uz + ttxz * (2.0 * ttyy + ttxx) * ndf1;
+    df4_dttxy = -0.50 * wy + 2.0 * ttxz * ttxy * ndf1;
+    df4_dttxz = ndf(c_NCCR * rn) - 0.50 * (ux + wz) + 2.0 * ttxz * ttxz * ndf1;
+    df4_dttyz = -0.50 * uy + 2.0 * ttxz * ttyz * ndf1;
+    df4_dqx = ttxz * qx * ndf1;
+    df4_dqy = ttxz * qy * ndf1;
+    df4_dqz = ttxz * qz * ndf1;
+    df4_ddelt_bk = -ttxz0 + 2.0 * gamapie / fb_nccr * delt_bk * ttxz * ndf1;
+
+    df5_dttxx = 0.50 * vz + ttyz * (2.0 * ttxx + ttyy) * ndf1;
+    df5_dttyy = -0.50 * (wy - vz) + ttyz * (2.0 * ttyy + ttxx) * ndf1;
+    df5_dttxy = -0.50 * wx + 2.0 * ttyz * ttxy * ndf1;
+    df5_dttxz = -0.50 * vx + 2.0 * ttyz * ttxz * ndf1;
+    df5_dttyz = ndf(c_NCCR * rn) - 0.50 * (vy + wz) + 2.0 * ttyz * ttyz * ndf1;
+    df5_dqx = ttyz * qx * ndf1;
+    df5_dqy = ttyz * qy * ndf1;
+    df5_dqz = ttyz * qz * ndf1;
+    df5_ddelt_bk = -ttyz0 + 2.0 * gamapie / fb_nccr * delt_bk * ttyz * ndf1;
+
+    df6_dttxx = -qx0 + qx * (2.0 * ttxx + ttyy) * ndf1;
+    df6_dttyy = qx * (2.0 * ttyy + ttxx) * ndf1;
+    df6_dttxy = -qy0 + 2.0 * qx * ttxy * ndf1;
+    df6_dttxz = -qz0 + 2.0 * qx * ttxz * ndf1;
+    df6_dttyz = 2.0 * qx * ttyz * ndf1;
+    df6_dqx = ndf(c_NCCR * rn) + qx * qx * ndf1;
+    df6_dqy = qx * qy * ndf1;
+    df6_dqz = qx * qz * ndf1;
+    df6_ddelt_bk = -qx0 + 2.0 * gamapie / fb_nccr * delt_bk * qx * ndf1;
+
+    df7_dttxx = qy * (2.0 * ttxx + ttyy) * ndf1;
+    df7_dttyy = -qy0 + qy * (2.0 * ttyy + ttxx) * ndf1;
+    df7_dttxy = -qx0 + 2.0 * qy * ttxy * ndf1;
+    df7_dttxz = 2.0 * qy * ttxz * ndf1;
+    df7_dttyz = -qz0 + 2.0 * qy * ttyz * ndf1;
+    df7_dqx = qx * qy * ndf1;
+    df7_dqy = ndf(c_NCCR * rn) + qy * qy * ndf1;
+    df7_dqz = qy * qz * ndf1;
+    df7_ddelt_bk = -qy0 + 2.0 * gamapie / fb_nccr * delt_bk * qy * ndf1;
+
+    df8_dttxx = qz0 + qz * (2.0 * ttxx + ttyy) * ndf1;
+    df8_dttyy = qz0 + qz * (2.0 * ttyy + ttxx) * ndf1;
+    df8_dttxy = 2.0 * qz * ttxy * ndf1;
+    df8_dttxz = -qx0 + 2.0 * qz * ttxz * ndf1;
+    df8_dttyz = -qy0 + 2.0 * qz * ttyz * ndf1;
+    df8_dqx = qx * qz * ndf1;
+    df8_dqy = qy * qz * ndf1;
+    df8_dqz = ndf(c_NCCR * rn) + qz * qz * ndf1;
+    df8_ddelt_bk = -qz0 + 2.0 * gamapie / fb_nccr * delt_bk * qz * ndf1;
+
+    df9_dttxx = -1.50 * fb_nccr * (ux - wz) + delt_bk * (2.0 * ttxx + ttyy) * ndf1;
+    df9_dttyy = -1.50 * fb_nccr * (vy - wz) + delt_bk * (2.0 * ttyy + ttxx) * ndf1;
+    df9_dttxy = -1.50 * fb_nccr * (uy + vx) + 2.0 * delt_bk * ttxy * ndf1;
+    df9_dttxz = -1.50 * fb_nccr * (uz + wx) + 2.0 * delt_bk * ttxz * ndf1;
+    df9_dttyz = -1.50 * fb_nccr * (vz + wy) + 2.0 * delt_bk * ttyz * ndf1;
+    df9_dqx = delt_bk * qx * ndf1;
+    df9_dqy = delt_bk * qy * ndf1;
+    df9_dqz = delt_bk * qz * ndf1;
+    df9_ddelt_bk = ndf(c_NCCR * rn) - 1.50 * fb_nccr * (ux + vy + wz) + 2.0 * gamapie / fb_nccr * delt_bk * delt_bk * ndf1;
+
+    dfun[0][0] = df1_dttxx;      dfun[1][0] = df2_dttxx;      dfun[2][0] = df3_dttxx;      dfun[3][0] = df4_dttxx;      dfun[4][0] = df5_dttxx;      dfun[5][0] = df6_dttxx;      dfun[6][0] = df7_dttxx;      dfun[7][0] = df8_dttxx;      dfun[8][0] = df9_dttxx;
+    dfun[0][1] = df1_dttyy;      dfun[1][1] = df2_dttyy;      dfun[2][1] = df3_dttyy;      dfun[3][1] = df4_dttyy;      dfun[4][1] = df5_dttyy;      dfun[5][1] = df6_dttyy;      dfun[6][1] = df7_dttyy;      dfun[7][1] = df8_dttyy;      dfun[8][1] = df9_dttyy;
+    dfun[0][2] = df1_dttxy;      dfun[1][2] = df2_dttxy;      dfun[2][2] = df3_dttxy;      dfun[3][2] = df4_dttxy;      dfun[4][2] = df5_dttxy;      dfun[5][2] = df6_dttxy;      dfun[6][2] = df7_dttxy;      dfun[7][2] = df8_dttxy;      dfun[8][2] = df9_dttxy;
+    dfun[0][3] = df1_dttxz;      dfun[1][3] = df2_dttxz;      dfun[2][3] = df3_dttxz;      dfun[3][3] = df4_dttxz;      dfun[4][3] = df5_dttxz;      dfun[5][3] = df6_dttxz;      dfun[6][3] = df7_dttxz;      dfun[7][3] = df8_dttxz;      dfun[8][3] = df9_dttxz;
+    dfun[0][4] = df1_dttyz;      dfun[1][4] = df2_dttyz;      dfun[2][4] = df3_dttyz;      dfun[3][4] = df4_dttyz;      dfun[4][4] = df5_dttyz;      dfun[5][4] = df6_dttyz;      dfun[6][4] = df7_dttyz;      dfun[7][4] = df8_dttyz;      dfun[8][4] = df9_dttyz;
+    dfun[0][5] = df1_dqx;        dfun[1][5] = df2_dqx;        dfun[2][5] = df3_dqx;        dfun[3][5] = df4_dqx;        dfun[4][5] = df5_dqx;        dfun[5][5] = df6_dqx;        dfun[6][5] = df7_dqx;        dfun[7][5] = df8_dqx;        dfun[8][5] = df9_dqx;
+    dfun[0][6] = df1_dqy;        dfun[1][6] = df2_dqy;        dfun[2][6] = df3_dqy;        dfun[3][6] = df4_dqy;        dfun[4][6] = df5_dqy;        dfun[5][6] = df6_dqy;        dfun[6][6] = df7_dqy;        dfun[7][6] = df8_dqy;        dfun[8][6] = df9_dqy;
+    dfun[0][7] = df1_dqz;        dfun[1][7] = df2_dqz;        dfun[2][7] = df3_dqz;        dfun[3][7] = df4_dqz;        dfun[4][7] = df5_dqz;        dfun[5][7] = df6_dqz;        dfun[6][7] = df7_dqz;        dfun[7][7] = df8_dqz;        dfun[8][7] = df9_dqz;
+    dfun[0][8] = df1_ddelt_bk;   dfun[1][8] = df2_ddelt_bk;   dfun[2][8] = df3_ddelt_bk;   dfun[3][8] = df4_ddelt_bk;   dfun[4][8] = df5_ddelt_bk;   dfun[5][8] = df6_ddelt_bk;   dfun[6][8] = df7_ddelt_bk;   dfun[7][8] = df8_ddelt_bk;   dfun[8][8] = df9_ddelt_bk;
+}
+
+RDouble NCCRSolverStruct::gradient_tfun_diatomic(vector<RDouble> fun, vector<vector<double>> dfun, vector<RDouble> gradtf, RDouble& norm)
+{
+    
+    for (auto i = 0; i < 9; i++)
+    {
+        gradtf[i] = 0;
+    }
+
+    for (auto j = 0; j < 9; j++)
+    {
+        for (auto k = 0; k < 9; k++)
+        {
+            gradtf[j] += 2 * fun[k] * dfun[k][j];
+        }
+    }
+
+    for (auto s = 0; s < 9; s++)
+    {
+        norm += gradtf[s] * gradtf[s];
+    }
+    norm = sqrt(norm);
+    return norm;
+}
+
+void NCCRSolverStruct::monosolver_CoupledCalculation(RDouble& ttxxux0, RDouble& ttxxvy0, RDouble& ttxxwz0, RDouble& ttyyux0, RDouble& ttyyvy0, RDouble& ttyywz0, RDouble& ttzzux0, RDouble& ttzzvy0, RDouble& ttzzwz0, RDouble& ttxyvx0, RDouble& ttyxuy0, RDouble& ttxzwx0, RDouble& ttzxuz0, RDouble& ttyzwy0, RDouble& ttzyvz0, RDouble& qx0, RDouble& qy0, RDouble& qz0, RDouble& ttxx, RDouble& ttyy, RDouble& ttzz, RDouble& ttxy, RDouble& ttxz, RDouble& ttyz, RDouble& qx, RDouble& qy, RDouble& qz, int& sumstep, RDouble& c_nccr)
+{
+    RDouble ttxx0, ttyy0, ttzz0, ttxy0, ttxz0, ttyz0, ux, uy, uz, vx, vy, vz, wx, wy, wz, ttxx1, ttyy1, ttzz1, ttxy1, ttxz1, ttyz1, ttyx1, ttzx1, ttzy1, qx1, qy1, qz1, RN0, RN1, RN2;
+
+    RDouble fun0[9], fn;
+    int ite_step = 0;    
+
+    ttxx0 = ttxxux0 + ttxxvy0 + ttxxwz0;
+    ttyy0 = ttyyux0 + ttyyvy0 + ttyywz0;
+    ttzz0 = ttzzux0 + ttzzvy0 + ttzzwz0;
+    ttxy0 = ttxyvx0 + ttyxuy0;
+    ttxz0 = ttxzwx0 + ttzxuz0;
+    ttyz0 = ttyzwy0 + ttzyvz0;
+
+    ux = 1.5 * ttxxux0; vx = 2.0 * ttxyvx0; wx = 2.0 * ttxzwx0;
+    uy = 2.0 * ttyxuy0; vy = 1.5 * ttyyvy0; wy = 2.0 * ttyzwy0;
+    uz = 2.0 * ttzxuz0; vz = 2.0 * ttzyvz0; wz = 1.5 * ttzzwz0;
+
+    RN0 = sqrt(ttxx0 * ttxx0 + ttyy0 * ttyy0 + ttzz0 * ttzz0 + 2.0 * ttxy0 * ttxy0 + 2.0 * ttxz0 * ttxz0 + 2.0 * ttyz0 * ttyz0 + qx0 * qx0 + qy0 * qy0 + qz0 * qz0);
+    
+    if (RN0 < 1.0E-10)
+    {
+        ttxx = ttxx0; ttyy = ttyy0; ttzz = ttzz0; ttxy = ttxy0; ttxz = ttxz0; ttyz = ttyz0; qx = qx0; qy = qy0; qz = qz0;
+    }
+    else
+    {
+        ttxx1 = asinh(c_nccr * RN0) / c_nccr / RN0 * ttxx0;
+        ttyy1 = asinh(c_nccr * RN0) / c_nccr / RN0 * ttyy0;
+        ttzz1 = asinh(c_nccr * RN0) / c_nccr / RN0 * ttzz0;
+        ttxy1 = asinh(c_nccr * RN0) / c_nccr / RN0 * ttxy0;
+        ttxz1 = asinh(c_nccr * RN0) / c_nccr / RN0 * ttxz0;
+        ttyz1 = asinh(c_nccr * RN0) / c_nccr / RN0 * ttyz0;
+        ttyx1 = ttxy1;
+        ttzx1 = ttxz1;
+        ttzy1 = ttyz1;
+        qx1 = asinh(c_nccr * RN0) / c_nccr / RN0 * qx0;
+        qy1 = asinh(c_nccr * RN0) / c_nccr / RN0 * qy0;
+        qz1 = asinh(c_nccr * RN0) / c_nccr / RN0 * qz0;
+        
+        RN1 = 0.0;
+        RN2 = 1.0;
+
+        while (fabs(RN2 - RN1) > 1.0e-5 && ite_step < 100)
+        {
+            RN1 = sqrt(ttxx1 * ttxx1 + ttyy1 * ttyy1 + ttzz1 * ttzz1 + 2.0 * ttxy1 * ttxy1 + 2.0 * ttxz1 * ttxz1 + 2.0 * ttyz1 * ttyz1 +  qx1 * qx1 + qy1 * qy1 + qz1 * qz1);
+
+            fun0[0] = ttxx0 + 2.0 / 3.0 * (ttxx1 * ux + ttxy1 * uy + ttxz1 * uz) - 1.0 / 3.0 * (ttyx1 * vx + ttyy1 * vy + ttyz1 * vz + ttzx1 * wx + ttzy1 * wy + ttzz1 * wz);
+
+            fun0[1] = ttyy0 + 2.0 / 3.0 * (ttyx1 * vx + ttyy1 * vy + ttyz1 * vz) - 1.0 / 3.0 * (ttxx1 * ux + ttxy1 * uy + ttxz1 * uz + ttzx1 * wx + ttzy1 * wy + ttzz1 * wz);
+
+            fun0[2] = -fun0[0] - fun0[1];
+            fun0[3] = ttxy0 + 0.50 * (ttxx1 * vx + ttyy1 * uy + ttxy1 * vy + ttxz1 * vz + ttyx1 * ux + ttyz1 * uz);
+            fun0[4] = ttxz0 + 0.50 * (ttxx1 * wx + ttzz1 * uz + ttxy1 * wy + ttxz1 * wz + ttzx1 * ux + ttzy1 * uy);
+            fun0[5] = ttyz0 + 0.50 * (ttyy1 * wy + ttzz1 * vz + ttyx1 * wx + ttyz1 * wz + ttzx1 * vx + ttzy1 * vy);
+
+            fun0[6] = qx0 + ttxx1 * qx0 + ttxy1 * qy0 + ttxz1 * qz0;  //! NCCR
+            fun0[7] = qy0 + ttyx1 * qx0 + ttyy1 * qy0 + ttyz1 * qz0;
+            fun0[8] = qz0 + ttzx1 * qx0 + ttzy1 * qy0 + ttzz1 * qz0; 
+
+            fn = fun0[0] * ttxx1 + fun0[1] * ttyy1 + fun0[2] * ttzz1 + fun0[3] * 2.0 * ttxy1 + fun0[4] * 2.0 * ttxz1 + fun0[5] * 2.0 * ttyz1 + fun0[6] * qx1 + fun0[7] * qy1 + fun0[8] * qz1;
+            RN2 = asinh(c_nccr * fn / RN1) / c_nccr;
+
+            ttxx1 = fun0[0] * RN2 * RN1 / fn;
+            ttyy1 = fun0[1] * RN2 * RN1 / fn;
+            ttzz1 = -ttxx1 - ttyy1;
+            ttxy1 = fun0[3] * RN2 * RN1 / fn;
+            ttxz1 = fun0[4] * RN2 * RN1 / fn;
+            ttyz1 = fun0[5] * RN2 * RN1 / fn;
+            qx1 = fun0[6] * RN2 * RN1 / fn;
+            qy1 = fun0[7] * RN2 * RN1 / fn;
+            qz1 = fun0[8] * RN2 * RN1 / fn;
+            
+            ttyx1 = ttxy1;
+            ttzx1 = ttxz1;
+            ttzy1 = ttyz1;
+            ite_step++;
+        }
+        ttxx = ttxx1; ttyy = ttyy1; ttzz = ttzz1; ttxy = ttxy1; ttxz = ttxz1; ttyz = ttyz1; qx = qx1; qy = qy1; qz = qz1;
+    }
+    
+    sumstep = ite_step;
+}
+
+void NCCRSolverStruct::monosolver_NT(RDouble& ttxxux0, RDouble& ttxxvy0, RDouble& ttxxwz0, RDouble& ttyyux0, RDouble& ttyyvy0, RDouble& ttyywz0, RDouble& ttzzux0, RDouble& ttzzvy0, RDouble& ttzzwz0, RDouble& ttxyvx0, RDouble& ttyxuy0, RDouble& ttxzwx0, RDouble& ttzxuz0, RDouble& ttyzwy0, RDouble& ttzyvz0, RDouble& qx0, RDouble& qy0, RDouble& qz0, RDouble& ttxx, RDouble& ttyy, RDouble& ttzz, RDouble& ttxy, RDouble& ttxz, RDouble& ttyz, RDouble& qx, RDouble& qy, RDouble& qz, int& sumstep, RDouble& c_nccr, int& ERROR_NCCR)
+{
+    RDouble ttxx0, ttyy0, ttzz0, ttxy0, ttxz0, ttyz0;
+    RDouble ux, uy, uz, vx, vy, vz, wx, wy, wz;
+    RDouble ttxx1, ttyy1, ttzz1, ttxy1, ttyx1, ttxz1, ttzx1, ttyz1, ttzy1, qx1, qy1, qz1;
+    //double ttxx, ttyy, ttzz, ttxy, ttxz, ttyz, qx, qy, qz, delt_bk;
+    RDouble tol_nccr = 1.0e-3, norm;
+    vector<double> fun(8), fun1(9), dx_nt(9);
+    vector<vector<double>> dfun(8, vector<double>(8));
+
+    //! vector<vector<double>> dfun(8, vector<double>(8));
+    //! vector<double> fun0(9), fun1(9), fun2(9), fun3(9), Gradtf(8);
+
+    int ite_step = 0;
+
+    ttxx0 = ttxxux0 + ttxxvy0 + ttxxwz0;
+    ttyy0 = ttyyux0 + ttyyvy0 + ttyywz0;
+    ttzz0 = ttzzux0 + ttzzvy0 + ttzzwz0;
+    ttxy0 = ttxyvx0 + ttyxuy0;
+    ttxz0 = ttxzwx0 + ttzxuz0;
+    ttyz0 = ttyzwy0 + ttzyvz0;
+
+    ux = 1.50 * ttxxux0; vx = 2.0 * ttxyvx0; wx = 2.0 * ttxzwx0;
+    uy = 2.0 * ttyxuy0; vy = 1.50 * ttyyvy0; wy = 2.0 * ttyzwy0;
+    uz = 2.0 * ttzxuz0; vz = 2.0 * ttzyvz0; wz = 1.50 * ttzzwz0;
+
+    //double rn0 = sqrt(ttxx0*ttxx0 + ttyy0 * ttyy0 + (ttxx0 + ttyy0)*(ttxx0 + ttyy0) + 2.0*(ttxy0*ttxy0 + ttxz0 * ttxz0 + ttyz0 * ttyz0) + qx0 * qx0 + qy0 * qy0 + qz0 * qz0 + 2.0*gamapie / fb_nccr * delt0_bk*delt0_bk);
+    if (ERROR_NCCR == 0)
+    {
+        monosolver_CoupledCalculation(ttxxux0, ttxxvy0, ttxxwz0, ttyyux0, ttyyvy0, ttyywz0, ttzzux0, ttzzvy0, ttzzwz0, ttxyvx0, ttyxuy0, ttxzwx0, ttzxuz0, ttyzwy0, ttzyvz0, qx0, qy0, qz0, ttxx1, ttyy1, ttzz1, ttxy1, ttxz1, ttyz1, qx1, qy1, qz1, sumstep, c_nccr);
+    }
+    else if (ERROR_NCCR == 1)
+    {
+        ttxx1 = ttxx0;
+        ttyy1 = ttyy0;
+        ttzz1 = ttzz0;
+        ttxy1 = ttxy0;
+        ttxz1 = ttxz0;
+        ttyz1 = ttyz0;
+        ttyx1 = ttxy1;
+        ttzx1 = ttxz1;
+        ttzy1 = ttyz1;
+        qx1 = qx0;
+        qy1 = qy0;
+        qz1 = qz0;
+    }
+    else if (ERROR_NCCR == 2)
+    {
+        RDouble rn0 = sqrt(ttxx0 * ttxx0 + ttyy0 * ttyy0 + (ttxx0 + ttyy0) * (ttxx0 + ttyy0) + 2.0 * (ttxy0 * ttxy0 + ttxz0 * ttxz0 + ttyz0 * ttyz0) + qx0 * qx0 + qy0 * qy0 + qz0 * qz0);
+
+        ttxx1 = asinh(c_nccr * rn0) / c_nccr / rn0 * ttxx0;
+        ttyy1 = asinh(c_nccr * rn0) / c_nccr / rn0 * ttyy0;
+        ttzz1 = asinh(c_nccr * rn0) / c_nccr / rn0 * ttzz0;
+        ttxy1 = asinh(c_nccr * rn0) / c_nccr / rn0 * ttxy0;
+        ttxz1 = asinh(c_nccr * rn0) / c_nccr / rn0 * ttxz0;
+        ttyz1 = asinh(c_nccr * rn0) / c_nccr / rn0 * ttyz0;
+        ttyx1 = ttxy1;
+        ttzx1 = ttxz1;
+        ttzy1 = ttyz1;
+        qx1 = asinh(c_nccr * rn0) / c_nccr / rn0 * qx0;
+        qy1 = asinh(c_nccr * rn0) / c_nccr / rn0 * qy0;
+        qz1 = asinh(c_nccr * rn0) / c_nccr / rn0 * qz0;
+    }
+    else
+    {
+        cout << "This term is waiting for write." << endl;
+    };
+
+    norm = 1.0;
+
+    int successed = 1;
+
+    while (norm >= tol_nccr && ite_step <= 50)
+    {
+        fun_nccr_monatomic(ttxx1, ttyy1, ttxy1, ttxz1, ttyz1, qx1, qy1, qz1, c_nccr, ttxx0, ttyy0, ttxy0, ttxz0, ttyz0, qx0, qy0, qz0, ux, uy, uz, vx, vy, vz, wx, wy, wz, fun1);
+        for (int i = 0; i < 8; i++)
+        {
+            fun[i] = -1 * fun1[i];
+        }
+        
+
+        dfun_nccr_monatomic(ttxx1, ttyy1, ttxy1, ttxz1, ttyz1, qx1, qy1, qz1, c_nccr, ttxx0, ttyy0, ttxy0, ttxz0, ttyz0, qx0, qy0, qz0, ux, uy, uz, vx, vy, vz, wx, wy, wz, dfun);
+
+        Gaussian_elimination(dfun, fun, dx_nt, 9);
+
+        ttxx1 = ttxx1 + dx_nt[0];
+        ttyy1 = ttyy1 + dx_nt[1];
+        ttxy1 = ttxy1 + dx_nt[2];
+        ttxz1 = ttxz1 + dx_nt[3];
+        ttyz1 = ttyz1 + dx_nt[4];
+        qx1 = qx1 + dx_nt[5];
+        qy1 = qy1 + dx_nt[6];
+        qz1 = qz1 + dx_nt[7];
+
+        norm = sqrt(dx_nt[0] * dx_nt[0] + dx_nt[1] * dx_nt[1] + dx_nt[2] * dx_nt[2] + dx_nt[3] * dx_nt[3] + dx_nt[4] * dx_nt[4] + dx_nt[5] * dx_nt[5] + dx_nt[6] * dx_nt[6] + dx_nt[7] * dx_nt[7]);
+        ite_step++;
+
+    }
+    sumstep += ite_step;
+    ttxx = ttxx1; ttyy = ttyy1; ttzz = -ttxx1 - ttyy1; ttxy = ttxy1; ttxz = ttxz1; ttyz = ttyz1; qx = qx1; qy = qy1; qz = qz1;
+
+}
+
+void NCCRSolverStruct::diatsolver_CoupledCalculation(RDouble& ttxxux0, RDouble& ttxxvy0, RDouble& ttxxwz0, RDouble& ttyyux0, RDouble& ttyyvy0, RDouble& ttyywz0, RDouble& ttzzux0, RDouble& ttzzvy0, RDouble& ttzzwz0, RDouble& ttxyvx0, RDouble& ttyxuy0, RDouble& ttxzwx0, RDouble& ttzxuz0, RDouble& ttyzwy0, RDouble& ttzyvz0, RDouble& delt0_bk, RDouble& qx0, RDouble& qy0, RDouble& qz0, RDouble& ttxx, RDouble& ttyy, RDouble& ttzz, RDouble& ttxy, RDouble& ttxz, RDouble& ttyz, RDouble& delt_bk, RDouble& qx, RDouble& qy, RDouble& qz, int& sumstep, RDouble& c_nccr, RDouble gamapie)
+{
+    RDouble ttxx0, ttyy0, ttzz0, ttxy0, ttxz0, ttyz0, ux, uy, uz, vx, vy, vz, wx, wy, wz, ttxx1, ttyy1, ttzz1, ttxy1, ttxz1, ttyz1, ttyx1, ttzx1, ttzy1, qx1, qy1, qz1, RN0, RN1, RN2, delt1_bk;
+    RDouble fb_nccr = 0.8;
+    RDouble fun0[10]{}, fn;
+    int ite_step = 0;
+
+    ttxx0 = ttxxux0 + ttxxvy0 + ttxxwz0;
+    ttyy0 = ttyyux0 + ttyyvy0 + ttyywz0;
+    ttzz0 = ttzzux0 + ttzzvy0 + ttzzwz0;
+    ttxy0 = ttxyvx0 + ttyxuy0;
+    ttxz0 = ttxzwx0 + ttzxuz0;
+    ttyz0 = ttyzwy0 + ttzyvz0;
+
+    ux = 1.5 * ttxxux0; vx = 2.0 * ttxyvx0; wx = 2.0 * ttxzwx0;
+    uy = 2.0 * ttyxuy0; vy = 1.5 * ttyyvy0; wy = 2.0 * ttyzwy0;
+    uz = 2.0 * ttzxuz0; vz = 2.0 * ttzyvz0; wz = 1.5 * ttzzwz0;
+
+    RN0 = sqrt(ttxx0 * ttxx0 + ttyy0 * ttyy0 + ttzz0 * ttzz0 + 2.0 * ttxy0 * ttxy0 + 2.0 * ttxz0 * ttxz0 + 2.0 * ttyz0 * ttyz0 + qx0 * qx0 + qy0 * qy0 + qz0 * qz0 + 2 * gamapie / fb_nccr * delt0_bk * delt0_bk);
+
+    if (RN0 < 1.0E-10)
+    {
+        ttxx = ttxx0; ttyy = ttyy0; ttzz = ttzz0; ttxy = ttxy0; ttxz = ttxz0; ttyz = ttyz0; qx = qx0; qy = qy0; qz = qz0; delt_bk = delt0_bk;
+    }
+    else
+    {
+        ttxx1 = asinh(c_nccr * RN0) / c_nccr / RN0 * ttxx0;
+        ttyy1 = asinh(c_nccr * RN0) / c_nccr / RN0 * ttyy0;
+        ttzz1 = asinh(c_nccr * RN0) / c_nccr / RN0 * ttzz0;
+        ttxy1 = asinh(c_nccr * RN0) / c_nccr / RN0 * ttxy0;
+        ttxz1 = asinh(c_nccr * RN0) / c_nccr / RN0 * ttxz0;
+        ttyz1 = asinh(c_nccr * RN0) / c_nccr / RN0 * ttyz0;
+        ttyx1 = ttxy1;
+        ttzx1 = ttxz1;
+        ttzy1 = ttyz1;
+        qx1 = asinh(c_nccr * RN0) / c_nccr / RN0 * qx0;
+        qy1 = asinh(c_nccr * RN0) / c_nccr / RN0 * qy0;
+        qz1 = asinh(c_nccr * RN0) / c_nccr / RN0 * qz0;
+        delt1_bk = asinh(c_nccr * RN0) / c_nccr / RN0 * delt0_bk;
+
+        RN1 = 0.0;
+        RN2 = 1.0;
+
+        while (fabs(RN2 - RN1) > 1.0e-5 && ite_step < 100)
+        {
+            RN1 = sqrt(ttxx1 * ttxx1 + ttyy1 * ttyy1 + ttzz1 * ttzz1 + 2.0 * ttxy1 * ttxy1 + 2.0 * ttxz1 * ttxz1 + 2.0 * ttyz1 * ttyz1 + qx1 * qx1 + qy1 * qy1 + qz1 * qz1 + 2 * gamapie / fb_nccr * delt1_bk * delt1_bk);
+
+            fun0[0] = (1.0 + delt1_bk) * ttxx0 + 2.0 / 3.0 * (ttxx1 * ux + ttxy1 * uy + ttxz1 * uz) - 1.0 / 3.0 * (ttyx1 * vx + ttyy1 * vy + ttyz1 * vz + ttzx1 * wx + ttzy1 * wy + ttzz1 * wz);
+
+            fun0[1] = (1.0 + delt1_bk) * ttyy0 + 2.0 / 3.0 * (ttyx1 * vx + ttyy1 * vy + ttyz1 * vz) - 1.0 / 3.0 * (ttxx1 * ux + ttxy1 * uy + ttxz1 * uz + ttzx1 * wx + ttzy1 * wy + ttzz1 * wz);
+
+            fun0[2] = -fun0[0] - fun0[1];
+            fun0[3] = (1.0 + delt1_bk) * ttxy0 + 0.50 * (ttxx1 * vx + ttyy1 * uy + ttxy1 * vy + ttxz1 * vz + ttyx1 * ux + ttyz1 * uz);
+            fun0[4] = (1.0 + delt1_bk) * ttxz0 + 0.50 * (ttxx1 * wx + ttzz1 * uz + ttxy1 * wy + ttxz1 * wz + ttzx1 * ux + ttzy1 * uy);
+            fun0[5] = (1.0 + delt1_bk) * ttyz0 + 0.50 * (ttyy1 * wy + ttzz1 * vz + ttyx1 * wx + ttyz1 * wz + ttzx1 * vx + ttzy1 * vy);
+
+            fun0[6] = (1.0 + delt1_bk) * qx0 + ttxx1 * qx0 + ttxy1 * qy0 + ttxz1 * qz0;  //! NCCR
+            fun0[7] = (1.0 + delt1_bk) * qy0 + ttyx1 * qx0 + ttyy1 * qy0 + ttyz1 * qz0;
+            fun0[8] = (1.0 + delt1_bk) * qz0 + ttzx1 * qx0 + ttzy1 * qy0 + ttzz1 * qz0;
+
+            fun0[9] = delt0_bk + 3.0 / 2.0 * fb_nccr * (ttxx1 * ux + ttxy1 * vx + ttxz1 * wx + ttyx1 * uy + ttyy1 * vy + ttyz1 * wy + ttzx1 * uz + ttzy1 * vz + ttzz1 * wz + delt1_bk * (ux + vy + wz));
+
+            fn = fun0[0] * ttxx1 + fun0[1] * ttyy1 + fun0[2] * ttzz1 + fun0[3] * 2.0 * ttxy1 + fun0[4] * 2.0 * ttxz1 + fun0[5] * 2.0 * ttyz1 + fun0[6] * qx1 + fun0[7] * qy1 + fun0[8] * qz1 + fun0[9] * 2.0 * gamapie / fb_nccr * delt1_bk;
+            RN2 = asinh(c_nccr * fn / RN1) / c_nccr;
+
+            ttxx1 = fun0[0] * RN2 * RN1 / fn;
+            ttyy1 = fun0[1] * RN2 * RN1 / fn;
+            ttzz1 = -ttxx1 - ttyy1;
+            ttxy1 = fun0[3] * RN2 * RN1 / fn;
+            ttxz1 = fun0[4] * RN2 * RN1 / fn;
+            ttyz1 = fun0[5] * RN2 * RN1 / fn;
+            qx1 = fun0[6] * RN2 * RN1 / fn;
+            qy1 = fun0[7] * RN2 * RN1 / fn;
+            qz1 = fun0[8] * RN2 * RN1 / fn;
+            delt1_bk = fun0[9] * RN2 * RN1 / fn;
+            ttyx1 = ttxy1;
+            ttzx1 = ttxz1;
+            ttzy1 = ttyz1;
+            ite_step++;
+        }
+        ttxx = ttxx1; ttyy = ttyy1; ttzz = ttzz1; ttxy = ttxy1; ttxz = ttxz1; ttyz = ttyz1; qx = qx1; qy = qy1; qz = qz1; delt_bk = delt1_bk;
+    }
+
+    sumstep = ite_step;
+}
+
+void NCCRSolverStruct::diatsolver_NT(RDouble ttxxux0, RDouble ttxxvy0, RDouble ttxxwz0, RDouble ttyyux0, RDouble ttyyvy0, RDouble ttyywz0, RDouble ttzzux0, RDouble ttzzvy0, RDouble ttzzwz0, RDouble ttxyvx0, RDouble ttyxuy0, RDouble ttxzwx0, RDouble ttzxuz0, RDouble ttyzwy0, RDouble ttzyvz0, RDouble qx0, RDouble qy0, RDouble qz0, RDouble delt0_bk, RDouble& ttxx, RDouble& ttyy, RDouble& ttzz, RDouble& ttxy, RDouble& ttxz, RDouble& ttyz, RDouble& qx, RDouble& qy, RDouble& qz, RDouble& delt_bk, int& sumstep, RDouble c_nccr, RDouble gamapie, int& ERROR_NCCR, int& successed)
+{
+    RDouble ttxx0, ttyy0, ttzz0, ttxy0, ttxz0, ttyz0;
+    RDouble ux, uy, uz, vx, vy, vz, wx, wy, wz;
+    RDouble ttxx1, ttyy1, ttzz1, ttxy1, ttyx1, ttxz1, ttzx1, ttyz1, ttzy1, qx1, qy1, qz1, delt1_bk;
+    RDouble tol_nccr, norm;
+    vector<RDouble> fun(9), fun1(9), dx_nt(9);
+    vector<vector<RDouble>> dfun(9, vector<RDouble>(9));
+
+    for (int temp0 = 0; temp0 < 9; temp0++)
+    {
+        fun[temp0] = 0.0;
+        fun1[temp0] = 0.0;
+        dx_nt[temp0] = 0.0;
+        for (int temp1 = 0; temp1 < 9; temp1++)
+        {
+            dfun[temp0][temp1] = 0.0;
+        }
+    }
+
+    int ite_step=0;
+
+    RDouble fb_nccr = 0.8;
+
+    tol_nccr = 1.0e-3;
+    sumstep = 0;
+
+    ttxx0 = ttxxux0 + ttxxvy0 + ttxxwz0;
+    ttyy0 = ttyyux0 + ttyyvy0 + ttyywz0;
+    ttzz0 = ttzzux0 + ttzzvy0 + ttzzwz0;
+    ttxy0 = ttxyvx0 + ttyxuy0;
+    ttxz0 = ttxzwx0 + ttzxuz0;
+    ttyz0 = ttyzwy0 + ttzyvz0;
+
+    ux = 1.5 * ttxxux0; vx = 2.0 * ttxyvx0; wx = 2.0 * ttxzwx0;
+    uy = 2.0 * ttyxuy0; vy = 1.5 * ttyyvy0; wy = 2.0 * ttyzwy0;
+    uz = 2.0 * ttzxuz0; vz = 2.0 * ttzyvz0; wz = 1.5 * ttzzwz0;
+
+    if (ERROR_NCCR == 0)
+    {
+        diatsolver_CoupledCalculation(ttxxux0, ttxxvy0, ttxxwz0, ttyyux0, ttyyvy0, ttyywz0, ttzzux0, ttzzvy0, ttzzwz0, ttxyvx0, ttyxuy0, ttxzwx0, ttzxuz0, ttyzwy0, ttzyvz0, delt0_bk, qx0, qy0, qz0, ttxx1, ttyy1, ttzz1, ttxy1, ttxz1, ttyz1, delt1_bk, qx1, qy1, qz1, sumstep, c_nccr, 0.4);
+    }
+    else if (ERROR_NCCR == 1)
+    {
+        ttxx1 = ttxx0;
+        ttyy1 = ttyy0;
+        ttzz1 = ttzz0;
+        ttxy1 = ttxy0;
+        ttxz1 = ttxz0;
+        ttyz1 = ttyz0;
+        ttyx1 = ttxy1;
+        ttzx1 = ttxz1;
+        ttzy1 = ttyz1;
+        qx1 = qx0;
+        qy1 = qy0;
+        qz1 = qz0;
+        delt1_bk = delt0_bk;
+    }
+    else if (ERROR_NCCR == 2)
+    {
+        RDouble rn0 = sqrt(ttxx0 * ttxx0 + ttyy0 * ttyy0 + (ttxx0 + ttyy0) * (ttxx0 + ttyy0) + 2.0 * (ttxy0 * ttxy0 + ttxz0 * ttxz0 + ttyz0 * ttyz0) + qx0 * qx0 + qy0 * qy0 + qz0 * qz0 + 2.0 * gamapie / fb_nccr * delt0_bk * delt0_bk);
+
+        ttxx1 = asinh(c_nccr * rn0) / c_nccr / rn0 * ttxx0;
+        ttyy1 = asinh(c_nccr * rn0) / c_nccr / rn0 * ttyy0;
+        ttzz1 = asinh(c_nccr * rn0) / c_nccr / rn0 * ttzz0;
+        ttxy1 = asinh(c_nccr * rn0) / c_nccr / rn0 * ttxy0;
+        ttxz1 = asinh(c_nccr * rn0) / c_nccr / rn0 * ttxz0;
+        ttyz1 = asinh(c_nccr * rn0) / c_nccr / rn0 * ttyz0;
+        ttyx1 = ttxy1;
+        ttzx1 = ttxz1;
+        ttzy1 = ttyz1;
+        qx1 = asinh(c_nccr * rn0) / c_nccr / rn0 * qx0;
+        qy1 = asinh(c_nccr * rn0) / c_nccr / rn0 * qy0;
+        qz1 = asinh(c_nccr * rn0) / c_nccr / rn0 * qz0;
+        delt1_bk = asinh(c_nccr * rn0) / c_nccr / rn0 * delt0_bk;
+    }
+    else
+    {
+        cout << "This part is waiting for writing!" << endl;
+    }
+
+    norm = 1.0;
+
+    while (norm > tol_nccr)
+    {
+        fun_nccr_diatomic(ttxx1, ttyy1, ttxy1, ttxz1, ttyz1, qx1, qy1, qz1, delt1_bk, c_nccr, gamapie, ttxx0, ttyy0, ttxy0, ttxz0, ttyz0, qx0, qy0, qz0, delt0_bk, ux, uy, uz, vx, vy, vz, wx, wy, wz, fun1);
+
+        for (int i = 0; i < 9; i++)
+        {
+            fun[i] = -fun1[i];
+        }
+        
+
+        dfun_nccr_diatomic(ttxx1, ttyy1, ttxy1, ttxz1, ttyz1, qx1, qy1, qz1, delt1_bk, c_nccr, gamapie, ttxx0, ttyy0, ttxy0, ttxz0, ttyz0, qx0, qy0, qz0, delt0_bk, ux, uy, uz, vx, vy, vz, wx, wy, wz, dfun);
+
+        Gaussian_elimination(dfun, fun, dx_nt, 9);
+
+        ttxx1 = ttxx1 + dx_nt[0];
+        ttyy1 = ttyy1 + dx_nt[1];
+        ttxy1 = ttxy1 + dx_nt[2];
+        ttxz1 = ttxz1 + dx_nt[3];
+        ttyz1 = ttyz1 + dx_nt[4];
+        qx1 = qx1 + dx_nt[5];
+        qy1 = qy1 + dx_nt[6];
+        qz1 = qz1 + dx_nt[7];
+        delt1_bk = delt1_bk + dx_nt[8];
+
+        norm = sqrt(dx_nt[0] * dx_nt[0] + dx_nt[1] * dx_nt[1] + dx_nt[2] * dx_nt[2] + dx_nt[3] * dx_nt[3] + dx_nt[4] * dx_nt[4] + dx_nt[5] * dx_nt[5] + dx_nt[6] * dx_nt[6] + dx_nt[7] * dx_nt[7] + dx_nt[8] * dx_nt[8]);
+        ite_step++;
+
+        if (ite_step > 100)
+        {
+            cout << "newton cannot converge" << endl;
+            cout << "ite_step is " << ite_step << endl;
+
+            successed = 0;
+
+            break;
+        }
+
+    }
+    sumstep = ite_step;
+    ttxx = ttxx1; ttyy = ttyy1; ttzz = -ttxx1 - ttyy1; ttxy = ttxy1; ttxz = ttxz1; ttyz = ttyz1; qx = qx1; qy = qy1; qz = qz1; delt_bk = delt1_bk;
+}
+
+
+void NCCRSolverStruct::CompVisFluxLES(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &gradqx = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D &gradqy = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D &gradqz = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+
+    RDouble4D &gradtx = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D &gradty = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D &gradtz = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceZ"));
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+
+    RDouble3D &vist = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &subgridScaleEnergy = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+    RDouble3D &turbulentPrandtlNumber = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("turbulentPrandtlNumber"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    RDouble refGama = parameters->GetRefGama();
+    int nElectronIndex = parameters->GetIndexOfElectron();
+
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    //RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int nrokplus = GlobalDataBase::GetIntParaFromDB("nrokplus");
+    RDouble4D *heatConductivity = 0, *massDiffusionCoef = 0, *speciesEnthalpy = 0;
+    if (nChemical > 0)
+    {
+        heatConductivity = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("lambda"));
+        massDiffusionCoef = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rhoD"));
+        speciesEnthalpy = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("hSpecies"));
+    }
+    RDouble kcp[3] = { 0 }, heatFlux = 0.0, dcsdx = 0.0, dcsdy = 0.0, dcsdz = 0.0, hs = 0.0, roDs = 0.0;
+    RDouble Tv = 0.0, Te = 0.0, energy = 0.0;
+    RDouble4D *q_turb = 0, *aniss = 0;
+    if (nrokplus > 0)
+    {
+        q_turb = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_turb"));
+        aniss = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("aniss"));
+    }
+
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+    RDouble *qlr = new RDouble[nEquation]();
+    RDouble *fslr = new RDouble[numberOfSpecies]();
+    RDouble *dfsdx = new RDouble[numberOfSpecies]();
+    RDouble *dfsdy = new RDouble[numberOfSpecies]();
+    RDouble *dfsdz = new RDouble[numberOfSpecies]();
+    RDouble *fvis = new RDouble[nEquation]();
+    RDouble *work = new RDouble[nEquation]();
+    RDouble *vibrationEnergy = new RDouble[numberOfSpecies]();
+    RDouble *electronEnergy = new RDouble[numberOfSpecies]();
+
+    int iFaceStart = 0, iFaceEnd = 0, jFaceStart = 0, jFaceEnd = 0, kFaceStart = 0, kFaceEnd = 0;
+    grid->GetFaceIterationIndex(iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd, iSurface);
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    using namespace IDX;
+
+    string sgsmodel = " ";
+    GlobalDataBase::GetData("sgsmodel", &sgsmodel, PHSTRING, 1);
+
+    int monitorVistmax = GlobalDataBase::GetIntParaFromDB("monitor_vistmax");
+
+    RDouble viscousTurbulenceMaximum = -1.0e30;
+    RDouble viscousTurbulenceMinimum = 1.0e30;
+
+    int imax = 1;
+    int jmax = 1;
+    int kmax = 1;
+
+    int imin = 1;
+    int jmin = 1;
+    int kmin = 1;
+
+    for (int k = kFaceStart; k <= kFaceEnd; ++ k)
+    {
+        for (int j = jFaceStart; j <= jFaceEnd; ++ j)
+        {
+            for (int i = iFaceStart; i <= iFaceEnd; ++ i)
+            {
+                int il, jl, kl;
+                grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                //! Note that if we use iSurface,there must be no omission.
+                RDouble nx = xfv(il, jl, kl, iSurface);
+                RDouble ny = yfv(il, jl, kl, iSurface);
+                RDouble nz = zfv(il, jl, kl, iSurface);
+
+                RDouble um = half * (q(il, jl, kl, IU) + q(i, j, k, IU));
+                RDouble vm = half * (q(il, jl, kl, IV) + q(i, j, k, IV));
+                RDouble wm = half * (q(il, jl, kl, IW) + q(i, j, k, IW));
+
+                RDouble mul = half * (viscousLaminar(il, jl, kl) + viscousLaminar(i, j, k));
+
+                RDouble dudx = gradqx(il, jl, kl, IU);
+                RDouble dudy = gradqy(il, jl, kl, IU);
+                RDouble dudz = gradqz(il, jl, kl, IU);
+
+                RDouble dvdx = gradqx(il, jl, kl, IV);
+                RDouble dvdy = gradqy(il, jl, kl, IV);
+                RDouble dvdz = gradqz(il, jl, kl, IV);
+
+                RDouble dwdx = gradqx(il, jl, kl, IW);
+                RDouble dwdy = gradqy(il, jl, kl, IW);
+                RDouble dwdz = gradqz(il, jl, kl, IW);
+
+                RDouble dtdx = gradtx(il, jl, kl, ITT);
+                RDouble dtdy = gradty(il, jl, kl, ITT);
+                RDouble dtdz = gradtz(il, jl, kl, ITT);
+
+                RDouble oPrandtlTurbulence = 2.0 / (turbulentPrandtlNumber(il, jl, kl) + turbulentPrandtlNumber(i, j, k));
+
+                RDouble mut = half * (vist(il, jl, kl) + vist(i, j, k));
+
+                RDouble hfxSGS = -mut * specificHeatAtConstantPressure * oPrandtlTurbulence * dtdx;
+                RDouble hfySGS = -mut * specificHeatAtConstantPressure * oPrandtlTurbulence * dtdy;
+                RDouble hfzSGS = -mut * specificHeatAtConstantPressure * oPrandtlTurbulence * dtdz;
+
+                if (nChemical == 0)
+                {
+                    kcp[ITT] = (mul * oPrandtlLaminar) * specificHeatAtConstantPressure;
+                    heatFlux = kcp[ITT] * (nx * dtdx + ny * dtdy + nz * dtdz) - (nx * hfxSGS + ny * hfySGS + nz * hfzSGS);
+                }
+                else
+                {
+                    kcp[ITT] = 0.5 * ((*heatConductivity)(i, j, k, ITT) + (*heatConductivity)(il, jl, kl, ITT));
+                    heatFlux = kcp[ITT] * (nx * dtdx + ny * dtdy + nz * dtdz);
+                    for (int it = 1; it < nTemperatureModel; ++ it)
+                    {
+                        dtdx = gradtx(il, jl, kl, it);
+                        dtdy = gradty(il, jl, kl, it);
+                        dtdz = gradtz(il, jl, kl, it);
+                        kcp[it] = 0.5 * ((*heatConductivity)(i, j, k, it) + (*heatConductivity)(il, jl, kl, it));
+                        fvis[nLaminar + it] = kcp[it] * (nx * dtdx + ny * dtdy + nz * dtdz);
+                        heatFlux += fvis[nLaminar + it];
+                    }
+
+                    //! Obtain the gradient of species.
+                    for (int s = 0; s < numberOfSpecies; ++ s)
+                    {
+                        dcsdx = gradqx(il, jl, kl, nNSEquation + s);
+                        dcsdy = gradqy(il, jl, kl, nNSEquation + s);
+                        dcsdz = gradqz(il, jl, kl, nNSEquation + s);
+                        hs = 0.5 * ((*speciesEnthalpy)(i, j, k, s) + (*speciesEnthalpy)(il, jl, kl, s));
+                        roDs = 0.5 * ((*massDiffusionCoef)(i, j, k, s) + (*massDiffusionCoef)(il, jl, kl, s));
+
+                        fvis[nNSEquation + s] = roDs * (nx * dcsdx + ny * dcsdy + nz * dcsdz);
+                        heatFlux += hs * fvis[nNSEquation + s];
+                    }
+
+                    if (nTemperatureModel == 2)
+                    {
+                        Tv = 0.5 * (t(i, j, k, ITV) + t(il, jl, kl, ITV));
+                        //! Compute the vibration and electron energies.
+                        gas->ComputeVibrationEnergy(Tv, vibrationEnergy);
+                        gas->ComputeElectronEnergy(Tv, electronEnergy);
+                        for (int s = 0; s < numberOfSpecies; ++ s)
+                        {
+                            energy = vibrationEnergy[s] + electronEnergy[s];
+                            fvis[nLaminar + 1] += energy * fvis[nNSEquation + s];
+                        }
+                    }
+                    else if (nTemperatureModel == 3)
+                    {
+                        Tv = 0.5 * (t(i, j, k, ITV) + t(il, jl, kl, ITV));
+                        Te = 0.5 * (t(i, j, k, ITE) + t(il, jl, kl, ITE));
+                        //! Compute the vibration and electron energies.
+                        gas->ComputeVibrationEnergy(Tv, vibrationEnergy);
+                        gas->ComputeElectronEnergy(Te, electronEnergy);
+                        for (int s = 0; s < numberOfSpecies; ++ s)
+                        {
+                            fvis[nLaminar + 1] += vibrationEnergy[s] * fvis[nNSEquation + s];
+                            fvis[nLaminar + 2] += electronEnergy[s] * fvis[nNSEquation + s];
+                        }
+                    }
+                    fvis[nLaminar] = 0.0;
+                    if (nElectronIndex >= 0)
+                    {
+                        fvis[nLaminar - 1] = 0.0;
+                    }
+                }
+
+                RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+                //! viscous stress and subgrid scale stress
+                RDouble txx = mul * (two * dudx - divv2p3);
+                RDouble tyy = mul * (two * dvdy - divv2p3);
+                RDouble tzz = mul * (two * dwdz - divv2p3);
+                RDouble txy = mul * (dudy + dvdx);
+                RDouble txz = mul * (dudz + dwdx);
+                RDouble tyz = mul * (dvdz + dwdy);
+
+                //RDouble ci = 0.5 * (isotropicConstant(il, jl, kl) + isotropicConstant(i, j, k));
+                //RDouble kSGS = 2.0 * rhom * ci * ss * ss * refReNumber;
+                RDouble kSGS = half * (subgridScaleEnergy(il, jl, kl) + subgridScaleEnergy(i, j, k));
+
+                RDouble txxSGS = -mut * (two * dudx - divv2p3) + 1.0 / 3.0 * kSGS;
+                RDouble tyySGS = -mut * (two * dvdy - divv2p3) + 1.0 / 3.0 * kSGS;
+                RDouble tzzSGS = -mut * (two * dwdz - divv2p3) + 1.0 / 3.0 * kSGS;
+                RDouble txySGS = -mut * (dudy + dvdx);
+                RDouble txzSGS = -mut * (dudz + dwdx);
+                RDouble tyzSGS = -mut * (dvdz + dwdy);
+
+                fvis[IR] = 0.0;
+                fvis[IDX::IRU] = nx * (txx - txxSGS) + ny * (txy - txySGS) + nz * (txz - txzSGS);
+                fvis[IDX::IRV] = nx * (txy - txySGS) + ny * (tyy - tyySGS) + nz * (tyz - tyzSGS);
+                fvis[IDX::IRW] = nx * (txz - txzSGS) + ny * (tyz - tyzSGS) + nz * (tzz - tzzSGS);
+                fvis[IDX::IRE] = um * fvis[IRU] + vm * fvis[IRV] + wm * fvis[IRW] + heatFlux;
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    flux(il, jl, kl, m) = -oRefReNumber * fvis[m];
+                }
+
+                if (viscousTurbulenceMaximum < mut)
+                {
+                    viscousTurbulenceMaximum = mut;
+                    imax = i;
+                    jmax = j;
+                    kmax = k;
+                }
+
+                if (viscousTurbulenceMinimum > mut)
+                {
+                    viscousTurbulenceMinimum = mut;
+                    imin = i;
+                    jmin = j;
+                    kmin = k;
+                }
+
+            }
+        }
+    }
+
+    RDouble vist_max = viscousTurbulenceMaximum;
+    RDouble vist_min = viscousTurbulenceMinimum;
+
+    grid->UpdateData("vist_max", &vist_max, PHDOUBLE, 1);
+    grid->UpdateData("vist_min", &vist_min, PHDOUBLE, 1);
+
+#ifdef PH_PARALLEL
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if (myid == server)
+    {
+#endif
+        if (monitorVistmax)
+        {
+            cout << "vistmax = " << viscousTurbulenceMaximum << " " << imax << " " << jmax << " " << kmax << "\n";
+            cout << "vistmin = " << viscousTurbulenceMinimum << " " << imin << " " << jmin << " " << kmin << "\n";
+        }
+#ifdef PH_PARALLEL
+    }
+#endif
+
+    delete[]fvis;    fvis = NULL;
+    delete[]work;    work = NULL;
+    delete[]qlr;    qlr = NULL;
+    delete[]fslr;    fslr = NULL;
+    delete[]dfsdx;    dfsdx = NULL;
+    delete[]dfsdy;    dfsdy = NULL;
+    delete[]dfsdz;    dfsdz = NULL;
+    delete[]vibrationEnergy;    vibrationEnergy = NULL;
+    delete[]electronEnergy;    electronEnergy = NULL;
+}
+
+void NCCRSolverStruct::LoadFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    Range M(0, nEquation - 1);
+
+    residual(I, J, K, M) -= (flux(I + il1, J + jl1, K + kl1, M) - flux(I, J, K, M));
+}
+
+void NCCRSolverStruct::UpdateQlQrOnlyforMixGrid(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    FieldProxy *qlProxy = new FieldProxy();
+    FieldProxy *qrProxy = new FieldProxy();
+
+    int nDim = GetDim();
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        if (iSurface == 1)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1")));
+        }
+        else if (iSurface == 2)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2")));
+        }
+        else
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3")));
+        }
+
+        //! Apply the limiter to compute left-side variable QL and right-side variable QR.
+        GetInvFaceVar(grid, qlProxy, qrProxy, iSurface);
+
+        //! Modify the variables of the wall boundary faces-clz begin.
+        CorrectFaceVar(grid, qlProxy, qrProxy, iSurface);
+    }
+
+    delete qlProxy;
+    delete qrProxy;
+}
+
+void NCCRSolverStruct::UpdateInviscidfluxOnlyforMixGrid(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int structureScheme = GlobalDataBase::GetIntParaFromDB("str_scheme");
+    INVScheme inviscidScheme = GetINVScheme(structureScheme);
+
+    FieldProxy *qlProxy = new FieldProxy();
+    FieldProxy *qrProxy = new FieldProxy();
+    FieldProxy *fluxProxy = new FieldProxy();
+
+    int nDim = GetDim();
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        if (iSurface == 1)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1")));
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI")));
+        }
+        else if (iSurface == 2)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2")));
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ")));
+        }
+        else
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3")));
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK")));
+        }
+
+        //! To compute the inviscid flux of the faces using the QL and QR.
+        InviscidFluxWrap(grid, qlProxy, qrProxy, fluxProxy, inviscidScheme, iSurface);
+    }
+
+    delete qlProxy;
+    delete qrProxy;
+    delete fluxProxy;
+}
+
+void NCCRSolverStruct::UpdateViscousfluxOnlyforMixGrid(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+    if (viscousType == INVISCID) return;
+
+    FieldProxy *fluxProxy = new FieldProxy();
+
+    int nDim = GetDim();
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        if (iSurface == 1)
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxI")));
+        }
+        else if (iSurface == 2)
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxJ")));
+        }
+        else
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxK")));
+        }
+
+        ReconGradVolWeightedwithCorrection(gridIn, iSurface);
+
+        CompVisFluxnew(grid, fluxProxy, iSurface);
+    }
+    delete fluxProxy;
+}
+
+void NCCRSolverStruct::LoadGlobalfacefluxtoResOnlyforMixGrid(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+
+    RDouble4D &faceInviscidfluxI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI"));
+    RDouble4D &faceInviscidfluxJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ"));
+    RDouble4D &faceInviscidfluxK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK"));
+
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni - 1;
+    int jed = nj - 1;
+    int ked = nk - 1;
+
+    if (nk == 1)
+    {
+        ked = 1;
+    }
+
+    for (int m = 0; m < 5; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    residual(i, j, k, m) -= faceInviscidfluxI(i + 1, j, k, m) - faceInviscidfluxI(i, j, k, m);
+                    residual(i, j, k, m) -= faceInviscidfluxJ(i, j + 1, k, m) - faceInviscidfluxJ(i, j, k, m);
+                    if (nk == 1) continue;
+                    residual(i, j, k, m) -= faceInviscidfluxK(i, j, k + 1, m) - faceInviscidfluxK(i, j, k, m);
+                }
+            }
+        }
+    }
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+    if (viscousType == INVISCID) return;
+
+    RDouble4D &faceViscousfluxI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxI"));
+    RDouble4D &faceViscousfluxJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxJ"));
+    RDouble4D &faceViscousfluxK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxK"));
+
+    for (int m = 0; m < 5; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    residual(i, j, k, m) -= faceViscousfluxI(i + 1, j, k, m) - faceViscousfluxI(i, j, k, m);
+                    residual(i, j, k, m) -= faceViscousfluxJ(i, j + 1, k, m) - faceViscousfluxJ(i, j, k, m);
+                    if (nk == 1) continue;
+                    residual(i, j, k, m) -= faceViscousfluxK(i, j, k + 1, m) - faceViscousfluxK(i, j, k, m);
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::CorrectFaceVar(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &ql = qlProxy->GetField_STR();
+    RDouble4D &qr = qrProxy->GetField_STR();
+    RDouble4D &primitveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+
+    RDouble4D &faceVelocityX = *(grid->GetFaceVelocityX());
+    RDouble4D &faceVelocityY = *(grid->GetFaceVelocityY());
+    RDouble4D &faceVelocityZ = *(grid->GetFaceVelocityZ());
+
+    int viscousType = parameters->GetViscousType();
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble temperatureWall = wallTemperature / refDimensionalTemperature;
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (gridIn->GetDataPtr("surfaceSlipVariables"));
+    }
+
+    using namespace GAS_SPACE;
+
+    RDouble coefficientofstateEquation = gas->GetCoefficientOfStateEquation();
+
+    int nEquation = GetNumberOfEquations();
+    RDouble *wallVariables = new RDouble[nEquation];
+
+    using namespace IDX;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int nWallBC = 0, nIndexOfCell = 0;
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    int isAle = parameters->GetIsCodeOfAleModel();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int nBCType = structBC->GetBCType();
+
+        if (!IsWall(nBCType) && nBCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        RDouble uWall = 0.0;
+        RDouble vWall = 0.0;
+        RDouble wWall = 0.0;
+
+        vector<SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+
+        if (globalBCList != 0)
+        {
+            vector<SimpleBC *>::iterator iter;
+            for (iter = globalBCList->begin(); iter != globalBCList->end(); ++ iter)
+            {
+                SimpleBC *boundaryCondition = *iter;
+                string BCName = structBC->GetBCName();
+
+                if (BCName != boundaryCondition->GetBCName())
+                {
+                    continue;
+                }
+
+                if (boundaryCondition->CheckParamData("uWall"))
+                {
+                    boundaryCondition->GetParamData("uWall", &uWall, PHDOUBLE, 1);
+                }
+
+                if (boundaryCondition->CheckParamData("vWall"))
+                {
+                    boundaryCondition->GetParamData("vWall", &vWall, PHDOUBLE, 1);
+                }
+
+                if (boundaryCondition->CheckParamData("wWall"))
+                {
+                    boundaryCondition->GetParamData("wWall", &wWall, PHDOUBLE, 1);
+                }
+            }
+        }
+
+        int *faceDirectionIndex = structBC->GetFaceDirectionIndex();
+        int directionIndex = structBC->GetFaceDirection() + 1;
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (directionIndex != iSurface)
+        {
+            continue;
+        }
+
+        //! The following treatment places subscripts on BCFace.
+        //! Modified by clz : 2012-7-10.
+        int id, jd, kd;
+        GetBCFaceIDX(faceDirectionIndex, id, jd, kd);
+        kst = kst + kd;
+        ked = ked + kd;
+        jst = jst + jd;
+        jed = jed + jd;
+        ist = ist + id;
+        ied = ied + id;
+
+        int di, dj, dk;
+        di = ABS(faceDirectionIndex[0]);
+        dj = ABS(faceDirectionIndex[1]);
+        dk = ABS(faceDirectionIndex[2]);
+        nIndexOfCell = 0;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int il = i - di;
+                    int jl = j - dj;
+                    int kl = k - dk;
+
+                    RDouble velocityXWall = uWall;
+                    RDouble velocityYWall = vWall;
+                    RDouble velocityZWall = wWall;
+
+                    if (nSlipBCModel > 0)
+                    {
+                        velocityXWall += (*surfaceSlipVariables)(nWallBC, nIndexOfCell, 3);
+                        velocityYWall += (*surfaceSlipVariables)(nWallBC, nIndexOfCell, 4);
+                        velocityZWall += (*surfaceSlipVariables)(nWallBC, nIndexOfCell, 5);
+                    }
+
+                    if (isUnsteady && isAle)
+                    {
+                        velocityXWall += faceVelocityX(i, j, k, iSurface);
+                        velocityYWall += faceVelocityY(i, j, k, iSurface);
+                        velocityZWall += faceVelocityZ(i, j, k, iSurface);
+                    }
+
+                    if (viscousType == INVISCID)
+                    {
+                        RDouble nxs = faceNormalComponentX(i, j, k, iSurface);
+                        RDouble nys = faceNormalComponentY(i, j, k, iSurface);
+                        RDouble nzs = faceNormalComponentZ(i, j, k, iSurface);
+
+                        RDouble vx = primitveVariables(i - id, j - jd, k - kd, IU);
+                        RDouble vy = primitveVariables(i - id, j - jd, k - kd, IV);
+                        RDouble vz = primitveVariables(i - id, j - jd, k - kd, IW);
+                        RDouble vn = nxs * vx + nys * vy + nzs * vz;
+
+                        ql(il, jl, kl, IR) = primitveVariables(i - id, j - jd, k - kd, IR);
+                        ql(il, jl, kl, IU) = primitveVariables(i - id, j - jd, k - kd, IU) - nxs * vn;
+                        ql(il, jl, kl, IV) = primitveVariables(i - id, j - jd, k - kd, IV) - nys * vn;
+                        ql(il, jl, kl, IW) = primitveVariables(i - id, j - jd, k - kd, IW) - nzs * vn;
+                        ql(il, jl, kl, IP) = primitveVariables(i - id, j - jd, k - kd, IP);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            qr(i, j, k, m) = ql(il, jl, kl, m);
+                        }
+                    }
+                    else if (wallTemperature <= 0.0)
+                    {
+                        //! Viscous wall, adiabatic.
+                        ql(il, jl, kl, IR) = primitveVariables(i - id, j - jd, k - kd, IR);
+                        ql(il, jl, kl, IU) = velocityXWall;
+                        ql(il, jl, kl, IV) = velocityYWall;
+                        ql(il, jl, kl, IW) = velocityZWall;
+                        ql(il, jl, kl, IP) = primitveVariables(i - id, j - jd, k - kd, IP);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            qr(i, j, k, m) = ql(il, jl, kl, m);
+                        }
+                    }
+                    else
+                    {
+                        //! Isothermal wall.
+                        temperatureWall = wallTemperature / refDimensionalTemperature;
+                        wallVariables[IP] = primitveVariables(i - id, j - jd, k - kd, IP);
+                        wallVariables[IU] = velocityXWall;
+                        wallVariables[IV] = velocityYWall;
+                        wallVariables[IW] = velocityZWall;
+
+                        RDouble massReciprocal = one;
+                        RDouble presureWall = wallVariables[IP];
+                        RDouble densityWall = presureWall / (coefficientofstateEquation * temperatureWall * massReciprocal);
+                        wallVariables[IR] = densityWall;
+                        if (nSlipBCModel > 0)
+                        {
+                            temperatureWall = (*surfaceSlipVariables)(nWallBC, nIndexOfCell, ITT);
+                            wallVariables[IR] = presureWall / (coefficientofstateEquation * temperatureWall * massReciprocal);
+                        }
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            ql(il, jl, kl, m) = wallVariables[m];
+                            qr(i, j, k, m) = wallVariables[m];
+                        }
+                    }
+                    ++ nIndexOfCell; //! Next grid cell.
+                }
+            }
+        }
+        ++ nWallBC; //! Next surface.
+    }
+    delete[]wallVariables;
+}
+//clz end
+
+void NCCRSolverStruct::CorrectFaceVarR(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &ql = qlProxy->GetField_STR();
+    RDouble4D &qr = qrProxy->GetField_STR();
+    RDouble4D &primitveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+
+    RDouble4D &faceVelocityX = *(grid->GetFaceVelocityX());
+    RDouble4D &faceVelocityY = *(grid->GetFaceVelocityY());
+    RDouble4D &faceVelocityZ = *(grid->GetFaceVelocityZ());
+
+    int viscousType = parameters->GetViscousType();
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble temperatureWall = wallTemperature / refDimensionalTemperature;
+    //int wallMultiTemperature = 0;
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (gridIn->GetDataPtr("surfaceSlipVariables"));
+    }
+
+    using namespace GAS_SPACE;
+
+    RDouble coefficientofstateEquation = gas->GetCoefficientOfStateEquation();
+
+    //int wallMultiTemperature1 = 0;
+    /*if (GlobalDataBase::IsExist("wallMultiTemperature1", PHINT, 1))
+    {
+        wallMultiTemperature1 = GlobalDataBase::GetIntParaFromDB("wallMultiTemperature1");
+    }*/
+
+    int nEquation = GetNumberOfEquations();
+    RDouble *wallVariables = new RDouble[nEquation];
+
+    using namespace IDX;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int nWallBC = 0, nIndexOfCell = 0;
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    int isAle = parameters->GetIsCodeOfAleModel();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int nBCType = structBC->GetBCType();
+
+        if (!IsWall(nBCType) && nBCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        Data_Param *bcParamDB = structBC->GetBCParamDataBase();
+        if (bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+        }
+        else
+        {
+            wallTemperature = parameters->GetWallTemperature();
+        }
+        temperatureWall = wallTemperature / refDimensionalTemperature;
+
+        RDouble uWall = 0.0;
+        RDouble vWall = 0.0;
+        RDouble wWall = 0.0;
+
+        vector<SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+
+        if (globalBCList != 0)
+        {
+            vector<SimpleBC *>::iterator iter;
+            for (iter = globalBCList->begin(); iter != globalBCList->end(); ++ iter)
+            {
+                SimpleBC *bc = *iter;
+
+                string BCName = structBC->GetBCName();
+                if (BCName != bc->GetBCName())
+                {
+                    continue;
+                }
+
+                if (bc->CheckParamData("uWall"))
+                {
+                    bc->GetParamData("uWall", &uWall, PHDOUBLE, 1);
+                }
+
+                if (bc->CheckParamData("vWall"))
+                {
+                    bc->GetParamData("vWall", &vWall, PHDOUBLE, 1);
+                }
+
+                if (bc->CheckParamData("wWall"))
+                {
+                    bc->GetParamData("wWall", &wWall, PHDOUBLE, 1);
+                }
+            }
+        }
+
+        int *faceDirectionIndex = structBC->GetFaceDirectionIndex();
+        int directionIndex = structBC->GetFaceDirection() + 1;
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (directionIndex != iSurface)
+        {
+            continue;
+        }
+
+        //! The following treatment places subscripts on BCFace.
+        //! Modified by clz : 2012-7-10.
+        int id, jd, kd;
+        GetBCFaceIDX(faceDirectionIndex, id, jd, kd);
+        kst = kst + kd;
+        ked = ked + kd;
+        jst = jst + jd;
+        jed = jed + jd;
+        ist = ist + id;
+        ied = ied + id;
+
+        int di, dj, dk;
+        di = ABS(faceDirectionIndex[0]);
+        dj = ABS(faceDirectionIndex[1]);
+        dk = ABS(faceDirectionIndex[2]);
+        nIndexOfCell = 0;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int il = i - di;
+                    int jl = j - dj;
+                    int kl = k - dk;
+
+                    RDouble velocityXWall = uWall;
+                    RDouble velocityYWall = vWall;
+                    RDouble velocityZWall = wWall;
+
+                    if (nSlipBCModel > 0)
+                    {
+                        velocityXWall += (*surfaceSlipVariables)(nWallBC, nIndexOfCell, 3);
+                        velocityYWall += (*surfaceSlipVariables)(nWallBC, nIndexOfCell, 4);
+                        velocityZWall += (*surfaceSlipVariables)(nWallBC, nIndexOfCell, 5);
+                    }
+                    if (isUnsteady && isAle)
+                    {
+                        velocityXWall += faceVelocityX(i, j, k, iSurface);
+                        velocityYWall += faceVelocityY(i, j, k, iSurface);
+                        velocityZWall += faceVelocityZ(i, j, k, iSurface);
+                    }
+
+                    if (viscousType == INVISCID)
+                    {
+                        RDouble nxs = faceNormalComponentX(i, j, k, iSurface);
+                        RDouble nys = faceNormalComponentY(i, j, k, iSurface);
+                        RDouble nzs = faceNormalComponentZ(i, j, k, iSurface);
+
+                        RDouble vx = primitveVariables(i - id, j - jd, k - kd, IU);
+                        RDouble vy = primitveVariables(i - id, j - jd, k - kd, IV);
+                        RDouble vz = primitveVariables(i - id, j - jd, k - kd, IW);
+                        RDouble vn = nxs * vx + nys * vy + nzs * vz;
+
+                        ql(il, jl, kl, IR) = primitveVariables(i - id, j - jd, k - kd, IR);
+                        ql(il, jl, kl, IU) = primitveVariables(i - id, j - jd, k - kd, IU) - nxs * vn;
+                        ql(il, jl, kl, IV) = primitveVariables(i - id, j - jd, k - kd, IV) - nys * vn;
+                        ql(il, jl, kl, IW) = primitveVariables(i - id, j - jd, k - kd, IW) - nzs * vn;
+                        ql(il, jl, kl, IP) = primitveVariables(i - id, j - jd, k - kd, IP);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            qr(i, j, k, m) = ql(il, jl, kl, m);
+                        }
+                    }
+                    else if (wallTemperature <= 0.0)
+                    {
+                        //! Viscous wall, adiabatic.
+                        ql(il, jl, kl, IR) = primitveVariables(i - id, j - jd, k - kd, IR);
+                        ql(il, jl, kl, IU) = velocityXWall;
+                        ql(il, jl, kl, IV) = velocityYWall;
+                        ql(il, jl, kl, IW) = velocityZWall;
+                        ql(il, jl, kl, IP) = primitveVariables(i - id, j - jd, k - kd, IP);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            qr(i, j, k, m) = ql(il, jl, kl, m);
+                        }
+                    }
+                    else
+                    {
+                        //! Isothermal wall.
+                        temperatureWall = wallTemperature / refDimensionalTemperature;
+                        wallVariables[IP] = primitveVariables(i - id, j - jd, k - kd, IP);
+                        wallVariables[IU] = velocityXWall;
+                        wallVariables[IV] = velocityYWall;
+                        wallVariables[IW] = velocityZWall;
+
+                        RDouble massReciprocal = one;
+                        RDouble presureWall = wallVariables[IP];
+                        RDouble densityWall = presureWall / (coefficientofstateEquation * temperatureWall * massReciprocal);
+                        wallVariables[IR] = densityWall;
+                        if (nSlipBCModel > 0)
+                        {
+                            temperatureWall = (*surfaceSlipVariables)(nWallBC, nIndexOfCell, ITT);
+                            wallVariables[IR] = presureWall / (coefficientofstateEquation * temperatureWall * massReciprocal);
+                        }
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            ql(il, jl, kl, m) = wallVariables[m];
+                            qr(i, j, k, m) = wallVariables[m];
+                        }
+                    }
+                    ++ nIndexOfCell; //! Next grid cell.
+                }
+            }
+        }
+        ++ nWallBC; //! Next surface.
+    }
+
+    delete[]wallVariables;
+}
+//clz end
+
+void NCCRSolverStruct::CorrectChemicalFaceVar(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &ql = qlProxy->GetField_STR();
+    RDouble4D &qr = qrProxy->GetField_STR();
+    RDouble4D &primitveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+
+    RDouble4D &faceVelocityX = *(grid->GetFaceVelocityX());
+    RDouble4D &faceVelocityY = *(grid->GetFaceVelocityY());
+    RDouble4D &faceVelocityZ = *(grid->GetFaceVelocityZ());
+
+    int viscousType = parameters->GetViscousType();
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    RDouble2D *surfaceTemperature = NULL;
+    RDouble2D *injectionVelocity = NULL;
+    /*if (wallTemperature >= 0.0)
+    {
+        surfaceTemperature = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+    }*/
+    surfaceTemperature = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (gridIn->GetDataPtr("surfaceSlipVariables"));
+    }
+
+    int isInjection = GlobalDataBase::GetIntParaFromDB("isInjection");
+    if (isInjection == 1)
+    {
+        injectionVelocity = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("injectionVelocity"));
+    }
+
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();//! The type of catalytic wall condition.
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    int isAle = parameters->GetIsCodeOfAleModel();
+
+    using namespace GAS_SPACE;
+
+    RDouble coefficientofstateEquation = gas->GetCoefficientOfStateEquation();
+    int nSpeciesNumber = gas->GetNumberOfSpecies();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *wallVariables = new RDouble[nEquation]();
+    RDouble3D *surfaceMassFraction = 0;
+    if (nChemical > 0 && nSpeciesNumber > 0)    //! The fully catalytic wall condition.
+    {
+        surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+    }
+    RDouble massReciprocal = one;
+    RDouble twall = wallTemperature / refDimensionalTemperature;
+    RDouble temperatureWall[3] = { twall, twall, twall };
+    int wallMultiTemperature = gas->GetwallMultiTemperature();
+
+    using namespace PHENGLEI;
+    using namespace IDX;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int indexOfWall = 0, indexOfCell = 0;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int nBCType = structBC->GetBCType();
+
+        if (!IsWall(nBCType) && nBCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        if (wallMultiTemperature == 1)
+        {
+            Data_Param *bcParamDB = structBC->GetBCParamDataBase();
+            if (bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+            {
+                bcParamDB->GetData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+            }
+            else
+            {
+                wallTemperature = parameters->GetWallTemperature();
+            }
+            twall = wallTemperature / refDimensionalTemperature;
+            temperatureWall[0] = twall;
+            temperatureWall[1] = twall;
+            temperatureWall[2] = twall;
+        }
+
+        RDouble uWall = 0.0;
+        RDouble vWall = 0.0;
+        RDouble wWall = 0.0;
+
+        vector<SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+
+        if (globalBCList != 0)
+        {
+            vector<SimpleBC *>::iterator iter;
+            for (iter = globalBCList->begin(); iter != globalBCList->end(); ++ iter)
+            {
+                SimpleBC *boundaryCondition = *iter;
+                string BCName = structBC->GetBCName();
+
+                if (BCName != boundaryCondition->GetBCName())
+                {
+                    continue;
+                }
+
+                if (boundaryCondition->CheckParamData("uWall"))
+                {
+                    boundaryCondition->GetParamData("uWall", &uWall, PHDOUBLE, 1);
+                }
+
+                if (boundaryCondition->CheckParamData("vWall"))
+                {
+                    boundaryCondition->GetParamData("vWall", &vWall, PHDOUBLE, 1);
+                }
+
+                if (boundaryCondition->CheckParamData("wWall"))
+                {
+                    boundaryCondition->GetParamData("wWall", &wWall, PHDOUBLE, 1);
+                }
+            }
+        }
+
+        int *faceDirectionIndex = structBC->GetFaceDirectionIndex();
+        int directionIndex = structBC->GetFaceDirection() + 1;
+        int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (directionIndex != iSurface)
+        {
+            continue;
+        }
+
+        //! The following treatment places subscripts on BCFace.
+        //! Modified by clz : 2012-7-10.
+        int id, jd, kd;
+        GetBCFaceIDX(faceDirectionIndex, id, jd, kd);
+        kst = kst + kd;
+        ked = ked + kd;
+        jst = jst + jd;
+        jed = jed + jd;
+        ist = ist + id;
+        ied = ied + id;
+
+        int di, dj, dk;
+        di = ABS(faceDirectionIndex[0]);
+        dj = ABS(faceDirectionIndex[1]);
+        dk = ABS(faceDirectionIndex[2]);
+
+        indexOfCell = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int il = i - di;
+                    int jl = j - dj;
+                    int kl = k - dk;
+
+                    RDouble nxs = faceNormalComponentX(i, j, k, iSurface);
+                    RDouble nys = faceNormalComponentY(i, j, k, iSurface);
+                    RDouble nzs = faceNormalComponentZ(i, j, k, iSurface);
+
+                    RDouble velocityXWall = uWall;
+                    RDouble velocityYWall = vWall;
+                    RDouble velocityZWall = wWall;
+
+                    if (isInjection == 1)
+                    {
+                        RDouble wallVelocity = -leftOrRightIndex * (*injectionVelocity)(indexOfWall, indexOfCell);
+                        velocityXWall += wallVelocity * nxs;
+                        velocityYWall += wallVelocity * nys;
+                        velocityZWall += wallVelocity * nzs;
+                    }
+
+                    if (nSlipBCModel > 0)
+                    {
+                        velocityXWall += (*surfaceSlipVariables)(indexOfWall, indexOfCell, 3);
+                        velocityYWall += (*surfaceSlipVariables)(indexOfWall, indexOfCell, 4);
+                        velocityZWall += (*surfaceSlipVariables)(indexOfWall, indexOfCell, 5);
+                    }
+
+                    if (isUnsteady && isAle)
+                    {
+                        velocityXWall += faceVelocityX(i, j, k, iSurface);
+                        velocityYWall += faceVelocityY(i, j, k, iSurface);
+                        velocityZWall += faceVelocityZ(i, j, k, iSurface);
+                    }
+
+                    if (viscousType == INVISCID)
+                    {
+                        RDouble vx = primitveVariables(i - id, j - jd, k - kd, IU);
+                        RDouble vy = primitveVariables(i - id, j - jd, k - kd, IV);
+                        RDouble vz = primitveVariables(i - id, j - jd, k - kd, IW);
+                        RDouble vn = nxs * vx + nys * vy + nzs * vz;
+
+                        ql(il, jl, kl, IR) = primitveVariables(i - id, j - jd, k - kd, IR);
+                        ql(il, jl, kl, IU) = primitveVariables(i - id, j - jd, k - kd, IU) - nxs * vn;
+                        ql(il, jl, kl, IV) = primitveVariables(i - id, j - jd, k - kd, IV) - nys * vn;
+                        ql(il, jl, kl, IW) = primitveVariables(i - id, j - jd, k - kd, IW) - nzs * vn;
+                        ql(il, jl, kl, IP) = primitveVariables(i - id, j - jd, k - kd, IP);
+                        for (int s = nNSEquation; s < nEquation; ++ s)
+                        {
+                            ql(il, jl, kl, s) = primitveVariables(i - id, j - jd, k - kd, s);
+                        }
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            qr(i, j, k, m) = ql(il, jl, kl, m);
+                        }
+                    }
+                    else if (wallTemperature < 0.0)
+                    {
+                        //! Viscous wall, adiabatic.
+                        ql(il, jl, kl, IR) = primitveVariables(i - id, j - jd, k - kd, IR);
+                        ql(il, jl, kl, IU) = velocityXWall;
+                        ql(il, jl, kl, IV) = velocityYWall;
+                        ql(il, jl, kl, IW) = velocityZWall;
+                        ql(il, jl, kl, IP) = primitveVariables(i - id, j - jd, k - kd, IP);
+                        for (int s = nNSEquation; s < nEquation; ++ s)
+                        {
+                            ql(il, jl, kl, s) = primitveVariables(i - id, j - jd, k - kd, s);
+                        }
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            qr(i, j, k, m) = ql(il, jl, kl, m);
+                        }
+                    }
+                    else //! Isothermal wall.
+                    {
+                        wallVariables[IU] = velocityXWall;
+                        wallVariables[IV] = velocityYWall;
+                        wallVariables[IW] = velocityZWall;
+                        wallVariables[IP] = primitveVariables(i - id, j - jd, k - kd, IP);
+                        if (nSlipBCModel > 0)
+                        {
+                            for (int m = 0; m < 3; ++ m)
+                            {
+                                temperatureWall[m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m);
+                            }
+                        }
+                        else
+                        {
+                            temperatureWall[ITT] = (*surfaceTemperature)(indexOfWall, indexOfCell);
+                            temperatureWall[ITV] = temperatureWall[ITT];
+                            temperatureWall[ITE] = temperatureWall[ITT];
+                        }
+
+                        if (ABS(catalyticCoef) <= EPSILON && nBCType != PHENGLEI::ABLATION_SURFACE) //Fully non-catalytic wall.
+                        {
+                            for (int s = nNSEquation; s < nNSEquation + nSpeciesNumber; ++ s)
+                            {
+                                wallVariables[s] = primitveVariables(i - id, j - jd, k - kd, s);
+                            }
+                        }
+                        else //! Fully catalytic wall or finite catalytic wall.
+                        {
+                            for (int s = nNSEquation; s < nNSEquation + nSpeciesNumber; ++ s)
+                            {
+                                wallVariables[s] = (*surfaceMassFraction)(indexOfWall, indexOfCell, s - nNSEquation);
+                            }
+                        }
+
+                        if (nSlipBCModel > 0)
+                        {
+                            for (int m = 0; m < nSpeciesNumber; ++ m)
+                            {
+                                wallVariables[nNSEquation + m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m + 6);
+                            }
+                        }
+
+                        massReciprocal = gas->ComputeMolecularWeightReciprocal(wallVariables);
+
+                        //! Compute vibration and electron energy.
+                        if (nTemperatureModel == 2)
+                        {
+                            wallVariables[nLaminar + 1] = gas->GetMixedGasVibrationEnergy(wallVariables, temperatureWall[ITV]);
+                            wallVariables[nLaminar + 1] += gas->GetMixedGasElectronEnergy(wallVariables, temperatureWall[ITV]);
+                        }
+                        else if (nTemperatureModel == 3)
+                        {
+                            wallVariables[nLaminar + 1] = gas->GetMixedGasVibrationEnergy(wallVariables, temperatureWall[ITV]);
+                            wallVariables[nLaminar + 2] = gas->GetMixedGasElectronEnergy(wallVariables, temperatureWall[ITE]);
+                        }
+
+                        wallVariables[IR] = wallVariables[IP] / (coefficientofstateEquation * temperatureWall[ITT] * massReciprocal);
+
+                        //! Modify the face variables.
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            ql(il, jl, kl, m) = wallVariables[m];
+                            qr(i, j, k, m) = wallVariables[m];
+                        }
+
+                    }
+                    //! Next grid cell.
+                    ++ indexOfCell;
+                }//! i end
+            }//! j end
+        }//! k end
+        //! Next surface region.
+        ++ indexOfWall;
+    }//! iBCRegion end
+
+    delete[] wallVariables;
+}
+
+void NCCRSolverStruct::CalPressureFactor(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &rtem = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("rtem"));
+
+    RDouble *pressureLocal = new RDouble[7]();
+    RDouble pressureSensorCoefficient = third;  //! For 3-D
+
+    RDouble minPressureRatio = 1.3;
+    RDouble maxPressureRatio = 3.0;
+    RDouble pi = 3.141592653589;
+
+    int RoeEntropyFixMethod = this->GetControlParameters()->GetRoeEntropyFixMethod();
+
+    int istp = 1;
+    int jstp = 1;
+    int kstp = 1;
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+    int nk = grid->GetNK();
+
+    //! To degenerate for two dimensional problems, modified by eric 20120209.
+    if (nk == 1)
+    {
+        kstp = 0;
+        kCellStart = 1;
+        kCellEnd = 1;
+        pressureSensorCoefficient = half;
+    }
+
+    using namespace IDX;
+
+    if (RoeEntropyFixMethod == 2)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++i)    //! Corrected by clz, 2011-12-20.
+                {
+                    int im = i - istp;
+                    int jm = j - jstp;
+                    int km = k - kstp;
+
+                    int ip = i + istp;
+                    int jp = j + jstp;
+                    int kp = k + kstp;
+
+                    RDouble pim = q(im, j, k, IP);
+                    RDouble pjm = q(i, jm, k, IP);
+                    RDouble pkm = q(i, j, km, IP);
+
+                    RDouble pip = q(ip, j, k, IP);
+                    RDouble pjp = q(i, jp, k, IP);
+                    RDouble pkp = q(i, j, kp, IP);
+
+                    RDouble ppp = q(i, j, k, IP);
+
+                    RDouble dpi = ABS((pip - two * ppp + pim) / (pip + two * ppp + pim));
+                    RDouble dpj = ABS((pjp - two * ppp + pjm) / (pjp + two * ppp + pjm));
+                    RDouble dpk = ABS((pkp - two * ppp + pkm) / (pkp + two * ppp + pkm));
+
+                    rtem(i, j, k) = pressureSensorCoefficient * (dpi + dpj + dpk);
+                }
+            }
+        }
+    }
+
+    if (RoeEntropyFixMethod == 6)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++i)
+                {
+                    int im = i - istp;
+                    int jm = j - jstp;
+                    int km = k - kstp;
+
+                    int ip = i + istp;
+                    int jp = j + jstp;
+                    int kp = k + kstp;
+
+                    pressureLocal[0] = q(i, j, k, IP);
+                    pressureLocal[1] = q(im, j, k, IP);
+                    pressureLocal[2] = q(ip, j, k, IP);
+                    pressureLocal[3] = q(i, jm, k, IP);
+                    pressureLocal[4] = q(i, jp, k, IP);
+                    pressureLocal[5] = q(i, j, km, IP);
+                    pressureLocal[6] = q(i, j, kp, IP);
+
+                    RDouble maxPressure = 1.E-10;
+                    RDouble minPressure = 1.E+10;
+
+                    for (int iCellLocal = 0; iCellLocal <= 6; ++iCellLocal)
+                    {
+                        if (pressureLocal[iCellLocal] < minPressure)
+                        {
+                            minPressure = pressureLocal[iCellLocal];
+                        }
+                        if (pressureLocal[iCellLocal] > maxPressure)
+                        {
+                            maxPressure = pressureLocal[iCellLocal];
+                        }
+                    }
+
+                    RDouble pressureRatio = maxPressure / minPressure;
+                    RDouble presFunc = min(one, max(zero, (maxPressureRatio - pressureRatio) / (maxPressureRatio - minPressureRatio)));
+                    RDouble pressCosFunc = cos(presFunc * pi);
+                    pressCosFunc = max(-one, min(pressCosFunc, one));
+
+                    rtem(i, j, k) = half * (one - pressCosFunc);
+                }
+            }
+        }
+    }
+
+    grid->GhostCell3DExceptInterface(rtem);
+    //GhostCell3D(rtem, ni, nj, nk);
+
+    delete [] pressureLocal;
+}
+
+void NCCRSolverStruct::InviscidFlux(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    //CalPressureFactor(grid);
+
+    int nDim = GetDim();
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    int nEquation = GetNumberOfEquations();
+    int nInviscidFluxModify = parameters->GetnInviscidFluxModify();
+
+    int wallMultiTemperature = parameters->GetWallMultiTemperature();
+
+    Range M(0, nEquation - 1);
+
+    FieldProxy *qlProxy = new FieldProxy();
+    FieldProxy *qrProxy = new FieldProxy();
+
+
+    /*int nEnergyRecycle = parameters->GetnEnergyRecycle();
+    int ntmodel = parameters->GetTemperatureModel();
+    if(nEnergyRecycle == 2 && ntmodel > 1)
+    {
+        int nLaminar = parameters->GetLaminarNumber();
+        RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+        RDouble4D &q = *reinterpret_cast <RDouble4D *> (gridIn->GetDataPtr("q"));
+        RDouble4D &temporaryEve = *reinterpret_cast <RDouble4D *> (gridIn->GetDataPtr("temporaryEve"));
+        Range Tmode(1, ntmodel - 1);
+        temporaryEve(I, J, K, Tmode) = q(I, J, K, Tmode + nLaminar);
+        q(I, J, K, Tmode + nLaminar) = t(I, J, K, Tmode);
+    }*/
+
+
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        if (iSurface == 1)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1")));
+        }
+        else if (iSurface == 2)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2")));
+        }
+        else
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3")));
+        }
+
+        //! Apply the limiter to compute left-side variable QL and right-side variable QR.
+        GetInvFaceVar(grid, qlProxy, qrProxy, iSurface);
+
+        //! Modify the variables of the wall boundary faces-clz begin.
+        if (nChemical == 0)
+        {
+            if (wallMultiTemperature == 0)
+            {
+                CorrectFaceVar(grid, qlProxy, qrProxy, iSurface);
+            }
+            else
+            {
+                CorrectFaceVarR(grid, qlProxy, qrProxy, iSurface);
+            }
+        }
+        else if (nInviscidFluxModify == 0)
+        {
+            CorrectChemicalFaceVar(grid, qlProxy, qrProxy, iSurface);
+        }
+        //! To compute the inviscid flux terms of the cells with summation of the fluxes of their own surrounding faces.
+        ComputeInviscidFlux(grid, qlProxy, qrProxy, iSurface);
+    }
+
+    /*if(nEnergyRecycle == 2  && ntmodel > 1)
+    {
+        int nLaminar = parameters->GetLaminarNumber();
+        RDouble4D &temporaryEve = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("temporaryEve"));
+        RDouble4D &q = *reinterpret_cast <RDouble4D *> (gridIn->GetDataPtr("q"));
+        Range Tmode(1, ntmodel - 1);
+        q(I, J, K, Tmode + nLaminar) = temporaryEve(I, J, K, Tmode);
+    }*/
+    delete qlProxy;
+    delete qrProxy;
+}
+
+void NCCRSolverStruct::RegisterCFDSolverInterfaceField()
+{
+    NSSolver::RegisterCFDSolverInterfaceField();
+
+    int gridTypeSystem = GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if (gridTypeSystem == MIXGRID)
+    {
+        NSSolver::RegisterCFDSolverInterfaceFieldUnstruct();
+    }
+}
+
+void NCCRSolverStruct::RegisterOversetField()
+{
+    NSSolver::RegisterOversetField();
+}
+
+void NCCRSolverStruct::ReleaseCFDSolverInterfaceField()
+{
+    NSSolver::ReleaseCFDSolverInterfaceField();
+}
+
+void NCCRSolverStruct::ZeroResidualOfSpecialCells(Grid *gridIn)  //! Added by Guo Yongheng 20160825.
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isOverset = parameters->GetIsOverLapping();
+    if (!isOverset)
+    {
+        return;
+    }
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (gridIn->GetDataPtr("res"));
+    StructGrid *grid = PHSPACE::StructGridCast(gridIn);
+    int nEquation = GetNumberOfEquations();
+
+    int *iBlank = grid->GetCellTypeContainer();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    int cellLabel = 0;
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                if (iBlank[cellLabel] != GENERIC_COLOR)
+                {
+                    for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+                    {
+                        residual(i, j, k, iEquation) = 0.0;
+                    }
+                }
+
+                cellLabel += 1;
+            }
+        }
+    }
+    return;
+}
+
+void NCCRSolverStruct::GetInvFaceVar(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int nEquation = GetNumberOfEquations();
+
+    Range M(0, nEquation - 1);
+    using namespace IDX;
+
+    FieldProxy *qProxy = GetFieldProxy(grid, "q");
+
+    RDouble4D &q = qProxy->GetField_STR();
+    RDouble4D &ql = qlProxy->GetField_STR();
+    RDouble4D &qr = qrProxy->GetField_STR();
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    I = Range(1 - il1, ni - 1 + il1);
+    J = Range(1 - jl1, nj - 1 + jl1);
+    K = Range(1 - kl1, nk - 1 + kl1);
+    if (nk == 1)
+    {
+        K.setRange(1, 1);
+    }
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble MUSCLCoefXk = parameters->GetMUSCLCoefXk();
+    RDouble MUSCLCoefXb = parameters->GetMUSCLCoefXb();
+
+    int structureLimiter = GlobalDataBase::GetIntParaFromDB("str_limiter");
+
+    RDouble c1 = 0.25 * (1.0 - MUSCLCoefXk);
+    RDouble c2 = 0.25 * (1.0 + MUSCLCoefXk);
+
+    RDouble4D  dql(I, J, K, M, fortranArray);
+    RDouble4D  dqr(I, J, K, M, fortranArray);
+    RDouble4D dqlr(I, J, K, M, fortranArray);
+
+    if (!grid->IsFinestGrid())
+    {
+        //! For coarse grid.
+        ql(I, J, K, M) = q(I, J, K, M);
+        qr(I, J, K, M) = q(I, J, K, M);
+
+        delete qProxy;
+        return;
+    }
+
+    if (structureLimiter == ILMT_3rd_SMOOTH)
+    {
+        dql(I, J, K, M) = q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M);
+        dqr(I, J, K, M) = q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M);
+
+        dql(I, J, K, IR) = q(I, J, K, IR) * (dql(I, J, K, IR) / (q(I, J, K, IR) - 0.5 * dql(I, J, K, IR)));
+        dqr(I, J, K, IR) = q(I, J, K, IR) * (dqr(I, J, K, IR) / (q(I, J, K, IR) + 0.5 * dqr(I, J, K, IR)));
+        dql(I, J, K, IP) = q(I, J, K, IP) * (dql(I, J, K, IP) / (q(I, J, K, IP) - 0.5 * dql(I, J, K, IP)));
+        dqr(I, J, K, IP) = q(I, J, K, IP) * (dqr(I, J, K, IP) / (q(I, J, K, IP) + 0.5 * dqr(I, J, K, IP)));
+
+        ql(I, J, K, M) = q(I, J, K, M) + half * Third_Order_SMOOTH(dqr(I, J, K, M), dql(I, J, K, M));
+        qr(I, J, K, M) = q(I, J, K, M) - half * Third_Order_SMOOTH(dql(I, J, K, M), dqr(I, J, K, M));
+    }
+    else if (structureLimiter == ILMT_WENO3_JS)
+    {
+        //! Define WENO3-JS constants.
+        const RDouble epsilon = 1.0e-40;
+        const RDouble dk02 = 1.0 / 3.0, dk12 = 2.0 / 3.0;
+        RDouble4D beta0(I, J, K, M, fortranArray), beta1(I, J, K, M, fortranArray);
+        RDouble4D q02(I, J, K, M, fortranArray), q12(I, J, K, M, fortranArray);
+        RDouble4D alpha0(I, J, K, M, fortranArray), alpha1(I, J, K, M, fortranArray);
+
+        //! Smooth coefficient.
+        beta0(I, J, K, M) = (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)) * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M));
+        beta1(I, J, K, M) = (q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M)) * (q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M));
+
+        //! Non-linear weights (not normalized)
+        alpha0(I, J, K, M) = dk02 / ((beta0(I, J, K, M) + epsilon) * (beta0(I, J, K, M) + epsilon));
+        alpha1(I, J, K, M) = dk12 / ((beta1(I, J, K, M) + epsilon) * (beta1(I, J, K, M) + epsilon));
+
+        //! Candidate template
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M);
+
+        //! Compute ql and Normalize
+        ql(I, J, K, M) = (alpha0(I, J, K, M) * q02(I, J, K, M) + alpha1(I, J, K, M) * q12(I, J, K, M)) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+
+        //! Smooth coefficient
+        beta0(I, J, K, M) = (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)) * (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M));
+        beta1(I, J, K, M) = (q(I - il1, J - jl1, K - kl1, M) - q(I, J, K, M)) * (q(I - il1, J - jl1, K - kl1, M) - q(I, J, K, M));
+
+        //! Non-linear weights (not normalized)
+        alpha0(I, J, K, M) = dk02 / ((beta0(I, J, K, M) + epsilon) * (beta0(I, J, K, M) + epsilon));
+        alpha1(I, J, K, M) = dk12 / ((beta1(I, J, K, M) + epsilon) * (beta1(I, J, K, M) + epsilon));
+
+        //! Candidate template
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M);
+
+        //! Compute qr and normalize
+        qr(I, J, K, M) = (alpha0(I, J, K, M) * q02(I, J, K, M) + alpha1(I, J, K, M) * q12(I, J, K, M)) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+    }
+    else if (structureLimiter == ILMT_WENN3_PRM211)
+    {
+        //! Define WENN3_PRM211 constants.
+        const RDouble EPSILONTmp = 1.0e-45;
+        const RDouble DK02 = 1.0 / 3.0, DK12 = 2.0 / 3.0;
+        const RDouble C1 = 1.0, C20L = 7.0e7, C20R = 3.0e6, C21L = 1.0e5, C21R = 3.0e6;
+        const int M10 = 5, M11 = 4;
+
+        RDouble4D beta0(I, J, K, M, fortranArray), beta1(I, J, K, M, fortranArray);
+        RDouble4D q02(I, J, K, M, fortranArray), q12(I, J, K, M, fortranArray);
+        RDouble4D alpha0(I, J, K, M, fortranArray), alpha1(I, J, K, M, fortranArray);
+        RDouble4D w0(I, J, K, M, fortranArray), w1(I, J, K, M, fortranArray);
+
+        //! Smooth coefficient
+        beta0(I, J, K, M) = 1.0 / 4.0 * (3.0 * q(I, J, K, M) - 4.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M)) * (3.0 * q(I, J, K, M) - 4.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M))
+            + 13.0 / 12.0 * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M)) * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M));
+        beta1(I, J, K, M) = 1.0 / 4.0 * (3.0 * q(I, J, K, M) - 4.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M)) * (3.0 * q(I, J, K, M) - 4.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M))
+            + 13.0 / 12.0 * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M)) * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M));
+
+        //! Non-linear weights (not normalized).
+        alpha0(I, J, K, M) = DK02 / ((beta0(I, J, K, M) + EPSILONTmp) * (beta0(I, J, K, M) + EPSILONTmp));
+        alpha1(I, J, K, M) = DK12 / ((beta1(I, J, K, M) + EPSILONTmp) * (beta1(I, J, K, M) + EPSILONTmp));
+
+        //! Non-linear weights (not normalized).
+        w0(I, J, K, M) = alpha0(I, J, K, M) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+        w1(I, J, K, M) = alpha1(I, J, K, M) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+
+        for (int k = K.first(); k <= K.last(); ++k)
+        {
+            for (int j = 1 - jl1; j <= nj - 1 + jl1; ++j)
+            {
+                for (int i = 1 - il1; i <= ni - 1 + il1; ++i)
+                {
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+
+                        //! Map function.
+                        if (w0(i, j, k, m) <= DK02)
+                        {
+                            w0(i, j, k, m) = DK02 + (w0(i, j, k, m) - DK02) * (w0(i, j, k, m) - DK02) / ((w0(i, j, k, m) - DK02) + C20L * (w0(i, j, k, m) - DK02) * pow(w0(i, j, k, m), M10) - C1 * w0(i, j, k, m) * w0(i, j, k, m));
+                        }
+                        else
+                        {
+                            w0(i, j, k, m) = DK02 + (w0(i, j, k, m) - DK02) * (w0(i, j, k, m) - DK02) / ((w0(i, j, k, m) - DK02) + C20R * (w0(i, j, k, m) - DK02) * pow(1.0 - w0(i, j, k, m), M10) - C1 * (1.0 - w0(i, j, k, m)) * (1.0 - w0(i, j, k, m)));
+                        }
+                        if (w1(i, j, k, m) <= DK12)
+                        {
+                            w1(i, j, k, m) = DK12 + (w1(i, j, k, m) - DK12) * (w1(i, j, k, m) - DK12) / ((w1(i, j, k, m) - DK12) + C21L * (w1(i, j, k, m) - DK12) * pow(w1(i, j, k, m), M11) - C1 * w1(i, j, k, m) * w1(i, j, k, m));
+                        }
+                        else
+                        {
+                            w1(i, j, k, m) = DK12 + (w1(i, j, k, m) - DK12) * (w1(i, j, k, m) - DK12) / ((w1(i, j, k, m) - DK12) + C21R * (w1(i, j, k, m) - DK12) * pow(1.0 - w1(i, j, k, m), M11) - C1 * (1.0 - w1(i, j, k, m)) * (1.0 - w1(i, j, k, m)));
+                        }
+                    }
+                }
+            }
+        }
+        //! Candidate template.
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M);
+
+        //! Compute ql
+        ql(I, J, K, M) = (w0(I, J, K, M) * q02(I, J, K, M) + w1(I, J, K, M) * q12(I, J, K, M)) / (w0(I, J, K, M) + w1(I, J, K, M));
+
+
+        //! Smooth coefficient.
+        beta0(I, J, K, M) = 1.0 / 4.0 * (3.0 * q(I, J, K, M) - 4.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M)) * (3.0 * q(I, J, K, M) - 4.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M))
+            + 13.0 / 12.0 * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M)) * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M));
+        beta1(I, J, K, M) = 1.0 / 4.0 * (3.0 * q(I, J, K, M) - 4.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M)) * (3.0 * q(I, J, K, M) - 4.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M))
+            + 13.0 / 12.0 * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M)) * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M));
+
+        //! Non-linear weights(not normalized).
+        alpha0(I, J, K, M) = DK02 / ((beta0(I, J, K, M) + EPSILONTmp) * (beta0(I, J, K, M) + EPSILONTmp));
+        alpha1(I, J, K, M) = DK12 / ((beta1(I, J, K, M) + EPSILONTmp) * (beta1(I, J, K, M) + EPSILONTmp));
+
+        //! Non-linear weights(normalized).
+        w0(I, J, K, M) = alpha0(I, J, K, M) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+        w1(I, J, K, M) = alpha1(I, J, K, M) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+
+        for (int k = K.first(); k <= K.last(); ++k)
+        {
+            for (int j = 1 - jl1; j <= nj - 1 + jl1; ++j)
+            {
+                for (int i = 1 - il1; i <= ni - 1 + il1; ++i)
+                {
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        //! Map function.
+                        if (w0(i, j, k, m) <= DK02)
+                        {
+                            w0(i, j, k, m) = DK02 + (w0(i, j, k, m) - DK02) * (w0(i, j, k, m) - DK02) / ((w0(i, j, k, m) - DK02) + C20L * (w0(i, j, k, m) - DK02) * pow(w0(i, j, k, m), M10) - C1 * w0(i, j, k, m) * w0(i, j, k, m));
+                        }
+                        else
+                        {
+                            w0(i, j, k, m) = DK02 + (w0(i, j, k, m) - DK02) * (w0(i, j, k, m) - DK02) / ((w0(i, j, k, m) - DK02) + C20R * (w0(i, j, k, m) - DK02) * pow(1.0 - w0(i, j, k, m), M10) - C1 * (1.0 - w0(i, j, k, m)) * (1.0 - w0(i, j, k, m)));
+                        }
+                        if (w1(i, j, k, m) <= DK12)
+                        {
+                            w1(i, j, k, m) = DK12 + (w1(i, j, k, m) - DK12) * (w1(i, j, k, m) - DK12) / ((w1(i, j, k, m) - DK12) + C21L * (w1(i, j, k, m) - DK12) * pow(w1(i, j, k, m), M11) - C1 * w1(i, j, k, m) * w1(i, j, k, m));
+                        }
+                        else
+                        {
+                            w1(i, j, k, m) = DK12 + (w1(i, j, k, m) - DK12) * (w1(i, j, k, m) - DK12) / ((w1(i, j, k, m) - DK12) + C21R * (w1(i, j, k, m) - DK12) * pow(1.0 - w1(i, j, k, m), M11) - C1 * (1.0 - w1(i, j, k, m)) * (1.0 - w1(i, j, k, m)));
+                        }
+                    }
+                }
+            }
+        }
+
+        //! Candidate template.
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M);
+        //! 
+        qr(I, J, K, M) = (w0(I, J, K, M) * q02(I, J, K, M) + w1(I, J, K, M) * q12(I, J, K, M)) / (w0(I, J, K, M) + w1(I, J, K, M));
+    }
+    else if (structureLimiter == ILMT_WENN3_ZM)
+    {
+        //! Define WENN3_ZM constants.
+        const RDouble EPSILONTmp = 1.0e-40;
+        const RDouble DK02 = 1.0 / 3.0, DK12 = 2.0 / 3.0;
+        const RDouble C1 = 0.1, C2 = 0.1, C30 = 29.0, C31 = 29.0;
+
+        RDouble4D beta0(I, J, K, M, fortranArray), beta1(I, J, K, M, fortranArray), w0(I, J, K, M, fortranArray), w1(I, J, K, M, fortranArray), tau(I, J, K, M, fortranArray);
+        RDouble4D q02(I, J, K, M, fortranArray), q12(I, J, K, M, fortranArray), alpha0(I, J, K, M, fortranArray), alpha1(I, J, K, M, fortranArray);;
+
+        //! Smooth coefficient.
+        beta0(I, J, K, M) = (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)) * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M));
+        beta1(I, J, K, M) = 1.0 / 4.0 * (3.0 * q(I, J, K, M) - 4.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M)) *
+            (3.0 * q(I, J, K, M) - 4.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M))
+            + 13.0 / 12.0 * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M)) *
+            (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M));
+
+        for (int k = K.first(); k <= K.last(); ++k)
+        {
+            for (int j = 1 - jl1; j <= nj - 1 + jl1; ++j)
+            {
+                for (int i = 1 - il1; i <= ni - 1 + il1; ++i)
+                {
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+
+                        //! Global smooth coefficient.
+                        tau(i, j, k, m) = abs(1.0 / 4.0 * (q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m) - 3.0 * q(i + il1, j + jl1, k + kl1, m) - 21.0 * q(i, j, k, m) + 23.0 * q(i - il1, j - jl1, k - kl1, m))
+                            * (q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m) - 3.0 * q(i + il1, j + jl1, k + kl1, m) + 3.0 * q(i, j, k, m) - q(i - il1, j - jl1, k - kl1, m)));
+
+                        //! tau/beta
+                        w0(i, j, k, m) = tau(i, j, k, m) / (EPSILONTmp + beta0(i, j, k, m));
+                        w1(i, j, k, m) = tau(i, j, k, m) / (EPSILONTmp + beta1(i, j, k, m));
+
+                        //! Map function.
+                        if (w0(i, j, k, m) < C30)
+                        {
+                            w0(i, j, k, m) = w0(i, j, k, m) * w0(i, j, k, m) / (w0(i, j, k, m) + (C2 * w0(i, j, k, m) + C1) * (C30 - w0(i, j, k, m)) * (C30 - w0(i, j, k, m)));
+                        }
+                        if (w1(i, j, k, m) < C31)
+                        {
+                            w1(i, j, k, m) = w1(i, j, k, m) * w1(i, j, k, m) / (w1(i, j, k, m) + (C2 * w1(i, j, k, m) + C1) * (C31 - w1(i, j, k, m)) * (C31 - w1(i, j, k, m)));
+                        }
+                    }
+                }
+            }
+        }
+
+        //! Non-linear weights (not normalized).
+        alpha0(I, J, K, M) = DK02 * (1.0 + w0(I, J, K, M));
+        alpha1(I, J, K, M) = DK12 * (1.0 + w1(I, J, K, M));
+
+        //! Candidate template.
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M);
+
+        //! Compute ql.
+        ql(I, J, K, M) = (alpha0(I, J, K, M) * q02(I, J, K, M) + alpha1(I, J, K, M) * q12(I, J, K, M)) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+
+        //! Smooth coefficient.
+        beta0(I, J, K, M) = (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)) * (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M));
+        beta1(I, J, K, M) = 1.0 / 4.0 * (3.0 * q(I, J, K, M) - 4.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M)) *
+            (3.0 * q(I, J, K, M) - 4.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M))
+            + 13.0 / 12.0 * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M)) *
+            (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M));
+
+        for (int k = K.first(); k <= K.last(); ++k)
+        {
+            for (int j = 1 - jl1; j <= nj - 1 + jl1; ++j)
+            {
+                for (int i = 1 - il1; i <= ni - 1 + il1; ++i)
+                {
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+
+                        //! Global Smooth coefficient.
+                        tau(i, j, k, m) = abs(1.0 / 4.0 * (q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m) - 3.0 * q(i - il1, j - jl1, k - kl1, m) - 21.0 * q(i, j, k, m) + 23.0 * q(i + il1, j + jl1, k + kl1, m))
+                            * (q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m) - 3.0 * q(i - il1, j - jl1, k - kl1, m) + 3.0 * q(i, j, k, m) - q(i + il1, j + jl1, k + kl1, m)));
+
+                        //! tau/beta
+                        w0(i, j, k, m) = tau(i, j, k, m) / (EPSILONTmp + beta0(i, j, k, m));
+                        w1(i, j, k, m) = tau(i, j, k, m) / (EPSILONTmp + beta1(i, j, k, m));
+
+                        //! Map function.
+                        if (w0(i, j, k, m) <= C30)
+                        {
+                            w0(i, j, k, m) = w0(i, j, k, m) * w0(i, j, k, m) / (w0(i, j, k, m) + (C2 * w0(i, j, k, m) + C1) * (C30 - w0(i, j, k, m)) * (C30 - w0(i, j, k, m)));
+                        }
+                        if (w1(i, j, k, m) <= C31)
+                        {
+                            w1(i, j, k, m) = w1(i, j, k, m) * w1(i, j, k, m) / (w1(i, j, k, m) + (C2 * w1(i, j, k, m) + C1) * (C31 - w1(i, j, k, m)) * (C31 - w1(i, j, k, m)));
+                        }
+                    }
+                }
+            }
+        }
+
+        //! Non-linear weights (not normalized)
+        alpha0(I, J, K, M) = DK02 * (1.0 + w0(I, J, K, M));
+        alpha1(I, J, K, M) = DK12 * (1.0 + w1(I, J, K, M));
+
+        //! Candidate template.
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M);
+
+        //! Compute qr.
+        qr(I, J, K, M) = (alpha0(I, J, K, M) * q02(I, J, K, M) + alpha1(I, J, K, M) * q12(I, J, K, M)) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+    }
+    else if (structureLimiter == ILMT_WENN3_ZES2)
+    {
+        //! Define WENN3_ZES2 constants.
+        const RDouble EPSILONTmp = 1.0e-40;
+        const RDouble DK02 = 1.0 / 3.0, DK12 = 2.0 / 3.0;
+        const RDouble cAlpha = 0.15, cBeta1 = 0.15, cBeta0Max = 1.0, cBeta0Min = 1.0e-8, kc = 0.75, psic = 0.3;
+
+        RDouble df1, df2, df3, df4, kn, psi, sigma, kmkc, signkmkc;
+
+        RDouble4D w0(I, J, K, M, fortranArray), w1(I, J, K, M, fortranArray), cbeta0(I, J, K, M, fortranArray);
+        RDouble4D q02(I, J, K, M, fortranArray), q12(I, J, K, M, fortranArray), alpha0(I, J, K, M, fortranArray), alpha1(I, J, K, M, fortranArray);
+        RDouble4D beta20(I, J, K, M, fortranArray), beta21(I, J, K, M, fortranArray), beta0(I, J, K, M, fortranArray), beta1(I, J, K, M, fortranArray), tau(I, J, K, M, fortranArray);
+
+        beta20(I, J, K, M) = (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)) * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M));
+        beta21(I, J, K, M) = (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)) * (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M));
+
+        for (int k = K.first(); k <= K.last(); ++k)
+        {
+            for (int j = 1 - jl1; j <= nj - 1 + jl1; ++j)
+            {
+                for (int i = 1 - il1; i <= ni - 1 + il1; ++i)
+                {
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        // !Compute cbeta0.
+                        df1 = (q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m) - 8. * q(i - il1, j - jl1, k - kl1, m) + 8. * q(i + il1, j + jl1, k + kl1, m) - q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m)) / 12.;
+                        df2 = (-q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m) + 16. * q(i - il1, j - jl1, k - kl1, m) - 30. * q(i, j, k, m) + 16. * q(i + il1, j + jl1, k + kl1, m) - q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m)) / 12.;
+                        df3 = (-q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m) + 2. * q(i - il1, j - jl1, k - kl1, m) - 2. * q(i + il1, j + jl1, k + kl1, m) + q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m)) / 2.;
+                        df4 = (q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m) - 4. * q(i - il1, j - jl1, k - kl1, m) + 6. * q(i, j, k, m) - 4. * q(i + il1, j + jl1, k + kl1, m) + q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m));
+                        kn = sqrt((abs(df3) + abs(df4)) / (abs(df1) + abs(df2) + 1.0e-3));
+                        psi = 1. - abs(beta20(i, j, k, m) - beta21(i, j, k, m)) / (beta20(i, j, k, m) + beta21(i, j, k, m) + EPSILONTmp);
+                        psi = min(1.0, psi / psic);
+                        kmkc = kc - kn;
+                        signkmkc = 2.0 * (((signed char*)&kmkc)[sizeof(kmkc) - 1] >> 7) + 1.0;
+                        sigma = (1.0 + signkmkc) / 2. + (1.0 - signkmkc) / 2. * psi;
+                        cbeta0(i, j, k, m) = (cBeta0Min + sigma * sigma * (cBeta0Max - cBeta0Min));
+
+                    }
+                }
+            }
+        }
+
+        //! Smooth coefficient.
+        beta0(I, J, K, M) = beta20(I, J, K, M) + cbeta0 * (q(I - il1, J - jl1, K - kl1, M) - 2.0 * q(I, J, K, M) + q(I + il1, J + jl1, K + kl1, M)) * (q(I - il1, J - jl1, K - kl1, M) - 2.0 * q(I, J, K, M) + q(I + il1, J + jl1, K + kl1, M));
+        beta1(I, J, K, M) = beta21(I, J, K, M) + cBeta1 * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M)) * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M));
+
+        //! Global Smooth coefficient.
+        tau(I, J, K, M) = ((2. * q(I + il1, J + jl1, K + kl1, M) - 3. * q(I, J, K, M) + 1. * q(I - il1, J - jl1, K - kl1, M)) * (q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M) - 3. * q(I + il1, J + jl1, K + kl1, M) + 3. * q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)));
+
+        //! tau/beta
+        w0(I, J, K, M) = tau / (EPSILONTmp + beta0);
+        w1(I, J, K, M) = tau / (EPSILONTmp + beta1);
+
+        //! Non-linear weights(not normalized )
+        alpha0(I, J, K, M) = DK02 * (1.0 + cAlpha * w0(I, J, K, M) * w0(I, J, K, M));
+        alpha1(I, J, K, M) = DK12 * (1.0 + cAlpha * w1(I, J, K, M) * w1(I, J, K, M));
+
+        //! Candidate template.
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M);
+
+        //! Compute ql.
+        ql(I, J, K, M) = (alpha0(I, J, K, M) * q02(I, J, K, M) + alpha1(I, J, K, M) * q12(I, J, K, M)) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+
+        beta20(I, J, K, M) = (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)) * (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M));
+        beta21(I, J, K, M) = (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)) * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M));
+
+        for (int k = K.first(); k <= K.last(); ++k)
+        {
+            for (int j = 1 - jl1; j <= nj - 1 + jl1; ++j)
+            {
+                for (int i = 1 - il1; i <= ni - 1 + il1; ++i)
+                {
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+
+                        df1 = (q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m) - 8. * q(i + il1, j + jl1, k + kl1, m) + 8. * q(i - il1, j - jl1, k - kl1, m) - q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m)) / 12.;
+                        df2 = (-q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m) + 16. * q(i + il1, j + jl1, k + kl1, m) - 30. * q(i, j, k, m) + 16. * q(i - il1, j - jl1, k - kl1, m) - q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m)) / 12.;
+                        df3 = (-q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m) + 2. * q(i + il1, j + jl1, k + kl1, m) - 2. * q(i - il1, j - jl1, k - kl1, m) + q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m)) / 2.;
+                        df4 = (q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m) - 4. * q(i + il1, j + jl1, k + kl1, m) + 6. * q(i, j, k, m) - 4. * q(i - il1, j - jl1, k - kl1, m) + q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m));
+                        kn = sqrt((abs(df3) + abs(df4)) / (abs(df1) + abs(df2) + 1.0e-3));
+                        psi = 1. - abs(beta20(i, j, k, m) - beta21(i, j, k, m)) / (beta20(i, j, k, m) + beta21(i, j, k, m) + EPSILONTmp);
+                        psi = min(1.0, psi / psic);
+                        kmkc = kc - kn;
+                        signkmkc = 2.0 * (((signed char*)&kmkc)[sizeof(kmkc) - 1] >> 7) + 1.0;
+                        sigma = (1.0 + signkmkc) / 2. + (1.0 - signkmkc) / 2. * psi;
+                        cbeta0(i, j, k, m) = (cBeta0Min + sigma * sigma * (cBeta0Max - cBeta0Min));
+
+                    }
+                }
+            }
+        }
+
+        //! Smooth coefficient.
+        beta0(I, J, K, M) = beta20(I, J, K, M) + cbeta0 * (q(I + il1, J + jl1, K + kl1, M) - 2.0 * q(I, J, K, M) + q(I - il1, J - jl1, K - kl1, M)) * (q(I + il1, J + jl1, K + kl1, M) - 2.0 * q(I, J, K, M) + q(I - il1, J - jl1, K - kl1, M));
+        beta1(I, J, K, M) = beta21(I, J, K, M) + cBeta1 * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M)) * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M));
+
+        //! Global coefficient.
+        tau(I, J, K, M) = ((2. * q(I - il1, J - jl1, K - kl1, M) - 3. * q(I, J, K, M) + 1. * q(I + il1, J + jl1, K + kl1, M)) * (q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M) - 3. * q(I - il1, J - jl1, K - kl1, M) + 3. * q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)));
+
+        //! tau/beta
+        w0(I, J, K, M) = tau / (EPSILONTmp + beta0);
+        w1(I, J, K, M) = tau / (EPSILONTmp + beta1);
+
+        //! Non-linear weights(not normalized)
+        alpha0(I, J, K, M) = DK02 * (1.0 + cAlpha * w0(I, J, K, M) * w0(I, J, K, M));
+        alpha1(I, J, K, M) = DK12 * (1.0 + cAlpha * w1(I, J, K, M) * w1(I, J, K, M));
+
+        //! Candidate template.
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M);
+        //! Compute ql.
+        qr(I, J, K, M) = (alpha0(I, J, K, M) * q02(I, J, K, M) + alpha1(I, J, K, M) * q12(I, J, K, M)) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+    }
+    else if (structureLimiter == ILMT_WENN3_ZES3)
+    {
+        //! Define WENN3_ZES3 constants.
+        const RDouble EPSILONTmp = 1.0e-40;
+        const RDouble DK02 = 1.0 / 3.0, DK12 = 2.0 / 3.0;
+        const RDouble cBeta0 = 0.5, cBeta1 = 0.15, cAlpha = 0.4;
+
+        RDouble4D q02(I, J, K, M, fortranArray), q12(I, J, K, M, fortranArray), alpha0(I, J, K, M, fortranArray), alpha1(I, J, K, M, fortranArray);
+        RDouble4D tau(I, J, K, M, fortranArray), beta0(I, J, K, M, fortranArray), beta1(I, J, K, M, fortranArray), w0(I, J, K, M, fortranArray), w1(I, J, K, M, fortranArray), tmp(I, J, K, M, fortranArray);
+
+        //! Smooth coefficient.
+        beta0(I, J, K, M) = (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)) * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)) + cBeta0 * (q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I, J, K, M)) * (q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I, J, K, M));
+        beta1(I, J, K, M) = (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)) * (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)) + cBeta1 * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M)) * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M));
+
+        //! Global smooth coefficient.
+        tau(I, J, K, M) = (2. * q(I + il1, J + jl1, K + kl1, M) - 3. * q(I, J, K, M) + 1. * q(I - il1, J - jl1, K - kl1, M)) * (q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M) - 3. * q(I + il1, J + jl1, K + kl1, M) + 3. * q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M));
+
+        //! tau(I, J, K, M)/beta
+        w0(I, J, K, M) = tau(I, J, K, M) / (EPSILONTmp + beta0(I, J, K, M));
+        w1(I, J, K, M) = tau(I, J, K, M) / (EPSILONTmp + beta1(I, J, K, M));
+
+        //! Non-linear weights(not normalized).
+        alpha0(I, J, K, M) = DK02 * (1.0 + cAlpha * w0(I, J, K, M) * w0(I, J, K, M));
+        alpha1(I, J, K, M) = DK12 * (1.0 + cAlpha * w1(I, J, K, M) * w1(I, J, K, M));
+
+        //! Candidate template. 
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M);
+
+        //! Compute ql and normalized.
+        ql(I, J, K, M) = (alpha0(I, J, K, M) * q02(I, J, K, M) + alpha1(I, J, K, M) * q12(I, J, K, M)) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+
+        //! Smooth coefficient.
+        beta0(I, J, K, M) = (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)) * (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)) + cBeta0 * (q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I, J, K, M)) * (q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I, J, K, M));
+        beta1(I, J, K, M) = (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)) * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)) + cBeta1 * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M)) * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M));
+
+        //! Global smooth coefficient.
+        tau(I, J, K, M) = 1. * (2. * q(I - il1, J - jl1, K - kl1, M) - 3. * q(I, J, K, M) + 1. * q(I + il1, J + jl1, K + kl1, M)) * (q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M) - 3. * q(I - il1, J - jl1, K - kl1, M) + 3. * q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M));
+
+        //! tau/beta
+        w0(I, J, K, M) = (tau(I, J, K, M) / (EPSILONTmp + beta0(I, J, K, M)));
+        w1(I, J, K, M) = (tau(I, J, K, M) / (EPSILONTmp + beta1(I, J, K, M)));
+
+        //! Non-linear weights(not normalized)
+        alpha0(I, J, K, M) = DK02 * (1.0 + cAlpha * w0(I, J, K, M) * w0(I, J, K, M));
+        alpha1(I, J, K, M) = DK12 * (1.0 + cAlpha * w1(I, J, K, M) * w1(I, J, K, M));
+
+        //! Candidate template.
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M);
+
+        //! Compute qr and normalized.
+        qr(I, J, K, M) = (alpha0(I, J, K, M) * q02(I, J, K, M) + alpha1(I, J, K, M) * q12(I, J, K, M)) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+    }
+    else if (structureLimiter == ILMT_3rd_Minmod_SMOOTH)
+    {
+        dql(I, J, K, M) = q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M);
+        dqr(I, J, K, M) = q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M);
+
+        ql(I, J, K, M) = q(I, J, K, M) + half * Third_Order_Minmod_Smooth(dqr(I, J, K, M), dql(I, J, K, M));
+        qr(I, J, K, M) = q(I, J, K, M) - half * Third_Order_Minmod_Smooth(dql(I, J, K, M), dqr(I, J, K, M));
+    }
+    else if (structureLimiter == ILMT_SMOOTH)
+    {
+        dql(I, J, K, M) = q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M);
+        dqr(I, J, K, M) = q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M);
+
+        dqlr(I, J, K, M) = Smooth(dql(I, J, K, M), dqr(I, J, K, M));
+
+        ql(I, J, K, M) = q(I, J, K, M) + 0.25 * dqlr(I, J, K, M) * ((1.0 - MUSCLCoefXk * dqlr(I, J, K, M)) * dql(I, J, K, M) + (1.0 + MUSCLCoefXk * dqlr(I, J, K, M)) * dqr(I, J, K, M));
+        qr(I, J, K, M) = q(I, J, K, M) - 0.25 * dqlr(I, J, K, M) * ((1.0 - MUSCLCoefXk * dqlr(I, J, K, M)) * dqr(I, J, K, M) + (1.0 + MUSCLCoefXk * dqlr(I, J, K, M)) * dql(I, J, K, M));
+    }
+    else
+    {
+        if (structureLimiter == ILMT_MINMOD)
+        {
+            dql(I, J, K, M) = MinMod(q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M), MUSCLCoefXb * (q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M)));
+            dqr(I, J, K, M) = MinMod(q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M), MUSCLCoefXb * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)));
+        }
+        else if (structureLimiter == ILMT_VAN_ALBADA)
+        {
+            dql(I, J, K, M) = Vanalbada(q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M), q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M));
+            dqr(I, J, K, M) = Vanalbada(q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M), q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M));
+        }
+        else if (structureLimiter == ILMT_VAN_ALBADA_CLZ)
+        {
+            dql(I, J, K, M) = VanalbadaCLZ(q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M), q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M));
+            dqr(I, J, K, M) = VanalbadaCLZ(q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M), q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M));
+        }
+        else if (structureLimiter == ILMT_VANLEER)
+        {
+            dql(I, J, K, M) = Vanleer(q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M), MUSCLCoefXb * (q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M)));
+            dqr(I, J, K, M) = Vanleer(q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M), MUSCLCoefXb * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)));
+        }
+        else if (structureLimiter == ILMT_MIN_VAN)
+        {
+            dql(I, J, K, M) = Minvan(q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M), MUSCLCoefXb * (q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M)));
+            dqr(I, J, K, M) = Minvan(q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M), MUSCLCoefXb * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)));
+        }
+        //clz end
+        else if (structureLimiter == ILMT_NOLIM)
+        {
+            dql(I, J, K, M) = q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M);
+            dqr(I, J, K, M) = q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M);
+        }
+        else if (structureLimiter == ILMT_FIRST)
+        {
+            dql(I, J, K, M) = 0;
+            dqr(I, J, K, M) = 0;
+        }
+
+        ql(I, J, K, M) = q(I, J, K, M) + c1 * dql(I, J, K, M) + c2 * dqr(I, J, K, M);
+        qr(I, J, K, M) = q(I, J, K, M) - c2 * dql(I, J, K, M) - c1 * dqr(I, J, K, M);
+    }
+    delete qProxy;
+}
+
+void NCCRSolverStruct::ComputeInviscidFlux(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    FieldProxy *fluxProxy = CreateFieldProxy(grid);
+
+    int structureScheme = GlobalDataBase::GetIntParaFromDB("str_scheme");
+    INVScheme inviscidScheme = GetINVScheme(structureScheme);
+
+    //! To compute the inviscid flux of the faces using the QL and QR.
+    InviscidFluxWrap(grid, qlProxy, qrProxy, fluxProxy, inviscidScheme, iSurface);
+
+//! To compute the summation of fluxes on faces.
+    LoadFlux(grid, fluxProxy, iSurface);
+
+    delete fluxProxy;
+}
+
+void NCCRSolverStruct::CorrectInviscidFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    if (nChemical == 0)
+    {
+        //! Apply the original method, it is no need to modify the flux on wall.
+        return;
+    }
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    if (wallTemperature < 0.0)
+    {
+        //! The adiabatic wall applies the original method.
+        return;
+    }
+
+    int viscousType = parameters->GetViscousType();
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    //! The non-dimensional value of wall temperature.
+    RDouble nondimensionalTemperatureWall = wallTemperature / refDimensionalTemperature;
+    RDouble temperatureWall[3] = { nondimensionalTemperatureWall, nondimensionalTemperatureWall, nondimensionalTemperatureWall };
+
+    //! Otherwise, to modify the flux of solid boundaries.
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+    RDouble4D &faceArea = *(grid->GetFaceArea());
+    RDouble4D &faceNormalVelocity = *(grid->GetFaceNormalVelocity());
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &faceFluxes = fluxProxy->GetField_STR();
+
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int nSpecies = nLaminar + nChemical - nNSEquation;
+
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();
+    RDouble3D *surfaceMassFraction = 0;
+    if (nChemical > 0 && nSpecies > 0)    //! The fully catalytic wall condition.
+    {
+        surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+    }
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (gridIn->GetDataPtr("surfaceSlipVariables"));
+    }
+
+    //! Save the variables and inviscid fluxes on wall.
+    RDouble *wallVariables = new RDouble[nEquation]();
+    RDouble *wallFluxes = new RDouble[nEquation]();
+
+    using namespace IDX;
+    RDouble gasConstant = gas->GetUniversalGasConstant();
+
+    RDouble normalComponentX = 0.0, normalComponentY = 0.0, normalComponentZ = 0.0, surfaceArea = 0.0;
+    RDouble relativeVelocity = 0.0, faceMotionVelocity = 0.0, totalEnthalpy = 0.0, vibrationEnergy = 0.0, electronEnergy = 0.0;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int indexOfWall = 0, indexOfCell = 0;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int nBCType = structBC->GetBCType();
+
+        if (!(IsWall(nBCType) && viscousType > INVISCID) && nBCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        int *faceDirectionIndex = structBC->GetFaceDirectionIndex();
+        //! 0 stands for I-direction, 1 stands for J-direction, and 2 for K-direction.
+        int directionIndex = structBC->GetFaceDirection() + 1;
+        //! Judge the face is on the left side or right side in the current zone,-1 stands for left side, and 1 for right side.
+
+        int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (directionIndex != iSurface)
+        {
+            continue;
+        }
+
+        int id = 0, jd = 0, kd = 0;
+        GetBCFaceIDX(faceDirectionIndex, id, jd, kd);
+
+        kst = kst + kd;
+        ked = ked + kd;
+        jst = jst + jd;
+        jed = jed + jd;
+        ist = ist + id;
+        ied = ied + id;
+
+        indexOfCell = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! To obtain the variables on wall.
+                    if (nSlipBCModel > 0)
+                    {
+                        for (int m = 0; m < 3; ++ m)
+                        {
+                            temperatureWall[m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m);
+                            wallVariables[m + 1] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m + 3);
+                        }
+                    }
+                    else
+                    {
+                        if (viscousType > INVISCID)
+                        {
+                            wallVariables[IU] = 0.0;
+                            wallVariables[IV] = 0.0;
+                            wallVariables[IW] = 0.0;
+                        }
+                        else
+                        {
+                            wallVariables[IU] = primitiveVariables(i, j, k, IU);
+                            wallVariables[IV] = primitiveVariables(i, j, k, IV);
+                            wallVariables[IW] = primitiveVariables(i, j, k, IW);
+                        }
+                    }
+                    wallVariables[IP] = primitiveVariables(i, j, k, IP);
+
+                    if (ABS(catalyticCoef) <= EPSILON && nBCType != PHENGLEI::ABLATION_SURFACE) //! Fully non-catalytic wall.
+                    {
+                        for (int m = nNSEquation; m < nNSEquation + nSpecies; ++ m)
+                        {
+                            wallVariables[m] = primitiveVariables(i, j, k, m);
+                        }
+                    }
+                    else //! Fully catalytic wall or finite catalytic wall.
+                    {
+                        for (int m = nNSEquation; m < nNSEquation + nSpecies; ++ m)
+                        {
+                            wallVariables[m] = (*surfaceMassFraction)(indexOfWall, indexOfCell, m - nNSEquation);
+                        }
+                    }
+
+                    //! The isothermal condition reveals that both vibration temperature and electron temperature \n.
+                    //! equal to translation-rotation temperature. Tve=Tv=Te=Tw.
+
+                    //! Compute density on wall.
+                    RDouble massReciprocal = gas->ComputeMolecularWeightReciprocal(wallVariables);
+                    wallVariables[IR] = wallVariables[IP] / (gasConstant * temperatureWall[ITT] * massReciprocal);
+
+                    //! The geometric variables on wall.
+                    normalComponentX = faceNormalComponentX(i, j, k, iSurface);
+                    normalComponentY = faceNormalComponentY(i, j, k, iSurface);
+                    normalComponentZ = faceNormalComponentZ(i, j, k, iSurface);
+                    surfaceArea = faceArea(i, j, k, iSurface);
+                    faceMotionVelocity = faceNormalVelocity(i, j, k, iSurface);
+
+                    //! Obtain the velocity on wall.
+                    relativeVelocity = wallVariables[IU] * normalComponentX + wallVariables[IV] * normalComponentY + wallVariables[IW] * normalComponentZ - faceMotionVelocity;
+                    //! Compute the total enthalpy.
+                    totalEnthalpy = gas->GetMixedGasEnthalpy(wallVariables, temperatureWall[ITT], temperatureWall[ITV], temperatureWall[ITE]); //Tve=Tv=Te=Tw
+                    totalEnthalpy += 0.5 * (pow(wallVariables[IU], 2) + pow(wallVariables[IV], 2) + pow(wallVariables[IW], 2));
+
+                    wallFluxes[IR] = wallVariables[IR] * relativeVelocity;
+                    wallFluxes[IU] = wallFluxes[IR] * wallVariables[IU] + wallVariables[IP] * normalComponentX;
+                    wallFluxes[IV] = wallFluxes[IR] * wallVariables[IV] + wallVariables[IP] * normalComponentY;
+                    wallFluxes[IW] = wallFluxes[IR] * wallVariables[IW] + wallVariables[IP] * normalComponentZ;
+                    wallFluxes[IP] = wallFluxes[IR] * totalEnthalpy + wallVariables[IP] * faceMotionVelocity;
+                    for (int m = nNSEquation; m < nLaminar; ++ m)
+                    {
+                        wallFluxes[m] = wallFluxes[IR] * wallVariables[m];
+                    }
+
+                    if (nChemical == 1)
+                    {
+                        wallFluxes[nLaminar] = 0.0;
+                    }
+                    if (nTemperatureModel > 1)
+                    {
+                        //! Compute the internal energy flux of vibration and electron.
+                        vibrationEnergy = gas->GetMixedGasVibrationEnergy(wallVariables, temperatureWall[ITV]);   //! Tve=Tv=Te=Tw.
+                        electronEnergy = gas->GetMixedGasElectronEnergy(wallVariables, temperatureWall[ITE]);     //! Tve=Tv=Te=Tw.
+
+                        RDouble ceDivideMe = 0.0, peDivideDensity = 0.0;
+                        massReciprocal = gas->ComputeMolecularWeightReciprocalWithoutElectron(wallVariables, ceDivideMe);
+                        peDivideDensity = gasConstant * temperatureWall[ITE] * ceDivideMe;     //! Tve=Tv=Te=Tw.
+
+                        if (nTemperatureModel == 2)         //! Two-Temperature model.
+                        {
+                            wallFluxes[nLaminar + nChemical] = wallFluxes[IR] * (vibrationEnergy + electronEnergy + peDivideDensity) + wallVariables[IR] * peDivideDensity * faceMotionVelocity;
+                        }
+                        else if (nTemperatureModel == 3)    //! Three-Temperature model.
+                        {
+                            wallFluxes[nLaminar + nChemical] = wallFluxes[IR] * vibrationEnergy;
+                            wallFluxes[nLaminar + nChemical + 1] = wallFluxes[IR] * (electronEnergy + peDivideDensity) + wallVariables[IR] * peDivideDensity * faceMotionVelocity;
+                        }
+                    }
+
+                    //! Modify inviscid flux.
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        faceFluxes(i, j, k, m) = wallFluxes[m] * surfaceArea;
+#ifdef USE_ERROR_DATA_DEBUG
+                        if (isErrorData(faceFluxes(i, j, k, m)))
+                        {
+                            int zoneID = grid->GetZoneID();
+                            PrintToWindow(" zoneID = ", zoneID, "i = ", i, "j = ", j, "k = ", k, "m = ", m);
+                            TK_Exit::ExceptionExit("This is in function CorrectInviscidFlux", true);
+                        }
+#endif
+                    }
+                    //! Next grid cell.
+                    ++ indexOfCell;
+                }//! i end.
+            } //! j end.
+        } //! k end.
+        ++ indexOfWall; //! Next surface regions.
+    }//! iBCRegion end.
+    delete[]wallVariables;    wallVariables = NULL;
+    delete[]wallFluxes;    wallFluxes = NULL;
+}
+
+FaceProxy *NCCRSolverStruct::CreateFaceProxy(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int nEquation = GetNumberOfEquations();
+
+    int nlen = MAX(MAX(ni, nj), nk);
+
+    FaceProxy *faceProxy = new FaceProxy();
+    faceProxy->Create(nlen, nEquation);
+
+    return faceProxy;
+}
+
+GeomProxy *NCCRSolverStruct::CreateGeomProxy(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int nlen = MAX(MAX(ni, nj), nk);
+
+    GeomProxy *geomProxy = new GeomProxy();
+    geomProxy->Create(nlen);
+
+    return geomProxy;
+}
+
+bool iterijkNCCR(int &i, int &j, int &k, int ist, int ied, int jst, int jed, int kst, int ked)
+{
+    ++ i;
+    if (i <= ied)
+    {
+        return true;
+    }
+    else
+    {
+        i = ist;
+        ++ j;
+        if (j <= jed)
+        {
+            return true;
+        }
+        else
+        {
+            j = jst;
+            ++ k;
+            if (k <= ked)
+            {
+                return true;
+            }
+            else
+            {
+                return false;
+            }
+        }
+    }
+}
+
+bool NCCRSolverStruct::GetInviscidFaceValue(Grid *gridIn, FaceProxy *faceProxy, StructIterNCCR *structIter, FieldProxy *qlProxy, FieldProxy *qrProxy, int nlen)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &ql = qlProxy->GetField_STR();
+    RDouble4D &qr = qrProxy->GetField_STR();
+
+    RDouble4D &gxfn = *(grid->GetFaceNormalX());
+    RDouble4D &gyfn = *(grid->GetFaceNormalY());
+    RDouble4D &gzfn = *(grid->GetFaceNormalZ());
+    RDouble4D &garea = *(grid->GetFaceArea());
+    RDouble4D &gvgn = *(grid->GetFaceNormalVelocity());
+
+    int nEquation = GetNumberOfEquations();
+    int nEnergyRecycle = parameters->GetnEnergyRecycle();
+
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble3D &rtem = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("rtem"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+    using namespace IDX;
+
+    GeomProxy *geomProxy = faceProxy->GetGeomProxy();
+
+    RDouble *xfn = geomProxy->GetFaceNormalX();
+    RDouble *yfn = geomProxy->GetFaceNormalY();
+    RDouble *zfn = geomProxy->GetFaceNormalZ();
+    RDouble *area = geomProxy->GetFaceArea();
+    RDouble *vgn = geomProxy->GetFaceVelocity();
+
+    RDouble *gamal = faceProxy->GetGamaL();
+    RDouble *gamar = faceProxy->GetGamaR();
+
+    RDouble **temperatureL = faceProxy->GetLeftTemperature();
+    RDouble **temperatureR = faceProxy->GetRightTemperature();
+
+    RDouble **face_ql = faceProxy->GetQL();
+    RDouble **face_qr = faceProxy->GetQR();
+
+    RDouble *lrtl = faceProxy->GetPressureCoefficientL();
+    RDouble *lrtr = faceProxy->GetPressureCoefficientR();
+    RDouble *primitiveVarL = new RDouble[nEquation];
+    RDouble *primitiveVarR = new RDouble[nEquation];
+    RDouble leftTemperature[3], rightTemperature[3];
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+    RDouble3D *timeCoefficientInverse = NULL;
+    RDouble3D *preconCoefficient = NULL;
+    RDouble *timeCoeffL =NULL;
+    RDouble *timeCoeffR =NULL;
+    RDouble *preconCoeffL =NULL;
+    RDouble *preconCoeffR =NULL;
+    if (ifLowSpeedPrecon != 0)
+    {
+        timeCoefficientInverse = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("timeCoefficientInverse"));
+        preconCoefficient = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+        timeCoeffL = faceProxy->GetTimeCoefficientL();
+        timeCoeffR = faceProxy->GetTimeCoefficientR();
+        preconCoeffL = faceProxy->GetPreconCoefficientL();
+        preconCoeffR = faceProxy->GetPreconCoefficientR();
+    }
+
+    bool flag = false;
+
+    int i = structIter->i0;
+    int j = structIter->j0;
+    int k = structIter->k0;
+
+    int il1 = structIter->il1;
+    int jl1 = structIter->jl1;
+    int kl1 = structIter->kl1;
+
+    int iSurface = structIter->nsurf;
+
+    int ist = structIter->ist;
+    int ied = structIter->ied;
+    int jst = structIter->jst;
+    int jed = structIter->jed;
+    int kst = structIter->kst;
+    int ked = structIter->ked;
+
+    int ix = 0;
+
+    do
+    {
+        int il = i + il1;
+        int jl = j + jl1;
+        int kl = k + kl1;
+
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            face_ql[m][ix] = ql(i, j, k, m);
+            face_qr[m][ix] = qr(il, jl, kl, m);
+
+            primitiveVarL[m] = face_ql[m][ix];
+            primitiveVarR[m] = face_qr[m][ix];
+        }
+
+        lrtl[ix] = rtem(i, j, k);
+        lrtr[ix] = rtem(il, jl, kl);
+
+        gamal[ix] = gamma(i, j, k);
+        gamar[ix] = gamma(il, jl, kl);
+
+        if (ifLowSpeedPrecon != 0)
+        {
+            timeCoeffL[ix] = (*timeCoefficientInverse)(i, j, k);
+            timeCoeffR[ix] = (*timeCoefficientInverse)(il, jl, kl);
+            preconCoeffL[ix] = (*preconCoefficient)(i, j, k);
+            preconCoeffR[ix] = (*preconCoefficient)(il, jl, kl);
+        }
+
+        leftTemperature[0] = t(i, j, k, mTT);
+        rightTemperature[0] = t(il, jl, kl, mTT);
+
+        leftTemperature[1] = t(i, j, k, mTV);
+        rightTemperature[1] = t(il, jl, kl, mTV);
+
+        leftTemperature[2] = t(i, j, k, mTE);
+        rightTemperature[2] = t(il, jl, kl, mTE);
+
+        //! To obtain the left and right temperature.
+        if (nEnergyRecycle == 1)
+        {
+            gas->GetTemperatureR(primitiveVarL, leftTemperature[0], leftTemperature[1], leftTemperature[2]);
+            gas->GetTemperatureR(primitiveVarR, rightTemperature[0], rightTemperature[1], rightTemperature[2]);
+
+            /* gas->ComputeGama(&primitiveVarL[IP+1], leftTemperature[0], gamal[ix]);
+                gas->ComputeGama(&primitiveVarR[IP+1], rightTemperature[0], gamar[ix]);*/
+
+        }
+        else if (nEnergyRecycle == 0)
+        {
+            gas->GetTemperature(primitiveVarL, leftTemperature[0], leftTemperature[1], leftTemperature[2]);
+            gas->GetTemperature(primitiveVarR, rightTemperature[0], rightTemperature[1], rightTemperature[2]);
+        }
+        /*else
+        {
+            gas->GetTemperatureR2(primitiveVarL, leftTemperature[0], leftTemperature[1], leftTemperature[2]);
+            gas->GetTemperatureR2(primitiveVarR, rightTemperature[0], rightTemperature[1], rightTemperature[2]);
+
+            for (int m = 0; m < nEquation; ++  m)
+            {
+                face_ql[m][ix] = primitiveVarL[m];
+                face_qr[m][ix] = primitiveVarR[m];
+            }
+        }*/
+
+
+        xfn[ix] = gxfn(il, jl, kl, iSurface);
+        yfn[ix] = gyfn(il, jl, kl, iSurface);
+        zfn[ix] = gzfn(il, jl, kl, iSurface);
+        area[ix] = garea(il, jl, kl, iSurface);
+        vgn[ix] = gvgn(il, jl, kl, iSurface);
+
+        temperatureL[0][ix] = leftTemperature[mTT];
+        temperatureR[0][ix] = rightTemperature[mTT];
+
+        temperatureL[1][ix] = leftTemperature[mTV];
+        temperatureR[1][ix] = rightTemperature[mTV];
+
+        temperatureL[2][ix] = leftTemperature[mTE];
+        temperatureR[2][ix] = rightTemperature[mTE];
+
+        ++ ix;
+
+        flag = iterijkNCCR(i, j, k, ist, ied, jst, jed, kst, ked);
+    } while (flag && ix < nlen);
+
+    delete[] primitiveVarL;
+    delete[] primitiveVarR;
+
+    structIter->i1 = i;
+    structIter->j1 = j;
+    structIter->k1 = k;
+
+    structIter->nsize = ix;
+
+    return flag;
+}
+
+bool NCCRSolverStruct::LoadFaceFlux(Grid *gridIn, FaceProxy *faceProxy, StructIterNCCR *structIter, FieldProxy *fluxProxy, int nlen)
+{
+    RDouble4D &flux = fluxProxy->GetField_STR();
+
+    int nEquation = GetNumberOfEquations();
+
+    GeomProxy *geomProxy = faceProxy->GetGeomProxy();
+    RDouble *area = geomProxy->GetFaceArea();
+    RDouble **faceFlux = faceProxy->GetFlux();
+
+    bool flag = false;
+
+    int i = structIter->i0;
+    int j = structIter->j0;
+    int k = structIter->k0;
+
+    int il1 = structIter->il1;
+    int jl1 = structIter->jl1;
+    int kl1 = structIter->kl1;
+
+    int ist = structIter->ist;
+    int ied = structIter->ied;
+    int jst = structIter->jst;
+    int jed = structIter->jed;
+    int kst = structIter->kst;
+    int ked = structIter->ked;
+
+    int il, jl, kl;
+
+    int ix = 0;
+
+    do
+    {
+        il = i + il1;
+        jl = j + jl1;
+        kl = k + kl1;
+
+        RDouble &areas = area[ix];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            flux(il, jl, kl, m) = faceFlux[m][ix] * areas;
+        }
+        ++ ix;
+
+        flag = iterijkNCCR(i, j, k, ist, ied, jst, jed, kst, ked);
+    } while (flag && ix < nlen);
+
+    structIter->i1 = i;
+    structIter->j1 = j;
+    structIter->k1 = k;
+
+    structIter->nsize = ix;
+
+    return flag;
+}
+
+void NCCRSolverStruct::InviscidFluxWrap(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, FieldProxy *fluxProxy, INVScheme invScheme, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    FaceProxy *faceProxy = CreateFaceProxy(grid);
+    faceProxy->SetGeomProxy(CreateGeomProxy(grid));
+
+    Param_NSSolverStruct *parameters = this->GetControlParameters();
+
+    int nlen = MAX(MAX(ni, nj), nk);
+    //int nlen = 10;
+
+    //int iFaceStart = 0, iFaceEnd = 0, jFaceStart = 0, jFaceEnd = 0, kFaceStart = 0, kFaceEnd = 0;
+    //grid->GetFaceIterationIndex(iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd, iSurface);
+
+    StructIterNCCR *structIter = CreateInvStructIter(grid, iSurface);
+
+    // nlen = max( nlen, structIter->surfaceSize);
+
+    int nface = 0;
+
+    do
+    {
+        GetInviscidFaceValue(grid, faceProxy, structIter, qlProxy, qrProxy, nlen);
+        faceProxy->setsize(structIter->nsize);
+        nface += structIter->nsize;
+
+        InviscidSchemeParameter invSchemeParaProxy;
+        SetInviscidSchemeParameters(&invSchemeParaProxy, faceProxy, parameters);
+
+        //! Compute the fluxes on the faces using the QL and QR.
+        //! The variable faceProxy stores the new computation values.
+        invScheme(faceProxy, &invSchemeParaProxy);
+
+        bool hasNext = LoadFaceFlux(grid, faceProxy, structIter, fluxProxy, nlen);
+
+        if (!hasNext) break;
+
+        structIter->i0 = structIter->i1;
+        structIter->j0 = structIter->j1;
+        structIter->k0 = structIter->k1;
+    } while (true);
+
+    delete faceProxy;
+    delete structIter;
+}
+
+StructIterNCCR *NCCRSolverStruct::CreateInvStructIter(Grid *gridIn, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    int iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd;
+    grid->GetFaceIterationIndex(iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd, iSurface);
+
+    StructIterNCCR *structIter = new StructIterNCCR();
+
+    structIter->i0 = iFaceStart;
+    structIter->j0 = jFaceStart;
+    structIter->k0 = kFaceStart;
+
+    structIter->il1 = il1;
+    structIter->jl1 = jl1;
+    structIter->kl1 = kl1;
+
+    structIter->ist = iFaceStart;
+    structIter->ied = iFaceEnd;
+    structIter->jst = jFaceStart;
+    structIter->jed = jFaceEnd;
+    structIter->kst = kFaceStart;
+    structIter->ked = kFaceEnd;
+
+    structIter->nsurf = iSurface;
+
+    // structIter->surfaceSize = (iFaceEnd - iFaceStart + 1) * (jFaceEnd - jFaceStart + 1) * (kFaceEnd - kFaceStart + 1);
+
+    return structIter;
+}
+
+void NCCRSolverStruct::Diagonal(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    RDouble3D &vol = *(grid->GetCellVolume());
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int nChemicalRadius = parameters->GetNChemicalRadius();
+    int nChemicalSource = parameters->GetNChemicalSource();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int isUseLocalCFL = parameters->GetLocalCFLFlag();
+
+    RDouble ChemicalSpectrumRadiusCoef = parameters->GetChemicalSpectrumRadiusCoef();
+    RDouble ViscousSpectrumRadiusCoef = parameters->GetViscousSpectrumRadiusCoef();
+    RDouble InviscidSpectrumRadiusCoef = parameters->GetInviscidSpectrumRadiusCoef();
+
+    RDouble4D &diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+    RDouble4D &diagonal0 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal0"));
+    RDouble4D &diagonal1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal1"));
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+
+    RDouble4D &srs = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("srs"));
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+
+    Range M(0, nEquation - 1);
+
+    int nDim = GetDim();
+
+    RDouble odt, rad, rad_euler, rad_ns, odt1;
+    RDouble wmig = 1.0;
+    RDouble beta = 1.0;
+    RDouble betw = beta * wmig;
+
+    RDouble dualTimeSpectrumC1 = zero;
+    RDouble dualTimeSpectrumC2 = one;
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble dualTimeCoefficient[7];
+        const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+        ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+        dualTimeSpectrumC1 = -dualTimeCoefficient[3];
+        dualTimeSpectrumC2 = dualTimeCoefficient[6];
+    }
+
+    RDouble viscousSpectrumC1 = zero;
+
+    int viscousType = parameters->GetViscousType();
+    if (viscousType > INVISCID)
+    {
+        viscousSpectrumC1 = ViscousSpectrumRadiusCoef;
+    }
+
+    int nDiagonalModified = gas->GetnDiagonalModified();
+    if(nDiagonalModified ==0)
+    {
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                odt = dualTimeSpectrumC1 * vol(i, j, k) + dualTimeSpectrumC2 / dt(i, j, k);
+
+                rad_euler = invSpectralRadius(i, j, k, 0);
+                rad_ns = visSpectralRadius(i, j, k, 0);
+                for (int iSurface = 1; iSurface < nDim; ++ iSurface)
+                {
+                    rad_euler += invSpectralRadius(i, j, k, iSurface);
+                    rad_ns += visSpectralRadius(i, j, k, iSurface);   //! Modified by clz : 2012-7-19.
+                }
+                //rad = rad_euler + viscousSpectrumC1 * rad_ns;
+                rad = rad_euler * InviscidSpectrumRadiusCoef + viscousSpectrumC1 * rad_ns;
+                rad *= betw;
+
+                for (int m = 0; m < nEquation; ++ m)       //! Here is nl, not nEquation.
+                {
+                        diagonal(i, j, k, m)  = odt + rad;
+                }
+
+                if (isUseLocalCFL == 1)
+                {
+                    odt1 = dualTimeSpectrumC1 * vol(i, j, k) + dualTimeSpectrumC2 / (2.0 * dt(i, j, k));
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        diagonal1(i, j, k, m) = odt1 + rad;
+                    }
+                }
+
+            }
+        }
+    }
+    }
+    else
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    rad_euler = invSpectralRadius(i, j, k, 0);
+                    rad_ns = visSpectralRadius(i, j, k, 0);
+                    for (int iSurface = 1; iSurface < nDim; ++ iSurface)
+                    {
+                        rad_euler += invSpectralRadius(i, j, k, iSurface);
+                        rad_ns += visSpectralRadius(i, j, k, iSurface);   //! Modified by clz : 2012-7-19.
+                    }
+                    rad = rad_euler * InviscidSpectrumRadiusCoef + viscousSpectrumC1 * rad_ns;
+                    rad *= betw;
+
+                    for (int m = 0; m < nEquation; ++ m)       //! Here is nl, not nEquation.
+                    {
+                        diagonal(i, j, k, m)  = rad;
+                        diagonal0(i, j, k, m) = rad_euler + rad_ns;
+                    }
+                }
+            }
+        }
+    
+        GhostCell3D(diagonal0, ni, nj, nk, nEquation);
+
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    odt = dualTimeSpectrumC1 * vol(i, j, k) + dualTimeSpectrumC2 / dt(i, j, k);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        diagonal(i, j, k, m) += odt;
+                    }
+                }
+            }
+        }
+    }
+
+    //clz begin
+    if (nChemical == 1 && nChemicalSource == 1 && nChemicalRadius == 1)
+    {
+        int nSpeciesEquation = gas->GetSpeciesEquationNumber();
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+
+                    for (int s = 0; s < nSpeciesEquation; ++ s)
+                    {
+                        diagonal(i, j, k, nNSEquation + s) -= srs(i, j, k, s) * ChemicalSpectrumRadiusCoef;
+                    }
+                    for (int it = 0; it < nTemperatureModel - 1; ++ it)
+                    {
+                        diagonal(i, j, k, nNSEquation + numberOfSpecies + it) -= srs(i, j, k, numberOfSpecies + it) * ChemicalSpectrumRadiusCoef;
+                    }
+
+                    if (isUseLocalCFL == 1)
+                    {
+                        for (int s = 0; s < nSpeciesEquation; ++ s)
+                        {
+                            diagonal1(i, j, k, nNSEquation + s) -= srs(i, j, k, s) * ChemicalSpectrumRadiusCoef;
+                        }
+                        for (int it = 0; it < nTemperatureModel - 1; ++ it)
+                        {
+                            diagonal1(i, j, k, nNSEquation + numberOfSpecies + it) -= srs(i, j, k, numberOfSpecies + it) * ChemicalSpectrumRadiusCoef;
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    //clz end
+    GhostCell3D(diagonal, ni, nj, nk, nEquation);
+    //grid->GhostCell3DExceptInterface(diagonal, nEquation);
+    if (isUseLocalCFL == 1)
+    {
+        GhostCell3D(diagonal1, ni, nj, nk, nEquation);
+    }
+}
+
+void NCCRSolverStruct::ComputeTimeScale(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    //grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble4D &timeScale = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("timeScale"));
+    RDouble4D &noneqNumber = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("noneqNumber"));
+    //RDouble3D &damkohlerNumber = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("DamkohlerNumber"));
+    //RDouble3D &vibNoneqNumber = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("VibNoneqNumber"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nTModel = parameters->GetTemperatureModel();
+    int nIndexOfElectron = parameters->GetIndexOfElectron();
+    RDouble refLenth = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+    RDouble refVelocity = parameters->GetRefDimensionalVelocity();
+    RDouble refCoef = refLenth / refVelocity;
+    RDouble refDensity = parameters->GetRefDimensionalDensity();
+    RDouble refTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble refDynamicPressure = refDensity * refVelocity * refVelocity;
+
+    int nDim = GetDim();
+    using namespace IDX;
+    using namespace GAS_SPACE;
+    int nIndex[4], nReactions = 4;
+    nIndex[0] = gas->GetSpeciesIndex("O2"); //The dissociation reaction of Oxygen(O2).
+    nIndex[1] = gas->GetSpeciesIndex("N2"); //The dissociation reaction of Nitric Oxide(N2).
+    nIndex[2] = gas->GetSpeciesIndex("O");  //The ionization reaction of atomic Oxygen(O).
+    nIndex[3] = gas->GetSpeciesIndex("N");  //The ionization reaction of atomic Nitrogen(N).
+    RDouble speciesMass[4] = {0.032, 0.028, 0.016, 0.014};
+    RDouble speciesDensity[4];
+    if (nIndexOfElectron < 0) //No ionization reactions.
+    {
+        nReactions = 2;
+    }
+
+    //The basic chemical reactions are the dissociations and recombinations of Oxygen, Nitrogen and Nitric Oxide.
+    //The last three reactions are the ionizations of atomic oxygen, atomic nitrogen, and the Nitric Oxide.
+    RDouble coefA[8] = {1.0e16, 1.3353e5, 3.0e16, 3.1837e5, 3.9e27, 2.0798e20, 2.5e28, 1.0557e21};
+    RDouble coefB[8] = {-1.5, -0.5, -1.6, -0.6, -3.78, -2.78, -3.82, -2.82};
+    RDouble coefC[8] = {6.005e4, 0.0, 1.1392e5, 0.0, 1.6108e5, 0.0, 1.7175e5, 0.0};
+    RDouble kf = 0.0, tmin = 0.0, tchem = 0.0, Tf = 0.0, pf = 0.0;
+    RDouble C1[3] = {5.42e-5, 7.12e-3, 4.86e-3}, C2[3] = {2.95e6, 1.91e6, 1.37e5};
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                //Obtain the minmum time of flow.
+                tmin = timeScale(i, j, k, 0);
+                for (int iSurface = 1; iSurface < nDim; ++ iSurface)
+                {
+                    tmin = MIN(tmin, timeScale(i, j, k, iSurface));
+                }
+                //Save the time size of flow.
+                timeScale(i, j, k, 0) = tmin * refCoef;
+
+                //Obtain the temperature.
+                Tf = temperatures(i, j, k, ITT) * refTemperature;
+                //Obtain the mass fractions.
+                for (int s = 0; s < nReactions; ++ s)
+                {
+                    speciesDensity[s] = refDensity * primitiveVariables(i, j, k, nNSEquation + nIndex[s]);
+                }
+                //Compute the time size of chemical reactions.
+                tmin = LARGE;
+                for (int s = 0; s < nReactions; ++ s)
+                {
+                    kf = coefA[2 * s] * pow(Tf, coefB[2 * s]) * exp(-coefC[2 * s] / Tf);
+                    tchem = (1.0 / kf) * speciesMass[s] / speciesDensity[s];
+                    tmin = MIN(tmin, tchem);
+                }
+                timeScale(i, j, k, 1) = tmin;
+                //Compute the Damkohler number.
+                noneqNumber(i, j, k, 0) = timeScale(i, j, k, 0) / timeScale(i, j, k, 1);
+                //damkohlerNumber(i, j, k) = timeScale(i, j, k, 0) / timeScale(i, j, k, 1);
+
+                if (nTModel > 1)
+                {
+                    pf = primitiveVariables(i, j, k, IP) * refDynamicPressure;
+                    tmin = LARGE;
+                    for (int s = 0; s < 3; ++ s)
+                    {
+                        tchem = (C1[s] / pf) * exp(pow(C2[s] / Tf, 1.0/3.0));
+                        tmin = MIN(tmin, tchem);
+                    }
+                    timeScale(i, j, k, 2) = tmin;
+                    //The vibrational non-equilibrium number.
+                    noneqNumber(i, j, k, 1) = timeScale(i, j, k, 0) / timeScale(i, j, k, 2);
+                    //vibNoneqNumber(i, j, k) = timeScale(i, j, k, 0) / timeScale(i, j, k, 2);
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::ComputeFlowTimeScale(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    //grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+    RDouble4D &area = *(grid->GetFaceArea());
+    RDouble4D &vgn = *(grid->GetFaceNormalVelocity());
+
+    int nDim = GetDim();
+    RDouble3D &gridCellVolume = *(grid->GetCellVolume());
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D *timeScale = NULL;
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    if (nChemical > 0)
+    {
+        timeScale = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("timeScale"));
+    }
+
+    using namespace IDX;
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        int il1, jl1, kl1;
+        grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    int il, jl, kl;
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    RDouble um = q(i, j, k, IU);
+                    RDouble vm = q(i, j, k, IV);
+                    RDouble wm = q(i, j, k, IW);
+
+                    RDouble nx = half * (xfv(i, j, k, iSurface) + xfv(il, jl, kl, iSurface));
+                    RDouble ny = half * (yfv(i, j, k, iSurface) + yfv(il, jl, kl, iSurface));
+                    RDouble nz = half * (zfv(i, j, k, iSurface) + zfv(il, jl, kl, iSurface));
+                    RDouble ub = half * (vgn(i, j, k, iSurface) * area(i, j, k, iSurface) + vgn(il, jl, kl, iSurface) * area(il, jl, kl, iSurface));
+                    RDouble vn = nx * um + ny * vm + nz * wm - ub;
+
+                    (*timeScale)(i, j, k, iSurface - 1) = gridCellVolume(i, j, k) / ABS(vn);
+
+                }
+            }
+        }
+    }
+}
+
+#ifdef SMARTARRAY
+//! With faster, smart array optimization.
+void NCCRSolverStruct::SolveLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal)
+{
+    PrintToWindow("Warning: need to check the optimized code, after consider multi-sweep!");
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &dq = dqProxy->GetField_STR();
+    RDouble4D &deltaFlux = LUplusDQ->GetField_STR();
+
+    RDouble4D &gxfn = *(grid->GetFaceNormalX());
+    RDouble4D &gyfn = *(grid->GetFaceNormalY());
+    RDouble4D &gzfn = *(grid->GetFaceNormalZ());
+    RDouble4D &gvgn = *(grid->GetFaceNormalVelocity());
+    RDouble4D &garea = *(grid->GetFaceArea());
+    RDouble3D &gvol = *(grid->GetCellVolume());
+
+    int *iBlank = grid->GetCellTypeContainer();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int nm = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    RDouble refGama = parameters->GetRefGama();
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    RDouble *nxyz = new RDouble[4];
+    RDouble *d_q = new RDouble[nEquation];
+    RDouble *qNeighbor = new RDouble[nEquation];
+    RDouble *q_loc = new RDouble[nEquation];
+    RDouble *rhs0 = new RDouble[nEquation];
+    RDouble *de = new RDouble[nEquation];
+    RDouble *df = new RDouble[nEquation];
+    RDouble *dg = new RDouble[nEquation];
+    RDouble *dq_pre = new RDouble[nEquation];
+    RDouble **MG = NewPointer2 <RDouble>(nEquation, nEquation);
+    RDouble *temperature = new RDouble[nTemperatureModel];
+    RDouble *q_pre = new RDouble[nEquation];
+
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D &diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+    RDouble4D &res = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+
+    //clz begin
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+    //clz end
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+
+    Range II, JJ, KK;
+    GetRange(ni, nj, nk, -2, 1, II, JJ, KK);
+    Range MM(0, nEquation - 1);
+
+    RDouble wmig = 1.0;
+    RDouble beta = 1.0;
+    RDouble coevis = 0.0;
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    GetIJKRegion(I, J, K, ist, ied, jst, jed, kst, ked);
+
+    int viscousType = parameters->GetViscousType();
+    //! Obtain the viscosity coefficient, Modified by LiPeng on Mar. 15, 2019.
+    RDouble3D viscousLaminar, viscousTurbulence;
+    if (viscousType > INVISCID)
+    {
+        viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+        viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    }
+    //! End of the modification.
+
+    int nDim = GetDim();
+    int il, jl, kl;
+
+    RDouble *dq_i = new RDouble[nEquation];
+    RDouble *dq_j = new RDouble[nEquation];
+    RDouble *dq_k = new RDouble[nEquation];
+
+    RDouble *prim_i = new RDouble[nEquation];
+    RDouble *prim_j = new RDouble[nEquation];
+    RDouble *prim_k = new RDouble[nEquation];
+
+    RDouble *q_loc_i = new RDouble[nEquation];
+    RDouble *q_loc_j = new RDouble[nEquation];
+    RDouble *q_loc_k = new RDouble[nEquation];
+
+    RDouble *gykb_i = new RDouble[5];
+    RDouble *gykb_j = new RDouble[5];
+    RDouble *gykb_k = new RDouble[5];
+
+    RDouble **MG_i = NewPointer2 <RDouble>(nEquation, nEquation);
+    RDouble **MG_j = NewPointer2 <RDouble>(nEquation, nEquation);
+    RDouble **MG_k = NewPointer2 <RDouble>(nEquation, nEquation);
+
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        int km1 = k - 1;
+        if (nDim != THREE_D)
+        {
+            km1 = 1;
+        }
+        for (int j = jst; j <= jed; ++ j)
+        {
+            int jm1 = j - 1;
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int im1 = i - 1;
+                int cellLabel = (ni - 1) * (nj - 1) * (k - 1) + (ni - 1) * (j - 1) + (i - 1);
+                if (iBlank[cellLabel] == IN_HOLE_COLOR)
+                {
+                    for (int m = 0; m < nl; ++ m)
+                    {
+                        dq(i, j, k, m) = 0.0;
+                        //rhs0[m] = 0.0;
+                    }
+                    continue;
+                }
+                for (int m = 0; m < nl; ++ m)
+                {
+                    rhs0[m] = 0.0;
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    prim_i[m] = q(im1, j, k, m);
+                    prim_j[m] = q(i, jm1, k, m);
+                }
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    q_loc_i[m] = q(im1, j, k, m);
+                    q_loc_j[m] = q(i, jm1, k, m);
+                }
+                for (int m = 0; m < nl; ++ m)
+                {
+                    dq_i[m] = dq(im1, j, k, m);
+                    dq_j[m] = dq(i, jm1, k, m);
+                }
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    q_pre[m] = q(i, j, k, m);
+                }
+                for (int m = 0; m < nl; ++ m)
+                {
+                    dq_pre[m] = dq(i, j, k, m);
+                }
+                gykb_i[0] = half * (gxfn(i, j, k, 1) + gxfn(im1, j, k, 1));
+                gykb_i[1] = half * (gyfn(i, j, k, 1) + gyfn(im1, j, k, 1));
+                gykb_i[2] = 0.0;
+                gykb_i[3] = half * (garea(i, j, k, 1) + garea(im1, j, k, 1));
+                gykb_i[4] = half * (gvgn(i, j, k, 1) + gvgn(im1, j, k, 1));
+
+                gykb_j[0] = half * (gxfn(i, j, k, 2) + gxfn(i, jm1, k, 2));
+                gykb_j[1] = half * (gyfn(i, j, k, 2) + gyfn(i, jm1, k, 2));
+                gykb_j[2] = 0.0;
+                gykb_j[3] = half * (garea(i, j, k, 2) + garea(i, jm1, k, 2));
+                gykb_j[4] = half * (gvgn(i, j, k, 2) + gvgn(i, jm1, k, 2));
+
+                if (nDim == THREE_D)
+                {
+                    gykb_i[2] = half * (gzfn(i, j, k, 1) + gzfn(im1, j, k, 1));
+                    gykb_j[2] = half * (gzfn(i, j, k, 2) + gzfn(i, jm1, k, 2));
+                }
+
+                RDouble &ra = invSpectralRadius(im1, j, k, 0);
+                RDouble &rb = invSpectralRadius(i, jm1, k, 1);
+
+                RDouble gama1 = gamma(im1, j, k);
+                RDouble gama2 = gamma(i, jm1, k);
+
+                RDouble tm_i = t(im1, j, k, 0);
+                RDouble tm_j = t(i, jm1, k, 0);
+
+                if (ifLowSpeedPrecon == 0)
+                {
+                    //! The previous method of computing the (M + R) * dQ.
+                    MXDQ_STD(prim_i, gykb_i, dq_i, de, gama1, nm, nl, ra, 1);
+                    MXDQ_STD(prim_j, gykb_j, dq_j, df, gama2, nm, nl, rb, 1);
+                }
+                else
+                {
+                    PreconMatrixFreeDF(q_loc_i, dq_i, gykb_i, MG_i, tm_i, refGama, de, nl, 1);
+                    PreconMatrixFreeDF(q_loc_j, dq_j, gykb_j, MG_j, tm_j, refGama, df, nl, 1);
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    dg[m] = 0.0;
+                }
+
+                if (nDim == THREE_D)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        prim_k[m] = q(i, j, km1, m);
+                    }
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        q_loc_k[m] = q(i, j, km1, m);
+                    }
+                    for (int m = 0; m < nl; ++ m)
+                    {
+                        dq_k[m] = dq(i, j, km1, m);
+                    }
+                    gykb_k[0] = half * (gxfn(i, j, k, 3) + gxfn(i, j, km1, 3));
+                    gykb_k[1] = half * (gyfn(i, j, k, 3) + gyfn(i, j, km1, 3));
+                    gykb_k[2] = half * (gzfn(i, j, k, 3) + gzfn(i, j, km1, 3));
+                    gykb_k[3] = half * (garea(i, j, k, 3) + garea(i, j, km1, 3));
+                    gykb_k[4] = half * (gvgn(i, j, k, 3) + gvgn(i, j, km1, 3));
+                    RDouble &rc = invSpectralRadius(i, j, km1, 2);
+                    RDouble gama3 = gamma(i, j, km1);
+                    RDouble tm_k = t(i, j, km1, 0);
+                    if (ifLowSpeedPrecon == 0)
+                    {
+                        MXDQ_STD(prim_k, gykb_k, dq_k, dg, gama3, nm, nl, rc, 1);
+                    }
+                    else
+                    {
+                        PreconMatrixFreeDF(q_loc_k, dq_k, gykb_k, MG_k, tm_k, refGama, dg, nl, 1);
+                    }
+                }
+
+                //! Solve rhs0.
+                for (int m = 0; m < nl; ++ m)
+                {
+                    rhs0[m] += -wmig * (de[m] + df[m] + dg[m]);  //! The first method.
+                }
+
+                if (viscousType > INVISCID)         //! Implicit treatment of viscosity term,added by clz : 2012-7-19��modified by LiPeng on Jan 21, 2019.
+                {
+
+                    RDouble rad_vis_i = visSpectralRadius(im1, j, k, 0);    //! The viscous spectrum radius.
+                    RDouble rad_vis_j = visSpectralRadius(i, jm1, k, 1);    //! The viscous spectrum radius.
+                    RDouble rad_vis_k = 0.0;
+                    if (nDim == THREE_D)
+                    {
+                        rad_vis_k = visSpectralRadius(i, j, km1, 2);
+                    }
+
+                    for (int m = 0; m < nl; ++ m)
+                    {
+                        rhs0[m] += -0.5 * (rad_vis_i * dq_i[m] + rad_vis_j * dq_j[m] + rad_vis_k * dq_k[m]); //the second method
+                    }
+                }
+
+                //! Solve dqa.
+                if (ifLowSpeedPrecon == 1)
+                {
+                    RDouble tm = t(i, j, k, 0);
+                    ComputePreconMatrix(1, MG, q_pre, tm, refGama);
+                    PreconMatrixDF(dq_pre, MG, nl);
+                }
+
+                for (int m = 0; m < nl; ++ m)
+                {
+                    dq(i, j, k, m) = (dq(i, j, k, m) - rhs0[m]) / diagonal(i, j, k, m);
+                }
+            }
+        }
+    }
+    delete[]dq_i;
+    delete[]dq_j;
+    delete[]dq_k;
+
+    delete[]prim_i;
+    delete[]prim_j;
+    delete[]prim_k;
+
+    delete[]q_loc_i;
+    delete[]q_loc_j;
+    delete[]q_loc_k;
+
+    delete[]gykb_i;
+    delete[]gykb_j;
+    delete[]gykb_k;
+
+    DelPointer2(MG_i);
+    DelPointer2(MG_j);
+    DelPointer2(MG_k);
+
+    delete[]nxyz;
+    delete[]d_q;
+    delete[]qNeighbor;
+    delete[]q_loc;
+    delete[]rhs0;
+
+    delete[]de;
+    delete[]df;
+    delete[]dg;
+
+    delete[]q_pre;
+    delete[]dq_pre;
+    DelPointer2(MG);
+    delete[]temperature;
+}
+
+void NCCRSolverStruct::SolveLUSGSBackward(Grid *gridIn, FieldProxy *dq_proxy, FieldProxy *LUplusDQ, RDouble &sweepNormal)
+{
+    PrintToWindow("Warning: need to check the optimized code, after consider multi-sweep!");
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &dq = dq_proxy->GetField_STR();
+    RDouble4D &gxfn = *(grid->GetFaceNormalX());
+    RDouble4D &gyfn = *(grid->GetFaceNormalY());
+    RDouble4D &gzfn = *(grid->GetFaceNormalZ());
+    RDouble4D &gvgn = *(grid->GetFaceNormalVelocity());
+    RDouble4D &garea = *(grid->GetFaceArea());
+    RDouble3D &gvol = *(grid->GetCellVolume());
+
+    int *iBlank = grid->GetCellTypeContainer();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    RDouble refGama = parameters->GetRefGama();
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    RDouble *nxyz = new RDouble[4];
+    RDouble *d_q = new RDouble[nEquation];
+    RDouble *qNeighbor = new RDouble[nEquation];
+    RDouble *q_loc = new RDouble[nEquation];
+    RDouble *rhs0 = new RDouble[nEquation];
+
+    RDouble *de = new RDouble[nEquation];
+    RDouble *df = new RDouble[nEquation];
+    RDouble *dg = new RDouble[nEquation];
+    RDouble **MG = NewPointer2 <RDouble>(nEquation, nEquation);
+    RDouble *temperature = new RDouble[nTemperatureModel];
+
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D &diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+
+    Range II, JJ, KK;
+    GetRange(ni, nj, nk, -2, 1, II, JJ, KK);
+    Range MM(0, nEquation - 1);
+
+    RDouble wmig = 1.0;
+    RDouble beta = 1.0;
+    RDouble coevis = 0.0;
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    GetIJKRegion(I, J, K, ist, ied, jst, jed, kst, ked);
+
+    //clz begin
+    int viscousType = parameters->GetViscousType();
+    //clz end
+
+    //! Obtain the viscosity coefficient, Modified by LiPeng on Mar. 15, 2019.
+    RDouble3D viscousLaminar, viscousTurbulence;
+    if (viscousType > INVISCID)
+    {
+        viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+        viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    }
+
+    //! End of the modification.
+
+    int nDim = GetDim();
+
+    MXDQ_STD_LP(qNeighbor, temperature, xfn, yfn, zfn, area, vgn, gama, d_q, df, nNSEquation, nl, rad, -1);
+    MXDQ_STD(qNeighbor, xfn, yfn, zfn, area, vgn, gama, d_q, df, nNSEquation, nl, rad, -1);
+    RDouble *dq_i = new RDouble[nEquation];
+    RDouble *dq_j = new RDouble[nEquation];
+    RDouble *dq_k = new RDouble[nEquation];
+
+    RDouble *prim_i = new RDouble[nEquation];
+    RDouble *prim_j = new RDouble[nEquation];
+    RDouble *prim_k = new RDouble[nEquation];
+
+    RDouble *q_loc_i = new RDouble[nEquation];
+    RDouble *q_loc_j = new RDouble[nEquation];
+    RDouble *q_loc_k = new RDouble[nEquation];
+
+    RDouble *gykb_i = new RDouble[5];
+    RDouble *gykb_j = new RDouble[5];
+    RDouble *gykb_k = new RDouble[5];
+
+    RDouble **MG_i = NewPointer2 <RDouble>(nEquation, nEquation);
+    RDouble **MG_j = NewPointer2 <RDouble>(nEquation, nEquation);
+    RDouble **MG_k = NewPointer2 <RDouble>(nEquation, nEquation);
+
+
+    for (int k = ked; k >= kst; --k)
+    {
+        int kp1 = k + 1;
+        int kp1p1 = kp1 + 1;
+        if (nDim != THREE_D)
+        {
+            kp1 = 1;
+            kp1p1 = 1;
+        }
+        for (int j = jed; j >= jst; --j)
+        {
+            int jp1 = j + 1;
+            int jp1p1 = jp1 + 1;
+            for (int i = ied; i >= ist; --i)
+            {
+                int ip1 = i + 1;
+                int ip1p1 = ip1 + 1;
+                int cellLabel = (ni - 1) * (nj - 1) * (k - 1) + (ni - 1) * (j - 1) + (i - 1);
+                if (iBlank[cellLabel] == IN_HOLE_COLOR)
+                {
+                    for (int m = 0; m < nl; ++ m)
+                    {
+                        dq(i, j, k, m) = 0.0;
+                        //rhs0[m] = 0.0;
+                    }
+                    continue;
+                }
+                for (int m = 0; m < nl; ++ m)
+                {
+                    rhs0[m] = 0.0;
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    prim_i[m] = q(ip1, j, k, m);
+                    prim_j[m] = q(i, jp1, k, m);
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    q_loc_i[m] = q(ip1, j, k, m);
+                    q_loc_j[m] = q(i, jp1, k, m);
+                }
+
+                for (int m = 0; m < nl; ++ m)
+                {
+                    dq_i[m] = dq(ip1, j, k, m);
+                    dq_j[m] = dq(i, jp1, k, m);
+                }
+                gykb_i[0] = half * (gxfn(ip1, j, k, 1) + gxfn(ip1p1, j, k, 1));
+                gykb_i[1] = half * (gyfn(ip1, j, k, 1) + gyfn(ip1p1, j, k, 1));
+                gykb_i[2] = 0.0;
+                gykb_i[3] = half * (garea(ip1, j, k, 1) + garea(ip1p1, j, k, 1));
+                gykb_i[4] = half * (gvgn(ip1, j, k, 1) + gvgn(ip1p1, j, k, 1));
+
+                gykb_j[0] = half * (gxfn(i, jp1, k, 2) + gxfn(i, jp1p1, k, 2));
+                gykb_j[1] = half * (gyfn(i, jp1, k, 2) + gyfn(i, jp1p1, k, 2));
+                gykb_j[2] = 0.0;
+                gykb_j[3] = half * (garea(i, jp1, k, 2) + garea(i, jp1p1, k, 2));
+                gykb_j[4] = half * (gvgn(i, jp1, k, 2) + gvgn(i, jp1p1, k, 2));
+
+                if (nDim == THREE_D)
+                {
+                    gykb_i[2] = half * (gzfn(ip1, j, k, 1) + gzfn(ip1p1, j, k, 1));
+                    gykb_j[2] = half * (gzfn(i, jp1, k, 2) + gzfn(i, jp1p1, k, 2));
+                }
+
+                RDouble &ra = invSpectralRadius(ip1, j, k, 0);
+                RDouble &rb = invSpectralRadius(i, jp1, k, 1);
+
+                RDouble gama1 = gamma(ip1, j, k);
+                RDouble gama2 = gamma(i, jp1, k);
+
+                RDouble tm_i = t(ip1, j, k, 0);
+                RDouble tm_j = t(i, jp1, k, 0);
+                if (ifLowSpeedPrecon == 0)
+                {
+                    //! The previous method of computing the (M + R) * dQ.
+                    MXDQ_STD(prim_i, gykb_i, dq_i, de, gama1, nm, nl, ra, -1);
+                    MXDQ_STD(prim_j, gykb_j, dq_j, df, gama2, nm, nl, rb, -1);
+                }
+                else
+                {
+                    PreconMatrixFreeDF(q_loc_i, dq_i, gykb_i, MG_i, tm_i, refGama, de, nl, -1);
+                    PreconMatrixFreeDF(q_loc_j, dq_j, gykb_j, MG_j, tm_j, refGama, df, nl, -1);
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    dg[m] = 0.0;
+                }
+
+                if (nDim == THREE_D)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        prim_k[m] = q(i, j, kp1, m);
+                    }
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        q_loc_k[m] = q(i, j, kp1, m);
+                    }
+                    for (int m = 0; m < nl; ++ m)
+                    {
+                        dq_k[m] = dq(i, j, kp1, m);
+                    }
+                    gykb_k[0] = half * (gxfn(i, j, kp1, 3) + gxfn(i, j, kp1p1, 3));
+                    gykb_k[1] = half * (gyfn(i, j, kp1, 3) + gyfn(i, j, kp1p1, 3));
+                    gykb_k[2] = half * (gzfn(i, j, kp1, 3) + gzfn(i, j, kp1p1, 3));
+                    gykb_k[3] = half * (garea(i, j, kp1, 3) + garea(i, j, kp1p1, 3));
+                    gykb_k[4] = half * (gvgn(i, j, kp1, 3) + gvgn(i, j, kp1p1, 3));
+                    RDouble &rc = invSpectralRadius(i, j, kp1, 2);
+                    RDouble gama3 = gamma(i, j, kp1);
+                    RDouble tm_k = t(i, j, kp1, 0);
+                    if (ifLowSpeedPrecon == 0)
+                    {
+                        MXDQ_STD(prim_k, gykb_k, dq_k, dg, gama3, nm, nl, rc, -1);
+                    }
+                    else
+                    {
+                        PreconMatrixFreeDF(q_loc_k, dq_k, gykb_k, MG_k, tm_k, refGama, de, nl, -1);
+                    }
+
+                }
+
+
+                //! Compute (M - R) * dQ including the real gas conditions, modified by LiPeng on Jan 21, 2019.
+                //MXDQ_STD_LP(prim,xfn,yfn,zfn,area,vgn,gama,d_q,df,nm,nl,rad,-1);
+                //! Solve rhs0.
+                for (int m = 0; m < nl; ++ m)
+                {
+                    rhs0[m] += wmig * (de[m] + df[m] + dg[m]);
+                }
+                if (viscousType > INVISCID)    //! Implicit treatment of viscosity term,added by clz : 2012-7-19��modified by LiPeng on Jan 21, 2019.
+                {
+
+                    RDouble rad_vis_i = visSpectralRadius(ip1, j, k, 0);    //! The viscous spectrum radius.
+                    RDouble rad_vis_j = visSpectralRadius(i, jp1, k, 1);    //! The viscous spectrum radius.
+                    //RDouble rad_vis_k = visSpectralRadius(i  , j  , kp1, 2);    //! The viscous spectrum radius.
+                    RDouble rad_vis_k = 0.0;    //! The viscous spectrum radius.
+
+                    if (nDim == THREE_D)
+                    {
+                        rad_vis_k = visSpectralRadius(i, j, kp1, 2);
+                    }
+
+                    for (int m = 0; m < nl; ++ m)
+                    {
+                        rhs0[m] += -0.5 * (rad_vis_i * dq_i[m] + rad_vis_j * dq_j[m] + rad_vis_k * dq_k[m]);       //! The second method.
+                    }
+                }
+
+                //! Solve dqa.
+                for (int m = 0; m < nl; ++ m)
+                {
+                    dq(i, j, k, m) -= rhs0[m] / diagonal(i, j, k, m);
+                }
+            }
+        }
+    }
+
+    delete[] dq_i;
+    delete[] dq_j;
+    delete[] dq_k;
+
+    delete[] prim_i;
+    delete[] prim_j;
+    delete[] prim_k;
+
+    delete[] q_loc_i;
+    delete[] q_loc_j;
+    delete[] q_loc_k;
+
+    delete[] gykb_i;
+    delete[] gykb_j;
+    delete[] gykb_k;
+
+    DelPointer2(MG_i);
+    DelPointer2(MG_j);
+    DelPointer2(MG_k);
+
+    //fclose(pfile);
+
+    delete[] nxyz;
+    delete[] d_q;
+    delete[] qNeighbor;
+    delete[] q_loc;
+    delete[] rhs0;
+
+    delete[] de;
+    delete[] df;
+    delete[] dg;
+    DelPointer2(MG);
+    delete[] temperature;
+}
+#else
+//! Without any array optimization.
+void NCCRSolverStruct::SolveLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+
+    RDouble4D &dq = dqProxy->GetField_STR();
+    RDouble4D &deltaFlux = LUplusDQ->GetField_STR();
+
+    RDouble4D &gxfn = *(grid->GetFaceNormalX());
+    RDouble4D &gyfn = *(grid->GetFaceNormalY());
+    RDouble4D &gzfn = *(grid->GetFaceNormalZ());
+    RDouble4D &gvgn = *(grid->GetFaceNormalVelocity());
+    RDouble4D &garea = *(grid->GetFaceArea());
+
+    int *iBlank = grid->GetCellTypeContainer();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int nEnergyRecycle = parameters->GetnEnergyRecycle();
+
+    RDouble *nxyz = new RDouble[5];
+    RDouble *dqNeighbor = new RDouble[nEquation];
+    RDouble *qNeighbor = new RDouble[nEquation];
+    RDouble *rhs0 = new RDouble[nEquation];
+    RDouble *de = new RDouble[nEquation];
+    RDouble *df = new RDouble[nEquation];
+    RDouble *dg = new RDouble[nEquation];
+    RDouble *dqOld = new RDouble[nEquation];
+    RDouble *temperature = new RDouble[nTemperatureModel];
+    RDouble *Ux = new RDouble[nEquation];
+
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D &diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+    RDouble4D &res = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    int isUseLocalCFL = parameters->GetLocalCFLFlag();
+    if (iAdvanceStep && isUseLocalCFL == 1)
+    {
+        diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal1"));
+    }
+
+    //RDouble *speciesCvs, RDouble *speciesEtrs, RDouble totalH,  RDouble totalCv, RDouble totalCvtr, RDouble totalCvv, RDouble totalCve
+    RDouble4D *speciesCvs = NULL, *speciesEtrs = NULL;
+    RDouble3D *totalEnthalpy = NULL, *totalCv = NULL;
+    Thermo_Energy *Thermo_Energy_temparay = NULL;
+    RDouble3D *totalCvtr = NULL, *totalCvv = NULL, *totalCve = NULL;
+    RDouble *Cvs = NULL, *Etrs = NULL;
+    if (nChemical > 0 && nEnergyRecycle > 0)
+    {
+        Thermo_Energy_temparay = gas->GetThermo_Energy_temparay();
+        Cvs = Thermo_Energy_temparay->Cvs;
+        Etrs = Thermo_Energy_temparay->Etrs;
+
+        speciesCvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCvs"));
+        speciesEtrs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEtrs"));
+
+        totalEnthalpy = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalEnthalpy"));
+        totalCv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCv"));
+
+        totalCvtr = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvtr"));
+        totalCvv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvv"));
+        totalCve = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCve"));
+    }
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    bool isViscous = parameters->IsViscous();
+    RDouble3D viscousLaminar, viscousTurbulence;
+    if (isViscous)
+    {
+        viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+        viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    }
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+    RDouble3D *timeCoefficientInverse = NULL;
+    RDouble3D *preconCoefficient = NULL;
+    RDouble4D *preconMatrix = NULL;
+    int nElement = 0;
+    RDouble *dqTry = NULL;
+    RDouble *preconMatrixNeighbor = NULL;
+    RDouble *preconMatrixTemp = NULL;
+
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        timeCoefficientInverse = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("timeCoefficientInverse"));
+        preconCoefficient = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+        preconMatrix = reinterpret_cast< RDouble4D *> (grid->GetDataPtr("preconMatrix"));
+        nElement = nEquation * nEquation;
+        dqTry = new RDouble[nEquation];
+        preconMatrixNeighbor = new RDouble [nElement];
+        preconMatrixTemp = new RDouble [nElement];
+    }
+
+    int nDim = GetDim();
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                int cellLabel = (ni - 1) * (nj - 1) * (k - 1) + (ni - 1) * (j - 1) + (i - 1);
+                if (iBlank[cellLabel] == IN_HOLE_COLOR)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        dq(i, j, k, m) = 0.0;
+                    }
+                    continue;
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    rhs0[m] = 0.0;
+
+                    //! Back up the old dq, to compute the convergence.
+                    //! it is initialized by zero or res in the first sweep,
+                    //! then it is updated by backward sweep, that is dq*.
+                    dqOld[m] = dq(i, j, k, m);
+
+                    //! Here, the deltaFlux is computed in Upper backward sweep!
+                    //! res: b      deltaFlux: Ux, which is computed in backward sweep.
+                    //! the dq is not the real dq, now.
+                    //! Although the 'dq' changed can not the right one, it dosen't matter, since 
+                    //! the following only using the lower neighbor cells, whose 'dq' has been updated.
+                    //! It is convenient for precondition transform.
+                    dq(i, j, k, m) = res(i, j, k, m);
+
+                    Ux[m] = deltaFlux(i, j, k, m);
+
+                    //! Then reset it to zero to store the Lower forward sweep!
+                    deltaFlux(i, j, k, m) = 0.0;
+                }
+
+                for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+                {
+                    int il1, jl1, kl1, il, jl, kl;
+                    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+                    grid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        qNeighbor[m] = q(il, jl, kl, m);
+                        dqNeighbor[m] = dq(il, jl, kl, m);
+                    }
+
+                    if (ifLowSpeedPrecon != 0)
+                    {
+                        for (int m = 0; m < nElement; ++ m)
+                        {
+                            preconMatrixNeighbor[m] = (*preconMatrix)(il, jl, kl, m);
+                        }
+                    }
+
+                    RDouble &xfn1 = gxfn(i, j, k, iSurface);
+                    RDouble &yfn1 = gyfn(i, j, k, iSurface);
+                    RDouble &zfn1 = gzfn(i, j, k, iSurface);
+                    RDouble &area1 = garea(i, j, k, iSurface);
+                    RDouble &vgn1 = gvgn(i, j, k, iSurface);
+
+                    RDouble &xfn2 = gxfn(il, jl, kl, iSurface);
+                    RDouble &yfn2 = gyfn(il, jl, kl, iSurface);
+                    RDouble &zfn2 = gzfn(il, jl, kl, iSurface);
+                    RDouble &area2 = garea(il, jl, kl, iSurface);
+                    RDouble &vgn2 = gvgn(il, jl, kl, iSurface);
+
+                    RDouble xfn = half * (xfn1 + xfn2);
+                    RDouble yfn = half * (yfn1 + yfn2);
+                    RDouble zfn = half * (zfn1 + zfn2);
+                    RDouble area = half * (area1 + area2);
+                    RDouble vgn = half * (vgn1 + vgn2);
+
+                    nxyz[0] = xfn;
+                    nxyz[1] = yfn;
+                    nxyz[2] = zfn;
+                    nxyz[3] = area;
+                    nxyz[4] = vgn;
+
+                    RDouble &rad = invSpectralRadius(il, jl, kl, iSurface - 1);
+
+                    RDouble gama = gamma(il, jl, kl);
+
+                    if (ifLowSpeedPrecon == 0)
+                    {
+                        if (nChemical > 0)
+                        {
+                            for (int m = 0; m < nTemperatureModel; ++ m)
+                            {
+                                temperature[m] = t(il, jl, kl, m);
+                            }
+                        }
+                        else
+                        {
+                            MXDQ_STD(qNeighbor, xfn, yfn, zfn, area, vgn, gama, dqNeighbor, df, nNSEquation, nLaminar, rad, 1);
+                        }
+                    }
+                    else
+                    {
+                        RDouble preconCoeff = (*preconCoefficient)(il, jl, kl);
+                        RDouble timeCoeff = (*timeCoefficientInverse)(il, jl, kl);
+                        PreconMatrixFreeDF(qNeighbor, dqNeighbor, nxyz, preconMatrixNeighbor, gama, preconCoeff, timeCoeff, df, nNSEquation, nLaminar, 1);
+                    }
+
+                    //! Add Flux together.
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        rhs0[m] -= df[m];
+                    }
+
+                    if (isViscous)
+                    {
+                        RDouble rad_vis = half * visSpectralRadius(il, jl, kl, iSurface - 1);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            rhs0[m] -= rad_vis * dqNeighbor[m];
+                        }
+                    }
+                }
+
+                if (ifLowSpeedPrecon == 1)
+                {
+                    //! Here, the 'dqCell' is 'res' actually.
+                    //! The reason why operate on 'dqCell' other than 'res', is that the 'dqCell' is a temporary variable.
+                    //! and the real 'res' is forbidden to be changed.
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                         dqTry[m]= dq(i, j, k, m);
+                    }
+
+                    for (int m = 0; m < nElement; ++ m)
+                    {
+                        preconMatrixTemp[m] = (*preconMatrix)(i, j, k, m);
+                    }
+
+                    RDouble timeCoeffTemp = (*timeCoefficientInverse)(i, j, k);
+                    ConservativePreconMatrixVariables(dqTry, preconMatrixTemp, timeCoeffTemp, nEquation);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        dq(i, j, k, m) = dqTry[m];
+                    }
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    //! dq = { (b - Ux) - Lx } / D.
+                    //! Note: the 'dq' has actually initialized by the residual at the beginning of this function.
+                    //! the 'rhs0' is the total Delta Flux of the neighbors.            
+                    //! rhs0: Lx    diagonal: D.
+                    dq(i, j, k, m) = (dq(i, j, k, m) - Ux[m] - rhs0[m]) / diagonal(i, j, k, m);
+                    //! Store the lower forward sweep delta-flux, which will be used in the backward sweep.
+                    deltaFlux(i, j, k, m) += rhs0[m];
+
+                    sweepNormal += SQR(dq(i, j, k, m) - dqOld[m]);
+                }
+
+            }
+        }
+    }
+
+    delete[] nxyz;    nxyz = NULL;
+    delete[] dqNeighbor;    dqNeighbor = NULL;
+    delete[] qNeighbor;    qNeighbor = NULL;
+    delete[] rhs0;    rhs0 = NULL;
+
+    delete[] de;    de = NULL;
+    delete[] df;    df = NULL;
+    delete[] dg;    dg = NULL;
+
+
+    delete[] temperature;    temperature = NULL;
+
+    delete[] dqOld;    dqOld = NULL;
+    delete[] Ux;    Ux = NULL;
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        delete []dqTry;    dqTry = NULL;
+        delete []preconMatrixNeighbor;    preconMatrixNeighbor = NULL;
+        delete []preconMatrixTemp;    preconMatrixTemp = NULL;
+    }
+}
+
+void NCCRSolverStruct::SolveLUSGSBackward(Grid *gridIn, FieldProxy *dq_proxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep/* = false*/)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &dq = dq_proxy->GetField_STR();
+    RDouble4D &deltaFlux = LUplusDQ->GetField_STR();
+
+    RDouble4D &gxfn = *(grid->GetFaceNormalX());
+    RDouble4D &gyfn = *(grid->GetFaceNormalY());
+    RDouble4D &gzfn = *(grid->GetFaceNormalZ());
+    RDouble4D &gvgn = *(grid->GetFaceNormalVelocity());
+    RDouble4D &garea = *(grid->GetFaceArea());
+
+    int *iBlank = grid->GetCellTypeContainer();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int nEnergyRecycle = parameters->GetnEnergyRecycle();
+
+    RDouble *nxyz = new RDouble[5];
+    RDouble *dqNeighbor = new RDouble[nEquation];
+    RDouble *qNeighbor = new RDouble[nEquation];
+    RDouble *dqOld = new RDouble[nEquation];
+    RDouble *rhs0 = new RDouble[nEquation];
+    RDouble *de = new RDouble[nEquation];
+    RDouble *df = new RDouble[nEquation];
+    RDouble *dg = new RDouble[nEquation];
+    RDouble *temperature = new RDouble[nTemperatureModel];
+    RDouble *Lx = new RDouble[nEquation];
+
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D &diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+    RDouble4D &res = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    int isUseLocalCFL = parameters->GetLocalCFLFlag();
+    if (iAdvanceStep && isUseLocalCFL == 1)
+    {
+        diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal1"));
+    }
+
+    //RDouble *speciesCvs, RDouble *speciesEtrs, RDouble totalH,  RDouble totalCv, RDouble totalCvtr, RDouble totalCvv, RDouble totalCve
+    RDouble4D *speciesCvs = NULL, *speciesEtrs = NULL;
+    RDouble3D *totalEnthalpy = NULL, *totalCv = NULL;
+    Thermo_Energy *Thermo_Energy_temparay = NULL;
+    RDouble3D *totalCvtr = NULL, *totalCvv = NULL, *totalCve = NULL;
+    RDouble *Cvs = NULL, *Etrs = NULL;
+    if (nChemical > 0 && nEnergyRecycle > 0)
+    {
+        Thermo_Energy_temparay = gas->GetThermo_Energy_temparay();
+        Cvs = Thermo_Energy_temparay->Cvs;
+        Etrs = Thermo_Energy_temparay->Etrs;
+
+        speciesCvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCvs"));
+        speciesEtrs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEtrs"));
+
+        totalEnthalpy = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalEnthalpy"));
+        totalCv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCv"));
+
+        totalCvtr = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvtr"));
+        totalCvv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvv"));
+        totalCve = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCve"));
+    }
+
+    Range II, JJ, KK;
+    GetRange(ni, nj, nk, -2, 1, II, JJ, KK);
+    Range MM(0, nEquation - 1);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    bool isViscous = parameters->IsViscous();
+    RDouble3D viscousLaminar, viscousTurbulence;
+    if (isViscous)
+    {
+        viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+        viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    }
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+    RDouble3D *timeCoefficientInverse = NULL;
+    RDouble3D *preconCoefficient = NULL;
+    RDouble4D *preconMatrix = NULL;
+    int nElement = 0;
+    RDouble *dqTry = NULL;
+    RDouble *preconMatrixNeighbor = NULL;
+    RDouble *preconMatrixTemp = NULL;
+
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        timeCoefficientInverse = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("timeCoefficientInverse"));
+        preconCoefficient = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+        preconMatrix = reinterpret_cast< RDouble4D *> (grid->GetDataPtr("preconMatrix"));
+        nElement = nEquation * nEquation;
+        dqTry = new RDouble[nEquation];
+        preconMatrixNeighbor = new RDouble [nElement];
+        preconMatrixTemp = new RDouble [nElement];
+    }
+
+    int nDim = GetDim();
+
+    for (int k = kCellEnd; k >= kCellStart; --k)
+    {
+        for (int j = jCellEnd; j >= jCellStart; --j)
+        {
+            for (int i = iCellEnd; i >= iCellStart; --i)
+            {
+                int cellLabel = (ni - 1) * (nj - 1) * (k - 1) + (ni - 1) * (j - 1) + (i - 1);
+                if (iBlank[cellLabel] == IN_HOLE_COLOR)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        dq(i, j, k, m) = 0.0;
+                    }
+                    continue;
+                }
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    rhs0[m] = 0.0;
+
+                    //! Back up the old dq, to compute the convergence.
+                    //! the 'dq' is dq*, which has been updated in forward.
+                    dqOld[m] = dq(i, j, k, m);
+
+                    //! the dq is not the real dq, now.
+                    //! it is convenient for precondition transform.
+                    dq(i, j, k, m) = res(i, j, k, m);
+
+                    Lx[m] = deltaFlux(i, j, k, m);
+
+                    //! Then reset it to zero to store the upper forward sweep!
+                    deltaFlux(i, j, k, m) = 0.0;
+
+                }
+
+                for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+                {
+                    int il1, jl1, kl1, il, jl, kl;
+                    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        qNeighbor[m] = q(il, jl, kl, m);
+                        dqNeighbor[m] = dq(il, jl, kl, m);
+                    }
+
+                    if (ifLowSpeedPrecon != 0)
+                    {
+                        for (int m = 0; m < nElement; ++ m)
+                        {
+                            preconMatrixNeighbor[m] = (*preconMatrix)(il, jl, kl, m);
+                        }
+                    }
+
+                    //clz begin
+                    RDouble &xfn1 = gxfn(il, jl, kl, iSurface);
+                    RDouble &yfn1 = gyfn(il, jl, kl, iSurface);
+                    RDouble &zfn1 = gzfn(il, jl, kl, iSurface);
+                    RDouble &area1 = garea(il, jl, kl, iSurface);
+                    RDouble &vgn1 = gvgn(il, jl, kl, iSurface);
+
+                    RDouble &xfn2 = gxfn(il + il1, jl + jl1, kl + kl1, iSurface);
+                    RDouble &yfn2 = gyfn(il + il1, jl + jl1, kl + kl1, iSurface);
+                    RDouble &zfn2 = gzfn(il + il1, jl + jl1, kl + kl1, iSurface);
+                    RDouble &area2 = garea(il + il1, jl + jl1, kl + kl1, iSurface);
+                    RDouble &vgn2 = gvgn(il + il1, jl + jl1, kl + kl1, iSurface);
+
+                    RDouble xfn = half * (xfn1 + xfn2);
+                    RDouble yfn = half * (yfn1 + yfn2);
+                    RDouble zfn = half * (zfn1 + zfn2);
+                    RDouble area = half * (area1 + area2);
+                    RDouble vgn = half * (vgn1 + vgn2);
+
+                    nxyz[0] = xfn;
+                    nxyz[1] = yfn;
+                    nxyz[2] = zfn;
+                    nxyz[3] = area;
+                    nxyz[4] = vgn;
+
+                    RDouble &rad = invSpectralRadius(il, jl, kl, iSurface - 1);
+
+                    RDouble gama = gamma(il, jl, kl);
+
+                    if (ifLowSpeedPrecon == 0)
+                    {
+                        //! Compute (M - R) * dQ including the real gas conditions.
+                        if (nChemical > 0)
+                        {
+                            for (int m = 0; m < nTemperatureModel; ++ m)
+                            {
+                                temperature[m] = t(il, jl, kl, m);
+                            }
+                        }
+                        else
+                        {
+                            MXDQ_STD(qNeighbor, xfn, yfn, zfn, area, vgn, gama, dqNeighbor, df, nNSEquation, nLaminar, rad, -1);
+                        }
+                    }
+                    else
+                    {
+                        RDouble preconCoeff = (*preconCoefficient)(il, jl, kl);
+                        RDouble timeCoeff = (*timeCoefficientInverse)(il, jl, kl);
+                        PreconMatrixFreeDF(qNeighbor, dqNeighbor, nxyz, preconMatrixNeighbor, gama, preconCoeff, timeCoeff, df, nNSEquation, nLaminar, -1);
+                    }
+
+                    //! Add Flux together.
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        rhs0[m] += df[m];
+                    }
+
+                    if (isViscous)
+                    {
+                        RDouble rad_vis = half * visSpectralRadius(il, jl, kl, iSurface - 1);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            rhs0[m] += -rad_vis * dqNeighbor[m];
+                        }
+                    }
+                }
+
+                if (ifLowSpeedPrecon == 1)
+                {
+                    //! Here, the 'dqCell' is 'res' actually.
+                    //! The reason why operate on 'dqCell' other than 'res', is that the 'dqCell' is a temporary variable.
+                    //! and the real 'res' is forbidden to be changed.
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        dqTry[m]= dq(i, j, k, m);
+                    }
+
+                    for (int m = 0; m < nElement; ++ m)
+                    {
+                        preconMatrixTemp[m] = (*preconMatrix)(i, j, k, m);
+                    }
+
+                    RDouble timeCoeffTemp = (*timeCoefficientInverse)(i, j, k);
+                    ConservativePreconMatrixVariables(dqTry, preconMatrixTemp, timeCoeffTemp, nEquation);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        dq(i, j, k, m) = dqTry[m];
+                    }
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    //! Note: the 'dq' has been updated by the forward sweep.
+                    //! the 'rhs0' is the total Delta Flux of the neighbors.
+                    //! x = {(b - LX) - Ux} / D.
+                    //! rhs0: Ux.    diagonal: D.
+                    dq(i, j, k, m) = (dq(i, j, k, m) - Lx[m] - rhs0[m]) / diagonal(i, j, k, m);
+
+                    //! Store the upper backward sweep delta-flux, which will be used in the forward sweep.
+                    deltaFlux(i, j, k, m) += rhs0[m];
+
+                    sweepNormal += SQR(dq(i, j, k, m) - dqOld[m]);
+                }
+            }
+        }
+    }
+
+    delete[] nxyz;    nxyz = NULL;
+    delete[] dqNeighbor;    dqNeighbor = NULL;
+    delete[] dqOld;    dqOld = NULL;
+    delete[] qNeighbor;    qNeighbor = NULL;
+    delete[] rhs0;    rhs0 = NULL;
+
+    delete[] de;    de = NULL;
+    delete[] df;    df = NULL;
+    delete[] dg;    dg = NULL;
+
+    delete[] temperature;    temperature = NULL;
+    delete[] Lx;    Lx = NULL;
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        delete []dqTry;    dqTry = NULL;
+        delete []preconMatrixNeighbor;    preconMatrixNeighbor = NULL;
+        delete []preconMatrixTemp;    preconMatrixTemp = NULL;
+    }
+}
+
+#endif
+
+void NCCRSolverStruct::DetermineCFLNumber(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *dqProxy1)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &dq = dqProxy->GetField_STR();
+    RDouble4D &dq1 = dqProxy1->GetField_STR();
+    RDouble3D *localCFL = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("localCFL"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int nStart = nNSEquation + numberOfSpecies;
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    RDouble nCFLStart = parameters->GetCFLStart();
+    RDouble nCFLEnd = parameters->GetCFLEnd();
+    RDouble errLimit = 0.1, errCoef = 1.0e-3, eps = 0.0, max_eps = 0.0;
+    RDouble pOrder = pow(2, 2.0), cfl = 0.1;
+    if (GlobalDataBase::IsExist("predictCFLError", PHDOUBLE, 1))
+    {
+        errLimit = GlobalDataBase::GetDoubleParaFromDB("predictCFLError");
+    }
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                max_eps = 0.0;
+                for (int m = 0; m < nLaminar; ++ m)
+                {
+                    eps = (pOrder / (1.0 - pOrder)) * (dq1(i, j, k, m) - dq(i, j, k, m));
+                    max_eps = MAX(max_eps, ABS(eps));
+                }
+
+                for (int m = nStart; m < nEquation; ++ m)
+                {
+                    eps = (pOrder / (1.0 - pOrder)) * (dq1(i, j, k, m) - dq(i, j, k, m));
+                    max_eps = MAX(max_eps, ABS(eps));
+                }
+
+                cfl = (*localCFL)(i, j, k);
+                if (max_eps > errLimit) //! The time step is too large.
+                {
+                    cfl *= 0.5;
+                }
+                else
+                {
+                    if (max_eps <= errCoef * errLimit) //! The time step is too small.
+                    {
+                        cfl *= 2.0;
+                    }
+                    else //! The time step is suitable.
+                    {
+                        //No change.
+                    }
+                    //employ the results computed by the larger time step.
+                    //for (int m = 0; m < nEquation; ++ m)
+                    //{
+                    //    dq(i, j, k, m) = dq1(i, j, k, m);
+                    //}
+                }
+
+                if (cfl < nCFLStart)
+                {
+                    cfl = nCFLStart;
+                }
+                if (cfl > nCFLEnd)
+                {
+                    cfl = nCFLEnd;
+                }
+                (*localCFL)(i, j, k) = cfl;
+            }
+        }
+    }
+}
+
+
+void NCCRSolverStruct::SolveMatrixLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    SolveMatrixLUSGSForwardSweep(grid, dqProxy, LUplusDQ, sweepNormal);
+}
+
+void NCCRSolverStruct::SolveMatrixLUSGSBackward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    SolveMatrixLUSGSBackwardSweep(grid, dqProxy, LUplusDQ, sweepNormal);
+}
+
+void NCCRSolverStruct::SetGhostDQLUSGS(Grid *gridIn, RDouble4D &dq)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    int viscousType = parameters->GetViscousType();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &gama = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+    using namespace PHENGLEI;
+    RDouble *prim = new RDouble[nEquation];
+    RDouble *Q = new RDouble[nEquation];
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        int *s_lr3d = structBC->GetFaceDirectionIndex();
+        int iSurface = structBC->GetFaceDirection() + 1;
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int is = i;
+                    int js = j;
+                    int ks = k;
+
+                    int it = i + s_lr3d[0];
+                    int jt = j + s_lr3d[1];
+                    int kt = k + s_lr3d[2];
+
+                    //! Conservative Variables on level n+1.
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        prim[m] = q(is, js, ks, m);
+                    }
+
+                    RDouble tv = t(is, js, ks, mTV);
+                    RDouble te = t(is, js, ks, mTE);
+
+                    gas->Primitive2Conservative(prim, gama(is, js, ks), tv, te, Q);
+
+                    for (int m = 0; m < nLaminar; ++ m)
+                    {
+                        Q[m] += dq(is, js, ks, m);
+                    }
+
+                    //! Non-conservative variables in re in level n.
+                    RDouble rm = q(it, jt, kt, IR);
+                    RDouble um = q(it, jt, kt, IU);
+                    RDouble vm = q(it, jt, kt, IV);
+                    RDouble wm = q(it, jt, kt, IW);
+                    RDouble pm = q(it, jt, kt, IP);
+
+                    int in, jn, kn;
+                    structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                    RDouble nxs = xfn(in, jn, kn, iSurface);
+                    RDouble nys = yfn(in, jn, kn, iSurface);
+                    RDouble nzs = zfn(in, jn, kn, iSurface);
+
+                    if (BCType == PHENGLEI::SYMMETRY || (IsWall(BCType) && viscousType == INVISCID))
+                    {
+                        //! Inviscid wall or symmetry boundary.
+                        dq(it, jt, kt, IR) = dq(is, js, ks, IR);
+                        RDouble rvn = two * (nxs * dq(is, js, ks, IU) + nys * dq(is, js, ks, IV) + nzs * dq(is, js, ks, IW));
+                        dq(it, jt, kt, IU) = dq(is, js, ks, IU) - nxs * rvn;
+                        dq(it, jt, kt, IV) = dq(is, js, ks, IV) - nys * rvn;
+                        dq(it, jt, kt, IW) = dq(is, js, ks, IW) - nzs * rvn;
+                        rvn = two * (nxs * Q[IU] + nys * Q[IV] + nzs * Q[IW]);
+                        RDouble ru = Q[IU] - nxs * rvn;
+                        RDouble rv = Q[IV] - nys * rvn;
+                        RDouble rw = Q[IW] - nzs * rvn;
+                        RDouble p_new = Q[IP] - half * (Q[IU] * Q[IU] + Q[IV] * Q[IV] + Q[IW] * Q[IW]) / Q[IR];
+
+                        RDouble gam1 = gama(is, js, ks) - one;
+                        dq(it, jt, kt, IP) = p_new - pm / gam1 + half * ((ru * ru + rv * rv + rw * rw) / Q[IR] - rm * (um * um + vm * vm + wm * wm));
+                    }
+                    else if (IsWall(BCType) && viscousType > INVISCID)
+                    {
+                        RDouble ub = 0.0;
+                        RDouble vb = 0.0;
+                        RDouble wb = 0.0;
+                        dq(it, jt, kt, IR) = dq(is, js, ks, IR);
+                        dq(it, jt, kt, IU) = -dq(is, js, ks, IU) + two * ub * dq(is, js, ks, IR);
+                        dq(it, jt, kt, IV) = -dq(is, js, ks, IV) + two * vb * dq(is, js, ks, IR);
+                        dq(it, jt, kt, IW) = -dq(is, js, ks, IW) + two * wb * dq(is, js, ks, IR);
+                        dq(it, jt, kt, IP) = dq(is, js, ks, IP) + ub * (dq(it, jt, kt, IU) - dq(is, js, ks, IU))
+                            + vb * (dq(it, jt, kt, IV) - dq(is, js, ks, IV))
+                            + wb * (dq(it, jt, kt, IW) - dq(is, js, ks, IW));
+                    }
+                    else if (BCType == PHENGLEI::EXTRAPOLATION)
+                    {
+                        for (int m = 0; m < nLaminar; ++ m)
+                        {
+                            dq(it, jt, kt, m) = dq(is, js, ks, m);
+                        }
+                    }
+                    else
+                    {
+                        //! FIX_ALL set DQ = 0.
+                        for (int m = 0; m < nLaminar; ++ m)
+                        {
+                            dq(it, jt, kt, m) = zero;
+                        }
+                    }
+                }
+            }
+        }
+    }
+    delete[]prim;
+    delete[]Q;
+}
+
+void NCCRSolverStruct::UploadInterfaceData(ActionKey *actkey)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int level = actkey->level;
+    StructGrid *grid = reinterpret_cast <StructGrid *> (GetGrid(level));
+    StructGrid *fineGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *interfaceInfo = fineGrid->GetInterfaceInfo();
+    if (!interfaceInfo)
+    {
+        return;
+    }
+
+    int nEquation = GetNumberOfEquations();
+    RDouble4D *primitiveVariables = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    PHSPACE::UploadInterfaceValue(grid, primitiveVariables, "q", nEquation);
+
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble4D *temperatures = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    PHSPACE::UploadInterfaceValue(grid, temperatures, "t", nTemperatureModel);
+}
+
+void NCCRSolverStruct::DownloadInterfaceData(ActionKey *actkey)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int level = actkey->level;
+    StructGrid *grid = reinterpret_cast<StructGrid *>(GetGrid(level));
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo)
+    {
+        return;
+    }
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D *primitiveVariables = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    PHSPACE::DownloadInterfaceValue(grid, primitiveVariables, "q", nEquation);
+
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble4D *temperatures = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    PHSPACE::DownloadInterfaceValue(grid, temperatures, "t", nTemperatureModel);
+}
+
+void NCCRSolverStruct::UploadOversetData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D *primitiveVariables = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    PHSPACE::UploadOversetValue(grid, primitiveVariables, "q", nEquation);
+
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble4D *temperatures = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    PHSPACE::UploadOversetValue(grid, temperatures, "t", nTemperatureModel);
+}
+
+void NCCRSolverStruct::DownloadOversetData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = reinterpret_cast<StructGrid *>(GetGrid(level));
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D *primitiveVariables = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    PHSPACE::DownloadOversetValue(grid, primitiveVariables, "q", nEquation);
+
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble4D *temperatures = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    PHSPACE::DownloadOversetValue(grid, temperatures, "t", nTemperatureModel);
+}
+
+void NCCRSolverStruct::RotateVectorFromInterface(Grid *gridIn, const int &neighborZoneIndex, const int &nEquation)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+    StructBCSet *structBCSet = finestGrid->GetStructBCSet();
+    RDouble4D &rotNSgradValueX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotNSgradValueX"));
+    RDouble4D &rotNSgradValueY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotNSgradValueY"));
+    RDouble4D &rotNSgradValueZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotNSgradValueZ"));
+
+    rotNSgradValueX = 0.0;
+    rotNSgradValueY = 0.0;
+    rotNSgradValueZ = 0.0;
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+    RDouble rotationAngle = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+    rotationAngle = rotationAngle * PI / 180;
+    if (nEquation > 0)
+    {
+        RDouble4D &fieldRecvNSY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+        RDouble4D &fieldRecvNSZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int iFace = interfaceIndexContainerForReceive[iLocalFace];
+                int it, jt, kt;
+                finestGrid->GetTargetIndexIJK(iFace, iGhostLayer + 1, it, jt, kt);
+                finestGrid->RemapMultigridIJK(level, it, jt, kt);
+                int *ibcregions = structBCSet->GetIFaceInfo();
+                int iBCRegion = ibcregions[iFace];
+                StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+                string bcName = bcregion->GetBCName();
+                if (bcName == "Periodic_up")
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        rotNSgradValueY(it, jt, kt, m) = fieldRecvNSY(it, jt, kt, m) * cos(2 * PI - rotationAngle) - fieldRecvNSZ(it, jt, kt, m) * sin(2 * PI - rotationAngle);
+                        rotNSgradValueZ(it, jt, kt, m) = fieldRecvNSY(it, jt, kt, m) * sin(2 * PI - rotationAngle) + fieldRecvNSZ(it, jt, kt, m) * cos(2 * PI - rotationAngle);
+                    }
+                }
+                else if (bcName == "Periodic_down")
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        rotNSgradValueY(it, jt, kt, m) = fieldRecvNSY(it, jt, kt, m) * cos(rotationAngle) - fieldRecvNSZ(it, jt, kt, m) * sin(rotationAngle);
+                        rotNSgradValueZ(it, jt, kt, m) = fieldRecvNSY(it, jt, kt, m) * sin(rotationAngle) + fieldRecvNSZ(it, jt, kt, m) * cos(rotationAngle);
+                    }
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    fieldRecvNSY(it, jt, kt, m) = rotNSgradValueY(it, jt, kt, m);
+                    fieldRecvNSZ(it, jt, kt, m) = rotNSgradValueZ(it, jt, kt, m);
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::CompressGradientandLimitToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &dqdx_cc = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdx_cc_ruvwpt"));
+    RDouble4D &dqdy_cc = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdy_cc_ruvwpt"));
+    RDouble4D &dqdz_cc = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdz_cc_ruvwpt"));
+
+    RDouble limitcoefofinterface = GlobalDataBase::GetDoubleParaFromDB("limitcoefofinterface");
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+        int is, js, ks;
+        finestGrid->GetSourceIndexIJK(iFace, 1, is, js, ks);
+        finestGrid->RemapMultigridIJK(level, is, js, ks);
+
+        for (int m = 0; m <= 5; ++ m)
+        {
+            PHWrite(dataContainer, dqdx_cc(is, js, ks, m));
+            PHWrite(dataContainer, dqdy_cc(is, js, ks, m));
+            PHWrite(dataContainer, dqdz_cc(is, js, ks, m));
+        }
+
+        PHWrite(dataContainer, limitcoefofinterface);
+        PHWrite(dataContainer, limitcoefofinterface);
+        PHWrite(dataContainer, limitcoefofinterface);
+        PHWrite(dataContainer, limitcoefofinterface);
+        PHWrite(dataContainer, limitcoefofinterface);
+    }
+}
+
+void NCCRSolverStruct::DecompressGradientandLimitToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    RDouble dqdx_cc_ruvwpt[6];
+    RDouble dqdy_cc_ruvwpt[6];
+    RDouble dqdz_cc_ruvwpt[6];
+
+    RDouble limitofunstr_nouse = 0.0;
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+        int it, jt, kt;
+        finestGrid->GetTargetIndexIJK(iFace, 1, it, jt, kt);
+        finestGrid->RemapMultigridIJK(level, it, jt, kt);
+        for (int m = 0; m <= 5; ++ m)
+        {
+            PHRead(dataContainer, dqdx_cc_ruvwpt[m]);
+            PHRead(dataContainer, dqdy_cc_ruvwpt[m]);
+            PHRead(dataContainer, dqdz_cc_ruvwpt[m]);
+        }
+
+        PHRead(dataContainer, limitofunstr_nouse);
+        PHRead(dataContainer, limitofunstr_nouse);
+        PHRead(dataContainer, limitofunstr_nouse);
+        PHRead(dataContainer, limitofunstr_nouse);
+        PHRead(dataContainer, limitofunstr_nouse);
+
+        gradUVWTCellCenterX(it, jt, kt, 0) = dqdx_cc_ruvwpt[1]; //grad of U
+        gradUVWTCellCenterY(it, jt, kt, 0) = dqdy_cc_ruvwpt[1]; //grad of U
+        gradUVWTCellCenterZ(it, jt, kt, 0) = dqdz_cc_ruvwpt[1]; //grad of U
+
+        gradUVWTCellCenterX(it, jt, kt, 1) = dqdx_cc_ruvwpt[2]; //grad of V
+        gradUVWTCellCenterY(it, jt, kt, 1) = dqdy_cc_ruvwpt[2]; //grad of V
+        gradUVWTCellCenterZ(it, jt, kt, 1) = dqdz_cc_ruvwpt[2]; //grad of V
+
+        gradUVWTCellCenterX(it, jt, kt, 2) = dqdx_cc_ruvwpt[3]; //grad of W
+        gradUVWTCellCenterY(it, jt, kt, 2) = dqdy_cc_ruvwpt[3]; //grad of W
+        gradUVWTCellCenterZ(it, jt, kt, 2) = dqdz_cc_ruvwpt[3]; //grad of W
+
+        gradUVWTCellCenterX(it, jt, kt, 3) = dqdx_cc_ruvwpt[5]; //grad of T
+        gradUVWTCellCenterY(it, jt, kt, 3) = dqdy_cc_ruvwpt[5]; //grad of T
+        gradUVWTCellCenterZ(it, jt, kt, 3) = dqdz_cc_ruvwpt[5]; //grad of T
+    }
+}
+
+void NCCRSolverStruct::CompressQlQrToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &QLI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1"));
+    RDouble4D &QLJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2"));
+    RDouble4D &QLK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3"));
+    RDouble4D &QRI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1"));
+    RDouble4D &QRJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2"));
+    RDouble4D &QRK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3"));
+
+    RDouble qface[5];
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+
+        int is, js, ks;
+        finestGrid->GetSourceIndexIJK(iFace, 1, is, js, ks);
+        finestGrid->RemapMultigridIJK(level, is, js, ks);
+
+        int id, jd, kd;
+        int i_lr, j_lr, k_lr;
+        finestGrid->GetSourceIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+
+        if (i_lr != 0)
+        {
+            //! I_face
+            if (i_lr == -1)
+            {
+                //! left boundary
+                qface[0] = QRI(is, js, ks, 0);
+                qface[1] = QRI(is, js, ks, 1);
+                qface[2] = QRI(is, js, ks, 2);
+                qface[3] = QRI(is, js, ks, 3);
+                qface[4] = QRI(is, js, ks, 4);
+            }
+            else
+            {
+                //! right boundary
+                qface[0] = QLI(is, js, ks, 0);
+                qface[1] = QLI(is, js, ks, 1);
+                qface[2] = QLI(is, js, ks, 2);
+                qface[3] = QLI(is, js, ks, 3);
+                qface[4] = QLI(is, js, ks, 4);
+            }
+        }
+        else if (j_lr != 0)
+        {
+            //! J_face
+            if (j_lr == -1)
+            {
+                //! left boundary
+                qface[0] = QRJ(is, js, ks, 0);
+                qface[1] = QRJ(is, js, ks, 1);
+                qface[2] = QRJ(is, js, ks, 2);
+                qface[3] = QRJ(is, js, ks, 3);
+                qface[4] = QRJ(is, js, ks, 4);
+            }
+            else
+            {
+                //! right boundary
+                qface[0] = QLJ(is, js, ks, 0);
+                qface[1] = QLJ(is, js, ks, 1);
+                qface[2] = QLJ(is, js, ks, 2);
+                qface[3] = QLJ(is, js, ks, 3);
+                qface[4] = QLJ(is, js, ks, 4);
+            }
+        }
+        else
+        {
+            //! K_face
+            if (k_lr == -1)
+            {
+                //! left boundary
+                qface[0] = QRK(is, js, ks, 0);
+                qface[1] = QRK(is, js, ks, 1);
+                qface[2] = QRK(is, js, ks, 2);
+                qface[3] = QRK(is, js, ks, 3);
+                qface[4] = QRK(is, js, ks, 4);
+            }
+            else
+            {
+                //! right boundary
+                qface[0] = QLK(is, js, ks, 0);
+                qface[1] = QLK(is, js, ks, 1);
+                qface[2] = QLK(is, js, ks, 2);
+                qface[3] = QLK(is, js, ks, 3);
+                qface[4] = QLK(is, js, ks, 4);
+            }
+        }
+        for (int m = 0; m < 5; ++ m)
+        {
+            PHWrite(dataContainer, qface[m]);
+        }
+    }
+}
+
+void NCCRSolverStruct::DecompressQlQrToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &QLI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1"));
+    RDouble4D &QLJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2"));
+    RDouble4D &QLK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3"));
+    RDouble4D &QRI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1"));
+    RDouble4D &QRJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2"));
+    RDouble4D &QRK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3"));
+
+    RDouble qface[5];
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+        int it, jt, kt;
+        finestGrid->GetTargetIndexIJK(iFace, 1, it, jt, kt);
+        finestGrid->RemapMultigridIJK(level, it, jt, kt);
+
+        for (int m = 0; m < 5; ++ m)
+        {
+            PHRead(dataContainer, qface[m]);
+        }
+
+        int id, jd, kd;
+        int i_lr, j_lr, k_lr;
+        finestGrid->GetTargetIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+        if (i_lr != 0)
+        {
+            //! I_face
+            if (i_lr == -1)
+            {
+                //! left boundary
+                QLI(it, jt, kt, 0) = qface[0];
+                QLI(it, jt, kt, 1) = qface[1];
+                QLI(it, jt, kt, 2) = qface[2];
+                QLI(it, jt, kt, 3) = qface[3];
+                QLI(it, jt, kt, 4) = qface[4];
+            }
+            else
+            {
+                //! right boundary
+                QRI(it, jt, kt, 0) = qface[0];
+                QRI(it, jt, kt, 1) = qface[1];
+                QRI(it, jt, kt, 2) = qface[2];
+                QRI(it, jt, kt, 3) = qface[3];
+                QRI(it, jt, kt, 4) = qface[4];
+            }
+        }
+        else if (j_lr != 0)
+        {
+            //! J_face
+            if (j_lr == -1)
+            {
+                //! left boundary
+                QLJ(it, jt, kt, 0) = qface[0];
+                QLJ(it, jt, kt, 1) = qface[1];
+                QLJ(it, jt, kt, 2) = qface[2];
+                QLJ(it, jt, kt, 3) = qface[3];
+                QLJ(it, jt, kt, 4) = qface[4];
+            }
+            else
+            {
+                //! right boundary
+                QRJ(it, jt, kt, 0) = qface[0];
+                QRJ(it, jt, kt, 1) = qface[1];
+                QRJ(it, jt, kt, 2) = qface[2];
+                QRJ(it, jt, kt, 3) = qface[3];
+                QRJ(it, jt, kt, 4) = qface[4];
+            }
+        }
+        else
+        {
+            //! K_face
+            if (k_lr == -1)
+            {
+                //! left boundary
+                QLK(it, jt, kt, 0) = qface[0];
+                QLK(it, jt, kt, 1) = qface[1];
+                QLK(it, jt, kt, 2) = qface[2];
+                QLK(it, jt, kt, 3) = qface[3];
+                QLK(it, jt, kt, 4) = qface[4];
+            }
+            else
+            {
+                //! right boundary
+                QRK(it, jt, kt, 0) = qface[0];
+                QRK(it, jt, kt, 1) = qface[1];
+                QRK(it, jt, kt, 2) = qface[2];
+                QRK(it, jt, kt, 3) = qface[3];
+                QRK(it, jt, kt, 4) = qface[4];
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::CompressFacefluxToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    int gridtypeofcurrentZone = grid->Type();
+    int gridtypeofneighborZone = PHMPI::GetZoneGridType(neighborZoneIndex);
+    if (gridtypeofcurrentZone == gridtypeofneighborZone)
+    {
+        RDouble uploadData = 0.0;
+        dataContainer->moveto_begin();
+        PHWrite(dataContainer, uploadData);
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    if (viscousType <= INVISCID)
+    {
+        //! Euler
+        RDouble4D &faceInviscidfluxI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI"));
+        RDouble4D &faceInviscidfluxJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ"));
+        RDouble4D &faceInviscidfluxK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK"));
+
+        RDouble flux[5];
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForSend[iLocalFace];
+
+            int is, js, ks;
+            finestGrid->GetSourceIndexIJK(iFace, 1, is, js, ks);
+            finestGrid->RemapMultigridIJK(level, is, js, ks);
+
+            int id, jd, kd;
+            int i_lr, j_lr, k_lr;
+            finestGrid->GetSourceIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+
+            if (i_lr != 0)
+            {
+                //! I_face
+                if (i_lr == -1)
+                {
+                    //! left boundary
+                    flux[0] = faceInviscidfluxI(is, js, ks, 0);
+                    flux[1] = faceInviscidfluxI(is, js, ks, 1);
+                    flux[2] = faceInviscidfluxI(is, js, ks, 2);
+                    flux[3] = faceInviscidfluxI(is, js, ks, 3);
+                    flux[4] = faceInviscidfluxI(is, js, ks, 4);
+                }
+                else
+                {
+                    //! right boundary
+                    flux[0] = -faceInviscidfluxI(is + 1, js, ks, 0);
+                    flux[1] = -faceInviscidfluxI(is + 1, js, ks, 1);
+                    flux[2] = -faceInviscidfluxI(is + 1, js, ks, 2);
+                    flux[3] = -faceInviscidfluxI(is + 1, js, ks, 3);
+                    flux[4] = -faceInviscidfluxI(is + 1, js, ks, 4);
+                }
+            }
+            else if (j_lr != 0)
+            {
+                //! J_face
+                if (j_lr == -1)
+                {
+                    //! left boundary
+                    flux[0] = faceInviscidfluxJ(is, js, ks, 0);
+                    flux[1] = faceInviscidfluxJ(is, js, ks, 1);
+                    flux[2] = faceInviscidfluxJ(is, js, ks, 2);
+                    flux[3] = faceInviscidfluxJ(is, js, ks, 3);
+                    flux[4] = faceInviscidfluxJ(is, js, ks, 4);
+                }
+                else
+                {
+                    //! right boundary
+                    flux[0] = -faceInviscidfluxJ(is, js + 1, ks, 0);
+                    flux[1] = -faceInviscidfluxJ(is, js + 1, ks, 1);
+                    flux[2] = -faceInviscidfluxJ(is, js + 1, ks, 2);
+                    flux[3] = -faceInviscidfluxJ(is, js + 1, ks, 3);
+                    flux[4] = -faceInviscidfluxJ(is, js + 1, ks, 4);
+                }
+            }
+            else
+            {
+                //! K_face
+                if (k_lr == -1)
+                {
+                    //! left boundary
+                    flux[0] = faceInviscidfluxK(is, js, ks, 0);
+                    flux[1] = faceInviscidfluxK(is, js, ks, 1);
+                    flux[2] = faceInviscidfluxK(is, js, ks, 2);
+                    flux[3] = faceInviscidfluxK(is, js, ks, 3);
+                    flux[4] = faceInviscidfluxK(is, js, ks, 4);
+                }
+                else
+                {
+                    //! right boundary
+                    flux[0] = -faceInviscidfluxK(is, js, ks + 1, 0);
+                    flux[1] = -faceInviscidfluxK(is, js, ks + 1, 1);
+                    flux[2] = -faceInviscidfluxK(is, js, ks + 1, 2);
+                    flux[3] = -faceInviscidfluxK(is, js, ks + 1, 3);
+                    flux[4] = -faceInviscidfluxK(is, js, ks + 1, 4);
+                }
+            }
+
+            for (int m = 0; m < 5; ++ m)
+            {
+                PHWrite(dataContainer, flux[m]);
+            }
+        }
+    }
+    else
+    {
+        //! laminar
+        RDouble4D &faceInviscidfluxI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI"));
+        RDouble4D &faceInviscidfluxJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ"));
+        RDouble4D &faceInviscidfluxK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK"));
+
+        RDouble4D &faceViscousfluxI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxI"));
+        RDouble4D &faceViscousfluxJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxJ"));
+        RDouble4D &faceViscousfluxK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxK"));
+
+        RDouble Inviscidflux[5];
+        RDouble Viscousflux[5];
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForSend[iLocalFace];
+
+            int is, js, ks;
+            finestGrid->GetSourceIndexIJK(iFace, 1, is, js, ks);
+            finestGrid->RemapMultigridIJK(level, is, js, ks);
+
+            int id, jd, kd;
+            int i_lr, j_lr, k_lr;
+            finestGrid->GetSourceIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+
+            if (i_lr != 0)
+            {
+                //! I_face
+                if (i_lr == -1)
+                {
+                    //! left boundary
+                    Inviscidflux[0] = faceInviscidfluxI(is, js, ks, 0);
+                    Inviscidflux[1] = faceInviscidfluxI(is, js, ks, 1);
+                    Inviscidflux[2] = faceInviscidfluxI(is, js, ks, 2);
+                    Inviscidflux[3] = faceInviscidfluxI(is, js, ks, 3);
+                    Inviscidflux[4] = faceInviscidfluxI(is, js, ks, 4);
+
+                    Viscousflux[0] = faceViscousfluxI(is, js, ks, 0);
+                    Viscousflux[1] = faceViscousfluxI(is, js, ks, 1);
+                    Viscousflux[2] = faceViscousfluxI(is, js, ks, 2);
+                    Viscousflux[3] = faceViscousfluxI(is, js, ks, 3);
+                    Viscousflux[4] = faceViscousfluxI(is, js, ks, 4);
+                }
+                else
+                {
+                    //! right boundary
+                    Inviscidflux[0] = -faceInviscidfluxI(is + 1, js, ks, 0);
+                    Inviscidflux[1] = -faceInviscidfluxI(is + 1, js, ks, 1);
+                    Inviscidflux[2] = -faceInviscidfluxI(is + 1, js, ks, 2);
+                    Inviscidflux[3] = -faceInviscidfluxI(is + 1, js, ks, 3);
+                    Inviscidflux[4] = -faceInviscidfluxI(is + 1, js, ks, 4);
+
+                    Viscousflux[0] = -faceViscousfluxI(is + 1, js, ks, 0);
+                    Viscousflux[1] = -faceViscousfluxI(is + 1, js, ks, 1);
+                    Viscousflux[2] = -faceViscousfluxI(is + 1, js, ks, 2);
+                    Viscousflux[3] = -faceViscousfluxI(is + 1, js, ks, 3);
+                    Viscousflux[4] = -faceViscousfluxI(is + 1, js, ks, 4);
+                }
+            }
+            else if (j_lr != 0)
+            {
+                //! J_face
+                if (j_lr == -1)
+                {
+                    //! left boundary
+                    Inviscidflux[0] = faceInviscidfluxJ(is, js, ks, 0);
+                    Inviscidflux[1] = faceInviscidfluxJ(is, js, ks, 1);
+                    Inviscidflux[2] = faceInviscidfluxJ(is, js, ks, 2);
+                    Inviscidflux[3] = faceInviscidfluxJ(is, js, ks, 3);
+                    Inviscidflux[4] = faceInviscidfluxJ(is, js, ks, 4);
+
+                    Viscousflux[0] = faceViscousfluxJ(is, js, ks, 0);
+                    Viscousflux[1] = faceViscousfluxJ(is, js, ks, 1);
+                    Viscousflux[2] = faceViscousfluxJ(is, js, ks, 2);
+                    Viscousflux[3] = faceViscousfluxJ(is, js, ks, 3);
+                    Viscousflux[4] = faceViscousfluxJ(is, js, ks, 4);
+                }
+                else
+                {
+                    //! right boundary
+                    Inviscidflux[0] = -faceInviscidfluxJ(is, js + 1, ks, 0);
+                    Inviscidflux[1] = -faceInviscidfluxJ(is, js + 1, ks, 1);
+                    Inviscidflux[2] = -faceInviscidfluxJ(is, js + 1, ks, 2);
+                    Inviscidflux[3] = -faceInviscidfluxJ(is, js + 1, ks, 3);
+                    Inviscidflux[4] = -faceInviscidfluxJ(is, js + 1, ks, 4);
+
+                    Viscousflux[0] = -faceViscousfluxJ(is, js + 1, ks, 0);
+                    Viscousflux[1] = -faceViscousfluxJ(is, js + 1, ks, 1);
+                    Viscousflux[2] = -faceViscousfluxJ(is, js + 1, ks, 2);
+                    Viscousflux[3] = -faceViscousfluxJ(is, js + 1, ks, 3);
+                    Viscousflux[4] = -faceViscousfluxJ(is, js + 1, ks, 4);
+                }
+            }
+            else
+            {
+                //! K_face
+                if (k_lr == -1)
+                {
+                    //! left boundary
+                    Inviscidflux[0] = faceInviscidfluxK(is, js, ks, 0);
+                    Inviscidflux[1] = faceInviscidfluxK(is, js, ks, 1);
+                    Inviscidflux[2] = faceInviscidfluxK(is, js, ks, 2);
+                    Inviscidflux[3] = faceInviscidfluxK(is, js, ks, 3);
+                    Inviscidflux[4] = faceInviscidfluxK(is, js, ks, 4);
+
+                    Viscousflux[0] = faceViscousfluxK(is, js, ks, 0);
+                    Viscousflux[1] = faceViscousfluxK(is, js, ks, 1);
+                    Viscousflux[2] = faceViscousfluxK(is, js, ks, 2);
+                    Viscousflux[3] = faceViscousfluxK(is, js, ks, 3);
+                    Viscousflux[4] = faceViscousfluxK(is, js, ks, 4);
+                }
+                else
+                {
+                    //! right boundary
+                    Inviscidflux[0] = -faceInviscidfluxK(is, js, ks + 1, 0);
+                    Inviscidflux[1] = -faceInviscidfluxK(is, js, ks + 1, 1);
+                    Inviscidflux[2] = -faceInviscidfluxK(is, js, ks + 1, 2);
+                    Inviscidflux[3] = -faceInviscidfluxK(is, js, ks + 1, 3);
+                    Inviscidflux[4] = -faceInviscidfluxK(is, js, ks + 1, 4);
+
+                    Viscousflux[0] = -faceViscousfluxK(is, js, ks + 1, 0);
+                    Viscousflux[1] = -faceViscousfluxK(is, js, ks + 1, 1);
+                    Viscousflux[2] = -faceViscousfluxK(is, js, ks + 1, 2);
+                    Viscousflux[3] = -faceViscousfluxK(is, js, ks + 1, 3);
+                    Viscousflux[4] = -faceViscousfluxK(is, js, ks + 1, 4);
+                }
+            }
+            for (int m = 0; m < 5; ++ m)
+            {
+                PHWrite(dataContainer, Inviscidflux[m]);
+                PHWrite(dataContainer, Viscousflux[m]);
+            }
+        }
+    }
+
+}
+
+void NCCRSolverStruct::DecompressFacefluxToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    int gridtypeofcurrentZone = grid->Type();
+    int gridtypeofneighborZone = PHMPI::GetZoneGridType(neighborZoneIndex);
+    if (gridtypeofcurrentZone == gridtypeofneighborZone)
+    {
+        RDouble downdData = 0.0;
+        dataContainer->moveto_begin();
+        PHRead(dataContainer, downdData);
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    RDouble coefofstrflux = GlobalDataBase::GetDoubleParaFromDB("coefofstrflux");
+    RDouble coefofunstrflux = 1.0 - coefofstrflux;
+
+    if (viscousType <= INVISCID)
+    {
+        //! Euler
+        RDouble4D &faceInviscidfluxI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI"));
+        RDouble4D &faceInviscidfluxJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ"));
+        RDouble4D &faceInviscidfluxK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK"));
+
+        RDouble flux[5];
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForReceive[iLocalFace];
+            int it, jt, kt;
+            finestGrid->GetTargetIndexIJK(iFace, 1, it, jt, kt);
+            finestGrid->RemapMultigridIJK(level, it, jt, kt);
+
+            for (int m = 0; m < 5; ++ m)
+            {
+                PHRead(dataContainer, flux[m]);
+            }
+
+            int id, jd, kd;
+            int i_lr, j_lr, k_lr;
+            finestGrid->GetTargetIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+            if (i_lr != 0)
+            {
+                //! I_face
+                if (i_lr == -1)
+                {
+                    //! left boundary
+                    faceInviscidfluxI(it + 1, jt, kt, 0) = (coefofunstrflux * flux[0] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 0));
+                    faceInviscidfluxI(it + 1, jt, kt, 1) = (coefofunstrflux * flux[1] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 1));
+                    faceInviscidfluxI(it + 1, jt, kt, 2) = (coefofunstrflux * flux[2] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 2));
+                    faceInviscidfluxI(it + 1, jt, kt, 3) = (coefofunstrflux * flux[3] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 3));
+                    faceInviscidfluxI(it + 1, jt, kt, 4) = (coefofunstrflux * flux[4] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 4));
+                }
+                else
+                {
+                    //! right boundary
+                    faceInviscidfluxI(it, jt, kt, 0) = (-coefofunstrflux * flux[0] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 0));
+                    faceInviscidfluxI(it, jt, kt, 1) = (-coefofunstrflux * flux[1] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 1));
+                    faceInviscidfluxI(it, jt, kt, 2) = (-coefofunstrflux * flux[2] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 2));
+                    faceInviscidfluxI(it, jt, kt, 3) = (-coefofunstrflux * flux[3] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 3));
+                    faceInviscidfluxI(it, jt, kt, 4) = (-coefofunstrflux * flux[4] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 4));
+                }
+            }
+            else if (j_lr != 0)
+            {
+                //! J_face
+                if (j_lr == -1)
+                {
+                    //! left boundary
+                    faceInviscidfluxJ(it, jt + 1, kt, 0) = (coefofunstrflux * flux[0] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 0));
+                    faceInviscidfluxJ(it, jt + 1, kt, 1) = (coefofunstrflux * flux[1] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 1));
+                    faceInviscidfluxJ(it, jt + 1, kt, 2) = (coefofunstrflux * flux[2] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 2));
+                    faceInviscidfluxJ(it, jt + 1, kt, 3) = (coefofunstrflux * flux[3] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 3));
+                    faceInviscidfluxJ(it, jt + 1, kt, 4) = (coefofunstrflux * flux[4] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 4));
+                }
+                else
+                {
+                    //! right boundary
+                    faceInviscidfluxJ(it, jt, kt, 0) = (-coefofunstrflux * flux[0] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 0));
+                    faceInviscidfluxJ(it, jt, kt, 1) = (-coefofunstrflux * flux[1] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 1));
+                    faceInviscidfluxJ(it, jt, kt, 2) = (-coefofunstrflux * flux[2] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 2));
+                    faceInviscidfluxJ(it, jt, kt, 3) = (-coefofunstrflux * flux[3] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 3));
+                    faceInviscidfluxJ(it, jt, kt, 4) = (-coefofunstrflux * flux[4] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 4));
+                }
+            }
+            else
+            {
+                //! K_face
+                if (k_lr == -1)
+                {
+                    //! left boundary
+                    faceInviscidfluxK(it, jt, kt + 1, 0) = (coefofunstrflux * flux[0] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 0));
+                    faceInviscidfluxK(it, jt, kt + 1, 1) = (coefofunstrflux * flux[1] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 1));
+                    faceInviscidfluxK(it, jt, kt + 1, 2) = (coefofunstrflux * flux[2] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 2));
+                    faceInviscidfluxK(it, jt, kt + 1, 3) = (coefofunstrflux * flux[3] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 3));
+                    faceInviscidfluxK(it, jt, kt + 1, 4) = (coefofunstrflux * flux[4] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 4));
+                }
+                else
+                {
+                    //! right boundary
+                    faceInviscidfluxK(it, jt, kt, 0) = (-coefofunstrflux * flux[0] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 0));
+                    faceInviscidfluxK(it, jt, kt, 1) = (-coefofunstrflux * flux[1] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 1));
+                    faceInviscidfluxK(it, jt, kt, 2) = (-coefofunstrflux * flux[2] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 2));
+                    faceInviscidfluxK(it, jt, kt, 3) = (-coefofunstrflux * flux[3] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 3));
+                    faceInviscidfluxK(it, jt, kt, 4) = (-coefofunstrflux * flux[4] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 4));
+                }
+            }
+        }
+    }
+    else
+    {
+        //! laminar
+        RDouble4D &faceInviscidfluxI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI"));
+        RDouble4D &faceInviscidfluxJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ"));
+        RDouble4D &faceInviscidfluxK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK"));
+
+        RDouble4D &faceViscousfluxI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxI"));
+        RDouble4D &faceViscousfluxJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxJ"));
+        RDouble4D &faceViscousfluxK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxK"));
+
+        RDouble Inviscidflux[5];
+        RDouble Viscousflux[5];
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForReceive[iLocalFace];
+            int it, jt, kt;
+            finestGrid->GetTargetIndexIJK(iFace, 1, it, jt, kt);
+            finestGrid->RemapMultigridIJK(level, it, jt, kt);
+
+            for (int m = 0; m < 5; ++ m)
+            {
+                PHRead(dataContainer, Inviscidflux[m]);
+                PHRead(dataContainer, Viscousflux[m]);
+            }
+
+            int id, jd, kd;
+            int i_lr, j_lr, k_lr;
+            finestGrid->GetTargetIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+            if (i_lr != 0)
+            {
+                //! I_face
+                if (i_lr == -1)
+                {
+                    //! left boundary
+                    faceInviscidfluxI(it + 1, jt, kt, 0) = (coefofunstrflux * Inviscidflux[0] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 0));
+                    faceInviscidfluxI(it + 1, jt, kt, 1) = (coefofunstrflux * Inviscidflux[1] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 1));
+                    faceInviscidfluxI(it + 1, jt, kt, 2) = (coefofunstrflux * Inviscidflux[2] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 2));
+                    faceInviscidfluxI(it + 1, jt, kt, 3) = (coefofunstrflux * Inviscidflux[3] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 3));
+                    faceInviscidfluxI(it + 1, jt, kt, 4) = (coefofunstrflux * Inviscidflux[4] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 4));
+
+                    faceViscousfluxI(it + 1, jt, kt, 0) = (coefofunstrflux * Viscousflux[0] + coefofstrflux * faceViscousfluxI(it + 1, jt, kt, 0));
+                    faceViscousfluxI(it + 1, jt, kt, 1) = (coefofunstrflux * Viscousflux[1] + coefofstrflux * faceViscousfluxI(it + 1, jt, kt, 1));
+                    faceViscousfluxI(it + 1, jt, kt, 2) = (coefofunstrflux * Viscousflux[2] + coefofstrflux * faceViscousfluxI(it + 1, jt, kt, 2));
+                    faceViscousfluxI(it + 1, jt, kt, 3) = (coefofunstrflux * Viscousflux[3] + coefofstrflux * faceViscousfluxI(it + 1, jt, kt, 3));
+                    faceViscousfluxI(it + 1, jt, kt, 4) = (coefofunstrflux * Viscousflux[4] + coefofstrflux * faceViscousfluxI(it + 1, jt, kt, 4));
+                }
+                else
+                {
+                    //! right boundary
+                    faceInviscidfluxI(it, jt, kt, 0) = (-coefofunstrflux * Inviscidflux[0] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 0));
+                    faceInviscidfluxI(it, jt, kt, 1) = (-coefofunstrflux * Inviscidflux[1] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 1));
+                    faceInviscidfluxI(it, jt, kt, 2) = (-coefofunstrflux * Inviscidflux[2] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 2));
+                    faceInviscidfluxI(it, jt, kt, 3) = (-coefofunstrflux * Inviscidflux[3] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 3));
+                    faceInviscidfluxI(it, jt, kt, 4) = (-coefofunstrflux * Inviscidflux[4] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 4));
+
+                    faceViscousfluxI(it, jt, kt, 0) = (-coefofunstrflux * Viscousflux[0] + coefofstrflux * faceViscousfluxI(it, jt, kt, 0));
+                    faceViscousfluxI(it, jt, kt, 1) = (-coefofunstrflux * Viscousflux[1] + coefofstrflux * faceViscousfluxI(it, jt, kt, 1));
+                    faceViscousfluxI(it, jt, kt, 2) = (-coefofunstrflux * Viscousflux[2] + coefofstrflux * faceViscousfluxI(it, jt, kt, 2));
+                    faceViscousfluxI(it, jt, kt, 3) = (-coefofunstrflux * Viscousflux[3] + coefofstrflux * faceViscousfluxI(it, jt, kt, 3));
+                    faceViscousfluxI(it, jt, kt, 4) = (-coefofunstrflux * Viscousflux[4] + coefofstrflux * faceViscousfluxI(it, jt, kt, 4));
+                }
+            }
+            else if (j_lr != 0)
+            {
+                //! J_face
+                if (j_lr == -1)
+                {
+                    //! left boundary
+                    faceInviscidfluxJ(it, jt + 1, kt, 0) = (coefofunstrflux * Inviscidflux[0] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 0));
+                    faceInviscidfluxJ(it, jt + 1, kt, 1) = (coefofunstrflux * Inviscidflux[1] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 1));
+                    faceInviscidfluxJ(it, jt + 1, kt, 2) = (coefofunstrflux * Inviscidflux[2] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 2));
+                    faceInviscidfluxJ(it, jt + 1, kt, 3) = (coefofunstrflux * Inviscidflux[3] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 3));
+                    faceInviscidfluxJ(it, jt + 1, kt, 4) = (coefofunstrflux * Inviscidflux[4] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 4));
+
+                    faceViscousfluxJ(it, jt + 1, kt, 0) = (coefofunstrflux * Viscousflux[0] + coefofstrflux * faceViscousfluxJ(it, jt + 1, kt, 0));
+                    faceViscousfluxJ(it, jt + 1, kt, 1) = (coefofunstrflux * Viscousflux[1] + coefofstrflux * faceViscousfluxJ(it, jt + 1, kt, 1));
+                    faceViscousfluxJ(it, jt + 1, kt, 2) = (coefofunstrflux * Viscousflux[2] + coefofstrflux * faceViscousfluxJ(it, jt + 1, kt, 2));
+                    faceViscousfluxJ(it, jt + 1, kt, 3) = (coefofunstrflux * Viscousflux[3] + coefofstrflux * faceViscousfluxJ(it, jt + 1, kt, 3));
+                    faceViscousfluxJ(it, jt + 1, kt, 4) = (coefofunstrflux * Viscousflux[4] + coefofstrflux * faceViscousfluxJ(it, jt + 1, kt, 4));
+                }
+                else
+                {
+                    //! right boundary
+                    faceInviscidfluxJ(it, jt, kt, 0) = (-coefofunstrflux * Inviscidflux[0] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 0));
+                    faceInviscidfluxJ(it, jt, kt, 1) = (-coefofunstrflux * Inviscidflux[1] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 1));
+                    faceInviscidfluxJ(it, jt, kt, 2) = (-coefofunstrflux * Inviscidflux[2] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 2));
+                    faceInviscidfluxJ(it, jt, kt, 3) = (-coefofunstrflux * Inviscidflux[3] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 3));
+                    faceInviscidfluxJ(it, jt, kt, 4) = (-coefofunstrflux * Inviscidflux[4] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 4));
+
+                    faceViscousfluxJ(it, jt, kt, 0) = (-coefofunstrflux * Viscousflux[0] + coefofstrflux * faceViscousfluxJ(it, jt, kt, 0));
+                    faceViscousfluxJ(it, jt, kt, 1) = (-coefofunstrflux * Viscousflux[1] + coefofstrflux * faceViscousfluxJ(it, jt, kt, 1));
+                    faceViscousfluxJ(it, jt, kt, 2) = (-coefofunstrflux * Viscousflux[2] + coefofstrflux * faceViscousfluxJ(it, jt, kt, 2));
+                    faceViscousfluxJ(it, jt, kt, 3) = (-coefofunstrflux * Viscousflux[3] + coefofstrflux * faceViscousfluxJ(it, jt, kt, 3));
+                    faceViscousfluxJ(it, jt, kt, 4) = (-coefofunstrflux * Viscousflux[4] + coefofstrflux * faceViscousfluxJ(it, jt, kt, 4));
+                }
+            }
+            else
+            {
+                //! K_face
+                if (k_lr == -1)
+                {
+                    //! left boundary
+                    faceInviscidfluxK(it, jt, kt + 1, 0) = (coefofunstrflux * Inviscidflux[0] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 0));
+                    faceInviscidfluxK(it, jt, kt + 1, 1) = (coefofunstrflux * Inviscidflux[1] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 1));
+                    faceInviscidfluxK(it, jt, kt + 1, 2) = (coefofunstrflux * Inviscidflux[2] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 2));
+                    faceInviscidfluxK(it, jt, kt + 1, 3) = (coefofunstrflux * Inviscidflux[3] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 3));
+                    faceInviscidfluxK(it, jt, kt + 1, 4) = (coefofunstrflux * Inviscidflux[4] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 4));
+
+                    faceViscousfluxK(it, jt, kt + 1, 0) = (coefofunstrflux * Viscousflux[0] + coefofstrflux * faceViscousfluxK(it, jt, kt + 1, 0));
+                    faceViscousfluxK(it, jt, kt + 1, 1) = (coefofunstrflux * Viscousflux[1] + coefofstrflux * faceViscousfluxK(it, jt, kt + 1, 1));
+                    faceViscousfluxK(it, jt, kt + 1, 2) = (coefofunstrflux * Viscousflux[2] + coefofstrflux * faceViscousfluxK(it, jt, kt + 1, 2));
+                    faceViscousfluxK(it, jt, kt + 1, 3) = (coefofunstrflux * Viscousflux[3] + coefofstrflux * faceViscousfluxK(it, jt, kt + 1, 3));
+                    faceViscousfluxK(it, jt, kt + 1, 4) = (coefofunstrflux * Viscousflux[4] + coefofstrflux * faceViscousfluxK(it, jt, kt + 1, 4));
+                }
+                else
+                {
+                    //! right boundary
+                    faceInviscidfluxK(it, jt, kt, 0) = (-coefofunstrflux * Inviscidflux[0] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 0));
+                    faceInviscidfluxK(it, jt, kt, 1) = (-coefofunstrflux * Inviscidflux[1] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 1));
+                    faceInviscidfluxK(it, jt, kt, 2) = (-coefofunstrflux * Inviscidflux[2] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 2));
+                    faceInviscidfluxK(it, jt, kt, 3) = (-coefofunstrflux * Inviscidflux[3] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 3));
+                    faceInviscidfluxK(it, jt, kt, 4) = (-coefofunstrflux * Inviscidflux[4] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 4));
+
+                    faceViscousfluxK(it, jt, kt, 0) = (-coefofunstrflux * Viscousflux[0] + coefofstrflux * faceViscousfluxK(it, jt, kt, 0));
+                    faceViscousfluxK(it, jt, kt, 1) = (-coefofunstrflux * Viscousflux[1] + coefofstrflux * faceViscousfluxK(it, jt, kt, 1));
+                    faceViscousfluxK(it, jt, kt, 2) = (-coefofunstrflux * Viscousflux[2] + coefofstrflux * faceViscousfluxK(it, jt, kt, 2));
+                    faceViscousfluxK(it, jt, kt, 3) = (-coefofunstrflux * Viscousflux[3] + coefofstrflux * faceViscousfluxK(it, jt, kt, 3));
+                    faceViscousfluxK(it, jt, kt, 4) = (-coefofunstrflux * Viscousflux[4] + coefofstrflux * faceViscousfluxK(it, jt, kt, 4));
+                }
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::CompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex, const int &nEquation)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &fieldSend = fieldProxy->GetField_STR();
+
+    for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+    {
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForSend[iLocalFace];
+            int is, js, ks;
+            finestGrid->GetSourceIndexIJK(iFace, iGhostLayer + 1, is, js, ks);
+            finestGrid->RemapMultigridIJK(level, is, js, ks);
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                PHWrite(dataContainer, fieldSend(is, js, ks, m));
+            }
+        }
+    }
+}
+
+void NCCRSolverStruct::DecompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex, const int &nEquation)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+    StructBCSet *structBCSet = finestGrid->GetStructBCSet();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    int periodicType = PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType");
+    RDouble rotationAngle = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+    rotationAngle = rotationAngle * PI / 180;
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &fieldRecv = fieldProxy->GetField_STR();
+
+    for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+    {
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForReceive[iLocalFace];
+            int it, jt, kt;
+            finestGrid->GetTargetIndexIJK(iFace, iGhostLayer + 1, it, jt, kt);
+            finestGrid->RemapMultigridIJK(level, it, jt, kt);
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                PHRead(dataContainer, fieldRecv(it, jt, kt, m));
+            }
+            if (periodicType == ROTATIONAL_PERIODICITY)
+            {
+                int *ibcregions = structBCSet->GetIFaceInfo();
+                int iBCRegion = ibcregions[iFace];
+                StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+                string bcName = bcregion->GetBCName();
+                if (bcName == "Periodic_up" || bcName == "Periodic_down")
+                {
+                    RDouble rotfg[3] = { 0, 0, 0 };
+                    if (bcName == "Periodic_up")
+                    {
+                        rotfg[0] = fieldRecv(it, jt, kt, 1);
+                        rotfg[1] = fieldRecv(it, jt, kt, 2) * cos(2 * PI - rotationAngle) - fieldRecv(it, jt, kt, 3) * sin(2 * PI - rotationAngle);
+                        rotfg[2] = fieldRecv(it, jt, kt, 2) * sin(2 * PI - rotationAngle) + fieldRecv(it, jt, kt, 3) * cos(2 * PI - rotationAngle);
+
+                    }
+                    else if (bcName == "Periodic_down")
+                    {
+                        rotfg[0] = fieldRecv(it, jt, kt, 1);
+                        rotfg[1] = fieldRecv(it, jt, kt, 2) * cos(rotationAngle) - fieldRecv(it, jt, kt, 3) * sin(rotationAngle);
+                        rotfg[2] = fieldRecv(it, jt, kt, 2) * sin(rotationAngle) + fieldRecv(it, jt, kt, 3) * cos(rotationAngle);
+                    }
+
+                    for (int m = 1; m <= 3; ++ m)
+                    {
+                        fieldRecv(it, jt, kt, m) = rotfg[m - 1];
+                    }
+                }
+            }
+        }
+    }
+}
+
+GradientCellCenter *NCCRSolverStruct::GetGradientCellCenterUVWT(Grid *gridIn, FieldProxy *primitiveVariables)
+{
+    int level = gridIn->GetLevel();
+    if (gradientCellCenterUVWT[level] == NULL)
+    {
+        gradientCellCenterUVWT[level] = new GradientCellCenter(gridIn, STRUCTGRID, primitiveVariables, 4);
+    }
+    return gradientCellCenterUVWT[level];
+}
+
+GradientCellCenter *NCCRSolverStruct::GetGradientCellCenterUVWT(Grid *gridIn)
+{
+    int level = gridIn->GetLevel();
+    return gradientCellCenterUVWT[level];
+}
+
+LIB_EXPORT void NCCRSolverStruct::ComputePostVisualVariables(Post_Visual *postVisualization)
+{
+    StructGrid *grid = StructGridCast(postVisualization->GetGrid());
+
+
+    if (postVisualization->GetFlowType() == AverageFlow)
+    {
+        RDouble4D &qAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage"));
+
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DENSITY);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qAverage, IDX::IR);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_U);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qAverage, IDX::IU);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_V);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qAverage, IDX::IV);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_W);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qAverage, IDX::IW);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_PRESSURE);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qAverage, IDX::IP);
+
+        return;
+    }
+
+    //! added by zzp 202108, for ReynoldsStress output
+    if (postVisualization->GetFlowType() == AverageReynoldsStress)
+    {
+        RDouble4D &tauAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("tauAverage"));
+
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_XX);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage, 0);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_YY);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage, 1);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_ZZ);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage, 2);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_XY);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage, 3);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_XZ);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage, 4);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_YZ);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage, 5);
+
+        return;
+    }
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    int isOverset = GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+    if (isOverset)
+    {
+        int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();
+
+        Range II(1, ni - 1);
+        Range JJ(1, nj - 1);
+        Range KK(1, nk - 1);
+        if (nk == 1) KK.setRange(1, 1);
+
+        Int3D &iblank = *new Int3D(II, JJ, KK, fortranArray);
+        int *iBlank = UnstructGridCast(grid)->GetBlankIndex();
+        int numberOfCells = grid->GetNTotalCell();
+        for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+        {
+            int i, j, k;
+            DecodeIJK(iCell, i, j, k, ni - 1, nj - 1);
+            iblank(i, j, k) = iBlank[iCell];
+        }
+
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_IBLANK))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_IBLANK);
+            postVisualization->UpdateVisualNodeVarPtr(varName, iblank);
+        }
+        delete &iblank;
+    }
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    using namespace IDX;
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DENSITY)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MACH))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DENSITY);
+        postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, IDX::IR);
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_U)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MACH))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_U);
+        postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, IDX::IU);
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_V)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MACH))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_V);
+        postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, IDX::IV);
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_W)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MACH))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_W);
+        postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, IDX::IW);
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_PRESSURE)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MACH))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_PRESSURE);
+        postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, IDX::IP);
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_TEMPERATURE))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TEMPERATURE);
+        postVisualization->UpdateVisualNodeVarPtr(varName, temperatures, IDX::ITT);
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_STREAMLINE_MACH))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_STREAMLINE_MACH);
+
+        int isOverset1 = parameters->GetIsOverLapping();
+
+        RDouble4D *mach = 0;
+        if (!isOverset1)
+        {
+            mach = CompMachNumber(grid);
+        }
+        else
+        {
+            mach = ComputeMachNumberField(grid);
+        }
+
+        postVisualization->UpdateVisualNodeVarPtr(varName, *mach, 0);
+        delete mach;
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_STREAMLINE_U))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_STREAMLINE_U);
+        postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, IDX::IU);
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_STREAMLINE_V))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_STREAMLINE_V);
+        postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, IDX::IV);
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_STREAMLINE_W))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_STREAMLINE_W);
+        postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, IDX::IW);
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_TIME_STEP))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TIME_STEP);
+        RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+        postVisualization->UpdateVisualNodeVarPtr(varName, dt);
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VOLUME))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VOLUME);
+        RDouble3D &vol = *(grid->GetCellVolume());
+        postVisualization->UpdateVisualNodeVarPtr(varName, vol);
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_WALL_DIST))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_WALL_DIST);
+        RDouble3D &wallDist = *(grid->GetWallDist());
+        postVisualization->UpdateVisualNodeVarPtr(varName, wallDist);
+    }
+
+
+    //! Bell 20130319 add.
+    int viscousType = parameters->GetViscousType();
+    string viscousName = parameters->GetViscousName();
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+    int transitionType = GlobalDataBase::GetIntParaFromDB("transitionType");
+
+    if (viscousType == LAMINAR && iLES == NOLES_SOLVER)
+    {
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VISCOSITY_LAMINAR))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VISCOSITY_LAMINAR);
+            RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+            postVisualization->UpdateVisualNodeVarPtr(varName, viscousLaminar);
+        }
+    }
+    else if (viscousType > LAMINAR || iLES == LES_SOLVER)
+    {
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VISCOSITY_LAMINAR))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VISCOSITY_LAMINAR);
+            RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+            postVisualization->UpdateVisualNodeVarPtr(varName, viscousLaminar);
+        }
+
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VISCOSITY_TURBULENT))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VISCOSITY_TURBULENT);
+            RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+            postVisualization->UpdateVisualNodeVarPtr(varName, viscousTurbulence);
+        }
+        //! For two-equation output turbulent kinetic energy and dissipative rate.
+        if (viscousName.substr(0, 6) == "2eq-kw")
+        {
+            RDouble4D &q_turb = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_turb"));
+            if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MODELED_TKE))
+            {
+                string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_MODELED_TKE);
+                postVisualization->UpdateVisualNodeVarPtr(varName, q_turb, IDX::IKE);
+            }
+            if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MODELED_DISSIPATION))
+            {
+                string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_MODELED_DISSIPATION);
+                postVisualization->UpdateVisualNodeVarPtr(varName, q_turb, IDX::IKW);
+            }
+            if (viscousName.substr(0, 17) == "2eq-kw-menter-sst")   //! for blending function F1 and F2.
+            {
+                if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_SST_F1))
+                {
+                    RDouble3D &blend = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("blend"));   // for blengding function F1
+                    string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_SST_F1);
+                    postVisualization->UpdateVisualNodeVarPtr(varName, blend);
+                }
+                if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_SST_F2))
+                {
+                    RDouble3D &SST_F2 = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("SST_F2"));   //! for blengding function F2
+                    string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_SST_F2);
+                    postVisualization->UpdateVisualNodeVarPtr(varName, SST_F2);
+                }
+                if (transitionType == IREGAMA)
+                {
+                    RDouble4D &q_transition = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_transition"));
+                    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_INTERMITTENCY))
+                    {
+                        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_INTERMITTENCY);
+                        postVisualization->UpdateVisualNodeVarPtr(varName, q_transition, IDX::IGAMA);
+                    }
+                    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MOMENTUMTHICKREYNOLDS))
+                    {
+                        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_MOMENTUMTHICKREYNOLDS);
+                        postVisualization->UpdateVisualNodeVarPtr(varName, q_transition, IDX::IRECT);
+                    }
+                    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_TRANSITION_GAMAEFF))
+                    {
+                        RDouble3D &gamaeff = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gamaeff"));   // for transition gamaeff
+                        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TRANSITION_GAMAEFF);
+                        postVisualization->UpdateVisualNodeVarPtr(varName, gamaeff);
+                    }
+                    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_TRANSITION_RESCF))
+                    {
+                        RDouble3D &rescf = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("rescf"));   // for transition Rescf
+                        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TRANSITION_RESCF);
+                        postVisualization->UpdateVisualNodeVarPtr(varName, rescf);
+                    }
+                }
+            }
+        }
+    }
+
+    int visualField = parameters->GetPlotFieldType();
+    if (WantVisualField(grid) || visualField == TEC_SPACE::BlockVisual)
+    {
+        //! Vorticity, Vorticity, by Q value.
+        RDouble3D *vorticity_x, *vorticity_y, *vorticity_z, *vorticityMagnitude, *strain_rate, *Q_criteria;
+
+        int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();
+
+        Range I, J, K;
+        GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+        vorticity_x = new RDouble3D(I, J, K, fortranArray);
+        vorticity_y = new RDouble3D(I, J, K, fortranArray);
+        vorticity_z = new RDouble3D(I, J, K, fortranArray);
+        vorticityMagnitude = new RDouble3D(I, J, K, fortranArray);
+        strain_rate = new RDouble3D(I, J, K, fortranArray);
+        Q_criteria = new RDouble3D(I, J, K, fortranArray);
+
+        ComputeVorticitybyQCriteria(grid, vorticity_x, vorticity_y, vorticity_z, vorticityMagnitude, strain_rate, Q_criteria);
+
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_X))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VORTICITY_X);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *vorticity_x);
+        }
+
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_Y))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VORTICITY_Y);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *vorticity_y);
+        }
+
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_Z))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VORTICITY_Z);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *vorticity_z);
+        }
+
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_MAGNITUDE))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VORTICITY_MAGNITUDE);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *vorticityMagnitude);
+        }
+
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_STRAIN_RATE))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_STRAIN_RATE);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *strain_rate);
+        }
+
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_Q_CRITERIA))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_Q_CRITERIA);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *Q_criteria);
+        }
+
+        delete vorticity_x;
+        delete vorticity_y;
+        delete vorticity_z;
+        delete vorticityMagnitude;
+        delete strain_rate;
+        delete Q_criteria;
+
+    }
+    else if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_X)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_Y)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_Z)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_MAGNITUDE)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_STRAIN_RATE)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_Q_CRITERIA))
+    {
+        TK_Exit::ExceptionExit("Error: can not visualization vorticity when plotFieldType = 0!");
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_CP))
+    {
+        RDouble4D *cp;
+        ComputeCp(grid, cp);
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_CP);
+        postVisualization->UpdateVisualNodeVarPtr(varName, *cp, 0);
+        delete cp;
+    }
+
+    //! Chemical species must be the last!
+    //using namespace GAS_SPACE;
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int isUseNoneqCond = parameters->GetNonequilibriumConditionFlag();
+
+        //! To write the vibratial temperature and vibrational energy.
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_TEMPERATURE_VIBRATION))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TEMPERATURE_VIBRATION);
+        if (nChemical > 0 && nTemperatureModel > 1)
+        {
+            postVisualization->UpdateVisualNodeVarPtr(varName, temperatures, IDX::ITV);
+        }
+        else
+        {
+            postVisualization->UpdateVisualNodeVarPtr(varName, temperatures, IDX::ITT);
+        }
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_ENERGY_VIBRATION))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_ENERGY_VIBRATION);
+        if (nChemical > 0 && nTemperatureModel > 1)
+        {
+            postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, nNSEquation + numberOfSpecies);
+        }
+        else
+        {
+            postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, nNSEquation + numberOfSpecies - 1);
+        }
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_TEMPERATURE_ELECTRON))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TEMPERATURE_ELECTRON);
+        if (nChemical > 0 && nTemperatureModel == 3)
+        {
+            postVisualization->UpdateVisualNodeVarPtr(varName, temperatures, IDX::ITE);
+        }
+        else
+        {
+            postVisualization->UpdateVisualNodeVarPtr(varName, temperatures, IDX::ITT);
+        }
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_ENERGY_ELECTRON))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_ENERGY_ELECTRON);
+        if (nChemical > 0 && nTemperatureModel == 3)
+        {
+            postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, nNSEquation + numberOfSpecies + 1);
+        }
+        else
+        {
+            postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, nNSEquation + numberOfSpecies - 1);
+        }
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_DENSITY)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_U)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_V)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_W)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_PRESSURE)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_TEMPERATURE))
+    {
+        RDouble4D *dimensionalVariables = ComputeDimensionalVariables(grid);
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_DENSITY))
+        {
+            //! Write the dimensional value of density.
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_DENSITY);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *dimensionalVariables, 0);
+        }
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_U))
+        {
+            //! Write the dimensional value of U.
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_U);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *dimensionalVariables, 1);
+        }
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_V))
+        {
+            //! Write the dimensional value of V.
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_V);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *dimensionalVariables, 2);
+        }
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_W))
+        {
+            //! Write the dimensional value of W.
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_W);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *dimensionalVariables, 3);
+        }
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_PRESSURE))
+        {
+            //! Write the dimensional value of pressure.
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_PRESSURE);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *dimensionalVariables, 4);
+        }
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_TEMPERATURE))
+        {
+            //! Write the dimensional value of temperature.
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_TEMPERATURE);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *dimensionalVariables, 5);
+        }
+        delete dimensionalVariables;
+    }
+
+    //! To write the mass fractions of species.
+    if (nChemical > 0)
+    {
+        //! Write the mass fractions of species.
+        using namespace GAS_SPACE;
+        string *varname = gas->GetNameOfSpecies();
+        for (int m = 0; m < numberOfSpecies; ++ m)
+        {
+                string varName = "massfraction-" + varname[m];
+            postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, nNSEquation + m);
+        }
+
+        //! To write the number density of electron.
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_ELECTRON_NUMBER))
+        {
+            RDouble4D *tmpValue = ComputeDimensionalElectron(grid);
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_ELECTRON_NUMBER);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *tmpValue, 0);
+            delete tmpValue;
+        }
+
+            RDouble4D *moleFraction = ComputePrimitiveVariablesWithMoleFraction(grid);
+            for (int m = 0; m < numberOfSpecies; ++ m)
+            {
+                string varName = "molefraction-" + varname[m];
+                postVisualization->UpdateVisualNodeVarPtr(varName, *moleFraction, m);
+    }
+            delete moleFraction;
+        }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_GAMA)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MACH))
+    {
+        int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();
+
+        Range I, J, K;
+        GetRange(ni, nj, nk, -2, 1, I, J, K);
+        Range M(0, 0);
+        RDouble4D *refgama = new RDouble4D(I, J, K, M, fortranArray);
+
+        int ist, ied, jst, jed, kst, ked;
+        grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+        int nEquation = GetNumberOfEquations();
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_GAMA);
+        RDouble3D &gama = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+        RDouble *primitiveVars = new RDouble[nEquation];
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        primitiveVars[m] = primitiveVariables(i, j, k, m);
+                    }
+                    gas->GetSpecificHeatRatio(primitiveVars, gama(i, j, k));
+                    (*refgama)(i, j, k, 0) = gama(i, j, k);
+                }
+            }
+        }
+        postVisualization->UpdateVisualNodeVarPtr(varName, *refgama, 0);
+        delete refgama;
+        delete[] primitiveVars;
+    }
+
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_CFL1))
+    {
+        int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();
+
+        Range I, J, K;
+        GetRange(ni, nj, nk, -2, 1, I, J, K);
+        Range M(0, 0);
+        RDouble4D *cfl = new RDouble4D(I, J, K, M, fortranArray);
+
+        int ist, ied, jst, jed, kst, ked;
+        grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_CFL1);
+        RDouble3D &localCFL = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("localCFL"));
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*cfl)(i, j, k, 0) = localCFL(i, j, k);
+                }
+            }
+        }
+        postVisualization->UpdateVisualNodeVarPtr(varName, *cfl, 0);
+        delete cfl;
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_CFL2))
+    {
+        int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();
+
+        Range I, J, K;
+        GetRange(ni, nj, nk, -2, 1, I, J, K);
+        Range M(0, 0);
+        RDouble4D *cfl = new RDouble4D(I, J, K, M, fortranArray);
+
+        int ist, ied, jst, jed, kst, ked;
+        grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_CFL2);
+        RDouble3D &minCFL = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("minCFL"));
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*cfl)(i, j, k, 0) = minCFL(i, j, k);
+                }
+            }
+        }
+        postVisualization->UpdateVisualNodeVarPtr(varName, *cfl, 0);
+        delete cfl;
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MACH))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_MACH);
+        RDouble4D *mach = CompMachNodeNumber(grid, postVisualization);
+
+        postVisualization->UpdateVisualNodeVarPtr(varName, mach);
+    }
+
+    //Write the non-equilibrium number.
+    if (nChemical > 0 && isUseNoneqCond > 0)
+    {
+        RDouble4D *noneqNumber = ComputeNonequiliriumNumber(grid);
+
+        //The Damkohler number.
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DAMKOHLER_NUMBER))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DAMKOHLER_NUMBER);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *noneqNumber, 0);
+        }
+        //The vibrational non-equilibrium number.
+        if (nTemperatureModel > 1 && postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VIBNONEQ_NUMBER))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VIBNONEQ_NUMBER);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *noneqNumber, 1);
+        }
+    }
+}
+
+LIB_EXPORT void NCCRSolverStruct::ComputePostProbesVariables(Post_Probes *postProbesVar)
+{
+    StructGrid *grid = StructGridCast(postProbesVar->GetGrid());
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    using namespace IDX;
+    if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DENSITY))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DENSITY);
+        postProbesVar->UpdateProbesVarPtr(varName, primitiveVariables, IDX::IR);
+    }
+
+    if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_U))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_U);
+        postProbesVar->UpdateProbesVarPtr(varName, primitiveVariables, IDX::IU);
+    }
+
+    if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_V))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_V);
+        postProbesVar->UpdateProbesVarPtr(varName, primitiveVariables, IDX::IV);
+    }
+
+    if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_W))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_W);
+        postProbesVar->UpdateProbesVarPtr(varName, primitiveVariables, IDX::IW);
+    }
+
+    if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_PRESSURE))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_PRESSURE);
+        postProbesVar->UpdateProbesVarPtr(varName, primitiveVariables, IDX::IP);
+    }
+
+    if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_TEMPERATURE))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_TEMPERATURE);
+        postProbesVar->UpdateProbesVarPtr(varName, temperatures, IDX::ITT);
+    }
+
+    if (postProbesVar->IsNeedMonitoring(PHSPACE::VISUAL_MACH))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::VISUAL_MACH);
+
+        int isOverset = parameters->GetIsOverLapping();
+
+        RDouble4D *mach = 0;
+        if (!isOverset)
+        {
+            mach = CompMachNumber(grid);
+        }
+        else
+        {
+            mach = ComputeMachNumberField(grid);
+        }
+
+        postProbesVar->UpdateProbesVarPtr(varName, *mach, 0);
+        delete mach;
+    }
+        if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_DENSITY)
+            || postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_U)
+            || postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_V)
+            || postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_W)
+            || postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_PRESSURE)
+            || postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_TEMPERATURE))
+        {
+            RDouble4D *dimensionalVariables = ComputeDimensionalVariables(grid);
+            if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_DENSITY))
+            {
+                //Write the dimensional value of density.
+                string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_DENSITY);
+                postProbesVar->UpdateProbesVarPtr(varName, *dimensionalVariables, 0);
+}
+            if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_U))
+            {
+                //Write the dimensional value of U.
+                string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_U);
+                postProbesVar->UpdateProbesVarPtr(varName, *dimensionalVariables, 1);
+            }
+            if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_V))
+            {
+                //Write the dimensional value of V.
+                string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_V);
+                postProbesVar->UpdateProbesVarPtr(varName, *dimensionalVariables, 2);
+            }
+            if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_W))
+            {
+                //Write the dimensional value of W.
+                string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_W);
+                postProbesVar->UpdateProbesVarPtr(varName, *dimensionalVariables, 3);
+            }
+            if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_PRESSURE))
+            {
+                //Write the dimensional value of pressure.
+                string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_PRESSURE);
+                postProbesVar->UpdateProbesVarPtr(varName, *dimensionalVariables, 4);
+            }
+            if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_TEMPERATURE))
+            {
+                //Write the dimensional value of temperature.
+                string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_TEMPERATURE);
+                postProbesVar->UpdateProbesVarPtr(varName, *dimensionalVariables, 5);
+            }
+            delete dimensionalVariables;
+        }
+        //! Chemical species must be the last!
+        //! To write the mass fractions of species.
+        int nNSEquation = parameters->GetNSEquationNumber();
+        int nChemical = parameters->GetChemicalFlag();
+        int numberOfSpecies = parameters->GetNumberOfSpecies();
+        if (nChemical > 0)
+        {
+            //Write the mass fractions of species.
+            using namespace GAS_SPACE;
+            string *varname = gas->GetNameOfSpecies();
+            for (int m = 0; m < numberOfSpecies; ++ m)
+            {
+                string varName = "massfraction-" + varname[m];
+                postProbesVar->UpdateProbesVarPtr(varName, primitiveVariables, nNSEquation + m);
+            }
+            RDouble4D *moleFraction = ComputePrimitiveVariablesWithMoleFraction(grid);
+            for (int m = 0; m < numberOfSpecies; ++ m)
+            {
+                string varName = "molefraction-" + varname[m];
+                postProbesVar->UpdateProbesVarPtr(varName, *moleFraction, m);
+            }
+            delete moleFraction;
+        }
+    }
+
+LIB_EXPORT void NCCRSolverStruct::InitControlParameters()
+{
+    FreeControlParameters();
+    controlParameters = new Param_NSSolverStruct();
+    controlParameters->Init();
+}
+
+void NCCRSolverStruct::Monitor(Grid *gridIn, RDouble4D *dq)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperature = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble2D *surfaceTemperature = reinterpret_cast <RDouble2D *> (gridIn->GetDataPtr("surfaceTemperature"));
+    int nStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int nEqn = GetNumberOfEquations();
+    ostringstream oss;
+    using namespace IDX;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                if (i == 1 && j == 1 && k == 1)
+                {
+                    oss << "I=" << i << ", J=" << j << ", K=" << k << endl;
+                    oss << nStep;
+                    for (int s = 0; s < nEqn; ++ s)
+                    {
+                        oss << ", " << primitiveVariables(i, j, k, s);
+                    }
+                    oss << endl;
+                    oss << ", " << temperature(i, j, k, ITT) << endl;
+                }
+            }
+        }
+    }
+    oss << (*surfaceTemperature)(0, 0) << endl;
+    WriteLogFile(oss);
+}
+
+LIB_EXPORT Param_NSSolverStruct *NCCRSolverStruct::GetControlParameters() const
+{
+    return static_cast <Param_NSSolverStruct *> (controlParameters);
+}
+
+}
+
+
diff --git a/CFD/NSSolver/src/NSSolver.cpp b/CFD/NSSolver/src/NSSolver.cpp
new file mode 100644
index 0000000..1195232
--- /dev/null
+++ b/CFD/NSSolver/src/NSSolver.cpp
@@ -0,0 +1,1005 @@
+#include "NSSolver.h"
+#include "Constants.h"
+#include "Glb_Dimension.h"
+#include "PHMpi.h"
+#include "Param_NSSolver.h"
+#include "Math_BasisFunction.h"
+#include "PHIO.h"
+#include "Gas.h"
+#include "TK_Log.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+using namespace GAS_SPACE;
+NSSolver::NSSolver()
+{
+}
+
+NSSolver::~NSSolver()
+{
+}
+
+LIB_EXPORT Param_NSSolver *NSSolver::GetControlParameters() const
+{
+    return static_cast <Param_NSSolver *> (controlParameters);
+}
+
+int NSSolver::GetNumberOfEquations()
+{
+    Param_NSSolver *parameters = GetControlParameters();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = nLaminar;
+    if (nChemical > 0)
+    {
+        nEquation += nChemical + nTemperatureModel - 1;
+    }
+
+    return nEquation;
+}
+
+void NSSolver::TimeStep(Grid *grid)
+{
+    Param_NSSolver *parameters = GetControlParameters();
+
+    int ifLocalTimeStep = parameters->GetIfLocalTimeStep();
+
+    if (ifLocalTimeStep == 0)
+    {
+        LocalTimeStep(grid);
+    }
+    else if (ifLocalTimeStep == 1)
+    {
+        GlobalTimeStep(grid);
+    }
+    else
+    {
+        LocalGlobalTimeStep(grid);
+    }
+}
+
+void NSSolver::UpdateResiduals(Grid *grid)
+{
+    Param_NSSolver *parameters = GetControlParameters();
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+    if (ifLowSpeedPrecon == 1)
+    {
+        ComputePreconditionCoefficient(grid);
+        ConservativePreconMatrix(grid);
+    }
+
+    InviscidFlux(grid);
+
+    ViscousFlux(grid);
+
+    SourceFlux(grid);
+
+    ZeroResidualOfSpecialCells(grid);
+
+    FreeGradientProxy(grid);    //! It is null for structured grid.
+}
+
+//! Get the file name for Residual dumping.
+const string NSSolver::GetResidualFileName()
+{
+    string resSaveFile = "res.dat";
+    GlobalDataBase::GetData("resSaveFile", &resSaveFile, PHSTRING, 1);
+    return resSaveFile;
+}
+
+void NSSolver::Post()
+{
+    using namespace PHMPI;
+
+    //! To dump restart data for continual simulation.
+    ActionKey *actkeyDumpRestartData = new ActionKey();
+    FillActionKey(actkeyDumpRestartData, DUMP_RESTART, 0);
+    DumpRestartData(actkeyDumpRestartData);
+    delete actkeyDumpRestartData;
+
+    //! To dump residual data.
+    //ActionKey *actkeyDumpResidual = new ActionKey();
+    //FillActionKey(actkeyDumpResidual, DUMP_RESIDUAL, 0);
+    //DumpResidual(actkeyDumpResidual);
+    //delete actkeyDumpResidual;
+
+    //! To dump airforce coefficient data.
+    //ActionKey *actkeyDumpAirForceCoef = new ActionKey();
+    //FillActionKey(actkeyDumpAirForceCoef, DUMP_AIR_FORCE_COEF, 0);
+    //DumpAirForceCoef(actkeyDumpAirForceCoef);
+    //delete actkeyDumpAirForceCoef;
+
+    //! To dump wall airforce coefficient data.
+    ActionKey *actkeyDumpWallAircoef = new ActionKey();
+    FillActionKey(actkeyDumpWallAircoef, DUMP_CP_DISTRI, 0);
+    DumpCpDistri(actkeyDumpWallAircoef);
+    delete actkeyDumpWallAircoef;
+
+    if (IsNeedStatistics())
+    {
+        //! To output Average data by tecplot format.
+        ActionKey *actkeyTecOutAverageFlow = new ActionKey();
+        FillActionKey(actkeyTecOutAverageFlow, VISUALIZATION_AVERAGE_FLOW, 0);
+        TecOutAverageFlow(actkeyTecOutAverageFlow);
+        delete actkeyTecOutAverageFlow;
+    }
+
+    if (IsNeedReynoldsStressStatistics())
+    {
+        //! To output Average Reynolds stress by tecplot format.
+        ActionKey *actkeyTecOutAverageReynoldsStress = new ActionKey();
+        FillActionKey(actkeyTecOutAverageReynoldsStress, VISUALIZATION_AVERAGE_ReynoldsStress, 0);
+        TecOutAverageReynoldsStress(actkeyTecOutAverageReynoldsStress);
+        delete actkeyTecOutAverageReynoldsStress;
+    }
+}
+
+void NSSolver::PostSolve(Grid *grid, int stage, int level)
+{
+    CommunicationInterfaceData();
+}
+
+void NSSolver::DumpResultFile(Grid *grid, int level)
+{
+    Param_NSSolver *parameters = GetControlParameters();
+    int intervalStepFlow = parameters->GetIntervalStepFlow();
+
+    int intervalStepPlot = parameters->GetIntervalStepPlot();
+    int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int maxSimuStep = GlobalDataBase::GetIntParaFromDB("maxSimuStep");
+
+    int sys_gridtype = 0;
+    GlobalDataBase::GetData("sys_gridtype", &sys_gridtype, PHINT, 1);
+
+    int nProtectData = 0;
+    if(GlobalDataBase::IsExist("nProtectData", PHINT, 1))
+    {
+        nProtectData = GlobalDataBase::GetIntParaFromDB("nProtectData");
+    }
+
+    bool isSubIterationDump = true;
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        GlobalDataBase::GetData("isSubIterationDump", &isSubIterationDump, PHBOOL, 1);
+    }
+
+    if (outnstep % intervalStepFlow == 0 && isSubIterationDump)
+    {
+        int dumpStandardModel = 0;
+        GlobalDataBase::GetIntParaFromDB("dumpStandardModel");
+        if(dumpStandardModel == 1)
+        {
+            Turbulence_Flat_Plate_Output_NASA(grid);
+        }
+    }
+
+    if (outnstep % intervalStepFlow == 0 && level == 0 && isSubIterationDump)
+    {
+        if(nProtectData ==0)
+        {
+            //! To dump restart data for continual simulation.
+            ActionKey *actkeyDumpRestartData = new ActionKey();
+            FillActionKey(actkeyDumpRestartData, DUMP_RESTART, level);
+            DumpRestartData(actkeyDumpRestartData);
+            delete actkeyDumpRestartData;    actkeyDumpRestartData = nullptr;
+        }
+
+        else
+        {
+            int RestartFile = 0;
+            ActionKey *actkeyDumpRestartData = new ActionKey();
+            FillActionKey(actkeyDumpRestartData, DUMP_RESTART, level);
+            DumpProtectData(actkeyDumpRestartData, RestartFile);
+            delete actkeyDumpRestartData;    actkeyDumpRestartData = nullptr;
+
+            if(outnstep > 1)
+            {
+                if(RestartFile == 0)
+                {
+                    string path = "./results/flow1.dat";
+                    remove(path.c_str());
+
+                    if(PHMPI::IsParallelRun())
+                    {
+                        string path1 = "./results/flow1_0.dat";
+                        remove(path1.c_str());
+                    }
+                }
+
+                else if(RestartFile == 1)
+                {
+                    string path = "./results/flow0.dat";
+                    remove(path.c_str());
+
+                    if(PHMPI::IsParallelRun())
+                    {
+                        string path2 = "./results/flow0_0.dat";
+                        remove(path2.c_str());
+                    }
+                }
+            }
+        }
+    }
+
+    if (outnstep % intervalStepPlot == 0 && isSubIterationDump)
+    {
+        if (IsNeedStatistics())
+        {
+            //! To output Average data by tecplot format.
+            ActionKey *actkeyTecOutAverageFlow = new ActionKey();
+            FillActionKey(actkeyTecOutAverageFlow, VISUALIZATION_AVERAGE_FLOW, level);
+            TecOutAverageFlow(actkeyTecOutAverageFlow);
+            delete actkeyTecOutAverageFlow;    actkeyTecOutAverageFlow = nullptr;
+        }
+
+        if (IsNeedReynoldsStressStatistics())
+        {
+            //! To output Average Reynolds stress by tecplot format.
+            ActionKey *actkeyTecOutAverageReynoldsStress = new ActionKey();
+            FillActionKey(actkeyTecOutAverageReynoldsStress, VISUALIZATION_AVERAGE_ReynoldsStress, level);
+            TecOutAverageReynoldsStress(actkeyTecOutAverageReynoldsStress);
+            delete actkeyTecOutAverageReynoldsStress;    actkeyTecOutAverageReynoldsStress = nullptr;
+        }
+    }
+
+    int intervalStepRes = parameters->GetIntervalStepRes();
+    if ((outnstep == 1 || outnstep % intervalStepRes == 0 || outnstep == maxSimuStep) && (!isUnsteady || !isSubIterationDump))
+    {
+        //! To dump residual data.
+        ActionKey *actkeyDumpResidual = new ActionKey();
+        FillActionKey(actkeyDumpResidual, DUMP_RESIDUAL, level);
+        DumpResidual(actkeyDumpResidual);
+        delete actkeyDumpResidual;    actkeyDumpResidual = nullptr;
+    }
+
+    int intervalStepForce = parameters->GetIntervalStepForce();
+    if (intervalStepForce > 0)
+    {
+        if ((outnstep % intervalStepForce == 0  || outnstep == maxSimuStep)&& isSubIterationDump)
+        {
+            if (level == 0)
+            {
+                //! To dump airforce coefficient data.
+                ActionKey *actkeyDumpAirForceCoef = new ActionKey();
+                FillActionKey(actkeyDumpAirForceCoef, DUMP_AIR_FORCE_COEF, level);
+                DumpAirForceCoef(actkeyDumpAirForceCoef);
+                delete actkeyDumpAirForceCoef;    actkeyDumpAirForceCoef = nullptr;
+
+                //! To dump wall airforce coefficient data.
+                ActionKey *actkeyDumpWallAircoef = new ActionKey();
+                FillActionKey(actkeyDumpWallAircoef, DUMP_CP_DISTRI, 0);
+                DumpCpDistri(actkeyDumpWallAircoef);
+                delete actkeyDumpWallAircoef;    actkeyDumpWallAircoef = nullptr;
+
+                //! To dump surface information data.
+                ActionKey *actkeyDumpSurfaceInfo = new ActionKey();
+                FillActionKey(actkeyDumpSurfaceInfo, DUMP_SURFACE_INFO, 0);
+                DumpSurfaceInfo(actkeyDumpSurfaceInfo);
+                delete actkeyDumpSurfaceInfo;    actkeyDumpSurfaceInfo = nullptr;
+
+                if (sys_gridtype == STRUCTGRID)
+                {
+                    //! To dump surface max and average heat flux.
+                    ActionKey *actkeyDumpHeatFlux = new ActionKey();
+                    FillActionKey(actkeyDumpHeatFlux, DUMP_HEATFLUX, 0);
+                    DumpHeatFlux(actkeyDumpHeatFlux);
+                    delete actkeyDumpHeatFlux;    actkeyDumpHeatFlux = nullptr;
+                }
+            }
+        }
+        if ((outnstep + 1) % intervalStepForce == 0 && isSubIterationDump)
+        {
+            if (level == 0)
+            {
+                //! To dump wall airforce coefficient data.
+                ActionKey *actkeyDumpWallAircoef = new ActionKey();
+                FillActionKey(actkeyDumpWallAircoef, DUMP_CP_DISTRI, 0);
+                DumpCpDistri(actkeyDumpWallAircoef);
+                delete actkeyDumpWallAircoef;    actkeyDumpWallAircoef = nullptr;
+
+                //! To dump surface information data.
+                ActionKey *actkeyDumpSurfaceInfo = new ActionKey();
+                FillActionKey(actkeyDumpSurfaceInfo, DUMP_SURFACE_INFO, 0);
+                DumpSurfaceInfo(actkeyDumpSurfaceInfo);
+                delete actkeyDumpSurfaceInfo;    actkeyDumpSurfaceInfo = nullptr;
+            }
+        }
+    }
+}
+
+void NSSolver::CheckResult(Grid *grid, int level)
+{
+    //! Compute the residual variation.
+    ActionKey *actkeyCheckResidual = new ActionKey();
+    FillActionKey(actkeyCheckResidual, DUMP_RESIDUAL, level);
+    CheckResidual(actkeyCheckResidual);
+    delete actkeyCheckResidual;
+
+    Param_NSSolver *parameters = GetControlParameters();
+    int iBranchCode = parameters->GetSelfAdaptionSolveFlag();
+    int interResStep = parameters->GetIntervalStepRes();
+    int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int nCurrentStep = GlobalDataBase::GetIntParaFromDB("nCurrentStep");
+    int nMaxSimuStep = GlobalDataBase::GetIntParaFromDB("maxSimuStep");
+    RDouble monitorResidual = GlobalDataBase::GetDoubleParaFromDB("monitorResidual");
+
+    int nPauseKey = 0;
+    bool isConvergent = false;
+    if (iBranchCode == 1)
+    {
+        int nIterFirstStep = 1000, nIterSecondStep = 2000, nIterThirdStep = 2000;
+        if (GlobalDataBase::IsExist("nIterFirstStep", PHINT, 1))
+        {
+            nIterFirstStep = GlobalDataBase::GetIntParaFromDB("nIterFirstStep");
+        }
+        if (GlobalDataBase::IsExist("nIterSecondStep", PHINT, 1))
+        {
+            nIterSecondStep = GlobalDataBase::GetIntParaFromDB("nIterSecondStep");
+        }
+        if (GlobalDataBase::IsExist("nIterThirdStep", PHINT, 1))
+        {
+            nIterThirdStep = GlobalDataBase::GetIntParaFromDB("nIterThirdStep");
+        }
+
+        int nIteration = nMaxSimuStep;
+        if (nCurrentStep == 1)
+        {
+            nIteration = nIterFirstStep;
+        }
+        else if (nCurrentStep == 2)
+        {
+            nIteration = nIterFirstStep + nIterSecondStep;
+        }
+        else if (nCurrentStep == 3)
+        {
+            nIteration = nIterFirstStep + nIterSecondStep + nIterThirdStep;
+        }
+
+        if (outnstep >= nIteration)
+        {
+            isConvergent = true;
+        }
+    }
+    else if (iBranchCode == 2)
+    {
+        RDouble firstStepError = 0.01, secondStepError = 0.001, thirdStepError = 0.001;
+        if (GlobalDataBase::IsExist("firstStepError", PHDOUBLE, 1))
+        {
+            firstStepError = GlobalDataBase::GetDoubleParaFromDB("firstStepError");
+        }
+        if (GlobalDataBase::IsExist("secondStepError", PHDOUBLE, 1))
+        {
+            secondStepError = GlobalDataBase::GetDoubleParaFromDB("secondStepError");
+        }
+        if (GlobalDataBase::IsExist("thirdStepError", PHDOUBLE, 1))
+        {
+            thirdStepError = GlobalDataBase::GetDoubleParaFromDB("thirdStepError");
+        }
+
+        if (nCurrentStep == 1)
+        {
+            if (monitorResidual <= firstStepError)
+            {
+                isConvergent = true;
+            }
+        }
+        else if (nCurrentStep == 2)
+        {
+            if (monitorResidual <= secondStepError)
+            {
+                isConvergent = true;
+            }
+        }
+        else if (nCurrentStep == 3)
+        {
+            if (monitorResidual <= thirdStepError)
+            {
+                isConvergent = true;
+            }
+        }
+    }
+
+    if (isConvergent)
+    {
+        nPauseKey = 1;
+        PHSPACE::GlobalDataBase::UpdateData("nPauseKey", &nPauseKey, PHINT, 1);
+    }
+
+    int nCurrentProcessorID = PHMPI::GetCurrentProcessorID();
+    if (nCurrentProcessorID == 0 && (outnstep % interResStep == 0))
+    {
+        string keyVariable = GlobalDataBase::GetStrParaFromDB("keyVariable");
+        ostringstream oss;
+        oss<<"The residual variation of "<<keyVariable<<" is: ";
+        oss << setiosflags(ios::left);
+        oss << setprecision(5);
+        oss << setiosflags(ios::scientific);
+        oss << setiosflags(ios::showpoint);
+        oss<<monitorResidual<<endl;
+        cout<<oss.str();
+        //cout<<"The residual variation of "<<keyVariable<<" is: "<<monitorResidual<<endl;
+    }
+}
+
+void NSSolver::CheckResiduals(Grid *grid, int level)
+{
+    //! Compute the residual variation.
+    ActionKey *actkeyCheckResidual = new ActionKey();
+    FillActionKey(actkeyCheckResidual, DUMP_RESIDUAL, level);
+    CheckResidual(actkeyCheckResidual);
+    delete actkeyCheckResidual;
+
+    int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int nMaxSimuStep = GlobalDataBase::GetIntParaFromDB("maxSimuStep");
+    Param_NSSolver *parameters = GetControlParameters();
+    RDouble monitorResidual = GlobalDataBase::GetDoubleParaFromDB("monitorResidual");
+    RDouble secondStepError = 0.001;
+    if (GlobalDataBase::IsExist("secondStepError", PHDOUBLE, 1))
+    {
+        secondStepError = GlobalDataBase::GetDoubleParaFromDB("secondStepError");
+    }
+
+    //Cancel the nonequilibrium condition.
+    if (monitorResidual < secondStepError || outnstep > 0.5 * nMaxSimuStep)
+    {
+        int isUseNoneqCond = 0;
+        PHSPACE::GlobalDataBase::UpdateData("isUseNoneqCond", &isUseNoneqCond, PHINT, 1);
+
+        parameters->SetNonequilibriumConditionFlag(isUseNoneqCond);
+
+        PHSPACE::gas->SetNonequilibriumCondition(isUseNoneqCond);
+    }
+}
+
+void NSSolver::DumpCFLNumber(Grid *grid, int level)
+{
+    //! Obtain the CFL number.
+    ActionKey *actkeyObtainCFLNumber = new ActionKey();
+    FillActionKey(actkeyObtainCFLNumber, DUMP_RESIDUAL, level);
+    //! Obtain the minimum CFL number and maximum CFL number.
+    ObtainCFLNumber(actkeyObtainCFLNumber);
+
+    Param_NSSolver *parameters = GetControlParameters();
+    int interResStep = parameters->GetIntervalStepRes();
+    int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    int nCurrentProcessorID = PHMPI::GetCurrentProcessorID();
+    if (nCurrentProcessorID == 0 && (outnstep % interResStep == 0))
+    {
+        RDouble globalMinCFL = GlobalDataBase::GetDoubleParaFromDB("globalMinCFL");
+        RDouble globalMaxCFL = GlobalDataBase::GetDoubleParaFromDB("globalMaxCFL");
+
+        //! Dump to file.
+        string saveHeatRes = "./results/dumpCFL.plt";
+        if (GlobalDataBase::IsExist("saveHeatRes", PHSTRING, 1))
+        {
+            saveHeatRes = GlobalDataBase::GetStrParaFromDB("saveHeatRes");
+        }
+        actkeyObtainCFLNumber->filename = saveHeatRes;
+        if (actkeyObtainCFLNumber->filename == "")
+        {
+            return;
+        }
+        ios_base::openmode openmode = ios_base::out|ios_base::app;
+        actkeyObtainCFLNumber->openmode = openmode;
+        //Open file.
+        ParallelOpenFile(actkeyObtainCFLNumber);
+        fstream &file = *actkeyObtainCFLNumber->file;
+        std::ostringstream oss;
+        if (IfFileEmpty(file))
+        {
+            vector<string> title_tecplot;
+            title_tecplot.push_back("Title=\"The change of CFL number\"");
+            title_tecplot.push_back("Variables=");
+            title_tecplot.push_back("\"Iterations\"");
+            title_tecplot.push_back("\"globalMinCFL\"");
+            title_tecplot.push_back("\"globalMaxCFL\"");
+            for (std::size_t i = 0; i < title_tecplot.size(); ++ i)
+            {
+                oss << title_tecplot[i] << "\n";
+            }
+        }
+        oss << setiosflags(ios::left);
+        oss << setprecision(5);
+        //oss << setiosflags(ios::scientific);
+        oss << setiosflags(ios::showpoint);
+
+        oss << setw(7) << outnstep << "    ";
+        oss << globalMinCFL << "    "<<globalMaxCFL<<endl;
+
+        WriteASCIIFile(file, oss.str());
+
+        //Close file.
+        ParallelCloseFile(actkeyObtainCFLNumber);
+    }
+
+    delete actkeyObtainCFLNumber;
+}
+
+void NSSolver::CheckSurfaceHeatingChange(Grid *grid, int level)
+{
+    //! Compute the surface heating change.
+    ActionKey *actkeyCheckHeatChange = new ActionKey();
+    FillActionKey(actkeyCheckHeatChange, DUMP_RESIDUAL, level);
+    ComputeSurfaceHeatingChange(actkeyCheckHeatChange);
+
+    Param_NSSolver *parameters = GetControlParameters();
+    int interResStep = parameters->GetIntervalStepRes();
+    int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    int nCurrentProcessorID = PHMPI::GetCurrentProcessorID();
+    if (nCurrentProcessorID == 0 && (outnstep % interResStep == 0))
+    {
+        RDouble monitorHeatingChange = GlobalDataBase::GetDoubleParaFromDB("monitorHeatingChange");
+        ostringstream oss1;
+        oss1 << setiosflags(ios::left);
+        oss1 << setprecision(5);
+        oss1 << setiosflags(ios::scientific);
+        oss1 << setiosflags(ios::showpoint);
+        oss1 << "The maximum change of surface heating ratio is "<<monitorHeatingChange<<endl;
+        cout<<oss1.str();
+
+        //! Dump to file.
+        string saveHeatRes = "./results/heatResidual.plt";
+        if (GlobalDataBase::IsExist("saveHeatRes", PHSTRING, 1))
+        {
+            saveHeatRes = GlobalDataBase::GetStrParaFromDB("saveHeatRes");
+        }
+        actkeyCheckHeatChange->filename = saveHeatRes;
+        if (actkeyCheckHeatChange->filename == "")
+        {
+            return;
+        }
+        ios_base::openmode openmode = ios_base::out|ios_base::app;
+        actkeyCheckHeatChange->openmode = openmode;
+        //Open file.
+        ParallelOpenFile(actkeyCheckHeatChange);
+        fstream &file = *actkeyCheckHeatChange->file;
+        std::ostringstream oss;
+        if (IfFileEmpty(file))
+        {
+            vector<string> title_tecplot;
+            title_tecplot.push_back("Title=\"The Surface Heating Change\"");
+            title_tecplot.push_back("Variables=");
+            title_tecplot.push_back("\"Iterations\"");
+            title_tecplot.push_back("\"Heating Change\"");
+            for (std::size_t i = 0; i < title_tecplot.size(); ++ i)
+            {
+                oss << title_tecplot[i] << "\n";
+            }
+        }
+        oss << setiosflags(ios::left);
+        oss << setprecision(5);
+        oss << setiosflags(ios::scientific);
+        oss << setiosflags(ios::showpoint);
+
+        oss << setw(7) << outnstep << "    ";
+        oss << monitorHeatingChange <<endl;
+
+        WriteASCIIFile(file, oss.str());
+
+        //Close file.
+        ParallelCloseFile(actkeyCheckHeatChange);
+    }
+
+    delete actkeyCheckHeatChange;
+}
+
+void NSSolver::FillActionKey(ActionKey *actkey, int action, int level)
+{
+    actkey->action   = action;
+    actkey->solver   = NS_EQUATION;
+    actkey->solverID = this->GetIndex();
+    actkey->kind     = SOLVER_BASED;
+    actkey->level    = level;
+}
+
+RDouble NSSolver::ComputeCFL(RDouble partialCFL)
+{
+    int iterationStep;
+
+    Param_NSSolver *parameters = GetControlParameters();
+    //! Steady.
+    int nMGLevel = parameters->GetNMGLevel();
+    if (nMGLevel <= 1)
+    {
+        //! Finest grid.
+        GlobalDataBase::GetData("outnstep", &iterationStep, PHINT, 1);
+    }
+    else
+    {
+        //! Coarse grid.
+        GlobalDataBase::GetData("newnstep", &iterationStep, PHINT, 1);
+    }
+
+    int cflNstep    = parameters->GetCFLVaryStep();
+    RDouble cflStart = parameters->GetCFLStart();
+    RDouble cflEnd   = parameters->GetCFLEnd();
+
+    if(partialCFL > 0)
+    {
+        cflEnd = partialCFL;
+    }
+
+   int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+    RDouble cfl;
+    //! GMRES1st2nd
+    if(tscheme != GMRES)
+    {
+        cfl = cflStart + (cflEnd - cflStart) * MIN (iterationStep, cflNstep) / cflNstep;
+    }
+    else
+    {
+        int newIterStep = GlobalDataBase::GetIntParaFromDB("newnstep");
+        RDouble GMRESCFLScale = GlobalDataBase::GetDoubleParaFromDB("GMRESCFLScale");
+        cfl = cflStart * pow(GMRESCFLScale,newIterStep);
+    }
+
+    return cfl;
+}
+
+void NSSolver::SourceFlux(Grid *grid)
+{
+    Param_NSSolver *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    int nChemicalSource = parameters->GetNChemicalSource();
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+
+    if (nChemical == 1 && nChemicalSource == 1)
+    {
+        ChemicalSource(grid);
+    }
+
+    if (referenceFrame == ROTATIONAL_FRAME)
+    {
+        RotatingSource(grid);
+    }
+
+    //! It is null for Structure grid calculation.
+    Turb_Sengy(grid);
+
+    //! Dual time step source.
+    DualTimeSource(grid);
+
+    gravitySource(grid);
+}
+
+bool NSSolver::WantVisualField(Grid *grid)
+{
+    Param_NSSolver *parameters = GetControlParameters();
+    int visualField = parameters->GetPlotFieldType();
+
+    if (visualField == TEC_SPACE::BlockVisual)
+    {
+        int dimension = PHSPACE::GetDim();
+
+        RDouble *boxMin = grid->GetMinBox();
+        RDouble *boxMax = grid->GetMaxBox();
+
+        const RDouble *visualBlockMin = parameters->GetLowerPlotFieldBox();
+        const RDouble *visualBlockMax = parameters->GetUpperPlotFieldBox();
+
+        if ((boxMin[0] > visualBlockMax[0]) || (boxMax[0] < visualBlockMin[0]))
+        {
+            return false;
+        }
+
+        if ((boxMin[1] > visualBlockMax[1]) || (boxMax[1] < visualBlockMin[1]))
+        {
+            return false;
+        }
+
+        if (dimension == THREE_D)
+        {
+            if ((boxMin[2] > visualBlockMax[2]) || (boxMax[2] < visualBlockMin[2]))
+            {
+                return false;
+            }
+        }
+    }
+
+    return grid->GetDim() == TWO_D || (grid->GetDim() == THREE_D && visualField != TEC_SPACE::BoundaryVisual);
+}
+
+void NSSolver::InitCoarseGridsFlow()
+{
+    Grid *grid = GetGrid();
+    Grid *coarseGrid = grid->GetCoarseGrid();
+
+    if(!coarseGrid)
+    {
+        return;
+    }
+
+    ComputeGamaAndTemperature(coarseGrid);
+
+    Boundary(coarseGrid);
+
+    ComputeGamaAndTemperature(coarseGrid);
+
+    ComputeNodeValue(coarseGrid);
+
+    //! dual time step source.
+    DualTimeSource(grid);
+}
+
+void NSSolver::InitDependentVariables()
+{
+    Grid *fineGrid = GetGrid();
+
+    Param_NSSolver *parameters = GetControlParameters();
+
+    //! These variables are need for boundary condition.
+    ComputeGamaAndTemperature(fineGrid);
+
+    Boundary(fineGrid);
+
+    //! After boundary condition, the gama and temperature would be changed.
+    ComputeGamaAndTemperature(fineGrid);
+
+    bool isViscous = parameters->IsViscous();
+    if (isViscous)
+    {
+        int nChemical = parameters->GetChemicalFlag();
+        if (nChemical == 0)
+        {
+            ComputeViscousCoefficientWithoutChemical(fineGrid);
+        }
+        else
+        {
+            ComputeViscousCoefficient(fineGrid);
+        }
+    }
+
+    ComputeNodeValue(fineGrid);
+}
+
+void NSSolver::RegisterCFDSolverInterfaceField()
+{
+    Param_NSSolver *parameters = GetControlParameters();
+    int nEquation = GetNumberOfEquations();
+    CFDSolver::RegisterInterfaceField("q", PHDOUBLE, nEquation);
+
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    CFDSolver::RegisterInterfaceField("t", PHDOUBLE, nTemperatureModel);
+
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int *visualVariablesType = postVisualWall->GetVisualVariablesType();
+    int nWallVariables = postVisualWall->GetVisualVariablesNumber();
+    int dataNumber = nWallVariables;
+    for (int m = 0; m < nWallVariables; ++ m)
+    {
+        if (visualVariablesType[m] == VISUAL_WALL_NS)
+        {
+            dataNumber += numberOfSpecies - 1;
+        }
+    }
+    CFDSolver::RegisterInterfaceField("wallCell", PHDOUBLE, 1);
+    CFDSolver::RegisterInterfaceField("wallAircoefData", PHDOUBLE, dataNumber);
+
+    int nVisualVariables_in = GlobalDataBase::GetIntParaFromDB("nVisualVariables");
+    int visualVariables[100];
+    GlobalDataBase::GetData("visualVariables", visualVariables, PHINT, nVisualVariables_in);
+    Post_Visual *postVisualization = new Post_Visual(nVisualVariables_in, visualVariables);
+    set<int>::iterator varIter;
+    set<int> visualVariablesID = postVisualization->GetVisualVariables();
+    for (varIter = visualVariablesID.begin(); varIter != visualVariablesID.end(); ++ varIter)
+    {
+        int varTemp = *varIter;
+        string varName = postVisualization->GetVariableName(varTemp);
+        varName = varName + "_face";
+        CFDSolver::RegisterInterfaceField(varName, PHDOUBLE, 1);
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MACH))
+    {
+        if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DENSITY)))
+        {
+            CFDSolver::RegisterInterfaceField("density_face", PHDOUBLE, 1);
+        }
+        
+        if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_U)))
+        {
+            CFDSolver::RegisterInterfaceField("u_face", PHDOUBLE, 1);
+        }
+
+        if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_V)))
+        {
+            CFDSolver::RegisterInterfaceField("v_face", PHDOUBLE, 1);
+        }
+
+        if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_W)))
+        {
+            CFDSolver::RegisterInterfaceField("w_face", PHDOUBLE, 1);
+        }
+
+        if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_PRESSURE)))
+        {
+            CFDSolver::RegisterInterfaceField("pressure_face", PHDOUBLE, 1);
+        }
+
+        if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_GAMA)))
+        {
+            CFDSolver::RegisterInterfaceField("gama_face", PHDOUBLE, 1);
+        }
+    }
+
+    CFDSolver::RegisterInterfaceField("density_Average_face" , PHDOUBLE, 1);
+    CFDSolver::RegisterInterfaceField("u_Average_face"       , PHDOUBLE, 1);
+    CFDSolver::RegisterInterfaceField("v_Average_face"       , PHDOUBLE, 1);
+    CFDSolver::RegisterInterfaceField("w_Average_face"       , PHDOUBLE, 1);
+    CFDSolver::RegisterInterfaceField("pressure_Average_face", PHDOUBLE, 1);
+
+    CFDSolver::RegisterInterfaceField("tau_xx_face", PHDOUBLE, 1);
+    CFDSolver::RegisterInterfaceField("tau_yy_face", PHDOUBLE, 1);
+    CFDSolver::RegisterInterfaceField("tau_zz_face", PHDOUBLE, 1);
+    CFDSolver::RegisterInterfaceField("tau_xy_face", PHDOUBLE, 1);
+    CFDSolver::RegisterInterfaceField("tau_xz_face", PHDOUBLE, 1);
+    CFDSolver::RegisterInterfaceField("tau_yz_face", PHDOUBLE, 1);
+
+    int nChemical = parameters->GetChemicalFlag();
+    if (nChemical > 0)
+    {
+        using namespace GAS_SPACE;
+        string* varname = gas->GetNameOfSpecies();
+        for (int m = 0; m < numberOfSpecies; ++m)
+        {
+            string varName = varname[m];
+
+            varName = varName + "_face";
+            CFDSolver::RegisterInterfaceField(varName, PHDOUBLE, 1);
+        }
+    }
+    delete postVisualization;
+}
+
+void NSSolver::ReleaseCFDSolverInterfaceField()
+{
+    CFDSolver::ReleaseInterfaceField();
+}
+
+void NSSolver::RegisterCFDSolverInterfaceFieldUnstruct()
+{
+    Param_NSSolver *parameters = GetControlParameters();
+    
+    int nEquation = GetNumberOfEquations();
+
+    CFDSolver::RegisterInterfaceField("dqdx", PHDOUBLE, nEquation);
+    CFDSolver::RegisterInterfaceField("dqdy", PHDOUBLE, nEquation);
+    CFDSolver::RegisterInterfaceField("dqdz", PHDOUBLE, nEquation);
+
+    CFDSolver::RegisterInterfaceField("limit2D", PHDOUBLE, nEquation);
+
+    int ntmodel = parameters->GetTemperatureModel();
+    CFDSolver::RegisterInterfaceField("dtdx", PHDOUBLE, ntmodel);
+    CFDSolver::RegisterInterfaceField("dtdy", PHDOUBLE, ntmodel);
+    CFDSolver::RegisterInterfaceField("dtdz", PHDOUBLE, ntmodel);
+
+    CFDSolver::RegisterInterfaceField("cellQ" , PHDOUBLE, 1);
+    CFDSolver::RegisterInterfaceField("cellCP", PHDOUBLE, 1);
+    CFDSolver::RegisterInterfaceField("cellCF", PHDOUBLE, 1);
+
+    CFDSolver::RegisterInterfaceField("dq", PHDOUBLE, nEquation);
+}
+
+void NSSolver::RegisterCFDSolverInterpointField()
+{
+    Param_NSSolver *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    CFDSolver::RegisterInterpointField("qnode", PHDOUBLE, nEquation);
+    
+    int ntmodel = parameters->GetTemperatureModel();
+    CFDSolver::RegisterInterpointField("tnode", PHDOUBLE, ntmodel);
+}
+
+void NSSolver::RegisterOversetField()
+{
+    Param_NSSolver *parameters = GetControlParameters();
+    int nEquation = GetNumberOfEquations();
+    CFDSolver::RegisterOversetField("q", PHDOUBLE, nEquation);
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    CFDSolver::RegisterOversetField("t", PHDOUBLE, nTemperatureModel);
+}
+
+void NSSolver::DeAllocateOversetInterfaceVar(Data_ParamFieldSuite *dataStore)
+{
+    RDouble **q = reinterpret_cast <RDouble **> (dataStore->GetDataPtr("q"));
+    DelPointer2(q);
+
+    RDouble **t = reinterpret_cast <RDouble **> (dataStore->GetDataPtr("t"));
+    DelPointer2(t);
+}
+
+void NSSolver::PrepareOversetInterfaceData(Data_ParamFieldSuite *dataStore, InterfaceDataProxy *interfaceDataProxy)
+{
+    Param_NSSolver *parameters = GetControlParameters();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **q = reinterpret_cast< RDouble ** > (dataStore->GetDataPtr("q"));
+
+    vector <RDouble **> &vectorData = interfaceDataProxy->GetVectorData();
+    vector <int> & vectorDimension = interfaceDataProxy->GetVectorDimension();
+
+    vectorDimension.push_back(nEquation);
+    vectorData.push_back(q);
+    
+    RDouble **t = reinterpret_cast <RDouble **> (dataStore->GetDataPtr("t"));
+    
+    vectorDimension.push_back(nTemperatureModel);
+    vectorData.push_back(t);
+}
+
+void NSSolver::GetResidual(ActionKey *actkey)
+{
+
+}
+
+void SetInviscidSchemeParameters(InviscidSchemeParameter *invSchemePara, FaceProxy *faceProxy, Param_NSSolver *parameters)
+{
+    int nm = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int nPrecondition = parameters->GetIfLowSpeedPrecon();
+    int nIdealState = parameters->GetIfIdealGasState();
+    int nNitrogenIndex = parameters->GetIndexOfNitrogen();
+    int nElectronIndex = parameters->GetIndexOfElectron();
+    RDouble kPrec = parameters->GetPreconCoefficient();
+
+    int RoeEntropyFixMethod  = parameters->GetRoeEntropyFixMethod();
+    RDouble entrFixCoefLeft  = parameters->GetRoeEntropyFixCoef1();
+    RDouble entrFixCoefRight = parameters->GetRoeEntropyFixCoef2();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+
+    RDouble AusmpwPlusLimiter = parameters->GetAusmpwPlusLimiter();
+
+    //! Scalar parameters.
+    invSchemePara->Setnm(nm);
+    invSchemePara->SetNumberOfLaminar(nLaminar);
+    invSchemePara->SetNumberOfChemical(nChemical);
+    invSchemePara->SetNumberOfTemperatureModel(nTemperatureModel);
+    invSchemePara->SetNumberOfTotalEquation(nEquation);
+    invSchemePara->SetIfPrecondition(nPrecondition);
+    invSchemePara->SetIfIdealState(nIdealState);
+    invSchemePara->SetPreconCoefficient(kPrec);
+    invSchemePara->SetEntropyFixMethod(RoeEntropyFixMethod);
+    invSchemePara->SetMachNumber(refMachNumber);
+    invSchemePara->SetEntropyFixCoefficients(entrFixCoefLeft, entrFixCoefRight);
+
+    invSchemePara->SetLength(faceProxy->size());
+    invSchemePara->SetIndexOfNitrogen(nNitrogenIndex);
+    invSchemePara->SetIndexOfElectron(nElectronIndex);
+
+    invSchemePara->SetAusmpwPlusLimiter(AusmpwPlusLimiter);
+
+    //! Pointer parameters.
+    invSchemePara->SetLeftAndRightQ(faceProxy->GetQL(), faceProxy->GetQR());
+    invSchemePara->SetLeftAndRightQC(faceProxy->GetQLC(), faceProxy->GetQRC()); // GMRESPassQC
+    invSchemePara->SetLeftAndRightQSign(faceProxy->GetQLSign(),faceProxy->GetQRSign()); // GMRESnolim GMRESSign
+    invSchemePara->SetLeftAndRightTemperature(faceProxy->GetLeftTemperature(), faceProxy->GetRightTemperature());
+    invSchemePara->SetFlux(faceProxy->GetFlux());
+    invSchemePara->SetLeftAndRightPressureCoefficient(faceProxy->GetPressureCoefficientL(), faceProxy->GetPressureCoefficientR());
+    invSchemePara->SetLeftAndRightTimeCoefficient(faceProxy->GetTimeCoefficientL(), faceProxy->GetTimeCoefficientR());
+    invSchemePara->SetLeftAndRightPreconCoefficient(faceProxy->GetPreconCoefficientL(), faceProxy->GetPreconCoefficientR());
+    invSchemePara->SetLeftAndRightGama(faceProxy->GetGamaL(), faceProxy->GetGamaR());
+
+    GeomProxy *geomProxy = faceProxy->GetGeomProxy();
+
+    invSchemePara->SetFaceNormal(geomProxy->GetFaceNormalX(), geomProxy->GetFaceNormalY(), geomProxy->GetFaceNormalZ());
+    invSchemePara->SetFaceArea(geomProxy->GetFaceArea());
+    invSchemePara->SetFaceVelocity(geomProxy->GetFaceVelocity());
+}
+
+}
+
diff --git a/CFD/NSSolver/src/NSSolverStruct.cpp b/CFD/NSSolver/src/NSSolverStruct.cpp
new file mode 100644
index 0000000..f4355de
--- /dev/null
+++ b/CFD/NSSolver/src/NSSolverStruct.cpp
@@ -0,0 +1,21934 @@
+#include "NSSolverStruct.h"
+#include "Glb_Dimension.h"
+#include "Geo_StructBC.h"
+#include "MultiGridOperation.h"
+#include "GradientOperation.h"
+#include "Force.h"
+#include "AleForceManager.h"
+#include "OversetGridFactory.h"
+#include "TK_Exit.h"
+#include "Gradient.h"
+#include "FieldProxy.h"
+#include "IO_FileName.h"
+#include "Geo_UnstructGrid.h"
+#include "Param_NSSolverStruct.h"
+#include "Math_Limiter.h"
+#include "Post_ForceMoment.h"
+#include "Residual.h"
+#include "Limiter.h"
+#include "Jacobian.h"
+#include "TK_Log.h"
+
+
+#include "MatrixLUSGS.h"
+
+#include "Gas.h"
+#include "TK_Time.h"
+using namespace std;
+#pragma warning (disable:26451)
+#pragma warning(disable:6386)
+#pragma warning(disable:6385)
+
+namespace PHSPACE
+{
+
+using namespace GAS_SPACE;
+
+NSSolverStruct::NSSolverStruct()
+{
+    for (int i = 0; i < 5; ++ i)
+    {
+        gradientCellCenterUVWT[i] = 0;
+    }
+    nWallBC = 1; //! The number of surface boundary conditions.
+    nMaxSurfaceCell = 1; //! The number of surface cells.
+    nIonizationFlag = 0; //! The flag of chemical reactions.
+}
+
+NSSolverStruct::~NSSolverStruct()
+{
+    DeAllocateGlobalVariables();
+    FreeControlParameters();
+}
+
+void NSSolverStruct::ReadParameter()
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    string structSchemeName = parameters->GetInviscidSchemeName();
+    int structScheme = GetSchemeID(structSchemeName);
+    GlobalDataBase::UpdateData("str_scheme", &structScheme, PHINT, 1);
+
+    if (structScheme == ISCHEME_ROE)
+    {
+        parameters->SetEntropyFixCoefficients();
+
+        Grid *grid = GetGrid();
+        int zoneID = grid->GetZoneID();
+
+        RDouble entropyAcoustic = parameters->GetRoeEntropyFixCoef1();
+
+        //! The output of Entropy fix coefficient for ROE scheme.
+        if (zoneID == 0)  //! When grid->GetZoneID() = 0 and GetCurrentProcessorID() = 0.
+        {
+            PrintToWindow("Entropy fix coefficient for ROE scheme: ", entropyAcoustic, "\n");
+        }
+    }
+
+    string structLimiterName = GlobalDataBase::GetStrParaFromDB("str_limiter_name");
+    int structLimiter = GetLimiterID(structLimiterName);
+    GlobalDataBase::UpdateData("str_limiter", &structLimiter, PHINT, 1);
+
+    string unstructLimiterName = GlobalDataBase::GetStrParaFromDB("uns_limiter_name");
+    int unstructLimiter = GetLimiterID(unstructLimiterName);
+    GlobalDataBase::UpdateData("uns_limiter", &unstructLimiter, PHINT, 1);
+}
+
+void NSSolverStruct::AllocateGlobalVar(Grid *gridIn)
+{
+    CFDSolver::AllocateGlobalVar(gridIn);
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Range IFACE, JFACE, KFACE;
+    GetRange(ni, nj, nk, -2, 2, IFACE, JFACE, KFACE);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int isWennScheme = parameters->GetWennSchemeFlag();
+
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int nSourceTerm = nEquation - nNSEquation;    //! The number of source term.
+    int nDim = GetDim();
+    const int nUVWTIndex = nTemperatureModel + 3;
+
+    int nLayer = GetNumberOfGhostCellLayers();
+
+    if (isWennScheme == 1)
+    {
+        GetRange(ni, nj, nk, -3, 2, I, J, K);
+    }
+
+    Range M(0, nEquation - 1);
+    Range N(0, nUVWTIndex - 1);
+    Range T(0, nTemperatureModel - 1);
+    Range D(0, nDim - 1);
+
+    RDouble4D *q = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *residual = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble3D *dt = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *gama = new RDouble3D(I, J, K, fortranArray);
+    RDouble4D *t = new RDouble4D(I, J, K, T, fortranArray);
+    RDouble4D *visSpectralRadius = new RDouble4D(I, J, K, D, fortranArray);
+    RDouble4D *invSpectralRadius = new RDouble4D(I, J, K, D, fortranArray);
+    RDouble4D *diagonal = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *diagonal0 = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble3D *localCFL = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *localCFLLast = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *deltPressure = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *minCFL = new RDouble3D(I, J, K, fortranArray);
+    Int3D *iterCFL = new Int3D(I, J, K, fortranArray);
+
+    //!
+    int nVisualVariables = GlobalDataBase::GetIntParaFromDB("nVisualVariables");
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nchem)
+    {
+        using namespace GAS_SPACE;
+        int nm = GlobalDataBase::GetIntParaFromDB("nm");
+        int nl = GlobalDataBase::GetIntParaFromDB("nl");
+        int neqn = nl + nchem;
+        nVisualVariables = nVisualVariables + (neqn - nm);
+    }
+
+    Range MFace(0, nVisualVariables - 1);
+    RDouble4D *postFaceValue = new RDouble4D(I, J, K, MFace, fortranArray);
+    grid->UpdateDataPtr("postFaceValue", postFaceValue);
+
+
+    RDouble5D *diagonalMatrix = new RDouble5D(I, J, K, M, M, fortranArray);
+    RDouble2D *inverseDiaMatrix = new RDouble2D(M, M, fortranArray);
+    RDouble cflStart = parameters->GetCFLStart();
+    int isUseLocalCFL = parameters->GetLocalCFLFlag();
+    RDouble4D *diagonal1 = NULL;
+    if (isUseLocalCFL == 1)
+    {
+        diagonal1 = new RDouble4D(I, J, K, M, fortranArray);
+    }
+    else if (isUseLocalCFL == 2)
+    {
+        int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+        grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                        (*deltPressure)(i, j, k) = 0.0;
+                        (*iterCFL)(i, j, k) = 0;
+                        (*minCFL)(i, j, k) = 0.0;
+                    }
+                }
+            }
+        }
+    grid->UpdateDataPtr("deltPressure", deltPressure);
+    grid->UpdateDataPtr("iterCFL", iterCFL);
+    grid->UpdateDataPtr("minCFL", minCFL);
+    grid->UpdateDataPtr("diagonal1", diagonal1);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, nLayer);
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                for (int it = 0; it < nTemperatureModel; ++ it)
+                {
+                    (*t)(i, j, k, it) = 0.0;   //
+                } 
+                    (*localCFL)(i, j, k) = cflStart;
+                    (*localCFLLast)(i, j, k) = cflStart;
+                }
+            }
+        }
+
+    grid->UpdateDataPtr("q", q);    //! Scalar flow field variable(rho/u/v/w/p).
+    grid->UpdateDataPtr("res", residual);    //! Residual or right-hand side.
+    grid->UpdateDataPtr("dt", dt);    //! Time step.
+    grid->UpdateDataPtr("gama", gama);    //! Ratio of specific heat coefficients at constant pressure and volume.
+    grid->UpdateDataPtr("t", t);    //! Static temperature.
+    grid->UpdateDataPtr("visSpectralRadius", visSpectralRadius);    //! Viscous spectral radius.
+    grid->UpdateDataPtr("invSpectralRadius", invSpectralRadius);    //! Inviscid spectral radius.
+    grid->UpdateDataPtr("diagonal", diagonal);    //! Sacrificing space to improve efficiency.
+    grid->UpdateDataPtr("diagonal0", diagonal0);    //! Sacrificing space to improve efficiency.
+    grid->UpdateDataPtr("diagonalMatrix", diagonalMatrix);    //! Diaganol matrix for Matrix-LUSGS calculation.
+    grid->UpdateDataPtr("inverseDiaMatrix", inverseDiaMatrix);    //!  Inverse diaganol matrix for Matrix-LUSGS calculation.
+    grid->UpdateDataPtr("localCFL", localCFL);      //! Local CFL number.
+    grid->UpdateDataPtr("localCFLLast", localCFLLast);      //! Local CFL number.
+
+    //! Allocate memories.
+    int timeIntegration = parameters->GetTimeIntegration();
+    if (timeIntegration == 5)
+    {
+        RDouble5D *diagonalMatrice = new RDouble5D(I, J, K, M, M, fortranArray);
+        grid->UpdateDataPtr("diagonalMatrice", diagonalMatrice);
+    }
+    if (nSourceTerm > 0)
+    {
+        //! To store the Jacobian matrix of source term.
+        RDouble4D *sourceJacobian = new RDouble4D(I, J, K, Range(0, nSourceTerm * nSourceTerm - 1), fortranArray);
+        RDouble4D *sourceChemical = new RDouble4D(I, J, K, Range(0, nSourceTerm - 1), fortranArray);
+        RDouble5D *sourceDerivatives = new RDouble5D(I, J, K, Range(0, nSourceTerm - 1), Range(0, nSourceTerm - 1), fortranArray);
+        grid->UpdateDataPtr("sourceJacobian", sourceJacobian);
+        grid->UpdateDataPtr("sourceChemical", sourceChemical);
+        grid->UpdateDataPtr("sourceDerivatives", sourceDerivatives);
+
+        //! To store the partial derivatives of source terms in the main diagonal position.
+        RDouble4D *srs = new RDouble4D(I, J, K, Range(0, nSourceTerm - 1), fortranArray);
+        grid->UpdateDataPtr("srs", srs);
+    }
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        RDouble3D *preconCoefficient = new RDouble3D(I, J, K, fortranArray);
+        RDouble3D *timeCoefficient = new RDouble3D(I, J, K, fortranArray);
+        RDouble3D *timeCoefficientInverse = new RDouble3D(I, J, K, fortranArray);
+
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    (*preconCoefficient)(i, j, k) = 1.0;
+                    (*timeCoefficient)(i, j, k) = 1.0;
+                    (*timeCoefficientInverse)(i, j, k) = 1.0;
+                }
+            }
+        }
+        grid->UpdateDataPtr("preconCoefficient", preconCoefficient);
+        grid->UpdateDataPtr("timeCoefficient", timeCoefficient);
+        grid->UpdateDataPtr("timeCoefficientInverse", timeCoefficientInverse);
+
+        RDouble4D *preconMatrix = new RDouble4D(I, J, K, Range(0, nEquation * nEquation - 1), fortranArray);
+        grid->UpdateDataPtr("preconMatrix", preconMatrix);
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble4D *q_unsteady_n1 = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *q_unsteady_n2 = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *res_unsteady_n1 = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *res_unsteady_n2 = new RDouble4D(I, J, K, M, fortranArray);
+
+        //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dual-time method.
+        RDouble4D *res_unsteady_tmp = new RDouble4D(I, J, K, M, fortranArray);
+
+        grid->UpdateDataPtr("q_unsteady_n1", q_unsteady_n1);
+        grid->UpdateDataPtr("q_unsteady_n2", q_unsteady_n2);
+        grid->UpdateDataPtr("res_unsteady_n1", res_unsteady_n1);
+        grid->UpdateDataPtr("res_unsteady_n2", res_unsteady_n2);
+        grid->UpdateDataPtr("res_unsteady_tmp", res_unsteady_tmp);
+
+        //! Statistical variables for unsteady simulation.
+        RDouble4D *qAverage = new RDouble4D(I, J, K, M, fortranArray);
+        *qAverage = 0.0;
+        grid->UpdateDataPtr("qAverage", qAverage);
+
+        //! Statistical Reynolds stress for unsteady simulation.
+        RDouble4D *tauAverage = new RDouble4D(I, J, K, Range(0, 5), fortranArray);
+        *tauAverage = 0.0;
+        grid->UpdateDataPtr("tauAverage", tauAverage);
+
+        RDouble4D *q2Average = new RDouble4D(I, J, K, Range(0, 5), fortranArray);
+        *q2Average = 0.0;
+        grid->UpdateDataPtr("q2Average", q2Average);
+    }
+
+    RDouble3D *rtem = new RDouble3D(I, J, K, fortranArray);
+    *rtem = 0.0;
+    grid->UpdateDataPtr("rtem", rtem);    //! Pressure factor.
+
+    //RDouble3D &rtem_initial = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("rtem"));
+    //rtem_initial = 0.0;
+    //! rtem is used in timestep(), it should be initialed.
+
+    int viscousType = parameters->GetViscousType();    //! Viscous model.
+    if (viscousType > INVISCID)
+    {
+        RDouble3D *viscousLaminar = new RDouble3D(I, J, K, fortranArray);
+        RDouble3D *viscousTurbulence = new RDouble3D(I, J, K, fortranArray);
+        RDouble4D *heatTransferCoeff = new RDouble4D(I, J, K, T, fortranArray);
+        grid->UpdateDataPtr("heatTransferCoeff", heatTransferCoeff);
+        grid->UpdateDataPtr("visl", viscousLaminar);    //! Laminar viscous coefficient.
+        grid->UpdateDataPtr("vist", viscousTurbulence);    //! Turbulence viscous coefficient.
+        *viscousLaminar = 1.0;
+        *viscousTurbulence = 0.0;
+        *heatTransferCoeff = 0.0;
+    }
+
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+    if (iLES == LES_SOLVER)
+    {
+        RDouble3D *subgridScaleEnergy = new RDouble3D(I, J, K, fortranArray);
+        grid->UpdateDataPtr("subgridScaleEnergy", subgridScaleEnergy);
+        *subgridScaleEnergy = 0.0;
+    }
+    if (nSourceTerm > 0 && viscousType > INVISCID) //Save the heat conductivity and mass diffusion coefficient.
+    {
+        RDouble4D *heatConductivity = new RDouble4D(I, J, K, T, fortranArray);
+        RDouble4D *massDiffusionCoef = new RDouble4D(I, J, K, Range(0, nSourceTerm - 1), fortranArray);
+        grid->UpdateDataPtr("lambda", heatConductivity);    //! Thermal conductivity coefficient.
+        grid->UpdateDataPtr("rhoD", massDiffusionCoef);    //! Mass Diffusion coefficient.
+    }
+
+    RDouble4D *gradPrimtiveVarFaceX = new RDouble4D(IFACE, JFACE, KFACE, M, fortranArray);
+    RDouble4D *gradPrimtiveVarFaceY = new RDouble4D(IFACE, JFACE, KFACE, M, fortranArray);
+    RDouble4D *gradPrimtiveVarFaceZ = new RDouble4D(IFACE, JFACE, KFACE, M, fortranArray);
+    grid->UpdateDataPtr("gradPrimtiveVarFaceX", gradPrimtiveVarFaceX);    //! Gradient of scalar flow field variable at face, for x direction.
+    grid->UpdateDataPtr("gradPrimtiveVarFaceY", gradPrimtiveVarFaceY);    //! Gradient of scalar flow field variable at face, for y direction.
+    grid->UpdateDataPtr("gradPrimtiveVarFaceZ", gradPrimtiveVarFaceZ);    //! Gradient of scalar flow field variable at face, for z direction.
+
+    RDouble4D *gradUVWTCellCenterX = new RDouble4D(I, J, K, N, fortranArray);
+    RDouble4D *gradUVWTCellCenterY = new RDouble4D(I, J, K, N, fortranArray);
+    RDouble4D *gradUVWTCellCenterZ = new RDouble4D(I, J, K, N, fortranArray);
+    grid->UpdateDataPtr("gradUVWTCellCenterX", gradUVWTCellCenterX);    //! Gradient of velocity components(u/v/w) and temperature at cell center in x-direction.
+    grid->UpdateDataPtr("gradUVWTCellCenterY", gradUVWTCellCenterY);    //! Gradient of velocity components(u/v/w) and temperature at cell center in y-direction.
+    grid->UpdateDataPtr("gradUVWTCellCenterZ", gradUVWTCellCenterZ);    //! Gradient of velocity components(u/v/w) and temperature at cell center in z-direction.
+
+    //! Temporary variable for periodic boundary condition.
+    RDouble4D *rotNSgradValueX = new RDouble4D(I, J, K, N, fortranArray);
+    RDouble4D *rotNSgradValueY = new RDouble4D(I, J, K, N, fortranArray);
+    RDouble4D *rotNSgradValueZ = new RDouble4D(I, J, K, N, fortranArray);
+    grid->UpdateDataPtr("rotNSgradValueX", rotNSgradValueX);
+    grid->UpdateDataPtr("rotNSgradValueY", rotNSgradValueY);
+    grid->UpdateDataPtr("rotNSgradValueZ", rotNSgradValueZ);
+
+    RDouble4D *gradTemperatureFaceX = new RDouble4D(IFACE, JFACE, KFACE, T, fortranArray);
+    RDouble4D *gradTemperatureFaceY = new RDouble4D(IFACE, JFACE, KFACE, T, fortranArray);
+    RDouble4D *gradTemperatureFaceZ = new RDouble4D(IFACE, JFACE, KFACE, T, fortranArray);
+    grid->UpdateDataPtr("gradTemperatureFaceX", gradTemperatureFaceX);    //! Gradient of static temperature at face, for x direction.
+    grid->UpdateDataPtr("gradTemperatureFaceY", gradTemperatureFaceY);    //! Gradient of static temperature at face, for y direction.
+    grid->UpdateDataPtr("gradTemperatureFaceZ", gradTemperatureFaceZ);    //! Gradient of static temperature at face, for z direction.
+
+    RDouble4D *ql1 = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *qr1 = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *ql2 = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *qr2 = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *ql3 = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *qr3 = new RDouble4D(I, J, K, M, fortranArray);
+    grid->UpdateDataPtr("ql1", ql1);
+    grid->UpdateDataPtr("qr1", qr1);
+    grid->UpdateDataPtr("ql2", ql2);
+    grid->UpdateDataPtr("qr2", qr2);
+    grid->UpdateDataPtr("ql3", ql3);
+    grid->UpdateDataPtr("qr3", qr3);
+
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+    int nTotalNumber = 16;
+    Int1D *speciesOrder = new Int1D(Range(0, nTotalNumber - 1), fortranArray);
+    grid->UpdateDataPtr("speciesOrder", speciesOrder);
+    for (int n = 0; n < nTotalNumber; ++ n)
+    {
+        (*speciesOrder)(n) = -1;
+    }
+    int isAdaptiveSolver = GlobalDataBase::GetIntParaFromDB("isAdaptiveSolver");
+    int isUseNoneqCond = parameters->GetNonequilibriumConditionFlag();
+    if (isAdaptiveSolver > 0 || isUseNoneqCond > 0)
+    {
+        int nKeyVariableIndex = 1; //The temperature.
+        GlobalDataBase::UpdateData("nKeyVariableIndex", &nKeyVariableIndex, PHINT, 1);
+
+        RDouble *maxResidualVariation = new RDouble[nEquation];
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            maxResidualVariation[m] = 0.0;
+        }
+        grid->UpdateDataPtr("maxResidualVariation", maxResidualVariation);
+    }
+
+    if (nChemical > 0 && nSpeciesNumber > 0)
+    {
+        string *nameList = gas->GetNameOfSpecies();
+        SpeciesNameToInteger(nSpeciesNumber, nameList, speciesOrder);
+
+        RDouble4D *gradSpeciesCellCenterX = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *gradSpeciesCellCenterY = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *gradSpeciesCellCenterZ = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        grid->UpdateDataPtr("dcdx", gradSpeciesCellCenterX);    //! Gradient of chemical species at cell center in x-direction.
+        grid->UpdateDataPtr("dcdy", gradSpeciesCellCenterY);    //! Gradient of chemical species at cell center in y-direction.
+        grid->UpdateDataPtr("dcdz", gradSpeciesCellCenterZ);    //! Gradient of chemical species at cell center in z-direction.
+
+        RDouble4D *speciesEnthalpy = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        grid->UpdateDataPtr("hSpecies", speciesEnthalpy);    //! Enthalpy of chemical species.
+
+        RDouble3D *totalEnergy = new RDouble3D(I, J, K, fortranArray);
+        RDouble3D *totalEnthalpy = new RDouble3D(I, J, K, fortranArray);
+        RDouble3D *totalCp = new RDouble3D(I, J, K, fortranArray);
+        RDouble3D *totalCv = new RDouble3D(I, J, K, fortranArray);
+
+        grid->UpdateDataPtr("totalEnergy", totalEnergy);    //! total energy.
+        grid->UpdateDataPtr("totalEnthalpy", totalEnthalpy);    //! total Enthalpy.
+        grid->UpdateDataPtr("totalCp", totalCp);    //! total Cp.
+        grid->UpdateDataPtr("totalCv", totalCv);    //! total Cv.
+
+        //int nEnergyRecycle = parameters->GetnEnergyRecycle();
+        //if (nTemperatureModel > 1 && nEnergyRecycle == 2)
+        //{
+        //    RDouble4D *temporaryEve = new RDouble4D(I, J, K, Range(1, MAX(1, nTemperatureModel - 1)), fortranArray);
+        //    grid->UpdateDataPtr("temporaryEve", temporaryEve);    //! temporaryEve.
+        //}
+
+        RDouble3D *totalCvtr = new RDouble3D(I, J, K, fortranArray);
+        RDouble3D *totalCvv = new RDouble3D(I, J, K, fortranArray);
+        RDouble3D *totalCve = new RDouble3D(I, J, K, fortranArray);
+        RDouble4D *speciesCvs = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *speciesCps = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *speciesCvvs = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *speciesCves = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *speciesEtrs = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *speciesEvs = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *speciesEes = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+        RDouble4D *speciesEs = new RDouble4D(I, J, K, Range(0, nSpeciesNumber - 1), fortranArray);
+
+
+        grid->UpdateDataPtr("totalCvtr", totalCvtr);   //! total Cvtr.
+        grid->UpdateDataPtr("totalCvv", totalCvv);    //! total Cvv.
+        grid->UpdateDataPtr("totalCve", totalCve);    //! total Cve.
+        grid->UpdateDataPtr("speciesCvs", speciesCvs);    //! Cvs for species.
+        grid->UpdateDataPtr("speciesCps", speciesCps);    //! Cps for species.
+        grid->UpdateDataPtr("speciesCvvs", speciesCvvs);    //! Cvvs for species.
+        grid->UpdateDataPtr("speciesCves", speciesCves);    //! Cves for species.
+        grid->UpdateDataPtr("speciesEtrs", speciesEtrs);    //! Etrs for species.
+        grid->UpdateDataPtr("speciesEvs", speciesEvs);    //! Evs for species.
+        grid->UpdateDataPtr("speciesEes", speciesEes);    //! Ees for species.
+        grid->UpdateDataPtr("speciesEs", speciesEs);    //! Es for species.
+
+        RDouble3D *tflag = new RDouble3D(I, J, K, fortranArray);
+        *tflag = 0.0;
+
+        grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd);
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    (*tflag)(i, j, k) = 1.0;
+                }
+            }
+        }
+        grid->UpdateDataPtr("tflag", tflag);
+
+        //Thermo_Energy_DB * Thermo_Energy_Para = new Thermo_Energy_DB(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd ,nSpeciesNumber);
+        //grid->UpdateDataPtr("Thermo_Energy_Para", Thermo_Energy_Para);
+
+
+        grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    }
+
+    //! Save the temperature on wall.
+    GetSurfaceCellNumber(gridIn);
+    RDouble2D *firstLayerHeight = NULL;
+    if (nWallBC > 0)    //! The current grid includes wall boundary conditions.
+    {
+        firstLayerHeight = new RDouble2D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), fortranArray);
+    }
+    grid->UpdateDataPtr("firstLayerHeight", firstLayerHeight);
+    //! Compute the heights of cells on the first grid layer.
+    ComputeFirstLayerGridHeight(gridIn);
+
+    //! Allocate the memories for temperatures on wall.
+    RDouble2D *temperatureWall = NULL;
+    if (nWallBC > 0)
+    {
+        temperatureWall = new RDouble2D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), fortranArray);
+    }
+    grid->UpdateDataPtr("surfaceTemperature", temperatureWall);
+
+    //! Allocate the memories for catalytic wall.
+    if (nChemical > 0 && nSpeciesNumber > 0)
+    {
+        RDouble3D *surfaceMassFraction = NULL;
+        if (nWallBC > 0)
+        {
+            surfaceMassFraction = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, nSpeciesNumber - 1), fortranArray);
+        }
+        grid->UpdateDataPtr("surfaceMassFraction", surfaceMassFraction);
+    }
+
+    int isAblationWall = GlobalDataBase::GetIntParaFromDB("nAblation");
+    int Injection = GlobalDataBase::GetIntParaFromDB("isInjection");
+    if (isAblationWall > 0 && Injection > 0)
+    {
+        RDouble2D *injectionVelocity = NULL;
+        if (nWallBC > 0)
+        {
+            injectionVelocity = new RDouble2D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), fortranArray);
+        }
+
+        for (int iWall = 0; iWall < nWallBC; ++ iWall)
+        {
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                (*injectionVelocity)(iWall, iCell) = 0.0;
+            }
+        }
+        grid->UpdateDataPtr("injectionVelocity", injectionVelocity);
+    }
+
+    //! added by myk 202010, for conservation of flux
+    systemgridtype = GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if (MIXGRID == systemgridtype)
+    {
+        RDouble4D *dqdx_cc_ruvwpt = new RDouble4D(I, J, K, Range(0, 5), fortranArray);
+        RDouble4D *dqdy_cc_ruvwpt = new RDouble4D(I, J, K, Range(0, 5), fortranArray);
+        RDouble4D *dqdz_cc_ruvwpt = new RDouble4D(I, J, K, Range(0, 5), fortranArray);
+        grid->UpdateDataPtr("dqdx_cc_ruvwpt", dqdx_cc_ruvwpt);    //! Gradient of flow field variable(rho/u/v/w/p/t) at cell center in x-direction.
+        grid->UpdateDataPtr("dqdy_cc_ruvwpt", dqdy_cc_ruvwpt);    //! Gradient of flow field variable(rho/u/v/w/p/t) at cell center in y-direction.
+        grid->UpdateDataPtr("dqdz_cc_ruvwpt", dqdz_cc_ruvwpt);    //! Gradient of flow field variable(rho/u/v/w/p/t) at cell center in z-direction.
+
+        RDouble4D *faceInviscidfluxI = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *faceInviscidfluxJ = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *faceInviscidfluxK = new RDouble4D(I, J, K, M, fortranArray);
+        grid->UpdateDataPtr("faceInviscidfluxI", faceInviscidfluxI);    //! Inviscid flux at face, for I direction.
+        grid->UpdateDataPtr("faceInviscidfluxJ", faceInviscidfluxJ);    //! Inviscid flux at face, for J direction.
+        grid->UpdateDataPtr("faceInviscidfluxK", faceInviscidfluxK);    //! Inviscid flux at face, for K direction.
+
+        if (viscousType > INVISCID)
+        {
+            RDouble4D *faceViscousfluxI = new RDouble4D(I, J, K, M, fortranArray);
+            RDouble4D *faceViscousfluxJ = new RDouble4D(I, J, K, M, fortranArray);
+            RDouble4D *faceViscousfluxK = new RDouble4D(I, J, K, M, fortranArray);
+            grid->UpdateDataPtr("faceViscousfluxI", faceViscousfluxI);    //! Viscous flux at face, for I direction.
+            grid->UpdateDataPtr("faceViscousfluxJ", faceViscousfluxJ);    //! Viscous flux at face, for J direction.
+            grid->UpdateDataPtr("faceViscousfluxK", faceViscousfluxK);    //! Viscous flux at face, for K direction.
+        }
+    }
+
+    //! Allocate the memories for the slip parameters.
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    if (nSlipBCModel > 0)
+    {
+        //! The array includes variables such as slip temperatures(Tts, Tvs, Tes), slip velocity(Vx, Vy, Vz) and slip mass fractions of species.
+        int nSlipVar = nSpeciesNumber + 6;
+        RDouble3D *surfaceSlipVariables = NULL;
+        if (nWallBC > 0)
+        {
+            surfaceSlipVariables = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, nSlipVar - 1), fortranArray);
+        }
+        grid->UpdateDataPtr("surfaceSlipVariables", surfaceSlipVariables);
+    }
+
+    int nRapidFlowfield = parameters->GetRapidFlowfieldMethod();
+    if (nRapidFlowfield > 0)
+    {
+        RDouble3D *surfacePressure = NULL;
+        if (nWallBC > 0)
+        {
+            surfacePressure = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, 1), fortranArray);
+        }
+        grid->UpdateDataPtr("surfacePressure", surfacePressure);
+    }
+
+    //! To exam the surface heating change.
+    int nSurfHeatMonitor = parameters->GetSurfaceHeatingMonitor();
+    if (nSurfHeatMonitor > 0)
+    {
+        RDouble3D *surfaceHeatFlux = NULL;
+        if (nWallBC > 0)
+        {
+            surfaceHeatFlux = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, 1), fortranArray);
+            *surfaceHeatFlux = 0.0;
+        }
+        grid->UpdateDataPtr("surfaceHeatFlux", surfaceHeatFlux);
+    }
+
+    if (isUseNoneqCond > 0)
+    {
+        //To save the difference of variable.
+        RDouble4D *deltaQ = new RDouble4D(I, J, K, Range(0, 1), fortranArray);
+        *deltaQ = 1.0;
+        grid->UpdateDataPtr("deltaQ", deltaQ);
+
+        //To use the non-equilibrium condition.
+        if (nChemical > 0)
+        {
+            RDouble4D *timeScale = new RDouble4D(I, J, K, Range(0, 2), fortranArray);
+            *timeScale = 0.0;
+            grid->UpdateDataPtr("timeScale", timeScale);
+
+            RDouble4D *noneqNumber = new RDouble4D(I, J, K, Range(0, 1), fortranArray);
+            *noneqNumber = 0.0;
+            grid->UpdateDataPtr("noneqNumber", noneqNumber);
+
+            //To save the Damkohler number.
+            RDouble3D *damkohlerNumber = new RDouble3D(I, J, K, fortranArray);
+            //To save the vibrational non-equilibrium number.
+            RDouble3D *vibNoneqNumber = new RDouble3D(I, J, K, fortranArray);
+            *damkohlerNumber = 0.0;
+            *vibNoneqNumber = 0.0;
+            grid->UpdateDataPtr("DamkohlerNumber", damkohlerNumber);
+            grid->UpdateDataPtr("VibNoneqNumber", vibNoneqNumber);
+        }
+    }
+
+    //! Initialization of parameters on surface.
+    InitializeSurfaceParameters(gridIn);
+
+    //! Set the temperature on wall by reading data from file.
+    InitializeSurfaceParametersFromFile(gridIn);
+}
+
+void NSSolverStruct::DeAllocateGlobalVar(Grid *gridIn)
+{
+    CFDSolver::DeAllocateGlobalVar(gridIn);
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D *q = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D *residual = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble3D *dt = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+    RDouble3D *localCFL = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("localCFL"));
+    RDouble3D *localCFLLast = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("localCFLLast"));
+    RDouble3D *gama = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble4D *t = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble4D *visSpectralRadius = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+    RDouble4D *invSpectralRadius = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D *diagonal = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+    RDouble5D *diagonalMatrix = reinterpret_cast <RDouble5D *> (grid->GetDataPtr("diagonalMatrix"));
+    RDouble2D *inverseDiaMatrix = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("inverseDiaMatrix"));
+    RDouble4D *postFaceValue = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("postFaceValue"));
+
+    delete q; q = 0;
+    delete residual; residual = 0;
+    delete dt; dt = 0;
+    delete localCFL; localCFL = 0;
+    delete localCFLLast; localCFLLast = 0;
+    delete gama; gama = 0;
+    delete t; t = 0;
+    delete visSpectralRadius; visSpectralRadius = 0;
+    delete invSpectralRadius; invSpectralRadius = 0;
+    delete diagonal; diagonal = 0;
+    delete diagonalMatrix;
+    delete inverseDiaMatrix;
+    delete postFaceValue; postFaceValue = 0;
+    //Remove data pointer.
+    grid->DeleteDataPtr("q");
+    grid->DeleteDataPtr("res");
+    grid->DeleteDataPtr("dt");
+    grid->DeleteDataPtr("gama");
+    grid->DeleteDataPtr("t");
+    grid->DeleteDataPtr("localCFL");
+    grid->DeleteDataPtr("localCFLLast");
+    grid->DeleteDataPtr("visSpectralRadius");
+    grid->DeleteDataPtr("invSpectralRadius");
+    grid->DeleteDataPtr("diagonal");
+    grid->DeleteDataPtr("diagonalMatrix");
+    grid->DeleteDataPtr("inverseDiaMatrix");
+    grid->DeleteDataPtr("postFaceValue");
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int timeIntegration = parameters->GetTimeIntegration();
+
+    if (timeIntegration == 5)
+    {
+        RDouble5D *diagonalMatrice = reinterpret_cast <RDouble5D *> (grid->GetDataPtr("diagonalMatrice"));
+        delete diagonalMatrice; diagonalMatrice = 0;
+        grid->DeleteDataPtr("diagonalMatrice");
+    }
+
+    int isUseLocalCFL = parameters->GetLocalCFLFlag();
+    RDouble4D *diagonal1 = NULL;
+    if (isUseLocalCFL == 1)
+    {
+        diagonal1 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal1"));
+        delete diagonal1; diagonal1 = 0;
+    }
+    
+    RDouble3D *deltPressure = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("deltPressure"));
+    Int3D *iterCFL = reinterpret_cast <Int3D *> (grid->GetDataPtr("iterCFL"));
+    RDouble3D *minCFL = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("minCFL"));
+
+    delete deltPressure; deltPressure = 0;
+    delete iterCFL; iterCFL = 0;
+    delete minCFL; minCFL = 0;
+    grid->DeleteDataPtr("deltPressure");
+    grid->DeleteDataPtr("iterCFL");
+    grid->DeleteDataPtr("minCFL");
+
+    grid->DeleteDataPtr("q0");
+    grid->DeleteDataPtr("diagonal1");
+
+    int nEquation = GetNumberOfEquations();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nSourceTerm = nEquation - nNSEquation;     //! Number of source term.
+    if (nSourceTerm > 0)
+    {
+        RDouble4D *sourceJacobian = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("sourceJacobian"));
+        RDouble4D *sourceChemical = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("sourceChemical"));
+        RDouble5D *sourceDerivatives = reinterpret_cast <RDouble5D *> (grid->GetDataPtr("sourceDerivatives"));
+        delete sourceJacobian; sourceJacobian = 0;
+        delete sourceChemical; sourceChemical = 0;
+        delete sourceDerivatives; sourceDerivatives = 0;
+        grid->DeleteDataPtr("sourceJacobian");
+        grid->DeleteDataPtr("sourceChemical");
+        grid->DeleteDataPtr("sourceDerivatives");
+
+        RDouble4D *srs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("srs"));
+        delete srs; srs = 0;
+        grid->DeleteDataPtr("srs");
+    }
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+    if (ifLowSpeedPrecon != 0)
+    {
+        RDouble3D *preconCoefficient = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+        RDouble3D *timeCoefficient = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("timeCoefficient"));
+        RDouble3D *timeCoefficientInverse = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("timeCoefficientInverse"));
+        RDouble4D *preconMatrix = reinterpret_cast< RDouble4D *> (grid->GetDataPtr("preconMatrix"));
+        delete preconCoefficient; preconCoefficient = 0;
+        grid->DeleteDataPtr("preconCoefficient");
+        delete timeCoefficient; timeCoefficient = 0;
+        grid->DeleteDataPtr("timeCoefficient");
+        delete timeCoefficientInverse; timeCoefficientInverse = 0;
+        grid->DeleteDataPtr("timeCoefficientInverse");
+        delete preconMatrix; preconMatrix = 0;
+        grid->DeleteDataPtr("preconMatrix");
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble4D *q_unsteady_n1 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+        RDouble4D *q_unsteady_n2 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+        RDouble4D *res_unsteady_n1 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+        RDouble4D *res_unsteady_n2 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+
+        //! Store the historical sum of InviscidFlux, ViscousFlux, et al. /n
+        //! exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dual-time method.
+        RDouble4D *res_unsteady_tmp = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_tmp"));
+
+        delete q_unsteady_n1; q_unsteady_n1 = 0;
+        delete q_unsteady_n2; q_unsteady_n2 = 0;
+        delete res_unsteady_n1; res_unsteady_n1 = 0;
+        delete res_unsteady_n2; res_unsteady_n2 = 0;
+        delete res_unsteady_tmp; res_unsteady_tmp = 0;
+        grid->DeleteDataPtr("q_unsteady_n1");
+        grid->DeleteDataPtr("q_unsteady_n2");
+        grid->DeleteDataPtr("res_unsteady_n1");
+        grid->DeleteDataPtr("res_unsteady_n2");
+        grid->DeleteDataPtr("res_unsteady_tmp");
+
+        //! Statistical variables for unsteady simulation.
+        int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+        if (ifStaticsFlowField > 0)
+        {
+            RDouble4D *qAverage = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage"));
+            delete qAverage; qAverage = 0;
+            grid->DeleteDataPtr("qAverage");
+        }
+
+        //! Statistical Reynolds stress for unsteady simulation.
+        RDouble4D *tauAverage = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("tauAverage"));
+        delete tauAverage; tauAverage = 0;
+        grid->DeleteDataPtr("tauAverage");
+
+        RDouble4D *q2Average = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q2Average"));
+        delete q2Average; q2Average = 0;
+        grid->DeleteDataPtr("q2Average");
+    }
+
+    RDouble3D *rtem = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("rtem"));
+    delete rtem; rtem = 0;
+    grid->DeleteDataPtr("rtem");
+
+    int viscousType = parameters->GetViscousType();
+    if (viscousType > INVISCID)
+    {
+        RDouble3D *viscousLaminar = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+        RDouble3D *viscousTurbulence = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+        RDouble4D *heatTransferCoeff = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("heatTransferCoeff"));
+        delete viscousLaminar; viscousLaminar = 0;
+        delete viscousTurbulence; viscousTurbulence = 0;
+        delete heatTransferCoeff; heatTransferCoeff = 0;
+        grid->DeleteDataPtr("visl");
+        grid->DeleteDataPtr("vist");
+        grid->DeleteDataPtr("heatTransferCoeff");
+    }
+
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+    if (iLES == LES_SOLVER)
+    {
+        RDouble3D *subgridScaleEnergy = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+        delete subgridScaleEnergy; subgridScaleEnergy = 0;
+        grid->DeleteDataPtr("subgridScaleEnergy");
+    }
+
+    if (nSourceTerm > 0 && viscousType > INVISCID) //! Save the heat conductivity and mass diffusion coefficient.
+    {
+        RDouble4D *heatConductivity = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("lambda"));
+        RDouble4D *massDiffusionCoef = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rhoD"));
+        delete heatConductivity; heatConductivity = 0;
+        delete massDiffusionCoef; massDiffusionCoef = 0;
+        grid->DeleteDataPtr("lambda");
+        grid->DeleteDataPtr("rhoD");
+    }
+
+    RDouble4D *gradPrimtiveVarFaceX = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D *gradPrimtiveVarFaceY = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D *gradPrimtiveVarFaceZ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+    delete gradPrimtiveVarFaceX; gradPrimtiveVarFaceX = 0;
+    delete gradPrimtiveVarFaceY; gradPrimtiveVarFaceY = 0;
+    delete gradPrimtiveVarFaceZ; gradPrimtiveVarFaceZ = 0;
+    grid->DeleteDataPtr("gradPrimtiveVarFaceX");
+    grid->DeleteDataPtr("gradPrimtiveVarFaceY");
+    grid->DeleteDataPtr("gradPrimtiveVarFaceZ");
+
+    RDouble4D *gradTemperatureFaceX = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D *gradTemperatureFaceY = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D *gradTemperatureFaceZ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceZ"));
+    delete gradTemperatureFaceX; gradTemperatureFaceX = 0;
+    delete gradTemperatureFaceY; gradTemperatureFaceY = 0;
+    delete gradTemperatureFaceZ; gradTemperatureFaceZ = 0;
+    grid->DeleteDataPtr("gradTemperatureFaceX");
+    grid->DeleteDataPtr("gradTemperatureFaceY");
+    grid->DeleteDataPtr("gradTemperatureFaceZ");
+
+    RDouble4D *gradUVWTCellCenterX = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D *gradUVWTCellCenterY = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D *gradUVWTCellCenterZ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+    delete gradUVWTCellCenterX; gradUVWTCellCenterX = 0;
+    delete gradUVWTCellCenterY; gradUVWTCellCenterY = 0;
+    delete gradUVWTCellCenterZ; gradUVWTCellCenterZ = 0;
+    grid->DeleteDataPtr("gradUVWTCellCenterX");
+    grid->DeleteDataPtr("gradUVWTCellCenterY");
+    grid->DeleteDataPtr("gradUVWTCellCenterZ");
+
+    RDouble4D *rotNSgradValueX = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotNSgradValueX"));
+    RDouble4D *rotNSgradValueY = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotNSgradValueY"));
+    RDouble4D *rotNSgradValueZ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotNSgradValueZ"));
+    delete rotNSgradValueX; rotNSgradValueX = 0;
+    delete rotNSgradValueY; rotNSgradValueY = 0;
+    delete rotNSgradValueZ; rotNSgradValueZ = 0;
+    grid->DeleteDataPtr("rotNSgradValueX");
+    grid->DeleteDataPtr("rotNSgradValueY");
+    grid->DeleteDataPtr("rotNSgradValueZ");
+
+    RDouble4D *ql1 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1"));
+    RDouble4D *qr1 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1"));
+    RDouble4D *ql2 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2"));
+    RDouble4D *qr2 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2"));
+    RDouble4D *ql3 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3"));
+    RDouble4D *qr3 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3"));
+    delete ql1; ql1 = 0;
+    delete qr1; qr1 = 0;
+    delete ql2; ql2 = 0;
+    delete qr2; qr2 = 0;
+    delete ql3; ql3 = 0;
+    delete qr3; qr3 = 0;
+    grid->DeleteDataPtr("ql1");
+    grid->DeleteDataPtr("qr1");
+    grid->DeleteDataPtr("ql2");
+    grid->DeleteDataPtr("qr2");
+    grid->DeleteDataPtr("ql3");
+    grid->DeleteDataPtr("qr3");
+
+    Int1D *speciesOrder = reinterpret_cast <Int1D *> (grid->GetDataPtr("speciesOrder"));
+    delete speciesOrder; speciesOrder = 0;
+    grid->DeleteDataPtr("speciesOrder");
+
+    int isAdaptiveSolver = GlobalDataBase::GetIntParaFromDB("isAdaptiveSolver");
+    int isUseNoneqCond = parameters->GetNonequilibriumConditionFlag();
+    if (isAdaptiveSolver > 0 || isUseNoneqCond > 0)
+    {
+        RDouble *maxResidualVariation = reinterpret_cast <RDouble *> (grid->GetDataPtr("maxResidualVariation"));
+        delete[]maxResidualVariation;
+        grid->DeleteDataPtr("maxResidualVariation");
+    }
+
+    int nChemical = parameters->GetChemicalFlag();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+    if (nChemical > 0 && nSpeciesNumber > 0)
+    {
+        RDouble4D *gradSpeciesCellCenterX = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdx"));
+        RDouble4D *gradSpeciesCellCenterY = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdy"));
+        RDouble4D *gradSpeciesCellCenterZ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdz"));
+        delete gradSpeciesCellCenterX; gradSpeciesCellCenterX = 0;
+        delete gradSpeciesCellCenterY; gradSpeciesCellCenterY = 0;
+        delete gradSpeciesCellCenterZ; gradSpeciesCellCenterZ = 0;
+        grid->DeleteDataPtr("dcdx");
+        grid->DeleteDataPtr("dcdy");
+        grid->DeleteDataPtr("dcdz");
+
+        RDouble4D *speciesEnthalpy = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("hSpecies"));
+        delete speciesEnthalpy; speciesEnthalpy = 0;
+        grid->DeleteDataPtr("hSpecies");
+        if (nWallBC > 0)
+        {
+            RDouble3D *surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+            delete surfaceMassFraction; surfaceMassFraction = 0;
+        }
+        grid->DeleteDataPtr("surfaceMassFraction");
+
+        RDouble3D *tflag = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("tflag"));
+        delete tflag; tflag = 0;
+        grid->DeleteDataPtr("tflag");
+
+        /*Thermo_Energy_DB * Thermo_Energy_Para = reinterpret_cast <Thermo_Energy_DB *> (grid->GetDataPtr("Thermo_Energy_Para"));
+        delete Thermo_Energy_Para; Thermo_Energy_Para = 0;
+        grid->DeleteDataPtr("Thermo_Energy_Para");*/
+
+        RDouble3D *totalCvtr = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvtr"));
+        RDouble3D *totalCvv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvv"));
+        RDouble3D *totalCve = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCve"));
+        RDouble4D *speciesCvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCvs"));
+        RDouble4D *speciesCps = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCps"));
+        RDouble4D *speciesCvvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCvvs"));
+        RDouble4D *speciesCves = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCves"));
+        RDouble4D *speciesEtrs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEtrs"));
+        RDouble4D *speciesEvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEvs"));
+        RDouble4D *speciesEes = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEes"));
+        RDouble4D *speciesEs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEs"));
+        delete totalCvtr; totalCvtr = 0;
+        delete totalCvv; totalCvv = 0;
+        delete totalCve; totalCve = 0;
+        delete speciesCvs; speciesCvs = 0;
+        delete speciesCps; speciesCps = 0;
+        delete speciesCvvs; speciesCvvs = 0;
+        delete speciesCves; speciesCves = 0;
+        delete speciesEtrs; speciesEtrs = 0;
+        delete speciesEvs; speciesEvs = 0;
+        delete speciesEes; speciesEes = 0;
+        delete speciesEs; speciesEs = 0;
+        grid->DeleteDataPtr("totalCvtr");
+        grid->DeleteDataPtr("totalCvv");
+        grid->DeleteDataPtr("totalCve");
+        grid->DeleteDataPtr("speciesCvs");
+        grid->DeleteDataPtr("speciesCps");
+        grid->DeleteDataPtr("speciesCvvs");
+        grid->DeleteDataPtr("speciesCves");
+        grid->DeleteDataPtr("speciesEtrs");
+        grid->DeleteDataPtr("speciesEvs");
+        grid->DeleteDataPtr("speciesEes");
+        grid->DeleteDataPtr("speciesEs");
+
+        RDouble3D *totalEnergy = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalEnergy"));
+        RDouble3D *totalEnthalpy = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalEnthalpy"));
+        RDouble3D *totalCp = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCp"));
+        RDouble3D *totalCv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCv"));
+        delete totalEnergy; totalEnergy = 0;
+        delete totalEnthalpy; totalEnthalpy = 0;
+        delete totalCp; totalCp = 0;
+        delete totalCv; totalCv = 0;
+        grid->DeleteDataPtr("totalEnergy");
+        grid->DeleteDataPtr("totalEnthalpy");
+        grid->DeleteDataPtr("totalCp");
+        grid->DeleteDataPtr("totalCv");
+
+        //int nTemperatureModel = parameters->GetTemperatureModel();
+        //int nEnergyRecycle = parameters->GetnEnergyRecycle();
+        //if (nTemperatureModel > 1 && nEnergyRecycle == 2)
+        //{
+        //    RDouble4D *temporaryEve = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("temporaryEve"));
+        //    delete temporaryEve; temporaryEve = 0;   //! temporaryEve.
+        //    grid->DeleteDataPtr("temporaryEve");
+        //}
+        }
+
+    if (nWallBC > 0)
+    {
+        RDouble2D *firstLayerHeight = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("firstLayerHeight"));
+        delete firstLayerHeight; firstLayerHeight = 0;
+
+        RDouble2D *temperatureWall = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+        delete temperatureWall; temperatureWall = 0;
+    }
+    grid->DeleteDataPtr("surfaceTemperature");
+    grid->DeleteDataPtr("firstLayerHeight");
+
+    systemgridtype = GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if (MIXGRID == systemgridtype)
+    {
+        RDouble4D *dqdx_cc_ruvwpt = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdx_cc_ruvwpt"));
+        RDouble4D *dqdy_cc_ruvwpt = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdy_cc_ruvwpt"));
+        RDouble4D *dqdz_cc_ruvwpt = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdz_cc_ruvwpt"));
+        delete dqdx_cc_ruvwpt; dqdx_cc_ruvwpt = 0;
+        delete dqdy_cc_ruvwpt; dqdy_cc_ruvwpt = 0;
+        delete dqdz_cc_ruvwpt; dqdz_cc_ruvwpt = 0;
+        grid->DeleteDataPtr("dqdx_cc_ruvwpt");    
+        grid->DeleteDataPtr("dqdy_cc_ruvwpt");
+        grid->DeleteDataPtr("dqdz_cc_ruvwpt");
+
+        RDouble4D *faceInviscidfluxI = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI"));
+        RDouble4D *faceInviscidfluxJ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ"));
+        RDouble4D *faceInviscidfluxK = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK"));
+        delete faceInviscidfluxI; faceInviscidfluxI = 0;
+        delete faceInviscidfluxJ; faceInviscidfluxJ = 0;
+        delete faceInviscidfluxK; faceInviscidfluxK = 0;
+        grid->DeleteDataPtr("faceInviscidfluxI");    
+        grid->DeleteDataPtr("faceInviscidfluxJ");    
+        grid->DeleteDataPtr("faceInviscidfluxK");    
+
+        if (viscousType > INVISCID)
+        {
+            RDouble4D *faceViscousfluxI = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxI"));
+            RDouble4D *faceViscousfluxJ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxJ"));
+            RDouble4D *faceViscousfluxK = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxK"));
+            delete faceViscousfluxI; faceViscousfluxI = 0;
+            delete faceViscousfluxJ; faceViscousfluxJ = 0;
+            delete faceViscousfluxK; faceViscousfluxK = 0;
+            grid->DeleteDataPtr("faceViscousfluxI");
+            grid->DeleteDataPtr("faceViscousfluxJ");
+            grid->DeleteDataPtr("faceViscousfluxK");
+        }
+    }
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    if (nSlipBCModel > 0)
+    {
+        if (nWallBC > 0)
+        {
+            RDouble3D *surfaceSlipVariables = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+            delete surfaceSlipVariables; surfaceSlipVariables = 0;
+        }
+        grid->DeleteDataPtr("surfaceSlipVariables");
+    }
+    int isAblationWall = GlobalDataBase::GetIntParaFromDB("nAblation");
+    int Injection = GlobalDataBase::GetIntParaFromDB("isInjection");
+    if (isAblationWall > 0 && Injection > 0)
+    {
+        if (nWallBC > 0)
+        {
+            RDouble2D *injectionVelocity = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("injectionVelocity"));
+            delete injectionVelocity; injectionVelocity = 0;
+            grid->DeleteDataPtr("injectionVelocity");
+        }
+    }
+
+    int nRapidFlowfield = parameters->GetRapidFlowfieldMethod();
+    if (nRapidFlowfield > 0)
+    {
+        if (nWallBC > 0)
+        {
+            RDouble3D *surfacePressure = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfacePressure"));
+            delete surfacePressure; surfacePressure = 0;
+        }
+        grid->DeleteDataPtr("surfacePressure");
+    }
+
+    int nSurfHeatMonitor = parameters->GetSurfaceHeatingMonitor();
+    if (nSurfHeatMonitor > 0)
+    {
+        if (nWallBC > 0)
+        {
+            RDouble3D *surfaceHeatFlux = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceHeatFlux"));
+            delete surfaceHeatFlux; surfaceHeatFlux = 0;
+        }
+        grid->DeleteDataPtr("surfaceHeatFlux");
+    }
+
+    if (isUseNoneqCond > 0)
+    {
+        RDouble4D *deltaQ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("deltaQ"));
+        delete deltaQ; deltaQ = 0;
+        grid->DeleteDataPtr("deltaQ");
+
+        if (nChemical > 0)
+        {
+            RDouble4D *timeScale = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("timeScale"));
+            delete timeScale; timeScale = 0;
+            grid->DeleteDataPtr("timeScale");
+
+            RDouble4D *noneqNumber = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("noneqNumber"));
+            delete noneqNumber; noneqNumber = 0;
+            grid->DeleteDataPtr("noneqNumber");
+
+            RDouble3D *damkohlerNumber = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("DamkohlerNumber"));
+            delete damkohlerNumber; damkohlerNumber = 0;
+            grid->DeleteDataPtr("DamkohlerNumber");
+
+            RDouble3D *vibNoneqNumber = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("VibNoneqNumber"));
+            delete vibNoneqNumber; vibNoneqNumber = 0;
+            grid->DeleteDataPtr("VibNoneqNumber");
+        }
+    }
+
+    nWallBC = 1; //! The number of surface boundary conditions.
+    nMaxSurfaceCell = 1; //! The number of surface cells.
+    nIonizationFlag = 0; //! The flag of chemical reactions.
+}
+
+void NSSolverStruct::GetSurfaceCellNumber(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    //! Obtain the number of boundary condition regions.
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    nWallBC = 0;
+    nMaxSurfaceCell = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!IsWall(BCType) && BCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+        ++ nWallBC; //! The number of surface regions.
+
+        //! The following are surface boundary codes.
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        int ni = ied - ist + 1;
+        int nj = jed - jst + 1;
+        int nk = ked - kst + 1;
+        int nCell = ni * nj * nk;
+        nMaxSurfaceCell = MAX(nCell, nMaxSurfaceCell);
+    }
+}
+
+/*
+    void NSSolverStruct::InitializeSurfaceParameters(Grid *gridIn)
+    {
+        StructGrid *grid = StructGridCast(gridIn);
+        Param_NSSolverStruct *parameters = GetControlParameters();
+
+        //! Set surface temperatures.
+        RDouble Twall = parameters->GetWallTemperature();
+        RDouble refTemperature = parameters->GetRefDimensionalTemperature();
+        RDouble refT = Twall / refTemperature;
+        if (nWallBC > 0)
+        {
+            if (Twall <= EPSILON)
+            {
+                refT = 1.0; //! Radiation equilibrium temperature wall.
+            }
+
+            RDouble2D *temperatureWall = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+            if (temperatureWall == NULL)
+            {
+                temperatureWall = new RDouble2D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), fortranArray);
+                grid->UpdateDataPtr("surfaceTemperature", temperatureWall);
+            }
+
+            //! Initialization with the freestream temperature.
+            for (int iWall = 0; iWall < nWallBC; ++ iWall)
+            {
+                for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+                {
+                    (*temperatureWall)(iWall, iCell) = refT;
+                }
+            }
+        }
+
+        //! Set surface mass fractions of species.
+        RDouble initMassFraction[MAX_SPECIES_NUM] = { 0 };
+        int nChemical = parameters->GetChemicalFlag();
+        int nSpeciesNumber = parameters->GetNumberOfSpecies();
+        int nNSEquation = parameters->GetNSEquationNumber();
+
+        if (nChemical > 0 && nSpeciesNumber > 0)
+        {
+            int nIndexOfElectron = parameters->GetIndexOfElectron();
+            if (nIndexOfElectron >= 0)
+            {
+                this->nIonizationFlag = 1;
+            }
+
+            RDouble *fcwMassFraction = parameters->GetFullyCatalyticMassFraction();
+            for (int s = 0; s < nSpeciesNumber; ++ s)
+            {
+                initMassFraction[s] = fcwMassFraction[s];
+            }
+
+            RDouble catalyticCoef = parameters->GetCatalyticCoef();
+            if (ABS(catalyticCoef) <= EPSILON) //! Initialization of the initial mass fraction of species.
+            {
+                RDouble *primitiveVar = parameters->GetPrimitiveVarFarfield();
+                for (int s = 0; s < nSpeciesNumber; ++ s)
+                {
+                    initMassFraction[s] = primitiveVar[nNSEquation + s];
+                }
+            }
+
+            RDouble3D *surfaceMassFraction = NULL;
+            if (nWallBC > 0)
+            {
+                surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+                if (surfaceMassFraction == NULL)
+                {
+                    surfaceMassFraction = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, nSpeciesNumber - 1), fortranArray);
+                    grid->UpdateDataPtr("surfaceMassFraction", surfaceMassFraction);
+                }
+            }
+
+            for (int iWall = 0; iWall < nWallBC; ++ iWall)
+            {
+                for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+                {
+                    for (int s = 0; s < nSpeciesNumber; ++ s)
+                    {
+                        (*surfaceMassFraction)(iWall, iCell, s) = initMassFraction[s];
+                    }
+                }
+            }
+        }
+
+        //! Set surface slip parameters.
+        int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+        if (nSlipBCModel > 0)
+        {
+            //! The array includes variables such as slip temperatures(Tts, Tvs, Tes), slip velocity(Vx, Vy, Vz) and slip mass fractions of species.
+            int nSlipVar = nSpeciesNumber + 6;
+            RDouble3D *surfaceSlipVariables = NULL;
+            if (nWallBC > 0)
+            {
+                surfaceSlipVariables = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+                if (surfaceSlipVariables == NULL)
+                {
+                    surfaceSlipVariables = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, nSlipVar - 1), fortranArray);
+                    grid->UpdateDataPtr("surfaceSlipVariables", surfaceSlipVariables);
+                }
+            }
+            for (int iWall = 0; iWall < nWallBC; ++ iWall)
+            {
+                for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+                {
+                    (*surfaceSlipVariables)(iWall, iCell, 0) = refT; //! Temperature.
+                    (*surfaceSlipVariables)(iWall, iCell, 1) = refT;
+                    (*surfaceSlipVariables)(iWall, iCell, 2) = refT;
+                    (*surfaceSlipVariables)(iWall, iCell, 3) = 0.0; //! Velocity.
+                    (*surfaceSlipVariables)(iWall, iCell, 4) = 0.0;
+                    (*surfaceSlipVariables)(iWall, iCell, 5) = 0.0;
+                    for (int s = 6; s < nSlipVar; ++ s) //! Species mass fractions.
+                    {
+                        (*surfaceSlipVariables)(iWall, iCell, s) = initMassFraction[s - 6];
+                    }
+                }
+            }
+        }
+    }
+*/
+
+void NSSolverStruct::InitializeSurfaceParameters(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    //! Set surface temperatures.
+    RDouble Twall = parameters->GetWallTemperature();
+    RDouble refTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble refT = Twall / refTemperature;
+    int wallMultiTemperature = gas->GetwallMultiTemperature();
+
+    if (nWallBC > 0)
+    {
+        RDouble2D *temperatureWall = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+        if (temperatureWall == NULL)
+        {
+            temperatureWall = new RDouble2D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), fortranArray);
+            grid->UpdateDataPtr("surfaceTemperature", temperatureWall);
+        }
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+        int nBCRegion = structBCSet->GetnBCRegion();
+        int indexOfWall = 0;
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+            int nBCType = structBC->GetBCType();
+
+            if (!IsWall(nBCType) && nBCType != PHENGLEI::ABLATION_SURFACE)
+            {
+                continue;
+            }
+
+            if (wallMultiTemperature == 1)
+            {
+                Data_Param *bcParamDB = structBC->GetBCParamDataBase();
+
+                if (bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+                {
+                    bcParamDB->GetData("wallTemperature", &Twall, PHDOUBLE, 1);
+                }
+                else
+                {
+                    Twall = parameters->GetWallTemperature();
+                }
+                refT = Twall / refTemperature;
+            }
+
+            if (Twall <= EPSILON)
+            {
+                refT = 1.0; //! Radiation equilibrium temperature wall.
+            }
+
+            //! Initialization with the wall temperature.
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                (*temperatureWall)(indexOfWall, iCell) = refT;
+            }
+            ++ indexOfWall;
+        }
+    }
+
+    //! Set surface mass fractions of species.
+    RDouble initMassFraction[MAX_SPECIES_NUM] = { 0 };
+    int nChemical = parameters->GetChemicalFlag();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+    int nNSEquation = parameters->GetNSEquationNumber();
+
+    if (nChemical > 0 && nSpeciesNumber > 0)
+    {
+        int nIndexOfElectron = parameters->GetIndexOfElectron();
+        if (nIndexOfElectron >= 0)
+        {
+            this->nIonizationFlag = 1;
+        }
+
+        RDouble *fcwMassFraction = parameters->GetFullyCatalyticMassFraction();
+        for (int s = 0; s < nSpeciesNumber; ++ s)
+        {
+            initMassFraction[s] = fcwMassFraction[s];
+        }
+
+        RDouble catalyticCoef = parameters->GetCatalyticCoef();
+        if (ABS(catalyticCoef) <= EPSILON) //! Initialization of the initial mass fraction of species.
+        {
+            RDouble *primitiveVar = parameters->GetPrimitiveVarFarfield();
+            for (int s = 0; s < nSpeciesNumber; ++ s)
+            {
+                initMassFraction[s] = primitiveVar[nNSEquation + s];
+            }
+        }
+
+        RDouble3D *surfaceMassFraction = NULL;
+        if (nWallBC > 0)
+        {
+            surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+            if (surfaceMassFraction == NULL)
+            {
+                surfaceMassFraction = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, nSpeciesNumber - 1), fortranArray);
+                grid->UpdateDataPtr("surfaceMassFraction", surfaceMassFraction);
+            }
+        }
+
+        for (int iWall = 0; iWall < nWallBC; ++ iWall)
+        {
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                for (int s = 0; s < nSpeciesNumber; ++ s)
+                {
+                    (*surfaceMassFraction)(iWall, iCell, s) = initMassFraction[s];
+                }
+            }
+        }
+    }
+
+    //! Set surface slip parameters.
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    if (nSlipBCModel > 0)
+    {
+        //! The array includes variables such as slip temperatures(Tts, Tvs, Tes), slip velocity(Vx, Vy, Vz) and slip mass fractions of species.
+        int nSlipVar = nSpeciesNumber + 6;
+        RDouble3D *surfaceSlipVariables = NULL;
+        if (nWallBC > 0)
+        {
+            surfaceSlipVariables = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+            if (surfaceSlipVariables == NULL)
+            {
+                surfaceSlipVariables = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, nSlipVar - 1), fortranArray);
+                grid->UpdateDataPtr("surfaceSlipVariables", surfaceSlipVariables);
+            }
+        }
+            
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+        int nBCRegion = structBCSet->GetnBCRegion();
+        int indexOfWall = 0;
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+            int nBCType = structBC->GetBCType();
+
+            if (!IsWall(nBCType) && nBCType != PHENGLEI::ABLATION_SURFACE)
+            {
+                continue;
+            }
+
+            if (wallMultiTemperature == 1)
+            {
+                Data_Param *bcParamDB = structBC->GetBCParamDataBase();
+                if (bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+                {
+                    bcParamDB->GetData("wallTemperature", &Twall, PHDOUBLE, 1);
+                }
+                else
+                {
+                    Twall = parameters->GetWallTemperature();
+                }
+                refT = Twall / refTemperature;
+            }
+
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                (*surfaceSlipVariables)(indexOfWall, iCell, 0) = refT; //! Temperature.
+                (*surfaceSlipVariables)(indexOfWall, iCell, 1) = refT;
+                (*surfaceSlipVariables)(indexOfWall, iCell, 2) = refT;
+                (*surfaceSlipVariables)(indexOfWall, iCell, 3) = 0.0; //! Velocity.
+                (*surfaceSlipVariables)(indexOfWall, iCell, 4) = 0.0;
+                (*surfaceSlipVariables)(indexOfWall, iCell, 5) = 0.0;
+                for (int s = 6; s < nSlipVar; ++ s) //! Species mass fractions.
+                {
+                    (*surfaceSlipVariables)(indexOfWall, iCell, s) = initMassFraction[s - 6];
+                }
+            }
+            ++ indexOfWall;
+        }
+    }
+}
+
+void NSSolverStruct::InitializeSurfaceParametersFromFile(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble refTemperature = parameters->GetRefDimensionalTemperature();
+
+    //! Obtain the number of boundary condition regions.
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int nIndexOfWall = 0, nIndexOfCell = 0;
+
+    RDouble2D *temperatureWall = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!IsWall(BCType) && BCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        RDouble3D *wallTempArray;
+        if (structBC->CheckFieldData("wallTempArray"))
+        {
+            wallTempArray = reinterpret_cast <RDouble3D *> (structBC->GetFieldDataPtr("wallTempArray"));
+        }
+        else
+        {
+            continue;
+        }
+
+        //! The following are surface boundary codes.
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        nIndexOfCell = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*temperatureWall)(nIndexOfWall, nIndexOfCell) = (*wallTempArray)(i, j, k) / refTemperature;
+
+                    ++ nIndexOfCell; //! Next grid cell.
+                }
+            }
+        }
+
+
+
+
+
+        ++ nIndexOfWall; //! Next wall boundary.
+    }
+}
+
+void NSSolverStruct::ChangeSurfaceTemperature(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    //! Set surface temperatures.
+    RDouble Twall = parameters->GetWallTemperature();
+    RDouble refTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble refT = Twall / refTemperature;
+    if (nWallBC > 0)
+    {
+        if (Twall <= EPSILON)
+        {
+            refT = 1.0; //! Radiation equilibrium temperature wall.
+        }
+
+        RDouble2D *temperatureWall = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+
+        //! Initialization with the freestream temperature.
+        for (int iWall = 0; iWall < nWallBC; ++ iWall)
+        {
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                (*temperatureWall)(iWall, iCell) = refT;
+            }
+        }
+    }
+}
+
+void NSSolverStruct::ChangeSurfaceMassFractions(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    //! Set surface mass fractions of species.
+    RDouble initMassFraction[MAX_SPECIES_NUM];
+    int nChemical = parameters->GetChemicalFlag();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+    int nNSEquation = parameters->GetNSEquationNumber();
+
+    if (nChemical > 0 && nSpeciesNumber > 0)
+    {
+        RDouble *fcwMassFraction = parameters->GetFullyCatalyticMassFraction();
+        for (int s = 0; s < nSpeciesNumber; ++ s)
+        {
+            initMassFraction[s] = fcwMassFraction[s];
+        }
+
+        RDouble catalyticCoef = parameters->GetCatalyticCoef();
+        if (ABS(catalyticCoef) <= EPSILON) //! Initialization of the initial mass fraction of species.
+        {
+            RDouble *primitiveVar = parameters->GetPrimitiveVarFarfield();
+            for (int s = 0; s < nSpeciesNumber; ++ s)
+            {
+                initMassFraction[s] = primitiveVar[nNSEquation + s];
+            }
+        }
+
+        RDouble3D *surfaceMassFraction = NULL;
+        if (nWallBC > 0)
+        {
+            surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+        }
+
+        for (int iWall = 0; iWall < nWallBC; ++ iWall)
+        {
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                for (int s = 0; s < nSpeciesNumber; ++ s)
+                {
+                    (*surfaceMassFraction)(iWall, iCell, s) = initMassFraction[s];
+                }
+            }
+        }
+    }
+}
+
+bool NSSolverStruct::JudgeIfRestart()
+{
+    string restartNSFile = ".\results\flow.dat";
+    GlobalDataBase::GetData("restartNSFile", &restartNSFile, PHSTRING, 1);
+
+    if (PHMPI::IsParallelRun())
+    {
+        restartNSFile = PHSPACE::AddSymbolToFileName(restartNSFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(restartNSFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+bool NSSolverStruct::JudgeIfProtectedRestart()
+{
+    string protectionFile0 = "./results/flow0.dat";
+    GlobalDataBase::GetData("protectionFile0", &protectionFile0, PHSTRING, 1);
+    if (PHMPI::IsParallelRun())
+    {
+        protectionFile0 = PHSPACE::AddSymbolToFileName(protectionFile0, "_", 0);
+    }
+
+    string protectionFile1 = "./results/flow1.dat";
+    GlobalDataBase::GetData("protectionFile1", &protectionFile1, PHSTRING, 1);
+    if (PHMPI::IsParallelRun())
+    {
+        protectionFile1 = PHSPACE::AddSymbolToFileName(protectionFile1, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile_0(protectionFile0.c_str(), ios::in);
+    if (infile_0)
+    {
+        restart_flag = true;
+        infile_0.close();
+        infile_0.clear();
+    }
+
+    ifstream infile_1(protectionFile1.c_str(), ios::in);
+    if (infile_1)
+    {
+        restart_flag = true;
+        infile_1.close();
+        infile_1.clear();
+    }
+
+    return restart_flag;
+}
+
+bool NSSolverStruct::JudgeIfReadAverage()
+{
+    string restartNSFile = ".\results\flow.dat";
+    GlobalDataBase::GetData("restartNSFile", &restartNSFile, PHSTRING, 1);
+    string averageFlowFile = AddSymbolToFileName(restartNSFile, "_", "Average");
+
+    if (PHMPI::IsParallelRun())
+    {
+        averageFlowFile = PHSPACE::AddSymbolToFileName(averageFlowFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(averageFlowFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+void NSSolverStruct::DumpRestart(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nEquation = GetNumberOfEquations();
+
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    DataContainer *restartData = actkey->GetData();
+    restartData->moveto_begin();
+    restartData->write(&outIterStep, sizeof(int));
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    restartData->write(&q(i, j, k, m), sizeof(RDouble));
+                }
+            }
+        }
+    }
+
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    if (nChemical == 1)
+    {
+        for (int m = 0; m < nTemperatureModel; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        restartData->write(&temperatures(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        return;
+    }
+
+    RDouble physicalTime = GlobalDataBase::GetDoubleParaFromDB("physicalTime");
+    restartData->write(&physicalTime, sizeof(RDouble));
+
+    RDouble4D &qn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble4D &qn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    restartData->write(&qn1(i, j, k, m), sizeof(RDouble));
+                }
+            }
+        }
+    }
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    restartData->write(&qn2(i, j, k, m), sizeof(RDouble));
+                }
+            }
+        }
+    }
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &residualn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble4D &residualn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    restartData->write(&residual(i, j, k, m), sizeof(RDouble));
+                }
+            }
+        }
+    }
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    restartData->write(&residualn1(i, j, k, m), sizeof(RDouble));
+                }
+            }
+        }
+    }
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    restartData->write(&residualn2(i, j, k, m), sizeof(RDouble));
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::DumpRestartH5(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int currentProcessorID = GetCurrentProcessorID();
+
+    int version = 1;
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    int isWennScheme= parameters->GetWennSchemeFlag();
+    int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    if (currentProcessorID == GetServerProcessorID())
+    {
+        WriteData(actkey->filepos, &version, "Version");
+        WriteData(actkey->filepos, &outIterStep, "outnstep");
+
+        if (isUnsteady == 1)
+        {
+            RDouble physicalTime = GlobalDataBase::GetDoubleParaFromDB("physicalTime");
+            WriteData(actkey->filepos, &physicalTime, "physicalTime");
+
+            if (IsNeedStatistics())
+            {
+                int nStatisticalStep = 0;
+                GlobalDataBase::GetData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+                WriteData(actkey->filepos, &nStatisticalStep, "nStatisticalStep");
+            }
+        }
+    }
+
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    StructGrid *strGrid = StructGridCast(GetGrid(actkey->level));
+    int nTotalCell = strGrid->GetNTotalCell();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+    if (isWennScheme == 1)
+    {
+        strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, THREE_GHOST_LAYER);
+    }
+
+    int nEquation = GetNumberOfEquations();
+
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    //RFloat * primitiveVariables = &q(ist, jst, kst, mst);
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    //WriteData(grploc, primitiveVariables, "q");
+    WriteData(grploc, &primitiveVariables(iCellStart, jCellStart, kCellStart, 0), "q");
+    WriteData(grploc, &nTotalCell, "nTotalCell");
+
+    //! Dump data for surface info
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();
+    int nChemical = parameters->GetChemicalFlag();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    WriteData(grploc, &wallTemperature, "surfaceTemperatureFlag");
+    WriteData(grploc, &catalyticCoef, "catalyticCoefFlag");
+    WriteData(grploc, &nChemical, "nIsChemicalFlow");
+    WriteData(grploc, &numberOfSpecies, "numberOfSpecies");
+    WriteData(grploc, &nTemperatureModel, "nTemperatureModel");
+
+    Int1D &speciesOrder = *reinterpret_cast <Int1D *> (grid->GetDataPtr("speciesOrder"));
+    WriteData(grploc, &speciesOrder(0), "speciesNameList");
+
+    //! Dump temperatures to file.
+    //if (nChemical > 0)
+    //{
+    WriteData(grploc, &temperatures(iCellStart, jCellStart, kCellStart, mst), "t");
+    //}
+
+    if (nWallBC > 0)    //! The wall boundary condition exists.
+    {
+        //! Write the temperature on wall.
+        RDouble2D &temperatureWall = *reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+        WriteData(grploc, &temperatureWall(0, 0), "surfaceTemperature");
+
+        //! Write the mass fractions of species on wall.
+        if (nChemical > 0 && numberOfSpecies > 0)
+        {
+            RDouble3D &surfaceMassFraction = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+            WriteData(grploc, &surfaceMassFraction(0, 0, 0), "surfaceMassFraction");
+        }
+    }
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    if (nSlipBCModel > 0 && nWallBC > 0)
+    {
+        RDouble3D &surfaceParameterSlip = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+        WriteData(grploc, &surfaceParameterSlip(0, 0, 0), "surfaceSlipVariables");
+    }
+
+    if (isUnsteady)
+    {
+        RDouble4D &qn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+        WriteData(grploc, &qn1(iCellStart, jCellStart, kCellStart, mst), "q_unsteady_n1");
+
+        RDouble4D &qn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+        WriteData(grploc, &qn2(iCellStart, jCellStart, kCellStart, mst), "q_unsteady_n2");
+
+        RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+        WriteData(grploc, &residual(iCellStart, jCellStart, kCellStart, mst), "res");
+
+        RDouble4D &residualn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+        WriteData(grploc, &residualn1(iCellStart, jCellStart, kCellStart, mst), "res_unsteady_n1");
+
+        RDouble4D &residualn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+        WriteData(grploc, &residualn2(iCellStart, jCellStart, kCellStart, mst), "res_unsteady_n2");
+
+        RDouble4D &qAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage"));
+        WriteData(grploc, &qAverage(iCellStart, jCellStart, kCellStart, mst), "qAverage");
+
+        RDouble4D &tauAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("tauAverage"));
+        WriteData(grploc, &tauAverage(iCellStart, jCellStart, kCellStart, 0), "tauAverage");
+
+        RDouble4D &q2Average = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q2Average"));
+        WriteData(grploc, &q2Average(iCellStart, jCellStart, kCellStart, 0), "q2Average");
+    }
+
+    H5Gclose(grploc);
+}
+
+void NSSolverStruct::ReadRestartFlowH5(ActionKey *actkey)
+{
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    StructGrid *strGrid = StructGridCast(grid);
+    int nTotalCell = strGrid->GetNTotalCell();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isWennScheme= parameters->GetWennSchemeFlag();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    if (isWennScheme == 1)
+    {
+        strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, THREE_GHOST_LAYER);
+    }
+
+    int nEquation = GetNumberOfEquations();
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble4D &heatTransferCoeff = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("heatTransferCoeff"));
+    Int1D &speciesOrder = *reinterpret_cast <Int1D *> (grid->GetDataPtr("speciesOrder"));
+    heatTransferCoeff = 0.0;
+
+    int outIterStep = 0;
+    ReadData(actkey->filepos, &outIterStep, "outnstep");
+    GlobalDataBase::UpdateData("outnstep", &outIterStep, PHINT, 1);
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    int nTotalCellRestart = 0;
+    ReadData(grploc, &nTotalCellRestart, "nTotalCell");
+    if (nTotalCellRestart != nTotalCell)
+    {
+        ostringstream erroeInfo;
+        erroeInfo << " Error: the cell number in flow.dat is not equal to the cell number in grid file !" << endl;
+        TK_Exit::ExceptionExit(erroeInfo.str());
+    }
+
+    //! add the data for surface info.
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSEqn = parameters->GetNSEquationNumber();
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble preWallTemperature = wallTemperature, preCatalyticCoef = catalyticCoef;
+    int preChemical = nChemical, preTemperatureModel = nTemperatureModel, preSpeciesNumber = numberOfSpecies;
+    int isUsePreTwall = 0;
+    if (GlobalDataBase::IsExist("isUsePreTwall", PHINT, 1))
+    {
+        isUsePreTwall = GlobalDataBase::GetIntParaFromDB("isUsePreTwall");
+    }
+
+    if (CheckDataExist(grploc, "surfaceTemperatureFlag"))
+    {
+        ReadData(grploc, &preWallTemperature, "surfaceTemperatureFlag");
+    }
+    if (CheckDataExist(grploc, "catalyticCoefFlag"))
+    {
+        ReadData(grploc, &preCatalyticCoef, "catalyticCoefFlag");
+    }
+    if (CheckDataExist(grploc, "nIsChemicalFlow"))
+    {
+        ReadData(grploc, &preChemical, "nIsChemicalFlow");
+    }
+    if (CheckDataExist(grploc, "numberOfSpecies"))
+    {
+        ReadData(grploc, &preSpeciesNumber, "numberOfSpecies");
+    }
+    if (CheckDataExist(grploc, "nTemperatureModel"))
+    {
+        ReadData(grploc, &preTemperatureModel, "nTemperatureModel");
+    }
+    int nTotalNumber = 16;
+    Int1D *speciesOrder2 = new Int1D(Range(0, nTotalNumber - 1), fortranArray);
+    //! Initialization
+    for (int n = 0; n < nTotalNumber; ++ n)
+    {
+        (*speciesOrder2)(n) = speciesOrder(n);
+    }
+    if (CheckDataExist(grploc, "speciesNameList"))
+    {
+        ReadData(grploc, &(*speciesOrder2)(0), "speciesNameList");
+    }
+
+    //! Read temperatures of flowfield.
+    //if (nChemical > 0)
+    //{
+    if (CheckDataExist(grploc, "t"))
+    {
+        if (preTemperatureModel == nTemperatureModel)
+        {
+            ReadData(grploc, &temperatures(iCellStart, jCellStart, kCellStart, mst), "t");
+        }
+        else
+        {
+            RDouble4D *tmpTemperature = new RDouble4D(Range(iCellStart, iCellEnd), Range(jCellStart, jCellEnd), Range(kCellStart, kCellEnd), Range(0, preTemperatureModel - 1), fortranArray);
+            ReadData(grploc, &(*tmpTemperature)(iCellStart, jCellStart, kCellStart, mst), "t");
+            SetFlowfieldTemperature(grid, preChemical, preTemperatureModel, tmpTemperature);
+            delete tmpTemperature;
+        }
+    }
+    //}
+
+    //! Read the flowfield data.
+    if (preChemical == nChemical && preTemperatureModel == nTemperatureModel && IsEqualGasModel(&speciesOrder, speciesOrder2))
+    {
+        ReadData(grploc, &primitiveVariables(iCellStart, jCellStart, kCellStart, mst), "q");
+    }
+    else
+    {
+        int nEqn = nNSEqn + preSpeciesNumber + preTemperatureModel - 1;
+        RDouble4D *tmpVariables = new RDouble4D(Range(iCellStart, iCellEnd), Range(jCellStart, jCellEnd), Range(kCellStart, kCellEnd), Range(0, nEqn - 1), fortranArray);
+        ReadData(grploc, &(*tmpVariables)(iCellStart, jCellStart, kCellStart, mst), "q");
+        SetPrimitiveVariables(grid, preChemical, preTemperatureModel, preSpeciesNumber, speciesOrder2, tmpVariables);
+        delete tmpVariables;
+    }
+
+    if (nWallBC > 0)    //! The wall boundary condition exists.
+    {
+        //! Write the temperature on wall.
+        RDouble2D &temperatureWall = *reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+        if (CheckDataExist(grploc, "surfaceTemperature"))
+        {
+            ReadData(grploc, &temperatureWall(0, 0), "surfaceTemperature");
+            if (wallTemperature != preWallTemperature && isUsePreTwall == 0)
+            {
+                ChangeSurfaceTemperature(grid);
+            }
+        }
+
+        //! Write the mass fractions of species on wall.
+        if (nChemical > 0 && numberOfSpecies > 0)
+        {
+            RDouble3D &surfaceMassFraction = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+            if (CheckDataExist(grploc, "surfaceMassFraction"))
+            {
+                if (IsEqualGasModel(&speciesOrder, speciesOrder2))
+                {
+                    ReadData(grploc, &surfaceMassFraction(0, 0, 0), "surfaceMassFraction");
+                }
+                else
+                {
+                    RDouble3D *tmpSurfaceMassFraction = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, preSpeciesNumber - 1), fortranArray);
+                    ReadData(grploc, &(*tmpSurfaceMassFraction)(0, 0, 0), "surfaceMassFraction");
+                    SetSurfaceMassFractions(grid, preChemical, preSpeciesNumber, speciesOrder2, tmpSurfaceMassFraction);
+                    delete tmpSurfaceMassFraction;
+                }
+            }
+
+            if (catalyticCoef != preCatalyticCoef)
+            {
+                ChangeSurfaceMassFractions(grid);
+            }
+        }
+    }
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    if (nSlipBCModel > 0 && nWallBC > 0)
+    {
+        RDouble3D &surfaceParameterSlip = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+        if (CheckDataExist(grploc, "surfaceSlipVariables"))
+        {
+            if (IsEqualGasModel(&speciesOrder, speciesOrder2))
+            {
+                ReadData(grploc, &surfaceParameterSlip(0, 0, 0), "surfaceSlipVariables");
+            }
+            else
+            {
+                int nLen = 6 + preSpeciesNumber;
+                RDouble3D *tmpSurfaceSlipVar = new RDouble3D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), Range(0, nLen - 1), fortranArray);
+                ReadData(grploc, &(*tmpSurfaceSlipVar)(0, 0, 0), "surfaceSlipVariables");
+                SetSurfaceSlipVariables(grid, preChemical, preSpeciesNumber, speciesOrder2, tmpSurfaceSlipVar);
+                delete tmpSurfaceSlipVar;
+            }
+        }
+    }
+
+    //! Remove dynamic memories.
+    delete speciesOrder2;
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+        for (int m = mst; m <= med; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        residual(i, j, k, m) = 0.0;
+                    }
+                }
+            }
+        }
+
+        H5Gclose(grploc);
+        return;
+    }
+
+    RDouble4D &qn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble4D &qn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &residualn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble4D &residualn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+    RDouble4D &qAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage"));
+    RDouble4D &tauAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("tauAverage"));
+    RDouble4D &q2Average = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q2Average"));
+
+    int ifStartFromSteadyResults = parameters->GetIfStartFromSteadyResults();
+    RDouble physicalTime = 0.0;
+    if (!CheckDataExist(actkey->filepos, "physicalTime"))
+    {
+        ifStartFromSteadyResults = 1;
+    }
+
+    if (ifStartFromSteadyResults)
+    {
+        if (grid->GetGridID()->GetIndex() == 0)
+        {
+            PrintToWindow("Restart from steady NS flow field, reset outer step to be zero!\n");
+        }
+
+        //! Start from steady flow field.
+        //! Reset the outer step when start from steady flow.
+        outIterStep = 0;
+        GlobalDataBase::UpdateData("outnstep", &outIterStep, PHINT, 1);
+
+        qn1 = primitiveVariables;
+        qn2 = primitiveVariables;
+
+        residual = 0.0;
+        residualn1 = 0.0;
+        residualn2 = 0.0;
+    }
+    else
+    {
+        ReadData(actkey->filepos, &physicalTime, "physicalTime");
+
+        ReadData(grploc, &qn1(iCellStart, jCellStart, kCellStart, mst), "q_unsteady_n1");
+        ReadData(grploc, &qn2(iCellStart, jCellStart, kCellStart, mst), "q_unsteady_n2");
+        ReadData(grploc, &residual(iCellStart, jCellStart, kCellStart, mst), "res");
+        ReadData(grploc, &residualn1(iCellStart, jCellStart, kCellStart, mst), "res_unsteady_n1");
+        ReadData(grploc, &residualn2(iCellStart, jCellStart, kCellStart, mst), "res_unsteady_n2");
+    }
+
+    int nStatisticalStep = 0;
+
+    if (IsNeedStatistics())
+    {
+        if (ifStartFromSteadyResults)
+        {
+            qAverage = primitiveVariables;
+        }
+        else
+        {
+            ReadData(grploc, &qAverage(iCellStart, jCellStart, kCellStart, mst), "qAverage");
+
+            ReadData(actkey->filepos, &nStatisticalStep, "nStatisticalStep");
+        }
+    }
+
+    if (IsNeedReynoldsStressStatistics())
+    {
+        if (ifStartFromSteadyResults)
+        {
+            tauAverage = 0.0;
+
+            q2Average = 0.0;
+        }
+        else
+        {
+            ReadData(grploc, &tauAverage(iCellStart, jCellStart, kCellStart, 0), "tauAverage");
+
+            ReadData(grploc, &q2Average(iCellStart, jCellStart, kCellStart, 0), "q2Average");
+        }
+    }
+
+    GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+
+    GlobalDataBase::UpdateData("physicalTime", &physicalTime, PHDOUBLE, 1);
+
+    H5Gclose(grploc);
+}
+
+void NSSolverStruct::SetFlowfieldTemperature(Grid *grid, int nChemical, int nTemperatureModel, RDouble4D *primTemperature)
+{
+    StructGrid *strGrid = StructGridCast(grid);
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int curTModel = parameters->GetTemperatureModel();
+
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    if (curTModel <= nTemperatureModel) //The collection of the reading data is bigger.
+    {
+        for (int m = 0; m < curTModel; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        temperatures(i, j, k, m) = (*primTemperature)(i, j, k, m);
+                    }
+                }
+            }
+        }
+    }
+    else //! The collection of the reading data is smaller.
+    {
+        for (int m = 0; m < nTemperatureModel; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        temperatures(i, j, k, m) = (*primTemperature)(i, j, k, m);
+                    }
+                }
+            }
+        }
+
+        for (int m = nTemperatureModel; m < curTModel; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        temperatures(i, j, k, m) = (*primTemperature)(i, j, k, nTemperatureModel - 1);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::SetPrimitiveVariables(Grid *grid, int nChemical, int nTemperatureModel, int numberOfSpecies, Int1D *speciesOrder, RDouble4D *primVariables)
+{
+    StructGrid *strGrid = StructGridCast(grid);
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int curChem = parameters->GetChemicalFlag();
+    int nNSEqn = parameters->GetNSEquationNumber();
+    int curTModel = parameters->GetTemperatureModel();
+    int curNumberOfSpecies = parameters->GetNumberOfSpecies();
+
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    RDouble *fcwMassFraction = parameters->GetFullyCatalyticMassFraction();
+    Int1D &curSpeciesOrder = *reinterpret_cast <Int1D *> (grid->GetDataPtr("speciesOrder"));
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble prim[MAX_SPECIES_NUM] = { 0.0 };
+
+    //! Set the variables of density, velocityU, velocityV, velocityW, and pressure.
+    for (int m = 0; m < nNSEqn; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    primitiveVariables(i, j, k, m) = (*primVariables)(i, j, k, m);
+                }
+            }
+        }
+    }
+
+    //! Set the mass fractions of species.
+    int nIndex1, nIndex2, totalNumber = 16;
+    if (nChemical == 0) //the previous gas model is perfect gas.
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    for (int m = 0; m < curNumberOfSpecies; ++ m)
+                    {
+                        primitiveVariables(i, j, k, nNSEqn + m) = fcwMassFraction[m];
+                    }
+                }
+            }
+        }
+    }
+    else //! The previous gas model is real gas.
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    for (int m = 0; m < totalNumber; ++ m)
+                    {
+                        nIndex1 = curSpeciesOrder(m);
+                        if (nIndex1 >= 0)
+                        {
+                            nIndex2 = (*speciesOrder)(m);
+                            if (nIndex2 >= 0)
+                            {
+                                prim[nNSEqn + nIndex1] = (*primVariables)(i, j, k, nNSEqn + nIndex2);
+                            }
+                            else
+                            {
+                                //prim[nNSEqn + nIndex1] = primitiveVarFarfield[nNSEqn + nIndex1];
+                                prim[nNSEqn + nIndex1] = 0.0;
+                            }
+                        }
+                    }
+
+                    //! Normalize.
+                    if (curChem > 0)
+                    {
+                        gas->NormalizePrimitive(prim);
+                        for (int m = 0; m < curNumberOfSpecies; ++ m)
+                        {
+                            primitiveVariables(i, j, k, nNSEqn + m) = prim[nNSEqn + m];
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    //! Set the variables of vibrational energy and electron energy.
+    if (curChem > 0 && curTModel > 1)
+    {
+        nIndex1 = nNSEqn + curNumberOfSpecies;
+        nIndex2 = nNSEqn + numberOfSpecies;
+        if (nChemical == 0) //! The previous is perfect gas.
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        for (int m = 0; m < curTModel - 1; ++ m)
+                        {
+                            primitiveVariables(i, j, k, nIndex1 + m) = primitiveVarFarfield[nIndex1 + m];
+                        }
+                    }
+                }
+            }
+        }
+        else //! The previous is chemical flow.
+        {
+            if (curTModel <= nTemperatureModel) //! The collection of the reading data is bigger.
+            {
+                for (int m = 0; m < curTModel - 1; ++ m)
+                {
+                    for (int k = kCellStart; k <= kCellEnd; ++ k)
+                    {
+                        for (int j = jCellStart; j <= jCellEnd; ++ j)
+                        {
+                            for (int i = iCellStart; i <= iCellEnd; ++ i)
+                            {
+                                primitiveVariables(i, j, k, nIndex1 + m) = (*primVariables)(i, j, k, nIndex2 + m);
+                            }
+                        }
+                    }
+                }
+            }
+            else //! The collection of the reading data is smaller.
+            {
+                for (int m = 0; m < nTemperatureModel - 1; ++ m)
+                {
+                    for (int k = kCellStart; k <= kCellEnd; ++ k)
+                    {
+                        for (int j = jCellStart; j <= jCellEnd; ++ j)
+                        {
+                            for (int i = iCellStart; i <= iCellEnd; ++ i)
+                            {
+                                primitiveVariables(i, j, k, nIndex1 + m) = (*primVariables)(i, j, k, nIndex2 + m);
+                            }
+                        }
+                    }
+                }
+
+                RDouble vibEnergy = 0.0, eleEnergy = 0.0;
+                for (int k = kCellStart; k <= kCellEnd; ++ k)
+                {
+                    for (int j = jCellStart; j <= jCellEnd; ++ j)
+                    {
+                        for (int i = iCellStart; i <= iCellEnd; ++ i)
+                        {
+                            for (int m = 0; m < curNumberOfSpecies; ++ m)
+                            {
+                                prim[m] = primitiveVariables(i, j, k, nNSEqn + m);
+                            }
+                            RDouble temperature = temperatures(i, j, k, nTemperatureModel - 1);
+                            if (temperature <= 0.0)
+                            {
+                                temperature = 1.0;
+                            }
+                            vibEnergy = gas->GetMixedGasVibrationEnergy(temperature, prim);
+                            eleEnergy = gas->GetMixedGasElectronEnergy(temperature, prim);
+
+                            if (nTemperatureModel == 1)
+                            {
+                                if (curTModel == 2)
+                                {
+                                    primitiveVariables(i, j, k, nIndex1) = vibEnergy + eleEnergy;
+                                }
+                                else if (curTModel == 3)
+                                {
+                                    primitiveVariables(i, j, k, nIndex1) = vibEnergy;
+                                    primitiveVariables(i, j, k, nIndex1 + 1) = eleEnergy;
+                                }
+                            }
+                            else if (nTemperatureModel == 2)
+                            {
+                                if (curTModel == 3)
+                                {
+                                    primitiveVariables(i, j, k, nIndex1 + 1) = eleEnergy;
+                                }
+                            }
+                        }
+                    }
+                }
+                //! The collection of the reading data is bigger.
+            }
+            //! The previous is chemical flow.
+        }
+        //! Set vibrational energy and electron energy.
+    }
+}
+
+void NSSolverStruct::SetSurfaceMassFractions(Grid *grid, int nChemical, int numberOfSpecies, Int1D *speciesOrder, RDouble3D *primMassFractions)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEqn = parameters->GetNSEquationNumber();
+    int curNumberOfSpecies = parameters->GetNumberOfSpecies();
+    RDouble catalytic = parameters->GetCatalyticCoef();
+
+    RDouble *fcwMassFraction = parameters->GetFullyCatalyticMassFraction();
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    Int1D &curSpeciesOrder = *reinterpret_cast <Int1D *> (grid->GetDataPtr("speciesOrder"));
+    RDouble3D &surfaceMassFraction = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+    RDouble prim[MAX_SPECIES_NUM] = { 0.0 };
+
+    //! Set the mass fractions of species.
+    if (fabs(catalytic - 1.0) <= EPSILON) //! Fully catalytic wall condition.
+    {
+        for (int iWall = 0; iWall < nWallBC; ++ iWall)
+        {
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                for (int m = 0; m < curNumberOfSpecies; ++ m)
+                {
+                    surfaceMassFraction(iWall, iCell, m) = fcwMassFraction[m];
+                }
+            }
+        }
+    }
+    else if (fabs(catalytic) <= EPSILON) //! Non-catalytic wall condition.
+    {
+        for (int iWall = 0; iWall < nWallBC; ++ iWall)
+        {
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                for (int m = 0; m < curNumberOfSpecies; ++ m)
+                {
+                    surfaceMassFraction(iWall, iCell, m) = primitiveVarFarfield[nNSEqn + m];
+                }
+            }
+        }
+    }
+    else //! Partial catalytic wall condition.
+    {
+        int nIndex1, nIndex2, totalNumber = 16;
+        for (int iWall = 0; iWall < nWallBC; ++ iWall)
+        {
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                for (int m = 0; m < totalNumber; ++ m)
+                {
+                    nIndex1 = curSpeciesOrder(m);
+                    if (nIndex1 >= 0)
+                    {
+                        nIndex2 = (*speciesOrder)(m);
+                        if (nIndex2 >= 0)
+                        {
+                            prim[nNSEqn + nIndex1] = (*primMassFractions)(iWall, iCell, nIndex2);
+                        }
+                        else
+                        {
+                            prim[nNSEqn + nIndex1] = 0.0;
+                        }
+                    }
+                }
+
+                //! Normalize.
+                gas->NormalizePrimitive(prim);
+                for (int m = 0; m < curNumberOfSpecies; ++ m)
+                {
+                    surfaceMassFraction(iWall, iCell, m) = prim[nNSEqn + m];
+                }
+
+            }
+        }
+        //! Partial catalytic wall condition.
+    }
+}
+
+void NSSolverStruct::SetSurfaceSlipVariables(Grid *grid, int nChemical, int numberOfSpecies, Int1D *speciesOrder, RDouble3D *primSlipVar)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int curChem = parameters->GetChemicalFlag();
+    int nNSEqn = parameters->GetNSEquationNumber();
+    int curNumberOfSpecies = parameters->GetNumberOfSpecies();
+
+    Int1D &curSpeciesOrder = *reinterpret_cast <Int1D *> (grid->GetDataPtr("speciesOrder"));
+    RDouble3D &surfaceParameterSlip = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+    RDouble3D &surfaceMassFraction = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+    RDouble prim[MAX_SPECIES_NUM] = { 0.0 };
+
+    //! Set the temperature and velocity.
+    int nIndex1, nIndex2, totalNumber = 6;
+    for (int iWall = 0; iWall < nWallBC; ++ iWall)
+    {
+        for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+        {
+            for (int m = 0; m < totalNumber; ++ m)
+            {
+                surfaceParameterSlip(iWall, iCell, m) = (*primSlipVar)(iWall, iCell, m);
+            }
+        }
+    }
+
+    //! Set the mass fractions.
+    if (curChem > 0)
+    {
+        totalNumber = 16;
+        for (int iWall = 0; iWall < nWallBC; ++ iWall)
+        {
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                for (int m = 0; m < totalNumber; ++ m)
+                {
+                    nIndex1 = curSpeciesOrder(m);
+                    if (nIndex1 >= 0)
+                    {
+                        nIndex2 = (*speciesOrder)(m);
+                        if (nIndex2 >= 0)
+                        {
+                            prim[nNSEqn + nIndex1] = (*primSlipVar)(iWall, iCell, nIndex2 + 6);
+                        }
+                        else
+                        {
+                            prim[nNSEqn + nIndex1] = surfaceMassFraction(iWall, iCell, nIndex1);
+                        }
+                    }
+                }
+
+                //! Normalize.
+                gas->NormalizePrimitive(prim);
+                for (int m = 0; m < curNumberOfSpecies; ++ m)
+                {
+                    surfaceParameterSlip(iWall, iCell, m + 6) = prim[nNSEqn + m];
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::ReadPrefectGasRestartH5(ActionKey *actkey)
+{
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    StructGrid *strGrid = StructGridCast(GetGrid(actkey->level));
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nEquation = GetNumberOfEquations();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    Range M(0, nNSEquation - 1);
+    int mst = M.first();
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    int outIterStep = 0;
+    ReadData(actkey->filepos, &outIterStep, "outnstep");
+    GlobalDataBase::UpdateData("outnstep", &outIterStep, PHINT, 1);
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    ReadData(grploc, &primitiveVariables(iCellStart, jCellStart, kCellStart, mst), "q");
+
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    Range N(nNSEquation, nEquation - 1);
+    int nst = N.first();
+    int ned = N.last();
+
+    for (int n = nst; n <= ned; ++ n)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    primitiveVariables(i, j, k, n) = primitiveVarFarfield[n];
+                }
+            }
+        }
+    }
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    Range I, J, K;
+    GetRange(I, J, K, iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd);
+    residual(I, J, K, M) = 0.0;
+    residual(I, J, K, N) = 0.0;
+
+    H5Gclose(grploc);
+
+    //! The unsteady flow is not considered here.
+    //int isUnsteady = parameters->GetIsUnsteady();
+}
+
+void NSSolverStruct::ReadRestartH5(ActionKey *actkey)
+{
+    int ifStartFromPerfectGasResults = GlobalDataBase::GetIntParaFromDB("ifStartFromPerfectGasResults");
+    int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    if (nChemical && ifStartFromPerfectGasResults)
+    {
+        ReadPrefectGasRestartH5(actkey);
+        return;
+    }
+
+    int nContinueModel = 0;
+    if (GlobalDataBase::IsExist("nContinueModel", PHINT, 1))
+    {
+        nContinueModel = GlobalDataBase::GetIntParaFromDB("nContinueModel");
+    }
+    if (nContinueModel == 1)
+    {
+        ReadRestartFlowH5(actkey);
+        return;
+    }
+
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    StructGrid *strGrid = StructGridCast(GetGrid(actkey->level));
+    int nTotalCell = strGrid->GetNTotalCell();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isWennScheme= parameters->GetWennSchemeFlag();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    if (isWennScheme == 1)
+    {
+        strGrid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, THREE_GHOST_LAYER);
+    }
+
+    int nEquation = GetNumberOfEquations();
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    int outIterStep = 0;
+    ReadData(actkey->filepos, &outIterStep, "outnstep");
+    GlobalDataBase::UpdateData("outnstep", &outIterStep, PHINT, 1);
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    int nTotalCellRestart = 0;
+    ReadData(grploc, &nTotalCellRestart, "nTotalCell");
+    if (nTotalCellRestart != nTotalCell)
+    {
+        ostringstream erroeInfo;
+        erroeInfo << " Error: the cell number in flow.dat is not equal to the cell number in grid file !" << endl;
+        TK_Exit::ExceptionExit(erroeInfo.str());
+    }
+
+    //! Read the flowfield data.
+    ReadData(grploc, &primitiveVariables(iCellStart, jCellStart, kCellStart, mst), "q");
+
+    //! add the data for surface info.
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble preWallTemperature = wallTemperature, preCatalyticCoef = catalyticCoef;
+    int preChemical = nChemical, preTemperatureModel = nTemperatureModel, preSpeciesNumber = numberOfSpecies;
+
+    if (CheckDataExist(grploc, "surfaceTemperatureFlag"))
+    {
+        ReadData(grploc, &preWallTemperature, "surfaceTemperatureFlag");
+    }
+    if (CheckDataExist(grploc, "catalyticCoefFlag"))
+    {
+        ReadData(grploc, &preCatalyticCoef, "catalyticCoefFlag");
+    }
+    if (CheckDataExist(grploc, "nIsChemicalFlow"))
+    {
+        ReadData(grploc, &preChemical, "nIsChemicalFlow");
+    }
+    if (CheckDataExist(grploc, "numberOfSpecies"))
+    {
+        ReadData(grploc, &preSpeciesNumber, "numberOfSpecies");
+    }
+    if (CheckDataExist(grploc, "nTemperatureModel"))
+    {
+        ReadData(grploc, &preTemperatureModel, "nTemperatureModel");
+    }
+
+    //! Read temperatures.
+    //if (nChemical > 0)
+    //{
+    if (CheckDataExist(grploc, "t"))
+    {
+        ReadData(grploc, &temperatures(iCellStart, jCellStart, kCellStart, mst), "t");
+    }
+    //}
+    if (nWallBC > 0)    //! The wall boundary condition exists.
+    {
+        //! Write the temperature on wall.
+        RDouble2D &temperatureWall = *reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+        if (CheckDataExist(grploc, "surfaceTemperature"))
+        {
+            ReadData(grploc, &temperatureWall(0, 0), "surfaceTemperature");
+            if (wallTemperature != preWallTemperature)
+            {
+                ChangeSurfaceTemperature(grid);
+            }
+        }
+
+        //! Write the mass fractions of species on wall.
+        if (nChemical > 0 && numberOfSpecies > 0)
+        {
+            RDouble3D &surfaceMassFraction = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+            if (CheckDataExist(grploc, "surfaceMassFraction"))
+            {
+                ReadData(grploc, &surfaceMassFraction(0, 0, 0), "surfaceMassFraction");
+            }
+
+            if (catalyticCoef != preCatalyticCoef)
+            {
+                ChangeSurfaceMassFractions(grid);
+            }
+        }
+    }
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    if (nSlipBCModel > 0 && nWallBC > 0)
+    {
+        RDouble3D &surfaceParameterSlip = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+        if (CheckDataExist(grploc, "surfaceSlipVariables"))
+        {
+            ReadData(grploc, &surfaceParameterSlip(0, 0, 0), "surfaceSlipVariables");
+        }
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+        for (int m = mst; m <= med; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        residual(i, j, k, m) = 0.0;
+                    }
+                }
+            }
+        }
+
+        H5Gclose(grploc);
+        return;
+    }
+
+    RDouble4D &qn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble4D &qn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &residualn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble4D &residualn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+    RDouble4D &qAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage"));
+    RDouble4D &tauAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("tauAverage"));
+    RDouble4D &q2Average = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q2Average"));
+
+    int ifStartFromSteadyResults = parameters->GetIfStartFromSteadyResults();
+    RDouble physicalTime = 0.0;
+
+    if (ifStartFromSteadyResults)
+    {
+        if (grid->GetGridID()->GetIndex() == 0)
+        {
+            PrintToWindow("Restart from steady NS flow field, reset outer step to be zero!\n");
+        }
+
+        //! Start from steady flow field.
+        //! Reset the outer step when start from steady flow.
+        outIterStep = 0;
+        GlobalDataBase::UpdateData("outnstep", &outIterStep, PHINT, 1);
+
+        qn1 = primitiveVariables;
+        qn2 = primitiveVariables;
+
+        residual = 0.0;
+        residualn1 = 0.0;
+        residualn2 = 0.0;
+    }
+    else
+    {
+        ReadData(actkey->filepos, &physicalTime, "physicalTime");
+
+        ReadData(grploc, &qn1(iCellStart, jCellStart, kCellStart, mst), "q_unsteady_n1");
+        ReadData(grploc, &qn2(iCellStart, jCellStart, kCellStart, mst), "q_unsteady_n2");
+        ReadData(grploc, &residual(iCellStart, jCellStart, kCellStart, mst), "res");
+        ReadData(grploc, &residualn1(iCellStart, jCellStart, kCellStart, mst), "res_unsteady_n1");
+        ReadData(grploc, &residualn2(iCellStart, jCellStart, kCellStart, mst), "res_unsteady_n2");
+    }
+
+    int nStatisticalStep = 0;
+
+    if (IsNeedStatistics())
+    {
+        if (ifStartFromSteadyResults)
+        {
+            qAverage = primitiveVariables;
+        }
+        else
+        {
+            ReadData(grploc, &qAverage(iCellStart, jCellStart, kCellStart, mst), "qAverage");
+
+            ReadData(actkey->filepos, &nStatisticalStep, "nStatisticalStep");
+        }
+    }
+
+    if (IsNeedReynoldsStressStatistics())
+    {
+        if (ifStartFromSteadyResults)
+        {
+            tauAverage = 0.0;
+
+            q2Average = 0.0;
+        }
+        else
+        {
+            ReadData(grploc, &tauAverage(iCellStart, jCellStart, kCellStart, 0), "tauAverage");
+
+            ReadData(grploc, &q2Average(iCellStart, jCellStart, kCellStart, 0), "q2Average");
+        }
+    }
+
+    GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+
+    GlobalDataBase::UpdateData("physicalTime", &physicalTime, PHDOUBLE, 1);
+
+    H5Gclose(grploc);
+}
+
+void NSSolverStruct::ReadRestart(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nEquation = GetNumberOfEquations();
+
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    DataContainer *restartData = actkey->GetData();
+    restartData->moveto_begin();
+
+    int outputStepInterval = 0;
+    restartData->read(&outputStepInterval, sizeof(int));
+    GlobalDataBase::UpdateData("outnstep", &outputStepInterval, PHINT, 1);
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    restartData->read(&q(i, j, k, m), sizeof(RDouble));
+                }
+            }
+        }
+    }
+
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    if (nChemical == 1)
+    {
+        for (int m = 0; m < nTemperatureModel; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        restartData->read(&temperatures(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+        for (int m = mst; m <= med; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        residual(i, j, k, m) = 0.0;
+                    }
+                }
+            }
+        }
+        return;
+    }
+
+    RDouble4D &qn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble4D &qn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &residualn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble4D &residualn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+
+    int ifStartFromSteadyResults = parameters->GetIfStartFromSteadyResults();
+
+    RDouble physicalTime = 0.0;
+
+    if (ifStartFromSteadyResults)
+    {
+        if (grid->GetGridID()->GetIndex() == 0)
+        {
+            PrintToWindow("Restart from steady NS flow field, reset outer step to be zero!\n");
+        }
+
+        //! Start from steady flow field.
+        //! Reset the outer step when start from steady flow.
+        outputStepInterval = 0;
+        GlobalDataBase::UpdateData("outnstep", &outputStepInterval, PHINT, 1);
+
+        qn1 = q;
+        qn2 = q;
+
+        residual = 0.0;
+        residualn1 = 0.0;
+        residualn2 = 0.0;
+    }
+    else
+    {
+        //! Start from unsteady flow field.
+        restartData->read(&physicalTime, sizeof(RDouble));
+
+        for (int m = mst; m <= med; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        restartData->read(&qn1(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+
+        for (int m = mst; m <= med; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        restartData->read(&qn2(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+
+        for (int m = mst; m <= med; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        restartData->read(&residual(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+
+        for (int m = mst; m <= med; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        restartData->read(&residualn1(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+
+        for (int m = mst; m <= med; ++ m)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        restartData->read(&residualn2(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+    }
+
+    GlobalDataBase::UpdateData("physicalTime", &physicalTime, PHDOUBLE, 1);
+}
+
+void NSSolverStruct::AirForceCoef(ActionKey *actkey)
+{
+    const int ALL_PART = -1;
+    AirForceCoefParts(actkey, ALL_PART);
+
+    int coordinate = LocalCoordinate;
+    uint_t nTotalBC = GlobalBoundaryCondition::GetNumberOfBC();
+    for (int iPart = 0; iPart < nTotalBC; ++ iPart)
+    {
+        if ((!GlobalBoundaryCondition::IsSolidWallBC(iPart)) && ((GlobalBoundaryCondition::GetBC(iPart)->GetBCType() != PHENGLEI::ABLATION_SURFACE)))
+        {
+            continue;
+        }
+
+        //! Compute local part force.
+        AirForceCoefParts(actkey, iPart, coordinate);
+
+        //! Compute global part force.
+        AirForceCoefParts(actkey, iPart);
+    }
+}
+
+void NSSolverStruct::AirForceCoefParts(ActionKey *actkey, int partID, int coordinate)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int viscousType = parameters->GetViscousType();
+
+    const int ALL_PART = -1;
+    SimpleBC *boundaryCondition = NULL;
+    string partBCName = "";
+    RDouble TorqueRefX = 0.0, TorqueRefY = 0.0, TorqueRefZ = 0.0;
+
+    //! Compute hinge moment.
+    int dumpHingeMoment = 0;
+    RDouble localCoordAxis0[3] = { 0 };
+    RDouble localCoordAxis1[3] = { 0 };
+
+    if (partID == ALL_PART)
+    {
+        TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+        TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+        TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+    }
+    else if ((partID != ALL_PART) && (coordinate == GlobalCoordinate))
+    {
+        boundaryCondition = GlobalBoundaryCondition::GetBC(partID);
+        partBCName = boundaryCondition->GetBCName();
+
+        TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+        TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+        TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+    }
+    else if ((partID != ALL_PART) && (coordinate == LocalCoordinate))
+    {
+        boundaryCondition = GlobalBoundaryCondition::GetBC(partID);
+        partBCName = boundaryCondition->GetBCName();
+        boundaryCondition->GetParamData("TorqueRefX", &TorqueRefX, PHDOUBLE, 1);
+        boundaryCondition->GetParamData("TorqueRefY", &TorqueRefY, PHDOUBLE, 1);
+        boundaryCondition->GetParamData("TorqueRefZ", &TorqueRefZ, PHDOUBLE, 1);
+       
+
+        boundaryCondition->GetParamData("dumpHingeMoment", &dumpHingeMoment, PHINT, 1);
+        boundaryCondition->GetParamData("localCoordAxis0", localCoordAxis0, PHDOUBLE, 3);
+        boundaryCondition->GetParamData("localCoordAxis1", localCoordAxis1, PHDOUBLE, 3);
+    }
+
+    using namespace IDX;
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    RDouble pressureFarfield = primitiveVarFarfield[IP];
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+    RDouble3D &vol = *(grid->GetCellVolume());
+
+    RDouble cpx = 0.0;
+    RDouble cpy = 0.0;
+    RDouble cpz = 0.0;
+    RDouble hingeMoment = 0.0;
+
+    RDouble CA_f = 0.0;
+    RDouble CA_p = 0.0;
+    RDouble CN_f = 0.0;
+    RDouble CN_p = 0.0;
+    RDouble CZ_f = 0.0;
+    RDouble CZ_p = 0.0;
+    RDouble Cl_f = 0.0;
+    RDouble Cl_p = 0.0;
+    RDouble Cn_f = 0.0;
+    RDouble Cn_p = 0.0;
+    RDouble Cm_f = 0.0;
+    RDouble Cm_p = 0.0;
+
+    int ndim = GetDim();
+
+    using namespace IDX;
+
+    int ix = 0;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcRegion = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = bcRegion->GetBCType();
+
+        int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+        bcRegion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        bool isNeedComputeAirForce = (BCType == PHENGLEI::SOLID_SURFACE || BCType == PHENGLEI::ABLATION_SURFACE);
+        if (isNeedComputeAirForce && partID != ALL_PART)
+        {
+            const string &bcName = bcRegion->GetBCName();
+            isNeedComputeAirForce = isNeedComputeAirForce && (bcName == partBCName);
+        }
+
+        if (!isNeedComputeAirForce)
+        {
+            ix += (ied - ist + 1) * (jed - jst + 1) * (ked - kst + 1);
+            continue;
+        }
+
+        int *s_lr3d = bcRegion->GetFaceDirectionIndex();
+        int nSurface = bcRegion->GetFaceDirection() + 1;
+        int leftOrRightIndex = bcRegion->GetFaceLeftOrRightIndex();
+
+        int iWall = 0, jWall = 0, kWall = 0;
+
+        RDouble dfx = 0, dfy = 0, dfz = 0, dpx = 0, dpy = 0, dpz = 0;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! i, j, k - is first cell index near SOLID_SURFACE.
+                    bcRegion->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                    //! The surface direction of SOLID_SURFACE.
+                    RDouble nx = leftOrRightIndex * xfv(iWall, jWall, kWall, nSurface);
+                    RDouble ny = leftOrRightIndex * yfv(iWall, jWall, kWall, nSurface);
+                    RDouble nz = leftOrRightIndex * zfv(iWall, jWall, kWall, nSurface);
+
+                    //! The index of  first ghost cell layer near SOLID_SURFACE.
+                    int iCellGhostLayer = i + s_lr3d[0];
+                    int jCellGhostLayer = j + s_lr3d[1];
+                    int kCellGhostLayer = k + s_lr3d[2];
+
+                    RDouble pCellfirstLayer = primitiveVars(i, j, k, IP);
+
+                    RDouble pressureWall = pCellfirstLayer;
+                    RDouble pressureCoef = two * (pressureWall - pressureFarfield);
+
+                    dpx = nx * pressureCoef;
+                    dpy = ny * pressureCoef;
+                    dpz = nz * pressureCoef;
+
+                    CA_p += dpx;
+                    CN_p += dpy;
+                    CZ_p += dpz;
+
+                    dfx = dpx;
+                    dfy = dpy;
+                    dfz = dpz;
+
+                    RDouble xc = 0, yc = 0, zc = 0;
+                    grid->FaceCoor(iWall, jWall, kWall, nSurface, xc, yc, zc);
+
+                    RDouble visLaminar = 0, visTurbulence = 0;
+                    RDouble dudx = 0, dudy = 0, dudz = 0, dvdx = 0, dvdy = 0, dvdz = 0, dwdx = 0, dwdy = 0, dwdz = 0;
+                    if (viscousType > INVISCID)
+                    {
+                        Geometry3D *geometry3D = new Geometry3D;
+
+                        if (nSurface == 1)
+                        {
+                            //! Get i-th face vector on the wall surface.
+                            Get_GEO_I(i, j, k, iWall, iWall, ndim, geometry3D, xfv, yfv, zfv, vol);
+                            //! Get derivative to the wall in i-direction of u,v,w.
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, ndim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, ndim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, ndim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(iCellGhostLayer, j, k));
+                            visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(iCellGhostLayer, j, k));
+                        }
+                        else if (nSurface == 2)
+                        {
+                            //! Get j-th face vector on the wall surface.
+                            Get_GEO_J(i, j, k, jWall, jWall, ndim, geometry3D, xfv, yfv, zfv, vol);
+                            //! Get derivative to the wall in j-direction of u,v,w.
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, ndim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, ndim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, ndim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, jCellGhostLayer, k));
+                            visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, jCellGhostLayer, k));
+                        }
+                        else
+                        {
+                            //! Get k-th face vector on the wall surface.
+                            Get_GEO_K(i, j, k, kWall, kWall, geometry3D, xfv, yfv, zfv, vol);
+                            //! Get derivative to the wall in k-direction of u,v,w.
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, j, kCellGhostLayer));
+                            visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, j, kCellGhostLayer));
+                        }
+
+                        //! It is unnecessary to consider because the turbulence viscosity coefficient is 0.
+                        //visTurbulence = 0.0;
+                        RDouble viscousCoef = visLaminar + visTurbulence;
+
+                        RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+                        //! Stress components.
+                        RDouble txx = viscousCoef * (two * dudx - divv2p3);
+                        RDouble tyy = viscousCoef * (two * dvdy - divv2p3);
+                        RDouble tzz = viscousCoef * (two * dwdz - divv2p3);
+                        RDouble txy = viscousCoef * (dudy + dvdx);
+                        RDouble txz = viscousCoef * (dudz + dwdx);
+                        RDouble tyz = viscousCoef * (dvdz + dwdy);
+
+                        RDouble fvsx = -two * (nx * txx + ny * txy + nz * txz) * oRefReNumber;
+                        RDouble fvsy = -two * (nx * txy + ny * tyy + nz * tyz) * oRefReNumber;
+                        RDouble fvsz = -two * (nx * txz + ny * tyz + nz * tzz) * oRefReNumber;
+
+                        dfx += fvsx;
+                        dfy += fvsy;
+                        dfz += fvsz;
+
+                        CA_f += fvsx;
+                        CN_f += fvsy;
+                        CZ_f += fvsz;
+
+                        Cl_f += (yc - TorqueRefY) * fvsz - (zc - TorqueRefZ) * fvsy;
+                        Cn_f += (zc - TorqueRefZ) * fvsx - (xc - TorqueRefX) * fvsz;
+                        Cm_f += (xc - TorqueRefX) * fvsy - (yc - TorqueRefY) * fvsx;
+
+                        delete geometry3D;
+                    }
+
+                    Cl_p += (yc - TorqueRefY) * dpz - (zc - TorqueRefZ) * dpy;
+                    Cn_p += (zc - TorqueRefZ) * dpx - (xc - TorqueRefX) * dpz;
+                    Cm_p += (xc - TorqueRefX) * dpy - (yc - TorqueRefY) * dpx;
+
+                    cpx += dpx;
+                    cpy += dpy;
+                    cpz += dpz;
+
+                    if (dumpHingeMoment)
+                    {
+                        Post_ForceMoment forceMoment;
+                        RDouble point[3] = { xc, yc, zc };
+                        RDouble faceForce[3] = { dfx, dfy, dfz };
+                        hingeMoment += forceMoment.ComputeMoment(point, localCoordAxis0, localCoordAxis1, faceForce);
+                    }
+
+                    ++ ix;
+                }
+            }
+        }
+    }
+
+    DataContainer *aerodynamicForceData = actkey->GetData();
+
+    aerodynamicForceData->write(&CA_f, sizeof(RDouble));
+    aerodynamicForceData->write(&CA_p, sizeof(RDouble));
+    aerodynamicForceData->write(&CN_f, sizeof(RDouble));
+    aerodynamicForceData->write(&CN_p, sizeof(RDouble));
+    aerodynamicForceData->write(&CZ_f, sizeof(RDouble));
+    aerodynamicForceData->write(&CZ_p, sizeof(RDouble));
+
+    aerodynamicForceData->write(&cpx, sizeof(RDouble));
+    aerodynamicForceData->write(&cpy, sizeof(RDouble));
+    aerodynamicForceData->write(&cpz, sizeof(RDouble));
+
+    aerodynamicForceData->write(&Cl_f, sizeof(RDouble));
+    aerodynamicForceData->write(&Cl_p, sizeof(RDouble));
+    aerodynamicForceData->write(&Cn_f, sizeof(RDouble));
+    aerodynamicForceData->write(&Cn_p, sizeof(RDouble));
+    aerodynamicForceData->write(&Cm_f, sizeof(RDouble));
+    aerodynamicForceData->write(&Cm_p, sizeof(RDouble));
+
+    aerodynamicForceData->write(&hingeMoment, sizeof(RDouble));
+}
+
+void NSSolverStruct::AirForceCoefBodies(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    RDouble4D &faceVelocityX = *reinterpret_cast <RDouble4D *> (grid->GetFaceVelocityX());
+    RDouble4D &faceVelocityY = *reinterpret_cast <RDouble4D *> (grid->GetFaceVelocityY());
+    RDouble4D &faceVelocityZ = *reinterpret_cast <RDouble4D *> (grid->GetFaceVelocityZ());
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int viscousType = parameters->GetViscousType();
+
+    RDouble TorqueRefXGlobal = 0.0, TorqueRefYGlobal = 0.0, TorqueRefZGlobal = 0.0;
+
+    TorqueRefXGlobal = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+    TorqueRefYGlobal = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+    TorqueRefZGlobal = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+
+    //! Compute hinge moment.
+    using namespace IDX;
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    RDouble pressureFarfield = primitiveVarFarfield[IP];
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+    RDouble3D &vol = *(grid->GetCellVolume());
+
+    int ndim = GetDim();
+
+    using namespace IDX;
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    int isAle = parameters->GetIsCodeOfAleModel();
+
+    int numberOfMovingBodies = GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+    vector< BasicAerodynamicForce * > *basicAerodynamicForceVector = CreateBasicAerodynamicForceVector();
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    for (int iBody = 0; iBody < numberOfMovingBodies; ++ iBody)
+    {
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            StructBC *bcRegion = structBCSet->GetBCRegion(iBCRegion);
+            int BCType = bcRegion->GetBCType();
+            bool isNeedComputeAirForce = (BCType == PHENGLEI::SOLID_SURFACE || BCType == PHENGLEI::ABLATION_SURFACE);
+            if (!isNeedComputeAirForce)
+            {
+                continue;
+            }
+
+            string bodyName = bcRegion->GetBodyName();
+            if (FaceInAerodynamicForceBodies(bodyName, iBody))
+            {
+                int ist, ied, jst, jed, kst, ked;
+                bcRegion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+                int nSurface = bcRegion->GetFaceDirection() + 1;
+                int leftOrRightIndex = bcRegion->GetFaceLeftOrRightIndex();
+
+                int iWall, jWall, kWall;
+                int iCellGhostLayer, jCellGhostLayer, kCellGhostLayer;
+
+                RDouble dfx, dfy, dfz, dpx, dpy, dpz;
+
+                for (int k = kst; k <= ked; ++ k)
+                {
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        for (int i = ist; i <= ied; ++ i)
+                        {
+                            BasicAerodynamicForce aerodynamicForceGlobal;
+                            aerodynamicForceGlobal.SetMomentReferencePoint(TorqueRefXGlobal, TorqueRefYGlobal, TorqueRefZGlobal);
+                            //! i, j, k - is first face index near SOLID_SURFACE.
+                            bcRegion->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                            //! The index of  first ghost cell layer near SOLID_SURFACE.
+                            bcRegion->GetGhostCellIndex(i, j, k, iCellGhostLayer, jCellGhostLayer, kCellGhostLayer, 1);
+
+                            //! The surface direction of SOLID_SURFACE.
+                            RDouble nx = leftOrRightIndex * xfv(iWall, jWall, kWall, nSurface);
+                            RDouble ny = leftOrRightIndex * yfv(iWall, jWall, kWall, nSurface);
+                            RDouble nz = leftOrRightIndex * zfv(iWall, jWall, kWall, nSurface);
+
+                            RDouble pCellfirstLayer = primitiveVars(i, j, k, IP);
+
+                            RDouble pressureWall = pCellfirstLayer;
+                            RDouble pressureCoef = two * (pressureWall - pressureFarfield);
+
+                            dpx = nx * pressureCoef;
+                            dpy = ny * pressureCoef;
+                            dpz = nz * pressureCoef;
+
+                            if (isUnsteady && isAle)
+                            {
+                                RDouble rhoWall = half * (primitiveVars(i, j, k, IR) + primitiveVars(iCellGhostLayer, jCellGhostLayer, kCellGhostLayer, IR));
+                                RDouble uWall = half * (primitiveVars(i, j, k, IU) + primitiveVars(iCellGhostLayer, jCellGhostLayer, kCellGhostLayer, IU));
+                                RDouble vWall = half * (primitiveVars(i, j, k, IV) + primitiveVars(iCellGhostLayer, jCellGhostLayer, kCellGhostLayer, IV));
+                                RDouble wWall = half * (primitiveVars(i, j, k, IW) + primitiveVars(iCellGhostLayer, jCellGhostLayer, kCellGhostLayer, IW));
+
+                                RDouble uGrid = faceVelocityX(iWall, jWall, kWall, nSurface);
+                                RDouble vGrid = faceVelocityY(iWall, jWall, kWall, nSurface);
+                                RDouble wGrid = faceVelocityZ(iWall, jWall, kWall, nSurface);
+
+                                RDouble gridVelocity = 2.0 * (uGrid * nx + vGrid * ny + wGrid * nz);
+
+                                dpx += rhoWall * uWall * gridVelocity;
+                                dpy += rhoWall * vWall * gridVelocity;
+                                dpz += rhoWall * wWall * gridVelocity;
+                            }
+
+                            aerodynamicForceGlobal.SetPressureAerodynamicForce(dpx, dpy, dpz);
+
+                            dfx = dpx;
+                            dfy = dpy;
+                            dfz = dpz;
+
+                            RDouble xc, yc, zc;
+                            grid->FaceCoor(iWall, jWall, kWall, nSurface, xc, yc, zc);
+
+                            aerodynamicForceGlobal.SetPressureAerodynamicMoment(xc, yc, zc);
+
+                            RDouble dudx = 0.0, dudy = 0.0, dudz = 0.0;
+                            RDouble dvdx = 0.0, dvdy = 0.0, dvdz = 0.0;
+                            RDouble dwdx = 0.0, dwdy = 0.0, dwdz = 0.0;
+                            RDouble visLaminar = 0.0, visTurbulence = 0.0;
+                            if (viscousType > INVISCID)
+                            {
+                                Geometry3D *geometry3D = new Geometry3D;
+
+                                if (nSurface == 1)
+                                {
+                                    //! Get i-th face vector on the wall surface.
+                                    Get_GEO_I(i, j, k, iWall, iWall, ndim, geometry3D, xfv, yfv, zfv, vol);
+                                    //! Get derivative to the wall in i-direction of u,v,w.
+                                    DXDYDZ_I(primitiveVars, geometry3D, i, j, k, ndim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                                    DXDYDZ_I(primitiveVars, geometry3D, i, j, k, ndim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                                    DXDYDZ_I(primitiveVars, geometry3D, i, j, k, ndim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                                    visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(iCellGhostLayer, j, k));
+                                    visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(iCellGhostLayer, j, k));
+                                }
+                                else if (nSurface == 2)
+                                {
+                                    //! Get j-th face vector on the wall surface.
+                                    Get_GEO_J(i, j, k, jWall, jWall, ndim, geometry3D, xfv, yfv, zfv, vol);
+                                    //! Get derivative to the wall in j-direction of u,v,w.
+                                    DXDYDZ_J(primitiveVars, geometry3D, i, j, k, ndim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                                    DXDYDZ_J(primitiveVars, geometry3D, i, j, k, ndim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                                    DXDYDZ_J(primitiveVars, geometry3D, i, j, k, ndim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                                    visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, jCellGhostLayer, k));
+                                    visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, jCellGhostLayer, k));
+                                }
+                                else
+                                {
+                                    //! Get k-th face vector on the wall surface.
+                                    Get_GEO_K(i, j, k, kWall, kWall, geometry3D, xfv, yfv, zfv, vol);
+                                    //! Get derivative to the wall in k-direction of u,v,w.
+                                    DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IU, dudx, dudy, dudz, leftOrRightIndex);
+                                    DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                                    DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                                    visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, j, kCellGhostLayer));
+                                    visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, j, kCellGhostLayer));
+                                }
+
+                                //! It is unnecessary to consider because the turbulence viscosity coefficient is 0.
+                                //visTurbulence = 0.0;
+                                RDouble viscousCoef = visLaminar + visTurbulence;
+
+                                RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+                                //! Stress components.
+                                RDouble txx = viscousCoef * (two * dudx - divv2p3);
+                                RDouble tyy = viscousCoef * (two * dvdy - divv2p3);
+                                RDouble tzz = viscousCoef * (two * dwdz - divv2p3);
+                                RDouble txy = viscousCoef * (dudy + dvdx);
+                                RDouble txz = viscousCoef * (dudz + dwdx);
+                                RDouble tyz = viscousCoef * (dvdz + dwdy);
+
+                                RDouble fvsx = -two * (nx * txx + ny * txy + nz * txz) * oRefReNumber;
+                                RDouble fvsy = -two * (nx * txy + ny * tyy + nz * tyz) * oRefReNumber;
+                                RDouble fvsz = -two * (nx * txz + ny * tyz + nz * tzz) * oRefReNumber;
+
+                                aerodynamicForceGlobal.SetViscousAerodynamicForce(fvsx, fvsy, fvsz);
+
+                                aerodynamicForceGlobal.SetViscousAerodynamicMoment(xc, yc, zc);
+
+                                delete geometry3D;
+
+                                aerodynamicForceGlobal.ComputeResultantAerodynamicForce();
+
+                                aerodynamicForceGlobal.ComputeResultantAerodynamicMoment();
+
+                                (*basicAerodynamicForceVector)[iBody]->AddAerodynamicForce(&aerodynamicForceGlobal);
+                            }
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    PHSPACE::WriteAerodynamicForceToActionKey(actkey, basicAerodynamicForceVector);
+    PHSPACE::FreeBasicAerodynamicForceVector(basicAerodynamicForceVector);
+}
+
+//! Write the variables of Cp, Cf, Qw, y+ etc. on surface to the file.
+void NSSolverStruct::CpDistriCoef(ActionKey *actkey)
+{
+    int level = actkey->level;
+    DataContainer *wallDistributeData = actkey->GetData();
+    wallDistributeData->moveto_begin();
+
+    StructGrid *grid = StructGridCast(GetGrid(level));
+
+    int oriGridIndex = grid->GetOrdinaryGridIndex();
+    PHWrite(wallDistributeData, oriGridIndex);
+
+    int GridID = grid->GetGridID()->GetIndex();
+    PHWrite(wallDistributeData, GridID);
+
+    if (level != 0) return;
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperature = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    RDouble refGama = parameters->GetRefGama();
+
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    int viscousType = parameters->GetViscousType();
+
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    using namespace IDX;
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    RDouble pressureFarfield = primitiveVarFarfield[IP];
+
+    RDouble4D &heatTransferCoeff = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("heatTransferCoeff"));
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+    RDouble4D &faceArea = *(grid->GetFaceArea());
+    RDouble3D &cellVolume = *(grid->GetCellVolume());
+
+    RDouble3D &xx = *grid->GetStructX();
+    RDouble3D &yy = *grid->GetStructY();
+    RDouble3D &zz = *grid->GetStructZ();
+
+    Int3D &cellType = *grid->GetCellBoundaryType();
+
+    int nsolid_surface = grid->GetNumberOfWallCell();
+
+    if (nsolid_surface == 0)
+    {
+        return;
+    }
+
+    RDouble AoA = 0.0, attack = 0.0;
+    AoA = parameters->GetAoA();
+    attack = AoA * PI / 180.0;
+
+    RDouble sina = sin(attack);
+    RDouble cosa = cos(attack);
+
+    int nDim = GetDim();
+    int js = 1;
+    int ks = 1;
+    if (nDim == TWO_D)
+    {
+        ks = 0;
+    }
+
+    if (nDim == ONE_D)
+    {
+        js = 0;
+    }
+
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+
+    using namespace IDX;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    //! Obtain the number of boundary condition regions.
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    int coorCount, dataCount;
+
+    int TecioMission = 0;
+
+    //! Non-equilibrium Gas
+    //! The universal gas constant.
+    RDouble gasConstant = gas->GetUniversalGasConstant();
+    //! The type of catalytic wall condition.
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();
+    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble Twall = parameters->GetWallTemperature();    //! Temperature on wall.
+    RDouble referenceTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble2D *surfaceTemperature;
+    surfaceTemperature = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+    }
+    RDouble2D *firstLayerHeight = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("firstLayerHeight"));
+    int wallFunctionType = GlobalDataBase::GetIntParaFromDB("wallFunctionType");
+
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int wallMultiTemperature = parameters->GetWallMultiTemperature();
+
+    //! Allocate the dynamic memory space to save the primitive variables on wall.
+    int nEquation = numberOfSpecies + nNSEquation + nTemperatureModel - 1;
+    RDouble *wallVariables = new RDouble[nEquation];
+    RDouble nondimTwall = Twall / referenceTemperature;
+    RDouble wallTemperature[3] = { nondimTwall, nondimTwall, nondimTwall };
+    RDouble Qw = 0.0, Qtr = 0.0, Qs = 0.0, Qv = 0.0, Qe = 0.0, Pw = 0.0, Tw = 0.0, Rhow = 0.0, absVelocity = 0.0;
+    RDouble StantonNumber = 0.0, HeatCoef = 0.0, deltaT = 0.0, wallTotalEnthalpy = 0.0;
+
+    int nSurfGradMethod = parameters->GetSurfaceGradientMethod();
+    RDouble gradTx[3] = { 0.0, 0.0, 0.0 }, gradTy[3] = { 0.0, 0.0, 0.0 }, gradTz[3] = { 0.0, 0.0, 0.0 };
+    RDouble gradCx[MAX_SPECIES_NUM] = { 0.0 }, gradCy[MAX_SPECIES_NUM] = { 0.0 }, gradCz[MAX_SPECIES_NUM] = { 0.0 };
+
+    //! The mass fraction of oxygen and nitrogen under the fully catalytic condition.
+    RDouble speciesEnthalpy[MAX_SPECIES_NUM], densityDiffusivity[MAX_SPECIES_NUM];
+    string *speciesName;
+    RDouble3D *surfaceMassFraction = NULL;
+    if (nChemical > 0 && numberOfSpecies > 0)
+    {
+        speciesName = gas->GetNameOfSpecies();
+        surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+    }
+
+    int nRapidFlowfield = parameters->GetRapidFlowfieldMethod();
+    RDouble3D *surfacePressure = NULL;
+    if (nRapidFlowfield > 0)
+    {
+        surfacePressure = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfacePressure"));
+    }
+
+    //! To obtain the reference values.
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble refVelocity = refDimensionalSonicSpeed * refMachNumber;
+    RDouble refSquareVelocity = refVelocity * refVelocity;
+    RDouble refDynamicPressure = refDimensionalDensity * refSquareVelocity;
+    RDouble refEnergy = refDimensionalDensity * refVelocity * refSquareVelocity;
+    RDouble refHeatFluxDimension = refEnergy * 0.001; //! The dimensional value of total heat flux (kW/m2).
+    RDouble refTotalEnthalpy = gas->ComputeReferenceTotalEnthalpy();
+    RDouble refLenth = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+    FluidParameter refParam;
+    gas->GetReferenceParameters(refParam);
+    RDouble refVicosity = refParam.GetViscosity();
+    RDouble refDimensionalMolecular = refParam.GetAverageMolecularWeight();
+
+    int *visualVariablesType = postVisualWall->GetVisualVariablesType();
+    int nWallVariables = postVisualWall->GetVisualVariablesNumber();
+    int dataNumber = nWallVariables;
+    for (int m = 0; m < nWallVariables; ++ m)
+    {
+        if (visualVariablesType[m] == VISUAL_WALL_NS)
+        {
+            dataNumber += numberOfSpecies - 1;
+        }
+    }
+    RDouble knudsenNumber = 0.0, meanFreePath = 0.0, massReciprocal = 1.0;
+    RDouble knLength = parameters->GetCharacteristicLength();
+
+    Range M(0, dataNumber - 1);
+    RDouble visualVariables[50]; //! Store the values of variables.
+    //! the order of variables in the computational array, eg. 0 denotes the coefficient of pressure,
+    //! and the value of array indicates the index of the variable in the computation array.
+    int variablesOrder[50];
+    for (int m = 0; m < 50; ++ m)
+    {
+        variablesOrder[m] = m;
+    }
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int isWennScheme = parameters->GetWennSchemeFlag();
+    if (isWennScheme == 1)
+    {
+        GetRange(ni, nj, nk, -3, 2, I, J, K);
+    }
+
+    RDouble4D dataStore(I, J, K, M, fortranArray);
+    dataStore = 0.0;
+
+    int indexOfWall = 0, indexOfCell = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!IsWall(BCType) && BCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        Data_Param *bcParamDB = structBC->GetBCParamDataBase();
+        if (bcParamDB->IsExist("catalyticCoef", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("catalyticCoef", &catalyticCoef, PHDOUBLE, 1);
+        }
+
+        if (wallMultiTemperature == 1)
+        {
+
+            if (bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+            {
+                bcParamDB->GetData("wallTemperature", &Twall, PHDOUBLE, 1);
+            }
+            else
+            {
+                Twall = parameters->GetWallTemperature();
+            }
+            nondimTwall = Twall / referenceTemperature;
+            wallTemperature[0] = nondimTwall;
+            wallTemperature[1] = nondimTwall;
+            wallTemperature[2] = nondimTwall;
+        }
+
+        int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        //! Obtain the surface information.
+        int *s_lr3d = structBC->GetFaceDirectionIndex();
+        int nSurface = structBC->GetFaceDirection() + 1;
+        int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+
+        indexOfCell = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! i, j, k - is first CELL index near SOLID_SURFACE.
+                    //! iWall, jWall, kWall - is NODE index on SOLID_SURFACE.
+                    int iWall, jWall, kWall;
+                    structBC->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                    RDouble nx = leftOrRightIndex * xfv(iWall, jWall, kWall, nSurface);
+                    RDouble ny = leftOrRightIndex * yfv(iWall, jWall, kWall, nSurface);
+                    RDouble nz = leftOrRightIndex * zfv(iWall, jWall, kWall, nSurface);
+
+                    ////! Obtain the centroid of the surface.
+                    //RDouble xCenterWall, yCenterWall, zCenterWall;
+                    //grid->FaceCoor(iWall, jWall, kWall, nSurface, xCenterWall, yCenterWall, zCenterWall);
+                    ////! Obtain the centroid of the cell on the positive first layer.
+                    //RDouble xCellCenter, yCellCenter, zCellCenter;
+                    //grid->CenterCoor(i, j, k, xCellCenter, yCellCenter, zCellCenter);
+
+                    RDouble normalComponetX = leftOrRightIndex * faceNormalComponentX(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetY = leftOrRightIndex * faceNormalComponentY(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetZ = leftOrRightIndex * faceNormalComponentZ(iWall, jWall, kWall, nSurface);
+                    RDouble surfaceArea = faceArea(iWall, jWall, kWall, nSurface);
+
+                    //! The projection of the dy called the distance between the center of the cell and that of the surface on normal vector.
+                    //RDouble deltaHeight = fabs((xCellCenter - xCenterWall) * normalComponetX + (yCellCenter - yCenterWall) * normalComponetY + (zCellCenter - zCenterWall) * normalComponetZ);
+                    RDouble deltaHeight = (*firstLayerHeight)(indexOfWall, indexOfCell);
+
+                    //! The index of  first ghost cell layer near SOLID_SURFACE.
+                    int iCellGhostLayer = i + s_lr3d[0];
+                    int jCellGhostLayer = j + s_lr3d[1];
+                    int kCellGhostLayer = k + s_lr3d[2];
+
+                    RDouble pressureFirstCell = primitiveVars(i, j, k, IP);
+                    wallVariables[IP] = pressureFirstCell;
+                    //! Obtain temperature of solid on wall.
+                    if (Twall < 0.0) //Adabatic wall.
+                    {
+                        nondimTwall = temperature(i, j, k, mTT); //solid temperature.
+                    }
+                    else //Isothermal wall or radiation equilibrium temperature wall.
+                    {
+                        nondimTwall = (*surfaceTemperature)(indexOfWall, indexOfCell); //solid temperature.
+                    }
+
+                    //! To obtain the variables on wall.
+                    if (nSlipBCModel > 0)
+                    {
+                        //! Obtain temperature of flow on wall.
+                        for (int m = 0; m < 3; ++ m)
+                        {
+                            //flow temperature.
+                            wallTemperature[m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m);
+                            wallVariables[m + 1] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m + 3);
+                        }
+                        deltaT = wallTemperature[ITT] - nondimTwall;
+                    }
+                    else
+                    {
+                        if (viscousType > INVISCID)
+                        {
+                            wallVariables[IU] = 0.0;
+                            wallVariables[IV] = 0.0;
+                            wallVariables[IW] = 0.0;
+                        }
+                        else
+                        {
+                            //The velocity is used to extract the wall streamline, so this velocity is not the real velocity on wall.
+                            wallVariables[IU] = primitiveVars(i, j, k, IU);
+                            wallVariables[IV] = primitiveVars(i, j, k, IV);
+                            wallVariables[IW] = primitiveVars(i, j, k, IW);
+                        }
+
+                        deltaT = 0.0;
+                        //! Obtain temperature of flow on wall.
+                        if (Twall < 0.0) //Adabatic wall.
+                        {
+                            wallTemperature[ITT] = temperature(i, j, k, mTT);
+                            wallTemperature[ITV] = temperature(i, j, k, mTV);
+                            wallTemperature[ITE] = temperature(i, j, k, mTE);
+                        }
+                        else //Isothermal wall or radiation equilibrium temperature wall.
+                        {
+                            wallTemperature[ITT] = (*surfaceTemperature)(indexOfWall, indexOfCell);
+                            wallTemperature[ITV] = wallTemperature[ITT];
+                            wallTemperature[ITE] = wallTemperature[ITT];
+                        }
+                    }
+
+                    //! Compute the density on wall using the state equation.
+                    massReciprocal = 1.0;
+                    wallVariables[IR] = refGama * refMachNumber * refMachNumber * wallVariables[IP] / wallTemperature[ITT];
+                    if (nChemical >= 1)
+                    {
+                        //! To obtain the mass fraction on wall.
+                        if (ABS(catalyticCoef) <= EPSILON && BCType != PHENGLEI::ABLATION_SURFACE) // Fully non-catalytic wall.
+                        {
+                            for (int s = nNSEquation; s < numberOfSpecies + nNSEquation; ++ s)
+                            {
+                                wallVariables[s] = primitiveVars(i, j, k, s);
+                            }
+                        }
+                        else // Fully catalytic wall or finite catalytic wall.
+                        {
+                            for (int s = nNSEquation; s < numberOfSpecies + nNSEquation; ++ s)
+                            {
+                                wallVariables[s] = (*surfaceMassFraction)(indexOfWall, indexOfCell, s - nNSEquation);
+                            }
+                        }
+
+                        if (nTemperatureModel > 1)     //! Multi-Temperature model.
+                        {
+                            RDouble ceDivideMe = 0.0;
+                            massReciprocal = gas->ComputeMolecularWeightReciprocalWithoutElectron(wallVariables, ceDivideMe);
+                            wallVariables[IR] = wallVariables[IP] / (gasConstant * wallTemperature[ITT] * massReciprocal + gasConstant * wallTemperature[ITE] * ceDivideMe);
+                        }
+                        else         //! One-Temperature model.
+                        {
+                            //! Obtain molecular weight of the mixture gas.
+                            massReciprocal = gas->ComputeMolecularWeightReciprocal(wallVariables);
+                            wallVariables[IR] = wallVariables[IP] / (gasConstant * wallTemperature[ITT] * massReciprocal);
+                        }
+                    }
+
+                    //! The pressure on wall.
+                    Rhow = wallVariables[IR] * refDimensionalDensity;
+                    Pw = wallVariables[IP] * refDynamicPressure;
+                    Tw = nondimTwall * referenceTemperature;
+                    absVelocity = wallVariables[IU] * wallVariables[IU] + wallVariables[IV] * wallVariables[IV] + wallVariables[IW] * wallVariables[IW];
+
+                    wallTotalEnthalpy = 0.0;
+                    gas->ComputeEnthalpyByPrimitive(wallVariables, refGama, wallTotalEnthalpy, wallTemperature);
+                    wallTotalEnthalpy += 0.5 * absVelocity;
+                    absVelocity = sqrt(absVelocity) * refVelocity;
+                    wallTotalEnthalpy = wallTotalEnthalpy * refSquareVelocity;
+
+                    //! Pressure drag.
+                    RDouble pressureWall = pressureFirstCell;
+                    RDouble pressCoef = two * (pressureWall - pressureFarfield);
+
+                    RDouble dpx = nx * pressCoef;
+                    RDouble dpy = ny * pressCoef;
+                    RDouble dpz = nz * pressCoef;
+
+                    RDouble dfx = dpx;
+                    RDouble dfy = dpy;
+                    RDouble dfz = dpz;
+
+                    RDouble fvsx = 0.0;
+                    RDouble fvsy = 0.0;
+                    RDouble fvsz = 0.0;
+
+                    RDouble heatFlux = zero;
+                    RDouble viscousCoef;
+
+                    RDouble dudx, dudy, dudz, dvdx, dvdy, dvdz, dwdx, dwdy, dwdz;
+                    RDouble dtdx, dtdy, dtdz;
+                    RDouble visLaminar = 0.0, visTurbulence = 0.0;
+                    RDouble heatCoeff = 0.0;
+                    if (viscousType > INVISCID)
+                    {
+                        Geometry3D *geometry3D = new Geometry3D;
+
+                        if (nSurface == 1)
+                        {
+                            //! Get i-th face vector on the wall surface.
+                            Get_GEO_I(i, j, k, iWall, iWall, nDim, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in i-direction of u,v,w,T.
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            //DXDYDZ_I(temperature, geometry3D, i, j, k, nDim, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            for (int m = 0; m < nTemperatureModel; ++ m)
+                            {
+                                DXDYDZ_I(temperature, geometry3D, i, j, k, nDim, m, gradTx[m], gradTy[m], gradTz[m], leftOrRightIndex);
+                            }
+                            for (int m = 0; m < numberOfSpecies; ++ m)
+                            {
+                                DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, m + nNSEquation, gradCx[m], gradCy[m], gradCz[m], leftOrRightIndex);
+                            }
+
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(iCellGhostLayer, j, k));
+                            visTurbulence = 0.0;
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(iCellGhostLayer, j, k));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(iCellGhostLayer, j, k, ITT);
+                            }
+                        }
+                        else if (nSurface == 2)
+                        {
+                            //! Get j-th face vector on the wall surface;.
+                            Get_GEO_J(i, j, k, jWall, jWall, nDim, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in j-direction of u,v,w,T.
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            //DXDYDZ_J(temperature, geometry3D, i, j, k, nDim, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            for (int m = 0; m < nTemperatureModel; ++ m)
+                            {
+                                DXDYDZ_J(temperature, geometry3D, i, j, k, nDim, m, gradTx[m], gradTy[m], gradTz[m], leftOrRightIndex);
+                            }
+                            for (int m = 0; m < numberOfSpecies; ++ m)
+                            {
+                                DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, m + nNSEquation, gradCx[m], gradCy[m], gradCz[m], leftOrRightIndex);
+                            }
+
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, jCellGhostLayer, k));
+                            visTurbulence = 0.0;
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, jCellGhostLayer, k));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(i, jCellGhostLayer, k, ITT);
+                            }
+                        }
+                        else
+                        {
+                            //! Get k-th face vector on the wall surface.
+                            Get_GEO_K(i, j, k, kWall, kWall, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in k-direction of u,v,w,T.
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            //DXDYDZ_K(temperature, geometry3D, i, j, k, nDim, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            for (int m = 0; m < nTemperatureModel; ++ m)
+                            {
+                                DXDYDZ_K(temperature, geometry3D, i, j, k, m, gradTx[m], gradTy[m], gradTz[m], leftOrRightIndex);
+                            }
+                            for (int m = 0; m < numberOfSpecies; ++ m)
+                            {
+                                DXDYDZ_K(primitiveVars, geometry3D, i, j, k, m + nNSEquation, gradCx[m], gradCy[m], gradCz[m], leftOrRightIndex);
+                            }
+
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, j, kCellGhostLayer));
+                            visTurbulence = 0.0;
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, j, kCellGhostLayer));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(i, j, kCellGhostLayer, ITT);
+                            }
+                        }
+                        dtdx = gradTx[ITT];
+                        dtdy = gradTy[ITT];
+                        dtdz = gradTz[ITT];
+                        viscousCoef = visLaminar + visTurbulence;
+
+                        //! To Compute the heat flux on wall.
+                        if (nChemical == 0)
+                        {
+                            RDouble kSpecificHeat = (visLaminar * oPrandtlLaminar + visTurbulence * oPrandtlTurbulence) * specificHeatAtConstantPressure;
+                            if (wallFunctionType == WALLFUNCTION::STANDARD)
+                            {
+                                if (abs(heatCoeff) > SMALL)
+                                {
+                                    kSpecificHeat += heatCoeff;
+                                }
+                            }
+                            RDouble qx = kSpecificHeat * dtdx;
+                            RDouble qy = kSpecificHeat * dtdy;
+                            RDouble qz = kSpecificHeat * dtdz;
+                            //! This value is not the real heat rate on wall, it is just the first term on the right side of the energy equation.\n
+                            //! To obtain the real value, hf = nxs * qx + nys * qy + nzs * qz, and hf is just the non-dimensional variables.\n
+                            //! To obtain the dimensional value of heat rate, hf = (nxs * qx + nys * qy + nzs * qz) * (ref_miu * ref_vel^2/ref_len).
+                            heatFlux += -(normalComponetX * qx + normalComponetY * qy + normalComponetZ * qz) * oRefReNumber;
+                        }
+                        else      //! Non-equilibrium gas.
+                        {
+                            //! Compute Heat conductivity.
+                            RDouble heatConductivity[3] = { 0.0, 0.0, 0.0 };
+                            //! To obtain the enthalpy of each species.
+                            gas->GetEverySpeciesEnthalpy(wallTemperature[ITT], wallTemperature[ITV], wallTemperature[ITE], speciesEnthalpy);
+
+                            //! To Modify the viscosity on wall.
+                            gas->ComputeViscosityByPrimitive(wallVariables, wallTemperature[ITT], wallTemperature[ITE], nonDimensionalSutherlandTemperature, visLaminar);
+                            viscousCoef = visLaminar + visTurbulence;
+
+                            //! To obtain the mass diffusion coefficients of each species.
+                            gas->GetSpeciesMassDiffusionCoef(wallVariables, visLaminar, visTurbulence, densityDiffusivity);
+
+                            //! To compute heat conductivity of mixture gas using the Eucken formula and Wassilewa formula.
+                            gas->ComputeMixtureGasHeatConductivity(wallVariables, wallTemperature[ITT], wallTemperature[ITV], wallTemperature[ITE], heatConductivity[ITT], heatConductivity[ITV], heatConductivity[ITE]);
+
+                            if (nSurfGradMethod > 0)
+                            {
+                                //! Compute the heat flux caused by the gradient of translation-rotation temperature near wall.
+                                Qtr = -heatConductivity[ITT] * (normalComponetX * gradTx[ITT] + normalComponetY * gradTy[ITT] + normalComponetZ * gradTz[ITT]) * oRefReNumber;
+
+                                //! Compute the heat flux caused by the gradient of species enthalpies near wall.
+                                Qs = 0.0;
+                                for (int s = 0; s < numberOfSpecies; ++ s)
+                                {
+                                    //! Compute the diffusion coefficient.
+                                    RDouble diffusionCoefficient = densityDiffusivity[s] * speciesEnthalpy[s];
+                                    //! Compute the mass diffusion energy.
+                                    Qs += -diffusionCoefficient * (normalComponetX * gradCx[s] + normalComponetY * gradCy[s] + normalComponetZ * gradCz[s]);
+                                }
+                                Qs *= oRefReNumber;
+
+                                //! Compute the heat flux caused by the gradient of vibration-electron temperature near wall.
+                                Qv = 0.0;
+                                Qe = 0.0;
+                                if (nTemperatureModel == 2)
+                                {
+                                    Qv = -(heatConductivity[ITV] + heatConductivity[ITE]) * (normalComponetX * gradTx[ITV] + normalComponetY * gradTy[ITV] + normalComponetZ * gradTz[ITV]) * oRefReNumber;
+                                }
+                                else if (nTemperatureModel == 3)
+                                {
+                                    Qv = -heatConductivity[ITV] * (normalComponetX * gradTx[ITV] + normalComponetY * gradTy[ITV] + normalComponetZ * gradTz[ITV]) * oRefReNumber;
+                                    Qe = -heatConductivity[ITE] * (normalComponetX * gradTx[ITE] + normalComponetY * gradTy[ITE] + normalComponetZ * gradTz[ITE]) * oRefReNumber;
+                                }
+                            }
+                            else
+                            {
+                                //! Compute the heat flux caused by the gradient of translation-rotation temperature near wall.
+                                Qtr = heatConductivity[ITT] * (temperature(i, j, k, ITT) - wallTemperature[ITT]) / deltaHeight * oRefReNumber;
+
+                                //! Compute the heat flux caused by the gradient of species enthalpies near wall.
+                                Qs = 0.0;
+                                for (int s = 0; s < numberOfSpecies; ++ s)
+                                {
+                                    //! Compute the diffusion coefficient.
+                                    RDouble diffusionCoefficient = densityDiffusivity[s] * speciesEnthalpy[s];
+                                    //! Compute the mass diffusion energy.
+                                    Qs += diffusionCoefficient * (primitiveVars(i, j, k, nNSEquation + s) - wallVariables[nNSEquation + s]) / deltaHeight;
+                                }
+                                Qs *= oRefReNumber;
+
+                                //! Compute the heat flux caused by the gradient of vibration-electron temperature near wall.
+                                Qv = 0.0;
+                                Qe = 0.0;
+                                if (nTemperatureModel == 2)
+                                {
+                                    Qv = (heatConductivity[ITV] + heatConductivity[ITE]) * (temperature(i, j, k, ITV) - wallTemperature[ITV]) / deltaHeight * oRefReNumber;
+                                }
+                                else if (nTemperatureModel == 3)
+                                {
+                                    Qv = heatConductivity[ITV] * (temperature(i, j, k, ITV) - wallTemperature[ITV]) / deltaHeight * oRefReNumber;
+                                    Qe = heatConductivity[ITE] * (temperature(i, j, k, ITE) - wallTemperature[ITE]) / deltaHeight * oRefReNumber;
+                                }
+                            }
+
+                            //! Set the total heat flux on wall.
+                            heatFlux = Qtr + Qs + Qv + Qe;
+                            Qtr *= refHeatFluxDimension;
+                            Qs *= refHeatFluxDimension;
+                            Qv *= refHeatFluxDimension;
+                            Qe *= refHeatFluxDimension;
+                        }
+
+                        Qw = heatFlux * refHeatFluxDimension;
+                        HeatCoef = 2.0 * heatFlux;
+                        RDouble deltaH = refTotalEnthalpy - wallTotalEnthalpy;
+                        StantonNumber = Qw * 1000 / (refDimensionalDensity * refVelocity * deltaH);
+
+                        //Compute the mean free path.
+                        meanFreePath = ((viscousCoef * refVicosity) / Pw) * sqrt(0.5 * PI * rjmk * massReciprocal * Tw / refDimensionalMolecular);
+                        knudsenNumber = meanFreePath / knLength;
+
+                        RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+                        //! Stress components.
+                        RDouble txx = viscousCoef * (two * dudx - divv2p3);
+                        RDouble tyy = viscousCoef * (two * dvdy - divv2p3);
+                        RDouble tzz = viscousCoef * (two * dwdz - divv2p3);
+                        RDouble txy = viscousCoef * (dudy + dvdx);
+                        RDouble txz = viscousCoef * (dudz + dwdx);
+                        RDouble tyz = viscousCoef * (dvdz + dwdy);
+
+                        fvsx = -two * (nx * txx + ny * txy + nz * txz) * oRefReNumber;
+                        fvsy = -two * (nx * txy + ny * tyy + nz * tyz) * oRefReNumber;
+                        fvsz = -two * (nx * txz + ny * tyz + nz * tzz) * oRefReNumber;
+
+                        dfx += fvsx;
+                        dfy += fvsy;
+                        dfz += fvsz;
+
+                        delete geometry3D;
+                    }
+
+                    RDouble dir = cosa * fvsx + sina * fvsy;
+
+                    RDouble cfn = fvsx * normalComponetX + fvsy * normalComponetY + fvsz * normalComponetZ;
+                    RDouble cfxt = fvsx - cfn * normalComponetX;
+                    RDouble cfyt = fvsy - cfn * normalComponetY;
+                    RDouble cfzt = fvsz - cfn * normalComponetZ;
+
+                    RDouble cft = sqrt(cfxt * cfxt + cfyt * cfyt + cfzt * cfzt);
+
+                    RDouble frictionCoef = cft / surfaceArea * SIGN(1.0, dir);
+
+                    RDouble densityWall = primitiveVars(i, j, k, IR);
+                    RDouble taoWall = half * cft / surfaceArea;
+
+                    RDouble yPlus = 0.0;
+                    RDouble gridReynoldsNumber = 0.0;
+                    if (viscousType > INVISCID)
+                    {
+                        // RDouble3D &wallDistant = *grid->GetWallDist();
+                        // RDouble wallDistantOfFirstCell = wallDistant(i, j, k);   //by dms
+                        RDouble wallDistantOfFirstCell = deltaHeight;
+                        yPlus = refReNumber * sqrt(taoWall * densityWall) * wallDistantOfFirstCell / visLaminar;
+                        gridReynoldsNumber = refDimensionalDensity * refVelocity * deltaHeight * refLenth / refVicosity;
+                    }
+
+                    //if (nRapidFlowfield > 0)
+                    //{
+                    //    pressCoef = (*surfacePressure)(indexOfWall, indexOfCell, 0);
+                    //    Pw = (*surfacePressure)(indexOfWall, indexOfCell, 1) * refDynamicPressure;
+                    //}
+
+                    visualVariables[VISUAL_WALL_CP] = pressCoef;
+                    visualVariables[VISUAL_WALL_CF] = frictionCoef;
+                    visualVariables[VISUAL_WALL_YPLUS] = yPlus;
+                    visualVariables[VISUAL_WALL_QNONDIM] = heatFlux;
+                    visualVariables[VISUAL_WALL_QDIM] = Qw;
+                    visualVariables[VISUAL_WALL_PW] = Pw;
+                    visualVariables[VISUAL_WALL_TW] = Tw;
+                    visualVariables[VISUAL_WALL_RHOW] = Rhow;
+                    visualVariables[VISUAL_WALL_VX] = wallVariables[IU] * refVelocity;
+                    visualVariables[VISUAL_WALL_VY] = wallVariables[IV] * refVelocity;
+                    visualVariables[VISUAL_WALL_VZ] = wallVariables[IW] * refVelocity;
+                    visualVariables[VISUAL_WALL_VS] = absVelocity;
+                    visualVariables[VISUAL_WALL_ST] = StantonNumber;
+                    visualVariables[VISUAL_WALL_CH] = HeatCoef;
+                    visualVariables[VISUAL_WALL_RE] = gridReynoldsNumber;
+                    visualVariables[VISUAL_WALL_KN] = knudsenNumber;
+
+                    if (nChemical > 0)
+                    {
+                        visualVariables[VISUAL_WALL_QT] = Qtr;
+                        visualVariables[VISUAL_WALL_QS] = Qs;
+                        visualVariables[VISUAL_WALL_QV] = Qv;
+                        visualVariables[VISUAL_WALL_QE] = Qe;
+                        for (int iSpecies = 0; iSpecies < numberOfSpecies; ++ iSpecies)
+                        {
+                            visualVariables[VISUAL_SPECIES_START + iSpecies] = wallVariables[nNSEquation + iSpecies];
+                        }
+                    }
+
+                    if (nSlipBCModel > 0)//The slip temperature of flow.
+                    {
+                        visualVariables[VISUAL_SLIP_TS] = wallTemperature[ITT] * referenceTemperature;
+                        visualVariables[VISUAL_SLIP_TV] = wallTemperature[ITV] * referenceTemperature;
+                        visualVariables[VISUAL_SLIP_TE] = wallTemperature[ITE] * referenceTemperature;
+                        visualVariables[VISUAL_SLIP_DTS] = deltaT * referenceTemperature;
+                    }
+
+                    int nIndex = -1;
+                    for (int iVar = 0; iVar < nWallVariables; ++ iVar)
+                    {
+                        int varType = visualVariablesType[iVar];
+                        int varIndex = variablesOrder[varType];
+                        //The mass fractions of species will be exported.
+                        if (varType == VISUAL_WALL_NS)
+                        {
+                            continue;
+                        }
+                        else //Obtain the other variables.
+                        {
+                            ++ nIndex;
+                            dataStore(i, j, k, nIndex) = visualVariables[varIndex];
+                        }
+                    }
+
+                    //Obtain the mass fractions of species.
+                    if (nWallVariables != dataNumber)
+                    {
+                        for (int iSpecies = 0; iSpecies < numberOfSpecies; ++ iSpecies)
+                        {
+                            dataStore(i, j, k, nWallVariables + iSpecies - 1) = visualVariables[VISUAL_SPECIES_START + iSpecies];
+                        }
+                    }
+
+                    //! Next grid cell.
+                    ++ indexOfCell;
+                }//! i end
+            }//! j end
+        }//! k end
+        ++ indexOfWall; //! Next surface region.
+    }//! iBCRegion end
+
+    GhostCell3D(dataStore, ni, nj, nk, dataNumber);
+
+    //CommunicateInterfaceValue(grid, &isWall, "wallCell");
+    CommunicateInterfaceValue(grid, &dataStore, "wallAircoefData", dataNumber);
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+        if (!IsWall(BCType) && BCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        int s_nd = structBC->GetFaceDirection();
+        if (s_nd == 0)
+        {
+            ked ++;
+            jed ++;
+        }
+        else if (s_nd == 1)
+        {
+            ied ++;
+            ked ++;
+        }
+        else
+        {
+            ied ++;
+            jed ++;
+        }
+
+        if (nDim == TWO_D)
+        {
+            ked = 1;
+        }
+
+        int *s_lr3d = structBC->GetFaceDirectionIndex();
+        int nSurface = structBC->GetFaceDirection() + 1;
+        int id, jd, kd;
+        GetBCFaceIDX(s_lr3d, id, jd, kd);
+
+        vector <RDouble> vectorXCoordinate, vectorYCoordinate, vectorZCoordinate;
+        vectorXCoordinate.resize(0);
+        vectorYCoordinate.resize(0);
+        vectorZCoordinate.resize(0);
+        dataCount = 0;
+        coorCount = 0;
+
+        vector < vector <RDouble> > dumpDate;
+        dumpDate.resize(dataNumber);
+
+        kst += kd;
+        ked += kd;
+        jst += jd;
+        jed += jd;
+        ist += id;
+        ied += id;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    vectorXCoordinate.push_back(xx(i, j, k));
+                    vectorYCoordinate.push_back(yy(i, j, k));
+                    vectorZCoordinate.push_back(zz(i, j, k));
+                    coorCount ++;
+
+                    int iIndex = i - id;
+                    int jIndex = j - jd;
+                    int kIndex = k - kd;
+                    if (i == ied && nSurface != 1) iIndex = i - 1;
+                    if (j == jed && nSurface != 2) jIndex = j - 1;
+                    if (k == ked && nSurface != 3) kIndex = k - 1;
+                    if (nDim == TWO_D) kIndex = 1;
+
+                    int iLeftCell, iRightCell, jLeftCell, jRightCell, kLeftCell, kRightCell;
+                    if (i == ist && (cellType(i - 1, jIndex, kIndex) != BCType))
+                    {
+                        iLeftCell = i;
+                    }
+                    else
+                    {
+                        iLeftCell = i - 1;
+                    }
+
+                    if (i == ied && cellType(i, jIndex, kIndex) != BCType)
+                    {
+                        iRightCell = i - 1;
+                    }
+                    else
+                    {
+                        iRightCell = i;
+                    }
+
+                    if (nSurface == 1)
+                    {
+                        iLeftCell = i - id;
+                        iRightCell = i - id;
+                    }
+
+                    if (j == jst && cellType(iIndex, j - 1, kIndex) != BCType)
+                    {
+                        jLeftCell = j;
+                    }
+                    else
+                    {
+                        jLeftCell = j - 1;
+                    }
+
+                    if (j == jed && cellType(iIndex, j, kIndex) != BCType)
+                    {
+                        jRightCell = j - 1;
+                    }
+                    else
+                    {
+                        jRightCell = j;
+                    }
+
+                    if (nSurface == 2)
+                    {
+                        jLeftCell = j - jd;
+                        jRightCell = j - jd;
+                    }
+
+                    if (nDim == 3)
+                    {
+                        if (k == kst && cellType(iIndex, jIndex, k - 1) != BCType)
+                        {
+                            kLeftCell = k;
+                        }
+                        else
+                        {
+                            kLeftCell = k - 1;
+                        }
+
+                        if (k == ked && cellType(iIndex, jIndex, k) != BCType)
+                        {
+                            kRightCell = k - 1;
+                        }
+                        else
+                        {
+                            kRightCell = k;
+                        }
+
+                        if (nSurface == 3)
+                        {
+                            kLeftCell = k - kd;
+                            kRightCell = k - kd;
+                        }
+                    }
+                    else
+                    {
+                        kLeftCell = 1;
+                        kRightCell = 1;
+                    }
+
+                    RDouble nodeValue = 0.0;
+                    for (int iData = 0; iData < dataNumber; ++ iData)
+                    {
+                        nodeValue = eighth * (dataStore(iLeftCell, jLeftCell, kLeftCell, iData) + dataStore(iLeftCell, jRightCell, kLeftCell, iData) +
+                            dataStore(iLeftCell, jLeftCell, kRightCell, iData) + dataStore(iLeftCell, jRightCell, kRightCell, iData) +
+                            dataStore(iRightCell, jLeftCell, kLeftCell, iData) + dataStore(iRightCell, jRightCell, kLeftCell, iData) +
+                            dataStore(iRightCell, jLeftCell, kRightCell, iData) + dataStore(iRightCell, jRightCell, kRightCell, iData));
+                        dumpDate[iData].push_back(nodeValue);
+                    }
+                }
+            }
+        }
+
+        TecioMission = 1;
+        PHWrite(wallDistributeData, &TecioMission, 1);
+
+        string bcName = structBC->GetBCName();
+        wallDistributeData->write_string(bcName);
+
+        int IMxOrNumPts = ied - ist + 1;
+        int JMxOrNumElements = jed - jst + 1;
+        int KMxOrNumFaces = ked - kst + 1;
+
+        PHWrite(wallDistributeData, &IMxOrNumPts, 1);
+        PHWrite(wallDistributeData, &JMxOrNumElements, 1);
+        PHWrite(wallDistributeData, &KMxOrNumFaces, 1);
+
+        PHWrite(wallDistributeData, coorCount);
+        PHWrite(wallDistributeData, vectorXCoordinate, coorCount);
+        PHWrite(wallDistributeData, vectorYCoordinate, coorCount);
+        PHWrite(wallDistributeData, vectorZCoordinate, coorCount);
+
+        int ValueLocation = 1;
+        for (int iData = 0; iData < dataNumber; ++ iData)
+        {
+            PHWrite(wallDistributeData, coorCount);
+            PHWrite(wallDistributeData, ValueLocation);
+            PHWrite(wallDistributeData, dumpDate[iData], coorCount);
+        }
+    }
+
+    delete[]wallVariables;
+}
+
+void NSSolverStruct::ComputeHeatFlux(ActionKey *actkey, RDouble *HeatFlux)
+{
+    int level = actkey->level;
+    int nEquation = GetNumberOfEquations();
+    StructGrid *grid = StructGridCast(GetGrid(level));
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    using namespace IDX;
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+    RDouble3D &cellVolume = *(grid->GetCellVolume());
+
+    RDouble4D &heatTransferCoeff = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("heatTransferCoeff"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nDim = GetDim();
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    int wallFunctionType = GlobalDataBase::GetIntParaFromDB("wallFunctionType");
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperature = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble referenceTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    int viscousType = parameters->GetViscousType();
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+
+    RDouble gasConstant = gas->GetUniversalGasConstant();
+    //! The type of catalytic wall condition.
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();
+    int wallMultiTemperature = parameters->GetWallMultiTemperature();
+
+    RDouble2D *firstLayerHeight = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("firstLayerHeight"));
+    RDouble Twall = parameters->GetWallTemperature();    //! Temperature on wall.
+    RDouble nondimTwall = Twall / referenceTemperature;
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    RDouble wallTemperature[3] = { nondimTwall, nondimTwall, nondimTwall };
+    RDouble speciesEnthalpy[MAX_SPECIES_NUM], densityDiffusivity[MAX_SPECIES_NUM];
+
+    //! To obtain the reference values.
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble refVelocity = refDimensionalSonicSpeed * refMachNumber;
+    RDouble refSquareVelocity = refVelocity * refVelocity;
+    RDouble refDynamicPressure = refDimensionalDensity * refSquareVelocity;
+
+    RDouble2D *surfaceTemperature;
+    surfaceTemperature = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+    }
+
+    string *speciesName;
+    RDouble3D *surfaceMassFraction = NULL;
+    if (nChemical > 0 && numberOfSpecies > 0)
+    {
+        speciesName = gas->GetNameOfSpecies();
+        surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+    }
+
+    RDouble *wallVariables = new RDouble[nEquation];
+    RDouble Qtr = 0.0, Qs = 0.0, Qv = 0.0, Qe = 0.0, deltaT = 0.0;
+    RDouble Pw = 0.0, Tw = 0.0, Rhow = 0.0, absVelocity = 0.0, wallTotalEnthalpy = 0.0;
+    RDouble MaxHeatFlux = HeatFlux[0];
+    RDouble Q_total = HeatFlux[2];
+    RDouble Tw_total = HeatFlux[3];
+    RDouble Pw_total = HeatFlux[5];
+    int indexOfWall = 0, indexOfCell = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!IsWall(BCType) && BCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        Data_Param *bcParamDB = structBC->GetBCParamDataBase();
+        if (bcParamDB->IsExist("catalyticCoef", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("catalyticCoef", &catalyticCoef, PHDOUBLE, 1);
+        }
+
+        if (wallMultiTemperature == 1)
+        {
+
+            if (bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+            {
+                bcParamDB->GetData("wallTemperature", &Twall, PHDOUBLE, 1);
+            }
+            else
+            {
+                Twall = parameters->GetWallTemperature();
+            }
+            nondimTwall = Twall / referenceTemperature;
+            wallTemperature[0] = nondimTwall;
+            wallTemperature[1] = nondimTwall;
+            wallTemperature[2] = nondimTwall;
+        }
+
+            if(wallMultiTemperature == 1)
+            {
+                if(bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+                {
+                    bcParamDB->GetData("wallTemperature", &Twall, PHDOUBLE, 1);
+                }
+                else
+                {
+                    Twall = parameters->GetWallTemperature();
+                }
+                nondimTwall = Twall / referenceTemperature;
+                wallTemperature[0] = nondimTwall;
+                wallTemperature[1] = nondimTwall;
+                wallTemperature[2] = nondimTwall;
+            }
+        int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        //! Obtain the surface information.
+        int *s_lr3d = structBC->GetFaceDirectionIndex();
+        int nSurface = structBC->GetFaceDirection() + 1;
+        int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+
+        //RDouble WallTotalCells = ied * jed * ked;
+        indexOfCell = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int iWall, jWall, kWall;
+                    structBC->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                    RDouble normalComponetX = leftOrRightIndex * faceNormalComponentX(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetY = leftOrRightIndex * faceNormalComponentY(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetZ = leftOrRightIndex * faceNormalComponentZ(iWall, jWall, kWall, nSurface);
+
+                    RDouble deltaHeight = (*firstLayerHeight)(indexOfWall, indexOfCell);
+
+                    int iCellGhostLayer = i + s_lr3d[0];
+                    int jCellGhostLayer = j + s_lr3d[1];
+                    int kCellGhostLayer = k + s_lr3d[2];
+                    RDouble pressureFirstCell = primitiveVars(i, j, k, IP);
+                    wallVariables[IP] = pressureFirstCell;
+
+                    //! To obtain the variables on wall.
+                    if (nSlipBCModel > 0)
+                    {
+                        for (int m = 0; m < 3; ++ m)
+                        {
+                            wallTemperature[m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m);
+                            wallVariables[m + 1] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m + 3);
+                        }
+                        deltaT = wallTemperature[ITT] - nondimTwall;
+                    }
+                    else
+                    {
+                        if (viscousType > INVISCID)
+                        {
+                            wallVariables[IU] = 0.0;
+                            wallVariables[IV] = 0.0;
+                            wallVariables[IW] = 0.0;
+                        }
+                        else
+                        {
+                            //The velocity is used to extract the wall streamline, so this velocity is not the real velocity on wall.
+                            wallVariables[IU] = primitiveVars(i, j, k, IU);
+                            wallVariables[IV] = primitiveVars(i, j, k, IV);
+                            wallVariables[IW] = primitiveVars(i, j, k, IW);
+                        }
+
+                        deltaT = 0.0;
+                        //! Set temperature on wall.
+                        if (Twall < 0.0) //Adabatic wall.
+                        {
+                            wallTemperature[ITT] = temperature(i, j, k, mTT);
+                            wallTemperature[ITV] = temperature(i, j, k, mTV);
+                            wallTemperature[ITE] = temperature(i, j, k, mTE);
+
+                        }
+                        else //Isothermal wall or radiation equilibrium temperature wall.
+                        {
+                            wallTemperature[ITT] = (*surfaceTemperature)(indexOfWall, indexOfCell);
+                            wallTemperature[ITV] = wallTemperature[ITT];
+                            wallTemperature[ITE] = wallTemperature[ITT];
+                        }
+                    }
+
+                    //! Compute the density on wall using the state equation.
+                    wallVariables[IR] = refGama * refMachNumber * refMachNumber * wallVariables[IP] / wallTemperature[ITT];
+                    if (nChemical >= 1)
+                    {
+                        //! To obtain the mass fraction on wall.
+                        if (ABS(catalyticCoef) <= EPSILON && BCType != PHENGLEI::ABLATION_SURFACE) // Fully non-catalytic wall.
+                        {
+                            for (int s = nNSEquation; s < numberOfSpecies + nNSEquation; ++ s)
+                            {
+                                wallVariables[s] = primitiveVars(i, j, k, s);
+                            }
+                        }
+                        else // Fully catalytic wall or finite catalytic wall.
+                        {
+                            for (int s = nNSEquation; s < numberOfSpecies + nNSEquation; ++ s)
+                            {
+                                wallVariables[s] = (*surfaceMassFraction)(indexOfWall, indexOfCell, s - nNSEquation);
+                            }
+                        }
+
+                        RDouble massReciprocal = 0.0;
+                        if (nTemperatureModel > 1)     //! Multi-Temperature model.
+                        {
+                            RDouble ceDivideMe = 0.0;
+                            massReciprocal = gas->ComputeMolecularWeightReciprocalWithoutElectron(wallVariables, ceDivideMe);
+                            wallVariables[IR] = wallVariables[IP] / (gasConstant * wallTemperature[ITT] * massReciprocal + gasConstant * wallTemperature[ITE] * ceDivideMe);
+                        }
+                        else         //! One-Temperature model.
+                        {
+                            //! Obtain molecular weight of the mixture gas.
+                            massReciprocal = gas->ComputeMolecularWeightReciprocal(wallVariables);
+                            wallVariables[IR] = wallVariables[IP] / (gasConstant * wallTemperature[ITT] * massReciprocal);
+                        }
+                    }
+
+                    //! The pressure on wall.
+                    Rhow = wallVariables[IR] * refDimensionalDensity;
+                    Pw = wallVariables[IP] * refDynamicPressure;
+                    Tw = wallTemperature[ITT] * referenceTemperature;
+                    absVelocity = wallVariables[IU] * wallVariables[IU] + wallVariables[IV] * wallVariables[IV] + wallVariables[IW] * wallVariables[IW];
+
+                    wallTotalEnthalpy = 0.0;
+                    gas->ComputeEnthalpyByPrimitive(wallVariables, refGama, wallTotalEnthalpy, wallTemperature);
+                    wallTotalEnthalpy += 0.5 * absVelocity;
+                    absVelocity = sqrt(absVelocity) * refVelocity;
+                    wallTotalEnthalpy = wallTotalEnthalpy * refSquareVelocity;
+
+                    //! Pressure drag.
+
+                    RDouble heatFlux = zero;
+                    RDouble viscousCoef;
+                    RDouble dudx, dudy, dudz, dvdx, dvdy, dvdz, dwdx, dwdy, dwdz;
+                    RDouble dtdx, dtdy, dtdz;
+                    RDouble visLaminar = 0.0, visTurbulence = 0.0;
+                    RDouble heatCoeff = 0.0;
+                    if (viscousType > INVISCID)
+                    {
+                        Geometry3D *geometry3D = new Geometry3D;
+
+                        if (nSurface == 1)
+                        {
+                            //! Get i-th face vector on the wall surface.
+                            Get_GEO_I(i, j, k, iWall, iWall, nDim, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in i-direction of u,v,w,T.
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            DXDYDZ_I(temperature, geometry3D, i, j, k, nDim, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(iCellGhostLayer, j, k));
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(iCellGhostLayer, j, k));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(iCellGhostLayer, j, k, ITT);
+                            }
+                        }
+                        else if (nSurface == 2)
+                        {
+                            //! Get j-th face vector on the wall surface;.
+                            Get_GEO_J(i, j, k, jWall, jWall, nDim, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in j-direction of u,v,w,T.
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            DXDYDZ_J(temperature, geometry3D, i, j, k, nDim, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, jCellGhostLayer, k));
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, jCellGhostLayer, k));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(i, jCellGhostLayer, k, ITT);
+                            }
+                        }
+                        else
+                        {
+                            //! Get k-th face vector on the wall surface.
+                            Get_GEO_K(i, j, k, kWall, kWall, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in k-direction of u,v,w,T.
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            DXDYDZ_K(temperature, geometry3D, i, j, k, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, j, kCellGhostLayer));
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, j, kCellGhostLayer));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(i, j, kCellGhostLayer, ITT);
+                            }
+                        }
+
+                        viscousCoef = visLaminar + visTurbulence;
+                        //! To Compute the heat flux on wall.
+                        if (nChemical == 0)
+                        {
+                            RDouble kSpecificHeat = (visLaminar * oPrandtlLaminar + visTurbulence * oPrandtlTurbulence) * specificHeatAtConstantPressure;
+                            if (wallFunctionType == WALLFUNCTION::STANDARD)
+                            {
+                                if (abs(heatCoeff) > SMALL)
+                                {
+                                    kSpecificHeat = heatCoeff;
+                                }
+                            }
+                            RDouble qx = kSpecificHeat * dtdx;
+                            RDouble qy = kSpecificHeat * dtdy;
+                            RDouble qz = kSpecificHeat * dtdz;
+                            //! This value is not the real heat rate on wall, it is just the first term on the right side of the energy equation.\n
+                            //! To obtain the real value, hf = nxs * qx + nys * qy + nzs * qz, and hf is just the non-dimensional variables.\n
+                            //! To obtain the dimensional value of heat rate, hf = (nxs * qx + nys * qy + nzs * qz) * (ref_miu * ref_vel^2/ref_len).
+                            heatFlux += -(normalComponetX * qx + normalComponetY * qy + normalComponetZ * qz) * oRefReNumber;
+                        }
+                        else      //! Non-equilibrium gas.
+                        {
+                            //! Compute Heat conductivity.
+                            RDouble heatConductivity[3] = { 0.0, 0.0, 0.0 };
+                            //! To obtain the enthalpy of each species.
+                            gas->GetEverySpeciesEnthalpy(wallTemperature[ITT], wallTemperature[ITV], wallTemperature[ITE], speciesEnthalpy);
+
+                            //! To Modify the viscosity on wall.
+                            gas->ComputeViscosityByPrimitive(wallVariables, wallTemperature[ITT], wallTemperature[ITE], nonDimensionalSutherlandTemperature, visLaminar);
+                            viscousCoef = visLaminar + visTurbulence;
+
+                            //! To obtain the mass diffusion coefficients of each species.
+                            gas->GetSpeciesMassDiffusionCoef(wallVariables, visLaminar, visTurbulence, densityDiffusivity);
+
+                            //! To compute heat conductivity of mixture gas using the Eucken formula and Wassilewa formula.
+                            gas->ComputeMixtureGasHeatConductivity(wallVariables, wallTemperature[ITT], wallTemperature[ITV], wallTemperature[ITE], heatConductivity[ITT], heatConductivity[ITV], heatConductivity[ITE]);
+
+                            //! Compute the heat flux caused by the gradient of translation-rotation temperature near wall.
+                            Qtr = heatConductivity[ITT] * (temperature(i, j, k, ITT) - wallTemperature[ITT]) / deltaHeight * oRefReNumber;
+
+                            //! Compute the heat flux caused by the gradient of species enthalpies near wall.
+                            Qs = 0.0;
+                            for (int s = 0; s < numberOfSpecies; ++ s)
+                            {
+                                //! Compute the diffusion coefficient.
+                                RDouble diffusionCoefficient = densityDiffusivity[s] * speciesEnthalpy[s];
+                                //! Compute the mass diffusion energy.
+                                Qs += diffusionCoefficient * (primitiveVars(i, j, k, nNSEquation + s) - wallVariables[nNSEquation + s]) / deltaHeight;
+                            }
+                            Qs *= oRefReNumber;
+
+                            //! Compute the heat flux caused by the gradient of vibration-electron temperature near wall.
+                            Qv = 0.0;
+                            Qe = 0.0;
+                            if (nTemperatureModel == 2)
+                            {
+                                Qv = (heatConductivity[ITV] + heatConductivity[ITE]) * (temperature(i, j, k, ITV) - wallTemperature[ITV]) / deltaHeight * oRefReNumber;
+                            }
+                            else if (nTemperatureModel == 3)
+                            {
+                                Qv = heatConductivity[ITV] * (temperature(i, j, k, ITV) - wallTemperature[ITV]) / deltaHeight * oRefReNumber;
+                                Qe = heatConductivity[ITE] * (temperature(i, j, k, ITE) - wallTemperature[ITE]) / deltaHeight * oRefReNumber;
+                            }
+
+                            //! Set the total heat flux on wall.
+                            heatFlux = Qtr + Qs + Qv + Qe;
+                        }
+                        if (heatFlux > MaxHeatFlux)
+                        {
+                            MaxHeatFlux = heatFlux;
+                        }
+                        Q_total += heatFlux;
+                        Tw_total += wallTemperature[ITT];
+                        Pw_total += pressureFirstCell;
+
+                        delete geometry3D;
+                    }
+                }
+            }
+        }
+    }
+    HeatFlux[0] = MaxHeatFlux;
+    HeatFlux[1] = Q_total;
+    HeatFlux[2] = Q_total;
+    HeatFlux[3] = Tw_total;
+    HeatFlux[4] = Tw_total;
+    HeatFlux[5] = Pw_total;
+    HeatFlux[6] = Pw_total;
+    delete[]wallVariables;
+}
+
+//! To obtain the derivatives of the designate primary variable whose sequence number in the array is marked with the valued of nIndex.
+void NSSolverStruct::GetDerivatives(int nIndex, int iSurface, int ndim, int nlr, int i, int j, int k, int ni, int nj, int nk, RDouble4D &q,
+    RDouble4D &xfv, RDouble4D &yfv, RDouble4D &zfv, RDouble3D &vol, RDouble &dvdx, RDouble &dvdy, RDouble &dvdz)
+{
+    int p, m;
+    //! Allocate.
+    Geometry3D *geometry3D = new Geometry3D;
+
+    if (iSurface == 1)
+    {
+        p = min(i, ni - 1);
+        m = max(i - 1, 1);
+        //! Initialize.
+        Get_GEO_I(i, j, k, m, p, ndim, geometry3D, xfv, yfv, zfv, vol);
+        //! To compute the derivatives.
+        DXDYDZ_I(q, geometry3D, i, j, k, ndim, nIndex, dvdx, dvdy, dvdz, nlr);
+    }
+    else if (iSurface == 2)
+    {
+        p = min(j, nj - 1);
+        m = max(j - 1, 1);
+        //! Initialize.
+        Get_GEO_J(i, j, k, m, p, ndim, geometry3D, xfv, yfv, zfv, vol);
+        //! To compute the derivatives.
+        DXDYDZ_J(q, geometry3D, i, j, k, ndim, nIndex, dvdx, dvdy, dvdz, nlr);
+    }
+    else
+    {
+        p = min(k, nk - 1);
+        m = max(k - 1, 1);
+        //! Initialize.
+        Get_GEO_K(i, j, k, m, p, geometry3D, xfv, yfv, zfv, vol);
+        //! To compute the derivatives.
+        DXDYDZ_K(q, geometry3D, i, j, k, nIndex, dvdx, dvdy, dvdz, nlr);
+    }
+
+    delete geometry3D;
+}
+
+void NSSolverStruct::ExportSurfaceVariables(ActionKey *actkey)
+{
+    int level = actkey->level;
+    if (level != 0)
+    {
+        return;
+    }
+    int nDumpSurfaceInfo = GlobalDataBase::GetIntParaFromDB("nDumpSurfaceInfo");
+    if (nDumpSurfaceInfo == 1)
+    {
+        WriteSurfaceInfo(actkey);
+        return;
+    }
+
+    StructGrid *grid = StructGridCast(GetGrid(level));
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    //! The primitive temperatures.
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    //! Obtain the viscosity of turbulence.
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    RDouble refReNumber = parameters->GetRefReNumber();
+
+    RDouble refGama = parameters->GetRefGama();
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    int viscousType = parameters->GetViscousType();
+
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+    //! The area normal equals to the area multiplies the normal of the face.
+    RDouble4D &faceAreaNormalComponentX = *(grid->GetFaceVectorX());
+    RDouble4D &faceAreaNormalComponentY = *(grid->GetFaceVectorY());
+    RDouble4D &faceAreaNormalComponentZ = *(grid->GetFaceVectorZ());
+    RDouble4D &faceArea = *(grid->GetFaceArea());
+    RDouble3D &cellVolume = *(grid->GetCellVolume());
+
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    //! Compute the number of species.
+    int nSpecies = nLaminar + nChemical - nNSEquation;
+    //! The total number of equation.
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    int nSolidSurface = grid->GetNumberOfWallCell();
+    if (nSolidSurface == 0)
+    {
+        return;
+    }
+
+    RDouble speciesEnthalpy[MAX_SPECIES_NUM] = { 0 }, densityDiffusivity[MAX_SPECIES_NUM] = { 0 };
+    string *speciesName = 0;
+    RDouble3D *surfaceMassFraction = NULL;
+    if (nChemical > 0 && nSpecies > 0)   //! Allocate the memory.
+    {
+        speciesName = gas->GetNameOfSpecies();
+        surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+    }
+    //! Allocate the dynamic memory space to save the primitive variables on wall.
+    RDouble *wallVariables = new RDouble[nEquation]();
+
+    //! The type of catalytic wall condition.
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();
+    //! Temperature on wall.
+    RDouble temperatureWall = parameters->GetWallTemperature();
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    //! The non-dimensional temperature on wall.
+    RDouble temperatureWallNonDimensional = temperatureWall / refDimensionalTemperature;
+    RDouble2D *surfaceTemperature = 0;
+    if (temperatureWall >= 0.0)
+    {
+        surfaceTemperature = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+    }
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+    }
+
+    RDouble2D *firstLayerHeight = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("firstLayerHeight"));
+
+    //! The heating rate on wall. totalHeatViaGradients and totalHeatWall is the total heat rate, the former is computed with gradients,\n
+    //! while the latter is computed with the first-order difference. transRotationHeat, vibrationHeat, eletronHeat, and speciesHeat are \n
+    //! heat rate of translation-rotation, vibration, electron and species enthalpy, respectively.
+    RDouble totalHeatViaGradients = 0.0, totalHeatWall = 0.0;
+    RDouble transRotationHeat = 0.0, vibrationHeat = 0.0, eletronHeat = 0.0, speciesHeat = 0.0;
+
+    //! The computations of Qhf and Qw are different. Qhf applies the partial derivative of temperature to compute heating rate,\n
+    //! while Qw equals to (T1 - Tw)/dy, T1 denotes the temperature of the cell near the surface, Tw is the temperature on wall,\n
+    //! and dy is computed by projecting the distant vector to the surface normal, the distant vector is constructed from the center\n
+    //! of the surface to that of the cell near this surface.
+
+    RDouble wallTemperature[3] = { temperatureWallNonDimensional, temperatureWallNonDimensional, temperatureWallNonDimensional };
+    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+
+    //! Obtain the reference values.
+    RDouble refLenth = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refVelocity = parameters->GetRefDimensionalVelocity();
+    RDouble refViscosity = refDimensionalDensity * refVelocity * refLenth / refReNumber;
+    RDouble refDynamicPressure = refDimensionalDensity * refVelocity * refVelocity;
+    RDouble refHeatFluxDimension = refViscosity * refVelocity * refVelocity / refLenth;
+
+    std::ostringstream oss;
+    using namespace IDX;
+
+    vector<string> title_tecplot;
+    title_tecplot.push_back("title=\"Flow Fields of PHengLEI\"");
+    title_tecplot.push_back("variables=");
+    title_tecplot.push_back("\"x\"");
+    title_tecplot.push_back("\"y\"");
+    title_tecplot.push_back("\"z\"");
+    title_tecplot.push_back("\"rho\""); //(kg/m3)
+    title_tecplot.push_back("\"p\""); //(Pa)
+    title_tecplot.push_back("\"Ttr\""); //(K)
+    title_tecplot.push_back("\"Qhf\""); //(W/m2)
+    title_tecplot.push_back("\"Qw\""); //(W/m2)
+    title_tecplot.push_back("\"Qtr\""); //(W/m2)
+    title_tecplot.push_back("\"Qv\""); //(W/m2)
+    title_tecplot.push_back("\"Qe\""); //(W/m2)
+    title_tecplot.push_back("\"Qs\""); //(W/m2)
+
+    for (int iSpecies = 0; iSpecies < nSpecies; iSpecies ++)
+    {
+        title_tecplot.push_back(speciesName[iSpecies]);
+    }
+
+    int nDim = GetDim();
+    int js = 1;
+    int ks = 1;
+    if (nDim == 2)
+    {
+        ks = 0;
+    }
+    if (nDim == 1)
+    {
+        js = 0;
+    }
+
+    //! The non-dimensional value of constant pressure specific heat.
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+    //! The universal gas constant.
+    RDouble gasConstant = gas->GetUniversalGasConstant();
+
+    int nIndex = 0, indexOfWall = 0, indexOfCell = 0;
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();    //! Obtain the number of boundary condition regions.
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int nBCType = structBC->GetBCType();
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (!IsWall(nBCType) && nBCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            nIndex += (ied - ist + 1) * (jed - jst + 1) * (ked - kst + 1);
+            continue;
+        }
+
+        //! Obtain the surface information.
+        int *faceDirectionIndex = structBC->GetFaceDirectionIndex();
+
+        int nSurface = structBC->GetFaceDirection() + 1;
+        int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+
+        RDouble normalComponetX, normalComponetY, normalComponetZ, surfaceArea, dtdx, dtdy, dtdz, dqdx, dqdy, dqdz;
+
+        for (std::size_t i = 0; i < title_tecplot.size(); ++ i)
+        {
+            oss << title_tecplot[i] << "\n";
+        }
+        oss << "zone  i = " << ied - ist + 1
+            << " j = " << jed - jst + 1
+            << " k = " << ked - kst + 1
+            << " f = point " << " \n";
+
+        indexOfCell = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! i, j, k - is first CELL index near SOLID_SURFACE.
+                    //! iWall, jWall, kWall - is NODE index on SOLID_SURFACE.
+                    int iWall, jWall, kWall;
+                    structBC->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                    //! The index of ghost cell on the negative first layer.
+                    int iCellGhostLayer = i + faceDirectionIndex[0];
+                    int jCellGhostLayer = j + faceDirectionIndex[1];
+                    int kCellGhostLayer = k + faceDirectionIndex[2];
+
+                    normalComponetX = faceNormalComponentX(iWall, jWall, kWall, nSurface);
+                    normalComponetY = faceNormalComponentY(iWall, jWall, kWall, nSurface);
+                    normalComponetZ = faceNormalComponentZ(iWall, jWall, kWall, nSurface);
+                    surfaceArea = faceArea(iWall, jWall, kWall, nSurface);
+                    RDouble deltaHeight = (*firstLayerHeight)(indexOfWall, indexOfCell);
+
+                    RDouble xCenterWall, yCenterWall, zCenterWall;
+                    grid->FaceCoor(iWall, jWall, kWall, nSurface, xCenterWall, yCenterWall, zCenterWall);
+
+                    //! To obtain the real value, hf = nxs * qx + nys * qy + nzs * qz, and hf is just the non-dimensional variables.\n
+                    //! To obtain the dimensional value of heat rate, hf = (nxs * qx + nys * qy + nzs * qz) * (ref_miu * ref_vel^2/ref_len).
+                    //! To compute the heat rate on wall.
+                    totalHeatViaGradients = 0.0;
+                    totalHeatWall = 0.0;
+                    transRotationHeat = 0.0;
+                    vibrationHeat = 0.0;
+                    eletronHeat = 0.0;
+                    speciesHeat = 0.0;
+
+                    //! Obtain the viscosity.
+                    RDouble viscosityLaminar, viscosityTurbulence;
+                    if (viscousType > INVISCID)
+                    {
+                        viscosityLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(iCellGhostLayer, jCellGhostLayer, kCellGhostLayer));
+                        viscosityTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(iCellGhostLayer, jCellGhostLayer, kCellGhostLayer));
+                    }
+                    else
+                    {
+                        viscosityLaminar = 0.0;
+                        viscosityTurbulence = 0.0;
+                    }
+
+                    //! To obtain the variables on wall.
+                    if (nSlipBCModel > 0)
+                    {
+                        for (int m = 0; m < 3; ++ m)
+                        {
+                            wallTemperature[m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m);
+                            wallVariables[m + 1] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m + 3);
+                        }
+                    }
+                    else
+                    {
+                        if (viscousType > INVISCID)
+                        {
+                            wallVariables[IU] = 0.0;
+                            wallVariables[IV] = 0.0;
+                            wallVariables[IW] = 0.0;
+                        }
+                        else
+                        {
+                            wallVariables[IU] = primitiveVariables(i, j, k, IU);
+                            wallVariables[IV] = primitiveVariables(i, j, k, IV);
+                            wallVariables[IW] = primitiveVariables(i, j, k, IW);
+                        }
+
+                        if (temperatureWall < 0.0)
+                        {
+                            wallTemperature[ITT] = temperatures(i, j, k, mTT);
+                            wallTemperature[ITV] = temperatures(i, j, k, mTV);
+                            wallTemperature[ITE] = temperatures(i, j, k, mTE);
+                        }
+                        else
+                        {
+                            wallTemperature[ITT] = (*surfaceTemperature)(indexOfWall, indexOfCell);
+                            wallTemperature[ITV] = wallTemperature[ITT];
+                            wallTemperature[ITE] = wallTemperature[ITT];
+                        }
+                    }
+
+                    //! Obtain the pressure on wall.
+                    wallVariables[IP] = primitiveVariables(i, j, k, IP);
+                    //! Compute Heat conductivity.
+                    RDouble heatConductivity[3] = { 0.0, 0.0, 0.0 };
+                    //! Initialize heat conductivity of translation and rotation.
+                    heatConductivity[ITT] = specificHeatAtConstantPressure * (viscosityLaminar * oPrandtlLaminar + viscosityTurbulence * oPrandtlTurbulence);
+                    wallVariables[IR] = refGama * refMachNumber * refMachNumber * wallVariables[IP] / wallTemperature[ITT];
+
+                    //! Compute the heat rate of the species diffusion, added by Li Peng on Mar 11,2019.
+                    //! Chemical reaction flow.
+                    if (nChemical >= 1)
+                    {
+                        //! The isothermal wall condition and full catalytic condition.
+                        if (ABS(catalyticCoef) <= EPSILON && nBCType != PHENGLEI::ABLATION_SURFACE) //Fully non-catalytic wall.
+                        {
+                            for (int iLaminar = nNSEquation; iLaminar < nNSEquation + nSpecies; ++ iLaminar)
+                            {
+                                wallVariables[iLaminar] = primitiveVariables(i, j, k, iLaminar);
+                            }
+                        }
+                        else //Fully catalytic wall or finite catalytic wall.
+                        {
+                            for (int iLaminar = nNSEquation; iLaminar < nNSEquation + nSpecies; ++ iLaminar)
+                            {
+                                wallVariables[iLaminar] = (*surfaceMassFraction)(indexOfWall, indexOfCell, iLaminar - nNSEquation);
+                            }
+                        }
+
+                        // Compute density on surface.
+                        RDouble massReciprocal = 0.0;
+                        if (nTemperatureModel > 1)    //! Multi-Temperature model.
+                        {
+                            RDouble ceDivideMe = 0.0;
+                            massReciprocal = gas->ComputeMolecularWeightReciprocalWithoutElectron(wallVariables, ceDivideMe);
+                            wallVariables[IR] = wallVariables[IP] / (gasConstant * wallTemperature[ITT] * massReciprocal + gasConstant * wallTemperature[ITE] * ceDivideMe);
+                        }
+                        else     //! One-Temperature model.
+                        {
+                            //! Obtain molecular weight of the mixture gas.
+                            massReciprocal = gas->ComputeMolecularWeightReciprocal(wallVariables);
+                            wallVariables[IR] = wallVariables[IP] / (gasConstant * wallTemperature[ITT] * massReciprocal);
+                        }
+
+                        //! Compute internal energy of ghost cells.
+                        if (nTemperatureModel == 2) // Two-Temperature model.
+                        {
+                            //! Set the internal energy of vibration-eletron on wall.
+                            wallVariables[nLaminar + nChemical] = gas->GetMixedGasVibrationEnergy(wallVariables, wallTemperature[ITV]);
+                            wallVariables[nLaminar + nChemical] += gas->GetMixedGasElectronEnergy(wallVariables, wallTemperature[ITV]);
+                        }
+                        else if (nTemperatureModel == 3)    //! Three-Temperature model.
+                        {
+                            //! Set the internal energy of vibration-eletron on wall.
+                            wallVariables[nLaminar + nChemical] = gas->GetMixedGasVibrationEnergy(wallVariables, wallTemperature[ITV]);
+                            wallVariables[nLaminar + nChemical + 1] = gas->GetMixedGasElectronEnergy(wallVariables, wallTemperature[ITE]);
+                        }
+
+                        //! To obtain the enthalpy of each species.
+                        gas->GetEverySpeciesEnthalpy(wallTemperature[ITT], wallTemperature[ITV], wallTemperature[ITE], speciesEnthalpy);
+
+                        //! To Modify the viscosity on wall.
+                        gas->ComputeViscosityByPrimitive(wallVariables, wallTemperature[ITT], wallTemperature[ITE], nonDimensionalSutherlandTemperature, viscosityLaminar);
+
+                        //! To obtain the mass diffusion coefficients of each species.
+                        gas->GetSpeciesMassDiffusionCoef(wallVariables, viscosityLaminar, viscosityTurbulence, densityDiffusivity);
+
+                        //! To compute heat conductivity of mixture gas using the Eucken formula and Wassilewa formula.
+                        gas->ComputeMixtureGasHeatConductivity(wallVariables, wallTemperature[ITT], wallTemperature[ITV], wallTemperature[ITE], heatConductivity[0], heatConductivity[1], heatConductivity[2]);
+
+                        RDouble diffusionCoefficient = 0.0;
+                        dqdx = 0.0;
+                        dqdy = 0.0;
+                        dqdz = 0.0;
+                        //! Get the partial derivatives of species.
+                        for (int iSpecies = 0; iSpecies < nSpecies; ++ iSpecies)
+                        {
+                            //! To compute the gradients of species density on wall.
+                            RDouble dcdx, dcdy, dcdz;
+                            GetDerivatives(nNSEquation + iSpecies, nSurface, nDim, leftOrRightIndex, i, j, k, ni, nj, nk, primitiveVariables,
+                                faceAreaNormalComponentX, faceAreaNormalComponentY, faceAreaNormalComponentZ, cellVolume, dcdx, dcdy, dcdz);
+                            //! Compute the diffusion coefficient.
+                            diffusionCoefficient = densityDiffusivity[iSpecies] * speciesEnthalpy[iSpecies];
+                            dqdx += diffusionCoefficient * dcdx;
+                            dqdy += diffusionCoefficient * dcdy;
+                            dqdz += diffusionCoefficient * dcdz;
+
+                            //! Compute the mass diffusion energy.
+                            speciesHeat += diffusionCoefficient * (primitiveVariables(i, j, k, nNSEquation + iSpecies) - wallVariables[nNSEquation + iSpecies]) / deltaHeight;
+                        }
+
+                        //! The non-dimensional value of heat rate, to obtain the dimensional value by multiplying the Reynold number.
+                        totalHeatViaGradients += -leftOrRightIndex * (normalComponetX * dqdx + normalComponetY * dqdy + normalComponetZ * dqdz); //The species diffusion energy
+
+                        //! The first method using the difference of the mass fractions in the actual cell and the ghost cell.
+                        totalHeatWall += speciesHeat;
+                    }
+
+                    //! Compute the heat rate caused by the gradient of temperature.
+                    if (viscousType > INVISCID)
+                    {
+                        //! Obtain the partial derivative of temperature.
+                        GetDerivatives(ITT, nSurface, nDim, leftOrRightIndex, i, j, k, ni, nj, nk, temperatures,
+                            faceAreaNormalComponentX, faceAreaNormalComponentY, faceAreaNormalComponentZ, cellVolume, dtdx, dtdy, dtdz);
+                        dqdx = heatConductivity[0] * dtdx;
+                        dqdy = heatConductivity[0] * dtdy;
+                        dqdz = heatConductivity[0] * dtdz;
+                        //! The non-dimensional value of heat rate, to obtain the dimensional value by multiplying the Reynold number.
+                        totalHeatViaGradients += -leftOrRightIndex * (normalComponetX * dqdx + normalComponetY * dqdy + normalComponetZ * dqdz);     //! Used for comparison.
+
+                        //! Compute heat rate on wall caused by gradient of temperature.
+                        transRotationHeat = heatConductivity[0] * (temperatures(i, j, k, ITT) - wallTemperature[ITT]) / deltaHeight;
+                        totalHeatWall += transRotationHeat;
+
+                        if (nTemperatureModel == 2)     //! Two-Temperature model.
+                        {
+                            GetDerivatives(ITV, nSurface, nDim, leftOrRightIndex, i, j, k, ni, nj, nk, temperatures,
+                                faceAreaNormalComponentX, faceAreaNormalComponentY, faceAreaNormalComponentZ, cellVolume, dtdx, dtdy, dtdz);
+                            dqdx = (heatConductivity[ITV] + heatConductivity[ITE]) * dtdx;
+                            dqdy = (heatConductivity[ITV] + heatConductivity[ITE]) * dtdy;
+                            dqdz = (heatConductivity[ITV] + heatConductivity[ITE]) * dtdz;
+                            totalHeatViaGradients += -leftOrRightIndex * (normalComponetX * dqdx + normalComponetY * dqdy + normalComponetZ * dqdz); //! Addition of vibration-electron energy.
+
+                            vibrationHeat = (heatConductivity[ITV] + heatConductivity[ITE]) * (temperatures(i, j, k, ITV) - wallTemperature[ITV]) / deltaHeight;
+                            totalHeatWall += vibrationHeat;
+                        }
+                        else if (nTemperatureModel == 3)    //! Three-Temperature model.
+                        {
+                            GetDerivatives(ITV, nSurface, nDim, leftOrRightIndex, i, j, k, ni, nj, nk, temperatures,
+                                faceAreaNormalComponentX, faceAreaNormalComponentY, faceAreaNormalComponentZ, cellVolume, dtdx, dtdy, dtdz);
+                            dqdx = heatConductivity[ITV] * dtdx;
+                            dqdy = heatConductivity[ITV] * dtdy;
+                            dqdz = heatConductivity[ITV] * dtdz;
+                            totalHeatViaGradients += -leftOrRightIndex * (normalComponetX * dqdx + normalComponetY * dqdy + normalComponetZ * dqdz);// Addition of vibration energy.
+
+                            GetDerivatives(ITE, nSurface, nDim, leftOrRightIndex, i, j, k, ni, nj, nk, temperatures,
+                                faceAreaNormalComponentX, faceAreaNormalComponentY, faceAreaNormalComponentZ, cellVolume, dtdx, dtdy, dtdz);
+                            dqdx = heatConductivity[ITE] * dtdx;
+                            dqdy = heatConductivity[ITE] * dtdy;
+                            dqdz = heatConductivity[ITE] * dtdz;
+                            totalHeatViaGradients += -leftOrRightIndex * (normalComponetX * dqdx + normalComponetY * dqdy + normalComponetZ * dqdz); // Addition of electron energy.
+
+                            vibrationHeat = heatConductivity[ITV] * (temperatures(i, j, k, ITV) - wallTemperature[ITV]) / deltaHeight;
+                            eletronHeat = heatConductivity[ITE] * (temperatures(i, j, k, ITE) - wallTemperature[ITE]) / deltaHeight;
+                            totalHeatWall += vibrationHeat + eletronHeat;
+                        }
+                    }
+
+                    //! Trans the value of the heat rate to the dimensional value.
+                    totalHeatViaGradients *= refHeatFluxDimension;
+                    totalHeatWall *= refHeatFluxDimension;
+                    transRotationHeat *= refHeatFluxDimension;
+                    vibrationHeat *= refHeatFluxDimension;
+                    eletronHeat *= refHeatFluxDimension;
+                    speciesHeat *= refHeatFluxDimension;
+                    //! Trans the non-dimensional values to the dimensional values.
+                    wallVariables[IR] *= refDimensionalDensity;
+                    wallVariables[IP] *= refDynamicPressure;
+                    wallTemperature[ITT] *= refDimensionalTemperature;
+
+                    //! Write to file.
+                    int wordwidth = 20;
+                    oss << setiosflags(ios::left);
+                    oss << setiosflags(ios::scientific);
+                    oss << setprecision(10);
+                    oss << setw(wordwidth) << xCenterWall;
+                    oss << setw(wordwidth) << yCenterWall;
+                    oss << setw(wordwidth) << zCenterWall;
+                    oss << setw(wordwidth) << wallVariables[IR];
+                    oss << setw(wordwidth) << wallVariables[IP];
+                    oss << setw(wordwidth) << wallTemperature[ITT];
+                    oss << setw(wordwidth) << totalHeatViaGradients;
+                    oss << setw(wordwidth) << totalHeatWall;
+                    oss << setw(wordwidth) << transRotationHeat;
+                    oss << setw(wordwidth) << vibrationHeat;
+                    oss << setw(wordwidth) << eletronHeat;
+                    oss << setw(wordwidth) << speciesHeat;
+
+                    for (int iSpecies = 0; iSpecies < nSpecies; ++ iSpecies)
+                    {
+                        oss << setw(wordwidth) << wallVariables[iSpecies + nNSEquation];
+                    }
+                    oss << "\n";
+                    ++ nIndex;
+                    ++ indexOfCell; //Next grid cell.
+                }
+            }
+        }
+        ++ indexOfWall; //Next surface region.
+    }
+
+    //! Deallocate the dynamic memory space.
+    delete[]wallVariables;
+
+    string str = oss.str();
+
+    DataContainer *chemicalSurfaceData = actkey->GetData();
+    chemicalSurfaceData->moveto_begin();
+    chemicalSurfaceData->write(const_cast <char *> (str.data()), str.size() * sizeof(char));
+}
+
+void NSSolverStruct::GetSurfaceHeatingChange(ActionKey *actkey, RDouble &localMaxHeatChange)
+{
+    using namespace IDX;
+    int nDim = GetDim();
+    StructGrid *grid = StructGridCast(GetGrid(actkey->level));
+
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperature = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble *primitiveVarFarfield = reinterpret_cast <RDouble *> (GlobalDataBase::GetDataPtr("prim_inf"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+
+    int viscousType = parameters->GetViscousType();
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+    RDouble3D &cellVolume = *(grid->GetCellVolume());
+
+    RDouble gasConstant = gas->GetUniversalGasConstant();//! The universal gas constant.
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();//! The type of catalytic wall condition.
+    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+    RDouble Twall = parameters->GetWallTemperature();    //! Temperature on wall.
+    RDouble referenceTemperature = parameters->GetRefDimensionalTemperature();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nNSEquation + numberOfSpecies + nTemperatureModel - 1;
+    int wallFunctionType = GlobalDataBase::GetIntParaFromDB("wallFunctionType");
+
+    RDouble2D *surfaceTemperature = NULL;
+    if (Twall >= 0.0)
+    {
+        surfaceTemperature = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+    }
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceSlipVariables"));
+    }
+
+    RDouble2D *firstLayerHeight = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("firstLayerHeight"));
+    RDouble4D &heatTransferCoeff = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("heatTransferCoeff"));
+
+    //! Allocate the dynamic memory space to save the primitive variables on wall.
+    RDouble *wallVariables = new RDouble[nEquation];
+    RDouble nondimTwall = Twall / referenceTemperature;
+    RDouble wallTemperature[3] = { nondimTwall, nondimTwall, nondimTwall };
+    RDouble Qw = 0.0, Qtr = 0.0, Qs = 0.0, Qv = 0.0, Qe = 0.0, prevHeat = 0.0;
+    RDouble maxHeatChangeRatio = 0.0, localHeatChangeRatio = 0.0;
+
+    int nSurfGradMethod = 0;
+    if (GlobalDataBase::IsExist("nSurfGradMethod", PHINT, 1))
+    {
+        nSurfGradMethod = GlobalDataBase::GetIntParaFromDB("nSurfGradMethod");
+    }
+    RDouble gradTx[3] = { 0.0, 0.0, 0.0 }, gradTy[3] = { 0.0, 0.0, 0.0 }, gradTz[3] = { 0.0, 0.0, 0.0 };
+    RDouble gradCx[MAX_SPECIES_NUM] = { 0.0 }, gradCy[MAX_SPECIES_NUM] = { 0.0 }, gradCz[MAX_SPECIES_NUM] = { 0.0 };
+
+    //! The mass fraction of oxygen and nitrogen under the fully catalytic condition.
+    RDouble speciesEnthalpy[MAX_SPECIES_NUM], densityDiffusivity[MAX_SPECIES_NUM];
+    string *speciesName = NULL;
+    RDouble3D *surfaceMassFraction = NULL;
+    if (nChemical > 0 && numberOfSpecies > 0)
+    {
+        speciesName = gas->GetNameOfSpecies();
+        surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+    }
+
+    RDouble3D *surfaceHeatFlux = NULL;
+    int nSurfHeatMonitor = parameters->GetSurfaceHeatingMonitor();
+    if (nSurfHeatMonitor > 0)
+    {
+        surfaceHeatFlux = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceHeatFlux"));
+    }
+
+    //! To obtain the reference values.
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble refVelocity = refDimensionalSonicSpeed * refMachNumber;
+    RDouble refSquareVelocity = refVelocity * refVelocity;
+    RDouble refEnergy = refDimensionalDensity * refVelocity * refSquareVelocity;
+    RDouble refHeatFluxDimension = refEnergy * 0.001; // The dimensional value of total heat flux (kW/m2).
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    //! Obtain the number of boundary condition regions.
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int indexOfWall = 0, indexOfCell = 0, nStagCount = 0;
+    RDouble alpha1 = 4 * PI / 9.0, alpha2 = PI / 2.0;
+    RDouble stagHeat = 0.0; //count the heat flux of stagnation region.
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!IsWall(BCType) && BCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        //! Obtain the surface information.
+        int *s_lr3d = structBC->GetFaceDirectionIndex();
+        int nSurface = structBC->GetFaceDirection() + 1;
+        int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+
+        indexOfCell = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! i, j, k - is first CELL index near SOLID_SURFACE.
+                    //! iWall, jWall, kWall - is NODE index on SOLID_SURFACE.
+                    int iWall, jWall, kWall;
+                    structBC->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                    RDouble normalComponetX = leftOrRightIndex * faceNormalComponentX(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetY = leftOrRightIndex * faceNormalComponentY(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetZ = leftOrRightIndex * faceNormalComponentZ(iWall, jWall, kWall, nSurface);
+
+                    //! The projection of the dy called the distance between the center of the cell and that of the surface on normal vector.
+                    //RDouble deltaHeight = fabs((xCellCenter - xCenterWall) * normalComponetX + (yCellCenter - yCenterWall) * normalComponetY + (zCellCenter - zCenterWall) * normalComponetZ);
+                    RDouble deltaHeight = (*firstLayerHeight)(indexOfWall, indexOfCell);
+
+                    //Compute the collision angle.
+                    RDouble nx = -normalComponetX;
+                    RDouble ny = -normalComponetY;
+                    RDouble nz = -normalComponetZ;
+                    RDouble product = primitiveVarFarfield[IU] * nx + primitiveVarFarfield[IV] * ny + primitiveVarFarfield[IW] * nz;
+                    RDouble modNormal = sqrt(nx * nx + ny * ny + nz * nz);
+                    RDouble modVelocity = sqrt(primitiveVarFarfield[IU] * primitiveVarFarfield[IU] + primitiveVarFarfield[IV] * primitiveVarFarfield[IV] + primitiveVarFarfield[IW] * primitiveVarFarfield[IW]);
+                    RDouble alpha = acos(product / (modVelocity * modNormal)) - PI / 2.0;
+
+                    //! The index of  first ghost cell layer near SOLID_SURFACE.
+                    int iCellGhostLayer = i + s_lr3d[0];
+                    int jCellGhostLayer = j + s_lr3d[1];
+                    int kCellGhostLayer = k + s_lr3d[2];
+
+                    //! To obtain the variables on wall.
+                    wallVariables[IP] = primitiveVars(i, j, k, IP);
+                    if (nSlipBCModel > 0)
+                    {
+                        for (int m = 0; m < 3; ++ m)
+                        {
+                            wallTemperature[m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m);
+                            wallVariables[m + 1] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m + 3);
+                        }
+                    }
+                    else
+                    {
+                        if (viscousType > INVISCID)
+                        {
+                            wallVariables[IU] = 0.0;
+                            wallVariables[IV] = 0.0;
+                            wallVariables[IW] = 0.0;
+                        }
+                        else
+                        {
+                            //The velocity is used to extract the wall streamline, so this velocity is not the real velocity on wall.
+                            wallVariables[IU] = primitiveVars(i, j, k, IU);
+                            wallVariables[IV] = primitiveVars(i, j, k, IV);
+                            wallVariables[IW] = primitiveVars(i, j, k, IW);
+                        }
+
+                        //! Set temperature on wall.
+                        if (Twall < 0.0) //Adabatic wall.
+                        {
+                            wallTemperature[ITT] = temperature(i, j, k, mTT);
+                            wallTemperature[ITV] = temperature(i, j, k, mTV);
+                            wallTemperature[ITE] = temperature(i, j, k, mTE);
+                        }
+                        else //Isothermal wall or radiation equilibrium temperature wall.
+                        {
+                            wallTemperature[ITT] = (*surfaceTemperature)(indexOfWall, indexOfCell);
+                            wallTemperature[ITV] = wallTemperature[ITT];
+                            wallTemperature[ITE] = wallTemperature[ITT];
+                        }
+                    }
+
+                    //! Compute the density on wall using the state equation.
+                    wallVariables[IR] = refGama * refMachNumber * refMachNumber * wallVariables[IP] / wallTemperature[ITT];
+                    if (nChemical >= 1)
+                    {
+                        //! To obtain the mass fraction on wall.
+                        if (ABS(catalyticCoef) <= EPSILON && BCType != PHENGLEI::ABLATION_SURFACE) // Fully non-catalytic wall.
+                        {
+                            for (int s = nNSEquation; s < numberOfSpecies + nNSEquation; ++ s)
+                            {
+                                wallVariables[s] = primitiveVars(i, j, k, s);
+                            }
+                        }
+                        else // Fully catalytic wall or finite catalytic wall.
+                        {
+                            for (int s = nNSEquation; s < numberOfSpecies + nNSEquation; ++ s)
+                            {
+                                wallVariables[s] = (*surfaceMassFraction)(indexOfWall, indexOfCell, s - nNSEquation);
+                            }
+                        }
+
+                        RDouble massReciprocal = 0.0;
+                        if (nTemperatureModel > 1)     //! Multi-Temperature model.
+                        {
+                            RDouble ceDivideMe = 0.0;
+                            massReciprocal = gas->ComputeMolecularWeightReciprocalWithoutElectron(wallVariables, ceDivideMe);
+                            wallVariables[IR] = wallVariables[IP] / (gasConstant * wallTemperature[ITT] * massReciprocal + gasConstant * wallTemperature[ITE] * ceDivideMe);
+                        }
+                        else         //! One-Temperature model.
+                        {
+                            //! Obtain molecular weight of the mixture gas.
+                            massReciprocal = gas->ComputeMolecularWeightReciprocal(wallVariables);
+                            wallVariables[IR] = wallVariables[IP] / (gasConstant * wallTemperature[ITT] * massReciprocal);
+                        }
+                    }
+
+                    RDouble dudx, dudy, dudz, dvdx, dvdy, dvdz, dwdx, dwdy, dwdz;
+                    RDouble dtdx, dtdy, dtdz;
+                    RDouble visLaminar = 0.0, visTurbulence = 0.0;
+                    RDouble heatCoeff = 0.0, heatFlux = 0.0;
+                    if (viscousType > INVISCID)
+                    {
+                        Geometry3D *geometry3D = new Geometry3D;
+
+                        if (nSurface == 1)
+                        {
+                            //! Get i-th face vector on the wall surface.
+                            Get_GEO_I(i, j, k, iWall, iWall, nDim, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in i-direction of u,v,w,T.
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            //DXDYDZ_I(temperature, geometry3D, i, j, k, nDim, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            for (int m = 0; m < nTemperatureModel; ++ m)
+                            {
+                                DXDYDZ_I(temperature, geometry3D, i, j, k, nDim, m, gradTx[m], gradTy[m], gradTz[m], leftOrRightIndex);
+                            }
+                            for (int m = 0; m < numberOfSpecies; ++ m)
+                            {
+                                DXDYDZ_I(primitiveVars, geometry3D, i, j, k, nDim, m + nNSEquation, gradCx[m], gradCy[m], gradCz[m], leftOrRightIndex);
+                            }
+
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(iCellGhostLayer, j, k));
+                            visTurbulence = 0.0;
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(iCellGhostLayer, j, k));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(iCellGhostLayer, j, k, ITT);
+                            }
+                        }
+                        else if (nSurface == 2)
+                        {
+                            //! Get j-th face vector on the wall surface;.
+                            Get_GEO_J(i, j, k, jWall, jWall, nDim, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in j-direction of u,v,w,T.
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            //DXDYDZ_J(temperature, geometry3D, i, j, k, nDim, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            for (int m = 0; m < nTemperatureModel; ++ m)
+                            {
+                                DXDYDZ_J(temperature, geometry3D, i, j, k, nDim, m, gradTx[m], gradTy[m], gradTz[m], leftOrRightIndex);
+                            }
+                            for (int m = 0; m < numberOfSpecies; ++ m)
+                            {
+                                DXDYDZ_J(primitiveVars, geometry3D, i, j, k, nDim, m + nNSEquation, gradCx[m], gradCy[m], gradCz[m], leftOrRightIndex);
+                            }
+
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, jCellGhostLayer, k));
+                            visTurbulence = 0.0;
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, jCellGhostLayer, k));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(i, jCellGhostLayer, k, ITT);
+                            }
+                        }
+                        else
+                        {
+                            //! Get k-th face vector on the wall surface.
+                            Get_GEO_K(i, j, k, kWall, kWall, geometry3D, xfv, yfv, zfv, cellVolume);
+                            //! Get derivative to the wall in k-direction of u,v,w,T.
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IU, dudx, dudy, dudz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IV, dvdx, dvdy, dvdz, leftOrRightIndex);
+                            DXDYDZ_K(primitiveVars, geometry3D, i, j, k, IW, dwdx, dwdy, dwdz, leftOrRightIndex);
+                            //DXDYDZ_K(temperature, geometry3D, i, j, k, nDim, ITT, dtdx, dtdy, dtdz, leftOrRightIndex);
+                            for (int m = 0; m < nTemperatureModel; ++ m)
+                            {
+                                DXDYDZ_K(temperature, geometry3D, i, j, k, m, gradTx[m], gradTy[m], gradTz[m], leftOrRightIndex);
+                            }
+                            for (int m = 0; m < numberOfSpecies; ++ m)
+                            {
+                                DXDYDZ_K(primitiveVars, geometry3D, i, j, k, m + nNSEquation, gradCx[m], gradCy[m], gradCz[m], leftOrRightIndex);
+                            }
+
+                            visLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(i, j, kCellGhostLayer));
+                            visTurbulence = 0.0;
+                            if (wallFunctionType != WALLFUNCTION::NONE)
+                            {
+                                visTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(i, j, kCellGhostLayer));
+                                heatCoeff = heatTransferCoeff(i, j, k, ITT) + heatTransferCoeff(i, j, kCellGhostLayer, ITT);
+                            }
+                        }
+                        dtdx = gradTx[ITT];
+                        dtdy = gradTy[ITT];
+                        dtdz = gradTz[ITT];
+                        RDouble viscousCoef = visLaminar + visTurbulence;
+
+                        //! To Compute the heat flux on wall.
+                        if (nChemical == 0)
+                        {
+                            RDouble kSpecificHeat = (visLaminar * oPrandtlLaminar + visTurbulence * oPrandtlTurbulence) * specificHeatAtConstantPressure;
+                            if (wallFunctionType == WALLFUNCTION::STANDARD)
+                            {
+                                if (abs(heatCoeff) > SMALL)
+                                {
+                                    kSpecificHeat = heatCoeff;
+                                }
+                            }
+                            RDouble qx = kSpecificHeat * dtdx;
+                            RDouble qy = kSpecificHeat * dtdy;
+                            RDouble qz = kSpecificHeat * dtdz;
+                            //! This value is not the real heat rate on wall, it is just the first term on the right side of the energy equation.\n
+                            //! To obtain the real value, hf = nxs * qx + nys * qy + nzs * qz, and hf is just the non-dimensional variables.\n
+                            //! To obtain the dimensional value of heat rate, hf = (nxs * qx + nys * qy + nzs * qz) * (ref_miu * ref_vel^2/ref_len).
+                            heatFlux += -(normalComponetX * qx + normalComponetY * qy + normalComponetZ * qz) * oRefReNumber;
+                        }
+                        else      //! Non-equilibrium gas.
+                        {
+                            //! Compute Heat conductivity.
+                            RDouble heatConductivity[3] = { 0.0, 0.0, 0.0 };
+                            //! To obtain the enthalpy of each species.
+                            gas->GetEverySpeciesEnthalpy(wallTemperature[ITT], wallTemperature[ITV], wallTemperature[ITE], speciesEnthalpy);
+
+                            //! To Modify the viscosity on wall.
+                            gas->ComputeViscosityByPrimitive(wallVariables, wallTemperature[ITT], wallTemperature[ITE], nonDimensionalSutherlandTemperature, visLaminar);
+                            viscousCoef = visLaminar + visTurbulence;
+
+                            //! To obtain the mass diffusion coefficients of each species.
+                            gas->GetSpeciesMassDiffusionCoef(wallVariables, visLaminar, visTurbulence, densityDiffusivity);
+
+                            //! To compute heat conductivity of mixture gas using the Eucken formula and Wassilewa formula.
+                            gas->ComputeMixtureGasHeatConductivity(wallVariables, wallTemperature[ITT], wallTemperature[ITV], wallTemperature[ITE], heatConductivity[ITT], heatConductivity[ITV], heatConductivity[ITE]);
+
+                            if (nSurfGradMethod > 0)
+                            {
+                                //! Compute the heat flux caused by the gradient of translation-rotation temperature near wall.
+                                Qtr = -heatConductivity[ITT] * (normalComponetX * gradTx[ITT] + normalComponetY * gradTy[ITT] + normalComponetZ * gradTz[ITT]) * oRefReNumber;
+
+                                //! Compute the heat flux caused by the gradient of species enthalpies near wall.
+                                Qs = 0.0;
+                                for (int s = 0; s < numberOfSpecies; ++ s)
+                                {
+                                    //! Compute the diffusion coefficient.
+                                    RDouble diffusionCoefficient = densityDiffusivity[s] * speciesEnthalpy[s];
+                                    //! Compute the mass diffusion energy.
+                                    Qs += -diffusionCoefficient * (normalComponetX * gradCx[s] + normalComponetY * gradCy[s] + normalComponetZ * gradCz[s]);
+                                }
+                                Qs *= oRefReNumber;
+
+                                //! Compute the heat flux caused by the gradient of vibration-electron temperature near wall.
+                                Qv = 0.0;
+                                Qe = 0.0;
+                                if (nTemperatureModel == 2)
+                                {
+                                    Qv = -(heatConductivity[ITV] + heatConductivity[ITE]) * (normalComponetX * gradTx[ITV] + normalComponetY * gradTy[ITV] + normalComponetZ * gradTz[ITV]) * oRefReNumber;
+                                }
+                                else if (nTemperatureModel == 3)
+                                {
+                                    Qv = -heatConductivity[ITV] * (normalComponetX * gradTx[ITV] + normalComponetY * gradTy[ITV] + normalComponetZ * gradTz[ITV]) * oRefReNumber;
+                                    Qe = -heatConductivity[ITE] * (normalComponetX * gradTx[ITE] + normalComponetY * gradTy[ITE] + normalComponetZ * gradTz[ITE]) * oRefReNumber;
+                                }
+                            }
+                            else
+                            {
+                                //! Compute the heat flux caused by the gradient of translation-rotation temperature near wall.
+                                Qtr = heatConductivity[ITT] * (temperature(i, j, k, ITT) - wallTemperature[ITT]) / deltaHeight * oRefReNumber;
+
+                                //! Compute the heat flux caused by the gradient of species enthalpies near wall.
+                                Qs = 0.0;
+                                for (int s = 0; s < numberOfSpecies; ++ s)
+                                {
+                                    //! Compute the diffusion coefficient.
+                                    RDouble diffusionCoefficient = densityDiffusivity[s] * speciesEnthalpy[s];
+                                    //! Compute the mass diffusion energy.
+                                    Qs += diffusionCoefficient * (primitiveVars(i, j, k, nNSEquation + s) - wallVariables[nNSEquation + s]) / deltaHeight;
+                                }
+                                Qs *= oRefReNumber;
+
+                                //! Compute the heat flux caused by the gradient of vibration-electron temperature near wall.
+                                Qv = 0.0;
+                                Qe = 0.0;
+                                if (nTemperatureModel == 2)
+                                {
+                                    Qv = (heatConductivity[ITV] + heatConductivity[ITE]) * (temperature(i, j, k, ITV) - wallTemperature[ITV]) / deltaHeight * oRefReNumber;
+                                }
+                                else if (nTemperatureModel == 3)
+                                {
+                                    Qv = heatConductivity[ITV] * (temperature(i, j, k, ITV) - wallTemperature[ITV]) / deltaHeight * oRefReNumber;
+                                    Qe = heatConductivity[ITE] * (temperature(i, j, k, ITE) - wallTemperature[ITE]) / deltaHeight * oRefReNumber;
+                                }
+                            }
+
+                            //! Set the total heat flux on wall.
+                            heatFlux = Qtr + Qs + Qv + Qe;
+                            Qtr *= refHeatFluxDimension;
+                            Qs *= refHeatFluxDimension;
+                            Qv *= refHeatFluxDimension;
+                            Qe *= refHeatFluxDimension;
+                        }
+                        //The dimensional value of total surface heating ratio.
+                        Qw = heatFlux * refHeatFluxDimension;
+                        delete geometry3D;
+                    }
+
+                    prevHeat = (*surfaceHeatFlux)(indexOfWall, indexOfCell, 0);
+                    deltaHeight = heatFlux - prevHeat;
+                    if (fabs(prevHeat) <= EPSILON)
+                    {
+                        localHeatChangeRatio = fabs(deltaHeight / EPSILON);
+                    }
+                    else
+                    {
+                        localHeatChangeRatio = fabs(deltaHeight / prevHeat);
+                    }
+                    (*surfaceHeatFlux)(indexOfWall, indexOfCell, 0) = heatFlux;
+                    (*surfaceHeatFlux)(indexOfWall, indexOfCell, 1) = deltaHeight;
+
+                    maxHeatChangeRatio = MAX(maxHeatChangeRatio, localHeatChangeRatio);
+
+                    //! Obtain the heat flux of stagnation point.
+                    if (alpha >= alpha1 && alpha <= alpha2) //Find the stagnation region.
+                    {
+                        stagHeat += heatFlux;
+                        ++ nStagCount;
+                    }
+
+                    //! Next grid cell.
+                    ++ indexOfCell;
+                }//! i end
+            }//! j end
+        }//! k end
+        ++ indexOfWall; //! Next surface region.
+    }//! iBCRegion end
+
+    RDouble stagPointHeat = 0.0;
+    if (nStagCount > 0)
+    {
+        stagPointHeat = stagHeat / nStagCount;
+    }
+    localMaxHeatChange = maxHeatChangeRatio;
+}
+
+void NSSolverStruct::WriteSurfaceInfo(ActionKey *actkey)
+{
+    StructGrid *grid = StructGridCast(GetGrid(actkey->level));
+    int nSurfaceCell = grid->GetNumberOfWallCell();
+    if (nSurfaceCell == 0)
+    {
+        return;
+    }
+
+    RDouble4D &faceArea = *(grid->GetFaceArea());
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble temperatureWall = parameters->GetWallTemperature();
+    RDouble2D *surfaceTemperature = NULL;
+    if (temperatureWall >= 0.0)
+    {
+        surfaceTemperature = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+    }
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble refTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble refLenth = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+    RDouble refAera = refLenth * refLenth;
+
+    std::ostringstream oss;
+    using namespace IDX;
+    vector<string> title_tecplot;
+    title_tecplot.push_back("title=\"Surface Information of PHengLEI\"");
+    title_tecplot.push_back("variables=");
+    title_tecplot.push_back("\"x\"");
+    title_tecplot.push_back("\"y\"");
+    title_tecplot.push_back("\"z\"");
+    title_tecplot.push_back("\"T\"");
+    title_tecplot.push_back("\"S\"");
+
+    int nDim = GetDim();
+    int js = 1;
+    int ks = 1;
+    if (nDim == 2)
+    {
+        ks = 0;
+        refAera = refLenth;
+    }
+    if (nDim == 1)
+    {
+        js = 0;
+    }
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    //! Obtain the number of boundary condition regions.
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int nIndex = 0, indexOfWall = 0, indexOfCell = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int nBCType = structBC->GetBCType();
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (!IsWall(nBCType))
+        {
+            nIndex += (ied - ist + 1) * (jed - jst + 1) * (ked - kst + 1);
+            continue;
+        }
+
+        //! Obtain the surface information.
+        int nSurface = structBC->GetFaceDirection() + 1;
+
+        //! Write the title information.
+        for (std::size_t i = 0; i < title_tecplot.size(); ++ i)
+        {
+            oss << title_tecplot[i] << "\n";
+        }
+        oss << "zone  i = " << ied - ist + 1
+            << " j = " << jed - jst + 1
+            << " k = " << ked - kst + 1
+            << " f = point " << " \n";
+
+        RDouble Tw = 1.0, surfaceAera = SMALL;
+        indexOfCell = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! i, j, k - is first CELL index near SOLID_SURFACE.
+                    //! iWall, jWall, kWall - is NODE index on SOLID_SURFACE.
+                    int iWall, jWall, kWall;
+                    structBC->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                    //! Obtain the surface aera.
+                    surfaceAera = faceArea(iWall, jWall, kWall, nSurface);
+                    RDouble xCenterWall, yCenterWall, zCenterWall;
+                    grid->FaceCoor(iWall, jWall, kWall, nSurface, xCenterWall, yCenterWall, zCenterWall);
+
+                    //! Obtain the temperature on wall.
+                    if (temperatureWall >= 0.0)
+                    {
+                        Tw = (*surfaceTemperature)(indexOfWall, indexOfCell);
+                    }
+                    else
+                    {
+                        Tw = temperatures(i, j, k, ITT);
+                    }
+                    Tw *= refTemperature;
+                    surfaceAera *= refAera;
+
+                    //! Write to file.
+                    int wordwidth = 20;
+                    oss << setiosflags(ios::left);
+                    oss << setiosflags(ios::scientific);
+                    oss << setprecision(10);
+                    oss << setw(wordwidth) << xCenterWall;
+                    oss << setw(wordwidth) << yCenterWall;
+                    oss << setw(wordwidth) << zCenterWall;
+                    oss << setw(wordwidth) << Tw;
+                    oss << setw(wordwidth) << surfaceAera;
+                    oss << "\n";
+
+                    ++ nIndex;
+                    ++ indexOfCell; //! Next grid cell.
+                }
+            }
+        }
+        ++ indexOfWall; //! Next surface region.
+    }
+
+    string str = oss.str();
+    DataContainer *chemicalSurfaceData = actkey->GetData();
+    chemicalSurfaceData->moveto_begin();
+    chemicalSurfaceData->write(const_cast <char *> (str.data()), str.size() * sizeof(char));
+}
+
+void NSSolverStruct::GetResidual(ActionKey *actkey)
+{
+    int level = actkey->level;
+    int nEquation = GetNumberOfEquations();
+
+    StructGrid *grid = StructGridCast(GetGrid(level));
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+
+    PHSPACE::ComputeResidualonGrid(grid, actkey, residual, nEquation);
+}
+
+void NSSolverStruct::GetResidual(ActionKey *actkey, RDouble &localMaxRes)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+
+    int varIndex = 0;
+    if (GlobalDataBase::IsExist("nKeyVariableIndex", PHINT, 1))
+    {
+        varIndex = GlobalDataBase::GetIntParaFromDB("nKeyVariableIndex");
+    }
+
+    RDouble *maxResidualVariation = reinterpret_cast <RDouble *> (grid->GetDataPtr("maxResidualVariation"));
+
+    localMaxRes = maxResidualVariation[varIndex];
+}
+
+void NSSolverStruct::GetResidual(Grid *gridIn, RDouble &localMaxRes)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    
+    int varIndex = 0;
+    if (GlobalDataBase::IsExist("nKeyVariableIndex", PHINT, 1))
+    {
+        varIndex = GlobalDataBase::GetIntParaFromDB("nKeyVariableIndex");
+    }
+
+    RDouble *maxResidualVariation = reinterpret_cast <RDouble *> (grid->GetDataPtr("maxResidualVariation"));
+
+    localMaxRes = maxResidualVariation[varIndex];
+}
+
+void NSSolverStruct::ObtainCFLNumber(Grid *gridIn, RDouble &globalMinCFL, RDouble &globalMaxCFL)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    RDouble3D *localCFL = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("localCFL"));
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    globalMinCFL = LARGE;
+    globalMaxCFL = SMALL;
+    RDouble cfl = 0.0;
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                cfl = (*localCFL)(i, j, k);
+                globalMinCFL = MIN(globalMinCFL, cfl);
+                globalMaxCFL = MAX(globalMaxCFL, cfl);
+            }
+        }
+    }
+}
+
+void NSSolverStruct::ComputeVorticitybyQCriteria(Grid *gridIn, RDouble3D *&XVorticity, RDouble3D *&YVorticity, RDouble3D *&ZVorticity, RDouble3D *&vorticityMagnitude, RDouble3D *&strainRate, RDouble3D *&QCriteria)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    using namespace IDX;
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                RDouble dudx = gradUVWTCellCenterX(i, j, k, 0);
+                RDouble dudy = gradUVWTCellCenterY(i, j, k, 0);
+                RDouble dudz = gradUVWTCellCenterZ(i, j, k, 0);
+
+                RDouble dvdx = gradUVWTCellCenterX(i, j, k, 1);
+                RDouble dvdy = gradUVWTCellCenterY(i, j, k, 1);
+                RDouble dvdz = gradUVWTCellCenterZ(i, j, k, 1);
+
+                RDouble dwdx = gradUVWTCellCenterX(i, j, k, 2);
+                RDouble dwdy = gradUVWTCellCenterY(i, j, k, 2);
+                RDouble dwdz = gradUVWTCellCenterZ(i, j, k, 2);
+
+                RDouble s11 = dudx;
+                RDouble s22 = dvdy;
+                RDouble s33 = dwdz;
+                RDouble s12 = half * (dudy + dvdx);
+                RDouble s13 = half * (dudz + dwdx);
+                RDouble s23 = half * (dvdz + dwdy);
+                RDouble S = two * (s11 * s11 + s22 * s22 + s33 * s33 + two * (s12 * s12 + s13 * s13 + s23 * s23));
+                S = sqrt(S);
+                (*strainRate)(i, j, k) = S;
+
+                RDouble Omx = dwdy - dvdz;
+                RDouble Omy = dudz - dwdx;
+                RDouble Omz = dvdx - dudy;
+                RDouble Om = DISTANCE(Omx, Omy, Omz);
+
+                (*XVorticity)(i, j, k) = Omx;
+                (*YVorticity)(i, j, k) = Omy;
+                (*ZVorticity)(i, j, k) = Omz;
+                (*vorticityMagnitude)(i, j, k) = Om;
+
+                (*QCriteria)(i, j, k) = fourth * (Om * Om - S * S);
+
+            }
+        }
+    }
+}
+
+void NSSolverStruct::ComputeCp(Grid *gridIn, RDouble4D *&pressureCoef)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Range M(0, 0);
+
+    pressureCoef = new RDouble4D(I, J, K, M, fortranArray);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    using namespace IDX;
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    RDouble presureFarfield = primitiveVarFarfield[IP];
+
+    int m = 0;
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                (*pressureCoef)(i, j, k, m) = two * (primitiveVars(i, j, k, IP) - presureFarfield);
+            }
+        }
+    }
+}
+
+    RDouble4D *NSSolverStruct::ComputePrimitiveVariablesWithMoleFraction(Grid *gridIn)
+    {
+        StructGrid *grid = StructGridCast(gridIn);
+        int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();
+
+        Range I, J, K;
+        GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+        int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+        grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+        RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+        using namespace IDX;
+        using namespace GAS_SPACE;
+        Param_NSSolverStruct *parameters = GetControlParameters();
+        int nm = parameters->GetNSEquationNumber();
+        int nSpeciesNumber = parameters->GetNumberOfSpecies();
+
+        Range M(0, nSpeciesNumber - 1);
+
+        RDouble4D *moleFraction = new RDouble4D(I, J, K, M, fortranArray);
+
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    RDouble *massFractionTemp = new RDouble[nSpeciesNumber];
+                    RDouble *moleFractionTemp = new RDouble[nSpeciesNumber];
+                    for (int m = 0; m < nSpeciesNumber; ++ m)
+                    {
+                        massFractionTemp[m] = primitiveVars(i, j, k, nm + m);
+                    }
+                    gas->ComputeMoleFractionByMassFraction(massFractionTemp,moleFractionTemp);
+
+                    for (int m = 0; m < nSpeciesNumber; ++ m)
+                    {
+                        (*moleFraction)(i, j, k, m) = moleFractionTemp[m];
+                    }
+                    delete []massFractionTemp;
+                    delete []moleFractionTemp;
+                }
+            }
+        }
+        return moleFraction;
+    }
+
+RDouble4D *NSSolverStruct::ComputeDimensionalVariables(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    //! Allocate the memories for density, pressure, temperature and the number density of electron.
+    Range M(0, 5);
+    RDouble4D *dimensionalVariables = new RDouble4D(I, J, K, M, fortranArray);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble refDensity = parameters->GetRefDimensionalDensity();
+    RDouble refTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble refVelocity = parameters->GetRefDimensionalVelocity();//parameters->GetRefMachNumber() * parameters->GetRefDimensionalSonicSpeed();
+    RDouble refPressure = refDensity * refVelocity * refVelocity;
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                //! Compute the dimensional density.
+                (*dimensionalVariables)(i, j, k, 0) = refDensity * primitiveVars(i, j, k, IR);
+
+                //! Compute the dimensional velocity.
+                (*dimensionalVariables)(i, j, k, 1) = refVelocity * primitiveVars(i, j, k, IU);
+                (*dimensionalVariables)(i, j, k, 2) = refVelocity * primitiveVars(i, j, k, IV);
+                (*dimensionalVariables)(i, j, k, 3) = refVelocity * primitiveVars(i, j, k, IW);
+
+                //! Compute the dimensional pressure.
+                (*dimensionalVariables)(i, j, k, 4) = refPressure * primitiveVars(i, j, k, IP);
+
+                //! Compute the dimensional temperature.
+                (*dimensionalVariables)(i, j, k, 5) = refTemperature * temperatures(i, j, k, ITT);
+            }
+        }
+    }
+
+    return dimensionalVariables;
+}
+
+RDouble4D *NSSolverStruct::ComputeDimensionalElectron(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    //! Allocate the memories for density, pressure, temperature and the number density of electron.
+    Range M(0, 0);
+    RDouble4D *tmpArray = new RDouble4D(I, J, K, M, fortranArray);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble refDensity = parameters->GetRefDimensionalDensity();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int indexOfElectron = parameters->GetIndexOfElectron();
+
+    RDouble rho = 0.0, Ce = 0.0;
+    if (indexOfElectron >= 0)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    //! Compute the dimensional density.
+                    rho = refDensity * primitiveVars(i, j, k, IR);
+
+                    //! Compute the number density of electron.
+                    Ce = primitiveVars(i, j, k, nNSEquation + indexOfElectron);
+
+                    (*tmpArray)(i, j, k, 0) = MAX(1.0e-25, rho * Ce * AVOGADRO_CONSTANT / 5.486e-7);
+                }
+            }
+        }
+    }
+    else
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    (*tmpArray)(i, j, k, 0) = 0.0;
+                }
+            }
+        }
+    }
+
+    return tmpArray;
+}
+
+RDouble4D *NSSolverStruct::ComputeNonequiliriumNumber(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    //Allocate the memories for the non-equilibrium number.
+    Range M(0, 1);
+    RDouble4D *tmpArray = new RDouble4D(I, J, K, M, fortranArray);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    RDouble4D *timeScale;
+    RDouble3D *damkohlerNumber = NULL;
+    RDouble3D *vibNoneqNumber = NULL;
+    FluidParameter refParam;
+    gas->GetReferenceParameters(refParam);
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    int nUseNoneqCond = parameters->GetNonequilibriumConditionFlag();
+    if (nUseNoneqCond > 0)
+    {
+        timeScale = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("timeScale"));
+        if (nChemical > 0)
+        {
+            damkohlerNumber = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("DamkohlerNumber"));
+            vibNoneqNumber = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("VibNoneqNumber"));
+        }
+    }
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                (*tmpArray)(i, j, k, 0) = 0.0;
+                (*tmpArray)(i, j, k, 1) = 0.0;
+                if (nChemical > 0&& nUseNoneqCond > 0)
+                {
+                    (*tmpArray)(i, j, k, 0) = (*damkohlerNumber)(i, j, k);
+                    (*tmpArray)(i, j, k, 1) = (*vibNoneqNumber)(i, j, k);
+                }
+            }
+        }
+    }
+
+    return tmpArray;
+}
+RDouble4D *NSSolverStruct::ComputeMachNumberField(Grid *gridIn)
+{
+    const RDouble gamma = 1.4;
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+    Range M(0, 0);
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D *mach = new RDouble4D(I, J, K, M, fortranArray);
+
+    using namespace IDX;
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    int m = 0;
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                RDouble rm = q(i, j, k, IR);
+                RDouble um = q(i, j, k, IU);
+                RDouble vm = q(i, j, k, IV);
+                RDouble wm = q(i, j, k, IW);
+                RDouble pm = q(i, j, k, IP);
+                RDouble c2 = abs(gamma * pm / (rm + SMALL));
+                RDouble v2 = um * um + vm * vm + wm * wm;
+
+                (*mach)(i, j, k, m) = sqrt(v2 / (c2 + SMALL));
+            }
+        }
+    }
+
+    return mach;
+}
+
+RDouble4D *NSSolverStruct::CompMachNodeNumber(Grid *gridIn, Post_Visual *postVisualization)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, 0, I, J, K);
+    Range M(0, 0);
+
+    RDouble4D *r = (RDouble4D *)postVisualization->GetVisualNodeVarPtr("density");
+    RDouble4D *u = (RDouble4D *)postVisualization->GetVisualNodeVarPtr("u");
+    RDouble4D *v = (RDouble4D *)postVisualization->GetVisualNodeVarPtr("v");
+    RDouble4D *w = (RDouble4D *)postVisualization->GetVisualNodeVarPtr("w");
+    RDouble4D *p = (RDouble4D *)postVisualization->GetVisualNodeVarPtr("pressure");
+    RDouble4D *gama = (RDouble4D *)postVisualization->GetVisualNodeVarPtr("gama");
+
+    RDouble4D *mach = new RDouble4D(I, J, K, M, fortranArray);
+
+    int iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd;
+    grid->GetNodeIterationIndex(iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd);
+
+    int m = 0;
+    for (int k = kNodeStart; k <= kNodeEnd; ++k)
+    {
+        for (int j = jNodeStart; j <= jNodeEnd; ++j)
+        {
+            for (int i = iNodeStart; i <= iNodeEnd; ++i)
+            {
+                RDouble rm = (*r)(i, j, k, 0);
+                RDouble um = (*u)(i, j, k, 0);
+                RDouble vm = (*v)(i, j, k, 0);
+                RDouble wm = (*w)(i, j, k, 0);
+                RDouble pm = (*p)(i, j, k, 0);
+                RDouble c2 = abs((*gama)(i, j, k, 0) * pm / (rm + SMALL));
+                RDouble v2 = um * um + vm * vm + wm * wm;
+
+                (*mach)(i, j, k, m) = sqrt(v2 / (c2 + SMALL));
+            }
+        }
+    }
+
+    if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_GAMA)))
+    {
+        delete gama;
+    }
+
+    if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DENSITY)))
+    {
+        delete r;
+    }
+
+    if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_U)))
+    {
+        delete u;
+    }
+
+    if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_V)))
+    {
+        delete v;
+    }
+
+    if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_W)))
+    {
+        delete w;
+    }
+
+    if (!(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_PRESSURE)))
+    {
+        delete p;
+    }
+
+    return mach;
+}
+
+RDouble4D *NSSolverStruct::CompMachNumber(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+    Range M(0, 0);
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &gama = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble4D *mach = new RDouble4D(I, J, K, M, fortranArray);
+
+    using namespace IDX;
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    int m = 0;
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                RDouble rm = q(i, j, k, IR);
+                RDouble um = q(i, j, k, IU);
+                RDouble vm = q(i, j, k, IV);
+                RDouble wm = q(i, j, k, IW);
+                RDouble pm = q(i, j, k, IP);
+                RDouble c2 = abs(gama(i, j, k) * pm / (rm + SMALL));
+                RDouble v2 = um * um + vm * vm + wm * wm;
+
+                (*mach)(i, j, k, m) = sqrt(v2 / (c2 + SMALL));
+            }
+        }
+    }
+
+    return mach;
+}
+
+void NSSolverStruct::VisualizationAverageFlow(ActionKey *actkey)
+{
+
+}
+
+//! Restrict from fine to coarse grid for all q.
+void NSSolverStruct::RestrictAllQ(Grid *fineGridIn, Grid *coarseGridIn)
+{
+    StructGrid *fineGrid = StructGridCast(fineGridIn);
+    StructGrid *coarseGrid = StructGridCast(coarseGridIn);
+
+    int coarseNi = coarseGrid->GetNI();
+    int coarseNj = coarseGrid->GetNJ();
+    int coarseNk = coarseGrid->GetNK();
+
+    RDouble4D &finePrimitiveVars = *reinterpret_cast <RDouble4D *> (fineGrid->GetDataPtr("q"));
+    RDouble4D &coarsePrimitiveVars = *reinterpret_cast <RDouble4D *> (coarseGrid->GetDataPtr("q"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    //! Zero Setting.
+    coarsePrimitiveVars = 0.0;
+    RestrictQ(fineGrid, finePrimitiveVars, coarseGrid, coarsePrimitiveVars, nEquation);
+    //coarseGrid->GhostCell3DExceptInterface(coarsePrimitiveVars, nEquation);
+    //GhostCell3D(coarsePrimitiveVars, coarseNi, coarseNj, coarseNk, nEquation);
+
+    RDouble3D &fineGama = *reinterpret_cast <RDouble3D *> (fineGrid->GetDataPtr("gama"));
+    RDouble3D &coarseGama = *reinterpret_cast <RDouble3D *> (coarseGrid->GetDataPtr("gama"));
+    RestrictQ(fineGrid, fineGama, coarseGrid, coarseGama);
+    //GhostCell3D(coarseGama, coarseNi, coarseNj, coarseNk);
+
+    int viscousType = parameters->GetViscousType();
+    if (viscousType > INVISCID)
+    {
+        RDouble3D &fineViscosityLaminar = *reinterpret_cast <RDouble3D *> (fineGrid->GetDataPtr("visl"));
+        RDouble3D &coarseViscosityLaminar = *reinterpret_cast <RDouble3D *> (coarseGrid->GetDataPtr("visl"));
+        coarseViscosityLaminar = 0.0;
+        RestrictQ(fineGrid, fineViscosityLaminar, coarseGrid, coarseViscosityLaminar);
+
+        GhostCell3D(coarseViscosityLaminar, coarseNi, coarseNj, coarseNk);
+
+        if (viscousType > LAMINAR)
+        {
+            RDouble3D &fineViscosityTurbulence = *reinterpret_cast <RDouble3D *> (fineGrid->GetDataPtr("vist"));
+            RDouble3D &coarseViscosityTurbulence = *reinterpret_cast <RDouble3D *> (coarseGrid->GetDataPtr("vist"));
+            coarseViscosityTurbulence = 0.0;
+            RestrictQ(fineGrid, fineViscosityTurbulence, coarseGrid, coarseViscosityTurbulence);
+
+            GhostCell3D(coarseViscosityTurbulence, coarseNi, coarseNj, coarseNk);
+            //coarseGrid->GhostCell3DExceptInterface(coarseViscosityTurbulence);
+        }
+    }
+}
+
+//! Restrict defect from fine to coarse grid.
+void NSSolverStruct::RestrictDefect(Grid *fineGridIn, Grid *coarseGridIn)
+{
+    StructGrid *fineGrid = StructGridCast(fineGridIn);
+    StructGrid *coarseGrid = StructGridCast(coarseGridIn);
+
+    //! The following statement is important.
+    ZeroResiduals(coarseGrid);
+
+    RDouble4D &coarseResidual = *reinterpret_cast <RDouble4D *> (coarseGrid->GetDataPtr("res"));
+    RDouble4D &fineResidual = *reinterpret_cast <RDouble4D *> (fineGrid->GetDataPtr("res"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nEquation = GetNumberOfEquations();
+
+    int coarseNi = coarseGrid->GetNI();
+    int coarseNj = coarseGrid->GetNJ();
+    int coarseNk = coarseGrid->GetNK();
+
+    int iMultigrid = fineGrid->GetMultigridStepI();
+    int jMultigrid = fineGrid->GetMultigridStepJ();
+    int kMultigrid = fineGrid->GetMultigridStepK();
+
+    int id = iMultigrid / 2;
+    int jd = jMultigrid / 2;
+    int kd = kMultigrid / 2;
+
+    Range I(1, MAX(coarseNi - 1, 1));
+    Range J(1, MAX(coarseNj - 1, 1));
+    Range K(1, MAX(coarseNk - 1, 1));
+    Range M(0, nEquation - 1);
+
+    RDouble coeff = eighth * static_cast<RDouble>(iMultigrid * jMultigrid * kMultigrid);
+
+    int i0, j0, k0, i, j, k, ip, jp, kp;
+    for (k0 = K.first(); k0 <= K.last(); ++ k0)
+    {
+        k = (k0 - 1) * kMultigrid + 1;
+        kp = k + kd;
+        for (j0 = J.first(); j0 <= J.last(); ++ j0)
+        {
+            j = (j0 - 1) * jMultigrid + 1;
+            jp = j + jd;
+            for (i0 = I.first(); i0 <= I.last(); ++ i0)
+            {
+                i = (i0 - 1) * iMultigrid + 1;
+                ip = i + id;
+                for (int iLaminar = 0; iLaminar < nLaminar; ++ iLaminar)
+                {
+                    coarseResidual(i0, j0, k0, iLaminar) -= coeff * (fineResidual(i, j, k, iLaminar) + fineResidual(ip, j, k, iLaminar)
+                        + fineResidual(ip, jp, k, iLaminar) + fineResidual(i, jp, k, iLaminar)
+                        + fineResidual(i, j, kp, iLaminar) + fineResidual(ip, j, kp, iLaminar)
+                        + fineResidual(ip, jp, kp, iLaminar) + fineResidual(i, jp, kp, iLaminar));
+                }
+            }
+        }
+    }
+}
+
+//! Put correction back on the coarse grid.
+void NSSolverStruct::PutCorrectionBack(Grid *grid, FieldProxy *qProxy)
+{
+    RDouble4D &qold = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &q = qProxy->GetField_STR();
+    qold += q;
+}
+
+//! Correct variable in fine grid using correction in coarse grid.
+void NSSolverStruct::CorrectFineGrid(Grid *fineGridIn, Grid *coarseGridIn)
+{
+    StructGrid *fineGrid = StructGridCast(fineGridIn);
+    StructGrid *coarseGrid = StructGridCast(coarseGridIn);
+
+    RDouble4D &finePrimitiveVars = *reinterpret_cast <RDouble4D *> (fineGrid->GetDataPtr("q"));
+
+    int fineNi = fineGrid->GetNI();
+    int fineNj = fineGrid->GetNJ();
+    int fineNk = fineGrid->GetNK();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int mgProlongationType = parameters->GetMgProlongationType();
+
+    int nEquation = GetNumberOfEquations();
+
+    Range I, J, K;
+    GetRange(fineNi, fineNj, fineNk, -2, 1, I, J, K);
+    Range M(0, nEquation - 1);
+
+    if (fineNk == 1)
+    {
+        K.setRange(1, 1);
+    }
+
+    RDouble4D work(I, J, K, M, fortranArray);
+
+    FieldProxy *workProxy = new FieldProxy();
+    workProxy->SetField_STR(&work);
+
+    FieldProxy *finePrimitiveVarsProxy = new FieldProxy();
+    finePrimitiveVarsProxy->SetField_STR(&finePrimitiveVars);
+
+    if (mgProlongationType == 1)
+    {
+        prol(fineGrid, coarseGrid, workProxy);
+    }
+    else if (mgProlongationType == 2)
+    {
+        prolhic_eric(fineGrid, coarseGrid, workProxy);
+    }
+
+    //! Perform 'w = w + work' to update the state vector.
+    PositiveUpdate(fineGrid, finePrimitiveVarsProxy, workProxy);
+
+    delete finePrimitiveVarsProxy;
+    delete workProxy;
+}
+
+void NSSolverStruct::InterpolatFineGrid(Grid *fineGridIn, Grid *coarseGridIn)
+{
+    StructGrid *fineGrid = StructGridCast(fineGridIn);
+    StructGrid *coarseGrid = StructGridCast(coarseGridIn);
+
+    RDouble4D &finePrimitiveVars = *reinterpret_cast <RDouble4D *> (fineGrid->GetDataPtr("q"));
+    RDouble4D &coarsePrimitiveVars = *reinterpret_cast <RDouble4D *> (coarseGrid->GetDataPtr("q"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    InterpolatQ(fineGrid, finePrimitiveVars, coarseGrid, coarsePrimitiveVars, nEquation);
+
+    RDouble3D &fineGama = *reinterpret_cast <RDouble3D *> (fineGrid->GetDataPtr("gama"));
+    RDouble3D &coarseGama = *reinterpret_cast <RDouble3D *> (coarseGrid->GetDataPtr("gama"));
+    InterpolatQ(fineGrid, fineGama, coarseGrid, coarseGama);
+
+    int viscousType = parameters->GetViscousType();
+    if (viscousType > INVISCID)
+    {
+        RDouble3D &fineViscosityLaminar = *reinterpret_cast <RDouble3D *> (fineGrid->GetDataPtr("visl"));
+        RDouble3D &coarseViscosityLaminar = *reinterpret_cast <RDouble3D *> (coarseGrid->GetDataPtr("visl"));
+        InterpolatQ(fineGrid, fineViscosityLaminar, coarseGrid, coarseViscosityLaminar);
+
+        if (viscousType > LAMINAR)
+        {
+            RDouble3D &fineViscosityTurbulence = *reinterpret_cast <RDouble3D *> (fineGrid->GetDataPtr("vist"));
+            RDouble3D &coarseViscosityTurbulence = *reinterpret_cast <RDouble3D *> (coarseGrid->GetDataPtr("vist"));
+            InterpolatQ(fineGrid, fineViscosityTurbulence, coarseGrid, coarseViscosityTurbulence);
+        }
+    }
+}
+
+void NSSolverStruct::prol(Grid *fineGridIn, Grid *coarseGridIn, FieldProxy *workProxy)
+{
+    StructGrid *fineGrid = StructGridCast(fineGridIn);
+    StructGrid *coarseGrid = StructGridCast(coarseGridIn);
+
+    RDouble4D &work = workProxy->GetField_STR();
+
+    RDouble4D &coarsePrimitiveVars = *reinterpret_cast <RDouble4D *> (coarseGrid->GetDataPtr("q"));
+
+    int nEquation = GetNumberOfEquations();
+
+    int fineNi = fineGrid->GetNI();
+    int fineNj = fineGrid->GetNJ();
+    int fineNk = fineGrid->GetNK();
+
+    int coarseNi = coarseGrid->GetNI();
+    int coarseNj = coarseGrid->GetNJ();
+    int coarseNk = coarseGrid->GetNK();
+
+    int iMultigridStep = fineGrid->GetMultigridStepI();
+    int jMultigridStep = fineGrid->GetMultigridStepJ();
+    int kMultigridStep = fineGrid->GetMultigridStepK();
+
+    int id = iMultigridStep / 2;
+    int jd = jMultigridStep / 2;
+    int kd = kMultigridStep / 2;
+
+    Range I(1, MAX(coarseNi - 1, 1));
+    Range J(1, MAX(coarseNj - 1, 1));
+    Range K(1, MAX(coarseNk - 1, 1));
+
+    int i0, j0, k0, i, j, k, ip, jp, kp;
+    for (k0 = K.first(); k0 <= K.last(); ++ k0)
+    {
+        k = (k0 - 1) * kMultigridStep + 1;
+        kp = k + kd;
+        for (j0 = J.first(); j0 <= J.last(); ++ j0)
+        {
+            j = (j0 - 1) * jMultigridStep + 1;
+            jp = j + jd;
+            for (i0 = I.first(); i0 <= I.last(); ++ i0)
+            {
+                i = (i0 - 1) * iMultigridStep + 1;
+                ip = i + id;
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    RDouble w0diff = coarsePrimitiveVars(i0, j0, k0, m);
+
+                    work(i, j, k, m) = w0diff;
+                    work(ip, j, k, m) = w0diff;
+                    work(ip, jp, k, m) = w0diff;
+                    work(i, jp, k, m) = w0diff;
+                    work(i, j, kp, m) = w0diff;
+                    work(ip, j, kp, m) = w0diff;
+                    work(ip, jp, kp, m) = w0diff;
+                    work(i, jp, kp, m) = w0diff;
+                }
+            }
+        }
+    }
+
+    GhostCell3D(work, fineNi, fineNj, fineNk, nEquation);
+}
+
+void NSSolverStruct::prolhic_eric(Grid *fineGridIn, Grid *coarseGridIn, FieldProxy *workProxy)
+{
+    StructGrid *fineGrid = StructGridCast(fineGridIn);
+    StructGrid *coarseGrid = StructGridCast(coarseGridIn);
+
+    RDouble4D &work = workProxy->GetField_STR();
+    RDouble4D &coarsePrimitiveVars = *reinterpret_cast <RDouble4D *> (coarseGrid->GetDataPtr("q"));
+
+    int nEquation = GetNumberOfEquations();
+
+    int fineNi = fineGrid->GetNI();
+    int fineNj = fineGrid->GetNJ();
+    int fineNk = fineGrid->GetNK();
+
+    int coarseNi = coarseGrid->GetNI();
+    int coarseNj = coarseGrid->GetNJ();
+    int coarseNk = coarseGrid->GetNK();
+
+    int iMultigridStep = fineGrid->GetMultigridStepI();
+    int jMultigridStep = fineGrid->GetMultigridStepJ();
+    int kMultigridStep = fineGrid->GetMultigridStepK();
+
+    int id = iMultigridStep / 2;
+    int jd = jMultigridStep / 2;
+    int kd = kMultigridStep / 2;
+
+    int nDim = fineGrid->GetDim();
+
+    Range I, J, K;
+    GetRange(fineNi, fineNj, fineNk, -2, 1, I, J, K);
+
+    Range CoarseI, CoarseJ, CoarseK;
+    GetRange(coarseNi, coarseNj, coarseNk, -2, 1, CoarseI, CoarseJ, CoarseK);
+
+    RDouble3D wq(CoarseI, CoarseJ, CoarseK, fortranArray);
+
+    RDouble3D wdiff1(I, J, K, fortranArray);
+    RDouble3D wdiff2(I, J, K, fortranArray);
+
+    const RDouble v0 = 0.25;
+    const RDouble v1 = 0.75;
+
+    if (nDim == TWO_D)
+    {
+        //! Two-dimensional computations.
+
+        int ist, ied, jst, jed, kst, ked;
+        ist = 1;
+        ied = coarseNi - 1;
+        jst = 1;
+        jed = coarseNj - 1;
+        kst = 1;
+        ked = 1;
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            for (int kk = kst; kk <= ked; ++ kk)
+            {
+                for (int jj = jst; jj <= jed; ++ jj)
+                {
+                    for (int ii = ist; ii <= ied; ++ ii)
+                    {
+                        wq(ii, jj, kk) = coarsePrimitiveVars(ii, jj, kk, m);
+                    }
+                }
+            }
+
+            GhostCell3D(wq, coarseNi, coarseNj, coarseNk);
+            FillCornerPoint3D(wq, coarseNi, coarseNj, coarseNk);
+
+            //! Interpolation in I direction.
+            int k0 = 1;
+            int j = 0;
+
+            for (int j0 = 0; j0 <= coarseNj; ++ j0)
+            {
+                int i = 0;
+                for (int i0 = 0; i0 <= coarseNi - 1; ++ i0)
+                {
+                    RDouble w0diff0 = wq(i0, j0, k0);
+                    RDouble w0diff1 = wq(i0 + id, j0, k0);
+
+                    wdiff1(i, j0, k0) = v1 * w0diff0 + v0 * w0diff1;
+                    wdiff1(i + id, j0, k0) = v0 * w0diff0 + v1 * w0diff1;
+
+                    i += 1 + id;
+                }
+                j += 1 + jd;
+            }
+
+            //! Interpolation in J direction.
+            for (int i = 0; i <= fineNi; ++ i)
+            {
+                j = 0;
+                for (int j0 = 0; j0 <= coarseNj - 1; ++ j0)
+                {
+                    RDouble w0diff0 = wdiff1(i, j0, k0);
+                    RDouble w0diff1 = wdiff1(i, j0 + jd, k0);
+                    work(i, j, k0, m) = v1 * w0diff0 + v0 * w0diff1;
+                    work(i, j + jd, k0, m) = v0 * w0diff0 + v1 * w0diff1;
+                    j += 1 + jd;
+                }
+            }
+
+        }
+    }
+    else
+    {
+
+        int ist, ied, jst, jed, kst, ked;
+        ist = 1;
+        ied = coarseNi - 1;
+        jst = 1;
+        jed = coarseNj - 1;
+        kst = 1;
+        ked = coarseNk - 1;
+
+        work = 0.0;
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            for (int kk = kst; kk <= ked; ++ kk)
+            {
+                for (int jj = jst; jj <= jed; ++ jj)
+                {
+                    for (int ii = ist; ii <= ied; ++ ii)
+                    {
+                        wq(ii, jj, kk) = coarsePrimitiveVars(ii, jj, kk, m);
+                    }
+                }
+            }
+
+            GhostCell3D(wq, coarseNi, coarseNj, coarseNk);
+            FillCornerPoint3D(wq, coarseNi, coarseNj, coarseNk);
+
+            //! Interpolation in I direction.
+            for (int k0 = 0; k0 <= coarseNk; ++ k0)
+            {
+                for (int j0 = 0; j0 <= coarseNj; ++ j0)
+                {
+                    int i = 0;
+                    for (int i0 = 0; i0 <= coarseNi - 1; ++ i0)
+                    {
+                        RDouble w0diff0 = wq(i0, j0, k0);
+                        RDouble w0diff1 = wq(i0 + id, j0, k0);
+
+                        wdiff1(i, j0, k0) = v1 * w0diff0 + v0 * w0diff1;
+                        wdiff1(i + id, j0, k0) = v0 * w0diff0 + v1 * w0diff1;
+
+                        work(i, j0, k0, m) = v1 * w0diff0 + v0 * w0diff1;
+                        work(i + id, j0, k0, m) = v0 * w0diff0 + v1 * w0diff1;
+
+                        i += 1 + id;
+                    }
+                }
+            }
+
+            //! Interpolation in J direction.
+            for (int k0 = 0; k0 <= coarseNk; ++ k0)
+            {
+                for (int i = 0; i <= fineNi; ++ i)
+                {
+                    int j = 0;
+                    for (int j0 = 0; j0 <= coarseNj - 1; ++ j0)
+                    {
+                        RDouble w0diff0 = wdiff1(i, j0, k0);
+                        RDouble w0diff1 = wdiff1(i, j0 + jd, k0);
+
+                        wdiff2(i, j, k0) = v1 * w0diff0 + v0 * w0diff1;
+                        wdiff2(i, j + jd, k0) = v0 * w0diff0 + v1 * w0diff1;
+
+                        work(i, j, k0, m) = v1 * w0diff0 + v0 * w0diff1;
+                        work(i, j + jd, k0, m) = v0 * w0diff0 + v1 * w0diff1;
+                        j += 1 + jd;
+                    }
+                }
+            }
+
+            //! Interpolation in K direction.
+            for (int j = 0; j <= fineNj; ++ j)
+            {
+                for (int i = 0; i <= fineNi; ++ i)
+                {
+                    int k = 0;
+                    for (int k0 = 0; k0 <= coarseNk - 1; ++ k0)
+                    {
+                        RDouble w0diff0 = wdiff2(i, j, k0);
+                        RDouble w0diff1 = wdiff2(i, j, k0 + kd);
+
+                        work(i, j, k, m) = v1 * w0diff0 + v0 * w0diff1;
+                        work(i, j, k + kd, m) = v0 * w0diff0 + v1 * w0diff1;
+
+                        k += 1 + kd;
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::PositiveUpdate(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &q = qProxy->GetField_STR();
+    RDouble4D &dq = dqProxy->GetField_STR();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    RDouble alpha = half;
+
+    using namespace IDX;
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                RDouble rm = q(i, j, k, IR);
+                RDouble um = q(i, j, k, IU);
+                RDouble vm = q(i, j, k, IV);
+                RDouble wm = q(i, j, k, IW);
+                RDouble pm = q(i, j, k, IP);
+
+                rm += alpha * dq(i, j, k, IR);
+                um += alpha * dq(i, j, k, IU);
+                vm += alpha * dq(i, j, k, IV);
+                wm += alpha * dq(i, j, k, IW);
+                pm += alpha * dq(i, j, k, IP);
+
+                if (pm <= 0.0 || rm <= 0.0)
+                {
+                    //! Let dt be one order smaller.
+                    RDouble coef = 0.9;
+                    rm -= dq(i, j, k, IR) * coef;
+                    um -= dq(i, j, k, IU) * coef;
+                    vm -= dq(i, j, k, IV) * coef;
+                    wm -= dq(i, j, k, IW) * coef;
+                    pm -= dq(i, j, k, IP) * coef;
+
+                    if (pm <= 0.0 || rm <= 0.0)
+                    {
+                        coef = 0.09;
+                        rm -= dq(i, j, k, IR) * coef;
+                        um -= dq(i, j, k, IU) * coef;
+                        vm -= dq(i, j, k, IV) * coef;
+                        wm -= dq(i, j, k, IW) * coef;
+                        pm -= dq(i, j, k, IP) * coef;
+                    }
+                }
+
+                if (pm > 0.0 && rm > 0.0)
+                {
+                    q(i, j, k, IR) = rm;
+                    q(i, j, k, IU) = um;
+                    q(i, j, k, IV) = vm;
+                    q(i, j, k, IW) = wm;
+                    q(i, j, k, IP) = pm;
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::VisualizationVariables(Grid *gridIn, FieldProxy *workProxy, const string &filename)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int nEquation = GetNumberOfEquations();
+
+    vector <string> title_tecplot;
+    title_tecplot.push_back("title=\"Flow Fields of PHengLEI\"");
+    title_tecplot.push_back("variables=");
+    title_tecplot.push_back("\"x\"");
+    title_tecplot.push_back("\"y\"");
+    title_tecplot.push_back("\"z\"");
+    title_tecplot.push_back("\"work1\"");
+    title_tecplot.push_back("\"work2\"");
+    title_tecplot.push_back("\"work3\"");
+    title_tecplot.push_back("\"work4\"");
+    title_tecplot.push_back("\"work5\"");
+
+    int nvarplot;
+    nvarplot = 10;
+
+    Range II, JJ, KK;
+    GetRange(ni, nj, nk, 0, 0, II, JJ, KK);
+    Range MM(0, nEquation - 1);
+
+    RDouble4D workn(II, JJ, KK, MM, fortranArray);
+
+    FieldProxy *worknProxy = new FieldProxy();
+
+    worknProxy->SetField_STR(&workn);
+    CompNodeVar(grid, worknProxy, workProxy);
+
+    delete worknProxy;
+
+    RDouble3D &xx = *grid->GetStructX();
+    RDouble3D &yy = *grid->GetStructY();
+    RDouble3D &zz = *grid->GetStructZ();
+
+    using namespace PHSPACE;
+
+    std::ostringstream oss;
+
+    for (std::size_t i = 0; i < title_tecplot.size(); ++ i)
+    {
+        oss << title_tecplot[i] << "\n";
+    }
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalNode = grid->GetNTotalNode();
+
+    int wordwidth = 20;
+
+    if (nk == 1)
+    {
+        oss << "zone  N = " << nTotalNode << "  E = " << nTotalCell << " f = FEPOINT, ET = QUADRILATERAL\n";
+
+        int iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd;
+        grid->GetNodeIterationIndex(iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd);
+
+        for (int k = kNodeStart; k <= kNodeEnd; ++ k)
+        {
+            for (int j = jNodeStart; j <= jNodeEnd; ++ j)
+            {
+                for (int i = iNodeStart; i <= iNodeEnd; ++ i)
+                {
+                    oss << setiosflags(ios::left);
+                    oss << setiosflags(ios::scientific);
+                    oss << setprecision(10);
+                    oss << setw(wordwidth) << xx(i, j, k)
+                        << setw(wordwidth) << yy(i, j, k)
+                        << setw(wordwidth) << zz(i, j, k);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        oss << setw(wordwidth) << workn(i, j, k, m);
+                    }
+                    oss << "\n";
+                }
+            }
+        }
+
+        for (int j = 1; j <= nj - 1; ++ j)
+        {
+            for (int i = 1; i <= ni - 1; ++ i)
+            {
+                oss << i + (j - 1) * ni << " ";
+                oss << i + 1 + (j - 1) * ni << " ";
+                oss << i + 1 + (j)*ni << " ";
+                oss << i + (j)*ni << "\n";
+            }
+        }
+    }
+
+    int s_st[3], s_ed[3];
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+        bool flag;
+        flag = (IsWall(BCType))
+            || (BCType == PHENGLEI::SYMMETRY)
+            || (BCType == PHENGLEI::OUTFLOW);
+
+        if (!flag)
+        {
+            continue;
+        }
+
+        int *s_lr3d = structBC->GetFaceDirectionIndex();
+        int nDim = GetDim();
+
+        for (int m = 0; m < nDim; ++ m)
+        {
+            s_st[m] = structBC->GetStartPoint(m);
+            s_ed[m] = structBC->GetEndPoint(m);
+            if (structBC->GetFaceDirection() == m)
+            {
+                if (s_st[m] > 1 || s_lr3d[m] == 1)
+                {
+                    s_st[m] += 1;
+                    s_ed[m] += 1;
+                }
+            }
+            else
+            {
+                s_ed[m] += 1;
+            }
+        }
+
+        int ist = s_st[0];
+        int ied = s_ed[0];
+        int jst = s_st[1];
+        int jed = s_ed[1];
+        int kst = s_st[2];
+        int ked = s_ed[2];
+
+        Range I, J, K;
+        GetRange(I, J, K, ist, ied, jst, jed, kst, ked);
+
+        if (nDim != THREE_D)
+        {
+            K.setRange(1, 1);
+            kst = 1;
+            ked = 1;
+        }
+
+        Int3D newindex(I, J, K, fortranArray);
+
+        int nSurface = structBC->GetFaceDirection() + 1;
+
+        int count = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    newindex(i, j, k) = count;
+                    ++ count;
+                }
+            }
+        }
+
+        int nTotalNode1 = count;
+        int nTotalCell1 = 1;
+
+        for (int m = 0; m < 3; ++ m)
+        {
+            nTotalCell1 *= (structBC->GetEndPoint(m) - structBC->GetStartPoint(m) + 1);
+        }
+
+        oss << "zone N = " << nTotalNode1 << "  E = " << nTotalCell1 << " f = FEPOINT, ET = QUADRILATERAL\n";
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    oss << setiosflags(ios::left);
+                    oss << setiosflags(ios::scientific);
+                    oss << setprecision(10);
+                    oss << setw(wordwidth) << xx(i, j, k)
+                        << setw(wordwidth) << yy(i, j, k)
+                        << setw(wordwidth) << zz(i, j, k);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        oss << setw(wordwidth) << workn(i, j, k, m);
+                    }
+                    oss << "\n";
+                }
+            }
+        }
+
+        int il1, jl1, kl1;
+        grid->GetNsurfIndex(il1, jl1, kl1, nSurface);
+
+
+        il1 = 1 - il1;
+        jl1 = 1 - jl1;
+        kl1 = 1 - kl1;
+
+        if (nk == 1)
+        {
+            kl1 = 0;
+        }
+
+        for (int k = kst; k <= ked - kl1; ++ k)
+        {
+            for (int j = jst; j <= jed - jl1; ++ j)
+            {
+                for (int i = ist; i <= ied - il1; ++ i)
+                {
+                    int p1, p2, p3, p4;
+
+                    int il, jl, kl;
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    if (nSurface == 1)
+                    {
+                        p1 = newindex(i, j, k) + 1;
+                        p2 = newindex(i, jl, k) + 1;
+                        p3 = newindex(i, jl, kl) + 1;
+                        p4 = newindex(i, j, kl) + 1;
+                    }
+                    else if (nSurface == 2)
+                    {
+                        p1 = newindex(i, j, k) + 1;
+                        p2 = newindex(il, j, k) + 1;
+                        p3 = newindex(il, j, kl) + 1;
+                        p4 = newindex(i, j, kl) + 1;
+                    }
+                    else
+                    {
+                        p1 = newindex(i, j, k) + 1;
+                        p2 = newindex(il, j, k) + 1;
+                        p3 = newindex(il, jl, k) + 1;
+                        p4 = newindex(i, jl, k) + 1;
+                    }
+                    oss << p1 << " ";
+                    oss << p2 << " ";
+                    oss << p3 << " ";
+                    oss << p4 << "\n";
+                }
+            }
+        }
+    }
+
+    fstream file;
+    file.open(filename.c_str(), ios_base::out | ios_base::trunc);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(filename);
+    }
+
+    file << oss.str();
+    file.close();
+}
+
+void NSSolverStruct::CompNodeVar(Grid *gridIn, RDouble4D &qn, int m, RDouble4D &q, int n)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int nk = grid->GetNK();
+
+    int il1 = 1;
+    int jl1 = 1;
+    int kl1 = 1;
+    if (nk == 1)
+    {
+        kl1 = 0;
+    }
+
+    int il, jl, kl;
+
+    int iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd;
+    grid->GetNodeIterationIndex(iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd);
+
+    for (int k = kNodeStart; k <= kNodeEnd; ++ k)
+    {
+        for (int j = jNodeStart; j <= jNodeEnd; ++ j)
+        {
+            for (int i = iNodeStart; i <= iNodeEnd; ++ i)
+            {
+                il = i - il1;
+                jl = j - jl1;
+                kl = k - kl1;
+                qn(i, j, k, m) = eighth * (q(il, jl, kl, n) + q(il, j, kl, n) + q(i, jl, kl, n) + q(i, j, kl, n) +
+                    q(il, jl, k, n) + q(il, j, k, n) + q(i, jl, k, n) + q(i, j, k, n));
+            }
+        }
+    }
+}
+
+void NSSolverStruct::CompNodeVar(Grid *gridIn, RDouble4D &qn, int m, RDouble3D &q)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int nk = grid->GetNK();
+
+    int il1 = 1;
+    int jl1 = 1;
+    int kl1 = 1;
+    if (nk == 1)
+    {
+        kl1 = 0;
+    }
+
+    int il, jl, kl;
+
+    int iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd;
+    grid->GetNodeIterationIndex(iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd);
+
+    for (int k = kNodeStart; k <= kNodeEnd; ++ k)
+    {
+        for (int j = jNodeStart; j <= jNodeEnd; ++ j)
+        {
+            for (int i = iNodeStart; i <= iNodeEnd; ++ i)
+            {
+                il = i - il1;
+                jl = j - jl1;
+                kl = k - kl1;
+                qn(i, j, k, m) = eighth * (q(il, jl, kl) + q(il, j, kl) + q(i, jl, kl) + q(i, j, kl) +
+                    q(il, jl, k) + q(il, j, k) + q(i, jl, k) + q(i, j, k));
+            }
+        }
+    }
+}
+
+void NSSolverStruct::CompNodeVar(Grid *gridIn, FieldProxy *qnProxy, FieldProxy *qProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int nk = grid->GetNK();
+
+    RDouble4D &q = qProxy->GetField_STR();
+    RDouble4D &q_n = qnProxy->GetField_STR();
+
+    int nEquation = GetNumberOfEquations();
+
+    int il1 = 1;
+    int jl1 = 1;
+    int kl1 = 1;
+    if (nk == 1)
+    {
+        kl1 = 0;
+    }
+
+    int il, jl, kl;
+
+    int iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd;
+    grid->GetNodeIterationIndex(iNodeStart, iNodeEnd, jNodeStart, jNodeEnd, kNodeStart, kNodeEnd);
+
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kNodeStart; k <= kNodeEnd; ++ k)
+        {
+            for (int j = jNodeStart; j <= jNodeEnd; ++ j)
+            {
+                for (int i = iNodeStart; i <= iNodeEnd; ++ i)
+                {
+                    il = i - il1;
+                    jl = j - jl1;
+                    kl = k - kl1;
+                    q_n(i, j, k, m) = eighth * (q(il, jl, kl, m) + q(il, j, kl, m) + q(i, jl, kl, m) + q(i, j, kl, m) +
+                        q(il, jl, k, m) + q(il, j, k, m) + q(i, jl, k, m) + q(i, j, k, m));
+                }
+            }
+        }
+    }
+
+    InterfaceValueFix(gridIn, qnProxy, qProxy);
+    WallValueFix(gridIn, qnProxy, qProxy);
+}
+
+void NSSolverStruct::InterfaceValueFix(Grid *gridIn, FieldProxy *qnProxy, FieldProxy *qProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &q = qProxy->GetField_STR();
+    RDouble4D &q_n = qnProxy->GetField_STR();
+
+    int nEquation = GetNumberOfEquations();
+
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo)
+    {
+        return;
+    }
+
+    int nTotalNode = grid->GetNTotalNode();
+
+    int nlist = 4;
+    if (grid->GetDim() == TWO_D)
+    {
+        nlist = 2;
+    }
+
+    int ijk[4][3];
+    int irot[3], jrot[3], krot[3];
+
+    GetIJKROT(ijk, irot, jrot, krot);
+
+    //VVInt node_list;
+    //set< PHSort< VInt > > node_sort;
+    //VInt  nodeindex(3);
+
+    int ist, ied, jst, jed, kst, ked;
+    int iSurface, BCType, index;
+    int il, jl, kl;
+    int is, js, ks;
+    int it, jt, kt;
+    int ir, jr, kr;
+    int in, jn, kn;
+
+    RDouble *qtmp = new RDouble[nEquation];
+    int *n_count = new int[nTotalNode];
+    RDouble **q_n_list = NewPointer2<RDouble>(nEquation, nTotalNode);
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        n_count[iNode] = 0;
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q_n_list[m][iNode] = 0.0;
+        }
+    }
+
+    typedef DataStruct_AdtTree<int, RDouble> AdtTree;
+    AdtTree *adtTree;
+    AdtTree::AdtNodeList nodeList;
+    RDouble tol;
+    CreateStandardADT(grid, adtTree, tol);
+    RDouble coor[3], minwin[3], maxwin[3];
+
+    RDouble3D &xs = *grid->GetStructX();
+    RDouble3D &ys = *grid->GetStructY();
+    RDouble3D &zs = *grid->GetStructZ();
+
+    int count = 0;
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        BCType = structBC->GetBCType();
+        //if ((!(ISInterfaceBC(BCType))) && (!IsWall(true, BCType, 0))) continue;
+        if (!(IsInterface(BCType)))
+        {
+            continue;
+        }
+
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        iSurface = structBC->GetFaceDirection() + 1;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+
+                    RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, 1);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        qtmp[m] = half * (q(is, js, ks, m) + q(it, jt, kt, m));
+                    }
+
+                    structBC->GetBoundaryFaceIndex(i, j, k, il, jl, kl);
+
+                    ir = irot[iSurface - 1];
+                    jr = jrot[iSurface - 1];
+                    kr = krot[iSurface - 1];
+
+                    for (int m = 0; m < nlist; ++ m)
+                    {
+                        in = il + ijk[m][ir];
+                        jn = jl + ijk[m][jr];
+                        kn = kl + ijk[m][kr];
+
+                        coor[0] = xs(in, jn, kn);
+                        coor[1] = ys(in, jn, kn);
+                        coor[2] = zs(in, jn, kn);
+
+                        minwin[0] = coor[0] - tol;
+                        minwin[1] = coor[1] - tol;
+                        minwin[2] = coor[2] - tol;
+
+                        maxwin[0] = coor[0] + tol;
+                        maxwin[1] = coor[1] + tol;
+                        maxwin[2] = coor[2] + tol;
+                        GetCoorIndex(adtTree, coor, minwin, maxwin, count, index);
+
+                        n_count[index] ++;
+
+                        for (int mm = 0; mm < nEquation; ++ mm)
+                        {
+                            q_n_list[mm][index] += qtmp[mm];
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    int nINode = count;
+
+    for (int i = 0; i < nINode; ++ i)
+    {
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q_n_list[m][i] /= n_count[i];
+        }
+    }
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        BCType = structBC->GetBCType();
+        if (!(IsInterface(BCType)))
+        {
+            continue;
+        }
+
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        iSurface = structBC->GetFaceDirection() + 1;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    structBC->GetBoundaryFaceIndex(i, j, k, il, jl, kl);
+
+                    ir = irot[iSurface - 1];
+                    jr = jrot[iSurface - 1];
+                    kr = krot[iSurface - 1];
+
+                    for (int m = 0; m < nlist; ++ m)
+                    {
+                        in = il + ijk[m][ir];
+                        jn = jl + ijk[m][jr];
+                        kn = kl + ijk[m][kr];
+
+                        coor[0] = xs(in, jn, kn);
+                        coor[1] = ys(in, jn, kn);
+                        coor[2] = zs(in, jn, kn);
+
+                        minwin[0] = coor[0] - tol;
+                        minwin[1] = coor[1] - tol;
+                        minwin[2] = coor[2] - tol;
+
+                        maxwin[0] = coor[0] + tol;
+                        maxwin[1] = coor[1] + tol;
+                        maxwin[2] = coor[2] + tol;
+
+                        GetCoorIndex(adtTree, coor, minwin, maxwin, count, index);
+
+                        for (int mm = 0; mm < nEquation; ++ mm)
+                        {
+                            q_n(in, jn, kn, mm) = q_n_list[mm][index];
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    delete adtTree;
+    delete[]n_count;
+    delete[]qtmp;
+    DelPointer2(q_n_list);
+}
+
+void NSSolverStruct::CreateStandardADT(Grid *grid, DataStruct_AdtTree<int, RDouble> *&adtTree, RDouble &tol)
+{
+    typedef DataStruct_AdtTree<int, RDouble> AdtTree;
+    RDouble mindis, maxdis;
+    grid->GetMinMaxDS(mindis, maxdis);
+
+    tol = mindis / 4;
+
+    RDouble pmin[3], pmax[3];
+
+    RDouble *ptmin = grid->GetMinBox();
+    RDouble *ptmax = grid->GetMaxBox();
+
+    pmin[0] = ptmin[0];
+    pmin[1] = ptmin[1];
+    pmin[2] = ptmin[2];
+
+    pmax[0] = ptmax[0];
+    pmax[1] = ptmax[1];
+    pmax[2] = ptmax[2];
+
+    ShiftMinMaxBox(pmin, pmax, two * tol);
+
+    adtTree = new AdtTree(3, pmin, pmax);
+}
+
+void NSSolverStruct::WallValueFix(Grid *gridIn, FieldProxy *qnProxy, FieldProxy *qProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &q = qProxy->GetField_STR();
+    RDouble4D &q_n = qnProxy->GetField_STR();
+
+    int nEquation = GetNumberOfEquations();
+
+    int nTotalNode = grid->GetNTotalNode();
+
+    int nlist = 4;
+    if (grid->GetDim() == TWO_D)
+    {
+        nlist = 2;
+    }
+
+    int ijk[4][3];
+    int irot[3], jrot[3], krot[3];
+
+    GetIJKROT(ijk, irot, jrot, krot);
+
+    int ist, ied, jst, jed, kst, ked;
+    int iSurface, BCType, index;
+    int il, jl, kl;
+    int is, js, ks;
+    int it, jt, kt;
+    int ir, jr, kr;
+
+    RDouble *qtmp = new RDouble[nEquation];
+    int *n_count = new int[nTotalNode];
+    RDouble **q_n_list = NewPointer2<RDouble>(nEquation, nTotalNode);
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        n_count[iNode] = 0;
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q_n_list[m][iNode] = 0.0;
+        }
+    }
+
+    typedef DataStruct_AdtTree<int, RDouble> AdtTree;
+    AdtTree *adtTree;
+    AdtTree::AdtNodeList nodeList;
+    RDouble tol;
+    CreateStandardADT(grid, adtTree, tol);
+    RDouble coor[3], minwin[3], maxwin[3];
+
+    RDouble3D &xs = *grid->GetStructX();
+    RDouble3D &ys = *grid->GetStructY();
+    RDouble3D &zs = *grid->GetStructZ();
+
+    int count = 0;
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        BCType = structBC->GetBCType();
+        if ((!IsWall(BCType)))
+        {
+            continue;
+        }
+
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        iSurface = structBC->GetFaceDirection() + 1;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+
+                    RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, 1);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        qtmp[m] = half * (q(is, js, ks, m) + q(it, jt, kt, m));
+                    }
+
+                    structBC->GetBoundaryFaceIndex(i, j, k, il, jl, kl);
+
+                    ir = irot[iSurface - 1];
+                    jr = jrot[iSurface - 1];
+                    kr = krot[iSurface - 1];
+
+                    for (int m = 0; m < nlist; ++ m)
+                    {
+                        int in = il + ijk[m][ir];
+                        int jn = jl + ijk[m][jr];
+                        int kn = kl + ijk[m][kr];
+
+                        coor[0] = xs(in, jn, kn);
+                        coor[1] = ys(in, jn, kn);
+                        coor[2] = zs(in, jn, kn);
+
+                        minwin[0] = coor[0] - tol;
+                        minwin[1] = coor[1] - tol;
+                        minwin[2] = coor[2] - tol;
+
+                        maxwin[0] = coor[0] + tol;
+                        maxwin[1] = coor[1] + tol;
+                        maxwin[2] = coor[2] + tol;
+                        GetCoorIndex(adtTree, coor, minwin, maxwin, count, index);
+                        n_count[index] ++;
+                        for (int mm = 0; mm < nEquation; ++ mm)
+                        {
+                            q_n_list[mm][index] += qtmp[mm];
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    int nINode = count;
+
+    for (int i = 0; i < nINode; ++ i)
+    {
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q_n_list[m][i] /= n_count[i];
+        }
+    }
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        BCType = structBC->GetBCType();
+        if ((!IsWall(BCType)))
+        {
+            continue;
+        }
+
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        iSurface = structBC->GetFaceDirection() + 1;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    structBC->GetBoundaryFaceIndex(i, j, k, il, jl, kl);
+
+                    ir = irot[iSurface - 1];
+                    jr = jrot[iSurface - 1];
+                    kr = krot[iSurface - 1];
+
+                    for (int m = 0; m < nlist; ++ m)
+                    {
+                        int in = il + ijk[m][ir];
+                        int jn = jl + ijk[m][jr];
+                        int kn = kl + ijk[m][kr];
+
+                        coor[0] = xs(in, jn, kn);
+                        coor[1] = ys(in, jn, kn);
+                        coor[2] = zs(in, jn, kn);
+
+                        minwin[0] = coor[0] - tol;
+                        minwin[1] = coor[1] - tol;
+                        minwin[2] = coor[2] - tol;
+
+                        maxwin[0] = coor[0] + tol;
+                        maxwin[1] = coor[1] + tol;
+                        maxwin[2] = coor[2] + tol;
+
+                        GetCoorIndex(adtTree, coor, minwin, maxwin, count, index);
+
+                        for (int mm = 0; mm < nEquation; ++ mm)
+                        {
+                            q_n(in, jn, kn, mm) = q_n_list[mm][index];
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    delete adtTree;
+    delete[]n_count;
+    delete[]qtmp;
+    DelPointer2(q_n_list);
+}
+
+void NSSolverStruct::InitFlowAsRestart()
+{
+    StructGrid *grid = StructGridCast(GetGrid());
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int outputStepInterval = 0;
+    GlobalDataBase::UpdateData("outnstep", &outputStepInterval, PHINT, 1);
+
+    RDouble physicalTime = 0.0;
+    GlobalDataBase::UpdateData("physicalTime", &physicalTime, PHDOUBLE, 1);
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    int nEquation = GetNumberOfEquations();
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    primitiveVariables(i, j, k, m) = primitiveVarFarfield[m];
+                }
+            }
+        }
+    }
+
+    temperatures = 1.0;
+
+    InitGrad(grid);
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+        residual = 0.0;
+        return;
+    }
+
+    RDouble4D &primitiveVariablen1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble4D &primitiveVariablen2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+
+    primitiveVariablen1 = primitiveVariables;
+    primitiveVariablen2 = primitiveVariablen1;
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &residualn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble4D &residualn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+
+    residual = 0.0;
+    residualn1 = 0.0;
+    residualn2 = 0.0;
+
+    int nStatisticalStep = 0;
+    GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+
+    //! Store the historical sum of InviscidFlux, ViscousFlux, et al.,
+    //! exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+    RDouble4D &resTmp = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_tmp"));
+
+    resTmp = 0.0;
+}
+
+void NSSolverStruct::InitGrad(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &gradPrimtiveVarFaceX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D &gradPrimtiveVarFaceY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D &gradPrimtiveVarFaceZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+    gradPrimtiveVarFaceX = 0.0;
+    gradPrimtiveVarFaceY = 0.0;
+    gradPrimtiveVarFaceZ = 0.0;
+
+    RDouble4D &gradTemperatureFaceX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D &gradTemperatureFaceY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D &gradTemperatureFaceZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceZ"));
+    gradTemperatureFaceX = 0.0;
+    gradTemperatureFaceY = 0.0;
+    gradTemperatureFaceZ = 0.0;
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+    gradUVWTCellCenterX = 0.0;
+    gradUVWTCellCenterY = 0.0;
+    gradUVWTCellCenterZ = 0.0;
+}
+
+void NSSolverStruct::InitCGrid(Grid *fineGrid, Grid *coarseGrid)
+{
+
+}
+
+void NSSolverStruct::CalculateBoundaryData()
+{
+    CalculateMassFluxRatio();
+}
+
+void NSSolverStruct::Boundary(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+
+    CalculateBoundaryData();
+
+    int viscousType;
+    RDouble wallTemperature;
+
+    using namespace PHENGLEI;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int iWallBC = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        Data_Param *bcParamDB = structBC->GetBCParamDataBase();
+        int BCType = structBC->GetBCType();
+
+        if (IsInterface(BCType))
+        {
+            continue;
+        }
+        else if (BCType == EXTRAPOLATION)
+        {
+            OutFlowBC3D(grid, structBC);
+        }
+        else if (IsWall(BCType))
+        {
+            structBC->GetParamData("viscousType", &viscousType, PHINT, 1);
+            structBC->GetParamData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+
+            if (viscousType == INVISCID)
+            {
+                SymmetryBC3D(grid, structBC);
+            }
+            else
+            {
+                if (nChemical > 0)
+                {
+                }
+                else if (wallTemperature < 0.0)
+                {
+                    ViscousAdiabaticWall(grid, structBC);
+                }
+                else//! Viscous iso-thermal wall condition.
+                {
+                    ViscousIsotropicWall(grid, structBC, iWallBC);
+                }
+            }
+            ++iWallBC;
+        }
+        else if (BCType == ABLATION_SURFACE)
+        {
+            ++ iWallBC;
+        }
+        else if (BCType == SYMMETRY)
+        {
+            SymmetryBC3D(grid, structBC);
+        }
+        else if (BCType == FARFIELD)
+        {
+            RDouble refGama = parameters->GetRefGama();
+            FarFieldRiemannInvariants(grid, structBC, refGama);
+        }
+        else if (BCType == INFLOW)
+        {
+            InFlowBC3D(grid, structBC);
+        }
+        else if (BCType == OUTFLOW)
+        {
+            OutFlowBC3D(grid, structBC);
+        }
+        else if (BCType == POLE || BCType / 10 == POLE)
+        {
+            SingularAxisBC3D(grid, structBC);
+        }
+        else if (BCType == GENERIC_1)
+        {
+            //! Do not deal with this condition now!
+            continue;
+        }
+        else if (BCType == PRESSURE_INLET)
+        {
+            PressureInletBCRiemann(grid, structBC);
+        }
+        else if (BCType == PRESSURE_OUTLET)
+        {
+            PressureOutletBC(grid, structBC);
+        }
+        else if (BCType == MASS_FLOW_INLET)
+        {
+            MassFlowInletBC(grid, structBC);
+        }
+        else if (BCType == MASS_FLOW_OUTLET)
+        {
+            MassFlowOutletBC(grid, structBC);
+        }
+        else if (BCType == EXTERNAL_BC)
+        {
+            OutFlowBC3D(grid, structBC);
+        }
+        else if (BCType == NOZZLE_INFLOW)
+        {
+            NozzleInletFlow(grid, structBC);
+        }
+        else if (BCType == NOZZLE_OUTFLOW)
+        {
+            NozzleOutFlow(grid, structBC);
+        }
+        else if (BCType == OVERSET)
+        {
+            OutFlowBC3D(grid, structBC);
+        }
+        else
+        {
+            //! In order to avoid illegal BCtype ID.
+            ostringstream oss;
+            oss << "Error : Illegal BCtype ID " << BCType << endl;
+            TK_Exit::ExceptionExit(oss);
+        }
+    }
+    //! The corner point is only a temporary solution and should be replaced as much as possible.
+    CornerPoint(grid);
+}
+
+void NSSolverStruct::CornerPoint(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    FillCornerPoint3D(q, ni, nj, nk, nEquation);
+}
+
+void NSSolverStruct::calculateBCArea(Grid *gridIn, StructBC *bcRegion)
+{
+    Data_Param *bcData = bcRegion->GetBCParamDataBase();
+
+    //! BC total area does not change with calculating, so it only calculates once.
+    if (bcData->IsExist("BCTotalArea", PHDOUBLE, 1))
+    {
+        return;
+    }
+
+    using namespace PHMPI;
+    string bcName = bcRegion->GetBCName();
+    RDouble BCTotalArea = 0.0;
+
+    //! One processor may owe some zones, so calculate all BC area in one processor.
+    int nLocalZones = GetNumberofLocalZones();
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int iZoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+        Grid *iGrid = PHSPACE::GetGrid(iZoneID);
+
+        StructGrid *grid = StructGridCast(iGrid);
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+        int nBCRegion = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            StructBC *jBCRegion = structBCSet->GetBCRegion(iBCRegion);
+            string jBCName = jBCRegion->GetBCName();
+
+            //! Judge the same BC region according the BC name.
+            if (jBCName == bcName)
+            {
+                int ist, ied, jst, jed, kst, ked;
+                int in, jn, kn;
+                jBCRegion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+                int iSurface = jBCRegion->GetFaceDirection() + 1;
+                RDouble4D &area = *(grid->GetFaceArea());
+
+                for (int k = kst; k <= ked; ++ k)
+                {
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        for (int i = ist; i <= ied; ++ i)
+                        {
+                            jBCRegion->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+                            BCTotalArea += area(in, jn, kn, iSurface);
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    //! Get the total area in all processors with the same BC name.
+    RDouble GLB_BCTotalArea;
+    PH_AllReduce(&BCTotalArea, &GLB_BCTotalArea, 1, MPI_SUM);
+    BCTotalArea = GLB_BCTotalArea;
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int iZoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+        Grid *iGrid = PHSPACE::GetGrid(iZoneID);
+
+        StructGrid *grid = StructGridCast(iGrid);
+
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+        int nBCRegion = structBCSet->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            StructBC *jBCRegion = structBCSet->GetBCRegion(iBCRegion);
+            string jBCName = jBCRegion->GetBCName();
+
+            if (jBCName == bcName)
+            {
+                Data_Param *bcData1 = jBCRegion->GetBCParamDataBase();
+                bcData1->UpdateData("BCTotalArea", &BCTotalArea, PHDOUBLE, 1);
+            }
+        }
+    }
+}
+
+void NSSolverStruct::CalculateMassFluxRatio()
+{
+    vector<SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+    if (globalBCList == 0)
+    {
+        return;
+    }
+
+    for (int iBC = 0; iBC < globalBCList->size(); ++ iBC)
+    {
+        SimpleBC *boundaryCondition = (*globalBCList)[iBC];
+        int bcType = boundaryCondition->GetBCType();
+
+        if (bcType == PHENGLEI::MASS_FLOW_OUTLET)
+        {
+            RDouble massFlux = 0.0;
+            string bcName = boundaryCondition->GetBCName();
+
+            Param_NSSolverStruct *parameters = GetControlParameters();
+            RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+
+            int nLocalZones = PHMPI::GetNumberofLocalZones();
+            for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+            {
+                int iZoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+                Grid *iGrid = PHSPACE::GetGrid(iZoneID);
+                StructGrid *grid = StructGridCast(iGrid);
+
+                StructBCSet *structBCSet = grid->GetStructBCSet();
+                int nBCRegion = structBCSet->GetnBCRegion();
+                for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+                {
+                    StructBC *jBCRegion = structBCSet->GetBCRegion(iBCRegion);
+                    string jBCName = jBCRegion->GetBCName();
+
+                    //! Judge the same BC region according the BC name.
+                    if (jBCName == bcName)
+                    {
+                        int ist, ied, jst, jed, kst, ked;
+                        int in, jn, kn;
+                        int is, js, ks;
+                        RDouble nxs, nys, nzs;
+                        int layer = 1;
+                        jBCRegion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+                        int iSurface = jBCRegion->GetFaceDirection() + 1;
+                        int lr = jBCRegion->GetFaceLeftOrRightIndex();
+                        RDouble4D &area = *(grid->GetFaceArea());
+                        RDouble4D &xfn = *(grid->GetFaceNormalX());
+                        RDouble4D &yfn = *(grid->GetFaceNormalY());
+                        RDouble4D &zfn = *(grid->GetFaceNormalZ());
+                        RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+                        using namespace IDX;
+                        for (int k = kst; k <= ked; ++ k)
+                        {
+                            for (int j = jst; j <= jed; ++ j)
+                            {
+                                for (int i = ist; i <= ied; ++ i)
+                                {
+                                    jBCRegion->GetInsideCellIndex(i, j, k, is, js, ks, layer);
+                                    jBCRegion->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                                    if (ABS(q(is, js, ks, IU)) > LARGE)
+                                    {
+                                        q(is, js, ks, IR) = primitiveVarFarfield[IR];
+                                        q(is, js, ks, IU) = primitiveVarFarfield[IU];
+                                        q(is, js, ks, IV) = primitiveVarFarfield[IV];
+                                        q(is, js, ks, IW) = primitiveVarFarfield[IW];
+                                    }
+
+                                    nxs = lr * xfn(in, jn, kn, iSurface);
+                                    nys = lr * yfn(in, jn, kn, iSurface);
+                                    nzs = lr * zfn(in, jn, kn, iSurface);
+                                    RDouble vn_c1 = q(is, js, ks, IU) * nxs + q(is, js, ks, IV) * nys + q(is, js, ks, IW) * nzs;
+
+                                    massFlux += q(is, js, ks, IR) * vn_c1 * area(in, jn, kn, iSurface);
+                                }
+                            }
+                        }
+                    }
+                }
+            }
+
+            RDouble GLB_MassFlux;
+            PH_AllReduce(&massFlux, &GLB_MassFlux, 1, MPI_SUM);
+
+            RDouble refMachNumber = parameters->GetRefMachNumber();
+            RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+            RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+
+            GLB_MassFlux *= refDimensionalDensity * refDimensionalSonicSpeed * refMachNumber;
+
+            for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+            {
+                int iZoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+                Grid *iGrid = PHSPACE::GetGrid(iZoneID);
+                StructGrid *grid = StructGridCast(iGrid);
+
+                StructBCSet *structBCSet = grid->GetStructBCSet();
+                int nBCRegion = structBCSet->GetnBCRegion();
+                for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+                {
+                    StructBC *jBCRegion = structBCSet->GetBCRegion(iBCRegion);
+                    string jBCName = jBCRegion->GetBCName();
+
+                    if (jBCName == bcName)
+                    {
+                        Data_Param *bcData = jBCRegion->GetBCParamDataBase();
+                        RDouble massFlow = 0.0;
+                        bcData->GetData("massFlow", &massFlow, PHDOUBLE, 1);
+
+                        RDouble massFluxRatio = massFlow / (GLB_MassFlux + TINY);
+
+                        massFluxRatio = MAX(0.8, MIN(massFluxRatio, 1.2));
+                        bcData->UpdateData("massFluxRatio", &massFluxRatio, PHDOUBLE, 1);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::OutFlowBC3D(Grid *gridIn, StructBC *structBC)
+{
+    using namespace IDX;
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    int isWennScheme = parameters->GetWennSchemeFlag();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                //! First cell index inside flowfield.
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+
+                //! Second cell index inside flowfield.
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                RestrictIndex(is2, js2, ks2, ni - 1, nj - 1, nk - 1);
+
+                //! First cell index of ghostcell.
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+
+                //! Second cell index of ghostcell.
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    q(it1, jt1, kt1, m) = q(is1, js1, ks1, m);
+                    q(it2, jt2, kt2, m) = q(it1, jt1, kt1, m);
+                }
+
+
+                if (isWennScheme == 1)
+                {
+                    int is3, js3, ks3;
+                    int it3, jt3, kt3;
+
+                    //! Third cell index inside flow field.
+                    structBC->GetInsideCellIndex(i, j, k, is3, js3, ks3, 3);
+
+                    RestrictIndex(is3, js3, ks3, ni - 1, nj - 1, nk - 1);
+
+                    //! Third cell index of ghost cell.
+                    structBC->GetGhostCellIndex(i, j, k, it3, jt3, kt3, 3);
+
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        q(it3, jt3, kt3, m) = q(it1, jt1, kt1, m);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::SymmetryBC3D(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &faceNormalVelocity = *(grid->GetFaceNormalVelocity());
+
+    int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+
+    RDouble nxs = 0, nys = 0, nzs = 0;
+
+    int is = 0, js = 0, ks = 0, it = 0, jt = 0, kt = 0, in = 0, jn = 0, kn = 0;
+    RDouble vx = 0, vy = 0, vz = 0, vn = 0, vgn = 0;
+    int nLayer = GetNumberOfGhostCellLayers();
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                nxs = xfn(in, jn, kn, iSurface);
+                nys = yfn(in, jn, kn, iSurface);
+                nzs = zfn(in, jn, kn, iSurface);
+                vgn = faceNormalVelocity(in, jn, kn, iSurface);
+
+                for (int layer = 1; layer <= nLayer; ++ layer)
+                {
+                    structBC->GetInsideCellIndex(i, j, k, is, js, ks, layer);
+                    RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    vx = q(is, js, ks, IU);
+                    vy = q(is, js, ks, IV);
+                    vz = q(is, js, ks, IW);
+                    vn = nxs * vx + nys * vy + nzs * vz - vgn;
+
+                    q(it, jt, kt, IR) = q(is, js, ks, IR);
+                    q(it, jt, kt, IU) = q(is, js, ks, IU) - 2.0 * nxs * vn;
+                    q(it, jt, kt, IV) = q(is, js, ks, IV) - 2.0 * nys * vn;
+                    q(it, jt, kt, IW) = q(is, js, ks, IW) - 2.0 * nzs * vn;
+                    q(it, jt, kt, IP) = q(is, js, ks, IP);
+
+                    for (int m = nNSEquation; m < nEquation; ++ m)
+                    {
+                        q(it, jt, kt, m) = q(is, js, ks, m);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::SingularAxisBC3D(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &faceNormalVelocity = *(grid->GetFaceNormalVelocity());
+
+    int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+
+    int iii[3][3] = { 1, 0, 0, 0, 1, 0, 0, 0, 1 };
+    //! To judge if the singular axis using half-plane symmetry boundary conditions or using full plane boundary conditions
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int iSingularDim = 0;
+    bool isWhole = 1;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBCTmp = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBCTmp->GetBCType();
+        if (BCType == PHENGLEI::SYMMETRY)
+        {
+            isWhole = 0;
+            iSingularDim = structBCTmp->GetFaceDirection() + 1;
+            if (iSingularDim != iSurface) break;
+        }
+
+        if (IsInterface(BCType))
+        {
+            if (structBCTmp->GetRegionBlock() == structBCTmp->GetTargetRegionBlock())
+            {
+                if (structBCTmp->GetFaceDirectionOfTargetBlock() == iSingularDim)
+                {
+                    isWhole = 1;
+                    iSingularDim = structBCTmp->GetFaceDirection() + 1;
+                    if (iSingularDim != iSurface) break;
+                }
+            }
+        }
+    }
+
+    int *startPoint = structBC->GetStartPoint();
+    int *endPoint = structBC->GetEndPoint();
+    int *faceDirectionIndex = structBC->GetFaceDirectionIndex();
+    if (iSingularDim == 0)
+    {
+        SingularAxisFullPlaneBC3D(grid, structBC);
+        return;
+    }
+    int nd3 = 6 - iSingularDim - iSurface;
+    RDouble nxs = 0, nys = 0, nzs = 0, vgn = 0;
+    if (isWhole == 0)
+    {
+        if (iSingularDim == 1)
+        {
+            int i = startPoint[0];
+            int j = (endPoint[1] + startPoint[1]) / 2 - 3 * faceDirectionIndex[1];
+            int k = (endPoint[2] + startPoint[2]) / 2 - 3 * faceDirectionIndex[2];
+            nxs = xfn(i, j, k, iSingularDim);
+            nys = yfn(i, j, k, iSingularDim);
+            nzs = zfn(i, j, k, iSingularDim);
+            vgn = faceNormalVelocity(i, j, k, iSingularDim);
+        }
+        else if (iSingularDim == 2)
+        {
+            int i = (endPoint[0] + startPoint[0]) / 2 - 3 * faceDirectionIndex[0];
+            int j = startPoint[1];
+            int k = (endPoint[2] + startPoint[2]) / 2 - 3 * faceDirectionIndex[2];
+            nxs = xfn(i, j, k, iSingularDim);
+            nys = yfn(i, j, k, iSingularDim);
+            nzs = zfn(i, j, k, iSingularDim);
+            vgn = faceNormalVelocity(i, j, k, iSingularDim);
+        }
+        else if (iSingularDim == 3)
+        {
+            int i = (endPoint[0] + startPoint[0]) / 2 - 3 * faceDirectionIndex[0];
+            int j = (endPoint[1] + startPoint[1]) / 2 - 3 * faceDirectionIndex[1];
+            int k = startPoint[2];
+            nxs = xfn(i, j, k, iSingularDim);
+            nys = yfn(i, j, k, iSingularDim);
+            nzs = zfn(i, j, k, iSingularDim);
+            vgn = faceNormalVelocity(i, j, k, iSingularDim);
+        }
+    }
+    else
+    {
+        nxs = 0.0;
+        nys = 0.0;
+        nzs = 0.0;
+        vgn = 0.0;
+    }
+
+    int halfDim = startPoint[iSingularDim - 1] + (endPoint[iSingularDim - 1] - startPoint[iSingularDim - 1]) / (1 + isWhole);
+    int wholeDim = endPoint[iSingularDim - 1];
+
+    RDouble vx = 0, vy = 0, vz = 0, vn = 0;
+
+    using namespace IDX;
+
+    for (int i = startPoint[iSurface - 1]; i <= endPoint[iSurface - 1]; ++ i)
+    {
+        for (int iLayer = 1; iLayer <= 2; ++ iLayer)
+        {
+            int it1 = i + iLayer * structBC->GetFaceLeftOrRightIndex();
+            int is1 = i - (iLayer - 1) * structBC->GetFaceLeftOrRightIndex();
+            for (int j = startPoint[iSingularDim - 1]; j <= endPoint[iSingularDim - 1]; ++ j)
+            {
+                int jj = 0;
+                if (isWhole == 0)
+                {
+                    jj = wholeDim - j + 1;
+                }
+                else
+                {
+                    jj = halfDim + j;
+                    if (jj > wholeDim) jj = wholeDim;
+                }
+
+                for (int k = startPoint[nd3 - 1]; k <= endPoint[nd3 - 1]; ++ k)
+                {
+                    int it = iii[iSurface - 1][0] * it1 + iii[iSingularDim - 1][0] * j + iii[nd3 - 1][0] * k;
+                    int jt = iii[iSurface - 1][1] * it1 + iii[iSingularDim - 1][1] * j + iii[nd3 - 1][1] * k;
+                    int kt = iii[iSurface - 1][2] * it1 + iii[iSingularDim - 1][2] * j + iii[nd3 - 1][2] * k;
+                    int is = iii[iSurface - 1][0] * is1 + iii[iSingularDim - 1][0] * jj + iii[nd3 - 1][0] * k;
+                    int js = iii[iSurface - 1][1] * is1 + iii[iSingularDim - 1][1] * jj + iii[nd3 - 1][1] * k;
+                    int ks = iii[iSurface - 1][2] * is1 + iii[iSingularDim - 1][2] * jj + iii[nd3 - 1][2] * k;
+
+                    vx = q(is, js, ks, IU);
+                    vy = q(is, js, ks, IV);
+                    vz = q(is, js, ks, IW);
+                    vn = nxs * vx + nys * vy + nzs * vz - vgn;
+
+                    q(it, jt, kt, IR) = q(is, js, ks, IR);
+                    q(it, jt, kt, IU) = q(is, js, ks, IU) - 2.0 * nxs * vn;
+                    q(it, jt, kt, IV) = q(is, js, ks, IV) - 2.0 * nys * vn;
+                    q(it, jt, kt, IW) = q(is, js, ks, IW) - 2.0 * nzs * vn;
+                    q(it, jt, kt, IP) = q(is, js, ks, IP);
+
+                    for (int m = nNSEquation; m < nEquation; ++ m)
+                    {
+                        q(it, jt, kt, m) = q(is, js, ks, m);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::SingularAxisFullPlaneBC3D(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int bcType = structBC->GetBCType();
+    int SingularDim = bcType - 71;
+
+    int is1, js1, ks1;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    if (SingularDim == 0)
+    {
+        for (int i = ist; i <= ied; ++ i)
+        {
+            for (int iEq = 0; iEq < nEquation; ++ iEq)
+            {
+                RDouble sumQ = 0.0;
+                if (jst == jed)
+                {
+                    int j = jst;
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                        RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                        sumQ += q(is1, js1, ks1, iEq);
+                    }
+                    sumQ = sumQ / static_cast<RDouble>(ked - kst + 1);
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                        structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+                        q(it1, jt1, kt1, iEq) = sumQ;
+                        q(it2, jt2, kt2, iEq) = q(it1, jt1, kt1, iEq);
+                    }
+                }
+                else
+                {
+                    int k = kst;
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                        RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                        sumQ += q(is1, js1, ks1, iEq);
+                    }
+                    sumQ = sumQ / static_cast<RDouble>(jed - jst + 1);
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                        structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+                        q(it1, jt1, kt1, iEq) = sumQ;
+                        q(it2, jt2, kt2, iEq) = q(it1, jt1, kt1, iEq);
+                    }
+                }
+            }
+        }
+    }
+    else if (SingularDim == 1)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int iEq = 0; iEq < nEquation; ++ iEq)
+            {
+                RDouble sumQ = 0.0;
+                if (ist == ied)
+                {
+                    int i = ist;
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                        sumQ += q(is1, js1, ks1, iEq);
+                    }
+                    sumQ = sumQ / static_cast<RDouble>(ked - kst + 1);
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                        structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+                        q(it1, jt1, kt1, iEq) = sumQ;
+                        q(it2, jt2, kt2, iEq) = q(it1, jt1, kt1, iEq);
+                    }
+                }
+                else
+                {
+                    int k = kst;
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                        sumQ += q(is1, js1, ks1, iEq);
+                    }
+                    sumQ = sumQ / static_cast<RDouble>(ied - ist + 1);
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                        structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+                        q(it1, jt1, kt1, iEq) = sumQ;
+                        q(it2, jt2, kt2, iEq) = q(it1, jt1, kt1, iEq);
+                    }
+                }
+            }
+        }
+    }
+    else if (SingularDim == 2)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int iEq = 0; iEq < nEquation; ++ iEq)
+            {
+                RDouble sumQ = 0.0;
+                if (jst == jed)
+                {
+                    int j = jst;
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                        RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                        sumQ += q(is1, js1, ks1, iEq);
+                    }
+                    sumQ = sumQ / static_cast<RDouble>(ied - ist + 1);
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                        structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+                        q(it1, jt1, kt1, iEq) = sumQ;
+                        q(it2, jt2, kt2, iEq) = q(it1, jt1, kt1, iEq);
+                    }
+                }
+                else
+                {
+                    int i = ist;
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                        RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                        sumQ += q(is1, js1, ks1, iEq);
+                    }
+                    sumQ = sumQ / static_cast<RDouble>(jed - jst + 1);
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                        structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+                        q(it1, jt1, kt1, iEq) = sumQ;
+                        q(it2, jt2, kt2, iEq) = q(it1, jt1, kt1, iEq);
+                    }
+                }
+            }
+        }
+    }
+}
+
+//! Set viscous adiabatic wall condition.
+void NSSolverStruct::ViscousAdiabaticWall(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int isWennScheme = parameters->GetWennSchemeFlag();
+    //! Obtain the number of the physical equations.
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    int isAle = parameters->GetIsCodeOfAleModel();
+
+    RDouble4D &faceVelocityX = *(grid->GetFaceVelocityX());
+    RDouble4D &faceVelocityY = *(grid->GetFaceVelocityY());
+    RDouble4D &faceVelocityZ = *(grid->GetFaceVelocityZ());
+
+    RDouble uWall = 0.0;
+    RDouble vWall = 0.0;
+    RDouble wWall = 0.0;
+    Data_Param *bcData = structBC->GetBCParamDataBase();
+
+    if (bcData)
+    {
+        if (bcData->IsExist("uWall", PHDOUBLE, 1))
+        {
+            bcData->GetData("uWall", &uWall, PHDOUBLE, 1);
+            bcData->GetData("vWall", &vWall, PHDOUBLE, 1);
+            bcData->GetData("wWall", &wWall, PHDOUBLE, 1);
+        }
+    }
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int in, jn, kn;
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                RestrictIndex(is2, js2, ks2, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                RDouble velocityXWall = uWall;
+                RDouble velocityYWall = vWall;
+                RDouble velocityZWall = wWall;
+                if (isUnsteady && isAle)
+                {
+                    velocityXWall += faceVelocityX(in, jn, kn, iSurface);
+                    velocityYWall += faceVelocityY(in, jn, kn, iSurface);
+                    velocityZWall += faceVelocityZ(in, jn, kn, iSurface);
+                }
+
+                q(it1, jt1, kt1, IR) = q(is1, js1, ks1, IR);
+                q(it1, jt1, kt1, IU) = -q(is1, js1, ks1, IU) + 2.0 * velocityXWall;
+                q(it1, jt1, kt1, IV) = -q(is1, js1, ks1, IV) + 2.0 * velocityYWall;
+                q(it1, jt1, kt1, IW) = -q(is1, js1, ks1, IW) + 2.0 * velocityZWall;
+                q(it1, jt1, kt1, IP) = q(is1, js1, ks1, IP);
+
+                q(it2, jt2, kt2, IR) = q(it1, jt1, kt1, IR);
+                q(it2, jt2, kt2, IU) = q(it1, jt1, kt1, IU);
+                q(it2, jt2, kt2, IV) = q(it1, jt1, kt1, IV);
+                q(it2, jt2, kt2, IW) = q(it1, jt1, kt1, IW);
+                q(it2, jt2, kt2, IP) = q(it1, jt1, kt1, IP);
+
+                for (int m = nNSEquation; m < nEquation; ++ m)
+                {
+                    q(it1, jt1, kt1, m) = q(is1, js1, ks1, m);
+                    q(it2, jt2, kt2, m) = q(it1, jt1, kt1, m);
+                }
+
+                if (isWennScheme == 1)
+                {
+                    int is3, js3, ks3;
+                    int it3, jt3, kt3;
+
+                    //! Third cell index inside flowfield.
+                    structBC->GetInsideCellIndex(i, j, k, is3, js3, ks3, 3);
+
+                    RestrictIndex(is3, js3, ks3, ni - 1, nj - 1, nk - 1);
+
+                    //! Third cell index of ghostcell.
+                    structBC->GetGhostCellIndex(i, j, k, it3, jt3, kt3, 3);
+
+                    q(it3, jt3, kt3, IR) = q(it1, jt1, kt1, IR);
+                    q(it3, jt3, kt3, IU) = q(it1, jt1, kt1, IU);
+                    q(it3, jt3, kt3, IV) = q(it1, jt1, kt1, IV);
+                    q(it3, jt3, kt3, IW) = q(it1, jt1, kt1, IW);
+                    q(it3, jt3, kt3, IP) = q(it1, jt1, kt1, IP);
+
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        q(it3, jt3, kt3, m) = q(it1, jt1, kt1, m);
+                    }
+                }
+            }
+        }
+    }
+}
+
+//! Set viscous isothermal wall condition.
+void NSSolverStruct::ViscousIsotropicWall(Grid *gridIn, StructBC *structBC, int iWallBC)
+{
+    //! chemical = 1 is not need to be cared, it is treated in another function.
+    //! temperature array should not appear here, it has not been updated.
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    int isAle = parameters->GetIsCodeOfAleModel();
+
+    RDouble refGama = parameters->GetRefGama();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+
+    RDouble uWall = 0.0;
+    RDouble vWall = 0.0;
+    RDouble wWall = 0.0;
+
+    RDouble wallTemperature = 0.0;
+    structBC->GetParamData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+
+    if (structBC->CheckParamData("uWall"))
+    {
+        structBC->GetParamData("uWall", &uWall, PHDOUBLE, 1);
+        structBC->GetParamData("vWall", &vWall, PHDOUBLE, 1);
+        structBC->GetParamData("wWall", &wWall, PHDOUBLE, 1);
+    }
+
+    bool wallTempArrayExist = false;
+    RDouble3D *wallTempArray = NULL;
+    if (structBC->CheckFieldData("wallTempArray"))
+    {
+        wallTempArrayExist = true;
+        wallTempArray = reinterpret_cast <RDouble3D *> (structBC->GetFieldDataPtr("wallTempArray"));
+    }
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (gridIn->GetDataPtr("surfaceSlipVariables"));
+    }
+    RDouble2D *surfaceTemperature = NULL;
+    if (wallTemperature >= 0.0)
+    {
+        surfaceTemperature = reinterpret_cast <RDouble2D *> (gridIn->GetDataPtr("surfaceTemperature"));
+    }
+    bool isRadiationEquilibrium = false;
+    if (fabs(wallTemperature) <= EPSILON)
+    {
+        isRadiationEquilibrium = true;
+    }
+
+    int nRapidFlowfield = parameters->GetRapidFlowfieldMethod();
+    RDouble3D *surfacePressure = NULL;
+    if (nRapidFlowfield > 0)
+    {
+        surfacePressure = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfacePressure"));
+    }
+    int nInitPressureStep = parameters->GetInitialPressureSteps();
+    int nCurrentIteration = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    bool isUseRapidMethod = false;
+    if (nRapidFlowfield > 0 && nCurrentIteration <= nInitPressureStep)
+    {
+        isUseRapidMethod = true;
+    }
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+    int iSurface = structBC->GetFaceDirection() + 1;
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &faceVelocityX = *(grid->GetFaceVelocityX());
+    RDouble4D &faceVelocityY = *(grid->GetFaceVelocityY());
+    RDouble4D &faceVelocityZ = *(grid->GetFaceVelocityZ());
+
+    RDouble temperatureWallNonDimensional = wallTemperature / refDimensionalTemperature;  //! non-dimensional temperature.
+    RDouble temperaturelimitation = 1.E-6;
+
+    //! Usually, it is 2.
+    int nLayer = GetNumberOfGhostCellLayers();
+
+    using namespace IDX;
+
+    int is, js, ks, it, jt, kt;
+    int nIndexOfCell = 0;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int layer = 1; layer <= nLayer; ++ layer)
+                {
+                    int in, jn, kn;
+                    structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                    structBC->GetInsideCellIndex(i, j, k, is, js, ks, layer);
+                    RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    RDouble rs = q(is, js, ks, 0);
+                    RDouble us = q(is, js, ks, 1);
+                    RDouble vs = q(is, js, ks, 2);
+                    RDouble ws = q(is, js, ks, 3);
+                    RDouble ps = q(is, js, ks, 4);
+                    RDouble ts = refGama * refMachNumber * refMachNumber * ps / rs;
+
+                    //if (isUseRapidMethod)
+                    //{
+                    //    ps = (*surfacePressure)(iWallBC, nIndexOfCell, 1);
+                    //}
+
+                    RDouble velocityXWall = uWall;
+                    RDouble velocityYWall = vWall;
+                    RDouble velocityZWall = wWall;
+
+                    if (nSlipBCModel > 0)
+                    {
+                        velocityXWall += (*surfaceSlipVariables)(iWallBC, nIndexOfCell, 3);
+                        velocityYWall += (*surfaceSlipVariables)(iWallBC, nIndexOfCell, 4);
+                        velocityZWall += (*surfaceSlipVariables)(iWallBC, nIndexOfCell, 5);
+                    }
+
+                    if (isUnsteady && isAle)
+                    {
+                        velocityXWall += faceVelocityX(in, jn, kn, iSurface);
+                        velocityYWall += faceVelocityY(in, jn, kn, iSurface);
+                        velocityZWall += faceVelocityZ(in, jn, kn, iSurface);
+                    }
+
+                    RDouble ut = -us + 2.0 * velocityXWall;
+                    RDouble vt = -vs + 2.0 * velocityYWall;
+                    RDouble wt = -ws + 2.0 * velocityZWall;
+                    RDouble pt = ps;
+                    if (wallTempArrayExist)
+                    {
+                        temperatureWallNonDimensional = (*wallTempArray)(i, j, k) / refDimensionalTemperature;
+                    }
+                    if (isRadiationEquilibrium)
+                    {
+                        temperatureWallNonDimensional = (*surfaceTemperature)(iWallBC, nIndexOfCell);
+                    }
+                    if (nSlipBCModel > 0)
+                    {
+                        temperatureWallNonDimensional = (*surfaceSlipVariables)(iWallBC, nIndexOfCell, ITT);
+                    }
+
+                    RDouble tt = 2.0 * temperatureWallNonDimensional - ts;
+                    if (tt < temperaturelimitation)
+                    {
+                        tt = temperatureWallNonDimensional;
+                    }
+
+                    RDouble rt = refGama * refMachNumber * refMachNumber * pt / tt;
+
+                    q(it, jt, kt, 0) = rt;
+                    q(it, jt, kt, 1) = ut;
+                    q(it, jt, kt, 2) = vt;
+                    q(it, jt, kt, 3) = wt;
+                    q(it, jt, kt, 4) = pt;
+                }
+                ++ nIndexOfCell;
+            }
+        }
+    }
+}
+
+void NSSolverStruct::SetBCInitialValuesByInterpolation(StructBC *structBC, RDouble *primitiveVar)
+{
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (!isUnsteady)
+    {
+        return;
+    }
+
+    using namespace GAS_SPACE;
+    //! Obtain the local parameters on boundary.
+    int nTrajectoryVariables = 1;
+    structBC->GetBCParamDataBase()->GetData("nTrajectoryVariables", &nTrajectoryVariables, PHINT, 1);
+    
+    RDouble *time = new RDouble[nTrajectoryVariables];
+    RDouble *pressure = new RDouble[nTrajectoryVariables];
+    RDouble *velocity = new RDouble[nTrajectoryVariables];
+    RDouble *temperature = new RDouble[nTrajectoryVariables];
+
+    structBC->GetBCParamDataBase()->GetData("time", &time[0], PHDOUBLE, nTrajectoryVariables);
+    structBC->GetBCParamDataBase()->GetData("pressure", &pressure[0], PHDOUBLE, nTrajectoryVariables);
+    structBC->GetBCParamDataBase()->GetData("velocity", &velocity[0], PHDOUBLE, nTrajectoryVariables);
+    structBC->GetBCParamDataBase()->GetData("temperature", &temperature[0], PHDOUBLE, nTrajectoryVariables);
+
+    RDouble localDimensionalVelocity = 0, localDimensionalTemperature = 0, localDimensionalPressure = 0, localDimensionalDensity = 0;
+
+    //! Obtain the reference parameters.
+    RDouble refDimensionalDensity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+    RDouble refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+    RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+
+    RDouble physicalTime = GlobalDataBase::GetDoubleParaFromDB("physicalTime");
+    RDouble reynoldsReferenceLengthDimensional = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+    RDouble unit = reynoldsReferenceLengthDimensional / refDimensionalVelocity;
+    RDouble physicalTimeStepDimensional = physicalTime * unit;
+
+    localDimensionalVelocity = velocity[0];
+    localDimensionalPressure = pressure[0];
+    localDimensionalTemperature = temperature[0];
+    for (int iData = 1; iData < nTrajectoryVariables; ++ iData)
+    {
+        if (physicalTimeStepDimensional > time[iData - 1] && physicalTimeStepDimensional < time[iData])
+        {
+            RDouble delta = (physicalTimeStepDimensional - time[iData - 1]) / (time[iData] - time[iData - 1]);
+            localDimensionalVelocity = velocity[iData - 1] + delta * (velocity[iData] - velocity[iData - 1]);
+            localDimensionalPressure = pressure[iData - 1] + delta * (pressure[iData] - pressure[iData - 1]);
+            localDimensionalTemperature = temperature[iData - 1] + delta * (temperature[iData] - temperature[iData - 1]);
+        }
+    }
+    if (physicalTimeStepDimensional > time[nTrajectoryVariables - 1])
+    {
+        localDimensionalVelocity = velocity[nTrajectoryVariables - 1];
+        localDimensionalPressure = pressure[nTrajectoryVariables - 1];
+        localDimensionalTemperature = temperature[nTrajectoryVariables - 1];
+    }
+
+    RDouble attackd = 0, angleSlide = 0;
+    if (structBC->GetBCParamDataBase()->IsExist("attackd", PHDOUBLE, 1))
+    {
+        structBC->GetBCParamDataBase()->GetData("attackd", &attackd, PHDOUBLE, 1);
+    }
+    else
+    {
+        attackd = GlobalDataBase::GetDoubleParaFromDB("attackd");
+    }
+    if (structBC->GetBCParamDataBase()->IsExist("angleSlide", PHDOUBLE, 1))
+    {
+        structBC->GetBCParamDataBase()->GetData("angleSlide", &angleSlide, PHDOUBLE, 1);
+    }
+    RDouble attack = attackd * PI / 180.0;
+    RDouble sideslip = angleSlide * PI / 180.0;
+
+    int nchem = gas->GetChemicalType();
+    if (nchem == 0)
+    {
+        RDouble reference_general_gas_constant = GlobalDataBase::GetDoubleParaFromDB("reference_average_general_gas_constant");
+        localDimensionalDensity = localDimensionalPressure / reference_general_gas_constant / localDimensionalTemperature;
+    }
+    else
+    {
+        int nNSEqn = gas->GetNSEquationNumber();
+        int numberOfSpecies = gas->GetNumberOfSpecies();
+        RDouble initMassFraction[MAX_SPECIES_NUM] = { 0 }, primVars[MAX_SPECIES_NUM] = { 0 };
+        if (structBC->GetBCParamDataBase()->IsExist("initMassFraction", PHDOUBLE, numberOfSpecies))
+        {
+            structBC->GetBCParamDataBase()->GetData("initMassFraction", &initMassFraction, PHDOUBLE, numberOfSpecies);
+        }
+        else
+        {
+            RDouble *speciesMass = gas->GetInitMassFraction();
+            for (int s = 0; s < numberOfSpecies; ++ s)
+            {
+                initMassFraction[s] = speciesMass[s];
+            }
+        }
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primVars[nNSEqn + s] = initMassFraction[s];
+        }
+
+        RDouble oMass = 0.0, gasR = 0.0;
+        gas->ComputeMolecularWeightReciprocalDimensional(primVars, oMass);
+        gasR = rjmk * oMass;
+        localDimensionalDensity = localDimensionalPressure / (gasR * localDimensionalTemperature);
+
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            primitiveVar[nNSEqn + s] = initMassFraction[s];
+        }
+
+        int ntmodel = gas->GetTemperatureModel();
+        RDouble nonDimTv = localDimensionalTemperature / refDimensionalTemperature;
+
+        if (ntmodel > 1)       //! multi-temperature model.
+        {
+            RDouble vibrationEnergy = gas->GetMixedGasDimensionalVibrationEnergy(nonDimTv, initMassFraction);
+            RDouble electronEnergy  = gas->GetMixedGasDimensionalElectronEnergy(nonDimTv, initMassFraction);
+            RDouble squareVelocity = refDimensionalVelocity * refDimensionalVelocity;
+            vibrationEnergy = vibrationEnergy / squareVelocity;
+            electronEnergy  = electronEnergy  / squareVelocity;
+            if (ntmodel == 2)
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy + electronEnergy;
+    }
+            else
+            {
+                primitiveVar[nNSEqn + numberOfSpecies] = vibrationEnergy;
+                primitiveVar[nNSEqn + numberOfSpecies + 1] = electronEnergy;
+            }
+        }
+    }
+    using namespace IDX;
+    primitiveVar[IR] = localDimensionalDensity / refDimensionalDensity;
+    primitiveVar[IU] = localDimensionalVelocity / refDimensionalVelocity * cos(attack) * cos(sideslip);
+    primitiveVar[IV] = localDimensionalVelocity / refDimensionalVelocity * sin(attack) * cos(sideslip);
+    primitiveVar[IW] = localDimensionalVelocity / refDimensionalVelocity * sin(sideslip);
+    primitiveVar[IP] = localDimensionalPressure / (refDimensionalDensity * refDimensionalVelocity * refDimensionalVelocity);
+    delete[]time; time = NULL;
+    delete[]pressure; pressure = NULL;
+    delete[]velocity; velocity = NULL;
+    delete[]temperature; temperature = NULL;
+}
+
+void NSSolverStruct::SetBCInitialValuesBySpeedCoef(int nNumberOfSpeedStep, RDouble *primitiveVar)
+{
+    int iterationStep;
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nMGLevel = parameters->GetNMGLevel();
+    if (nMGLevel <= 1)
+    {
+        //! Finest grid.
+        GlobalDataBase::GetData("outnstep", &iterationStep, PHINT, 1);
+    }
+    else
+    {
+        //! Coarse grid.
+        GlobalDataBase::GetData("newnstep", &iterationStep, PHINT, 1);
+    }
+}
+
+void NSSolverStruct::InitialSetPartialParameter(StructGrid *grid, bool flowTag)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int nNumberOfPartialField = 0 ;
+    if (GlobalDataBase::IsExist("nNumberOfPartialField", PHINT, 1))
+    {
+        nNumberOfPartialField = GlobalDataBase::GetIntParaFromDB("nNumberOfPartialField");
+    }
+    if (nNumberOfPartialField == 0)
+    {
+        return;
+    }
+    int nPartialParameter = 0 ;
+    if (GlobalDataBase::IsExist("nPartialParameter", PHINT, 1))
+    {
+        nPartialParameter = GlobalDataBase::GetIntParaFromDB("nPartialParameter");
+    }
+    if (nPartialParameter == 0)
+    {
+        return;
+    }
+////////////////////////////////////////////// read "nStartGridIndex" and "nEndGridIndex"
+
+    int *nStartGridIndex = new int[nNumberOfPartialField];
+
+    int *nEndGridIndex = new int[nNumberOfPartialField];
+
+    if (GlobalDataBase::IsExist("nStartGridIndex", PHINT, nNumberOfPartialField))
+    {
+        GlobalDataBase::GetData("nStartGridIndex", &nStartGridIndex[0], PHINT, nNumberOfPartialField);
+    }
+    else
+    {
+        delete[] nStartGridIndex;
+        delete[] nEndGridIndex;
+        return;
+    }
+
+    if (GlobalDataBase::IsExist("nEndGridIndex", PHINT, nNumberOfPartialField))
+    {
+        GlobalDataBase::GetData("nEndGridIndex", &nEndGridIndex[0], PHINT, nNumberOfPartialField);
+    }
+    else
+    {
+        for (int m = 0; m < nNumberOfPartialField; ++ m) nEndGridIndex[m] = nStartGridIndex[m];
+    }
+
+//////////////////////////////////////////////judge "IsPartialField",and set "IndexOfPartialField"
+    int ordinaryGridIndex = grid->GetOrdinaryGridIndex() + 1;
+   // int ordinaryGridIndex = grid->GetZoneID() + 1;
+    bool IsPartialField = false;
+    int IndexOfPartialField = 0;
+
+    for (int m = 0; m < nNumberOfPartialField; ++ m)
+    {
+        for (int GridIndex = nStartGridIndex[m]; GridIndex <= nEndGridIndex[m]; ++ GridIndex)
+        {
+            if(IsPartialField == false && GridIndex == ordinaryGridIndex) 
+            {
+                IsPartialField = true;
+                IndexOfPartialField = m;
+            }
+        }
+    }
+
+    delete[] nStartGridIndex;
+    delete[] nEndGridIndex;
+
+    if(IsPartialField == false) return;
+
+    int nmax;
+    if (nPartialParameter == 1)     //the same Variables
+    {
+        nmax = 1;
+        IndexOfPartialField = 0;
+    }
+    else                            //different Variables
+    {
+        nmax = nNumberOfPartialField;
+    }
+
+////////////////////////////////////////////// read and set "partialCFL"
+    if( flowTag == false)
+    {
+        grid->SetPartialCFL(parameters->GetCFLEnd());
+
+        int ifPartialCFL = 0;
+        if (GlobalDataBase::IsExist("ifPartialCFL", PHINT, 1))
+        {
+            GlobalDataBase::GetData("ifPartialCFL", &ifPartialCFL, PHINT, 1);
+        }
+        if(ifPartialCFL <= 0)return;
+
+        RDouble *partialCFL = new RDouble[nmax];
+        if (GlobalDataBase::IsExist("partialCFL", PHDOUBLE, nmax))
+        {
+            GlobalDataBase::GetData("partialCFL", &partialCFL[0], PHDOUBLE, nmax);
+            grid->SetPartialCFL(partialCFL[IndexOfPartialField]);
+
+            //RDouble cfl10= partialCFL[IndexOfPartialField];
+            //RDouble cfl11= grid->GetPartialCFL();
+            //RDouble cfl12= grid->GetPartialCFL();
+        }
+        delete[] partialCFL;
+        return;
+    }
+//////////////////////////////////////////////read and set "partialSpeedCoef"
+    int ifPartialIniFlow = 0;
+    if (GlobalDataBase::IsExist("ifPartialIniFlow", PHINT, 1))
+    {
+        GlobalDataBase::GetData("ifPartialIniFlow", &ifPartialIniFlow, PHINT, 1);
+    }
+    if(ifPartialIniFlow <= 0)return;
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+    using namespace IDX;
+
+    RDouble *partialSpeedCoef = new RDouble[nmax];
+    if (GlobalDataBase::IsExist("partialSpeedCoef", PHDOUBLE, nmax) && ifPartialIniFlow == 1)
+    {
+        GlobalDataBase::GetData("partialSpeedCoef", &partialSpeedCoef[0], PHDOUBLE, nmax);
+
+        RDouble iniSpeedCoef = min(1.0, max(0.0, partialSpeedCoef[IndexOfPartialField]));
+        
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    primitiveVariables(i, j, k, IU) *= iniSpeedCoef;
+                    primitiveVariables(i, j, k, IV) *= iniSpeedCoef;
+                    primitiveVariables(i, j, k, IW) *= iniSpeedCoef;
+                }
+            }
+        }
+    }
+    delete[] partialSpeedCoef;
+
+//////////////////////////////////////////////read and set "partialPrimitiveVariables"
+    
+    if(ifPartialIniFlow <= 1)return;
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+
+    //Obtain the reference parameters.
+    RDouble refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+    RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+    RDouble refDimensionalPressure = GlobalDataBase::GetDoubleParaFromDB("refDimensionalPressure");
+
+    RDouble *partialPressure = new RDouble[nmax];
+    RDouble *partialTemperature = new RDouble[nmax];
+    RDouble *partialSpeed = new RDouble[nmax];
+    RDouble *partialAttackd = new RDouble[nmax];
+    RDouble *partialSlide = new RDouble[nmax];
+
+    RDouble pressure, density, temperature[3] = {1.0, 1.0, 1.0};
+    RDouble speedU, speedV, speedW, Speed, Attackd ,Slide;
+    bool densityTag = false, tag = false;
+
+    density  = primitiveVarFarfield[IR];
+    pressure = primitiveVarFarfield[IP];
+    speedU   = primitiveVarFarfield[IU];
+    speedV   = primitiveVarFarfield[IV];
+    speedW   = primitiveVarFarfield[IW];
+
+    Speed = sqrt(speedU * speedU + speedV * speedV + speedW * speedW);
+    Attackd = 0.0; Slide   = 0.0;
+
+    if (GlobalDataBase::IsExist("partialPressure", PHDOUBLE, nmax))
+    {
+        GlobalDataBase::GetData("partialPressure", &partialPressure[0], PHDOUBLE, nmax);
+        pressure = partialPressure[IndexOfPartialField] / refDimensionalPressure;
+        tag = true;
+    }
+
+    if (GlobalDataBase::IsExist("partialTemperature", PHDOUBLE, nmax))
+    {
+        GlobalDataBase::GetData("partialTemperature", &partialTemperature[0], PHDOUBLE, nmax);
+        temperature[0] = partialTemperature[IndexOfPartialField] / refDimensionalTemperature;
+        temperature[1] = temperature[0];
+        temperature[2] = temperature[0];
+
+        densityTag = true;
+        tag = true;
+    }
+
+    if (GlobalDataBase::IsExist("partialAttackd", PHDOUBLE, nmax))
+    {
+        GlobalDataBase::GetData("partialAttackd", &partialAttackd[0], PHDOUBLE, nmax);
+        Attackd = partialAttackd[IndexOfPartialField] * PI / 180.0;
+        tag = true;
+    }
+
+    if (GlobalDataBase::IsExist("partialSlide", PHDOUBLE, nmax))
+    {
+        GlobalDataBase::GetData("partialSlide", &partialSlide[0], PHDOUBLE, nmax);
+        Slide = partialSlide[IndexOfPartialField] * PI / 180.0;
+        tag = true;
+    }
+
+    if (GlobalDataBase::IsExist("partialSpeed", PHDOUBLE, nmax))
+    {
+        GlobalDataBase::GetData("partialSpeed", &partialSpeed[0], PHDOUBLE, nmax);
+        Speed = partialSpeed[IndexOfPartialField] / refDimensionalVelocity;
+
+        speedU   = Speed * cos(Attackd) * cos(Slide);
+        speedV   = Speed * sin(Attackd) * cos(Slide);
+        speedW   = Speed * sin(Slide);
+        tag = true;
+    }
+
+    delete[] partialPressure;
+    delete[] partialTemperature;
+    delete[] partialSpeed;
+    delete[] partialAttackd;
+    delete[] partialSlide;
+
+    int nEquation = parameters->GetnEquation();
+    RDouble *prim = new RDouble[nEquation];
+
+    prim[IP] = pressure;
+    prim[IU] = speedU;
+    prim[IV] = speedV;
+    prim[IW] = speedW;
+
+    int nchem = gas->GetChemicalType();
+    RDouble gasConstant = gas->GetUniversalGasConstant();
+
+    if (nchem == 0)     //! Perfect gas.
+    {
+        if(densityTag) 
+        {
+            density = pressure / (temperature[0] * gasConstant);
+        }
+        else
+        {
+            temperature[0] = pressure / (density * gasConstant);
+            temperature[1] = temperature[0];
+            temperature[2] = temperature[0];
+        }
+        prim[IR] = density;
+    }
+    else if (nchem == 1)//! Real gas.
+    {
+        int numberOfSpecies = gas->GetNumberOfSpecies();
+        int nNSEquation = parameters->GetNSEquationNumber();
+
+        RDouble *MassFractions = new RDouble[numberOfSpecies];
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+            MassFractions[s] = primitiveVarFarfield[nNSEquation + s];
+        }
+
+        if (nPartialParameter == 1)
+        {
+            nmax = numberOfSpecies;
+            IndexOfPartialField = 0;
+        }
+        else
+        {
+            nmax = nNumberOfPartialField * numberOfSpecies;
+            IndexOfPartialField *= numberOfSpecies;
+        }
+
+        RDouble *partialMassFractions = new RDouble[nmax];
+
+        if (GlobalDataBase::IsExist("partialMassFractions", PHDOUBLE, nmax))
+        {
+            GlobalDataBase::GetData("partialMassFractions", &partialMassFractions[0], PHDOUBLE, nmax);
+            for (int s = 0; s < numberOfSpecies; ++ s)
+            {
+                MassFractions[s] = partialMassFractions[IndexOfPartialField + s];
+            }
+            tag = true;
+        }
+
+        for (int s = 0; s < numberOfSpecies; ++ s)
+        {
+             prim[nNSEquation + s]= MassFractions[s];
+        }
+
+        RDouble massReciprocal, ceDivideMe;
+        massReciprocal = gas->GetMixedGasMolecularWeightReciprocalWithoutElectron(MassFractions, ceDivideMe);
+
+        if(densityTag) 
+        {
+            density = pressure / (temperature[0] * gasConstant * (massReciprocal + ceDivideMe));
+        }
+        else
+        {
+            gas->GetTemperatureR(primitiveVarFarfield, temperature[0], temperature[1], temperature[2]);
+        }
+
+        prim[IR] = density;
+
+        int ntmodel = gas->GetTemperatureModel();
+        if (ntmodel ==2)       //! multi-temperature model.
+        {
+            gas->ComputeMixtureEve(MassFractions, temperature[1], prim[nEquation-1]);
+        }
+        else if (ntmodel ==3)       //! multi-temperature model.
+        {
+            gas->ComputeMixtureEv(MassFractions, temperature[1], prim[nEquation-2]);
+            gas->ComputeMixtureEe(MassFractions, temperature[2], prim[nEquation-1]);
+        }
+
+        delete[] MassFractions, partialMassFractions;
+    }
+
+    if(tag)
+    {
+        RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    for (int s = 0; s < nEquation; ++ s)
+                    {
+                         primitiveVariables( i, j, k, s)= prim[s];
+                    }
+
+                    for (int m = 0; m < parameters->GetTemperatureModel(); ++ m)
+                    {
+                        temperatures(i, j, k, m) = temperature[m];
+                    }
+                }
+            }
+        }
+    }
+}
+
+
+void NSSolverStruct::InFlowBC3D(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    RDouble *primitiveVarFarfield = new RDouble[nEquation];
+    structBC->GetParamData("primitiveVarFarfield", primitiveVarFarfield, PHDOUBLE, nEquation);
+
+    int inflowParaType = -1;
+    if (structBC->CheckParamData("inflowParaType"))
+    {
+        structBC->GetParamData("inflowParaType", &inflowParaType, PHINT, 1);
+    }
+
+    if (inflowParaType == TRAJECTORY)
+    {
+        SetBCInitialValuesByInterpolation(structBC, primitiveVarFarfield);
+    }
+
+    int nNumberOfSpeedStep = parameters->GetnNumberOfSpeedStep();
+    if (nNumberOfSpeedStep > 0)
+    {
+        SetBCInitialValuesBySpeedCoef(nNumberOfSpeedStep, primitiveVarFarfield);
+    }
+
+    int it, jt, kt;
+
+    int nLayer = GetNumberOfGhostCellLayers();
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int layer = 1; layer <= nLayer; ++ layer)
+                {
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        primitiveVars(it, jt, kt, m) = primitiveVarFarfield[m];
+                    }
+                }
+            }
+        }
+    }
+    delete[] primitiveVarFarfield;
+}
+
+//! He Xin. Numerical simulation and qualitative analysis investigation of the supersonic flows over sharp cones at high angle of attack[D].
+//! China Aerodynamics Research and Development Center graduate department, December 2002.
+void NSSolverStruct::FarFieldRiemannInvariants(Grid *gridIn, StructBC *structBC, RDouble refGama)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isWennScheme = parameters->GetWennSchemeFlag();
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    RDouble3D *preconCoefficient = NULL;
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        preconCoefficient = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+    }
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *primitiveVarFarfield = new RDouble[nEquation];
+    structBC->GetParamData("primitiveVarFarfield", primitiveVarFarfield, PHDOUBLE, nEquation);
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+    RDouble4D &faceNormalVelocity = *(grid->GetFaceNormalVelocity());
+
+    //! s_lr3d is used for calculating id, jd, kd, and the latters are further used for calculating in, jn, kn.
+    //! in, jn, kn, iSurface and lr are used for calculating nx, ny, nz.
+    int iSurface = structBC->GetFaceDirection() + 1;
+    int lr = structBC->GetFaceLeftOrRightIndex();
+
+    int in, jn, kn;
+    RDouble nxs, nys, nzs;
+
+    //! The index of infinite condition.
+    using namespace IDX;
+    RDouble roo, uoo, voo, woo, poo, vnoo, coo; //! vnoo is the projection on (nx,ny,nz).
+    roo = primitiveVarFarfield[IR];
+    uoo = primitiveVarFarfield[IU];
+    voo = primitiveVarFarfield[IV];
+    woo = primitiveVarFarfield[IW];
+    poo = primitiveVarFarfield[IP];
+
+    //! The index of inner, ghost and boundary points.
+    int is1, js1, ks1, is2, js2, ks2;    //! The first and second inner points.
+    int it1, jt1, kt1, it2, jt2, kt2;    //! The first and second ghost points.
+
+    RDouble *prims1, *prims2;    //! The inner point.
+    RDouble *primt1, *primt2;    //! The ghost point.
+    prims1 = new RDouble[nEquation];
+    prims2 = new RDouble[nEquation];
+    primt1 = new RDouble[nEquation];
+    primt2 = new RDouble[nEquation];
+
+    RDouble rin, uin, vin, win, pin, vnin, cinner, vein; //! inner point variables.
+    RDouble rb, ub, vb, wb, pb, vnb, cb;           //! boundary point variables.
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                //! The function of "RestrictIndex" has no use generally, and it may enforce the wrong value to the unknown value and lead to unexpected calculation.
+                //! However, it need more tests to decide whether delete it here or not.
+                RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                RestrictIndex(is2, js2, ks2, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                //! Initialization.
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    prims1[m] = q(is1, js1, ks1, m);
+                    prims2[m] = q(is2, js2, ks2, m);
+
+                    primt1[m] = prims1[m];
+                    primt2[m] = prims2[m];
+                }
+
+                //! The needed (nx, ny, nz) is stored in the cell of (in, jn, kn).
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                nxs = lr * xfn(in, jn, kn, iSurface);
+                nys = lr * yfn(in, jn, kn, iSurface);
+                nzs = lr * zfn(in, jn, kn, iSurface);
+                RDouble vgn = faceNormalVelocity(in, jn, kn, iSurface);
+
+                //! The first inner point.
+                rin = prims1[IR];
+                uin = prims1[IU];
+                vin = prims1[IV];
+                win = prims1[IW];
+                pin = prims1[IP];
+                vnin = nxs * uin + nys * vin + nzs * win - vgn;
+                cinner = sqrt(ABS(refGama * pin / rin));
+                vein = sqrt(uin * uin + vin * vin + win * win);
+
+                //! Infinite.
+                vnoo = nxs * uoo + nys * voo + nzs * woo - vgn;
+                coo = sqrt(ABS(refGama * poo / roo));
+
+                if (vein > cinner)
+                {
+                    //! Supersonic.
+                    if (vnin >= 0.0)
+                    {
+                        //! Supersonic outlet.
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            q(it1, jt1, kt1, m) = prims1[m];
+                            q(it2, jt2, kt2, m) = 2.0 * prims1[m] - prims2[m];
+                        }
+
+                        if (q(it2, jt2, kt2, IR) <= 0.0 || q(it2, jt2, kt2, IP) <= 0.0)
+                        {
+                            for (int m = 0; m < nEquation; ++ m)
+                            {
+                                q(it2, jt2, kt2, m) = prims1[m];
+                            }
+                        }
+                    }
+                    else
+                    {
+                        //! Supersonic inlet.
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            q(it1, jt1, kt1, m) = primitiveVarFarfield[m];
+                            q(it2, jt2, kt2, m) = primitiveVarFarfield[m];
+                        }
+                    }
+                }
+                else
+                {
+                    //! Subsonic.
+                    if(ifLowSpeedPrecon == 0)
+                    {
+
+                        RDouble gama1 = refGama - 1.0;
+                        RDouble riemp;     //! Riemann invariant for inner.
+                        RDouble riemm;     //! Riemann invariant for infinite.
+                        riemp = vnin + 2.0 * cinner / gama1;
+                        riemm = vnoo - 2.0 * coo / gama1;
+
+                        vnb = half * (riemp + riemm);
+                        cb = fourth * (riemp - riemm) * gama1;
+
+                        RDouble sb;                          //! Entropy at the boundary.
+                        RDouble uref, vref, wref, vnref;     //! Outlet refers to inner point, and inlet refers to infinite.
+
+                        if (vnb > 0.0)
+                        {
+                            //! Subsonic outlet.
+                            sb = pin / pow(rin, refGama);
+                            uref = uin;
+                            vref = vin;
+                            wref = win;
+                            vnref = vnin;
+                        }
+                        else
+                        {
+                            //! Subsonic inlet.
+                            sb = poo / pow(roo, refGama);
+                            uref = uoo;
+                            vref = voo;
+                            wref = woo;
+                            vnref = vnoo;
+                        }
+
+                        rb = pow((cb * cb / (sb * refGama)), 1.0 / gama1);
+                        ub = uref + nxs * (vnb - vnref);
+                        vb = vref + nys * (vnb - vnref);
+                        wb = wref + nzs * (vnb - vnref);
+                        pb = cb * cb * rb / refGama;     //! The same to "pb = sb * pow(rb, refGama);".
+
+                        primt1[IR] = rb;
+                        primt1[IU] = ub;
+                        primt1[IV] = vb;
+                        primt1[IW] = wb;
+                        primt1[IP] = pb;
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            primt2[m] = primt1[m];
+                        }
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            q(it1, jt1, kt1, m) = primt1[m];
+                            q(it2, jt2, kt2, m) = primt2[m];
+                        }
+                    }
+                    else
+                    {
+                        int preconFarfieldBCMethod = parameters->GetPreconFarFieldBCMethod();
+
+                        if(preconFarfieldBCMethod == 0)
+                        {
+                            RDouble gama1 = refGama - 1.0;
+                            RDouble preconCoeff, B0, A0, cPrecondition;
+                            preconCoeff = (*preconCoefficient)(is1, js1, ks1);
+                            cPrecondition = half * sqrt(((preconCoeff - 1) * vnin) * ((preconCoeff - 1) * vnin) + 4 * preconCoeff * cinner * cinner);
+
+                            A0 = 2.0 * cinner/((-preconCoeff * vnin * 0.5) + cPrecondition + 0.5 * vnin) / gama1;
+                            B0 = 2.0 * cinner/((-preconCoeff * vnin * 0.5) - cPrecondition + 0.5 * vnin) / gama1;
+
+                            RDouble riemp;     //! Riemann invariant for inner.
+                            RDouble riemm;     //! Riemann invariant for infinite.
+                            riemp = A0 * cinner + vnin;
+                            riemm = B0 * coo + vnoo;
+                            cb = (riemp - riemm) / (A0 - B0);
+                            vnb = riemp - A0 * cb;
+
+                            RDouble sb;                          //! Entropy at the boundary.
+                            RDouble uref, vref, wref, vnref;     //! Outlet refers to inner point, and inlet refers to infinite.
+
+                            if (vnb > 0.0)
+                            {
+                                //! Subsonic outlet.
+                                sb = pin / pow(rin, refGama);
+                                uref = uin;
+                                vref = vin;
+                                wref = win;
+                                vnref = vnin;
+                            }
+                            else
+                            {
+                                //! Subsonic inlet.
+                                sb = poo / pow(roo, refGama);
+                                uref = uoo;
+                                vref = voo;
+                                wref = woo;
+                                vnref = vnoo;
+                            }
+
+                            rb = pow((cb * cb / (sb * refGama)), 1.0 / gama1);
+                            ub = uref + nxs * (vnb - vnref);
+                            vb = vref + nys * (vnb - vnref);
+                            wb = wref + nzs * (vnb - vnref);
+                            pb = cb * cb * rb / refGama;     //! The same to "pb = sb * pow(rb, refGama);".
+
+                            primt1[IR] = rb;
+                            primt1[IU] = ub;
+                            primt1[IV] = vb;
+                            primt1[IW] = wb;
+                            primt1[IP] = pb;
+
+                            for (int m = 0; m < nEquation; ++ m)
+                            {
+                                primt2[m] = primt1[m];
+                            }
+
+                            for (int m = 0; m < nEquation; ++ m)
+                            {
+                                q(it1, jt1, kt1, m) = primt1[m];
+                                q(it2, jt2, kt2, m) = primt2[m];
+                            }
+                        }
+                        else if(preconFarfieldBCMethod == 1)
+                        {
+                           RDouble gama1 = refGama - 1.0;
+                            RDouble riemp;     //! Riemann invariant for inner.
+                            RDouble riemm;     //! Riemann invariant for infinite.
+                            riemp = vnin + 2.0 * cinner / gama1;
+                            riemm = vnoo - 2.0 * coo / gama1;
+
+                            vnb = half * (riemp + riemm);
+                            if (vnb > 0.0)
+                            {
+                                ub = uin;
+                                vb = vin;
+                                wb = win;
+                                pb = poo;
+                                rb = rin;
+                            }
+                            else
+                            {
+
+                                ub = uoo;
+                                vb = voo;
+                                wb = woo;
+                                pb = pin;
+                                rb = roo;
+                            }
+
+                            primt1[IR] = rb;
+                            primt1[IU] = ub;
+                            primt1[IV] = vb;
+                            primt1[IW] = wb;
+                            primt1[IP] = pb;
+
+                            for (int m = 0; m < nEquation; ++ m)
+                            {
+                                primt2[m] = primt1[m];
+                            }
+
+                            for (int m = 0; m < nEquation; ++ m)
+                            {
+                                q(it1, jt1, kt1, m) = primt1[m];
+                                q(it2, jt2, kt2, m) = primt2[m];
+                            }
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    if (isWennScheme == 1)
+    {
+        int is3, js3, ks3;
+        int it3, jt3, kt3;
+        RDouble* prims3;
+        RDouble* primt3;
+        prims3 = new RDouble[nEquation];
+        primt3 = new RDouble[nEquation];
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    //! Third cell index inside flowfield.
+                    structBC->GetInsideCellIndex(i, j, k, is3, js3, ks3, 3);
+
+                    RestrictIndex(is3, js3, ks3, ni - 1, nj - 1, nk - 1);
+
+                    //! Third cell index of ghostcell.
+                    structBC->GetGhostCellIndex(i, j, k, it3, jt3, kt3, 3);
+
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        prims3[m] = q(is3, js3, ks3, m);
+                        primt3[m] = prims3[m];
+                    }
+                    //! The needed (nx, ny, nz) is stored in the cell of (in, jn, kn).
+                    structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                    nxs = lr * xfn(in, jn, kn, iSurface);
+                    nys = lr * yfn(in, jn, kn, iSurface);
+                    nzs = lr * zfn(in, jn, kn, iSurface);
+                    RDouble vgn = faceNormalVelocity(in, jn, kn, iSurface);
+
+                    //! The first inner point.
+                    rin = prims1[IR];
+                    uin = prims1[IU];
+                    vin = prims1[IV];
+                    win = prims1[IW];
+                    pin = prims1[IP];
+                    vnin = nxs * uin + nys * vin + nzs * win - vgn;
+                    cinner = sqrt(ABS(refGama * pin / rin));
+                    vein = sqrt(uin * uin + vin * vin + win * win);
+
+                    //! Infinite.
+                    vnoo = nxs * uoo + nys * voo + nzs * woo - vgn;
+                    coo = sqrt(ABS(refGama * poo / roo));
+
+                    if (vein > cinner)
+                    {
+                        //! Supersonic.
+                        if (vnin >= 0.0)
+                        {
+                            //! Supersonic outlet.
+                            for (int m = 0; m < nEquation; ++m)
+                            {
+                                q(it3, jt3, kt3, m) = 3.0 * prims1[m] - 2.0 * prims2[m];
+                            }
+
+                            if (q(it3, jt3, kt3, IR) <= 0.0 || q(it3, jt3, kt3, IP) <= 0.0)
+                            {
+                                for (int m = 0; m < nEquation; ++m)
+                                {
+                                    q(it3, jt3, kt3, m) = prims1[m];
+                                }
+                            }
+                        }
+                        else
+                        {
+                            //! Supersonic inlet.
+                            for (int m = 0; m < nEquation; ++m)
+                            {
+                                q(it3, jt3, kt3, m) = primitiveVarFarfield[m];
+                            }
+                        }
+                    }
+                    else
+                    {
+                        //! Subsonic.
+                        RDouble gama1 = refGama - 1.0;
+                        RDouble riemp;     //! Riemann invariant for inner.
+                        RDouble riemm;     //! Riemann invariant for infinite.
+                        riemp = vnin + 2.0 * cinner / gama1;
+                        riemm = vnoo - 2.0 * coo / gama1;
+
+                        vnb = half * (riemp + riemm);
+                        cb = fourth * (riemp - riemm) * gama1;
+
+                        RDouble sb;                          //! Entropy at the boundary.
+                        RDouble uref, vref, wref, vnref;     //! Outlet refers to inner point, and inlet refers to infinite.
+
+                        if (vnb > 0.0)
+                        {
+                            //! Subsonic outlet.
+                            sb = pin / pow(rin, refGama);
+                            uref = uin;
+                            vref = vin;
+                            wref = win;
+                            vnref = vnin;
+                        }
+                        else
+                        {
+                            //! Subsonic inlet.
+                            sb = poo / pow(roo, refGama);
+                            uref = uoo;
+                            vref = voo;
+                            wref = woo;
+                            vnref = vnoo;
+                        }
+
+                        rb = pow((cb * cb / (sb * refGama)), 1.0 / gama1);
+                        ub = uref + nxs * (vnb - vnref);
+                        vb = vref + nys * (vnb - vnref);
+                        wb = wref + nzs * (vnb - vnref);
+                        pb = cb * cb * rb / refGama;     //! The same to "pb = sb * pow(rb, refGama);".
+
+                        primt1[IR] = rb;
+                        primt1[IU] = ub;
+                        primt1[IV] = vb;
+                        primt1[IW] = wb;
+                        primt1[IP] = pb;
+
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            primt3[m] = primt1[m];
+                        }
+
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            q(it3, jt3, kt3, m) = primt3[m];
+                        }
+                    }
+                }
+            }
+        }
+
+        delete[] prims3;
+        delete[] primt3;
+    }
+
+    delete[] prims1;
+    delete[] prims2;
+    delete[] primt1;
+    delete[] primt2;
+
+    delete[] primitiveVarFarfield;
+}
+
+void NSSolverStruct::PressureInletBCRiemann(Grid *gridIn, StructBC *structBC)
+{
+    using namespace IDX;
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isWennScheme = parameters->GetWennSchemeFlag();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *primitiveVarFarfield = new RDouble[nEquation];
+    Data_Param *bcData = structBC->GetBCParamDataBase();
+    bcData->GetData("primitiveVarFarfield", primitiveVarFarfield, PHDOUBLE, nEquation);
+
+    RDouble totalPressure, totalTemperature, direction_inlet[3];
+    bcData->GetData("totalPressure", &totalPressure, PHDOUBLE, 1);
+    bcData->GetData("totalTemperature", &totalTemperature, PHDOUBLE, 1);
+    bcData->GetData("direction_inlet", &direction_inlet, PHDOUBLE, 3);
+
+    RDouble refGama, localNonDimensionalTemperature;
+
+    bcData->GetData("refGama", &refGama, PHDOUBLE, 1);
+    bcData->GetData("localNonDimensionalTemperature", &localNonDimensionalTemperature, PHDOUBLE, 1);
+
+    //! Dimensional.
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble velocity = refMachNumber * refDimensionalSonicSpeed;
+    RDouble dynamic_pressure = refDimensionalDensity * velocity * velocity;
+    //RDouble refGama = parameters->GetRefGama();
+    RDouble gama1 = refGama - 1;
+
+    //int nChemical = parameters->GetChemicalFlag();
+    //int numberOfSpecies = gas->GetNumberOfSpecies();
+    //Thermo_Energy &Thermo_Energy_temparay = *gas->GetThermo_Energy_temparay();
+    //int nNSEquation = parameters->GetNSEquationNumber();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    // RDouble initMassFraction[MAX_SPECIES_NUM] = {0};
+
+        //int mTT = parameters->GetmTT();
+        //int mTV = parameters->GetmTV();
+        //int mTE = parameters->GetmTE();
+        //int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+        /*if(nChemical > 0)
+        {
+            if (bcData->IsExist("initMassFraction", PHDOUBLE, numberOfSpecies))
+            {
+                bcData->GetData("initMassFraction", &initMassFraction, PHDOUBLE, numberOfSpecies);
+                for (int s = 0; s < numberOfSpecies; ++ s)
+                {
+                    primitiveVarFarfield[nNSEquation + s] = initMassFraction[s];
+                }
+            }
+            else
+            {
+                RDouble *speciesMass = gas->GetInitMassFraction();
+                for (int s = 0; s < numberOfSpecies; ++ s)
+                {
+                    initMassFraction[s] = speciesMass[s];
+                }
+            }
+        }*/
+
+        //! Nondimensionalization.
+    totalPressure /= dynamic_pressure;
+    totalTemperature /= refDimensionalTemperature;
+
+    RDouble coefficientOfStateEquation = 1.0 / (refGama * refMachNumber * refMachNumber);
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+    int lr = structBC->GetFaceLeftOrRightIndex();
+    int is, js, ks, it, jt, kt;
+    int in, jn, kn;
+    RDouble nxs, nys, nzs;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+                RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                nxs = lr * xfn(in, jn, kn, iSurface);
+                nys = lr * yfn(in, jn, kn, iSurface);
+                nzs = lr * zfn(in, jn, kn, iSurface);
+
+                //if(nChemical > 0)  //  for chemical  by dms
+                //{
+                //    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, 1);  //ghost
+                //    if(outIterStep > 1)
+                //    {
+                //        gas->ComputeMixturegasThermalParameter(initMassFraction, t(it, jt, kt,mTT), t(it, jt, kt, mTT), t(it, jt, kt, mTT), 0);   //  equlibrim
+                //    }
+                //    else
+                //    {
+                //        gas->ComputeMixturegasThermalParameter(initMassFraction, totalTemperature, totalTemperature, totalTemperature, 0);   //  equlibrim
+                //    }
+                //    
+                //    refGama = Thermo_Energy_temparay.gama;
+                //    gama1 = refGama - 1;
+                //    coefficientOfStateEquation = 1.0 / (refGama * refMachNumber * refMachNumber);
+
+                //    if(nTemperatureModel == 2)
+                //    {
+                //        primitiveVarFarfield[nEquation - 1] = Thermo_Energy_temparay.Ev + Thermo_Energy_temparay.Ee;
+                //    }
+                //    else if(nTemperatureModel == 3)
+                //    {
+                //        primitiveVarFarfield[nEquation - 1] = Thermo_Energy_temparay.Ee;
+                //        primitiveVarFarfield[nEquation - 2] = Thermo_Energy_temparay.Ev;
+                //    }
+                //}
+
+                for (int layer = 1; layer <= 1; ++ layer)
+                {
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    //! Get inner cell flow field information.
+                    RDouble rInside = q(is, js, ks, IR);
+                    RDouble V2Inside = q(is, js, ks, IU) * q(is, js, ks, IU) + q(is, js, ks, IV) * q(is, js, ks, IV)
+                        + q(is, js, ks, IW) * q(is, js, ks, IW);
+                    RDouble pInside = q(is, js, ks, IP);
+
+                    //! Calculate the total energy, total enthalpy and sound speed.
+                    RDouble totalEnergy = pInside / (rInside * gama1) + 0.5 * V2Inside;
+                    RDouble totalEnthalpy = (refGama * coefficientOfStateEquation / gama1) * totalTemperature;
+                    RDouble c2 = refGama * pInside / rInside;
+
+                    //! Calculate the riemann invariants R+.
+                    RDouble Riemann = 2.0 * sqrt(c2) / gama1;
+                    Riemann += q(is, js, ks, IU) * nxs + q(is, js, ks, IV) * nys + q(is, js, ks, IW) * nzs;
+
+                    RDouble theta = nxs * direction_inlet[0] + nys * direction_inlet[1] + nzs * direction_inlet[2];
+
+                    RDouble totalc2 = gama1 * (totalEnthalpy - (totalEnergy + pInside / rInside) + 0.5 * V2Inside) + c2;     //Co^2
+
+                    RDouble a = 1.0 + 0.5 * gama1 * theta * theta;
+                    RDouble b = -1.0 * gama1 * theta * Riemann;
+                    RDouble c = 0.5 * gama1 * Riemann * Riemann - 2.0 * totalc2 / gama1;
+
+                    RDouble d = b * b - 4.0 * a * c;
+                    d = sqrt(max(zero, d));
+                    RDouble VInside = (-b + d) / (2.0 * a);
+                    VInside = max(zero, VInside);
+                    V2Inside = VInside * VInside;
+
+                    c2 = totalc2 - 0.5 * gama1 * V2Inside;
+
+                    RDouble Mach2 = V2Inside / c2;
+                    Mach2 = min(one, Mach2);
+                    V2Inside = Mach2 * c2;
+                    VInside = sqrt(V2Inside);
+                    c2 = totalc2 - 0.5 * gama1 * V2Inside;
+
+                    RDouble tInside = c2 / (refGama * coefficientOfStateEquation);
+                    pInside = totalPressure * pow((tInside / totalTemperature), refGama / gama1);
+                    rInside = pInside / (coefficientOfStateEquation * tInside);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        q(it, jt, kt, m) = primitiveVarFarfield[m];
+                    }
+
+                    q(it, jt, kt, IR) = rInside;
+                    q(it, jt, kt, IU) = VInside * direction_inlet[0];
+                    q(it, jt, kt, IV) = VInside * direction_inlet[1];
+                    q(it, jt, kt, IW) = VInside * direction_inlet[2];
+                    q(it, jt, kt, IP) = pInside;
+
+                    for (int m = 0; m < nTemperatureModel; ++ m)
+                    {
+                        t(it, jt, kt, m) = tInside;
+                    }
+                }
+
+                int it2, jt2, kt2;
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    q(it2, jt2, kt2, m) = q(it, jt, kt, m);
+                }
+
+                if (isWennScheme == 1)
+                {
+                    int it3, jt3, kt3;
+                    structBC->GetGhostCellIndex(i, j, k, it3, jt3, kt3, 3);
+
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        q(it3, jt3, kt3, m) = q(it, jt, kt, m);
+                    }
+                }
+            }
+        }
+    }
+    delete[] primitiveVarFarfield;
+}
+
+void NSSolverStruct::MassFlowInletBC(Grid *gridIn, StructBC *structBC)
+{
+    //! Get the basic mesh information.
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    //! Get the flow field information.
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    int nEquation = GetNumberOfEquations();
+
+    using namespace IDX;
+    Data_Param *bcData = structBC->GetBCParamDataBase();
+
+    //! Get the basic variables for mass flow in boundary.
+    RDouble totalTemperature, massFlow, BCTotalArea, direction_inlet[3];
+    bcData->GetData("massFlow", &massFlow, PHDOUBLE, 1);
+    bcData->GetData("totalTemperature", &totalTemperature, PHDOUBLE, 1);
+    bcData->GetData("direction_inlet", &direction_inlet, PHDOUBLE, 3);
+    bcData->GetData("BCTotalArea", &BCTotalArea, PHDOUBLE, 1);
+
+    //! Dimensional.
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble refGama = parameters->GetRefGama();
+    int isWennScheme = parameters->GetWennSchemeFlag();
+
+    //! Nondimensionalization.
+    massFlow /= BCTotalArea;
+    totalTemperature /= refDimensionalTemperature;
+    RDouble coefficientOfStateEquation = 1.0 / (refGama * refMachNumber * refMachNumber);
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+    int lr = structBC->GetFaceLeftOrRightIndex();
+    int is, js, ks, it, jt, kt;
+    int in, jn, kn;
+    RDouble nxs, nys, nzs;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+                RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                nxs = lr * xfn(in, jn, kn, iSurface);
+                nys = lr * yfn(in, jn, kn, iSurface);
+                nzs = lr * zfn(in, jn, kn, iSurface);
+
+                for (int layer = 1; layer <= 1; ++ layer)
+                {
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    q(it, jt, kt, IR) = q(is, js, ks, IR);
+                    RDouble Vnb = massFlow / (refDimensionalDensity * refDimensionalSonicSpeed * refMachNumber) / q(is, js, ks, IR);  //ע�⣺�˴�massFlowΪ��λ�������
+
+                    q(it, jt, kt, IU) = Vnb * direction_inlet[0];
+                    q(it, jt, kt, IV) = Vnb * direction_inlet[1];
+                    q(it, jt, kt, IW) = Vnb * direction_inlet[2];
+
+                    //! Square of the stagnation sound speed.
+                    RDouble c2 = refGama * coefficientOfStateEquation * totalTemperature;
+                    //! Square of the critical sound speed.
+                    RDouble c2_ct = 2.0 * c2 / (refGama + 1.0);
+                    RDouble lamd2 = Vnb * Vnb / c2_ct;
+                    RDouble tb = totalTemperature * (1.0 - (refGama - 1.0) / (refGama + 1.0) * lamd2);
+                    q(it, jt, kt, IP) = q(is, js, ks, IR) * coefficientOfStateEquation * tb;
+                }
+
+                int it2, jt2, kt2;
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    q(it2, jt2, kt2, m) = q(it, jt, kt, m);
+                }
+
+                if (isWennScheme == 1)
+                {
+                    int it3, jt3, kt3;
+                    structBC->GetGhostCellIndex(i, j, k, it3, jt3, kt3, 3);
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        q(it3, jt3, kt3, m) = q(it, jt, kt, m);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::MassFlowOutletBC(Grid *gridIn, StructBC *structBC)
+{
+    using namespace IDX;
+    //! Dimensional.
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refGama = parameters->GetRefGama();
+
+    Data_Param *bcData = structBC->GetBCParamDataBase();
+    RDouble massFluxRatio, massFlow, BCTotalArea;
+    bcData->GetData("massFluxRatio", &massFluxRatio, PHDOUBLE, 1);
+    bcData->GetData("massFlow", &massFlow, PHDOUBLE, 1);
+    bcData->GetData("BCTotalArea", &BCTotalArea, PHDOUBLE, 1);
+
+    //! Nondimensionalization.
+    RDouble coefficientOfStateEquation = 1.0 / (refGama * refMachNumber * refMachNumber);
+
+    //! FluxDensity : rho * u;
+    RDouble fluxDensity = massFlow / (refDimensionalDensity * refDimensionalDensity * refMachNumber) / BCTotalArea;
+
+    RDouble mfTbCoeff = 0.5 * (refGama - 1.0) / refGama / coefficientOfStateEquation *
+        (1.0 - massFluxRatio * massFluxRatio);
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+    int lr = structBC->GetFaceLeftOrRightIndex();
+    int is, js, ks, it, jt, kt;
+    int in, jn, kn;
+    RDouble nxs, nys, nzs;
+
+    int nLayer = GetNumberOfGhostCellLayers();
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+                RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                nxs = lr * xfn(in, jn, kn, iSurface);
+                nys = lr * yfn(in, jn, kn, iSurface);
+                nzs = lr * zfn(in, jn, kn, iSurface);
+
+                //! calculate the temperature of the inside cell.
+                RDouble staticTemperature = q(is, js, ks, IP) / q(is, js, ks, IR) / coefficientOfStateEquation;
+
+                RDouble tb = staticTemperature + mfTbCoeff * (q(is, js, ks, IU) * q(is, js, ks, IU) +
+                    q(is, js, ks, IV) * q(is, js, ks, IV) + q(is, js, ks, IW) * q(is, js, ks, IW));
+
+                if (tb < TINY) tb = staticTemperature;
+                RDouble pb = q(is, js, ks, IP) * pow(tb / staticTemperature, refGama / (refGama - 1.0));
+                RDouble rb = pb / tb / coefficientOfStateEquation;
+
+                RDouble ub = q(is, js, ks, IU) * massFluxRatio;
+                RDouble vb = q(is, js, ks, IV) * massFluxRatio;
+                RDouble wb = q(is, js, ks, IW) * massFluxRatio;
+
+                //! judge the unusual situation, Vn < 0.
+                RDouble Vn = ub * nxs + vb * nys + wb * nzs;
+                if (Vn < 0.0)
+                {
+                    Vn = fluxDensity / rb;
+                    ub = Vn * xfn[i];
+                    vb = Vn * yfn[i];
+                    wb = Vn * zfn[i];
+                }
+
+                //! If the outlet is supersonic flow.
+                RDouble cb = sqrt(refGama * coefficientOfStateEquation * tb);
+                if (Vn >= cb)
+                {
+                    rb = q(is, js, ks, IR);
+                    ub = q(is, js, ks, IU);
+                    vb = q(is, js, ks, IV);
+                    wb = q(is, js, ks, IW);
+                    pb = q(is, js, ks, IP);
+                }
+
+                //! allocate value to the ghost cell.
+                for (int layer = 1; layer <= nLayer; ++ layer)
+                {
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+                    q(it, jt, kt, IR) = rb;
+                    q(it, jt, kt, IU) = ub;
+                    q(it, jt, kt, IV) = vb;
+                    q(it, jt, kt, IW) = wb;
+                    q(it, jt, kt, IP) = pb;
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::NozzleInletFlow(Grid *gridIn, StructBC *structBC)
+{
+    using namespace IDX;
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    Data_Param *bcData = structBC->GetBCParamDataBase();
+
+    RDouble inletVelocity, totalPressure, totalTemperature, direction_inlet[3];
+    bcData->GetData("velocity", &inletVelocity, PHDOUBLE, 1);
+    bcData->GetData("totalPressure", &totalPressure, PHDOUBLE, 1);
+    bcData->GetData("totalTemperature", &totalTemperature, PHDOUBLE, 1);
+    bcData->GetData("direction_inlet", &direction_inlet, PHDOUBLE, 3);
+
+    //! Dimensional.
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble refVelocity = refMachNumber * refDimensionalSonicSpeed;
+    int isWennScheme = parameters->GetWennSchemeFlag();
+
+    inletVelocity = inletVelocity / refVelocity;
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    int nEquation = GetNumberOfEquations();
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+    int lr = structBC->GetFaceLeftOrRightIndex();
+    int is, js, ks, it, jt, kt;
+    int in, jn, kn;
+    RDouble nxs, nys, nzs;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+                RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                nxs = lr * xfn(in, jn, kn, iSurface);
+                nys = lr * yfn(in, jn, kn, iSurface);
+                nzs = lr * zfn(in, jn, kn, iSurface);
+
+                for (int layer = 1; layer <= 1; ++ layer)
+                {
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        q(it, jt, kt, m) = primitiveVarFarfield[m];
+                    }
+                    q(it, jt, kt, IR) = 0.0;
+                    q(it, jt, kt, IU) = inletVelocity * direction_inlet[0];
+                    q(it, jt, kt, IV) = inletVelocity * direction_inlet[1];
+                    q(it, jt, kt, IW) = inletVelocity * direction_inlet[2];
+                    q(it, jt, kt, IP) = 0.0;
+                }
+
+                int it2, jt2, kt2;
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    q(it2, jt2, kt2, m) = q(it, jt, kt, m);
+                }
+
+                if (isWennScheme == 1)
+                {
+                    int it3, jt3, kt3;
+                    structBC->GetGhostCellIndex(i, j, k, it3, jt3, kt3, 3);
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        q(it3, jt3, kt3, m) = q(it, jt, kt, m);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::NozzleOutFlow(Grid *gridIn, StructBC *structBC)
+{
+
+}
+
+void NSSolverStruct::PressureOutletBC(Grid *gridIn, StructBC *structBC)
+{
+    using namespace IDX;
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    Data_Param *bcData = structBC->GetBCParamDataBase();
+
+    RDouble staticPressure;
+    bcData->GetData("staticPressure", &staticPressure, PHDOUBLE, 1);
+
+    //! Dimensional.
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble velocity = refMachNumber * refDimensionalSonicSpeed;
+    RDouble dynamicPressure = refDimensionalDensity * velocity * velocity;
+
+    staticPressure /= dynamicPressure;
+
+    RDouble staticPressureRelaxCorf = parameters->GetStaticPressureRelaxCorf();
+    if (bcData->IsExist("staticPressureRelaxCorf", PHDOUBLE, 1))
+    {
+        bcData->GetData("staticPressureRelaxCorf", &staticPressureRelaxCorf, PHDOUBLE, 1);
+    }
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int is, js, ks, it, jt, kt;
+    int nLayer = GetNumberOfGhostCellLayers();
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is, js, ks, 1);
+
+                RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+
+                for (int layer = 1; layer <= nLayer; ++ layer)
+                {
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+                    {
+                        q(it, jt, kt, iEquation) = q(is, js, ks, iEquation);
+                    }
+                    //
+                    q(it, jt, kt, IP) = staticPressure;
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::ZeroResiduals(Grid *grid)
+{
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    residual = 0.0;
+}
+
+void NSSolverStruct::FillField(Grid *gridIn, FieldProxy *fieldProxy, RDouble valueIn)
+{
+    RDouble4D &field = fieldProxy->GetField_STR();
+    field = valueIn;
+}
+
+void NSSolverStruct::FillField(Grid *gridIn, FieldProxy *fieldTargetProxy, FieldProxy *fieldSourceProxy)
+{
+    RDouble4D &fieldTarget = fieldTargetProxy->GetField_STR();
+    RDouble4D &fieldSource = fieldSourceProxy->GetField_STR();
+
+    fieldTarget = fieldSource;
+}
+
+FieldProxy *NSSolverStruct::CreateFieldProxy(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isWennScheme = parameters->GetWennSchemeFlag();
+
+    int nEquation = GetNumberOfEquations();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    if (isWennScheme == 1)
+    {
+        GetRange(ni, nj, nk, -3, 2, I, J, K);
+    }
+
+    Range M(0, nEquation - 1);
+
+    RDouble4D *field = new RDouble4D(I, J, K, M, fortranArray);
+
+    FieldProxy *field_proxy = new FieldProxy();
+    field_proxy->SetField_STR(field, true);
+
+    return field_proxy;
+}
+
+FieldProxy *NSSolverStruct::GetFieldProxy(Grid *gridIn, const string &fieldName)
+{
+    RDouble4D *field = reinterpret_cast <RDouble4D *> (gridIn->GetDataPtr(fieldName));
+
+    FieldProxy *field_proxy = new FieldProxy();
+
+    field_proxy->SetField_STR(field);
+
+    return field_proxy;
+}
+
+void NSSolverStruct::StoreRhsByResidual(Grid *gridIn, FieldProxy *rightHandSideProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &rightHandSide = rightHandSideProxy->GetField_STR();
+
+    rightHandSide = residual;
+}
+
+void NSSolverStruct::InitResidual(Grid *gridIn, FieldProxy *rightHandSideProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int nEquation = GetNumberOfEquations();
+
+    Range M(0, nEquation - 1);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    int mst = M.first();
+    int med = M.last();
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &rightHandSide = rightHandSideProxy->GetField_STR();
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    residual(i, j, k, m) = -rightHandSide(i, j, k, m);
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::RecoverResidual(Grid *gridIn, FieldProxy *rightHandSideProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &rightHandSide = rightHandSideProxy->GetField_STR();
+
+    if (grid->GetLevel() != 0)
+    {
+        residual = rightHandSide;
+    }
+}
+
+FieldProxy *NSSolverStruct::GetResidualProxy(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+
+    FieldProxy *residualProxy = new FieldProxy();
+
+    residualProxy->SetField_STR(&residual);
+
+    return residualProxy;
+}
+
+//! Load flow variables stored in grid to q.
+void NSSolverStruct::LoadQ(Grid *grid, FieldProxy *qProxy)
+{
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &primitiveVarsOfProxy = qProxy->GetField_STR();
+    primitiveVarsOfProxy = primitiveVariables;
+}
+
+void NSSolverStruct::ComputeViscousCoeff(Grid *gridIn)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    if (nChemical == 0)
+    {
+        ComputeViscousCoefficientWithoutChemical(gridIn);
+    }
+    else
+    {
+    }
+}
+
+void NSSolverStruct::ComputeViscousCoefficientWithoutChemical(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+
+    //! The visl of ghost cell is computed directly.
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    using namespace IDX;
+
+    int nGasModel = 0;
+    if (GlobalDataBase::IsExist("nGasModel", PHINT, 1))
+    {
+        nGasModel = GlobalDataBase::GetIntParaFromDB("nGasModel");
+    }
+
+    if (nGasModel > 0)
+    {
+        RDouble primitiveVariables[MAX_SPECIES_NUM], temperature, viscosity;
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    temperature = temperatures(i, j, k, ITT);
+                    gas->ComputeViscosityByPrimitive(primitiveVariables, temperature, temperature, nonDimensionalSutherlandTemperature, viscosity);
+                    viscousLaminar(i, j, k) = viscosity;
+                }
+            }
+        }
+    }
+    else
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    RDouble temperature = temperatures(i, j, k, ITT);
+                    viscousLaminar(i, j, k) = temperature * sqrt(temperature) * (1.0 + nonDimensionalSutherlandTemperature) / (temperature + nonDimensionalSutherlandTemperature);
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::ComputePreconditionCoefficient(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble3D &preconCoefficient = *reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+
+    RDouble3D &dt = *reinterpret_cast< RDouble3D * > (grid->GetDataPtr("dt"));
+    RDouble3D &timeCoefficient = *reinterpret_cast< RDouble3D * > (grid->GetDataPtr("timeCoefficient"));
+    RDouble3D &timeCoefficientInverse = *reinterpret_cast< RDouble3D * > (grid->GetDataPtr("timeCoefficientInverse"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble kPreconCoeff = parameters->GetPreconCoefficient();
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+    RDouble machinf2 = refMachNumber * refMachNumber;
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd);
+
+    using namespace IDX;
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                RDouble rm = q(i, j, k, IR);
+                RDouble um = q(i, j, k, IU);
+                RDouble vm = q(i, j, k, IV);
+                RDouble wm = q(i, j, k, IW);
+                RDouble pm = q(i, j, k, IP);
+                RDouble gama = gamma(i, j, k);
+
+                RDouble c2 = gama * pm / rm;
+                RDouble v2 = um * um + vm * vm + wm * wm;
+                RDouble mach2 = v2 / c2;
+                RDouble machPrec2 = MIN(MAX(mach2, kPreconCoeff * machinf2),1.0);
+                if (!isUnsteady)
+                {
+                    preconCoefficient(i, j, k) = machPrec2;
+                }
+                else
+                {
+                    timeCoefficient(i, j, k) = 1.0 + 2.0 / 3.0 * dt(i, j, k) / physicalTimeStep;
+                    timeCoefficientInverse(i, j, k) = 1.0 / timeCoefficient(i, j, k);
+                    preconCoefficient(i, j, k) = machPrec2 / (timeCoefficientInverse(i, j, k) + (1.0 - timeCoefficientInverse(i, j, k)) * machPrec2);
+                }
+            }
+        }
+    }
+
+    GhostCell3D(preconCoefficient, ni, nj, nk);
+}
+
+void NSSolverStruct::ComputeMinTimeStep(Grid *gridIn, RDouble &minDt, RDouble &maxDt)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    minDt = LARGE;
+    maxDt = -LARGE;
+
+    RDouble3D &vol = *grid->GetCellVolume();
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                minDt = MIN(minDt, static_cast <RDouble> (dt(i, j, k) * vol(i, j, k))); //! When dt*vol is minimum, it doesnot mean that dt is minimum.
+                maxDt = MAX(maxDt, static_cast <RDouble> (dt(i, j, k) * vol(i, j, k))); //! When dt*vol is minimum, it doesnot mean that dt is minimum.
+            }
+        }
+    }
+}
+
+void NSSolverStruct::ReduceMaxTimeStep(Grid *gridIn, RDouble globalMinDt)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    RDouble3D &vol = *grid->GetCellVolume();
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+
+    //! ktmax is Used for restricting the time step.
+    //! When the value is big, the simulation can be faster but may be divergent. When the value is small, the simulation will be more stable but slower.
+    //! The suitable value can improve the stability.
+    RDouble ktmax = GlobalDataBase::GetDoubleParaFromDB("ktmax");
+
+    if (ktmax > 0.0)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    dt(i, j, k) = MIN(dt(i, j, k), static_cast <RDouble> (ktmax * globalMinDt / vol(i, j, k)));
+                }
+            }
+        }
+    }
+    GhostCell3D(dt, ni, nj, nk);
+    //grid->GhostCell3DExceptInterface(dt);
+    return;
+}
+
+void NSSolverStruct::LocalTimeStep(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    RDouble3D &vol = *grid->GetCellVolume();
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+    RDouble3D &localCFL = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("localCFL"));
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+
+    int nDim = GetDim();
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isUseLocalCFL = parameters->GetLocalCFLFlag();
+    RDouble cfl = 0.1, timedt = 0.01;
+
+    if (isUseLocalCFL == 0)
+    {
+        //int ordinaryGridIndex = grid->GetOrdinaryGridIndex();
+        //int ordinaryGridIndex = grid->GetZoneID();
+        //int cfl2 = grid->GetPartialCFL();
+        cfl = ComputeCFL(grid->GetPartialCFL()) ;
+        localCFL = cfl;
+    }
+
+    timedt = 1.0e+30;
+    for (int k = kCellStart; k <= kCellEnd; ++ k)     //! Viscous spectrum radius is not considered in computing time step of original code ,modified by liujian 2020-01-09
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                RDouble rad = 0.0;
+                for (int iSurface = 0; iSurface < nDim; ++ iSurface)
+                {
+                    rad += invSpectralRadius(i, j, k, iSurface) + visSpectralRadius(i, j, k, iSurface);
+                }
+
+                cfl = localCFL(i, j, k);
+                dt(i, j, k) = cfl / rad;
+                timedt = min(timedt, dt(i, j, k) * vol(i, j, k));
+            }
+        }
+    }
+}
+
+void NSSolverStruct::GlobalTimeStep(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble dtau = GlobalDataBase::GetDoubleParaFromDB("dtau");
+    RDouble reynoldsReferenceLengthDimensional = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+
+    RDouble3D &vol = *grid->GetCellVolume();
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                dt(i, j, k) = dtau / reynoldsReferenceLengthDimensional / vol(i, j, k);
+            }
+        }
+    }
+
+    RDouble dtmin = dtau;
+    GlobalDataBase::UpdateData("dtmin", &dtmin, PHDOUBLE, 1);
+}
+
+void NSSolverStruct::LocalGlobalTimeStep(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble cfl = ComputeCFL(grid->GetPartialCFL());
+
+    //! Compute the spectrum radius.
+    //SpectrumRadius(grid);
+
+    RDouble3D &vol = *grid->GetCellVolume();
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+
+    RDouble rad = 0.0;
+    RDouble dtmin = 1.0e30;
+
+    int nDim = GetDim();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                rad = 0.0;
+                for (int iSurface = 0; iSurface < nDim; ++ iSurface)
+                {
+                    rad += invSpectralRadius(i, j, k, iSurface);
+                }
+                RDouble rabc = cfl / rad * vol(i, j, k);
+
+                dtmin = MIN(dtmin, rabc);
+            }
+        }
+    }
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                dt(i, j, k) = dtmin / vol(i, j, k);
+            }
+        }
+    }
+    //grid->GhostCell3DExceptInterface(dt);
+    //GhostCell3D(dt, ni, nj, nk);
+
+    GlobalDataBase::UpdateData("dtmin", &dtmin, PHDOUBLE, 1);
+}
+
+void NSSolverStruct::SpectrumRadius(Grid *grid)
+{
+    SpectrumRadiusInviscid(grid);
+
+    SpectrumRadiusViscous(grid);
+
+#ifdef REMOVE_CODE
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    int nChemicalSource = parameters->GetNChemicalSource();
+    int nChemicalRadius = parameters->GetNChemicalRadius();
+
+    if (nChemical == 1 && nChemicalSource && nChemicalRadius == 1)
+    {
+    }
+#endif
+
+}
+
+void NSSolverStruct::SpectrumRadiusInviscid(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    int RoeEntropyFixMethod = this->GetControlParameters()->GetRoeEntropyFixMethod();
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+    RDouble4D &area = *(grid->GetFaceArea());
+    RDouble4D &vgn = *(grid->GetFaceNormalVelocity());
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble3D &gama = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble3D &rtem = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("rtem"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    RDouble3D *timeCoefficientInverse = NULL;
+    RDouble3D *preconCoefficient = NULL;
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        timeCoefficientInverse = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("timeCoefficientInverse"));
+        preconCoefficient = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+    }
+
+    invSpectralRadius = 0.0;
+
+    int nDim = GetDim();
+
+    using namespace IDX;
+
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        int il1, jl1, kl1;
+        grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    int il, jl, kl;
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    RDouble rm = q(i, j, k, IR);
+                    RDouble um = q(i, j, k, IU);
+                    RDouble vm = q(i, j, k, IV);
+                    RDouble wm = q(i, j, k, IW);
+                    RDouble pm = q(i, j, k, IP);
+
+                    RDouble cm = sqrt(gama(i, j, k) * pm / rm);
+
+                    RDouble nx = half * (xfv(i, j, k, iSurface) + xfv(il, jl, kl, iSurface));
+                    RDouble ny = half * (yfv(i, j, k, iSurface) + yfv(il, jl, kl, iSurface));
+                    RDouble nz = half * (zfv(i, j, k, iSurface) + zfv(il, jl, kl, iSurface));
+                    RDouble ub = half * (vgn(i, j, k, iSurface) * area(i, j, k, iSurface) + vgn(il, jl, kl, iSurface) * area(il, jl, kl, iSurface));
+                    RDouble vn = nx * um + ny * vm + nz * wm - ub;
+                    RDouble ns = sqrt(nx * nx + ny * ny + nz * nz);
+
+                    if(ifLowSpeedPrecon != 0)
+                    {
+                        RDouble c2 = gama(i, j, k) * pm / rm;
+                        RDouble timeCoeff = (*timeCoefficientInverse)(i, j, k);
+                        RDouble preconCoeff = (*preconCoefficient)(i, j, k);
+                        vn = half * timeCoeff * vn * (1.0 + preconCoeff);
+                        cm = half * timeCoeff * sqrt(((1.0 - preconCoeff) * vn) * ((1.0 - preconCoeff) * vn) + 4.0 * preconCoeff * c2);
+                    }
+
+                    invSpectralRadius(i, j, k, iSurface - 1) = ABS(vn) + cm * ns;
+
+                    if (RoeEntropyFixMethod == 2)  //! Entropy fix, add by liujian 2019 From JCP ,1995, Lin H-C
+                    {
+                        RDouble kp = rtem(i, j, k);
+                        RDouble Spec_rad_temp = invSpectralRadius(i, j, k, iSurface - 1);
+
+                        RDouble k1 = 0.25;
+                        RDouble k2 = 5.0;
+                        RDouble eig_lim = Spec_rad_temp * (k1 + k2 * kp);
+
+                        if (Spec_rad_temp < eig_lim)
+                        {
+                            invSpectralRadius(i, j, k, iSurface - 1) = 0.5 * (Spec_rad_temp * Spec_rad_temp + eig_lim * eig_lim) / (eig_lim + 1.E-20);
+                        }
+                    }
+
+                }
+            }
+        }
+    }
+
+
+    GhostCell3D(invSpectralRadius, ni, nj, nk, nDim);
+}
+
+void NSSolverStruct::SpectrumRadiusViscous(Grid *gridIn)
+{
+    //! Compute the spectrum radius of the viscous terms, modified by LiPeng in 2019.
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+    RDouble3D &vol = *(grid->GetCellVolume());
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+
+    RDouble3D &gama = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    visSpectralRadius = 0.0;
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int ifViscous = parameters->GetViscousType();
+    if (ifViscous == 0)
+    {
+        return;
+    }
+
+    //! Jiri Blazek. Computational fluid dynamics principles and applications (Third Edition)[M]. Elsevier Butterworth-Heinemann, 2015.
+
+    RDouble csrv = 1.0, csrvist = 1.0;
+    csrv = GlobalDataBase::GetDoubleParaFromDB("csrv");
+
+    int nDim = GetDim();
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble prandtlLaminar = parameters->GetPrandtlLaminar();
+    RDouble prandtlTurbulence = parameters->GetPrandtlTurbulence();
+    const RDouble foth = 4.0 / 3.0;
+
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nEquation = GetNumberOfEquations();
+    int nEnergyRecycle = parameters->GetnEnergyRecycle();
+
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    RDouble *primitiveVars = new RDouble[nEquation]();
+    RDouble *massFractions = NULL;
+    RDouble kTurbCoef = 1.0;
+
+    RDouble4D *heatConductivity = NULL, *massDiffusionCoef = NULL;
+    RDouble3D *totalCvtr = NULL, *totalCvv = NULL, *totalCve = NULL;
+    if (nChemical > 0 && numberOfSpecies > 0)
+    {
+        massFractions = new RDouble[numberOfSpecies];
+        heatConductivity = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("lambda"));
+        massDiffusionCoef = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rhoD"));
+        totalCvtr = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvtr"));
+        totalCvv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvv"));
+        totalCve = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCve"));
+    }
+
+    using namespace IDX;
+
+#define CFL3D_METHOD
+
+
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        int il1, jl1, kl1;
+        grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    int il, jl, kl;
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    RDouble nx = half * (xfv(i, j, k, iSurface) + xfv(il, jl, kl, iSurface));
+                    RDouble ny = half * (yfv(i, j, k, iSurface) + yfv(il, jl, kl, iSurface));
+                    RDouble nz = half * (zfv(i, j, k, iSurface) + zfv(il, jl, kl, iSurface));
+
+                    RDouble ns = nx * nx + ny * ny + nz * nz;
+                    RDouble ns2 = 2.0 * ns;
+
+                    //visSpectralRadius(i, j, k, iSurface - 1) = ns2;
+                    RDouble rm = q(i, j, k, IR);
+                    RDouble vvol = vol(i, j, k);
+
+                    RDouble viscLaminar = viscousLaminar(i, j, k);
+                    RDouble viscTurbulence = viscousTurbulence(i, j, k);
+                    RDouble gam_ma = gama(i, j, k);
+
+                    RDouble coef;
+#ifdef CFL3D_METHOD
+                    RDouble coef1 = foth * (viscLaminar + csrvist * viscTurbulence);
+                    RDouble coef2 = gam_ma * (viscLaminar / prandtlLaminar + viscTurbulence / prandtlTurbulence);
+                    coef = MAX(coef1, coef2);
+#else
+                    coef = (viscLaminar + csrvist * viscTurbulence);
+#endif
+
+                    //! Compute chemical diffusion terms, added by LiPeng on Feb. 19, 2019
+                    RDouble coef3 = 0.0;
+                    if (nChemical == 1)       //! The diffusion coefficient of the chemical reaction.
+                    {
+                        for (int ivar = 0; ivar < nEquation; ++ ivar)
+                        {
+                            primitiveVars[ivar] = q(i, j, k, ivar);
+                        }
+
+                        for (int ivar = 0; ivar < numberOfSpecies; ++ ivar)
+                        {
+                            massFractions[ivar] = primitiveVars[nNSEquation + ivar];
+                        }
+                        //! Obtain the maximum value of (ro*Ds).
+                        //coef3 = gas->GetMaximumSpeciesMassDiffusionCoef(primitiveVars, viscLaminar, viscTurbulence);
+                        for (int ivar = 0; ivar < gas->GetnLastSpeciesIndex(); ++ ivar)
+                        {
+                            coef3 = MAX(coef3, (*massDiffusionCoef)(i, j, k, ivar));
+                        }
+
+                        //! Multi-temperature model.
+                        if (nTemperatureModel > 1)
+                        {
+                            //! Obtain the temperature.
+                            RDouble Tv = t(i, j, k, mTV);
+                            RDouble Te = t(i, j, k, mTE);
+
+                            //! Compute heat conductivity./n
+                            RDouble Ktr, Kv, Ke;
+                            //gas->ComputeMixtureGasHeatConductivity(primitiveVars, Ttr, Tv, Te, Ktr, Kv, Ke);
+                            Ktr = (*heatConductivity)(i, j, k, ITT);
+                            Kv = (*heatConductivity)(i, j, k, ITV);
+                            RDouble cvtr, cvv, cve;
+                            if (nEnergyRecycle == 0)
+                            {
+                                cvtr = gas->GetMixedGasTranslationAndRotationSpecificHeatAtConstantVolume(massFractions);
+                                cvv = gas->GetMixedGasVibrationSpecificHeatAtConstantVolume(primitiveVars, Tv);
+                                cve = gas->GetMixedGasElectronSpecificHeatAtConstantVolume(primitiveVars, Te);
+                            }
+                            else
+                            {
+                                cvtr = (*totalCvtr)(i, j, k);
+                                cvv = (*totalCvv)(i, j, k);
+                                cve = (*totalCve)(i, j, k);
+                            }
+
+                            kTurbCoef = 1.0 + viscTurbulence * prandtlLaminar / (viscLaminar * prandtlTurbulence + SMALL);    //modified by dms
+
+                            coef3 = MAX(coef3, Ktr / cvtr * kTurbCoef);
+                            RDouble coef4 = 0.0;
+                            if (nTemperatureModel == 2)
+                            {
+                                Ke = 0.0;
+                                coef4 = (Kv + Ke) / (cvv + cve);
+                            }
+                            else
+                            {
+                                Ke = (*heatConductivity)(i, j, k, ITE);
+                                coef4 = MAX(Kv / cvv, Ke / cve);
+                            }
+                            coef3 = MAX(coef3, coef4 * kTurbCoef);
+                        }
+                    }
+                    coef = MAX(coef, coef3);
+                    //! End computation.
+
+                    coef *= csrv / (refReNumber * rm * vvol);
+
+                    visSpectralRadius(i, j, k, iSurface - 1) = ns2 * coef;
+
+                }
+            }
+        }
+    }
+
+    delete[]primitiveVars;
+    if (nChemical > 0 && numberOfSpecies > 0)
+    {
+        delete[] massFractions;
+    }
+}
+
+void NSSolverStruct::ConservativePreconMatrix(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    //! Get flow variables.
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble3D &preconCoefficient = *reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+    RDouble4D &preconMatrix = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("preconMatrix"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nEquation = nLaminar + nChemical;
+
+    int nElement = nEquation * nEquation;
+    RDouble *qPrecondition = new RDouble [nEquation];
+    RDouble **MG   = NewPointer2 <RDouble> (nEquation, nEquation);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd);
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                RDouble gama = gamma(i, j, k);
+                RDouble preconCoeff = preconCoefficient(i, j, k);
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    qPrecondition[m] = q(i, j, k, m);
+                }
+
+                ComputeConservativePreconMatrix(-1, MG, qPrecondition, gama, preconCoeff, nNSEquation, nEquation);
+
+                for (int row = 0; row < nEquation; ++ row)
+                {
+                    for (int col = 0; col < nEquation; ++ col)
+                    {
+                        int index = row * nEquation + col;
+                        preconMatrix(i, j, k, index) = MG[row][col];
+                    }
+                }
+            }
+        }
+    }
+
+        GhostCell3D(preconMatrix, ni, nj, nk, nElement);
+
+    delete []qPrecondition;
+    delete []MG;
+}
+
+//! Load rhs to residual res stored in grid.
+void NSSolverStruct::LoadResiduals(Grid *gridIn, FieldProxy *rightHandSideProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int nEquation = GetNumberOfEquations();
+    Range M(0, nEquation - 1);
+
+    RDouble4D &rightHandSide = rightHandSideProxy->GetField_STR();
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+
+
+    residual(I, J, K, M) = -rightHandSide(I, J, K, M);
+}
+
+RDouble NSSolverStruct::UnsteadyConvergence(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int isUnsteady = parameters->GetIsUnsteady();
+
+    if (!isUnsteady) return zero;
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble4D &qn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble4D &qn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    RDouble refGama = parameters->GetRefGama();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    RDouble *prim0 = new RDouble[nEquation];
+    RDouble *prim1 = new RDouble[nEquation];
+    RDouble *prim2 = new RDouble[nEquation];
+
+    RDouble *qcsv0 = new RDouble[nEquation];
+    RDouble *qcsv1 = new RDouble[nEquation];
+    RDouble *qcsv2 = new RDouble[nEquation];
+
+    RDouble Ttr[3] = { 0.0 }, Tv[3] = { 0.0 }, Te[3] = { 0.0 };
+
+    using namespace GAS_SPACE;
+    using namespace IDX;
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    RDouble sum1 = zero;
+    RDouble sum2 = zero;
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    prim0[m] = q(i, j, k, m);
+                    prim1[m] = qn1(i, j, k, m);
+                    prim2[m] = qn2(i, j, k, m);
+                }
+
+                if (nChemical == 1)
+                {
+                    Ttr[0] = t(i, j, k, mTT);
+                    Tv[0]  = t(i, j, k, mTV);
+                    Te[0]  = t(i, j, k, mTE);
+
+                    gas->Primitive2ConservativeR2(prim0, Ttr[0], Tv[0], Te[0], qcsv0);  //only for realgas
+                    gas->Primitive2ConservativeR2(prim1, Ttr[0], Tv[0], Te[0], qcsv1);
+                    gas->Primitive2ConservativeR2(prim2, Ttr[0], Tv[0], Te[0], qcsv2);
+                }
+                else
+                {
+                //! Primitive2Conservative function does not need to input gama in fact.
+                //! It will be modified later.
+                gas->Primitive2Conservative(prim0, refGama, Tv[0], Te[0], qcsv0);
+                gas->Primitive2Conservative(prim1, refGama, Tv[1], Te[1], qcsv1);
+                gas->Primitive2Conservative(prim2, refGama, Tv[2], Te[2], qcsv2);
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    //! Now res has been converted to dq. It means that residual is not right hand side term,but dq.
+                    RDouble dq_p = residual(i, j, k, m);        //! qn+1,p+1 - qn+1,p.
+                    RDouble dq_n = qcsv0[m] - qcsv1[m];         //! qn+1,p+1 - qn.
+                    sum1 += dq_p * dq_p;
+                    sum2 += dq_n * dq_n;
+                }
+            }
+        }
+    }
+
+    delete[]prim0;
+    delete[]prim1;
+    delete[]prim2;
+    delete[]qcsv0;
+    delete[]qcsv1;
+    delete[]qcsv2;
+
+    RDouble cvg = sqrt(ABS(sum1 / (sum2 + SMALL)));
+    return cvg;
+}
+
+void NSSolverStruct::UpdateUnsteadyFlow(Grid *gridIn)
+{
+    using namespace IDX;
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady) return;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &qn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble4D &qn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+
+    RDouble4D &resTmp = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_tmp"));
+    RDouble4D &resn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble4D &resn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+
+    int nEquation = GetNumberOfEquations();
+
+    qn2 = qn1;
+    qn1 = q;
+
+    resn2 = resn1;
+    resn1 = resTmp; //! Here the current outnstep is over, the value of the stored resTmp should be assigned to resn1 for the next outnstep. It should be noticed that resTmp only contain the inviscid and viscous flux.
+
+    //voln2 = voln1;
+    //voln1 = vol  ;
+
+    //! Statistical variables for DES simulation.
+    if (IsNeedStatistics())
+    {
+        int nStatisticalStep = GlobalDataBase::GetIntParaFromDB("nStatisticalStep");
+        RDouble statisticalTimePeriod = GlobalDataBase::GetDoubleParaFromDB("statisticalTimePeriod");
+        RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+        RDouble c1 = 1.0 / (nStatisticalStep * 1.0);
+        if (statisticalTimePeriod > 0.0)
+        {
+            c1 = MAX(c1, physicalTimeStep / statisticalTimePeriod);
+        }
+        RDouble c2 = 1.0 - c1;
+
+        RDouble4D &qAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage"));
+
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        //qAverage(i, j, k, m) = c1 * qAverage(i, j, k, m) + c2 * q(i, j, k, m);
+                        qAverage(i, j, k, m) = c2 * qAverage(i, j, k, m) + c1 * q(i, j, k, m);
+                    }
+                }
+            }
+        }
+    }
+
+    //! added by zzp 202108, for computing Reynolds Stress.
+    if (IsNeedReynoldsStressStatistics())
+    {
+        int nStatisticalStep = GlobalDataBase::GetIntParaFromDB("nStatisticalStep");
+        RDouble statisticalTimePeriod = GlobalDataBase::GetDoubleParaFromDB("statisticalTimePeriod");
+        RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+        RDouble c1 = 1.0 / (nStatisticalStep * 1.0);
+        if (statisticalTimePeriod > 0.0)
+        {
+            c1 = MAX(c1, physicalTimeStep / statisticalTimePeriod);
+        }
+        RDouble c2 = 1.0 - c1;
+
+        RDouble4D &tauAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("tauAverage"));
+        RDouble4D &qAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage"));
+        RDouble4D &q2Average = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q2Average"));
+
+        int statisticMethod = parameters->GetStatisticMethod();
+        if (statisticMethod == 0)
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        RDouble u = q(i, j, k, IU);
+                        RDouble v = q(i, j, k, IV);
+                        RDouble w = q(i, j, k, IW);
+
+                        q2Average(i, j, k, 0) = c2 * q2Average(i, j, k, 0) + c1 * u * u;
+                        q2Average(i, j, k, 1) = c2 * q2Average(i, j, k, 1) + c1 * v * v;
+                        q2Average(i, j, k, 2) = c2 * q2Average(i, j, k, 2) + c1 * w * w;
+                        q2Average(i, j, k, 3) = c2 * q2Average(i, j, k, 3) + c1 * u * v;
+                        q2Average(i, j, k, 4) = c2 * q2Average(i, j, k, 4) + c1 * u * w;
+                        q2Average(i, j, k, 5) = c2 * q2Average(i, j, k, 5) + c1 * v * w;
+                    }
+                }
+            }
+
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        RDouble uavg = qAverage(i, j, k, IU);
+                        RDouble vavg = qAverage(i, j, k, IV);
+                        RDouble wavg = qAverage(i, j, k, IW);
+
+                        tauAverage(i, j, k, 0) = q2Average(i, j, k, 0) - uavg * uavg;
+                        tauAverage(i, j, k, 1) = q2Average(i, j, k, 1) - vavg * vavg;
+                        tauAverage(i, j, k, 2) = q2Average(i, j, k, 2) - wavg * wavg;
+                        tauAverage(i, j, k, 3) = q2Average(i, j, k, 3) - uavg * vavg;
+                        tauAverage(i, j, k, 4) = q2Average(i, j, k, 4) - uavg * wavg;
+                        tauAverage(i, j, k, 5) = q2Average(i, j, k, 5) - vavg * wavg;
+                    }
+                }
+            }
+        }
+        else
+        {
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        RDouble uprm = q(i, j, k, IU) - qAverage(i, j, k, IU);
+                        RDouble vprm = q(i, j, k, IV) - qAverage(i, j, k, IV);
+                        RDouble wprm = q(i, j, k, IW) - qAverage(i, j, k, IW);
+
+                        tauAverage(i, j, k, 0) = c2 * tauAverage(i, j, k, 0) + c1 * uprm * uprm;
+                        tauAverage(i, j, k, 1) = c2 * tauAverage(i, j, k, 1) + c1 * vprm * vprm;
+                        tauAverage(i, j, k, 2) = c2 * tauAverage(i, j, k, 2) + c1 * wprm * wprm;
+                        tauAverage(i, j, k, 3) = c2 * tauAverage(i, j, k, 3) + c1 * uprm * vprm;
+                        tauAverage(i, j, k, 4) = c2 * tauAverage(i, j, k, 4) + c1 * uprm * wprm;
+                        tauAverage(i, j, k, 5) = c2 * tauAverage(i, j, k, 5) + c1 * vprm * wprm;
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::DualTimeSource(Grid *gridIn)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady) return;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble4D &qn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble4D &qn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &residualn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble4D &residualn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+    RDouble4D &residualTmp = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_tmp"));
+
+    RDouble3D &vol = grid->GetVolume(0); //! The volume at current timestep. If it is dualtime step method, it represents the volume at timestep of n+1.
+    RDouble3D &voln1 = grid->GetVolume(1); //! The volume at timestep of n  .
+    RDouble3D &voln2 = grid->GetVolume(2); //! the volume at timestep of n-1.
+
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    RDouble refGama = parameters->GetRefGama();
+
+    //! The primitive variables
+    RDouble *prim0 = new RDouble[nEquation];
+    RDouble *prim1 = new RDouble[nEquation];
+    RDouble *prim2 = new RDouble[nEquation];
+
+    //! The conservative variables
+    RDouble *qcsv0 = new RDouble[nEquation];
+    RDouble *qcsv1 = new RDouble[nEquation];
+    RDouble *qcsv2 = new RDouble[nEquation];
+
+    RDouble Ttr[3] = { 0.0 }, Tv[3] = { 0.0 }, Te[3] = { 0.0 }, staticE[3] = { 0.0 };
+
+    using namespace GAS_SPACE;
+
+    //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+    residualTmp = residual;
+
+    //! Computation of dualtime coefficients, including three coefficients for Residual of R(p), R(n) and R(n-1).
+    //! and three coefficients for conservative variables of qcsv(p), qcsv(n), and qcsv(n-1).
+    RDouble dualTimeCoefficient[7];
+    const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+    ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+
+    RDouble dualTimeResC1 = dualTimeCoefficient[0];
+    RDouble dualTimeResC2 = dualTimeCoefficient[1];
+    RDouble dualTimeResC3 = dualTimeCoefficient[2];
+    RDouble dualTimeQC1 = dualTimeCoefficient[3];
+    RDouble dualTimeQC2 = dualTimeCoefficient[4];
+    RDouble dualTimeQC3 = dualTimeCoefficient[5];
+
+    using namespace IDX;
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    prim0[m] = q(i, j, k, m);
+                    prim1[m] = qn1(i, j, k, m);
+                    prim2[m] = qn2(i, j, k, m);
+                }
+
+                if (nChemical == 1)
+                {
+                    Ttr[0] = t(i, j, k, mTT);
+                    Tv[0]  = t(i, j, k, mTV);
+                    Te[0]  = t(i, j, k, mTE);
+
+                    gas->Primitive2ConservativeR2(prim0, Ttr[0], Tv[0], Te[0], qcsv0);  //only for realgas
+                    gas->Primitive2ConservativeR2(prim1, Ttr[0], Tv[0], Te[0], qcsv1);
+                    gas->Primitive2ConservativeR2(prim2, Ttr[0], Tv[0], Te[0], qcsv2);
+                }
+                else
+                {
+                gas->Primitive2Conservative(prim0, refGama, Tv[0], Te[0], qcsv0);
+                gas->Primitive2Conservative(prim1, refGama, Tv[1], Te[1], qcsv1);
+                gas->Primitive2Conservative(prim2, refGama, Tv[2], Te[2], qcsv2);
+                }
+                //! In fact, there is no need to input the variable of refGama for the function of Primitive2Conservative, it is to be improved.
+
+
+                //! Here only for "nLaminar", because the formula is to be improved for "nEquation".
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    RDouble dualSrcRes = dualTimeResC1 * residual(i, j, k, m) +
+                        dualTimeResC2 * residualn1(i, j, k, m) +
+                        dualTimeResC3 * residualn2(i, j, k, m);
+
+                    RDouble dualSrcQ = dualTimeQC1 * qcsv0[m] * vol(i, j, k) +
+                        dualTimeQC2 * qcsv1[m] * voln1(i, j, k) +
+                        dualTimeQC3 * qcsv2[m] * voln2(i, j, k);
+
+                    residual(i, j, k, m) = dualSrcRes + dualSrcQ;
+                }
+            }
+        }
+    }
+    delete[]prim0;
+    delete[]prim1;
+    delete[]prim2;
+    delete[]qcsv0;
+    delete[]qcsv1;
+    delete[]qcsv2;
+}
+
+void NSSolverStruct::ChemicalSource(Grid *gridIn)
+{
+}
+
+//Compute the distance between the center of the grid cell on the first layer and the center of the surface cell.
+void NSSolverStruct::ComputeFirstLayerGridHeight(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+    RDouble2D *firstLayerHeight = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("firstLayerHeight"));
+
+    using namespace IDX;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    //! Obtain the number of boundary condition regions.
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int indexOfWall = 0, indexOfCell = 0;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!IsWall(BCType) && BCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+        //! The following are surface boundary codes.
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        indexOfCell = 0;
+        int nSurface = structBC->GetFaceDirection() + 1;
+        int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int iWall, jWall, kWall;
+                    structBC->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                    //! Obtain the centroid of the surface.
+                    RDouble xCenterWall, yCenterWall, zCenterWall;
+                    grid->FaceCoor(iWall, jWall, kWall, nSurface, xCenterWall, yCenterWall, zCenterWall);
+                    //! Obtain the centroid of the cell on the positive first layer.
+                    RDouble xCellCenter, yCellCenter, zCellCenter;
+                    grid->CenterCoor(i, j, k, xCellCenter, yCellCenter, zCellCenter);
+
+                    RDouble normalComponetX = leftOrRightIndex * faceNormalComponentX(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetY = leftOrRightIndex * faceNormalComponentY(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetZ = leftOrRightIndex * faceNormalComponentZ(iWall, jWall, kWall, nSurface);
+
+#ifdef USE_ALTERNATIVE_CODE
+                    RDouble3D& gridCellVolume = *(grid->GetCellVolume());
+                    RDouble cellVolume = gridCellVolume(iWall, jWall, kWall); //The volume of first cell.
+                    RDouble deltaHeight = half * cellVolume / surfaceArea;
+#else
+                    //! The projection of the dy called the distance between the center of the cell and that of the surface on normal vector.
+                    RDouble deltaHeight = fabs((xCellCenter - xCenterWall) * normalComponetX + (yCellCenter - yCenterWall) * normalComponetY + (zCellCenter - zCenterWall) * normalComponetZ);
+#endif
+
+                    (*firstLayerHeight)(indexOfWall, indexOfCell) = deltaHeight;
+                    ++ indexOfCell; //! Next grid cell.
+                }
+            }
+        }
+        ++ indexOfWall; //! Next surface regions.
+    }
+
+}
+
+void NSSolverStruct::ComputeGamaAndTemperature(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &gama = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+
+    int nEquation = GetNumberOfEquations();
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    int nEquilibriumGas = parameters->GetFlagOfEquilibriumGas();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+    int nEnergyRecycle = parameters->GetnEnergyRecycle();
+
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    RDouble refGama = parameters->GetRefGama();
+
+    RDouble4D *speciesEs = NULL, *speciesEnthalpy = NULL, *speciesCvs = NULL, *speciesCps = NULL, *speciesCvvs = NULL, *speciesCves = NULL, *speciesEtrs = NULL, *speciesEvs = NULL, *speciesEes = NULL;
+    RDouble3D *totalEnthalpy = NULL, *totalEnergy = NULL, *totalCp = NULL, *totalCv = NULL;
+    Thermo_Energy *Thermo_Energy_temparay = NULL;
+    RDouble3D *tflag = NULL, *totalCvtr = NULL, *totalCvv = NULL, *totalCve = NULL;
+    if (nChemical > 0)
+    {
+        Thermo_Energy_temparay = gas->GetThermo_Energy_temparay();
+        speciesEnthalpy = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("hSpecies"));
+
+        totalEnergy = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalEnergy"));
+        totalEnthalpy = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalEnthalpy"));
+        totalCv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCv"));
+        totalCp = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCp"));
+
+        tflag = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("tflag"));
+        totalCvtr = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvtr"));
+        totalCvv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvv"));
+        totalCve = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCve"));
+        speciesCvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCvs"));
+        speciesCps = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCps"));
+        speciesCvvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCvvs"));
+        speciesCves = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCves"));
+        speciesEtrs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEtrs"));
+        speciesEvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEvs"));
+        speciesEes = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEes"));
+        speciesEs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEs"));
+    }
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    int iInnerCellStart, iInnerCellEnd, jInnerCellStart, jInnerCellEnd, kInnerCellStart, kInnerCellEnd;
+    grid->GetCellIterationIndex(iInnerCellStart, iInnerCellEnd, jInnerCellStart, jInnerCellEnd, kInnerCellStart, kInnerCellEnd);
+
+    using namespace GAS_SPACE;
+    using namespace IDX;
+
+    if (nChemical == 1)
+    {
+        RDouble *hSpecies = new RDouble[nSpeciesNumber];
+        RDouble *primitiveVars = new RDouble[nEquation];
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        primitiveVars[m] = primitiveVariables(i, j, k, m);
+                    }
+                    if (nEnergyRecycle == 0)
+                    {
+                        gas->GetSpecificHeatRatioAndTemperatute(primitiveVars, gama(i, j, k), temperatures(i, j, k, mTT), temperatures(i, j, k, mTV), temperatures(i, j, k, mTE));
+                        gas->GetEverySpeciesEnthalpy(temperatures(i, j, k, mTT), temperatures(i, j, k, mTV), temperatures(i, j, k, mTE), hSpecies);
+
+                        for (int s = 0; s < nSpeciesNumber; ++ s)
+                        {
+                            (*speciesEnthalpy)(i, j, k, s) = hSpecies[s];
+                        }
+                    }
+                    else
+                    {
+                        if ((*tflag)(i, j, k) < 0.5)
+                        {
+                            gas->GetTemperatureR(primitiveVars, temperatures(i, j, k, mTT), temperatures(i, j, k, mTV), temperatures(i, j, k, mTE));
+                        }
+
+                        gas->ComputeMixturegasThermalParameter(&primitiveVars[IP + 1], temperatures(i, j, k, mTT), temperatures(i, j, k, mTV), temperatures(i, j, k, mTE));
+                        gama(i, j, k) = Thermo_Energy_temparay->gama;
+                        (*totalCv)(i, j, k) = Thermo_Energy_temparay->Cv;
+                        (*totalCp)(i, j, k) = Thermo_Energy_temparay->Cp;
+                        (*totalEnergy)(i, j, k) = Thermo_Energy_temparay->E;
+                        (*totalEnthalpy)(i, j, k) = Thermo_Energy_temparay->H;
+
+                        for (int s = 0; s < nSpeciesNumber; ++ s)
+                        {
+                            (*speciesEs)(i, j, k, s) = Thermo_Energy_temparay->Es[s];
+                            (*speciesEnthalpy)(i, j, k, s) = Thermo_Energy_temparay->Hs[s];
+                            (*speciesCvs)(i, j, k, s) = Thermo_Energy_temparay->Cvs[s];
+                            (*speciesCps)(i, j, k, s) = Thermo_Energy_temparay->Cps[s];
+                        }
+
+                        if (nTemperatureModel > 1)
+                        {
+                            (*totalCvtr)(i, j, k) = Thermo_Energy_temparay->Cvtr;
+                            (*totalCvv)(i, j, k) = Thermo_Energy_temparay->Cvv;
+                            (*totalCve)(i, j, k) = Thermo_Energy_temparay->Cve;
+
+                            for (int s = 0; s < nSpeciesNumber; ++ s)
+                            {
+                                (*speciesCvvs)(i, j, k, s) = Thermo_Energy_temparay->Cvvs[s];
+                                (*speciesCves)(i, j, k, s) = Thermo_Energy_temparay->Cves[s];
+                                (*speciesEtrs)(i, j, k, s) = Thermo_Energy_temparay->Etrs[s];
+                                (*speciesEvs)(i, j, k, s) = Thermo_Energy_temparay->Evs[s];
+                                (*speciesEes)(i, j, k, s) = Thermo_Energy_temparay->Ees[s];
+                            }
+                        }
+                    }
+                }
+            }
+        }
+        delete[] hSpecies;
+        delete[] primitiveVars;
+    }
+    else
+    {
+        if (nEquilibriumGas == 0)
+        {
+            RDouble omav = one;
+            RDouble coefficientOfStateEquation = gas->GetCoefficientOfStateEquation();
+
+            for (int k = kCellStart; k <= kCellEnd; ++ k)
+            {
+                for (int j = jCellStart; j <= jCellEnd; ++ j)
+                {
+                    for (int i = iCellStart; i <= iCellEnd; ++ i)
+                    {
+                        RDouble &density = primitiveVariables(i, j, k, IR);
+                        RDouble &pressure = primitiveVariables(i, j, k, IP);
+                        gama(i, j, k) = refGama;
+                        temperatures(i, j, k, ITT) = pressure / (coefficientOfStateEquation * density * omav);
+                }
+            }
+        }
+        }
+    }
+
+    // added by clz : 2012-8-3
+    //! begin
+    //int nTemperatureModel = parameters->GetNTemperatureModel();
+    FillCornerPoint3D(temperatures, ni, nj, nk, nTemperatureModel);
+    FillCornerPoint3D(gama, ni, nj, nk);
+    //! end
+    //! Added by clz : 2012-8-3
+}
+
+void NSSolverStruct::RungeKuttaResidual(Grid *gridIn, FieldProxy *dqProxy, RDouble coef)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D &dq = dqProxy->GetField_STR();
+
+    RDouble4D &res = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    dq(i, j, k, m) = dt(i, j, k) * coef * res(i, j, k, m);
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::SolutionFix(Grid *gridIn, RDouble *prim, int i, int j, int k)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int nEquation = GetNumberOfEquations();
+
+    using namespace GAS_SPACE;
+    using namespace IDX;
+
+    int np = 0;
+    int nDim = GetDim();
+
+    for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+    {
+        prim[iEquation] = zero;
+    }
+
+    for (int ii = -1; ii <= 1; ++ ii)
+    {
+        for (int jj = -1; jj <= 1; ++ jj)
+        {
+            for (int kk = -1; kk <= 1; ++ kk)
+            {
+                int kk2d = kk;
+                if (nDim == 2)
+                {
+                    kk2d = 0;
+                }
+                if ((ABS(ii) + ABS(jj) + ABS(kk2d)) == 1)
+                {
+                    np = np + 1;
+                    for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+                    {
+                        RDouble f = q(i + ii, j + jj, k + kk2d, iEquation);
+                        if (iEquation == IR || iEquation == IP)
+                        {
+                            f = ABS(f);
+                        }
+                        prim[iEquation] += f;
+                    }
+                }
+            }
+        }
+    }
+
+    for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+    {
+        prim[iEquation] /= np;
+    }
+}
+
+void NSSolverStruct::UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy)
+{
+    //return;
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &q = qProxy->GetField_STR();
+    RDouble4D &dq = dqProxy->GetField_STR();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    RDouble4D &qnew = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble3D &localCFL = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("localCFL"));
+    RDouble3D &minCFL = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("minCFL"));
+
+    RDouble3D &Xm = *(grid->GetCellCenterX());
+    RDouble3D &Ym = *(grid->GetCellCenterY());
+    RDouble3D &Zm = *(grid->GetCellCenterZ());
+
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    //int nSpecies = nLaminar + nChemical - nNSEquation;
+    int nElectronIndex = parameters->GetIndexOfElectron();
+    int isUseLocalCFL = parameters->GetLocalCFLFlag();
+    RDouble errLimit = 0.1;
+    RDouble cfl = 0.0;
+    if (GlobalDataBase::IsExist("predictCFLError", PHDOUBLE, 1))
+    {
+        errLimit = GlobalDataBase::GetDoubleParaFromDB("predictCFLError");
+    }
+
+    bool updateFlow = true;
+
+    int nDensityModify = parameters->GetnDensityModify();
+    int nDebug = parameters->GetnDebug();
+    int nEnergyRecycle = parameters->GetnEnergyRecycle();
+    RDouble densityMin = parameters->GetDensityMin();
+    RDouble densityMinFactor = parameters->GetdensityMinFactor();
+
+    /*int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble temperatureWall = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+    bool isRadiationEquilibrium = false;
+    if (fabs(temperatureWall) <= EPSILON)
+    {
+        isRadiationEquilibrium = true;
+    }*/
+   
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    RDouble3D *totalEnergy = NULL;
+    if (nChemical > 0)
+    {
+        totalEnergy = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalEnergy"));
+    }
+
+    RDouble gama = 0.0, tm = 0.0;
+    //! Three modes for temperature, including the translational-rotational temperature, vibrational temperature and electron temperature.
+    RDouble rm = 0.0, pm = 0.0, temperature[3] = {0.0, 0.0, 0.0};
+
+    RDouble *prim = new RDouble[nEquation]();
+    RDouble *qtry = new RDouble[nEquation]();
+    RDouble *dqlocal = new RDouble[nEquation]();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    using namespace GAS_SPACE;
+    using namespace IDX;
+
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    RDouble roo = primitiveVarFarfield[IR];
+    RDouble poo = primitiveVarFarfield[IP];
+    RDouble density_limit = 1.0e-12 * roo;
+    RDouble pressure_limit = 1.0e-12 * poo;
+    int     nNegativeCell = 0;
+
+    RDouble densityRelax = 1.0;
+    RDouble *residualVariation = new RDouble[nEquation];
+    RDouble *localMaxResidual = NULL;
+    int varIndex = 4;
+    int isAdaptiveSolver = GlobalDataBase::GetIntParaFromDB("isAdaptiveSolver");
+    int isUseNoneqCond = parameters->GetNonequilibriumConditionFlag();
+    if (isAdaptiveSolver > 0 || isUseNoneqCond > 0)
+    {
+        if (GlobalDataBase::IsExist("nKeyVariableIndex", PHINT, 1))
+        {
+        varIndex = GlobalDataBase::GetIntParaFromDB("nKeyVariableIndex");
+        }
+        localMaxResidual = reinterpret_cast <RDouble *> (grid->GetDataPtr("maxResidualVariation"));
+        
+        //! Initialization.
+        for (int m = 0; m < nEquation; ++m)
+        {
+            localMaxResidual[m] = 0.0;
+        }
+    }
+
+    RDouble4D *deltaQ = NULL;
+    if (isUseNoneqCond > 0)
+    {
+        deltaQ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("deltaQ"));
+    }
+
+    RDouble minCFL1, minCFL2, C100;
+
+    C100 = 100.0;
+
+    if (isUseLocalCFL == 2)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    minCFL(i, j, k) = 1.0e36;
+                    for (int jj = max(jCellStart, j - 1); jj <= min(jCellEnd, j + 1); ++ jj)
+                    {
+                        for (int kk = max(kCellStart, k - 1); kk <= min(kCellEnd, k + 1); ++ kk)
+                        {
+                            if (localCFL(i, jj, kk) < minCFL(i, j, k))minCFL(i, j, k) = localCFL(i, jj, kk);
+                        }
+                    }
+                }
+
+                minCFL1 = min(minCFL(iCellStart, j, k), minCFL(iCellStart + 1, j, k));
+
+                for (int i = iCellStart + 1; i <= iCellEnd - 1; ++ i)
+                {
+                    minCFL2 = min(minCFL(i - 1, j, k), min(minCFL(i, j, k), minCFL(i + 1, j, k)));
+
+                    minCFL(i - 1, j, k) = minCFL1;
+
+                    minCFL1 = minCFL2;
+                }
+
+                minCFL2 = min(minCFL(iCellEnd - 1, j, k), minCFL(iCellEnd, j, k));
+                minCFL(iCellEnd - 1, j, k) = minCFL1;
+                minCFL(iCellEnd, j, k) = minCFL2;
+            }
+        }
+    }
+    else if (isUseLocalCFL == 3)
+    {
+        cfl = ComputeCFL(grid->GetPartialCFL()) ; //* InviscidSpectrumRadiusCoef;
+        localCFL = cfl;
+    }
+
+    RDouble *dqtry = new RDouble[nEquation];
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    prim[m] = q(i, j, k, m);
+                    dqtry[m] = dq(i, j, k, m);
+                }
+                gama = gamma(i, j, k);
+                //! Obtain the temperature.
+                temperature[ITT] = t(i, j, k, mTT);
+                temperature[ITV] = t(i, j, k, mTV);
+                temperature[ITE] = t(i, j, k, mTE);
+
+                if (isAdaptiveSolver > 0 || isUseNoneqCond > 0)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        residualVariation[m] = prim[m];
+                    }
+                    for (int m = 0; m < 3; ++ m)
+                    {
+                        residualVariation[m + 1] = temperature[m];
+                    }
+                    tm = sqrt(temperature[ITT] * temperature[ITV]);
+                }
+
+                //! Tv and Te is the temperature of the previous iteration step.
+                if (nEnergyRecycle == 0)
+                {
+                    gas->Primitive2Conservative(prim, gama, t(i, j, k, mTV), t(i, j, k, mTE), qtry);
+                }
+                else
+                {
+                    gas->Primitive2ConservativeR(prim, gama, temperature[ITV], temperature[ITE], (*totalEnergy)(i, j, k), qtry);
+                }
+
+                if (nDensityModify == 1)
+                {
+                    if (dq(i, j, k, 0) > 0.0)
+                    {
+                        qtry[0] += dq(i, j, k, 0);
+                    }
+                    else
+                    {
+                        densityRelax = qtry[0];
+                        qtry[0] = qtry[0] * MAX(densityMinFactor, exp(dq(i, j, k, 0) / (qtry[0] + density_limit)));    //! high freestream density.
+                        qtry[0] = MAX(densityMin, qtry[0]);
+                        densityRelax = (densityRelax - qtry[0] + SMALL) / (-dq(i, j, k, 0) + SMALL);
+                    }
+
+                    if (dq(i, j, k, 0) > 0.0 || nChemical == 0)
+                    {
+                        for (int m = 1; m < nEquation; ++ m)
+                        {
+                            qtry[m] += dq(i, j, k, m);
+                        }
+                    }
+                    else
+                    {
+                        for (int m = 1; m < nEquation; ++ m)
+                        {
+                            qtry[m] += dq(i, j, k, m);    //! used in chemical.
+                        }
+                    }
+                }
+                else
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        qtry[m] += dq(i, j, k, m);
+                    }
+                    qtry[IR] = ABS(qtry[IR]);
+                }
+
+                //pm = prim[IP];
+
+                //! As returned parameter, temperature saves the temperatures of the next time-advancing step.
+                if (nEnergyRecycle == 0)
+                {
+                    gas->Conservative2Primitive(qtry, gama, prim, temperature);
+                }
+                else
+                {
+                    gas->Conservative2PrimitiveR(qtry, gama, prim, temperature);
+                }
+
+                if (nChemical == 1)    //! Modify the value of dq in the index of nl.
+                {
+                    dq(i, j, k, nLaminar) = prim[IR] * prim[nLaminar] - q(i, j, k, IR) * q(i, j, k, nLaminar);
+                    if (nElectronIndex >= 0)
+                    {
+                        dq(i, j, k, nLaminar - 1) = prim[IR] * prim[nLaminar - 1] - q(i, j, k, IR) * q(i, j, k, nLaminar - 1);
+                    }
+                    if (nTemperatureModel == 2)
+                    {
+                        dq(i, j, k, nLaminar + 1) = prim[IR] * prim[nLaminar + 1] - q(i, j, k, IR) * q(i, j, k, nLaminar + 1);
+                    }
+                    else if (nTemperatureModel == 3)
+                    {
+                        dq(i, j, k, nLaminar + 1) = prim[IR] * prim[nLaminar + 1] - q(i, j, k, IR) * q(i, j, k, nLaminar + 1);
+                        dq(i, j, k, nLaminar + 2) = prim[IR] * prim[nLaminar + 2] - q(i, j, k, IR) * q(i, j, k, nLaminar + 2);
+                    }
+
+                    for (int m = IP; m <= nLaminar; ++m)
+                    {
+                        qtry[m] = q(i, j, k, m);
+                    }
+                }
+                else
+                {
+                    qtry[IP] = q(i, j, k, IP);
+                }
+
+                //! Determine the CFL number of the next iteration step.
+                rm = prim[IR];
+                pm = prim[IP];
+
+                if (rm < density_limit || pm < pressure_limit)
+                {
+                    nNegativeCell += 1;
+                    SolutionFix(grid, prim, i, j, k);
+
+                    if (nDebug != 0)
+                    {
+                        int iZone = grid->GetZoneID();
+                        int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+                        cout << "  i=   " << i << "  j=    " << j << "   k=    " << k << endl;
+                        cout << "  X=   " << Xm(i, j, k) << "  Y=    " << Ym(i, j, k) << "   Z=    " << Zm(i, j, k) << endl;
+                        cout << "  density=   " << rm << "  pressure=    " << pm << endl;
+                        cout << "  iZone=   " << iZone << "  outIterStep=    " << outIterStep << endl;
+                        abort();
+                    }
+                }
+
+                if (isAdaptiveSolver > 0 || isUseNoneqCond > 0)
+                {
+                    //! The variation of the variable density.
+                    residualVariation[IR] = ABS((prim[IR] - residualVariation[IR])) / (residualVariation[IR] + SMALL);
+                    //! The variation of the variable pressure.
+                    residualVariation[IP] = ABS((prim[IP] - residualVariation[IP])) / (residualVariation[IP] + SMALL);
+
+                    //! Compute the variation of the variable temperature.
+                    for (int m = 0; m < 3; ++ m)
+                    {
+                        residualVariation[m + 1] = ABS((temperature[m] - residualVariation[m + 1])) / (residualVariation[m + 1] + SMALL);
+                    }
+                    //! Compute the variation of the species mass fractions.
+                    for (int m = nNSEquation; m < nEquation; ++ m)
+                    {
+                        residualVariation[m] = ABS((prim[m] - residualVariation[m])) / (residualVariation[m] + SMALL);
+                    }
+
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        localMaxResidual[m] = MAX(residualVariation[m], localMaxResidual[m]);
+                    }
+
+                    if (isUseNoneqCond > 0)
+                    {
+                        (*deltaQ)(i, j, k, 0) = ABS(sqrt(temperature[ITT] * temperature[ITV]) - tm);
+                }
+                }
+
+                //! Update the values.
+                if (updateFlow)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        qnew(i, j, k, m) = prim[m];
+                    }
+
+                    if (nEnergyRecycle != 0)
+                    {
+                        for (int m = 0; m < nTemperatureModel; ++ m)
+                        {
+                            t(i, j, k, m) = temperature[m];
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    // begin
+    if (nNegativeCell > 0)
+    {
+        cout << "      Warning: negative pressure or density appears in " << nNegativeCell << " cells ... " << endl;
+        cout << "               level = " << grid->GetLevel() << endl;
+    }
+    // end
+
+
+    delete[] prim;
+    delete[] qtry;
+    delete[] dqtry;
+    delete[] dqlocal;
+    delete[] residualVariation;
+}
+
+void NSSolverStruct::ViscousFlux(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int viscousType = parameters->GetViscousType();
+    if (viscousType == INVISCID) return; 
+
+    FieldProxy *fluxProxy = CreateFieldProxy(grid);
+
+    int nDim = GetDim();
+    
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+
+    string sgsmodel = " ";
+    GlobalDataBase::GetData("sgsmodel", &sgsmodel, PHSTRING, 1);
+
+    int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    if (iLES == NOLES_SOLVER || sgsmodel.substr(0, 6) == "dsmOld")
+    {
+        for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+        {
+#ifdef USE_PRE_CODE
+            cout << "PRE_CODE is used" << endl;
+            
+            int nChemical = parameters->GetChemicalFlag();
+
+            if (nChemical == 0)
+            {
+                ReconGradVolWeightedwithCorrection(gridIn, iSurface);
+
+                CompVisFluxnew(grid, fluxProxy, iSurface);
+            }
+            else
+            {
+                ReconGrad(gridIn, iSurface);
+
+                CompVisFlux(grid, fluxProxy, iSurface);
+                //! To correct the viscous flux on wall.
+                CorrectViscousFlux(grid, fluxProxy, iSurface);
+            }
+#else
+            ReconGradVolWeightedwithCorrection(gridIn, iSurface);
+
+            
+
+
+                CompVisFluxnew(grid, fluxProxy, iSurface);
+#endif
+            //! To compute the fluxes of cells by plusing the fluxes of all the surrounded faces.
+            CorrectViscousFlux(grid, fluxProxy, iSurface);
+            LoadFlux(grid, fluxProxy, iSurface);
+        }
+    }
+    else
+    {
+        //ReconGradVolWeightedwithCorrectionLES(gridIn);
+
+        for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+        {
+            ReconGradVolWeightedwithCorrection(gridIn, iSurface);
+
+            CompVisFluxLES(grid, fluxProxy, iSurface);
+
+            CorrectViscousFlux(grid, fluxProxy, iSurface);
+
+            //! To compute the fluxes of cells by plusing the fluxes of all the surrounded faces.
+            LoadFlux(grid, fluxProxy, iSurface);
+        }
+    }
+
+    delete fluxProxy;
+}
+
+void NSSolverStruct::ComputeGradient(Grid *gridIn)
+{
+
+}
+
+void NSSolverStruct::ComputeGradientCellCenter(Grid *gridIn)
+{
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &xfv = *(strgrid->GetFaceVectorX());
+    RDouble4D &yfv = *(strgrid->GetFaceVectorY());
+    RDouble4D &zfv = *(strgrid->GetFaceVectorZ());
+    RDouble3D &vol = *(strgrid->GetCellVolume());
+
+    int ndim = GetDim();
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSNumber = parameters->GetNSEquationNumber();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+    int nGradPrimtiveMethod = parameters->GetnGradPrimtiveMethod();
+    int viscousType = parameters->GetViscousType();
+    if (nGradPrimtiveMethod == 1 && viscousType < 2)return;
+
+    RDouble4D &primitiveVaiables = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("q"));
+    RDouble4D &temperature = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("t"));
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    gradUVWTCellCenterX = 0.0;
+    gradUVWTCellCenterY = 0.0;
+    gradUVWTCellCenterZ = 0.0;
+
+    RDouble4D *gradSpeciesCellCenterX = 0, *gradSpeciesCellCenterY = 0, *gradSpeciesCellCenterZ = 0;
+    if (nChemical > 0 && nSpeciesNumber > 0)
+    {
+        gradSpeciesCellCenterX = reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dcdx"));
+        gradSpeciesCellCenterY = reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dcdy"));
+        gradSpeciesCellCenterZ = reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dcdz"));
+        *gradSpeciesCellCenterX = 0.0;
+        *gradSpeciesCellCenterY = 0.0;
+        *gradSpeciesCellCenterZ = 0.0;
+    }
+
+
+    for (int nsurf = 1; nsurf <= ndim; ++ nsurf)
+    {
+        int il1, jl1, kl1;
+        strgrid->GetNsurfIndex(il1, jl1, kl1, nsurf);
+
+        int ist = 1;
+        int ied = ni - 1 + il1;
+        int jst = 1;
+        int jed = nj - 1 + jl1;
+        int kst = 1;
+        int ked = nk - 1 + kl1;
+
+        if (ndim == TWO_D) ked = 1;
+
+
+        //! The gradient of u,v,w.
+        for (int m = 0; m < ndim; ++ m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int il, jl, kl;
+                        strgrid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                        RDouble phis = primitiveVaiables(i, j, k, m + 1) + primitiveVaiables(il, jl, kl, m + 1);
+
+                        RDouble ddx = phis * xfv(i, j, k, nsurf);
+                        RDouble ddy = phis * yfv(i, j, k, nsurf);
+                        RDouble ddz = phis * zfv(i, j, k, nsurf);
+
+                        gradUVWTCellCenterX(i, j, k, m) -= ddx;
+                        gradUVWTCellCenterY(i, j, k, m) -= ddy;
+                        gradUVWTCellCenterZ(i, j, k, m) -= ddz;
+
+                        gradUVWTCellCenterX(il, jl, kl, m) += ddx;
+                        gradUVWTCellCenterY(il, jl, kl, m) += ddy;
+                        gradUVWTCellCenterZ(il, jl, kl, m) += ddz;
+                    }
+                }
+            }
+        }
+
+        //! The gradient of temperature.
+        for (int m = 0; m < nTemperatureModel; ++ m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int il, jl, kl;
+                        strgrid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                        RDouble phis = temperature(i, j, k, m) + temperature(il, jl, kl, m);
+
+                        RDouble ddx = phis * xfv(i, j, k, nsurf);
+                        RDouble ddy = phis * yfv(i, j, k, nsurf);
+                        RDouble ddz = phis * zfv(i, j, k, nsurf);
+
+                        gradUVWTCellCenterX(i, j, k, m + 3) -= ddx;
+                        gradUVWTCellCenterY(i, j, k, m + 3) -= ddy;
+                        gradUVWTCellCenterZ(i, j, k, m + 3) -= ddz;
+
+                        gradUVWTCellCenterX(il, jl, kl, m + 3) += ddx;
+                        gradUVWTCellCenterY(il, jl, kl, m + 3) += ddy;
+                        gradUVWTCellCenterZ(il, jl, kl, m + 3) += ddz;
+                    }
+                }
+            }
+        }
+
+        if (nChemical == 0)
+            continue;
+
+        //! The gradient of mass fraction of species.
+        for (int s = 0; s < nSpeciesNumber; ++ s)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int il, jl, kl;
+                        strgrid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                        RDouble phis = primitiveVaiables(i, j, k, nNSNumber + s) + primitiveVaiables(il, jl, kl, nNSNumber + s);
+
+                        RDouble ddx = phis * xfv(i, j, k, nsurf);
+                        RDouble ddy = phis * yfv(i, j, k, nsurf);
+                        RDouble ddz = phis * zfv(i, j, k, nsurf);
+
+                        (*gradSpeciesCellCenterX)(i, j, k, s) -= ddx;
+                        (*gradSpeciesCellCenterY)(i, j, k, s) -= ddy;
+                        (*gradSpeciesCellCenterZ)(i, j, k, s) -= ddz;
+
+                        (*gradSpeciesCellCenterX)(il, jl, kl, s) += ddx;
+                        (*gradSpeciesCellCenterY)(il, jl, kl, s) += ddy;
+                        (*gradSpeciesCellCenterZ)(il, jl, kl, s) += ddz;
+                    }
+                }
+            }
+        }
+
+    }
+
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+
+
+
+    if (ndim == TWO_D) ked = 1;
+
+    int nTotalVariable = nTemperatureModel + 3;
+    for (int m = 0; m < nTotalVariable; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble oov = half / vol(i, j, k);
+                    gradUVWTCellCenterX(i, j, k, m) *= oov;
+                    gradUVWTCellCenterY(i, j, k, m) *= oov;
+                    gradUVWTCellCenterZ(i, j, k, m) *= oov;
+                }
+            }
+        }
+    }
+
+    if (nChemical > 0)
+    {
+        for (int m = 0; m < nSpeciesNumber; ++ m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        RDouble oov = half / vol(i, j, k);
+                        (*gradSpeciesCellCenterX)(i, j, k, m) *= oov;
+                        (*gradSpeciesCellCenterY)(i, j, k, m) *= oov;
+                        (*gradSpeciesCellCenterZ)(i, j, k, m) *= oov;
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::ComputeGradientCellCenterForLES(Grid *gridIn)
+{
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &xfv = *(strgrid->GetFaceVectorX());
+    RDouble4D &yfv = *(strgrid->GetFaceVectorY());
+    RDouble4D &zfv = *(strgrid->GetFaceVectorZ());
+    RDouble3D &vol = *(strgrid->GetCellVolume());
+
+    int ndim = GetDim();
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSNumber = parameters->GetNSEquationNumber();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+
+    RDouble4D &primitiveVaiables = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("q"));
+    RDouble4D &temperature = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("t"));
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    gradUVWTCellCenterX = 0.0;
+    gradUVWTCellCenterY = 0.0;
+    gradUVWTCellCenterZ = 0.0;
+
+    RDouble4D *gradSpeciesCellCenterX = 0, *gradSpeciesCellCenterY = 0, *gradSpeciesCellCenterZ = 0;
+    if (nChemical > 0 && nSpeciesNumber > 0)
+    {
+        gradSpeciesCellCenterX = reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dcdx"));
+        gradSpeciesCellCenterY = reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dcdy"));
+        gradSpeciesCellCenterZ = reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dcdz"));
+        *gradSpeciesCellCenterX = 0.0;
+        *gradSpeciesCellCenterY = 0.0;
+        *gradSpeciesCellCenterZ = 0.0;
+    }
+
+
+    for (int nsurf = 1; nsurf <= ndim; ++ nsurf)
+    {
+        int il1, jl1, kl1;
+        strgrid->GetNsurfIndex(il1, jl1, kl1, nsurf);
+
+        int ist = 1;
+        int ied = ni - 1 + il1;
+        int jst = 1;
+        int jed = nj - 1 + jl1;
+        int kst = 1;
+        int ked = nk - 1 + kl1;
+
+        if (ndim == TWO_D) ked = 1;
+
+        //! The gradient of u,v,w.
+        for (int m = 0; m < ndim; ++ m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int il, jl, kl;
+                        strgrid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                        RDouble phis = primitiveVaiables(i, j, k, m + 1) + primitiveVaiables(il, jl, kl, m + 1);
+
+                        RDouble ddx = phis * xfv(i, j, k, nsurf);
+                        RDouble ddy = phis * yfv(i, j, k, nsurf);
+                        RDouble ddz = phis * zfv(i, j, k, nsurf);
+
+                        gradUVWTCellCenterX(i, j, k, m) -= ddx;
+                        gradUVWTCellCenterY(i, j, k, m) -= ddy;
+                        gradUVWTCellCenterZ(i, j, k, m) -= ddz;
+
+                        gradUVWTCellCenterX(il, jl, kl, m) += ddx;
+                        gradUVWTCellCenterY(il, jl, kl, m) += ddy;
+                        gradUVWTCellCenterZ(il, jl, kl, m) += ddz;
+                    }
+                }
+            }
+        }
+
+        //! The gradient of temperature.
+        for (int m = 0; m < nTemperatureModel; ++ m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int il, jl, kl;
+                        strgrid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                        RDouble phis = temperature(i, j, k, m) + temperature(il, jl, kl, m);
+
+                        RDouble ddx = phis * xfv(i, j, k, nsurf);
+                        RDouble ddy = phis * yfv(i, j, k, nsurf);
+                        RDouble ddz = phis * zfv(i, j, k, nsurf);
+
+                        gradUVWTCellCenterX(i, j, k, m + 3) -= ddx;
+                        gradUVWTCellCenterY(i, j, k, m + 3) -= ddy;
+                        gradUVWTCellCenterZ(i, j, k, m + 3) -= ddz;
+
+                        gradUVWTCellCenterX(il, jl, kl, m + 3) += ddx;
+                        gradUVWTCellCenterY(il, jl, kl, m + 3) += ddy;
+                        gradUVWTCellCenterZ(il, jl, kl, m + 3) += ddz;
+                    }
+                }
+            }
+        }
+
+        if (nChemical == 0)
+            continue;
+
+        //! The gradient of mass fraction of species.
+        for (int s = 0; s < nSpeciesNumber; ++ s)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int il, jl, kl;
+                        strgrid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                        RDouble phis = primitiveVaiables(i, j, k, nNSNumber + s) + primitiveVaiables(il, jl, kl, nNSNumber + s);
+
+                        RDouble ddx = phis * xfv(i, j, k, nsurf);
+                        RDouble ddy = phis * yfv(i, j, k, nsurf);
+                        RDouble ddz = phis * zfv(i, j, k, nsurf);
+
+                        (*gradSpeciesCellCenterX)(i, j, k, s) -= ddx;
+                        (*gradSpeciesCellCenterY)(i, j, k, s) -= ddy;
+                        (*gradSpeciesCellCenterZ)(i, j, k, s) -= ddz;
+
+                        (*gradSpeciesCellCenterX)(il, jl, kl, s) += ddx;
+                        (*gradSpeciesCellCenterY)(il, jl, kl, s) += ddy;
+                        (*gradSpeciesCellCenterZ)(il, jl, kl, s) += ddz;
+                    }
+                }
+            }
+        }
+
+    }
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+
+
+    if (ndim == TWO_D) ked = 1;
+
+    int nTotalVariable = nTemperatureModel + 3;
+    for (int m = 0; m < nTotalVariable; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble oov = half / vol(i, j, k);
+                    gradUVWTCellCenterX(i, j, k, m) *= oov;
+                    gradUVWTCellCenterY(i, j, k, m) *= oov;
+                    gradUVWTCellCenterZ(i, j, k, m) *= oov;
+                }
+            }
+        }
+    }
+
+    GhostCell3D(gradUVWTCellCenterX, ni, nj, nk, ndim);
+    GhostCell3D(gradUVWTCellCenterY, ni, nj, nk, ndim);
+    GhostCell3D(gradUVWTCellCenterZ, ni, nj, nk, ndim);
+
+    if (nChemical > 0)
+    {
+        for (int m = 0; m < nSpeciesNumber; ++ m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        RDouble oov = half / vol(i, j, k);
+                        (*gradSpeciesCellCenterX)(i, j, k, m) *= oov;
+                        (*gradSpeciesCellCenterY)(i, j, k, m) *= oov;
+                        (*gradSpeciesCellCenterZ)(i, j, k, m) *= oov;
+                    }
+                }
+            }
+        }
+    }
+
+}
+
+void NSSolverStruct::ComputeGradientCellCenterOfruvwptOnlyForMixGrid(Grid *gridIn)
+{
+    //! only first layer need these data, to transfer.
+    //! added by myk 20201024
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &xfv = *(strgrid->GetFaceVectorX());
+    RDouble4D &yfv = *(strgrid->GetFaceVectorY());
+    RDouble4D &zfv = *(strgrid->GetFaceVectorZ());
+    RDouble3D &vol = *(strgrid->GetCellVolume());
+
+    int ndim = GetDim();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("t"));
+    RDouble4D &dqdx = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdx_cc_ruvwpt"));
+    RDouble4D &dqdy = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdy_cc_ruvwpt"));
+    RDouble4D &dqdz = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdz_cc_ruvwpt"));
+
+    dqdx = 0.0;
+    dqdy = 0.0;
+    dqdz = 0.0;
+
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+    if (ndim == TWO_D) ked = 1;
+
+    int ibc[2];
+    int jbc[2];
+    int kbc[2];
+    ibc[0] = ist;
+    jbc[0] = jst;
+    kbc[0] = kst;
+    ibc[1] = ied;
+    jbc[1] = jed;
+    kbc[1] = ked;
+
+    if (ndim == TWO_D)
+    {
+        int k = 1;
+
+        RDouble q_IL[6], q_IR[6];
+        RDouble q_JL[6], q_JR[6];
+
+        RDouble xfv_IL, xfv_IR;
+        RDouble yfv_IL, yfv_IR;
+        RDouble zfv_IL, zfv_IR;
+
+        RDouble xfv_JL, xfv_JR;
+        RDouble yfv_JL, yfv_JR;
+        RDouble zfv_JL, zfv_JR;
+        for (int bcindex = 0; bcindex <= 1; ++ bcindex)
+        {
+            int j = jbc[bcindex];
+            for (int i = ist; i <= ied; ++ i)
+            {
+                xfv_IL = xfv(i, j, k, 1);
+                yfv_IL = yfv(i, j, k, 1);
+                zfv_IL = zfv(i, j, k, 1);
+
+                xfv_IR = xfv(i + 1, j, k, 1);
+                yfv_IR = yfv(i + 1, j, k, 1);
+                zfv_IR = zfv(i + 1, j, k, 1);
+
+                xfv_JL = xfv(i, j, k, 2);
+                yfv_JL = yfv(i, j, k, 2);
+                zfv_JL = zfv(i, j, k, 2);
+
+                xfv_JR = xfv(i, j + 1, k, 2);
+                yfv_JR = yfv(i, j + 1, k, 2);
+                zfv_JR = zfv(i, j + 1, k, 2);
+
+                for (int m = 0; m <= 4; ++ m)
+                {
+                    q_IL[m] = half * (q(i, j, k, m) + q(i - 1, j, k, m));
+                    q_IR[m] = half * (q(i, j, k, m) + q(i + 1, j, k, m));
+
+                    q_JL[m] = half * (q(i, j, k, m) + q(i, j - 1, k, m));
+                    q_JR[m] = half * (q(i, j, k, m) + q(i, j + 1, k, m));
+                }
+
+                q_IL[5] = half * (t(i, j, k, 0) + t(i - 1, j, k, 0));
+                q_IR[5] = half * (t(i, j, k, 0) + t(i + 1, j, k, 0));
+
+                q_JL[5] = half * (t(i, j, k, 0) + t(i, j - 1, k, 0));
+                q_JR[5] = half * (t(i, j, k, 0) + t(i, j + 1, k, 0));
+
+                for (int m = 0; m <= 5; ++ m)
+                {
+                    dqdx(i, j, k, m) = (-q_IL[m] * xfv_IL + q_IR[m] * xfv_IR) + (-q_JL[m] * xfv_JL + q_JR[m] * xfv_JR);
+                    dqdy(i, j, k, m) = (-q_IL[m] * yfv_IL + q_IR[m] * yfv_IR) + (-q_JL[m] * yfv_JL + q_JR[m] * yfv_JR);
+                    dqdz(i, j, k, m) = (-q_IL[m] * zfv_IL + q_IR[m] * zfv_IR) + (-q_JL[m] * zfv_JL + q_JR[m] * zfv_JR);
+                }
+            }
+        }
+
+        for (int bcindex = 0; bcindex <= 1; ++ bcindex)
+        {
+            int i = ibc[bcindex];
+            for (int j = jst; j <= jed; ++ j)
+            {
+                xfv_IL = xfv(i, j, k, 1);
+                yfv_IL = yfv(i, j, k, 1);
+                zfv_IL = zfv(i, j, k, 1);
+
+                xfv_IR = xfv(i + 1, j, k, 1);
+                yfv_IR = yfv(i + 1, j, k, 1);
+                zfv_IR = zfv(i + 1, j, k, 1);
+
+                xfv_JL = xfv(i, j, k, 2);
+                yfv_JL = yfv(i, j, k, 2);
+                zfv_JL = zfv(i, j, k, 2);
+
+                xfv_JR = xfv(i, j + 1, k, 2);
+                yfv_JR = yfv(i, j + 1, k, 2);
+                zfv_JR = zfv(i, j + 1, k, 2);
+
+                for (int m = 0; m <= 4; ++ m)
+                {
+                    q_IL[m] = half * (q(i, j, k, m) + q(i - 1, j, k, m));
+                    q_IR[m] = half * (q(i, j, k, m) + q(i + 1, j, k, m));
+
+                    q_JL[m] = half * (q(i, j, k, m) + q(i, j - 1, k, m));
+                    q_JR[m] = half * (q(i, j, k, m) + q(i, j + 1, k, m));
+                }
+
+                q_IL[5] = half * (t(i, j, k, 0) + t(i - 1, j, k, 0));
+                q_IR[5] = half * (t(i, j, k, 0) + t(i + 1, j, k, 0));
+
+                q_JL[5] = half * (t(i, j, k, 0) + t(i, j - 1, k, 0));
+                q_JR[5] = half * (t(i, j, k, 0) + t(i, j + 1, k, 0));
+
+                for (int m = 0; m <= 5; ++ m)
+                {
+                    dqdx(i, j, k, m) = (-q_IL[m] * xfv_IL + q_IR[m] * xfv_IR) + (-q_JL[m] * xfv_JL + q_JR[m] * xfv_JR);
+                    dqdy(i, j, k, m) = (-q_IL[m] * yfv_IL + q_IR[m] * yfv_IR) + (-q_JL[m] * yfv_JL + q_JR[m] * yfv_JR);
+                    dqdz(i, j, k, m) = (-q_IL[m] * zfv_IL + q_IR[m] * zfv_IR) + (-q_JL[m] * zfv_JL + q_JR[m] * zfv_JR);
+                }
+            }
+        }
+    }
+    else
+    {
+        RDouble q_IL[6], q_IR[6];
+        RDouble q_JL[6], q_JR[6];
+        RDouble q_KL[6], q_KR[6];
+
+        RDouble xfv_IL, xfv_IR;
+        RDouble yfv_IL, yfv_IR;
+        RDouble zfv_IL, zfv_IR;
+
+        RDouble xfv_JL, xfv_JR;
+        RDouble yfv_JL, yfv_JR;
+        RDouble zfv_JL, zfv_JR;
+
+        RDouble xfv_KL, xfv_KR;
+        RDouble yfv_KL, yfv_KR;
+        RDouble zfv_KL, zfv_KR;
+
+        for (int bcindex = 0; bcindex <= 1; ++ bcindex)
+        {
+            int k = kbc[bcindex];
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    xfv_IL = xfv(i, j, k, 1);
+                    yfv_IL = yfv(i, j, k, 1);
+                    zfv_IL = zfv(i, j, k, 1);
+
+                    xfv_IR = xfv(i + 1, j, k, 1);
+                    yfv_IR = yfv(i + 1, j, k, 1);
+                    zfv_IR = zfv(i + 1, j, k, 1);
+
+                    xfv_JL = xfv(i, j, k, 2);
+                    yfv_JL = yfv(i, j, k, 2);
+                    zfv_JL = zfv(i, j, k, 2);
+
+                    xfv_JR = xfv(i, j + 1, k, 2);
+                    yfv_JR = yfv(i, j + 1, k, 2);
+                    zfv_JR = zfv(i, j + 1, k, 2);
+
+                    xfv_KL = xfv(i, j, k, 3);
+                    yfv_KL = yfv(i, j, k, 3);
+                    zfv_KL = zfv(i, j, k, 3);
+
+                    xfv_KR = xfv(i, j, k + 1, 3);
+                    yfv_KR = yfv(i, j, k + 1, 3);
+                    zfv_KR = zfv(i, j, k + 1, 3);
+
+                    for (int m = 0; m <= 4; ++ m)
+                    {
+                        q_IL[m] = half * (q(i, j, k, m) + q(i - 1, j, k, m));
+                        q_IR[m] = half * (q(i, j, k, m) + q(i + 1, j, k, m));
+
+                        q_JL[m] = half * (q(i, j, k, m) + q(i, j - 1, k, m));
+                        q_JR[m] = half * (q(i, j, k, m) + q(i, j + 1, k, m));
+
+                        q_KL[m] = half * (q(i, j, k, m) + q(i, j, k - 1, m));
+                        q_KR[m] = half * (q(i, j, k, m) + q(i, j, k + 1, m));
+                    }
+
+                    q_IL[5] = half * (t(i, j, k, 0) + t(i - 1, j, k, 0));
+                    q_IR[5] = half * (t(i, j, k, 0) + t(i + 1, j, k, 0));
+
+                    q_JL[5] = half * (t(i, j, k, 0) + t(i, j - 1, k, 0));
+                    q_JR[5] = half * (t(i, j, k, 0) + t(i, j + 1, k, 0));
+
+                    q_KL[5] = half * (t(i, j, k, 0) + t(i, j, k - 1, 0));
+                    q_KR[5] = half * (t(i, j, k, 0) + t(i, j, k + 1, 0));
+
+                    for (int m = 0; m <= 5; ++ m)
+                    {
+                        dqdx(i, j, k, m) = (-q_IL[m] * xfv_IL + q_IR[m] * xfv_IR) + (-q_JL[m] * xfv_JL + q_JR[m] * xfv_JR) + (-q_KL[m] * xfv_KL + q_KR[m] * xfv_KR);
+                        dqdy(i, j, k, m) = (-q_IL[m] * yfv_IL + q_IR[m] * yfv_IR) + (-q_JL[m] * yfv_JL + q_JR[m] * yfv_JR) + (-q_KL[m] * yfv_KL + q_KR[m] * yfv_KR);
+                        dqdz(i, j, k, m) = (-q_IL[m] * zfv_IL + q_IR[m] * zfv_IR) + (-q_JL[m] * zfv_JL + q_JR[m] * zfv_JR) + (-q_KL[m] * zfv_KL + q_KR[m] * zfv_KR);
+                    }
+                }
+            }
+        }
+
+        for (int bcindex = 0; bcindex <= 1; ++ bcindex)
+        {
+            int j = jbc[bcindex];
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    xfv_IL = xfv(i, j, k, 1);
+                    yfv_IL = yfv(i, j, k, 1);
+                    zfv_IL = zfv(i, j, k, 1);
+
+                    xfv_IR = xfv(i + 1, j, k, 1);
+                    yfv_IR = yfv(i + 1, j, k, 1);
+                    zfv_IR = zfv(i + 1, j, k, 1);
+
+                    xfv_JL = xfv(i, j, k, 2);
+                    yfv_JL = yfv(i, j, k, 2);
+                    zfv_JL = zfv(i, j, k, 2);
+
+                    xfv_JR = xfv(i, j + 1, k, 2);
+                    yfv_JR = yfv(i, j + 1, k, 2);
+                    zfv_JR = zfv(i, j + 1, k, 2);
+
+                    xfv_KL = xfv(i, j, k, 3);
+                    yfv_KL = yfv(i, j, k, 3);
+                    zfv_KL = zfv(i, j, k, 3);
+
+                    xfv_KR = xfv(i, j, k + 1, 3);
+                    yfv_KR = yfv(i, j, k + 1, 3);
+                    zfv_KR = zfv(i, j, k + 1, 3);
+
+                    for (int m = 0; m <= 4; ++ m)
+                    {
+                        q_IL[m] = half * (q(i, j, k, m) + q(i - 1, j, k, m));
+                        q_IR[m] = half * (q(i, j, k, m) + q(i + 1, j, k, m));
+
+                        q_JL[m] = half * (q(i, j, k, m) + q(i, j - 1, k, m));
+                        q_JR[m] = half * (q(i, j, k, m) + q(i, j + 1, k, m));
+
+                        q_KL[m] = half * (q(i, j, k, m) + q(i, j, k - 1, m));
+                        q_KR[m] = half * (q(i, j, k, m) + q(i, j, k + 1, m));
+                    }
+
+                    q_IL[5] = half * (t(i, j, k, 0) + t(i - 1, j, k, 0));
+                    q_IR[5] = half * (t(i, j, k, 0) + t(i + 1, j, k, 0));
+
+                    q_JL[5] = half * (t(i, j, k, 0) + t(i, j - 1, k, 0));
+                    q_JR[5] = half * (t(i, j, k, 0) + t(i, j + 1, k, 0));
+
+                    q_KL[5] = half * (t(i, j, k, 0) + t(i, j, k - 1, 0));
+                    q_KR[5] = half * (t(i, j, k, 0) + t(i, j, k + 1, 0));
+
+                    for (int m = 0; m <= 5; ++ m)
+                    {
+                        dqdx(i, j, k, m) = (-q_IL[m] * xfv_IL + q_IR[m] * xfv_IR) + (-q_JL[m] * xfv_JL + q_JR[m] * xfv_JR) + (-q_KL[m] * xfv_KL + q_KR[m] * xfv_KR);
+                        dqdy(i, j, k, m) = (-q_IL[m] * yfv_IL + q_IR[m] * yfv_IR) + (-q_JL[m] * yfv_JL + q_JR[m] * yfv_JR) + (-q_KL[m] * yfv_KL + q_KR[m] * yfv_KR);
+                        dqdz(i, j, k, m) = (-q_IL[m] * zfv_IL + q_IR[m] * zfv_IR) + (-q_JL[m] * zfv_JL + q_JR[m] * zfv_JR) + (-q_KL[m] * zfv_KL + q_KR[m] * zfv_KR);
+                    }
+                }
+            }
+        }
+
+        for (int bcindex = 0; bcindex <= 1; ++ bcindex)
+        {
+            int i = ibc[bcindex];
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    xfv_IL = xfv(i, j, k, 1);
+                    yfv_IL = yfv(i, j, k, 1);
+                    zfv_IL = zfv(i, j, k, 1);
+
+                    xfv_IR = xfv(i + 1, j, k, 1);
+                    yfv_IR = yfv(i + 1, j, k, 1);
+                    zfv_IR = zfv(i + 1, j, k, 1);
+
+                    xfv_JL = xfv(i, j, k, 2);
+                    yfv_JL = yfv(i, j, k, 2);
+                    zfv_JL = zfv(i, j, k, 2);
+
+                    xfv_JR = xfv(i, j + 1, k, 2);
+                    yfv_JR = yfv(i, j + 1, k, 2);
+                    zfv_JR = zfv(i, j + 1, k, 2);
+
+                    xfv_KL = xfv(i, j, k, 3);
+                    yfv_KL = yfv(i, j, k, 3);
+                    zfv_KL = zfv(i, j, k, 3);
+
+                    xfv_KR = xfv(i, j, k + 1, 3);
+                    yfv_KR = yfv(i, j, k + 1, 3);
+                    zfv_KR = zfv(i, j, k + 1, 3);
+
+                    for (int m = 0; m <= 4; ++ m)
+                    {
+                        q_IL[m] = half * (q(i, j, k, m) + q(i - 1, j, k, m));
+                        q_IR[m] = half * (q(i, j, k, m) + q(i + 1, j, k, m));
+
+                        q_JL[m] = half * (q(i, j, k, m) + q(i, j - 1, k, m));
+                        q_JR[m] = half * (q(i, j, k, m) + q(i, j + 1, k, m));
+
+                        q_KL[m] = half * (q(i, j, k, m) + q(i, j, k - 1, m));
+                        q_KR[m] = half * (q(i, j, k, m) + q(i, j, k + 1, m));
+                    }
+
+                    q_IL[5] = half * (t(i, j, k, 0) + t(i - 1, j, k, 0));
+                    q_IR[5] = half * (t(i, j, k, 0) + t(i + 1, j, k, 0));
+
+                    q_JL[5] = half * (t(i, j, k, 0) + t(i, j - 1, k, 0));
+                    q_JR[5] = half * (t(i, j, k, 0) + t(i, j + 1, k, 0));
+
+                    q_KL[5] = half * (t(i, j, k, 0) + t(i, j, k - 1, 0));
+                    q_KR[5] = half * (t(i, j, k, 0) + t(i, j, k + 1, 0));
+
+                    for (int m = 0; m <= 5; ++ m)
+                    {
+                        dqdx(i, j, k, m) = (-q_IL[m] * xfv_IL + q_IR[m] * xfv_IR) + (-q_JL[m] * xfv_JL + q_JR[m] * xfv_JR) + (-q_KL[m] * xfv_KL + q_KR[m] * xfv_KR);
+                        dqdy(i, j, k, m) = (-q_IL[m] * yfv_IL + q_IR[m] * yfv_IR) + (-q_JL[m] * yfv_JL + q_JR[m] * yfv_JR) + (-q_KL[m] * yfv_KL + q_KR[m] * yfv_KR);
+                        dqdz(i, j, k, m) = (-q_IL[m] * zfv_IL + q_IR[m] * zfv_IR) + (-q_JL[m] * zfv_JL + q_JR[m] * zfv_JR) + (-q_KL[m] * zfv_KL + q_KR[m] * zfv_KR);
+                    }
+                }
+            }
+        }
+    }
+
+    for (int m = 0; m <= 5; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    dqdx(i, j, k, m) /= vol(i, j, k);
+                    dqdy(i, j, k, m) /= vol(i, j, k);
+                    dqdz(i, j, k, m) /= vol(i, j, k);
+                }
+            }
+        }
+    }
+}
+
+
+void NSSolverStruct::ReconGrad(Grid *gridIn, int nsurf)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    //! This subroutine is developed to calculate the gradients of a.
+    //! Variable phi at a surfaces in the direction nsurf.
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int mst = 0;
+    int med = GetNumberOfEquations() - 1;
+
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int mtst = 0;
+    int mted = nTemperatureModel - 1;
+
+    RDouble4D &q_4d = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t_4d = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    RDouble4D &dqdx_4d = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D &dqdy_4d = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D &dqdz_4d = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+
+    RDouble4D &dtdx_4d = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D &dtdy_4d = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D &dtdz_4d = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceZ"));
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+    RDouble3D &vol = *(grid->GetCellVolume());
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, 1, I, J, K);
+
+    int ndim = GetDim();
+
+    int index[] = { 1,2,3,1,2 };
+
+    int ns1 = nsurf;
+    int ns2 = index[nsurf];
+    int ns3 = index[nsurf + 1];
+
+    int il1 = 0;
+    int il2 = 0;
+    int il3 = 0;
+    int jl1 = 0;
+    int jl2 = 0;
+    int jl3 = 0;
+    int kl1 = 0;
+    int kl2 = 0;
+    int kl3 = 0;
+
+    if (nsurf == 1)
+    {
+        il1 = 1;
+        jl2 = 1;
+        kl3 = 1;
+    }
+    else if (nsurf == 2)
+    {
+        jl1 = 1;
+        kl2 = 1;
+        il3 = 1;
+    }
+    else if (nsurf == 3)
+    {
+        kl1 = 1;
+        il2 = 1;
+        jl3 = 1;
+    }
+
+    Range M(mst, med);
+
+    dqdx_4d = 0.0;
+    dqdy_4d = 0.0;
+    dqdz_4d = 0.0;
+
+    dtdx_4d = 0.0;
+    dtdy_4d = 0.0;
+    dtdz_4d = 0.0;
+
+    Range IW, JW, KW;
+    GetRange(ni, nj, nk, -2, 1, IW, JW, KW);
+
+    RDouble3D worksx(IW, JW, KW, fortranArray);
+    RDouble3D worksy(IW, JW, KW, fortranArray);
+    RDouble3D worksz(IW, JW, KW, fortranArray);
+    RDouble3D worksx1(IW, JW, KW, fortranArray);
+    RDouble3D worksy1(IW, JW, KW, fortranArray);
+    RDouble3D worksz1(IW, JW, KW, fortranArray);
+    RDouble3D workqm(IW, JW, KW, fortranArray);
+    RDouble3D worktm(IW, JW, KW, fortranArray);
+
+    worksx(I, J, K) = xfv(I, J, K, ns1) + xfv(I - il1, J - jl1, K - kl1, ns1);
+    worksy(I, J, K) = yfv(I, J, K, ns1) + yfv(I - il1, J - jl1, K - kl1, ns1);
+    worksz(I, J, K) = zfv(I, J, K, ns1) + zfv(I - il1, J - jl1, K - kl1, ns1);
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        dqdx_4d(I, J, K, m) = -worksx(I, J, K) * q_4d(I - il1, J - jl1, K - kl1, m);
+        dqdy_4d(I, J, K, m) = -worksy(I, J, K) * q_4d(I - il1, J - jl1, K - kl1, m);
+        dqdz_4d(I, J, K, m) = -worksz(I, J, K) * q_4d(I - il1, J - jl1, K - kl1, m);
+    }
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        dqdx_4d(I - il1, J - jl1, K - kl1, m) += worksx(I, J, K) * q_4d(I - il1, J - jl1, K - kl1, m);
+        dqdy_4d(I - il1, J - jl1, K - kl1, m) += worksy(I, J, K) * q_4d(I - il1, J - jl1, K - kl1, m);
+        dqdz_4d(I - il1, J - jl1, K - kl1, m) += worksz(I, J, K) * q_4d(I - il1, J - jl1, K - kl1, m);
+    }
+
+    for (int m = mtst; m <= mted; ++ m)
+    {
+        dtdx_4d(I, J, K, m) = -worksx(I, J, K) * t_4d(I - il1, J - jl1, K - kl1, m);
+        dtdy_4d(I, J, K, m) = -worksy(I, J, K) * t_4d(I - il1, J - jl1, K - kl1, m);
+        dtdz_4d(I, J, K, m) = -worksz(I, J, K) * t_4d(I - il1, J - jl1, K - kl1, m);
+    }
+
+    for (int m = mtst; m <= mted; ++ m)
+    {
+        dtdx_4d(I - il1, J - jl1, K - kl1, m) += worksx(I, J, K) * t_4d(I - il1, J - jl1, K - kl1, m);
+        dtdy_4d(I - il1, J - jl1, K - kl1, m) += worksy(I, J, K) * t_4d(I - il1, J - jl1, K - kl1, m);
+        dtdz_4d(I - il1, J - jl1, K - kl1, m) += worksz(I, J, K) * t_4d(I - il1, J - jl1, K - kl1, m);
+    }
+
+    if ((nsurf != 2) || (ndim != TWO_D))
+    {
+        worksx(I, J, K) = xfv(I, J, K, ns2) + xfv(I - il1, J - jl1, K - kl1, ns2);
+        worksy(I, J, K) = yfv(I, J, K, ns2) + yfv(I - il1, J - jl1, K - kl1, ns2);
+        worksz(I, J, K) = zfv(I, J, K, ns2) + zfv(I - il1, J - jl1, K - kl1, ns2);
+
+        for (int m = mst; m <= med; ++ m)
+        {
+            workqm(I, J, K) = fourth * (q_4d(I, J, K, m) + q_4d(I - il1, J - jl1, K - kl1, m) + q_4d(I - il2, J - jl2, K - kl2, m) + q_4d(I - il1 - il2, J - jl1 - jl2, K - kl1 - kl2, m));
+            dqdx_4d(I, J, K, m) -= worksx(I, J, K) * workqm(I, J, K);
+            dqdy_4d(I, J, K, m) -= worksy(I, J, K) * workqm(I, J, K);
+            dqdz_4d(I, J, K, m) -= worksz(I, J, K) * workqm(I, J, K);
+
+            dqdx_4d(I - il2, J - jl2, K - kl2, m) += worksx(I, J, K) * workqm(I, J, K);
+            dqdy_4d(I - il2, J - jl2, K - kl2, m) += worksy(I, J, K) * workqm(I, J, K);
+            dqdz_4d(I - il2, J - jl2, K - kl2, m) += worksz(I, J, K) * workqm(I, J, K);
+        }
+
+        for (int m = mtst; m <= mted; ++ m)
+        {
+            worktm(I, J, K) = fourth * (t_4d(I, J, K, m) + t_4d(I - il1, J - jl1, K - kl1, m) + t_4d(I - il2, J - jl2, K - kl2, m) + t_4d(I - il1 - il2, J - jl1 - jl2, K - kl1 - kl2, m));
+            dtdx_4d(I, J, K, m) -= worksx(I, J, K) * worktm(I, J, K);
+            dtdy_4d(I, J, K, m) -= worksy(I, J, K) * worktm(I, J, K);
+            dtdz_4d(I, J, K, m) -= worksz(I, J, K) * worktm(I, J, K);
+
+            dtdx_4d(I - il2, J - jl2, K - kl2, m) += worksx(I, J, K) * worktm(I, J, K);
+            dtdy_4d(I - il2, J - jl2, K - kl2, m) += worksy(I, J, K) * worktm(I, J, K);
+            dtdz_4d(I - il2, J - jl2, K - kl2, m) += worksz(I, J, K) * worktm(I, J, K);
+        }
+    }
+
+    if ((nsurf != 1) || (ndim != TWO_D))
+    {
+        worksx(I, J, K) = xfv(I, J, K, ns3) + xfv(I - il1, J - jl1, K - kl1, ns3);
+        worksy(I, J, K) = yfv(I, J, K, ns3) + yfv(I - il1, J - jl1, K - kl1, ns3);
+        worksz(I, J, K) = zfv(I, J, K, ns3) + zfv(I - il1, J - jl1, K - kl1, ns3);
+
+        for (int m = mst; m <= med; ++ m)
+        {
+            workqm(I, J, K) = fourth * (q_4d(I, J, K, m) + q_4d(I - il1, J - jl1, K - kl1, m) + q_4d(I - il3, J - jl3, K - kl3, m) + q_4d(I - il1 - il3, J - jl1 - jl3, K - kl1 - kl3, m));
+            dqdx_4d(I, J, K, m) -= worksx(I, J, K) * workqm(I, J, K);
+            dqdy_4d(I, J, K, m) -= worksy(I, J, K) * workqm(I, J, K);
+            dqdz_4d(I, J, K, m) -= worksz(I, J, K) * workqm(I, J, K);
+
+            dqdx_4d(I - il3, J - jl3, K - kl3, m) += worksx(I, J, K) * workqm(I, J, K);
+            dqdy_4d(I - il3, J - jl3, K - kl3, m) += worksy(I, J, K) * workqm(I, J, K);
+            dqdz_4d(I - il3, J - jl3, K - kl3, m) += worksz(I, J, K) * workqm(I, J, K);
+        }
+
+        for (int m = mtst; m <= mted; ++ m)
+        {
+            worktm(I, J, K) = fourth * (t_4d(I, J, K, m) + t_4d(I - il1, J - jl1, K - kl1, m) + t_4d(I - il3, J - jl3, K - kl3, m) + t_4d(I - il1 - il3, J - jl1 - jl3, K - kl1 - kl3, m));
+            dtdx_4d(I, J, K, m) -= worksx(I, J, K) * worktm(I, J, K);
+            dtdy_4d(I, J, K, m) -= worksy(I, J, K) * worktm(I, J, K);
+            dtdz_4d(I, J, K, m) -= worksz(I, J, K) * worktm(I, J, K);
+
+            dtdx_4d(I - il3, J - jl3, K - kl3, m) += worksx(I, J, K) * worktm(I, J, K);
+            dtdy_4d(I - il3, J - jl3, K - kl3, m) += worksy(I, J, K) * worktm(I, J, K);
+            dtdz_4d(I - il3, J - jl3, K - kl3, m) += worksz(I, J, K) * worktm(I, J, K);
+        }
+    }
+
+    Range I0(1, ni);
+    Range J0(1, nj);
+    Range K0(1, nk);
+
+    workqm(I0, J0, K0) = 1.0 / (vol(I0, J0, K0) + vol(I0 - il1, J0 - jl1, K0 - kl1));
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        dqdx_4d(I0, J0, K0, m) *= workqm(I0, J0, K0);
+        dqdy_4d(I0, J0, K0, m) *= workqm(I0, J0, K0);
+        dqdz_4d(I0, J0, K0, m) *= workqm(I0, J0, K0);
+    }
+
+    for (int m = mtst; m <= mted; ++ m)
+    {
+        dtdx_4d(I0, J0, K0, m) *= workqm(I0, J0, K0);
+        dtdy_4d(I0, J0, K0, m) *= workqm(I0, J0, K0);
+        dtdz_4d(I0, J0, K0, m) *= workqm(I0, J0, K0);
+    }
+}
+
+void NSSolverStruct::ReconGradVolWeightedwithCorrection(Grid *gridIn, int nSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &primitiveVaiables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperature = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    RDouble4D &gradPrimtiveVarFaceX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D &gradPrimtiveVarFaceY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D &gradPrimtiveVarFaceZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+    gradPrimtiveVarFaceX = 0.0;
+    gradPrimtiveVarFaceY = 0.0;
+    gradPrimtiveVarFaceZ = 0.0;
+
+    RDouble4D &gradTemperatureFaceX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D &gradTemperatureFaceY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D &gradTemperatureFaceZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceZ"));
+    gradTemperatureFaceX = 0.0;
+    gradTemperatureFaceY = 0.0;
+    gradTemperatureFaceZ = 0.0;
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSNumber = parameters->GetNSEquationNumber();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble4D *gradSpeciesCellCenterX = 0, *gradSpeciesCellCenterY = 0, *gradSpeciesCellCenterZ = 0;
+    if (nChemical > 0 && nSpeciesNumber)
+    {
+        gradSpeciesCellCenterX = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdx"));
+        gradSpeciesCellCenterY = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdy"));
+        gradSpeciesCellCenterZ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdz"));
+    }
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+    RDouble3D &vol = *(grid->GetCellVolume());
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, nSurface);
+
+    Range I(1, ni - 1 + il1);
+    Range J(1, nj - 1 + jl1);
+    Range K(1, nk - 1 + kl1);
+    if (nk == 1)
+    {
+        K.setRange(1, 1);
+    }
+
+    int nIndex = 0;
+    //! Compute gradient of velocity.
+    for (int m = 1; m <= 3; ++ m)
+    {
+        nIndex = m - 1;
+        gradPrimtiveVarFaceX(I, J, K, m) = vol(I, J, K) * gradUVWTCellCenterX(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * gradUVWTCellCenterX(I - il1, J - jl1, K - kl1, nIndex);
+        gradPrimtiveVarFaceY(I, J, K, m) = vol(I, J, K) * gradUVWTCellCenterY(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * gradUVWTCellCenterY(I - il1, J - jl1, K - kl1, nIndex);
+        gradPrimtiveVarFaceZ(I, J, K, m) = vol(I, J, K) * gradUVWTCellCenterZ(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * gradUVWTCellCenterZ(I - il1, J - jl1, K - kl1, nIndex);
+
+        gradPrimtiveVarFaceX(I, J, K, m) = gradPrimtiveVarFaceX(I, J, K, m) + (xfv(I, J, K, nSurface) * (primitiveVaiables(I, J, K, m) - primitiveVaiables(I - il1, J - jl1, K - kl1, m)) - 0.5 * xfv(I + il1, J + jl1, K + kl1, nSurface) * (primitiveVaiables(I + il1, J + jl1, K + kl1, m) - primitiveVaiables(I, J, K, m)) - 0.5 * xfv(I - il1, J - jl1, K - kl1, nSurface) * (primitiveVaiables(I - il1, J - jl1, K - kl1, m) - primitiveVaiables(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+        gradPrimtiveVarFaceY(I, J, K, m) = gradPrimtiveVarFaceY(I, J, K, m) + (yfv(I, J, K, nSurface) * (primitiveVaiables(I, J, K, m) - primitiveVaiables(I - il1, J - jl1, K - kl1, m)) - 0.5 * yfv(I + il1, J + jl1, K + kl1, nSurface) * (primitiveVaiables(I + il1, J + jl1, K + kl1, m) - primitiveVaiables(I, J, K, m)) - 0.5 * yfv(I - il1, J - jl1, K - kl1, nSurface) * (primitiveVaiables(I - il1, J - jl1, K - kl1, m) - primitiveVaiables(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+        gradPrimtiveVarFaceZ(I, J, K, m) = gradPrimtiveVarFaceZ(I, J, K, m) + (zfv(I, J, K, nSurface) * (primitiveVaiables(I, J, K, m) - primitiveVaiables(I - il1, J - jl1, K - kl1, m)) - 0.5 * zfv(I + il1, J + jl1, K + kl1, nSurface) * (primitiveVaiables(I + il1, J + jl1, K + kl1, m) - primitiveVaiables(I, J, K, m)) - 0.5 * zfv(I - il1, J - jl1, K - kl1, nSurface) * (primitiveVaiables(I - il1, J - jl1, K - kl1, m) - primitiveVaiables(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+
+        gradPrimtiveVarFaceX(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+        gradPrimtiveVarFaceY(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+        gradPrimtiveVarFaceZ(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+    }
+
+    //! Compute gradient of temperature.
+    for (int m = 0; m < nTemperatureModel; ++ m)
+    {
+        nIndex = m + 3;
+        gradTemperatureFaceX(I, J, K, m) = vol(I, J, K) * gradUVWTCellCenterX(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * gradUVWTCellCenterX(I - il1, J - jl1, K - kl1, nIndex);
+        gradTemperatureFaceY(I, J, K, m) = vol(I, J, K) * gradUVWTCellCenterY(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * gradUVWTCellCenterY(I - il1, J - jl1, K - kl1, nIndex);
+        gradTemperatureFaceZ(I, J, K, m) = vol(I, J, K) * gradUVWTCellCenterZ(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * gradUVWTCellCenterZ(I - il1, J - jl1, K - kl1, nIndex);
+
+        gradTemperatureFaceX(I, J, K, m) = gradTemperatureFaceX(I, J, K, m) + (xfv(I, J, K, nSurface) * (temperature(I, J, K, m) - temperature(I - il1, J - jl1, K - kl1, m)) - 0.5 * xfv(I + il1, J + jl1, K + kl1, nSurface) * (temperature(I + il1, J + jl1, K + kl1, m) - temperature(I, J, K, m)) - 0.5 * xfv(I - il1, J - jl1, K - kl1, nSurface) * (temperature(I - il1, J - jl1, K - kl1, m) - temperature(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+        gradTemperatureFaceY(I, J, K, m) = gradTemperatureFaceY(I, J, K, m) + (yfv(I, J, K, nSurface) * (temperature(I, J, K, m) - temperature(I - il1, J - jl1, K - kl1, m)) - 0.5 * yfv(I + il1, J + jl1, K + kl1, nSurface) * (temperature(I + il1, J + jl1, K + kl1, m) - temperature(I, J, K, m)) - 0.5 * yfv(I - il1, J - jl1, K - kl1, nSurface) * (temperature(I - il1, J - jl1, K - kl1, m) - temperature(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+        gradTemperatureFaceZ(I, J, K, m) = gradTemperatureFaceZ(I, J, K, m) + (zfv(I, J, K, nSurface) * (temperature(I, J, K, m) - temperature(I - il1, J - jl1, K - kl1, m)) - 0.5 * zfv(I + il1, J + jl1, K + kl1, nSurface) * (temperature(I + il1, J + jl1, K + kl1, m) - temperature(I, J, K, m)) - 0.5 * zfv(I - il1, J - jl1, K - kl1, nSurface) * (temperature(I - il1, J - jl1, K - kl1, m) - temperature(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+
+        gradTemperatureFaceX(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+        gradTemperatureFaceY(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+        gradTemperatureFaceZ(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+    }
+
+    //! Compute gradient of species.
+    if (nChemical > 0)
+    {
+        for (int m = nNSNumber; m < nNSNumber + nSpeciesNumber; ++ m)
+        {
+            nIndex = m - nNSNumber;
+            gradPrimtiveVarFaceX(I, J, K, m) = vol(I, J, K) * (*gradSpeciesCellCenterX)(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * (*gradSpeciesCellCenterX)(I - il1, J - jl1, K - kl1, nIndex);
+            gradPrimtiveVarFaceY(I, J, K, m) = vol(I, J, K) * (*gradSpeciesCellCenterY)(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * (*gradSpeciesCellCenterY)(I - il1, J - jl1, K - kl1, nIndex);
+            gradPrimtiveVarFaceZ(I, J, K, m) = vol(I, J, K) * (*gradSpeciesCellCenterZ)(I, J, K, nIndex) + vol(I - il1, J - jl1, K - kl1) * (*gradSpeciesCellCenterZ)(I - il1, J - jl1, K - kl1, nIndex);
+
+            gradPrimtiveVarFaceX(I, J, K, m) = gradPrimtiveVarFaceX(I, J, K, m) + (xfv(I, J, K, nSurface) * (primitiveVaiables(I, J, K, m) - primitiveVaiables(I - il1, J - jl1, K - kl1, m)) - 0.5 * xfv(I + il1, J + jl1, K + kl1, nSurface) * (primitiveVaiables(I + il1, J + jl1, K + kl1, m) - primitiveVaiables(I, J, K, m)) - 0.5 * xfv(I - il1, J - jl1, K - kl1, nSurface) * (primitiveVaiables(I - il1, J - jl1, K - kl1, m) - primitiveVaiables(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+            gradPrimtiveVarFaceY(I, J, K, m) = gradPrimtiveVarFaceY(I, J, K, m) + (yfv(I, J, K, nSurface) * (primitiveVaiables(I, J, K, m) - primitiveVaiables(I - il1, J - jl1, K - kl1, m)) - 0.5 * yfv(I + il1, J + jl1, K + kl1, nSurface) * (primitiveVaiables(I + il1, J + jl1, K + kl1, m) - primitiveVaiables(I, J, K, m)) - 0.5 * yfv(I - il1, J - jl1, K - kl1, nSurface) * (primitiveVaiables(I - il1, J - jl1, K - kl1, m) - primitiveVaiables(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+            gradPrimtiveVarFaceZ(I, J, K, m) = gradPrimtiveVarFaceZ(I, J, K, m) + (zfv(I, J, K, nSurface) * (primitiveVaiables(I, J, K, m) - primitiveVaiables(I - il1, J - jl1, K - kl1, m)) - 0.5 * zfv(I + il1, J + jl1, K + kl1, nSurface) * (primitiveVaiables(I + il1, J + jl1, K + kl1, m) - primitiveVaiables(I, J, K, m)) - 0.5 * zfv(I - il1, J - jl1, K - kl1, nSurface) * (primitiveVaiables(I - il1, J - jl1, K - kl1, m) - primitiveVaiables(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, m)));
+
+            gradPrimtiveVarFaceX(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+            gradPrimtiveVarFaceY(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+            gradPrimtiveVarFaceZ(I, J, K, m) /= (vol(I, J, K) + vol(I - il1, J - jl1, K - kl1));
+        }
+    }
+
+    GetGradientAtFace_CorrectionAtPhysicalBoundary(grid, nSurface);
+}
+
+void NSSolverStruct::GetGradientAtFace_CorrectionAtPhysicalBoundary(Grid *gridin, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridin);
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    // printf("xfn is %f", xfn);
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    RDouble3D &vol = *(grid->GetCellVolume());
+    
+    RDouble4D &gradPrimtiveVarFaceX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D &gradPrimtiveVarFaceY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D &gradPrimtiveVarFaceZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+
+    RDouble4D &gradTemperatureFaceX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D &gradTemperatureFaceY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D &gradTemperatureFaceZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceZ"));
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    int nNSNumber = parameters->GetNSEquationNumber();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble4D *gradSpeciesCellCenterX = 0, *gradSpeciesCellCenterY = 0, *gradSpeciesCellCenterZ = 0;
+    int nViscosityFluxSublevelModified = parameters->GetnViscosityFluxSublevelModified();
+    if (nChemical > 0 && nSpeciesNumber)
+    {
+        gradSpeciesCellCenterX = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdx"));
+        gradSpeciesCellCenterY = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdy"));
+        gradSpeciesCellCenterZ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dcdz"));
+    }
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    
+    int nBCRegion = structBCSet->GetnBCRegion();
+    
+    using namespace PHENGLEI;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = bcregion->GetBCType();
+        int nsurf_bc = bcregion->GetFaceDirection() + 1;
+
+        if (IsInterface(BCType) || nsurf_bc != iSurface)
+        {
+            continue;
+        }
+
+        else if (IsWall(BCType) || BCType == PHENGLEI::ABLATION_SURFACE)
+        {
+            int ist, ied, jst, jed, kst, ked;
+            bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+            int il1, jl1, kl1;
+            grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+            int leftOrRightIndex = bcregion->GetFaceLeftOrRightIndex();  //! left -1; right 1.
+
+            RDouble nx, ny, nz, vhalf, f_kc_et_ct;
+
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int ibc1, jbc1, kbc1;
+                        bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                        nx = xfv(ibc1, jbc1, kbc1, iSurface);
+                        ny = yfv(ibc1, jbc1, kbc1, iSurface);
+                        nz = zfv(ibc1, jbc1, kbc1, iSurface);
+
+                        //! Modify the gradient of velocity.
+                        for (int m = 1; m <= 3; ++ m)
+                        {
+                            f_kc_et_ct = q(ibc1, jbc1, kbc1, m) - q(ibc1 - il1, jbc1 - jl1, kbc1 - kl1, m);
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, m) = nx * f_kc_et_ct / vol(i, j, k);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, m) = ny * f_kc_et_ct / vol(i, j, k);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, m) = nz * f_kc_et_ct / vol(i, j, k);
+                        }
+
+                        //! Modify the gradient of temperature.
+                        for (int m = 0; m < nTemperatureModel; ++ m)
+                        {
+                            f_kc_et_ct = t(ibc1, jbc1, kbc1, m) - t(ibc1 - il1, jbc1 - jl1, kbc1 - kl1, m);
+                            gradTemperatureFaceX(ibc1, jbc1, kbc1, m) = nx * f_kc_et_ct / vol(i, j, k);
+                            gradTemperatureFaceY(ibc1, jbc1, kbc1, m) = ny * f_kc_et_ct / vol(i, j, k);
+                            gradTemperatureFaceZ(ibc1, jbc1, kbc1, m) = nz * f_kc_et_ct / vol(i, j, k);
+                        }
+
+                        if (nChemical == 0)
+                        {
+                            continue;
+                        }
+                        //! Modify the gradient of species.
+                        for (int m = nNSNumber; m < nNSNumber + nSpeciesNumber; ++ m)
+                        {
+                            f_kc_et_ct = q(ibc1, jbc1, kbc1, m) - q(ibc1 - il1, jbc1 - jl1, kbc1 - kl1, m);
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, m) = nx * f_kc_et_ct / vol(i, j, k);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, m) = ny * f_kc_et_ct / vol(i, j, k);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, m) = nz * f_kc_et_ct / vol(i, j, k);
+                        }
+
+                        if (nViscosityFluxSublevelModified == 0)
+                        {
+                            continue;
+                        }
+
+                        ibc1 = ibc1 - il1 * leftOrRightIndex;
+                        jbc1 = jbc1 - jl1 * leftOrRightIndex;
+                        kbc1 = kbc1 - kl1 * leftOrRightIndex;
+
+                        vhalf = 2.0 / (vol(ibc1, jbc1, kbc1) + vol(ibc1 - il1, jbc1 - jl1, kbc1 - kl1));
+                        //vhalf = 1.0 / vol(i,j,k);
+
+                        nx = xfv(ibc1, jbc1, kbc1, iSurface) * vhalf;
+                        ny = yfv(ibc1, jbc1, kbc1, iSurface) * vhalf;
+                        nz = zfv(ibc1, jbc1, kbc1, iSurface) * vhalf;
+
+
+                        //! Modify the gradient of velocity.
+                        for (int m = 1; m <= 3; ++ m)
+                        {
+                            f_kc_et_ct = q(ibc1, jbc1, kbc1, m) - q(ibc1 - il1, jbc1 - jl1, kbc1 - kl1, m);
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, m) = nx * f_kc_et_ct;
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, m) = ny * f_kc_et_ct;
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, m) = nz * f_kc_et_ct;
+                        }
+
+                        //! Modify the gradient of temperature.
+                        for (int m = 0; m < nTemperatureModel; ++ m)
+                        {
+                            f_kc_et_ct = t(ibc1, jbc1, kbc1, m) - t(ibc1 - il1, jbc1 - jl1, kbc1 - kl1, m);
+                            gradTemperatureFaceX(ibc1, jbc1, kbc1, m) = nx * f_kc_et_ct;
+                            gradTemperatureFaceY(ibc1, jbc1, kbc1, m) = ny * f_kc_et_ct;
+                            gradTemperatureFaceZ(ibc1, jbc1, kbc1, m) = nz * f_kc_et_ct;
+                        }
+
+                        //! Modify the gradient of species.
+                        for (int m = nNSNumber; m < nNSNumber + nSpeciesNumber; ++ m)
+                        {
+                            f_kc_et_ct = q(ibc1, jbc1, kbc1, m) - q(ibc1 - il1, jbc1 - jl1, kbc1 - kl1, m);
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, m) = nx * f_kc_et_ct;
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, m) = ny * f_kc_et_ct;
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, m) = nz * f_kc_et_ct;
+                        }
+                    }
+                }
+            }
+        }
+
+        else if (BCType == SYMMETRY)
+        {
+            RDouble xfnSign;
+            RDouble yfnSign;
+            RDouble zfnSign;
+
+            int ist, ied, jst, jed, kst, ked;
+            bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+            xfnSign = ABS(xfn(ist, jst, kst, iSurface)) - 0.1;
+            yfnSign = ABS(yfn(ist, jst, kst, iSurface)) - 0.1;
+            zfnSign = ABS(zfn(ist, jst, kst, iSurface)) - 0.1;
+
+            if (xfnSign > 0.0) //! For Y-Z symmetry plane
+            {
+                for (int k = kst; k <= ked; ++ k)
+                {
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        for (int i = ist; i <= ied; ++ i)
+                        {
+                            int ibc1, jbc1, kbc1;
+                            bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 1) = gradUVWTCellCenterX(i, j, k, 0);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 1) = 0.0;
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 1) = 0.0;
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 2) = 0.0;
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 2) = gradUVWTCellCenterY(i, j, k, 1);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 2) = gradUVWTCellCenterZ(i, j, k, 1);
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 3) = 0.0;
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 3) = gradUVWTCellCenterY(i, j, k, 2);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 3) = gradUVWTCellCenterZ(i, j, k, 2);
+
+                            //! Modify the gradient of temperature.
+                            for (int it = 0; it < nTemperatureModel; ++ it)
+                            {
+                                gradTemperatureFaceX(ibc1, jbc1, kbc1, it) = 0.0;
+                                gradTemperatureFaceY(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterY(i, j, k, it + 3);
+                                gradTemperatureFaceZ(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterZ(i, j, k, it + 3);
+                            }
+
+                            if (nChemical == 0)
+                            {
+                                continue;
+                            }
+                            //! Modify the gradient of species.
+                            for (int s = nNSNumber; s < nNSNumber + nSpeciesNumber; ++ s)
+                            {
+                                gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, s) = 0.0;
+                                gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterY)(i, j, k, s - nNSNumber);
+                                gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterZ)(i, j, k, s - nNSNumber);
+                            }
+
+                        }
+                    }
+                }
+            }
+
+            if (yfnSign > 0.0) //! For X-Z symmetry plane
+            {
+                for (int k = kst; k <= ked; ++ k)
+                {
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        for (int i = ist; i <= ied; ++ i)
+                        {
+                            int ibc1, jbc1, kbc1;
+                            bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 1) = gradUVWTCellCenterX(i, j, k, 0);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 1) = 0.0;
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 1) = gradUVWTCellCenterZ(i, j, k, 0);
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 2) = 0.0;
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 2) = gradUVWTCellCenterY(i, j, k, 1);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 2) = 0.0;
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 3) = gradUVWTCellCenterX(i, j, k, 2);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 3) = 0.0;
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 3) = gradUVWTCellCenterZ(i, j, k, 2);
+
+                            //! Modify the gradient of temperature.
+                            for (int it = 0; it < nTemperatureModel; ++ it)
+                            {
+                                gradTemperatureFaceX(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterX(i, j, k, it + 3);
+                                gradTemperatureFaceY(ibc1, jbc1, kbc1, it) = 0.0;
+                                gradTemperatureFaceZ(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterZ(i, j, k, it + 3);
+                            }
+
+                            if (nChemical == 0)
+                            {
+                                continue;
+                            }
+                            //! Modify the gradient of species.
+                            for (int s = nNSNumber; s < nNSNumber + nSpeciesNumber; ++ s)
+                            {
+                                gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterX)(i, j, k, s - nNSNumber);
+                                gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, s) = 0.0;
+                                gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterZ)(i, j, k, s - nNSNumber);
+                            }
+
+                        }
+                    }
+                }
+            }
+
+            if (zfnSign > 0.0) //! For X-Y symmetry plane
+            {
+                for (int k = kst; k <= ked; ++ k)
+                {
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        for (int i = ist; i <= ied; ++ i)
+                        {
+                            int ibc1, jbc1, kbc1;
+                            bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 1) = gradUVWTCellCenterX(i, j, k, 0);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 1) = gradUVWTCellCenterY(i, j, k, 0);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 1) = 0.0;
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 2) = gradUVWTCellCenterX(i, j, k, 1);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 2) = gradUVWTCellCenterY(i, j, k, 1);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 2) = 0.0;
+
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, 3) = 0.0;
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, 3) = 0.0;
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, 3) = gradUVWTCellCenterZ(i, j, k, 2);
+
+                            //! Modify the gradient of temperature.
+                            for (int it = 0; it < nTemperatureModel; ++ it)
+                            {
+                                gradTemperatureFaceX(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterX(i, j, k, it + 3);
+                                gradTemperatureFaceY(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterY(i, j, k, it + 3);
+                                gradTemperatureFaceZ(ibc1, jbc1, kbc1, it) = 0.0;
+                            }
+
+                            if (nChemical == 0)
+                            {
+                                continue;
+                            }
+                            //! Modify the gradient of species.
+                            for (int s = nNSNumber; s < nNSNumber + nSpeciesNumber; ++ s)
+                            {
+                                gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterX)(i, j, k, s - nNSNumber);
+                                gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterY)(i, j, k, s - nNSNumber);
+                                gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, s) = 0.0;
+                            }
+
+                        }
+                    }
+                }
+            }
+        }
+        else //! Other boundary conditions.
+        {
+            int ist, ied, jst, jed, kst, ked;
+            bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int ibc1, jbc1, kbc1;
+                        bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                        for (int m = 1; m <= 3; ++ m)
+                        {
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, m) = gradUVWTCellCenterX(i, j, k, m - 1);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, m) = gradUVWTCellCenterY(i, j, k, m - 1);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, m) = gradUVWTCellCenterZ(i, j, k, m - 1);
+                        }
+
+                        //! Modify the gradient of temperature.
+                        for (int it = 0; it < nTemperatureModel; ++ it)
+                        {
+                            gradTemperatureFaceX(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterX(i, j, k, it + 3);
+                            gradTemperatureFaceY(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterY(i, j, k, it + 3);
+                            gradTemperatureFaceZ(ibc1, jbc1, kbc1, it) = gradUVWTCellCenterZ(i, j, k, it + 3);
+                        }
+
+                        if (nChemical == 0)
+                        {
+                            continue;
+                        }
+                        //! Modify the gradient of species.
+                        for (int s = nNSNumber; s < nNSNumber + nSpeciesNumber; ++ s)
+                        {
+                            gradPrimtiveVarFaceX(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterX)(i, j, k, s - nNSNumber);
+                            gradPrimtiveVarFaceY(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterY)(i, j, k, s - nNSNumber);
+                            gradPrimtiveVarFaceZ(ibc1, jbc1, kbc1, s) = (*gradSpeciesCellCenterZ)(i, j, k, s - nNSNumber);
+                        }
+
+                    }
+                }
+            }
+
+        }
+    }
+}
+
+void NSSolverStruct::CompVisFlux(Grid *gridIn, FieldProxy *fluxProxy, int nSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &gradqx = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D &gradqy = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D &gradqz = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+
+    RDouble4D &gradtx = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D &gradty = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D &gradtz = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceZ"));
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int nElectronIndex = parameters->GetIndexOfElectron();
+
+    RDouble refGama = parameters->GetRefGama();
+
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int nrokplus = GlobalDataBase::GetIntParaFromDB("nrokplus");
+
+    RDouble4D *q_turb = 0, *aniss = 0;
+    if (nrokplus > 0)
+    {
+        q_turb = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_turb"));
+        aniss = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("aniss"));
+    }
+
+    RDouble nx = 0, ny = 0, nz = 0;
+    RDouble qx = 0, qy = 0, qz = 0, qvex = 0, qvey = 0, qvez = 0;
+
+    RDouble um = 0, vm = 0, wm = 0, tm = 0, tvm = 0, tem = 0;
+
+    RDouble mul = 0, mut = 0, vis = 0, divv2p3 = 0;
+    RDouble txx = 0, tyy = 0, tzz = 0;
+    RDouble txy = 0, txz = 0, tyz = 0;
+
+    RDouble dudx = 0, dudy = 0, dudz = 0;
+    RDouble dvdx = 0, dvdy = 0, dvdz = 0;
+    RDouble dwdx = 0, dwdy = 0, dwdz = 0;
+    RDouble dtdx = 0, dtdy = 0, dtdz = 0;
+
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+    RDouble kcp = 0.0, kv = 0.0, ke = 0.0;      //! The heat conductivity.
+
+    RDouble *qlr = new RDouble[nEquation]();
+    RDouble *dfsdx = new RDouble[numberOfSpecies]();
+    RDouble *dfsdy = new RDouble[numberOfSpecies]();
+    RDouble *dfsdz = new RDouble[numberOfSpecies]();
+    RDouble *fvis = new RDouble[nEquation]();
+    RDouble *work = new RDouble[nEquation]();
+
+    int iFaceStart = 0, iFaceEnd = 0, jFaceStart = 0, jFaceEnd = 0, kFaceStart = 0, kFaceEnd = 0;
+    grid->GetFaceIterationIndex(iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd, nSurface);
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, nSurface);
+
+    using namespace IDX;
+
+    for (int k = kFaceStart; k <= kFaceEnd; ++ k)
+    {
+        for (int j = jFaceStart; j <= jFaceEnd; ++ j)
+        {
+            for (int i = iFaceStart; i <= iFaceEnd; ++ i)
+            {
+                int il, jl, kl;
+                grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                //! Note that if we use iSurface,there must be no omission.
+                nx = xfv(il, jl, kl, nSurface);
+                ny = yfv(il, jl, kl, nSurface);
+                nz = zfv(il, jl, kl, nSurface);
+
+                um = half * (q(il, jl, kl, IU) + q(i, j, k, IU));
+                vm = half * (q(il, jl, kl, IV) + q(i, j, k, IV));
+                wm = half * (q(il, jl, kl, IW) + q(i, j, k, IW));
+                tm = half * (t(il, jl, kl, ITT) + t(i, j, k, ITT));
+
+                if (nTemperatureModel == 1)
+                {
+                    tvm = tm;  tem = tm;
+                }
+                else if (nTemperatureModel == 2)
+                {
+                    tvm = half * (t(il, jl, kl, ITV) + t(i, j, k, ITV));
+                    tem = tvm;
+                }
+                else if (nTemperatureModel == 3)
+                {
+                    tvm = half * (t(il, jl, kl, ITV) + t(i, j, k, ITV));
+                    tem = half * (t(il, jl, kl, ITE) + t(i, j, k, ITE));
+                }
+
+                mul = half * (viscousLaminar(il, jl, kl) + viscousLaminar(i, j, k));
+                mut = half * (viscousTurbulence(il, jl, kl) + viscousTurbulence(i, j, k));
+                //mut = 0.0;
+                vis = mul + mut;
+
+                dudx = gradqx(il, jl, kl, IU);
+                dudy = gradqy(il, jl, kl, IU);
+                dudz = gradqz(il, jl, kl, IU);
+
+                dvdx = gradqx(il, jl, kl, IV);
+                dvdy = gradqy(il, jl, kl, IV);
+                dvdz = gradqz(il, jl, kl, IV);
+
+                dwdx = gradqx(il, jl, kl, IW);
+                dwdy = gradqy(il, jl, kl, IW);
+                dwdz = gradqz(il, jl, kl, IW);
+
+                dtdx = gradtx(il, jl, kl, ITT);
+                dtdy = gradty(il, jl, kl, ITT);
+                dtdz = gradtz(il, jl, kl, ITT);
+
+                qx = 0.0;
+                qy = 0.0;
+                qz = 0.0;
+
+                if (nChemical == 1)
+                {
+                    for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+                    {
+                        dfsdx[ispecies] = gradqx(il, jl, kl, nNSEquation + ispecies);
+                        dfsdy[ispecies] = gradqy(il, jl, kl, nNSEquation + ispecies);
+                        dfsdz[ispecies] = gradqz(il, jl, kl, nNSEquation + ispecies);
+                    }
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        qlr[m] = half * (q(il, jl, kl, m) + q(i, j, k, m));
+                    }
+
+                    gas->ComputeSpeciesMassDiffusionFlux(qlr, dfsdx, dfsdy, dfsdz, tm, tvm, tem, mul, mut, nx, ny, nz, qx, qy, qz, fvis);
+                    //! Compute the heat conductivity of multi-component gas.
+                    gas->ComputeMixtureGasHeatConductivity(qlr, tm, tvm, tem, kcp, kv, ke);
+                }
+
+                if (nChemical == 0)    //! Compute the heat conductivity of perfect gas.
+                {
+                    kcp = (mul * oPrandtlLaminar + mut * oPrandtlTurbulence) * specificHeatAtConstantPressure;
+                }
+
+                qx += kcp * dtdx;
+                qy += kcp * dtdy;
+                qz += kcp * dtdz;
+                if (nTemperatureModel == 2)
+                {
+                    qvex = (kv + ke) * gradtx(il, jl, kl, ITV);
+                    qvey = (kv + ke) * gradty(il, jl, kl, ITV);
+                    qvez = (kv + ke) * gradtz(il, jl, kl, ITV);
+                    fvis[nLaminar + nChemical] += (nx * qvex + ny * qvey + nz * qvez);
+                }
+                else if (nTemperatureModel == 3)
+                {
+                    qvex = kv * gradtx(il, jl, kl, ITV);
+                    qvey = kv * gradty(il, jl, kl, ITV);
+                    qvez = kv * gradtz(il, jl, kl, ITV);
+                    fvis[nLaminar + nChemical] += (nx * qvex + ny * qvey + nz * qvez);
+                    qx += qvex;
+                    qy += qvey;
+                    qz += qvez;
+
+                    qvex = ke * gradtx(il, jl, kl, ITE);
+                    qvey = ke * gradty(il, jl, kl, ITE);
+                    qvez = ke * gradtz(il, jl, kl, ITE);
+                    fvis[nLaminar + nChemical + 1] += (nx * qvex + ny * qvey + nz * qvez);
+                }
+                else
+                {
+                    qvex = 0.0;
+                    qvey = 0.0;
+                    qvez = 0.0;
+                }
+                qx += qvex;
+                qy += qvey;
+                qz += qvez;
+
+                divv2p3 = two3rd * (dudx + dvdy + dwdz);
+                //! Stress components.
+                txx = vis * (two * dudx - divv2p3);
+                tyy = vis * (two * dvdy - divv2p3);
+                tzz = vis * (two * dwdz - divv2p3);
+                txy = vis * (dudy + dvdx);
+                txz = vis * (dudz + dwdx);
+                tyz = vis * (dvdz + dwdy);
+
+                fvis[IDX::IR] = 0.0;
+                fvis[IDX::IRU] = nx * txx + ny * txy + nz * txz;
+                fvis[IDX::IRV] = nx * txy + ny * tyy + nz * tyz;
+                fvis[IDX::IRW] = nx * txz + ny * tyz + nz * tzz;
+                fvis[IDX::IRE] = um * fvis[IDX::IRU] + vm * fvis[IDX::IRV] + wm * fvis[IDX::IRW] + (nx * qx + ny * qy + nz * qz);
+
+                for (int m = 0; m < nLaminar; ++ m)
+                {
+                    flux(il, jl, kl, m) = -oRefReNumber * fvis[m];
+                }
+
+                for (int m = nLaminar + nChemical; m < nEquation; ++ m) //! Multi-temperature model.
+                {
+                    flux(il, jl, kl, m) = -oRefReNumber * fvis[m];
+                }
+
+                //! Modify the fluxes of the species whose transport equations need not to be computed.
+                if (nChemical == 1)
+                {
+                    flux(il, jl, kl, nLaminar) = 0.0;
+                    if (nElectronIndex >= 0)
+                    {
+                        flux(il, jl, kl, nLaminar - 1) = 0.0;
+                    }
+                }
+            }
+        }
+    }
+
+    delete[] fvis;     fvis = NULL;
+    delete[] work;     work = NULL;
+    delete[] qlr;      qlr = NULL;
+    delete[] dfsdx;    dfsdx = NULL;
+    delete[] dfsdy;    dfsdy = NULL;
+    delete[] dfsdz;    dfsdz = NULL;
+}
+
+void NSSolverStruct::CorrectViscousFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    //! Apply the original method, it is no need to modify the flux on wall.
+    if (nChemical == 0)
+    {
+        return;
+    }
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    int wallMultiTemperature = gas->GetwallMultiTemperature();
+   
+    //! The adiabatic wall applies the primary method.
+    if (wallMultiTemperature == 0 && wallTemperature < 0.0)
+    {
+        return;
+    }
+    //! Otherwise, to modify the viscous flux on wall.
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+
+    RDouble4D &faceVelocityX = *(grid->GetFaceVelocityX());
+    RDouble4D &faceVelocityY = *(grid->GetFaceVelocityY());
+    RDouble4D &faceVelocityZ = *(grid->GetFaceVelocityZ());
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+
+    RDouble4D &faceArea = *(grid->GetFaceArea());
+    RDouble3D &gridCellVolume = *(grid->GetCellVolume());
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble2D *surfaceTemperature = reinterpret_cast <RDouble2D *> (gridIn->GetDataPtr("surfaceTemperature"));
+    RDouble4D &faceFluxes = fluxProxy->GetField_STR();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    //! The number of species.
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nSpecies = nLaminar + nChemical - nNSEquation;
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    int viscousType = parameters->GetViscousType();
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble nondimensionalTemperatureWall = wallTemperature / refDimensionalTemperature;
+    RDouble gasConstant = gas->GetUniversalGasConstant();
+
+    //! The type of catalytic wall condition.
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();
+    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+    RDouble localSurfaceTemperature[3] = { nondimensionalTemperatureWall, nondimensionalTemperatureWall, nondimensionalTemperatureWall };
+
+    RDouble *wallVariables = new RDouble[nEquation]();    //! Save the variables on wall.
+    RDouble *wallFluxes = new RDouble[nEquation]();
+    RDouble *speciesEnthalpy = new RDouble[nSpecies]();
+    RDouble *densityDiffusivity = new RDouble[nSpecies]();
+    RDouble *vibrationEnergy = new RDouble[nSpecies]();   //! Save the internal energies of vibration.
+    RDouble *electronEnergy = new RDouble[nSpecies]();    //! Save the internal energies of electron.
+    RDouble3D *surfaceMassFraction = 0;
+    RDouble2D *injectionVelocity = 0;
+    if (nChemical > 0 && nSpecies > 0)         //! The fully catalytic condition.
+    {
+        surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+    }
+    int isInjection = GlobalDataBase::GetIntParaFromDB("isInjection");
+    if (isInjection == 1)
+    {
+        injectionVelocity = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("injectionVelocity"));
+    }
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (gridIn->GetDataPtr("surfaceSlipVariables"));
+    }
+
+    using namespace IDX;
+    //RDouble normalComponentX, normalComponentY, normalComponentZ, surfaceArea;
+    RDouble transportHeatFlux = 0, speciesHeatFlux = 0;
+    RDouble laminarViscosity = 0, turbulentViscosity = 0, viscosity = 0;
+    RDouble dudx = 0, dudy = 0, dudz = 0, dvdx = 0, dvdy = 0, dvdz = 0, dwdx = 0, dwdy = 0, dwdz = 0;
+    RDouble divv2p3 = 0, txx = 0, tyy = 0, tzz = 0, txy = 0, txz = 0, tyz = 0;
+
+    int indexOfWall = 0, indexOfCell = 0;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int nBCType = structBC->GetBCType();
+
+        if (!(IsWall(nBCType) && viscousType > INVISCID) && nBCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        Data_Param *bcParamDB = structBC->GetBCParamDataBase();
+        if (bcParamDB->IsExist("catalyticCoef", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("catalyticCoef", &catalyticCoef, PHDOUBLE, 1);
+        }
+
+        if (wallMultiTemperature == 1)
+        {
+            if (bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+            {
+                bcParamDB->GetData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+            }
+            else
+            {
+                wallTemperature = parameters->GetWallTemperature();
+            }
+
+            if (wallTemperature < 0.0)
+            {
+                return;
+            }
+
+            nondimensionalTemperatureWall = wallTemperature / refDimensionalTemperature;
+            localSurfaceTemperature[0] = nondimensionalTemperatureWall;
+            localSurfaceTemperature[1] = nondimensionalTemperatureWall;
+            localSurfaceTemperature[2] = nondimensionalTemperatureWall;
+        }
+
+        RDouble uWall = 0.0;
+        RDouble vWall = 0.0;
+        RDouble wWall = 0.0;
+        vector<SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+
+        if (globalBCList != 0)
+        {
+            vector<SimpleBC *>::iterator iter;
+            for (iter = globalBCList->begin(); iter != globalBCList->end(); ++ iter)
+            {
+                SimpleBC *boundaryCondition = *iter;
+                string BCName = structBC->GetBCName();
+
+                if (BCName != boundaryCondition->GetBCName())
+                {
+                    continue;
+                }
+
+                if (boundaryCondition->CheckParamData("uWall"))
+                {
+                    boundaryCondition->GetParamData("uWall", &uWall, PHDOUBLE, 1);
+                }
+
+                if (boundaryCondition->CheckParamData("vWall"))
+                {
+                    boundaryCondition->GetParamData("vWall", &vWall, PHDOUBLE, 1);
+                }
+
+                if (boundaryCondition->CheckParamData("wWall"))
+                {
+                    boundaryCondition->GetParamData("wWall", &wWall, PHDOUBLE, 1);
+                }
+            }
+        }
+
+        int *faceDirectionIndex = structBC->GetFaceDirectionIndex();
+        //! 0 stands for i-direction, 1 stands for j-direction, and 2 for k-direction.
+        int directionIndex = structBC->GetFaceDirection() + 1;
+        //! Judge the face is on the left side or right side in the current zone,-1 stands for left side, and 1 for right side.
+        int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+        leftOrRightIndex *= -1;
+
+        int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (directionIndex != iSurface)
+        {
+            continue;
+        }
+
+        int id = 0, jd = 0, kd = 0;
+        GetBCFaceIDX(faceDirectionIndex, id, jd, kd);
+
+        kst = kst + kd;
+        ked = ked + kd;
+        jst = jst + jd;
+        jed = jed + jd;
+        ist = ist + id;
+        ied = ied + id;
+
+        RDouble velocityXWall = 0.0;
+        RDouble velocityYWall = 0.0;
+        RDouble velocityZWall = 0.0;
+
+        indexOfCell = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! The index of cell near the wall.
+                    int iCell = i - id;
+                    int jCell = j - jd;
+                    int kCell = k - kd;
+
+                    //! The index of ghost cell on the first layer.
+                    int iL = iCell + faceDirectionIndex[0];
+                    int jL = jCell + faceDirectionIndex[1];
+                    int kL = kCell + faceDirectionIndex[2];
+
+                    //! Obtain the normal vector.
+                    RDouble normalComponentX = faceNormalComponentX(i, j, k, iSurface);
+                    RDouble normalComponentY = faceNormalComponentY(i, j, k, iSurface);
+                    RDouble normalComponentZ = faceNormalComponentZ(i, j, k, iSurface);
+
+                    velocityXWall = uWall;
+                    velocityYWall = vWall;
+                    velocityZWall = wWall;
+                    if (isUnsteady && isAle)
+                    {
+                        velocityXWall += faceVelocityX(i, j, k, iSurface);
+                        velocityYWall += faceVelocityY(i, j, k, iSurface);
+                        velocityZWall += faceVelocityZ(i, j, k, iSurface);
+                    }
+
+                    if (isInjection == 1)
+                    {
+                        RDouble wallVelocity = leftOrRightIndex * (*injectionVelocity)(indexOfWall, indexOfCell);
+                        velocityXWall += wallVelocity * normalComponentX;
+                        velocityYWall += wallVelocity * normalComponentY;
+                        velocityZWall += wallVelocity * normalComponentZ;    //Z
+                    }
+
+                    if (nSlipBCModel > 0)
+                    {
+                        velocityXWall += (*surfaceSlipVariables)(indexOfWall, indexOfCell, 3);
+                        velocityYWall += (*surfaceSlipVariables)(indexOfWall, indexOfCell, 4);
+                        velocityZWall += (*surfaceSlipVariables)(indexOfWall, indexOfCell, 5);
+                        for (int m = 0; m < 3; ++ m)
+                        {
+                            localSurfaceTemperature[m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m);
+                        }
+                    }
+                    else
+                    {
+                        //! Obtain the local surface temperatures.Tve=Tv=Te=Tw.
+                        localSurfaceTemperature[ITT] = (*surfaceTemperature)(indexOfWall, indexOfCell);
+                        localSurfaceTemperature[ITV] = localSurfaceTemperature[ITT];
+                        localSurfaceTemperature[ITE] = localSurfaceTemperature[ITT];
+                    }
+
+                    //! Compute variables on wall.
+                    wallVariables[IU] = velocityXWall;
+                    wallVariables[IV] = velocityYWall;
+                    wallVariables[IW] = velocityZWall;
+                    wallVariables[IP] = primitiveVariables(iCell, jCell, kCell, IP);
+
+                    //! Obtain the mass fractions of species on wall.
+                    if (ABS(catalyticCoef) <= EPSILON && nBCType != PHENGLEI::ABLATION_SURFACE) //! Fully non-catalytic wall.
+                    {
+                        for (int m = nNSEquation; m < nNSEquation + nSpecies; ++ m)
+                        {
+                            wallVariables[m] = primitiveVariables(iCell, jCell, kCell, m);
+                        }
+                    }
+                    else //! Fully catalytic wall or finite catalytic wall.
+                    {
+                        for (int m = nNSEquation; m < nNSEquation + nSpecies; ++ m)
+                        {
+                            wallVariables[m] = (*surfaceMassFraction)(indexOfWall, indexOfCell, m - nNSEquation);
+                        }
+                    }
+
+                    if (nSlipBCModel > 0) //! Modify the mass fractions on wall.
+                    {
+                        for (int m = 0; m < nSpecies; ++ m)
+                        {
+                            wallVariables[nNSEquation + m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m + 6);
+                        }
+                    }
+
+                    //! Modify density on wall.
+                    RDouble massReciprocal = gas->ComputeMolecularWeightReciprocal(wallVariables);
+                    wallVariables[IR] = wallVariables[IP] / (gasConstant * localSurfaceTemperature[ITT] * massReciprocal);
+
+                    RDouble surfaceArea = faceArea(i, j, k, iSurface); //! The area of side face.
+                    RDouble cellVolume = gridCellVolume(iCell, jCell, kCell); //! The volume of first cell.
+                    RDouble deltaHeight = half * cellVolume / surfaceArea;
+
+                    //ComputeTransportCoefficientsR(RDouble *massFractions, RDouble *temperature, RDouble density, RDouble *speciesCps, RDouble *speciesCvvs,RDouble *speciesCves, RDouble visTurbulence, RDouble &viscosity, RDouble *heatConductivity, RDouble *rhoDs)
+                    //gas->ComputeTransportCoefficientsR(&wallVariables[IP+1], localSurfaceTemperature, wallVariables[IR], Cps, Cvvs, Cves, viscousTurbulence(i, j, k), laminarViscosity, lamda, rhoDs);
+
+                    //! Compute viscosity on wall.
+                    gas->ComputeViscosityByPrimitive(wallVariables, localSurfaceTemperature[ITT], localSurfaceTemperature[ITE], nonDimensionalSutherlandTemperature, laminarViscosity); //Tve=Tv=Te=Tw
+                    turbulentViscosity = half * (viscousTurbulence(iL, jL, kL) + viscousTurbulence(iCell, jCell, kCell));
+                    viscosity = laminarViscosity + turbulentViscosity;
+                    viscousLaminar(iL, jL, kL) = 2.0 * laminarViscosity - viscousLaminar(iCell, jCell, kCell);
+
+                    //! To obtain the enthalpy of each species.
+                    gas->GetEverySpeciesEnthalpy(localSurfaceTemperature[ITT], localSurfaceTemperature[ITV], localSurfaceTemperature[ITE], speciesEnthalpy); //Tve=Tv=Te=Tw
+
+                    //! To obtain the mass diffusion coefficients of each species.
+                    gas->GetSpeciesMassDiffusionCoef(wallVariables, laminarViscosity, turbulentViscosity, densityDiffusivity);
+
+                    //! To compute heat conductivity of mixture gas using the Eucken formula and Wassilewa formula.
+                    RDouble transRotationHeatCoef, vibrationHeatCoef, electronHeatCoef;
+                    gas->ComputeMixtureGasHeatConductivity(wallVariables, localSurfaceTemperature[ITT], localSurfaceTemperature[ITV], localSurfaceTemperature[ITE],
+                        transRotationHeatCoef, vibrationHeatCoef, electronHeatCoef);//Tve=Tv=Te=Tw
+
+                    //! Compute the heat flux caused by temperature difference.
+                    transportHeatFlux = leftOrRightIndex * transRotationHeatCoef * surfaceArea * ((temperatures(iCell, jCell, kCell, ITT) - localSurfaceTemperature[ITT]) / deltaHeight);
+                    if (nTemperatureModel == 2)         //! Two-Temperature Model.
+                    {
+                        wallFluxes[nLaminar + nChemical] = leftOrRightIndex * (vibrationHeatCoef + electronHeatCoef) * surfaceArea * ((temperatures(iCell, jCell, kCell, ITV) - localSurfaceTemperature[ITV]) / deltaHeight);
+                        transportHeatFlux += wallFluxes[nLaminar + nChemical];
+                    }
+                    else if (nTemperatureModel == 3)    //! Three-Temperature Model.
+                    {
+                        wallFluxes[nLaminar + nChemical] = leftOrRightIndex * vibrationHeatCoef * surfaceArea * ((temperatures(iCell, jCell, kCell, ITV) - localSurfaceTemperature[ITV]) / deltaHeight);
+                        wallFluxes[nLaminar + nChemical + 1] = leftOrRightIndex * electronHeatCoef * surfaceArea * ((temperatures(iCell, jCell, kCell, ITE) - localSurfaceTemperature[ITE]) / deltaHeight);
+                        transportHeatFlux += wallFluxes[nLaminar + nChemical] + wallFluxes[nLaminar + nChemical + 1];
+                    }
+
+                    //! Compute internal energy of vibration.
+                    RDouble peDivideDensity = 0.0;
+                    //gas->GetElectronPressure(wallVariables, surfaceTemperature[ITE]) / wallVariables[IR];
+                    if (nTemperatureModel > 1)
+                    {
+                        //! Tve=Tv=Te=Tw.
+                        gas->ComputeVibrationEnergy(localSurfaceTemperature[ITV], vibrationEnergy);
+                        gas->ComputeElectronEnergy(localSurfaceTemperature[ITE], electronEnergy);
+                    }
+
+                    //! Compute the heat flux of species density diffusion.
+                    speciesHeatFlux = 0.0;
+                    for (int m = 0; m < nSpecies; ++ m)
+                    {
+                        wallFluxes[nNSEquation + m] = leftOrRightIndex * densityDiffusivity[m] * surfaceArea * ((primitiveVariables(iCell, jCell, kCell, nNSEquation + m) - wallVariables[nNSEquation + m]) / deltaHeight);
+                        speciesHeatFlux += speciesEnthalpy[m] * wallFluxes[nNSEquation + m];
+
+                        if (nTemperatureModel == 2)
+                        {
+                            wallFluxes[nLaminar + nChemical] += (vibrationEnergy[m] + electronEnergy[m] + peDivideDensity) * wallFluxes[nNSEquation + m];    //! modified by dms.
+                        }
+                        else if (nTemperatureModel == 3)
+                        {
+                            wallFluxes[nLaminar + nChemical] += vibrationEnergy[m] * wallFluxes[nNSEquation + m];
+                            wallFluxes[nLaminar + nChemical + 1] += (electronEnergy[m] + peDivideDensity) * wallFluxes[nNSEquation + m];    //! modified by dms.
+                        }
+                    }
+
+                    RDouble deltaVelocity = leftOrRightIndex * (primitiveVariables(iCell, jCell, kCell, IU) - wallVariables[IU]);
+                    dudx = (deltaVelocity / deltaHeight) * normalComponentX;
+                    dudy = (deltaVelocity / deltaHeight) * normalComponentY;
+                    dudz = (deltaVelocity / deltaHeight) * normalComponentZ;
+
+                    deltaVelocity = leftOrRightIndex * (primitiveVariables(iCell, jCell, kCell, IV) - wallVariables[IV]);
+                    dvdx = (deltaVelocity / deltaHeight) * normalComponentX;
+                    dvdy = (deltaVelocity / deltaHeight) * normalComponentY;
+                    dvdz = (deltaVelocity / deltaHeight) * normalComponentZ;
+
+                    deltaVelocity = leftOrRightIndex * (primitiveVariables(iCell, jCell, kCell, IW) - wallVariables[IW]);
+                    dwdx = (deltaVelocity / deltaHeight) * normalComponentX;
+                    dwdy = (deltaVelocity / deltaHeight) * normalComponentY;
+                    dwdz = (deltaVelocity / deltaHeight) * normalComponentZ;
+
+                    divv2p3 = 2.0 / 3.0 * (dudx + dvdy + dwdz);
+                    //! Compute stress components.
+                    txx = viscosity * (2.0 * dudx - divv2p3);
+                    tyy = viscosity * (2.0 * dvdy - divv2p3);
+                    tzz = viscosity * (2.0 * dwdz - divv2p3);
+                    txy = viscosity * (dudy + dvdx);
+                    txz = viscosity * (dudz + dwdx);
+                    tyz = viscosity * (dvdz + dwdy);
+
+                    wallFluxes[IR] = 0.0;
+                    wallFluxes[IRU] = (normalComponentX * txx + normalComponentY * txy + normalComponentZ * txz) * surfaceArea;
+                    wallFluxes[IRV] = (normalComponentX * txy + normalComponentY * tyy + normalComponentZ * tyz) * surfaceArea;
+                    wallFluxes[IRW] = (normalComponentX * txz + normalComponentY * tyz + normalComponentZ * tzz) * surfaceArea;
+                    wallFluxes[IRE] = wallVariables[IU] * wallFluxes[IRU] + wallVariables[IV] * wallFluxes[IRV] + wallVariables[IW] * wallFluxes[IRW] + transportHeatFlux + speciesHeatFlux;
+
+                    for (int m = 0; m < nLaminar - nIonizationFlag; ++ m)
+                    {
+                        faceFluxes(i, j, k, m) = -oRefReNumber * wallFluxes[m];
+#ifdef USE_ERROR_DATA_DEBUG
+                        if (isErrorData(faceFluxes(i, j, k, m)))
+                        {
+                            int zoneID = grid->GetZoneID();
+                            PrintToWindow(" zoneID = ", zoneID, "i = ", i, "j = ", j, "k = ", k, "m = ", m);
+                            TK_Exit::ExceptionExit("This is in function CorrectViscousFlux", true);
+                        }
+#endif
+                    }
+
+                    for (int m = 0; m < nTemperatureModel - 1; ++ m)
+                    {
+                        faceFluxes(i, j, k, nLaminar + nChemical + m) = -oRefReNumber * wallFluxes[nLaminar + nChemical + m];
+#ifdef USE_ERROR_DATA_DEBUG
+                        if (isErrorData(faceFluxes(i, j, k, nLaminar + nChemical + m)))
+                        {
+                            int zoneID = grid->GetZoneID();
+                            PrintToWindow(" zoneID = ", zoneID, "i = ", i, "j = ", j, "k = ", k, "nLaminar + nChemical + m = ", nLaminar + nChemical + m);
+                            TK_Exit::ExceptionExit("This is in function CorrectViscousFlux", true);
+                        }
+#endif
+                    }
+                    //! Next grid cell.
+                    ++ indexOfCell;
+                }//! end.
+            }//! end.
+        }//! k end.
+        ++ indexOfWall; //! Next surface region.
+    }//! nBCRegion end.
+
+    delete[]wallVariables;    wallVariables = NULL;
+    delete[]wallFluxes;    wallFluxes = NULL;
+    delete[]speciesEnthalpy;    speciesEnthalpy = NULL;
+    delete[]densityDiffusivity;    densityDiffusivity = NULL;
+    delete[]vibrationEnergy;    vibrationEnergy = NULL;
+    delete[]electronEnergy;    electronEnergy = NULL;
+}
+
+
+void NSSolverStruct::CompVisFluxnew(Grid *gridIn, Gradient *gradient_uvwt, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &graduvwtx = gradient_uvwt->GetGradX()->GetField_STR();
+    RDouble4D &graduvwty = gradient_uvwt->GetGradY()->GetField_STR();
+    RDouble4D &graduvwtz = gradient_uvwt->GetGradZ()->GetField_STR();
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+
+    RDouble refGama = parameters->GetRefGama();
+
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int nrokplus = GlobalDataBase::GetIntParaFromDB("nrokplus");
+
+    RDouble4D *q_turb, *aniss;
+    if (nrokplus > 0)
+    {
+        q_turb = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_turb"));
+        aniss = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("aniss"));
+    }
+
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+
+    RDouble *qlr = new RDouble[nEquation];
+    RDouble *fslr = new RDouble[numberOfSpecies];
+    RDouble *dfsdx = new RDouble[numberOfSpecies];
+    RDouble *dfsdy = new RDouble[numberOfSpecies];
+    RDouble *dfsdz = new RDouble[numberOfSpecies];
+    RDouble *fvis = new RDouble[nEquation];
+    RDouble *work = new RDouble[nEquation];
+
+    int il1, jl1, kl1;
+    GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+    int iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd;
+    grid->GetFaceIterationIndex(iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd, iSurface);
+
+    using namespace IDX;
+
+    for (int k = kFaceStart; k <= kFaceEnd; ++k)
+    {
+        for (int j = jFaceStart; j <= jFaceEnd; ++j)
+        {
+            for (int i = iFaceStart; i <= iFaceEnd; ++i)
+            {
+                int il = i + il1;
+                int jl = j + jl1;
+                int kl = k + kl1;
+
+                //! Note that if we use iSurface,there must be no omission.
+                RDouble nx = xfv(il, jl, kl, iSurface);
+                RDouble ny = yfv(il, jl, kl, iSurface);
+                RDouble nz = zfv(il, jl, kl, iSurface);
+
+                RDouble um = half * (q(il, jl, kl, IU) + q(i, j, k, IU));
+                RDouble vm = half * (q(il, jl, kl, IV) + q(i, j, k, IV));
+                RDouble wm = half * (q(il, jl, kl, IW) + q(i, j, k, IW));
+
+                RDouble mul = half * (viscousLaminar(il, jl, kl) + viscousLaminar(i, j, k));
+                RDouble mut = half * (viscousTurbulence(il, jl, kl) + viscousTurbulence(i, j, k));
+                //mut = 0.0;
+                RDouble vis = mul + mut;
+
+                RDouble dudx = graduvwtx(il, jl, kl, 0);
+                RDouble dudy = graduvwty(il, jl, kl, 0);
+                RDouble dudz = graduvwtz(il, jl, kl, 0);
+
+                RDouble dvdx = graduvwtx(il, jl, kl, 1);
+                RDouble dvdy = graduvwty(il, jl, kl, 1);
+                RDouble dvdz = graduvwtz(il, jl, kl, 1);
+
+                RDouble dwdx = graduvwtx(il, jl, kl, 2);
+                RDouble dwdy = graduvwty(il, jl, kl, 2);
+                RDouble dwdz = graduvwtz(il, jl, kl, 2);
+
+                RDouble dtdx = graduvwtx(il, jl, kl, 3);
+                RDouble dtdy = graduvwty(il, jl, kl, 3);
+                RDouble dtdz = graduvwtz(il, jl, kl, 3);
+
+                RDouble qx = 0.0;
+                RDouble qy = 0.0;
+                RDouble qz = 0.0;
+
+                RDouble kcp = (mul * oPrandtlLaminar + mut * oPrandtlTurbulence) * specificHeatAtConstantPressure;
+
+                qx += kcp * dtdx;
+                qy += kcp * dtdy;
+                qz += kcp * dtdz;
+
+                RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+                //! Stress components.
+                RDouble txx = vis * (two * dudx - divv2p3);
+                RDouble tyy = vis * (two * dvdy - divv2p3);
+                RDouble tzz = vis * (two * dwdz - divv2p3);
+                RDouble txy = vis * (dudy + dvdx);
+                RDouble txz = vis * (dudz + dwdx);
+                RDouble tyz = vis * (dvdz + dwdy);
+
+                fvis[IR] = 0.0;
+                fvis[IDX::IRU] = nx * txx + ny * txy + nz * txz;
+                fvis[IDX::IRV] = nx * txy + ny * tyy + nz * tyz;
+                fvis[IDX::IRW] = nx * txz + ny * tyz + nz * tzz;
+                fvis[IDX::IRE] = um * fvis[IDX::IRU] + vm * fvis[IDX::IRV] + wm * fvis[IDX::IRW] + (nx * qx + ny * qy + nz * qz);
+
+                for (int m = 0; m < nLaminar; ++m)
+                {
+                    flux(il, jl, kl, m) = -oRefReNumber * fvis[m];
+                }
+            }
+        }
+    }
+    delete [] fvis;     fvis  = NULL;
+    delete [] work;     work  = NULL;
+    delete [] qlr;      qlr   = NULL;
+    delete [] fslr;     fslr  = NULL;
+    delete [] dfsdx;    dfsdx = NULL;
+    delete [] dfsdy;    dfsdy = NULL;
+    delete [] dfsdz;    dfsdz = NULL;
+}
+
+void NSSolverStruct::CompVisFluxnew(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &gradqx = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D &gradqy = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D &gradqz = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+
+    RDouble4D &gradtx = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D &gradty = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D &gradtz = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceZ"));
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    RDouble refGama = parameters->GetRefGama();
+    int nElectronIndex = parameters->GetIndexOfElectron();
+    int nTurblenceForChemical = parameters->GetnTurblenceForChemical();
+    int nEnergyRecycle = parameters->GetnEnergyRecycle();
+
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int nrokplus = GlobalDataBase::GetIntParaFromDB("nrokplus");
+    RDouble4D *heatConductivity = 0, *massDiffusionCoef = 0, *speciesEnthalpy = 0, *speciesEvs = 0, *speciesEes = 0;
+    RDouble3D *totalCp = 0;
+    if (nChemical > 0)
+    {
+        heatConductivity = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("lambda"));
+        massDiffusionCoef = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rhoD"));
+        speciesEnthalpy = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("hSpecies"));
+        totalCp = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCp"));
+
+        speciesEvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEvs"));
+        speciesEes = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEes"));
+    }
+    RDouble kcp[3] = { 0 }, heatFlux = 0.0, dcsdx = 0.0, dcsdy = 0.0, dcsdz = 0.0, hs = 0.0, roDs = 0.0;
+    RDouble Tv = 0.0, Te = 0.0, energy = 0.0;
+    RDouble4D *q_turb = 0, *aniss = 0;
+    if (nrokplus > 0)
+    {
+        q_turb = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_turb"));
+        aniss = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("aniss"));
+    }
+
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+    RDouble *qlr = new RDouble[nEquation]();
+    RDouble *fslr = new RDouble[numberOfSpecies]();
+    RDouble *dfsdx = new RDouble[numberOfSpecies]();
+    RDouble *dfsdy = new RDouble[numberOfSpecies]();
+    RDouble *dfsdz = new RDouble[numberOfSpecies]();
+    RDouble *fvis = new RDouble[nEquation]();
+    RDouble *work = new RDouble[nEquation]();
+    RDouble *vibrationEnergy = new RDouble[numberOfSpecies]();
+    RDouble *electronEnergy = new RDouble[numberOfSpecies]();
+    //RDouble primVars[MAX_SPECIES_NUM], speciesEtr[MAX_SPECIES_NUM], speciesH[MAX_SPECIES_NUM], totalEtr, totalEv, totalH0;
+    RDouble wallTemperature = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+    RDouble refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+    RDouble twRatio = 1.0;
+    if (wallTemperature > 0.0)
+    {
+        twRatio = wallTemperature / (refDimensionalTemperature * (1.0 + 0.2 * refMachNumber * refMachNumber * 0.85));
+    }
+    twRatio = sqrt(twRatio);
+
+    int iFaceStart = 0, iFaceEnd = 0, jFaceStart = 0, jFaceEnd = 0, kFaceStart = 0, kFaceEnd = 0;
+    grid->GetFaceIterationIndex(iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd, iSurface);
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    using namespace IDX;
+
+    for (int k = kFaceStart; k <= kFaceEnd; ++ k)
+    {
+        for (int j = jFaceStart; j <= jFaceEnd; ++ j)
+        {
+            for (int i = iFaceStart; i <= iFaceEnd; ++ i)
+            {
+                int il, jl, kl;
+                grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                //! Note that if we use iSurface,there must be no omission. obtain the present point location in three surfaces.
+                RDouble nx = xfv(il, jl, kl, iSurface);
+                RDouble ny = yfv(il, jl, kl, iSurface);
+                RDouble nz = zfv(il, jl, kl, iSurface);
+
+                //Average of two points.
+                RDouble um = half * (q(il, jl, kl, IU) + q(i, j, k, IU));
+                RDouble vm = half * (q(il, jl, kl, IV) + q(i, j, k, IV));
+                RDouble wm = half * (q(il, jl, kl, IW) + q(i, j, k, IW));
+
+                RDouble mul = half * (viscousLaminar(il, jl, kl) + viscousLaminar(i, j, k));
+                RDouble mut = half * (viscousTurbulence(il, jl, kl) + viscousTurbulence(i, j, k));
+                RDouble vis = mul + mut;
+
+                RDouble dudx = gradqx(il, jl, kl, IU);
+                RDouble dudy = gradqy(il, jl, kl, IU);
+                RDouble dudz = gradqz(il, jl, kl, IU);
+
+                RDouble dvdx = gradqx(il, jl, kl, IV);
+                RDouble dvdy = gradqy(il, jl, kl, IV);
+                RDouble dvdz = gradqz(il, jl, kl, IV);
+
+                RDouble dwdx = gradqx(il, jl, kl, IW);
+                RDouble dwdy = gradqy(il, jl, kl, IW);
+                RDouble dwdz = gradqz(il, jl, kl, IW);
+
+                RDouble dtdx = gradtx(il, jl, kl, ITT);
+                RDouble dtdy = gradty(il, jl, kl, ITT);
+                RDouble dtdz = gradtz(il, jl, kl, ITT);
+
+                if (nChemical == 0)
+                {
+                    kcp[ITT] = (mul * oPrandtlLaminar + mut * oPrandtlTurbulence) * specificHeatAtConstantPressure;
+
+                    heatFlux = kcp[ITT] * (nx * dtdx + ny * dtdy + nz * dtdz);
+                }
+                else
+                {
+                    kcp[ITT] = 0.5 * ((*heatConductivity)(i, j, k, ITT) + (*heatConductivity)(il, jl, kl, ITT));
+                    if (nTurblenceForChemical == 0)
+                    {
+                        kcp[ITT] *= (1.0 + mut * oPrandtlTurbulence / (mul * oPrandtlLaminar + SMALL));//! modified by dms.
+                    }
+                    else
+                    {
+                        kcp[ITT] += mut * oPrandtlTurbulence * half * ((*totalCp)(il, jl, kl) + (*totalCp)(i, j, k));  //! modified by dms. 
+                    }
+
+                    heatFlux = kcp[ITT] * (nx * dtdx + ny * dtdy + nz * dtdz);
+
+                    for (int it = 1; it < nTemperatureModel; ++ it)
+                    {
+                        dtdx = gradtx(il, jl, kl, it);
+                        dtdy = gradty(il, jl, kl, it);
+                        dtdz = gradtz(il, jl, kl, it);
+                        kcp[it] = 0.5 * ((*heatConductivity)(i, j, k, it) + (*heatConductivity)(il, jl, kl, it)); // * kturb; //! modified by dms. 
+                        fvis[nLaminar + it] = kcp[it] * (nx * dtdx + ny * dtdy + nz * dtdz);
+                        heatFlux += fvis[nLaminar + it];
+                    }
+
+                    //! Obtain the gradient of species.
+                    for (int s = 0; s < numberOfSpecies; ++ s)
+                    {
+                        dcsdx = gradqx(il, jl, kl, nNSEquation + s);
+                        dcsdy = gradqy(il, jl, kl, nNSEquation + s);
+                        dcsdz = gradqz(il, jl, kl, nNSEquation + s);
+                        hs = 0.5 * ((*speciesEnthalpy)(i, j, k, s) + (*speciesEnthalpy)(il, jl, kl, s));
+                        roDs = 0.5 * ((*massDiffusionCoef)(i, j, k, s) + (*massDiffusionCoef)(il, jl, kl, s));    //! modified by dms.
+
+                        fvis[nNSEquation + s] = roDs * (nx * dcsdx + ny * dcsdy + nz * dcsdz);
+                        heatFlux += hs * fvis[nNSEquation + s];
+                    }
+
+                    if (nTemperatureModel == 2)
+                    {
+                        if (nEnergyRecycle == 0)
+                        {
+                            Tv = 0.5 * (t(i, j, k, ITV) + t(il, jl, kl, ITV));
+                            //! Compute the vibration and electron energies.
+                            gas->ComputeVibrationEnergy(Tv, vibrationEnergy);
+                            gas->ComputeElectronEnergy(Tv, electronEnergy);
+
+                            for (int s = 0; s < numberOfSpecies; ++ s)
+                            {
+                                energy = vibrationEnergy[s] + electronEnergy[s];
+                                fvis[nLaminar + 1] += energy * fvis[nNSEquation + s];
+                            }
+                        }
+                        else
+                        {
+                            for (int s = 0; s < numberOfSpecies; ++ s)
+                            {
+                                energy = (*speciesEvs)(i, j, k, s) + (*speciesEvs)(il, jl, kl, s);
+                                energy += (*speciesEes)(i, j, k, s) + (*speciesEes)(il, jl, kl, s);
+                                fvis[nLaminar + 1] += 0.5 * energy * fvis[nNSEquation + s];
+                            }
+                        }
+
+                    }
+                    else if (nTemperatureModel == 3)
+                    {
+                        if (nEnergyRecycle == 0)
+                        {
+                            Tv = 0.5 * (t(i, j, k, ITV) + t(il, jl, kl, ITV));
+                            Te = 0.5 * (t(i, j, k, ITE) + t(il, jl, kl, ITE));
+                            //! Compute the vibration and electron energies.
+                            gas->ComputeVibrationEnergy(Tv, vibrationEnergy);
+                            gas->ComputeElectronEnergy(Te, electronEnergy);
+                            for (int s = 0; s < numberOfSpecies; ++ s)
+                            {
+                                fvis[nLaminar + 1] += vibrationEnergy[s] * fvis[nNSEquation + s];
+                                fvis[nLaminar + 2] += electronEnergy[s] * fvis[nNSEquation + s];
+                            }
+                        }
+                        else
+                        {
+                            for (int s = 0; s < numberOfSpecies; ++ s)
+                            {
+                                fvis[nLaminar + 1] += 0.5 * ((*speciesEvs)(i, j, k, s) + (*speciesEvs)(il, jl, kl, s)) * fvis[nNSEquation + s];
+                                fvis[nLaminar + 2] += 0.5 * ((*speciesEes)(i, j, k, s) + (*speciesEes)(il, jl, kl, s)) * fvis[nNSEquation + s];
+                            }
+                        }
+                    }
+                    fvis[nLaminar] = 0.0;
+                    if (nElectronIndex >= 0)
+                    {
+                        fvis[nLaminar - 1] = 0.0;
+                    }
+                }
+
+                RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+                //! Stress components.
+                RDouble txx = vis * (two * dudx - divv2p3);
+                RDouble tyy = vis * (two * dvdy - divv2p3);
+                RDouble tzz = vis * (two * dwdz - divv2p3);
+                RDouble txy = vis * (dudy + dvdx);
+                RDouble txz = vis * (dudz + dwdx);
+                RDouble tyz = vis * (dvdz + dwdy);
+
+                fvis[IR] = 0.0;
+                fvis[IDX::IRU] = nx * txx + ny * txy + nz * txz;
+                fvis[IDX::IRV] = nx * txy + ny * tyy + nz * tyz;
+                fvis[IDX::IRW] = nx * txz + ny * tyz + nz * tzz;
+                fvis[IDX::IRE] = um * fvis[IDX::IRU] + vm * fvis[IDX::IRV] + wm * fvis[IDX::IRW] + heatFlux;
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    flux(il, jl, kl, m) = -oRefReNumber * fvis[m];
+#ifdef USE_ERROR_DATA_DEBUG
+                    if (isErrorData(flux(il, jl, kl, m)))
+                    {
+                        int zoneID = grid->GetZoneID();
+                        PrintToWindow(" zoneID = ", zoneID, "il = ", il, "jl = ", jl, "kl = ", kl, "m = ", m);
+                        TK_Exit::ExceptionExit("This is in function CompVisFluxnew", true);
+                    }
+#endif
+                }
+            }
+        }
+    }
+
+    delete[] fvis;    fvis = NULL;
+    delete[] work;    work = NULL;
+    delete[] qlr;     qlr = NULL;
+    delete[] fslr;    fslr = NULL;
+    delete[] dfsdx;    dfsdx = NULL;
+    delete[] dfsdy;    dfsdy = NULL;
+    delete[] dfsdz;    dfsdz = NULL;
+    delete[] vibrationEnergy;    vibrationEnergy = NULL;
+    delete[] electronEnergy;    electronEnergy = NULL;
+}
+
+void NSSolverStruct::CompVisFluxLES(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &gradqx = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceX"));
+    RDouble4D &gradqy = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceY"));
+    RDouble4D &gradqz = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradPrimtiveVarFaceZ"));
+
+    RDouble4D &gradtx = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceX"));
+    RDouble4D &gradty = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceY"));
+    RDouble4D &gradtz = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTemperatureFaceZ"));
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+
+    RDouble3D &vist = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &subgridScaleEnergy = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+    RDouble3D &turbulentPrandtlNumber = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("turbulentPrandtlNumber"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    RDouble refGama = parameters->GetRefGama();
+    int nElectronIndex = parameters->GetIndexOfElectron();
+
+    RDouble oPrandtlLaminar = parameters->GetoPrandtlLaminar();
+    //RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int nrokplus = GlobalDataBase::GetIntParaFromDB("nrokplus");
+    RDouble4D *heatConductivity = 0, *massDiffusionCoef = 0, *speciesEnthalpy = 0;
+    if (nChemical > 0)
+    {
+        heatConductivity = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("lambda"));
+        massDiffusionCoef = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rhoD"));
+        speciesEnthalpy = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("hSpecies"));
+    }
+    RDouble kcp[3] = { 0 }, heatFlux = 0.0, dcsdx = 0.0, dcsdy = 0.0, dcsdz = 0.0, hs = 0.0, roDs = 0.0;
+    RDouble Tv = 0.0, Te = 0.0, energy = 0.0;
+    RDouble4D *q_turb = 0, *aniss = 0;
+    if (nrokplus > 0)
+    {
+        q_turb = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_turb"));
+        aniss = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("aniss"));
+    }
+
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+    RDouble *qlr = new RDouble[nEquation]();
+    RDouble *fslr = new RDouble[numberOfSpecies]();
+    RDouble *dfsdx = new RDouble[numberOfSpecies]();
+    RDouble *dfsdy = new RDouble[numberOfSpecies]();
+    RDouble *dfsdz = new RDouble[numberOfSpecies]();
+    RDouble *fvis = new RDouble[nEquation]();
+    RDouble *work = new RDouble[nEquation]();
+    RDouble *vibrationEnergy = new RDouble[numberOfSpecies]();
+    RDouble *electronEnergy = new RDouble[numberOfSpecies]();
+
+    int iFaceStart = 0, iFaceEnd = 0, jFaceStart = 0, jFaceEnd = 0, kFaceStart = 0, kFaceEnd = 0;
+    grid->GetFaceIterationIndex(iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd, iSurface);
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    using namespace IDX;
+
+    string sgsmodel = " ";
+    GlobalDataBase::GetData("sgsmodel", &sgsmodel, PHSTRING, 1);
+
+    int monitorVistmax = GlobalDataBase::GetIntParaFromDB("monitor_vistmax");
+
+    RDouble viscousTurbulenceMaximum = -1.0e30;
+    RDouble viscousTurbulenceMinimum = 1.0e30;
+
+    int imax = 1;
+    int jmax = 1;
+    int kmax = 1;
+
+    int imin = 1;
+    int jmin = 1;
+    int kmin = 1;
+
+    for (int k = kFaceStart; k <= kFaceEnd; ++ k)
+    {
+        for (int j = jFaceStart; j <= jFaceEnd; ++ j)
+        {
+            for (int i = iFaceStart; i <= iFaceEnd; ++ i)
+            {
+                int il, jl, kl;
+                grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                //! Note that if we use iSurface,there must be no omission.
+                RDouble nx = xfv(il, jl, kl, iSurface);
+                RDouble ny = yfv(il, jl, kl, iSurface);
+                RDouble nz = zfv(il, jl, kl, iSurface);
+
+                RDouble um = half * (q(il, jl, kl, IU) + q(i, j, k, IU));
+                RDouble vm = half * (q(il, jl, kl, IV) + q(i, j, k, IV));
+                RDouble wm = half * (q(il, jl, kl, IW) + q(i, j, k, IW));
+
+                RDouble mul = half * (viscousLaminar(il, jl, kl) + viscousLaminar(i, j, k));
+
+                RDouble dudx = gradqx(il, jl, kl, IU);
+                RDouble dudy = gradqy(il, jl, kl, IU);
+                RDouble dudz = gradqz(il, jl, kl, IU);
+
+                RDouble dvdx = gradqx(il, jl, kl, IV);
+                RDouble dvdy = gradqy(il, jl, kl, IV);
+                RDouble dvdz = gradqz(il, jl, kl, IV);
+
+                RDouble dwdx = gradqx(il, jl, kl, IW);
+                RDouble dwdy = gradqy(il, jl, kl, IW);
+                RDouble dwdz = gradqz(il, jl, kl, IW);
+
+                RDouble dtdx = gradtx(il, jl, kl, ITT);
+                RDouble dtdy = gradty(il, jl, kl, ITT);
+                RDouble dtdz = gradtz(il, jl, kl, ITT);
+
+                RDouble oPrandtlTurbulence = 2.0 / (turbulentPrandtlNumber(il, jl, kl) + turbulentPrandtlNumber(i, j, k));
+
+                RDouble mut = half * (vist(il, jl, kl) + vist(i, j, k));
+
+                RDouble hfxSGS = -mut * specificHeatAtConstantPressure * oPrandtlTurbulence * dtdx;
+                RDouble hfySGS = -mut * specificHeatAtConstantPressure * oPrandtlTurbulence * dtdy;
+                RDouble hfzSGS = -mut * specificHeatAtConstantPressure * oPrandtlTurbulence * dtdz;
+
+                if (nChemical == 0)
+                {
+                    kcp[ITT] = (mul * oPrandtlLaminar) * specificHeatAtConstantPressure;
+                    heatFlux = kcp[ITT] * (nx * dtdx + ny * dtdy + nz * dtdz) - (nx * hfxSGS + ny * hfySGS + nz * hfzSGS);
+                }
+                else
+                {
+                    kcp[ITT] = 0.5 * ((*heatConductivity)(i, j, k, ITT) + (*heatConductivity)(il, jl, kl, ITT));
+                    heatFlux = kcp[ITT] * (nx * dtdx + ny * dtdy + nz * dtdz);
+                    for (int it = 1; it < nTemperatureModel; ++ it)
+                    {
+                        dtdx = gradtx(il, jl, kl, it);
+                        dtdy = gradty(il, jl, kl, it);
+                        dtdz = gradtz(il, jl, kl, it);
+                        kcp[it] = 0.5 * ((*heatConductivity)(i, j, k, it) + (*heatConductivity)(il, jl, kl, it));
+                        fvis[nLaminar + it] = kcp[it] * (nx * dtdx + ny * dtdy + nz * dtdz);
+                        heatFlux += fvis[nLaminar + it];
+                    }
+
+                    //! Obtain the gradient of species.
+                    for (int s = 0; s < numberOfSpecies; ++ s)
+                    {
+                        dcsdx = gradqx(il, jl, kl, nNSEquation + s);
+                        dcsdy = gradqy(il, jl, kl, nNSEquation + s);
+                        dcsdz = gradqz(il, jl, kl, nNSEquation + s);
+                        hs = 0.5 * ((*speciesEnthalpy)(i, j, k, s) + (*speciesEnthalpy)(il, jl, kl, s));
+                        roDs = 0.5 * ((*massDiffusionCoef)(i, j, k, s) + (*massDiffusionCoef)(il, jl, kl, s));
+
+                        fvis[nNSEquation + s] = roDs * (nx * dcsdx + ny * dcsdy + nz * dcsdz);
+                        heatFlux += hs * fvis[nNSEquation + s];
+                    }
+
+                    if (nTemperatureModel == 2)
+                    {
+                        Tv = 0.5 * (t(i, j, k, ITV) + t(il, jl, kl, ITV));
+                        //! Compute the vibration and electron energies.
+                        gas->ComputeVibrationEnergy(Tv, vibrationEnergy);
+                        gas->ComputeElectronEnergy(Tv, electronEnergy);
+                        for (int s = 0; s < numberOfSpecies; ++ s)
+                        {
+                            energy = vibrationEnergy[s] + electronEnergy[s];
+                            fvis[nLaminar + 1] += energy * fvis[nNSEquation + s];
+                        }
+                    }
+                    else if (nTemperatureModel == 3)
+                    {
+                        Tv = 0.5 * (t(i, j, k, ITV) + t(il, jl, kl, ITV));
+                        Te = 0.5 * (t(i, j, k, ITE) + t(il, jl, kl, ITE));
+                        //! Compute the vibration and electron energies.
+                        gas->ComputeVibrationEnergy(Tv, vibrationEnergy);
+                        gas->ComputeElectronEnergy(Te, electronEnergy);
+                        for (int s = 0; s < numberOfSpecies; ++ s)
+                        {
+                            fvis[nLaminar + 1] += vibrationEnergy[s] * fvis[nNSEquation + s];
+                            fvis[nLaminar + 2] += electronEnergy[s] * fvis[nNSEquation + s];
+                        }
+                    }
+                    fvis[nLaminar] = 0.0;
+                    if (nElectronIndex >= 0)
+                    {
+                        fvis[nLaminar - 1] = 0.0;
+                    }
+                }
+
+                RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+                //! viscous stress and subgrid scale stress
+                RDouble txx = mul * (two * dudx - divv2p3);
+                RDouble tyy = mul * (two * dvdy - divv2p3);
+                RDouble tzz = mul * (two * dwdz - divv2p3);
+                RDouble txy = mul * (dudy + dvdx);
+                RDouble txz = mul * (dudz + dwdx);
+                RDouble tyz = mul * (dvdz + dwdy);
+
+                //RDouble ci = 0.5 * (isotropicConstant(il, jl, kl) + isotropicConstant(i, j, k));
+                //RDouble kSGS = 2.0 * rhom * ci * ss * ss * refReNumber;
+                RDouble kSGS = half * (subgridScaleEnergy(il, jl, kl) + subgridScaleEnergy(i, j, k));
+
+                RDouble txxSGS = -mut * (two * dudx - divv2p3) + 1.0 / 3.0 * kSGS;
+                RDouble tyySGS = -mut * (two * dvdy - divv2p3) + 1.0 / 3.0 * kSGS;
+                RDouble tzzSGS = -mut * (two * dwdz - divv2p3) + 1.0 / 3.0 * kSGS;
+                RDouble txySGS = -mut * (dudy + dvdx);
+                RDouble txzSGS = -mut * (dudz + dwdx);
+                RDouble tyzSGS = -mut * (dvdz + dwdy);
+
+                fvis[IR] = 0.0;
+                fvis[IDX::IRU] = nx * (txx - txxSGS) + ny * (txy - txySGS) + nz * (txz - txzSGS);
+                fvis[IDX::IRV] = nx * (txy - txySGS) + ny * (tyy - tyySGS) + nz * (tyz - tyzSGS);
+                fvis[IDX::IRW] = nx * (txz - txzSGS) + ny * (tyz - tyzSGS) + nz * (tzz - tzzSGS);
+                fvis[IDX::IRE] = um * fvis[IRU] + vm * fvis[IRV] + wm * fvis[IRW] + heatFlux;
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    flux(il, jl, kl, m) = -oRefReNumber * fvis[m];
+                }
+
+                if (viscousTurbulenceMaximum < mut)
+                {
+                    viscousTurbulenceMaximum = mut;
+                    imax = i;
+                    jmax = j;
+                    kmax = k;
+                }
+
+                if (viscousTurbulenceMinimum > mut)
+                {
+                    viscousTurbulenceMinimum = mut;
+                    imin = i;
+                    jmin = j;
+                    kmin = k;
+                }
+
+            }
+        }
+    }
+
+    RDouble vist_max = viscousTurbulenceMaximum;
+    RDouble vist_min = viscousTurbulenceMinimum;
+
+    grid->UpdateData("vist_max", &vist_max, PHDOUBLE, 1);
+    grid->UpdateData("vist_min", &vist_min, PHDOUBLE, 1);
+
+#ifdef PH_PARALLEL
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if (myid == server)
+    {
+#endif
+        if (monitorVistmax)
+        {
+            cout << "vistmax = " << viscousTurbulenceMaximum << " " << imax << " " << jmax << " " << kmax << "\n";
+            cout << "vistmin = " << viscousTurbulenceMinimum << " " << imin << " " << jmin << " " << kmin << "\n";
+        }
+#ifdef PH_PARALLEL
+    }
+#endif
+
+    delete[]fvis;    fvis = NULL;
+    delete[]work;    work = NULL;
+    delete[]qlr;    qlr = NULL;
+    delete[]fslr;    fslr = NULL;
+    delete[]dfsdx;    dfsdx = NULL;
+    delete[]dfsdy;    dfsdy = NULL;
+    delete[]dfsdz;    dfsdz = NULL;
+    delete[]vibrationEnergy;    vibrationEnergy = NULL;
+    delete[]electronEnergy;    electronEnergy = NULL;
+}
+
+void NSSolverStruct::LoadFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    Range M(0, nEquation - 1);
+
+    residual(I, J, K, M) -= (flux(I + il1, J + jl1, K + kl1, M) - flux(I, J, K, M));
+}
+
+void NSSolverStruct::UpdateQlQrOnlyforMixGrid(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    FieldProxy *qlProxy = new FieldProxy();
+    FieldProxy *qrProxy = new FieldProxy();
+
+    int nDim = GetDim();
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        if (iSurface == 1)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1")));
+        }
+        else if (iSurface == 2)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2")));
+        }
+        else
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3")));
+        }
+
+        //! Apply the limiter to compute left-side variable QL and right-side variable QR.
+        GetInvFaceVar(grid, qlProxy, qrProxy, iSurface);
+
+        //! Modify the variables of the wall boundary faces-clz begin.
+        CorrectFaceVar(grid, qlProxy, qrProxy, iSurface);
+    }
+
+    delete qlProxy;
+    delete qrProxy;
+}
+
+void NSSolverStruct::UpdateInviscidfluxOnlyforMixGrid(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int structureScheme = GlobalDataBase::GetIntParaFromDB("str_scheme");
+    INVScheme inviscidScheme = GetINVScheme(structureScheme);
+
+    FieldProxy *qlProxy = new FieldProxy();
+    FieldProxy *qrProxy = new FieldProxy();
+    FieldProxy *fluxProxy = new FieldProxy();
+
+    int nDim = GetDim();
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        if (iSurface == 1)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1")));
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI")));
+        }
+        else if (iSurface == 2)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2")));
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ")));
+        }
+        else
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3")));
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK")));
+        }
+
+        //! To compute the inviscid flux of the faces using the QL and QR.
+        InviscidFluxWrap(grid, qlProxy, qrProxy, fluxProxy, inviscidScheme, iSurface);
+    }
+
+    delete qlProxy;
+    delete qrProxy;
+    delete fluxProxy;
+}
+
+void NSSolverStruct::UpdateViscousfluxOnlyforMixGrid(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+    if (viscousType == INVISCID) return;
+
+    FieldProxy *fluxProxy = new FieldProxy();
+
+    int nDim = GetDim();
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        if (iSurface == 1)
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxI")));
+        }
+        else if (iSurface == 2)
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxJ")));
+        }
+        else
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxK")));
+        }
+
+        ReconGradVolWeightedwithCorrection(gridIn, iSurface);
+
+        CompVisFluxnew(grid, fluxProxy, iSurface);
+    }
+    delete fluxProxy;
+}
+
+void NSSolverStruct::LoadGlobalfacefluxtoResOnlyforMixGrid(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+
+    RDouble4D &faceInviscidfluxI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI"));
+    RDouble4D &faceInviscidfluxJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ"));
+    RDouble4D &faceInviscidfluxK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK"));
+
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni - 1;
+    int jed = nj - 1;
+    int ked = nk - 1;
+
+    if (nk == 1)
+    {
+        ked = 1;
+    }
+
+    for (int m = 0; m < 5; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    residual(i, j, k, m) -= faceInviscidfluxI(i + 1, j, k, m) - faceInviscidfluxI(i, j, k, m);
+                    residual(i, j, k, m) -= faceInviscidfluxJ(i, j + 1, k, m) - faceInviscidfluxJ(i, j, k, m);
+                    if (nk == 1) continue;
+                    residual(i, j, k, m) -= faceInviscidfluxK(i, j, k + 1, m) - faceInviscidfluxK(i, j, k, m);
+                }
+            }
+        }
+    }
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+    if (viscousType == INVISCID) return;
+
+    RDouble4D &faceViscousfluxI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxI"));
+    RDouble4D &faceViscousfluxJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxJ"));
+    RDouble4D &faceViscousfluxK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxK"));
+
+    for (int m = 0; m < 5; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    residual(i, j, k, m) -= faceViscousfluxI(i + 1, j, k, m) - faceViscousfluxI(i, j, k, m);
+                    residual(i, j, k, m) -= faceViscousfluxJ(i, j + 1, k, m) - faceViscousfluxJ(i, j, k, m);
+                    if (nk == 1) continue;
+                    residual(i, j, k, m) -= faceViscousfluxK(i, j, k + 1, m) - faceViscousfluxK(i, j, k, m);
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::CorrectFaceVar(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &ql = qlProxy->GetField_STR();
+    RDouble4D &qr = qrProxy->GetField_STR();
+    RDouble4D &primitveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+
+    RDouble4D &faceVelocityX = *(grid->GetFaceVelocityX());
+    RDouble4D &faceVelocityY = *(grid->GetFaceVelocityY());
+    RDouble4D &faceVelocityZ = *(grid->GetFaceVelocityZ());
+
+    int viscousType = parameters->GetViscousType();
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble temperatureWall = wallTemperature / refDimensionalTemperature;
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (gridIn->GetDataPtr("surfaceSlipVariables"));
+    }
+
+    using namespace GAS_SPACE;
+
+    RDouble coefficientofstateEquation = gas->GetCoefficientOfStateEquation();
+
+    int nEquation = GetNumberOfEquations();
+    RDouble *wallVariables = new RDouble[nEquation];
+
+    using namespace IDX;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int nWallBC = 0, nIndexOfCell = 0;
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    int isAle = parameters->GetIsCodeOfAleModel();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int nBCType = structBC->GetBCType();
+
+        if (!IsWall(nBCType) && nBCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        RDouble uWall = 0.0;
+        RDouble vWall = 0.0;
+        RDouble wWall = 0.0;
+
+        vector<SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+
+        if (globalBCList != 0)
+        {
+            vector<SimpleBC *>::iterator iter;
+            for (iter = globalBCList->begin(); iter != globalBCList->end(); ++ iter)
+            {
+                SimpleBC *boundaryCondition = *iter;
+                string BCName = structBC->GetBCName();
+
+                if (BCName != boundaryCondition->GetBCName())
+                {
+                    continue;
+                }
+
+                if (boundaryCondition->CheckParamData("uWall"))
+                {
+                    boundaryCondition->GetParamData("uWall", &uWall, PHDOUBLE, 1);
+                }
+
+                if (boundaryCondition->CheckParamData("vWall"))
+                {
+                    boundaryCondition->GetParamData("vWall", &vWall, PHDOUBLE, 1);
+                }
+
+                if (boundaryCondition->CheckParamData("wWall"))
+                {
+                    boundaryCondition->GetParamData("wWall", &wWall, PHDOUBLE, 1);
+                }
+            }
+        }
+
+        int *faceDirectionIndex = structBC->GetFaceDirectionIndex();
+        int directionIndex = structBC->GetFaceDirection() + 1;
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (directionIndex != iSurface)
+        {
+            continue;
+        }
+
+        //! The following treatment places subscripts on BCFace.
+        //! Modified by clz : 2012-7-10.
+        int id, jd, kd;
+        GetBCFaceIDX(faceDirectionIndex, id, jd, kd);
+        kst = kst + kd;
+        ked = ked + kd;
+        jst = jst + jd;
+        jed = jed + jd;
+        ist = ist + id;
+        ied = ied + id;
+
+        int di, dj, dk;
+        di = ABS(faceDirectionIndex[0]);
+        dj = ABS(faceDirectionIndex[1]);
+        dk = ABS(faceDirectionIndex[2]);
+        nIndexOfCell = 0;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int il = i - di;
+                    int jl = j - dj;
+                    int kl = k - dk;
+
+                    RDouble velocityXWall = uWall;
+                    RDouble velocityYWall = vWall;
+                    RDouble velocityZWall = wWall;
+
+                    if (nSlipBCModel > 0)
+                    {
+                        velocityXWall += (*surfaceSlipVariables)(nWallBC, nIndexOfCell, 3);
+                        velocityYWall += (*surfaceSlipVariables)(nWallBC, nIndexOfCell, 4);
+                        velocityZWall += (*surfaceSlipVariables)(nWallBC, nIndexOfCell, 5);
+                    }
+
+                    if (isUnsteady && isAle)
+                    {
+                        velocityXWall += faceVelocityX(i, j, k, iSurface);
+                        velocityYWall += faceVelocityY(i, j, k, iSurface);
+                        velocityZWall += faceVelocityZ(i, j, k, iSurface);
+                    }
+
+                    if (viscousType == INVISCID)
+                    {
+                        RDouble nxs = faceNormalComponentX(i, j, k, iSurface);
+                        RDouble nys = faceNormalComponentY(i, j, k, iSurface);
+                        RDouble nzs = faceNormalComponentZ(i, j, k, iSurface);
+
+                        RDouble vx = primitveVariables(i - id, j - jd, k - kd, IU);
+                        RDouble vy = primitveVariables(i - id, j - jd, k - kd, IV);
+                        RDouble vz = primitveVariables(i - id, j - jd, k - kd, IW);
+                        RDouble vn = nxs * vx + nys * vy + nzs * vz;
+
+                        ql(il, jl, kl, IR) = primitveVariables(i - id, j - jd, k - kd, IR);
+                        ql(il, jl, kl, IU) = primitveVariables(i - id, j - jd, k - kd, IU) - nxs * vn;
+                        ql(il, jl, kl, IV) = primitveVariables(i - id, j - jd, k - kd, IV) - nys * vn;
+                        ql(il, jl, kl, IW) = primitveVariables(i - id, j - jd, k - kd, IW) - nzs * vn;
+                        ql(il, jl, kl, IP) = primitveVariables(i - id, j - jd, k - kd, IP);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            qr(i, j, k, m) = ql(il, jl, kl, m);
+                        }
+                    }
+                    else if (wallTemperature <= 0.0)
+                    {
+                        //! Viscous wall, adiabatic.
+                        ql(il, jl, kl, IR) = primitveVariables(i - id, j - jd, k - kd, IR);
+                        ql(il, jl, kl, IU) = velocityXWall;
+                        ql(il, jl, kl, IV) = velocityYWall;
+                        ql(il, jl, kl, IW) = velocityZWall;
+                        ql(il, jl, kl, IP) = primitveVariables(i - id, j - jd, k - kd, IP);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            qr(i, j, k, m) = ql(il, jl, kl, m);
+                        }
+                    }
+                    else
+                    {
+                        //! Isothermal wall.
+                        temperatureWall = wallTemperature / refDimensionalTemperature;
+                        wallVariables[IP] = primitveVariables(i - id, j - jd, k - kd, IP);
+                        wallVariables[IU] = velocityXWall;
+                        wallVariables[IV] = velocityYWall;
+                        wallVariables[IW] = velocityZWall;
+
+                        RDouble massReciprocal = one;
+                        RDouble presureWall = wallVariables[IP];
+                        RDouble densityWall = presureWall / (coefficientofstateEquation * temperatureWall * massReciprocal);
+                        wallVariables[IR] = densityWall;
+                        if (nSlipBCModel > 0)
+                        {
+                            temperatureWall = (*surfaceSlipVariables)(nWallBC, nIndexOfCell, ITT);
+                            wallVariables[IR] = presureWall / (coefficientofstateEquation * temperatureWall * massReciprocal);
+                        }
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            ql(il, jl, kl, m) = wallVariables[m];
+                            qr(i, j, k, m) = wallVariables[m];
+                        }
+                    }
+                    ++ nIndexOfCell; //! Next grid cell.
+                }
+            }
+        }
+        ++ nWallBC; //! Next surface.
+    }
+    delete[]wallVariables;
+}
+//clz end
+
+void NSSolverStruct::CorrectFaceVarR(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &ql = qlProxy->GetField_STR();
+    RDouble4D &qr = qrProxy->GetField_STR();
+    RDouble4D &primitveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+
+    RDouble4D &faceVelocityX = *(grid->GetFaceVelocityX());
+    RDouble4D &faceVelocityY = *(grid->GetFaceVelocityY());
+    RDouble4D &faceVelocityZ = *(grid->GetFaceVelocityZ());
+
+    int viscousType = parameters->GetViscousType();
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble temperatureWall = wallTemperature / refDimensionalTemperature;
+    //int wallMultiTemperature = 0;
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (gridIn->GetDataPtr("surfaceSlipVariables"));
+    }
+
+    using namespace GAS_SPACE;
+
+    RDouble coefficientofstateEquation = gas->GetCoefficientOfStateEquation();
+
+    //int wallMultiTemperature1 = 0;
+    /*if (GlobalDataBase::IsExist("wallMultiTemperature1", PHINT, 1))
+    {
+        wallMultiTemperature1 = GlobalDataBase::GetIntParaFromDB("wallMultiTemperature1");
+    }*/
+
+    int nEquation = GetNumberOfEquations();
+    RDouble *wallVariables = new RDouble[nEquation];
+
+    using namespace IDX;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int nWallBC = 0, nIndexOfCell = 0;
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    int isAle = parameters->GetIsCodeOfAleModel();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int nBCType = structBC->GetBCType();
+
+        if (!IsWall(nBCType) && nBCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        Data_Param *bcParamDB = structBC->GetBCParamDataBase();
+        if (bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+        {
+            bcParamDB->GetData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+        }
+        else
+        {
+            wallTemperature = parameters->GetWallTemperature();
+        }
+        temperatureWall = wallTemperature / refDimensionalTemperature;
+
+        RDouble uWall = 0.0;
+        RDouble vWall = 0.0;
+        RDouble wWall = 0.0;
+
+        vector<SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+
+        if (globalBCList != 0)
+        {
+            vector<SimpleBC *>::iterator iter;
+            for (iter = globalBCList->begin(); iter != globalBCList->end(); ++ iter)
+            {
+                SimpleBC *bc = *iter;
+
+                string BCName = structBC->GetBCName();
+                if (BCName != bc->GetBCName())
+                {
+                    continue;
+                }
+
+                if (bc->CheckParamData("uWall"))
+                {
+                    bc->GetParamData("uWall", &uWall, PHDOUBLE, 1);
+                }
+
+                if (bc->CheckParamData("vWall"))
+                {
+                    bc->GetParamData("vWall", &vWall, PHDOUBLE, 1);
+                }
+
+                if (bc->CheckParamData("wWall"))
+                {
+                    bc->GetParamData("wWall", &wWall, PHDOUBLE, 1);
+                }
+            }
+        }
+
+        int *faceDirectionIndex = structBC->GetFaceDirectionIndex();
+        int directionIndex = structBC->GetFaceDirection() + 1;
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (directionIndex != iSurface)
+        {
+            continue;
+        }
+
+        //! The following treatment places subscripts on BCFace.
+        //! Modified by clz : 2012-7-10.
+        int id, jd, kd;
+        GetBCFaceIDX(faceDirectionIndex, id, jd, kd);
+        kst = kst + kd;
+        ked = ked + kd;
+        jst = jst + jd;
+        jed = jed + jd;
+        ist = ist + id;
+        ied = ied + id;
+
+        int di, dj, dk;
+        di = ABS(faceDirectionIndex[0]);
+        dj = ABS(faceDirectionIndex[1]);
+        dk = ABS(faceDirectionIndex[2]);
+        nIndexOfCell = 0;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int il = i - di;
+                    int jl = j - dj;
+                    int kl = k - dk;
+
+                    RDouble velocityXWall = uWall;
+                    RDouble velocityYWall = vWall;
+                    RDouble velocityZWall = wWall;
+
+                    if (nSlipBCModel > 0)
+                    {
+                        velocityXWall += (*surfaceSlipVariables)(nWallBC, nIndexOfCell, 3);
+                        velocityYWall += (*surfaceSlipVariables)(nWallBC, nIndexOfCell, 4);
+                        velocityZWall += (*surfaceSlipVariables)(nWallBC, nIndexOfCell, 5);
+                    }
+                    if (isUnsteady && isAle)
+                    {
+                        velocityXWall += faceVelocityX(i, j, k, iSurface);
+                        velocityYWall += faceVelocityY(i, j, k, iSurface);
+                        velocityZWall += faceVelocityZ(i, j, k, iSurface);
+                    }
+
+                    if (viscousType == INVISCID)
+                    {
+                        RDouble nxs = faceNormalComponentX(i, j, k, iSurface);
+                        RDouble nys = faceNormalComponentY(i, j, k, iSurface);
+                        RDouble nzs = faceNormalComponentZ(i, j, k, iSurface);
+
+                        RDouble vx = primitveVariables(i - id, j - jd, k - kd, IU);
+                        RDouble vy = primitveVariables(i - id, j - jd, k - kd, IV);
+                        RDouble vz = primitveVariables(i - id, j - jd, k - kd, IW);
+                        RDouble vn = nxs * vx + nys * vy + nzs * vz;
+
+                        ql(il, jl, kl, IR) = primitveVariables(i - id, j - jd, k - kd, IR);
+                        ql(il, jl, kl, IU) = primitveVariables(i - id, j - jd, k - kd, IU) - nxs * vn;
+                        ql(il, jl, kl, IV) = primitveVariables(i - id, j - jd, k - kd, IV) - nys * vn;
+                        ql(il, jl, kl, IW) = primitveVariables(i - id, j - jd, k - kd, IW) - nzs * vn;
+                        ql(il, jl, kl, IP) = primitveVariables(i - id, j - jd, k - kd, IP);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            qr(i, j, k, m) = ql(il, jl, kl, m);
+                        }
+                    }
+                    else if (wallTemperature <= 0.0)
+                    {
+                        //! Viscous wall, adiabatic.
+                        ql(il, jl, kl, IR) = primitveVariables(i - id, j - jd, k - kd, IR);
+                        ql(il, jl, kl, IU) = velocityXWall;
+                        ql(il, jl, kl, IV) = velocityYWall;
+                        ql(il, jl, kl, IW) = velocityZWall;
+                        ql(il, jl, kl, IP) = primitveVariables(i - id, j - jd, k - kd, IP);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            qr(i, j, k, m) = ql(il, jl, kl, m);
+                        }
+                    }
+                    else
+                    {
+                        //! Isothermal wall.
+                        temperatureWall = wallTemperature / refDimensionalTemperature;
+                        wallVariables[IP] = primitveVariables(i - id, j - jd, k - kd, IP);
+                        wallVariables[IU] = velocityXWall;
+                        wallVariables[IV] = velocityYWall;
+                        wallVariables[IW] = velocityZWall;
+
+                        RDouble massReciprocal = one;
+                        RDouble presureWall = wallVariables[IP];
+                        RDouble densityWall = presureWall / (coefficientofstateEquation * temperatureWall * massReciprocal);
+                        wallVariables[IR] = densityWall;
+                        if (nSlipBCModel > 0)
+                        {
+                            temperatureWall = (*surfaceSlipVariables)(nWallBC, nIndexOfCell, ITT);
+                            wallVariables[IR] = presureWall / (coefficientofstateEquation * temperatureWall * massReciprocal);
+                        }
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            ql(il, jl, kl, m) = wallVariables[m];
+                            qr(i, j, k, m) = wallVariables[m];
+                        }
+                    }
+                    ++ nIndexOfCell; //! Next grid cell.
+                }
+            }
+        }
+        ++ nWallBC; //! Next surface.
+    }
+
+    delete[]wallVariables;
+}
+//clz end
+
+void NSSolverStruct::CorrectChemicalFaceVar(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &ql = qlProxy->GetField_STR();
+    RDouble4D &qr = qrProxy->GetField_STR();
+    RDouble4D &primitveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+
+    RDouble4D &faceVelocityX = *(grid->GetFaceVelocityX());
+    RDouble4D &faceVelocityY = *(grid->GetFaceVelocityY());
+    RDouble4D &faceVelocityZ = *(grid->GetFaceVelocityZ());
+
+    int viscousType = parameters->GetViscousType();
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    RDouble2D *surfaceTemperature = NULL;
+    RDouble2D *injectionVelocity = NULL;
+    /*if (wallTemperature >= 0.0)
+    {
+        surfaceTemperature = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+    }*/
+    surfaceTemperature = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (gridIn->GetDataPtr("surfaceSlipVariables"));
+    }
+
+    int isInjection = GlobalDataBase::GetIntParaFromDB("isInjection");
+    if (isInjection == 1)
+    {
+        injectionVelocity = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("injectionVelocity"));
+    }
+
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();//! The type of catalytic wall condition.
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    int isAle = parameters->GetIsCodeOfAleModel();
+
+    using namespace GAS_SPACE;
+
+    RDouble coefficientofstateEquation = gas->GetCoefficientOfStateEquation();
+    int nSpeciesNumber = gas->GetNumberOfSpecies();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *wallVariables = new RDouble[nEquation]();
+    RDouble3D *surfaceMassFraction = 0;
+    if (nChemical > 0 && nSpeciesNumber > 0)    //! The fully catalytic wall condition.
+    {
+        surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+    }
+    RDouble massReciprocal = one;
+    RDouble twall = wallTemperature / refDimensionalTemperature;
+    RDouble temperatureWall[3] = { twall, twall, twall };
+    int wallMultiTemperature = gas->GetwallMultiTemperature();
+
+    using namespace PHENGLEI;
+    using namespace IDX;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int indexOfWall = 0, indexOfCell = 0;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int nBCType = structBC->GetBCType();
+
+        if (!IsWall(nBCType) && nBCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        if (wallMultiTemperature == 1)
+        {
+            Data_Param *bcParamDB = structBC->GetBCParamDataBase();
+            if (bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+            {
+                bcParamDB->GetData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+            }
+            else
+            {
+                wallTemperature = parameters->GetWallTemperature();
+            }
+            twall = wallTemperature / refDimensionalTemperature;
+            temperatureWall[0] = twall;
+            temperatureWall[1] = twall;
+            temperatureWall[2] = twall;
+        }
+
+        RDouble uWall = 0.0;
+        RDouble vWall = 0.0;
+        RDouble wWall = 0.0;
+
+        vector<SimpleBC *> *globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+
+        if (globalBCList != 0)
+        {
+            vector<SimpleBC *>::iterator iter;
+            for (iter = globalBCList->begin(); iter != globalBCList->end(); ++ iter)
+            {
+                SimpleBC *boundaryCondition = *iter;
+                string BCName = structBC->GetBCName();
+
+                if (BCName != boundaryCondition->GetBCName())
+                {
+                    continue;
+                }
+
+                if (boundaryCondition->CheckParamData("uWall"))
+                {
+                    boundaryCondition->GetParamData("uWall", &uWall, PHDOUBLE, 1);
+                }
+
+                if (boundaryCondition->CheckParamData("vWall"))
+                {
+                    boundaryCondition->GetParamData("vWall", &vWall, PHDOUBLE, 1);
+                }
+
+                if (boundaryCondition->CheckParamData("wWall"))
+                {
+                    boundaryCondition->GetParamData("wWall", &wWall, PHDOUBLE, 1);
+                }
+            }
+        }
+
+        int *faceDirectionIndex = structBC->GetFaceDirectionIndex();
+        int directionIndex = structBC->GetFaceDirection() + 1;
+        int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (directionIndex != iSurface)
+        {
+            continue;
+        }
+
+        //! The following treatment places subscripts on BCFace.
+        //! Modified by clz : 2012-7-10.
+        int id, jd, kd;
+        GetBCFaceIDX(faceDirectionIndex, id, jd, kd);
+        kst = kst + kd;
+        ked = ked + kd;
+        jst = jst + jd;
+        jed = jed + jd;
+        ist = ist + id;
+        ied = ied + id;
+
+        int di, dj, dk;
+        di = ABS(faceDirectionIndex[0]);
+        dj = ABS(faceDirectionIndex[1]);
+        dk = ABS(faceDirectionIndex[2]);
+
+        indexOfCell = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int il = i - di;
+                    int jl = j - dj;
+                    int kl = k - dk;
+
+                    RDouble nxs = faceNormalComponentX(i, j, k, iSurface);
+                    RDouble nys = faceNormalComponentY(i, j, k, iSurface);
+                    RDouble nzs = faceNormalComponentZ(i, j, k, iSurface);
+
+                    RDouble velocityXWall = uWall;
+                    RDouble velocityYWall = vWall;
+                    RDouble velocityZWall = wWall;
+
+                    if (isInjection == 1)
+                    {
+                        RDouble wallVelocity = -leftOrRightIndex * (*injectionVelocity)(indexOfWall, indexOfCell);
+                        velocityXWall += wallVelocity * nxs;
+                        velocityYWall += wallVelocity * nys;
+                        velocityZWall += wallVelocity * nzs;
+                    }
+
+                    if (nSlipBCModel > 0)
+                    {
+                        velocityXWall += (*surfaceSlipVariables)(indexOfWall, indexOfCell, 3);
+                        velocityYWall += (*surfaceSlipVariables)(indexOfWall, indexOfCell, 4);
+                        velocityZWall += (*surfaceSlipVariables)(indexOfWall, indexOfCell, 5);
+                    }
+
+                    if (isUnsteady && isAle)
+                    {
+                        velocityXWall += faceVelocityX(i, j, k, iSurface);
+                        velocityYWall += faceVelocityY(i, j, k, iSurface);
+                        velocityZWall += faceVelocityZ(i, j, k, iSurface);
+                    }
+
+                    if (viscousType == INVISCID)
+                    {
+                        RDouble vx = primitveVariables(i - id, j - jd, k - kd, IU);
+                        RDouble vy = primitveVariables(i - id, j - jd, k - kd, IV);
+                        RDouble vz = primitveVariables(i - id, j - jd, k - kd, IW);
+                        RDouble vn = nxs * vx + nys * vy + nzs * vz;
+
+                        ql(il, jl, kl, IR) = primitveVariables(i - id, j - jd, k - kd, IR);
+                        ql(il, jl, kl, IU) = primitveVariables(i - id, j - jd, k - kd, IU) - nxs * vn;
+                        ql(il, jl, kl, IV) = primitveVariables(i - id, j - jd, k - kd, IV) - nys * vn;
+                        ql(il, jl, kl, IW) = primitveVariables(i - id, j - jd, k - kd, IW) - nzs * vn;
+                        ql(il, jl, kl, IP) = primitveVariables(i - id, j - jd, k - kd, IP);
+                        for (int s = nNSEquation; s < nEquation; ++ s)
+                        {
+                            ql(il, jl, kl, s) = primitveVariables(i - id, j - jd, k - kd, s);
+                        }
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            qr(i, j, k, m) = ql(il, jl, kl, m);
+                        }
+                    }
+                    else if (wallTemperature < 0.0)
+                    {
+                        //! Viscous wall, adiabatic.
+                        ql(il, jl, kl, IR) = primitveVariables(i - id, j - jd, k - kd, IR);
+                        ql(il, jl, kl, IU) = velocityXWall;
+                        ql(il, jl, kl, IV) = velocityYWall;
+                        ql(il, jl, kl, IW) = velocityZWall;
+                        ql(il, jl, kl, IP) = primitveVariables(i - id, j - jd, k - kd, IP);
+                        for (int s = nNSEquation; s < nEquation; ++ s)
+                        {
+                            ql(il, jl, kl, s) = primitveVariables(i - id, j - jd, k - kd, s);
+                        }
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            qr(i, j, k, m) = ql(il, jl, kl, m);
+                        }
+                    }
+                    else //! Isothermal wall.
+                    {
+                        wallVariables[IU] = velocityXWall;
+                        wallVariables[IV] = velocityYWall;
+                        wallVariables[IW] = velocityZWall;
+                        wallVariables[IP] = primitveVariables(i - id, j - jd, k - kd, IP);
+                        if (nSlipBCModel > 0)
+                        {
+                            for (int m = 0; m < 3; ++ m)
+                            {
+                                temperatureWall[m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m);
+                            }
+                        }
+                        else
+                        {
+                            temperatureWall[ITT] = (*surfaceTemperature)(indexOfWall, indexOfCell);
+                            temperatureWall[ITV] = temperatureWall[ITT];
+                            temperatureWall[ITE] = temperatureWall[ITT];
+                        }
+
+                        if (ABS(catalyticCoef) <= EPSILON && nBCType != PHENGLEI::ABLATION_SURFACE) //Fully non-catalytic wall.
+                        {
+                            for (int s = nNSEquation; s < nNSEquation + nSpeciesNumber; ++ s)
+                            {
+                                wallVariables[s] = primitveVariables(i - id, j - jd, k - kd, s);
+                            }
+                        }
+                        else //! Fully catalytic wall or finite catalytic wall.
+                        {
+                            for (int s = nNSEquation; s < nNSEquation + nSpeciesNumber; ++ s)
+                            {
+                                wallVariables[s] = (*surfaceMassFraction)(indexOfWall, indexOfCell, s - nNSEquation);
+                            }
+                        }
+
+                        if (nSlipBCModel > 0)
+                        {
+                            for (int m = 0; m < nSpeciesNumber; ++ m)
+                            {
+                                wallVariables[nNSEquation + m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m + 6);
+                            }
+                        }
+
+                        massReciprocal = gas->ComputeMolecularWeightReciprocal(wallVariables);
+
+                        //! Compute vibration and electron energy.
+                        if (nTemperatureModel == 2)
+                        {
+                            wallVariables[nLaminar + 1] = gas->GetMixedGasVibrationEnergy(wallVariables, temperatureWall[ITV]);
+                            wallVariables[nLaminar + 1] += gas->GetMixedGasElectronEnergy(wallVariables, temperatureWall[ITV]);
+                        }
+                        else if (nTemperatureModel == 3)
+                        {
+                            wallVariables[nLaminar + 1] = gas->GetMixedGasVibrationEnergy(wallVariables, temperatureWall[ITV]);
+                            wallVariables[nLaminar + 2] = gas->GetMixedGasElectronEnergy(wallVariables, temperatureWall[ITE]);
+                        }
+
+                        wallVariables[IR] = wallVariables[IP] / (coefficientofstateEquation * temperatureWall[ITT] * massReciprocal);
+
+                        //! Modify the face variables.
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            ql(il, jl, kl, m) = wallVariables[m];
+                            qr(i, j, k, m) = wallVariables[m];
+                        }
+
+                    }
+                    //! Next grid cell.
+                    ++ indexOfCell;
+                }//! i end
+            }//! j end
+        }//! k end
+        //! Next surface region.
+        ++ indexOfWall;
+    }//! iBCRegion end
+
+    delete[] wallVariables;
+}
+
+void NSSolverStruct::CalPressureFactor(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &rtem = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("rtem"));
+
+    RDouble *pressureLocal = new RDouble[7]();
+    RDouble pressureSensorCoefficient = third;  //! For 3-D
+
+    RDouble minPressureRatio = 1.3;
+    RDouble maxPressureRatio = 3.0;
+    RDouble pi = 3.141592653589;
+
+    int RoeEntropyFixMethod = this->GetControlParameters()->GetRoeEntropyFixMethod();
+
+    int istp = 1;
+    int jstp = 1;
+    int kstp = 1;
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+    int nk = grid->GetNK();
+
+    //! To degenerate for two dimensional problems, modified by eric 20120209.
+    if (nk == 1)
+    {
+        kstp = 0;
+        kCellStart = 1;
+        kCellEnd = 1;
+        pressureSensorCoefficient = half;
+    }
+
+    using namespace IDX;
+
+    if (RoeEntropyFixMethod == 2)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++i)    //! Corrected by clz, 2011-12-20.
+                {
+                    int im = i - istp;
+                    int jm = j - jstp;
+                    int km = k - kstp;
+
+                    int ip = i + istp;
+                    int jp = j + jstp;
+                    int kp = k + kstp;
+
+                    RDouble pim = q(im, j, k, IP);
+                    RDouble pjm = q(i, jm, k, IP);
+                    RDouble pkm = q(i, j, km, IP);
+
+                    RDouble pip = q(ip, j, k, IP);
+                    RDouble pjp = q(i, jp, k, IP);
+                    RDouble pkp = q(i, j, kp, IP);
+
+                    RDouble ppp = q(i, j, k, IP);
+
+                    RDouble dpi = ABS((pip - two * ppp + pim) / (pip + two * ppp + pim));
+                    RDouble dpj = ABS((pjp - two * ppp + pjm) / (pjp + two * ppp + pjm));
+                    RDouble dpk = ABS((pkp - two * ppp + pkm) / (pkp + two * ppp + pkm));
+
+                    rtem(i, j, k) = pressureSensorCoefficient * (dpi + dpj + dpk);
+                }
+            }
+        }
+    }
+
+    if (RoeEntropyFixMethod == 6)
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++i)
+                {
+                    int im = i - istp;
+                    int jm = j - jstp;
+                    int km = k - kstp;
+
+                    int ip = i + istp;
+                    int jp = j + jstp;
+                    int kp = k + kstp;
+
+                    pressureLocal[0] = q(i, j, k, IP);
+                    pressureLocal[1] = q(im, j, k, IP);
+                    pressureLocal[2] = q(ip, j, k, IP);
+                    pressureLocal[3] = q(i, jm, k, IP);
+                    pressureLocal[4] = q(i, jp, k, IP);
+                    pressureLocal[5] = q(i, j, km, IP);
+                    pressureLocal[6] = q(i, j, kp, IP);
+
+                    RDouble maxPressure = 1.E-10;
+                    RDouble minPressure = 1.E+10;
+
+                    for (int iCellLocal = 0; iCellLocal <= 6; ++iCellLocal)
+                    {
+                        if (pressureLocal[iCellLocal] < minPressure)
+                        {
+                            minPressure = pressureLocal[iCellLocal];
+                        }
+                        if (pressureLocal[iCellLocal] > maxPressure)
+                        {
+                            maxPressure = pressureLocal[iCellLocal];
+                        }
+                    }
+
+                    RDouble pressureRatio = maxPressure / minPressure;
+                    RDouble presFunc = min(one, max(zero, (maxPressureRatio - pressureRatio) / (maxPressureRatio - minPressureRatio)));
+                    RDouble pressCosFunc = cos(presFunc * pi);
+                    pressCosFunc = max(-one, min(pressCosFunc, one));
+
+                    rtem(i, j, k) = half * (one - pressCosFunc);
+                }
+            }
+        }
+    }
+
+    grid->GhostCell3DExceptInterface(rtem);
+    //GhostCell3D(rtem, ni, nj, nk);
+
+    delete [] pressureLocal;
+}
+
+void NSSolverStruct::InviscidFlux(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    //CalPressureFactor(grid);
+
+    int nDim = GetDim();
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    int nEquation = GetNumberOfEquations();
+    int nInviscidFluxModify = parameters->GetnInviscidFluxModify();
+
+    int wallMultiTemperature = parameters->GetWallMultiTemperature();
+
+    Range M(0, nEquation - 1);
+
+    FieldProxy *qlProxy = new FieldProxy();
+    FieldProxy *qrProxy = new FieldProxy();
+
+
+    /*int nEnergyRecycle = parameters->GetnEnergyRecycle();
+    int ntmodel = parameters->GetTemperatureModel();
+    if(nEnergyRecycle == 2 && ntmodel > 1)
+    {
+        int nLaminar = parameters->GetLaminarNumber();
+        RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+        RDouble4D &q = *reinterpret_cast <RDouble4D *> (gridIn->GetDataPtr("q"));
+        RDouble4D &temporaryEve = *reinterpret_cast <RDouble4D *> (gridIn->GetDataPtr("temporaryEve"));
+        Range Tmode(1, ntmodel - 1);
+        temporaryEve(I, J, K, Tmode) = q(I, J, K, Tmode + nLaminar);
+        q(I, J, K, Tmode + nLaminar) = t(I, J, K, Tmode);
+    }*/
+
+
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        if (iSurface == 1)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1")));
+        }
+        else if (iSurface == 2)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2")));
+        }
+        else
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3")));
+        }
+
+        //! Apply the limiter to compute left-side variable QL and right-side variable QR.
+        GetInvFaceVar(grid, qlProxy, qrProxy, iSurface);
+
+        //! Modify the variables of the wall boundary faces-clz begin.
+        if (nChemical == 0)
+        {
+            if (wallMultiTemperature == 0)
+            {
+                CorrectFaceVar(grid, qlProxy, qrProxy, iSurface);
+            }
+            else
+            {
+                CorrectFaceVarR(grid, qlProxy, qrProxy, iSurface);
+            }
+        }
+        else if (nInviscidFluxModify == 0)
+        {
+            CorrectChemicalFaceVar(grid, qlProxy, qrProxy, iSurface);
+        }
+        //! To compute the inviscid flux terms of the cells with summation of the fluxes of their own surrounding faces.
+        ComputeInviscidFlux(grid, qlProxy, qrProxy, iSurface);
+    }
+
+    /*if(nEnergyRecycle == 2  && ntmodel > 1)
+    {
+        int nLaminar = parameters->GetLaminarNumber();
+        RDouble4D &temporaryEve = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("temporaryEve"));
+        RDouble4D &q = *reinterpret_cast <RDouble4D *> (gridIn->GetDataPtr("q"));
+        Range Tmode(1, ntmodel - 1);
+        q(I, J, K, Tmode + nLaminar) = temporaryEve(I, J, K, Tmode);
+    }*/
+    delete qlProxy;
+    delete qrProxy;
+}
+
+void NSSolverStruct::RegisterCFDSolverInterfaceField()
+{
+    NSSolver::RegisterCFDSolverInterfaceField();
+
+    int gridTypeSystem = GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if (gridTypeSystem == MIXGRID)
+    {
+        NSSolver::RegisterCFDSolverInterfaceFieldUnstruct();
+    }
+}
+
+void NSSolverStruct::RegisterOversetField()
+{
+    NSSolver::RegisterOversetField();
+}
+
+void NSSolverStruct::ReleaseCFDSolverInterfaceField()
+{
+    NSSolver::ReleaseCFDSolverInterfaceField();
+}
+
+void NSSolverStruct::ZeroResidualOfSpecialCells(Grid *gridIn)  //! Added by Guo Yongheng 20160825.
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isOverset = parameters->GetIsOverLapping();
+    if (!isOverset)
+    {
+        return;
+    }
+
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (gridIn->GetDataPtr("res"));
+    StructGrid *grid = PHSPACE::StructGridCast(gridIn);
+    int nEquation = GetNumberOfEquations();
+
+    int *iBlank = grid->GetCellTypeContainer();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    int cellLabel = 0;
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                if (iBlank[cellLabel] != GENERIC_COLOR)
+                {
+                    for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+                    {
+                        residual(i, j, k, iEquation) = 0.0;
+                    }
+                }
+
+                cellLabel += 1;
+            }
+        }
+    }
+    return;
+}
+
+void NSSolverStruct::GetInvFaceVar(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int nEquation = GetNumberOfEquations();
+
+    Range M(0, nEquation - 1);
+    using namespace IDX;
+
+    FieldProxy *qProxy = GetFieldProxy(grid, "q");
+
+    RDouble4D &q = qProxy->GetField_STR();
+    RDouble4D &ql = qlProxy->GetField_STR();
+    RDouble4D &qr = qrProxy->GetField_STR();
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    I = Range(1 - il1, ni - 1 + il1);
+    J = Range(1 - jl1, nj - 1 + jl1);
+    K = Range(1 - kl1, nk - 1 + kl1);
+    if (nk == 1)
+    {
+        K.setRange(1, 1);
+    }
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble MUSCLCoefXk = parameters->GetMUSCLCoefXk();
+    RDouble MUSCLCoefXb = parameters->GetMUSCLCoefXb();
+
+    int structureLimiter = GlobalDataBase::GetIntParaFromDB("str_limiter");
+
+    RDouble c1 = 0.25 * (1.0 - MUSCLCoefXk);
+    RDouble c2 = 0.25 * (1.0 + MUSCLCoefXk);
+
+    RDouble4D  dql(I, J, K, M, fortranArray);
+    RDouble4D  dqr(I, J, K, M, fortranArray);
+    RDouble4D dqlr(I, J, K, M, fortranArray);
+
+    if (!grid->IsFinestGrid())
+    {
+        //! For coarse grid.
+        ql(I, J, K, M) = q(I, J, K, M);
+        qr(I, J, K, M) = q(I, J, K, M);
+
+        delete qProxy;
+        return;
+    }
+
+    if (structureLimiter == ILMT_3rd_SMOOTH)
+    {
+        dql(I, J, K, M) = q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M);
+        dqr(I, J, K, M) = q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M);
+
+        dql(I, J, K, IR) = q(I, J, K, IR) * (dql(I, J, K, IR) / (q(I, J, K, IR) - 0.5 * dql(I, J, K, IR)));
+        dqr(I, J, K, IR) = q(I, J, K, IR) * (dqr(I, J, K, IR) / (q(I, J, K, IR) + 0.5 * dqr(I, J, K, IR)));
+        dql(I, J, K, IP) = q(I, J, K, IP) * (dql(I, J, K, IP) / (q(I, J, K, IP) - 0.5 * dql(I, J, K, IP)));
+        dqr(I, J, K, IP) = q(I, J, K, IP) * (dqr(I, J, K, IP) / (q(I, J, K, IP) + 0.5 * dqr(I, J, K, IP)));
+
+        ql(I, J, K, M) = q(I, J, K, M) + half * Third_Order_SMOOTH(dqr(I, J, K, M), dql(I, J, K, M));
+        qr(I, J, K, M) = q(I, J, K, M) - half * Third_Order_SMOOTH(dql(I, J, K, M), dqr(I, J, K, M));
+    }
+    else if (structureLimiter == ILMT_WENO3_JS)
+    {
+        //! Define WENO3-JS constants.
+        const RDouble epsilon = 1.0e-40;
+        const RDouble dk02 = 1.0 / 3.0, dk12 = 2.0 / 3.0;
+        RDouble4D beta0(I, J, K, M, fortranArray), beta1(I, J, K, M, fortranArray);
+        RDouble4D q02(I, J, K, M, fortranArray), q12(I, J, K, M, fortranArray);
+        RDouble4D alpha0(I, J, K, M, fortranArray), alpha1(I, J, K, M, fortranArray);
+
+        //! Smooth coefficient.
+        beta0(I, J, K, M) = (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)) * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M));
+        beta1(I, J, K, M) = (q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M)) * (q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M));
+
+        //! Non-linear weights (not normalized)
+        alpha0(I, J, K, M) = dk02 / ((beta0(I, J, K, M) + epsilon) * (beta0(I, J, K, M) + epsilon));
+        alpha1(I, J, K, M) = dk12 / ((beta1(I, J, K, M) + epsilon) * (beta1(I, J, K, M) + epsilon));
+
+        //! Candidate template
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M);
+
+        //! Compute ql and Normalize
+        ql(I, J, K, M) = (alpha0(I, J, K, M) * q02(I, J, K, M) + alpha1(I, J, K, M) * q12(I, J, K, M)) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+
+        //! Smooth coefficient
+        beta0(I, J, K, M) = (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)) * (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M));
+        beta1(I, J, K, M) = (q(I - il1, J - jl1, K - kl1, M) - q(I, J, K, M)) * (q(I - il1, J - jl1, K - kl1, M) - q(I, J, K, M));
+
+        //! Non-linear weights (not normalized)
+        alpha0(I, J, K, M) = dk02 / ((beta0(I, J, K, M) + epsilon) * (beta0(I, J, K, M) + epsilon));
+        alpha1(I, J, K, M) = dk12 / ((beta1(I, J, K, M) + epsilon) * (beta1(I, J, K, M) + epsilon));
+
+        //! Candidate template
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M);
+
+        //! Compute qr and normalize
+        qr(I, J, K, M) = (alpha0(I, J, K, M) * q02(I, J, K, M) + alpha1(I, J, K, M) * q12(I, J, K, M)) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+    }
+    else if (structureLimiter == ILMT_WENN3_PRM211)
+    {
+        //! Define WENN3_PRM211 constants.
+        const RDouble EPSILONTmp = 1.0e-45;
+        const RDouble DK02 = 1.0 / 3.0, DK12 = 2.0 / 3.0;
+        const RDouble C1 = 1.0, C20L = 7.0e7, C20R = 3.0e6, C21L = 1.0e5, C21R = 3.0e6;
+        const int M10 = 5, M11 = 4;
+
+        RDouble4D beta0(I, J, K, M, fortranArray), beta1(I, J, K, M, fortranArray);
+        RDouble4D q02(I, J, K, M, fortranArray), q12(I, J, K, M, fortranArray);
+        RDouble4D alpha0(I, J, K, M, fortranArray), alpha1(I, J, K, M, fortranArray);
+        RDouble4D w0(I, J, K, M, fortranArray), w1(I, J, K, M, fortranArray);
+
+        //! Smooth coefficient
+        beta0(I, J, K, M) = 1.0 / 4.0 * (3.0 * q(I, J, K, M) - 4.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M)) * (3.0 * q(I, J, K, M) - 4.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M))
+            + 13.0 / 12.0 * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M)) * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M));
+        beta1(I, J, K, M) = 1.0 / 4.0 * (3.0 * q(I, J, K, M) - 4.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M)) * (3.0 * q(I, J, K, M) - 4.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M))
+            + 13.0 / 12.0 * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M)) * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M));
+
+        //! Non-linear weights (not normalized).
+        alpha0(I, J, K, M) = DK02 / ((beta0(I, J, K, M) + EPSILONTmp) * (beta0(I, J, K, M) + EPSILONTmp));
+        alpha1(I, J, K, M) = DK12 / ((beta1(I, J, K, M) + EPSILONTmp) * (beta1(I, J, K, M) + EPSILONTmp));
+
+        //! Non-linear weights (not normalized).
+        w0(I, J, K, M) = alpha0(I, J, K, M) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+        w1(I, J, K, M) = alpha1(I, J, K, M) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+
+        for (int k = K.first(); k <= K.last(); ++k)
+        {
+            for (int j = 1 - jl1; j <= nj - 1 + jl1; ++j)
+            {
+                for (int i = 1 - il1; i <= ni - 1 + il1; ++i)
+                {
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+
+                        //! Map function.
+                        if (w0(i, j, k, m) <= DK02)
+                        {
+                            w0(i, j, k, m) = DK02 + (w0(i, j, k, m) - DK02) * (w0(i, j, k, m) - DK02) / ((w0(i, j, k, m) - DK02) + C20L * (w0(i, j, k, m) - DK02) * pow(w0(i, j, k, m), M10) - C1 * w0(i, j, k, m) * w0(i, j, k, m));
+                        }
+                        else
+                        {
+                            w0(i, j, k, m) = DK02 + (w0(i, j, k, m) - DK02) * (w0(i, j, k, m) - DK02) / ((w0(i, j, k, m) - DK02) + C20R * (w0(i, j, k, m) - DK02) * pow(1.0 - w0(i, j, k, m), M10) - C1 * (1.0 - w0(i, j, k, m)) * (1.0 - w0(i, j, k, m)));
+                        }
+                        if (w1(i, j, k, m) <= DK12)
+                        {
+                            w1(i, j, k, m) = DK12 + (w1(i, j, k, m) - DK12) * (w1(i, j, k, m) - DK12) / ((w1(i, j, k, m) - DK12) + C21L * (w1(i, j, k, m) - DK12) * pow(w1(i, j, k, m), M11) - C1 * w1(i, j, k, m) * w1(i, j, k, m));
+                        }
+                        else
+                        {
+                            w1(i, j, k, m) = DK12 + (w1(i, j, k, m) - DK12) * (w1(i, j, k, m) - DK12) / ((w1(i, j, k, m) - DK12) + C21R * (w1(i, j, k, m) - DK12) * pow(1.0 - w1(i, j, k, m), M11) - C1 * (1.0 - w1(i, j, k, m)) * (1.0 - w1(i, j, k, m)));
+                        }
+                    }
+                }
+            }
+        }
+        //! Candidate template.
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M);
+
+        //! Compute ql
+        ql(I, J, K, M) = (w0(I, J, K, M) * q02(I, J, K, M) + w1(I, J, K, M) * q12(I, J, K, M)) / (w0(I, J, K, M) + w1(I, J, K, M));
+
+
+        //! Smooth coefficient.
+        beta0(I, J, K, M) = 1.0 / 4.0 * (3.0 * q(I, J, K, M) - 4.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M)) * (3.0 * q(I, J, K, M) - 4.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M))
+            + 13.0 / 12.0 * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M)) * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M));
+        beta1(I, J, K, M) = 1.0 / 4.0 * (3.0 * q(I, J, K, M) - 4.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M)) * (3.0 * q(I, J, K, M) - 4.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M))
+            + 13.0 / 12.0 * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M)) * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M));
+
+        //! Non-linear weights(not normalized).
+        alpha0(I, J, K, M) = DK02 / ((beta0(I, J, K, M) + EPSILONTmp) * (beta0(I, J, K, M) + EPSILONTmp));
+        alpha1(I, J, K, M) = DK12 / ((beta1(I, J, K, M) + EPSILONTmp) * (beta1(I, J, K, M) + EPSILONTmp));
+
+        //! Non-linear weights(normalized).
+        w0(I, J, K, M) = alpha0(I, J, K, M) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+        w1(I, J, K, M) = alpha1(I, J, K, M) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+
+        for (int k = K.first(); k <= K.last(); ++k)
+        {
+            for (int j = 1 - jl1; j <= nj - 1 + jl1; ++j)
+            {
+                for (int i = 1 - il1; i <= ni - 1 + il1; ++i)
+                {
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        //! Map function.
+                        if (w0(i, j, k, m) <= DK02)
+                        {
+                            w0(i, j, k, m) = DK02 + (w0(i, j, k, m) - DK02) * (w0(i, j, k, m) - DK02) / ((w0(i, j, k, m) - DK02) + C20L * (w0(i, j, k, m) - DK02) * pow(w0(i, j, k, m), M10) - C1 * w0(i, j, k, m) * w0(i, j, k, m));
+                        }
+                        else
+                        {
+                            w0(i, j, k, m) = DK02 + (w0(i, j, k, m) - DK02) * (w0(i, j, k, m) - DK02) / ((w0(i, j, k, m) - DK02) + C20R * (w0(i, j, k, m) - DK02) * pow(1.0 - w0(i, j, k, m), M10) - C1 * (1.0 - w0(i, j, k, m)) * (1.0 - w0(i, j, k, m)));
+                        }
+                        if (w1(i, j, k, m) <= DK12)
+                        {
+                            w1(i, j, k, m) = DK12 + (w1(i, j, k, m) - DK12) * (w1(i, j, k, m) - DK12) / ((w1(i, j, k, m) - DK12) + C21L * (w1(i, j, k, m) - DK12) * pow(w1(i, j, k, m), M11) - C1 * w1(i, j, k, m) * w1(i, j, k, m));
+                        }
+                        else
+                        {
+                            w1(i, j, k, m) = DK12 + (w1(i, j, k, m) - DK12) * (w1(i, j, k, m) - DK12) / ((w1(i, j, k, m) - DK12) + C21R * (w1(i, j, k, m) - DK12) * pow(1.0 - w1(i, j, k, m), M11) - C1 * (1.0 - w1(i, j, k, m)) * (1.0 - w1(i, j, k, m)));
+                        }
+                    }
+                }
+            }
+        }
+
+        //! Candidate template.
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M);
+        //! 
+        qr(I, J, K, M) = (w0(I, J, K, M) * q02(I, J, K, M) + w1(I, J, K, M) * q12(I, J, K, M)) / (w0(I, J, K, M) + w1(I, J, K, M));
+    }
+    else if (structureLimiter == ILMT_WENN3_ZM)
+    {
+        //! Define WENN3_ZM constants.
+        const RDouble EPSILONTmp = 1.0e-40;
+        const RDouble DK02 = 1.0 / 3.0, DK12 = 2.0 / 3.0;
+        const RDouble C1 = 0.1, C2 = 0.1, C30 = 29.0, C31 = 29.0;
+
+        RDouble4D beta0(I, J, K, M, fortranArray), beta1(I, J, K, M, fortranArray), w0(I, J, K, M, fortranArray), w1(I, J, K, M, fortranArray), tau(I, J, K, M, fortranArray);
+        RDouble4D q02(I, J, K, M, fortranArray), q12(I, J, K, M, fortranArray), alpha0(I, J, K, M, fortranArray), alpha1(I, J, K, M, fortranArray);;
+
+        //! Smooth coefficient.
+        beta0(I, J, K, M) = (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)) * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M));
+        beta1(I, J, K, M) = 1.0 / 4.0 * (3.0 * q(I, J, K, M) - 4.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M)) *
+            (3.0 * q(I, J, K, M) - 4.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M))
+            + 13.0 / 12.0 * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M)) *
+            (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M));
+
+        for (int k = K.first(); k <= K.last(); ++k)
+        {
+            for (int j = 1 - jl1; j <= nj - 1 + jl1; ++j)
+            {
+                for (int i = 1 - il1; i <= ni - 1 + il1; ++i)
+                {
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+
+                        //! Global smooth coefficient.
+                        tau(i, j, k, m) = abs(1.0 / 4.0 * (q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m) - 3.0 * q(i + il1, j + jl1, k + kl1, m) - 21.0 * q(i, j, k, m) + 23.0 * q(i - il1, j - jl1, k - kl1, m))
+                            * (q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m) - 3.0 * q(i + il1, j + jl1, k + kl1, m) + 3.0 * q(i, j, k, m) - q(i - il1, j - jl1, k - kl1, m)));
+
+                        //! tau/beta
+                        w0(i, j, k, m) = tau(i, j, k, m) / (EPSILONTmp + beta0(i, j, k, m));
+                        w1(i, j, k, m) = tau(i, j, k, m) / (EPSILONTmp + beta1(i, j, k, m));
+
+                        //! Map function.
+                        if (w0(i, j, k, m) < C30)
+                        {
+                            w0(i, j, k, m) = w0(i, j, k, m) * w0(i, j, k, m) / (w0(i, j, k, m) + (C2 * w0(i, j, k, m) + C1) * (C30 - w0(i, j, k, m)) * (C30 - w0(i, j, k, m)));
+                        }
+                        if (w1(i, j, k, m) < C31)
+                        {
+                            w1(i, j, k, m) = w1(i, j, k, m) * w1(i, j, k, m) / (w1(i, j, k, m) + (C2 * w1(i, j, k, m) + C1) * (C31 - w1(i, j, k, m)) * (C31 - w1(i, j, k, m)));
+                        }
+                    }
+                }
+            }
+        }
+
+        //! Non-linear weights (not normalized).
+        alpha0(I, J, K, M) = DK02 * (1.0 + w0(I, J, K, M));
+        alpha1(I, J, K, M) = DK12 * (1.0 + w1(I, J, K, M));
+
+        //! Candidate template.
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M);
+
+        //! Compute ql.
+        ql(I, J, K, M) = (alpha0(I, J, K, M) * q02(I, J, K, M) + alpha1(I, J, K, M) * q12(I, J, K, M)) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+
+        //! Smooth coefficient.
+        beta0(I, J, K, M) = (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)) * (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M));
+        beta1(I, J, K, M) = 1.0 / 4.0 * (3.0 * q(I, J, K, M) - 4.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M)) *
+            (3.0 * q(I, J, K, M) - 4.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M))
+            + 13.0 / 12.0 * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M)) *
+            (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M));
+
+        for (int k = K.first(); k <= K.last(); ++k)
+        {
+            for (int j = 1 - jl1; j <= nj - 1 + jl1; ++j)
+            {
+                for (int i = 1 - il1; i <= ni - 1 + il1; ++i)
+                {
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+
+                        //! Global Smooth coefficient.
+                        tau(i, j, k, m) = abs(1.0 / 4.0 * (q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m) - 3.0 * q(i - il1, j - jl1, k - kl1, m) - 21.0 * q(i, j, k, m) + 23.0 * q(i + il1, j + jl1, k + kl1, m))
+                            * (q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m) - 3.0 * q(i - il1, j - jl1, k - kl1, m) + 3.0 * q(i, j, k, m) - q(i + il1, j + jl1, k + kl1, m)));
+
+                        //! tau/beta
+                        w0(i, j, k, m) = tau(i, j, k, m) / (EPSILONTmp + beta0(i, j, k, m));
+                        w1(i, j, k, m) = tau(i, j, k, m) / (EPSILONTmp + beta1(i, j, k, m));
+
+                        //! Map function.
+                        if (w0(i, j, k, m) <= C30)
+                        {
+                            w0(i, j, k, m) = w0(i, j, k, m) * w0(i, j, k, m) / (w0(i, j, k, m) + (C2 * w0(i, j, k, m) + C1) * (C30 - w0(i, j, k, m)) * (C30 - w0(i, j, k, m)));
+                        }
+                        if (w1(i, j, k, m) <= C31)
+                        {
+                            w1(i, j, k, m) = w1(i, j, k, m) * w1(i, j, k, m) / (w1(i, j, k, m) + (C2 * w1(i, j, k, m) + C1) * (C31 - w1(i, j, k, m)) * (C31 - w1(i, j, k, m)));
+                        }
+                    }
+                }
+            }
+        }
+
+        //! Non-linear weights (not normalized)
+        alpha0(I, J, K, M) = DK02 * (1.0 + w0(I, J, K, M));
+        alpha1(I, J, K, M) = DK12 * (1.0 + w1(I, J, K, M));
+
+        //! Candidate template.
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M);
+
+        //! Compute qr.
+        qr(I, J, K, M) = (alpha0(I, J, K, M) * q02(I, J, K, M) + alpha1(I, J, K, M) * q12(I, J, K, M)) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+    }
+    else if (structureLimiter == ILMT_WENN3_ZES2)
+    {
+        //! Define WENN3_ZES2 constants.
+        const RDouble EPSILONTmp = 1.0e-40;
+        const RDouble DK02 = 1.0 / 3.0, DK12 = 2.0 / 3.0;
+        const RDouble cAlpha = 0.15, cBeta1 = 0.15, cBeta0Max = 1.0, cBeta0Min = 1.0e-8, kc = 0.75, psic = 0.3;
+
+        RDouble df1, df2, df3, df4, kn, psi, sigma, kmkc, signkmkc;
+
+        RDouble4D w0(I, J, K, M, fortranArray), w1(I, J, K, M, fortranArray), cbeta0(I, J, K, M, fortranArray);
+        RDouble4D q02(I, J, K, M, fortranArray), q12(I, J, K, M, fortranArray), alpha0(I, J, K, M, fortranArray), alpha1(I, J, K, M, fortranArray);
+        RDouble4D beta20(I, J, K, M, fortranArray), beta21(I, J, K, M, fortranArray), beta0(I, J, K, M, fortranArray), beta1(I, J, K, M, fortranArray), tau(I, J, K, M, fortranArray);
+
+        beta20(I, J, K, M) = (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)) * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M));
+        beta21(I, J, K, M) = (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)) * (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M));
+
+        for (int k = K.first(); k <= K.last(); ++k)
+        {
+            for (int j = 1 - jl1; j <= nj - 1 + jl1; ++j)
+            {
+                for (int i = 1 - il1; i <= ni - 1 + il1; ++i)
+                {
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        // !Compute cbeta0.
+                        df1 = (q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m) - 8. * q(i - il1, j - jl1, k - kl1, m) + 8. * q(i + il1, j + jl1, k + kl1, m) - q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m)) / 12.;
+                        df2 = (-q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m) + 16. * q(i - il1, j - jl1, k - kl1, m) - 30. * q(i, j, k, m) + 16. * q(i + il1, j + jl1, k + kl1, m) - q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m)) / 12.;
+                        df3 = (-q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m) + 2. * q(i - il1, j - jl1, k - kl1, m) - 2. * q(i + il1, j + jl1, k + kl1, m) + q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m)) / 2.;
+                        df4 = (q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m) - 4. * q(i - il1, j - jl1, k - kl1, m) + 6. * q(i, j, k, m) - 4. * q(i + il1, j + jl1, k + kl1, m) + q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m));
+                        kn = sqrt((abs(df3) + abs(df4)) / (abs(df1) + abs(df2) + 1.0e-3));
+                        psi = 1. - abs(beta20(i, j, k, m) - beta21(i, j, k, m)) / (beta20(i, j, k, m) + beta21(i, j, k, m) + EPSILONTmp);
+                        psi = min(1.0, psi / psic);
+                        kmkc = kc - kn;
+                        signkmkc = 2.0 * (((signed char*)&kmkc)[sizeof(kmkc) - 1] >> 7) + 1.0;
+                        sigma = (1.0 + signkmkc) / 2. + (1.0 - signkmkc) / 2. * psi;
+                        cbeta0(i, j, k, m) = (cBeta0Min + sigma * sigma * (cBeta0Max - cBeta0Min));
+
+                    }
+                }
+            }
+        }
+
+        //! Smooth coefficient.
+        beta0(I, J, K, M) = beta20(I, J, K, M) + cbeta0 * (q(I - il1, J - jl1, K - kl1, M) - 2.0 * q(I, J, K, M) + q(I + il1, J + jl1, K + kl1, M)) * (q(I - il1, J - jl1, K - kl1, M) - 2.0 * q(I, J, K, M) + q(I + il1, J + jl1, K + kl1, M));
+        beta1(I, J, K, M) = beta21(I, J, K, M) + cBeta1 * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M)) * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M));
+
+        //! Global Smooth coefficient.
+        tau(I, J, K, M) = ((2. * q(I + il1, J + jl1, K + kl1, M) - 3. * q(I, J, K, M) + 1. * q(I - il1, J - jl1, K - kl1, M)) * (q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M) - 3. * q(I + il1, J + jl1, K + kl1, M) + 3. * q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)));
+
+        //! tau/beta
+        w0(I, J, K, M) = tau / (EPSILONTmp + beta0);
+        w1(I, J, K, M) = tau / (EPSILONTmp + beta1);
+
+        //! Non-linear weights(not normalized )
+        alpha0(I, J, K, M) = DK02 * (1.0 + cAlpha * w0(I, J, K, M) * w0(I, J, K, M));
+        alpha1(I, J, K, M) = DK12 * (1.0 + cAlpha * w1(I, J, K, M) * w1(I, J, K, M));
+
+        //! Candidate template.
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M);
+
+        //! Compute ql.
+        ql(I, J, K, M) = (alpha0(I, J, K, M) * q02(I, J, K, M) + alpha1(I, J, K, M) * q12(I, J, K, M)) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+
+        beta20(I, J, K, M) = (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)) * (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M));
+        beta21(I, J, K, M) = (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)) * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M));
+
+        for (int k = K.first(); k <= K.last(); ++k)
+        {
+            for (int j = 1 - jl1; j <= nj - 1 + jl1; ++j)
+            {
+                for (int i = 1 - il1; i <= ni - 1 + il1; ++i)
+                {
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+
+                        df1 = (q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m) - 8. * q(i + il1, j + jl1, k + kl1, m) + 8. * q(i - il1, j - jl1, k - kl1, m) - q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m)) / 12.;
+                        df2 = (-q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m) + 16. * q(i + il1, j + jl1, k + kl1, m) - 30. * q(i, j, k, m) + 16. * q(i - il1, j - jl1, k - kl1, m) - q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m)) / 12.;
+                        df3 = (-q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m) + 2. * q(i + il1, j + jl1, k + kl1, m) - 2. * q(i - il1, j - jl1, k - kl1, m) + q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m)) / 2.;
+                        df4 = (q(i + 2 * il1, j + 2 * jl1, k + 2 * kl1, m) - 4. * q(i + il1, j + jl1, k + kl1, m) + 6. * q(i, j, k, m) - 4. * q(i - il1, j - jl1, k - kl1, m) + q(i - 2 * il1, j - 2 * jl1, k - 2 * kl1, m));
+                        kn = sqrt((abs(df3) + abs(df4)) / (abs(df1) + abs(df2) + 1.0e-3));
+                        psi = 1. - abs(beta20(i, j, k, m) - beta21(i, j, k, m)) / (beta20(i, j, k, m) + beta21(i, j, k, m) + EPSILONTmp);
+                        psi = min(1.0, psi / psic);
+                        kmkc = kc - kn;
+                        signkmkc = 2.0 * (((signed char*)&kmkc)[sizeof(kmkc) - 1] >> 7) + 1.0;
+                        sigma = (1.0 + signkmkc) / 2. + (1.0 - signkmkc) / 2. * psi;
+                        cbeta0(i, j, k, m) = (cBeta0Min + sigma * sigma * (cBeta0Max - cBeta0Min));
+
+                    }
+                }
+            }
+        }
+
+        //! Smooth coefficient.
+        beta0(I, J, K, M) = beta20(I, J, K, M) + cbeta0 * (q(I + il1, J + jl1, K + kl1, M) - 2.0 * q(I, J, K, M) + q(I - il1, J - jl1, K - kl1, M)) * (q(I + il1, J + jl1, K + kl1, M) - 2.0 * q(I, J, K, M) + q(I - il1, J - jl1, K - kl1, M));
+        beta1(I, J, K, M) = beta21(I, J, K, M) + cBeta1 * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M)) * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M));
+
+        //! Global coefficient.
+        tau(I, J, K, M) = ((2. * q(I - il1, J - jl1, K - kl1, M) - 3. * q(I, J, K, M) + 1. * q(I + il1, J + jl1, K + kl1, M)) * (q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M) - 3. * q(I - il1, J - jl1, K - kl1, M) + 3. * q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)));
+
+        //! tau/beta
+        w0(I, J, K, M) = tau / (EPSILONTmp + beta0);
+        w1(I, J, K, M) = tau / (EPSILONTmp + beta1);
+
+        //! Non-linear weights(not normalized)
+        alpha0(I, J, K, M) = DK02 * (1.0 + cAlpha * w0(I, J, K, M) * w0(I, J, K, M));
+        alpha1(I, J, K, M) = DK12 * (1.0 + cAlpha * w1(I, J, K, M) * w1(I, J, K, M));
+
+        //! Candidate template.
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M);
+        //! Compute ql.
+        qr(I, J, K, M) = (alpha0(I, J, K, M) * q02(I, J, K, M) + alpha1(I, J, K, M) * q12(I, J, K, M)) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+    }
+    else if (structureLimiter == ILMT_WENN3_ZES3)
+    {
+        //! Define WENN3_ZES3 constants.
+        const RDouble EPSILONTmp = 1.0e-40;
+        const RDouble DK02 = 1.0 / 3.0, DK12 = 2.0 / 3.0;
+        const RDouble cBeta0 = 0.5, cBeta1 = 0.15, cAlpha = 0.4;
+
+        RDouble4D q02(I, J, K, M, fortranArray), q12(I, J, K, M, fortranArray), alpha0(I, J, K, M, fortranArray), alpha1(I, J, K, M, fortranArray);
+        RDouble4D tau(I, J, K, M, fortranArray), beta0(I, J, K, M, fortranArray), beta1(I, J, K, M, fortranArray), w0(I, J, K, M, fortranArray), w1(I, J, K, M, fortranArray), tmp(I, J, K, M, fortranArray);
+
+        //! Smooth coefficient.
+        beta0(I, J, K, M) = (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)) * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)) + cBeta0 * (q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I, J, K, M)) * (q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I, J, K, M));
+        beta1(I, J, K, M) = (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)) * (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)) + cBeta1 * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M)) * (q(I, J, K, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M));
+
+        //! Global smooth coefficient.
+        tau(I, J, K, M) = (2. * q(I + il1, J + jl1, K + kl1, M) - 3. * q(I, J, K, M) + 1. * q(I - il1, J - jl1, K - kl1, M)) * (q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M) - 3. * q(I + il1, J + jl1, K + kl1, M) + 3. * q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M));
+
+        //! tau(I, J, K, M)/beta
+        w0(I, J, K, M) = tau(I, J, K, M) / (EPSILONTmp + beta0(I, J, K, M));
+        w1(I, J, K, M) = tau(I, J, K, M) / (EPSILONTmp + beta1(I, J, K, M));
+
+        //! Non-linear weights(not normalized).
+        alpha0(I, J, K, M) = DK02 * (1.0 + cAlpha * w0(I, J, K, M) * w0(I, J, K, M));
+        alpha1(I, J, K, M) = DK12 * (1.0 + cAlpha * w1(I, J, K, M) * w1(I, J, K, M));
+
+        //! Candidate template. 
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M);
+
+        //! Compute ql and normalized.
+        ql(I, J, K, M) = (alpha0(I, J, K, M) * q02(I, J, K, M) + alpha1(I, J, K, M) * q12(I, J, K, M)) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+
+        //! Smooth coefficient.
+        beta0(I, J, K, M) = (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)) * (q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M)) + cBeta0 * (q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I, J, K, M)) * (q(I + 2 * il1, J + 2 * jl1, K + 2 * kl1, M) - 2.0 * q(I + il1, J + jl1, K + kl1, M) + q(I, J, K, M));
+        beta1(I, J, K, M) = (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)) * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)) + cBeta1 * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M)) * (q(I, J, K, M) - 2.0 * q(I - il1, J - jl1, K - kl1, M) + q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M));
+
+        //! Global smooth coefficient.
+        tau(I, J, K, M) = 1. * (2. * q(I - il1, J - jl1, K - kl1, M) - 3. * q(I, J, K, M) + 1. * q(I + il1, J + jl1, K + kl1, M)) * (q(I - 2 * il1, J - 2 * jl1, K - 2 * kl1, M) - 3. * q(I - il1, J - jl1, K - kl1, M) + 3. * q(I, J, K, M) - q(I + il1, J + jl1, K + kl1, M));
+
+        //! tau/beta
+        w0(I, J, K, M) = (tau(I, J, K, M) / (EPSILONTmp + beta0(I, J, K, M)));
+        w1(I, J, K, M) = (tau(I, J, K, M) / (EPSILONTmp + beta1(I, J, K, M)));
+
+        //! Non-linear weights(not normalized)
+        alpha0(I, J, K, M) = DK02 * (1.0 + cAlpha * w0(I, J, K, M) * w0(I, J, K, M));
+        alpha1(I, J, K, M) = DK12 * (1.0 + cAlpha * w1(I, J, K, M) * w1(I, J, K, M));
+
+        //! Candidate template.
+        q02(I, J, K, M) = -1.0 / 2.0 * q(I + il1, J + jl1, K + kl1, M) + 3.0 / 2.0 * q(I, J, K, M);
+        q12(I, J, K, M) = 1.0 / 2.0 * q(I, J, K, M) + 1.0 / 2.0 * q(I - il1, J - jl1, K - kl1, M);
+
+        //! Compute qr and normalized.
+        qr(I, J, K, M) = (alpha0(I, J, K, M) * q02(I, J, K, M) + alpha1(I, J, K, M) * q12(I, J, K, M)) / (alpha0(I, J, K, M) + alpha1(I, J, K, M));
+    }
+    else if (structureLimiter == ILMT_3rd_Minmod_SMOOTH)
+    {
+        dql(I, J, K, M) = q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M);
+        dqr(I, J, K, M) = q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M);
+
+        ql(I, J, K, M) = q(I, J, K, M) + half * Third_Order_Minmod_Smooth(dqr(I, J, K, M), dql(I, J, K, M));
+        qr(I, J, K, M) = q(I, J, K, M) - half * Third_Order_Minmod_Smooth(dql(I, J, K, M), dqr(I, J, K, M));
+    }
+    else if (structureLimiter == ILMT_SMOOTH)
+    {
+        dql(I, J, K, M) = q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M);
+        dqr(I, J, K, M) = q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M);
+
+        dqlr(I, J, K, M) = Smooth(dql(I, J, K, M), dqr(I, J, K, M));
+
+        ql(I, J, K, M) = q(I, J, K, M) + 0.25 * dqlr(I, J, K, M) * ((1.0 - MUSCLCoefXk * dqlr(I, J, K, M)) * dql(I, J, K, M) + (1.0 + MUSCLCoefXk * dqlr(I, J, K, M)) * dqr(I, J, K, M));
+        qr(I, J, K, M) = q(I, J, K, M) - 0.25 * dqlr(I, J, K, M) * ((1.0 - MUSCLCoefXk * dqlr(I, J, K, M)) * dqr(I, J, K, M) + (1.0 + MUSCLCoefXk * dqlr(I, J, K, M)) * dql(I, J, K, M));
+    }
+    else
+    {
+        if (structureLimiter == ILMT_MINMOD)
+        {
+            dql(I, J, K, M) = MinMod(q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M), MUSCLCoefXb * (q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M)));
+            dqr(I, J, K, M) = MinMod(q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M), MUSCLCoefXb * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)));
+        }
+        else if (structureLimiter == ILMT_VAN_ALBADA)
+        {
+            dql(I, J, K, M) = Vanalbada(q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M), q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M));
+            dqr(I, J, K, M) = Vanalbada(q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M), q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M));
+        }
+        else if (structureLimiter == ILMT_VAN_ALBADA_CLZ)
+        {
+            dql(I, J, K, M) = VanalbadaCLZ(q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M), q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M));
+            dqr(I, J, K, M) = VanalbadaCLZ(q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M), q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M));
+        }
+        else if (structureLimiter == ILMT_VANLEER)
+        {
+            dql(I, J, K, M) = Vanleer(q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M), MUSCLCoefXb * (q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M)));
+            dqr(I, J, K, M) = Vanleer(q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M), MUSCLCoefXb * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)));
+        }
+        else if (structureLimiter == ILMT_MIN_VAN)
+        {
+            dql(I, J, K, M) = Minvan(q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M), MUSCLCoefXb * (q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M)));
+            dqr(I, J, K, M) = Minvan(q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M), MUSCLCoefXb * (q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M)));
+        }
+        //clz end
+        else if (structureLimiter == ILMT_NOLIM)
+        {
+            dql(I, J, K, M) = q(I, J, K, M) - q(I - il1, J - jl1, K - kl1, M);
+            dqr(I, J, K, M) = q(I + il1, J + jl1, K + kl1, M) - q(I, J, K, M);
+        }
+        else if (structureLimiter == ILMT_FIRST)
+        {
+            dql(I, J, K, M) = 0;
+            dqr(I, J, K, M) = 0;
+        }
+
+        ql(I, J, K, M) = q(I, J, K, M) + c1 * dql(I, J, K, M) + c2 * dqr(I, J, K, M);
+        qr(I, J, K, M) = q(I, J, K, M) - c2 * dql(I, J, K, M) - c1 * dqr(I, J, K, M);
+    }
+    delete qProxy;
+}
+
+void NSSolverStruct::ComputeInviscidFlux(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    FieldProxy *fluxProxy = CreateFieldProxy(grid);
+
+    int structureScheme = GlobalDataBase::GetIntParaFromDB("str_scheme");
+    INVScheme inviscidScheme = GetINVScheme(structureScheme);
+
+    //! To compute the inviscid flux of the faces using the QL and QR.
+    InviscidFluxWrap(grid, qlProxy, qrProxy, fluxProxy, inviscidScheme, iSurface);
+
+//! To compute the summation of fluxes on faces.
+    LoadFlux(grid, fluxProxy, iSurface);
+
+    delete fluxProxy;
+}
+
+void NSSolverStruct::CorrectInviscidFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    if (nChemical == 0)
+    {
+        //! Apply the original method, it is no need to modify the flux on wall.
+        return;
+    }
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    if (wallTemperature < 0.0)
+    {
+        //! The adiabatic wall applies the original method.
+        return;
+    }
+
+    int viscousType = parameters->GetViscousType();
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    //! The non-dimensional value of wall temperature.
+    RDouble nondimensionalTemperatureWall = wallTemperature / refDimensionalTemperature;
+    RDouble temperatureWall[3] = { nondimensionalTemperatureWall, nondimensionalTemperatureWall, nondimensionalTemperatureWall };
+
+    //! Otherwise, to modify the flux of solid boundaries.
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+    RDouble4D &faceArea = *(grid->GetFaceArea());
+    RDouble4D &faceNormalVelocity = *(grid->GetFaceNormalVelocity());
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &faceFluxes = fluxProxy->GetField_STR();
+
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int nSpecies = nLaminar + nChemical - nNSEquation;
+
+    RDouble catalyticCoef = parameters->GetCatalyticCoef();
+    RDouble3D *surfaceMassFraction = 0;
+    if (nChemical > 0 && nSpecies > 0)    //! The fully catalytic wall condition.
+    {
+        surfaceMassFraction = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("surfaceMassFraction"));
+    }
+    int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+    RDouble3D *surfaceSlipVariables = NULL;
+    if (nSlipBCModel > 0)
+    {
+        surfaceSlipVariables = reinterpret_cast <RDouble3D *> (gridIn->GetDataPtr("surfaceSlipVariables"));
+    }
+
+    //! Save the variables and inviscid fluxes on wall.
+    RDouble *wallVariables = new RDouble[nEquation]();
+    RDouble *wallFluxes = new RDouble[nEquation]();
+
+    using namespace IDX;
+    RDouble gasConstant = gas->GetUniversalGasConstant();
+
+    RDouble normalComponentX = 0.0, normalComponentY = 0.0, normalComponentZ = 0.0, surfaceArea = 0.0;
+    RDouble relativeVelocity = 0.0, faceMotionVelocity = 0.0, totalEnthalpy = 0.0, vibrationEnergy = 0.0, electronEnergy = 0.0;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int indexOfWall = 0, indexOfCell = 0;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int nBCType = structBC->GetBCType();
+
+        if (!(IsWall(nBCType) && viscousType > INVISCID) && nBCType != PHENGLEI::ABLATION_SURFACE)
+        {
+            continue;
+        }
+
+        int *faceDirectionIndex = structBC->GetFaceDirectionIndex();
+        //! 0 stands for I-direction, 1 stands for J-direction, and 2 for K-direction.
+        int directionIndex = structBC->GetFaceDirection() + 1;
+        //! Judge the face is on the left side or right side in the current zone,-1 stands for left side, and 1 for right side.
+
+        int ist = 0, ied = 0, jst = 0, jed = 0, kst = 0, ked = 0;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (directionIndex != iSurface)
+        {
+            continue;
+        }
+
+        int id = 0, jd = 0, kd = 0;
+        GetBCFaceIDX(faceDirectionIndex, id, jd, kd);
+
+        kst = kst + kd;
+        ked = ked + kd;
+        jst = jst + jd;
+        jed = jed + jd;
+        ist = ist + id;
+        ied = ied + id;
+
+        indexOfCell = 0;
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! To obtain the variables on wall.
+                    if (nSlipBCModel > 0)
+                    {
+                        for (int m = 0; m < 3; ++ m)
+                        {
+                            temperatureWall[m] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m);
+                            wallVariables[m + 1] = (*surfaceSlipVariables)(indexOfWall, indexOfCell, m + 3);
+                        }
+                    }
+                    else
+                    {
+                        if (viscousType > INVISCID)
+                        {
+                            wallVariables[IU] = 0.0;
+                            wallVariables[IV] = 0.0;
+                            wallVariables[IW] = 0.0;
+                        }
+                        else
+                        {
+                            wallVariables[IU] = primitiveVariables(i, j, k, IU);
+                            wallVariables[IV] = primitiveVariables(i, j, k, IV);
+                            wallVariables[IW] = primitiveVariables(i, j, k, IW);
+                        }
+                    }
+                    wallVariables[IP] = primitiveVariables(i, j, k, IP);
+
+                    if (ABS(catalyticCoef) <= EPSILON && nBCType != PHENGLEI::ABLATION_SURFACE) //! Fully non-catalytic wall.
+                    {
+                        for (int m = nNSEquation; m < nNSEquation + nSpecies; ++ m)
+                        {
+                            wallVariables[m] = primitiveVariables(i, j, k, m);
+                        }
+                    }
+                    else //! Fully catalytic wall or finite catalytic wall.
+                    {
+                        for (int m = nNSEquation; m < nNSEquation + nSpecies; ++ m)
+                        {
+                            wallVariables[m] = (*surfaceMassFraction)(indexOfWall, indexOfCell, m - nNSEquation);
+                        }
+                    }
+
+                    //! The isothermal condition reveals that both vibration temperature and electron temperature \n.
+                    //! equal to translation-rotation temperature. Tve=Tv=Te=Tw.
+
+                    //! Compute density on wall.
+                    RDouble massReciprocal = gas->ComputeMolecularWeightReciprocal(wallVariables);
+                    wallVariables[IR] = wallVariables[IP] / (gasConstant * temperatureWall[ITT] * massReciprocal);
+
+                    //! The geometric variables on wall.
+                    normalComponentX = faceNormalComponentX(i, j, k, iSurface);
+                    normalComponentY = faceNormalComponentY(i, j, k, iSurface);
+                    normalComponentZ = faceNormalComponentZ(i, j, k, iSurface);
+                    surfaceArea = faceArea(i, j, k, iSurface);
+                    faceMotionVelocity = faceNormalVelocity(i, j, k, iSurface);
+
+                    //! Obtain the velocity on wall.
+                    relativeVelocity = wallVariables[IU] * normalComponentX + wallVariables[IV] * normalComponentY + wallVariables[IW] * normalComponentZ - faceMotionVelocity;
+                    //! Compute the total enthalpy.
+                    totalEnthalpy = gas->GetMixedGasEnthalpy(wallVariables, temperatureWall[ITT], temperatureWall[ITV], temperatureWall[ITE]); //Tve=Tv=Te=Tw
+                    totalEnthalpy += 0.5 * (pow(wallVariables[IU], 2) + pow(wallVariables[IV], 2) + pow(wallVariables[IW], 2));
+
+                    wallFluxes[IR] = wallVariables[IR] * relativeVelocity;
+                    wallFluxes[IU] = wallFluxes[IR] * wallVariables[IU] + wallVariables[IP] * normalComponentX;
+                    wallFluxes[IV] = wallFluxes[IR] * wallVariables[IV] + wallVariables[IP] * normalComponentY;
+                    wallFluxes[IW] = wallFluxes[IR] * wallVariables[IW] + wallVariables[IP] * normalComponentZ;
+                    wallFluxes[IP] = wallFluxes[IR] * totalEnthalpy + wallVariables[IP] * faceMotionVelocity;
+                    for (int m = nNSEquation; m < nLaminar; ++ m)
+                    {
+                        wallFluxes[m] = wallFluxes[IR] * wallVariables[m];
+                    }
+
+                    if (nChemical == 1)
+                    {
+                        wallFluxes[nLaminar] = 0.0;
+                    }
+                    if (nTemperatureModel > 1)
+                    {
+                        //! Compute the internal energy flux of vibration and electron.
+                        vibrationEnergy = gas->GetMixedGasVibrationEnergy(wallVariables, temperatureWall[ITV]);   //! Tve=Tv=Te=Tw.
+                        electronEnergy = gas->GetMixedGasElectronEnergy(wallVariables, temperatureWall[ITE]);     //! Tve=Tv=Te=Tw.
+
+                        RDouble ceDivideMe = 0.0, peDivideDensity = 0.0;
+                        massReciprocal = gas->ComputeMolecularWeightReciprocalWithoutElectron(wallVariables, ceDivideMe);
+                        peDivideDensity = gasConstant * temperatureWall[ITE] * ceDivideMe;     //! Tve=Tv=Te=Tw.
+
+                        if (nTemperatureModel == 2)         //! Two-Temperature model.
+                        {
+                            wallFluxes[nLaminar + nChemical] = wallFluxes[IR] * (vibrationEnergy + electronEnergy + peDivideDensity) + wallVariables[IR] * peDivideDensity * faceMotionVelocity;
+                        }
+                        else if (nTemperatureModel == 3)    //! Three-Temperature model.
+                        {
+                            wallFluxes[nLaminar + nChemical] = wallFluxes[IR] * vibrationEnergy;
+                            wallFluxes[nLaminar + nChemical + 1] = wallFluxes[IR] * (electronEnergy + peDivideDensity) + wallVariables[IR] * peDivideDensity * faceMotionVelocity;
+                        }
+                    }
+
+                    //! Modify inviscid flux.
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        faceFluxes(i, j, k, m) = wallFluxes[m] * surfaceArea;
+#ifdef USE_ERROR_DATA_DEBUG
+                        if (isErrorData(faceFluxes(i, j, k, m)))
+                        {
+                            int zoneID = grid->GetZoneID();
+                            PrintToWindow(" zoneID = ", zoneID, "i = ", i, "j = ", j, "k = ", k, "m = ", m);
+                            TK_Exit::ExceptionExit("This is in function CorrectInviscidFlux", true);
+                        }
+#endif
+                    }
+                    //! Next grid cell.
+                    ++ indexOfCell;
+                }//! i end.
+            } //! j end.
+        } //! k end.
+        ++ indexOfWall; //! Next surface regions.
+    }//! iBCRegion end.
+    delete[]wallVariables;    wallVariables = NULL;
+    delete[]wallFluxes;    wallFluxes = NULL;
+}
+
+FaceProxy *NSSolverStruct::CreateFaceProxy(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int nEquation = GetNumberOfEquations();
+
+    int nlen = MAX(MAX(ni, nj), nk);
+
+    FaceProxy *faceProxy = new FaceProxy();
+    faceProxy->Create(nlen, nEquation);
+
+    return faceProxy;
+}
+
+GeomProxy *NSSolverStruct::CreateGeomProxy(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int nlen = MAX(MAX(ni, nj), nk);
+
+    GeomProxy *geomProxy = new GeomProxy();
+    geomProxy->Create(nlen);
+
+    return geomProxy;
+}
+
+bool iterijk(int &i, int &j, int &k, int ist, int ied, int jst, int jed, int kst, int ked)
+{
+    ++ i;
+    if (i <= ied)
+    {
+        return true;
+    }
+    else
+    {
+        i = ist;
+        ++ j;
+        if (j <= jed)
+        {
+            return true;
+        }
+        else
+        {
+            j = jst;
+            ++ k;
+            if (k <= ked)
+            {
+                return true;
+            }
+            else
+            {
+                return false;
+            }
+        }
+    }
+}
+
+bool NSSolverStruct::GetInviscidFaceValue(Grid *gridIn, FaceProxy *faceProxy, StructIter *structIter, FieldProxy *qlProxy, FieldProxy *qrProxy, int nlen)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &ql = qlProxy->GetField_STR();
+    RDouble4D &qr = qrProxy->GetField_STR();
+
+    RDouble4D &gxfn = *(grid->GetFaceNormalX());
+    RDouble4D &gyfn = *(grid->GetFaceNormalY());
+    RDouble4D &gzfn = *(grid->GetFaceNormalZ());
+    RDouble4D &garea = *(grid->GetFaceArea());
+    RDouble4D &gvgn = *(grid->GetFaceNormalVelocity());
+
+    int nEquation = GetNumberOfEquations();
+    int nEnergyRecycle = parameters->GetnEnergyRecycle();
+
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble3D &rtem = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("rtem"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+    using namespace IDX;
+
+    GeomProxy *geomProxy = faceProxy->GetGeomProxy();
+
+    RDouble *xfn = geomProxy->GetFaceNormalX();
+    RDouble *yfn = geomProxy->GetFaceNormalY();
+    RDouble *zfn = geomProxy->GetFaceNormalZ();
+    RDouble *area = geomProxy->GetFaceArea();
+    RDouble *vgn = geomProxy->GetFaceVelocity();
+
+    RDouble *gamal = faceProxy->GetGamaL();
+    RDouble *gamar = faceProxy->GetGamaR();
+
+    RDouble **temperatureL = faceProxy->GetLeftTemperature();
+    RDouble **temperatureR = faceProxy->GetRightTemperature();
+
+    RDouble **face_ql = faceProxy->GetQL();
+    RDouble **face_qr = faceProxy->GetQR();
+
+    RDouble *lrtl = faceProxy->GetPressureCoefficientL();
+    RDouble *lrtr = faceProxy->GetPressureCoefficientR();
+    RDouble *primitiveVarL = new RDouble[nEquation];
+    RDouble *primitiveVarR = new RDouble[nEquation];
+    RDouble leftTemperature[3], rightTemperature[3];
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+    RDouble3D *timeCoefficientInverse = NULL;
+    RDouble3D *preconCoefficient = NULL;
+    RDouble *timeCoeffL =NULL;
+    RDouble *timeCoeffR =NULL;
+    RDouble *preconCoeffL =NULL;
+    RDouble *preconCoeffR =NULL;
+    if (ifLowSpeedPrecon != 0)
+    {
+        timeCoefficientInverse = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("timeCoefficientInverse"));
+        preconCoefficient = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+        timeCoeffL = faceProxy->GetTimeCoefficientL();
+        timeCoeffR = faceProxy->GetTimeCoefficientR();
+        preconCoeffL = faceProxy->GetPreconCoefficientL();
+        preconCoeffR = faceProxy->GetPreconCoefficientR();
+    }
+
+    bool flag = false;
+
+    int i = structIter->i0;
+    int j = structIter->j0;
+    int k = structIter->k0;
+
+    int il1 = structIter->il1;
+    int jl1 = structIter->jl1;
+    int kl1 = structIter->kl1;
+
+    int iSurface = structIter->nsurf;
+
+    int ist = structIter->ist;
+    int ied = structIter->ied;
+    int jst = structIter->jst;
+    int jed = structIter->jed;
+    int kst = structIter->kst;
+    int ked = structIter->ked;
+
+    int ix = 0;
+
+    do
+    {
+        int il = i + il1;
+        int jl = j + jl1;
+        int kl = k + kl1;
+
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            face_ql[m][ix] = ql(i, j, k, m);
+            face_qr[m][ix] = qr(il, jl, kl, m);
+
+            primitiveVarL[m] = face_ql[m][ix];
+            primitiveVarR[m] = face_qr[m][ix];
+        }
+
+        lrtl[ix] = rtem(i, j, k);
+        lrtr[ix] = rtem(il, jl, kl);
+
+        gamal[ix] = gamma(i, j, k);
+        gamar[ix] = gamma(il, jl, kl);
+
+        if (ifLowSpeedPrecon != 0)
+        {
+            timeCoeffL[ix] = (*timeCoefficientInverse)(i, j, k);
+            timeCoeffR[ix] = (*timeCoefficientInverse)(il, jl, kl);
+            preconCoeffL[ix] = (*preconCoefficient)(i, j, k);
+            preconCoeffR[ix] = (*preconCoefficient)(il, jl, kl);
+        }
+
+        leftTemperature[0] = t(i, j, k, mTT);
+        rightTemperature[0] = t(il, jl, kl, mTT);
+
+        leftTemperature[1] = t(i, j, k, mTV);
+        rightTemperature[1] = t(il, jl, kl, mTV);
+
+        leftTemperature[2] = t(i, j, k, mTE);
+        rightTemperature[2] = t(il, jl, kl, mTE);
+
+        //! To obtain the left and right temperature.
+        if (nEnergyRecycle == 1)
+        {
+            gas->GetTemperatureR(primitiveVarL, leftTemperature[0], leftTemperature[1], leftTemperature[2]);
+            gas->GetTemperatureR(primitiveVarR, rightTemperature[0], rightTemperature[1], rightTemperature[2]);
+
+            /* gas->ComputeGama(&primitiveVarL[IP+1], leftTemperature[0], gamal[ix]);
+                gas->ComputeGama(&primitiveVarR[IP+1], rightTemperature[0], gamar[ix]);*/
+
+        }
+        else if (nEnergyRecycle == 0)
+        {
+            gas->GetTemperature(primitiveVarL, leftTemperature[0], leftTemperature[1], leftTemperature[2]);
+            gas->GetTemperature(primitiveVarR, rightTemperature[0], rightTemperature[1], rightTemperature[2]);
+        }
+        /*else
+        {
+            gas->GetTemperatureR2(primitiveVarL, leftTemperature[0], leftTemperature[1], leftTemperature[2]);
+            gas->GetTemperatureR2(primitiveVarR, rightTemperature[0], rightTemperature[1], rightTemperature[2]);
+
+            for (int m = 0; m < nEquation; ++  m)
+            {
+                face_ql[m][ix] = primitiveVarL[m];
+                face_qr[m][ix] = primitiveVarR[m];
+            }
+        }*/
+
+
+        xfn[ix] = gxfn(il, jl, kl, iSurface);
+        yfn[ix] = gyfn(il, jl, kl, iSurface);
+        zfn[ix] = gzfn(il, jl, kl, iSurface);
+        area[ix] = garea(il, jl, kl, iSurface);
+        vgn[ix] = gvgn(il, jl, kl, iSurface);
+
+        temperatureL[0][ix] = leftTemperature[mTT];
+        temperatureR[0][ix] = rightTemperature[mTT];
+
+        temperatureL[1][ix] = leftTemperature[mTV];
+        temperatureR[1][ix] = rightTemperature[mTV];
+
+        temperatureL[2][ix] = leftTemperature[mTE];
+        temperatureR[2][ix] = rightTemperature[mTE];
+
+        ++ ix;
+
+        flag = iterijk(i, j, k, ist, ied, jst, jed, kst, ked);
+    } while (flag && ix < nlen);
+
+    delete[] primitiveVarL;
+    delete[] primitiveVarR;
+
+    structIter->i1 = i;
+    structIter->j1 = j;
+    structIter->k1 = k;
+
+    structIter->nsize = ix;
+
+    return flag;
+}
+
+bool NSSolverStruct::LoadFaceFlux(Grid *gridIn, FaceProxy *faceProxy, StructIter *structIter, FieldProxy *fluxProxy, int nlen)
+{
+    RDouble4D &flux = fluxProxy->GetField_STR();
+
+    int nEquation = GetNumberOfEquations();
+
+    GeomProxy *geomProxy = faceProxy->GetGeomProxy();
+    RDouble *area = geomProxy->GetFaceArea();
+    RDouble **faceFlux = faceProxy->GetFlux();
+
+    bool flag = false;
+
+    int i = structIter->i0;
+    int j = structIter->j0;
+    int k = structIter->k0;
+
+    int il1 = structIter->il1;
+    int jl1 = structIter->jl1;
+    int kl1 = structIter->kl1;
+
+    int ist = structIter->ist;
+    int ied = structIter->ied;
+    int jst = structIter->jst;
+    int jed = structIter->jed;
+    int kst = structIter->kst;
+    int ked = structIter->ked;
+
+    int il, jl, kl;
+
+    int ix = 0;
+
+    do
+    {
+        il = i + il1;
+        jl = j + jl1;
+        kl = k + kl1;
+
+        RDouble &areas = area[ix];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            flux(il, jl, kl, m) = faceFlux[m][ix] * areas;
+        }
+        ++ ix;
+
+        flag = iterijk(i, j, k, ist, ied, jst, jed, kst, ked);
+    } while (flag && ix < nlen);
+
+    structIter->i1 = i;
+    structIter->j1 = j;
+    structIter->k1 = k;
+
+    structIter->nsize = ix;
+
+    return flag;
+}
+
+void NSSolverStruct::InviscidFluxWrap(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, FieldProxy *fluxProxy, INVScheme invScheme, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    FaceProxy *faceProxy = CreateFaceProxy(grid);
+    faceProxy->SetGeomProxy(CreateGeomProxy(grid));
+
+    Param_NSSolverStruct *parameters = this->GetControlParameters();
+
+    int nlen = MAX(MAX(ni, nj), nk);
+    //int nlen = 10;
+
+    //int iFaceStart = 0, iFaceEnd = 0, jFaceStart = 0, jFaceEnd = 0, kFaceStart = 0, kFaceEnd = 0;
+    //grid->GetFaceIterationIndex(iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd, iSurface);
+
+    StructIter *structIter = CreateInvStructIter(grid, iSurface);
+
+    // nlen = max( nlen, structIter->surfaceSize);
+
+    int nface = 0;
+
+    do
+    {
+        GetInviscidFaceValue(grid, faceProxy, structIter, qlProxy, qrProxy, nlen);
+        faceProxy->setsize(structIter->nsize);
+        nface += structIter->nsize;
+
+        InviscidSchemeParameter invSchemeParaProxy;
+        SetInviscidSchemeParameters(&invSchemeParaProxy, faceProxy, parameters);
+
+        //! Compute the fluxes on the faces using the QL and QR.
+        //! The variable faceProxy stores the new computation values.
+        invScheme(faceProxy, &invSchemeParaProxy);
+
+        bool hasNext = LoadFaceFlux(grid, faceProxy, structIter, fluxProxy, nlen);
+
+        if (!hasNext) break;
+
+        structIter->i0 = structIter->i1;
+        structIter->j0 = structIter->j1;
+        structIter->k0 = structIter->k1;
+    } while (true);
+
+    delete faceProxy;
+    delete structIter;
+}
+
+StructIter *NSSolverStruct::CreateInvStructIter(Grid *gridIn, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    int iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd;
+    grid->GetFaceIterationIndex(iFaceStart, iFaceEnd, jFaceStart, jFaceEnd, kFaceStart, kFaceEnd, iSurface);
+
+    StructIter *structIter = new StructIter();
+
+    structIter->i0 = iFaceStart;
+    structIter->j0 = jFaceStart;
+    structIter->k0 = kFaceStart;
+
+    structIter->il1 = il1;
+    structIter->jl1 = jl1;
+    structIter->kl1 = kl1;
+
+    structIter->ist = iFaceStart;
+    structIter->ied = iFaceEnd;
+    structIter->jst = jFaceStart;
+    structIter->jed = jFaceEnd;
+    structIter->kst = kFaceStart;
+    structIter->ked = kFaceEnd;
+
+    structIter->nsurf = iSurface;
+
+    // structIter->surfaceSize = (iFaceEnd - iFaceStart + 1) * (jFaceEnd - jFaceStart + 1) * (kFaceEnd - kFaceStart + 1);
+
+    return structIter;
+}
+
+void NSSolverStruct::Diagonal(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    RDouble3D &vol = *(grid->GetCellVolume());
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int nChemicalRadius = parameters->GetNChemicalRadius();
+    int nChemicalSource = parameters->GetNChemicalSource();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int isUseLocalCFL = parameters->GetLocalCFLFlag();
+
+    RDouble ChemicalSpectrumRadiusCoef = parameters->GetChemicalSpectrumRadiusCoef();
+    RDouble ViscousSpectrumRadiusCoef = parameters->GetViscousSpectrumRadiusCoef();
+    RDouble InviscidSpectrumRadiusCoef = parameters->GetInviscidSpectrumRadiusCoef();
+
+    RDouble4D &diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+    RDouble4D &diagonal0 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal0"));
+    RDouble4D &diagonal1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal1"));
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+
+    RDouble4D &srs = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("srs"));
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+
+    Range M(0, nEquation - 1);
+
+    int nDim = GetDim();
+
+    RDouble odt, rad, rad_euler, rad_ns, odt1;
+    RDouble wmig = 1.0;
+    RDouble beta = 1.0;
+    RDouble betw = beta * wmig;
+
+    RDouble dualTimeSpectrumC1 = zero;
+    RDouble dualTimeSpectrumC2 = one;
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble dualTimeCoefficient[7];
+        const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+        ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+        dualTimeSpectrumC1 = -dualTimeCoefficient[3];
+        dualTimeSpectrumC2 = dualTimeCoefficient[6];
+    }
+
+    RDouble viscousSpectrumC1 = zero;
+
+    int viscousType = parameters->GetViscousType();
+    if (viscousType > INVISCID)
+    {
+        viscousSpectrumC1 = ViscousSpectrumRadiusCoef;
+    }
+
+    int nDiagonalModified = gas->GetnDiagonalModified();
+    if(nDiagonalModified ==0)
+    {
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                odt = dualTimeSpectrumC1 * vol(i, j, k) + dualTimeSpectrumC2 / dt(i, j, k);
+
+                rad_euler = invSpectralRadius(i, j, k, 0);
+                rad_ns = visSpectralRadius(i, j, k, 0);
+                for (int iSurface = 1; iSurface < nDim; ++ iSurface)
+                {
+                    rad_euler += invSpectralRadius(i, j, k, iSurface);
+                    rad_ns += visSpectralRadius(i, j, k, iSurface);   //! Modified by clz : 2012-7-19.
+                }
+                //rad = rad_euler + viscousSpectrumC1 * rad_ns;
+                rad = rad_euler * InviscidSpectrumRadiusCoef + viscousSpectrumC1 * rad_ns;
+                rad *= betw;
+
+                for (int m = 0; m < nEquation; ++ m)       //! Here is nl, not nEquation.
+                {
+                        diagonal(i, j, k, m)  = odt + rad;
+                }
+
+                if (isUseLocalCFL == 1)
+                {
+                    odt1 = dualTimeSpectrumC1 * vol(i, j, k) + dualTimeSpectrumC2 / (2.0 * dt(i, j, k));
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        diagonal1(i, j, k, m) = odt1 + rad;
+                    }
+                }
+
+            }
+        }
+    }
+    }
+    else
+    {
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    rad_euler = invSpectralRadius(i, j, k, 0);
+                    rad_ns = visSpectralRadius(i, j, k, 0);
+                    for (int iSurface = 1; iSurface < nDim; ++ iSurface)
+                    {
+                        rad_euler += invSpectralRadius(i, j, k, iSurface);
+                        rad_ns += visSpectralRadius(i, j, k, iSurface);   //! Modified by clz : 2012-7-19.
+                    }
+                    rad = rad_euler * InviscidSpectrumRadiusCoef + viscousSpectrumC1 * rad_ns;
+                    rad *= betw;
+
+                    for (int m = 0; m < nEquation; ++ m)       //! Here is nl, not nEquation.
+                    {
+                        diagonal(i, j, k, m)  = rad;
+                        diagonal0(i, j, k, m) = rad_euler + rad_ns;
+                    }
+                }
+            }
+        }
+    
+        GhostCell3D(diagonal0, ni, nj, nk, nEquation);
+
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    odt = dualTimeSpectrumC1 * vol(i, j, k) + dualTimeSpectrumC2 / dt(i, j, k);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        diagonal(i, j, k, m) += odt;
+                    }
+                }
+            }
+        }
+    }
+
+    //clz begin
+    if (nChemical == 1 && nChemicalSource == 1 && nChemicalRadius == 1)
+    {
+        int nSpeciesEquation = gas->GetSpeciesEquationNumber();
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+
+                    for (int s = 0; s < nSpeciesEquation; ++ s)
+                    {
+                        diagonal(i, j, k, nNSEquation + s) -= srs(i, j, k, s) * ChemicalSpectrumRadiusCoef;
+                    }
+                    for (int it = 0; it < nTemperatureModel - 1; ++ it)
+                    {
+                        diagonal(i, j, k, nNSEquation + numberOfSpecies + it) -= srs(i, j, k, numberOfSpecies + it) * ChemicalSpectrumRadiusCoef;
+                    }
+
+                    if (isUseLocalCFL == 1)
+                    {
+                        for (int s = 0; s < nSpeciesEquation; ++ s)
+                        {
+                            diagonal1(i, j, k, nNSEquation + s) -= srs(i, j, k, s) * ChemicalSpectrumRadiusCoef;
+                        }
+                        for (int it = 0; it < nTemperatureModel - 1; ++ it)
+                        {
+                            diagonal1(i, j, k, nNSEquation + numberOfSpecies + it) -= srs(i, j, k, numberOfSpecies + it) * ChemicalSpectrumRadiusCoef;
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    //clz end
+    GhostCell3D(diagonal, ni, nj, nk, nEquation);
+    //grid->GhostCell3DExceptInterface(diagonal, nEquation);
+    if (isUseLocalCFL == 1)
+    {
+        GhostCell3D(diagonal1, ni, nj, nk, nEquation);
+    }
+}
+
+void NSSolverStruct::ComputeTimeScale(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    //grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble4D &timeScale = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("timeScale"));
+    RDouble4D &noneqNumber = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("noneqNumber"));
+    //RDouble3D &damkohlerNumber = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("DamkohlerNumber"));
+    //RDouble3D &vibNoneqNumber = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("VibNoneqNumber"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nTModel = parameters->GetTemperatureModel();
+    int nIndexOfElectron = parameters->GetIndexOfElectron();
+    RDouble refLenth = GlobalDataBase::GetDoubleParaFromDB("reynoldsReferenceLengthDimensional");
+    RDouble refVelocity = parameters->GetRefDimensionalVelocity();
+    RDouble refCoef = refLenth / refVelocity;
+    RDouble refDensity = parameters->GetRefDimensionalDensity();
+    RDouble refTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble refDynamicPressure = refDensity * refVelocity * refVelocity;
+
+    int nDim = GetDim();
+    using namespace IDX;
+    using namespace GAS_SPACE;
+    int nIndex[4], nReactions = 4;
+    nIndex[0] = gas->GetSpeciesIndex("O2"); //The dissociation reaction of Oxygen(O2).
+    nIndex[1] = gas->GetSpeciesIndex("N2"); //The dissociation reaction of Nitric Oxide(N2).
+    nIndex[2] = gas->GetSpeciesIndex("O");  //The ionization reaction of atomic Oxygen(O).
+    nIndex[3] = gas->GetSpeciesIndex("N");  //The ionization reaction of atomic Nitrogen(N).
+    RDouble speciesMass[4] = {0.032, 0.028, 0.016, 0.014};
+    RDouble speciesDensity[4];
+    if (nIndexOfElectron < 0) //No ionization reactions.
+    {
+        nReactions = 2;
+    }
+
+    //The basic chemical reactions are the dissociations and recombinations of Oxygen, Nitrogen and Nitric Oxide.
+    //The last three reactions are the ionizations of atomic oxygen, atomic nitrogen, and the Nitric Oxide.
+    RDouble coefA[8] = {1.0e16, 1.3353e5, 3.0e16, 3.1837e5, 3.9e27, 2.0798e20, 2.5e28, 1.0557e21};
+    RDouble coefB[8] = {-1.5, -0.5, -1.6, -0.6, -3.78, -2.78, -3.82, -2.82};
+    RDouble coefC[8] = {6.005e4, 0.0, 1.1392e5, 0.0, 1.6108e5, 0.0, 1.7175e5, 0.0};
+    RDouble kf = 0.0, tmin = 0.0, tchem = 0.0, Tf = 0.0, pf = 0.0;
+    RDouble C1[3] = {5.42e-5, 7.12e-3, 4.86e-3}, C2[3] = {2.95e6, 1.91e6, 1.37e5};
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                //Obtain the minmum time of flow.
+                tmin = timeScale(i, j, k, 0);
+                for (int iSurface = 1; iSurface < nDim; ++ iSurface)
+                {
+                    tmin = MIN(tmin, timeScale(i, j, k, iSurface));
+                }
+                //Save the time size of flow.
+                timeScale(i, j, k, 0) = tmin * refCoef;
+
+                //Obtain the temperature.
+                Tf = temperatures(i, j, k, ITT) * refTemperature;
+                //Obtain the mass fractions.
+                for (int s = 0; s < nReactions; ++ s)
+                {
+                    speciesDensity[s] = refDensity * primitiveVariables(i, j, k, nNSEquation + nIndex[s]);
+                }
+                //Compute the time size of chemical reactions.
+                tmin = LARGE;
+                for (int s = 0; s < nReactions; ++ s)
+                {
+                    kf = coefA[2 * s] * pow(Tf, coefB[2 * s]) * exp(-coefC[2 * s] / Tf);
+                    tchem = (1.0 / kf) * speciesMass[s] / speciesDensity[s];
+                    tmin = MIN(tmin, tchem);
+                }
+                timeScale(i, j, k, 1) = tmin;
+                //Compute the Damkohler number.
+                noneqNumber(i, j, k, 0) = timeScale(i, j, k, 0) / timeScale(i, j, k, 1);
+                //damkohlerNumber(i, j, k) = timeScale(i, j, k, 0) / timeScale(i, j, k, 1);
+
+                if (nTModel > 1)
+                {
+                    pf = primitiveVariables(i, j, k, IP) * refDynamicPressure;
+                    tmin = LARGE;
+                    for (int s = 0; s < 3; ++ s)
+                    {
+                        tchem = (C1[s] / pf) * exp(pow(C2[s] / Tf, 1.0/3.0));
+                        tmin = MIN(tmin, tchem);
+                    }
+                    timeScale(i, j, k, 2) = tmin;
+                    //The vibrational non-equilibrium number.
+                    noneqNumber(i, j, k, 1) = timeScale(i, j, k, 0) / timeScale(i, j, k, 2);
+                    //vibNoneqNumber(i, j, k) = timeScale(i, j, k, 0) / timeScale(i, j, k, 2);
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::ComputeFlowTimeScale(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    //grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, TWO_GHOST_LAYER);
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+    RDouble4D &area = *(grid->GetFaceArea());
+    RDouble4D &vgn = *(grid->GetFaceNormalVelocity());
+
+    int nDim = GetDim();
+    RDouble3D &gridCellVolume = *(grid->GetCellVolume());
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D *timeScale = NULL;
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    if (nChemical > 0)
+    {
+        timeScale = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("timeScale"));
+    }
+
+    using namespace IDX;
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        int il1, jl1, kl1;
+        grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+        for (int k = kCellStart; k <= kCellEnd; ++ k)
+        {
+            for (int j = jCellStart; j <= jCellEnd; ++ j)
+            {
+                for (int i = iCellStart; i <= iCellEnd; ++ i)
+                {
+                    int il, jl, kl;
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    RDouble um = q(i, j, k, IU);
+                    RDouble vm = q(i, j, k, IV);
+                    RDouble wm = q(i, j, k, IW);
+
+                    RDouble nx = half * (xfv(i, j, k, iSurface) + xfv(il, jl, kl, iSurface));
+                    RDouble ny = half * (yfv(i, j, k, iSurface) + yfv(il, jl, kl, iSurface));
+                    RDouble nz = half * (zfv(i, j, k, iSurface) + zfv(il, jl, kl, iSurface));
+                    RDouble ub = half * (vgn(i, j, k, iSurface) * area(i, j, k, iSurface) + vgn(il, jl, kl, iSurface) * area(il, jl, kl, iSurface));
+                    RDouble vn = nx * um + ny * vm + nz * wm - ub;
+
+                    (*timeScale)(i, j, k, iSurface - 1) = gridCellVolume(i, j, k) / ABS(vn);
+
+                }
+            }
+        }
+    }
+}
+
+#ifdef SMARTARRAY
+//! With faster, smart array optimization.
+void NSSolverStruct::SolveLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal)
+{
+    PrintToWindow("Warning: need to check the optimized code, after consider multi-sweep!");
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &dq = dqProxy->GetField_STR();
+    RDouble4D &deltaFlux = LUplusDQ->GetField_STR();
+
+    RDouble4D &gxfn = *(grid->GetFaceNormalX());
+    RDouble4D &gyfn = *(grid->GetFaceNormalY());
+    RDouble4D &gzfn = *(grid->GetFaceNormalZ());
+    RDouble4D &gvgn = *(grid->GetFaceNormalVelocity());
+    RDouble4D &garea = *(grid->GetFaceArea());
+    RDouble3D &gvol = *(grid->GetCellVolume());
+
+    int *iBlank = grid->GetCellTypeContainer();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int nm = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    RDouble refGama = parameters->GetRefGama();
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    RDouble *nxyz = new RDouble[4];
+    RDouble *d_q = new RDouble[nEquation];
+    RDouble *qNeighbor = new RDouble[nEquation];
+    RDouble *q_loc = new RDouble[nEquation];
+    RDouble *rhs0 = new RDouble[nEquation];
+    RDouble *de = new RDouble[nEquation];
+    RDouble *df = new RDouble[nEquation];
+    RDouble *dg = new RDouble[nEquation];
+    RDouble *dq_pre = new RDouble[nEquation];
+    RDouble **MG = NewPointer2 <RDouble>(nEquation, nEquation);
+    RDouble *temperature = new RDouble[nTemperatureModel];
+    RDouble *q_pre = new RDouble[nEquation];
+
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D &diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+    RDouble4D &res = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+
+    //clz begin
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+    //clz end
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+
+    Range II, JJ, KK;
+    GetRange(ni, nj, nk, -2, 1, II, JJ, KK);
+    Range MM(0, nEquation - 1);
+
+    RDouble wmig = 1.0;
+    RDouble beta = 1.0;
+    RDouble coevis = 0.0;
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    GetIJKRegion(I, J, K, ist, ied, jst, jed, kst, ked);
+
+    int viscousType = parameters->GetViscousType();
+    //! Obtain the viscosity coefficient, Modified by LiPeng on Mar. 15, 2019.
+    RDouble3D viscousLaminar, viscousTurbulence;
+    if (viscousType > INVISCID)
+    {
+        viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+        viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    }
+    //! End of the modification.
+
+    int nDim = GetDim();
+    int il, jl, kl;
+
+    RDouble *dq_i = new RDouble[nEquation];
+    RDouble *dq_j = new RDouble[nEquation];
+    RDouble *dq_k = new RDouble[nEquation];
+
+    RDouble *prim_i = new RDouble[nEquation];
+    RDouble *prim_j = new RDouble[nEquation];
+    RDouble *prim_k = new RDouble[nEquation];
+
+    RDouble *q_loc_i = new RDouble[nEquation];
+    RDouble *q_loc_j = new RDouble[nEquation];
+    RDouble *q_loc_k = new RDouble[nEquation];
+
+    RDouble *gykb_i = new RDouble[5];
+    RDouble *gykb_j = new RDouble[5];
+    RDouble *gykb_k = new RDouble[5];
+
+    RDouble **MG_i = NewPointer2 <RDouble>(nEquation, nEquation);
+    RDouble **MG_j = NewPointer2 <RDouble>(nEquation, nEquation);
+    RDouble **MG_k = NewPointer2 <RDouble>(nEquation, nEquation);
+
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        int km1 = k - 1;
+        if (nDim != THREE_D)
+        {
+            km1 = 1;
+        }
+        for (int j = jst; j <= jed; ++ j)
+        {
+            int jm1 = j - 1;
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int im1 = i - 1;
+                int cellLabel = (ni - 1) * (nj - 1) * (k - 1) + (ni - 1) * (j - 1) + (i - 1);
+                if (iBlank[cellLabel] == IN_HOLE_COLOR)
+                {
+                    for (int m = 0; m < nl; ++ m)
+                    {
+                        dq(i, j, k, m) = 0.0;
+                        //rhs0[m] = 0.0;
+                    }
+                    continue;
+                }
+                for (int m = 0; m < nl; ++ m)
+                {
+                    rhs0[m] = 0.0;
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    prim_i[m] = q(im1, j, k, m);
+                    prim_j[m] = q(i, jm1, k, m);
+                }
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    q_loc_i[m] = q(im1, j, k, m);
+                    q_loc_j[m] = q(i, jm1, k, m);
+                }
+                for (int m = 0; m < nl; ++ m)
+                {
+                    dq_i[m] = dq(im1, j, k, m);
+                    dq_j[m] = dq(i, jm1, k, m);
+                }
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    q_pre[m] = q(i, j, k, m);
+                }
+                for (int m = 0; m < nl; ++ m)
+                {
+                    dq_pre[m] = dq(i, j, k, m);
+                }
+                gykb_i[0] = half * (gxfn(i, j, k, 1) + gxfn(im1, j, k, 1));
+                gykb_i[1] = half * (gyfn(i, j, k, 1) + gyfn(im1, j, k, 1));
+                gykb_i[2] = 0.0;
+                gykb_i[3] = half * (garea(i, j, k, 1) + garea(im1, j, k, 1));
+                gykb_i[4] = half * (gvgn(i, j, k, 1) + gvgn(im1, j, k, 1));
+
+                gykb_j[0] = half * (gxfn(i, j, k, 2) + gxfn(i, jm1, k, 2));
+                gykb_j[1] = half * (gyfn(i, j, k, 2) + gyfn(i, jm1, k, 2));
+                gykb_j[2] = 0.0;
+                gykb_j[3] = half * (garea(i, j, k, 2) + garea(i, jm1, k, 2));
+                gykb_j[4] = half * (gvgn(i, j, k, 2) + gvgn(i, jm1, k, 2));
+
+                if (nDim == THREE_D)
+                {
+                    gykb_i[2] = half * (gzfn(i, j, k, 1) + gzfn(im1, j, k, 1));
+                    gykb_j[2] = half * (gzfn(i, j, k, 2) + gzfn(i, jm1, k, 2));
+                }
+
+                RDouble &ra = invSpectralRadius(im1, j, k, 0);
+                RDouble &rb = invSpectralRadius(i, jm1, k, 1);
+
+                RDouble gama1 = gamma(im1, j, k);
+                RDouble gama2 = gamma(i, jm1, k);
+
+                RDouble tm_i = t(im1, j, k, 0);
+                RDouble tm_j = t(i, jm1, k, 0);
+
+                if (ifLowSpeedPrecon == 0)
+                {
+                    //! The previous method of computing the (M + R) * dQ.
+                    MXDQ_STD(prim_i, gykb_i, dq_i, de, gama1, nm, nl, ra, 1);
+                    MXDQ_STD(prim_j, gykb_j, dq_j, df, gama2, nm, nl, rb, 1);
+                }
+                else
+                {
+                    PreconMatrixFreeDF(q_loc_i, dq_i, gykb_i, MG_i, tm_i, refGama, de, nl, 1);
+                    PreconMatrixFreeDF(q_loc_j, dq_j, gykb_j, MG_j, tm_j, refGama, df, nl, 1);
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    dg[m] = 0.0;
+                }
+
+                if (nDim == THREE_D)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        prim_k[m] = q(i, j, km1, m);
+                    }
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        q_loc_k[m] = q(i, j, km1, m);
+                    }
+                    for (int m = 0; m < nl; ++ m)
+                    {
+                        dq_k[m] = dq(i, j, km1, m);
+                    }
+                    gykb_k[0] = half * (gxfn(i, j, k, 3) + gxfn(i, j, km1, 3));
+                    gykb_k[1] = half * (gyfn(i, j, k, 3) + gyfn(i, j, km1, 3));
+                    gykb_k[2] = half * (gzfn(i, j, k, 3) + gzfn(i, j, km1, 3));
+                    gykb_k[3] = half * (garea(i, j, k, 3) + garea(i, j, km1, 3));
+                    gykb_k[4] = half * (gvgn(i, j, k, 3) + gvgn(i, j, km1, 3));
+                    RDouble &rc = invSpectralRadius(i, j, km1, 2);
+                    RDouble gama3 = gamma(i, j, km1);
+                    RDouble tm_k = t(i, j, km1, 0);
+                    if (ifLowSpeedPrecon == 0)
+                    {
+                        MXDQ_STD(prim_k, gykb_k, dq_k, dg, gama3, nm, nl, rc, 1);
+                    }
+                    else
+                    {
+                        PreconMatrixFreeDF(q_loc_k, dq_k, gykb_k, MG_k, tm_k, refGama, dg, nl, 1);
+                    }
+                }
+
+                //! Solve rhs0.
+                for (int m = 0; m < nl; ++ m)
+                {
+                    rhs0[m] += -wmig * (de[m] + df[m] + dg[m]);  //! The first method.
+                }
+
+                if (viscousType > INVISCID)         //! Implicit treatment of viscosity term,added by clz : 2012-7-19��modified by LiPeng on Jan 21, 2019.
+                {
+
+                    RDouble rad_vis_i = visSpectralRadius(im1, j, k, 0);    //! The viscous spectrum radius.
+                    RDouble rad_vis_j = visSpectralRadius(i, jm1, k, 1);    //! The viscous spectrum radius.
+                    RDouble rad_vis_k = 0.0;
+                    if (nDim == THREE_D)
+                    {
+                        rad_vis_k = visSpectralRadius(i, j, km1, 2);
+                    }
+
+                    for (int m = 0; m < nl; ++ m)
+                    {
+                        rhs0[m] += -0.5 * (rad_vis_i * dq_i[m] + rad_vis_j * dq_j[m] + rad_vis_k * dq_k[m]); //the second method
+                    }
+                }
+
+                //! Solve dqa.
+                if (ifLowSpeedPrecon == 1)
+                {
+                    RDouble tm = t(i, j, k, 0);
+                    ComputePreconMatrix(1, MG, q_pre, tm, refGama);
+                    PreconMatrixDF(dq_pre, MG, nl);
+                }
+
+                for (int m = 0; m < nl; ++ m)
+                {
+                    dq(i, j, k, m) = (dq(i, j, k, m) - rhs0[m]) / diagonal(i, j, k, m);
+                }
+            }
+        }
+    }
+    delete[]dq_i;
+    delete[]dq_j;
+    delete[]dq_k;
+
+    delete[]prim_i;
+    delete[]prim_j;
+    delete[]prim_k;
+
+    delete[]q_loc_i;
+    delete[]q_loc_j;
+    delete[]q_loc_k;
+
+    delete[]gykb_i;
+    delete[]gykb_j;
+    delete[]gykb_k;
+
+    DelPointer2(MG_i);
+    DelPointer2(MG_j);
+    DelPointer2(MG_k);
+
+    delete[]nxyz;
+    delete[]d_q;
+    delete[]qNeighbor;
+    delete[]q_loc;
+    delete[]rhs0;
+
+    delete[]de;
+    delete[]df;
+    delete[]dg;
+
+    delete[]q_pre;
+    delete[]dq_pre;
+    DelPointer2(MG);
+    delete[]temperature;
+}
+
+void NSSolverStruct::SolveLUSGSBackward(Grid *gridIn, FieldProxy *dq_proxy, FieldProxy *LUplusDQ, RDouble &sweepNormal)
+{
+    PrintToWindow("Warning: need to check the optimized code, after consider multi-sweep!");
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &dq = dq_proxy->GetField_STR();
+    RDouble4D &gxfn = *(grid->GetFaceNormalX());
+    RDouble4D &gyfn = *(grid->GetFaceNormalY());
+    RDouble4D &gzfn = *(grid->GetFaceNormalZ());
+    RDouble4D &gvgn = *(grid->GetFaceNormalVelocity());
+    RDouble4D &garea = *(grid->GetFaceArea());
+    RDouble3D &gvol = *(grid->GetCellVolume());
+
+    int *iBlank = grid->GetCellTypeContainer();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    RDouble refGama = parameters->GetRefGama();
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    RDouble *nxyz = new RDouble[4];
+    RDouble *d_q = new RDouble[nEquation];
+    RDouble *qNeighbor = new RDouble[nEquation];
+    RDouble *q_loc = new RDouble[nEquation];
+    RDouble *rhs0 = new RDouble[nEquation];
+
+    RDouble *de = new RDouble[nEquation];
+    RDouble *df = new RDouble[nEquation];
+    RDouble *dg = new RDouble[nEquation];
+    RDouble **MG = NewPointer2 <RDouble>(nEquation, nEquation);
+    RDouble *temperature = new RDouble[nTemperatureModel];
+
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D &diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+
+    Range II, JJ, KK;
+    GetRange(ni, nj, nk, -2, 1, II, JJ, KK);
+    Range MM(0, nEquation - 1);
+
+    RDouble wmig = 1.0;
+    RDouble beta = 1.0;
+    RDouble coevis = 0.0;
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    GetIJKRegion(I, J, K, ist, ied, jst, jed, kst, ked);
+
+    //clz begin
+    int viscousType = parameters->GetViscousType();
+    //clz end
+
+    //! Obtain the viscosity coefficient, Modified by LiPeng on Mar. 15, 2019.
+    RDouble3D viscousLaminar, viscousTurbulence;
+    if (viscousType > INVISCID)
+    {
+        viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+        viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    }
+
+    //! End of the modification.
+
+    int nDim = GetDim();
+
+    MXDQ_STD_LP(qNeighbor, temperature, xfn, yfn, zfn, area, vgn, gama, d_q, df, nNSEquation, nl, rad, -1);
+    MXDQ_STD(qNeighbor, xfn, yfn, zfn, area, vgn, gama, d_q, df, nNSEquation, nl, rad, -1);
+    RDouble *dq_i = new RDouble[nEquation];
+    RDouble *dq_j = new RDouble[nEquation];
+    RDouble *dq_k = new RDouble[nEquation];
+
+    RDouble *prim_i = new RDouble[nEquation];
+    RDouble *prim_j = new RDouble[nEquation];
+    RDouble *prim_k = new RDouble[nEquation];
+
+    RDouble *q_loc_i = new RDouble[nEquation];
+    RDouble *q_loc_j = new RDouble[nEquation];
+    RDouble *q_loc_k = new RDouble[nEquation];
+
+    RDouble *gykb_i = new RDouble[5];
+    RDouble *gykb_j = new RDouble[5];
+    RDouble *gykb_k = new RDouble[5];
+
+    RDouble **MG_i = NewPointer2 <RDouble>(nEquation, nEquation);
+    RDouble **MG_j = NewPointer2 <RDouble>(nEquation, nEquation);
+    RDouble **MG_k = NewPointer2 <RDouble>(nEquation, nEquation);
+
+
+    for (int k = ked; k >= kst; --k)
+    {
+        int kp1 = k + 1;
+        int kp1p1 = kp1 + 1;
+        if (nDim != THREE_D)
+        {
+            kp1 = 1;
+            kp1p1 = 1;
+        }
+        for (int j = jed; j >= jst; --j)
+        {
+            int jp1 = j + 1;
+            int jp1p1 = jp1 + 1;
+            for (int i = ied; i >= ist; --i)
+            {
+                int ip1 = i + 1;
+                int ip1p1 = ip1 + 1;
+                int cellLabel = (ni - 1) * (nj - 1) * (k - 1) + (ni - 1) * (j - 1) + (i - 1);
+                if (iBlank[cellLabel] == IN_HOLE_COLOR)
+                {
+                    for (int m = 0; m < nl; ++ m)
+                    {
+                        dq(i, j, k, m) = 0.0;
+                        //rhs0[m] = 0.0;
+                    }
+                    continue;
+                }
+                for (int m = 0; m < nl; ++ m)
+                {
+                    rhs0[m] = 0.0;
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    prim_i[m] = q(ip1, j, k, m);
+                    prim_j[m] = q(i, jp1, k, m);
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    q_loc_i[m] = q(ip1, j, k, m);
+                    q_loc_j[m] = q(i, jp1, k, m);
+                }
+
+                for (int m = 0; m < nl; ++ m)
+                {
+                    dq_i[m] = dq(ip1, j, k, m);
+                    dq_j[m] = dq(i, jp1, k, m);
+                }
+                gykb_i[0] = half * (gxfn(ip1, j, k, 1) + gxfn(ip1p1, j, k, 1));
+                gykb_i[1] = half * (gyfn(ip1, j, k, 1) + gyfn(ip1p1, j, k, 1));
+                gykb_i[2] = 0.0;
+                gykb_i[3] = half * (garea(ip1, j, k, 1) + garea(ip1p1, j, k, 1));
+                gykb_i[4] = half * (gvgn(ip1, j, k, 1) + gvgn(ip1p1, j, k, 1));
+
+                gykb_j[0] = half * (gxfn(i, jp1, k, 2) + gxfn(i, jp1p1, k, 2));
+                gykb_j[1] = half * (gyfn(i, jp1, k, 2) + gyfn(i, jp1p1, k, 2));
+                gykb_j[2] = 0.0;
+                gykb_j[3] = half * (garea(i, jp1, k, 2) + garea(i, jp1p1, k, 2));
+                gykb_j[4] = half * (gvgn(i, jp1, k, 2) + gvgn(i, jp1p1, k, 2));
+
+                if (nDim == THREE_D)
+                {
+                    gykb_i[2] = half * (gzfn(ip1, j, k, 1) + gzfn(ip1p1, j, k, 1));
+                    gykb_j[2] = half * (gzfn(i, jp1, k, 2) + gzfn(i, jp1p1, k, 2));
+                }
+
+                RDouble &ra = invSpectralRadius(ip1, j, k, 0);
+                RDouble &rb = invSpectralRadius(i, jp1, k, 1);
+
+                RDouble gama1 = gamma(ip1, j, k);
+                RDouble gama2 = gamma(i, jp1, k);
+
+                RDouble tm_i = t(ip1, j, k, 0);
+                RDouble tm_j = t(i, jp1, k, 0);
+                if (ifLowSpeedPrecon == 0)
+                {
+                    //! The previous method of computing the (M + R) * dQ.
+                    MXDQ_STD(prim_i, gykb_i, dq_i, de, gama1, nm, nl, ra, -1);
+                    MXDQ_STD(prim_j, gykb_j, dq_j, df, gama2, nm, nl, rb, -1);
+                }
+                else
+                {
+                    PreconMatrixFreeDF(q_loc_i, dq_i, gykb_i, MG_i, tm_i, refGama, de, nl, -1);
+                    PreconMatrixFreeDF(q_loc_j, dq_j, gykb_j, MG_j, tm_j, refGama, df, nl, -1);
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    dg[m] = 0.0;
+                }
+
+                if (nDim == THREE_D)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        prim_k[m] = q(i, j, kp1, m);
+                    }
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        q_loc_k[m] = q(i, j, kp1, m);
+                    }
+                    for (int m = 0; m < nl; ++ m)
+                    {
+                        dq_k[m] = dq(i, j, kp1, m);
+                    }
+                    gykb_k[0] = half * (gxfn(i, j, kp1, 3) + gxfn(i, j, kp1p1, 3));
+                    gykb_k[1] = half * (gyfn(i, j, kp1, 3) + gyfn(i, j, kp1p1, 3));
+                    gykb_k[2] = half * (gzfn(i, j, kp1, 3) + gzfn(i, j, kp1p1, 3));
+                    gykb_k[3] = half * (garea(i, j, kp1, 3) + garea(i, j, kp1p1, 3));
+                    gykb_k[4] = half * (gvgn(i, j, kp1, 3) + gvgn(i, j, kp1p1, 3));
+                    RDouble &rc = invSpectralRadius(i, j, kp1, 2);
+                    RDouble gama3 = gamma(i, j, kp1);
+                    RDouble tm_k = t(i, j, kp1, 0);
+                    if (ifLowSpeedPrecon == 0)
+                    {
+                        MXDQ_STD(prim_k, gykb_k, dq_k, dg, gama3, nm, nl, rc, -1);
+                    }
+                    else
+                    {
+                        PreconMatrixFreeDF(q_loc_k, dq_k, gykb_k, MG_k, tm_k, refGama, de, nl, -1);
+                    }
+
+                }
+
+
+                //! Compute (M - R) * dQ including the real gas conditions, modified by LiPeng on Jan 21, 2019.
+                //MXDQ_STD_LP(prim,xfn,yfn,zfn,area,vgn,gama,d_q,df,nm,nl,rad,-1);
+                //! Solve rhs0.
+                for (int m = 0; m < nl; ++ m)
+                {
+                    rhs0[m] += wmig * (de[m] + df[m] + dg[m]);
+                }
+                if (viscousType > INVISCID)    //! Implicit treatment of viscosity term,added by clz : 2012-7-19��modified by LiPeng on Jan 21, 2019.
+                {
+
+                    RDouble rad_vis_i = visSpectralRadius(ip1, j, k, 0);    //! The viscous spectrum radius.
+                    RDouble rad_vis_j = visSpectralRadius(i, jp1, k, 1);    //! The viscous spectrum radius.
+                    //RDouble rad_vis_k = visSpectralRadius(i  , j  , kp1, 2);    //! The viscous spectrum radius.
+                    RDouble rad_vis_k = 0.0;    //! The viscous spectrum radius.
+
+                    if (nDim == THREE_D)
+                    {
+                        rad_vis_k = visSpectralRadius(i, j, kp1, 2);
+                    }
+
+                    for (int m = 0; m < nl; ++ m)
+                    {
+                        rhs0[m] += -0.5 * (rad_vis_i * dq_i[m] + rad_vis_j * dq_j[m] + rad_vis_k * dq_k[m]);       //! The second method.
+                    }
+                }
+
+                //! Solve dqa.
+                for (int m = 0; m < nl; ++ m)
+                {
+                    dq(i, j, k, m) -= rhs0[m] / diagonal(i, j, k, m);
+                }
+            }
+        }
+    }
+
+    delete[] dq_i;
+    delete[] dq_j;
+    delete[] dq_k;
+
+    delete[] prim_i;
+    delete[] prim_j;
+    delete[] prim_k;
+
+    delete[] q_loc_i;
+    delete[] q_loc_j;
+    delete[] q_loc_k;
+
+    delete[] gykb_i;
+    delete[] gykb_j;
+    delete[] gykb_k;
+
+    DelPointer2(MG_i);
+    DelPointer2(MG_j);
+    DelPointer2(MG_k);
+
+    //fclose(pfile);
+
+    delete[] nxyz;
+    delete[] d_q;
+    delete[] qNeighbor;
+    delete[] q_loc;
+    delete[] rhs0;
+
+    delete[] de;
+    delete[] df;
+    delete[] dg;
+    DelPointer2(MG);
+    delete[] temperature;
+}
+#else
+//! Without any array optimization.
+void NSSolverStruct::SolveLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+
+    RDouble4D &dq = dqProxy->GetField_STR();
+    RDouble4D &deltaFlux = LUplusDQ->GetField_STR();
+
+    RDouble4D &gxfn = *(grid->GetFaceNormalX());
+    RDouble4D &gyfn = *(grid->GetFaceNormalY());
+    RDouble4D &gzfn = *(grid->GetFaceNormalZ());
+    RDouble4D &gvgn = *(grid->GetFaceNormalVelocity());
+    RDouble4D &garea = *(grid->GetFaceArea());
+
+    int *iBlank = grid->GetCellTypeContainer();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int nEnergyRecycle = parameters->GetnEnergyRecycle();
+
+    RDouble *nxyz = new RDouble[5];
+    RDouble *dqNeighbor = new RDouble[nEquation];
+    RDouble *qNeighbor = new RDouble[nEquation];
+    RDouble *rhs0 = new RDouble[nEquation];
+    RDouble *de = new RDouble[nEquation];
+    RDouble *df = new RDouble[nEquation];
+    RDouble *dg = new RDouble[nEquation];
+    RDouble *dqOld = new RDouble[nEquation];
+    RDouble *temperature = new RDouble[nTemperatureModel];
+    RDouble *Ux = new RDouble[nEquation];
+
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D &diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+    RDouble4D &res = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    int isUseLocalCFL = parameters->GetLocalCFLFlag();
+    if (iAdvanceStep && isUseLocalCFL == 1)
+    {
+        diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal1"));
+    }
+
+    //RDouble *speciesCvs, RDouble *speciesEtrs, RDouble totalH,  RDouble totalCv, RDouble totalCvtr, RDouble totalCvv, RDouble totalCve
+    RDouble4D *speciesCvs = NULL, *speciesEtrs = NULL;
+    RDouble3D *totalEnthalpy = NULL, *totalCv = NULL;
+    Thermo_Energy *Thermo_Energy_temparay = NULL;
+    RDouble3D *totalCvtr = NULL, *totalCvv = NULL, *totalCve = NULL;
+    RDouble *Cvs = NULL, *Etrs = NULL;
+    if (nChemical > 0 && nEnergyRecycle > 0)
+    {
+        Thermo_Energy_temparay = gas->GetThermo_Energy_temparay();
+        Cvs = Thermo_Energy_temparay->Cvs;
+        Etrs = Thermo_Energy_temparay->Etrs;
+
+        speciesCvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCvs"));
+        speciesEtrs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEtrs"));
+
+        totalEnthalpy = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalEnthalpy"));
+        totalCv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCv"));
+
+        totalCvtr = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvtr"));
+        totalCvv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvv"));
+        totalCve = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCve"));
+    }
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    bool isViscous = parameters->IsViscous();
+    RDouble3D viscousLaminar, viscousTurbulence;
+    if (isViscous)
+    {
+        viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+        viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    }
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+    RDouble3D *timeCoefficientInverse = NULL;
+    RDouble3D *preconCoefficient = NULL;
+    RDouble4D *preconMatrix = NULL;
+    int nElement = 0;
+    RDouble *dqTry = NULL;
+    RDouble *preconMatrixNeighbor = NULL;
+    RDouble *preconMatrixTemp = NULL;
+
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        timeCoefficientInverse = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("timeCoefficientInverse"));
+        preconCoefficient = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+        preconMatrix = reinterpret_cast< RDouble4D *> (grid->GetDataPtr("preconMatrix"));
+        nElement = nEquation * nEquation;
+        dqTry = new RDouble[nEquation];
+        preconMatrixNeighbor = new RDouble [nElement];
+        preconMatrixTemp = new RDouble [nElement];
+    }
+
+    int nDim = GetDim();
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                int cellLabel = (ni - 1) * (nj - 1) * (k - 1) + (ni - 1) * (j - 1) + (i - 1);
+                if (iBlank[cellLabel] == IN_HOLE_COLOR)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        dq(i, j, k, m) = 0.0;
+                    }
+                    continue;
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    rhs0[m] = 0.0;
+
+                    //! Back up the old dq, to compute the convergence.
+                    //! it is initialized by zero or res in the first sweep,
+                    //! then it is updated by backward sweep, that is dq*.
+                    dqOld[m] = dq(i, j, k, m);
+
+                    //! Here, the deltaFlux is computed in Upper backward sweep!
+                    //! res: b      deltaFlux: Ux, which is computed in backward sweep.
+                    //! the dq is not the real dq, now.
+                    //! Although the 'dq' changed can not the right one, it dosen't matter, since 
+                    //! the following only using the lower neighbor cells, whose 'dq' has been updated.
+                    //! It is convenient for precondition transform.
+                    dq(i, j, k, m) = res(i, j, k, m);
+
+                    Ux[m] = deltaFlux(i, j, k, m);
+
+                    //! Then reset it to zero to store the Lower forward sweep!
+                    deltaFlux(i, j, k, m) = 0.0;
+                }
+
+                for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+                {
+                    int il1, jl1, kl1, il, jl, kl;
+                    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+                    grid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        qNeighbor[m] = q(il, jl, kl, m);
+                        dqNeighbor[m] = dq(il, jl, kl, m);
+                    }
+
+                    if (ifLowSpeedPrecon != 0)
+                    {
+                        for (int m = 0; m < nElement; ++ m)
+                        {
+                            preconMatrixNeighbor[m] = (*preconMatrix)(il, jl, kl, m);
+                        }
+                    }
+
+                    RDouble &xfn1 = gxfn(i, j, k, iSurface);
+                    RDouble &yfn1 = gyfn(i, j, k, iSurface);
+                    RDouble &zfn1 = gzfn(i, j, k, iSurface);
+                    RDouble &area1 = garea(i, j, k, iSurface);
+                    RDouble &vgn1 = gvgn(i, j, k, iSurface);
+
+                    RDouble &xfn2 = gxfn(il, jl, kl, iSurface);
+                    RDouble &yfn2 = gyfn(il, jl, kl, iSurface);
+                    RDouble &zfn2 = gzfn(il, jl, kl, iSurface);
+                    RDouble &area2 = garea(il, jl, kl, iSurface);
+                    RDouble &vgn2 = gvgn(il, jl, kl, iSurface);
+
+                    RDouble xfn = half * (xfn1 + xfn2);
+                    RDouble yfn = half * (yfn1 + yfn2);
+                    RDouble zfn = half * (zfn1 + zfn2);
+                    RDouble area = half * (area1 + area2);
+                    RDouble vgn = half * (vgn1 + vgn2);
+
+                    nxyz[0] = xfn;
+                    nxyz[1] = yfn;
+                    nxyz[2] = zfn;
+                    nxyz[3] = area;
+                    nxyz[4] = vgn;
+
+                    RDouble &rad = invSpectralRadius(il, jl, kl, iSurface - 1);
+
+                    RDouble gama = gamma(il, jl, kl);
+
+                    if (ifLowSpeedPrecon == 0)
+                    {
+                        if (nChemical > 0)
+                        {
+                            for (int m = 0; m < nTemperatureModel; ++ m)
+                            {
+                                temperature[m] = t(il, jl, kl, m);
+                            }
+                        }
+                        else
+                        {
+                            MXDQ_STD(qNeighbor, xfn, yfn, zfn, area, vgn, gama, dqNeighbor, df, nNSEquation, nLaminar, rad, 1);
+                        }
+                    }
+                    else
+                    {
+                        RDouble preconCoeff = (*preconCoefficient)(il, jl, kl);
+                        RDouble timeCoeff = (*timeCoefficientInverse)(il, jl, kl);
+                        PreconMatrixFreeDF(qNeighbor, dqNeighbor, nxyz, preconMatrixNeighbor, gama, preconCoeff, timeCoeff, df, nNSEquation, nLaminar, 1);
+                    }
+
+                    //! Add Flux together.
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        rhs0[m] -= df[m];
+                    }
+
+                    if (isViscous)
+                    {
+                        RDouble rad_vis = half * visSpectralRadius(il, jl, kl, iSurface - 1);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            rhs0[m] -= rad_vis * dqNeighbor[m];
+                        }
+                    }
+                }
+
+                if (ifLowSpeedPrecon == 1)
+                {
+                    //! Here, the 'dqCell' is 'res' actually.
+                    //! The reason why operate on 'dqCell' other than 'res', is that the 'dqCell' is a temporary variable.
+                    //! and the real 'res' is forbidden to be changed.
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                         dqTry[m]= dq(i, j, k, m);
+                    }
+
+                    for (int m = 0; m < nElement; ++ m)
+                    {
+                        preconMatrixTemp[m] = (*preconMatrix)(i, j, k, m);
+                    }
+
+                    RDouble timeCoeffTemp = (*timeCoefficientInverse)(i, j, k);
+                    ConservativePreconMatrixVariables(dqTry, preconMatrixTemp, timeCoeffTemp, nEquation);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        dq(i, j, k, m) = dqTry[m];
+                    }
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    //! dq = { (b - Ux) - Lx } / D.
+                    //! Note: the 'dq' has actually initialized by the residual at the beginning of this function.
+                    //! the 'rhs0' is the total Delta Flux of the neighbors.            
+                    //! rhs0: Lx    diagonal: D.
+                    dq(i, j, k, m) = (dq(i, j, k, m) - Ux[m] - rhs0[m]) / diagonal(i, j, k, m);
+                    //! Store the lower forward sweep delta-flux, which will be used in the backward sweep.
+                    deltaFlux(i, j, k, m) += rhs0[m];
+
+                    sweepNormal += SQR(dq(i, j, k, m) - dqOld[m]);
+                }
+
+            }
+        }
+    }
+
+    delete[] nxyz;    nxyz = NULL;
+    delete[] dqNeighbor;    dqNeighbor = NULL;
+    delete[] qNeighbor;    qNeighbor = NULL;
+    delete[] rhs0;    rhs0 = NULL;
+
+    delete[] de;    de = NULL;
+    delete[] df;    df = NULL;
+    delete[] dg;    dg = NULL;
+
+
+    delete[] temperature;    temperature = NULL;
+
+    delete[] dqOld;    dqOld = NULL;
+    delete[] Ux;    Ux = NULL;
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        delete []dqTry;    dqTry = NULL;
+        delete []preconMatrixNeighbor;    preconMatrixNeighbor = NULL;
+        delete []preconMatrixTemp;    preconMatrixTemp = NULL;
+    }
+}
+
+void NSSolverStruct::SolveLUSGSBackward(Grid *gridIn, FieldProxy *dq_proxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep/* = false*/)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &dq = dq_proxy->GetField_STR();
+    RDouble4D &deltaFlux = LUplusDQ->GetField_STR();
+
+    RDouble4D &gxfn = *(grid->GetFaceNormalX());
+    RDouble4D &gyfn = *(grid->GetFaceNormalY());
+    RDouble4D &gzfn = *(grid->GetFaceNormalZ());
+    RDouble4D &gvgn = *(grid->GetFaceNormalVelocity());
+    RDouble4D &garea = *(grid->GetFaceArea());
+
+    int *iBlank = grid->GetCellTypeContainer();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    int nEnergyRecycle = parameters->GetnEnergyRecycle();
+
+    RDouble *nxyz = new RDouble[5];
+    RDouble *dqNeighbor = new RDouble[nEquation];
+    RDouble *qNeighbor = new RDouble[nEquation];
+    RDouble *dqOld = new RDouble[nEquation];
+    RDouble *rhs0 = new RDouble[nEquation];
+    RDouble *de = new RDouble[nEquation];
+    RDouble *df = new RDouble[nEquation];
+    RDouble *dg = new RDouble[nEquation];
+    RDouble *temperature = new RDouble[nTemperatureModel];
+    RDouble *Lx = new RDouble[nEquation];
+
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D &diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+    RDouble4D &res = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &gamma = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    int isUseLocalCFL = parameters->GetLocalCFLFlag();
+    if (iAdvanceStep && isUseLocalCFL == 1)
+    {
+        diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal1"));
+    }
+
+    //RDouble *speciesCvs, RDouble *speciesEtrs, RDouble totalH,  RDouble totalCv, RDouble totalCvtr, RDouble totalCvv, RDouble totalCve
+    RDouble4D *speciesCvs = NULL, *speciesEtrs = NULL;
+    RDouble3D *totalEnthalpy = NULL, *totalCv = NULL;
+    Thermo_Energy *Thermo_Energy_temparay = NULL;
+    RDouble3D *totalCvtr = NULL, *totalCvv = NULL, *totalCve = NULL;
+    RDouble *Cvs = NULL, *Etrs = NULL;
+    if (nChemical > 0 && nEnergyRecycle > 0)
+    {
+        Thermo_Energy_temparay = gas->GetThermo_Energy_temparay();
+        Cvs = Thermo_Energy_temparay->Cvs;
+        Etrs = Thermo_Energy_temparay->Etrs;
+
+        speciesCvs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesCvs"));
+        speciesEtrs = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("speciesEtrs"));
+
+        totalEnthalpy = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalEnthalpy"));
+        totalCv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCv"));
+
+        totalCvtr = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvtr"));
+        totalCvv = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCvv"));
+        totalCve = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("totalCve"));
+    }
+
+    Range II, JJ, KK;
+    GetRange(ni, nj, nk, -2, 1, II, JJ, KK);
+    Range MM(0, nEquation - 1);
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    bool isViscous = parameters->IsViscous();
+    RDouble3D viscousLaminar, viscousTurbulence;
+    if (isViscous)
+    {
+        viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+        viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    }
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+    RDouble3D *timeCoefficientInverse = NULL;
+    RDouble3D *preconCoefficient = NULL;
+    RDouble4D *preconMatrix = NULL;
+    int nElement = 0;
+    RDouble *dqTry = NULL;
+    RDouble *preconMatrixNeighbor = NULL;
+    RDouble *preconMatrixTemp = NULL;
+
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        timeCoefficientInverse = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("timeCoefficientInverse"));
+        preconCoefficient = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+        preconMatrix = reinterpret_cast< RDouble4D *> (grid->GetDataPtr("preconMatrix"));
+        nElement = nEquation * nEquation;
+        dqTry = new RDouble[nEquation];
+        preconMatrixNeighbor = new RDouble [nElement];
+        preconMatrixTemp = new RDouble [nElement];
+    }
+
+    int nDim = GetDim();
+
+    for (int k = kCellEnd; k >= kCellStart; --k)
+    {
+        for (int j = jCellEnd; j >= jCellStart; --j)
+        {
+            for (int i = iCellEnd; i >= iCellStart; --i)
+            {
+                int cellLabel = (ni - 1) * (nj - 1) * (k - 1) + (ni - 1) * (j - 1) + (i - 1);
+                if (iBlank[cellLabel] == IN_HOLE_COLOR)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        dq(i, j, k, m) = 0.0;
+                    }
+                    continue;
+                }
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    rhs0[m] = 0.0;
+
+                    //! Back up the old dq, to compute the convergence.
+                    //! the 'dq' is dq*, which has been updated in forward.
+                    dqOld[m] = dq(i, j, k, m);
+
+                    //! the dq is not the real dq, now.
+                    //! it is convenient for precondition transform.
+                    dq(i, j, k, m) = res(i, j, k, m);
+
+                    Lx[m] = deltaFlux(i, j, k, m);
+
+                    //! Then reset it to zero to store the upper forward sweep!
+                    deltaFlux(i, j, k, m) = 0.0;
+
+                }
+
+                for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+                {
+                    int il1, jl1, kl1, il, jl, kl;
+                    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        qNeighbor[m] = q(il, jl, kl, m);
+                        dqNeighbor[m] = dq(il, jl, kl, m);
+                    }
+
+                    if (ifLowSpeedPrecon != 0)
+                    {
+                        for (int m = 0; m < nElement; ++ m)
+                        {
+                            preconMatrixNeighbor[m] = (*preconMatrix)(il, jl, kl, m);
+                        }
+                    }
+
+                    //clz begin
+                    RDouble &xfn1 = gxfn(il, jl, kl, iSurface);
+                    RDouble &yfn1 = gyfn(il, jl, kl, iSurface);
+                    RDouble &zfn1 = gzfn(il, jl, kl, iSurface);
+                    RDouble &area1 = garea(il, jl, kl, iSurface);
+                    RDouble &vgn1 = gvgn(il, jl, kl, iSurface);
+
+                    RDouble &xfn2 = gxfn(il + il1, jl + jl1, kl + kl1, iSurface);
+                    RDouble &yfn2 = gyfn(il + il1, jl + jl1, kl + kl1, iSurface);
+                    RDouble &zfn2 = gzfn(il + il1, jl + jl1, kl + kl1, iSurface);
+                    RDouble &area2 = garea(il + il1, jl + jl1, kl + kl1, iSurface);
+                    RDouble &vgn2 = gvgn(il + il1, jl + jl1, kl + kl1, iSurface);
+
+                    RDouble xfn = half * (xfn1 + xfn2);
+                    RDouble yfn = half * (yfn1 + yfn2);
+                    RDouble zfn = half * (zfn1 + zfn2);
+                    RDouble area = half * (area1 + area2);
+                    RDouble vgn = half * (vgn1 + vgn2);
+
+                    nxyz[0] = xfn;
+                    nxyz[1] = yfn;
+                    nxyz[2] = zfn;
+                    nxyz[3] = area;
+                    nxyz[4] = vgn;
+
+                    RDouble &rad = invSpectralRadius(il, jl, kl, iSurface - 1);
+
+                    RDouble gama = gamma(il, jl, kl);
+
+                    if (ifLowSpeedPrecon == 0)
+                    {
+                        //! Compute (M - R) * dQ including the real gas conditions.
+                        if (nChemical > 0)
+                        {
+                            for (int m = 0; m < nTemperatureModel; ++ m)
+                            {
+                                temperature[m] = t(il, jl, kl, m);
+                            }
+                        }
+                        else
+                        {
+                            MXDQ_STD(qNeighbor, xfn, yfn, zfn, area, vgn, gama, dqNeighbor, df, nNSEquation, nLaminar, rad, -1);
+                        }
+                    }
+                    else
+                    {
+                        RDouble preconCoeff = (*preconCoefficient)(il, jl, kl);
+                        RDouble timeCoeff = (*timeCoefficientInverse)(il, jl, kl);
+                        PreconMatrixFreeDF(qNeighbor, dqNeighbor, nxyz, preconMatrixNeighbor, gama, preconCoeff, timeCoeff, df, nNSEquation, nLaminar, -1);
+                    }
+
+                    //! Add Flux together.
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        rhs0[m] += df[m];
+                    }
+
+                    if (isViscous)
+                    {
+                        RDouble rad_vis = half * visSpectralRadius(il, jl, kl, iSurface - 1);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            rhs0[m] += -rad_vis * dqNeighbor[m];
+                        }
+                    }
+                }
+
+                if (ifLowSpeedPrecon == 1)
+                {
+                    //! Here, the 'dqCell' is 'res' actually.
+                    //! The reason why operate on 'dqCell' other than 'res', is that the 'dqCell' is a temporary variable.
+                    //! and the real 'res' is forbidden to be changed.
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        dqTry[m]= dq(i, j, k, m);
+                    }
+
+                    for (int m = 0; m < nElement; ++ m)
+                    {
+                        preconMatrixTemp[m] = (*preconMatrix)(i, j, k, m);
+                    }
+
+                    RDouble timeCoeffTemp = (*timeCoefficientInverse)(i, j, k);
+                    ConservativePreconMatrixVariables(dqTry, preconMatrixTemp, timeCoeffTemp, nEquation);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        dq(i, j, k, m) = dqTry[m];
+                    }
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    //! Note: the 'dq' has been updated by the forward sweep.
+                    //! the 'rhs0' is the total Delta Flux of the neighbors.
+                    //! x = {(b - LX) - Ux} / D.
+                    //! rhs0: Ux.    diagonal: D.
+                    dq(i, j, k, m) = (dq(i, j, k, m) - Lx[m] - rhs0[m]) / diagonal(i, j, k, m);
+
+                    //! Store the upper backward sweep delta-flux, which will be used in the forward sweep.
+                    deltaFlux(i, j, k, m) += rhs0[m];
+
+                    sweepNormal += SQR(dq(i, j, k, m) - dqOld[m]);
+                }
+            }
+        }
+    }
+
+    delete[] nxyz;    nxyz = NULL;
+    delete[] dqNeighbor;    dqNeighbor = NULL;
+    delete[] dqOld;    dqOld = NULL;
+    delete[] qNeighbor;    qNeighbor = NULL;
+    delete[] rhs0;    rhs0 = NULL;
+
+    delete[] de;    de = NULL;
+    delete[] df;    df = NULL;
+    delete[] dg;    dg = NULL;
+
+    delete[] temperature;    temperature = NULL;
+    delete[] Lx;    Lx = NULL;
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        delete []dqTry;    dqTry = NULL;
+        delete []preconMatrixNeighbor;    preconMatrixNeighbor = NULL;
+        delete []preconMatrixTemp;    preconMatrixTemp = NULL;
+    }
+}
+
+#endif
+
+void NSSolverStruct::DetermineCFLNumber(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *dqProxy1)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &dq = dqProxy->GetField_STR();
+    RDouble4D &dq1 = dqProxy1->GetField_STR();
+    RDouble3D *localCFL = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("localCFL"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int nStart = nNSEquation + numberOfSpecies;
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+    RDouble nCFLStart = parameters->GetCFLStart();
+    RDouble nCFLEnd = parameters->GetCFLEnd();
+    RDouble errLimit = 0.1, errCoef = 1.0e-3, eps = 0.0, max_eps = 0.0;
+    RDouble pOrder = pow(2, 2.0), cfl = 0.1;
+    if (GlobalDataBase::IsExist("predictCFLError", PHDOUBLE, 1))
+    {
+        errLimit = GlobalDataBase::GetDoubleParaFromDB("predictCFLError");
+    }
+
+    int iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd;
+    grid->GetCellIterationIndex(iCellStart, iCellEnd, jCellStart, jCellEnd, kCellStart, kCellEnd, NON_GHOST);
+
+    for (int k = kCellStart; k <= kCellEnd; ++ k)
+    {
+        for (int j = jCellStart; j <= jCellEnd; ++ j)
+        {
+            for (int i = iCellStart; i <= iCellEnd; ++ i)
+            {
+                max_eps = 0.0;
+                for (int m = 0; m < nLaminar; ++ m)
+                {
+                    eps = (pOrder / (1.0 - pOrder)) * (dq1(i, j, k, m) - dq(i, j, k, m));
+                    max_eps = MAX(max_eps, ABS(eps));
+                }
+
+                for (int m = nStart; m < nEquation; ++ m)
+                {
+                    eps = (pOrder / (1.0 - pOrder)) * (dq1(i, j, k, m) - dq(i, j, k, m));
+                    max_eps = MAX(max_eps, ABS(eps));
+                }
+
+                cfl = (*localCFL)(i, j, k);
+                if (max_eps > errLimit) //! The time step is too large.
+                {
+                    cfl *= 0.5;
+                }
+                else
+                {
+                    if (max_eps <= errCoef * errLimit) //! The time step is too small.
+                    {
+                        cfl *= 2.0;
+                    }
+                    else //! The time step is suitable.
+                    {
+                        //No change.
+                    }
+                    //employ the results computed by the larger time step.
+                    //for (int m = 0; m < nEquation; ++ m)
+                    //{
+                    //    dq(i, j, k, m) = dq1(i, j, k, m);
+                    //}
+                }
+
+                if (cfl < nCFLStart)
+                {
+                    cfl = nCFLStart;
+                }
+                if (cfl > nCFLEnd)
+                {
+                    cfl = nCFLEnd;
+                }
+                (*localCFL)(i, j, k) = cfl;
+            }
+        }
+    }
+}
+
+
+void NSSolverStruct::SolveMatrixLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    SolveMatrixLUSGSForwardSweep(grid, dqProxy, LUplusDQ, sweepNormal);
+}
+
+void NSSolverStruct::SolveMatrixLUSGSBackward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    SolveMatrixLUSGSBackwardSweep(grid, dqProxy, LUplusDQ, sweepNormal);
+}
+
+void NSSolverStruct::SetGhostDQLUSGS(Grid *gridIn, RDouble4D &dq)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int nLaminar = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    int viscousType = parameters->GetViscousType();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &gama = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+
+    using namespace IDX;
+    using namespace GAS_SPACE;
+    using namespace PHENGLEI;
+    RDouble *prim = new RDouble[nEquation];
+    RDouble *Q = new RDouble[nEquation];
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        int *s_lr3d = structBC->GetFaceDirectionIndex();
+        int iSurface = structBC->GetFaceDirection() + 1;
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int is = i;
+                    int js = j;
+                    int ks = k;
+
+                    int it = i + s_lr3d[0];
+                    int jt = j + s_lr3d[1];
+                    int kt = k + s_lr3d[2];
+
+                    //! Conservative Variables on level n+1.
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        prim[m] = q(is, js, ks, m);
+                    }
+
+                    RDouble tv = t(is, js, ks, mTV);
+                    RDouble te = t(is, js, ks, mTE);
+
+                    gas->Primitive2Conservative(prim, gama(is, js, ks), tv, te, Q);
+
+                    for (int m = 0; m < nLaminar; ++ m)
+                    {
+                        Q[m] += dq(is, js, ks, m);
+                    }
+
+                    //! Non-conservative variables in re in level n.
+                    RDouble rm = q(it, jt, kt, IR);
+                    RDouble um = q(it, jt, kt, IU);
+                    RDouble vm = q(it, jt, kt, IV);
+                    RDouble wm = q(it, jt, kt, IW);
+                    RDouble pm = q(it, jt, kt, IP);
+
+                    int in, jn, kn;
+                    structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+
+                    RDouble nxs = xfn(in, jn, kn, iSurface);
+                    RDouble nys = yfn(in, jn, kn, iSurface);
+                    RDouble nzs = zfn(in, jn, kn, iSurface);
+
+                    if (BCType == PHENGLEI::SYMMETRY || (IsWall(BCType) && viscousType == INVISCID))
+                    {
+                        //! Inviscid wall or symmetry boundary.
+                        dq(it, jt, kt, IR) = dq(is, js, ks, IR);
+                        RDouble rvn = two * (nxs * dq(is, js, ks, IU) + nys * dq(is, js, ks, IV) + nzs * dq(is, js, ks, IW));
+                        dq(it, jt, kt, IU) = dq(is, js, ks, IU) - nxs * rvn;
+                        dq(it, jt, kt, IV) = dq(is, js, ks, IV) - nys * rvn;
+                        dq(it, jt, kt, IW) = dq(is, js, ks, IW) - nzs * rvn;
+                        rvn = two * (nxs * Q[IU] + nys * Q[IV] + nzs * Q[IW]);
+                        RDouble ru = Q[IU] - nxs * rvn;
+                        RDouble rv = Q[IV] - nys * rvn;
+                        RDouble rw = Q[IW] - nzs * rvn;
+                        RDouble p_new = Q[IP] - half * (Q[IU] * Q[IU] + Q[IV] * Q[IV] + Q[IW] * Q[IW]) / Q[IR];
+
+                        RDouble gam1 = gama(is, js, ks) - one;
+                        dq(it, jt, kt, IP) = p_new - pm / gam1 + half * ((ru * ru + rv * rv + rw * rw) / Q[IR] - rm * (um * um + vm * vm + wm * wm));
+                    }
+                    else if (IsWall(BCType) && viscousType > INVISCID)
+                    {
+                        RDouble ub = 0.0;
+                        RDouble vb = 0.0;
+                        RDouble wb = 0.0;
+                        dq(it, jt, kt, IR) = dq(is, js, ks, IR);
+                        dq(it, jt, kt, IU) = -dq(is, js, ks, IU) + two * ub * dq(is, js, ks, IR);
+                        dq(it, jt, kt, IV) = -dq(is, js, ks, IV) + two * vb * dq(is, js, ks, IR);
+                        dq(it, jt, kt, IW) = -dq(is, js, ks, IW) + two * wb * dq(is, js, ks, IR);
+                        dq(it, jt, kt, IP) = dq(is, js, ks, IP) + ub * (dq(it, jt, kt, IU) - dq(is, js, ks, IU))
+                            + vb * (dq(it, jt, kt, IV) - dq(is, js, ks, IV))
+                            + wb * (dq(it, jt, kt, IW) - dq(is, js, ks, IW));
+                    }
+                    else if (BCType == PHENGLEI::EXTRAPOLATION)
+                    {
+                        for (int m = 0; m < nLaminar; ++ m)
+                        {
+                            dq(it, jt, kt, m) = dq(is, js, ks, m);
+                        }
+                    }
+                    else
+                    {
+                        //! FIX_ALL set DQ = 0.
+                        for (int m = 0; m < nLaminar; ++ m)
+                        {
+                            dq(it, jt, kt, m) = zero;
+                        }
+                    }
+                }
+            }
+        }
+    }
+    delete[]prim;
+    delete[]Q;
+}
+
+void NSSolverStruct::UploadInterfaceData(ActionKey *actkey)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int level = actkey->level;
+    StructGrid *grid = reinterpret_cast <StructGrid *> (GetGrid(level));
+    StructGrid *fineGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *interfaceInfo = fineGrid->GetInterfaceInfo();
+    if (!interfaceInfo)
+    {
+        return;
+    }
+
+    int nEquation = GetNumberOfEquations();
+    RDouble4D *primitiveVariables = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    PHSPACE::UploadInterfaceValue(grid, primitiveVariables, "q", nEquation);
+
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble4D *temperatures = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    PHSPACE::UploadInterfaceValue(grid, temperatures, "t", nTemperatureModel);
+}
+
+void NSSolverStruct::DownloadInterfaceData(ActionKey *actkey)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int level = actkey->level;
+    StructGrid *grid = reinterpret_cast<StructGrid *>(GetGrid(level));
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo)
+    {
+        return;
+    }
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D *primitiveVariables = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    PHSPACE::DownloadInterfaceValue(grid, primitiveVariables, "q", nEquation);
+
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble4D *temperatures = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    PHSPACE::DownloadInterfaceValue(grid, temperatures, "t", nTemperatureModel);
+}
+
+void NSSolverStruct::UploadOversetData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D *primitiveVariables = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    PHSPACE::UploadOversetValue(grid, primitiveVariables, "q", nEquation);
+
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble4D *temperatures = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    PHSPACE::UploadOversetValue(grid, temperatures, "t", nTemperatureModel);
+}
+
+void NSSolverStruct::DownloadOversetData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = reinterpret_cast<StructGrid *>(GetGrid(level));
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D *primitiveVariables = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    PHSPACE::DownloadOversetValue(grid, primitiveVariables, "q", nEquation);
+
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    RDouble4D *temperatures = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    PHSPACE::DownloadOversetValue(grid, temperatures, "t", nTemperatureModel);
+}
+
+void NSSolverStruct::RotateVectorFromInterface(Grid *gridIn, const int &neighborZoneIndex, const int &nEquation)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+    StructBCSet *structBCSet = finestGrid->GetStructBCSet();
+    RDouble4D &rotNSgradValueX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotNSgradValueX"));
+    RDouble4D &rotNSgradValueY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotNSgradValueY"));
+    RDouble4D &rotNSgradValueZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotNSgradValueZ"));
+
+    rotNSgradValueX = 0.0;
+    rotNSgradValueY = 0.0;
+    rotNSgradValueZ = 0.0;
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+    RDouble rotationAngle = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+    rotationAngle = rotationAngle * PI / 180;
+    if (nEquation > 0)
+    {
+        RDouble4D &fieldRecvNSY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+        RDouble4D &fieldRecvNSZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int iFace = interfaceIndexContainerForReceive[iLocalFace];
+                int it, jt, kt;
+                finestGrid->GetTargetIndexIJK(iFace, iGhostLayer + 1, it, jt, kt);
+                finestGrid->RemapMultigridIJK(level, it, jt, kt);
+                int *ibcregions = structBCSet->GetIFaceInfo();
+                int iBCRegion = ibcregions[iFace];
+                StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+                string bcName = bcregion->GetBCName();
+                if (bcName == "Periodic_up")
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        rotNSgradValueY(it, jt, kt, m) = fieldRecvNSY(it, jt, kt, m) * cos(2 * PI - rotationAngle) - fieldRecvNSZ(it, jt, kt, m) * sin(2 * PI - rotationAngle);
+                        rotNSgradValueZ(it, jt, kt, m) = fieldRecvNSY(it, jt, kt, m) * sin(2 * PI - rotationAngle) + fieldRecvNSZ(it, jt, kt, m) * cos(2 * PI - rotationAngle);
+                    }
+                }
+                else if (bcName == "Periodic_down")
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        rotNSgradValueY(it, jt, kt, m) = fieldRecvNSY(it, jt, kt, m) * cos(rotationAngle) - fieldRecvNSZ(it, jt, kt, m) * sin(rotationAngle);
+                        rotNSgradValueZ(it, jt, kt, m) = fieldRecvNSY(it, jt, kt, m) * sin(rotationAngle) + fieldRecvNSZ(it, jt, kt, m) * cos(rotationAngle);
+                    }
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    fieldRecvNSY(it, jt, kt, m) = rotNSgradValueY(it, jt, kt, m);
+                    fieldRecvNSZ(it, jt, kt, m) = rotNSgradValueZ(it, jt, kt, m);
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::CompressGradientandLimitToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &dqdx_cc = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdx_cc_ruvwpt"));
+    RDouble4D &dqdy_cc = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdy_cc_ruvwpt"));
+    RDouble4D &dqdz_cc = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdz_cc_ruvwpt"));
+
+    RDouble limitcoefofinterface = GlobalDataBase::GetDoubleParaFromDB("limitcoefofinterface");
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+        int is, js, ks;
+        finestGrid->GetSourceIndexIJK(iFace, 1, is, js, ks);
+        finestGrid->RemapMultigridIJK(level, is, js, ks);
+
+        for (int m = 0; m <= 5; ++ m)
+        {
+            PHWrite(dataContainer, dqdx_cc(is, js, ks, m));
+            PHWrite(dataContainer, dqdy_cc(is, js, ks, m));
+            PHWrite(dataContainer, dqdz_cc(is, js, ks, m));
+        }
+
+        PHWrite(dataContainer, limitcoefofinterface);
+        PHWrite(dataContainer, limitcoefofinterface);
+        PHWrite(dataContainer, limitcoefofinterface);
+        PHWrite(dataContainer, limitcoefofinterface);
+        PHWrite(dataContainer, limitcoefofinterface);
+    }
+}
+
+void NSSolverStruct::DecompressGradientandLimitToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    RDouble dqdx_cc_ruvwpt[6];
+    RDouble dqdy_cc_ruvwpt[6];
+    RDouble dqdz_cc_ruvwpt[6];
+
+    RDouble limitofunstr_nouse = 0.0;
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+        int it, jt, kt;
+        finestGrid->GetTargetIndexIJK(iFace, 1, it, jt, kt);
+        finestGrid->RemapMultigridIJK(level, it, jt, kt);
+        for (int m = 0; m <= 5; ++ m)
+        {
+            PHRead(dataContainer, dqdx_cc_ruvwpt[m]);
+            PHRead(dataContainer, dqdy_cc_ruvwpt[m]);
+            PHRead(dataContainer, dqdz_cc_ruvwpt[m]);
+        }
+
+        PHRead(dataContainer, limitofunstr_nouse);
+        PHRead(dataContainer, limitofunstr_nouse);
+        PHRead(dataContainer, limitofunstr_nouse);
+        PHRead(dataContainer, limitofunstr_nouse);
+        PHRead(dataContainer, limitofunstr_nouse);
+
+        gradUVWTCellCenterX(it, jt, kt, 0) = dqdx_cc_ruvwpt[1]; //grad of U
+        gradUVWTCellCenterY(it, jt, kt, 0) = dqdy_cc_ruvwpt[1]; //grad of U
+        gradUVWTCellCenterZ(it, jt, kt, 0) = dqdz_cc_ruvwpt[1]; //grad of U
+
+        gradUVWTCellCenterX(it, jt, kt, 1) = dqdx_cc_ruvwpt[2]; //grad of V
+        gradUVWTCellCenterY(it, jt, kt, 1) = dqdy_cc_ruvwpt[2]; //grad of V
+        gradUVWTCellCenterZ(it, jt, kt, 1) = dqdz_cc_ruvwpt[2]; //grad of V
+
+        gradUVWTCellCenterX(it, jt, kt, 2) = dqdx_cc_ruvwpt[3]; //grad of W
+        gradUVWTCellCenterY(it, jt, kt, 2) = dqdy_cc_ruvwpt[3]; //grad of W
+        gradUVWTCellCenterZ(it, jt, kt, 2) = dqdz_cc_ruvwpt[3]; //grad of W
+
+        gradUVWTCellCenterX(it, jt, kt, 3) = dqdx_cc_ruvwpt[5]; //grad of T
+        gradUVWTCellCenterY(it, jt, kt, 3) = dqdy_cc_ruvwpt[5]; //grad of T
+        gradUVWTCellCenterZ(it, jt, kt, 3) = dqdz_cc_ruvwpt[5]; //grad of T
+    }
+}
+
+void NSSolverStruct::CompressQlQrToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &QLI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1"));
+    RDouble4D &QLJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2"));
+    RDouble4D &QLK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3"));
+    RDouble4D &QRI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1"));
+    RDouble4D &QRJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2"));
+    RDouble4D &QRK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3"));
+
+    RDouble qface[5];
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+
+        int is, js, ks;
+        finestGrid->GetSourceIndexIJK(iFace, 1, is, js, ks);
+        finestGrid->RemapMultigridIJK(level, is, js, ks);
+
+        int id, jd, kd;
+        int i_lr, j_lr, k_lr;
+        finestGrid->GetSourceIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+
+        if (i_lr != 0)
+        {
+            //! I_face
+            if (i_lr == -1)
+            {
+                //! left boundary
+                qface[0] = QRI(is, js, ks, 0);
+                qface[1] = QRI(is, js, ks, 1);
+                qface[2] = QRI(is, js, ks, 2);
+                qface[3] = QRI(is, js, ks, 3);
+                qface[4] = QRI(is, js, ks, 4);
+            }
+            else
+            {
+                //! right boundary
+                qface[0] = QLI(is, js, ks, 0);
+                qface[1] = QLI(is, js, ks, 1);
+                qface[2] = QLI(is, js, ks, 2);
+                qface[3] = QLI(is, js, ks, 3);
+                qface[4] = QLI(is, js, ks, 4);
+            }
+        }
+        else if (j_lr != 0)
+        {
+            //! J_face
+            if (j_lr == -1)
+            {
+                //! left boundary
+                qface[0] = QRJ(is, js, ks, 0);
+                qface[1] = QRJ(is, js, ks, 1);
+                qface[2] = QRJ(is, js, ks, 2);
+                qface[3] = QRJ(is, js, ks, 3);
+                qface[4] = QRJ(is, js, ks, 4);
+            }
+            else
+            {
+                //! right boundary
+                qface[0] = QLJ(is, js, ks, 0);
+                qface[1] = QLJ(is, js, ks, 1);
+                qface[2] = QLJ(is, js, ks, 2);
+                qface[3] = QLJ(is, js, ks, 3);
+                qface[4] = QLJ(is, js, ks, 4);
+            }
+        }
+        else
+        {
+            //! K_face
+            if (k_lr == -1)
+            {
+                //! left boundary
+                qface[0] = QRK(is, js, ks, 0);
+                qface[1] = QRK(is, js, ks, 1);
+                qface[2] = QRK(is, js, ks, 2);
+                qface[3] = QRK(is, js, ks, 3);
+                qface[4] = QRK(is, js, ks, 4);
+            }
+            else
+            {
+                //! right boundary
+                qface[0] = QLK(is, js, ks, 0);
+                qface[1] = QLK(is, js, ks, 1);
+                qface[2] = QLK(is, js, ks, 2);
+                qface[3] = QLK(is, js, ks, 3);
+                qface[4] = QLK(is, js, ks, 4);
+            }
+        }
+        for (int m = 0; m < 5; ++ m)
+        {
+            PHWrite(dataContainer, qface[m]);
+        }
+    }
+}
+
+void NSSolverStruct::DecompressQlQrToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &QLI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1"));
+    RDouble4D &QLJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2"));
+    RDouble4D &QLK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3"));
+    RDouble4D &QRI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1"));
+    RDouble4D &QRJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2"));
+    RDouble4D &QRK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3"));
+
+    RDouble qface[5];
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+        int it, jt, kt;
+        finestGrid->GetTargetIndexIJK(iFace, 1, it, jt, kt);
+        finestGrid->RemapMultigridIJK(level, it, jt, kt);
+
+        for (int m = 0; m < 5; ++ m)
+        {
+            PHRead(dataContainer, qface[m]);
+        }
+
+        int id, jd, kd;
+        int i_lr, j_lr, k_lr;
+        finestGrid->GetTargetIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+        if (i_lr != 0)
+        {
+            //! I_face
+            if (i_lr == -1)
+            {
+                //! left boundary
+                QLI(it, jt, kt, 0) = qface[0];
+                QLI(it, jt, kt, 1) = qface[1];
+                QLI(it, jt, kt, 2) = qface[2];
+                QLI(it, jt, kt, 3) = qface[3];
+                QLI(it, jt, kt, 4) = qface[4];
+            }
+            else
+            {
+                //! right boundary
+                QRI(it, jt, kt, 0) = qface[0];
+                QRI(it, jt, kt, 1) = qface[1];
+                QRI(it, jt, kt, 2) = qface[2];
+                QRI(it, jt, kt, 3) = qface[3];
+                QRI(it, jt, kt, 4) = qface[4];
+            }
+        }
+        else if (j_lr != 0)
+        {
+            //! J_face
+            if (j_lr == -1)
+            {
+                //! left boundary
+                QLJ(it, jt, kt, 0) = qface[0];
+                QLJ(it, jt, kt, 1) = qface[1];
+                QLJ(it, jt, kt, 2) = qface[2];
+                QLJ(it, jt, kt, 3) = qface[3];
+                QLJ(it, jt, kt, 4) = qface[4];
+            }
+            else
+            {
+                //! right boundary
+                QRJ(it, jt, kt, 0) = qface[0];
+                QRJ(it, jt, kt, 1) = qface[1];
+                QRJ(it, jt, kt, 2) = qface[2];
+                QRJ(it, jt, kt, 3) = qface[3];
+                QRJ(it, jt, kt, 4) = qface[4];
+            }
+        }
+        else
+        {
+            //! K_face
+            if (k_lr == -1)
+            {
+                //! left boundary
+                QLK(it, jt, kt, 0) = qface[0];
+                QLK(it, jt, kt, 1) = qface[1];
+                QLK(it, jt, kt, 2) = qface[2];
+                QLK(it, jt, kt, 3) = qface[3];
+                QLK(it, jt, kt, 4) = qface[4];
+            }
+            else
+            {
+                //! right boundary
+                QRK(it, jt, kt, 0) = qface[0];
+                QRK(it, jt, kt, 1) = qface[1];
+                QRK(it, jt, kt, 2) = qface[2];
+                QRK(it, jt, kt, 3) = qface[3];
+                QRK(it, jt, kt, 4) = qface[4];
+            }
+        }
+    }
+}
+
+void NSSolverStruct::CompressFacefluxToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    int gridtypeofcurrentZone = grid->Type();
+    int gridtypeofneighborZone = PHMPI::GetZoneGridType(neighborZoneIndex);
+    if (gridtypeofcurrentZone == gridtypeofneighborZone)
+    {
+        RDouble uploadData = 0.0;
+        dataContainer->moveto_begin();
+        PHWrite(dataContainer, uploadData);
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    if (viscousType <= INVISCID)
+    {
+        //! Euler
+        RDouble4D &faceInviscidfluxI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI"));
+        RDouble4D &faceInviscidfluxJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ"));
+        RDouble4D &faceInviscidfluxK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK"));
+
+        RDouble flux[5];
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForSend[iLocalFace];
+
+            int is, js, ks;
+            finestGrid->GetSourceIndexIJK(iFace, 1, is, js, ks);
+            finestGrid->RemapMultigridIJK(level, is, js, ks);
+
+            int id, jd, kd;
+            int i_lr, j_lr, k_lr;
+            finestGrid->GetSourceIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+
+            if (i_lr != 0)
+            {
+                //! I_face
+                if (i_lr == -1)
+                {
+                    //! left boundary
+                    flux[0] = faceInviscidfluxI(is, js, ks, 0);
+                    flux[1] = faceInviscidfluxI(is, js, ks, 1);
+                    flux[2] = faceInviscidfluxI(is, js, ks, 2);
+                    flux[3] = faceInviscidfluxI(is, js, ks, 3);
+                    flux[4] = faceInviscidfluxI(is, js, ks, 4);
+                }
+                else
+                {
+                    //! right boundary
+                    flux[0] = -faceInviscidfluxI(is + 1, js, ks, 0);
+                    flux[1] = -faceInviscidfluxI(is + 1, js, ks, 1);
+                    flux[2] = -faceInviscidfluxI(is + 1, js, ks, 2);
+                    flux[3] = -faceInviscidfluxI(is + 1, js, ks, 3);
+                    flux[4] = -faceInviscidfluxI(is + 1, js, ks, 4);
+                }
+            }
+            else if (j_lr != 0)
+            {
+                //! J_face
+                if (j_lr == -1)
+                {
+                    //! left boundary
+                    flux[0] = faceInviscidfluxJ(is, js, ks, 0);
+                    flux[1] = faceInviscidfluxJ(is, js, ks, 1);
+                    flux[2] = faceInviscidfluxJ(is, js, ks, 2);
+                    flux[3] = faceInviscidfluxJ(is, js, ks, 3);
+                    flux[4] = faceInviscidfluxJ(is, js, ks, 4);
+                }
+                else
+                {
+                    //! right boundary
+                    flux[0] = -faceInviscidfluxJ(is, js + 1, ks, 0);
+                    flux[1] = -faceInviscidfluxJ(is, js + 1, ks, 1);
+                    flux[2] = -faceInviscidfluxJ(is, js + 1, ks, 2);
+                    flux[3] = -faceInviscidfluxJ(is, js + 1, ks, 3);
+                    flux[4] = -faceInviscidfluxJ(is, js + 1, ks, 4);
+                }
+            }
+            else
+            {
+                //! K_face
+                if (k_lr == -1)
+                {
+                    //! left boundary
+                    flux[0] = faceInviscidfluxK(is, js, ks, 0);
+                    flux[1] = faceInviscidfluxK(is, js, ks, 1);
+                    flux[2] = faceInviscidfluxK(is, js, ks, 2);
+                    flux[3] = faceInviscidfluxK(is, js, ks, 3);
+                    flux[4] = faceInviscidfluxK(is, js, ks, 4);
+                }
+                else
+                {
+                    //! right boundary
+                    flux[0] = -faceInviscidfluxK(is, js, ks + 1, 0);
+                    flux[1] = -faceInviscidfluxK(is, js, ks + 1, 1);
+                    flux[2] = -faceInviscidfluxK(is, js, ks + 1, 2);
+                    flux[3] = -faceInviscidfluxK(is, js, ks + 1, 3);
+                    flux[4] = -faceInviscidfluxK(is, js, ks + 1, 4);
+                }
+            }
+
+            for (int m = 0; m < 5; ++ m)
+            {
+                PHWrite(dataContainer, flux[m]);
+            }
+        }
+    }
+    else
+    {
+        //! laminar
+        RDouble4D &faceInviscidfluxI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI"));
+        RDouble4D &faceInviscidfluxJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ"));
+        RDouble4D &faceInviscidfluxK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK"));
+
+        RDouble4D &faceViscousfluxI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxI"));
+        RDouble4D &faceViscousfluxJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxJ"));
+        RDouble4D &faceViscousfluxK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxK"));
+
+        RDouble Inviscidflux[5];
+        RDouble Viscousflux[5];
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForSend[iLocalFace];
+
+            int is, js, ks;
+            finestGrid->GetSourceIndexIJK(iFace, 1, is, js, ks);
+            finestGrid->RemapMultigridIJK(level, is, js, ks);
+
+            int id, jd, kd;
+            int i_lr, j_lr, k_lr;
+            finestGrid->GetSourceIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+
+            if (i_lr != 0)
+            {
+                //! I_face
+                if (i_lr == -1)
+                {
+                    //! left boundary
+                    Inviscidflux[0] = faceInviscidfluxI(is, js, ks, 0);
+                    Inviscidflux[1] = faceInviscidfluxI(is, js, ks, 1);
+                    Inviscidflux[2] = faceInviscidfluxI(is, js, ks, 2);
+                    Inviscidflux[3] = faceInviscidfluxI(is, js, ks, 3);
+                    Inviscidflux[4] = faceInviscidfluxI(is, js, ks, 4);
+
+                    Viscousflux[0] = faceViscousfluxI(is, js, ks, 0);
+                    Viscousflux[1] = faceViscousfluxI(is, js, ks, 1);
+                    Viscousflux[2] = faceViscousfluxI(is, js, ks, 2);
+                    Viscousflux[3] = faceViscousfluxI(is, js, ks, 3);
+                    Viscousflux[4] = faceViscousfluxI(is, js, ks, 4);
+                }
+                else
+                {
+                    //! right boundary
+                    Inviscidflux[0] = -faceInviscidfluxI(is + 1, js, ks, 0);
+                    Inviscidflux[1] = -faceInviscidfluxI(is + 1, js, ks, 1);
+                    Inviscidflux[2] = -faceInviscidfluxI(is + 1, js, ks, 2);
+                    Inviscidflux[3] = -faceInviscidfluxI(is + 1, js, ks, 3);
+                    Inviscidflux[4] = -faceInviscidfluxI(is + 1, js, ks, 4);
+
+                    Viscousflux[0] = -faceViscousfluxI(is + 1, js, ks, 0);
+                    Viscousflux[1] = -faceViscousfluxI(is + 1, js, ks, 1);
+                    Viscousflux[2] = -faceViscousfluxI(is + 1, js, ks, 2);
+                    Viscousflux[3] = -faceViscousfluxI(is + 1, js, ks, 3);
+                    Viscousflux[4] = -faceViscousfluxI(is + 1, js, ks, 4);
+                }
+            }
+            else if (j_lr != 0)
+            {
+                //! J_face
+                if (j_lr == -1)
+                {
+                    //! left boundary
+                    Inviscidflux[0] = faceInviscidfluxJ(is, js, ks, 0);
+                    Inviscidflux[1] = faceInviscidfluxJ(is, js, ks, 1);
+                    Inviscidflux[2] = faceInviscidfluxJ(is, js, ks, 2);
+                    Inviscidflux[3] = faceInviscidfluxJ(is, js, ks, 3);
+                    Inviscidflux[4] = faceInviscidfluxJ(is, js, ks, 4);
+
+                    Viscousflux[0] = faceViscousfluxJ(is, js, ks, 0);
+                    Viscousflux[1] = faceViscousfluxJ(is, js, ks, 1);
+                    Viscousflux[2] = faceViscousfluxJ(is, js, ks, 2);
+                    Viscousflux[3] = faceViscousfluxJ(is, js, ks, 3);
+                    Viscousflux[4] = faceViscousfluxJ(is, js, ks, 4);
+                }
+                else
+                {
+                    //! right boundary
+                    Inviscidflux[0] = -faceInviscidfluxJ(is, js + 1, ks, 0);
+                    Inviscidflux[1] = -faceInviscidfluxJ(is, js + 1, ks, 1);
+                    Inviscidflux[2] = -faceInviscidfluxJ(is, js + 1, ks, 2);
+                    Inviscidflux[3] = -faceInviscidfluxJ(is, js + 1, ks, 3);
+                    Inviscidflux[4] = -faceInviscidfluxJ(is, js + 1, ks, 4);
+
+                    Viscousflux[0] = -faceViscousfluxJ(is, js + 1, ks, 0);
+                    Viscousflux[1] = -faceViscousfluxJ(is, js + 1, ks, 1);
+                    Viscousflux[2] = -faceViscousfluxJ(is, js + 1, ks, 2);
+                    Viscousflux[3] = -faceViscousfluxJ(is, js + 1, ks, 3);
+                    Viscousflux[4] = -faceViscousfluxJ(is, js + 1, ks, 4);
+                }
+            }
+            else
+            {
+                //! K_face
+                if (k_lr == -1)
+                {
+                    //! left boundary
+                    Inviscidflux[0] = faceInviscidfluxK(is, js, ks, 0);
+                    Inviscidflux[1] = faceInviscidfluxK(is, js, ks, 1);
+                    Inviscidflux[2] = faceInviscidfluxK(is, js, ks, 2);
+                    Inviscidflux[3] = faceInviscidfluxK(is, js, ks, 3);
+                    Inviscidflux[4] = faceInviscidfluxK(is, js, ks, 4);
+
+                    Viscousflux[0] = faceViscousfluxK(is, js, ks, 0);
+                    Viscousflux[1] = faceViscousfluxK(is, js, ks, 1);
+                    Viscousflux[2] = faceViscousfluxK(is, js, ks, 2);
+                    Viscousflux[3] = faceViscousfluxK(is, js, ks, 3);
+                    Viscousflux[4] = faceViscousfluxK(is, js, ks, 4);
+                }
+                else
+                {
+                    //! right boundary
+                    Inviscidflux[0] = -faceInviscidfluxK(is, js, ks + 1, 0);
+                    Inviscidflux[1] = -faceInviscidfluxK(is, js, ks + 1, 1);
+                    Inviscidflux[2] = -faceInviscidfluxK(is, js, ks + 1, 2);
+                    Inviscidflux[3] = -faceInviscidfluxK(is, js, ks + 1, 3);
+                    Inviscidflux[4] = -faceInviscidfluxK(is, js, ks + 1, 4);
+
+                    Viscousflux[0] = -faceViscousfluxK(is, js, ks + 1, 0);
+                    Viscousflux[1] = -faceViscousfluxK(is, js, ks + 1, 1);
+                    Viscousflux[2] = -faceViscousfluxK(is, js, ks + 1, 2);
+                    Viscousflux[3] = -faceViscousfluxK(is, js, ks + 1, 3);
+                    Viscousflux[4] = -faceViscousfluxK(is, js, ks + 1, 4);
+                }
+            }
+            for (int m = 0; m < 5; ++ m)
+            {
+                PHWrite(dataContainer, Inviscidflux[m]);
+                PHWrite(dataContainer, Viscousflux[m]);
+            }
+        }
+    }
+
+}
+
+void NSSolverStruct::DecompressFacefluxToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    int gridtypeofcurrentZone = grid->Type();
+    int gridtypeofneighborZone = PHMPI::GetZoneGridType(neighborZoneIndex);
+    if (gridtypeofcurrentZone == gridtypeofneighborZone)
+    {
+        RDouble downdData = 0.0;
+        dataContainer->moveto_begin();
+        PHRead(dataContainer, downdData);
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    RDouble coefofstrflux = GlobalDataBase::GetDoubleParaFromDB("coefofstrflux");
+    RDouble coefofunstrflux = 1.0 - coefofstrflux;
+
+    if (viscousType <= INVISCID)
+    {
+        //! Euler
+        RDouble4D &faceInviscidfluxI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI"));
+        RDouble4D &faceInviscidfluxJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ"));
+        RDouble4D &faceInviscidfluxK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK"));
+
+        RDouble flux[5];
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForReceive[iLocalFace];
+            int it, jt, kt;
+            finestGrid->GetTargetIndexIJK(iFace, 1, it, jt, kt);
+            finestGrid->RemapMultigridIJK(level, it, jt, kt);
+
+            for (int m = 0; m < 5; ++ m)
+            {
+                PHRead(dataContainer, flux[m]);
+            }
+
+            int id, jd, kd;
+            int i_lr, j_lr, k_lr;
+            finestGrid->GetTargetIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+            if (i_lr != 0)
+            {
+                //! I_face
+                if (i_lr == -1)
+                {
+                    //! left boundary
+                    faceInviscidfluxI(it + 1, jt, kt, 0) = (coefofunstrflux * flux[0] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 0));
+                    faceInviscidfluxI(it + 1, jt, kt, 1) = (coefofunstrflux * flux[1] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 1));
+                    faceInviscidfluxI(it + 1, jt, kt, 2) = (coefofunstrflux * flux[2] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 2));
+                    faceInviscidfluxI(it + 1, jt, kt, 3) = (coefofunstrflux * flux[3] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 3));
+                    faceInviscidfluxI(it + 1, jt, kt, 4) = (coefofunstrflux * flux[4] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 4));
+                }
+                else
+                {
+                    //! right boundary
+                    faceInviscidfluxI(it, jt, kt, 0) = (-coefofunstrflux * flux[0] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 0));
+                    faceInviscidfluxI(it, jt, kt, 1) = (-coefofunstrflux * flux[1] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 1));
+                    faceInviscidfluxI(it, jt, kt, 2) = (-coefofunstrflux * flux[2] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 2));
+                    faceInviscidfluxI(it, jt, kt, 3) = (-coefofunstrflux * flux[3] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 3));
+                    faceInviscidfluxI(it, jt, kt, 4) = (-coefofunstrflux * flux[4] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 4));
+                }
+            }
+            else if (j_lr != 0)
+            {
+                //! J_face
+                if (j_lr == -1)
+                {
+                    //! left boundary
+                    faceInviscidfluxJ(it, jt + 1, kt, 0) = (coefofunstrflux * flux[0] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 0));
+                    faceInviscidfluxJ(it, jt + 1, kt, 1) = (coefofunstrflux * flux[1] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 1));
+                    faceInviscidfluxJ(it, jt + 1, kt, 2) = (coefofunstrflux * flux[2] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 2));
+                    faceInviscidfluxJ(it, jt + 1, kt, 3) = (coefofunstrflux * flux[3] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 3));
+                    faceInviscidfluxJ(it, jt + 1, kt, 4) = (coefofunstrflux * flux[4] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 4));
+                }
+                else
+                {
+                    //! right boundary
+                    faceInviscidfluxJ(it, jt, kt, 0) = (-coefofunstrflux * flux[0] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 0));
+                    faceInviscidfluxJ(it, jt, kt, 1) = (-coefofunstrflux * flux[1] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 1));
+                    faceInviscidfluxJ(it, jt, kt, 2) = (-coefofunstrflux * flux[2] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 2));
+                    faceInviscidfluxJ(it, jt, kt, 3) = (-coefofunstrflux * flux[3] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 3));
+                    faceInviscidfluxJ(it, jt, kt, 4) = (-coefofunstrflux * flux[4] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 4));
+                }
+            }
+            else
+            {
+                //! K_face
+                if (k_lr == -1)
+                {
+                    //! left boundary
+                    faceInviscidfluxK(it, jt, kt + 1, 0) = (coefofunstrflux * flux[0] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 0));
+                    faceInviscidfluxK(it, jt, kt + 1, 1) = (coefofunstrflux * flux[1] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 1));
+                    faceInviscidfluxK(it, jt, kt + 1, 2) = (coefofunstrflux * flux[2] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 2));
+                    faceInviscidfluxK(it, jt, kt + 1, 3) = (coefofunstrflux * flux[3] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 3));
+                    faceInviscidfluxK(it, jt, kt + 1, 4) = (coefofunstrflux * flux[4] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 4));
+                }
+                else
+                {
+                    //! right boundary
+                    faceInviscidfluxK(it, jt, kt, 0) = (-coefofunstrflux * flux[0] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 0));
+                    faceInviscidfluxK(it, jt, kt, 1) = (-coefofunstrflux * flux[1] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 1));
+                    faceInviscidfluxK(it, jt, kt, 2) = (-coefofunstrflux * flux[2] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 2));
+                    faceInviscidfluxK(it, jt, kt, 3) = (-coefofunstrflux * flux[3] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 3));
+                    faceInviscidfluxK(it, jt, kt, 4) = (-coefofunstrflux * flux[4] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 4));
+                }
+            }
+        }
+    }
+    else
+    {
+        //! laminar
+        RDouble4D &faceInviscidfluxI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI"));
+        RDouble4D &faceInviscidfluxJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ"));
+        RDouble4D &faceInviscidfluxK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK"));
+
+        RDouble4D &faceViscousfluxI = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxI"));
+        RDouble4D &faceViscousfluxJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxJ"));
+        RDouble4D &faceViscousfluxK = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxK"));
+
+        RDouble Inviscidflux[5];
+        RDouble Viscousflux[5];
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForReceive[iLocalFace];
+            int it, jt, kt;
+            finestGrid->GetTargetIndexIJK(iFace, 1, it, jt, kt);
+            finestGrid->RemapMultigridIJK(level, it, jt, kt);
+
+            for (int m = 0; m < 5; ++ m)
+            {
+                PHRead(dataContainer, Inviscidflux[m]);
+                PHRead(dataContainer, Viscousflux[m]);
+            }
+
+            int id, jd, kd;
+            int i_lr, j_lr, k_lr;
+            finestGrid->GetTargetIndexIJK_fornodetransfer(iFace, id, jd, kd, i_lr, j_lr, k_lr);
+            if (i_lr != 0)
+            {
+                //! I_face
+                if (i_lr == -1)
+                {
+                    //! left boundary
+                    faceInviscidfluxI(it + 1, jt, kt, 0) = (coefofunstrflux * Inviscidflux[0] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 0));
+                    faceInviscidfluxI(it + 1, jt, kt, 1) = (coefofunstrflux * Inviscidflux[1] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 1));
+                    faceInviscidfluxI(it + 1, jt, kt, 2) = (coefofunstrflux * Inviscidflux[2] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 2));
+                    faceInviscidfluxI(it + 1, jt, kt, 3) = (coefofunstrflux * Inviscidflux[3] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 3));
+                    faceInviscidfluxI(it + 1, jt, kt, 4) = (coefofunstrflux * Inviscidflux[4] + coefofstrflux * faceInviscidfluxI(it + 1, jt, kt, 4));
+
+                    faceViscousfluxI(it + 1, jt, kt, 0) = (coefofunstrflux * Viscousflux[0] + coefofstrflux * faceViscousfluxI(it + 1, jt, kt, 0));
+                    faceViscousfluxI(it + 1, jt, kt, 1) = (coefofunstrflux * Viscousflux[1] + coefofstrflux * faceViscousfluxI(it + 1, jt, kt, 1));
+                    faceViscousfluxI(it + 1, jt, kt, 2) = (coefofunstrflux * Viscousflux[2] + coefofstrflux * faceViscousfluxI(it + 1, jt, kt, 2));
+                    faceViscousfluxI(it + 1, jt, kt, 3) = (coefofunstrflux * Viscousflux[3] + coefofstrflux * faceViscousfluxI(it + 1, jt, kt, 3));
+                    faceViscousfluxI(it + 1, jt, kt, 4) = (coefofunstrflux * Viscousflux[4] + coefofstrflux * faceViscousfluxI(it + 1, jt, kt, 4));
+                }
+                else
+                {
+                    //! right boundary
+                    faceInviscidfluxI(it, jt, kt, 0) = (-coefofunstrflux * Inviscidflux[0] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 0));
+                    faceInviscidfluxI(it, jt, kt, 1) = (-coefofunstrflux * Inviscidflux[1] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 1));
+                    faceInviscidfluxI(it, jt, kt, 2) = (-coefofunstrflux * Inviscidflux[2] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 2));
+                    faceInviscidfluxI(it, jt, kt, 3) = (-coefofunstrflux * Inviscidflux[3] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 3));
+                    faceInviscidfluxI(it, jt, kt, 4) = (-coefofunstrflux * Inviscidflux[4] + coefofstrflux * faceInviscidfluxI(it, jt, kt, 4));
+
+                    faceViscousfluxI(it, jt, kt, 0) = (-coefofunstrflux * Viscousflux[0] + coefofstrflux * faceViscousfluxI(it, jt, kt, 0));
+                    faceViscousfluxI(it, jt, kt, 1) = (-coefofunstrflux * Viscousflux[1] + coefofstrflux * faceViscousfluxI(it, jt, kt, 1));
+                    faceViscousfluxI(it, jt, kt, 2) = (-coefofunstrflux * Viscousflux[2] + coefofstrflux * faceViscousfluxI(it, jt, kt, 2));
+                    faceViscousfluxI(it, jt, kt, 3) = (-coefofunstrflux * Viscousflux[3] + coefofstrflux * faceViscousfluxI(it, jt, kt, 3));
+                    faceViscousfluxI(it, jt, kt, 4) = (-coefofunstrflux * Viscousflux[4] + coefofstrflux * faceViscousfluxI(it, jt, kt, 4));
+                }
+            }
+            else if (j_lr != 0)
+            {
+                //! J_face
+                if (j_lr == -1)
+                {
+                    //! left boundary
+                    faceInviscidfluxJ(it, jt + 1, kt, 0) = (coefofunstrflux * Inviscidflux[0] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 0));
+                    faceInviscidfluxJ(it, jt + 1, kt, 1) = (coefofunstrflux * Inviscidflux[1] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 1));
+                    faceInviscidfluxJ(it, jt + 1, kt, 2) = (coefofunstrflux * Inviscidflux[2] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 2));
+                    faceInviscidfluxJ(it, jt + 1, kt, 3) = (coefofunstrflux * Inviscidflux[3] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 3));
+                    faceInviscidfluxJ(it, jt + 1, kt, 4) = (coefofunstrflux * Inviscidflux[4] + coefofstrflux * faceInviscidfluxJ(it, jt + 1, kt, 4));
+
+                    faceViscousfluxJ(it, jt + 1, kt, 0) = (coefofunstrflux * Viscousflux[0] + coefofstrflux * faceViscousfluxJ(it, jt + 1, kt, 0));
+                    faceViscousfluxJ(it, jt + 1, kt, 1) = (coefofunstrflux * Viscousflux[1] + coefofstrflux * faceViscousfluxJ(it, jt + 1, kt, 1));
+                    faceViscousfluxJ(it, jt + 1, kt, 2) = (coefofunstrflux * Viscousflux[2] + coefofstrflux * faceViscousfluxJ(it, jt + 1, kt, 2));
+                    faceViscousfluxJ(it, jt + 1, kt, 3) = (coefofunstrflux * Viscousflux[3] + coefofstrflux * faceViscousfluxJ(it, jt + 1, kt, 3));
+                    faceViscousfluxJ(it, jt + 1, kt, 4) = (coefofunstrflux * Viscousflux[4] + coefofstrflux * faceViscousfluxJ(it, jt + 1, kt, 4));
+                }
+                else
+                {
+                    //! right boundary
+                    faceInviscidfluxJ(it, jt, kt, 0) = (-coefofunstrflux * Inviscidflux[0] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 0));
+                    faceInviscidfluxJ(it, jt, kt, 1) = (-coefofunstrflux * Inviscidflux[1] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 1));
+                    faceInviscidfluxJ(it, jt, kt, 2) = (-coefofunstrflux * Inviscidflux[2] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 2));
+                    faceInviscidfluxJ(it, jt, kt, 3) = (-coefofunstrflux * Inviscidflux[3] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 3));
+                    faceInviscidfluxJ(it, jt, kt, 4) = (-coefofunstrflux * Inviscidflux[4] + coefofstrflux * faceInviscidfluxJ(it, jt, kt, 4));
+
+                    faceViscousfluxJ(it, jt, kt, 0) = (-coefofunstrflux * Viscousflux[0] + coefofstrflux * faceViscousfluxJ(it, jt, kt, 0));
+                    faceViscousfluxJ(it, jt, kt, 1) = (-coefofunstrflux * Viscousflux[1] + coefofstrflux * faceViscousfluxJ(it, jt, kt, 1));
+                    faceViscousfluxJ(it, jt, kt, 2) = (-coefofunstrflux * Viscousflux[2] + coefofstrflux * faceViscousfluxJ(it, jt, kt, 2));
+                    faceViscousfluxJ(it, jt, kt, 3) = (-coefofunstrflux * Viscousflux[3] + coefofstrflux * faceViscousfluxJ(it, jt, kt, 3));
+                    faceViscousfluxJ(it, jt, kt, 4) = (-coefofunstrflux * Viscousflux[4] + coefofstrflux * faceViscousfluxJ(it, jt, kt, 4));
+                }
+            }
+            else
+            {
+                //! K_face
+                if (k_lr == -1)
+                {
+                    //! left boundary
+                    faceInviscidfluxK(it, jt, kt + 1, 0) = (coefofunstrflux * Inviscidflux[0] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 0));
+                    faceInviscidfluxK(it, jt, kt + 1, 1) = (coefofunstrflux * Inviscidflux[1] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 1));
+                    faceInviscidfluxK(it, jt, kt + 1, 2) = (coefofunstrflux * Inviscidflux[2] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 2));
+                    faceInviscidfluxK(it, jt, kt + 1, 3) = (coefofunstrflux * Inviscidflux[3] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 3));
+                    faceInviscidfluxK(it, jt, kt + 1, 4) = (coefofunstrflux * Inviscidflux[4] + coefofstrflux * faceInviscidfluxK(it, jt, kt + 1, 4));
+
+                    faceViscousfluxK(it, jt, kt + 1, 0) = (coefofunstrflux * Viscousflux[0] + coefofstrflux * faceViscousfluxK(it, jt, kt + 1, 0));
+                    faceViscousfluxK(it, jt, kt + 1, 1) = (coefofunstrflux * Viscousflux[1] + coefofstrflux * faceViscousfluxK(it, jt, kt + 1, 1));
+                    faceViscousfluxK(it, jt, kt + 1, 2) = (coefofunstrflux * Viscousflux[2] + coefofstrflux * faceViscousfluxK(it, jt, kt + 1, 2));
+                    faceViscousfluxK(it, jt, kt + 1, 3) = (coefofunstrflux * Viscousflux[3] + coefofstrflux * faceViscousfluxK(it, jt, kt + 1, 3));
+                    faceViscousfluxK(it, jt, kt + 1, 4) = (coefofunstrflux * Viscousflux[4] + coefofstrflux * faceViscousfluxK(it, jt, kt + 1, 4));
+                }
+                else
+                {
+                    //! right boundary
+                    faceInviscidfluxK(it, jt, kt, 0) = (-coefofunstrflux * Inviscidflux[0] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 0));
+                    faceInviscidfluxK(it, jt, kt, 1) = (-coefofunstrflux * Inviscidflux[1] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 1));
+                    faceInviscidfluxK(it, jt, kt, 2) = (-coefofunstrflux * Inviscidflux[2] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 2));
+                    faceInviscidfluxK(it, jt, kt, 3) = (-coefofunstrflux * Inviscidflux[3] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 3));
+                    faceInviscidfluxK(it, jt, kt, 4) = (-coefofunstrflux * Inviscidflux[4] + coefofstrflux * faceInviscidfluxK(it, jt, kt, 4));
+
+                    faceViscousfluxK(it, jt, kt, 0) = (-coefofunstrflux * Viscousflux[0] + coefofstrflux * faceViscousfluxK(it, jt, kt, 0));
+                    faceViscousfluxK(it, jt, kt, 1) = (-coefofunstrflux * Viscousflux[1] + coefofstrflux * faceViscousfluxK(it, jt, kt, 1));
+                    faceViscousfluxK(it, jt, kt, 2) = (-coefofunstrflux * Viscousflux[2] + coefofstrflux * faceViscousfluxK(it, jt, kt, 2));
+                    faceViscousfluxK(it, jt, kt, 3) = (-coefofunstrflux * Viscousflux[3] + coefofstrflux * faceViscousfluxK(it, jt, kt, 3));
+                    faceViscousfluxK(it, jt, kt, 4) = (-coefofunstrflux * Viscousflux[4] + coefofstrflux * faceViscousfluxK(it, jt, kt, 4));
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStruct::CompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex, const int &nEquation)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &fieldSend = fieldProxy->GetField_STR();
+
+    for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+    {
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForSend[iLocalFace];
+            int is, js, ks;
+            finestGrid->GetSourceIndexIJK(iFace, iGhostLayer + 1, is, js, ks);
+            finestGrid->RemapMultigridIJK(level, is, js, ks);
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                PHWrite(dataContainer, fieldSend(is, js, ks, m));
+            }
+        }
+    }
+}
+
+void NSSolverStruct::DecompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex, const int &nEquation)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+    StructBCSet *structBCSet = finestGrid->GetStructBCSet();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    int periodicType = PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType");
+    RDouble rotationAngle = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+    rotationAngle = rotationAngle * PI / 180;
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &fieldRecv = fieldProxy->GetField_STR();
+
+    for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+    {
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForReceive[iLocalFace];
+            int it, jt, kt;
+            finestGrid->GetTargetIndexIJK(iFace, iGhostLayer + 1, it, jt, kt);
+            finestGrid->RemapMultigridIJK(level, it, jt, kt);
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                PHRead(dataContainer, fieldRecv(it, jt, kt, m));
+            }
+            if (periodicType == ROTATIONAL_PERIODICITY)
+            {
+                int *ibcregions = structBCSet->GetIFaceInfo();
+                int iBCRegion = ibcregions[iFace];
+                StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+                string bcName = bcregion->GetBCName();
+                if (bcName == "Periodic_up" || bcName == "Periodic_down")
+                {
+                    RDouble rotfg[3] = { 0, 0, 0 };
+                    if (bcName == "Periodic_up")
+                    {
+                        rotfg[0] = fieldRecv(it, jt, kt, 1);
+                        rotfg[1] = fieldRecv(it, jt, kt, 2) * cos(2 * PI - rotationAngle) - fieldRecv(it, jt, kt, 3) * sin(2 * PI - rotationAngle);
+                        rotfg[2] = fieldRecv(it, jt, kt, 2) * sin(2 * PI - rotationAngle) + fieldRecv(it, jt, kt, 3) * cos(2 * PI - rotationAngle);
+
+                    }
+                    else if (bcName == "Periodic_down")
+                    {
+                        rotfg[0] = fieldRecv(it, jt, kt, 1);
+                        rotfg[1] = fieldRecv(it, jt, kt, 2) * cos(rotationAngle) - fieldRecv(it, jt, kt, 3) * sin(rotationAngle);
+                        rotfg[2] = fieldRecv(it, jt, kt, 2) * sin(rotationAngle) + fieldRecv(it, jt, kt, 3) * cos(rotationAngle);
+                    }
+
+                    for (int m = 1; m <= 3; ++ m)
+                    {
+                        fieldRecv(it, jt, kt, m) = rotfg[m - 1];
+                    }
+                }
+            }
+        }
+    }
+}
+
+GradientCellCenter *NSSolverStruct::GetGradientCellCenterUVWT(Grid *gridIn, FieldProxy *primitiveVariables)
+{
+    int level = gridIn->GetLevel();
+    if (gradientCellCenterUVWT[level] == NULL)
+    {
+        gradientCellCenterUVWT[level] = new GradientCellCenter(gridIn, STRUCTGRID, primitiveVariables, 4);
+    }
+    return gradientCellCenterUVWT[level];
+}
+
+GradientCellCenter *NSSolverStruct::GetGradientCellCenterUVWT(Grid *gridIn)
+{
+    int level = gridIn->GetLevel();
+    return gradientCellCenterUVWT[level];
+}
+
+LIB_EXPORT void NSSolverStruct::ComputePostVisualVariables(Post_Visual *postVisualization)
+{
+    StructGrid *grid = StructGridCast(postVisualization->GetGrid());
+
+
+    if (postVisualization->GetFlowType() == AverageFlow)
+    {
+        RDouble4D &qAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage"));
+
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DENSITY);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qAverage, IDX::IR);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_U);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qAverage, IDX::IU);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_V);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qAverage, IDX::IV);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_W);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qAverage, IDX::IW);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_PRESSURE);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qAverage, IDX::IP);
+
+        return;
+    }
+
+    //! added by zzp 202108, for ReynoldsStress output
+    if (postVisualization->GetFlowType() == AverageReynoldsStress)
+    {
+        RDouble4D &tauAverage = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("tauAverage"));
+
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_XX);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage, 0);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_YY);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage, 1);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_ZZ);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage, 2);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_XY);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage, 3);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_XZ);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage, 4);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_YZ);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage, 5);
+
+        return;
+    }
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    int isOverset = GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+    if (isOverset)
+    {
+        int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();
+
+        Range II(1, ni - 1);
+        Range JJ(1, nj - 1);
+        Range KK(1, nk - 1);
+        if (nk == 1) KK.setRange(1, 1);
+
+        Int3D &iblank = *new Int3D(II, JJ, KK, fortranArray);
+        int *iBlank = UnstructGridCast(grid)->GetBlankIndex();
+        int numberOfCells = grid->GetNTotalCell();
+        for (int iCell = 0; iCell < numberOfCells; ++ iCell)
+        {
+            int i, j, k;
+            DecodeIJK(iCell, i, j, k, ni - 1, nj - 1);
+            iblank(i, j, k) = iBlank[iCell];
+        }
+
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_IBLANK))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_IBLANK);
+            postVisualization->UpdateVisualNodeVarPtr(varName, iblank);
+        }
+        delete &iblank;
+    }
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    using namespace IDX;
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DENSITY)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MACH))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DENSITY);
+        postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, IDX::IR);
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_U)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MACH))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_U);
+        postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, IDX::IU);
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_V)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MACH))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_V);
+        postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, IDX::IV);
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_W)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MACH))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_W);
+        postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, IDX::IW);
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_PRESSURE)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MACH))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_PRESSURE);
+        postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, IDX::IP);
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_TEMPERATURE))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TEMPERATURE);
+        postVisualization->UpdateVisualNodeVarPtr(varName, temperatures, IDX::ITT);
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_STREAMLINE_MACH))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_STREAMLINE_MACH);
+
+        int isOverset1 = parameters->GetIsOverLapping();
+
+        RDouble4D *mach = 0;
+        if (!isOverset1)
+        {
+            mach = CompMachNumber(grid);
+        }
+        else
+        {
+            mach = ComputeMachNumberField(grid);
+        }
+
+        postVisualization->UpdateVisualNodeVarPtr(varName, *mach, 0);
+        delete mach;
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_STREAMLINE_U))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_STREAMLINE_U);
+        postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, IDX::IU);
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_STREAMLINE_V))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_STREAMLINE_V);
+        postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, IDX::IV);
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_STREAMLINE_W))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_STREAMLINE_W);
+        postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, IDX::IW);
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_TIME_STEP))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TIME_STEP);
+        RDouble3D &dt = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+        postVisualization->UpdateVisualNodeVarPtr(varName, dt);
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VOLUME))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VOLUME);
+        RDouble3D &vol = *(grid->GetCellVolume());
+        postVisualization->UpdateVisualNodeVarPtr(varName, vol);
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_WALL_DIST))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_WALL_DIST);
+        RDouble3D &wallDist = *(grid->GetWallDist());
+        postVisualization->UpdateVisualNodeVarPtr(varName, wallDist);
+    }
+
+
+    //! Bell 20130319 add.
+    int viscousType = parameters->GetViscousType();
+    string viscousName = parameters->GetViscousName();
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+    int transitionType = GlobalDataBase::GetIntParaFromDB("transitionType");
+
+    if (viscousType == LAMINAR && iLES == NOLES_SOLVER)
+    {
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VISCOSITY_LAMINAR))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VISCOSITY_LAMINAR);
+            RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+            postVisualization->UpdateVisualNodeVarPtr(varName, viscousLaminar);
+        }
+    }
+    else if (viscousType > LAMINAR || iLES == LES_SOLVER)
+    {
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VISCOSITY_LAMINAR))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VISCOSITY_LAMINAR);
+            RDouble3D &viscousLaminar = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+            postVisualization->UpdateVisualNodeVarPtr(varName, viscousLaminar);
+        }
+
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VISCOSITY_TURBULENT))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VISCOSITY_TURBULENT);
+            RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+            postVisualization->UpdateVisualNodeVarPtr(varName, viscousTurbulence);
+        }
+        //! For two-equation output turbulent kinetic energy and dissipative rate.
+        if (viscousName.substr(0, 6) == "2eq-kw")
+        {
+            RDouble4D &q_turb = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_turb"));
+            if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MODELED_TKE))
+            {
+                string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_MODELED_TKE);
+                postVisualization->UpdateVisualNodeVarPtr(varName, q_turb, IDX::IKE);
+            }
+            if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MODELED_DISSIPATION))
+            {
+                string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_MODELED_DISSIPATION);
+                postVisualization->UpdateVisualNodeVarPtr(varName, q_turb, IDX::IKW);
+            }
+            if (viscousName.substr(0, 17) == "2eq-kw-menter-sst")   //! for blending function F1 and F2.
+            {
+                if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_SST_F1))
+                {
+                    RDouble3D &blend = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("blend"));   // for blengding function F1
+                    string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_SST_F1);
+                    postVisualization->UpdateVisualNodeVarPtr(varName, blend);
+                }
+                if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_SST_F2))
+                {
+                    RDouble3D &SST_F2 = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("SST_F2"));   //! for blengding function F2
+                    string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_SST_F2);
+                    postVisualization->UpdateVisualNodeVarPtr(varName, SST_F2);
+                }
+                if (transitionType == IREGAMA)
+                {
+                    RDouble4D &q_transition = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_transition"));
+                    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_INTERMITTENCY))
+                    {
+                        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_INTERMITTENCY);
+                        postVisualization->UpdateVisualNodeVarPtr(varName, q_transition, IDX::IGAMA);
+                    }
+                    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MOMENTUMTHICKREYNOLDS))
+                    {
+                        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_MOMENTUMTHICKREYNOLDS);
+                        postVisualization->UpdateVisualNodeVarPtr(varName, q_transition, IDX::IRECT);
+                    }
+                    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_TRANSITION_GAMAEFF))
+                    {
+                        RDouble3D &gamaeff = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gamaeff"));   // for transition gamaeff
+                        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TRANSITION_GAMAEFF);
+                        postVisualization->UpdateVisualNodeVarPtr(varName, gamaeff);
+                    }
+                    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_TRANSITION_RESCF))
+                    {
+                        RDouble3D &rescf = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("rescf"));   // for transition Rescf
+                        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TRANSITION_RESCF);
+                        postVisualization->UpdateVisualNodeVarPtr(varName, rescf);
+                    }
+                }
+            }
+        }
+    }
+
+    int visualField = parameters->GetPlotFieldType();
+    if (WantVisualField(grid) || visualField == TEC_SPACE::BlockVisual)
+    {
+        //! Vorticity, Vorticity, by Q value.
+        RDouble3D *vorticity_x, *vorticity_y, *vorticity_z, *vorticityMagnitude, *strain_rate, *Q_criteria;
+
+        int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();
+
+        Range I, J, K;
+        GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+        vorticity_x = new RDouble3D(I, J, K, fortranArray);
+        vorticity_y = new RDouble3D(I, J, K, fortranArray);
+        vorticity_z = new RDouble3D(I, J, K, fortranArray);
+        vorticityMagnitude = new RDouble3D(I, J, K, fortranArray);
+        strain_rate = new RDouble3D(I, J, K, fortranArray);
+        Q_criteria = new RDouble3D(I, J, K, fortranArray);
+
+        ComputeVorticitybyQCriteria(grid, vorticity_x, vorticity_y, vorticity_z, vorticityMagnitude, strain_rate, Q_criteria);
+
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_X))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VORTICITY_X);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *vorticity_x);
+        }
+
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_Y))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VORTICITY_Y);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *vorticity_y);
+        }
+
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_Z))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VORTICITY_Z);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *vorticity_z);
+        }
+
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_MAGNITUDE))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VORTICITY_MAGNITUDE);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *vorticityMagnitude);
+        }
+
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_STRAIN_RATE))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_STRAIN_RATE);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *strain_rate);
+        }
+
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_Q_CRITERIA))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_Q_CRITERIA);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *Q_criteria);
+        }
+
+        delete vorticity_x;
+        delete vorticity_y;
+        delete vorticity_z;
+        delete vorticityMagnitude;
+        delete strain_rate;
+        delete Q_criteria;
+
+    }
+    else if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_X)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_Y)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_Z)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_MAGNITUDE)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_STRAIN_RATE)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_Q_CRITERIA))
+    {
+        TK_Exit::ExceptionExit("Error: can not visualization vorticity when plotFieldType = 0!");
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_CP))
+    {
+        RDouble4D *cp;
+        ComputeCp(grid, cp);
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_CP);
+        postVisualization->UpdateVisualNodeVarPtr(varName, *cp, 0);
+        delete cp;
+    }
+
+    //! Chemical species must be the last!
+    //using namespace GAS_SPACE;
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int isUseNoneqCond = parameters->GetNonequilibriumConditionFlag();
+
+        //! To write the vibratial temperature and vibrational energy.
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_TEMPERATURE_VIBRATION))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TEMPERATURE_VIBRATION);
+        if (nChemical > 0 && nTemperatureModel > 1)
+        {
+            postVisualization->UpdateVisualNodeVarPtr(varName, temperatures, IDX::ITV);
+        }
+        else
+        {
+            postVisualization->UpdateVisualNodeVarPtr(varName, temperatures, IDX::ITT);
+        }
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_ENERGY_VIBRATION))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_ENERGY_VIBRATION);
+        if (nChemical > 0 && nTemperatureModel > 1)
+        {
+            postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, nNSEquation + numberOfSpecies);
+        }
+        else
+        {
+            postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, nNSEquation + numberOfSpecies - 1);
+        }
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_TEMPERATURE_ELECTRON))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TEMPERATURE_ELECTRON);
+        if (nChemical > 0 && nTemperatureModel == 3)
+        {
+            postVisualization->UpdateVisualNodeVarPtr(varName, temperatures, IDX::ITE);
+        }
+        else
+        {
+            postVisualization->UpdateVisualNodeVarPtr(varName, temperatures, IDX::ITT);
+        }
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_ENERGY_ELECTRON))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_ENERGY_ELECTRON);
+        if (nChemical > 0 && nTemperatureModel == 3)
+        {
+            postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, nNSEquation + numberOfSpecies + 1);
+        }
+        else
+        {
+            postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, nNSEquation + numberOfSpecies - 1);
+        }
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_DENSITY)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_U)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_V)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_W)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_PRESSURE)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_TEMPERATURE))
+    {
+        RDouble4D *dimensionalVariables = ComputeDimensionalVariables(grid);
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_DENSITY))
+        {
+            //! Write the dimensional value of density.
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_DENSITY);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *dimensionalVariables, 0);
+        }
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_U))
+        {
+            //! Write the dimensional value of U.
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_U);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *dimensionalVariables, 1);
+        }
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_V))
+        {
+            //! Write the dimensional value of V.
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_V);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *dimensionalVariables, 2);
+        }
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_W))
+        {
+            //! Write the dimensional value of W.
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_W);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *dimensionalVariables, 3);
+        }
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_PRESSURE))
+        {
+            //! Write the dimensional value of pressure.
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_PRESSURE);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *dimensionalVariables, 4);
+        }
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_TEMPERATURE))
+        {
+            //! Write the dimensional value of temperature.
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_TEMPERATURE);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *dimensionalVariables, 5);
+        }
+        delete dimensionalVariables;
+    }
+
+    //! To write the mass fractions of species.
+    if (nChemical > 0)
+    {
+        //! Write the mass fractions of species.
+        using namespace GAS_SPACE;
+        string *varname = gas->GetNameOfSpecies();
+        for (int m = 0; m < numberOfSpecies; ++ m)
+        {
+                string varName = "massfraction-" + varname[m];
+            postVisualization->UpdateVisualNodeVarPtr(varName, primitiveVariables, nNSEquation + m);
+        }
+
+        //! To write the number density of electron.
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_ELECTRON_NUMBER))
+        {
+            RDouble4D *tmpValue = ComputeDimensionalElectron(grid);
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_ELECTRON_NUMBER);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *tmpValue, 0);
+            delete tmpValue;
+        }
+
+            RDouble4D *moleFraction = ComputePrimitiveVariablesWithMoleFraction(grid);
+            for (int m = 0; m < numberOfSpecies; ++ m)
+            {
+                string varName = "molefraction-" + varname[m];
+                postVisualization->UpdateVisualNodeVarPtr(varName, *moleFraction, m);
+    }
+            delete moleFraction;
+        }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_GAMA)
+        || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MACH))
+    {
+        int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();
+
+        Range I, J, K;
+        GetRange(ni, nj, nk, -2, 1, I, J, K);
+        Range M(0, 0);
+        RDouble4D *refgama = new RDouble4D(I, J, K, M, fortranArray);
+
+        int ist, ied, jst, jed, kst, ked;
+        grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+        int nEquation = GetNumberOfEquations();
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_GAMA);
+        RDouble3D &gama = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+        RDouble *primitiveVars = new RDouble[nEquation];
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        primitiveVars[m] = primitiveVariables(i, j, k, m);
+                    }
+                    gas->GetSpecificHeatRatio(primitiveVars, gama(i, j, k));
+                    (*refgama)(i, j, k, 0) = gama(i, j, k);
+                }
+            }
+        }
+        postVisualization->UpdateVisualNodeVarPtr(varName, *refgama, 0);
+        delete refgama;
+        delete[] primitiveVars;
+    }
+
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_CFL1))
+    {
+        int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();
+
+        Range I, J, K;
+        GetRange(ni, nj, nk, -2, 1, I, J, K);
+        Range M(0, 0);
+        RDouble4D *cfl = new RDouble4D(I, J, K, M, fortranArray);
+
+        int ist, ied, jst, jed, kst, ked;
+        grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_CFL1);
+        RDouble3D &localCFL = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("localCFL"));
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*cfl)(i, j, k, 0) = localCFL(i, j, k);
+                }
+            }
+        }
+        postVisualization->UpdateVisualNodeVarPtr(varName, *cfl, 0);
+        delete cfl;
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_CFL2))
+    {
+        int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();
+
+        Range I, J, K;
+        GetRange(ni, nj, nk, -2, 1, I, J, K);
+        Range M(0, 0);
+        RDouble4D *cfl = new RDouble4D(I, J, K, M, fortranArray);
+
+        int ist, ied, jst, jed, kst, ked;
+        grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_CFL2);
+        RDouble3D &minCFL = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("minCFL"));
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*cfl)(i, j, k, 0) = minCFL(i, j, k);
+                }
+            }
+        }
+        postVisualization->UpdateVisualNodeVarPtr(varName, *cfl, 0);
+        delete cfl;
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MACH))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_MACH);
+        RDouble4D *mach = CompMachNodeNumber(grid, postVisualization);
+
+        postVisualization->UpdateVisualNodeVarPtr(varName, mach);
+    }
+
+    //Write the non-equilibrium number.
+    if (nChemical > 0 && isUseNoneqCond > 0)
+    {
+        RDouble4D *noneqNumber = ComputeNonequiliriumNumber(grid);
+
+        //The Damkohler number.
+        if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DAMKOHLER_NUMBER))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DAMKOHLER_NUMBER);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *noneqNumber, 0);
+        }
+        //The vibrational non-equilibrium number.
+        if (nTemperatureModel > 1 && postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VIBNONEQ_NUMBER))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VIBNONEQ_NUMBER);
+            postVisualization->UpdateVisualNodeVarPtr(varName, *noneqNumber, 1);
+        }
+    }
+}
+
+LIB_EXPORT void NSSolverStruct::ComputePostProbesVariables(Post_Probes *postProbesVar)
+{
+    StructGrid *grid = StructGridCast(postProbesVar->GetGrid());
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    using namespace IDX;
+    if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DENSITY))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DENSITY);
+        postProbesVar->UpdateProbesVarPtr(varName, primitiveVariables, IDX::IR);
+    }
+
+    if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_U))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_U);
+        postProbesVar->UpdateProbesVarPtr(varName, primitiveVariables, IDX::IU);
+    }
+
+    if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_V))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_V);
+        postProbesVar->UpdateProbesVarPtr(varName, primitiveVariables, IDX::IV);
+    }
+
+    if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_W))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_W);
+        postProbesVar->UpdateProbesVarPtr(varName, primitiveVariables, IDX::IW);
+    }
+
+    if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_PRESSURE))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_PRESSURE);
+        postProbesVar->UpdateProbesVarPtr(varName, primitiveVariables, IDX::IP);
+    }
+
+    if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_TEMPERATURE))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_TEMPERATURE);
+        postProbesVar->UpdateProbesVarPtr(varName, temperatures, IDX::ITT);
+    }
+
+    if (postProbesVar->IsNeedMonitoring(PHSPACE::VISUAL_MACH))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::VISUAL_MACH);
+
+        int isOverset = parameters->GetIsOverLapping();
+
+        RDouble4D *mach = 0;
+        if (!isOverset)
+        {
+            mach = CompMachNumber(grid);
+        }
+        else
+        {
+            mach = ComputeMachNumberField(grid);
+        }
+
+        postProbesVar->UpdateProbesVarPtr(varName, *mach, 0);
+        delete mach;
+    }
+        if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_DENSITY)
+            || postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_U)
+            || postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_V)
+            || postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_W)
+            || postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_PRESSURE)
+            || postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_TEMPERATURE))
+        {
+            RDouble4D *dimensionalVariables = ComputeDimensionalVariables(grid);
+            if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_DENSITY))
+            {
+                //Write the dimensional value of density.
+                string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_DENSITY);
+                postProbesVar->UpdateProbesVarPtr(varName, *dimensionalVariables, 0);
+}
+            if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_U))
+            {
+                //Write the dimensional value of U.
+                string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_U);
+                postProbesVar->UpdateProbesVarPtr(varName, *dimensionalVariables, 1);
+            }
+            if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_V))
+            {
+                //Write the dimensional value of V.
+                string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_V);
+                postProbesVar->UpdateProbesVarPtr(varName, *dimensionalVariables, 2);
+            }
+            if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_W))
+            {
+                //Write the dimensional value of W.
+                string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_W);
+                postProbesVar->UpdateProbesVarPtr(varName, *dimensionalVariables, 3);
+            }
+            if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_PRESSURE))
+            {
+                //Write the dimensional value of pressure.
+                string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_PRESSURE);
+                postProbesVar->UpdateProbesVarPtr(varName, *dimensionalVariables, 4);
+            }
+            if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_TEMPERATURE))
+            {
+                //Write the dimensional value of temperature.
+                string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_TEMPERATURE);
+                postProbesVar->UpdateProbesVarPtr(varName, *dimensionalVariables, 5);
+            }
+            delete dimensionalVariables;
+        }
+        //! Chemical species must be the last!
+        //! To write the mass fractions of species.
+        int nNSEquation = parameters->GetNSEquationNumber();
+        int nChemical = parameters->GetChemicalFlag();
+        int numberOfSpecies = parameters->GetNumberOfSpecies();
+        if (nChemical > 0)
+        {
+            //Write the mass fractions of species.
+            using namespace GAS_SPACE;
+            string *varname = gas->GetNameOfSpecies();
+            for (int m = 0; m < numberOfSpecies; ++ m)
+            {
+                string varName = "massfraction-" + varname[m];
+                postProbesVar->UpdateProbesVarPtr(varName, primitiveVariables, nNSEquation + m);
+            }
+            RDouble4D *moleFraction = ComputePrimitiveVariablesWithMoleFraction(grid);
+            for (int m = 0; m < numberOfSpecies; ++ m)
+            {
+                string varName = "molefraction-" + varname[m];
+                postProbesVar->UpdateProbesVarPtr(varName, *moleFraction, m);
+            }
+            delete moleFraction;
+        }
+    }
+
+LIB_EXPORT void NSSolverStruct::InitControlParameters()
+{
+    FreeControlParameters();
+    controlParameters = new Param_NSSolverStruct();
+    controlParameters->Init();
+}
+
+void NSSolverStruct::Monitor(Grid *gridIn, RDouble4D *dq)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperature = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble2D *surfaceTemperature = reinterpret_cast <RDouble2D *> (gridIn->GetDataPtr("surfaceTemperature"));
+    int nStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int nEqn = GetNumberOfEquations();
+    ostringstream oss;
+    using namespace IDX;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                if (i == 1 && j == 1 && k == 1)
+                {
+                    oss << "I=" << i << ", J=" << j << ", K=" << k << endl;
+                    oss << nStep;
+                    for (int s = 0; s < nEqn; ++ s)
+                    {
+                        oss << ", " << primitiveVariables(i, j, k, s);
+                    }
+                    oss << endl;
+                    oss << ", " << temperature(i, j, k, ITT) << endl;
+                }
+            }
+        }
+    }
+    oss << (*surfaceTemperature)(0, 0) << endl;
+    WriteLogFile(oss);
+}
+
+LIB_EXPORT Param_NSSolverStruct *NSSolverStruct::GetControlParameters() const
+{
+    return static_cast <Param_NSSolverStruct *> (controlParameters);
+}
+
+}
+
+
diff --git a/CFD/NSSolver/src/NSSolverStructFD.cpp b/CFD/NSSolver/src/NSSolverStructFD.cpp
new file mode 100644
index 0000000..1ed28e1
--- /dev/null
+++ b/CFD/NSSolver/src/NSSolverStructFD.cpp
@@ -0,0 +1,6031 @@
+#include "NSSolverStructFD.h"
+#include "Glb_Dimension.h"
+#include "Geo_StructBC.h"
+#include "Param_NSSolverStruct.h"
+#include "TK_Exit.h"
+#include "FieldProxy.h"
+#include "Math_BasisFunction.h"
+
+namespace PHSPACE
+{
+
+NSSolverStructFD::NSSolverStructFD()
+{
+}
+
+NSSolverStructFD::~NSSolverStructFD()
+{
+    DeAllocateGlobalVariables();
+}
+
+void NSSolverStructFD::AllocateGlobalVar(Grid *gridIn)
+{
+    CFDSolver::AllocateGlobalVar(gridIn);
+
+    InitLocalMemory(gridIn);
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int nDim    = GetDim();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K); 
+    
+    Range I4, J4, K4;
+    GetRange(ni, nj, nk, -4, 3, I4, J4, K4);     
+
+    Range M(0, 4);    
+    Range T(0, 0);
+    Range D(0, nDim - 1);
+
+    RDouble4D *residual = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble3D *dt       = new RDouble3D(I, J, K,    fortranArray);
+    RDouble3D *gama     = new RDouble3D(I, J, K,    fortranArray);
+    RDouble4D *visSpectralRadius = new RDouble4D(I, J, K, D, fortranArray);
+    RDouble4D *invSpectralRadius = new RDouble4D(I, J, K, D, fortranArray);
+    RDouble4D *diagonal = new RDouble4D(I, J, K, M, fortranArray);
+
+    RDouble4D *q    = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *t    = new RDouble4D(I, J, K, T, fortranArray);
+    RDouble4D *q_FD = new RDouble4D(I4,J4,K4,M, fortranArray);
+    RDouble4D *t_FD = new RDouble4D(I4,J4,K4,T, fortranArray);
+    RDouble3D *rtem = new RDouble3D(I, J, K, fortranArray);
+
+    grid->UpdateDataPtr("q"   , q);    //! Scalar flow field variable(rho/u/v/w/p).
+    grid->UpdateDataPtr("q_FD", q_FD);    //! Scalar flow field variable(rho/u/v/w/p), only used for FD, 4 ghost layers.
+    grid->UpdateDataPtr("res" , residual);    //! Residual or right-hand side.
+    grid->UpdateDataPtr("dt"  , dt);    //! Time step.
+    grid->UpdateDataPtr("gama", gama);    //! Ratio of specific heat coefficients at constant pressure and volume.
+    grid->UpdateDataPtr("t"   , t);    //! Static temperature.
+    grid->UpdateDataPtr("t_FD", t_FD);    //! Temperature field, only used for FD, 4 ghost layers.
+    grid->UpdateDataPtr("visSpectralRadius", visSpectralRadius);    //! Viscous spectral radius.
+    grid->UpdateDataPtr("invSpectralRadius", invSpectralRadius);    //! Inviscid spectral radius.
+    grid->UpdateDataPtr("diagonal", diagonal);    //! Sacrificing space to improve efficiency.
+    grid->UpdateDataPtr("rtem", rtem);    //! Pressure factor.
+
+    RDouble4D *ql1 = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *qr1 = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *ql2 = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *qr2 = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *ql3 = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *qr3 = new RDouble4D(I, J, K, M, fortranArray);
+    grid->UpdateDataPtr("ql1", ql1);
+    grid->UpdateDataPtr("qr1", qr1);
+    grid->UpdateDataPtr("ql2", ql2);
+    grid->UpdateDataPtr("qr2", qr2);
+    grid->UpdateDataPtr("ql3", ql3);
+    grid->UpdateDataPtr("qr3", qr3);
+
+    RDouble4D *faceInviscidfluxI = new RDouble4D(I4, J4, K4, M, fortranArray);
+    RDouble4D *faceInviscidfluxJ = new RDouble4D(I4, J4, K4, M, fortranArray);
+    RDouble4D *faceInviscidfluxK = new RDouble4D(I4, J4, K4, M, fortranArray);
+    grid->UpdateDataPtr("faceInviscidfluxI", faceInviscidfluxI);    //! Inviscid flux at face, for I direction.
+    grid->UpdateDataPtr("faceInviscidfluxJ", faceInviscidfluxJ);    //! Inviscid flux at face, for J direction.
+    grid->UpdateDataPtr("faceInviscidfluxK", faceInviscidfluxK);    //! Inviscid flux at face, for K direction.
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble4D *q_unsteady_n1   = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *q_unsteady_n2   = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *res_unsteady_n1 = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *res_unsteady_n2 = new RDouble4D(I, J, K, M, fortranArray);
+
+        //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+        RDouble4D *res_unsteady_tmp = new RDouble4D(I, J, K, M, fortranArray);
+
+        grid->UpdateDataPtr("q_unsteady_n1"  , q_unsteady_n1);
+        grid->UpdateDataPtr("q_unsteady_n2"  , q_unsteady_n2);
+        grid->UpdateDataPtr("res_unsteady_n1", res_unsteady_n1);
+        grid->UpdateDataPtr("res_unsteady_n2", res_unsteady_n2);
+        grid->UpdateDataPtr("res_unsteady_tmp", res_unsteady_tmp);
+
+        //! Statistical variables for unsteady simulation.
+        RDouble4D *qAverage = new RDouble4D(I, J, K, M, fortranArray);
+        *qAverage = 0.0;
+        grid->UpdateDataPtr("qAverage", qAverage);
+
+        //! Statistical Reynolds stress for unsteady simulation.
+        RDouble4D *tauAverage = new RDouble4D(I, J, K, Range(0, 5), fortranArray);
+        *tauAverage = 0.0;
+        grid->UpdateDataPtr("tauAverage", tauAverage);
+
+        RDouble4D *q2Average = new RDouble4D(I, J, K, Range(0, 5), fortranArray);
+        *q2Average = 0.0;
+        grid->UpdateDataPtr("q2Average", q2Average);
+    }
+    
+    int viscousType = parameters->GetViscousType();
+    if (viscousType > INVISCID)
+    {
+        RDouble3D *viscousLaminar = new RDouble3D(I, J, K, fortranArray);
+        RDouble3D *viscousTurbulence = new RDouble3D(I, J, K, fortranArray);
+        grid->UpdateDataPtr("visl", viscousLaminar);
+        grid->UpdateDataPtr("vist", viscousTurbulence);
+        *viscousTurbulence = 0.0;
+
+        RDouble4D * faceViscousfluxI = new RDouble4D(I4, J4, K4, M, fortranArray);
+        RDouble4D * faceViscousfluxJ = new RDouble4D(I4, J4, K4, M, fortranArray);
+        RDouble4D * faceViscousfluxK = new RDouble4D(I4, J4, K4, M, fortranArray);
+        grid->UpdateDataPtr("faceViscousfluxI", faceViscousfluxI);    //! Viscous flux at face, for I direction.
+        grid->UpdateDataPtr("faceViscousfluxJ", faceViscousfluxJ);    //! Viscous flux at face, for J direction.
+        grid->UpdateDataPtr("faceViscousfluxK", faceViscousfluxK);    //! Viscous flux at face, for K direction.
+    }
+
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+    if (iLES == LES_SOLVER)
+    {
+        RDouble3D *subgridScaleEnergy = new RDouble3D(I, J, K, fortranArray);
+        grid->UpdateDataPtr("subgridScaleEnergy", subgridScaleEnergy);
+        *subgridScaleEnergy = 0.0;
+    }
+
+    Range N(0, 3);
+
+    Range I3, J3, K3;
+    GetRange(ni, nj, nk, -3, 2, I3, J3, K3);
+
+    RDouble4D *dqdkxi = new RDouble4D(I3, J3, K3, N, fortranArray);
+    RDouble4D *dqdeta = new RDouble4D(I3, J3, K3, N, fortranArray);
+    RDouble4D *dqdcta = new RDouble4D(I3, J3, K3, N, fortranArray);
+    grid->UpdateDataPtr("dqdkxi", dqdkxi);    //! Partial derivative of q with kxi, at cell-center.
+    grid->UpdateDataPtr("dqdeta", dqdeta);    //! Partial derivative of q with eta, at cell-center.
+    grid->UpdateDataPtr("dqdcta", dqdcta);    //! Partial derivative of q with cta, at cell-center.
+
+    RDouble4D *dqdx = new RDouble4D(I3, J3, K3, N, fortranArray);
+    RDouble4D *dqdy = new RDouble4D(I3, J3, K3, N, fortranArray);
+    RDouble4D *dqdz = new RDouble4D(I3, J3, K3, N, fortranArray);
+    grid->UpdateDataPtr("gradUVWTCellCenterX", dqdx);
+    grid->UpdateDataPtr("gradUVWTCellCenterY", dqdy);
+    grid->UpdateDataPtr("gradUVWTCellCenterZ", dqdz);
+
+    if (gradient_method.substr(0,10) == "chain_rule")
+    {
+        RDouble4D *dqdxnokxi = new RDouble4D(I3, J3, K3, N, fortranArray);
+        RDouble4D *dqdynokxi = new RDouble4D(I3, J3, K3, N, fortranArray);
+        RDouble4D *dqdznokxi = new RDouble4D(I3, J3, K3, N, fortranArray);
+        grid->UpdateDataPtr("dqdxnokxi", dqdxnokxi);    //! dqdxnokxi = dqdx - nx * dqdkxi.
+        grid->UpdateDataPtr("dqdynokxi", dqdynokxi);    //! dqdynokxi = dqdy - ny * dqdkxi.
+        grid->UpdateDataPtr("dqdznokxi", dqdznokxi);    //! dqdznokxi = dqdz - nz * dqdkxi.
+        
+        RDouble4D *dqdxnoeta = new RDouble4D(I3, J3, K3, N, fortranArray);
+        RDouble4D *dqdynoeta = new RDouble4D(I3, J3, K3, N, fortranArray);
+        RDouble4D *dqdznoeta = new RDouble4D(I3, J3, K3, N, fortranArray);
+        grid->UpdateDataPtr("dqdxnoeta", dqdxnoeta);    //! dqdxnoeta = dqdx - nx * dqdeta.
+        grid->UpdateDataPtr("dqdynoeta", dqdynoeta);    //! dqdynoeta = dqdy - ny * dqdeta.
+        grid->UpdateDataPtr("dqdznoeta", dqdznoeta);    //! dqdznoeta = dqdz - nz * dqdeta.
+        
+        RDouble4D *dqdxnocta = new RDouble4D(I3, J3, K3, N, fortranArray);
+        RDouble4D *dqdynocta = new RDouble4D(I3, J3, K3, N, fortranArray);
+        RDouble4D *dqdznocta = new RDouble4D(I3, J3, K3, N, fortranArray);
+        grid->UpdateDataPtr("dqdxnocta", dqdxnocta);    //! dqdxnocta = dqdx - nx * dqdcta.
+        grid->UpdateDataPtr("dqdynocta", dqdynocta);    //! dqdynocta = dqdy - ny * dqdcta.
+        grid->UpdateDataPtr("dqdznocta", dqdznocta);    //! dqdznocta = dqdz - nz * dqdcta.
+    }
+    //! For conservation of flux.
+    int systemgridtype = GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if(MIXGRID == systemgridtype)
+    {
+        RDouble4D *dqdx_cc_ruvwpt = new RDouble4D(I, J, K, Range(0,5), fortranArray);
+        RDouble4D *dqdy_cc_ruvwpt = new RDouble4D(I, J, K, Range(0,5), fortranArray);
+        RDouble4D *dqdz_cc_ruvwpt = new RDouble4D(I, J, K, Range(0,5), fortranArray);
+        grid->UpdateDataPtr("dqdx_cc_ruvwpt", dqdx_cc_ruvwpt);    //! dqdx(q represents r/u/v/w/p/t) at cell center.
+        grid->UpdateDataPtr("dqdy_cc_ruvwpt", dqdy_cc_ruvwpt);    //! dqdy(q represents r/u/v/w/p/t) at cell center.
+        grid->UpdateDataPtr("dqdz_cc_ruvwpt", dqdz_cc_ruvwpt);    //! dqdz(q represents r/u/v/w/p/t) at cell center.
+    }
+
+    GetSurfaceCellNumber(gridIn, nWallBC, nMaxSurfaceCell);
+    RDouble2D *firstLayerHeight = NULL;
+    if (nWallBC > 0)
+    {
+        firstLayerHeight = new RDouble2D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), fortranArray);
+    }
+    grid->UpdateDataPtr("firstLayerHeight", firstLayerHeight);
+    ComputeFirstLayerGridHeight(gridIn, firstLayerHeight);
+
+    RDouble Twall = parameters->GetWallTemperature();
+    if (nWallBC > 0)
+    {
+        RDouble refTemperature = parameters->GetRefDimensionalTemperature();
+        RDouble refT = Twall / refTemperature;
+        if (Twall <= EPSILON)
+        {
+            refT = 1.0; //! Radiation equilibrium temperature wall.
+        }
+
+        RDouble2D *temperatureWall = new RDouble2D(Range(0, nWallBC - 1), Range(0, nMaxSurfaceCell - 1), fortranArray);
+
+        //! Initialization with the freestream temperature.
+        for (int iWall = 0; iWall < nWallBC; ++ iWall)
+        {
+            for (int iCell = 0; iCell < nMaxSurfaceCell; ++ iCell)
+            {
+                (*temperatureWall)(iWall, iCell) = refT;
+            }
+        }
+        grid->UpdateDataPtr("surfaceTemperature", temperatureWall);
+    }
+
+    int nTotalNumber = 16;
+    Int1D *speciesOrder = new Int1D(Range(0, nTotalNumber - 1), fortranArray);
+    for (int n = 0; n < nTotalNumber; ++ n)
+    {
+        (*speciesOrder)(n) = -1;
+    }
+    grid->UpdateDataPtr("speciesOrder", speciesOrder);
+
+    Range IFACE, JFACE, KFACE;
+    GetRange(ni, nj, nk, -2, 2, IFACE, JFACE, KFACE);
+    RDouble4D *heatTransferCoeff = new RDouble4D(I, J, K, T, fortranArray);
+    grid->UpdateDataPtr("heatTransferCoeff", heatTransferCoeff);    //!heat transfer coefficient.
+}
+
+void NSSolverStructFD::DeAllocateGlobalVar(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D *q = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D *q_FD = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_FD"));
+    RDouble4D *residual = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble3D *dt = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+    RDouble3D *gama = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble4D *t = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble4D *t_FD = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t_FD"));
+    RDouble4D *visSpectralRadius = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+    RDouble4D *invSpectralRadius = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D *diagonal = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+    RDouble3D *rtem = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("rtem"));
+
+    delete q; q = 0;
+    delete q_FD; q_FD = 0;
+    delete residual; residual = 0;
+    delete dt; dt = 0;
+    delete gama; gama = 0;
+    delete t; t = 0;
+    delete t_FD; t_FD = 0;
+    delete visSpectralRadius; visSpectralRadius = 0;
+    delete invSpectralRadius; invSpectralRadius = 0;
+    delete diagonal; diagonal = 0;
+    delete rtem; rtem = 0;
+    //Remove data pointer.
+    grid->DeleteDataPtr("q");
+    grid->DeleteDataPtr("q_FD");
+    grid->DeleteDataPtr("res");
+    grid->DeleteDataPtr("dt");
+    grid->DeleteDataPtr("gama");
+    grid->DeleteDataPtr("t");
+    grid->DeleteDataPtr("t_FD");
+    grid->DeleteDataPtr("visSpectralRadius");
+    grid->DeleteDataPtr("invSpectralRadius");
+    grid->DeleteDataPtr("diagonal");
+    grid->DeleteDataPtr("rtem");
+
+    RDouble4D *ql1 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1"));
+    RDouble4D *qr1 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1"));
+    RDouble4D *ql2 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2"));
+    RDouble4D *qr2 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2"));
+    RDouble4D *ql3 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3"));
+    RDouble4D *qr3 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3"));
+
+    delete ql1; ql1 = 0;
+    delete qr1; qr1 = 0;
+    delete ql2; ql2 = 0;
+    delete qr2; qr2 = 0;
+    delete ql3; ql3 = 0;
+    delete qr3; qr3 = 0;
+    grid->DeleteDataPtr("ql1");
+    grid->DeleteDataPtr("qr1");
+    grid->DeleteDataPtr("ql2");
+    grid->DeleteDataPtr("qr2");
+    grid->DeleteDataPtr("ql3");
+    grid->DeleteDataPtr("qr3");
+
+    RDouble4D *faceInviscidfluxI = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI"));
+    RDouble4D *faceInviscidfluxJ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ"));
+    RDouble4D *faceInviscidfluxK = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK"));
+
+    delete faceInviscidfluxI; faceInviscidfluxI = 0;
+    delete faceInviscidfluxJ; faceInviscidfluxJ = 0;
+    delete faceInviscidfluxK; faceInviscidfluxK = 0;
+    grid->DeleteDataPtr("faceInviscidfluxI");
+    grid->DeleteDataPtr("faceInviscidfluxJ");
+    grid->DeleteDataPtr("faceInviscidfluxK");
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble4D *q_unsteady_n1 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+        RDouble4D *q_unsteady_n2 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+        RDouble4D *res_unsteady_n1 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+        RDouble4D *res_unsteady_n2 = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+        RDouble4D *res_unsteady_tmp = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_tmp"));
+
+        delete q_unsteady_n1; q_unsteady_n1 = 0;
+        delete q_unsteady_n2; q_unsteady_n2 = 0;
+        delete res_unsteady_n1; res_unsteady_n1 = 0;
+        delete res_unsteady_n2; res_unsteady_n2 = 0;
+        delete res_unsteady_tmp; res_unsteady_tmp = 0;
+        grid->DeleteDataPtr("q_unsteady_n1");
+        grid->DeleteDataPtr("q_unsteady_n2");
+        grid->DeleteDataPtr("res_unsteady_n1");
+        grid->DeleteDataPtr("res_unsteady_n2");
+        grid->DeleteDataPtr("res_unsteady_tmp");
+
+        RDouble4D *qAverage = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage"));
+        RDouble4D *tauAverage = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("tauAverage"));
+
+        delete qAverage; qAverage = 0;
+        delete tauAverage; tauAverage = 0;
+        delete res_unsteady_n1; res_unsteady_n1 = 0;
+        grid->DeleteDataPtr("qAverage");
+        grid->DeleteDataPtr("tauAverage");
+        grid->DeleteDataPtr("q2Average");
+    }
+
+    int viscousType = parameters->GetViscousType();
+    if (viscousType)
+    {
+        RDouble3D *viscousLaminar = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+        RDouble3D *viscousTurbulence = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+        RDouble4D *faceViscousfluxI = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxI"));
+        RDouble4D *faceViscousfluxJ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxJ"));
+        RDouble4D *faceViscousfluxK = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxK"));
+
+        delete viscousLaminar; viscousLaminar = 0;
+        delete viscousTurbulence; viscousTurbulence = 0;
+        delete faceViscousfluxI; faceViscousfluxI = 0;
+        delete faceViscousfluxJ; faceViscousfluxJ = 0;
+        delete faceViscousfluxK; faceViscousfluxK = 0;
+        grid->DeleteDataPtr("visl");
+        grid->DeleteDataPtr("vist");
+        grid->DeleteDataPtr("faceViscousfluxI");
+        grid->DeleteDataPtr("faceViscousfluxJ");
+        grid->DeleteDataPtr("faceViscousfluxK");
+    }
+
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+    if (iLES)
+    {
+        RDouble3D *subgridScaleEnergy = reinterpret_cast <RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+
+        delete subgridScaleEnergy; subgridScaleEnergy = 0;
+        grid->DeleteDataPtr("subgridScaleEnergy");
+    }
+
+    RDouble4D *dqdkxi = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdkxi"));
+    RDouble4D *dqdeta = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdeta"));
+    RDouble4D *dqdcta = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdcta"));
+
+    delete dqdkxi; dqdkxi = 0;
+    delete dqdeta; dqdeta = 0;
+    delete dqdcta; dqdcta = 0;
+    grid->DeleteDataPtr("dqdkxi");
+    grid->DeleteDataPtr("dqdeta");
+    grid->DeleteDataPtr("dqdcta");
+
+    RDouble4D *dqdx = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D *dqdy = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D *dqdz = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    delete dqdx; dqdx = 0;
+    delete dqdy; dqdy = 0;
+    delete dqdz; dqdz = 0;
+    grid->DeleteDataPtr("gradUVWTCellCenterX");
+    grid->DeleteDataPtr("gradUVWTCellCenterY");
+    grid->DeleteDataPtr("gradUVWTCellCenterZ");
+
+    if (gradient_method.substr(0, 10) == "chain_rule")
+    {
+        RDouble4D *dqdxnokxi = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdxnokxi"));
+        RDouble4D *dqdynokxi = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdynokxi"));
+        RDouble4D *dqdznokxi = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdznokxi"));
+
+        delete dqdxnokxi; dqdxnokxi = 0;
+        delete dqdynokxi; dqdynokxi = 0;
+        delete dqdznokxi; dqdznokxi = 0;
+        grid->DeleteDataPtr("dqdxnokxi");
+        grid->DeleteDataPtr("dqdynokxi");
+        grid->DeleteDataPtr("dqdznokxi");
+        
+        RDouble4D *dqdxnoeta = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdxnoeta"));
+        RDouble4D *dqdynoeta = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdynoeta"));
+        RDouble4D *dqdznoeta = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdznoeta"));
+
+        delete dqdxnoeta; dqdxnoeta = 0;
+        delete dqdynoeta; dqdynoeta = 0;
+        delete dqdznoeta; dqdznoeta = 0;
+        grid->DeleteDataPtr("dqdxnoeta");
+        grid->DeleteDataPtr("dqdynoeta");
+        grid->DeleteDataPtr("dqdznoeta");
+
+        RDouble4D *dqdxnocta = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdxnocta"));
+        RDouble4D *dqdynocta = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdynocta"));
+        RDouble4D *dqdznocta = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdznocta"));
+
+        delete dqdxnocta; dqdxnocta = 0;
+        delete dqdynocta; dqdynocta = 0;
+        delete dqdznocta; dqdznocta = 0;
+        grid->DeleteDataPtr("dqdxnocta");
+        grid->DeleteDataPtr("dqdynocta");
+        grid->DeleteDataPtr("dqdznocta");
+    }
+
+    int systemgridtype = GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if (MIXGRID == systemgridtype)
+    {
+        RDouble4D *dqdx_cc_ruvwpt = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdx_cc_ruvwpt"));
+        RDouble4D *dqdy_cc_ruvwpt = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdy_cc_ruvwpt"));
+        RDouble4D *dqdz_cc_ruvwpt = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdz_cc_ruvwpt"));
+
+        delete dqdx_cc_ruvwpt; dqdx_cc_ruvwpt = 0;
+        delete dqdy_cc_ruvwpt; dqdy_cc_ruvwpt = 0;
+        delete dqdz_cc_ruvwpt; dqdz_cc_ruvwpt = 0;
+        grid->DeleteDataPtr("dqdx_cc_ruvwpt");
+        grid->DeleteDataPtr("dqdy_cc_ruvwpt");
+        grid->DeleteDataPtr("dqdz_cc_ruvwpt");
+    }
+
+    GetSurfaceCellNumber(gridIn, nWallBC, nMaxSurfaceCell);
+    if (nWallBC > 0)
+    {
+        RDouble2D *firstLayerHeight = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("firstLayerHeight"));
+        RDouble2D *temperatureWall = reinterpret_cast <RDouble2D *> (grid->GetDataPtr("surfaceTemperature"));
+
+        delete firstLayerHeight; firstLayerHeight = 0;
+        delete temperatureWall; temperatureWall = 0;
+        grid->DeleteDataPtr("firstLayerHeight");
+        grid->DeleteDataPtr("surfaceTemperature");
+    }
+
+    Int1D *speciesOrder = reinterpret_cast <Int1D *> (grid->GetDataPtr("speciesOrder"));
+    RDouble4D *heatTransferCoeff = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("heatTransferCoeff"));
+
+    delete speciesOrder; speciesOrder = 0;
+    delete heatTransferCoeff; heatTransferCoeff = 0;
+    grid->DeleteDataPtr("speciesOrder");
+    grid->DeleteDataPtr("heatTransferCoeff");
+
+    delete UVWTproxy; UVWTproxy = 0;
+    delete UVWTfaceIproxy; UVWTfaceIproxy = 0;
+    delete UVWTfaceJproxy; UVWTfaceJproxy = 0;
+    delete UVWTfaceKproxy; UVWTfaceKproxy = 0;
+
+    delete dqdxFaceProxy; dqdxFaceProxy = 0;
+    delete dqdyFaceProxy; dqdyFaceProxy = 0;
+    delete dqdzFaceProxy; dqdzFaceProxy = 0;
+
+    if (solvername.substr(0, 4) == "HDCS")
+    {
+        delete CellfluxProxy; CellfluxProxy = 0;
+    }
+}
+
+void NSSolverStructFD::GetSurfaceCellNumber(Grid *gridIn, int &nWall, int &nCell)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    //! Obtain the number of boundary condition regions.
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    nWall = 0;
+    nCell = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!IsWall(BCType))
+        {
+            continue;
+        }
+        ++ nWall; //! The number of surface regions.
+
+        //! The following are surface boundary codes.
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        int ni = ied - ist + 1;
+        int nj = jed - jst + 1;
+        int nk = ked - kst + 1;
+        int nCurCell = MAX(MAX(ni * nk, nj * nk), ni * nj);
+        nCell = MAX(nCurCell, nCell);
+    }
+}
+
+void NSSolverStructFD::ComputeFirstLayerGridHeight(Grid *gridIn, RDouble2D *firstLayerHeight)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+
+    using namespace IDX;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    //! Obtain the number of boundary condition regions.
+    int nBCRegion = structBCSet->GetnBCRegion();
+    int indexOfWall = 0, indexOfCell = 0;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!IsWall(BCType))
+        {
+            continue;
+        }
+        //! The following are surface boundary codes.
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        indexOfCell = 0;
+        int nSurface = structBC->GetFaceDirection() + 1;
+        int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int iWall, jWall, kWall;
+                    structBC->GetBoundaryFaceIndex(i, j, k, iWall, jWall, kWall);
+
+                    //! Obtain the centroid of the surface.
+                    RDouble xCenterWall, yCenterWall, zCenterWall;
+                    grid->FaceCoor(iWall, jWall, kWall, nSurface, xCenterWall, yCenterWall, zCenterWall);
+                    //! Obtain the centroid of the cell on the positive first layer.
+                    RDouble xCellCenter, yCellCenter, zCellCenter;
+                    grid->CenterCoor(i, j, k, xCellCenter, yCellCenter, zCellCenter);
+
+                    RDouble normalComponetX = leftOrRightIndex * faceNormalComponentX(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetY = leftOrRightIndex * faceNormalComponentY(iWall, jWall, kWall, nSurface);
+                    RDouble normalComponetZ = leftOrRightIndex * faceNormalComponentZ(iWall, jWall, kWall, nSurface);
+
+                    #ifdef USE_ALTERNATIVE_CODE
+                    RDouble cellVolume = gridCellVolume(iWall, jWall, kWall); //The volume of first cell.
+                    RDouble deltaHeight = half * cellVolume / surfaceArea;
+                    #else
+                    //! The projection of the dy called the distance between the center of the cell and that of the surface on normal vector.
+                    RDouble deltaHeight = fabs((xCellCenter - xCenterWall) * normalComponetX + (yCellCenter - yCenterWall) * normalComponetY + (zCellCenter - zCenterWall) * normalComponetZ);
+                    #endif
+
+                    (*firstLayerHeight)(indexOfWall, indexOfCell) = deltaHeight;
+                    ++ indexOfCell; //! Next grid cell.
+                }
+            }
+        }
+        ++ indexOfWall; //! Next surface regions.
+    }
+}
+
+
+void NSSolverStructFD::Primitive2Conservative(RDouble prim[5], RDouble q[5])
+{
+    using namespace IDX;
+
+    const RDouble beta = 1.4 - 1.0;
+
+    RDouble density = prim[IR];
+    RDouble um = prim[IU];
+    RDouble vm = prim[IV];
+    RDouble wm = prim[IW];
+    RDouble pressure = prim[IP];
+
+    RDouble V2 = um * um + vm * vm + wm * wm;
+
+    RDouble totalEnergy = pressure / (beta * density) + half * V2;
+
+    q[IR ] = density;
+    q[IRU] = density * um;
+    q[IRV] = density * vm;
+    q[IRW] = density * wm;
+    q[IRE] = density * totalEnergy;    
+}
+
+void NSSolverStructFD::Conservative2Primitive(RDouble q[5], RDouble prim[5])
+{
+    using namespace IDX;
+
+    const RDouble beta = 1.4 - 1.0;
+
+    RDouble density = q[IR];
+    if (density <= zero)
+    {
+        prim[IR] = density;
+        return;
+    }
+
+    RDouble um   = q[IU] / density;
+    RDouble vm   = q[IV] / density;
+    RDouble wm   = q[IW] / density;
+    RDouble V2   = um * um + vm * vm + wm * wm;
+
+    prim[IR] = density;
+    prim[IU] = um;
+    prim[IV] = vm;
+    prim[IW] = wm;        
+    prim[IP] = beta * (q[IP] - half * density * V2);
+}
+
+void NSSolverStructFD::GetIndependentVariablesforStructHighOrder(Grid *gridIn)
+{
+    StructGrid * grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D & q    = * reinterpret_cast< RDouble4D * > (grid->GetDataPtr("q"));
+    RDouble4D & qFD = * reinterpret_cast< RDouble4D * > (grid->GetDataPtr("q_FD"));
+    
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    GetIJKRegion(I, J, K, ist, ied, jst, jed, kst, ked);
+
+    for (int m = 0; m <= 4; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    qFD(i, j, k, m) = q(i, j, k, m);
+                }
+            }
+        }
+    }
+
+    ist = 1;
+    jst = 1;
+    kst = 1;
+    ied = ni - 1;
+    jed = nj - 1;
+    ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    for (int m = 0; m <= 4; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                qFD(  - 2, j, k, m) = qFD(  - 1, j, k, m);
+                qFD(  - 3, j, k, m) = qFD(  - 2, j, k, m);
+                qFD(ni + 2, j, k, m) = qFD(ni + 1, j, k, m);
+                qFD(ni + 3, j, k, m) = qFD(ni + 2, j, k, m);
+            }
+        }
+    }
+
+    for (int m = 0; m <= 4; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                qFD(i,    - 2, k, m) = qFD(i,    - 1, k, m);
+                qFD(i,    - 3, k, m) = qFD(i,    - 2, k, m);
+                qFD(i, nj + 2, k, m) = qFD(i, nj + 1, k, m);
+                qFD(i, nj + 3, k, m) = qFD(i, nj + 2, k, m);
+            }
+        }
+    }
+
+    if (nk != 1)
+    {
+        for (int m = 0; m <= 4; ++ m)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    qFD(i, j,    - 2, m) = qFD(i, j,    - 1, m);
+                    qFD(i, j,    - 3, m) = qFD(i, j,    - 2, m);
+                    qFD(i, j, nk + 2, m) = qFD(i, j, nk + 1, m);
+                    qFD(i, j, nk + 3, m) = qFD(i, j, nk + 2, m);
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::GetDependentVariablesforStructHighOrder(Grid *gridIn)
+{
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    ObtainBoundaryValue(gridIn);
+    ObtainGamaAndTemperature(gridIn);
+    ObtainPressureFactor(gridIn);
+    if (viscousType != INVISCID)
+    {
+        ObtainViscousCoef(gridIn);
+        ObtainGradientCellCenter(gridIn);
+    }
+}
+
+void NSSolverStructFD::ObtainGamaAndTemperature(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &qFD = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_FD"));
+    RDouble4D &tFD = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t_FD"));
+    RDouble3D &gama = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("gama"));
+    gama = 1.4;
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -4, 3, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    GetIJKRegion(I, J, K, ist, ied, jst, jed, kst, ked);
+    
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble rs = qFD(i, j, k, 0);
+                RDouble ps = qFD(i, j, k, 4);
+                tFD(i, j, k, 0) = refGama * refMachNumber * refMachNumber * ps / rs;
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::ObtainPressureFactor(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_FD"));
+    RDouble3D &rtem = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("rtem"));
+    
+    RDouble pressureSensorCoefficient = third;  //! For 3-D
+
+    int istp = 1;
+    int jstp = 1;
+    int kstp = 1;
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    GetIJKRegion(I, J, K, ist, ied, jst, jed, kst, ked);
+
+    if (nk == 1)
+    {
+        kstp = 0;
+        kst = 1;
+        ked = 1;
+        pressureSensorCoefficient = half;
+    }
+
+    using namespace IDX;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)    //! Corrected by clz, 2011-12-20.
+            {
+                int im = i - istp;
+                int jm = j - jstp;
+                int km = k - kstp;
+
+                int ip = i + istp;
+                int jp = j + jstp;
+                int kp = k + kstp;
+
+                RDouble pim = q(im, j , k , IP);
+                RDouble pjm = q(i , jm, k , IP);
+                RDouble pkm = q(i , j , km, IP);
+                                            
+                RDouble pip = q(ip, j , k , IP);
+                RDouble pjp = q(i , jp, k , IP);
+                RDouble pkp = q(i , j , kp, IP);
+                                            
+                RDouble ppp = q(i , j , k , IP);
+
+                RDouble dpi = ABS((pip - two * ppp + pim) / (pip  + two * ppp + pim));
+                RDouble dpj = ABS((pjp - two * ppp + pjm) / (pjp  + two * ppp + pjm));
+                RDouble dpk = ABS((pkp - two * ppp + pkm) / (pkp  + two * ppp + pkm));
+
+                rtem(i, j, k) =  pressureSensorCoefficient * (dpi + dpj + dpk);
+            }
+        }
+    }
+
+    GhostCell3D(rtem, ni, nj, nk);
+}
+
+void NSSolverStructFD::ObtainViscousCoef(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    RDouble3D &visl = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble4D &temperature   = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t_FD"));
+
+    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    GetIJKRegion(I, J, K, ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble tm = temperature(i, j, k,0);
+                visl(i, j, k) = tm * sqrt(tm) * (1.0 + nonDimensionalSutherlandTemperature) / (tm + nonDimensionalSutherlandTemperature);
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::ObtainGradientCellCenter(Grid *gridIn)
+{
+    GetUVWTproxy(gridIn);
+
+    int nDim = GetDim();
+    for(int nsurf = 1; nsurf <= nDim; ++nsurf)
+    {
+        GetUVWTfaceproxy(gridIn, nsurf);
+        GetdqdkxietactaCellCenter(gridIn, nsurf);
+    }
+
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &xfv  = *(strgrid->GetFaceVectorX());
+    RDouble4D &yfv  = *(strgrid->GetFaceVectorY());
+    RDouble4D &zfv  = *(strgrid->GetFaceVectorZ());
+    RDouble3D &vol  = *(strgrid->GetCellVolume());  
+
+    RDouble4D &dqdx = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &dqdy = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &dqdz = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterZ"));  
+
+    RDouble4D &dqdkxi = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdkxi"));
+    RDouble4D &dqdeta = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdeta"));
+    RDouble4D &dqdcta = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdcta"));
+
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni - 1;
+    int jed = nj - 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    } 
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble kxix = half * (xfv(i, j, k, 1) + xfv(i + 1, j, k, 1)); 
+                RDouble kxiy = half * (yfv(i, j, k, 1) + yfv(i + 1, j, k, 1));
+                RDouble kxiz = half * (zfv(i, j, k, 1) + zfv(i + 1, j, k, 1));
+
+                RDouble etax = half * (xfv(i, j, k, 2) + xfv(i, j + 1, k, 2)); 
+                RDouble etay = half * (yfv(i, j, k, 2) + yfv(i, j + 1, k, 2));
+                RDouble etaz = half * (zfv(i, j, k, 2) + zfv(i, j + 1, k, 2));
+                for (int m = 0; m <= 3; ++ m)
+                {
+                    dqdx(i, j, k, m) = kxix * dqdkxi(i, j, k, m) + etax * dqdeta(i, j, k, m);
+                    dqdy(i, j, k, m) = kxiy * dqdkxi(i, j, k, m) + etay * dqdeta(i, j, k, m);
+                    dqdz(i, j, k, m) = kxiz * dqdkxi(i, j, k, m) + etaz * dqdeta(i, j, k, m);
+                }
+            }
+        }
+    }
+
+    if (nDim == 3)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble ctax = half * (xfv(i, j, k, 3) + xfv(i, j, k + 1, 3));
+                    RDouble ctay = half * (yfv(i, j, k, 3) + yfv(i, j, k + 1, 3));
+                    RDouble ctaz = half * (zfv(i, j, k, 3) + zfv(i, j, k + 1, 3));
+                    for (int m = 0; m <= 3; ++ m)
+                    {
+                        dqdx(i, j, k, m) += ctax * dqdcta(i, j, k, m);
+                        dqdy(i, j, k, m) += ctay * dqdcta(i, j, k, m);
+                        dqdz(i, j, k, m) += ctaz * dqdcta(i, j, k, m);
+                    }
+                }
+            }
+        }
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int m = 0; m <= 3; ++ m)
+                {
+                    dqdx(i, j, k, m) /= vol(i, j, k);
+                    dqdy(i, j, k, m) /= vol(i, j, k);
+                    dqdz(i, j, k, m) /= vol(i, j, k);
+                }
+            }
+        }
+    }
+
+    GhostCell3D(dqdx, ni, nj, nk, 4);
+    GhostCell3D(dqdy, ni, nj, nk, 4);
+    GhostCell3D(dqdz, ni, nj, nk, 4);
+
+    if (gradient_method.substr(0,10) != "chain_rule")
+    {
+        return;
+    }
+
+    RDouble4D &dqdxnokxi = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdxnokxi"));
+    RDouble4D &dqdynokxi = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdynokxi"));
+    RDouble4D &dqdznokxi = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdznokxi"));
+
+    RDouble4D &dqdxnoeta = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdxnoeta"));
+    RDouble4D &dqdynoeta = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdynoeta"));
+    RDouble4D &dqdznoeta = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdznoeta"));
+
+    RDouble4D &dqdxnocta = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdxnocta"));
+    RDouble4D &dqdynocta = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdynocta"));
+    RDouble4D &dqdznocta = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdznocta"));
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble kxix = half * (xfv(i, j, k, 1) + xfv(i + 1, j, k, 1)); 
+                RDouble kxiy = half * (yfv(i, j, k, 1) + yfv(i + 1, j, k, 1));
+                RDouble kxiz = half * (zfv(i, j, k, 1) + zfv(i + 1, j, k, 1));
+
+                RDouble etax = half * (xfv(i, j, k, 2) + xfv(i, j + 1, k, 2)); 
+                RDouble etay = half * (yfv(i, j, k, 2) + yfv(i, j + 1, k, 2));
+                RDouble etaz = half * (zfv(i, j, k, 2) + zfv(i, j + 1, k, 2));
+
+                for (int m = 0; m <= 3; ++ m)
+                {
+                    dqdxnokxi(i, j, k, m) = dqdx(i, j, k, m) - kxix * dqdkxi(i, j, k, m) / vol(i, j, k);
+                    dqdynokxi(i, j, k, m) = dqdy(i, j, k, m) - kxiy * dqdkxi(i, j, k, m) / vol(i, j, k);
+                    dqdznokxi(i, j, k, m) = dqdz(i, j, k, m) - kxiz * dqdkxi(i, j, k, m) / vol(i, j, k);
+
+                    dqdxnoeta(i, j, k, m) = dqdx(i, j, k, m) - etax * dqdeta(i, j, k, m) / vol(i, j, k);
+                    dqdynoeta(i, j, k, m) = dqdy(i, j, k, m) - etay * dqdeta(i, j, k, m) / vol(i, j, k);
+                    dqdznoeta(i, j, k, m) = dqdz(i, j, k, m) - etaz * dqdeta(i, j, k, m) / vol(i, j, k);
+                }
+            }
+        }
+    }
+
+    if (nDim == 3)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble ctax = half * (xfv(i, j, k, 3) + xfv(i, j, k + 1, 3));
+                    RDouble ctay = half * (yfv(i, j, k, 3) + yfv(i, j, k + 1, 3));
+                    RDouble ctaz = half * (zfv(i, j, k, 3) + zfv(i, j, k + 1, 3));
+                    for (int m = 0; m <= 3; ++ m)
+                    {
+                        dqdxnocta(i, j, k, m) = dqdx(i, j, k, m) - ctax * dqdcta(i, j, k, m) / vol(i, j, k);
+                        dqdynocta(i, j, k, m) = dqdy(i, j, k, m) - ctay * dqdcta(i, j, k, m) / vol(i, j, k);
+                        dqdznocta(i, j, k, m) = dqdz(i, j, k, m) - ctaz * dqdcta(i, j, k, m) / vol(i, j, k);
+                    }
+                }
+            }
+        }
+    }
+    GhostCell3D(dqdxnokxi, ni, nj, nk, 4);
+    GhostCell3D(dqdynokxi, ni, nj, nk, 4);
+    GhostCell3D(dqdznokxi, ni, nj, nk, 4);
+
+    GhostCell3D(dqdxnoeta, ni, nj, nk, 4);
+    GhostCell3D(dqdynoeta, ni, nj, nk, 4);
+    GhostCell3D(dqdznoeta, ni, nj, nk, 4);
+
+    GhostCell3D(dqdxnocta, ni, nj, nk, 4);
+    GhostCell3D(dqdynocta, ni, nj, nk, 4);
+    GhostCell3D(dqdznocta, ni, nj, nk, 4);
+}
+
+void NSSolverStructFD::Boundary(Grid *gridIn)
+{
+    //! Already solved in Controller::GetDependentVariablesforStructHighOrder().
+}
+
+void NSSolverStructFD::ComputeGamaAndTemperature(Grid *gridIn)
+{
+    //! Already solved in Controller::GetDependentVariablesforStructHighOrder().
+}
+
+void NSSolverStructFD::CalPressureFactor(Grid *gridIn)
+{
+    //! Already solved in Controller::GetDependentVariablesforStructHighOrder().
+}
+
+void NSSolverStructFD::ComputeViscousCoeff(Grid *gridIn)
+{
+    //! Already solved in Controller::GetDependentVariablesforStructHighOrder().
+}
+
+void NSSolverStructFD::ComputeViscousCoefficientWithoutChemical(Grid *gridIn)
+{
+    //! Already solved in Controller::GetDependentVariablesforStructHighOrder().
+}
+
+void NSSolverStructFD::ComputeGradientCellCenter(Grid *gridIn)
+{
+    //! Already solved in Controller::GetDependentVariablesforStructHighOrder().
+}
+
+void NSSolverStructFD::ObtainBoundaryValue(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    
+    int viscousType         = parameters->GetViscousType();
+    RDouble wallTemperature = parameters->GetWallTemperature();
+
+    using namespace PHENGLEI;
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (IsInterface(BCType))
+        {
+            continue;
+        }        
+        else if (IsWall(BCType))
+        {
+            if (viscousType == INVISCID)
+            {
+                SymmetryBC3D(grid, structBC);
+            }
+            else if (wallTemperature <= 0.0)
+            {
+                ViscousAdiabaticWall(grid, structBC);
+            }
+            else
+            {
+                ViscousIsotropicWall(grid, structBC);
+            }
+        }
+        else if (BCType == SYMMETRY)
+        {
+            SymmetryBC3D(grid, structBC);
+        }
+        else if (BCType == FARFIELD)
+        {
+            FarFieldRiemannInvariants(grid, structBC);
+        }
+        else if (BCType == INFLOW)
+        {
+            InFlowBC3D(grid, structBC);
+        }
+        else if (BCType == OUTFLOW)
+        {
+            OutFlowBC3D(grid, structBC);
+        }
+        else if (BCType == POLE || BCType/10 == POLE)
+        {
+            OutFlowBC3D(grid, structBC);
+        }
+        else
+        {
+            //! In order to avoid illegal BCtype ID.
+            ostringstream oss;
+            oss<<"Error : Illegal BCtype ID "<<BCType<<endl;
+            TK_Exit::ExceptionExit(oss);
+        }
+    }
+    CornerPoint(grid);
+}
+
+void NSSolverStructFD::InFlowBC3D(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &primitiveVars = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_FD"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int *s_lr3d = structBC->GetFaceDirectionIndex();
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int ntt = 1; ntt <= 4; ++ ntt)
+                {
+                    int it = i + s_lr3d[0] * ntt;
+                    int jt = j + s_lr3d[1] * ntt;
+                    int kt = k + s_lr3d[2] * ntt;
+                    for (int m = 0; m < 5; ++ m)
+                    {
+                        primitiveVars(it, jt, kt, m) = primitiveVarFarfield[m];
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::OutFlowBC3D(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_FD"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int *s_lr3d = structBC->GetFaceDirectionIndex();    
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int ntt = 1; ntt <= 4; ++ ntt)
+                {
+                    int it = i + s_lr3d[0] * ntt;
+                    int jt = j + s_lr3d[1] * ntt;
+                    int kt = k + s_lr3d[2] * ntt;
+                    for (int m = 0; m < 5; ++ m)
+                    {
+                        q(it, jt, kt, m) = q(i, j, k, m);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::SymmetryBC3D(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &xfn  = *(grid->GetFaceNormalX());
+    RDouble4D &yfn  = *(grid->GetFaceNormalY());
+    RDouble4D &zfn  = *(grid->GetFaceNormalZ());
+    
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_FD"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int *s_lr3d = structBC->GetFaceDirectionIndex();
+    int iSurface = structBC->GetFaceDirection() + 1;
+
+    int id,jd,kd;
+    GetBCFaceIDX(s_lr3d, id, jd, kd);
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int in = i + id;
+                int jn = j + jd;
+                int kn = k + kd;
+                RDouble nxs = xfn(in,jn,kn,iSurface);
+                RDouble nys = yfn(in,jn,kn,iSurface);
+                RDouble nzs = zfn(in,jn,kn,iSurface);
+
+                for (int ntt = 1; ntt <= 4; ++ ntt)
+                {
+                    int it = i + s_lr3d[0] * ntt;
+                    int jt = j + s_lr3d[1] * ntt;
+                    int kt = k + s_lr3d[2] * ntt;
+                    
+                    int nss = ntt - 1;
+                    int is = i - s_lr3d[0] * nss;
+                    int js = j - s_lr3d[1] * nss;
+                    int ks = k - s_lr3d[2] * nss;
+                    RestrictIndex(is, js, ks, ni - 1,nj - 1,nk - 1);
+
+                    RDouble ro = q(is, js, ks, IR);
+                    RDouble vx = q(is, js, ks, IU);
+                    RDouble vy = q(is, js, ks, IV);
+                    RDouble vz = q(is, js, ks, IW);
+                    RDouble ps = q(is, js, ks, IP);
+                    RDouble vn = nxs * vx + nys * vy + nzs * vz;
+
+                    q(it, jt, kt, IR) = ro;
+                    q(it, jt, kt, IU) = vx - 2.0 * nxs * vn;
+                    q(it, jt, kt, IV) = vy - 2.0 * nys * vn;
+                    q(it, jt, kt, IW) = vz - 2.0 * nzs * vn;
+                    q(it, jt, kt, IP) = ps;
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::ViscousAdiabaticWall(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_FD"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int *s_lr3d = structBC->GetFaceDirectionIndex();
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int ntt = 1; ntt <= 4; ++ ntt)
+                {
+                    int it = i + s_lr3d[0] * ntt;
+                    int jt = j + s_lr3d[1] * ntt;
+                    int kt = k + s_lr3d[2] * ntt;
+                    
+                    int nss = ntt - 1;
+                    int is = i - s_lr3d[0] * nss;
+                    int js = j - s_lr3d[1] * nss;
+                    int ks = k - s_lr3d[2] * nss;
+                    RestrictIndex(is, js, ks, ni - 1,nj - 1,nk - 1);
+
+                    RDouble ro = q(is, js, ks, IR);
+                    RDouble vx = q(is, js, ks, IU);
+                    RDouble vy = q(is, js, ks, IV);
+                    RDouble vz = q(is, js, ks, IW);
+                    RDouble ps = q(is, js, ks, IP);
+
+                    q(it, jt, kt, IR) =   ro;
+                    q(it, jt, kt, IU) = - vx;
+                    q(it, jt, kt, IV) = - vy;
+                    q(it, jt, kt, IW) = - vz;
+                    q(it, jt, kt, IP) =   ps;
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::ViscousIsotropicWall(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    
+    RDouble refGama = parameters->GetRefGama();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int *s_lr3d = structBC->GetFaceDirectionIndex();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_FD"));
+    
+    RDouble temperatureWallNonDimensional = wallTemperature / refDimensionalTemperature; //! non-dimensional temperature.
+    RDouble temperaturelimitation = 0.1 * temperatureWallNonDimensional;
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int layer = 1; layer <= 4; ++ layer)
+                {
+                    int nss = layer - 1;
+                    int is = i - s_lr3d[0] * nss;
+                    int js = j - s_lr3d[1] * nss;
+                    int ks = k - s_lr3d[2] * nss;
+                    RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+                    
+                    int ntt = layer;
+                    int it = i + s_lr3d[0] * ntt;
+                    int jt = j + s_lr3d[1] * ntt;
+                    int kt = k + s_lr3d[2] * ntt;                    
+
+                    RDouble rs = q(is, js, ks, 0);
+                    RDouble us = q(is, js, ks, 1);
+                    RDouble vs = q(is, js, ks, 2);
+                    RDouble ws = q(is, js, ks, 3);
+                    RDouble ps = q(is, js, ks, 4);
+                    RDouble ts = refGama * refMachNumber * refMachNumber * ps / rs;
+
+                    RDouble ut = - us;
+                    RDouble vt = - vs;
+                    RDouble wt = - ws;
+                    RDouble pt =   ps;
+
+                    RDouble tt = 2.0 * temperatureWallNonDimensional - ts;
+                    if (tt < temperaturelimitation)
+                    {
+                        tt = temperaturelimitation;
+                    }
+                    RDouble rt = refGama * refMachNumber * refMachNumber * pt / tt;
+                   
+                    q(it, jt, kt, 0) = rt;
+                    q(it, jt, kt, 1) = ut;
+                    q(it, jt, kt, 2) = vt;
+                    q(it, jt, kt, 3) = wt;
+                    q(it, jt, kt, 4) = pt;
+                }                
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::FarFieldRiemannInvariants(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    RDouble refGama = parameters->GetRefGama();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_FD"));
+
+    RDouble4D &xfn = * (grid->GetFaceNormalX());
+    RDouble4D &yfn = * (grid->GetFaceNormalY());
+    RDouble4D &zfn = * (grid->GetFaceNormalZ());
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+    int lr       = structBC->GetFaceLeftOrRightIndex();
+    int *s_lr3d  = structBC->GetFaceDirectionIndex();
+
+    int id, jd, kd;
+    GetBCFaceIDX(s_lr3d, id, jd, kd);
+
+    using namespace IDX;
+    RDouble roo = primitiveVarFarfield[IR];
+    RDouble uoo = primitiveVarFarfield[IU];
+    RDouble voo = primitiveVarFarfield[IV];
+    RDouble woo = primitiveVarFarfield[IW];
+    RDouble poo = primitiveVarFarfield[IP];
+         
+    int nEquation = GetNumberOfEquations();
+    RDouble *prims;  //! Inner point.
+    RDouble *primt;  //! Ghost point.
+    prims = new RDouble [nEquation];
+    primt = new RDouble [nEquation];
+
+    RDouble rin, uin, vin, win, pin, vnin, cinner, vein; //! inner    point variables.
+    RDouble rb , ub , vb , wb , pb , vnb , cb;           //! boundary point variables.
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int is = i;
+                int js = j;
+                int ks = k; 
+
+                //! The needed (nx,ny,nz) is stored in the cell of (in,jn,kn).
+                int in = i + id;
+                int jn = j + jd;
+                int kn = k + kd;
+                RDouble nxs = lr * xfn(in, jn, kn, iSurface);
+                RDouble nys = lr * yfn(in, jn, kn, iSurface);
+                RDouble nzs = lr * zfn(in, jn, kn, iSurface);
+
+                //! The first inner point.
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    prims[m] = q(is, js, ks, m);
+                }
+                rin    = prims[IR];
+                uin    = prims[IU];
+                vin    = prims[IV];
+                win    = prims[IW];
+                pin    = prims[IP];
+                vnin   = nxs * uin + nys * vin + nzs * win; //! Not consider the "vgn".
+                cinner = sqrt(ABS(refGama * pin / rin));
+                vein   = sqrt(uin * uin + vin * vin + win * win);
+
+                //! Infinite.
+                RDouble vnoo = nxs * uoo + nys * voo + nzs * woo;
+                RDouble coo  = sqrt(ABS(refGama * poo / roo));
+
+                if (vein > cinner)
+                {
+                    //! Supersonic.
+                    if (vnin >= 0.0)
+                    {
+                        //! Supersonic outlet.
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            primt[m] = prims[m];
+                        }
+                    }
+                    else
+                    {
+                        //! Supersonic inlet.
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            primt[m] = primitiveVarFarfield[m];
+                        }
+                    }
+                }
+                else
+                {
+                    //! Subsonic.
+                    RDouble gama1 = refGama - 1.0;
+                    RDouble riemp;     //! Riemann invariant for inner.
+                    RDouble riemm;     //! Riemann invariant for infinite.
+                    riemp = vnin + 2.0 * cinner / gama1;
+                    riemm = vnoo - 2.0 * coo    / gama1;
+
+                    vnb   = half   * (riemp + riemm);
+                    cb    = fourth * (riemp - riemm) * gama1;
+
+                    RDouble sb;                         //! Entropy at the boundary.
+                    RDouble uref, vref, wref, vnref;    //! Outlet refers to inner point, and inlet refers to infinite.
+
+                    if (vnb > 0.0)
+                    {
+                        //! Subsonic outlet.
+                        sb    = pin / pow(rin, refGama);
+                        uref  = uin;
+                        vref  = vin;
+                        wref  = win;
+                        vnref = vnin;
+                    }
+                    else
+                    {
+                        //! Subsonic inlet.
+                        sb    = poo / pow(roo, refGama);
+                        uref  = uoo;
+                        vref  = voo;
+                        wref  = woo;
+                        vnref = vnoo;
+                    }
+
+                    rb = pow((cb * cb / (sb * refGama)), 1.0 / gama1);
+                    ub = uref + nxs * (vnb - vnref);
+                    vb = vref + nys * (vnb - vnref);
+                    wb = wref + nzs * (vnb - vnref);
+                    pb = cb * cb * rb / refGama;    //! The same to "pb = sb * pow(rb, refGama);".
+
+                    primt[IR] = rb;
+                    primt[IU] = ub;
+                    primt[IV] = vb;
+                    primt[IW] = wb;
+                    primt[IP] = pb; 
+                }
+                for (int ntt = 1; ntt <= 4; ++ ntt)
+                {
+                    int it = i + s_lr3d[0] * ntt;
+                    int jt = j + s_lr3d[1] * ntt;
+                    int kt = k + s_lr3d[2] * ntt;
+
+                    q(it, jt, kt, IR) = primt[IR];
+                    q(it, jt, kt, IU) = primt[IU];
+                    q(it, jt, kt, IV) = primt[IV];
+                    q(it, jt, kt, IW) = primt[IW];
+                    q(it, jt, kt, IP) = primt[IP];
+                }
+            }
+        }
+    }
+    delete []prims;
+    delete []primt;
+}
+
+void NSSolverStructFD::CornerPoint(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_FD"));
+
+    FillCornerPoint3D(q, ni, nj, nk, nEquation);
+}
+
+void NSSolverStructFD::ZeroResiduals(Grid *grid)
+{
+    RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    residual = 0.0;
+}
+
+void NSSolverStructFD::InitFlowAsRestart()
+{
+    StructGrid *grid = StructGridCast(GetGrid());
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    GetIJKRegion(I, J, K, ist, ied, jst, jed, kst, ked);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int outputStepInterval = 0;
+    GlobalDataBase::UpdateData("outnstep", &outputStepInterval, PHINT, 1);
+
+    RDouble physicalTime = 0.0;
+    GlobalDataBase::UpdateData("physicalTime", &physicalTime, PHDOUBLE, 1);
+
+    RDouble4D &primitiveVariables = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+
+    Range M(0, nEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    primitiveVariables(i, j, k, m) = primitiveVarFarfield[m];
+                }
+            }
+        }
+    }
+
+    GetIndependentVariablesforStructHighOrder(grid);
+    GetDependentVariablesforStructHighOrder(grid);
+    
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        RDouble4D &residual = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+        residual   = 0.0;
+        return;
+    }
+
+    RDouble4D &primitiveVariablen1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble4D &primitiveVariablen2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_unsteady_n2"));
+
+    primitiveVariablen1 = primitiveVariables;
+    primitiveVariablen2 = primitiveVariablen1;
+
+    RDouble4D &residual   = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));
+    RDouble4D &residualn1 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble4D &residualn2 = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_n2"));
+
+    residual   = 0.0;
+    residualn1 = 0.0;
+    residualn2 = 0.0;
+
+    int nStatisticalStep = 0;
+    GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+
+    //! Store the historical sum of InviscidFlux, ViscousFlux, et al., \n
+    //! exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+    RDouble4D &resTmp = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res_unsteady_tmp"));
+
+    resTmp = 0.0;
+}
+
+void NSSolverStructFD::InitLocalMemory(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    solvername        = GlobalDataBase::GetStrParaFromDB("str_highorder_solver");
+    EPSILON           = GlobalDataBase::GetDoubleParaFromDB("str_highorder_interpolation_epsilon");
+    fluxname          = GlobalDataBase::GetStrParaFromDB("str_highorder_flux_name");
+    gradient_method   = GlobalDataBase::GetStrParaFromDB("structhighordergradient");
+    
+    Range I(-1, ni + 1);
+    Range J(-1, nj + 1);
+    Range K(-1, nk + 1);
+    if (nk == 1) K.setRange(1, 1);
+
+    UVWTfaceIproxy = new FieldProxy();
+    UVWTfaceJproxy = new FieldProxy();
+    UVWTfaceKproxy = new FieldProxy();
+    UVWTfaceIproxy->SetField_STR(new RDouble4D(I, J, K, Range(0, 3), fortranArray), true); 
+    UVWTfaceJproxy->SetField_STR(new RDouble4D(I, J, K, Range(0, 3), fortranArray), true);
+    UVWTfaceKproxy->SetField_STR(new RDouble4D(I, J, K, Range(0, 3), fortranArray), true);
+
+    dqdxFaceProxy = new FieldProxy();
+    dqdyFaceProxy = new FieldProxy();
+    dqdzFaceProxy = new FieldProxy();
+    dqdxFaceProxy->SetField_STR(new RDouble4D(I, J, K, Range(0, 3), fortranArray), true); 
+    dqdyFaceProxy->SetField_STR(new RDouble4D(I, J, K, Range(0, 3), fortranArray), true);
+    dqdzFaceProxy->SetField_STR(new RDouble4D(I, J, K, Range(0, 3), fortranArray), true);
+
+    Range I4(- 3, ni + 3);
+    Range J4(- 3, nj + 3);
+    Range K4(- 3, nk + 3);
+    if (nk == 1) K4.setRange(1, 1);
+    
+    UVWTproxy = new FieldProxy();
+    UVWTproxy->SetField_STR(new RDouble4D(I4, J4, K4, Range(0, 3), fortranArray), true);
+    
+    if(solvername.substr(0, 4) == "HDCS")
+    {
+        CellfluxProxy = new FieldProxy();
+        CellfluxProxy->SetField_STR(new RDouble4D(I4, J4, K4, Range(0, 4), fortranArray), true);
+    }
+
+    WeightedInterpolationCoef = new RDouble6D(I, J, K, Range(1, 3), Range(0, 1), Range(0, 29), fortranArray);
+
+    SetWeightedInterpolationCoef(gridIn);
+}
+
+void NSSolverStructFD::SetWeightedInterpolationCoef(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    string InterpolationType = GlobalDataBase::GetStrParaFromDB("str_highorder_interpolation_type");
+
+    if(InterpolationType.substr(0, 4) == "test")
+    {
+        //! non-uniform interpolation
+        RDouble3D &xcc = *grid->GetCellCenterX();
+        RDouble3D &ycc = *grid->GetCellCenterY();
+        RDouble3D &zcc = *grid->GetCellCenterZ();
+        
+        int nDim = GetDim();
+        for(int nsurf = 1; nsurf <= nDim; ++ nsurf)
+        {
+            int il1, jl1, kl1;
+            GetNsurfIndex(nsurf, il1, jl1, kl1);
+            
+            int ist = 1 - il1;
+            int jst = 1 - jl1;
+            int kst = 1 - kl1;
+            int ied = ni - 1 + 2*il1;
+            int jed = nj - 1 + 2*jl1;
+            int ked = nk - 1 + 2*kl1;
+            if (nk == 1)
+            {
+                kst = 1;
+                ked = 1;
+            }
+            
+            RDouble LengthPlate_L[4];
+            for(int k = kst; k <= ked; ++k)
+            {
+                for(int j = jst; j <= jed; ++j)
+                {
+                    for(int i = ist; i <= ied; ++i)
+                    {
+                        for(int ip = 0; ip <= 3; ++ ip)
+                        {
+                            int iL = i + (ip - 2) * il1;
+                            int jL = j + (ip - 2) * jl1;
+                            int kL = k + (ip - 2) * kl1;
+                            
+                            RDouble lx = xcc(iL, jL, kL) - xcc(iL - il1, jL - jl1, kL - kl1);
+                            RDouble ly = ycc(iL, jL, kL) - ycc(iL - il1, jL - jl1, kL - kl1);
+                            RDouble lz = zcc(iL, jL, kL) - zcc(iL - il1, jL - jl1, kL - kl1);
+                            
+                            LengthPlate_L[ip] = sqrt(lx * lx + ly * ly + lz * lz);
+                        }
+                        RDouble Lengthbase = LengthPlate_L[2];
+                        RDouble LL = LengthPlate_L[0] / Lengthbase;
+                        RDouble L  = LengthPlate_L[1] / Lengthbase;
+                        RDouble RR = LengthPlate_L[3] / Lengthbase;
+
+                        RDouble weight[3];
+                        weight[0] = (1.0 + 2.0 * RR) / (4.0 * (1.0 + L + LL) * (1.0 + L + LL + RR));
+                        weight[2] = (1.0 + 2.0 * L) * (1.0 + 2.0 * L + 2.0 * LL) / (4.0 * (1.0 + L + RR) * (1.0 + L + LL + RR));
+                        weight[1] = 1.0 - weight[0] - weight[2];
+
+                        RDouble InterCoef0[3];
+                        InterCoef0[0] = (1.0 + 2.0 * L) / (4.0 * LL * (L + LL));
+                        InterCoef0[1] = - (1.0 + 2.0 * L + 2.0 * LL) / (4.0 * L * LL);
+                        InterCoef0[2] = 1.0 - InterCoef0[0] - InterCoef0[1];
+                        
+                        RDouble InterCoef1[3];
+                        InterCoef1[0] = - 0.25 / (L * (1.0 + L));
+                        InterCoef1[1] =   0.25 * (1.0 + 2.0 * L) / L;
+                        InterCoef1[2] = 1.0 - InterCoef1[0] - InterCoef1[1];
+                        
+                        RDouble InterCoef2[3];
+                        InterCoef2[0] = 0.25 * (1.0 + 2.0 * RR) / (1.0 + RR);
+                        InterCoef2[1] = 0.25 * (1.0 + 2.0 * RR) / RR;
+                        InterCoef2[2] = 1.0 - InterCoef2[0] - InterCoef2[1];
+                        
+                        RDouble Diff1stCoef0[3];
+                        Diff1stCoef0[0] = L / (LL * (L + LL));
+                        Diff1stCoef0[1] = - (L + LL) / (L * LL);
+                        Diff1stCoef0[2] = - Diff1stCoef0[0] - Diff1stCoef0[1];
+                        
+                        RDouble Diff1stCoef1[3];
+                        Diff1stCoef1[0] = - 1.0 / (L * (1.0 + L));
+                        Diff1stCoef1[1] = - 1.0 + 1.0 / L;
+                        Diff1stCoef1[2] = - Diff1stCoef1[0] - Diff1stCoef1[1];
+                        
+                        RDouble Diff1stCoef2[3];
+                        Diff1stCoef2[0] = - (2.0 + RR) / (1.0 + RR);
+                        Diff1stCoef2[1] = 1.0 + 1.0 / RR;
+                        Diff1stCoef2[2] = - Diff1stCoef2[0] - Diff1stCoef2[1];
+                        
+                        RDouble Diff2ndCoef0[3];
+                        Diff2ndCoef0[0] =   2.0 / (LL * (L + LL));
+                        Diff2ndCoef0[1] = - 2.0 / (L * LL);
+                        Diff2ndCoef0[2] = - Diff2ndCoef0[0] - Diff2ndCoef0[1];
+                        
+                        RDouble Diff2ndCoef1[3];
+                        Diff2ndCoef1[0] =   2.0 / (L * (1.0 + L));
+                        Diff2ndCoef1[1] = - 2.0 / L;
+                        Diff2ndCoef1[2] = - Diff2ndCoef1[0] - Diff2ndCoef1[1];
+                        
+                        RDouble Diff2ndCoef2[3];
+                        Diff2ndCoef2[0] =   2.0 / (1.0 + RR);
+                        Diff2ndCoef2[1] = - 2.0 / RR;
+                        Diff2ndCoef2[2] = - Diff2ndCoef2[0] - Diff2ndCoef2[1];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0,  0) = weight[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0,  1) = weight[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0,  2) = weight[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0,  3) = InterCoef0[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0,  4) = InterCoef0[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0,  5) = InterCoef0[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0,  6) = InterCoef1[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0,  7) = InterCoef1[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0,  8) = InterCoef1[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0,  9) = InterCoef2[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 10) = InterCoef2[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 11) = InterCoef2[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 12) = Diff1stCoef0[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 13) = Diff1stCoef0[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 14) = Diff1stCoef0[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 15) = Diff1stCoef1[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 16) = Diff1stCoef1[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 17) = Diff1stCoef1[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 18) = Diff1stCoef2[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 19) = Diff1stCoef2[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 20) = Diff1stCoef2[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 21) = Diff2ndCoef0[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 22) = Diff2ndCoef0[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 23) = Diff2ndCoef0[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 24) = Diff2ndCoef1[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 25) = Diff2ndCoef1[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 26) = Diff2ndCoef1[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 27) = Diff2ndCoef2[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 28) = Diff2ndCoef2[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, 29) = Diff2ndCoef2[2];
+                    }
+                }
+            }
+            
+            RDouble LengthPlate_R[4];
+            for(int k = kst; k <= ked; ++k)
+            {
+                for(int j = jst; j <= jed; ++j)
+                {
+                    for(int i = ist; i <= ied; ++i)
+                    {
+                        for(int ip = 0; ip <= 3; ++ ip)
+                        { 
+                            int iR = i + (ip - 1) * il1;
+                            int jR = j + (ip - 1) * jl1;
+                            int kR = k + (ip - 1) * kl1;
+                            
+                            RDouble lx = xcc(iR, jR, kR) - xcc(iR - il1, jR - jl1, kR - kl1);
+                            RDouble ly = ycc(iR, jR, kR) - ycc(iR - il1, jR - jl1, kR - kl1);
+                            RDouble lz = zcc(iR, jR, kR) - zcc(iR - il1, jR - jl1, kR - kl1);
+                            
+                            LengthPlate_R[3 - ip] = sqrt(lx * lx + ly * ly + lz * lz);
+                        }
+                        RDouble Lengthbase = LengthPlate_R[2];
+                        RDouble LL = LengthPlate_R[0] / Lengthbase;
+                        RDouble L  = LengthPlate_R[1] / Lengthbase;
+                        RDouble RR = LengthPlate_R[3] / Lengthbase;
+                        
+                        RDouble weight[3];
+                        weight[0] = (1.0 + 2.0 * RR) / (4.0 * (1.0 + L + LL) * (1.0 + L + LL + RR));
+                        weight[2] = (1.0 + 2.0 * L) * (1.0 + 2.0 * L + 2.0 * LL) / (4.0 * (1.0 + L + RR) * (1.0 + L + LL + RR));
+                        weight[1] = 1.0 - weight[0] - weight[2];
+                        
+                        RDouble InterCoef0[3];
+                        InterCoef0[0] = (1.0 + 2.0 * L) / (4.0 * LL * (L + LL));
+                        InterCoef0[1] = - (1.0 + 2.0 * L + 2.0 * LL) / (4.0 * L * LL);
+                        InterCoef0[2] = 1.0 - InterCoef0[0] - InterCoef0[1];
+                        
+                        RDouble InterCoef1[3];
+                        InterCoef1[0] = - 0.25 / (L * (1.0 + L));
+                        InterCoef1[1] =   0.25 * (1.0 + 2.0 * L) / L;
+                        InterCoef1[2] = 1.0 - InterCoef1[0] - InterCoef1[1];
+                        
+                        RDouble InterCoef2[3];
+                        InterCoef2[0] = 0.25 * (1.0 + 2.0 * RR) / (1.0 + RR);
+                        InterCoef2[1] = 0.25 * (1.0 + 2.0 * RR) / RR;
+                        InterCoef2[2] = 1.0 - InterCoef2[0] - InterCoef2[1];
+                        
+                        RDouble Diff1stCoef0[3];
+                        Diff1stCoef0[0] = L / (LL * (L + LL));
+                        Diff1stCoef0[1] = - (L + LL) / (L * LL);
+                        Diff1stCoef0[2] = - Diff1stCoef0[0] - Diff1stCoef0[1];
+                        
+                        RDouble Diff1stCoef1[3];
+                        Diff1stCoef1[0] = - 1.0 / (L * (1.0 + L));
+                        Diff1stCoef1[1] = - 1.0 + 1.0 / L;
+                        Diff1stCoef1[2] = - Diff1stCoef1[0] - Diff1stCoef1[1];
+                        
+                        RDouble Diff1stCoef2[3];
+                        Diff1stCoef2[0] = - (2.0 + RR) / (1.0 + RR);
+                        Diff1stCoef2[1] = 1.0 + 1.0 / RR;
+                        Diff1stCoef2[2] = - Diff1stCoef2[0] - Diff1stCoef2[1];
+                        
+                        RDouble Diff2ndCoef0[3];
+                        Diff2ndCoef0[0] =   2.0 / (LL * (L + LL));
+                        Diff2ndCoef0[1] = - 2.0 / (L * LL);
+                        Diff2ndCoef0[2] = - Diff2ndCoef0[0] - Diff2ndCoef0[1];
+                        
+                        RDouble Diff2ndCoef1[3];
+                        Diff2ndCoef1[0] =   2.0 / (L * (1.0 + L));
+                        Diff2ndCoef1[1] = - 2.0 / L;
+                        Diff2ndCoef1[2] = - Diff2ndCoef1[0] - Diff2ndCoef1[1];
+                        
+                        RDouble Diff2ndCoef2[3];
+                        Diff2ndCoef2[0] =   2.0 / (1.0 + RR);
+                        Diff2ndCoef2[1] = - 2.0 / RR;
+                        Diff2ndCoef2[2] = - Diff2ndCoef2[0] - Diff2ndCoef2[1];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1,  0) = weight[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1,  1) = weight[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1,  2) = weight[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1,  3) = InterCoef0[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1,  4) = InterCoef0[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1,  5) = InterCoef0[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1,  6) = InterCoef1[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1,  7) = InterCoef1[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1,  8) = InterCoef1[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1,  9) = InterCoef2[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 10) = InterCoef2[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 11) = InterCoef2[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 12) = Diff1stCoef0[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 13) = Diff1stCoef0[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 14) = Diff1stCoef0[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 15) = Diff1stCoef1[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 16) = Diff1stCoef1[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 17) = Diff1stCoef1[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 18) = Diff1stCoef2[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 19) = Diff1stCoef2[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 20) = Diff1stCoef2[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 21) = Diff2ndCoef0[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 22) = Diff2ndCoef0[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 23) = Diff2ndCoef0[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 24) = Diff2ndCoef1[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 25) = Diff2ndCoef1[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 26) = Diff2ndCoef1[2];
+                        
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 27) = Diff2ndCoef2[0];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 28) = Diff2ndCoef2[1];
+                        (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, 29) = Diff2ndCoef2[2];
+                    }
+                }
+            }
+        }
+    }
+    else
+    {
+        //! uniform interpolation
+        RDouble Coef[30];
+        
+        Coef[0] =  1.0  / 16.0;
+        Coef[1] = 10.0  / 16.0;
+        Coef[2] =  5.0  / 16.0;
+        
+        Coef[3] =    3.0 / 8.0;
+        Coef[4] = - 10.0 / 8.0;
+        Coef[5] =   15.0 / 8.0;
+        
+        Coef[6] = - 1.0 / 8.0;
+        Coef[7] =   6.0 / 8.0;
+        Coef[8] =   3.0 / 8.0;
+        
+        Coef[ 9] =   3.0 / 8.0;
+        Coef[10] =   6.0 / 8.0;
+        Coef[11] = - 1.0 / 8.0;
+        
+        Coef[12] =   0.5;
+        Coef[13] = - 2.0;
+        Coef[14] =   1.5;
+        
+        Coef[15] = - 0.5;
+        Coef[16] =   0.0;
+        Coef[17] =   0.5;
+        
+        Coef[18] = - 1.5;
+        Coef[19] =   2.0;
+        Coef[20] = - 0.5;
+        
+        Coef[21] =   1.0;
+        Coef[22] = - 2.0;
+        Coef[23] =   1.0;
+        
+        Coef[24] =   1.0;
+        Coef[25] = - 2.0;
+        Coef[26] =   1.0;
+        
+        Coef[27] =   1.0;
+        Coef[28] = - 2.0;
+        Coef[29] =   1.0;
+        
+        int nDim = GetDim();
+        for(int nsurf = 1; nsurf <= nDim; ++ nsurf)
+        {
+            int il1, jl1, kl1;
+            GetNsurfIndex(nsurf, il1, jl1, kl1);
+            
+            int ist = 1 - il1;
+            int jst = 1 - jl1;
+            int kst = 1 - kl1;
+            int ied = ni - 1 + 2*il1;
+            int jed = nj - 1 + 2*jl1;
+            int ked = nk - 1 + 2*kl1;
+            
+            if (nk == 1)
+            {
+                kst = 1;
+                ked = 1;
+            }
+            for(int k = kst; k <= ked; ++k)
+            {
+                for(int j = jst; j <= jed; ++j)
+                {
+                    for(int i = ist; i <= ied; ++i)
+                    {
+                        for(int coefid = 0; coefid <= 29; ++coefid)
+                        {
+                            (*WeightedInterpolationCoef)(i, j, k, nsurf, 0,  coefid) = Coef[coefid];
+                            (*WeightedInterpolationCoef)(i, j, k, nsurf, 1,  coefid) = Coef[coefid];
+                        }
+                    }
+                }
+            }
+        }
+    }    
+}
+
+void NSSolverStructFD::InviscidFlux(Grid *gridIn)
+{
+    StructGrid * grid = StructGridCast(gridIn);
+        
+    total_negative = 0;
+
+    FieldProxy *qlProxy = new FieldProxy();
+    FieldProxy *qrProxy = new FieldProxy();
+    FieldProxy * fluxProxy = new FieldProxy();
+
+    int nDim = GetDim();
+    for (int nsurf = 1; nsurf <= nDim; ++ nsurf)
+    {
+        if (nsurf == 1)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1")));
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI")));
+        }
+        else if (nsurf == 2)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2")));
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ")));
+        }
+        else
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3")));
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK")));
+        }
+
+        GetFaceVariable_WCNS(grid, qlProxy, qrProxy, nsurf);
+        GetFaceVariableCorrectionAtPhysicalBoundary(grid, qlProxy, qrProxy, nsurf);
+        GetFaceInviscidFlux(grid, qlProxy, qrProxy, fluxProxy, nsurf);
+        FluxDifference(grid, fluxProxy, nsurf);
+    }
+
+    /*if (total_negative > 0)
+    {
+        std::cout<<"warning:    "<<total_negative<<std::endl;
+    }*/
+
+    delete qlProxy;
+    delete qrProxy;
+    delete fluxProxy;
+}
+
+void NSSolverStructFD::GetFaceVariable_WCNS(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int nsurf)
+{
+    StructGrid * grid = StructGridCast(gridIn);
+    RDouble4D & q = * reinterpret_cast< RDouble4D * > (grid->GetDataPtr("q_FD"));
+    RDouble4D & ql = qlProxy->GetField_STR();
+    RDouble4D & qr = qrProxy->GetField_STR();
+
+    Int1D *DiffOrder;
+    if(nsurf == 1)
+    {
+        DiffOrder = grid->DiscretePrecisionKXI;
+    }
+    else if(nsurf == 2)
+    {
+        DiffOrder = grid->DiscretePrecisionETA;
+    }
+    else
+    {
+        DiffOrder = grid->DiscretePrecisionCTA;
+    }
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int il1, jl1, kl1;
+    GetNsurfIndex(nsurf, il1, jl1, kl1);
+    
+    int ist = 1 - il1;
+    int jst = 1 - jl1;
+    int kst = 1 - kl1;
+    int ied = ni - 1 + 2*il1;
+    int jed = nj - 1 + 2*jl1;
+    int ked = nk - 1 + 2*kl1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }   
+
+    RDouble PrimPlate_L[5][5];
+    RDouble PrimPlate_R[5][5];
+
+    RDouble PrimHalf_L[5];
+    RDouble PrimHalf_R[5];
+
+    RDouble Coef_L[30];
+    RDouble Coef_R[30];
+    
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {            
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int ip = 0; ip <= 4; ++ ip)
+                {
+                    int iL = i + (ip - 3) * il1;
+                    int jL = j + (ip - 3) * jl1;
+                    int kL = k + (ip - 3) * kl1;
+
+                    int iR = i + (ip - 2) * il1;
+                    int jR = j + (ip - 2) * jl1;
+                    int kR = k + (ip - 2) * kl1;
+
+                    for (int m = 0; m <= 4; ++m)
+                    {
+                        PrimPlate_L[    ip][m] = q(iL, jL, kL, m);
+                        PrimPlate_R[4 - ip][m] = q(iR, jR, kR, m);
+                    }
+                }
+
+                int localcellID = i * il1 + j * jl1 + k * kl1;
+                
+                if((*DiffOrder)(localcellID) == 2 || (*DiffOrder)(localcellID - 1) == 2)
+                {
+                    InterpolationRUVWP3rd(PrimPlate_L, PrimHalf_L);
+                    InterpolationRUVWP3rd(PrimPlate_R, PrimHalf_R);
+                }
+                else
+                {
+                    for(int ic = 0; ic <= 29; ++ic)
+                    {
+                        Coef_L[ic] = (*WeightedInterpolationCoef)(i, j, k, nsurf, 0, ic);
+                        Coef_R[ic] = (*WeightedInterpolationCoef)(i, j, k, nsurf, 1, ic);
+                    }
+                    InterpolationRUVWP5th(Coef_L, PrimPlate_L, PrimHalf_L);
+                    InterpolationRUVWP5th(Coef_R, PrimPlate_R, PrimHalf_R);
+                }                
+
+                for (int m = 0; m <= 4; ++m)
+                {
+                    ql(i - il1, j - jl1, k - kl1, m) = PrimHalf_L[m];
+                    qr(i,       j,       k,       m) = PrimHalf_R[m];
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::GetFaceVariableCorrectionAtPhysicalBoundary(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int nsurf)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D & q = * reinterpret_cast< RDouble4D * > (grid->GetDataPtr("q_FD"));
+    RDouble4D & ql = qlProxy->GetField_STR();
+    RDouble4D & qr = qrProxy->GetField_STR();
+    
+    RDouble4D &xfn  = * (grid->GetFaceNormalX());
+    RDouble4D &yfn  = * (grid->GetFaceNormalY());
+    RDouble4D &zfn  = * (grid->GetFaceNormalZ());
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int viscousType         = parameters->GetViscousType();
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble temperatureWallNonDimensional = wallTemperature / refDimensionalTemperature;
+    
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = bcregion->GetBCType();
+        int nsurf_bc = bcregion->GetFaceDirection() + 1;
+        if (!IsWall(BCType) || nsurf_bc != nsurf)
+        {
+            continue;
+        }
+        int ist, ied, jst, jed, kst, ked;
+        bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+        
+        int il1, jl1, kl1;
+        GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+        int *s_lr3d = bcregion->GetFaceDirectionIndex();
+        int id, jd, kd;
+        GetBCFaceIDX(s_lr3d, id, jd, kd);
+        
+        RDouble q_1st[5];
+        RDouble rtmp, utmp, vtmp, wtmp, ptmp;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    for (int m = 0; m <= 4; ++ m)
+                    {
+                        q_1st[m] = q(i, j, k, m);
+                    }
+                    int ibc = i + id;
+                    int jbc = j + jd;
+                    int kbc = k + kd;
+                    
+                    if (viscousType == INVISCID)
+                    {
+                        RDouble vx  = q_1st[1];
+                        RDouble vy  = q_1st[2];
+                        RDouble vz  = q_1st[3];
+                        
+                        RDouble nxs = xfn(ibc, jbc, kbc, nsurf);
+                        RDouble nys = yfn(ibc, jbc, kbc, nsurf);
+                        RDouble nzs = zfn(ibc, jbc, kbc, nsurf);
+                        
+                        RDouble vn  = nxs * vx + nys * vy + nzs * vz;
+                        
+                        rtmp = q_1st[0];
+                        utmp = vx - nxs * vn;
+                        vtmp = vy - nys * vn;
+                        wtmp = vz - nzs * vn;
+                        ptmp = q_1st[4];
+                    }
+                    else if (wallTemperature <= 0.0)
+                    {
+                        rtmp = q_1st[0];
+                        utmp = 0.0;
+                        vtmp = 0.0;
+                        wtmp = 0.0;
+                        ptmp = q_1st[4];
+                    }
+                    else
+                    {
+                        utmp = 0.0;
+                        vtmp = 0.0;
+                        wtmp = 0.0;
+                        ptmp = q_1st[4];
+                        rtmp = refGama * refMachNumber * refMachNumber * ptmp / temperatureWallNonDimensional;
+                    }
+                    
+                    qr(ibc, jbc, kbc, 0) = rtmp;
+                    qr(ibc, jbc, kbc, 1) = utmp;
+                    qr(ibc, jbc, kbc, 2) = vtmp;
+                    qr(ibc, jbc, kbc, 3) = wtmp;
+                    qr(ibc, jbc, kbc, 4) = ptmp;
+                    
+                    ql(ibc - il1, jbc - jl1, kbc - kl1, 0) = rtmp;
+                    ql(ibc - il1, jbc - jl1, kbc - kl1, 1) = utmp;
+                    ql(ibc - il1, jbc - jl1, kbc - kl1, 2) = vtmp;
+                    ql(ibc - il1, jbc - jl1, kbc - kl1, 3) = wtmp;
+                    ql(ibc - il1, jbc - jl1, kbc - kl1, 4) = ptmp;
+                }
+            }
+        } 
+    }    
+}
+
+void NSSolverStructFD::InterpolationRUVWP5th(RDouble Coef[30], RDouble PrimPlate[5][5], RDouble Primhalf[5])
+{
+    RDouble rBase = PrimPlate[2][0];
+    RDouble pBase = PrimPlate[2][4];
+    RDouble VBase = sqrt(pBase / rBase);
+
+    RDouble rPlate[5];
+    RDouble uPlate[5];
+    RDouble vPlate[5];
+    RDouble wPlate[5];
+    RDouble pPlate[5];
+
+    for (int j = 0; j <= 4; ++ j)
+    {
+        rPlate[j] = PrimPlate[j][0] / rBase;
+        uPlate[j] = PrimPlate[j][1] / VBase;
+        vPlate[j] = PrimPlate[j][2] / VBase;
+        wPlate[j] = PrimPlate[j][3] / VBase;
+        pPlate[j] = PrimPlate[j][4] / pBase;
+    }
+
+    Primhalf[0] = rBase * BasicWeightedInterpolation5th(Coef, rPlate);
+    Primhalf[4] = pBase * BasicWeightedInterpolation5th(Coef, pPlate);
+
+    if (Primhalf[0] < SMALL || Primhalf[4] < SMALL)
+    {
+        Primhalf[0] = PrimPlate[2][0];
+        Primhalf[1] = PrimPlate[2][1];
+        Primhalf[2] = PrimPlate[2][2];
+        Primhalf[3] = PrimPlate[2][3];
+        Primhalf[4] = PrimPlate[2][4];
+        total_negative += 1;
+    }
+    else
+    {
+        Primhalf[1] = VBase * BasicWeightedInterpolation5th(Coef, uPlate);
+        Primhalf[2] = VBase * BasicWeightedInterpolation5th(Coef, vPlate);
+        Primhalf[3] = VBase * BasicWeightedInterpolation5th(Coef, wPlate);
+    }
+}
+
+void NSSolverStructFD::InterpolationRUVWP3rd(RDouble Prim[5][5], RDouble Primhalf[5])
+{
+    RDouble Qk[5];
+
+    for (int m = 0; m <= 4; ++ m)
+    {
+        for (int j = 0; j <= 4; ++ j)
+        {
+            Qk[j] = Prim[j][m];
+        }
+        Primhalf[m] = BasicInterpolation3rd(Qk, m);
+    }
+
+    if (Primhalf[0] < SMALL || Primhalf[4] < SMALL)
+    {
+        Primhalf[0] = Prim[2][0];
+        Primhalf[1] = Prim[2][1];
+        Primhalf[2] = Prim[2][2];
+        Primhalf[3] = Prim[2][3];
+        Primhalf[4] = Prim[2][4];
+        total_negative += 1;
+    }
+}
+
+RDouble NSSolverStructFD::BasicWeightedInterpolation5th(RDouble Coef[30], RDouble QmPlate[5])
+{
+    RDouble g0 = Coef[12] * QmPlate[0] + Coef[13] * QmPlate[1] + Coef[14] * QmPlate[2];
+    RDouble g1 = Coef[15] * QmPlate[1] + Coef[16] * QmPlate[2] + Coef[17] * QmPlate[3];
+    RDouble g2 = Coef[18] * QmPlate[2] + Coef[19] * QmPlate[3] + Coef[20] * QmPlate[4];
+
+    RDouble s0 = Coef[21] * QmPlate[0] + Coef[22] * QmPlate[1] + Coef[23] * QmPlate[2];
+    RDouble s1 = Coef[24] * QmPlate[1] + Coef[25] * QmPlate[2] + Coef[26] * QmPlate[3];
+    RDouble s2 = Coef[27] * QmPlate[2] + Coef[28] * QmPlate[3] + Coef[29] * QmPlate[4];
+
+    RDouble IS0 = s0 * s0 + g0 * g0;
+    RDouble IS1 = s1 * s1 + g1 * g1;
+    RDouble IS2 = s2 * s2 + g2 * g2;
+    
+    RDouble alfa0 = Coef[0] / (IS0 * IS0 + EPSILON) ;
+    RDouble alfa1 = Coef[1] / (IS1 * IS1 + EPSILON) ;
+    RDouble alfa2 = Coef[2] / (IS2 * IS2 + EPSILON) ;
+    
+    RDouble Qhalf0 = Coef[3] * QmPlate[0] + Coef[ 4] * QmPlate[1] + Coef[ 5] * QmPlate[2] ;
+    RDouble Qhalf1 = Coef[6] * QmPlate[1] + Coef[ 7] * QmPlate[2] + Coef[ 8] * QmPlate[3] ;
+    RDouble Qhalf2 = Coef[9] * QmPlate[2] + Coef[10] * QmPlate[3] + Coef[11] * QmPlate[4] ;
+
+    RDouble Qhalf = (alfa0 * Qhalf0 + alfa1 * Qhalf1 + alfa2 * Qhalf2) / (alfa0 + alfa1 + alfa2);
+
+    return Qhalf;
+}
+
+RDouble NSSolverStructFD::BasicInterpolation3rd(RDouble Qp[5], int m)
+{
+    RDouble dql = Qp[2] - Qp[1];
+    RDouble dqr = Qp[3] - Qp[2];
+
+    if(m == 0 || m == 4)
+    {
+        dql = Qp[2] * (dql / (Qp[2] - 0.5 * dql));
+        dqr = Qp[2] * (dqr / (Qp[2] + 0.5 * dqr));
+    }    
+    
+    RDouble ql = Qp[2] + half * Limiter_ThirdSmooth(dqr, dql);
+
+    return ql;
+}
+
+RDouble NSSolverStructFD::Limiter_ThirdSmooth(const RDouble &x, const RDouble &y)
+{
+   const RDouble eps2 = 1.0e-6;
+    RDouble Smooth1 = x * (y * y + 2.0 * eps2) +  y * (2.0 * x * x + eps2);
+    RDouble Smooth2 = 2.0 * x * x - x * y + 2.0 * y * y + 3.0 * eps2;
+    RDouble Smooth = Smooth1 / Smooth2;
+    return  Smooth;
+}
+
+void NSSolverStructFD::GetFaceVariable_HDCS_firstlayerExplicit(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int nsurf)
+{
+    StructGrid * grid = StructGridCast(gridIn);
+    RDouble4D & q = * reinterpret_cast< RDouble4D * > (grid->GetDataPtr("q_FD"));
+    RDouble4D & ql = qlProxy->GetField_STR();
+    RDouble4D & qr = qrProxy->GetField_STR();
+    
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble PrimPlateL[5];
+    RDouble PrimPlateR[5];
+
+    if(nsurf == 1)
+    {
+        int ist = 1;
+        int jst = 1;
+        int kst = 1;
+        int ied = ni;
+        int jed = nj - 1;
+        int ked = nk - 1;
+        if (nk == 1)
+        {
+            kst = 1;
+            ked = 1;
+        }
+        
+        int ibc[2];
+        ibc[0] = ist;
+        ibc[1] = ied;
+        
+        for (int m = 0; m <= 4; ++m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for(int bcindex = 0; bcindex <= 1; ++ bcindex)
+                    {
+                        int i = ibc[bcindex];
+                        
+                        for (int ip = 0; ip <= 4; ++ ip)
+                        {
+                            int iL = i + (ip - 3);
+                            int iR = i + (ip - 2);
+                            
+                            PrimPlateL[ip]     = q(iL, j, k, m);
+                            PrimPlateR[4 - ip] = q(iR, j, k, m);
+                        }
+                        ql(i - 1, j, k, m) = LinearExplicitInterpolation5th(PrimPlateL);
+                        qr(i,     j, k, m) = LinearExplicitInterpolation5th(PrimPlateR);
+                    }
+                }
+            }
+        }
+        
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for(int bcindex = 0; bcindex <= 1; ++ bcindex)
+                {
+                    int i = ibc[bcindex];
+                    
+                    if(ql(i - 1, j, k, 0) < SMALL || ql(i - 1, j, k, 4) < SMALL)
+                    {
+                        total_negative += 1;
+                        ql(i - 1, j, k, 0) = q(i - 1, j, k, 0);
+                        ql(i - 1, j, k, 1) = q(i - 1, j, k, 1);
+                        ql(i - 1, j, k, 2) = q(i - 1, j, k, 2);
+                        ql(i - 1, j, k, 3) = q(i - 1, j, k, 3);
+                        ql(i - 1, j, k, 4) = q(i - 1, j, k, 4);
+                    }
+                    
+                    if(qr(i, j, k, 0) < SMALL || qr(i, j, k, 4) < SMALL)
+                    {
+                        total_negative += 1;
+                        qr(i, j, k, 0) = q(i, j, k, 0);
+                        qr(i, j, k, 1) = q(i, j, k, 1);
+                        qr(i, j, k, 2) = q(i, j, k, 2);
+                        qr(i, j, k, 3) = q(i, j, k, 3);
+                        qr(i, j, k, 4) = q(i, j, k, 4);
+                    }
+                }
+            }
+        }
+    }
+    else if(nsurf == 2)
+    {
+        int ist = 1;
+        int jst = 1;
+        int kst = 1;
+        int ied = ni - 1;
+        int jed = nj;
+        int ked = nk - 1;
+        if (nk == 1)
+        {
+            kst = 1;
+            ked = 1;
+        }
+        
+        int jbc[2];
+        jbc[0] = jst;
+        jbc[1] = jed;
+        
+        for (int m = 0; m <= 4; ++m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    for(int bcindex = 0; bcindex <= 1; ++ bcindex)
+                    {
+                        int j = jbc[bcindex];
+                        
+                        for (int ip = 0; ip <= 4; ++ ip)
+                        {
+                            int jL = j + (ip - 3);
+                            int jR = j + (ip - 2);
+                            
+                            PrimPlateL[ip]     = q(i, jL, k, m);
+                            PrimPlateR[4 - ip] = q(i, jR, k, m);
+                        }
+                        ql(i, j - 1, k, m) = LinearExplicitInterpolation5th(PrimPlateL);
+                        qr(i, j,     k, m) = LinearExplicitInterpolation5th(PrimPlateR);
+                    }
+                }
+            }
+        }
+        
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for(int bcindex = 0; bcindex <= 1; ++ bcindex)
+                {
+                    int j = jbc[bcindex];
+                    
+                    if(ql(i, j - 1, k, 0) < SMALL || ql(i, j - 1, k, 4) < SMALL)
+                    {
+                        total_negative += 1;
+                        ql(i, j - 1, k, 0) = q(i, j - 1, k, 0);
+                        ql(i, j - 1, k, 1) = q(i, j - 1, k, 1);
+                        ql(i, j - 1, k, 2) = q(i, j - 1, k, 2);
+                        ql(i, j - 1, k, 3) = q(i, j - 1, k, 3);
+                        ql(i, j - 1, k, 4) = q(i, j - 1, k, 4);
+                    }
+                    
+                    if(qr(i, j, k, 0) < SMALL || qr(i, j, k, 4) < SMALL)
+                    {
+                        total_negative += 1;
+                        qr(i, j, k, 0) = q(i, j, k, 0);
+                        qr(i, j, k, 1) = q(i, j, k, 1);
+                        qr(i, j, k, 2) = q(i, j, k, 2);
+                        qr(i, j, k, 3) = q(i, j, k, 3);
+                        qr(i, j, k, 4) = q(i, j, k, 4);
+                    }
+                }
+            }
+        }
+    }
+    else
+    {
+        int ist = 1;
+        int jst = 1;
+        int kst = 1;
+        int ied = ni - 1;
+        int jed = nj - 1;
+        int ked = nk;
+        
+        int kbc[2];
+        kbc[0] = kst;
+        kbc[1] = ked;
+        
+        for (int m = 0; m <= 4; ++m)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    for(int bcindex = 0; bcindex <= 1; ++ bcindex)
+                    {
+                        int k = kbc[bcindex];
+                        
+                        for (int ip = 0; ip <= 4; ++ ip)
+                        {
+                            int kL = k + (ip - 3);
+                            int kR = k + (ip - 2);
+                            
+                            PrimPlateL[ip]     = q(i, j, kL, m);
+                            PrimPlateR[4 - ip] = q(i, j, kR, m);
+                        }
+                        ql(i, j, k - 1, m) = LinearExplicitInterpolation5th(PrimPlateL);
+                        qr(i, j, k,     m) = LinearExplicitInterpolation5th(PrimPlateR);
+                    }
+                }
+            }
+        }
+        
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for(int bcindex = 0; bcindex <= 1; ++ bcindex)
+                {
+                    int k = kbc[bcindex];
+                    
+                    if(ql(i, j, k - 1, 0) < SMALL || ql(i, j, k - 1, 4) < SMALL)
+                    {
+                        total_negative += 1;
+                        ql(i, j, k - 1, 0) = q(i, j, k - 1, 0);
+                        ql(i, j, k - 1, 1) = q(i, j, k - 1, 1);
+                        ql(i, j, k - 1, 2) = q(i, j, k - 1, 2);
+                        ql(i, j, k - 1, 3) = q(i, j, k - 1, 3);
+                        ql(i, j, k - 1, 4) = q(i, j, k - 1, 4);
+                    }
+                    
+                    if(qr(i, j, k, 0) < SMALL || qr(i, j, k, 4) < SMALL)
+                    {
+                        total_negative += 1;
+                        qr(i, j, k, 0) = q(i, j, k, 0);
+                        qr(i, j, k, 1) = q(i, j, k, 1);
+                        qr(i, j, k, 2) = q(i, j, k, 2);
+                        qr(i, j, k, 3) = q(i, j, k, 3);
+                        qr(i, j, k, 4) = q(i, j, k, 4);
+                    }
+                }
+            }
+        }
+    }
+
+    
+}
+
+void NSSolverStructFD::GetFaceVariable_HDCS_otherlayerImplicit(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int nsurf)
+{
+    if(nsurf == 1)
+    {
+        GetFaceVariable_HDCS_otherlayerImplicit_nsurf1(gridIn, qlProxy, qrProxy);
+    }
+    else if(nsurf == 2)
+    {
+        GetFaceVariable_HDCS_otherlayerImplicit_nsurf2(gridIn, qlProxy, qrProxy);
+    }
+    else
+    {
+        GetFaceVariable_HDCS_otherlayerImplicit_nsurf3(gridIn, qlProxy, qrProxy);
+    }
+}
+
+void NSSolverStructFD::GetFaceVariable_HDCS_otherlayerImplicit_nsurf1(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy)
+{
+    StructGrid * grid = StructGridCast(gridIn);
+    RDouble4D & q = * reinterpret_cast< RDouble4D * > (grid->GetDataPtr("q_FD"));
+    RDouble4D & ql = qlProxy->GetField_STR();
+    RDouble4D & qr = qrProxy->GetField_STR();
+
+    const RDouble BL = 0.5;
+    const RDouble BR = 3.0 / 14.0;
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni;
+    int jed = nj - 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    RDouble *EquivalentPrimhalfL = new RDouble[ni+1];
+    RDouble *EquivalentPrimhalfR = new RDouble[ni+1];
+
+    RDouble PrimPlateL[5];
+    RDouble PrimPlateR[5];
+
+    int ibc[2];
+    ibc[0] = ist;
+    ibc[1] = ied;
+
+    for (int m = 0; m <= 4; ++m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for(int bcindex = 0; bcindex <= 1; ++ bcindex)
+                {
+                    int i = ibc[bcindex];
+                    
+                    EquivalentPrimhalfL[i] = ql(i - 1, j, k, m);
+                    EquivalentPrimhalfR[i] = qr(i,     j, k, m);
+                }
+                for (int i = ist+1; i <= ied -1; ++ i)
+                {
+                    for (int ip = 0; ip <= 4; ++ ip)
+                    {
+                        int iL = i + (ip - 3);
+                        int iR = i + (ip - 2);
+
+                        PrimPlateL[ip]     = q(iL, j, k, m);
+                        PrimPlateR[4 - ip] = q(iR, j, k, m);
+                    }
+                    EquivalentPrimhalfL[i] = LinearImplicitInterpolation7th(PrimPlateL);
+                    EquivalentPrimhalfR[i] = LinearImplicitInterpolation7th(PrimPlateR);
+                }
+
+                SolveTridiagonalEquations(ni, BL, BR, EquivalentPrimhalfL);
+                SolveTridiagonalEquations(ni, BR, BL, EquivalentPrimhalfR);
+
+                for (int i = ist + 1; i <= ied - 1; ++ i)
+                {
+                    ql(i - 1, j, k, m) = EquivalentPrimhalfL[i];
+                    qr(i,     j, k, m) = EquivalentPrimhalfR[i];
+                }
+            }
+        }
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist + 1; i <= ied - 1; ++ i)
+            {
+                if(ql(i - 1, j, k, 0) < SMALL || ql(i - 1, j, k, 4) < SMALL)
+                {
+                    total_negative += 1;
+                    ql(i - 1, j, k, 0) = q(i - 1, j, k, 0);
+                    ql(i - 1, j, k, 1) = q(i - 1, j, k, 1);
+                    ql(i - 1, j, k, 2) = q(i - 1, j, k, 2);
+                    ql(i - 1, j, k, 3) = q(i - 1, j, k, 3);
+                    ql(i - 1, j, k, 4) = q(i - 1, j, k, 4);
+                }
+
+                if(qr(i, j, k, 0) < SMALL || qr(i, j, k, 4) < SMALL)
+                {
+                    total_negative += 1;
+                    qr(i, j, k, 0) = q(i, j, k, 0);
+                    qr(i, j, k, 1) = q(i, j, k, 1);
+                    qr(i, j, k, 2) = q(i, j, k, 2);
+                    qr(i, j, k, 3) = q(i, j, k, 3);
+                    qr(i, j, k, 4) = q(i, j, k, 4);
+                }
+            }
+        }
+    }
+    delete []EquivalentPrimhalfL;
+    delete []EquivalentPrimhalfR;
+}
+
+void NSSolverStructFD::GetFaceVariable_HDCS_otherlayerImplicit_nsurf2(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy)
+{
+    StructGrid * grid = StructGridCast(gridIn);
+    RDouble4D & q = * reinterpret_cast< RDouble4D * > (grid->GetDataPtr("q_FD"));
+    RDouble4D & ql = qlProxy->GetField_STR();
+    RDouble4D & qr = qrProxy->GetField_STR();
+
+    const RDouble BL = 0.5;
+    const RDouble BR = 3.0 / 14.0;
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni - 1;
+    int jed = nj;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    RDouble *EquivalentPrimhalfL = new RDouble[nj+1];
+    RDouble *EquivalentPrimhalfR = new RDouble[nj+1];
+
+    RDouble PrimPlateL[5];
+    RDouble PrimPlateR[5];
+
+    int jbc[2];
+    jbc[0] = jst;
+    jbc[1] = jed;
+
+    for (int m = 0; m <= 4; ++m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for(int bcindex = 0; bcindex <= 1; ++ bcindex)
+                {
+                    int j = jbc[bcindex];
+
+                    EquivalentPrimhalfL[j] = ql(i, j - 1, k, m);
+                    EquivalentPrimhalfR[j] = qr(i, j,     k, m);
+                }
+                for (int j = jst+1; j <= jed -1; ++ j)
+                {
+                    for (int ip = 0; ip <= 4; ++ ip)
+                    {
+                        int jL = j + (ip - 3);
+                        int jR = j + (ip - 2);
+
+                        PrimPlateL[ip]     = q(i, jL, k, m);
+                        PrimPlateR[4 - ip] = q(i, jR, k, m);
+                    }
+                    EquivalentPrimhalfL[j] = LinearImplicitInterpolation7th(PrimPlateL);
+                    EquivalentPrimhalfR[j] = LinearImplicitInterpolation7th(PrimPlateR);
+                }
+
+                SolveTridiagonalEquations(nj, BL, BR, EquivalentPrimhalfL);
+                SolveTridiagonalEquations(nj, BR, BL, EquivalentPrimhalfR);
+
+                for (int j = jst + 1; j <= jed - 1; ++ j)
+                {
+                    ql(i, j - 1, k, m) = EquivalentPrimhalfL[j];
+                    qr(i, j,     k, m) = EquivalentPrimhalfR[j];
+                }
+            }
+        }
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst + 1; j <= jed - 1; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                if(ql(i, j - 1, k, 0) < SMALL || ql(i, j - 1, k, 4) < SMALL)
+                {
+                    total_negative += 1;
+                    ql(i, j - 1, k, 0) = q(i, j - 1, k, 0);
+                    ql(i, j - 1, k, 1) = q(i, j - 1, k, 1);
+                    ql(i, j - 1, k, 2) = q(i, j - 1, k, 2);
+                    ql(i, j - 1, k, 3) = q(i, j - 1, k, 3);
+                    ql(i, j - 1, k, 4) = q(i, j - 1, k, 4);
+                }
+
+                if(qr(i, j, k, 0) < SMALL || qr(i, j, k, 4) < SMALL)
+                {
+                    total_negative += 1;
+                    qr(i, j, k, 0) = q(i, j, k, 0);
+                    qr(i, j, k, 1) = q(i, j, k, 1);
+                    qr(i, j, k, 2) = q(i, j, k, 2);
+                    qr(i, j, k, 3) = q(i, j, k, 3);
+                    qr(i, j, k, 4) = q(i, j, k, 4);
+                }
+            }
+        }
+    }
+    delete []EquivalentPrimhalfL;
+    delete []EquivalentPrimhalfR;
+}
+
+void NSSolverStructFD::GetFaceVariable_HDCS_otherlayerImplicit_nsurf3(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy)
+{
+    StructGrid * grid = StructGridCast(gridIn);
+    RDouble4D & q = * reinterpret_cast< RDouble4D * > (grid->GetDataPtr("q_FD"));
+    RDouble4D & ql = qlProxy->GetField_STR();
+    RDouble4D & qr = qrProxy->GetField_STR();
+
+    const RDouble BL = 0.5;
+    const RDouble BR = 3.0 / 14.0;
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni - 1;
+    int jed = nj - 1;
+    int ked = nk;
+
+    RDouble *EquivalentPrimhalfL = new RDouble[nk+1];
+    RDouble *EquivalentPrimhalfR = new RDouble[nk+1];
+
+    RDouble PrimPlateL[5];
+    RDouble PrimPlateR[5];
+
+    int kbc[2];
+    kbc[0] = kst;
+    kbc[1] = ked;
+
+    for (int m = 0; m <= 4; ++m)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for(int bcindex = 0; bcindex <= 1; ++ bcindex)
+                {
+                    int k = kbc[bcindex];
+
+                    EquivalentPrimhalfL[k] = ql(i, j, k - 1, m);
+                    EquivalentPrimhalfR[k] = qr(i, j, k,     m);
+                }
+                for (int k = kst+1; k <= ked -1; ++ k)
+                {
+                    for (int ip = 0; ip <= 4; ++ ip)
+                    {
+                        int kL = k + (ip - 3);
+                        int kR = k + (ip - 2);
+
+                        PrimPlateL[ip]     = q(i, j, kL, m);
+                        PrimPlateR[4 - ip] = q(i, j, kR, m);
+                    }
+                    EquivalentPrimhalfL[k] = LinearImplicitInterpolation7th(PrimPlateL);
+                    EquivalentPrimhalfR[k] = LinearImplicitInterpolation7th(PrimPlateR);
+                }
+
+                SolveTridiagonalEquations(nk, BL, BR, EquivalentPrimhalfL);
+                SolveTridiagonalEquations(nk, BR, BL, EquivalentPrimhalfR);
+
+                for (int k = kst + 1; k <= ked - 1; ++ k)
+                {
+                    ql(i, j, k - 1, m) = EquivalentPrimhalfL[k];
+                    qr(i, j, k,     m) = EquivalentPrimhalfR[k];
+                }
+            }
+        }
+    }
+
+    for (int k = kst + 1; k <= ked - 1; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                if(ql(i, j, k - 1, 0) < SMALL || ql(i, j, k - 1, 4) < SMALL)
+                {
+                    total_negative += 1;
+                    ql(i, j, k - 1, 0) = q(i, j, k - 1, 0);
+                    ql(i, j, k - 1, 1) = q(i, j, k - 1, 1);
+                    ql(i, j, k - 1, 2) = q(i, j, k - 1, 2);
+                    ql(i, j, k - 1, 3) = q(i, j, k - 1, 3);
+                    ql(i, j, k - 1, 4) = q(i, j, k - 1, 4);
+                }
+
+                if(qr(i, j, k, 0) < SMALL || qr(i, j, k, 4) < SMALL)
+                {
+                    total_negative += 1;
+                    qr(i, j, k, 0) = q(i, j, k, 0);
+                    qr(i, j, k, 1) = q(i, j, k, 1);
+                    qr(i, j, k, 2) = q(i, j, k, 2);
+                    qr(i, j, k, 3) = q(i, j, k, 3);
+                    qr(i, j, k, 4) = q(i, j, k, 4);
+                }
+            }
+        }
+    }
+    delete []EquivalentPrimhalfL;
+    delete []EquivalentPrimhalfR;
+}
+
+RDouble NSSolverStructFD::LinearExplicitInterpolation5th(RDouble prim[5])
+{
+    RDouble primhalf = (3.0 * prim[0] - 20.0 * prim[1] + 90.0 * prim[2] + 60.0 * prim[3] - 5.0 * prim[4]) / 128.0;
+
+    return primhalf;
+}
+
+RDouble NSSolverStructFD::LinearImplicitInterpolation7th(RDouble prim[5])
+{
+    const RDouble a = - 1.0 / 224.0;
+    const RDouble b =   1.0 /   8.0;
+    const RDouble c =  15.0 /  16.0;
+    const RDouble d =   5.0 /   8.0;
+    const RDouble e =   1.0 /  32.0;
+
+    RDouble primhalf = a * prim[0] + b * prim[1] + c * prim[2] + d * prim[3] + e * prim[4];
+
+    return primhalf;
+}
+
+void NSSolverStructFD::SolveTridiagonalEquations(int Nod, RDouble BL, RDouble BR, RDouble *F)
+{
+    RDouble *C = new RDouble[Nod+1];
+
+    C[2] = BR;
+    F[2] = F[2] - BL * F[1];
+
+    for(int k = 3; k <= Nod - 1; ++ k)
+    {
+        RDouble Inv = 1.0 / (1.0 - BL * C[k-1]);
+        C[k] = Inv * BR;
+        F[k] = Inv * (F[k] - BL * F[k-1]);
+    }
+
+    for(int k = Nod - 1; k >= 2; -- k)
+    {
+        F[k] = F[k] - C[k] * F[k+1];
+    }
+    delete []C;
+}
+
+void NSSolverStructFD::GetFaceInviscidFlux(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, FieldProxy *fluxProxy, int nsurf)
+{
+    if (fluxname.substr(0, 3) == "roe")
+    {
+        FluxRoe(gridIn, qlProxy, qrProxy, fluxProxy, nsurf);
+    }
+    else
+    {
+        FluxSteger(gridIn, qlProxy, qrProxy, fluxProxy, nsurf);
+    }
+}
+
+void NSSolverStructFD::FluxSteger(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, FieldProxy *fluxProxy, int nsurf)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &ql = qlProxy->GetField_STR();
+    RDouble4D &qr = qrProxy->GetField_STR();
+    RDouble4D &Flux_Steger = fluxProxy->GetField_STR();
+
+    RDouble4D &xfn  = *(grid->GetFaceNormalX());
+    RDouble4D &yfn  = *(grid->GetFaceNormalY());
+    RDouble4D &zfn  = *(grid->GetFaceNormalZ());
+    RDouble4D &area = *(grid->GetFaceArea());
+
+    const RDouble gama = 1.4;
+    const RDouble epsilon_steger = 0.12 * 0.12;
+
+    using namespace IDX;
+    
+    int il1 = 0, jl1 = 0, kl1 = 0;
+    GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+    int ist = 0, jst = 0, kst = 0;
+    int ied = 0, jed = 0, ked = 0;
+
+    if(solvername.substr(0, 4) == "WCNS")
+    {
+        ist = 1 - il1;
+        jst = 1 - jl1;
+        kst = 1 - kl1;
+        ied = ni - 1 + 2*il1;
+        jed = nj - 1 + 2*jl1;
+        ked = nk - 1 + 2*kl1;
+        if (nk == 1)
+        {
+            kst = 1;
+            ked = 1;
+        }
+    }
+    else if(solvername.substr(0, 4) == "HDCS")
+    {
+        ist = 1;
+        jst = 1;
+        kst = 1;
+        ied = ni - 1 + il1;
+        jed = nj - 1 + jl1;
+        ked = nk - 1 + kl1;
+        if (nk == 1)
+        {
+            kst = 1;
+            ked = 1;
+        }
+    }
+    
+
+    RDouble fl[5] = {0};
+    RDouble fr[5] = {0};
+    RDouble priml[5] = {0};
+    RDouble primr[5] = {0};
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int m = 0; m < 5; ++ m)
+                {
+                    priml[m] = ql(i - il1, j - jl1, k - kl1, m);
+                    primr[m] = qr(i,       j,       k,       m);
+                }
+
+                RDouble ds = area(i, j, k, nsurf);
+                RDouble nx = xfn (i, j, k, nsurf);
+                RDouble ny = yfn (i, j, k, nsurf);
+                RDouble nz = zfn (i, j, k, nsurf);
+
+                RDouble rl = priml[IR];
+                RDouble ul = priml[IU];
+                RDouble vl = priml[IV];
+                RDouble wl = priml[IW];
+                RDouble pl = priml[IP];
+                RDouble hint_l = (gama / (gama - one)) * (pl / rl);
+                RDouble hl = hint_l + half * (ul * ul + vl * vl + wl * wl);
+                RDouble el = hl - pl / (rl + SMALL);
+                RDouble vnl = nx * ul + ny * vl + nz * wl;
+                RDouble cl  = sqrt(ABS(gama * pl / rl));
+                RDouble eigl1 = vnl      ;
+                RDouble eigl2 = vnl + cl ;
+                RDouble eigl3 = vnl - cl ;
+                
+                RDouble rr = primr[IR];
+                RDouble ur = primr[IU];
+                RDouble vr = primr[IV];
+                RDouble wr = primr[IW];
+                RDouble pr = primr[IP];
+                RDouble hint_r = (gama / (gama - one)) * (pr / rr);
+                RDouble hr = hint_r + half * (ur * ur + vr * vr + wr * wr);
+                RDouble er = hr - pr / (rr + SMALL);
+                RDouble vnr = nx * ur + ny * vr + nz * wr;
+                RDouble cr  = sqrt(ABS(gama * pr / rr)); 
+                RDouble eigr1 = vnr      ;
+                RDouble eigr2 = vnr + cr ;
+                RDouble eigr3 = vnr - cr ;
+                
+                eigl1 = half * (eigl1 +  sqrt (eigl1 * eigl1 + epsilon_steger));
+                eigl2 = half * (eigl2 +  sqrt (eigl2 * eigl2 + epsilon_steger));
+                eigl3 = half * (eigl3 +  sqrt (eigl3 * eigl3 + epsilon_steger)); 
+                
+                eigr1 = half * (eigr1 -  sqrt (eigr1 * eigr1 + epsilon_steger));
+                eigr2 = half * (eigr2 -  sqrt (eigr2 * eigr2 + epsilon_steger));
+                eigr3 = half * (eigr3 -  sqrt (eigr3 * eigr3 + epsilon_steger));
+                
+                RDouble xil1 = half * (eigl1 + eigl1 - eigl2 - eigl3) / gama;
+                RDouble xil2 = half * (eigl2 - eigl3) * cl / gama;
+                RDouble eig_xil = eigl1 - xil1;
+
+                RDouble xir1 = half * (eigr1 + eigr1 - eigr2 - eigr3) / gama;
+                RDouble xir2 = half * (eigr2 - eigr3) * cr / gama;
+                RDouble eig_xir = eigr1 - xir1;
+                
+                fl[IR ] = rl * (eig_xil);
+                fl[IRU] = rl * (eig_xil * ul + xil2 * nx);
+                fl[IRV] = rl * (eig_xil * vl + xil2 * ny);
+                fl[IRW] = rl * (eig_xil * wl + xil2 * nz);
+                fl[IRE] = rl * (eigl1   * el - xil1 * hl + xil2 * vnl);  
+                
+                fr[IR ] = rr * (eig_xir);
+                fr[IRU] = rr * (eig_xir * ur + xir2 * nx);
+                fr[IRV] = rr * (eig_xir * vr + xir2 * ny);
+                fr[IRW] = rr * (eig_xir * wr + xir2 * nz);
+                fr[IRE] = rr * (eigr1   * er - xir1 * hr + xir2 * vnr);
+                
+                for (int m = 0; m < 5; ++ m)
+                {
+                    Flux_Steger(i, j, k, m) = (fl[m] + fr[m]) * ds;
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::FluxRoe(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, FieldProxy *fluxProxy, int nsurf)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+    int nl = 5;
+
+    RDouble4D &ql = qlProxy->GetField_STR();
+    RDouble4D &qr = qrProxy->GetField_STR();
+    RDouble4D &Flux_Roe = fluxProxy->GetField_STR();
+
+    RDouble4D &xfn  = *(grid->GetFaceNormalX());
+    RDouble4D &yfn  = *(grid->GetFaceNormalY());
+    RDouble4D &zfn  = *(grid->GetFaceNormalZ());
+    RDouble4D &area = *(grid->GetFaceArea());
+    RDouble KX = 0, KY = 0, KZ = 0, KA = 0;
+
+    const RDouble gama = 1.4;
+    const RDouble K1 = 0.25;
+    const RDouble K2 =  5.0;
+    const RDouble K3 = 15.0;
+    RDouble3D &rtem = * reinterpret_cast< RDouble3D * > (grid->GetDataPtr("rtem"));
+
+    using namespace IDX;
+    
+    int il1 = 0, jl1 = 0, kl1 = 0;
+    GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+    int ist = 0, jst = 0, kst = 0;
+    int ied = 0, jed = 0, ked = 0;
+
+    if(solvername.substr(0, 4) == "WCNS")
+    {
+        ist = 1 - il1;
+        jst = 1 - jl1;
+        kst = 1 - kl1;
+        ied = ni - 1 + 2*il1;
+        jed = nj - 1 + 2*jl1;
+        ked = nk - 1 + 2*kl1;
+        if (nk == 1)
+        {
+            kst = 1;
+            ked = 1;
+        }
+    }
+    else if(solvername.substr(0, 4) == "HDCS")
+    {
+        ist = 1;
+        jst = 1;
+        kst = 1;
+        ied = ni - 1 + il1;
+        jed = nj - 1 + jl1;
+        ked = nk - 1 + kl1;
+        if (nk == 1)
+        {
+            kst = 1;
+            ked = 1;
+        }
+    }
+
+    RDouble *flux  = new RDouble[nl]();
+    RDouble *priml = new RDouble[nl]();
+    RDouble *primr = new RDouble[nl]();
+    
+    RDouble RRL = 0,UUL = 0,VVL = 0,WWL = 0,PPL = 0,HHL = 0,KPL = 0;
+    RDouble RRR = 0,UUR = 0,VVR = 0,WWR = 0,PPR = 0,HHR = 0,KPR = 0;
+    RDouble RAT = 0,RCF = 0,RF = 0,UF = 0,VF = 0,WF = 0,HF = 0;
+    RDouble VN = 0,RVN = 0,DVN = 0;
+    RDouble U2 = 0,A2 = 0,AF = 0;
+    RDouble DR = 0,DU = 0,DV = 0,DW = 0,DP = 0;
+    RDouble LA1 = 0,LA3 = 0,LA5 = 0;
+    RDouble DLP = 0,DLR = 0;
+    RDouble MF = 0,CP = 0,LAM = 0,ESP1 = 0,ESP3 = 0,ESP5 = 0;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int m = 0; m < nl; ++ m)
+                {
+                    priml[m] = ql(i - il1, j - jl1, k - kl1, m);
+                    primr[m] = qr(i,       j,       k,       m);
+                }
+
+                KA = area(i, j, k, nsurf);
+                KX = xfn (i, j, k, nsurf);
+                KY = yfn (i, j, k, nsurf);
+                KZ = zfn (i, j, k, nsurf);
+
+                KPL = rtem(i - il1, j - jl1, k - kl1);
+                KPR = rtem(i, j, k);
+
+                RRL = priml[IR];
+                UUL = priml[IU];
+                VVL = priml[IV];
+                WWL = priml[IW];
+                PPL = priml[IP];
+                
+                RRR = primr[IR];
+                UUR = primr[IU];
+                VVR = primr[IV];
+                WWR = primr[IW];
+                PPR = primr[IP];
+
+                RAT = sqrt(RRR / RRL);
+                RCF = one / (one + RAT);
+                
+                RF = sqrt(RRL * RRR);
+                UF = (UUL + UUR * RAT) * RCF;
+                VF = (VVL + VVR * RAT) * RCF;
+                WF = (WWL + WWR * RAT) * RCF;
+                
+                HHL = (gama / (gama - one)) * PPL / (RRL + SMALL) + half * (UUL * UUL + VVL * VVL + WWL * WWL);
+                HHR = (gama / (gama - one)) * PPR / (RRR + SMALL) + half * (UUR * UUR + VVR * VVR + WWR * WWR);
+                HF = (HHL + HHR * RAT) * RCF;
+                
+                //! Left full flux.
+                VN  = KX * UUL + KY * VVL + KZ * WWL;
+                RVN = VN * RRL;
+
+                flux[IR ] = RVN                 ;
+                flux[IRU] = RVN * UUL + KX * PPL;
+                flux[IRV] = RVN * VVL + KY * PPL;
+                flux[IRW] = RVN * WWL + KZ * PPL;
+                flux[IRE] = RVN * HHL;
+                
+                //! Right full flux.
+                VN  = KX * UUR + KY * VVR + KZ * WWR;
+                RVN = VN * RRR;
+                
+                flux[IR ] += RVN                 ;
+                flux[IRU] += RVN * UUR + KX * PPR;
+                flux[IRV] += RVN * VVR + KY * PPR;
+                flux[IRW] += RVN * WWR + KZ * PPR;
+                flux[IRE] += RVN * HHR;
+
+                //! Delta flux.
+                U2 = half * (UF * UF + VF * VF + WF * WF);
+                A2 = (gama - one) * (HF - U2);
+                AF = sqrt(A2);
+                
+                DR = RRR - RRL;
+                DU = UUR - UUL;
+                DV = VVR - VVL;
+                DW = WWR - WWL;
+                DP = PPR - PPL;
+                
+                VN  = KX * UF + KY * VF + KZ * WF;
+                DVN = KX * DU + KY * DV + KZ * DW;
+                
+                LA1 = abs(VN - AF);
+                LA3 = abs(VN);
+                LA5 = abs(VN + AF);
+                
+                //! Delta flux: entropy fix.
+                MF   = sqrt (UF * UF + VF * VF + WF * WF) / (AF + SMALL);
+                CP   = half * (KPL + KPR) / MAX(one,MF);
+                LAM  = MAX(LA1, LA5);
+                ESP1 = (K1 + K2 * CP) * LAM;
+                ESP3 =        K3 * CP   * LAM;
+                ESP5 =  ESP1;
+                
+                if (LA1 < ESP1)
+                {
+                    LA1 = half * (LA1 * LA1 + ESP1 * ESP1) / (ESP1 + SMALL);
+                }
+                if (LA3 < ESP3)
+                {
+                    LA3 = half * (LA3 * LA3 + ESP3 * ESP3) / (ESP3 + SMALL);
+                }
+                if (LA5 < ESP5)
+                {
+                    LA5 = half * (LA5 * LA5 + ESP5 * ESP5) / (ESP5 + SMALL);
+                }
+                
+                //! Delta flux: LA1 & LA5.
+                LA1 *= half * (DP - RF * AF * DVN) / (A2  + SMALL);
+                LA5 *= half * (DP + RF * AF * DVN) / (A2  + SMALL);
+                
+                flux[IR ] -= LA1                    + LA5                   ;
+                flux[IRU] -= LA1 * (UF - KX * AF) + LA5 * (UF + KX * AF);
+                flux[IRV] -= LA1 * (VF - KY * AF) + LA5 * (VF + KY * AF);
+                flux[IRW] -= LA1 * (WF - KZ * AF) + LA5 * (WF + KZ * AF);
+                flux[IRE] -= LA1 * (HF - VN * AF) + LA5 * (HF + VN * AF);
+                
+                //! Delta flux: LA3.
+                DLP = LA3 * (DR - DP / (A2  + SMALL));
+                DLR = LA3 * RF;
+                
+                flux[IR ] -= DLP;
+                flux[IRU] -= DLP * UF + DLR * (- KX * DVN + DU);
+                flux[IRV] -= DLP * VF + DLR * (- KY * DVN + DV);
+                flux[IRW] -= DLP * WF + DLR * (- KZ * DVN + DW);
+                flux[IRE] -= DLP * U2 + DLR * (- VN * DVN + UF * DU + VF * DV + WF * DW);
+                                
+                for (int m = 0; m < nl; ++ m)
+                {
+                    Flux_Roe(i, j, k, m) = flux[m] * half * KA;
+                }
+            }
+        }
+    }
+    delete [] flux;    flux = NULL;
+    delete [] priml;    priml = NULL;
+    delete [] primr;    primr = NULL;
+}
+
+void NSSolverStructFD::FluxDifference(Grid *gridIn, FieldProxy *fluxProxy, int nsurf)
+{
+    if (solvername.substr(0, 4) == "WCNS")
+    {
+        FluxDifference_WCNS(gridIn, fluxProxy, nsurf);
+    }
+    else if(solvername.substr(0, 4) == "HDCS")
+    {
+        FluxDifference_HDCS(gridIn, fluxProxy, nsurf);
+    }
+    else
+    {
+        FluxDifference_WCNS(gridIn, fluxProxy, nsurf);
+    }
+}
+
+void NSSolverStructFD::FluxDifference_WCNS(Grid *gridIn, FieldProxy *fluxProxy, int nsurf)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+    RDouble4D &res  = * reinterpret_cast< RDouble4D * > (grid->GetDataPtr("res"));
+    
+    int il1, jl1, kl1;
+    GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+    int mst = 0;
+    int med = 4;
+
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni - 1;
+    int jed = nj - 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        ked = 1;
+    } 
+
+    Int1D *DiffOrder;
+    if(nsurf == 1)
+    {
+        DiffOrder = grid->DiscretePrecisionKXI;
+    }
+    else if(nsurf == 2)
+    {
+        DiffOrder = grid->DiscretePrecisionETA;
+    }
+    else
+    {
+        DiffOrder = grid->DiscretePrecisionCTA;
+    }
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble f0 = flux(i - il1,     j - jl1,     k - kl1,     m);
+                    RDouble f1 = flux(i,           j,           k,           m);
+                    RDouble f2 = flux(i + il1,     j + jl1,     k + kl1,     m);
+                    RDouble f3 = flux(i + il1 * 2, j + jl1 * 2, k + kl1 * 2, m);
+
+                    int localcellID = i * il1 + j * jl1 + k * kl1;
+
+                    if((*DiffOrder)(localcellID) == 2)
+                    {
+                        res(i, j, k, m) -= (f2 - f1);
+                    }
+                    else
+                    {
+                        res(i, j, k, m) -= (f2 - f1) * 9.0 / 8.0 - (f3 - f0) / 24.0;
+                    }                    
+                }
+            }
+        }
+    }    
+}
+
+void NSSolverStructFD::FluxDifference_HDCS(Grid *gridIn, FieldProxy *fluxProxy, int nsurf)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+    
+    RDouble4D &faceflux = fluxProxy->GetField_STR();
+    RDouble4D &Cellflux = CellfluxProxy->GetField_STR();
+    RDouble4D &res  = * reinterpret_cast< RDouble4D * > (grid->GetDataPtr("res"));
+
+    const RDouble alfa_sixth =  64.0 / 45.0;
+    const RDouble    a_sixth = - 2.0 / 9.0;
+    const RDouble    b_sixth =   1.0 / 180.0;
+
+    int il1, jl1, kl1;
+    GetNsurfIndex(nsurf, il1, jl1, kl1);
+    
+    int mst = 0;
+    int med = 4;
+
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni - 1;
+    int jed = nj - 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        ked = 1;
+    }
+
+    for (int m = mst; m <= med; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble leftface  = faceflux(i,           j,           k,           m);
+                    RDouble rightface = faceflux(i + il1,     j + jl1,     k + kl1,     m);
+
+                    RDouble celll1 = Cellflux(i - il1, j - jl1, k - kl1, m);
+                    RDouble cellr1 = Cellflux(i + il1, j + jl1, k + kl1, m);
+
+                    RDouble celll2 = Cellflux(i - 2*il1, j - 2*jl1, k - 2*kl1, m);
+                    RDouble cellr2 = Cellflux(i + 2*il1, j + 2*jl1, k + 2*kl1, m);
+
+                    res(i, j, k, m) -= alfa_sixth * (rightface - leftface) + a_sixth * (cellr1 - celll1) + b_sixth * (cellr2 - celll2);
+                }
+            }
+        }
+    }
+}
+
+
+void NSSolverStructFD::GetCellInviscidFlux(Grid *gridIn, int nsurf)
+{
+    if(solvername.substr(0, 4) != "HDCS")
+    {
+        return;
+    }
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+    
+    RDouble4D &q = * reinterpret_cast< RDouble4D * > (grid->GetDataPtr("q_FD"));
+    RDouble4D &Cellflux = CellfluxProxy->GetField_STR();
+    
+    RDouble4D &xfv  = *(grid->GetFaceVectorX());
+    RDouble4D &yfv  = *(grid->GetFaceVectorY());
+    RDouble4D &zfv  = *(grid->GetFaceVectorZ());
+    
+    const RDouble gama = 1.4;
+    
+    using namespace IDX;
+    
+    int il1, jl1, kl1;
+    GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+    int ist = 1 - 2*il1;
+    int jst = 1 - 2*jl1;
+    int kst = 1 - 2*kl1;
+    int ied = ni - 1 + 2*il1;
+    int jed = nj - 1 + 2*jl1;
+    int ked = nk - 1 + 2*kl1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+    
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble KX = half * (xfv(i, j, k, nsurf) + xfv(i + il1, j + jl1, k + kl1, nsurf));
+                RDouble KY = half * (yfv(i, j, k, nsurf) + yfv(i + il1, j + jl1, k + kl1, nsurf));
+                RDouble KZ = half * (zfv(i, j, k, nsurf) + zfv(i + il1, j + jl1, k + kl1, nsurf));
+                
+                RDouble R = q(i, j, k, IR);
+                RDouble U = q(i, j, k, IU);
+                RDouble V = q(i, j, k, IV);
+                RDouble W = q(i, j, k, IW);
+                RDouble P = q(i, j, k, IP);
+                RDouble H = (gama / (gama - one)) * P / R + half * (U * U + V * V + W * W);
+                
+                RDouble RVN = R * (KX * U + KY * V + KZ * W);
+                
+                Cellflux(i, j, k, IR) = RVN;
+                Cellflux(i, j, k, IRU) = RVN * U + KX * P;
+                Cellflux(i, j, k, IRV) = RVN * V + KY * P;
+                Cellflux(i, j, k, IRW) = RVN * W + KZ * P;
+                Cellflux(i, j, k, IRE) = RVN * H;
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::GetCellViscousFlux(Grid *gridIn, int iSurface)
+{
+    if(solvername.substr(0, 4) != "HDCS")
+    {
+        return;
+    }
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+    
+    RDouble4D &dqdx = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &dqdy = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &dqdz = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+    RDouble4D &UVWT = UVWTproxy->GetField_STR();
+
+    RDouble4D &Cellflux   = CellfluxProxy->GetField_STR();
+
+    RDouble4D &xfv  = *(grid->GetFaceVectorX());
+    RDouble4D &yfv  = *(grid->GetFaceVectorY());
+    RDouble4D &zfv  = *(grid->GetFaceVectorZ());
+    
+    RDouble3D &visl = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &vist = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble oPrandtlLaminar    = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble specificHeatAtConstantPressure = 1.0 / ((1.4 - 1.0) * refMachNumber * refMachNumber);
+
+    int il1, jl1, kl1;
+    GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+    int ist = 1 - 2*il1;
+    int jst = 1 - 2*jl1;
+    int kst = 1 - 2*kl1;
+    int ied = ni - 1 + 2*il1;
+    int jed = nj - 1 + 2*jl1;
+    int ked = nk - 1 + 2*kl1;
+    
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    RDouble fvis[5] = {0};
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble nx = half * (xfv(i, j, k, iSurface) + xfv(i + il1, j + jl1, k + kl1, iSurface));
+                RDouble ny = half * (yfv(i, j, k, iSurface) + yfv(i + il1, j + jl1, k + kl1, iSurface));
+                RDouble nz = half * (zfv(i, j, k, iSurface) + zfv(i + il1, j + jl1, k + kl1, iSurface));
+
+                RDouble um  = UVWT(i, j, k, 0);
+                RDouble vm  = UVWT(i, j, k, 1);
+                RDouble wm  = UVWT(i, j, k, 2);
+
+                RDouble mul = visl(i, j, k);
+                RDouble mut = vist(i, j, k);
+                RDouble vis = mul + mut;
+
+                RDouble dudx  = dqdx(i, j, k, 0);
+                RDouble dudy  = dqdy(i, j, k, 0);
+                RDouble dudz  = dqdz(i, j, k, 0);
+
+                RDouble dvdx  = dqdx(i, j, k, 1);
+                RDouble dvdy  = dqdy(i, j, k, 1);
+                RDouble dvdz  = dqdz(i, j, k, 1);
+
+                RDouble dwdx  = dqdx(i, j, k, 2);
+                RDouble dwdy  = dqdy(i, j, k, 2);
+                RDouble dwdz  = dqdz(i, j, k, 2);
+
+                RDouble dtdx  = dqdx(i, j, k, 3);
+                RDouble dtdy  = dqdy(i, j, k, 3);
+                RDouble dtdz  = dqdz(i, j, k, 3);
+                
+                RDouble kcp = (mul * oPrandtlLaminar + mut * oPrandtlTurbulence) * specificHeatAtConstantPressure;
+
+                RDouble qx = kcp * dtdx;
+                RDouble qy = kcp * dtdy;
+                RDouble qz = kcp * dtdz;
+
+                RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+                RDouble txx = vis * (two * dudx - divv2p3);
+                RDouble tyy = vis * (two * dvdy - divv2p3);
+                RDouble tzz = vis * (two * dwdz - divv2p3);
+                RDouble txy = vis * (dudy + dvdx);
+                RDouble txz = vis * (dudz + dwdx);
+                RDouble tyz = vis * (dvdz + dwdy);
+
+                fvis[0] = 0.0;
+                fvis[1] = nx * txx + ny * txy + nz * txz;
+                fvis[2] = nx * txy + ny * tyy + nz * tyz;
+                fvis[3] = nx * txz + ny * tyz + nz * tzz;
+                fvis[4] = um * fvis[1] + vm * fvis[2] + wm * fvis[3] + (nx * qx + ny * qy + nz * qz);
+
+                for (int m = 0; m < 5; ++ m)
+                {
+                    Cellflux(i, j, k, m) = - fvis[m] / refReNumber;
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::GetUVWTproxy(Grid *gridIn)
+{
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("q_FD"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("t_FD"));
+    RDouble4D &UVWT = UVWTproxy->GetField_STR();
+
+    int ist = - 3;
+    int jst = - 3;
+    int kst = - 3;
+    int ied = ni + 3;
+    int jed = nj + 3;
+    int ked = nk + 3;
+    
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                UVWT(i, j, k, 0) = q(i, j, k, 1);
+                UVWT(i, j, k, 1) = q(i, j, k, 2);
+                UVWT(i, j, k, 2) = q(i, j, k, 3);
+                UVWT(i, j, k, 3) = t(i, j, k, 0);
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::GetUVWTfaceproxy(Grid *gridIn, int nsurf)
+{
+    if(solvername.substr(0, 4) == "HDCS")
+    {
+        GetUVWTfaceproxy_HDCS(gridIn, nsurf);
+        return;
+    }
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &UVWT = UVWTproxy->GetField_STR();
+
+    RDouble4D *UVWTface;
+    Int1D *DiffOrder;
+    if (nsurf == 1)
+    {
+        UVWTface = &(UVWTfaceIproxy->GetField_STR());
+        DiffOrder = strgrid->DiscretePrecisionKXI;
+    }
+    else if (nsurf == 2)
+    {
+        UVWTface = &(UVWTfaceJproxy->GetField_STR());
+        DiffOrder = strgrid->DiscretePrecisionETA;
+    }
+    else
+    {
+        UVWTface = &(UVWTfaceKproxy->GetField_STR());
+        DiffOrder = strgrid->DiscretePrecisionCTA;
+    }
+    
+    int il1, jl1, kl1;
+    GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+    int ist = 1 - il1;
+    int jst = 1 - jl1;
+    int kst = 1 - kl1;
+    int ied = ni - 1 + 2*il1;
+    int jed = nj - 1 + 2*jl1;
+    int ked = nk - 1 + 2*kl1;    
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int localcellID = i * il1 + j * jl1 + k * kl1;
+                
+                if((*DiffOrder)(localcellID) == 2 || (*DiffOrder)(localcellID - 1) == 2)
+                {
+                    for (int m = 0; m <= 3; ++m)
+                    {                    
+                        RDouble b = UVWT(i - il1,   j - jl1,   k - kl1,   m);
+                        RDouble c = UVWT(i,         j,         k,         m);
+                        (*UVWTface)(i, j, k, m) = half * (b + c);
+                    }
+                }
+                else
+                {
+                    for (int m = 0; m <= 3; ++m)
+                    {                    
+                        RDouble a = UVWT(i - il1*2, j - jl1*2, k - kl1*2, m);
+                        RDouble b = UVWT(i - il1,   j - jl1,   k - kl1,   m);
+                        RDouble c = UVWT(i,         j,         k,         m);
+                        RDouble d = UVWT(i + il1,   j + jl1,   k + kl1,   m);
+                        (*UVWTface)(i, j, k, m) = (- a + 9.0 * b + 9.0 * c - d) / 16.0;
+                    }
+                    if ((*UVWTface)(i, j, k, 3) < SMALL)
+                    {
+                        (*UVWTface)(i, j, k, 3) = half * (UVWT(i - il1, j - jl1, k - kl1,  3) + UVWT(i, j, k, 3));
+                    }
+                }                
+            }
+        }
+    }   
+}
+
+void NSSolverStructFD::GetUVWTfaceproxy_HDCS(Grid *gridIn, int nsurf)
+{
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &UVWT = UVWTproxy->GetField_STR();
+
+    RDouble4D *UVWTface;
+    if (nsurf == 1)
+    {
+        UVWTface = &(UVWTfaceIproxy->GetField_STR());
+    }
+    else if (nsurf == 2)
+    {
+        UVWTface = &(UVWTfaceJproxy->GetField_STR());
+    }
+    else
+    {
+        UVWTface = &(UVWTfaceKproxy->GetField_STR());
+    }
+    
+    int il1, jl1, kl1;
+    GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni - 1 + il1;
+    int jed = nj - 1 + jl1;
+    int ked = nk - 1 + kl1;    
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int m = 0; m <= 3; ++m)
+                {
+                    RDouble a = UVWT(i - il1*3, j - jl1*3, k - kl1*3, m);
+                    RDouble b = UVWT(i - il1*2, j - jl1*2, k - kl1*2, m);
+                    RDouble c = UVWT(i - il1,   j - jl1,   k - kl1,   m);
+                    RDouble d = UVWT(i,         j,         k,         m);
+                    RDouble e = UVWT(i + il1,   j + jl1,   k + kl1,   m);
+                    RDouble f = UVWT(i + il1*2, j + jl1*2, k + kl1*2, m);
+                    (*UVWTface)(i, j, k, m) = (150.0 * (c + d) - 25.0 * (b + e) + 3.0 * (a + f)) / 256.0;
+                }
+                if ((*UVWTface)(i, j, k, 3) < SMALL)
+                {
+                    (*UVWTface)(i, j, k, 3) = half * (UVWT(i - il1, j - jl1, k - kl1,  3) + UVWT(i, j, k, 3));
+                }
+            }
+        }
+    }   
+}
+
+void NSSolverStructFD::GetdqdkxietactaCellCenter(Grid *gridIn, int nsurf)
+{
+    if(solvername.substr(0, 4) == "HDCS")
+    {
+        GetdqdkxietactaCellCenter_HDCS(gridIn, nsurf);
+        return;
+    }
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D *UVWTface;
+    Int1D *DiffOrder;
+    RDouble4D *dqdkxietacta;
+    if (nsurf == 1)
+    {
+        UVWTface = &(UVWTfaceIproxy->GetField_STR());
+        DiffOrder = strgrid->DiscretePrecisionKXI;
+        dqdkxietacta = &(*reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdkxi")));
+    }
+    else if (nsurf == 2)
+    {
+        UVWTface = &(UVWTfaceJproxy->GetField_STR());
+        DiffOrder = strgrid->DiscretePrecisionETA;
+        dqdkxietacta = &(*reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdeta")));
+    }
+    else
+    {
+        UVWTface = &(UVWTfaceKproxy->GetField_STR());
+        DiffOrder = strgrid->DiscretePrecisionCTA;
+        dqdkxietacta = &(*reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdcta")));
+    }
+
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni - 1;
+    int jed = nj - 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    int il1, jl1, kl1;
+    GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int localcellID = i * il1 + j * jl1 + k * kl1;
+                
+                if((*DiffOrder)(localcellID) == 2)
+                {
+                    for (int m = 0; m <= 3; ++ m)
+                    {
+                        RDouble q1 = (*UVWTface)(i      , j      , k      , m);
+                        RDouble q2 = (*UVWTface)(i + il1, j + jl1, k + kl1, m);
+
+                        (*dqdkxietacta)(i, j, k, m) = q2 - q1;
+                    }
+                }
+                else
+                {
+                    for (int m = 0; m <= 3; ++ m)
+                    {
+                        RDouble q0 = (*UVWTface)(i - il1    , j - jl1    , k - kl1    , m);
+                        RDouble q1 = (*UVWTface)(i          , j          , k          , m);
+                        RDouble q2 = (*UVWTface)(i + il1    , j + jl1    , k + kl1    , m);
+                        RDouble q3 = (*UVWTface)(i + il1 * 2, j + jl1 * 2, k + kl1 * 2, m);
+
+                        (*dqdkxietacta)(i, j, k, m) = (27.0 * (q2 - q1) - (q3 - q0)) / 24.0;
+                    }
+                }
+            }
+        }
+    }   
+}
+
+void NSSolverStructFD::GetdqdkxietactaCellCenter_HDCS(Grid *gridIn, int nsurf)
+{
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    const RDouble alfa_sixth =  64.0 / 45.0;
+    const RDouble    a_sixth = - 2.0 / 9.0;
+    const RDouble    b_sixth =   1.0 / 180.0;
+
+    RDouble4D &UVWT = UVWTproxy->GetField_STR();
+    RDouble4D *UVWTface;
+    RDouble4D *dqdkxietacta;
+    if (nsurf == 1)
+    {
+        UVWTface = &(UVWTfaceIproxy->GetField_STR());
+        dqdkxietacta = &(*reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdkxi")));
+    }
+    else if (nsurf == 2)
+    {
+        UVWTface = &(UVWTfaceJproxy->GetField_STR());
+        dqdkxietacta = &(*reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdeta")));
+    }
+    else
+    {
+        UVWTface = &(UVWTfaceKproxy->GetField_STR());
+        dqdkxietacta = &(*reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdcta")));
+    }
+
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni - 1;
+    int jed = nj - 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    int il1, jl1, kl1;
+    GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int m = 0; m <= 3; ++ m)
+                {
+                    RDouble fL = (*UVWTface)(i          , j          , k          , m);
+                    RDouble fR = (*UVWTface)(i + il1    , j + jl1    , k + kl1    , m);
+
+                    RDouble CL2 = UVWT(i - il1*2, j - jl1*2, k - kl1*2, m);
+                    RDouble CL1 = UVWT(i - il1,   j - jl1,   k - kl1,   m);                    
+                    RDouble CR1 = UVWT(i + il1,   j + jl1,   k + kl1,   m);
+                    RDouble CR2 = UVWT(i + il1*2, j + jl1*2, k + kl1*2, m);
+                    
+                    (*dqdkxietacta)(i, j, k, m) = alfa_sixth * (fR - fL) + a_sixth * (CR1 - CL1) + b_sixth * (CR2 - CL2);
+                }
+            }
+        }
+    }   
+}
+
+
+void NSSolverStructFD::ViscousFlux(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int viscousType = parameters->GetViscousType();
+    if (viscousType <= INVISCID)
+    {
+        return;
+    }
+
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+
+    FieldProxy * fluxProxy = new FieldProxy();
+
+    int nDim = GetDim();
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        if (iSurface == 1)
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxI")));
+        }
+        else if (iSurface == 2)
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxJ")));
+        }
+        else
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxK")));
+        }
+        GetGradientAtFace(gridIn, iSurface);
+        GetGradientAtFaceCorrectionAtPhysicalBoundary(gridIn, iSurface);
+
+        if (iLES == NOLES_SOLVER)
+        {
+            GetFaceViscousFlux(gridIn, fluxProxy, iSurface);
+        }
+        else
+        {
+            GetFaceViscousFluxLES(gridIn, fluxProxy, iSurface);
+        }
+        
+        FluxDifference(gridIn, fluxProxy, iSurface);
+    }
+    delete fluxProxy;
+}
+
+void NSSolverStructFD::GetGradientAtFace(Grid *gridIn, int nSurface)
+{
+    if (gradient_method.substr(0,12) == "conservation")
+    {
+        GetGradientAtFaceconservation(gridIn, nSurface);
+    }
+    else if (gradient_method.substr(0,10) == "chain_rule")
+    {
+        GetGradientAtFacechainrule(gridIn, nSurface);
+    }
+    else
+    {
+        GetGradientAtFaceconservation(gridIn, nSurface);
+    }
+}
+
+void NSSolverStructFD::GetGradientAtFaceconservation(Grid *gridIn, int nSurface)
+{
+    if(solvername.substr(0, 4) == "HDCS")
+    {
+        GetGradientAtFaceconservation_HDCS(gridIn, nSurface);
+        return;
+    }
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();    
+
+    RDouble4D &dqdx = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &dqdy = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &dqdz = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    RDouble4D &UVWT = UVWTproxy->GetField_STR();
+
+    Int1D *DiffOrder;
+    if (nSurface == 1)
+    {
+        DiffOrder = grid->DiscretePrecisionKXI;
+    }
+    else if (nSurface == 2)
+    {
+        DiffOrder = grid->DiscretePrecisionETA;
+    }
+    else
+    {
+        DiffOrder = grid->DiscretePrecisionCTA;
+    }
+
+    RDouble4D &dqdxface = dqdxFaceProxy->GetField_STR();
+    RDouble4D &dqdyface = dqdyFaceProxy->GetField_STR();
+    RDouble4D &dqdzface = dqdzFaceProxy->GetField_STR();
+    dqdxface = 0.0;
+    dqdyface = 0.0;
+    dqdzface = 0.0;   
+
+    RDouble3D &xcc = *(grid->GetCellCenterX());
+    RDouble3D &ycc = *(grid->GetCellCenterY());
+    RDouble3D &zcc = *(grid->GetCellCenterZ());
+
+    int il1, jl1, kl1;
+    GetNsurfIndex(nSurface, il1, jl1, kl1);
+
+    int ist = 1 - il1;
+    int jst = 1 - jl1;
+    int kst = 1 - kl1;
+    int ied = ni - 1 + 2*il1;
+    int jed = nj - 1 + 2*jl1;
+    int ked = nk - 1 + 2*kl1;
+    
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+    
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int localcellID = i * il1 + j * jl1 + k * kl1;
+                
+                if((*DiffOrder)(localcellID) == 2 || (*DiffOrder)(localcellID - 1) == 2)
+                {
+                    RDouble dx = xcc(i, j, k) - xcc(i - il1, j - jl1, k - kl1);
+                    RDouble dy = ycc(i, j, k) - ycc(i - il1, j - jl1, k - kl1);
+                    RDouble dz = zcc(i, j, k) - zcc(i - il1, j - jl1, k - kl1);
+                    RDouble dr = sqrt(dx * dx + dy * dy + dz * dz);
+                    
+                    dx = dx / dr;
+                    dy = dy / dr;
+                    dz = dz / dr;
+                    for (int m = 0; m <= 3; ++ m)
+                    {
+                        RDouble qxb = dqdx(i - il1,   j - jl1,   k - kl1,   m);
+                        RDouble qxc = dqdx(i,         j,         k,         m);
+                        
+                        RDouble qyb = dqdy(i - il1,   j - jl1,   k - kl1,   m);
+                        RDouble qyc = dqdy(i,         j,         k,         m);
+                        
+                        RDouble qzb = dqdz(i - il1,   j - jl1,   k - kl1,   m);
+                        RDouble qzc = dqdz(i,         j,         k,         m);
+                        
+                        RDouble gradqx = half * (qxb + qxc);
+                        RDouble gradqy = half * (qyb + qyc);
+                        RDouble gradqz = half * (qzb + qzc);
+                        
+                        RDouble dq = UVWT(i, j, k, m) - UVWT(i - il1, j - jl1, k - kl1, m);
+                        RDouble tmp = gradqx * dx + gradqy * dy + gradqz * dz - dq / dr;
+                        
+                        dqdxface(i, j, k, m) = gradqx - tmp * dx;
+                        dqdyface(i, j, k, m) = gradqy - tmp * dy;
+                        dqdzface(i, j, k, m) = gradqz - tmp * dz;
+                    }
+                }
+                else
+                {
+                    RDouble dx = (27.0 * (xcc(i, j, k) - xcc(i - il1, j - jl1, k - kl1)) - (xcc(i + il1, j + jl1, k + kl1) - xcc(i - il1 * 2, j - jl1 * 2, k - kl1 * 2))) / 24.0;
+                    RDouble dy = (27.0 * (ycc(i, j, k) - ycc(i - il1, j - jl1, k - kl1)) - (ycc(i + il1, j + jl1, k + kl1) - ycc(i - il1 * 2, j - jl1 * 2, k - kl1 * 2))) / 24.0;
+                    RDouble dz = (27.0 * (zcc(i, j, k) - zcc(i - il1, j - jl1, k - kl1)) - (zcc(i + il1, j + jl1, k + kl1) - zcc(i - il1 * 2, j - jl1 * 2, k - kl1 * 2))) / 24.0;
+                    RDouble dr = sqrt(dx * dx + dy * dy + dz * dz);
+                    
+                    dx = dx / dr;
+                    dy = dy / dr;
+                    dz = dz / dr;
+                    for (int m = 0; m <= 3; ++ m)
+                    {
+                        RDouble qxa = dqdx(i - il1*2, j - jl1*2, k - kl1*2, m);
+                        RDouble qxb = dqdx(i - il1,   j - jl1,   k - kl1,   m);
+                        RDouble qxc = dqdx(i,         j,         k,         m);
+                        RDouble qxd = dqdx(i + il1,   j + jl1,   k + kl1,   m);
+                        
+                        RDouble qya = dqdy(i - il1*2, j - jl1*2, k - kl1*2, m);
+                        RDouble qyb = dqdy(i - il1,   j - jl1,   k - kl1,   m);
+                        RDouble qyc = dqdy(i,         j,         k,         m);
+                        RDouble qyd = dqdy(i + il1,   j + jl1,   k + kl1,   m);
+                        
+                        RDouble qza = dqdz(i - il1*2, j - jl1*2, k - kl1*2, m);
+                        RDouble qzb = dqdz(i - il1,   j - jl1,   k - kl1,   m);
+                        RDouble qzc = dqdz(i,         j,         k,         m);
+                        RDouble qzd = dqdz(i + il1,   j + jl1,   k + kl1,   m);
+                        
+                        RDouble gradqx = (- qxa + 9.0 * qxb + 9.0 * qxc - qxd) / 16.0;
+                        RDouble gradqy = (- qya + 9.0 * qyb + 9.0 * qyc - qyd) / 16.0;
+                        RDouble gradqz = (- qza + 9.0 * qzb + 9.0 * qzc - qzd) / 16.0;
+                        
+                        RDouble dq = (27.0 * (UVWT(i, j, k, m) - UVWT(i - il1, j - jl1, k - kl1, m)) - (UVWT(i + il1, j + jl1, k + kl1,m) - UVWT(i - il1 * 2, j - jl1 * 2, k - kl1 * 2,m))) / 24.0;
+                        RDouble tmp = gradqx * dx + gradqy * dy + gradqz * dz - dq / dr;
+                        
+                        dqdxface(i, j, k, m) = gradqx - tmp * dx;
+                        dqdyface(i, j, k, m) = gradqy - tmp * dy;
+                        dqdzface(i, j, k, m) = gradqz - tmp * dz;
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::GetGradientAtFaceconservation_HDCS(Grid *gridIn, int nSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();    
+
+    RDouble4D &dqdx = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &dqdy = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &dqdz = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    RDouble4D &UVWT = UVWTproxy->GetField_STR();
+    
+    RDouble4D &dqdxface = dqdxFaceProxy->GetField_STR();
+    RDouble4D &dqdyface = dqdyFaceProxy->GetField_STR();
+    RDouble4D &dqdzface = dqdzFaceProxy->GetField_STR();
+    dqdxface = 0.0;
+    dqdyface = 0.0;
+    dqdzface = 0.0;   
+
+    RDouble3D &xcc = *(grid->GetCellCenterX());
+    RDouble3D &ycc = *(grid->GetCellCenterY());
+    RDouble3D &zcc = *(grid->GetCellCenterZ());
+
+    int il1, jl1, kl1;
+    GetNsurfIndex(nSurface, il1, jl1, kl1);
+
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni - 1 + il1;
+    int jed = nj - 1 + jl1;
+    int ked = nk - 1 + kl1;
+    
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+    
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble dx = xcc(i, j, k) - xcc(i - il1, j - jl1, k - kl1);
+                RDouble dy = ycc(i, j, k) - ycc(i - il1, j - jl1, k - kl1);
+                RDouble dz = zcc(i, j, k) - zcc(i - il1, j - jl1, k - kl1);
+                RDouble dr = sqrt(dx * dx + dy * dy + dz * dz);
+                
+                dx = dx / dr;
+                dy = dy / dr;
+                dz = dz / dr;
+                for (int m = 0; m <= 3; ++ m)
+                {
+                    RDouble qxb = dqdx(i - il1,   j - jl1,   k - kl1,   m);
+                    RDouble qxc = dqdx(i,         j,         k,         m);
+                    
+                    RDouble qyb = dqdy(i - il1,   j - jl1,   k - kl1,   m);
+                    RDouble qyc = dqdy(i,         j,         k,         m);
+                    
+                    RDouble qzb = dqdz(i - il1,   j - jl1,   k - kl1,   m);
+                    RDouble qzc = dqdz(i,         j,         k,         m);
+                    
+                    RDouble gradqx = half * (qxb + qxc);
+                    RDouble gradqy = half * (qyb + qyc);
+                    RDouble gradqz = half * (qzb + qzc);
+                    
+                    RDouble dq = UVWT(i, j, k, m) - UVWT(i - il1, j - jl1, k - kl1, m);
+                    RDouble tmp = gradqx * dx + gradqy * dy + gradqz * dz - dq / dr;
+                    
+                    dqdxface(i, j, k, m) = gradqx - tmp * dx;
+                    dqdyface(i, j, k, m) = gradqy - tmp * dy;
+                    dqdzface(i, j, k, m) = gradqz - tmp * dz;
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::GetGradientAtFacechainrule(Grid *gridIn, int nSurface)
+{
+    if(solvername.substr(0, 4) == "HDCS")
+    {
+        GetGradientAtFaceconservation_HDCS(gridIn, nSurface);
+        return;
+    }
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &xfv  = *(grid->GetFaceVectorX());
+    RDouble4D &yfv  = *(grid->GetFaceVectorY());
+    RDouble4D &zfv  = *(grid->GetFaceVectorZ());
+    RDouble3D &vol  = *(grid->GetCellVolume());
+
+    RDouble4D *dqdxnomaindirection;
+    RDouble4D *dqdynomaindirection;
+    RDouble4D *dqdznomaindirection;
+    Int1D *DiffOrder;
+    if (nSurface == 1)
+    {
+        dqdxnomaindirection = &(*reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdxnokxi")));
+        dqdynomaindirection = &(*reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdynokxi")));
+        dqdznomaindirection = &(*reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdznokxi")));
+
+        DiffOrder = grid->DiscretePrecisionKXI;
+    }
+    else if(nSurface == 2)
+    {
+        dqdxnomaindirection = &(*reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdxnoeta")));
+        dqdynomaindirection = &(*reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdynoeta")));
+        dqdznomaindirection = &(*reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdznoeta")));
+
+        DiffOrder = grid->DiscretePrecisionETA;
+    }
+    else
+    {
+        dqdxnomaindirection = &(*reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdxnocta")));
+        dqdynomaindirection = &(*reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdynocta")));
+        dqdznomaindirection = &(*reinterpret_cast <RDouble4D *> (grid->GetDataPtr("dqdznocta")));
+
+        DiffOrder = grid->DiscretePrecisionCTA;
+    }
+
+    RDouble4D &UVWT = UVWTproxy->GetField_STR();
+
+    RDouble4D &dqdxface = dqdxFaceProxy->GetField_STR();
+    RDouble4D &dqdyface = dqdyFaceProxy->GetField_STR();
+    RDouble4D &dqdzface = dqdzFaceProxy->GetField_STR();
+    dqdxface = 0.0;
+    dqdyface = 0.0;
+    dqdzface = 0.0;
+
+    int il1, jl1, kl1;
+    GetNsurfIndex(nSurface, il1, jl1, kl1);
+
+    int ist = 1 - il1;
+    int jst = 1 - jl1;
+    int kst = 1 - kl1;
+    int ied = ni - 1 + 2*il1;
+    int jed = nj - 1 + 2*jl1;
+    int ked = nk - 1 + 2*kl1;
+    
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble nx = xfv(i, j, k, nSurface);
+                RDouble ny = yfv(i, j, k, nSurface);
+                RDouble nz = zfv(i, j, k, nSurface);
+
+                RDouble Volume = half * (vol(i, j, k) + vol(i - il1, j - jl1, k - kl1));
+
+                nx /= Volume;
+                ny /= Volume;
+                nz /= Volume;
+
+                int localcellID = i * il1 + j * jl1 + k * kl1;
+                if((*DiffOrder)(localcellID) == 2 || (*DiffOrder)(localcellID - 1) == 2)
+                {
+                    for (int m = 0; m <= 3; ++ m)
+                    {
+                        RDouble Cellb_q = UVWT(i - il1, j - jl1, k - kl1, m);
+                        RDouble Cellc_q = UVWT(i      , j      , k      , m);
+
+                        RDouble Face_dqdmaindirection = Cellc_q - Cellb_q;
+
+                        RDouble Cellb_dqdxnomaindirection = (*dqdxnomaindirection)(i - il1, j - jl1, k - kl1, m);
+                        RDouble Cellc_dqdxnomaindirection = (*dqdxnomaindirection)(i      , j      , k      , m);
+
+                        RDouble Cellb_dqdynomaindirection = (*dqdynomaindirection)(i - il1, j - jl1, k - kl1, m);
+                        RDouble Cellc_dqdynomaindirection = (*dqdynomaindirection)(i      , j      , k      , m);
+
+                        RDouble Cellb_dqdznomaindirection = (*dqdznomaindirection)(i - il1, j - jl1, k - kl1, m);
+                        RDouble Cellc_dqdznomaindirection = (*dqdznomaindirection)(i      , j      , k      , m);
+
+                        RDouble Face_dqdxnomaindirection = half * (Cellb_dqdxnomaindirection + Cellc_dqdxnomaindirection);
+                        RDouble Face_dqdynomaindirection = half * (Cellb_dqdynomaindirection + Cellc_dqdynomaindirection);
+                        RDouble Face_dqdznomaindirection = half * (Cellb_dqdznomaindirection + Cellc_dqdznomaindirection);
+
+                        dqdxface(i, j, k, m) = nx * Face_dqdmaindirection + Face_dqdxnomaindirection;
+                        dqdyface(i, j, k, m) = ny * Face_dqdmaindirection + Face_dqdynomaindirection;
+                        dqdzface(i, j, k, m) = nz * Face_dqdmaindirection + Face_dqdznomaindirection;
+                    }
+                }
+                else
+                {
+                    for (int m = 0; m <= 3; ++ m)
+                    {
+                        RDouble Cella_q = UVWT(i - il1 * 2, j - jl1 * 2, k - kl1 * 2, m);
+                        RDouble Cellb_q = UVWT(i - il1    , j - jl1    , k - kl1    , m);
+                        RDouble Cellc_q = UVWT(i          , j          , k          , m);
+                        RDouble Celld_q = UVWT(i + il1    , j + jl1    , k + kl1    , m);
+
+                        RDouble Face_dqdmaindirection = (27.0 * (Cellc_q - Cellb_q) - (Celld_q - Cella_q)) / 24.0;
+
+                        RDouble Cella_dqdxnomaindirection = (*dqdxnomaindirection)(i - il1 * 2, j - jl1 * 2, k - kl1 * 2, m);
+                        RDouble Cellb_dqdxnomaindirection = (*dqdxnomaindirection)(i - il1    , j - jl1    , k - kl1    , m);
+                        RDouble Cellc_dqdxnomaindirection = (*dqdxnomaindirection)(i          , j          , k          , m);
+                        RDouble Celld_dqdxnomaindirection = (*dqdxnomaindirection)(i + il1    , j + jl1    , k + kl1    , m);
+
+                        RDouble Cella_dqdynomaindirection = (*dqdynomaindirection)(i - il1 * 2, j - jl1 * 2, k - kl1 * 2, m);
+                        RDouble Cellb_dqdynomaindirection = (*dqdynomaindirection)(i - il1    , j - jl1    , k - kl1    , m);
+                        RDouble Cellc_dqdynomaindirection = (*dqdynomaindirection)(i          , j          , k          , m);
+                        RDouble Celld_dqdynomaindirection = (*dqdynomaindirection)(i + il1    , j + jl1    , k + kl1    , m);
+
+                        RDouble Cella_dqdznomaindirection = (*dqdznomaindirection)(i - il1 * 2, j - jl1 * 2, k - kl1 * 2, m);
+                        RDouble Cellb_dqdznomaindirection = (*dqdznomaindirection)(i - il1    , j - jl1    , k - kl1    , m);
+                        RDouble Cellc_dqdznomaindirection = (*dqdznomaindirection)(i          , j          , k          , m);
+                        RDouble Celld_dqdznomaindirection = (*dqdznomaindirection)(i + il1    , j + jl1    , k + kl1    , m);
+
+                        RDouble Face_dqdxnomaindirection = (9.0 * (Cellb_dqdxnomaindirection + Cellc_dqdxnomaindirection) - (Cella_dqdxnomaindirection + Celld_dqdxnomaindirection)) / 16.0;
+                        RDouble Face_dqdynomaindirection = (9.0 * (Cellb_dqdynomaindirection + Cellc_dqdynomaindirection) - (Cella_dqdynomaindirection + Celld_dqdynomaindirection)) / 16.0;
+                        RDouble Face_dqdznomaindirection = (9.0 * (Cellb_dqdznomaindirection + Cellc_dqdznomaindirection) - (Cella_dqdznomaindirection + Celld_dqdznomaindirection)) / 16.0;
+
+                        dqdxface(i, j, k, m) = nx * Face_dqdmaindirection + Face_dqdxnomaindirection;
+                        dqdyface(i, j, k, m) = ny * Face_dqdmaindirection + Face_dqdynomaindirection;
+                        dqdzface(i, j, k, m) = nz * Face_dqdmaindirection + Face_dqdznomaindirection;
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::GetGradientAtFaceCorrectionAtPhysicalBoundary(Grid *gridin, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridin);
+
+    RDouble4D &xfv  = *(grid->GetFaceVectorX());
+    RDouble4D &yfv  = *(grid->GetFaceVectorY());
+    RDouble4D &zfv  = *(grid->GetFaceVectorZ());
+    RDouble3D &vol  = *(grid->GetCellVolume());
+
+    RDouble4D &dqdx = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &dqdy = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &dqdz = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    RDouble4D &UVWT = UVWTproxy->GetField_STR();
+    
+    RDouble4D &dqdxface = dqdxFaceProxy->GetField_STR();
+    RDouble4D &dqdyface = dqdyFaceProxy->GetField_STR();
+    RDouble4D &dqdzface = dqdzFaceProxy->GetField_STR();
+    
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = bcregion->GetBCType();
+        int nsurf_bc = bcregion->GetFaceDirection() + 1;
+        if (IsInterface(BCType) || nsurf_bc != iSurface)
+        {
+            continue;
+        }
+        else if (IsWall(BCType))
+        {
+            int ist, ied, jst, jed, kst, ked;
+            bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+            int *s_lr3d = bcregion->GetFaceDirectionIndex();
+            int id, jd, kd;
+            GetBCFaceIDX(s_lr3d, id, jd, kd);
+            
+            int il1, jl1, kl1;
+            GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        int ibc1 = i + id;
+                        int jbc1 = j + jd;
+                        int kbc1 = k + kd;
+                        
+                        RDouble nx  = xfv (ibc1, jbc1, kbc1, iSurface);
+                        RDouble ny  = yfv (ibc1, jbc1, kbc1, iSurface);
+                        RDouble nz  = zfv (ibc1, jbc1, kbc1, iSurface);  
+                        
+                        for (int m = 0; m <= 3; ++ m)
+                        {
+                            RDouble f_kc_et_ct = UVWT(ibc1, jbc1, kbc1, m) - UVWT(ibc1-il1,jbc1-jl1,kbc1-kl1,m);
+                            dqdxface(ibc1, jbc1, kbc1, m) = nx * f_kc_et_ct / vol(i, j, k);
+                            dqdyface(ibc1, jbc1, kbc1, m) = ny * f_kc_et_ct / vol(i, j, k);
+                            dqdzface(ibc1, jbc1, kbc1, m) = nz * f_kc_et_ct / vol(i, j, k);
+                        }
+                    }
+                }
+            }
+        }
+        else
+        {
+            int ist, ied, jst, jed, kst, ked;
+            bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+            
+            int *s_lr3d = bcregion->GetFaceDirectionIndex();
+            int id, jd, kd;
+            GetBCFaceIDX(s_lr3d, id, jd, kd); 
+
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {       
+                        int ibc1 = i + id;
+                        int jbc1 = j + jd;
+                        int kbc1 = k + kd;
+
+                        for (int m = 0; m <= 3; ++ m)
+                        {
+                            dqdxface(ibc1, jbc1, kbc1, m) = dqdx(i, j, k, m);
+                            dqdyface(ibc1, jbc1, kbc1, m) = dqdy(i, j, k, m);
+                            dqdzface(ibc1, jbc1, kbc1, m) = dqdz(i, j, k, m);
+                        }
+                    }
+                }
+            }
+        } 
+    }
+}
+
+void NSSolverStructFD::GetFaceViscousFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+    
+    RDouble4D * UVWTface = 0;
+    if (iSurface == 1)
+    {
+        UVWTface = &(UVWTfaceIproxy->GetField_STR());
+    }
+    else if (iSurface == 2)
+    {
+        UVWTface = &(UVWTfaceJproxy->GetField_STR());
+    }
+    else
+    {
+        UVWTface = &(UVWTfaceKproxy->GetField_STR());
+    }
+
+    RDouble4D &gradqx = dqdxFaceProxy->GetField_STR();
+    RDouble4D &gradqy = dqdyFaceProxy->GetField_STR();
+    RDouble4D &gradqz = dqdzFaceProxy->GetField_STR();    
+
+    RDouble4D &flux   = fluxProxy->GetField_STR();
+
+    RDouble4D &xfv  = *(grid->GetFaceVectorX());
+    RDouble4D &yfv  = *(grid->GetFaceVectorY());
+    RDouble4D &zfv  = *(grid->GetFaceVectorZ());
+    
+    RDouble3D &vist = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist")); 
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+    RDouble oPrandtlLaminar    = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble specificHeatAtConstantPressure = 1.0 / ((1.4 - 1.0) * refMachNumber * refMachNumber);
+
+    int il1 = 0, jl1 = 0, kl1 = 0;
+    GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+    int ist = 0, jst = 0, kst = 0;
+    int ied = 0, jed = 0, ked = 0;
+
+    if(solvername.substr(0, 4) == "WCNS")
+    {
+        ist = 1 - il1;
+        jst = 1 - jl1;
+        kst = 1 - kl1;
+        ied = ni - 1 + 2*il1;
+        jed = nj - 1 + 2*jl1;
+        ked = nk - 1 + 2*kl1;
+        if (nk == 1)
+        {
+            kst = 1;
+            ked = 1;
+        }
+    }
+    else if(solvername.substr(0, 4) == "HDCS")
+    {
+        ist = 1;
+        jst = 1;
+        kst = 1;
+        ied = ni - 1 + il1;
+        jed = nj - 1 + jl1;
+        ked = nk - 1 + kl1;
+        if (nk == 1)
+        {
+            kst = 1;
+            ked = 1;
+        }
+    }
+
+    RDouble fvis[5] = {0};
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble nx = xfv(i, j, k, iSurface);
+                RDouble ny = yfv(i, j, k, iSurface);
+                RDouble nz = zfv(i, j, k, iSurface);
+
+                RDouble um  = (*UVWTface)(i, j, k, 0);
+                RDouble vm  = (*UVWTface)(i, j, k, 1);
+                RDouble wm  = (*UVWTface)(i, j, k, 2);
+                RDouble tm  = (*UVWTface)(i, j, k, 3);
+
+                RDouble mul = tm * sqrt(tm) * (1.0 + nonDimensionalSutherlandTemperature) / (tm + nonDimensionalSutherlandTemperature);
+                RDouble mut = half * (vist(i-il1, j-jl1, k-kl1) + vist(i, j, k));
+                RDouble vis = mul + mut;
+
+                RDouble dudx  = gradqx(i, j, k, 0);
+                RDouble dudy  = gradqy(i, j, k, 0);
+                RDouble dudz  = gradqz(i, j, k, 0);
+
+                RDouble dvdx  = gradqx(i, j, k, 1);
+                RDouble dvdy  = gradqy(i, j, k, 1);
+                RDouble dvdz  = gradqz(i, j, k, 1);
+
+                RDouble dwdx  = gradqx(i, j, k, 2);
+                RDouble dwdy  = gradqy(i, j, k, 2);
+                RDouble dwdz  = gradqz(i, j, k, 2);
+
+                RDouble dtdx  = gradqx(i, j, k, 3);
+                RDouble dtdy  = gradqy(i, j, k, 3);
+                RDouble dtdz  = gradqz(i, j, k, 3);                
+                
+                RDouble kcp = (mul * oPrandtlLaminar + mut * oPrandtlTurbulence) * specificHeatAtConstantPressure;
+
+                RDouble qx = kcp * dtdx;
+                RDouble qy = kcp * dtdy;
+                RDouble qz = kcp * dtdz;
+
+                RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+                RDouble txx = vis * (two * dudx - divv2p3);
+                RDouble tyy = vis * (two * dvdy - divv2p3);
+                RDouble tzz = vis * (two * dwdz - divv2p3);
+                RDouble txy = vis * (dudy + dvdx);
+                RDouble txz = vis * (dudz + dwdx);
+                RDouble tyz = vis * (dvdz + dwdy);
+
+                fvis[0] = 0.0;
+                fvis[1] = nx * txx + ny * txy + nz * txz;
+                fvis[2] = nx * txy + ny * tyy + nz * tyz;
+                fvis[3] = nx * txz + ny * tyz + nz * tzz;
+                fvis[4] = um * fvis[1] + vm * fvis[2] + wm * fvis[3] + (nx * qx + ny * qy + nz * qz);
+
+                for (int m = 0; m < 5; ++ m)
+                {
+                    flux(i, j, k,m) = - fvis[m] / refReNumber;
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::GetFaceViscousFluxLES(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+    
+    RDouble4D * UVWTface = 0;
+    if (iSurface == 1)
+    {
+        UVWTface = &(UVWTfaceIproxy->GetField_STR());
+    }
+    else if (iSurface == 2)
+    {
+        UVWTface = &(UVWTfaceJproxy->GetField_STR());
+    }
+    else
+    {
+        UVWTface = &(UVWTfaceKproxy->GetField_STR());
+    }
+
+    RDouble4D &gradqx = dqdxFaceProxy->GetField_STR();
+    RDouble4D &gradqy = dqdyFaceProxy->GetField_STR();
+    RDouble4D &gradqz = dqdzFaceProxy->GetField_STR();
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+    
+    RDouble3D &vist = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist")); 
+    RDouble3D &subgridScaleEnergy = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+    RDouble3D &turbulentPrandtlNumber = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("turbulentPrandtlNumber"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+    RDouble oPrandtlLaminar    = parameters->GetoPrandtlLaminar();
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble specificHeatAtConstantPressure = 1.0 / ((1.4 - 1.0) * refMachNumber * refMachNumber);
+
+    int il1 = 0, jl1 = 0, kl1 = 0;
+    GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+    int ist = 0, jst = 0, kst = 0;
+    int ied = 0, jed = 0, ked = 0;
+
+    if(solvername.substr(0, 4) == "WCNS")
+    {
+        ist = 1 - il1;
+        jst = 1 - jl1;
+        kst = 1 - kl1;
+        ied = ni - 1 + 2*il1;
+        jed = nj - 1 + 2*jl1;
+        ked = nk - 1 + 2*kl1;
+        if (nk == 1)
+        {
+            kst = 1;
+            ked = 1;
+        }
+    }
+    else if(solvername.substr(0, 4) == "HDCS")
+    {
+        ist = 1;
+        jst = 1;
+        kst = 1;
+        ied = ni - 1 + il1;
+        jed = nj - 1 + jl1;
+        ked = nk - 1 + kl1;
+        if (nk == 1)
+        {
+            kst = 1;
+            ked = 1;
+        }
+    }
+
+    string sgsmodel = " ";
+    GlobalDataBase::GetData("sgsmodel", &sgsmodel, PHSTRING, 1);
+
+    RDouble fvis[5] = {0};
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble nx = xfv(i, j, k, iSurface);
+                RDouble ny = yfv(i, j, k, iSurface);
+                RDouble nz = zfv(i, j, k, iSurface);
+
+                RDouble um  = (*UVWTface)(i, j, k, 0);
+                RDouble vm  = (*UVWTface)(i, j, k, 1);
+                RDouble wm  = (*UVWTface)(i, j, k, 2);
+                RDouble tm  = (*UVWTface)(i, j, k, 3);
+
+                RDouble mul = tm * sqrt(tm) * (1.0 + nonDimensionalSutherlandTemperature) / (tm + nonDimensionalSutherlandTemperature);
+                RDouble mut = half * (vist(i-il1, j-jl1, k-kl1) + vist(i, j, k));
+                RDouble vis = mul + mut;
+
+                RDouble dudx  = gradqx(i, j, k, 0);
+                RDouble dudy  = gradqy(i, j, k, 0);
+                RDouble dudz  = gradqz(i, j, k, 0);
+
+                RDouble dvdx  = gradqx(i, j, k, 1);
+                RDouble dvdy  = gradqy(i, j, k, 1);
+                RDouble dvdz  = gradqz(i, j, k, 1);
+
+                RDouble dwdx  = gradqx(i, j, k, 2);
+                RDouble dwdy  = gradqy(i, j, k, 2);
+                RDouble dwdz  = gradqz(i, j, k, 2);
+
+                RDouble dtdx  = gradqx(i, j, k, 3);
+                RDouble dtdy  = gradqy(i, j, k, 3);
+                RDouble dtdz  = gradqz(i, j, k, 3);                
+
+                RDouble oPrandtlTurbulence = 2.0 / (turbulentPrandtlNumber(i-il1, j-jl1, k-kl1) + turbulentPrandtlNumber(i, j, k));
+                RDouble kcp = (mul * oPrandtlLaminar + mut * oPrandtlTurbulence) * specificHeatAtConstantPressure;
+
+                RDouble qx = kcp * dtdx;
+                RDouble qy = kcp * dtdy;
+                RDouble qz = kcp * dtdz;
+
+                RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+                RDouble kSGS = half * (subgridScaleEnergy(i-il1, j-jl1, k-kl1) + subgridScaleEnergy(i, j, k));
+
+                RDouble txx = vis * (two * dudx - divv2p3) - 1.0/3.0 * kSGS;
+                RDouble tyy = vis * (two * dvdy - divv2p3) - 1.0/3.0 * kSGS;
+                RDouble tzz = vis * (two * dwdz - divv2p3) - 1.0/3.0 * kSGS;
+                RDouble txy = vis * (dudy + dvdx);
+                RDouble txz = vis * (dudz + dwdx);
+                RDouble tyz = vis * (dvdz + dwdy);
+
+                fvis[0] = 0.0;
+                fvis[1] = nx * txx + ny * txy + nz * txz;
+                fvis[2] = nx * txy + ny * tyy + nz * tyz;
+                fvis[3] = nx * txz + ny * tyz + nz * tzz;
+                fvis[4] = um * fvis[1] + vm * fvis[2] + wm * fvis[3] + (nx * qx + ny * qy + nz * qz);
+
+                for (int m = 0; m < 5; ++ m)
+                {
+                    flux(i, j, k,m) = - fvis[m] / refReNumber;
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::SpectrumRadius(Grid *grid)
+{
+    SpectrumRadiusInviscid(grid);
+
+    SpectrumRadiusViscous(grid);    
+}
+
+void NSSolverStructFD::SpectrumRadiusInviscid(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int ist = 0;
+    int ied = ni;
+    int jst = 0;
+    int jed = nj;
+    int kst = 0;
+    int ked = nk;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_FD"));
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble3D &rtem = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("rtem"));
+    const RDouble gama = 1.4;
+
+    invSpectralRadius = 0.0;
+
+    using namespace IDX;
+    int nDim = GetDim();
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        int il1, jl1, kl1;
+        GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int il = i + il1;
+                    int jl = j + jl1;
+                    int kl = k + kl1;
+
+                    RDouble rm = q(i, j, k, IR);
+                    RDouble um = q(i, j, k, IU);
+                    RDouble vm = q(i, j, k, IV);
+                    RDouble wm = q(i, j, k, IW);
+                    RDouble pm = q(i, j, k, IP);
+                    RDouble cm = sqrt(gama * pm / rm);
+
+                    RDouble nx = half * (xfv(i, j, k, iSurface) + xfv(il, jl, kl, iSurface));
+                    RDouble ny = half * (yfv(i, j, k, iSurface) + yfv(il, jl, kl, iSurface));
+                    RDouble nz = half * (zfv(i, j, k, iSurface) + zfv(il, jl, kl, iSurface));
+                    RDouble vn = nx * um + ny * vm + nz * wm;
+                    RDouble ns = sqrt(nx * nx + ny * ny + nz * nz);                    
+
+                    RDouble eig = ABS(vn) + cm * ns;
+                                        
+                    RDouble k1 = 0.25;
+                    RDouble k2 = 5.0;
+                    RDouble kp = rtem(i, j, k);
+                    RDouble eig_lim = eig * (k1 + k2 * kp);
+                    
+                    if (eig < eig_lim)
+                    {
+                        invSpectralRadius(i, j, k, iSurface - 1) = 0.5 * (eig * eig + eig_lim * eig_lim) / (eig_lim + 1.E-20);
+                    }
+                    else
+                    {
+                        invSpectralRadius(i, j, k, iSurface - 1) = eig;
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::SpectrumRadiusViscous(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+    visSpectralRadius = 0.0;
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+    if (viscousType == INVISCID)
+    {
+        return;
+    }
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int ist = 0;
+    int ied = ni;
+    int jst = 0;
+    int jed = nj;
+    int kst = 0;
+    int ked = nk;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    RDouble4D &xfv  = *(grid->GetFaceVectorX());
+    RDouble4D &yfv  = *(grid->GetFaceVectorY());
+    RDouble4D &zfv  = *(grid->GetFaceVectorZ());
+    RDouble3D &vol  = *(grid->GetCellVolume());
+
+    RDouble4D &q    = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_FD"));
+    RDouble3D &viscousLaminar    = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+
+    RDouble refReNumber       = parameters->GetRefReNumber();
+    RDouble prandtlLaminar    = parameters->GetPrandtlLaminar();
+    RDouble prandtlTurbulence = parameters->GetPrandtlTurbulence();
+    
+    const RDouble gama = 1.4;
+    const RDouble foth = 4.0 / 3.0;
+
+    int nDim = GetDim();    
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+                {
+                    int il1, jl1, kl1;
+                    GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+                    int il = i + il1;
+                    int jl = j + jl1;
+                    int kl = k + kl1;
+
+                    RDouble nx = half * (xfv(i, j, k, iSurface) + xfv(il, jl, kl, iSurface));
+                    RDouble ny = half * (yfv(i, j, k, iSurface) + yfv(il, jl, kl, iSurface));
+                    RDouble nz = half * (zfv(i, j, k, iSurface) + zfv(il, jl, kl, iSurface));
+
+                    RDouble ns2 = nx * nx + ny * ny + nz * nz;
+
+                    visSpectralRadius(i, j, k, iSurface - 1) = ns2;
+                }
+
+                RDouble rm   = q(i, j, k, 0);
+                RDouble vvol = vol(i, j, k);
+
+                RDouble viscLaminar = viscousLaminar(i, j, k);
+                RDouble viscTurbulence = viscousTurbulence(i, j, k);
+
+                RDouble coef;
+                RDouble coef1 = foth * (viscLaminar + viscTurbulence);
+                RDouble coef2 = gama * (viscLaminar / prandtlLaminar +  viscTurbulence / prandtlTurbulence);
+                coef  = MAX(coef1, coef2);
+
+                coef *= 2.0 / (refReNumber * rm * vvol);
+
+                for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+                {
+                    visSpectralRadius(i, j, k, iSurface - 1) *= coef;
+                }
+            }
+        }
+    }    
+}
+
+void NSSolverStructFD::TimeStep(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);   
+    RDouble3D &dt   = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+    RDouble cfl = ComputeCFL();
+    
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK(); 
+
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    int nDim = GetDim();
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {    
+                RDouble rad_euler = zero;
+                RDouble rad_ns    = zero;
+                for (int iSurface = 0; iSurface < nDim; ++ iSurface)
+                {
+                    rad_euler += invSpectralRadius(i, j, k, iSurface);
+                    rad_ns    += visSpectralRadius(i, j, k, iSurface);
+                }
+                RDouble rad = rad_euler + rad_ns;
+
+                dt(i, j, k) = cfl / rad;
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::ReduceMaxTimeStep(Grid *gridIn, RDouble globalMinDt)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    RDouble3D &vol = *grid->GetCellVolume();
+    RDouble3D &dt  = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+
+    RDouble ktmax = GlobalDataBase::GetDoubleParaFromDB("ktmax");
+
+    if (ktmax > 0.0)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    dt(i, j, k) = MIN(dt(i, j, k), static_cast <RDouble> (ktmax * globalMinDt / vol(i, j, k)));
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::Diagonal(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    RDouble3D &dt   = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("dt"));
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+    RDouble4D &diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+    RDouble3D &vol = *(grid->GetCellVolume());
+
+    RDouble dualTimeSpectrumC1 = zero;
+    RDouble dualTimeSpectrumC2 = one;
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble dualTimeCoefficient[7];
+        const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+        ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+        dualTimeSpectrumC1 = - dualTimeCoefficient[3];
+        dualTimeSpectrumC2 =   dualTimeCoefficient[6];
+    }
+    
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK(); 
+
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    int nDim = GetDim();
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {    
+                RDouble rad_euler = zero;
+                RDouble rad_ns    = zero;
+                for (int iSurface = 0; iSurface < nDim; ++ iSurface)
+                {
+                    rad_euler += invSpectralRadius(i, j, k, iSurface);
+                    rad_ns    += visSpectralRadius(i, j, k, iSurface);
+                }
+                RDouble rad = rad_euler + rad_ns;
+
+                RDouble odt =  dualTimeSpectrumC1 * vol(i, j, k) + dualTimeSpectrumC2 / dt(i, j, k);
+                for (int m = 0; m < 5; ++ m)
+                {
+                    diagonal(i, j, k, m) = odt + rad;
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::SolveLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+    if(tscheme == JACOBIAN_ITERATION)
+    {
+        SolveLUSGSbyJacobiIteration(gridIn, dqProxy, LUplusDQ, sweepNormal);
+        return;
+    }
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &dq = dqProxy->GetField_STR();
+    RDouble4D &dRHS = LUplusDQ->GetField_STR();
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+    RDouble4D &diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+    RDouble4D &res = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));    
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_FD"));
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    bool isViscous = parameters->IsViscous();
+    const int nEquation  = 5;
+
+    RDouble df[5];
+    RDouble df_total[5];
+    RDouble prim_former[5];
+    RDouble dq_former[5];    
+
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }    
+
+    int nDim = GetDim();
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    df_total[m] = 0.0;     
+                }
+
+                for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+                {
+                    int il1, jl1, kl1;
+                    GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+                    int il = i - il1;
+                    int jl = j - jl1;
+                    int kl = k - kl1;
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        prim_former[m]  =  q(il, jl, kl, m);
+                        dq_former[m]= dq(il, jl, kl, m);
+                    }
+                   
+                    RDouble nx = half * (xfv(i, j, k, iSurface) + xfv(il, jl, kl, iSurface));
+                    RDouble ny = half * (yfv(i, j, k, iSurface) + yfv(il, jl, kl, iSurface));
+                    RDouble nz = half * (zfv(i, j, k, iSurface) + zfv(il, jl, kl, iSurface));
+
+                    RDouble rad = invSpectralRadius(il, jl, kl, iSurface - 1);
+
+                    GetMXDQ(prim_former, nx, ny, nz, dq_former, df, rad, 1);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        df_total[m] += half * df[m];
+                    }
+
+                    if (isViscous)
+                    {
+                        RDouble rad_vis = half * visSpectralRadius(il, jl, kl, iSurface - 1);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            df_total[m] += rad_vis * dq_former[m];
+                        }
+                    }
+                }                
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    RDouble dqOld = dq(i, j, k, m);
+
+                    RDouble coef = 0.5;
+
+                    dq(i, j, k, m) = (res(i, j, k, m) + coef * dRHS(i, j, k, m) + df_total[m]) / diagonal(i, j, k, m);
+
+                    dRHS(i, j, k, m) = df_total[m];
+
+                    sweepNormal += SQR(dq(i, j, k, m) - dqOld);
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::SolveLUSGSBackward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+    if(tscheme == JACOBIAN_ITERATION)
+    {
+        return;
+    }
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &dq = dqProxy->GetField_STR();
+    RDouble4D &dRHS = LUplusDQ->GetField_STR();
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+    RDouble4D &diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+    RDouble4D &res = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));    
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_FD"));
+
+    RDouble4D &xfv  = *(grid->GetFaceVectorX());
+    RDouble4D &yfv  = *(grid->GetFaceVectorY());
+    RDouble4D &zfv  = *(grid->GetFaceVectorZ());
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    bool isViscous = parameters->IsViscous();
+    const int nEquation  = 5;
+
+    RDouble df[5];
+    RDouble df_total[5];
+    RDouble prim_after[5];
+    RDouble dq_after[5];    
+
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }    
+
+    int nDim = GetDim();
+    for (int k = ked; k >= kst; -- k)
+    {
+        for (int j = jed; j >= jst; -- j)
+        {
+            for (int i = ied; i >= ist; -- i)
+            {
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    df_total[m] = 0.0;
+                }
+
+                for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+                {
+                    int il1, jl1, kl1;
+                    GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+                    int il = i + il1;
+                    int jl = j + jl1;
+                    int kl = k + kl1;
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        prim_after[m] =  q(il, jl, kl, m);
+                        dq_after[m]   = dq(il, jl, kl, m);
+                    }
+
+                    RDouble nx  = half * (xfv (il, jl, kl, iSurface)  + xfv (il + il1, jl + jl1, kl + kl1, iSurface));
+                    RDouble ny  = half * (yfv (il, jl, kl, iSurface)  + yfv (il + il1, jl + jl1, kl + kl1, iSurface));
+                    RDouble nz  = half * (zfv (il, jl, kl, iSurface)  + zfv (il + il1, jl + jl1, kl + kl1, iSurface));
+
+                    RDouble rad = invSpectralRadius(il, jl, kl, iSurface - 1);
+                    
+                    GetMXDQ(prim_after, nx, ny, nz, dq_after, df, rad, -1);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        df_total[m] += - half * df[m];
+                    }
+
+                    if (isViscous)
+                    {
+                        RDouble rad_vis = half * visSpectralRadius(il, jl, kl, iSurface - 1);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            df_total[m] += rad_vis * dq_after[m];
+                        }
+                    }
+                }
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    RDouble dqOld = dq(i, j, k, m);
+                    dq(i, j, k, m) = (res(i, j, k, m) + dRHS(i, j, k, m) + df_total[m]) / diagonal(i, j, k, m);
+                    dRHS(i, j, k, m) = df_total[m];
+                    sweepNormal += SQR(dq(i, j, k, m) - dqOld);
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::SolveLUSGSbyJacobiIteration(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *dqtmpProxy, RDouble &sweepNormal)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &dq    = dqProxy->GetField_STR();
+    RDouble4D &dqtmp = dqtmpProxy->GetField_STR();
+    RDouble4D &invSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble4D &visSpectralRadius = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("visSpectralRadius"));
+    RDouble4D &diagonal= *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+    RDouble4D &res = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));    
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_FD"));
+
+    RDouble4D &xfv = *(grid->GetFaceVectorX());
+    RDouble4D &yfv = *(grid->GetFaceVectorY());
+    RDouble4D &zfv = *(grid->GetFaceVectorZ());
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    bool isViscous = parameters->IsViscous();
+    const int nEquation  = 5;
+
+    RDouble df[5];
+    RDouble df_total[5];
+    RDouble prim_former[5];
+    RDouble dq_former[5];
+    RDouble prim_after[5];
+    RDouble dq_after[5]; 
+
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }    
+
+    int nDim = GetDim();
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    df_total[m] = 0.0;     
+                }
+
+                for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+                {
+                    int il1, jl1, kl1;
+                    GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+                    int il = i - il1;
+                    int jl = j - jl1;
+                    int kl = k - kl1;
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        prim_former[m] = q(il, jl, kl, m);
+                        dq_former[m] = dq(il, jl, kl, m);
+                    }
+                   
+                    RDouble nx = half * (xfv(i, j, k, iSurface) + xfv(il, jl, kl, iSurface));
+                    RDouble ny = half * (yfv(i, j, k, iSurface) + yfv(il, jl, kl, iSurface));
+                    RDouble nz = half * (zfv(i, j, k, iSurface) + zfv(il, jl, kl, iSurface));
+
+                    RDouble rad = invSpectralRadius(il, jl, kl, iSurface - 1);
+
+                    GetMXDQ(prim_former, nx, ny, nz, dq_former, df, rad, 1);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        df_total[m] += half * df[m];
+                    }
+
+                    if (isViscous)
+                    {
+                        RDouble rad_vis = half * visSpectralRadius(il, jl, kl, iSurface - 1);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            df_total[m] += rad_vis * dq_former[m];
+                        }
+                    }
+                }
+
+                for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+                {
+                    int il1, jl1, kl1;
+                    GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+                    int il = i + il1;
+                    int jl = j + jl1;
+                    int kl = k + kl1;
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        prim_after[m] = q(il, jl, kl, m);
+                        dq_after[m] = dq(il, jl, kl, m);
+                    }
+
+                    RDouble nx  = half * (xfv (il, jl, kl, iSurface) + xfv (il + il1, jl + jl1, kl + kl1, iSurface));
+                    RDouble ny  = half * (yfv (il, jl, kl, iSurface) + yfv (il + il1, jl + jl1, kl + kl1, iSurface));
+                    RDouble nz  = half * (zfv (il, jl, kl, iSurface) + zfv (il + il1, jl + jl1, kl + kl1, iSurface));
+
+                    RDouble  rad = invSpectralRadius(il, jl, kl, iSurface - 1);
+                    
+                    GetMXDQ(prim_after, nx, ny, nz, dq_after, df, rad, -1);
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        df_total[m] += - half * df[m];
+                    }
+
+                    if (isViscous)
+                    {
+                        RDouble rad_vis = half * visSpectralRadius(il, jl, kl, iSurface - 1);
+
+                        for (int m = 0; m < nEquation; ++ m)
+                        {
+                            df_total[m] += rad_vis * dq_after[m];
+                        }
+                    }
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    dqtmp(i, j, k, m) = (res(i, j, k, m) + df_total[m]) / diagonal(i, j, k, m);
+                }
+            }
+        }
+    }
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    sweepNormal += SQR(dqtmp(i, j, k, m) - dq(i, j, k, m));
+
+                    dq(i, j, k, m) = dqtmp(i, j, k, m);
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::LUSGSInitializationStructHighOrder(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ)
+{
+    StructGrid *grid = StructGridCast(gridIn);   
+    RDouble4D &diagonal = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("diagonal"));
+    RDouble4D &res = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("res"));    
+    RDouble4D &dq = dqProxy->GetField_STR();
+    RDouble4D &dRHS = LUplusDQ->GetField_STR();
+    
+    dRHS = 0.0;
+    dq = 0.0;
+    //! This statement is necessary.
+    //! Otherwise debug failed to run for unknown reason.
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int m = 0; m < 5; ++ m)
+                {
+                    dq(i, j, k, m) = res(i, j, k, m) / diagonal(i, j, k, m);
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    GetIJKRegion(I, J, K, ist, ied, jst, jed, kst, ked);
+
+    RDouble4D &q  = qProxy->GetField_STR();
+    RDouble4D &dq = dqProxy->GetField_STR();
+    RDouble4D &qnew = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q_FD"));
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+
+    using namespace IDX;
+
+    RDouble roo = primitiveVarFarfield[IR];
+    RDouble poo = primitiveVarFarfield[IP];
+    RDouble densitylimit  = 1.0e-6 * roo;
+    RDouble pressurelimit = 1.0e-6 * poo;
+
+    int     nNegativeCell = 0;
+
+    RDouble prim[5];
+    RDouble qtry[5];
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int m = 0; m < 5; ++ m)
+                {
+                    prim[m] = q(i, j, k, m);
+                }
+                
+                Primitive2Conservative(prim, qtry);
+
+                if (dq(i, j, k, 0) > 0.0)
+                {
+                    qtry[0] += dq(i, j, k, 0);
+                }
+                else
+                {
+                    qtry[0] = qtry[0] * exp(dq(i, j, k,0) / (qtry[0] + 1.E-6));
+                }
+
+                for (int m = 1; m < 5; ++ m)
+                {
+                    qtry[m] += dq(i, j, k, m);
+                }
+
+                Conservative2Primitive(qtry, prim);
+                
+                prim[IP] = ABS (prim[IP]);
+
+                if (prim[IR] < densitylimit || prim[IP] < pressurelimit)
+                {
+                    nNegativeCell += 1;
+                    SolutionFix(qProxy, prim, i, j, k);
+                }
+
+                for (int m = 0; m < 5; ++ m)
+                {
+                    qnew(i, j, k, m) = prim[m];
+                }
+            }
+        }
+    }
+
+    if (nNegativeCell > 0)
+    {
+        cout << "Warning: negative pressure or density appears in " << nNegativeCell << " cells ... " << endl;
+    }
+
+    ObtainBoundaryValue(grid);
+    ObtainGamaAndTemperature(grid);
+
+    RDouble4D &tFD = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t_FD"));
+    RDouble4D &q_ordinary = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &t_ordinary = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("t"));
+
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+    GetIJKRegion(I, J, K, ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                t_ordinary(i, j, k, 0) = tFD(i, j, k, 0);
+                for (int m = 0; m < 5; ++ m)
+                {
+                    q_ordinary(i, j, k, m) = qnew(i, j, k, m);
+                }
+            }
+        }
+    }
+}
+
+void NSSolverStructFD::SolutionFix(FieldProxy *qProxy, RDouble prim[5], int i, int j, int k)
+{
+    RDouble4D &q  = qProxy->GetField_STR();
+
+    int np = 0;
+    int nDim = GetDim();
+
+    for (int iEquation = 0; iEquation < 5; ++ iEquation)
+    {
+        prim[iEquation] = zero;
+    }
+
+    for (int ii = -1; ii <= 1; ++ ii)
+    {
+        for (int jj = -1; jj <= 1; ++ jj)
+        {
+            for (int kk = -1; kk <= 1; ++ kk)
+            {
+                int kk2d = kk;
+                if (nDim == 2)
+                {
+                    kk2d = 0;
+                }
+                if ((ABS(ii) + ABS(jj) + ABS(kk2d)) == 1)
+                {
+                    np = np + 1;
+                    for (int iEquation = 0; iEquation < 5; ++ iEquation)
+                    {
+                        RDouble f = q(i + ii ,j + jj, k + kk2d, iEquation);
+                        prim[iEquation] += f;
+                    }
+                }
+            }
+        }
+    }
+
+    for (int iEquation = 0; iEquation < 5; ++ iEquation)
+    {
+        prim[iEquation] /= np;
+    }
+}
+
+void NSSolverStructFD::GetMXDQ(RDouble *prim, RDouble KX, RDouble KY, RDouble KZ, RDouble *dq, RDouble *f, RDouble radius, int ipn)
+{
+    const RDouble gama = 1.4;
+    const RDouble gama1 = gama - 1;
+
+    RDouble rm = prim[0];
+    RDouble um = prim[1];
+    RDouble vm = prim[2];
+    RDouble wm = prim[3];
+    RDouble pm = prim[4];
+    
+    RDouble Vn = KX * um + KY * vm + KZ * wm;
+    RDouble halfV2 = half * (um * um + vm * vm + wm * wm);
+    RDouble hm = (gama / gama1)* (pm / rm) + halfV2;
+    RDouble lmd1 = Vn + ipn * radius;
+    
+    RDouble dc = Vn * dq[0] - KX * dq[1] - KY * dq[2] - KZ * dq[3];    
+    RDouble dh = gama1 * (halfV2 * dq[0] - (um * dq[1] + vm * dq[2] + wm * dq[3]) + dq[4]);
+
+    f[0] = lmd1 * dq[0] -      dc;
+    f[1] = lmd1 * dq[1] - um * dc + KX * dh;
+    f[2] = lmd1 * dq[2] - vm * dc + KY * dh;
+    f[3] = lmd1 * dq[3] - wm * dc + KZ * dh;
+    f[4] = lmd1 * dq[4] - hm * dc + Vn * dh;
+}
+
+void NSSolverStructFD::UpdateQlQrOnlyforMixGrid(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    total_negative = 0;
+
+    FieldProxy * qlProxy = new FieldProxy();
+    FieldProxy * qrProxy = new FieldProxy();
+
+    int nDim = GetDim();
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        if (iSurface == 1)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1")));
+        }
+        else if (iSurface == 2)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2")));
+        }
+        else
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3")));
+        }
+
+        GetFaceVariable_HDCS_firstlayerExplicit(grid, qlProxy, qrProxy, iSurface);
+        GetFaceVariableCorrectionAtPhysicalBoundary(grid, qlProxy, qrProxy, iSurface);
+        GetFaceVariable_HDCS_otherlayerImplicit(grid, qlProxy, qrProxy, iSurface);
+    }
+
+    /*if (total_negative > 0)
+    {
+        std::cout<<"warning:    "<<total_negative<<std::endl;
+    }*/
+
+    delete qlProxy;
+    delete qrProxy;
+}
+
+void NSSolverStructFD::UpdateInviscidfluxOnlyforMixGrid(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    FieldProxy * qlProxy = new FieldProxy();
+    FieldProxy * qrProxy = new FieldProxy();
+    FieldProxy * fluxProxy = new FieldProxy();
+
+    int nDim = GetDim();
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        if (iSurface == 1)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1")));
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI")));
+        }
+        else if (iSurface == 2)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2")));
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ")));
+        }
+        else
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3")));
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK")));
+        }
+
+        GetFaceInviscidFlux(grid, qlProxy, qrProxy, fluxProxy, iSurface);
+    }
+
+    delete qlProxy;
+    delete qrProxy;
+    delete fluxProxy;
+}
+
+void NSSolverStructFD::UpdateViscousfluxOnlyforMixGrid(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int viscousType = parameters->GetViscousType();
+    if (viscousType <= INVISCID)
+    {
+        return;
+    }
+
+    FieldProxy * fluxProxy = new FieldProxy();
+
+    int nDim = GetDim();
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        if (iSurface == 1)
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxI")));
+        }
+        else if (iSurface == 2)
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxJ")));
+        }
+        else
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxK")));
+        }
+
+        GetGradientAtFace(gridIn, iSurface);
+        GetGradientAtFaceCorrectionAtPhysicalBoundary(gridIn, iSurface);
+        GetFaceViscousFlux(gridIn, fluxProxy, iSurface);
+    }
+    delete fluxProxy;
+}
+
+void NSSolverStructFD::LoadGlobalfacefluxtoResOnlyforMixGrid(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    
+    FieldProxy * fluxProxy = new FieldProxy();
+
+    int nDim = GetDim();
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        if (iSurface == 1)
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxI")));
+        }
+        else if (iSurface == 2)
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxJ")));
+        }
+        else
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceInviscidfluxK")));
+        }
+
+        GetCellInviscidFlux(gridIn, iSurface);
+        FluxDifference(grid, fluxProxy, iSurface);
+    }
+
+    Param_NSSolverStruct *parameters = GetControlParameters();
+
+    int viscousType = parameters->GetViscousType();
+    if (viscousType <= INVISCID)
+    {
+        delete fluxProxy;
+        return;
+    }
+
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        if (iSurface == 1)
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxI")));
+        }
+        else if (iSurface == 2)
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxJ")));
+        }
+        else
+        {
+            fluxProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("faceViscousfluxK")));
+        }
+
+        GetCellViscousFlux(gridIn, iSurface);
+        FluxDifference(gridIn, fluxProxy, iSurface);
+    }
+
+    delete fluxProxy;
+}
+
+
+}
diff --git a/CFD/NSSolver/src/NSSolverStructFV.cpp b/CFD/NSSolver/src/NSSolverStructFV.cpp
new file mode 100644
index 0000000..60de291
--- /dev/null
+++ b/CFD/NSSolver/src/NSSolverStructFV.cpp
@@ -0,0 +1,14 @@
+#include "NSSolverStructFV.h"
+using namespace std;
+
+namespace PHSPACE
+{
+NSSolverStructFV::NSSolverStructFV()
+{
+}
+
+NSSolverStructFV::~NSSolverStructFV()
+{
+}
+
+}
diff --git a/CFD/NSSolver/src/NSSolverUnstruct.cpp b/CFD/NSSolver/src/NSSolverUnstruct.cpp
new file mode 100644
index 0000000..c580e15
--- /dev/null
+++ b/CFD/NSSolver/src/NSSolverUnstruct.cpp
@@ -0,0 +1,22860 @@
+#include "NSSolverUnstruct.h"
+#include "MultiGridOperation.h"
+#include "GradientOperation.h"
+#include "Math_Limiter.h"
+#include "AerodynamicsBasicRelations.h"
+#include "Glb_Dimension.h"
+#include "Constants.h"
+#include <list>
+#include "Param_NSSolverUnstruct.h"
+#include "Post_ForceMoment.h"
+#include "Residual.h"
+#include "Jacobian.h"
+#include "FieldProxy.h"
+#include "TK_Exit.h"
+#include "TK_Log.h"
+#include "IO_FileName.h"
+#include "PHIO.h"
+#include "Force.h"
+#include "AleForceManager.h"
+#include <cmath>
+#include "Flux_RoeEntropyCorrection.h"
+#include "PHMpi.h"
+#include "TK_Time.h"
+#include "Geo_GridIndex.h"
+#include "MixedGas.h"
+#include "Gas.h"
+#ifdef USE_GMRESSOLVER
+ #include "petscksp.h"  
+#endif
+using namespace std;
+#pragma warning(disable:6386)
+#pragma warning(disable:6385)
+#pragma warning(disable:26451)
+#pragma warning (disable:913)
+
+namespace PHSPACE
+{
+using namespace GAS_SPACE;
+using namespace IDX;
+
+NSSolverUnstruct::NSSolverUnstruct()
+{
+    gradientNSField = 0;
+    gradientTemperature = 0;
+}
+
+NSSolverUnstruct::~NSSolverUnstruct()
+{
+    DeAllocateGlobalVariables();
+    FreeControlParameters();
+}
+
+void NSSolverUnstruct::ReadParameter()
+{
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    string uns_scheme_name = parameters->GetSpaceSecheme();
+
+    int uns_scheme = GetSchemeID(uns_scheme_name);
+    GlobalDataBase::UpdateData("uns_scheme", &uns_scheme, PHINT, 1);
+
+    //! GMRES
+    if (uns_scheme == ISCHEME_ROE || uns_scheme == ISCHEME_GMRES_ROE)
+    {
+        parameters->SetEntropyFixCoefficients();
+
+        Grid *grid = GetGrid();
+        int zoneID = grid->GetZoneID();
+        RDouble entropyAcoustic = parameters->GetRoeEntropyFixCoef1();
+        
+        //! The output of Entropy fix coefficient for ROE scheme.
+        if (zoneID == 0)    //! When grid->GetZoneID() = 0 and GetCurrentProcessorID() = 0.
+        {
+            PrintToWindow("Entropy fix coefficient for ROE scheme: ", entropyAcoustic, "\n");
+        }
+    }
+
+    string uns_limiter_name;
+    GlobalDataBase::GetData("uns_limiter_name", &uns_limiter_name, PHSTRING, 1);
+
+    int limiterType = GetLimiterID(uns_limiter_name);
+    parameters->SetLimiterType(limiterType);
+    GlobalDataBase::UpdateData("uns_limiter", &limiterType, PHINT, 1);
+
+    if (viscousType == INVISCID) return;
+
+    string uns_vis_name = "default";
+    GlobalDataBase::GetData("uns_vis_name", &uns_vis_name, PHSTRING, 1);
+
+    int uns_vis;
+    if (uns_vis_name.substr(0,4) == "test")
+    {
+        uns_vis = VIS_TEST;
+    }
+    else if (uns_vis_name.substr(0,4) == "aver")
+    {
+        uns_vis = VIS_AVER;
+    }
+    else if (uns_vis_name.substr(0,3) == "std")
+    {
+        uns_vis = VIS_STD;
+    }
+    else if (uns_vis_name.substr(0,4) == "new1")
+    {
+        uns_vis = VIS_NEW1;
+    }
+    else if (uns_vis_name.substr(0,4) == "new2")
+    {
+        uns_vis = VIS_NEW2;
+    }
+    else if (uns_vis_name.substr(0,4) == "eric")
+    {
+        uns_vis = VIS_ERIC;
+    }
+    else
+    {
+        uns_vis = VIS_STD;
+    }
+
+    GlobalDataBase::UpdateData("uns_vis", &uns_vis, PHINT, 1);
+}
+
+#ifdef USE_GMRESSOLVER
+void NSSolverUnstruct::FindNeighborOfRoot(int root, int& neighbor, int nTotalFace, int nBoundFace, int* leftCellofFace, int* rightCellofFace, vector<int>& AI, vector<int>& AJ, int counter)
+{
+    if(counter == 0)
+    {
+        return;
+    }
+
+    for (int iFace = 0; iFace < nTotalFace; iFace++)
+    {
+        if (leftCellofFace[iFace] == neighbor)
+        {
+            int newcell = rightCellofFace[iFace];
+            if (find(AJ.begin()+AI[root], AJ.begin()+AI[root + 1], newcell) == AJ.begin()+AI[root + 1])
+            {
+                AJ.push_back(newcell);
+                AI[root + 1]++;
+                FindNeighborOfRoot(root, newcell, nTotalFace, nBoundFace, leftCellofFace, rightCellofFace, AI, AJ, counter - 1);
+            }
+        }
+        if (rightCellofFace[iFace] == neighbor)
+        {
+            int newcell = leftCellofFace[iFace];
+            if (find(AJ.begin()+AI[root], AJ.begin()+AI[root + 1], newcell) == AJ.begin()+AI[root + 1])
+            {
+                AJ.push_back(newcell);
+                AI[root + 1]++;
+                FindNeighborOfRoot(root, newcell, nTotalFace, nBoundFace, leftCellofFace, rightCellofFace, AI, AJ, counter - 1);
+            }
+        }
+    }
+}
+
+void NSSolverUnstruct::AllocateJacobianMatrix4GMRES(Grid *gridIn)
+{
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+
+    // get limiter order 
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int limiterType = parameters->GetLimiterType();
+
+    // get flow type: inviscid or viscous
+    int viscousType = parameters->GetViscousType();
+
+    // determine the order required for the Jacobian matrix components
+    int order = 1;
+    int order_inv = 1;
+    int order_vis = 1;
+    if (tscheme == GMRES || tscheme == LU_SGS)
+    {
+        // inviscid part
+        if(limiterType == ILMT_FIRST)
+        {
+            order_inv = 1;
+        }
+        else if (limiterType == ILMT_NOLIM)
+        {
+            order_inv = 2;
+        }
+        else
+        {
+            printf("GMRES solver: uns_limiter_name is fixed to [1st] and [nolim] so far\n");
+            TK_Exit::ExceptionExit("If you implemented other methods, please change it in subroutine [FindJacobianIndex4GMRES]");
+        }
+
+        // viscous part
+        if(viscousType!=INVISCID)
+        {
+            string gradientName = parameters->GetGradientName();
+            if(gradientName == "ggcell")
+            {
+                order_vis = 2;
+            }
+            else 
+            {
+                printf("GMRES solver: for NS/RANS, ggcell only so far\n");
+                TK_Exit::ExceptionExit("If you implemented other methods, please change it in subroutine [FindJacobianIndex4GMRES]");
+            }
+        }
+        else
+        {
+            order_vis = 1;
+        }
+        order = MAX(order_inv, order_vis);
+    }
+
+    // get grid information
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+    int nEquation = GetNumberOfEquations();
+    int nTotal = nTotalCell + nBoundFace;
+    int nInterFace = nTotalFace - nBoundFace;
+    int *leftCellofFace = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    vector<int> AI;
+    vector<int> AJ;
+    AI.insert(AI.begin(), nTotal + 1, 0);
+    for (int iCell = 0; iCell < nTotal; iCell++)
+    {
+        AI[iCell + 1]++;
+        AJ.push_back(iCell);
+        FindNeighborOfRoot(iCell, iCell, nTotalFace, nBoundFace, leftCellofFace, rightCellofFace, AI, AJ, order);
+        if(iCell < nTotal - 1) AI[iCell + 2] = AI[iCell + 1];
+    }
+
+    int TotalSize = AI[nTotal];
+    RDouble** dRdq = NewPointer2<RDouble>(nEquation, nEquation * TotalSize);
+    grid->UpdateDataPtr("dRdq", dRdq);
+    PHSPACE::SetField(dRdq, nEquation, nEquation * TotalSize, 0.0);
+
+    grid->SetJacobianAI4GMRES(AI);
+    grid->SetJacobianAJ4GMRES(AJ);
+}
+
+void NSSolverUnstruct::AllocateJacobianMatrix4GMRES_Neighbor(Grid *gridIn)
+{
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+
+    // get limiter order 
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int limiterType = parameters->GetLimiterType();
+
+    // get flow type: inviscid or viscous
+    int viscousType = parameters->GetViscousType();
+
+    // determine the order required for the Jacobian matrix components
+    int order = 1;
+    int order_inv = 1;
+    int order_vis = 1;
+    //if (tscheme == GMRES)
+    //{
+    // inviscid part
+    if(limiterType == ILMT_FIRST)
+    {
+        order_inv = 1;
+    }
+    else if (limiterType == ILMT_NOLIM || limiterType == ILMT_VENCAT)
+    {
+        order_inv = 2;
+    }
+    else
+    {
+        printf("GMRES solver: uns_limiter_name is fixed to [1st] and [nolim] so far\n");
+        TK_Exit::ExceptionExit("If you implemented other methods, please change it in subroutine [FindJacobianIndex4GMRES]");
+    }
+    // viscous part
+    if(viscousType!=INVISCID)
+    {
+        string gradientName = parameters->GetGradientName();
+        if(gradientName == "ggcell")
+        {
+            order_vis = 2;
+        }
+        else 
+        {
+            printf("GMRES solver: for NS/RANS, ggcell only so far\n");
+            TK_Exit::ExceptionExit("If you implemented other methods, please change it in subroutine [FindJacobianIndex4GMRES]");
+        }
+    }
+    else
+    {
+        order_vis = 1;
+    }
+    order = MAX(order_inv, order_vis);
+    //}
+   
+    // get grid information
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+    int nEquation = GetNumberOfEquations();
+    int nTotal = nTotalCell + nBoundFace;
+    int nInterFace = nTotalFace - nBoundFace;
+    int *leftCellofFace = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    // compute the neighbor information
+    grid->ComputeNeighborinfo();
+    vector<int>* neighborCells = grid->GMRESGetNeighborCells();
+    //! GMRESParallel
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if( interfaceInfo != nullptr)
+    {
+        int* localInterfaceCellIndex = interfaceInfo->GetLocalInterfaceCellIndex();
+    }
+    //! GMRES CSR Format Jacobian matrix with respect to primitive variables
+    //   #AI:The i-th element records the number of non-zero elements contained in the first i-1 row
+    //   #AJ:The i-th element records the index of columns of the V [i] element, which V [i] is used to store the values of non zero elements in a matrix;
+    vector<int> AI;
+    vector<int> AJ;
+    //! GMRESParallel
+    vector<int> AK; // stores the number of ghost cell for interface bc at each row
+
+    vector<int> AI1st;  // GMRESJac1st  
+    vector<int> AJ1st;  // GMRESJac1st
+
+    AI.insert(AI.begin(), nTotal + 1, 0);
+    AK.insert(AK.begin(), nTotal, 0); 
+    if (order == 2)
+    {
+        AI1st.insert(AI1st.begin(), nTotal + 1, 0); // GMRESJac1st
+    }
+
+    for (int iCell = 0; iCell < nTotal; iCell++)
+    {
+        AI[iCell + 1]++;
+        AJ.push_back(iCell);
+
+        // GMRESJac1st
+        if(order == 2)
+        {
+            AI1st[iCell + 1]++;
+            AJ1st.push_back(iCell);
+        }
+
+        for(int index = 0; index < neighborCells[iCell].size(); index++)
+        {
+            int neighborIndex = neighborCells[iCell][index];
+            AI[iCell + 1]++;
+            AJ.push_back(neighborIndex);
+            //! GMRESParallel
+            if(neighborIndex >= nTotalCell && PHMPI::GetNumberofGlobalZones() != 1)
+            {
+                if(interfaceInfo->MatchedGlobalNeighborCellIndex(neighborIndex) != -1)
+                {
+                    AK[iCell]++;
+                    //printf("AK %d iCell %d\n", AK[iCell], iCell);
+                }
+            }
+            if(order == 2)
+            {
+                // GMRESJac1st
+                AI1st[iCell + 1]++;
+                AJ1st.push_back(neighborIndex);
+                
+                for(int indexJ = 0; indexJ < neighborCells[neighborIndex].size(); indexJ++)
+                {
+                    int neighborIndexJ = neighborCells[neighborIndex][indexJ];
+                    if(neighborIndexJ != iCell)
+                    {
+                        vector<int>::iterator result = find(AJ.begin()+AI[iCell], AJ.begin()+AI[iCell + 1], neighborIndexJ); // find qcell
+                        if(result==AJ.begin()+AI[iCell+1])
+                        {
+                            AI[iCell + 1]++;
+                            AJ.push_back(neighborIndexJ);
+                        }
+                    }
+                }
+            }
+        }
+
+        if(iCell < nTotal - 1) AI[iCell + 2]    = AI[iCell + 1];
+
+        if( order == 2)
+        {
+            if(iCell < nTotal - 1) AI1st[iCell + 2] = AI1st[iCell + 1];  // GMRESJac1st
+        } 
+    }
+   
+     //! set AK
+    if (interfaceInfo != nullptr && PHMPI::GetCurrentProcessorID() == 0)
+    {
+        for (int iCell = 0; iCell < nTotalCell; iCell++)
+        {
+            //printf("!cell %d, expectValue  ", iCell + 1);
+            int expectValue = 0;
+            int rcell = nTotalCell;
+            do
+            {
+                vector<int>::iterator result = find(AJ.begin() + AI[rcell], AJ.begin() + AI[rcell + 1], iCell); // find cell
+                if(result != AJ.begin() + AI[rcell + 1])
+                {
+                    expectValue++;
+                    int index = distance(AJ.begin(), result);
+                    //printf("%d ", interfaceInfo->MatchedGlobalNeighborCellIndex(rcell) + 1);
+                    // printf("%d ", AJ[index] + 1);
+                }
+                rcell++;
+            } while (rcell < nTotal);
+            //printf("\n");
+            AK[iCell] = expectValue;
+        }
+    } 
+    // TK_Exit::ExitPHengLEI();
+ 
+    //! GMRESCoupled
+    int blockSizeOfJacobianMatrix = nEquation;
+    if(viscousType == 3)
+    {
+        blockSizeOfJacobianMatrix++;
+    }
+    grid->SetBlockSizeOfJacobianMatrix(blockSizeOfJacobianMatrix);
+    
+    int TotalSize = AI[nTotal];
+    RDouble** dRdq = NewPointer2<RDouble>(nEquation, nEquation * TotalSize);
+    grid->UpdateDataPtr("dRdq", dRdq);
+    PHSPACE::SetField(dRdq, nEquation, nEquation * TotalSize, 0.0);
+
+    // GMRESJac1st
+    if( order == 2 )
+    {
+        int TotalSize1st    = AI1st[nTotal];
+        RDouble** dRdq1st   = NewPointer2<RDouble>(nEquation, nEquation * TotalSize1st);
+        grid->UpdateDataPtr("dRdq1st", dRdq1st);
+        PHSPACE::SetField(dRdq1st, nEquation, nEquation * TotalSize1st, 0.0);
+    }
+    else
+    {
+        RDouble** dRdq1st = NewPointer2<RDouble>(1,1);
+        grid->UpdateDataPtr("dRdq1st",dRdq1st);
+    }
+
+    grid->SetJacobianAI1st4GMRES(AI1st);
+    grid->SetJacobianAJ1st4GMRES(AJ1st);
+    grid->SetJacobianOrder(order);
+
+    grid->SetJacobianAI4GMRES(AI);
+    grid->SetJacobianAJ4GMRES(AJ);
+    grid->SetJacobianAK4GMRES(AK);
+
+    // GMRESCoupled
+    if( viscousType == ONE_EQU )
+    {
+        int TotalSize = AI[nTotal];
+        RDouble** dRdqCoupledTerm = NewPointer2<RDouble>(nEquation, TotalSize);
+        grid->UpdateDataPtr("dRdqCoupledTerm", dRdqCoupledTerm);
+        PHSPACE::SetField(dRdqCoupledTerm, nEquation, TotalSize, 0.0);
+    }
+
+    RDouble** dRdqCoupledTerm_turb = NewPointer2<RDouble>(1, nEquation*TotalSize);
+    grid->UpdateDataPtr("dRdqCoupledTerm_turb", dRdqCoupledTerm_turb);
+    PHSPACE::SetField(dRdqCoupledTerm_turb, 1, nEquation*TotalSize, 0.0);
+
+    // GMRESCoupled1st
+    if( viscousType == ONE_EQU && order == 2 )
+    {
+        int TotalSize1st    = AI1st[nTotal];
+        RDouble** dRdqCoupledTerm1st = NewPointer2<RDouble>(nEquation, TotalSize1st);
+        grid->UpdateDataPtr("dRdqCoupledTerm1st", dRdqCoupledTerm1st);
+        PHSPACE::SetField(dRdqCoupledTerm1st, nEquation, TotalSize1st, 0.0);
+    }
+    else
+    {
+        RDouble** dRdqCoupledTerm1st = NewPointer2<RDouble>(1, 1);
+        grid->UpdateDataPtr("dRdqCoupledTerm1st", dRdqCoupledTerm1st);
+    }
+
+    if( order==2 )
+    {
+        int TotalSize1st    = AI1st[nTotal];
+        RDouble** dRdqCoupledTerm_turb1st = NewPointer2<RDouble>(1, nEquation*TotalSize1st);
+        grid->UpdateDataPtr("dRdqCoupledTerm_turb1st", dRdqCoupledTerm_turb1st);
+        PHSPACE::SetField(dRdqCoupledTerm_turb1st, 1, nEquation*TotalSize1st, 0.0);
+    }
+    else
+    {
+        RDouble** dRdqCoupledTerm_turb1st = NewPointer2<RDouble>(1, 1);
+        grid->UpdateDataPtr("dRdqCoupledTerm_turb1st", dRdqCoupledTerm_turb1st);
+    }
+
+
+}
+#endif
+
+void NSSolverUnstruct::AllocateGlobalVar(Grid *gridIn)
+{
+    CFDSolver::AllocateGlobalVar(gridIn);
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **q   = NewPointer2<RDouble>(nEquation, nTotal);
+    RDouble **res = NewPointer2<RDouble>(nEquation, nTotal);
+    RDouble *diagonal = new RDouble [nTotal];
+
+    grid->UpdateDataPtr("q", q);    //! Scalar flow field variable(rho/u/v/w/p).
+    grid->UpdateDataPtr("res", res);    //! Residual or right-hand side.
+    grid->UpdateDataPtr("diagonal", diagonal);    //! Sacrificing space to improve efficiency.
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+    int nTurboZone = 0;
+    if (referenceFrame)
+    {
+        nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+    }
+
+#ifdef USE_GMRESSOLVER
+
+    int originaltscheme = GlobalDataBase::GetIntParaFromDB("OriginalTscheme");
+    if( originaltscheme == GMRES )
+    {
+        //! GMRES CSR Format Jacobian matrix with respect to primitive variables
+        AllocateJacobianMatrix4GMRES_Neighbor(gridIn);
+    }
+
+    //! GMRESBoundary d(Dummy)/d(Physical)
+    RDouble **dDdP = NewPointer2<RDouble>(nEquation, nEquation*nBoundFace);
+    grid->UpdateDataPtr("dDdP", dDdP);
+    PHSPACE::SetField(dDdP, nEquation, nEquation*nBoundFace, 0.0);
+#endif
+
+    RDouble **limit2D   = NewPointer2<RDouble>(nEquation, nTotal);
+    grid->UpdateDataPtr("limit2D", limit2D);
+
+    int nTotalNode = grid->GetNTotalNode();
+    RDouble **qnode = NewPointer2<RDouble>(nEquation, nTotalNode);
+    grid->UpdateDataPtr("qnode", qnode);    //! Scalar flow field variable(rho/u/v/w/p) at node.
+
+    RDouble **tnode = NewPointer2<RDouble>(nTemperatureModel, nTotalNode);
+    grid->UpdateDataPtr("tnode", tnode);    //! Static temperature at node.
+
+    RDouble *nodeWeight = new RDouble[nTotalNode];
+    grid->UpdateDataPtr("nodeWeight", nodeWeight);   //! Weight coefficient at node.
+
+    RDouble *nodeWeightTrade = new RDouble[nTotalNode];
+    PHSPACE::SetField(nodeWeightTrade, 0.0, nTotalNode);
+    grid->UpdateDataPtr("nodeWeightTrade", nodeWeightTrade);
+
+    if (grid->GetLevel() == 0)
+    {
+        int *nodeBCType = new int[nTotalNode];
+        PHSPACE::SetField(nodeBCType, 0, nTotalNode);
+        grid->UpdateDataPtr("nodeBCType", nodeBCType);
+    }
+
+    InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+    if (interpointInformation)
+    {
+        int numberOfInterpoints = interpointInformation->GetNumberOfInterpoints();
+        RDouble **qInterPoint = NewPointer2<RDouble>(nEquation, numberOfInterpoints);
+        grid->UpdateDataPtr("qInterPoint", qInterPoint);    //! Scalar flow field variable(rho/u/v/w/p) at interPoint.
+
+        //RDouble **tInterPoint = NewPointer2<RDouble>(1, numberOfInterpoints);
+        RDouble **tInterPoint = NewPointer2<RDouble>(nTemperatureModel, numberOfInterpoints);
+        grid->UpdateDataPtr("tInterPoint", tInterPoint);    //! Static temperature at interPoint.
+    }
+
+    RDouble *rtem = new RDouble [nTotal];
+    grid->UpdateDataPtr("rtem", rtem);    //! Pressure factor.
+
+    RDouble *invSpectralRadius = new RDouble [nTotalCell];
+    grid->UpdateDataPtr("invSpectralRadius", invSpectralRadius);    //! Inviscid spectral radius.
+
+    RDouble *visSpectralRadius = new RDouble [nTotalCell];
+    grid->UpdateDataPtr("visSpectralRadius", visSpectralRadius);    //! Viscous spectral radius.
+
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+    int nChemicalRadius = parameters->GetNChemicalRadius();
+
+    if (nChemical == 1 )
+    {
+        if(nChemicalRadius == 1)
+        {
+            RDouble **chemSpectralRadius = NewPointer2<RDouble>(nSpeciesNumber,nTotalCell);
+            grid->UpdateDataPtr("chemSpectralRadius"  , chemSpectralRadius);    //! Chemical reaction source item.
+        }
+    }
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        RDouble *preconCoefficient = new RDouble [nTotal];
+        grid->UpdateDataPtr("preconCoefficient", preconCoefficient);
+        PHSPACE::SetField(preconCoefficient, 1.0, nTotal);
+        RDouble *timeCoefficient = new RDouble [nTotal];
+        grid->UpdateDataPtr("timeCoefficient", timeCoefficient);
+        PHSPACE::SetField(timeCoefficient, 1.0, nTotal);
+        RDouble *timeCoefficientInverse = new RDouble [nTotal];
+        grid->UpdateDataPtr("timeCoefficientInverse", timeCoefficientInverse);
+        PHSPACE::SetField(timeCoefficientInverse, 1.0, nTotal);
+        int nElement = nEquation * nEquation;
+        RDouble **preconMatrix = NewPointer2 <RDouble> (nElement, nTotal);
+        grid->UpdateDataPtr("preconMatrix", preconMatrix);
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+
+    if (isUnsteady)
+    {
+        RDouble **q_unsteady_n1   = NewPointer2<RDouble>(nEquation, nTotal);
+        RDouble **q_unsteady_n2   = NewPointer2<RDouble>(nEquation, nTotal);
+        RDouble **res_unsteady_n1 = NewPointer2<RDouble>(nEquation, nTotal);
+        RDouble **res_unsteady_n2 = NewPointer2<RDouble>(nEquation, nTotal);
+
+        //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+        RDouble **res_unsteady_tmp = NewPointer2<RDouble>(nEquation, nTotal);
+
+        grid->UpdateDataPtr("q_unsteady_n1"  , q_unsteady_n1 );
+        grid->UpdateDataPtr("q_unsteady_n2"  , q_unsteady_n2 );
+        grid->UpdateDataPtr("res_unsteady_n1", res_unsteady_n1);
+        grid->UpdateDataPtr("res_unsteady_n2", res_unsteady_n2);
+        grid->UpdateDataPtr("res_unsteady_tmp", res_unsteady_tmp);
+
+        //! Statistical variables for unsteady simulation.
+        RDouble **qAverage = NewPointer2<RDouble>(nEquation, nTotal); 
+        grid->UpdateDataPtr("qAverage", qAverage);
+        PHSPACE::SetField(qAverage, nEquation, nTotal, zero);
+
+        RDouble **tauAverage = NewPointer2<RDouble>(6, nTotal); 
+        grid->UpdateDataPtr("tauAverage", tauAverage);
+        PHSPACE::SetField(tauAverage, 6, nTotal, zero);
+
+        RDouble **q2Average = NewPointer2<RDouble>(6, nTotal); 
+        grid->UpdateDataPtr("q2Average", q2Average);
+        PHSPACE::SetField(q2Average, 6, nTotal, zero);
+    }
+
+    RDouble **t = NewPointer2<RDouble>(nTemperatureModel, nTotal);
+    grid->UpdateDataPtr("t", t);    //! Static temperature.
+
+    RDouble *dt  = new RDouble [nTotal];
+    grid->UpdateDataPtr("dt", dt);    //! Time step.
+
+    RDouble *gama  = new RDouble [nTotal];
+    grid->UpdateDataPtr("gama", gama);    //! Ratio of specific heat coefficients at constant pressure and volume.
+
+    bool isViscous = parameters->IsViscous();
+
+    if (isViscous)
+    {
+        RDouble *visl = new RDouble [nTotal];
+        RDouble *vist = new RDouble [nTotal];
+
+        PHSPACE::SetField(visl, 1.0, nTotal);
+        PHSPACE::SetField(vist, 0.0, nTotal);
+
+        grid->UpdateDataPtr("visl", visl);    //! Laminar viscous coefficient.
+        grid->UpdateDataPtr("vist", vist);    //! Turbulence viscous coefficient.
+    }
+
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+    if (iLES == LES_SOLVER)
+    {
+        RDouble *subgridScaleEnergy = new RDouble[nTotal];
+        PHSPACE::SetField(subgridScaleEnergy, 0.0, nTotal);
+        grid->UpdateDataPtr("subgridScaleEnergy", subgridScaleEnergy);
+    }
+
+    RDouble **gradPrimtiveVarX = NewPointer2<RDouble>(nEquation, nTotal);
+    RDouble **gradPrimtiveVarY = NewPointer2<RDouble>(nEquation, nTotal);
+    RDouble **gradPrimtiveVarZ = NewPointer2<RDouble>(nEquation, nTotal);
+    PHSPACE::SetField(gradPrimtiveVarX, nEquation, nTotal, zero);
+    PHSPACE::SetField(gradPrimtiveVarY, nEquation, nTotal, zero);
+    PHSPACE::SetField(gradPrimtiveVarZ, nEquation, nTotal, zero);
+
+    grid->UpdateDataPtr("gradPrimtiveVarX", gradPrimtiveVarX);    //! Gradient of scalar flow field variable at cell, for x direction.
+    grid->UpdateDataPtr("gradPrimtiveVarY", gradPrimtiveVarY);    //! Gradient of scalar flow field variable at cell, for y direction.
+    grid->UpdateDataPtr("gradPrimtiveVarZ", gradPrimtiveVarZ);    //! Gradient of scalar flow field variable at cell, for z direction.
+
+    RDouble **gradTemperatureX = NewPointer2<RDouble>(nTemperatureModel, nTotal);
+    RDouble **gradTemperatureY = NewPointer2<RDouble>(nTemperatureModel, nTotal);
+    RDouble **gradTemperatureZ = NewPointer2<RDouble>(nTemperatureModel, nTotal);
+    PHSPACE::SetField(gradTemperatureX, nTemperatureModel, nTotal, zero);
+    PHSPACE::SetField(gradTemperatureY, nTemperatureModel, nTotal, zero);
+    PHSPACE::SetField(gradTemperatureZ, nTemperatureModel, nTotal, zero);
+    grid->UpdateDataPtr("gradTemperatureX", gradTemperatureX);    //! Gradient of static temperature at cell, for x direction.
+    grid->UpdateDataPtr("gradTemperatureY", gradTemperatureY);    //! Gradient of static temperature at cell, for y direction.
+    grid->UpdateDataPtr("gradTemperatureZ", gradTemperatureZ);    //! Gradient of static temperature at cell, for z direction.
+
+    //! Temporary variable for periodic boundary condition.
+    RDouble **rotNSgradValueX = NewPointer2<RDouble>(nEquation, nTotal);
+    RDouble **rotNSgradValueY = NewPointer2<RDouble>(nEquation, nTotal);
+    RDouble **rotNSgradValueZ = NewPointer2<RDouble>(nEquation, nTotal);
+    PHSPACE::SetField(rotNSgradValueX, nEquation, nTotal, zero);
+    PHSPACE::SetField(rotNSgradValueY, nEquation, nTotal, zero);
+    PHSPACE::SetField(rotNSgradValueZ, nEquation, nTotal, zero);
+    grid->UpdateDataPtr("rotNSgradValueX", rotNSgradValueX);
+    grid->UpdateDataPtr("rotNSgradValueY", rotNSgradValueY);
+    grid->UpdateDataPtr("rotNSgradValueZ", rotNSgradValueZ);
+
+    //! allocate mixing plane variables.
+    //! for multi-row turbomachinery.
+    if (nTurboZone > 0)
+    {
+        int nSpanSection = PHSPACE::GlobalDataBase::GetIntParaFromDB("nSpanSection");
+        int nType = 2;
+        RDouble **q_Face = NewPointer2<RDouble>(nEquation, nTotal);
+        RDouble **qCon_Face = NewPointer2<RDouble>(nEquation, nTotal);
+        PHSPACE::SetField(q_Face, nEquation, nTotal, zero);
+        PHSPACE::SetField(qCon_Face, nEquation, nTotal, zero);
+        grid->UpdateDataPtr("q_Face", q_Face);
+        grid->UpdateDataPtr("qCon_Face", qCon_Face);
+
+        //! zone with MixingIn and MixingOut.
+        int nFlag = 10 * nTurboZone + 2;
+        RDouble **Radius_Face = NewPointer2<RDouble>(nFlag, nTotal);
+        RDouble **Radius_Span = NewPointer2<RDouble>(nFlag, nSpanSection);
+        PHSPACE::SetField(Radius_Face, nFlag, nTotal, zero);
+        PHSPACE::SetField(Radius_Span, nFlag, nSpanSection, zero);
+        grid->UpdateDataPtr("Radius_Face", Radius_Face);
+        grid->UpdateDataPtr("Radius_Span", Radius_Span);
+
+        RDouble ***SpanFlux      = NewPointer3<RDouble>(nFlag, nEquation, nSpanSection);
+        RDouble ***q_Span        = NewPointer3<RDouble>(nFlag, nEquation, nSpanSection);
+        RDouble ***qCon_Span     = NewPointer3<RDouble>(nFlag, nEquation, nSpanSection);
+        RDouble ***qSpanNeighbor = NewPointer3<RDouble>(nFlag, nEquation, nSpanSection);
+        RDouble ***dqSpanIn      = NewPointer3<RDouble>(nFlag, nEquation, nSpanSection);
+        RDouble ***dqSpanEx      = NewPointer3<RDouble>(nFlag, nEquation, nSpanSection);
+        RDouble ***dcSpan        = NewPointer3<RDouble>(nFlag, nEquation, nSpanSection);
+        InitMixingPlane(SpanFlux, nFlag, nEquation, nSpanSection, zero);
+        InitMixingPlane(q_Span, nFlag, nEquation, nSpanSection, zero);
+        InitMixingPlane(qCon_Span, nFlag, nEquation, nSpanSection, zero);
+        InitMixingPlane(qSpanNeighbor, nFlag, nEquation, nSpanSection, zero);
+        InitMixingPlane(dqSpanIn, nFlag, nEquation, nSpanSection, zero);
+        InitMixingPlane(dqSpanEx, nFlag, nEquation, nSpanSection, zero);
+        InitMixingPlane(dcSpan, nFlag, nEquation, nSpanSection, zero);
+        grid->UpdateDataPtr("SpanFlux", SpanFlux);
+        grid->UpdateDataPtr("q_Span", q_Span);
+        grid->UpdateDataPtr("qCon_Span", qCon_Span);
+        grid->UpdateDataPtr("qSpanNeighbor", qSpanNeighbor);
+        grid->UpdateDataPtr("dqSpanIn", dqSpanIn);
+        grid->UpdateDataPtr("dqSpanEx", dqSpanEx);
+        grid->UpdateDataPtr("dcSpan", dcSpan);
+
+        RDouble **SpanArea = NewPointer2<RDouble>(nFlag, nSpanSection);
+        PHSPACE::SetField(SpanArea, nFlag, nSpanSection, zero);
+        grid->UpdateDataPtr("SpanArea", SpanArea);
+
+        RDouble **nxsSpan = NewPointer2<RDouble>(nFlag, nSpanSection);
+        RDouble **ntsSpan = NewPointer2<RDouble>(nFlag, nSpanSection);
+        RDouble **nrsSpan = NewPointer2<RDouble>(nFlag, nSpanSection);
+        PHSPACE::SetField(nxsSpan, nFlag, nSpanSection, zero);
+        PHSPACE::SetField(ntsSpan, nFlag, nSpanSection, zero);
+        PHSPACE::SetField(nrsSpan, nFlag, nSpanSection, zero);
+        grid->UpdateDataPtr("nxsSpan", nxsSpan);
+        grid->UpdateDataPtr("ntsSpan", ntsSpan);
+        grid->UpdateDataPtr("nrsSpan", nrsSpan);
+    }
+
+    systemgridtype = GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if (MIXGRID == systemgridtype)
+    {
+        InitiallimiterOnlyForMixGrid(grid);
+
+        InitialInviscidfaceproxyOnlyForMixGrid(grid);
+
+        if (isViscous)
+        {
+            InitialViscousfaceproxyOnlyForMixGrid(grid);
+        }
+    }
+    //DelPointer2(res);
+    //DelPointer2(q);
+    int level = grid->GetLevel();
+    int zoneID = grid->GetZoneLocalID();
+    if (level ==0 && zoneID == 0)
+    {
+        RDouble *monitorVariables = new RDouble [30];
+        PHSPACE::SetField(monitorVariables, 0.0, 30);
+        GlobalDataBase::UpdateDataPtr("monitorVariables", monitorVariables);
+    }
+}
+
+void NSSolverUnstruct::DeAllocateGlobalVar(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+
+    int nChemicalRadius = parameters->GetNChemicalRadius();
+
+    RDouble **q    = reinterpret_cast <RDouble **> (grid->GetDataPtr("q"));
+    RDouble **res  = reinterpret_cast <RDouble **> (grid->GetDataPtr("res"));
+    RDouble *diagonal = reinterpret_cast <RDouble *> (grid->GetDataPtr("diagonal"));
+
+    DelPointer2(q);
+    DelPointer2(res);
+    delete [] diagonal;
+
+    RDouble **limit2D = reinterpret_cast <RDouble **> (grid->GetDataPtr("limit2D"));
+    DelPointer2(limit2D);
+
+    RDouble **tnode = reinterpret_cast <RDouble **> (grid->GetDataPtr("tnode"));
+    RDouble **qnode = reinterpret_cast <RDouble **> (grid->GetDataPtr("qnode"));
+    DelPointer2(tnode);
+    DelPointer2(qnode);
+
+    RDouble *nodeWeight = reinterpret_cast <RDouble *> (grid->GetDataPtr("nodeWeight"));
+    RDouble *nodeWeightTrade = reinterpret_cast <RDouble *> (grid->GetDataPtr("nodeWeightTrade"));
+    delete [] nodeWeight;
+    delete [] nodeWeightTrade;
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+    int nTurboZone = 0;
+    if (referenceFrame)
+    {
+        nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+    }
+
+
+#ifdef USE_GMRESSOLVER
+    //! GMRESBoundary
+    RDouble **dDdP = reinterpret_cast <RDouble**> (grid->GetDataPtr("dDdP"));
+    DelPointer2(dDdP);
+
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+
+    if( tscheme == GMRES )
+    {
+        //! GMRES
+        RDouble **dRdq = reinterpret_cast <RDouble**> (grid->GetDataPtr("dRdq"));
+        //! GMRESJac1st
+        RDouble **dRdq1st = reinterpret_cast <RDouble**> (grid->GetDataPtr("dRdq1st"));
+        DelPointer2(dRdq);
+        DelPointer2(dRdq1st);
+
+        //! GMRESCoupled
+        int GviscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+        if( GviscousType == ONE_EQU )
+        {
+            RDouble **dRdqCoupledTerm       = reinterpret_cast <RDouble**> (grid->GetDataPtr("dRdqCoupledTerm"));
+
+            DelPointer2(dRdqCoupledTerm);
+        }
+
+        RDouble **dRdqCoupledTerm_turb      = reinterpret_cast <RDouble**> (grid->GetDataPtr("dRdqCoupledTerm_turb"));
+        RDouble **dRdqCoupledTerm1st        = reinterpret_cast <RDouble**> (grid->GetDataPtr("dRdqCoupledTerm1st"));
+        RDouble **dRdqCoupledTerm_turb1st   = reinterpret_cast <RDouble**> (grid->GetDataPtr("dRdqCoupledTerm_turb1st"));
+        DelPointer2(dRdqCoupledTerm_turb);
+        DelPointer2(dRdqCoupledTerm1st);
+        DelPointer2(dRdqCoupledTerm_turb1st);
+    }
+#endif
+    if (grid->GetLevel() == 0)
+    {
+        int *nodeBCType = reinterpret_cast <int *> (grid->GetDataPtr("nodeBCType"));
+        delete [] nodeBCType;
+    }
+
+    InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+    if (interpointInformation)
+    {
+        RDouble **qInterPoint = reinterpret_cast <RDouble **> (grid->GetDataPtr("qInterPoint"));
+        RDouble **tInterPoint = reinterpret_cast <RDouble **> (grid->GetDataPtr("tInterPoint"));
+        DelPointer2(qInterPoint);
+        DelPointer2(tInterPoint);
+    }
+
+    RDouble *rtem = reinterpret_cast <RDouble *> (grid->GetDataPtr("rtem"));
+    delete [] rtem;
+    RDouble *invSpectralRadius = reinterpret_cast <RDouble *> (grid->GetDataPtr("invSpectralRadius"));
+    delete [] invSpectralRadius;
+    RDouble *visSpectralRadius = reinterpret_cast <RDouble *> (grid->GetDataPtr("visSpectralRadius"));
+    delete [] visSpectralRadius;
+
+    RDouble* DiagValue = reinterpret_cast <RDouble*> (grid->GetDataPtr("DiagValue"));
+    if (DiagValue != NULL)
+    {
+        delete [] DiagValue;    DiagValue = NULL;
+    }
+
+    RDouble**** DMatrixStartByLine = reinterpret_cast<RDouble****>(grid->GetDataPtr("DMatrixStartByLine"));
+    RDouble**** UMatrixStartByLine = reinterpret_cast<RDouble****>(grid->GetDataPtr("UMatrixStartByLine"));
+    RDouble**** LMatrixStartByLine = reinterpret_cast<RDouble****>(grid->GetDataPtr("LMatrixStartByLine"));
+
+    if (DMatrixStartByLine != NULL)
+    {
+        delete [] DMatrixStartByLine;    DMatrixStartByLine = NULL;
+        delete [] UMatrixStartByLine;    UMatrixStartByLine = NULL;
+        delete [] LMatrixStartByLine;    LMatrixStartByLine = NULL;
+    }
+
+    MAT3D< RDouble >* diagMatrix = reinterpret_cast<MAT3D< RDouble > *>(grid->GetDataPtr("diagMatrix"));
+    MAT3D< RDouble >* lowerMatrix = reinterpret_cast<MAT3D< RDouble > *>(grid->GetDataPtr("lowerMatrix"));
+    MAT3D< RDouble >* upperMatrix = reinterpret_cast<MAT3D< RDouble > *>(grid->GetDataPtr("upperMatrix"));
+
+    if (diagMatrix != NULL)
+    {
+        delete diagMatrix;
+        delete upperMatrix;
+        delete lowerMatrix;
+    }
+
+    if (nChemical == 1)
+    {
+        if(nChemicalRadius == 1)
+        {
+            RDouble **chemSpectralRadius = reinterpret_cast< RDouble ** > ( grid->GetDataPtr("chemSpectralRadius") );
+            DelPointer2(chemSpectralRadius);
+            //grid->DeleteDataPtr("chemSpectralRadius");
+        }
+    }
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+    if (ifLowSpeedPrecon != 0)
+    {
+        RDouble *preconCoefficient = reinterpret_cast< RDouble * > (grid->GetDataPtr("preconCoefficient"));
+        RDouble *timeCoefficient = reinterpret_cast< RDouble * > (grid->GetDataPtr("timeCoefficient"));
+        RDouble *timeCoefficientInverse = reinterpret_cast< RDouble * > (grid->GetDataPtr("timeCoefficientInverse"));
+        RDouble **preconMatrix = reinterpret_cast< RDouble ** > (grid->GetDataPtr("preconMatrix"));
+        delete preconCoefficient;
+        delete timeCoefficient;
+        delete timeCoefficientInverse;
+        DelPointer2(preconMatrix);
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble **q_unsteady_n1   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q_unsteady_n1" ));
+        RDouble **q_unsteady_n2   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q_unsteady_n2" ));
+        RDouble **res_unsteady_n1 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res_unsteady_n1"));
+        RDouble **res_unsteady_n2 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res_unsteady_n2"));
+
+        //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+        RDouble **res_unsteady_tmp = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res_unsteady_tmp"));
+
+        DelPointer2(q_unsteady_n1 );
+        DelPointer2(q_unsteady_n2 );
+        DelPointer2(res_unsteady_n1);
+        DelPointer2(res_unsteady_n2);
+        DelPointer2(res_unsteady_tmp);
+
+        //! Statistical variables for unsteady simulation.
+        RDouble **qAverage = reinterpret_cast< RDouble ** > (grid->GetDataPtr("qAverage"));
+        DelPointer2(qAverage);
+
+        //! Statistical variables for unsteady simulation.
+        RDouble **tauAverage = reinterpret_cast< RDouble ** > (grid->GetDataPtr("tauAverage"));
+        DelPointer2(tauAverage);
+
+        RDouble **q2Average = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q2Average"));
+        DelPointer2(q2Average);
+    }
+
+    RDouble **t   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("t" ));
+    DelPointer2(t );
+
+    RDouble * dt  = reinterpret_cast< RDouble * > (grid->GetDataPtr("dt" ));
+    delete [] dt;    dt = NULL;
+
+    RDouble * gama  = reinterpret_cast< RDouble * > (grid->GetDataPtr("gama" ));
+    delete [] gama;    gama = NULL;
+
+    int viscousType = parameters->GetViscousType();
+
+    if (viscousType > INVISCID)
+    {
+        RDouble * visl = reinterpret_cast< RDouble * > (grid->GetDataPtr("visl"));
+        RDouble * vist = reinterpret_cast< RDouble * > (grid->GetDataPtr("vist"));
+        delete [] visl;    visl = NULL;
+        delete [] vist;    vist = NULL;
+    }
+
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+    if(iLES == LES_SOLVER)
+    {
+        RDouble * subgridScaleEnergy = reinterpret_cast< RDouble * > (grid->GetDataPtr("subgridScaleEnergy"));
+        delete [] subgridScaleEnergy;
+    }
+
+    //! deallocate mixing plane array.
+    if (nTurboZone > 0)
+    {
+        RDouble **q_Face    = reinterpret_cast <RDouble **> (grid->GetDataPtr("q_Face"));
+        RDouble **qCon_Face = reinterpret_cast <RDouble **> (grid->GetDataPtr("qCon_Face"));
+        RDouble **SpanArea  = reinterpret_cast <RDouble **> (grid->GetDataPtr("SpanArea"));
+
+        DelPointer2(q_Face);
+        DelPointer2(qCon_Face);
+        DelPointer2(SpanArea);
+
+        RDouble ***SpanFlux      = reinterpret_cast <RDouble ***> (grid->GetDataPtr("SpanFlux"));
+        RDouble ***q_Span        = reinterpret_cast <RDouble ***> (grid->GetDataPtr("q_Span"));
+        RDouble ***qCon_Span     = reinterpret_cast <RDouble ***> (grid->GetDataPtr("qCon_Span"));
+        RDouble ***qSpanNeighbor = reinterpret_cast <RDouble ***> (grid->GetDataPtr("qSpanNeighbor"));
+        RDouble ***dqSpanIn      = reinterpret_cast <RDouble ***> (grid->GetDataPtr("dqSpanIn"));
+        RDouble ***dqSpanEx      = reinterpret_cast <RDouble ***> (grid->GetDataPtr("dqSpanEx"));
+        RDouble ***dcSpan        = reinterpret_cast <RDouble ***> (grid->GetDataPtr("dcSpan"));
+
+        DelPointer3(SpanFlux);
+        DelPointer3(q_Span);
+        DelPointer3(qCon_Span);
+        DelPointer3(qSpanNeighbor);
+        DelPointer3(dqSpanIn);
+        DelPointer3(dqSpanEx);
+        DelPointer3(dcSpan);
+
+        RDouble **Radius_Face = reinterpret_cast <RDouble **> (grid->GetDataPtr("Radius_Face"));
+        RDouble **Radius_Span = reinterpret_cast <RDouble **> (grid->GetDataPtr("Radius_Span"));
+
+        DelPointer2(Radius_Face);
+        DelPointer2(Radius_Span);
+
+        RDouble **nxsSpan = reinterpret_cast <RDouble **> (grid->GetDataPtr("nxsSpan"));
+        RDouble **ntsSpan = reinterpret_cast <RDouble **> (grid->GetDataPtr("ntsSpan"));
+        RDouble **nrsSpan = reinterpret_cast <RDouble **> (grid->GetDataPtr("nrsSpan"));
+
+        DelPointer2(nxsSpan);
+        DelPointer2(ntsSpan);
+        DelPointer2(nrsSpan);
+    }
+
+    RDouble **gradPrimtiveVarX = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **gradPrimtiveVarY = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **gradPrimtiveVarZ = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    DelPointer2(gradPrimtiveVarX);
+    DelPointer2(gradPrimtiveVarY);
+    DelPointer2(gradPrimtiveVarZ);
+
+    RDouble **gradTemperatureX = reinterpret_cast< RDouble ** > (grid->GetDataPtr("gradTemperatureX" ));
+    RDouble **gradTemperatureY = reinterpret_cast< RDouble ** > (grid->GetDataPtr("gradTemperatureY" ));
+    RDouble **gradTemperatureZ = reinterpret_cast< RDouble ** > (grid->GetDataPtr("gradTemperatureZ" ));
+
+    DelPointer2(gradTemperatureX);
+    DelPointer2(gradTemperatureY);
+    DelPointer2(gradTemperatureZ);
+
+    RDouble **rotNSgradValueX = reinterpret_cast< RDouble ** > (grid->GetDataPtr("rotNSgradValueX"));
+    RDouble **rotNSgradValueY = reinterpret_cast< RDouble ** > (grid->GetDataPtr("rotNSgradValueY"));
+    RDouble **rotNSgradValueZ = reinterpret_cast< RDouble ** > (grid->GetDataPtr("rotNSgradValueZ"));
+
+    DelPointer2(rotNSgradValueX);
+    DelPointer2(rotNSgradValueY);
+    DelPointer2(rotNSgradValueZ);
+
+    int level = grid->GetLevel();
+    int zoneID = grid->GetZoneLocalID();
+    if (level ==0 && zoneID == 0)
+    {
+        RDouble *monitorVariables = reinterpret_cast< RDouble * > (GlobalDataBase::GetDataPtr("monitorVariables" ));
+        delete [] monitorVariables;
+}
+}
+
+bool NSSolverUnstruct::JudgeIfRestart()
+{
+    string restartNSFile = ".\results\flow.dat";
+    GlobalDataBase::GetData("restartNSFile", &restartNSFile, PHSTRING, 1);
+
+    if(PHMPI::IsParallelRun())
+    {
+        restartNSFile = PHSPACE::AddSymbolToFileName(restartNSFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(restartNSFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+    if(restart_flag)
+    {
+         int originaltscheme = GlobalDataBase::GetIntParaFromDB("OriginalTscheme");
+         if(GMRES == originaltscheme)
+         {
+            ostringstream oss;
+            oss << "The array \"OriginalTscheme\" is error. The GMRES solver cannot support restart calculation from flow.dat." << endl;
+            TK_Exit::ExceptionExit(oss);
+         }
+    }
+    return restart_flag;
+}
+
+bool NSSolverUnstruct::JudgeIfReadAverage()
+{
+    string restartNSFile = ".\results\flow.dat";
+    GlobalDataBase::GetData("restartNSFile", &restartNSFile, PHSTRING, 1);
+    string averageFlowFile = AddSymbolToFileName(restartNSFile, "_", "Average");
+
+    if (PHMPI::IsParallelRun())
+    {
+        averageFlowFile = PHSPACE::AddSymbolToFileName(averageFlowFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(averageFlowFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+void NSSolverUnstruct::DumpRestart(ActionKey *actkey)
+{
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int level = actkey->level;
+    UnstructGrid * grid = UnstructGridCast(GetGrid(level));
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+
+    int nEquation = GetNumberOfEquations();
+
+    int outnstep = 0;
+    GlobalDataBase::GetData("outnstep", &outnstep, PHINT, 1);
+
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotal = nTotalCell + nBoundFace;
+
+    DataContainer * cdata = actkey->GetData();
+    cdata->moveto_begin();
+    cdata->write(&outnstep,sizeof(int));
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        cdata->write(q[m],sizeof(RDouble) * nTotal);
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+
+    if (!isUnsteady) return;
+
+    RDouble physicalTime = 0;
+    GlobalDataBase::GetData("physicalTime",&physicalTime, PHDOUBLE, 1);
+
+    cdata->write(&physicalTime, sizeof(RDouble));
+
+    RDouble **qn1 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble **qn2 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q_unsteady_n2"));
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        cdata->write(qn1[m], sizeof(RDouble) * nTotal);
+    }
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        cdata->write(qn2[m],sizeof(RDouble) * nTotal);
+    }
+
+    RDouble **res   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res"           ));
+    RDouble **resn1 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble **resn2 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res_unsteady_n2"));
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        cdata->write(res[m], sizeof(RDouble) * nTotal);
+    }
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        cdata->write(resn1[m], sizeof(RDouble) * nTotal);
+    }
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        cdata->write(resn2[m],sizeof(RDouble) * nTotal);
+    }
+}
+
+void NSSolverUnstruct::DumpRestartH5(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int currentProcessorID = GetCurrentProcessorID();
+
+    int version = 1;
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int isUnsteady  = parameters->GetIsUnsteady();
+    int outputStepInterval = GlobalDataBase::GetIntParaFromDB("outnstep");
+    if (currentProcessorID == GetServerProcessorID())
+    {
+        WriteData(actkey->filepos, &version, "Version");
+        WriteData(actkey->filepos, &outputStepInterval, "outnstep");
+
+        if (isUnsteady == 1)
+        {
+            RDouble physicalTime   = static_cast<RDouble>(GlobalDataBase::GetDoubleParaFromDB("physicalTime"));
+            WriteData(actkey->filepos, &physicalTime, "physicalTime");
+
+            if (IsNeedStatistics())
+            {
+                int nStatisticalStep = 0;
+                GlobalDataBase::GetData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+                WriteData(actkey->filepos, &nStatisticalStep, "nStatisticalStep");
+            }
+        }
+    }
+
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    int nEquation = GetNumberOfEquations();
+
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    double **primitiveVariables = NewPointer2<double>(nEquation, nTotal);
+
+    for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            primitiveVariables[iEquation][iCell] = static_cast<double>(q[iEquation][iCell]);
+        }
+    }
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss<<"Group"<<gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    WriteData(grploc, primitiveVariables[0], "q");
+    WriteData(grploc, &nTotalCell, "nTotalCell");
+
+    if (isUnsteady == 1)
+    {
+        double **qn1 = reinterpret_cast< double ** > (grid->GetDataPtr("q_unsteady_n1"));
+        for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                primitiveVariables[iEquation][iCell] = static_cast<double>(qn1[iEquation][iCell]);
+            }
+        }
+        WriteData(grploc, primitiveVariables[0], "q_unsteady_n1");
+
+        RDouble **qn2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_unsteady_n2"));
+        for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                primitiveVariables[iEquation][iCell] = static_cast<double>(qn2[iEquation][iCell]);
+            }
+        }
+        WriteData(grploc, primitiveVariables[0], "q_unsteady_n2");
+
+        RDouble **res   = reinterpret_cast<RDouble **> (grid->GetDataPtr("res"));
+        for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                primitiveVariables[iEquation][iCell] = static_cast<double>(res[iEquation][iCell]);
+            }
+        }
+        WriteData(grploc, primitiveVariables[0], "res");
+
+        RDouble **resn1 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res_unsteady_n1"));
+        for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                primitiveVariables[iEquation][iCell] = static_cast<double>(resn1[iEquation][iCell]);
+            }
+        }
+        WriteData(grploc, primitiveVariables[0], "res_unsteady_n1");
+
+        RDouble **resn2 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res_unsteady_n2"));
+        for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                primitiveVariables[iEquation][iCell] = static_cast<double>(resn2[iEquation][iCell]);
+            }
+        }
+        WriteData(grploc, primitiveVariables[0], "res_unsteady_n2");
+
+        RDouble **qAverage = reinterpret_cast< RDouble ** > (grid->GetDataPtr("qAverage"));
+        for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                primitiveVariables[iEquation][iCell] = static_cast<double>(qAverage[iEquation][iCell]);
+            }
+        }
+        WriteData(grploc, primitiveVariables[0], "qAverage");
+
+        double **tauVariables = NewPointer2<double>(6, nTotal);
+
+        RDouble **tauAverage = reinterpret_cast< RDouble ** > (grid->GetDataPtr("tauAverage"));
+        for (int m = 0; m < 6; ++ m)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                tauVariables[m][iCell] = static_cast<double>(tauAverage[m][iCell]);
+            }
+        }
+        WriteData(grploc, tauVariables[0], "tauAverage");
+
+        RDouble **q2Average = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q2Average"));
+        for (int m = 0; m < 6; ++ m)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                tauVariables[m][iCell] = static_cast<double>(q2Average[m][iCell]);
+            }
+        }
+        WriteData(grploc, tauVariables[0], "q2Average");
+        DelPointer2(tauVariables);
+    }
+
+    H5Gclose(grploc);
+
+    DelPointer2(primitiveVariables);
+}
+
+void NSSolverUnstruct::ReadRestartH5(ActionKey *actkey)
+{
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    int outputStepInterval = 0;
+    ReadData(actkey->filepos, &outputStepInterval, "outnstep");
+    GlobalDataBase::UpdateData("outnstep", &outputStepInterval, PHINT, 1);
+
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    double **primitiveVariables = NewPointer2<double>(nEquation, nTotal);
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss<<"Group"<<gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    int nTotalCellRestart = 0;
+    ReadData(grploc, &nTotalCellRestart, "nTotalCell");
+
+    if(nTotalCellRestart != nTotalCell)
+    {
+        ostringstream erroeInfo;
+        erroeInfo << " Error: the cell number in flow.dat is not equal to the cell number in grid file !" << endl;
+        TK_Exit::ExceptionExit(erroeInfo.str());
+    }
+
+    ReadData(grploc, primitiveVariables[0], "q");
+    for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            q[iEquation][iCell] = static_cast<RDouble>(primitiveVariables[iEquation][iCell]);
+        }
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        H5Gclose(grploc);
+        DelPointer2(primitiveVariables);
+
+        return;
+    }
+
+    RDouble **qn1 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble **qn2 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q_unsteady_n2"));
+    RDouble **res   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res"           ));
+    RDouble **resn1 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble **resn2 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res_unsteady_n2"));
+    RDouble **qAverage = reinterpret_cast< RDouble ** > (grid->GetDataPtr("qAverage"));
+    RDouble **tauAverage = reinterpret_cast< RDouble ** > (grid->GetDataPtr("tauAverage"));
+    RDouble **q2Average = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q2Average"));
+
+    int ifStartFromSteadyResults = parameters->GetIfStartFromSteadyResults();
+    double physicalTimeIn = 0.0;
+
+    if (!CheckDataExist(actkey->filepos, "physicalTime"))
+    {
+        ifStartFromSteadyResults = 1;
+    }
+
+    if (ifStartFromSteadyResults)
+    {
+        PrintToWindow("Restart from steady NS flow field, reset outer step to be zero!\n");
+        //! Start from steady flow field.
+        //! Reset the outer step when start from steady flow.
+        outputStepInterval = 0;
+        GlobalDataBase::UpdateData("outnstep", &outputStepInterval, PHINT, 1);
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+            {
+                qn1[m][iCell] = q[m][iCell];
+                qn2[m][iCell] = q[m][iCell];
+                res[m][iCell]   = 0.0;
+                resn1[m][iCell] = 0.0;
+                resn2[m][iCell] = 0.0;
+            }
+        }
+    }
+    else
+    {
+        ReadData(actkey->filepos, &physicalTimeIn, "physicalTime");
+
+        ReadData(grploc, primitiveVariables[0], "q_unsteady_n1");
+        for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                qn1[iEquation][iCell] = static_cast<RDouble>(primitiveVariables[iEquation][iCell]);
+            }
+        }
+
+        ReadData(grploc, primitiveVariables[0], "q_unsteady_n2");
+        for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                qn2[iEquation][iCell] = static_cast<RDouble>(primitiveVariables[iEquation][iCell]);
+            }
+        }
+
+        ReadData(grploc, primitiveVariables[0], "res");
+        for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                res[iEquation][iCell] = static_cast<RDouble>(primitiveVariables[iEquation][iCell]);
+            }
+        }
+
+        ReadData(grploc, primitiveVariables[0], "res_unsteady_n1");
+        for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                resn1[iEquation][iCell] = static_cast<RDouble>(primitiveVariables[iEquation][iCell]);
+            }
+        }
+
+        ReadData(grploc, primitiveVariables[0], "res_unsteady_n2");
+        for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                resn2[iEquation][iCell] = static_cast<RDouble>(primitiveVariables[iEquation][iCell]);
+            }
+        }
+    }
+
+    int nStatisticalStep = 0;
+
+    if(IsNeedStatistics())
+    {
+        if(ifStartFromSteadyResults)
+        {
+            for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+            {
+                for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+                {
+                    qAverage[iEquation][iCell] = q[iEquation][iCell];
+                }
+            }
+        }
+        else
+        {
+            ReadData(grploc, qAverage[0], "qAverage");
+
+            ReadData(actkey->filepos, &nStatisticalStep, "nStatisticalStep");
+        }
+    }
+
+    if(IsNeedReynoldsStressStatistics())
+    {
+        if(ifStartFromSteadyResults)
+        {
+            for (int m = 0; m < 6; ++ m)
+            {
+                for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+                {
+                    tauAverage[m][iCell] = 0.0;
+                    q2Average[m][iCell] = 0.0;
+                }
+            }
+        }
+        else
+        {
+            ReadData(grploc, tauAverage[0], "tauAverage");
+
+            ReadData(grploc, q2Average[0], "q2Average");
+        }
+    }
+
+    GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+
+    RDouble physicalTime = static_cast<RDouble>(physicalTimeIn);
+    GlobalDataBase::UpdateData("physicalTime",&physicalTime, PHDOUBLE, 1);
+
+    H5Gclose(grploc);
+    DelPointer2(primitiveVariables);
+}
+
+void NSSolverUnstruct::ReadRestart(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid * grid = UnstructGridCast(GetGrid(level));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    DataContainer * cdata = actkey->GetData();
+    cdata->moveto_begin();
+    int outnstep = 0;
+    cdata->read(&outnstep,sizeof(int));
+
+    GlobalDataBase::UpdateData("outnstep", &outnstep, PHINT, 1);
+
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        cdata->read(q[m], sizeof(RDouble) * nTotal);
+    }
+
+    //ReadInterface(actkey);
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady) return;
+
+    RDouble **qn1 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble **qn2 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q_unsteady_n2"));
+
+    RDouble **res   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res"           ));
+    RDouble **resn1 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble **resn2 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res_unsteady_n2"));
+
+    int ifStartFromSteadyResults = parameters->GetIfStartFromSteadyResults();
+
+    RDouble physicalTime = 0.0;
+    if (ifStartFromSteadyResults)
+    {
+        PrintToWindow("Restart from steady NS flow field, reset outer step to be zero!\n");
+        //! Start from steady flow field.
+        //! Reset the outer step when start from steady flow.
+        outnstep = 0;
+        GlobalDataBase::UpdateData("outnstep", &outnstep, PHINT, 1);
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+            {
+                qn1[m][iCell] = q[m][iCell];
+                qn2[m][iCell] = q[m][iCell];
+
+                res[m][iCell]   = 0.0;
+                resn1[m][iCell] = 0.0;
+                resn2[m][iCell] = 0.0;
+            }
+        }
+    }
+    else
+    {
+        //! Start from unsteady flow field.
+        cdata->read(&physicalTime, sizeof(RDouble));
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            cdata->read(qn1[m], sizeof(RDouble) * nTotal);
+        }
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            cdata->read(qn2[m], sizeof(RDouble) * nTotal);
+        }
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            cdata->read(res[m],sizeof(RDouble) * nTotal);
+        }
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            cdata->read(resn1[m], sizeof(RDouble) * nTotal);
+        }
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            cdata->read(resn2[m], sizeof(RDouble) * nTotal);
+        }
+    }
+
+    GlobalDataBase::UpdateData("physicalTime",&physicalTime, PHDOUBLE, 1);
+}
+
+void NSSolverUnstruct::InitFlowAsRestart()
+{
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    UnstructGrid *grid = UnstructGridCast(GetGrid(0));
+    int outnstep = 0;
+    GlobalDataBase::UpdateData("outnstep",&outnstep, PHINT, 1);
+
+    RDouble physicalTime = 0.0;
+    GlobalDataBase::UpdateData("physicalTime",&physicalTime, PHDOUBLE, 1);
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            q[m][iCell] = primitiveVarFarfield[m];
+        }
+    }
+
+    int sysGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    int flowInitMethod = GlobalDataBase::GetIntParaFromDB("flowInitMethod");
+    RDouble attack = PI / 180.0 * GlobalDataBase::GetDoubleParaFromDB("attackd");
+    RDouble sideslip = PI / 180.0 * GlobalDataBase::GetDoubleParaFromDB("angleSlide");
+    RDouble direction_inlet[3] = { 0.0,0.0,0.0 };
+    direction_inlet[0] = cos(attack) * cos(sideslip);
+    direction_inlet[1] = sin(attack) * cos(sideslip);
+    direction_inlet[2] = sin(sideslip);
+    if (flowInitMethod == 1 && sysGridType == UNSTRUCTGRID)
+    {
+        RDouble maxBoundaryLayerWalldist = GlobalDataBase::GetDoubleParaFromDB("maxBoundaryLayerWalldist");
+        RDouble boundaryHeight = maxBoundaryLayerWalldist;
+        if (boundaryHeight > PHSPACE::SMALL)
+        {
+            for (int iCell = 0; iCell < nTotal; ++iCell)
+            {
+                RDouble *wallDistance = grid->GetWallDist();
+                RDouble *nearestwallfacenormalx = grid->GetNearestWallFaceNormalX();
+                RDouble *nearestwallfacenormaly = grid->GetNearestWallFaceNormalY();
+                RDouble *nearestwallfacenormalz = grid->GetNearestWallFaceNormalZ();
+                if (wallDistance[iCell] < boundaryHeight)
+                {
+                    //! iCell lay inside the boundary layer.
+                    RDouble enta = MIN(wallDistance[iCell] / boundaryHeight, 1.0);
+                    //! Normal velocity.
+                    RDouble dot = direction_inlet[0] * nearestwallfacenormalx[iCell] + direction_inlet[1] * nearestwallfacenormaly[iCell] + direction_inlet[2] * nearestwallfacenormalz[iCell];
+                    RDouble normalVelocity[3];
+                    normalVelocity[0] = dot * nearestwallfacenormalx[iCell];
+                    normalVelocity[1] = dot * nearestwallfacenormaly[iCell];
+                    normalVelocity[2] = dot * nearestwallfacenormalz[iCell];
+                    //! Tangential velocity.
+                    RDouble tangentialVelocity[3];
+                    tangentialVelocity[0] = direction_inlet[0] - normalVelocity[0];
+                    tangentialVelocity[1] = direction_inlet[1] - normalVelocity[1];
+                    tangentialVelocity[2] = direction_inlet[2] - normalVelocity[2];
+                    //! Tangential velocity normalization.
+                    RDouble tangentialVelocitymodulus = sqrt(tangentialVelocity[0] * tangentialVelocity[0] + tangentialVelocity[1] * tangentialVelocity[1] + tangentialVelocity[2] * tangentialVelocity[2]);
+                    if (tangentialVelocitymodulus > PHSPACE::SMALL)
+                    {
+                        RDouble tangentialVelocitynormalization[3];
+                        tangentialVelocitynormalization[0] = tangentialVelocity[0] / tangentialVelocitymodulus;
+                        tangentialVelocitynormalization[1] = tangentialVelocity[1] / tangentialVelocitymodulus;
+                        tangentialVelocitynormalization[2] = tangentialVelocity[2] / tangentialVelocitymodulus;
+                        q[IU][iCell] = tangentialVelocitynormalization[0] * (2 * enta - 2 * enta * enta * enta + enta * enta * enta * enta);
+                        q[IV][iCell] = tangentialVelocitynormalization[1] * (2 * enta - 2 * enta * enta * enta + enta * enta * enta * enta);
+                        q[IW][iCell] = tangentialVelocitynormalization[2] * (2 * enta - 2 * enta * enta * enta + enta * enta * enta * enta);
+                    }
+                    else 
+                    {
+                        q[IU][iCell] = direction_inlet[0] * (2 * enta - 2 * enta * enta * enta + enta * enta * enta * enta);
+                        q[IV][iCell] = direction_inlet[1] * (2 * enta - 2 * enta * enta * enta + enta * enta * enta * enta);
+                        q[IW][iCell] = direction_inlet[2] * (2 * enta - 2 * enta * enta * enta + enta * enta * enta * enta);
+                    }
+                }
+            }
+        }
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+
+    if (!isUnsteady)
+    {
+        RDouble **res = reinterpret_cast <RDouble **> (grid->GetDataPtr("res"));
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                res[m][iCell] = 0.0;
+            }
+        }
+        return;
+    }
+
+    RDouble **qn1 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble **qn2 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q_unsteady_n2"));
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            qn1[m][iCell] = q[m][iCell];
+        }
+    }
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            qn2[m][iCell] = q[m][iCell];
+        }
+    }
+
+    RDouble **res   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res"           ));
+    RDouble **resn1 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble **resn2 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res_unsteady_n2"));
+
+    //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+    RDouble **resTmp = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res_unsteady_tmp"));
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            res  [m][iCell] = 0.0;
+            resn1[m][iCell] = 0.0;
+            resn2[m][iCell] = 0.0;
+            resTmp[m][iCell] = 0.0;
+        }
+    }
+
+    int nStatisticalStep = 0;
+    GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+
+}
+
+void NSSolverUnstruct::UploadInterfaceData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(GetGrid(level));
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo)
+    {
+        return;
+    }
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    PHSPACE::UploadInterfaceValue(grid, q, "q",  nEquation);
+
+    RDouble **t = reinterpret_cast< RDouble ** > (grid->GetDataPtr("t"));
+    PHSPACE::UploadInterfaceValue(grid, t, "t", nTemperatureModel);
+ }
+
+void NSSolverUnstruct::DownloadInterfaceData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast< UnstructGrid * >(GetGrid(level));
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo) return;
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **q = reinterpret_cast< RDouble ** > ( grid->GetDataPtr("q"  ) );
+    PHSPACE::DownloadInterfaceValue(grid, q, "q", nEquation);
+
+    RDouble **t = reinterpret_cast< RDouble ** > (grid->GetDataPtr("t" ));
+    PHSPACE::DownloadInterfaceValue(grid, t, "t", nTemperatureModel);
+}
+
+void NSSolverUnstruct::UploadInterpointData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast< UnstructGrid * >(GetGrid(level));
+    InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+    if (interpointInformation == 0)
+    {
+        return;
+    }
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **qnode = reinterpret_cast<RDouble **>(grid->GetDataPtr("qnode"));
+    PHSPACE::UploadInterpointValue(grid, qnode, "qnode",  nEquation);
+
+    RDouble **tnode = reinterpret_cast<RDouble **>(grid->GetDataPtr("tnode"));
+    PHSPACE::UploadInterpointValue(grid, tnode, "tnode", nTemperatureModel);
+}
+
+void NSSolverUnstruct::DownloadInterpointData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(GetGrid(level));
+    InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+    if (interpointInformation == 0)
+    {
+        return;
+    }
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **qnode = reinterpret_cast<RDouble **>(grid->GetDataPtr("qnode"));
+    PHSPACE::DownloadInterpointValue(grid, qnode, "qnode", nEquation);
+
+    RDouble **tnode = reinterpret_cast<RDouble **> (grid->GetDataPtr("tnode"));
+    PHSPACE::DownloadInterpointValue(grid, tnode, "tnode", nTemperatureModel);
+}
+
+void NSSolverUnstruct::CommunicationInterpointWeight(ActionKey *actkey)
+{
+    int level = actkey->level;
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int myid = GetCurrentProcessorID();
+        int tag = iZone + level * nZones;
+        int send_proc = GetZoneProcessorID(iZone);
+
+        ZoneNeighbor *zoneNeighborForPoint = zoneConnectivityForPoint->GetZoneNeighborForPoint(iZone);
+        std::size_t numberOfNeighbor = zoneNeighborForPoint->GetNumberOfNeighbor();
+
+        for (std::size_t iNeighborZone = 0; iNeighborZone < numberOfNeighbor; ++ iNeighborZone)
+        {
+            int neighborZoneIndex = zoneNeighborForPoint->GetZoneIndexOfNeighbor(iNeighborZone);
+            int recv_proc = GetZoneProcessorID(neighborZoneIndex);
+
+            DataContainer *cdata = new DataContainer();
+
+            if (myid == send_proc)
+            {
+                UnstructGrid *grid = UnstructGridCast(PHSPACE::GetGrid(iZone, level));
+                InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+                RDouble *nodeWeight = reinterpret_cast<RDouble *>(grid->GetDataPtr("nodeWeight"));
+
+                cdata->moveto_begin();
+
+                int iNeighbor = interpointInformation->FindIthNeighbor(neighborZoneIndex);
+                int numberOfInterpointsForNeighbor = interpointInformation->GetNumberOfInterpointsForNeighbor(iNeighbor);
+                int *pointIndexForSend = interpointInformation->GetPointIndexForSend(iNeighbor);
+                int *interPoint2GlobalPoint = interpointInformation->GetInterPoint2GlobalPoint();
+
+                int iPoint;
+                int globalPoint;
+                RDouble valueWeight;
+                for (int ipointLocal = 0; ipointLocal < numberOfInterpointsForNeighbor; ++ ipointLocal)
+                {
+                    iPoint = pointIndexForSend[ipointLocal];
+                    globalPoint = interPoint2GlobalPoint[iPoint];
+                    valueWeight = nodeWeight[globalPoint];
+
+                    cdata->write(&valueWeight, sizeof(RDouble));
+                }
+            }
+
+            PH_Trade(cdata, send_proc, recv_proc, tag);
+
+            if (myid == recv_proc)
+            {
+                UnstructGrid *gridNeighbor = UnstructGridCast(PHSPACE::GetGrid(neighborZoneIndex, level));
+                InterpointInformation *interpointInformationNeighbor = gridNeighbor->GetInterpointInfo();
+                RDouble *nodeWeightTrade = reinterpret_cast<RDouble *>(gridNeighbor->GetDataPtr("nodeWeightTrade"));
+
+                cdata->moveto_begin();
+
+                int iNeighbor = interpointInformationNeighbor->FindIthNeighbor(iZone);
+                int numberOfInterpointsForNeighbor = interpointInformationNeighbor->GetNumberOfInterpointsForNeighbor(iNeighbor);
+                int *pointIndexForReceive = interpointInformationNeighbor->GetPointIndexForReceive(iNeighbor);
+                int *interPoint2GlobalPoint = interpointInformationNeighbor->GetInterPoint2GlobalPoint();
+
+                int iPoint;
+                int globalPoint;
+                RDouble valueWeight;
+                for (int j = 0; j < numberOfInterpointsForNeighbor; ++ j)
+                {
+                    iPoint = pointIndexForReceive[j];
+                    globalPoint = interPoint2GlobalPoint[iPoint];
+                    cdata->read(&valueWeight, sizeof(RDouble));
+
+                    nodeWeightTrade[globalPoint] += valueWeight;
+                }
+            }
+
+            delete cdata;    cdata = nullptr;
+        }
+    }
+}
+
+void NSSolverUnstruct::DownloadInterpointWeight(ActionKey *actkey)
+{
+    int level = actkey->level;
+
+    using namespace PHMPI;
+
+    int myid = GetCurrentProcessorID();
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int currentZoneProc = GetZoneProcessorID(iZone);
+
+        if (myid != currentZoneProc)
+        {
+            continue;
+        }
+
+        UnstructGrid *grid = UnstructGridCast(PHSPACE::GetGrid(iZone, level));
+        int nTotalNode = grid->GetNTotalNode();
+        RDouble *nodeWeight = reinterpret_cast<RDouble *>(grid->GetDataPtr("nodeWeight"));
+        RDouble *nodeWeightTrade = reinterpret_cast<RDouble *>(grid->GetDataPtr("nodeWeightTrade"));
+
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            nodeWeight[iNode] += nodeWeightTrade[iNode];
+        }
+
+        PHSPACE::SetField(nodeWeightTrade, 0.0, nTotalNode);
+    }
+}
+
+void NSSolverUnstruct::UploadOversetData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid * grid = reinterpret_cast< UnstructGrid * >(GetGrid(level));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q" ));
+    PHSPACE::UploadOversetValue(grid, q, "q",  nEquation);
+
+    RDouble **t = reinterpret_cast< RDouble ** > (grid->GetDataPtr("t" ));
+    PHSPACE::UploadOversetValue(grid, t, "t",  nTemperatureModel);
+}
+
+void NSSolverUnstruct::DownloadOversetData(ActionKey *actkey)
+{
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int level = actkey->level;
+    UnstructGrid * grid = reinterpret_cast< UnstructGrid * >(GetGrid(level));
+
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q" ));
+    PHSPACE::DownloadOversetValue(grid, q, "q", nEquation);
+
+    RDouble **t = reinterpret_cast< RDouble ** > (grid->GetDataPtr("t" ));
+    PHSPACE::DownloadOversetValue(grid, t, "t",  nTemperatureModel);
+}
+
+void NSSolverUnstruct::InitMixingPlane(RDouble ***MixingPlaneVar, int Dim1, int Dim2, int Dim3, RDouble Value)
+{
+
+    for (int iDim1 = 0; iDim1 < Dim1; iDim1++)
+    {
+        for (int iDim2 = 0; iDim2 < Dim2; iDim2++)
+        {
+            for (int iDim3 = 0; iDim3 < Dim3; iDim3++)
+            {
+                MixingPlaneVar[iDim1][iDim2][iDim3] = Value;
+            }
+        }
+    }
+}
+
+//! need to input q_average, which means flux averaged primitive variable of mixing plane.
+//! this function should be called in boundary condition part.
+void NSSolverUnstruct::AverageMixingPlane(Grid *grid)
+{
+    UnstructGrid *gridUnstruct = UnstructGridCast(grid);
+    UnstructBCSet *unstructBCSet = gridUnstruct->GetUnstructBCSet();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble gama1 = refGama - 1.0;
+
+    RDouble refDensity = parameters->GetRefDimensionalDensity();
+    RDouble refPressure = parameters->GetRefDimensionalPressure();
+
+    RDouble **q = reinterpret_cast< RDouble ** > (gridUnstruct->GetDataPtr("q"));
+
+    RDouble *gama = reinterpret_cast< RDouble *  > (grid->GetDataPtr("gama"));
+
+    RDouble **r_ori    = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Face"));
+    RDouble **r_target = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Span"));
+
+    RDouble **SpanArea  = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("SpanArea"));
+
+    RDouble **q_Face    = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("q_Face"));
+    RDouble **qCon_Face = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("qCon_Face"));
+
+    //! nSpan is the number of spanwise point to do data average
+    //! also interpolate data on these points.
+    int nSpanSection = PHSPACE::GlobalDataBase::GetIntParaFromDB("nSpanSection");
+    RDouble nSpan = (RDouble)(nSpanSection);
+
+    RDouble Area;
+
+    RDouble *nxs, *nys, *nzs, *ns;
+
+    nxs = gridUnstruct->GetFaceNormalX();
+    nys = gridUnstruct->GetFaceNormalY();
+    nzs = gridUnstruct->GetFaceNormalZ();
+    ns = gridUnstruct->GetFaceArea();
+
+    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+
+    string MixingPlane[100];
+    GlobalDataBase::GetData("MixingPlane", &MixingPlane, PHSTRING, 2 * nTurboZone - 2);
+
+    //! should define r_ori means different radius of each cell.
+    //! also need to define r_target means the span radius that average data.
+    //! r_min and r_max is used to find the maximum and minimum radius on mixing plane.
+    //! use r_min and r_max to compute the range of interpolation.
+    //! this also need compute during AverageMixingPlane.
+    RDouble **nxsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("nxsSpan"));
+    RDouble **ntsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("ntsSpan"));
+    RDouble **nrsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("nrsSpan"));
+
+    //! r_ori should be an array that contains coordinate of each node.
+    //! the range of this array is equal to the face number of this boundary.
+    RDouble r_min, r_max;
+
+    r_min = 1e6;
+    r_max = 0;
+
+    RDouble *xfc = gridUnstruct->GetFaceCenterX();
+    RDouble *yfc = gridUnstruct->GetFaceCenterY();
+    RDouble *zfc = gridUnstruct->GetFaceCenterZ();
+
+    RDouble *xcc = gridUnstruct->GetCellCenterX();
+    RDouble *ycc = gridUnstruct->GetCellCenterY();
+    RDouble *zcc = gridUnstruct->GetCellCenterZ();
+
+    RDouble *vgn = gridUnstruct->GetFaceNormalVelocity();
+
+    int **face2nodeArray = gridUnstruct->GetFace2NodeArray();
+    int * node_number_of_each_face = gridUnstruct->GetNodeNumberOfEachFace();
+
+    int *leftCellofFace = gridUnstruct->GetLeftCellOfFace();
+    int *rightCellofFace = gridUnstruct->GetRightCellOfFace();
+    int nTotalCell = gridUnstruct->GetNTotalCell();
+
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    RDouble PeriodicRotationAngle[100];
+    GlobalDataBase::GetData("PeriodicRotationAngle", &PeriodicRotationAngle, PHDOUBLE, nTurboZone);
+
+    using namespace IDX;
+
+    RDouble ***qCon_Span  = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("qCon_Span"));
+    RDouble ***SpanFlux   = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("SpanFlux"));
+
+    int FlowDirection = -1;
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *primi = new RDouble[nEquation]();
+    RDouble *primo = new RDouble[nEquation]();
+
+    //! this will remove later, iBCRegion should be input data.
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+
+        int bcType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+
+        //! find mixing plane and average data.
+        //! use new bcType to define mixing plane.
+        //! if (bcType == -1)
+
+        //! Parallel
+        int iTurboZone = gridUnstruct->GetOrdinaryGridIndex();
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = gridUnstruct->GetZoneID();
+        }
+
+        RDouble rotationAngle = PeriodicRotationAngle[iTurboZone] / 180.0 * PI;
+
+        string MixingPlaneIn, MixingPlaneOut;
+        int SourceFlag;
+
+        if (iTurboZone == 0)
+        {
+            MixingPlaneOut = MixingPlane[0];
+        }
+        else if (iTurboZone == nTurboZone)
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+        }
+        else
+        {
+            MixingPlaneIn  = MixingPlane[2 * iTurboZone - 1];
+            MixingPlaneOut = MixingPlane[2 * iTurboZone ];
+        }
+
+        if (bcName == MixingPlaneIn || bcName == MixingPlaneOut)
+        {
+            if (bcName == MixingPlaneIn)
+            {
+                FlowDirection = 0;
+                SourceFlag    = 1 + (iTurboZone - 1) * 10;
+            }
+            if (bcName == MixingPlaneOut)
+            {
+                FlowDirection = 1;
+                SourceFlag    = 0 + (iTurboZone + 1) * 10;
+            }
+            int MixingFlag = FlowDirection + iTurboZone * 10;
+
+            //! preprocess of mixing plane.
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                //! iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+
+                int le = leftCellofFace[iFace];
+                int re = rightCellofFace[iFace];
+
+                //! need to compute total area, total flux of this bc region.
+                //! also need to compute flux of each spanwise.
+                //! spanwise can be defined based on mesh or manually.
+                r_ori[MixingFlag][iFace] = sqrt(yfc[iFace] * yfc[iFace] + zfc[iFace] * zfc[iFace]);
+
+                r_min = MIN(r_ori[MixingFlag][iFace], r_min);
+                r_max = MAX(r_ori[MixingFlag][iFace], r_max);
+            }
+
+            //! get target radius.
+            for (int iSpan = 0; iSpan <= nSpanSection; iSpan++)
+            {
+                r_target[MixingFlag][iSpan] = r_min + iSpan * (r_max - r_min) / nSpan;
+            }
+
+            //! compute average flux.
+            for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+            {
+                RDouble Flux[5] = { 0.0, 0.0, 0.0, 0.0, 0.0 };
+                RDouble TotalArea = 0.0;
+
+                nxsSpan[MixingFlag][iSpan] = 0.0;
+                ntsSpan[MixingFlag][iSpan] = 0.0;
+                nrsSpan[MixingFlag][iSpan] = 0.0;
+
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    //! iFace is the face number in the set of faceIndex.
+                    int iFace = *iter;
+
+                    int le = leftCellofFace[iFace];
+                    int re = rightCellofFace[iFace];
+
+                    Area = ns[iFace];
+
+                    for (int m = 0; m < 5; m++)
+                    {
+                        primi[m] = q[m][le];
+                        primo[m] = q[m][re];
+                    }
+
+                    RDouble &rmi = primi[IR];
+                    RDouble &umi = primi[IU];
+                    RDouble &vmi = primi[IV];
+                    RDouble &wmi = primi[IW];
+                    RDouble &pmi = primi[IP];
+
+                    RDouble &rmo = primo[IR];
+                    RDouble &umo = primo[IU];
+                    RDouble &vmo = primo[IV];
+                    RDouble &wmo = primo[IW];
+                    RDouble &pmo = primo[IP];
+
+                    RDouble &vb = vgn[iFace];
+                    //! need to compute velocity in radial and tangential direction.
+                    //! 1. compute face normal in radial and tangential direction.
+                    RDouble r_Face  = sqrt(yfc[iFace] * yfc[iFace] + zfc[iFace] * zfc[iFace]);
+                    RDouble nts     = (nzs[iFace] * yfc[iFace] - nys[iFace] * zfc[iFace]) / r_Face;
+                    RDouble nrs     = (nys[iFace] * yfc[iFace] + nzs[iFace] * zfc[iFace]) / r_Face;
+
+                    //! 2. compute velocity in radial and tangential direction.
+                    RDouble Velocity_ti = (vmi * zfc[iFace] - wmi * yfc[iFace]) / r_Face;
+                    RDouble Velocity_ri = (vmi * yfc[iFace] + wmi * zfc[iFace]) / r_Face;
+
+                    RDouble Velocity_to = (vmo * zfc[iFace] - wmo * yfc[iFace]) / r_Face;
+                    RDouble Velocity_ro = (vmo * yfc[iFace] + wmo * zfc[iFace]) / r_Face;
+
+                    RDouble vni = umi * nxs[iFace] + Velocity_ri * nrs - vb;
+                    RDouble vno = umo * nxs[iFace] + Velocity_ro * nrs - vb;
+                    //! find face center that locate in target span.
+                    //! compute flux at each span.
+                    if (r_Face > r_target[MixingFlag][iSpan] && r_Face <= r_target[MixingFlag][iSpan + 1])
+                    {
+                        //! direction
+                        nxsSpan[MixingFlag][iSpan] += nxs[iFace] * Area;
+                        ntsSpan[MixingFlag][iSpan] += nts * Area;
+                        nrsSpan[MixingFlag][iSpan] += nrs * Area;
+                        TotalArea += Area;
+
+                        RDouble Hmi = (refGama / (refGama - 1)) * (pmi / rmi) + half * (umi * umi + vmi * vmi + wmi * wmi);
+                        RDouble Hmo = (refGama / (refGama - 1)) * (pmo / rmo) + half * (umo * umo + vmo * vmo + wmo * wmo);
+
+                        Flux[IR ] += (rmi * vni) * ns[iFace];
+                        Flux[IRU] += (rmi * vni * umi + pmi * nxs[iFace]) * ns[iFace];
+                        Flux[IRV] += (rmi * vni * Velocity_ti) * ns[iFace];
+                        Flux[IRW] += (rmi * vni * Velocity_ri + pmi * nrs) * ns[iFace];
+                        Flux[IRE] += (rmi * vni * Hmi + pmi * vgn[iFace])* ns[iFace];
+                    }
+                }
+                nxsSpan[MixingFlag][iSpan] /= TotalArea;
+                ntsSpan[MixingFlag][iSpan] /= TotalArea;
+                nrsSpan[MixingFlag][iSpan] /= TotalArea;
+
+                SpanArea[MixingFlag][iSpan] = TotalArea;
+
+                for (int m = 0; m < 5; m++)
+                {
+                    qCon_Span[MixingFlag][m][iSpan] = Flux[m];
+                }
+            }
+
+            for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+            {
+                //! SpanFlux will communicate between upstream and downstream of mixing plane.
+                for (int m = 0; m < 5; m++)
+                {
+                    SpanFlux[MixingFlag][m][iSpan] = qCon_Span[MixingFlag][m][iSpan] / SpanArea[MixingFlag][iSpan];
+                }
+            }
+        }
+    }
+}
+
+//! SpanFlux from AverageMixingPlane should be input data.
+//! Here we will obtain averaged primitive variable of each span from SpanFlux.
+//! The averaged primitive variable will be treated as outlet data of upstream and inlet data of downsteam.
+void NSSolverUnstruct::MixingPlaneDataTransfer(Grid *grid, Grid *NeighborGrid)
+{
+    UnstructGrid *gridUnstruct = UnstructGridCast(grid);
+    UnstructGrid *gridSource   = UnstructGridCast(NeighborGrid);
+    UnstructBCSet *unstructBCSet = gridUnstruct->GetUnstructBCSet();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble gama1 = refGama - 1;
+
+    RDouble refDensity = parameters->GetRefDimensionalDensity();
+    RDouble refPressure = parameters->GetRefDimensionalPressure();
+
+    RDouble **q = reinterpret_cast< RDouble ** > (gridUnstruct->GetDataPtr("q"));
+
+    RDouble *gama = reinterpret_cast< RDouble *  > (grid->GetDataPtr("gama"));
+
+    RDouble **r_target  = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Span"));
+
+    RDouble **SpanArea = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("SpanArea"));
+
+    //! nSpan is the number of spanwise point to do data average
+    //! also interpolate data on these points.
+    //! nSpanSection
+    int nSpanSection = PHSPACE::GlobalDataBase::GetIntParaFromDB("nSpanSection");
+
+    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+    string MixingPlane[100];
+    GlobalDataBase::GetData("MixingPlane", &MixingPlane, PHSTRING, 2 * nTurboZone - 2);
+
+    RDouble *xfc = gridUnstruct->GetFaceCenterX();
+    RDouble *yfc = gridUnstruct->GetFaceCenterY();
+    RDouble *zfc = gridUnstruct->GetFaceCenterZ();
+
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    RDouble **nxsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("nxsSpan"));
+    RDouble **ntsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("ntsSpan"));
+    RDouble **nrsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("nrsSpan"));
+
+    //! qSpanNeighbor: record flow variable in neighbor zone at each span.
+    RDouble ***q_Span        = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("q_Span"));
+    RDouble ***SpanFlux      = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("SpanFlux"));
+    RDouble ***qSpanNeighbor = reinterpret_cast< RDouble *** > (gridSource->GetDataPtr("qSpanNeighbor"));
+
+    using namespace IDX;
+
+    int FlowDirection = -1;
+
+    int nEquation = GetNumberOfEquations();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion++)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+
+        int bcType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+
+        //! Parallel
+        int iTurboZone = gridUnstruct->GetOrdinaryGridIndex();
+        int SourceZone = gridSource->GetOrdinaryGridIndex();
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = gridUnstruct->GetZoneID();
+            SourceZone = gridSource->GetZoneID();
+        }
+
+        //! use new bcType to define mixing plane.
+        //! if (bcType == -1)
+        string MixingPlaneIn, MixingPlaneOut;
+
+        if (iTurboZone == 0)
+        {
+            MixingPlaneOut = MixingPlane[0];
+        }
+        else if (iTurboZone == nTurboZone)
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+        }
+        else
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+            MixingPlaneOut = MixingPlane[2 * iTurboZone];
+        }
+
+        //! TargetMixingFlag is Mixingplane in current zone, which need neighbor zone data.
+        //! SourceMixingFlag is Mixingplane in neighbor zone, which provide the data. 
+        int MixingFlag, TargetFlag;
+        if (bcName == MixingPlaneIn || bcName == MixingPlaneOut)
+        {
+            //! downstream to upstream: transfer data from MixingIn to MixingOut.
+            if (SourceZone == iTurboZone + 1)
+            {
+                if (bcName == MixingPlaneIn) continue;
+                //! upstream MixingIn.
+                TargetFlag = 0 + SourceZone * 10;
+                //! current MixingOut.
+                MixingFlag = 1 + iTurboZone * 10;
+            }
+            //! upstream to downstream: transfer data from MixingOut to MixingIn.
+            else if (SourceZone == iTurboZone - 1)
+            {
+                if (bcName == MixingPlaneOut) continue;
+                TargetFlag = 1 + SourceZone * 10;
+                MixingFlag = 0 + iTurboZone * 10;
+            }
+
+            //! compute flow variables.
+            for (int iSpan = 0; iSpan < nSpanSection ; iSpan++)
+            {
+                RDouble a, b, c, discr;
+
+                a = nxsSpan[MixingFlag][iSpan] * SpanFlux[MixingFlag][IRU][iSpan]
+                    + nrsSpan[MixingFlag][iSpan] * SpanFlux[MixingFlag][IRW][iSpan];
+
+                b = -nrsSpan[MixingFlag][iSpan] * SpanFlux[MixingFlag][IRU][iSpan]
+                    +  nxsSpan[MixingFlag][iSpan] * SpanFlux[MixingFlag][IRW][iSpan];
+
+                c = a * a+ b * b + SpanFlux[MixingFlag][IRV][iSpan] * SpanFlux[MixingFlag][IRV][iSpan];
+
+                discr = c - 2 * SpanFlux[MixingFlag][IR][iSpan] * SpanFlux[MixingFlag][IP][iSpan];
+
+                q_Span[MixingFlag][IP][iSpan] = (a + sqrt(a * a + (refGama*refGama - 1) * discr)) / (refGama + 1);
+
+                RDouble vn = (a - q_Span[MixingFlag][IP][iSpan]) / SpanFlux[MixingFlag][IR][iSpan];
+                RDouble vt = b / SpanFlux[MixingFlag][IR][iSpan];
+
+                //! IU, IV, IW refers to vn, vtheta, vt
+                q_Span[MixingFlag][IU][iSpan] = vn;
+                q_Span[MixingFlag][IV][iSpan] = SpanFlux[MixingFlag][IRV][iSpan] / SpanFlux[MixingFlag][IR][iSpan];
+                q_Span[MixingFlag][IW][iSpan] = vt;
+                q_Span[MixingFlag][IR][iSpan] = SpanFlux[MixingFlag][IR][iSpan] / vn;
+
+                for (int m = 0; m < nEquation; m++)
+                {
+                    qSpanNeighbor[TargetFlag][m][iSpan] = q_Span[MixingFlag][m][iSpan];
+                }
+                //! velocity direction is opposite, because flow in and flow out.
+                qSpanNeighbor[TargetFlag][IU][iSpan] = -q_Span[MixingFlag][IU][iSpan];
+                qSpanNeighbor[TargetFlag][IW][iSpan] = -q_Span[MixingFlag][IW][iSpan];
+            }
+        }
+    }
+}
+
+void NSSolverUnstruct::NonReflective(Grid *grid, Grid *NeighborGrid)
+{
+    UnstructGrid *gridUnstruct = UnstructGridCast(grid);
+    UnstructGrid *gridTarget = UnstructGridCast(NeighborGrid);
+    UnstructBCSet *unstructBCSet = gridUnstruct->GetUnstructBCSet();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble refPressure = parameters->GetRefDimensionalPressure();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble gama1 = refGama - 1;
+
+    RDouble **q = reinterpret_cast< RDouble ** > (gridUnstruct->GetDataPtr("q"));
+
+    RDouble **r_ori    = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Face"));
+    RDouble **r_target = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Span"));
+
+    RDouble **SpanArea = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("SpanArea"));
+    //! nSpan is the number of spanwise point to do data average
+    //! also interpolate data on these points.
+    int nSpanSection = PHSPACE::GlobalDataBase::GetIntParaFromDB("nSpanSection");
+
+    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+
+    string MixingPlane[100];
+    GlobalDataBase::GetData("MixingPlane", &MixingPlane, PHSTRING, 2 * nTurboZone - 2);
+
+    int *leftCellofFace  = gridUnstruct->GetLeftCellOfFace();
+    int *rightCellofFace = gridUnstruct->GetRightCellOfFace();
+    int nTotalCell = gridUnstruct->GetNTotalCell();
+
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    RDouble *xcc = gridUnstruct->GetCellCenterX();
+    RDouble *ycc = gridUnstruct->GetCellCenterY();
+    RDouble *zcc = gridUnstruct->GetCellCenterZ();
+
+    RDouble *xfc = gridUnstruct->GetFaceCenterX();
+    RDouble *yfc = gridUnstruct->GetFaceCenterY();
+    RDouble *zfc = gridUnstruct->GetFaceCenterZ();
+
+    RDouble *nxs, *nys, *nzs, *ns;
+
+    nxs = gridUnstruct->GetFaceNormalX();
+    nys = gridUnstruct->GetFaceNormalY();
+    nzs = gridUnstruct->GetFaceNormalZ();
+    ns  = gridUnstruct->GetFaceArea();
+
+    RDouble **nxsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("nxsSpan"));
+    RDouble **ntsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("ntsSpan"));
+    RDouble **nrsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("nrsSpan"));
+
+    RDouble ***q_SpanCurrent = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("q_Span"));
+    RDouble ***q_SpanTarget  = reinterpret_cast< RDouble *** > (gridTarget->GetDataPtr("q_Span"));
+    RDouble ***qSpanNeighbor = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("qSpanNeighbor"));
+
+    RDouble ***dqSpanIn = reinterpret_cast <RDouble ***> (gridUnstruct->GetDataPtr("dqSpanIn"));
+    RDouble ***dqSpanEx = reinterpret_cast <RDouble ***> (gridUnstruct->GetDataPtr("dqSpanEx"));
+    RDouble ***dcSpan   = reinterpret_cast <RDouble ***> (gridUnstruct->GetDataPtr("dcSpan"));
+
+    //! angular velocity
+    RDouble Omega[100];
+    GlobalDataBase::GetData("Omega", &Omega, PHDOUBLE, nTurboZone);
+
+    using namespace IDX;
+
+    int FlowDirection = -1;
+
+    int nEquation = GetNumberOfEquations();
+    RDouble *ExtraDq = new RDouble[nEquation];
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+
+        int bcType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+
+        //! Parallel
+        int iTurboZone = gridUnstruct->GetOrdinaryGridIndex();
+        int TargetZone = gridTarget->GetOrdinaryGridIndex();
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = gridUnstruct->GetZoneID();
+            TargetZone = gridTarget->GetZoneID();
+        }
+
+        string MixingPlaneIn, MixingPlaneOut;
+
+        if (iTurboZone == 0)
+        {
+            MixingPlaneOut = MixingPlane[0];
+        }
+        else if (iTurboZone == nTurboZone)
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+        }
+        else
+        {
+            MixingPlaneIn  = MixingPlane[2 * iTurboZone - 1];
+            MixingPlaneOut = MixingPlane[2 * iTurboZone];
+        }
+
+        //! TargetMixingFlag is Mixingplane in current zone, which need neighbor zone data.
+        //! SourceMixingFlag is Mixingplane in neighbor zone, which provide the data. 
+        int MixingFlag, TargetFlag;
+        if (bcName == MixingPlaneIn || bcName == MixingPlaneOut)
+        {
+            //! downstream to upstream: transfer data from MixingIn to MixingOut.
+            if (TargetZone == iTurboZone + 1)
+            {
+                if (bcName == MixingPlaneIn) continue;
+                //! upstream MixingIn.
+                TargetFlag = 0 + TargetZone * 10;
+                //! current MixingOut.
+                MixingFlag = 1 + iTurboZone * 10;
+            }
+            //! upstream to downstream: transfer data from MixingOut to MixingIn.
+            else if (TargetZone == iTurboZone - 1)
+            {
+                if (bcName == MixingPlaneOut) continue;
+                TargetFlag = 1 + TargetZone * 10;
+                MixingFlag = 0 + iTurboZone * 10;
+            }
+        }
+
+        if (bcName == MixingPlaneIn || bcName == MixingPlaneOut)
+        {
+            //! compute variable perturbation
+            //! when computing perturbation, notice that the direction of vn and vt are opposite.
+            //! because flow in and flow out of the interface.
+            for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+            {
+                for (int m = 0; m < nEquation; m++)
+                {
+                    ExtraDq[m] = 0.0;
+                }
+
+                //! interpolation
+                for (int m = 0; m < nEquation; m++)
+                {
+                    dqSpanIn[MixingFlag][m][iSpan] = q_SpanTarget[TargetFlag][m][iSpan] - q_SpanCurrent[MixingFlag][m][iSpan];
+                }
+
+                dqSpanIn[MixingFlag][IU][iSpan] = -q_SpanTarget[TargetFlag][IU][iSpan] - q_SpanCurrent[MixingFlag][IU][iSpan];
+                dqSpanIn[MixingFlag][IW][iSpan] = -q_SpanTarget[TargetFlag][IW][iSpan] - q_SpanCurrent[MixingFlag][IW][iSpan];
+
+                //! extrapolation
+                vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    int iFace = *iter;
+
+                    int re = rightCellofFace[iFace];
+                    int le = leftCellofFace[iFace];
+
+                    RDouble r_Face = sqrt(yfc[iFace] * yfc[iFace] + zfc[iFace] * zfc[iFace]);
+
+                    RDouble nts = (nzs[iFace] * yfc[iFace] - nys[iFace] * zfc[iFace]) / r_Face;
+                    RDouble nrs = (nys[iFace] * yfc[iFace] + nzs[iFace] * zfc[iFace]) / r_Face;
+
+                    RDouble Velocity_ti = (q[IV][le] * zfc[iFace] - q[IW][le] * yfc[iFace]) / r_Face;
+                    RDouble Velocity_ri = (q[IV][le] * yfc[iFace] + q[IW][le] * zfc[iFace]) / r_Face;
+
+                    RDouble Vni     =  q[IU][le] * nxs[iFace] + Velocity_ri * nrs;
+                    RDouble Vthetai =  Velocity_ti;
+                    RDouble Vti     = -q[IU][le] * nrs        + Velocity_ri * nxs[iFace];
+
+                    //! extrapolating q[m][le] and q on the interface to obtain ExtraDq.
+                    if (r_Face > r_target[MixingFlag][iSpan] && r_Face <= r_target[MixingFlag][iSpan + 1])
+                    {
+                        ExtraDq[IR] += (q_SpanCurrent[MixingFlag][IR][iSpan] - q[IR][le]) * ns[iFace];
+                        ExtraDq[IU] += (q_SpanCurrent[MixingFlag][IU][iSpan] - Vni)       * ns[iFace];
+                        ExtraDq[IV] += (q_SpanCurrent[MixingFlag][IV][iSpan] - Vthetai)   * ns[iFace];
+                        ExtraDq[IW] += (q_SpanCurrent[MixingFlag][IW][iSpan] - Vti)       * ns[iFace];
+                        ExtraDq[IP] += (q_SpanCurrent[MixingFlag][IP][iSpan] - q[IP][le]) * ns[iFace];
+                    }
+                }
+
+                for (int m = 0; m < nEquation; m++)
+                {
+                    dqSpanEx[MixingFlag][m][iSpan] = ExtraDq[m] / SpanArea[MixingFlag][iSpan];
+                }
+            }
+
+            for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+            {
+                RDouble deltaQ[5] = { 0.0, 0.0, 0.0, 0.0, 0.0 };
+
+                //! IU refers to vn.
+                RDouble vn = q_SpanCurrent[MixingFlag][IU][iSpan];
+
+                RDouble c = sqrt(refGama* q_SpanCurrent[MixingFlag][IP][iSpan] / q_SpanCurrent[MixingFlag][IR][iSpan]);
+
+                RDouble avgRho = half * (q_SpanCurrent[MixingFlag][IR][iSpan] + q_SpanTarget[TargetFlag][IR][iSpan]);
+                RDouble avgP   = half * (q_SpanCurrent[MixingFlag][IP][iSpan] + q_SpanTarget[TargetFlag][IP][iSpan]);
+
+                RDouble avgc = sqrt(refGama * (avgP / avgRho));
+
+                RDouble rhoc = half * (q_SpanCurrent[MixingFlag][IR][iSpan] + q_SpanTarget[TargetFlag][IR][iSpan]) * avgc;
+
+                //! perturbation
+                if (vn > 0)
+                {
+                    dcSpan[MixingFlag][0][iSpan] = -avgc * avgc * dqSpanEx[MixingFlag][IR][iSpan] + dqSpanEx[MixingFlag][IP][iSpan];
+                    dcSpan[MixingFlag][2][iSpan] = rhoc * dqSpanEx[MixingFlag][IV][iSpan];
+                    dcSpan[MixingFlag][3][iSpan] = rhoc * dqSpanEx[MixingFlag][IW][iSpan];
+                }
+                else
+                {
+                    dcSpan[MixingFlag][0][iSpan] = -avgc * avgc * dqSpanIn[MixingFlag][IR][iSpan] + dqSpanIn[MixingFlag][IP][iSpan];
+                    dcSpan[MixingFlag][2][iSpan] = rhoc * dqSpanIn[MixingFlag][IV][iSpan];
+                    dcSpan[MixingFlag][3][iSpan] = rhoc * dqSpanIn[MixingFlag][IW][iSpan];
+                }
+
+                if (vn + c > 0)
+                {
+                    dcSpan[MixingFlag][1][iSpan] = rhoc * dqSpanEx[MixingFlag][IU][iSpan] + dqSpanEx[MixingFlag][IP][iSpan];
+                }
+                else
+                {
+                    dcSpan[MixingFlag][1][iSpan] = rhoc * dqSpanIn[MixingFlag][IU][iSpan] + dqSpanIn[MixingFlag][IP][iSpan];
+                }
+
+                if (vn - c > 0)
+                {
+                    dcSpan[MixingFlag][4][iSpan] = -rhoc * dqSpanEx[MixingFlag][IU][iSpan] + dqSpanEx[MixingFlag][IP][iSpan];
+                }
+                else
+                {
+                    dcSpan[MixingFlag][4][iSpan] = -rhoc * dqSpanIn[MixingFlag][IU][iSpan] + dqSpanIn[MixingFlag][IP][iSpan];
+                }
+
+                //! IU, IV, IW refers to vn, vtheta, vt.
+                deltaQ[IR] = (-dcSpan[MixingFlag][0][iSpan] + half * (dcSpan[MixingFlag][1][iSpan] + dcSpan[MixingFlag][4][iSpan])) / (avgc * avgc);
+                deltaQ[IU] = half * (dcSpan[MixingFlag][1][iSpan] - dcSpan[MixingFlag][4][iSpan]) / rhoc;
+                deltaQ[IV] = dcSpan[MixingFlag][2][iSpan] / rhoc;
+                deltaQ[IW] = dcSpan[MixingFlag][3][iSpan] / rhoc;
+                deltaQ[IP] = half * (dcSpan[MixingFlag][1][iSpan] + dcSpan[MixingFlag][4][iSpan]);
+
+                for (int m = 0; m < nEquation; m++)
+                {
+                    //! qSpanNeighbor[MixingFlag][m][iSpan] += deltaQ[m];
+                    qSpanNeighbor[MixingFlag][m][iSpan] = q_SpanCurrent[MixingFlag][m][iSpan] + deltaQ[m];
+                }
+            }
+        }
+    }
+    delete []ExtraDq;
+}
+
+//! function to set radial profile of mixingin and mixingout.
+//! treat mixingin as a kind of inlet and treat mixing as a kind of outlet.
+void NSSolverUnstruct::SetMixingPlaneData(Grid *grid)
+{
+    UnstructGrid *gridUnstruct = UnstructGridCast(grid);
+    UnstructBCSet *unstructBCSet = gridUnstruct->GetUnstructBCSet();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble gama1 = refGama - 1;
+
+    RDouble **q = reinterpret_cast< RDouble ** > (gridUnstruct->GetDataPtr("q"));
+
+    RDouble **r_ori    = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Face"));
+    RDouble **r_target = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Span"));
+
+    //! nSpan is the number of spanwise point to do data average
+    //! also interpolate data on these points.
+    //! nSpan is set to 50 temporary.
+    int nSpanSection = PHSPACE::GlobalDataBase::GetIntParaFromDB("nSpanSection");
+    RDouble nSpan = (RDouble)(nSpanSection);
+
+    RDouble *nxs, *nys, *nzs, *ns;
+
+    nxs = gridUnstruct->GetFaceNormalX();
+    nys = gridUnstruct->GetFaceNormalY();
+    nzs = gridUnstruct->GetFaceNormalZ();
+    ns = gridUnstruct->GetFaceArea();
+
+    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+
+    string MixingPlane[100];
+    GlobalDataBase::GetData("MixingPlane", &MixingPlane, PHSTRING, 2 * nTurboZone - 2);
+
+    RDouble *xfc = gridUnstruct->GetFaceCenterX();
+    RDouble *yfc = gridUnstruct->GetFaceCenterY();
+    RDouble *zfc = gridUnstruct->GetFaceCenterZ();
+
+    RDouble *xcc = gridUnstruct->GetCellCenterX();
+    RDouble *ycc = gridUnstruct->GetCellCenterY();
+    RDouble *zcc = gridUnstruct->GetCellCenterZ();
+
+    RDouble refDensity  = parameters->GetRefDimensionalDensity();
+    RDouble refPressure = parameters->GetRefDimensionalPressure();
+
+    int **face2nodeArray = gridUnstruct->GetFace2NodeArray();
+    int * node_number_of_each_face = gridUnstruct->GetNodeNumberOfEachFace();
+
+    int *leftCellofFace = gridUnstruct->GetLeftCellOfFace();
+    int *rightCellofFace = gridUnstruct->GetRightCellOfFace();
+    int nTotalCell = gridUnstruct->GetNTotalCell();
+
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    int nEquation = GetNumberOfEquations();
+
+    using namespace IDX;
+
+    RDouble ***q_Span        = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("q_Span"));
+    RDouble ***qSpanNeighbor = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("qSpanNeighbor"));
+
+    RDouble **nxsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("nxsSpan"));
+    RDouble **ntsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("ntsSpan"));
+    RDouble **nrsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("nrsSpan"));
+
+    int FlowDirection = -1;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+
+        int bcType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+
+        //! Parallel
+        int iTurboZone = gridUnstruct->GetOrdinaryGridIndex();
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = gridUnstruct->GetZoneID();
+        }
+
+
+        string MixingPlaneIn, MixingPlaneOut;
+
+        if (iTurboZone == 0)
+        {
+            MixingPlaneOut = MixingPlane[0];
+        }
+        else if (iTurboZone == nTurboZone)
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+        }
+        else
+        {
+            MixingPlaneIn  = MixingPlane[2 * iTurboZone - 1];
+            MixingPlaneOut = MixingPlane[2 * iTurboZone];
+        }
+
+        if (bcName == MixingPlaneIn || bcName == MixingPlaneOut)
+        {
+            if (bcName == MixingPlaneIn)
+            {
+                FlowDirection = 0;
+            }
+            if (bcName == MixingPlaneOut)
+            {
+                FlowDirection = 1;
+            }
+            int MixingFlag = FlowDirection + iTurboZone * 10;
+
+            for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+            {
+                for (int m = 0; m < nEquation; m++)
+                {
+                    q_Span[MixingFlag][m][iSpan] = qSpanNeighbor[MixingFlag][m][iSpan];
+                }
+
+                //! return to vx, vtheta, vr.
+                RDouble Temp_vx = q_Span[MixingFlag][IU][iSpan] * nxsSpan[MixingFlag][iSpan] - q_Span[MixingFlag][IW][iSpan] * nrsSpan[MixingFlag][iSpan];
+                RDouble Temp_vr = q_Span[MixingFlag][IU][iSpan] * nrsSpan[MixingFlag][iSpan] + q_Span[MixingFlag][IW][iSpan] * nxsSpan[MixingFlag][iSpan];
+
+                q_Span[MixingFlag][IU][iSpan] = Temp_vx;
+                q_Span[MixingFlag][IW][iSpan] = Temp_vr;
+            }
+
+            for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+            {
+
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    //! iFace is the face number in the set of faceIndex.
+                    int iFace = *iter;
+
+                    int le = leftCellofFace[iFace];
+                    int re = rightCellofFace[iFace];
+
+                    RDouble Radius = sqrt(yfc[iFace] * yfc[iFace] + zfc[iFace] * zfc[iFace]);
+
+                    if (Radius > r_target[MixingFlag][iSpan] && Radius <= r_target[MixingFlag][iSpan + 1])
+                    {
+                        RDouble Temp_vx = q_Span[MixingFlag][IU][iSpan];
+                        RDouble Temp_vr = q_Span[MixingFlag][IW][iSpan];
+
+                        //! vy and vz is different for each cell.
+                        RDouble Temp_vy = (Temp_vr * yfc[iFace] + q_Span[MixingFlag][IV][iSpan] * zfc[iFace]) / Radius;
+                        RDouble Temp_vz = (Temp_vr * zfc[iFace] - q_Span[MixingFlag][IV][iSpan] * yfc[iFace]) / Radius;
+
+                        q[IR][re] = q_Span[MixingFlag][IR][iSpan];
+                        q[IU][re] = Temp_vx;
+                        q[IV][re] = Temp_vy;
+                        q[IW][re] = Temp_vz;
+                        q[IP][re] = q_Span[MixingFlag][IP][iSpan];
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverUnstruct::RotateVectorFromInterface(Grid *gridIn, const int &neighborZoneIndex, const int &nEquation)
+{
+    UnstructGrid *gridUnstruct = UnstructGridCast(gridIn);
+    InterfaceInfo *interfaceInformation = gridUnstruct->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    UnstructBCSet *unstructBCSet = gridUnstruct->GetUnstructBCSet();
+
+    RDouble **rotNSgradValueX = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("rotNSgradValueX"));
+    RDouble **rotNSgradValueY = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("rotNSgradValueY"));
+    RDouble **rotNSgradValueZ = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("rotNSgradValueZ"));
+
+    int iNeighborZone = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+
+    if (iNeighborZone == -1)
+    {
+        return;
+    }
+
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = interfaceInformation->GetFaceIndexForRecv(iNeighborZone);
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+    int *interFace2BoundaryFace = interfaceInformation->GetInterFace2BoundaryFace();
+
+    int periodicType = PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType");
+    RDouble rotationAngle = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+
+    rotationAngle = rotationAngle / 180.0 * PI;
+
+    RDouble *nxs, *nys, *nzs, *ns;
+
+    nxs = gridUnstruct->GetFaceNormalX();
+    nys = gridUnstruct->GetFaceNormalY();
+    nzs = gridUnstruct->GetFaceNormalZ();
+    ns  = gridUnstruct->GetFaceArea();
+
+    RDouble *xfc = gridUnstruct->GetFaceCenterX();
+    RDouble *yfc = gridUnstruct->GetFaceCenterY();
+    RDouble *zfc = gridUnstruct->GetFaceCenterZ();
+
+    RDouble *xcc = gridUnstruct->GetCellCenterX();
+    RDouble *ycc = gridUnstruct->GetCellCenterY();
+    RDouble *zcc = gridUnstruct->GetCellCenterZ();
+
+    int *leftCellofFace = gridUnstruct->GetLeftCellOfFace();
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+
+    if (referenceFrame == ROTATIONAL_FRAME)
+    {
+        int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+        RDouble PeriodicRotationAngle[100];
+        GlobalDataBase::GetData("PeriodicRotationAngle", &PeriodicRotationAngle, PHDOUBLE, nTurboZone);
+
+        //! Parallel
+        int iTurboZone = gridUnstruct->GetOrdinaryGridIndex();
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = gridUnstruct->GetZoneID();
+        }
+
+        PeriodicRotationAngle[iTurboZone] = PeriodicRotationAngle[iTurboZone] * PI / 180.0;
+        rotationAngle = PeriodicRotationAngle[iTurboZone];
+    }
+
+    if (nEquation >= 4)
+    {
+        RDouble **fieldRecvNSX = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradPrimtiveVarX"));
+        RDouble **fieldRecvNSY = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradPrimtiveVarY"));
+        RDouble **fieldRecvNSZ = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradPrimtiveVarZ"));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++iLocalFace)
+            {
+                int iFace = interfaceIndexContainerForReceive[iLocalFace];
+                int t1,le;
+                le = leftCellofFace[iFace];
+                gridUnstruct->GetTargetIndex(iFace, 1, t1);
+
+                int iBFace = interFace2BoundaryFace[iFace];
+                UnstructBC* bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iBFace]);
+                string bcName = bcRegion->GetBCName();
+
+                RDouble theta;
+
+                if (referenceFrame == ROTATIONAL_FRAME)
+                {
+                    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+                    string Periodic_Name[100];
+                    GlobalDataBase::GetData("Periodic_Name", &Periodic_Name, PHSTRING, 2 * nTurboZone);
+
+                    //! Parallel
+                    int iTurboZone = gridUnstruct->GetOrdinaryGridIndex();
+                    //! Serial
+                    if (iTurboZone == -1)
+                    {
+                        iTurboZone = gridUnstruct->GetZoneID();
+                    }
+
+                    if (bcName != Periodic_Name[2 * iTurboZone] && bcName != Periodic_Name[2 * iTurboZone + 1])
+                    {
+                        continue;
+                    }
+
+                    if (bcName == Periodic_Name[2 * iTurboZone])
+                    {
+                        theta = 2 * PI - rotationAngle;
+                    }
+                    else if (bcName == Periodic_Name[2 * iTurboZone + 1])
+                    {
+                        theta = rotationAngle;
+                    }
+
+                    //! for velocity gradient, both direction and nys,nzs direction need rotate.
+                    rotNSgradValueX[IV][t1] = fieldRecvNSX[IV][t1] * cos(theta) - fieldRecvNSX[IW][t1] * sin(theta);
+                    rotNSgradValueY[IV][t1] = fieldRecvNSY[IV][t1] * pow(cos(theta), 2) - fieldRecvNSZ[IV][t1] * sin(theta) * cos(theta)
+                        - fieldRecvNSY[IW][t1] * sin(theta) * cos(theta) + fieldRecvNSZ[IW][t1] * pow(sin(theta), 2);
+                    rotNSgradValueZ[IV][t1] = fieldRecvNSY[IV][t1] * sin(theta) * cos(theta) + fieldRecvNSZ[IV][t1] * pow(cos(theta), 2)
+                        - fieldRecvNSY[IW][t1] * pow(sin(theta), 2) - fieldRecvNSZ[IW][t1] * sin(theta) * cos(theta);
+
+                    rotNSgradValueX[IW][t1] = fieldRecvNSX[IV][t1] * sin(theta) + fieldRecvNSX[IW][t1] * cos(theta);
+                    rotNSgradValueY[IW][t1] = fieldRecvNSY[IV][t1] * sin(theta) * cos(theta) - fieldRecvNSZ[IV][t1] * pow(sin(theta), 2)
+                        + fieldRecvNSY[IW][t1] * pow(cos(theta), 2) - fieldRecvNSZ[IW][t1] * sin(theta) * cos(theta);
+                    rotNSgradValueZ[IW][t1] = fieldRecvNSY[IV][t1] * pow(sin(theta), 2) + fieldRecvNSZ[IV][t1] * sin(theta) * cos(theta)
+                        + fieldRecvNSY[IW][t1] * sin(theta) * cos(theta) + fieldRecvNSZ[IW][t1] * pow(cos(theta), 2);
+
+                    fieldRecvNSX[IV][t1] = rotNSgradValueX[IV][t1];
+                    fieldRecvNSY[IV][t1] = rotNSgradValueY[IV][t1];
+                    fieldRecvNSZ[IV][t1] = rotNSgradValueZ[IV][t1];
+
+                    fieldRecvNSX[IW][t1] = rotNSgradValueX[IW][t1];
+                    fieldRecvNSY[IW][t1] = rotNSgradValueY[IW][t1];
+                    fieldRecvNSZ[IW][t1] = rotNSgradValueZ[IW][t1];
+
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        if (m == 2 || m == 3)
+                        {
+                            continue;
+                        }
+
+                        if (bcName == Periodic_Name[2 * iTurboZone])
+                        {
+                            rotNSgradValueY[m][t1] = fieldRecvNSY[m][t1] * cos(2 * PI - rotationAngle) - fieldRecvNSZ[m][t1] * sin(2 * PI - rotationAngle);
+                            rotNSgradValueZ[m][t1] = fieldRecvNSY[m][t1] * sin(2 * PI - rotationAngle) + fieldRecvNSZ[m][t1] * cos(2 * PI - rotationAngle);
+                        }
+                        else if (bcName == Periodic_Name[2 * iTurboZone + 1])
+                        {
+                            rotNSgradValueY[m][t1] = fieldRecvNSY[m][t1] * cos(rotationAngle) - fieldRecvNSZ[m][t1] * sin(rotationAngle);
+                            rotNSgradValueZ[m][t1] = fieldRecvNSY[m][t1] * sin(rotationAngle) + fieldRecvNSZ[m][t1] * cos(rotationAngle);
+                        }
+
+                        fieldRecvNSY[m][t1] = rotNSgradValueY[m][t1];
+                        fieldRecvNSZ[m][t1] = rotNSgradValueZ[m][t1];
+                    }
+                }
+
+                else
+                {
+                    if (bcName != "Periodic_up" && bcName != "Periodic_down")
+                    {
+                        continue;
+                    }
+
+                    if (bcName == "Periodic_up")
+                    {
+                        theta = 2 * PI - rotationAngle;
+                    }
+                    else if (bcName == "Periodic_down")
+                    {
+                        theta = rotationAngle;
+                    }
+
+                    //! for velocity gradient, both direction and nys,nzs direction need rotate.
+                    rotNSgradValueX[IV][t1] = fieldRecvNSX[IV][t1] * cos(theta) - fieldRecvNSX[IW][t1] * sin(theta);
+                    rotNSgradValueY[IV][t1] = fieldRecvNSY[IV][t1] * pow(cos(theta), 2) - fieldRecvNSZ[IV][t1] * sin(theta) * cos(theta)
+                        - fieldRecvNSY[IW][t1] * sin(theta) * cos(theta) + fieldRecvNSZ[IW][t1] * pow(sin(theta), 2);
+                    rotNSgradValueZ[IV][t1] = fieldRecvNSY[IV][t1] * sin(theta) * cos(theta) + fieldRecvNSZ[IV][t1] * pow(cos(theta), 2)
+                        - fieldRecvNSY[IW][t1] * pow(sin(theta), 2) - fieldRecvNSZ[IW][t1] * sin(theta) * cos(theta);
+
+                    rotNSgradValueX[IW][t1] = fieldRecvNSX[IV][t1] * sin(theta) + fieldRecvNSX[IW][t1] * cos(theta);
+                    rotNSgradValueY[IW][t1] = fieldRecvNSY[IV][t1] * sin(theta) * cos(theta) - fieldRecvNSZ[IV][t1] * pow(sin(theta), 2)
+                        + fieldRecvNSY[IW][t1] * pow(cos(theta), 2) - fieldRecvNSZ[IW][t1] * sin(theta) * cos(theta);
+                    rotNSgradValueZ[IW][t1] = fieldRecvNSY[IV][t1] * pow(sin(theta), 2) + fieldRecvNSZ[IV][t1] * sin(theta) * cos(theta)
+                        + fieldRecvNSY[IW][t1] * sin(theta) * cos(theta) + fieldRecvNSZ[IW][t1] * pow(cos(theta), 2);
+
+                    fieldRecvNSX[IV][t1] = rotNSgradValueX[IV][t1];
+                    fieldRecvNSY[IV][t1] = rotNSgradValueY[IV][t1];
+                    fieldRecvNSZ[IV][t1] = rotNSgradValueZ[IV][t1];
+
+                    fieldRecvNSX[IW][t1] = rotNSgradValueX[IW][t1];
+                    fieldRecvNSY[IW][t1] = rotNSgradValueY[IW][t1];
+                    fieldRecvNSZ[IW][t1] = rotNSgradValueZ[IW][t1];
+
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        if (m == 2 || m == 3)
+                        {
+                            continue;
+                        }
+
+                        if (bcName == "Periodic_up")
+                        {
+                            rotNSgradValueY[m][t1] = fieldRecvNSY[m][t1] * cos(2 * PI - rotationAngle) - fieldRecvNSZ[m][t1] * sin(2 * PI - rotationAngle);
+                            rotNSgradValueZ[m][t1] = fieldRecvNSY[m][t1] * sin(2 * PI - rotationAngle) + fieldRecvNSZ[m][t1] * cos(2 * PI - rotationAngle);
+                        }
+                        else if (bcName == "Periodic_down")
+                        {
+                            rotNSgradValueY[m][t1] = fieldRecvNSY[m][t1] * cos(rotationAngle) - fieldRecvNSZ[m][t1] * sin(rotationAngle);
+                            rotNSgradValueZ[m][t1] = fieldRecvNSY[m][t1] * sin(rotationAngle) + fieldRecvNSZ[m][t1] * cos(rotationAngle);
+                        }
+
+                        fieldRecvNSY[m][t1] = rotNSgradValueY[m][t1];
+                        fieldRecvNSZ[m][t1] = rotNSgradValueZ[m][t1];
+                    }
+                }
+            }
+        }
+    }
+
+    //! for temperature, only one equation.
+    if (nEquation > 0 && nEquation < 4)
+    {
+        RDouble **fieldRecvTX = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradTemperatureX"));
+        RDouble **fieldRecvTY = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradTemperatureY"));
+        RDouble **fieldRecvTZ = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradTemperatureZ"));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++iLocalFace)
+            {
+                int iFace = interfaceIndexContainerForReceive[iLocalFace];
+                int t1;
+                gridUnstruct->GetTargetIndex(iFace, 1, t1);
+
+                int iBFace = interFace2BoundaryFace[iFace];
+                UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iBFace]);
+                string bcName = bcRegion->GetBCName();
+
+                for (int m = 0; m < nEquation; m++)
+                {
+                    RDouble Ty, Tz = 0;
+
+                    if (referenceFrame == ROTATIONAL_FRAME)
+                    {
+                        int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+                        string Periodic_Name[100];
+                        GlobalDataBase::GetData("Periodic_Name", &Periodic_Name, PHSTRING, 2 * nTurboZone);
+
+                        //! Parallel
+                        int iTurboZone = gridUnstruct->GetOrdinaryGridIndex();
+                        //! Serial
+                        if (iTurboZone == -1)
+                        {
+                            iTurboZone = gridUnstruct->GetZoneID();
+                        }
+
+                        if (bcName == Periodic_Name[2 * iTurboZone] || bcName == Periodic_Name[2 * iTurboZone + 1])
+                        {
+                            if (bcName == Periodic_Name[2 * iTurboZone])
+                            {
+                                Ty = fieldRecvTY[m][t1] * cos(2 * PI - rotationAngle) - fieldRecvTZ[m][t1] * sin(2 * PI - rotationAngle);
+                                Tz = fieldRecvTY[m][t1] * sin(2 * PI - rotationAngle) + fieldRecvTZ[m][t1] * cos(2 * PI - rotationAngle);
+                            }
+                            else if (bcName == Periodic_Name[2 * iTurboZone + 1])
+                            {
+                                Ty = fieldRecvTY[m][t1] * cos(rotationAngle) - fieldRecvTZ[m][t1] * sin(rotationAngle);
+                                Tz = fieldRecvTY[m][t1] * sin(rotationAngle) + fieldRecvTZ[m][t1] * cos(rotationAngle);
+                            }
+                            fieldRecvTY[m][t1] = Ty;
+                            fieldRecvTZ[m][t1] = Tz;
+                        }
+                    }
+                    else
+                    {
+                        if (bcName == "Periodic_up" || bcName == "Periodic_down")
+                        {
+                            if (bcName == "Periodic_up")
+                            {
+                                Ty = fieldRecvTY[m][t1] * cos(2 * PI - rotationAngle) - fieldRecvTZ[m][t1] * sin(2 * PI - rotationAngle);
+                                Tz = fieldRecvTY[m][t1] * sin(2 * PI - rotationAngle) + fieldRecvTZ[m][t1] * cos(2 * PI - rotationAngle);
+                            }
+                            else if (bcName == "Periodic_down")
+                            {
+                                Ty = fieldRecvTY[m][t1] * cos(rotationAngle) - fieldRecvTZ[m][t1] * sin(rotationAngle);
+                                Tz = fieldRecvTY[m][t1] * sin(rotationAngle) + fieldRecvTZ[m][t1] * cos(rotationAngle);
+                            }
+                            fieldRecvTY[m][t1] = Ty;
+                            fieldRecvTZ[m][t1] = Tz;
+                        }
+                    }
+                }
+            }
+        }
+    }
+}
+
+
+FieldProxy * NSSolverUnstruct::CreateFieldProxy(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **field = NewPointer2<RDouble>(nEquation, nTotal);
+
+    FieldProxy *fieldProxy = new FieldProxy();
+
+    fieldProxy->SetField_UNS(field, true);
+
+    return fieldProxy;
+}
+
+FieldProxy * NSSolverUnstruct::GetFieldProxy(Grid *gridIn, const string &field_name)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble ** field = reinterpret_cast< RDouble ** > (grid->GetDataPtr(field_name));
+
+    FieldProxy * field_proxy = new FieldProxy();
+
+    field_proxy->SetField_UNS(field);
+
+    return field_proxy;
+}
+
+FieldProxy * NSSolverUnstruct::GetResidualProxy(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **res = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res"));
+
+    FieldProxy *res_proxy = new FieldProxy();
+
+    res_proxy->SetField_UNS(res);
+
+    return res_proxy;
+}
+
+void NSSolverUnstruct::RecoverResidual(Grid *gridIn, FieldProxy *rhsProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **res = reinterpret_cast<RDouble **> (grid->GetDataPtr("res"));
+
+    if (grid->GetLevel() != 0) 
+    {
+        RDouble **rhs = rhsProxy->GetField_UNS();
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                res[m][iCell] = rhs[m][iCell];
+            }
+        }
+    }
+}
+
+void NSSolverUnstruct::StoreRhsByResidual(Grid *gridIn, FieldProxy *rhsProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **res = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res"));
+    RDouble **rhs = rhsProxy->GetField_UNS();
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            rhs[m][iCell] = res[m][iCell];
+        }
+    }
+}
+
+void NSSolverUnstruct::InitResidual(Grid *gridIn, FieldProxy *rhsProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **res = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res"));
+
+    RDouble **rhs = rhsProxy->GetField_UNS();
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            res[m][iCell] = - rhs[m][iCell];
+        }
+    }
+}
+
+void NSSolverUnstruct::FreeGradientProxy(Grid *grid)
+{
+}
+
+void NSSolverUnstruct::DumpLeakageInformation(Grid *gridIn)
+{
+    int nSpecies = gas->GetNumberOfSpecies();
+    string *speciesNames = gas->GetNameOfSpecies();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nm = parameters->GetNSEquationNumber();
+
+    int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep") ;
+    int innerStep = GlobalDataBase::GetIntParaFromDB("innstep");
+    RDouble physicalTimeStepDimensional = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStepDimensional");
+    RDouble totalLeakageVolume = GlobalDataBase::GetDoubleParaFromDB("totalLeakageVolume");
+
+    RDouble monitorThresholdValue = 0.02;
+    if (GlobalDataBase::IsExist("monitorThresholdValue", PHDOUBLE, 1))
+    {
+        monitorThresholdValue = GlobalDataBase::GetDoubleParaFromDB("monitorThresholdValue") ;
+    }
+
+    int nEquation = GetNumberOfEquations();
+    RDouble *primVars = new RDouble [nEquation];
+
+    RDouble *tempVariables = new RDouble [30];
+    RDouble *tempTotalVariables = new RDouble [30];
+    for (int i = 0; i < 30; i++)
+    {
+        tempVariables[i] = 0.0;
+        tempTotalVariables[i] = 0.0;		
+    }
+    RDouble *monitorVariables = reinterpret_cast< RDouble * > (GlobalDataBase::GetDataPtr("monitorVariables" ));
+
+    monitorVariables[0] = outnstep * 1.0;
+    monitorVariables[1] = outnstep * physicalTimeStepDimensional;
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refVelocity = refDimensionalSonicSpeed * refMachNumber;
+    using namespace PHMPI;
+    if (innerStep == 1)
+    {
+        int nZones = GetNumberofGlobalZones();
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            int zoneProcessorID = GetZoneProcessorID(iZone);
+            int currentProcessorID = GetCurrentProcessorID();
+            if (currentProcessorID == zoneProcessorID)
+            {
+                UnstructGrid *grid = UnstructGridCast(PHSPACE::GetGrid(iZone, 0));
+                int nTotalCell = grid->GetNTotalCell();
+                RDouble *vol   = grid->GetCellVolume();
+                int *leftCellofFace = grid->GetLeftCellOfFace();
+                RDouble *xfn  = grid->GetFaceNormalX();
+                RDouble *yfn  = grid->GetFaceNormalY();
+                RDouble *zfn  = grid->GetFaceNormalZ();
+                RDouble *area = grid->GetFaceArea();
+
+                RDouble **q = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+
+                UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+                int nBCRegion = unstructBCSet->GetnBCRegion();
+                for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+                {
+                    UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);		
+                    int bcType = bcRegion->GetBCType();
+                    if (bcType == PHENGLEI::PRESSURE_INLET)
+                    {
+                        Data_Param *bcData = bcRegion->GetBCParamDataBase();
+                        RDouble totalPressure = 0.0;
+                        RDouble totalTemperature = 0.0;
+                        bcData->GetData("totalPressure", &totalPressure, PHDOUBLE, 1);
+                        bcData->GetData("totalTemperature", &totalTemperature, PHDOUBLE, 1);
+
+                        RDouble initMassFraction[MAX_SPECIES_NUM] = {0};
+                        bcData->GetData("initMassFraction", &initMassFraction, PHDOUBLE, nSpecies);
+
+                        for (int iEquation = 0; iEquation < nm; iEquation++)
+                        {
+                            primVars[iEquation] = 0.0;
+                        }
+                        for (int iEquation = nm; iEquation < nEquation; iEquation++)
+                        {
+                            primVars[iEquation] = initMassFraction[iEquation - nm];
+                        }
+                        RDouble oMass = 0.0, gasR = 0.0;
+                        gas->ComputeMolecularWeightReciprocalDimensional(primVars, oMass);
+                        gasR = rjmk * oMass;
+
+                        RDouble ro = totalPressure / (totalTemperature * gasR);
+
+                        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                        {
+                            // iFace is the face number in the set of faceIndex.
+                            int iFace = *iter;
+                            int le = leftCellofFace[iFace];
+
+                            RDouble normalVelocity = refVelocity * ABS(q[IU][le] * xfn[iFace] + q[IV][le] * yfn[iFace] + q[IW][le] * zfn[iFace]);
+                            tempVariables[2] += (refDimensionalDensity * q[IDX::IR][le] * normalVelocity * physicalTimeStepDimensional * area[iFace]) / ro;
+                            tempVariables[4] += (refDimensionalDensity * q[IDX::IR][le] * normalVelocity * area[iFace]) / ro;
+                        }
+                    }
+                }
+
+                for (int s = 0; s < nSpecies; ++ s)
+                {
+                    monitorVariables[5 + s] = 0.0;
+                    for (int iCell = 0; iCell < nTotalCell; iCell++)
+                    {
+                        if(q[nm + s][iCell] > monitorThresholdValue)
+                        {
+                            tempVariables[5 + s] += vol[iCell];
+                        }
+                    }
+                }	
+            }
+        }
+
+        PH_AllReduce(tempVariables, tempTotalVariables, 30, PH_SUM);
+        monitorVariables[2] += tempTotalVariables[2];
+        monitorVariables[3] = totalLeakageVolume - monitorVariables[2];
+        monitorVariables[4] = tempTotalVariables[4];
+
+        RDouble maxLeakageTime = LARGE;
+        if (GlobalDataBase::IsExist("maxLeakageTime", PHDOUBLE, 1))
+        {
+            maxLeakageTime = GlobalDataBase::GetDoubleParaFromDB("maxLeakageTime");
+        }
+
+        RDouble currentTime = outnstep * physicalTimeStepDimensional;
+        if(monitorVariables[3] < 0 || maxLeakageTime < currentTime)
+        {
+            for (int iZone = 0; iZone < nZones; ++ iZone)
+            {
+                int zoneProcessorID = GetZoneProcessorID(iZone);
+                int currentProcessorID = GetCurrentProcessorID();
+                if (currentProcessorID == zoneProcessorID)
+                {
+                    UnstructGrid *grid = UnstructGridCast(PHSPACE::GetGrid(iZone, 0));
+                    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+                    int nBCRegion = unstructBCSet->GetnBCRegion();
+                    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+                    {
+                        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);		
+                        int bcType = bcRegion->GetBCType();
+                        if (bcType == PHENGLEI::PRESSURE_INLET)
+                        {
+                            bcRegion->SetBCType(PHENGLEI::SOLID_SURFACE);
+                        }
+                    }
+                }
+            }
+        }
+
+        for (int i = 5; i < 30; i++)
+        {
+            monitorVariables[i] = tempTotalVariables[i];
+        }
+
+        if (GetCurrentProcessorID() == GetServerProcessorID())
+        {
+            ostringstream resData;
+            resData << setiosflags(ios::left);
+            resData << setprecision(5);
+            resData << setiosflags(ios::scientific);
+            resData << setiosflags(ios::showpoint);
+
+            resData << setw(7) << outnstep << "    ";
+            resData << monitorVariables[1] << "   ";
+            resData << monitorVariables[2] << "   ";
+            resData << monitorVariables[3] << "   ";
+            resData << monitorVariables[4] << "   ";
+            for (int s = 0; s < nSpecies; ++ s)
+            {
+                resData << monitorVariables[5 + s] << "   ";
+            }
+            resData << endl;
+
+            //PrintToWindow(resData);
+            string resFileName = "results/leakage.dat";
+            ios_base::openmode openMode = ios_base::out | ios_base::app;
+
+            fstream file;
+            OpenFile(file, resFileName, openMode);
+            ostringstream dumpFile;
+            if (IfFileEmpty(file))
+            {
+                vector<string> title_tecplot;
+                title_tecplot.push_back("Title=\"THE RESIDUAL\"");
+                title_tecplot.push_back("Variables=");
+                title_tecplot.push_back("\"iter\"");
+                title_tecplot.push_back("\"physicalTime\"");
+                title_tecplot.push_back("\"totalLeakage\"");
+                title_tecplot.push_back("\"lastLeakageVolume\"");
+                title_tecplot.push_back("\"MassLeakageRate\"");
+
+                for (int s = 0; s < nSpecies; ++ s)
+                {
+                    title_tecplot.push_back("\"" +  speciesNames[s] + "\"");
+                }
+
+                for (std::size_t i = 0; i < title_tecplot.size(); ++i)
+                {
+                    dumpFile << title_tecplot[i] << "\n";
+                }
+            }
+            dumpFile << resData.str();
+            WriteASCIIFile(file, dumpFile.str());
+            CloseFile(file);
+        }
+    }
+
+    delete [] tempVariables;
+    delete [] tempTotalVariables;
+    delete [] primVars;
+}
+
+
+//! Drive functions to calculate residuals for different orders and dimensions.
+void NSSolverUnstruct::Turb_Sengy(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    if (viscousType >= TWO_EQU)
+    {
+        int nrokplus = 1;
+        GlobalDataBase::GetData("nrokplus", &nrokplus, PHINT, 1);
+
+        if (nrokplus > 0)
+        {
+            RDouble **res  = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res"));
+            RDouble *sengy = reinterpret_cast< RDouble * > (grid->GetDataPtr("sengy"  ));
+            for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+            {
+                res[4][iCell] += sengy[iCell];
+            }
+        }
+    }
+}
+
+//! Load flow variables stored in grid to q.
+void NSSolverUnstruct::LoadQ(Grid *gridIn, FieldProxy *qProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble **q = qProxy->GetField_UNS();
+
+    RDouble **qold = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar = parameters->GetLaminarNumber();
+
+    for (int m = 0; m < nLaminar; ++ m)
+    {
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            q[m][iCell] = qold[m][iCell];
+        }
+    }
+}
+
+//! Restrict defect from fine to coarse grid.
+void NSSolverUnstruct::RestrictDefect(Grid *fgrid_in, Grid *cgrid_in)
+{
+    UnstructGrid *fgrid = UnstructGridCast(fgrid_in);
+    UnstructGrid *cgrid = UnstructGridCast(cgrid_in);
+
+    int  fnTotalCell = fgrid->GetNTotalCell();
+    int *cell2coarsegridcell    = fgrid->GetCell2CoarseGridCell();
+
+    ZeroResiduals(cgrid);
+
+    RDouble **cres = reinterpret_cast< RDouble ** > (cgrid->GetDataPtr("res"));
+    RDouble **fres = reinterpret_cast< RDouble ** > (fgrid->GetDataPtr("res"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar = parameters->GetLaminarNumber();
+
+    for (int m = 0; m < nLaminar; ++ m)
+    {
+        for (int iCell = 0; iCell < fnTotalCell; ++ iCell)
+        {
+            cres[m][ cell2coarsegridcell[iCell] ] -= fres[m][iCell];
+        }
+    }
+}
+
+//! Put correction back on the coarse grid.
+void NSSolverUnstruct::PutCorrectionBack(Grid *gridIn, FieldProxy *qProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble **q = qProxy->GetField_UNS();
+
+    RDouble **qold = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar = parameters->GetLaminarNumber();
+
+    for (int m = 0; m < nLaminar; ++ m)
+    {
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            qold[m][iCell] += q[m][iCell];
+        }
+    }
+}
+
+//! Correct variable in fine grid using correction in coarse grid.
+void NSSolverUnstruct::CorrectFineGrid(Grid *fgrid_in, Grid *cgrid_in)
+{
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int mgProlongationType = parameters->GetMgProlongationType();
+
+    if(mgProlongationType == 2)
+    {
+        CorrectFineGridHighOrder(fgrid_in, cgrid_in);
+    }
+    else
+    {
+        CorrectFineGridZeroOrder(fgrid_in, cgrid_in);
+    }
+}
+
+void NSSolverUnstruct::CorrectFineGridZeroOrder(Grid *fgrid_in, Grid *cgrid_in)
+{
+    UnstructGrid *fgrid = UnstructGridCast(fgrid_in);
+    UnstructGrid *cgrid = UnstructGridCast(cgrid_in);
+
+    int fnTCell = fgrid->GetNTotalCell();
+
+    int * cell2coarsegridcell   = fgrid->GetCell2CoarseGridCell();
+
+    RDouble **fq = reinterpret_cast< RDouble ** > (fgrid->GetDataPtr("q"));
+    RDouble **cq = reinterpret_cast< RDouble ** > (cgrid->GetDataPtr("q"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar  = parameters->GetLaminarNumber();
+
+    RDouble mgCorrectionLimit = parameters->GetMgCorrectionLimit();
+
+    for (int m = 0; m < nLaminar; ++ m)
+    {
+        for (int iCell = 0; iCell < fnTCell; ++ iCell)
+        {
+            int coarseCell = cell2coarsegridcell[iCell];
+
+            RDouble fgridValue = fq[m][iCell];
+            RDouble correction = cq[m][coarseCell];
+            RDouble DQ         = MIN(fabs(correction), fabs(fgridValue) * mgCorrectionLimit);
+            fq[m][iCell]      += SIGN(DQ, correction);
+        }
+    }
+
+    //FreeGradientProxy(cgrid);
+}
+
+void NSSolverUnstruct::CorrectFineGridHighOrder(Grid *fgrid_in, Grid *cgrid_in)
+{
+    UnstructGrid *fgrid = UnstructGridCast(fgrid_in);
+    UnstructGrid *cgrid = UnstructGridCast(cgrid_in);
+
+    int fnTNode = fgrid->GetNTotalNode();
+    int fnTCell = fgrid->GetNTotalCell();
+    int fnBFace = fgrid->GetNBoundFace();
+    int fnTFace = fgrid->GetNTotalFace();
+
+    int * cell2CoarseGridCell = fgrid->GetCell2CoarseGridCell();
+    int * fleft_cell_of_face  = fgrid->GetLeftCellOfFace();
+    int * fright_cell_of_face = fgrid->GetRightCellOfFace();
+
+    int * cright_cell_of_face = cgrid->GetRightCellOfFace();
+
+    int ** face2nodeArray = fgrid->GetFace2NodeArray();
+    int * fnode_number_of_each_face = fgrid->GetNodeNumberOfEachFace();
+
+    RDouble **fq = reinterpret_cast< RDouble ** > (fgrid->GetDataPtr("q"));
+    RDouble **cq = reinterpret_cast< RDouble ** > (cgrid->GetDataPtr("q"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar  = parameters->GetLaminarNumber();
+
+    RDouble minRatio[5], maxRatio[5];
+    for (int m = 0; m < 5; ++ m)
+    {
+        minRatio[m] = LARGE;
+        maxRatio[m] = -LARGE;
+    }
+
+    RDouble mgCorrectionLimit = parameters->GetMgCorrectionLimit();
+
+    for (int m = 0; m < nLaminar; ++ m)
+    {
+        //if(m == 1 || m == 2 || m == 3) continue;
+        //! On coarse mesh, average the cell data onto nodes.
+        RDouble * fqNode  = new RDouble [ fnTNode ];
+        int * fnodeCount = new int [fnTNode];
+        for (int iNode = 0; iNode < fnTNode; ++ iNode)
+        {
+            fqNode[iNode]     = 0.0;
+            fnodeCount[iNode] = 0;
+        }
+
+        UnstructBCSet **bcRecord = fgrid->GetBCRecord();
+        for (int iFace = 0; iFace < fnTFace; ++ iFace)
+        {
+            int bcType = 0;
+            if(iFace < fnBFace)
+            {
+                bcType = bcRecord[iFace]->GetKey();
+            }
+
+            int le = fleft_cell_of_face[iFace];
+            int re = fright_cell_of_face[iFace];
+            int leftCoarseCell  = cell2CoarseGridCell[le];
+            int rightCoarseCell = -1;
+            if(iFace >= fnBFace)
+            {
+                rightCoarseCell = cell2CoarseGridCell[re];
+            }
+            else if(IsInterface(bcType))
+            {
+                int cFaceID = iFace;
+
+                //! DCQ = CQ - CQ_old, CQ && CQ_old are obtained by communicating.
+                rightCoarseCell = cright_cell_of_face[cFaceID];
+            }  
+
+            int nNode = fnode_number_of_each_face[iFace];
+            for (int iNode = 0; iNode < nNode; ++ iNode)
+            {
+                int fnodeID = face2nodeArray[iFace][iNode];
+
+                fqNode[fnodeID] += cq[m][leftCoarseCell];
+                fnodeCount[fnodeID] ++;
+
+                if(rightCoarseCell != -1)
+                {
+                fqNode[fnodeID] += cq[m][rightCoarseCell];
+                    fnodeCount[fnodeID] ++;
+            }
+        }
+        }
+
+        for (int iNode = 0; iNode < fnTNode; ++ iNode)
+        {
+            fqNode[iNode] /= fnodeCount[iNode];
+        }
+        delete [] fnodeCount;
+
+        //! On fine mesh, average the nodes data to cells.
+        int * fcellCount   = new int [fnTCell];
+        RDouble * fcellData = new RDouble [fnTCell];
+        for (int iCell = 0; iCell < fnTCell; ++ iCell)
+        {
+            fcellCount[iCell] = 0;
+            fcellData[iCell]  = 0.0;
+        }
+        
+        for (int iFace = 0; iFace < fnBFace; ++ iFace)
+        {
+            int le = fleft_cell_of_face[iFace];
+
+            int nNode = fnode_number_of_each_face[iFace];
+            for (int iNode = 0; iNode < nNode; ++ iNode)
+            {
+                int fnodeID = face2nodeArray[iFace][iNode];
+
+                fcellData[le] += fqNode[fnodeID];
+                ++ fcellCount[le];
+            }
+        }
+
+        for (int iFace = fnBFace; iFace < fnTFace; ++ iFace)
+        {
+            int le = fleft_cell_of_face[iFace];
+            int re = fright_cell_of_face[iFace];
+
+            int nNode = fnode_number_of_each_face[iFace];
+            for (int iNode = 0; iNode < nNode; ++ iNode)
+            {
+                int fnodeID = face2nodeArray[iFace][iNode];
+
+                fcellData[le] += fqNode[fnodeID];
+                ++ fcellCount[le];
+
+                fcellData[re] += fqNode[fnodeID];
+                ++ fcellCount[re];
+            }
+        }
+        delete [] fqNode;
+
+        //! Add the correction onto fine grid.
+        for (int iCell = 0; iCell < fnTCell; ++ iCell)
+        {
+            RDouble fgridValue = fq[m][iCell];
+            RDouble correction = fcellData[iCell] / fcellCount[iCell];
+            RDouble DQ         = MIN(fabs(correction), fabs(fgridValue) * mgCorrectionLimit);
+            fq[m][iCell]      += SIGN(DQ, correction);
+
+            if(m == IDX::IP || m == IDX::IR)
+            {
+                if (fq[m][iCell] <= 1.0e-10)
+                {
+                    cout << " Negative found after correction, variable = " << m 
+                         << ", find grid Value = " << fgridValue << ", correction = " << correction 
+                         << ", fcellID = " << iCell << ", ccellID = " << cell2CoarseGridCell[iCell] 
+                         << ", level = " << fgrid->GetLevel() << endl;
+                }
+            }
+        }
+        
+        delete [] fcellCount;
+        delete [] fcellData;
+    }
+}
+
+void NSSolverUnstruct::InterpolatFineGrid(Grid *fineGrid, Grid *coarseGrid)
+{
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    //! Interpolate vist only if for turbulent simulation is run on coarse grid.
+    //!   - 0: do not run turbulent simulation on coarse grid.
+    //!   - 1: run turbulent simulation on coarse grid.
+    int isRunTurbOnCoarseGrid = 0;
+
+    RDouble **fineQ   = reinterpret_cast<RDouble **> (fineGrid->GetDataPtr("q"));
+    RDouble **coarseQ = reinterpret_cast<RDouble **> (coarseGrid->GetDataPtr("q"));
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        InterpolatQ(fineGrid, fineQ[m], coarseGrid, coarseQ[m]);
+    }
+
+    RDouble *fineGama   = reinterpret_cast<RDouble *> (fineGrid->GetDataPtr("gama"));
+    RDouble *coarseGama = reinterpret_cast<RDouble *> (coarseGrid->GetDataPtr("gama"));
+
+    InterpolatQ(fineGrid, fineGama, coarseGrid, coarseGama);
+
+    int viscousType = parameters->GetViscousType();
+    if (viscousType > INVISCID)
+    {
+        RDouble *fineViscousLaminar   = reinterpret_cast<RDouble *> (fineGrid->GetDataPtr("visl"));
+        RDouble *coarseViscousLaminar = reinterpret_cast<RDouble *> (coarseGrid->GetDataPtr("visl"));
+
+        InterpolatQ(fineGrid, fineViscousLaminar, coarseGrid, coarseViscousLaminar);
+
+        if (viscousType > LAMINAR && isRunTurbOnCoarseGrid)
+        {
+            RDouble *fineViscousTurbulence   = reinterpret_cast<RDouble *> (fineGrid->GetDataPtr("vist"));
+            RDouble *coarseViscousTurbulence = reinterpret_cast<RDouble *> (coarseGrid->GetDataPtr("vist"));
+
+            InterpolatQ(fineGrid, fineViscousTurbulence, coarseGrid, coarseViscousTurbulence);
+        }
+    }
+}
+
+//! Load rhs to residual res stored in grid.
+void NSSolverUnstruct::LoadResiduals(Grid *gridIn, FieldProxy *rhsProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble **rhs = rhsProxy->GetField_UNS();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **res = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res"));
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            res[m][iCell] = - rhs[m][iCell];
+        }
+    }
+}
+
+RDouble NSSolverUnstruct::UnsteadyConvergence(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+
+    if (!isUnsteady)
+    {
+        return zero;
+    }
+
+    RDouble **q   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **qn1 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble **qn2 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q_unsteady_n2"));
+    RDouble **res = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res"));
+
+    int nLaminar  = parameters->GetLaminarNumber();
+
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble refGama = parameters->GetRefGama();
+
+    RDouble *prim0 = new RDouble[nEquation];
+    RDouble *prim1 = new RDouble[nEquation];
+    RDouble *prim2 = new RDouble[nEquation];
+
+    RDouble *qcsv0 = new RDouble[nEquation];
+    RDouble *qcsv1 = new RDouble[nEquation];
+    RDouble *qcsv2 = new RDouble[nEquation];
+
+    RDouble Ttr[3] = {0.0}, Tv[3] = {0.0}, Te[3] = {0.0};
+
+    using namespace GAS_SPACE;
+
+    RDouble sum1 = zero;
+    RDouble sum2 = zero;
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            prim0[m] = q  [m][iCell];
+            prim1[m] = qn1[m][iCell];
+            prim2[m] = qn2[m][iCell];
+        }
+
+        if (nTemperatureModel > 1)
+        {
+            gas->GetTemperature(prim0, Ttr[0], Tv[0], Te[0]);
+            gas->GetTemperature(prim1, Ttr[1], Tv[1], Te[1]);
+            gas->GetTemperature(prim2, Ttr[2], Tv[2], Te[2]);
+        }
+
+        //! Primitive2Conservative function does not need to input gama in fact.
+        //! It will be modified later.
+        gas->Primitive2Conservative(prim0, refGama, Tv[0], Te[0], qcsv0);
+        gas->Primitive2Conservative(prim1, refGama, Tv[1], Te[1], qcsv1);
+        gas->Primitive2Conservative(prim2, refGama, Tv[2], Te[2], qcsv2);
+
+        //! We need nLaminar here.
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            //! Now res has been converted to dq. It means that residual is not right hand side term,but dq.
+            RDouble dq_p =  res[m][iCell];       // qn+1,p+1 - qn+1,p
+            RDouble dq_n =  qcsv0[m] - qcsv1[m]; // qn+1,p+1 - qn
+            sum1 += dq_p * dq_p;
+            sum2 += dq_n * dq_n;
+        }
+    }
+
+    delete []prim0;
+    delete []prim1;
+    delete []prim2;
+    delete []qcsv0;
+    delete []qcsv1;
+    delete []qcsv2;
+
+    RDouble cvg = sqrt(ABS(sum1 / (sum2 + SMALL)));
+    return cvg;
+}
+
+void NSSolverUnstruct::UpdateUnsteadyFlow(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+
+    if (!isUnsteady) return;
+
+    RDouble **q   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **qn1 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble **qn2 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q_unsteady_n2"));
+
+    RDouble **resn1 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble **resn2 = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res_unsteady_n2"));
+    RDouble **resTmp = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res_unsteady_tmp"));
+
+    int nEquation = GetNumberOfEquations();
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            qn2[ m ][ iCell ] = qn1[ m ][ iCell ];
+            qn1[ m ][ iCell ] = q  [ m ][ iCell ];
+
+            resn2[ m ][ iCell ] = resn1 [ m ][ iCell] ;
+            resn1[ m ][ iCell ] = resTmp[ m ][ iCell] ; //! Here the current outnstep is over, the value of the stored resTmp should be assigned to resn1 for the next outnstep. It should be noticed that resTmp only contain the inviscid and viscous flux.
+        }
+    }
+
+    //! Statistical variables for unsteady simulation.
+    if (IsNeedStatistics())
+    {
+        int nStatisticalStep   = GlobalDataBase::GetIntParaFromDB("nStatisticalStep");
+        RDouble statisticalTimePeriod = GlobalDataBase::GetDoubleParaFromDB("statisticalTimePeriod");
+        RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+        RDouble c1 = 1.0 / (nStatisticalStep * 1.0);
+        if(statisticalTimePeriod > 0.0)
+        {
+            c1 = MAX(c1, physicalTimeStep / statisticalTimePeriod);
+        }
+        RDouble c2 = 1.0 - c1;
+
+        RDouble **qAverage = reinterpret_cast< RDouble ** > (grid->GetDataPtr("qAverage"));
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                qAverage[m][iCell] = c2 * qAverage[m][iCell] + c1 * q[m][iCell];
+            }
+        }
+    }
+
+    //! added by zzp 202108, Statistical Reynolds stress for unsteady simulation.
+    if (IsNeedReynoldsStressStatistics())
+    {
+        int nStatisticalStep   = GlobalDataBase::GetIntParaFromDB("nStatisticalStep");
+        RDouble statisticalTimePeriod = GlobalDataBase::GetDoubleParaFromDB("statisticalTimePeriod");
+        RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+        RDouble c1 = 1.0 / (nStatisticalStep * 1.0);
+        if(statisticalTimePeriod > 0.0)
+        {
+            c1 = MAX(c1, physicalTimeStep / statisticalTimePeriod);
+        }
+        RDouble c2 = 1.0 - c1;
+
+        RDouble **qAverage = reinterpret_cast< RDouble ** > (grid->GetDataPtr("qAverage"));
+        RDouble **tauAverage = reinterpret_cast< RDouble ** > (grid->GetDataPtr("tauAverage"));
+        RDouble **q2Average = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q2Average"));
+
+        int statisticMethod = parameters->GetStatisticMethod();
+        if(statisticMethod == 0)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                RDouble u = q[IU][iCell];
+                RDouble v = q[IV][iCell];
+                RDouble w = q[IW][iCell];
+
+                q2Average[0][iCell] = c2 * q2Average[0][iCell] + c1 * u * u;
+                q2Average[1][iCell] = c2 * q2Average[1][iCell] + c1 * v * v;
+                q2Average[2][iCell] = c2 * q2Average[2][iCell] + c1 * w * w;
+                q2Average[3][iCell] = c2 * q2Average[3][iCell] + c1 * u * v;
+                q2Average[4][iCell] = c2 * q2Average[4][iCell] + c1 * u * w;
+                q2Average[5][iCell] = c2 * q2Average[5][iCell] + c1 * v * w;
+            }
+
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                RDouble uavg = qAverage[IU][iCell];
+                RDouble vavg = qAverage[IV][iCell];
+                RDouble wavg = qAverage[IW][iCell];
+
+                tauAverage[0][iCell] = q2Average[0][iCell] - uavg * uavg;
+                tauAverage[1][iCell] = q2Average[1][iCell] - vavg * vavg;
+                tauAverage[2][iCell] = q2Average[2][iCell] - wavg * wavg;
+                tauAverage[3][iCell] = q2Average[3][iCell] - uavg * vavg;
+                tauAverage[4][iCell] = q2Average[4][iCell] - uavg * wavg;
+                tauAverage[5][iCell] = q2Average[5][iCell] - vavg * wavg;
+            }
+        }
+
+        else
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                RDouble uprm = q[IU][iCell] - qAverage[IU][iCell];
+                RDouble vprm = q[IV][iCell] - qAverage[IV][iCell];
+                RDouble wprm = q[IW][iCell] - qAverage[IW][iCell];
+
+                tauAverage[0][iCell] = c2 * tauAverage[0][iCell] + c1 * uprm * uprm;
+                tauAverage[1][iCell] = c2 * tauAverage[1][iCell] + c1 * vprm * vprm;
+                tauAverage[2][iCell] = c2 * tauAverage[2][iCell] + c1 * wprm * wprm;
+                tauAverage[3][iCell] = c2 * tauAverage[3][iCell] + c1 * uprm * vprm;
+                tauAverage[4][iCell] = c2 * tauAverage[4][iCell] + c1 * uprm * wprm;
+                tauAverage[5][iCell] = c2 * tauAverage[5][iCell] + c1 * vprm * wprm;
+            }
+        }
+    }
+}
+
+void NSSolverUnstruct::StoreHistoricalResidual(Grid *gridIn)
+{
+    ;
+}
+
+void NSSolverUnstruct::DualTimeSource(Grid *gridIn)
+{
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        return;
+    }
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble **q     = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble **qn1   = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_unsteady_n1"));
+    RDouble **qn2   = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_unsteady_n2"));
+
+    RDouble **res   = reinterpret_cast<RDouble **> (grid->GetDataPtr("res"));
+    RDouble **resn1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_unsteady_n1"));
+    RDouble **resn2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_unsteady_n2"));
+    RDouble **resTmp = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_unsteady_tmp"));
+
+    RDouble *vol   = grid->GetCellVolume(); //! The volume at current timestep. If it is dualtime step method, it represents the volume at timestep of n+1.
+    RDouble *voln1 = grid->GetCellVolume(); //! The volume at timestep of n  .
+    RDouble *voln2 = grid->GetCellVolume(); //! the volume at timestep of n-1.
+
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble refGama = parameters->GetRefGama();
+
+    //! the primitive variables
+    RDouble *prim0 = new RDouble[nEquation];
+    RDouble *prim1 = new RDouble[nEquation];
+    RDouble *prim2 = new RDouble[nEquation];
+
+    //! the conservative variables
+    RDouble *qcsv0 = new RDouble[nEquation];
+    RDouble *qcsv1 = new RDouble[nEquation];
+    RDouble *qcsv2 = new RDouble[nEquation];
+
+    RDouble Ttr[3] = {0.0}, Tv[3] = {0.0}, Te[3] = {0.0};
+
+    using namespace GAS_SPACE;
+
+    //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                resTmp[m][iCell] = res [m][iCell];
+            }
+        }
+
+    //! Computation of dualtime coefficients, including three coefficients for Residual of R(p), R(n) and R(n-1),
+    //! and three coefficients for conservative variables of qcsv(p), qcsv(n), and qcsv(n-1),
+    //! the fourth coefficient is also used for the real    time part of the diagonal data for the matrix of the left term when LUSGS is running,
+    //! the last   coefficient is      used for the virtual time part of the diagonal data for the matrix of the left term when LUSGS is running.
+    RDouble dualTimeCoefficient[7];
+    const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+    ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+
+    RDouble dualTimeResC1 = dualTimeCoefficient[0];
+    RDouble dualTimeResC2 = dualTimeCoefficient[1];
+    RDouble dualTimeResC3 = dualTimeCoefficient[2];
+    RDouble dualTimeQC1   = dualTimeCoefficient[3];
+    RDouble dualTimeQC2   = dualTimeCoefficient[4];
+    RDouble dualTimeQC3   = dualTimeCoefficient[5];
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            prim0[m] = q  [m][iCell];
+            prim1[m] = qn1[m][iCell];
+            prim2[m] = qn2[m][iCell];
+        }
+        if (nTemperatureModel > 1)
+        {
+            gas->GetTemperature(prim0, Ttr[0], Tv[0], Te[0]);
+            gas->GetTemperature(prim1, Ttr[1], Tv[1], Te[1]);
+            gas->GetTemperature(prim2, Ttr[2], Tv[2], Te[2]);
+        }
+        //! In fact, there is no need to input the variable of refGama for the function of Primitive2Conservative, it is to be improved.
+        gas->Primitive2Conservative(prim0, refGama, Tv[0], Te[0], qcsv0);
+        gas->Primitive2Conservative(prim1, refGama, Tv[1], Te[1], qcsv1);
+        gas->Primitive2Conservative(prim2, refGama, Tv[2], Te[2], qcsv2);
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            RDouble dualSrcRes = dualTimeResC1 * res  [ m ][ iCell ] +
+                                dualTimeResC2 * resn1[ m ][ iCell ] +
+                                dualTimeResC3 * resn2[ m ][ iCell ];
+
+            RDouble dualSrcQ   = dualTimeQC1 * qcsv0[ m ] * vol  [ iCell ] + 
+                                dualTimeQC2 * qcsv1[ m ] * voln1[ iCell ] + 
+                                dualTimeQC3 * qcsv2[ m ] * voln2[ iCell ];
+
+            res[m][iCell] = dualSrcRes + dualSrcQ;
+        }
+    }
+
+    delete []prim0;
+    delete []prim1;
+    delete []prim2;
+    delete []qcsv0;
+    delete []qcsv1;
+    delete []qcsv2;
+}
+
+void NSSolverUnstruct::ChemicalSource(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble *vol  = grid->GetCellVolume();
+
+    RDouble **q   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **t   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("t"));
+    RDouble **res = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nm = parameters->GetNSEquationNumber();
+    int nLaminar  = parameters->GetLaminarNumber();
+
+    RDouble **src = NewPointer2<RDouble>(nLaminar, nTotalCell);
+
+    using namespace GAS_SPACE;
+    using namespace IDX;
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        gas->ChemicalSource(q, t, vol, src, iCell);
+        for (int m = nm; m < nLaminar; ++ m)
+        {
+            res[m][iCell] += src[m - nm][iCell];
+        }
+    }
+
+    DelPointer2(src);
+}
+
+void NSSolverUnstruct::gravitySource(Grid* gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int isGravity = 0;
+    if (GlobalDataBase::IsExist("isGravity", PHINT, 1))
+    {
+        isGravity = GlobalDataBase::GetIntParaFromDB("isGravity");
+    }
+    if (isGravity == 0)
+    {
+        return;
+    }
+
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble *vol  = grid->GetCellVolume();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble refVelocity = parameters->GetRefMachNumber() * parameters->GetRefDimensionalSonicSpeed();
+
+    RDouble gx = 0.0;
+    RDouble gy = -9.81;
+    RDouble gz = 0.0;
+
+    RDouble gxNonDim = gx / refVelocity / refVelocity;
+    RDouble gyNonDim = gy / refVelocity / refVelocity;
+    RDouble gzNonDim = gz / refVelocity / refVelocity;
+
+    RDouble **q   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **res = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res"));
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        res[IRU][iCell] += (q[IR][iCell] - 1.0 ) * vol[iCell] * gxNonDim;
+        res[IRV][iCell] += (q[IR][iCell] - 1.0 ) * vol[iCell] * gyNonDim;
+        res[IRW][iCell] += (q[IR][iCell] - 1.0 ) * vol[iCell] * gzNonDim;
+        res[IRE][iCell] += (q[IR][iCell] - 1.0 ) * vol[iCell] * 
+            (gxNonDim * q[IRU][iCell] + gyNonDim * q[IRV][iCell] + gzNonDim * q[IRW][iCell]);
+    }
+}
+
+void NSSolverUnstruct::RotatingSource(Grid* gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble *vol = grid->GetCellVolume();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble refVelocity = parameters->GetRefMachNumber() * parameters->GetRefDimensionalSonicSpeed();
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **res = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res"));
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+
+    //! angular velocity
+    RDouble Omega[100];
+    GlobalDataBase::GetData("Omega", &Omega, PHDOUBLE, nTurboZone);
+
+    //! Parallel
+    int iTurboZone = grid->GetOrdinaryGridIndex();
+    //! Serial
+    if (iTurboZone == -1)
+    {
+        iTurboZone = grid->GetZoneID();
+    }
+
+    Omega[iTurboZone] /= refVelocity;
+
+    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+    {
+        res[IRV][iCell] += q[IR][iCell] * Omega[iTurboZone] * q[IW][iCell] * vol[iCell];
+        res[IRW][iCell] -= q[IR][iCell] * Omega[iTurboZone] * q[IV][iCell] * vol[iCell];
+    }
+}
+
+void NSSolverUnstruct::ComputeFirstLayerGridHeight(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    using namespace IDX;
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            // iFace is the face number in the set of faceIndex.
+            if (!IsWall(bcType) && bcType != PHENGLEI::ABLATION_SURFACE)
+            {
+                continue;
+            }
+
+#ifdef USE_ALTERNATIVE_CODE
+            RDouble cellVolume = gridCellVolume(iWall, jWall, kWall); //The volume of first cell.
+                                                                      //RDouble deltaHeight = half * cellVolume / surfaceArea;
+#else
+            //! The projection of the dy called the distance between the center of the cell and that of the surface on normal vector.
+            //RDouble deltaHeight = fabs((xcc - xfc) *xfn[iFace] + (ycc - yfc) * yfn[iFace] + (zcc - zfc) * zfn[iFace]);
+#endif
+        }
+    }
+}
+
+void NSSolverUnstruct::ComputeGamaAndTemperature(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    RDouble **t   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("t"));
+    RDouble **q   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble *gama = reinterpret_cast< RDouble *  > (grid->GetDataPtr("gama"));
+
+    RDouble refGama = parameters->GetRefGama();
+
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    int mTT = parameters->GetmTT();
+    int mTV = parameters->GetmTV();
+    int mTE = parameters->GetmTE();
+
+    using namespace GAS_SPACE;
+    using namespace IDX;
+
+    if (nChemical == 1)
+    {
+        RDouble *prim = new RDouble[nEquation];
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                prim[m] = q[m][iCell];
+            }
+            gas->GetSpecificHeatRatioAndTemperatute(prim, gama[iCell], t[mTT][iCell], t[mTV][iCell], t[mTE][iCell]);
+            if (nTemperatureModel > 1)
+            {
+                t[ITV][iCell] = t[mTE][iCell];
+                if (nTemperatureModel == 3)
+                {
+                    t[ITE][iCell] = t[mTE][iCell];
+                }
+            }
+        }
+        delete [] prim;    prim = nullptr;
+    }
+    else
+    {
+        RDouble coefficientofStateEquation = gas->GetCoefficientOfStateEquation();
+
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            RDouble &rm = q[IR][iCell];
+            RDouble &pm = q[IP][iCell];
+            gama[iCell] = refGama;
+            t[ITT][iCell] = pm / (coefficientofStateEquation * rm);
+        }
+    }
+}
+
+void NSSolverUnstruct::ComputeNodeValue(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalNode = grid->GetNTotalNode();
+
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    RDouble **q = reinterpret_cast<RDouble **>(grid->GetDataPtr("q"));
+    RDouble **t = reinterpret_cast<RDouble **>(grid->GetDataPtr("t"));
+
+    RDouble     **qNode = reinterpret_cast<RDouble **>(grid->GetDataPtr("qnode"));
+    RDouble     **tNode = reinterpret_cast<RDouble **>(grid->GetDataPtr("tnode"));
+    RDouble *nodeWeight = reinterpret_cast<RDouble *>(grid->GetDataPtr("nodeWeight"));
+
+    int nEquation = GetNumberOfEquations();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    int *nodeNumberOfEachFace = grid->GetNodeNumberOfEachFace();
+    int **face2nodeArray      = grid->GetFace2NodeArray();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        nodeWeight[iNode] = 0.0;
+        for(int m =0; m < nEquation; ++ m)
+        {
+            qNode[m][iNode] = 0; 
+        }
+        tNode[0][iNode] = 0;
+    }
+
+    //! Node BC type.
+    int *nodeBC = NewPointer< int > (nTotalNode);
+    PHSPACE::SetField(nodeBC, PHENGLEI::NO_BOUNDARY_CONDITION, nTotalNode);
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        if (bcType == PHENGLEI::SOLID_SURFACE)
+        {
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                //! iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {            
+                    int point = face2nodeArray[iFace][jNode];
+                    nodeBC[point] = bcType;
+                } 
+            }
+        }
+    }
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        if (bcType == PHENGLEI::FARFIELD)
+        {
+            vector<int>* faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                //! iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+
+                //! Far field has the second highest priority.
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {            
+                    int point = face2nodeArray[iFace][jNode];
+                    if(nodeBC[point] == PHENGLEI::SOLID_SURFACE)
+                    {
+                        continue;
+                    }
+
+                    nodeBC[point] = bcType;
+                }
+            }
+        }
+    }
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            //! iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            if(bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::FARFIELD ||
+                bcType == PHENGLEI::SYMMETRY || bcType == PHENGLEI::INTERFACE)
+            {
+                continue;
+            }
+
+            //! other BC, except symmetry and interface.
+            for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+            {            
+                int point = face2nodeArray[iFace][jNode];
+                if(nodeBC[point] == PHENGLEI::SOLID_SURFACE || nodeBC[point] == PHENGLEI::FARFIELD)
+                {
+                    continue;
+                }
+
+                nodeBC[point] = bcType;
+            }
+        }
+    }
+
+    //! Boundary faces.
+    RDouble **qOnBCFace = NewPointer2< RDouble >(nEquation + 1, nBoundFace);    //! '1' is temperature.
+    PHSPACE::SetField(qOnBCFace, nEquation + 1, nBoundFace, zero);
+
+    //! Init q on BC faces.
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            // iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            if (bcType == PHENGLEI::INTERFACE || bcType == PHENGLEI::SYMMETRY)
+            {
+                continue;
+            }
+
+            int le = leftCellOfFace [iFace];
+            int re = rightCellOfFace[iFace];
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                qOnBCFace[m][iFace] = half * (q[m][le] + q[m][re]);
+            }
+
+            qOnBCFace[nEquation][iFace] = half * (t[0][le] + t[0][re]);
+        }
+    }
+
+    //! Step1: solid surface.
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        if (bcType == PHENGLEI::SOLID_SURFACE)
+        {
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                //! iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    int point = face2nodeArray[iFace][jNode];
+
+                    RDouble dx = x[point] - xfc[iFace];
+                    RDouble dy = y[point] - yfc[iFace];
+                    RDouble dz = z[point] - zfc[iFace];
+                    RDouble dist = DISTANCE(dx, dy, dz);
+                    RDouble weightTemp = 1.0 / dist;
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        RDouble faceQtemp = qOnBCFace[m][iFace];
+                        qNode[m][point] += faceQtemp * weightTemp;
+                    }
+                    tNode[0][point] += qOnBCFace[nEquation][iFace] * weightTemp;
+
+                    nodeWeight[point] += weightTemp;
+                }
+            }
+        }
+    }
+
+    //! Step2: Far-field.
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        if (bcType == PHENGLEI::FARFIELD)
+        {
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                //! iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    int point = face2nodeArray[iFace][jNode];
+                    if(nodeBC[point] == PHENGLEI::SOLID_SURFACE)
+                    {
+                        continue;
+                    }
+
+                    RDouble dx = x[point] - xfc[iFace];
+                    RDouble dy = y[point] - yfc[iFace];
+                    RDouble dz = z[point] - zfc[iFace];
+                    RDouble dist = DISTANCE(dx, dy, dz);
+                    RDouble weightTemp = 1.0 / dist;
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        RDouble faceQtemp = qOnBCFace[m][iFace];
+                        qNode[m][point] += faceQtemp * weightTemp;
+                    }
+                    tNode[0][point] += qOnBCFace[nEquation][iFace] * weightTemp;
+
+                    nodeWeight[point] += weightTemp;
+                }
+            }
+        }
+    }
+
+    //! Step3: other BC except solid surface/far field/symmetry/Interface.
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        if (bcType != PHENGLEI::SOLID_SURFACE && bcType != PHENGLEI::FARFIELD && 
+            bcType != PHENGLEI::SYMMETRY      && bcType != PHENGLEI::INTERFACE)
+        {
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                //! iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    int point = face2nodeArray[iFace][jNode];
+                    if(nodeBC[point] == PHENGLEI::SOLID_SURFACE || nodeBC[point] == PHENGLEI::FARFIELD)
+                    {
+                        continue;
+                    }
+
+                    RDouble dx = x[point] - xfc[iFace];
+                    RDouble dy = y[point] - yfc[iFace];
+                    RDouble dz = z[point] - zfc[iFace];
+                    RDouble dist = DISTANCE(dx, dy, dz);
+                    RDouble weightTemp = 1.0 / dist;                
+
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        RDouble faceQtemp = qOnBCFace[m][iFace];
+                        qNode[m][point] += faceQtemp * weightTemp;
+                    }            
+                    tNode[0][point] += qOnBCFace[nEquation][iFace] * weightTemp;
+
+                    nodeWeight[point] += weightTemp;                
+                }
+            }
+        }
+    }
+   
+    //! Step4: Now the interior points.
+    //!        Importantly, the symmetry points are used as interior points.
+    int **cell2NodeArray       = grid->GetCell2NodeArray();
+    int  *nodeNumberOfEachCell = grid->GetNodeNumberOfEachCell();
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        int nNode = nodeNumberOfEachCell[iCell];
+        for (int jNode = 0; jNode < nNode; ++ jNode)
+        {
+            int point = cell2NodeArray[iCell][jNode];
+            if(nodeBC[point] != PHENGLEI::NO_BOUNDARY_CONDITION)
+            {
+                continue;
+            }
+
+            //! NO_BC && Symmetry && Interface?
+            RDouble dx = x[point] - xcc[iCell];
+            RDouble dy = y[point] - ycc[iCell];
+            RDouble dz = z[point] - zcc[iCell];
+            RDouble dist = DISTANCE(dx, dy, dz);
+            RDouble weightTemp = 1.0 / dist;
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                RDouble cellQtemp = q[m][iCell];
+                qNode[m][point] += cellQtemp * weightTemp;
+            }            
+            tNode[0][point] += t[0][iCell] * weightTemp;
+
+            nodeWeight[point] += weightTemp; 
+        }
+    }
+
+    //! The velocity modify has not been considered on the symmetry!
+
+    //! Change the number of points divided by the interpoint to the number of points before partition,because it is a face loop,each point is calculated twice,so the number of points needs to be multiplied by 2.
+    InterpointInformation *interPointInfor = grid->GetInterpointInfo();
+    if (interPointInfor)
+    {
+        int numberOfInterpoints = interPointInfor->GetNumberOfInterpoints();
+        int *interPoint2GlobalPoint = interPointInfor->GetInterPoint2GlobalPoint();
+        int *labelOfInterPoint = interPointInfor->GetLabelOfInterPoint();
+
+        for (int iPoint = 0; iPoint < numberOfInterpoints; ++ iPoint)
+        {
+            int globalPoint = interPoint2GlobalPoint[iPoint];
+            if (labelOfInterPoint[iPoint] != 1)
+            {
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    qNode[m][globalPoint] = 0;
+                }
+                tNode[0][globalPoint] = 0;
+            }
+        }
+
+        RDouble **qInterPoint = reinterpret_cast<RDouble **>(grid->GetDataPtr("qInterPoint"));
+        RDouble **tInterPoint = reinterpret_cast<RDouble **>(grid->GetDataPtr("tInterPoint"));
+        for (int iPoint = 0; iPoint < numberOfInterpoints; ++ iPoint)
+        {
+            for (int m = 0; m < nEquation; m++)
+            {
+                qInterPoint[m][iPoint] =0;
+            }
+            tInterPoint[0][iPoint] =0;
+        }
+    }
+
+    DelPointer2(qOnBCFace);
+    DelPointer(nodeBC);
+}
+
+
+void NSSolverUnstruct::ModifyNodeValue(Grid *grid_in)
+{
+    UnstructGrid *grid = UnstructGridCast(grid_in);
+    int nTotalNode = grid->GetNTotalNode();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble     **qnode = reinterpret_cast<RDouble **>(grid->GetDataPtr("qnode"));
+    RDouble     **tnode = reinterpret_cast<RDouble **>(grid->GetDataPtr("tnode"));
+    RDouble *nodeWeight = reinterpret_cast<RDouble  *>(grid->GetDataPtr("nodeWeight"));
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        if (nodeWeight[iNode] > SMALL)
+        {
+            for (int m = 0; m < nEquation; m++)
+            {
+                qnode[m][iNode] /= nodeWeight[iNode];
+            }
+            tnode[0][iNode] /= nodeWeight[iNode];
+        }
+        else
+        {
+            for (int m = 0; m < nEquation; m++)
+            {
+                qnode[m][iNode] = 0.0;
+            }
+            tnode[0][iNode] = 0.0;
+        }
+    }
+
+    string gradientName = GlobalDataBase::GetStrParaFromDB("gradientName");
+    if (gradientName == "ggnodelaplacian")
+    {
+        CompNodeVarForGGNodeLaplacian(grid);
+    }
+}
+
+
+void NSSolverUnstruct::CompNodeVarForGGNodeLaplacian(Grid *grid_in)
+{
+    UnstructGrid *grid = UnstructGridCast(grid_in);
+    int nTotalNode = grid->GetNTotalNode();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **qnode = reinterpret_cast<RDouble **>(grid->GetDataPtr("qnode"));
+    RDouble **tnode = reinterpret_cast<RDouble **>(grid->GetDataPtr("tnode"));
+
+    RDouble **q = reinterpret_cast<RDouble **>(grid->GetDataPtr("q"));
+    RDouble **t = reinterpret_cast<RDouble **>(grid->GetDataPtr("t"));
+
+    //! Get necessary geometry information.
+    int *nCPN  = grid->GetCellNumberOfEachNode();
+    int *n2c   = grid->GetNode2Cell();
+    int inode, j, icell, count;
+    int *knode;
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+    RDouble *xn  = grid->GetX();
+    RDouble *yn  = grid->GetY();
+    RDouble *zn  = grid->GetZ();
+
+    RDouble weight, weight1, weight2, *n_count;
+    RDouble *lamdax = grid->GetLamdax();
+    RDouble *lamday = grid->GetLamday();
+    RDouble *lamdaz = grid->GetLamdaz();
+
+    if( lamdax == NULL || lamday == NULL || lamdaz == NULL)
+    {
+        grid->CalcLaplacianWeitht();
+        lamdax = grid->GetLamdax();
+        lamday = grid->GetLamday();
+        lamdaz = grid->GetLamdaz();
+    }
+
+    knode = grid->Getknode();
+
+    n_count = new RDouble [ nTotalNode ];
+    for( inode = 0; inode < nTotalNode; ++ inode )
+    {
+        for (int m = 0; m < nEquation; m++)
+        {
+            qnode[m][inode] = 0.0;
+        }
+        tnode[0][inode] = 0.0;
+        n_count[ inode ] = 0.0;
+    }
+    count=0;
+    for( inode = 0; inode < nTotalNode; ++ inode )
+    {
+        for( j = 0; j < nCPN[ inode ]; ++j )
+        {
+            icell = n2c[ count++ ];
+            weight1 = 1 + lamdax[ inode ] * ( xcc[ icell ] - xn[ inode ] )
+                + lamday[ inode ] * ( ycc[ icell ] - yn[ inode ] )
+                + lamdaz[ inode ] * ( zcc[ icell ] - zn[ inode ] );
+            weight2 = 1 / sqrt( ( xcc[ icell ] - xn[ inode ] ) * ( xcc[ icell ] - xn[ inode ] )
+                + ( ycc[ icell ] - yn[ inode ] ) * ( ycc[ icell ] - yn[ inode ] )
+                + ( zcc[ icell ] - zn[ inode ] ) * ( zcc[ icell ] - zn[ inode ] ) );
+            weight  = weight1 * ( 1 - knode[ inode ] ) + weight2 * knode[ inode ];
+
+            //q_n[ inode ] += weight * q[ icell ];
+
+            for (int m = 0; m < nEquation; m++)
+            {
+                qnode[m][ inode ] += weight * q[m][ icell ];
+            }
+            tnode[0][ inode ] += weight * t[0][ icell ];
+            n_count[ inode ] += weight;
+        }
+    }
+
+    for( inode = 0; inode < nTotalNode; ++ inode ) 
+    {
+        for (int m = 0; m < nEquation; m++)
+        {
+            qnode[m][inode] /= n_count[ inode ] + TINY;
+        }
+        tnode[0][inode] /= n_count[ inode ] + TINY;
+    }
+
+    delete [] n_count;    n_count = nullptr;
+}
+
+RDouble* NSSolverUnstruct::CompSoundSpeed(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble **q   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble *gama = reinterpret_cast< RDouble * > (grid->GetDataPtr("gama"));
+    RDouble *c = new RDouble[nTotal];
+
+    using namespace IDX;
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        c[iCell] = sqrt(gama[iCell] * q[IP][iCell] / q[IR][iCell]);
+    }
+
+    return c;
+}
+
+RDouble** NSSolverUnstruct::ComputePrimitiveVariablesWithMoleFraction(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble **q   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nm = parameters->GetNSEquationNumber();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+
+    RDouble **moleFraction = NewPointer2<RDouble>(nSpeciesNumber, nTotal);
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        RDouble *massFractionTemp = new RDouble[nSpeciesNumber];
+        RDouble *moleFractionTemp = new RDouble[nSpeciesNumber];
+        for (int m = 0; m < nSpeciesNumber; ++ m)
+        {
+            massFractionTemp[m] = q[nm + m][iCell];
+        }
+        gas->ComputeMoleFractionByMassFraction(massFractionTemp,moleFractionTemp);
+
+        for (int m = 0; m < nSpeciesNumber; ++ m)
+        {
+            moleFraction[m][iCell] = moleFractionTemp[m];
+        }
+        delete []massFractionTemp;
+        delete []moleFractionTemp;
+    }
+
+    return moleFraction;
+}
+
+RDouble** NSSolverUnstruct::ComputeDimensionalVariables(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble **q   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **t   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("t"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble refDensity = parameters->GetRefDimensionalDensity();
+    RDouble refTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble refVelocity = parameters->GetRefMachNumber() * parameters->GetRefDimensionalSonicSpeed();
+    RDouble refPressure = refDensity * refVelocity * refVelocity;
+
+    RDouble velocityMagnitude;
+    RDouble **dimensionalVariables   = NewPointer2<RDouble>(7, nTotal);
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        //! Compute the dimensional density.
+        dimensionalVariables[0][iCell] = refDensity * q[IR][iCell];
+
+        //! Compute the dimensional velocity.
+        dimensionalVariables[1][iCell] = refVelocity * q[IU][iCell];
+        dimensionalVariables[2][iCell] = refVelocity * q[IV][iCell];
+        dimensionalVariables[3][iCell] = refVelocity * q[IW][iCell];
+        velocityMagnitude = sqrt(q[IU][iCell] * q[IU][iCell] + q[IV][iCell] * q[IV][iCell] + q[IW][iCell] * q[IW][iCell]);
+        dimensionalVariables[4][iCell] = refVelocity * velocityMagnitude;
+        //! Compute the dimensional pressure.
+        dimensionalVariables[5][iCell] = refPressure * q[IP][iCell];
+
+        //! Compute the dimensional temperature.
+        dimensionalVariables[6][iCell] = refTemperature * t[ITT][iCell];
+    }
+
+    return dimensionalVariables;
+}
+
+RDouble* NSSolverUnstruct::CompMachNumber(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble **q   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble *gama = reinterpret_cast< RDouble * > (grid->GetDataPtr("gama"));
+    RDouble *mach = new RDouble[nTotal];
+
+    using namespace IDX;
+
+    RDouble rm,um,vm,wm,pm,c2,v2;
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        rm = q[IR][iCell];
+        um = q[IU][iCell];
+        vm = q[IV][iCell];
+        wm = q[IW][iCell];
+        pm = q[IP][iCell];
+        c2 = abs(gama[iCell] * pm / rm);
+        v2 = um * um + vm * vm + wm * wm;
+
+        mach[iCell] = sqrt(v2 / c2);
+    }
+    return mach;
+}
+
+RDouble * NSSolverUnstruct::ComputeVorticitybyQCriteria(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+    RDouble * vorticity = new RDouble [ nTotal ];
+
+    if(!WantVisualField(grid))
+    {
+        //! Even if do not visual field vorticity, 
+        //! it would be dumped on boundary, to compatible with the field variable.
+        PHSPACE::SetField(vorticity, -1.0e10, nTotal);
+        return vorticity;
+    }
+
+    RDouble **dqdx = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **dqdy = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **dqdz = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradPrimtiveVarZ"));
+
+    using namespace IDX;
+
+    RDouble * dudxField = dqdx[ IU ];
+    RDouble * dudyField = dqdy[ IU ];
+    RDouble * dudzField = dqdz[ IU ];
+
+    RDouble * dvdxField = dqdx[ IV ];
+    RDouble * dvdyField = dqdy[ IV ];
+    RDouble * dvdzField = dqdz[ IV ];
+
+    RDouble * dwdxField = dqdx[ IW ];
+    RDouble * dwdyField = dqdy[ IW ];
+    RDouble * dwdzField = dqdz[ IW ];
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell) 
+    {
+        RDouble dudx = dudxField[ iCell ];
+        RDouble dudy = dudyField[ iCell ];
+        RDouble dudz = dudzField[ iCell ];
+
+        RDouble dvdx = dvdxField[ iCell ];
+        RDouble dvdy = dvdyField[ iCell ];
+        RDouble dvdz = dvdzField[ iCell ];
+
+        RDouble dwdx = dwdxField[ iCell ];
+        RDouble dwdy = dwdyField[ iCell ];
+        RDouble dwdz = dwdzField[ iCell ];
+
+        RDouble q1 = dvdy * dwdz - dwdy * dvdz;
+        RDouble q2 = dudx * dwdz - dwdx * dudz;
+        RDouble q3 = dudx * dvdy - dvdx * dudy;
+
+        vorticity[ iCell ] = q1 + q2 + q3; 
+    }
+
+    return vorticity;
+}
+
+void NSSolverUnstruct::ComputeVorticitybyQCriteria(Grid *gridIn, RDouble * vorticity_x, RDouble * vorticity_y, RDouble * vorticity_z, RDouble * vorticityMagnitude,  RDouble * strain_rate,  RDouble * Q_criteria)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble **dqdx = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **dqdy = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **dqdz = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradPrimtiveVarZ"));
+    using namespace IDX;
+
+    RDouble * dudxField = dqdx[ IU ];
+    RDouble * dudyField = dqdy[ IU ];
+    RDouble * dudzField = dqdz[ IU ];
+
+    RDouble * dvdxField = dqdx[ IV ];
+    RDouble * dvdyField = dqdy[ IV ];
+    RDouble * dvdzField = dqdz[ IV ];
+
+    RDouble * dwdxField = dqdx[ IW ];
+    RDouble * dwdyField = dqdy[ IW ];
+    RDouble * dwdzField = dqdz[ IW ];
+
+    RDouble Omx,Omy,Omz,Om;
+    RDouble s11, s12, s13, s22, s23, s33, S;
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell) 
+    {
+        RDouble dudx = dudxField[ iCell ];
+        RDouble dudy = dudyField[ iCell ];
+        RDouble dudz = dudzField[ iCell ];
+
+        RDouble dvdx = dvdxField[ iCell ];
+        RDouble dvdy = dvdyField[ iCell ];
+        RDouble dvdz = dvdzField[ iCell ];
+
+        RDouble dwdx = dwdxField[ iCell ];
+        RDouble dwdy = dwdyField[ iCell ];
+        RDouble dwdz = dwdzField[ iCell ];
+
+
+        s11 = dudx; s22 = dvdy; s33 = dwdz;
+        s12 = half * (dudy + dvdx); s13 = half * (dudz + dwdx); s23 = half * (dvdz + dwdy);
+        S = two * (s11*s11 + s22*s22 + s33*s33 + two*(s12*s12 + s13*s13 + s23*s23));
+        S = sqrt (S);
+        strain_rate[iCell] = S;
+
+        Omx = dwdy - dvdz; 
+        Omy = dudz - dwdx;
+        Omz = dvdx - dudy;
+        Om = DISTANCE(Omx, Omy, Omz);
+
+        vorticity_x[iCell] = Omx; 
+        vorticity_y[iCell] = Omy;
+        vorticity_z[iCell] = Omz;
+        vorticityMagnitude[iCell] = Om; 
+
+        Q_criteria[iCell] = fourth * (Om * Om - S * S);
+    }
+}
+
+RDouble * NSSolverUnstruct::ComputeCp(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+    RDouble ** q   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+
+    using namespace IDX;
+    RDouble poo = primitiveVarFarfield[IP];
+
+    //! Pressure cofficients: cp = [p - 1.0 / (gama * mach * mach)] / 2.0 = (p - poo) / 2.0.
+    RDouble * cp = new RDouble [nTotal];
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        cp[iCell] = 2.0 * (q[IP][iCell] - poo);
+    }
+
+    return cp;
+}
+
+RDouble * NSSolverUnstruct::ComputeCpAverage(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+    RDouble **qAverage = reinterpret_cast< RDouble ** > (grid->GetDataPtr("qAverage"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+
+    using namespace IDX;
+    RDouble poo = primitiveVarFarfield[IP];
+
+    //! Pressure cofficients: cp = [p - 1.0 / (gama * mach * mach)] / 2.0 = (p - poo) / 2.0.
+    RDouble * cp = new RDouble [nTotal];
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        cp[iCell] = 2.0 * (qAverage[IP][iCell] - poo);
+    }
+
+    return cp;
+}
+
+void NSSolverUnstruct::GetQlQr(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellofFace = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **q = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+
+    RDouble **qL = faceProxy->GetQL();
+    RDouble **qR = faceProxy->GetQR();
+
+    // GMRESPassQC
+    RDouble **qLC = faceProxy->GetQLC();
+    RDouble **qRC = faceProxy->GetQRC();
+
+    // GMRES
+    int* leftcellindexofFace = faceProxy->GetLeftCellIndexOfFace();
+    int* rightcellindexofFace = faceProxy->GetRightCellIndexOfFace();
+
+    //! iFace is the global ID, jFace is the local ID in this section.
+    for (int iFace = localStart; iFace < localEnd; ++ iFace)
+    {
+        int le = leftCellofFace [iFace];
+        int re = rightCellofFace[iFace];
+        int jFace  = iFace - localStart;
+
+        // GMRES
+        leftcellindexofFace[jFace] = le;
+        rightcellindexofFace[jFace] = re;
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            qL[m][jFace] = q[m][le];
+            qR[m][jFace] = q[m][re];
+
+            // GMRESPassQC
+            qLC[m][jFace] = q[m][le];
+            qRC[m][jFace] = q[m][re];
+        }
+    }
+}
+
+void NSSolverUnstruct::GetGamaLR(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellofFace = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    RDouble *gama = reinterpret_cast<RDouble *> (grid->GetDataPtr("gama"));
+
+    RDouble *gamal = faceProxy->GetGamaL();
+    RDouble *gamar = faceProxy->GetGamaR();
+
+    //! iFace is the global ID, jFace is the local ID in this section.
+    for (int iFace = localStart; iFace < localEnd; ++ iFace)
+    {
+        int le = leftCellofFace [iFace];
+        int re = rightCellofFace[iFace];
+        int jFace  = iFace - localStart;
+
+        gamal[jFace] = gama[le];
+        gamar[jFace] = gama[re];
+    }
+}
+
+void NSSolverUnstruct::GetPressureFactorLR(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+	UnstructGrid *grid = UnstructGridCast(gridIn);
+	int *leftCellofFace = grid->GetLeftCellOfFace();
+	int *rightCellofFace = grid->GetRightCellOfFace();
+
+	RDouble *rtem = reinterpret_cast <RDouble *> (grid->GetDataPtr("rtem"));
+
+    RDouble *pressureCoeffL = faceProxy->GetPressureCoefficientL();
+    RDouble *pressureCoeffR = faceProxy->GetPressureCoefficientR();
+
+	for (int iFace = localStart; iFace < localEnd; ++iFace)
+	{
+		int le = leftCellofFace[iFace];
+		int re = rightCellofFace[iFace];
+		int jFace = iFace - localStart;
+
+        pressureCoeffL[jFace] = rtem[le];
+        pressureCoeffR[jFace] = rtem[re];
+	}
+
+}
+
+void NSSolverUnstruct::GetTimeCoefficientLR(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellofFace = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    RDouble *timeCoefficientInverse = reinterpret_cast<RDouble *> (grid->GetDataPtr("timeCoefficientInverse"));
+
+    RDouble *timeCoeffl = faceProxy->GetTimeCoefficientL();
+    RDouble *timeCoeffr = faceProxy->GetTimeCoefficientR();
+
+    //! iFace is the global ID, jFace is the local ID in this section.
+    for (int iFace = localStart; iFace < localEnd; ++ iFace)
+    {
+        int le = leftCellofFace [iFace];
+        int re = rightCellofFace[iFace];
+        int jFace  = iFace - localStart;
+
+        timeCoeffl[jFace] = timeCoefficientInverse[le];
+        timeCoeffr[jFace] = timeCoefficientInverse[re];
+    }
+}
+
+void NSSolverUnstruct::GetPreconCoefficientLR(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellofFace = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    RDouble *preconCoefficient = reinterpret_cast<RDouble *> (grid->GetDataPtr("preconCoefficient"));;
+
+    RDouble *preconCoeffl = faceProxy->GetPreconCoefficientL();
+    RDouble *preconCoeffr = faceProxy->GetPreconCoefficientR();
+
+    //! iFace is the global ID, jFace is the local ID in this section.
+    for (int iFace = localStart; iFace < localEnd; ++ iFace)
+    {
+        int le = leftCellofFace [iFace];
+        int re = rightCellofFace[iFace];
+        int jFace  = iFace - localStart;
+
+        preconCoeffl[jFace] = preconCoefficient[le];
+        preconCoeffr[jFace] = preconCoefficient[re];
+    }
+}
+
+void NSSolverUnstruct::ZeroResiduals(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **res = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res"));
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        PHSPACE::SetField(res[m], 0.0, nTotal);
+    }
+
+#ifdef USE_GMRESSOLVER
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+
+    if( tscheme == GMRES )
+    {
+        //! GMRES zero residual
+        RDouble **dRdq = reinterpret_cast<RDouble**> (grid->GetDataPtr("dRdq"));
+        //! PHSPACE::SetField(dRdq, nEquation * nTotal, nEquation * nTotal, 0.0);
+        //! GMRESCSR
+        vector<int> AI = grid->GetJacobianAI4GMRES();
+        PHSPACE::SetField(dRdq, nEquation, nEquation * AI[nTotal], 0.0);
+
+        //! GMRESJac1st
+        int jacOrder = grid->GetJacobianOrder();
+        if(jacOrder == 2)
+        {
+            RDouble **dRdq1st = reinterpret_cast<RDouble**> (grid->GetDataPtr("dRdq1st"));
+            vector<int> AI1st = grid->GetJacobianAI1st4GMRES();
+            PHSPACE::SetField(dRdq1st, nEquation, nEquation * AI1st[nTotal], 0.0);
+        }
+
+        //! GMRESCoupled
+        int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+        if( viscousType == ONE_EQU )
+        {
+            RDouble **dRdqCoupledTerm = reinterpret_cast <RDouble**> (grid->GetDataPtr("dRdqCoupledTerm"));
+            PHSPACE::SetField(dRdqCoupledTerm, nEquation, AI[nTotal], 0.0);
+        }
+    }
+#endif
+
+}
+
+void NSSolverUnstruct::ComputeMinTimeStep(Grid *gridIn, RDouble &minDt, RDouble &maxDt)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble *dt = reinterpret_cast< RDouble *  > (grid->GetDataPtr("dt"));
+
+    minDt = LARGE;
+    maxDt = - LARGE;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        minDt = MIN(minDt, dt[iCell]);
+        maxDt = MAX(maxDt, dt[iCell]);
+    }
+}
+
+void NSSolverUnstruct::ReduceMaxTimeStep(Grid *gridIn, RDouble globalMinDt)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble *volume = grid->GetCellVolume();
+    RDouble *dt = reinterpret_cast< RDouble *  > (grid->GetDataPtr("dt"));
+
+    RDouble ktmax = GlobalDataBase::GetDoubleParaFromDB("ktmax");
+
+    if (ktmax > 0)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            dt[iCell] = MIN(dt[iCell], ktmax * globalMinDt);
+        }
+    }
+
+    //! The time step is divided by the volume, so it is need not divided other else.
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        dt[iCell] /= volume[iCell];
+    }
+
+    grid->SetGhostCell(dt);
+}
+
+//! Inviscid spectral radius = 0.5 * (|V.n| + c) * S.
+//! Referenced in R. F. Chen && Z. J. Wang, AIAA Journal 2000, 38(12).
+void NSSolverUnstruct::SpectrumRadiusInviscid(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *vgn  = grid->GetFaceNormalVelocity();
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+
+    RDouble **q   = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *gama = reinterpret_cast<RDouble *> (grid->GetDataPtr("gama"));
+    RDouble *invSpectrum = reinterpret_cast<RDouble *> (grid->GetDataPtr("invSpectralRadius"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    RDouble *preconCoefficient = NULL;
+    RDouble *timeCoefficientInverse = NULL;
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        preconCoefficient = reinterpret_cast<RDouble *> (grid->GetDataPtr("preconCoefficient"));
+        timeCoefficientInverse = reinterpret_cast<RDouble *> (grid->GetDataPtr("timeCoefficientInverse"));
+    }
+
+    RDouble *rho, *u, *v, *w, *p;
+
+    rho = q[IDX::IR];
+    u   = q[IDX::IU];
+    v   = q[IDX::IV];
+    w   = q[IDX::IW];
+    p   = q[IDX::IP];
+
+    PHSPACE::SetField(invSpectrum, 0.0, nTotalCell);
+
+    for(int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellofFace [iFace];
+        int re = rightCellofFace[iFace];
+
+        RDouble rl  = rho[le];
+        RDouble ul  = u[le];
+        RDouble vl  = v[le];
+        RDouble wl  = w[le];
+        RDouble pl  = p[le];
+        //RDouble vnl = xfn[iFace] * ul + yfn[iFace] * vl + zfn[iFace] * wl;
+        RDouble vnl = xfn[iFace] * ul + yfn[iFace] * vl + zfn[iFace] * wl - vgn[iFace];
+
+        RDouble rr  = rho[re];
+        RDouble ur  = u[re];
+        RDouble vr  = v[re];
+        RDouble wr  = w[re];
+        RDouble pr  = p[re];
+        //RDouble vnr = xfn[iFace] * ur + yfn[iFace] * vr + zfn[iFace] * wr;
+        RDouble vnr = xfn[iFace] * ur + yfn[iFace] * vr + zfn[iFace] * wr  - vgn[iFace];
+
+        RDouble specificHeatRatio = half * (gama[le] + gama[re]);
+        RDouble pm = half * (pl + pr);
+        RDouble rm = half * (rl + rr);
+        RDouble vn = half * (vnl + vnr);
+        RDouble cm = sqrt(specificHeatRatio * pm / rm);
+
+        if(ifLowSpeedPrecon != 0)
+        {
+            RDouble c2 = specificHeatRatio * pm / rm;
+            RDouble preconCoeff = half * (preconCoefficient[le] + preconCoefficient[re]);
+            RDouble timeCoeff = half * (timeCoefficientInverse[le] + timeCoefficientInverse[re]);
+            vn = half * timeCoeff * vn * (1.0 + preconCoeff);
+            cm = half * timeCoeff * sqrt(((1.0 - preconCoeff) * vn) * ((1.0 - preconCoeff) * vn) + 4.0 * preconCoeff * c2);
+        }
+
+        RDouble inviscidSpectrumRadius = half * area[iFace] * (ABS(vn) + cm);
+
+        invSpectrum[le] += inviscidSpectrumRadius;
+        if(re < nTotalCell)
+        {
+            //! The re cell is the interior cell.
+            invSpectrum[re] += inviscidSpectrumRadius;
+        }
+    }
+}
+
+void NSSolverUnstruct::SpectrumRadiusViscous(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *volume = grid->GetCellVolume();
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+
+    RDouble **q   = reinterpret_cast< RDouble **> (grid->GetDataPtr("q"));
+    RDouble *gama = reinterpret_cast< RDouble * > (grid->GetDataPtr("gama"));
+    RDouble *visSpectrum = reinterpret_cast< RDouble *> (grid->GetDataPtr("visSpectralRadius"));
+
+    RDouble *rho, *u, *v, *w, *p;
+    rho = q[IDX::IR];
+    u   = q[IDX::IU];
+    v   = q[IDX::IV];
+    w   = q[IDX::IW];
+    p   = q[IDX::IP];
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    RDouble *viscousLaminar = reinterpret_cast< RDouble * > (grid->GetDataPtr("visl"));
+    RDouble *viscousTurbulence = reinterpret_cast< RDouble * > (grid->GetDataPtr("vist"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble refReNumber = parameters->GetRefReNumber();
+
+    RDouble prandtlLaminar    = parameters->GetPrandtlLaminar();    //! default 0.72
+    RDouble prandtlTurbulence = parameters->GetPrandtlTurbulence(); //! default 0.9
+
+    const RDouble fourthThird = 4.0 / 3.0;
+    RDouble oprl = 1.0 / prandtlLaminar;
+    RDouble oprt = 1.0 / prandtlTurbulence;
+
+    PHSPACE::SetField(visSpectrum, 0.0, nTotalCell);
+
+    int visSpetrumMethod = 2;
+    if(visSpetrumMethod == 1)
+    {
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            int le = leftCellofFace [iFace];
+            int re = rightCellofFace[iFace];
+
+            RDouble visLaminar = half * (viscousLaminar[le] + viscousLaminar[re]);
+            RDouble visTurb    = half * (viscousTurbulence[le] + viscousTurbulence[re]);
+            RDouble density    = half * (rho[le] + rho[re]);
+
+            RDouble specificHeatRatio = half * (gama[le] + gama[re]);
+            RDouble coefOfSpectrum1 = fourthThird * (visLaminar + visTurb);
+            RDouble coefOfSpectrum2 = specificHeatRatio * (visLaminar * oprl + visTurb * oprt);
+
+            //! Viscous spectral radius type 2.
+            //! Referenced in Wang Gang, Chinese Journal of Aeronautics, 2012 (25): 33-41, eq. 13.
+            RDouble coefOfSpectrum  = two * PHSPACE::MAX(coefOfSpectrum1, coefOfSpectrum2) / (refReNumber * density);
+
+            RDouble faceArea = area[iFace];
+            RDouble faceAera2 = PHSPACE::SQR(faceArea);
+
+            RDouble viscousSpectrumRadius = faceAera2 * coefOfSpectrum;
+
+            visSpectrum[le] += viscousSpectrumRadius / volume[le];
+            if(re < nTotalCell)
+            {
+                visSpectrum[re] += viscousSpectrumRadius / volume[re];
+            }
+        }
+    }
+    else if (visSpetrumMethod == 2)
+    {
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            int le = leftCellofFace [iFace];
+            int re = rightCellofFace[iFace];
+
+            RDouble dx = xcc[re] - xcc[le];
+            RDouble dy = ycc[re] - ycc[le];
+            RDouble dz = zcc[re] - zcc[le];
+            RDouble ds = ABS(xfn[iFace] * dx + yfn[iFace] * dy + zfn[iFace] * dz);
+
+            RDouble visLaminar = half * (viscousLaminar[le] + viscousLaminar[re]);
+            RDouble visTurb    = half * (viscousTurbulence[le] + viscousTurbulence[re]);
+            RDouble density    = half * (rho[le] + rho[re]);
+            RDouble viscosity  = visLaminar + visTurb;
+            RDouble faceArea   = area[iFace];
+
+            //! Viscous spectral radius = 2 * miu/(rho.|n.dr|) * S.
+            //! Referenced in R. F. Chen && Z. J. Wang, AIAA Journal 2000, 38(12).
+            RDouble viscousSpectrumRadius = 2.0 * viscosity / (density * ds * refReNumber + SMALL);
+            viscousSpectrumRadius *= half * faceArea;
+
+            visSpectrum[le] += viscousSpectrumRadius;
+            if(re < nTotalCell)
+            {
+                visSpectrum[re] += viscousSpectrumRadius;
+            }
+        }
+    }
+}
+
+void NSSolverUnstruct::SpectrumRadiusChemical(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble *vol = grid->GetCellVolume();
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **t = reinterpret_cast< RDouble ** > (grid->GetDataPtr("t"));
+    RDouble **chemSpectrum = reinterpret_cast< RDouble ** > (grid->GetDataPtr("chemSpectralRadius"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nSpeciesNumber = parameters->GetNumberOfSpecies();
+
+    PHSPACE::SetField(chemSpectrum, nSpeciesNumber, nTotalCell, zero);
+
+    RDouble **srs = NewPointer2<RDouble>(nSpeciesNumber, nTotalCell);
+
+    using namespace IDX;
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        gas->ChemicalSpectrumRadius(q, t, vol, srs, iCell);
+
+        for (int m = 0; m < nSpeciesNumber - 1; ++ m)
+        {
+            chemSpectrum[m][iCell] += srs[m][iCell];
+        }
+    }
+
+    DelPointer2(srs);
+}
+
+void NSSolverUnstruct::LocalTimeStep(Grid *gridIn)
+{
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    RDouble *volume    = grid->GetCellVolume();
+
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble *dt                = reinterpret_cast<RDouble *> (grid->GetDataPtr("dt"));
+    RDouble *invSpectralRadius = reinterpret_cast<RDouble *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble *visSpectralRadius = reinterpret_cast<RDouble *> (grid->GetDataPtr("visSpectralRadius"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble cfl = ComputeCFL();
+
+    int isInMGIniting = GlobalDataBase::GetIntParaFromDB("isInMGIniting");
+    if (!grid->IsFinestGrid() && !isInMGIniting)
+    {
+        RDouble mgCFLScale = parameters->GetMgCFLScale();
+        cfl *= mgCFLScale;
+    }
+
+    //! Set dt to zero.
+    PHSPACE::SetField(dt, 0.0, nTotalCell);
+
+    //! Inviscid time step.
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        dt[iCell] = cfl * volume[iCell] / invSpectralRadius[iCell];
+    }
+
+    bool isViscous = parameters->IsViscous();
+
+    if (isViscous)
+    {
+        //! Viscous time step.
+        RDouble *dtViscous = new RDouble [nTotalCell];
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            dtViscous[iCell] = cfl * volume[iCell] / visSpectralRadius[iCell];
+        }
+
+        //! Consider the viscous time step.
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            dt[iCell] = dt[iCell] * dtViscous[iCell] / (dt[iCell] + dtViscous[iCell]);
+        }
+
+        delete [] dtViscous;    dtViscous = nullptr;
+    }
+}
+
+void NSSolverUnstruct::LocalTimeStep_Prince(Grid* gridIn)
+{
+    UnstructGrid* grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+    int* leftCellofFace = grid->GetLeftCellOfFace();
+    int* rightCellofFace = grid->GetRightCellOfFace();
+    RDouble* xfc = grid->GetFaceCenterX();
+    RDouble* yfc = grid->GetFaceCenterY();
+    RDouble* zfc = grid->GetFaceCenterZ();
+    RDouble* xcc = grid->GetCellCenterX();
+    RDouble* ycc = grid->GetCellCenterY();
+    RDouble* zcc = grid->GetCellCenterZ();
+    RDouble* xfn = grid->GetFaceNormalX();
+    RDouble* yfn = grid->GetFaceNormalY();
+    RDouble* zfn = grid->GetFaceNormalZ();
+    RDouble* area = grid->GetFaceArea();
+    RDouble* vol = grid->GetCellVolume();
+
+    RDouble** q = reinterpret_cast<RDouble**> (grid->GetDataPtr("q"));
+    RDouble* visl = reinterpret_cast<RDouble*> (grid->GetDataPtr("visl"));
+    RDouble* vist = reinterpret_cast<RDouble*> (grid->GetDataPtr("vist"));
+    RDouble* dt = reinterpret_cast<RDouble*> (grid->GetDataPtr("dt"));
+    //! Set dt to LARGE.
+    PHSPACE::SetField(dt, LARGE, nTotalCell);
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble refGama = parameters->GetRefGama();
+    bool isViscous = parameters->IsViscous();
+    RDouble prandtlLaminar = parameters->GetPrandtlLaminar();
+    RDouble prandtlTurbulence = parameters->GetPrandtlTurbulence();
+
+    int le, re;
+    RDouble c, Vn, eigv, dn;
+    RDouble Coeff = 4.0;
+    //! For boundary faces
+    for (int iFace = 0; iFace < nBoundFace; iFace++)
+    {
+        le = leftCellofFace[iFace];
+
+        c = sqrt(refGama * q[IP][le] / q[IR][le]);
+        dn = fabs((xfc[iFace] - xcc[le]) * xfn[iFace] + (yfc[iFace] - ycc[le]) * yfn[iFace] + (zfc[iFace] - zcc[le]) * zfn[iFace]);
+        Vn = ABS(q[IU][le] * xfn[iFace] + q[IV][le] * yfn[iFace] + q[IW][le] * zfn[iFace]);
+        eigv = Vn + c;
+
+        if (isViscous)
+        {
+            RDouble muoopr = visl[le] / prandtlLaminar + vist[le] / prandtlTurbulence;
+            eigv += Coeff * refGama / q[IR][le] * muoopr * area[iFace] / vol[le];
+        }
+        dt[le] = MIN(dt[le], dn / eigv);
+    }
+    //! For interior faces
+    for (int iFace = nBoundFace; iFace < nTotalFace; iFace++)
+    {
+        le = leftCellofFace[iFace];
+        re = rightCellofFace[iFace];
+
+        c = sqrt(refGama * q[IP][le] / q[IR][le]);
+        dn = fabs((xfc[iFace] - xcc[le]) * xfn[iFace] + (yfc[iFace] - ycc[le]) * yfn[iFace] + (zfc[iFace] - zcc[le]) * zfn[iFace]);
+        Vn = ABS(q[IU][le] * xfn[iFace] + q[IV][le] * yfn[iFace] + q[IW][le] * zfn[iFace]);
+        eigv = Vn + c;
+        if (isViscous)
+        {
+            RDouble muoopr = visl[le] / prandtlLaminar + vist[le] / prandtlTurbulence;
+            eigv += Coeff * refGama / q[IR][le] * muoopr * area[iFace] / vol[le];
+        }
+        dt[le] = MIN(dt[le], dn / eigv);
+
+        c = sqrt(refGama * q[IP][re] / q[IR][re]);
+        dn = fabs((xfc[iFace] - xcc[re]) * xfn[iFace] + (yfc[iFace] - ycc[re]) * yfn[iFace] + (zfc[iFace] - zcc[re]) * zfn[iFace]);
+        Vn = ABS(q[IU][re] * xfn[iFace] + q[IV][re] * yfn[iFace] + q[IW][re] * zfn[iFace]);
+        eigv = Vn + c;
+        if (isViscous)
+        {
+            RDouble muoopr = visl[re] / prandtlLaminar + vist[re] / prandtlTurbulence;
+            eigv += Coeff * refGama / q[IR][re] * muoopr * area[iFace] / vol[re];
+        }
+        dt[re] = MIN(dt[re], dn / eigv);
+    }
+
+    RDouble cfl = ComputeCFL();
+    for (int iCell = 0; iCell < nTotalCell; ++iCell)
+    {
+        dt[iCell] = dt[iCell] * cfl;
+    }
+}
+
+void NSSolverUnstruct::GlobalTimeStep(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble *vol = grid->GetCellVolume();
+    RDouble *dt  = reinterpret_cast< RDouble * > (grid->GetDataPtr("dt" ));
+
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble dtau;
+    GlobalDataBase::GetData("dtau", &dtau, PHDOUBLE, 1);
+
+    //! Set dt to zero.
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        dt[iCell] = dtau / vol[iCell];
+    }
+
+    grid->SetGhostCell(dt);
+    RDouble dtmin = dtau;
+    GlobalDataBase::UpdateData("dtmin", &dtmin, PHDOUBLE, 1);
+}
+
+void NSSolverUnstruct::LocalGlobalTimeStep(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellofFace = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *vgn  = grid->GetFaceNormalVelocity();
+    RDouble *vol  = grid->GetCellVolume();
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalFace = grid->GetNTotalFace();
+    int nBoundFace = grid->GetNBoundFace();
+
+    RDouble **q   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble *gama = reinterpret_cast< RDouble *  > (grid->GetDataPtr("gama"));
+    RDouble *dt   = reinterpret_cast< RDouble *  > (grid->GetDataPtr("dt"));
+
+    RDouble cfl = ComputeCFL();
+
+    //RDouble refGama = parameters->GetRefGama();
+
+    int le, re;
+    RDouble um, vm, wm, cm;
+
+    RDouble *rho, *u, *v, *w, *p;
+
+    using namespace IDX;
+
+    rho = q[IR];
+    u   = q[IU];
+    v   = q[IV];
+    w   = q[IW];
+    p   = q[IP];
+
+    //! Set dt to zero.
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        dt[iCell] = 0.0;
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        le = leftCellofFace[ iFace ];
+
+        um      = u[le];
+        vm      = v[le];
+        wm      = w[le];
+        cm      = sqrt(gama[le] * p[le] / rho[le]);
+        dt[le] += (ABS(xfn[iFace] * um + yfn[iFace] * vm + zfn[iFace] * wm - vgn[iFace]) + cm) * area[iFace];
+    }
+
+    //! For interior faces.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        le = leftCellofFace[ iFace ];
+        re = rightCellofFace[ iFace ];
+
+        um      = u[le];
+        vm      = v[le];
+        wm      = w[le];
+        cm      = sqrt(gama[le] * p[le] / rho[le]);
+        dt[le] += (ABS(xfn[iFace] * um + yfn[iFace] * vm + zfn[iFace] * wm - vgn[iFace]) + cm) * area[iFace];
+
+        um      = u[re];
+        vm      = v[re];
+        wm      = w[re];
+        cm      = sqrt(gama[re] * p[re] / rho[re]);
+        dt[re] += (ABS(xfn[iFace] * um + yfn[iFace] * vm + zfn[iFace] * wm - vgn[iFace]) + cm) * area[iFace];
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        dt[iCell] = cfl * vol[iCell] / dt[iCell];
+    }
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    if (viscousType > INVISCID)
+    {
+        RDouble *dtv;
+        dtv = new RDouble [ nTotalCell ];
+
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            dtv[iCell] = 0.0;
+        }
+
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            le = leftCellofFace[ iFace ];
+            re = rightCellofFace[ iFace ];
+
+            dtv[le] += area[iFace] * area[iFace];
+        }
+
+        //! For interior faces.
+        for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+        {
+            le = leftCellofFace[ iFace ];
+            re = rightCellofFace[ iFace ];
+
+            dtv[le] += area[iFace] * area[iFace];
+            dtv[re] += area[iFace] * area[iFace];
+        }
+
+        RDouble *visl = reinterpret_cast< RDouble * > (grid->GetDataPtr("visl"));
+        RDouble *vist = reinterpret_cast< RDouble * > (grid->GetDataPtr("vist"));
+
+        RDouble refReNumber  = parameters->GetRefReNumber();
+        RDouble prandtlLaminar    = parameters->GetPrandtlLaminar();
+        RDouble prandtlTurbulence = parameters->GetPrandtlTurbulence();
+
+        RDouble coef1,coef2,coef,vis_l,vis_t;
+        RDouble csrvist = 1.0;
+
+        const RDouble foth = 4.0 / 3.0;
+
+        RDouble oprl = 1.0 / prandtlLaminar;
+        RDouble oprt = 1.0 / prandtlTurbulence;
+
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            vis_l = visl[iCell];
+            vis_t = csrvist * vist[iCell];
+            coef1 = foth * (vis_l + vis_t);
+            coef2 = gama[iCell] * (vis_l * oprl + vis_t * oprt);
+            coef  = MAX(coef1, coef2);
+            dtv[iCell] = cfl * rho[iCell] * refReNumber * vol[iCell] * vol[iCell] / (coef * dtv[iCell]);
+        }
+
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            dt[iCell] = dt[iCell] * dtv[iCell] / (dt[iCell] + dtv[iCell]);
+        }
+
+        delete [] dtv;    dtv = nullptr;
+    }
+
+    RDouble dtmin = LARGE;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        dtmin = MIN(dtmin, static_cast<RDouble>(dt[iCell]));
+    }
+
+    GlobalDataBase::UpdateData("dtmin", &dtmin, PHDOUBLE, 1);
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        dt[iCell] = dtmin / vol[iCell];
+    }
+}
+
+void NSSolverUnstruct::FillField(Grid *gridIn, FieldProxy *field_proxy, RDouble value)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **field = field_proxy->GetField_UNS();
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            field[m][iCell] = value;
+        }
+    }
+}
+
+void NSSolverUnstruct::FillField(Grid *gridIn, FieldProxy *fieldTarget, FieldProxy *fieldSource)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **fieldTar = fieldTarget->GetField_UNS();
+    RDouble **fieldSrc = fieldSource->GetField_UNS();
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            fieldTar[m][iCell] = fieldSrc[m][iCell];
+        }
+    }
+}
+
+void NSSolverUnstruct::RungeKuttaResidual(Grid *gridIn, FieldProxy *dqProxy, RDouble coef)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int      nTotalCell = grid->GetNTotalCell();
+
+    RDouble **dq = dqProxy->GetField_UNS();
+    RDouble **res = reinterpret_cast <RDouble **> (grid->GetDataPtr("res"));
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble * dt = reinterpret_cast <RDouble *> (grid->GetDataPtr("dt"));
+
+    for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            //! The volume has been divided in time step, so the dt is actually 'dt/vol'.
+            dq[iEquation][iCell] = dt[iCell] * coef * res[iEquation][iCell];
+        }
+    }
+}
+
+//! Restrict from fine to coarse grid for all q.
+void NSSolverUnstruct::RestrictAllQ(Grid *fgrid, Grid *cgrid)
+{
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **fq = reinterpret_cast< RDouble ** > (fgrid->GetDataPtr("q"));
+    RDouble **cq = reinterpret_cast< RDouble ** > (cgrid->GetDataPtr("q"));
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        RestrictQ(fgrid, fq[m], cgrid, cq[m]);
+    }
+
+    RDouble *fgama = reinterpret_cast< RDouble * > (fgrid->GetDataPtr("gama"));
+    RDouble *cgama = reinterpret_cast< RDouble * > (cgrid->GetDataPtr("gama"));
+
+    RestrictQ(fgrid, fgama, cgrid, cgama);
+    
+    int viscousType = parameters->GetViscousType();
+    if (viscousType > INVISCID)
+    {
+        RDouble * fvisl = reinterpret_cast< RDouble * > (fgrid->GetDataPtr("visl"));
+        RDouble * cvisl = reinterpret_cast< RDouble * > (cgrid->GetDataPtr("visl"));
+        RestrictQ(fgrid, fvisl, cgrid, cvisl);
+
+        if (viscousType > LAMINAR)
+        {
+            RDouble * fvist = reinterpret_cast< RDouble * > (fgrid->GetDataPtr("vist"));
+            RDouble * cvist = reinterpret_cast< RDouble * > (cgrid->GetDataPtr("vist"));
+            RestrictQ(fgrid, fvist, cgrid, cvist);
+        }
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble **fqn1 = reinterpret_cast< RDouble ** > (fgrid->GetDataPtr("q_unsteady_n1"));
+        RDouble **fqn2 = reinterpret_cast< RDouble ** > (fgrid->GetDataPtr("q_unsteady_n2"));
+        RDouble **cqn1 = reinterpret_cast< RDouble ** > (cgrid->GetDataPtr("q_unsteady_n1"));
+        RDouble **cqn2 = reinterpret_cast< RDouble ** > (cgrid->GetDataPtr("q_unsteady_n2"));
+
+        RDouble **fres   = reinterpret_cast< RDouble ** > (fgrid->GetDataPtr("res"           ));
+        RDouble **fresn1 = reinterpret_cast< RDouble ** > (fgrid->GetDataPtr("res_unsteady_n1"));
+        RDouble **fresn2 = reinterpret_cast< RDouble ** > (fgrid->GetDataPtr("res_unsteady_n2"));
+        RDouble **cres   = reinterpret_cast< RDouble ** > (cgrid->GetDataPtr("res"           ));
+        RDouble **cresn1 = reinterpret_cast< RDouble ** > (cgrid->GetDataPtr("res_unsteady_n1"));
+        RDouble **cresn2 = reinterpret_cast< RDouble ** > (cgrid->GetDataPtr("res_unsteady_n2"));
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            RestrictQ(fgrid, fqn1[m], cgrid, cqn1[m]);
+            RestrictQ(fgrid, fqn2[m], cgrid, cqn2[m]);
+
+            RestrictQ(fgrid, fres[m],   cgrid, cres[m]);
+            RestrictQ(fgrid, fresn1[m], cgrid, cresn1[m]);
+            RestrictQ(fgrid, fresn2[m], cgrid, cresn2[m]);
+        }
+    }
+}
+
+void NSSolverUnstruct::LoadFlux(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nBoundFace = grid->GetNBoundFace();
+
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar = parameters->GetLaminarNumber();
+
+    RDouble **flux = faceProxy->GetFlux();
+
+    //! Determine if there are boundary faces.
+    int nMid  = localStart;
+    if (localEnd <= nBoundFace)
+    {
+       //! If all boundary faces.
+       nMid = localEnd;
+    }
+    else if (localStart < nBoundFace)
+    {
+       //! Part of them are boundary faces.
+       nMid = nBoundFace;
+    }
+
+    //! 'rhs' := inviscid flux - viscid flux.
+    //! 'res' is defined as '-rhs'.
+
+    RDouble **res = reinterpret_cast<RDouble **> (grid->GetDataPtr("res"));
+
+    //! For boundary faces, remember re is ghost cell.
+    for (int iFace = localStart; iFace < nMid; ++ iFace)
+    {
+        int le = leftCellofFace[iFace];
+        int jFace = iFace - localStart;
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            res[m][le] -= flux[m][jFace];
+        }
+    }
+
+    //! Interior faces.
+    for (int iFace = nMid; iFace < localEnd; ++ iFace)
+    {
+        int le = leftCellofFace[iFace];
+        int re = rightCellofFace[iFace];
+        int jFace = iFace - localStart;
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            res[m][le] -= flux[m][jFace];
+            res[m][re] += flux[m][jFace];
+        }
+    }
+}
+
+
+void NSSolverUnstruct::InitialInviscidfaceproxyOnlyForMixGrid(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalFace = grid->GetNTotalFace();
+    int nEquation = 5;
+
+    GeomProxy *geomProxy = new GeomProxy();
+    geomProxy->Create(nTotalFace);
+    FillGeomProxy(grid, geomProxy, 0, nTotalFace);
+
+    InviscidfaceProxyOnlyForMixGrid = new FaceProxy();
+    InviscidfaceProxyOnlyForMixGrid->Create(nTotalFace, nEquation);
+    InviscidfaceProxyOnlyForMixGrid->SetGeomProxy(geomProxy);
+
+}
+
+void NSSolverUnstruct::InitialViscousfaceproxyOnlyForMixGrid(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalFace = grid->GetNTotalFace();
+    int nEquation = 5;
+
+    ViscousfaceProxyOnlyForMixGrid = new FaceProxy();
+    ViscousfaceProxyOnlyForMixGrid->Create(nTotalFace, nEquation);
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    
+    NSFaceValue *facevar = new NSFaceValue(nEquation, numberOfSpecies, nTotalFace);
+    ViscousfaceProxyOnlyForMixGrid->SetNSFaceValue(facevar);
+
+    ComputeFaceWeight(grid, ViscousfaceProxyOnlyForMixGrid, 0, nTotalFace);
+}
+
+
+void NSSolverUnstruct::UpdateQlQrOnlyforMixGrid(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalFace = grid->GetNTotalFace();
+
+    int localStart = 0;
+    int localEnd = nTotalFace;
+
+    GetInviscidFaceValue(grid, InviscidfaceProxyOnlyForMixGrid, limiterOnlyForMixGrid, localStart, localEnd);
+}
+
+void NSSolverUnstruct::UpdateInviscidfluxOnlyforMixGrid(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalFace = grid->GetNTotalFace();
+
+    int localStart = 0;
+    int localEnd = nTotalFace;
+
+    ComputeInviscidFlux(grid, InviscidfaceProxyOnlyForMixGrid, localStart, localEnd);
+}
+
+void NSSolverUnstruct::UpdateViscousfluxOnlyforMixGrid(Grid *gridIn)
+{
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+    if (viscousType == INVISCID) return;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalFace = grid->GetNTotalFace();
+
+    int localStart = 0;
+    int localEnd = nTotalFace;
+
+    GetVisFaceValue(grid, ViscousfaceProxyOnlyForMixGrid, localStart, localEnd);
+
+    ComputeVisflux(grid, ViscousfaceProxyOnlyForMixGrid, localStart, localEnd);
+}
+
+void NSSolverUnstruct::LoadGlobalfacefluxtoResOnlyforMixGrid(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalFace = grid->GetNTotalFace();
+
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar = parameters->GetLaminarNumber();
+
+    RDouble **res = reinterpret_cast<RDouble **> (grid->GetDataPtr("res"));
+    RDouble **Inviscidflux = InviscidfaceProxyOnlyForMixGrid->GetFlux();
+    //! For boundary faces, remember re is ghost cell.
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellofFace[iFace];
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            res[m][le] -= Inviscidflux[m][iFace];
+        }
+    }
+
+    //! Interior faces.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellofFace[iFace];
+        int re = rightCellofFace[iFace];
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            res[m][le] -= Inviscidflux[m][iFace];
+            res[m][re] += Inviscidflux[m][iFace];
+        }
+    }
+
+    int viscousType = parameters->GetViscousType();
+    if (viscousType == INVISCID) return;
+
+    RDouble **Viscousflux = ViscousfaceProxyOnlyForMixGrid->GetFlux();
+    //! For boundary faces, remember re is ghost cell.
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int le = leftCellofFace[iFace];
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            res[m][le] -= Viscousflux[m][iFace];
+        }
+    }
+
+    //! Interior faces.
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int le = leftCellofFace[iFace];
+        int re = rightCellofFace[iFace];
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            res[m][le] -= Viscousflux[m][iFace];
+            res[m][re] += Viscousflux[m][iFace];
+        }
+    }
+}
+
+void NSSolverUnstruct::ComputeViscousCoeff(Grid *gridIn)
+{
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+    if (nChemical == 0)
+    {
+        ComputeViscousCoefficientWithoutChemical(gridIn);
+    }
+    else
+    {
+        ComputeViscousCoefficient(gridIn);
+    }
+
+}
+
+void NSSolverUnstruct::ComputeViscousCoefficient(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *viscousLaminar = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+    RDouble **q = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble **t = reinterpret_cast<RDouble **> (grid->GetDataPtr("t"));
+
+    using namespace IDX;
+    RDouble *primitiveVars  = new RDouble[nEquation];
+    RDouble temperature, electronTemperature, viscosity;
+
+    RDouble refTemperatureSutherland = GlobalDataBase::GetDoubleParaFromDB("tsuth");
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        temperature = t[ITT][iCell];
+        for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+        {
+            primitiveVars[iEquation] = q[iEquation][iCell];
+        }
+        electronTemperature = temperature;
+        if (nTemperatureModel == 2)
+        {
+            electronTemperature = t[ITV][iCell];
+        }
+        else if (nTemperatureModel == 3)
+        {
+            electronTemperature = t[ITE][iCell];
+        }
+        gas->ComputeViscosityByPrimitive(primitiveVars, temperature, electronTemperature, refTemperatureSutherland, viscosity);
+        viscousLaminar[iCell] = viscosity;
+    }
+    if (wallTemperature <= 0.0)
+    {
+        grid->SetGhostCell(viscousLaminar);
+    }
+    else
+    {
+        for (int iCell = nTotalCell; iCell < nTotal; ++ iCell)
+        {
+            temperature = t[ITT][iCell];
+            for (int iEquation = 0; iEquation < nEquation; ++ iEquation)
+            {
+                primitiveVars[iEquation] = q[iEquation][iCell];
+            }
+            electronTemperature = temperature;
+            if (nTemperatureModel == 2)
+            {
+                electronTemperature = t[ITV][iCell];
+            }
+            else if (nTemperatureModel == 3)
+            {
+                electronTemperature = t[ITE][iCell];
+            }
+            gas->ComputeViscosityByPrimitive(primitiveVars, temperature, electronTemperature, refTemperatureSutherland, viscosity);
+            viscousLaminar[iCell] = viscosity;
+        }
+    }
+
+    delete []primitiveVars;
+}
+
+void NSSolverUnstruct::ComputeViscousCoefficientWithoutChemical(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble *viscousLaminar = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+    RDouble **t = reinterpret_cast<RDouble **> (grid->GetDataPtr("t"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+
+    RDouble viscousLaminarMin;
+    GlobalDataBase::GetData("visl_min", &viscousLaminarMin, PHDOUBLE, 1);
+
+    using namespace IDX;
+
+    for (int iCell = 0; iCell < nTotal; ++ iCell)
+    {
+        viscousLaminar[iCell] = t[ITT][iCell] * sqrt(t[ITT][iCell]) * (1.0 + nonDimensionalSutherlandTemperature) / (t[ITT][iCell] + nonDimensionalSutherlandTemperature);
+    }
+}
+
+void NSSolverUnstruct::InitCGrid(Grid *fgrid_in, Grid *cgrid_in)
+{
+    UnstructGrid *fgrid = UnstructGridCast(fgrid_in);
+    UnstructGrid *cgrid = UnstructGridCast(cgrid_in);
+    int * cell2coarsegridcell  = fgrid->GetCell2CoarseGridCell();
+    int fnTotalCell = fgrid->GetNTotalCell();
+    int cnTCell = cgrid->GetNTotalCell();
+    RDouble *cvol = cgrid->GetCellVolume();
+    RDouble *fvol = fgrid->GetCellVolume();
+
+    RDouble **fq = reinterpret_cast< RDouble ** > (fgrid->GetDataPtr("q"));
+    RDouble **cq = reinterpret_cast< RDouble ** > (cgrid->GetDataPtr("q"));
+
+    int nEquation = GetNumberOfEquations();
+
+    int cn = cnTCell + cgrid->GetNBoundFace();
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < cn; ++ iCell)
+        {
+            cq[m][iCell] = 0.0;
+        }
+    }
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < fnTotalCell; ++ iCell)
+        {
+            cq[m][ cell2coarsegridcell[iCell] ] += fvol[iCell] * fq[m][iCell];
+        }
+    }
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < cnTCell; ++ iCell)
+        {
+            cq[m][iCell] /= cvol[iCell];
+        }
+    }
+}
+
+void NSSolverUnstruct::ComputePreconditionCoefficient(Grid *gridIn)
+{
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble *gamma = reinterpret_cast< RDouble * > (grid->GetDataPtr("gama"));
+    RDouble *preconCoefficient = reinterpret_cast< RDouble * > (grid->GetDataPtr("preconCoefficient"));
+
+    RDouble *dt = reinterpret_cast< RDouble * > (grid->GetDataPtr("dt"));
+    RDouble *timeCoefficient = reinterpret_cast< RDouble * > (grid->GetDataPtr("timeCoefficient"));
+    RDouble *timeCoefficientInverse = reinterpret_cast< RDouble * > (grid->GetDataPtr("timeCoefficientInverse"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble kPreconCoeff = parameters->GetPreconCoefficient();
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+    RDouble machinf2 = refMachNumber * refMachNumber;
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        RDouble rm  = q[IR][iCell];
+        RDouble um  = q[IU][iCell];
+        RDouble vm  = q[IV][iCell];
+        RDouble wm  = q[IW][iCell];
+        RDouble pm  = q[IP][iCell];
+        RDouble gama = gamma[iCell];
+
+        RDouble c2 = gama * pm / rm;
+        RDouble v2 = um * um + vm * vm + wm * wm;
+        RDouble mach2 = v2 / c2;
+        RDouble machPrec2 = MIN(MAX(mach2,kPreconCoeff * machinf2),1.0);
+        if (!isUnsteady)
+        {
+            preconCoefficient[iCell] = machPrec2;
+        }
+        else
+        {
+            timeCoefficient[iCell] = 1.0 + 2.0 / 3.0 * dt[iCell] / physicalTimeStep;
+            timeCoefficientInverse[iCell] = 1.0 / timeCoefficient[iCell];
+            preconCoefficient[iCell] = machPrec2 / (timeCoefficientInverse[iCell] + (1.0 - timeCoefficientInverse[iCell]) * machPrec2);
+        }
+        
+    }
+
+    grid->SetGhostCell(preconCoefficient);
+}
+
+//! Drive individual functions to calculate inviscid fluxes.
+void NSSolverUnstruct::InviscidFlux(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalFace = grid->GetNTotalFace();
+
+    Limiter *limiter = 0;
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int limiterType = parameters->GetLimiterType();
+    int isInIniting = GlobalDataBase::GetIntParaFromDB("isInIniting");
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+    bool isFirstOrder = (limiterType == ILMT_FIRST) || isInIniting;
+
+     //! Face proxy.
+    FaceProxy *faceProxy = CreateFaceProxy(grid);
+    faceProxy->SetGeomProxy(CreateGeomProxy(grid));
+
+#ifdef USE_GMRESSOLVER
+    RDouble** dRdqfromGrid = reinterpret_cast<RDouble**> (grid->GetDataPtr("dRdq"));
+    faceProxy->SetJacobianMatrix(dRdqfromGrid);
+    // GMRESCSR
+    vector<int> AI = grid->GetJacobianAI4GMRES();
+    vector<int> AJ = grid->GetJacobianAJ4GMRES();
+    faceProxy->SetJacobianAI4GMRES(AI);
+    faceProxy->SetJacobianAJ4GMRES(AJ);
+
+    //! GMRESJac1st
+    int jacOrder = grid->GetJacobianOrder();
+    vector<int> AI1st = grid->GetJacobianAI1st4GMRES();
+    vector<int> AJ1st = grid->GetJacobianAJ1st4GMRES();
+    faceProxy->SetJacobianOrder(jacOrder);
+    faceProxy->SetJacobianAI1st4GMRES(AI1st);
+    faceProxy->SetJacobianAJ1st4GMRES(AJ1st);
+    RDouble** dRdq1stfromGrid = reinterpret_cast<RDouble**> (grid->GetDataPtr("dRdq1st"));
+    faceProxy->SetJacobianMatrix1st(dRdq1stfromGrid);
+
+    // GMRESBoundary
+    RDouble** dDdPfromGrid = reinterpret_cast<RDouble**> (grid->GetDataPtr("dDdP"));
+    faceProxy->SetdDdPMatrix(dDdPfromGrid);
+#endif
+
+    int localStart, localEnd;
+    localStart = 0;
+    do 
+    {
+        localEnd = localStart + SEGCTION_LENGTH;
+        if (localEnd > nTotalFace) 
+        {
+            localEnd = nTotalFace;
+        }
+
+        GetInviscidFaceValue(grid, faceProxy, limiter, localStart, localEnd);
+
+        ComputeInviscidFlux(grid, faceProxy, localStart, localEnd);
+
+        LoadFlux(grid, faceProxy, localStart, localEnd);
+
+        localStart = localEnd;
+    } while (localStart < nTotalFace);
+
+    delete faceProxy;
+    delete limiter;
+}
+
+void NSSolverUnstruct::CalPressureFactor(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int nTotalCell = grid->GetNTotalCell();
+
+    int **cell2face = grid->GetCell2Face();
+	vector<int> * c2c = grid->GetCell2Cell();
+    int *faceNumberOfEachCell = grid->GetFaceNumberOfEachCell();
+
+    int *leftCellofFace = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+	RDouble minPressureRatio = 1.3;
+	RDouble maxPressureRatio = 2.6;
+	RDouble pi = 3.141592653589;
+
+	int RoeEntropyFixMethod = this->GetControlParameters()->GetRoeEntropyFixMethod();
+
+    RDouble **q   = reinterpret_cast <RDouble **> (grid->GetDataPtr("q"));
+    RDouble *rtem = reinterpret_cast <RDouble *> (grid->GetDataPtr("rtem"));
+
+	if (RoeEntropyFixMethod == 2)
+	{
+		for (int iCell = 0; iCell < nTotalCell; ++iCell)
+		{
+			RDouble LeftPressureOfCell = zero;
+			RDouble RightPressureOfCell = zero;
+			rtem[iCell] = zero;
+			for (int j = 0; j < faceNumberOfEachCell[iCell]; ++j)
+			{
+				int face = cell2face[iCell][j];
+				int le = leftCellofFace[face];
+				int re = rightCellofFace[face];
+
+				LeftPressureOfCell += q[PHSPACE::IDX::IP][le];
+				RightPressureOfCell += q[PHSPACE::IDX::IP][re];
+			}
+			rtem[iCell] += ABS(RightPressureOfCell - LeftPressureOfCell) / ABS(RightPressureOfCell + LeftPressureOfCell);
+			rtem[iCell] /= static_cast <RDouble> (faceNumberOfEachCell[iCell]);
+		}
+	}
+
+	if (RoeEntropyFixMethod == 6)
+	{	
+		for (int iCell = 0; iCell < nTotalCell; ++iCell)
+		{
+			int nNeighbor = static_cast<int>(c2c[iCell].size());
+
+			RDouble minPressure = q[IP][iCell];
+			RDouble maxPressure = q[IP][iCell];
+
+			for (int j = 0; j < nNeighbor; ++j)
+			{
+				int neighborCell = c2c[iCell][j];
+				if (q[IP][neighborCell] < minPressure)
+				{
+					minPressure = q[IP][neighborCell];
+				}
+				if (q[IP][neighborCell] > maxPressure)
+				{
+					maxPressure = q[IP][neighborCell];
+				}
+			}
+
+			RDouble pressureRatio = maxPressure / minPressure;
+			RDouble presFunc = min(one, max(zero, (maxPressureRatio - pressureRatio) / (maxPressureRatio - minPressureRatio)));
+			RDouble pressCosFunc = cos(presFunc*pi);
+			pressCosFunc = max(-one, min(pressCosFunc, one));
+
+			rtem[iCell] = half * (one - pressCosFunc);
+		}
+	}
+
+    grid->SetGhostCellExceptInterface(rtem);
+}
+
+void NSSolverUnstruct::GetHeatTransferCoeff(Grid *gridIn)
+{
+}
+
+void NSSolverUnstruct::ViscousFlux(Grid *gridIn)
+{
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+    if (viscousType == INVISCID) return;
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalFace = grid->GetNTotalFace();
+
+    FaceProxy *faceProxy = CreateFaceProxy(grid);
+    faceProxy->SetNSFaceValue(CreateNSFaceValue(grid));
+    int localStart, localEnd;
+    localStart = 0;
+    do
+    {
+        localEnd = localStart + SEGCTION_LENGTH;
+        if (localEnd > nTotalFace)
+        {
+            localEnd = nTotalFace;
+        }
+
+        ComputeFaceWeight(grid, faceProxy, localStart, localEnd);
+
+        GetVisFaceValue(grid, faceProxy, localStart, localEnd);
+
+        if( tscheme != GMRES)
+        {
+            ComputeVisflux(grid, faceProxy, localStart, localEnd);
+        }
+#ifdef USE_GMRESSOLVER
+        else
+        {
+            ComputeVisflux_GMRES(grid, faceProxy, localStart, localEnd);
+        }
+#endif
+        LoadFlux(grid, faceProxy, localStart, localEnd);
+
+        localStart = localEnd;
+    } while (localStart < nTotalFace);
+
+    delete faceProxy;
+}
+
+void NSSolverUnstruct::ComputeFaceWeight(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble *deltL = faceProxy->GetWeightL();
+    RDouble *deltR = faceProxy->GetWeightR();
+
+    grid->FaceWeight(deltL, deltR, localStart, localEnd);
+}
+
+void NSSolverUnstruct::GetVisFaceValue(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+
+    NSFaceValue *faceVariable = faceProxy->GetNSFaceValue();
+
+    RDouble *faceVelocityX = grid->GetFaceVelocityX();
+    RDouble *faceVelocityY = grid->GetFaceVelocityY();
+    RDouble *faceVelocityZ = grid->GetFaceVelocityZ();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble **q = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble **t = reinterpret_cast<RDouble **> (grid->GetDataPtr("t"));
+
+    RDouble *viscousLaminar = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble refGama = 1.4;
+    GlobalDataBase::GetData("refGama", &refGama, PHDOUBLE, 1);
+    //RDouble refGama = parameters->GetRefGama();
+
+    RDouble oPrandtlLaminar    = parameters->GetoPrandtlLaminar();
+    RDouble oPrandtlTurbulence = parameters->GetoPrandtlTurbulence();
+
+    RDouble referenceMachNumber = parameters->GetRefMachNumber();
+
+    RDouble tWall = parameters->GetWallTemperature();
+
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+    int nChemical = parameters->GetChemicalFlag();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **rhoDiffusion = faceVariable->GetRhoDS()->GetField();
+    RDouble **hintSpecies = faceVariable->GetHintS()->GetField();
+    RDouble **primitiveVariable = faceVariable->GetPrim()->GetField();
+    RDouble **tMid   = faceVariable->GetT()->GetField();
+
+    RDouble *kCp = faceVariable->GetKCP();   //! Heat conductivity coefficient, usually computed by Cp.
+    RDouble *viscousLaminarFace = faceVariable->GetMUL();
+    RDouble *viscousTurbulenceFace = faceVariable->GetMUT();
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+    RDouble referenceMachNumberSquare = referenceMachNumber * referenceMachNumber;
+
+    using namespace IDX;
+
+    RDouble *qL               = new RDouble[nEquation];
+    RDouble *qR               = new RDouble[nEquation];
+    RDouble *primface         = new RDouble[nEquation];
+    RDouble *rhoDiffusionFace      = new RDouble[numberOfSpecies];
+    RDouble *hintSpeciesOfFace = new RDouble[numberOfSpecies];
+
+    int le,re,jFace;
+    for (int iFace = localStart; iFace < localEnd; ++ iFace)
+    {
+        jFace = iFace - localStart;
+
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];        
+        if (iFace < nBoundFace) re = iFace + nTotalCell;
+
+        viscousLaminarFace[jFace]   = half * (viscousLaminar[le] + viscousLaminar[re]);
+        viscousTurbulenceFace[jFace] = half * (viscousTurbulence[le] + viscousTurbulence[re]);
+    }
+
+    int nMid = nBoundFace;
+    if (localEnd < nBoundFace) nMid = localEnd;
+
+    for (int iFace = localStart; iFace < localEnd; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+        if (iFace < nBoundFace) re = iFace + nTotalCell;
+
+        jFace = iFace - localStart;
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            primitiveVariable[m][jFace] = half * (q[m][le] + q[m][re]);
+        }
+
+        tMid[ITT][jFace] = half * (t[ITT][le] + t[ITT][re]);
+
+        if (nChemical == 1)
+        {
+            using namespace GAS_SPACE;
+
+            RDouble t1  = half * (t[ITT][le] + t[ITT][re]);
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                qL[m] = q[m][le];
+                qR[m] = q[m][re];
+                primface[m] = primitiveVariable[m][jFace];
+            }
+
+            gas->ComputeDensityDiffusionAndKCP(t1, primface, viscousLaminarFace[jFace], viscousTurbulenceFace[jFace], rhoDiffusionFace, hintSpeciesOfFace, kCp[jFace]);
+            for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+            {
+                rhoDiffusion[ispecies][jFace] = rhoDiffusionFace[ispecies];
+            }
+
+            for (int ispecies = 0; ispecies < numberOfSpecies; ++ ispecies)
+            {
+                hintSpecies[ispecies][jFace] = hintSpeciesOfFace[ispecies];
+            }
+        }
+        else
+        {
+            RDouble cp = 1.0 / ((refGama - 1.0) * referenceMachNumberSquare);
+            kCp[jFace] = (viscousLaminarFace[jFace] * oPrandtlLaminar + viscousTurbulenceFace[jFace] * oPrandtlTurbulence) * cp;
+        }
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    int isAle = parameters->GetIsCodeOfAleModel();
+
+    //! If there are some boundary faces, make modifications. 
+    //! Check if there are boundary faces. If no, return.
+    if (localStart < nBoundFace)
+    {
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+        
+        RDouble tw = tWall / refDimensionalTemperature;
+        for (int iFace = localStart; iFace < nMid; ++ iFace)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+            int bcType = bcRegion->GetBCType();
+            jFace  = iFace - localStart;
+
+            le = leftCellOfFace[iFace];
+            re = rightCellOfFace[iFace];
+
+            if (bcType == PHENGLEI::INTERFACE) continue;
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                RDouble tmp = half * (q[m][le] + q[m][re]);
+                primitiveVariable[m][jFace] = tmp;
+            }
+
+            if (bcType == PHENGLEI::SOLID_SURFACE)
+            {
+                RDouble uWall = 0.0;
+                RDouble vWall = 0.0;
+                RDouble wWall = 0.0;
+                Data_Param *bcData  = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace])->GetBCParamDataBase();
+                if(bcData)
+                {
+                    if (bcData->IsExist("uWall", PHDOUBLE, 1))
+                    {
+                        bcData->GetData("uWall", &uWall, PHDOUBLE, 1);
+                        bcData->GetData("vWall", &vWall, PHDOUBLE, 1);
+                        bcData->GetData("wWall", &wWall, PHDOUBLE, 1);
+                    }
+                }
+                
+                RDouble velocityXWall = uWall;
+                RDouble velocityYWall = vWall;
+                RDouble velocityZWall = wWall;
+                if (isUnsteady && isAle)
+                {
+                    velocityXWall = faceVelocityX[jFace] + uWall;
+                    velocityYWall = faceVelocityY[jFace] + vWall;
+                    velocityZWall = faceVelocityZ[jFace] + wWall;
+                }
+
+                //! set wall velocity for translating frame and rotating frame.
+                if (referenceFrame == TRANSLATIONAL_FRAME || referenceFrame == ROTATIONAL_FRAME)
+                {
+                    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+
+                    string shroud[100];
+                    GlobalDataBase::GetData("shroud", &shroud, PHSTRING, nTurboZone);
+
+                    velocityXWall = faceVelocityX[jFace];
+                    velocityYWall = faceVelocityY[jFace];
+                    velocityZWall = faceVelocityZ[jFace];
+
+                    for (int iTurboZone = 0; iTurboZone < nTurboZone; iTurboZone++)
+                    {
+                        if (bcRegion->GetBCName() == shroud[iTurboZone])
+                        {
+                            velocityXWall = 0;
+                            velocityYWall = 0;
+                            velocityZWall = 0;
+                        }
+                    }
+                }
+
+                primitiveVariable[IU][jFace] = velocityXWall;
+                primitiveVariable[IV][jFace] = velocityYWall;
+                primitiveVariable[IW][jFace] = velocityZWall;
+
+                if (tw > 0.0)
+                {
+                    tMid[0][jFace] = tw;
+                    RDouble cp = 1.0 / ((refGama - 1.0) * referenceMachNumberSquare);
+                    RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+                    viscousLaminarFace[jFace] = tMid[0][jFace] * sqrt(tMid[0][jFace]) * (1.0 + nonDimensionalSutherlandTemperature) / (tMid[0][jFace] + nonDimensionalSutherlandTemperature);
+                    kCp[jFace] = (viscousLaminarFace[jFace] * oPrandtlLaminar + viscousTurbulenceFace[jFace] * oPrandtlTurbulence) * cp;
+                }
+            }
+        }
+    }
+
+    delete [] qL;
+    delete [] qR;
+    delete [] primface;
+    delete [] rhoDiffusionFace;
+    delete [] hintSpeciesOfFace;
+}
+
+#ifdef USE_GMRESSOLVER
+// GMRESVis GMRESAD
+void NSSolverUnstruct::ComputeVisflux_GMRES(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+
+    int *leftCellofFace = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    RDouble **dqdx = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **dqdy = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **dqdz = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradPrimtiveVarZ"));
+
+    RDouble **dtdx = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradTemperatureX"));
+    RDouble **dtdy = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradTemperatureY"));
+    RDouble **dtdz = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradTemperatureZ"));
+
+    RDouble  **flux = faceProxy->GetFlux();
+
+    RDouble *deltaL = faceProxy->GetWeightL();
+    RDouble *deltaR = faceProxy->GetWeightR();
+
+    NSFaceValue *faceVariable = faceProxy->GetNSFaceValue();
+
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *vol  = grid->GetCellVolume();
+    
+    RDouble *xcc  = grid->GetCellCenterX();
+    RDouble *ycc  = grid->GetCellCenterY();
+    RDouble *zcc  = grid->GetCellCenterZ();
+
+    RDouble *xfc  = grid->GetFaceCenterX();
+    RDouble *yfc  = grid->GetFaceCenterY();
+    RDouble *zfc  = grid->GetFaceCenterZ();
+
+    RDouble **rhoDiffusion = faceVariable->GetRhoDS()->GetField();
+    RDouble **hintSpecies = faceVariable->GetHintS()->GetField();
+    RDouble **primitiveVariableFace = faceVariable->GetPrim()->GetField();
+    RDouble **tm     = faceVariable->GetT()->GetField();
+
+    RDouble *kCp     = faceVariable->GetKCP();
+    RDouble *viscousLaminarFace   = faceVariable->GetMUL();
+    RDouble *viscousTurbulenceFace = faceVariable->GetMUT();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    int nm = parameters->GetNSEquationNumber();
+
+    RDouble refReNumber  = parameters->GetRefReNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int nolstress = GlobalDataBase::GetIntParaFromDB("nolstress");
+    int nrokplus  = GlobalDataBase::GetIntParaFromDB("nrokplus");
+
+    RDouble skewnessAngle = parameters->GetSkewnessAngle();
+
+    RDouble **t                 = reinterpret_cast<RDouble **> (grid->GetDataPtr("t"));
+    RDouble **primitiveVariable = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *gama               = reinterpret_cast<RDouble *> (grid->GetDataPtr("gama"));
+    RDouble** dRdq              = reinterpret_cast<RDouble **> (grid->GetDataPtr("dRdq"));
+    RDouble** dDdP              = reinterpret_cast<RDouble **> (grid->GetDataPtr("dDdP"));
+    vector<int> AI              = grid->GetJacobianAI4GMRES();
+    vector<int> AJ              = grid->GetJacobianAJ4GMRES();
+    // GMRESJac1st
+    RDouble** dRdq1st              = reinterpret_cast<RDouble **> (grid->GetDataPtr("dRdq1st"));
+    vector<int> AI1st              = grid->GetJacobianAI1st4GMRES();
+    vector<int> AJ1st              = grid->GetJacobianAJ1st4GMRES();
+    RDouble **qTurb = 0;
+    RDouble **aniss  = 0;
+    RDouble coefficientofStateEquation = gas->GetCoefficientOfStateEquation();
+
+
+    if (nrokplus > 0)
+    {
+        qTurb = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+        aniss  = reinterpret_cast<RDouble **> (grid->GetDataPtr("aniss"));
+    }
+
+    // GMRESCoupled
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    RDouble** dRdqCoupledTerm = 0;
+    if( viscousType == ONE_EQU )
+    {
+        dRdqCoupledTerm         = reinterpret_cast <RDouble**> (grid->GetDataPtr("dRdqCoupledTerm"));
+    }
+    RDouble **primitiveturb             = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"  ));
+    RDouble **dDdP_turb                 = reinterpret_cast<RDouble **> (grid->GetDataPtr("dDdP_turb"));
+    RDouble* dFluxdnutL                 = new RDouble[nEquation]();
+    RDouble* dFluxdnutR                 = new RDouble[nEquation]();
+
+
+    // GMRES2ndCorrection
+    vector<int> BCLeftCells     = grid->GetBCLeftCells();
+    vector<int> BCRightCells    = grid->GetBCRightCells();
+    vector<int> BCFaces         = grid->GetBCFaces();
+
+    int nIndependentVars = nEquation * 2 + (nEquation + nTemperatureModel) * 6;
+    int halfIndependentVars = nIndependentVars / 2;
+    // GMRESCoupled
+    if( viscousType == ONE_EQU )
+    {
+        nIndependentVars += 2;  // two extra terms include the derivative w.r.t nut_L, nut_R
+    }
+
+    int colidx, colidx2, colidx1st, colidx21st;
+
+    ADReal *dqdxL = new ADReal[nEquation+nTemperatureModel];
+    ADReal *dqdyL = new ADReal[nEquation+nTemperatureModel];
+    ADReal *dqdzL = new ADReal[nEquation+nTemperatureModel];
+
+    ADReal *dqdxR = new ADReal[nEquation+nTemperatureModel];
+    ADReal *dqdyR = new ADReal[nEquation+nTemperatureModel];
+    ADReal *dqdzR = new ADReal[nEquation+nTemperatureModel];
+    //RDouble *dgrad = new RDouble[nEquation+nTemperatureModel];
+
+    RDouble *primL = new RDouble[nEquation];
+    RDouble *primR = new RDouble[nEquation];
+    RDouble *fN    = new RDouble[nEquation]; // for neighbors
+    ADReal *fL     = new ADReal[nEquation];
+    ADReal *fR     = new ADReal[nEquation];
+    ADReal *fluxp  = new ADReal[nLaminar];
+    ADReal fLturb;  // GMRESCoupled
+    ADReal fRturb;  // GMRESCoupled
+
+
+    RDouble t1x, t1y, t1z, t2x, t2y, t2z;
+    RDouble txx,tyy,tzz;
+    RDouble txy,txz,tyz;
+    
+    bool isFineGrid = grid->IsFinestGrid();
+    
+    using namespace IDX;
+    RDouble  dFluxdpL[nEquation][nEquation];
+    RDouble  dFluxdpR[nEquation][nEquation];
+    RDouble  dGradtmp[nEquation][nEquation];
+    RDouble  dGradtmpBC[nEquation][nEquation];
+    RDouble  dDdPlocal[nEquation][nEquation];
+    RDouble  dFluxdgradxL[nEquation][nEquation+nTemperatureModel];
+    RDouble  dFluxdgradyL[nEquation][nEquation+nTemperatureModel];
+    RDouble  dFluxdgradzL[nEquation][nEquation+nTemperatureModel];
+    RDouble  dFluxdgradxR[nEquation][nEquation+nTemperatureModel];
+    RDouble  dFluxdgradyR[nEquation][nEquation+nTemperatureModel];
+    RDouble  dFluxdgradzR[nEquation][nEquation+nTemperatureModel];
+    RDouble  dfpert;
+    RDouble  dgradpert;
+    RDouble  perturbScale = 1e-6;
+
+    vector<int>* neighborCells = grid->GMRESGetNeighborCells();
+    vector<int>* neighborFaces = grid->GMRESGetNeighborFaces();
+    vector<int>* neighborLR = grid->GMRESGetNeighborLR();
+    RDouble** dqdcvL= new RDouble*[nEquation];
+    RDouble** dqdcvR= new RDouble*[nEquation];
+    RDouble** dqdcvN= new RDouble*[nEquation];  // dqdcv for neighbors
+    RDouble** dgraddqx = new RDouble*[nEquation+nTemperatureModel];
+    RDouble** dgraddqy = new RDouble*[nEquation+nTemperatureModel];
+    RDouble** dgraddqz = new RDouble*[nEquation+nTemperatureModel];
+
+    for(int indexI=0; indexI < nEquation; indexI++)
+    {
+        dqdcvL[indexI]      = new RDouble[nEquation];
+        dqdcvR[indexI]      = new RDouble[nEquation];
+        dqdcvN[indexI]      = new RDouble[nEquation];
+        dgraddqx[indexI]    = new RDouble[nEquation];
+        dgraddqy[indexI]    = new RDouble[nEquation];
+        dgraddqz[indexI]    = new RDouble[nEquation];
+        
+        for(int indexJ =0; indexJ < nEquation; indexJ ++)
+        {
+            dqdcvL[indexI][indexJ] = 0.0;
+            dqdcvR[indexI][indexJ] = 0.0;
+            dqdcvN[indexI][indexJ] = 0.0;
+        }
+    }
+    dgraddqx[nEquation]    = new RDouble[nEquation];
+    dgraddqy[nEquation]    = new RDouble[nEquation];
+    dgraddqz[nEquation]    = new RDouble[nEquation];
+
+    int nMid = 0;
+        
+    // GMRESBoundary
+     if (localStart >= nBoundFace)
+     {
+         nMid = localStart;  
+     }
+     else if (localEnd <= nBoundFace) 
+     { 
+        //! If they are all boundary faces.
+         nMid = localEnd;
+     }
+     else
+     {
+         //! Part of them are boundary faces.
+         nMid = nBoundFace;
+     }
+    
+    // boundary faces
+    for (int iFace = localStart; iFace < nMid; ++ iFace)
+    {
+        int le = leftCellofFace [iFace];
+        int re = rightCellofFace[iFace];
+        int jFace  = iFace - localStart;
+
+        //! init the value
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            fL[m]       = primitiveVariable[m][le];
+            fR[m]       = primitiveVariable[m][re];
+            primL[m]    = primitiveVariable[m][le];
+            primR[m]    = primitiveVariable[m][re];
+            dqdxL[m]    = dqdx[m][le];
+            dqdyL[m]    = dqdy[m][le];
+            dqdzL[m]    = dqdz[m][le];
+            dqdxR[m]    = dqdx[m][re];
+            dqdyR[m]    = dqdy[m][re];
+            dqdzR[m]    = dqdz[m][re];
+        }
+        dqdxL[nEquation]        = dtdx[ITT][le];
+        dqdyL[nEquation]        = dtdy[ITT][le];
+        dqdzL[nEquation]        = dtdz[ITT][le];
+        dqdxR[nEquation]        = dtdx[ITT][re];
+        dqdyR[nEquation]        = dtdy[ITT][re];
+        dqdzR[nEquation]        = dtdz[ITT][re];
+
+        // GMRESCoupled
+        if( viscousType == ONE_EQU )
+        {
+            fLturb = primitiveturb[0][le];
+            fRturb = primitiveturb[0][re];
+        }
+
+        //! define the sequence of the independent variables
+        for (int m = 0; m < nEquation; m++)
+        {
+            fL[m].diff(m, nIndependentVars);
+            fR[m].diff(halfIndependentVars + m, nIndependentVars);
+        }
+        for (int m = 0; m < nEquation + nTemperatureModel; m++)
+        {
+            dqdxL[m].diff(nEquation + m, nIndependentVars);
+            dqdyL[m].diff(nEquation + (nEquation + nTemperatureModel) + m, nIndependentVars);
+            dqdzL[m].diff(nEquation + 2 * (nEquation + nTemperatureModel) + m, nIndependentVars);
+            dqdxR[m].diff(halfIndependentVars + nEquation + m, nIndependentVars);
+            dqdyR[m].diff(halfIndependentVars + nEquation + (nEquation + nTemperatureModel) + m, nIndependentVars);
+            dqdzR[m].diff(halfIndependentVars + nEquation + 2 * (nEquation + nTemperatureModel) + m, nIndependentVars);
+        }
+
+
+        // GMRESCoupled
+        if( viscousType == ONE_EQU )
+        {
+            fLturb.diff(nIndependentVars-2,nIndependentVars);
+            fRturb.diff(nIndependentVars-1,nIndependentVars);
+        }
+
+
+        if( viscousType == LAMINAR )
+        {
+            Cal_GMRES_Visflux_AD(fL, fR, dqdxL, dqdyL, dqdzL, 
+                                dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                                gridIn, faceProxy, parameters); 
+        }
+        else if( viscousType == ONE_EQU )
+        {
+            Cal_GMRES_Visflux_AD_Coupled(fL, fR, fLturb,fRturb,dqdxL, dqdyL, dqdzL, 
+                                dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                                gridIn, faceProxy, parameters); 
+        }
+
+
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            //! value information
+            flux[m][jFace] = fluxp[m].val();
+            //! AD information
+            for (int n = 0; n < nLaminar; ++ n)
+            {
+                dFluxdpL[m][n] = fluxp[m].dx(n);
+                dFluxdpR[m][n] = fluxp[m].dx(halfIndependentVars + n);
+            }
+            for (int n = 0; n < nEquation + nTemperatureModel; n++)
+            {
+                dFluxdgradxL[m][n] = fluxp[m].dx(nEquation + n);
+                dFluxdgradyL[m][n] = fluxp[m].dx(nEquation + nEquation + nTemperatureModel + n);
+                dFluxdgradzL[m][n] = fluxp[m].dx(nEquation + 2 * (nEquation + nTemperatureModel) + n);
+                dFluxdgradxR[m][n] = fluxp[m].dx(halfIndependentVars + nEquation + n);
+                dFluxdgradyR[m][n] = fluxp[m].dx(halfIndependentVars + nEquation + nEquation + nTemperatureModel + n);
+                dFluxdgradzR[m][n] = fluxp[m].dx(halfIndependentVars + nEquation + 2 * (nEquation + nTemperatureModel) + n);
+            }
+        }
+        
+        if( viscousType == ONE_EQU )
+        {
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdnutL[m] = fluxp[m].dx(nIndependentVars-2);
+                dFluxdnutR[m] = fluxp[m].dx(nIndependentVars-1);
+            }
+
+            int colidx1      = GetIndexOfBlockJacobianMatrix(AI, AJ, 1, re, le);
+            int colidx2      = GetIndexOfBlockJacobianMatrix(AI, AJ, 1, le, le);
+            int colidx3      = GetIndexOfBlockJacobianMatrix(AI, AJ, 1, re, re);
+            int colidx4      = GetIndexOfBlockJacobianMatrix(AI, AJ, 1, le, re);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                dRdqCoupledTerm[indexI][colidx1] -= dFluxdnutL[indexI];
+                dRdqCoupledTerm[indexI][colidx2] += dFluxdnutL[indexI];
+                dRdqCoupledTerm[indexI][colidx3] -= dFluxdnutR[indexI];
+                dRdqCoupledTerm[indexI][colidx4] += dFluxdnutR[indexI];
+                dRdqCoupledTerm[indexI][colidx2] += dFluxdnutR[indexI]*dDdP_turb[0][re-nTotalCell];
+            }
+        }
+        // assemble the matrix
+        // contributions from the bc
+        int indexre = (re - nTotalCell) * nEquation;
+        for (int indexI = 0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+            }
+        }
+
+        // GMRESPV , obtain the dqdcv for the left cell
+        gas->dPrimitive2dConservative(primL,gama[le],dqdcvL);
+
+        // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+        // then minus to the corresponding location in dRdq.
+        int indexf = re * nEquation; // first index
+        int indexs = le * nEquation; // second index
+        colidx      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+        colidx1st   = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, re, le); // GMRESJac1st
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx + indexJ]   -= dFluxdpL[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+
+                    dRdq1st[indexI][colidx1st + indexJ] -= dFluxdpL[indexI][indexK]*
+                                                                dqdcvL[indexK][indexJ]; // GMRESJac1st
+                }
+            }
+        }
+
+        // contributions from the bc, 
+        // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dFluxdpL[indexI][indexJ]  += dFluxdpR[indexI][indexK]*
+                                                dDdPlocal[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = le * nEquation; // second index
+        colidx      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+        colidx1st   = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, le, le); // GMRESJac1st
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx+indexJ] += dFluxdpL[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+
+                    dRdq1st[indexI][colidx1st+indexJ] += dFluxdpL[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ]; // GMRESJac1st
+                }
+            }
+        }
+
+        // considering the perturbation of the gradient in the flux calculation
+        RDouble nxs         = xfn[iFace];
+        RDouble nys         = yfn[iFace];
+        RDouble nzs         = zfn[iFace];
+        RDouble ns          = area[iFace];
+        RDouble volume      = vol[re];
+        // dgradtmp = dfluxdgradxR*dgradRdqLx + dfluxdgradyR*dgradRdqLy + dfluxdgradzR*dgraddqLz
+        // dRdq[le][le] += dgradtmp*dqdcvL
+        gas->dGradient2dPrimitive(primL,-1,dgraddqx, 'x', nxs, nys,nzs,ns,volume);
+        gas->dGradient2dPrimitive(primL,-1,dgraddqy, 'y', nxs, nys,nzs,ns,volume);
+        gas->dGradient2dPrimitive(primL,-1,dgraddqz, 'z', nxs, nys,nzs,ns,volume);
+
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dGradtmp[indexI][indexJ] = 0;
+                
+                for(int indexK=0; indexK < (nEquation+1); indexK++)
+                {
+                    dGradtmp[indexI][indexJ] += dFluxdgradxR[indexI][indexK]*
+                                                             dgraddqx[indexK][indexJ];
+                    dGradtmp[indexI][indexJ] += dFluxdgradyR[indexI][indexK]*
+                                                             dgraddqy[indexK][indexJ];
+                    dGradtmp[indexI][indexJ] += dFluxdgradzR[indexI][indexK]*
+                                                             dgraddqz[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dGradtmp by right multiplying the dqdcvL,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = le * nEquation; // second index
+        colidx      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+        colidx1st   = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, le, le);  // GMRESJac1st
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx+indexJ] += dGradtmp[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+
+                    dRdq1st[indexI][colidx1st+indexJ] += dGradtmp[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ]; // GMRESJac1st
+                }
+            }
+        }
+
+        indexf = re * nEquation; // first index
+        indexs = le * nEquation; // second index
+        colidx      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+        colidx1st   = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, re, le); // GMRESJac1st
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx+indexJ] -= dGradtmp[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+
+                    dRdq1st[indexI][colidx1st+indexJ] -= dGradtmp[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ]; // GMRESJac1st
+                }
+            }
+        }
+
+        nxs         = xfn[iFace];
+        nys         = yfn[iFace];
+        nzs         = zfn[iFace];
+        ns          = area[iFace];
+        volume      = vol[le];
+        // dgradtmp = dfluxdgradxL*dgradLdqRx + dfluxdgradyL*dgradLdqRy + dfluxdgradzL*dgradLdqRz
+        // dRdq[le][re] += dgradtmp*dqdcvL
+        gas->dGradient2dPrimitive(primR,1,dgraddqx, 'x', nxs, nys,nzs,ns,volume);
+        gas->dGradient2dPrimitive(primR,1,dgraddqy, 'y', nxs, nys,nzs,ns,volume);
+        gas->dGradient2dPrimitive(primR,1,dgraddqz, 'z', nxs, nys,nzs,ns,volume);
+
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dGradtmp[indexI][indexJ] = 0;
+                
+                for(int indexK=0; indexK < (nEquation+1); indexK++)
+                {
+                    dGradtmp[indexI][indexJ] += dFluxdgradxL[indexI][indexK]*
+                                                             dgraddqx[indexK][indexJ];
+                    dGradtmp[indexI][indexJ] += dFluxdgradyL[indexI][indexK]*
+                                                             dgraddqy[indexK][indexJ];
+                    dGradtmp[indexI][indexJ] += dFluxdgradzL[indexI][indexK]*
+                                                             dgraddqz[indexK][indexJ];
+                }
+            }
+        }
+
+
+        // contributions from the bc, 
+        // dFluxdPR*dDdPlocal
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dGradtmpBC[indexI][indexJ] = 0.0;
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dGradtmpBC[indexI][indexJ]  += dGradtmp[indexI][indexK]*
+                                                    dDdPlocal[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dGradtmpBC by right multiplying the dqdcvL,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = le * nEquation; // second index
+        colidx      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+        colidx1st   = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, le, le); // GMRESJac1st
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx+indexJ] += dGradtmpBC[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+
+                    dRdq1st[indexI][colidx1st+indexJ] += dGradtmpBC[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];  // GMRESJac1st
+                }
+            }
+        }
+
+        
+        // the neighbors of the left cells
+        for(int index = 0; index < neighborCells[le].size(); index++)
+        {
+            int neighborIndex = neighborCells[le][index];
+
+            if(neighborIndex != re)
+            {
+                int Faceindex   = neighborFaces[le][index];
+                // judge whether it is the boundary face and obtain its boundary type
+                bool isGhostCell = false;
+                UnstructBC *neighborBCRegion = nullptr;
+                int neighborBCType;
+                if (neighborIndex >= nTotalCell)
+                {
+                    isGhostCell = true;
+                    neighborBCRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[Faceindex]);
+                    neighborBCType = neighborBCRegion->GetBCType();
+                }
+
+                int sign        = neighborLR[le][index];
+                RDouble nxs     = xfn[Faceindex];
+                RDouble nys     = yfn[Faceindex];
+                RDouble nzs     = zfn[Faceindex];
+                RDouble ns      = area[Faceindex];
+                RDouble volume  = vol[le];
+                for(int m =0; m < nEquation; m++)
+                {
+                    fN[m] = primitiveVariable[m][neighborIndex];
+                }
+
+                gas->dPrimitive2dConservative(fN,gama[neighborIndex],dqdcvN);
+
+                gas->dGradient2dPrimitive(fN,sign, dgraddqx, 'x', nxs, nys,nzs,ns,volume);
+                gas->dGradient2dPrimitive(fN,sign, dgraddqy, 'y', nxs, nys,nzs,ns,volume);
+                gas->dGradient2dPrimitive(fN,sign, dgraddqz, 'z', nxs, nys,nzs,ns,volume);
+
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dGradtmp[indexI][indexJ] = 0;
+
+                        for(int indexK=0; indexK < (nEquation+1); indexK++)
+                        {
+                            dGradtmp[indexI][indexJ] += dFluxdgradxL[indexI][indexK]*
+                                                                     dgraddqx[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradyL[indexI][indexK]*
+                                                                     dgraddqy[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradzL[indexI][indexK]*
+                                                                     dgraddqz[indexK][indexJ];
+                        }
+                    }
+                }
+
+                int indexf  = le * nEquation; // first index
+                int indexs  = neighborIndex * nEquation; // second index
+                int indexf2 = re * nEquation; 
+                colidx  = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            // dRL/dqLNeighbors += dRL/dGradL*dGradL/dqLNeighbors ===> dFluxdgradL*dgraddq
+                            dRdq[indexI][colidx+indexJ] += dGradtmp[indexI][indexK]*
+                                                                     dqdcvN[indexK][indexJ];
+                            
+                            // dRR/dqLNeighbors -= dRR/dGradL*dGradL/dqLNeighbors ===> dFluxdgradL*dgraddq
+                            dRdq[indexI][colidx2+indexJ] -= dGradtmp[indexI][indexK]*
+                                                                     dqdcvN[indexK][indexJ];
+                        }
+                    }
+                } 
+
+                if (isGhostCell && neighborBCType != PHENGLEI::INTERFACE)
+                {
+                    int indexre = (neighborIndex - nTotalCell) * nEquation;
+                    for (int indexI = 0; indexI < nEquation; indexI++)
+                    {
+                        for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                        {
+                            dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre + indexJ];
+                        }
+                    }
+
+                    for (int indexI = 0; indexI < nEquation; indexI++)
+                    {
+                        for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                        {
+                            dGradtmpBC[indexI][indexJ] = 0.0;
+                            for (int indexK = 0; indexK < nEquation; indexK++)
+                            {
+                                dGradtmpBC[indexI][indexJ] += dGradtmp[indexI][indexK] * dDdPlocal[indexK][indexJ];
+                            }
+                        }
+                    }
+
+                    gas->dPrimitive2dConservative(primL, gama[le], dqdcvL);
+                    int colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+                    int colidx1st = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, le, le);
+                    int colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+                    int colidx21st = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, re, le);
+                    for (int indexI = 0; indexI < nEquation; indexI++)
+                    {
+                        for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                        {
+                            for (int indexK = 0; indexK < nEquation; indexK++)
+                            {
+                                RDouble tmp = dGradtmpBC[indexI][indexK] * dqdcvL[indexK][indexJ];
+                                dRdq[indexI][colidx + indexJ] += tmp;
+                                dRdq[indexI][colidx2 + indexJ] -= tmp;
+                                dRdq1st[indexI][colidx1st + indexJ] += tmp;
+                                dRdq1st[indexI][colidx21st + indexJ] -= tmp;
+                            }
+                        }
+                    }
+
+                }           
+            }
+        }
+    }
+
+    // interior faces
+    for (int iFace = nMid; iFace < localEnd; ++ iFace)
+    {
+        int le = leftCellofFace [iFace];
+        int re = rightCellofFace[iFace];
+        int jFace  = iFace - localStart;
+
+        //! init the value
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            fL[m]       = primitiveVariable[m][le];
+            fR[m]       = primitiveVariable[m][re];
+            primL[m]    = primitiveVariable[m][le];
+            primR[m]    = primitiveVariable[m][re];
+            dqdxL[m]    = dqdx[m][le];
+            dqdyL[m]    = dqdy[m][le];
+            dqdzL[m]    = dqdz[m][le];
+            dqdxR[m]    = dqdx[m][re];
+            dqdyR[m]    = dqdy[m][re];
+            dqdzR[m]    = dqdz[m][re];
+        }
+        dqdxL[nEquation]        = dtdx[ITT][le];
+        dqdyL[nEquation]        = dtdy[ITT][le];
+        dqdzL[nEquation]        = dtdz[ITT][le];
+        dqdxR[nEquation]        = dtdx[ITT][re];
+        dqdyR[nEquation]        = dtdy[ITT][re];
+        dqdzR[nEquation]        = dtdz[ITT][re];
+
+        // GMRESCoupled
+        if( viscousType == ONE_EQU )
+        {
+            fLturb = primitiveturb[0][le];
+            fRturb = primitiveturb[0][re];
+        }
+
+        //! define the sequence of the independent variables
+        for (int m = 0; m < nEquation; m++)
+        {
+            fL[m].diff(m, nIndependentVars);
+            fR[m].diff(halfIndependentVars + m, nIndependentVars);
+        }
+        for (int m = 0; m < nEquation + nTemperatureModel; m++)
+        {
+            dqdxL[m].diff(nEquation + m, nIndependentVars);
+            dqdyL[m].diff(nEquation + (nEquation + nTemperatureModel) + m, nIndependentVars);
+            dqdzL[m].diff(nEquation + 2 * (nEquation + nTemperatureModel) + m, nIndependentVars);
+            dqdxR[m].diff(halfIndependentVars + nEquation + m, nIndependentVars);
+            dqdyR[m].diff(halfIndependentVars + nEquation + (nEquation + nTemperatureModel) + m, nIndependentVars);
+            dqdzR[m].diff(halfIndependentVars + nEquation + 2 * (nEquation + nTemperatureModel) + m, nIndependentVars);
+        }
+
+        // GMRESCoupled
+        if( viscousType == ONE_EQU )
+        {
+            fLturb.diff(nIndependentVars-2,nIndependentVars);
+            fRturb.diff(nIndependentVars-1,nIndependentVars);
+        }
+
+        // std::cout << "before AD " << iFace << "\n";
+
+        if( viscousType == LAMINAR )
+        {
+            Cal_GMRES_Visflux_AD(fL, fR, dqdxL, dqdyL, dqdzL, 
+                                dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                                gridIn, faceProxy, parameters); 
+        }
+        else if( viscousType == ONE_EQU )
+        {
+            Cal_GMRES_Visflux_AD_Coupled(fL, fR, fLturb,fRturb,dqdxL, dqdyL, dqdzL, 
+                                dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                                gridIn, faceProxy, parameters); 
+        }
+
+
+        // std::cout << "after AD " << iFace << "\n";
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            //! value information
+            flux[m][jFace] = fluxp[m].val();
+            //! AD information
+            for (int n = 0; n < nLaminar; ++ n)
+            {
+                dFluxdpL[m][n] = fluxp[m].dx(n);
+                dFluxdpR[m][n] = fluxp[m].dx(halfIndependentVars + n);
+            }
+            for (int n = 0; n < nEquation + nTemperatureModel; n++)
+            {
+                dFluxdgradxL[m][n] = fluxp[m].dx(nEquation + n);
+                dFluxdgradyL[m][n] = fluxp[m].dx(nEquation + nEquation + nTemperatureModel + n);
+                dFluxdgradzL[m][n] = fluxp[m].dx(nEquation + 2 * (nEquation + nTemperatureModel) + n);
+                dFluxdgradxR[m][n] = fluxp[m].dx(halfIndependentVars + nEquation + n);
+                dFluxdgradyR[m][n] = fluxp[m].dx(halfIndependentVars + nEquation + nEquation + nTemperatureModel + n);
+                dFluxdgradzR[m][n] = fluxp[m].dx(halfIndependentVars + nEquation + 2 * (nEquation + nTemperatureModel) + n);
+            }
+        }
+
+        if( viscousType == ONE_EQU )
+        {
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdnutL[m] = fluxp[m].dx(nIndependentVars-2);
+                dFluxdnutR[m] = fluxp[m].dx(nIndependentVars-1);
+            }
+
+            int colidx1      = GetIndexOfBlockJacobianMatrix(AI, AJ, 1, re, le);
+            int colidx2      = GetIndexOfBlockJacobianMatrix(AI, AJ, 1, le, le);
+            int colidx3      = GetIndexOfBlockJacobianMatrix(AI, AJ, 1, re, re);
+            int colidx4      = GetIndexOfBlockJacobianMatrix(AI, AJ, 1, le, re);
+            for (int indexI = 0; indexI < nEquation; indexI++)
+            {
+                dRdqCoupledTerm[indexI][colidx1] -= dFluxdnutL[indexI];
+                dRdqCoupledTerm[indexI][colidx2] += dFluxdnutL[indexI];
+                dRdqCoupledTerm[indexI][colidx3] -= dFluxdnutR[indexI];
+                dRdqCoupledTerm[indexI][colidx4] += dFluxdnutR[indexI];
+            }
+        }
+
+        // GMRESPV , obtain the dqdcv for the left cell
+        gas->dPrimitive2dConservative(primL,gama[le],dqdcvL);
+
+        // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+        // then minus to the corresponding location in dRdq.
+        int indexf = re * nEquation; // first index
+        int indexs = le * nEquation; // second index
+        colidx      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+        colidx1st   = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, re, le);  // GMRESJac1st
+        for (int indexI = 0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx+indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+
+                    dRdq1st[indexI][colidx1st+indexJ] -= dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];  // GMRESJac1st
+                }
+            }
+        }
+        
+        // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = le * nEquation; // second index
+        colidx      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+        colidx1st   = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, le, le);  // GMRESJac1st
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx+indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];
+
+                    dRdq1st[indexI][colidx1st+indexJ] += dFluxdpL[indexI][indexK] * dqdcvL[indexK][indexJ];  // GMRESJac1st
+                }
+            }
+        }
+
+         // GMRESPV , obtain the dqdcv for the right cell
+        gas->dPrimitive2dConservative(primR,gama[re],dqdcvR);
+
+        // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+        // then minus to the corresponding location in dRdq.
+        indexf = re * nEquation; // first index
+        indexs = re * nEquation; // second index
+        colidx      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+        colidx1st   = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, re, re); // GMRESJac1st
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx+indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+
+                    dRdq1st[indexI][colidx1st+indexJ] -= dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ]; // GMRESJac1st
+                }
+            }
+        }
+
+        // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = re * nEquation; // second index
+        colidx      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+        colidx1st   = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, le, re);  // GMRESJac1st
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx+indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];
+
+                    dRdq1st[indexI][colidx1st+indexJ] += dFluxdpR[indexI][indexK] * dqdcvR[indexK][indexJ];  // GMRESJac1st
+                }
+            }
+        }
+
+        
+        // considering the perturbation of the gradient in the flux calculation
+        RDouble nxs         = xfn[iFace];
+        RDouble nys         = yfn[iFace];
+        RDouble nzs         = zfn[iFace];
+        RDouble ns          = area[iFace];
+        RDouble volume      = vol[re];
+        // dgradtmp = dfluxdgradxR*dgradRdqLx + dfluxdgradyR*dgradRdqLy + dfluxdgradzR*dgraddqLz
+        // dRdq[le][le] += dgradtmp*dqdcvL
+        gas->dGradient2dPrimitive(primL,-1,dgraddqx, 'x', nxs, nys,nzs,ns,volume);
+        gas->dGradient2dPrimitive(primL,-1,dgraddqy, 'y', nxs, nys,nzs,ns,volume);
+        gas->dGradient2dPrimitive(primL,-1,dgraddqz, 'z', nxs, nys,nzs,ns,volume);
+
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dGradtmp[indexI][indexJ] = 0;
+                for(int indexK=0; indexK < (nEquation+1); indexK++)
+                {
+                    dGradtmp[indexI][indexJ] += dFluxdgradxR[indexI][indexK] * dgraddqx[indexK][indexJ];
+                    dGradtmp[indexI][indexJ] += dFluxdgradyR[indexI][indexK] * dgraddqy[indexK][indexJ];
+                    dGradtmp[indexI][indexJ] += dFluxdgradzR[indexI][indexK] * dgraddqz[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dGradtmp by right multiplying the dqdcvL,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = le * nEquation; // second index
+        colidx      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, le);
+        colidx1st   = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, le, le); // GMRESJac1st
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx+indexJ] += dGradtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+
+                    dRdq1st[indexI][colidx1st+indexJ] += dGradtmp[indexI][indexK] * dqdcvL[indexK][indexJ]; // GMRESJac1st
+                }
+            }
+        }
+
+
+        // dgradtmp = dfluxdgradxR*dgradRdqLx + dfluxdgradyR*dgradRdqLy + dfluxdgradzR*dgraddqLz
+        // dRdq[re][le] += dgradtmp*dqdcvL
+        indexf = re * nEquation; // first index
+        indexs = le * nEquation; // second index
+        colidx      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, le);
+        colidx1st   = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, re, le); // GMRESJac1st
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx+indexJ] -= dGradtmp[indexI][indexK] * dqdcvL[indexK][indexJ];
+
+                    dRdq1st[indexI][colidx1st+indexJ] -= dGradtmp[indexI][indexK] * dqdcvL[indexK][indexJ]; // GMRESJac1st
+                }
+            }
+        }
+
+        nxs         = xfn[iFace];
+        nys         = yfn[iFace];
+        nzs         = zfn[iFace];
+        ns          = area[iFace];
+        volume      = vol[le];
+        // dgradtmp = dfluxdgradxL*dgradLdqRx + dfluxdgradyL*dgradLdqRy + dfluxdgradzL*dgradLdqRz
+        // dRdq[le][re] += dgradtmp*dqdcvL
+        gas->dGradient2dPrimitive(primR,1,dgraddqx, 'x', nxs, nys,nzs,ns,volume);
+        gas->dGradient2dPrimitive(primR,1,dgraddqy, 'y', nxs, nys,nzs,ns,volume);
+        gas->dGradient2dPrimitive(primR,1,dgraddqz, 'z', nxs, nys,nzs,ns,volume);
+
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dGradtmp[indexI][indexJ] = 0;
+                
+                for(int indexK=0; indexK < (nEquation+1); indexK++)
+                {
+                    dGradtmp[indexI][indexJ] += dFluxdgradxL[indexI][indexK]*
+                                                             dgraddqx[indexK][indexJ];
+                    dGradtmp[indexI][indexJ] += dFluxdgradyL[indexI][indexK]*
+                                                             dgraddqy[indexK][indexJ];
+                    dGradtmp[indexI][indexJ] += dFluxdgradzL[indexI][indexK]*
+                                                             dgraddqz[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dGradtmp by right multiplying the dqdcvL,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = re * nEquation; // second index
+        colidx      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, re);
+        colidx1st   = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, le, re); // GMRESJac1st
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx+indexJ] += dGradtmp[indexI][indexK]*
+                                                             dqdcvR[indexK][indexJ];
+
+                    dRdq1st[indexI][colidx1st+indexJ] += dGradtmp[indexI][indexK]*
+                                                             dqdcvR[indexK][indexJ];   // GMRESJac1st                                                        
+                }
+            }
+        }
+
+
+        // dgradtmp = dfluxdgradxL*dgradLdqRx + dfluxdgradyL*dgradLdqRy + dfluxdgradzL*dgradLdqRz
+        // dRdq[re][re] += dgradtmp*dqdcvL
+        indexf = re * nEquation; // first index
+        indexs = re * nEquation; // second index
+        colidx      = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, re);
+        colidx1st   = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, re, re); // GMRESJac1st   
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexI][colidx+indexJ] -= dGradtmp[indexI][indexK]*
+                                                             dqdcvR[indexK][indexJ];
+
+                    dRdq1st[indexI][colidx1st+indexJ] -= dGradtmp[indexI][indexK]*
+                                                             dqdcvR[indexK][indexJ]; // GMRESJac1st                                                             
+                }
+            }
+        }
+        
+        // the neighbors of the left cells
+        for(int index = 0; index < neighborCells[le].size(); index++)
+        {
+            int neighborIndex = neighborCells[le][index];
+
+            if(neighborIndex != re)
+            {
+                int Faceindex   = neighborFaces[le][index];
+                // judge whether it is the boundary face and obtain its boundary type
+                bool isGhostCell = false;
+                UnstructBC *neighborBCRegion = nullptr;
+                int neighborBCType;
+                if (neighborIndex >= nTotalCell)
+                {
+                    isGhostCell = true;
+                    neighborBCRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[Faceindex]);
+                    neighborBCType = neighborBCRegion->GetBCType();
+                }
+                
+                int sign        = neighborLR[le][index];
+                RDouble nxs     = xfn[Faceindex];
+                RDouble nys     = yfn[Faceindex];
+                RDouble nzs     = zfn[Faceindex];
+                RDouble ns      = area[Faceindex];
+                RDouble volume  = vol[le];
+
+                for(int m =0; m < nEquation; m++)
+                {
+                    fN[m] = primitiveVariable[m][neighborIndex];
+                }
+
+                gas->dPrimitive2dConservative(fN,gama[neighborIndex],dqdcvN);
+
+                gas->dGradient2dPrimitive(fN,sign,dgraddqx, 'x', nxs, nys,nzs,ns,volume);
+                gas->dGradient2dPrimitive(fN,sign,dgraddqy, 'y', nxs, nys,nzs,ns,volume);
+                gas->dGradient2dPrimitive(fN,sign,dgraddqz, 'z', nxs, nys,nzs,ns,volume);
+
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dGradtmp[indexI][indexJ] = 0;
+
+                        for(int indexK=0; indexK < (nEquation+1); indexK++)
+                        {
+                            dGradtmp[indexI][indexJ] += dFluxdgradxL[indexI][indexK]*
+                                                                     dgraddqx[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradyL[indexI][indexK]*
+                                                                     dgraddqy[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradzL[indexI][indexK]*
+                                                                     dgraddqz[indexK][indexJ];
+                        }
+                    }
+                }
+
+                int indexf  = le * nEquation; // first index
+                int indexs  = neighborIndex * nEquation; // second index
+                int indexf2 = re * nEquation; 
+                colidx  = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            // dRL/dqLNeighbors += dRL/dGradL*dGradL/dqLNeighbors ===> dFluxdgradL*dgraddq
+                            dRdq[indexI][colidx+indexJ] += dGradtmp[indexI][indexK]*
+                                                                     dqdcvN[indexK][indexJ];
+                            
+                            // dRR/dqLNeighbors -= dRR/dGradL*dGradL/dqLNeighbors ===> dFluxdgradL*dgraddq
+                            dRdq[indexI][colidx2+indexJ] -= dGradtmp[indexI][indexK]*
+                                                                     dqdcvN[indexK][indexJ];
+                        }
+                    }
+                }  
+                
+                // boundary condition except interface
+                if (isGhostCell && neighborBCType != PHENGLEI::INTERFACE)
+                {
+                    int indexre = (neighborIndex - nTotalCell) * nEquation;
+                    for (int indexI = 0; indexI < nEquation; indexI++)
+                    {
+                        for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                        {
+                            dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre + indexJ];
+                        }
+                    }
+
+                    for (int indexI = 0; indexI < nEquation; indexI++)
+                    {
+                        for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                        {
+                            dGradtmpBC[indexI][indexJ] = 0.0;
+                            for (int indexK = 0; indexK < nEquation; indexK++)
+                            {
+                                dGradtmpBC[indexI][indexJ] += dGradtmp[indexI][indexK] * dDdPlocal[indexK][indexJ];
+                            }
+                        }
+                    }
+
+                    gas->dPrimitive2dConservative(primL, gama[le], dqdcvL);
+                    int colidx     = GetIndexOfBlockJacobianMatrix(AI   , AJ   , nEquation, le, le);
+                    int colidx1st  = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, le, le);
+                    int colidx2    = GetIndexOfBlockJacobianMatrix(AI,    AJ,    nEquation, re, le);
+                    int colidx21st = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, re, le);
+                    for (int indexI = 0; indexI < nEquation; indexI++)
+                    {
+                        for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                        {
+                            for (int indexK = 0; indexK < nEquation; indexK++)
+                            {
+                                RDouble tmp = dGradtmpBC[indexI][indexK] * dqdcvL[indexK][indexJ];
+                                dRdq[indexI][colidx + indexJ] += tmp;
+                                dRdq[indexI][colidx2 + indexJ] -= tmp;
+                                dRdq1st[indexI][colidx1st + indexJ] += tmp;
+                                dRdq1st[indexI][colidx21st + indexJ] -= tmp;
+                            }
+                        }
+                    }
+                }          
+            }
+        }
+
+
+        // the neighbors of the right cells
+        
+        for(int index = 0; index < neighborCells[re].size(); index++)
+        {
+            int neighborIndex = neighborCells[re][index];
+
+            if(neighborIndex != le)
+            {
+                int Faceindex       = neighborFaces[re][index];
+                 // judge whether it is the boundary face and obtain its boundary type
+                bool isGhostCell = false;
+                UnstructBC *neighborBCRegion = nullptr;
+                int neighborBCType;
+                if (neighborIndex >= nTotalCell)
+                {
+                    isGhostCell = true;
+                    neighborBCRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[Faceindex]);
+                    neighborBCType = neighborBCRegion->GetBCType();
+                }
+
+                int sign = neighborLR[re][index];
+                RDouble nxs         = xfn[Faceindex];
+                RDouble nys         = yfn[Faceindex];
+                RDouble nzs         = zfn[Faceindex];
+                RDouble ns          = area[Faceindex];
+                RDouble volume      = vol[re];
+    
+                for(int m=0; m < nEquation; m++)
+                {
+                    fN[m] = primitiveVariable[m][neighborIndex];
+                }
+    
+                gas->dPrimitive2dConservative(fN,gama[neighborIndex],dqdcvN);
+    
+                gas->dGradient2dPrimitive(fN,sign,dgraddqx, 'x', nxs, nys,nzs,ns,volume);
+                gas->dGradient2dPrimitive(fN,sign,dgraddqy, 'y', nxs, nys,nzs,ns,volume);
+                gas->dGradient2dPrimitive(fN,sign,dgraddqz, 'z', nxs, nys,nzs,ns,volume);
+    
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dGradtmp[indexI][indexJ] = 0;
+                        for(int indexK=0; indexK < (nEquation+1); indexK++)
+                        {
+                            dGradtmp[indexI][indexJ] += dFluxdgradxR[indexI][indexK]*
+                                                                     dgraddqx[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradyR[indexI][indexK]*
+                                                                     dgraddqy[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradzR[indexI][indexK]*
+                                                                     dgraddqz[indexK][indexJ];
+                        }
+                    }
+                }
+    
+                int indexf  = le * nEquation; // first index
+                int indexs  = neighborIndex * nEquation; // second index
+                int indexf2 = re * nEquation; 
+                colidx  = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, le, neighborIndex);
+                colidx2 = GetIndexOfBlockJacobianMatrix(AI, AJ, nEquation, re, neighborIndex);
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            
+                            // dRL/dqRNeighbors += dRL/dGradR*dGradR/dqRNeighbors ===> dFluxdgradR*dgraddq
+                            dRdq[indexI][colidx+indexJ] += dGradtmp[indexI][indexK]*
+                                                                     dqdcvN[indexK][indexJ];
+
+
+                            // dRR/dqRNeighbors -= dRR/dGradR*dGradR/dqRNeighbors ===> dFluxdgradR*dgraddq
+                            dRdq[indexI][colidx2+indexJ] -= dGradtmp[indexI][indexK]*
+                                                                     dqdcvN[indexK][indexJ];
+                        }
+                    }
+                }
+
+                if (isGhostCell && neighborBCType != PHENGLEI::INTERFACE)
+                {
+                    int indexre = (neighborIndex - nTotalCell) * nEquation;
+                    for (int indexI = 0; indexI < nEquation; indexI++)
+                    {
+                        for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                        {
+                            dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre + indexJ];
+                        }
+                    }
+
+                    for (int indexI = 0; indexI < nEquation; indexI++)
+                    {
+                        for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                        {
+                            dGradtmpBC[indexI][indexJ] = 0.0;
+                            for (int indexK = 0; indexK < nEquation; indexK++)
+                            {
+                                dGradtmpBC[indexI][indexJ] += dGradtmp[indexI][indexK] * dDdPlocal[indexK][indexJ];
+                            }
+                        }
+                    }
+
+                    gas->dPrimitive2dConservative(primR, gama[re], dqdcvR);
+                    int colidx     = GetIndexOfBlockJacobianMatrix(AI   , AJ   , nEquation, le, re);
+                    int colidx1st  = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, le, re);
+                    int colidx2    = GetIndexOfBlockJacobianMatrix(AI   , AJ   , nEquation, re, re);
+                    int colidx21st = GetIndexOfBlockJacobianMatrix(AI1st, AJ1st, nEquation, re, re);
+                    for (int indexI = 0; indexI < nEquation; indexI++)
+                    {
+                        for (int indexJ = 0; indexJ < nEquation; indexJ++)
+                        {
+                            for (int indexK = 0; indexK < nEquation; indexK++)
+                            {
+                                RDouble tmp = dGradtmp[indexI][indexK] * dqdcvR[indexK][indexJ];
+                                dRdq[indexI][colidx + indexJ] += tmp;
+                                dRdq[indexI][colidx2 + indexJ] -= tmp;
+                                dRdq1st[indexI][colidx1st + indexJ] += tmp;
+                                dRdq1st[indexI][colidx21st + indexJ] -= tmp;
+                            }
+                        }
+                    }
+                }
+            }   
+        }
+
+    }
+    delete []dqdxL;    dqdxL = NULL;
+    delete []dqdyL;    dqdyL = NULL;
+    delete []dqdzL;    dqdzL = NULL;
+
+    delete []dqdxR;    dqdxR = NULL;
+    delete []dqdyR;    dqdyR = NULL;
+    delete []dqdzR;    dqdzR = NULL;
+
+    delete []fL;        fL = NULL;
+    delete []fR;        fR = NULL;
+    delete []fN;        fN = NULL;
+    delete []fluxp;     fluxp = NULL;
+    delete []primL;     primL = NULL;
+    delete []primR;     primR = NULL;
+
+    for(int index = 0; index < nEquation; index++)
+    {
+        delete[] dqdcvL[index];
+        delete[] dqdcvR[index];
+        delete[] dqdcvN[index];
+        delete[] dgraddqx[index];
+        delete[] dgraddqy[index];
+        delete[] dgraddqz[index];
+    }
+    delete[]    dgraddqx[nEquation];
+    delete[]    dgraddqy[nEquation];
+    delete[]    dgraddqz[nEquation];
+    delete[]    dqdcvL;
+    delete[]    dqdcvR;
+    delete[]    dqdcvN;
+    delete[]    dgraddqx;
+    delete[]    dgraddqy;
+    delete[]    dgraddqz;
+
+    delete[] dFluxdnutL;  dFluxdnutL = NULL;
+    delete[] dFluxdnutR;  dFluxdnutR = NULL;
+}
+
+// GMRESVis
+void NSSolverUnstruct::ComputeVisflux_FD(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+
+    int *leftCellofFace = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    RDouble **dqdx = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **dqdy = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **dqdz = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradPrimtiveVarZ"));
+
+    RDouble **dtdx = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradTemperatureX"));
+    RDouble **dtdy = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradTemperatureY"));
+    RDouble **dtdz = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradTemperatureZ"));
+
+    RDouble  **flux = faceProxy->GetFlux();
+
+    RDouble *deltaL = faceProxy->GetWeightL();
+    RDouble *deltaR = faceProxy->GetWeightR();
+
+    NSFaceValue *faceVariable = faceProxy->GetNSFaceValue();
+
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *vol  = grid->GetCellVolume();
+    
+    RDouble *xcc  = grid->GetCellCenterX();
+    RDouble *ycc  = grid->GetCellCenterY();
+    RDouble *zcc  = grid->GetCellCenterZ();
+
+    RDouble *xfc  = grid->GetFaceCenterX();
+    RDouble *yfc  = grid->GetFaceCenterY();
+    RDouble *zfc  = grid->GetFaceCenterZ();
+
+    RDouble **rhoDiffusion = faceVariable->GetRhoDS()->GetField();
+    RDouble **hintSpecies = faceVariable->GetHintS()->GetField();
+    RDouble **primitiveVariableFace = faceVariable->GetPrim()->GetField();
+    RDouble **tm     = faceVariable->GetT()->GetField();
+
+    RDouble *kCp     = faceVariable->GetKCP();
+    RDouble *viscousLaminarFace   = faceVariable->GetMUL();
+    RDouble *viscousTurbulenceFace = faceVariable->GetMUT();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    int nm = parameters->GetNSEquationNumber();
+
+    RDouble refReNumber  = parameters->GetRefReNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int nolstress = GlobalDataBase::GetIntParaFromDB("nolstress");
+    int nrokplus  = GlobalDataBase::GetIntParaFromDB("nrokplus");
+
+    RDouble skewnessAngle = parameters->GetSkewnessAngle();
+
+    RDouble **t                 = reinterpret_cast<RDouble **> (grid->GetDataPtr("t"));
+    RDouble **primitiveVariable = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *gama               = reinterpret_cast<RDouble *> (grid->GetDataPtr("gama"));
+    RDouble** dRdq              = reinterpret_cast<RDouble **> (grid->GetDataPtr("dRdq"));
+    RDouble** dDdP              = reinterpret_cast<RDouble **> (grid->GetDataPtr("dDdP"));
+
+    RDouble **qTurb = 0;
+    RDouble **aniss  = 0;
+    RDouble coefficientofStateEquation = gas->GetCoefficientOfStateEquation();
+
+
+    if (nrokplus > 0)
+    {
+        qTurb = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+        aniss  = reinterpret_cast<RDouble **> (grid->GetDataPtr("aniss"));
+    }
+
+    
+
+    RDouble *dqdxL = new RDouble[nEquation+nTemperatureModel];
+    RDouble *dqdyL = new RDouble[nEquation+nTemperatureModel];
+    RDouble *dqdzL = new RDouble[nEquation+nTemperatureModel];
+
+    RDouble *dqdxR = new RDouble[nEquation+nTemperatureModel];
+    RDouble *dqdyR = new RDouble[nEquation+nTemperatureModel];
+    RDouble *dqdzR = new RDouble[nEquation+nTemperatureModel];
+    RDouble *dgrad = new RDouble[nEquation+nTemperatureModel];
+
+    RDouble *fL         = new RDouble[nEquation+nTemperatureModel];
+    RDouble *fLpert     = new RDouble[nEquation+nTemperatureModel];
+    RDouble *fR         = new RDouble[nEquation+nTemperatureModel];
+    RDouble *fRpert     = new RDouble[nEquation+nTemperatureModel];
+    RDouble *fN         = new RDouble[nEquation]; // for neighbors
+    RDouble *fMid       = new RDouble[nEquation+nTemperatureModel];
+    RDouble *fMidpert   = new RDouble[nEquation+nTemperatureModel];
+    RDouble *fluxp      = new RDouble[nLaminar];
+
+
+    RDouble t1x, t1y, t1z, t2x, t2y, t2z;
+    RDouble txx,tyy,tzz;
+    RDouble txy,txz,tyz;
+    
+    bool isFineGrid = grid->IsFinestGrid();
+    
+    using namespace IDX;
+    RDouble  dFluxdpL[nEquation][nEquation];
+    RDouble  dFluxdpR[nEquation][nEquation];
+    RDouble  dGradtmp[nEquation][nEquation];
+    RDouble  dGradtmpBC[nEquation][nEquation];
+    RDouble  dDdPlocal[nEquation][nEquation];
+    RDouble  dFluxdgradxL[nEquation][nEquation+nTemperatureModel];
+    RDouble  dFluxdgradyL[nEquation][nEquation+nTemperatureModel];
+    RDouble  dFluxdgradzL[nEquation][nEquation+nTemperatureModel];
+    RDouble  dFluxdgradxR[nEquation][nEquation+nTemperatureModel];
+    RDouble  dFluxdgradyR[nEquation][nEquation+nTemperatureModel];
+    RDouble  dFluxdgradzR[nEquation][nEquation+nTemperatureModel];
+    RDouble  dfpert;
+    RDouble  dgradpert;
+    RDouble  perturbScale = 1e-6;
+
+    vector<int>* neighborCells = grid->GMRESGetNeighborCells();
+    vector<int>* neighborFaces = grid->GMRESGetNeighborFaces();
+    vector<int>* neighborLR = grid->GMRESGetNeighborLR();
+
+    RDouble** dqdcvL= new RDouble*[nEquation];
+    RDouble** dqdcvR= new RDouble*[nEquation];
+    RDouble** dqdcvN= new RDouble*[nEquation];  // dqdcv for neighbors
+    RDouble** dgraddqx = new RDouble*[nEquation+nTemperatureModel];
+    RDouble** dgraddqy = new RDouble*[nEquation+nTemperatureModel];
+    RDouble** dgraddqz = new RDouble*[nEquation+nTemperatureModel];
+
+    for(int indexI=0; indexI < nEquation; indexI++)
+    {
+        dqdcvL[indexI]      = new RDouble[nEquation];
+        dqdcvR[indexI]      = new RDouble[nEquation];
+        dqdcvN[indexI]      = new RDouble[nEquation];
+        dgraddqx[indexI]    = new RDouble[nEquation];
+        dgraddqy[indexI]    = new RDouble[nEquation];
+        dgraddqz[indexI]    = new RDouble[nEquation];
+        
+        for(int indexJ =0; indexJ < nEquation; indexJ ++)
+        {
+            dqdcvL[indexI][indexJ] = 0.0;
+            dqdcvR[indexI][indexJ] = 0.0;
+            dqdcvN[indexI][indexJ] = 0.0;
+        }
+    }
+    dgraddqx[nEquation]    = new RDouble[nEquation];
+    dgraddqy[nEquation]    = new RDouble[nEquation];
+    dgraddqz[nEquation]    = new RDouble[nEquation];
+
+    int nMid;
+        // GMRESBoundary
+     if (localStart >= nBoundFace)
+     {
+         nMid = localStart;  // a bug 01.07
+     }
+     else if (localEnd <= nBoundFace)  // add else 
+     {
+         //! If they are all boundary faces.
+         nMid = localEnd;
+     }
+     else
+     {
+         //! Part of them are boundary faces.
+         nMid = nBoundFace;
+     }
+    
+    
+
+    // boundary faces
+    for (int iFace = localStart; iFace < nMid; ++ iFace)
+    {
+        int le = leftCellofFace [iFace];
+        int re = rightCellofFace[iFace];
+        int jFace  = iFace - localStart;
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            fL[m]       = primitiveVariable[m][le];
+            fR[m]       = primitiveVariable[m][re];
+            fMid[m]     = primitiveVariableFace[m][jFace];
+            dqdxL[m]    = dqdx[m][le];
+            dqdyL[m]    = dqdy[m][le];
+            dqdzL[m]    = dqdz[m][le];
+            dqdxR[m]    = dqdx[m][re];
+            dqdyR[m]    = dqdy[m][re];
+            dqdzR[m]    = dqdz[m][re];
+        }
+        fL[nEquation]           = t[ITT][le];
+        fLpert[nEquation]       = t[ITT][le];
+        fR[nEquation]           = t[ITT][re];
+        fRpert[nEquation]       = t[ITT][re];
+        fMid[nEquation]         = tm[ITT][jFace];
+        fMidpert[nEquation]     = tm[ITT][jFace];
+        dqdxL[nEquation]        = dtdx[ITT][le];
+        dqdyL[nEquation]        = dtdy[ITT][le];
+        dqdzL[nEquation]        = dtdz[ITT][le];
+        dqdxR[nEquation]        = dtdx[ITT][re];
+        dqdyR[nEquation]        = dtdy[ITT][re];
+        dqdzR[nEquation]        = dtdz[ITT][re];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            flux[m][jFace] = fluxp[m];
+        }
+
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        int bcType = bcRegion->GetBCType();
+
+        // for solid walls, primitiveVariableFace[IU,IV,IW][jFace] = 0
+        if (bcType == PHENGLEI::SOLID_SURFACE)
+        {
+        
+            // perturb the density of the left cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fLpert[index]   = fL[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fLpert[IR]          *=  (1.0 + perturbScale);
+            fLpert[nEquation]   =   fLpert[IP]/(coefficientofStateEquation * fLpert[IR]);
+            dfpert              =   fLpert[IR] - fL[IR];
+            fMidpert[IR]        =   half * (fLpert[IR]+fR[IR]);
+            fMidpert[nEquation] =   half * (fLpert[nEquation]+fR[nEquation]);
+
+            Cal_GMRES_Visflux(fLpert, fR, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpL[m][IR] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+            // perturb the u of the left cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fLpert[index]   = fL[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fLpert[nEquation]   =   fL[nEquation];
+            fMidpert[nEquation] =   half * (fLpert[nEquation]+fR[nEquation]);
+            fLpert[IU]          +=  perturbScale;
+            dfpert              =   fLpert[IU] - fL[IU];
+            // fMidpert[IU]        =   half * (fLpert[IU]+fR[IU]);
+
+            Cal_GMRES_Visflux(fLpert, fR, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpL[m][IU] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+            // perturb the v of the left cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fLpert[index]   = fL[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fLpert[nEquation]   =   fL[nEquation];
+            fMidpert[nEquation] =   half * (fLpert[nEquation]+fR[nEquation]);
+            fLpert[IV]          +=  perturbScale;
+            dfpert              =   fLpert[IV] - fL[IV];
+            // fMidpert[IV]        =   half * (fLpert[IV]+fR[IV]);
+
+            Cal_GMRES_Visflux(fLpert, fR, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpL[m][IV] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+            // perturb the w of the left cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fLpert[index]   = fL[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fLpert[nEquation]   =   fL[nEquation];
+            fMidpert[nEquation] =   half * (fLpert[nEquation]+fR[nEquation]);
+            fLpert[IW]          +=  perturbScale;
+            dfpert              =   fLpert[IW] - fL[IW];
+            // fMidpert[IW]        =   half * (fLpert[IW]+fR[IW]);
+
+            Cal_GMRES_Visflux(fLpert, fR, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpL[m][IW] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+
+            // perturb the pressure of the left cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fLpert[index]   = fL[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fLpert[IP]          *=  (1.0 + perturbScale);
+            fLpert[nEquation]   =   fLpert[IP]/(coefficientofStateEquation * fLpert[IR]);
+            dfpert              =   fLpert[IP] - fL[IP];
+            fMidpert[IP]        =   half * (fLpert[IP]+fR[IP]);
+            fMidpert[nEquation] =   half * (fLpert[nEquation]+fR[nEquation]);
+
+            Cal_GMRES_Visflux(fLpert, fR, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpL[m][IP] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+
+            // perturb the density of the right cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fRpert[index]   = fR[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fRpert[IR]          *=  (1.0 + perturbScale);
+            fRpert[nEquation]   =   fRpert[IP]/(coefficientofStateEquation * fRpert[IR]);
+            dfpert              =   fRpert[IR] - fR[IR];
+            fMidpert[IR]        =   half * (fL[IR]+fRpert[IR]);
+            fMidpert[nEquation] =   half * (fL[nEquation]+fRpert[nEquation]);
+
+            Cal_GMRES_Visflux(fL, fRpert, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpR[m][IR] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+            // perturb the u of the right cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fRpert[index]   = fR[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fRpert[nEquation]   =   fR[nEquation];
+            fMidpert[nEquation] =   half * (fL[nEquation]+fRpert[nEquation]);
+            fRpert[IU]          +=  perturbScale;
+            dfpert              =   fRpert[IU] - fR[IU];
+            // fMidpert[IU]        =   half * (fL[IU]+fRpert[IU]);
+
+            Cal_GMRES_Visflux(fL, fRpert, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpR[m][IU] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+            // perturb the v of the right cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fRpert[index]   = fR[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fRpert[nEquation]   =   fR[nEquation];
+            fMidpert[nEquation] =   half * (fL[nEquation]+fRpert[nEquation]);
+            fRpert[IV]          +=  perturbScale;
+            dfpert              =   fRpert[IV] - fR[IV];
+            // fMidpert[IV]        =   half * (fL[IV]+fRpert[IV]);
+
+            Cal_GMRES_Visflux(fL, fRpert, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpR[m][IV] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+            // perturb the w of the right cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fRpert[index]   = fR[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fRpert[nEquation]   =   fR[nEquation];
+            fMidpert[nEquation] =   half * (fL[nEquation]+fRpert[nEquation]);
+            fRpert[IW]          +=  perturbScale;
+            dfpert              =   fRpert[IW] - fR[IW];
+            // fMidpert[IW]        =   half * (fL[IW]+fRpert[IW]);
+
+            Cal_GMRES_Visflux(fL, fRpert, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpR[m][IW] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+
+            // perturb the pressure of the right cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fRpert[index]   = fR[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fRpert[IP]          *=  (1.0 + perturbScale);
+            fRpert[nEquation]   =   fRpert[IP]/(coefficientofStateEquation * fRpert[IR]);
+            dfpert              =   fRpert[IP] - fR[IP];
+            fMidpert[IP]        =   half * (fL[IP]+fRpert[IP]);
+            fMidpert[nEquation] =   half * (fL[nEquation]+fRpert[nEquation]);
+
+            Cal_GMRES_Visflux(fL, fRpert, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpR[m][IP] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+        }
+        else
+        {
+            // perturb the density of the left cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fLpert[index]   = fL[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fLpert[IR]          *=  (1.0 + perturbScale);
+            fLpert[nEquation]   =   fLpert[IP]/(coefficientofStateEquation * fLpert[IR]);
+            dfpert              =   fLpert[IR] - fL[IR];
+            fMidpert[IR]        =   half * (fLpert[IR]+fR[IR]);
+            fMidpert[nEquation] =   half * (fLpert[nEquation]+fR[nEquation]);
+
+            Cal_GMRES_Visflux(fLpert, fR, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpL[m][IR] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+            // perturb the u of the left cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fLpert[index]   = fL[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fLpert[nEquation]   =   fL[nEquation];
+            fMidpert[nEquation] =   half * (fLpert[nEquation]+fR[nEquation]);
+            fLpert[IU]          +=  perturbScale;
+            dfpert              =   fLpert[IU] - fL[IU];
+            fMidpert[IU]        =   half * (fLpert[IU]+fR[IU]);
+
+            Cal_GMRES_Visflux(fLpert, fR, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpL[m][IU] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+            // perturb the v of the left cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fLpert[index]   = fL[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fLpert[nEquation]   =   fL[nEquation];
+            fMidpert[nEquation] =   half * (fLpert[nEquation]+fR[nEquation]);
+            fLpert[IV]          +=  perturbScale;
+            dfpert              =   fLpert[IV] - fL[IV];
+            fMidpert[IV]        =   half * (fLpert[IV]+fR[IV]);
+
+            Cal_GMRES_Visflux(fLpert, fR, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpL[m][IV] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+            // perturb the w of the left cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fLpert[index]   = fL[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fLpert[nEquation]   =   fL[nEquation];
+            fMidpert[nEquation] =   half * (fLpert[nEquation]+fR[nEquation]);
+            fLpert[IW]          +=  perturbScale;
+            dfpert              =   fLpert[IW] - fL[IW];
+            fMidpert[IW]        =   half * (fLpert[IW]+fR[IW]);
+
+            Cal_GMRES_Visflux(fLpert, fR, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpL[m][IW] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+
+            // perturb the pressure of the left cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fLpert[index]   = fL[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fLpert[IP]          *=  (1.0 + perturbScale);
+            fLpert[nEquation]   =   fLpert[IP]/(coefficientofStateEquation * fLpert[IR]);
+            dfpert              =   fLpert[IP] - fL[IP];
+            fMidpert[IP]        =   half * (fLpert[IP]+fR[IP]);
+            fMidpert[nEquation] =   half * (fLpert[nEquation]+fR[nEquation]);
+
+            Cal_GMRES_Visflux(fLpert, fR, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpL[m][IP] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+
+            // perturb the density of the right cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fRpert[index]   = fR[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fRpert[IR]          *=  (1.0 + perturbScale);
+            fRpert[nEquation]   =   fRpert[IP]/(coefficientofStateEquation * fRpert[IR]);
+            dfpert              =   fRpert[IR] - fR[IR];
+            fMidpert[IR]        =   half * (fL[IR]+fRpert[IR]);
+            fMidpert[nEquation] =   half * (fL[nEquation]+fRpert[nEquation]);
+
+            Cal_GMRES_Visflux(fL, fRpert, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpR[m][IR] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+            // perturb the u of the right cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fRpert[index]   = fR[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fRpert[nEquation]   =   fR[nEquation];
+            fMidpert[nEquation] =   half * (fL[nEquation]+fRpert[nEquation]);
+            fRpert[IU]          +=  perturbScale;
+            dfpert              =   fRpert[IU] - fR[IU];
+            fMidpert[IU]        =   half * (fL[IU]+fRpert[IU]);
+
+            Cal_GMRES_Visflux(fL, fRpert, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpR[m][IU] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+            // perturb the v of the right cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fRpert[index]   = fR[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fRpert[nEquation]   =   fR[nEquation];
+            fMidpert[nEquation] =   half * (fL[nEquation]+fRpert[nEquation]);
+            fRpert[IV]          +=  perturbScale;
+            dfpert              =   fRpert[IV] - fR[IV];
+            fMidpert[IV]        =   half * (fL[IV]+fRpert[IV]);
+
+            Cal_GMRES_Visflux(fL, fRpert, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpR[m][IV] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+            // perturb the w of the right cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fRpert[index]   = fR[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fRpert[nEquation]   =   fR[nEquation];
+            fMidpert[nEquation] =   half * (fL[nEquation]+fRpert[nEquation]);
+            fRpert[IW]          +=  perturbScale;
+            dfpert              =   fRpert[IW] - fR[IW];
+            fMidpert[IW]        =   half * (fL[IW]+fRpert[IW]);
+
+            Cal_GMRES_Visflux(fL, fRpert, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpR[m][IW] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+
+
+            // perturb the pressure of the right cell of the face
+            for(int index = 0; index < nEquation; index++)
+            {
+                fRpert[index]   = fR[index];
+                fMidpert[index] = fMid[index];  
+            }
+            fRpert[IP]          *=  (1.0 + perturbScale);
+            fRpert[nEquation]   =   fRpert[IP]/(coefficientofStateEquation * fRpert[IR]);
+            dfpert              =   fRpert[IP] - fR[IP];
+            fMidpert[IP]        =   half * (fL[IP]+fRpert[IP]);
+            fMidpert[nEquation] =   half * (fL[nEquation]+fRpert[nEquation]);
+
+            Cal_GMRES_Visflux(fL, fRpert, fMidpert, dqdxL, dqdyL, dqdzL, 
+                              dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                              gridIn, faceProxy);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dFluxdpR[m][IP] = (fluxp[m] - flux[m][jFace])/dfpert;
+            }
+        }
+        
+        // assemble the matrix
+        // contributions from the bc
+        int indexre = (re-nTotalCell)*nEquation;
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dDdPlocal[indexI][indexJ] = dDdP[indexI][indexre+indexJ];
+            }
+        }
+
+        // GMRESPV , obtain the dqdcv for the left cell
+        gas->dPrimitive2dConservative(fL,gama[le],dqdcvL);
+
+        // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+        // then minus to the corresponding location in dRdq.
+        int indexf = re * nEquation; // first index
+        int indexs = le * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] -= dFluxdpL[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+                }
+            }
+        }
+
+        // contributions from the bc, 
+        // dFluxdpL = dFluxdpL + dFluxdPR*dDdPlocal
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dFluxdpL[indexI][indexJ]  += dFluxdpR[indexI][indexK]*
+                                                dDdPlocal[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = le * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] += dFluxdpL[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+                }
+            }
+        }
+
+         // GMRESPV , obtain the dqdcv for the right cell
+        gas->dPrimitive2dConservative(fR,gama[re],dqdcvR);
+
+        // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+        // then minus to the corresponding location in dRdq.
+        indexf = re * nEquation; // first index
+        indexs = re * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] -= dFluxdpR[indexI][indexK]*
+                                                             dqdcvR[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = re * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] += dFluxdpR[indexI][indexK]*
+                                                             dqdcvR[indexK][indexJ];
+                }
+            }
+        }
+
+
+        // considering the perturbation of the gradient in the flux calculation
+        // perturb the drhodx of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxL[index];
+        }
+        dgrad[nEquation]    =   dqdxL[nEquation];
+        dgrad[IR]           +=  perturbScale;
+        dgradpert           =   dgrad[IR] - dqdxL[IR];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dgrad, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxL[m][IR] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        
+        // perturb the dudx of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxL[index];
+        }
+        dgrad[nEquation]    =   dqdxL[nEquation];
+        dgrad[IU]           +=  perturbScale;
+        dgradpert           =   dgrad[IU] - dqdxL[IU];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dgrad, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxL[m][IU] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dvdx of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxL[index];
+        }
+        dgrad[nEquation]    =   dqdxL[nEquation];
+        dgrad[IV]           +=  perturbScale;
+        dgradpert           =   dgrad[IV] - dqdxL[IV];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dgrad, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxL[m][IV] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dwdx of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxL[index];
+        }
+        dgrad[nEquation]    =   dqdxL[nEquation];
+        dgrad[IW]           +=  perturbScale;
+        dgradpert           =   dgrad[IW] - dqdxL[IW];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dgrad, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxL[m][IW] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dPdx of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxL[index];
+        }
+        dgrad[nEquation]    =   dqdxL[nEquation];
+        dgrad[IP]           +=  perturbScale;
+        dgradpert           =   dgrad[IP] - dqdxL[IP];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dgrad, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxL[m][IP] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dTdx of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxL[index];
+        }
+        dgrad[nEquation]   =   dqdxL[nEquation];
+        dgrad[nEquation]   +=  perturbScale;
+        dgradpert          =   dgrad[nEquation] - dqdxL[nEquation];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dgrad, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxL[m][nEquation] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the drhody of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyL[index];
+        }
+        dgrad[nEquation]    =   dqdyL[nEquation];
+        dgrad[IR]           +=  perturbScale;
+        dgradpert           =   dgrad[IR] - dqdyL[IR];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dgrad, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyL[m][IR] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dudy of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyL[index];
+        }
+        dgrad[nEquation]    =   dqdyL[nEquation];
+        dgrad[IU]           +=  perturbScale;
+        dgradpert           =   dgrad[IU] - dqdyL[IU];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dgrad, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyL[m][IU] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dvdy of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyL[index];
+        }
+        dgrad[nEquation]    =   dqdyL[nEquation];
+        dgrad[IV]           +=  perturbScale;
+        dgradpert           =   dgrad[IV] - dqdyL[IV];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dgrad, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyL[m][IV] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dwdy of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyL[index];
+        }
+        dgrad[nEquation]    =   dqdyL[nEquation];
+        dgrad[IW]           +=  perturbScale;
+        dgradpert           =   dgrad[IW] - dqdyL[IW];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dgrad, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyL[m][IW] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        
+        // perturb the dPdy of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyL[index];
+        }
+        dgrad[nEquation]    =   dqdyL[nEquation];
+        dgrad[IP]           +=  perturbScale;
+        dgradpert           =   dgrad[IP] - dqdyL[IP];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dgrad, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyL[m][IP] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dTdy of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyL[index];
+        }
+        dgrad[nEquation]    =   dqdyL[nEquation];
+        dgrad[nEquation]    +=  perturbScale;
+        dgradpert           =   dgrad[nEquation] - dqdyL[nEquation];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dgrad, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyL[m][nEquation] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the drhodz of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzL[index];
+        }
+        dgrad[nEquation]    =   dqdzL[nEquation];
+        dgrad[IR]           +=  perturbScale;
+        dgradpert           =   dgrad[IR] - dqdzL[IR];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dgrad, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzL[m][IR] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dudz of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzL[index];
+        }
+        dgrad[nEquation]    =   dqdzL[nEquation];
+        dgrad[IU]           +=  perturbScale;
+        dgradpert           =   dgrad[IU] - dqdzL[IU];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dgrad, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzL[m][IU] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dvdz of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzL[index];
+        }
+        dgrad[nEquation]    =   dqdzL[nEquation];
+        dgrad[IV]           +=  perturbScale;
+        dgradpert           =   dgrad[IV] - dqdzL[IV];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dgrad, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzL[m][IV] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dwdz of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzL[index];
+        }
+        dgrad[nEquation]    =   dqdzL[nEquation];
+        dgrad[IW]           +=  perturbScale;
+        dgradpert           =   dgrad[IW] - dqdzL[IW];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dgrad, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzL[m][IW] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dPdz of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzL[index];
+        }
+        dgrad[nEquation]    =   dqdzL[nEquation];
+        dgrad[IP]           +=  perturbScale;
+        dgradpert           =   dgrad[IP] - dqdzL[IP];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dgrad, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzL[m][IP] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dTdz of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzL[index];
+        }
+        dgrad[nEquation]    =   dqdzL[nEquation];
+        dgrad[nEquation]    +=  perturbScale;
+        dgradpert           =   dgrad[nEquation] - dqdzL[nEquation];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dgrad, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzL[m][nEquation] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the drhodx of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxR[index];
+        }
+        dgrad[nEquation]    =   dqdxR[nEquation];
+        dgrad[IR]           +=  perturbScale;
+        dgradpert           =   dgrad[IR] - dqdxR[IR];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dgrad, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxR[m][IR] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dudx of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxR[index];
+        }
+        dgrad[nEquation]    =   dqdxR[nEquation];
+        dgrad[IU]           +=  perturbScale;
+        dgradpert           =   dgrad[IU] - dqdxR[IU];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dgrad, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxR[m][IU] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dvdx of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxR[index];
+        }
+        dgrad[nEquation]    =   dqdxR[nEquation];
+        dgrad[IV]           +=  perturbScale;
+        dgradpert           =   dgrad[IV] - dqdxR[IV];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dgrad, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxR[m][IV] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        
+        // perturb the dwdx of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxR[index];
+        }
+        dgrad[nEquation]    =   dqdxR[nEquation];
+        dgrad[IW]           +=  perturbScale;
+        dgradpert           =   dgrad[IW] - dqdxR[IW];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dgrad, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxR[m][IW] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dPdx of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxR[index];
+        }
+        dgrad[nEquation]    =   dqdxR[nEquation];
+        dgrad[IP]           +=  perturbScale;
+        dgradpert           =   dgrad[IP] - dqdxR[IP];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dgrad, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxR[m][IP] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dTdx of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxR[index];
+        }
+        dgrad[nEquation]    =   dqdxR[nEquation];
+        dgrad[nEquation]    +=  perturbScale;
+        dgradpert           =   dgrad[nEquation] - dqdxR[nEquation];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dgrad, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxR[m][nEquation] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the drhody of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyR[index];
+        }
+        dgrad[nEquation]    =   dqdyR[nEquation];
+        dgrad[IR]           +=  perturbScale;
+        dgradpert           =   dgrad[IR] - dqdyR[IR];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dgrad, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyR[m][IR] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dudy of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyR[index];
+        }
+        dgrad[nEquation]    =   dqdyR[nEquation];
+        dgrad[IU]           +=  perturbScale;
+        dgradpert           =   dgrad[IU] - dqdyR[IU];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dgrad, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyR[m][IU] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dvdy of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyR[index];
+        }
+        dgrad[nEquation]    =   dqdyR[nEquation];
+        dgrad[IV]           +=  perturbScale;
+        dgradpert           =   dgrad[IV] - dqdyR[IV];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dgrad, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyR[m][IV] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dwdy of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyR[index];
+        }
+        dgrad[nEquation]    =   dqdyR[nEquation];
+        dgrad[IW]           +=  perturbScale;
+        dgradpert           =   dgrad[IW] - dqdyR[IW];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dgrad, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyR[m][IW] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dPdy of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyR[index];
+        }
+        dgrad[nEquation]    =   dqdyR[nEquation];
+        dgrad[IP]           +=  perturbScale;
+        dgradpert           =   dgrad[IP] - dqdyR[IP];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dgrad, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyR[m][IP] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dTdy of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyR[index];
+        }
+        dgrad[nEquation]    =   dqdyR[nEquation];
+        dgrad[nEquation]    +=  perturbScale;
+        dgradpert           =   dgrad[nEquation] - dqdyR[nEquation];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dgrad, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyR[m][nEquation] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the drhodz of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzR[index];
+        }
+        dgrad[nEquation]    =   dqdzR[nEquation];
+        dgrad[IR]           +=  perturbScale;
+        dgradpert           =   dgrad[IR] - dqdzR[IR];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dgrad, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzR[m][IR] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        
+        // perturb the dudz of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzR[index];
+        }
+        dgrad[nEquation]    =   dqdzR[nEquation];
+        dgrad[IU]           +=  perturbScale;
+        dgradpert           =   dgrad[IU] - dqdzR[IU];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dgrad, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzR[m][IU] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dvdz of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzR[index];
+        }
+        dgrad[nEquation]    =   dqdzR[nEquation];
+        dgrad[IV]           +=  perturbScale;
+        dgradpert           =   dgrad[IV] - dqdzR[IV];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dgrad, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzR[m][IV] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dwdz of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzR[index];
+        }
+        dgrad[nEquation]    =   dqdzR[nEquation];
+        dgrad[IW]           +=  perturbScale;
+        dgradpert           =   dgrad[IW] - dqdzR[IW];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dgrad, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzR[m][IW] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dPdz of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzR[index];
+        }
+        dgrad[nEquation]    =   dqdzR[nEquation];
+        dgrad[IP]           +=  perturbScale;
+        dgradpert           =   dgrad[IP] - dqdzR[IP];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dgrad, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzR[m][IP] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dTdz of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzR[index];
+        }
+        dgrad[nEquation]    =   dqdzR[nEquation];
+        dgrad[nEquation]    +=  perturbScale;
+        dgradpert           =   dgrad[nEquation] - dqdzR[nEquation];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dgrad, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzR[m][nEquation] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        RDouble nxs         = xfn[iFace];
+        RDouble nys         = yfn[iFace];
+        RDouble nzs         = zfn[iFace];
+        RDouble ns          = area[iFace];
+        RDouble volume      = vol[re];
+        // dgradtmp = dfluxdgradxR*dgradRdqLx + dfluxdgradyR*dgradRdqLy + dfluxdgradzR*dgraddqLz
+        // dRdq[le][le] += dgradtmp*dqdcvL
+        gas->dGradient2dPrimitive(fL,-1,dgraddqx, 'x', nxs, nys,nzs,ns,volume);
+        gas->dGradient2dPrimitive(fL,-1,dgraddqy, 'y', nxs, nys,nzs,ns,volume);
+        gas->dGradient2dPrimitive(fL,-1,dgraddqz, 'z', nxs, nys,nzs,ns,volume);
+
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dGradtmp[indexI][indexJ] = 0;
+                
+                for(int indexK=0; indexK < (nEquation+1); indexK++)
+                {
+                    dGradtmp[indexI][indexJ] += dFluxdgradxR[indexI][indexK]*
+                                                             dgraddqx[indexK][indexJ];
+                    dGradtmp[indexI][indexJ] += dFluxdgradyR[indexI][indexK]*
+                                                             dgraddqy[indexK][indexJ];
+                    dGradtmp[indexI][indexJ] += dFluxdgradzR[indexI][indexK]*
+                                                             dgraddqz[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dGradtmp by right multiplying the dqdcvL,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = le * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] += dGradtmp[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+                }
+            }
+        }
+
+
+        // dgradtmp = dfluxdgradxR*dgradRdqLx + dfluxdgradyR*dgradRdqLy + dfluxdgradzR*dgraddqLz
+        // dRdq[re][le] += dgradtmp*dqdcvL
+        indexf = re * nEquation; // first index
+        indexs = le * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] -= dGradtmp[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+                }
+            }
+        }
+
+        nxs         = xfn[iFace];
+        nys         = yfn[iFace];
+        nzs         = zfn[iFace];
+        ns          = area[iFace];
+        volume      = vol[le];
+        // dgradtmp = dfluxdgradxL*dgradLdqRx + dfluxdgradyL*dgradLdqRy + dfluxdgradzL*dgradLdqRz
+        // dRdq[le][re] += dgradtmp*dqdcvL
+        gas->dGradient2dPrimitive(fR,1,dgraddqx, 'x', nxs, nys,nzs,ns,volume);
+        gas->dGradient2dPrimitive(fR,1,dgraddqy, 'y', nxs, nys,nzs,ns,volume);
+        gas->dGradient2dPrimitive(fR,1,dgraddqz, 'z', nxs, nys,nzs,ns,volume);
+
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dGradtmp[indexI][indexJ] = 0;
+                
+                for(int indexK=0; indexK < (nEquation+1); indexK++)
+                {
+                    dGradtmp[indexI][indexJ] += dFluxdgradxL[indexI][indexK]*
+                                                             dgraddqx[indexK][indexJ];
+                    dGradtmp[indexI][indexJ] += dFluxdgradyL[indexI][indexK]*
+                                                             dgraddqy[indexK][indexJ];
+                    dGradtmp[indexI][indexJ] += dFluxdgradzL[indexI][indexK]*
+                                                             dgraddqz[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dGradtmp by right multiplying the dqdcvL,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = re * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] += dGradtmp[indexI][indexK]*
+                                                             dqdcvR[indexK][indexJ];
+                }
+            }
+        }
+
+
+        // dgradtmp = dfluxdgradxL*dgradLdqRx + dfluxdgradyL*dgradLdqRy + dfluxdgradzL*dgradLdqRz
+        // dRdq[re][re] += dgradtmp*dqdcvL
+        indexf = re * nEquation; // first index
+        indexs = re * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] -= dGradtmp[indexI][indexK]*
+                                                             dqdcvR[indexK][indexJ];
+                }
+            }
+        }
+
+        // contributions from the bc, 
+        // dFluxdPR*dDdPlocal
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dGradtmpBC[indexI][indexJ] = 0.0;
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dGradtmpBC[indexI][indexJ]  += dGradtmp[indexI][indexK]*
+                                                dDdPlocal[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dGradtmpBC by right multiplying the dqdcvL,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = le * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] += dGradtmpBC[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+                }
+            }
+        }
+
+
+        // the neighbors of the left cells
+        for(int index = 0; index < neighborCells[le].size(); index++)
+        {
+            int neighborIndex = neighborCells[le][index];
+
+            if(neighborIndex != re)
+            {
+                int Faceindex   = neighborFaces[le][index];
+                int sign        = neighborLR[le][index];
+                RDouble nxs     = xfn[Faceindex];
+                RDouble nys     = yfn[Faceindex];
+                RDouble nzs     = zfn[Faceindex];
+                RDouble ns      = area[Faceindex];
+                RDouble volume  = vol[le];
+                for(int m =0; m < nEquation; m++)
+                {
+                    fN[m] = primitiveVariable[m][neighborIndex];
+                }
+
+                gas->dPrimitive2dConservative(fN,gama[neighborIndex],dqdcvN);
+
+                gas->dGradient2dPrimitive(fN,sign, dgraddqx, 'x', nxs, nys,nzs,ns,volume);
+                gas->dGradient2dPrimitive(fN,sign, dgraddqy, 'y', nxs, nys,nzs,ns,volume);
+                gas->dGradient2dPrimitive(fN,sign, dgraddqz, 'z', nxs, nys,nzs,ns,volume);
+
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dGradtmp[indexI][indexJ] = 0;
+
+                        for(int indexK=0; indexK < (nEquation+1); indexK++)
+                        {
+                            dGradtmp[indexI][indexJ] += dFluxdgradxL[indexI][indexK]*
+                                                                     dgraddqx[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradyL[indexI][indexK]*
+                                                                     dgraddqy[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradzL[indexI][indexK]*
+                                                                     dgraddqz[indexK][indexJ];
+                        }
+                    }
+                }
+
+                int indexf  = le * nEquation; // first index
+                int indexs  = neighborIndex * nEquation; // second index
+                int indexf2 = re * nEquation; 
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            // dRL/dqLNeighbors += dRL/dGradL*dGradL/dqLNeighbors ===> dFluxdgradL*dgraddq
+                            dRdq[indexf+indexI][indexs+indexJ] += dGradtmp[indexI][indexK]*
+                                                                     dqdcvN[indexK][indexJ];
+                            
+                            // dRR/dqLNeighbors -= dRR/dGradL*dGradL/dqLNeighbors ===> dFluxdgradL*dgraddq
+                            dRdq[indexf2+indexI][indexs+indexJ] -= dGradtmp[indexI][indexK]*
+                                                                     dqdcvN[indexK][indexJ];
+                        }
+                    }
+                }            
+            }
+        }
+
+
+        // the neighbors of the right cells
+        
+        for(int index = 0; index < neighborCells[re].size(); index ++)
+        {
+            int neighborIndex = neighborCells[re][index];
+
+            if(neighborIndex != le)
+            {
+                int Faceindex       = neighborFaces[re][index];
+                int sign            = neighborLR[re][index];
+                RDouble nxs         = xfn[Faceindex];
+                RDouble nys         = yfn[Faceindex];
+                RDouble nzs         = zfn[Faceindex];
+                RDouble ns          = area[Faceindex];
+                RDouble volume      = vol[re];
+    
+                for(int m=0; m < nEquation; m++)
+                {
+                    fN[m] = primitiveVariable[m][neighborIndex];
+                }
+    
+                gas->dPrimitive2dConservative(fN,gama[neighborIndex],dqdcvN);
+    
+                gas->dGradient2dPrimitive(fN,sign,dgraddqx, 'x', nxs, nys,nzs,ns,volume);
+                gas->dGradient2dPrimitive(fN,sign,dgraddqy, 'y', nxs, nys,nzs,ns,volume);
+                gas->dGradient2dPrimitive(fN,sign,dgraddqz, 'z', nxs, nys,nzs,ns,volume);
+    
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dGradtmp[indexI][indexJ] = 0;
+                        for(int indexK=0; indexK < (nEquation+1); indexK++)
+                        {
+                            dGradtmp[indexI][indexJ] += dFluxdgradxR[indexI][indexK]*
+                                                                     dgraddqx[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradyR[indexI][indexK]*
+                                                                     dgraddqy[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradzR[indexI][indexK]*
+                                                                     dgraddqz[indexK][indexJ];
+                        }
+                    }
+                }
+    
+                int indexf  = le * nEquation; // first index
+                int indexs  = neighborIndex * nEquation; // second index
+                int indexf2 = re * nEquation; 
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                    
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            
+                            // dRL/dqRNeighbors += dRL/dGradR*dGradR/dqRNeighbors ===> dFluxdgradR*dgraddq
+                            dRdq[indexf+indexI][indexs+indexJ] += dGradtmp[indexI][indexK]*
+                                                                     dqdcvN[indexK][indexJ];
+
+
+                            // dRR/dqRNeighbors -= dRR/dGradR*dGradR/dqRNeighbors ===> dFluxdgradR*dgraddq
+                            dRdq[indexf2+indexI][indexs+indexJ] -= dGradtmp[indexI][indexK]*
+                                                                     dqdcvN[indexK][indexJ];
+                        }
+                    }
+                }
+            }   
+        }
+    }
+
+
+    // interior faces
+    for (int iFace = nMid; iFace < localEnd; ++ iFace)
+    {
+        int le = leftCellofFace [iFace];
+        int re = rightCellofFace[iFace];
+        int jFace  = iFace - localStart;
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            fL[m]       = primitiveVariable[m][le];
+            fR[m]       = primitiveVariable[m][re];
+            fMid[m]     = primitiveVariableFace[m][jFace];
+            dqdxL[m]    = dqdx[m][le];
+            dqdyL[m]    = dqdy[m][le];
+            dqdzL[m]    = dqdz[m][le];
+            dqdxR[m]    = dqdx[m][re];
+            dqdyR[m]    = dqdy[m][re];
+            dqdzR[m]    = dqdz[m][re];
+        }
+        fL[nEquation]           = t[ITT][le];
+        fLpert[nEquation]       = t[ITT][le];
+        fR[nEquation]           = t[ITT][re];
+        fRpert[nEquation]       = t[ITT][re];
+        fMid[nEquation]         = tm[ITT][jFace];
+        fMidpert[nEquation]     = tm[ITT][jFace];
+        dqdxL[nEquation]        = dtdx[ITT][le];
+        dqdyL[nEquation]        = dtdy[ITT][le];
+        dqdzL[nEquation]        = dtdz[ITT][le];
+        dqdxR[nEquation]        = dtdx[ITT][re];
+        dqdyR[nEquation]        = dtdy[ITT][re];
+        dqdzR[nEquation]        = dtdz[ITT][re];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            flux[m][jFace] = fluxp[m];
+        }
+
+
+        // perturb the density of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            fLpert[index]   = fL[index];
+            fMidpert[index] = fMid[index];  
+        }
+        fLpert[IR]          *=  (1.0 + perturbScale);
+        fLpert[nEquation]   =   fLpert[IP]/(coefficientofStateEquation * fLpert[IR]);
+        dfpert              =   fLpert[IR] - fL[IR];
+        fMidpert[IR]        =   half * (fLpert[IR]+fR[IR]);
+        fMidpert[nEquation] =   half * (fLpert[nEquation]+fR[nEquation]);
+        
+        Cal_GMRES_Visflux(fLpert, fR, fMidpert, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdpL[m][IR] = (fluxp[m] - flux[m][jFace])/dfpert;
+        }
+
+        // perturb the u of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            fLpert[index]   = fL[index];
+            fMidpert[index] = fMid[index];  
+        }
+        fLpert[nEquation]   =   fL[nEquation];
+        fMidpert[nEquation] =   half * (fLpert[nEquation]+fR[nEquation]);
+        fLpert[IU]          +=  perturbScale;
+        dfpert              =   fLpert[IU] - fL[IU];
+        fMidpert[IU]        =   half * (fLpert[IU]+fR[IU]);
+        
+        Cal_GMRES_Visflux(fLpert, fR, fMidpert, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdpL[m][IU] = (fluxp[m] - flux[m][jFace])/dfpert;
+        }
+
+        // perturb the v of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            fLpert[index]   = fL[index];
+            fMidpert[index] = fMid[index];  
+        }
+        fLpert[nEquation]   =   fL[nEquation];
+        fMidpert[nEquation] =   half * (fLpert[nEquation]+fR[nEquation]);
+        fLpert[IV]          +=  perturbScale;
+        dfpert              =   fLpert[IV] - fL[IV];
+        fMidpert[IV]        =   half * (fLpert[IV]+fR[IV]);
+        
+        Cal_GMRES_Visflux(fLpert, fR, fMidpert, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdpL[m][IV] = (fluxp[m] - flux[m][jFace])/dfpert;
+        }
+
+        // perturb the w of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            fLpert[index]   = fL[index];
+            fMidpert[index] = fMid[index];  
+        }
+        fLpert[nEquation]   =   fL[nEquation];
+        fMidpert[nEquation] =   half * (fLpert[nEquation]+fR[nEquation]);
+        fLpert[IW]          +=  perturbScale;
+        dfpert              =   fLpert[IW] - fL[IW];
+        fMidpert[IW]        =   half * (fLpert[IW]+fR[IW]);
+        
+        Cal_GMRES_Visflux(fLpert, fR, fMidpert, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdpL[m][IW] = (fluxp[m] - flux[m][jFace])/dfpert;
+        }
+
+
+        // perturb the pressure of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            fLpert[index]   = fL[index];
+            fMidpert[index] = fMid[index];  
+        }
+        fLpert[IP]          *=  (1.0 + perturbScale);
+        fLpert[nEquation]   =   fLpert[IP]/(coefficientofStateEquation * fLpert[IR]);
+        dfpert              =   fLpert[IP] - fL[IP];
+        fMidpert[IP]        =   half * (fLpert[IP]+fR[IP]);
+        fMidpert[nEquation] =   half * (fLpert[nEquation]+fR[nEquation]);
+        
+        Cal_GMRES_Visflux(fLpert, fR, fMidpert, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdpL[m][IP] = (fluxp[m] - flux[m][jFace])/dfpert;
+        }
+
+
+        // perturb the density of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            fRpert[index]   = fR[index];
+            fMidpert[index] = fMid[index];  
+        }
+        fRpert[IR]          *=  (1.0 + perturbScale);
+        fRpert[nEquation]   =   fRpert[IP]/(coefficientofStateEquation * fRpert[IR]);
+        dfpert              =   fRpert[IR] - fR[IR];
+        fMidpert[IR]        =   half * (fL[IR]+fRpert[IR]);
+        fMidpert[nEquation] =   half * (fL[nEquation]+fRpert[nEquation]);
+        
+        Cal_GMRES_Visflux(fL, fRpert, fMidpert, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdpR[m][IR] = (fluxp[m] - flux[m][jFace])/dfpert;
+        }
+
+        // perturb the u of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            fRpert[index]   = fR[index];
+            fMidpert[index] = fMid[index];  
+        }
+        fRpert[nEquation]   =   fR[nEquation];
+        fMidpert[nEquation] =   half * (fL[nEquation]+fRpert[nEquation]);
+        fRpert[IU]          +=  perturbScale;
+        dfpert              =   fRpert[IU] - fR[IU];
+        fMidpert[IU]        =   half * (fL[IU]+fRpert[IU]);
+        
+        Cal_GMRES_Visflux(fL, fRpert, fMidpert, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdpR[m][IU] = (fluxp[m] - flux[m][jFace])/dfpert;
+        }
+
+        // perturb the v of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            fRpert[index]   = fR[index];
+            fMidpert[index] = fMid[index];  
+        }
+        fRpert[nEquation]   =   fR[nEquation];
+        fMidpert[nEquation] =   half * (fL[nEquation]+fRpert[nEquation]);
+        fRpert[IV]          +=  perturbScale;
+        dfpert              =   fRpert[IV] - fR[IV];
+        fMidpert[IV]        =   half * (fL[IV]+fRpert[IV]);
+        
+        Cal_GMRES_Visflux(fL, fRpert, fMidpert, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdpR[m][IV] = (fluxp[m] - flux[m][jFace])/dfpert;
+        }
+
+        // perturb the w of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            fRpert[index]   = fR[index];
+            fMidpert[index] = fMid[index];  
+        }
+        fRpert[nEquation]   =   fR[nEquation];
+        fMidpert[nEquation] =   half * (fL[nEquation]+fRpert[nEquation]);
+        fRpert[IW]          +=  perturbScale;
+        dfpert              =   fRpert[IW] - fR[IW];
+        fMidpert[IW]        =   half * (fL[IW]+fRpert[IW]);
+        
+        Cal_GMRES_Visflux(fL, fRpert, fMidpert, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdpR[m][IW] = (fluxp[m] - flux[m][jFace])/dfpert;
+        }
+
+
+        // perturb the pressure of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            fRpert[index]   = fR[index];
+            fMidpert[index] = fMid[index];  
+        }
+        fRpert[IP]          *=  (1.0 + perturbScale);
+        fRpert[nEquation]   =   fRpert[IP]/(coefficientofStateEquation * fRpert[IR]);
+        dfpert              =   fRpert[IP] - fR[IP];
+        fMidpert[IP]        =   half * (fL[IP]+fRpert[IP]);
+        fMidpert[nEquation] =   half * (fL[nEquation]+fRpert[nEquation]);
+        
+        Cal_GMRES_Visflux(fL, fRpert, fMidpert, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdpR[m][IP] = (fluxp[m] - flux[m][jFace])/dfpert;
+        }
+
+        
+        // GMRESPV , obtain the dqdcv for the left cell
+        gas->dPrimitive2dConservative(fL,gama[le],dqdcvL);
+
+        // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+        // then minus to the corresponding location in dRdq.
+        int indexf = re * nEquation; // first index
+        int indexs = le * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] -= dFluxdpL[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+                }
+            }
+        }
+
+        
+        // convert dFluxdpL to dFluxdcvL by right multiplying the dqdcvL,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = le * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] += dFluxdpL[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+                }
+            }
+        }
+
+         // GMRESPV , obtain the dqdcv for the right cell
+        gas->dPrimitive2dConservative(fR,gama[re],dqdcvR);
+
+        // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+        // then minus to the corresponding location in dRdq.
+        indexf = re * nEquation; // first index
+        indexs = re * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] -= dFluxdpR[indexI][indexK]*
+                                                             dqdcvR[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dFluxdpR to dFluxdcvR by right multiplying the dqdcvR,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = re * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] += dFluxdpR[indexI][indexK]*
+                                                             dqdcvR[indexK][indexJ];
+                }
+            }
+        }
+
+        
+        // considering the perturbation of the gradient in the flux calculation
+
+        // perturb the drhodx of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxL[index];
+        }
+        dgrad[nEquation]    =   dqdxL[nEquation];
+        dgrad[IR]           +=  perturbScale;
+        dgradpert           =   dgrad[IR] - dqdxL[IR];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dgrad, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxL[m][IR] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        
+        // perturb the dudx of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxL[index];
+        }
+        dgrad[nEquation]    =   dqdxL[nEquation];
+        dgrad[IU]           +=  perturbScale;
+        dgradpert           =   dgrad[IU] - dqdxL[IU];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dgrad, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxL[m][IU] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dvdx of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxL[index];
+        }
+        dgrad[nEquation]    =   dqdxL[nEquation];
+        dgrad[IV]           +=  perturbScale;
+        dgradpert           =   dgrad[IV] - dqdxL[IV];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dgrad, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxL[m][IV] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dwdx of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxL[index];
+        }
+        dgrad[nEquation]    =   dqdxL[nEquation];
+        dgrad[IW]           +=  perturbScale;
+        dgradpert           =   dgrad[IW] - dqdxL[IW];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dgrad, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxL[m][IW] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dPdx of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxL[index];
+        }
+        dgrad[nEquation]    =   dqdxL[nEquation];
+        dgrad[IP]           +=  perturbScale;
+        dgradpert           =   dgrad[IP] - dqdxL[IP];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dgrad, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxL[m][IP] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dTdx of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxL[index];
+        }
+        dgrad[nEquation]   =   dqdxL[nEquation];
+        dgrad[nEquation]   +=  perturbScale;
+        dgradpert          =   dgrad[nEquation] - dqdxL[nEquation];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dgrad, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxL[m][nEquation] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the drhody of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyL[index];
+        }
+        dgrad[nEquation]    =   dqdyL[nEquation];
+        dgrad[IR]           +=  perturbScale;
+        dgradpert           =   dgrad[IR] - dqdyL[IR];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dgrad, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyL[m][IR] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dudy of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyL[index];
+        }
+        dgrad[nEquation]    =   dqdyL[nEquation];
+        dgrad[IU]           +=  perturbScale;
+        dgradpert           =   dgrad[IU] - dqdyL[IU];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dgrad, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyL[m][IU] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dvdy of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyL[index];
+        }
+        dgrad[nEquation]    =   dqdyL[nEquation];
+        dgrad[IV]           +=  perturbScale;
+        dgradpert           =   dgrad[IV] - dqdyL[IV];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dgrad, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyL[m][IV] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dwdy of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyL[index];
+        }
+        dgrad[nEquation]    =   dqdyL[nEquation];
+        dgrad[IW]           +=  perturbScale;
+        dgradpert           =   dgrad[IW] - dqdyL[IW];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dgrad, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyL[m][IW] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        
+        // perturb the dPdy of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyL[index];
+        }
+        dgrad[nEquation]    =   dqdyL[nEquation];
+        dgrad[IP]           +=  perturbScale;
+        dgradpert           =   dgrad[IP] - dqdyL[IP];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dgrad, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyL[m][IP] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dTdy of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyL[index];
+        }
+        dgrad[nEquation]    =   dqdyL[nEquation];
+        dgrad[nEquation]    +=  perturbScale;
+        dgradpert           =   dgrad[nEquation] - dqdyL[nEquation];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dgrad, dqdzL, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyL[m][nEquation] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the drhodz of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzL[index];
+        }
+        dgrad[nEquation]    =   dqdzL[nEquation];
+        dgrad[IR]           +=  perturbScale;
+        dgradpert           =   dgrad[IR] - dqdzL[IR];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dgrad, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzL[m][IR] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dudz of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzL[index];
+        }
+        dgrad[nEquation]    =   dqdzL[nEquation];
+        dgrad[IU]           +=  perturbScale;
+        dgradpert           =   dgrad[IU] - dqdzL[IU];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dgrad, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzL[m][IU] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dvdz of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzL[index];
+        }
+        dgrad[nEquation]    =   dqdzL[nEquation];
+        dgrad[IV]           +=  perturbScale;
+        dgradpert           =   dgrad[IV] - dqdzL[IV];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dgrad, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzL[m][IV] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dwdz of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzL[index];
+        }
+        dgrad[nEquation]    =   dqdzL[nEquation];
+        dgrad[IW]           +=  perturbScale;
+        dgradpert           =   dgrad[IW] - dqdzL[IW];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dgrad, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzL[m][IW] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dPdz of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzL[index];
+        }
+        dgrad[nEquation]    =   dqdzL[nEquation];
+        dgrad[IP]           +=  perturbScale;
+        dgradpert           =   dgrad[IP] - dqdzL[IP];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dgrad, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzL[m][IP] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dTdz of the left cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzL[index];
+        }
+        dgrad[nEquation]    =   dqdzL[nEquation];
+        dgrad[nEquation]    +=  perturbScale;
+        dgradpert           =   dgrad[nEquation] - dqdzL[nEquation];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dgrad, 
+                          dqdxR, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzL[m][nEquation] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the drhodx of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxR[index];
+        }
+        dgrad[nEquation]    =   dqdxR[nEquation];
+        dgrad[IR]           +=  perturbScale;
+        dgradpert           =   dgrad[IR] - dqdxR[IR];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dgrad, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxR[m][IR] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dudx of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxR[index];
+        }
+        dgrad[nEquation]    =   dqdxR[nEquation];
+        dgrad[IU]           +=  perturbScale;
+        dgradpert           =   dgrad[IU] - dqdxR[IU];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dgrad, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxR[m][IU] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dvdx of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxR[index];
+        }
+        dgrad[nEquation]    =   dqdxR[nEquation];
+        dgrad[IV]           +=  perturbScale;
+        dgradpert           =   dgrad[IV] - dqdxR[IV];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dgrad, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxR[m][IV] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        
+        // perturb the dwdx of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxR[index];
+        }
+        dgrad[nEquation]    =   dqdxR[nEquation];
+        dgrad[IW]           +=  perturbScale;
+        dgradpert           =   dgrad[IW] - dqdxR[IW];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dgrad, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxR[m][IW] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dPdx of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxR[index];
+        }
+        dgrad[nEquation]    =   dqdxR[nEquation];
+        dgrad[IP]           +=  perturbScale;
+        dgradpert           =   dgrad[IP] - dqdxR[IP];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dgrad, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxR[m][IP] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dTdx of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdxR[index];
+        }
+        dgrad[nEquation]    =   dqdxR[nEquation];
+        dgrad[nEquation]    +=  perturbScale;
+        dgradpert           =   dgrad[nEquation] - dqdxR[nEquation];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dgrad, dqdyR, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradxR[m][nEquation] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the drhody of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyR[index];
+        }
+        dgrad[nEquation]    =   dqdyR[nEquation];
+        dgrad[IR]           +=  perturbScale;
+        dgradpert           =   dgrad[IR] - dqdyR[IR];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dgrad, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyR[m][IR] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dudy of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyR[index];
+        }
+        dgrad[nEquation]    =   dqdyR[nEquation];
+        dgrad[IU]           +=  perturbScale;
+        dgradpert           =   dgrad[IU] - dqdyR[IU];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dgrad, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyR[m][IU] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dvdy of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyR[index];
+        }
+        dgrad[nEquation]    =   dqdyR[nEquation];
+        dgrad[IV]           +=  perturbScale;
+        dgradpert           =   dgrad[IV] - dqdyR[IV];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dgrad, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyR[m][IV] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dwdy of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyR[index];
+        }
+        dgrad[nEquation]    =   dqdyR[nEquation];
+        dgrad[IW]           +=  perturbScale;
+        dgradpert           =   dgrad[IW] - dqdyR[IW];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dgrad, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyR[m][IW] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+
+        // perturb the dPdy of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyR[index];
+        }
+        dgrad[nEquation]    =   dqdyR[nEquation];
+        dgrad[IP]           +=  perturbScale;
+        dgradpert           =   dgrad[IP] - dqdyR[IP];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dgrad, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyR[m][IP] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        
+        // perturb the dTdy of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdyR[index];
+        }
+        dgrad[nEquation]    =   dqdyR[nEquation];
+        dgrad[nEquation]    +=  perturbScale;
+        dgradpert           =   dgrad[nEquation] - dqdyR[nEquation];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dgrad, dqdzR, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradyR[m][nEquation] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the drhodz of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzR[index];
+        }
+        dgrad[nEquation]    =   dqdzR[nEquation];
+        dgrad[IR]           +=  perturbScale;
+        dgradpert           =   dgrad[IR] - dqdzR[IR];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dgrad, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzR[m][IR] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        
+        // perturb the dudz of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzR[index];
+        }
+        dgrad[nEquation]    =   dqdzR[nEquation];
+        dgrad[IU]           +=  perturbScale;
+        dgradpert           =   dgrad[IU] - dqdzR[IU];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dgrad, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzR[m][IU] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dvdz of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzR[index];
+        }
+        dgrad[nEquation]    =   dqdzR[nEquation];
+        dgrad[IV]           +=  perturbScale;
+        dgradpert           =   dgrad[IV] - dqdzR[IV];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dgrad, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzR[m][IV] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dwdz of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzR[index];
+        }
+        dgrad[nEquation]    =   dqdzR[nEquation];
+        dgrad[IW]           +=  perturbScale;
+        dgradpert           =   dgrad[IW] - dqdzR[IW];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dgrad, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzR[m][IW] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dPdz of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzR[index];
+        }
+        dgrad[nEquation]    =   dqdzR[nEquation];
+        dgrad[IP]           +=  perturbScale;
+        dgradpert           =   dgrad[IP] - dqdzR[IP];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dgrad, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzR[m][IP] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+
+        // perturb the dTdz of the right cell of the face
+        for(int index = 0; index < nEquation; index++)
+        {
+            dgrad[index]   = dqdzR[index];
+        }
+        dgrad[nEquation]    =   dqdzR[nEquation];
+        dgrad[nEquation]    +=  perturbScale;
+        dgradpert           =   dgrad[nEquation] - dqdzR[nEquation];
+
+        Cal_GMRES_Visflux(fL, fR, fMid, dqdxL, dqdyL, dqdzL, 
+                          dqdxR, dqdyR, dgrad, iFace, jFace, fluxp, 
+                          gridIn, faceProxy);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dFluxdgradzR[m][nEquation] = (fluxp[m] - flux[m][jFace])/dgradpert;
+        }
+        
+        
+        RDouble nxs         = xfn[iFace];
+        RDouble nys         = yfn[iFace];
+        RDouble nzs         = zfn[iFace];
+        RDouble ns          = area[iFace];
+        RDouble volume      = vol[re];
+        // dgradtmp = dfluxdgradxR*dgradRdqLx + dfluxdgradyR*dgradRdqLy + dfluxdgradzR*dgraddqLz
+        // dRdq[le][le] += dgradtmp*dqdcvL
+        gas->dGradient2dPrimitive(fL,-1,dgraddqx, 'x', nxs, nys,nzs,ns,volume);
+        gas->dGradient2dPrimitive(fL,-1,dgraddqy, 'y', nxs, nys,nzs,ns,volume);
+        gas->dGradient2dPrimitive(fL,-1,dgraddqz, 'z', nxs, nys,nzs,ns,volume);
+
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dGradtmp[indexI][indexJ] = 0;
+                
+                for(int indexK=0; indexK < (nEquation+1); indexK++)
+                {
+                    dGradtmp[indexI][indexJ] += dFluxdgradxR[indexI][indexK]*
+                                                             dgraddqx[indexK][indexJ];
+                    dGradtmp[indexI][indexJ] += dFluxdgradyR[indexI][indexK]*
+                                                             dgraddqy[indexK][indexJ];
+                    dGradtmp[indexI][indexJ] += dFluxdgradzR[indexI][indexK]*
+                                                             dgraddqz[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dGradtmp by right multiplying the dqdcvL,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = le * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] += dGradtmp[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+                }
+            }
+        }
+
+
+        // dgradtmp = dfluxdgradxR*dgradRdqLx + dfluxdgradyR*dgradRdqLy + dfluxdgradzR*dgraddqLz
+        // dRdq[re][le] += dgradtmp*dqdcvL
+        indexf = re * nEquation; // first index
+        indexs = le * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] -= dGradtmp[indexI][indexK]*
+                                                             dqdcvL[indexK][indexJ];
+                }
+            }
+        }
+
+
+        nxs         = xfn[iFace];
+        nys         = yfn[iFace];
+        nzs         = zfn[iFace];
+        ns          = area[iFace];
+        volume      = vol[le];
+        // dgradtmp = dfluxdgradxL*dgradLdqRx + dfluxdgradyL*dgradLdqRy + dfluxdgradzL*dgradLdqRz
+        // dRdq[le][re] += dgradtmp*dqdcvL
+        gas->dGradient2dPrimitive(fR,1,dgraddqx, 'x', nxs, nys,nzs,ns,volume);
+        gas->dGradient2dPrimitive(fR,1,dgraddqy, 'y', nxs, nys,nzs,ns,volume);
+        gas->dGradient2dPrimitive(fR,1,dgraddqz, 'z', nxs, nys,nzs,ns,volume);
+
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                dGradtmp[indexI][indexJ] = 0;
+                
+                for(int indexK=0; indexK < (nEquation+1); indexK++)
+                {
+                    dGradtmp[indexI][indexJ] += dFluxdgradxL[indexI][indexK]*
+                                                             dgraddqx[indexK][indexJ];
+                    dGradtmp[indexI][indexJ] += dFluxdgradyL[indexI][indexK]*
+                                                             dgraddqy[indexK][indexJ];
+                    dGradtmp[indexI][indexJ] += dFluxdgradzL[indexI][indexK]*
+                                                             dgraddqz[indexK][indexJ];
+                }
+            }
+        }
+
+        // convert dGradtmp by right multiplying the dqdcvL,
+        // then add to the corresponding location in dRdq.
+        indexf = le * nEquation; // first index
+        indexs = re * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] += dGradtmp[indexI][indexK]*
+                                                             dqdcvR[indexK][indexJ];
+                }
+            }
+        }
+
+
+        // dgradtmp = dfluxdgradxL*dgradLdqRx + dfluxdgradyL*dgradLdqRy + dfluxdgradzL*dgradLdqRz
+        // dRdq[re][re] += dgradtmp*dqdcvL
+        indexf = re * nEquation; // first index
+        indexs = re * nEquation; // second index
+        for(int indexI=0; indexI < nEquation; indexI++)
+        {
+            for(int indexJ=0; indexJ < nEquation; indexJ++)
+            {
+                
+                for(int indexK=0; indexK < nEquation; indexK++)
+                {
+                    dRdq[indexf+indexI][indexs+indexJ] -= dGradtmp[indexI][indexK]*
+                                                             dqdcvR[indexK][indexJ];
+                }
+            }
+        }
+
+        
+        // the neighbors of the left cells
+        for(int index = 0; index < neighborCells[le].size(); index++)
+        {
+            int neighborIndex = neighborCells[le][index];
+
+            if(neighborIndex != re)
+            {
+                int Faceindex   = neighborFaces[le][index];
+                int sign        = neighborLR[le][index];
+                RDouble nxs     = xfn[Faceindex];
+                RDouble nys     = yfn[Faceindex];
+                RDouble nzs     = zfn[Faceindex];
+                RDouble ns      = area[Faceindex];
+                RDouble volume  = vol[le];
+
+                for(int m =0; m < nEquation; m++)
+                {
+                    fN[m] = primitiveVariable[m][neighborIndex];
+                }
+
+                gas->dPrimitive2dConservative(fN,gama[neighborIndex],dqdcvN);
+
+                gas->dGradient2dPrimitive(fN,sign,dgraddqx, 'x', nxs, nys,nzs,ns,volume);
+                gas->dGradient2dPrimitive(fN,sign,dgraddqy, 'y', nxs, nys,nzs,ns,volume);
+                gas->dGradient2dPrimitive(fN,sign,dgraddqz, 'z', nxs, nys,nzs,ns,volume);
+
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dGradtmp[indexI][indexJ] = 0;
+
+                        for(int indexK=0; indexK < (nEquation+1); indexK++)
+                        {
+                            dGradtmp[indexI][indexJ] += dFluxdgradxL[indexI][indexK]*
+                                                                     dgraddqx[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradyL[indexI][indexK]*
+                                                                     dgraddqy[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradzL[indexI][indexK]*
+                                                                     dgraddqz[indexK][indexJ];
+                        }
+                    }
+                }
+
+                int indexf  = le * nEquation; // first index
+                int indexs  = neighborIndex * nEquation; // second index
+                int indexf2 = re * nEquation; 
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            // dRL/dqLNeighbors += dRL/dGradL*dGradL/dqLNeighbors ===> dFluxdgradL*dgraddq
+                            dRdq[indexf+indexI][indexs+indexJ] += dGradtmp[indexI][indexK]*
+                                                                     dqdcvN[indexK][indexJ];
+                            
+                            // dRR/dqLNeighbors -= dRR/dGradL*dGradL/dqLNeighbors ===> dFluxdgradL*dgraddq
+                            dRdq[indexf2+indexI][indexs+indexJ] -= dGradtmp[indexI][indexK]*
+                                                                     dqdcvN[indexK][indexJ];
+                        }
+                    }
+                }            
+            }
+        }
+
+
+        // the neighbors of the right cells
+        
+        for(int index = 0; index < neighborCells[re].size(); index++)
+        {
+            int neighborIndex = neighborCells[re][index];
+
+            if(neighborIndex != le)
+            {
+                int Faceindex       = neighborFaces[re][index];
+                int sign            = neighborLR[re][index];
+                RDouble nxs         = xfn[Faceindex];
+                RDouble nys         = yfn[Faceindex];
+                RDouble nzs         = zfn[Faceindex];
+                RDouble ns          = area[Faceindex];
+                RDouble volume      = vol[re];
+    
+                for(int m=0; m < nEquation; m++)
+                {
+                    fN[m] = primitiveVariable[m][neighborIndex];
+                }
+    
+                gas->dPrimitive2dConservative(fN,gama[neighborIndex],dqdcvN);
+    
+                gas->dGradient2dPrimitive(fN,sign,dgraddqx, 'x', nxs, nys,nzs,ns,volume);
+                gas->dGradient2dPrimitive(fN,sign,dgraddqy, 'y', nxs, nys,nzs,ns,volume);
+                gas->dGradient2dPrimitive(fN,sign,dgraddqz, 'z', nxs, nys,nzs,ns,volume);
+    
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                        dGradtmp[indexI][indexJ] = 0;
+                        for(int indexK=0; indexK < (nEquation+1); indexK++)
+                        {
+                            dGradtmp[indexI][indexJ] += dFluxdgradxR[indexI][indexK]*
+                                                                     dgraddqx[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradyR[indexI][indexK]*
+                                                                     dgraddqy[indexK][indexJ];
+                            dGradtmp[indexI][indexJ] += dFluxdgradzR[indexI][indexK]*
+                                                                     dgraddqz[indexK][indexJ];
+                        }
+                    }
+                }
+    
+                int indexf  = le * nEquation; // first index
+                int indexs  = neighborIndex * nEquation; // second index
+                int indexf2 = re * nEquation; 
+                for(int indexI=0; indexI < nEquation; indexI++)
+                {
+                    for(int indexJ=0; indexJ < nEquation; indexJ++)
+                    {
+                    
+                        for(int indexK=0; indexK < nEquation; indexK++)
+                        {
+                            
+                            // dRL/dqRNeighbors += dRL/dGradR*dGradR/dqRNeighbors ===> dFluxdgradR*dgraddq
+                            dRdq[indexf+indexI][indexs+indexJ] += dGradtmp[indexI][indexK]*
+                                                                     dqdcvN[indexK][indexJ];
+
+
+                            // dRR/dqRNeighbors -= dRR/dGradR*dGradR/dqRNeighbors ===> dFluxdgradR*dgraddq
+                            dRdq[indexf2+indexI][indexs+indexJ] -= dGradtmp[indexI][indexK]*
+                                                                     dqdcvN[indexK][indexJ];
+                        }
+                    }
+                }
+            }   
+        }
+        
+        
+
+        // output convert matrix
+        // std::cout << "===================dgraddqx===========================\n";
+        // for(int indexI=0; indexI < nEquation+1; indexI++)
+        // {
+        //     
+        //     for(int indexJ =0; indexJ < nEquation; indexJ ++)
+        //     {
+        //        std::cout << dgraddqx[indexI][indexJ] << " ";
+        //     }
+        //     std::cout << "\n";
+        // }
+        // std::cout << "===================dgraddqy===========================\n";
+        // for(int indexI=0; indexI < nEquation+1; indexI++)
+        // {
+        //     
+        //     for(int indexJ =0; indexJ < nEquation; indexJ ++)
+        //     {
+        //        std::cout << dgraddqy[indexI][indexJ] << " ";
+        //     }
+        //     std::cout << "\n";
+        // } 
+        // std::cout << "===================dgraddqz===========================\n";
+        // for(int indexI=0; indexI < nEquation+1; indexI++)
+        // {
+        //     
+        //     for(int indexJ =0; indexJ < nEquation; indexJ ++)
+        //     {
+        //        std::cout << dgraddqz[indexI][indexJ] << " ";
+        //     }
+        //     std::cout << "\n";
+        // }
+
+        // std::cout << "the left cell is: " << le << " "<< "the neighboring cells are : " ;
+        // for(int index = 0; index < neighborCells[le].size(); index++)
+        // {
+        //     std::cout << neighborCells[le][index] << " ";
+        // }
+        // std::cout << "\n";
+
+        // std::cout << "the left cell2 is: " << le << " "<< "the neighboring cells are : " ;
+        // for(auto iter = neighborCells[le].begin(); iter != neighborCells[le].end(); iter++)
+        // {
+        //     std::cout << *iter << " ";
+        // }
+        // std::cout << "\n";
+  
+        // std::cout << "the right cell is: " << re << " "<< "the neighboring cells are : " ;
+        // for(int index = 0; index < neighborCells[re].size(); index++)
+        // {
+        //     std::cout << neighborCells[re][index] << " ";
+        // }
+        // std::cout << "\n";
+
+    }
+
+    delete []dqdxL;    dqdxL = NULL;
+    delete []dqdyL;    dqdyL = NULL;
+    delete []dqdzL;    dqdzL = NULL;
+
+    delete []dqdxR;    dqdxR = NULL;
+    delete []dqdyR;    dqdyR = NULL;
+    delete []dqdzR;    dqdzR = NULL;
+    delete []dgrad;    dgrad = NULL;
+
+    delete []fL;        fL = NULL;
+    delete []fR;        fR = NULL;
+    delete []fN;        fN = NULL;
+    delete []fMid;      fMid = NULL;
+    delete []fluxp;     fluxp = NULL;
+
+    delete []fLpert;    fLpert = NULL;
+    delete []fRpert;    fRpert = NULL;
+    delete []fMidpert;  fMidpert = NULL;
+
+    for(int index = 0; index < nEquation; index++)
+    {
+        delete[] dqdcvL[index];
+        delete[] dqdcvR[index];
+        delete[] dqdcvN[index];
+        delete[] dgraddqx[index];
+        delete[] dgraddqy[index];
+        delete[] dgraddqz[index];
+    }
+    delete[]    dgraddqx[nEquation];
+    delete[]    dgraddqy[nEquation];
+    delete[]    dgraddqz[nEquation];
+    delete[]    dqdcvL;
+    delete[]    dqdcvR;
+    delete[]    dqdcvN;
+    delete[]    dgraddqx;
+    delete[]    dgraddqy;
+    delete[]    dgraddqz;
+
+}
+
+// GMRESCoupled
+template <typename T>
+void NSSolverUnstruct::Cal_GMRES_Visflux_AD_Coupled(T* fL, T* fR, T fLturb, T fRturb, T* dqdxL,T* dqdyL, T* dqdzL, 
+                                                    T* dqdxR, T* dqdyR, T* dqdzR, int iFace,
+                                                    int jFace, T* flux, Grid *gridIn, 
+                                                    FaceProxy *faceProxy, Param_NSSolverUnstruct *parameters)
+{
+        
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+        int nBoundFace = grid->GetNBoundFace();
+
+        int *leftCellofFace     = grid->GetLeftCellOfFace();
+        int *rightCellofFace    = grid->GetRightCellOfFace();
+        int nTotalCell          = grid->GetNTotalCell();
+
+        RDouble **dDdP_turb     = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP_turb"));
+
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+        RDouble *xfn  = grid->GetFaceNormalX();
+        RDouble *yfn  = grid->GetFaceNormalY();
+        RDouble *zfn  = grid->GetFaceNormalZ();
+        RDouble *area = grid->GetFaceArea();
+    
+        RDouble *xcc  = grid->GetCellCenterX();
+        RDouble *ycc  = grid->GetCellCenterY();
+        RDouble *zcc  = grid->GetCellCenterZ();
+
+        RDouble *xfc  = grid->GetFaceCenterX();
+        RDouble *yfc  = grid->GetFaceCenterY();
+        RDouble *zfc  = grid->GetFaceCenterZ();
+
+
+        // Param_NSSolverUnstruct *parameters = GetControlParameters();
+        int numberOfSpecies = parameters->GetNumberOfSpecies();
+
+        int nLaminar  = parameters->GetLaminarNumber();
+        int nChemical = parameters->GetChemicalFlag();
+        int nTemperatureModel = parameters->GetTemperatureModel();
+
+        int nEquation = nLaminar;
+
+        int nm  = parameters->GetNSEquationNumber();
+        RDouble skewnessAngle = parameters->GetSkewnessAngle();
+        bool isFineGrid = grid->IsFinestGrid();
+        RDouble *deltaL = faceProxy->GetWeightL();
+        RDouble *deltaR = faceProxy->GetWeightR();
+        NSFaceValue *faceVariable = faceProxy->GetNSFaceValue();
+        // RDouble *kCp     = faceVariable->GetKCP();
+        // RDouble *viscousLaminarFace   = faceVariable->GetMUL();
+        // RDouble *viscousTurbulenceFace = faceVariable->GetMUT();
+
+        RDouble refReNumber  = parameters->GetRefReNumber();
+        RDouble oRefReNumber = parameters->GetoRefReNumber();
+        RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+
+
+        int nolstress = GlobalDataBase::GetIntParaFromDB("nolstress");
+        int nrokplus  = GlobalDataBase::GetIntParaFromDB("nrokplus");
+
+        RDouble **qTurb = 0;
+        RDouble ** aniss  = 0;
+
+        if (nrokplus > 0)
+        {
+            qTurb = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+            aniss  = reinterpret_cast<RDouble **> (grid->GetDataPtr("aniss"));
+        }
+
+        T *fvis = new T[nLaminar];
+        T *dfdx = new T[nEquation];
+        T *dfdy = new T[nEquation];
+        T *dfdz = new T[nEquation];
+
+        T *dfd1  = new T[nEquation];
+        T *dfd2  = new T[nEquation];
+        T *dfdn  = new T[nEquation];
+        T *dfdt1 = new T[nEquation];
+        T *dfdt2 = new T[nEquation];
+
+        T *f1    = new T[nEquation];
+        T *f2    = new T[nEquation];
+        T *fMid  = new T[nEquation];
+        T *primitiveVariableFace = new T[nEquation+nTemperatureModel];
+
+        int le = leftCellofFace [iFace];
+        int re = rightCellofFace[iFace];
+
+        RDouble nxs = xfn[iFace];
+        RDouble nys = yfn[iFace];
+        RDouble nzs = zfn[iFace];
+
+        RDouble t1x, t1y, t1z, t2x, t2y, t2z;
+        T txx,tyy,tzz;
+        T txy,txz,tyz;
+
+        T viscousLaminarMin,viscousLaminarL,viscousLaminarR,viscousLaminarFace;
+        T viscousTurbulenceL, viscousTurbulenceR, viscousTurbulenceFace,ld,ld3,fv1;
+        GlobalDataBase::GetData("visl_min", &viscousLaminarMin, PHDOUBLE, 1);
+
+        RDouble refGama = 1.4;
+        RDouble referenceMachNumber         = parameters->GetRefMachNumber();
+        RDouble referenceMachNumberSquare   = referenceMachNumber * referenceMachNumber;
+        RDouble oPrandtlLaminar             = parameters->GetoPrandtlLaminar();
+        RDouble oPrandtlTurbulence          = parameters->GetoPrandtlTurbulence();
+        T kCpFace;
+        RDouble coefficientofStateEquation = gas->GetCoefficientOfStateEquation();
+
+        //! Get first tangential vector on the face.
+        if (abs(nxs) > SMALL)
+        {
+            t1x =   nys;
+            t1y = - nxs;
+            t1z =   0.0;
+        }
+        else if (abs(nys) > SMALL)
+        {
+            t1x = - nys;
+            t1y =   nxs;
+            t1z =   0.0;
+        }
+        else if (abs(nzs) > SMALL)
+        {
+            t1x =   0.0;
+            t1y = - nzs;
+            t1z =   nys;
+        }
+        else
+        {
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                flux[m] = 0.0;
+            }
+            return;
+        }
+
+        //! Normalize the tangential vector.
+        RDouble oNormal = 1.0 / DISTANCE(t1x, t1y, t1z);
+        t1x *= oNormal;
+        t1y *= oNormal;
+        t1z *= oNormal;
+
+        //! Get the second tangential vector by cross dot t1 to normal.
+        t2x = nys * t1z - nzs * t1y;
+        t2y = nzs * t1x - nxs * t1z;
+        t2z = nxs * t1y - nys * t1x;
+
+        RDouble dxL = xcc[le] - xfc[iFace];
+        RDouble dyL = ycc[le] - yfc[iFace];
+        RDouble dzL = zcc[le] - zfc[iFace];
+
+        RDouble dxR = xcc[re] - xfc[iFace];
+        RDouble dyR = ycc[re] - yfc[iFace];
+        RDouble dzR = zcc[re] - zfc[iFace];
+
+        RDouble dL = nxs * dxL + nys * dyL + nzs * dzL;
+        RDouble dR = nxs * dxR + nys * dyR + nzs * dzR;
+
+        RDouble distTemp = - dL / (DISTANCE(dxL, dyL, dzL) + SMALL);
+        distTemp = MIN(distTemp,  1.0);
+        distTemp = MAX(distTemp, -1.0);
+        RDouble angle1 = asin(distTemp) * 180.0 / PI;
+     
+        distTemp = dR / (DISTANCE(dxR, dyR, dzR) + SMALL);
+        distTemp = MIN(distTemp,  1.0);
+        distTemp = MAX(distTemp, -1.0);
+        RDouble angle2 = asin(distTemp) * 180.0 / PI;
+
+        RDouble dxnL  = nxs * dL - dxL;
+        RDouble dynL  = nys * dL - dyL;
+        RDouble dznL  = nzs * dL - dzL;
+
+        RDouble dxnR  = nxs * dR - dxR;
+        RDouble dynR  = nys * dR - dyR;
+        RDouble dznR  = nzs * dR - dzR;
+        //! Quantities at points 1 and 2.
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            f1[m] = fL[m];
+            f2[m] = fR[m];
+        }
+
+        T tL      = fL[IP]/(coefficientofStateEquation*fL[IR]);
+        T tR      = fR[IP]/(coefficientofStateEquation*fR[IR]);
+        T dtdxL   = dqdxL[nEquation];
+        T dtdyL   = dqdyL[nEquation];
+        T dtdzL   = dqdzL[nEquation];
+        T dtdxR   = dqdxR[nEquation];
+        T dtdyR   = dqdyR[nEquation];
+        T dtdzR   = dqdzR[nEquation];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            fMid[m] = half * (f1[m] + f2[m]);
+            primitiveVariableFace[m] = fMid[m];
+        }
+        T tMid = half * (tL + tR);
+        primitiveVariableFace[nEquation] = tMid;
+
+         // calculate the viscousLaminar here
+        viscousLaminarL     = tL * sqrt(tL) * (1.0 + nonDimensionalSutherlandTemperature) / (tL + nonDimensionalSutherlandTemperature);
+        viscousLaminarL     = MAX(viscousLaminarMin, viscousLaminarL);
+        viscousLaminarR     = tR * sqrt(tR) * (1.0 + nonDimensionalSutherlandTemperature) / (tR + nonDimensionalSutherlandTemperature);
+        viscousLaminarR     = MAX(viscousLaminarMin, viscousLaminarR);
+
+        // calculate the viscousTurbulence here
+        RDouble nuoo  = 1.0;        
+        RDouble nuMin = 1.0e-5 * nuoo;
+        RDouble nuMax = 1.0e10 * nuoo;
+        RDouble SA_cv1_cube = GlobalDataBase::GetDoubleParaFromDB("SA_cv1_cube");
+
+        ld      = fLturb * fL[0] / (viscousLaminarL + SMALL);
+        ld3     = ld * ld * ld;
+        fv1     = ld3 / (ld3 + SA_cv1_cube);
+        viscousTurbulenceL = fL[0] * fv1 * fLturb;
+        viscousTurbulenceL = min(nuMax, viscousTurbulenceL);
+        viscousTurbulenceL = max(nuMin, viscousTurbulenceL);
+
+        ld      = fRturb * fR[0] / (viscousLaminarR + SMALL);
+        ld3     = ld * ld * ld;
+        fv1     = ld3 / (ld3 + SA_cv1_cube);
+        viscousTurbulenceR = fR[0] * fv1 * fRturb;
+        viscousTurbulenceR = min(nuMax, viscousTurbulenceR);
+        viscousTurbulenceR = max(nuMin, viscousTurbulenceR);
+
+
+        if(iFace < nBoundFace)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+            int bcType = bcRegion->GetBCType();
+
+            // for solid walls, primitiveVariableFace[IU,IV,IW][jFace] = 0
+            if (bcType == PHENGLEI::SOLID_SURFACE)
+            {
+                RDouble uWall = 0.0;
+                RDouble vWall = 0.0;
+                RDouble wWall = 0.0;
+                Data_Param *bcData  = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace])->GetBCParamDataBase();
+                if(bcData)
+                {
+                    if (bcData->IsExist("uWall", PHDOUBLE, 1))
+                    {
+                        bcData->GetData("uWall", &uWall, PHDOUBLE, 1);
+                        bcData->GetData("vWall", &vWall, PHDOUBLE, 1);
+                        bcData->GetData("wWall", &wWall, PHDOUBLE, 1);
+                    }
+                }
+
+                T velocityXWall = uWall;
+                T velocityYWall = vWall;
+                T velocityZWall = wWall;
+                primitiveVariableFace[IU] = velocityXWall;
+                primitiveVariableFace[IV] = velocityYWall;
+                primitiveVariableFace[IW] = velocityZWall;
+
+                viscousTurbulenceR = -viscousTurbulenceL;
+            }
+            else if(bcType == PHENGLEI::FARFIELD)
+            {
+                viscousTurbulenceR = dDdP_turb[0][re-nTotalCell]*viscousTurbulenceL;
+            }
+        }
+
+
+
+         // calculate the viscousLaminarFace 
+        viscousLaminarFace      = half*(viscousLaminarL     + viscousLaminarR);
+        viscousTurbulenceFace   = half*(viscousTurbulenceL  + viscousTurbulenceR);
+
+        RDouble cp = 1.0 / ((refGama - 1.0) * referenceMachNumberSquare);
+        kCpFace = (viscousLaminarFace * oPrandtlLaminar + viscousTurbulenceFace * oPrandtlTurbulence) * cp;
+        //! More accurate for skewness cells.
+        //! If the cell degenerates too much, then interpolate the cell center value
+        //! to the left and right points that vertical to the face normal.
+        //! However, it will effect the robustness, so the skewnessAngle is suggested to be larger than 60 degree
+        //! skewnessAngle, more large, more robust.
+        //! For robust reason, this interpolation is NOT done on coarse grids.
+        //! angle1/2 is defined as the complement of the angle between face normal and face-center/cell-center line.
+        //! meaning that, (90 - angle1/2) is the angle between the face normal and the face-cell center line.
+        //! angle1, angle2 = 0, represent completely orthogonal right angle, perfect quality.
+        if (isFineGrid && angle1 > skewnessAngle && angle2 > skewnessAngle)
+        {
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                f1[m] += dqdxL[m] * dxnL + dqdyL[m]* dynL + dqdzL[m]* dznL;
+                f2[m] += dqdxR[m] * dxnR + dqdyR[m]* dynR + dqdzR[m]* dznR;
+            }
+
+            //! Only consider the rho limiter, may consider p limiter in future.
+            tL += dtdxL * dxnL + dtdyL * dynL + dtdzL * dznL;
+            tR += dtdxR * dxnR + dtdyR * dynR + dtdzR * dznR;
+
+            if (tL < SMALL)
+            {
+                tL = fL[IP]/(coefficientofStateEquation*fL[IR]);
+            }
+            if (tR < SMALL)
+            {
+                tR = fR[IP]/(coefficientofStateEquation*fR[IR]);
+            }
+
+            //! Quantities at the face.
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                fMid[m] = primitiveVariableFace[m];
+            }
+
+            tMid = primitiveVariableFace[nEquation];
+        }
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            dfdn[m] = 0.0;
+        }
+        T dtdn = 0.0;
+
+        if (angle1 > 0.0 && angle2 > 0.0 && ABS(dL) > TINY && ABS(dR) > TINY)
+        {
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                dfd1[m] = (f1[m] - fMid[m]) / dL;
+            }
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                dfd2[m] = (f2[m] - fMid[m]) / dR;
+            }
+
+            T dtd1 = (tL - tMid) / dL;
+            T dtd2 = (tR - tMid) / dR;
+
+            RDouble dtmp = dL * dL + dR * dR;
+            RDouble weightL = dL * dL / dtmp;
+            RDouble weightR = 1.0 - weightL;
+
+            if (iFace < nBoundFace)
+            {
+                UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+                int bcType = bcRegion->GetBCType();
+
+                if (bcType != PHENGLEI::INTERFACE)
+                {
+                    weightL = 1.0;
+                    weightR = 0.0;
+                }
+            }
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                dfdn[m] = weightL * dfd1[m] + weightR * dfd2[m];
+            }
+
+            dtdn = dtd1 * weightL + dtd2 * weightR;
+        }
+        
+        RDouble weightL = deltaL[jFace];
+        RDouble weightR = deltaR[jFace];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            dfdx[m] = weightL * dqdxL[m] + weightR * dqdxR[m];
+            dfdy[m] = weightL * dqdyL[m] + weightR * dqdyR[m];
+            dfdz[m] = weightL * dqdzL[m] + weightR * dqdzR[m];
+        }
+
+        for (int m = IU; m <= IW; ++ m)
+        {
+            dfdt1[m] = t1x * dfdx[m] + t1y * dfdy[m] + t1z * dfdz[m];
+            dfdt2[m] = t2x * dfdx[m] + t2y * dfdy[m] + t2z * dfdz[m];
+        }
+
+        //! Now true gradients. 
+        for (int m = IU; m <= IW; ++ m)
+        {
+            dfdx[m] = nxs * dfdn[m] + t1x * dfdt1[m] + t2x * dfdt2[m];
+            dfdy[m] = nys * dfdn[m] + t1y * dfdt1[m] + t2y * dfdt2[m];
+            dfdz[m] = nzs * dfdn[m] + t1z * dfdt1[m] + t2z * dfdt2[m];
+        }
+        
+        T dudx = dfdx[IU];
+        T dudy = dfdy[IU];
+        T dudz = dfdz[IU];
+
+        T dvdx = dfdx[IV];
+        T dvdy = dfdy[IV];
+        T dvdz = dfdz[IV];
+
+        T dwdx = dfdx[IW];
+        T dwdy = dfdy[IW];
+        T dwdz = dfdz[IW];
+
+        T qNorm = 0.0;         
+        // if (nChemical == 1)
+        // {
+        //     for (int iSpecies = 0; iSpecies < numberOfSpecies; ++ iSpecies)
+        //     {
+        //         qNorm += rhoDiffusion[iSpecies][jFace] * hintSpecies[iSpecies][jFace] * dfdn[iSpecies + nm];
+        //     }
+// 
+        //     for (int m = nm; m < nLaminar; ++ m)
+        //     {
+        //         fvis[m] = rhoDiffusion[m - nm][jFace] * dfdn[m];
+        //     }
+        // }
+        
+        qNorm += kCpFace * dtdn;
+        T divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+        T vis = viscousLaminarFace + viscousTurbulenceFace;
+        T um  = fMid[1];
+        T vm  = fMid[2];
+        T wm  = fMid[3];
+
+        //! Stress components.
+        txx = vis * (two * dudx - divv2p3);
+        tyy = vis * (two * dvdy - divv2p3);
+        tzz = vis * (two * dwdz - divv2p3);
+        txy = vis * (dudy + dvdx);
+        txz = vis * (dudz + dwdx);
+        tyz = vis * (dvdz + dwdy);
+
+        if (nrokplus > 0)
+        {
+            T rkl  = fL[IR] * qTurb[0][le];
+            T rkr  = fR[IR] * qTurb[0][re];
+            T rhok = half * (rkl + rkr) * refReNumber;
+            if (nolstress > 0)
+            {
+                RDouble b11 = half * (aniss[0][le] + aniss[0][re]);
+                RDouble b22 = half * (aniss[1][le] + aniss[1][re]);
+                RDouble b12 = half * (aniss[2][le] + aniss[2][re]);
+                RDouble b13 = half * (aniss[3][le] + aniss[3][re]);
+                RDouble b23 = half * (aniss[4][le] + aniss[4][re]);
+                RDouble b33 = - b11 - b22;
+                txx = txx + b11 - two3rd * rhok;
+                tyy = tyy + b22 - two3rd * rhok;
+                tzz = tzz + b33 - two3rd * rhok;
+                txy = txy + b12;
+                txz = txz + b13;
+                tyz = tyz + b23;
+            }
+            else
+            {
+                txx = txx - two3rd * rhok;
+                tyy = tyy - two3rd * rhok;
+                tzz = tzz - two3rd * rhok;
+            }
+        }
+
+
+
+        fvis[IR ] = 0.0;
+        fvis[IRU] = nxs * txx + nys * txy + nzs * txz;
+        fvis[IRV] = nxs * txy + nys * tyy + nzs * tyz;
+        fvis[IRW] = nxs * txz + nys * tyz + nzs * tzz;
+        fvis[IRE] = um * fvis[IRU] + vm * fvis[IRV] + wm * fvis[IRW] + qNorm;
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            flux[m] = - oRefReNumber * area[iFace] * fvis[m];
+        }
+
+         delete []fvis;    fvis = NULL;
+         delete []f1;    f1 = NULL;
+         delete []f2;    f2 = NULL;
+         delete []fMid;    fMid = NULL;
+         delete []dfdx;    dfdx = NULL;
+         delete []dfdy;    dfdy = NULL;
+         delete []dfdz;    dfdz = NULL;
+     
+         delete []dfd1;    dfd1 = NULL;
+         delete []dfd2;    dfd2 = NULL;
+         delete []dfdn;    dfdn = NULL;
+         delete []dfdt1;    dfdt1 = NULL;
+         delete []dfdt2;    dfdt2 = NULL;
+         delete []primitiveVariableFace; primitiveVariableFace = NULL;
+}
+
+
+
+// GMRESAD 
+template <typename T>
+void NSSolverUnstruct::Cal_GMRES_Visflux_AD(T* fL, T* fR, T* dqdxL,T* dqdyL, T* dqdzL, 
+                          T* dqdxR, T* dqdyR, T* dqdzR, int iFace,
+                          int jFace, T* flux, Grid *gridIn, 
+                          FaceProxy *faceProxy, Param_NSSolverUnstruct *parameters)
+{
+        
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+        int nBoundFace = grid->GetNBoundFace();
+
+        int *leftCellofFace = grid->GetLeftCellOfFace();
+        int *rightCellofFace = grid->GetRightCellOfFace();
+
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+        RDouble *xfn  = grid->GetFaceNormalX();
+        RDouble *yfn  = grid->GetFaceNormalY();
+        RDouble *zfn  = grid->GetFaceNormalZ();
+        RDouble *area = grid->GetFaceArea();
+    
+        RDouble *xcc  = grid->GetCellCenterX();
+        RDouble *ycc  = grid->GetCellCenterY();
+        RDouble *zcc  = grid->GetCellCenterZ();
+
+        RDouble *xfc  = grid->GetFaceCenterX();
+        RDouble *yfc  = grid->GetFaceCenterY();
+        RDouble *zfc  = grid->GetFaceCenterZ();
+
+
+        // Param_NSSolverUnstruct *parameters = GetControlParameters();
+        int numberOfSpecies = parameters->GetNumberOfSpecies();
+
+        int nLaminar  = parameters->GetLaminarNumber();
+        int nChemical = parameters->GetChemicalFlag();
+        int nTemperatureModel = parameters->GetTemperatureModel();
+
+        int nEquation = nLaminar;
+
+        int nm  = parameters->GetNSEquationNumber();
+        RDouble skewnessAngle = parameters->GetSkewnessAngle();
+        bool isFineGrid = grid->IsFinestGrid();
+        RDouble *deltaL = faceProxy->GetWeightL();
+        RDouble *deltaR = faceProxy->GetWeightR();
+        NSFaceValue *faceVariable = faceProxy->GetNSFaceValue();
+        // RDouble *kCp     = faceVariable->GetKCP();
+        // RDouble *viscousLaminarFace   = faceVariable->GetMUL();
+        RDouble *viscousTurbulenceFace = faceVariable->GetMUT();
+
+        RDouble refReNumber  = parameters->GetRefReNumber();
+        RDouble oRefReNumber = parameters->GetoRefReNumber();
+        RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+
+
+        int nolstress = GlobalDataBase::GetIntParaFromDB("nolstress");
+        int nrokplus  = GlobalDataBase::GetIntParaFromDB("nrokplus");
+        RDouble wallTemperature             = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+        RDouble refDimensionalTemperature   = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+
+        RDouble **qTurb = 0;
+        RDouble ** aniss  = 0;
+
+        if (nrokplus > 0)
+        {
+            qTurb = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+            aniss  = reinterpret_cast<RDouble **> (grid->GetDataPtr("aniss"));
+        }
+
+        T *fvis = new T[nLaminar];
+        T *dfdx = new T[nEquation];
+        T *dfdy = new T[nEquation];
+        T *dfdz = new T[nEquation];
+
+        T *dfd1  = new T[nEquation];
+        T *dfd2  = new T[nEquation];
+        T *dfdn  = new T[nEquation];
+        T *dfdt1 = new T[nEquation];
+        T *dfdt2 = new T[nEquation];
+
+        T *f1    = new T[nEquation];
+        T *f2    = new T[nEquation];
+        T *fMid  = new T[nEquation];
+        T *primitiveVariableFace = new T[nEquation+nTemperatureModel];
+
+        int le = leftCellofFace [iFace];
+        int re = rightCellofFace[iFace];
+
+        RDouble nxs = xfn[iFace];
+        RDouble nys = yfn[iFace];
+        RDouble nzs = zfn[iFace];
+
+        RDouble t1x, t1y, t1z, t2x, t2y, t2z;
+        T txx,tyy,tzz;
+        T txy,txz,tyz;
+
+        T viscousLaminarMin,viscousLaminarL,viscousLaminarR,viscousLaminarFace;
+        GlobalDataBase::GetData("visl_min", &viscousLaminarMin, PHDOUBLE, 1);
+
+        RDouble refGama = 1.4;
+        RDouble referenceMachNumber         = parameters->GetRefMachNumber();
+        RDouble referenceMachNumberSquare   = referenceMachNumber * referenceMachNumber;
+        RDouble oPrandtlLaminar             = parameters->GetoPrandtlLaminar();
+        RDouble oPrandtlTurbulence          = parameters->GetoPrandtlTurbulence();
+        T kCpFace;
+        RDouble coefficientofStateEquation = gas->GetCoefficientOfStateEquation();
+
+        //! Get first tangential vector on the face.
+        if (abs(nxs) > SMALL)
+        {
+            t1x =   nys;
+            t1y = - nxs;
+            t1z =   0.0;
+        }
+        else if (abs(nys) > SMALL)
+        {
+            t1x = - nys;
+            t1y =   nxs;
+            t1z =   0.0;
+        }
+        else if (abs(nzs) > SMALL)
+        {
+            t1x =   0.0;
+            t1y = - nzs;
+            t1z =   nys;
+        }
+        else
+        {
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                flux[m] = 0.0;
+            }
+            return;
+        }
+
+        //! Normalize the tangential vector.
+        RDouble oNormal = 1.0 / DISTANCE(t1x, t1y, t1z);
+        t1x *= oNormal;
+        t1y *= oNormal;
+        t1z *= oNormal;
+
+        //! Get the second tangential vector by cross dot t1 to normal.
+        t2x = nys * t1z - nzs * t1y;
+        t2y = nzs * t1x - nxs * t1z;
+        t2z = nxs * t1y - nys * t1x;
+
+        RDouble dxL = xcc[le] - xfc[iFace];
+        RDouble dyL = ycc[le] - yfc[iFace];
+        RDouble dzL = zcc[le] - zfc[iFace];
+
+        RDouble dxR = xcc[re] - xfc[iFace];
+        RDouble dyR = ycc[re] - yfc[iFace];
+        RDouble dzR = zcc[re] - zfc[iFace];
+
+        RDouble dL = nxs * dxL + nys * dyL + nzs * dzL;
+        RDouble dR = nxs * dxR + nys * dyR + nzs * dzR;
+
+        RDouble distTemp = - dL / (DISTANCE(dxL, dyL, dzL) + SMALL);
+        distTemp = MIN(distTemp,  1.0);
+        distTemp = MAX(distTemp, -1.0);
+        RDouble angle1 = asin(distTemp) * 180.0 / PI;
+     
+        distTemp = dR / (DISTANCE(dxR, dyR, dzR) + SMALL);
+        distTemp = MIN(distTemp,  1.0);
+        distTemp = MAX(distTemp, -1.0);
+        RDouble angle2 = asin(distTemp) * 180.0 / PI;
+
+        RDouble dxnL  = nxs * dL - dxL;
+        RDouble dynL  = nys * dL - dyL;
+        RDouble dznL  = nzs * dL - dzL;
+
+        RDouble dxnR  = nxs * dR - dxR;
+        RDouble dynR  = nys * dR - dyR;
+        RDouble dznR  = nzs * dR - dzR;
+        //! Quantities at points 1 and 2.
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            f1[m] = fL[m];
+            f2[m] = fR[m];
+        }
+
+        T tL      = fL[IP]/(coefficientofStateEquation*fL[IR]);
+        T tR      = fR[IP]/(coefficientofStateEquation*fR[IR]);
+        T dtdxL   = dqdxL[nEquation];
+        T dtdyL   = dqdyL[nEquation];
+        T dtdzL   = dqdzL[nEquation];
+        T dtdxR   = dqdxR[nEquation];
+        T dtdyR   = dqdyR[nEquation];
+        T dtdzR   = dqdzR[nEquation];
+        // calculate the viscousLaminar here
+        viscousLaminarL     = tL * sqrt(tL) * (1.0 + nonDimensionalSutherlandTemperature) / (tL + nonDimensionalSutherlandTemperature);
+        viscousLaminarL     = MAX(viscousLaminarMin, viscousLaminarL);
+        viscousLaminarR     = tR * sqrt(tR) * (1.0 + nonDimensionalSutherlandTemperature) / (tR + nonDimensionalSutherlandTemperature);
+        viscousLaminarR     = MAX(viscousLaminarMin, viscousLaminarR);
+        viscousLaminarFace  = half*(viscousLaminarL + viscousLaminarR);
+
+        RDouble cp = 1.0 / ((refGama - 1.0) * referenceMachNumberSquare);
+        kCpFace = (viscousLaminarFace * oPrandtlLaminar + viscousTurbulenceFace[jFace] * oPrandtlTurbulence) * cp;
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            fMid[m] = half * (f1[m] + f2[m]);
+            primitiveVariableFace[m] = fMid[m];
+        }
+        T tMid = half * (tL + tR);
+        primitiveVariableFace[nEquation] = tMid;
+
+        if(iFace < nBoundFace)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+            int bcType = bcRegion->GetBCType();
+
+            // for solid walls, primitiveVariableFace[IU,IV,IW][jFace] = 0
+            if (bcType == PHENGLEI::SOLID_SURFACE)
+            {
+                RDouble uWall = 0.0;
+                RDouble vWall = 0.0;
+                RDouble wWall = 0.0;
+                Data_Param *bcData  = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace])->GetBCParamDataBase();
+                if(bcData)
+                {
+                    if (bcData->IsExist("uWall", PHDOUBLE, 1))
+                    {
+                        bcData->GetData("uWall", &uWall, PHDOUBLE, 1);
+                        bcData->GetData("vWall", &vWall, PHDOUBLE, 1);
+                        bcData->GetData("wWall", &wWall, PHDOUBLE, 1);
+                    }
+                }
+
+                T velocityXWall = uWall;
+                T velocityYWall = vWall;
+                T velocityZWall = wWall;
+                primitiveVariableFace[IU] = velocityXWall;
+                primitiveVariableFace[IV] = velocityYWall;
+                primitiveVariableFace[IW] = velocityZWall;
+
+                // GMRES3D
+                if( wallTemperature > 0.0 )
+                {
+                    tMid                                = wallTemperature/refDimensionalTemperature;
+                    primitiveVariableFace[nEquation]    = tMid;
+                }
+            }
+        }
+        //! More accurate for skewness cells.
+        //! If the cell degenerates too much, then interpolate the cell center value
+        //! to the left and right points that vertical to the face normal.
+        //! However, it will effect the robustness, so the skewnessAngle is suggested to be larger than 60 degree
+        //! skewnessAngle, more large, more robust.
+        //! For robust reason, this interpolation is NOT done on coarse grids.
+        //! angle1/2 is defined as the complement of the angle between face normal and face-center/cell-center line.
+        //! meaning that, (90 - angle1/2) is the angle between the face normal and the face-cell center line.
+        //! angle1, angle2 = 0, represent completely orthogonal right angle, perfect quality.
+        if (isFineGrid && angle1 > skewnessAngle && angle2 > skewnessAngle)
+        {
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                f1[m] += dqdxL[m] * dxnL + dqdyL[m]* dynL + dqdzL[m]* dznL;
+                f2[m] += dqdxR[m] * dxnR + dqdyR[m]* dynR + dqdzR[m]* dznR;
+            }
+
+            //! Only consider the rho limiter, may consider p limiter in future.
+            tL += dtdxL * dxnL + dtdyL * dynL + dtdzL * dznL;
+            tR += dtdxR * dxnR + dtdyR * dynR + dtdzR * dznR;
+
+            if (tL < SMALL)
+            {
+                tL = fL[IP]/(coefficientofStateEquation*fL[IR]);
+            }
+            if (tR < SMALL)
+            {
+                tR = fR[IP]/(coefficientofStateEquation*fR[IR]);
+            }
+
+            //! Quantities at the face.
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                fMid[m] = primitiveVariableFace[m];
+            }
+
+            tMid = primitiveVariableFace[nEquation];
+        }
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            dfdn[m] = 0.0;
+        }
+        T dtdn = 0.0;
+
+        if (angle1 > 0.0 && angle2 > 0.0 && ABS(dL) > TINY && ABS(dR) > TINY)
+        {
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                dfd1[m] = (f1[m] - fMid[m]) / dL;
+            }
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                dfd2[m] = (f2[m] - fMid[m]) / dR;
+            }
+
+            T dtd1 = (tL - tMid) / dL;
+            T dtd2 = (tR - tMid) / dR;
+
+            RDouble dtmp = dL * dL + dR * dR;
+            RDouble weightL = dL * dL / dtmp;
+            RDouble weightR = 1.0 - weightL;
+
+            if (iFace < nBoundFace)
+            {
+                UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+                int bcType = bcRegion->GetBCType();
+
+                if (bcType != PHENGLEI::INTERFACE)
+                {
+                    weightL = 1.0;
+                    weightR = 0.0;
+                }
+            }
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                dfdn[m] = weightL * dfd1[m] + weightR * dfd2[m];
+            }
+
+            dtdn = dtd1 * weightL + dtd2 * weightR;
+        }
+        
+        RDouble weightL = deltaL[jFace];
+        RDouble weightR = deltaR[jFace];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            dfdx[m] = weightL * dqdxL[m] + weightR * dqdxR[m];
+            dfdy[m] = weightL * dqdyL[m] + weightR * dqdyR[m];
+            dfdz[m] = weightL * dqdzL[m] + weightR * dqdzR[m];
+        }
+
+        for (int m = IU; m <= IW; ++ m)
+        {
+            dfdt1[m] = t1x * dfdx[m] + t1y * dfdy[m] + t1z * dfdz[m];
+            dfdt2[m] = t2x * dfdx[m] + t2y * dfdy[m] + t2z * dfdz[m];
+        }
+
+        //! Now true gradients. 
+        for (int m = IU; m <= IW; ++ m)
+        {
+            dfdx[m] = nxs * dfdn[m] + t1x * dfdt1[m] + t2x * dfdt2[m];
+            dfdy[m] = nys * dfdn[m] + t1y * dfdt1[m] + t2y * dfdt2[m];
+            dfdz[m] = nzs * dfdn[m] + t1z * dfdt1[m] + t2z * dfdt2[m];
+        }
+        
+        T dudx = dfdx[IU];
+        T dudy = dfdy[IU];
+        T dudz = dfdz[IU];
+
+        T dvdx = dfdx[IV];
+        T dvdy = dfdy[IV];
+        T dvdz = dfdz[IV];
+
+        T dwdx = dfdx[IW];
+        T dwdy = dfdy[IW];
+        T dwdz = dfdz[IW];
+
+        T qNorm = 0.0;         
+        // if (nChemical == 1)
+        // {
+        //     for (int iSpecies = 0; iSpecies < numberOfSpecies; ++ iSpecies)
+        //     {
+        //         qNorm += rhoDiffusion[iSpecies][jFace] * hintSpecies[iSpecies][jFace] * dfdn[iSpecies + nm];
+        //     }
+// 
+        //     for (int m = nm; m < nLaminar; ++ m)
+        //     {
+        //         fvis[m] = rhoDiffusion[m - nm][jFace] * dfdn[m];
+        //     }
+        // }
+        
+        qNorm += kCpFace * dtdn;
+        T divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+        T vis = viscousLaminarFace + viscousTurbulenceFace[jFace];
+        T um  = fMid[1];
+        T vm  = fMid[2];
+        T wm  = fMid[3];
+
+        //! Stress components.
+        txx = vis * (two * dudx - divv2p3);
+        tyy = vis * (two * dvdy - divv2p3);
+        tzz = vis * (two * dwdz - divv2p3);
+        txy = vis * (dudy + dvdx);
+        txz = vis * (dudz + dwdx);
+        tyz = vis * (dvdz + dwdy);
+
+        if (nrokplus > 0)
+        {
+            T rkl  = fL[IR] * qTurb[0][le];
+            T rkr  = fR[IR] * qTurb[0][re];
+            T rhok = half * (rkl + rkr) * refReNumber;
+            if (nolstress > 0)
+            {
+                RDouble b11 = half * (aniss[0][le] + aniss[0][re]);
+                RDouble b22 = half * (aniss[1][le] + aniss[1][re]);
+                RDouble b12 = half * (aniss[2][le] + aniss[2][re]);
+                RDouble b13 = half * (aniss[3][le] + aniss[3][re]);
+                RDouble b23 = half * (aniss[4][le] + aniss[4][re]);
+                RDouble b33 = - b11 - b22;
+                txx = txx + b11 - two3rd * rhok;
+                tyy = tyy + b22 - two3rd * rhok;
+                tzz = tzz + b33 - two3rd * rhok;
+                txy = txy + b12;
+                txz = txz + b13;
+                tyz = tyz + b23;
+            }
+            else
+            {
+                txx = txx - two3rd * rhok;
+                tyy = tyy - two3rd * rhok;
+                tzz = tzz - two3rd * rhok;
+            }
+        }
+
+
+
+        fvis[IR ] = 0.0;
+        fvis[IRU] = nxs * txx + nys * txy + nzs * txz;
+        fvis[IRV] = nxs * txy + nys * tyy + nzs * tyz;
+        fvis[IRW] = nxs * txz + nys * tyz + nzs * tzz;
+        fvis[IRE] = um * fvis[IRU] + vm * fvis[IRV] + wm * fvis[IRW] + qNorm;
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            flux[m] = - oRefReNumber * area[iFace] * fvis[m];
+        }
+
+         delete []fvis;    fvis = NULL;
+         delete []f1;    f1 = NULL;
+         delete []f2;    f2 = NULL;
+         delete []fMid;    fMid = NULL;
+         delete []dfdx;    dfdx = NULL;
+         delete []dfdy;    dfdy = NULL;
+         delete []dfdz;    dfdz = NULL;
+     
+         delete []dfd1;    dfd1 = NULL;
+         delete []dfd2;    dfd2 = NULL;
+         delete []dfdn;    dfdn = NULL;
+         delete []dfdt1;    dfdt1 = NULL;
+         delete []dfdt2;    dfdt2 = NULL;
+         delete []primitiveVariableFace; primitiveVariableFace = NULL;
+}
+
+// GMRESVis  GMRESVisFD
+void NSSolverUnstruct::Cal_GMRES_Visflux(RDouble* fL, RDouble* fR, RDouble* primitiveVariableFace, RDouble* dqdxL,
+                           RDouble* dqdyL, RDouble* dqdzL, RDouble* dqdxR, RDouble* dqdyR, RDouble* dqdzR, int iFace,
+                           int jFace, RDouble* flux, Grid *gridIn, FaceProxy *faceProxy)
+{
+
+        UnstructGrid *grid = UnstructGridCast(gridIn);
+        int nBoundFace = grid->GetNBoundFace();
+
+        int *leftCellofFace = grid->GetLeftCellOfFace();
+        int *rightCellofFace = grid->GetRightCellOfFace();
+
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+        RDouble *xfn  = grid->GetFaceNormalX();
+        RDouble *yfn  = grid->GetFaceNormalY();
+        RDouble *zfn  = grid->GetFaceNormalZ();
+        RDouble *area = grid->GetFaceArea();
+    
+        RDouble *xcc  = grid->GetCellCenterX();
+        RDouble *ycc  = grid->GetCellCenterY();
+        RDouble *zcc  = grid->GetCellCenterZ();
+
+        RDouble *xfc  = grid->GetFaceCenterX();
+        RDouble *yfc  = grid->GetFaceCenterY();
+        RDouble *zfc  = grid->GetFaceCenterZ();
+
+
+        Param_NSSolverUnstruct *parameters = GetControlParameters();
+        int numberOfSpecies = parameters->GetNumberOfSpecies();
+
+        int nLaminar  = parameters->GetLaminarNumber();
+        int nChemical = parameters->GetChemicalFlag();
+        int nTemperatureModel = parameters->GetTemperatureModel();
+
+        int nEquation = GetNumberOfEquations();
+
+        int nm  = parameters->GetNSEquationNumber();
+        RDouble skewnessAngle = parameters->GetSkewnessAngle();
+        bool isFineGrid = grid->IsFinestGrid();
+        RDouble *deltaL = faceProxy->GetWeightL();
+        RDouble *deltaR = faceProxy->GetWeightR();
+        NSFaceValue *faceVariable = faceProxy->GetNSFaceValue();
+        // RDouble *kCp     = faceVariable->GetKCP();
+        // RDouble *viscousLaminarFace   = faceVariable->GetMUL();
+        RDouble *viscousTurbulenceFace = faceVariable->GetMUT();
+
+        RDouble refReNumber  = parameters->GetRefReNumber();
+        RDouble oRefReNumber = parameters->GetoRefReNumber();
+        RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+
+
+        int nolstress = GlobalDataBase::GetIntParaFromDB("nolstress");
+        int nrokplus  = GlobalDataBase::GetIntParaFromDB("nrokplus");
+
+        RDouble **qTurb = 0;
+        RDouble ** aniss  = 0;
+
+        if (nrokplus > 0)
+        {
+            qTurb = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+            aniss  = reinterpret_cast<RDouble **> (grid->GetDataPtr("aniss"));
+        }
+
+        RDouble *fvis = new RDouble[nLaminar];
+        RDouble *dfdx = new RDouble[nEquation];
+        RDouble *dfdy = new RDouble[nEquation];
+        RDouble *dfdz = new RDouble[nEquation];
+
+        RDouble *dfd1  = new RDouble[nEquation];
+        RDouble *dfd2  = new RDouble[nEquation];
+        RDouble *dfdn  = new RDouble[nEquation];
+        RDouble *dfdt1 = new RDouble[nEquation];
+        RDouble *dfdt2 = new RDouble[nEquation];
+
+        RDouble *f1    = new RDouble[nEquation];
+        RDouble *f2    = new RDouble[nEquation];
+        RDouble *fMid  = new RDouble[nEquation];
+
+        int le = leftCellofFace [iFace];
+        int re = rightCellofFace[iFace];
+
+        RDouble nxs = xfn[iFace];
+        RDouble nys = yfn[iFace];
+        RDouble nzs = zfn[iFace];
+
+        RDouble t1x, t1y, t1z, t2x, t2y, t2z;
+        RDouble txx,tyy,tzz;
+        RDouble txy,txz,tyz;
+
+        RDouble viscousLaminarMin,viscousLaminarL,viscousLaminarR,viscousLaminarFace;
+        GlobalDataBase::GetData("visl_min", &viscousLaminarMin, PHDOUBLE, 1);
+
+        RDouble refGama = 1.4;
+        RDouble referenceMachNumber         = parameters->GetRefMachNumber();
+        RDouble referenceMachNumberSquare   = referenceMachNumber * referenceMachNumber;
+        RDouble oPrandtlLaminar             = parameters->GetoPrandtlLaminar();
+        RDouble oPrandtlTurbulence          = parameters->GetoPrandtlTurbulence();
+        RDouble kCpFace;
+
+        //! Get first tangential vector on the face.
+        if (abs(nxs) > SMALL)
+        {
+            t1x =   nys;
+            t1y = - nxs;
+            t1z =   0.0;
+        }
+        else if (abs(nys) > SMALL)
+        {
+            t1x = - nys;
+            t1y =   nxs;
+            t1z =   0.0;
+        }
+        else if (abs(nzs) > SMALL)
+        {
+            t1x =   0.0;
+            t1y = - nzs;
+            t1z =   nys;
+        }
+        else
+        {
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                flux[m] = 0.0;
+            }
+            return;
+        }
+
+        //! Normalize the tangential vector.
+        RDouble oNormal = 1.0 / DISTANCE(t1x, t1y, t1z);
+        t1x *= oNormal;
+        t1y *= oNormal;
+        t1z *= oNormal;
+
+        //! Get the second tangential vector by cross dot t1 to normal.
+        t2x = nys * t1z - nzs * t1y;
+        t2y = nzs * t1x - nxs * t1z;
+        t2z = nxs * t1y - nys * t1x;
+
+        RDouble dxL = xcc[le] - xfc[iFace];
+        RDouble dyL = ycc[le] - yfc[iFace];
+        RDouble dzL = zcc[le] - zfc[iFace];
+
+        RDouble dxR = xcc[re] - xfc[iFace];
+        RDouble dyR = ycc[re] - yfc[iFace];
+        RDouble dzR = zcc[re] - zfc[iFace];
+
+        RDouble dL = nxs * dxL + nys * dyL + nzs * dzL;
+        RDouble dR = nxs * dxR + nys * dyR + nzs * dzR;
+
+        RDouble distTemp = - dL / (DISTANCE(dxL, dyL, dzL) + SMALL);
+        distTemp = MIN(distTemp,  1.0);
+        distTemp = MAX(distTemp, -1.0);
+        RDouble angle1 = asin(distTemp) * 180.0 / PI;
+     
+        distTemp = dR / (DISTANCE(dxR, dyR, dzR) + SMALL);
+        distTemp = MIN(distTemp,  1.0);
+        distTemp = MAX(distTemp, -1.0);
+        RDouble angle2 = asin(distTemp) * 180.0 / PI;
+
+        RDouble dxnL  = nxs * dL - dxL;
+        RDouble dynL  = nys * dL - dyL;
+        RDouble dznL  = nzs * dL - dzL;
+
+        RDouble dxnR  = nxs * dR - dxR;
+        RDouble dynR  = nys * dR - dyR;
+        RDouble dznR  = nzs * dR - dzR;
+
+        //! Quantities at points 1 and 2.
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            f1[m] = fL[m];
+            f2[m] = fR[m];
+        }
+
+        RDouble tL      = fL[nEquation];
+        RDouble tR      = fR[nEquation];
+        RDouble dtdxL   = dqdxL[nEquation];
+        RDouble dtdyL   = dqdyL[nEquation];
+        RDouble dtdzL   = dqdzL[nEquation];
+        RDouble dtdxR   = dqdxR[nEquation];
+        RDouble dtdyR   = dqdyR[nEquation];
+        RDouble dtdzR   = dqdzR[nEquation];
+
+        // calculate the viscousLaminar here
+        viscousLaminarL     = tL * sqrt(tL) * (1.0 + nonDimensionalSutherlandTemperature) / (tL + nonDimensionalSutherlandTemperature);
+        viscousLaminarL     = MAX(viscousLaminarMin, viscousLaminarL);
+        viscousLaminarR     = tR * sqrt(tR) * (1.0 + nonDimensionalSutherlandTemperature) / (tR + nonDimensionalSutherlandTemperature);
+        viscousLaminarR     = MAX(viscousLaminarMin, viscousLaminarR);
+        viscousLaminarFace  = half*(viscousLaminarL + viscousLaminarR);
+
+        RDouble cp = 1.0 / ((refGama - 1.0) * referenceMachNumberSquare);
+        kCpFace = (viscousLaminarFace * oPrandtlLaminar + viscousTurbulenceFace[jFace] * oPrandtlTurbulence) * cp;
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            fMid[m] = half * (f1[m] + f2[m]);
+        }
+        RDouble tMid = half * (tL + tR);
+
+        //! More accurate for skewness cells.
+        //! If the cell degenerates too much, then interpolate the cell center value
+        //! to the left and right points that vertical to the face normal.
+        //! However, it will effect the robustness, so the skewnessAngle is suggested to be larger than 60 degree
+        //! skewnessAngle, more large, more robust.
+        //! For robust reason, this interpolation is NOT done on coarse grids.
+        //! angle1/2 is defined as the complement of the angle between face normal and face-center/cell-center line.
+        //! meaning that, (90 - angle1/2) is the angle between the face normal and the face-cell center line.
+        //! angle1, angle2 = 0, represent completely orthogonal right angle, perfect quality.
+        if (isFineGrid && angle1 > skewnessAngle && angle2 > skewnessAngle)
+        {
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                f1[m] += dqdxL[m] * dxnL + dqdyL[m]* dynL + dqdzL[m]* dznL;
+                f2[m] += dqdxR[m] * dxnR + dqdyR[m]* dynR + dqdzR[m]* dznR;
+            }
+
+            //! Only consider the rho limiter, may consider p limiter in future.
+            tL += dtdxL * dxnL + dtdyL * dynL + dtdzL * dznL;
+            tR += dtdxR * dxnR + dtdyR * dynR + dtdzR * dznR;
+
+            if (tL < SMALL)
+            {
+                tL = fL[nEquation];
+            }
+            if (tR < SMALL)
+            {
+                tR = fR[nEquation];
+            }
+
+            //! Quantities at the face.
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                fMid[m] = primitiveVariableFace[m];
+            }
+
+            tMid = primitiveVariableFace[nEquation];
+        }
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            dfdn[m] = 0.0;
+        }
+        RDouble dtdn = 0.0;
+
+        if (angle1 > 0.0 && angle2 > 0.0 && ABS(dL) > TINY && ABS(dR) > TINY)
+        {
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                dfd1[m] = (f1[m] - fMid[m]) / dL;
+            }
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                dfd2[m] = (f2[m] - fMid[m]) / dR;
+            }
+
+            RDouble dtd1 = (tL - tMid) / dL;
+            RDouble dtd2 = (tR - tMid) / dR;
+
+            RDouble dtmp = dL * dL + dR * dR;
+            RDouble weightL = dL * dL / dtmp;
+            RDouble weightR = 1.0 - weightL;
+
+            if (iFace < nBoundFace)
+            {
+                UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+                int bcType = bcRegion->GetBCType();
+
+                if (bcType != PHENGLEI::INTERFACE)
+                {
+                    weightL = 1.0;
+                    weightR = 0.0;
+                }
+            }
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                dfdn[m] = weightL * dfd1[m] + weightR * dfd2[m];
+            }
+
+            dtdn = dtd1 * weightL + dtd2 * weightR;
+        }
+
+        RDouble weightL = deltaL[jFace];
+        RDouble weightR = deltaR[jFace];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            dfdx[m] = weightL * dqdxL[m] + weightR * dqdxR[m];
+            dfdy[m] = weightL * dqdyL[m] + weightR * dqdyR[m];
+            dfdz[m] = weightL * dqdzL[m] + weightR * dqdzR[m];
+        }
+
+        for (int m = IU; m <= IW; ++ m)
+        {
+            dfdt1[m] = t1x * dfdx[m] + t1y * dfdy[m] + t1z * dfdz[m];
+            dfdt2[m] = t2x * dfdx[m] + t2y * dfdy[m] + t2z * dfdz[m];
+        }
+
+        //! Now true gradients. 
+        for (int m = IU; m <= IW; ++ m)
+        {
+            dfdx[m] = nxs * dfdn[m] + t1x * dfdt1[m] + t2x * dfdt2[m];
+            dfdy[m] = nys * dfdn[m] + t1y * dfdt1[m] + t2y * dfdt2[m];
+            dfdz[m] = nzs * dfdn[m] + t1z * dfdt1[m] + t2z * dfdt2[m];
+        }
+        
+        RDouble dudx = dfdx[IU];
+        RDouble dudy = dfdy[IU];
+        RDouble dudz = dfdz[IU];
+
+        RDouble dvdx = dfdx[IV];
+        RDouble dvdy = dfdy[IV];
+        RDouble dvdz = dfdz[IV];
+
+        RDouble dwdx = dfdx[IW];
+        RDouble dwdy = dfdy[IW];
+        RDouble dwdz = dfdz[IW];
+
+        RDouble qNorm = 0.0;         
+        // if (nChemical == 1)
+        // {
+        //     for (int iSpecies = 0; iSpecies < numberOfSpecies; ++ iSpecies)
+        //     {
+        //         qNorm += rhoDiffusion[iSpecies][jFace] * hintSpecies[iSpecies][jFace] * dfdn[iSpecies + nm];
+        //     }
+// 
+        //     for (int m = nm; m < nLaminar; ++ m)
+        //     {
+        //         fvis[m] = rhoDiffusion[m - nm][jFace] * dfdn[m];
+        //     }
+        // }
+        
+        qNorm += kCpFace * dtdn;
+        RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+        RDouble vis = viscousLaminarFace + viscousTurbulenceFace[jFace];
+        RDouble um  = fMid[1];
+        RDouble vm  = fMid[2];
+        RDouble wm  = fMid[3];
+
+        //! Stress components.
+        txx = vis * (two * dudx - divv2p3);
+        tyy = vis * (two * dvdy - divv2p3);
+        tzz = vis * (two * dwdz - divv2p3);
+        txy = vis * (dudy + dvdx);
+        txz = vis * (dudz + dwdx);
+        tyz = vis * (dvdz + dwdy);
+
+        if (nrokplus > 0)
+        {
+            RDouble rkl  = fL[IR] * qTurb[0][le];
+            RDouble rkr  = fR[IR] * qTurb[0][re];
+            RDouble rhok = half * (rkl + rkr) * refReNumber;
+            if (nolstress > 0)
+            {
+                RDouble b11 = half * (aniss[0][le] + aniss[0][re]);
+                RDouble b22 = half * (aniss[1][le] + aniss[1][re]);
+                RDouble b12 = half * (aniss[2][le] + aniss[2][re]);
+                RDouble b13 = half * (aniss[3][le] + aniss[3][re]);
+                RDouble b23 = half * (aniss[4][le] + aniss[4][re]);
+                RDouble b33 = - b11 - b22;
+                txx = txx + b11 - two3rd * rhok;
+                tyy = tyy + b22 - two3rd * rhok;
+                tzz = tzz + b33 - two3rd * rhok;
+                txy = txy + b12;
+                txz = txz + b13;
+                tyz = tyz + b23;
+            }
+            else
+            {
+                txx = txx - two3rd * rhok;
+                tyy = tyy - two3rd * rhok;
+                tzz = tzz - two3rd * rhok;
+            }
+        }
+
+        fvis[IR ] = 0.0;
+        fvis[IRU] = nxs * txx + nys * txy + nzs * txz;
+        fvis[IRV] = nxs * txy + nys * tyy + nzs * tyz;
+        fvis[IRW] = nxs * txz + nys * tyz + nzs * tzz;
+        fvis[IRE] = um * fvis[IRU] + vm * fvis[IRV] + wm * fvis[IRW] + qNorm;
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            flux[m] = - oRefReNumber * area[iFace] * fvis[m];
+        }
+
+         delete []fvis;    fvis = NULL;
+         delete []f1;    f1 = NULL;
+         delete []f2;    f2 = NULL;
+         delete []fMid;    fMid = NULL;
+         delete []dfdx;    dfdx = NULL;
+         delete []dfdy;    dfdy = NULL;
+         delete []dfdz;    dfdz = NULL;
+     
+         delete []dfd1;    dfd1 = NULL;
+         delete []dfd2;    dfd2 = NULL;
+         delete []dfdn;    dfdn = NULL;
+         delete []dfdt1;    dfdt1 = NULL;
+         delete []dfdt2;    dfdt2 = NULL;
+}
+#endif
+
+void NSSolverUnstruct::ComputeVisflux(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nBoundFace = grid->GetNBoundFace();
+
+    int *leftCellofFace = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    RDouble **dqdx = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **dqdy = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **dqdz = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradPrimtiveVarZ"));
+
+    RDouble **dtdx = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradTemperatureX"));
+    RDouble **dtdy = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradTemperatureY"));
+    RDouble **dtdz = reinterpret_cast <RDouble **> (gridIn->GetDataPtr("gradTemperatureZ"));
+
+    RDouble  **flux = faceProxy->GetFlux();
+
+    RDouble *deltaL = faceProxy->GetWeightL();
+    RDouble *deltaR = faceProxy->GetWeightR();
+
+    NSFaceValue *faceVariable = faceProxy->GetNSFaceValue();
+
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+    
+    RDouble *xcc  = grid->GetCellCenterX();
+    RDouble *ycc  = grid->GetCellCenterY();
+    RDouble *zcc  = grid->GetCellCenterZ();
+
+    RDouble *xfc  = grid->GetFaceCenterX();
+    RDouble *yfc  = grid->GetFaceCenterY();
+    RDouble *zfc  = grid->GetFaceCenterZ();
+
+    RDouble **rhoDiffusion = faceVariable->GetRhoDS()->GetField();
+    RDouble **hintSpecies = faceVariable->GetHintS()->GetField();
+    RDouble **primitiveVariableFace = faceVariable->GetPrim()->GetField();
+    RDouble **tm     = faceVariable->GetT()->GetField();
+
+    RDouble *kCp     = faceVariable->GetKCP();
+    RDouble *viscousLaminarFace   = faceVariable->GetMUL();
+    RDouble *viscousTurbulenceFace = faceVariable->GetMUT();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+
+    int nEquation = GetNumberOfEquations();
+
+    int nm = parameters->GetNSEquationNumber();
+
+    RDouble refReNumber  = parameters->GetRefReNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int nolstress = GlobalDataBase::GetIntParaFromDB("nolstress");
+    int nrokplus  = GlobalDataBase::GetIntParaFromDB("nrokplus");
+
+    RDouble skewnessAngle = parameters->GetSkewnessAngle();
+
+    RDouble **t    = reinterpret_cast<RDouble **> (grid->GetDataPtr("t"));
+    RDouble **primitiveVariable = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+
+    RDouble **qTurb = 0;
+    RDouble ** aniss  = 0;
+
+    if (nrokplus > 0)
+    {
+        qTurb = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+        aniss  = reinterpret_cast<RDouble **> (grid->GetDataPtr("aniss"));
+    }
+
+    RDouble *fvis = new RDouble[nLaminar];
+
+    RDouble *dfdx = new RDouble[nEquation];
+    RDouble *dfdy = new RDouble[nEquation];
+    RDouble *dfdz = new RDouble[nEquation];
+
+    RDouble *dfd1  = new RDouble[nEquation];
+    RDouble *dfd2  = new RDouble[nEquation];
+    RDouble *dfdn  = new RDouble[nEquation];
+    RDouble *dfdt1 = new RDouble[nEquation];
+    RDouble *dfdt2 = new RDouble[nEquation];
+
+    RDouble *f1    = new RDouble[nEquation];
+    RDouble *f2    = new RDouble[nEquation];
+    RDouble *fMid  = new RDouble[nEquation];
+
+    RDouble t1x, t1y, t1z, t2x, t2y, t2z;
+    RDouble txx,tyy,tzz;
+    RDouble txy,txz,tyz;
+    
+    bool isFineGrid = grid->IsFinestGrid();
+    
+    using namespace GAS_SPACE;
+    RDouble coefficientofstateEquation = gas->GetCoefficientOfStateEquation();
+
+    using namespace IDX;
+    for (int iFace = localStart; iFace < localEnd; ++ iFace)
+    {
+        int le = leftCellofFace [iFace];
+        int re = rightCellofFace[iFace];
+        int jFace  = iFace - localStart;
+
+        RDouble nxs = xfn[iFace];
+        RDouble nys = yfn[iFace];
+        RDouble nzs = zfn[iFace];
+
+        //! Get first tangential vector on the face.
+        if (abs(nxs) > SMALL)
+        {
+            t1x =   nys;
+            t1y = - nxs;
+            t1z =   0.0;
+        }
+        else if (abs(nys) > SMALL)
+        {
+            t1x = - nys;
+            t1y =   nxs;
+            t1z =   0.0;
+        }
+        else if (abs(nzs) > SMALL)
+        {
+            t1x =   0.0;
+            t1y = - nzs;
+            t1z =   nys;
+        }
+        else
+        {
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                flux[m][jFace] = 0.0;
+            }
+            continue;
+        }
+
+        //! Normalize the tangential vector.
+        RDouble oNormal = 1.0 / DISTANCE(t1x, t1y, t1z);
+        t1x *= oNormal;
+        t1y *= oNormal;
+        t1z *= oNormal;
+
+        //! Get the second tangential vector by cross dot t1 to normal.
+        t2x = nys * t1z - nzs * t1y;
+        t2y = nzs * t1x - nxs * t1z;
+        t2z = nxs * t1y - nys * t1x;
+
+        RDouble dxL = xcc[le] - xfc[iFace];
+        RDouble dyL = ycc[le] - yfc[iFace];
+        RDouble dzL = zcc[le] - zfc[iFace];
+
+        RDouble dxR = xcc[re] - xfc[iFace];
+        RDouble dyR = ycc[re] - yfc[iFace];
+        RDouble dzR = zcc[re] - zfc[iFace];
+
+        RDouble dL = nxs * dxL + nys * dyL + nzs * dzL;
+        RDouble dR = nxs * dxR + nys * dyR + nzs * dzR;
+
+        RDouble distTemp = - dL / (DISTANCE(dxL, dyL, dzL) + SMALL);
+        distTemp = MIN(distTemp,  1.0);
+        distTemp = MAX(distTemp, -1.0);
+        RDouble angle1 = asin(distTemp) * 180.0 / PI;
+     
+        distTemp = dR / (DISTANCE(dxR, dyR, dzR) + SMALL);
+        distTemp = MIN(distTemp,  1.0);
+        distTemp = MAX(distTemp, -1.0);
+        RDouble angle2 = asin(distTemp) * 180.0 / PI;
+
+        RDouble dxnL  = nxs * dL - dxL;
+        RDouble dynL  = nys * dL - dyL;
+        RDouble dznL  = nzs * dL - dzL;
+
+        RDouble dxnR  = nxs * dR - dxR;
+        RDouble dynR  = nys * dR - dyR;
+        RDouble dznR  = nzs * dR - dzR;
+
+        //! Quantities at points 1 and 2.
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            f1[m] = primitiveVariable[m][le];
+            f2[m] = primitiveVariable[m][re];
+        }
+
+        RDouble tL = t[ITT][le];
+        RDouble tR = t[ITT][re];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            fMid[m] = half * (f1[m] + f2[m]);
+        }
+        RDouble tMid = half * (tL + tR);
+
+        if (iFace < nBoundFace)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+            int bcType = bcRegion->GetBCType();
+            if (IsWall(bcType))
+            {
+                tMid = tm[ITT][jFace];
+                fMid[IDX::IR] = fMid[IDX::IP] / (coefficientofstateEquation * tMid);
+            }
+        }
+
+        //! More accurate for skewness cells.
+        //! If the celLoadResidualsl degenerates too much, then interpolate the cell center value
+        //! to the left and right points that vertical to the face normal.
+        //! However, it will effect the robustness, so the skewnessAngle is suggested to be larger than 60 degree
+        //! skewnessAngle, more large, more robust.
+        //! For robust reason, this interpolation is NOT done on coarse grids.
+        //! angle1/2 is defined as the complement of the angle between face normal and face-center/cell-center line.
+        //! meaning that, (90 - angle1/2) is the angle between the face normal and the face-cell center line.
+        //! angle1, angle2 = 0, represent completely orthogonal right angle, perfect quality.
+        if (isFineGrid && angle1 > skewnessAngle && angle2 > skewnessAngle)
+        {
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                f1[m] += dqdx[m][le] * dxnL + dqdy[m][le] * dynL + dqdz[m][le] * dznL;
+                f2[m] += dqdx[m][re] * dxnR + dqdy[m][re] * dynR + dqdz[m][re] * dznR;
+            }
+
+            //! Only consider the rho limiter, may consider p limiter in future.
+            tL += dtdx[ITT][le] * dxnL + dtdy[ITT][le] * dynL + dtdz[ITT][le] * dznL;
+            tR += dtdx[ITT][re] * dxnR + dtdy[ITT][re] * dynR + dtdz[ITT][re] * dznR;
+
+            if (tL < SMALL)
+            {
+                tL = t[ITT][le];
+            }
+            if (tR < SMALL)
+            {
+                tR = t[ITT][re];
+            }
+
+            //! Quantities at the face.
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                fMid[m] = primitiveVariableFace[m][jFace];
+            }
+
+            tMid = tm[ITT][jFace];
+        }
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            dfdn[m] = 0.0;
+        }
+        RDouble dtdn = 0.0;
+
+        if (angle1 > 0.0 && angle2 > 0.0 && ABS(dL) > TINY && ABS(dR) > TINY)
+        {
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                dfd1[m] = (f1[m] - fMid[m]) / dL;
+            }
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                dfd2[m] = (f2[m] - fMid[m]) / dR;
+            }
+
+            RDouble dtd1 = (tL - tMid) / dL;
+            RDouble dtd2 = (tR - tMid) / dR;
+
+            RDouble dtmp = dL * dL + dR * dR;
+            RDouble weightL = dL * dL / dtmp;
+            RDouble weightR = 1.0 - weightL;
+
+            if (iFace < nBoundFace)
+            {
+                UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+                int bcType = bcRegion->GetBCType();
+
+                if (bcType != PHENGLEI::INTERFACE)
+                {
+                    weightL = 1.0;
+                    weightR = 0.0;
+                }
+            }
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                dfdn[m] = weightL * dfd1[m] + weightR * dfd2[m];
+            }
+
+            dtdn = dtd1 * weightL + dtd2 * weightR;
+        }
+
+        RDouble weightL = deltaL[jFace];
+        RDouble weightR = deltaR[jFace];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            dfdx[m] = weightL * dqdx[m][le] + weightR * dqdx[m][re];
+            dfdy[m] = weightL * dqdy[m][le] + weightR * dqdy[m][re];
+            dfdz[m] = weightL * dqdz[m][le] + weightR * dqdz[m][re];
+        }
+
+        for (int m = IU; m <= IW; ++ m)
+        {
+            dfdt1[m] = t1x * dfdx[m] + t1y * dfdy[m] + t1z * dfdz[m];
+            dfdt2[m] = t2x * dfdx[m] + t2y * dfdy[m] + t2z * dfdz[m];
+        }
+
+        //! Now true gradients. 
+        for (int m = IU; m <= IW; ++ m)
+        {
+            dfdx[m] = nxs * dfdn[m] + t1x * dfdt1[m] + t2x * dfdt2[m];
+            dfdy[m] = nys * dfdn[m] + t1y * dfdt1[m] + t2y * dfdt2[m];
+            dfdz[m] = nzs * dfdn[m] + t1z * dfdt1[m] + t2z * dfdt2[m];
+        }
+        
+        RDouble dudx = dfdx[IU];
+        RDouble dudy = dfdy[IU];
+        RDouble dudz = dfdz[IU];
+
+        RDouble dvdx = dfdx[IV];
+        RDouble dvdy = dfdy[IV];
+        RDouble dvdz = dfdz[IV];
+
+        RDouble dwdx = dfdx[IW];
+        RDouble dwdy = dfdy[IW];
+        RDouble dwdz = dfdz[IW];
+
+        RDouble qNorm = 0.0;         
+        if (nChemical == 1)
+        {
+            for (int iSpecies = 0; iSpecies < numberOfSpecies; ++ iSpecies)
+            {
+                qNorm += rhoDiffusion[iSpecies][jFace] * hintSpecies[iSpecies][jFace] * dfdn[iSpecies + nm];
+            }
+
+            for (int m = nm; m < nLaminar; ++ m)
+            {
+                fvis[m] = rhoDiffusion[m - nm][jFace] * dfdn[m];
+            }
+        }
+        
+        qNorm += kCp[jFace] * dtdn;
+        RDouble divv2p3 = two3rd * (dudx + dvdy + dwdz);
+
+        RDouble vis = viscousLaminarFace[jFace] + viscousTurbulenceFace[jFace];
+        RDouble um  = fMid[1];
+        RDouble vm  = fMid[2];
+        RDouble wm  = fMid[3];
+
+        //! Stress components.
+        txx = vis * (two * dudx - divv2p3);
+        tyy = vis * (two * dvdy - divv2p3);
+        tzz = vis * (two * dwdz - divv2p3);
+        txy = vis * (dudy + dvdx);
+        txz = vis * (dudz + dwdx);
+        tyz = vis * (dvdz + dwdy);
+
+        if (nrokplus > 0)
+        {
+            RDouble rkl  = primitiveVariable[IR][le] * qTurb[0][le];
+            RDouble rkr  = primitiveVariable[IR][re] * qTurb[0][re];
+            RDouble rhok = half * (rkl + rkr) * refReNumber;
+            if (nolstress > 0)
+            {
+                RDouble b11 = half * (aniss[0][le] + aniss[0][re]);
+                RDouble b22 = half * (aniss[1][le] + aniss[1][re]);
+                RDouble b12 = half * (aniss[2][le] + aniss[2][re]);
+                RDouble b13 = half * (aniss[3][le] + aniss[3][re]);
+                RDouble b23 = half * (aniss[4][le] + aniss[4][re]);
+                RDouble b33 = - b11 - b22;
+                txx = txx + b11 - two3rd * rhok;
+                tyy = tyy + b22 - two3rd * rhok;
+                tzz = tzz + b33 - two3rd * rhok;
+                txy = txy + b12;
+                txz = txz + b13;
+                tyz = tyz + b23;
+            }
+            else
+            {
+                txx = txx - two3rd * rhok;
+                tyy = tyy - two3rd * rhok;
+                tzz = tzz - two3rd * rhok;
+            }
+        }
+
+        fvis[IR ] = 0.0;
+        fvis[IRU] = nxs * txx + nys * txy + nzs * txz;
+        fvis[IRV] = nxs * txy + nys * tyy + nzs * tyz;
+        fvis[IRW] = nxs * txz + nys * tyz + nzs * tzz;
+        fvis[IRE] = um * fvis[IRU] + vm * fvis[IRV] + wm * fvis[IRW] + qNorm;
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            flux[m][jFace] = - oRefReNumber * area[iFace] * fvis[m];
+        }
+    }
+
+    delete []fvis;    fvis = NULL;
+
+    delete []dfdx;    dfdx = NULL;
+    delete []dfdy;    dfdy = NULL;
+    delete []dfdz;    dfdz = NULL;
+
+    delete []dfd1;    dfd1 = NULL;
+    delete []dfd2;    dfd2 = NULL;
+    delete []dfdn;    dfdn = NULL;
+    delete []dfdt1;    dfdt1 = NULL;
+    delete []dfdt2;    dfdt2 = NULL;
+
+    delete []f1;    f1 = NULL;
+    delete []f2;    f2 = NULL;
+    delete []fMid;    fMid = NULL;
+}
+
+void NSSolverUnstruct::CalculateBoundaryData()
+{
+    CalculateMassFluxRatio();
+}
+
+void NSSolverUnstruct::Boundary(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme"); 
+    CalculateBoundaryData();
+
+    using namespace PHENGLEI;
+    
+    bool isViscous = parameters->IsViscous();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+   
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+    //! Parallel
+    int currentZone = grid->GetOrdinaryGridIndex();
+    //! Serial
+    if (currentZone == -1)
+    {
+        currentZone = grid->GetZoneID();
+    }
+
+    int MixingPlaneNumber = 0;
+    string MixingIn, MixingOut;
+    if (referenceFrame == ROTATIONAL_FRAME)
+    {
+        int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+        string MixingPlane[100];
+        GlobalDataBase::GetData("MixingPlane", &MixingPlane, PHSTRING, 2 * nTurboZone - 2);
+
+        if (currentZone == 0)
+        {
+            MixingOut = MixingPlane[2 * currentZone];
+        }
+        else if (currentZone == nTurboZone)
+        {
+            MixingIn = MixingPlane[2 * currentZone - 1];
+        }
+        else
+        {
+            MixingIn  = MixingPlane[2 * currentZone - 1];
+            MixingOut = MixingPlane[2 * currentZone];
+        }
+    }
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+        if (bcName == MixingIn || bcName == MixingOut)
+        {
+            continue;
+        }
+
+        if (IsInterface(bcType))
+        {
+            continue;
+        }
+        else if (bcType == EXTRAPOLATION)
+        {
+            OutflowBCRegion(grid, bcRegion);
+        }
+        else if (IsWall(bcType))
+        {
+            if (!isViscous)
+            {
+                SymmetryBCRegion(grid, bcRegion);
+            }
+            else if (wallTemperature <= 0.0)
+            {
+                ViscousAdiabaticWallBCRegion(gridIn, bcRegion);
+            }
+            else
+            {
+                ViscousIsotropicWallBCRegion(grid, bcRegion);
+            }
+        }
+        else if (bcType == SYMMETRY)
+        {
+            SymmetryBCRegion(grid, bcRegion);
+        }
+        else if (bcType == FARFIELD)
+        {
+            FarfieldBCRegion(grid, bcRegion);
+        }
+        else if (bcType == INFLOW)
+        {
+            InflowBCRegion(gridIn, bcRegion);
+        }
+        else if (bcType == OUTFLOW)
+        {
+            OutflowBCRegion(gridIn, bcRegion);
+        }
+        else if (bcType == PRESSURE_OUTLET)
+        {
+            PressureOutletBCRegion(gridIn, bcRegion);
+        }
+        else if (bcType == PRESSURE_INLET)
+        {
+            PressureInletBCRiemannRegion(gridIn, bcRegion);
+        }
+        else if (bcType == MASS_FLOW_INLET)
+        {
+            MassFlowInletBCRegion(gridIn, bcRegion);
+        }
+        else if (bcType == MASS_FLOW_OUTLET)
+        {
+            MassFlowOutletBCRegion(gridIn, bcRegion);
+        }
+        else if (bcType == OVERSET)
+        {
+            OutflowBCRegion(gridIn, bcRegion);
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("Error: this boundary type does not exist!\n");
+        }
+    }
+}
+
+//! this is from Geo_UnstructGrid
+void NSSolverUnstruct::CornerPoint(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **qnode = reinterpret_cast <RDouble **> (grid->GetDataPtr("qnode"));
+
+    int nTotalNode = grid->GetNTotalNode();
+    int nBoundFace = grid->GetNBoundFace();
+    int *face2node = grid->GetFace2Node();
+    int nTotalCell = grid->GetNTotalCell();
+    int *node_number_of_each_face = grid->GetNodeNumberOfEachFace();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+    //! corner point of periodic boundary and solid wall boundary.
+    int * corner_point = new int[nTotalNode];
+
+    for (int ipoint = 0; ipoint < nTotalNode; ++ipoint)
+    {
+        corner_point[ipoint] = 0;
+    }
+
+    int nodepos = 0;
+    int pt;
+
+    //! find corner point.
+    for (int iFace = 0; iFace < nBoundFace; iFace++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        int bcType = bcRegion->GetBCType();
+
+        if (bcType == -1)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++j)
+            {
+                pt = face2node[nodepos + j];
+                corner_point[pt] = 1;
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+    nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; iFace++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        int bcType = bcRegion->GetBCType();
+        if (bcType == 2)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++j)
+            {
+                pt = face2node[nodepos + j];
+                if (corner_point[pt] == 1)
+                {
+                    corner_point[pt] = 2;
+                }
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    int le, re, bcType;
+    nodepos = 0;
+    for (int iFace = 0; iFace < nBoundFace; ++iFace)
+    {
+        le = leftCellOfFace[iFace];
+        re = iFace + nTotalCell;
+
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        bcType = bcRegion->GetBCType();
+
+        if (bcType == 2)
+        {
+            for (int j = 0; j < node_number_of_each_face[iFace]; ++j)
+            {
+                pt = face2node[nodepos + j];
+
+                //! for corner point
+                if (corner_point[pt] == 2)
+                {
+                    for (int m = 1; m <= 3; m++)
+                    {
+                        q[m][iFace]=0;
+                    }
+                }
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    delete[] corner_point;
+}
+
+void NSSolverUnstruct::ComputeMassFlow(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    using namespace PHENGLEI;
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        
+        if (bcType == INFLOW)
+        {
+            ComputeMassInFlow(gridIn, bcRegion);
+        }
+        else if (bcType == OUTFLOW)
+        {
+            ComputeMassOutFlow(gridIn, bcRegion);
+        }
+    }
+}
+
+void NSSolverUnstruct::ComputeMassInFlow(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+
+    RDouble massIn  = 0.0;
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        //! iFace is the face number in the set of faceIndex.
+        int iFace = *iter;
+        int le = leftCellofFace[iFace];
+        int re = rightCellofFace[iFace];
+
+        RDouble rmi, umi, vmi, wmi, vni;
+        RDouble rmo, umo, vmo, wmo, vno;
+
+        rmi = q[IR][le];
+        umi = q[IU][le];
+        vmi = q[IV][le];
+        wmi = q[IW][le];
+        vni = xfn[iFace] * umi + yfn[iFace] * vmi + zfn[iFace] * wmi;
+
+        rmo = q[IR][re];
+        umo = q[IU][re];
+        vmo = q[IV][re];
+        wmo = q[IW][re];
+        vno = xfn[iFace] * umo + yfn[iFace] * vmo + zfn[iFace] * wmo;
+
+        massIn -= half * (rmi * vni + rmo * vno);
+    }
+    GlobalDataBase::UpdateData("massIn", &massIn, PHDOUBLE, 1);
+}
+
+void NSSolverUnstruct::ComputeMassOutFlow(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+
+    RDouble massOut = 0.0;
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        //! iFace is the face number in the set of faceIndex.
+        int iFace = *iter;
+        int le = leftCellofFace[iFace];
+
+        RDouble rm, um, vm, wm, vn;
+        rm = q[IR][le];
+        um = q[IU][le];
+        vm = q[IV][le];
+        wm = q[IW][le];
+        vn = xfn[iFace] * um + yfn[iFace] * vm + zfn[iFace] * wm;
+
+        massOut += rm * vn;
+    }
+    GlobalDataBase::UpdateData("massOut", &massOut, PHDOUBLE, 1);
+}
+
+void NSSolverUnstruct::BoundaryQlQrFix(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nBoundFace = grid->GetNBoundFace();
+    int nMid;
+    int nTotalCell = grid->GetNTotalCell();
+
+    // GMRESBoundary
+    faceProxy->SetlocalStart(localStart);
+    faceProxy->SetlocalEnd(localEnd);
+    faceProxy->SetnBoundFace(nBoundFace);
+    faceProxy->SetnTotalCell(nTotalCell);
+
+    //! Check if there are boundary faces. If no, return.
+    if (localStart >= nBoundFace)
+    {
+        return;
+    }
+
+    if (localEnd <= nBoundFace)
+    {
+        //! If they are all boundary faces.
+        nMid = localEnd;
+    }
+    else
+    {
+        //! Part of them are boundary faces.
+        nMid = nBoundFace;
+    }
+
+    //! Get grid information.
+    RDouble  *xfn  = grid->GetFaceNormalX();
+    RDouble  *yfn  = grid->GetFaceNormalY();
+    RDouble  *zfn  = grid->GetFaceNormalZ();
+    RDouble *faceVelocityX = grid->GetFaceVelocityX();
+    RDouble *faceVelocityY = grid->GetFaceVelocityY();
+    RDouble *faceVelocityZ = grid->GetFaceVelocityZ();
+    
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nChemical = parameters->GetChemicalFlag();
+
+    int nEquation = GetNumberOfEquations();
+
+    bool isViscous = parameters->IsViscous();
+    RDouble tWall = parameters->GetWallTemperature();
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble coefficientOfStateEquation = gas->GetCoefficientOfStateEquation();
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    int isAle = parameters->GetIsCodeOfAleModel();
+
+    using namespace PHSPACE;
+    using namespace PHENGLEI;
+
+    RDouble **qL = faceProxy->GetQL();
+    RDouble **qR = faceProxy->GetQR();
+
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    RDouble **q = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+
+    RDouble *primitiveVariable = new RDouble[nEquation];
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme"); // GMRES3D
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+
+    int *nodeBCType = reinterpret_cast <int *> (grid->GetDataPtr("nodeBCType"));
+    int *node_number_of_each_face = grid->GetNodeNumberOfEachFace();
+    int *face2node = grid->GetFace2Node();
+
+
+    using namespace IDX;
+
+#ifdef USE_GMRESSOLVER
+    // GMRESBCorrection
+    if(localStart < nMid)
+    {
+        int nBCRegion = unstructBCSet->GetnBCRegion();
+        for(int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion++)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+            int bcType = bcRegion->GetBCType();
+            if(IsWall(bcType))
+            {
+                vector<int>* faceIndex = bcRegion->GetFaceIndex();
+                faceProxy->SetWallType(isViscous);
+                faceProxy->SetWallFaceIndex(faceIndex);
+            }
+        }
+    }
+#endif
+
+    for (int iFace = localStart; iFace < nMid; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        int bcType = bcRegion->GetBCType();
+        int jFace = iFace - localStart;
+        int nodepos = 0;
+
+        if (bcType != PHENGLEI::SOLID_SURFACE && bcType != PHENGLEI::SYMMETRY)
+        {
+            nodepos += node_number_of_each_face[iFace];
+            continue;
+        }
+
+        int le = leftCellofFace[iFace];
+        int re = rightCellofFace[iFace];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            RFloat temp =  half * (q[m][le] + q[m][re]);
+            qL[m][jFace] = temp;
+            qR[m][jFace] = temp;
+        }
+
+        if( tscheme == GMRES )
+        {
+            continue;
+        }
+
+        if (bcType == PHENGLEI::SYMMETRY)
+        {
+            RDouble vn = 2.0 * (xfn[iFace] * qL[IU][jFace] + yfn[iFace] * qL[IV][jFace] + zfn[iFace] * qL[IW][jFace]);
+
+            qR[IR][jFace] = qL[IR][jFace];
+            qR[IU][jFace] = qL[IU][jFace] - vn * xfn[iFace];
+            qR[IV][jFace] = qL[IV][jFace] - vn * yfn[iFace];
+            qR[IW][jFace] = qL[IW][jFace] - vn * zfn[iFace];
+            qR[IP][jFace] = qL[IP][jFace];
+        }
+
+        if (bcType == PHENGLEI::SOLID_SURFACE && isViscous)
+        {
+            RDouble uWall = 0.0;
+            RDouble vWall = 0.0;
+            RDouble wWall = 0.0;                
+            Data_Param *bcData  = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace])->GetBCParamDataBase();
+            if(bcData)
+            {
+                if (bcData->IsExist("uWall", PHDOUBLE, 1))
+                {
+                    bcData->GetData("uWall", &uWall, PHDOUBLE, 1);
+                    bcData->GetData("vWall", &vWall, PHDOUBLE, 1);
+                    bcData->GetData("wWall", &wWall, PHDOUBLE, 1);
+                }
+            }            
+
+            RDouble velocityXWall = uWall;
+            RDouble velocityYWall = vWall;
+            RDouble velocityZWall = wWall;
+            if (isUnsteady && isAle)
+            {
+                velocityXWall = faceVelocityX[iFace] + uWall;
+                velocityYWall = faceVelocityY[iFace] + vWall;
+                velocityZWall = faceVelocityZ[iFace] + wWall;
+            }
+
+            //! set wall velocity for translating frame and rotating frame.
+            if (referenceFrame == TRANSLATIONAL_FRAME || referenceFrame == ROTATIONAL_FRAME)
+            {
+                int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+                string shroud[100];
+                GlobalDataBase::GetData("shroud", &shroud, PHSTRING, nTurboZone);
+
+                //! Parallel
+                int iTurboZone = grid->GetOrdinaryGridIndex();
+                //! Serial
+                if (iTurboZone == -1)
+                {
+                    iTurboZone = grid->GetZoneID();
+                }
+
+                velocityXWall = faceVelocityX[iFace];
+                velocityYWall = faceVelocityY[iFace];
+                velocityZWall = faceVelocityZ[iFace];
+
+                if (bcRegion->GetBCName() == shroud[iTurboZone])
+                {
+                    velocityXWall = 0;
+                    velocityYWall = 0;
+                    velocityZWall = 0;
+                }
+            }
+
+            qL[IU][jFace] = velocityXWall;
+            qL[IV][jFace] = velocityYWall;
+            qL[IW][jFace] = velocityZWall;
+
+            qR[IU][jFace] = velocityXWall;
+            qR[IV][jFace] = velocityYWall;
+            qR[IW][jFace] = velocityZWall;
+
+            if (tWall <= 0.0)
+            {
+                //! Viscous WALL, adiabatic.
+            }
+            else
+            {
+                //! iso-thermal wall.
+                RDouble tw = tWall / refDimensionalTemperature;
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    primitiveVariable[m] = qL[m][jFace];
+                }
+
+                RDouble omav = one;
+                using namespace GAS_SPACE;
+                if (nChemical == 1)
+                {
+                    omav = gas->ComputeMolecularWeightReciprocal(primitiveVariable);
+                }
+
+                RDouble pressureWall = primitiveVariable[IP];
+                RDouble rhoWall  = pressureWall / (coefficientOfStateEquation * tw * omav);
+
+                qL[IR][jFace] = rhoWall;
+                qR[IR][jFace] = rhoWall;
+            }
+        }
+        nodepos += node_number_of_each_face[iFace];
+    }
+
+    delete [] primitiveVariable;
+}
+
+void NSSolverUnstruct::GetInviscidFaceValue(Grid *gridIn, FaceProxy *faceProxy, Limiter * limiter, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    GetQlQr(grid, faceProxy, localStart, localEnd);
+
+    GetGamaLR(grid, faceProxy, localStart, localEnd);
+
+	GetPressureFactorLR(grid, faceProxy, localStart, localEnd);
+
+    ReConstructFaceValue(grid, faceProxy, limiter, localStart, localEnd);
+
+    BoundaryQlQrFix(grid, faceProxy, localStart, localEnd);
+    if(ifLowSpeedPrecon)
+    {
+        GetTimeCoefficientLR(grid, faceProxy, localStart, localEnd);
+        GetPreconCoefficientLR(grid, faceProxy, localStart, localEnd);
+    }
+}
+
+//! Face values reconstruction by considering scalar limiters.
+void NSSolverUnstruct::ReConstructFaceValue(Grid *gridIn, FaceProxy *faceProxy, Limiter * limiter, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    RDouble *xfc  = grid->GetFaceCenterX();
+    RDouble *yfc  = grid->GetFaceCenterY();
+    RDouble *zfc  = grid->GetFaceCenterZ();
+
+    RDouble *xcc  = grid->GetCellCenterX();
+    RDouble *ycc  = grid->GetCellCenterY();
+    RDouble *zcc  = grid->GetCellCenterZ();
+
+    if(!grid->IsFinestGrid())
+    {
+        //! Reconstruction is not necessary for coarse grid.
+        return;
+    }
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int limiterType = parameters->GetLimiterType();
+    int isInIniting = GlobalDataBase::GetIntParaFromDB("isInIniting");
+    int flowInitMethod = GlobalDataBase::GetIntParaFromDB("flowInitMethod");
+    int tscheme     = GlobalDataBase::GetIntParaFromDB("tscheme");
+    bool isFirstOrder = (limiterType == ILMT_FIRST) || isInIniting;
+    if(isFirstOrder && flowInitMethod != 3)
+    {
+        return;
+    }
+
+    if ( tscheme == GMRES && limiterType == ILMT_VENCAT )
+    {
+        return;
+    }
+
+    // GMRESnolim GMRESSign
+    int* qlsign = faceProxy->GetQLSign();
+    int* qrsign = faceProxy->GetQRSign();
+
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    bool isStructuredLimiter = (limiterType >= ILMT_STRUCT);
+    if (isStructuredLimiter)
+    { 
+        //! Limiter for structured limiter.
+        ReConstructQlQr_STR(gridIn, faceProxy, nEquation, localStart, localEnd);
+        return;
+    }
+
+    RDouble **limit2D = reinterpret_cast <RDouble **> (grid->GetDataPtr("limit2D"));;
+
+    RDouble **dqdx = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **dqdy = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **dqdz = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    RDouble **qL = faceProxy->GetQL();
+    RDouble **qR = faceProxy->GetQR();
+
+    RDouble *qTry = new RDouble[nEquation];
+
+    int reconstructMethod = GlobalDataBase::GetIntParaFromDB("reconmeth");
+    const int RECONSTRUCT_USING_RESPECTIVE_LIMITER = 0;
+    if (reconstructMethod == RECONSTRUCT_USING_RESPECTIVE_LIMITER)
+    {
+        //! Q+, Q- reconstructing using their self limiters.
+        for (int i = localStart; i < localEnd; ++ i)
+        {
+            int le,re,j;
+            j  = i - localStart;
+            le = leftCellofFace[i];
+            re = rightCellofFace[i];
+
+            RDouble dx = xfc[i] - xcc[le];
+            RDouble dy = yfc[i] - ycc[le];
+            RDouble dz = zfc[i] - zcc[le];
+
+            // GMRESSign
+            qlsign[j] = -1;
+            qrsign[j] = -1;
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                qTry[m] = qL[m][j];
+            }
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                RDouble *limit =  limit2D[m];
+                qTry[m] += limit[le] * (dqdx[m][le] * dx + dqdy[m][le] * dy + dqdz[m][le] * dz);
+            }
+
+            if (PositiveCheckForDensityAndPressure(qTry))
+            {
+                //GMRESSign
+                qlsign[j] = 1;
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    qL[m][j] = qTry[m];
+                }
+            }
+
+            dx = xfc[i] - xcc[re];
+            dy = yfc[i] - ycc[re];
+            dz = zfc[i] - zcc[re];
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                qTry[m] = qR[m][j];
+            }
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                RDouble *limit =  limit2D[m];
+                qTry[m] += limit[re] * (dqdx[m][re] * dx + dqdy[m][re] * dy + dqdz[m][re] * dz);
+            }
+
+            if (PositiveCheckForDensityAndPressure(qTry))
+            {
+                //GMRESSign
+                qrsign[j] = 1;
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    qR[m][j] = qTry[m];
+                }
+            }
+        }
+    }
+    else
+    {
+        //! Q+, Q- use the min limiter coefficients of left and right cell.
+        for (int i = localStart; i < localEnd; ++ i)
+        {
+            int le,re,j;
+            j  = i - localStart;
+            le = leftCellofFace[i];
+            re = rightCellofFace[i];
+
+            // GMRESSign
+            qlsign[j] = -1;
+            qrsign[j] = -1;
+
+            RDouble dx = xfc[i] - xcc[le];
+            RDouble dy = yfc[i] - ycc[le];
+            RDouble dz = zfc[i] - zcc[le];
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                qTry[m] = qL[m][j];
+            }
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                RDouble *limit =  limit2D[m];
+                qTry[m] += MIN(limit[le], limit[re]) * (dqdx[m][le] * dx + dqdy[m][le] * dy + dqdz[m][le] * dz);
+            }
+
+            if (PositiveCheckForDensityAndPressure(qTry))
+            {
+                // GMRESSign
+                qlsign[j] = 1;
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    qL[m][j] = qTry[m];
+                }
+            }
+
+            dx = xfc[i] - xcc[re];
+            dy = yfc[i] - ycc[re];
+            dz = zfc[i] - zcc[re];
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                qTry[m] = qR[m][j];
+            }
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                RDouble *limit =  limit2D[m];
+                qTry[m] += MIN(limit[le], limit[re]) * (dqdx[m][re] * dx + dqdy[m][re] * dy + dqdz[m][re] * dz);
+            }
+
+            if (PositiveCheckForDensityAndPressure(qTry))
+            {
+                // GMRESSign
+                qrsign[j] = 1;
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    qR[m][j] = qTry[m];
+                }
+            }
+        }
+    }
+    delete []qTry;
+}
+
+void NSSolverUnstruct::ComputeInviscidFlux(Grid *grid, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    int unstructScheme = GlobalDataBase::GetIntParaFromDB("uns_scheme");
+    int isInMGIniting = GlobalDataBase::GetIntParaFromDB("isInMGIniting");
+    int isInIniting = GlobalDataBase::GetIntParaFromDB("isInIniting");
+    int flowInitMethod = GlobalDataBase::GetIntParaFromDB("flowInitMethod");
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    INVScheme inviscidScheme = GetINVScheme(unstructScheme);
+
+#ifdef USE_GMRESSOLVER
+    // GMRESInit
+    if( 3 == flowInitMethod )
+    {
+        int originaltscheme       = GlobalDataBase::GetIntParaFromDB("OriginalTscheme");
+        int newIterStep           = GlobalDataBase::GetIntParaFromDB("newnstep");
+        int flowInitStep          = GlobalDataBase::GetIntParaFromDB("flowInitStep");
+        // string uns_scheme_name    = GlobalDataBase::GetStrParaFromDB("uns_scheme_name");
+            
+        if( originaltscheme == GMRES && newIterStep <= flowInitStep )
+        {
+            if( unstructScheme == ISCHEME_GMRES_ROE )
+            {
+                inviscidScheme = Roe_Scheme_ConservativeForm;
+            }
+            else if( unstructScheme == ISCHEME_GMRES_Steger )
+            {
+                inviscidScheme = Steger_Scheme;
+            }
+            
+        }
+    }
+#endif
+
+    if ((!grid->IsFinestGrid() && isInMGIniting && !ifLowSpeedPrecon) ||
+        (grid->IsFinestGrid() && isInIniting   && flowInitMethod != 3 && !ifLowSpeedPrecon))
+    {
+        //! The precondition has not been considered for vanleer method.
+        //! so, only in the compressible multi-grid initialization state, run Vanleer.
+        inviscidScheme = Vanleer_Scheme;
+    }
+
+    InviscidFluxWrap(grid, faceProxy, inviscidScheme, localStart, localEnd);
+}
+
+void NSSolverUnstruct::FillGeomProxy(Grid *gridIn, GeomProxy *geom_proxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *vgn  = grid->GetFaceNormalVelocity();
+    RDouble *area = grid->GetFaceArea();
+
+    std::copy(xfn  + localStart, xfn  + localEnd, geom_proxy->GetFaceNormalX());
+    std::copy(yfn  + localStart, yfn  + localEnd, geom_proxy->GetFaceNormalY());
+    std::copy(zfn  + localStart, zfn  + localEnd, geom_proxy->GetFaceNormalZ());
+    std::copy(vgn  + localStart, vgn  + localEnd, geom_proxy->GetFaceVelocity());
+    std::copy(area + localStart, area + localEnd, geom_proxy->GetFaceArea()   );
+}
+
+void NSSolverUnstruct::GetResidual(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = UnstructGridCast(GetGrid(level));
+
+    RDouble **res = reinterpret_cast< RDouble ** > (grid->GetDataPtr("res"));
+
+    int nEquation = GetNumberOfEquations();
+
+    PHSPACE::ComputeResidualonGrid(grid, actkey, res, nEquation);
+}
+
+void NSSolverUnstruct::InviscidFluxWrap(Grid *gridIn, FaceProxy *faceProxy, INVScheme inviscidScheme, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar = parameters->GetLaminarNumber();
+    int nFaceLength = localEnd - localStart;
+    faceProxy->setsize(nFaceLength);
+
+    RDouble **flux = faceProxy->GetFlux();
+    GeomProxy *geomProxy = faceProxy->GetGeomProxy();
+
+    if(systemgridtype == UNSTRUCTGRID)
+    {
+        FillGeomProxy(grid, geomProxy, localStart, localEnd);
+    }
+    else
+    {
+        //! mixgrid
+        //! geomProxy has been set up once for ever.
+    }
+    
+
+    //! Inviscid flux scheme parameters proxy.
+    InviscidSchemeParameter inviscidSchemeParameterProxy;
+
+#ifdef USE_GMRESSOLVER 
+    // GMRESnolim
+    int limiterType     =   parameters->GetLimiterType();
+    int limitVariables  =   parameters->GetLimitVariables();
+    int limitVector     =   parameters->GetLimitVector();
+    inviscidSchemeParameterProxy.SetLimiterType(limiterType);
+    inviscidSchemeParameterProxy.SetLimitModel(limitVariables); // GMRESVenkat
+    inviscidSchemeParameterProxy.SetLimitVector(limitVector);
+
+    // GMRESnolim
+    RDouble *xfc  = grid->GetFaceCenterX();
+    RDouble *yfc  = grid->GetFaceCenterY();
+    RDouble *zfc  = grid->GetFaceCenterZ();
+
+    RDouble *xcc  = grid->GetCellCenterX();
+    RDouble *ycc  = grid->GetCellCenterY();
+    RDouble *zcc  = grid->GetCellCenterZ();
+
+    RDouble **dqdx = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **dqdy = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **dqdz = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    RDouble *nsx            = grid->GetFaceNormalX();
+    RDouble *nsy            = grid->GetFaceNormalY();
+    RDouble *nsz            = grid->GetFaceNormalZ();
+    RDouble *ns             = grid->GetFaceArea();
+    RDouble *vol            = grid->GetCellVolume();
+    RDouble **prim          = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *gama           = reinterpret_cast<RDouble *> (grid->GetDataPtr("gama"));
+    RDouble averageVolume   = grid->GetAverageVolume(); // GMRESVenkat
+
+    vector<int>* neighborCells  = grid->GMRESGetNeighborCells();
+    vector<int>* neighborFaces  = grid->GMRESGetNeighborFaces();
+    vector<int>* neighborLR     = grid->GMRESGetNeighborLR();
+
+    // GMRES2ndCorrection
+    vector<int> BCLeftCells     = grid->GetBCLeftCells();
+    vector<int> BCRightCells    = grid->GetBCRightCells();
+    vector<int> BCFaces         = grid->GetBCFaces();
+
+    // GMRES3D
+    UnstructBCSet* unstructBCSet = grid->GetUnstructBCSet();
+
+    inviscidSchemeParameterProxy.SetFaceCenter(xfc,yfc,zfc);
+    inviscidSchemeParameterProxy.SetCellCenter(xcc,ycc,zcc);
+    inviscidSchemeParameterProxy.SetGradient(dqdx,dqdy,dqdz);
+    inviscidSchemeParameterProxy.SetFaceNormalAbs(nsx,nsy,nsz);
+    inviscidSchemeParameterProxy.SetFaceAreaAbs(ns);
+    inviscidSchemeParameterProxy.SetVolume(vol);
+    inviscidSchemeParameterProxy.SetPrimitive(prim);
+    inviscidSchemeParameterProxy.SetGama(gama);
+    inviscidSchemeParameterProxy.SetNeighborCells(neighborCells);
+    inviscidSchemeParameterProxy.SetNeighborFaces(neighborFaces);
+    inviscidSchemeParameterProxy.SetNeighborLR(neighborLR);
+
+    inviscidSchemeParameterProxy.SetAverageVolume(averageVolume);  // GMRESVenkat
+
+    // GMRES2ndCorrection
+    inviscidSchemeParameterProxy.SetBCLeftCells(BCLeftCells);
+    inviscidSchemeParameterProxy.SetBCRightCells(BCRightCells);
+    inviscidSchemeParameterProxy.SetBCFaces(BCFaces);
+
+    // GMRES3D
+    inviscidSchemeParameterProxy.SetUnstructBCSet(unstructBCSet);
+#endif
+
+    SetInviscidSchemeParameters(&inviscidSchemeParameterProxy, faceProxy, parameters);
+
+    //! The flux is actually computed here!
+    inviscidScheme(faceProxy, &inviscidSchemeParameterProxy);
+
+    RDouble *area = geomProxy->GetFaceArea();
+
+    //! iFace is the global ID, jFace is the local ID in this section.
+    for (int iFace = localStart; iFace < localEnd; ++ iFace)
+    {
+        int jFace = iFace - localStart;
+
+        RDouble &areas = area[jFace];
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            flux[m][jFace] *= areas;
+        }
+    }
+}
+
+void NSSolverUnstruct::RegisterCFDSolverInterfaceField()
+{
+    NSSolver::RegisterCFDSolverInterfaceField();
+
+    NSSolver::RegisterCFDSolverInterfaceFieldUnstruct();
+}
+
+void NSSolverUnstruct::RegisterCFDSolverInterpointField()
+{
+    NSSolver::RegisterCFDSolverInterpointField();
+}
+
+void NSSolverUnstruct::RegisterOversetField()
+{
+    NSSolver::RegisterOversetField();
+}
+
+void NSSolverUnstruct::SolutionFix(Grid *gridIn, RDouble *primitiveVariable, int iCell)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **q = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+
+    int nEquation = GetNumberOfEquations();
+
+    int **cell2face = grid->GetCell2Face();
+    int *faceNumberOfEachCell = grid->GetFaceNumberOfEachCell();
+
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    using namespace GAS_SPACE;
+    using namespace IDX;
+
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        primitiveVariable[m] = zero;
+    }
+
+    int iFace, le, re, neighborCell;
+    RDouble volumeSum, ovolumeSum, vsur;
+    volumeSum = 0.0;
+    for (int icell2face = 0; icell2face < faceNumberOfEachCell[iCell]; ++ icell2face)
+    {
+        iFace = cell2face[iCell][icell2face];
+        le    = leftCellofFace[iFace];
+        re    = rightCellofFace[iFace];
+
+        neighborCell = le;
+        if (iCell == le) neighborCell = re;
+
+        vsur = one;
+
+        volumeSum += vsur;
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            RDouble f = q[m][neighborCell];
+            if (m == IR || m == IP)
+            {
+                f = ABS(f);
+            }
+            primitiveVariable[m] += f * vsur;
+        }
+    }
+    //cout << endl;
+
+    ovolumeSum = 1.0 / volumeSum;
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        primitiveVariable[m] *= ovolumeSum;
+    }
+}
+
+void NSSolverUnstruct::UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble **q  = qProxy->GetField_UNS();
+    RDouble **dq = dqProxy->GetField_UNS();
+
+    RDouble **qnew = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *gamma = reinterpret_cast<RDouble *> (grid->GetDataPtr("gama"));
+    RDouble **t    = reinterpret_cast<RDouble **> (grid->GetDataPtr("t"));
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    //! Three modes for temperature, including the translational-rotational temperature, vibrational temperature and electron temperature.
+    RDouble rm, pm, temperature[3];
+
+
+    int *faceNumberOfEachCell = grid->GetFaceNumberOfEachCell();
+
+    RDouble gama;
+    using namespace GAS_SPACE;
+    using namespace IDX;
+
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    RDouble roo = primitiveVarFarfield[IR];
+    RDouble poo = primitiveVarFarfield[IP];
+    RDouble densityLimit  = 1.0e-6 * roo;
+    RDouble pressureLimit = 1.0e-6 * poo;
+
+    RDouble *primitiveVariable = new RDouble[nEquation];
+    RDouble *qtry = new RDouble[nEquation];
+
+    int *negativeCellList = new int [nTotalCell];
+    PHSPACE::SetField(negativeCellList, 0, nTotalCell);
+
+    int nNegativeCell    = 0;
+    int mostNegativeCell = -1;
+    RDouble mostNegativePressure = PHSPACE::LARGE;
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            primitiveVariable[m] = q[m][iCell];
+        }
+
+        gama = gamma[iCell];
+        //! Obtain the temperature.
+        temperature[ITT] = t[ITT][iCell];
+        if (nTemperatureModel == 1)
+        {
+            temperature[ITV] = temperature[ITT];
+            temperature[ITE] = temperature[ITT];
+        }
+        else
+        {
+            temperature[ITV] = t[ITV][iCell];
+            temperature[ITE] = temperature[ITV];
+            if (nTemperatureModel == 3)
+            {
+                temperature[ITE] = t[ITE][iCell];
+            }
+        }
+        gas->Primitive2Conservative(primitiveVariable, gama, temperature[ITV], temperature[ITE], qtry);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            RDouble dqTemp = dq[m][iCell];
+            qtry[m] += dqTemp;
+        }
+
+        for (int m = 0; m < nTemperatureModel-1; ++ m)
+        {
+            qtry[nLaminar + nChemical + m] += dq[nLaminar + nChemical + m][iCell];
+        }
+
+        //! As input parameter, temperature is the initial temperature of the next iteration step.
+        //! As returned parameter, temperature saves the temperatures of the next time-advancing step.
+        gas->Conservative2Primitive(qtry, gama, primitiveVariable, temperature);
+
+        rm = primitiveVariable[IR];
+        pm = primitiveVariable[IP];
+
+        if (rm < densityLimit || pm < pressureLimit)
+        {
+            if (pm < mostNegativePressure)
+            {
+                negativeCellList[iCell] = 1;
+                mostNegativePressure = pm;
+                mostNegativeCell     = iCell;
+            }
+
+            //cout << "Negative rho or pressure found, level = " << grid->GetLevel() << ", cell = " << iCell << endl;
+            //TK_Exit::ExceptionExit("Negative!");
+
+            nNegativeCell += 1;
+            SolutionFix(grid, primitiveVariable, iCell);
+        }
+
+        if (nChemical == 1)
+        {
+            gas->NormalizePrimitive(primitiveVariable);
+        }
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            qnew[m][iCell] = primitiveVariable[m];
+        }
+    }
+
+    if (nNegativeCell > 0)
+    {
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+        cout.setf(ios::scientific);
+        cout.precision(4);
+        cout << "      Warning: negative pressure appears in " << nNegativeCell << " cells";
+        cout << ", iter = " << GlobalDataBase::GetIntParaFromDB("outnstep") ;
+        cout << ", level = " << grid->GetLevel();
+        cout << ", zone  = " << grid->GetZoneID();
+        cout << ", cellID = " << mostNegativeCell;
+        cout << ", the minimum pressure appears at: (" 
+             << xcc[mostNegativeCell] << ", " << ycc[mostNegativeCell] << ", " << zcc[mostNegativeCell] << "). ";
+
+        int nBoundFace = grid->GetNBoundFace();
+        int **cell2face = grid->GetCell2Face();
+        int isInteriorCell = 1;
+        for (int jFace = 0; jFace < faceNumberOfEachCell[mostNegativeCell]; ++ jFace)
+        {
+            int faceID = cell2face[mostNegativeCell][jFace];
+            if(faceID < nBoundFace)
+            {
+                if(isInteriorCell)
+                {
+                    cout << endl;
+                }
+
+                isInteriorCell = 0;
+                UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[faceID]);
+                int bcType = bcRegion->GetBCType();
+                cout << "            face bcType = " << bcType << endl;
+            }
+        }
+
+        if(isInteriorCell)
+        {
+            cout << " is interior cell ..." << endl;
+        }
+    }
+
+    DelPointer(negativeCellList);
+    DelPointer(primitiveVariable);
+    DelPointer(qtry);
+}
+
+void NSSolverUnstruct::SetGhostDQLUSGS(Grid *gridIn, RDouble **dq, RDouble **q)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    bool isViscous = parameters->IsViscous();
+
+    using namespace PHSPACE;
+    using namespace GAS_SPACE; 
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        if (bcType == PHENGLEI::SYMMETRY || (IsWall(bcType) && !isViscous))
+        {
+            SetSymmBCGhostDQLUSGS(grid, bcRegion, dq, q);
+        }
+        else if (IsWall(bcType) && isViscous)
+        {
+            SetWallBCGhostDQLUSGS(grid, bcRegion, dq, q);
+        }
+        else if (bcType == PHENGLEI::EXTRAPOLATION)
+        {
+            SetExtraBCGhostDQLUSGS(grid, bcRegion, dq, q);
+        }else
+        {
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                //! iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+                int re = rightCellofFace[iFace];
+
+                //! FIX_ALL set DQ = 0.
+                //! Far_FIELD, PROFILE and FIX_V have not been implemented yet.
+                for (int m = 0; m < nLaminar; ++ m)
+                {
+                    dq[m][re] = 0.0;
+                }
+                for (int m = 0; m < nTemperatureModel - 1; m++)
+                {
+                    dq[nLaminar + nChemical + m][re] = 0.0;
+                }
+            }
+        }
+    }
+}
+
+void NSSolverUnstruct::SetSymmBCGhostDQLUSGS(Grid *gridIn, UnstructBC *bcRegionUnstruct, RDouble **dq, RDouble **q)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    //! Get grid metrics.
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+
+    RDouble *gama = reinterpret_cast<RDouble *> (grid->GetDataPtr("gama"));
+    RDouble **t   = reinterpret_cast<RDouble **> (grid->GetDataPtr("t"));
+    Param_NSSolverUnstruct *parameters = GetControlParameters();    
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *primitiveVariable = new RDouble[nEquation];
+    RDouble *Q = new RDouble[nEquation];
+
+    RDouble gam1,tv = 0.0,te = 0.0;
+    RDouble rm, um, vm, wm, pm;
+    RDouble rvn, ru, rv, rw, p_new;
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        //! iFace is the face number in the set of faceIndex.
+        int iFace = *iter;
+        int le = leftCellofFace[iFace];
+        int re = rightCellofFace[iFace];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            primitiveVariable[m] = q[m][le];
+        }
+
+        tv = t[ITT][le];
+        te = tv;
+        if (nTemperatureModel > 1)    //! Consider Two-Temperature model and Three-Temperature model.
+        {
+            tv = t[ITV][le];
+            te = tv;
+            if (nTemperatureModel == 3)
+            {
+                te = t[ITE][le];
+            }
+        }
+        gas->Primitive2Conservative(primitiveVariable, gama[le], tv, te, Q);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            Q[m] += dq[m][le];
+        }
+        for (int m = 0; m < nTemperatureModel - 1; m++)
+        {
+            Q[nLaminar + nChemical + m] += dq[nLaminar + nChemical + m][le];
+        }
+
+        //! Non-conservative variables in re in level n.
+        rm = q[IR][re];
+        um = q[IU][re];
+        vm = q[IV][re];
+        wm = q[IW][re];
+        pm = q[IP][re];
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dq[m][re] = dq[m][le];
+        }
+        for (int m = 0; m < nTemperatureModel - 1; m++)
+        {
+            dq[nLaminar + nChemical + m][re] = dq[nLaminar + nChemical + m][le];
+        }
+
+        //! Inviscid wall or symmetry boundary.
+        dq[IR][re] = dq[IR][le];
+        rvn = 2.0 * (xfn[iFace]*dq[IRU][le] + yfn[iFace]*dq[IRV][le] + zfn[iFace]*dq[IRW][le]);
+        dq[IRU][re] = dq[IRU][le] - xfn[iFace] * rvn;
+        dq[IRV][re] = dq[IRV][le] - yfn[iFace] * rvn;
+        dq[IRW][re] = dq[IRW][le] - zfn[iFace] * rvn;
+        rvn   = 2.0 * (xfn[iFace]*Q[IRU] + yfn[iFace]*Q[IRV] + zfn[iFace]*Q[IRW]);
+        ru    = Q[IRU] - xfn[iFace] * rvn;
+        rv    = Q[IRV] - yfn[iFace] * rvn;
+        rw    = Q[IRW] - zfn[iFace] * rvn;
+        p_new = Q[IRE] - 0.5 * (Q[IRU]*Q[IRU] + Q[IRV]*Q[IRV] + Q[IRW]*Q[IRW]) / Q[IR];
+
+        gam1 = gama[le] - 1.0;
+        dq[IRE][re] = p_new - pm/gam1 + half*((ru*ru + rv*rv + rw*rw)/Q[IR] - rm*(um*um + vm*vm + wm*wm));
+    }
+    delete [] primitiveVariable;    primitiveVariable = nullptr;
+    delete [] Q;    Q = nullptr;
+}
+
+void NSSolverUnstruct::SetWallBCGhostDQLUSGS(Grid *gridIn, UnstructBC *bcRegionUnstruct, RDouble **dq, RDouble **q)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    //! Get grid metrics.
+
+    RDouble *gama = reinterpret_cast<RDouble *> (grid->GetDataPtr("gama"));
+    RDouble **t   = reinterpret_cast<RDouble **> (grid->GetDataPtr("t"));
+    Param_NSSolverUnstruct *parameters = GetControlParameters();    
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *primitiveVariable = new RDouble[nEquation];
+    RDouble *Q = new RDouble[nEquation];
+
+    RDouble tv = 0.0,te = 0.0;
+    RDouble rm, um, vm, wm, pm, ub, vb, wb;
+
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        //! iFace is the face number in the set of faceIndex.
+        int iFace = *iter;
+        int le = leftCellofFace[iFace];
+        int re = rightCellofFace[iFace];
+
+        //! Conservative Variables on level n+1.
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            primitiveVariable[m] = q[m][le];
+        }
+    
+        tv = t[ITT][le];
+        te = tv;
+        if (nTemperatureModel > 1)    //! Consider Two-Temperature model and Three-Temperature model.
+        {
+            tv = t[ITV][le];
+            te = tv;
+            if (nTemperatureModel == 3)
+            {
+                te = t[ITE][le];
+            }
+        }
+        gas->Primitive2Conservative(primitiveVariable, gama[le], tv, te, Q);
+    
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            Q[m] += dq[m][le];
+        }
+        for (int m = 0; m < nTemperatureModel - 1; m++)
+        {
+            Q[nLaminar + nChemical + m] += dq[nLaminar + nChemical + m][le];
+        }
+ 
+        //! Non-conservative variables in re in level n.
+        rm = q[IR][re];
+        um = q[IU][re];
+        vm = q[IV][re];
+        wm = q[IW][re];
+        pm = q[IP][re];
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dq[m][re] = dq[m][le];
+        }
+        for (int m = 0; m < nTemperatureModel - 1; m++)
+        {
+            dq[nLaminar + nChemical + m][re] = dq[nLaminar + nChemical + m][le];
+        }
+
+        ub = 0.0;
+        vb = 0.0;
+        wb = 0.0;
+        dq[IR ][re] =   dq[IR ][le];
+        dq[IRU][re] = - dq[IRU][le] + two * ub * dq[IR][le];
+        dq[IRV][re] = - dq[IRV][le] + two * vb * dq[IR][le];
+        dq[IRW][re] = - dq[IRW][le] + two * wb * dq[IR][le];
+        dq[IRE][re] =   dq[IRE][le] + ub * (dq[IRU][re] - dq[IRU][le])
+            + vb * (dq[IRV][re] - dq[IRV][le])
+            + wb * (dq[IRW][re] - dq[IRW][le]);
+    }
+    delete [] primitiveVariable;    primitiveVariable = nullptr;
+    delete [] Q;    Q = nullptr;
+}
+
+void NSSolverUnstruct::SetExtraBCGhostDQLUSGS(Grid *gridIn, UnstructBC *bcRegionUnstruct, RDouble **dq, RDouble **q)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    //! Get grid metrics.
+
+    RDouble *gama = reinterpret_cast<RDouble *> (grid->GetDataPtr("gama"));
+    RDouble **t   = reinterpret_cast<RDouble **> (grid->GetDataPtr("t"));
+    Param_NSSolverUnstruct *parameters = GetControlParameters();    
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *primitiveVariable = new RDouble[nEquation];
+    RDouble *Q = new RDouble[nEquation];
+
+    RDouble tv = 0.0,te = 0.0;
+    RDouble rm, um, vm, wm, pm;
+
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        //! iFace is the face number in the set of faceIndex.
+        int iFace = *iter;
+        int le = leftCellofFace[iFace];
+        int re = rightCellofFace[iFace];
+
+        //! Conservative Variables on level n+1.
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            primitiveVariable[m] = q[m][le];
+        }
+
+        tv = t[ITT][le];
+        te = tv;
+        if (nTemperatureModel > 1)    //! Consider Two-Temperature model and Three-Temperature model.
+        {
+            tv = t[ITV][le];
+            te = tv;
+            if (nTemperatureModel == 3)
+            {
+                te = t[ITE][le];
+            }
+        }
+        gas->Primitive2Conservative(primitiveVariable, gama[le], tv, te, Q);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            Q[m] += dq[m][le];
+        }
+        for (int m = 0; m < nTemperatureModel - 1; m++)
+        {
+            Q[nLaminar + nChemical + m] += dq[nLaminar + nChemical + m][le];
+        }
+
+        //! Non-conservative variables in re in level n.
+        rm = q[IR][re];
+        um = q[IU][re];
+        vm = q[IV][re];
+        wm = q[IW][re];
+        pm = q[IP][re];
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dq[m][re] = dq[m][le];
+        }
+        for (int m = 0; m < nTemperatureModel - 1; m++)
+        {
+            dq[nLaminar + nChemical + m][re] = dq[nLaminar + nChemical + m][le];
+        }
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dq[m][re] =  dq[m][le];
+        }
+        for (int m = 0; m < nTemperatureModel - 1; m++)
+        {
+            dq[nLaminar + nChemical + m][re] = dq[nLaminar + nChemical + m][le];
+        }
+    }
+    delete [] primitiveVariable;    primitiveVariable = nullptr;
+    delete [] Q;    Q = nullptr;
+}
+
+RDouble NSSolverUnstruct::GetRad(RDouble *prim, RDouble *nxyz, RDouble gama)
+{
+    using namespace IDX;
+
+    RDouble &xfn  = nxyz[0];
+    RDouble &yfn  = nxyz[1];
+    RDouble &zfn  = nxyz[2];
+    RDouble &area = nxyz[3];
+    RDouble &vgn  = nxyz[4];
+
+    RDouble &rm = prim[IR];
+    RDouble &um = prim[IU];
+    RDouble &vm = prim[IV];
+    RDouble &wm = prim[IW];
+    RDouble &pm = prim[IP];
+
+    RDouble vn = xfn * um + yfn * vm + zfn * wm - vgn;
+    RDouble eigen = ABS(vn) + sqrt(gama * pm / rm);
+    return eigen * area;
+}
+
+void NSSolverUnstruct::SolveLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int *leftCellofFace = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    RDouble **dq = dqProxy->GetField_UNS();
+
+    //! Get grid metrics.
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *vgn  = grid->GetFaceNormalVelocity();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    int *iBlank = grid->GetBlankIndex();
+
+    //! Get flow variables.
+    RDouble **q = reinterpret_cast <RDouble **> (grid->GetDataPtr("q"));
+    RDouble **t = reinterpret_cast <RDouble **> (grid->GetDataPtr("t"));
+    RDouble *gamma = reinterpret_cast <RDouble *> (grid->GetDataPtr("gama"));
+    RDouble *diagonal = reinterpret_cast <RDouble *> (grid->GetDataPtr("diagonal"));
+    RDouble **res = reinterpret_cast <RDouble **> (grid->GetDataPtr("res"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    int nm = parameters->GetNSEquationNumber();
+
+    int nElectronIndex = parameters->GetIndexOfElectron();
+
+    RDouble refReNumber = parameters->GetRefReNumber();
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    bool isViscous = parameters->IsViscous();
+
+    RDouble *viscousLaminar = nullptr, *viscousTurbulence = nullptr;
+    if (isViscous)
+    {
+        viscousLaminar = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+        viscousTurbulence = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+    }
+
+    //! Some intermediate variables.
+    RDouble nxyz[5];
+    RDouble *qNeighbor  = new RDouble[nEquation];
+    RDouble *dqNeighbor = new RDouble[nEquation];
+    RDouble *dqTry  = new RDouble[nEquation];
+    RDouble *dqOld  = new RDouble [nEquation];
+    RDouble *rhs0   = new RDouble[nEquation];
+    RDouble *df     = new RDouble[nEquation];
+    RDouble *facePrimitiveVariable = new RDouble [nEquation];
+    RDouble *temperature = new RDouble[nTemperatureModel];
+    RDouble *Ux = new RDouble [nEquation];
+
+    RDouble *preconCoefficient = nullptr;
+    RDouble *timeCoefficientInverse = nullptr;
+    RDouble **preconMatrix = nullptr;
+    int nElement = 0;
+    RDouble *preconMatrixNeighbor = nullptr;
+    RDouble *preconMatrixTemp = nullptr;
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        preconCoefficient = reinterpret_cast< RDouble * > (grid->GetDataPtr("preconCoefficient"));
+        timeCoefficientInverse = reinterpret_cast< RDouble * > (grid->GetDataPtr("timeCoefficientInverse"));
+        preconMatrix = reinterpret_cast< RDouble ** > (grid->GetDataPtr("preconMatrix"));
+        nElement = nEquation * nEquation;
+        preconMatrixNeighbor = new RDouble [nElement];
+        preconMatrixTemp = new RDouble [nElement];
+    }
+    using namespace IDX;
+
+    //SpectrumRadius(grid, diagonal);
+
+    int **cell2face = grid->GetCell2Face();
+    int *faceNumberOfEachCell = grid->GetFaceNumberOfEachCell();
+
+    RDouble **deltaFlux = LUplusDQ->GetField_UNS();
+
+    //! Now the Forward Sweep.
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        if (iBlank[iCell] <= 0)
+        {
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dq[m][iCell] = 0.0;
+            }
+            continue;
+        }
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            rhs0[m] = 0.0;
+
+            //! Back up the old dq, to compute the convergence.
+            //! it is initialized by zero or res in the first sweep,
+            //! then it is updated by backward sweep, that is dq*.
+            dqOld[m] = dq[m][iCell];
+
+            //! Here, the deltaFlux is computed in Upper backward sweep!
+            //! res: b      deltaFlux: Ux, which is computed in backward sweep.
+            //! the dq is not the real dq, now.
+            //! Although the 'dq' changed can not the right one, it dosen't matter, since 
+            //! the following only using the lower neighbor cells, whose 'dq' has been updated.
+            //! It is convenient for precondition transform.
+            dq[m][iCell] = res[m][iCell];
+
+            Ux[m] = deltaFlux[m][iCell];
+
+            //! Then reset it to zero to store the Lower forward sweep!
+            deltaFlux[m][iCell] = 0.0;
+        }
+        //! Compute the new Ux (deltaFlux).
+        for (int jFace = 0; jFace < faceNumberOfEachCell[iCell]; ++ jFace)
+        {
+            int face = cell2face[iCell][jFace];
+            int le   = leftCellofFace[face];
+            int re   = rightCellofFace[face];
+
+            //! One of le and re must be cell itself.
+            if (le > iCell || re > iCell) continue;            
+
+            nxyz[0] = xfn [face];
+            nxyz[1] = yfn [face];
+            nxyz[2] = zfn [face];
+            nxyz[3] = area[face];
+            nxyz[4] = vgn [face];
+
+            if (re == iCell)
+            {
+                //! If the re is the iCell itself, then swap with 'le'.
+                //! Now its neighboring cell 're' belongs to lower triangular.
+                SWAP(le, re);
+
+                //! Swap the normal and the moving face velocity.
+                nxyz[0] = - nxyz[0];
+                nxyz[1] = - nxyz[1];
+                nxyz[2] = - nxyz[2];
+                
+                nxyz[4] = - nxyz[4];
+            }
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                qNeighbor[m] = q[m][re];
+            }
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dqNeighbor[m] = dq[m][re];
+            }
+
+            if (ifLowSpeedPrecon != 0)
+            {
+                for (int m = 0; m < nElement; ++ m)
+                {
+                    preconMatrixNeighbor[m] = preconMatrix[m][re];
+                }
+            }
+            //! Compute the ROE averaged face primitive variables.
+            RDouble rhoRoe, uRoe, vRoe, wRoe, pRoe;
+            RoeAveragedVariables(q[IDX::IR][le], q[IDX::IU][le], q[IDX::IV][le], q[IDX::IW][le], q[IDX::IP][le], gamma[le],
+                                 q[IDX::IR][re], q[IDX::IU][re], q[IDX::IV][re], q[IDX::IW][re], q[IDX::IP][re], gamma[re],
+                                 rhoRoe, uRoe, vRoe, wRoe, pRoe);
+
+            facePrimitiveVariable[IDX::IR] = rhoRoe;
+            facePrimitiveVariable[IDX::IU] = uRoe;
+            facePrimitiveVariable[IDX::IV] = vRoe;
+            facePrimitiveVariable[IDX::IW] = wRoe;
+            facePrimitiveVariable[IDX::IP] = pRoe;
+
+            //! The inviscid Delta Flux.
+            RDouble gama = gamma[re];
+            if (ifLowSpeedPrecon == 0)
+            {
+                RDouble rad = GetRad(facePrimitiveVariable, nxyz, gama);
+
+                if (nChemical > 0)
+                {
+                    for (int m = 0; m < nTemperatureModel; ++ m)
+                    {
+                        temperature[m] = t[m][re];
+                    }
+                    GAS_SPACE::ChemicalMXDQ(qNeighbor,temperature ,nxyz[0], nxyz[1], nxyz[2], nxyz[3], nxyz[4], dqNeighbor, df, nm, nLaminar, nTemperatureModel, rad, -1,nElectronIndex);
+                }
+                else
+                {
+                    MXDQ_STD(qNeighbor, nxyz[0], nxyz[1], nxyz[2], nxyz[3], nxyz[4], gama, dqNeighbor, df, nm, nLaminar, rad, -1);
+                }
+            }
+            else
+            {
+                //! Compute the inviscid difference flux (df).
+                RDouble preconCoeff = preconCoefficient[re];
+                RDouble timeCoeff = timeCoefficientInverse[re];
+                PreconMatrixFreeDF(qNeighbor, dqNeighbor, nxyz, preconMatrixNeighbor, gama, preconCoeff, timeCoeff, df, nm, nLaminar, -1);
+            }
+
+            if (isViscous)
+            {
+                //! The viscous Delta Flux.
+                RDouble distance;
+                distance = ABS(xfn[face] * (xcc[re] - xcc[le])
+                             + yfn[face] * (ycc[re] - ycc[le])
+                             + zfn[face] * (zcc[re] - zcc[le]));
+
+                RDouble viscousLaminarFace = half * (viscousLaminar[le] + viscousLaminar[re]);
+                RDouble viscousTurbulenceFace = half * (viscousTurbulence[le] + viscousTurbulence[re]);
+                RDouble density = half * (q[IDX::IR][le] + q[IDX::IR][re]);
+
+                RDouble viscosity = viscousLaminarFace + viscousTurbulenceFace;
+                RDouble faceArea  = area[face];
+                RDouble viscousSpectrumRadius = 2.0 * viscosity / (density * distance * refReNumber + SMALL);
+                viscousSpectrumRadius *= half * faceArea;
+
+                for (int m = 0; m < nLaminar; ++ m)
+                {
+                    RDouble deltaVisFlux = viscousSpectrumRadius * dqNeighbor[m];
+                    df[m] -= deltaVisFlux;
+                }
+            }
+
+            //! Add Flux together.
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                rhs0[m] += df[m];
+            }
+        }
+
+        if(ifLowSpeedPrecon == 1)
+        {
+            //! Here, the 'dq' is 'res' actually.
+            //! The reason why operate on 'dq' other than 'res', is that the 'dq' is a temporary variable.
+            //! and the real 'res' is forbidden to be changed.
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dqTry[m] = dq[m][iCell];
+            }
+
+            for (int m = 0; m < nElement; ++ m)
+            {
+                preconMatrixTemp[m] = preconMatrix[m][iCell];
+            }
+            RDouble timeCoeffTemp = timeCoefficientInverse[iCell];
+            //PreconMatrixRes(dq, preconMatrix, nLaminar, iCell);
+            ConservativePreconMatrixVariables(dqTry, preconMatrixTemp, timeCoeffTemp, nLaminar);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dq[m][iCell] = dqTry[m];
+            }
+        }
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            //! dq = { (b - Ux) - Lx } / D.
+            //! Note: the 'dq' has actually initialized by the residual at the beginning of this function.
+            //! the 'rhs0' is the total Delta Flux of the neighbors.            
+            //! rhs0: Lx    diagonal: D.
+            dqTry[m] = (dq[m][iCell] - Ux[m] - rhs0[m]) / diagonal[iCell];
+
+            //! Store the lower forward sweep delta-flux, which will be used in the backward sweep.
+            deltaFlux[m][iCell] += rhs0[m];
+        }
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dq[m][iCell] = dqTry[m];
+
+            sweepNormal += SQR(dq[m][iCell] - dqOld[m]);
+        }
+    }    //! iCell loop.
+
+    SetGhostDQLUSGS(grid, dq, q);
+   
+    delete [] facePrimitiveVariable;    facePrimitiveVariable = nullptr;
+    delete [] qNeighbor;    qNeighbor = nullptr;
+    delete [] dqNeighbor;    dqNeighbor = nullptr;
+    delete [] temperature;    temperature = nullptr;
+    delete [] dqTry;    dqTry = nullptr;
+    delete [] dqOld;    dqOld = nullptr;
+    delete [] rhs0;    rhs0 = nullptr;
+    delete [] df;    df = nullptr;
+    delete [] Ux;    Ux = nullptr;
+    if (ifLowSpeedPrecon != 0)
+    {
+        delete [] preconMatrixNeighbor;    preconMatrixNeighbor = nullptr;
+        delete [] preconMatrixTemp;    preconMatrixTemp = nullptr;
+    }
+}
+
+void NSSolverUnstruct::SolveLUSGSBackward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    //! Here, the dq is the dq-star, which has been initialized in the forward sweep stage.
+    //! that it is solve by the lower-triangle equations.
+    RDouble **dq = dqProxy->GetField_UNS();
+    
+    using namespace IDX;
+
+    //! Get grid metrics.
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *vgn  = grid->GetFaceNormalVelocity();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    int *iBlank = grid->GetBlankIndex();
+
+    //! Get flow variables.
+    RDouble **q = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble **t = reinterpret_cast<RDouble **> (grid->GetDataPtr("t"));
+    RDouble *gamma = reinterpret_cast<RDouble *> (grid->GetDataPtr("gama"));
+    RDouble *diagonal = reinterpret_cast <RDouble *> (grid->GetDataPtr("diagonal"));
+    RDouble **res = reinterpret_cast <RDouble **> (grid->GetDataPtr("res"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    int nm = parameters->GetNSEquationNumber();
+
+    int nElectronIndex = parameters->GetIndexOfElectron();
+
+    RDouble refReNumber  = parameters->GetRefReNumber();
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    bool isViscous = parameters->IsViscous();
+    RDouble *viscousLaminar = NULL, *viscousTurbulence = NULL;
+    if (isViscous)
+    {
+        viscousLaminar = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+        viscousTurbulence = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+    }
+
+    //! Some intermediate variables.
+    RDouble nxyz[5];
+    RDouble *qNeighbor  = new RDouble [nEquation];
+    RDouble *dqNeighbor = new RDouble [nEquation];
+    RDouble *dqTry      = new RDouble [nEquation];
+    RDouble *dqOld      = new RDouble [nEquation];
+    RDouble *rhs0       = new RDouble [nEquation];
+    RDouble *df         = new RDouble [nEquation];
+    RDouble *facePrimitiveVariable = new RDouble [nEquation];
+    RDouble *temperature = new RDouble[nTemperatureModel];
+    RDouble *Lx = new RDouble [nEquation];
+
+    RDouble *preconCoefficient = nullptr;
+    RDouble *timeCoefficientInverse = nullptr;
+    RDouble **preconMatrix = nullptr;
+    int nElement = 0;
+    RDouble *preconMatrixNeighbor = nullptr;
+    RDouble *preconMatrixTemp = nullptr;
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        preconCoefficient = reinterpret_cast <RDouble *> (grid->GetDataPtr("preconCoefficient"));
+        timeCoefficientInverse = reinterpret_cast <RDouble *> (grid->GetDataPtr("timeCoefficientInverse"));
+        preconMatrix = reinterpret_cast< RDouble ** > (grid->GetDataPtr("preconMatrix"));
+        nElement = nEquation * nEquation;
+        preconMatrixNeighbor = new RDouble [nElement];
+        preconMatrixTemp = new RDouble [nElement];
+    }
+    
+    int **cell2face = grid->GetCell2Face();
+    int *faceNumberOfEachCell = grid->GetFaceNumberOfEachCell();
+
+    RDouble **deltaFlux = LUplusDQ->GetField_UNS();
+
+    //! Backward sweep.
+    for (int iCell = nTotalCell - 1; iCell >= 0; -- iCell)
+    {
+        if (iBlank[iCell] <= 0)
+        {
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dq[m][iCell] = 0.0;
+            }
+            continue;
+        }
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            rhs0[m] = 0.0;
+
+            //! Back up the old dq, to compute the convergence.
+            //! the 'dq' is dq*, which has been updated in forward.
+            dqOld[m] = dq[m][iCell];
+
+            //! the dq is not the real dq, now.
+            //! it is convenient for precondition transform.
+            dq[m][iCell] = res[m][iCell];
+
+            Lx[m] = deltaFlux[m][iCell];
+
+            deltaFlux[m][iCell] = 0.0;
+        }
+
+        for (int jFace = 0; jFace < faceNumberOfEachCell[iCell]; ++ jFace)
+        {
+            int face  = cell2face[iCell][jFace];
+            int le    = leftCellofFace[face];
+            int re    = rightCellofFace[face];
+
+            //! One of le and re must be cell itself.
+            if (le < iCell || re < iCell) continue;
+
+            nxyz[0] = xfn [face];
+            nxyz[1] = yfn [face];
+            nxyz[2] = zfn [face];
+            nxyz[3] = area[face];
+            nxyz[4] = vgn [face];
+
+            if (re == iCell)
+            {
+                //! If the re is the iCell itself, then swap with 'le'.
+                //! Now its neighboring cell 're' belongs to upper triangular.
+                SWAP(le, re);
+
+                //! Swap the normal and the moving face velocity.
+                nxyz[0] = - nxyz[0];
+                nxyz[1] = - nxyz[1];
+                nxyz[2] = - nxyz[2];
+
+                nxyz[4] = - nxyz[4];
+            }
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                qNeighbor [m] = q[m][re];
+            }
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dqNeighbor[m] = dq[m][re];
+            }
+
+            if (ifLowSpeedPrecon != 0)
+            {
+                for (int m = 0; m < nElement; ++ m)
+                {
+                    preconMatrixNeighbor[m] = preconMatrix[m][re];
+                }
+            }
+
+            //! Compute the ROE averaged face primitive variables.
+            RDouble rhoRoe, uRoe, vRoe, wRoe, pRoe;
+            RoeAveragedVariables(q[IDX::IR][le], q[IDX::IU][le], q[IDX::IV][le], q[IDX::IW][le], q[IDX::IP][le], gamma[le],
+                q[IDX::IR][re], q[IDX::IU][re], q[IDX::IV][re], q[IDX::IW][re], q[IDX::IP][re], gamma[re],
+                rhoRoe, uRoe, vRoe, wRoe, pRoe);
+
+            facePrimitiveVariable[IDX::IR] = rhoRoe;
+            facePrimitiveVariable[IDX::IU] = uRoe;
+            facePrimitiveVariable[IDX::IV] = vRoe;
+            facePrimitiveVariable[IDX::IW] = wRoe;
+            facePrimitiveVariable[IDX::IP] = pRoe;
+
+            RDouble gama = gamma[re];
+            if (ifLowSpeedPrecon  == 0 )
+            {
+                RDouble rad = GetRad(facePrimitiveVariable,nxyz,gama);
+
+                if (nChemical > 0)
+                {
+                    for (int m = 0; m < nTemperatureModel; ++ m)
+                    {
+                        temperature[m] = t[m][re];
+                    }
+                    GAS_SPACE::ChemicalMXDQ(qNeighbor,temperature ,nxyz[0], nxyz[1], nxyz[2], nxyz[3], nxyz[4], dqNeighbor, df, nm, nLaminar, nTemperatureModel, rad, -1,nElectronIndex);
+                }
+                else
+                {
+                    MXDQ_STD(qNeighbor, nxyz[0], nxyz[1], nxyz[2], nxyz[3], nxyz[4], gama, dqNeighbor, df, nm, nLaminar, rad, -1);
+
+                }
+            }
+            else
+            {
+                RDouble preconCoeff = preconCoefficient[re];
+                RDouble timeCoeff = timeCoefficientInverse[re];
+                PreconMatrixFreeDF(qNeighbor, dqNeighbor, nxyz, preconMatrixNeighbor, gama, preconCoeff, timeCoeff, df, nm, nLaminar, -1);
+            }
+
+            if (isViscous)
+            {
+                RDouble dist;
+                dist = ABS( xfn[face] * (xcc[re] - xcc[le])
+                           + yfn[face] * (ycc[re] - ycc[le])
+                           + zfn[face] * (zcc[re] - zcc[le]));
+
+                RDouble vis_l = half * (viscousLaminar[le] + viscousLaminar[re]);
+                RDouble vis_t = half * (viscousTurbulence[le] + viscousTurbulence[re]);
+                RDouble density = half * (q[IDX::IR][le] + q[IDX::IR][re]);
+
+                RDouble viscosity = vis_l + vis_t;
+                RDouble faceArea  = area[face];
+                RDouble viscousSpectrumRadius = 2.0 * viscosity / (density * dist * refReNumber + SMALL);
+                viscousSpectrumRadius *= half * faceArea;
+
+                for (int m = 0; m < nLaminar; ++ m)
+                {
+                    RDouble deltaVisFlux = viscousSpectrumRadius * dqNeighbor[m];
+                    df[m] -= deltaVisFlux;
+                }
+            }
+
+            //! Add Flux together.
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                rhs0[m] += df[m];
+            }
+        }
+
+        if(ifLowSpeedPrecon == 1)
+        {
+            //! Here, the 'dq' is 'res' actually.
+            //! The reason why operate on 'dq' other than 'res', is that the 'dq' is a temporary variable.
+            //! and the real 'res' is forbidden to be changed.
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dqTry[m] = dq[m][iCell];
+            }
+
+            for (int m = 0; m < nElement; ++ m)
+            {
+                preconMatrixTemp[m] = preconMatrix[m][iCell];
+            }
+            RDouble timeCoeffTemp = timeCoefficientInverse[iCell];
+            //PreconMatrixRes(dq, preconMatrix, nLaminar, iCell);
+            ConservativePreconMatrixVariables(dqTry, preconMatrixTemp, timeCoeffTemp, nLaminar);
+
+            for (int m = 0; m < nLaminar; ++ m)
+            {
+                dq[m][iCell] = dqTry[m];
+            }
+
+        }
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            //! Note: the 'dq' has been updated by the forward sweep.
+            //! the 'rhs0' is the total Delta Flux of the neighbors.
+            //! x = {(b - LX) - Ux} / D.
+            //! rhs0: Ux.    diagonal: D.
+            dqTry[m] = (dq[m][iCell] - Lx[m] - rhs0[m]) / diagonal[iCell];
+
+            //! Store the upper backward sweep delta-flux, which will be used in the forward sweep.
+            deltaFlux[m][iCell] += rhs0[m];
+        }
+
+        //RestrictDQ(dqTry, nLaminar, dqlim);
+
+        for (int m = 0; m < nLaminar; ++ m)
+        {
+            dq[m][iCell] = dqTry[m];
+
+            sweepNormal += SQR(dq[m][iCell] - dqOld[m]);
+        }
+    }    //! iCell loop.
+ 
+    delete [] facePrimitiveVariable;    facePrimitiveVariable = nullptr;
+    delete [] qNeighbor;    qNeighbor = nullptr;
+    delete [] dqNeighbor;    dqNeighbor = nullptr;
+    delete [] temperature;    temperature = nullptr;
+    delete [] dqTry;    dqTry = nullptr;
+    delete [] dqOld;    dqOld = nullptr;
+    delete [] rhs0;    rhs0 = nullptr;
+    delete [] df;    df = nullptr;
+    delete [] Lx;    Lx = nullptr;
+    if (ifLowSpeedPrecon != 0)
+    {
+        delete [] preconMatrixNeighbor;    preconMatrixNeighbor = nullptr;
+        delete [] preconMatrixTemp;    preconMatrixTemp = nullptr;
+    }
+}
+
+
+void NSSolverUnstruct::ZeroResidualOfSpecialCells(Grid *gridIn)
+{
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int isOverset = parameters->GetIsOverLapping();
+    if (!isOverset)
+    {
+        return;
+    }
+
+    UnstructGrid *grid = PHSPACE::UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+
+    RDouble **residual = reinterpret_cast<RDouble **> (grid->GetDataPtr("res"));
+    int nEquation = GetNumberOfEquations();
+    int *iBlank = grid->GetBlankIndex();
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        if (iBlank[iCell] <= 0)
+        {
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                residual[m][iCell] = 0.0;
+            }
+            continue;
+        }
+    }
+    return;
+}
+
+void NSSolverUnstruct::SpectrumRadius(Grid *gridIn)
+{
+    SpectrumRadiusInviscid(gridIn);
+    //! If the flow is viscous, it need to count the contribution from viscosity.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int isViscous = parameters->GetViscousType();
+    if (isViscous)
+    {
+        SpectrumRadiusViscous(gridIn);
+    }
+
+    int nChemical = parameters->GetChemicalFlag();
+    int nChemicalRadius = parameters->GetNChemicalRadius();
+
+    if (nChemical == 1 && nChemicalRadius == 1)
+    {
+        SpectrumRadiusChemical(UnstructGridCast(gridIn));
+    }
+}
+
+void NSSolverUnstruct::ConservativePreconMatrix(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast( gridIn );
+    int nTotalCell = grid->GetNTotalCell();
+
+    //! Get flow variables.
+    RDouble **q = reinterpret_cast <RDouble **> (grid->GetDataPtr("q"));
+    RDouble *gamma = reinterpret_cast <RDouble *> (grid->GetDataPtr("gama"));
+    RDouble **preconMatrix = reinterpret_cast <RDouble **> (grid->GetDataPtr("preconMatrix"));
+    RDouble *preconCoefficient = reinterpret_cast< RDouble * > (grid->GetDataPtr("preconCoefficient"));
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    int nNSEquation = parameters->GetNSEquationNumber();
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nEquation = nLaminar + nChemical;
+
+    int nElement = nEquation * nEquation;
+    RDouble *qPrecondition = new RDouble [nEquation];
+    RDouble **MG   = NewPointer2 <RDouble> (nEquation, nEquation);
+
+    using namespace IDX;
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        RDouble gama = gamma[iCell];
+        RDouble preconCoeff = preconCoefficient[iCell];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            qPrecondition[m] = q[m][iCell];
+        }
+
+        ComputeConservativePreconMatrix(-1, MG, qPrecondition, gama, preconCoeff, nNSEquation, nEquation);
+
+        for (int row = 0; row < nEquation; ++ row)
+        {
+            for (int col = 0; col < nEquation; ++ col)
+            {
+                int index = row * nEquation + col;
+                preconMatrix[index][iCell] = MG[row][col];
+            }
+        }
+    }
+
+    grid->SetGhostCell(preconMatrix,nElement);
+
+    delete []qPrecondition;
+    delete []MG;
+}
+
+void NSSolverUnstruct::Diagonal(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalCell = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble *vol = grid->GetCellVolume();
+
+    RDouble *dt = reinterpret_cast<RDouble *> (grid->GetDataPtr("dt"));
+    RDouble *invSpectralRadius = reinterpret_cast<RDouble *> (grid->GetDataPtr("invSpectralRadius"));
+    RDouble *visSpectralRadius = reinterpret_cast<RDouble *> (grid->GetDataPtr("visSpectralRadius"));
+    RDouble *diagonal = reinterpret_cast <RDouble *> (grid->GetDataPtr("diagonal"));
+
+    using namespace IDX;
+
+    //! If flow is unsteady, need to count the contribution of unsteady.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        //! Part 1: Diagonal = volume / dt.
+        //! notice: the dt[iCell] has divided vol, so the diagonal[iCell] has multiplied the vol by default.
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            diagonal[iCell] = 1.0 / dt[iCell];    //! notice: the dt[iCell] has divided vol, so the diagonal[iCell] has multiplied the vol by default.
+        }
+    }
+    else
+    {
+        RDouble dualTimeCoefficient[7];
+        const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+        ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+        RDouble dualTimeSpectrumC1 = - dualTimeCoefficient[3];
+        RDouble dualTimeSpectrumC2 =   dualTimeCoefficient[6];
+
+        for (int iCell = 0; iCell < nTotal; ++ iCell)
+        {
+            diagonal[iCell] = dualTimeSpectrumC1 * vol[iCell] + (dualTimeSpectrumC2 / dt[iCell]);    //! notice: the dt[iCell] has divided vol, as same as above.
+        }
+    }
+
+    //! Part 2: Diagonal += (|V.n| + c). (|V.n| + c) is inviscid spectral radius.
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        diagonal[iCell] += invSpectralRadius[iCell];
+    }
+
+    //! If the flow is viscous, it need to count the contribution from viscosity.
+    bool isViscous = parameters->IsViscous();
+    if (isViscous)
+    {
+        //! Part 3: Diagonal += 2*miu/(rho.|n.dr|). 2*miu/(rho.|n.dr|) is viscous spectral radius.
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            diagonal[iCell] += visSpectralRadius[iCell];
+        }
+    }
+
+    int nm        = parameters->GetNSEquationNumber();
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nChemicalRadius = parameters->GetNChemicalRadius();
+    int nChemicalSource  = parameters->GetNChemicalSource();
+
+    RDouble rad_chem;
+
+    if (nChemical == 1 && nChemicalSource == 1 && nChemicalRadius == 1)
+    {
+        //! Part 4: Diagonal += chemical radius.
+        RDouble **chemSpectralRadius = reinterpret_cast<RDouble **> (grid->GetDataPtr("chemSpectralRadius"));
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            rad_chem = zero;
+            for (int m = nm; m < nLaminar; ++ m)
+            {
+                rad_chem = MAX(nChemicalRadius * chemSpectralRadius[ m - nm ][ iCell ], rad_chem);
+            }
+            diagonal[iCell] += rad_chem;    //! Referring to the structure part, the dt[iCell] contained in the diagonal[iCell] can be improved for more stability here.
+        }
+    }
+    //grid->SetGhostCell(diagonal, nLaminar);
+}
+
+void NSSolverUnstruct::RestrictDQ(RDouble *dqtry, int nm, RDouble lim_max)
+{
+    for (int m = 0; m < nm; ++ m)
+    {
+        dqtry[m] = MAX(MIN(dqtry[m], lim_max),-lim_max);
+    }
+}
+
+void NSSolverUnstruct::ModifyDensity(RDouble *dq, int nNSEquation,int nLaminar,int nEquation,RDouble &densityRelax)
+{
+    int nChemcalSourceModified = gas->GetnChemcalSourceModified();
+    if(nChemcalSourceModified==0)
+    {
+        for (int m = 1; m < nNSEquation; ++ m)
+        {
+            dq[m] = 1.0;
+        }
+        for (int m = nNSEquation; m <= nLaminar; ++ m)
+        {
+            dq[m] = densityRelax;
+        }
+        for (int m = nLaminar+1; m < nEquation; ++ m)
+        {
+            dq[m] = 1.0;
+        }
+    }
+    else
+    {
+        for (int m = 1; m < nNSEquation - 1; ++ m)
+        {
+            dq[m] = 1.0;
+        }
+        for (int m = nNSEquation - 1; m < nEquation; ++ m)
+        {
+            dq[m] = densityRelax;
+        }
+    }
+}
+
+void NSSolverUnstruct::AirForceCoef(ActionKey *actkey)
+{
+    const int ALL_PART = -1;
+    AirForceCoefParts(actkey, ALL_PART);
+
+    int Coordinate = LocalCoordinate;
+    uint_t nTBC = GlobalBoundaryCondition::GetNumberOfBC();
+    for (int iPart = 0; iPart < nTBC; ++iPart)
+    {
+        if (!GlobalBoundaryCondition::IsSolidWallBC(iPart)) continue;
+
+        //! Compute local part force.
+        AirForceCoefParts(actkey, iPart, Coordinate);
+
+        //! Compute global part force.
+        AirForceCoefParts(actkey, iPart);
+    }
+}
+
+void NSSolverUnstruct::AirForceCoefParts(ActionKey *actkey, int partID, int Coordinate)
+{
+    int level = actkey->level;
+
+    using namespace PHMPI;
+    //fstream file;
+
+    UnstructGrid * grid = UnstructGridCast(GetGrid(level));
+
+    RDouble **q   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble *visl = reinterpret_cast< RDouble * > (grid->GetDataPtr("visl"));
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int viscousType = parameters->GetViscousType();
+
+    const int ALL_PART = -1;
+    SimpleBC * boundaryCondition = NULL;
+	string partBCName = "";
+    RDouble TorqueRefX = 0.0, TorqueRefY = 0.0, TorqueRefZ = 0.0;
+
+    //! Used to compute hinge moment:
+    int dumpHingeMoment = 0;
+    RDouble localCoordAxis0[3];
+    RDouble localCoordAxis1[3];
+    RDouble hingeMoment = 0.0;
+
+    if(partID == ALL_PART)
+    {
+        TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+        TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+        TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+    }
+    else if ((partID != ALL_PART) && (Coordinate == GlobalCoordinate))
+    {
+        boundaryCondition = GlobalBoundaryCondition::GetBC(partID);
+        partBCName = boundaryCondition->GetBCName();
+
+        TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+        TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+        TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+    }
+    else if ((partID != ALL_PART) && (Coordinate == LocalCoordinate))
+    {
+        boundaryCondition = GlobalBoundaryCondition::GetBC(partID);
+		partBCName = boundaryCondition->GetBCName();
+
+        boundaryCondition->GetParamData("TorqueRefX", &TorqueRefX, PHDOUBLE, 1);
+        boundaryCondition->GetParamData("TorqueRefY", &TorqueRefY, PHDOUBLE, 1);
+        boundaryCondition->GetParamData("TorqueRefZ", &TorqueRefZ, PHDOUBLE, 1);
+        
+        
+        boundaryCondition->GetParamData("dumpHingeMoment", &dumpHingeMoment, PHINT, 1);
+        boundaryCondition->GetParamData("localCoordAxis0", localCoordAxis0, PHDOUBLE, 3);
+        boundaryCondition->GetParamData("localCoordAxis1", localCoordAxis1, PHDOUBLE, 3);
+    }
+
+    int vis_run = 0;
+    if (viscousType != INVISCID)
+    {
+        vis_run = 1;
+        //vis_run = 0;
+    }
+
+    using namespace IDX;
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    RDouble poo = primitiveVarFarfield[IP];
+
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea() ;
+
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    int * leftCellofFace = grid->GetLeftCellOfFace();
+    int * rightCellofFace = grid->GetRightCellOfFace();
+
+    RDouble cpx,cpy,cpz;
+    cpx = 0.0;
+    cpy = 0.0;
+    cpz = 0.0;
+
+    RDouble CA_f = 0.0;
+    RDouble CA_p = 0.0;
+    RDouble CN_f = 0.0;
+    RDouble CN_p = 0.0;
+    RDouble CZ_f = 0.0;
+    RDouble CZ_p = 0.0;
+    RDouble Cl_f = 0.0;
+    RDouble Cl_p = 0.0;
+    RDouble Cn_f = 0.0;
+    RDouble Cn_p = 0.0;
+    RDouble Cm_f = 0.0;
+    RDouble Cm_p = 0.0;
+
+    RDouble pw,cp;
+    RDouble dfx,dfy,dfz,dpx,dpy,dpz,fvsx,fvsy,fvsz;
+    RDouble nx,ny,nz;
+    RDouble vis,txx,txy,txz,tyx,tyy,tyz,tzx,tzy,tzz;
+    RDouble dudx,dudy,dudz,dvdx,dvdy,dvdz,dwdx,dwdy,dwdz;
+    RDouble xc,yc,zc,dx,dy,dz,ods;
+
+    RDouble **gradPrimtiveVarX = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **gradPrimtiveVarY = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **gradPrimtiveVarZ = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    using namespace IDX;
+
+    //! Get the bcRegion information of unstruct grid.
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    //! Cycle all bcregions and find the solid surface type of boundary.
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+
+        //! If the bc type is wall, calculate the wall coefficient.
+        if(bcType == PHENGLEI::SOLID_SURFACE)
+        {
+            if (partID != ALL_PART && bcName != partBCName)
+            {
+                continue;
+            }
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            int iFace, le, re;
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                iFace = *iter;
+                le = leftCellofFace [ iFace ];
+                re = rightCellofFace[ iFace ];
+
+                nx  = xfn[iFace] * area[iFace];
+                ny  = yfn[iFace] * area[iFace];
+                nz  = zfn[iFace] * area[iFace];
+
+                dx  = xfc[iFace] - xcc[le];
+                dy  = yfc[iFace] - ycc[le];
+                dz  = zfc[iFace] - zcc[le];
+
+                //! Pressure drag
+                pw = q[IP][le];
+                cp    = two * (pw - poo);
+
+                dpx = nx * cp;
+                dpy = ny * cp;
+                dpz = nz * cp;
+
+                CA_p += dpx;
+                CN_p += dpy;
+                CZ_p += dpz;
+
+                dfx = dpx;
+                dfy = dpy;
+                dfz = dpz;
+
+                xc = xfc[iFace];
+                yc = yfc[iFace];
+                zc = zfc[iFace];
+
+                if (viscousType > INVISCID)
+                {
+                    dudx = gradPrimtiveVarX[IU][le];
+                    dudy = gradPrimtiveVarY[IU][le];
+                    dudz = gradPrimtiveVarZ[IU][le];
+
+                    dvdx = gradPrimtiveVarX[IV][le];
+                    dvdy = gradPrimtiveVarY[IV][le];
+                    dvdz = gradPrimtiveVarZ[IV][le];
+
+                    dwdx = gradPrimtiveVarX[IW][le];
+                    dwdy = gradPrimtiveVarY[IW][le];
+                    dwdz = gradPrimtiveVarZ[IW][le];
+
+                    //! Gradient correction.
+                    dx  = xcc[re] - xcc[le];
+                    dy  = ycc[re] - ycc[le];
+                    dz  = zcc[re] - zcc[le];
+                    ods = 1.0 / sqrt(dx * dx + dy * dy + dz * dz);
+                    dx  = dx * ods;
+                    dy  = dy * ods;
+                    dz  = dz * ods;
+
+                    CorrectGradient(q[IU][le],q[IU][re],dudx,dudy,dudz,dx,dy,dz,ods);
+                    CorrectGradient(q[IV][le],q[IV][re],dvdx,dvdy,dvdz,dx,dy,dz,ods);
+                    CorrectGradient(q[IW][le],q[IW][re],dwdx,dwdy,dwdz,dx,dy,dz,ods);
+
+                    //! It is unnecessary to consider because the turbulence viscosity coefficient is 0.
+                    vis = visl[le];
+
+                    const RDouble c23 = 2.0 / 3.0;
+                    txx = vis * c23 * (2.0 * dudx - dvdy - dwdz);
+                    tyy = vis * c23 * (2.0 * dvdy - dwdz - dudx);
+                    tzz = vis * c23 * (2.0 * dwdz - dudx - dvdy);
+                    txy = vis * (dudy + dvdx);
+                    txz = vis * (dudz + dwdx);
+                    tyz = vis * (dvdz + dwdy);
+                    tyx = txy;
+                    tzx = txz;
+                    tzy = tyz;
+
+                    fvsx = - two * (nx * txx + ny * tyx + nz * tzx) * oRefReNumber;
+                    fvsy = - two * (nx * txy + ny * tyy + nz * tzy) * oRefReNumber;
+                    fvsz = - two * (nx * txz + ny * tyz + nz * tzz) * oRefReNumber;
+
+                    CA_f += fvsx;
+                    CN_f += fvsy;
+                    CZ_f += fvsz;
+
+                    dfx += fvsx;
+                    dfy += fvsy;
+                    dfz += fvsz;
+
+                    Cl_f += (yc - TorqueRefY) * fvsz - (zc - TorqueRefZ) * fvsy;
+                    Cn_f += (zc - TorqueRefZ) * fvsx - (xc - TorqueRefX) * fvsz;
+                    Cm_f += (xc - TorqueRefX) * fvsy - (yc - TorqueRefY) * fvsx;
+                }
+
+                Cl_p += (yc - TorqueRefY) * dpz - (zc - TorqueRefZ) * dpy;
+                Cn_p += (zc - TorqueRefZ) * dpx - (xc - TorqueRefX) * dpz;
+                Cm_p += (xc - TorqueRefX) * dpy - (yc - TorqueRefY) * dpx;
+
+                cpx += dpx;
+                cpy += dpy;
+                cpz += dpz;
+
+                if(dumpHingeMoment)
+                {
+                    Post_ForceMoment forceMoment;
+                    RDouble point[3] = {xfc[iFace], yfc[iFace], zfc[iFace]};
+                    RDouble faceForce[3] = {dfx, dfy, dfz};
+                    hingeMoment += forceMoment.ComputeMoment(point, localCoordAxis0, localCoordAxis1, faceForce);
+                }
+            }
+        }
+    }
+
+    DataContainer *cdata = actkey->GetData();
+
+    cdata->write(&CA_f,sizeof(RDouble));
+    cdata->write(&CA_p,sizeof(RDouble));
+    cdata->write(&CN_f,sizeof(RDouble));
+    cdata->write(&CN_p,sizeof(RDouble));
+    cdata->write(&CZ_f,sizeof(RDouble));
+    cdata->write(&CZ_p,sizeof(RDouble));
+
+    cdata->write(&cpx,sizeof(RDouble));
+    cdata->write(&cpy,sizeof(RDouble));
+    cdata->write(&cpz,sizeof(RDouble));
+
+    cdata->write(&Cl_f,sizeof(RDouble));
+    cdata->write(&Cl_p,sizeof(RDouble));
+    cdata->write(&Cn_f,sizeof(RDouble));
+    cdata->write(&Cn_p,sizeof(RDouble));
+    cdata->write(&Cm_f,sizeof(RDouble));
+    cdata->write(&Cm_p,sizeof(RDouble));
+
+    cdata->write(&hingeMoment, sizeof(RDouble));
+}
+
+void NSSolverUnstruct::AirForceCoefBodies(ActionKey *actkey)
+{
+    int level = actkey->level;
+
+    using namespace PHMPI;
+    //fstream file;
+
+    UnstructGrid *grid = UnstructGridCast(GetGrid(level));
+
+    RDouble** q = reinterpret_cast<RDouble**> (grid->GetDataPtr("q"));
+    RDouble* visl = reinterpret_cast<RDouble*> (grid->GetDataPtr("visl"));
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int viscousType = parameters->GetViscousType();
+
+    RDouble TorqueRefXGlobal = 0.0, TorqueRefYGlobal = 0.0, TorqueRefZGlobal = 0.0;
+
+    TorqueRefXGlobal = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+    TorqueRefYGlobal = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+    TorqueRefZGlobal = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+
+    //! Used to compute hinge moment:
+
+    int vis_run = 0;
+    if (viscousType != INVISCID)
+    {
+        vis_run = 1;
+    }
+
+    using namespace IDX;
+    RDouble* primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    RDouble poo = primitiveVarFarfield[IP];
+
+    RDouble* xfn = grid->GetFaceNormalX();
+    RDouble* yfn = grid->GetFaceNormalY();
+    RDouble* zfn = grid->GetFaceNormalZ();
+    RDouble* area = grid->GetFaceArea();
+
+    RDouble* xfc = grid->GetFaceCenterX();
+    RDouble* yfc = grid->GetFaceCenterY();
+    RDouble* zfc = grid->GetFaceCenterZ();
+    RDouble* xcc = grid->GetCellCenterX();
+    RDouble* ycc = grid->GetCellCenterY();
+    RDouble* zcc = grid->GetCellCenterZ();
+
+    int* leftCellofFace = grid->GetLeftCellOfFace();
+    int* rightCellofFace = grid->GetRightCellOfFace();
+
+    RDouble cpx, cpy, cpz;
+    cpx = 0.0;
+    cpy = 0.0;
+    cpz = 0.0;
+
+    RDouble pw, cp;
+    RDouble dfx, dfy, dfz, dpx, dpy, dpz, fvsx, fvsy, fvsz;
+    RDouble nx, ny, nz;
+    RDouble vis, txx, txy, txz, tyx, tyy, tyz, tzx, tzy, tzz;
+    RDouble dudx, dudy, dudz, dvdx, dvdy, dvdz, dwdx, dwdy, dwdz;
+    RDouble xc, yc, zc, dx, dy, dz, ods;
+
+    RDouble **gradPrimtiveVarX = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **gradPrimtiveVarY = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **gradPrimtiveVarZ = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    using namespace IDX;
+
+    //! Get the BCRegion information of unstruct grid.
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    int numberOfMovingBodies = GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+
+    vector< BasicAerodynamicForce * > *basicAerodynamicForceVector = CreateBasicAerodynamicForceVector();
+
+    //! Cycle all bcregions and find the solid surface type of boundary.
+    for (int iBody = 0; iBody < numberOfMovingBodies; ++ iBody)
+    {
+        for (int iBCRegionUnstruct = 0; iBCRegionUnstruct < nBCRegion; ++ iBCRegionUnstruct)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegionUnstruct);
+            int bcType = bcRegion->GetBCType();
+
+            BasicAerodynamicForce tmpBasicAerodynamicForce;
+            // if the bc type is wall, calculate the wall coefficient.
+            if (bcType == PHENGLEI::SOLID_SURFACE)
+            {
+                string bodyName = bcRegion->GetBodyName();
+                if (FaceInAerodynamicForceBodies(bodyName, iBody))
+                {
+                    tmpBasicAerodynamicForce.SetMomentReferencePoint(TorqueRefXGlobal, TorqueRefYGlobal, TorqueRefZGlobal);
+
+                    vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                    int iFace, le, re;
+                    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); ++iter)
+                    {
+                        iFace = *iter;
+                        le = leftCellofFace[iFace];
+                        re = rightCellofFace[iFace];
+
+                        nx = xfn[iFace] * area[iFace];
+                        ny = yfn[iFace] * area[iFace];
+                        nz = zfn[iFace] * area[iFace];
+
+                        dx = xfc[iFace] - xcc[le];
+                        dy = yfc[iFace] - ycc[le];
+                        dz = zfc[iFace] - zcc[le];
+
+                        //pressure drag
+                        pw = q[IP][le];
+                        cp = two * (pw - poo);
+
+                        dpx = nx * cp;
+                        dpy = ny * cp;
+                        dpz = nz * cp;
+
+                        tmpBasicAerodynamicForce.SetPressureAerodynamicForce(dpx, dpy, dpz);
+
+                        dfx = dpx;
+                        dfy = dpy;
+                        dfz = dpz;
+
+                        xc = xfc[iFace];
+                        yc = yfc[iFace];
+                        zc = zfc[iFace];
+
+                        tmpBasicAerodynamicForce.SetPressureAerodynamicMoment(xc, yc, zc);
+
+                        if (viscousType > INVISCID)
+                        {
+                            dudx = gradPrimtiveVarX[IU][le];
+                            dudy = gradPrimtiveVarY[IU][le];
+                            dudz = gradPrimtiveVarZ[IU][le];
+
+                            dvdx = gradPrimtiveVarX[IV][le];
+                            dvdy = gradPrimtiveVarY[IV][le];
+                            dvdz = gradPrimtiveVarZ[IV][le];
+
+                            dwdx = gradPrimtiveVarX[IW][le];
+                            dwdy = gradPrimtiveVarY[IW][le];
+                            dwdz = gradPrimtiveVarZ[IW][le];
+
+                            //! Gradient correction.
+                            dx = xcc[re] - xcc[le];
+                            dy = ycc[re] - ycc[le];
+                            dz = zcc[re] - zcc[le];
+                            ods = 1.0 / sqrt(dx * dx + dy * dy + dz * dz);
+                            dx = dx * ods;
+                            dy = dy * ods;
+                            dz = dz * ods;
+
+                            CorrectGradient(q[IU][le], q[IU][re], dudx, dudy, dudz, dx, dy, dz, ods);
+                            CorrectGradient(q[IV][le], q[IV][re], dvdx, dvdy, dvdz, dx, dy, dz, ods);
+                            CorrectGradient(q[IW][le], q[IW][re], dwdx, dwdy, dwdz, dx, dy, dz, ods);
+
+                            //! It is unnecessary to consider because the turbulence viscosity coefficient is 0.
+                            vis = visl[le];
+
+                            const RDouble c23 = 2.0 / 3.0;
+                            txx = vis * c23 * (2.0 * dudx - dvdy - dwdz);
+                            tyy = vis * c23 * (2.0 * dvdy - dwdz - dudx);
+                            tzz = vis * c23 * (2.0 * dwdz - dudx - dvdy);
+                            txy = vis * (dudy + dvdx);
+                            txz = vis * (dudz + dwdx);
+                            tyz = vis * (dvdz + dwdy);
+                            tyx = txy;
+                            tzx = txz;
+                            tzy = tyz;
+
+                            fvsx = -two * (nx * txx + ny * tyx + nz * tzx) * oRefReNumber;
+                            fvsy = -two * (nx * txy + ny * tyy + nz * tzy) * oRefReNumber;
+                            fvsz = -two * (nx * txz + ny * tyz + nz * tzz) * oRefReNumber;
+
+                            tmpBasicAerodynamicForce.SetViscousAerodynamicForce(fvsx, fvsy, fvsz);
+
+                            tmpBasicAerodynamicForce.SetViscousAerodynamicMoment(xc, yc, zc);
+                        }
+                        tmpBasicAerodynamicForce.ComputeResultantAerodynamicForce();
+
+                        tmpBasicAerodynamicForce.ComputeResultantAerodynamicMoment();
+
+                        (*basicAerodynamicForceVector)[iBody]->AddAerodynamicForce(&tmpBasicAerodynamicForce);
+                    }
+                }
+            }
+        }
+    }
+
+    PHSPACE::WriteAerodynamicForceToActionKey(actkey, basicAerodynamicForceVector);
+    PHSPACE::FreeBasicAerodynamicForceVector(basicAerodynamicForceVector);
+}
+
+void NSSolverUnstruct::CpDistriCoef(ActionKey *actkey)
+{
+    int level = actkey->level;
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+
+    UnstructGrid *grid = UnstructGridCast(GetGrid(level));
+
+    int oriGridIndex = grid->GetOrdinaryGridIndex();
+    PHWrite(cdata, oriGridIndex);
+
+    int GridID = grid->GetGridID()->GetIndex();
+    PHWrite(cdata, GridID);
+
+    int nsolid_surface = grid->GetNumberOfWallCell();
+    if ((nsolid_surface == 0) || (level != 0))
+    {
+        return;
+    }
+
+    using namespace PHMPI;
+    using namespace PHENGLEI;
+    using namespace IDX;
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble **q   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble *visl = reinterpret_cast< RDouble * > (grid->GetDataPtr("visl"));
+
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+    RDouble poo = primitiveVarFarfield[IP];
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+
+    int viscousType = parameters->GetViscousType();
+
+    //! To obtain the reference values.
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble refVelocity = refDimensionalSonicSpeed * refMachNumber;
+
+    RDouble TorqueRefX, TorqueRefY, TorqueRefZ;
+    TorqueRefX = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+    TorqueRefY = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+    TorqueRefZ = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea() ;
+
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    int *node_number_of_each_face  = grid->GetNodeNumberOfEachFace();
+    long long int *nodePosi  = grid->GetFace2NodeSubscript();
+    int *face2node = grid->GetFace2Node();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotalNode = grid->GetNTotalNode();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotal = nTotalCell + nBoundFace;
+
+    RDouble cfx, cfy, cfz, cpx, cpy, cpz, cmx, cmy, cmz;
+    cfx = 0.0;
+    cfy = 0.0;
+    cfz = 0.0;
+    cpx = 0.0;
+    cpy = 0.0;
+    cpz = 0.0;
+    cmx = 0.0;
+    cmy = 0.0;
+    cmz = 0.0;
+
+    RDouble AoA = 0, attack = 0, angleSlide = 0, angleSlided = 0;
+    AoA = parameters->GetAoA();
+    attack   = AoA * PI / 180.0;
+    angleSlided = parameters->GetAngleOfSlide();
+    angleSlide = angleSlided * PI / 180.0;
+
+    RDouble sina = 0, cosa = 0, sinb = 0, cosb = 0;
+    sina = sin(attack);
+    cosa = cos(attack);
+    sinb = sin(angleSlide);
+    cosb = cos(angleSlide);
+
+    RDouble **gradPrimtiveVarX = reinterpret_cast< RDouble ** > (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **gradPrimtiveVarY = reinterpret_cast< RDouble ** > (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **gradPrimtiveVarZ = reinterpret_cast< RDouble ** > (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    RDouble pw = 0, cp = 0, pw_Dim = 0;
+    RDouble dfx = 0, dfy = 0, dfz = 0, dpx = 0, dpy = 0, dpz = 0, dmx = 0, dmy = 0, dmz = 0, fvsx = 0, fvsy = 0, fvsz = 0;
+    RDouble nx = 0, ny = 0, nz = 0;
+    RDouble normalComponetX = 0, normalComponetY = 0, normalComponetZ = 0;
+    RDouble vis = 0, txx = 0, txy = 0, txz = 0, tyx = 0, tyy = 0, tyz = 0, tzx = 0, tzy = 0, tzz = 0;
+    RDouble dudx = 0, dudy = 0, dudz = 0, dvdx = 0, dvdy = 0, dvdz = 0, dwdx = 0, dwdy = 0, dwdz = 0;
+    RDouble xc = 0, yc = 0, zc = 0, dx = 0, dy = 0, dz = 0, ods = 0;
+
+    RDouble *wallDistance = grid->GetWallDist();
+
+    RDouble *faceCP    = new RDouble[nBoundFace]();
+    RDouble *faceCF    = new RDouble[nBoundFace]();
+    RDouble *faceQ     = new RDouble[nBoundFace]();
+    RDouble *faceYPlus = new RDouble[nBoundFace]();
+    RDouble *facePW    = new RDouble[nBoundFace]();
+
+    //! Compute cp and cf on wall face.
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        if (IsWall(bcType))
+        {
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                //! iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+                int le = leftCellofFace[iFace];
+                int re = rightCellofFace[iFace];
+
+                normalComponetX = xfn[iFace];
+                normalComponetY = yfn[iFace];
+                normalComponetZ = zfn[iFace];
+
+                nx  = normalComponetX * area[iFace];
+                ny  = normalComponetY * area[iFace];
+                nz  = normalComponetZ * area[iFace];
+
+                //! Pressure drag.
+                dx  = xfc[iFace] - xcc[le];
+                dy  = yfc[iFace] - ycc[le];
+                dz  = zfc[iFace] - zcc[le];
+                pw = q[IP][le];
+                cp = two * (pw - poo);
+
+                //! Change the nondimensional pressure into dimensional pressure(Pa).
+                pw_Dim = pw * refDimensionalDensity * pow(refVelocity, 2);
+
+                //! Note that the definition of cp is right here and now, but dpx and dfx have multiplied by area.
+                dpx = nx * cp;
+                dpy = ny * cp;
+                dpz = nz * cp;
+
+                dfx = dpx;
+                dfy = dpy;
+                dfz = dpz;
+
+                fvsx = 0.0;
+                fvsy = 0.0;
+                fvsz = 0.0;
+
+                if (viscousType > INVISCID)
+                {
+                    dudx = gradPrimtiveVarX[IU][le];
+                    dudy = gradPrimtiveVarY[IU][le];
+                    dudz = gradPrimtiveVarZ[IU][le];
+
+                    dvdx = gradPrimtiveVarX[IV][le];
+                    dvdy = gradPrimtiveVarY[IV][le];
+                    dvdz = gradPrimtiveVarZ[IV][le];
+
+                    dwdx = gradPrimtiveVarX[IW][le];
+                    dwdy = gradPrimtiveVarY[IW][le];
+                    dwdz = gradPrimtiveVarZ[IW][le];
+
+                    //! Gradient correction.
+                    dx  = xcc[re] - xcc[le];
+                    dy  = ycc[re] - ycc[le];
+                    dz  = zcc[re] - zcc[le];
+                    ods = 1.0 / sqrt(dx * dx + dy * dy + dz * dz);
+                    dx  = dx * ods;
+                    dy  = dy * ods;
+                    dz  = dz * ods;
+
+                    CorrectGradient(q[IU][le],q[IU][re],dudx,dudy,dudz,dx,dy,dz,ods);
+                    CorrectGradient(q[IV][le],q[IV][re],dvdx,dvdy,dvdz,dx,dy,dz,ods);
+                    CorrectGradient(q[IW][le],q[IW][re],dwdx,dwdy,dwdz,dx,dy,dz,ods);
+
+                    //! It is unnecessary to consider because the turbulence viscosity coefficient is 0.
+                    vis = visl[le];
+
+                    txx = vis * two3rd * (2.0 * dudx - dvdy - dwdz);
+                    tyy = vis * two3rd * (2.0 * dvdy - dwdz - dudx);
+                    tzz = vis * two3rd * (2.0 * dwdz - dudx - dvdy);
+                    txy = vis * (dudy + dvdx);
+                    txz = vis * (dudz + dwdx);
+                    tyz = vis * (dvdz + dwdy);
+                    tyx = txy;
+                    tzx = txz;
+                    tzy = tyz;
+
+                    fvsx = - two * (nx * txx + ny * tyx + nz * tzx) * oRefReNumber;
+                    fvsy = - two * (nx * txy + ny * tyy + nz * tzy) * oRefReNumber;
+                    fvsz = - two * (nx * txz + ny * tyz + nz * tzz) * oRefReNumber;
+
+                    dfx += fvsx;
+                    dfy += fvsy;
+                    dfz += fvsz;
+                }
+                xc = xfc[iFace];
+                yc = yfc[iFace];
+                zc = zfc[iFace];
+
+                dmx = (yc - TorqueRefY) * dfz - (zc - TorqueRefZ) * dfy;
+                dmy = (zc - TorqueRefZ) * dfx - (xc - TorqueRefX) * dfz;
+                dmz = (xc - TorqueRefX) * dfy - (yc - TorqueRefY) * dfx;
+
+                cpx += dpx;
+                cpy += dpy;
+                cpz += dpz;
+
+                cfx += dfx;
+                cfy += dfy;
+                cfz += dfz;
+
+                cmx += dmx;
+                cmy += dmy;
+                cmz += dmz;
+
+                RDouble dir = cosa * fvsx + sina * fvsy;
+
+                RDouble density = q[IR][le];
+
+                //! Compute taoWall.
+                RDouble cfn  = fvsx * normalComponetX + fvsy * normalComponetY + fvsz * normalComponetZ;
+                RDouble cfxt = fvsx - cfn * normalComponetX;
+                RDouble cfyt = fvsy - cfn * normalComponetY;
+                RDouble cfzt = fvsz - cfn * normalComponetZ;
+
+                RDouble cft = sqrt(cfxt * cfxt + cfyt * cfyt + cfzt * cfzt);
+
+                RDouble cf = cft / area[iFace] * SIGN(1.0,dir);
+                RDouble taoWall = half * cft / area[iFace];
+
+                //! Compute yplus.
+                RDouble yPlus = 0.0;
+                if (viscousType > INVISCID)
+                {
+                    yPlus = refReNumber * sqrt(taoWall * density) * wallDistance[le] / vis;
+                }
+
+                faceCP   [iFace] = cp;
+                faceCF   [iFace] = cf;
+                faceYPlus[iFace] = yPlus;
+                facePW   [iFace] = pw_Dim;
+            }
+        }
+    }
+
+    //! Compute Q on wall face.
+    RDouble wallTemperature = parameters->GetWallTemperature();
+    RDouble dimensionalQ = 0.0;
+    if (wallTemperature >= 0)
+    {
+        RDouble refGama = parameters->GetRefGama();
+        RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+
+        RDouble velocityInflow = refMachNumber * refDimensionalSonicSpeed;
+        dimensionalQ = refDimensionalDensity * velocityInflow * velocityInflow * velocityInflow * 0.001;    //! 0.001: w --> kw
+
+        RDouble prandtlLaminar = parameters->GetPrandtlLaminar();
+        RDouble nonDimensionalSutherlandTemperature = parameters->GetNonDimensionalSutherlandTemperature();
+
+        RDouble Tw  = wallTemperature / refDimensionalTemperature;
+        RDouble Cv  = 1.0 / refGama / (refGama - 1.0) / refMachNumber / refMachNumber;
+        RDouble tmu = pow(Tw, 1.5) * (1.0 + nonDimensionalSutherlandTemperature) / (Tw + nonDimensionalSutherlandTemperature);
+
+        RDouble **t = reinterpret_cast< RDouble ** > (grid->GetDataPtr("t"));
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+            int bcType = bcRegion->GetBCType();
+
+            if (IsWall(bcType))
+            {
+                bool wallTempArrayExist = false;
+                RDouble *wallTempArray = NULL;
+                int countFace = 0;
+                if (bcRegion->CheckFieldData("wallTempArray"))
+                {
+                    wallTempArrayExist = true;
+                    wallTempArray = reinterpret_cast <RDouble *> (bcRegion->GetFieldDataPtr("wallTempArray"));
+                }
+                vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    //! iFace is the face number in the set of faceIndex.
+                    int iFace = *iter;
+                    int le = leftCellofFace[iFace];
+                    int re = rightCellofFace[iFace];
+
+                    if (wallTempArrayExist)
+                    {
+                        Tw = wallTempArray[countFace] / refDimensionalTemperature;
+                        countFace ++;
+                    }
+
+                    RDouble deltT = t[ITT][le] - Tw; 
+                    dx = xcc[re] - xcc[le];
+                    dy = ycc[re] - ycc[le];
+                    dz = zcc[re] - zcc[le];
+                    RDouble dd = dx * dx + dy * dy + dz * dz;
+
+                    dd = sqrt(dd)/2.0;
+                    deltT /= dd;
+
+                    faceQ[iFace] = Cv * tmu * deltT * refGama * oRefReNumber / prandtlLaminar;
+                }
+            }
+        }
+    }
+
+    //! Communicate data on interface.
+    int *lableCell = new int[nTotalCell];
+    std::fill_n(lableCell, nTotalCell, 0);
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        if (IsWall(bcType))
+        {
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                int iFace = *iter;
+                int le = leftCellofFace[iFace];
+                lableCell[le] = 1;
+            }
+        }
+        if (bcType == INTERFACE)
+        {
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                int iFace = *iter;
+                int cL = leftCellofFace[iFace];
+                if (lableCell[cL] == 1)
+                {
+                    lableCell[cL] = 2;
+                }
+            }
+        }
+    }
+
+    RDouble **cellQ2D = NewPointer2<RDouble>(1, nTotal);
+    RDouble * cellQ   = cellQ2D[0];
+    std::fill_n(cellQ, nTotal, 0);
+
+    RDouble **cellCP2D = NewPointer2<RDouble>(1, nTotal);
+    RDouble * cellCP   = cellCP2D[0];
+    std::fill_n(cellCP, nTotal, 0);
+
+    RDouble **cellCF2D = NewPointer2<RDouble>(1, nTotal);
+    RDouble * cellCF   = cellCF2D[0];
+    std::fill_n(cellCF, nTotal, 0);
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        if (IsWall(bcType))
+        {
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                int iFace = *iter;
+                int le = leftCellofFace[iFace];
+                if(lableCell[le] == 2)
+                {
+                    cellCF[le] = faceCF[iFace];
+                    cellCP[le] = faceCP[iFace];
+                    if (wallTemperature >= 0)
+                    {
+                        cellQ[le] = faceQ[iFace];
+                    }
+                }
+            }
+        }
+    }
+
+    delete []lableCell;    lableCell = NULL;
+
+    PHSPACE::CommunicateInterfaceValue(grid, cellCP2D, "cellCP", 1);
+    PHSPACE::CommunicateInterfaceValue(grid, cellCF2D, "cellCF", 1);
+    if (wallTemperature >= 0)
+    {
+        PHSPACE::CommunicateInterfaceValue(grid, cellQ2D, "cellQ", 1);
+    }
+
+    //! Compute data on wall node.
+    RDouble *nodeWeight = new RDouble[nTotalNode]();
+    std::fill_n(nodeWeight, nTotalNode, 0.0);
+
+    RDouble *nodeQ = new RDouble[nTotalNode]();
+    std::fill_n(nodeQ, nTotalNode, 0.0);
+
+    RDouble *nodeCP = new RDouble[nTotalNode]();
+    std::fill_n(nodeCP, nTotalNode, 0.0);
+
+    RDouble *nodeCF = new RDouble[nTotalNode]();
+    std::fill_n(nodeCF, nTotalNode, 0.0);
+
+    RDouble *nodeYPlus = new RDouble[nTotalNode]();
+    std::fill_n(nodeYPlus, nTotalNode, 0.0);
+
+    RDouble *nodePW = new RDouble[nTotalNode]();
+    std::fill_n(nodePW, nTotalNode, 0.0);
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        if (IsWall(bcType))
+        {
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                int iFace = *iter;
+                int leftCellIndex = leftCellofFace[iFace];
+                for (int iNode = static_cast<int>(nodePosi[iFace]); iNode < nodePosi[iFace+1]; ++ iNode)
+                {
+                    int nodeIndex = face2node[iNode];
+                    dx = x[nodeIndex] - xcc[leftCellIndex];
+                    dy = y[nodeIndex] - ycc[leftCellIndex];
+                    dz = z[nodeIndex] - zcc[leftCellIndex];
+                    RDouble dist = DISTANCE(dx, dy, dz);
+                    RDouble weightTemp = 1.0 / dist;
+
+                    nodeCP   [nodeIndex] += faceCP[iFace] * weightTemp;
+                    nodeCF   [nodeIndex] += faceCF[iFace] * weightTemp;
+                    nodeYPlus[nodeIndex] += faceYPlus[iFace] * weightTemp;
+                    nodePW   [nodeIndex] += facePW[iFace] * weightTemp;
+
+                    if (wallTemperature >= 0)
+                    {
+                        nodeQ[nodeIndex] += faceQ[iFace] * weightTemp;
+                    }
+                    nodeWeight[nodeIndex] += weightTemp;
+                }
+            }
+        }
+    }
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        if (nodeWeight[iNode] > SMALL)
+        {
+            nodeYPlus[iNode] /= nodeWeight[iNode];
+            nodePW   [iNode] /= nodeWeight[iNode];
+        }
+    }
+
+    //! For interface.
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        if (bcType == INTERFACE)
+        {
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                int iFace = *iter;
+                int cR = rightCellofFace[iFace];
+                if (ABS(cellQ[cR]) > SMALL)
+                {
+                    for (int iNode = static_cast<int>(nodePosi[iFace]); iNode < nodePosi[iFace+1]; ++ iNode)
+                    {
+                        int nodeIndex = face2node[iNode];
+                        if (nodeWeight[nodeIndex] > SMALL)
+                        {
+                            dx = x[nodeIndex] - xcc[cR];
+                            dy = y[nodeIndex] - ycc[cR];
+                            dz = z[nodeIndex] - zcc[cR];
+                            RDouble dist = DISTANCE(dx, dy, dz);
+                            RDouble weightTemp = 1.0 / dist;
+
+                            nodeCP[nodeIndex] += cellCP[cR] * weightTemp;
+                            nodeCF[nodeIndex] += cellCF[cR] * weightTemp;
+                            if (wallTemperature >= 0)
+                            {
+                                nodeQ[nodeIndex] += cellQ[cR] * weightTemp;
+                            }
+                            nodeWeight[nodeIndex] += weightTemp;
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        if (nodeWeight[iNode] > SMALL)
+        {
+            nodeCP[iNode] /= nodeWeight[iNode];
+            nodeCF[iNode] /= nodeWeight[iNode];
+            if (wallTemperature >= 0)
+            {
+                nodeQ[iNode] /= nodeWeight[iNode];
+            }
+        }
+    }
+
+    delete [] faceCP;     faceCP = NULL;
+    delete [] faceCF;     faceCF = NULL;
+    delete [] faceQ;      faceQ = NULL;
+    delete [] nodeWeight; nodeWeight = NULL;
+    delete [] faceYPlus;  faceYPlus = NULL;
+    delete [] facePW;     facePW = NULL;
+    DelPointer2(cellQ2D);
+    DelPointer2(cellCP2D);
+    DelPointer2(cellCF2D);
+
+    //! Compute data on wall face center.
+    RDouble *cpFaceCenter    = new RDouble[nBoundFace]();
+    RDouble *cfFaceCenter    = new RDouble[nBoundFace]();
+    RDouble *qFaceCenter     = new RDouble[nBoundFace]();
+    RDouble *yPlusFaceCenter = new RDouble[nBoundFace]();
+    RDouble *PWFaceCenter    = new RDouble[nBoundFace]();
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        if (face2node[iFace] > 4)
+        {
+            RDouble valueCP    = 0.0;
+            RDouble valueCF    = 0.0;
+            RDouble valueQ     = 0.0;
+            RDouble valueYPlus = 0.0;
+            RDouble valuePW    = 0.0;
+
+            int nodeIndex;
+            for (int iNode = static_cast<int>(nodePosi[iFace]); iNode < nodePosi[iFace+1]; ++ iNode)
+            {
+                nodeIndex   = face2node[iNode];
+                valueCP    += nodeCP   [nodeIndex];
+                valueCF    += nodeCF   [nodeIndex];
+                valueYPlus += nodeYPlus[nodeIndex];
+                valuePW    += nodePW   [nodeIndex];
+                if (wallTemperature >= 0)
+                {
+                    valueQ += nodeQ[nodeIndex];
+                }
+            }
+            cpFaceCenter[iFace]    = valueCP    / node_number_of_each_face[iFace];
+            cfFaceCenter[iFace]    = valueCF    / node_number_of_each_face[iFace];
+            qFaceCenter [iFace]    = valueQ     / node_number_of_each_face[iFace];
+            yPlusFaceCenter[iFace] = valueYPlus / node_number_of_each_face[iFace];
+            PWFaceCenter[iFace] = valuePW / node_number_of_each_face[iFace];
+        }
+    }
+
+    set<pair<int, string> > bcnameMap;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+
+        bcnameMap.insert(pair<int, string>(bcType, bcName));
+    }
+
+    //! Reconstruct grid mesh of wall.
+    for (set<pair<int, string> >::iterator iter = bcnameMap.begin(); iter != bcnameMap.end(); ++ iter)
+    {
+        if ((*iter).first != PHENGLEI::SOLID_SURFACE) continue;
+
+    vector < vector < int > > face2nodelist(nBoundFace);
+    vector < int > linkmap;
+        GetFace2NodeList(grid, *iter, linkmap, face2nodelist);
+
+    int NumPts      = static_cast<int>(linkmap.size());
+    int NumElements = static_cast<int>(face2nodelist.size());
+    int NumFaces    = NumElements * 4;
+    int TotalNumFaceNodes = NumElements * 4;
+    int *cell2node        = new int[TotalNumFaceNodes]();
+
+    int count = 0;
+    for (std::size_t iFace = 0; iFace < face2nodelist.size(); ++ iFace)
+    {
+        uint_t nodes  = face2nodelist[iFace].size();
+        int nodeIndex = face2nodelist[iFace][0];
+        for (int iNode = 0; iNode < nodes; ++ iNode)
+        {
+            cell2node[count] = face2nodelist[iFace][iNode] + 1;
+            count ++;
+        }
+
+        for (uint_t ip = nodes; ip < 4; ++ ip)
+        {
+            cell2node[count] = nodeIndex + 1;
+            count ++;
+        }
+    }
+
+    RDouble *coorX     = new RDouble[NumPts]();
+    RDouble *coorY     = new RDouble[NumPts]();
+    RDouble *coorZ     = new RDouble[NumPts]();
+    RDouble *dumpCP    = new RDouble[NumPts]();
+    RDouble *dumpCF    = new RDouble[NumPts]();
+    RDouble *dumpQ     = new RDouble[NumPts]();
+    RDouble *dumpQNon  = new RDouble[NumPts]();
+    RDouble *dumpYPlus = new RDouble[NumPts]();
+    RDouble *dumpPW    = new RDouble[NumPts]();
+
+    for (std::size_t iNode = 0; iNode < linkmap.size(); ++ iNode)
+    {
+        int nodeIndex = linkmap[iNode];
+
+        if (nodeIndex < nTotalNode)
+        {
+            coorX[iNode] = x[nodeIndex];
+            coorY[iNode] = y[nodeIndex];
+            coorZ[iNode] = z[nodeIndex];
+
+            dumpCP   [iNode] = nodeCP   [nodeIndex];
+            dumpCF   [iNode] = nodeCF   [nodeIndex];
+            dumpYPlus[iNode] = nodeYPlus[nodeIndex];
+            dumpPW   [iNode] = nodePW   [nodeIndex];
+            dumpQ    [iNode] = nodeQ    [nodeIndex] * dimensionalQ;
+            dumpQNon [iNode] = nodeQ    [nodeIndex];
+        }
+        else
+        {
+            int faceIndex = nodeIndex - nTotalNode;
+            coorX[iNode] = xfc[faceIndex];
+            coorY[iNode] = yfc[faceIndex];
+            coorZ[iNode] = zfc[faceIndex];
+
+            dumpCP   [iNode] = cpFaceCenter   [faceIndex];
+            dumpCF   [iNode] = cfFaceCenter   [faceIndex];
+            dumpYPlus[iNode] = yPlusFaceCenter[faceIndex];
+            dumpPW   [iNode] = PWFaceCenter   [faceIndex];
+            dumpQ    [iNode] = qFaceCenter    [faceIndex] * dimensionalQ;
+            dumpQNon [iNode] = qFaceCenter    [faceIndex];
+        }
+    }
+
+    int TecioMission = 1;
+    PHWrite(cdata, &TecioMission, 1);
+
+    string bcName = (*iter).second;
+    cdata->write_string(bcName);
+
+    PHWrite(cdata, &NumPts, 1);
+    PHWrite(cdata, &NumElements, 1);
+    PHWrite(cdata, &NumFaces, 1);
+
+    PHWrite(cdata, NumPts);
+    PHWrite(cdata, coorX, NumPts);
+    PHWrite(cdata, coorY, NumPts);
+    PHWrite(cdata, coorZ, NumPts);
+
+    int ValueLocation = 1;
+
+    PHWrite(cdata, NumPts);
+    PHWrite(cdata, ValueLocation);
+    PHWrite(cdata, dumpCP, NumPts);
+
+    PHWrite(cdata, NumPts);
+    PHWrite(cdata, ValueLocation);
+    PHWrite(cdata, dumpCF, NumPts);
+
+    PHWrite(cdata, NumPts);
+    PHWrite(cdata, ValueLocation);
+    PHWrite(cdata, dumpYPlus, NumPts);
+
+    ValueLocation = 1;
+
+    PHWrite(cdata, NumPts);
+    PHWrite(cdata, ValueLocation);
+    PHWrite(cdata, dumpQNon, NumPts);
+
+    PHWrite(cdata, NumPts);
+    PHWrite(cdata, ValueLocation);
+    PHWrite(cdata, dumpQ, NumPts);
+
+    PHWrite(cdata, NumPts);
+    PHWrite(cdata, ValueLocation);
+    PHWrite(cdata, dumpPW, NumPts);
+
+    PHWrite(cdata, &TotalNumFaceNodes, 1);
+    PHWrite(cdata, cell2node, TotalNumFaceNodes);
+
+    delete []coorX;    coorX = NULL;
+    delete []coorY;    coorY = NULL;
+    delete []coorZ;    coorZ = NULL;
+    delete []dumpCP;    dumpCP = NULL;
+    delete []dumpCF;    dumpCF = NULL;
+    delete []dumpQ;    dumpQ = NULL;
+    delete []dumpQNon;    dumpQNon = NULL;
+    delete []dumpYPlus;    dumpYPlus = NULL;
+    delete []dumpPW;    dumpPW = NULL;
+    delete []cell2node;    cell2node = NULL;
+}
+
+    delete [] nodeQ;           nodeQ = NULL;
+    delete [] nodeCP;          nodeCP = NULL;
+    delete [] nodeCF;          nodeCF = NULL;
+    delete [] nodeYPlus;       nodeYPlus = NULL;
+    delete [] nodePW;          nodePW = NULL;
+    delete [] cpFaceCenter;    cpFaceCenter = NULL;
+    delete [] cfFaceCenter;    cfFaceCenter = NULL;
+    delete [] qFaceCenter;     qFaceCenter = NULL;
+    delete [] yPlusFaceCenter; yPlusFaceCenter = NULL;
+    delete [] PWFaceCenter;    PWFaceCenter = NULL;
+}
+
+//! Dump out some flow field variables, for the case of turbulent flat plate of NASA Turbulence Center.
+//! Inflow condition: Ma = 0.2, Re = 5.0e6.
+void NSSolverUnstruct::Turbulence_Flat_Plate_Output_NASA(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalNode = grid->GetNTotalNode();
+    RDouble ** qVist;
+
+    //! 100.000 kPa = 1 bar �� 14.504 psi
+    //! Condition for calculation
+    //! Static Pressure (psia) 6.0 = 100000 / 14.504 * 6 Pa = 41367.8986 Pa
+    //! Temperature(R) 700.0 = (5/9)*700 = 388.88K
+
+    //! Dump out the Velocity.
+    vector<string> title_tecplot;
+    title_tecplot.push_back("title=\"Flow Fields of PHengLEI\"");
+    title_tecplot.push_back("variables=");
+    title_tecplot.push_back("\"y\"");
+    title_tecplot.push_back("\"u\"");
+    title_tecplot.push_back("\"y+\"");
+    title_tecplot.push_back("\"u+\"");    
+    int nvarplot;
+    nvarplot = 2;
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    using namespace PHSPACE;
+    RDouble refGama = parameters->GetRefGama();
+    RDouble reference_mach_number = parameters->GetRefMachNumber();
+    RDouble refReNumber = 1.0e5;
+    refReNumber = parameters->GetRefReNumber();
+    RDouble tsuth;
+    GlobalDataBase::GetData("tsuth", &tsuth, PHDOUBLE, 1);
+
+    fstream file;
+    PHSPACE::OpenFile(file, "results/turblent_flat_plate.dat", ios_base::out);
+
+    int wordwidth = 20;
+
+    RDouble * vist = reinterpret_cast< RDouble * > (grid->GetDataPtr("vist"));
+
+    int nline = 2;
+
+    vector<RDouble> xPositionList(nline);
+    xPositionList[0] = 0.97008;
+    xPositionList[1] = 1.90334;    
+
+    for (std::size_t i = 0; i < title_tecplot.size(); ++ i)
+    {
+        file << title_tecplot[i] << "\n";
+    }
+
+    RDouble ** nodevar = NewPointer2<RDouble>(nEquation + 1, nTotalNode);
+    CreateNodeVariable(grid, nodevar);
+
+    for (int m = 0; m < nline; ++ m)
+    {
+        PHCutPlane * cutpl = new PHCutPlane();
+        CutPlane(grid, nodevar, nEquation, xPositionList[m], cutpl, X_DIR);
+
+        cutpl->SortData(cutpl->y);
+
+        int nT = cutpl->nTotalNode;
+        file << "zone  T = \"x = " << xPositionList[m] << "\" \n";
+        //�ҵ������һ��ĵ�
+        vector<RDouble> ylist(nT);
+        for (int i = 0; i < nT; ++ i)
+        {
+            ylist[i] = cutpl->y[i];
+        }
+        sort(ylist.begin(),ylist.end());
+
+        int yindex = 1;
+        for (int i = 0; i < nT; ++ i)
+        {
+            if (ylist[i])
+            {
+                yindex = i;
+                break;
+            }
+        }
+
+        for (int i = 0; i < nT; ++ i)
+        {
+            if (ylist[yindex] == cutpl->y[i])
+            {
+                yindex = i;
+                break;
+            }
+        }
+
+        for (int i = 0; i < nT; ++ i)
+        {
+            RDouble rm,um,vm,wm,pm,tm,xm,ym,zm,mu,muw,dudy,tauw,utau,up,yp,rw;
+            RDouble uw,vw,ww,pw,yw,tw;
+            xm   = cutpl->x[i];
+            ym   = cutpl->y[i];
+            zm   = cutpl->z[i];
+
+            rm   = cutpl->data[0][i];
+            um   = cutpl->data[1][i];
+            vm   = cutpl->data[2][i];
+            wm   = cutpl->data[3][i];
+            pm   = cutpl->data[4][i];
+            tm   = refGama * reference_mach_number * reference_mach_number * pm / rm;
+            mu   = tm * sqrt(tm) * (1.0 + tsuth) / (tm + tsuth);
+
+            rw   = cutpl->data[0][yindex];
+            uw   = cutpl->data[1][yindex];
+            vw   = cutpl->data[2][yindex];
+            ww   = cutpl->data[3][yindex];
+            pw   = cutpl->data[4][yindex];
+            tw   = refGama * reference_mach_number * reference_mach_number * pm / rm;
+
+            muw  = tm * sqrt(tm) * (1.0 + tsuth) / (tm + tsuth);
+            yw   = cutpl->y[yindex];
+
+            dudy = uw / yw;
+            tauw = muw * dudy;
+
+            utau = sqrt(tauw/(rw * refReNumber));
+
+            up   = um / utau;
+            yp   = utau * ym * refReNumber / (mu / rm);
+
+            file << setiosflags(ios::left);
+            file << setiosflags(ios::scientific);
+            file << setprecision(10);
+            file << setw(wordwidth) << ym 
+                 << setw(wordwidth) << um
+                 << setw(wordwidth) << yp
+                 << setw(wordwidth) << up;
+            file << "\n";
+        }
+        delete cutpl;
+    }
+    file.close();
+    file.clear();
+    DelPointer2(nodevar);
+
+    //! Dump out the friction.
+    RDouble **q   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q" ));
+    PHCutPlane * cutpl = new PHCutPlane();
+    CutPlaneCellCenter(grid, q, nEquation, 2.0e-6, cutpl, Y_DIR);
+    cutpl->SortData(cutpl->x);
+
+    int nT = cutpl->nTotalNode;
+    if(nT > 0)
+    {
+        ostringstream frictionFileName;
+        frictionFileName << "results/turblent_flat_plate_nasa_cf_" << grid->GetZoneID() + 1<< ".dat";
+        PHSPACE::OpenFile(file, frictionFileName.str().c_str(), ios_base::out);
+
+        file << "title=\"Flow Fields of PHengLEI\"\n";
+        file << "variables = \"x\" \"cf\" \n";
+        file << "zone  i = " << nT  << " \n";
+        for (int i = 0; i < nT; ++ i)
+        {
+            RDouble rm,um,vm,wm,pm,tm,xm,ym,zm,mu,dudy;
+            xm   = cutpl->x[i];
+            ym   = cutpl->y[i];
+            zm   = cutpl->z[i];
+
+            rm   = cutpl->data[0][i];
+            um   = cutpl->data[1][i];
+            vm   = cutpl->data[2][i];
+            wm   = cutpl->data[3][i];
+            pm   = cutpl->data[4][i];
+            tm   = refGama * reference_mach_number * reference_mach_number * pm / rm;
+            mu   = tm * sqrt(tm) * (1.0 + tsuth) / (tm + tsuth);
+            dudy = um / ym;
+
+            file << setiosflags(ios::left);
+            file << setiosflags(ios::scientific);
+            file << setprecision(10);
+            file << setw(wordwidth) << xm
+                << setw(wordwidth) << 2 * mu * dudy / refReNumber
+                << "\n";
+        }
+
+        frictionFileName.clear();
+        
+        PHSPACE::CloseFile(file);
+    }
+
+    delete cutpl;
+
+    //! Dump out the turbulent viscosity of x = 0.97
+    qVist = new RDouble *[1];    //! Tempal 2D array for vist, to dump both x and y value.
+    qVist[0] = vist;
+    cutpl = new PHCutPlane();
+    CutPlaneCellCenter(grid,qVist,1,0.97,cutpl,X_DIR);
+    cutpl->SortData(cutpl->y);
+    nT = cutpl->nTotalNode;
+    if(nT > 0)
+    {
+        ostringstream xSliceFileName;
+        xSliceFileName << "results/turblent_flat_plate_nasa_vist_x0d97_" << grid->GetZoneID() + 1 << ".dat";
+        PHSPACE::OpenFile(file, xSliceFileName.str().c_str(), ios_base::out);
+
+        file << "title=\"turbulent viscosity at x = 0.97\"\n";
+        file << "variables = \"vist\"    \"Y\"\n";
+        file << "zone  i = " << nT  << " \n";
+        for (int i = 0; i < nT; ++ i)
+        {
+            RDouble ym   = cutpl->y[i];
+            RDouble vist1 = cutpl->data[0][i];
+
+            file << setiosflags(ios::left);
+            file << setiosflags(ios::scientific);
+            file << setprecision(10);
+            file << setw(wordwidth) << vist1
+                << setw(wordwidth) << ym
+                << "\n";
+        }
+
+        xSliceFileName.clear();
+
+        PHSPACE::CloseFile(file);
+    }
+
+    delete cutpl;
+    delete [] qVist;
+
+    //! Dump out the the MAXIMUM eddy viscosity as a function of x
+    using namespace PHMPI;
+    if (GetNumberofGlobalZones() > 1)
+    {
+        return;
+    }
+    string maxVistOfX = "results/turblent_flat_plate_nasa_vist_maximum.dat";
+    PHSPACE::OpenFile(file, maxVistOfX.c_str(), ios_base::out);
+
+    file << "title=\"the maximum turbulent viscosity\"\n";
+    file << "variables = \"X\"    \"vist\"\n";
+
+    qVist = new RDouble *[1];    //! Tempal 2D array for vist, to dump both x and y value.
+    qVist[0] = vist;
+
+    //! Get the number of x stand position.
+    int nXStand = 0;
+    RDouble* xfc = grid->GetFaceCenterX();
+   
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+    
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        vector<int>* faceIndex = bcRegion->GetFaceIndex();
+        if (bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::SYMMETRY)
+        {
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                ++ nXStand;
+            }
+
+        }
+    }
+
+    //! Get the x stand position.
+    RDouble* xOfStand = new RDouble [nXStand];
+    nXStand = 0;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        vector<int>* faceIndex = bcRegion->GetFaceIndex();
+        if (bcType == PHENGLEI::SOLID_SURFACE || bcType == PHENGLEI::SYMMETRY)
+        {
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                int iFace = *iter;
+                xOfStand[nXStand++] = xfc[iFace];
+            }
+
+        }
+    }
+
+    vector< vector < RDouble > > var_list;
+    vector < RDouble > x_list;
+    vector < RDouble > var(1);
+    cutpl = new PHCutPlane();    //! Store the maximum viscosity of each xcut stand.
+
+    RDouble* maxVistOfStandX = new RDouble [nXStand];
+    for (int iStand = 0; iStand < nXStand; ++ iStand)
+    {
+        RDouble xCut = xOfStand[iStand];
+        PHCutPlane* cutpX = new PHCutPlane();    //! Store the viscosity of ONE x stand, x = xcut.
+
+        RDouble maxVist = -LARGE;
+        CutPlaneCellCenter(grid,qVist,1,xCut,cutpX,X_DIR);
+        nT = cutpX->nTotalNode;
+        for (int i = 0; i < nT; ++ i)
+        {
+            RDouble vist2 = cutpX->data[0][i];
+            maxVist = MAX(maxVist, vist2);
+        }
+
+        var[0] = maxVist;
+        var_list.push_back(var);
+        x_list.push_back(xCut);
+
+        delete cutpX;
+    }
+
+    cutpl->neqn   = 1;
+    cutpl->nTotalNode = static_cast<int>(var_list.size());
+    cutpl->data   = new RDouble * [ 1 ];
+    for (int m = 0; m < 1; ++ m)
+    {
+        cutpl->data[m] = new RDouble [ cutpl->nTotalNode ];
+    }
+    cutpl->x = new RDouble [ cutpl->nTotalNode ];
+    cutpl->y = new RDouble [ cutpl->nTotalNode ];
+    cutpl->z = new RDouble [ cutpl->nTotalNode ];
+    for (int iNode = 0; iNode < cutpl->nTotalNode; ++ iNode)
+    {
+        cutpl->x[iNode] = x_list[iNode];
+        cutpl->y[iNode] = 0;
+        cutpl->z[iNode] = 0;
+    }
+    for (int iNode = 0; iNode < cutpl->nTotalNode; ++ iNode)
+    {
+        for (int m = 0; m < 1; ++ m)
+        {
+            cutpl->data[m][iNode] = var_list[iNode][m];
+        }
+    }
+
+    cutpl->SortData(cutpl->x);
+
+    nT = cutpl->nTotalNode;
+    file << "zone  i = " << nT  << " \n";
+    for (int i = 0; i < nT; ++ i)
+    {
+        RDouble xm   = cutpl->x[i];
+        RDouble vist3 = cutpl->data[0][i];
+
+        file << setiosflags(ios::left);
+        file << setiosflags(ios::scientific);
+        file << setprecision(10);
+        file << setw(wordwidth) << xm
+            << setw(wordwidth) << vist3
+            << "\n";
+    }
+    
+    PHSPACE::CloseFile(file);
+    delete cutpl;
+    delete [] xOfStand;
+    delete [] maxVistOfStandX;
+    delete [] qVist;
+}
+
+void NSSolverUnstruct::CreateNodeVariable(Grid *gridIn, RDouble **nodevar)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+
+    int nEquation = GetNumberOfEquations();
+
+    ComputeNodeVariable(grid, nodevar, q, nEquation);
+}
+
+void NSSolverUnstruct::ComputeAverageVisualNodeField(Grid *gridIn, RDouble **qn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **qAverage = reinterpret_cast< RDouble ** > (grid->GetDataPtr("qAverage"));
+
+    int varCount = 0;
+
+    using namespace IDX;
+    CompNodeVar(grid, qn[varCount ++], qAverage[IR]);
+    CompNodeVarForVisual(grid, qn[varCount ++], qAverage[IU]);
+    CompNodeVarForVisual(grid, qn[varCount ++], qAverage[IV]);
+    CompNodeVarForVisual(grid, qn[varCount ++], qAverage[IW]);
+    CompNodeVar(grid, qn[varCount ++], qAverage[IP]);
+
+    RDouble * cp = ComputeCpAverage(gridIn);
+    CompNodeVar(grid, qn[varCount ++], cp);
+    delete [] cp;
+}
+
+void NSSolverUnstruct::SliceVisualization(Grid *gridIn, ActionKey *actkey, RDouble **qn, int nvarplot)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    DataContainer * cdata = actkey->GetTecData();
+
+    int * node_number_of_each_face = grid->GetNodeNumberOfEachFace();
+    int * face2node = grid->GetFace2Node();
+
+    RDouble * x = grid->GetX();
+    RDouble * y = grid->GetY();
+    RDouble * z = grid->GetZ();
+
+    vector < RDouble > xSlice;
+    vector < RDouble > ySlice;
+    vector < RDouble > zSlice;
+    vector < vector <RDouble> > qnSlice;
+    qnSlice.resize(nvarplot);
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int sliceAxis = parameters->GetSliceAxis();
+    RDouble slicePostion = parameters->GetSlicePostion();
+
+    RDouble *xyz = 0;
+    if (sliceAxis == X_DIR)
+    {
+        xyz = x;
+    }
+    else if (sliceAxis == Y_DIR)
+    {
+        xyz = y;
+    }
+    else
+    {
+        xyz = z;
+    }
+
+    RDouble Small = 1.0e-10;
+    int nCount = 0;
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            //! iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            if (bcType != PHENGLEI::SOLID_SURFACE)
+            {
+                nCount += node_number_of_each_face[iFace];
+                continue;
+            }
+
+            RDouble coor_min =   LARGE;
+            RDouble coor_max = - LARGE;
+
+            for (int iNode = 0; iNode < node_number_of_each_face[ iFace ]; ++ iNode)
+            {
+                int index = face2node[ nCount + iNode ];
+                coor_min = MIN(xyz[ index ],coor_min);
+                coor_max = MAX(xyz[ index ],coor_max);
+            }
+
+            if ((coor_min - slicePostion) * (coor_max - slicePostion) > 0.0)
+            {
+                nCount += node_number_of_each_face[ iFace ];
+                continue;
+            }
+
+            for (int iNode = 0; iNode < node_number_of_each_face[ iFace ]; ++ iNode)
+            {
+                int Node_index0 = face2node[ nCount + iNode % node_number_of_each_face[ iFace ] ];
+                int Node_index1 = face2node[ nCount + (iNode + 1) % node_number_of_each_face[ iFace ] ];
+
+                if ((xyz[ Node_index0 ] - slicePostion) * (xyz[ Node_index1 ] - slicePostion) > 0.0) continue;
+
+                if (fabs(xyz[ Node_index1 ] - xyz[ Node_index0 ]) < Small)
+                {
+                    xSlice.push_back(x[ Node_index0 ]);
+                    xSlice.push_back(x[ Node_index1 ]);
+
+                    ySlice.push_back(x[ Node_index0 ]);
+                    ySlice.push_back(x[ Node_index1 ]);
+
+                    zSlice.push_back(x[ Node_index0 ]);
+                    zSlice.push_back(x[ Node_index1 ]);
+
+                    continue;
+                }
+
+                if (sliceAxis == X_DIR)
+                {
+                    xSlice.push_back(slicePostion);
+                }
+                else if (fabs(x[ Node_index0 ] - x[ Node_index1 ]) < Small)
+                {
+                    xSlice.push_back(x[ Node_index0]);
+                }
+                else
+                {
+                    RDouble Node_x = (slicePostion - xyz[ Node_index0]) * (x[ Node_index1 ] - x[ Node_index0 ]) / (xyz[ Node_index1 ] - xyz[ Node_index0 ]) + x[ Node_index0 ];
+                    xSlice.push_back(Node_x);
+                }
+
+                if (sliceAxis == Y_DIR)
+                {
+                    ySlice.push_back(slicePostion);
+                }
+                else if (fabs(y[ Node_index0 ] - y[ Node_index1 ]) < Small)
+                {
+                    ySlice.push_back(y[ Node_index0 ]);
+                }
+                else
+                {
+                    RDouble Node_y = (slicePostion - xyz[ Node_index0 ]) * (y[ Node_index1 ] - y[ Node_index0 ]) / (xyz[ Node_index1 ] - xyz[ Node_index0 ]) + y[ Node_index0 ];
+                    ySlice.push_back(Node_y);
+                }
+
+                if (sliceAxis == Z_DIR)
+                {
+                    zSlice.push_back(slicePostion);
+                }
+                else if (fabs(z[ Node_index0 ] - z[ Node_index1 ]) < Small)
+                {
+                    zSlice.push_back(z[ Node_index0 ]);
+                }
+                else
+                {
+                    RDouble Node_z = (slicePostion - xyz[ Node_index0 ]) * (z[ Node_index1 ] - z[ Node_index0 ]) / (xyz[ Node_index1 ] - xyz[ Node_index0 ]) + z[ Node_index0 ];
+                    zSlice.push_back(Node_z);
+                }
+
+                for (int iVarplot = 0; iVarplot < nvarplot; ++ iVarplot)
+                {
+                    if (fabs(qn[ iVarplot ][ Node_index0 ] - qn[ iVarplot ][ Node_index1 ]) < Small)
+                    {
+                        RDouble Node_q = qn[ iVarplot ][ Node_index0 ];
+                        qnSlice[ iVarplot ].push_back(Node_q);
+                    }
+                    else
+                    {
+                        RDouble Node_q = (slicePostion - xyz[ Node_index0 ]) * (qn[ iVarplot ][ Node_index1 ] - qn[ iVarplot ][ Node_index0 ]) / (xyz[ Node_index1 ] - xyz[ Node_index0 ]) + qn[ iVarplot ][ Node_index0 ];
+                        qnSlice[ iVarplot ].push_back(Node_q);
+                    }
+                }
+            }
+
+            nCount += node_number_of_each_face[ iFace ];
+        }
+    }
+
+    size_t NumPts = xSlice.size();
+    PHWrite(cdata, &NumPts, 1);
+
+    if (NumPts == 0)  return;
+
+    PHWrite(cdata, &xSlice[ 0 ], NumPts);
+    PHWrite(cdata, &ySlice[ 0 ], NumPts);
+    PHWrite(cdata, &zSlice[ 0 ], NumPts);
+    for (int iVarplot = 0; iVarplot < nvarplot; ++ iVarplot)
+    {
+        PHWrite(cdata, &qnSlice[ iVarplot ][ 0 ], NumPts);
+    }
+}
+
+void NSSolverUnstruct::BoundaryVisualization(Grid *gridIn, ActionKey *actkey, RDouble **qn, int nvarplot)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    DataContainer * cdata = actkey->GetTecData();
+
+    int nBoundFace = grid->GetNBoundFace();
+
+    RDouble * x = grid->GetX();
+    RDouble * y = grid->GetY();
+    RDouble * z = grid->GetZ();
+
+    using namespace PHENGLEI;
+    vector < vector < int > > face2nodelist(nBoundFace);
+    vector < int > linkmap;
+    set<int> bclist;
+
+    set< pair<int, string> > bcnameMap;
+
+    UnstructBCSet **bcr = grid->GetBCRecord();
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int bcType = bcr[iFace]->GetKey();
+        bclist.insert(bcType);
+        string bcname = bcr[iFace]->GetBCName();
+
+        bcnameMap.insert(pair<int,string>(bcType, bcname));
+    }
+    
+    int TecioMission;
+    set< pair<int, string> >::iterator iter;
+    for (iter = bcnameMap.begin(); iter != bcnameMap.end(); ++ iter)
+    {
+        if ((*iter).first == PHENGLEI::INTERFACE || (*iter).first < 0 ) continue;
+
+        face2nodelist.resize(0);
+        linkmap.resize(0);
+
+        GetFace2NodeList(grid, *iter, linkmap, face2nodelist);
+
+        if(linkmap.size() == 0)
+        {
+            continue;
+        }
+
+        TecioMission = WriteBoundary;
+        PHWrite(cdata, &TecioMission, 1);
+
+        int BCtype = (*iter).first;
+        PHWrite(cdata, &BCtype, 1);
+
+        size_t NumPts = linkmap.size();
+        size_t NumElements = face2nodelist.size();
+        size_t NumFaces = NumElements * 4;
+        PHWrite(cdata, &NumPts, 1);
+        PHWrite(cdata, &NumElements, 1);
+        PHWrite(cdata, &NumFaces, 1);
+
+        size_t TotalNumFaceNodes_Rect = NumElements * 4;
+        int *cell2node = new int [TotalNumFaceNodes_Rect];
+        int *node_number_of_each_cell = new int [NumElements];
+
+        int count = 0;
+        for (std::size_t i = 0; i < face2nodelist.size(); ++ i)
+        {
+            node_number_of_each_cell[i] = 4;
+            int np     = static_cast<int>(face2nodelist[i].size());
+            int index0 = face2nodelist[i][0];
+            for (int ip = 0; ip < np; ++ ip)
+            {
+                cell2node[count] = face2nodelist[i][ip];
+                count ++;
+            }
+
+            for (int ip = np; ip < 4; ++ ip)
+            {
+                cell2node[count] = index0;
+                count ++;
+            }
+        }
+
+        PHWrite(cdata, &TotalNumFaceNodes_Rect, 1);
+        PHWrite(cdata, node_number_of_each_cell, NumElements);
+
+        PHWrite(cdata, &NumPts, 1);
+
+        RDouble * xx = new RDouble [NumPts];
+        RDouble * yy = new RDouble [NumPts];
+        RDouble * zz = new RDouble [NumPts];
+
+        for (std::size_t i = 0; i < linkmap.size(); ++ i)
+        {
+            int it = linkmap[i];
+            xx[i] = x[it];
+            yy[i] = y[it];
+            zz[i] = z[it];
+        }
+
+        PHWrite(cdata, xx, NumPts);
+        PHWrite(cdata, yy, NumPts);
+        PHWrite(cdata, zz, NumPts);
+
+
+        for (int m = 0; m < nvarplot; ++ m)
+        {
+
+            RDouble * qq = new RDouble [NumPts];
+
+            for (std::size_t i = 0; i < linkmap.size(); ++ i)
+            {
+                int it = linkmap[i];
+                qq[i] = qn[m][it];
+            }
+
+            PHWrite(cdata, qq, NumPts);
+            delete [] qq;
+        }
+
+        PHWrite(cdata, cell2node, TotalNumFaceNodes_Rect);
+
+        delete [] cell2node;
+        delete [] node_number_of_each_cell;
+        delete [] xx;
+        delete [] yy;
+        delete [] zz;
+    }
+}
+
+void NSSolverUnstruct::VisualizationAverageFlow(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid * grid = UnstructGridCast(GetGrid(level));
+    int nTotalNode = grid->GetNTotalNode();
+
+    //! Average flow of DES statistics.
+    int nvarplot = 6;
+
+    RDouble ** qn = NewPointer2<RDouble>(nvarplot, nTotalNode);
+    ComputeAverageVisualNodeField(grid, qn);
+
+    int gridID = grid->GetGridID()->GetIndex();
+    PHWrite(actkey->GetTecData(), gridID);
+
+    int dimension = grid->GetDim();
+    PHWrite(actkey->GetTecData(), dimension);
+
+    int type = grid->Type();
+    PHWrite(actkey->GetTecData(), &type, 1);
+
+    BoundaryVisualization(grid, actkey, qn, nvarplot);
+
+    if (WantVisualField(grid))
+    {
+        SaveDataForTecio(grid, actkey, qn, nvarplot);
+    }
+
+    int TecioMission = Writecomplete;
+    PHWrite(actkey->GetTecData(), &TecioMission, 1);
+
+    int visualSlice = GlobalDataBase::GetIntParaFromDB("visualSlice");
+    if (grid->GetDim() == THREE_D && visualSlice == 1)
+    {
+        SliceVisualization(grid, actkey, qn, nvarplot);
+    }
+
+    DelPointer2(qn);
+}
+
+Limiter *NSSolverUnstruct::CreateLimiter(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    int limitVariables = parameters->GetLimitVariables();
+    int limitVector = parameters->GetLimitVector();
+    int limiterType = parameters->GetLimiterType();
+
+    int nEquation = GetNumberOfEquations();
+
+    int nVariables = 1;
+    if (limitVector != 0 || limitVariables != 0)
+    {
+        nVariables = nEquation;
+    }
+
+    RDouble **q = reinterpret_cast<RDouble **>(grid->GetDataPtr("q"));
+
+    Limiter *limiter = new Limiter(grid, q, nVariables, "limit");
+    limiter->SetLimiterTypeID(limiterType);
+    limiter->SetLimiterModel(limitVariables);
+    limiter->SetLimiterVector(limitVector);
+    limiter->InitLimitData();
+    if (limiterType == ILMT_VENCAT)
+    {
+        int ivencat = GlobalDataBase::GetIntParaFromDB("ivencat");
+        limiter->SetVencatLimiterType(ivencat);
+    }
+
+    limiter->Calculation(gridIn);
+
+    return limiter;
+}
+
+FaceProxy * NSSolverUnstruct::CreateFaceProxy(Grid *gridIn)
+{
+    int nEquation = GetNumberOfEquations();
+
+    FaceProxy *faceProxy = new FaceProxy();
+    faceProxy->Create(SEGCTION_LENGTH, nEquation);
+    return faceProxy;
+}
+
+GeomProxy * NSSolverUnstruct::CreateGeomProxy(Grid *gridIn)
+{
+    GeomProxy *geomProxy = new GeomProxy();
+    geomProxy->Create(SEGCTION_LENGTH);
+    return geomProxy;
+}
+
+NSFaceValue *NSSolverUnstruct::CreateNSFaceValue(Grid *gridIn)
+{
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    int numberOfSpecies = parameters->GetNumberOfSpecies();
+
+    NSFaceValue *facevar = new NSFaceValue(nEquation, numberOfSpecies, SEGCTION_LENGTH);
+    return facevar;
+}
+
+RDouble NSSolverUnstruct::P0Wall(RDouble p1, RDouble gama, RDouble mach)
+{
+    RDouble p2, m2;
+    if (mach > one)
+    {
+        p2 = p1 * ShockRelations::P2OverP1(gama, mach);
+        m2 = ShockRelations::MachBehindShock(gama, mach);
+        return p2  * IsentropicRelations::P0OverP(gama, m2);
+    }
+    else
+    {
+        return p1 * IsentropicRelations::P0OverP(gama, mach);
+    }
+}
+
+RDouble NSSolverUnstruct::R0Wall(RDouble r1, RDouble gama, RDouble mach)
+{
+    RDouble r2, m2;
+    if (mach > one)
+    {
+        r2 = r1 * ShockRelations::Rho2OverRho1(gama, mach);
+        m2 = ShockRelations::MachBehindShock(gama, mach);
+        return r2  * IsentropicRelations::Rho0OverRho(gama, m2);
+    }
+    else
+    {
+        return r1 * IsentropicRelations::Rho0OverRho(gama, mach);
+    }
+}
+
+void NSSolverUnstruct::ComputeGradient(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    bool isViscous = parameters->IsViscous();
+
+    //Gradient *gradientNS = 0;
+    if(grid->IsFinestGrid() || isViscous)
+    {
+        GetGradientField(gridIn);
+    }
+    else
+    {
+        return;
+    }
+}
+
+void NSSolverUnstruct::ComputeLimiter(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    RDouble **limit2D = reinterpret_cast <RDouble **> (grid->GetDataPtr("limit2D"));
+
+    int nEquation = GetNumberOfEquations();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotal     = nTotalCell + nBoundFace;
+
+    Limiter *limiter = 0;
+    int limiterType = parameters->GetLimiterType();
+    int isInIniting = GlobalDataBase::GetIntParaFromDB("isInIniting");
+    bool isFirstOrder = (limiterType == ILMT_FIRST) || isInIniting;
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        SetField(limit2D[m], 0.0, nTotal);
+    }
+    if(limiterType == ILMT_NOLIM)
+    {
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            SetField(limit2D[m], 1.0, nTotal);
+        }
+        return;
+    }
+
+    if (grid->IsFinestGrid() && !isFirstOrder)
+    {
+        limiter = CreateLimiter(grid);
+
+        int limitVector = parameters->GetLimitVector();
+        bool usingVectorLimiter = (limitVector == 1);
+        if (usingVectorLimiter)
+        {
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                SetField(limit2D[m], limiter->GetLimiter(m), nTotal);
+            }
+        }
+        else
+        {
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                SetField(limit2D[m], limiter->GetLimiter(0), nTotal);
+            }
+        }
+        delete limiter;
+    }
+
+    //PHSPACE::CommunicateInterfaceValue(grid, limit2D, "limit2D", nEquation);
+}
+
+void NSSolverUnstruct::GetGradientField(Grid *gridIn)
+{
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    UnstructGrid *gridUnstruct = UnstructGridCast(gridIn);
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **gradPrimtiveVarX = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **gradPrimtiveVarY = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **gradPrimtiveVarZ = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradPrimtiveVarZ"));
+    FieldProxy *qProxy = GetFieldProxy(gridIn, "q");
+    RDouble **q     = qProxy->GetField_UNS();
+    RDouble **qnode = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("qnode"));
+    string gradientName = parameters->GetGradientName();
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        if (gradientName == "ggnode" || gradientName == "ggnodelaplacian")
+        {
+            gridUnstruct->CompGradientGGNode_NEW(q[m], qnode[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }
+        else if (gradientName == "ggcell")
+        {
+            gridUnstruct->CompGradientGGCell(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m], 0);
+        }
+        else if (gradientName == "lsq")
+        {
+            gridUnstruct->CompGradientLSQ(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }    
+        else if (gradientName == "ggnode_weight")
+        {
+            gridUnstruct->CompGradientGGNodeWeight(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }
+        else if (gradientName == "gg_m2")
+        {
+            gridUnstruct->CompGradientGGModified2(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }
+        else if (gradientName == "ggcellnew")
+        {
+            gridUnstruct->CompGradientGGCellNew(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }
+        else if (gradientName == "ggcellw")
+        {
+            gridUnstruct->CompGradientGGCellW(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("No reconstruction method has been choosed ! /n");
+        }
+    }
+
+    RDouble **gradTemperatureX = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradTemperatureX"));
+    RDouble **gradTemperatureY = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradTemperatureY"));
+    RDouble **gradTemperatureZ = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradTemperatureZ"));
+    RDouble **t     = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("t"));
+    RDouble **tnode = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("tnode"));
+
+    for (int m = 0; m < nTemperatureModel; ++ m)
+    {
+        if (gradientName == "ggnode" || gradientName == "ggnodelaplacian")
+        {
+            gridUnstruct->CompGradientGGNode_NEW(t[m], tnode[m], gradTemperatureX[m], gradTemperatureY[m], gradTemperatureZ[m]);
+        }
+        else if (gradientName == "ggcell")
+        {
+            gridUnstruct->CompGradientGGCell(t[m], gradTemperatureX[m], gradTemperatureY[m], gradTemperatureZ[m]);
+        }
+        else if (gradientName == "lsq")
+        {
+            gridUnstruct->CompGradientLSQ(t[m], gradTemperatureX[m], gradTemperatureY[m], gradTemperatureZ[m]);
+        }    
+        else if (gradientName == "ggnode_weight")
+        {
+            gridUnstruct->CompGradientGGNodeWeight(t[m], gradTemperatureX[m], gradTemperatureY[m], gradTemperatureZ[m]);
+        }
+        else if (gradientName == "gg_m2")
+        {
+            gridUnstruct->CompGradientGGModified2(t[m], gradTemperatureX[m], gradTemperatureY[m], gradTemperatureZ[m]);
+        }
+        else if (gradientName == "ggcellnew")
+        {
+            gridUnstruct->CompGradientGGCellNew(t[m], gradTemperatureX[m], gradTemperatureY[m], gradTemperatureZ[m]);
+        }
+        else if (gradientName == "ggcellw")
+        {
+            gridUnstruct->CompGradientGGCellW(t[m], gradTemperatureX[m], gradTemperatureY[m], gradTemperatureZ[m]);
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("No reconstruction method has been choosed ! /n");
+        }
+    }
+
+    delete qProxy;
+}
+
+void NSSolverUnstruct::InitiallimiterOnlyForMixGrid(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    RDouble **q = reinterpret_cast<RDouble **>(grid->GetDataPtr("q"));
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    int limitVector = parameters->GetLimitVector();
+    int limiterType = parameters->GetLimiterType();
+
+    int nVariables = 1;
+    if (limitVector == 1)
+    {
+        nVariables = 5;
+    }
+
+    limiterOnlyForMixGrid = new Limiter(grid, q, nVariables, "limit");
+
+    limiterOnlyForMixGrid->InitLimitData();
+
+    if (limiterType == ILMT_VENCAT)
+    {
+        int ivencat = GlobalDataBase::GetIntParaFromDB("ivencat");
+        limiterOnlyForMixGrid->SetVencatLimiterType(ivencat);
+    }
+}
+
+void NSSolverUnstruct::ComputelimiterOnlyForMixGrid(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    RDouble **q = reinterpret_cast<RDouble **>(grid->GetDataPtr("q"));
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    RDouble **limit2D = reinterpret_cast <RDouble **> (grid->GetDataPtr("limit2D"));
+
+    int nEquation = GetNumberOfEquations();
+    int nBoundFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+    int nTotal = nTotalCell + nBoundFace;
+
+    int limitVariables = parameters->GetLimitVariables();
+    int limitVector = parameters->GetLimitVector();
+    int limiterType = parameters->GetLimiterType();
+    
+    if (limiterType >= ILMT_STRUCT || limiterType == ILMT_NOLIM || limiterType == ILMT_FIRST)
+    {
+        return;
+    }
+
+    RDouble **dqdx = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **dqdy = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **dqdz = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    const int SCALAR_LIMITER    = 0;
+    const int VECTOR_LIMITER    = 1;
+    
+    const int LIMIT_BY_RHO_P    = 0;
+    const int LIMIT_BY_EACH_VAR = 1;
+
+    RDouble *limit_tmp = 0;
+    if (limiterType == ILMT_BARTH)
+    {
+        if(limitVector == SCALAR_LIMITER)
+        {
+            //! Each variables has the same limiter value.
+            limit_tmp = limiterOnlyForMixGrid->GetLimiter(0);
+            if (limitVariables == LIMIT_BY_RHO_P)
+            {
+                limiterOnlyForMixGrid->BarthLimiter(limit_tmp, q[IR], dqdx[IR], dqdy[IR], dqdz[IR]);
+                limiterOnlyForMixGrid->BarthLimiter(limit_tmp, q[IP], dqdx[IP], dqdy[IP], dqdz[IP]);
+            }
+            else if (limitVariables == LIMIT_BY_EACH_VAR)
+            {
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    limiterOnlyForMixGrid->BarthLimiter(limit_tmp, q[m], dqdx[m], dqdy[m], dqdz[m]);
+                }
+            }
+        }
+        else if(limitVector == VECTOR_LIMITER)
+        {
+            //! Limiter value of each variable is computed by itself.
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                limit_tmp = limiterOnlyForMixGrid->GetLimiter(m);
+                limiterOnlyForMixGrid->BarthLimiter(limit_tmp, q[m], dqdx[m], dqdy[m], dqdz[m]);
+            }
+        }
+    }
+    else if (limiterType == ILMT_VENCAT)
+    {
+        if (limitVector == SCALAR_LIMITER)
+        {
+            //! Each variables has the same limiter value.
+            limit_tmp = limiterOnlyForMixGrid->GetLimiter(0);
+            if (limitVariables == LIMIT_BY_RHO_P)
+            {
+                limiterOnlyForMixGrid->VencatLimiter(limit_tmp, q[IR], dqdx[IR], dqdy[IR], dqdz[IR], IR);
+                limiterOnlyForMixGrid->VencatLimiter(limit_tmp, q[IP], dqdx[IP], dqdy[IP], dqdz[IP], IP);
+            }
+            else if (limitVariables == LIMIT_BY_EACH_VAR)
+            {
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    limiterOnlyForMixGrid->VencatLimiter(limit_tmp, q[m], dqdx[m], dqdy[m], dqdz[m], m);
+                }
+            }
+        }
+        else if(limitVector == VECTOR_LIMITER)
+        {
+            //! Limiter value of each variable is computed by itself.
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                limit_tmp = limiterOnlyForMixGrid->GetLimiter(m);
+                limiterOnlyForMixGrid->VencatLimiter(limit_tmp, q[m], dqdx[m], dqdy[m], dqdz[m], m);
+            }
+        }
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("Error: this unstructured limiter is not exist !\n", true);
+    }
+    
+    for (int m = 0; m < nEquation; ++m)
+    {
+        SetField(limit2D[m], 0.0, nTotal);
+    }
+    
+    if (limitVector == SCALAR_LIMITER)
+    {
+        limit_tmp = limiterOnlyForMixGrid->GetLimiter(0);
+        SetLimitBoundary(grid, limit_tmp);
+        for (int m = 0; m < nEquation; ++m)
+        {
+            SetField(limit2D[m], limit_tmp, nTotal);
+        }
+    }
+    else if(limitVector == VECTOR_LIMITER)
+    {
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            limit_tmp = limiterOnlyForMixGrid->GetLimiter(m);
+            SetLimitBoundary(grid, limit_tmp);
+            SetField(limit2D[m], limit_tmp, nTotal);
+        }
+    }
+}
+
+
+
+LIB_EXPORT void NSSolverUnstruct::ComputePostVisualVariables(Post_Visual * postVisualization)
+{
+    UnstructGrid *grid = UnstructGridCast(postVisualization->GetGrid());
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **t = reinterpret_cast< RDouble ** > (grid->GetDataPtr("t"));
+
+    if (postVisualization->GetFlowType() == AverageFlow)
+    {
+        RDouble **qAverage = reinterpret_cast <RDouble **> (grid->GetDataPtr("qAverage"));
+
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DENSITY);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qAverage[IDX::IR]);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_U);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qAverage[IDX::IU]);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_V);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qAverage[IDX::IV]);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_W);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qAverage[IDX::IW]);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_PRESSURE);
+        postVisualization->UpdateVisualNodeVarPtr(varName, qAverage[IDX::IP]);
+
+        return;
+    }
+
+    //! added by zzp 202108, for ReynoldsStress output
+    if (postVisualization->GetFlowType() == AverageReynoldsStress)
+    {
+        RDouble **tauAverage = reinterpret_cast <RDouble **> (grid->GetDataPtr("tauAverage"));
+
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_XX);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage[0]);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_YY);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage[1]);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_ZZ);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage[2]);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_XY);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage[3]);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_XZ);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage[4]);
+
+        varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TAU_YZ);
+        postVisualization->UpdateVisualNodeVarPtr(varName, tauAverage[5]);
+
+        return;
+    }
+
+    using namespace IDX;
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DENSITY))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DENSITY);
+        postVisualization->UpdateVisualNodeVarPtr(varName, q[IDX::IR]);
+    }
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_U))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_U);
+        postVisualization->UpdateVisualNodeVarPtr(varName, q[IDX::IU]);
+    }
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_V))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_V);
+        postVisualization->UpdateVisualNodeVarPtr(varName, q[IDX::IV]);
+    }
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_W))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_W);
+        postVisualization->UpdateVisualNodeVarPtr(varName, q[IDX::IW]);
+    }
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_PRESSURE))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_PRESSURE);
+        postVisualization->UpdateVisualNodeVarPtr(varName, q[IDX::IP]);
+    }
+
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_TEMPERATURE))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TEMPERATURE);
+        postVisualization->UpdateVisualNodeVarPtr(varName, t[IDX::ITT]);
+    }    
+
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MACH))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_MACH);
+        RDouble * mach  = CompMachNumber(grid);
+        postVisualization->UpdateVisualNodeVarPtr(varName, mach);
+        delete [] mach;
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_STREAMLINE_U))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_STREAMLINE_U);
+        postVisualization->UpdateVisualNodeVarPtr(varName, q[IDX::IU]);
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_STREAMLINE_V))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_STREAMLINE_V);
+        postVisualization->UpdateVisualNodeVarPtr(varName, q[IDX::IV]);
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_STREAMLINE_W))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_STREAMLINE_W);
+        postVisualization->UpdateVisualNodeVarPtr(varName, q[IDX::IW]);
+    }
+
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_TIME_STEP))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_TIME_STEP);
+        RDouble * dt  = reinterpret_cast< RDouble * > (grid->GetDataPtr("dt" ));
+        postVisualization->UpdateVisualNodeVarPtr(varName, dt);
+    }
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VOLUME))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VOLUME);
+        RDouble *vol  = grid->GetCellVolume();
+        postVisualization->UpdateVisualNodeVarPtr(varName, vol);
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_WALL_DIST))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_WALL_DIST);
+        RDouble* wallDistance = grid->GetWallDist();
+        postVisualization->UpdateVisualNodeVarPtr(varName, wallDistance);
+    }
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_IBLANK))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_IBLANK);
+        int *iBlank = reinterpret_cast<int *> (grid->GetBlankIndex());
+        postVisualization->UpdateVisualNodeVarPtr(varName, iBlank);
+    }
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+    string viscousName = parameters->GetViscousName();
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+
+    if (viscousType == LAMINAR && iLES == NOLES_SOLVER)
+    {
+        if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VISCOSITY_LAMINAR))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VISCOSITY_LAMINAR);
+            RDouble *visl = reinterpret_cast< RDouble * > (grid->GetDataPtr("visl"));
+            postVisualization->UpdateVisualNodeVarPtr(varName, visl);
+        }
+    }
+    else if (viscousType > LAMINAR || iLES == LES_SOLVER)
+    {
+        if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VISCOSITY_LAMINAR))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VISCOSITY_LAMINAR);
+            RDouble *visl = reinterpret_cast< RDouble * > (grid->GetDataPtr("visl"));
+            postVisualization->UpdateVisualNodeVarPtr(varName, visl);
+        }
+
+        if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VISCOSITY_TURBULENT))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VISCOSITY_TURBULENT);
+            RDouble *vist = reinterpret_cast< RDouble * > (grid->GetDataPtr("vist"));
+            postVisualization->UpdateVisualNodeVarPtr(varName, vist);
+        }
+
+        if (viscousName.substr(0,6) == "2eq-kw")
+        {
+            RDouble ** q_turb    = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q_turb" ));
+            if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MODELED_TKE))
+            {
+                string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_MODELED_TKE);
+                postVisualization->UpdateVisualNodeVarPtr(varName, q_turb[IDX::IKE]);
+            }
+            if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MODELED_DISSIPATION))
+            {
+                string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_MODELED_DISSIPATION);
+                postVisualization->UpdateVisualNodeVarPtr(varName, q_turb[IDX::IKW]);
+            }
+            if (viscousName.substr(0,17) == "2eq-kw-menter-sst")   //! For blending function F1 and F2
+            {
+                RDouble ** q_transition    = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q_transition" ));
+                if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_SST_F1))
+                {
+                    RDouble * blend = reinterpret_cast< RDouble * > (grid->GetDataPtr("blend" ));   //! For blengding function F1
+                    string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_SST_F1);
+                    postVisualization->UpdateVisualNodeVarPtr(varName, blend);
+                }
+                if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_SST_F2))
+                {
+                    RDouble * SST_F2 = reinterpret_cast< RDouble * > (grid->GetDataPtr("SST_F2" ));   //! For blengding function F2
+                    string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_SST_F2);
+                    postVisualization->UpdateVisualNodeVarPtr(varName, SST_F2);
+                }
+                int transitionType = GlobalDataBase::GetIntParaFromDB("transitionType");
+                if (transitionType == IREGAMA)
+                {
+                    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_INTERMITTENCY))
+                    {
+                        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_INTERMITTENCY);
+                        postVisualization->UpdateVisualNodeVarPtr(varName, q_transition[IDX::IGAMA]);
+                    }
+                    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_MOMENTUMTHICKREYNOLDS))
+                    {
+                        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_MOMENTUMTHICKREYNOLDS);
+                        postVisualization->UpdateVisualNodeVarPtr(varName, q_transition[IDX::IRECT]);
+                    }
+                }
+            }
+        }
+    }
+
+    int visualField = parameters->GetPlotFieldType();
+    if(WantVisualField(grid) || visualField == TEC_SPACE::BlockVisual)
+    {
+        RDouble * vorticity_x, * vorticity_y, * vorticity_z, * vorticityMagnitude, * strain_rate, * Q_criteria;
+
+        int nTotalCell = grid->GetNTotalCell();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotal = nTotalCell + nBoundFace;
+
+        vorticity_x = new RDouble [nTotal];
+        vorticity_y = new RDouble [nTotal];
+        vorticity_z = new RDouble [nTotal];
+        vorticityMagnitude = new RDouble [nTotal];
+        strain_rate = new RDouble [nTotal];
+        Q_criteria = new RDouble [nTotal];
+        ComputeVorticitybyQCriteria(grid, vorticity_x, vorticity_y, vorticity_z, vorticityMagnitude, strain_rate, Q_criteria);
+
+        if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_X))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VORTICITY_X);
+            postVisualization->UpdateVisualNodeVarPtr(varName, vorticity_x);
+        }
+
+        if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_Y))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VORTICITY_Y);
+            postVisualization->UpdateVisualNodeVarPtr(varName, vorticity_y);
+        }
+
+        if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_Z))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VORTICITY_Z);
+            postVisualization->UpdateVisualNodeVarPtr(varName, vorticity_z);
+        }
+
+        if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_MAGNITUDE))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VORTICITY_MAGNITUDE);
+            postVisualization->UpdateVisualNodeVarPtr(varName, vorticityMagnitude);
+        }
+
+        if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_STRAIN_RATE))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_STRAIN_RATE);
+            postVisualization->UpdateVisualNodeVarPtr(varName, strain_rate);
+        }
+
+        if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_Q_CRITERIA))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_Q_CRITERIA);
+            postVisualization->UpdateVisualNodeVarPtr(varName, Q_criteria);
+        }
+
+        delete []vorticity_x;
+        delete []vorticity_y;
+        delete []vorticity_z;
+        delete []vorticityMagnitude;
+        delete []strain_rate;
+        delete []Q_criteria;
+    }
+    else if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_X) 
+         || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_Y)
+         || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_Z)
+         || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VORTICITY_MAGNITUDE)
+         || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_STRAIN_RATE)
+         || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_Q_CRITERIA))
+    {
+        TK_Exit::ExceptionExit("Error: can not visualization vorticity when plotFieldType = 0!");
+    }
+
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_CP))
+    {
+        string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_CP);
+        RDouble * cp = ComputeCp(grid);
+        postVisualization->UpdateVisualNodeVarPtr(varName, cp);
+        delete [] cp;
+    }
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_GRADIENT_UX))
+    {
+        RDouble **dqdx = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));        
+        RDouble *dudx = dqdx[IU];
+        postVisualization->UpdateVisualNodeVarPtr("gradientUx", dudx);       
+    }
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_GRADIENT_UY))
+    {
+        RDouble **dqdy = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));        
+        RDouble *dudy = dqdy[IU];
+        postVisualization->UpdateVisualNodeVarPtr("gradientUy", dudy);       
+    }
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_GRADIENT_VX))
+    {
+        RDouble **dqdx = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));        
+        RDouble *dvdx = dqdx[IV];
+        postVisualization->UpdateVisualNodeVarPtr("gradientVx", dvdx);       
+    }
+    if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_GRADIENT_VY))
+    {
+        RDouble **dqdy = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));        
+        RDouble *dvdy = dqdy[IV];
+        postVisualization->UpdateVisualNodeVarPtr("gradientVy", dvdy);       
+    }
+
+    if (postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_DENSITY)
+     || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_U)
+     || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_V)
+     || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_W)
+     || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VELOCITY_MAGNITUDE)
+     || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_PRESSURE)
+     || postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_TEMPERATURE))
+    {
+        RDouble **dimensionalVariables = ComputeDimensionalVariables(grid);
+
+        if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_DENSITY))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_DENSITY);
+            postVisualization->UpdateVisualNodeVarPtr(varName, dimensionalVariables[0]);
+        }
+        if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_U))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_U);
+            postVisualization->UpdateVisualNodeVarPtr(varName, dimensionalVariables[1]);
+        }
+        if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_V))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_V);
+            postVisualization->UpdateVisualNodeVarPtr(varName, dimensionalVariables[2]);
+        }
+        if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_W))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_W);
+            postVisualization->UpdateVisualNodeVarPtr(varName, dimensionalVariables[3]);
+        }
+        if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_VELOCITY_MAGNITUDE))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_VELOCITY_MAGNITUDE);
+            postVisualization->UpdateVisualNodeVarPtr(varName, dimensionalVariables[4]);
+        }
+        if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_PRESSURE))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_PRESSURE);
+            postVisualization->UpdateVisualNodeVarPtr(varName, dimensionalVariables[5]);
+        }
+        if(postVisualization->IsNeedVisualization(PHSPACE::VISUAL_DIMENSIONAL_TEMPERATURE))
+        {
+            string varName = postVisualization->GetVariableName(PHSPACE::VISUAL_DIMENSIONAL_TEMPERATURE);
+            postVisualization->UpdateVisualNodeVarPtr(varName, dimensionalVariables[6]);
+        }
+
+        DelPointer2(dimensionalVariables);
+    }
+
+    //! Chemical species must be the last.
+    int nChemical = parameters->GetChemicalFlag();
+    if(nChemical)
+    {
+        using namespace GAS_SPACE;
+
+        int nm = parameters->GetNSEquationNumber();
+        int nEquation = GetNumberOfEquations();
+        int nSpeciesNumber = parameters->GetNumberOfSpecies();
+
+        string * varname = gas->GetNameOfSpecies();
+        for (int m = nm; m < nEquation; ++ m)
+        {
+            string varName = "massfraction-" + varname[m-nm];
+            postVisualization->UpdateVisualNodeVarPtr(varName, q[m]);
+        }
+        RDouble **moleFraction = ComputePrimitiveVariablesWithMoleFraction(grid);
+
+        for (int m = 0; m < nSpeciesNumber; ++ m)
+        {
+            string varName = "molefraction-" + varname[m];
+            postVisualization->UpdateVisualNodeVarPtr(varName, moleFraction[m]);
+    }
+        DelPointer2(moleFraction);
+
+}
+}
+
+LIB_EXPORT void NSSolverUnstruct::ComputePostProbesVariables(Post_Probes * postProbesVar)
+{
+    UnstructGrid *grid = UnstructGridCast(postProbesVar->GetGrid());
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **t = reinterpret_cast< RDouble ** > (grid->GetDataPtr("t"));
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    using namespace IDX;
+    if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DENSITY))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DENSITY);
+        postProbesVar->UpdateProbesVarPtr(varName, q[IDX::IR]);
+    }
+
+    if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_U))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_U);
+        postProbesVar->UpdateProbesVarPtr(varName, q[IDX::IU]);
+    }
+    if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_V))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_V);
+        postProbesVar->UpdateProbesVarPtr(varName, q[IDX::IV]);
+    }
+    if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_W))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_W);
+        postProbesVar->UpdateProbesVarPtr(varName, q[IDX::IW]);
+    }
+    if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_PRESSURE))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_PRESSURE);
+        postProbesVar->UpdateProbesVarPtr(varName, q[IDX::IP]);
+    }
+    if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_TEMPERATURE))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_TEMPERATURE);
+        postProbesVar->UpdateProbesVarPtr(varName, t[IDX::ITT]);
+    }
+    if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_MACH))
+    {
+        string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_MACH);
+        RDouble * mach  = CompMachNumber(grid);
+        postProbesVar->UpdateProbesVarPtr(varName, mach);
+        delete [] mach;
+    }
+    if (postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_DENSITY)
+        || postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_U)
+        || postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_V)
+        || postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_W)
+        || postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_VELOCITY_MAGNITUDE)
+        || postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_PRESSURE)
+        || postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_TEMPERATURE))
+    {
+        RDouble **dimensionalVariables = ComputeDimensionalVariables(grid);
+
+        if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_DENSITY))
+        {
+            string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_DENSITY);
+            postProbesVar->UpdateProbesVarPtr(varName, dimensionalVariables[0]);
+}
+        if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_U))
+        {
+            string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_U);
+            postProbesVar->UpdateProbesVarPtr(varName, dimensionalVariables[1]);
+        }
+        if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_V))
+        {
+            string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_V);
+            postProbesVar->UpdateProbesVarPtr(varName, dimensionalVariables[2]);
+        }
+        if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_W))
+        {
+            string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_W);
+            postProbesVar->UpdateProbesVarPtr(varName, dimensionalVariables[3]);
+        }
+        if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_VELOCITY_MAGNITUDE))
+        {
+            string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_VELOCITY_MAGNITUDE);
+            postProbesVar->UpdateProbesVarPtr(varName, dimensionalVariables[4]);
+        }
+        if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_PRESSURE))
+        {
+            string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_PRESSURE);
+            postProbesVar->UpdateProbesVarPtr(varName, dimensionalVariables[5]);
+        }
+        if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_DIMENSIONAL_TEMPERATURE))
+        {
+            string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_DIMENSIONAL_TEMPERATURE);
+            postProbesVar->UpdateProbesVarPtr(varName, dimensionalVariables[6]);
+        }
+
+        DelPointer2(dimensionalVariables);
+    }
+    //! Chemical species must be the last.postVisualization->IsNeedVisualization
+    int nChemical = parameters->GetChemicalFlag();
+    if(nChemical)
+    {
+        using namespace GAS_SPACE;
+
+        int nm = parameters->GetNSEquationNumber();
+        int nEquation = GetNumberOfEquations();
+        int nSpeciesNumber = parameters->GetNumberOfSpecies();
+
+        string *varname = gas->GetNameOfSpecies();
+        for (int m = nm; m < nEquation; ++ m)
+        {
+            string varName = "massfraction-" + varname[m-nm];
+            postProbesVar->UpdateProbesVarPtr(varName, q[m]);
+        }
+        RDouble **moleFraction = ComputePrimitiveVariablesWithMoleFraction(grid);
+
+        for (int m = 0; m < nSpeciesNumber; ++ m)
+        {
+            string varName = "molefraction-" + varname[m];
+            postProbesVar->UpdateProbesVarPtr(varName, moleFraction[m]);
+        }
+    }
+
+    int viscousType = parameters->GetViscousType();
+    string viscousName = parameters->GetViscousName();
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+
+    if (viscousType == LAMINAR && iLES == NOLES_SOLVER)
+    {
+        if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_VISCOSITY_LAMINAR))
+        {
+            string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_VISCOSITY_LAMINAR);
+            RDouble *visl = reinterpret_cast< RDouble * > (grid->GetDataPtr("visl"));
+            postProbesVar->UpdateProbesVarPtr(varName, visl);
+        }
+    }
+    else if (viscousType > LAMINAR || iLES == LES_SOLVER)
+    {
+        if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_VISCOSITY_LAMINAR))
+        {
+            string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_VISCOSITY_LAMINAR);
+            RDouble *visl = reinterpret_cast< RDouble * > (grid->GetDataPtr("visl"));
+            postProbesVar->UpdateProbesVarPtr(varName, visl);
+        }
+
+        if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_VISCOSITY_TURBULENT))
+        {
+            string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_VISCOSITY_TURBULENT);
+            RDouble *vist = reinterpret_cast< RDouble * > (grid->GetDataPtr("vist"));
+            postProbesVar->UpdateProbesVarPtr(varName, vist);
+        }
+
+        if (viscousName.substr(0,6) == "2eq-kw")
+        {
+            RDouble ** q_turb    = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q_turb" ));
+            if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_MODELED_TKE))
+            {
+                string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_MODELED_TKE);
+                postProbesVar->UpdateProbesVarPtr(varName, q_turb[IDX::IKE]);
+            }
+            if(postProbesVar->IsNeedMonitoring(PHSPACE::PROBE_MODELED_DISSIPATION))
+            {
+                string varName = postProbesVar->GetProbesVariableName(PHSPACE::PROBE_MODELED_DISSIPATION);
+                postProbesVar->UpdateProbesVarPtr(varName, q_turb[IDX::IKW]);
+            }
+        }
+    }
+}
+
+LIB_EXPORT void NSSolverUnstruct::InitControlParameters()
+{
+    FreeControlParameters();
+    controlParameters = new Param_NSSolverUnstruct();
+    controlParameters->Init();
+}
+
+LIB_EXPORT Param_NSSolverUnstruct * NSSolverUnstruct::GetControlParameters() const
+{
+    return static_cast< Param_NSSolverUnstruct * > (controlParameters);
+}
+
+void NSSolverUnstruct::CompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex, const int &nEquation)
+{
+    UnstructGrid * grid = UnstructGridCast(gridIn);
+
+    InterfaceInfo * interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation) return;
+
+    int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = interfaceInformation->GetFaceIndexForSend(iNeighborZone);
+    dataContainer->moveto_begin();
+
+    RDouble **dq = fieldProxy->GetField_UNS();
+
+    for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+    {
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int sourceCell;
+        int iFace = interfaceIndexContainerForSend[ iLocalFace ];
+            grid->GetSourceIndex(iFace, iGhostLayer + 1, sourceCell);
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            PHWrite(dataContainer, dq[m][sourceCell]);
+        }
+    }
+    }
+}
+
+void NSSolverUnstruct::DecompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex, const int &nEquation)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation) return;
+
+    int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = interfaceInformation->GetFaceIndexForRecv(iNeighborZone);
+
+    int *interFace2BoundaryFace = interfaceInformation->GetInterFace2BoundaryFace();
+
+    int periodicType = PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType");
+    RDouble rotationAngle = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+    rotationAngle = rotationAngle * PI / 180.0;
+
+    dataContainer->moveto_begin();
+    RDouble **dq = fieldProxy->GetField_UNS();
+
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBoundFace = grid->GetNBoundFace();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    RDouble *xcc = grid->GetCellCenterX();
+    RDouble *ycc = grid->GetCellCenterY();
+    RDouble *zcc = grid->GetCellCenterZ();
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+    if (referenceFrame == ROTATIONAL_FRAME)
+    {
+        int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+        RDouble PeriodicRotationAngle[100];
+        GlobalDataBase::GetData("PeriodicRotationAngle", &PeriodicRotationAngle, PHDOUBLE, nTurboZone);
+
+        //! Parallel
+        int iTurboZone = grid->GetOrdinaryGridIndex();
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = grid->GetZoneID();
+        }
+
+        PeriodicRotationAngle[iTurboZone] = PeriodicRotationAngle[iTurboZone] * PI / 180.0;
+        rotationAngle = PeriodicRotationAngle[iTurboZone];
+    }
+
+    for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+    {
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForReceive[iLocalFace];
+            int targetCell;
+            grid->GetTargetIndex(iFace, iGhostLayer + 1, targetCell);
+
+            for (int m = 0; m < nEquation; ++m)
+            {
+                PHRead(dataContainer, dq[m][targetCell]);
+            }
+
+            int iBFace = interFace2BoundaryFace[iFace];
+            int le = leftCellofFace[iBFace];
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iBFace]);
+            string bcName = bcRegion->GetBCName();
+
+            if (referenceFrame == ROTATIONAL_FRAME)
+            {
+                int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+                string Periodic_Name[100];
+                GlobalDataBase::GetData("Periodic_Name", &Periodic_Name, PHSTRING, 2 * nTurboZone);
+                RDouble PeriodicRotationAngle[100];
+                GlobalDataBase::GetData("PeriodicRotationAngle", &PeriodicRotationAngle, PHDOUBLE, nTurboZone);
+
+                //! Parallel
+                int iTurboZone = grid->GetOrdinaryGridIndex();
+                //! Serial
+                if (iTurboZone == -1)
+                {
+                    iTurboZone = grid->GetZoneID();
+                }
+
+                if (bcName == Periodic_Name[2 * iTurboZone] || bcName == Periodic_Name[2 * iTurboZone + 1])
+                {
+                    RDouble rotfg[3] = { 0, 0, 0 };
+                    if (bcName == Periodic_Name[2 * iTurboZone])
+                    {
+                        rotfg[0] = dq[1][targetCell];
+                        rotfg[1] = dq[2][targetCell] * cos(2.0 * PI - rotationAngle) - dq[3][targetCell] * sin(2.0 * PI - rotationAngle);
+                        rotfg[2] = dq[2][targetCell] * sin(2.0 * PI - rotationAngle) + dq[3][targetCell] * cos(2.0 * PI - rotationAngle);
+                    }
+                    else if (bcName == Periodic_Name[2 * iTurboZone + 1])
+                    {
+                        rotfg[0] = dq[1][targetCell];
+                        rotfg[1] = dq[2][targetCell] * cos(rotationAngle) - dq[3][targetCell] * sin(rotationAngle);
+                        rotfg[2] = dq[2][targetCell] * sin(rotationAngle) + dq[3][targetCell] * cos(rotationAngle);
+                    }
+
+                    for (int m = 1; m <= 3; ++m)
+                    {
+                        dq[m][targetCell] = rotfg[m - 1];
+                    }
+                }
+            }
+            else
+            {
+                if (periodicType == ROTATIONAL_PERIODICITY)
+                {
+                    if (bcName == "Periodic_up" || bcName == "Periodic_down")
+                    {
+                        RDouble rotfg[3] = { 0, 0, 0 };
+                        if (bcName == "Periodic_up")
+                        {
+                            rotfg[0] = dq[1][targetCell];
+                            rotfg[1] = dq[2][targetCell] * cos(2.0 * PI - rotationAngle) - dq[3][targetCell] * sin(2.0 * PI - rotationAngle);
+                            rotfg[2] = dq[2][targetCell] * sin(2.0 * PI - rotationAngle) + dq[3][targetCell] * cos(2.0 * PI - rotationAngle);
+                        }
+                        else if (bcName == "Periodic_down")
+                        {
+                            rotfg[0] = dq[1][targetCell];
+                            rotfg[1] = dq[2][targetCell] * cos(rotationAngle) - dq[3][targetCell] * sin(rotationAngle);
+                            rotfg[2] = dq[2][targetCell] * sin(rotationAngle) + dq[3][targetCell] * cos(rotationAngle);
+                        }
+
+                        for (int m = 1; m <= 3; ++m)
+                        {
+                            dq[m][targetCell] = rotfg[m - 1];
+                        }
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverUnstruct::CompressSpecificArrayToInterface(DataContainer *&dataContainer, const string &fieldName, Grid *gridIn, const int &neighborZoneIndex, const int &nEquation)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = interfaceInformation->GetFaceIndexForSend(iNeighborZone);
+    dataContainer->moveto_begin();
+    if (nEquation == 0)
+    {
+        RDouble *fieldSend = reinterpret_cast <RDouble *> (grid->GetDataPtr(fieldName));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int sourceCell;
+                int iFace = interfaceIndexContainerForSend[iLocalFace];
+                grid->GetSourceIndex(iFace, iGhostLayer + 1, sourceCell);
+                PHWrite(dataContainer, fieldSend[sourceCell]);
+            }
+        }
+    }
+    else
+    {
+        RDouble **fieldSend = reinterpret_cast <RDouble **> (grid->GetDataPtr(fieldName));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int sourceCell;
+                int iFace = interfaceIndexContainerForSend[iLocalFace];
+                grid->GetSourceIndex(iFace, iGhostLayer + 1, sourceCell);
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    PHWrite(dataContainer, fieldSend[m][sourceCell]);
+                }
+            }
+        }
+    }
+}
+
+void NSSolverUnstruct::DecompressArrayFromInterface(DataContainer *&dataContainer, const string &fieldName, Grid *gridIn, const int &neighborZoneIndex, const int &nEquation)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = interfaceInformation->GetFaceIndexForRecv(iNeighborZone);
+    dataContainer->moveto_begin();
+    if (nEquation == 0)
+    {
+        RDouble *fieldRecv = reinterpret_cast <RDouble *> (grid->GetDataPtr(fieldName));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int targetCell;
+                int iFace = interfaceIndexContainerForReceive[iLocalFace];
+                grid->GetTargetIndex(iFace, iGhostLayer + 1, targetCell);
+                PHRead(dataContainer, fieldRecv[targetCell]);
+            }
+        }
+    }
+    else
+    {
+        RDouble **fieldRecv = reinterpret_cast <RDouble **> (grid->GetDataPtr(fieldName));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int iFace = interfaceIndexContainerForReceive[iLocalFace];
+                int targetCell;
+                grid->GetTargetIndex(iFace, iGhostLayer + 1, targetCell);
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    PHRead(dataContainer, fieldRecv[m][targetCell]);
+                }
+            }
+        }
+    }
+}
+
+void NSSolverUnstruct::OutflowBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+
+    //! Get the number of equations.
+    int nTotalCell = grid->GetNTotalCell();
+
+    int nEquation = GetNumberOfEquations();
+
+    int iFace, le, re;
+    //! get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+#ifdef USE_GMRESSOLVER
+    //! GMRESBoundary GMRES3D
+    RDouble **dDdP = reinterpret_cast <RDouble**> (grid->GetDataPtr("dDdP"));
+#endif
+
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        //! iFace is the face number in the set of faceIndex.
+        iFace = *iter;
+        le = leftCellofFace[iFace];
+        re = rightCellofFace[iFace];
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q[m][re] = q[m][le];
+        }
+#ifdef USE_GMRESSOLVER
+        //! GMRESBoundary
+        int idx = (re - nTotalCell) * nEquation;
+        for (int m = 0; m < nEquation; ++m)
+        {
+            dDdP[m][idx + m] = 1.0;
+    }
+#endif
+}
+}
+
+void NSSolverUnstruct::SymmetryBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme"); 
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    RDouble *xfn         = grid->GetFaceNormalX();
+    RDouble *yfn         = grid->GetFaceNormalY();
+    RDouble *zfn         = grid->GetFaceNormalZ();
+    RDouble *vgn         = grid->GetFaceNormalVelocity();
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **dDdP = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP"));
+
+    //! get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+    //! Get the number of equations.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+    int nTotalCell = grid->GetNTotalCell();
+
+    int iFace = 0, le = 0, re = 0;
+    if (tscheme != GMRES)
+    {
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            iFace = *iter;
+            le = leftCellofFace[iFace];
+            re = rightCellofFace[iFace];
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                q[m][re] = q[m][le];
+            }
+
+            RDouble uL = q[IU][le];
+            RDouble vL = q[IV][le];
+            RDouble wL = q[IW][le];
+            RDouble vn = xfn[iFace] * uL + yfn[iFace] * vL + zfn[iFace] * wL - vgn[iFace];
+
+            q[IU][re] = uL - two * xfn[iFace] * vn;
+            q[IV][re] = vL - two * yfn[iFace] * vn;
+            q[IW][re] = wL - two * zfn[iFace] * vn;
+        }
+    }
+    else
+    {
+#ifdef USE_GMRESSOLVER
+        //! Sacado
+        ADReal *ql = new ADReal[nEquation]();
+        ADReal *qr = new ADReal[nEquation]();
+
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            iFace = *iter;
+            le = leftCellofFace[iFace];
+            re = rightCellofFace[iFace];
+
+            //! init and define the sequence order of independent variables
+            for (int m = 0; m < nEquation; m++)
+            {
+                ql[m] = q[m][le];
+                ql[m].diff(m, nEquation);
+            }
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                qr[m] = ql[m];
+            }
+
+            ADReal uL = ql[IU];
+            ADReal vL = ql[IV];
+            ADReal wL = ql[IW];
+            ADReal vn = xfn[iFace] * uL + yfn[iFace] * vL + zfn[iFace] * wL - vgn[iFace];
+
+            qr[IU] = uL - two * xfn[iFace] * vn;
+            qr[IV] = vL - two * yfn[iFace] * vn;
+            qr[IW] = wL - two * zfn[iFace] * vn;
+
+            int idx = (re - nTotalCell) * nEquation;
+            for (int m = 0; m < nEquation; m++)
+            {
+                q[m][re] = qr[m].val();
+                for (int n = 0; n < nEquation; n++)
+                {
+                    dDdP[m][idx + n] = qr[m].dx(n);
+                }
+            }
+        }
+
+        delete [] ql;    ql = nullptr;
+        delete [] qr;    qr = nullptr;
+#endif
+    }
+}
+
+#ifdef USE_GMRESSOLVER
+// GMRESBoundary AD   GMRESAD
+void NSSolverUnstruct::GMRES_SymmetryBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    RDouble   *xfn       = grid->GetFaceNormalX();
+    RDouble   *yfn       = grid->GetFaceNormalY();
+    RDouble   *zfn       = grid->GetFaceNormalZ();
+    RDouble   *vgn       = grid->GetFaceNormalVelocity();
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **dDdP = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP"));
+
+    //! Get the number of equations.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+    int nTotalCell = grid->GetNTotalCell();
+
+    int iFace, le, re;
+
+    // Sacado
+    ADReal *ql = new ADReal[nEquation]();
+    ADReal *qr = new ADReal[nEquation]();
+
+    //! Get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        iFace = *iter;
+        le = leftCellofFace[iFace];
+        re = rightCellofFace[iFace];
+
+        // init and define the sequence order of independent variables
+        for (int m = 0; m < nEquation; m++)
+        {
+            ql[m] = q[m][le];
+            ql[m].diff(m, nEquation);
+        }
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            qr[m] = ql[m];
+        }
+
+        ADReal uL = ql[IU];
+        ADReal vL = ql[IV];
+        ADReal wL = ql[IW];
+        ADReal vn = xfn[iFace] * uL + yfn[iFace] * vL + zfn[iFace] * wL - vgn[iFace];
+
+        qr[IU] = uL - two * xfn[iFace] * vn;
+        qr[IV] = vL - two * yfn[iFace] * vn;
+        qr[IW] = wL - two * zfn[iFace] * vn;
+
+        int idx = (re - nTotalCell) * nEquation;
+        for (int m = 0; m < nEquation; m++)
+        {
+            q[m][re] = qr[m].val();
+            for (int n = 0; n < nEquation; n++)
+            {
+                dDdP[m][idx + n] = qr[m].dx(n);
+            }
+        }
+    }
+
+    delete[] ql; ql = NULL;
+    delete[] qr; qr = NULL;
+}
+
+// GMRESPV GMRESBoundary
+void NSSolverUnstruct::GMRES_SymmetryBCRegion_FD(Grid * gridIn, UnstructBC *bcRegionUnstruct)
+{
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **dDdP = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP"));
+
+    //! Get the number of equations.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+    int nTotalCells = grid->GetNTotalCell();
+
+    RDouble dqpert;
+    RDouble* primL    = new RDouble[nEquation]();
+    RDouble* primR    = new RDouble[nEquation]();
+    RDouble temperaturesL[3] = { 0 }, temperaturesR[3] = { 0 };
+    RDouble perturbScale = 0.000001;
+
+    int iFace, le, re;
+
+    //! Get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        iFace = *iter;
+        le = leftCellofFace[iFace];
+        re = rightCellofFace[iFace];
+
+        // firstly, update the boundary, q[m][le] and q[m][re] are the standard
+        for (int m = 0; m < nEquation; m++)
+        {
+            primL[m] = q[m][le];
+        } 
+        Cal_GMRES_SymmetryBCRegion(gridIn, primL, primR, iFace);
+        for (int m = 0; m < nEquation; m++)
+        {
+            q[m][re] = primR[m];
+        }
+
+        // then perturb the primative variables at the left cell
+        // perturb rho
+        int idx = (re - nTotalCells) * nEquation;
+
+        for (int m = 0; m < nEquation; m++)
+        {
+            primL[m] = q[m][le];
+        }
+        primL[IR] *= (1.0+perturbScale);
+        dqpert     = primL[IR] - q[IR][le];
+        Cal_GMRES_SymmetryBCRegion(gridIn,primL,primR,iFace);
+        for (int m = 0; m < nEquation; m++)
+        {
+            dDdP[m][idx] = (primR[m] - q[m][re]) / dqpert;
+        }
+
+        // perturb u
+        idx++;
+        for (int m = 0; m < nEquation; m++)
+        {
+            primL[m] = q[m][le];
+        }
+        primL[IU] += (perturbScale);
+        dqpert     = primL[IU] - q[IU][le];
+        Cal_GMRES_SymmetryBCRegion(gridIn,primL,primR,iFace);
+        for (int m = 0; m < nEquation; m++)
+        {
+            dDdP[m][idx] = (primR[m] - q[m][re]) / dqpert;
+        }
+
+        // perturb v
+        idx++;
+        for (int m = 0; m < nEquation; m++)
+        {
+            primL[m] = q[m][le];
+        }
+        primL[IV] += (perturbScale);
+        dqpert     = primL[IV] - q[IV][le];
+        Cal_GMRES_SymmetryBCRegion(gridIn,primL,primR,iFace);
+        for (int m = 0; m < nEquation; m++)
+        {
+            dDdP[m][idx] = (primR[m] - q[m][re]) / dqpert;
+        }
+
+        // perturb w
+        idx++;
+        for (int m = 0; m < nEquation; m++)
+        {
+            primL[m] = q[m][le];
+        }
+        primL[IW] += (1.0+perturbScale);
+        dqpert     = primL[IW] - q[IW][le];
+        Cal_GMRES_SymmetryBCRegion(gridIn,primL,primR,iFace);
+        for (int m = 0; m < nEquation; m++)
+        {
+            dDdP[m][idx] = (primR[m] - q[m][re]) / dqpert;
+        }
+
+
+        // perturb p
+        idx++;
+        for (int m = 0; m < nEquation; m++)
+        {
+            primL[m] = q[m][le];
+        }
+        primL[IP] *= (1.0+perturbScale);
+        dqpert     = primL[IP] - q[IP][le];
+        Cal_GMRES_SymmetryBCRegion(gridIn,primL,primR,iFace);
+        for (int m = 0; m < nEquation; m++)
+        {
+            dDdP[m][idx] = (primR[m] - q[m][re]) / dqpert;
+        }
+    }
+    delete[] primL;
+    primL = NULL;
+    delete[] primR;     primR    = NULL;
+}
+
+// GMRESBoundary
+void NSSolverUnstruct::GMRES_SymmetryBCRegion_CV(Grid * gridIn, UnstructBC *bcRegionUnstruct)
+{
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    RDouble   *xfn       = grid->GetFaceNormalX();
+    RDouble   *yfn       = grid->GetFaceNormalY();
+    RDouble   *zfn       = grid->GetFaceNormalZ();
+    RDouble   *vgn       = grid->GetFaceNormalVelocity();
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **dDdP = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP"));
+    RDouble *gama = reinterpret_cast<RDouble *>(grid->GetDataPtr("gama"));
+
+    //! Get the number of equations.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+    int nTotalCells = grid->GetNTotalCell();
+
+    RDouble dCvpert;
+    RDouble* primL    = new RDouble[nEquation]();
+    RDouble* primR    = new RDouble[nEquation]();
+    RDouble* qCvL     = new RDouble[nEquation]();
+    RDouble* qCvR     = new RDouble[nEquation]();
+    RDouble* qCvLpert = new RDouble[nEquation]();
+    RDouble* qCvRpert = new RDouble[nEquation]();
+    RDouble temperaturesL[3] = { 0 }, temperaturesR[3] = { 0 };
+    RDouble perturbScale = 0.001;
+
+    int iFace, le, re;
+
+    //! Get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        iFace = *iter;
+        le = leftCellofFace[iFace];
+        re = rightCellofFace[iFace];
+
+        RDouble gmL = gama[le];
+        RDouble gmR = gama[re];
+
+        // firstly, update the boundary
+        for (int m = 0; m < nEquation; m++)
+        {
+            primL[m] = q[m][le];
+        }
+
+        gas->Primitive2Conservative(primL, gmL, temperaturesL[ITV], temperaturesL[ITE], qCvL);
+        // gas->Conservative2Primitive(qCvL, gmL, primL, temperaturesL);
+
+        Cal_GMRES_SymmetryBCRegion(gridIn, primL, primR, iFace);
+        for (int m = 0; m < nEquation; m++)
+        {
+            q[m][re] = primR[m];
+        }
+        gas->Primitive2Conservative(primR, gmR, temperaturesR[ITV], temperaturesR[ITE], qCvR); // Set standard
+
+                                                                                               // then perturb the conservative variables at the left cell
+                                                                                               // perturb rho
+        int idx = (re - nTotalCells) * nEquation;
+
+        for (int m = 0; m < nEquation; m++)
+        {
+            qCvLpert[m] = qCvL[m];
+        }
+        qCvLpert[IR] *= (1.0+perturbScale);
+        dCvpert      = qCvLpert[IR] - qCvL[IR];
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL); // now [primL] becomes a new value
+        Cal_GMRES_SymmetryBCRegion(gridIn,primL,primR,iFace);
+        gas->Primitive2Conservative(primR, gmR, temperaturesR[ITV], temperaturesR[ITE], qCvRpert);
+        for (int m = 0; m < nEquation; m++)
+        {
+            dDdP[m][idx] = (qCvRpert[m] - qCvR[m]) / dCvpert;
+        }
+
+        // perturb rhou
+        idx++;
+        for (int m = 0; m < nEquation; m++)
+        {
+            qCvLpert[m] = qCvL[m];
+        }
+        qCvLpert[IU] += (perturbScale);
+        dCvpert      = qCvLpert[IU] - qCvL[IU];
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL); // now [primL] becomes a new value
+        Cal_GMRES_SymmetryBCRegion(gridIn,primL,primR,iFace);
+        gas->Primitive2Conservative(primR, gmR, temperaturesR[ITV], temperaturesR[ITE], qCvRpert);
+        for (int m = 0; m < nEquation; m++)
+        {
+            dDdP[m][idx] = (qCvRpert[m] - qCvR[m]) / dCvpert;
+        }
+
+        // perturb rhov
+        idx++;
+        for (int m = 0; m < nEquation; m++)
+        {
+            qCvLpert[m] = qCvL[m];
+        }
+        qCvLpert[IV] += (perturbScale);
+        dCvpert      = qCvLpert[IV] - qCvL[IV];
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL); // now [primL] becomes a new value
+        Cal_GMRES_SymmetryBCRegion(gridIn,primL,primR,iFace);
+        gas->Primitive2Conservative(primR, gmR, temperaturesR[ITV], temperaturesR[ITE], qCvRpert);
+        for (int m = 0; m < nEquation; m++)
+        {
+            dDdP[m][idx] = (qCvRpert[m] - qCvR[m]) / dCvpert;
+        }
+
+        // perturb rhow
+        idx++;
+        for (int m = 0; m < nEquation; m++)
+        {
+            qCvLpert[m] = qCvL[m];
+        }
+        qCvLpert[IW] += (perturbScale);
+        dCvpert      = qCvLpert[IW] - qCvL[IW];
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL); // now [primL] becomes a new value
+        Cal_GMRES_SymmetryBCRegion(gridIn,primL,primR,iFace);
+        gas->Primitive2Conservative(primR, gmR, temperaturesR[ITV], temperaturesR[ITE], qCvRpert);
+        for (int m = 0; m < nEquation; m++)
+        {
+            dDdP[m][idx] = (qCvRpert[m] - qCvR[m]) / dCvpert;
+        }
+
+        // perturb rhoe
+        idx++;
+        for (int m = 0; m < nEquation; m++)
+        {
+            qCvLpert[m] = qCvL[m];
+        }
+        qCvLpert[IP] *= (1.0+perturbScale);
+        dCvpert      = qCvLpert[IP] - qCvL[IP];
+        gas->Conservative2Primitive(qCvLpert, gmL, primL, temperaturesL); // now [primL] becomes a new value
+        Cal_GMRES_SymmetryBCRegion(gridIn,primL,primR,iFace);
+        gas->Primitive2Conservative(primR, gmR, temperaturesR[ITV], temperaturesR[ITE], qCvRpert);
+        for (int m = 0; m < nEquation; m++)
+        {
+            dDdP[m][idx] = (qCvRpert[m] - qCvR[m]) / dCvpert;
+        }
+    }
+
+    delete[] primL;         primL       = NULL;             
+    delete[] primR;         primR       = NULL;
+    delete[] qCvL;          qCvL        = NULL;
+    delete[] qCvR;          qCvR        = NULL; 
+    delete[] qCvLpert;      qCvLpert    = NULL;
+    delete[] qCvRpert;      qCvRpert    = NULL;
+}
+
+void NSSolverUnstruct::Cal_GMRES_SymmetryBCRegion(Grid *gridIn, RDouble *PrimL, RDouble *PrimR, const int &iFace)
+{
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    RDouble   *xfn       = grid->GetFaceNormalX();
+    RDouble   *yfn       = grid->GetFaceNormalY();
+    RDouble   *zfn       = grid->GetFaceNormalZ();
+    RDouble   *vgn       = grid->GetFaceNormalVelocity();
+
+    //! Get the number of equations.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    for (int m = 0; m < nEquation; ++m)
+    {
+        PrimR[m] = PrimL[m];
+    }
+
+    RDouble uL = PrimL[IU];
+    RDouble vL = PrimL[IV];
+    RDouble wL = PrimL[IW];
+    RDouble vn = xfn[iFace] * uL + yfn[iFace] * vL + zfn[iFace] * wL - vgn[iFace];
+
+    PrimR[IU] = uL - two * xfn[iFace] * vn;
+    PrimR[IV] = vL - two * yfn[iFace] * vn;
+    PrimR[IW] = wL - two * zfn[iFace] * vn;
+}
+
+void NSSolverUnstruct::GMRES_ViscousIsotropicWallBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    RDouble *faceVelocityX = grid->GetFaceVelocityX();
+    RDouble *faceVelocityY = grid->GetFaceVelocityY();
+    RDouble *faceVelocityZ = grid->GetFaceVelocityZ();
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **dDdP = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP"));
+
+    //! Get the number of equations.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nTotalCells = grid->GetNTotalCell();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+
+    //! Get the variables defined in boundarycondition.hypara file.
+    Data_Param *bcParamDB = bcRegionUnstruct->GetBCParamDataBase();
+    RDouble wallTemperature = 0.0;
+
+    if (bcParamDB)
+    {
+        if (!bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+        {
+            wallTemperature = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+            bcParamDB->UpdateData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+        }
+        else
+        {
+            bcParamDB->GetData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+        }
+    }
+    else
+    {
+        wallTemperature = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+    }
+    wallTemperature /= refDimensionalTemperature;
+
+    bool wallTempArrayExist = false;
+    RDouble *wallTempArray;
+    int countFace = 0;
+    if (bcRegionUnstruct->CheckFieldData("wallTempArray"))
+    {
+        wallTempArrayExist = true;
+        wallTempArray = reinterpret_cast <RDouble *> (bcRegionUnstruct->GetFieldDataPtr("wallTempArray"));
+    }
+
+
+    int iFace, le, re;
+    //! Get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+    RDouble molecularWeight = one;
+    using namespace GAS_SPACE;
+    RDouble coefficientofstateEquation = gas->GetCoefficientOfStateEquation();
+
+    ADReal rGhost = 0.0, pGhost = 0.0, tGhost = 0.0;    //! rho/pressure/temprature on ghost cell.
+    RDouble *qL = NULL;
+    if (nChemical == 1)
+    {
+        // qL = new RDouble [nEquation];
+    }
+
+    ADReal * qleft  = new ADReal [nEquation]();
+    ADReal * qright = new ADReal [nEquation]();
+
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        iFace = *iter;
+        le = leftCellofFace[iFace];
+        re = rightCellofFace[iFace];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            qleft[m] = q[m][le];
+            qleft[m].diff(m,nEquation);
+        }
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            qright[m] = qleft[m];
+        }
+
+        qright[IU] = - qleft[IU] + two * faceVelocityX[iFace];
+        qright[IV] = - qleft[IV] + two * faceVelocityY[iFace];
+        qright[IW] = - qleft[IW] + two * faceVelocityZ[iFace];
+
+        if (nChemical == 1)
+        {
+            // for (int m = 0; m < nEquation; ++ m)
+            // {
+            //     qL[m] = q[m][le];
+            // }
+            // molecularWeight = gas->ComputeMolecularWeightReciprocal(qL);
+        }
+
+        ADReal tL = (1.0 / coefficientofstateEquation) * qleft[IP] / qleft[IR];
+
+        //! Pressure keep the same on the wall normal direction.
+        pGhost = qleft[IP];
+
+        if (wallTempArrayExist)
+        {
+            wallTemperature = wallTempArray[countFace] / refDimensionalTemperature;
+            countFace ++;
+        }
+
+        //! Extrapolate temperature from inside to outside.
+        tGhost = two * wallTemperature - tL;
+        if (tGhost <= 0.0) tGhost = wallTemperature;
+
+        if (nChemical == 1)
+        {
+            // tGhost = wallTemperature;
+        }
+
+        //! Then compute the density from the extrapolated temperature.
+        rGhost = pGhost / (coefficientofstateEquation * tGhost * molecularWeight);
+
+        qright[IR] = rGhost;
+        qright[IP] = pGhost;
+
+        int idx = (re - nTotalCells)*nEquation;
+
+        for(int m = 0; m < nEquation; m++)
+        {
+            q[m][re] = qright[m].val();
+            for(int n = 0; n < nEquation; n++)
+            {
+                dDdP[m][idx+n] = qright[m].dx(n);
+            }
+        }
+    }
+
+    if (nChemical == 1)
+    {
+        // delete [] qL;
+    }
+    delete[] qleft;
+    qleft = NULL;
+    delete[] qright;
+    qright = NULL;
+}
+
+// GMRESVis GMRESBoundary
+void NSSolverUnstruct::GMRES_ViscousAdiabaticWallBCRegion_FD(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    // Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    int nTotalCells = grid->GetNTotalCell();
+    RDouble *faceVelocityX = grid->GetFaceVelocityX();
+    RDouble *faceVelocityY = grid->GetFaceVelocityY();
+    RDouble *faceVelocityZ = grid->GetFaceVelocityZ();
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **t   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("t"));
+    RDouble **dDdP = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP"));
+
+
+    //! Get the number of equations.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    Data_Param *bcData = bcRegionUnstruct->GetBCParamDataBase();
+
+    RDouble uWall = 0.0;
+    RDouble vWall = 0.0;
+    RDouble wWall = 0.0;
+
+    if(bcData)
+    {
+        if (bcData->IsExist("uWall", PHDOUBLE, 1))
+        {
+            bcData->GetData("uWall", &uWall, PHDOUBLE, 1);
+            bcData->GetData("vWall", &vWall, PHDOUBLE, 1);
+            bcData->GetData("wWall", &wWall, PHDOUBLE, 1);
+        }
+    }    
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+
+    int iFace, le, re;
+    //! Get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+    RDouble molecularWeight = one;
+    using namespace GAS_SPACE;
+    RDouble coefficientofstateEquation = gas->GetCoefficientOfStateEquation();
+    RDouble rGhost = 0.0, pGhost = 0.0, tGhost = 0.0;
+    RDouble *qL = NULL;
+    if (nChemical == 1)
+    {
+        qL = new RDouble [nEquation];
+    }
+    RDouble* primL = new RDouble [nEquation];
+    RDouble* primR = new RDouble [nEquation];
+    RDouble dqpert;
+    RDouble perturbScale = 1e-6;
+
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        iFace = *iter;
+        le = leftCellofFace[iFace];
+        re = rightCellofFace[iFace];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            primL[m] = q[m][le];
+        }
+
+        Cal_GMRES_ViscousAdiabaticWallBCRegion(gridIn, primL, primR, iFace, uWall, vWall, wWall);
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q[m][re] = primR[m];
+        }
+
+        // then perturb the primative variables at the left cell
+        // perturb rho
+        int idx = (re - nTotalCells) * nEquation;
+
+        for (int m = 0; m < nEquation; m++)
+        {
+            primL[m] = q[m][le];
+        }
+        primL[IR] *= (1.0+perturbScale);
+        dqpert     = primL[IR] - q[IR][le];
+        Cal_GMRES_ViscousAdiabaticWallBCRegion(gridIn, primL, primR, iFace, uWall, vWall, wWall);
+        for (int m = 0; m < nEquation; m++)
+        {
+            dDdP[m][idx] = (primR[m] - q[m][re]) / dqpert;
+        }
+
+        // perturb u
+        idx++;
+        for (int m = 0; m < nEquation; m++)
+        {
+            primL[m] = q[m][le];
+        }
+        primL[IU] += (perturbScale);
+        dqpert     = primL[IU] - q[IU][le];
+        Cal_GMRES_ViscousAdiabaticWallBCRegion(gridIn, primL, primR, iFace, uWall, vWall, wWall);
+        for (int m = 0; m < nEquation; m++)
+        {
+            dDdP[m][idx] = (primR[m] - q[m][re]) / dqpert;
+        }
+
+        // perturb v
+        idx++;
+        for (int m = 0; m < nEquation; m++)
+        {
+            primL[m] = q[m][le];
+        }
+        primL[IV] += (perturbScale);
+        dqpert     = primL[IV] - q[IV][le];
+        Cal_GMRES_ViscousAdiabaticWallBCRegion(gridIn, primL, primR, iFace, uWall, vWall, wWall);
+        for (int m = 0; m < nEquation; m++)
+        {
+            dDdP[m][idx] = (primR[m] - q[m][re]) / dqpert;
+        }
+
+        // perturb w
+        idx++;
+        for (int m = 0; m < nEquation; m++)
+        {
+            primL[m] = q[m][le];
+        }
+        primL[IW] += (1.0+perturbScale);
+        dqpert     = primL[IW] - q[IW][le];
+        Cal_GMRES_ViscousAdiabaticWallBCRegion(gridIn, primL, primR, iFace, uWall, vWall, wWall);
+        for (int m = 0; m < nEquation; m++)
+        {
+            dDdP[m][idx] = (primR[m] - q[m][re]) / dqpert;
+        }
+
+
+        // perturb p
+        idx++;
+        for (int m = 0; m < nEquation; m++)
+        {
+            primL[m] = q[m][le];
+        }
+        primL[IP] *= (1.0+perturbScale);
+        dqpert     = primL[IP] - q[IP][le];
+        Cal_GMRES_ViscousAdiabaticWallBCRegion(gridIn, primL, primR, iFace, uWall, vWall, wWall);
+        for (int m = 0; m < nEquation; m++)
+        {
+            dDdP[m][idx] = (primR[m] - q[m][re]) / dqpert;
+        }
+
+    }
+    if (nChemical == 1)
+    {
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            qL[m] = q[m][le];
+        }
+        molecularWeight = gas->ComputeMolecularWeightReciprocal(qL);
+
+        tGhost = t[ITT][le];
+        pGhost = q[IP][le];
+        //! Then compute the density from the extrapolated temperature.
+        rGhost = pGhost / (coefficientofstateEquation * tGhost * molecularWeight);
+
+        q[IR][re] = rGhost;
+        q[IP][re] = pGhost;
+    }
+
+    delete[] primL;  primL = NULL;
+    delete[] primR;  primR = NULL;
+}
+// GMRESVis GMRESBoundary
+void NSSolverUnstruct::Cal_GMRES_ViscousAdiabaticWallBCRegion(Grid *gridIn, RDouble *PrimL, RDouble *PrimR, int iFace, RDouble uWall, RDouble vWall, RDouble wWall)
+{
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    RDouble *faceVelocityX = grid->GetFaceVelocityX();
+    RDouble *faceVelocityY = grid->GetFaceVelocityY();
+    RDouble *faceVelocityZ = grid->GetFaceVelocityZ();
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+    int nEquation = GetNumberOfEquations();
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        PrimR[m] = PrimL[m];
+    }
+
+    RDouble velocityXWall = uWall;
+    RDouble velocityYWall = vWall;
+    RDouble velocityZWall = wWall;
+
+    if (isUnsteady && isAle)
+
+    {
+        velocityXWall = faceVelocityX[iFace] + uWall;
+        velocityYWall = faceVelocityY[iFace] + vWall;
+        velocityZWall = faceVelocityZ[iFace] + wWall;
+    }
+
+    PrimR[IU] = - PrimL[IU] + two * velocityXWall;
+    PrimR[IV] = - PrimL[IV] + two * velocityYWall;
+    PrimR[IW] = - PrimL[IW] + two * velocityZWall;
+}
+// AD  GMRESAD
+void NSSolverUnstruct::GMRES_ViscousAdiabaticWallBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    // Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    int nTotalCell         = grid->GetNTotalCell();
+    RDouble *faceVelocityX = grid->GetFaceVelocityX();
+    RDouble *faceVelocityY = grid->GetFaceVelocityY();
+    RDouble *faceVelocityZ = grid->GetFaceVelocityZ();
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **t   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("t"));
+    RDouble** dDdP = reinterpret_cast <RDouble**> (grid->GetDataPtr("dDdP"));
+
+    //! Get the number of equations.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    Data_Param *bcData = bcRegionUnstruct->GetBCParamDataBase();
+
+    RDouble uWall = 0.0;
+    RDouble vWall = 0.0;
+    RDouble wWall = 0.0;
+
+    if(bcData)
+    {
+        if (bcData->IsExist("uWall", PHDOUBLE, 1))
+        {
+            bcData->GetData("uWall", &uWall, PHDOUBLE, 1);
+            bcData->GetData("vWall", &vWall, PHDOUBLE, 1);
+            bcData->GetData("wWall", &wWall, PHDOUBLE, 1);
+        }
+    }    
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+
+    int iFace, le, re;
+    //! Get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+    RDouble molecularWeight = one;
+    using namespace GAS_SPACE;
+    RDouble coefficientofstateEquation = gas->GetCoefficientOfStateEquation();
+    RDouble rGhost = 0.0, pGhost = 0.0, tGhost = 0.0;
+    ADReal *qL = new ADReal[nEquation]();
+    ADReal *qR = new ADReal[nEquation]();
+
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        iFace = *iter;
+        le = leftCellofFace[iFace];
+        re = rightCellofFace[iFace];
+
+        // init for q[m][le] and define the independent variabels
+        for (int m = 0; m < nEquation; m++)
+        {
+            qL[m] = q[m][le];
+            qL[m].diff(m, nEquation);
+        }
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            qR[m] = qL[m];
+        }
+
+        ADReal velocityXWall = uWall;
+        ADReal velocityYWall = vWall;
+        ADReal velocityZWall = wWall;
+        if (isUnsteady && isAle)
+        {
+            velocityXWall = faceVelocityX[iFace] + uWall;
+            velocityYWall = faceVelocityY[iFace] + vWall;
+            velocityZWall = faceVelocityZ[iFace] + wWall;
+        }
+
+        qR[IU] = - qL[IU] + two * velocityXWall;
+        qR[IV] = - qL[IV] + two * velocityYWall;
+        qR[IW] = - qL[IW] + two * velocityZWall;
+
+        // assign to qr and dqr/dql
+        int idx = (re - nTotalCell) * nEquation;
+        for (int m = 0; m < nEquation; m++)
+        {
+            q[m][re] = qR[m].val();
+            for (int n = 0; n < nEquation; ++n)
+            {
+                dDdP[m][idx + n] = qR[m].dx(n);
+            }
+        }
+    }
+
+    if (nChemical == 1)
+    {
+        
+    }
+    delete[] qL;
+    qL = NULL;
+    delete[] qR;
+    qR = NULL;
+}
+// GMRESPV GMRESBoundary FD
+void NSSolverUnstruct::GMRES_FarfieldBCRegion_FD(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble *gama = reinterpret_cast< RDouble *  > (grid->GetDataPtr("gama"));
+    RDouble** dDdP = reinterpret_cast <RDouble**> (grid->GetDataPtr("dDdP"));
+    int nEquation = GetNumberOfEquations();
+    int iFace, le, re;
+    //! Get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+
+    using namespace GAS_SPACE;
+
+    RDouble* qL          = new RDouble[nEquation]();
+    RDouble* qR          = new RDouble[nEquation]();
+    RDouble dqpert;
+    RDouble temperaturesL[3] = { 0 }, temperaturesR[3] = { 0 };
+    RDouble perturbScale = 0.000001;
+
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        iFace = *iter;
+        le = leftCellofFace[iFace];
+        re = rightCellofFace[iFace];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            qL[m] = q[m][le];
+        }
+        Cal_GMRES_FarfieldBCRegion(qL, qR, le, iFace, gridIn, bcRegionUnstruct);
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q[m][re] = qR[m];
+        }
+
+        // perturb rho of the left cell
+        qL[IR] = q[IR][le];
+        qL[IU] = q[IU][le];
+        qL[IV] = q[IV][le];
+        qL[IW] = q[IW][le];
+        qL[IP] = q[IP][le];
+        qL[IR] *= (1.0+perturbScale);
+        dqpert = qL[IR] - q[IR][le];
+        Cal_GMRES_FarfieldBCRegion(qL, qR, le, iFace, gridIn, bcRegionUnstruct);
+        dDdP[IR][nEquation * (re - nTotalCell) + IR] = (qR[IR] - q[IR][re]) / dqpert;
+        dDdP[IU][nEquation * (re - nTotalCell) + IR] = (qR[IU] - q[IU][re]) / dqpert;
+        dDdP[IV][nEquation * (re - nTotalCell) + IR] = (qR[IV] - q[IV][re]) / dqpert;
+        dDdP[IW][nEquation * (re - nTotalCell) + IR] = (qR[IW] - q[IW][re]) / dqpert;
+        dDdP[IP][nEquation * (re - nTotalCell) + IR] = (qR[IP] - q[IP][re]) / dqpert;
+
+        // perturb u of the left cell
+        qL[IR] = q[IR][le];
+        qL[IU] = q[IU][le];
+        qL[IV] = q[IV][le];
+        qL[IW] = q[IW][le];
+        qL[IP] = q[IP][le];
+        qL[IU] += (perturbScale);
+        dqpert = qL[IU] - q[IU][le];
+        Cal_GMRES_FarfieldBCRegion(qL, qR, le, iFace, gridIn, bcRegionUnstruct);
+        dDdP[IR][nEquation * (re - nTotalCell) + IU] = (qR[IR] - q[IR][re]) / dqpert;
+        dDdP[IU][nEquation * (re - nTotalCell) + IU] = (qR[IU] - q[IU][re]) / dqpert;
+        dDdP[IV][nEquation * (re - nTotalCell) + IU] = (qR[IV] - q[IV][re]) / dqpert;
+        dDdP[IW][nEquation * (re - nTotalCell) + IU] = (qR[IW] - q[IW][re]) / dqpert;
+        dDdP[IP][nEquation * (re - nTotalCell) + IU] = (qR[IP] - q[IP][re]) / dqpert;
+
+        // perturb v of the left cell
+        qL[IR] = q[IR][le];
+        qL[IU] = q[IU][le];
+        qL[IV] = q[IV][le];
+        qL[IW] = q[IW][le];
+        qL[IP] = q[IP][le];
+        qL[IV] += (perturbScale);
+        dqpert = qL[IV] - q[IV][le];
+        Cal_GMRES_FarfieldBCRegion(qL, qR, le, iFace, gridIn, bcRegionUnstruct);
+        dDdP[IR][nEquation * (re - nTotalCell) + IV] = (qR[IR] - q[IR][re]) / dqpert;
+        dDdP[IU][nEquation * (re - nTotalCell) + IV] = (qR[IU] - q[IU][re]) / dqpert;
+        dDdP[IV][nEquation * (re - nTotalCell) + IV] = (qR[IV] - q[IV][re]) / dqpert;
+        dDdP[IW][nEquation * (re - nTotalCell) + IV] = (qR[IW] - q[IW][re]) / dqpert;
+        dDdP[IP][nEquation * (re - nTotalCell) + IV] = (qR[IP] - q[IP][re]) / dqpert;
+
+        // perturb w of the left cell
+        qL[IR] = q[IR][le];
+        qL[IU] = q[IU][le];
+        qL[IV] = q[IV][le];
+        qL[IW] = q[IW][le];
+        qL[IP] = q[IP][le];
+        qL[IW] += (perturbScale);
+        dqpert = qL[IW] - q[IW][le];
+        Cal_GMRES_FarfieldBCRegion(qL, qR, le, iFace, gridIn, bcRegionUnstruct);
+        dDdP[IR][nEquation * (re - nTotalCell) + IW] = (qR[IR] - q[IR][re]) / dqpert;
+        dDdP[IU][nEquation * (re - nTotalCell) + IW] = (qR[IU] - q[IU][re]) / dqpert;
+        dDdP[IV][nEquation * (re - nTotalCell) + IW] = (qR[IV] - q[IV][re]) / dqpert;
+        dDdP[IW][nEquation * (re - nTotalCell) + IW] = (qR[IW] - q[IW][re]) / dqpert;
+        dDdP[IP][nEquation * (re - nTotalCell) + IW] = (qR[IP] - q[IP][re]) / dqpert;
+
+        // perturb p of the left cell
+        qL[IR] = q[IR][le];
+        qL[IU] = q[IU][le];
+        qL[IV] = q[IV][le];
+        qL[IW] = q[IW][le];
+        qL[IP] = q[IP][le];
+        qL[IP] *= (1.0 + perturbScale);
+        dqpert = qL[IP] - q[IP][le];
+        Cal_GMRES_FarfieldBCRegion(qL, qR, le, iFace, gridIn, bcRegionUnstruct);
+        dDdP[IR][nEquation * (re - nTotalCell) + IP] = (qR[IR] - q[IR][re]) / dqpert;
+        dDdP[IU][nEquation * (re - nTotalCell) + IP] = (qR[IU] - q[IU][re]) / dqpert;
+        dDdP[IV][nEquation * (re - nTotalCell) + IP] = (qR[IV] - q[IV][re]) / dqpert;
+        dDdP[IW][nEquation * (re - nTotalCell) + IP] = (qR[IW] - q[IW][re]) / dqpert;
+        dDdP[IP][nEquation * (re - nTotalCell) + IP] = (qR[IP] - q[IP][re]) / dqpert;     
+    }
+    delete[] qL;
+    qL = NULL;
+    delete[] qR;        qR       = NULL;
+}
+
+// GMRESBoundary
+void NSSolverUnstruct::GMRES_FarfieldBCRegion_CV(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble *gama = reinterpret_cast< RDouble *  > (grid->GetDataPtr("gama"));
+    RDouble** dDdP = reinterpret_cast <RDouble**> (grid->GetDataPtr("dDdP"));
+    int nEquation = GetNumberOfEquations();
+    int iFace, le, re;
+    //! Get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+
+    using namespace GAS_SPACE;
+
+    RDouble* qL          = new RDouble[nEquation]();
+    RDouble* qCvL        = new RDouble[nEquation]();
+    RDouble* qCvLpert    = new RDouble[nEquation]();
+    RDouble* qR          = new RDouble[nEquation]();
+    RDouble* qCvR        = new RDouble[nEquation]();
+    RDouble* qCvRpert    = new RDouble[nEquation]();
+    RDouble dCvpert;
+    RDouble temperaturesL[3] = { 0 }, temperaturesR[3] = { 0 };
+    RDouble perturbScale = 0.001;
+
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        iFace = *iter;
+        le = leftCellofFace[iFace];
+        re = rightCellofFace[iFace];
+
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            qL[m]= q[m][le];
+        }
+
+        gas->Primitive2Conservative(qL, gama[le], temperaturesL[ITV], temperaturesL[ITE], qCvL);
+
+        Cal_GMRES_FarfieldBCRegion(qL,qR, le,iFace, gridIn, bcRegionUnstruct);
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q[m][re]= qR[m];
+        }
+
+        gas->Primitive2Conservative(qR, gama[le], temperaturesR[ITV], temperaturesR[ITE], qCvR);
+
+        // perturb the density of the left cell
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IR] *= (1.0+perturbScale);
+        dCvpert      = qCvLpert[IR] - qCvL[IR];
+        gas->Conservative2Primitive(qCvLpert, gama[le], qL, temperaturesL);
+        Cal_GMRES_FarfieldBCRegion(qL,qR, le,iFace, gridIn, bcRegionUnstruct);
+        gas->Primitive2Conservative(qR, gama[le], temperaturesR[ITV], temperaturesR[ITE], qCvRpert);
+        dDdP[IR][nEquation*(re-nTotalCell)+IR] = (qCvRpert[IR] - qCvR[IR])/dCvpert;
+        dDdP[IU][nEquation*(re-nTotalCell)+IR] = (qCvRpert[IU] - qCvR[IU])/dCvpert;
+        dDdP[IV][nEquation*(re-nTotalCell)+IR] = (qCvRpert[IV] - qCvR[IV])/dCvpert;
+        dDdP[IW][nEquation*(re-nTotalCell)+IR] = (qCvRpert[IW] - qCvR[IW])/dCvpert;
+        dDdP[IP][nEquation*(re-nTotalCell)+IR] = (qCvRpert[IP] - qCvR[IP])/dCvpert;
+
+
+        // perturb the momentum rhou of the left cell
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IU] += perturbScale;
+        dCvpert      = qCvLpert[IU] - qCvL[IU];
+        gas->Conservative2Primitive(qCvLpert, gama[le], qL, temperaturesL);
+        Cal_GMRES_FarfieldBCRegion(qL,qR, le,iFace, gridIn, bcRegionUnstruct);
+        gas->Primitive2Conservative(qR, gama[le], temperaturesR[ITV], temperaturesR[ITE], qCvRpert);
+        dDdP[IR][nEquation*(re-nTotalCell)+IU] = (qCvRpert[IR] - qCvR[IR])/dCvpert;
+        dDdP[IU][nEquation*(re-nTotalCell)+IU] = (qCvRpert[IU] - qCvR[IU])/dCvpert;
+        dDdP[IV][nEquation*(re-nTotalCell)+IU] = (qCvRpert[IV] - qCvR[IV])/dCvpert;
+        dDdP[IW][nEquation*(re-nTotalCell)+IU] = (qCvRpert[IW] - qCvR[IW])/dCvpert;
+        dDdP[IP][nEquation*(re-nTotalCell)+IU] = (qCvRpert[IP] - qCvR[IP])/dCvpert;
+
+        // perturb the momentum rhov of the left cell
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IV] += perturbScale;
+        dCvpert      = qCvLpert[IV] - qCvL[IV];
+        gas->Conservative2Primitive(qCvLpert, gama[le], qL, temperaturesL);
+        Cal_GMRES_FarfieldBCRegion(qL,qR, le,iFace, gridIn, bcRegionUnstruct);
+        gas->Primitive2Conservative(qR, gama[le], temperaturesR[ITV], temperaturesR[ITE], qCvRpert);
+        dDdP[IR][nEquation*(re-nTotalCell)+IV] = (qCvRpert[IR] - qCvR[IR])/dCvpert;
+        dDdP[IU][nEquation*(re-nTotalCell)+IV] = (qCvRpert[IU] - qCvR[IU])/dCvpert;
+        dDdP[IV][nEquation*(re-nTotalCell)+IV] = (qCvRpert[IV] - qCvR[IV])/dCvpert;
+        dDdP[IW][nEquation*(re-nTotalCell)+IV] = (qCvRpert[IW] - qCvR[IW])/dCvpert;
+        dDdP[IP][nEquation*(re-nTotalCell)+IV] = (qCvRpert[IP] - qCvR[IP])/dCvpert;
+
+        // perturb the momentum rhow of the left cell
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IW] += perturbScale;
+        dCvpert      = qCvLpert[IW] - qCvL[IW];
+        gas->Conservative2Primitive(qCvLpert, gama[le], qL, temperaturesL);
+        Cal_GMRES_FarfieldBCRegion(qL,qR, le,iFace, gridIn, bcRegionUnstruct);
+        gas->Primitive2Conservative(qR, gama[le], temperaturesR[ITV], temperaturesR[ITE], qCvRpert);
+        dDdP[IR][nEquation*(re-nTotalCell)+IW] = (qCvRpert[IR] - qCvR[IR])/dCvpert;
+        dDdP[IU][nEquation*(re-nTotalCell)+IW] = (qCvRpert[IU] - qCvR[IU])/dCvpert;
+        dDdP[IV][nEquation*(re-nTotalCell)+IW] = (qCvRpert[IV] - qCvR[IV])/dCvpert;
+        dDdP[IW][nEquation*(re-nTotalCell)+IW] = (qCvRpert[IW] - qCvR[IW])/dCvpert;
+        dDdP[IP][nEquation*(re-nTotalCell)+IW] = (qCvRpert[IP] - qCvR[IP])/dCvpert;
+
+
+        // perturb the momentum rhoE of the left cell
+        qCvLpert[IR] = qCvL[IR];
+        qCvLpert[IU] = qCvL[IU];
+        qCvLpert[IV] = qCvL[IV];
+        qCvLpert[IW] = qCvL[IW];
+        qCvLpert[IP] = qCvL[IP];
+        qCvLpert[IP] *= (1.0+perturbScale);
+        dCvpert      = qCvLpert[IP] - qCvL[IP];
+        gas->Conservative2Primitive(qCvLpert, gama[le], qL, temperaturesL);
+        Cal_GMRES_FarfieldBCRegion(qL,qR, le,iFace, gridIn, bcRegionUnstruct);
+        gas->Primitive2Conservative(qR, gama[le], temperaturesR[ITV], temperaturesR[ITE], qCvRpert);
+        dDdP[IR][nEquation*(re-nTotalCell)+IP] = (qCvRpert[IR] - qCvR[IR])/dCvpert;
+        dDdP[IU][nEquation*(re-nTotalCell)+IP] = (qCvRpert[IU] - qCvR[IU])/dCvpert;
+        dDdP[IV][nEquation*(re-nTotalCell)+IP] = (qCvRpert[IV] - qCvR[IV])/dCvpert;
+        dDdP[IW][nEquation*(re-nTotalCell)+IP] = (qCvRpert[IW] - qCvR[IW])/dCvpert;
+        dDdP[IP][nEquation*(re-nTotalCell)+IP] = (qCvRpert[IP] - qCvR[IP])/dCvpert;
+
+    }
+    delete[] qL;        qL       = NULL; 
+    delete[] qCvL;      qCvL     = NULL; 
+    delete[] qCvLpert;  qCvLpert = NULL; 
+    delete[] qR;        qR       = NULL; 
+    delete[] qCvR;      qCvR     = NULL; 
+    delete[] qCvRpert;  qCvRpert = NULL; 
+}
+
+// GMRESBoundary
+template <typename T>
+void NSSolverUnstruct::Cal_GMRES_FarfieldBCRegion(T* qL,T* qR,int le,int iFace, Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCelCal_GMRES_FarfieldBCRegionlofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    RDouble   *xfn       = grid->GetFaceNormalX();
+    RDouble   *yfn       = grid->GetFaceNormalY();
+    RDouble   *zfn       = grid->GetFaceNormalZ();
+    RDouble   *vgn       = grid->GetFaceNormalVelocity();
+    RDouble *gama = reinterpret_cast< RDouble *  > (grid->GetDataPtr("gama"));
+    //! Get the number of equations.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    RDouble refGama = parameters->GetRefGama();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *primitiveVarFarfield = new RDouble [nEquation];
+    Data_Param *bcData = bcRegionUnstruct->GetBCParamDataBase();
+    bcData->GetData("primitiveVarFarfield", primitiveVarFarfield, PHDOUBLE, nEquation);
+
+    T rInside, uInside, vInside, wInside, pInside, cInside, vNormalInside, vNormalOutside;
+    T gamm1, velocityInside;
+    T vTangentX, vTangentY, vTangentZ, entropyS;
+    T R_Minus, R_Plus;
+    T rBC, uBC, vBC, wBC, pBC, vNormalBC, cBC;
+    T gamale = gama[le];
+
+    //! Infinite variables.
+    T rOutside = primitiveVarFarfield[IR];
+    T uOutside = primitiveVarFarfield[IU];
+    T vOutside = primitiveVarFarfield[IV];
+    T wOutside = primitiveVarFarfield[IW];
+    T pOutside = primitiveVarFarfield[IP];
+    T cOutside = sqrt(abs(refGama * pOutside / rOutside));
+
+    for (int m = 0; m < nEquation; ++ m)
+    {
+        qR[m]= qL[m];
+    }
+    //! Inner point variables.
+    rInside = qL[IR];
+    uInside = qL[IU];
+    vInside = qL[IV];
+    wInside = qL[IW];
+    pInside = qL[IP];
+    vNormalOutside = xfn[iFace] * uOutside + yfn[iFace] * vOutside + zfn[iFace] * wOutside - vgn[iFace];
+    vNormalInside  = xfn[iFace] * uInside  + yfn[iFace] * vInside  + zfn[iFace] * wInside  - vgn[iFace];
+    cInside = sqrt(abs(gamale * pInside / rInside));
+    gamm1   = gamale - one;
+    velocityInside = sqrt(uInside * uInside + vInside * vInside + wInside * wInside);
+
+    //! Supersonic.
+    if (velocityInside > cInside)
+    {
+        if (vNormalInside >= 0.0)
+        {
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                qR[m] = qL[m];
+            }
+        }
+        else
+        {
+            //! Inlet.
+            qR[IR] = rOutside;
+            qR[IU] = uOutside;
+            qR[IV] = vOutside;
+            qR[IW] = wOutside;
+            qR[IP] = pOutside;
+        }
+        return;
+    }
+    //! Subsonic.
+    R_Plus  = vNormalInside + 2.0 * cInside / gamm1;
+    R_Minus = vNormalOutside - 2.0 * cOutside / gamm1;
+    vNormalBC =  half * (R_Plus + R_Minus);
+    cBC =  0.25 * (R_Plus - R_Minus) * gamm1;
+
+    // GMRESFarFieldCorrection
+    T bf,vNth;
+    vNth = 1e-4;
+    bf  = cos((vNormalBC - vNth) / (2.0 * vNth)*PI);
+    bf  = pow((bf+1)/2.0,2);
+
+    if (vNormalBC > vNth)
+    {
+        entropyS   = pInside / pow(rInside, gama[le]);
+        vTangentX  = uInside - xfn[iFace] * vNormalInside;
+        vTangentY  = vInside - yfn[iFace] * vNormalInside;
+        vTangentZ  = wInside - zfn[iFace] * vNormalInside;
+    }
+    else if (vNormalBC < -vNth)
+    {
+        //! Inlet.
+        entropyS   = pOutside / pow(rOutside, gama[le]);
+        vTangentX  = uOutside - xfn[iFace] * vNormalOutside;
+        vTangentY  = vOutside - yfn[iFace] * vNormalOutside;
+        vTangentZ  = wOutside - zfn[iFace] * vNormalOutside;
+    }
+    else
+    {
+        entropyS  = pInside / pow(rInside, gama[le]);
+        vTangentX = uInside - xfn[iFace] * vNormalInside;
+        vTangentY = vInside - yfn[iFace] * vNormalInside;
+        vTangentZ = wInside - zfn[iFace] * vNormalInside;
+
+        entropyS  = entropyS  *bf + (1 - bf)*(pOutside / pow(rOutside, gama[le]));
+        vTangentX = vTangentX *bf + (1 - bf)*(uOutside - xfn[iFace] * vNormalOutside);
+        vTangentY = vTangentY *bf + (1 - bf)*(vOutside - yfn[iFace] * vNormalOutside);
+        vTangentZ = vTangentZ *bf + (1 - bf)*(wOutside - zfn[iFace] * vNormalOutside);
+
+    }
+
+    rBC = pow((cBC * cBC / (entropyS * gamale)), one / gamm1);
+    uBC = vTangentX + xfn[iFace] * vNormalBC;
+    vBC = vTangentY + yfn[iFace] * vNormalBC;
+    wBC = vTangentZ + zfn[iFace] * vNormalBC;
+    pBC = cBC * cBC * rBC / gamale;
+    qR[IR] = rBC;
+    qR[IU] = uBC;
+    qR[IV] = vBC;
+    qR[IW] = wBC;
+    qR[IP] = pBC;
+}
+
+// GMRESBoundary GMRESAD
+void NSSolverUnstruct::GMRES_FarfieldBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    int nTotalCell = grid->GetNTotalCell();
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble *gama = reinterpret_cast< RDouble *  > (grid->GetDataPtr("gama"));
+    RDouble** dDdP = reinterpret_cast <RDouble**> (grid->GetDataPtr("dDdP"));
+    int nEquation = GetNumberOfEquations();
+    int iFace, le, re;
+    //! Get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+
+    using namespace GAS_SPACE;
+
+    ADReal* qL          = new ADReal[nEquation]();
+    ADReal* qR          = new ADReal[nEquation]();
+
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        iFace = *iter;
+        le = leftCellofFace[iFace];
+        re = rightCellofFace[iFace];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            qL[m] = q[m][le];
+            qL[m].diff(m, nEquation);
+        }
+        Cal_GMRES_FarfieldBCRegion(qL, qR, le, iFace, gridIn, bcRegionUnstruct);
+
+        int idx = (re - nTotalCell) * nEquation;
+        for (int m = 0; m < nEquation; ++m)
+        {
+            q[m][re] = qR[m].val();
+            for (int n = 0; n < nEquation; ++n)
+            {
+                dDdP[m][idx + n] = qR[m].dx(n);
+            }
+        }
+    }
+    delete[] qL;  qL = NULL;
+    delete[] qR;  qR = NULL;
+}
+#endif
+
+void NSSolverUnstruct::ViscousIsotropicWallBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme"); 
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    RDouble *faceVelocityX = grid->GetFaceVelocityX();
+    RDouble *faceVelocityY = grid->GetFaceVelocityY();
+    RDouble *faceVelocityZ = grid->GetFaceVelocityZ();
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **dDdP = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP"));
+
+    //! Get the number of equations.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+    int nTotalCells = grid->GetNTotalCell();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+
+    //! Get the variables defined in boundarycondition.hypara file.
+    Data_Param *bcParamDB = bcRegionUnstruct->GetBCParamDataBase();
+    RDouble wallTemperature = 0.0;
+
+    if (bcParamDB)
+    {
+        if (!bcParamDB->IsExist("wallTemperature", PHDOUBLE, 1))
+        {
+            wallTemperature = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+            bcParamDB->UpdateData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+        }
+        else
+        {
+            bcParamDB->GetData("wallTemperature", &wallTemperature, PHDOUBLE, 1);
+        }
+    }
+    else
+    {
+        wallTemperature = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+    }
+    wallTemperature /= refDimensionalTemperature;
+
+    bool wallTempArrayExist = false;
+    RDouble *wallTempArray = NULL;
+    int countFace = 0;
+    if (bcRegionUnstruct->CheckFieldData("wallTempArray"))
+    {
+        wallTempArrayExist = true;
+        wallTempArray = reinterpret_cast <RDouble *> (bcRegionUnstruct->GetFieldDataPtr("wallTempArray"));
+    }
+
+    int iFace, le, re;
+    //! Get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+    RDouble molecularWeight = one;
+    using namespace GAS_SPACE;
+    RDouble coefficientofstateEquation = gas->GetCoefficientOfStateEquation();
+
+
+    if (tscheme != GMRES)
+    {
+        RDouble rGhost = 0.0, pGhost = 0.0, tGhost = 0.0;    //! rho/pressure/temprature on ghost cell.
+        RDouble *qL = nullptr;
+
+        if (nChemical == 1)
+        {
+            qL = new RDouble [nEquation];
+    }
+
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            iFace = *iter;
+            le = leftCellofFace[iFace];
+            re = rightCellofFace[iFace];
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                q[m][re] = q[m][le];
+            }
+
+            q[IU][re] = - q[IU][le] + two * faceVelocityX[iFace];
+            q[IV][re] = - q[IV][le] + two * faceVelocityY[iFace];
+            q[IW][re] = - q[IW][le] + two * faceVelocityZ[iFace];
+
+            if (nChemical == 1)
+            {
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    qL[m] = q[m][le];
+                }
+                molecularWeight = gas->ComputeMolecularWeightReciprocal(qL);
+            }
+
+            RDouble tL = (1.0 / coefficientofstateEquation) * q[IP][le] / q[IR][le];
+
+            //! Pressure keep the same on the wall normal direction.
+            pGhost = q[IP][le];
+
+            if (wallTempArrayExist)
+            {
+                wallTemperature = wallTempArray[countFace] / refDimensionalTemperature;
+                countFace ++;
+            }
+
+            //! Extrapolate temperature from inside to outside.
+            tGhost = two * wallTemperature - tL;
+            if (tGhost <= wallTemperature*0.1) tGhost = wallTemperature*0.1;
+
+            if (nChemical == 1)
+            {
+                tGhost = wallTemperature;
+            }
+
+            //! Then compute the density from the extrapolated temperature.
+            rGhost = pGhost / (coefficientofstateEquation * tGhost * molecularWeight);
+
+            q[IR][re] = rGhost;
+            q[IP][re] = pGhost;
+        }
+
+        if (nChemical == 1)
+        {
+            delete [] qL;    qL = nullptr;
+        }
+    }
+    else
+    {
+#ifdef USE_GMRESSOLVER
+
+        ADReal rGhost = 0.0, pGhost = 0.0, tGhost = 0.0;    //! rho/pressure/temprature on ghost cell.
+        ADReal *qleft  = new ADReal [nEquation]();
+        ADReal *qright = new ADReal [nEquation]();
+
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            iFace = *iter;
+            le = leftCellofFace[iFace];
+            re = rightCellofFace[iFace];
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                qleft[m] = q[m][le];
+                qleft[m].diff(m,nEquation);
+            }
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                qright[m] = qleft[m];
+            }
+
+            qright[IU] = - qleft[IU] + two * faceVelocityX[iFace];
+            qright[IV] = - qleft[IV] + two * faceVelocityY[iFace];
+            qright[IW] = - qleft[IW] + two * faceVelocityZ[iFace];
+
+
+            ADReal tL = (1.0 / coefficientofstateEquation) * qleft[IP] / qleft[IR];
+
+            //! Pressure keep the same on the wall normal direction.
+            pGhost = qleft[IP];
+
+            if (wallTempArrayExist)
+            {
+                wallTemperature = wallTempArray[countFace] / refDimensionalTemperature;
+                countFace ++;
+            }
+
+            //! Extrapolate temperature from inside to outside.
+            tGhost = two * wallTemperature - tL;
+            if (tGhost <= 0.0) tGhost = wallTemperature;
+
+            //! Then compute the density from the extrapolated temperature.
+            rGhost = pGhost / (coefficientofstateEquation * tGhost * molecularWeight);
+
+            qright[IR] = rGhost;
+            qright[IP] = pGhost;
+
+            int idx = (re - nTotalCells)*nEquation;
+
+            for(int m = 0; m < nEquation; m++)
+            {
+                q[m][re] = qright[m].val();
+                for(int n = 0; n < nEquation; n++)
+                {
+                    dDdP[m][idx+n] = qright[m].dx(n);
+                }
+            }
+        }
+
+        delete [] qleft;    qleft = nullptr;
+        delete [] qright;    qright = nullptr;
+#endif
+    }
+}
+
+void NSSolverUnstruct::ViscousAdiabaticWallBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme"); 
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    int nTotalCell         = grid->GetNTotalCell();
+    RDouble *faceVelocityX = grid->GetFaceVelocityX();
+    RDouble *faceVelocityY = grid->GetFaceVelocityY();
+    RDouble *faceVelocityZ = grid->GetFaceVelocityZ();
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble **t   = reinterpret_cast< RDouble ** > (grid->GetDataPtr("t"));
+    RDouble **dDdP = reinterpret_cast <RDouble**> (grid->GetDataPtr("dDdP"));
+
+    //! Get the number of equations.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nLaminar  = parameters->GetLaminarNumber();
+    int nChemical = parameters->GetChemicalFlag();
+    int nTemperatureModel = parameters->GetTemperatureModel();
+
+    int nEquation = GetNumberOfEquations();
+
+    Data_Param *bcData = bcRegionUnstruct->GetBCParamDataBase();
+
+    RDouble uWall = 0.0;
+    RDouble vWall = 0.0;
+    RDouble wWall = 0.0;
+
+    if(bcData)
+    {
+        if (bcData->IsExist("uWall", PHDOUBLE, 1))
+        {
+            bcData->GetData("uWall", &uWall, PHDOUBLE, 1);
+            bcData->GetData("vWall", &vWall, PHDOUBLE, 1);
+            bcData->GetData("wWall", &wWall, PHDOUBLE, 1);
+        }
+    }    
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+
+    int iFace, le, re;
+    //! Get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+    RDouble molecularWeight = one;
+    using namespace GAS_SPACE;
+    int nDensityForWallMethod = gas->GetnDensityForWallMethod();
+    RDouble coefficientofstateEquation = gas->GetCoefficientOfStateEquation();
+    RDouble rGhost = 0.0, pGhost = 0.0, tGhost = 0.0;
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+
+    RDouble refGama = parameters->GetRefGama();
+    RDouble gama1 = refGama - 1;
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble coefficientOfStateEquation = 1.0 / (refGama * refMachNumber * refMachNumber);
+
+    if (tscheme != GMRES)
+    {
+        RDouble *qL = nullptr;
+        if (nChemical == 1)
+        {
+            qL = new RDouble [nEquation];
+        }
+
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            iFace = *iter;
+            le = leftCellofFace[iFace];
+            re = rightCellofFace[iFace];
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                q[m][re] = q[m][le];
+            }
+
+            RDouble velocityXWall = uWall;
+            RDouble velocityYWall = vWall;
+            RDouble velocityZWall = wWall;
+            if (isUnsteady && isAle)
+            {
+                velocityXWall = faceVelocityX[iFace] + uWall;
+                velocityYWall = faceVelocityY[iFace] + vWall;
+                velocityZWall = faceVelocityZ[iFace] + wWall;
+            }
+
+            //! set wall velocity for translating frame and rotating frame.
+            if (referenceFrame == TRANSLATIONAL_FRAME || referenceFrame == ROTATIONAL_FRAME)
+            {
+                int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+
+                string shroud[100];
+                GlobalDataBase::GetData("shroud", &shroud, PHSTRING, nTurboZone);
+
+                velocityXWall = faceVelocityX[iFace];
+                velocityYWall = faceVelocityY[iFace];
+                velocityZWall = faceVelocityZ[iFace];
+
+                //! Parallel
+                int iTurboZone = grid->GetOrdinaryGridIndex();
+                //! Serial
+                if (iTurboZone == -1)
+                {
+                    iTurboZone = grid->GetZoneID();
+                }
+
+                if (bcRegionUnstruct->GetBCName() == shroud[iTurboZone])
+                {
+                    velocityXWall = 0;
+                    velocityYWall = 0;
+                    velocityZWall = 0;
+                }
+            }
+
+            q[IU][re] = - q[IU][le] + two * velocityXWall;
+            q[IV][re] = - q[IV][le] + two * velocityYWall;
+            q[IW][re] = - q[IW][le] + two * velocityZWall;
+
+            if (nChemical == 1)
+            {
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    qL[m] = q[m][le];
+                }
+                molecularWeight = gas->ComputeMolecularWeightReciprocal(qL);
+
+                tGhost = t[ITT][le];
+                pGhost = q[IP][le];
+                //! Then compute the density from the extrapolated temperature.
+                rGhost = pGhost / (coefficientofstateEquation * tGhost * molecularWeight);
+                if (nDensityForWallMethod == 0)
+                {
+                    rGhost = MAX(0.5 * rGhost,2.0 * rGhost - q[IR][le]);
+                }
+                q[IR][re] = rGhost;
+                q[IU][re] = - q[IU][le];
+                q[IV][re] = - q[IV][le];
+                q[IW][re] = - q[IW][le];
+                q[IP][re] = pGhost;
+            }
+        }
+
+        if (nChemical == 1)
+        {
+            delete [] qL;    qL = nullptr;
+        }
+
+    }
+    else
+    {
+#ifdef USE_GMRESSOLVER
+        ADReal *qL = new ADReal[nEquation]();
+        ADReal *qR = new ADReal[nEquation]();
+
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            iFace = *iter;
+            le = leftCellofFace[iFace];
+            re = rightCellofFace[iFace];
+
+            //! init for q[m][le] and define the independent variabels
+            for (int m = 0; m < nEquation; m++)
+            {
+                qL[m] = q[m][le];
+                qL[m].diff(m, nEquation);
+            }
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                qR[m] = qL[m];
+            }
+
+            ADReal velocityXWall = uWall;
+            ADReal velocityYWall = vWall;
+            ADReal velocityZWall = wWall;
+            if (isUnsteady && isAle)
+            {
+                velocityXWall = faceVelocityX[iFace] + uWall;
+                velocityYWall = faceVelocityY[iFace] + vWall;
+                velocityZWall = faceVelocityZ[iFace] + wWall;
+            }
+
+            qR[IU] = - qL[IU] + two * velocityXWall;
+            qR[IV] = - qL[IV] + two * velocityYWall;
+            qR[IW] = - qL[IW] + two * velocityZWall;
+
+            //! assign to qr and dqr/dql
+            int idx = (re - nTotalCell) * nEquation;
+            for (int m = 0; m < nEquation; m++)
+            {
+                q[m][re] = qR[m].val();
+                for (int n = 0; n < nEquation; ++n)
+                {
+                    dDdP[m][idx + n] = qR[m].dx(n);
+                }
+            }
+        }
+
+        delete [] qL;    qL = nullptr;
+        delete [] qR;    qR = nullptr;
+#endif
+    }
+}
+
+void NSSolverUnstruct::FarfieldBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme"); 
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    int nTotalCell       = grid->GetNTotalCell();
+    RDouble *xfn         = grid->GetFaceNormalX();
+    RDouble *yfn         = grid->GetFaceNormalY();
+    RDouble *zfn         = grid->GetFaceNormalZ();
+    RDouble *vgn         = grid->GetFaceNormalVelocity();
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble *gama = reinterpret_cast< RDouble *  > (grid->GetDataPtr("gama"));
+    RDouble **dDdP = reinterpret_cast <RDouble**> (grid->GetDataPtr("dDdP"));
+
+    //! Get the number of equations.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int nm       = parameters->GetNSEquationNumber();
+    int nLaminar = parameters->GetLaminarNumber();
+
+    RDouble refGama = parameters->GetRefGama();
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+
+    RDouble *preconCoefficient = nullptr;
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        preconCoefficient = reinterpret_cast<RDouble *> (grid->GetDataPtr("preconCoefficient"));
+    }
+
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *primitiveVarFarfield = new RDouble [nEquation];
+    Data_Param *bcData = bcRegionUnstruct->GetBCParamDataBase();
+    bcData->GetData("primitiveVarFarfield", primitiveVarFarfield, PHDOUBLE, nEquation);
+
+    int iFace, le, re;
+    //! get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+    RDouble rInside, uInside, vInside, wInside, pInside, cInside, vNormalInside, vNormalOutside;
+    RDouble gamm1, velocityInside;
+    RDouble vTangentX, vTangentY, vTangentZ, entropyS;
+    RDouble R_Minus, R_Plus;
+    RDouble rBC, uBC, vBC, wBC, pBC, vNormalBC, cBC;
+
+    //! Infinite variables.
+    RDouble rOutside = primitiveVarFarfield[IR];
+    RDouble uOutside = primitiveVarFarfield[IU];
+    RDouble vOutside = primitiveVarFarfield[IV];
+    RDouble wOutside = primitiveVarFarfield[IW];
+    RDouble pOutside = primitiveVarFarfield[IP];
+    RDouble cOutside = sqrt(ABS(refGama * pOutside / rOutside));
+
+    if (tscheme != GMRES)
+    {
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            iFace = *iter;
+            le = leftCellofFace[iFace];
+            re = rightCellofFace[iFace];
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                q[m][re] = q[m][le];
+            }
+
+            //! Inner point variables.
+            rInside = q[IR][le];
+            uInside = q[IU][le];
+            vInside = q[IV][le];
+            wInside = q[IW][le];
+            pInside = q[IP][le];
+
+            vNormalOutside = xfn[iFace] * uOutside + yfn[iFace] * vOutside + zfn[iFace] * wOutside - vgn[iFace];
+            vNormalInside  = xfn[iFace] * uInside  + yfn[iFace] * vInside  + zfn[iFace] * wInside  - vgn[iFace];
+
+            cInside = sqrt(ABS(gama[le] * pInside / rInside));
+            gamm1   = gama[le] - one;
+
+            velocityInside = sqrt(uInside * uInside + vInside * vInside + wInside * wInside);
+
+            //! Supersonic.
+            if (velocityInside > cInside)
+            {
+                if (vNormalInside >= 0.0)
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        q[m][re] = q[m][le];
+                    }
+                }
+                else
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        q[m][re] = primitiveVarFarfield[m];
+                    }
+                }
+            }
+            else
+            {
+                //! Subsonic.
+                if(ifLowSpeedPrecon == 0)
+                {
+                    R_Plus  = vNormalInside + 2.0 * cInside / gamm1;
+                    R_Minus = vNormalOutside - 2.0 * cOutside / gamm1;
+                    vNormalBC =  half * (R_Plus + R_Minus);
+                    cBC =  0.25 * (R_Plus - R_Minus) * gamm1;
+                    if (vNormalBC >= 0.0)
+                    {
+                        entropyS = pInside / pow(rInside, gama[le]);
+                        vTangentX  = uInside - xfn[iFace] * vNormalInside;
+                        vTangentY  = vInside - yfn[iFace] * vNormalInside;
+                        vTangentZ  = wInside - zfn[iFace] * vNormalInside;
+                    }
+                    else
+                    {
+                        //! Inlet.
+                        entropyS = pOutside / pow(rOutside, gama[le]);
+                        vTangentX  = uOutside - xfn[iFace] * vNormalOutside;
+                        vTangentY  = vOutside - yfn[iFace] * vNormalOutside;
+                        vTangentZ  = wOutside - zfn[iFace] * vNormalOutside;
+                    }
+
+                    rBC = pow((cBC * cBC / (entropyS * gama[le])), one / gamm1);
+                    uBC = vTangentX + xfn[iFace] * vNormalBC;
+                    vBC = vTangentY + yfn[iFace] * vNormalBC;
+                    wBC = vTangentZ + zfn[iFace] * vNormalBC;
+                    pBC = cBC * cBC * rBC / gama[le];
+
+                    q[IR][re] = rBC;
+                    q[IU][re] = uBC;
+                    q[IV][re] = vBC;
+                    q[IW][re] = wBC;
+                    q[IP][re] = pBC;
+
+                    for (int m = nLaminar; m < nEquation; ++m)
+                    {
+                        q[m][re] = q[m][le];
+                    }
+                }
+                else
+                {
+                    int preconFarfieldBCMethod = parameters->GetPreconFarFieldBCMethod();
+
+                    if (preconFarfieldBCMethod == 0)
+                    {
+                        RDouble preconCoeff, B0, A0, cPrecondition;
+
+                        preconCoeff = preconCoefficient[le];
+                        cPrecondition = half * sqrt(((preconCoeff - 1) * vNormalInside) * ((preconCoeff - 1) * vNormalInside) + 4 * preconCoeff * cInside * cInside);
+
+                        A0 = 2.0 * cInside/((-preconCoeff * vNormalInside * 0.5) + cPrecondition + 0.5 * vNormalInside) / gamm1;
+                        B0 = 2.0 * cInside/((-preconCoeff * vNormalInside * 0.5) - cPrecondition + 0.5 * vNormalInside) / gamm1;
+                        R_Plus = A0 * cInside + vNormalInside;
+                        R_Minus = B0 * cOutside + vNormalOutside;
+                        cBC  = (R_Plus - R_Minus) / (A0 - B0);
+                        vNormalBC = R_Plus - A0 * cBC;
+
+                        if (vNormalBC >= 0.0)
+                        {
+                            entropyS = pInside / pow(rInside, gama[le]);
+                            vTangentX  = uInside - xfn[iFace] * vNormalInside;
+                            vTangentY  = vInside - yfn[iFace] * vNormalInside;
+                            vTangentZ  = wInside - zfn[iFace] * vNormalInside;
+                        }
+                        else
+                        {
+                            //! Inlet.
+                            entropyS = pOutside / pow(rOutside, gama[le]);
+                            vTangentX  = uOutside - xfn[iFace] * vNormalOutside;
+                            vTangentY  = vOutside - yfn[iFace] * vNormalOutside;
+                            vTangentZ  = wOutside - zfn[iFace] * vNormalOutside;
+                        }
+
+                        rBC = pow((cBC * cBC / (entropyS * gama[le])), one / gamm1);
+                        uBC = vTangentX + xfn[iFace] * vNormalBC;
+                        vBC = vTangentY + yfn[iFace] * vNormalBC;
+                        wBC = vTangentZ + zfn[iFace] * vNormalBC;
+                        pBC = cBC * cBC * rBC / gama[le];
+
+                        q[IR][re] = rBC;
+                        q[IU][re] = uBC;
+                        q[IV][re] = vBC;
+                        q[IW][re] = wBC;
+                        q[IP][re] = pBC;
+                    }
+                    else if (preconFarfieldBCMethod == 1)
+                    {
+                        R_Plus  = vNormalInside + 2.0 * cInside / gamm1;
+                        R_Minus = vNormalOutside - 2.0 * cOutside / gamm1;
+                        vNormalBC =  half * (R_Plus + R_Minus);
+
+                        if (vNormalBC >= 0.0)
+                        {
+                            q[IR][re] = rInside;
+                            q[IU][re] = uInside;
+                            q[IV][re] = vInside;
+                            q[IW][re] = wInside;
+                            q[IP][re] = pOutside;
+                        }
+                        else
+                        {
+                            //! Inlet.
+                            q[IR][re] = rOutside;
+                            q[IU][re] = uOutside;
+                            q[IV][re] = vOutside;
+                            q[IW][re] = wOutside;
+                            q[IP][re] = pInside;
+                        }
+                    }
+                }
+                for (int m = nm; m < nEquation; ++ m)
+                {
+                    q[m][re] = q[m][le];
+                }
+            }
+        }
+    }
+    else
+    {
+#ifdef USE_GMRESSOLVER
+    using namespace GAS_SPACE;
+
+    ADReal *qL = new ADReal[nEquation]();
+    ADReal *qR = new ADReal[nEquation]();
+
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        iFace = *iter;
+        le = leftCellofFace[iFace];
+        re = rightCellofFace[iFace];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            qL[m] = q[m][le];
+            qL[m].diff(m, nEquation);
+        }
+        Cal_GMRES_FarfieldBCRegion(qL, qR, le, iFace, gridIn, bcRegionUnstruct);
+
+        int idx = (re - nTotalCell) * nEquation;
+        for (int m = 0; m < nEquation; ++m)
+        {
+            q[m][re] = qR[m].val();
+            for (int n = 0; n < nEquation; ++n)
+            {
+                dDdP[m][idx + n] = qR[m].dx(n);
+            }
+        }
+    }
+    delete [] qL;    qL = nullptr;
+    delete [] qR;    qR = nullptr;
+#endif
+    }
+    delete [] primitiveVarFarfield;     primitiveVarFarfield = nullptr;
+}
+
+void NSSolverUnstruct::InflowBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+
+    //! Get the number of equations.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *primitiveVarFarfield = new RDouble [nEquation];
+    Data_Param *bcData = bcRegionUnstruct->GetBCParamDataBase();
+    bcData->GetData("primitiveVarFarfield", primitiveVarFarfield, PHDOUBLE, nEquation);
+
+    int directionMethod = 0;
+    if (bcData->IsExist("directionMethod", PHINT, 1))
+    {
+        bcData->GetData("directionMethod", &directionMethod, PHINT, 1);
+    }
+
+    RDouble localNonDimVelocity = 0.0;
+    if (directionMethod == 2)
+    {
+        RDouble refDimensionalVelocity = parameters->GetReferenceDimensionalVelocity();
+        RDouble localDimensionalVelocity;
+        bcData->GetData("refDimensionalVelocity", &localDimensionalVelocity, PHINT, 1);
+        localNonDimVelocity = localDimensionalVelocity / refDimensionalVelocity;
+    }
+
+    int iFace, re;
+    //! get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        iFace = *iter;
+        re = rightCellofFace[iFace];
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q[m][re] = primitiveVarFarfield[m];
+        }
+        if (directionMethod == 2)
+        {
+            q[IU][re] = -1.0 * localNonDimVelocity * xfn[iFace];
+            q[IV][re] = -1.0 * localNonDimVelocity * yfn[iFace];
+            q[IW][re] = -1.0 * localNonDimVelocity * zfn[iFace];
+        }
+    }
+
+    delete [] primitiveVarFarfield;    primitiveVarFarfield = nullptr;
+}
+
+void NSSolverUnstruct::PressureOutletBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    RDouble *gama = reinterpret_cast< RDouble * > (grid->GetDataPtr("gama"));
+
+    //! Get the number of equations.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    Data_Param *bcData = bcRegionUnstruct->GetBCParamDataBase();
+
+    RDouble staticPressure;
+    bcData->GetData("staticPressure", &staticPressure, PHDOUBLE, 1);
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+
+    //! rotating frame, will move to other place next step.
+    int periodicType = PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType");
+
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+
+    RDouble *faceVelocityX = grid->GetFaceVelocityX();
+    RDouble *faceVelocityY = grid->GetFaceVelocityY();
+    RDouble *faceVelocityZ = grid->GetFaceVelocityZ();
+
+    //! Dimensional.
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble velocity = refMachNumber * refDimensionalSonicSpeed;
+    RDouble dynamic_pressure = refDimensionalDensity * velocity * velocity;
+
+    staticPressure /= dynamic_pressure;
+
+    int iFace, le, re;
+    //! get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        iFace = *iter;
+        le = leftCellofFace[iFace];
+        re = rightCellofFace[iFace];
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q[m][re] = q[m][le];
+        }
+        q[IP][re] = staticPressure;
+    }
+}
+
+void NSSolverUnstruct::MassFlowOutletBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    using namespace IDX;
+    //! Dimensional.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();  
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refGama = parameters->GetRefGama();
+
+    int nEquation = GetNumberOfEquations();
+
+    Data_Param *bcData = bcRegionUnstruct->GetBCParamDataBase();
+    RDouble massFluxRatio, massFlow, BCTotalArea;
+    bcData->GetData("massFluxRatio", &massFluxRatio, PHDOUBLE, 1);
+    bcData->GetData("massFlow", &massFlow, PHDOUBLE, 1);
+    bcData->GetData("BCTotalArea", &BCTotalArea, PHDOUBLE, 1);
+
+    //! Nondimensionalization.
+    RDouble coefficientOfStateEquation = 1.0/(refGama * refMachNumber * refMachNumber);
+
+    //! fluxDensity : rho * u;
+    RDouble fluxDensity = massFlow/(refDimensionalDensity * refDimensionalDensity * refMachNumber)/BCTotalArea;
+
+    RDouble mfTbCoeff = 0.5 * (refGama - 1.0) / refGama / coefficientOfStateEquation * 
+        (1.0 - massFluxRatio * massFluxRatio);
+
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+    
+    //! get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+    int iFace, le, re;
+
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        iFace = *iter;
+        le = leftCellofFace[iFace];
+        re = rightCellofFace[iFace];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q[m][re] = q[m][le];
+        }
+
+        //! calculate the temperature of the inside cell.
+        RDouble staticTemperature = q[IP][le] / q[IR][le] / coefficientOfStateEquation;
+        RDouble tb   = staticTemperature + mfTbCoeff * (q[IU][le] * q[IU][le] +
+            q[IV][le] * q[IV][le] + q[IW][le] * q[IW][le]);
+
+        if(tb < TINY) 
+        {
+            tb = staticTemperature;
+        }
+
+        RDouble pb = q[IP][le] * pow(tb / staticTemperature, refGama / (refGama - 1.0));
+        RDouble rb = pb / tb / coefficientOfStateEquation;
+
+        RDouble ub = q[IU][le] * massFluxRatio;
+        RDouble vb = q[IV][le] * massFluxRatio;
+        RDouble wb = q[IW][le] * massFluxRatio;
+
+        //! judge the unusual situation, Vn < 0.
+        RDouble Vn  = ub * xfn[iFace] + vb * yfn[iFace] + wb * zfn[iFace];        
+        if(Vn < 0.0)
+        {
+            Vn = fluxDensity / rb;
+            ub = Vn * xfn[iFace];
+            vb = Vn * yfn[iFace];
+            wb = Vn * zfn[iFace];
+        } 
+
+        //! if the outlet is supersonic flow.
+        RDouble cb = sqrt(refGama * coefficientOfStateEquation * tb);
+        if(Vn >= cb)
+        {
+            rb = q[IR][le];
+            ub = q[IU][le];
+            vb = q[IV][le];
+            wb = q[IW][le];
+            pb = q[IP][le];
+        }
+
+        //! allocate value to the ghost cell.
+        q[IR][re] = rb;
+        q[IU][re] = ub;
+        q[IV][re] = vb;
+        q[IW][re] = wb;
+        q[IP][re] = pb;
+    }
+}
+
+void NSSolverUnstruct::calculateBCArea(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    Data_Param *bcData = bcRegionUnstruct->GetBCParamDataBase();
+
+    //BC total area does not change with calculating, so it only calculates once.
+    if (bcData->IsExist("BCTotalArea", PHDOUBLE, 1))
+    {
+        return;
+    }
+
+    using namespace PHMPI;
+    string bcName = bcRegionUnstruct->GetBCName();
+    RDouble BCTotalArea = 0.0;
+
+    //! One processor may owe some zones, so calculate all BC area in one processor.
+    int nLocalZones = GetNumberofLocalZones();
+    for (int iZone = 0; iZone < nLocalZones; iZone++)
+    {
+        int iZoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+        Grid * iGrid = PHSPACE::GetGrid(iZoneID);
+        UnstructGrid *grid = UnstructGridCast(iGrid);      
+        
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int nBCRegion = unstructBCSet->GetnBCRegion();
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+            string jBCName = bcRegion->GetBCName();
+
+            //! Judge the same BC region according the BC name.
+            if (jBCName == bcName)
+            {
+                int iFace;
+                vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                RDouble   *area    = grid->GetFaceArea();
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    iFace = *iter;
+                    BCTotalArea += area[iFace];
+                }
+            }
+        }
+    }
+
+    //! Get the total area in all processors with the same BC name.
+    RDouble GLB_BCTotalArea;
+    PH_AllReduce(&BCTotalArea, &GLB_BCTotalArea, 1, MPI_SUM);
+    BCTotalArea = GLB_BCTotalArea;
+
+    for (int iZone = 0; iZone < nLocalZones; iZone++)
+    {
+        int iZoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+        Grid * iGrid = PHSPACE::GetGrid(iZoneID);
+        UnstructGrid *grid = UnstructGridCast(iGrid); 
+
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int nBCRegion = unstructBCSet->GetnBCRegion();
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+            string jBCName = bcRegion->GetBCName();
+
+            if (jBCName == bcName)
+            {
+                Data_Param *bcDataTmp = bcRegion->GetBCParamDataBase();
+                bcDataTmp->UpdateData("BCTotalArea", &BCTotalArea, PHDOUBLE, 1);
+            }
+        }                       
+    }   
+}
+
+void NSSolverUnstruct::CalculateMassFluxRatio()
+{
+    vector<SimpleBC*>* globalBCList = GlobalBoundaryCondition::GetGlobalBoundaryConditionList();
+    if (globalBCList == 0)
+    {
+        return;
+    }
+
+    for (int iBC = 0; iBC < globalBCList->size(); ++iBC)
+    {
+        SimpleBC *boundaryCondition = (*globalBCList)[iBC];
+        int bcType = boundaryCondition->GetBCType();
+
+        if (bcType == PHENGLEI::MASS_FLOW_OUTLET)
+        {
+            RDouble massFlux = 0.0;
+            string bcName = boundaryCondition->GetBCName();
+
+            int nLocalZones = PHMPI::GetNumberofLocalZones();
+            for (int iZone = 0; iZone < nLocalZones; iZone++)
+            {
+                int iZoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+                Grid *iGrid = PHSPACE::GetGrid(iZoneID);
+                UnstructGrid *grid = UnstructGridCast(iGrid);
+                RDouble **q = reinterpret_cast<RDouble**> (grid->GetDataPtr("q"));
+
+                UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+                int nBCRegion = unstructBCSet->GetnBCRegion();
+                for (int iBCRegion = 0; iBCRegion < nBCRegion; ++iBCRegion)
+                {
+                    UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+                    string jBCName = bcRegion->GetBCName();
+
+                    if (jBCName == bcName)
+                    {
+                        int iFace;
+                        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                        RDouble *area = grid->GetFaceArea();
+                        int *leftCellofFace = grid->GetLeftCellOfFace();
+                        RDouble *xfn = grid->GetFaceNormalX();
+                        RDouble *yfn = grid->GetFaceNormalY();
+                        RDouble *zfn = grid->GetFaceNormalZ();
+                        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                        {
+                            iFace = *iter;
+                            int le = leftCellofFace[iFace];
+
+                            RDouble vn_c1 = q[IU][le] * xfn[iFace] + q[IV][le] * yfn[iFace] + q[IW][le] * zfn[iFace];
+                            massFlux += q[IR][le] * vn_c1 * area[iFace];
+                        }
+                    }
+                }
+            }
+
+            RDouble GLB_MassFlux;
+            PH_AllReduce(&massFlux, &GLB_MassFlux, 1, MPI_SUM);
+
+            Param_NSSolverUnstruct *parameters = GetControlParameters();
+            RDouble refMachNumber = parameters->GetRefMachNumber();
+            RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+            RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+
+            RDouble gridScaleFactor = GlobalDataBase::GetDoubleParaFromDB("gridScaleFactor");
+
+            //! Calculte the dimensional mass flux in this BC name region.
+            GLB_MassFlux *= refDimensionalDensity * refDimensionalSonicSpeed * refMachNumber * gridScaleFactor * gridScaleFactor;
+
+            for (int iZone = 0; iZone < nLocalZones; iZone++)
+            {
+                int iZoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+                Grid *iGrid = PHSPACE::GetGrid(iZoneID);
+                UnstructGrid *grid = UnstructGridCast(iGrid);
+
+                UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+                int nBCRegion = unstructBCSet->GetnBCRegion();
+
+                for (int iBCRegion = 0; iBCRegion < nBCRegion; ++iBCRegion)
+                {
+                    UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+                    string jBCName = bcRegion->GetBCName();
+
+                    if (jBCName == bcName)
+                    {
+                        Data_Param *bcData = bcRegion->GetBCParamDataBase();
+                        RDouble massFlow = 0.0;
+                        bcData->GetData("massFlow", &massFlow, PHDOUBLE, 1);
+
+                        RDouble massFluxRatio = massFlow / (GLB_MassFlux + TINY);
+                        massFluxRatio = MAX(0.8, MIN(massFluxRatio, 1.2));
+
+                        bcData->UpdateData("massFluxRatio", &massFluxRatio, PHDOUBLE, 1);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void NSSolverUnstruct::MassFlowInletBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    //! get the basic mesh and flow field information.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+   
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+
+    RDouble **q = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+
+    //! Get the number of equations.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    RDouble *primitiveVarFarfield = parameters->GetPrimitiveVarFarfield();
+
+    int nEquation = GetNumberOfEquations();
+
+    int iFace = 0, le = 0, re = 0;
+    //! get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+    Data_Param *bcData = bcRegionUnstruct->GetBCParamDataBase();
+
+    //! Get the basic variables for mass flow in boundary.
+    RDouble direction_inlet[3] = {0.0}, massFlow = 0.0, totalTemperature = 0.0;
+    bcData->GetData("massFlow", &massFlow, PHDOUBLE, 1);
+    bcData->GetData("totalTemperature", &totalTemperature, PHDOUBLE, 1);
+    bcData->GetData("direction_inlet", direction_inlet, PHDOUBLE, 3);
+
+    RDouble BCTotalArea = 0.0;
+    if (bcData->IsExist("BCTotalArea", PHDOUBLE, 1))
+    {
+        bcData->GetData("BCTotalArea", &BCTotalArea, PHDOUBLE, 1);
+    }else
+    {
+        TK_Exit::ExceptionExit("BCTotalArea data does not exist!\n");
+    }
+
+    massFlow /= BCTotalArea;
+
+    //! Dimensional.
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+
+    //! Nondimensionalization.
+    totalTemperature /= refDimensionalTemperature;
+    RDouble coefficientOfStateEquation = 1.0/(refGama * refMachNumber * refMachNumber);
+
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        iFace = *iter;
+        le = leftCellofFace[iFace];
+        re = rightCellofFace[iFace];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q[m][re] = primitiveVarFarfield[m];
+        }
+
+        q[IR][re]  = q[IR][le];
+        RDouble Vnb   = massFlow/ (refDimensionalDensity*refDimensionalSonicSpeed*refMachNumber) / q[IR][le];  //ע�⣺�˴�massFlowΪ��λ�������
+
+        q[IU][re] = Vnb * direction_inlet[0];
+        q[IV][re] = Vnb * direction_inlet[1];
+        q[IW][re] = Vnb * direction_inlet[2];
+
+        //! square of the stagnation sound speed.
+        RDouble c2   = refGama * coefficientOfStateEquation * totalTemperature; 
+        //! square of the critical sound speed.
+        RDouble c2_ct = 2.0 * c2 / (refGama+1.0); 
+        //! square of the Laval number.
+        RDouble lamd2 = Vnb * Vnb / c2_ct;
+        RDouble tb    = totalTemperature * (1.0 - (refGama - 1.0)/(refGama + 1.0) * lamd2);
+        q[IP][re] = q[IR][le] * coefficientOfStateEquation * tb;
+    }
+}
+
+void NSSolverUnstruct::PressureInletBCRiemannRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    //! Get the basic variables for boundary calculating.
+    UnstructGrid *grid   = UnstructGridCast(gridIn);
+    int *leftCellofFace  = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble **q  = reinterpret_cast< RDouble ** > (grid->GetDataPtr("q"));
+
+    //! Get the number of equations.
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+
+    int nEquation = GetNumberOfEquations();
+
+    int iFace = 0, le = 0, re = 0;
+    //! get the face indexes of this boundary condition region.
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+    Data_Param *bcData = bcRegionUnstruct->GetBCParamDataBase();
+
+    RDouble direction_inlet[3], totalPressure, totalTemperature;
+    bcData->GetData("totalPressure", &totalPressure, PHDOUBLE, 1);
+    bcData->GetData("totalTemperature", &totalTemperature, PHDOUBLE, 1);
+    bcData->GetData("direction_inlet", direction_inlet, PHDOUBLE, 3);
+
+    RDouble *primitiveVarFarfield = new RDouble [nEquation];
+    bcData->GetData("primitiveVarFarfield", primitiveVarFarfield, PHDOUBLE, nEquation);
+
+    int directionMethod;
+    bcData->GetData("directionMethod", &directionMethod, PHINT, 1);
+
+    //! Dimensional.
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble velocity = refMachNumber * refDimensionalSonicSpeed;
+    RDouble dynamic_pressure = refDimensionalDensity * velocity * velocity;
+    RDouble refGama = parameters->GetRefGama();
+    RDouble gama1 = refGama - 1;
+
+    //! Nondimensionalization.
+    totalPressure /= dynamic_pressure;
+    totalTemperature /= refDimensionalTemperature;
+    RDouble coefficientOfStateEquation = 1.0/(refGama * refMachNumber * refMachNumber);
+
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        iFace = *iter;
+        le = leftCellofFace[iFace];
+        re = rightCellofFace[iFace];
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            q[m][re] = primitiveVarFarfield[m];
+        }
+
+        //! Get inner cell flow field information.
+        RDouble rInside = q[IR][le];
+        RDouble V2Inside = q[IU][le] * q[IU][le] + q[IV][le] * q[IV][le]  + q[IW][le] * q[IW][le];
+        RDouble pInside = q[IP][le];
+
+        //! Calculate the total energy, total enthalpy and sound speed.
+        RDouble totalEnergy = pInside / (rInside * gama1) + 0.5 * V2Inside;
+        RDouble totalEnthalpy = (refGama * coefficientOfStateEquation / gama1) * totalTemperature;
+        RDouble c2 = refGama * pInside / rInside;
+
+        //! Calculate the riemann invariants R+.
+        RDouble Riemann = 2.0 * sqrt(c2) / gama1;
+        Riemann += q[IU][le] * xfn[iFace] + q[IV][le] * yfn[iFace] + q[IW][le] * zfn[iFace];
+
+        RDouble theta = xfn[iFace] * direction_inlet[0] + yfn[iFace] * direction_inlet[1] + 
+            zfn[iFace] * direction_inlet[2];
+
+        RDouble totalc2 = gama1 * (totalEnthalpy - (totalEnergy + pInside / rInside)+0.5 * V2Inside) + c2;
+
+        RDouble a =  1.0 + 0.5 * gama1 * theta * theta;
+        RDouble b = -1.0 * gama1 * theta * Riemann;
+        RDouble c =  0.5 * gama1 * Riemann * Riemann - 2.0 * totalc2 / gama1;
+
+        RDouble d = b * b - 4.0 * a * c;
+        d = sqrt(max(zero, d));
+        RDouble Vin   = (-b + d)/(2.0*a);
+        Vin   = max(zero, Vin);
+        V2Inside = Vin * Vin;
+
+        c2 = totalc2 - 0.5 * gama1 * V2Inside;
+
+        //! Fix the mach number in case of mach > 1.0.
+        RDouble Mach2 = V2Inside / c2;
+        Mach2 = min(one, Mach2);
+        V2Inside = Mach2 * c2;
+        Vin = sqrt(V2Inside);
+        c2 = totalc2 - 0.5 * gama1 * V2Inside;
+
+        RDouble tInside = c2 / (refGama * coefficientOfStateEquation);
+        pInside = totalPressure * pow((tInside / totalTemperature), refGama / gama1);
+        rInside = pInside/(coefficientOfStateEquation * tInside);
+
+        q[IR][re] = rInside;
+        q[IU][re] = Vin * direction_inlet[0];
+        q[IV][re] = Vin * direction_inlet[1];
+        q[IW][re] = Vin * direction_inlet[2];
+        q[IP][re] = pInside;
+
+        if (directionMethod == 2)
+        {
+            q[IU][re] = -1.0 * Vin * xfn[iFace];
+            q[IV][re] = -1.0 * Vin * yfn[iFace];
+            q[IW][re] = -1.0 * Vin * zfn[iFace];
+        }
+    }
+
+    delete [] primitiveVarFarfield;    primitiveVarFarfield = nullptr;
+}
+
+void NSSolverUnstruct::SwapNeighborsDQNonblocking(Grid *gridIn, FieldProxy *dqProxy)
+{
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    vector< PH_Request > requestContainer;
+    vector< vector< DataContainer * > > receivedDataBuffer;
+    vector< vector< DataContainer * > > sendDataBuffer;
+    receivedDataBuffer.resize(nZones);
+    sendDataBuffer.resize(nZones);
+    int level = gridIn->GetLevel();
+
+    //! Step 0: Compressing data firstly.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+
+        ZoneNeighbor * globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+        if(currentProcessor == sendProcessor)
+        {
+            sendDataBuffer[iZone].resize(numberOfNeighbor);
+        }
+
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if(currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate and compress the buffers for sending.
+            DataContainer * sendBuffer = 0;
+            if(currentProcessor == sendProcessor)
+            {
+                sendBuffer = new DataContainer;
+                sendDataBuffer[ iZone ][iNeighbor] = sendBuffer;
+
+                //! Compress the send information into the actkey.
+                UnstructGrid * grid = UnstructGridCast(PHSPACE::GetGrid(iZone, level));
+                CompressDQ(sendBuffer, dqProxy, grid, iZone, neighborZone, 5);
+            }
+        }
+    }
+
+    //! Step 1: Communication.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor * globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        //! Communicating.
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int sendProcessor    = PHMPI::GetZoneProcessorID(iZone);
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if(currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate the buffers for sending and receiving.
+            DataContainer * receivedBuffer = 0;
+            DataContainer * sendBuffer = 0;
+            if(currentProcessor == receiveProcessor)
+            {
+                receivedBuffer = new DataContainer;
+                receivedDataBuffer[ iZone ].push_back(receivedBuffer);
+            }
+            if(currentProcessor == sendProcessor)
+            {
+                sendBuffer = sendDataBuffer[iZone][iNeighbor];
+            }
+
+            int tag = iZone;
+
+            //if (sendProcessor == receiveProcessor) continue;
+
+            //! Communication.
+            if (currentProcessor == sendProcessor)
+            {
+                if (sendProcessor != receiveProcessor)
+                {
+                    streamsize nlen = sendBuffer->size();
+
+                    //! Send the data to neighbors.
+                    send(sendBuffer, receiveProcessor, nlen, requestContainer, tag);
+                }
+            }
+            if (currentProcessor == receiveProcessor)
+            {
+                //! Get the neighbor order: which order that 'iZone' on neighbors of neighborZone.
+                int neighborOrer = -1;
+                ZoneNeighbor * globalNeighborZonesTemp = zoneConnectivity->GetZoneNeighbor(neighborZone);
+                std::size_t numberOfNeighborTemp = globalNeighborZonesTemp->GetNumberOfNeighbor();
+
+                for (std::size_t neighborID = 0; neighborID < numberOfNeighborTemp; ++ neighborID)
+                {
+                    int neighborZoneTemp = globalNeighborZonesTemp->GetZoneIndexOfNeighbor(neighborID);
+                    if(neighborZoneTemp == iZone)
+                    {
+                        neighborOrer = static_cast<int>(neighborID);
+                        break;
+                    }
+                }
+
+                ASSERT(neighborOrer != -1);
+
+                if (sendProcessor != receiveProcessor)
+                {
+                    //! The data length of the received data is same to the length that send to the neighbor.
+                    CharVecSizeType nlen = sendDataBuffer[neighborZone][neighborOrer]->size();
+
+                    //! Receive data from neighbors.
+                    receive(receivedBuffer, sendProcessor, nlen, requestContainer, tag);
+                }
+                else
+                {
+                    SWAP(receivedDataBuffer[ iZone ].back(), sendDataBuffer[iZone][iNeighbor]);
+                }
+            }
+        }
+    }
+
+    //! Step2: MPI waiting for Non-blocking communications.
+    if(PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_Wait(static_cast<int>(requestContainer.size()), &(requestContainer[0]));
+    }
+
+    //! Step3: Translate the data container.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor * globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        int count = 0;
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor == receiveProcessor)
+            {
+                DataContainer * receiveData = receivedDataBuffer[ iZone ][ count ];
+
+                //! Because get into here when currentProcessor==receiveProcessor,
+                //! so, use zoneGridSolver of neighborZone, this zone is on the current processor!
+
+                //! Decompress the interface data from data-container.
+                UnstructGrid * grid = UnstructGridCast(PHSPACE::GetGrid(neighborZone, level));
+                DecompressDQ(receiveData, dqProxy, grid, neighborZone, iZone, 5);
+
+                ++ count;
+            }
+        }
+    }
+
+    //! Step4: Free the buffers.
+    for (std::size_t iDim = 0; iDim < receivedDataBuffer.size(); ++ iDim)
+    {
+        for (std::size_t jDim = 0; jDim < receivedDataBuffer[ iDim ].size(); ++ jDim)
+        {
+            delete receivedDataBuffer[ iDim ][ jDim ];
+        }
+    }
+    receivedDataBuffer.clear();
+    for (std::size_t iDim = 0; iDim < sendDataBuffer.size(); ++ iDim)
+    {
+        for (std::size_t jDim = 0; jDim < sendDataBuffer[ iDim ].size(); ++ jDim)
+        {
+            delete sendDataBuffer[ iDim ][ jDim ];
+        }
+    }
+    sendDataBuffer.clear();
+    requestContainer.clear();
+}
+
+void NSSolverUnstruct::CompressGradientandLimitToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **limit2D = reinterpret_cast <RDouble **> (grid->GetDataPtr("limit2D"));
+
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = interfaceInformation->GetFaceIndexForSend(iNeighborZone);
+    dataContainer->moveto_begin();
+    
+    RDouble **dqdx = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **dqdy = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **dqdz = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    RDouble **dtdx  = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTemperatureX"));
+    RDouble **dtdy  = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTemperatureY"));
+    RDouble **dtdz  = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTemperatureZ"));
+    
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int sourceCell;
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+        grid->GetSourceIndex(iFace, 1, sourceCell);
+        for (int m = 0; m <= 4; ++ m)
+        {
+            PHWrite(dataContainer, dqdx[m][sourceCell]);
+            PHWrite(dataContainer, dqdy[m][sourceCell]);
+            PHWrite(dataContainer, dqdz[m][sourceCell]);
+        }
+
+        PHWrite(dataContainer, dtdx[0][sourceCell]);
+        PHWrite(dataContainer, dtdy[0][sourceCell]);
+        PHWrite(dataContainer, dtdz[0][sourceCell]);
+
+        
+        PHWrite(dataContainer, limit2D[0][sourceCell]);
+        PHWrite(dataContainer, limit2D[1][sourceCell]);
+        PHWrite(dataContainer, limit2D[2][sourceCell]);
+        PHWrite(dataContainer, limit2D[3][sourceCell]);
+        PHWrite(dataContainer, limit2D[4][sourceCell]);
+    }
+}
+
+void NSSolverUnstruct::DecompressGradientandLimitToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **limit2D = reinterpret_cast <RDouble **> (grid->GetDataPtr("limit2D"));
+
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = interfaceInformation->GetFaceIndexForRecv(iNeighborZone);
+    dataContainer->moveto_begin();
+    
+    RDouble **dqdx = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **dqdy = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **dqdz = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    RDouble **dtdx  = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTemperatureX"));
+    RDouble **dtdy  = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTemperatureY"));
+    RDouble **dtdz  = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTemperatureZ"));
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+        int targetCell;
+        grid->GetTargetIndex(iFace, 1, targetCell);
+        for (int m = 0; m <= 4; ++ m)
+        {
+            PHRead(dataContainer, dqdx[m][targetCell]);
+            PHRead(dataContainer, dqdy[m][targetCell]);
+            PHRead(dataContainer, dqdz[m][targetCell]);
+        }
+
+        PHRead(dataContainer, dtdx[0][targetCell]);
+        PHRead(dataContainer, dtdy[0][targetCell]);
+        PHRead(dataContainer, dtdz[0][targetCell]);
+
+        
+        PHRead(dataContainer, limit2D[0][targetCell]);
+        PHRead(dataContainer, limit2D[1][targetCell]);
+        PHRead(dataContainer, limit2D[2][targetCell]);
+        PHRead(dataContainer, limit2D[3][targetCell]);
+        PHRead(dataContainer, limit2D[4][targetCell]);
+    }
+}
+
+void NSSolverUnstruct::CompressQlQrToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = interfaceInformation->GetFaceIndexForSend(iNeighborZone);
+    int * interFace2BoundaryFace = interfaceInformation->GetInterFace2BoundaryFace();
+    dataContainer->moveto_begin();
+
+    RDouble **qL = InviscidfaceProxyOnlyForMixGrid->GetQL();
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+        int FaceID = interFace2BoundaryFace[iFace];
+        
+        for (int m = 0; m < 5; ++ m)
+        {
+            PHWrite(dataContainer, qL[m][FaceID]);
+        }
+    }
+}
+
+void NSSolverUnstruct::DecompressQlQrToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = interfaceInformation->GetFaceIndexForRecv(iNeighborZone);
+    int * interFace2BoundaryFace = interfaceInformation->GetInterFace2BoundaryFace();
+    dataContainer->moveto_begin();
+
+    RDouble **qR = InviscidfaceProxyOnlyForMixGrid->GetQR();
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+        int FaceID = interFace2BoundaryFace[iFace];
+        
+        for (int m = 0; m < 5; ++ m)
+        {
+            PHRead(dataContainer, qR[m][FaceID]);
+        }
+    }
+}
+
+void NSSolverUnstruct::CompressFacefluxToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    int gridtypeofcurrentZone = grid->Type();
+    int gridtypeofneighborZone = PHMPI::GetZoneGridType(neighborZoneIndex);
+    if(gridtypeofcurrentZone == gridtypeofneighborZone)
+    {
+        RDouble uploadData = 0.0;
+        dataContainer->moveto_begin();
+        PHWrite(dataContainer, uploadData);
+        return;
+    }
+
+    int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = interfaceInformation->GetFaceIndexForSend(iNeighborZone);
+    int * interFace2BoundaryFace = interfaceInformation->GetInterFace2BoundaryFace();
+    dataContainer->moveto_begin();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    if(viscousType <= INVISCID)
+    {
+        //! Euler
+        RDouble **Inviscidflux = InviscidfaceProxyOnlyForMixGrid->GetFlux();
+
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForSend[iLocalFace];
+            int FaceID = interFace2BoundaryFace[iFace];
+            
+            for (int m = 0; m < 5; ++ m)
+            {
+                PHWrite(dataContainer, Inviscidflux[m][FaceID]);
+            }
+        }
+    }
+    else
+    {
+        //! laminar
+        RDouble **Inviscidflux = InviscidfaceProxyOnlyForMixGrid->GetFlux();
+        RDouble **Viscousflux = ViscousfaceProxyOnlyForMixGrid->GetFlux();
+        
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForSend[iLocalFace];
+            int FaceID = interFace2BoundaryFace[iFace];
+            
+            for (int m = 0; m < 5; ++ m)
+            {
+                PHWrite(dataContainer, Inviscidflux[m][FaceID]);
+                PHWrite(dataContainer, Viscousflux[m][FaceID]);
+            }
+        }
+    }
+}
+
+void NSSolverUnstruct::DecompressFacefluxToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *gridIn, const int &neighborZoneIndex)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    int gridtypeofcurrentZone = grid->Type();
+    int gridtypeofneighborZone = PHMPI::GetZoneGridType(neighborZoneIndex);
+    if(gridtypeofcurrentZone == gridtypeofneighborZone)
+    {
+        RDouble downdData = 0.0;
+        dataContainer->moveto_begin();
+        PHRead(dataContainer, downdData);
+        return;
+    }
+
+    int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = interfaceInformation->GetFaceIndexForRecv(iNeighborZone);
+    int * interFace2BoundaryFace = interfaceInformation->GetInterFace2BoundaryFace();
+    dataContainer->moveto_begin();
+
+    Param_NSSolverUnstruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    RDouble coefofstrflux = GlobalDataBase::GetDoubleParaFromDB("coefofstrflux");
+    RDouble coefofunstrflux = 1.0 - coefofstrflux;
+
+    if(viscousType <= INVISCID)
+    {
+        //! Euler
+        RDouble **Inviscidflux = InviscidfaceProxyOnlyForMixGrid->GetFlux();
+
+        RDouble Inviscidflux_str[5] = {0.0};
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForReceive[iLocalFace];
+            int FaceID = interFace2BoundaryFace[iFace];
+            
+            for (int m = 0; m < 5; ++ m)
+            {
+                PHRead(dataContainer, Inviscidflux_str[m]);
+
+                Inviscidflux[m][FaceID] = (coefofstrflux * Inviscidflux_str[m] + coefofunstrflux * Inviscidflux[m][FaceID]);
+            }
+        }
+    }
+    else
+    {
+        //! laminar
+        RDouble **Inviscidflux = InviscidfaceProxyOnlyForMixGrid->GetFlux();
+        RDouble **Viscousflux = ViscousfaceProxyOnlyForMixGrid->GetFlux();
+
+        RDouble Inviscidflux_str[5];
+        RDouble Viscousflux_str[5];
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForReceive[iLocalFace];
+            int FaceID = interFace2BoundaryFace[iFace];
+            
+            for (int m = 0; m < 5; ++ m)
+            {
+                PHRead(dataContainer, Inviscidflux_str[m]);
+                PHRead(dataContainer, Viscousflux_str[m]);
+
+                Inviscidflux[m][FaceID] = (coefofstrflux * Inviscidflux_str[m] + coefofunstrflux * Inviscidflux[m][FaceID]);
+                Viscousflux[m][FaceID]  = (coefofstrflux * Viscousflux_str[m]  + coefofunstrflux * Viscousflux[m][FaceID]);
+            }
+        }
+    }
+}
+
+#ifdef USE_GMRESSOLVER
+//! GMRES solver -- a linear system solver
+void NSSolverUnstruct::GMRESSolverSingle(Grid *gridIn, FieldProxy *dqProxy)
+{
+    // GMRESCoupled
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    if ( viscousType == ONE_EQU )
+    {
+        return;
+}
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    //! Memory allocating
+    RDouble **dRdq = reinterpret_cast<RDouble**>(grid->GetDataPtr("dRdq"));
+    RDouble **dDdP = reinterpret_cast<RDouble**>(grid->GetDataPtr("dDdP"));
+
+    int nTotalCells = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nEquations = GetNumberOfEquations(); 
+        
+    RDouble **res = reinterpret_cast<RDouble **>(grid->GetDataPtr("res"));
+    RDouble* vol = grid->GetCellVolume();
+    RDouble* dt = reinterpret_cast<RDouble*> (grid->GetDataPtr("dt"));
+    vector<int> AI = grid->GetJacobianAI4GMRES();  // GMRESSparse GMRESCSR
+    vector<int> AJ = grid->GetJacobianAJ4GMRES();  // GMRESSparse GMRESCSR
+
+    // GMRESCSR
+    for (int iCell = 0; iCell < nTotalCells; iCell++)
+    {
+        vector<int>::iterator result = find(AJ.begin() + AI[iCell], AJ.begin() + AI[iCell + 1], iCell); // find qcell
+        int index = distance(AJ.begin(), result);
+        index *= nEquations;
+        for (int iEquation = 0; iEquation < nEquations; iEquation++)
+        {
+             dRdq[iEquation][index + iEquation] += 1.0 / dt[iCell];
+        }
+    }
+
+    // GMRESJac1st
+    vector<int> AI1st = grid->GetJacobianAI1st4GMRES(); 
+    vector<int> AJ1st = grid->GetJacobianAJ1st4GMRES();
+    RDouble **dRdq1st = reinterpret_cast<RDouble**>(grid->GetDataPtr("dRdq1st"));
+    int jacOrder    = grid->GetJacobianOrder();
+    if(jacOrder == 2)
+    {
+        for (int iCell = 0; iCell < nTotalCells; iCell++)
+        {
+            vector<int>::iterator result = find(AJ1st.begin() + AI1st[iCell], AJ1st.begin() + AI1st[iCell + 1], iCell); // find qcell
+            int index = distance(AJ1st.begin(), result);
+            index *= nEquations;
+            for (int iEquation = 0; iEquation < nEquations; iEquation++)
+            {
+                 dRdq1st[iEquation][index + iEquation] += 1.0 / dt[iCell];
+            }
+        }
+    }
+
+    //! Entry to PETSc for NS equations.
+    Vec x, b;
+    Mat A;
+    Mat A1st;                       // GMRESJac1st
+    KSP ksp;                        // define solver
+    PC pc;                          // define matrix
+    PetscInt nTotalSize;            // dimension size of matrix and vector
+    PetscInt nLevels = 3;           // define number of levels used by preconditioner ILU
+    PetscInt maxStepsRestart = 500;  // define maximum steps required by [restart]
+    PetscInt maxSteps = 500;        // define maximum steps
+    PetscReal rTolerance = 1.e-1;   // define tolerance of relative error // -1
+    PetscReal dropTolerance = 1.e5; // define tolerance of drop error
+
+    nTotalSize = nEquations * nTotalCells;
+
+    //! initialize PETSc
+    //! PetscFunctionBeginUser;
+    PetscInitialize(PETSC_NULL, PETSC_NULL, PETSC_NULL, PETSC_NULL);
+
+    //! create vectors;
+    VecCreate(PETSC_COMM_SELF, &x);
+    PetscObjectSetName((PetscObject)x, "solution");
+    VecSetSizes(x, PETSC_DECIDE, nTotalSize);
+    VecSetUp(x);
+    VecDuplicate(x, &b);
+
+    //! create matrix
+    //! GMRESCSR
+    PetscInt nnz[nTotalCells];
+    for (int iCell = 0; iCell < nTotalCells; iCell++)
+    {
+        int count = 0;
+        for (int j = AI[iCell]; j < AI[iCell + 1]; j++)
+        {
+            if(AJ[j] < nTotalCells)
+            {
+                count++;
+            }
+        }
+        nnz[iCell] = count;
+    }
+    MatCreate(PETSC_COMM_SELF, &A);
+    MatSetSizes(A, PETSC_DECIDE, PETSC_DECIDE, nTotalSize, nTotalSize);
+    MatSetType(A, MATBAIJ);
+    MatSetBlockSize(A, nEquations);
+    MatSeqBAIJSetPreallocation(A, nEquations, PETSC_DEFAULT, nnz);
+    MatSetUp(A);
+
+    //! GMRESJac1st
+    if( jacOrder == 2)
+    {
+        PetscInt nnz1st[nTotalCells];
+        for (int iCell = 0; iCell < nTotalCells; iCell++)
+        {
+            int count = 0;
+            for (int j = AI1st[iCell]; j < AI1st[iCell + 1]; j++)
+            {
+                if(AJ1st[j] < nTotalCells)
+                {
+                    count++;
+                }
+            }
+            nnz1st[iCell] = count;
+        }
+        MatCreate(PETSC_COMM_SELF, &A1st);
+        MatSetSizes(A1st, PETSC_DECIDE, PETSC_DECIDE, nTotalSize, nTotalSize);
+        MatSetType(A1st, MATBAIJ);
+        MatSetBlockSize(A1st, nEquations);
+        MatSeqBAIJSetPreallocation(A1st, nEquations, PETSC_DEFAULT, nnz1st);
+        MatSetUp(A1st);
+    }
+
+    //! improved approach to assemble matrix CSR
+    PetscInt petsccol[nEquations];
+    PetscInt petscrow;
+    int jmax = AI[nTotalCells];
+    int rcell = 0;
+    int j = AI[rcell];
+    do
+    {
+        int rowidx = rcell * nEquations;
+        for (j = AI[rcell]; j < AI[rcell + 1]; j++)
+        {
+            int qcell = AJ[j]; //! get qcell (colume index of matrix)
+            //! start to insert values: limited to dimension of nTotalSize
+            if(qcell < nTotalCells)
+            {
+                int colidx = qcell * nEquations;
+
+                for (int irow = 0; irow < nEquations; irow++)
+                {
+                    petscrow = rowidx + irow;
+                   
+                    for (int n = 0; n < nEquations; n++)
+                    {
+                        petsccol[n] = colidx + n;
+                    }
+                    MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdq[irow][j * nEquations], INSERT_VALUES);
+                }
+            }
+        }
+        rcell++; //! update rcell, go to the next row index of matrix
+    } while (j < jmax);
+    MatAssemblyBegin(A, MAT_FINAL_ASSEMBLY);
+    MatAssemblyEnd(A, MAT_FINAL_ASSEMBLY);
+
+    if(jacOrder == 2)
+    {
+        int jmax = AI1st[nTotalCells];
+        int rcell = 0;
+        int j = AI1st[rcell];
+        do
+        {
+            int rowidx = rcell * nEquations;
+            for (j = AI1st[rcell]; j < AI1st[rcell + 1]; j++)
+            {
+                int qcell = AJ1st[j]; //! get qcell (colume index of matrix)
+                //! start to insert values: limited to dimension of nTotalSize
+                if(qcell < nTotalCells)
+                {
+                    int colidx = qcell * nEquations;
+
+                    for (int irow = 0; irow < nEquations; irow++)
+                    {
+                        petscrow = rowidx + irow;
+                       
+                        for (int n = 0; n < nEquations; n++)
+                        {
+                            petsccol[n] = colidx + n;
+                        }
+                        MatSetValues(A1st, 1, &petscrow, nEquations, petsccol, &dRdq1st[irow][j * nEquations], INSERT_VALUES);
+                    }
+                }
+            }
+            rcell++; //! update rcell, go to the next row index of matrix
+        } while (j < jmax);
+        MatAssemblyBegin(A1st, MAT_FINAL_ASSEMBLY);
+        MatAssemblyEnd(A1st, MAT_FINAL_ASSEMBLY);
+    }
+
+    //! assemble vector
+    VecSet(b, zero);
+    for (PetscInt iCell = 0; iCell < nTotalCells; iCell++)
+    {
+        for (PetscInt iEquation = 0; iEquation < nEquations; iEquation++)
+        {
+            PetscInt isize = iCell * nEquations + iEquation;
+            VecSetValues(b, 1, &isize, &res[iEquation][iCell], ADD_VALUES);
+        }
+    }
+    VecAssemblyBegin(b);
+    VecAssemblyEnd(b);
+
+    //! define solver
+    KSPCreate(PETSC_COMM_SELF, &ksp);
+    KSPSetType(ksp, KSPGMRES);
+    if(jacOrder == 2)
+    {
+        KSPSetOperators(ksp, A, A1st);
+    }
+    else
+    {
+        KSPSetOperators(ksp, A, A);
+    }
+    KSPGetPC(ksp, &pc);
+    PCSetType(pc, PCILU);
+    KSPSetPCSide(ksp,PC_RIGHT);
+    PCFactorSetLevels(pc, nLevels);
+    KSPGMRESSetRestart(ksp, maxStepsRestart);
+    KSPGMRESSetOrthogonalization(ksp, KSPGMRESModifiedGramSchmidtOrthogonalization);
+    KSPSetTolerances(ksp, rTolerance, 1.e-20, dropTolerance, maxSteps);
+
+    //! solution
+    KSPSolve(ksp, b, x);
+
+    //! GMRESResidual
+    RDouble **dq = dqProxy->GetField_UNS();
+
+    //! convert x to dqProxy
+    for (PetscInt iCell = 0; iCell < nTotalCells; iCell++)
+    {
+        for (PetscInt iEquation = 0; iEquation < nEquations; iEquation++)
+        {
+            PetscInt isize = iCell * nEquations + iEquation;
+            PetscReal value;
+            VecGetValues(x, 1, &isize, &dq[iEquation][iCell]);
+        }
+    }
+
+    //! free work space
+    VecDestroy(&x);
+    VecDestroy(&b);
+    MatDestroy(&A);
+    if( jacOrder == 2)
+    {
+        MatDestroy(&A1st);
+    }
+    KSPDestroy(&ksp);
+    PetscFinalize();
+    return;
+}
+
+// GMRESParallel
+//! GMRES solver -- a linear system solver for parallel
+void NSSolverUnstruct::GMRESSolverRow(Grid *gridIn, FieldProxy *dqProxy)
+{
+    // GMRESCoupled
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    if ( viscousType == ONE_EQU )
+    {
+        return;
+    }
+    
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int globalCellIndexShift = grid->GetGlobalCellIndexShift();
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    //! Memory allocating
+    RDouble **dRdq = reinterpret_cast<RDouble**>(grid->GetDataPtr("dRdq"));
+    RDouble **dDdP = reinterpret_cast<RDouble**>(grid->GetDataPtr("dDdP"));
+
+    // RDouble **dRdqCoupledTerm = reinterpret_cast<RDouble**>(grid->GetDataPtr("dRdqCoupledTerm"));
+
+    int nTotalCells = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nEquations = GetNumberOfEquations(); 
+        
+    RDouble **res = reinterpret_cast<RDouble **>(grid->GetDataPtr("res"));
+    RDouble* vol = grid->GetCellVolume();
+    RDouble* dt = reinterpret_cast<RDouble*> (grid->GetDataPtr("dt"));
+    vector<int> AI = grid->GetJacobianAI4GMRES();  // GMRESSparse GMRESCSR
+    vector<int> AJ = grid->GetJacobianAJ4GMRES();  // GMRESSparse GMRESCSR
+    vector<int> AK = grid->GetJacobianAK4GMRES();  // GMRES Parallel
+
+    for (int iCell = 0; iCell < nTotalCells; iCell++)
+    {
+        vector<int>::iterator result = find(AJ.begin() + AI[iCell], AJ.begin() + AI[iCell + 1], iCell); // find qcell
+        int index = distance(AJ.begin(), result);
+        index *= nEquations;
+        for (int iEquation = 0; iEquation < nEquations; iEquation++){
+             dRdq[iEquation][index + iEquation] += 1.0 / dt[iCell];
+        }
+    }
+
+    // GMRESJac1st
+    vector<int> AI1st = grid->GetJacobianAI1st4GMRES(); 
+    vector<int> AJ1st = grid->GetJacobianAJ1st4GMRES();
+    RDouble **dRdq1st = reinterpret_cast<RDouble**>(grid->GetDataPtr("dRdq1st"));
+    int jacOrder    = grid->GetJacobianOrder();
+    if(jacOrder == 2)
+    {
+        for (int iCell = 0; iCell < nTotalCells; iCell++)
+        {
+            vector<int>::iterator result = find(AJ1st.begin() + AI1st[iCell], AJ1st.begin() + AI1st[iCell + 1], iCell); // find qcell
+            int index = distance(AJ1st.begin(), result);
+            index *= nEquations;
+            for (int iEquation = 0; iEquation < nEquations; iEquation++)
+            {
+                 dRdq1st[iEquation][index + iEquation] += 1.0 / dt[iCell];
+            }
+        }
+    }
+    //! entry to PETSc for NS equations
+    Vec x, b;
+    Mat A;
+    Mat APC;  // GMRES Parallel
+    KSP ksp;                        // define solver
+    PC pc;                          // define matrix
+    PetscInt nTotalSize;            // dimension size of matrix and vector
+    PetscInt nLevels = 3;           // define number of levels used by preconditioner ILU
+    PetscInt maxStepsRestart = 500; // define maximum steps required by [restart]
+    PetscInt maxSteps = 500;        // define maximum steps
+    PetscReal rTolerance = 1.e-6;   // define tolerance of relative error // -1
+    PetscReal dropTolerance = 1.e5; // define tolerance of drop error    
+    PetscMPIInt size;
+
+    int globalTotalCells;
+    globalTotalCells = (int)GlobalDataBase::GetDoubleParaFromDB("GlobalTotalCells");
+    int nInterfaceCells;
+    if (interfaceInfo != nullptr)
+    {
+        nInterfaceCells = interfaceInfo->GetNIFace();
+    }
+    nTotalSize = nEquations * globalTotalCells;
+
+    //! initialize PETSc
+    //! PetscFunctionBeginUser;
+    PetscInitialize(PETSC_NULL, PETSC_NULL, PETSC_NULL, PETSC_NULL);    
+    MPI_Comm_size(PETSC_COMM_WORLD, &size);
+
+    //! create vectors;
+    VecCreateMPI(PETSC_COMM_WORLD, nTotalCells * nEquations, nTotalSize, &x);
+    //! VecCreate(PETSC_COMM_WORLD, &x);
+    PetscObjectSetName((PetscObject)x, "solution");
+    //! VecSetSizes(x, nTotalCells * nEquations, nTotalSize);
+    VecSetUp(x);
+    VecDuplicate(x, &b);
+
+    //! create matrix
+    //! GMRESCSR
+    PetscInt d_nnz[nTotalCells];
+    PetscInt o_nnz[nTotalCells];
+    for (int iCell = 0; iCell < nTotalCells; iCell++)
+    {
+        int count = 0;
+        for (int j = AI[iCell]; j < AI[iCell + 1]; j++)
+        {
+            if(AJ[j] < nTotalCells)
+            {
+                count++;
+            }
+            
+        }
+        d_nnz[iCell] = count;
+        o_nnz[iCell] = AK[iCell];
+    }
+    PH_Barrier();
+    MatCreate(PETSC_COMM_WORLD, &A);
+    MatSetSizes(A, nTotalCells * nEquations, (nTotalCells) * nEquations, nTotalSize, nTotalSize);
+    MatSetType(A, MATMPIBAIJ);
+    MatSetBlockSize(A, nEquations);
+    MatMPIBAIJSetPreallocation(A, nEquations, PETSC_DEFAULT, d_nnz, PETSC_DEFAULT, o_nnz);
+    MatSeqBAIJSetPreallocation(A, nEquations, PETSC_DEFAULT, d_nnz);
+    PetscInt firstRow = globalTotalCells * nEquations;
+    PetscInt lastOneMoreRow = (globalTotalCells + nTotalCells) * nEquations;
+    MatGetOwnershipRange(A, &firstRow, &lastOneMoreRow);
+    MatSetUp(A);
+    MatZeroEntries(A);
+
+    MatCreate(PETSC_COMM_WORLD, &APC);
+    MatSetSizes(APC, nTotalCells * nEquations, (nTotalCells) * nEquations, nTotalSize, nTotalSize);
+    MatSetType(APC, MATMPIBAIJ);
+    MatSetBlockSize(APC, nEquations);
+
+    // GMRES Precond GMRESJac1st
+    if( jacOrder == 2)
+    {
+        PetscInt nnz1st[nTotalCells];
+        for (int iCell = 0; iCell < nTotalCells; iCell++)
+        {
+            int count = 0;
+            for (int j = AI1st[iCell]; j < AI1st[iCell + 1]; j++)
+            {
+                if(AJ1st[j] < nTotalCells)
+                {
+                    count++;
+                }
+            }
+            nnz1st[iCell] = count;
+        }
+
+        MatMPIBAIJSetPreallocation(APC, nEquations, PETSC_DEFAULT, nnz1st, 0, PETSC_NULL);
+    }
+    else 
+    {
+        MatMPIBAIJSetPreallocation(APC, nEquations, PETSC_DEFAULT, d_nnz, 0, PETSC_NULL);
+    }
+    MatGetOwnershipRange(APC, &firstRow, &lastOneMoreRow);
+    MatSetUp(APC);
+    MatZeroEntries(APC);
+
+    //! improved approach to assemble matrix CSR
+    PetscInt petsccol[nEquations];
+    PetscInt petscrow;
+    int jmax = AI[nTotalCells];
+    int rcell = 0;
+    int j = AI[rcell];
+   
+    //! consider the second order template for 2nd order Jacobian matrix for domain decomposition strategy
+    // BUG
+    if(interfaceInfo != nullptr)
+    {
+        vector<int> *neighborCells = grid->GMRESGetNeighborCells();
+        int *localInterfacePhysicalCellIndex;
+        localInterfacePhysicalCellIndex = interfaceInfo->GetLocalInterfacePhysicalCellIndex();
+        rcell = nTotalCells;
+        jmax  = AI[nTotalCells + nBoundFace];
+        j = AI[rcell];
+        do
+        {
+            int rowidx = interfaceInfo->MatchedGlobalNeighborCellIndex(rcell) * nEquations;
+            if (rowidx > 0) //! rcell is the ghost cell, rowidx > 0 means this cell locates on the interface boundary
+            {
+                int leftcell = interfaceInfo->MatchedLocalPhysicalCellIndex(rcell);
+                for (int index = 0; index < neighborCells[leftcell].size(); index++)
+                {
+                    int qcell = neighborCells[leftcell][index];
+                    if(qcell != rcell && qcell < nTotalCells)
+                    {
+                        printf("%d ", qcell + 1);
+                    }
+                }
+            }
+            rcell++;
+        }while(rcell < nTotalCells + nBoundFace);
+        printf("Finish writting\n");
+    }
+    PH_Barrier();
+    TK_Exit::ExceptionExit(">");
+
+
+    if(jacOrder == 2)
+    {
+        int jmax = AI1st[nTotalCells];
+        int rcell = 0;
+        int j = AI1st[rcell];
+        do
+        {
+            int rowidx = (rcell + globalCellIndexShift) * nEquations;
+            for (j = AI1st[rcell]; j < AI1st[rcell + 1]; j++)
+            {
+                int qcell = AJ1st[j]; //! get qcell (colume index of matrix)
+                //! start to insert values: limited to dimension of nTotalSize
+                if(qcell < nTotalCells)
+                {
+                    int colidx = (qcell + globalCellIndexShift) * nEquations;
+
+                    for (int irow = 0; irow < nEquations; irow++)
+                    {
+                        petscrow = rowidx + irow;
+                        for (int n = 0; n < nEquations; n++)
+                        {
+                            petsccol[n] = colidx + n;
+                        }
+                        MatSetValues(APC, 1, &petscrow, nEquations, petsccol, &dRdq1st[irow][j * nEquations], INSERT_VALUES);
+                    }
+                }
+            }
+            rcell++; //! update rcell, go to the next row index of matrix
+        } while (j < jmax);
+    }
+    else
+    {
+        int jmax = AI[nTotalCells];
+        int rcell = 0;
+        int j = AI[rcell];
+        do
+        {
+            int rowidx = (rcell + globalCellIndexShift) * nEquations;
+            int interfaceProcess = 0;
+            for (j = AI[rcell]; j < AI[rcell + 1]; j++)
+            {
+                int qcell = AJ[j]; //! get qcell (colume index of matrix)
+                //! start to insert values: limited to dimension of nTotalSize
+                if(qcell < nTotalCells)
+                {
+                    int colidx = (qcell + globalCellIndexShift) * nEquations;
+
+                    for (int irow = 0; irow < nEquations; irow++)
+                    {
+                        petscrow = rowidx + irow;
+                        for (int n = 0; n < nEquations; n++)
+                        {
+                            petsccol[n] = colidx + n;
+                        }
+                        MatSetValues(APC, 1, &petscrow, nEquations, petsccol, &dRdq[irow][j * nEquations], INSERT_VALUES);
+                    }
+                }
+            }
+            rcell++; //! update rcell, go to the next row index of matrix
+        } while (j < jmax);
+    }
+    MatAssemblyBegin(A, MAT_FINAL_ASSEMBLY);
+    MatAssemblyEnd(A, MAT_FINAL_ASSEMBLY);
+    MatAssemblyBegin(APC, MAT_FINAL_ASSEMBLY);
+    MatAssemblyEnd(APC, MAT_FINAL_ASSEMBLY);
+
+    //! assemble vector
+    VecSet(b, zero);
+    for (PetscInt iCell = 0; iCell < nTotalCells; iCell++)
+    {
+        for (PetscInt iEquation = 0; iEquation < nEquations; iEquation++)
+        {
+            PetscInt isize = (iCell + globalCellIndexShift) * nEquations + iEquation;
+            VecSetValues(b, 1, &isize, &res[iEquation][iCell], ADD_VALUES);
+        }
+    }
+    VecAssemblyBegin(b);
+    VecAssemblyEnd(b);
+
+    //! define solver
+    KSPCreate(PETSC_COMM_WORLD, &ksp);
+    KSPSetType(ksp, KSPGMRES);
+
+    KSPSetOperators(ksp, A, APC);
+
+    KSPSetPCSide(ksp, PC_RIGHT);
+    KSPSetUp(ksp);
+    KSPGetPC(ksp, &pc);
+    PCSetType(pc, PCBJACOBI);
+    //! set sub-ksp and sub-pc
+    KSP *subksp;
+    PC  subpc;
+    int localTotalSize = nTotalCells * nEquations;
+    PCBJacobiSetLocalBlocks(pc, 1, &localTotalSize);
+    int nLocal = 1;
+    int firstLocal = grid->GetZoneID();
+    PCBJacobiGetSubKSP(pc, &nLocal, &firstLocal, &subksp);
+    KSPGetPC(subksp[0], &subpc);
+    PCSetType(subpc, PCILU);
+    PCFactorSetLevels(subpc, nLevels);
+
+    KSPGMRESSetRestart(ksp, maxStepsRestart);
+    KSPGMRESSetOrthogonalization(ksp, KSPGMRESModifiedGramSchmidtOrthogonalization);
+    KSPSetTolerances(ksp, rTolerance, 1.e-20, dropTolerance, maxSteps);
+
+    //! solution
+    KSPSolve(ksp, b, x);
+
+    //! GMRESResidual
+    RDouble **dq = dqProxy->GetField_UNS();
+
+    // convert x to dqProxy
+    for (PetscInt iCell = 0; iCell < nTotalCells; iCell++)
+    {
+        for (PetscInt iEquation = 0; iEquation < nEquations; iEquation++)
+        {
+            PetscInt isize = (iCell + globalCellIndexShift) * nEquations + iEquation;
+            VecGetValues(x, 1, &isize, &dq[iEquation][iCell]);
+        }
+    }
+
+    //! free work space
+    VecDestroy(&x);
+    VecDestroy(&b);
+    MatDestroy(&A);
+    MatDestroy(&APC);
+    KSPDestroy(&ksp);
+    PetscFinalize();
+    return;
+}
+
+void NSSolverUnstruct::GMRESSolver(Grid *gridIn, FieldProxy *dqProxy)
+{
+    // GMRESCoupled
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    if (viscousType == ONE_EQU)
+    {
+        return;
+    }
+
+    UnstructGrid* grid = UnstructGridCast(gridIn);
+    int globalCellIndexShift = grid->GetGlobalCellIndexShift();
+    InterfaceInfo* interfaceInfo = grid->GetInterfaceInfo();
+
+    //! Memory allocating
+    RDouble** dRdq = reinterpret_cast<RDouble**>(grid->GetDataPtr("dRdq"));
+    RDouble** dDdP = reinterpret_cast<RDouble**>(grid->GetDataPtr("dDdP"));
+
+    int nTotalCells = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+    int nEquations = GetNumberOfEquations();
+
+    RDouble** res = reinterpret_cast<RDouble**>(grid->GetDataPtr("res"));
+    RDouble* vol = grid->GetCellVolume();
+    RDouble* dt = reinterpret_cast<RDouble*> (grid->GetDataPtr("dt"));
+
+    vector<int> AI = grid->GetJacobianAI4GMRES();  // GMRESSparse GMRESCSR
+    vector<int> AJ = grid->GetJacobianAJ4GMRES();  // GMRESSparse GMRESCSR
+    vector<int> AK = grid->GetJacobianAK4GMRES();  // GMRES Parallel
+
+    //! GMRESCSR
+    for (int iCell = 0; iCell < nTotalCells; iCell++)
+    {
+        vector<int>::iterator result = find(AJ.begin() + AI[iCell], AJ.begin() + AI[iCell + 1], iCell); // find qcell
+        int index = distance(AJ.begin(), result);
+        index *= nEquations;
+        for (int iEquation = 0; iEquation < nEquations; iEquation++)
+        {
+            dRdq[iEquation][index + iEquation] += 1.0 / dt[iCell];
+        }
+    }
+
+    //! GMRESJac1st
+    vector<int> AI1st = grid->GetJacobianAI1st4GMRES();
+    vector<int> AJ1st = grid->GetJacobianAJ1st4GMRES();
+    RDouble** dRdq1st = reinterpret_cast<RDouble**>(grid->GetDataPtr("dRdq1st"));
+    int jacOrder = grid->GetJacobianOrder();
+    if (jacOrder == 2)
+    {
+        for (int iCell = 0; iCell < nTotalCells; iCell++)
+        {
+            vector<int>::iterator result = find(AJ1st.begin() + AI1st[iCell], AJ1st.begin() + AI1st[iCell + 1], iCell); // find qcell
+            int index = distance(AJ1st.begin(), result);
+            index *= nEquations;
+            for (int iEquation = 0; iEquation < nEquations; iEquation++)
+            {
+                dRdq1st[iEquation][index + iEquation] += 1.0 / dt[iCell];
+            }
+        }
+    }
+
+    //! entry to PETSc solve Ax = b equation for NS equations.
+    Vec x, b;
+    Mat A;
+    Mat APC;                        // GMRES Parallel
+    KSP ksp;                        // define solver
+    PC pc;                          // define matrix
+    PetscInt nTotalSize;            // dimension size of matrix and vector
+    PetscInt nLevels = 3;           // define number of levels used by preconditioner ILU
+    PetscInt maxStepsRestart = 500;  // define maximum steps required by [restart]
+    PetscInt maxSteps = 500;        // define maximum steps
+    PetscReal rTolerance = 1.e-1;   // define tolerance of relative error // -1
+    PetscReal dropTolerance = 1.e5; // define tolerance of drop error    
+    PetscMPIInt size;
+
+    int globalTotalCells = (int)GlobalDataBase::GetDoubleParaFromDB("GlobalTotalCells");
+    int nInterfaceCells = 0;
+    if (interfaceInfo != nullptr)
+    {
+        nInterfaceCells = interfaceInfo->GetNIFace();
+    }
+    nTotalSize = nEquations * globalTotalCells;
+
+    //! initialize PETSc
+    PetscInitialize(PETSC_NULL, PETSC_NULL, PETSC_NULL, PETSC_NULL);
+    MPI_Comm_size(PETSC_COMM_WORLD, &size);
+
+    //! create vectors;
+    VecCreateMPI(PETSC_COMM_WORLD, nTotalCells * nEquations, nTotalSize, &x);
+    //! VecCreate(PETSC_COMM_WORLD, &x);
+    PetscObjectSetName((PetscObject)x, "solution");
+    //! VecSetSizes(x, nTotalCells * nEquations, nTotalSize);
+    VecSetUp(x);
+    VecDuplicate(x, &b);
+
+    //! create matrix
+    //! GMRESCSR
+    PetscInt d_nnz[nTotalCells];
+    PetscInt o_nnz[nTotalCells];
+    for (int iCell = 0; iCell < nTotalCells; iCell++)
+    {
+        int count = 0;
+        for (int j = AI[iCell]; j < AI[iCell + 1]; j++)
+        {
+            if (AJ[j] < nTotalCells)
+            {
+                count++;
+            }
+        }
+        d_nnz[iCell] = count;
+        o_nnz[iCell] = AK[iCell];
+    }
+    PH_Barrier();
+    MatCreate(PETSC_COMM_WORLD, &A);
+    MatSetSizes(A, nTotalCells * nEquations, (nTotalCells)*nEquations, nTotalSize, nTotalSize);
+    MatSetType(A, MATMPIBAIJ);
+    MatSetBlockSize(A, nEquations);
+    MatMPIBAIJSetPreallocation(A, nEquations, PETSC_DEFAULT, d_nnz, 20, PETSC_NULL);
+    PetscInt firstRow = globalTotalCells * nEquations;
+    PetscInt lastOneMoreRow = (globalTotalCells + nTotalCells) * nEquations;
+    MatGetOwnershipRange(A, &firstRow, &lastOneMoreRow);
+    MatSetUp(A);
+    MatZeroEntries(A);
+
+    MatCreate(PETSC_COMM_WORLD, &APC);
+    MatSetSizes(APC, nTotalCells * nEquations, (nTotalCells)*nEquations, nTotalSize, nTotalSize);
+    MatSetType(APC, MATMPIBAIJ);
+    MatSetBlockSize(APC, nEquations);
+
+    // GMRES Precond GMRESJac1st
+    if (jacOrder == 2)
+    {
+        PetscInt nnz1st[nTotalCells];
+        for (int iCell = 0; iCell < nTotalCells; iCell++)
+        {
+            int count = 0;
+            for (int j = AI1st[iCell]; j < AI1st[iCell + 1]; j++)
+            {
+                if (AJ1st[j] < nTotalCells)
+                {
+                    count++;
+                }
+            }
+            nnz1st[iCell] = count;
+        }
+
+        MatMPIBAIJSetPreallocation(APC, nEquations, PETSC_DEFAULT, nnz1st, 0, PETSC_NULL);
+    }
+    else
+    {
+        MatMPIBAIJSetPreallocation(APC, nEquations, PETSC_DEFAULT, d_nnz, 0, PETSC_NULL);
+    }
+    MatGetOwnershipRange(APC, &firstRow, &lastOneMoreRow);
+    MatSetUp(APC);
+    MatZeroEntries(APC);
+
+    // improved approach to assemble matrix CSR
+    PetscInt petsccol[nEquations];
+    PetscInt petscrow;
+    int jmax = AI[nTotalCells];
+    int rcell = 0;
+    int j = AI[rcell];
+    do
+    {
+        int rowidx = (rcell + globalCellIndexShift) * nEquations;
+        int interfaceProcess = 0;
+        for (j = AI[rcell]; j < AI[rcell + 1]; j++)
+        {
+            int qcell = AJ[j]; // get qcell (colume index of matrix)
+            // start to insert values: limited to dimension of nTotalSize
+            if (qcell < nTotalCells)
+            {
+                int colidx = (qcell + globalCellIndexShift) * nEquations;
+
+                for (int irow = 0; irow < nEquations; irow++)
+                {
+                    petscrow = rowidx + irow;
+                    for (int n = 0; n < nEquations; n++)
+                    {
+                        petsccol[n] = colidx + n;
+                    }
+                    MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdq[irow][j * nEquations], ADD_VALUES);
+                }
+            }
+        }
+        rcell++; // update rcell, go to the next row index of matrix
+    } while (j < jmax);
+
+    //! consider the second order template for 2nd order Jacobian matrix for domain decomposition strategy
+    if (interfaceInfo != nullptr && jacOrder == 2)
+    {
+        vector<int>* neighborCells = grid->GMRESGetNeighborCells();
+        int* localInterfacePhysicalCellIndex;
+        // localInterfacePhysicalCellIndex = interfaceInfo->GetLocalInterfacePhysicalCellIndex();
+        rcell = nTotalCells;
+        jmax = AI[nTotalCells + nBoundFace];
+        j = AI[rcell];
+        do
+        {
+            int rowidx = interfaceInfo->MatchedGlobalNeighborCellIndex(rcell) * nEquations;
+            if (rowidx >= 0) //! rcell is the ghost cell, rowidx > 0 means this cell locates on the interface boundary
+            {
+                int leftcell = interfaceInfo->MatchedLocalPhysicalCellIndex(rcell); // return its corresponding physical cell index
+                int colidx = (leftcell + globalCellIndexShift) * nEquations;
+                vector<int>::iterator result = find(AJ.begin() + AI[rcell], AJ.begin() + AI[rcell + 1], leftcell); // find leftcell
+                int index = distance(AJ.begin(), result);
+                index *= nEquations;
+                if (result == AJ.begin() + AI[rcell + 1])
+                {
+
+                    PrintToWindow(" rcell ", rcell, " cannot find qcell ", leftcell, " from ", "\n");
+                    for (int i = AI[rcell]; i < AI[rcell + 1]; i++)
+                    {
+                        PrintToWindow("AJ ", AJ[i]);
+                    }
+                    TK_Exit::ExceptionExit("Sparse matrix index is wrong");
+
+                }
+
+                for (int irow = 0; irow < nEquations; irow++)
+                {
+                    petscrow = rowidx + irow;
+                    for (int n = 0; n < nEquations; n++)
+                    {
+                        petsccol[n] = colidx + n;
+                    }
+                    MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdq[irow][index], ADD_VALUES);
+                }
+
+
+                // obtain the list of the neighbor physical cell for the left cell
+                for (int id = 0; id < neighborCells[leftcell].size(); id++)
+                {
+                    int neighborIndex = neighborCells[leftcell][id];
+                    if (neighborIndex >= nTotalCells)
+                    {
+                        continue;
+                    }
+
+                    int colidx = (neighborIndex + globalCellIndexShift) * nEquations;
+                    vector<int>::iterator result = find(AJ.begin() + AI[rcell], AJ.begin() + AI[rcell + 1], neighborIndex); // find neighborIndex
+                    int index = distance(AJ.begin(), result);
+                    index *= nEquations;
+                    if (result == AJ.begin() + AI[rcell + 1])
+                    {
+                        PrintToWindow(" rcell ", rcell, " cannot find qcell ", neighborIndex, " from ", "\n");
+                        for (int i = AI[rcell]; i < AI[rcell + 1]; i++)
+                        {
+                            PrintToWindow("AJ ", AJ[i]);
+                        }
+                        TK_Exit::ExceptionExit("Sparse matrix index is wrong");
+                    }
+
+                    for (int irow = 0; irow < nEquations; irow++)
+                    {
+                        petscrow = rowidx + irow;
+                        for (int n = 0; n < nEquations; n++)
+                        {
+                            petsccol[n] = colidx + n;
+                        }
+                        MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdq[irow][index], ADD_VALUES);
+                    }
+                }
+
+                // obtain the R_physical/q_ghost caused by the neighbor cell at interface bc
+                result = find(AJ.begin() + AI[leftcell], AJ.begin() + AI[leftcell + 1], rcell); // find rcell
+                index = distance(AJ.begin(), result);
+                index *= nEquations;
+                if (result == AJ.begin() + AI[leftcell + 1])
+                {
+                    PrintToWindow(" rcell ", leftcell, " cannot find qcell ", rcell, " from ", "\n");
+                    for (int i = AI[leftcell]; i < AI[leftcell + 1]; i++)
+                    {
+                        PrintToWindow("AJ ", AJ[i]);
+                    }
+                    TK_Exit::ExceptionExit("Sparse matrix index is wrong");
+                }
+
+                for (int irow = 0; irow < nEquations; irow++)
+                {
+                    petscrow = (leftcell + globalCellIndexShift) * nEquations + irow;
+                    for (int n = 0; n < nEquations; n++)
+                    {
+                        petsccol[n] = rowidx + n;
+                    }
+                    MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdq[irow][index], ADD_VALUES);
+                }
+
+                // obtain the list of the neighbor physical cell for the left cell
+                for (int id = 0; id < neighborCells[leftcell].size(); id++)
+                {
+                    int neighborIndex = neighborCells[leftcell][id];
+                    if (neighborIndex >= nTotalCells)
+                    {
+                        continue;
+                    }
+
+                    vector<int>::iterator result = find(AJ.begin() + AI[neighborIndex], AJ.begin() + AI[neighborIndex + 1], rcell); // find rcell
+                    int index = distance(AJ.begin(), result);
+                    index *= nEquations;
+                    if (result == AJ.begin() + AI[neighborIndex + 1])
+                    {
+                        PrintToWindow(" rcell ", neighborIndex, " cannot find qcell ", rcell, " from ", "\n");
+                        for (int i = AI[neighborIndex]; i < AI[neighborIndex + 1]; i++)
+                        {
+                            PrintToWindow("AJ ", AJ[i]);
+                        }
+                        TK_Exit::ExceptionExit("Sparse matrix index is wrong");
+                    }
+
+                    for (int irow = 0; irow < nEquations; irow++)
+                    {
+                        petscrow = (neighborIndex + globalCellIndexShift) * nEquations + irow;
+                        for (int n = 0; n < nEquations; n++)
+                        {
+                            petsccol[n] = rowidx + n;
+                        }
+                        MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdq[irow][index], ADD_VALUES);
+                    }
+                }
+            }
+            rcell++;
+        } while (rcell < nTotalCells + nBoundFace);
+    }
+    else if (interfaceInfo != nullptr && jacOrder != 2)
+    {
+        vector<int>* neighborCells = grid->GMRESGetNeighborCells();
+        int* localInterfacePhysicalCellIndex;
+        localInterfacePhysicalCellIndex = interfaceInfo->GetLocalInterfacePhysicalCellIndex();
+        rcell = nTotalCells;
+        jmax = AI[nTotalCells + nBoundFace];
+        j = AI[rcell];
+
+        do
+        {
+            int rowidx = interfaceInfo->MatchedGlobalNeighborCellIndex(rcell);
+            if (rowidx >= 0) //! rcell is the ghost cell, rowidx > 0 means this cell locates on the interface boundary
+            {
+                int leftcell = interfaceInfo->MatchedLocalPhysicalCellIndex(rcell); // return its corresponding physical cell index
+                int colidx = (leftcell + globalCellIndexShift) * nEquations;
+
+                vector<int>::iterator result = find(AJ.begin() + AI[rcell], AJ.begin() + AI[rcell + 1], leftcell); // find leftcell
+                int index = distance(AJ.begin(), result);
+                index *= nEquations;
+                if (result == AJ.begin() + AI[rcell + 1])
+                {
+                    PrintToWindow(" rcell ", rcell, " cannot find qcell ", leftcell, " from ", "\n");
+                    for (int i = AI[rcell]; i < AI[rcell + 1]; i++)
+                    {
+                        PrintToWindow("AJ ", AJ[i]);
+                    }
+                    TK_Exit::ExceptionExit("Sparse matrix index is wrong");
+                }
+
+                rowidx *= nEquations;
+                for (int irow = 0; irow < nEquations; irow++)
+                {
+                    petscrow = rowidx + irow;
+                    for (int n = 0; n < nEquations; n++)
+                    {
+                        petsccol[n] = colidx + n;
+                    }
+                    MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdq[irow][index], ADD_VALUES);
+                }
+            }
+            rcell++;
+        } while (rcell < nTotalCells + nBoundFace);
+    }
+
+
+    if (jacOrder == 2)
+    {
+        int jmax = AI1st[nTotalCells];
+        int rcell = 0;
+        int j = AI1st[rcell];
+        do
+        {
+            int rowidx = (rcell + globalCellIndexShift) * nEquations;
+            for (j = AI1st[rcell]; j < AI1st[rcell + 1]; j++)
+            {
+                int qcell = AJ1st[j]; // get qcell (colume index of matrix)
+                // start to insert values: limited to dimension of nTotalSize
+                if (qcell < nTotalCells)
+                {
+                    int colidx = (qcell + globalCellIndexShift) * nEquations;
+
+                    for (int irow = 0; irow < nEquations; irow++)
+                    {
+                        petscrow = rowidx + irow;
+                        for (int n = 0; n < nEquations; n++)
+                        {
+                            petsccol[n] = colidx + n;
+                        }
+                        MatSetValues(APC, 1, &petscrow, nEquations, petsccol, &dRdq1st[irow][j * nEquations], INSERT_VALUES);
+                    }
+                }
+            }
+            rcell++; // update rcell, go to the next row index of matrix
+        } while (j < jmax);
+    }
+    else
+    {
+        int jmax = AI[nTotalCells];
+        int rcell = 0;
+        int j = AI[rcell];
+        do
+        {
+            int rowidx = (rcell + globalCellIndexShift) * nEquations;
+            int interfaceProcess = 0;
+            for (j = AI[rcell]; j < AI[rcell + 1]; j++)
+            {
+                int qcell = AJ[j]; // get qcell (colume index of matrix)
+                // start to insert values: limited to dimension of nTotalSize
+                if (qcell < nTotalCells)
+                {
+                    int colidx = (qcell + globalCellIndexShift) * nEquations;
+
+                    for (int irow = 0; irow < nEquations; irow++)
+                    {
+                        petscrow = rowidx + irow;
+                        for (int n = 0; n < nEquations; n++)
+                        {
+                            petsccol[n] = colidx + n;
+                        }
+                        MatSetValues(APC, 1, &petscrow, nEquations, petsccol, &dRdq[irow][j * nEquations], INSERT_VALUES);
+                    }
+                }
+            }
+            rcell++; // update rcell, go to the next row index of matrix
+        } while (j < jmax);
+    }
+    MatAssemblyBegin(A, MAT_FINAL_ASSEMBLY);
+    MatAssemblyEnd(A, MAT_FINAL_ASSEMBLY);
+    MatAssemblyBegin(APC, MAT_FINAL_ASSEMBLY);
+    MatAssemblyEnd(APC, MAT_FINAL_ASSEMBLY);
+
+    // assemble vector
+    VecSet(b, zero);
+    for (PetscInt iCell = 0; iCell < nTotalCells; iCell++)
+    {
+        for (PetscInt iEquation = 0; iEquation < nEquations; iEquation++)
+        {
+            PetscInt isize = (iCell + globalCellIndexShift) * nEquations + iEquation;
+            VecSetValues(b, 1, &isize, &res[iEquation][iCell], ADD_VALUES);
+        }
+    }
+    VecAssemblyBegin(b);
+    VecAssemblyEnd(b);
+
+    // define solver
+    KSPCreate(PETSC_COMM_WORLD, &ksp);
+    KSPSetType(ksp, KSPGMRES);
+
+    KSPSetOperators(ksp, A, APC);
+
+    KSPSetPCSide(ksp, PC_RIGHT);
+    KSPSetUp(ksp);
+    KSPGetPC(ksp, &pc);
+    PCSetType(pc, PCBJACOBI);
+    // set sub-ksp and sub-pc
+    KSP* subksp;
+    PC  subpc;
+    int localTotalSize = nTotalCells * nEquations;
+    PCBJacobiSetLocalBlocks(pc, 1, &localTotalSize);
+    int nLocal = 1;
+    int firstLocal = grid->GetZoneID();
+    PCBJacobiGetSubKSP(pc, &nLocal, &firstLocal, &subksp);
+    KSPGetPC(subksp[0], &subpc);
+    PCSetType(subpc, PCILU);
+    PCFactorSetLevels(subpc, nLevels);
+
+    KSPGMRESSetRestart(ksp, maxStepsRestart);
+    KSPGMRESSetOrthogonalization(ksp, KSPGMRESModifiedGramSchmidtOrthogonalization);
+    KSPSetTolerances(ksp, rTolerance, 1.e-20, dropTolerance, maxSteps);
+
+    // solution
+    KSPSolve(ksp, b, x);
+
+    //! GMRESResidual
+    RDouble** dq = dqProxy->GetField_UNS();
+
+    // convert x to dqProxy
+    for (PetscInt iCell = 0; iCell < nTotalCells; iCell++)
+    {
+        for (PetscInt iEquation = 0; iEquation < nEquations; iEquation++)
+        {
+            PetscInt isize = (iCell + globalCellIndexShift) * nEquations + iEquation;
+            VecGetValues(x, 1, &isize, &dq[iEquation][iCell]);
+        }
+    }
+
+    // free work space
+    VecDestroy(&x);
+    VecDestroy(&b);
+    MatDestroy(&A);
+    MatDestroy(&APC);
+    KSPDestroy(&ksp);
+    PetscFinalize();
+    return;
+}
+#endif
+}
+
+
diff --git a/CFD/NSSolver/src/Param_NSSolver.cpp b/CFD/NSSolver/src/Param_NSSolver.cpp
new file mode 100644
index 0000000..0bbc7e9
--- /dev/null
+++ b/CFD/NSSolver/src/Param_NSSolver.cpp
@@ -0,0 +1,257 @@
+#include "Param_NSSolver.h"
+#include "GlobalDataBase.h"
+#include "TK_Log.h"
+#include "Constants.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Param_NSSolver::Param_NSSolver()
+{
+    
+}
+
+LIB_EXPORT Param_NSSolver::~Param_NSSolver()
+{
+
+}
+
+LIB_EXPORT void Param_NSSolver::Init()
+{
+    Param_CFDSolver::Init();
+    intervalStepForce   = GlobalDataBase::GetIntParaFromDB("intervalStepForce");
+    wallTemperature     = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+    AoA                 = GlobalDataBase::GetDoubleParaFromDB("attackd");
+    angleSlide          = GlobalDataBase::GetDoubleParaFromDB("angleSlide");
+
+    transitionType      = GlobalDataBase::GetIntParaFromDB("transitionType");
+
+    kPreconCoeff    = GlobalDataBase::GetDoubleParaFromDB("Kprec");
+    nIdealState = GlobalDataBase::GetIntParaFromDB("nIdealState");
+    preconFarfieldBCMethod    = GlobalDataBase::GetIntParaFromDB("preconFarfieldBCMethod");
+    refDimensionalVelocity = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+
+    roeEntropyFixMethod = GlobalDataBase::GetIntParaFromDB("roeEntropyFixMethod");
+    roeEntropyScale     = GlobalDataBase::GetDoubleParaFromDB("roeEntropyScale");
+
+    nNSEquation         = GlobalDataBase::GetIntParaFromDB("nm");
+    nLaminar            = GlobalDataBase::GetIntParaFromDB("nl");
+    nChemical           = GlobalDataBase::GetIntParaFromDB("nchem");
+    nTemperatureModel   = GlobalDataBase::GetIntParaFromDB("ntmodel");
+    numberOfSpecies     = GlobalDataBase::GetIntParaFromDB("numberOfSpecies");
+
+    nEquation = nLaminar + nChemical + nTemperatureModel - 1;
+
+    nDensityModify      = GlobalDataBase::GetIntParaFromDB("nDensityModify");
+    nDebug              = GlobalDataBase::GetIntParaFromDB("nDebug");
+    nTEnergyModel       = GlobalDataBase::GetIntParaFromDB("nTEnergyModel");
+
+    nEnergyRecycle      = GlobalDataBase::GetIntParaFromDB("nEnergyRecycle") * nChemical;
+
+    nTurblenceForChemical = GlobalDataBase::GetIntParaFromDB("nTurblenceForChemical");
+
+    nViscosityFluxSublevelModified = GlobalDataBase::GetIntParaFromDB("nViscosityFluxSublevelModified");
+
+    if (nChemical == 0)
+    {
+        if (nTemperatureModel > 1)
+        {
+            nTemperatureModel = 1;
+            GlobalDataBase::UpdateData("ntmodel", &nTemperatureModel, PHINT, 1);
+        }
+        if (nLaminar > nNSEquation)
+        {
+            nLaminar = nNSEquation;
+            GlobalDataBase::UpdateData("nl", &nLaminar, PHINT, 1);
+        }
+        if (numberOfSpecies > 0)
+        {
+            numberOfSpecies = 0;
+            GlobalDataBase::UpdateData("numberOfSpecies", &numberOfSpecies, PHINT, 1);
+        }
+    }
+
+    prandtlLaminar    = GlobalDataBase::GetDoubleParaFromDB("prl");
+    prandtlTurbulence = GlobalDataBase::GetDoubleParaFromDB("prt");
+
+    oPrandtlLaminar    = GlobalDataBase::GetDoubleParaFromDB("oprl");
+    oPrandtlTurbulence = GlobalDataBase::GetDoubleParaFromDB("oprt");
+
+    nChemicalRadius = GlobalDataBase::GetIntParaFromDB("nchemrad");
+    nChemicalSource = GlobalDataBase::GetIntParaFromDB("nchemsrc");
+
+    timeIntegration = GlobalDataBase::GetIntParaFromDB("tscheme");
+
+    nonDimensionalSutherlandTemperature = GlobalDataBase::GetDoubleParaFromDB("tsuth");
+
+    mgProlongationType = GlobalDataBase::GetIntParaFromDB("mprol");
+
+    if (nChemical > 0)
+    {
+        indexOfNitrogen = GlobalDataBase::GetIntParaFromDB("nNitrogenIndex");
+        indexOfElectron = GlobalDataBase::GetIntParaFromDB("nElectronIndex");
+        catalyticMassFraction = reinterpret_cast<RDouble *>(GlobalDataBase::GetDataPtr("catalyticMassFraction"));
+    }
+    else
+    {
+        indexOfNitrogen = -1;
+        indexOfElectron = -1;
+        catalyticMassFraction = 0;
+    }
+    nEquilibriumGas = GlobalDataBase::GetIntParaFromDB("nEquilibriumGas");
+
+    primitiveVarFarfield = reinterpret_cast <RDouble *> (GlobalDataBase::GetDataPtr("prim_inf"));
+
+    mTT = 0;
+    if(nTemperatureModel == 3)
+    {
+        mTV = 1;
+        mTE = 2;
+    }
+    else if(nTemperatureModel ==2)
+    {
+        mTV = 1;
+        mTE = 1;
+    }
+    else
+    {
+        mTV = 0;
+        mTE = 0;
+    }
+
+    densityMin = 1.0e-8;
+    if (GlobalDataBase::IsExist("densityMin", PHDOUBLE, 1))
+    {
+        densityMin = GlobalDataBase::GetDoubleParaFromDB("densityMin");
+    }
+    densityMin /= GetRefDimensionalDensity();
+
+    densityMinFactor = SMALL;
+    if (GlobalDataBase::IsExist("densityMinFactor", PHDOUBLE, 1) && nChemical == 1)
+    {
+        densityMinFactor = GlobalDataBase::GetDoubleParaFromDB("densityMinFactor");
+    }
+
+    isSelfAdaptionSolve = GlobalDataBase::GetIntParaFromDB("isAdaptiveSolver");
+
+    nGradPrimtiveMethod = 0;
+    if (GlobalDataBase::IsExist("nGradPrimtiveMethod", PHINT, 1) && nChemical == 1)
+    {
+        nGradPrimtiveMethod = GlobalDataBase::GetIntParaFromDB("nGradPrimtiveMethod");
+    }
+
+    nInviscidFluxModify = 0;
+    if (GlobalDataBase::IsExist("nInviscidFluxModify", PHINT, 1))
+    {
+        nInviscidFluxModify = nChemical * GlobalDataBase::GetIntParaFromDB("nInviscidFluxModify");  //Chemical only
+    }
+
+    nQlLimitMethod = 0;
+    if (GlobalDataBase::IsExist("nQlLimitMethod", PHINT, 1))
+    {
+        nQlLimitMethod = GlobalDataBase::GetIntParaFromDB("nQlLimitMethod");  //ql��qr
+    }
+
+    //! The method to compute the gradient of variable on surface.
+    nSurfGradMethod = 0;
+    if (GlobalDataBase::IsExist("nSurfGradMethod", PHINT, 1))
+    {
+        nSurfGradMethod = GlobalDataBase::GetIntParaFromDB("nSurfGradMethod");
+    }
+
+    //! To utilize the rapid method that can directly obtain the initial flowfield in boundary layer.
+    nRapidFlowfield = 0;
+    if (GlobalDataBase::IsExist("nRapidFlowfield", PHINT, 1))
+    {
+        nRapidFlowfield = GlobalDataBase::GetIntParaFromDB("nRapidFlowfield");
+    }
+
+    //! To utilize the monitor which exam the surface heating change during the iteration.
+    nSurfHeatMonitor = 0;
+    if (GlobalDataBase::IsExist("nSurfHeatMonitor", PHINT, 1))
+    {
+        nSurfHeatMonitor = GlobalDataBase::GetIntParaFromDB("nSurfHeatMonitor");
+    }
+
+    wallMultiTemperature = 0;
+    if (GlobalDataBase::IsExist("wallMultiTemperature", PHINT, 1))
+    {
+        wallMultiTemperature = GlobalDataBase::GetIntParaFromDB("wallMultiTemperature");
+    }
+
+    //! The steps to initialize the boundary variables with the rapid flowfield values.
+    nInitPressureStep = 100;
+    if (GlobalDataBase::IsExist("nInitPressureStep", PHINT, 1))
+    {
+        nInitPressureStep = GlobalDataBase::GetIntParaFromDB("nInitPressureStep");
+    }
+
+    //! Use local CFL number or not.
+    isUseLocalCFL = 0;
+    if (GlobalDataBase::IsExist("isUseLocalCFL", PHINT, 1))
+    {
+        isUseLocalCFL = GlobalDataBase::GetIntParaFromDB("isUseLocalCFL");
+    }
+
+    //the reference length for computation of Knudsen number.
+    knLength = 1.0;
+    if (GlobalDataBase::IsExist("knudsenLength", PHDOUBLE, 1))
+    {
+        knLength = GlobalDataBase::GetDoubleParaFromDB("knudsenLength");
+    }
+
+    //the flag of using the non-equilibrium condition.
+    isUseNoneqCond = 0;
+    if (GlobalDataBase::IsExist("isUseNoneqCond", PHINT, 1))
+    {
+        isUseNoneqCond = GlobalDataBase::GetIntParaFromDB("isUseNoneqCond");
+    }
+}
+
+void Param_NSSolver::SetEntropyFixCoefficients()
+{
+    RDouble entropyAcoustic = 0.01, entropyConvective = 0.01;
+    RDouble referenceMachNumber = this->GetRefMachNumber();
+
+    int ifLowSpeedPrecon = this->GetIfLowSpeedPrecon();
+    if (ifLowSpeedPrecon)
+    {
+        //! Incompressible, precondition.
+        entropyAcoustic   = 1.0e-8;
+    }
+    else
+    {
+        //! Compressible.
+        RDouble x0, x1, y0, y1;
+        if(referenceMachNumber <= 0.6)
+        {
+            entropyAcoustic = 0.0001;
+        }
+        else if(referenceMachNumber <= 2.0)
+        {
+            x0 = 0.6;    x1 = 2.0;
+            y0 = 0.0001; y1 = 0.01;
+            entropyAcoustic = y0 * (referenceMachNumber - x1) / (x0 - x1) + y1 * (referenceMachNumber - x0) / (x1 - x0);
+        }
+        else if(referenceMachNumber <= 5.0)
+        {
+            x0 = 2.0;  x1 = 5.0;
+            y0 = 0.01; y1 = 0.5;
+            entropyAcoustic = y0 * (referenceMachNumber - x1) / (x0 - x1) + y1 * (referenceMachNumber - x0) / (x1 - x0);
+        }
+        else
+        {
+            entropyAcoustic = 1.0;
+        }  
+
+        //! Do not scale the entropy for incompressible precondition.
+        entropyAcoustic *= this->roeEntropyScale;
+    }
+
+    entropyConvective = entropyAcoustic;
+
+    this->RoeEntropyFixCoef1 = entropyAcoustic;
+    this->RoeEntropyFixCoef2 = entropyConvective;
+}
+
+}
diff --git a/CFD/NSSolver/src/Param_NSSolverStruct.cpp b/CFD/NSSolver/src/Param_NSSolverStruct.cpp
new file mode 100644
index 0000000..3035efa
--- /dev/null
+++ b/CFD/NSSolver/src/Param_NSSolverStruct.cpp
@@ -0,0 +1,51 @@
+#include "Param_NSSolverStruct.h"
+#include "GlobalDataBase.h"
+#include "Constants.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Param_NSSolverStruct::Param_NSSolverStruct()
+{
+
+}
+
+LIB_EXPORT Param_NSSolverStruct::~Param_NSSolverStruct()
+{
+
+}
+
+LIB_EXPORT void Param_NSSolverStruct::Init()
+{
+    Param_NSSolver::Init();
+    MUSCLCoefXk                = GlobalDataBase::GetDoubleParaFromDB("MUSCLCoefXk");
+    MUSCLCoefXb                = GlobalDataBase::GetDoubleParaFromDB("MUSCLCoefXb");
+    catalyticCoef              = GlobalDataBase::GetDoubleParaFromDB("catalyticCoef");
+    chemicalSpectrumRadiusCoef = GlobalDataBase::GetDoubleParaFromDB("chemicalSpectrumRadiusCoef");
+    viscousSpectrumRadiusCoef  = GlobalDataBase::GetDoubleParaFromDB("viscousSpectrumRadiusCoef");
+    inviscidSpectrumRadiusCoef = GlobalDataBase::GetDoubleParaFromDB("inviscidSpectrumRadiusCoef");
+    chemicalRelaxCorf          = GlobalDataBase::GetDoubleParaFromDB("chemicalRelaxCorf");
+    staticPressureRelaxCorf    = GlobalDataBase::GetDoubleParaFromDB("staticPressureRelaxCorf");
+    inviscidSchemeName         = GlobalDataBase::GetStrParaFromDB("inviscidSchemeName");
+
+    if(GetChemicalFlag()== 0)
+    {
+        chemicalSpectrumRadiusCoef = 1.0;
+        viscousSpectrumRadiusCoef  = 1.0;
+        inviscidSpectrumRadiusCoef = 1.0;
+        staticPressureRelaxCorf    = 1.0;
+    }
+
+    iniSpeedCoef = 1.0;
+    if (GlobalDataBase::IsExist("iniSpeedCoef", PHDOUBLE, 1))
+    {
+        iniSpeedCoef = GlobalDataBase::GetDoubleParaFromDB("iniSpeedCoef");
+    }
+    iniSpeedMode = 0;
+    if(GlobalDataBase::GetIntParaFromDB("nIsComputeWallDist")== 0 && GlobalDataBase::IsExist("iniSpeedMode", PHINT, 1))
+    {
+        iniSpeedMode = GlobalDataBase::GetIntParaFromDB("iniSpeedMode");
+    }
+}
+
+}
\ No newline at end of file
diff --git a/CFD/NSSolver/src/Param_NSSolverUnstruct.cpp b/CFD/NSSolver/src/Param_NSSolverUnstruct.cpp
new file mode 100644
index 0000000..2ed44f8
--- /dev/null
+++ b/CFD/NSSolver/src/Param_NSSolverUnstruct.cpp
@@ -0,0 +1,43 @@
+#include "Param_NSSolverUnstruct.h"
+#include "GlobalDataBase.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Param_NSSolverUnstruct::Param_NSSolverUnstruct()
+{
+
+}
+
+LIB_EXPORT Param_NSSolverUnstruct::~Param_NSSolverUnstruct()
+{
+
+}
+
+LIB_EXPORT void Param_NSSolverUnstruct::Init()
+{
+    Param_NSSolver::Init();
+    uns_scheme_name = GlobalDataBase::GetStrParaFromDB("uns_scheme_name");
+
+    gradientName = GlobalDataBase::GetStrParaFromDB("gradientName");
+
+    limitVector = GlobalDataBase::GetIntParaFromDB("limitVector");
+
+    limitVariables = GlobalDataBase::GetIntParaFromDB("limitVariables");
+
+    sliceAxis = GlobalDataBase::GetIntParaFromDB("sliceAxis");
+
+    slicePostion = GlobalDataBase::GetDoubleParaFromDB("slicePostion");
+
+    mgCFLScale = GlobalDataBase::GetDoubleParaFromDB("mgCFLScale");
+
+    mgCorrectionLimit = GlobalDataBase::GetDoubleParaFromDB("mgCorrectionLimit");
+
+    catalyticCoef              = GlobalDataBase::GetDoubleParaFromDB("catalyticCoef");
+    chemicalSpectrumRadiusCoef = GlobalDataBase::GetDoubleParaFromDB("chemicalSpectrumRadiusCoef");
+    chemicalRelaxCorf          = GlobalDataBase::GetDoubleParaFromDB("chemicalRelaxCorf");
+    staticPressureRelaxCorf    = GlobalDataBase::GetDoubleParaFromDB("staticPressureRelaxCorf");
+
+}
+
+}
\ No newline at end of file
diff --git a/CFD/Solver/include/CFDSolver.h b/CFD/Solver/include/CFDSolver.h
new file mode 100644
index 0000000..5a37ccf
--- /dev/null
+++ b/CFD/Solver/include/CFDSolver.h
@@ -0,0 +1,610 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      CFDSolver.h
+//! @brief     CFD solver.
+//! @author    He Xin, Bell, He Kun, He Xianyao, Liu Jian, Zhang Zipei, Li peng, 
+//!            Ma Yankai, Zhang Yang, Wan Yunbo, Xu Gang.
+
+#pragma once
+#include "Solver.h"
+#include "Geometry.h"
+#include "Post_Visual.h"
+#include "Post_Probes.h"
+#include "IO_HDF5File.h"
+#pragma warning(disable:4100)
+#ifdef USE_GMRESSOLVER
+#include "petscksp.h"
+#endif
+namespace PHSPACE
+{
+// #define GMRESWholeJacobian
+class ActionKey;
+class ActionTag;
+class Grid;
+class InterfaceDataProxy;
+class FieldProxy;
+class InterfaceInfo;
+class Param_CFDSolver;
+class Region;
+
+extern bool cfd_debug;
+
+//! @brief Base Class for CFD solvers, some other actual solvers are inherited from CFDSolver, such as NSSolver, TurbSolver.
+class CFDSolver : public PHSolver
+{
+public:
+    CFDSolver();
+    ~CFDSolver();
+
+public:
+    //! Register an interface field (variable) into buffer, used in parallel communication.
+    //! The interface field variable buffer is set to be ZERO.
+    //! @param[in] name         variable name of the interface field that need to be communicated.
+    //! @param[in] type         variable type of the interface field
+    //! -# PHINT   : Integer type.
+    //! -# PHFLOAT : Float type.
+    //! -# PHDouble: Double type.
+    //! @param[in] dimension    variable dimension
+    //! -# 1 :  1-D array.
+    //! -# 2 :  2-D array.
+    //! -# n :  n-D array.
+    LIB_EXPORT void RegisterInterfaceField(const string &name, const int type, const int dimesion);
+    LIB_EXPORT void RegisterInterpointField(const string & name, const int type, const int dimesion);
+    LIB_EXPORT void RegisterOversetField(const string &name, const int type, const int dimesion);
+
+    LIB_EXPORT void ReleaseInterfaceField();
+    LIB_EXPORT void ReleaseInterfaceField(string varName);
+
+    void SetPostVisualization(Post_Visual *postVisualization_in);
+
+    Post_Visual *GetPostVisualization();
+
+    void SetPostVisualizationWall(Post_VisualWall *postVisualization_in);
+
+    Post_VisualWall *GetPostVisualizationWall();
+
+    //! Get control parameters
+    LIB_EXPORT Param_CFDSolver *GetControlParameters() const;
+
+    //! Compute pressure factor for entrop fix (Method 2 in Structure solver).
+    virtual void CalPressureFactor(Grid *grid) {};
+
+    //! Compute gradient of primitivevariables & temperature for viscous flux computation.
+    virtual void ComputeGradient(Grid *grid);
+    virtual void ComputeLimiter(Grid *grid);
+    virtual void ComputeGradientCellCenter(Grid *grid);
+    virtual void ComputeGradientCellCenterForLES(Grid *grid);
+    virtual void ComputeGradientCellCenterOfruvwptOnlyForMixGrid(Grid *grid){};
+    virtual void ComputelimiterOnlyForMixGrid(Grid *grid){};
+    //! Compute blend function F1 & F2.
+    virtual void Crossing(Grid *grid);
+    virtual void Blending(Grid *grid);
+
+    virtual void UpdateQlQrOnlyforMixGrid(Grid *grid){};
+    virtual void UpdateInviscidfluxOnlyforMixGrid(Grid *grid){};
+    virtual void UpdateViscousfluxOnlyforMixGrid(Grid *grid){};
+    virtual void LoadGlobalfacefluxtoResOnlyforMixGrid(Grid *grid){};
+
+    //! Low-speed Precondition Coefficient.
+    virtual void ComputePreconditionCoefficient(Grid *grid);
+
+    //! Low-speed Conservative Precondition Matrix.
+    virtual void ConservativePreconMatrix(Grid *grid);
+
+    //! Inviscid flux.
+    virtual void InviscidFlux(Grid *grid);
+
+    //! Viscous flux.
+    virtual void ViscousFlux (Grid *grid);
+
+    //! Source flux, such as chemical source term.
+    virtual void SourceFlux(Grid *grid);
+
+    //! To get the viscous term, viscouslaminar for ns-solver and viscousturbulent for turbulent solver.
+    virtual void ComputeViscousCoeff(Grid *grid) {};
+    virtual void ReconGrad(Grid *gridIn, int iSurface) {};
+
+    virtual void GetdtwithBC(Grid *grid){};
+    virtual void GetspecwithBC(Grid *grid){};
+    virtual void SolveLUSGSForwardwithBC(Grid *grid, FieldProxy *dqProxy){};
+    virtual void SolveLUSGSBackwardwithBC(Grid *grid, FieldProxy *dqProxy){};
+    virtual void CompressSpecificArrayToInterfaceWithSpecificGhost(DataContainer *&dataContainer, const string &fieldName, Grid *grid, const int &neighborZoneIndex, const int &neqn, int nGhost) {};
+    virtual void DecompressArrayFromInterfaceWithSpecificGhost(DataContainer *&dataContainer, const string &fieldName, Grid *grid, const int &neighborZoneIndex, const int &neqn, int nGhost) {};
+
+    //! Time step computation.
+    virtual void TimeStep(Grid *grid);
+
+#ifdef USE_GMRESSOLVER
+    //! GMRES solver -- a linear system solver
+    //! This method can be referenced "Sen Zhang, Boqian Wang, et al. Implementation of a Newton-Krylov Algorithm in the Open-source Solver PHengLEI[C]."
+    //! GPPS Hong Kong , October 17-19, 2023.
+    virtual void GMRESSolver(Grid *gridIn, FieldProxy *dqProxy);
+#endif
+
+    //! Compute the inviscous/viscous/chemical spectrum radius.
+    //! The results stored in array invSpectralRadius and visSpectralRadius and srs.
+    virtual void SpectrumRadius(Grid *grid){};
+    
+    //! See the explain in controller.
+    virtual void Diagonal(Grid *grid) {};
+    
+    virtual void ComputeMinTimeStep(Grid *grid, RDouble &minDt, RDouble &maxDt);
+    virtual void ReduceMaxTimeStep(Grid *grid, RDouble globalMinDt);
+
+    //! Explicit Runnge-Kutta time integration method.
+    virtual void RungeKutta(Grid *grid, FieldProxy *rhsProxy);
+
+    //! Implicit LU-SGS time integration method.
+    virtual void SolveLUSGSForward(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+    virtual void SolveLUSGSBackward(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+   
+    //! Implicit Block LU-SGS time integration method.
+    virtual void SolveBLUSGSForward(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal);
+    virtual void SolveBLUSGSBackward(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal);
+
+    //! Implicit Matrix LU-SGS time integration method.
+    virtual void SolveMatrixLUSGSForward(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal);    
+    virtual void SolveMatrixLUSGSBackward(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal);
+
+    //! Implicit Line LU-SGS time integration method.
+    virtual void SolveLineLUSGSForward(Grid* grid, FieldProxy* dqProxy, FieldProxy* LUplusDQ, RDouble& sweepNormal);
+    virtual void SolveLineLUSGSBackward(Grid* grid, FieldProxy* dqProxy, FieldProxy* LUplusDQ, RDouble& sweepNormal);
+
+    //! To determine the CFL number of the next iteration step.
+    virtual void DetermineCFLNumber(Grid *grid, FieldProxy *dqProxy, FieldProxy *dqProxy1);
+
+    //! Line implicit LU-SGS time integration method.
+    virtual void LineLUSGS(Grid* grid, int level);
+
+    virtual void LHSMatrixs(Grid *grid);
+
+    //! calculate the three Matrixs of all lines.
+    virtual void LineLUSGSMatrixs(Grid *grid);
+
+    //! Compute the node value in the flow.
+    //! @param[in] grid         the mesh in the computing.    
+    virtual void ComputeNodeValue(Grid *grid) {};
+
+    //! Modify the node value in the flow.
+    //! @param[in] grid         the mesh in the computing.
+    virtual void ModifyNodeValue(Grid *grid) {};
+
+    //! Compute the node value of the the interpoint for turbulent flow.
+    //! @param[in] grid         the mesh in the computing.
+    virtual void ComputeQTurbNodeValue(Grid *grid) {};
+
+    //! Compute the node value of the the interpoint for transition flow.
+    //! @param[in] grid         the mesh in the computing.
+    virtual void ComputeQTransitionNodeValue(Grid *grid) {};
+
+    //! Modify the node value of the the interpoint for turbulent flow.
+    //! @param[in] grid         the mesh in the computing.
+    virtual void ModifyQTurbNodeValue(Grid *grid) {};
+    //! Put correction on the coarse grid, if multi-grid method is used.
+    void PutCorrection(Grid *grid, FieldProxy *qProxy);
+
+    virtual RDouble UnsteadyConvergence(Grid *grid);
+
+    virtual void UpdateUnsteadyFlow(Grid *grid);
+    virtual void UpdateUnsteadyVariable(Grid *grid);
+    virtual void UpdateDt();
+
+    virtual int GetNPostSolve();
+    virtual int GetNumberOfEquations();
+
+    virtual void PostSolve(Grid *grid, int stage, int level = 0);
+
+    virtual void DumpResultFile(Grid *grid, int level = 0);
+
+    virtual void CheckResult(Grid *grid, int level = 0);
+
+    virtual void CheckResiduals(Grid *grid, int level = 0);
+
+    virtual void DumpCFLNumber(Grid *grid, int level = 0);
+
+    virtual void CheckSurfaceHeatingChange(Grid *grid, int level = 0);
+
+    virtual void DumpLeakageInformation(Grid *grid);
+
+    virtual void ZeroResiduals(Grid *grid);
+
+    virtual void UpdateResiduals(Grid *grid);
+
+    virtual void ComputeResidual(Grid *grid, FieldProxy *rhsProxy);
+
+    virtual void RungeKuttaResidual(Grid *grid, FieldProxy *dqProxy, RDouble coef);
+
+    virtual void RestrictAllQ(Grid *fineGrid, Grid *coarseGrid);
+
+    virtual void RestrictDefect(Grid *fineGrid, Grid *coarseGrid);
+
+    virtual void PutCorrectionBack(Grid *grid, FieldProxy *qProxy);
+
+    virtual void CorrectFineGrid(Grid *fineGrid, Grid *coarseGrid);
+
+    virtual void InterpolatFineGrid(Grid *fineGrid, Grid *coarseGrid);
+
+    virtual void StoreRhsByResidual(Grid *grid, FieldProxy *rhsProxy);
+
+    virtual void InitResidual(Grid *grid, FieldProxy *rhsProxy);
+
+    virtual FieldProxy * GetResidualProxy(Grid *grid);
+
+    virtual void RecoverResidual(Grid *grid, FieldProxy *rhsProxy);
+
+    virtual void LoadQ(Grid *grid, FieldProxy *qProxy);
+
+    virtual FieldProxy * CreateFieldProxy(Grid *grid);
+
+    virtual void InitCGrid(Grid *fineGridIn, Grid *coarseGridIn) {};
+
+    virtual void LUSGSInitializationStructHighOrder(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ){};
+    
+    //! Test start.
+    virtual void LoadResiduals(Grid *grid, FieldProxy *rhsProxy);
+
+    virtual void Boundary(Grid *grid);
+
+    virtual void CalculateBoundaryData();
+
+    virtual void GetIndependentVariablesforStructHighOrder(Grid *grid){};
+
+    virtual void GetDependentVariablesforStructHighOrder(Grid *grid){};
+
+    virtual void ComputeGamaAndTemperature(Grid *grid) {};
+
+    virtual void GetResidual(ActionKey *actkey);
+
+    virtual void GetResidual(ActionKey *actkey, RDouble &localMaxRes);
+
+    virtual void GetResidual(Grid *gridIn, RDouble &localMaxRes);
+
+    //! Obtain the CFL number.
+    virtual void ObtainCFLNumber(Grid *gridIn, RDouble &globalMinCFL, RDouble &globalMaxCFL);
+
+    //! Compute the surface heating change and obtain the maximum change of the surface heating ratio.
+    virtual void GetSurfaceHeatingChange(ActionKey *actkey, RDouble &localMaxHeatChange);
+
+    //! Prepare post visualization variables, store it in to grid's postVisualization database.
+    LIB_EXPORT virtual void ComputePostVisualVariables(Post_Visual *postVisualization) {};
+    //! Prepare monitored probes variables for post-processing , store it into postProbesVar database.
+    LIB_EXPORT virtual void ComputePostProbesVariables(Post_Probes *postProbesVar) {};
+
+    virtual FieldProxy * GetFieldProxy(Grid *grid, const string &field_name);
+
+    virtual string CastName(const string &name);
+
+    virtual void UpdateFlowField(Grid *grid, FieldProxy *qProxy, FieldProxy *dqProxy);
+
+    virtual void CompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+    virtual void DecompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+    
+    virtual void CompressAnInterfaceVar(DataContainer *&dataContainer, RDouble **fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+    virtual void DecompressAnInterfaceVar(DataContainer *&dataContainer, RDouble **fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+
+    virtual void CompressSpecificArrayToInterface(DataContainer *&dataContainer, const string &fieldName, Grid *grid, const int &neighborZoneIndex, const int &neqn) {};
+    virtual void DecompressArrayFromInterface(DataContainer *&dataContainer, const string &fieldName, Grid *grid, const int &neighborZoneIndex, const int &neqn) {};
+    
+    //! Rotate gradient vector for periodic boundary in both NSSolver and TurbSolver.
+    virtual void RotateVectorFromInterface(Grid *grid, const int &neighborZoneIndex, const int &neqn) {};
+
+    virtual void AverageMixingPlane(Grid *grid) {};
+    virtual void MixingPlaneDataTransfer(Grid *grid, Grid *NeighborGrid1) {};
+    virtual void NonReflective(Grid *grid, Grid *NeighborGrid1) {};
+    virtual void SetMixingPlaneData(Grid *grid) {};
+
+    virtual void CompressGradientandLimitToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex){};
+    virtual void DecompressGradientandLimitToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex){};
+
+    virtual void CompressQlQrToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex){};
+    virtual void DecompressQlQrToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex){};
+
+
+    virtual void CompressFacefluxToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex){};
+    virtual void DecompressFacefluxToInterfaceOnlyForMixGrid(DataContainer *&dataContainer, Grid *grid, const int &neighborZoneIndex){};
+
+    //! Postprocess such as parallel communication, flowfield and residual info output, et.al.
+    virtual void AirForceCoef(ActionKey *actkey){};
+    virtual void CpDistriCoef(ActionKey *actkey){};
+
+    virtual void ComputeHeatFlux(ActionKey *actkey, RDouble *HeatFlux){};
+
+    //! Interpoint data communications.
+    virtual void CommunicationInterpointData();
+
+    virtual void DumpResidual(ActionKey *actkey);
+
+    virtual void CheckResidual(ActionKey *actkey);
+
+    virtual void ObtainCFLNumber(ActionKey *actkey);
+
+    virtual void ComputeSurfaceHeatingChange(ActionKey *actkey);
+
+    //! Get the file name for Residual dumping.
+    virtual const string GetResidualFileName();
+
+    //! Get the file name for Restart info dumping.
+    virtual const string GetRestartFileName();
+
+    //! Get the file name for AirCoef dumping.
+    virtual const string GetAirCoefFileName();
+
+    //! Get the file name for flow field output by tecplot format.
+    virtual const string GetFlowTecFileName();
+
+    virtual void DumpRestartData(ActionKey *actkey);
+    virtual void DumpProtectData(ActionKey *actkey, int &RestartFile);
+    virtual void DumpTurbProtectData(ActionKey *actkey, int &RestartFile);
+    virtual void DumpTransitionProtectData(ActionKey *actkey, int &RestartFile);
+    virtual void CreateH5RestartFile(ActionKey *actkey);
+
+    virtual void InitMemory();
+    virtual void ReleaseMemory();
+
+    //! Initialize the flow by two ways:\n
+    //! 1. InitFlowAsRestart\n
+    //! 2. InitFlowAsReadingRestart.
+    virtual void InitFlow();
+
+    virtual void InitProtectedFlow();
+
+    //! Initialize flow by inflow condition, or set the flow variables to be zero.
+    virtual void InitFlowAsRestart();
+
+    //! Initialize flow by reading restart file.
+    //! For example, for NS solver, the flow variables are stored in flow.dat
+    //! for turbulent solver, the turbulent variables are store in turb.dat.
+    virtual void InitFlowAsReadingRestart();
+    virtual void InitFlowAsReadingRestart(ActionKey *actkey);
+
+    virtual void InitFlowAsReadingProtectedRestart(ActionKey *actkey);
+
+    //! To output Average Flow for visualization by tecplot format.
+    virtual void TecOutAverageFlow(ActionKey *actkey);
+
+    //! To output Average Reynolds stress for visualization by tecplot format.
+    virtual void TecOutAverageReynoldsStress(ActionKey *actkey);
+
+    virtual void DumpAirForceCoef(ActionKey *actkey);
+    virtual void DumpCpDistri(ActionKey *actkey);
+    virtual void DumpSurfaceInfo(ActionKey *actkey);
+    void WriteWallAircoefASCII(ActionKey *actkey, vector <DataContainer *> datalist);
+    virtual void DumpHeatFlux(ActionKey *actkey);
+    void WriteHeatFluxASCII(ActionKey *actkey, RDouble *HeatFlux);
+    #ifdef USE_TecplotLib
+        void WriteWallAircoef(ActionKey *actkey, vector <DataContainer *> datalist);
+    #endif
+
+    //! Export the required variables on surface to file, such as the temperature, mass fraction etc.
+    virtual void ExportSurfaceVariables(ActionKey *actkey) {}; //added by Li Peng
+
+    //! Interface data communications.
+    void CommunicationInterfaceData();
+    void CommunicationInterfaceData(int iLevel);
+
+    //! Interface information exchange controller process. A complete process include three steps: \n
+    //! 1. Upload Interface Data. \n
+    //! 2. Update Interface Data. \n
+    //! 3. Download Interface Data.
+    void UploadInterfaceData();
+    void UpdateInterfaceData();
+    void DownloadInterfaceData();
+
+    void UploadInterfaceData(int iLevel);
+    void UpdateInterfaceData(int iLevel);
+    void DownloadInterfaceData(int iLevel);
+
+    //! Interpoint information exchange controller process. A complete process include three steps: \n
+    //! 1. Upload Interpoint Data. \n
+    //! 2. Update Interpoint Data. \n
+    //! 3. Download Interpoint Data.
+    void UploadInterpointData();
+    void UpdateInterpointData();
+    void DownloadInterpointData();
+    void CommunicationInterpointWeight();
+
+    //! Overset information exchange controller process, including 3 steps: \n
+    //! 1. Upload Overset Data. \n
+    //! 2. Update Overset Data. \n
+    //! 3. Download Overset Data.
+    void UploadOversetData();
+    void UpdateOversetData();
+    void DownloadOversetData();
+
+    virtual void DumpRestart(ActionKey *actkey);
+    virtual void ReadRestart(ActionKey *actkey);
+
+    virtual void DumpRestartH5(ActionKey *actkey);
+    virtual void ReadRestartH5(ActionKey *actkey);
+
+    virtual void FillField(Grid *grid, FieldProxy *fieldProxy, RDouble value);
+    virtual void FillField(Grid *grid, FieldProxy *field1Proxy, FieldProxy *field2Proxy);
+
+    void Solve();
+
+protected:
+    int GetZoneLocalID();
+
+    Grid * GetGrid(int level = 0);
+
+    uint_t GetNumberOfMultiGrid();
+
+    void Action(ActionKey *actkey);
+
+    virtual void FillActionKey(ActionKey *actkey, int action, int level){};
+
+    void TranslateAction(ActionKey *actkey);
+
+    streamsize TranslateActionLength(ActionKey *actkey);
+
+    virtual bool JudgeIfReadAverage();
+    virtual bool JudgeIfRestart();
+
+    virtual bool JudgeIfProtectedRestart();
+
+    virtual void InitCoarseGridsFlow();
+
+    //! Create and init control parameters.
+    virtual void InitControlParameters();
+
+    //! Create and init control parameters.
+    virtual void InitDependentVariables();
+
+    //! Free control parameters.
+    virtual void FreeControlParameters();
+
+    virtual void ReadParameter();
+
+    virtual void ActionReflect(ActionTag *acttag);
+    virtual void VisualizationAverageFlow(ActionKey *actkey);
+
+    void AllocateGlobalVariables();
+    void DeAllocateGlobalVariables();
+    virtual void AllocateGlobalVar(Grid *grid);
+    virtual void DeAllocateGlobalVar(Grid *grid);
+
+    void DeAllocateOversetInterfaceVar(Grid *grid);
+
+    void DeAllocateOversetInterfaceVar(OversetInfoProxy *oversetInfoProxy);
+
+    virtual void DeAllocateOversetInterfaceVar(Data_ParamFieldSuite *dataStore);
+
+    virtual void GetInterfaceData  (ActionKey *actkey);
+    virtual void TranslateInterfaceData(ActionKey *actkey);
+    virtual streamsize TranslateInterfaceDataLength(ActionKey *actkey);
+
+    //! Translate the interpoint data length.
+    //! @param[in] actkey         the actkey store the information of the interpoint.
+    virtual streamsize TranslateInterpointDataLength(ActionKey *actkey);
+
+    //! Get the interpoint data for sending data.
+    //! @param[in] actkey         the actkey store the information of the interpoint.
+    virtual void GetInterpointData (ActionKey *actkey);
+
+    //! Translate the interpoint data using MPI.
+    //! @param[in] actkey         the actkey store the information of the interpoint.
+    virtual void TranslateInterpointData(ActionKey *actkey);
+
+    virtual void PrepareInterfaceData(Grid *grid, Data_ParamFieldSuite *dataStore, InterfaceDataProxy *interfaceDataProxy);
+
+    //! Prepare the interpoint data for sending.
+    //! @param[in] grid         the mesh in the computing.
+    //! @param[in] datastore       the data store in current zone.
+    //! @param[in] interpointDataProxy         a proxy to store the interpoint value.
+    virtual void PrepareInterpointData(Grid *grid, Data_ParamFieldSuite *datastore, InterpointDataProxy *interpointDataProxy);
+
+    virtual void PrepareOversetInterfaceData(Data_ParamFieldSuite *dataStore, InterfaceDataProxy *interfaceDataProxy);
+
+    void ReadInterface (ActionKey *actkey);
+    void WriteInterface(ActionKey *actkey);
+
+    virtual void UploadInterfaceValue(ActionKey *actkey);
+    virtual void DownloadInterfaceValue(ActionKey *actkey);
+
+    virtual void UploadInterfaceData(ActionKey *actkey);
+    virtual void DownloadInterfaceData(ActionKey *actkey);
+
+    virtual void UploadOversetData(ActionKey *actkey);
+    virtual void DownloadOversetData(ActionKey *actkey);
+
+    //! Upload the interpoint variables for send.
+    //! @param[in] actkey         the actkey store the information of the interpoint.
+    virtual void UploadInterpointData(ActionKey *actkey);
+
+    //! Download the interpoint variables from the receive data.
+    //! @param[in] actkey         the actkey store the information of the interpoint.
+    virtual void DownloadInterpointData(ActionKey *actkey);
+
+    virtual void CommunicationInterpointWeight(ActionKey *actkey);
+    virtual void DownloadInterpointWeight(ActionKey *actkey);
+
+    void GetOversetData(ActionKey *actkey);
+    void TranslateOversetData(ActionKey *actkey);
+
+    virtual void ModifyResiduals(Grid *grid);
+
+    void SolveOnGridSteady  (Grid *grid);
+    void SolveOnGridUnsteady(Grid *grid);
+
+    void SolveOnGrid(Grid *grid);
+
+    virtual void DumpInterfaceInfoBell();
+    virtual void RegisterCFDSolverInterfaceField();
+    void RegisterOversetField();
+
+    //! Register the interpoint field in the CFD solver.
+    virtual void RegisterCFDSolverInterpointField();
+
+    bool IsNeedStatistics();
+
+    bool IsNeedReynoldsStressStatistics();
+
+    void ComputeDualTimeCoefficient(int methodOfDualTime, RDouble *dualTimeCoefficient);
+
+    virtual void FreeGradientProxy(Grid *grid) {};
+
+private:
+    void RegisterInterfaceField(Grid *grid, const string &name, const int type, const int dimesion);
+
+    //! register the interpoint value field for translating.
+    //! @param[in] grid         the mesh in the computing.
+    //! @param[in] name         name of the value field.
+    //! @param[in] type         type of the value field.
+    //! @param[in] dimesion      dimesion of the value field.
+    void RegisterInterpointField(Grid *grid, const string &name, const int type, const int dimesion);
+
+    void GetInterfaceData(InterfaceInfo *iterfaceInfo, ActionKey *actkey, InterfaceDataProxy *interfaceDataProxy);    void TranslateInterfaceData(InterfaceInfo *iterfaceInfo, ActionKey *actkey, InterfaceDataProxy *interfaceDataProxy);
+    streamsize TranslateInterfaceDataLength(InterfaceInfo *iterfaceInfo, ActionKey *actkey, InterfaceDataProxy *interfaceDataProxy);
+    
+    //! Translate the interpoint data length using MPI.
+    //! @param[in] interpointInformation         interpoint information for store the interpoint.
+    //! @param[in] actkey         the actkey store the information of the interpoint.
+    //! @param[in] interpointDataProxy         a proxy to store the interpoint value.
+    streamsize TranslateInterpointDataLength(InterpointInformation *interpointInformation, ActionKey *actkey, InterpointDataProxy *interpointDataProxy);
+    void GetOversetInterfaceData  (OversetInformationProxy *oversetInfoProxy, ActionKey *actkey, InterfaceDataProxy *interfaceDataProxy);
+    void TranslateOversetInterfaceData(OversetInformationProxy *oversetInfoProxy, ActionKey *actkey, InterfaceDataProxy *interfaceDataProxy);
+    void PutCorrection(Grid *grid, FieldProxy *fieldProxy, FieldProxy *old_field_proxy, int neqn);
+
+    //! Get the interpoint data.
+    //! @param[in] interpointInformation         interpoint information for store the interpoint.
+    //! @param[in] actkey         the actkey store the information of the interpoint.
+    //! @param[in] interpointDataProxy         a proxy to store the interpoint value.
+    void GetInterpointData (InterpointInformation *interpointInformation, ActionKey *actkey, InterpointDataProxy * interpointDataProxy);
+
+    //! Translate the interpoint data using MPI.
+    //! @param[in] interpointInformation         interpoint information for store the interpoint.
+    //! @param[in] actkey         the actkey store the information of the interpoint.
+    //! @param[in] interpointDataProxy         a proxy to store the interpoint value.
+    void TranslateInterpointData(InterpointInformation *interpointInformation, ActionKey *actkey, InterpointDataProxy * interpointDataProxy);
+
+public:
+    virtual void SolveIncomSteadyField() {};
+
+protected:
+    Post_Visual *postVisualization;
+
+    Post_VisualWall *postVisualWall;
+
+    FieldProxy **dqProxy;
+
+    Param_CFDSolver *controlParameters;
+};
+
+void UpdateInterfaceData();
+
+#include "CFDSolver.hxx"
+
+#ifdef USE_GMRESSOLVER
+PetscErrorCode MyKSPMonitor(KSP ksp, PetscInt n, PetscReal rnorm, void *dummy);
+#endif
+
+}
diff --git a/CFD/Solver/include/CFDSolver.hxx b/CFD/Solver/include/CFDSolver.hxx
new file mode 100644
index 0000000..f1c61a4
--- /dev/null
+++ b/CFD/Solver/include/CFDSolver.hxx
@@ -0,0 +1,52 @@
+inline int CFDSolver::GetNPostSolve() 
+{
+	return 1; 
+}
+
+inline int CFDSolver::GetZoneLocalID(void)
+{
+	int g = 0;
+	Grid * grid = this->GetGeometry()->GetGrid(g);
+	return grid->GetZoneLocalID();
+}
+
+inline uint_t CFDSolver::GetNumberOfMultiGrid()
+{
+	return this->GetGeometry()->GetNumberOfMultiGrid(); 
+}
+
+inline Grid *CFDSolver::GetGrid(int level)
+{
+	return this->GetGeometry()->GetGrid(level);
+}
+
+inline string CFDSolver::CastName(const string &name)
+{
+	return name; 
+}
+
+inline int CFDSolver::GetNumberOfEquations() 
+{
+	return 1; 
+}
+
+inline void CFDSolver::SetPostVisualization(Post_Visual *postVisualization)
+{
+	this->postVisualization = postVisualization;
+}
+
+inline Post_Visual* CFDSolver::GetPostVisualization()
+{
+	return this->postVisualization;
+}
+
+inline void CFDSolver::SetPostVisualizationWall(Post_VisualWall *postVisualization_in)
+{
+    this->postVisualWall = postVisualization_in;
+}
+
+inline Post_VisualWall* CFDSolver::GetPostVisualizationWall()
+{
+    return this->postVisualWall;
+}
+
diff --git a/CFD/Solver/include/Controller.h b/CFD/Solver/include/Controller.h
new file mode 100644
index 0000000..26de90b
--- /dev/null
+++ b/CFD/Solver/include/Controller.h
@@ -0,0 +1,334 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Controller.h
+//! @brief     the class 'Controller' is used to assemble grid zones and \n
+//!            solvers together to simulate. All simulations are controlled \n
+//!            by the class 'Controller'.
+//! @author    Bell.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "Precision.h"
+#include <vector>
+namespace PHSPACE
+{
+class Zone;
+class Region;
+class FieldProxy;
+class CFDSolver;
+class ZoneFieldProxy;
+
+//! @brief  It defines the class 'Controller', which is used to assemble grid zones and
+//!         solvers together to simulate. All simulations are controlled by this class.
+//!         All solvers are implemented in the way of multi-grid cycles, which is defined
+//!         in Controller.
+class Controller
+{
+private:
+    //! Computational region, in which the local computational grids are defined.
+    //! this is the very important base of the CFD solver.
+    Region *region;
+
+    //! Flow field variables proxy, actually, it stores the fields on different grid levels in MG.
+    ZoneFieldProxy *qProxy;
+
+    //! Right Hand Side (RHS) proxy, actually, it stores the RHS on different grid levels in MG.
+    ZoneFieldProxy *rhsProxy;
+
+    //! Solver index.
+    int solverID;
+
+public:
+    Controller(int iSolver, Region *region);
+    ~Controller();
+
+public:
+    LIB_EXPORT void Initialize(int iSolver);
+    LIB_EXPORT void InitCoarseGridsFlow(int iSolver, int level);
+
+    LIB_EXPORT void CleanUp(int iSolver);
+    
+    //! Steady simulation by implementing multi-grid cycle.
+    //! Each solver simulation will be controlled by this multi-grid cycle, and this is the right
+    //! reason why this class is named as 'Controller'.
+    //! The standard simulation order is:
+    //! Zero residual --> go into Multi-Grid cycle, if single level grid used, go to Relaxation directly.
+    LIB_EXPORT void SolveSteadyField();
+
+    //! Steady simulation by implementing multi-grid cycle.
+    //! Each solver simulation will be controlled by this multi-grid cycle, and this is the right
+    //! reason why this class is named as 'Controller'.
+    //! The standard simulation order is:
+    //! Zero residual --> go into Multi-Grid cycle, if single level grid used, go to Relaxation directly.
+    LIB_EXPORT void SolveIncomSteadyField(int iSolver, int level = 0);
+
+    //! Steady simulation by implementing multi-grid cycle.
+    //! Each solver simulation will be controlled by this multi-grid cycle, and this is the right
+    //! reason why this class is named as 'Controller'.
+    //! The standard simulation order is:
+    //! Zero residual --> go into Multi-Grid cycle, if single level grid used, go to Relaxation directly.
+    LIB_EXPORT void SolveHyrbridDBPBSteadyField(int iSolver, int level = 0);
+
+    //! Unsteady simulation using Dual Time Step method.
+    //! In which, the steady simulation process is used as the virtual dual time step (or sub-iteration),
+    //! and the steady relaxation sub-iterations are nested inside the real physical time step.
+    LIB_EXPORT void SolveUnsteadyField();
+
+    //! Update unsteady flow.
+    //! The the flow field of n+1 physical time step is updated by using the last sub-iteration results.
+    void UpdateUnsteadyFlow(int iSolver, int level = 0);
+    //! Multi-Grid (MG) acceleration cycle control.
+    //! All MG stages are defined in it, such as relaxation, restriction, prolongation, correction.
+    void MultiGrid(int iSolver, int level = 0);
+
+    //! Implicit and explicit time integration.
+    //! Time step is first computed, and then using Runge-Kutta or LUSGS or other methods to advancing one step.
+    void Relaxation(int iSolver, int level);
+
+    //! Computing time step of each iteration, in which CFL number is used.
+    //! Both local and global methods are defined. Computing process:\n
+    //!   1. Compute time step of each zone.\n
+    //!   2. Compute the global minimum time step.\n
+    //!   3. Balance time step by reducing time step to no more than k-times of global minimum time step.
+    void TimeStep(int iSolver, int level);
+
+    //! Compute the inviscous/viscous/chemical spectrum radius, \n
+    //! the results stored in array invSpectralRadius and visSpectralRadius and srs.
+    void SpectrumRadius(int iSolver, int level);
+
+    //! Compute the diagonal 'matrix' for LU-SGS. Although it is named as 'matrix',
+    //! only scale variable is used since the Jacobian matrix is simplified to be spectrum radius.
+    void Diagonal(int iSolver, int level);
+
+    //! Compute and return the global minimum time step.
+    //! For parallel computing, all_reduce is used to communicate the global minimum value.
+    RDouble ComputeMinTimeStep(int iSolver, int level);
+
+    //! Balance time step by reducing time step to no more than k-times of global minimum time step.
+    void ReduceMaxTimeStep(int iSolver, int level);
+
+    //! Set residual to be zero.
+    void ZeroResiduals(int iSolver, int level = 0);
+
+    //! Compute solver residual, by computing inviscid and viscous flux and source terms.
+    void LoadResiduals(int iSolver, int level);
+
+    //! Compute inviscid and viscous flux and source terms.
+    void UpdateResiduals(int iSolver, int level);
+
+    void UpdateResidualsOnlyforMixGrid(int iSolver, int level);
+
+    //! Compute pressure factor for entropy fix (Method 2).
+    void PressureFactor(int iSolver, int level);
+
+    //! Compute the gama and temperature of flowfield on the level-th multigrid.
+    void ComputeGamaAndTField(int iSolver, int level);
+
+    //! Compute the independent flowfield value (such as gama/temperature/laminar viscous/gradient) on the level-th multigrid.
+    void UpdateIndependentField(int iSolver, int level);
+
+    //! Set the boundary condition of flowfield on the level-th multigrid.
+    void SetBoundaryValueOfField(int iSolver, int level);
+
+    void MixingPlaneBoundary(int iSolver, int level);
+
+    void PreSolveforStructHighOrder(int iSolver, int level);
+
+    void GetIndependentVariablesforStructHighOrder(int iSolver, int level);
+
+    void GetDependentVariablesforStructHighOrder(int iSolver, int level);
+
+    //! Compute the gama and temperature of flowfield on the level-th multigrid.
+    void ComputeViscousCoeff(int iSolver, int level);
+
+    //! Compute the cross and blending function F1 and F2 term of turbulence flow.
+    void ComputeBlendFunctionSST(int iSolver, int level);
+
+    //! Compute gradient for viscous flux computation.
+    void ComputeGradient(int iSolver, int level);
+
+    void ComputeLimiter(int iSolver, int level);
+
+    //! Compute node bctype.
+    void ComputeNodeBCType();
+    void CommunicationNodeBCType();
+
+    //! Relaxation by explicit Runge-Kutta method.
+    void RungeKutta(int iSolver, int level);
+
+    //! Define the post-processing for each solver.
+    void PostSolve(int level = 0);
+
+    //! Flow field interpolation to fine grid from computing results on coarse grid.
+    LIB_EXPORT void InterpolatFineGrid(int iSolver, int level);
+
+    //! Flow initialization using coarse level if Multi-Grid is used.
+    LIB_EXPORT void MultiGridInitFlow(int level);
+
+    //! Compute the sub-iteration norm.
+    RDouble ComputeSubIterationNorm(int iSolver, int level);
+
+private:
+    //! Get the current being used solver index.
+    int  GetSolverIndex();
+
+    //! Get the number of post-processing which is need for each solver.
+    int  GetNPostSolve(int iSolver);
+
+    //! Get flow field on multi-grid of 'level' of iSolver-th solver.
+    FieldProxy **GetQProxy  (int level);
+
+    //! Get Right Hand Side on multi-grid of 'level' of iSolver-th solver.
+    FieldProxy **GetRHSProxy(int level);
+
+    //!
+    Zone * GetZone(int iZone);
+
+    CFDSolver * GetCFDSolver(int iZone, int iSolver);
+
+#ifdef USE_GMRESSOLVER
+public:
+    //! GMRES solver -- a linear system solver
+    //! This method can be referenced "Sen Zhang, Boqian Wang, et al. Implementation of a Newton-Krylov Algorithm in the Open-source Solver PHengLEI[C]."
+    //! GPPS Hong Kong , October 17-19, 2023.
+    void GMRESSolver(int iSolver, int level);
+    void GMRESSolver_Coupled(int level);  // GMRESCoupled
+    void GMRESSolver_backupversion(int iSolver, int level);
+    void GMRESForZone(RDouble **dRdq, std::vector<int>& AI, std::vector<int>& AJ, RDouble **res, FieldProxy *dqProxy, const int& nTotalcells, const int& nEquations);  //GMRESSparse GMRESCSR
+#endif
+
+private:
+    //! For New LUSGS with one sweep, Sub-routines of LUSGS method, which is divided into 4 steps.
+    void LUSGS(int iSolver, int level);
+    void DualTimeStepsLUSGS(int iSolver, int level);
+    void LUSGSInitialization(int iSolver, int level, int nSweep, FieldProxy **dqProxy, FieldProxy **LUplusDQ);
+    void BLUSGSInitialization(int iSolver, int level, int nSweep, FieldProxy **dqProxy, FieldProxy **LUplusDQ);
+    void MatrixLUSGSInitialization(int iSolver, int level, int nSweep, FieldProxy **dqProxy, FieldProxy **LUplusDQ);
+    void ForwardSweep(int iSolver, int level, FieldProxy **dqProxy, FieldProxy **LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+    void BackwardSweep(int iSolver, int level, FieldProxy **dqProxy, FieldProxy **LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+    void UpdateFlowField(int iSolver, int level, FieldProxy **dqProxy);
+    void DetermineCFLNumber(int iSolver, int level, FieldProxy **dqProxy, FieldProxy **dqProxy1);
+
+    void CommunicationInterfaceData(int iSolver);
+    void CommunicationInterfaceDataOneLevel(int iSolver, int level);
+    void CommunicationDQ(int iSolver, int level, FieldProxy **dqProxy);
+    void CommunicateGenericArray(int iSolver, int level);
+    void CommunicateGradientArray(int iSolver, int level);
+    void CommunicateGradientandLimitOnlyForMixGrid();
+    void CommunicateQlQrOnlyforMixGrid();
+    void CommunicateFacefluxOnlyforMixGrid();
+
+    void LHS(int iSolver, int level, FieldProxy **resProxy, const RDouble &coef);
+    void FillField(int iSolver, int level, FieldProxy **targetProxy, FieldProxy **sourceProxy);
+
+    //! To start the block LU-SGS Method.
+    //! @param[in ]: iSolver is the serial number of the current solver.
+    //! @param[in ]: level denotes the serial number of the layer where the variables are compute in the multigrid method.
+    //void BLUSGS(int iSolver, int level);
+
+    //! Block Lower-Upper Symmetric Gauss�CSeidel Scheme for unstruct grid.
+    void BLUSGS(int iSolver, int level);
+
+    //! Forward sweep in BLUSGS methods.
+    void ForwardSweepBLUSGS(int iSolver, int level, FieldProxy **dqProxy, FieldProxy **LUplusDQ, RDouble &sweepNormal , int &iSweep);
+    
+    //! Backward sweep in BLUSGS methods.
+    void BackwardSweepBLUSGS(int iSolver, int level, FieldProxy **dqProxy, FieldProxy **LUplusDQ, RDouble &sweepNormal);
+
+    //! Matix Lower-Upper Symmetric Gauss�CSeidel Scheme for struct grid.
+    void MatrixLUSGS(int iSolver, int level);
+
+    //! Forward sweep in MatrixLUSGS methods.
+    void ForwardSweepMatrixLUSGS(int iSolver, int level, FieldProxy **dqProxy, FieldProxy **LUplusDQ, RDouble &sweepNormal , int &iSweep);
+    
+    //! Backward sweep in MatrixLUSGS methods.
+    void BackwardSweepMatrixLUSGS(int iSolver, int level, FieldProxy **dqProxy, FieldProxy **LUplusDQ, RDouble &sweepNormal);
+
+    //! Line implicit Lower-Upper Symmetric Gauss�CSeidel Scheme for unstruct grid.
+    void LineLUSGS(int iSolver, int level);
+
+    void LineLUSGSInitialization(int iSolver, int level, int nSweep, FieldProxy **dqProxy, FieldProxy **LUplusDQ);
+
+    //! Forward sweep in line BLUSGS methods.
+    void ForwardSweepLineLUSGS(int iSolver, int level, FieldProxy** dqProxy, FieldProxy** LUplusDQ, RDouble& sweepNormal, int& iSweep);
+
+    //! Backward sweep in line LUSGS methods.
+    void BackwardSweepLineLUSGS(int iSolver, int level, FieldProxy** dqProxy, FieldProxy** LUplusDQ, RDouble& sweepNormal);
+
+
+    //! To execute the forward sweep of the block LU-SGS method.
+    //! @param[in ]: iSolver is the serial number of the current solver.
+    //! @param[in ]: level denotes the serial number of the layer where the variables are compute in the multigrid method.
+    //! @param[out]: dqProxy is an array that stores the difference values between the conservative variables at n and n+1 time step.
+    //void ForwardSweepBLUSGS(int iSolver, int level, FieldProxy **dqProxy);
+
+    //! To execute the backward sweep of the block LU-SGS method.
+    //! @param[in ]: iSolver is the serial number of the current solver.
+    //! @param[in ]: level denotes the serial number of the layer where the variables are compute in the multigrid method.
+    //! @param[out]: dqProxy is an array that stores the difference values between the conservative variables at n and n+1 time step.
+    //void BackwardSweepBLUSGS(int iSolver, int level, FieldProxy **dqProxy);
+
+    void RungeKuttaThirdTVD(int iSolver, int level);
+    void CreatqProxyfor3rdRK(int iSolver, int level, FieldProxy **q0Proxy);
+    void Stagefor3rdRK(int iSolver, int level, FieldProxy **q0Proxy, int nstage);
+    
+    //! MG stages.
+    void InitResidual(int iSolver, int level);
+    void LoadQ(int iSolver, int level);
+    void RestrictAllQ(int iSolver, int level);
+    void RestrictDefect(int iSolver, int level);
+    void PutCorrection(int iSolver, int level);
+    void PutCorrectionBack(int iSolver, int level);
+    void CorrectFineGrid(int iSolver, int level);
+
+    void CreateQProxy   (int iSolver, int level);
+    void DestroyQProxy  (int level);
+    void CreateRHSProxy (int iSolver, int level);
+    void DestroyRHSProxy(int level);
+
+    void StoreRhsByResidual(int iSolver, int level);
+    void RecoverResidual   (int iSolver, int level);
+    bool CVGNorm(int iSolver, int level = 0);
+    bool ISCoarsestGrid(int level);
+
+    bool JudgeIfCalTheZoneForDensityBasedMethod(int zoneID, int iSolver);
+    bool JudgeIfCalTheZoneForPressureBasedMethod(int zoneID, int iSolver);
+};
+
+class MultiGridFieldProxy
+{
+private:
+    int iSolver, level, nzone;
+    FieldProxy **field_proxy;
+public:
+    MultiGridFieldProxy(int iSolver, int level, int nZone);
+    ~MultiGridFieldProxy();
+public:
+    FieldProxy ** GetFieldProxy() { return field_proxy; }
+};
+
+class ZoneFieldProxy
+{
+private:
+    int iSolver, nzone;
+    uint_t nlevel;
+    MultiGridFieldProxy **field_proxy;
+public:
+    ZoneFieldProxy(int iSolver, uint_t nLevel, int nZone);
+    ~ZoneFieldProxy();
+public:
+    FieldProxy ** GetFieldProxy(int level);
+};
+
+#include "Controller.hxx"
+
+}
diff --git a/CFD/Solver/include/Controller.hxx b/CFD/Solver/include/Controller.hxx
new file mode 100644
index 0000000..1e89ba5
--- /dev/null
+++ b/CFD/Solver/include/Controller.hxx
@@ -0,0 +1,4 @@
+inline int Controller::GetSolverIndex()
+{
+	return solverID;
+}
\ No newline at end of file
diff --git a/CFD/Solver/include/Param_CFDSolver.h b/CFD/Solver/include/Param_CFDSolver.h
new file mode 100644
index 0000000..e5a65a9
--- /dev/null
+++ b/CFD/Solver/include/Param_CFDSolver.h
@@ -0,0 +1,245 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Param_CFDSolver.h
+//! @brief     Record parameters of CFD Solver.
+//! @author    Bell, Zhang Jian, Wan Yunbo, Meng Liyuan.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "Precision.h"
+
+namespace PHSPACE
+{
+
+class Param_CFDSolver
+{
+public:
+    LIB_EXPORT Param_CFDSolver();
+
+    LIB_EXPORT virtual ~Param_CFDSolver();
+
+public:
+    //! Get restart flow file name.
+    virtual const string & GetRestartNSFile() const { return restartNSFile; }
+
+    //! Get res file name.
+    virtual const string & GetResSaveFile() const { return resSaveFile; }
+
+    //! Get flow field name.
+    virtual const string & GetFlowFieldTecFile() const { return flowFieldTecFile; };
+
+    //! Init all parameters.
+    LIB_EXPORT virtual void Init();
+
+    //! Get reference mach number.
+    RDouble GetRefMachNumber() const;
+
+    //! Get reference reynolds number.
+    RDouble GetRefReNumber() const;
+
+    //! Get the count backwards of reference reynolds number.
+    RDouble GetoRefReNumber() const;
+
+    //! Get if need plot volume field.
+    int GetPlotFieldType() const;
+
+    //! Get lower range of plotting field.
+    const RDouble * GetLowerPlotFieldBox() const;
+
+    //! Get upper range of plotting field.
+    const RDouble * GetUpperPlotFieldBox() const;
+
+    //! Get viscous model type.
+    int GetViscousType() const;
+
+    //! Get viscous model name
+    const string & GetViscousName() const;
+
+    //! Return the flow is viscous or not.
+    bool IsViscous() const;
+
+    //! Get if unsteady of steady.
+    int GetIsUnsteady() const;
+
+    //! Get interval steps of dumping residuals.
+    int GetIntervalStepRes() const;
+
+    //! Get interval steps of dumping flow field.
+    int GetIntervalStepPlot() const;
+
+    //! Get if using ALE method.
+    int GetIsCodeOfAleModel() const;
+
+    //! Get CFL when computing start.
+    RDouble GetCFLStart() const;
+
+    //! Get final CFL.
+    RDouble GetCFLEnd() const;
+
+    RDouble GetFineCFL() const;
+
+    RDouble GetPMax() const;
+    RDouble GetPMin() const;
+    RDouble GetDeltaMax() const;
+    RDouble GetMagnifyFactor() const;
+    RDouble GetReduceFactor() const;
+
+    //! The number of step when cfl increase from CFLStart to CFLEnd.
+    int GetCFLVaryStep() const;
+
+    //! Get number of MultiGrid level.
+    int GetNMGLevel() const;
+
+    //! Get LUSGS sweeps.
+    int GetNLUSGSSweeps() const;
+
+    //! Get tolerance of LUSGS scheme.
+    RDouble GetLUSGSTolerance() const;
+    int GetIntervalStepFlow() const;
+
+    int GetIfLocalTimeStep() const;
+
+    RDouble GetTorqueRefX() const;
+    RDouble GetTorqueRefY() const;
+    RDouble GetTorqueRefZ() const;
+
+    //! Get reference gama value.
+    RDouble GetRefGama() const;
+
+    //! Get reference dimensional density.
+    RDouble GetRefDimensionalPressure() const;
+
+    //! Get reference dimensional density.
+    RDouble GetRefDimensionalDensity() const;
+
+    //! Get reference dimensional velocity.
+    RDouble GetRefDimensionalVelocity() const;
+
+    //! Get reference dimensional sonic speed.
+    RDouble GetRefDimensionalSonicSpeed() const;
+
+    //! Get reference dimensional temperature.
+    RDouble GetRefDimensionalTemperature() const;
+
+     //! Get AusmpwPlusLimiter.
+    RDouble GetAusmpwPlusLimiter() const;
+
+    //! Get trTemperatureMin
+    RDouble GetTrTemperatureMinNonDim() const;
+    //! Get flag of starting from steady result.
+    int GetIfStartFromSteadyResults() const;
+
+    //! Get flag of statics flow field.
+    int GetIfStaticsFlowField() const;
+
+    //! Get flag of statics reynolds stress.
+    int GetIfStaticsReynoldsStress() const;
+
+    //! Get method of computing statistical reynolds stress.
+    int GetStatisticMethod() const;
+
+    int GetIsOverLapping() const;
+
+    RDouble GetSkewnessAngle() const;
+    //! Get parameter judge whether modify Wenn Scheme.
+    int GetWennSchemeFlag() const;
+
+    int GetnDiagonalModifiedTurb() const;
+
+    //! Get if carry out precondition or not.
+    int GetIfLowSpeedPrecon() const;
+
+    int GetnNumberOfSpeedStep() const;
+    int *GetSpeedVaryStep() const;
+    RDouble *GetSpeedVaryCoef() const;
+
+    int GetnNumberOfCFLStep() const;
+    int *GetCFLVaryMultiStep() const;
+    RDouble *GetCFLVaryCoef() const;
+
+private:
+    string restartNSFile;
+    string resSaveFile;
+    string flowFieldTecFile;
+
+    RDouble refMachNumber;
+    RDouble refReNumber;
+    RDouble oRefReNumber;
+
+    int plotFieldType;
+
+    RDouble lowerPlotFieldBox[3];
+    RDouble upperPlotFieldBox[3];
+
+    int viscousType;
+    string viscousName;
+
+    int isUnsteady;
+    int intervalStepRes;
+    int intervalStepPlot;
+
+    int isAle;
+
+    RDouble CFLStart;
+    RDouble CFLEnd;
+    RDouble fineCFL;
+    int CFLVaryStep;
+    RDouble pMax, pMin, deltaMax, magnifyFactor, reduceFactor;
+
+    int nNumberOfSpeedStep;
+    int *speedVaryStep;
+    RDouble *speedVaryCoef;
+
+    int nNumberOfCFLStep;
+    int *CFLVaryMultiStep;
+    RDouble *CFLVaryCoef;
+
+    int nMGLevel;
+
+    int nLUSGSSweeps;
+    RDouble LUSGSTolerance; 
+
+    RDouble refGama;
+    RDouble refDimensionalPressure;
+    RDouble refDimensionalDensity;      
+    RDouble refDimensionalSonicSpeed;  
+    RDouble refDimensionalTemperature;
+    RDouble refDimensionalVelocity;
+
+    RDouble AusmpwPlusLimiter;
+
+    RDouble trTemperatureMinNonDim;
+
+    int ifStartFromSteadyResults;
+    int ifStaticsFlowField;
+    int ifStaticsReynoldsStress;
+    int statisticMethod;
+    int intervalStepFlow;
+    int ifLocalTimeStep;
+
+    RDouble TorqueRefX;
+    RDouble TorqueRefY;
+    RDouble TorqueRefZ;
+
+    int isOverset;
+    int isWennScheme;
+
+    RDouble skewnessAngle;
+
+    int nDiagonalModifiedTurb;
+
+    //! For incompressible flow (mach < 0.3), using precondition method or not.
+    int ifLowSpeedPrecon;
+};
+
+#include "Param_CFDSolver.hxx"
+}
\ No newline at end of file
diff --git a/CFD/Solver/include/Param_CFDSolver.hxx b/CFD/Solver/include/Param_CFDSolver.hxx
new file mode 100644
index 0000000..fd364da
--- /dev/null
+++ b/CFD/Solver/include/Param_CFDSolver.hxx
@@ -0,0 +1,263 @@
+inline RDouble Param_CFDSolver::GetRefMachNumber() const
+{
+    return refMachNumber;
+}
+
+inline RDouble Param_CFDSolver::GetRefReNumber() const
+{
+    return refReNumber;
+}
+
+inline RDouble Param_CFDSolver::GetoRefReNumber() const
+{
+    return oRefReNumber;
+}
+
+inline int Param_CFDSolver::GetPlotFieldType() const
+{
+    return plotFieldType;
+}
+
+inline const RDouble * Param_CFDSolver::GetLowerPlotFieldBox() const
+{
+    return lowerPlotFieldBox;
+}
+
+inline const RDouble * Param_CFDSolver::GetUpperPlotFieldBox() const
+{
+    return upperPlotFieldBox;
+}
+
+inline int Param_CFDSolver::GetViscousType() const
+{
+    return viscousType;
+}
+
+inline const std::string & Param_CFDSolver::GetViscousName() const
+{
+    return viscousName;
+}
+
+inline bool Param_CFDSolver::IsViscous() const
+{
+    return (viscousType != 0);
+}
+
+inline int Param_CFDSolver::GetIsUnsteady() const
+{
+    return isUnsteady;
+}
+
+inline int Param_CFDSolver::GetIntervalStepRes() const
+{
+    return intervalStepRes;
+}
+
+inline int Param_CFDSolver::GetIntervalStepPlot() const
+{
+    return intervalStepPlot;
+}
+
+inline int Param_CFDSolver::GetIsCodeOfAleModel() const
+{
+    return isAle;
+}
+
+inline RDouble Param_CFDSolver::GetCFLStart() const
+{
+    return CFLStart;
+}
+
+inline RDouble Param_CFDSolver::GetPMax() const
+{
+    return pMax;
+}
+
+inline RDouble Param_CFDSolver::GetPMin() const
+{
+    return pMin;
+}
+
+inline RDouble Param_CFDSolver::GetDeltaMax() const
+{
+    return deltaMax;
+}
+
+inline RDouble Param_CFDSolver::GetMagnifyFactor() const
+{
+    return magnifyFactor;
+}
+
+inline RDouble Param_CFDSolver::GetReduceFactor() const
+{
+    return reduceFactor;
+}
+
+inline RDouble Param_CFDSolver::GetCFLEnd() const
+{
+    return CFLEnd;
+}
+
+inline RDouble Param_CFDSolver::GetFineCFL() const
+{
+    return fineCFL;
+}
+
+inline int Param_CFDSolver::GetCFLVaryStep() const
+{
+    return CFLVaryStep;
+}
+
+inline int Param_CFDSolver::GetNMGLevel() const
+{
+    return nMGLevel;
+}
+
+inline int Param_CFDSolver::GetNLUSGSSweeps() const
+{
+    return nLUSGSSweeps;
+}
+
+inline RDouble Param_CFDSolver::GetLUSGSTolerance() const
+{
+    return LUSGSTolerance;
+}
+
+inline int Param_CFDSolver::GetIntervalStepFlow() const
+{
+    return intervalStepFlow;
+}
+
+inline int Param_CFDSolver::GetIfLocalTimeStep() const
+{
+    return ifLocalTimeStep;
+}
+
+inline RDouble Param_CFDSolver::GetTorqueRefX() const
+{
+    return TorqueRefX;
+}
+
+inline RDouble Param_CFDSolver::GetTorqueRefY() const
+{
+    return TorqueRefY;
+}
+
+inline RDouble Param_CFDSolver::GetTorqueRefZ() const
+{
+    return TorqueRefZ;
+}
+
+//! Get reference gama vlaue
+inline RDouble Param_CFDSolver::GetRefGama() const
+{
+    return refGama;
+}
+
+inline RDouble Param_CFDSolver::GetRefDimensionalPressure() const
+{
+    return refDimensionalPressure;
+}
+
+inline RDouble Param_CFDSolver::GetRefDimensionalDensity() const
+{
+    return refDimensionalDensity;
+}
+
+inline RDouble Param_CFDSolver::GetRefDimensionalVelocity() const
+{
+    return refDimensionalVelocity;
+}
+
+inline RDouble Param_CFDSolver::GetRefDimensionalSonicSpeed() const
+{
+    return refDimensionalSonicSpeed;
+}
+
+inline RDouble Param_CFDSolver::GetRefDimensionalTemperature() const
+{
+    return refDimensionalTemperature;
+}
+
+inline RDouble Param_CFDSolver::GetAusmpwPlusLimiter() const
+{
+    return AusmpwPlusLimiter;
+}
+
+inline RDouble Param_CFDSolver::GetTrTemperatureMinNonDim() const
+{
+    return trTemperatureMinNonDim;
+}
+
+inline int Param_CFDSolver::GetIfStartFromSteadyResults() const
+{
+    return ifStartFromSteadyResults;
+}
+
+inline int Param_CFDSolver::GetIfStaticsFlowField() const
+{
+    return ifStaticsFlowField;
+}
+
+inline int Param_CFDSolver::GetIfStaticsReynoldsStress() const
+{
+    return ifStaticsReynoldsStress;
+}
+
+inline int Param_CFDSolver::GetStatisticMethod() const
+{
+    return statisticMethod;
+}
+
+inline int Param_CFDSolver::GetIsOverLapping() const
+{
+    return isOverset;
+}
+
+inline RDouble Param_CFDSolver::GetSkewnessAngle() const
+{
+    return skewnessAngle;
+}
+inline int Param_CFDSolver::GetnDiagonalModifiedTurb() const
+{
+    return nDiagonalModifiedTurb;
+}
+
+inline int Param_CFDSolver::GetWennSchemeFlag() const
+{
+    return isWennScheme;
+}
+inline int Param_CFDSolver::GetIfLowSpeedPrecon() const
+{
+    return ifLowSpeedPrecon;
+}
+
+inline int Param_CFDSolver::GetnNumberOfSpeedStep() const
+{
+    return nNumberOfSpeedStep;
+}
+inline int *Param_CFDSolver::GetSpeedVaryStep() const
+{
+    return speedVaryStep;
+}
+inline RDouble *Param_CFDSolver::GetSpeedVaryCoef() const
+{
+    return speedVaryCoef;
+}
+inline int Param_CFDSolver::GetnNumberOfCFLStep() const
+{
+    return nNumberOfCFLStep;
+}
+inline int *Param_CFDSolver::GetCFLVaryMultiStep() const
+{
+    return CFLVaryMultiStep;
+}
+inline RDouble *Param_CFDSolver::GetCFLVaryCoef() const
+{
+    return CFLVaryCoef;
+}
+
+
+
+
+
diff --git a/CFD/Solver/src/CFDSolver.cpp b/CFD/Solver/src/CFDSolver.cpp
new file mode 100644
index 0000000..eddf4b6
--- /dev/null
+++ b/CFD/Solver/src/CFDSolver.cpp
@@ -0,0 +1,3855 @@
+#include "CFDSolver.h"
+#include "Glb_Dimension.h"
+#include "IO_FileName.h"
+#include "TK_Parse.h"
+#include "Constants.h"
+#include "Residual.h"
+#include "Force.h"
+#include "AleForceManager.h"
+#include "Post_WriteVisualFile.h"
+#include "Task_ServerUpdateInterface.h"
+#include "Task_ServerUpdateInterpoint.h"
+#include "OversetInformation.h"
+#include "Param_CFDSolver.h"
+#include "FieldProxy.h"
+#include "PHIO.h"
+#include "TK_Exit.h"
+#include "TK_Log.h"
+#include <cstdio>
+#include <stdio.h>
+#include "TK_Time.h"
+
+#ifdef USE_TecplotLib
+#include "TECXXX.h"
+#endif
+
+#include "Gas.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+bool cfd_debug = false;
+
+CFDSolver::CFDSolver()
+{
+    postVisualization = 0;
+    dqProxy           = 0;
+    controlParameters = 0;
+    postVisualWall = 0;
+}
+
+CFDSolver::~CFDSolver()
+{
+    if (postVisualization != NULL)
+    {
+        delete postVisualization;
+        postVisualization = 0;
+    }
+    if (postVisualWall != NULL)
+    {
+        delete postVisualWall;
+        postVisualWall = 0;
+    }
+}
+
+void CFDSolver::InitMemory()
+{
+    InitControlParameters();
+
+    ReadParameter();
+
+    AllocateGlobalVariables();
+}
+
+void CFDSolver::ReleaseMemory()
+{
+    DeAllocateGlobalVariables();
+
+    FreeControlParameters();
+}
+
+void CFDSolver::InitFlow()
+{
+    int nstart = 0;
+
+    //! This method would be wrong when turbulent computational from laminar flow field.
+    //! But this situation breaks the law, so it is not considered.
+    bool readFlowFile = false;
+    if (JudgeIfRestart())
+    {
+        readFlowFile = true;
+
+        nstart = 1;
+        GlobalDataBase::UpdateData("nstart", &nstart, PHINT, 1);
+    }
+
+    if (!readFlowFile)
+    {
+        //int outerInterStep = 0;
+        //GlobalDataBase::UpdateData("outnstep", &outerInterStep, PHINT, 1);
+
+        nstart = 0;
+        GlobalDataBase::UpdateData("nstart", &nstart, PHINT, 1);
+
+        InitFlowAsRestart();
+    }
+    else
+    {
+        //! To read data in restart file for continual simulation.
+        ActionKey *actkeyReadRestartData = new ActionKey();
+        FillActionKey(actkeyReadRestartData, READ_RESTART, 0);
+        InitFlowAsReadingRestart(actkeyReadRestartData);
+        delete actkeyReadRestartData;
+    }
+
+    RDouble globalMinTimeStep = -LARGE;
+    GlobalDataBase::UpdateData("globalMinTimeStep", &globalMinTimeStep, PHDOUBLE, 1);
+
+    //! Compute gama, temperature, viscosity, and set boundary condition once.
+    InitDependentVariables();
+}
+
+void CFDSolver::InitProtectedFlow()
+{
+    int nstart = 0;
+
+    //! This method would be wrong when turbulent computational from laminar flow field.
+    //! But this situation breaks the law, so it is not considered.
+    bool readFlowFile = false;
+    if (JudgeIfProtectedRestart())
+    {
+        readFlowFile = true;
+
+        nstart = 1;
+        GlobalDataBase::UpdateData("nstart", &nstart, PHINT, 1);
+    }
+
+    if (!readFlowFile)
+    {
+        //int outerInterStep = 0;
+        //GlobalDataBase::UpdateData("outnstep", &outerInterStep, PHINT, 1);
+
+        nstart = 0;
+        GlobalDataBase::UpdateData("nstart", &nstart, PHINT, 1);
+
+        InitFlowAsRestart();
+    }
+    else
+    {
+        //! To read data in restart file for continual simulation.
+        ActionKey *actkeyReadRestartData = new ActionKey();
+        FillActionKey(actkeyReadRestartData, READ_RESTART, 0);
+        InitFlowAsReadingProtectedRestart(actkeyReadRestartData);
+        delete actkeyReadRestartData;
+    }
+
+    RDouble globalMinTimeStep = -LARGE;
+    GlobalDataBase::UpdateData("globalMinTimeStep", &globalMinTimeStep, PHDOUBLE, 1);
+
+    //! Compute gama, temperature, viscosity, and set boundary condition once.
+    InitDependentVariables();
+}
+
+void CFDSolver::InitCoarseGridsFlow ()
+{
+
+}
+
+void CFDSolver::InitFlowAsReadingRestart()
+{
+
+}
+
+bool CFDSolver::JudgeIfReadAverage()
+{
+    return false;
+}
+
+bool CFDSolver::JudgeIfRestart()
+{
+    return false;
+}
+
+bool CFDSolver::JudgeIfProtectedRestart()
+{
+    return false;
+}
+
+void CFDSolver::InitControlParameters()
+{
+
+}
+
+void CFDSolver::InitDependentVariables()
+{
+
+}
+
+void CFDSolver::FreeControlParameters()
+{
+    if (controlParameters)
+    {
+        delete controlParameters;
+        controlParameters = nullptr;
+    }
+}
+
+void CFDSolver::ReadParameter()
+{
+
+}
+
+void CFDSolver::InitFlowAsRestart()
+{
+
+}
+
+RDouble CFDSolver::UnsteadyConvergence(Grid *grid)
+{ 
+    return 0.0;
+}
+
+void CFDSolver::UpdateUnsteadyFlow(Grid *grid)
+{
+
+}
+
+void CFDSolver::UpdateUnsteadyVariable(Grid *grid)
+{
+
+}
+
+void CFDSolver::UpdateDt()
+{
+
+}
+
+LIB_EXPORT Param_CFDSolver * CFDSolver::GetControlParameters() const
+{
+    return controlParameters;
+}
+
+void CFDSolver::ComputePreconditionCoefficient(Grid *grid)
+{
+
+}
+
+void CFDSolver::ConservativePreconMatrix(Grid *grid)
+{
+
+}
+void CFDSolver::InviscidFlux(Grid *grid)
+{
+
+}
+
+void CFDSolver::ViscousFlux(Grid *grid)
+{
+
+}
+
+void CFDSolver::ComputeGradient(Grid *grid)
+{
+
+}
+
+void CFDSolver::ComputeLimiter(Grid *grid)
+{
+
+}
+
+void CFDSolver::Crossing(Grid *grid)
+{
+
+}
+
+void CFDSolver::Blending(Grid *grid)
+{
+
+}
+
+void CFDSolver::ComputeGradientCellCenter(Grid *grid)
+{
+
+}
+
+void CFDSolver::ComputeGradientCellCenterForLES(Grid *grid)
+{
+
+}
+
+void CFDSolver::SourceFlux(Grid *grid)
+{
+
+}
+
+void CFDSolver::TimeStep(Grid *grid)
+{
+
+}
+
+#ifdef USE_GMRESSOLVER
+void CFDSolver::GMRESSolver(Grid *gridIn, FieldProxy *dqProxy)
+{
+
+}  
+#endif
+
+void CFDSolver::ComputeMinTimeStep(Grid *grid, RDouble &minDt, RDouble &maxDt)
+{
+
+}
+
+void CFDSolver::ReduceMaxTimeStep(Grid *grid, RDouble globalMinDt)
+{
+
+}
+
+void CFDSolver::PostSolve(Grid *grid, int stage, int level)
+{
+
+}
+
+void CFDSolver::DumpResultFile(Grid *grid, int level)
+{
+
+}
+
+void CFDSolver::CheckResult(Grid *grid, int level)
+{
+
+}
+
+void CFDSolver::CheckResiduals(Grid *grid, int level)
+{
+
+}
+
+void CFDSolver::DumpCFLNumber(Grid *grid, int level)
+{
+
+}
+
+void CFDSolver::CheckSurfaceHeatingChange(Grid *grid, int level)
+{
+
+}
+
+void CFDSolver::DumpLeakageInformation(Grid *grid)
+{
+
+}
+
+void CFDSolver::ZeroResiduals(Grid *grid)
+{
+
+}
+
+void CFDSolver::UpdateResiduals(Grid *grid) 
+{
+
+}
+
+void CFDSolver::RestrictAllQ(Grid *fineGrid, Grid *coarseGrid)
+{
+
+}
+
+void CFDSolver::RestrictDefect(Grid *fineGrid, Grid *coarseGrid)
+{
+
+}
+
+void CFDSolver::PutCorrectionBack(Grid *grid, FieldProxy *qProxy)
+{
+
+}
+
+void CFDSolver::CorrectFineGrid(Grid *fineGrid, Grid *coarseGrid)
+{
+
+}
+
+void CFDSolver::InterpolatFineGrid(Grid *fineGrid, Grid *coarseGrid)
+{
+
+}
+
+void CFDSolver::StoreRhsByResidual(Grid *grid, FieldProxy *rhsProxy) 
+{
+
+}
+
+void CFDSolver::InitResidual(Grid *grid, FieldProxy *rhsProxy)
+{
+
+}
+
+void CFDSolver::RecoverResidual(Grid *grid, FieldProxy *rhsProxy)
+{
+
+}
+
+void CFDSolver::LoadQ(Grid *grid, FieldProxy *qProxy)
+{
+
+}
+
+FieldProxy *CFDSolver::CreateFieldProxy(Grid *grid) 
+{
+    return 0;
+}
+
+
+void CFDSolver::Solve()
+{
+
+}
+
+void CFDSolver::DumpRestart(ActionKey *actkey)
+{
+
+}
+
+void CFDSolver::DumpRestartH5(ActionKey *actkey)
+{
+
+}
+
+void CFDSolver::ReadRestart(ActionKey *actkey)
+{
+
+}
+
+void CFDSolver::ReadRestartH5(ActionKey *actkey)
+{
+
+}
+
+void CFDSolver::AllocateGlobalVariables()
+{
+    Grid *grid = GetGrid();
+    while (grid)
+    {
+        AllocateGlobalVar(grid);
+        grid = grid->GetCoarseGrid();
+    }
+
+    RegisterCFDSolverInterfaceField();
+    RegisterCFDSolverInterpointField();
+
+    Param_CFDSolver *parameters = GetControlParameters();
+    int isOverset = parameters->GetIsOverLapping();
+
+    if (isOverset)
+    {
+        RegisterOversetField();
+    }
+}
+
+void CFDSolver::DeAllocateGlobalVariables()
+{
+    Grid *grid = GetGrid(0);
+    int isOverset = GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+    while (grid)
+    {
+        DeAllocateGlobalVar(grid);
+        if (isOverset)
+        {
+            DeAllocateOversetInterfaceVar(grid);
+        }        
+        grid = grid->GetCoarseGrid();
+    }
+
+    ReleaseInterfaceField();
+}
+
+void CFDSolver::AllocateGlobalVar(Grid *grid)
+{
+    //! When multi-grid, only need allocate once for postVisualization.
+    if (postVisualization == 0)
+    {
+        int nVisualVariables = GlobalDataBase::GetIntParaFromDB("nVisualVariables");
+        int visualVariables[100] = {0};
+        GlobalDataBase::GetData("visualVariables", visualVariables, PHINT, nVisualVariables);
+        postVisualization = new Post_Visual(nVisualVariables, visualVariables);
+        SetPostVisualization(postVisualization);
+    }
+
+    if (postVisualWall == 0)
+    {
+        int nVisualWallVariables = GlobalDataBase::GetIntParaFromDB("nVisualWallVariables");
+        int visualWallVariables[30] = {0};
+        GlobalDataBase::GetData("visualWallVariables", visualWallVariables, PHINT, nVisualWallVariables);
+
+        Post_VisualWall *postVis = new Post_VisualWall(nVisualWallVariables, visualWallVariables);
+        this->SetPostVisualizationWall(postVis);
+    }
+}
+
+void CFDSolver::DeAllocateGlobalVar(Grid *grid)
+{
+    if (postVisualization != 0)
+    {
+        delete postVisualization;
+        postVisualization = 0;
+    }
+
+    if (postVisualWall != 0)
+    {
+        delete postVisualWall;
+        postVisualWall = 0;
+    }
+}
+
+void CFDSolver::RegisterCFDSolverInterfaceField()
+{
+
+}
+
+void CFDSolver::RegisterCFDSolverInterpointField()
+{
+
+}
+
+void CFDSolver::RegisterOversetField()
+{
+
+}
+
+void CFDSolver::RegisterInterfaceField(const string &name, const int type, const int dimesion)
+{
+    int solverID = this->GetIndex();
+    Grid *grid = GetGrid(0);
+    while (grid)
+    {
+        if (grid->GetInterfaceInfo())
+        {
+            grid->RegisterInterfaceField(name, type, dimesion, solverID);
+        }
+        grid = grid->GetCoarseGrid();
+    }
+}
+
+void CFDSolver::ReleaseInterfaceField()
+{
+    Grid *grid = GetGrid(0);
+    while (grid)
+    {
+        if (grid->GetInterfaceInfo())
+        {
+            grid->ReleaseInterfaceField();
+        }
+        grid = grid->GetCoarseGrid();
+    }
+}
+
+void CFDSolver::ReleaseInterfaceField(string varName)
+{
+    Grid *grid = GetGrid(0);
+    while (grid)
+    {
+        if (grid->GetInterfaceInfo())
+        {
+            grid->ReleaseInterfaceField(varName);
+        }
+        grid = grid->GetCoarseGrid();
+    }
+}
+
+void CFDSolver::RegisterInterpointField(const string & name, const int type, const int dimesion)
+{
+    int solverID = this->GetIndex();
+    Grid *grid = GetGrid(0);
+    while (grid)
+    {
+        if (grid->GetInterpointInfo())
+        {
+            grid->RegisterInterpointField(name, type, dimesion, solverID);
+        }
+        grid = grid->GetCoarseGrid();
+    }
+}
+
+LIB_EXPORT void CFDSolver::RegisterOversetField(const string &name, const int type, const int dimesion)
+{
+    Grid *grid = GetGrid(0);
+    while (grid)
+    {
+        UnstructGridCast(grid)->RegisterOversetField(name, type, dimesion);
+        grid = grid->GetCoarseGrid();
+    }
+}
+
+void CFDSolver::DeAllocateOversetInterfaceVar(Grid *grid)
+{
+    UnstructGrid *gridUnstr = UnstructGridCast(grid);
+    if (gridUnstr == NULL)
+    {
+        return;
+    }
+    OversetInfoProxy *oversetInfoProxy = gridUnstr->GetOversetInfoProxy();
+    if (oversetInfoProxy)
+    {
+        DeAllocateOversetInterfaceVar(oversetInfoProxy);
+        delete oversetInfoProxy;
+        oversetInfoProxy = NULL;
+    }
+}
+
+void CFDSolver::DeAllocateOversetInterfaceVar(OversetInfoProxy *oversetInfoProxy)
+{
+    DeAllocateOversetInterfaceVar(oversetInfoProxy->GetRecvDataStorage());
+    DeAllocateOversetInterfaceVar(oversetInfoProxy->GetSendDataStorage());
+}
+
+void CFDSolver::DeAllocateOversetInterfaceVar(Data_ParamFieldSuite *dataStore)
+{
+}
+
+void CFDSolver::GetInterfaceData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    Grid *grid = GetGrid(level);
+    InterfaceInfo *iterfaceInfo = grid->GetInterfaceInfo();
+    if (iterfaceInfo == 0)
+    {
+        return;
+    }
+
+    InterfaceDataProxy *interfaceDataProxy = new InterfaceDataProxy();
+
+    for (int indexGhostCellLayer = GetNumberOfGhostCellLayers() - 1; indexGhostCellLayer >= 0; -- indexGhostCellLayer)
+    {
+        PrepareInterfaceData(grid, iterfaceInfo->GetSendDataStorage(indexGhostCellLayer), interfaceDataProxy);
+    }
+
+    GetInterfaceData(grid->GetFinestGrid()->GetInterfaceInfo(),actkey,interfaceDataProxy);
+
+    delete interfaceDataProxy;
+}
+
+void CFDSolver::GetInterpointData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    Grid *grid = GetGrid(level);
+    InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+    if (interpointInformation == 0)
+    {
+        return;
+    }
+    InterpointDataProxy *interpointDataProxy = new InterpointDataProxy();
+
+    for (int i = GetNumberOfGhostCellLayers() - 1; i >= 0; -- i)
+    {
+        PrepareInterpointData(grid, interpointInformation->GetSendDataStorage(i), interpointDataProxy);
+    }
+
+    //PHSPACE::GetInterpointData(interfaceInfo,actkey,interpointDataProxy);
+    GetInterpointData(grid->GetFinestGrid()->GetInterpointInfo(),actkey,interpointDataProxy);
+
+    delete interpointDataProxy;
+}
+
+void CFDSolver::TranslateInterfaceData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    Grid *grid = GetGrid(level);
+    InterfaceInfo *iterfaceInfo = grid->GetInterfaceInfo();
+    if (iterfaceInfo == 0)
+    {
+        return;
+    }
+
+    InterfaceDataProxy *interfaceDataProxy = new InterfaceDataProxy();
+
+    for (int indexGhostCellLayer = GetNumberOfGhostCellLayers() - 1; indexGhostCellLayer >= 0; -- indexGhostCellLayer)
+    {
+        PrepareInterfaceData(grid, iterfaceInfo->GetRecvDataStorage(indexGhostCellLayer), interfaceDataProxy);
+    }
+
+    TranslateInterfaceData(grid->GetFinestGrid()->GetInterfaceInfo(),actkey,interfaceDataProxy);
+    delete interfaceDataProxy;
+}
+
+void CFDSolver::TranslateInterpointData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    Grid *grid = GetGrid(level);
+    InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+    if (interpointInformation == 0)
+    {
+        return;
+    }
+    InterpointDataProxy *interpointDataProxy = new InterpointDataProxy();
+
+    for (int i = GetNumberOfGhostCellLayers() - 1; i >= 0; -- i)
+    {
+        PrepareInterpointData(grid, interpointInformation->GetReceiveDataStorage(i), interpointDataProxy);
+    }
+
+    TranslateInterpointData(grid->GetFinestGrid()->GetInterpointInfo(),actkey,interpointDataProxy);
+    delete interpointDataProxy;
+}
+
+streamsize CFDSolver::TranslateInterfaceDataLength(ActionKey *actkey)
+{
+    int level = actkey->level;
+    Grid *grid = GetGrid(level);
+    InterfaceInfo *iterfaceInfo = grid->GetInterfaceInfo();
+    if (iterfaceInfo == 0)
+    {
+        return 0;
+    }
+    InterfaceDataProxy *interfaceDataProxy = new InterfaceDataProxy();
+
+    for (int indexGhostCellLayer = GetNumberOfGhostCellLayers() - 1; indexGhostCellLayer >= 0; -- indexGhostCellLayer)
+    {
+        PrepareInterfaceData(grid, iterfaceInfo->GetRecvDataStorage(indexGhostCellLayer), interfaceDataProxy);
+    }
+
+    streamsize nlen = TranslateInterfaceDataLength(grid->GetFinestGrid()->GetInterfaceInfo(),actkey,interfaceDataProxy);
+    
+    delete interfaceDataProxy;
+
+    return nlen;
+}
+
+streamsize CFDSolver::TranslateInterpointDataLength(ActionKey *actkey)
+{
+    int level = actkey->level;
+    Grid *grid = GetGrid(level);
+    InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+    if (interpointInformation == 0)
+    {
+        return 0;
+    }
+    InterpointDataProxy *interpointDataProxy = new InterpointDataProxy();
+
+    for (int indexGhostCellLayer = GetNumberOfGhostCellLayers() - 1; indexGhostCellLayer >= 0; -- indexGhostCellLayer)
+    {
+        PrepareInterpointData(grid, interpointInformation->GetReceiveDataStorage(indexGhostCellLayer), interpointDataProxy);
+    }
+
+    streamsize nlen = TranslateInterpointDataLength(grid->GetFinestGrid()->GetInterpointInfo(),actkey,interpointDataProxy);
+    
+    delete interpointDataProxy;
+
+    return nlen;
+}
+
+void CFDSolver::GetOversetData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    Grid *grid = GetGrid(level);
+
+    OversetInformationProxy *oversetInformationProxy = UnstructGridCast(grid)->GetOversetInformationProxy();
+
+    InterfaceDataProxy *interfaceDataProxy = new InterfaceDataProxy();
+
+    OversetDataProxy *oversetDataProxy = oversetInformationProxy->GetOversetDataProxyForSend();
+
+    Data_ParamFieldSuite *dataStorageForSend = oversetDataProxy->GetDataStorage();
+
+    PrepareOversetInterfaceData(dataStorageForSend, interfaceDataProxy);
+
+    GetOversetInterfaceData(oversetInformationProxy, actkey, interfaceDataProxy);
+
+    delete interfaceDataProxy;
+}
+
+void CFDSolver::TranslateOversetData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    Grid *grid = GetGrid(level);
+
+    OversetInformationProxy *oversetInformationProxy = UnstructGridCast(grid)->GetOversetInformationProxy();
+
+    InterfaceDataProxy *interfaceDataProxy = new InterfaceDataProxy();
+
+    OversetDataProxy *oversetDataProxy = oversetInformationProxy->GetOversetDataProxyForReceive();
+
+    Data_ParamFieldSuite *dataStorageForReveive = oversetDataProxy->GetDataStorage();
+
+    PrepareOversetInterfaceData(dataStorageForReveive, interfaceDataProxy);
+
+    TranslateOversetInterfaceData(oversetInformationProxy, actkey, interfaceDataProxy);
+    
+    delete interfaceDataProxy;
+}
+
+void CFDSolver::Boundary(Grid *grid)
+{
+
+}
+
+void CFDSolver::CalculateBoundaryData()
+{
+
+}
+
+void CFDSolver::ModifyResiduals(Grid *grid)
+{
+
+}
+
+void CFDSolver::GetResidual(ActionKey *actkey)
+{
+
+}
+
+void CFDSolver::GetResidual(ActionKey *actkey, RDouble &localMaxRes)
+{
+
+}
+
+void CFDSolver::GetResidual(Grid *gridIn, RDouble &localMaxRes)
+{
+
+}
+
+void CFDSolver::ObtainCFLNumber(Grid *gridIn, RDouble &globalMinCFL, RDouble &globalMaxCFL)
+{
+
+}
+
+void CFDSolver::GetSurfaceHeatingChange(ActionKey *actkey, RDouble &localMaxHeatChange)
+{
+
+}
+
+void CFDSolver::PrepareInterfaceData(Grid *grid, Data_ParamFieldSuite *dataStore, InterfaceDataProxy *interfaceDataProxy)
+{
+    InterfaceFields *interfaceFields = grid->GetInterfaceFields();
+    if (!interfaceFields)
+    {
+        return;
+    }
+
+    vector <RDouble **> &vectorData = interfaceDataProxy->GetVectorData();
+    vector <int> &vectorDimension = interfaceDataProxy->GetVectorDimension();
+    vector<string> &vectorName = interfaceDataProxy->GetVectorName();
+
+    for (int iData = 0; iData < interfaceFields->Size(); ++ iData)
+    {
+        int solverID = interfaceFields->GetSolverIndex(iData);
+        if(solverID != this->GetIndex())
+        {
+            //! This data is not belong to this solver.
+            continue;
+        }
+
+        int dataDimension = interfaceFields->GetDim(iData);
+        string &dataName = interfaceFields->GetName(iData);
+        RDouble **data = reinterpret_cast <RDouble **> (dataStore->GetDataPtr(dataName));
+
+        vectorDimension.push_back(dataDimension);
+        vectorData.push_back(data);
+        vectorName.push_back(dataName);
+    }
+}
+
+void CFDSolver::PrepareInterpointData(Grid *grid, Data_ParamFieldSuite *datastore, InterpointDataProxy *interpointDataProxy)
+{
+    InterpointFields *interpointFields = grid->GetInterpointFields();
+    if (!interpointFields)
+    {
+        return;
+    }
+    vector<RDouble **> &vectorData = interpointDataProxy->GetVectorData();
+    vector<int>        &vectorDimension = interpointDataProxy->GetVectorDimension();
+
+    for (int iData = 0; iData < interpointFields->Size(); ++ iData)
+    {
+        int solverID = interpointFields->GetSolverIndex(iData);
+        if (solverID != this->GetIndex())
+        {
+            //! This data is not belong to this solver.
+            continue;
+        }
+
+        int dataDimension = interpointFields->GetDimension(iData);
+        string &dataName = interpointFields->GetName(iData);
+        RDouble **data = reinterpret_cast<RDouble **>(datastore->GetDataPtr(dataName));
+
+        vectorDimension.push_back(dataDimension);
+        vectorData.push_back(data);
+    }
+}
+
+void CFDSolver::PrepareOversetInterfaceData(Data_ParamFieldSuite *dataStore, InterfaceDataProxy *interfaceDataProxy)
+{
+
+}
+
+void CFDSolver::ActionReflect(ActionTag *acttag)
+{
+
+}
+
+void CFDSolver::VisualizationAverageFlow(ActionKey *actkey)
+{
+
+}
+
+void CFDSolver::CommunicationInterfaceData()
+{
+    Param_CFDSolver *parameters = GetControlParameters();
+    int isOverset = parameters->GetIsOverLapping();
+
+    //! Firstly the overset information should be exchanged.
+    //! The structured overset grid should be taken into consideration further!!!
+    if (isOverset)
+    {
+        UploadOversetData();
+        UpdateOversetData();
+        DownloadOversetData();
+    }
+
+    UploadInterfaceData();
+    UpdateInterfaceData();
+    DownloadInterfaceData();
+}
+
+void CFDSolver::CommunicationInterfaceData(int iLevel)
+{
+    Param_CFDSolver *parameters = GetControlParameters();
+    int isOverLapping = parameters->GetIsOverLapping();
+
+    int systemGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+
+    //! Firstly the overset information should be exchanged.
+    //! The structured overset grid should be taken into consideration further!!!
+    if (isOverLapping && systemGridType != STRUCTGRID)
+    {
+        TK_Exit::ExceptionExit("Consider each level for over-set grid.");
+        //UploadOversetData();
+        //UpdateOversetData();
+        //DownloadOversetData();
+    }
+
+    UploadInterfaceData(iLevel);
+    UpdateInterfaceData(iLevel);
+    DownloadInterfaceData(iLevel);
+}
+
+void CFDSolver::CommunicationInterpointData()
+{
+    UploadInterpointData();
+    UpdateInterpointData();
+    DownloadInterpointData();
+
+    CommunicationInterpointWeight();
+}
+
+void UpdateInterfaceData()
+{
+    using namespace PHMPI;
+
+    for (int iLevel = 0; iLevel < GetNumberOfMultiGrid(); ++ iLevel)
+    {
+        ActionKey *actkey = new ActionKey();
+        actkey->action = UPDATE_INTERFACE_DATA;
+        actkey->kind = SOLVER_BASED;
+        actkey->level = iLevel;
+        actkey->solverID = 0;
+
+        //Task_ServerUpdateInterface *task = new Task_ServerUpdateInterface();
+        if (IsNeedNonBlockingCommunication(actkey))
+        {
+            MainTaskNonBlocking(actkey);
+        }
+        else
+        {
+            MainTaskBlocking(actkey);
+        }
+        //delete task;
+        delete actkey;
+    }
+}
+
+void CFDSolver::UploadInterfaceValue(ActionKey *actkey)
+{
+
+}
+
+void CFDSolver::DownloadInterfaceValue(ActionKey *actkey)
+{
+
+}
+
+void CFDSolver::UploadInterfaceData(ActionKey *actkey)
+{
+
+}
+
+void CFDSolver::DownloadInterfaceData(ActionKey *actkey)
+{
+
+}
+
+void CFDSolver::UploadInterpointData(ActionKey *actkey)
+{
+
+}
+
+void CFDSolver::DownloadInterpointData(ActionKey *actkey)
+{
+
+}
+
+void CFDSolver::CommunicationInterpointWeight(ActionKey *actkey)
+{
+
+}
+
+void CFDSolver::DownloadInterpointWeight(ActionKey *actkey)
+{
+
+}
+
+void CFDSolver::UploadOversetData(ActionKey *actkey)
+{
+
+}
+
+void CFDSolver::DownloadOversetData(ActionKey *actkey)
+{
+
+}
+
+void CFDSolver::FillField(Grid *grid, FieldProxy *fieldProxy, RDouble value)
+{
+
+}
+
+void CFDSolver::FillField(Grid *grid, FieldProxy *field1Proxy, FieldProxy *field2Proxy)
+{
+
+}
+
+FieldProxy * CFDSolver::GetFieldProxy(Grid *grid, const string &fieldName) 
+{
+    return 0;
+}
+
+void CFDSolver::LoadResiduals(Grid *grid, FieldProxy *rhsProxy)
+{
+
+}
+
+void CFDSolver::RungeKuttaResidual(Grid *grid, FieldProxy *dqProxy, RDouble coef)
+{
+
+};
+
+void CFDSolver::LHSMatrixs(Grid *grid)
+{
+
+}
+
+void CFDSolver::LineLUSGSMatrixs(Grid* grid)
+{
+
+}
+
+FieldProxy *CFDSolver::GetResidualProxy(Grid *grid) 
+{
+    return 0; 
+}
+
+void CFDSolver::UpdateFlowField(Grid *grid, FieldProxy *qProxy, FieldProxy *dqProxy)
+{
+
+}
+
+void CFDSolver::CompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn)
+{
+
+}
+
+void CFDSolver::DecompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn)
+{
+
+}
+
+void CFDSolver::CompressAnInterfaceVar(DataContainer *&dataContainer, RDouble **fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn)
+{
+
+}
+
+void CFDSolver::DecompressAnInterfaceVar(DataContainer *&dataContainer, RDouble **fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn)
+{
+
+}
+
+void CFDSolver::DumpInterfaceInfoBell() 
+{
+
+}
+
+void CFDSolver::SolveOnGridSteady(Grid *grid)
+{
+    //! Zero the residuals of the finest grid.
+    ZeroResiduals(grid);
+
+    //! Solve for all grids starting from the finest grid.
+    SolveOnGrid(grid);
+}
+
+void CFDSolver::SolveOnGridUnsteady(Grid *grid)
+{
+    RDouble tol_sub_iter = 0.01;
+    GlobalDataBase::GetData("tol_sub_iter", &tol_sub_iter, PHDOUBLE, 1);
+
+    int max_sub_iter = 1;
+    GlobalDataBase::GetData("max_sub_iter", &max_sub_iter, PHINT, 1);
+
+    int neqn = GetNumberOfEquations(); 
+
+    FieldProxy *qnProxy = CreateFieldProxy(grid);    //! It represents the value of q at time step n. 
+    FieldProxy *q1Proxy = CreateFieldProxy(grid);    //! It represents the q value of p-th iteration at time step n+1. 
+    FieldProxy *q2Proxy = GetFieldProxy(grid, CastName("q"));    //! It represents the q value of p+1-th iteration at time step n+1.
+    //! Notice: q_2 changes with iteration,it represents q(n+1)(p+1).
+
+    LoadQ(grid, qnProxy);
+
+    int iner_iter = 0;
+    RDouble norm0, norm1, cvg;
+    while (true)
+    {
+        iner_iter = iner_iter + 1;
+        LoadQ(grid, q1Proxy);
+        ZeroResiduals(grid);
+        SolveOnGrid(grid);
+        
+        if (iner_iter == 1)
+        {
+            cvg = one;
+        }
+        else
+        {
+            grid->CVGNorm(qnProxy, q2Proxy, neqn, norm0);
+            grid->CVGNorm(q1Proxy, q2Proxy, neqn, norm1);
+            cvg = norm1 / (norm0 + SMALL);
+        }
+        
+        cout << "iner_iter = " << iner_iter << " cvg = " << cvg << "\n";
+        
+        if (cvg <= tol_sub_iter)
+        {
+            break;
+        }
+        if (iner_iter >= max_sub_iter)
+        {
+            break;
+        }
+    }
+
+    delete qnProxy;
+    delete q1Proxy;
+    delete q2Proxy;
+}
+
+//! Execute the multi-grid flow solver on grid level.
+void CFDSolver::SolveOnGrid(Grid *grid)
+{
+
+}
+
+void CFDSolver::ComputeResidual(Grid *grid, FieldProxy *rhsProxy)
+{
+    LoadResiduals(grid, rhsProxy);
+
+    UpdateResiduals(grid);
+}
+
+void CFDSolver::RungeKutta(Grid *grid, FieldProxy *rhsProxy)
+{
+    //! Explicit multi-stage time marching method.
+    int RKStage = GlobalDataBase::GetIntParaFromDB("RKStage");
+
+    RDouble *lamda = new RDouble [RKStage];
+    GlobalDataBase::GetData("lamda", lamda, PHDOUBLE, RKStage);
+
+    //! Using get or create temporarily, since the UpdateFlowField function
+    //! has not been consistent for NS/Turb solver.
+    FieldProxy *qProxy = 0;
+    if (this->GetIndex() == 0)
+    {
+        //! NS solver.
+        qProxy = CreateFieldProxy(grid);
+    }else
+    {
+        //! Turb solver.
+        qProxy = GetFieldProxy(grid, CastName("q"));
+    }
+
+    FieldProxy *q0ProxyTemp = CreateFieldProxy(grid);
+
+    //! The real residual.
+    FieldProxy *resProxy = GetResidualProxy(grid);
+
+    //! The right term of RK, named as RK-residual, which is lamda*dt*res/volume.
+    FieldProxy *resRK = CreateFieldProxy(grid);
+
+    LoadQ(grid, qProxy);
+
+    //! Back up the Q0.
+    FillField(grid, q0ProxyTemp, qProxy); 
+
+    for (int iStage = 0; iStage < RKStage; ++ iStage)
+    {
+        LoadResiduals(grid, rhsProxy);
+
+        UpdateResiduals(grid);
+
+        FillField(grid, resRK, resProxy);
+
+        //! Compute the DQ: (Dt * Res / vol).
+        RungeKuttaResidual(grid, resRK, lamda[iStage]);
+
+        //! Give the back-up Q0 back to Q, in order to compute new Q.
+        FillField(grid, qProxy, q0ProxyTemp);
+
+        //! Q = Q0 - DQ.
+        //! Warning: the targets are qProxy and grid-q in NS and turbulence solver, respectively.
+        UpdateFlowField(grid, qProxy, resRK);
+    }
+
+    delete [] lamda;    lamda = NULL;
+    delete qProxy;    qProxy = NULL;
+    delete q0ProxyTemp;    q0ProxyTemp = NULL;
+    delete resProxy;    resProxy = NULL;
+    delete resRK;    resRK = NULL;
+}
+
+void CFDSolver::SolveLUSGSForward(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+
+}
+
+void CFDSolver::SolveLUSGSBackward(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+
+}
+
+void CFDSolver::SolveBLUSGSForward(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal)
+{
+
+}
+
+void CFDSolver::SolveBLUSGSBackward(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal)
+{
+
+}
+
+void CFDSolver::SolveMatrixLUSGSForward(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal)
+{
+
+}
+
+void CFDSolver::SolveMatrixLUSGSBackward(Grid *grid, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal)
+{
+
+}
+
+void CFDSolver::LineLUSGS(Grid* grid, int level)
+{
+
+}
+
+void CFDSolver::SolveLineLUSGSForward(Grid* grid, FieldProxy* dqProxy, FieldProxy* LUplusDQ, RDouble& sweepNormal)
+{
+
+}
+
+void CFDSolver::SolveLineLUSGSBackward(Grid* grid, FieldProxy* dqProxy, FieldProxy* LUplusDQ, RDouble& sweepNormal)
+{
+
+}
+
+void CFDSolver::DetermineCFLNumber(Grid *grid, FieldProxy *dqProxy, FieldProxy *dqProxy1)
+{
+
+}
+
+//! Put correction on the coarse grid.
+void CFDSolver::PutCorrection(Grid *grid, FieldProxy *qProxy)
+{
+    int neqn = GetNumberOfEquations();
+
+    FieldProxy *old_q_proxy = GetFieldProxy(grid, CastName("q"));
+
+    PutCorrection(grid, qProxy, old_q_proxy, neqn);
+
+    delete old_q_proxy;
+}
+
+void CFDSolver::Action(ActionKey *actkey)
+{
+    switch (actkey->action)
+    {
+    case UPDATE_INTERFACE_DATA:
+        GetInterfaceData(actkey);
+        break;
+    case UPDATE_INTERPOINT_DATA:
+        GetInterpointData(actkey);
+        break;
+    case UPDATE_OVERSET_DATA:
+        GetOversetData(actkey);
+        break;
+    case VISUALIZATION_AVERAGE_FLOW:
+        VisualizationAverageFlow(actkey);
+        break;
+    default:
+        break;
+    } 
+}
+
+void CFDSolver::TranslateAction(ActionKey *actkey)
+{
+    switch (actkey->action)
+    {
+    case UPDATE_INTERFACE_DATA:
+        TranslateInterfaceData(actkey);
+        break;
+    case UPDATE_OVERSET_DATA:
+        TranslateOversetData(actkey);
+        break;
+    case UPDATE_INTERPOINT_DATA:
+        TranslateInterpointData(actkey);
+        break;
+    default:
+        break;
+    }
+}
+
+streamsize CFDSolver::TranslateActionLength(ActionKey *actkey)
+{
+    if(actkey->action == UPDATE_INTERFACE_DATA)
+    {
+        return TranslateInterfaceDataLength(actkey);
+    }
+    else if (actkey->action == UPDATE_INTERPOINT_DATA)
+    {
+        return TranslateInterpointDataLength(actkey);
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("action", actkey->action);
+        return 0;
+    }
+}
+
+bool CFDSolver::IsNeedStatistics()
+{
+    Param_CFDSolver *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+        if (ifStaticsFlowField > 0)
+        {
+            int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+            int startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+
+            if(outnstep >= startStatisticStep)
+            {
+                return true;
+            }
+        }
+    }
+    return false;
+}
+
+bool CFDSolver::IsNeedReynoldsStressStatistics()
+{
+    Param_CFDSolver *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        int ifStaticsReynoldsStress = parameters->GetIfStaticsReynoldsStress();
+        if (ifStaticsReynoldsStress > 0)
+        {
+            int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+            int startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+
+            if(outnstep >= startStatisticStep)
+            {
+                return true;
+            }
+        }
+    }
+    return false;
+}
+
+void CFDSolver::GetInterfaceData(InterfaceInfo *iterfaceInfo, ActionKey *actkey, InterfaceDataProxy *interfaceDataProxy)
+{
+    if (iterfaceInfo == 0)
+    {
+        return;
+    }
+
+    vector <RDouble **> &vectorData = interfaceDataProxy->GetVectorData();
+    vector <int> &vectorDimension = interfaceDataProxy->GetVectorDimension();
+    vector<string> &vectorName = interfaceDataProxy->GetVectorName();
+
+    int ineighbor = iterfaceInfo->FindIthNeighbor(actkey->ipos);
+
+    int dim_sum = 0;
+
+    for (std::size_t iDimension = 0; iDimension < vectorDimension.size(); ++ iDimension)
+    {
+        dim_sum += vectorDimension[iDimension];
+    }
+
+    int nIFaceOfNeighbor = iterfaceInfo->GetNIFaceOfNeighbor(ineighbor);
+    int *faceIndexForSend = iterfaceInfo->GetFaceIndexForSend(ineighbor);
+
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+    for (std::size_t iDim = 0; iDim < vectorDimension.size(); ++ iDim)
+    {
+        string dataName = vectorName[iDim];
+
+        int iFace;
+        int nm = vectorDimension[iDim];
+        RDouble **q = vectorData[iDim];
+
+        //! Bell 20130129 mod from Hexin.
+        int nlen = nm * nIFaceOfNeighbor;
+
+        RDouble *qtmp = new RDouble [nlen];
+
+        int icount = 0;
+        for (int jFaceOfNeighbor = 0; jFaceOfNeighbor < nIFaceOfNeighbor; ++ jFaceOfNeighbor)
+        {
+            iFace = faceIndexForSend[jFaceOfNeighbor];
+            for (int m = 0; m < nm; ++ m)
+            {
+                qtmp[icount ++] = q[m][iFace];
+            }
+        }
+        cdata->write(qtmp, nlen * sizeof(RDouble));
+        delete [] qtmp;    qtmp = NULL;
+    }
+}
+
+void CFDSolver::GetInterpointData(InterpointInformation *interpointInformation, ActionKey *actkey, InterpointDataProxy *interpointDataProxy)
+{
+    if (interpointInformation == 0)
+    {
+        return;
+    }
+    vector<RDouble **>&vectorData = interpointDataProxy->GetVectorData();
+    vector<int> vectorDimension = interpointDataProxy->GetVectorDimension();
+
+    int iNeighbor = interpointInformation->FindIthNeighbor(actkey->ipos);
+
+    int sumDimension = 0;
+
+    for (std::size_t i = 0; i < vectorDimension.size(); ++ i)
+    {
+        sumDimension += vectorDimension[i];
+    }
+
+    int numberOfInterpointsForNeighbor = interpointInformation->GetNumberOfInterpointsForNeighbor(iNeighbor);
+    int *pointIndexForSend = interpointInformation->GetPointIndexForSend(iNeighbor);
+
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+    for (std::size_t idim = 0; idim < vectorDimension.size(); ++ idim)
+    {
+        int ipoint;
+        int nm = vectorDimension[idim];
+        RDouble **q = vectorData[idim];
+
+        int nlen = nm * numberOfInterpointsForNeighbor;
+
+        RDouble *qtmp = new RDouble [nlen];
+
+        int icount = 0;
+        for (int j = 0; j < numberOfInterpointsForNeighbor; ++ j)
+        {
+            ipoint = pointIndexForSend[j];
+            for (int m = 0; m < nm; ++ m)
+            {
+                qtmp[icount ++] = q[m][ipoint];
+            }
+        }
+        cdata->write(qtmp, nlen *sizeof(RDouble));
+        delete []qtmp;
+    }
+}
+
+void CFDSolver::TranslateInterfaceData(InterfaceInfo *iterfaceInfo, ActionKey *actkey, InterfaceDataProxy *interfaceDataProxy)
+{
+    if (iterfaceInfo == 0)
+    {
+        return;
+    }
+
+    vector <RDouble **> &vectorData = interfaceDataProxy->GetVectorData();
+    vector <int> &vectorDimension = interfaceDataProxy->GetVectorDimension();
+
+    //! According to the design,actkey->ipos stores zone i,the current zone is the j-th neighbor of zone i.
+    //! Here we need to find out that which neighbor of the current zone is zone i,and the number is ineighbor.
+
+    int iNeighbor = iterfaceInfo->FindIthNeighbor(actkey->ipos);
+    int nIFaceOfNeighbor = iterfaceInfo->GetNIFaceOfNeighbor(iNeighbor);
+    int *faceIndexForRecv = iterfaceInfo->GetFaceIndexForRecv(iNeighbor);
+
+    //! Receive according to your needs.
+    DataContainer *cData = actkey->GetData();
+    cData->moveto_begin();
+    for (std::size_t iDim = 0; iDim < vectorDimension.size(); ++ iDim)
+    {
+        int iFace;
+        int nm = vectorDimension[iDim];
+        RDouble **q = vectorData[iDim];
+
+        //! Bell 20130129 mod from Hexin.
+        int nlen = nm * nIFaceOfNeighbor;
+
+        RDouble *qTemp = new RDouble[nlen];
+
+        cData->read(qTemp, nlen * sizeof(RDouble));
+
+        int icount = 0;
+        for (int jFaceOfNeighbor = 0; jFaceOfNeighbor < nIFaceOfNeighbor; ++ jFaceOfNeighbor)
+        {
+            iFace = faceIndexForRecv[jFaceOfNeighbor];
+
+            for (int m = 0; m < nm; ++ m)
+            {
+                q[m][iFace] = qTemp[icount ++];
+            }
+        }
+        delete [] qTemp;
+    }
+}
+
+void CFDSolver::TranslateInterpointData(InterpointInformation *interpointInformation, ActionKey *actkey, InterpointDataProxy * interpointDataProxy)
+{
+    if (interpointInformation == 0)
+    {
+        return;
+    }
+    vector<RDouble **> &vectorData = interpointDataProxy->GetVectorData();
+    vector<int> &vectorDimension = interpointDataProxy->GetVectorDimension();
+
+    //! According to the design,actkey->ipos stores zone i,the current zone is the j-th neighbor of zone i.
+    //! Here we need to find out that which neighbor of the current zone is zone i,and the number is ineighbor.
+
+    int iNeighbor = interpointInformation->FindIthNeighbor(actkey->ipos);
+    int numberOfInterpointsForNeighbor = interpointInformation->GetNumberOfInterpointsForNeighbor(iNeighbor);
+    int *pointIndexForReceive = interpointInformation->GetPointIndexForReceive(iNeighbor);
+
+    //! Receive according to your needs.
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+    for (std::size_t iDim = 0; iDim < vectorDimension.size(); ++ iDim)
+    {
+        int iPoint;
+        int nm = vectorDimension[iDim];
+        RDouble **q = vectorData[iDim];
+
+        int nlen = nm * numberOfInterpointsForNeighbor;
+
+        RDouble *qtmp = new RDouble[nlen];
+
+        cdata->read(qtmp, nlen * sizeof(RDouble));
+
+        int iCount = 0;
+        for (int j = 0; j < numberOfInterpointsForNeighbor; ++ j)
+        {
+            iPoint = pointIndexForReceive[j];
+
+            for (int m = 0; m < nm; ++ m)
+            {
+                q[m][iPoint] = qtmp[iCount ++];
+            }
+        }
+        delete []qtmp;
+    }
+}
+
+streamsize CFDSolver::TranslateInterfaceDataLength(InterfaceInfo *iterfaceInfo, ActionKey *actkey, InterfaceDataProxy *interfaceDataProxy)
+{
+    streamsize nlen = 0;
+    if (iterfaceInfo == 0)
+    {
+        return nlen;
+    }
+    vector <int> &vectorDimension = interfaceDataProxy->GetVectorDimension();
+
+    int iNeighbor = iterfaceInfo->FindIthNeighbor(actkey->ipos);
+    int nIFaceOfNeighbor = iterfaceInfo->GetNIFaceOfNeighbor(iNeighbor);
+
+    for (std::size_t iDim = 0; iDim < vectorDimension.size(); ++ iDim)
+    {
+        int nm = vectorDimension[iDim];
+
+        int nlenOfThisDim = nm * nIFaceOfNeighbor;
+        nlen += nlenOfThisDim * sizeof(RDouble);
+    }
+
+    return nlen;
+}
+
+streamsize CFDSolver::TranslateInterpointDataLength(InterpointInformation *interpointInformation, ActionKey *actkey, InterpointDataProxy *interpointDataProxy)
+{
+    streamsize nlen = 0;
+    if (interpointInformation == 0)
+    {
+        return nlen;
+    }
+    vector <int> &vectorDimension = interpointDataProxy->GetVectorDimension();
+
+    int iNeighbor = interpointInformation->FindIthNeighbor(actkey->ipos);
+    int nIpointOfNeighbor = interpointInformation->GetNumberOfInterpointsForNeighbor(iNeighbor);
+
+    for (std::size_t iDim = 0; iDim < vectorDimension.size(); ++ iDim)
+    {
+        int nm = vectorDimension[iDim];
+
+        int nlenOfThisDim = nm * nIpointOfNeighbor;
+        nlen += nlenOfThisDim * sizeof(RDouble);
+    }
+
+    return nlen;
+}
+
+void CFDSolver::GetOversetInterfaceData(OversetInformationProxy *oversetInformationProxy, ActionKey *actkey, InterfaceDataProxy *interfaceDataProxy)
+{
+    vector <RDouble **> &vectorData = interfaceDataProxy->GetVectorData();
+    vector <int> &vectorDimension = interfaceDataProxy->GetVectorDimension();
+
+    OversetDataProxy *oversetDataProxy = oversetInformationProxy->GetOversetDataProxyForSend();
+
+    int neighborIndex = oversetDataProxy->FindNeighborIndex(actkey->ipos);
+
+    int dim_sum = 0;
+
+    for (std::size_t indexVector = 0; indexVector < vectorDimension.size(); ++ indexVector)
+    {
+        dim_sum += vectorDimension[indexVector];
+    }
+
+    int numberOfCellForSend = oversetDataProxy->GetNumberOfCells(neighborIndex);
+    int *cellIndexMapForSend = oversetDataProxy->GetCellStorageIndexMapping(neighborIndex);
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+
+    for (std::size_t iDim = 0; iDim < vectorDimension.size(); ++ iDim)
+    {
+        int nm = vectorDimension[iDim];
+        RDouble **q = vectorData[iDim];
+
+        for (int iCellLocal = 0; iCellLocal < numberOfCellForSend; ++ iCellLocal)
+        {
+            int iCell = cellIndexMapForSend[iCellLocal];
+            for (int m = 0; m < nm; ++ m)
+            {
+                cdata->write(&q[m][iCell], sizeof(RDouble));
+            }
+        }
+    }
+}
+
+void CFDSolver::TranslateOversetInterfaceData(OversetInformationProxy *oversetInformationProxy, ActionKey *actkey, InterfaceDataProxy *interfaceDataProxy)
+{
+    vector < RDouble **> &vectorData = interfaceDataProxy->GetVectorData();
+    vector <int> &vectorDimension = interfaceDataProxy->GetVectorDimension();
+
+    //! According to the design,actkey->ipos stores zone i,the current zone is the j-th neighbor of zone i.
+    //! Here we need to find out that which neighbor of the current zone is zone i,and the number is ineighbor.
+
+    OversetDataProxy *oversetDataProxy = oversetInformationProxy->GetOversetDataProxyForReceive();
+    int iNeighbor = oversetDataProxy->FindNeighborIndex(actkey->ipos);
+
+    int numberOfCells = oversetDataProxy->GetNumberOfCells(iNeighbor);
+    int *cellStorageIndexMapping = oversetDataProxy->GetCellStorageIndexMapping(iNeighbor);
+
+    //! Receive according to your needs.
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+
+    for (std::size_t iDim = 0; iDim < vectorDimension.size(); ++ iDim)
+    {
+        int nm = vectorDimension[iDim];
+        RDouble **q = vectorData[iDim];
+
+        for (int iCellLocal = 0; iCellLocal < numberOfCells; ++ iCellLocal)
+        {
+            int iCell = cellStorageIndexMapping[iCellLocal];
+
+            for (int m = 0; m < nm; ++ m)
+            {
+                cdata->read(&q[m][iCell], sizeof(RDouble));
+            }
+        }
+    }
+}
+
+void CFDSolver::PutCorrection(Grid *grid, FieldProxy *fieldProxy, FieldProxy *oldFieldProxy, int totalEqn)
+{
+    if (grid->Type() == STRUCTGRID)
+    {
+        RDouble4D &field = fieldProxy->GetField_STR();
+        RDouble4D &oldfield = oldFieldProxy->GetField_STR();
+
+        oldfield -= field;
+    }
+    else
+    {
+        int nTotalCell = grid->GetNTotalCell();
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotal = nTotalCell + nBoundFace;
+
+        RDouble **field = fieldProxy->GetField_UNS();
+        RDouble **oldfield = oldFieldProxy->GetField_UNS();
+
+        for (int indexEquation = 0; indexEquation < totalEqn; ++ indexEquation)
+        {
+            for (int iCell = 0; iCell < nTotal; ++ iCell)
+            {
+                oldfield[indexEquation][iCell] -= field[indexEquation][iCell];
+            }
+        }
+    }
+}
+
+void CFDSolver::ComputeDualTimeCoefficient(int methodOfDualTime, RDouble *dualTimeCoefficient)
+{
+    RDouble theta = 0.0, xi = 0.0, phi = 0.0;
+    const int EULEREXPLICIT           = 0; //! One order.
+    const int BACKWARDEULER           = 1; //! One order, A-stable.
+    const int ONESTEPTRAPEZOIDAL      = 2; //! Two order, A-stable, also called Crank-Nicolson.
+    const int BACKWARDDIFFERENTIATION = 3; //! Two order, A-stable.
+    const int ADAMSTYPE               = 4; //! Two order, A-stable.
+    const int LEESTYPE                = 5; //! Two order, A-stable.
+    const int TWOSTEPTRAPEZOIDAL      = 6; //! Two order, A-stable.
+    const int LEAPFROG                = 7; //! Two order.
+    const int ADAMSBASHFORTH          = 8; //! Two order, forward difference.
+    const int THIRDORDERIMPLICIT      = 9; //! Three order.
+    const int ADAMSMOULTON            = 10;//! Three order.
+    const int MILNE                   = 11;//! Four order.
+
+    switch (methodOfDualTime)
+    {
+    case EULEREXPLICIT:
+        theta =  0.0;
+        xi    =  0.0;
+        phi   =  0.0;
+        break;
+    case BACKWARDEULER:
+        theta =  1.0;
+        xi    =  0.0;
+        phi   =  0.0;
+        break;
+    case ONESTEPTRAPEZOIDAL:
+        theta =  0.5;
+        xi    =  0.0;
+        phi   =  0.0;
+        break;
+    case BACKWARDDIFFERENTIATION:
+        theta =  1.0;
+        xi    =  0.5;
+        phi   =  0.0;
+        break;
+    case ADAMSTYPE:
+        theta =  0.75;
+        xi    =  0.0;
+        phi   = -0.25;
+        break;
+    case LEESTYPE:
+        theta =  1.0/3.0;
+        xi    = -1.0/2.0;
+        phi   = -1.0/3.0;
+        break;
+    case TWOSTEPTRAPEZOIDAL:
+        theta =  1.0/2.0;
+        xi    = -1.0/2.0;
+        phi   = -1.0/2.0;
+        break;
+    case LEAPFROG:
+        theta =  0.0;
+        xi    = -0.5;
+        phi   =  0.0;
+        break;
+    case ADAMSBASHFORTH:
+        theta =  0.0;
+        xi    =  0.0;
+        phi   =  0.5;
+        break;
+    case THIRDORDERIMPLICIT:
+        theta =  1.0/3.0;
+        xi    = -1.0/6.0;
+        phi   =  0.0;
+        break;
+    case ADAMSMOULTON:
+        theta =  5.0/12.0;
+        xi    =  0.0;
+        phi   =  1.0/12.0;
+        break;
+    case MILNE:
+        theta =  1.0/6.0;
+        xi    = -1.0/2.0;
+        phi   = -1.0/6.0;
+        break;
+    default:
+        TK_Exit::UnexpectedVarValue("methodOfDualTime", methodOfDualTime);
+        break;
+    }
+
+    RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+    //! Computation of dualtime coefficients, including three coefficients for Residual of R(p), R(n) and R(n-1),
+    //! and three coefficients for conservative variables of qcsv(p), qcsv(n), and qcsv(n-1),
+    //! the fourth coefficient is also used for the real    time part of the diagonal data for the matrix of the left term when LUSGS is running,
+    //! the last   coefficient is      used for the virtual time part of the diagonal data for the matrix of the left term when LUSGS is running.
+    if (methodOfDualTime == EULEREXPLICIT || methodOfDualTime == LEAPFROG || methodOfDualTime == ADAMSBASHFORTH)   //! theta = 0, explicit method.
+    {
+        dualTimeCoefficient[0] = 0.0;
+        dualTimeCoefficient[1] = 1.0 + phi;
+        dualTimeCoefficient[2] =     - phi;
+        dualTimeCoefficient[3] = - (1.0 +       xi) / physicalTimeStep;
+        dualTimeCoefficient[4] =   (1.0 + 2.0 * xi) / physicalTimeStep; //! dualTimeCoefficient[ 4 ] = - dualTimeCoefficient[ 3 ] - dualTimeCoefficient[ 5 ];
+        dualTimeCoefficient[5] =               - xi   / physicalTimeStep;
+        dualTimeCoefficient[6] = 1.0;
+    }
+    else //! theta /= 0, implicit method
+    {
+        dualTimeCoefficient[0] = 1.0;
+        dualTimeCoefficient[1] = (1.0 - theta + phi) / theta;
+        dualTimeCoefficient[2] =               - phi   / theta;
+        dualTimeCoefficient[3] = - (1.0 +       xi)  / theta / physicalTimeStep;
+        dualTimeCoefficient[4] =   (1.0 + 2.0 * xi)  / theta / physicalTimeStep; //! dualTimeCoefficient[ 4 ] = - dualTimeCoefficient[ 3 ] - dualTimeCoefficient[ 5 ];
+        dualTimeCoefficient[5] =               - xi    / theta / physicalTimeStep;
+        dualTimeCoefficient[6] = 1.0                   / theta;
+    }
+}
+
+void CFDSolver::DumpResidual(ActionKey *actkey)
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0) 
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    actkey->filename = GetResidualFileName();
+    if (actkey->filename == "")
+    {
+        return;
+    }
+
+    ios_base::openmode openmode = ios_base::out|ios_base::app;
+    actkey->openmode = openmode;
+
+    InitMaxResidual();
+
+    //! First: Initialize Residual, set residual on Each Zone equal zero.
+    PHSPACE::InitResidual();
+
+    //! Second: Computing residual on Each Zone.
+    int nZones = GetNumberofGlobalZones();
+    actkey->GetData()->moveto_begin();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int zoneProcessorID = GetZoneProcessorID(iZone);
+        int currentProcessorID = GetCurrentProcessorID();
+        if (currentProcessorID == zoneProcessorID)
+        {
+            //! If zone i belongs to the current process.
+            CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->GetResidual(actkey);
+        }
+    }
+
+    //! Third: Collecting residual on Each Zone to serve.
+    PHSPACE::CollectResidual(actkey);
+
+    //! Forth: Output residual on serve.
+    int currentProcessorID = GetCurrentProcessorID();
+    if (currentProcessorID == server)
+    {
+        PHSPACE::PostDumpResidual(actkey);
+    }
+}
+
+void CFDSolver::CheckResidual(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    int nCurrentProcessorID = GetCurrentProcessorID();
+    RDouble localMaxResidual = 0.0, localZoneResidual = 0.0;
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int zoneProcessorID = GetZoneProcessorID(iZone);
+        if (zoneProcessorID == nCurrentProcessorID)
+        {
+            CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->GetResidual(actkey, localZoneResidual);
+            if (localZoneResidual > localMaxResidual)
+            {
+                localMaxResidual = localZoneResidual;
+            }
+        }
+    }
+
+    RDouble globalMaxResidual = localMaxResidual;
+    int nProcessorNumber = GetNumberOfProcessor();
+    if (nProcessorNumber > 1)
+    {
+        //! Synchronization of communication.
+        MPI_Barrier(MPI_COMM_WORLD);
+
+        //! Communication.
+        MPI_Allreduce(&localMaxResidual, &globalMaxResidual, 1, PH_MPI_DOUBLE, MPI_MAX, MPI_COMM_WORLD);
+    }
+    GlobalDataBase::UpdateData("monitorResidual", &globalMaxResidual, PHDOUBLE, 1);
+}
+
+void CFDSolver::ObtainCFLNumber(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    int nCurrentProcessorID = GetCurrentProcessorID();
+    RDouble localMaxCFL = 0.0, localZoneCFLMax = 0.0, localMinCFL = LARGE, localZoneCFLMin = 0.0;
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int zoneProcessorID = GetZoneProcessorID(iZone);
+        if (zoneProcessorID == nCurrentProcessorID)
+        {
+            CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->ObtainCFLNumber(GetGrid(actkey->level), localZoneCFLMin, localZoneCFLMax);
+            if (localZoneCFLMin < localMinCFL)
+            {
+                localMinCFL = localZoneCFLMin;
+            }
+            if (localZoneCFLMax > localMaxCFL)
+            {
+                localMaxCFL = localZoneCFLMax;
+            }
+        }
+    }
+
+    RDouble globalMinCFL = localMinCFL;
+    RDouble globalMaxCFL = localMaxCFL;
+    int nProcessorNumber = GetNumberOfProcessor();
+    if (nProcessorNumber > 1)
+    {
+        //! Synchronization of communication.
+        MPI_Barrier(MPI_COMM_WORLD);
+
+        //! Communication.
+        MPI_Allreduce(&localMinCFL, &globalMinCFL, 1, PH_MPI_DOUBLE, MPI_MIN, MPI_COMM_WORLD);
+
+        MPI_Allreduce(&localMaxCFL, &globalMaxCFL, 1, PH_MPI_DOUBLE, MPI_MAX, MPI_COMM_WORLD);
+    }
+    GlobalDataBase::UpdateData("globalMinCFL", &globalMinCFL, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("globalMaxCFL", &globalMaxCFL, PHDOUBLE, 1);
+}
+
+void CFDSolver::ComputeSurfaceHeatingChange(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    int nCurrentProcessorID = GetCurrentProcessorID();
+    RDouble localMaxHeatChange = 0.0, localZoneHeatChange = 0.0;
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int zoneProcessorID = GetZoneProcessorID(iZone);
+        if (zoneProcessorID == nCurrentProcessorID)
+        {
+            CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->GetSurfaceHeatingChange(actkey, localZoneHeatChange);
+            if (localZoneHeatChange > localMaxHeatChange)
+            {
+                localMaxHeatChange = localZoneHeatChange;
+            }
+        }
+    }
+
+    RDouble globalMaxHeatChange = localMaxHeatChange;
+    int nProcessorNumber = GetNumberOfProcessor();
+    if (nProcessorNumber > 1)
+    {
+        //! Synchronization of communication.
+        MPI_Barrier(MPI_COMM_WORLD);
+
+        //! Communication.
+        MPI_Allreduce(&localMaxHeatChange, &globalMaxHeatChange, 1, PH_MPI_DOUBLE, MPI_MAX, MPI_COMM_WORLD);
+    }
+    GlobalDataBase::UpdateData("monitorHeatingChange", &globalMaxHeatChange, PHDOUBLE, 1);
+}
+
+//! Get the file name for Residual dumping, NS-solver by default.
+const string CFDSolver::GetResidualFileName()
+{
+    string resSaveFile = "res.dat";
+    GlobalDataBase::GetData("resSaveFile", &resSaveFile, PHSTRING, 1);
+    return resSaveFile;
+}
+
+void CFDSolver::DumpRestartData(ActionKey *actkey)
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0) 
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    actkey->filename = GetRestartFileName();
+    if (actkey->filename == "")
+    {
+        return;
+    }
+
+    if(PHMPI::IsParallelRun())
+    {
+        actkey->filename = PHSPACE::AddSymbolToFileName(actkey->filename, "_", 0);
+    }
+
+    hid_t file;
+    file = CreateHDF5File(actkey->filename);
+    actkey->filepos = file;
+
+    CreateH5RestartFile(actkey);
+
+    int nZones = GetNumberofGlobalZones();
+    int currentProcessorID = GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int sendProcessID = GetZoneProcessorID(iZone);
+        if (currentProcessorID == sendProcessID)
+        {
+            CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->DumpRestartH5(actkey);
+        }
+    }
+
+    H5Fclose(file);
+    actkey->filepos = 0;
+}
+
+void CFDSolver::DumpProtectData(ActionKey *actkey, int &RestartFile)
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0) 
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    string protectionFile0 = "./results/flow0.dat";
+    GlobalDataBase::GetData("protectionFile0", &protectionFile0, PHSTRING, 1);
+
+    string protectionFile1 = "./results/flow1.dat";
+    GlobalDataBase::GetData("protectionFile1", &protectionFile1, PHSTRING, 1);
+
+    if(PHMPI::IsParallelRun())
+    {
+        protectionFile0 = PHSPACE::AddSymbolToFileName(protectionFile0, "_", 0);
+        protectionFile1 = PHSPACE::AddSymbolToFileName(protectionFile1, "_", 0);
+    }
+
+    ifstream infile_0(protectionFile0.c_str(), ios::in);
+    if (infile_0)
+    {
+        RestartFile = 1;
+    }
+
+    ifstream infile_1(protectionFile1.c_str(), ios::in);
+    if (infile_1)
+    {
+        RestartFile = 0;
+    }
+
+    if(RestartFile == 0)
+    {
+        actkey->filename = protectionFile0;
+    }
+    else
+    {
+        actkey->filename = protectionFile1;
+    }
+
+    if (actkey->filename == "")
+    {
+        return;
+    }
+
+    hid_t file;
+    file = CreateHDF5File(actkey->filename);
+    actkey->filepos = file;
+
+    CreateH5RestartFile(actkey);
+
+    int nZones = GetNumberofGlobalZones();
+    int currentProcessorID = GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int sendProcessID = GetZoneProcessorID(iZone);
+        if (currentProcessorID == sendProcessID)
+        {
+            CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->DumpRestartH5(actkey);
+        }
+    }
+
+    H5Fclose(file);
+    actkey->filepos = 0;
+}
+
+void CFDSolver::DumpTurbProtectData(ActionKey *actkey, int &RestartFile)
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0) 
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    string protectionTurbFile0 = "./results/turb0.dat";
+    GlobalDataBase::GetData("protectionTurbFile0", &protectionTurbFile0, PHSTRING, 1);
+
+    string protectionTurbFile1 = "./results/turb1.dat";
+    GlobalDataBase::GetData("protectionTurbFile1", &protectionTurbFile1, PHSTRING, 1);
+
+    if(PHMPI::IsParallelRun())
+    {
+        protectionTurbFile0 = PHSPACE::AddSymbolToFileName(protectionTurbFile0, "_", 0);
+        protectionTurbFile1 = PHSPACE::AddSymbolToFileName(protectionTurbFile1, "_", 0);
+    }
+
+    ifstream infile_0(protectionTurbFile0.c_str(), ios::in);
+    if (infile_0)
+    {
+        RestartFile = 1;
+    }
+
+    ifstream infile_1(protectionTurbFile1.c_str(), ios::in);
+    if (infile_1)
+    {
+        RestartFile = 0;
+    }
+
+    if(RestartFile == 0)
+    {
+        actkey->filename = protectionTurbFile0;
+    }
+    else
+    {
+        actkey->filename = protectionTurbFile1;
+    }
+
+    if (actkey->filename == "")
+    {
+        return;
+    }
+
+    hid_t file;
+    file = CreateHDF5File(actkey->filename);
+    actkey->filepos = file;
+
+    CreateH5RestartFile(actkey);
+
+    int nZones = GetNumberofGlobalZones();
+    int currentProcessorID = GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int sendProcessID = GetZoneProcessorID(iZone);
+        if (currentProcessorID == sendProcessID)
+        {
+            CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->DumpRestartH5(actkey);
+        }
+    }
+
+    H5Fclose(file);
+    actkey->filepos = 0;
+}
+
+void CFDSolver::DumpTransitionProtectData(ActionKey *actkey, int &RestartFile)
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0) 
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    string protectionTransitionFile0 = "./results/transition0.dat";
+    GlobalDataBase::GetData("protectionTransitionFile0", &protectionTransitionFile0, PHSTRING, 1);
+
+    string protectionTransitionFile1 = "./results/transition1.dat";
+    GlobalDataBase::GetData("protectionTransitionFile1", &protectionTransitionFile1, PHSTRING, 1);
+
+    if(PHMPI::IsParallelRun())
+    {
+        protectionTransitionFile0 = PHSPACE::AddSymbolToFileName(protectionTransitionFile0, "_", 0);
+        protectionTransitionFile1 = PHSPACE::AddSymbolToFileName(protectionTransitionFile1, "_", 0);
+    }
+
+    ifstream infile_0(protectionTransitionFile0.c_str(), ios::in);
+    if (infile_0)
+    {
+        RestartFile = 1;
+    }
+
+    ifstream infile_1(protectionTransitionFile1.c_str(), ios::in);
+    if (infile_1)
+    {
+        RestartFile = 0;
+    }
+
+    if(RestartFile == 0)
+    {
+        actkey->filename = protectionTransitionFile0;
+    }
+    else
+    {
+        actkey->filename = protectionTransitionFile1;
+    }
+
+    if (actkey->filename == "")
+    {
+        return;
+    }
+
+    hid_t file;
+    file = CreateHDF5File(actkey->filename);
+    actkey->filepos = file;
+
+    CreateH5RestartFile(actkey);
+
+    int nZones = GetNumberofGlobalZones();
+    int currentProcessorID = GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int sendProcessID = GetZoneProcessorID(iZone);
+        if (currentProcessorID == sendProcessID)
+        {
+            CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->DumpRestartH5(actkey);
+        }
+    }
+
+    H5Fclose(file);
+    actkey->filepos = 0;
+}
+
+void CFDSolver::CreateH5RestartFile(ActionKey *actkey)
+{
+    Param_CFDSolver *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    int isWennScheme = parameters->GetWennSchemeFlag();
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    int currentProcessorID = GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ostringstream oss;
+        oss<<"Group"<<iZone;
+
+        string grpName;
+
+        grpName = oss.str();
+        CreateGroup(actkey->filepos, grpName);
+
+        int length = 0;
+        int nWallBC = 0, nCurMaxCellNum = 0;
+        int sendProcessID = GetZoneProcessorID(iZone);
+        if (currentProcessorID == sendProcessID)
+        {
+            int gridTypeofLocalZone = GetZoneGridType(iZone);
+            if (gridTypeofLocalZone == STRUCTGRID)
+            {
+                StructGrid *grid = StructGridCast(PHSPACE::GetGrid(iZone, actkey->level));
+                int ni = grid->GetNI();
+                int nj = grid->GetNJ();
+                int nk = grid->GetNK();
+
+                if (GetDim() == THREE_D)
+                {
+                    length = (ni + 3) * (nj + 3) * (nk + 3);
+                }
+                else
+                {
+                    length = (ni + 3) * (nj + 3);
+                }
+
+                if (isWennScheme == 1)
+                {
+                    if (GetDim() == THREE_D)
+                    {
+                        length = (ni + 5) * (nj + 5) * (nk + 5);
+                    }
+                    else
+                    {
+                        length = (ni + 5) * (nj + 5);
+                    }
+                }
+                //! Count the cells on wall.
+                grid->GetWallBCInfo(nWallBC, nCurMaxCellNum);
+            }
+            else
+            {
+                Grid *grid = PHSPACE::GetGrid(iZone, actkey->level);
+                int nBoundFace = grid->GetNBoundFace();
+                int nTotalCell = grid->GetNTotalCell();
+
+                length = nBoundFace + nTotalCell;
+            }
+
+        }
+
+        int getherLength;
+        MPI_Allreduce(&length, &getherLength, 1, MPI_INT, MPI_SUM, MPI_COMM_WORLD);
+
+        int nTotalWallCell, nCurTotalWallCell;
+        nCurTotalWallCell = nWallBC * nCurMaxCellNum;
+        MPI_Allreduce(&nCurTotalWallCell, &nTotalWallCell, 1, MPI_INT, MPI_SUM, MPI_COMM_WORLD);
+
+        hid_t  grpData;
+        grpData = OpenGroup(actkey->filepos, grpName);
+
+        if (actkey->solver == NS_EQUATION)
+        {
+            int nEquation = GetNumberOfEquations();
+            CreateEmptyData(grpData, "q", nEquation, getherLength, PHDOUBLE);
+
+            int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+            int nSlipBCModel = GlobalDataBase::GetIntParaFromDB("nSlipBCModel");
+            int nTemperatureModel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+            int numberOfSpecies = GlobalDataBase::GetIntParaFromDB("numberOfSpecies");
+
+            //! Create the memories of temperatures.
+            //if (nChemical > 0)
+            //{
+                CreateEmptyData(grpData, "t", nTemperatureModel, getherLength, PHDOUBLE);
+            //}
+
+            if (nTotalWallCell > 0)    //! The current grid includes the wall boundary conditions.
+            {
+                //RDouble wallTemperature = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+                CreateEmptyData(grpData, "surfaceTemperature", 1, nTotalWallCell, PHDOUBLE);
+
+                if (nChemical > 0 && numberOfSpecies > 0)
+                {
+                    CreateEmptyData(grpData, "surfaceMassFraction", numberOfSpecies, nTotalWallCell, PHDOUBLE);
+                }
+
+                if (nSlipBCModel > 0)
+                {
+                    CreateEmptyData(grpData, "surfaceSlipVariables", numberOfSpecies + 6, nTotalWallCell, PHDOUBLE);
+                }
+            }
+
+            if (isUnsteady == 1)
+            {
+                CreateEmptyData(grpData, "q_unsteady_n1", nEquation, getherLength, PHDOUBLE);
+                CreateEmptyData(grpData, "q_unsteady_n2", nEquation, getherLength, PHDOUBLE);
+                CreateEmptyData(grpData, "res", nEquation, getherLength, PHDOUBLE);
+                CreateEmptyData(grpData, "res_unsteady_n1", nEquation, getherLength, PHDOUBLE);
+                CreateEmptyData(grpData, "res_unsteady_n2", nEquation, getherLength, PHDOUBLE);
+
+                CreateEmptyData(grpData, "qAverage", nEquation, getherLength, PHDOUBLE);
+                CreateEmptyData(grpData, "tauAverage", 6, getherLength, PHDOUBLE);
+                CreateEmptyData(grpData, "q2Average", 6, getherLength, PHDOUBLE);
+            }
+            CreateEmptyData(grpData, "surfaceTemperatureFlag", 1, 1, PHDOUBLE);
+            CreateEmptyData(grpData, "catalyticCoefFlag", 1, 1, PHDOUBLE);
+
+            CreateEmptyData(grpData, "nIsChemicalFlow", 1, 1, PHINT);
+            CreateEmptyData(grpData, "numberOfSpecies", 1, 1, PHINT);
+            CreateEmptyData(grpData, "nTemperatureModel", 1, 1, PHINT);
+            CreateEmptyData(grpData, "speciesNameList", 16, 1, PHINT);
+        }
+        else if (actkey->solver == TURBULENCE)
+        {
+            int n_turb   = GlobalDataBase::GetIntParaFromDB("n_turb");
+            CreateEmptyData(grpData, "q_turb", n_turb, getherLength, PHDOUBLE);
+            CreateEmptyData(grpData, "visturb", 1    , getherLength, PHDOUBLE);
+
+            int transitionType   = GlobalDataBase::GetIntParaFromDB("transitionType");
+            if (transitionType == IREGAMA)
+            {
+                CreateEmptyData(grpData, "SpSdRatio", 1, getherLength, PHDOUBLE);
+                CreateEmptyData(grpData, "gamaeff", 1    , getherLength, PHDOUBLE);
+            }
+
+            if (isUnsteady == 1)
+            {
+                CreateEmptyData(grpData, "q_turb_unsteady_n1", n_turb, getherLength, PHDOUBLE);
+                CreateEmptyData(grpData, "q_turb_unsteady_n2", n_turb, getherLength, PHDOUBLE);
+                CreateEmptyData(grpData, "res_turb", n_turb, getherLength, PHDOUBLE);
+                CreateEmptyData(grpData, "res_turb_unsteady_n1", n_turb, getherLength, PHDOUBLE);
+                CreateEmptyData(grpData, "res_turb_unsteady_n2", n_turb, getherLength, PHDOUBLE);
+
+                CreateEmptyData(grpData, "qAverageTurb", n_turb, getherLength, PHDOUBLE);
+            }
+        }
+        else if (actkey->solver == TRANSITION)
+        {
+            int n_transition   = GlobalDataBase::GetIntParaFromDB("n_transition");
+            CreateEmptyData(grpData, "q_transition", n_transition, getherLength, PHDOUBLE);
+
+            if (isUnsteady == 1)
+            {
+                CreateEmptyData(grpData, "q_transition_unsteady_n1", n_transition, getherLength, PHDOUBLE);
+                CreateEmptyData(grpData, "q_transition_unsteady_n2", n_transition, getherLength, PHDOUBLE);
+                CreateEmptyData(grpData, "res_transition", n_transition, getherLength, PHDOUBLE);
+                CreateEmptyData(grpData, "res_transition_unsteady_n1", n_transition, getherLength, PHDOUBLE);
+                CreateEmptyData(grpData, "res_transition_unsteady_n2", n_transition, getherLength, PHDOUBLE);
+
+                CreateEmptyData(grpData, "qAverageTransition", n_transition, getherLength, PHDOUBLE);
+            }
+        }
+
+        CreateEmptyData(grpData, "nTotalCell", 1, 1, PHINT);
+
+        H5Gclose(grpData);
+    }
+
+    CreateEmptyData(actkey->filepos, "Version", 1, 1, PHINT);
+    CreateEmptyData(actkey->filepos, "outnstep", 1, 1, PHINT);
+    if (isUnsteady == 1 && actkey->solver == NS_EQUATION)
+    {
+        CreateEmptyData(actkey->filepos, "physicalTime", 1, 1, PHDOUBLE);
+    }
+
+    CreateEmptyData(actkey->filepos, "nStatisticalStep", 1, 1, PHINT);
+}
+
+void CFDSolver::InitFlowAsReadingRestart(ActionKey *actkey)
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    actkey->filename = GetRestartFileName();
+    if (actkey->filename == "")
+    {
+        return;
+    }
+
+    if(PHMPI::IsParallelRun())
+    {
+        actkey->filename = PHSPACE::AddSymbolToFileName(actkey->filename, "_", 0);
+    }
+
+    hid_t file;
+    file = OpenHDF5File(actkey->filename);
+    actkey->filepos = file;
+
+    int nZones = GetNumberofGlobalZones();
+    int currentProcessorID = GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int recvProcess = GetZoneProcessorID(iZone);
+
+        if (currentProcessorID == recvProcess)
+        {
+            CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->ReadRestartH5(actkey);
+        }
+    }
+
+    H5Fclose(file);
+    actkey->filepos = 0;
+}
+
+void CFDSolver::InitFlowAsReadingProtectedRestart(ActionKey *actkey)
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+    int RestartFile = 0;
+    string protectionFile0 = "./results/flow0.dat";
+    GlobalDataBase::GetData("protectionFile0", &protectionFile0, PHSTRING, 1);
+
+    string protectionFile1 = "./results/flow1.dat";
+    GlobalDataBase::GetData("protectionFile1", &protectionFile1, PHSTRING, 1);
+
+    if(PHMPI::IsParallelRun())
+    {
+        protectionFile0 = PHSPACE::AddSymbolToFileName(protectionFile0, "_", 0);
+        protectionFile1 = PHSPACE::AddSymbolToFileName(protectionFile1, "_", 0);
+    }
+
+    ifstream infile_0(protectionFile0.c_str(), ios::in);
+    if (infile_0)
+    {
+        RestartFile = 0;
+    }
+
+    ifstream infile_1(protectionFile1.c_str(), ios::in);
+    if (infile_1)
+    {
+        RestartFile = 1;
+    }
+
+    if (infile_0 && infile_1)     //! If both flow0 and flow1 exist,determine which file to use by the last modified time.
+    {
+        RDouble TimeFile0, TimeFile1;
+        TIME_SPACE::GetFileModifiedTime(protectionFile0, TimeFile0);
+        TIME_SPACE::GetFileModifiedTime(protectionFile1, TimeFile1);
+        if(TimeFile0 < TimeFile1)
+        {
+            RestartFile = 0;
+        }
+        else if (TimeFile0 > TimeFile1)
+        {
+            RestartFile = 1;
+        }
+    }
+
+    if(RestartFile == 0)
+    {
+        actkey->filename = protectionFile0;
+    }
+    else
+    {
+        actkey->filename = protectionFile1;
+    }
+
+    if (actkey->filename == "")
+    {
+        return;
+    }
+
+    hid_t file;
+    file = OpenHDF5File(actkey->filename);
+    actkey->filepos = file;
+
+    int nZones = GetNumberofGlobalZones();
+    int currentProcessorID = GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int recvProcess = GetZoneProcessorID(iZone);
+
+        if (currentProcessorID == recvProcess)
+        {
+            CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->ReadRestartH5(actkey);
+        }
+    }
+
+    H5Fclose(file);
+    actkey->filepos = 0;
+}
+
+//! Get the file name for Restart info dumping, NS-solver by default.
+const string CFDSolver::GetRestartFileName()
+{
+    string restartNSFile = "flow.dat";
+    GlobalDataBase::GetData("restartNSFile", &restartNSFile, PHSTRING, 1);
+    return restartNSFile;
+}
+
+void CFDSolver::DumpAirForceCoef(ActionKey *actkey)
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0) 
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    string aircoeffile = GetAirCoefFileName();
+    if (aircoeffile == "")
+    {
+        return;
+    }
+
+    actkey->filename = aircoeffile;
+    ios_base::openmode openmode = ios_base::out | ios_base::app;
+    actkey->openmode = openmode;
+
+    //! First: Initialize AirForceCoef: allocate array for AirForceCoef variables.
+    PHSPACE::InitForce();
+
+    //! Second: Computing AirForceCoef on Each Zone.
+    int nZones = GetNumberofGlobalZones();
+    actkey->GetData()->moveto_begin();
+    for (int iZone = 0; iZone < nZones; ++iZone)
+    {
+        int ZoneProcessorID = GetZoneProcessorID(iZone);
+        int currentProcessorID = GetCurrentProcessorID();
+
+        if (currentProcessorID == ZoneProcessorID)
+        {
+            //! If zone i belongs to the current process.
+            CFDSolver* solver = static_cast <CFDSolver*> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->AirForceCoef(actkey);
+        }
+    }
+
+    //! Third: Collecting AirForceCoef on Each Zone to serve.
+    PHSPACE::CollectionForce(actkey);
+
+    //! Forth: Output AirForceCoef to aircoeffile on serve.
+    int currentProcessorID = GetCurrentProcessorID();
+    if (currentProcessorID == server)
+    {
+        PHSPACE::DumpForce(actkey);
+    }
+}
+
+//! Get the file name for AirCoef dumping, NS-solver by default.
+const string CFDSolver::GetAirCoefFileName()
+{
+    string airCoefFile = "aircoef.dat";
+    GlobalDataBase::GetData("aircoeffile", &airCoefFile, PHSTRING, 1);
+    return airCoefFile;
+}
+
+void CFDSolver::DumpCpDistri(ActionKey *actkey)
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0) 
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    string wall_aircoefile   = "wall_aircoef.dat";
+    GlobalDataBase::GetData("wall_aircoefile", &wall_aircoefile, PHSTRING, 1);
+    if (wall_aircoefile == "")
+    {
+        return;
+    }
+
+    actkey->filename = wall_aircoefile;
+
+    vector <DataContainer *> datalist;
+    datalist.resize(0);
+
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int sendProcess = GetZoneProcessorIDSepMode(iZone);
+        int recvProcess = GetServerSepMode();
+
+        int currentProcessorID = GetCurrentProcessorID();
+        int sendRecvTag = GetSendRecvTag(actkey, iZone);
+
+        if (currentProcessorID == sendProcess)
+        {
+            CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->CpDistriCoef(actkey);
+            int TecioMission = 0;
+            PHWrite(actkey->GetData(), &TecioMission, 1);
+        }
+
+        PH_Trade(actkey, sendProcess, recvProcess, sendRecvTag);
+
+        if (currentProcessorID == recvProcess)
+        {
+            datalist.push_back(actkey->GetData());
+            DataContainer *cdata0 = new DataContainer();
+            actkey->SetData(cdata0);
+        }
+    }
+
+    int currentProcessorID = GetCurrentProcessorID();
+    int serverTmp = GetServerSepMode();
+
+    if (currentProcessorID == serverTmp)
+    {
+        int visualfileType = GlobalDataBase::GetIntParaFromDB("visualfileType");
+        if (visualfileType == 0)
+        {
+            #ifdef USE_TecplotLib
+                WriteWallAircoef(actkey, datalist);
+            #else
+                ostringstream WarningInfo;
+                WarningInfo << "Warning : visualfileType = 0 is not right, dump wall aircoef data into ASCII file! \n";
+                PrintToWindow(WarningInfo);
+
+                WriteWallAircoefASCII(actkey, datalist);
+            #endif
+        }
+        //else if (visualfileType == 1)
+        else
+        {
+            WriteWallAircoefASCII(actkey, datalist);
+        }
+        /*else
+        {
+            TK_Exit::UnexpectedVarValue("visualfileType = ", visualfileType);
+        }*/
+    }
+
+    for(unsigned int iZone = 0 ; iZone < datalist.size(); ++ iZone)
+    {
+        delete datalist[iZone];
+    }
+}
+
+void CFDSolver::DumpSurfaceInfo(ActionKey *actkey)
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+    string wall_varfile = "surface_tec.dat";
+    GlobalDataBase::GetData("wall_varfile", &wall_varfile, PHSTRING, 1);
+
+    if (wall_varfile == "")
+    {
+        return;
+    }
+
+    actkey->filename = wall_varfile;
+    ios_base::openmode openmode = ios_base::out|ios_base::trunc;
+    actkey->openmode = openmode;
+
+    int currentProcessorID = GetCurrentProcessorID();
+    int serverTmp = GetServerSepMode();
+ 
+    if (currentProcessorID == serverTmp)
+    {
+        ParallelOpenFile(actkey);
+    }
+
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int sendProcess = GetZoneProcessorIDSepMode(iZone);
+        int recvProcess = GetServerSepMode();
+
+        int myProcessorID = GetCurrentProcessorID();
+        int sendRecvTag = GetSendRecvTag(actkey, iZone);
+
+        if (myProcessorID == sendProcess)
+        {
+            //! If zone i belongs to the current process.
+            CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->ExportSurfaceVariables(actkey);
+        }
+
+        PH_Trade(actkey, sendProcess, recvProcess, sendRecvTag);
+
+        if (myProcessorID == recvProcess)
+        {
+            //! If the current process is the server process.
+            WriteASCIIFile(actkey);
+        }
+    }
+
+    if (currentProcessorID == serverTmp)
+    {
+        ParallelCloseFile(actkey);
+    }
+
+}
+
+void CFDSolver::WriteWallAircoefASCII(ActionKey *actkey, vector <DataContainer *> datalist)
+{
+    int numberOfSpecies = GlobalDataBase::GetIntParaFromDB("numberOfSpecies");
+
+    ostringstream ossTitle;
+    ossTitle << "title=\"Wall Aircoef Data of PHengLEI\"" << endl;
+    ossTitle << "variables=\"x\", \"y\", \"z\"";
+
+    int nVariableNumber = postVisualWall->GetVisualVariablesNumber();
+    int dataNumber = nVariableNumber;
+    string varName;
+    int varType;
+    for (int iVar = 0; iVar < nVariableNumber; ++ iVar)
+    {
+        varType = postVisualWall->GetVisualVariablesType(iVar);
+        if (varType == VISUAL_WALL_NS)
+        {
+            dataNumber += numberOfSpecies - 1;
+        }
+        else
+        {
+            varName = postVisualWall->GetVariableName(varType);
+            ossTitle << ", \""<< varName.c_str()<<"\"";
+        }
+    }
+
+    //! Export the mass fractions of species.
+    if (nVariableNumber != dataNumber)
+    {
+        using namespace GAS_SPACE;
+        string *speciesName = gas->GetNameOfSpecies();
+        for (int iSpecies = 0; iSpecies < numberOfSpecies; ++ iSpecies)
+        {
+            ossTitle << ", \""<< speciesName[iSpecies].c_str()<<"\"";
+        }
+    }
+
+    string flowFileName = actkey->filename;
+    fstream wallAircoefFile;
+    OpenFile(wallAircoefFile, flowFileName, ios_base::out|ios_base::trunc);
+    wallAircoefFile << setiosflags(ios::left);
+    wallAircoefFile << setiosflags(ios::scientific);
+    wallAircoefFile << setprecision(10);
+    wallAircoefFile << ossTitle.str() << endl;
+
+    uint_t nzones = datalist.size();
+    for (int iZone = 0; iZone < nzones; ++ iZone)
+    {
+        int gridTypeofLocalZone = PHMPI::GetZoneGridType(iZone);
+
+        DataContainer *cdata = datalist[iZone];
+        cdata->moveto_begin();
+
+        int IMxOrNumPts, JMxOrNumElements, KMxOrNumFaces;
+
+        int oriGridIndex = -1;
+        PHRead(cdata, &oriGridIndex, 1);
+
+        int GridID;
+        PHRead(cdata, &GridID, 1);
+
+        int TecioMission;
+        PHRead(cdata, &TecioMission, 1);
+
+        while (true)
+        {
+            if (TecioMission == 0) break;
+
+            string bcName;
+            cdata->read_string(bcName);
+
+            PHRead(cdata, &IMxOrNumPts, 1);
+            PHRead(cdata, &JMxOrNumElements, 1);
+            PHRead(cdata, &KMxOrNumFaces, 1);
+
+            int coor_count = 0;
+            PHRead(cdata, coor_count);
+
+            RDouble *x = new RDouble[coor_count];
+            RDouble *y = new RDouble[coor_count];
+            RDouble *z = new RDouble[coor_count];
+            PHRead(cdata, x, coor_count);
+            PHRead(cdata, y, coor_count);
+            PHRead(cdata, z, coor_count);
+
+            vector < int > data_count;
+            data_count.resize(0);
+            vector < RDouble *> vector_data;
+            vector_data.resize(0);
+            for (int iData = 0; iData < dataNumber; ++ iData)
+            {
+                int idata_count = 0;
+                PHRead(cdata, idata_count);
+                data_count.push_back(idata_count);
+
+                int iValueLocation = 0;
+                PHRead(cdata, iValueLocation);
+
+                RDouble *qq = new RDouble [idata_count];
+                PHRead(cdata, qq, idata_count);
+
+                vector_data.push_back(qq);
+            }
+
+            ostringstream ossZoneTitle;
+
+            if (oriGridIndex >= 0)
+            {
+                ossZoneTitle << "\"oriZone_"<< oriGridIndex << " ";
+                ossZoneTitle << "Zone_"<< GridID << "_" << bcName << "\"";
+            }
+            else
+            {
+                ossZoneTitle << "\"Zone_"<< GridID << "_" << bcName << "\"";
+            }
+
+            wallAircoefFile << "zone T = " << ossZoneTitle.str() << "\n";
+
+            if (gridTypeofLocalZone == STRUCTGRID)
+            {
+                wallAircoefFile << "I = " << IMxOrNumPts << "\n";
+                wallAircoefFile << "J = " << JMxOrNumElements << "\n";
+                wallAircoefFile << "K = " << KMxOrNumFaces << "\n";
+                wallAircoefFile << "f = BLOCK" << "\n";
+
+                int wordWidth = 20;
+                int nWordOfLine = 5;
+                for (int iNode = 0; iNode < coor_count; ++ iNode)
+                {
+                    wallAircoefFile << setw(wordWidth) << x[iNode];
+                    if ((iNode + 1) % nWordOfLine == 0) 
+                    {
+                        wallAircoefFile << "\n";
+                    }
+                }
+                if (coor_count % nWordOfLine != 0) wallAircoefFile << "\n";
+
+                for (int iNode = 0; iNode < coor_count; ++ iNode)
+                {
+                    wallAircoefFile << setw(wordWidth) << y[iNode];
+                    if ((iNode + 1) % nWordOfLine == 0) 
+                    {
+                        wallAircoefFile << "\n";
+                    }
+                }
+                if (coor_count % nWordOfLine != 0) wallAircoefFile << "\n";
+
+                for (int iNode = 0; iNode < coor_count; ++ iNode)
+                {
+                    wallAircoefFile << setw(wordWidth) << z[iNode];
+                    if ((iNode + 1) % nWordOfLine == 0) 
+                    {
+                        wallAircoefFile << "\n";
+                    }
+                }
+                if (coor_count % nWordOfLine != 0) wallAircoefFile << "\n";
+
+                for (int iData = 0; iData < dataNumber; ++ iData)
+                {
+                    for (int iNode = 0; iNode < coor_count; ++ iNode)
+                    {
+                        wallAircoefFile << setw(wordWidth) << vector_data[iData][iNode];
+                        if ((iNode + 1) % nWordOfLine == 0) 
+                        {
+                            wallAircoefFile << "\n";
+                        }
+                    }
+                    if (coor_count % nWordOfLine != 0) wallAircoefFile << "\n";
+
+                    delete [] vector_data[iData];
+                }
+            }
+            else
+            {
+                int TotalNumFaceNodes_Rect = 0;
+                PHRead(cdata, &TotalNumFaceNodes_Rect, 1);
+
+                int *face2node = new int[TotalNumFaceNodes_Rect];
+                PHRead(cdata, face2node, TotalNumFaceNodes_Rect);
+
+                wallAircoefFile << "N = " << IMxOrNumPts << "\n";
+                wallAircoefFile << "E = " << JMxOrNumElements << "\n";
+                wallAircoefFile << "f = FEPOINT" << "\n";
+                wallAircoefFile << "ET = quadrilateral" << "\n";
+
+                int wordWidth = 20;
+                for (int iNode = 0; iNode < IMxOrNumPts; ++ iNode)
+                {
+                    wallAircoefFile << setw(wordWidth) << x[iNode]
+                                    << setw(wordWidth) << y[iNode]
+                                    << setw(wordWidth) << z[iNode];
+                    for (int iData = 0; iData < dataNumber; ++ iData)
+                    {
+                        wallAircoefFile << setw(wordWidth) << vector_data[iData][iNode];
+                    }
+                    wallAircoefFile << "\n";
+                }
+
+                for (int iData = 0; iData < dataNumber; ++ iData)
+                {
+                    delete [] vector_data[iData];
+                }
+
+                int count = 0;
+                for (int iCell = 0; iCell < JMxOrNumElements; ++ iCell)
+                {
+                    for(int iNode = 0; iNode < 4; ++ iNode)
+                    {
+                        wallAircoefFile << face2node[count] << "  ";
+                        count ++;
+                    }
+                    wallAircoefFile << "\n";
+                }
+
+                delete [] face2node;
+            }
+
+            delete [] x;
+            delete [] y;
+            delete [] z;
+
+            PHRead(cdata, &TecioMission, 1);
+        }
+    }
+
+    CloseFile(wallAircoefFile);
+}
+
+void CFDSolver::DumpHeatFlux(ActionKey *actkey)
+{
+    //int zoneIDofThisSolver = GetZoneLocalID();
+    //if (zoneIDofThisSolver != 0)
+    //{
+    //    //! Very Important: only the first zone on a processor need to implement the task.
+    //    //! other wise, the tasks would be implemented several times.
+    //    return;
+    //}
+
+    using namespace PHMPI;
+    string wall_heatfluxfile = "wall_heatflux.dat";
+    GlobalDataBase::GetData("wall_heatfluxfile", &wall_heatfluxfile, PHSTRING, 1);
+    if (wall_heatfluxfile == "")
+    {
+        return;
+    }
+
+    actkey->filename = wall_heatfluxfile;
+
+    ios_base::openmode openmode = ios_base::out|ios_base::app;
+    actkey->openmode = openmode;
+
+    int nZones = GetNumberofGlobalZones();
+    actkey->GetData()->moveto_begin();
+
+    RDouble *HeatFlux = new RDouble[7];
+    HeatFlux[0] = 0.0, HeatFlux[1] = 0.0, HeatFlux[2] = 0.0, HeatFlux[3] = 0.0, HeatFlux[4] = 0.0, HeatFlux[5] = 0.0, HeatFlux[6] = 0.0;
+    // [0]:maxHeatFlux, [1]:averageHeatFlux, [2]:totalHeatFlux, [3]:total_Tw, [4]:average_Tw, [5]:total_Pw, [6]:average_Pw
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int zoneProcessorID = GetZoneProcessorID(iZone);
+        int currentProcessorID = GetCurrentProcessorID();
+        if (currentProcessorID == zoneProcessorID)
+        {
+            //! If zone i belongs to the current process.
+            CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->ComputeHeatFlux(actkey, HeatFlux);
+        }
+    }
+    RDouble localMaxHeatFlux = HeatFlux[0];
+    RDouble localAverageHeatFlux = HeatFlux[2];
+    RDouble localAverageTw = HeatFlux[3];
+    RDouble localAveragePw = HeatFlux[5];
+
+    RDouble globalMaxHeatFlux = HeatFlux[0];
+    RDouble globalAverageHeatFlux = HeatFlux[2];
+    RDouble globalAverageTw = HeatFlux[3];
+    RDouble globalAveragePw = HeatFlux[5];
+    int nProcessorNumber = GetNumberOfProcessor();
+    if (nProcessorNumber > 1)
+    {
+        //synchronization of communication.
+        MPI_Barrier(MPI_COMM_WORLD);
+
+        //Communication.
+        MPI_Allreduce(&localMaxHeatFlux, &globalMaxHeatFlux, 1, PH_MPI_DOUBLE, MPI_MAX, MPI_COMM_WORLD);
+        MPI_Allreduce(&localAverageHeatFlux, &globalAverageHeatFlux, 1, PH_MPI_DOUBLE, MPI_SUM, MPI_COMM_WORLD);
+        MPI_Allreduce(&localAverageTw, &globalAverageTw, 1, PH_MPI_DOUBLE, MPI_SUM, MPI_COMM_WORLD);
+        MPI_Allreduce(&localAveragePw, &globalAveragePw, 1, PH_MPI_DOUBLE, MPI_SUM, MPI_COMM_WORLD);
+    }
+
+    int GlobalTotalWallFace = GlobalDataBase::GetIntParaFromDB("GlobalTotalWallFace");
+    HeatFlux[0] = globalMaxHeatFlux;
+    HeatFlux[1] = globalAverageHeatFlux / GlobalTotalWallFace;
+    HeatFlux[4] = globalAverageTw / GlobalTotalWallFace;
+    HeatFlux[6] = globalAveragePw / GlobalTotalWallFace;
+
+    int currentProcessorID = GetCurrentProcessorID();
+    int serverTmp = GetServerSepMode();
+    if (currentProcessorID == serverTmp)
+    {
+        WriteHeatFluxASCII(actkey, HeatFlux); //! Write data to file.
+    }
+    delete []HeatFlux;
+}
+
+void CFDSolver::WriteHeatFluxASCII(ActionKey *actkey, RDouble *HeatFlux)
+{
+    if (!actkey->IsNeedOpenFile())
+    {
+        return;
+    }
+
+    ParallelOpenFile(actkey);
+
+    std::ostringstream oss;
+    fstream &file = *(actkey->file);
+
+    //! To obtain the reference values.
+    Param_CFDSolver *parameters = GetControlParameters();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refDimensionalDensity = parameters->GetRefDimensionalDensity();
+    RDouble refDimensionalSonicSpeed = parameters->GetRefDimensionalSonicSpeed();
+    RDouble referenceTemperature = parameters->GetRefDimensionalTemperature();
+    RDouble refVelocity = refDimensionalSonicSpeed * refMachNumber;
+    RDouble refSquareVelocity = refVelocity * refVelocity;
+    RDouble refEnergy = refDimensionalDensity * refVelocity * refSquareVelocity;
+    RDouble refHeatFluxDimension = refEnergy * 0.001;
+    HeatFlux[0] = HeatFlux[0] * refHeatFluxDimension;
+    HeatFlux[1] = HeatFlux[1] * refHeatFluxDimension;
+    HeatFlux[4] = HeatFlux[4] * referenceTemperature;
+    HeatFlux[6] = HeatFlux[6] * refDimensionalDensity * refSquareVelocity;
+
+    if (IfFileEmpty(file))
+    {
+        oss << "Title=\"The Convergence of wall parameters\"" << endl;
+        oss << "Variables=" << endl;
+        oss << "iter" << endl;
+        oss << "Max_Qw(kW/m^2)" << endl;
+        oss << "Average_Qw(kW/m^2)" << endl;
+        oss << "Average_Tw(K)" << endl;
+        oss << "Average_Pw(Pa)" << endl;
+    }
+
+    int iterationStep;
+    GlobalDataBase::GetData("outnstep", &iterationStep, PHINT, 1);
+    oss << setiosflags(ios::left);
+    oss << setiosflags(ios::scientific);
+    oss << setprecision(10);
+
+    oss << iterationStep << "    ";
+    oss << HeatFlux[0] << "    ";
+    oss << HeatFlux[1] << "    ";
+    oss << HeatFlux[4] << "    ";
+    oss << HeatFlux[6] << "    ";
+    oss << "\n";
+
+    WriteASCIIFile(file, oss.str());
+
+    ParallelCloseFile(actkey);
+}
+
+#ifdef USE_TecplotLib
+void CFDSolver::WriteWallAircoef(ActionKey *actkey, vector <DataContainer *> datalist)
+{
+    ostringstream oss;
+    oss << "x y z";
+
+    int systemgridtype = GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+
+    int dataNumber;
+    dataNumber = 6;
+    oss << " "<< "cp";
+    oss << " "<< "cf";
+    oss << " "<< "yplus";
+    oss << " "<< "Q_NonDim";
+    oss << " "<< "Q_Dim(kW/m2)";
+    oss << " "<< "pw(Pa)";
+
+    if(systemgridtype == STRUCTGRID && nChemical == 1)
+    {
+        dataNumber = 9;
+        oss << " "<< "Qs(kW/m2)";
+        oss << " "<< "Qv(kW/m2)";
+        oss << " "<< "Qe(kW/m2)";
+    }
+
+    string Variable = oss.str();
+    const char *Variables = Variable.c_str();
+
+    const char *pltname = actkey->filename.c_str();
+
+    INTEGER4 Debug = 0;
+    INTEGER4 VIsDouble = 1;
+    INTEGER4 FileType = 0;
+    INTEGER4 I;
+
+    I = TECINI112((char*)"PHengLEI Grid Videotex",
+                  (char*)Variables,
+                  (char*)pltname,
+                  (char*)".",
+                  &FileType,
+                  &Debug,
+                  &VIsDouble);
+
+    bool FileIsFull = false;
+    uint_t nzones = datalist.size();
+    for (int iZone = 0; iZone < nzones; ++ iZone)
+    {
+        int gridTypeofLocalZone = PHMPI::GetZoneGridType(iZone);
+
+        DataContainer *cdata = datalist[iZone];
+        cdata->moveto_begin();
+
+        INTEGER4 IMxOrNumPts, JMxOrNumElements, KMxOrNumFaces;
+        INTEGER4 ZoneType;
+
+        if (gridTypeofLocalZone == STRUCTGRID)
+        {
+            ZoneType = TEC_SPACE::ORDERED;
+        }
+        else
+        {
+            ZoneType = TEC_SPACE::FEQUADRILATERAL;
+        }
+
+        int oriGridIndex = -1;
+        PHRead(cdata, &oriGridIndex, 1);
+
+        int GridID;
+        PHRead(cdata, &GridID, 1);
+
+        int TecioMission;
+        PHRead(cdata, &TecioMission, 1);
+
+        while (true)
+        {
+            if (TecioMission == 0) break;
+
+            string bcName;
+            cdata->read_string(bcName);
+
+            PHRead(cdata, &IMxOrNumPts, 1);
+            PHRead(cdata, &JMxOrNumElements, 1);
+            PHRead(cdata, &KMxOrNumFaces, 1);
+
+            int coor_count = 0;
+            PHRead(cdata, coor_count);
+
+            RDouble *x = new RDouble[coor_count];
+            RDouble *y = new RDouble[coor_count];
+            RDouble *z = new RDouble[coor_count];
+            PHRead(cdata, x, coor_count);
+            PHRead(cdata, y, coor_count);
+            PHRead(cdata, z, coor_count);
+
+            INTEGER4 *ValueLocation = new INTEGER4[dataNumber + 3];
+            ValueLocation[0] = 1;
+            ValueLocation[1] = 1;
+            ValueLocation[2] = 1;
+
+            vector < int > data_count;
+            data_count.resize(0);
+            vector < RDouble *> vector_data;
+            vector_data.resize(0);
+            for (int iData = 0; iData < dataNumber; ++ iData)
+            {
+                int idata_count = 0;
+                PHRead(cdata, idata_count);
+                data_count.push_back(idata_count);
+
+                int iValueLocation = 0;
+                PHRead(cdata, iValueLocation);
+                ValueLocation[3 + iData] = iValueLocation;
+
+                RDouble *qq = new RDouble [idata_count];
+                PHRead(cdata, qq, idata_count);
+
+                vector_data.push_back(qq);
+            }
+
+            INTEGER4 ICellMax                   = 0;
+            INTEGER4 JCellMax                   = 0;
+            INTEGER4 KCellMax                   = 0;
+            double   SolutionTime               = 360.0;
+            INTEGER4 StrandID                   = 0;
+            INTEGER4 ParentZone                 = 0;
+            INTEGER4 IsBlock                    = 1;
+            INTEGER4 NumFaceConnections         = 0;
+            INTEGER4 FaceNeighborMode           = 0;
+
+            INTEGER4 TotalNumFaceNodes_Rect     = 0;
+
+            if (gridTypeofLocalZone == UNSTRUCTGRID)
+            {
+                PHRead(cdata, &TotalNumFaceNodes_Rect, 1);
+            }
+
+            INTEGER4 NumConnBndryFaces_Rect  = 0;
+            INTEGER4 TotalNumBndryConns_Rect = 0;
+            INTEGER4 SharConn                = 0;
+
+            ostringstream oss1;
+
+            if (oriGridIndex >= 0)
+            {
+                oss1 << "oriZone_"<< oriGridIndex<<" ";
+            }
+            oss1 << "Zone_"<< GridID << "_" << bcName;
+            string Zonetitle = oss1.str();
+            const char * ZoneTitle = Zonetitle.c_str();
+
+            I = TECZNE112((char*)ZoneTitle,
+                          &ZoneType,
+                          &IMxOrNumPts,
+                          &JMxOrNumElements,
+                          &KMxOrNumFaces,
+                          &ICellMax,
+                          &JCellMax,
+                          &KCellMax,
+                          &SolutionTime,
+                          &StrandID,
+                          &ParentZone,
+                          &IsBlock,
+                          &NumFaceConnections,
+                          &FaceNeighborMode,
+                          &TotalNumFaceNodes_Rect,
+                          &NumConnBndryFaces_Rect,
+                          &TotalNumBndryConns_Rect,
+                          NULL,
+                          ValueLocation,
+                          NULL,
+                          &SharConn);
+
+            INTEGER4 IsDouble = 1;
+            I = TECDAT112(&coor_count, x, &IsDouble);
+            I = TECDAT112(&coor_count, y, &IsDouble);
+            I = TECDAT112(&coor_count, z, &IsDouble);
+
+            for (int iData = 0; iData < dataNumber; ++ iData)
+            {
+                I = TECDAT112(&data_count[iData], vector_data[iData], &IsDouble);
+
+                delete [] vector_data[iData];
+            }
+
+            if (gridTypeofLocalZone == UNSTRUCTGRID)
+            {
+                int *face2node = new INTEGER4[TotalNumFaceNodes_Rect];
+                PHRead(cdata, face2node, TotalNumFaceNodes_Rect);
+
+                I = TECNOD112(face2node);
+
+                delete []face2node;
+            }
+
+            if (FileIsFull == false)
+            {
+                FileIsFull = true;
+            }
+
+            delete []x;
+            delete []y;
+            delete []z;
+
+            PHRead(cdata, &TecioMission, 1);
+            delete []ValueLocation;
+        }
+    }
+
+    I = TECEND112();
+    
+    if (FileIsFull == false)
+    {
+        remove(pltname);
+    }
+
+    return;
+}
+#endif
+
+void CFDSolver::UploadInterfaceData()
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    for (int iLevel = 0; iLevel < GetNumberOfMultiGrid(); ++ iLevel)
+    {
+        ActionKey *actkey = new ActionKey();
+        FillActionKey(actkey, UPLOAD_INTERFACE_DATA, iLevel);
+
+        int nZones = GetNumberofGlobalZones();
+
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            int ZoneProcessorID = GetZoneProcessorIDSepMode(iZone);
+            int CurrentProcessorID = GetCurrentProcessorID();
+
+            if (CurrentProcessorID == ZoneProcessorID)
+            {
+                CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+                solver->UploadInterfaceData(actkey);
+            }
+        }
+        delete actkey;    actkey = nullptr;
+    }
+}
+
+void CFDSolver::UpdateInterfaceData()
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    for (int iLevel = 0; iLevel < GetNumberOfMultiGrid(); ++ iLevel)
+    {
+        ActionKey *actkey = new ActionKey();
+        FillActionKey(actkey, UPDATE_INTERFACE_DATA, iLevel);
+
+        //Task_ServerUpdateInterface *task = new Task_ServerUpdateInterface();
+        if (IsNeedNonBlockingCommunication(actkey))
+        {
+            MainTaskNonBlocking(actkey);
+        }
+        else
+        {
+            MainTaskBlocking(actkey);
+        }
+        //delete task;
+        delete actkey;    actkey = nullptr;
+    }
+}
+
+void CFDSolver::DownloadInterfaceData()
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    for (int iLevel = 0; iLevel < GetNumberOfMultiGrid(); ++ iLevel)
+    {
+        ActionKey *actkey = new ActionKey();
+        FillActionKey(actkey, DOWNLOAD_INTERFACE_DATA, iLevel);
+
+        int nZones = GetNumberofGlobalZones();
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            int zoneProcessorID = GetZoneProcessorIDSepMode(iZone);
+            int currentProcessorID = GetCurrentProcessorID();
+
+            if (currentProcessorID == zoneProcessorID)
+            {
+                CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+                solver->DownloadInterfaceData(actkey);
+            }
+        }
+
+        delete actkey;    actkey = nullptr;
+    }
+}
+
+void CFDSolver::UploadInterfaceData(int iLevel)
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+    ActionKey *actkey = new ActionKey();
+    FillActionKey(actkey, UPLOAD_INTERFACE_DATA, iLevel);
+
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int ZoneProcessorID = GetZoneProcessorIDSepMode(iZone);
+        int CurrentProcessorID = GetCurrentProcessorID();
+
+        if (CurrentProcessorID == ZoneProcessorID)
+        {
+            CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->UploadInterfaceData(actkey);
+        }
+    }
+
+    delete actkey;
+}
+
+void CFDSolver::UpdateInterfaceData(int iLevel)
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+    ActionKey *actkey = new ActionKey();
+    FillActionKey(actkey, UPDATE_INTERFACE_DATA, iLevel);
+
+    //Task_ServerUpdateInterface *task = new Task_ServerUpdateInterface();
+    if (IsNeedNonBlockingCommunication(actkey))
+    {
+        MainTaskNonBlocking(actkey);
+    }
+    else
+    {
+        MainTaskBlocking(actkey);
+    }
+
+    delete actkey;
+}
+
+void CFDSolver::DownloadInterfaceData(int iLevel)
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+    ActionKey *actkey = new ActionKey();
+    FillActionKey(actkey, DOWNLOAD_INTERFACE_DATA, iLevel);
+
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int zoneProcessorID = GetZoneProcessorIDSepMode(iZone);
+        int currentProcessorID = GetCurrentProcessorID();
+
+        if (currentProcessorID == zoneProcessorID)
+        {
+            CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->DownloadInterfaceData(actkey);
+        }
+    }
+
+    delete actkey;
+}
+
+void CFDSolver::UploadInterpointData()
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    for (int iLevel = 0; iLevel < GetNumberOfMultiGrid(); ++ iLevel)
+    {
+        ActionKey *actkey = new ActionKey();
+        FillActionKey(actkey, UPLOAD_INTERPOINT_DATA, iLevel);
+
+        int nZones = GetNumberofGlobalZones();
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            int ZoneProcessorID = GetZoneProcessorIDSepMode(iZone);
+            int CurrentProcessorID = GetCurrentProcessorID();
+
+            if (CurrentProcessorID == ZoneProcessorID)
+            {
+                CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+                solver->UploadInterpointData(actkey);
+            }
+        }
+        delete actkey;    actkey = nullptr;
+    }
+}
+
+void CFDSolver::UpdateInterpointData()
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    for (int iLevel = 0; iLevel < GetNumberOfMultiGrid(); ++ iLevel)
+    {
+        ActionKey *actkey = new ActionKey();
+        FillActionKey(actkey, UPDATE_INTERPOINT_DATA, iLevel);
+
+        TaskServerUpdateInterpoint *task = new TaskServerUpdateInterpoint();
+        if (IsNeedNonBlockingCommunication(actkey))
+        {
+            task->MainTaskNonBlocking(actkey);
+        }
+        else
+        {
+            task->MainTaskBlocking(actkey);
+        }
+        delete task;    task = nullptr;
+        delete actkey;    actkey = nullptr;
+    }
+}
+
+void CFDSolver::DownloadInterpointData()
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    for (int iLevel = 0; iLevel < GetNumberOfMultiGrid(); ++ iLevel)
+    {
+        ActionKey *actkey = new ActionKey();
+        FillActionKey(actkey, DOWNLOAD_INTERPOINT_DATA, iLevel);
+
+        int nZones = GetNumberofGlobalZones();
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            int zoneProcessorID = GetZoneProcessorIDSepMode(iZone);
+            int currentProcessorID = GetCurrentProcessorID();
+
+            if (currentProcessorID == zoneProcessorID)
+            {
+                CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+                solver->DownloadInterpointData(actkey);
+            }
+        }
+
+        delete actkey;    actkey = nullptr;
+    }
+}
+
+void CFDSolver::CommunicationInterpointWeight()
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    for (int iLevel = 0; iLevel < GetNumberOfMultiGrid(); ++ iLevel)
+    {
+        ActionKey *actkey = new ActionKey();
+        FillActionKey(actkey, DOWNLOAD_INTERPOINT_DATA, iLevel);
+
+        CommunicationInterpointWeight(actkey);
+        DownloadInterpointWeight(actkey);
+
+        delete actkey;    actkey = nullptr;
+    }
+}
+
+void CFDSolver::UploadOversetData()
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    for (int iLevel = 0; iLevel < GetNumberOfMultiGrid(); ++ iLevel)
+    {
+        ActionKey *actkey = new ActionKey();
+        FillActionKey(actkey, UPLOAD_OVERSET_DATA, iLevel);
+
+        int nZones = GetNumberofGlobalZones();
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            int zoneProcessorID = GetZoneProcessorIDSepMode(iZone);
+            int currentProcessorID = GetCurrentProcessorID();
+
+            if (currentProcessorID == zoneProcessorID)
+            {
+                CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+                solver->UploadOversetData(actkey);
+            }
+        }
+
+        delete actkey;
+    }
+}
+
+void CFDSolver::UpdateOversetData()
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    for (int iLevel = 0; iLevel < GetNumberOfMultiGrid(); ++ iLevel)
+    {
+        ActionKey *actkey = new ActionKey();
+        FillActionKey(actkey, UPDATE_OVERSET_DATA, iLevel);
+
+        int nZones = GetNumberofGlobalZones();
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            OversetTopologyManager *oversetTopologyManager = PHSPACE::GetOversetTopologyManager();
+            uint_t numberOfOversetNeighbors = oversetTopologyManager->GetNumberOfOversetNeighbors(iZone);
+
+            for (int iNeighbor = 0; iNeighbor < numberOfOversetNeighbors; ++ iNeighbor)
+            {
+                int oversetNeighborZoneIndex = oversetTopologyManager->GetNeighborOversetZoneIndex(iZone, iNeighbor);
+                PH_Interface(actkey, iZone, oversetNeighborZoneIndex);
+            }
+        }
+        delete actkey;
+    }
+}
+
+void CFDSolver::DownloadOversetData()
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+
+    for (int level = 0; level < GetNumberOfMultiGrid(); ++ level)
+    {
+        ActionKey *actkey = new ActionKey();
+        FillActionKey(actkey, DOWNLOAD_OVERSET_DATA, level);
+
+        int nZones = GetNumberofGlobalZones();
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            int zoneProcessorID = GetZoneProcessorIDSepMode(iZone);
+            int currentProcessorID = GetCurrentProcessorID();
+
+            if (currentProcessorID == zoneProcessorID)
+            {
+                CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+                solver->DownloadOversetData(actkey);
+            }
+        }
+        delete actkey;
+    }
+}
+
+void CFDSolver::TecOutAverageFlow(ActionKey *actkey)
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    WriteVisualFile(AverageFlow);
+}
+
+void CFDSolver::TecOutAverageReynoldsStress(ActionKey *actkey)
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    WriteVisualFile(AverageReynoldsStress);
+}
+
+//! Get the file name for Restart info dumping, NS-solver by default.
+const string CFDSolver::GetFlowTecFileName()
+{
+    string visualfile = "flow.dat";
+    GlobalDataBase::GetData("visualfile", &visualfile, PHSTRING, 1);
+    return visualfile;
+}
+
+#ifdef USE_GMRESSOLVER
+PetscErrorCode MyKSPMonitor(KSP ksp, PetscInt n, PetscReal rnorm, void *dummy)
+{
+       Vec x;
+
+       /*
+          Build the solution vector
+       */
+       PetscCall(KSPBuildSolution(ksp, NULL, &x));
+
+       /*
+          Write the solution vector and residual norm to stdout.
+           - PetscPrintf() handles output for multiprocessor jobs
+             by printing from only one processor in the communicator.
+           - The parallel viewer PETSC_VIEWER_STDOUT_WORLD handles
+             data from multiple processors so that the output
+             is not jumbled.
+       */
+       //PetscCall(PetscPrintf(PETSC_COMM_WORLD, "iteration %" PetscInt_FMT " solution vector:\n", n));
+       //PetscCall(VecView(x, PETSC_VIEWER_STDOUT_WORLD));
+       PetscCall(PetscPrintf(PETSC_COMM_WORLD, "iteration %" PetscInt_FMT " KSP Residual norm %14.12e \n", n, (double)rnorm));
+       return 0;
+}
+#endif
+
+}
+
diff --git a/CFD/Solver/src/Controller.cpp b/CFD/Solver/src/Controller.cpp
new file mode 100644
index 0000000..80a3a53
--- /dev/null
+++ b/CFD/Solver/src/Controller.cpp
@@ -0,0 +1,5489 @@
+#include "Controller.h"
+#include "CFDSolver.h"
+#include "Region.h"
+#include "Math_BasisFunction.h"
+#include "Task.h"
+#include "TK_Log.h"
+#ifdef USE_GMRESSOLVER
+#include "petscksp.h"
+#endif
+using namespace std;
+
+namespace PHSPACE
+{
+Controller::Controller(int iSolver, Region *region)
+{
+    this->solverID = iSolver;
+    this->region = region;
+
+    qProxy = 0;
+
+    using namespace PHMPI;
+
+    int nZones = GetNumberofGlobalZones();
+
+    rhsProxy = new ZoneFieldProxy(iSolver, GetNumberOfMultiGrid(), nZones);
+
+    if (GetNumberOfMultiGrid() > 1)
+    {
+        qProxy = new ZoneFieldProxy(iSolver, GetNumberOfMultiGrid(), nZones);
+    }
+}
+
+Controller::~Controller()
+{
+    if (GetNumberOfMultiGrid() > 1)
+    {
+        delete qProxy;
+    }
+
+    delete rhsProxy;
+}
+
+LIB_EXPORT void Controller::InitCoarseGridsFlow(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        Grid *coarseGrid = grid->GetCoarseGrid();
+        if (coarseGrid)
+        {
+            if (iSolver != NS_SOLVER) continue;
+            CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+            //solver->InitCGrid(grid, coarseGrid);
+            solver->ComputeGamaAndTemperature(coarseGrid);
+            solver->Boundary(coarseGrid);
+            solver->ComputeGamaAndTemperature(coarseGrid);
+            solver->ComputeNodeValue(coarseGrid);
+        }
+    }
+}
+
+LIB_EXPORT void Controller::Initialize(int iSolver)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+    int nProtectData = 0;
+    if(GlobalDataBase::IsExist("nProtectData", PHINT, 1))
+    {
+        nProtectData = GlobalDataBase::GetIntParaFromDB("nProtectData");
+    }
+
+    int level = 0;
+    //! First: Initialize memory.
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Zone *zone = GetZone(zoneID);
+        if (!zone)
+        {
+            continue;
+        }
+
+        PHSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->InitMemory();
+    }
+
+    //! Second: Initialize flow variables on the finest mesh.
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Zone *zone = GetZone(zoneID);
+        if (!zone)
+        {
+            continue;
+        }
+
+        PHSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        if (nProtectData == 0)
+        {
+            solver->InitFlow();
+        }
+        else
+        {
+            solver->InitProtectedFlow();
+        }
+    }
+
+    //! Third: Initialize flow variables on coarser grids, if multi-grid is used.
+    int nMGLevel = PHSPACE::GlobalDataBase::GetIntParaFromDB("nMGLevel");
+    for (int iLevel = 0; iLevel < nMGLevel - 1; ++ iLevel)
+    {
+        RestrictAllQ(iSolver, iLevel);
+        InitCoarseGridsFlow(iSolver, iLevel);
+    }
+
+    //! Finally: Interfaces communications.
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        PHSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->CommunicationInterfaceData();
+        InterpointInformation *interPointInfor = grid->GetInterpointInfo();
+        if (interPointInfor)
+        {
+            solver->CommunicationInterpointData();
+        }
+    }
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone) continue;
+
+        for (int iLevel = 0; iLevel < GetNumberOfMultiGrid(); iLevel ++)
+        {
+            Grid *grid = GetGrid(zoneID, iLevel);
+            CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+            solver->ModifyNodeValue(grid);
+            solver->ModifyQTurbNodeValue(grid);
+        }
+    }
+
+    int compressible = GlobalDataBase::GetIntParaFromDB("compressible");
+    if (COMPRESSIBLE == compressible)
+    {
+        ComputeNodeBCType();
+    }
+
+    //! Initialization of boundary and dependent variables for first iteration.
+    //! Turn on it when gradient pre-computing for turbulent solver is used.
+    //SetBoundaryValueOfField(iSolver, level);
+    //UpdateIndependentField(iSolver, level);
+}
+
+void Controller::CleanUp(int iSolver)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    //! First: Initialize memory.
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        PHSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->ReleaseMemory();
+    }
+}
+
+void Controller::ComputeNodeBCType()
+{
+    int sysGridType = GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if (sysGridType != UNSTRUCTGRID)
+    {
+        return;
+    }
+
+    using namespace PHMPI;
+
+    int needCommunication = 1;
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int iZoneProcessorID = GetZoneProcessorID(iZone);
+        int myid = GetCurrentProcessorID();
+        if (myid == iZoneProcessorID)
+        {
+            //! Compute node bctype in each zone.
+            Grid *grid = GetGrid(iZone, 0);
+            grid->ComputeNodeBCType();
+            if (!(grid->GetInterpointInfo()))
+            {
+                needCommunication = 0;
+            }
+        }
+    }
+
+    PH_CompareMaxMin(needCommunication, 2);
+    if (!needCommunication)
+    {
+        return;
+    }
+    CommunicationNodeBCType();
+}
+
+void Controller::CommunicationNodeBCType()
+{
+    using namespace PHMPI;
+    using namespace PHENGLEI;
+
+    map<int, int> bcTypeMap;
+    bcTypeMap.insert(pair<int,int>(SOLID_SURFACE   , 4));
+    bcTypeMap.insert(pair<int,int>(FARFIELD        , 3));
+    bcTypeMap.insert(pair<int,int>(SYMMETRY        , 2));
+    bcTypeMap.insert(pair<int,int>(INTERFACE       , 1));
+    bcTypeMap.insert(pair<int,int>(INFLOW          , 1));
+    bcTypeMap.insert(pair<int,int>(OUTFLOW         , 1));
+    bcTypeMap.insert(pair<int,int>(PRESSURE_INLET  , 1));
+    bcTypeMap.insert(pair<int,int>(PRESSURE_OUTLET , 1));
+    bcTypeMap.insert(pair<int,int>(OUTFLOW_CONFINED, 1));
+
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int myid = GetCurrentProcessorID();
+        int tag = iZone;
+        int sendProc = GetZoneProcessorID(iZone);
+
+        ZoneNeighbor *zoneNeighborForPoint = zoneConnectivityForPoint->GetZoneNeighborForPoint(iZone);
+        std::size_t numberOfNeighbor = zoneNeighborForPoint->GetNumberOfNeighbor();
+
+        for (std::size_t iNeighborZone = 0; iNeighborZone < numberOfNeighbor; ++ iNeighborZone)
+        {
+            int neighborZoneIndex = zoneNeighborForPoint->GetZoneIndexOfNeighbor(iNeighborZone);
+            int recv_proc = GetZoneProcessorID(neighborZoneIndex);
+
+            DataContainer *cdata = new DataContainer();
+
+            if (myid == sendProc)
+            {
+                UnstructGrid *grid = UnstructGridCast(PHSPACE::GetGrid(iZone, 0));
+                InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+                int *nodeBCType = reinterpret_cast <int *> (grid->GetDataPtr("nodeBCType"));
+
+                cdata->moveto_begin();
+
+                int iNeighbor = interpointInformation->FindIthNeighbor(neighborZoneIndex);
+                int numberOfInterpointsForNeighbor = interpointInformation->GetNumberOfInterpointsForNeighbor(iNeighbor);
+                int *pointIndexForSend = interpointInformation->GetPointIndexForSend(iNeighbor);
+                int *interPoint2GlobalPoint = interpointInformation->GetInterPoint2GlobalPoint();
+
+                int iPoint;
+                int globalPoint;
+                int BCType;
+                for (int ipointLocal = 0; ipointLocal < numberOfInterpointsForNeighbor; ++ ipointLocal)
+                {
+                    iPoint = pointIndexForSend[ipointLocal];
+                    globalPoint = interPoint2GlobalPoint[iPoint];
+                    BCType = nodeBCType[globalPoint];
+
+                    cdata->write(&BCType, sizeof(int));
+                }
+            }
+
+            PH_Trade(cdata, sendProc, recv_proc, tag);
+
+            if (myid == recv_proc)
+            {
+                UnstructGrid *gridNeighbor = UnstructGridCast(PHSPACE::GetGrid(neighborZoneIndex, 0));
+                InterpointInformation *interpointInformationNeighbor = gridNeighbor->GetInterpointInfo();
+                int *nodeBCType = reinterpret_cast<int *>(gridNeighbor->GetDataPtr("nodeBCType"));
+
+                cdata->moveto_begin();
+
+                int iNeighbor = interpointInformationNeighbor->FindIthNeighbor(iZone);
+                int numberOfInterpointsForNeighbor = interpointInformationNeighbor->GetNumberOfInterpointsForNeighbor(iNeighbor);
+                int *pointIndexForReceive = interpointInformationNeighbor->GetPointIndexForReceive(iNeighbor);
+                int *interPoint2GlobalPoint = interpointInformationNeighbor->GetInterPoint2GlobalPoint();
+
+                int iPoint;
+                int globalPoint;
+                int recvBCType;
+                for (int ipointLocal = 0; ipointLocal < numberOfInterpointsForNeighbor; ++ ipointLocal)
+                {
+                    iPoint = pointIndexForReceive[ipointLocal];
+                    globalPoint = interPoint2GlobalPoint[iPoint];
+                    cdata->read(&recvBCType, sizeof(int));
+
+                    int localBCIndex = bcTypeMap[nodeBCType[globalPoint]];
+                    int recvBCIndex  = bcTypeMap[recvBCType];
+                    if (recvBCIndex > localBCIndex)
+                    {
+                        nodeBCType[globalPoint] = recvBCType;
+                    }
+
+                }
+            }
+
+            delete cdata;    cdata = nullptr;
+        }
+    }
+}
+
+LIB_EXPORT void Controller::SolveSteadyField()
+{
+    int iSolver = this->GetSolverIndex();
+    int compressible = GlobalDataBase::GetIntParaFromDB("compressible");
+    if (COMPRESSIBLE == compressible)
+    {
+        //! Zero the residuals of the finest grid.
+        ZeroResiduals(iSolver);
+
+        MultiGrid(iSolver);
+    }
+    else if (INCOMPRESSIBLE == compressible)
+    {
+        SolveIncomSteadyField(iSolver);
+    }
+}
+
+LIB_EXPORT void Controller::SolveIncomSteadyField(int iSolver, int level)
+{
+    int nLocalZones  = PHMPI::GetNumberofLocalZones();
+    for (int iZone = 0; iZone < nLocalZones; ++iZone)
+    {
+        int zoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForPressureBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        CFDSolver* solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->SolveIncomSteadyField();
+    }
+}
+
+LIB_EXPORT void Controller::SolveHyrbridDBPBSteadyField(int iSolver, int level)
+{
+    ZeroResiduals(iSolver);
+    MultiGrid(iSolver);
+    SolveIncomSteadyField(iSolver);
+}
+
+LIB_EXPORT void Controller::SolveUnsteadyField()
+{
+    int iSolver = this->GetSolverIndex();
+    int inerStepInterval = GlobalDataBase::GetIntParaFromDB("innstep");
+
+    while (true)
+    {
+        inerStepInterval += 1;
+        GlobalDataBase::UpdateData("innstep", &inerStepInterval, PHINT, 1);
+
+        SolveSteadyField();
+
+        if (CVGNorm(iSolver))
+        {
+            UpdateUnsteadyFlow(iSolver);
+            break;
+        }
+
+        PHSolver *solver = GetCFDSolver(0, iSolver);
+        solver->CommunicationInterpointData();
+    }
+}
+
+void Controller::MultiGrid(int iSolver, int level)
+{
+    CreateRHSProxy(iSolver, level);
+    StoreRhsByResidual(iSolver, level);
+    int outerIteration = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int MGPreIteration    = GlobalDataBase::GetIntParaFromDB("MGPreIteration");
+    bool computeOnFinestGrid = (outerIteration % MGPreIteration != 0);
+
+    //! If grid is in the coarsest level.
+    if (ISCoarsestGrid(level) || iSolver != NS_SOLVER || computeOnFinestGrid)
+    {
+        Relaxation(iSolver, level);
+    }
+    else
+    {
+        int cLevel = level + 1;
+
+        //! Smooth the solutions before corrections.
+        Relaxation(iSolver, level);
+
+        CommunicationInterfaceDataOneLevel(iSolver, level);
+
+        //! Restrict from fine to coarse grid for all q.
+        //! Corresponding to nsmb: wsav = restr(w).
+        //! Call the following function to update the Q value(cq) on the coarse grid. If there is not coarse grid, this part will not run.
+        RestrictAllQ(iSolver, level);
+
+        CommunicationInterfaceDataOneLevel(iSolver, cLevel);
+
+        //! Store coarse grid solution in temporary array cqsav.
+        //! cqsav represents the variables on the coarse grid.
+        CreateQProxy(iSolver, cLevel);
+
+        //! After LoadQ(cgrid, cqsav), cqsav is actually wsav(Corresponding to NSMB).
+        //! LoadQ  gets out the value of q(cq) on coarse grid and assigns it to cqsav.
+        LoadQ(iSolver, cLevel);
+
+        //! Defect.
+        //! The followings corresponding to nsmb d = RL-1(wsav) - restr(RL(w)-f).
+        //! in which (*res) = - (*rhs) correspond to - f
+        //! Note that the value of res is on fine grid, rhs ought be f��and this should be checked.
+        //! Here should be ni and nj,rather than cni and cnj!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+        InitResidual(iSolver, level);
+
+        //! After UpdateResiduals,(*res) = RL(w) - f.
+        UpdateResiduals(iSolver, level);
+
+        //! After RestrictDefect,(*cres) = - restr(RL(w) - f).
+        RestrictDefect(iSolver, level);
+
+        //! After UpdateResiduals,(*cres) = RL-1(wsav) - restr(RL(w) - f).
+        UpdateResiduals(iSolver, cLevel);
+
+        //! Solve on coarse grid.
+        int MGFasType = GlobalDataBase::GetIntParaFromDB("MGFasType");
+        int ifLowSpeedPrecon = GlobalDataBase::GetIntParaFromDB("ifLowSpeedPrecon");
+        if (ifLowSpeedPrecon == 1)
+        {
+            MGFasType = 1;    //! Precondition method is only available for V cycle.
+        }
+
+        //! After MultiGrid(cgrid), the value of q on coarse grid has been updated.
+        //! At this time,the value of q on coarse grid equals to w0 of NSMB.
+        //! MGFasType = 1 V cycle
+        //! MGFasType = 2 W cycle
+        for (int i = 0; i < MGFasType; ++ i)
+        {
+            MultiGrid(iSolver, cLevel);
+        }
+
+        CommunicationInterfaceDataOneLevel(iSolver, cLevel);
+
+        //! Put correction back to the coarse grid.
+        //! Actually, PutCorrection has done the operation of (w0 - wsav).
+        PutCorrection(iSolver, cLevel);
+
+        //! Communicate coarse grid here!!!
+
+        //! Correct variables in fine grid.
+        //! Actually CorrectFineGrid has done the operation of w = w + prol(w0 - wsav).
+        CorrectFineGrid(iSolver, level);
+
+        //! Smooth the solutions after corrections.
+        int n_post = GlobalDataBase::GetIntParaFromDB("n_post");
+        for (int iter = 0; iter < n_post; ++ iter)
+        {
+            Relaxation(iSolver, level);
+        }
+
+        //! The following function actually recover the value of q on coarse grid.
+        PutCorrectionBack(iSolver, cLevel);
+        //! Delete the temporary variables of QProxy.
+        DestroyQProxy(cLevel);
+    }
+    //! Put RHS back into its places.
+    //! Here, we just recover the initial value of res.
+    RecoverResidual(iSolver, level);
+
+    //! Delete the temporary variables of rhsProxy.
+    DestroyRHSProxy(level);
+}
+
+void Controller::UpdateUnsteadyFlow(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Zone *zone = GetZone(iZone);
+        if (!zone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(iZone, level);
+        CFDSolver *solver = GetCFDSolver(iZone, iSolver);
+
+        solver->UpdateUnsteadyFlow(grid);
+    }
+}
+
+void Controller::Relaxation(int iSolver, int level)
+{
+    using namespace PHSPACE;
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+    if (isFVMOrFDM == FD_METHOD)
+    {
+        PreSolveforStructHighOrder(iSolver, level);
+    }
+
+    int isUseLocalCFL = 0;
+    if (GlobalDataBase::IsExist("isUseLocalCFL", PHINT, 1))
+    {
+        isUseLocalCFL = GlobalDataBase::GetIntParaFromDB("isUseLocalCFL");
+    }
+
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+ 
+    if (tscheme == LU_SGS || level != 0)
+    {
+        //! LU-SGS implicit time integration method.
+        LoadResiduals(iSolver, level);
+
+        UpdateResiduals(iSolver, level);
+
+        SpectrumRadius(iSolver, level);
+
+        TimeStep(iSolver, level);
+
+        if (isUseLocalCFL == 1)
+        {
+            DualTimeStepsLUSGS(iSolver, level);
+        }
+        else
+        {
+            LUSGS(iSolver, level);
+        }
+        
+    }
+    else if (tscheme == GMRES)
+    {
+        //! Generalized Minimal Residual method added by Sen Zhang, Boqian Wang, et al. 
+        LoadResiduals(iSolver, level);
+
+        UpdateResiduals(iSolver, level);
+
+        SpectrumRadius(iSolver, level);
+
+        TimeStep(iSolver, level);
+
+#ifdef USE_GMRESSOLVER
+        GMRESSolver(iSolver, level);
+#endif       
+
+    }
+    else if (tscheme == MULTI_STAGE)
+    {
+        //! Explicit multi-stage time marching method.
+        SetBoundaryValueOfField(iSolver, level);
+
+        //! To obtain the viscous coff in spectrum radium term
+        ComputeViscousCoeff(iSolver, level);
+
+        SpectrumRadius(iSolver, level);
+
+        TimeStep(iSolver, level);
+
+        RungeKutta(iSolver, level);
+    }
+	else if (tscheme == Matrix_LU_SGS)
+    {
+        LoadResiduals(iSolver, level);
+
+        UpdateResiduals(iSolver, level);
+
+        SpectrumRadius(iSolver, level);
+
+        TimeStep(iSolver, level);
+
+        MatrixLUSGS(iSolver, level);
+    }
+    else
+    {
+        //! default
+        LoadResiduals(iSolver, level);
+        
+        UpdateResiduals(iSolver, level);
+        
+        SpectrumRadius(iSolver, level);
+        
+        TimeStep(iSolver, level);
+        
+        if (isUseLocalCFL == 1)
+        {
+            DualTimeStepsLUSGS(iSolver, level);
+        }
+        else
+        {
+            LUSGS(iSolver, level);
+        }
+    }
+}
+
+void Controller::TimeStep(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    if (iSolver != NS_SOLVER)
+    {
+        //! Only get time step for NS solver.
+        return;
+    }
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->TimeStep(grid);
+    }
+
+    ReduceMaxTimeStep(iSolver, level);
+}
+
+RDouble Controller::ComputeMinTimeStep(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int outnstep      = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int allReduceStep = GlobalDataBase::GetIntParaFromDB("allReduceStep");
+    RDouble globalMinTimeStep = GlobalDataBase::GetDoubleParaFromDB("globalMinTimeStep");
+
+    if (outnstep % allReduceStep != 0 && globalMinTimeStep > 0.0)
+    {
+        //! Compute global minimum time step each 'allReduceStep' iterations.
+        return globalMinTimeStep;
+    }
+
+    int nLocalZones = GetNumberofLocalZones();
+    RDouble globalMinDt =  LARGE;
+    RDouble localMaxDt  = -LARGE;
+
+    //! Important: Can not use OMP directly, due to the MIN/MAX comparison!
+    // #ifdef USE_OMP
+    // #pragma omp parallel for
+    // #endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        RDouble minDt, maxDt;
+        solver->ComputeMinTimeStep(grid, minDt, maxDt);
+
+        globalMinDt = MIN(globalMinDt, minDt);
+        localMaxDt  = MAX(localMaxDt, maxDt);
+    }
+
+
+    PH_CompareMaxMin(globalMinDt, 2);
+    GlobalDataBase::UpdateData("globalMinTimeStep", &globalMinDt, PHDOUBLE, 1);
+
+    return globalMinDt;
+}
+
+void Controller::ReduceMaxTimeStep(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int ifLocalTimeStep = GlobalDataBase::GetIntParaFromDB("ifLocalTimeStep");
+    if (ifLocalTimeStep != 0)
+    {
+        //! NON local time step method, return.
+        return;
+    }
+    if (iSolver != NS_SOLVER)
+    {
+        //! Only reduce time step for NS solver.
+        return;
+    }
+
+    RDouble globalMinDt = ComputeMinTimeStep(iSolver, level);
+
+    int nLocalZones = GetNumberofLocalZones();
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->ReduceMaxTimeStep(grid, globalMinDt);
+    }
+}
+
+void Controller::Diagonal(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->Diagonal(grid);
+    }
+}
+
+void Controller::SpectrumRadius(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+    if (iSolver != NS_SOLVER)
+    {
+        return;
+    }
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->SpectrumRadius(grid);
+    }
+}
+
+void Controller::ZeroResiduals(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->ZeroResiduals(grid);
+    }
+}
+
+void Controller::MixingPlaneBoundary(int iSolver,int level)
+{
+    using namespace PHMPI;
+
+    int nSolver = GlobalDataBase::GetIntParaFromDB("maxNumOfSolver");
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+
+    //! MixingPlane Boundary.
+    if (referenceFrame == ROTATIONAL_FRAME)
+    {
+        int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+
+        if (nTurboZone > 1)
+        {
+            //! first compute flux of all MixingPlane.
+            for (int iZone = 0; iZone < nTurboZone; ++iZone)
+            {
+                int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+                bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+                if (!ifCalTheZone)
+                {
+                    continue;
+                }
+
+                Grid *grid = GetGrid(zoneID, level);
+                CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+                solver->AverageMixingPlane(grid);
+            }
+
+            //! second communicate data.
+            for (int iZone = 0; iZone < nTurboZone; ++iZone)
+            {
+                int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+                bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+                if (!ifCalTheZone)
+                {
+                    continue;
+                }
+
+                Grid *grid = GetGrid(zoneID, level);
+                CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+                int upStreamZone, downStreamZone;
+
+                if (zoneID == 0)
+                {
+                    downStreamZone = zoneID + 1;
+                    Grid *NeighborGrid = GetGrid(downStreamZone, level);
+                    solver->MixingPlaneDataTransfer(grid, NeighborGrid);
+                }
+                else if (zoneID == nTurboZone - 1)
+                {
+                    upStreamZone = zoneID - 1;
+                    Grid *NeighborGrid = GetGrid(upStreamZone, level);
+                    solver->MixingPlaneDataTransfer(grid, NeighborGrid);
+                }
+                else
+                {
+                    upStreamZone = zoneID - 1;
+                    downStreamZone = zoneID + 1;
+                    Grid *NeighborGrid1 = GetGrid(upStreamZone, level);
+                    Grid *NeighborGrid2 = GetGrid(downStreamZone, level);
+                    solver->MixingPlaneDataTransfer(grid, NeighborGrid1);
+                    solver->MixingPlaneDataTransfer(grid, NeighborGrid2);
+                }
+            }
+
+            //! third NonReflective
+            for (int iZone = 0; iZone < nTurboZone; ++iZone)
+            {
+                int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+                bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+                if (!ifCalTheZone)
+                {
+                    continue;
+                }
+
+                Grid *grid = GetGrid(zoneID, level);
+                CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+                int upStreamZone, downStreamZone;
+
+                if (zoneID == 0)
+                {
+                    downStreamZone = zoneID + 1;
+                    Grid *NeighborGrid = GetGrid(downStreamZone, level);
+                    solver->NonReflective(grid, NeighborGrid);
+                }
+                else if (zoneID == nTurboZone - 1)
+                {
+                    upStreamZone = zoneID - 1;
+                    Grid *NeighborGrid = GetGrid(upStreamZone, level);
+                    solver->NonReflective(grid, NeighborGrid);
+                }
+                else
+                {
+                    upStreamZone = zoneID - 1;
+                    downStreamZone = zoneID + 1;
+                    Grid *NeighborGrid1 = GetGrid(upStreamZone, level);
+                    Grid *NeighborGrid2 = GetGrid(downStreamZone, level);
+                    solver->NonReflective(grid, NeighborGrid1);
+                    solver->NonReflective(grid, NeighborGrid2);
+                }
+            }
+
+            //! Fourth SetMixingPlaneData
+            for (int iZone = 0; iZone < nTurboZone; ++iZone)
+            {
+                int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+                bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+                if (!ifCalTheZone)
+                {
+                    continue;
+                }
+
+                Grid *grid = GetGrid(zoneID, level);
+                CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+                solver->SetMixingPlaneData(grid);
+            }
+        }
+    } 
+}
+
+
+void Controller::UpdateResiduals(int iSolver, int level)
+{
+    int systemGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+    string highordersolvername = GlobalDataBase::GetStrParaFromDB("str_highorder_solver");
+
+    if((systemGridType == MIXGRID && iSolver == NS_SOLVER && isFVMOrFDM == FV_METHOD) || (iSolver == NS_SOLVER && isFVMOrFDM == FD_METHOD && highordersolvername.substr(0, 4) == "HDCS"))
+    {
+        //! ugly codes, modify later.
+        //! for mixgrid, more variables need communication for conservation.
+        //! InvscidFlux() and ViscousFlux() must be breaked into a lot of small functions.
+        UpdateResidualsOnlyforMixGrid(iSolver, level);
+        return;
+    }
+
+    using namespace PHMPI;
+   
+#ifdef USE_GMRESSOLVER
+    // GMRESCoupled
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    if( viscousType == ONE_EQU && iSolver == NS_SOLVER )
+    {
+        SetBoundaryValueOfField(NS_SOLVER, level);
+        SetBoundaryValueOfField(TURB_SOLVER, level);
+
+        UpdateIndependentField(NS_SOLVER, level);
+        UpdateIndependentField(TURB_SOLVER, level);
+
+        SetBoundaryValueOfField(TURB_SOLVER, level);
+        
+    }
+    else if ( viscousType == INVISCID || viscousType == LAMINAR || viscousType == TWO_EQU )
+    {
+        SetBoundaryValueOfField(iSolver, level);
+
+        UpdateIndependentField(iSolver, level);
+    }
+
+#else 
+    SetBoundaryValueOfField(iSolver, level);
+     
+    UpdateIndependentField(iSolver, level);
+#endif
+    
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->UpdateResiduals(grid);
+    }
+}
+
+void Controller::UpdateResidualsOnlyforMixGrid(int iSolver, int level)
+{
+    using namespace PHMPI;
+
+    SetBoundaryValueOfField(iSolver, level);
+
+    UpdateIndependentField(iSolver, level);
+
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->UpdateQlQrOnlyforMixGrid(grid);
+    }
+    CommunicateQlQrOnlyforMixGrid();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->UpdateInviscidfluxOnlyforMixGrid(grid);
+
+        solver->UpdateViscousfluxOnlyforMixGrid(grid);
+    }
+    CommunicateFacefluxOnlyforMixGrid();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+        
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+        solver->LoadGlobalfacefluxtoResOnlyforMixGrid(grid);
+    }
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->SourceFlux(grid);
+    }
+}
+
+
+void Controller::LoadResiduals(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+    FieldProxy **rhsProxy = GetRHSProxy(level);
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID,level);
+        CFDSolver *solver = GetCFDSolver(zoneID,iSolver);
+
+        solver->LoadResiduals(grid, rhsProxy[zoneID]);
+    }
+}
+
+void Controller::PressureFactor(int iSolver, int level)
+{
+    int nEntropyFixMethod = GlobalDataBase::GetIntParaFromDB("roeEntropyFixMethod");
+
+    if (NS_SOLVER != iSolver || (nEntropyFixMethod != 2 && nEntropyFixMethod != 6))
+    {
+        return;
+    }
+
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->CalPressureFactor(grid);
+    }
+
+    CommunicateSpecificArray(level, "rtem", 0);
+}
+
+void Controller::ComputeGradient(int iSolver, int level)
+{
+    int systemGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+    if (viscousType == INVISCID && STRUCTGRID == systemGridType)
+    {
+        return;
+    }
+
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        int gridTypeofLocalZone = GetZoneGridType(zoneID);
+
+        if (gridTypeofLocalZone == STRUCTGRID)
+        {
+            string sgsmodel;
+            GlobalDataBase::GetData("sgsmodel", &sgsmodel, PHSTRING, 1);
+            solver->ComputeGradientCellCenter(grid);
+
+            if (MIXGRID == systemGridType && isFVMOrFDM == FV_METHOD)
+            {
+                solver->ComputeGradientCellCenterOfruvwptOnlyForMixGrid(grid);
+            }
+         }
+         else if(gridTypeofLocalZone == UNSTRUCTGRID)
+         {
+            solver->ComputeGradient(grid);
+            if (MIXGRID == systemGridType && isFVMOrFDM == FV_METHOD)
+            {
+                solver->ComputelimiterOnlyForMixGrid(grid);
+            }
+        }
+    }
+
+    CommunicateGradientArray(iSolver, level);
+}
+
+void Controller::ComputeLimiter(int iSolver, int level)
+{
+    int systemGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if (UNSTRUCTGRID != systemGridType || NS_SOLVER != iSolver)
+    {
+        return;
+    }
+
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+        solver->ComputeLimiter(grid);
+    }
+
+    int nLaminar = GlobalDataBase::GetIntParaFromDB("nl");
+    CommunicateSpecificArray(level, "limit2D", nLaminar);
+}
+
+void Controller::ComputeGamaAndTField(int iSolver, int level)
+{
+    if (NS_SOLVER != iSolver)
+    {
+        return;
+    }
+
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->ComputeGamaAndTemperature(grid);
+    }
+}
+
+void Controller::ComputeViscousCoeff(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    if (viscousType == INVISCID)
+    {
+        return;
+    }
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->ComputeViscousCoeff(grid);
+    }
+}
+
+void Controller::ComputeBlendFunctionSST(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+    if (iSolver == NS_SOLVER || iSolver == TRANSITION_SOLVER || viscousType != TWO_EQU || 0 != level || isFVMOrFDM == FD_METHOD)
+    {
+        return;
+    }
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->Crossing(grid);
+        solver->Blending(grid);
+    }
+    CommunicateSpecificArray(level, "blend", 0);
+}
+
+void Controller::SetBoundaryValueOfField(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->Boundary(grid);
+    }
+    MixingPlaneBoundary(iSolver, level);
+}
+
+void Controller::PreSolveforStructHighOrder(int iSolver, int level)
+{
+    //int mission_Comm(q_FD                                    ) =  5;
+    //int mission_Comm(rtem                                    ) =  6;
+    //int mission_Comm(rtem, dqdxyznokxi,dqdxyznoeta,dqdxyznocta) =  7;
+    //int mission_Comm(rtem, gradUVWTCellCenterXYZ             ) =  8;
+    //int mission_Comm(vist, gradqturb                         ) =  9;
+    //int mission_Comm(vist, gradqturb, blending               ) = 10;
+
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+
+    if(iSolver == NS_SOLVER)
+    {
+        GetIndependentVariablesforStructHighOrder(iSolver, level);
+        this->region->CommGridInfoOnlyforStructHighOrder(5);
+
+        GetDependentVariablesforStructHighOrder(iSolver, level);
+        if(viscousType == INVISCID)
+        {
+            //! Euler, no gradient communicated.
+            this->region->CommGridInfoOnlyforStructHighOrder(6);
+        }
+        else
+        {
+            string gradient_method = GlobalDataBase::GetStrParaFromDB("structhighordergradient");
+            if (gradient_method.substr(0,10) == "chain_rule")
+            {
+                this->region->CommGridInfoOnlyforStructHighOrder(7);
+            }
+            else
+            {
+                this->region->CommGridInfoOnlyforStructHighOrder(8);
+            }
+        }
+    }
+    else if(iSolver == TURB_SOLVER)
+    {
+        GetDependentVariablesforStructHighOrder(iSolver, level);
+        if(viscousType == ONE_EQU)
+        {
+            this->region->CommGridInfoOnlyforStructHighOrder(9);
+        }
+        else if(viscousType == TWO_EQU)
+        {
+            this->region->CommGridInfoOnlyforStructHighOrder(10);
+        }
+        if(iLES == LES_SOLVER)
+        {
+            this->region->CommGridInfoOnlyforStructHighOrder(8);
+
+            this->region->CommGridInfoOnlyforStructHighOrder(11);
+        }
+    }
+}
+
+void Controller::GetIndependentVariablesforStructHighOrder(int iSolver, int level)
+{    
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->GetIndependentVariablesforStructHighOrder(grid);
+    }
+}
+
+void Controller::GetDependentVariablesforStructHighOrder(int iSolver, int level)
+{    
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->GetDependentVariablesforStructHighOrder(grid);
+    }   
+}
+
+void Controller::RungeKuttaThirdTVD(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    FieldProxy **q0Proxy = new FieldProxy *[nLocalZones];
+
+    CreatqProxyfor3rdRK(iSolver, level, q0Proxy);
+
+    Stagefor3rdRK(iSolver, level, q0Proxy, 0);
+
+    Stagefor3rdRK(iSolver, level, q0Proxy, 1);
+
+    Stagefor3rdRK(iSolver, level, q0Proxy, 2);
+    
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        delete q0Proxy[iZone];
+    }
+    delete []q0Proxy;
+}
+
+void Controller::CreatqProxyfor3rdRK(int iSolver, int level, FieldProxy **q0Proxy)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+    #pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+        
+        RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+        q0Proxy[iZone] = solver->CreateFieldProxy(grid);
+        RDouble4D &q0 = q0Proxy[iZone]->GetField_STR();
+        q0 = q;
+    }
+}
+
+void Controller::Stagefor3rdRK(int iSolver, int level, FieldProxy **q0Proxy, int nstage)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();    
+    
+    if (nstage != 0)
+    {
+        //! already solved before timestep;
+        PreSolveforStructHighOrder(iSolver, level);
+    }
+
+    LoadResiduals(iSolver, level);
+    UpdateResiduals(iSolver, level);      
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+        FieldProxy *resRKProxy = solver->CreateFieldProxy(grid);
+
+        if (nstage == 0)
+        {
+            solver->RungeKuttaResidual(grid, resRKProxy, 1.0);
+            solver->UpdateFlowField(grid, q0Proxy[iZone], resRKProxy);            
+        }
+        else if (nstage == 1)
+        {
+            FieldProxy *qtempProxy = solver->CreateFieldProxy(grid);
+            
+            RDouble4D &qtemp   = qtempProxy->GetField_STR();
+            RDouble4D &q0   = q0Proxy[iZone]->GetField_STR();
+            RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+            qtemp = 0.75 * q0 + 0.25 * q;
+            solver->RungeKuttaResidual(grid, resRKProxy, 0.25);
+            solver->UpdateFlowField(grid, qtempProxy, resRKProxy);
+
+            delete qtempProxy;
+        }
+        else if (nstage == 2)
+        {
+            FieldProxy *qtempProxy = solver->CreateFieldProxy(grid);
+            
+            RDouble4D &qtemp   = qtempProxy->GetField_STR();
+            RDouble4D &q0   = q0Proxy[iZone]->GetField_STR();
+            RDouble4D &q = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));
+
+            qtemp = (q0 + 2.0 * q) / 3.0;
+            solver->RungeKuttaResidual(grid, resRKProxy, 2.0 / 3.0);
+            solver->UpdateFlowField(grid, qtempProxy, resRKProxy);
+
+            delete qtempProxy;
+        }
+        delete resRKProxy;
+    }
+}
+
+void Controller::UpdateIndependentField(int iSolver, int level)
+{
+    this->ComputeGamaAndTField(iSolver, level);
+
+    this->PressureFactor(iSolver, level);
+
+    this->ComputeViscousCoeff(iSolver, level);
+
+    this->ComputeGradient(iSolver, level);
+
+    this->ComputeLimiter(iSolver, level);
+
+    this->ComputeBlendFunctionSST(iSolver, level);
+}
+
+void Controller::LUSGSInitialization(int iSolver, int level, int nSweep, FieldProxy **dqProxy, FieldProxy **LUplusDQ)
+{
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+
+    int nLocalZones = PHMPI::GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        //! Memory allocating.
+        dqProxy[iZone] = solver->CreateFieldProxy(grid);
+        LUplusDQ[iZone]= solver->CreateFieldProxy(grid);
+        
+        int gridtype = grid->Type();
+        if (isFVMOrFDM == FD_METHOD && gridtype == STRUCTGRID)
+        {
+            solver->LUSGSInitializationStructHighOrder(grid, dqProxy[iZone], LUplusDQ[iZone]);
+        }
+        else
+        {
+            //! The delta Flux is initialized by zero, which will be used in the forward sweep.
+            solver->FillField(grid, LUplusDQ[iZone], zero);
+            
+            //! Warning: it is important to research the effect of the initialization in future!
+            //! e.g., using rhs to init when nsweep > 1.
+            //! Initialization.
+            if(nSweep == 1)
+            {
+                //! Single sweep, init by res.
+                FieldProxy *rhsProxy = solver->GetFieldProxy(grid, solver->CastName("res")); 
+                solver->FillField(grid, dqProxy[iZone], rhsProxy);
+                delete rhsProxy;
+            }
+            else
+            {
+                //! Multi-sweep, init by zero.
+                solver->FillField(grid, dqProxy[iZone], zero);
+            }
+        }
+    }
+}
+
+void Controller::BLUSGSInitialization(int iSolver, int level, int nSweep, FieldProxy **dqProxy, FieldProxy **LUplusDQ)
+{
+    int nLocalZones = PHMPI::GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        //! Memory allocating.
+        dqProxy[iZone] = solver->CreateFieldProxy(grid);
+        LUplusDQ[iZone]= solver->CreateFieldProxy(grid); 
+
+        //! The delta Flux is initialized by zero, which will be used in the forward sweep.
+        solver->FillField(grid, LUplusDQ[iZone], zero);
+
+        //! Warning: it is important to research the effect of the initialization in future!
+        //! e.g., using rhs to init when nsweep > 1.
+        //! Initialization.
+        if(nSweep == 1)
+        {
+            //! Single sweep, init by res.
+            FieldProxy *rhsProxy = solver->GetFieldProxy(grid, solver->CastName("res")); 
+            solver->FillField(grid, dqProxy[iZone], rhsProxy);
+            delete rhsProxy;
+        }
+        else
+        {
+            //! Multi-sweep, init by zero.
+            solver->FillField(grid, dqProxy[iZone], zero);
+        }
+    }
+}
+
+void Controller::MatrixLUSGSInitialization(int iSolver, int level, int nSweep, FieldProxy **dqProxy, FieldProxy **LUplusDQ)
+{
+    int nLocalZones = PHMPI::GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        //! Memory allocating.
+        dqProxy[iZone] = solver->CreateFieldProxy(grid);
+        LUplusDQ[iZone]= solver->CreateFieldProxy(grid);
+
+        //! The delta Flux is initialized by zero, which will be used in the forward sweep.
+        solver->FillField(grid, LUplusDQ[iZone], zero);
+
+        //! Warning: it is important to research the effect of the initialization in future!
+        //! e.g., using rhs to init when nsweep > 1.
+        //! Initialization.
+        if(nSweep == 1)
+        {
+            //! Single sweep, init by res.
+            FieldProxy *rhsProxy = solver->GetFieldProxy(grid, solver->CastName("res")); 
+            solver->FillField(grid, dqProxy[iZone], rhsProxy);
+            delete rhsProxy;
+        }
+        else
+        {
+            //! Multi-sweep, init by zero.
+            solver->FillField(grid, dqProxy[iZone], zero);
+        }
+        //*/    
+    }
+}
+
+void Controller::LUSGS(int iSolver, int level)
+{
+    Diagonal(iSolver, level);
+
+    int nLocalZones = PHMPI::GetNumberofLocalZones();
+    int nLUSGSSweeps = GlobalDataBase::GetIntParaFromDB("nLUSGSSweeps");
+
+    if (level != 0)
+    {
+        nLUSGSSweeps = 1;
+    }
+
+    RDouble LUSGSTolerance = GlobalDataBase::GetDoubleParaFromDB("LUSGSTolerance");
+    int systemGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+
+    FieldProxy **dqProxy = new FieldProxy *[nLocalZones];
+
+    //! L*Dq or U*Dq, which is equal to DeltaFlux between beighbors.
+    FieldProxy **LUplusDQ= new FieldProxy *[nLocalZones];
+
+    LUSGSInitialization(iSolver, level, nLUSGSSweeps, dqProxy, LUplusDQ);
+
+    RDouble sweepNormalInit = 0.0, sweepEpsilon = 1.1, globleNormal = 0.0;
+    for (int iSweep = 0; iSweep < nLUSGSSweeps; ++ iSweep)
+    {
+        RDouble sweepNormal = 0.0;
+
+        if (systemGridType == MIXGRID || isFVMOrFDM == FD_METHOD)
+        {
+            if (iSolver == NS_SOLVER)
+            {
+                CommunicationDQ(iSolver, level, dqProxy);
+            }
+
+            ForwardSweep(iSolver, level, dqProxy, LUplusDQ, sweepNormal, false);
+
+            BackwardSweep(iSolver, level, dqProxy, LUplusDQ, sweepNormal, false);
+        }
+        else
+        {
+            ForwardSweep(iSolver, level, dqProxy, LUplusDQ, sweepNormal, false);
+
+            CommunicationDQ(iSolver, level, dqProxy);
+
+            BackwardSweep(iSolver, level, dqProxy, LUplusDQ, sweepNormal, false);
+        }
+
+        if (nLUSGSSweeps > 1)
+        {
+            //! Get the global normal.
+            PH_AllReduce(&sweepNormal, &globleNormal, 1, PH_SUM);
+            sweepNormal = globleNormal;
+        }
+
+        //! Check the convergence.
+        //! This criterion will lead to at least 2 sweep.
+        //! It may be more considered, such as using the maximum normal of dq/dqOld.
+        if(iSweep == 0)
+        {
+            sweepNormalInit = sweepNormal;
+        }
+        else
+        {
+            sweepEpsilon = sweepNormal / sweepNormalInit;
+        }
+
+        if (sweepEpsilon < LUSGSTolerance)
+        {
+            //! The equations have been converged.
+            break;
+        }
+    }
+
+    UpdateFlowField(iSolver, level, dqProxy);
+
+    for (int iLocalZone = 0; iLocalZone < nLocalZones; ++ iLocalZone)
+    {
+        delete dqProxy[iLocalZone];    dqProxy[iLocalZone] = nullptr;
+        delete LUplusDQ[iLocalZone];    LUplusDQ[iLocalZone] = nullptr;
+    }
+    delete [] dqProxy;    dqProxy = nullptr;
+    delete [] LUplusDQ;    LUplusDQ = nullptr;
+}
+
+void Controller::DualTimeStepsLUSGS(int iSolver, int level)
+{
+    Diagonal(iSolver, level);
+
+    int nLocalZones = PHMPI::GetNumberofLocalZones();
+    int nLUSGSSweeps = GlobalDataBase::GetIntParaFromDB("nLUSGSSweeps");
+
+    if (level != 0)
+    {
+        nLUSGSSweeps = 1;
+    }
+
+    RDouble LUSGSTolerance = GlobalDataBase::GetDoubleParaFromDB("LUSGSTolerance");
+    int systemGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+
+    FieldProxy **dqProxy = new FieldProxy *[nLocalZones];
+    //! L*Dq or U*Dq, which is equal to DeltaFlux between beighbors.
+    FieldProxy **LUplusDQ= new FieldProxy *[nLocalZones];
+
+    FieldProxy **dqProxy1 = new FieldProxy *[nLocalZones];
+    //! L*Dq or U*Dq, which is equal to DeltaFlux between beighbors.
+    FieldProxy **LUplusDQ1= new FieldProxy *[nLocalZones];
+
+    LUSGSInitialization(iSolver, level, nLUSGSSweeps, dqProxy, LUplusDQ);
+    LUSGSInitialization(iSolver, level, nLUSGSSweeps, dqProxy1, LUplusDQ1);
+
+    //! The basic iteration step.
+    RDouble sweepNormalInit = 0.0, sweepEpsilon = 1.1, globleNormal = 0.0;
+    for (int iSweep = 0; iSweep < nLUSGSSweeps; ++ iSweep)
+    {
+        RDouble sweepNormal = 0.0;
+
+        if (systemGridType == MIXGRID || isFVMOrFDM == FD_METHOD)
+        {
+            if (iSolver == NS_SOLVER)
+            {
+                CommunicationDQ(iSolver, level, dqProxy);
+            }
+
+            ForwardSweep(iSolver, level, dqProxy, LUplusDQ, sweepNormal, false);
+
+            BackwardSweep(iSolver, level, dqProxy, LUplusDQ, sweepNormal, false);
+        }
+        else
+        {
+            ForwardSweep(iSolver, level, dqProxy, LUplusDQ, sweepNormal, false);
+
+            CommunicationDQ(iSolver, level, dqProxy);
+
+            BackwardSweep(iSolver, level, dqProxy, LUplusDQ, sweepNormal, false);
+        }
+
+        if (nLUSGSSweeps > 1)
+        {
+            //! Get the global normal.
+            PH_AllReduce(&sweepNormal, &globleNormal, 1, PH_SUM);
+            sweepNormal = globleNormal;
+        }
+
+        //! Check the convergence.
+        //! This criterion will lead to at least 2 sweep.
+        //! It may be more considered, such as using the maximum normal of dq/dqOld.
+        if(iSweep == 0)
+        {
+            sweepNormalInit = sweepNormal;
+        }
+        else
+        {
+            sweepEpsilon = sweepNormal / sweepNormalInit;
+        }
+
+        if (sweepEpsilon < LUSGSTolerance)
+        {
+            //! The equations have been converged.
+            break;
+        }
+    }
+
+    //! The advancing time iteration step.
+    for (int iSweep = 0; iSweep < nLUSGSSweeps; ++ iSweep)
+    {
+        RDouble sweepNormal = 0.0;
+
+        if (systemGridType == MIXGRID || isFVMOrFDM == FD_METHOD)
+        {
+            if (iSolver == NS_SOLVER)
+            {
+                CommunicationDQ(iSolver, level, dqProxy1);
+            }
+
+            ForwardSweep(iSolver, level, dqProxy1, LUplusDQ1, sweepNormal, true);
+
+            BackwardSweep(iSolver, level, dqProxy1, LUplusDQ1, sweepNormal, true);
+        }
+        else
+        {
+            ForwardSweep(iSolver, level, dqProxy1, LUplusDQ1, sweepNormal, true);
+
+            CommunicationDQ(iSolver, level, dqProxy1);
+
+            BackwardSweep(iSolver, level, dqProxy1, LUplusDQ1, sweepNormal, true);
+        }
+
+        if (nLUSGSSweeps > 1)
+        {
+            //! Get the global normal.
+            PH_AllReduce(&sweepNormal, &globleNormal, 1, PH_SUM);
+            sweepNormal = globleNormal;
+        }
+
+        //! Check the convergence.
+        //! This criterion will lead to at least 2 sweep.
+        //! It may be more considered, such as using the maximum normal of dq/dqOld.
+        if(iSweep == 0)
+        {
+            sweepNormalInit = sweepNormal;
+        }
+        else
+        {
+            sweepEpsilon = sweepNormal / sweepNormalInit;
+        }
+
+        if (sweepEpsilon < LUSGSTolerance)
+        {
+            //! The equations have been converged.
+            break;
+        }
+    }
+
+    //! Determine the CFL number of the next iteration step.
+    DetermineCFLNumber(iSolver, level, dqProxy, dqProxy1);
+
+    UpdateFlowField(iSolver, level, dqProxy);
+
+    for (int iLocalZone = 0; iLocalZone < nLocalZones; ++ iLocalZone)
+    {
+        delete dqProxy[iLocalZone];
+        delete LUplusDQ[iLocalZone];
+        delete dqProxy1[iLocalZone];
+        delete LUplusDQ1[iLocalZone];
+    }
+    delete []dqProxy;
+    delete []LUplusDQ;
+    delete []dqProxy1;
+    delete []LUplusDQ1;
+}
+
+void Controller::ForwardSweep(int iSolver, int level, FieldProxy **dqProxy, FieldProxy **LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+    RDouble *zoneNormal = new RDouble [nLocalZones]();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID,level);
+        CFDSolver *solver = GetCFDSolver(zoneID,iSolver);       
+
+        zoneNormal[iZone] = 0.0;
+        solver->SolveLUSGSForward(grid, dqProxy[iZone], LUplusDQ[iZone], zoneNormal[iZone], iAdvanceStep);
+    }
+
+    //! Sum the zone normal, which is to void OMP data competition.
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        sweepNormal += zoneNormal[iZone];
+    }
+    delete [] zoneNormal;    zoneNormal = nullptr;
+}
+
+void Controller::BackwardSweep(int iSolver, int level, FieldProxy **dqProxy, FieldProxy **LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+    RDouble *zoneNormal = new RDouble [nLocalZones]();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID,level);
+        CFDSolver *solver = GetCFDSolver(zoneID,iSolver);
+
+        zoneNormal[iZone] = 0.0;
+        solver->SolveLUSGSBackward(grid, dqProxy[iZone], LUplusDQ[iZone], zoneNormal[iZone], iAdvanceStep);
+    }
+
+    //! Sum the zone normal, which is to void OMP data competition.
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        sweepNormal += zoneNormal[iZone];
+    }
+    delete [] zoneNormal;    zoneNormal = nullptr;
+}
+
+void Controller::UpdateFlowField(int iSolver, int level, FieldProxy **dqProxy)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        int gridtype = grid->Type();
+        if (iSolver == NS_SOLVER && isFVMOrFDM == FD_METHOD && gridtype == STRUCTGRID)
+        {
+            FieldProxy *qtemp_Proxy = solver->CreateFieldProxy(grid);
+            FieldProxy *qfield      = solver->GetFieldProxy(grid, solver->CastName("q"));
+            solver->FillField(grid, qtemp_Proxy, qfield);
+
+            solver->UpdateFlowField(grid, qtemp_Proxy, dqProxy[iZone]);
+            delete qtemp_Proxy;
+        }
+        else
+        {
+            FieldProxy *qProxy = solver->GetFieldProxy(grid, solver->CastName("q"));
+            solver->UpdateFlowField(grid, qProxy, dqProxy[iZone]);
+            delete qProxy;
+        }
+    }
+}
+
+void Controller::DetermineCFLNumber(int iSolver, int level, FieldProxy **dqProxy, FieldProxy **dqProxy1)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->DetermineCFLNumber(grid, dqProxy[iZone], dqProxy1[iZone]);
+    }
+}
+
+void Controller::CommunicateGradientandLimitOnlyForMixGrid()
+{
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    vector <PH_Request > requestContainer;
+    vector <vector <DataContainer *> > receivedDataBuffer;
+    vector <vector <DataContainer *> > sendDataBuffer;
+    receivedDataBuffer.resize(nZones);
+    sendDataBuffer.resize(nZones);
+
+    //! Step 0: Compressing data firstly.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+        if (currentProcessor == sendProcessor)
+        {
+            sendDataBuffer[iZone].resize(numberOfNeighbor);
+        }
+
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate and compress the buffers for sending.
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = new DataContainer;
+                sendDataBuffer[iZone][iNeighbor] = sendBuffer;
+
+                //CFDSolver *solver = GetCFDSolver(iZone, iSolver);
+                CFDSolver *solver = GetCFDSolver(iZone, 0);
+
+                //! Compress the send information into the actkey.
+                Grid *grid = PHSPACE::GetGrid(iZone, 0);
+
+                solver->CompressGradientandLimitToInterfaceOnlyForMixGrid(sendBuffer, grid, neighborZone);
+            }
+        }
+    }
+
+    //! Step 1: Communication.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        //! Communicating.
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate the buffers for sending and receiving.
+            DataContainer *receivedBuffer = 0;
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == receiveProcessor)
+            {
+                receivedBuffer = new DataContainer;
+                receivedDataBuffer[iZone].push_back(receivedBuffer);
+            }
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = sendDataBuffer[iZone][iNeighbor];
+            }
+
+            int tag = iZone;
+
+            //if (sendProcessor == receiveProcessor)
+            //{
+            //    continue;
+            //}
+
+            //! Communication.
+            if (currentProcessor == sendProcessor)
+            {
+                if (sendProcessor != receiveProcessor)
+                {
+                    streamsize nlen = sendBuffer->size();
+
+                    //! Send the data to neighbors.
+                    send(sendBuffer, receiveProcessor, nlen, requestContainer, tag);
+                }
+            }
+            if (currentProcessor == receiveProcessor)
+            {
+                //! Get the neighbor order: which order that 'iZone' on neighbors of neighborZone.
+                int neighborOrer = -1;
+                ZoneNeighbor *globalNeighborZonesTemp = zoneConnectivity->GetZoneNeighbor(neighborZone);
+                int numberOfNeighborTemp = globalNeighborZonesTemp->GetNumberOfNeighbor();
+
+                for (int neighborID = 0; neighborID < numberOfNeighborTemp; ++ neighborID)
+                {
+                    int neighborZoneTemp = globalNeighborZonesTemp->GetZoneIndexOfNeighbor(neighborID);
+                    if (neighborZoneTemp == iZone)
+                    {
+                        neighborOrer = neighborID;
+                        break;
+                    }
+                }
+
+                ASSERT(neighborOrer != -1);
+
+                if (sendProcessor != receiveProcessor)
+                {
+                    //! The data length of the received data is same to the length that send to the neighbor.
+                    CharVecSizeType nlen = sendDataBuffer[neighborZone][neighborOrer]->size();
+
+                    //! Receive data from neighbors.
+                    receive(receivedBuffer, sendProcessor, nlen, requestContainer, tag);
+                }
+                else
+                {
+                    SWAP(receivedDataBuffer[iZone].back(), sendDataBuffer[iZone][iNeighbor]);
+                }
+            }
+        }
+    }
+
+    //! Step2: MPI waiting for Non-blocking communications.
+    if (PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_Wait(static_cast<int>(requestContainer.size()), &(requestContainer[0]));
+    }
+
+    //! Step3: Translate the data container.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        int count = 0;
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor == receiveProcessor)
+            {
+                DataContainer *receiveData = receivedDataBuffer[iZone][count];
+
+                //! Because get into here when currentProcessor==receiveProcessor,
+                //! so, use zoneGridSolver of neighborZone, this zone is on the current processor!
+
+                //! Decompress the interface data from data-container.
+                //CFDSolver *solver = GetCFDSolver(neighborZone, iSolver);
+                CFDSolver *solver = GetCFDSolver(neighborZone, 0);
+
+                Grid *grid = PHSPACE::GetGrid(neighborZone, 0);
+
+                solver->DecompressGradientandLimitToInterfaceOnlyForMixGrid(receiveData, grid, iZone);
+
+                ++count;
+            }
+        }
+    }
+
+    //! Step4: Free the buffers.
+    for (int iDim = 0; iDim < receivedDataBuffer.size(); ++ iDim)
+    {
+        for (int jDim = 0; jDim < receivedDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete receivedDataBuffer[iDim][jDim];
+        }
+    }
+    receivedDataBuffer.clear();
+    for (int iDim = 0; iDim < sendDataBuffer.size(); ++ iDim)
+    {
+        for (int jDim = 0; jDim < sendDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete sendDataBuffer[iDim][jDim];
+        }
+    }
+    sendDataBuffer.clear();
+    requestContainer.clear();
+}
+
+void Controller::CommunicateQlQrOnlyforMixGrid()
+{
+    int systemGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if(systemGridType != MIXGRID)
+    {
+        return;
+    }
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    vector <PH_Request > requestContainer;
+    vector <vector <DataContainer *> > receivedDataBuffer;
+    vector <vector <DataContainer *> > sendDataBuffer;
+    receivedDataBuffer.resize(nZones);
+    sendDataBuffer.resize(nZones);
+
+    //! Step 0: Compressing data firstly.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int gridtypeofiZone = PHMPI::GetZoneGridType(iZone);
+
+        int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+        if (currentProcessor == sendProcessor)
+        {
+            sendDataBuffer[iZone].resize(numberOfNeighbor);
+        }
+
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int gridtypeofneighborZone = PHMPI::GetZoneGridType(neighborZone);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate and compress the buffers for sending.
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = new DataContainer;
+                sendDataBuffer[iZone][iNeighbor] = sendBuffer;
+
+                //CFDSolver *solver = GetCFDSolver(iZone, iSolver);
+                CFDSolver *solver = GetCFDSolver(iZone, 0);
+                //! Compress the send information into the actkey.
+                Grid *grid = PHSPACE::GetGrid(iZone, 0);
+
+                InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+                if (!interfaceInformation)
+                {
+                }
+                else
+                {
+                    if(gridtypeofiZone == gridtypeofneighborZone)
+                    {
+                        RDouble uploadData = 0.0;
+                        sendBuffer->moveto_begin();
+                        PHWrite(sendBuffer, uploadData);
+                    }
+                    else
+                    {
+                        solver->CompressQlQrToInterfaceOnlyForMixGrid(sendBuffer, grid, neighborZone);
+                    }
+                }
+            }
+        }
+    }
+
+    //! Step 1: Communication.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        //! Communicating.
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate the buffers for sending and receiving.
+            DataContainer *receivedBuffer = 0;
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == receiveProcessor)
+            {
+                receivedBuffer = new DataContainer;
+                receivedDataBuffer[iZone].push_back(receivedBuffer);
+            }
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = sendDataBuffer[iZone][iNeighbor];
+            }
+
+            int tag = iZone;
+
+            //if (sendProcessor == receiveProcessor)
+            //{
+            //    continue;
+            //}
+
+            //! Communication.
+            if (currentProcessor == sendProcessor)
+            {
+                if (sendProcessor != receiveProcessor)
+                {
+                    streamsize nlen = sendBuffer->size();
+
+                    //! Send the data to neighbors.
+                    send(sendBuffer, receiveProcessor, nlen, requestContainer, tag);
+                }
+            }
+            if (currentProcessor == receiveProcessor)
+            {
+                //! Get the neighbor order: which order that 'iZone' on neighbors of neighborZone.
+                int neighborOrer = -1;
+                ZoneNeighbor *globalNeighborZonesTemp = zoneConnectivity->GetZoneNeighbor(neighborZone);
+                int numberOfNeighborTemp = globalNeighborZonesTemp->GetNumberOfNeighbor();
+
+                for (int neighborID = 0; neighborID < numberOfNeighborTemp; ++ neighborID)
+                {
+                    int neighborZoneTemp = globalNeighborZonesTemp->GetZoneIndexOfNeighbor(neighborID);
+                    if (neighborZoneTemp == iZone)
+                    {
+                        neighborOrer = neighborID;
+                        break;
+                    }
+                }
+
+                ASSERT(neighborOrer != -1);
+
+                if (sendProcessor != receiveProcessor)
+                {
+                    //! The data length of the received data is same to the length that send to the neighbor.
+                    CharVecSizeType nlen = sendDataBuffer[neighborZone][neighborOrer]->size();
+
+                    //! Receive data from neighbors.
+                    receive(receivedBuffer, sendProcessor, nlen, requestContainer, tag);
+                }
+                else
+                {
+                    SWAP(receivedDataBuffer[iZone].back(), sendDataBuffer[iZone][iNeighbor]);
+                }
+            }
+        }
+    }
+
+    //! Step2: MPI waiting for Non-blocking communications.
+    if (PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_Wait(static_cast<int>(requestContainer.size()), &(requestContainer[0]));
+    }
+
+    //! Step3: Translate the data container.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int gridtypeofiZone = PHMPI::GetZoneGridType(iZone);
+
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        int count = 0;
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int gridtypeofneighborZone = PHMPI::GetZoneGridType(neighborZone);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor == receiveProcessor)
+            {
+                DataContainer *receiveData = receivedDataBuffer[iZone][count];
+
+                //! Because get into here when currentProcessor==receiveProcessor,
+                //! so, use zoneGridSolver of neighborZone, this zone is on the current processor!
+
+                //! Decompress the interface data from data-container.
+                //CFDSolver *solver = GetCFDSolver(neighborZone, iSolver);
+                CFDSolver *solver = GetCFDSolver(neighborZone, 0);
+
+                Grid *grid = PHSPACE::GetGrid(neighborZone, 0);
+
+                InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+                if (!interfaceInformation)
+                {
+                    //! can not use return here, because ++count in the after
+                }
+                else
+                {
+                    if(gridtypeofiZone == gridtypeofneighborZone)
+                    {
+                        RDouble downdData = 0.0;
+                        receiveData->moveto_begin();
+                        PHRead(receiveData, downdData);
+                    }
+                    else
+                    {
+                        solver->DecompressQlQrToInterfaceOnlyForMixGrid(receiveData, grid, iZone);
+                    }
+                }
+
+                ++count;
+            }
+        }
+    }
+
+    //! Step4: Free the buffers.
+    for (int iDim = 0; iDim < receivedDataBuffer.size(); ++ iDim)
+    {
+        for (int jDim = 0; jDim < receivedDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete receivedDataBuffer[iDim][jDim];
+        }
+    }
+    receivedDataBuffer.clear();
+    for (int iDim = 0; iDim < sendDataBuffer.size(); ++ iDim)
+    {
+        for (int jDim = 0; jDim < sendDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete sendDataBuffer[iDim][jDim];
+        }
+    }
+    sendDataBuffer.clear();
+    requestContainer.clear();
+}
+
+void Controller::CommunicateFacefluxOnlyforMixGrid()
+{
+    int systemGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    if(systemGridType != MIXGRID)
+    {
+        return;
+    }
+
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    vector <PH_Request > requestContainer;
+    vector <vector <DataContainer *> > receivedDataBuffer;
+    vector <vector <DataContainer *> > sendDataBuffer;
+    receivedDataBuffer.resize(nZones);
+    sendDataBuffer.resize(nZones);
+
+    //! Step 0: Compressing data firstly.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+        if (currentProcessor == sendProcessor)
+        {
+            sendDataBuffer[iZone].resize(numberOfNeighbor);
+        }
+
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate and compress the buffers for sending.
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = new DataContainer;
+                sendDataBuffer[iZone][iNeighbor] = sendBuffer;
+
+                //CFDSolver *solver = GetCFDSolver(iZone, iSolver);
+                CFDSolver *solver = GetCFDSolver(iZone, 0);
+                //! Compress the send information into the actkey.
+                Grid *grid = PHSPACE::GetGrid(iZone, 0);
+
+                solver->CompressFacefluxToInterfaceOnlyForMixGrid(sendBuffer, grid, neighborZone);
+            }
+        }
+    }
+
+    //! Step 1: Communication.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        //! Communicating.
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate the buffers for sending and receiving.
+            DataContainer *receivedBuffer = 0;
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == receiveProcessor)
+            {
+                receivedBuffer = new DataContainer;
+                receivedDataBuffer[iZone].push_back(receivedBuffer);
+            }
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = sendDataBuffer[iZone][iNeighbor];
+            }
+
+            int tag = iZone;
+
+            //! Communication.
+            if (currentProcessor == sendProcessor)
+            {
+                if (sendProcessor != receiveProcessor)
+                {
+                    streamsize nlen = sendBuffer->size();
+
+                    //! Send the data to neighbors.
+                    send(sendBuffer, receiveProcessor, nlen, requestContainer, tag);
+                }
+            }
+            if (currentProcessor == receiveProcessor)
+            {
+                //! Get the neighbor order: which order that 'iZone' on neighbors of neighborZone.
+                int neighborOrer = -1;
+                ZoneNeighbor *globalNeighborZonesTemp = zoneConnectivity->GetZoneNeighbor(neighborZone);
+                int numberOfNeighborTemp = globalNeighborZonesTemp->GetNumberOfNeighbor();
+
+                for (int neighborID = 0; neighborID < numberOfNeighborTemp; ++ neighborID)
+                {
+                    int neighborZoneTemp = globalNeighborZonesTemp->GetZoneIndexOfNeighbor(neighborID);
+                    if (neighborZoneTemp == iZone)
+                    {
+                        neighborOrer = neighborID;
+                        break;
+                    }
+                }
+
+                ASSERT(neighborOrer != -1);
+
+                if (sendProcessor != receiveProcessor)
+                {
+                    //! The data length of the received data is same to the length that send to the neighbor.
+                    CharVecSizeType nlen = sendDataBuffer[neighborZone][neighborOrer]->size();
+
+                    //! Receive data from neighbors.
+                    receive(receivedBuffer, sendProcessor, nlen, requestContainer, tag);
+                }
+                else
+                {
+                    SWAP(receivedDataBuffer[iZone].back(), sendDataBuffer[iZone][iNeighbor]);
+                }
+            }
+        }
+    }
+
+    //! Step2: MPI waiting for Non-blocking communications.
+    if (PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_Wait(static_cast<int>(requestContainer.size()), &(requestContainer[0]));
+    }
+
+    //! Step3: Translate the data container.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        int count = 0;
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor == receiveProcessor)
+            {
+                DataContainer *receiveData = receivedDataBuffer[iZone][count];
+
+                //! Because get into here when currentProcessor==receiveProcessor,
+                //! so, use zoneGridSolver of neighborZone, this zone is on the current processor!
+
+                //! Decompress the interface data from data-container.
+                //CFDSolver *solver = GetCFDSolver(neighborZone, iSolver);
+                CFDSolver *solver = GetCFDSolver(neighborZone, 0);
+
+                Grid *grid = PHSPACE::GetGrid(neighborZone, 0);
+
+                solver->DecompressFacefluxToInterfaceOnlyForMixGrid(receiveData, grid, iZone);
+
+                ++count;
+            }
+        }
+    }
+
+    //! Step4: Free the buffers.
+    for (int iDim = 0; iDim < receivedDataBuffer.size(); ++ iDim)
+    {
+        for (int jDim = 0; jDim < receivedDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete receivedDataBuffer[iDim][jDim];
+        }
+    }
+    receivedDataBuffer.clear();
+    for (int iDim = 0; iDim < sendDataBuffer.size(); ++ iDim)
+    {
+        for (int jDim = 0; jDim < sendDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete sendDataBuffer[iDim][jDim];
+        }
+    }
+    sendDataBuffer.clear();
+    requestContainer.clear();
+}
+
+void Controller::CommunicationDQ(int iSolver, int level, FieldProxy **dqProxy)
+{
+    if (iSolver != NS_SOLVER)
+    {
+        //! Only consider the communication of NS-Solver.
+        return;
+    }
+
+    int swapDq = GlobalDataBase::GetIntParaFromDB("swapDq");
+    if (swapDq == 0)
+    {
+        return;
+    }
+
+    int zoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(0);
+    PHSolver *solver = GetCFDSolver(zoneID, iSolver);
+    int nEquation  = solver->GetNumberOfEquations();
+
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    vector <PH_Request > requestContainer;
+    vector <vector <DataContainer *> > receivedDataBuffer;
+    vector <vector <DataContainer *> > sendDataBuffer;
+    receivedDataBuffer.resize(nZones);
+    sendDataBuffer.resize(nZones);
+
+    //! Step 0: Compressing data firstly.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+        if (currentProcessor == sendProcessor)
+        {
+            sendDataBuffer[iZone].resize(numberOfNeighbor);
+        }
+
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate and compress the buffers for sending.
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = new DataContainer;
+                sendDataBuffer[iZone][iNeighbor] = sendBuffer;
+
+                int localZoneID = region->GetProcessGlobalZoneIndexToLocalZoneIndex(iZone);
+                CFDSolver *solver1 = GetCFDSolver(iZone, iSolver);
+
+                //! Compress the send information into the actkey.
+                Grid *grid = PHSPACE::GetGrid(iZone, level);
+                solver1->CompressDQ(sendBuffer, dqProxy[localZoneID], grid, iZone, neighborZone, nEquation);
+            }
+        }
+    }
+
+    //! Step 1: Communication.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        //! Communicating.
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int sendProcessor    = PHMPI::GetZoneProcessorID(iZone);
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            //! Allocate the buffers for sending and receiving.
+            DataContainer *receivedBuffer = 0;
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == receiveProcessor)
+            {
+                receivedBuffer = new DataContainer;
+                receivedDataBuffer[iZone].push_back(receivedBuffer);
+            }
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = sendDataBuffer[iZone][iNeighbor];
+            }
+
+            int tag = iZone;
+
+            //! Communication.
+            if (currentProcessor == sendProcessor)
+            {
+                if (sendProcessor != receiveProcessor)
+                {
+                    streamsize nlen = sendBuffer->size();
+
+                    //! Send the data to neighbors.
+                    send(sendBuffer, receiveProcessor, nlen, requestContainer, tag);
+                }
+            }
+            if (currentProcessor == receiveProcessor)
+            {
+                //! Get the neighbor order: which order that 'iZone' on neighbors of neighborZone.
+                int neighborOrer = -1;
+                ZoneNeighbor *globalNeighborZonesTemp = zoneConnectivity->GetZoneNeighbor(neighborZone);
+                int numberOfNeighborTemp = globalNeighborZonesTemp->GetNumberOfNeighbor();
+
+                for (int neighborID = 0; neighborID < numberOfNeighborTemp; ++ neighborID)
+                {
+                    int neighborZoneTemp = globalNeighborZonesTemp->GetZoneIndexOfNeighbor(neighborID);
+                    if (neighborZoneTemp == iZone)
+                    {
+                        neighborOrer = neighborID;
+                        break;
+                    }
+                }
+
+                ASSERT(neighborOrer != -1);
+
+                if (sendProcessor != receiveProcessor)
+                {
+                    //! The data length of the received data is same to the length that send to the neighbor.
+                    CharVecSizeType nlen = sendDataBuffer[neighborZone][neighborOrer]->size();
+
+                    //! Receive data from neighbors.
+                    receive(receivedBuffer, sendProcessor, nlen, requestContainer, tag);
+                }
+                else
+                {
+                    SWAP(receivedDataBuffer[iZone].back(), sendDataBuffer[iZone][iNeighbor]);
+                }
+            }
+        }
+    }
+
+    //! Step2: MPI waiting for Non-blocking communications.
+    if (PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_Wait(static_cast<int>(requestContainer.size()), &(requestContainer[0]));
+    }
+
+    //! Step3: Translate the data container.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        int count = 0;
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor == receiveProcessor)
+            {
+                DataContainer *receiveData = receivedDataBuffer[iZone][count];
+
+                //! Because get into here when currentProcessor==receiveProcessor,
+                //! so, use zoneGridSolver of neighborZone, this zone is on the current processor!
+
+                //! Decompress the interface data from data-container.
+                int localZoneID = region->GetProcessGlobalZoneIndexToLocalZoneIndex(neighborZone);
+                CFDSolver *solver2 = GetCFDSolver(neighborZone, iSolver);
+
+                Grid *grid = PHSPACE::GetGrid(neighborZone, level);
+                solver2->DecompressDQ(receiveData, dqProxy[localZoneID], grid, neighborZone, iZone, nEquation);
+
+                ++ count;
+            }
+        }
+    }
+
+    //! Step4: Free the buffers.
+    for (int iDim = 0; iDim < receivedDataBuffer.size(); ++ iDim)
+    {
+        for (int jDim = 0; jDim < receivedDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete receivedDataBuffer[iDim][jDim];
+        }
+    }
+    receivedDataBuffer.clear();
+    for (int iDim = 0; iDim < sendDataBuffer.size(); ++ iDim)
+    {
+        for (int jDim = 0; jDim < sendDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete sendDataBuffer[iDim][jDim];
+        }
+    }
+    sendDataBuffer.clear();
+    requestContainer.clear();
+}
+
+void Controller::CommunicateGenericArray(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int zoneID = GetLocalZoneIDToGlobalZoneID(0);
+    CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+    if (iSolver == NS_SOLVER)
+    {
+        int nEquation = solver->GetNumberOfEquations();
+        CommunicateSpecificArray(level, "q", nEquation);
+
+        int nTemperatureModel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+        CommunicateSpecificArray(level, "t", nTemperatureModel);
+    }
+    else if (iSolver == TURB_SOLVER)
+    {
+        int nEquation = solver->GetNumberOfEquations();
+        CommunicateSpecificArray(level, "q_turb", nEquation);
+    }
+    else if (iSolver == TRANSITION_SOLVER)
+    {
+        int nEquation = solver->GetNumberOfEquations();
+        CommunicateSpecificArray(level, "q_transition", nEquation);
+    }
+}
+
+void Controller::CommunicateGradientArray(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int zoneID = GetLocalZoneIDToGlobalZoneID(0);
+    CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+    int systemGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+    int isFVMOrFDM = PHSPACE::GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+    int periodicType = PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType");
+    int iLES = PHSPACE::GlobalDataBase::GetIntParaFromDB("iLES");
+
+    //! gradient has been communicated in another place for isFVMOrFDM == FDM.
+    if (systemGridType == STRUCTGRID && isFVMOrFDM == FV_METHOD)
+    {
+        int nZones = PHMPI::GetNumberofGlobalZones();
+        int currentProcessor = PHMPI::GetCurrentProcessorID();
+
+        if (iSolver == NS_SOLVER)
+        {
+            //! NSSolver, GradientCommunication for struct high order has been done at another place, with another function.
+            int nChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+            int nLaminar = GlobalDataBase::GetIntParaFromDB("nl");
+            int nNSEquation = GlobalDataBase::GetIntParaFromDB("nm");
+            int nTemperatureModel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+            int nSpeciesNumber = nLaminar + nChemical - nNSEquation;
+
+            int nTotalVariable = nTemperatureModel + 3;
+            CommunicateSpecificArray(level, "gradUVWTCellCenterX", nTotalVariable);
+            CommunicateSpecificArray(level, "gradUVWTCellCenterY", nTotalVariable);
+            CommunicateSpecificArray(level, "gradUVWTCellCenterZ", nTotalVariable);
+
+            if (nChemical > 0 && nSpeciesNumber > 0)
+            {
+                CommunicateSpecificArray(level, "dcdx", nSpeciesNumber);
+                CommunicateSpecificArray(level, "dcdy", nSpeciesNumber);
+                CommunicateSpecificArray(level, "dcdz", nSpeciesNumber);
+            }
+            if(periodicType == ROTATIONAL_PERIODICITY)
+            {
+                for (int iZone = 0; iZone < nZones; ++ iZone)
+                {
+                    int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+                    ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+                    int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+                    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+                    {
+                        int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+                        int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+                        if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+                        {
+                            continue;
+                        }
+                        if (currentProcessor == sendProcessor)
+                        {
+                            CFDSolver *solver1 = GetCFDSolver(iZone, iSolver);
+                            Grid *grid = PHSPACE::GetGrid(iZone, level);
+                            solver1->RotateVectorFromInterface(grid, iZone, nTotalVariable);
+                        }
+                    }
+                }
+            }
+        }
+        else if (iSolver == TURB_SOLVER && iLES == NOLES_SOLVER)
+        {
+            int nEquation = solver->GetNumberOfEquations();
+            CommunicateSpecificArray(level, "gradTurbulenceCellCenterX", nEquation);
+            CommunicateSpecificArray(level, "gradTurbulenceCellCenterY", nEquation);
+            CommunicateSpecificArray(level, "gradTurbulenceCellCenterZ", nEquation);
+            if(periodicType == ROTATIONAL_PERIODICITY)
+            {
+                for (int iZone = 0; iZone < nZones; ++ iZone)
+                {
+                    int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+                    ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+                    int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+                    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+                    {
+                        int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+                        int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+                        if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+                        {
+                            continue;
+                        }
+                        if (currentProcessor == sendProcessor)
+                        {
+                            CFDSolver *solver1 = GetCFDSolver(iZone, iSolver);
+                            Grid *grid = PHSPACE::GetGrid(iZone, level);
+                            solver1->RotateVectorFromInterface(grid, iZone, nEquation);
+                        }
+                    }
+                }
+            }
+        }
+        else if (iSolver == TRANSITION_SOLVER)
+        {
+            int nEquation = solver->GetNumberOfEquations();
+            CommunicateSpecificArray(level, "gradTransitionCellCenterX", nEquation);
+            CommunicateSpecificArray(level, "gradTransitionCellCenterY", nEquation);
+            CommunicateSpecificArray(level, "gradTransitionCellCenterZ", nEquation);
+            if(periodicType == ROTATIONAL_PERIODICITY)
+            {
+                for (int iZone = 0; iZone < nZones; ++ iZone)
+                {
+                    int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+                    ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+                    int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+                    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+                    {
+                        int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+                        int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+                        if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+                        {
+                            continue;
+                        }
+                        if (currentProcessor == sendProcessor)
+                        {
+                            CFDSolver *solver1 = GetCFDSolver(iZone, iSolver);
+                            Grid *grid = PHSPACE::GetGrid(iZone, level);
+                            solver1->RotateVectorFromInterface(grid, iZone, nEquation);
+                        }
+                    }
+                }
+            }
+        }
+        else if(iSolver == TURB_SOLVER && iLES == LES_SOLVER)
+        {
+            //! For LES, Gradient Communication should be done another time after NSSolver ends.
+            int nTemperatureModel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+            int nTotalVariable = nTemperatureModel + 3;
+
+            CommunicateSpecificArray(level, "gradUVWTCellCenterX", nTotalVariable);
+            CommunicateSpecificArray(level, "gradUVWTCellCenterY", nTotalVariable);
+            CommunicateSpecificArray(level, "gradUVWTCellCenterZ", nTotalVariable);
+
+            if(periodicType == ROTATIONAL_PERIODICITY)
+            {
+                for (int iZone = 0; iZone < nZones; ++ iZone)
+                {
+                    int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+                    ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+                    int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+                    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+                    {
+                        int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+                        int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+                        if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+                        {
+                            continue;
+                        }
+                        if (currentProcessor == sendProcessor)
+                        {
+                            CFDSolver *solver1 = GetCFDSolver(iZone, iSolver);
+                            Grid *grid = PHSPACE::GetGrid(iZone, level);
+                            solver1->RotateVectorFromInterface(grid, iZone, nTotalVariable);
+                        }
+                    }
+                }
+            }
+        }
+    }
+    else if (systemGridType == MIXGRID && isFVMOrFDM == FV_METHOD)
+    {
+        if (iSolver == NS_SOLVER)
+        {
+            CommunicateGradientandLimitOnlyForMixGrid();
+        }
+        else if (iSolver == TURB_SOLVER)
+        {
+        }
+    }
+    if (systemGridType == UNSTRUCTGRID)
+    {
+        int nZones = PHMPI::GetNumberofGlobalZones();
+        int currentProcessor = PHMPI::GetCurrentProcessorID();
+
+        if (iSolver == NS_SOLVER)
+        {
+            //! NSSolver, GradientCommunication for struct high order has been done at another place, with another function.
+            int nNSEquation = GlobalDataBase::GetIntParaFromDB("nm");
+            int nTemperatureModel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+            CommunicateSpecificArray(level, "gradPrimtiveVarX", nNSEquation);
+            CommunicateSpecificArray(level, "gradPrimtiveVarY", nNSEquation);
+            CommunicateSpecificArray(level, "gradPrimtiveVarZ", nNSEquation);
+    
+            CommunicateSpecificArray(level, "gradTemperatureX", nTemperatureModel);
+            CommunicateSpecificArray(level, "gradTemperatureY", nTemperatureModel);
+            CommunicateSpecificArray(level, "gradTemperatureZ", nTemperatureModel);
+
+            if (periodicType == ROTATIONAL_PERIODICITY)
+            {
+                for (int iZone = 0; iZone < nZones; ++iZone)
+                {
+                    int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+                    ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+                    int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+                    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++iNeighbor)
+                    {
+                        int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+                        int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+                        if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+                        {
+                            continue;
+                        }
+
+                        if (currentProcessor == sendProcessor)
+                        {
+                            CFDSolver *solver1 = GetCFDSolver(iZone, iSolver);
+                            Grid *grid = PHSPACE::GetGrid(iZone, level);
+                            solver1->RotateVectorFromInterface(grid, iZone, nNSEquation);
+                            solver1->RotateVectorFromInterface(grid, iZone, nTemperatureModel);
+                        }
+                    }
+                }
+            }
+
+        }
+        else if (iSolver == TURB_SOLVER && iLES == NOLES_SOLVER)
+        {
+            int nEquation = solver->GetNumberOfEquations();
+            CommunicateSpecificArray(level, "gradTurbulenceX", nEquation);
+            CommunicateSpecificArray(level, "gradTurbulenceY", nEquation);
+            CommunicateSpecificArray(level, "gradTurbulenceZ", nEquation);
+
+            if (periodicType == ROTATIONAL_PERIODICITY)
+            {
+                for (int iZone = 0; iZone < nZones; ++iZone)
+                {
+                    int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+                    ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+                    int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+                    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++iNeighbor)
+                    {
+                        int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+                        int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+                        if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+                        {
+                            continue;
+                        }
+                        if (currentProcessor == sendProcessor)
+                        {
+                            CFDSolver *solver1 = GetCFDSolver(iZone, iSolver);
+                            Grid *grid = PHSPACE::GetGrid(iZone, level);
+                            solver1->RotateVectorFromInterface(grid, iZone, nEquation);
+                        }
+                    }
+                }
+            }
+        }
+        else if (iSolver == TRANSITION_SOLVER)
+        {
+            int nEquation = solver->GetNumberOfEquations();
+            CommunicateSpecificArray(level, "gradTransitionX", nEquation);
+            CommunicateSpecificArray(level, "gradTransitionY", nEquation);
+            CommunicateSpecificArray(level, "gradTransitionZ", nEquation);
+
+            if (periodicType == ROTATIONAL_PERIODICITY)
+            {
+                for (int iZone = 0; iZone < nZones; ++iZone)
+                {
+                    int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+                    ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+                    int numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+                    for (int iNeighbor = 0; iNeighbor < numberOfNeighbor; ++iNeighbor)
+                    {
+                        int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+                        int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+                        if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+                        {
+                            continue;
+                        }
+                        if (currentProcessor == sendProcessor)
+                        {
+                            CFDSolver *solver1 = GetCFDSolver(iZone, iSolver);
+                            Grid *grid = PHSPACE::GetGrid(iZone, level);
+                            solver1->RotateVectorFromInterface(grid, iZone, nEquation);
+                        }
+                    }
+                }
+            }
+
+        }
+    }
+}
+
+void Controller::CommunicationInterfaceData(int iSolver)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    //! Face Communication.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(iZone, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        CFDSolver *solver = GetCFDSolver(iZone, iSolver);
+
+        solver->CommunicationInterfaceData();
+    }
+}
+
+void Controller::CommunicationInterfaceDataOneLevel(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    //! Face Communication.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(iZone, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        CFDSolver *solver = GetCFDSolver(iZone, iSolver);
+
+        solver->CommunicationInterfaceData(level);
+    }
+}
+
+void Controller::BLUSGS(int iSolver, int level)
+{
+    //! If the solver is Turb Solver, it will take the LUSGS methods.
+    if (iSolver != NS_SOLVER)
+    {
+        LUSGS(iSolver, level);
+        return;
+    }
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    int nLUSGSSweeps = GlobalDataBase::GetIntParaFromDB("nLUSGSSweeps");
+    RDouble LUSGSTolerance = GlobalDataBase::GetDoubleParaFromDB("LUSGSTolerance");
+
+    FieldProxy **dqProxy = new FieldProxy *[nLocalZones];
+
+    //! L*Dq or U*Dq, which is equal to DeltaFlux between beighbors.
+    FieldProxy **LUplusDQ= new FieldProxy *[nLocalZones];
+
+    BLUSGSInitialization(iSolver, level, nLUSGSSweeps, dqProxy, LUplusDQ);
+
+    RDouble sweepNormalInit = 0.0, sweepEpsilon = 1.1, globleNormal = 0.0;
+    
+    for (int iSweep = 0; iSweep < nLUSGSSweeps; ++ iSweep)
+    {
+        RDouble sweepNormal = 0.0;
+        ForwardSweepBLUSGS(iSolver, level, dqProxy, LUplusDQ, sweepNormal,iSweep);
+
+        CommunicationDQ(iSolver, level, dqProxy);
+
+        BackwardSweepBLUSGS(iSolver, level, dqProxy, LUplusDQ, sweepNormal);
+
+        if (nLUSGSSweeps > 1)
+        {
+            //! Get the global normal.
+            PH_AllReduce(&sweepNormal, &globleNormal, 1, PH_SUM);
+            sweepNormal = globleNormal;
+        }
+
+        //! Check the convergence.
+        //! This criterion will lead to at least 2 sweep.
+        //! It may be more considered, such as using the maximum normal of dq/dqOld.
+        if(iSweep == 0)
+        {
+            sweepNormalInit = sweepNormal;
+        }else
+        {
+            sweepEpsilon = sqrt(sweepNormal / sweepNormalInit);
+        }
+
+        if (sweepEpsilon < LUSGSTolerance)
+        {
+            //! The equations have been converged.
+            break;
+        }
+    }
+
+    UpdateFlowField(iSolver, level, dqProxy);
+
+    for (int iLocalZone = 0; iLocalZone < nLocalZones; ++ iLocalZone)
+    {
+        delete dqProxy[iLocalZone];
+        delete LUplusDQ[iLocalZone];
+    }
+    delete []dqProxy;
+    delete []LUplusDQ;
+}
+
+void Controller::ForwardSweepBLUSGS(int iSolver, int level, FieldProxy **dqProxy, FieldProxy **LUplusDQ, RDouble &sweepNormal , int &iSweep)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+    RDouble *zoneNormal = new RDouble [nLocalZones]();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        if (iSweep == 0)
+        {
+            solver->LHSMatrixs(grid);
+        }
+
+        zoneNormal[iZone] = 0.0;
+        solver->SolveBLUSGSForward(grid, dqProxy[iZone], LUplusDQ[iZone], zoneNormal[iZone]);//! The Block LU-SGS method.
+    }
+
+    //! Sum the zone normal, which is to void OMP data competition.
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        sweepNormal += zoneNormal[iZone];
+    }
+    delete []zoneNormal;    zoneNormal = NULL;
+}
+
+void Controller::BackwardSweepBLUSGS(int iSolver, int level, FieldProxy **dqProxy, FieldProxy **LUplusDQ, RDouble &sweepNormal)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+    RDouble *zoneNormal = new RDouble [nLocalZones]();
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        zoneNormal[iZone] = 0.0;
+        solver->SolveBLUSGSBackward(grid, dqProxy[iZone], LUplusDQ[iZone], zoneNormal[iZone]);//! The Block LU-SGS method
+    }
+
+    //! Sum the zone normal, which is to void OMP data competition.
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        sweepNormal += zoneNormal[iZone];
+    }
+    delete []zoneNormal;    zoneNormal = NULL;
+}
+
+void Controller::MatrixLUSGS(int iSolver, int level)
+{
+    //! If the solver is Turb Solver, it will take the LUSGS methods.
+    if (iSolver != NS_SOLVER)
+    {
+        LUSGS(iSolver, level);
+        return;
+    }
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    int nLUSGSSweeps = GlobalDataBase::GetIntParaFromDB("nLUSGSSweeps");
+    RDouble LUSGSTolerance = GlobalDataBase::GetDoubleParaFromDB("LUSGSTolerance");
+
+    FieldProxy **dqProxy = new FieldProxy *[nLocalZones];
+
+    //! L*Dq or U*Dq, which is equal to DeltaFlux between beighbors.
+    FieldProxy **LUplusDQ= new FieldProxy *[nLocalZones];
+
+    MatrixLUSGSInitialization(iSolver, level, nLUSGSSweeps, dqProxy, LUplusDQ);
+
+    RDouble sweepNormalInit = 1.0, sweepEpsilon = 1.1, globleNormal;
+    
+    for (int iSweep = 0; iSweep < nLUSGSSweeps; ++ iSweep)
+    {
+        RDouble sweepNormal = 0.0;
+        ForwardSweepMatrixLUSGS(iSolver, level, dqProxy, LUplusDQ, sweepNormal,iSweep);
+
+		CommunicationDQ(iSolver, level, dqProxy);
+
+        BackwardSweepMatrixLUSGS(iSolver, level, dqProxy, LUplusDQ, sweepNormal);		
+
+        if (nLUSGSSweeps > 1)
+        {
+            //! Get the global normal.
+            PH_AllReduce(&sweepNormal, &globleNormal, 1, PH_SUM);
+            sweepNormal = globleNormal;
+			
+        }
+
+        //! Check the convergence.
+        //! This criterion will lead to at least 2 sweep.
+        //! It may be more considered, such as using the maximum normal of dq/dqOld.
+        if(iSweep == 0)
+        {
+            sweepNormalInit = sweepNormal;
+        }else
+        {
+            sweepEpsilon = sqrt(sweepNormal / sweepNormalInit);
+        }
+
+        if (sweepEpsilon < LUSGSTolerance)
+        {
+            //! The equations have been converged.
+            break;
+        }
+    }
+
+	UpdateFlowField(iSolver, level, dqProxy);
+
+    for (int iLocalZone = 0; iLocalZone < nLocalZones; ++ iLocalZone)
+    {
+        delete dqProxy[iLocalZone];
+        delete LUplusDQ[iLocalZone];
+    }
+    delete []dqProxy;
+    delete []LUplusDQ;
+}
+
+void Controller::ForwardSweepMatrixLUSGS(int iSolver, int level, FieldProxy **dqProxy, FieldProxy **LUplusDQ, RDouble &sweepNormal , int &iSweep)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+    RDouble *zoneNormal = new RDouble [nLocalZones];
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int izone = 0; izone < nLocalZones; ++ izone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(izone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        if (iSweep == 0)
+        {
+            solver->LHSMatrixs(grid);
+        }
+
+        zoneNormal[izone] = 0.0;
+		solver->SolveMatrixLUSGSForward(grid, dqProxy[izone], LUplusDQ[izone], zoneNormal[izone]); //! The Matrix LU-SGS method.
+    }
+
+    //! Sum the zone normal, which is to void OMP data competition.
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        sweepNormal += zoneNormal[iZone];
+    }
+    delete []zoneNormal;
+}
+
+void Controller::BackwardSweepMatrixLUSGS(int iSolver, int level, FieldProxy **dqProxy, FieldProxy **LUplusDQ, RDouble &sweepNormal)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+    RDouble *zoneNormal = new RDouble [nLocalZones];
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int izone = 0; izone < nLocalZones; ++ izone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(izone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        zoneNormal[izone] = 0.0;
+        solver->SolveMatrixLUSGSBackward(grid, dqProxy[izone], LUplusDQ[izone], zoneNormal[izone]);//! The Matrix LU-SGS method
+    }
+
+    //! Sum the zone normal, which is to void OMP data competition.
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        sweepNormal += zoneNormal[iZone];
+    }
+    delete []zoneNormal;
+}
+
+void Controller::LineLUSGS(int iSolver, int level)
+{
+    //! If the solver is Turb Solver, it will take the LUSGS methods.
+    if (iSolver != NS_SOLVER)
+    {
+        LUSGS(iSolver, level);
+        return;
+    }
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    int nLUSGSSweeps = GlobalDataBase::GetIntParaFromDB("nLUSGSSweeps");
+    RDouble LUSGSTolerance = GlobalDataBase::GetDoubleParaFromDB("LUSGSTolerance");
+
+    FieldProxy** dqProxy = new FieldProxy * [nLocalZones];
+
+    //! L*Dq or U*Dq, which is equal to DeltaFlux between beighbors.
+    FieldProxy** LUplusDQ = new FieldProxy * [nLocalZones];
+
+    LineLUSGSInitialization(iSolver, level, nLUSGSSweeps, dqProxy, LUplusDQ);
+
+    RDouble sweepNormalInit = 0.0, sweepEpsilon = 1.1, globleNormal = 0.0;
+
+    for (int iSweep = 0; iSweep < nLUSGSSweeps; ++iSweep)
+    {
+        RDouble sweepNormal = 0.0;
+        ForwardSweepLineLUSGS(iSolver, level, dqProxy, LUplusDQ, sweepNormal, iSweep);
+
+        CommunicationDQ(iSolver, level, dqProxy);
+
+        BackwardSweepLineLUSGS(iSolver, level, dqProxy, LUplusDQ, sweepNormal);
+
+        if (nLUSGSSweeps > 1)
+        {
+            //! Get the global normal.
+            PH_AllReduce(&sweepNormal, &globleNormal, 1, PH_SUM);
+            sweepNormal = globleNormal;
+        }
+
+        //! Check the convergence.
+        //! This criterion will lead to at least 2 sweep.
+        //! It may be more considered, such as using the maximum normal of dq/dqOld.
+        if (iSweep == 0)
+        {
+            sweepNormalInit = sweepNormal;
+        }
+        else
+        {
+            sweepEpsilon = sweepNormal / sweepNormalInit;
+        }
+
+        if (sweepEpsilon < LUSGSTolerance)
+        {
+            //! The equations have been converged.
+            break;
+        }
+    }
+
+    UpdateFlowField(iSolver, level, dqProxy);
+
+    for (int iLocalZone = 0; iLocalZone < nLocalZones; ++iLocalZone)
+    {
+        delete dqProxy[iLocalZone];
+        delete LUplusDQ[iLocalZone];
+    }
+    delete [] dqProxy; 
+    delete [] LUplusDQ;
+}
+
+void Controller::LineLUSGSInitialization(int iSolver, int level, int nSweep, FieldProxy** dqProxy, FieldProxy** LUplusDQ)
+{
+    int nLocalZones = PHMPI::GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++iZone)
+    {
+        int zoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid* grid = GetGrid(zoneID, level);
+        CFDSolver* solver = GetCFDSolver(zoneID, iSolver);
+
+        //! Memory allocating.
+        dqProxy[iZone] = solver->CreateFieldProxy(grid);
+        LUplusDQ[iZone] = solver->CreateFieldProxy(grid);
+
+        //! The delta Flux is initialized by zero, which will be used in the forward sweep.
+        solver->FillField(grid, LUplusDQ[iZone], zero);
+
+        //! Warning: it is important to research the effect of the initialization in future!
+        //! e.g., using rhs to init when nsweep > 1.
+        //! Initialization.
+        if (nSweep == 1)
+        {
+            //! Single sweep, init by res.
+            FieldProxy* rhsProxy = solver->GetFieldProxy(grid, solver->CastName("res"));
+            solver->FillField(grid, dqProxy[iZone], rhsProxy);
+            delete rhsProxy;
+        }
+        else
+        {
+            //! Multi-sweep, init by zero.
+            solver->FillField(grid, dqProxy[iZone], zero);
+        }
+    }
+}
+
+void Controller::ForwardSweepLineLUSGS(int iSolver, int level, FieldProxy** dqProxy, FieldProxy** LUplusDQ, RDouble& sweepNormal, int& iSweep)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+    RDouble* zoneNormal = new RDouble[nLocalZones]();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid* grid = GetGrid(zoneID, level);
+        CFDSolver* solver = GetCFDSolver(zoneID, iSolver);
+
+        if (iSweep == 0)
+        {
+            solver->LineLUSGSMatrixs(grid);
+        }
+
+        zoneNormal[iZone] = 0.0;
+        solver->SolveLineLUSGSForward(grid, dqProxy[iZone], LUplusDQ[iZone], zoneNormal[iZone]);//! The Block LU-SGS method.
+    }
+
+    //! Sum the zone normal, which is to void OMP data competition.
+    for (int iZone = 0; iZone < nLocalZones; ++iZone)
+    {
+        sweepNormal += zoneNormal[iZone];
+    }
+    delete [] zoneNormal;    zoneNormal = NULL;
+}
+
+void Controller::BackwardSweepLineLUSGS(int iSolver, int level, FieldProxy** dqProxy, FieldProxy** LUplusDQ, RDouble& sweepNormal)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+    RDouble* zoneNormal = new RDouble[nLocalZones]();
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+        Grid* grid = GetGrid(zoneID, level);
+        CFDSolver* solver = GetCFDSolver(zoneID, iSolver);
+
+        zoneNormal[iZone] = 0.0;
+        solver->SolveLineLUSGSBackward(grid, dqProxy[iZone], LUplusDQ[iZone], zoneNormal[iZone]);//The Block LU-SGS method
+    }
+
+    //! Sum the zone normal, which is to void OMP data competition.
+    for (int iZone = 0; iZone < nLocalZones; ++iZone)
+    {
+        sweepNormal += zoneNormal[iZone];
+    }
+    delete [] zoneNormal;    zoneNormal = NULL;
+}
+
+void Controller::RestrictAllQ(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        Grid *coarseGrid = grid->GetCoarseGrid();
+        if (coarseGrid)
+        {
+            CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+            solver->RestrictAllQ(grid, coarseGrid);
+        }
+    }
+}
+
+void Controller::RestrictDefect(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID,level);
+        Grid * coarseGrid = grid->GetCoarseGrid();
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->RestrictDefect(grid, coarseGrid);
+    }
+}
+
+void Controller::PutCorrection(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    FieldProxy **qProxy = GetQProxy(level);
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(iZone, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(iZone,level);
+        CFDSolver *solver = GetCFDSolver(iZone,iSolver);
+
+        solver->PutCorrection(grid, qProxy[iZone]);
+    }
+}
+
+void Controller::PutCorrectionBack(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    FieldProxy **qProxy = GetQProxy(level);
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(iZone, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(iZone,level);
+        CFDSolver *solver = GetCFDSolver(iZone,iSolver);
+
+        solver->PutCorrectionBack(grid, qProxy[iZone]);
+    }
+}
+
+void Controller::CorrectFineGrid(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+#ifdef USE_OMP
+#pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->CorrectFineGrid(grid, grid->GetCoarseGrid());
+    }
+}
+
+Zone * Controller::GetZone(int iZone)
+{
+    return region->GetZone(iZone);
+}
+
+CFDSolver * Controller::GetCFDSolver(int iZone, int iSolver)
+{
+    return static_cast<CFDSolver *>(GlobalSolvers::GetSolver(iZone, iSolver));
+}
+
+#ifdef USE_GMRESSOLVER
+//! For GMRES -- Boqian Wang
+void Controller::GMRESSolver(int iSolver, int level)
+{
+    int nLocalZones = PHMPI::GetNumberofLocalZones();
+
+    FieldProxy **dqProxy = new FieldProxy *[nLocalZones];
+
+    for (int iZone = 0; iZone < nLocalZones; iZone++)
+    {
+        int zoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Zone *zone = GetZone(zoneID);
+        if(!zone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        dqProxy[iZone] = solver->CreateFieldProxy(grid);
+        solver->FillField(grid, dqProxy[iZone], zero);  // difference of conservative variables, init by zero
+        solver->GMRESSolver(grid, dqProxy[iZone]);
+    }
+
+    // GMRESWholeJacobian
+    UpdateFlowField(iSolver, level, dqProxy);
+
+    for (int iLocalZone = 0; iLocalZone < nLocalZones; iLocalZone++)
+    {
+        delete dqProxy[iLocalZone];
+    }
+    delete []dqProxy;
+}
+
+//! GMRES Coupled for NS and Turb
+void Controller::GMRESSolver_Coupled(int level)
+{
+    int nLocalZones = PHMPI::GetNumberofLocalZones();
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+    if( tscheme != GMRES )
+    {
+        return;
+    }
+
+    FieldProxy **dqProxyNS      = new FieldProxy *[nLocalZones];
+    FieldProxy **dqProxyTurb    = new FieldProxy *[nLocalZones];
+
+    for (int iZone = 0; iZone < nLocalZones; iZone++)
+    {
+        int zoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Zone *zone = GetZone(zoneID);
+        if(!zone)
+        {
+            continue;
+        }
+
+        Grid *grid0 = GetGrid(zoneID, level);
+
+        CFDSolver *solverNS     = GetCFDSolver(zoneID, 0);
+        CFDSolver *solverTurb   = GetCFDSolver(zoneID, 1);
+
+        dqProxyNS[iZone] = solverNS->CreateFieldProxy(grid0);
+        solverNS->FillField(grid0, dqProxyNS[iZone], zero);  // difference of conservative variables, init by zero
+
+        dqProxyTurb[iZone] = solverTurb->CreateFieldProxy(grid0);
+        solverTurb->FillField(grid0, dqProxyTurb[iZone], zero);  // difference of turbulence variables, init by zero
+        
+
+        UnstructGrid* grid = static_cast<UnstructGrid *>(grid0);
+        
+        RDouble **dRdq                  = reinterpret_cast<RDouble**>(grid->GetDataPtr("dRdq"));
+        RDouble **dRdq_turb             = reinterpret_cast<RDouble**>(grid->GetDataPtr("dRdq_turb"));
+        RDouble **res                   = reinterpret_cast<RDouble **>(grid->GetDataPtr("res"));
+        RDouble **res_turb              = reinterpret_cast<RDouble **>(grid->GetDataPtr("res_turb"));
+        RDouble** dRdqCoupledTerm       = reinterpret_cast <RDouble**> (grid->GetDataPtr("dRdqCoupledTerm"));
+        RDouble** dRdqCoupledTerm_turb  = reinterpret_cast <RDouble**> (grid->GetDataPtr("dRdqCoupledTerm_turb"));
+
+        RDouble **dDdP      = reinterpret_cast<RDouble**>(grid->GetDataPtr("dDdP"));
+
+        // RDouble **dRdqCoupledTerm = reinterpret_cast<RDouble**>(grid->GetDataPtr("dRdqCoupledTerm"));
+
+        int nTotalCells         = grid->GetNTotalCell();
+        int nBoundFace          = grid->GetNBoundFace();
+        int nEquations          = solverNS->GetNumberOfEquations(); 
+        int nTurbulenceEquation = solverTurb->GetNumberOfEquations();
+        
+        RDouble* vol = grid->GetCellVolume();
+        RDouble* dt = reinterpret_cast<RDouble*> (grid->GetDataPtr("dt"));
+        vector<int> AI = grid->GetJacobianAI4GMRES();  // GMRESSparse GMRESCSR
+        vector<int> AJ = grid->GetJacobianAJ4GMRES();  // GMRESSparse GMRESCSR
+
+        // GMRESCSR
+        for (int icell = 0; icell < nTotalCells; icell++)
+        {
+            vector<int>::iterator result = find(AJ.begin() + AI[icell], AJ.begin() + AI[icell + 1], icell); // find qcell
+            int index = distance(AJ.begin(), result);
+            
+            int indexNS = index*nEquations;
+            for (int iequ = 0; iequ < nEquations; iequ++)
+            {
+                 dRdq[iequ][indexNS + iequ] += 1.0 / dt[icell];
+            }
+
+            int indexTurb = index*nTurbulenceEquation;
+            for (int iequ = 0; iequ < nTurbulenceEquation; iequ++)
+            {
+                 dRdq_turb[iequ][indexTurb + iequ] += 1.0 / dt[icell];
+            }
+        }
+
+        // GMRESJac1st
+        vector<int> AI1st = grid->GetJacobianAI1st4GMRES(); 
+        vector<int> AJ1st = grid->GetJacobianAJ1st4GMRES();
+        RDouble **dRdq1st = reinterpret_cast<RDouble**>(grid->GetDataPtr("dRdq1st"));
+        int JacOrder    = grid->GetJacobianOrder();
+
+        // GMRESCoupled1st
+        RDouble** dRdqCoupledTerm1st        = reinterpret_cast <RDouble**> (grid->GetDataPtr("dRdqCoupledTerm1st"));
+        RDouble** dRdqCoupledTerm_turb1st   = reinterpret_cast <RDouble**> (grid->GetDataPtr("dRdqCoupledTerm_turb1st"));
+        RDouble** dRdq_turb1st              = reinterpret_cast<RDouble**> (grid->GetDataPtr("dRdq_turb1st"));       
+
+        if (JacOrder == 2)
+        {
+            int jmax1st = AI1st[nTotalCells + nBoundFace];
+            int rcell1st = 0;
+            int rcell2nd = 0;
+            int j1st = 0;
+            do
+            {
+                for (j1st = AI1st[rcell1st]; j1st < AI1st[rcell1st + 1]; j1st++)
+                {
+                    int col1st = AJ1st[j1st];
+                    vector<int>::iterator result = find(AJ.begin() + AI[rcell2nd], AJ.begin() + AI[rcell2nd + 1], col1st); // find qcell
+                    int index = distance(AJ.begin(), result);
+
+                    int indexNS     = index*nTurbulenceEquation;
+                    int indexNS1st  = j1st*nTurbulenceEquation;
+                    for (int iequI = 0; iequI < nEquations; iequI++)
+                    {
+                        dRdqCoupledTerm1st[iequI][indexNS1st] = dRdqCoupledTerm[iequI][indexNS];
+                    }
+                    dRdq_turb1st[0][indexNS1st] = dRdq_turb[0][indexNS];
+
+                    int indexTurb           = index*nEquations;
+                    int indexTurb1st        = j1st*nEquations;
+                    for (int iequI = 0; iequI < nEquations; iequI++)
+                    {
+                        dRdqCoupledTerm_turb1st[0][indexTurb1st+iequI] = dRdqCoupledTerm_turb[0][indexTurb+iequI];
+                    }
+                }
+                rcell1st++;
+                rcell2nd++;
+
+            } while (j1st < jmax1st);
+            
+
+            for (int icell = 0; icell < nTotalCells; icell++)
+            {
+                vector<int>::iterator result = find(AJ1st.begin() + AI1st[icell], AJ1st.begin() + AI1st[icell + 1], icell); // find qcell
+                int index = distance(AJ1st.begin(), result);
+                if (result == AJ1st.begin() + AI1st[icell + 1])
+                {
+                    printf("\nrcell %d cannot find qcell %d from \n", icell, icell);
+                    for (int i = AI[icell]; i < AI[icell + 1]; i++)
+                    {
+                        printf("%d ", AJ1st[i]);
+                    }
+                    printf("\n");
+                    TK_Exit::ExceptionExit("Sparse matrix index is wrong");
+                }
+
+                int indexNS = index*nEquations;
+                for (int iequ = 0; iequ < nEquations; iequ++)
+                {
+                     dRdq1st[iequ][indexNS + iequ] += 1.0 / dt[icell];
+                }
+
+                int indexTurb = index*nTurbulenceEquation;
+                for (int iequ = 0; iequ < nTurbulenceEquation; iequ++)
+                {
+                     dRdq_turb1st[iequ][indexTurb + iequ] += 1.0 / dt[icell];
+                }
+            }
+        }
+      
+        // entry to PETSc for NS equations\n
+        Vec x, b;
+        Mat A;
+        Mat APC; // GMRESJac1st
+        KSP ksp;                        // define solver
+        PC pc;                          // define matrix
+        PetscInt nTotalSize;            // dimension size of matrix and vector
+        PetscInt nLevels = 3;           // define number of levels used by preconditioner ILU
+        PetscInt MaxStepsRestart = 500;  // define maximum steps required by [restart]
+        PetscInt MaxSteps = 500;        // define maximum steps
+        PetscReal rTolerance = 1.e-1;   // define tolerance of relative error // -1
+        PetscReal dropTolerance = 1.e5; // define tolerance of drop error
+
+        int blockSize = nEquations + nTurbulenceEquation;
+       
+        int globalTotalCells;
+        globalTotalCells = (int)GlobalDataBase::GetDoubleParaFromDB("GlobalTotalCells");
+        int nInterfaceCells;
+        InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+        int globalCellIndexShift = grid->GetGlobalCellIndexShift();
+        if (interfaceInfo != nullptr)
+        {
+            nInterfaceCells = interfaceInfo->GetNIFace();
+        }
+        nTotalSize = blockSize * globalTotalCells;
+
+        // initialize PETSc
+        PetscInitialize(PETSC_NULL, PETSC_NULL, PETSC_NULL, PETSC_NULL);
+
+        // create vectors;
+        VecCreateMPI(PETSC_COMM_WORLD, nTotalCells * blockSize, nTotalSize, &x);
+        PetscObjectSetName((PetscObject)x, "solution");
+        VecSetUp(x);
+        VecDuplicate(x, &b);
+
+        // create matrix
+        // GMRESCSR
+        PetscInt nnz[nTotalCells];
+        for (int icell = 0; icell < nTotalCells; icell++)
+        {
+            int count = 0;
+            for (int j = AI[icell]; j < AI[icell + 1]; j++)
+            {
+                if(AJ[j] < nTotalCells)
+                {
+                    count++;
+                }
+            }
+            nnz[icell] = count;
+        }
+        MatCreate(PETSC_COMM_WORLD, &A);
+        MatSetSizes(A, nTotalCells * blockSize, nTotalCells * blockSize,  nTotalSize, nTotalSize);
+        MatSetType(A, MATMPIBAIJ);
+        MatSetBlockSize(A, blockSize);
+        MatMPIBAIJSetPreallocation(A, blockSize, PETSC_DEFAULT, nnz, 20, PETSC_NULL);
+        PetscInt firstRow = globalTotalCells * blockSize;
+        PetscInt lastOneMoreRow = (globalTotalCells + nTotalCells) * blockSize;
+        MatGetOwnershipRange(A, &firstRow, &lastOneMoreRow);
+        MatSetUp(A);
+        MatZeroEntries(A);
+
+        MatCreate(PETSC_COMM_WORLD, &APC);
+        MatSetSizes(APC, nTotalCells * blockSize, nTotalCells * blockSize, nTotalSize, nTotalSize);
+        MatSetType(APC, MATMPIBAIJ);
+        MatSetBlockSize(APC, blockSize);
+
+        // GMRESJac1st
+        if( JacOrder == 2)
+        {
+            PetscInt nnz1st[nTotalCells];
+            for (int icell = 0; icell < nTotalCells; icell++)
+            {
+                int count = 0;
+                for (int j = AI1st[icell]; j < AI1st[icell + 1]; j++)
+                {
+                    if(AJ1st[j] < nTotalCells)
+                    {
+                        count++;
+                    }
+                }
+                nnz1st[icell] = count;
+            }
+            MatMPIBAIJSetPreallocation(APC, blockSize, PETSC_DEFAULT, nnz1st, 0, PETSC_NULL);
+        }
+        else
+        {
+            MatMPIBAIJSetPreallocation(APC, blockSize, PETSC_DEFAULT, nnz, 0, PETSC_NULL);
+        }
+        MatGetOwnershipRange(APC, &firstRow, &lastOneMoreRow);
+        MatSetUp(APC);
+        MatZeroEntries(APC);
+
+        // ----------------
+        // |   A       |B |
+        // |           |  |
+        // |           |  |
+        // |           |  |
+        // ----------------
+        // | C         |D |
+        // ----------------
+        // improved approach to assemble matrix CSR
+        PetscInt petsccol[nEquations];
+        PetscInt petscrow;
+        int jmax = AI[nTotalCells];
+        int rcell = 0;
+        int j = AI[rcell];
+        do
+        {
+            int rowidx = (rcell + globalCellIndexShift) * blockSize;
+            for (j = AI[rcell]; j < AI[rcell + 1]; j++)
+            {
+                int qcell = AJ[j]; // get qcell (colume index of matrix)
+                // start to insert values: limited to dimension of nTotalSize
+                if(qcell < nTotalCells)
+                {
+                    int colidx = (qcell + globalCellIndexShift) * blockSize;
+
+                    for (int irow = 0; irow < nEquations; irow++)
+                    {
+                        petscrow = rowidx + irow;
+                        for (int n = 0; n < nEquations; n++)
+                        {
+                            petsccol[n] = colidx + n;
+                        }
+                        MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdq[irow][j * nEquations], ADD_VALUES);  // part A
+                        
+                        PetscInt colidxturb =  colidx + nEquations;
+                        MatSetValues(A, 1, &petscrow, 1, &colidxturb, &dRdqCoupledTerm[irow][j*nTurbulenceEquation], ADD_VALUES);    // part B
+                    }
+
+                    petscrow = rowidx + nEquations;
+                    
+                    for (int n = 0; n < nEquations; n++)
+                    {
+                        petsccol[n] = colidx + n;
+                    }
+
+                    MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdqCoupledTerm_turb[0][j * nEquations], ADD_VALUES);  // part C
+                        
+                    PetscInt colidxturb =  colidx + nEquations;
+                    MatSetValues(A, 1, &petscrow, 1, &colidxturb, &dRdq_turb[0][j*nTurbulenceEquation], ADD_VALUES);   // part D
+
+                }
+            }
+            rcell++; // update rcell, go to the next row index of matrix
+        } while (j < jmax);
+
+        //! consider the second order template for 2nd order jacobian matrix for domain decomposition strategy
+        if (interfaceInfo != nullptr && JacOrder == 2)
+        {
+            vector<int> *neighborCells = grid->GMRESGetNeighborCells();
+            rcell = nTotalCells;
+            jmax = AI[nTotalCells + nBoundFace];
+            j = AI[rcell];
+            do
+            {
+                int rowidx = interfaceInfo->MatchedGlobalNeighborCellIndex(rcell) * blockSize;
+                if (rowidx >= 0) //! rcell is the ghost cell, rowidx >=0 means this cell locates on the interface boundary
+                {
+                    int leftcell = interfaceInfo->MatchedLocalPhysicalCellIndex(rcell); // return its corresponding physical cell index
+                    int colidx = (leftcell + globalCellIndexShift) * blockSize;
+                    vector<int>::iterator result = find(AJ.begin() + AI[rcell], AJ.begin() + AI[rcell + 1], leftcell); // find leftcell
+                    int index = distance(AJ.begin(), result);
+
+                    for (int irow = 0; irow < nEquations; irow++)
+                    {
+                        petscrow = rowidx + irow;
+                        for (int n = 0; n < nEquations; n++)
+                        {
+                            petsccol[n] = colidx + n;
+                        }
+                        MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdq[irow][index * nEquations], ADD_VALUES); // part A
+
+                        PetscInt colidxturb = colidx + nEquations;
+                        MatSetValues(A, 1, &petscrow, 1, &colidxturb, &dRdqCoupledTerm[irow][index * nTurbulenceEquation], ADD_VALUES); // part B
+                    }
+
+                    petscrow = rowidx + nEquations;
+                    for (int  n = 0; n < nEquations; n++)
+                    {
+                        petsccol[n] = colidx + n;
+                    }
+                    MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdqCoupledTerm_turb[0][index * nEquations], ADD_VALUES); // part C
+                    PetscInt colidxturb = colidx + nEquations;
+                    MatSetValues(A, 1, &petscrow, 1, &colidxturb, &dRdq_turb[0][index * nTurbulenceEquation], ADD_VALUES); // part D
+
+                    // obtain the list of the neighbor physical cell for the left cell
+                    for (int id = 0; id < neighborCells[leftcell].size(); id++)
+                    {
+                        int neighborIndex = neighborCells[leftcell][id];
+                        if (neighborIndex >= nTotalCells)
+                        {
+                            continue;
+                        }
+
+                        int colidx = (neighborIndex + globalCellIndexShift) * blockSize;
+                        vector<int>::iterator result = find(AJ.begin() + AI[rcell], AJ.begin() + AI[rcell + 1], neighborIndex); // find neighborIndex
+                        int index = distance(AJ.begin(), result);
+
+                        for (int irow = 0; irow < nEquations; irow++)
+                        {
+                            petscrow = rowidx + irow;
+                            for (int n = 0; n < nEquations; n++)
+                            {
+                                petsccol[n] = colidx + n;
+                            }
+                            MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdq[irow][index * nEquations], ADD_VALUES); // part A
+                            PetscInt colidxturb = colidx + nEquations;
+                            MatSetValues(A, 1, &petscrow, 1, &colidxturb, &dRdqCoupledTerm[irow][index * nTurbulenceEquation], ADD_VALUES); // part B
+                        }
+
+                        petscrow = rowidx + nEquations;
+                        for (int n = 0; n < nEquations; n++)
+                        {
+                            petsccol[n] = colidx + n;
+                        }
+                        MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdqCoupledTerm_turb[0][index * nEquations], ADD_VALUES); // part C
+                        PetscInt colidxturb = colidx + nEquations;
+                        MatSetValues(A, 1, &petscrow, 1, &colidxturb, &dRdq_turb[0][index * nTurbulenceEquation], ADD_VALUES); // part D
+                    }
+
+                    //! obtain the R_physical/q_ghost caused by the neighbor cell at interface bc
+                    result = find(AJ.begin() + AI[leftcell], AJ.begin() + AI[leftcell + 1], rcell); // find rcell
+                    index = distance(AJ.begin(), result);
+                    for (int irow = 0; irow < nEquations; irow++)
+                    {
+                        petscrow = (leftcell + globalCellIndexShift) * blockSize + irow;
+                        for (int n = 0; n < nEquations; n++)
+                        {
+                            petsccol[n] = rowidx + n;
+                        }
+                        MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdq[irow][index * nEquations], ADD_VALUES); // part A
+                        PetscInt colidxturb = rowidx + nEquations;
+                        MatSetValues(A, 1, &petscrow, 1, &colidxturb, &dRdqCoupledTerm[irow][index * nTurbulenceEquation], ADD_VALUES); // part B
+                    }
+
+                    petscrow = (leftcell + globalCellIndexShift) * blockSize + nEquations;
+                    for (int n = 0; n < nEquations; n++)
+                    {
+                        petsccol[n] = rowidx + n;
+                    }
+                    MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdqCoupledTerm_turb[0][index * nEquations], ADD_VALUES); // part C
+                    colidxturb = rowidx + nEquations;
+                    MatSetValues(A, 1, &petscrow, 1, &colidxturb, &dRdq_turb[0][index * nTurbulenceEquation], ADD_VALUES); // part D
+
+                    //! obtain the list of the neighbor physical cell for the left cell
+                    for (int id = 0; id < neighborCells[leftcell].size(); id++)
+                    {
+                        int neighborIndex = neighborCells[leftcell][id];
+                        if (neighborIndex >= nTotalCells)
+                        {
+                            continue;
+                        }
+                        vector<int>::iterator result = find(AJ.begin() + AI[neighborIndex], AJ.begin() + AI[neighborIndex + 1], rcell);
+                        int index = distance(AJ.begin(), result);
+                        
+                        for (int irow = 0; irow < nEquations; irow++)
+                        {
+                            petscrow = (neighborIndex + globalCellIndexShift) * blockSize + irow;
+                            for (int n = 0; n < nEquations; n++)
+                            {
+                                petsccol[n] = rowidx + n;
+                            }
+                            MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdq[irow][index * nEquations], ADD_VALUES); // part A
+
+                            PetscInt colidxturb = rowidx + nEquations;
+                            MatSetValues(A, 1, &petscrow, 1, &colidxturb, &dRdqCoupledTerm[irow][index * nTurbulenceEquation], ADD_VALUES); // part B
+                        }
+
+                        petscrow = (neighborIndex + globalCellIndexShift) * blockSize + nEquations;
+                        for (int n = 0; n < nEquations; n++)
+                        {
+                            petsccol[n] = rowidx + n;
+                        }
+                        MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdqCoupledTerm_turb[0][index * nEquations], ADD_VALUES); // part C
+                        PetscInt colidxturb = rowidx + nEquations;
+                        MatSetValues(A, 1, &petscrow, 1, &colidxturb, &dRdq_turb[0][index * nTurbulenceEquation], ADD_VALUES); // part D
+                    }
+                }
+                rcell++;
+            } while (rcell < nTotalCells + nBoundFace);
+        }
+        else if (interfaceInfo != nullptr && JacOrder != 2)
+        {
+            vector<int> *neighborCells = grid->GMRESGetNeighborCells();
+            rcell = nTotalCells;
+            jmax = AI[nTotalCells + nBoundFace];
+            j = AI[rcell];
+            do
+            {
+                int rowidx = interfaceInfo->MatchedGlobalNeighborCellIndex(rcell);
+                if (rowidx >= 0) 
+                {
+                    int leftcell = interfaceInfo->MatchedLocalPhysicalCellIndex(rcell); // return its corresponding physical cell index
+                    int colidx = (leftcell + globalCellIndexShift) * blockSize;
+                    vector<int>::iterator result = find(AJ.begin() + AI[rcell], AJ.begin() + AI[rcell + 1], leftcell);
+                    int index = distance(AJ.begin(), result);
+
+                    rowidx *= blockSize;
+                    for (int irow = 0; irow < nEquations; irow++)
+                    {
+                        petscrow = rowidx + irow;
+                        for (int n = 0; n < nEquations; n++)
+                        {
+                            petsccol[n] = colidx + n;
+                        }
+                        MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdq[irow][index * nEquations], ADD_VALUES); // part A
+                        PetscInt colidxturb = colidx + nEquations;
+                        MatSetValues(A, 1, &petscrow, 1, &colidxturb, &dRdqCoupledTerm[irow][index * nTurbulenceEquation], ADD_VALUES); // part B
+                    }
+
+                    petscrow = rowidx + nEquations;
+                    for (int n = 0; n < nEquations; n++)
+                    {
+                        petsccol[n] = colidx + n;
+                    }
+                    MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdqCoupledTerm_turb[0][index * nEquations], ADD_VALUES); // part C
+                    PetscInt colidxturb = colidx + nEquations;
+                    MatSetValues(A, 1, &petscrow, 1, &colidxturb, &dRdq_turb[0][index * nTurbulenceEquation], ADD_VALUES); // part D
+                }
+                rcell++;
+            } while (rcell < nTotalCells + nBoundFace);
+        }
+
+        if (JacOrder == 2)
+        {
+            int jmax = AI1st[nTotalCells];
+            int rcell = 0;
+            int j = AI1st[rcell];
+            do
+            {
+                int rowidx = (rcell + globalCellIndexShift) * blockSize;
+                for (int j = AI1st[rcell]; j < AI1st[rcell + 1]; j++)
+                {
+                    int qcell = AJ1st[j]; // get qcell (colume index of matrix)
+                    // start to insert values: limited to dimension of nTotalSize
+                    if (qcell < nTotalCells)
+                    {
+                        int colidx = (qcell + globalCellIndexShift) * blockSize;
+                        for (int irow = 0; irow < nEquations; irow++)
+                        {
+                            petscrow = rowidx + irow;
+                            for (int n = 0; n < nEquations; n++)
+                            {
+                                petsccol[n] = colidx + n;
+                            }
+                            MatSetValues(APC, 1, &petscrow, nEquations, petsccol, &dRdq1st[irow][j * nEquations], INSERT_VALUES); // part A
+                            PetscInt colidxturb = colidx + nEquations;
+                            MatSetValues(APC, 1, &petscrow, 1, &colidxturb, &dRdqCoupledTerm1st[irow][j * nTurbulenceEquation], INSERT_VALUES); // part B
+                        }
+
+                        petscrow = rowidx + nEquations;
+                        for (int n = 0; n < nEquations; n++)
+                        {
+                            petsccol[n] = colidx + n;
+                        }
+                        MatSetValues(APC, 1, &petscrow, nEquations, petsccol, &dRdqCoupledTerm_turb1st[0][j * nEquations], INSERT_VALUES); // part C
+                        PetscInt colidxturb = colidx + nEquations;
+                        MatSetValues(APC, 1, &petscrow, 1, &colidxturb, &dRdq_turb1st[0][j * nTurbulenceEquation], INSERT_VALUES); // part D
+                    }
+                }
+                rcell++;
+            } while (rcell < nTotalCells);
+        }
+        else
+        {
+            int jmax = AI[nTotalCells];
+            int rcell = 0;
+            int j = AI[rcell];
+            do
+            {
+                int rowidx = (rcell + globalCellIndexShift) * blockSize;
+                for (j = AI[rcell]; j < AI[rcell + 1]; j++)
+                {
+                    int qcell = AJ[j]; // get qcell (colume index of matrix)
+                    // start to insert values: limited to dimension of nTotalSize
+                    if(qcell < nTotalCells)
+                    {
+                        int colidx = (qcell + globalCellIndexShift) * blockSize;
+
+                        for (int irow = 0; irow < nEquations; irow++)
+                        {
+                            petscrow = rowidx + irow;
+                            for (int n = 0; n < nEquations; n++)
+                            {
+                                petsccol[n] = colidx + n;
+                            }
+                            MatSetValues(APC, 1, &petscrow, nEquations, petsccol, &dRdq[irow][j * nEquations], INSERT_VALUES);  // part A
+
+                            PetscInt colidxturb =  colidx + nEquations;
+                            MatSetValues(APC, 1, &petscrow, 1, &colidxturb, &dRdqCoupledTerm[irow][j*nTurbulenceEquation], INSERT_VALUES);    // part B
+                        }
+
+                        petscrow = rowidx + nEquations;
+                    
+                        for (int n = 0; n < nEquations; n++)
+                        {
+                            petsccol[n] = colidx + n;
+                        }
+
+                        MatSetValues(APC, 1, &petscrow, nEquations, petsccol, &dRdqCoupledTerm_turb[0][j * nEquations], INSERT_VALUES);  // part C
+
+                        PetscInt colidxturb =  colidx + nEquations;
+                        MatSetValues(APC, 1, &petscrow, 1, &colidxturb, &dRdq_turb[0][j*nTurbulenceEquation], INSERT_VALUES);   // part D
+                    
+                    }
+                }
+                rcell++; // update rcell, go to the next row index of matrix
+            } while (rcell < nTotalCells);
+        }
+        MatAssemblyBegin(A, MAT_FINAL_ASSEMBLY);
+        MatAssemblyEnd(A, MAT_FINAL_ASSEMBLY);
+        MatAssemblyBegin(APC, MAT_FINAL_ASSEMBLY);
+        MatAssemblyEnd(APC, MAT_FINAL_ASSEMBLY);
+
+        // assemble vector
+        VecSet(b, zero);
+        for (PetscInt icell = 0; icell < nTotalCells; icell++)
+        {
+            for (PetscInt iequ = 0; iequ < nEquations; iequ++)
+            {
+                PetscInt isize = (icell + globalCellIndexShift) * blockSize + iequ;
+                VecSetValues(b, 1, &isize, &res[iequ][icell], ADD_VALUES);
+            }
+
+            PetscInt isize = (icell + globalCellIndexShift) * blockSize + nEquations;
+            VecSetValues(b, 1, &isize, &res_turb[0][icell], ADD_VALUES);
+        }
+
+        VecAssemblyBegin(b);
+        VecAssemblyEnd(b);
+
+        // define solver
+        KSPCreate(PETSC_COMM_WORLD, &ksp);
+        KSPSetType(ksp, KSPGMRES);
+        KSPSetOperators(ksp, A, APC);
+
+        KSPSetPCSide(ksp, PC_RIGHT);
+        KSPSetUp(ksp);
+        KSPGetPC(ksp, &pc);
+        PCSetType(pc, PCBJACOBI);
+
+        // set sub-ksp and sub-pc
+        KSP *subksp;
+        PC subpc;
+        int localTotalSize = nTotalCells * blockSize;
+        PCBJacobiSetLocalBlocks(pc, 1, &localTotalSize);
+
+        int nLocal = 1;
+        int firstLocal = grid->GetZoneID();
+        PCBJacobiGetSubKSP(pc, &nLocal, &firstLocal, &subksp);
+        KSPGetPC(subksp[0], &subpc);
+        PCSetType(subpc, PCILU);
+        PCFactorSetLevels(subpc, nLevels);
+        KSPGMRESSetRestart(ksp, MaxStepsRestart);
+       
+        KSPGMRESSetOrthogonalization(ksp, KSPGMRESModifiedGramSchmidtOrthogonalization);
+        KSPSetTolerances(ksp, rTolerance, 1.e-20, dropTolerance, MaxSteps);
+
+        // solution
+        KSPSolve(ksp, b, x);
+
+        //! GMRESResidual
+        RDouble **dqNS      = dqProxyNS[iZone]->GetField_UNS();
+        RDouble **dqTurb    = dqProxyTurb[iZone]->GetField_UNS();
+
+        // convert x to dqProxy
+        for (PetscInt icell = 0; icell < nTotalCells; icell++)
+        {
+            for (PetscInt iequ = 0; iequ < nEquations; iequ++)
+            {
+                PetscInt isize = (icell + globalCellIndexShift) * blockSize + iequ;
+                PetscReal value;
+                VecGetValues(x, 1, &isize, &dqNS[iequ][icell]);
+            }
+
+            PetscInt isize = (icell + globalCellIndexShift) * blockSize + nEquations;
+            VecGetValues(x, 1, &isize, &dqTurb[0][icell]);
+        }
+
+        // free work space
+        VecDestroy(&x);
+        VecDestroy(&b);
+        MatDestroy(&A);
+        MatDestroy(&APC);
+        KSPDestroy(&ksp);
+        PetscFinalize();
+    
+        
+    }
+    
+    // GMRESWholeJacobian
+    UpdateFlowField(0, level, dqProxyNS);
+    UpdateFlowField(1, level, dqProxyTurb);
+
+
+    for (int iLocalZone = 0; iLocalZone < nLocalZones; iLocalZone++)
+    {
+        delete dqProxyNS[iLocalZone];
+        delete dqProxyTurb[iLocalZone];
+    }
+    delete []dqProxyNS;
+    delete []dqProxyTurb;
+}
+
+//! For GMRES -- Boqian Wang
+void Controller::GMRESSolver_backupversion(int iSolver, int level)
+{
+    int nLocalZones = PHMPI::GetNumberofLocalZones();
+
+    FieldProxy **dqProxy = new FieldProxy *[nLocalZones];
+
+    for (int iZone = 0; iZone < nLocalZones; iZone++)
+    {
+        int zoneID = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Zone *zone = GetZone(zoneID);
+        if(!zone)
+        {
+            continue;
+        }
+
+        Grid *gridin = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        UnstructGrid* grid = static_cast<UnstructGrid *>(gridin);
+        //! Memory allocating
+        RDouble **dRdq = reinterpret_cast<RDouble**>(grid->GetDataPtr("dRdq"));
+        RDouble **dDdP = reinterpret_cast<RDouble**>(grid->GetDataPtr("dDdP"));
+        
+        int nTotalCells = grid->GetNTotalCell();
+        int nBoundFace = grid->GetNBoundFace();
+        int nEquations = solver->GetNumberOfEquations(); 
+        
+        RDouble **res = reinterpret_cast<RDouble **>(grid->GetDataPtr("res"));
+        dqProxy[iZone] = solver->CreateFieldProxy(grid);
+        solver->FillField(grid, dqProxy[iZone], zero);  // difference of conservative variables, init by zero
+        UnstructGrid* gridunstr = UnstructGridCast(grid);
+        RDouble* vol = gridunstr->GetCellVolume();
+        RDouble* dt = reinterpret_cast<RDouble*> (grid->GetDataPtr("dt"));
+        vector<int> AI = gridunstr->GetJacobianAI4GMRES();  // GMRESSparse GMRESCSR
+        vector<int> AJ = gridunstr->GetJacobianAJ4GMRES();  // GMRESSparse GMRESCSR
+
+        // Output res  GMRESWholeJacobian
+        string Outputfilename4 = "./results/res1.dat";
+        ofstream file4(Outputfilename4.c_str(), ios::trunc);
+            
+        for (int i = 0; i < nTotalCells; i++)
+        {
+            for (int j = 0; j < nEquations; j++)
+            {
+               file4 << res[j][i] << " ";
+            }
+            file4 << "\n";
+        }
+        file4.close();
+
+
+    
+        printf("adding diagoal...\n");
+
+        
+        // GMRESCSR
+        for (int icell = 0; icell < nTotalCells; icell++)
+        {
+            vector<int>::iterator result = find(AJ.begin() + AI[icell], AJ.begin() + AI[icell + 1], icell); // find qcell
+            int index = distance(AJ.begin(), result);
+            index *= nEquations;
+            for (int iequ = 0; iequ < nEquations; iequ++)
+            {
+                dRdq[iequ][index + iequ] += 1.0 / dt[icell];
+            }
+        }
+
+        printf("entry to PETSc\n");
+        
+        
+        // Output dRdq
+        string Outputfilename = "./results/nolim_dRdq.dat";
+        ofstream file(Outputfilename.c_str(), ios::trunc);
+        int total = nTotalCells + nBoundFace;
+        int TotalSize = AI[total]*nEquations;
+            
+        for (int i = 0; i < nEquations; i++)
+        {
+            for (int j = 0; j < TotalSize; j++)
+            {
+               file << dRdq[i][j] << " ";
+            }
+            file << "\n";
+        }
+        file.close();
+
+       
+        // GMRESCSR
+        GMRESForZone(dRdq, AI, AJ, res, dqProxy[iZone], nTotalCells, nEquations);
+    }
+    
+    // GMRESWholeJacobian
+    UpdateFlowField(iSolver, level, dqProxy);
+
+    for (int iLocalZone = 0; iLocalZone < nLocalZones; iLocalZone++)
+    {
+        delete dqProxy[iLocalZone];
+    }
+    delete []dqProxy;
+    
+}
+
+/// @brief A GMRES solver with PETSc to solve dq for each zone [Ax = b]
+/// @param dRdq       Jacobin matrix (A)
+/// @param res         residual (b)
+/// @param dqProxy     difference of conservative variables (x)
+/// @param nTotalCells the real size of the matrix
+/// @param nEquations  the number of equations
+void Controller::GMRESForZone(RDouble **dRdq, vector<int>& AI, vector<int>& AJ, RDouble **res, FieldProxy *dqProxy, const int& nTotalcells, const int& nEquations)
+{
+   
+    const RDouble LITTLE = 1.0E-14;
+    Vec x, b;
+    Mat A;
+    KSP ksp;                        // define solver
+    PC pc;                          // define matrix
+    PetscInt nTotalSize;            // dimension size of matrix and vector
+    PetscInt nLevels = 3;           // define number of levels used by preconditioner ILU
+    PetscInt MaxStepsRestart = 10;  // define maximum steps required by [restart]
+    PetscInt MaxSteps = 100;          // define maximum steps
+    PetscReal rTolerance = 1.e-3;  // define tolerance of relative error // -1
+    PetscReal dropTolerance = 1.e5; // define tolerance of drop error
+
+    nTotalSize = nEquations * nTotalcells;
+
+    // initialize PETSc
+    //PetscFunctionBeginUser;
+    PetscInitialize(PETSC_NULL, PETSC_NULL, PETSC_NULL, PETSC_NULL);
+
+    // create vectors;
+    VecCreate(PETSC_COMM_SELF, &x);
+    PetscObjectSetName((PetscObject)x, "solution");
+    VecSetSizes(x, PETSC_DECIDE, nTotalSize);
+    VecSetUp(x);
+    VecDuplicate(x, &b);
+
+    // create matrix
+    // GMRESCSR
+    PetscInt nnz[nTotalcells];
+    for (int icell = 0; icell < nTotalcells; icell++)
+    {
+        int count = 0;
+        for (int j = AI[icell]; j < AI[icell + 1]; j++)
+        {
+            if(AJ[j] < nTotalcells)
+            {
+                count++;
+            }
+        }
+        //count *= nEquations;
+        /* for (int n = 0; n < nEquations; n++)
+        {
+            nnz[icell * nEquations + n] = count;
+        } */
+        nnz[icell] = count;
+    }
+    MatCreate(PETSC_COMM_SELF, &A);
+    MatSetSizes(A, PETSC_DECIDE, PETSC_DECIDE, nTotalSize, nTotalSize);
+    MatSetType(A, MATBAIJ);
+    MatSetBlockSize(A, nEquations);
+    MatSeqBAIJSetPreallocation(A, nEquations, PETSC_DEFAULT, nnz);
+    MatSetUp(A);
+
+    // improved approach to assemble matrix CSR
+    PetscInt petsccol[nEquations];
+    PetscInt petscrow;
+    int jmax = AI[nTotalcells];
+    int rcell = 0;
+    int j = AI[rcell];
+    do
+    {
+        int rowidx = rcell * nEquations;
+        for (j = AI[rcell]; j < AI[rcell + 1]; j++)
+        {
+            int qcell = AJ[j]; // get qcell (colume index of matrix)
+            // start to insert values: limited to dimension of nTotalSize
+            if(qcell < nTotalcells)
+            {
+                int colidx = qcell * nEquations;
+
+                for (int irow = 0; irow < nEquations; irow++)
+                {
+                    petscrow = rowidx + irow;
+                   
+                    for (int n = 0; n < nEquations; n++)
+                    {
+                        petsccol[n] = colidx + n;
+                    }
+                    MatSetValues(A, 1, &petscrow, nEquations, petsccol, &dRdq[irow][j * nEquations], INSERT_VALUES);
+                }
+            }
+        }
+        rcell++; // update rcell, go to the next row index of matrix
+    } while (j < jmax);
+    MatAssemblyBegin(A, MAT_FINAL_ASSEMBLY);
+    MatAssemblyEnd(A, MAT_FINAL_ASSEMBLY);
+    printf("Finish assemabling matrix...\n");
+
+    // assemble vector
+    VecSet(b, zero);
+    for (PetscInt icell = 0; icell < nTotalcells; icell++)
+    {
+        for (PetscInt iequ = 0; iequ < nEquations; iequ++)
+        {
+            PetscInt isize = icell * nEquations + iequ;
+            VecSetValues(b, 1, &isize, &res[iequ][icell], ADD_VALUES);
+        }
+    }
+    VecAssemblyBegin(b);
+    VecAssemblyEnd(b);
+    printf("Finish assemabling vector...\n");
+
+    // define solver
+    KSPCreate(PETSC_COMM_SELF, &ksp);
+    KSPSetType(ksp, KSPGMRES);
+    KSPSetOperators(ksp, A, A);
+    KSPGetPC(ksp, &pc);
+    PCSetType(pc, PCILU);
+    PCFactorSetLevels(pc, nLevels);
+    KSPGMRESSetRestart(ksp, MaxStepsRestart);
+    KSPGMRESSetOrthogonalization(ksp, KSPGMRESClassicalGramSchmidtOrthogonalization);
+    KSPGMRESSetCGSRefinementType(ksp, KSP_GMRES_CGS_REFINE_ALWAYS);
+    KSPSetTolerances(ksp, rTolerance, 1.e-20, dropTolerance, MaxSteps);
+    KSPMonitorSet(ksp, MyKSPMonitor, NULL, 0);
+    // solution
+    KSPSolve(ksp, b, x);
+
+    // convert x to dqProxy
+    RDouble **dq = dqProxy->GetField_UNS();
+    for (PetscInt icell = 0; icell < nTotalcells; icell++)
+    {
+        for (PetscInt iequ = 0; iequ < nEquations; iequ++)
+        {
+            PetscInt isize = icell * nEquations + iequ;
+            PetscReal value;
+            VecGetValues(x, 1, &isize, &dq[iequ][icell]);
+        }
+    }
+
+    // free work space
+    VecDestroy(&x);
+    VecDestroy(&b);
+    MatDestroy(&A);
+    KSPDestroy(&ksp);
+    PetscFinalize();
+    return;
+}
+#endif
+
+bool Controller::CVGNorm(int iSolver, int level)
+{
+    int innstep = 0;
+    GlobalDataBase::GetData("innstep", &innstep, PHINT, 1);
+
+    RDouble tol_sub_iter = 0.01;
+    GlobalDataBase::GetData("tol_sub_iter", &tol_sub_iter, PHDOUBLE, 1);
+
+    int min_sub_iter = 1;
+    GlobalDataBase::GetData("min_sub_iter", &min_sub_iter, PHINT, 1);
+
+    int max_sub_iter = 1;
+    GlobalDataBase::GetData("max_sub_iter", &max_sub_iter, PHINT, 1);
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    RDouble cvgmax = zero, cvg;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(iZone, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(iZone,level);
+        CFDSolver *solver = GetCFDSolver(iZone,iSolver);
+
+        cvg = solver->UnsteadyConvergence(grid);
+        cvgmax = MAX(cvgmax, cvg);
+    }
+
+    //cout << "iner_iter = " << iner_iter << " cvg = " << cvg << "\n";
+
+    GlobalSolve();
+
+    PH_CompareMaxMin(cvgmax, 1);
+
+    if (innstep <  min_sub_iter) return false;
+    if (cvgmax  <= tol_sub_iter) return true ;
+    if (innstep >= max_sub_iter) return true ;
+    return false;
+}
+
+RDouble Controller::ComputeSubIterationNorm(int iSolver, int level)
+{
+    RDouble subIterationNorm    =  zero;
+    RDouble maxSubIterationNorm = -LARGE;
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(iZone, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid    = GetGrid(iZone, level);
+        CFDSolver *solver  = GetCFDSolver(iZone, iSolver);
+
+        subIterationNorm    = solver->UnsteadyConvergence(grid);
+
+        maxSubIterationNorm = MAX(maxSubIterationNorm, subIterationNorm);
+    }
+
+    //PH_CompareMaxMin(averageQuotientMAX, 1);
+
+    return maxSubIterationNorm;
+}
+
+int Controller::GetNPostSolve(int iSolver)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(iZone, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        CFDSolver *solver = GetCFDSolver(iZone,iSolver);
+
+        return solver->GetNPostSolve();
+    }
+
+    return 1;
+}
+
+void Controller::PostSolve(int level)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    int iSolver = this->GetSolverIndex();
+    int nPostSolve = GetNPostSolve(iSolver);
+
+    //! Face Communication.
+    for (int n = 0; n < nPostSolve; ++ n)
+    {
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(iZone, iSolver);
+            if (!ifCalTheZone)
+            {
+                continue;
+            }
+
+            Grid *grid = GetGrid(iZone,level);
+            CFDSolver *solver = GetCFDSolver(iZone, iSolver);
+
+            solver->PostSolve(grid, n, level);
+        }
+    }
+
+    //! The following two functions are used for gradient pre-computing for turbulent solver.
+    //! Initialization of boundary and dependent variables for 
+    //! the next iteration and other coupled solvers, such as turbulence solver.
+    SetBoundaryValueOfField(iSolver, level);
+
+    //UpdateIndependentField(iSolver, level);
+
+    //! Post tasks, such as residual computing.
+    int zoneIndex = GetLocalZoneIDToGlobalZoneID(0);
+    Grid *grid = GetGrid(zoneIndex, level);
+    CFDSolver *solver = static_cast<CFDSolver *>(GlobalSolvers::GetSolver(zoneIndex, iSolver));
+    solver->DumpResultFile(grid, level);
+
+     //! Exam the change of key variables such as the pressure, the translational temperature and the vibrational temperature, etc.
+    int isAdaptiveSolver = GlobalDataBase::GetIntParaFromDB("isAdaptiveSolver");
+    if (isAdaptiveSolver > 0)
+    {
+        solver->CheckResult(grid, level);
+    }
+
+    //To exam the residual of key variable.
+    int isUseHybridMethod = 0;
+    if (GlobalDataBase::IsExist("isUseHybridMethod", PHINT, 1))
+    {
+        isUseHybridMethod = GlobalDataBase::GetIntParaFromDB("isUseHybridMethod");
+    }
+    if (isUseHybridMethod > 0)
+    {
+        solver->CheckResiduals(grid, level);
+    }
+
+    //! Dump the surface heating change.
+    int nSurfHeatMonitor = 0;
+    if (GlobalDataBase::IsExist("nSurfHeatMonitor", PHINT, 1))
+    {
+        nSurfHeatMonitor = GlobalDataBase::GetIntParaFromDB("nSurfHeatMonitor");
+    }
+    if (nSurfHeatMonitor > 0)
+    {
+        solver->CheckSurfaceHeatingChange(grid, level);
+    }
+
+    int nLeakageMonitor = 0;
+    if (GlobalDataBase::IsExist("nLeakageMonitor", PHINT, 1))
+    {
+        nLeakageMonitor = GlobalDataBase::GetIntParaFromDB("nLeakageMonitor");
+    }
+
+    if (nLeakageMonitor > 0)
+    {
+        solver->DumpLeakageInformation(grid);
+    }
+
+    //! Dump the CFL number to the file.
+    int nDumpCFLNumber = 0;
+    if (GlobalDataBase::IsExist("nDumpCFLNumber", PHINT, 1))
+    {
+        nDumpCFLNumber = GlobalDataBase::GetIntParaFromDB("nDumpCFLNumber");
+    }
+    if (nDumpCFLNumber > 0)
+    {
+        solver->DumpCFLNumber(grid, level);
+    }
+
+    //! Node communication: part1.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(iZone, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        CFDSolver *solver1 = GetCFDSolver(iZone, iSolver);
+        for (int iLevel = 0; iLevel < GetNumberOfMultiGrid(); ++ iLevel)
+        {
+            Grid *grid1 = GetGrid(iZone, iLevel);
+            solver1->ComputeNodeValue(grid1);
+            solver1->ComputeQTurbNodeValue(grid1);
+        }
+    }
+
+    //! Node communication: part2.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(iZone, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+        Grid *grid1 = GetGrid(iZone,level);
+        CFDSolver *solver1 = GetCFDSolver(iZone, iSolver);
+        InterpointInformation *inpterPointInfor = grid1->GetInterpointInfo();
+        if (inpterPointInfor)
+        {
+            solver1->CommunicationInterpointData();
+        }
+    }
+
+    //! Node communication: part3.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Zone *zone = GetZone(iZone);
+        if (! zone)
+        {
+            continue;
+        }
+
+        CFDSolver *solver1 = GetCFDSolver(iZone, iSolver);
+        for (int iLevel = 0; iLevel < GetNumberOfMultiGrid(); ++ iLevel)
+        {
+            Grid *grid1 = GetGrid(iZone, iLevel);
+            solver1->ModifyNodeValue(grid1);
+            solver1->ModifyQTurbNodeValue(grid1);
+        }
+    }
+}
+
+void Controller::FillField(int iSolver, int level, FieldProxy **targetProxy, FieldProxy **sourceProxy)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID,level);
+        CFDSolver *solver = GetCFDSolver(zoneID,iSolver);
+
+        solver->FillField(grid, targetProxy[iZone], sourceProxy[zoneID]);
+    }
+}
+
+void Controller::RungeKutta(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    FieldProxy **rightHandSideProxy = GetRHSProxy(level);
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(iZone, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(iZone,level);
+        CFDSolver *solver = GetCFDSolver(iZone,iSolver);
+
+        solver->RungeKutta(grid, rightHandSideProxy[iZone]);
+    }
+}
+
+void Controller::InitResidual(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    FieldProxy **rightHandSideProxy = GetRHSProxy(level);
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(iZone, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(iZone,level);
+        CFDSolver *solver = GetCFDSolver(iZone,iSolver);
+
+        solver->InitResidual(grid, rightHandSideProxy[iZone]);
+    }
+}
+
+void Controller::CreateQProxy(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    FieldProxy **qProxy = GetQProxy(level);
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(iZone, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(iZone, level);
+        CFDSolver *solver = GetCFDSolver(iZone, iSolver);
+
+        qProxy[iZone] = solver->CreateFieldProxy(grid);
+    }
+}
+
+void Controller::DestroyQProxy(int level)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    FieldProxy **qProxy = GetQProxy(level);
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(iZone, 0);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+        delete qProxy[iZone];
+        qProxy[iZone] = NULL;
+    }
+}
+
+void Controller::CreateRHSProxy(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    FieldProxy **rightHandSideProxy = GetRHSProxy(level);
+
+#ifdef USE_OMP
+    #pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        rightHandSideProxy[zoneID] = solver->CreateFieldProxy(grid);
+    }
+}
+
+void Controller::DestroyRHSProxy(int level)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    FieldProxy **rightHandSideProxy = GetRHSProxy(level);
+#ifdef USE_OMP
+    #pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, 0);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        delete rightHandSideProxy[zoneID];
+        rightHandSideProxy[zoneID] = nullptr;
+    }
+}
+
+void Controller::StoreRhsByResidual(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    FieldProxy **rightHandSideProxy = GetRHSProxy(level);
+
+#ifdef USE_OMP
+    #pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID, level);
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+
+        solver->StoreRhsByResidual(grid, rightHandSideProxy[zoneID]);
+    }
+}
+
+void Controller::RecoverResidual(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nLocalZones = GetNumberofLocalZones();
+
+    FieldProxy **rightHandSideProxy = GetRHSProxy(level);
+#ifdef USE_OMP
+    #pragma omp parallel for
+#endif
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(zoneID, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(zoneID,level);
+        CFDSolver *solver = GetCFDSolver(zoneID,iSolver);
+
+        solver->RecoverResidual(grid,rightHandSideProxy[zoneID]);
+    }
+}
+
+bool Controller::JudgeIfCalTheZoneForDensityBasedMethod(int zoneID, int iSolver)
+{
+    using namespace PHMPI;
+    Zone *zone = GetZone(zoneID);
+    bool IfCalTheZone = true;
+    if (!zone)
+    {
+        IfCalTheZone = false;
+    }
+    else
+    {
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+        int solverType = solver->GetKey();
+        if (PRESSURE_BASED_SOLVER == solverType)
+        {
+            IfCalTheZone = false;
+        }
+    }
+    return IfCalTheZone;
+}
+
+bool Controller::JudgeIfCalTheZoneForPressureBasedMethod(int zoneID, int iSolver)
+{
+    using namespace PHMPI;
+    Zone* zone = GetZone(zoneID);
+    bool  IfCalTheZone = true;
+    if (!zone)
+    {
+        IfCalTheZone = false;
+    }
+    else
+    {
+        CFDSolver *solver = GetCFDSolver(zoneID, iSolver);
+        int solverType = solver->GetKey();
+        if (DENSITY_BASED_SOLVER == solverType)
+        {
+            IfCalTheZone = false;
+        }
+    }
+    return IfCalTheZone;
+}
+
+
+FieldProxy **Controller::GetQProxy(int level)
+{
+    return qProxy->GetFieldProxy(level);
+}
+
+FieldProxy **Controller::GetRHSProxy(int level)
+{
+    return rhsProxy->GetFieldProxy(level);
+}
+
+void Controller::LoadQ(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    FieldProxy **qProxy = GetQProxy(level);
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(iZone, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(iZone, level);
+        CFDSolver *solver = GetCFDSolver(iZone, iSolver);
+
+        solver->LoadQ(grid, qProxy[iZone]);
+    }
+}
+
+bool Controller::ISCoarsestGrid(int level)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(iZone, 0);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(iZone,level);
+        if (grid->GetCoarseGrid())
+        {
+            return false;
+        }
+        else
+        {
+            return true;
+        }
+    }
+    return false;
+}
+
+LIB_EXPORT void Controller::InterpolatFineGrid(int iSolver, int level)
+{
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        bool ifCalTheZone = JudgeIfCalTheZoneForDensityBasedMethod(iZone, iSolver);
+        if (!ifCalTheZone)
+        {
+            continue;
+        }
+
+        Grid *grid = GetGrid(iZone, level);
+        CFDSolver *solver = GetCFDSolver(iZone, iSolver);
+
+        Grid *coarseGrid = grid->GetCoarseGrid();
+
+        solver->InterpolatFineGrid(grid, coarseGrid);
+        solver->CommunicationInterfaceData();
+    }
+}
+
+LIB_EXPORT void Controller::MultiGridInitFlow(int level)
+{
+    int iSolver = this->GetSolverIndex();
+
+    ZeroResiduals(iSolver, level);
+
+    //! Create Right Hand Side term.
+    CreateRHSProxy(iSolver, level);
+    StoreRhsByResidual(iSolver, level);
+
+    //! Relaxation.
+    Relaxation(iSolver, level);
+
+    //! Recover the residual.
+    DestroyRHSProxy(level);
+}
+
+MultiGridFieldProxy::MultiGridFieldProxy(int iSolver, int level, int nZone)
+{
+    this->iSolver = iSolver;
+    this->level   = level;
+    this->nzone   = nZone;
+
+    field_proxy = new FieldProxy *[nZone];
+    for (int iZone = 0; iZone < nZone; ++ iZone)
+    {
+        field_proxy[iZone] = 0;
+    }
+}
+
+MultiGridFieldProxy::~MultiGridFieldProxy()
+{
+    for (int iZone = 0; iZone < nzone; ++ iZone)
+    {
+        delete field_proxy[iZone];
+    }
+    delete [] field_proxy;
+}
+
+ZoneFieldProxy::ZoneFieldProxy(int iSolver, uint_t nLevel, int nZone)
+{
+    this->iSolver = iSolver;
+    this->nzone   = nZone;
+    this->nlevel  = nLevel;
+
+    field_proxy = new MultiGridFieldProxy *[nLevel];
+
+    for (int level = 0; level < nLevel; ++ level)
+    {
+        field_proxy[level] = new MultiGridFieldProxy(iSolver, level, nZone);
+    }
+}
+
+ZoneFieldProxy::~ZoneFieldProxy()
+{
+    for (int level = 0; level < nlevel; ++ level)
+    {
+        delete field_proxy[level];
+    }
+    delete []field_proxy;
+}
+
+FieldProxy **ZoneFieldProxy::GetFieldProxy(int level)
+{
+    return field_proxy[level]->GetFieldProxy();
+}
+
+}
diff --git a/CFD/Solver/src/Param_CFDSolver.cpp b/CFD/Solver/src/Param_CFDSolver.cpp
new file mode 100644
index 0000000..5fe7792
--- /dev/null
+++ b/CFD/Solver/src/Param_CFDSolver.cpp
@@ -0,0 +1,195 @@
+#include "Param_CFDSolver.h"
+#include "GlobalDataBase.h"
+#include "Constants.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Param_CFDSolver::Param_CFDSolver()
+{
+    speedVaryStep = NULL;
+    speedVaryCoef = NULL;
+    CFLVaryMultiStep = NULL;
+    CFLVaryCoef = NULL;
+}
+
+LIB_EXPORT Param_CFDSolver::~Param_CFDSolver()
+{
+    if (speedVaryStep != NULL) { delete speedVaryStep; speedVaryStep = NULL; }
+    if (speedVaryCoef != NULL) { delete speedVaryCoef; speedVaryCoef = NULL; }
+    if (CFLVaryMultiStep != NULL) { delete CFLVaryMultiStep; CFLVaryMultiStep = NULL; }
+    if (CFLVaryCoef != NULL) { delete CFLVaryCoef; CFLVaryCoef = NULL; }
+}
+
+LIB_EXPORT void Param_CFDSolver::Init()
+{
+    restartNSFile            = GlobalDataBase::GetStrParaFromDB("restartNSFile");
+    resSaveFile              = GlobalDataBase::GetStrParaFromDB("resSaveFile");
+    viscousName              = GlobalDataBase::GetStrParaFromDB("viscousName");
+
+    plotFieldType            = GlobalDataBase::GetIntParaFromDB("plotFieldType");
+
+    viscousType              = GlobalDataBase::GetIntParaFromDB("viscousType");
+    isUnsteady               = GlobalDataBase::GetIntParaFromDB("iunsteady");
+
+    intervalStepRes          = GlobalDataBase::GetIntParaFromDB("intervalStepRes");
+    intervalStepPlot         = GlobalDataBase::GetIntParaFromDB("intervalStepPlot");
+    intervalStepFlow         = GlobalDataBase::GetIntParaFromDB("intervalStepFlow");
+
+    isAle                    = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+
+    ifLocalTimeStep          = GlobalDataBase::GetIntParaFromDB("ifLocalTimeStep");
+    ifLowSpeedPrecon         = GlobalDataBase::GetIntParaFromDB("ifLowSpeedPrecon");
+
+    CFLVaryStep              = GlobalDataBase::GetIntParaFromDB("CFLVaryStep");
+    nLUSGSSweeps             = GlobalDataBase::GetIntParaFromDB("nLUSGSSweeps");
+    nMGLevel                 = GlobalDataBase::GetIntParaFromDB("nMGLevel");
+
+    ifStartFromSteadyResults = GlobalDataBase::GetIntParaFromDB("ifStartFromSteadyResults");
+    ifStaticsFlowField       = GlobalDataBase::GetIntParaFromDB("ifStaticsFlowField");
+    ifStaticsReynoldsStress  = 0;
+    if (GlobalDataBase::IsExist("ifStaticsReynoldsStress", PHINT, 1))
+    {
+        ifStaticsReynoldsStress = GlobalDataBase::GetIntParaFromDB("ifStaticsReynoldsStress");
+    }
+    statisticMethod = 0;
+    if (GlobalDataBase::IsExist("statisticMethod", PHINT, 1))
+    {
+        statisticMethod = GlobalDataBase::GetIntParaFromDB("statisticMethod");
+    }
+
+    CFLStart                  = GlobalDataBase::GetDoubleParaFromDB("CFLStart");
+    CFLEnd                    = GlobalDataBase::GetDoubleParaFromDB("CFLEnd");
+
+    LUSGSTolerance            = GlobalDataBase::GetDoubleParaFromDB("LUSGSTolerance");
+
+    refMachNumber             = GlobalDataBase::GetDoubleParaFromDB("refMachNumber");
+    refReNumber               = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+    oRefReNumber              = GlobalDataBase::GetDoubleParaFromDB("oreynolds");
+
+    refGama                   = GlobalDataBase::GetDoubleParaFromDB("refGama");
+
+    TorqueRefX                = GlobalDataBase::GetDoubleParaFromDB("TorqueRefX");
+    TorqueRefY                = GlobalDataBase::GetDoubleParaFromDB("TorqueRefY");
+    TorqueRefZ                = GlobalDataBase::GetDoubleParaFromDB("TorqueRefZ");
+
+    refDimensionalPressure    = GlobalDataBase::GetDoubleParaFromDB("refDimensionalPressure");
+    refDimensionalDensity     = GlobalDataBase::GetDoubleParaFromDB("refDimensionalDensity");
+    refDimensionalVelocity    = GlobalDataBase::GetDoubleParaFromDB("refDimensionalVelocity");
+    refDimensionalSonicSpeed  = GlobalDataBase::GetDoubleParaFromDB("refDimensionalSonicSpeed");
+    refDimensionalTemperature = GlobalDataBase::GetDoubleParaFromDB("refDimensionalTemperature");
+
+    GlobalDataBase::GetData("lowerPlotFieldBox", &lowerPlotFieldBox, PHDOUBLE, 3);
+    GlobalDataBase::GetData("upperPlotFieldBox", &upperPlotFieldBox, PHDOUBLE, 3);
+
+    isOverset = GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+    isWennScheme = GlobalDataBase::GetIntParaFromDB("isWennScheme");
+
+    pMax = 0.5, pMin = 0.2, deltaMax = 0.5, magnifyFactor = 2.0;
+    if (GlobalDataBase::IsExist("pMaxForCFL", PHDOUBLE, 1))
+    {
+        pMax = GlobalDataBase::GetDoubleParaFromDB("pMaxForCFL");
+    }
+    if (GlobalDataBase::IsExist("pMinForCFL", PHDOUBLE, 1))
+    {
+        pMin = GlobalDataBase::GetDoubleParaFromDB("pMinForCFL");
+    }
+    if (GlobalDataBase::IsExist("deltaMaxForCFL", PHDOUBLE, 1))
+    {
+        deltaMax = GlobalDataBase::GetDoubleParaFromDB("deltaMaxForCFL");
+    }
+    if (GlobalDataBase::IsExist("magnifyFactorForCFL", PHDOUBLE, 1))
+    {
+        magnifyFactor = GlobalDataBase::GetDoubleParaFromDB("magnifyFactorForCFL");
+    }
+    reduceFactor = 1.0 / magnifyFactor;
+    if (GlobalDataBase::IsExist("reduceFactorForCFL", PHDOUBLE, 1))
+    {
+        reduceFactor = GlobalDataBase::GetDoubleParaFromDB("reduceFactorForCFL"); //reduceFactorForCFL
+    }
+    fineCFL = 0.5;
+    if (GlobalDataBase::IsExist("fineCFL", PHDOUBLE, 1))
+    {
+        fineCFL = GlobalDataBase::GetDoubleParaFromDB("fineCFL"); //fineCFL
+    }
+
+    AusmpwPlusLimiter = 1.0;
+    if (GlobalDataBase::IsExist("AusmpwPlusLimiter", PHDOUBLE, 1))
+    {
+        AusmpwPlusLimiter = GlobalDataBase::GetDoubleParaFromDB("AusmpwPlusLimiter"); //reduceFactorForCFL
+    }
+
+    skewnessAngle = GlobalDataBase::GetDoubleParaFromDB("skewnessAngle");
+
+    nDiagonalModifiedTurb = 0;
+
+    trTemperatureMinNonDim = 10.0 ;
+    if (GlobalDataBase::IsExist("trTemperatureMin", PHDOUBLE, 1))
+    {
+        trTemperatureMinNonDim = GlobalDataBase::GetDoubleParaFromDB("trTemperatureMin") ;
+    }
+    trTemperatureMinNonDim /= refDimensionalTemperature;
+
+//////////////////////////////////////////////////////////////////////
+    nNumberOfSpeedStep = 0;
+    if (GlobalDataBase::IsExist("nNumberOfSpeedStep", PHINT, 1))
+    {
+        nNumberOfSpeedStep = GlobalDataBase::GetIntParaFromDB("nNumberOfSpeedStep");
+    }
+    if (nNumberOfSpeedStep > 0)
+    {
+        speedVaryStep = new int[nNumberOfSpeedStep];
+        speedVaryCoef = new RDouble[nNumberOfSpeedStep];
+
+        if (GlobalDataBase::IsExist("speedVaryStep", PHINT, nNumberOfSpeedStep))
+        {
+            GlobalDataBase::GetData("speedVaryStep", &speedVaryStep[0], PHINT, nNumberOfSpeedStep);
+        }
+        else
+        {
+            nNumberOfSpeedStep = 0;
+        }
+
+        if (GlobalDataBase::IsExist("speedVaryCoef", PHDOUBLE, nNumberOfSpeedStep))
+        {
+            GlobalDataBase::GetData("speedVaryCoef", &speedVaryCoef[0], PHDOUBLE, nNumberOfSpeedStep);
+        }
+        else
+        {
+            nNumberOfSpeedStep = 0;
+        }
+    }
+
+//////////////////////////////////////////////////////////////////////
+    nNumberOfCFLStep = 0;
+    if (GlobalDataBase::IsExist("nNumberOfCFLStep", PHINT, 1))
+    {
+        nNumberOfCFLStep = GlobalDataBase::GetIntParaFromDB("nNumberOfCFLStep");
+    }
+
+    if (nNumberOfCFLStep > 0)
+    {
+        CFLVaryMultiStep = new int[nNumberOfCFLStep];
+        CFLVaryCoef = new RDouble[nNumberOfCFLStep];
+
+        if (GlobalDataBase::IsExist("CFLVaryMultiStep", PHINT, nNumberOfCFLStep))
+        {
+            GlobalDataBase::GetData("CFLVaryMultiStep", &CFLVaryMultiStep[0], PHINT, nNumberOfCFLStep);
+        }
+        else
+        {
+            nNumberOfCFLStep = 0;
+        }
+
+        if (GlobalDataBase::IsExist("CFLVaryCoef", PHDOUBLE, nNumberOfCFLStep))
+        {
+            GlobalDataBase::GetData("CFLVaryCoef", &CFLVaryCoef[0], PHDOUBLE, nNumberOfCFLStep);
+        }
+        else
+        {
+            nNumberOfCFLStep = 0;
+        }
+    }
+}
+
+}
\ No newline at end of file
diff --git a/CFD/SpecDiffHybSolver/include/CompactDifferenceFirstDerivative.h b/CFD/SpecDiffHybSolver/include/CompactDifferenceFirstDerivative.h
new file mode 100644
index 0000000..b1c92d2
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/CompactDifferenceFirstDerivative.h
@@ -0,0 +1,67 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +  
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      CompactDiffData.h
+//! @brief     Compact difference data for SpecDiffHybSolver.
+//! @author    ZhangZipei.
+
+#pragma once
+#include "TypeDefine.h"
+#include "SpecDiffHybGrid.h"
+#include "ExplicitDifferenceBoundary.h"
+#include "Complex.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+	class CompactDifferenceFirstDerivative
+	{
+	public:
+		CompactDifferenceFirstDerivative();
+		~CompactDifferenceFirstDerivative();
+
+	private:   
+		int nBoundary_Neumann;
+		int minofLHSMatrixBound, maxofLHSMatrixBound, minofRHSMatrixBound, maxofRHSMatrixBound;
+		Int1D *lowerBoundofLHSCoefMatrix, *upperBoundofLHSCoefMatrix, *lowerBoundofRHSCoefMatrix, *upperBoundofRHSCoefMatrix;
+		RDouble2D *lHSCoefMatrix, *rHSCoefMatrix;
+		RDouble1D *boundary_Neumann_0, *boundary_Neumann_N;
+
+	public:
+        void InitCompactDifferenceFirstDerivativeData(SpecDiffHybGrid *GridData, ExplicitDifferenceBoundary *DiffBoundaryData);
+        void GetDetaDz( SpecDiffHybGrid * );
+        void GetDvarDz( SpecDiffHybGrid *, Complex3D *, Complex3D *, Complex1D *, Complex1D *, Complex1D *, RDouble1D *);
+        void GetDvarDz( const int, const int, RDouble *, RDouble *, RDouble *, RDouble *, RDouble * );
+        void GetDvarDz( const int, const int, RDouble *, PHComplex *, PHComplex *, PHComplex *, RDouble * );
+        void GetGradientVector( PHComplex *, PHComplex *, PHComplex *, PHComplex *, Complex1D *, Complex1D *, Complex1D *, RDouble1D *, SpecDiffHybGrid * );
+        void GetDivergence( PHComplex *, PHComplex *, PHComplex *, Complex3D *, Complex1D *, Complex1D *, Complex3D *, Complex1D *, RDouble1D *, SpecDiffHybGrid * );
+
+	private:	
+		void SetCompactDiffData_CarpenterC6(const int, const int);
+		void SetCompactDiffData_optC4(const int, const int);
+		void SetCompactDiffData_optC4_InnerOnly(const int, const int, ExplicitDifferenceBoundary *);
+		void AllocCompactDiffData(const int, const int);
+		void GetFirstDerivative(const int, const int, const int, RDouble1D *, RDouble1D *, Int1D *, Int1D *, RDouble2D *, RDouble2D *, RDouble1D *,
+			                           RDouble1D *);
+		void GetFirstDerivative(const int, const int, const int, Complex1D *, Complex1D *, Int1D *, Int1D *, RDouble2D *, RDouble2D *, Complex1D *,
+			                           RDouble1D *);
+		static void Tridiag_scalar(const int, RDouble *, RDouble *, RDouble *, RDouble*, RDouble *, RDouble *);
+        static void Tridiag_scalar(const int, RDouble *, RDouble *, RDouble *, PHComplex*, PHComplex *, RDouble *);
+
+	};
+
+
+}
+
+
+
diff --git a/CFD/SpecDiffHybSolver/include/CompactDifferenceSecondDerivative.h b/CFD/SpecDiffHybSolver/include/CompactDifferenceSecondDerivative.h
new file mode 100644
index 0000000..d746ad0
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/CompactDifferenceSecondDerivative.h
@@ -0,0 +1,59 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +  
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      CompacDiff2ndNonUnifInnerData.h
+//! @brief     Compact difference scheme for approximation of second derivatives on non-uniform meshes for SpecDiffHybSolver.
+//! @author    ZhangZipei.
+
+#pragma once
+#include "TypeDefine.h"
+#include "SpecDiffHybGrid.h" 
+using namespace std;
+
+namespace PHSPACE
+{
+
+	class CompactDifferenceSecondDerivative 
+	{
+	public:
+		CompactDifferenceSecondDerivative();
+		~CompactDifferenceSecondDerivative();
+
+	public:
+		RDouble2D *lHSCoefMatrix, *rHSCoefMatrix, *coefd2L, *coefd2R, *coefLUDecp;
+        RDouble1D *coefOfLHSBoundary0, *coefOfLHSBoundaryN, *coefOfRHSBoundary0, *coefOfRHSBoundaryN;
+		Int1D *lowerBoundofLHSCoefMatrix, *upperBoundofLHSCoefMatrix, *lowerBoundofRHSCoefMatrix, *upperBoundofRHSCoefMatrix;
+
+	private:   
+
+//		double **fiveDiagonalMatrixLUDecp;
+//		double *leftBoundofLHSCoefMatrix, *rightBoundofLHSCoefMatrix, *leftBoundoRHSCoefMatrix, *rightBoundofRHSCoefMatrix;
+
+	public:
+		void InitCompactDifferenceSecondDerivativeData( SpecDiffHybGrid *GridData );
+        void GetLaplacian(SpecDiffHybGrid *GridData, Complex3D *cVar, Complex3D *cLaplacianVar, Complex1D *c1tmp, Complex1D *c2tmp, Complex3D *cd2Var);
+        void GetD2varDz2(SpecDiffHybGrid *GridData, Complex3D *cVar, Complex3D *cdVardx_2rd, Complex1D *cV, Complex1D *cd2Vardz);
+        void GetSecondDerivative(SpecDiffHybGrid *GridData, Complex1D *cVar, Complex1D *cd2Vardz);
+
+	private:
+        void AllocCompactDifferenceSecondDerivativeData(SpecDiffHybGrid *);
+        void SetCompactDifferenceSecondDerivativeData(SpecDiffHybGrid *);
+		void GetCoefMatrix( const int mz, RDouble * ben , RDouble * aln , RDouble * aaa , RDouble * alp , RDouble * bep ,
+		                                                                 RDouble * an2 , RDouble * an1 , RDouble * a00 , RDouble * ap1 , RDouble * ap2 , RDouble * x );
+        void Gaussj(RDouble *, const int, const int, RDouble *, const int, const int);
+
+	};
+
+
+}
+
+
+
diff --git a/CFD/SpecDiffHybSolver/include/Complex.h b/CFD/SpecDiffHybSolver/include/Complex.h
new file mode 100644
index 0000000..dfbbe46
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/Complex.h
@@ -0,0 +1,39 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +  
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Complex.h
+//! @brief     Complex array.
+//! @author    Zhang Zipei.
+
+#pragma once
+#include "Precision.h"
+#include "DataStruct_Array.h"
+#include "DataStruct_AdtTree.h"
+#include <string>
+#include <vector>
+#include <map>
+#include <numeric> 
+#include <complex> 
+
+using namespace std;
+
+namespace PHSPACE
+{
+	typedef complex<double> PHComplex;
+
+	typedef PHArray<complex<double>, 1> Complex1D;
+	typedef PHArray<complex<double>, 2> Complex2D;
+	typedef PHArray<complex<double>, 3> Complex3D;
+	typedef PHArray<complex<double>, 4> Complex4D;
+	typedef PHArray<complex<double>, 5> Complex5D;
+	typedef PHArray<complex<double>, 6> Complex6D;
+}
+
diff --git a/CFD/SpecDiffHybSolver/include/CorrectWallDivergence.h b/CFD/SpecDiffHybSolver/include/CorrectWallDivergence.h
new file mode 100644
index 0000000..6b23957
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/CorrectWallDivergence.h
@@ -0,0 +1,57 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +  
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      CorrectWallDivergence.h
+//! @brief     Ensure divergence on wall equals zero for SpecDiffHybSolver.
+//! @author    ZhangZipei.
+
+#pragma once
+
+#include "Complex.h"
+#include "SpecDiffHybGrid.h"
+#include "CompactDifferenceFirstDerivative.h"
+#include "CompactDifferenceSecondDerivative.h"
+#include "PoissonSolver.h"
+#include "SpecDiffHybSolver.h"
+#include "Param_SpecDiffHybSolver.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+class CorrectWallDivergence
+{
+public:
+    CorrectWallDivergence();
+    ~CorrectWallDivergence();
+
+public:
+    void InitCorrectWallDivergenceData( SpecDiffHybGrid *, CompactDifferenceFirstDerivative *, CompactDifferenceSecondDerivative *, PoissonSolver *, RDouble1D * );
+
+    void rotProjection();
+
+private:   
+
+public:
+    Complex3D *complexDeltaU1, *complexDeltaV1, *complexDeltaW1, *complexDeltaP1;
+    Complex3D *complexDeltaU2, *complexDeltaV2, *complexDeltaW2, *complexDeltaP2;
+    Complex2D *complexDivDeltaU1LowerBound, *complexDivDeltaU1UpperBound, *complexDivDeltaU2LowerBound, *complexDivDeltaU2UpperBound;
+
+private:
+    void SetCorrectWallDivergenceData( SpecDiffHybGrid *, CompactDifferenceFirstDerivative *, CompactDifferenceSecondDerivative *, PoissonSolver *, RDouble1D * );
+    void AllocCorrectWallDivergenceData( SpecDiffHybGrid * );
+};
+
+}
+
+
+
diff --git a/CFD/SpecDiffHybSolver/include/ExplicitDifferenceBoundary.h b/CFD/SpecDiffHybSolver/include/ExplicitDifferenceBoundary.h
new file mode 100644
index 0000000..26af837
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/ExplicitDifferenceBoundary.h
@@ -0,0 +1,43 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +  
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      ExplicitDifferenceBoundary.h
+//! @brief     Explicit difference bondary condition data for SpecDiffHybSolver.
+//! @author    ZhangZipei.
+
+#pragma once
+#include "TypeDefine.h"
+using namespace std;
+
+namespace PHSPACE
+{
+
+	class ExplicitDifferenceBoundary 
+	{
+	public:
+		ExplicitDifferenceBoundary();
+		~ExplicitDifferenceBoundary();
+
+	public:
+		int nBoundary_Neumann;
+		RDouble1D *boundary_Neumann_0, *boundary_Neumann_N;
+
+	private:   		
+//		double rb0, rb1, rb2, rb3, rb4;
+		
+	public:
+		void GetSchemeCoefDiffBoundaryData();
+	};
+
+}
+
+
+
diff --git a/CFD/SpecDiffHybSolver/include/LES.h b/CFD/SpecDiffHybSolver/include/LES.h
new file mode 100644
index 0000000..a45199b
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/LES.h
@@ -0,0 +1,106 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +  
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      LES.h
+//! @brief     LES Solver.
+//! @author    ZhangZipei.
+
+#pragma once
+#include "TypeDefine.h"
+#include "Complex.h"
+#include "SpecDiffHybGrid.h"
+//#include "SpecGrid.h"
+#include "CompactDifferenceFirstDerivative.h"
+//#include "Param_SpecSolver.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+class LESHIT
+{
+public:
+    LESHIT();
+    ~LESHIT();
+
+public:
+    Complex4D *complexDiffTau;
+
+protected:
+    RDouble1D *gkx, *gky, *gkz;
+    Complex4D *complexVarFilter, *testFilterGradUij, *complexTauij;
+    RDouble4D *realVarFilter, *realTauij;
+
+private:
+    RDouble delta,dynamicCoef;
+
+public:
+    void InitLESData(SpecGrid *GridData);
+
+protected:
+    void ComputeFilterFunction(const RDouble, RDouble, RDouble &);
+
+private:
+    void AllocLESData(SpecGrid *GridData);
+
+    void GetDelta(SpecGrid *GridData);
+
+    void SetTestFilter(SpecGrid *GridData);  
+};
+
+class LES : public LESHIT
+{
+public:
+    LES();
+    ~LES();
+
+private:
+    RDouble1D *delta;
+    RDouble1D *wallDistance, *wallDistancePlus;
+    RDouble1D *vanDriestFunc;
+    RDouble1D *dynamicCoef;
+
+public:
+    void InitLESData(SpecDiffHybGrid *GridData);
+
+    void Smagorinsky(SpecDiffHybGrid *, RDouble1D *, RDouble4D *);
+
+    void DynamicSmagorinsky(SpecDiffHybGrid *, CompactDifferenceFirstDerivative *, RDouble1D *, RDouble3D *, RDouble4D *, Complex3D *, Complex3D *, Complex3D *);
+
+    void Sigma(SpecDiffHybGrid *, RDouble1D *, RDouble4D *);
+
+    //LIB_EXPORT Param_SpecSolver * GetControlParameters() const;
+
+    //LIB_EXPORT void InitControlParameters();
+
+private:
+    void AllocLESData(SpecDiffHybGrid *);
+
+    void GetWallDistance(SpecDiffHybGrid *);
+
+    void GetDelta(SpecDiffHybGrid *);
+
+    void SetTestFilter(SpecDiffHybGrid *);  
+
+    void FilterXYInSpectralSpace(PHComplex *, const int, SpecDiffHybGrid *);
+
+    void GetDiffTau(SpecDiffHybGrid *, CompactDifferenceFirstDerivative *);
+
+    void ComputeDifferentialSigma(RDouble ** velocityGradTensor, RDouble &differentialSigma);
+
+    //void ComputeFilterFunction(const RDouble, RDouble, RDouble &);
+
+};
+
+}
+
+
+
diff --git a/CFD/SpecDiffHybSolver/include/Param_SpecDiffHybSolver.h b/CFD/SpecDiffHybSolver/include/Param_SpecDiffHybSolver.h
new file mode 100644
index 0000000..3088445
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/Param_SpecDiffHybSolver.h
@@ -0,0 +1,40 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Param_SpecDiffHybSolver.h
+//! @brief     Record paramters of SpecDiffHybSolver.
+//! @author    zipzhang.
+#pragma once
+#include "LIB_Macro.h"
+#include "Param_SpecSolver.h"
+
+namespace PHSPACE
+{
+
+class Param_SpecDiffHybSolver : public Param_SpecSolver
+{
+public:
+    LIB_EXPORT Param_SpecDiffHybSolver();
+
+    LIB_EXPORT ~Param_SpecDiffHybSolver();
+
+public:
+    //! Init all parameters.
+    LIB_EXPORT void Init();
+
+    RDouble GetPressureGradient() const;
+
+private:
+    RDouble pressureGradient;
+};
+
+#include "Param_SpecDiffHybSolver.hxx"
+}
\ No newline at end of file
diff --git a/CFD/SpecDiffHybSolver/include/Param_SpecDiffHybSolver.hxx b/CFD/SpecDiffHybSolver/include/Param_SpecDiffHybSolver.hxx
new file mode 100644
index 0000000..4074af3
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/Param_SpecDiffHybSolver.hxx
@@ -0,0 +1,4 @@
+inline RDouble Param_SpecDiffHybSolver::GetPressureGradient() const
+{
+    return pressureGradient;
+}
\ No newline at end of file
diff --git a/CFD/SpecDiffHybSolver/include/Param_SpecSolver.h b/CFD/SpecDiffHybSolver/include/Param_SpecSolver.h
new file mode 100644
index 0000000..0182ffe
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/Param_SpecSolver.h
@@ -0,0 +1,97 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Param_SpecSolver.h
+//! @brief     Record paramters of SpecSolver.
+//! @author    zipzhang.
+#pragma once
+#include "LIB_Macro.h"
+#include "Precision.h"
+
+namespace PHSPACE
+{
+
+class Param_SpecSolver
+{
+public:
+    LIB_EXPORT Param_SpecSolver();
+
+    LIB_EXPORT virtual ~Param_SpecSolver();
+
+public:
+    //! Init all parameters.
+    LIB_EXPORT virtual void Init();
+
+    int GetStatisticMethod() const;
+
+    int GetStartStatisticStep() const;
+
+    int GetMaxSimuStep() const;
+
+    int GetIntervalStepRes() const;
+
+    int GetIntervalStepStatistic() const;
+
+    int GetIntervalStepFlow() const;
+
+    RDouble GetRefReNumber() const;
+
+    const string & GetViscousName() const;
+
+    int GetViscousType() const;
+
+    const string & GetFilterName() const;
+
+    RDouble GetSmagConstant() const;
+
+    RDouble GetTestFilterScale() const;
+
+    RDouble GetTimeStep() const;
+
+    //RDouble GetPressureGradient() const;
+
+    int GetSpectrumType() const;
+
+protected:
+    int statisticMethod;
+
+    int startStatisticStep;
+
+    int maxSimuStep;
+
+    int intervalStepRes;
+
+    int intervalStepStatistic;
+
+    int intervalStepFlow;
+
+    RDouble refReNumber;
+
+    string viscousName;
+
+    int viscousType;
+
+    string filterName;
+
+    RDouble smagConstant;
+
+    RDouble testFilterScale;
+
+    RDouble timeStep;
+
+    //RDouble pressureGradient;
+
+private:
+    int spectrumType;
+};
+
+#include "Param_SpecSolver.hxx"
+}
\ No newline at end of file
diff --git a/CFD/SpecDiffHybSolver/include/Param_SpecSolver.hxx b/CFD/SpecDiffHybSolver/include/Param_SpecSolver.hxx
new file mode 100644
index 0000000..07afec6
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/Param_SpecSolver.hxx
@@ -0,0 +1,76 @@
+inline int Param_SpecSolver::GetStatisticMethod() const
+{
+    return statisticMethod;
+}
+
+inline int Param_SpecSolver::GetStartStatisticStep() const
+{
+    return statisticMethod;
+}
+
+inline int Param_SpecSolver::GetMaxSimuStep() const
+{
+    return maxSimuStep;
+}
+
+inline int Param_SpecSolver::GetIntervalStepRes() const
+{
+    return intervalStepRes;
+}
+
+inline int Param_SpecSolver::GetIntervalStepStatistic() const
+{
+    return intervalStepStatistic;
+}
+
+inline int Param_SpecSolver::GetIntervalStepFlow() const
+{
+    return intervalStepFlow;
+}
+
+inline RDouble Param_SpecSolver::GetRefReNumber() const
+{
+    return refReNumber;
+}
+
+inline const std::string & Param_SpecSolver::GetViscousName() const
+{
+	return viscousName;
+}
+
+inline int Param_SpecSolver::GetViscousType() const
+{
+	return viscousType;
+}
+
+inline const std::string & Param_SpecSolver::GetFilterName() const
+{
+	return filterName;
+}
+
+inline RDouble Param_SpecSolver::GetSmagConstant() const
+{
+    return smagConstant;
+}
+
+inline RDouble Param_SpecSolver::GetTestFilterScale() const
+{
+    return testFilterScale;
+}
+
+inline RDouble Param_SpecSolver::GetTimeStep() const
+{
+    return timeStep;
+}
+
+/*
+inline RDouble Param_SpecSolver::GetPressureGradient() const
+{
+    return pressureGradient;
+}
+*/
+
+inline int Param_SpecSolver::GetSpectrumType() const
+{
+    return spectrumType;
+}
\ No newline at end of file
diff --git a/CFD/SpecDiffHybSolver/include/PoissonSolver.h b/CFD/SpecDiffHybSolver/include/PoissonSolver.h
new file mode 100644
index 0000000..1f8e0a1
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/PoissonSolver.h
@@ -0,0 +1,74 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +  
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      PoissonSolver.h
+//! @brief     Poisson solver for SpecDiffHybSolver.
+//! @author    ZhangZipei.
+
+#pragma once
+#include "SpecDiffHybGrid.h"
+#include "ExplicitDifferenceBoundary.h"
+#include "CompactDifferenceSecondDerivative.h"
+#include "Complex.h"
+//#include "SpecDiffHybSolver.h"
+#include "Param_SpecDiffHybSolver.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+class PoissonSolver
+{
+public:
+    PoissonSolver();
+    ~PoissonSolver();
+
+public:
+    RDouble4D *coefMatrixVelocityDirichlet, *coefMatrixPressureNeumann, *boundaryMatrixPressureNeumann;
+
+public:
+    void InitPoissonSolverData(SpecDiffHybGrid *, ExplicitDifferenceBoundary *, CompactDifferenceSecondDerivative*, RDouble1D *, RDouble1D *);
+    
+    void PoissonSolverNeumannBC( const int, RDouble *, PHComplex *, int *, int *, const int, const PHComplex, const PHComplex, PHComplex *, RDouble *, RDouble * );
+    
+    static void PoissonSolverDirichletBC( const int , RDouble *, RDouble *, PHComplex *, const RDouble, int *, int *, const PHComplex, const PHComplex, RDouble *, PHComplex * );
+    
+    static void PoissonSolverVelocity( const int, RDouble *, PHComplex *, int *, int *, const PHComplex, const PHComplex, RDouble *, RDouble *, PHComplex * );
+
+    static void PoissonSolverVelocity(PHComplex &uLocal, const RDouble timeStep, const RDouble k2, const RDouble phi);
+    
+    static void LUDecomposeNeumannBC( int, RDouble *, int, RDouble * );
+    
+    static void LUDecompose( const int, RDouble * );
+    
+    static void LUSolve( const int, RDouble *, RDouble * );
+    
+    static void LUSolve( const int, RDouble *, PHComplex * );
+    
+    static void LUSolveNeumannBC( const int, RDouble *, const int, RDouble *, PHComplex * );
+    
+    void GetCoefMatrixVelocityDirichlet( SpecDiffHybGrid *, ExplicitDifferenceBoundary *, CompactDifferenceSecondDerivative *, RDouble1D *, RDouble1D *);
+
+private:
+    void AllocPoissonSolverData(SpecDiffHybGrid *, ExplicitDifferenceBoundary *);
+    
+    void GetCoefMatrixPressureNeumann( SpecDiffHybGrid *, ExplicitDifferenceBoundary *, CompactDifferenceSecondDerivative *);
+    
+    void DecomCoefMatrixPressureNeumannBC( const int, RDouble *, RDouble *, const double, int *, int *, const int, RDouble *, RDouble *, RDouble *, RDouble * );
+    
+    void DecomCoefMatrixVelocityDirichletBC( const int, RDouble *, RDouble *, const double, int *, int *, const double, RDouble *, RDouble * );
+};
+
+}
+
+
+
diff --git a/CFD/SpecDiffHybSolver/include/RescaleField.h b/CFD/SpecDiffHybSolver/include/RescaleField.h
new file mode 100644
index 0000000..11f9109
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/RescaleField.h
@@ -0,0 +1,88 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +  
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      RescaleField.h
+//! @brief     Rescale velocity every time step if necessary.
+//! @author    ZhangZipei.
+
+#pragma once
+#include "TypeDefine.h"
+#include "SpecGrid.h"
+#include "SpecDiffHybGrid.h"
+//#include "Param_SpecSolver.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+class RescaleFieldHIT
+{
+public:
+    RescaleFieldHIT();
+    ~RescaleFieldHIT();
+
+public:
+    void InitRescaleData();
+
+private:
+    void AllocRescaleData();
+
+private:
+    RDouble uFluctuation, vFluctuation, wFluctuation;
+    RDouble1D *rescaleStatistic, *rescaleStatisticLocal;
+};
+
+class RescaleField
+{
+public:
+    RescaleField();
+    ~RescaleField();
+
+private: 
+    RDouble uavgDivideByUtau;
+    RDouble1D *uAverage;
+    RDouble1D *uAverageOfReference, *uFluctuationOfReference, *vFluctuationOfReference, *wFluctuationOfReference;
+    RDouble1D *uFluctuation, *vFluctuation, *wFluctuation;
+    RDouble2D *rescaleStatistic, *rescaleStatisticLocal;
+
+public:
+    void InitRescaleData(SpecDiffHybGrid *GridData);
+
+    void GetUVWMagnitude(SpecDiffHybGrid *, Complex3D *, Complex3D *, Complex3D *);
+    
+    void RescaleUAverage(SpecDiffHybGrid *, Complex3D *);
+    
+    void RescaleFluctuation(SpecDiffHybGrid *, Complex3D *, Complex3D *, Complex3D *);
+    
+    void FixUAverage(SpecDiffHybGrid *, Complex3D *);
+
+    //LIB_EXPORT Param_SpecSolver * GetControlParameters() const;
+
+    //LIB_EXPORT void InitControlParameters();
+
+private:
+    void AllocRescaleData(SpecDiffHybGrid *GridData);
+
+    void SetUavg();
+
+    void GetUVWMagnitudeOfReference(SpecDiffHybGrid *);
+
+    void InputUVWMagnitudeOfReference( SpecDiffHybGrid * );
+
+    void GetUVWLocal(SpecDiffHybGrid *, Complex3D *, Complex3D *, Complex3D *);
+
+    void Interpolation( RDouble *, RDouble *, int, RDouble *, RDouble *, int );
+};
+
+}
+
+
+
diff --git a/CFD/SpecDiffHybSolver/include/SpecDiffHybFieldView.h b/CFD/SpecDiffHybSolver/include/SpecDiffHybFieldView.h
new file mode 100644
index 0000000..4eec3ad
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/SpecDiffHybFieldView.h
@@ -0,0 +1,54 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +  
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      SpecDiffHybFieldView.h
+//! @brief     Field view of Spectral-Difference hybrid method.
+//! @author    Zhang Zipei.
+
+#pragma once
+
+#include "TypeDefine.h"
+#include "Complex.h"
+using namespace std;
+
+namespace PHSPACE
+{
+	class SpecDiffHybFieldView 
+	{
+	public:
+		SpecDiffHybFieldView();
+		~SpecDiffHybFieldView();
+
+	private:
+		Complex3D *complexU, *complexV, *complexW, *complexP;
+        RDouble3D *realU, *realV, *realW, *realP;
+        Complex2D *complexIn;
+        RDouble2D *realOut;
+        RDouble1D *realX, *realY, *realZ;
+        Int2D *fourierStartIndex, *fourierEndIndex;
+        int nTProcessor;
+        int nx, ny, nz;
+
+	public:
+		void Run();
+
+	private:
+		void Init();
+        void AllocFieldData();
+        void InputGridDistribute();
+        void InputVelocity();
+        void InputPressure();
+        void FieldView();
+        void OutputGrid();
+        void OutputField();
+	};
+
+}
\ No newline at end of file
diff --git a/CFD/SpecDiffHybSolver/include/SpecDiffHybGrid.h b/CFD/SpecDiffHybSolver/include/SpecDiffHybGrid.h
new file mode 100644
index 0000000..5c6f526
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/SpecDiffHybGrid.h
@@ -0,0 +1,98 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +  
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      SpecDiffHybGrid.h
+//! @brief     Grid data for SpecDiffHybSolver.
+//! @author    ZhangZipei.
+
+#pragma once
+#include "TypeDefine.h"
+#include "Complex.h"
+#include "SpecGrid.h"
+//#include "Param_SpecDiffHybSolver.h"
+using namespace std;
+
+namespace PHSPACE
+{
+/*
+class SpecDiffHybGrid : public SpecGrid
+{
+public:
+    SpecDiffHybGrid();
+    ~SpecDiffHybGrid();
+
+private:   
+    int nyquistX, nyquistY;		
+    Int1D *physicalStartIndex, *physicalEndIndex, *physicalIndexSize;
+    //		Int1D *fourierStartIndexGlobal, *fourierEndIndexGlobal;
+    Int1D *dimensionOfP3DFFT;		
+    string gridFileName, zgridFileName;
+    int procIDWithKx0Ky0;
+
+public:
+    int nX, nY, nZ, nX2, nY2, nZ2, nXYAll, nXYZFourier, nXYZPhysical;
+    int iStartFourierIndex , jStartFourierIndex , kStartFourierIndex , iEndFourierIndex , jEndFourierIndex , kEndFourierIndex ;
+    int iStartPhysicalIndex, jStartPhysicalIndex, kStartPhysicalIndex, iEndPhysicalIndex, jEndPhysicalIndex, kEndPhysicalIndex;
+    //int x0Fall, y0Fall, z0Fall, xNFall, yNFall, zNFall;
+    int iStartFourierIndexGlobal, jStartFourierIndexGlobal, kStartFourierIndexGlobal, iEndFourierIndexGlobal, jEndFourierIndexGlobal, kEndFourierIndexGlobal;
+    double realKNyquistX, realKNyquistY;
+
+    Int1D *fourierStartIndex, *fourierEndIndex, *fourierIndexSize;
+    Int2D *startAndEndFourierIndexOfAll, *startAndEndPhysicalIndexOfAll;
+    //		int **startAndEndAll, **startAndEndPhysical;
+    //				Int1D * physicalStart, ;
+    RDouble1D *realKX, *realKY;
+    Complex1D *complexKX, *complexKY;
+    RDouble1D *realZ, *realDetaDz;
+
+private:
+    void InitGridFileName();
+
+public:
+
+    void InitGridData();
+    void InitGridSize();
+    void AllocGridData();
+    void GetGrid();
+    void SetZGrid();
+    void Getiz_p2();
+    void InitWavenumber();
+    //		void GetDetaDz(CompactDifferenceFirstDerivative *CompactDifferenceFirstDerivativeData);
+    void InitP3DFFT();
+
+    int GetProcIDWithKx0Ky0();
+
+};
+*/
+
+class SpecDiffHybGrid : public SpecGrid
+{
+public:
+    SpecDiffHybGrid();
+    ~SpecDiffHybGrid();
+
+    void InitGridData();
+
+private:
+    void ReadGrid();
+
+    void SetZGrid();
+
+    void InitGridFileName();
+
+    void InitP3DFFT();
+
+    void AllocGridData();
+
+    void InitWavenumber();
+};
+
+}
diff --git a/CFD/SpecDiffHybSolver/include/SpecDiffHybSolver.h b/CFD/SpecDiffHybSolver/include/SpecDiffHybSolver.h
new file mode 100644
index 0000000..8a2fe50
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/SpecDiffHybSolver.h
@@ -0,0 +1,187 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +  
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      SpecDiffHybSolver.h
+//! @brief     Solver of Spectral-Difference hybrid method.
+//! @author    Zhang Zipei.
+
+#pragma once
+
+#include "TypeDefine.h"
+#include "LIB_Macro.h"
+#include "Complex.h"
+#include "ActionKey.h"
+#include "SpecSolver.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+class Param_SpecDiffHybSolver;
+
+class SpecDiffHybSolver : public SpecSolver
+{
+public:
+    SpecDiffHybSolver();
+    ~SpecDiffHybSolver();
+
+private:
+
+    RDouble1D *realnut, *realnut_00;
+
+    string screenOutFile;
+
+public:
+    void Run();
+
+    void CreateH5VelocityRestartFile(ActionKey *actkey);
+
+    void DumpVelocityRestartH5(ActionKey *actkey);
+
+    void ReadVelocityRestartH5(ActionKey *actkey);
+
+    LIB_EXPORT Param_SpecDiffHybSolver * GetControlParameters() const;
+
+    LIB_EXPORT void InitControlParameters();
+
+private:
+    void Init();
+
+    void InitGridData();
+
+    void InitTimeDependentData();
+
+    void InitBoundaryData();
+
+    void InitCompactDifferenceFirstDerivativeData();
+
+    void InitCompactDifferenceSecondDerivativeData();
+
+    void AllocTimeDependentData();
+
+    void InitGlobal();
+
+    void InitRescaleData();
+
+    void InitPoissonSolverData();
+
+    void InitCorrectWallDivergenceData();
+
+    void ReadConvectiveTerm();
+
+    void ReadTimeDependentInformation();
+
+    void InitStatisticsData();
+
+    void InitLESData();
+
+    void GetRHS();
+
+    void Solve();
+
+    void RescaleVelocityField(const int);
+
+    void GetVelocityGradient();
+
+    void GetNonlinearTerm();
+
+    void GetViscousTerm();
+
+    void AllocFieldData();
+
+    void GetInitField();
+
+    void InitProfile();
+
+    void InitFromOldField();
+
+    void OutputFieldRestartFile();
+
+    void GetAssumedSpectrum( const double, const double, double & );
+
+    void GetAssumedSpectrumNearWall( const double, const double, double & );
+
+    void ReadinVelocityRestartFile();
+
+    void ReadinPressureRestartFile();
+
+    void WriteVelocityRestartFile(const string);
+
+    void WriteVelocityRestartFile_HDF5(const string);
+
+    void ReadVelocityRestartFile_HDF5(const string);
+
+    void WritePressureRestartFile(const string);
+
+    void VanishingDIVproj();
+
+    void GetStatistics();
+
+    void PrepareFormatedResidual(string &formatRes);
+
+    void DumpRes(ActionKey *actkey);
+
+    void OutputRestartData();
+
+    void OutputStatisticVisual();
+
+    void OutputOldTimeData();
+
+    void WriteConvectiveTerm(const string);
+
+    void WriteTimeDependentInformation();
+
+    void mode00fix();
+
+    SpecDiffHybGrid *GetGrid();
+
+    void SetGrid(SpecDiffHybGrid *GridData);
+
+    RescaleField * GetRescaleFieldData();
+
+    void SetRescaleFieldData(RescaleField *RescaleFieldData);
+
+    LES * GetLESData();
+
+    void SetLESData(LES *LESData);
+
+    Statistics *GetStatisticData();
+
+    void SetStatisticData(Statistics *StatisticData);
+
+    void DeAllocateGlobalVariables();
+
+private:
+    class SpecDiffHybGrid * GridData;
+
+    class ExplicitDifferenceBoundary * DiffBoundaryData;
+
+    class CompactDifferenceFirstDerivative * CompactDifferenceFirstDerivativeData;
+
+    class CompactDifferenceSecondDerivative * CompactDifferenceSecondDerivativeData;
+
+    class PoissonSolver * PoissonSolverData;
+
+    class CorrectWallDivergence * CorrectWallDivergenceData;
+
+    class RescaleField * RescaleFieldData;
+
+    class Statistics *StatisticData;
+
+    class LES *LESData;
+
+protected:
+    Param_SpecDiffHybSolver *controlParameters;
+};
+
+#include "SpecDiffHybSolver.hxx"
+
+}
\ No newline at end of file
diff --git a/CFD/SpecDiffHybSolver/include/SpecDiffHybSolver.hxx b/CFD/SpecDiffHybSolver/include/SpecDiffHybSolver.hxx
new file mode 100644
index 0000000..48d9eab
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/SpecDiffHybSolver.hxx
@@ -0,0 +1,40 @@
+inline SpecDiffHybGrid *SpecDiffHybSolver::GetGrid()
+{
+    return this->GridData;
+}
+
+inline void SpecDiffHybSolver::SetGrid(SpecDiffHybGrid *GridData)
+{ 
+    this->GridData = GridData;
+}
+
+inline RescaleField *SpecDiffHybSolver::GetRescaleFieldData()
+{
+    return this->RescaleFieldData;
+}
+
+inline void SpecDiffHybSolver::SetRescaleFieldData(RescaleField *RescaleFieldData)
+{ 
+    this->RescaleFieldData = RescaleFieldData;
+}
+
+inline Statistics *SpecDiffHybSolver::GetStatisticData()
+{
+    return this->StatisticData;
+}
+
+inline void SpecDiffHybSolver::SetStatisticData(Statistics *StatisticData)
+{
+    this->StatisticData = StatisticData;
+}
+
+inline LES *SpecDiffHybSolver::GetLESData()
+{
+    return this->LESData;
+}
+
+inline void SpecDiffHybSolver::SetLESData(LES *LESData)
+{
+    this->LESData = LESData;
+}
+
diff --git a/CFD/SpecDiffHybSolver/include/SpecGrid.h b/CFD/SpecDiffHybSolver/include/SpecGrid.h
new file mode 100644
index 0000000..6c8f01c
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/SpecGrid.h
@@ -0,0 +1,69 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +  
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      SpecGrid.h
+//! @brief     Grid data for SpecSolver.
+//! @author    ZhangZipei.
+
+#pragma once
+#include "TypeDefine.h"
+#include "Complex.h"
+using namespace std;
+
+namespace PHSPACE
+{
+class SpecGrid
+{
+public:
+    SpecGrid();
+    ~SpecGrid();
+protected:   
+    int nyquistX, nyquistY, nyquistZ;		
+    Int1D *physicalStartIndex, *physicalEndIndex, *physicalIndexSize;
+    //		Int1D *fourierStartIndexGlobal, *fourierEndIndexGlobal;
+    Int1D *dimensionOfP3DFFT;		
+    string gridFileName, zgridFileName;
+    int procIDWithKx0Ky0;
+
+public:
+    int nX, nY, nZ, nX2, nY2, nZ2, nXYAll, nXYZAll, nXYZFourier, nXYZPhysical;
+    int iStartFourierIndex , jStartFourierIndex , kStartFourierIndex , iEndFourierIndex , jEndFourierIndex , kEndFourierIndex ;
+    int iStartPhysicalIndex, jStartPhysicalIndex, kStartPhysicalIndex, iEndPhysicalIndex, jEndPhysicalIndex, kEndPhysicalIndex;
+    //int x0Fall, y0Fall, z0Fall, xNFall, yNFall, zNFall;
+    int iStartFourierIndexGlobal, jStartFourierIndexGlobal, kStartFourierIndexGlobal, iEndFourierIndexGlobal, jEndFourierIndexGlobal, kEndFourierIndexGlobal;
+    RDouble realKNyquistX, realKNyquistY, realKNyquistZ;
+
+    Int1D *fourierStartIndex, *fourierEndIndex, *fourierIndexSize;
+    Int2D *startAndEndFourierIndexOfAll, *startAndEndPhysicalIndexOfAll;
+    //		int **startAndEndAll, **startAndEndPhysical;
+    //				Int1D * physicalStart, ;
+    RDouble1D *realKX, *realKY, *realKZ;
+    Complex1D *complexKX, *complexKY, *complexKZ;
+    RDouble1D *realZ, *realDetaDz;
+
+protected:
+    virtual void InitGridFileName();
+
+    virtual void InitP3DFFT();
+
+    virtual void AllocGridData();
+
+    virtual void InitWavenumber();
+
+public:
+    virtual void InitGridData();
+
+    void InitGridSize();
+
+    int GetProcIDWithKx0Ky0();
+};
+
+}
diff --git a/CFD/SpecDiffHybSolver/include/SpecSolver.h b/CFD/SpecDiffHybSolver/include/SpecSolver.h
new file mode 100644
index 0000000..729ae96
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/SpecSolver.h
@@ -0,0 +1,261 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +  
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      SpecSolver.h
+//! @brief     Solver of Fourier-Spectral method.
+//! @author    Zhang Zipei.
+
+#pragma once
+
+#include "TypeDefine.h"
+#include "Complex.h"
+#include "LIB_Macro.h"
+#include "Param_SpecSolver.h"
+#include "SpecDiffHybGrid.h"
+#include "Spectrum.h"
+#include "SpecGrid.h"
+#include "RescaleField.h"
+#include "Statistics.h"
+#include "LES.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+class Param_SpecSolver;
+//class SpecDiffHybGrid;
+
+class SpecSolver
+{
+public:
+    SpecSolver();
+    ~SpecSolver();
+
+protected:
+    RDouble1D *nonlinearTermCoef, *pressureGradientTermCoef;
+    Complex4D *convectiveTerm, *complexLaplacianVelocityTerm;
+    Complex5D *complexPressureGradientTerm;
+
+    Complex4D *complexViscousTerm, *complexNonlinearTerm, *complexVelocityGradient, *complexVelocitySquare;
+    RDouble4D *realVelocityGradient, *realVelocitySquare;
+
+    Complex3D *complexU, *complexV, *complexW, *complexP, *complexDivergenceU;
+
+    RDouble3D *realnut3d;
+
+    RDouble1D *ek3DInit, *ek3D;
+
+    string nonlinearTermFile, nonlinearTermBackupFile;
+    string pressureGradientTermFile, pressureGradientTermBackupFile;
+    string laplacianVelocityTermFile, laplacianVelocityTermBackupFile;
+    string timeInformationRestartFile;
+
+    string velocityRestartFile, velocityBackupFile;
+    string pressureRestartFile, pressureBackupFile;
+    string velocityNameFile, fieldNameFile;
+
+    bool IsConvectiveTermFailed;
+
+private:
+    RDouble realnut;
+
+public:
+    LIB_EXPORT Param_SpecSolver * GetControlParameters() const;
+
+    void Run();
+
+    virtual const string GetResidualFileName();
+
+    SpecGrid *GetGrid();
+
+private:
+    void Init();
+
+    void AllocTimeDependentData();
+
+    void InitGlobal();
+
+    //void ReadConvectiveTerm();
+    //void ReadTimeDependentInformation();
+
+    void Solve();
+    //void RescaleVelocityField(const int);
+    //void GetVelocityGradient();
+    //void GetNonlinearTerm();
+    //void GetViscousTerm();
+    //void InitFieldData();
+
+    //void AllocFieldData();
+    //void GetInitField();
+    //void InitFieldFileName();
+    //void WriteVelocityName();
+    //void InitProfile();
+    //void InitFromOldField();
+    //void OutputFieldRestartFile(const int);
+    //void GetAssumedSpectrum( const double, const double, double & );
+    //void GetAssumedSpectrumNearWall( const double, const double, double & );
+    //void ReadinVelocityRestartFile();
+    //void ReadinPressureRestartFile();
+    //void WriteVelocityRestartFile(const string);
+    //void WritePressureRestartFile(const string);
+    //void SetInitTimeDataCoef();
+    //void SetTimeDataCoef();
+    //void VanishingDIVproj();
+    //void OutputFieldName();
+    //void GetStatistics();
+    //void OutputResidual(const int);
+    //void OutputRestartData(const int);
+    //void OutputOldTimeData(const int);
+    //void WriteConvectiveTerm(const string);
+    //void WriteTimeDependentInformation();
+    //void mode00fix();
+    RescaleFieldHIT * GetRescaleFieldData();
+
+    void SetRescaleFieldData(RescaleFieldHIT *RescaleFieldData);
+
+    Spectrum * GetSpectrumData();
+
+    void SetSpectrumData(Spectrum *SpectrumData);
+
+    LESHIT * GetLESData();
+
+    void SetLESData(LESHIT *LESData);
+
+    StatisticsHIT *GetStatisticData();
+
+    void SetStatisticData(StatisticsHIT *StatisticData);
+
+    void NormVector(RDouble *vec1, RDouble *vec2, int ndim);
+
+    void GetAssumedSpectrum(RDouble modk, RDouble &ek);
+
+    void GetCBCSpectrum(RDouble modk, RDouble &ek);
+
+    static void Splint(RDouble *xa, RDouble *ya, RDouble *y2a, int n, RDouble x, RDouble &y);
+
+    void InitPressure();
+
+    void GetEkAll(RDouble1D *ek3D, int nMax);
+
+    void GetInitSpectrum();
+
+    void GetGradientVector(PHComplex *var, PHComplex *dVardX, PHComplex *dVardY, PHComplex *dVardZ);
+
+    void GetDivergence(PHComplex *vecX, PHComplex *vecY, PHComplex *vecZ, Complex3D *divVar);
+
+protected:
+    virtual void FreeControlParameters();
+
+    virtual void InitControlParameters();
+
+    virtual bool JudgeIfRestart();
+
+    void SetGrid(SpecGrid *GridData);
+
+    void InitSpectrumData();
+
+    virtual void InitGridData();
+
+    virtual void InitTimeDependentData();
+
+    virtual void InitTimeDependentFileName();
+
+    virtual void SetInitTimeDataCoef();
+
+    virtual void SetTimeDataCoef();
+
+    virtual void InitFieldData();
+
+    virtual void InitFieldFileName();
+
+    virtual void AllocFieldData();
+
+    virtual void GetInitField();
+
+    virtual void WriteVelocityName();
+
+    virtual void InitProfile();
+
+    virtual void InitLESData();
+
+    virtual void InitStatisticsData();
+
+    virtual void InitRescaleData();
+
+    virtual void InitFromOldField();
+
+    virtual void ReadinVelocityRestartFile();
+
+    virtual void ReadinPressureRestartFile();
+
+    virtual void OutputFieldRestartFile();
+
+    virtual void WriteVelocityRestartFile(const string velocityFileName);
+
+    virtual void WritePressureRestartFile(const string pressureFileName);
+
+    virtual void InputOldTimeData();
+
+    virtual void ReadConvectiveTerm();
+
+    virtual void ReadTimeDependentInformation();
+
+    virtual void OutputFieldName();
+
+    virtual void GetRHS();
+
+    virtual void GetVelocityGradient();
+
+    virtual void GetNonlinearTerm();
+
+    virtual void RescaleVelocityField(const int nstep);
+
+    virtual void GetStatistics();
+
+    virtual void OutputResidual();
+
+    void FillActionKey(ActionKey *actkey, int action, const int level);
+
+    virtual void DumpRes(ActionKey *actkey);
+
+    virtual void PrepareFormatedResidual(string &formatRes);
+
+    virtual void OutputRestartData();
+
+    virtual void OutputOldTimeData();
+
+    virtual void WriteConvectiveTerm(const string);
+
+    virtual void WriteTimeDependentInformation();
+
+    virtual void OutputStatisticVisual();
+
+    virtual void DeAllocateGlobalVariables();
+
+private:
+    class Spectrum * SpectrumData;
+
+    class SpecGrid * GridData;
+
+    class RescaleFieldHIT * RescaleFieldData;
+
+    class StatisticsHIT * StatisticData;
+
+    class LESHIT * LESData;
+
+protected:
+    Param_SpecSolver *controlParameters;
+
+};
+
+#include "SpecSolver.hxx"
+
+}
\ No newline at end of file
diff --git a/CFD/SpecDiffHybSolver/include/SpecSolver.hxx b/CFD/SpecDiffHybSolver/include/SpecSolver.hxx
new file mode 100644
index 0000000..450677f
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/SpecSolver.hxx
@@ -0,0 +1,49 @@
+inline SpecGrid *SpecSolver::GetGrid()
+{
+    return this->GridData;
+}
+
+inline void SpecSolver::SetGrid(SpecGrid *GridData)
+{ 
+    this->GridData = GridData;
+}
+
+inline Spectrum *SpecSolver::GetSpectrumData()
+{
+    return this->SpectrumData;
+}
+
+inline void SpecSolver::SetSpectrumData(Spectrum *SpectrumData)
+{
+    this->SpectrumData = SpectrumData;
+}
+
+inline RescaleFieldHIT *SpecSolver::GetRescaleFieldData()
+{
+    return this->RescaleFieldData;
+}
+
+inline void SpecSolver::SetRescaleFieldData(RescaleFieldHIT *RescaleFieldData)
+{ 
+    this->RescaleFieldData = RescaleFieldData;
+}
+
+inline StatisticsHIT *SpecSolver::GetStatisticData()
+{
+    return this->StatisticData;
+}
+
+inline void SpecSolver::SetStatisticData(StatisticsHIT *StatisticData)
+{
+    this->StatisticData = StatisticData;
+}
+
+inline LESHIT *SpecSolver::GetLESData()
+{
+    return this->LESData;
+}
+
+inline void SpecSolver::SetLESData(LESHIT *LESData)
+{
+    this->LESData = LESData;
+}
diff --git a/CFD/SpecDiffHybSolver/include/Spectrum.h b/CFD/SpecDiffHybSolver/include/Spectrum.h
new file mode 100644
index 0000000..f389f49
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/Spectrum.h
@@ -0,0 +1,65 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +  
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Spectrum.h
+//! @brief     Spectrum data for SpecDiffHybSolver.
+//! @author    ZhangZipei.
+
+#pragma once
+//#include "TypeDefine.h"
+//#include "Complex.h"
+#include "LIB_Macro.h"
+#include "Precision.h"
+//#include "Param_Spectrum.h"
+//#include "SpecSolver.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+class Spectrum
+{
+public:
+    Spectrum();
+    ~Spectrum();
+
+private:
+    int spectrumType;
+
+public:
+    RDouble *k_CBC, *eK_CBC, *logK_CBC, *logEK_CBC, *d2logEKdK2_CBC;
+
+    int nPoints;
+
+private:
+    void AllocSpectrumData(int nP);
+
+    void InitCBCSpectrum();
+
+    void ReadCBCSpectrum();
+
+    void WriteCBCSpectrum();
+
+    void Spline(RDouble *x, RDouble *y, int n, RDouble yp1, RDouble ypn, RDouble *y2);
+
+public:
+    void InitSpectrumData();
+
+    //void GetAssumedSpectrum(RDouble ek, RDouble modk);
+
+    //LIB_EXPORT void InitControlParameters();
+
+    //LIB_EXPORT Param_Spectrum *GetControlParameters() const;
+};
+
+}
+
diff --git a/CFD/SpecDiffHybSolver/include/Statistics.h b/CFD/SpecDiffHybSolver/include/Statistics.h
new file mode 100644
index 0000000..c79c316
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/Statistics.h
@@ -0,0 +1,169 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +  
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Statistics.h
+//! @brief     statistics that can be computed from fourier planes.
+//! @author    ZhangZipei.
+
+#pragma once
+#include "TypeDefine.h"
+#include "SpecDiffHybGrid.h"
+//#include "SpecDiffHybSolver.h"
+#include "Param_SpecDiffHybSolver.h"
+#include "LIB_Macro.h"
+#include "ActionKey.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+class StatisticsHIT
+{
+public:
+    StatisticsHIT();
+    ~StatisticsHIT();
+
+public:
+    void InitStatisticsData(SpecGrid *GridData);
+
+    void GetStatisticsLocal(SpecGrid *GridData, Complex3D *complexU, Complex3D *complexV, Complex3D *complexW);
+
+    void OutputStatisticRestart(SpecGrid *GridData);
+
+    void OutputStatisticVisual(SpecGrid *GridData);
+
+protected:
+    virtual void InitStatisticsFileName();
+
+    virtual bool IfStatisticExist();
+
+    virtual void ReadStatisticsInformation();
+
+    virtual void WriteStatisticsName();
+
+    virtual void WriteStatisticInformation();
+
+    const string GetStatisticVisualFileName();
+
+    void FillActionKey(ActionKey *actkey, int action, const int level);
+
+private:
+    void AllocStatisticsdata(SpecGrid *GridData);
+
+    void InitStatisticsDataValue(SpecGrid *GridData);
+
+    void InputStatistics(SpecGrid *GridData);
+
+    void ReadStatisticRestart(SpecGrid *GridData);
+
+    void WriteStatisticRestart(SpecGrid *GridData);
+
+    void WriteStatisticVisual(SpecGrid *GridData);
+
+    void PrepareFormatedStatistic(SpecGrid *GridData, string &formatStatistic);
+
+    void WriteSpectraVisual(SpecGrid *GridData);
+
+    void WriteSpectraKxVisual(SpecGrid *GridData);
+
+    void WriteSpectraKyVisual(SpecGrid *GridData);
+
+    void WriteSpectraKzVisual(SpecGrid *GridData);
+
+    void PrepareFormatedSpectraKx(SpecGrid *GridData, string &formatSpectra);
+
+    void PrepareFormatedSpectraKy(SpecGrid *GridData, string &formatSpectra);
+
+    void PrepareFormatedSpectraKz(SpecGrid *GridData, string &formatSpectra);
+
+protected:
+    string zGridPlot3dFile, zHalfGridPlot3dFile, statisticsNameFile, statisticsInformationFile, statisticsRestartFile, statisticsRestartTimeFile;
+
+    int istats;
+
+    bool ifInitStatistic;
+
+public:
+    int iz_half;
+
+    RDouble1D *statisticAll, *statisticLocal, *statistic;
+
+    RDouble2D *energyOfUUKx, *energyOfUUKy, *energyOfUUKz, *energyOfUUKxAll, *energyOfUUKyAll, *energyOfUUKzAll, *energyOfUUKxLocal, *energyOfUUKyLocal, *energyOfUUKzLocal;
+
+    RDouble nutAverage;
+};
+
+class Statistics : public StatisticsHIT
+{
+public:
+    Statistics();
+    ~Statistics();
+
+public:
+    //int iz_half;//, naddnum;
+    RDouble2D *statisticAll, *statisticLocal, *statistic;
+    RDouble3D *energyOfUUKx, *energyOfUUKy, *energyOfUUKxAll, *energyOfUUKyAll, *energyOfUUKxLocal, *energyOfUUKyLocal;
+
+    RDouble1D *nutAverage;
+
+private: 
+
+    RDouble tauWAverage;
+
+public:
+    void InitStatisticsData(SpecDiffHybGrid *GridData);
+
+    void GetStatisticsLocal(SpecDiffHybGrid *GridData, Complex3D *, Complex3D *, Complex3D *, Complex4D *);
+
+    void OutputStatisticRestart(SpecDiffHybGrid *GridData);
+
+    void OutputStatisticVisual(SpecDiffHybGrid *GridData);
+
+    RDouble GetTauWAverage();
+
+    void SetTauWAverage(const RDouble &tauWAverageIn);
+
+    bool GetIfInitStatistic();
+
+    void SetIfInitStatistic(const bool &ifInitStatisticIn);
+
+private:
+
+    void OutputPlot3dGrid(SpecDiffHybGrid *GridData);
+
+    void AllocStatisticsdata(SpecDiffHybGrid *GridData);
+
+    void InitStatisticsDataValue(SpecDiffHybGrid *GridData);
+
+    void InputStatistics(SpecDiffHybGrid *GridData);
+
+    void ReadStatisticRestart(SpecDiffHybGrid *GridData);
+
+    void ReadStatisticsSelected(SpecDiffHybGrid *GridData);
+
+    void WriteStatisticRestart(SpecDiffHybGrid *GridData);
+
+    void WriteStatisticVisual(SpecDiffHybGrid *GridData);
+
+    void PrepareFormatedStatistic(SpecDiffHybGrid *GridData, string &formatStatistic);
+
+    void WriteSpectraVisual(SpecDiffHybGrid *GridData);
+
+    void WriteSpectraKxVisual(SpecDiffHybGrid *GridData);
+
+    void WriteSpectraKyVisual(SpecDiffHybGrid *GridData);
+
+    void PrepareFormatedSpectraKx(SpecDiffHybGrid *GridData, string &formatSpectra);
+
+    void PrepareFormatedSpectraKy(SpecDiffHybGrid *GridData, string &formatSpectra);
+};
+
+}
diff --git a/CFD/SpecDiffHybSolver/include/fftw3.h b/CFD/SpecDiffHybSolver/include/fftw3.h
new file mode 100644
index 0000000..1bf3439
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/fftw3.h
@@ -0,0 +1,412 @@
+/*
+ * Copyright (c) 2003, 2007-14 Matteo Frigo
+ * Copyright (c) 2003, 2007-14 Massachusetts Institute of Technology
+ *
+ * The following statement of license applies *only* to this header file,
+ * and *not* to the other files distributed with FFTW or derived therefrom:
+ * 
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ *
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ *
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
+ * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+ * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+ * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+ * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+ * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+ * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+ * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+ * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ */
+
+/***************************** NOTE TO USERS *********************************
+ *
+ *                 THIS IS A HEADER FILE, NOT A MANUAL
+ *
+ *    If you want to know how to use FFTW, please read the manual,
+ *    online at http://www.fftw.org/doc/ and also included with FFTW.
+ *    For a quick start, see the manual's tutorial section.
+ *
+ *   (Reading header files to learn how to use a library is a habit
+ *    stemming from code lacking a proper manual.  Arguably, it's a
+ *    *bad* habit in most cases, because header files can contain
+ *    interfaces that are not part of the public, stable API.)
+ *
+ ****************************************************************************/
+
+#ifndef FFTW3_H
+#define FFTW3_H
+
+#include <stdio.h>
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif /* __cplusplus */
+
+/* If <complex.h> is included, use the C99 complex type.  Otherwise
+   define a type bit-compatible with C99 complex */
+#if !defined(FFTW_NO_Complex) && defined(_Complex_I) && defined(complex) && defined(I)
+#  define FFTW_DEFINE_COMPLEX(R, C) typedef R _Complex C
+#else
+#  define FFTW_DEFINE_COMPLEX(R, C) typedef R C[2]
+#endif
+
+#define FFTW_CONCAT(prefix, name) prefix ## name
+#define FFTW_MANGLE_DOUBLE(name) FFTW_CONCAT(fftw_, name)
+#define FFTW_MANGLE_FLOAT(name) FFTW_CONCAT(fftwf_, name)
+#define FFTW_MANGLE_LONG_DOUBLE(name) FFTW_CONCAT(fftwl_, name)
+#define FFTW_MANGLE_QUAD(name) FFTW_CONCAT(fftwq_, name)
+
+/* IMPORTANT: for Windows compilers, you should add a line
+        #define FFTW_DLL
+   here and in kernel/ifftw.h if you are compiling/using FFTW as a
+   DLL, in order to do the proper importing/exporting, or
+   alternatively compile with -DFFTW_DLL or the equivalent
+   command-line flag.  This is not necessary under MinGW/Cygwin, where
+   libtool does the imports/exports automatically. */
+#if defined(FFTW_DLL) && (defined(_WIN32) || defined(__WIN32__))
+   /* annoying Windows syntax for shared-library declarations */
+#  if defined(COMPILING_FFTW) /* defined in api.h when compiling FFTW */
+#    define FFTW_EXTERN extern __declspec(dllexport) 
+#  else /* user is calling FFTW; import symbol */
+#    define FFTW_EXTERN extern __declspec(dllimport) 
+#  endif
+#else
+#  define FFTW_EXTERN extern
+#endif
+
+enum fftw_r2r_kind_do_not_use_me {
+     FFTW_R2HC=0, FFTW_HC2R=1, FFTW_DHT=2,
+     FFTW_REDFT00=3, FFTW_REDFT01=4, FFTW_REDFT10=5, FFTW_REDFT11=6,
+     FFTW_RODFT00=7, FFTW_RODFT01=8, FFTW_RODFT10=9, FFTW_RODFT11=10
+};
+
+struct fftw_iodim_do_not_use_me {
+     int n;                     /* dimension size */
+     int is;			/* input stride */
+     int os;			/* output stride */
+};
+
+#include <stddef.h> /* for ptrdiff_t */
+struct fftw_iodim64_do_not_use_me {
+     ptrdiff_t n;                     /* dimension size */
+     ptrdiff_t is;			/* input stride */
+     ptrdiff_t os;			/* output stride */
+};
+
+typedef void (*fftw_write_char_func_do_not_use_me)(char c, void *);
+typedef int (*fftw_read_char_func_do_not_use_me)(void *);
+
+/*
+  huge second-order macro that defines prototypes for all API
+  functions.  We expand this macro for each supported precision
+ 
+  X: name-mangling macro
+  R: real data type
+  C: complex data type
+*/
+
+#define FFTW_DEFINE_API(X, R, C)					   \
+									   \
+FFTW_DEFINE_COMPLEX(R, C);						   \
+									   \
+typedef struct X(plan_s) *X(plan);					   \
+									   \
+typedef struct fftw_iodim_do_not_use_me X(iodim);			   \
+typedef struct fftw_iodim64_do_not_use_me X(iodim64);			   \
+									   \
+typedef enum fftw_r2r_kind_do_not_use_me X(r2r_kind);			   \
+									   \
+typedef fftw_write_char_func_do_not_use_me X(write_char_func);		   \
+typedef fftw_read_char_func_do_not_use_me X(read_char_func);		   \
+									   \
+FFTW_EXTERN void X(execute)(const X(plan) p);				   \
+									   \
+FFTW_EXTERN X(plan) X(plan_dft)(int rank, const int *n,			   \
+		    C *in, C *out, int sign, unsigned flags);		   \
+									   \
+FFTW_EXTERN X(plan) X(plan_dft_1d)(int n, C *in, C *out, int sign,	   \
+		       unsigned flags);					   \
+FFTW_EXTERN X(plan) X(plan_dft_2d)(int n0, int n1,			   \
+		       C *in, C *out, int sign, unsigned flags);	   \
+FFTW_EXTERN X(plan) X(plan_dft_3d)(int n0, int n1, int n2,		   \
+		       C *in, C *out, int sign, unsigned flags);	   \
+									   \
+FFTW_EXTERN X(plan) X(plan_many_dft)(int rank, const int *n,		   \
+                         int howmany,					   \
+                         C *in, const int *inembed,			   \
+                         int istride, int idist,			   \
+                         C *out, const int *onembed,			   \
+                         int ostride, int odist,			   \
+                         int sign, unsigned flags);			   \
+									   \
+FFTW_EXTERN X(plan) X(plan_guru_dft)(int rank, const X(iodim) *dims,	   \
+			 int howmany_rank,				   \
+			 const X(iodim) *howmany_dims,			   \
+			 C *in, C *out,					   \
+			 int sign, unsigned flags);			   \
+FFTW_EXTERN X(plan) X(plan_guru_split_dft)(int rank, const X(iodim) *dims, \
+			 int howmany_rank,				   \
+			 const X(iodim) *howmany_dims,			   \
+			 R *ri, R *ii, R *ro, R *io,			   \
+			 unsigned flags);				   \
+									   \
+FFTW_EXTERN X(plan) X(plan_guru64_dft)(int rank,			   \
+                         const X(iodim64) *dims,			   \
+			 int howmany_rank,				   \
+			 const X(iodim64) *howmany_dims,		   \
+			 C *in, C *out,					   \
+			 int sign, unsigned flags);			   \
+FFTW_EXTERN X(plan) X(plan_guru64_split_dft)(int rank,			   \
+                         const X(iodim64) *dims,			   \
+			 int howmany_rank,				   \
+			 const X(iodim64) *howmany_dims,		   \
+			 R *ri, R *ii, R *ro, R *io,			   \
+			 unsigned flags);				   \
+									   \
+FFTW_EXTERN void X(execute_dft)(const X(plan) p, C *in, C *out);	   \
+FFTW_EXTERN void X(execute_split_dft)(const X(plan) p, R *ri, R *ii,	   \
+                                      R *ro, R *io);			   \
+									   \
+FFTW_EXTERN X(plan) X(plan_many_dft_r2c)(int rank, const int *n,	   \
+                             int howmany,				   \
+                             R *in, const int *inembed,			   \
+                             int istride, int idist,			   \
+                             C *out, const int *onembed,		   \
+                             int ostride, int odist,			   \
+                             unsigned flags);				   \
+									   \
+FFTW_EXTERN X(plan) X(plan_dft_r2c)(int rank, const int *n,		   \
+                        R *in, C *out, unsigned flags);			   \
+									   \
+FFTW_EXTERN X(plan) X(plan_dft_r2c_1d)(int n,R *in,C *out,unsigned flags); \
+FFTW_EXTERN X(plan) X(plan_dft_r2c_2d)(int n0, int n1,			   \
+			   R *in, C *out, unsigned flags);		   \
+FFTW_EXTERN X(plan) X(plan_dft_r2c_3d)(int n0, int n1,			   \
+			   int n2,					   \
+			   R *in, C *out, unsigned flags);		   \
+									   \
+									   \
+FFTW_EXTERN X(plan) X(plan_many_dft_c2r)(int rank, const int *n,	   \
+			     int howmany,				   \
+			     C *in, const int *inembed,			   \
+			     int istride, int idist,			   \
+			     R *out, const int *onembed,		   \
+			     int ostride, int odist,			   \
+			     unsigned flags);				   \
+									   \
+FFTW_EXTERN X(plan) X(plan_dft_c2r)(int rank, const int *n,		   \
+                        C *in, R *out, unsigned flags);			   \
+									   \
+FFTW_EXTERN X(plan) X(plan_dft_c2r_1d)(int n,C *in,R *out,unsigned flags); \
+FFTW_EXTERN X(plan) X(plan_dft_c2r_2d)(int n0, int n1,			   \
+			   C *in, R *out, unsigned flags);		   \
+FFTW_EXTERN X(plan) X(plan_dft_c2r_3d)(int n0, int n1,			   \
+			   int n2,					   \
+			   C *in, R *out, unsigned flags);		   \
+									   \
+FFTW_EXTERN X(plan) X(plan_guru_dft_r2c)(int rank, const X(iodim) *dims,   \
+			     int howmany_rank,				   \
+			     const X(iodim) *howmany_dims,		   \
+			     R *in, C *out,				   \
+			     unsigned flags);				   \
+FFTW_EXTERN X(plan) X(plan_guru_dft_c2r)(int rank, const X(iodim) *dims,   \
+			     int howmany_rank,				   \
+			     const X(iodim) *howmany_dims,		   \
+			     C *in, R *out,				   \
+			     unsigned flags);				   \
+									   \
+FFTW_EXTERN X(plan) X(plan_guru_split_dft_r2c)(				   \
+                             int rank, const X(iodim) *dims,		   \
+			     int howmany_rank,				   \
+			     const X(iodim) *howmany_dims,		   \
+			     R *in, R *ro, R *io,			   \
+			     unsigned flags);				   \
+FFTW_EXTERN X(plan) X(plan_guru_split_dft_c2r)(				   \
+                             int rank, const X(iodim) *dims,		   \
+			     int howmany_rank,				   \
+			     const X(iodim) *howmany_dims,		   \
+			     R *ri, R *ii, R *out,			   \
+			     unsigned flags);				   \
+									   \
+FFTW_EXTERN X(plan) X(plan_guru64_dft_r2c)(int rank,			   \
+                             const X(iodim64) *dims,			   \
+			     int howmany_rank,				   \
+			     const X(iodim64) *howmany_dims,		   \
+			     R *in, C *out,				   \
+			     unsigned flags);				   \
+FFTW_EXTERN X(plan) X(plan_guru64_dft_c2r)(int rank,			   \
+                             const X(iodim64) *dims,			   \
+			     int howmany_rank,				   \
+			     const X(iodim64) *howmany_dims,		   \
+			     C *in, R *out,				   \
+			     unsigned flags);				   \
+									   \
+FFTW_EXTERN X(plan) X(plan_guru64_split_dft_r2c)(			   \
+                             int rank, const X(iodim64) *dims,		   \
+			     int howmany_rank,				   \
+			     const X(iodim64) *howmany_dims,		   \
+			     R *in, R *ro, R *io,			   \
+			     unsigned flags);				   \
+FFTW_EXTERN X(plan) X(plan_guru64_split_dft_c2r)(			   \
+                             int rank, const X(iodim64) *dims,		   \
+			     int howmany_rank,				   \
+			     const X(iodim64) *howmany_dims,		   \
+			     R *ri, R *ii, R *out,			   \
+			     unsigned flags);				   \
+									   \
+FFTW_EXTERN void X(execute_dft_r2c)(const X(plan) p, R *in, C *out);	   \
+FFTW_EXTERN void X(execute_dft_c2r)(const X(plan) p, C *in, R *out);	   \
+									   \
+FFTW_EXTERN void X(execute_split_dft_r2c)(const X(plan) p,		   \
+                                          R *in, R *ro, R *io);		   \
+FFTW_EXTERN void X(execute_split_dft_c2r)(const X(plan) p,		   \
+                                          R *ri, R *ii, R *out);	   \
+									   \
+FFTW_EXTERN X(plan) X(plan_many_r2r)(int rank, const int *n,		   \
+                         int howmany,					   \
+                         R *in, const int *inembed,			   \
+                         int istride, int idist,			   \
+                         R *out, const int *onembed,			   \
+                         int ostride, int odist,			   \
+                         const X(r2r_kind) *kind, unsigned flags);	   \
+									   \
+FFTW_EXTERN X(plan) X(plan_r2r)(int rank, const int *n, R *in, R *out,	   \
+                    const X(r2r_kind) *kind, unsigned flags);		   \
+									   \
+FFTW_EXTERN X(plan) X(plan_r2r_1d)(int n, R *in, R *out,		   \
+                       X(r2r_kind) kind, unsigned flags);		   \
+FFTW_EXTERN X(plan) X(plan_r2r_2d)(int n0, int n1, R *in, R *out,	   \
+                       X(r2r_kind) kind0, X(r2r_kind) kind1,		   \
+                       unsigned flags);					   \
+FFTW_EXTERN X(plan) X(plan_r2r_3d)(int n0, int n1, int n2,		   \
+                       R *in, R *out, X(r2r_kind) kind0,		   \
+                       X(r2r_kind) kind1, X(r2r_kind) kind2,		   \
+                       unsigned flags);					   \
+									   \
+FFTW_EXTERN X(plan) X(plan_guru_r2r)(int rank, const X(iodim) *dims,	   \
+                         int howmany_rank,				   \
+                         const X(iodim) *howmany_dims,			   \
+                         R *in, R *out,					   \
+                         const X(r2r_kind) *kind, unsigned flags);	   \
+									   \
+FFTW_EXTERN X(plan) X(plan_guru64_r2r)(int rank, const X(iodim64) *dims,   \
+                         int howmany_rank,				   \
+                         const X(iodim64) *howmany_dims,		   \
+                         R *in, R *out,					   \
+                         const X(r2r_kind) *kind, unsigned flags);	   \
+									   \
+FFTW_EXTERN void X(execute_r2r)(const X(plan) p, R *in, R *out);	   \
+									   \
+FFTW_EXTERN void X(destroy_plan)(X(plan) p);				   \
+FFTW_EXTERN void X(forget_wisdom)(void);				   \
+FFTW_EXTERN void X(cleanup)(void);					   \
+									   \
+FFTW_EXTERN void X(set_timelimit)(double t);				   \
+									   \
+FFTW_EXTERN void X(plan_with_nthreads)(int nthreads);			   \
+FFTW_EXTERN int X(init_threads)(void);					   \
+FFTW_EXTERN void X(cleanup_threads)(void);				   \
+									   \
+FFTW_EXTERN int X(export_wisdom_to_filename)(const char *filename);	   \
+FFTW_EXTERN void X(export_wisdom_to_file)(FILE *output_file);		   \
+FFTW_EXTERN char *X(export_wisdom_to_string)(void);			   \
+FFTW_EXTERN void X(export_wisdom)(X(write_char_func) write_char,   	   \
+                                  void *data);				   \
+FFTW_EXTERN int X(import_system_wisdom)(void);				   \
+FFTW_EXTERN int X(import_wisdom_from_filename)(const char *filename);	   \
+FFTW_EXTERN int X(import_wisdom_from_file)(FILE *input_file);		   \
+FFTW_EXTERN int X(import_wisdom_from_string)(const char *input_string);	   \
+FFTW_EXTERN int X(import_wisdom)(X(read_char_func) read_char, void *data); \
+									   \
+FFTW_EXTERN void X(fprint_plan)(const X(plan) p, FILE *output_file);	   \
+FFTW_EXTERN void X(print_plan)(const X(plan) p);			   \
+FFTW_EXTERN char *X(sprint_plan)(const X(plan) p);			   \
+									   \
+FFTW_EXTERN void *X(malloc)(size_t n);					   \
+FFTW_EXTERN R *X(alloc_real)(size_t n);					   \
+FFTW_EXTERN C *X(alloc_complex)(size_t n);				   \
+FFTW_EXTERN void X(free)(void *p);					   \
+									   \
+FFTW_EXTERN void X(flops)(const X(plan) p,				   \
+                          double *add, double *mul, double *fmas);	   \
+FFTW_EXTERN double X(estimate_cost)(const X(plan) p);			   \
+FFTW_EXTERN double X(cost)(const X(plan) p);				   \
+									   \
+FFTW_EXTERN int X(alignment_of)(R *p);                                     \
+FFTW_EXTERN const char X(version)[];                                       \
+FFTW_EXTERN const char X(cc)[];						   \
+FFTW_EXTERN const char X(codelet_optim)[];
+
+
+/* end of FFTW_DEFINE_API macro */
+
+FFTW_DEFINE_API(FFTW_MANGLE_DOUBLE, double, fftw_complex)
+FFTW_DEFINE_API(FFTW_MANGLE_FLOAT, float, fftwf_complex)
+FFTW_DEFINE_API(FFTW_MANGLE_LONG_DOUBLE, long double, fftwl_complex)
+
+/* __float128 (quad precision) is a gcc extension on i386, x86_64, and ia64
+   for gcc >= 4.6 (compiled in FFTW with --enable-quad-precision) */
+#if (__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 6)) \
+ && !(defined(__ICC) || defined(__INTEL_COMPILER)) \
+ && (defined(__i386__) || defined(__x86_64__) || defined(__ia64__))
+#  if !defined(FFTW_NO_Complex) && defined(_Complex_I) && defined(complex) && defined(I)
+/* note: __float128 is a typedef, which is not supported with the _Complex
+         keyword in gcc, so instead we use this ugly __attribute__ version.
+         However, we can't simply pass the __attribute__ version to
+         FFTW_DEFINE_API because the __attribute__ confuses gcc in pointer
+         types.  Hence redefining FFTW_DEFINE_COMPLEX.  Ugh. */
+#    undef FFTW_DEFINE_COMPLEX
+#    define FFTW_DEFINE_COMPLEX(R, C) typedef _Complex float __attribute__((mode(TC))) C
+#  endif
+FFTW_DEFINE_API(FFTW_MANGLE_QUAD, __float128, fftwq_complex)
+#endif
+
+#define FFTW_FORWARD (-1)
+#define FFTW_BACKWARD (+1)
+
+#define FFTW_NO_TIMELIMIT (-1.0)
+
+/* documented flags */
+#define FFTW_MEASURE (0U)
+#define FFTW_DESTROY_INPUT (1U << 0)
+#define FFTW_UNALIGNED (1U << 1)
+#define FFTW_CONSERVE_MEMORY (1U << 2)
+#define FFTW_EXHAUSTIVE (1U << 3) /* NO_EXHAUSTIVE is default */
+#define FFTW_PRESERVE_INPUT (1U << 4) /* cancels FFTW_DESTROY_INPUT */
+#define FFTW_PATIENT (1U << 5) /* IMPATIENT is default */
+#define FFTW_ESTIMATE (1U << 6)
+#define FFTW_WISDOM_ONLY (1U << 21)
+
+/* undocumented beyond-guru flags */
+#define FFTW_ESTIMATE_PATIENT (1U << 7)
+#define FFTW_BELIEVE_PCOST (1U << 8)
+#define FFTW_NO_DFT_R2HC (1U << 9)
+#define FFTW_NO_NONTHREADED (1U << 10)
+#define FFTW_NO_BUFFERING (1U << 11)
+#define FFTW_NO_INDIRECT_OP (1U << 12)
+#define FFTW_ALLOW_LARGE_GENERIC (1U << 13) /* NO_LARGE_GENERIC is default */
+#define FFTW_NO_RANK_SPLITS (1U << 14)
+#define FFTW_NO_VRANK_SPLITS (1U << 15)
+#define FFTW_NO_VRECURSE (1U << 16)
+#define FFTW_NO_SIMD (1U << 17)
+#define FFTW_NO_SLOW (1U << 18)
+#define FFTW_NO_FIXED_RADIX_LARGE_N (1U << 19)
+#define FFTW_ALLOW_PRUNING (1U << 20)
+
+#ifdef __cplusplus
+}  /* extern "C" */
+#endif /* __cplusplus */
+
+#endif /* FFTW3_H */
diff --git a/CFD/SpecDiffHybSolver/include/p3dfft.h b/CFD/SpecDiffHybSolver/include/p3dfft.h
new file mode 100644
index 0000000..8af3279
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/include/p3dfft.h
@@ -0,0 +1,268 @@
+/*
+! This file is part of P3DFFT library
+
+! Title: P3DFFT library
+
+! Authors: Dmitry Pekurovsky
+
+! Copyright (c) 2006-2019 
+
+! The Regents of the University of California.
+
+! All Rights Reserved.                        
+
+ 
+
+!    Permission to use, copy, modify and  distribute  any part
+
+!    of this software for  educational,  research  and  non-profit
+
+!    purposes, by individuals or non-profit organizations,
+
+!    without fee,  and  without a written  agreement is
+
+!    hereby granted,  provided  that the  above  copyright notice,
+
+!    this paragraph  and the following  three  paragraphs appear in
+
+!    all copies.       
+
+ 
+
+!    For-profit organizations desiring to use this software and others
+
+!    wishing to incorporate this  software into commercial
+
+!    products or use it for  commercial  purposes should contact the:    
+
+!          Office of Innovation & Commercialization 
+
+!          University of California San Diego
+
+!          9500 Gilman Drive,  La Jolla,  California, 92093-0910        
+
+!          Phone: (858) 534-5815
+
+!          E-mail: innovation@ucsd.edu
+
+ 
+
+!    IN NO EVENT SHALL THE UNIVERSITY OF CALIFORNIA BE LIABLE
+
+!    TO ANY PARTY FOR DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR    
+
+!    CONSEQUENTIAL DAMAGES, INCLUDING LOST PROFITS, ARISING OUT
+
+!    OF THE USE OF THIS SOFTWARE, EVEN IF THE UNIVERSITY OF
+
+!    CALIFORNIA HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH
+
+!    DAMAGE.
+
+ 
+
+!    THE SOFTWARE PROVIDED HEREUNDER IS ON AN "AS IS" BASIS, AND
+
+!    THE UNIVERSITY OF CALIFORNIA HAS NO OBLIGATIONS TO PROVIDE        
+
+!    MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS. 
+
+!    THE UNIVERSITY OF CALIFORNIA MAKES NO REPRESENTATIONS AND    
+
+!    EXTENDS NO WARRANTIES OF ANY KIND, EITHER EXPRESSED OR
+
+!    IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
+
+!    OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE, OR
+
+!    THAT THE USE OF THE MATERIAL WILL NOT INFRINGE ANY PATENT,        
+
+!    TRADEMARK OR OTHER RIGHTS.
+!----------------------------------------------------------------------
+*/
+
+#include <stdlib.h>
+
+#define FORT_MOD_NAME(NAME) NAME
+
+#ifdef IBM
+
+#define FORTNAME(NAME) NAME
+
+#elif defined INTEL
+
+#define FORTNAME(NAME) NAME##_
+
+#elif defined PGI
+
+/* #define FORT_MOD_NAME(NAME) p3dfft_##NAME##_ */
+
+#define FORTNAME(NAME) NAME##_
+
+#elif defined CRAY
+
+#define FORTNAME(NAME) NAME
+
+#elif defined GNU
+#include "gnu.h"
+//#define FORTNAME(NAME) NAME
+
+#else
+#define FORTNAME(NAME) NAME
+
+#endif
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+extern void FORT_MOD_NAME(p3dfft_setup)(int *dims,int *nx,int *ny,int *nz, int * comm, int *nxc, int *nyc, int *nzc, int *ow, int *memsize);
+extern void FORT_MOD_NAME(p3dfft_get_dims)(int *,int *,int *,int *);
+extern void FORT_MOD_NAME(get_timers)(double *timers);
+extern void FORT_MOD_NAME(set_timers)();
+
+#ifndef SINGLE_PREC
+extern void FORT_MOD_NAME(p3dfft_ftran_r2c)(double *A,double *B, unsigned char *op);
+extern void FORT_MOD_NAME(p3dfft_ftran_r2c_many)(double *A, int *dim_in, double *B, int *dim_out, int *nv, unsigned char *op);
+extern void FORT_MOD_NAME(p3dfft_btran_c2r)(double *A,double *B, unsigned char *op);
+extern void FORT_MOD_NAME(p3dfft_btran_c2r_many)(double *A, int *dim_in, double *B, int *dim_out, int *nv, unsigned char *op);
+extern void FORT_MOD_NAME(p3dfft_cheby)(double *A,double *B, double *Lz);
+extern void FORT_MOD_NAME(p3dfft_cheby_many)(double *A, int *dim_in, double *B, int *dim_out, int *nv, double *Lz);
+#else
+extern void FORT_MOD_NAME(p3dfft_ftran_r2c)(float *A,float *B, unsigned char *op);
+extern void FORT_MOD_NAME(p3dfft_ftran_r2c_many)(float *A, int *dim_in, float *B, int *dim_out, int *nv, unsigned char *op);
+extern void FORT_MOD_NAME(p3dfft_btran_c2r)(float *A,float *B, unsigned char *op);
+extern void FORT_MOD_NAME(p3dfft_btran_c2r_many)(float *A, int *dim_in, float *B, int *dim_out, int *nv, unsigned char *op);
+extern void FORT_MOD_NAME(p3dfft_cheby)(float *A,float *B, float *Lz);
+extern void FORT_MOD_NAME(p3dfft_cheby_many)(float *A, int *dim_in, float *B, int *dim_out, int *nv, float *Lz);
+#endif
+
+extern void FORT_MOD_NAME(p3dfft_clean)();
+
+
+extern void Cp3dfft_setup(int *dims,int nx,int ny,int nz,int comm, int nxc,int nyc, int nzc, int ovewrite, int *memsize);
+extern void Cp3dfft_clean();
+
+extern void Cp3dfft_get_dims(int *,int *,int *,int );
+
+#ifndef SINGLE_PREC
+extern void Cp3dfft_ftran_r2c(double *A,double *B, unsigned char *op);
+extern void Cp3dfft_btran_c2r(double *A,double *B, unsigned char *op);
+extern void Cp3dfft_ftran_r2c_many(double *A,int dim_in,double *B, int dim_out,int nv, unsigned char *op);
+extern void Cp3dfft_btran_c2r_many(double *A,int dim_in,double *B, int dim_out,int nv, unsigned char *op);
+#else
+extern void Cp3dfft_ftran_r2c(float *A,float *B, unsigned char *op);
+extern void Cp3dfft_btran_c2r(float *A,float *B, unsigned char *op);
+  extern void Cp3dfft_ftran_r2c_many(float *A,int dim_in,float *B, int dim_out,int nv,unsigned char *op);
+  extern void Cp3dfft_btran_c2r_many(float *A,int dim_in,float *B, int dim_out,int nv, unsigned char *op);
+#endif
+
+extern void Cget_timers(double *timers);
+extern void Cset_timers();
+
+
+inline void Cp3dfft_setup(int *dims,int nx,int ny,int nz, int comm, int nxc, int nyc, int nzc, int overwrite, int * memsize)
+{
+  FORT_MOD_NAME(p3dfft_setup)(dims,&nx,&ny,&nz,&comm, &nxc, &nyc, &nzc, &overwrite,memsize);
+}
+
+inline void Cp3dfft_clean()
+{
+  FORT_MOD_NAME(p3dfft_clean)();
+}
+
+inline void Cp3dfft_get_dims(int *start,int *end,int *size,int conf)
+{
+  FORT_MOD_NAME(p3dfft_get_dims)(start,end,size,&conf);
+}
+
+inline void Cget_timers(double *timers)
+{
+  FORT_MOD_NAME(get_timers)(timers);
+}
+
+inline void Cset_timers()
+{
+  FORT_MOD_NAME(set_timers)();
+}
+
+
+#ifndef SINGLE_PREC
+inline void Cp3dfft_ftran_r2c(double *A,double *B, unsigned char *op)
+{
+  FORT_MOD_NAME(p3dfft_ftran_r2c)(A,B,op);
+}
+#else
+inline void Cp3dfft_ftran_r2c(float *A,float *B, unsigned char *op)
+{
+  FORT_MOD_NAME(p3dfft_ftran_r2c)(A,B,op);
+}
+
+#endif
+
+
+#ifndef SINGLE_PREC
+inline void Cp3dfft_btran_c2r(double *A,double *B, unsigned char *op)
+{
+  FORT_MOD_NAME(p3dfft_btran_c2r)(A,B,op);
+}
+#else
+inline void Cp3dfft_btran_c2r(float *A,float *B, unsigned char *op)
+{
+  FORT_MOD_NAME(p3dfft_btran_c2r)(A,B,op);
+}
+#endif
+
+
+#ifndef SINGLE_PREC
+inline void Cp3dfft_cheby(double *A,double *B, double Lz)
+{
+  FORT_MOD_NAME(p3dfft_cheby)(A,B,&Lz);
+}
+#else
+inline void Cp3dfft_cheby(float *A,float *B, float Lz)
+{
+  FORT_MOD_NAME(p3dfft_cheby)(A,B,&Lz);
+}
+#endif
+
+#ifndef SINGLE_PREC
+  inline void Cp3dfft_cheby_many(double *A,int dim_in,double *B, int dim_out, int nv, double Lz)
+{
+  FORT_MOD_NAME(p3dfft_cheby_many)(A,&dim_in,B,&dim_out,&nv,&Lz);
+}
+#else
+  inline void Cp3dfft_cheby_many(float *A, int dim_in, float *B, int dim_out, int nv, float Lz)
+{
+  FORT_MOD_NAME(p3dfft_cheby_many)(A,&dim_in,B,&dim_out,&nv,&Lz);
+}
+#endif
+
+#ifndef SINGLE_PREC
+inline void Cp3dfft_ftran_r2c_many(double *A, int dim_in, double *B, int dim_out, int nv, unsigned char *op)
+{
+  FORT_MOD_NAME(p3dfft_ftran_r2c_many)(A,&dim_in,B,&dim_out,&nv,op);
+}
+#else
+inline void Cp3dfft_ftran_r2c_many(float *A, int dim_in, float *B, int dim_out, int nv, unsigned char *op)
+{
+  FORT_MOD_NAME(p3dfft_ftran_r2c_many)(A,&dim_in,B,&dim_out,&nv,op);
+}
+#endif
+
+#ifndef SINGLE_PREC
+inline void Cp3dfft_btran_c2r_many(double *A, int dim_in, double *B, int dim_out, int nv, unsigned char *op)
+{
+  FORT_MOD_NAME(p3dfft_btran_c2r_many)(A,&dim_in,B,&dim_out,&nv,op);
+}
+#else
+inline void Cp3dfft_btran_c2r_many(float *A, int dim_in, float *B, int dim_out, int nv, unsigned char *op)
+{
+  FORT_MOD_NAME(p3dfft_btran_c2r_many)(A,&dim_in,B,&dim_out,&nv,op);
+}
+#endif
+
+#ifdef __cplusplus
+}
+#endif
diff --git a/CFD/SpecDiffHybSolver/src/CompactDifferenceFirstDerivative.cpp b/CFD/SpecDiffHybSolver/src/CompactDifferenceFirstDerivative.cpp
new file mode 100644
index 0000000..21396e8
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/src/CompactDifferenceFirstDerivative.cpp
@@ -0,0 +1,574 @@
+#include "DataStruct_Array.h"
+#include "GlobalDataBase.h"
+#include "TK_Exit.h"
+#include "CompactDifferenceFirstDerivative.h"
+#include "ExplicitDifferenceBoundary.h"
+#include "PHMpi.h"
+#include <iostream>
+#include <sstream>
+#include <cstdlib>
+#include "PHHeader.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+CompactDifferenceFirstDerivative::CompactDifferenceFirstDerivative()
+{
+}
+
+void CompactDifferenceFirstDerivative::InitCompactDifferenceFirstDerivativeData(SpecDiffHybGrid *GridData, ExplicitDifferenceBoundary *DiffBoundaryData)
+{
+    int ist = GridData -> iStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex  ;
+
+    int ischeme = GlobalDataBase::GetIntParaFromDB("ischeme");
+    if ( ischeme == 1 ) 
+    {
+        SetCompactDiffData_CarpenterC6(ist, ied);
+    }
+    else if(ischeme == 3)
+    {
+        SetCompactDiffData_optC4_InnerOnly(ist, ied, DiffBoundaryData);
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue( "ischeme", ischeme );
+    }
+}
+
+void CompactDifferenceFirstDerivative::SetCompactDiffData_CarpenterC6(const int ist, const int ied)
+{
+    minofLHSMatrixBound = -1; //<--- ���ģ�壬��߽���Сֵ  
+    maxofLHSMatrixBound =  1; //<--- ���ģ�壬�ұ߽����ֵ  
+    minofRHSMatrixBound = -7; //<--- �Ҳ�ģ�壬��߽���Сֵ  
+    maxofRHSMatrixBound =  7; //<--- �Ҳ�ģ�壬�ұ߽����ֵ  
+
+    nBoundary_Neumann = 6;
+    AllocCompactDiffData(ist, ied);
+
+    Range I(ist, ied);
+    Range IL(minofLHSMatrixBound, maxofLHSMatrixBound);
+    Range IR(minofRHSMatrixBound, maxofRHSMatrixBound);
+    (*lHSCoefMatrix)(I, IL) = 0.0;
+    (*rHSCoefMatrix)(I, IR) = 0.0;
+
+    double alpha_C6 = 1.0 / 3.0;
+    double alpha = alpha_C6;               
+    double a_C6 = (2.0 * alpha + 4.0) / 3.0;
+    double b_C6 = (4.0 * alpha - 1.0) / 3.0;
+
+    //inner points
+    (*lowerBoundofLHSCoefMatrix)(I) = -1;
+    (*upperBoundofLHSCoefMatrix)(I) = 1;
+
+    (*lHSCoefMatrix)(I,-1) = alpha_C6;
+    (*lHSCoefMatrix)(I, 1) = alpha_C6;
+    (*lHSCoefMatrix)(I, 0) = 1.0;
+
+    (*lowerBoundofRHSCoefMatrix)(I) = -2;
+    (*upperBoundofRHSCoefMatrix)(I) = 2;
+
+    (*rHSCoefMatrix)(I, 2) = b_C6 / 4.0;
+    (*rHSCoefMatrix)(I, 1) = a_C6 / 2.0;
+    (*rHSCoefMatrix)(I,-2) = -1.0 * (*rHSCoefMatrix)(I, 2);
+    (*rHSCoefMatrix)(I,-1) = -1.0 * (*rHSCoefMatrix)(I, 1);
+    (*rHSCoefMatrix)(I, 0) = 0.0;
+
+    //left boundary: i = ist
+    int i = ist;
+    double alp0 = 1809.257;
+    double bet0 = -65.1944;
+
+    (*lHSCoefMatrix)(i, IL) = 0.0;
+    (*rHSCoefMatrix)(i, IR) = 0.0;
+
+    (*lowerBoundofLHSCoefMatrix)(i) = 0;
+    (*upperBoundofLHSCoefMatrix)(i) = 0;
+    (*lowerBoundofRHSCoefMatrix)(i) = 0;
+    (*upperBoundofRHSCoefMatrix)(i) = 7;
+
+    (*lHSCoefMatrix)(i, 0) = 1.0;
+
+    (*rHSCoefMatrix)(i, 0) = -(alp0 - 28.0 * bet0 +13068.0) / 5040.0;
+    (*rHSCoefMatrix)(i, 1) =  (alp0 - 27.0 * bet0 + 5040.0) / 720.0 ;
+    (*rHSCoefMatrix)(i, 2) = -(alp0 - 26.0 * bet0 + 2520.0) / 240.0 ;
+    (*rHSCoefMatrix)(i, 3) =  (alp0 - 25.0 * bet0 + 1680.0) / 144.0 ;
+    (*rHSCoefMatrix)(i, 4) = -(alp0 - 24.0 * bet0 + 1260.0) / 144.0 ;
+    (*rHSCoefMatrix)(i, 5) =  (alp0 - 23.0 * bet0 + 1008.0) / 240.0 ;
+    (*rHSCoefMatrix)(i, 6) = -(alp0 - 22.0 * bet0 +  840.0) / 720.0 ;
+    (*rHSCoefMatrix)(i, 7) =  (alp0 - 21.0 * bet0 +  720.0) / 5040.0;
+
+    //left boundary: i = ist + 1
+    i = ist + 1;
+    double alp1 = -262.16;
+    double bet1 = -26.6742;
+
+    (*lHSCoefMatrix)(i, IL) = 0.0;
+    (*rHSCoefMatrix)(i, IR) = 0.0;
+
+    (*lowerBoundofLHSCoefMatrix)(i) = 0;
+    (*upperBoundofLHSCoefMatrix)(i) = 0;
+    (*lowerBoundofRHSCoefMatrix)(i) = -1;
+    (*upperBoundofRHSCoefMatrix)(i) = 6;
+
+    (*lHSCoefMatrix)(i, 0) = 1.0;
+
+    (*rHSCoefMatrix)(i,-1) = -(alp1 - 21.0 * bet1 + 720.0) / 5040.0;
+    (*rHSCoefMatrix)(i, 0) =  (alp1 - 20.0 * bet1 -1044.0) / 720.0 ;
+    (*rHSCoefMatrix)(i, 1) = -(alp1 - 19.0 * bet1 - 720.0) / 240.0 ;
+    (*rHSCoefMatrix)(i, 2) =  (alp1 - 18.0 * bet1 - 360.0) / 144.0 ;
+    (*rHSCoefMatrix)(i, 3) = -(alp1 - 17.0 * bet1 - 240.0) / 144.0 ;
+    (*rHSCoefMatrix)(i, 4) =  (alp1 - 16.0 * bet1 - 180.0) / 240.0 ;
+    (*rHSCoefMatrix)(i, 5) = -(alp1 - 15.0 * bet1 - 144.0) / 720.0 ;
+    (*rHSCoefMatrix)(i, 6) =  (alp1 - 14.0 * bet1 - 120.0) / 5040.0;
+
+    //right boundary: i = ied - 1
+    i = ied - 1;
+
+    (*lHSCoefMatrix)(i, IL) = 0.0;
+    (*rHSCoefMatrix)(i, IR) = 0.0;
+
+    (*lowerBoundofLHSCoefMatrix)(i) = 0;
+    (*upperBoundofLHSCoefMatrix)(i) = 0;
+    (*lowerBoundofRHSCoefMatrix)(i) = -6;
+    (*upperBoundofRHSCoefMatrix)(i) = 1;
+
+    (*lHSCoefMatrix)(i, 0) = 1.0;
+
+    (*rHSCoefMatrix)(i, 1) = -1.0 * (*rHSCoefMatrix)(ist+1,-1);
+    (*rHSCoefMatrix)(i, 0) = -1.0 * (*rHSCoefMatrix)(ist+1, 0);
+    (*rHSCoefMatrix)(i,-1) = -1.0 * (*rHSCoefMatrix)(ist+1, 1);
+    (*rHSCoefMatrix)(i,-2) = -1.0 * (*rHSCoefMatrix)(ist+1, 2);
+    (*rHSCoefMatrix)(i,-3) = -1.0 * (*rHSCoefMatrix)(ist+1, 3);
+    (*rHSCoefMatrix)(i,-4) = -1.0 * (*rHSCoefMatrix)(ist+1, 4);
+    (*rHSCoefMatrix)(i,-5) = -1.0 * (*rHSCoefMatrix)(ist+1, 5);
+    (*rHSCoefMatrix)(i,-6) = -1.0 * (*rHSCoefMatrix)(ist+1, 6);
+
+    //right boundary: i = ied
+    i = ied;
+
+    (*lHSCoefMatrix)(i, IL) = 0.0;
+    (*rHSCoefMatrix)(i, IR) = 0.0;
+
+    (*lowerBoundofLHSCoefMatrix)(i) = 0;
+    (*upperBoundofLHSCoefMatrix)(i) = 0;
+    (*lowerBoundofRHSCoefMatrix)(i) = -7;
+    (*upperBoundofRHSCoefMatrix)(i) = 0;
+
+    (*lHSCoefMatrix)(i, 0) = 1.0;
+
+    (*rHSCoefMatrix)(i, 0) = -1.0 * (*rHSCoefMatrix)(ist, 0);
+    (*rHSCoefMatrix)(i,-1) = -1.0 * (*rHSCoefMatrix)(ist, 1);
+    (*rHSCoefMatrix)(i,-2) = -1.0 * (*rHSCoefMatrix)(ist, 2);
+    (*rHSCoefMatrix)(i,-3) = -1.0 * (*rHSCoefMatrix)(ist, 3);
+    (*rHSCoefMatrix)(i,-4) = -1.0 * (*rHSCoefMatrix)(ist, 4);
+    (*rHSCoefMatrix)(i,-5) = -1.0 * (*rHSCoefMatrix)(ist, 5);
+    (*rHSCoefMatrix)(i,-6) = -1.0 * (*rHSCoefMatrix)(ist, 6);
+    (*rHSCoefMatrix)(i,-7) = -1.0 * (*rHSCoefMatrix)(ist, 7);
+
+    Range N(0, nBoundary_Neumann + 1);
+    Range NN(-(nBoundary_Neumann + 1), 0);
+    (*boundary_Neumann_0)(N) = (*rHSCoefMatrix)(ist, N);
+    (*boundary_Neumann_N)(NN) = (*rHSCoefMatrix)(ied, NN);
+}
+
+void CompactDifferenceFirstDerivative::SetCompactDiffData_optC4(const int ist, const int ied)
+{
+}
+
+void CompactDifferenceFirstDerivative::SetCompactDiffData_optC4_InnerOnly(const int ist, const int ied, ExplicitDifferenceBoundary *DiffBoundaryData)
+{
+    minofLHSMatrixBound = -1; //<--- ���ģ�壬��߽���Сֵ  
+    maxofLHSMatrixBound =  1; //<--- ���ģ�壬�ұ߽����ֵ  
+    minofRHSMatrixBound = -4; //<--- �Ҳ�ģ�壬��߽���Сֵ  
+    maxofRHSMatrixBound =  4; //<--- �Ҳ�ģ�壬�ұ߽����ֵ  
+
+    nBoundary_Neumann = 3;
+    AllocCompactDiffData(ist, ied);
+
+    Range I (ist, ied);
+    Range IL(minofLHSMatrixBound, maxofLHSMatrixBound);
+    Range IR(minofRHSMatrixBound, maxofRHSMatrixBound);
+
+    (*lHSCoefMatrix)(I, IL) = 0.0;
+    (*rHSCoefMatrix)(I, IR) = 0.0;
+
+    double alpha_optC4 = 0.3717019586;              
+    double a_optC4 = (2.0 * alpha_optC4 + 4.0) / 3.0;
+    double b_optC4 = (4.0 * alpha_optC4 - 1.0) / 3.0;
+
+    // !inner points
+    (*lowerBoundofLHSCoefMatrix)(I) = -1;
+    (*upperBoundofLHSCoefMatrix)(I) = 1;
+    (*lHSCoefMatrix)(I, -1) = alpha_optC4;
+    (*lHSCoefMatrix)(I, 1) = alpha_optC4;
+    (*lHSCoefMatrix)(I, 0) = 1.0;
+
+    (*lowerBoundofRHSCoefMatrix)(I) = -2;
+    (*upperBoundofRHSCoefMatrix)(I) = 2;
+    (*rHSCoefMatrix)(I, 2) = b_optC4 / 4.0;
+    (*rHSCoefMatrix)(I, 1) = a_optC4 / 2.0;
+    (*rHSCoefMatrix)(I, -2) = -1.0 * (*rHSCoefMatrix)(I, 2);
+    (*rHSCoefMatrix)(I, -1) = -1.0 * (*rHSCoefMatrix)(I, 1);
+    (*rHSCoefMatrix)(I, 0) = 0.0;
+
+    // !left boundary, i = ist + 1
+    int i = ist + 1;
+    (*lHSCoefMatrix)(i, IL) = 0.0;
+    (*rHSCoefMatrix)(i, IR) = 0.0;
+
+    (*lowerBoundofLHSCoefMatrix)(i) = 0;
+    (*upperBoundofLHSCoefMatrix)(i) = 1;
+    (*lowerBoundofRHSCoefMatrix)(i) = -1;
+    (*upperBoundofRHSCoefMatrix)(i) = 2;
+
+    double alpha_bc2 = 0.4;
+
+    double bm1_C4BC2 = 1.0 / 6.0 * alpha_bc2 - 1.0 / 3.0; 
+    double b00_C4BC2 =      -1.0 * alpha_bc2 - 1.0 / 2.0;
+    double bp1_C4BC2 = 1.0 / 2.0 * alpha_bc2 + 1.0;
+    double bp2_C4BC2 = 1.0 / 3.0 * alpha_bc2 - 1.0 / 6.0; 
+
+    (*lHSCoefMatrix)(i, 0) = 1.0;
+    (*lHSCoefMatrix)(i, 1) = alpha_bc2;
+
+    (*rHSCoefMatrix)(i, -1) = bm1_C4BC2;
+    (*rHSCoefMatrix)(i, 0) = b00_C4BC2;
+    (*rHSCoefMatrix)(i, 1) = bp1_C4BC2;
+    (*rHSCoefMatrix)(i, 2) = bp2_C4BC2;
+
+    // !right boundary, i = ied - 1
+
+    i = ied - 1;
+
+    (*lHSCoefMatrix)(i, IL) = 0.0;
+    (*rHSCoefMatrix)(i, IR) = 0.0;
+
+    (*lowerBoundofLHSCoefMatrix)(i) = -1;
+    (*upperBoundofLHSCoefMatrix)(i) = 0;
+    (*lowerBoundofRHSCoefMatrix)(i) = -2;
+    (*upperBoundofRHSCoefMatrix)(i) = 1;
+
+    alpha_bc2 = 0.4;
+
+    (*lHSCoefMatrix)(i, 0) = 1.0;
+    (*lHSCoefMatrix)(i, -1) = alpha_bc2;
+
+    (*rHSCoefMatrix)(i, 1) = -1.0 * bm1_C4BC2;
+    (*rHSCoefMatrix)(i, 0) = -1.0 * b00_C4BC2;
+    (*rHSCoefMatrix)(i, -1) = -1.0 * bp1_C4BC2;
+    (*rHSCoefMatrix)(i, -2) = -1.0 * bp2_C4BC2;
+
+    // !left boundary, i = ist
+    i = ist;
+
+    (*lHSCoefMatrix)(i, IL) = 0.0;
+    (*rHSCoefMatrix)(i, IR) = 0.0;
+
+    (*lowerBoundofLHSCoefMatrix)(i) = 0;
+    (*upperBoundofLHSCoefMatrix)(i) = 0;
+    (*lowerBoundofRHSCoefMatrix)(i) = 0;
+    (*upperBoundofRHSCoefMatrix)(i) = 4;
+
+    (*lHSCoefMatrix)(i, 0) = 1.0;
+
+    RDouble1D *boundary_Neumann_0 = DiffBoundaryData -> boundary_Neumann_0;
+    (*rHSCoefMatrix)(i, 0) = (*boundary_Neumann_0)(0);
+    (*rHSCoefMatrix)(i, 1) = (*boundary_Neumann_0)(1);
+    (*rHSCoefMatrix)(i, 2) = (*boundary_Neumann_0)(2);
+    (*rHSCoefMatrix)(i, 3) = (*boundary_Neumann_0)(3);
+    (*rHSCoefMatrix)(i, 4) = (*boundary_Neumann_0)(4);
+
+    // !right boundary, i = ied
+    i = ied;
+
+    (*lHSCoefMatrix)(i, IL) = 0.0;
+    (*rHSCoefMatrix)(i, IR) = 0.0;
+
+    (*lowerBoundofLHSCoefMatrix)(i) = 0;
+    (*upperBoundofLHSCoefMatrix)(i) = 0;
+    (*lowerBoundofRHSCoefMatrix)(i) = -4;
+    (*upperBoundofRHSCoefMatrix)(i) = 0;
+
+    (*lHSCoefMatrix)(i, 0) = 1.0;
+
+    (*rHSCoefMatrix)(i, 0) = -1.0 * (*boundary_Neumann_0)(0);
+    (*rHSCoefMatrix)(i, -1) = -1.0 * (*boundary_Neumann_0)(1);
+    (*rHSCoefMatrix)(i, -2) = -1.0 * (*boundary_Neumann_0)(2);
+    (*rHSCoefMatrix)(i, -3) = -1.0 * (*boundary_Neumann_0)(3);
+    (*rHSCoefMatrix)(i, -4) = -1.0 * (*boundary_Neumann_0)(4);
+}
+
+void CompactDifferenceFirstDerivative::GetGradientVector( PHComplex *varAddress, PHComplex *dUdX, PHComplex *dUdY, PHComplex *dUdZ, Complex1D *varTemp, Complex1D *dvarTemp, 
+                                                         Complex1D *workSpace1, RDouble1D *workSpace2, SpecDiffHybGrid *GridData )
+{
+    int ist = GridData -> iStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex  ;
+    int jst = GridData -> jStartFourierIndex;
+    int jed = GridData -> jEndFourierIndex  ;
+    int kst = GridData -> kStartFourierIndex;
+    int ked = GridData -> kEndFourierIndex;
+
+    Complex1D *kx = GridData -> complexKX;
+    Complex1D *ky = GridData -> complexKY;
+    Range I(ist, ied);
+    Range J(jst, jed);
+    Range K(kst, ked);
+    Complex3D var( varAddress, I, J, K, neverDeleteData, fortranArray );
+    Complex3D dVardX( dUdX, I, J, K, neverDeleteData, fortranArray );
+    Complex3D dVardY( dUdY, I, J, K, neverDeleteData, fortranArray );
+    Complex3D dVardZ( dUdZ, I, J, K, neverDeleteData, fortranArray );
+
+    for( int ix = kst; ix <= ked; ++ix)
+    {
+        for( int iy = jst; iy <= jed; ++iy)
+        {
+            for( int iz = ist; iz <= ied; ++iz)
+            {
+                dVardX(iz, iy, ix) = (*kx)(ix) * var(iz, iy, ix);
+                dVardY(iz, iy, ix) = (*ky)(iy) * var(iz, iy, ix);
+            }
+        }
+    }
+
+    // !Get gradient in direction z
+    GetDvarDz( GridData, &var, &dVardZ, varTemp, dvarTemp, workSpace1, workSpace2 );
+}
+
+void CompactDifferenceFirstDerivative::GetDivergence( PHComplex *vecX, PHComplex *vecY, PHComplex *vecZ, Complex3D *divVar, Complex1D *varTemp, Complex1D *dVarTemp, Complex3D *dVardZ, 
+                                                     Complex1D *workSpace1, RDouble1D *workSpace2, SpecDiffHybGrid *GridData )
+{
+    int ist = GridData -> iStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex  ;
+    int jst = GridData -> jStartFourierIndex;
+    int jed = GridData -> jEndFourierIndex  ;
+    int kst = GridData -> kStartFourierIndex;
+    int ked = GridData -> kEndFourierIndex;
+    Range I(ist, ied);
+    Range J(jst, jed);
+    Range K(kst, ked);
+    Complex3D vecVarX( vecX, I, J, K, neverDeleteData, fortranArray );
+    Complex3D vecVarY( vecY, I, J, K, neverDeleteData, fortranArray );
+    Complex3D vecVarZ( vecZ, I, J, K, neverDeleteData, fortranArray );
+
+    Complex1D *kx = GridData -> complexKX;
+    Complex1D *ky = GridData -> complexKY;
+
+    (*divVar)(I, J, K) = PHComplex(0.0, 0.0);
+    for( int ix = kst; ix <= ked; ++ix)
+    {
+        for( int iy = jst; iy <= jed; ++iy)
+        {
+            for( int iz = ist; iz <= ied; ++iz)
+            {
+                (*divVar)(iz, iy, ix) = (*divVar)(iz, iy, ix) + (*kx)(ix) * vecVarX(iz, iy, ix) + (*ky)(iy) * vecVarY(iz, iy, ix);
+            }
+        }
+    }
+
+    GetDvarDz( GridData, &vecVarZ, dVardZ, varTemp, dVarTemp, workSpace1, workSpace2 );
+    (*divVar)(I, J, K) = (*divVar)(I, J, K) + (*dVardZ)(I, J, K);
+}
+
+void CompactDifferenceFirstDerivative::GetDvarDz( SpecDiffHybGrid *GridData, Complex3D *var, Complex3D *dVardZ, Complex1D *varTemp, Complex1D *dvarTemp, Complex1D *workSpace1,
+                                                 RDouble1D *workSpace2 )
+{
+    int ist = GridData -> iStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex  ;
+    int jst = GridData -> jStartFourierIndex;
+    int jed = GridData -> jEndFourierIndex  ;
+    int kst = GridData -> kStartFourierIndex;
+    int ked = GridData -> kEndFourierIndex;
+    RDouble1D *detaDz = GridData -> realDetaDz;
+    Range I(ist, ied);
+
+    for( int ix = kst; ix <= ked; ++ix )
+    {
+        for( int iy = jst; iy <= jed; ++iy )
+        {
+            (*varTemp)(I) = (*var)(I, iy, ix);
+            GetFirstDerivative(1, ist, ied, varTemp, dvarTemp, lowerBoundofRHSCoefMatrix, upperBoundofRHSCoefMatrix, lHSCoefMatrix, rHSCoefMatrix, workSpace1, workSpace2);
+            (*dVardZ)(I, iy, ix) = (*dvarTemp)(I) * (*detaDz)(I);
+        }
+    }
+}
+
+void CompactDifferenceFirstDerivative::GetDvarDz( const int ist, const int ied, RDouble *deta, RDouble *v, RDouble *dV, RDouble *cR, RDouble *rC )
+{		
+    RDouble1D detaDz( deta, Range(ist, ied), neverDeleteData, fortranArray);
+    RDouble1D var( v, Range(ist, ied), neverDeleteData, fortranArray );
+    RDouble1D dVardZ( dV, Range(ist, ied), neverDeleteData, fortranArray );
+    RDouble1D workSpace1( cR, Range(ist, ied), neverDeleteData, fortranArray );
+    RDouble1D workSpace2( rC, Range(ist, ied), neverDeleteData, fortranArray );
+    GetFirstDerivative( 1, ist, ied, &var, &dVardZ, lowerBoundofRHSCoefMatrix, upperBoundofRHSCoefMatrix, lHSCoefMatrix, rHSCoefMatrix, &workSpace1, &workSpace2);
+    for ( int i = ist; i <= ied; ++i )
+    {
+        dVardZ(i) = dVardZ(i) * detaDz(i);
+    }
+}
+
+void CompactDifferenceFirstDerivative::GetDvarDz( const int ist, const int ied, RDouble *deta, PHComplex *v, PHComplex *dV, PHComplex *cR, RDouble *rC )
+{		
+    RDouble1D detaDz( deta, Range(ist, ied), neverDeleteData, fortranArray);
+    Complex1D var( v, Range(ist, ied), neverDeleteData, fortranArray );
+    Complex1D dVardZ( dV, Range(ist, ied), neverDeleteData, fortranArray );
+    Complex1D workSpace1( cR, Range(ist, ied), neverDeleteData, fortranArray );
+    RDouble1D workSpace2( rC, Range(ist, ied), neverDeleteData, fortranArray );
+
+    GetFirstDerivative( 1, ist, ied, &var, &dVardZ, lowerBoundofRHSCoefMatrix, upperBoundofRHSCoefMatrix, lHSCoefMatrix, rHSCoefMatrix, &workSpace1, &workSpace2);
+
+    Range I(ist, ied);
+    dVardZ(I) = dVardZ(I) * detaDz(I);
+}
+
+void CompactDifferenceFirstDerivative::GetDetaDz( SpecDiffHybGrid *GridData )
+{		
+    int ist = GridData -> iStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex  ;
+    RDouble1D *Z      = GridData -> realZ;
+    RDouble1D *detaDz = GridData -> realDetaDz;
+
+    Range I (ist, ied);
+    RDouble1D *realWorkSpace1 = new RDouble1D(I, fortranArray);
+    RDouble1D *realWorkSpace2 = new RDouble1D(I, fortranArray);
+
+    GetFirstDerivative(1, ist, ied, Z, detaDz, lowerBoundofRHSCoefMatrix, upperBoundofRHSCoefMatrix, lHSCoefMatrix, rHSCoefMatrix, realWorkSpace1, realWorkSpace2);
+    for (int i = ist; i <= ied; ++i)
+    {
+        (*detaDz)(i) = 1.0 / (*detaDz)(i);
+    }
+
+    delete realWorkSpace1; realWorkSpace1 = NULL;
+    delete realWorkSpace2; realWorkSpace2 = NULL;
+}
+
+void CompactDifferenceFirstDerivative::GetFirstDerivative( const int neqn, const int ist, const int ied, RDouble1D *var, RDouble1D *dvar, Int1D *lowerBound_RHS, 
+                                                          Int1D *upperBound_RHS, RDouble2D *coeff_LHS, RDouble2D *coeff_RHS, RDouble1D *WorkSpace1,
+                                                          RDouble1D *WorkSpace2 )
+{
+    int n = ied - ist + 1;
+    Range I(ist, ied);
+    (*dvar)(I) = 0.0;
+
+    for (int i = ist; i <= ied; ++i)
+    {
+        for ( int idp = (*lowerBound_RHS)(i); idp <= (*upperBound_RHS)(i); ++idp)
+        {
+            int iip = i + idp;
+            (*dvar)(i) = (*dvar)(i) + (*coeff_RHS)(i, idp) * (*var)(iip);
+        }
+    }
+
+    for (int ieq = 1; ieq <= neqn; ++ieq)
+    {
+        Tridiag_scalar(n, &(*coeff_LHS)(ist, -1), &(*coeff_LHS)(ist, 0), &(*coeff_LHS)(ist, 1), &(*dvar)(ist), &(*WorkSpace1)(ist), &(*WorkSpace2)(ist));
+    }
+}
+
+void CompactDifferenceFirstDerivative::GetFirstDerivative( const int neqn, const int ist, const int ied, Complex1D *var, Complex1D *dvar, Int1D *lowerBound_RHS, 
+                                                          Int1D *upperBound_RHS, RDouble2D *coeff_LHS, RDouble2D *coeff_RHS, Complex1D *WorkSpace1,
+                                                          RDouble1D *WorkSpace2 )
+{
+    int n = ied - ist + 1;
+    Range I(ist, ied);
+    (*dvar)(I) = PHComplex(0.0, 0.0);
+
+    for (int i = ist; i <= ied; ++i)
+    {
+        for ( int idp = (*lowerBound_RHS)(i); idp <= (*upperBound_RHS)(i); ++idp)
+        {
+            int iip = i + idp;
+            (*dvar)(i) = (*dvar)(i) + (*coeff_RHS)(i, idp) * (*var)(iip);
+        }
+    }
+
+    for (int ieq = 1; ieq <= neqn; ++ieq)
+    {
+        Tridiag_scalar(n, &(*coeff_LHS)(ist, -1), &(*coeff_LHS)(ist, 0), &(*coeff_LHS)(ist, 1), &(*dvar)(ist), &(*WorkSpace1)(ist), &(*WorkSpace2)(ist) );
+    }
+}
+
+void CompactDifferenceFirstDerivative::Tridiag_scalar(const int n, RDouble *a_in, RDouble *b_in, RDouble *c_in, RDouble *x_in, RDouble *ry_in, RDouble *rc_in)
+{
+    RDouble1D a(a_in, Range(1, n), neverDeleteData, fortranArray);
+    RDouble1D b(b_in, Range(1, n), neverDeleteData, fortranArray);
+    RDouble1D c(c_in, Range(1, n), neverDeleteData, fortranArray);
+    RDouble1D x(x_in, Range(1, n), neverDeleteData, fortranArray);
+    RDouble1D ry(ry_in, Range(1, n), neverDeleteData, fortranArray);
+    RDouble1D rc(rc_in, Range(1, n), neverDeleteData, fortranArray);
+
+    double r = 1.0/b(1);
+    rc(1) = r * c(1);
+    ry(1) = r * x(1);
+    for(int i = 2; i <= n ; ++i)
+    {
+        r = 1.0/( b(i) - rc(i-1) * a(i) );
+        ry(i) = r * ( x(i) - a(i) * ry(i-1) );
+        rc(i) = r * c(i);
+    }
+
+    x(n) = ry(n);
+    for(int i = n-1 ; i >= 1 ; --i)
+    {
+        x(i) = ry(i) - rc(i) * x(i+1);
+    }
+}
+
+void CompactDifferenceFirstDerivative::Tridiag_scalar(const int n, RDouble *a_in, RDouble *b_in, RDouble *c_in, PHComplex *cx_in, PHComplex *cy_in, RDouble *rc_in)
+{
+    RDouble1D a(a_in, Range(1, n), neverDeleteData, fortranArray);
+    RDouble1D b(b_in, Range(1, n), neverDeleteData, fortranArray);
+    RDouble1D c(c_in, Range(1, n), neverDeleteData, fortranArray);
+    Complex1D cx(cx_in, Range(1, n), neverDeleteData, fortranArray);
+    Complex1D cy(cy_in, Range(1, n), neverDeleteData, fortranArray);
+    RDouble1D rc(rc_in, Range(1, n), neverDeleteData, fortranArray);
+
+    double r = 1.0/b(1);
+    rc(1) = r * c(1);
+    cy(1) = r * cx(1);
+    for(int i = 2; i <= n ; ++i)
+    {
+        r = 1.0/( b(i) - rc(i-1) * a(i) );
+        cy(i) = r * ( cx(i) - a(i) * cy(i-1) );
+        rc(i) = r * c(i);
+    }
+
+    cx(n) = cy(n);
+    for(int i = n-1 ; i >= 1 ; --i)
+    {
+        cx(i) = cy(i) - rc(i) * cx(i+1);
+    }
+}
+
+void CompactDifferenceFirstDerivative::AllocCompactDiffData(const int ist, const int ied)
+{
+    Range N (0, nBoundary_Neumann + 1 );
+    Range NN(-(nBoundary_Neumann + 1), 0);
+    boundary_Neumann_0 = new RDouble1D(N, fortranArray);
+    boundary_Neumann_N = new RDouble1D(NN, fortranArray);
+
+    Range I (ist, ied);
+    Range IL(minofLHSMatrixBound, maxofLHSMatrixBound);
+    Range IR(minofRHSMatrixBound, maxofRHSMatrixBound);
+    lowerBoundofLHSCoefMatrix = new Int1D(I, fortranArray);
+    upperBoundofLHSCoefMatrix = new Int1D(I, fortranArray);
+    lowerBoundofRHSCoefMatrix = new Int1D(I, fortranArray);
+    upperBoundofRHSCoefMatrix = new Int1D(I, fortranArray);
+    lHSCoefMatrix = new RDouble2D(I, IL, fortranArray);
+    rHSCoefMatrix = new RDouble2D(I, IR, fortranArray);
+}
+
+CompactDifferenceFirstDerivative::~CompactDifferenceFirstDerivative()
+{
+    delete boundary_Neumann_0; boundary_Neumann_0 = NULL;
+    delete boundary_Neumann_N; boundary_Neumann_N = NULL;
+    delete lowerBoundofLHSCoefMatrix; lowerBoundofLHSCoefMatrix = NULL;
+    delete upperBoundofLHSCoefMatrix; upperBoundofLHSCoefMatrix = NULL;
+    delete lowerBoundofRHSCoefMatrix; lowerBoundofRHSCoefMatrix = NULL;
+    delete upperBoundofRHSCoefMatrix; upperBoundofRHSCoefMatrix = NULL;
+    delete lHSCoefMatrix; lHSCoefMatrix = NULL;
+    delete rHSCoefMatrix; rHSCoefMatrix = NULL;
+}
+}
+
diff --git a/CFD/SpecDiffHybSolver/src/CompactDifferenceSecondDerivative.cpp b/CFD/SpecDiffHybSolver/src/CompactDifferenceSecondDerivative.cpp
new file mode 100644
index 0000000..44344ba
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/src/CompactDifferenceSecondDerivative.cpp
@@ -0,0 +1,757 @@
+#include "DataStruct_Array.h"
+#include "GlobalDataBase.h"
+#include <math.h>
+#include "CompactDifferenceSecondDerivative.h"
+#include "PoissonSolver.h"
+#include "TK_Exit.h"
+#include "PHHeader.h"
+#include "PHMpi.h"
+#include <iostream>
+#include <sstream>
+#include <cstdlib>
+
+using namespace std;
+
+namespace PHSPACE
+{
+CompactDifferenceSecondDerivative::CompactDifferenceSecondDerivative()
+{
+}
+
+void CompactDifferenceSecondDerivative::InitCompactDifferenceSecondDerivativeData(SpecDiffHybGrid *GridData)
+{
+    AllocCompactDifferenceSecondDerivativeData(GridData);		
+
+    SetCompactDifferenceSecondDerivativeData(GridData);   
+}
+
+void CompactDifferenceSecondDerivative::AllocCompactDifferenceSecondDerivativeData(SpecDiffHybGrid *GridData)
+{
+    int ist = GridData -> iStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex;
+
+    int iplst = ist + 1;
+    int ipled = ied - 1;
+
+    Range IP (iplst, ipled);
+    lowerBoundofLHSCoefMatrix = new Int1D(IP, fortranArray);
+    upperBoundofLHSCoefMatrix = new Int1D(IP, fortranArray);
+    lowerBoundofRHSCoefMatrix = new Int1D(IP, fortranArray);
+    upperBoundofRHSCoefMatrix = new Int1D(IP, fortranArray);
+
+    Range J (-2, 2);
+    lHSCoefMatrix = new RDouble2D(IP, J, fortranArray);
+    rHSCoefMatrix = new RDouble2D(IP, J, fortranArray);
+    coefd2L = new RDouble2D(IP, J, fortranArray);
+    coefd2R = new RDouble2D(IP, J, fortranArray);
+    coefLUDecp = new RDouble2D(IP, J, fortranArray);
+
+    coefOfLHSBoundary0 = new RDouble1D(J, fortranArray);
+    coefOfLHSBoundaryN = new RDouble1D(J, fortranArray);
+    coefOfRHSBoundary0 = new RDouble1D(J, fortranArray);
+    coefOfRHSBoundaryN = new RDouble1D(J, fortranArray);
+}
+
+void CompactDifferenceSecondDerivative::SetCompactDifferenceSecondDerivativeData(SpecDiffHybGrid *GridData)
+{
+    int ist = GridData -> iStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex;
+
+    int nn = ied - ist;
+    RDouble1D *Z = GridData -> realZ;
+
+    Range I(ist, ied);
+    Range J(-2, 2);
+    RDouble2D *coef_d2L = new RDouble2D(I, J, fortranArray);
+    RDouble2D *coef_d2R = new RDouble2D(I, J, fortranArray);
+
+    GetCoefMatrix( nn, &(*coef_d2L)(ist, -2), &(*coef_d2L)(ist, -1), &(*coef_d2L)(ist, 0), &(*coef_d2L)(ist, 1), &(*coef_d2L)(ist, 2),
+        &(*coef_d2R)(ist, -2), &(*coef_d2R)(ist, -1), &(*coef_d2R)(ist, 0), &(*coef_d2R)(ist, 1), &(*coef_d2R)(ist, 2), &(*Z)(ist) );
+
+    Range IP(ist + 1, ied - 1);
+    (*coefLUDecp)(IP, J) = (*coef_d2L)(IP, J);
+    (*coefd2L)(IP, J) = (*coef_d2L)(IP, J);
+    (*coefd2R)(IP, J) = (*coef_d2R)(IP, J);
+
+    PoissonSolver::LUDecompose(nn - 1, &(*coefLUDecp)(ist+1, -2));
+
+    (*coefOfLHSBoundary0)(J) = (*coef_d2L)(ist, J);
+    (*coefOfLHSBoundaryN)(J) = (*coef_d2L)(ied, J);
+    (*coefOfRHSBoundary0)(J) = (*coef_d2R)(ist, J);
+    (*coefOfRHSBoundaryN)(J) = (*coef_d2R)(ied, J);
+
+    (*lHSCoefMatrix)(IP, J) = (*coefd2L)(IP, J);
+    (*rHSCoefMatrix)(IP, J) = (*coefd2R)(IP, J);
+
+    // !set lowerBoundofLHSCoefMatrix, upperBoundofLHSCoefMatrix, lowerBoundofRHSCoefMatrix, upperBoundofRHSCoefMatrix
+    // !inner points
+    (*lowerBoundofLHSCoefMatrix)(IP) = -2;
+    (*upperBoundofLHSCoefMatrix)(IP) =  2;
+    (*lowerBoundofRHSCoefMatrix)(IP) = -2;
+    (*upperBoundofRHSCoefMatrix)(IP) =  2;
+
+    // !left boundary: i = ist + 1
+    int i = ist + 1;
+    (*lowerBoundofLHSCoefMatrix)(i) =  0;
+    (*lowerBoundofRHSCoefMatrix)(i) = -1;
+
+    // !left boundary: i = ist + 2
+    i = ist + 2;
+    (*lowerBoundofLHSCoefMatrix)(i) = -1;
+
+    // !right boundary: i = ied - 2
+    i = ied - 2;
+    (*upperBoundofLHSCoefMatrix)(i) =  1;
+
+    // !right boundary: i = ied - 1
+    i = ied - 1;
+    (*upperBoundofLHSCoefMatrix)(i) =  0;
+    (*upperBoundofRHSCoefMatrix)(i) =  1;
+
+    delete coef_d2L; coef_d2L = NULL;
+    delete coef_d2R; coef_d2R = NULL;
+}
+
+void CompactDifferenceSecondDerivative::GetCoefMatrix( const int mz, RDouble *ben , RDouble *aln , RDouble *aaa , RDouble *alp , RDouble *bep ,
+                                                      RDouble *an2 , RDouble *an1 , RDouble *a00 , RDouble *ap1 , RDouble *ap2 , RDouble *x )
+{
+    RDouble1D *rb, *rb0, *rb1, *rb2;
+    RDouble2D *rA, *rA0, *rA1, *rA2;
+
+    Range I9 (1, 9);
+    Range I8 (1, 8);
+    Range I6 (1, 6);
+    Range I5 (1, 5);
+
+    rb  = new RDouble1D(I9, fortranArray);
+    rA  = new RDouble2D(I9, I9, fortranArray);
+
+    rb0 = new RDouble1D(I5, fortranArray);
+    rA0 = new RDouble2D(I5, I5, fortranArray);
+
+    rb1 = new RDouble1D(I6, fortranArray);
+    rA1 = new RDouble2D(I6, I6, fortranArray);
+
+    rb2 = new RDouble1D(I8, fortranArray);
+    rA2 = new RDouble2D(I8, I8, fortranArray);
+
+    int i = 0;
+    for(i = 0; i <= mz; ++i)
+    {
+        aaa[i] = 1.0;
+        ben[i] = 0.0;
+        aln[i] = 0.0;
+        alp[i] = 0.0;
+        bep[i] = 0.0;
+        an2[i] = 0.0;
+        an1[i] = 0.0;
+        a00[i] = 0.0;
+        ap1[i] = 0.0;
+        ap2[i] = 0.0;
+    }
+
+    // left boundary: i = 0
+    i = 0;
+
+    (*rA0)(1, 1) = 0.0;
+    (*rA0)(1, 2) = 0.0;
+    (*rA0)(1, 3) = 1.0;
+    (*rA0)(1, 4) = 1.0;
+    (*rA0)(1, 5) = 1.0;
+    (*rb0)(1) = 0.0;
+
+    (*rA0)(2, 1) = 0.0;
+    (*rA0)(2, 2) = 0.0;
+    (*rA0)(2, 3) = 0.0;
+    (*rA0)(2, 4) = x[i+1] - x[i];
+    (*rA0)(2, 5) = x[i+2] - x[i];
+    (*rb0)(2) = 0.0;
+
+    (*rA0)(3, 1) = 2.0;
+    (*rA0)(3, 2) = 2.0;
+    (*rA0)(3, 3) = 0.0;
+    (*rA0)(3, 4) = -pow(x[i+1] - x[i], 2.0);
+    (*rA0)(3, 5) = -pow(x[i+2] - x[i], 2.0);
+    (*rb0)(3) = -2.0;
+
+    for ( int n = 4 ; n <= 5 ; ++n )
+    {
+        int k = n - 2;
+        (*rA0)(n, 1) = k * (k + 1) * pow(x[i+1]-x[i], k-1);
+        (*rA0)(n, 2) = k * (k + 1) * pow(x[i+2]-x[i], k-1);
+        (*rA0)(n, 3) = 0.0 ;
+        (*rA0)(n, 4) = - pow(x[i+1]-x[i], k+1);
+        (*rA0)(n, 5) = - pow(x[i+2]-x[i], k+1);
+        (*rb0)(n) = 0.0;
+    }
+
+    Gaussj(&(*rA0)(1, 1), 5, 5, &(*rb0)(1), 1, 1);
+
+    ben[i] = 0.0; 
+    aln[i] = 0.0; 
+    alp[i] = (*rb0)(1); 
+    bep[i] = (*rb0)(2);	
+    an2[i] = 0.0; 
+    an1[i] = 0.0; 
+    a00[i] = (*rb0)(3); 
+    ap1[i] = (*rb0)(4); 
+    ap2[i] = (*rb0)(5);
+
+    // left boundary: i = 1
+    i = 1;
+
+    (*rA1)(1, 1) = 0.0;
+    (*rA1)(1, 2) = 0.0;
+    (*rA1)(1, 3) = 1.0;
+    (*rA1)(1, 4) = 1.0;
+    (*rA1)(1, 5) = 1.0;
+    (*rA1)(1, 6) = 1.0;
+    (*rb1)(1) = 0.0;
+
+    (*rA1)(2, 1) = 0.0;
+    (*rA1)(2, 2) = 0.0;
+    (*rA1)(2, 3) = x[i-1] - x[i];
+    (*rA1)(2, 4) = 0.0;
+    (*rA1)(2, 5) = x[i+1] - x[i];
+    (*rA1)(2, 6) = x[i+2] - x[i];
+    (*rb1)(2 ) = 0.0;
+
+    (*rA1)(3, 1) = 2.0;
+    (*rA1)(3, 2) = 2.0;
+    (*rA1)(3, 3) = - pow(x[i-1] - x[i], 2.0);
+    (*rA1)(3, 4) = 0.0;
+    (*rA1)(3, 5) = - pow(x[i+1] - x[i], 2.0);
+    (*rA1)(3, 6) = - pow(x[i+2] - x[i], 2.0);
+    (*rb1)(3) = - 2.0;
+
+    for ( int n = 4 ; n <= 6 ; ++n )
+    {
+        int k = n - 2;
+        (*rA1)(n, 1) = k * (k+1) * pow(x[i+1] - x[i], k-1);
+        (*rA1)(n, 2) = k * (k+1) * pow(x[i+2] - x[i], k-1);
+        (*rA1)(n, 3) = - pow(x[i-1] - x[i], k+1);
+        (*rA1)(n, 4) = 0.0;
+        (*rA1)(n, 5) = - pow(x[i+1] - x[i], k+1);
+        (*rA1)(n, 6) = - pow(x[i+2] - x[i], k+1);
+        (*rb1)(n) = 0.0  ;
+    }
+
+    Gaussj(&(*rA1)(1, 1), 6, 6, &(*rb1)(1), 1, 1);
+
+    ben[i] = 0.0; 
+    aln[i] = 0.0; 
+    alp[i] = (*rb1)(1); 
+    bep[i] = (*rb1)(2);	
+    an2[i] = 0.0; 
+    an1[i] = (*rb1)(3); 
+    a00[i] = (*rb1)(4); 
+    ap1[i] = (*rb1)(5); 
+    ap2[i] = (*rb1)(6);
+
+    // left boundary: i = 2
+    i = 2;
+
+    (*rA2)(1, 1) = 0.0;
+    (*rA2)(1, 2) = 0.0;
+    (*rA2)(1, 3) = 0.0;
+    (*rA2)(1, 4) = 1.0;
+    (*rA2)(1, 5) = 1.0;
+    (*rA2)(1, 6) = 1.0;
+    (*rA2)(1, 7) = 1.0;
+    (*rA2)(1, 8) = 1.0;
+    (*rb2)(1) = 0.0;
+
+    (*rA2)(2, 1) = 0.0;
+    (*rA2)(2, 2) = 0.0;
+    (*rA2)(2, 3) = 0.0;
+    (*rA2)(2, 4) = x[i-2] - x[i];
+    (*rA2)(2, 5) = x[i-1] - x[i];
+    (*rA2)(2, 6) = 0.0;
+    (*rA2)(2, 7) = x[i+1] - x[i];
+    (*rA2)(2, 8) = x[i+2] - x[i];
+    (*rb2)(2) = 0.0;
+
+    (*rA2)(3, 1) = 2.0;
+    (*rA2)(3, 2) = 2.0;
+    (*rA2)(3, 3) = 2.0;
+    (*rA2)(3, 4) = - pow(x[i-2] - x[i], 2.0);
+    (*rA2)(3, 5) = - pow(x[i-1] - x[i], 2.0);
+    (*rA2)(3, 6) = 0.0;
+    (*rA2)(3, 7) = - pow(x[i+1] - x[i], 2.0);
+    (*rA2)(3, 8) = - pow(x[i+2] - x[i], 2.0);
+    (*rb2)(3) = - 2.0;
+
+    for (int n = 4; n <= 8; ++n)
+    {
+        int k = n - 2;
+        (*rA2)(n, 1) = k * (k+1) * pow(x[i-1] - x[i], k-1);
+        (*rA2)(n, 2) = k * (k+1) * pow(x[i+1] - x[i], k-1);
+        (*rA2)(n, 3) = k * (k+1) * pow(x[i+2] - x[i], k-1);
+        (*rA2)(n, 4) = - pow(x[i-2] - x[i], k+1);
+        (*rA2)(n, 5) = - pow(x[i-1] - x[i], k+1);
+        (*rA2)(n, 6) = 0.0;
+        (*rA2)(n, 7) = - pow(x[i+1] - x[i], k+1);
+        (*rA2)(n, 8) = - pow(x[i+2] - x[i], k+1);
+        (*rb2)(n) = 0.0;
+    }
+
+    Gaussj(&(*rA2)(1, 1), 8, 8, &(*rb2)(1), 1, 1);
+
+    ben[i] = 0.0; 
+    aln[i] = (*rb2)(1); 
+    alp[i] = (*rb2)(2); 
+    bep[i] = (*rb2)(3);	
+    an2[i] = (*rb2)(4); 
+    an1[i] = (*rb2)(5); 
+    a00[i] = (*rb2)(6); 
+    ap1[i] = (*rb2)(7); 
+    ap2[i] = (*rb2)(8);
+
+    // right boundary: i = mz - 2
+    i = mz - 2;
+
+    (*rA2)(1, 1) = 0.0;
+    (*rA2)(1, 2) = 0.0;
+    (*rA2)(1, 3) = 0.0;
+    (*rA2)(1, 4) = 1.0;
+    (*rA2)(1, 5) = 1.0;
+    (*rA2)(1, 6) = 1.0;
+    (*rA2)(1, 7) = 1.0;
+    (*rA2)(1, 8) = 1.0;
+    (*rb2)(1) = 0.0;
+
+    (*rA2)(2, 1) = 0.0;
+    (*rA2)(2, 2) = 0.0;
+    (*rA2)(2, 3) = 0.0;
+    (*rA2)(2, 4) = x[i-2] - x[i];
+    (*rA2)(2, 5) = x[i-1] - x[i];
+    (*rA2)(2, 6) = 0.0;
+    (*rA2)(2, 7) = x[i+1] - x[i];
+    (*rA2)(2, 8) = x[i+2] - x[i];
+    (*rb2)(2) = 0.0;
+
+    (*rA2)(3, 1) = 2.0;
+    (*rA2)(3, 2) = 2.0;
+    (*rA2)(3, 3) = 2.0;
+    (*rA2)(3, 4) = - pow(x[i-2] - x[i], 2.0);
+    (*rA2)(3, 5) = - pow(x[i-1] - x[i], 2.0);
+    (*rA2)(3, 6) = 0.0;
+    (*rA2)(3, 7) = - pow(x[i+1] - x[i], 2.0);
+    (*rA2)(3, 8) = - pow(x[i+2] - x[i], 2.0);
+    (*rb2)(3) = - 2.0;
+
+    for ( int n = 4 ; n <= 8 ; ++n )
+    {
+        int k = n - 2;
+        (*rA2)(n, 1) = k * (k+1) * pow(x[i-2] - x[i], k-1);
+        (*rA2)(n, 2) = k * (k+1) * pow(x[i-1] - x[i], k-1);
+        (*rA2)(n, 3) = k * (k+1) * pow(x[i+1] - x[i], k-1);
+        (*rA2)(n, 4) = - pow(x[i-2] - x[i], k+1);
+        (*rA2)(n, 5) = - pow(x[i-1] - x[i], k+1);
+        (*rA2)(n, 6) = 0.0;
+        (*rA2)(n, 7) = - pow(x[i+1] - x[i], k+1);
+        (*rA2)(n, 8) = - pow(x[i+2] - x[i], k+1);
+        (*rb2)(n) = 0.0;
+    }
+
+    Gaussj(&(*rA2)(1, 1), 8, 8, &(*rb2)(1), 1, 1);
+
+    ben[i] = (*rb2)(1); 
+    aln[i] = (*rb2)(2); 
+    alp[i] = (*rb2)(3); 
+    bep[i] = 0.0;	
+    an2[i] = (*rb2)(4); 
+    an1[i] = (*rb2)(5); 
+    a00[i] = (*rb2)(6); 
+    ap1[i] = (*rb2)(7); 
+    ap2[i] = (*rb2)(8);
+
+    // right boundary: i = mz - 1
+    i = mz - 1;
+
+    (*rA1)(1, 1) = 0.0;
+    (*rA1)(1, 2) = 0.0;
+    (*rA1)(1, 3) = 1.0;
+    (*rA1)(1, 4) = 1.0;
+    (*rA1)(1, 5) = 1.0;
+    (*rA1)(1, 6) = 1.0;
+    (*rb1)(1) = 0.0;
+
+    (*rA1)(2, 1) = 0.0;
+    (*rA1)(2, 2) = 0.0;
+    (*rA1)(2, 3) = x[i-2] - x[i];
+    (*rA1)(2, 4) = x[i-1] - x[i];
+    (*rA1)(2, 5) = 0.0;
+    (*rA1)(2, 6) = x[i+1] - x[i];
+    (*rb1)(2) = 0.0;
+
+    (*rA1)(3, 1) = 2.0;
+    (*rA1)(3, 2) = 2.0;
+    (*rA1)(3, 3) = - pow(x[i-2] - x[i], 2.0);
+    (*rA1)(3, 4) = - pow(x[i-1] - x[i], 2.0);
+    (*rA1)(3, 5) = 0.0;
+    (*rA1)(3, 6) = - pow(x[i+1] - x[i], 2.0);
+    (*rb1)(3) = - 2.0;
+
+    for (int n = 4; n <= 6; ++n)
+    {
+        int k = n - 2;
+        (*rA1)(n, 1) = k * (k+1) * pow(x[i-2] - x[i], k-1);
+        (*rA1)(n, 2) = k * (k+1) * pow(x[i-1] - x[i], k-1);
+        (*rA1)(n, 3) =           - pow(x[i-2] - x[i], k+1);
+        (*rA1)(n, 4) =           - pow(x[i-1] - x[i], k+1);
+        (*rA1)(n, 5) = 0.0;
+        (*rA1)(n, 6) = - pow(x[i+1] - x[i], k+1);
+        (*rb1)(n) = 0.0;
+    }
+
+    Gaussj(&(*rA1)(1, 1), 6, 6, &(*rb1)(1), 1, 1);
+
+    ben[i] = (*rb1)(1); 
+    aln[i] = (*rb1)(2); 
+    alp[i] = 0.0; 
+    bep[i] = 0.0;	
+    an2[i] = (*rb1)(3); 
+    an1[i] = (*rb1)(4); 
+    a00[i] = (*rb1)(5); 
+    ap1[i] = (*rb1)(6); 
+    ap2[i] = 0.0;
+
+    //right boundary: i = mz;
+    i = mz;
+
+    (*rA0)(1, 1) = 0.0;
+    (*rA0)(1, 2) = 0.0;
+    (*rA0)(1, 3) = 1.0;
+    (*rA0)(1, 4) = 1.0;
+    (*rA0)(1, 5) = 1.0;
+    (*rb0)(1) = 0.0;
+
+    (*rA0)(2, 1) = 0.0;
+    (*rA0)(2, 2) = 0.0;
+    (*rA0)(2, 3) = x[i-2] - x[i];
+    (*rA0)(2, 4) = x[i-1] - x[i];
+    (*rA0)(2, 5) = 0.0;
+    (*rb0)(2) = 0.0;
+
+    (*rA0)(3, 1) = 2.0;
+    (*rA0)(3, 2) = 2.0;
+    (*rA0)(3, 3) = -pow(x[i-2] - x[i], 2.0);
+    (*rA0)(3, 4) = -pow(x[i-1] - x[i], 2.0);
+    (*rA0)(3, 5) = 0.0;
+    (*rb0)(3) = - 2.0;
+
+    for ( int n = 4 ; n <= 5 ; ++n )
+    {
+        int k = n - 2;
+        (*rA0)(n, 1) = k * (k+1) * pow( x[i-2] - x[i] , k-1 );
+        (*rA0)(n, 2) = k * (k+1) * pow( x[i-1] - x[i] , k-1 );
+        (*rA0)(n, 3) = - pow( x[i-2] - x[i] , k+1 );
+        (*rA0)(n, 4) = - pow( x[i-1] - x[i] , k+1 );
+        (*rA0)(n, 5) = 0.0  ;
+        (*rb0)(n) = 0.0  ;
+    }
+
+    Gaussj(&(*rA0)(1, 1), 5, 5, &(*rb0)(1), 1, 1);
+
+    ben[i] = (*rb0)(1); 
+    aln[i] = (*rb0)(2); 
+    alp[i] = 0.0; 
+    bep[i] = 0.0;	
+    an2[i] = (*rb0)(3); 
+    an1[i] = (*rb0)(4); 
+    a00[i] = (*rb0)(5); 
+    ap1[i] = 0.0; 
+    ap2[i] = 0.0;
+
+    // inner points
+    for (i = 3 ; i <= mz-3 ; ++i)
+    {
+        (*rA)(1, 1) = 0.0;
+        (*rA)(1, 2) = 0.0;
+        (*rA)(1, 3) = 0.0;
+        (*rA)(1, 4) = 0.0;
+        (*rA)(1, 5) = 1.0;
+        (*rA)(1, 6) = 1.0;
+        (*rA)(1, 7) = 1.0;
+        (*rA)(1, 8) = 1.0;
+        (*rA)(1, 9) = 1.0;
+        (*rb)(1) = 0.0;
+
+        (*rA)(2, 1) = 0.0;
+        (*rA)(2, 2) = 0.0;
+        (*rA)(2, 3) = 0.0;
+        (*rA)(2, 4) = 0.0;
+        (*rA)(2, 5) = x[i-2] - x[i];
+        (*rA)(2, 6) = x[i-1] - x[i];
+        (*rA)(2, 7) = 0.0;
+        (*rA)(2, 8) = x[i+1] - x[i];
+        (*rA)(2, 9) = x[i+2] - x[i];
+        (*rb)(2) = 0.0;
+
+        (*rA)(3, 1) = 2.0;
+        (*rA)(3, 2) = 2.0;
+        (*rA)(3, 3) = 2.0;
+        (*rA)(3, 4) = 2.0;
+        (*rA)(3, 5) = - pow(x[i-2] - x[i], 2.0);
+        (*rA)(3, 6) = - pow(x[i-1] - x[i], 2.0);
+        (*rA)(3, 7) = 0.0;
+        (*rA)(3, 8) = - pow(x[i+1] - x[i], 2.0);
+        (*rA)(3, 9) = - pow(x[i+2] - x[i], 2.0);
+        (*rb)(3) = - 2.0;
+
+        for ( int n = 4 ; n <= 9 ; ++n )
+        {
+            int k = n - 2;
+            (*rA)(n, 1) = k * (k+1) * pow(x[i-2] - x[i], k-1);
+            (*rA)(n, 2) = k * (k+1) * pow(x[i-1] - x[i], k-1);
+            (*rA)(n, 3) = k * (k+1) * pow(x[i+1] - x[i], k-1);
+            (*rA)(n, 4) = k * (k+1) * pow(x[i+2] - x[i], k-1);
+            (*rA)(n, 5) = - pow(x[i-2] - x[i], k+1);
+            (*rA)(n, 6) = - pow(x[i-1] - x[i], k+1);
+            (*rA)(n, 7) = 0.0;
+            (*rA)(n, 8) = - pow(x[i+1] - x[i], k+1);
+            (*rA)(n, 9) = - pow(x[i+2] - x[i], k+1);
+            (*rb)(n) = 0.0;
+        }
+
+        Gaussj(&(*rA)(1, 1), 9, 9, &(*rb)(1), 1, 1);
+
+        ben[i] = (*rb)(1); 
+        aln[i] = (*rb)(2); 
+        alp[i] = (*rb)(3); 
+        bep[i] = (*rb)(4); 
+        an2[i] = (*rb)(5); 
+        an1[i] = (*rb)(6); 
+        a00[i] = (*rb)(7); 
+        ap1[i] = (*rb)(8); 
+        ap2[i] = (*rb)(9);
+    }
+
+    delete rb; rb = NULL;
+    delete rb0; rb0 = NULL;
+    delete rb1; rb1 = NULL;
+    delete rb2; rb2 = NULL;
+    delete rA; rA = NULL;
+    delete rA0; rA0 = NULL;
+    delete rA1; rA1 = NULL;
+    delete rA2; rA2 = NULL;
+}
+
+void CompactDifferenceSecondDerivative::GetLaplacian(SpecDiffHybGrid *GridData, Complex3D *cVar, Complex3D *cLaplacianVar, Complex1D *c1tmp, Complex1D *c2tmp, Complex3D *cd2Var)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+    Range IF(istf, iedf);
+    Range JF(jstf, jedf);
+    Range KF(kstf, kedf);
+
+    RDouble1D *realKX = GridData -> realKX;
+    RDouble1D *realKY = GridData -> realKY;
+
+    for(int ix = kstf; ix <= kedf; ++ix)
+    {
+        double k2 = (*realKX)(ix) * (*realKX)(ix);
+        (*cLaplacianVar)(IF, JF, ix) = -1.0 * k2 * (*cVar)(IF, JF, ix);
+    }
+
+    for(int iy = jstf; iy <= jedf; ++iy)
+    {
+        double k2 = (*realKY)(iy) * (*realKY)(iy);
+        (*cLaplacianVar)(IF, iy, KF) = (*cLaplacianVar)(IF, iy, KF) - k2 * (*cVar)(IF, iy, KF);
+    }
+
+    GetD2varDz2(GridData, cVar, cd2Var, c1tmp, c2tmp);
+
+    (*cLaplacianVar)(IF, JF, KF) = (*cLaplacianVar)(IF, JF, KF) + (*cd2Var)(IF, JF, KF);
+}
+
+void CompactDifferenceSecondDerivative::GetD2varDz2(SpecDiffHybGrid *GridData, Complex3D *cVar, Complex3D *cdVardx_2rd, Complex1D *cV, Complex1D *cd2Vardz)
+{
+    // !--- purpose: to get d^2(cVar)/dx^2, by second order derivative evaluated on non-uniform grid directly.
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+    Range IF(istf, iedf);
+
+    for(int ix = kstf; ix <= kedf; ++ix)
+    {
+        for(int iy = jstf; iy <= jedf; ++iy)
+        {
+            (*cV)(IF) = (*cVar)(IF, iy, ix);
+            GetSecondDerivative(GridData, cV, cd2Vardz);
+            (*cdVardx_2rd)(IF, iy, ix) = (*cd2Vardz)(IF);
+        }
+    }
+}
+
+void CompactDifferenceSecondDerivative::GetSecondDerivative(SpecDiffHybGrid *GridData, Complex1D *cVar, Complex1D *cd2Vardz)
+{
+    // !--- purpose: to get d(rVar)/dz by compact difference scheme
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    Range IF(istf, iedf);
+
+    (*cd2Vardz)(IF) = PHComplex(0.0, 0.0);
+    for(int iz = istf+1; iz <= iedf-1; ++iz)
+    {
+        for(int idp = (*lowerBoundofRHSCoefMatrix)(iz); idp <= (*upperBoundofRHSCoefMatrix)(iz); ++idp)
+        {
+            int iip = iz + idp;
+            (*cd2Vardz)(iz) = (*cd2Vardz)(iz) + (*rHSCoefMatrix)(iz, idp) * (*cVar)(iip);
+        }
+    }
+
+    int n = iedf - istf - 1;
+
+    PoissonSolver::LUSolve(n, &(*coefLUDecp)(istf+1, -2), &(*cd2Vardz)(istf+1));
+
+    (*cd2Vardz)(istf) = (*cVar)(istf  ) * (*coefOfRHSBoundary0)(0) 
+        + (*cVar)(istf+1) * (*coefOfRHSBoundary0)(1)
+        + (*cVar)(istf+2) * (*coefOfRHSBoundary0)(2)
+        - (*cd2Vardz)(istf+1) * (*coefOfLHSBoundary0)(1) 
+        - (*cd2Vardz)(istf+2) * (*coefOfLHSBoundary0)(2);
+
+    (*cd2Vardz)(iedf) = (*cVar)(iedf  ) * (*coefOfRHSBoundaryN)(0) 
+        + (*cVar)(iedf-1) * (*coefOfRHSBoundaryN)(-1)
+        + (*cVar)(iedf-2) * (*coefOfRHSBoundaryN)(-2)
+        - (*cd2Vardz)(iedf-1) * (*coefOfLHSBoundaryN)(-1) 
+        - (*cd2Vardz)(iedf-2) * (*coefOfLHSBoundaryN)(-2);
+}
+
+void CompactDifferenceSecondDerivative::Gaussj(RDouble *rA, const int n, const int np, RDouble *rb, const int m, const int mp)
+{
+    RDouble2D a(rA, Range(1, np), Range(1, np), neverDeleteData, fortranArray);
+    RDouble2D b(rb, Range(1, np), Range(1, mp), neverDeleteData, fortranArray);
+    Int1D ipiv(Range(1, n), fortranArray);
+    Int1D indxr(Range(1, n), fortranArray);
+    Int1D indxc(Range(1, n), fortranArray);
+    ipiv(Range(1, n)) = 0;
+    indxr(Range(1, n)) = 0;
+    indxc(Range(1, n)) = 0;
+    double rdum = 0.0;
+
+    for(int i = 1; i <= n; ++i)
+    {
+        double rBig = 0.0;
+        int icol = 0;
+        int irow = 0;
+        for(int j = 1; j <= n; ++j)
+        {
+            if(ipiv(j) != 1)
+            {
+                for(int k = 1; k <= n; ++k)
+                {
+                    if(ipiv(k) == 0)
+                    {
+                        if(abs(a(j, k)) >= rBig)
+                        {
+                            rBig = abs(a(j, k));
+                            irow = j;
+                            icol = k;
+                        }
+                    }
+                    else if(ipiv(k) > 1)
+                    {
+                        TK_Exit::ExceptionExit("Error: singular matrix in gaussj1\n");
+                    } // !ipiv(k) == 0
+                }// !for k
+            }// !ipiv(j) != 1
+        }// !for j
+
+        ipiv(icol) = ipiv(icol) + 1;
+
+        if(irow != icol)
+        {
+            for(int l = 1; l <= n; ++l)
+            {
+                rdum = a(irow, l);
+                a(irow, l) = a(icol, l);
+                a(icol, l) = rdum;
+            }
+
+            for(int l = 1; l <= m; ++l)
+            {
+                rdum = b(irow, l);
+                b(irow, l) = b(icol, l);
+                b(icol, l) = rdum;
+            }
+        }// !irow != icol
+
+        indxr(i) = irow;
+        indxc(i) = icol;
+        if(a(icol,icol) == 0.0)
+        {
+            TK_Exit::ExceptionExit("Error: singular matrix in gaussj2\n");
+        }
+
+        double rpivinv = 1.0 / a(icol, icol);
+        a(icol, icol) = 1.0;
+        for(int l = 1; l <= n; ++l)
+        {
+            a(icol, l) = a(icol, l)*rpivinv;
+        }
+        for(int l = 1; l <= m; ++l)
+        {
+            b(icol, l) = b(icol, l)*rpivinv;
+        }
+
+        for(int ll = 1; ll <= n; ++ll)
+        {
+            if( ll != icol)
+            {
+                rdum = a(ll, icol);
+                a(ll, icol) = 0.0;
+                for(int l = 1; l <= n; ++l)
+                {
+                    a(ll, l) = a(ll, l) - a(icol, l) * rdum;
+                }
+                for(int l = 1; l <= m; ++l)
+                {
+                    b(ll, l) = b(ll, l) - b(icol, l) * rdum;
+                }
+            }
+        }// !for ll
+    }// !for i
+
+    for(int l = n; l >= 1; --l)
+    {
+        if(indxr(l) != indxc(l))
+        {
+            for(int k = 1; k <= n; ++k)
+            {
+                rdum = a(k, indxr(l));
+                a(k, indxr(l)) = a(k, indxc(l));
+                a(k, indxc(l)) = rdum;
+            }
+        }
+    }// !for l
+}
+
+CompactDifferenceSecondDerivative::~CompactDifferenceSecondDerivative()
+{
+    delete lowerBoundofLHSCoefMatrix; lowerBoundofLHSCoefMatrix = NULL;
+    delete upperBoundofLHSCoefMatrix; upperBoundofLHSCoefMatrix = NULL;
+    delete lowerBoundofRHSCoefMatrix; lowerBoundofRHSCoefMatrix = NULL;
+    delete upperBoundofRHSCoefMatrix; upperBoundofRHSCoefMatrix = NULL;
+
+    delete lHSCoefMatrix; lHSCoefMatrix = NULL;
+    delete rHSCoefMatrix; rHSCoefMatrix = NULL;
+    delete coefd2L; coefd2L = NULL;
+    delete coefd2R; coefd2R = NULL;
+    delete coefLUDecp; coefLUDecp = NULL;
+
+    delete coefOfLHSBoundary0; coefOfLHSBoundary0 = NULL;
+    delete coefOfLHSBoundaryN; coefOfLHSBoundaryN = NULL;
+    delete coefOfRHSBoundary0; coefOfRHSBoundary0 = NULL;
+    delete coefOfRHSBoundaryN; coefOfRHSBoundaryN = NULL;
+}
+}
+
diff --git a/CFD/SpecDiffHybSolver/src/CorrectWallDivergence.cpp b/CFD/SpecDiffHybSolver/src/CorrectWallDivergence.cpp
new file mode 100644
index 0000000..b002617
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/src/CorrectWallDivergence.cpp
@@ -0,0 +1,214 @@
+#include "CorrectWallDivergence.h"
+#include "GlobalDataBase.h"
+#include "CompactDifferenceFirstDerivative.h"
+#include "CompactDifferenceSecondDerivative.h"
+#include "PoissonSolver.h"
+#include "PHMpi.h"
+#include "TK_Exit.h"
+#include "PHHeader.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+CorrectWallDivergence::CorrectWallDivergence()
+{
+}
+
+CorrectWallDivergence::~CorrectWallDivergence()
+{
+    delete complexDeltaU1; complexDeltaU1 = NULL;
+    delete complexDeltaV1; complexDeltaV1 = NULL;
+    delete complexDeltaW1; complexDeltaW1 = NULL;
+    delete complexDeltaP1; complexDeltaP1 = NULL;
+    delete complexDeltaU2; complexDeltaU2 = NULL;
+    delete complexDeltaV2; complexDeltaV2 = NULL;
+    delete complexDeltaW2; complexDeltaW2 = NULL;
+    delete complexDeltaP2; complexDeltaP2 = NULL;
+    delete complexDivDeltaU1LowerBound; complexDivDeltaU1LowerBound = NULL;
+    delete complexDivDeltaU1UpperBound; complexDivDeltaU1UpperBound = NULL;
+    delete complexDivDeltaU2LowerBound; complexDivDeltaU2LowerBound = NULL;
+    delete complexDivDeltaU2UpperBound; complexDivDeltaU2UpperBound = NULL;
+}
+
+void CorrectWallDivergence::InitCorrectWallDivergenceData( SpecDiffHybGrid *GridData, CompactDifferenceFirstDerivative *CompactDifferenceFirstDerivativeData,
+                                                          CompactDifferenceSecondDerivative *CompactDifferenceSecondDerivativeData, PoissonSolver *PoissonSolverData, 
+                                                          RDouble1D *realnut )
+{
+    AllocCorrectWallDivergenceData(GridData);
+
+    SetCorrectWallDivergenceData(GridData, CompactDifferenceFirstDerivativeData, CompactDifferenceSecondDerivativeData, PoissonSolverData, realnut);
+}
+
+void CorrectWallDivergence::AllocCorrectWallDivergenceData( SpecDiffHybGrid *GridData )
+{
+    int ist = GridData -> iStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex  ;
+    int jst = GridData -> jStartFourierIndex;
+    int jed = GridData -> jEndFourierIndex  ;
+    int kst = GridData -> kStartFourierIndex;
+    int ked = GridData -> kEndFourierIndex  ;
+
+    Range I(ist, ied);
+    Range J(jst, jed);
+    Range K(kst, ked);
+
+    complexDeltaU1 = new Complex3D(I, J, K, fortranArray);
+    complexDeltaV1 = new Complex3D(I, J, K, fortranArray);
+    complexDeltaW1 = new Complex3D(I, J, K, fortranArray);
+    complexDeltaP1 = new Complex3D(I, J, K, fortranArray);
+
+    complexDeltaU2 = new Complex3D(I, J, K, fortranArray);
+    complexDeltaV2 = new Complex3D(I, J, K, fortranArray);
+    complexDeltaW2 = new Complex3D(I, J, K, fortranArray);
+    complexDeltaP2 = new Complex3D(I, J, K, fortranArray);
+
+    complexDivDeltaU1LowerBound = new Complex2D(J, K, fortranArray);
+    complexDivDeltaU1UpperBound = new Complex2D(J, K, fortranArray);
+    complexDivDeltaU2LowerBound = new Complex2D(J, K, fortranArray);
+    complexDivDeltaU2UpperBound = new Complex2D(J, K, fortranArray);
+}
+
+void CorrectWallDivergence::SetCorrectWallDivergenceData( SpecDiffHybGrid *GridData, CompactDifferenceFirstDerivative *CompactDifferenceFirstDerivativeData,
+                                                         CompactDifferenceSecondDerivative *CompactDifferenceSecondDerivativeData, PoissonSolver *PoissonSolverData, 
+                                                         RDouble1D *realnut )
+{
+    const PHComplex cOne = PHComplex(1.0, 0.0);
+    const PHComplex cZero = PHComplex(0.0, 0.0);
+
+    int ist = GridData -> iStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex  ;
+    int jst = GridData -> jStartFourierIndex;
+    int jed = GridData -> jEndFourierIndex  ;
+    int kst = GridData -> kStartFourierIndex;
+    int ked = GridData -> kEndFourierIndex  ;
+
+    RDouble reynolds = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+
+    int nSolve = ied - ist;
+
+    Range I(ist , ied);
+    RDouble1D *realPHI = new RDouble1D( I , fortranArray );
+    (*realPHI)(I) = 2.0 * reynolds/( 1.0 + (*realnut)(I) );
+
+    RDouble1D *rkx = GridData -> realKX;
+    RDouble1D *rky = GridData -> realKY;
+    Complex1D *ckx = GridData -> complexKX;
+    Complex1D *cky = GridData -> complexKY;
+    RDouble1D *detaDz = GridData -> realDetaDz;
+
+    Complex1D *complexP = new Complex1D(I, fortranArray);
+    Complex1D *complexU = new Complex1D(I, fortranArray);
+    Complex1D *complexV = new Complex1D(I, fortranArray);
+    Complex1D *complexW = new Complex1D(I, fortranArray);
+    Complex1D *complexdPdZ = new Complex1D(I, fortranArray);
+    Complex1D *cR = new Complex1D(I, fortranArray);
+
+    RDouble2D *coef_LHS = CompactDifferenceSecondDerivativeData -> lHSCoefMatrix;
+    RDouble2D *coef_RHS = CompactDifferenceSecondDerivativeData -> rHSCoefMatrix;
+    Int1D *lowerBound = CompactDifferenceSecondDerivativeData -> lowerBoundofRHSCoefMatrix;
+    Int1D *upperBound = CompactDifferenceSecondDerivativeData -> upperBoundofRHSCoefMatrix;
+
+    RDouble4D *coefVelocity = PoissonSolverData -> coefMatrixVelocityDirichlet;
+    Range J(-2 , 2);
+    RDouble2D *rC = new RDouble2D(I, J, fortranArray);
+
+    for ( int ix = kst; ix <= ked; ++ix )
+    {
+        for ( int iy = jst; iy <= jed; ++iy )
+        {
+            RDouble kxx = (*rkx)(ix);
+            RDouble kyy = (*rky)(iy);
+            RDouble k2  = kxx * kxx + kyy * kyy;
+            if( k2 < TINY ) continue;
+
+            //! To correct wall divergence using influence-matrix technique
+            //! To solve p1 and u1
+            (*complexP)(I) = cZero;
+            PoissonSolver::PoissonSolverDirichletBC( nSolve, &(*coef_LHS)(ist+1, -2), &(*coef_RHS)(ist+1, -2), &(*complexP)(ist), k2, &(*lowerBound)(ist+1), &(*upperBound)(ist+1), 
+                cOne, cZero, &(*rC)(ist, -2), &(*cR)(ist) );
+            CompactDifferenceFirstDerivativeData -> GetDvarDz( ist, ied, &(*detaDz)(ist), &(*complexP)(ist), &(*complexdPdZ)(ist), &(*cR)(ist), &(*rC)(ist, -2) );
+
+            for( int iz = ist; iz <= ied; ++iz )
+            {
+                (*complexU)(iz) = -(*ckx)(ix) * (*complexP)(iz);
+                (*complexV)(iz) = -(*cky)(iy) * (*complexP)(iz);
+                (*complexW)(iz) = -(*complexdPdZ)(iz);
+            }
+
+            PoissonSolver::PoissonSolverVelocity( nSolve, &(*coef_LHS)(ist+1, -2), &(*complexU)(ist),  &(*lowerBound)(ist+1), &(*upperBound)(ist+1), cZero, cZero, &(*realPHI)(ist),
+                &(*coefVelocity)(ist, -2, iy, ix), &(*cR)(ist) );
+            PoissonSolver::PoissonSolverVelocity( nSolve, &(*coef_LHS)(ist+1, -2), &(*complexV)(ist),  &(*lowerBound)(ist+1), &(*upperBound)(ist+1), cZero, cZero, &(*realPHI)(ist),
+                &(*coefVelocity)(ist, -2, iy, ix), &(*cR)(ist) );
+            PoissonSolver::PoissonSolverVelocity( nSolve, &(*coef_LHS)(ist+1, -2), &(*complexW)(ist),  &(*lowerBound)(ist+1), &(*upperBound)(ist+1), cZero, cZero, &(*realPHI)(ist),
+                &(*coefVelocity)(ist, -2, iy, ix), &(*cR)(ist) );
+
+            (*complexW)(ist) = cZero;
+            (*complexW)(ied) = cZero;
+            (*complexU)(ist) = cZero;
+            (*complexU)(ied) = cZero;
+            (*complexV)(ist) = cZero;
+            (*complexV)(ied) = cZero;
+
+            (*complexDeltaP1)(I, iy, ix) = (*complexP)(I);
+            (*complexDeltaU1)(I, iy, ix) = (*complexU)(I);
+            (*complexDeltaV1)(I, iy, ix) = (*complexV)(I);
+            (*complexDeltaW1)(I, iy, ix) = (*complexW)(I);
+
+            CompactDifferenceFirstDerivativeData -> GetDvarDz( ist, ied, &(*detaDz)(ist), &(*complexW)(ist), &(*complexdPdZ)(ist), &(*cR)(ist), &(*rC)(ist, -2) );
+            (*complexDivDeltaU1LowerBound)(iy, ix) = (*complexdPdZ)(ist);
+            (*complexDivDeltaU1UpperBound)(iy, ix) = (*complexdPdZ)(ied);
+
+            // !To solve p2 and u2
+            (*complexP)(I) = cZero;
+            PoissonSolver::PoissonSolverDirichletBC( nSolve, &(*coef_LHS)(ist+1, -2), &(*coef_RHS)(ist+1, -2), &(*complexP)(ist), k2, &(*lowerBound)(ist+1), &(*upperBound)(ist+1), 
+                cZero, cOne, &(*rC)(ist, -2), &(*cR)(ist) );
+            CompactDifferenceFirstDerivativeData -> GetDvarDz( ist, ied, &(*detaDz)(ist), &(*complexP)(ist), &(*complexdPdZ)(ist), &(*cR)(ist), &(*rC)(ist, -2) );
+            for( int iz = ist; iz <= ied; ++iz )
+            {
+                (*complexU)(iz) = -(*ckx)(ix) * (*complexP)(iz);
+                (*complexV)(iz) = -(*cky)(iy) * (*complexP)(iz);
+                (*complexW)(iz) = -(*complexdPdZ)(iz);
+            }
+
+            PoissonSolver::PoissonSolverVelocity( nSolve, &(*coef_LHS)(ist+1, -2), &(*complexU)(ist), &(*lowerBound)(ist+1), &(*upperBound)(ist+1), cZero, cZero, &(*realPHI)(ist),
+                &(*coefVelocity)(ist, -2, iy, ix), &(*cR)(ist) );
+            PoissonSolver::PoissonSolverVelocity( nSolve, &(*coef_LHS)(ist+1, -2), &(*complexV)(ist), &(*lowerBound)(ist+1), &(*upperBound)(ist+1), cZero, cZero, &(*realPHI)(ist),
+                &(*coefVelocity)(ist, -2, iy, ix), &(*cR)(ist) );
+            PoissonSolver::PoissonSolverVelocity( nSolve, &(*coef_LHS)(ist+1, -2), &(*complexW)(ist), &(*lowerBound)(ist+1), &(*upperBound)(ist+1), cZero, cZero, &(*realPHI)(ist),
+                &(*coefVelocity)(ist, -2, iy, ix), &(*cR)(ist) );
+
+            (*complexW)(ist) = cZero;
+            (*complexW)(ied) = cZero;
+            (*complexU)(ist) = cZero;
+            (*complexU)(ied) = cZero;
+            (*complexV)(ist) = cZero;
+            (*complexV)(ied) = cZero;
+
+            (*complexDeltaP2)(I, iy, ix) = (*complexP)(I);
+            (*complexDeltaU2)(I, iy, ix) = (*complexU)(I);
+            (*complexDeltaV2)(I, iy, ix) = (*complexV)(I);
+            (*complexDeltaW2)(I, iy, ix) = (*complexW)(I);
+
+            CompactDifferenceFirstDerivativeData -> GetDvarDz( ist, ied, &(*detaDz)(ist), &(*complexW)(ist), &(*complexdPdZ)(ist), &(*cR)(ist), &(*rC)(ist, -2) );
+            (*complexDivDeltaU2LowerBound)(iy, ix) = (*complexdPdZ)(ist);
+            (*complexDivDeltaU2UpperBound)(iy, ix) = (*complexdPdZ)(ied);
+        }
+    }
+
+    delete complexP; complexP = NULL;
+    delete complexU; complexU = NULL;
+    delete complexV; complexV = NULL;
+    delete complexW; complexW = NULL;
+    delete complexdPdZ; complexdPdZ = NULL;
+    delete cR; cR = NULL;
+    delete rC; rC = NULL;
+    delete realPHI; realPHI = NULL;
+}
+
+void CorrectWallDivergence::rotProjection()
+{
+}
+
+}
+
diff --git a/CFD/SpecDiffHybSolver/src/ExplicitDifferenceBoundary.cpp b/CFD/SpecDiffHybSolver/src/ExplicitDifferenceBoundary.cpp
new file mode 100644
index 0000000..dacddca
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/src/ExplicitDifferenceBoundary.cpp
@@ -0,0 +1,63 @@
+#include "GlobalDataBase.h"
+#include "TK_Exit.h"
+#include "ExplicitDifferenceBoundary.h"
+#include "PHMpi.h"
+#include <iostream>
+#include <sstream>
+#include <cstdlib>
+#include "PHHeader.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+	ExplicitDifferenceBoundary::ExplicitDifferenceBoundary()
+	{
+	}
+
+	void ExplicitDifferenceBoundary::GetSchemeCoefDiffBoundaryData()
+	{
+		double rb0, rb1, rb2, rb3, rb4;
+
+		nBoundary_Neumann = 3;
+
+		Range I(0, nBoundary_Neumann + 1);
+		boundary_Neumann_0 = new RDouble1D(I, fortranArray);
+
+		Range J(-(nBoundary_Neumann + 1), 0);
+		boundary_Neumann_N = new RDouble1D(J, fortranArray);
+
+		int ibcscheme = GlobalDataBase::GetIntParaFromDB("ibcscheme");
+		if (ibcscheme == 3)
+		{
+			rb0 = -11.0/6.0 ; rb1 = 3.0; rb2 = -3.0/2.0; rb3 = 1.0/3.0; rb4 = 0.0     ;
+		}
+		else if (ibcscheme == 4)
+		{
+			rb0 = -25.0/12.0; rb1 = 4.0; rb2 = -3.0    ; rb3 = 4.0/3.0; rb4 = -1.0/4.0;
+		}
+		else
+		{
+			TK_Exit::UnexpectedVarValue( "ibcscheme", ibcscheme );
+		}
+
+		(*boundary_Neumann_0)(0) = rb0;
+		(*boundary_Neumann_0)(1) = rb1;
+		(*boundary_Neumann_0)(2) = rb2;
+		(*boundary_Neumann_0)(3) = rb3;
+		(*boundary_Neumann_0)(4) = rb4;
+
+		(*boundary_Neumann_N)( 0) = -rb0;
+		(*boundary_Neumann_N)(-1) = -rb1;
+		(*boundary_Neumann_N)(-2) = -rb2;
+		(*boundary_Neumann_N)(-3) = -rb3;
+		(*boundary_Neumann_N)(-4) = -rb4;
+	}
+
+	ExplicitDifferenceBoundary::~ExplicitDifferenceBoundary()
+	{
+		delete boundary_Neumann_0; boundary_Neumann_0 = NULL;
+        delete boundary_Neumann_N; boundary_Neumann_N = NULL;
+	}
+}
+
diff --git a/CFD/SpecDiffHybSolver/src/LES.cpp b/CFD/SpecDiffHybSolver/src/LES.cpp
new file mode 100644
index 0000000..0e46698
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/src/LES.cpp
@@ -0,0 +1,1075 @@
+#include "LES.h"
+#include "CompactDifferenceFirstDerivative.h"
+#include "GlobalDataBase.h"
+#include "PHMpi.h"
+#include "TK_Exit.h"
+#include "PHHeader.h"
+#include "p3dfft.h"
+#include "AleModel.h"
+#include "Math_BasisFunction.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+LESHIT::LESHIT()
+{
+}
+
+LES::LES()
+{
+}
+
+LESHIT::~LESHIT()
+{
+    delete realTauij; realTauij = NULL;
+    delete complexTauij; complexTauij = NULL;
+    delete complexDiffTau; complexDiffTau = NULL;
+
+    string viscousName = GlobalDataBase::GetStrParaFromDB("viscousName");
+    if(viscousName.substr(0,11) == "DynamicSmag")
+    {
+        delete gkx; gkx = NULL;
+        delete gky; gky = NULL;
+        delete gkz; gkz = NULL;
+        delete complexVarFilter; complexVarFilter = NULL;
+        delete realVarFilter; realVarFilter = NULL;
+        delete testFilterGradUij; testFilterGradUij = NULL;
+    }
+}
+
+LES::~LES()
+{
+    delete wallDistance; wallDistance = NULL;
+    delete wallDistancePlus; wallDistancePlus = NULL;
+    delete vanDriestFunc; vanDriestFunc = NULL;
+    delete delta; delta = NULL;
+    delete realTauij; realTauij = NULL;
+    delete complexTauij; complexTauij = NULL;
+    delete complexDiffTau; complexDiffTau = NULL;
+
+    string viscousName = GlobalDataBase::GetStrParaFromDB("viscousName");
+    if(viscousName.substr(0,11) == "DynamicSmag")
+    {
+        delete gkx; gkx = NULL;
+        delete gky; gky = NULL;
+        delete dynamicCoef; dynamicCoef = NULL;
+        delete complexVarFilter; complexVarFilter = NULL;
+        delete realVarFilter; realVarFilter = NULL;
+        delete testFilterGradUij; testFilterGradUij = NULL;
+    }
+
+    //FreeControlParameters();
+}
+
+void LESHIT::InitLESData(SpecGrid *GridData)
+{
+    AllocLESData(GridData);
+
+    GetDelta(GridData);
+
+    string viscousName = GlobalDataBase::GetStrParaFromDB("viscousName");
+
+    if(viscousName.substr(0,11) == "DynamicSmag")
+    {
+        SetTestFilter(GridData);
+    }
+}
+
+void LES::InitLESData(SpecDiffHybGrid *GridData)
+{
+    AllocLESData(GridData);
+
+    GetWallDistance(GridData);
+
+    GetDelta(GridData);
+
+    string viscousName = GlobalDataBase::GetStrParaFromDB("viscousName");
+
+    if(viscousName.substr(0,11) == "DynamicSmag")
+    {
+        SetTestFilter(GridData);
+    }
+}
+
+void LESHIT::AllocLESData(SpecGrid *GridData)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    int istp = GridData -> iStartPhysicalIndex;
+    int jstp = GridData -> jStartPhysicalIndex;
+    int kstp = GridData -> kStartPhysicalIndex;
+    int iedp = GridData -> iEndPhysicalIndex;
+    int jedp = GridData -> jEndPhysicalIndex;
+    int kedp = GridData -> kEndPhysicalIndex;
+
+    Range IF(istf, iedf);
+    Range JF(jstf, jedf);
+    Range KF(kstf, kedf);
+
+    Range IP(istp, iedp);
+    Range JP(jstp, jedp);
+    Range KP(kstp, kedp);
+
+    realTauij = new RDouble4D(IP, JP, KP, Range(1, 6));
+    complexTauij = new Complex4D(IF, JF, KF, Range(1, 6));
+    complexDiffTau = new Complex4D(IF, JF, KF, Range(1,3));
+
+    (*realTauij)(IP, JP, KP, Range(1, 6)) = 0.0;
+    (*complexTauij)(IF, JF, KF, Range(1, 6)) = PHComplex(0.0, 0.0);
+    (*complexDiffTau)(IF, JF, KF, Range(1,3)) = PHComplex(0.0, 0.0);
+
+    string viscousName = GlobalDataBase::GetStrParaFromDB("viscousName");
+
+    if(viscousName.substr(0,11) == "DynamicSmag")
+    {
+        gkx = new RDouble1D(KF, fortranArray);
+        gky = new RDouble1D(JF, fortranArray);
+        gkz = new RDouble1D(IF, fortranArray);
+        complexVarFilter = new Complex4D(IF, JF, KF, Range(1, 21), fortranArray);
+        realVarFilter = new RDouble4D(IP, JP, KP, Range(1, 21), fortranArray);
+        testFilterGradUij = new Complex4D(IF, JF, KF, Range(1, 9), fortranArray);
+
+        (*gkx)(KF) = 0.0;
+        (*gky)(JF) = 0.0;
+        (*gkz)(IF) = 0.0;
+        (*complexVarFilter)(IF, JF, KF, Range(1, 21)) = PHComplex(0.0, 0.0);
+        (*realVarFilter)(IP, JP, KP, Range(1, 21)) = 0.0;
+        (*testFilterGradUij)(IF, JF, KF, Range(1, 9)) = PHComplex(0.0, 0.0);
+    }
+}
+
+void LES::AllocLESData(SpecDiffHybGrid *GridData)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    int istp = GridData -> iStartPhysicalIndex;
+    int jstp = GridData -> jStartPhysicalIndex;
+    int kstp = GridData -> kStartPhysicalIndex;
+    int iedp = GridData -> iEndPhysicalIndex;
+    int jedp = GridData -> jEndPhysicalIndex;
+    int kedp = GridData -> kEndPhysicalIndex;
+
+    Range IF(istf, iedf);
+    Range JF(jstf, jedf);
+    Range KF(kstf, kedf);
+
+    Range IP(istp, iedp);
+    Range JP(jstp, jedp);
+    Range KP(kstp, kedp);
+
+    wallDistance = new RDouble1D(IF, fortranArray);
+    wallDistancePlus = new RDouble1D(IF, fortranArray);
+    vanDriestFunc = new RDouble1D(IF, fortranArray);
+    delta = new RDouble1D(IF, fortranArray);
+    realTauij = new RDouble4D(IP, JP, KP, Range(1, 6));
+    complexTauij = new Complex4D(IF, JF, KF, Range(1, 6));
+    complexDiffTau = new Complex4D(IF, JF, KF, Range(1,3));
+
+    (*wallDistance)(IF) = 0.0;
+    (*wallDistancePlus)(IF) = 0.0;
+    (*vanDriestFunc)(IF) = 0.0;
+    (*delta)(IF) = 0.0;
+    (*realTauij)(IP, JP, KP, Range(1, 6)) = 0.0;
+    (*complexTauij)(IF, JF, KF, Range(1, 6)) = PHComplex(0.0, 0.0);
+    (*complexDiffTau)(IF, JF, KF, Range(1,3)) = PHComplex(0.0, 0.0);
+
+    string viscousName = GlobalDataBase::GetStrParaFromDB("viscousName");
+
+    if(viscousName.substr(0,11) == "DynamicSmag")
+    {
+        gkx = new RDouble1D(KF, fortranArray);
+        gky = new RDouble1D(JF, fortranArray);
+        dynamicCoef = new RDouble1D(IF, fortranArray);
+        complexVarFilter = new Complex4D(IF, JF, KF, Range(1, 21), fortranArray);
+        realVarFilter = new RDouble4D(IP, JP, KP, Range(1, 21), fortranArray);
+        testFilterGradUij = new Complex4D(IF, JF, KF, Range(1, 9), fortranArray);
+
+        (*gkx)(KF) = 0.0;
+        (*gky)(JF) = 0.0;
+        (*dynamicCoef)(IF) = 0.0;
+        (*complexVarFilter)(IF, JF, KF, Range(1, 21)) = PHComplex(0.0, 0.0);
+        (*realVarFilter)(IP, JP, KP, Range(1, 21)) = 0.0;
+        (*testFilterGradUij)(IF, JF, KF, Range(1, 9)) = PHComplex(0.0, 0.0);
+    }
+}
+
+void LES::GetWallDistance(SpecDiffHybGrid *GridData)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    RDouble1D *realZ = GridData -> realZ;
+
+    RDouble reynolds = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+
+    const RDouble coefAplus = 25.0;
+
+    for(int iz = istf; iz <= iedf; ++iz)
+    {
+        (*wallDistance)(iz) = abs( (*realZ)(iz) - (*realZ)(istf) );
+        (*wallDistance)(iz) = min( (*wallDistance)(iz), abs( (*realZ)(iz) - (*realZ)(iedf) ) );
+        (*wallDistancePlus)(iz) = (*wallDistance)(iz) * reynolds;
+        (*vanDriestFunc)(iz) = 1.0 - exp( -(*wallDistancePlus)(iz) / coefAplus );
+    }
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if(myid == 0)
+    {
+        string outputdir = GlobalDataBase::GetStrParaFromDB("outputdir");
+        string filename = outputdir + "/rd.dat";
+        fstream file;
+        file.open(filename.c_str(), ios_base::out);
+        if ( !file )
+        {
+            TK_Exit::FileOpenErrorExit(filename);
+        }
+        file << "variables=z, rd, rdplus, rVanDriestD \n";
+        for(int iz = istf; iz <= iedf; ++iz)
+        {
+            file << setiosflags(ios::right);
+            file << setprecision(10);
+            file << setiosflags(ios::scientific);
+            file << setiosflags(ios::showpoint);
+            file << setw(20) << (*realZ)(iz)
+                << setw(20) << (*wallDistance)(iz)
+                << setw(20) << (*wallDistancePlus)(iz)
+                << setw(20) << (*vanDriestFunc)(iz)
+                << "\n";
+        }
+        file.close();
+        file.clear();
+    }
+}
+
+void LESHIT::GetDelta(SpecGrid *GridData)
+{
+    int nX = GridData -> nX;
+    int nY = GridData -> nY;
+    int nZ = GridData -> nZ;
+
+    RDouble1D *realZ = GridData -> realZ;
+
+    RDouble realXL = GlobalDataBase::GetDoubleParaFromDB("XL"); 
+    RDouble realYL = GlobalDataBase::GetDoubleParaFromDB("YL");
+    RDouble realZL = GlobalDataBase::GetDoubleParaFromDB("ZL");
+
+    const RDouble pi = 2.0 * acos(0.0);
+
+    RDouble lx = 2.0 * pi * realXL;
+    RDouble ly = 2.0 * pi * realYL;
+    RDouble lz = 2.0 * pi * realZL;
+
+    RDouble dx = lx / static_cast<double>(nX);
+    RDouble dy = ly / static_cast<double>(nY);
+    RDouble dz = lz / static_cast<double>(nZ);
+
+    delta = pow(dx * dy * dz, 1.0/3.0);
+}
+
+void LES::GetDelta(SpecDiffHybGrid *GridData)
+{
+    int nX = GridData -> nX;
+    int nY = GridData -> nY;
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    RDouble1D *realZ = GridData -> realZ;
+
+    RDouble realXL = GlobalDataBase::GetDoubleParaFromDB("XL"); 
+    RDouble realYL = GlobalDataBase::GetDoubleParaFromDB("YL");
+
+    const RDouble pi = 2.0 * acos(0.0);
+    RDouble lx = 2.0 * pi * realXL;
+    RDouble ly = 2.0 * pi * realYL;
+    RDouble dx = lx / static_cast<double>(nX);
+    RDouble dy = ly / static_cast<double>(nY);
+
+    for(int iz = istf + 1; iz <= iedf - 1; ++iz)
+    {
+        RDouble dz = 0.5 * abs( (*realZ)(iz + 1) - (*realZ)(iz - 1) );
+        (*delta)(iz) = pow(dx * dy * dz, 1.0 / 3.0);
+    }
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if(myid == 0)
+    {
+        string outputdir = GlobalDataBase::GetStrParaFromDB("outputdir");
+        string filename = outputdir + "/delta.dat";
+        fstream file;
+        file.open(filename.c_str(), ios_base::out);
+        if ( !file )
+        {
+            TK_Exit::FileOpenErrorExit(filename);
+        }
+        file << "variables=z, delta \n";
+        for(int iz = istf; iz <= iedf; ++iz)
+        {
+            file << setiosflags(ios::right);
+            file << setprecision(10);
+            file << setiosflags(ios::scientific);
+            file << setiosflags(ios::showpoint);
+            file << setw(20) << (*realZ)(iz)
+                << setw(20) << (*delta)(iz)
+                << "\n";
+        }
+        file.close();
+        file.clear();
+    }
+}
+
+void LESHIT::SetTestFilter(SpecGrid *GridData)
+{
+    const RDouble pi = 2.0 * acos(0.0);
+    const RDouble filterWidth = 2.0;
+
+    RDouble XL = GlobalDataBase::GetDoubleParaFromDB("XL");
+    RDouble YL = GlobalDataBase::GetDoubleParaFromDB("YL");
+    RDouble ZL = GlobalDataBase::GetDoubleParaFromDB("ZL");
+
+    RDouble LX = 2.0 * pi * XL;
+    RDouble LY = 2.0 * pi * YL;
+    RDouble LZ = 2.0 * pi * ZL;
+
+    int nX = GridData -> nX;
+    int nY = GridData -> nY;
+    int nZ = GridData -> nZ;
+
+    RDouble dX = LX / static_cast<double>(nX);
+    RDouble dY = LY / static_cast<double>(nY);
+    RDouble dZ = LZ / static_cast<double>(nZ);
+
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+    RDouble1D *realKX = GridData -> realKX;
+    for(int ix = kstf; ix <= kedf; ++ix)
+    {
+        RDouble omegaX = (*realKX)(ix) * dX;
+        ComputeFilterFunction(filterWidth, omegaX, (*gkx)(ix));
+    }
+
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    RDouble1D *realKY = GridData -> realKY;
+    for(int iy = jstf; iy <= jedf; ++iy)
+    {
+        RDouble omegaY = (*realKY)(iy) * dY;
+        ComputeFilterFunction(filterWidth, omegaY, (*gky)(iy));
+    }
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    RDouble1D *realKZ = GridData -> realKZ;
+    for(int iz = istf; iz <= iedf; ++iz)
+    {
+        RDouble omegaZ = (*realKZ)(iz) * dZ;
+        ComputeFilterFunction(filterWidth, omegaZ, (*gkz)(iz));
+    }
+}
+
+void LES::SetTestFilter(SpecDiffHybGrid *GridData)
+{
+    const double pi = 2.0 * acos(0.0);
+    const double filterWidth = 2.0;
+
+    RDouble XL = GlobalDataBase::GetDoubleParaFromDB("XL");
+    RDouble YL = GlobalDataBase::GetDoubleParaFromDB("YL");
+    RDouble LX = 2.0 * pi * XL;
+    RDouble LY = 2.0 * pi * YL;
+
+    int nX = GridData -> nX;
+    int nY = GridData -> nY;
+    double dX = LX / static_cast<double>(nX);
+    double dY = LY / static_cast<double>(nY);
+
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+    RDouble1D *realKX = GridData -> realKX;
+    for(int ix = kstf; ix <= kedf; ++ix)
+    {
+        double omegaX = (*realKX)(ix) * dX;
+        ComputeFilterFunction(filterWidth, omegaX, (*gkx)(ix));
+    }
+
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    RDouble1D *realKY = GridData -> realKY;
+    for(int iy = jstf; iy <= jedf; ++iy)
+    {
+        double omegaY = (*realKY)(iy) * dY;
+        ComputeFilterFunction(filterWidth, omegaY, (*gky)(iy));
+    }
+}
+
+void LESHIT::ComputeFilterFunction(const RDouble filterWidth, RDouble omega, RDouble &gk)
+{
+    const RDouble pi = 2.0 * acos(0.0);
+
+    string filterName = GlobalDataBase::GetStrParaFromDB("filterName");
+
+    if(filterName.substr(0,8) == "spectral")
+    {
+        gk = 1.0;
+        if(abs(omega) >= pi / filterWidth)
+        {
+            gk = 0.0;
+        }
+    }
+    else if(filterName.substr(0,3) == "box")
+    {
+        gk = (2.0 + cos(omega)) / 3.0;
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("filterName", filterName);
+    }
+}
+
+void LES::Smagorinsky(SpecDiffHybGrid *GridData, RDouble1D *realnut, RDouble4D *realVelocityGradient)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+
+    int istp = GridData -> iStartPhysicalIndex;
+    int jstp = GridData -> jStartPhysicalIndex;
+    int kstp = GridData -> kStartPhysicalIndex;
+    int iedp = GridData -> iEndPhysicalIndex;
+    int jedp = GridData -> jEndPhysicalIndex;
+    int kedp = GridData -> kEndPhysicalIndex;
+
+    Range IF(istf, iedf);
+    RDouble1D *sijMagnitude = new RDouble1D(IF, fortranArray); 
+    RDouble1D *sijMagnitude_loc = new RDouble1D(IF, fortranArray);
+
+    (*sijMagnitude_loc)(IF) = 0.0;
+    for(int iz = kstp; iz <= kedp; ++iz)
+    {
+        for(int iy = jstp; iy <= jedp; ++iy)
+        {
+            for(int ix = istp; ix <= iedp; ++ix)
+            {
+                RDouble s11 = (*realVelocityGradient)(ix, iy, iz, 1);
+                RDouble s22 = (*realVelocityGradient)(ix, iy, iz, 5);
+                RDouble s33 = (*realVelocityGradient)(ix, iy, iz, 9);
+                RDouble s12 = 0.5 * ( (*realVelocityGradient)(ix, iy, iz, 2) + (*realVelocityGradient)(ix, iy, iz, 4) );
+                RDouble s13 = 0.5 * ( (*realVelocityGradient)(ix, iy, iz, 3) + (*realVelocityGradient)(ix, iy, iz, 7) );
+                RDouble s23 = 0.5 * ( (*realVelocityGradient)(ix, iy, iz, 6) + (*realVelocityGradient)(ix, iy, iz, 8) );
+
+                RDouble sijsij = s11 * s11 + s22 * s22 + s33 * s33 + 2.0 * (s12 * s12 + s13 * s13 + s23 * s23);
+                (*sijMagnitude_loc)(iz) = (*sijMagnitude_loc)(iz) + sqrt(2.0 * sijsij);
+            }
+        }
+    }
+
+    int nz = iedf - istf + 1;
+    (*sijMagnitude)(IF) = (*sijMagnitude_loc)(IF);
+#ifdef PH_PARALLEL       
+    MPI_Reduce( &(*sijMagnitude_loc)(istf), &(*sijMagnitude)(istf), nz, MPI_DOUBLE, MPI_SUM, 0, MPI_COMM_WORLD );
+#endif
+
+    using namespace PHMPI;
+
+    RDouble reynolds = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+    RDouble smagConstant = GlobalDataBase::GetDoubleParaFromDB("smagConstant");
+
+    int myid = GetCurrentProcessorID();
+    if(myid == 0)
+    {
+        int nXYAll = GridData -> nXYAll;
+        (*sijMagnitude)(IF) = (*sijMagnitude)(IF) / static_cast<double>(nXYAll);
+
+        for(int iz = istf; iz <= iedf; ++iz)
+        {
+            (*realnut)(iz) = reynolds * pow( (smagConstant * (*vanDriestFunc)(iz) * (*delta)(iz)), 2.0 ) * (*sijMagnitude)(iz);
+        }
+    }
+
+#ifdef PH_PARALLEL
+    MPI_Bcast(&(*realnut)(istf), nz, MPI_DOUBLE, 0, MPI_COMM_WORLD);
+#endif
+
+    delete sijMagnitude; sijMagnitude = NULL;
+    delete sijMagnitude_loc; sijMagnitude_loc = NULL;
+}
+
+void LES::DynamicSmagorinsky(SpecDiffHybGrid *GridData, CompactDifferenceFirstDerivative *CompactDifferenceFirstDerivativeData, 
+                             RDouble1D *realnut, RDouble3D *realnut3d, RDouble4D *realVelocityGradient, Complex3D *complexU, Complex3D *complexV, Complex3D *complexW)
+{
+    RDouble testFilterScale = GlobalDataBase::GetDoubleParaFromDB("testFilterScale");
+    RDouble reynolds = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    int istp = GridData -> iStartPhysicalIndex;
+    int jstp = GridData -> jStartPhysicalIndex;
+    int kstp = GridData -> kStartPhysicalIndex;
+    int iedp = GridData -> iEndPhysicalIndex;		
+    int jedp = GridData -> jEndPhysicalIndex;		
+    int kedp = GridData -> kEndPhysicalIndex;
+
+    Range IF(istf, iedf);
+    Range JF(jstf, jedf);
+    Range KF(kstf, kedf);
+    RDouble1D *sijMagnitude = new RDouble1D(IF, fortranArray); 
+    RDouble1D *sijMagnitude_loc = new RDouble1D(IF, fortranArray);
+
+    //! To get |S| in physical space; 
+    (*sijMagnitude_loc)(IF) = 0.0;
+    for(int iz = kstp; iz <= kedp; ++iz)
+    {
+        for(int iy = jstp; iy <= jedp; ++iy)
+        {
+            for(int ix = istp; ix <= iedp; ++ix)
+            {
+                RDouble s11 = (*realVelocityGradient)(ix, iy, iz, 1);
+                RDouble s22 = (*realVelocityGradient)(ix, iy, iz, 5);
+                RDouble s33 = (*realVelocityGradient)(ix, iy, iz, 9);
+                RDouble s12 = 0.5 * ( (*realVelocityGradient)(ix, iy, iz, 2) + (*realVelocityGradient)(ix, iy, iz, 4) );
+                RDouble s13 = 0.5 * ( (*realVelocityGradient)(ix, iy, iz, 3) + (*realVelocityGradient)(ix, iy, iz, 7) );
+                RDouble s23 = 0.5 * ( (*realVelocityGradient)(ix, iy, iz, 6) + (*realVelocityGradient)(ix, iy, iz, 8) );
+
+                RDouble sijsij = s11 * s11 + s22 * s22 + s33 * s33 + 2.0 * (s12 * s12 + s13 * s13 + s23 * s23);
+                (*sijMagnitude_loc)(iz) = (*sijMagnitude_loc)(iz) + sqrt(2.0 * sijsij);
+            }
+        }
+    }
+
+    int nXYAll = GridData -> nXYAll;
+    int nz = iedf - istf + 1;
+    (*sijMagnitude)(IF) = (*sijMagnitude_loc)(IF);
+#ifdef PH_PARALLEL       
+    MPI_Reduce( &(*sijMagnitude_loc)(istf), &(*sijMagnitude)(istf), nz, MPI_DOUBLE, MPI_SUM, 0, MPI_COMM_WORLD );
+#endif
+    (*sijMagnitude)(IF) = (*sijMagnitude)(IF) / static_cast<double>(nXYAll);
+#ifdef PH_PARALLEL
+    MPI_Bcast(&(*sijMagnitude)(istf), nz, MPI_DOUBLE, 0, MPI_COMM_WORLD);
+#endif
+
+    //! To get uiuj, |S|Sij in physical space; 
+    //! realVarFilter(ix, iy, iz, 1 -> 6) = uiuj
+    //! realVarFilter(ix, iy, iz, 7 -> 12) = |s|sij
+    int inutxyavg = GlobalDataBase::GetIntParaFromDB("inutxyavg");
+    for(int iz = kstp; iz <= kedp; ++iz)
+    {
+        for(int iy = jstp; iy <= jedp; ++iy)
+        {
+            for(int ix = istp; ix <= iedp; ++ix)
+            {
+                RDouble u = (*realVelocityGradient)(ix, iy, iz, 10);
+                RDouble v = (*realVelocityGradient)(ix, iy, iz, 11);
+                RDouble w = (*realVelocityGradient)(ix, iy, iz, 12);
+
+                (*realVarFilter)(ix, iy, iz, 1) = u * u;
+                (*realVarFilter)(ix, iy, iz, 2) = v * v;
+                (*realVarFilter)(ix, iy, iz, 3) = w * w;
+                (*realVarFilter)(ix, iy, iz, 4) = u * v;
+                (*realVarFilter)(ix, iy, iz, 5) = u * w;
+                (*realVarFilter)(ix, iy, iz, 6) = v * w;
+
+                RDouble s11 = (*realVelocityGradient)(ix, iy, iz, 1);
+                RDouble s22 = (*realVelocityGradient)(ix, iy, iz, 5);
+                RDouble s33 = (*realVelocityGradient)(ix, iy, iz, 9);
+                RDouble s12 = 0.5 * ( (*realVelocityGradient)(ix, iy, iz, 2) + (*realVelocityGradient)(ix, iy, iz, 4) );
+                RDouble s13 = 0.5 * ( (*realVelocityGradient)(ix, iy, iz, 3) + (*realVelocityGradient)(ix, iy, iz, 7) );
+                RDouble s23 = 0.5 * ( (*realVelocityGradient)(ix, iy, iz, 6) + (*realVelocityGradient)(ix, iy, iz, 8) );
+
+                if((inutxyavg == 0) || (inutxyavg == 1))
+                {
+                    double sijsij = s11 * s11 + s22 * s22 + s33 * s33 + 2.0 * (s12 * s12 + s13 * s13 + s23 * s23);
+                    sijsij = sqrt(2.0 * sijsij);
+
+                    (*realVarFilter)(ix, iy, iz, 7) = sijsij * s11;
+                    (*realVarFilter)(ix, iy, iz, 8) = sijsij * s22;
+                    (*realVarFilter)(ix, iy, iz, 9) = sijsij * s33;
+                    (*realVarFilter)(ix, iy, iz, 10) = sijsij * s12;
+                    (*realVarFilter)(ix, iy, iz, 11) = sijsij * s13;
+                    (*realVarFilter)(ix, iy, iz, 12) = sijsij * s23;
+                }
+                else if(inutxyavg == 2)
+                {
+                    (*realVarFilter)(ix, iy, iz, 7) = (*sijMagnitude)(iz) * s11;
+                    (*realVarFilter)(ix, iy, iz, 8) = (*sijMagnitude)(iz) * s22;
+                    (*realVarFilter)(ix, iy, iz, 9) = (*sijMagnitude)(iz) * s33;
+                    (*realVarFilter)(ix, iy, iz, 10) = (*sijMagnitude)(iz) * s12;
+                    (*realVarFilter)(ix, iy, iz, 11) = (*sijMagnitude)(iz) * s13;
+                    (*realVarFilter)(ix, iy, iz, 12) = (*sijMagnitude)(iz) * s23;
+                }
+                else
+                {
+                    TK_Exit::UnexpectedVarValue( "inutxyavg", inutxyavg );
+                }
+            }
+        }
+    }
+
+    //! Transfer uiuj, |S|Sij to Spectral space;
+    int nXYZPhysical = GridData -> nXYZPhysical;
+    int nXYZFourier = GridData -> nXYZFourier;
+    unsigned char opr2c[] = "ffn";
+    Cp3dfft_ftran_r2c_many(&(*realVarFilter)(istp, jstp, kstp, 1), nXYZPhysical, reinterpret_cast<double*>(&(*complexVarFilter)(istf, jstf, kstf, 1)), nXYZFourier, 12, opr2c);
+    (*complexVarFilter)(IF, JF, KF, Range(1, 21)) = (*complexVarFilter)(IF, JF, KF, Range(1, 21)) / static_cast<double>(nXYAll);
+
+    //! To get TF(ui) in Spectral Space;
+    for(int ix = kstf; ix <= kedf; ++ix)
+    {
+        for(int iy = jstf; iy <= jedf; ++iy)
+        {
+            for(int iz = istf; iz <= iedf; ++iz)
+            {
+                (*complexVarFilter)(iz, iy, ix, 13) = (*complexU)(iz, iy, ix);
+                (*complexVarFilter)(iz, iy, ix, 14) = (*complexV)(iz, iy, ix);
+                (*complexVarFilter)(iz, iy, ix, 15) = (*complexW)(iz, iy, ix);
+            }
+        }
+    }
+
+    //! To filter in xy plane by fourier filter;
+    FilterXYInSpectralSpace(&(*complexVarFilter)(istf, jstf, kstf, 1), 15, GridData);
+
+    //! To get filtered Sij from filtered ui;
+    Complex1D *varTemp = new Complex1D(IF, fortranArray);
+    Complex1D *dvarTemp = new Complex1D(IF, fortranArray);
+    Complex1D *workSpace1 = new Complex1D(IF, fortranArray);
+    RDouble1D *workSpace2 = new RDouble1D(IF, fortranArray);
+    CompactDifferenceFirstDerivativeData -> GetGradientVector( &(*complexVarFilter)(istf, jstf, kstf, 13), &(*testFilterGradUij)(istf, jstf, kstf, 1), &(*testFilterGradUij)(istf, jstf, kstf, 2), 
+        &(*testFilterGradUij)(istf, jstf, kstf, 3), varTemp, dvarTemp, workSpace1, workSpace2, GridData );
+    CompactDifferenceFirstDerivativeData -> GetGradientVector( &(*complexVarFilter)(istf, jstf, kstf, 14), &(*testFilterGradUij)(istf, jstf, kstf, 4), &(*testFilterGradUij)(istf, jstf, kstf, 5), 
+        &(*testFilterGradUij)(istf, jstf, kstf, 6), varTemp, dvarTemp, workSpace1, workSpace2, GridData );
+    CompactDifferenceFirstDerivativeData -> GetGradientVector( &(*complexVarFilter)(istf, jstf, kstf, 15), &(*testFilterGradUij)(istf, jstf, kstf, 7), &(*testFilterGradUij)(istf, jstf, kstf, 8), 
+        &(*testFilterGradUij)(istf, jstf, kstf, 9), varTemp, dvarTemp, workSpace1, workSpace2, GridData );
+
+    for(int ix = kstf; ix <= kedf; ++ix)
+    {
+        for(int iy = jstf; iy <= jedf; ++iy)
+        {
+            for(int iz = istf; iz <= iedf; ++iz)
+            {
+                (*complexVarFilter)(istf, jstf, kstf, 16) = (*testFilterGradUij)(istf, jstf, kstf, 1);
+                (*complexVarFilter)(istf, jstf, kstf, 17) = (*testFilterGradUij)(istf, jstf, kstf, 5);
+                (*complexVarFilter)(istf, jstf, kstf, 18) = (*testFilterGradUij)(istf, jstf, kstf, 9);
+                (*complexVarFilter)(istf, jstf, kstf, 19) = 0.5 * ((*testFilterGradUij)(istf, jstf, kstf, 2) + (*testFilterGradUij)(istf, jstf, kstf, 4));
+                (*complexVarFilter)(istf, jstf, kstf, 20) = 0.5 * ((*testFilterGradUij)(istf, jstf, kstf, 3) + (*testFilterGradUij)(istf, jstf, kstf, 7));
+                (*complexVarFilter)(istf, jstf, kstf, 21) = 0.5 * ((*testFilterGradUij)(istf, jstf, kstf, 6) + (*testFilterGradUij)(istf, jstf, kstf, 8));
+            }
+        }
+    }
+
+    //! Transfer TF(uiuj), TF(|S|Sij), TF(ui), TF(Sij) back to physical space;
+    unsigned char opc2r[] = "nff";
+    Cp3dfft_btran_c2r_many(reinterpret_cast<double*>(&(*complexVarFilter)(istf, jstf, kstf, 1)), nXYZFourier, &(*realVarFilter)(istp, jstp, kstp, 1), nXYZPhysical, 21, opc2r);
+
+    //! To get filtered |S| in physical space;
+    RDouble1D *testFilterSijMagnitude = new RDouble1D(IF, fortranArray);
+    if(inutxyavg == 2)
+    {
+        (*sijMagnitude_loc)(IF) = 0.0;
+        for(int iz = kstp; iz <= kedp; ++iz)
+        {
+            for(int iy = jstp; iy <= jedp; ++iy)
+            {
+                for(int ix = istp; ix <= iedp; ++ix)
+                {
+                    RDouble s11 = (*realVarFilter)(ix, iy, iz, 16);
+                    RDouble s22 = (*realVarFilter)(ix, iy, iz, 17);
+                    RDouble s33 = (*realVarFilter)(ix, iy, iz, 18);
+                    RDouble s12 = (*realVarFilter)(ix, iy, iz, 19);
+                    RDouble s13 = (*realVarFilter)(ix, iy, iz, 20);
+                    RDouble s23 = (*realVarFilter)(ix, iy, iz, 21);
+
+                    RDouble sijsij = s11 * s11 + s22 * s22 + s33 * s33 + 2.0 * (s12 * s12 + s13 * s13 + s23 * s23);
+                    (*sijMagnitude_loc)(iz) = (*sijMagnitude_loc)(iz) + sqrt(2.0 * sijsij);
+                }
+            }
+        }
+
+        (*testFilterSijMagnitude)(IF) = (*sijMagnitude_loc)(IF);
+#ifdef PH_PARALLEL
+        MPI_Reduce(&(*sijMagnitude_loc)(istf), &(*testFilterSijMagnitude)(istf), nz, MPI_DOUBLE, MPI_SUM, 0, MPI_COMM_WORLD);
+#endif
+        (*testFilterSijMagnitude)(IF) / static_cast<double>(nXYAll);
+#ifdef PH_PARALLEL
+        MPI_Bcast(&(*testFilterSijMagnitude)(istf), nz, MPI_DOUBLE, 0, MPI_COMM_WORLD);
+#endif
+    }
+
+    //! To get Lij and Mij;
+    RDouble1D *LijMij_loc = new RDouble1D(IF, fortranArray);
+    RDouble1D *MijMij_loc = new RDouble1D(IF, fortranArray);
+    (*LijMij_loc)(IF) = 0.0;
+    (*MijMij_loc)(IF) = 0.0;
+
+    for(int iz = kstp; iz <= kedp; ++iz)
+    {
+        for(int ix = istp; ix <= iedp; ++ix)
+        {
+            for(int iy = jstp; iy <= jedp; ++iy)
+            {
+                RDouble testFilterU = (*realVarFilter)(ix, iy, iz, 13);
+                RDouble testFilterV = (*realVarFilter)(ix, iy, iz, 14);
+                RDouble testFilterW = (*realVarFilter)(ix, iy, iz, 15);
+
+                RDouble L11 = (*realVarFilter)(ix, iy, iz, 1) - testFilterU * testFilterU;
+                RDouble L22 = (*realVarFilter)(ix, iy, iz, 2) - testFilterV * testFilterV;
+                RDouble L33 = (*realVarFilter)(ix, iy, iz, 3) - testFilterW * testFilterW;
+                RDouble L12 = (*realVarFilter)(ix, iy, iz, 4) - testFilterU * testFilterV;
+                RDouble L13 = (*realVarFilter)(ix, iy, iz, 5) - testFilterU * testFilterW;
+                RDouble L23 = (*realVarFilter)(ix, iy, iz, 6) - testFilterV * testFilterW;
+
+                RDouble testFilterS11 = (*realVarFilter)(ix, iy, iz, 16);
+                RDouble testFilterS22 = (*realVarFilter)(ix, iy, iz, 17);
+                RDouble testFilterS33 = (*realVarFilter)(ix, iy, iz, 18);
+                RDouble testFilterS12 = (*realVarFilter)(ix, iy, iz, 19);
+                RDouble testFilterS13 = (*realVarFilter)(ix, iy, iz, 20);
+                RDouble testFilterS23 = (*realVarFilter)(ix, iy, iz, 21);
+
+                RDouble M11 = 0.0;
+                RDouble M22 = 0.0;
+                RDouble M33 = 0.0;
+                RDouble M12 = 0.0;
+                RDouble M13 = 0.0;
+                RDouble M23 = 0.0;
+                if(inutxyavg == 0 || inutxyavg == 1)
+                {
+                    RDouble testFilterSijSij = testFilterS11 * testFilterS11 + testFilterS22 * testFilterS22 + testFilterS33 * testFilterS33 
+                        + 2.0 * (testFilterS12 * testFilterS12 + testFilterS13 * testFilterS13 + testFilterS23 * testFilterS23);
+                    testFilterSijSij = sqrt(2.0 * testFilterSijSij);
+
+                    M11 = testFilterScale * testFilterScale * testFilterSijSij * testFilterS11 - (*realVarFilter)(ix, iy, iz, 7);
+                    M22 = testFilterScale * testFilterScale * testFilterSijSij * testFilterS22 - (*realVarFilter)(ix, iy, iz, 8);
+                    M33 = testFilterScale * testFilterScale * testFilterSijSij * testFilterS33 - (*realVarFilter)(ix, iy, iz, 9);
+                    M12 = testFilterScale * testFilterScale * testFilterSijSij * testFilterS12 - (*realVarFilter)(ix, iy, iz, 10);
+                    M13 = testFilterScale * testFilterScale * testFilterSijSij * testFilterS13 - (*realVarFilter)(ix, iy, iz, 11);
+                    M23 = testFilterScale * testFilterScale * testFilterSijSij * testFilterS23 - (*realVarFilter)(ix, iy, iz, 12);
+                }
+                else if(inutxyavg == 2)
+                {
+                    M11 = testFilterScale * testFilterScale * (*testFilterSijMagnitude)(iz) * testFilterS11 - (*realVarFilter)(ix, iy, iz, 7);
+                    M22 = testFilterScale * testFilterScale * (*testFilterSijMagnitude)(iz) * testFilterS22 - (*realVarFilter)(ix, iy, iz, 8);
+                    M33 = testFilterScale * testFilterScale * (*testFilterSijMagnitude)(iz) * testFilterS33 - (*realVarFilter)(ix, iy, iz, 9);
+                    M12 = testFilterScale * testFilterScale * (*testFilterSijMagnitude)(iz) * testFilterS12 - (*realVarFilter)(ix, iy, iz, 10);
+                    M13 = testFilterScale * testFilterScale * (*testFilterSijMagnitude)(iz) * testFilterS13 - (*realVarFilter)(ix, iy, iz, 11);
+                    M23 = testFilterScale * testFilterScale * (*testFilterSijMagnitude)(iz) * testFilterS23 - (*realVarFilter)(ix, iy, iz, 12);
+                }
+                else
+                {
+                    TK_Exit::UnexpectedVarValue("inutxyavg", inutxyavg);
+                }
+
+                (*LijMij_loc)(iz) = (*LijMij_loc)(iz) + L11 * M11 + L22 * M22 + L33 * M33 + 2.0 * (L12 * M12 + L13 * M13 + L23 * M23);
+                (*MijMij_loc)(iz) = (*MijMij_loc)(iz) + M11 * M11 + M22 * M22 + M33 * M33 + 2.0 * (M12 * M12 + M13 * M13 + M23 * M23);
+            }
+        }
+    }
+
+    RDouble1D *LijMij = new RDouble1D(IF, fortranArray);
+    RDouble1D *MijMij = new RDouble1D(IF, fortranArray);
+    (*LijMij)(IF) = (*LijMij_loc)(IF);
+    (*MijMij)(IF) = (*MijMij_loc)(IF);
+#ifdef PH_PARALLEL
+    MPI_Reduce(&(*LijMij_loc)(istf), &(*LijMij)(istf), nz, MPI_DOUBLE, MPI_SUM, 0, MPI_COMM_WORLD);
+    MPI_Reduce(&(*MijMij_loc)(istf), &(*MijMij)(istf), nz, MPI_DOUBLE, MPI_SUM, 0, MPI_COMM_WORLD);
+#endif
+
+    //! To get nut in physical space;
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if(myid ==0)
+    {
+        (*dynamicCoef)(IF) = -0.5 * (*LijMij)(IF) / ((*MijMij)(IF) + TINY);
+        for(int iz = istf; iz <= iedf; ++iz)
+        {
+            (*realnut)(iz) = max(reynolds * (*dynamicCoef)(iz) * (*sijMagnitude)(iz), 0.0);
+        }
+    }
+#ifdef PH_PARALLEL
+    MPI_Bcast(&(*dynamicCoef)(istf), nz, MPI_DOUBLE, 0, MPI_COMM_WORLD);
+    MPI_Bcast(&(*realnut)(istf), nz, MPI_DOUBLE, 0, MPI_COMM_WORLD);
+#endif
+
+    if(inutxyavg == 0 || inutxyavg == 1)
+    {
+        for(int iz = kstp; iz <= kedp; ++iz)
+        {
+            for(int iy = jstp; iy <= jedp; ++iy)
+            {
+                for(int ix = istp; ix <= iedp; ++ix)
+                {
+                    RDouble s11 = (*realVelocityGradient)(ix, iy, iz, 1);
+                    RDouble s22 = (*realVelocityGradient)(ix, iy, iz, 5);
+                    RDouble s33 = (*realVelocityGradient)(ix, iy, iz, 9);
+                    RDouble s12 = 0.5 * ( (*realVelocityGradient)(ix, iy, iz, 2) + (*realVelocityGradient)(ix, iy, iz, 4) );
+                    RDouble s13 = 0.5 * ( (*realVelocityGradient)(ix, iy, iz, 3) + (*realVelocityGradient)(ix, iy, iz, 7) );
+                    RDouble s23 = 0.5 * ( (*realVelocityGradient)(ix, iy, iz, 6) + (*realVelocityGradient)(ix, iy, iz, 8) );
+
+                    RDouble sijsij = s11 * s11 + s22 * s22 + s33 * s33 + 2.0 * (s12 * s12 + s13 * s13 + s23 * s23);
+                    sijsij = sqrt(2.0 * sijsij);
+
+                    RDouble nutTemp = max(reynolds * (*dynamicCoef)(iz) * sijsij, 0.0);
+                    if(inutxyavg == 0)
+                    {
+                        (*realnut3d)(ix, iy, iz) = nutTemp;
+                    }
+                    else if(inutxyavg == 1)
+                    {
+                        nutTemp = nutTemp - (*realnut)(iz);
+                        (*realnut3d)(ix, iy, iz) = nutTemp;
+                    }
+
+                    (*realTauij)(ix, iy, iz, 1) = -2.0 * nutTemp * s11 /reynolds;
+                    (*realTauij)(ix, iy, iz, 2) = -2.0 * nutTemp * s22 /reynolds;
+                    (*realTauij)(ix, iy, iz, 3) = -2.0 * nutTemp * s33 /reynolds;
+                    (*realTauij)(ix, iy, iz, 4) = -2.0 * nutTemp * s12 /reynolds;
+                    (*realTauij)(ix, iy, iz, 5) = -2.0 * nutTemp * s13 /reynolds;
+                    (*realTauij)(ix, iy, iz, 6) = -2.0 * nutTemp * s23 /reynolds;
+                }
+            }
+        }
+
+        GetDiffTau(GridData, CompactDifferenceFirstDerivativeData);
+    }
+
+    delete sijMagnitude; sijMagnitude = NULL;
+    delete sijMagnitude_loc; sijMagnitude_loc = NULL;
+    delete varTemp; varTemp = NULL;
+    delete dvarTemp; dvarTemp = NULL;
+    delete workSpace1; workSpace1 = NULL;
+    delete workSpace2; workSpace2 = NULL;
+    delete testFilterSijMagnitude; testFilterSijMagnitude = NULL;
+    delete LijMij_loc; LijMij_loc = NULL;
+    delete MijMij_loc; MijMij_loc = NULL;
+    delete LijMij; LijMij = NULL;
+    delete MijMij; MijMij = NULL;
+}
+
+void LES::FilterXYInSpectralSpace(PHComplex *varTemp, const int n, SpecDiffHybGrid * GridData)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    Range IF(istf, iedf);
+    Range JF(jstf, jedf);
+    Range KF(kstf, kedf);
+    Complex4D var(varTemp, IF, JF, KF, Range(1, n), neverDeleteData, fortranArray );
+    for(int in = 1; in <= n; ++in)
+    {
+        for(int ix = kstf; ix <= kedf; ++ix)
+        {
+            for(int iy = jstf; iy <= jedf; ++iy)
+            {
+                for(int iz = kstf; iz <= kedf; ++iz)
+                {
+                    var(iz, iy, ix, in) = var(iz, iy, ix, in) * (*gkx)(ix) * (*gky)(iy);
+                }
+            }
+        }
+    }
+}
+
+void LES::GetDiffTau(SpecDiffHybGrid *GridData, CompactDifferenceFirstDerivative *CompactDifferenceFirstDerivativeData)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+    Range IF(istf, iedf);
+    Range JF(jstf, jedf);
+    Range KF(kstf, kedf);
+
+    int istp = GridData -> iStartPhysicalIndex;
+    int jstp = GridData -> jStartPhysicalIndex;
+    int kstp = GridData -> kStartPhysicalIndex;
+
+    int nXYZPhysical = GridData -> nXYZPhysical;
+    int nXYZFourier = GridData -> nXYZFourier;
+    int nXYAll = GridData -> nXYAll;
+    unsigned char opr2c[] = "ffn";
+    Cp3dfft_ftran_r2c_many(&(*realTauij)(istp, jstp, kstp, 1), nXYZPhysical, reinterpret_cast<double*>(&(*complexTauij)(istf, jstf, kstf, 1)), nXYZFourier, 6, opr2c);
+    (*complexTauij)(IF, JF, KF, Range(1, 6)) = (*complexTauij)(IF, JF, KF, Range(1, 6)) / static_cast<double>(nXYAll);
+
+    Complex1D *dTau31Dz = new Complex1D(IF, fortranArray);
+    Complex1D *dTau32Dz = new Complex1D(IF, fortranArray);
+    Complex1D *dTau33Dz = new Complex1D(IF, fortranArray);
+    Complex1D *complexWorkSpace = new Complex1D(IF, fortranArray);
+    RDouble1D *realWorkSpace = new RDouble1D(IF, fortranArray);
+    RDouble1D *detaDz = GridData -> realDetaDz;
+    Complex1D *complexKX = GridData -> complexKX;
+    Complex1D *complexKY = GridData -> complexKY;
+    for(int ix = kstf; ix <= kedf; ++ix)
+    {
+        for(int iy = jstf; iy <= jedf; ++iy)
+        {
+            CompactDifferenceFirstDerivativeData -> GetDvarDz(istf, iedf, &(*detaDz)(istf), &(*complexTauij)(istf, iy, ix, 5), &(*dTau31Dz)(istf), &(*complexWorkSpace)(istf), &(*realWorkSpace)(istf));
+            CompactDifferenceFirstDerivativeData -> GetDvarDz(istf, iedf, &(*detaDz)(istf), &(*complexTauij)(istf, iy, ix, 6), &(*dTau32Dz)(istf), &(*complexWorkSpace)(istf), &(*realWorkSpace)(istf));
+            CompactDifferenceFirstDerivativeData -> GetDvarDz(istf, iedf, &(*detaDz)(istf), &(*complexTauij)(istf, iy, ix, 3), &(*dTau33Dz)(istf), &(*complexWorkSpace)(istf), &(*realWorkSpace)(istf));
+
+            for(int iz = istf; iz <= iedf; ++iz)
+            {
+                (*complexDiffTau)(iz, iy, ix, 1) = (*complexKX)(ix) * (*complexTauij)(iz, iy, ix, 1) + (*complexKY)(iy) * (*complexTauij)(iz, iy, ix, 4) + (*dTau31Dz)(iz);
+                (*complexDiffTau)(iz, iy, ix, 2) = (*complexKX)(ix) * (*complexTauij)(iz, iy, ix, 4) + (*complexKY)(iy) * (*complexTauij)(iz, iy, ix, 2) + (*dTau32Dz)(iz);
+                (*complexDiffTau)(iz, iy, ix, 3) = (*complexKX)(ix) * (*complexTauij)(iz, iy, ix, 5) + (*complexKY)(iy) * (*complexTauij)(iz, iy, ix, 6) + (*dTau33Dz)(iz);
+            }
+        }
+    }
+
+    delete dTau31Dz; dTau31Dz = NULL;
+    delete dTau32Dz; dTau32Dz = NULL;
+    delete dTau33Dz; dTau33Dz = NULL;
+    delete complexWorkSpace; complexWorkSpace = NULL;
+    delete realWorkSpace; realWorkSpace = NULL;
+}
+
+void LES::Sigma(SpecDiffHybGrid *GridData, RDouble1D *realnut, RDouble4D *realVelocityGradient)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+
+    int istp = GridData -> iStartPhysicalIndex;
+    int jstp = GridData -> jStartPhysicalIndex;
+    int kstp = GridData -> kStartPhysicalIndex;
+    int iedp = GridData -> iEndPhysicalIndex;		
+    int jedp = GridData -> jEndPhysicalIndex;		
+    int kedp = GridData -> kEndPhysicalIndex;
+
+    Range IF(istf, iedf);
+    RDouble1D *differentialSigma = new RDouble1D(IF, fortranArray); 
+    RDouble1D *differentialSigmaLocal = new RDouble1D(IF, fortranArray);
+
+    (*differentialSigmaLocal)(IF) = 0.0;
+
+    RDouble ** velocityGradTensor = AleModel :: CreateMatrix();
+
+    for(int iz = kstp; iz <= kedp; ++iz)
+    {
+        for(int iy = jstp; iy <= jedp; ++iy)
+        {
+            for(int ix = istp; ix <= iedp; ++ix)
+            {
+                velocityGradTensor[0][0] = (*realVelocityGradient)(ix, iy, iz, 1);
+                velocityGradTensor[0][1] = (*realVelocityGradient)(ix, iy, iz, 2);
+                velocityGradTensor[0][2] = (*realVelocityGradient)(ix, iy, iz, 3);
+
+                velocityGradTensor[1][0] = (*realVelocityGradient)(ix, iy, iz, 4);
+                velocityGradTensor[1][1] = (*realVelocityGradient)(ix, iy, iz, 5);
+                velocityGradTensor[1][2] = (*realVelocityGradient)(ix, iy, iz, 6);
+
+                velocityGradTensor[2][0] = (*realVelocityGradient)(ix, iy, iz, 7);
+                velocityGradTensor[2][1] = (*realVelocityGradient)(ix, iy, iz, 8);
+                velocityGradTensor[2][2] = (*realVelocityGradient)(ix, iy, iz, 9);
+
+                RDouble diffSigma = 0.0;
+                ComputeDifferentialSigma(velocityGradTensor, diffSigma);
+
+                (*differentialSigmaLocal)(iz) = (*differentialSigmaLocal)(iz) + diffSigma;
+            }
+        }
+    }
+
+    int nz = iedf - istf + 1;
+    (*differentialSigma)(IF) = (*differentialSigmaLocal)(IF);
+#ifdef PH_PARALLEL       
+    MPI_Reduce( &(*differentialSigmaLocal)(istf), &(*differentialSigma)(istf), nz, MPI_DOUBLE, MPI_SUM, 0, MPI_COMM_WORLD );
+#endif
+
+    using namespace PHMPI;
+
+    RDouble reynolds = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+
+    int myid = GetCurrentProcessorID();
+    if(myid == 0)
+    {
+        int nXYAll = GridData -> nXYAll;
+        (*differentialSigma)(IF) = (*differentialSigma)(IF) / static_cast<double>(nXYAll);
+
+        RDouble coefSigma = GlobalDataBase::GetDoubleParaFromDB("coefSigma");
+
+        for(int iz = istf; iz <= iedf; ++iz)
+        {
+            (*realnut)(iz) = reynolds * pow( (coefSigma * (*vanDriestFunc)(iz) * (*delta)(iz)), 2.0 ) * (*differentialSigma)(iz);
+        }
+    }
+
+#ifdef PH_PARALLEL
+    MPI_Bcast(&(*realnut)(istf), nz, MPI_DOUBLE, 0, MPI_COMM_WORLD);
+#endif
+
+    delete differentialSigma; differentialSigma = NULL;
+    delete differentialSigmaLocal; differentialSigmaLocal = NULL;
+}
+
+void LES::ComputeDifferentialSigma(RDouble ** velocityGradTensor, RDouble &differentialSigma)
+{
+    RDouble ** velocityGradTensorTranspose = AleModel :: CreateMatrix();
+    RDouble ** gij = AleModel :: CreateMatrix();
+    RDouble ** gij2 = AleModel :: CreateMatrix();
+
+    AleModel::SetMatrix(velocityGradTensorTranspose, velocityGradTensor);
+
+    AleModel::TransposeMatrix(velocityGradTensorTranspose);
+
+    AleModel::MatrixMultiply(velocityGradTensorTranspose, velocityGradTensor, gij);
+
+    AleModel::MatrixMultiply(gij, gij, gij2);
+
+    RDouble tracegij = gij[0][0] + gij[1][1] + gij[2][2];
+    RDouble tracegij2 = gij2[0][0] + gij2[1][1] + gij2[2][2];
+
+    RDouble detgij = gij[0][0] * (gij[1][1] * gij[2][2] - gij[1][2] * gij[2][1])
+        - gij[0][1] * (gij[1][0] * gij[2][2] - gij[1][2] * gij[2][0])
+        + gij[0][2] * (gij[1][0] * gij[2][1] - gij[1][1] * gij[2][0]);
+
+    RDouble t1 = tracegij;
+    RDouble t2 = 0.5 * (tracegij * tracegij - tracegij2);
+    RDouble t3 = detgij;
+
+    RDouble alpha1 = t1 * t1 / 9.0 - t2 / 3.0;
+    RDouble alpha2 = t1 * t1 * t1 / 27.0 - t1 * t2 / 6.0 + t3 / 2.0;
+    RDouble alpha3 = 1.0 /3.0 * acos( MAX( MIN(alpha2 / sqrt(alpha1 * alpha1 * alpha1), 1.0), -1.0 ) );
+
+    RDouble sigma1 = sqrt( MAX(t1 / 3.0 + 2.0 * sqrt(alpha1) * cos(alpha3), 0.0) );
+    RDouble sigma2 = sqrt( MAX(t1 / 3.0 - 2.0 * sqrt(alpha1) * cos(acos(0.5) + alpha3), 0.0) );
+    RDouble sigma3 = sqrt( MAX(t1 / 3.0 - 2.0 * sqrt(alpha1) * cos(acos(0.5) - alpha3), 0.0) );
+
+    differentialSigma = sigma3 * (sigma1 - sigma2) * (sigma2 - sigma3) / sigma1 / sigma1;
+    differentialSigma = MAX(differentialSigma, 0.0);
+
+    AleModel::DestroyMatrix(velocityGradTensorTranspose);
+    AleModel::DestroyMatrix(gij);
+    AleModel::DestroyMatrix(gij2);
+}
+
+/*
+LIB_EXPORT Param_SpecSolver *LES::GetControlParameters() const
+{
+    return static_cast <Param_SpecSolver *> (controlParameters);
+}
+
+LIB_EXPORT void LES::InitControlParameters()
+{
+    FreeControlParameters();
+    controlParameters = new Param_SpecSolver();
+    controlParameters->Init();
+}
+*/
+}
+
diff --git a/CFD/SpecDiffHybSolver/src/Param_SpecDiffHybSolver.cpp b/CFD/SpecDiffHybSolver/src/Param_SpecDiffHybSolver.cpp
new file mode 100644
index 0000000..d658b64
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/src/Param_SpecDiffHybSolver.cpp
@@ -0,0 +1,51 @@
+#include "Param_SpecDiffHybSolver.h"
+#include "GlobalDataBase.h"
+#include "Constants.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Param_SpecDiffHybSolver::Param_SpecDiffHybSolver()
+{
+
+}
+
+LIB_EXPORT Param_SpecDiffHybSolver::~Param_SpecDiffHybSolver()
+{
+
+}
+
+LIB_EXPORT void Param_SpecDiffHybSolver::Init()
+{
+    maxSimuStep = GlobalDataBase::GetIntParaFromDB("maxSimuStep");
+
+    statisticMethod = GlobalDataBase::GetIntParaFromDB("statisticMethod");
+
+    startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+
+    intervalStepRes = GlobalDataBase::GetIntParaFromDB("intervalStepRes");
+
+    intervalStepStatistic = GlobalDataBase::GetIntParaFromDB("intervalStepStatistic");
+
+    intervalStepFlow = GlobalDataBase::GetIntParaFromDB("intervalStepFlow");
+
+    startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+
+    refReNumber = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+
+    viscousName = GlobalDataBase::GetStrParaFromDB("viscousName");
+
+    viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+
+    filterName = GlobalDataBase::GetStrParaFromDB("filterName");
+
+    smagConstant = GlobalDataBase::GetDoubleParaFromDB("smagConstant");
+
+    testFilterScale = GlobalDataBase::GetDoubleParaFromDB("testFilterScale");
+
+    timeStep = GlobalDataBase::GetDoubleParaFromDB("timeStep");
+
+    pressureGradient = GlobalDataBase::GetDoubleParaFromDB("pressureGradient");
+}
+
+}
\ No newline at end of file
diff --git a/CFD/SpecDiffHybSolver/src/Param_SpecSolver.cpp b/CFD/SpecDiffHybSolver/src/Param_SpecSolver.cpp
new file mode 100644
index 0000000..065cfb7
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/src/Param_SpecSolver.cpp
@@ -0,0 +1,53 @@
+#include "Param_SpecSolver.h"
+#include "GlobalDataBase.h"
+#include "Constants.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Param_SpecSolver::Param_SpecSolver()
+{
+
+}
+
+LIB_EXPORT Param_SpecSolver::~Param_SpecSolver()
+{
+
+}
+
+LIB_EXPORT void Param_SpecSolver::Init()
+{
+    maxSimuStep = GlobalDataBase::GetIntParaFromDB("maxSimuStep");
+
+    statisticMethod = GlobalDataBase::GetIntParaFromDB("statisticMethod");
+
+    startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+
+    intervalStepRes = GlobalDataBase::GetIntParaFromDB("intervalStepRes");
+
+    intervalStepStatistic = GlobalDataBase::GetIntParaFromDB("intervalStepStatistic");
+
+    intervalStepFlow = GlobalDataBase::GetIntParaFromDB("intervalStepFlow");
+
+    startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+
+    refReNumber = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+
+    viscousName = GlobalDataBase::GetStrParaFromDB("viscousName");
+
+    viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+
+    filterName = GlobalDataBase::GetStrParaFromDB("filterName");
+
+    smagConstant = GlobalDataBase::GetDoubleParaFromDB("smagConstant");
+
+    testFilterScale = GlobalDataBase::GetDoubleParaFromDB("testFilterScale");
+
+    timeStep = GlobalDataBase::GetDoubleParaFromDB("timeStep");
+
+    //pressureGradient = GlobalDataBase::GetDoubleParaFromDB("pressureGradient");
+
+    spectrumType = GlobalDataBase::GetIntParaFromDB("spectrumType");
+}
+
+}
\ No newline at end of file
diff --git a/CFD/SpecDiffHybSolver/src/PoissonSolver.cpp b/CFD/SpecDiffHybSolver/src/PoissonSolver.cpp
new file mode 100644
index 0000000..74270c2
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/src/PoissonSolver.cpp
@@ -0,0 +1,546 @@
+#include "PoissonSolver.h"
+#include "Precision.h"
+#include "GlobalDataBase.h"
+#include "CompactDifferenceSecondDerivative.h"
+#include "TK_Exit.h"
+#include "Complex.h"
+#include "PHHeader.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+PoissonSolver::PoissonSolver()
+{
+}
+
+PoissonSolver::~PoissonSolver()
+{
+    delete coefMatrixPressureNeumann; coefMatrixPressureNeumann = NULL;
+    delete coefMatrixVelocityDirichlet; coefMatrixVelocityDirichlet = NULL;
+    delete boundaryMatrixPressureNeumann; boundaryMatrixPressureNeumann = NULL;
+}
+
+void PoissonSolver::InitPoissonSolverData( SpecDiffHybGrid *GridData, ExplicitDifferenceBoundary *DiffBoundaryData, CompactDifferenceSecondDerivative*   
+                                          CompactDifferenceSecondDerivativeData, RDouble1D *realnut, RDouble1D *realnut_00)
+{
+    AllocPoissonSolverData(GridData, DiffBoundaryData);
+
+    GetCoefMatrixPressureNeumann( GridData, DiffBoundaryData, CompactDifferenceSecondDerivativeData );
+
+    GetCoefMatrixVelocityDirichlet(GridData, DiffBoundaryData, CompactDifferenceSecondDerivativeData, realnut, realnut_00);
+}
+
+void PoissonSolver::AllocPoissonSolverData(SpecDiffHybGrid *GridData, ExplicitDifferenceBoundary *DiffBoundaryData)
+{
+    int ist = GridData -> iStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex  ;
+    int jst = GridData -> jStartFourierIndex;
+    int jed = GridData -> jEndFourierIndex  ;
+    int kst = GridData -> kStartFourierIndex;
+    int ked = GridData -> kEndFourierIndex  ;
+    int nbc = DiffBoundaryData -> nBoundary_Neumann;
+
+    Range I(ist, ied);
+    Range J(jst, jed);
+    Range K(kst, ked);
+    Range N(1, nbc);
+    Range NN(-2, 2);
+
+    coefMatrixPressureNeumann     = new RDouble4D(I, NN, J, K, fortranArray);
+    coefMatrixVelocityDirichlet   = new RDouble4D(I, NN, J, K, fortranArray);
+    boundaryMatrixPressureNeumann = new RDouble4D(N, N, J, K, fortranArray);
+}
+
+void PoissonSolver::PoissonSolverNeumannBC( const int n, RDouble *coef_LHS, PHComplex *var, int *lowerBound, int *upperBound, const int nbc, const PHComplex boundN, 
+                                           const PHComplex bound0, PHComplex *rHS, RDouble *coef, RDouble *boundary )
+{
+    RDouble2D rA( coef_LHS, Range(1, n-1), Range(-2, 2), neverDeleteData, fortranArray );
+    Complex1D cf( var, Range(0, n), neverDeleteData, fortranArray );
+    Int1D il( lowerBound, Range(1, n-1), neverDeleteData, fortranArray );
+    Int1D ir( upperBound, Range(1, n-1), neverDeleteData, fortranArray );
+    Complex1D cR( rHS, Range(0, n), neverDeleteData, fortranArray );
+    RDouble2D rC( coef, Range(0, n), Range(-2, 2), neverDeleteData, fortranArray );
+    RDouble2D bca( boundary, Range(1, nbc), Range(1, nbc), neverDeleteData, fortranArray );
+
+    int np1 = n + 1;
+    cR(Range(0, n)) = PHComplex(0.0, 0.0);
+    for ( int i = 1; i <= n-1; ++i )
+    {
+        for ( int idp = il(i); idp <= ir(i); ++idp )
+        {
+            int iip = i + idp;
+            cR(i) = cR(i) + rA(i, idp) * cf(iip);
+        }
+    }
+    cR(0) = bound0;
+    cR(n) = boundN;
+
+    LUSolveNeumannBC( np1, &rC(0, -2), nbc, &bca(1, 1), &cR(0) );
+
+    cf( Range(0, n) ) = cR( Range(0, n) );
+}
+
+void PoissonSolver::PoissonSolverDirichletBC( const int n, RDouble *coef_LHS, RDouble *coef_RHS, PHComplex *var, const RDouble rK2, int *lowerBound, int *upperBound, 
+                                             const PHComplex boundN, const PHComplex bound0, RDouble *coef, PHComplex *rHS )
+{
+    RDouble2D rA( coef_LHS, Range(1, n-1), Range(-2, 2), neverDeleteData, fortranArray );
+    RDouble2D rB( coef_RHS, Range(1, n-1), Range(-2, 2), neverDeleteData, fortranArray );
+    Int1D il( lowerBound, Range(1, n-1), neverDeleteData, fortranArray );
+    Int1D ir( upperBound, Range(1, n-1), neverDeleteData, fortranArray );
+    Complex1D cf( var, Range(0, n), neverDeleteData, fortranArray );
+    RDouble2D rC( coef, Range(0, n), Range(-2, 2), neverDeleteData, fortranArray );
+    Complex1D cR( rHS, Range(0, n), neverDeleteData, fortranArray );
+
+    int np1 = n + 1;
+    cR( Range(0, n) ) = PHComplex(0.0, 0.0);
+    for ( int i = 1; i <= n-1; ++i )
+    {
+        for ( int idp = il(i); idp <= ir(i); ++idp )
+        {
+            int iip = i + idp;
+            cR(i) = cR(i) + rA(i, idp) * cf(iip);
+        }
+    }
+
+    rC( Range(0, n) ) = 0.0;
+    for ( int i = 1; i <= n-1; ++i )
+    {
+        for ( int idp = il(i); idp <= ir(i); ++idp )
+        {
+            int iip = i + idp;
+            rC(i, idp) = rB(i, idp) - rA(i, idp) * rK2;
+        }
+    }
+
+    rC(0, -2) = 0.0;
+    rC(0, -1) = 0.0;
+    rC(0, 0) = 1.0;
+    rC(0, 1) = 0.0;
+    rC(0, 2) = 0.0;
+    rC(n,-2) = 0.0;
+    rC(n,-1) = 0.0;
+    rC(n, 0) = 1.0;
+    rC(n, 1) = 0.0;
+    rC(n, 2) = 0.0;
+    cR(0) = bound0;
+    cR(n) = boundN;
+
+    LUDecompose(np1, &rC(0, -2));
+    LUSolve(np1, &rC(0, -2), &cR(0));
+
+    cf(Range(0, n)) = cR(Range(0, n));
+}
+
+void PoissonSolver::PoissonSolverVelocity( const int n, RDouble *coef_LHS, PHComplex *var, int *lowerBound, int *upperBound, const PHComplex boundN, const PHComplex bound0, 
+                                          RDouble *realPHI, RDouble *coef, PHComplex *rHS )
+{
+    RDouble2D rA( coef_LHS, Range(1, n-1), Range(-2, 2), neverDeleteData, fortranArray );
+    Complex1D cf( var, Range(0, n), neverDeleteData, fortranArray );
+    Int1D il( lowerBound, Range(1, n-1), neverDeleteData, fortranArray );
+    Int1D ir( upperBound, Range(1, n-1), neverDeleteData, fortranArray );
+    RDouble1D rPHI( realPHI, Range(0, n), neverDeleteData, fortranArray );
+    RDouble2D rC( coef, Range(0, n), Range(-2, 2), neverDeleteData, fortranArray );
+    Complex1D cR( rHS, Range(0, n), neverDeleteData, fortranArray );
+
+    int np1 = n + 1;
+    cR( Range(0, n) ) = PHComplex(0.0, 0.0);
+    for ( int i = 1; i <= n-1; ++i )
+    {
+        for ( int idp = il(i); idp <= ir(i); ++idp )
+        {
+            int iip = i + idp;
+            cR(i) = cR(i) + rA(i, idp) * cf(iip) * rPHI(iip);
+        }
+    }
+    cR(0) = bound0;
+    cR(n) = boundN;
+
+    LUSolve( np1, &rC(0, -2), &cR(0) );
+
+    cf( Range(0, n) ) = cR( Range(0, n) );
+}
+
+void PoissonSolver::PoissonSolverVelocity(PHComplex &uLocal, const RDouble timeStep, const RDouble k2, const RDouble phi)
+{
+    RDouble psi = phi / timeStep + k2;
+
+    uLocal = phi * uLocal / psi;
+}
+
+void PoissonSolver::GetCoefMatrixPressureNeumann( SpecDiffHybGrid *GridData, ExplicitDifferenceBoundary *DiffBoundaryData, CompactDifferenceSecondDerivative*   
+                                                 CompactDifferenceSecondDerivativeData)
+{
+    int ist = GridData -> iStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex  ;
+    int jst = GridData -> jStartFourierIndex;
+    int jed = GridData -> jEndFourierIndex  ;
+    int kst = GridData -> kStartFourierIndex;
+    int ked = GridData -> kEndFourierIndex  ;
+    int nsol = ied - ist;
+
+    (*coefMatrixPressureNeumann)( Range(ist, ied), Range(-2, 2), Range(jst, jed), Range(kst, ked) ) = 0.0;
+
+    int nbc_neumann = DiffBoundaryData -> nBoundary_Neumann;
+    (*boundaryMatrixPressureNeumann)( Range(1, nbc_neumann), Range(1, nbc_neumann), Range(jst, jed), Range(kst, ked) ) = 0.0;
+
+    RDouble1D *realKX = GridData -> realKX;
+    RDouble1D *realKY = GridData -> realKY;
+
+    RDouble2D *coef_LHS = CompactDifferenceSecondDerivativeData -> lHSCoefMatrix;
+    RDouble2D *coef_RHS = CompactDifferenceSecondDerivativeData -> rHSCoefMatrix;
+
+    Int1D *lowerBound = CompactDifferenceSecondDerivativeData -> lowerBoundofRHSCoefMatrix;
+    Int1D *upperBound = CompactDifferenceSecondDerivativeData -> upperBoundofRHSCoefMatrix;
+
+    RDouble1D *boundaryNeumann0 = DiffBoundaryData -> boundary_Neumann_0;
+    RDouble1D *boundaryNeumannN = DiffBoundaryData -> boundary_Neumann_N;
+
+    for ( int ix = kst; ix <= ked; ++ix )
+    {
+        for (int iy = jst; iy <= jed; ++iy)
+        {
+            RDouble kx = (*realKX)(ix);
+            RDouble ky = (*realKY)(iy);
+            RDouble k2  = kx * kx + ky * ky;
+            if( k2 < TINY ) continue;
+
+            DecomCoefMatrixPressureNeumannBC( nsol, &(*coef_LHS)(ist+1, -2), &(*coef_RHS)(ist+1, -2), k2, &(*lowerBound)(ist+1), &(*upperBound)(ist+1), nbc_neumann, 
+                &(*boundaryNeumann0)(0), &(*boundaryNeumannN)(-nbc_neumann-1), &(*coefMatrixPressureNeumann)(ist, -2, iy, ix), 
+                &(*boundaryMatrixPressureNeumann)(1, 1, iy, ix) );
+        }
+    }
+}
+
+void PoissonSolver::GetCoefMatrixVelocityDirichlet(SpecDiffHybGrid *GridData, ExplicitDifferenceBoundary *DiffBoundaryData, CompactDifferenceSecondDerivative*   
+                                                   CompactDifferenceSecondDerivativeData, RDouble1D *realnut, RDouble1D *realnut_00)
+{
+    int ist = GridData -> iStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex  ;
+    int jst = GridData -> jStartFourierIndex;
+    int jed = GridData -> jEndFourierIndex  ;
+    int kst = GridData -> kStartFourierIndex;
+    int ked = GridData -> kEndFourierIndex  ;
+    int nsol = ied - ist;
+    Range I(ist, ied);
+    Range J(jst, jed);
+    Range K(kst, ked);
+
+    RDouble reynolds = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+    RDouble timeStep = GlobalDataBase::GetDoubleParaFromDB("timeStep");
+
+    (*coefMatrixVelocityDirichlet)(I, Range(-2, 2), J, K) = 0.0;
+
+    RDouble1D *realPHI = new RDouble1D(I, fortranArray);
+    (*realPHI)(I) = 2.0 * reynolds/( 1.0 + (*realnut)(I) );
+
+    RDouble1D *realKX = GridData -> realKX;
+    RDouble1D *realKY = GridData -> realKY;
+
+    RDouble2D *coef_LHS = CompactDifferenceSecondDerivativeData -> lHSCoefMatrix;
+    RDouble2D *coef_RHS = CompactDifferenceSecondDerivativeData -> rHSCoefMatrix;
+
+    Int1D *lowerBound = CompactDifferenceSecondDerivativeData -> lowerBoundofRHSCoefMatrix;
+    Int1D *upperBound = CompactDifferenceSecondDerivativeData -> upperBoundofRHSCoefMatrix;
+
+    for ( int ix = kst; ix <= ked; ++ix )
+    {
+        for (int iy = jst; iy <= jed; ++iy)
+        {
+            RDouble kx = (*realKX)(ix);
+            RDouble ky = (*realKY)(iy);
+            RDouble k2  = kx * kx + ky * ky;
+
+            DecomCoefMatrixVelocityDirichletBC( nsol, &(*coef_LHS)(ist+1, -2), &(*coef_RHS)(ist+1, -2), k2, &(*lowerBound)(ist+1), &(*upperBound)(ist+1), timeStep, &(*realPHI)(ist),
+                &(*coefMatrixVelocityDirichlet)(ist, -2, iy, ix) );
+        }
+    }
+
+    int imode00fix = GlobalDataBase::GetIntParaFromDB("imode00fix");
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if(imode00fix > 0 && myid ==0)
+    {
+        (*realPHI)(I) = 2.0 * reynolds/( 1.0 + (*realnut_00)(Range(ist, ied)) );
+
+        int ix = kst;
+        int iy = jst;
+
+        RDouble kx = (*realKX)(ix);
+        RDouble ky = (*realKY)(iy);
+        RDouble k2  = kx * kx + ky * ky;
+
+        DecomCoefMatrixVelocityDirichletBC( nsol, &(*coef_LHS)(ist+1, -2), &(*coef_RHS)(ist+1, -2), k2, &(*lowerBound)(ist+1), &(*upperBound)(ist+1), timeStep, &(*realPHI)(ist),
+            &(*coefMatrixVelocityDirichlet)(ist, -2, iy, ix) );
+    }
+
+    delete realPHI; realPHI = NULL;
+}
+
+void PoissonSolver::DecomCoefMatrixPressureNeumannBC( const int n, RDouble *coef_LHS, RDouble *coef_RHS, const double rK2, int *lowerBound, int *upperBound, const int nbc, 
+                                                     RDouble *boundaryNeumann0, RDouble *boundaryNeumannN, RDouble *coef, RDouble *boundary )
+{
+    RDouble2D rA( coef_LHS, Range(1, n-1), Range(-2, 2), neverDeleteData, fortranArray );
+    RDouble2D rB( coef_RHS, Range(1, n-1), Range(-2, 2), neverDeleteData, fortranArray );
+    Int1D il( lowerBound, Range(1, n-1), neverDeleteData, fortranArray );
+    Int1D ir( upperBound, Range(1, n-1), neverDeleteData, fortranArray );
+    RDouble1D bca_0( boundaryNeumann0, Range(0, nbc+1), neverDeleteData, fortranArray );
+    RDouble1D bca_n( boundaryNeumannN, Range(-(nbc+1), 0), neverDeleteData, fortranArray );
+    RDouble2D rC( coef, Range(0, n), Range(-2, 2), neverDeleteData, fortranArray );
+    RDouble2D bca( boundary, Range(1, nbc), Range(1, nbc), neverDeleteData, fortranArray );
+
+    int np1 = n + 1;
+    rC( Range(0, n), Range(-2, 2) ) = 0.0;
+    for ( int i = 1; i <= n-1; ++i )
+    {
+        for( int idp = il(i); idp <= ir(i); ++idp )
+        {
+            rC(i,idp) = rB(i,idp) - rA(i,idp) * rK2;
+        }
+    }
+
+    rC(0, 0) = bca_0(0);
+    rC(0, 1) = bca_0(1);
+    rC(0, 2) = bca_0(2);
+
+    rC(n, 0) = bca_n( 0);
+    rC(n,-1) = bca_n(-1);
+    rC(n,-2) = bca_n(-2);
+
+    bca( Range(1, nbc), Range(1, nbc) ) = 0.0;
+    for ( int i = 2; i <= nbc; ++i )
+    {
+        bca(1,i) = bca_0(i+1);
+    }
+
+    for ( int i = 1; i <= nbc-1; ++i )
+    {
+        bca(nbc,i) = bca_n(i-nbc-2);
+    }
+
+    LUDecomposeNeumannBC( np1, &rC(0, -2), nbc, &bca(1, 1) );
+}
+
+void PoissonSolver::DecomCoefMatrixVelocityDirichletBC( const int n, RDouble *coef_LHS, RDouble *coef_RHS, const double rK2, int *lowerBound, int *upperBound, const double rdt, 
+                                                       RDouble *realPHI, RDouble *coef )
+{
+    RDouble2D rA( coef_LHS, Range(1, n-1), Range(-2, 2), neverDeleteData, fortranArray );
+    RDouble2D rB( coef_RHS, Range(1, n-1), Range(-2, 2), neverDeleteData, fortranArray );
+    Int1D il( lowerBound, Range(1, n-1), neverDeleteData, fortranArray );
+    Int1D ir( upperBound, Range(1, n-1), neverDeleteData, fortranArray );
+    RDouble1D rPHI( realPHI, Range(0, n), neverDeleteData, fortranArray );
+    RDouble2D rC( coef, Range(0, n), Range(-2, 2), neverDeleteData, fortranArray );
+
+    rC( Range(0, n), Range(-2, 2) ) = 0.0;
+    for( int i = 1; i <= n-1; ++i )
+    {
+        for( int idp = il(i); idp <= ir(i); ++idp)
+        {
+            int iip = i + idp;
+            rC(i,idp) = -rB(i,idp) + rA(i,idp) * ( rPHI(iip)/rdt + rK2 );
+        }
+    }
+
+    //--- Dirichelt B.C. : u(+1)=0,u(-1)=0
+    rC(0,-2) = 0.0;
+    rC(0,-1) = 0.0;
+    rC(0, 0) = 1.0;
+    rC(0, 1) = 0.0;
+    rC(0, 2) = 0.0;
+    rC(n,-2) = 0.0;
+    rC(n,-1) = 0.0;
+    rC(n, 0) = 1.0;
+    rC(n, 1) = 0.0;
+    rC(n, 2) = 0.0;
+
+    int np1 = n + 1;
+
+    LUDecompose( np1, &rC(0, -2) );
+}
+
+void PoissonSolver::LUDecompose( const int n, RDouble *coef )
+{
+    RDouble2D a( coef, Range(1, n), Range(1, 5), neverDeleteData, fortranArray );
+    int i = 1;
+
+    a(2, 2) = a(2, 2) / a(1, 3);
+    a(2, 3) = a(2, 3) - a(2, 2) * a(1, 4);
+    a(2, 4) = a(2, 4) - a(2, 2) * a(1, 5);
+
+    for ( i = 3; i <= n-1; ++i)
+    {
+        a(i, 1) = a(i, 1) / a(i-2, 3);
+        a(i, 2) = ( a(i, 2) - a(i, 1) * a(i-2, 4) ) / a(i-1, 3);
+        a(i, 3) = a(i, 3) - a(i, 1) * a(i-2, 5) - a(i, 2) * a(i-1, 4);
+        a(i, 4) = a(i, 4) - a(i, 2) * a(i-1, 5);
+    }
+
+    i = n;
+    a(i, 1) = a(i, 1) / a(i-2, 3);
+    a(i, 2) = ( a(i, 2) - a(i, 1) * a(i-2, 4) ) / a(i-1, 3);
+    a(i, 3) = a(i, 3) - a(i, 1) * a(i-2, 5) - a(i, 2) * a(i-1, 4);
+}
+
+void PoissonSolver::LUDecomposeNeumannBC( const int n, RDouble *coef, int nbc, RDouble *boundary )
+{
+    RDouble2D a( coef, Range(1, n), Range(1, 5), neverDeleteData, fortranArray );
+    RDouble2D bca( boundary, Range(1, nbc), Range(1, nbc), neverDeleteData, fortranArray );
+    int i, j;
+
+    if ( n <= (2*nbc+2) )
+    {
+        TK_Exit::ExceptionExit("n<=2*nbc+2 in LUDecomposeNeumannBC");
+    }
+
+    a(2, 2) = a(2, 2) / a(1, 3);
+    a(2, 3) = a(2, 3) - a(2, 2) * a(1, 4);
+    a(2, 4) = a(2, 4) - a(2, 2) * a(1, 5);
+
+    //bca �Խ��߲���
+    //  bca(1,2:6) ���� Neumann �߽�ϵ�����ֽ�󲻱�.
+    //  bca(6,1:5) ���� Neumann �߽�ϵ�����ֽ�󲻱�
+    //  �����ʼֵΪ��
+
+    a(2, 5) = a(2, 5) - a(2, 2) * bca(1, 2);
+    for ( i = 3; i <= nbc; ++i )
+    {
+        bca(2, i) = bca(2, i) - a(2, 2) * bca(1, i);
+    }
+
+    // i=3 ! �� nbc=3Ҳ����
+
+    for ( i = 3; i <= nbc-1; ++i )
+    {
+        a(i, 1) = a(i, 1) / a(i-2, 3);
+        a(i, 2) = ( a(i, 2) - a(i, 1) * a(i-2, 4) ) / a(i-1, 3);
+        a(i, 3) = a(i, 3) - a(i, 1) * a(i-2, 5) - a(i, 2) * a(i-1, 4);
+        //different parts:
+        a(i, 4) = a(i, 4) - a(i, 2) * a  (i-1, 5) - a(i, 1) * bca(i-2, i-1);
+        a(i, 5) = a(i, 5) - a(i, 2) * bca(i-1, i) - a(i, 1) * bca(i-2, i  );
+        for ( j = i+1; j <= nbc; ++j )
+        {
+            bca(i, j) = bca(i, j) - a(i, 2) * bca(i-1, j) - a(i, 1) * bca(i-2, j);
+        }
+    }
+
+    i = nbc;
+    a(i, 1) = a(i, 1) / a(i-2, 3);
+    a(i, 2) = ( a(i, 2) - a(i, 1) * a(i-2, 4) ) / a(i-1, 3);
+    a(i, 3) = a(i, 3) - a(i, 1) * a(i-2, 5) - a(i, 2) * a(i-1, 4);
+    // different parts:
+    a(i, 4) = a(i, 4) - a(i, 2) * a  (i-1, 5) - a(i, 1) * bca(i-2, i-1);
+    a(i, 5) = a(i, 5) - a(i, 2) * bca(i-1, i) - a(i, 1) * bca(i-2, i  );
+
+    i = nbc + 1;
+    a(i, 1) = a(i, 1) / a(i-2, 3);
+    a(i, 2) = ( a(i, 2) - a(i, 1) * a(i-2, 4) ) / a(i-1, 3);
+    a(i, 3) = a(i, 3) - a(i, 1) * a(i-2, 5) - a(i, 2) * a(i-1, 4);
+    // different parts:
+    a(i, 4) = a(i, 4) - a(i, 2) * a(i-1, 5) - a(i, 1) * bca(i-2, i-1);
+
+    //inner points:
+    for ( i = nbc+2; i <= n-1; ++i )
+    {
+        a(i, 1) = a(i, 1) / a(i-2, 3);
+        a(i, 2) = ( a(i, 2) - a(i, 1) * a(i-2, 4) ) / a(i-1, 3);
+        a(i, 3) = a(i, 3) - a(i, 1) * a(i-2, 5) - a(i, 2) * a(i-1, 4);
+        a(i, 4) = a(i, 4) - a(i, 2) * a(i-1, 5);
+    }
+
+    i = n;
+    bca(nbc, 1) = bca(nbc, 1) / a(n-nbc-1, 3);
+    bca(nbc, 2) = ( bca(nbc, 2) - bca(nbc, 1) * a(n-nbc-1, 4) ) / a(n-nbc,3);
+    for ( j = 3; j <= nbc-1; ++j )
+    {
+        bca(nbc, j) = ( bca(nbc, j) - bca(nbc, j-2) * a(n-nbc-4+j, 5) - bca(nbc, j-1) * a(n-nbc-3+j, 4) ) / a(n-nbc-2+j, 3);
+    }
+
+    a(n, 1) = ( a(n, 1) - bca(nbc, nbc-2) * a(n-4, 5) - bca(nbc, nbc-1) * a(n-3, 4) ) / a(n-2, 3);
+    a(n, 2) = ( a(n, 2) - bca(nbc, nbc-1) * a(n-3, 5) - a  (n  ,     1) * a(n-2, 4) ) / a(n-1, 3);
+    a(n, 3) = a(n, 3) - a(n, 1) * a(n-2, 5) - a(n, 2) * a(n-1, 4);
+}
+
+void PoissonSolver::LUSolve( const int n, RDouble *coef, RDouble *rHS )
+{
+    RDouble2D a( coef, Range(1, n), Range(1, 5), neverDeleteData, fortranArray );
+    RDouble1D b( rHS, Range(1, n), neverDeleteData, fortranArray );
+
+    b(2) = b(2) - a(2, 2) * b(1);
+    for ( int i = 3; i <= n; ++i )
+    {
+        b(i) = b(i) - a(i, 1) * b(i-2) - a(i, 2) * b(i-1);
+    }
+
+    // !back substitution
+    b(n) = b(n) / a(n, 3);
+    b(n-1) = ( b(n-1) - a(n-1, 4) * b(n) ) / a(n-1, 3);
+    for ( int i = n-2; i >= 1; --i )
+    {
+        b(i) = ( b(i) - a(i, 4) * b(i+1) - a(i, 5) * b(i+2) ) / a(i, 3);
+    }
+}
+
+void PoissonSolver::LUSolve( const int n, RDouble *coef, PHComplex *rHS )
+{
+    RDouble2D a( coef, Range(1, n), Range(1, 5), neverDeleteData, fortranArray );
+    Complex1D b( rHS, Range(1, n), neverDeleteData, fortranArray );
+
+    // !forward substitution
+    b(2) = b(2) - a(2, 2) * b(1);
+    for ( int i = 3; i <= n; ++i )
+    {
+        b(i) = b(i) - a(i, 1) * b(i-2) - a(i, 2) * b(i-1);
+    }
+
+    // !back substitution
+    b(n) = b(n) / a(n, 3);
+    b(n-1) = ( b(n-1) - a(n-1, 4) * b(n) ) / a(n-1, 3);
+    for ( int i = n-2; i >= 1; --i )
+    {
+        b(i) = ( b(i) - a(i, 4) * b(i+1) - a(i, 5) * b(i+2) ) / a(i, 3);
+    }
+}
+
+void PoissonSolver::LUSolveNeumannBC( const int n, RDouble *coef, const int nbc, RDouble *boundary, PHComplex *rHS )
+{
+    RDouble2D a( coef, Range(1, n), Range(1, 5), neverDeleteData, fortranArray );
+    RDouble2D bca( boundary, Range(1, nbc), Range(1, nbc), neverDeleteData, fortranArray);
+    Complex1D cb( rHS, Range(1, n), neverDeleteData, fortranArray);
+
+    if ( n <= (2*nbc+2) )
+    {
+        TK_Exit::ExceptionExit("n<=2*nbc+2 in LUSolveNeumannBC");
+    }
+
+    // !forward substitution
+    cb(2) = cb(2) - a(2, 2) * cb(1);
+    for ( int i = 3; i <= n-1; ++i )
+    {
+        cb(i) = cb(i) - a(i, 1) * cb(i-2) - a(i, 2) * cb(i-1);
+    }
+    cb(n) = cb(n) - a(n, 1) * cb(n-2) - a(n, 2) * cb(n-1);
+    for ( int j = 1; j <= (nbc-1); ++j )
+    {
+        cb(n) = cb(n) - bca(nbc, j) * cb(n-nbc-2+j);
+    }
+
+    // !back substitution
+    cb(n) = cb(n) / a(n, 3);
+    cb(n-1) = ( cb(n-1) - a(n-1, 4) * cb(n) ) / a(n-1, 3);
+    for ( int i = (n-2); i >= nbc; --i )
+    {
+        cb(i) = ( cb(i) - a(i, 4) * cb(i+1) - a(i, 5) * cb(i+2) ) / a(i ,3);
+    }
+    for ( int i = (nbc-1); i >= 1; --i )
+    {
+        cb(i) = ( cb(i) - a(i, 4) * cb(i+1) - a(i, 5) * cb(i+2) );
+        for ( int j = (i+1); j <= nbc; ++j )
+        {
+            cb(i) = cb(i) - bca(i, j) * cb(j+2);
+        }
+        cb(i) = cb(i) / a(i, 3);
+    }
+}
+
+}
+
diff --git a/CFD/SpecDiffHybSolver/src/RescaleField.cpp b/CFD/SpecDiffHybSolver/src/RescaleField.cpp
new file mode 100644
index 0000000..0f7ce88
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/src/RescaleField.cpp
@@ -0,0 +1,473 @@
+#include "RescaleField.h"
+#include "SpecGrid.h"
+//#include "SpecSolver.h"
+//#include "SpecDiffHybSolver.h"
+#include "GlobalDataBase.h"
+#include "PHMpi.h"
+#include "TK_Exit.h"
+#include "PHHeader.h"
+#include "TK_Parse.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+RescaleFieldHIT::RescaleFieldHIT()
+{
+}
+
+RescaleFieldHIT::~RescaleFieldHIT()
+{
+    delete rescaleStatistic; rescaleStatistic = NULL;
+    delete rescaleStatisticLocal; rescaleStatisticLocal = NULL;
+}
+
+RescaleField::RescaleField()
+{
+}
+
+RescaleField::~RescaleField()
+{
+    delete uAverage; uAverage = NULL;
+    delete uFluctuation; uFluctuation = NULL;
+    delete vFluctuation; vFluctuation = NULL;
+    delete wFluctuation; wFluctuation = NULL;
+    delete uAverageOfReference; uAverageOfReference = NULL;
+    delete uFluctuationOfReference; uFluctuationOfReference = NULL;
+    delete vFluctuationOfReference; vFluctuationOfReference = NULL;
+    delete wFluctuationOfReference; wFluctuationOfReference = NULL;
+    //delete rescaleStatistic; rescaleStatistic = NULL;
+    //delete rescaleStatisticLocal; rescaleStatisticLocal = NULL;
+
+    //FreeControlParameters();
+}
+
+void RescaleFieldHIT::InitRescaleData()
+{
+    //InitControlParameters();
+
+    AllocRescaleData();
+}
+
+void RescaleField::InitRescaleData(SpecDiffHybGrid *GridData)
+{
+    //InitControlParameters();
+
+    AllocRescaleData(GridData);
+
+    SetUavg();
+
+    GetUVWMagnitudeOfReference(GridData);
+}
+
+void RescaleFieldHIT::AllocRescaleData()
+{
+    rescaleStatistic = new RDouble1D(Range(1, 4), fortranArray);
+    rescaleStatisticLocal = new RDouble1D(Range(1, 4), fortranArray);
+    (*rescaleStatistic)(Range(1, 4)) = 0.0;
+    (*rescaleStatisticLocal)(Range(1, 4)) = 0.0;
+}
+
+void RescaleField::AllocRescaleData( SpecDiffHybGrid *GridData )
+{
+    int ist = GridData -> iStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex;
+    Range I(ist, ied);
+
+    uAverage = new RDouble1D(I, fortranArray);
+    uFluctuation = new RDouble1D(I, fortranArray);
+    vFluctuation = new RDouble1D(I, fortranArray);
+    wFluctuation = new RDouble1D(I, fortranArray);
+    (*uAverage)(I) = 0.0;
+    (*uFluctuation)(I) = 0.0;
+    (*vFluctuation)(I) = 0.0;
+    (*wFluctuation)(I) = 0.0;
+
+    uAverageOfReference = new RDouble1D(I, fortranArray);
+    uFluctuationOfReference = new RDouble1D(I, fortranArray);
+    vFluctuationOfReference = new RDouble1D(I, fortranArray);
+    wFluctuationOfReference = new RDouble1D(I, fortranArray);
+    (*uAverageOfReference)(I) = 0.0;
+    (*uFluctuationOfReference)(I) = 0.0;
+    (*vFluctuationOfReference)(I) = 0.0;
+    (*wFluctuationOfReference)(I) = 0.0;
+
+    rescaleStatistic = new RDouble2D(I, Range(1, 4), fortranArray);
+    rescaleStatisticLocal = new RDouble2D(I, Range(1, 4), fortranArray);
+    (*rescaleStatistic)(I, Range(1, 4)) = 0.0;
+    (*rescaleStatisticLocal)(I, Range(1, 4)) = 0.0;
+}
+
+void RescaleField::SetUavg()
+{
+    RDouble reynolds = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+
+    uavgDivideByUtau = 2.960975610 + 2.439024390 * log(reynolds);
+}
+
+void RescaleField::GetUVWMagnitudeOfReference( SpecDiffHybGrid *GridData )
+{
+    int ist = GridData -> iStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex;
+    Range I(ist, ied);
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+    if( myid == procIDWithKx0Ky0 )
+    {
+        InputUVWMagnitudeOfReference( GridData );
+        (*rescaleStatistic)(I, 1) = (*uAverageOfReference)(I);
+        (*rescaleStatistic)(I, 2) = (*uFluctuationOfReference)(I);
+        (*rescaleStatistic)(I, 3) = (*vFluctuationOfReference)(I);
+        (*rescaleStatistic)(I, 4) = (*wFluctuationOfReference)(I);
+    }
+
+    int n = 4 * (ied - ist + 1);
+#ifdef PH_PARALLEL
+    MPI_Bcast(&(*rescaleStatistic)(ist, 1) , n, MPI_DOUBLE, server, MPI_COMM_WORLD);
+#endif
+    (*uAverageOfReference)(I) = (*rescaleStatistic)(I, 1);
+    (*uFluctuationOfReference)(I) = (*rescaleStatistic)(I, 2);
+    (*vFluctuationOfReference)(I) = (*rescaleStatistic)(I, 3);
+    (*wFluctuationOfReference)(I) = (*rescaleStatistic)(I, 4);
+}
+
+void RescaleField::GetUVWMagnitude(SpecDiffHybGrid *GridData, Complex3D *complexU, Complex3D *complexV, Complex3D *complexW)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int n = 4 * (iedf - istf + 1);
+    Range I(istf, iedf);
+
+    GetUVWLocal(GridData, complexU, complexV, complexW);
+
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+    (*rescaleStatistic)(I, Range(1, 4)) = (*rescaleStatisticLocal)(I, Range(1, 4));
+
+#ifdef PH_PARALLEL
+    MPI_Reduce( &(*rescaleStatisticLocal)(istf, 1), &(*rescaleStatistic)(istf, 1), n, MPI_DOUBLE, MPI_SUM, procIDWithKx0Ky0, MPI_COMM_WORLD );
+    MPI_Bcast(&(*rescaleStatistic)(istf, 1), n, MPI_DOUBLE, procIDWithKx0Ky0, MPI_COMM_WORLD);
+#endif
+
+    for(int iz = istf; iz <= iedf; ++iz)
+    {
+        (*uAverage)(iz) = (*rescaleStatistic)(iz, 1);
+        (*uFluctuation)(iz) = sqrt((*rescaleStatistic)(iz, 2));
+        (*vFluctuation)(iz) = sqrt((*rescaleStatistic)(iz, 3));
+        (*wFluctuation)(iz) = sqrt((*rescaleStatistic)(iz, 4));
+    }  
+}
+
+void RescaleField::InputUVWMagnitudeOfReference(SpecDiffHybGrid *GridData)
+{
+    int ist = GridData -> iStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex;
+    int innz = ied - ist + 1;
+
+    string filename = "DNS.dat";
+    filename = GlobalDataBase::GetStrParaFromDB("DNSDataFile");
+    fstream file;
+    file.open(filename.c_str(),ios_base::in);
+    if ( !file )
+    {
+        TK_Exit::FileOpenErrorExit(filename);
+    }
+
+    string line,word;
+    string separator  = " =\t\r\n#$,;\"'";
+
+    for(int n = 1; n <= 3; ++n)
+    {
+        ReadNewLine(file, line);
+    }
+    int innz_dns;
+    ReadNewLine(file, line);
+    line = FindNextWord(line,word,separator);
+    from_string< int >( innz_dns, word, std::dec );
+
+    RDouble1D *yDNS = new RDouble1D( Range(1, innz_dns), fortranArray);
+    RDouble1D *uavgDNS = new RDouble1D( Range(1, innz_dns), fortranArray);
+    RDouble1D *ufDNS = new RDouble1D( Range(1, innz_dns), fortranArray);
+    RDouble1D *vfDNS = new RDouble1D( Range(1, innz_dns), fortranArray);
+    RDouble1D *wfDNS = new RDouble1D( Range(1, innz_dns), fortranArray);
+    RDouble1D *yy = new RDouble1D( Range(ist, ied), fortranArray);
+    double yplustmp;
+    for( int n = 1; n <= innz_dns; ++n )
+    {
+        ReadNewLine(file, line);
+
+        line = FindNextWord(line, word, separator);
+        from_string< double >( (*yDNS)(n), word, std::dec );
+
+        line = FindNextWord(line, word, separator);
+        from_string< double >( yplustmp, word, std::dec );
+
+        line = FindNextWord(line, word, separator);
+        from_string< double >( (*uavgDNS)(n), word, std::dec );
+
+        line = FindNextWord(line, word, separator);
+        from_string< double >( (*ufDNS)(n), word, std::dec );
+
+        line = FindNextWord(line, word, separator);
+        from_string< double >( (*wfDNS)(n), word, std::dec );
+
+        line = FindNextWord(line, word, separator);
+        from_string< double >( (*vfDNS)(n), word, std::dec );
+    }
+    file.close();
+    file.clear();
+
+    RDouble1D *rZ = GridData -> realZ;
+    (*yy)( Range(ist, ied) ) = 1.0 + (*rZ)( Range(ist, ied) );
+    Interpolation( &(*yy)(ist), &(*uAverageOfReference)(ist), innz/2+1, &(*yDNS)(1), &(*uavgDNS)(1), innz_dns );
+    Interpolation( &(*yy)(ist), &(*uFluctuationOfReference)(ist), innz/2+1, &(*yDNS)(1), &(*ufDNS)(1), innz_dns );
+    Interpolation( &(*yy)(ist), &(*vFluctuationOfReference)(ist), innz/2+1, &(*yDNS)(1), &(*vfDNS)(1), innz_dns );
+    Interpolation( &(*yy)(ist), &(*wFluctuationOfReference)(ist), innz/2+1, &(*yDNS)(1), &(*wfDNS)(1), innz_dns );
+
+    int iz_half = ist + innz/2;
+    for(int iz = ist; iz <= iz_half; ++iz)
+    {
+        int izup = innz - iz + ist;
+        (*uAverageOfReference)(izup) = (*uAverageOfReference)(iz);
+        (*uFluctuationOfReference)(izup) = (*uFluctuationOfReference)(iz);
+        (*vFluctuationOfReference)(izup) = (*vFluctuationOfReference)(iz);
+        (*wFluctuationOfReference)(izup) = (*wFluctuationOfReference)(iz);
+    }
+
+    int wordwidth = 20;
+    filename = "DNSinterp.dat";
+    file.open(filename.c_str(), ios_base::out);
+    if ( !file )
+    {
+        TK_Exit::ExceptionExit("could not open DNSinterp.dat \n");
+    }
+    file << "variables = y, Uav+, u+, v+, w+ \n";
+    for(int iz = ist; iz <= ied; ++iz)
+    {
+        file << setiosflags(ios::left);
+        file << setiosflags(ios::scientific);
+        file << setprecision(10);
+        file << setw(wordwidth) << (*rZ)(iz) 
+            << setw(wordwidth) << (*uAverageOfReference)(iz) 
+            << setw(wordwidth) << (*uFluctuationOfReference)(iz) 
+            << setw(wordwidth) << (*vFluctuationOfReference)(iz) 
+            << setw(wordwidth) << (*wFluctuationOfReference)(iz) 
+            << "\n";
+    }
+
+    delete yDNS; yDNS = NULL;
+    delete uavgDNS; uavgDNS = NULL;
+    delete ufDNS; ufDNS = NULL;
+    delete vfDNS; vfDNS = NULL;
+    delete wfDNS; wfDNS = NULL;
+    delete yy; yy = NULL;
+}
+
+void RescaleField::FixUAverage(SpecDiffHybGrid *GridData, Complex3D *complexU)
+{ 
+    RDouble1D *rZ = GridData -> realZ;
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+    Range I(istf, iedf);
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if(myid != procIDWithKx0Ky0)
+    {
+        return;
+    }
+
+    RDouble1D *uav = new RDouble1D(I, fortranArray);
+    for(int iz = istf; iz <= iedf; ++iz)
+    {
+        (*uav)(iz) = real((*complexU)(iz, jstf, kstf));
+    }
+
+    double ub = 0.0;
+    for(int iz = istf + 1; iz <= iedf - 1; ++iz)
+    {
+        ub = ub + 0.5 * ((*rZ)(iz+1) - (*rZ)(iz-1)) * (*uav)(iz);
+    }
+    ub = ub / ((*rZ)(iedf) - (*rZ)(istf));
+
+    (*complexU)(I, jstf, kstf) = (*complexU)(I, jstf, kstf) * uavgDivideByUtau / ub;
+
+    delete uav; uav = NULL;
+}
+
+void RescaleField::GetUVWLocal(SpecDiffHybGrid *GridData, Complex3D *complexU, Complex3D *complexV, Complex3D *complexW)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+    //int x0Fall = GridData -> x0Fall;
+    //int y0Fall = GridData -> y0Fall;
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int jStartFourierIndexGlobal = GridData -> jStartFourierIndexGlobal;
+
+    (*rescaleStatisticLocal)(Range(istf, iedf), Range(1, 4)) = 0.0;
+
+    for(int iz = istf; iz <= iedf; ++iz)
+    {
+        PHComplex sumU = PHComplex(0.0, 0.0);
+        PHComplex sumV = PHComplex(0.0, 0.0);
+        PHComplex sumW = PHComplex(0.0, 0.0);
+        if(kstf == kStartFourierIndexGlobal)
+        {
+            int iy0 = jstf;
+            if(jstf == jStartFourierIndexGlobal)
+            {
+                iy0 = jstf + 1;
+                (*rescaleStatisticLocal)(iz, 1) = real( (*complexU)(iz, jstf, kstf) );
+            }
+
+            for(int iy = iy0; iy <= jedf; ++iy)
+            {
+                sumU = sumU + (*complexU)(iz, iy, kstf) * conj((*complexU)(iz, iy, kstf));
+                sumV = sumV + (*complexV)(iz, iy, kstf) * conj((*complexV)(iz, iy, kstf));
+                sumW = sumW + (*complexW)(iz, iy, kstf) * conj((*complexW)(iz, iy, kstf));
+            }
+            for(int ix = kstf + 1; ix <= kedf; ++ix)
+            {
+                for(int iy = jstf; iy <= jedf; ++iy)
+                {
+                    sumU = sumU + 2.0 * (*complexU)(iz, iy, ix) * conj((*complexU)(iz, iy, ix));
+                    sumV = sumV + 2.0 * (*complexV)(iz, iy, ix) * conj((*complexV)(iz, iy, ix));
+                    sumW = sumW + 2.0 * (*complexW)(iz, iy, ix) * conj((*complexW)(iz, iy, ix));
+                }
+            }
+        }
+        else
+        {
+            for(int ix = kstf; ix <= kedf; ++ix)
+            {
+                for(int iy = jstf; iy <= jedf; ++iy)
+                {
+                    sumU = sumU + 2.0 * (*complexU)(iz, iy, ix) * conj((*complexU)(iz, iy, ix));
+                    sumV = sumV + 2.0 * (*complexV)(iz, iy, ix) * conj((*complexV)(iz, iy, ix));
+                    sumW = sumW + 2.0 * (*complexW)(iz, iy, ix) * conj((*complexW)(iz, iy, ix));
+                }
+            }
+        }
+        (*rescaleStatisticLocal)(iz, 2) = real(sumU);
+        (*rescaleStatisticLocal)(iz, 3) = real(sumV);
+        (*rescaleStatisticLocal)(iz, 4) = real(sumW);
+    }
+}
+
+void RescaleField::RescaleUAverage(SpecDiffHybGrid *GridData, Complex3D *complexU)
+{      
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    if(myid != procIDWithKx0Ky0)
+    {
+        return;
+    }
+    else
+    {
+        for(int iz = istf; iz <= iedf; ++iz)
+        {
+            (*complexU)(iz, jstf, kstf) = PHComplex((*uAverageOfReference)(iz), 0.0);
+        }
+    }  
+}
+
+void RescaleField::RescaleFluctuation(SpecDiffHybGrid *GridData, Complex3D *complexU, Complex3D *complexV, Complex3D *complexW)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    for(int iz = istf + 1; iz <= iedf - 1; ++iz)
+    {
+        (*complexU)(iz, Range(jstf+1, jedf), Range(kstf, kedf)) = (*complexU)(iz, Range(jstf+1, jedf), Range(kstf, kedf)) / (*uFluctuation)(iz) * (*uFluctuationOfReference)(iz);
+        (*complexV)(iz, Range(jstf+1, jedf), Range(kstf, kedf)) = (*complexV)(iz, Range(jstf+1, jedf), Range(kstf, kedf)) / (*vFluctuation)(iz) * (*vFluctuationOfReference)(iz);
+        (*complexW)(iz, Range(jstf+1, jedf), Range(kstf, kedf)) = (*complexW)(iz, Range(jstf+1, jedf), Range(kstf, kedf)) / (*wFluctuation)(iz) * (*wFluctuationOfReference)(iz);
+
+        (*complexU)(iz, jstf, Range(kstf+1, kedf)) = (*complexU)(iz, jstf, Range(kstf+1, kedf)) / (*uFluctuation)(iz) * (*uFluctuationOfReference)(iz);
+        (*complexV)(iz, jstf, Range(kstf+1, kedf)) = (*complexV)(iz, jstf, Range(kstf+1, kedf)) / (*vFluctuation)(iz) * (*vFluctuationOfReference)(iz);
+        (*complexW)(iz, jstf, Range(kstf+1, kedf)) = (*complexW)(iz, jstf, Range(kstf+1, kedf)) / (*wFluctuation)(iz) * (*wFluctuationOfReference)(iz);
+    }
+}
+
+void RescaleField::Interpolation( RDouble *yout, RDouble *uout, int n, RDouble *yin, RDouble *uin, int n0 )
+{
+    RDouble1D y( yout, Range(1, n), neverDeleteData, fortranArray );
+    RDouble1D u( uout, Range(1, n), neverDeleteData, fortranArray );
+    RDouble1D y0( yin, Range(1, n0), neverDeleteData, fortranArray );
+    RDouble1D u0( uin, Range(1, n0), neverDeleteData, fortranArray );
+
+    u( Range(1, n) ) = 0.0;
+    u(1) = 0.0;
+    int i0 = 1;
+    double yl = 0.0;
+    double yr = 0.0;
+    double ul = 0.0;
+    double ur = 0.0;
+
+    for(int i = 2; i <= n; ++i)
+    {
+        while( (y0(i0) < y(i)) && (i0 < n0) )
+        {
+            i0 = i0 + 1;
+        }
+        if( i0 == n0 )
+        {
+            u( Range(i, n) ) = u0(n0);
+            break;
+        }
+        else if( i0 == 1 )
+        {
+            yl = 0.0;
+            yr = y0(i0);
+            ul = 0.0;
+            ur = u0(i0);
+        }
+        else
+        {
+            yl = y0(i0 - 1);
+            yr = y0(i0);
+            ul = u0(i0 - 1);
+            ur = u0(i0);
+        }
+        u(i) = ul + (y(i) - yl) * (ur - ul) / (yr - yl);
+    }
+}
+
+/*
+LIB_EXPORT void RescaleField::InitControlParameters()
+{
+    FreeControlParameters();
+    controlParameters = new Param_SpecSolver();
+    controlParameters->Init();
+}
+
+LIB_EXPORT Param_SpecSolver *RescaleField::GetControlParameters() const
+{
+    return static_cast <Param_SpecSolver *> (controlParameters);
+}
+*/
+}
+
diff --git a/CFD/SpecDiffHybSolver/src/SpecDiffHybFieldView.cpp b/CFD/SpecDiffHybSolver/src/SpecDiffHybFieldView.cpp
new file mode 100644
index 0000000..07e1dd2
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/src/SpecDiffHybFieldView.cpp
@@ -0,0 +1,544 @@
+#include "SpecDiffHybFieldView.h"
+#include "TK_Exit.h"
+#include "PHHeader.h"
+#include "Complex.h"
+#include "fftw3.h"
+#include "GlobalDataBase.h"
+#include <iostream>
+#include <sstream>
+#include <cstdlib>
+#include "TK_Parse.h"
+
+namespace PHSPACE
+{
+
+	SpecDiffHybFieldView::SpecDiffHybFieldView()
+	{
+	}
+
+	SpecDiffHybFieldView::~SpecDiffHybFieldView()
+	{
+        delete realX; realX = NULL;
+        delete realY; realY = NULL;
+        delete realZ; realZ = NULL;
+
+        delete realU; realU = NULL;
+        delete realV; realV = NULL;
+        delete realW; realW = NULL;
+        delete realP; realP = NULL;
+
+        delete complexU; complexU = NULL;
+        delete complexV; complexV = NULL;
+        delete complexW; complexW = NULL;
+        delete complexP; complexP = NULL;
+
+        delete realOut; realOut = NULL;
+        delete complexIn; complexIn = NULL;
+
+        delete fourierStartIndex; fourierStartIndex = NULL;
+        delete fourierEndIndex; fourierEndIndex = NULL;
+	}
+
+	void SpecDiffHybFieldView::Run()
+	{
+        Init();
+
+        InputGridDistribute();
+
+        InputVelocity();
+
+        InputPressure();
+
+        FieldView();
+	}
+
+	void SpecDiffHybFieldView::Init()
+	{
+        nx = GlobalDataBase::GetIntParaFromDB("nx");
+        ny = GlobalDataBase::GetIntParaFromDB("ny");
+        nz = GlobalDataBase::GetIntParaFromDB("nz");
+
+        AllocFieldData();
+	}
+
+    void SpecDiffHybFieldView::AllocFieldData()
+    {
+        Range IP(1, nx);
+        Range JP(1, ny);
+        Range KP(1, nz+1);
+
+        Range IF(1, nz+1);
+        Range JF(1, ny);
+        Range KF(1, nx/2+1);
+
+        realX = new RDouble1D(IP, fortranArray);
+        realY = new RDouble1D(JP, fortranArray);
+        realZ = new RDouble1D(KP, fortranArray);
+
+        realU = new RDouble3D(IP, JP, KP, fortranArray);
+        realV = new RDouble3D(IP, JP, KP, fortranArray);
+        realW = new RDouble3D(IP, JP, KP, fortranArray);
+        realP = new RDouble3D(IP, JP, KP, fortranArray);
+
+        complexU = new Complex3D(IF, JF, KF, fortranArray);
+        complexV = new Complex3D(IF, JF, KF, fortranArray);
+        complexW = new Complex3D(IF, JF, KF, fortranArray);
+        complexP = new Complex3D(IF, JF, KF, fortranArray);
+
+        realOut = new RDouble2D(IP, JP, fortranArray);
+        complexIn = new Complex2D(KF, JF, fortranArray);
+    }
+
+    void SpecDiffHybFieldView::InputGridDistribute()
+    {
+        string filename = "griddistribute.dat";
+        fstream file;
+        string line,word;
+        string separator  = " =\t\r\n#$,;\"'";
+
+        file.open(filename.c_str(), ios_base::in);
+        if ( !file )
+        {
+            TK_Exit::ExceptionExit("could not open griddistribute.dat\n");
+        }
+
+        ReadNewLine(file, line);
+        line = FindNextWord(line, word, separator);
+        from_string<int>(nTProcessor, word, std::dec);
+
+        fourierStartIndex = new Int2D(Range(1, 3), Range(0, nTProcessor-1), fortranArray);
+        fourierEndIndex = new Int2D(Range(1, 3), Range(0, nTProcessor-1), fortranArray);
+        
+        int inttmp;
+        for(int ip = 0; ip <= nTProcessor - 1; ++ip)
+        {
+            ReadNewLine(file, line);
+
+            line = FindNextWord(line, word, separator);
+            from_string<int>(inttmp, word, std::dec);
+           
+            line = FindNextWord(line, word, separator);
+            from_string<int>((*fourierStartIndex)(1, ip), word, std::dec);
+            
+            line = FindNextWord(line, word, separator);
+            from_string<int>((*fourierStartIndex)(2, ip), word, std::dec);
+            
+            line = FindNextWord(line, word, separator);
+            from_string<int>((*fourierStartIndex)(3, ip), word, std::dec);
+            
+            line = FindNextWord(line, word, separator);
+            from_string<int>((*fourierEndIndex)(1, ip), word, std::dec);
+            
+            line = FindNextWord(line, word, separator);
+            from_string<int>((*fourierEndIndex)(2, ip), word, std::dec);
+            
+            line = FindNextWord(line, word, separator);
+            from_string<int>((*fourierEndIndex)(3, ip), word, std::dec);
+        }
+
+        file.close();
+        file.clear();
+    }
+
+    void SpecDiffHybFieldView::InputVelocity()
+    {
+        string outputdir = "./results";
+        outputdir = GlobalDataBase::GetStrParaFromDB("outputdir");
+
+        for(int ip = 0; ip <= nTProcessor - 1; ++ip)
+        {
+            int istf = (*fourierStartIndex)(1, ip);
+            int jstf = (*fourierStartIndex)(2, ip);
+            int kstf = (*fourierStartIndex)(3, ip);
+            int iedf = (*fourierEndIndex)(1, ip);
+            int jedf = (*fourierEndIndex)(2, ip);
+            int kedf = (*fourierEndIndex)(3, ip);
+
+            stringstream strmip;
+            strmip << ip;
+            string filename = outputdir + "/Velocity_" + strmip.str() + ".rsta";
+            fstream file;
+            file.open(filename.c_str(), ios_base::in|ios_base::binary);
+            if ( !file )
+            {
+                TK_Exit::FileOpenErrorExit(filename);
+            }
+
+            int inttmp[5];
+            file.read(reinterpret_cast<char*>(inttmp), 5*sizeof(int));
+
+            for(int ix = kstf; ix <= kedf; ++ix)
+            {
+                for(int iy = jstf; iy <= jedf; ++iy)
+                {
+                    for(int iz = istf; iz <= iedf; ++iz)
+                    {
+                        file.read(reinterpret_cast<char*>(&(*complexU)(iz, iy, ix)), sizeof(PHComplex));
+                    }
+                }
+            }
+
+            for(int ix = kstf; ix <= kedf; ++ix)
+            {
+                for(int iy = jstf; iy <= jedf; ++iy)
+                {
+                    for(int iz = istf; iz <= iedf; ++iz)
+                    {
+                        file.read(reinterpret_cast<char*>(&(*complexV)(iz, iy, ix)), sizeof(PHComplex));
+                    }
+                }
+            }
+
+            for(int ix = kstf; ix <= kedf; ++ix)
+            {
+                for(int iy = jstf; iy <= jedf; ++iy)
+                {
+                    for(int iz = istf; iz <= iedf; ++iz)
+                    {
+                        file.read(reinterpret_cast<char*>(&(*complexW)(iz, iy, ix)), sizeof(PHComplex));
+                    }
+                }
+            }
+
+            file.close();
+            file.clear();
+        }
+    }
+
+    void SpecDiffHybFieldView::InputPressure()
+    {
+        string outputdir = "./results";
+        outputdir = GlobalDataBase::GetStrParaFromDB("outputdir");
+
+        for(int ip = 0; ip <= nTProcessor - 1; ++ip)
+        {
+            int istf = (*fourierStartIndex)(1, ip);
+            int jstf = (*fourierStartIndex)(2, ip);
+            int kstf = (*fourierStartIndex)(3, ip);
+            int iedf = (*fourierEndIndex)(1, ip);
+            int jedf = (*fourierEndIndex)(2, ip);
+            int kedf = (*fourierEndIndex)(3, ip);
+
+            stringstream strmip;
+            strmip << ip;
+            string filename = outputdir + "/Pressure_" + strmip.str() + ".rsta";
+            fstream file;
+            file.open(filename.c_str(), ios_base::in|ios_base::binary);
+            if ( !file )
+            {
+                TK_Exit::FileOpenErrorExit(filename);
+            }
+
+            int inttmp[5];
+            file.read(reinterpret_cast<char*>(inttmp), 5*sizeof(int));
+
+            for(int ix = kstf; ix <= kedf; ++ix)
+            {
+                for(int iy = jstf; iy <= jedf; ++iy)
+                {
+                    for(int iz = istf; iz <= iedf; ++iz)
+                    {
+                        file.read(reinterpret_cast<char*>(&(*complexP)(iz, iy, ix)), sizeof(PHComplex));
+                    }
+                }
+            }
+
+            file.close();
+            file.clear();
+        }
+    }
+
+    void SpecDiffHybFieldView::FieldView()
+    {
+        fftw_plan iplan = fftw_plan_dft_c2r_2d(ny, nx, reinterpret_cast<fftw_complex*>(&(*complexIn)(1, 1)), &(*realOut)(1, 1), FFTW_ESTIMATE);
+
+        for(int iz = 1; iz <= (nz+1); ++iz)
+        {
+            for(int ix = 1; ix <= (nx/2+1); ++ix)
+            {
+                for(int iy = 1; iy <= ny; ++iy)
+                {
+                    (*complexIn)(ix, iy) = (*complexU)(iz, iy, ix);
+                }
+            }
+
+            /*test fieldview
+            stringstream strmiz;
+            strmiz << iz;
+            string filename = "UIn_" + strmiz.str() + ".dat";
+            fstream file;
+            file.open(filename.c_str(), ios_base::out);
+            
+            for(int ix = 1; ix <= (nx/2+1); ++ix)
+            {
+                for(int iy = 1; iy <= ny; ++iy)
+                {
+                    file << setw(20) << ix
+                         << setw(20) << iy
+                         << setw(20) << (*complexIn)(ix, iy)
+                         << "\n";
+                }
+            }
+            file.close();
+            file.clear();
+            //test fieldview*/
+
+            fftw_execute_dft_c2r(iplan, reinterpret_cast<fftw_complex*>(&(*complexIn)(1, 1)), &(*realOut)(1, 1));
+
+            /*test fieldview
+            filename = "UOut_" + strmiz.str() + ".dat";
+            file.open(filename.c_str(), ios_base::out);
+            
+            for(int ix = 1; ix <= nx; ++ix)
+            {
+                for(int iy = 1; iy <= ny; ++iy)
+                {
+                    file << setw(20) << ix
+                         << setw(20) << iy
+                         << setw(20) << (*realOut)(ix, iy)
+                         << "\n";
+                }
+            }
+            file.close();
+            file.clear();
+            //test fieldview*/
+
+            for(int ix = 1; ix <= nx; ++ix)
+            {
+                for(int iy = 1; iy <= ny; ++iy)
+                {
+                    (*realU)(ix, iy, iz) = (*realOut)(ix, iy);
+                }
+            }
+
+            for(int ix = 1; ix <= (nx/2+1); ++ix)
+            {
+                for(int iy = 1; iy <= ny; ++iy)
+                {
+                    (*complexIn)(ix, iy) = (*complexV)(iz, iy, ix);
+                }
+            }
+            fftw_execute_dft_c2r(iplan, reinterpret_cast<fftw_complex*>(&(*complexIn)(1, 1)), &(*realOut)(1, 1));
+            for(int ix = 1; ix <= nx; ++ix)
+            {
+                for(int iy = 1; iy <= ny; ++iy)
+                {
+                    (*realV)(ix, iy, iz) = (*realOut)(ix, iy);
+                }
+            }
+
+            for(int ix = 1; ix <= (nx/2+1); ++ix)
+            {
+                for(int iy = 1; iy <= ny; ++iy)
+                {
+                    (*complexIn)(ix, iy) = (*complexW)(iz, iy, ix);
+                }
+            }
+            fftw_execute_dft_c2r(iplan, reinterpret_cast<fftw_complex*>(&(*complexIn)(1, 1)), &(*realOut)(1, 1));
+            for(int ix = 1; ix <= nx; ++ix)
+            {
+                for(int iy = 1; iy <= ny; ++iy)
+                {
+                    (*realW)(ix, iy, iz) = (*realOut)(ix, iy);
+                }
+            }
+
+            for(int ix = 1; ix <= (nx/2+1); ++ix)
+            {
+                for(int iy = 1; iy <= ny; ++iy)
+                {
+                    (*complexIn)(ix, iy) = (*complexP)(iz, iy, ix);
+                }
+            }
+            fftw_execute_dft_c2r(iplan, reinterpret_cast<fftw_complex*>(&(*complexIn)(1, 1)), &(*realOut)(1, 1));
+            for(int ix = 1; ix <= nx; ++ix)
+            {
+                for(int iy = 1; iy <= ny; ++iy)
+                {
+                    (*realP)(ix, iy, iz) = (*realOut)(ix, iy);
+                }
+            }
+        } //!for iz
+ 
+        /*test fieldview
+        string testgridFileName = "testUVWP.dat";
+        fstream file;
+        file.open(testgridFileName.c_str(), ios_base::out);
+        if (!file)
+        {
+            TK_Exit::FileOpenErrorExit(testgridFileName);
+        }
+        file << "P, U, V, W = \n";
+        for(int iz = 1; iz <= (nz+1); ++iz)
+        {
+            for(int iy = 1; iy <= ny; ++iy)
+            {
+                for(int ix = 1; ix <= nx; ++ix)
+                {
+                    file << setw(20) << iz
+                         << setw(20) << iy
+                         << setw(20) << ix
+                         << setw(20) << (*realP)(ix, iy, iz)
+                         << setw(20) << (*realU)(ix, iy, iz)
+                         << setw(20) << (*realV)(ix, iy, iz)
+                         << setw(20) << (*realW)(ix, iy, iz)
+                         << "\n";
+                }
+            }
+        }
+        file.close();
+        file.clear();
+        //test fieldview*/
+
+        OutputGrid();
+
+        OutputField();
+
+        fftw_destroy_plan(iplan);
+    }
+
+    void SpecDiffHybFieldView::OutputGrid()
+    {
+        const double pi = 2.0 * acos(0.0);
+
+        double XL = GlobalDataBase::GetDoubleParaFromDB("XL");
+        double YL = GlobalDataBase::GetDoubleParaFromDB("YL");
+
+        for(int ix = 1; ix <= nx; ++ix)
+        {
+            (*realX)(ix) = XL * 2.0 * pi / static_cast<double>(nx) * static_cast<double>(ix-1);
+        }
+
+        for(int iy = 1; iy <= ny; ++iy)
+        {
+            (*realY)(iy) = YL * 2.0 * pi / static_cast<double>(ny) * static_cast<double>(iy-1);
+        }
+
+        string outputdir = "./results";
+        outputdir = GlobalDataBase::GetStrParaFromDB("outputdir");
+        string zgridFileName = outputdir + "/rZ.dat";
+        fstream file;
+        file.open(zgridFileName.c_str(), ios_base::in);
+        if (!file)
+        {
+            TK_Exit::FileOpenErrorExit(zgridFileName);
+        }
+
+        int inttmp;
+        string line,word;
+        string separator  = " =\t\r\n#$,;\"'";
+        for(int iz = 1; iz <= nz+1; ++iz)
+        {
+            ReadNewLine(file, line);
+            line = FindNextWord(line, word, separator);
+            from_string<int>(inttmp, word, std::dec);
+            line = FindNextWord(line, word, separator);
+            from_string<double>((*realZ)(iz), word, std::dec);
+        }
+        file.close();
+        file.clear();
+
+        string gridFileName = "grid.x";
+        file.open(gridFileName.c_str(), ios_base::out|ios_base::binary);
+        if (!file)
+        {
+            TK_Exit::FileOpenErrorExit(zgridFileName);
+        }
+        inttmp = 1;
+        file.write(reinterpret_cast<char*>(&inttmp), sizeof(int));
+        file.write(reinterpret_cast<char*>(&nx), sizeof(int));
+        file.write(reinterpret_cast<char*>(&ny), sizeof(int));
+        inttmp = nz + 1;
+        file.write(reinterpret_cast<char*>(&inttmp), sizeof(int));
+
+        for(int iz = 1; iz <= nz+1; ++iz)
+        {
+            for(int iy = 1; iy <= ny; ++iy)
+            {
+                for(int ix = 1; ix <= nx; ++ix)
+                {
+                    file.write(reinterpret_cast<char*>(&(*realX)(ix)), sizeof(double));
+                }
+            }
+        }
+        
+        for(int iz = 1; iz <= nz+1; ++iz)
+        {
+            for(int iy = 1; iy <= ny; ++iy)
+            {
+                for(int ix = 1; ix <= nx; ++ix)
+                {
+                    file.write(reinterpret_cast<char*>(&(*realY)(iy)), sizeof(double));
+                }
+            }
+        }
+
+        for(int iz = 1; iz <= nz+1; ++iz)
+        {
+            for(int iy = 1; iy <= ny; ++iy)
+            {
+                for(int ix = 1; ix <= nx; ++ix)
+                {
+                    file.write(reinterpret_cast<char*>(&(*realZ)(iz)), sizeof(double));
+                }
+            }
+        }
+        file.close();
+        file.clear();
+
+        /*test fieldview
+        string testgridFileName = "testgrid.x";
+        file.open(testgridFileName.c_str(), ios_base::out);
+        if (!file)
+        {
+            TK_Exit::FileOpenErrorExit(zgridFileName);
+        }
+        file << setw(20) << 1 << "\n";
+        file << setw(20) << nx 
+             << setw(20) << ny
+             << setw(20) << nz+1
+             << "\n";
+        for(int ix = 1; ix <= nx; ++ix)
+        {
+            file << setw(20) << ix << setw(20) << (*realX)(ix) << "\n";
+        }
+        for(int iy = 1; iy <= ny; ++iy)
+        {
+            file << setw(20) << iy << setw(20) << (*realY)(iy) << "\n";
+        }
+        for(int iz = 1; iz <= nz+1; ++iz)
+        {
+            file << setw(20) << iz << setw(20) << (*realZ)(iz) << "\n";
+        }
+        file.close();
+        file.clear();
+        //test fieldview*/
+    }
+
+    void SpecDiffHybFieldView::OutputField()
+    {
+        string fieldFileName = "fields.f";
+        fstream file;
+        file.open(fieldFileName.c_str(), ios_base::out|ios_base::binary);
+        if (!file)
+        {
+            TK_Exit::FileOpenErrorExit(fieldFileName);
+        }
+
+        int inttmp = 1;
+        file.write(reinterpret_cast<char*>(&inttmp), sizeof(int));
+        file.write(reinterpret_cast<char*>(&nx), sizeof(int));
+        file.write(reinterpret_cast<char*>(&ny), sizeof(int));
+        inttmp = nz + 1;
+        file.write(reinterpret_cast<char*>(&inttmp), sizeof(int));
+        inttmp = 4;
+        file.write(reinterpret_cast<char*>(&inttmp), sizeof(int));
+        int nout = nx * ny * (nz + 1);
+        file.write(reinterpret_cast<char*>(&(*realP)(1, 1, 1)), nout * sizeof(double));
+        file.write(reinterpret_cast<char*>(&(*realU)(1, 1, 1)), nout * sizeof(double));
+        file.write(reinterpret_cast<char*>(&(*realV)(1, 1, 1)), nout * sizeof(double));
+        file.write(reinterpret_cast<char*>(&(*realW)(1, 1, 1)), nout * sizeof(double));
+        file.close();
+        file.clear();
+    }
+}
\ No newline at end of file
diff --git a/CFD/SpecDiffHybSolver/src/SpecDiffHybGrid.cpp b/CFD/SpecDiffHybSolver/src/SpecDiffHybGrid.cpp
new file mode 100644
index 0000000..33b69d2
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/src/SpecDiffHybGrid.cpp
@@ -0,0 +1,388 @@
+#include "TK_Time.h"
+#include "TK_Exit.h"
+#include "PHMpi.h"
+#include "PHHeader.h"
+#include "GlobalDataBase.h"
+#include "Constants.h"
+#include "SpecDiffHybGrid.h"
+#include "p3dfft.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+SpecDiffHybGrid::SpecDiffHybGrid()
+{
+}
+
+SpecDiffHybGrid::~SpecDiffHybGrid()
+{
+    delete realKX; realKX = NULL;
+    delete complexKX; complexKX = NULL;
+    delete realKY; realKY = NULL;
+    delete complexKY; complexKY = NULL;
+    delete realZ ; realZ = NULL;
+    delete realDetaDz; realDetaDz = NULL;
+    delete physicalStartIndex; physicalStartIndex = NULL;
+    delete physicalEndIndex; physicalEndIndex = NULL;
+    delete physicalIndexSize; physicalIndexSize = NULL;
+    delete fourierStartIndex; fourierStartIndex = NULL;
+    delete fourierEndIndex; fourierEndIndex = NULL; 
+    delete fourierIndexSize; fourierIndexSize = NULL;
+    delete dimensionOfP3DFFT; dimensionOfP3DFFT = NULL;
+    delete startAndEndFourierIndexOfAll; startAndEndFourierIndexOfAll = NULL;
+    delete startAndEndPhysicalIndexOfAll; startAndEndPhysicalIndexOfAll = NULL;
+}
+
+void SpecDiffHybGrid::InitGridData()
+{
+    InitGridSize();
+
+    InitGridFileName();
+
+    AllocGridData();
+
+    ReadGrid();
+
+    InitWavenumber();
+}
+
+/*
+void SpecDiffHybGrid::InitGridSize()
+{
+    procIDWithKx0Ky0 = 0;
+    nX = GlobalDataBase::GetIntParaFromDB("nx");
+    nY = GlobalDataBase::GetIntParaFromDB("ny");
+    nZ = GlobalDataBase::GetIntParaFromDB("nz");
+    nX2 = 3 * nX / 2;
+    nY2 = 3 * nY / 2;
+    nZ2 = nZ;
+    nXYAll = nX2 * nY2;
+
+    //		int numberofProcessor = PHMPI::GetNumberOfProcessor();
+    Range I(1, 3);
+    physicalStartIndex = new Int1D(I, fortranArray);
+    physicalEndIndex   = new Int1D(I, fortranArray);
+    physicalIndexSize  = new Int1D(I, fortranArray);
+    fourierStartIndex  = new Int1D(I, fortranArray);
+    fourierEndIndex    = new Int1D(I, fortranArray);
+    fourierIndexSize   = new Int1D(I, fortranArray);
+    dimensionOfP3DFFT  = new Int1D(Range(1, 2), fortranArray);
+    GlobalDataBase::GetData("dimensionOfP3DFFT", &(*dimensionOfP3DFFT)(1), PHINT, 2);
+
+    InitP3DFFT();
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int nTProcessor = GetNumberOfProcessor();
+
+    // !To get startAndEndFourierIndexOfAll, write to griddistribute.dat
+    startAndEndFourierIndexOfAll = new Int2D(Range(1, 6), Range(0, nTProcessor - 1), fortranArray);
+    Int1D *startAndEndFourierIndex = new Int1D(Range(1, 6), fortranArray);
+    (*startAndEndFourierIndex)(I) = (*fourierStartIndex)(I);
+    (*startAndEndFourierIndex)(Range(4, 6)) = (*fourierEndIndex)(I);
+#ifdef PH_PARALLEL
+    MPI_Status status; 
+    if(myid == server)
+    {
+#endif
+        (*startAndEndFourierIndexOfAll)(Range(1, 6), myid) = (*startAndEndFourierIndex)(Range(1, 6));
+#ifdef PH_PARALLEL
+        for(int ip = 1; ip <= nTProcessor - 1; ++ip)
+        {
+            MPI_Recv(&(*startAndEndFourierIndexOfAll)(1, ip), 6, MPI_INTEGER, ip, ip, MPI_COMM_WORLD, &status);
+        }
+    }
+    else
+    {
+        MPI_Send(&(*startAndEndFourierIndex)(1), 6, MPI_INTEGER, 0, myid, MPI_COMM_WORLD);
+    }
+
+    MPI_Bcast(&(*startAndEndFourierIndexOfAll)(1, 0), 6 * nTProcessor, MPI_INTEGER, 0, MPI_COMM_WORLD);
+    MPI_Barrier(MPI_COMM_WORLD);
+#endif
+
+    int wordwidth = 20;
+    string filename = "griddistribute.dat";
+    fstream file;
+    if( myid == server )
+    {
+        file.open(filename.c_str(), ios_base::out);
+        if ( !file )
+        {
+            TK_Exit::ExceptionExit("could not open griddistribute.dat\n");
+        }
+        file << setw(wordwidth) << nTProcessor
+            << setw(wordwidth) << (*dimensionOfP3DFFT)(1)
+            << setw(wordwidth) << (*dimensionOfP3DFFT)(2) 
+            << "\n";
+        for(int ip = 0; ip <= nTProcessor - 1; ++ip)
+        {
+            file << setw(wordwidth) << ip 
+                << setw(wordwidth) << (*startAndEndFourierIndexOfAll)(1, ip)
+                << setw(wordwidth) << (*startAndEndFourierIndexOfAll)(2, ip)
+                << setw(wordwidth) << (*startAndEndFourierIndexOfAll)(3, ip)
+                << setw(wordwidth) << (*startAndEndFourierIndexOfAll)(4, ip)
+                << setw(wordwidth) << (*startAndEndFourierIndexOfAll)(5, ip)
+                << setw(wordwidth) << (*startAndEndFourierIndexOfAll)(6, ip)
+                << "\n";
+        }
+    }
+    file.close();
+    file.clear();
+
+    // !To get startAndEndPhysicalIndexOfAll, write to griddistribute_phy.dat
+    startAndEndPhysicalIndexOfAll = new Int2D(Range(1, 6), Range(0, nTProcessor - 1), fortranArray);
+    Int1D *startAndEndPhysicalIndex = new Int1D(Range(1, 6), fortranArray);
+    (*startAndEndPhysicalIndex)(I) = (*physicalStartIndex)(I);
+    (*startAndEndPhysicalIndex)(Range(4, 6)) = (*physicalEndIndex)(I);
+#ifdef PH_PARALLEL
+    if(myid == server)
+    {
+#endif
+        (*startAndEndPhysicalIndexOfAll)(Range(1, 6), myid) = (*startAndEndPhysicalIndex)(Range(1, 6));
+#ifdef PH_PARALLEL
+        for(int ip = 1; ip <= nTProcessor - 1; ++ip)
+        {
+            MPI_Recv(&(*startAndEndPhysicalIndexOfAll)(1, ip), 6, MPI_INTEGER, ip, ip, MPI_COMM_WORLD, &status);
+        }
+    }
+    else
+    {
+        MPI_Send(&(*startAndEndPhysicalIndex)(1), 6, MPI_INTEGER, 0, myid, MPI_COMM_WORLD);
+    }
+
+    MPI_Bcast(&(*startAndEndPhysicalIndexOfAll)(1, 0), 6 * nTProcessor, MPI_INTEGER, 0, MPI_COMM_WORLD);
+    MPI_Barrier(MPI_COMM_WORLD);
+#endif
+
+    filename = "griddistribute_phy.dat";
+    if( myid == server )
+    {
+        file.open( filename.c_str(), ios_base::out );
+        if ( !file )
+        {
+            TK_Exit::ExceptionExit("could not open griddistribute_phy.dat\n");
+        }
+        file << setw(wordwidth) << nTProcessor 
+            << setw(wordwidth) << (*dimensionOfP3DFFT)(1) 
+            << setw(wordwidth) << (*dimensionOfP3DFFT)(2) 
+            << "\n";
+        for(int ip = 0; ip <= nTProcessor - 1; ++ip)
+        {
+            file << setw(wordwidth) << ip 
+                << setw(wordwidth) << (*startAndEndPhysicalIndexOfAll)(1, ip)
+                << setw(wordwidth) << (*startAndEndPhysicalIndexOfAll)(2, ip)
+                << setw(wordwidth) << (*startAndEndPhysicalIndexOfAll)(3, ip)
+                << setw(wordwidth) << (*startAndEndPhysicalIndexOfAll)(4, ip)
+                << setw(wordwidth) << (*startAndEndPhysicalIndexOfAll)(5, ip)
+                << setw(wordwidth) << (*startAndEndPhysicalIndexOfAll)(6, ip)
+                << "\n";
+        }
+    }
+    file.close();
+    file.clear();
+
+    nXYZFourier  = (*fourierIndexSize )(1) * (*fourierIndexSize )(2) * (*fourierIndexSize )(3);
+    nXYZPhysical = (*physicalIndexSize)(1) * (*physicalIndexSize)(2) * (*physicalIndexSize)(3);
+
+    iStartFourierIndex = (*fourierStartIndex)(1);
+    jStartFourierIndex = (*fourierStartIndex)(2);
+    kStartFourierIndex = (*fourierStartIndex)(3);
+    iEndFourierIndex   = (*fourierEndIndex  )(1);
+    jEndFourierIndex   = (*fourierEndIndex  )(2);
+    kEndFourierIndex   = (*fourierEndIndex  )(3);
+
+    iStartPhysicalIndex = (*physicalStartIndex)(1);
+    jStartPhysicalIndex = (*physicalStartIndex)(2);
+    kStartPhysicalIndex = (*physicalStartIndex)(3);
+    iEndPhysicalIndex   = (*physicalEndIndex  )(1);
+    jEndPhysicalIndex   = (*physicalEndIndex  )(2);
+    kEndPhysicalIndex   = (*physicalEndIndex  )(3);
+
+    Int1D *fourierStartIndexGlobal = new Int1D(Range(1, 3), fortranArray);
+    Int1D *fourierEndIndexGlobal = new Int1D(Range(1, 3), fortranArray);
+
+    (*fourierStartIndexGlobal)(1) = iStartFourierIndex;
+    (*fourierStartIndexGlobal)(2) = jStartFourierIndex;
+    (*fourierStartIndexGlobal)(3) = kStartFourierIndex;
+    (*fourierEndIndexGlobal)(1) = iEndFourierIndex;
+    (*fourierEndIndexGlobal)(2) = jEndFourierIndex;
+    (*fourierEndIndexGlobal)(3) = kEndFourierIndex;
+
+#ifdef PH_PARALLEL
+    using namespace PHMPI;
+    MPI_Reduce(&iStartFourierIndex, &(*fourierStartIndexGlobal)(1), 1, MPI_INTEGER, MPI_MIN, procIDWithKx0Ky0, MPI_COMM_WORLD);
+    MPI_Reduce(&jStartFourierIndex, &(*fourierStartIndexGlobal)(2), 1, MPI_INTEGER, MPI_MIN, procIDWithKx0Ky0, MPI_COMM_WORLD);
+    MPI_Reduce(&kStartFourierIndex, &(*fourierStartIndexGlobal)(3), 1, MPI_INTEGER, MPI_MIN, procIDWithKx0Ky0, MPI_COMM_WORLD);
+
+    MPI_Reduce(&iEndFourierIndex, &(*fourierEndIndexGlobal)(1), 1, MPI_INTEGER, MPI_MAX, procIDWithKx0Ky0, MPI_COMM_WORLD);
+    MPI_Reduce(&jEndFourierIndex, &(*fourierEndIndexGlobal)(2), 1, MPI_INTEGER, MPI_MAX, procIDWithKx0Ky0, MPI_COMM_WORLD);
+    MPI_Reduce(&kEndFourierIndex, &(*fourierEndIndexGlobal)(3), 1, MPI_INTEGER, MPI_MAX, procIDWithKx0Ky0, MPI_COMM_WORLD);
+
+    MPI_Bcast(&(*fourierStartIndexGlobal)(1) , 3, MPI_INTEGER, procIDWithKx0Ky0, MPI_COMM_WORLD);
+    MPI_Bcast(&(*fourierEndIndexGlobal)(1), 3, MPI_INTEGER, procIDWithKx0Ky0, MPI_COMM_WORLD);
+#endif
+
+    iStartFourierIndexGlobal = (*fourierStartIndexGlobal)(1);
+    jStartFourierIndexGlobal = (*fourierStartIndexGlobal)(2);
+    kStartFourierIndexGlobal = (*fourierStartIndexGlobal)(3);
+
+    iEndFourierIndexGlobal = (*fourierEndIndexGlobal)(1);
+    jEndFourierIndexGlobal = (*fourierEndIndexGlobal)(2);
+    kEndFourierIndexGlobal = (*fourierEndIndexGlobal)(3);
+
+    nyquistX = kStartFourierIndexGlobal + nX / 2;
+    nyquistY = jStartFourierIndexGlobal + nY / 2;
+
+    if ( (jStartFourierIndex == jStartFourierIndexGlobal) && (kStartFourierIndex == kStartFourierIndexGlobal) )
+    {
+        procIDWithKx0Ky0 = myid;
+    }
+
+    delete startAndEndFourierIndex; startAndEndFourierIndex = NULL;
+    delete startAndEndPhysicalIndex; startAndEndPhysicalIndex = NULL;
+    delete fourierStartIndexGlobal; fourierStartIndexGlobal = NULL;
+    delete fourierEndIndexGlobal; fourierEndIndexGlobal = NULL;
+}
+*/
+
+void SpecDiffHybGrid::InitGridFileName()
+{
+    string outputdir = "./results";
+    outputdir = GlobalDataBase::GetStrParaFromDB("outputdir");
+
+    gridFileName = outputdir + "/grid.x"; 
+    zgridFileName = outputdir + "/rZ.dat";
+}
+
+void SpecDiffHybGrid::InitP3DFFT()
+{
+    Int1D *memsize = new Int1D(Range(1, 3), fortranArray);
+
+    nX = GlobalDataBase::GetIntParaFromDB("nx");
+    nY = GlobalDataBase::GetIntParaFromDB("ny");
+    nZ = GlobalDataBase::GetIntParaFromDB("nz");
+
+    (*fourierStartIndex)(1) = 1;
+    (*fourierStartIndex)(2) = 1;
+    (*fourierStartIndex)(3) = 1;
+    
+    (*fourierEndIndex)(1) = nZ + 1;
+    (*fourierEndIndex)(2) = nY;
+    (*fourierEndIndex)(3) = nX / 2 + 1;
+
+    (*physicalStartIndex)(1) = 1;
+    (*physicalStartIndex)(2) = 1;
+    (*physicalStartIndex)(3) = 1;
+
+    (*physicalEndIndex)(1) = 3 * nX / 2;
+    (*physicalEndIndex)(2) = 3 * nY / 2;
+    (*physicalEndIndex)(3) = nZ + 1;
+
+    Cp3dfft_setup(&(*dimensionOfP3DFFT)(1), nX2, nY2, nZ+1, MPI_COMM_WORLD, nX, nY, nZ+1, 1, &(*memsize)(1));
+
+    Cp3dfft_get_dims(&(*physicalStartIndex)(1), &(*physicalEndIndex)(1), &(*physicalIndexSize)(1), 1);
+
+    Cp3dfft_get_dims(&(*fourierStartIndex)(1), &(*fourierEndIndex)(1), &(*fourierIndexSize)(1), 2);
+
+    delete memsize; memsize = NULL;
+}
+
+void SpecDiffHybGrid::AllocGridData()
+{
+    using namespace PHMPI;
+    int nproc = GetNumberOfProcessor();
+
+    Range K(kStartFourierIndex, kEndFourierIndex);
+    Range J(jStartFourierIndex, jEndFourierIndex);
+    Range I(iStartFourierIndex, iEndFourierIndex);
+
+    realKX     = new RDouble1D(K, fortranArray);
+    realKY     = new RDouble1D(J, fortranArray);
+    realZ      = new RDouble1D(I, fortranArray);
+
+    complexKX  = new Complex1D(K, fortranArray);
+    complexKY  = new Complex1D(J, fortranArray);
+
+    realDetaDz = new RDouble1D(I, fortranArray);
+}
+
+void SpecDiffHybGrid::ReadGrid()
+{
+    int irZinp = GlobalDataBase::GetIntParaFromDB("irZinp");
+    if(irZinp == 0)
+    {
+        SetZGrid();
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue( "irZinp", irZinp );
+    }
+}
+
+void SpecDiffHybGrid::SetZGrid()
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    fstream file;
+
+    RDouble gama = GlobalDataBase::GetDoubleParaFromDB("gama");
+    for (int iz = iStartFourierIndex; iz <= iEndFourierIndex; ++iz)
+    {
+        (*realZ)(iz) = -1.0 * tanh( gama * ( 1.0 - 2.0 * static_cast<double>(iz - iStartFourierIndex) /static_cast<double>(nZ) )) / tanh(gama);
+    }
+
+    if(myid == procIDWithKx0Ky0)
+    {
+        file.open( zgridFileName.c_str(), ios_base::out );
+        if (!file)
+        {
+            TK_Exit::ExceptionExit("could not open zgridFileName\n");
+        }
+        else
+        {
+            for(int iz = iStartFourierIndex; iz <= iEndFourierIndex; ++iz)
+            {
+                file << setw(20) << iz 
+                    << setprecision(10) << setw(20) << (*realZ)(iz)
+                    << "\n";
+            }
+        }
+        file.close();
+        file.clear();
+    } 
+}
+
+void SpecDiffHybGrid::InitWavenumber()
+{
+    RDouble realXL = GlobalDataBase::GetDoubleParaFromDB("XL");
+    RDouble realAlphaX = 1.0 / realXL;
+    for ( int i3 = kStartFourierIndex; i3 <= kEndFourierIndex; ++i3 )
+    {
+        int ix = i3 - kStartFourierIndexGlobal;
+        (*realKX)(i3) = static_cast<double>(ix) * realAlphaX;
+        (*complexKX)(i3) = PHComplex(0.0, 1.0) * (*realKX)(i3);
+    }
+    realKNyquistX = static_cast<double>(nX) * realAlphaX / 2.0;
+
+    RDouble realYL = GlobalDataBase::GetDoubleParaFromDB("YL");
+    RDouble realAlphaY = 1.0 / realYL;
+    for ( int i2 = jStartFourierIndex; i2 <= jEndFourierIndex; ++i2 )
+    {
+        int iy = i2 - jStartFourierIndexGlobal;
+        if ( iy <= nY/2 )
+        {
+            (*realKY)(i2) = static_cast<double>(iy) * realAlphaY;
+        }
+        else
+        {
+            (*realKY)(i2) = static_cast<double>(iy - nY) * realAlphaY;
+        }
+        (*complexKY)(i2) = PHComplex(0.0, 1.0) * (*realKY)(i2);
+    }
+    realKNyquistY = static_cast<double>(nY) * realAlphaY / 2.0;
+}
+
+}
+
diff --git a/CFD/SpecDiffHybSolver/src/SpecDiffHybSolver.cpp b/CFD/SpecDiffHybSolver/src/SpecDiffHybSolver.cpp
new file mode 100644
index 0000000..a118066
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/src/SpecDiffHybSolver.cpp
@@ -0,0 +1,2874 @@
+#include "SpecDiffHybSolver.h"
+#include "SpecDiffHybGrid.h"
+#include "ExplicitDifferenceBoundary.h"
+#include "CompactDifferenceFirstDerivative.h"
+#include "CompactDifferenceSecondDerivative.h"
+#include "PoissonSolver.h"
+#include "CorrectWallDivergence.h"
+#include "RescaleField.h"
+#include "Statistics.h"
+#include "LES.h"
+#include "Param_SpecDiffHybSolver.h"
+#include "p3dfft.h"
+#include "TK_Time.h"
+#include "TK_Exit.h"
+#include "TK_Warning.h"
+#include "PHMpi.h"
+#include "PHHeader.h"
+#include "GlobalDataBase.h"
+#include "Constants.h"
+#include "PHIO.h"
+#include "IO_HDF5File.h"
+#include <iostream>
+#include <sstream>
+#include <cstdlib>
+
+namespace PHSPACE
+{
+
+SpecDiffHybSolver::SpecDiffHybSolver()
+{
+}
+
+SpecDiffHybSolver::~SpecDiffHybSolver()
+{
+    FreeControlParameters();
+}
+
+void SpecDiffHybSolver::Run()
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    Init();
+
+    Param_SpecDiffHybSolver *parameters = GetControlParameters();
+    int maxSimuStep = parameters->GetMaxSimuStep();
+    int startStatisticStep = parameters->GetStartStatisticStep();
+    int intervalStepRes = parameters->GetIntervalStepRes();
+    int intervalStepStatistic = parameters->GetIntervalStepStatistic();
+    int intervalStepFlow = parameters->GetIntervalStepFlow();
+
+    int nstep = GlobalDataBase::GetIntParaFromDB("nstep");
+    int nstep0 = nstep;
+    do {
+        ++ nstep;
+        GlobalDataBase::UpdateData("nstep", &nstep, PHINT, 1);
+
+        GetRHS();
+
+        int iVortProjection = GlobalDataBase::GetIntParaFromDB("iVortProjection");
+        if( iVortProjection == 0 ) 
+        {
+            Solve();
+        }
+        else
+        {
+            TK_Exit::UnexpectedVarValue( "iVortProjection", iVortProjection );
+        }
+
+        int nstart = GlobalDataBase::GetIntParaFromDB("nstart");
+        int timeOrderOfPressureTerm = GlobalDataBase::GetIntParaFromDB("timeOrderOfPressureTerm");
+        if( (!nstart) && ((nstep - nstep0) == timeOrderOfPressureTerm) )
+        {
+            SetTimeDataCoef();
+        }
+        else if( IsConvectiveTermFailed && ((nstep - nstep0) == timeOrderOfPressureTerm) )
+        {
+            SetTimeDataCoef();
+            IsConvectiveTermFailed = false;
+            //IsPressureGradientFailed = false;
+        }
+
+        RescaleVelocityField(nstep);
+
+        if(nstep >= startStatisticStep)
+        {
+            GetStatistics();
+        }
+
+        if(nstep % intervalStepRes == 0)
+        {
+            OutputResidual();
+        }
+
+        if(nstep % intervalStepStatistic == 0)
+        {
+            OutputStatisticVisual();
+        }
+
+        if(nstep % intervalStepFlow == 0)
+        {
+            OutputRestartData();
+        }
+
+        //IsInitialization = false;
+    } while(nstep < maxSimuStep);
+
+    WriteLogFile("Iteration Finished!\n");
+
+    //DeAllocateGlobalVariables();
+}
+
+void SpecDiffHybSolver::Init()
+{
+    bool readFlowFile = false;
+    int nstart = 0;
+    if(JudgeIfRestart())
+    {
+        readFlowFile = true;
+
+        nstart = 1;
+    }
+    GlobalDataBase::UpdateData("nstart", &nstart, PHINT, 1);
+
+    if(nstart == 0)
+    {
+        WriteLogFile("Initialize Flow!\n");
+    }
+    else
+    {
+        WriteLogFile("Reading Restart File As InitFlow!\n");
+    }
+
+    InitControlParameters();
+
+    InitGridData();
+
+    InitTimeDependentData();
+
+    InitBoundaryData();
+
+    InitCompactDifferenceFirstDerivativeData();
+
+    InitCompactDifferenceSecondDerivativeData();
+
+    InitGlobal();
+
+    InitRescaleData();
+
+    InitFieldData();
+
+    InitPoissonSolverData();
+
+    if(nstart)
+    {
+        InputOldTimeData();
+    }
+
+    InitCorrectWallDivergenceData();
+
+    if (!nstart)
+    {
+        VanishingDIVproj();
+    }
+
+    InitStatisticsData();
+
+    InitLESData();
+
+    OutputFieldName();
+}
+
+/*
+void SpecDiffHybSolver::Init()
+{
+    bool readFlowFile = false;
+    int nstart = 0;
+    if(JudgeIfRestart())
+    {
+        readFlowFile = true;
+
+        nstart = 1;
+    }
+    GlobalDataBase::UpdateData("nstart", &nstart, PHINT, 1);
+
+    InitControlParameters();
+    WriteLogFile("Control parameters initialized!\n");
+
+    GridData = new SpecDiffHybGrid();
+    GridData -> InitGridData();
+    WriteLogFile("Grid data initialized!\n");
+
+    InitTimeDependentData();
+    WriteLogFile("Time dependent data initialized!\n");
+
+    DiffBoundaryData = new ExplicitDifferenceBoundary();
+    DiffBoundaryData -> GetSchemeCoefDiffBoundaryData();
+    WriteLogFile("Boundary data initialized!\n");
+
+    CompactDifferenceFirstDerivativeData = new CompactDifferenceFirstDerivative();
+    CompactDifferenceFirstDerivativeData -> InitCompactDifferenceFirstDerivativeData(GridData, DiffBoundaryData);
+    WriteLogFile("Compact scheme data for the first derivative initialized!\n");
+
+    CompactDifferenceSecondDerivativeData = new CompactDifferenceSecondDerivative();
+    CompactDifferenceSecondDerivativeData -> InitCompactDifferenceSecondDerivativeData(GridData);
+    WriteLogFile("Compact scheme data for the second derivative initialized!\n");
+
+    InitGlobal();
+    WriteLogFile("Global data initialized!\n");
+
+    CompactDifferenceFirstDerivativeData -> GetDetaDz(GridData);
+
+    RescaleFieldData = new RescaleField();
+    RescaleFieldData -> InitRescaleData( GridData );
+    WriteLogFile("Rescale data initialized!\n");
+
+    InitFieldData();
+    WriteLogFile("Field data initialized!\n");
+
+    PoissonSolverData = new PoissonSolver();
+    PoissonSolverData -> InitPoissonSolverData( GridData, DiffBoundaryData, CompactDifferenceSecondDerivativeData, realnut, realnut_00 );
+    WriteLogFile("Poisson solver data initialized!\n");
+
+    if(nstart)
+    {
+        InputOldTimeData();
+    }
+
+    CorrectWallDivergenceData = new CorrectWallDivergence();
+    CorrectWallDivergenceData -> InitCorrectWallDivergenceData( GridData, CompactDifferenceFirstDerivativeData, CompactDifferenceSecondDerivativeData, PoissonSolverData, realnut );
+    WriteLogFile("Correct wall divergence data initialized!\n");
+
+    if (!nstart)
+    {
+        VanishingDIVproj();
+    }
+
+    StatisticsData = new Statistics();
+    StatisticsData -> InitStatisticsData(GridData);
+    WriteLogFile("Statistics data initialized!\n");
+
+    Param_SpecDiffHybSolver * parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    if(viscousType > 1)
+    {
+        LESData = new LES();
+
+        LESData -> InitLESData(GridData);
+
+        WriteLogFile("LES data initialized!\n");
+    }
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();;
+    if(myid == procIDWithKx0Ky0)
+    {
+        OutputFieldName();
+    }
+}
+*/
+
+void SpecDiffHybSolver::InitGridData()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    GridData = new SpecDiffHybGrid();
+
+    GridData -> InitGridData();
+
+    SetGrid(GridData);
+
+    WriteLogFile("Grid data initialized!\n");
+}
+
+void SpecDiffHybSolver::InitTimeDependentData()
+{
+    InitTimeDependentFileName();
+
+    AllocTimeDependentData();
+
+    int nstart = GlobalDataBase::GetIntParaFromDB("nstart");
+    if(!nstart)
+    {
+        SetInitTimeDataCoef();
+    }
+    else
+    {
+        SetTimeDataCoef();
+    }
+
+    WriteLogFile("Time dependent data initialized!\n");
+}
+
+/*
+void SpecDiffHybSolver::InitTimeDependentFileName()
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    stringstream strmMyid;
+    strmMyid << myid;
+
+    string outputdir = "./results";
+    outputdir = GlobalDataBase::GetStrParaFromDB("outputdir");
+
+    nonlinearTermFile = outputdir + "/NonlinearTerm_" + strmMyid.str() + ".rsta"; 
+    nonlinearTermBackupFile = outputdir + "/NonlinearTerm_" + strmMyid.str() + "_bk.rsta";
+
+    pressureGradientTermFile = outputdir + "/PressureGradientTerm_" + strmMyid.str() + ".rsta";
+    pressureGradientTermBackupFile = outputdir + "/PressureGradientTerm_" + strmMyid.str() + "_bk.rsta";
+
+    laplacianVelocityTermFile = outputdir + "/LaplacianVelocity_" + strmMyid.str() + ".rsta";
+    laplacianVelocityTermBackupFile = outputdir + "/LaplacianVelocity_" + strmMyid.str() + "_bk.rsta";
+
+    timeInformationRestartFile = outputdir + "/Timeinfo.rsta";
+}
+*/
+
+void SpecDiffHybSolver::AllocTimeDependentData()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    int ist = GridData -> iStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex  ;
+    int jst = GridData -> jStartFourierIndex;
+    int jed = GridData -> jEndFourierIndex  ;
+    int kst = GridData -> kStartFourierIndex;
+    int ked = GridData -> kEndFourierIndex;
+
+    int timeOrderOfConvectiveTerm = GlobalDataBase::GetIntParaFromDB("timeOrderOfConvectiveTerm"); 
+    Range I( -(timeOrderOfConvectiveTerm-1), 0 );
+    nonlinearTermCoef = new RDouble1D( I, fortranArray );
+
+    int timeOrderOfPressureTerm = GlobalDataBase::GetIntParaFromDB("timeOrderOfPressureTerm");
+    Range J( -timeOrderOfPressureTerm, 0 );
+    Range K( -timeOrderOfPressureTerm, -1);
+    pressureGradientTermCoef = new RDouble1D( J, fortranArray );
+
+    Range II( ist , ied );
+    Range JJ( jst , jed );
+    Range KK( kst , ked );
+    Range NN( 1   , 3   );
+    convectiveTerm = new Complex4D( II, JJ, KK, NN , fortranArray );
+    complexLaplacianVelocityTerm = new Complex4D( II, JJ, KK, NN, fortranArray );
+    complexPressureGradientTerm = new Complex5D( II, JJ, KK, NN, K, fortranArray );
+}
+
+/*
+void SpecDiffHybSolver::SetInitTimeDataCoef()
+{
+    (*nonlinearTermCoef)( 0) = 1.0;
+    (*nonlinearTermCoef)(-1) = 0.0;
+
+    int timeOrderOfPressureTerm = GlobalDataBase::GetIntParaFromDB("timeOrderOfPressureTerm");
+    for ( int i = -timeOrderOfPressureTerm ; i <= 0 ; ++i )
+    {
+        (*pressureGradientTermCoef)(i) = 0.0;
+    }
+}
+
+void SpecDiffHybSolver::SetTimeDataCoef()
+{
+    (*nonlinearTermCoef)( 0) = 1.5;
+    (*nonlinearTermCoef)(-1) = -0.5;
+
+    int timeOrderOfPressureTerm = GlobalDataBase::GetIntParaFromDB("timeOrderOfPressureTerm");
+    if ( timeOrderOfPressureTerm == 1 )
+    {
+        (*pressureGradientTermCoef)( 0) = 0.0;
+        (*pressureGradientTermCoef)(-1) = 1.0;
+    }
+    else if ( timeOrderOfPressureTerm == 2 )
+    {
+        (*pressureGradientTermCoef)( 0) = 0.0;
+        (*pressureGradientTermCoef)(-1) = 2.0;
+        (*pressureGradientTermCoef)(-2) = -1.0;
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue( "timeOrderOfPressureTerm", timeOrderOfPressureTerm );
+    }
+}
+*/
+
+void SpecDiffHybSolver::InitBoundaryData()
+{
+    DiffBoundaryData = new ExplicitDifferenceBoundary();
+
+    DiffBoundaryData -> GetSchemeCoefDiffBoundaryData();
+
+    WriteLogFile("Boundary data initialized!\n");
+}
+
+void SpecDiffHybSolver::InitCompactDifferenceFirstDerivativeData()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    CompactDifferenceFirstDerivativeData = new CompactDifferenceFirstDerivative();
+
+    CompactDifferenceFirstDerivativeData -> InitCompactDifferenceFirstDerivativeData(GridData, DiffBoundaryData);
+
+    CompactDifferenceFirstDerivativeData -> GetDetaDz(GridData);
+
+    WriteLogFile("Compact scheme data for the first derivative initialized!\n");
+}
+
+void SpecDiffHybSolver::InitCompactDifferenceSecondDerivativeData()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    CompactDifferenceSecondDerivativeData = new CompactDifferenceSecondDerivative();
+
+    CompactDifferenceSecondDerivativeData -> InitCompactDifferenceSecondDerivativeData(GridData);
+
+    WriteLogFile("Compact scheme data for the second derivative initialized!\n");
+}
+
+void SpecDiffHybSolver::InitGlobal()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+    Range IF(istf, iedf);
+    Range JF(jstf, jedf);
+    Range KF(kstf, kedf);
+
+    int istp = GridData -> iStartPhysicalIndex;
+    int jstp = GridData -> jStartPhysicalIndex;
+    int kstp = GridData -> kStartPhysicalIndex;
+    int iedp = GridData -> iEndPhysicalIndex;
+    int jedp = GridData -> jEndPhysicalIndex;
+    int kedp = GridData -> kEndPhysicalIndex;
+    Range IP(istp, iedp);
+    Range JP(jstp, jedp);
+    Range KP(kstp, kedp);
+
+    int nstep = 0;
+    GlobalDataBase::UpdateData("nstep", &nstep, PHINT, 1);
+
+    //int nstart = GlobalDataBase::GetIntParaFromDB("nstart");
+    //if(!nstart)
+    //{
+    //    IsInitialization = true;
+    //}
+    //else
+    //{
+    //    IsInitialization = false;
+    //}
+
+    IsConvectiveTermFailed = false;
+    //IsPressureGradientFailed = false;
+
+    screenOutFile = "screen.out";
+
+    complexVelocityGradient = new Complex4D(IF, JF, KF, Range(1, 12), fortranArray);
+    realVelocityGradient = new RDouble4D(IP, JP, KP, Range(1, 12), fortranArray);
+    (*complexVelocityGradient)(IF, JF, KF, Range(1, 12)) = PHComplex(0.0, 0.0);
+    (*realVelocityGradient)(IP, JP, KP, Range(1, 12)) = 0.0;
+
+    complexVelocitySquare = new Complex4D(IF, JF, KF, Range(1, 12), fortranArray);
+    realVelocitySquare = new RDouble4D(IP, JP, KP, Range(1, 12), fortranArray);
+    (*complexVelocitySquare)(IF, JF, KF, Range(1, 12)) = PHComplex(0.0, 0.0);
+    (*realVelocitySquare)(IP, JP, KP, Range(1, 12)) = 0.0; 
+
+    complexViscousTerm = new Complex4D(IF, JF, KF, Range(1, 3), fortranArray);
+    (*complexViscousTerm)(IF, JF, KF, Range(1, 3)) = PHComplex(0.0, 0.0);
+    complexNonlinearTerm = new Complex4D(IF, JF, KF, Range(1, 3), fortranArray);
+    (*complexNonlinearTerm)(IF, JF, KF, Range(1, 3)) = PHComplex(0.0, 0.0);
+
+    WriteLogFile("Global data initialized!\n");
+}
+
+void SpecDiffHybSolver::InitRescaleData()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    RescaleField *RescaleFieldData = GetRescaleFieldData();
+
+    RescaleFieldData = new RescaleField();
+
+    RescaleFieldData -> InitRescaleData(GridData);
+
+    SetRescaleFieldData(RescaleFieldData);
+
+    WriteLogFile("Rescale data initialized!\n");
+}
+
+void SpecDiffHybSolver::InitStatisticsData()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    Statistics *StatisticData = GetStatisticData();
+
+    StatisticData = new Statistics();
+
+    StatisticData -> InitStatisticsData(GridData);
+
+    SetStatisticData(StatisticData);
+
+    WriteLogFile("Statistics data initialized!\n");
+}
+
+void SpecDiffHybSolver::InitLESData()
+{
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+
+    if(viscousType > 1)
+    {
+        LES *LESData = GetLESData();
+
+        LESData = new LES();
+
+        SpecDiffHybGrid *GridData = GetGrid();
+
+        LESData -> InitLESData(GridData);
+
+        SetLESData(LESData);
+
+        WriteLogFile("LES data initialized!\n");
+    }
+}
+
+/*
+void SpecDiffHybSolver::InitFieldData()
+{
+    InitFieldFileName();
+
+    AllocFieldData();
+
+    GetInitField();
+
+    WriteLogFile("Field data initialized!\n");
+}
+
+void SpecDiffHybSolver::InitFieldFileName()
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    stringstream strmMyid;
+    strmMyid << myid;
+
+    string outputdir = "./results";
+    outputdir = GlobalDataBase::GetStrParaFromDB("outputdir");
+
+    velocityRestartFile = outputdir + "/Velocity_" + strmMyid.str() + ".rsta";
+    velocityBackupFile = outputdir + "/Velocity_" + strmMyid.str() + "_bk.rsta";
+    pressureRestartFile = outputdir + "/Pressure_" + strmMyid.str() + ".rsta";
+    pressureBackupFile = outputdir + "/Pressure_" + strmMyid.str() + "_bk.rsta";
+    velocityNameFile = outputdir + "/Velocity.nam";
+    fieldNameFile = outputdir + "/field.nam";
+
+}
+*/
+
+void SpecDiffHybSolver::AllocFieldData()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex  ;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex  ;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex  ;
+
+    int istp = GridData -> iStartPhysicalIndex;
+    int jstp = GridData -> jStartPhysicalIndex;
+    int kstp = GridData -> kStartPhysicalIndex;
+    int iedp = GridData -> iEndPhysicalIndex;
+    int jedp = GridData -> jEndPhysicalIndex;
+    int kedp = GridData -> kEndPhysicalIndex;
+
+    Range IF(istf, iedf);
+    Range JF(jstf, jedf);
+    Range KF(kstf, kedf);
+
+    Range IP(istp, iedp);
+    Range JP(jstp, jedp);
+    Range KP(kstp, kedp);
+
+    complexU           = new Complex3D(IF, JF, KF, fortranArray);
+    complexV           = new Complex3D(IF, JF, KF, fortranArray);
+    complexW           = new Complex3D(IF, JF, KF, fortranArray);
+    complexP           = new Complex3D(IF, JF, KF, fortranArray);
+    complexDivergenceU = new Complex3D(IF, JF, KF, fortranArray);
+
+    (*complexU)(IF, JF, KF) = PHComplex(0.0, 0.0);
+    (*complexV)(IF, JF, KF) = PHComplex(0.0, 0.0);
+    (*complexW)(IF, JF, KF) = PHComplex(0.0, 0.0);
+    (*complexP)(IF, JF, KF) = PHComplex(0.0, 0.0);
+    (*complexDivergenceU)(IF, JF, KF) = PHComplex(0.0, 0.0);
+
+    realnut = new RDouble1D(IF, fortranArray);
+    realnut_00 = new RDouble1D(IF, fortranArray);
+    realnut3d = new RDouble3D(IP, JP, KP, fortranArray);
+    (*realnut)(IF) = 0.0;
+    (*realnut_00)(IF) = 0.0;
+    (*realnut3d)(IP, JP, KP) = 0.0;
+}
+
+void SpecDiffHybSolver::GetInitField()
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    if(myid == server)
+    {
+        WriteVelocityName();
+    }
+
+    int nstart = GlobalDataBase::GetIntParaFromDB("nstart");
+    if(!nstart)
+    {
+        InitProfile();
+    }
+    else
+    {
+        InitFromOldField();
+    }
+
+    OutputFieldRestartFile();
+}
+
+void SpecDiffHybSolver::InitPoissonSolverData()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    PoissonSolverData = new PoissonSolver();
+
+    PoissonSolverData -> InitPoissonSolverData(GridData, DiffBoundaryData, CompactDifferenceSecondDerivativeData, realnut, realnut_00);
+
+    WriteLogFile("Poisson solver data initialized!\n");
+}
+
+void SpecDiffHybSolver::InitCorrectWallDivergenceData()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    CorrectWallDivergenceData = new CorrectWallDivergence();
+
+    CorrectWallDivergenceData -> InitCorrectWallDivergenceData(GridData, CompactDifferenceFirstDerivativeData, CompactDifferenceSecondDerivativeData, PoissonSolverData, realnut);
+
+    WriteLogFile("Correct wall divergence data initialized!\n");
+}
+
+/*
+void SpecDiffHybSolver::WriteVelocityName()
+{
+    fstream file;
+    file.open(velocityNameFile.c_str(), ios_base::out);
+    if ( !file )
+    {
+        TK_Exit::ExceptionExit("could not open velocityNameFile\n");
+    }
+    file << "u;velocity \n";
+    file << "v \n";
+    file << "w \n";
+    file.close();
+    file.clear();
+}
+
+void SpecDiffHybSolver::InputOldTimeData()
+{
+    ReadConvectiveTerm();
+
+    ReadTimeDependentInformation();
+
+    if(IsConvectiveTermFailed)
+    {
+        SetInitTimeDataCoef();
+    }
+}
+*/
+
+void SpecDiffHybSolver::ReadConvectiveTerm()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    fstream file;
+    ios_base::openmode openMode = ios_base::in | ios_base::binary;
+    PHSPACE::OpenFile(file, nonlinearTermFile.c_str(), openMode);
+
+    int inttmp[5];
+    PHRead(file, inttmp, 5);
+
+    int nout = 3 * (iedf - istf + 1) * (jedf - jstf + 1) * (kedf - kstf + 1);
+
+    PHRead(file, &(*convectiveTerm)(istf, jstf, kstf, 1), nout);
+
+    PHSPACE::CloseFile(file);
+
+    /*
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+    Range I(istf, iedf);
+    Range J(jstf, jedf);
+    Range K(kstf, kedf);
+    Range N(1, 3);
+
+    fstream file;
+    file.open(nonlinearTermFile.c_str(), ios_base::in|ios_base::binary);
+    if(!file)
+    {
+        IsConvectiveTermFailed = true;
+        (*convectiveTerm)(I, J, K, N) = PHComplex(0.0, 0.0);     
+        TK_Warning::Warning("ReadConvectiveTerm: NonlinearTerm.rsta not exist. ConvectiveTerm will be set zero.");
+    }
+    else
+    {
+        int inttmp[5];
+        int nin = 3 * (iedf - istf + 1) * (jedf - jstf + 1) * (kedf - kstf + 1);
+        file.read(reinterpret_cast<char*>(inttmp), 5*sizeof(int));
+        file.read(reinterpret_cast<char*>(&(*convectiveTerm)(istf, jstf, kstf, 1)), nin*sizeof(PHComplex));
+    }
+    file.close();
+    file.clear();
+    */
+}
+
+void SpecDiffHybSolver::ReadTimeDependentInformation()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    int nstep = GlobalDataBase::GetIntParaFromDB("nstep");
+
+    fstream file;        
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+    //if(myid == procIDWithKx0Ky0)
+    //{
+        file.open(timeInformationRestartFile.c_str(), ios_base::in);
+        if((!file))
+        {
+            TK_Exit::FileOpenErrorExit(timeInformationRestartFile);
+        }
+        else
+        {
+            file >> nstep;
+        }
+        file.close();
+        file.clear();
+
+        GlobalDataBase::UpdateData("nstep", &nstep, PHINT, 1);
+    //}
+
+    //GlobalDataBase::UpdateData("nstep", &nstep, PHINT, 1);
+//#ifdef PH_PARALLEL
+//    MPI_Bcast(&nstep, 1, MPI_INTEGER, procIDWithKx0Ky0, MPI_COMM_WORLD); 
+//#endif
+}
+
+void SpecDiffHybSolver::InitProfile()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    int ist = GridData -> iStartFourierIndex;
+    int jst = GridData -> jStartFourierIndex;
+    int kst = GridData -> kStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex;
+    int jed = GridData -> jEndFourierIndex;
+    int ked = GridData -> kEndFourierIndex;
+
+    Range I(ist, ied);
+    Range J(jst, jed);
+    Range K(kst, ked);
+
+    RDouble1D *uAvg = new RDouble1D(I, fortranArray);
+    Complex1D *cfu = new Complex1D(I, fortranArray);
+    Complex1D *cfv = new Complex1D(I, fortranArray);
+    Complex1D *cfw = new Complex1D(I, fortranArray);
+    Complex1D *cfp = new Complex1D(I, fortranArray);
+
+    const double pi = 2.0 * acos(0.0);
+    const int nXZ = (jed - jst + 1) * (ked - kst + 1);
+
+    (*complexP)(I, J, K) = PHComplex(0.0, 0.0);
+    (*complexU)(I, J, K) = PHComplex(0.0, 0.0);
+    (*complexV)(I, J, K) = PHComplex(0.0, 0.0);
+    (*complexW)(I, J, K) = PHComplex(0.0, 0.0);
+
+    RDouble1D *rZ = GridData -> realZ;
+    for( int iz = ist; iz <= ied; ++iz )
+    {
+        (*uAvg)(iz) = 1.5 * (1.0 - (*rZ)(iz) * (*rZ)(iz));
+    }
+
+    Param_SpecDiffHybSolver *parameters = GetControlParameters();
+    RDouble reynolds = parameters->GetRefReNumber();
+
+    RDouble uavgDivideByUtau = 2.960975610 + 2.439024390 * log(reynolds);
+    (*uAvg)(I) = (*uAvg)(I) * uavgDivideByUtau;
+
+    RDouble1D *realKX = GridData -> realKX;
+    RDouble1D *realKY = GridData -> realKY;
+    RDouble kNyquistX = GridData -> realKNyquistX;
+    RDouble kNyquistY = GridData -> realKNyquistY;
+    RDouble rrrmax = -1.0e9;
+    RDouble ekx = 1.0;
+    RDouble eky = 1.0;
+    RDouble ek = 1.0;
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    srand( (unsigned int)time(NULL) + (unsigned int)myid );
+    for( int ix = kst; ix <= ked ;++ix )
+    {
+        for( int iy = jst; iy <= jed; ++iy )
+        {
+            for( int iz = ist; iz <= ied; ++iz)
+            {
+                RDouble kx = (*realKX)(ix);
+                RDouble ky = (*realKY)(iy);
+                RDouble k2  = kx * kx + ky * ky;
+
+                RDouble rd = abs( (*rZ)(iz) - (*rZ)(ist) );
+                rd = min( rd, abs( (*rZ)(iz) - (*rZ)(ied) ) );
+                RDouble rdplus = rd * reynolds;
+
+                // !ekx
+                RDouble kt = abs(kx);
+                if( kt > TINY )
+                {
+                    if( rdplus > 100.0)
+                    {
+                        GetAssumedSpectrum(kt, rd, ekx);
+                    }
+                    else if( rd > TINY )
+                    {
+                        GetAssumedSpectrumNearWall(kt, rd, ekx);
+                    }
+                    else
+                    {
+                        ekx = 1.0;
+                    }
+                }
+                else
+                {
+                    ekx = 1.0;
+                }
+
+                // !eky
+                kt = abs(ky);
+                if( kt > TINY )
+                {
+                    if( rdplus > 100.0)
+                    {
+                        GetAssumedSpectrum(kt, rd, eky);
+                    }
+                    else if( rd > TINY )
+                    {
+                        GetAssumedSpectrumNearWall(kt, rd, eky);
+                    }
+                    else
+                    {
+                        eky = 1.0;
+                    }
+                }
+                else
+                {
+                    eky = 1.0;
+                }
+
+                ek = ekx * eky;
+                RDouble rrr = ek;
+
+                if( rrr > rrrmax )
+                {
+                    rrrmax = rrr;
+                }
+
+                if( (abs(kx) < kNyquistX) && (abs(ky) < kNyquistY) )
+                {
+                    RDouble theta = rand()/RDouble(RAND_MAX);
+                    theta = 2.0 * pi * theta;
+                    RDouble zz = rand()/RDouble(RAND_MAX);
+                    zz = 2.0 * zz - 1.0;
+                    (*complexU)(iz, iy, ix) = rrr * PHComplex(cos(theta), sin(theta)) * zz;
+
+                    theta = rand()/RDouble(RAND_MAX);
+                    theta = 2.0 * pi * theta;
+                    zz = rand()/RDouble(RAND_MAX);
+                    zz = 2.0 * zz - 1.0;
+                    (*complexV)(iz, iy, ix) = rrr * PHComplex(cos(theta), sin(theta)) * zz;
+
+                    theta = rand()/RDouble(RAND_MAX);
+                    theta = 2.0 * pi * theta;
+                    zz = rand()/RDouble(RAND_MAX);
+                    zz = 2.0 * zz - 1.0;
+                    (*complexW)(iz, iy, ix) = rrr * PHComplex(cos(theta), sin(theta)) * zz;
+                }
+                else
+                {
+                    continue;
+                }
+            }// !for iz
+        }// !for iy
+    }// !for ix
+
+    if( rrrmax > 1.0/nXZ )
+    {
+        (*complexU)(I, J, K) = (*complexU)(I, J, K) / rrrmax * 1.0 / static_cast<RDouble>(nXZ);
+        (*complexV)(I, J, K) = (*complexV)(I, J, K) / rrrmax * 1.0 / static_cast<RDouble>(nXZ);
+        (*complexW)(I, J, K) = (*complexW)(I, J, K) / rrrmax * 1.0 / static_cast<RDouble>(nXZ);
+    }
+
+    // !filtering the fields:
+    for(int ix = kst; ix <= ked; ++ix)
+    {
+        for(int iy = jst; iy <= jed; ++iy)
+        {
+            (*cfu)(I) = (*complexU)(I, iy, ix);
+            (*cfv)(I) = (*complexV)(I, iy, ix);
+            (*cfw)(I) = (*complexW)(I, iy, ix);
+            (*cfp)(I) = (*complexP)(I, iy, ix);
+            for(int iz = ist + 1; iz <= ied - 1; ++iz)
+            {
+                (*complexU)(iz, iy, ix) = ( (*cfu)(iz - 1) + (*cfu)(iz + 1) ) / 6.0 + 2.0 * (*cfu)(iz) / 3.0;
+                (*complexV)(iz, iy, ix) = ( (*cfv)(iz - 1) + (*cfv)(iz + 1) ) / 6.0 + 2.0 * (*cfv)(iz) / 3.0;
+                (*complexW)(iz, iy, ix) = ( (*cfw)(iz - 1) + (*cfw)(iz + 1) ) / 6.0 + 2.0 * (*cfw)(iz) / 3.0;
+                (*complexP)(iz, iy, ix) = ( (*cfp)(iz - 1) + (*cfp)(iz + 1) ) / 6.0 + 2.0 * (*cfp)(iz) / 3.0;
+            }
+        }
+    }
+
+    //! clearing (0,0) mode:
+    //int x0Fall = GridData -> x0Fall;
+    //int y0Fall = GridData -> y0Fall;
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int jStartFourierIndexGlobal = GridData -> jStartFourierIndexGlobal;
+    if( (kst == kStartFourierIndexGlobal) && (jst == jStartFourierIndexGlobal) )
+    {
+        (*complexU)(I, jst, kst) = PHComplex(0.0, 0.0);
+        (*complexV)(I, jst, kst) = PHComplex(0.0, 0.0);
+        (*complexW)(I, jst, kst) = PHComplex(0.0, 0.0);
+        (*complexP)(I, jst, kst) = PHComplex(0.0, 0.0);
+    }
+
+    // !vanishing velocity on walls:
+    (*complexU)(ist, J, K) = PHComplex(0.0, 0.0);
+    (*complexV)(ist, J, K) = PHComplex(0.0, 0.0);
+    (*complexW)(ist, J, K) = PHComplex(0.0, 0.0);
+
+    (*complexU)(ied, J, K) = PHComplex(0.0, 0.0);
+    (*complexV)(ied, J, K) = PHComplex(0.0, 0.0);
+    (*complexW)(ied, J, K) = PHComplex(0.0, 0.0);
+
+    // !cu(iz,jst,kst) = cmplx(uavg,0)
+    if( (jst == jStartFourierIndexGlobal) && (kst == kStartFourierIndexGlobal) )
+    {
+        for( int iz = ist; iz <= ied; ++iz )
+        {
+            (*complexP)(iz, jst, kst) = PHComplex(0.0, 0.0);
+            (*complexU)(iz, jst, kst) = PHComplex((*uAvg)(iz), 0.0);
+        }
+    }
+
+    RescaleVelocityField(0);
+
+    delete uAvg; uAvg = NULL;
+    delete cfu; cfu = NULL;
+    delete cfv; cfv = NULL;
+    delete cfw; cfw = NULL;
+    delete cfp; cfp = NULL;
+}
+
+void SpecDiffHybSolver::InitFromOldField()
+{
+    ReadinVelocityRestartFile();
+
+    int iVortProjection = GlobalDataBase::GetIntParaFromDB("iVortProjection");
+    if( iVortProjection == 0 )
+    {
+        ReadinPressureRestartFile();
+    }
+    else
+    {
+        return;
+    }
+}
+
+void SpecDiffHybSolver::OutputFieldRestartFile()
+{
+    Param_SpecDiffHybSolver *parameters = GetControlParameters();
+    int intervalStepFlow = parameters->GetIntervalStepFlow();
+
+    int nstep = GlobalDataBase::GetIntParaFromDB("nstep");
+    
+    int nTwrest = nstep / intervalStepFlow;
+
+    string velocityFileName = "Velocity.rsta";
+    string pressureFileName = "Pressure.rsta";
+    if( nTwrest % 2 == 0 )
+    {
+        velocityFileName = velocityBackupFile;
+        pressureFileName = pressureBackupFile;
+    }
+    else
+    {
+        velocityFileName = velocityRestartFile;
+        pressureFileName = pressureRestartFile;
+    }
+
+    WriteVelocityRestartFile(velocityFileName);
+
+    int iVortProjection = GlobalDataBase::GetIntParaFromDB("iVortProjection");
+    if(iVortProjection == 0)
+    {
+        WritePressureRestartFile(pressureFileName);
+    }
+}
+
+void SpecDiffHybSolver::GetAssumedSpectrum( const double kt, const double rd, double &ek )
+{
+    const RDouble p0 = 2.0;
+    const RDouble cL = 6.78;
+    const RDouble beta = 5.2;
+    const RDouble ceta = 0.4;
+
+    RDouble kd = kt*rd;
+    RDouble kL = kt * 3.0;
+
+    Param_SpecDiffHybSolver *parameters = GetControlParameters();
+    RDouble reynolds = parameters->GetRefReNumber();
+
+    RDouble keta = kt / (0.1 * reynolds);
+
+    RDouble ekInertia = pow(kd, -5.0/3.0);
+    RDouble ekL = pow(kL / sqrt(kL * kL + cL), 5.0/3.0 + p0);
+    RDouble ekEpsilon = exp( -beta * ( pow(pow(keta, 4.0) + pow(ceta, 4.0), 0.25) - ceta ) );
+
+    ek = ekEpsilon * ekL * ekInertia;
+}
+
+void SpecDiffHybSolver::GetAssumedSpectrumNearWall( const double kt, const double rd, double &ek )
+{
+    const RDouble beta = 5.2;
+    
+    Param_SpecDiffHybSolver *parameters = GetControlParameters();
+    RDouble reynolds = parameters->GetRefReNumber();
+
+    RDouble rdplus = rd * reynolds;
+    RDouble keta = kt / (0.1 * rdplus); 
+
+    RDouble ekEpsilon = exp( -beta * keta );
+    ek = pow(0.5, ekEpsilon);
+}
+
+void SpecDiffHybSolver::ReadinVelocityRestartFile()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    fstream velocityFile;
+    ios_base::openmode openMode = ios_base::in | ios_base::binary;
+    PHSPACE::OpenFile(velocityFile, velocityRestartFile.c_str(), openMode);
+
+    int inttmp[5];
+    PHRead(velocityFile, inttmp, 5);
+
+    int nout = (iedf - istf + 1) * (jedf - jstf + 1) * (kedf - kstf + 1);
+
+    PHRead(velocityFile, &(*complexU)(istf, jstf, kstf), nout);
+    PHRead(velocityFile, &(*complexV)(istf, jstf, kstf), nout);
+    PHRead(velocityFile, &(*complexW)(istf, jstf, kstf), nout);
+
+    PHSPACE::CloseFile(velocityFile);
+    /*
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    fstream file;
+    file.open(velocityRestartFile.c_str(),ios_base::in|ios_base::binary);
+    if ( !file )
+    {
+        TK_Exit::FileOpenErrorExit(velocityRestartFile);
+    }
+
+    int inttmp[5];
+    file.read(reinterpret_cast<char*>(inttmp), 5*sizeof(int));
+    int nin = (iedf - istf + 1) * (jedf - jstf + 1) * (kedf - kstf + 1);
+    file.read(reinterpret_cast<char*>(&(*complexU)(istf, jstf, kstf)), nin*sizeof(PHComplex));
+    file.read(reinterpret_cast<char*>(&(*complexV)(istf, jstf, kstf)), nin*sizeof(PHComplex));
+    file.read(reinterpret_cast<char*>(&(*complexW)(istf, jstf, kstf)), nin*sizeof(PHComplex));
+    file.close();
+    file.clear();
+    */
+}
+
+void SpecDiffHybSolver::ReadinPressureRestartFile()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    fstream pressureFile;
+    ios_base::openmode openMode = ios_base::in | ios_base::binary;
+    PHSPACE::OpenFile(pressureFile, pressureRestartFile.c_str(), openMode);
+
+    int inttmp[5];
+    PHRead(pressureFile, inttmp, 5);
+
+    int nout = (iedf - istf + 1) * (jedf - jstf + 1) * (kedf - kstf + 1);
+
+    PHRead(pressureFile, &(*complexP)(istf, jstf, kstf), nout);
+
+    PHSPACE::CloseFile(pressureFile);
+
+    /*
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    fstream file;
+    file.open(pressureRestartFile.c_str(),ios_base::in|ios_base::binary);
+    if ( !file )
+    {
+        TK_Exit::FileOpenErrorExit(pressureRestartFile);
+    }
+
+    int inttmp[5];
+    file.read(reinterpret_cast<char*>(inttmp), 5*sizeof(int));
+    int nin = (iedf - istf + 1) * (jedf - jstf + 1) * (kedf - kstf + 1);
+    file.read(reinterpret_cast<char*>(&(*complexP)(istf, jstf, kstf)), nin*sizeof(PHComplex));
+    file.close();
+    file.clear();
+    */
+}
+
+void SpecDiffHybSolver::WriteVelocityRestartFile(string velocityFileName)
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    Int1D *fourierIndexSize = GridData -> fourierIndexSize;
+
+    fstream velocityFile;
+    ios_base::openmode openMode = ios_base::out | ios_base::binary;
+    PHSPACE::OpenFile(velocityFile, velocityFileName.c_str(), openMode);
+
+    int inttmp = 1;
+    PHWrite(velocityFile, inttmp);
+
+    PHWrite(velocityFile, &(*fourierIndexSize)(1), 3);
+
+    inttmp = 3;
+    PHWrite(velocityFile, inttmp);
+
+    int nout = (iedf - istf + 1) * (jedf - jstf + 1) * (kedf - kstf + 1);
+
+    PHWrite(velocityFile, &(*complexU)(istf, jstf, kstf), nout);
+    PHWrite(velocityFile, &(*complexV)(istf, jstf, kstf), nout);
+    PHWrite(velocityFile, &(*complexW)(istf, jstf, kstf), nout);
+
+    PHSPACE::CloseFile(velocityFile);
+
+    /*
+    file.open(velocityFileName.c_str(), ios_base::out|ios_base::binary);
+    if ( !file )
+    {
+        TK_Exit::FileOpenErrorExit(velocityFileName);
+    }
+
+    int inttmp = 1;
+    file.write(reinterpret_cast<char*>(&inttmp), sizeof(int));
+    inttmp = 3;
+    Int1D *fourierIndexSize = GridData -> fourierIndexSize;
+    file.write(reinterpret_cast<char*>(&(*fourierIndexSize)(1)), 3*sizeof(int));
+    file.write(reinterpret_cast<char*>(&inttmp), sizeof(int));
+    int nout = (iedf - istf + 1) * (jedf - jstf + 1) * (kedf - kstf + 1);
+    file.write(reinterpret_cast<char*>(&(*complexU)(istf, jstf, kstf)), nout*sizeof(PHComplex));
+    file.write(reinterpret_cast<char*>(&(*complexV)(istf, jstf, kstf)), nout*sizeof(PHComplex));
+    file.write(reinterpret_cast<char*>(&(*complexW)(istf, jstf, kstf)), nout*sizeof(PHComplex));
+    file.close();
+    file.clear();
+    */
+}
+
+void SpecDiffHybSolver::WriteVelocityRestartFile_HDF5(string velocityFileName)
+{
+    ActionKey *actkeyDumpVelocityRestartData = new ActionKey();
+
+    FillActionKey(actkeyDumpVelocityRestartData, DUMP_RESTART, 0);
+
+    actkeyDumpVelocityRestartData->filename = velocityFileName;
+    if (actkeyDumpVelocityRestartData->filename == "")
+    {
+        return;
+    }
+
+    hid_t file;
+    file = CreateHDF5File(actkeyDumpVelocityRestartData->filename);
+    actkeyDumpVelocityRestartData->filepos = file;
+
+    CreateH5VelocityRestartFile(actkeyDumpVelocityRestartData);
+
+    DumpVelocityRestartH5(actkeyDumpVelocityRestartData);
+
+    H5Fclose(file);
+    actkeyDumpVelocityRestartData->filepos = 0;
+
+    delete actkeyDumpVelocityRestartData;
+}
+
+void SpecDiffHybSolver::ReadVelocityRestartFile_HDF5(string velocityFileName)
+{
+    ActionKey *actkeyReadVelocityRestartData = new ActionKey();
+
+    FillActionKey(actkeyReadVelocityRestartData, DUMP_RESTART, 0);
+
+    actkeyReadVelocityRestartData->filename = velocityFileName;
+    if (actkeyReadVelocityRestartData->filename == "")
+    {
+        return;
+    }
+
+    hid_t file;
+    file = CreateHDF5File(actkeyReadVelocityRestartData->filename);
+    actkeyReadVelocityRestartData->filepos = file;
+
+    ReadVelocityRestartH5(actkeyReadVelocityRestartData);
+
+    H5Fclose(file);
+    actkeyReadVelocityRestartData->filepos = 0;
+
+    delete actkeyReadVelocityRestartData;
+}
+
+void SpecDiffHybSolver::ReadVelocityRestartH5(ActionKey *actkey)
+{
+    PHComplex a = PHComplex(0.0, 0.0);
+
+    ReadData(actkey->filepos, &a, "a");
+}
+
+void SpecDiffHybSolver::WritePressureRestartFile(string pressureFileName)
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    Int1D *fourierIndexSize = GridData -> fourierIndexSize;
+
+    fstream pressureFile;
+    ios_base::openmode openMode = ios_base::out | ios_base::binary;
+    PHSPACE::OpenFile(pressureFile, pressureFileName.c_str(), openMode);
+
+    int inttmp = 1;
+    PHWrite(pressureFile, inttmp);
+
+    PHWrite(pressureFile, &(*fourierIndexSize)(1), 3);
+
+    PHWrite(pressureFile, inttmp);
+
+    int nout = (iedf - istf + 1) * (jedf - jstf + 1) * (kedf - kstf + 1);
+
+    PHWrite(pressureFile, &(*complexP)(istf, jstf, kstf), nout);
+
+    PHSPACE::CloseFile(pressureFile);
+
+    /*
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    fstream file;
+    file.open(pressureFileName.c_str(), ios_base::out|ios_base::binary);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(pressureFileName);
+    }
+
+    int inttmp = 1;
+    file.write(reinterpret_cast<char*>(&inttmp), sizeof(int));
+    Int1D *fourierIndexSize = GridData -> fourierIndexSize;
+    file.write(reinterpret_cast<char*>(&(*fourierIndexSize)(1)), 3*sizeof(int));
+    file.write(reinterpret_cast<char*>(&inttmp), sizeof(int));
+    int nout = (iedf - istf + 1) * (jedf - jstf + 1) * (kedf - kstf + 1);
+    file.write(reinterpret_cast<char*>(&(*complexP)(istf, jstf, kstf)), nout*sizeof(PHComplex));
+    file.close();
+    file.clear();
+    */
+}
+
+void SpecDiffHybSolver::CreateH5VelocityRestartFile(ActionKey *actkey)
+{
+}
+
+void SpecDiffHybSolver::DumpVelocityRestartH5(ActionKey *actkey)
+{
+}
+
+void SpecDiffHybSolver::GetRHS()
+{
+    GetVelocityGradient();
+    GetNonlinearTerm();
+
+    int iVortProjection = GlobalDataBase::GetIntParaFromDB("iVortProjection");
+
+    Param_SpecDiffHybSolver * parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    if( (viscousType > 0) || (iVortProjection !=0 ) )
+    {
+        GetViscousTerm();
+    }		
+}
+
+void SpecDiffHybSolver::Solve()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    Param_SpecDiffHybSolver *parameters = GetControlParameters();
+    RDouble timeStep = parameters->GetTimeStep();
+    RDouble pressureGradient = parameters->GetPressureGradient();
+    RDouble reynolds = parameters->GetRefReNumber();
+
+    const PHComplex cZero = PHComplex(0.0, 0.0);
+    const PHComplex cOne = PHComplex(1.0, 0.0);
+    const PHComplex cOneI = PHComplex(0.0, 1.0);
+
+    RDouble2D *coef_LHS = CompactDifferenceSecondDerivativeData -> lHSCoefMatrix;
+    RDouble2D *coef_RHS = CompactDifferenceSecondDerivativeData -> rHSCoefMatrix;
+    Int1D *lowerBound = CompactDifferenceSecondDerivativeData -> lowerBoundofRHSCoefMatrix;
+    Int1D *upperBound = CompactDifferenceSecondDerivativeData -> upperBoundofRHSCoefMatrix;
+    RDouble4D *coefVelocity = PoissonSolverData -> coefMatrixVelocityDirichlet;
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex  ;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex  ;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex  ;
+    int nSolve = iedf - istf;
+    Range IF(istf, iedf);
+    
+    RDouble1D *realPHI = new RDouble1D(IF , fortranArray);
+    (*realPHI)(IF) = 2.0 * reynolds/( 1.0 + (*realnut)(IF) );
+
+    Complex1D *complexULocal = new Complex1D(IF , fortranArray);
+    Complex1D *complexVLocal = new Complex1D(IF , fortranArray);
+    Complex1D *complexWLocal = new Complex1D(IF , fortranArray);
+    Complex1D *complexPLocal = new Complex1D(IF , fortranArray);
+    Complex1D *cR = new Complex1D(IF, fortranArray);
+    RDouble2D *rC = new RDouble2D(IF, Range(-2, 2), fortranArray);
+    RDouble1D *realKX = GridData -> realKX;
+    RDouble1D *realKY = GridData -> realKY;
+    Complex1D *complexKX = GridData -> complexKX;
+    Complex1D *complexKY = GridData -> complexKY;
+    //int x0Fall = GridData -> x0Fall;
+    //int y0Fall = GridData -> y0Fall;
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int jStartFourierIndexGlobal = GridData -> jStartFourierIndexGlobal;
+
+    if( (kstf == kStartFourierIndexGlobal) && (jstf == jStartFourierIndexGlobal) )
+    {
+        int imode00fix = GlobalDataBase::GetIntParaFromDB("imode00fix");
+        if( imode00fix > 0 )
+        {
+            (*realPHI)(IF) = 2.0 * reynolds/( 1.0 + (*realnut_00)(IF) );
+        }
+
+        int ix = kstf;
+        int iy = jstf;
+        RDouble kxx = (*realKX)(ix);
+        RDouble kyy = (*realKY)(iy);
+        RDouble k2  = kxx * kxx + kyy * kyy;
+
+        for( int iz = istf; iz <= iedf; ++iz )
+        {
+            (*complexULocal)(iz) = -(*complexNonlinearTerm)(iz, iy, ix, 1) - PHComplex(pressureGradient, 0.0) + (*complexViscousTerm)(iz, iy, ix, 1);
+        }
+        (*complexP)(IF, iy, ix) = cZero;
+
+        PoissonSolver::PoissonSolverVelocity( nSolve, &(*coef_LHS)(istf+1, -2), &(*complexULocal)(istf), &(*lowerBound)(istf+1), &(*upperBound)(istf+1), cZero, cZero, &(*realPHI)(istf), 
+            &(*coefVelocity)(istf, -2, iy, ix), &(*cR)(istf) );
+
+        (*complexULocal)(IF) = (*complexU)(IF, iy, ix) + (*complexULocal)(IF);
+
+        (*complexU)(IF, iy ,ix) = (*complexULocal)(IF);
+        (*complexV)(IF, iy ,ix) = cZero;
+        (*complexW)(IF, iy ,ix) = cZero;
+    }
+
+    (*realPHI)(IF) = 2.0 * reynolds/( 1.0 + (*realnut)(IF) );
+
+    RDouble1D *detaDz = GridData -> realDetaDz;
+
+    int nBoundary_Neumann = DiffBoundaryData -> nBoundary_Neumann;
+
+    RDouble4D *coefMatrixPressureNeumann = PoissonSolverData -> coefMatrixPressureNeumann;
+    RDouble4D *boundaryMatrixPressureNeumann = PoissonSolverData -> boundaryMatrixPressureNeumann;
+
+    Complex3D *complexDeltaU1 = CorrectWallDivergenceData -> complexDeltaU1;
+    Complex3D *complexDeltaU2 = CorrectWallDivergenceData -> complexDeltaU2;
+    Complex3D *complexDeltaV1 = CorrectWallDivergenceData -> complexDeltaV1;
+    Complex3D *complexDeltaV2 = CorrectWallDivergenceData -> complexDeltaV2;
+    Complex3D *complexDeltaW1 = CorrectWallDivergenceData -> complexDeltaW1;
+    Complex3D *complexDeltaW2 = CorrectWallDivergenceData -> complexDeltaW2;
+    Complex3D *complexDeltaP1 = CorrectWallDivergenceData -> complexDeltaP1;
+    Complex3D *complexDeltaP2 = CorrectWallDivergenceData -> complexDeltaP2;
+    Complex2D *complexDivDeltaU1LowerBound = CorrectWallDivergenceData -> complexDivDeltaU1LowerBound;
+    Complex2D *complexDivDeltaU1UpperBound = CorrectWallDivergenceData -> complexDivDeltaU1UpperBound;
+    Complex2D *complexDivDeltaU2LowerBound = CorrectWallDivergenceData -> complexDivDeltaU2LowerBound;
+    Complex2D *complexDivDeltaU2UpperBound = CorrectWallDivergenceData -> complexDivDeltaU2UpperBound;
+
+    Complex1D *dVardZ = new Complex1D(IF, fortranArray);
+    Complex1D *omegaZ = new Complex1D(IF, fortranArray);
+    Complex1D *deltaPressure = new Complex1D(IF, fortranArray);
+    Complex1D *divergenceOfUStar = new Complex1D(IF, fortranArray);        
+    for( int ix = kstf; ix <= kedf; ++ix )
+    {
+        for( int iy = jstf; iy <= jedf; ++iy )
+        {
+            RDouble kxx = (*realKX)(ix);
+            RDouble kyy = (*realKY)(iy);
+            RDouble k2  = kxx * kxx + kyy * kyy;
+            PHComplex ckx = (*complexKX)(ix);
+            PHComplex cky = (*complexKY)(iy);
+
+            if( k2 < TINY )
+            {
+                continue;
+            }
+
+            // ! Nyquist wavenumbers:
+            RDouble realKNyquistY = GridData -> realKNyquistY;
+            RDouble realKNyquistX = GridData -> realKNyquistX;
+            if( (abs(kyy) == abs(realKNyquistY)) || (abs(kxx) == abs(realKNyquistX)) )
+            {
+                (*complexP)(IF, iy, ix) = cZero;
+                (*complexU)(IF, iy ,ix) = cZero;
+                (*complexV)(IF, iy, ix) = cZero;
+                (*complexW)(IF, iy, ix) = cZero;
+                continue;
+            }
+
+            (*complexPLocal)(IF) = (*complexP)(IF, iy ,ix);
+            CompactDifferenceFirstDerivativeData -> GetDvarDz( istf, iedf, &(*detaDz)(istf), &(*complexPLocal)(istf), &(*dVardZ)(istf), &(*cR)(istf), &(*rC)(istf, -2) );
+
+            for( int iz = istf; iz <= iedf; ++iz)
+            {
+                (*complexULocal)(iz) = -(*complexNonlinearTerm)(iz, iy, ix, 1) - ckx * (*complexPLocal)(iz) + (*complexViscousTerm)(iz, iy ,ix, 1);
+                (*complexVLocal)(iz) = -(*complexNonlinearTerm)(iz, iy, ix, 2) - cky * (*complexPLocal)(iz) + (*complexViscousTerm)(iz, iy ,ix, 2);
+                (*complexWLocal)(iz) = -(*complexNonlinearTerm)(iz, iy, ix, 3) - (*dVardZ)(iz) + (*complexViscousTerm)(iz, iy ,ix, 3);
+            }
+
+            PoissonSolver::PoissonSolverVelocity( nSolve, &(*coef_LHS)(istf+1, -2), &(*complexULocal)(istf), &(*lowerBound)(istf+1), &(*upperBound)(istf+1), cZero, cZero, &(*realPHI)(istf), 
+                &(*coefVelocity)(istf, -2, iy, ix), &(*cR)(istf) );
+            PoissonSolver::PoissonSolverVelocity( nSolve, &(*coef_LHS)(istf+1, -2), &(*complexVLocal)(istf), &(*lowerBound)(istf+1), &(*upperBound)(istf+1), cZero, cZero, &(*realPHI)(istf), 
+                &(*coefVelocity)(istf, -2, iy, ix), &(*cR)(istf) );
+            PoissonSolver::PoissonSolverVelocity( nSolve, &(*coef_LHS)(istf+1, -2), &(*complexWLocal)(istf), &(*lowerBound)(istf+1), &(*upperBound)(istf+1), cZero, cZero, &(*realPHI)(istf), 
+                &(*coefVelocity)(istf, -2, iy, ix), &(*cR)(istf) );
+
+            (*complexULocal)(IF) = (*complexU)(IF, iy, ix) + (*complexULocal)(IF);
+            (*complexVLocal)(IF) = (*complexV)(IF, iy, ix) + (*complexVLocal)(IF);
+            (*complexWLocal)(IF) = (*complexW)(IF, iy, ix) + (*complexWLocal)(IF);
+
+            for( int iz = istf; iz <= iedf; ++iz )
+            {
+                (*divergenceOfUStar)(iz) = ckx * (*complexULocal)(iz) + cky * (*complexVLocal)(iz);
+            }
+            CompactDifferenceFirstDerivativeData -> GetDvarDz( istf, iedf, &(*detaDz)(istf), &(*complexWLocal)(istf), &(*dVardZ)(istf), &(*cR)(istf), &(*rC)(istf, -2) );
+            (*divergenceOfUStar)(IF) = (*divergenceOfUStar)(IF) + (*dVardZ)(IF);
+            (*deltaPressure)(IF) = (*divergenceOfUStar)(IF) / timeStep;
+
+            PoissonSolverData -> PoissonSolverNeumannBC( nSolve, &(*coef_LHS)(istf+1, -2), &(*deltaPressure)(istf), &(*lowerBound)(istf+1), &(*upperBound)(istf+1), nBoundary_Neumann, cZero, cZero, 
+                &(*cR)(istf), &(*coefMatrixPressureNeumann)(istf, -2, iy, ix), &(*boundaryMatrixPressureNeumann)(1, 1, iy, ix) );
+
+            CompactDifferenceFirstDerivativeData -> GetDvarDz( istf, iedf, &(*detaDz)(istf), &(*deltaPressure)(istf), &(*dVardZ)(istf), &(*cR)(istf), &(*rC)(istf, -2) );
+            for( int iz = istf; iz <= iedf; ++iz )
+            {
+                (*complexWLocal)(iz) = (*complexWLocal)(iz) - timeStep * (*dVardZ)(iz);
+            }
+
+            (*complexWLocal)(istf) = cZero;
+            (*complexWLocal)(iedf) = cZero;
+
+            CompactDifferenceFirstDerivativeData -> GetDvarDz( istf, iedf, &(*detaDz)(istf), &(*complexWLocal)(istf), &(*dVardZ)(istf), &(*cR)(istf), &(*rC)(istf, -2) );
+
+            for( int iz = istf; iz <= iedf; ++iz )
+            {
+                (*omegaZ)(iz) = kyy * (*complexULocal)(iz) - kxx * (*complexVLocal)(iz);
+                (*complexULocal)(iz) = ( cOneI * kxx * (*dVardZ)(iz) + kyy * (*omegaZ)(iz) ) / k2;
+                (*complexVLocal)(iz) = ( cOneI * kyy * (*dVardZ)(iz) - kxx * (*omegaZ)(iz) ) / k2;
+            }
+            (*complexULocal)(istf) = cZero;
+            (*complexULocal)(iedf) = cZero;
+            (*complexVLocal)(istf) = cZero;
+            (*complexVLocal)(iedf) = cZero;
+
+            (*complexPLocal)(IF) = (*complexPLocal)(IF) + (*deltaPressure)(IF) - 1.0 / (*realPHI)(IF) * (*divergenceOfUStar)(IF);
+
+            PHComplex dWdZLowerBound = (*dVardZ)(istf);
+            PHComplex dWdZUpperBound = (*dVardZ)(iedf);
+            PHComplex divOfDeltaU1LowerBound = (*complexDivDeltaU1LowerBound)(iy ,ix);
+            PHComplex divOfDeltaU1UpperBound = (*complexDivDeltaU1UpperBound)(iy ,ix);
+            PHComplex divOfDeltaU2LowerBound = (*complexDivDeltaU2LowerBound)(iy ,ix);
+            PHComplex divOfDeltaU2UpperBound = (*complexDivDeltaU2UpperBound)(iy ,ix);
+
+            PHComplex c1 = (dWdZUpperBound * divOfDeltaU2LowerBound - dWdZLowerBound * divOfDeltaU2UpperBound) 
+                / (divOfDeltaU2UpperBound * divOfDeltaU1LowerBound - divOfDeltaU2LowerBound * divOfDeltaU1UpperBound);
+            PHComplex c2 = (dWdZLowerBound * divOfDeltaU1UpperBound - dWdZUpperBound * divOfDeltaU1LowerBound) 
+                / (divOfDeltaU2UpperBound * divOfDeltaU1LowerBound - divOfDeltaU2LowerBound * divOfDeltaU1UpperBound);
+
+            for( int iz = istf; iz <= iedf; ++iz )
+            {
+                (*complexULocal)(iz) = (*complexULocal)(iz) + c1 * (*complexDeltaU1)(iz, iy ,ix) + c2 * (*complexDeltaU2)(iz, iy ,ix);
+                (*complexVLocal)(iz) = (*complexVLocal)(iz) + c1 * (*complexDeltaV1)(iz, iy ,ix) + c2 * (*complexDeltaV2)(iz, iy ,ix);
+                (*complexWLocal)(iz) = (*complexWLocal)(iz) + c1 * (*complexDeltaW1)(iz, iy ,ix) + c2 * (*complexDeltaW2)(iz, iy ,ix);
+                (*complexPLocal)(iz) = (*complexPLocal)(iz) + c1 * (*complexDeltaP1)(iz, iy ,ix) + c2 * (*complexDeltaP2)(iz, iy ,ix);
+            }
+
+            (*complexU)(IF, iy, ix) = (*complexULocal)(IF);
+            (*complexV)(IF, iy, ix) = (*complexVLocal)(IF);
+            (*complexW)(IF, iy, ix) = (*complexWLocal)(IF);
+            (*complexP)(IF, iy, ix) = (*complexPLocal)(IF);                            
+        }
+    }
+
+    delete realPHI; realPHI = NULL;
+    delete complexULocal; complexULocal = NULL;
+    delete complexVLocal; complexVLocal = NULL;
+    delete complexWLocal; complexWLocal = NULL;
+    delete complexPLocal; complexPLocal = NULL;
+    delete cR; cR = NULL;
+    delete rC; rC = NULL;
+    delete dVardZ; dVardZ = NULL;
+    delete deltaPressure; deltaPressure = NULL;
+    delete divergenceOfUStar; divergenceOfUStar = NULL;
+    delete omegaZ; omegaZ = NULL;
+}
+
+void SpecDiffHybSolver::GetVelocityGradient()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    int ist = GridData -> iStartFourierIndex;
+    int jst = GridData -> jStartFourierIndex;
+    int kst = GridData -> kStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex;
+    int jed = GridData -> jEndFourierIndex;
+    int ked = GridData -> kEndFourierIndex;
+
+    Complex1D *varTemp = new Complex1D( Range(ist, ied), fortranArray );
+    Complex1D *dvarTemp = new Complex1D( Range(ist, ied), fortranArray );
+    Complex1D *workSpace1 = new Complex1D( Range(ist, ied), fortranArray );
+    RDouble1D *workSpace2 = new RDouble1D( Range(ist, ied), fortranArray );
+
+    CompactDifferenceFirstDerivativeData -> GetGradientVector( &(*complexU)(ist, jst, kst), &(*complexVelocityGradient)(ist, jst, kst, 1), &(*complexVelocityGradient)(ist, jst, kst, 2), 
+        &(*complexVelocityGradient)(ist, jst, kst, 3), varTemp, dvarTemp, workSpace1, workSpace2, GridData );
+    CompactDifferenceFirstDerivativeData -> GetGradientVector( &(*complexV)(ist, jst, kst), &(*complexVelocityGradient)(ist, jst, kst, 4), &(*complexVelocityGradient)(ist, jst, kst, 5), 
+        &(*complexVelocityGradient)(ist, jst, kst, 6), varTemp, dvarTemp, workSpace1, workSpace2, GridData );
+    CompactDifferenceFirstDerivativeData -> GetGradientVector( &(*complexW)(ist, jst, kst), &(*complexVelocityGradient)(ist, jst, kst, 7), &(*complexVelocityGradient)(ist, jst, kst, 8), 
+        &(*complexVelocityGradient)(ist, jst, kst, 9), varTemp, dvarTemp, workSpace1, workSpace2, GridData );
+
+    delete varTemp; varTemp = NULL;
+    delete dvarTemp; dvarTemp = NULL;
+    delete workSpace1; workSpace1 = NULL;
+    delete workSpace2; workSpace2 = NULL;
+}
+
+void SpecDiffHybSolver::GetNonlinearTerm()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+    LES *LESData = GetLESData();
+
+    Param_SpecDiffHybSolver *parameters = GetControlParameters();
+    RDouble reynolds = parameters->GetRefReNumber();
+    int viscousType = parameters->GetViscousType();
+    string viscousName = parameters->GetViscousName();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex  ;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex  ;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+    Range IF(istf, iedf);
+    Range JF(jstf, jedf);
+    Range KF(kstf, kedf);
+
+    int istp = GridData -> iStartPhysicalIndex;
+    int iedp = GridData -> iEndPhysicalIndex  ;
+    int jstp = GridData -> jStartPhysicalIndex;
+    int jedp = GridData -> jEndPhysicalIndex  ;
+    int kstp = GridData -> kStartPhysicalIndex;
+    int kedp = GridData -> kEndPhysicalIndex  ;
+    Range IP(istp, iedp);
+    Range JP(jstp, jedp);
+    Range KP(kstp, kedp);
+
+    int nXYAll = GridData -> nXYAll;
+    RDouble dnXYAll = 1.0 / static_cast<double>(nXYAll);
+
+    (*complexVelocityGradient)(IF, JF, KF, 10) = (*complexU)(IF, JF, KF);
+    (*complexVelocityGradient)(IF, JF, KF, 11) = (*complexV)(IF, JF, KF);
+    (*complexVelocityGradient)(IF, JF, KF, 12) = (*complexW)(IF, JF, KF);
+    int nXYZFourier = GridData -> nXYZFourier;
+    int nXYZPhysical = GridData -> nXYZPhysical;
+
+    unsigned char opc2r[] = "nff";
+    Cp3dfft_btran_c2r_many(reinterpret_cast<double*>(&(*complexVelocityGradient)(istf, jstf, kstf, 1)), nXYZFourier, &(*realVelocityGradient)(istp, jstp, kstp, 1), nXYZPhysical, 12, opc2r);
+
+    (*realVelocitySquare)(IP, JP, KP, 1) = (*realVelocityGradient)(IP, JP, KP, 10) * (*realVelocityGradient)(IP, JP, KP, 10); // u*u
+    (*realVelocitySquare)(IP, JP, KP, 2) = (*realVelocityGradient)(IP, JP, KP, 11) * (*realVelocityGradient)(IP, JP, KP, 10); // v*u
+    (*realVelocitySquare)(IP, JP, KP, 3) = (*realVelocityGradient)(IP, JP, KP, 12) * (*realVelocityGradient)(IP, JP, KP, 10); // w*u
+
+    (*realVelocitySquare)(IP, JP, KP, 4) = (*realVelocityGradient)(IP, JP, KP, 10) * (*realVelocityGradient)(IP, JP, KP, 11); // u*v
+    (*realVelocitySquare)(IP, JP, KP, 5) = (*realVelocityGradient)(IP, JP, KP, 11) * (*realVelocityGradient)(IP, JP, KP, 11); // v*v
+    (*realVelocitySquare)(IP, JP, KP, 6) = (*realVelocityGradient)(IP, JP, KP, 12) * (*realVelocityGradient)(IP, JP, KP, 11); // w*v
+
+    (*realVelocitySquare)(IP, JP, KP, 7) = (*realVelocityGradient)(IP, JP, KP, 10) * (*realVelocityGradient)(IP, JP, KP, 12); // u*w
+    (*realVelocitySquare)(IP, JP, KP, 8) = (*realVelocityGradient)(IP, JP, KP, 11) * (*realVelocityGradient)(IP, JP, KP, 12); // v*w
+    (*realVelocitySquare)(IP, JP, KP, 9) = (*realVelocityGradient)(IP, JP, KP, 12) * (*realVelocityGradient)(IP, JP, KP, 12); // w*w
+
+    (*realVelocitySquare)(IP, JP, KP, 10) = (*realVelocityGradient)(IP, JP, KP, 10) * (*realVelocityGradient)(IP, JP, KP, 1)
+        + (*realVelocityGradient)(IP, JP, KP, 11) * (*realVelocityGradient)(IP, JP, KP, 2)
+        + (*realVelocityGradient)(IP, JP, KP, 12) * (*realVelocityGradient)(IP, JP, KP, 3); // u*du/dx + v*du/dy +w*du/dz
+    (*realVelocitySquare)(IP, JP, KP, 11) = (*realVelocityGradient)(IP, JP, KP, 10) * (*realVelocityGradient)(IP, JP, KP, 4)
+        + (*realVelocityGradient)(IP, JP, KP, 11) * (*realVelocityGradient)(IP, JP, KP, 5)
+        + (*realVelocityGradient)(IP, JP, KP, 12) * (*realVelocityGradient)(IP, JP, KP, 6); // u*dv/dx + v*dv/dy +w*dv/dz
+    (*realVelocitySquare)(IP, JP, KP, 12) = (*realVelocityGradient)(IP, JP, KP, 10) * (*realVelocityGradient)(IP, JP, KP, 7)
+        + (*realVelocityGradient)(IP, JP, KP, 11) * (*realVelocityGradient)(IP, JP, KP, 8)
+        + (*realVelocityGradient)(IP, JP, KP, 12) * (*realVelocityGradient)(IP, JP, KP, 9); // u*dw/dx + v*dw/dy +w*dw/dz
+
+    unsigned char opr2c[] = "ffn";
+    Cp3dfft_ftran_r2c_many(&(*realVelocitySquare)(istp, jstp, kstp, 1), nXYZPhysical, reinterpret_cast<double*>(&(*complexVelocitySquare)(istf, jstf, kstf, 1)), nXYZFourier, 12, opr2c);
+    (*complexVelocitySquare)(IF, JF, KF, Range(1, 12)) = (*complexVelocitySquare)(IF, JF, KF, Range(1, 12)) * dnXYAll;
+
+    Complex3D *complexDivergenceOfVelocitySquare = new Complex3D(IF, JF, KF, fortranArray);
+    Complex1D *varTemp = new Complex1D(IF, fortranArray);
+    Complex1D *dVarTemp = new Complex1D(IF, fortranArray);
+    Complex3D *dVardZ = new Complex3D(IF, JF, KF, fortranArray); 
+    Complex1D *workSpace1 = new Complex1D(IF, fortranArray);
+    RDouble1D *workSpace2 = new RDouble1D(IF, fortranArray);
+    Complex4D *convectiveTermTemp = new Complex4D(IF, JF, KF, Range(1, 3), fortranArray);
+
+    // ! 0.5*[ vec{u}\dot\grad(u) + \nabla\dot(\vec{u}u) ]
+    CompactDifferenceFirstDerivativeData -> GetDivergence( &(*complexVelocitySquare)(istf, jstf, kstf, 1), &(*complexVelocitySquare)(istf, jstf, kstf, 2), &(*complexVelocitySquare)(istf, jstf, kstf, 3),
+        complexDivergenceOfVelocitySquare, varTemp, dVarTemp, dVardZ, workSpace1, workSpace2, GridData );
+    (*convectiveTermTemp)(IF, JF, KF, 1) = 0.5 * ( (*complexVelocitySquare)(IF, JF, KF, 10) + (*complexDivergenceOfVelocitySquare)(IF, JF, KF) );
+
+    CompactDifferenceFirstDerivativeData -> GetDivergence( &(*complexVelocitySquare)(istf, jstf, kstf, 4), &(*complexVelocitySquare)(istf, jstf, kstf, 5), &(*complexVelocitySquare)(istf, jstf, kstf, 6),
+        complexDivergenceOfVelocitySquare, varTemp, dVarTemp, dVardZ, workSpace1, workSpace2, GridData );
+    (*convectiveTermTemp)(IF, JF, KF, 2) = 0.5 * ( (*complexVelocitySquare)(IF, JF, KF, 11) + (*complexDivergenceOfVelocitySquare)(IF, JF, KF) );
+
+    CompactDifferenceFirstDerivativeData -> GetDivergence( &(*complexVelocitySquare)(istf, jstf, kstf, 7), &(*complexVelocitySquare)(istf, jstf, kstf, 8), &(*complexVelocitySquare)(istf, jstf, kstf, 9),
+        complexDivergenceOfVelocitySquare, varTemp, dVarTemp, dVardZ, workSpace1, workSpace2, GridData );
+    (*convectiveTermTemp)(IF, JF, KF, 3) = 0.5 * ( (*complexVelocitySquare)(IF, JF, KF, 12) + (*complexDivergenceOfVelocitySquare)(IF, JF, KF) );
+
+    if (viscousType <= 1)
+    {
+        (*realnut)(IF) = 0.0;
+        (*realnut_00)(IF) = 0.0;
+    }
+    else
+    {
+        if(viscousName.substr(0, 11) == "Smagorinsky")
+        {
+            LESData -> Smagorinsky(GridData, realnut, realVelocityGradient);
+            PoissonSolverData -> GetCoefMatrixVelocityDirichlet(GridData, DiffBoundaryData, CompactDifferenceSecondDerivativeData, realnut, realnut_00);
+        }
+        else if(viscousName.substr(0, 11) == "DynamicSmag")
+        {
+            LESData -> DynamicSmagorinsky(GridData, CompactDifferenceFirstDerivativeData, realnut, realnut3d, realVelocityGradient, complexU, complexV, complexW);
+            PoissonSolverData -> GetCoefMatrixVelocityDirichlet(GridData, DiffBoundaryData, CompactDifferenceSecondDerivativeData, realnut, realnut_00);
+        }
+        else if(viscousName.substr(0, 5) == "Sigma")
+        {
+            LESData -> Sigma(GridData, realnut, realVelocityGradient);
+            PoissonSolverData -> GetCoefMatrixVelocityDirichlet(GridData, DiffBoundaryData, CompactDifferenceSecondDerivativeData, realnut, realnut_00);
+        }
+        else
+        {
+            TK_Exit::UnexpectedVarValue("viscousName", viscousName);
+        }
+    }
+
+    mode00fix();
+
+    if(viscousType > 1)
+    {
+        int inutxyavg = GlobalDataBase::GetIntParaFromDB("inutxyavg");
+        if(inutxyavg ==0 || inutxyavg ==1)
+        {
+            Complex4D *complexDiffTau = LESData -> complexDiffTau;
+            (*convectiveTermTemp)(IF, JF, KF, Range(1, 3)) = (*convectiveTermTemp)(IF, JF, KF, Range(1, 3)) + (*complexDiffTau)(IF, JF, KF, Range(1, 3));
+        }
+
+        if(inutxyavg == 1 || inutxyavg ==2)
+        {
+            RDouble1D *detaDz = GridData -> realDetaDz;
+            RDouble1D *dnutdz = new RDouble1D(IF, fortranArray);
+            RDouble1D *workSpace3 = new RDouble1D(IF, fortranArray);
+            CompactDifferenceFirstDerivativeData -> GetDvarDz(istf, iedf, &(*detaDz)(istf), &(*realnut)(istf), &(*dnutdz)(istf), &(*workSpace2)(istf), &(*workSpace3)(istf));
+
+            for(int iz = istf; iz <= iedf; ++iz)
+            {
+                for(int iy = jstf; iy <= jedf; ++iy)
+                {
+                    for(int ix = kstf; ix <= kedf; ++ix)
+                    {
+                        (*convectiveTermTemp)(iz, iy, ix, 1) = (*convectiveTermTemp)(iz, iy, ix, 1) 
+                            - (*dnutdz)(iz) / reynolds * ( (*complexVelocityGradient)(iz, iy, ix, 3) + (*complexVelocityGradient)(iz, iy, ix, 7) );
+                        (*convectiveTermTemp)(iz, iy, ix, 2) = (*convectiveTermTemp)(iz, iy, ix, 2) 
+                            - (*dnutdz)(iz) / reynolds * ( (*complexVelocityGradient)(iz, iy, ix, 6) + (*complexVelocityGradient)(iz, iy, ix, 8) );
+                        (*convectiveTermTemp)(iz, iy, ix, 3) = (*convectiveTermTemp)(iz, iy, ix, 3) 
+                            - (*dnutdz)(iz) / reynolds * ( 2.0 * (*complexVelocityGradient)(iz, iy, ix, 9) );
+                    }
+                }
+            }
+
+            int imode00fix = GlobalDataBase::GetIntParaFromDB("imode00fix");
+            using namespace PHMPI;
+            int myid = GetCurrentProcessorID();
+            if((imode00fix > 0) && (myid ==0))
+            {
+                CompactDifferenceFirstDerivativeData -> GetDvarDz(istf, iedf, &(*detaDz)(istf), &(*realnut_00)(istf), &(*dnutdz)(istf), &(*workSpace2)(istf), &(*workSpace3)(istf));
+
+                int iy = jstf;
+                int ix = kstf;
+                for(int iz = istf; iz <= iedf; ++iz)
+                {
+                    (*convectiveTermTemp)(iz, iy, ix, 1) = (*convectiveTermTemp)(iz, iy, ix, 1) 
+                        - (*dnutdz)(iz) / reynolds * ( (*complexVelocityGradient)(iz, iy, ix, 3) + (*complexVelocityGradient)(iz, iy, ix, 7) );
+                    (*convectiveTermTemp)(iz, iy, ix, 2) = (*convectiveTermTemp)(iz, iy, ix, 2) 
+                        - (*dnutdz)(iz) / reynolds * ( (*complexVelocityGradient)(iz, iy, ix, 6) + (*complexVelocityGradient)(iz, iy, ix, 8) );
+                    (*convectiveTermTemp)(iz, iy, ix, 3) = (*convectiveTermTemp)(iz, iy, ix, 3) 
+                        - (*dnutdz)(iz) / reynolds * ( 2.0 * (*complexVelocityGradient)(iz, iy, ix, 9) );
+                }
+            }
+
+            delete dnutdz; dnutdz = NULL;
+            delete workSpace3; workSpace3 = NULL;
+        }
+    }
+
+    (*complexNonlinearTerm)(IF, JF, KF, Range(1, 3)) = (*nonlinearTermCoef)(0) * (*convectiveTermTemp)(IF, JF, KF, Range(1, 3)) + (*nonlinearTermCoef)(-1) * (*convectiveTerm)(IF, JF, KF, Range(1, 3));
+    (*convectiveTerm)(IF, JF, KF, Range(1, 3)) = (*convectiveTermTemp)(IF, JF, KF, Range(1, 3));
+
+    delete complexDivergenceOfVelocitySquare; complexDivergenceOfVelocitySquare = NULL;
+    delete varTemp; varTemp = NULL;
+    delete dVarTemp; dVarTemp = NULL;
+    delete dVardZ; dVardZ = NULL;
+    delete workSpace1; workSpace1 = NULL;
+    delete workSpace2; workSpace2 = NULL;
+    delete convectiveTermTemp; convectiveTermTemp = NULL;
+}
+
+void SpecDiffHybSolver::mode00fix()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    Range IF(istf, iedf);
+
+    int imode00fix = GlobalDataBase::GetIntParaFromDB("imode00fix");
+    if(imode00fix == 0)
+    {
+        (*realnut_00)(IF) = (*realnut)(IF);
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("imode00fix", imode00fix);
+    }
+}
+
+/*
+void SpecDiffHybSolver::OutputFieldName()
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    SpecDiffHybGrid *GridData = GetGrid();
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+    if(myid != procIDWithKx0Ky0)
+    {
+        return;
+    }
+
+    fstream file;
+    file.open(fieldNameFile.c_str(), ios_base::out);
+    if(!file)
+    {
+        TK_Exit::FileOpenErrorExit(fieldNameFile);
+    }
+    file << "p\n"
+         << "u;velocity\n"
+         << "v\n"
+         << "w\n";
+    file.close();
+    file.clear();
+}
+*/
+
+void SpecDiffHybSolver::GetViscousTerm()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+    Range IF(istf, iedf);
+    Range JF(jstf, jedf);
+    Range KF(kstf, kedf);
+
+    Complex1D *c1tmp = new Complex1D(IF, fortranArray);
+    Complex1D *c2tmp = new Complex1D(IF, fortranArray);
+    Complex3D *c3tmp = new Complex3D(IF, JF, KF, fortranArray);
+    Complex3D *cLap_u = new Complex3D(IF, JF, KF, fortranArray);
+    Complex3D *cLap_v = new Complex3D(IF, JF, KF, fortranArray);
+    Complex3D *cLap_w = new Complex3D(IF, JF, KF, fortranArray);
+
+    CompactDifferenceSecondDerivativeData -> GetLaplacian(GridData, complexU, cLap_u, c1tmp, c2tmp, c3tmp);
+    CompactDifferenceSecondDerivativeData -> GetLaplacian(GridData, complexV, cLap_v, c1tmp, c2tmp, c3tmp);
+    CompactDifferenceSecondDerivativeData -> GetLaplacian(GridData, complexW, cLap_w, c1tmp, c2tmp, c3tmp);
+
+    for(int iz = istf; iz <= iedf; ++iz)
+    {
+        (*complexViscousTerm)(iz, JF, KF, 1) = (1.0 + (*realnut)(iz)) * (*cLap_u)(iz, JF, KF);
+        (*complexViscousTerm)(iz, JF, KF, 2) = (1.0 + (*realnut)(iz)) * (*cLap_v)(iz, JF, KF);
+        (*complexViscousTerm)(iz, JF, KF, 3) = (1.0 + (*realnut)(iz)) * (*cLap_w)(iz, JF, KF);
+    }
+
+    int imode00fix = GlobalDataBase::GetIntParaFromDB("imode00fix");
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if((imode00fix > 0) && (myid ==0))
+    {
+        for(int iz = istf; iz <= iedf; ++iz)
+        {
+            (*complexViscousTerm)(iz, jstf, kstf, 1) = (1.0 + (*realnut)(iz)) * (*cLap_u)(iz, jstf, kstf);
+            (*complexViscousTerm)(iz, jstf, kstf, 2) = (1.0 + (*realnut)(iz)) * (*cLap_v)(iz, jstf, kstf);
+            (*complexViscousTerm)(iz, jstf, kstf, 3) = (1.0 + (*realnut)(iz)) * (*cLap_w)(iz, jstf, kstf);
+        }
+    }
+
+    Param_SpecDiffHybSolver *parameters = GetControlParameters();
+    RDouble reynolds = parameters->GetRefReNumber();
+
+    (*complexViscousTerm)(IF, JF, KF, Range(1, 3)) = (*complexViscousTerm)(IF, JF, KF, Range(1, 3))/reynolds;
+
+    delete c1tmp; c1tmp = NULL;
+    delete c2tmp; c2tmp = NULL;
+    delete c3tmp; c3tmp = NULL;
+    delete cLap_u; cLap_u = NULL;
+    delete cLap_v; cLap_v = NULL;
+    delete cLap_w; cLap_w = NULL;
+}
+
+void SpecDiffHybSolver::VanishingDIVproj()
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+    Range IF(istf, iedf);
+
+    RDouble2D *rC = new RDouble2D(IF, Range(-2, 2), fortranArray);
+    Complex1D *c1 = new Complex1D(IF, fortranArray);
+    Complex1D *c2 = new Complex1D(IF, fortranArray);
+    Complex1D *cu_star = new Complex1D(IF, fortranArray);
+    Complex1D *cv_star = new Complex1D(IF, fortranArray);
+    Complex1D *cw_star = new Complex1D(IF, fortranArray);
+    Complex1D *cu_new = new Complex1D(IF, fortranArray);
+    Complex1D *cv_new = new Complex1D(IF, fortranArray);
+    Complex1D *cw_new = new Complex1D(IF, fortranArray);
+    Complex1D *cdudz_star = new Complex1D(IF, fortranArray);
+    Complex1D *cdvdz_star = new Complex1D(IF, fortranArray);
+    Complex1D *cdwdz = new Complex1D(IF, fortranArray);
+    Complex1D *comega_x = new Complex1D(IF, fortranArray);
+    Complex1D *comega_y = new Complex1D(IF, fortranArray);
+    Complex1D *cR = new Complex1D(IF, fortranArray);
+
+    //OutputFieldRestartFile(0);
+
+    const PHComplex cZero = PHComplex(0.0, 0.0);
+    const PHComplex cOne = PHComplex(1.0, 0.0);
+    int nSolve = iedf - istf;
+
+    RDouble1D *realKX = GridData -> realKX;
+    RDouble1D *realKY = GridData -> realKY;
+    Complex1D *complexKX = GridData -> complexKX;
+    Complex1D *complexKY = GridData -> complexKY;
+    RDouble1D *detaDz = GridData -> realDetaDz;
+
+    RDouble2D *coef_LHS = CompactDifferenceSecondDerivativeData -> lHSCoefMatrix;
+    RDouble2D *coef_RHS = CompactDifferenceSecondDerivativeData -> rHSCoefMatrix;
+    Int1D *lowerBound = CompactDifferenceSecondDerivativeData -> lowerBoundofRHSCoefMatrix;
+    Int1D *upperBound = CompactDifferenceSecondDerivativeData -> upperBoundofRHSCoefMatrix;
+
+    Complex2D *complexDivDeltaU1LowerBound = CorrectWallDivergenceData -> complexDivDeltaU1LowerBound;
+    Complex2D *complexDivDeltaU1UpperBound = CorrectWallDivergenceData -> complexDivDeltaU1UpperBound;
+    Complex2D *complexDivDeltaU2LowerBound = CorrectWallDivergenceData -> complexDivDeltaU2LowerBound;
+    Complex2D *complexDivDeltaU2UpperBound = CorrectWallDivergenceData -> complexDivDeltaU2UpperBound;
+    Complex3D *complexDeltaU1 = CorrectWallDivergenceData -> complexDeltaU1;
+    Complex3D *complexDeltaV1 = CorrectWallDivergenceData -> complexDeltaV1;
+    Complex3D *complexDeltaW1 = CorrectWallDivergenceData -> complexDeltaW1;
+    Complex3D *complexDeltaU2 = CorrectWallDivergenceData -> complexDeltaU2;
+    Complex3D *complexDeltaV2 = CorrectWallDivergenceData -> complexDeltaV2;
+    Complex3D *complexDeltaW2 = CorrectWallDivergenceData -> complexDeltaW2;
+
+    for(int ix = kstf; ix <= kedf; ++ix)
+    {
+        for(int iy = jstf; iy <= jedf; ++iy)
+        {
+            double rkx = (*realKX)(ix);
+            double rky = (*realKY)(iy);
+            PHComplex ckx = (*complexKX)(ix);
+            PHComplex cky = (*complexKY)(iy);
+            double k2  = rkx * rkx + rky * rky;
+
+            if(k2 < TINY)
+            {
+                continue;
+            }
+
+            (*cu_star)(IF) = (*complexU)(IF, iy, ix);
+            (*cv_star)(IF) = (*complexV)(IF, iy, ix);
+            (*cw_star)(IF) = (*complexW)(IF, iy, ix);
+            CompactDifferenceFirstDerivativeData -> GetDvarDz(istf, iedf, &(*detaDz)(istf), &(*cu_star)(istf), &(*cdudz_star)(istf), &(*cR)(istf), &(*rC)(istf, -2));
+            CompactDifferenceFirstDerivativeData -> GetDvarDz(istf, iedf, &(*detaDz)(istf), &(*cv_star)(istf), &(*cdvdz_star)(istf), &(*cR)(istf), &(*rC)(istf, -2));
+            for(int iz = istf; iz <= iedf; ++iz)
+            {
+                (*comega_x)(iz) = cky * (*cw_star)(iz) - (*cdvdz_star)(iz);
+                (*comega_y)(iz) = -ckx * (*cw_star)(iz) + (*cdudz_star)(iz);
+                (*cw_new)(iz) = cky * (*comega_x)(iz) - ckx * (*comega_y)(iz);
+            }
+
+            PoissonSolver::PoissonSolverDirichletBC(nSolve, &(*coef_LHS)(istf+1, -2), &(*coef_RHS)(istf+1, -2), &(*cw_new)(istf), k2, &(*lowerBound)(istf+1), &(*upperBound)(istf+1),
+                cZero, cZero, &(*rC)(istf, -2), &(*cR)(istf));
+
+            (*cw_new)(istf) = cZero;
+            (*cw_new)(iedf) = cZero;
+            CorrectWallDivergenceData -> rotProjection();
+
+            (*cu_new)(istf) = cZero;
+            (*cv_new)(istf) = cZero;
+            (*cu_new)(iedf) = cZero;
+            (*cv_new)(iedf) = cZero;
+
+            PHComplex cmDIVp = -(*cdwdz)(iedf);
+            PHComplex cmDIVm = -(*cdwdz)(istf);
+            PHComplex cdd = (*complexDivDeltaU1UpperBound)(iy, ix) * (*complexDivDeltaU2LowerBound)(iy, ix) - (*complexDivDeltaU1LowerBound)(iy, ix) * (*complexDivDeltaU2UpperBound)(iy, ix);
+            PHComplex cb1 = ( cmDIVp * (*complexDivDeltaU2LowerBound)(iy, ix) - cmDIVm * (*complexDivDeltaU2UpperBound)(iy, ix)) / cdd;
+            PHComplex cb2 = (-cmDIVp * (*complexDivDeltaU1LowerBound)(iy, ix) + cmDIVm * (*complexDivDeltaU1UpperBound)(iy, ix)) / cdd;
+
+            for(int iz = istf; iz <= iedf; ++iz)
+            {
+                (*cu_new)(iz) = (*cu_new)(iz) + cb1 * (*complexDeltaU1)(iz, iy, ix) + cb2 * (*complexDeltaU2)(iz, iy, ix);
+                (*cv_new)(iz) = (*cv_new)(iz) + cb1 * (*complexDeltaV1)(iz, iy, ix) + cb2 * (*complexDeltaV2)(iz, iy, ix);
+                (*cw_new)(iz) = (*cw_new)(iz) + cb1 * (*complexDeltaW1)(iz, iy, ix) + cb2 * (*complexDeltaW2)(iz, iy, ix);
+            }
+        }
+    }
+
+    //OutputFieldRestartFile(10);
+
+    delete rC; rC = NULL;
+    delete c1; c1 = NULL;
+    delete c2; c2 = NULL;
+    delete cu_star; cu_star = NULL;
+    delete cv_star; cv_star = NULL;
+    delete cw_star; cw_star = NULL;
+    delete cu_new; cu_new = NULL;
+    delete cv_new; cv_new = NULL;
+    delete cw_new; cw_new = NULL;
+    delete cdudz_star; cdudz_star = NULL;
+    delete cdvdz_star; cdvdz_star = NULL;
+    delete cdwdz; cdwdz = NULL;
+    delete comega_x; comega_x = NULL;
+    delete comega_y; comega_y = NULL;
+    delete cR; cR = NULL;
+}
+
+void SpecDiffHybSolver::RescaleVelocityField(const int nstep)
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+    RescaleField *RescaleFieldData = GetRescaleFieldData();
+
+    int nRescaleFluctuation = GlobalDataBase::GetIntParaFromDB("nRescaleFluctuation");
+    int nRescaleUAverage = GlobalDataBase::GetIntParaFromDB("nRescaleUAverage");
+    int nFixUAverage = GlobalDataBase::GetIntParaFromDB("nFixUAverage");
+
+    if( (nstep < nRescaleFluctuation) || (nstep < nRescaleUAverage) )
+    {
+        RescaleFieldData -> GetUVWMagnitude(GridData, complexU, complexV, complexW);
+    }
+
+    if(nstep < nRescaleFluctuation)
+    {
+        RescaleFieldData -> RescaleFluctuation(GridData, complexU, complexV, complexW);
+    }
+
+    if(nstep < nRescaleUAverage)
+    {
+        RescaleFieldData -> RescaleUAverage(GridData, complexU);
+    }
+
+    if( (nFixUAverage < 0) || (nstep < nFixUAverage) )
+    {
+        RescaleFieldData -> FixUAverage(GridData, complexU);
+    }
+}
+
+void SpecDiffHybSolver::GetStatistics()
+{
+    Param_SpecDiffHybSolver *parameters = GetControlParameters();
+    RDouble reynolds = parameters->GetRefReNumber();
+    int statisticMethod = parameters->GetStatisticMethod();
+    int viscousType = parameters->GetViscousType();
+    RDouble timeStep = parameters->GetTimeStep();
+
+    int nStatisticalStep = GlobalDataBase::GetIntParaFromDB("nStatisticalStep");
+    ++ nStatisticalStep;
+    GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+
+    SpecDiffHybGrid *GridData = GetGrid();
+    Statistics *StatisticData = GetStatisticData();
+
+    StatisticData -> GetStatisticsLocal(GridData, complexU, complexV, complexW, complexVelocityGradient);
+
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int jStartFourierIndexGlobal = GridData -> jStartFourierIndexGlobal;
+    int kEndFourierIndexGlobal = GridData -> kEndFourierIndexGlobal;
+    int jEndFourierIndexGlobal = GridData -> jEndFourierIndexGlobal;
+
+    Range I(istf, iedf);
+    Range J(jstf, jedf);
+    Range K(kstf, kedf);
+    Range XN(kStartFourierIndexGlobal, kEndFourierIndexGlobal);
+    Range YN(jStartFourierIndexGlobal, jEndFourierIndexGlobal);
+    Range N19(1, 19);
+    Range N9(1, 9);
+    Range N3(1, 3);
+
+    RDouble2D *statisticLocal = StatisticData -> statisticLocal;
+    RDouble2D *statisticAll = StatisticData -> statisticAll;
+
+    (*statisticAll)(I, N19) = (*statisticLocal)(I, N19);
+
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+
+#ifdef PH_PARALLEL
+    int nstat = 19 * (iedf - istf + 1);
+    MPI_Reduce(&(*statisticLocal)(istf, 1), &(*statisticAll)(istf, 1), nstat, MPI_DOUBLE, MPI_SUM, procIDWithKx0Ky0, MPI_COMM_WORLD);
+#endif
+
+    RDouble3D *energyOfUUKxAll = StatisticData -> energyOfUUKxAll;
+    RDouble3D *energyOfUUKyAll = StatisticData -> energyOfUUKyAll;
+    RDouble3D *energyOfUUKxLocal = StatisticData -> energyOfUUKxLocal;
+    RDouble3D *energyOfUUKyLocal = StatisticData -> energyOfUUKyLocal;
+    Int2D *startAndEndFourierIndexOfAll = GridData -> startAndEndFourierIndexOfAll;
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int nTProcessor = GetNumberOfProcessor();   
+
+#ifdef PH_PARALLEL
+    if(myid == 0)
+    {
+#endif
+        (*energyOfUUKxAll)(I, XN, N3) = 0.0;
+        (*energyOfUUKxAll)(I, K, N3) = (*energyOfUUKxLocal)(I, K, N3);
+
+#ifdef PH_PARALLEL
+        RDouble3D *energyOfUUKxTmp = new RDouble3D(I, XN, N3, fortranArray);
+        for(int ip = 1; ip <= (nTProcessor - 1); ++ip)
+        {
+            int kstf_ip = (*startAndEndFourierIndexOfAll)(3, ip);
+            int kedf_ip = (*startAndEndFourierIndexOfAll)(6, ip);
+            int nenergy = (kedf_ip - kstf_ip + 1) * (iedf - istf + 1);
+            (*energyOfUUKxTmp)(I, XN, N3) = 0.0;
+
+            for(int in = 1; in <= 3; ++in)
+            {
+                MPI_Status status;
+                MPI_Recv(&(*energyOfUUKxTmp)(istf, kstf_ip, in), nenergy, MPI_DOUBLE, ip, ip, MPI_COMM_WORLD, &status);
+                (*energyOfUUKxAll)(I, Range(kstf_ip, kedf_ip), in) = (*energyOfUUKxAll)(I, Range(kstf_ip, kedf_ip), in) + (*energyOfUUKxTmp)(I, Range(kstf_ip, kedf_ip), in);
+            }   
+        }
+
+        delete energyOfUUKxTmp; energyOfUUKxTmp = NULL;
+    }
+    else
+    {
+        int nenergy = (kedf - kstf + 1) * (iedf - istf + 1);
+        for(int in = 1; in <= 3; ++in)
+        {
+            MPI_Send(&(*energyOfUUKxLocal)(istf, kstf, in), nenergy,  MPI_DOUBLE, 0, myid, MPI_COMM_WORLD);
+        }
+    }
+#endif
+
+#ifdef PH_PARALLEL
+    if(myid == 0)
+    {
+#endif
+        (*energyOfUUKyAll)(I, YN, N3) = 0.0;
+        (*energyOfUUKyAll)(I, J, N3) = (*energyOfUUKyLocal)(I, J, N3);
+
+#ifdef PH_PARALLEL
+        RDouble3D *energyOfUUKyTmp = new RDouble3D(I, YN, N3, fortranArray);
+        for(int ip = 1; ip <= (nTProcessor - 1); ++ip)
+        {
+            int jstf_ip = (*startAndEndFourierIndexOfAll)(2, ip);
+            int jedf_ip = (*startAndEndFourierIndexOfAll)(5, ip);
+            int nenergy = (jedf_ip - jstf_ip + 1) * (iedf - istf + 1);
+            (*energyOfUUKyTmp)(I, YN, N3) = 0.0;
+
+            for(int in = 1; in <= 3; ++in)
+            {
+                MPI_Status status;
+                MPI_Recv(&(*energyOfUUKyTmp)(istf, jstf_ip, in), nenergy, MPI_DOUBLE, ip, ip, MPI_COMM_WORLD, &status);
+                (*energyOfUUKyAll)(I, Range(jstf_ip, jedf_ip), in) = (*energyOfUUKyAll)(I, Range(jstf_ip, jedf_ip), in) + (*energyOfUUKyTmp)(I, Range(jstf_ip, jedf_ip), in);
+            }      
+        }
+
+        delete energyOfUUKyTmp; energyOfUUKyTmp = NULL;
+    }
+    else
+    {
+        int nenergy = (jedf - jstf + 1) * (iedf - istf + 1);
+        for(int in = 1; in <= 3; ++in)
+        {
+            MPI_Send(&(*energyOfUUKyLocal)(istf, jstf, in), nenergy,  MPI_DOUBLE, 0, myid, MPI_COMM_WORLD);
+        }   
+    }
+#endif
+
+    if(myid != procIDWithKx0Ky0)
+    {
+        return;
+    }
+
+    int innz = iedf - istf + 1;
+    int iz_half = StatisticData -> iz_half;
+    Range IHalf(istf, iz_half);
+    //RDouble2D *epsilonXYZTime = new RDouble2D(IHalf, N9, fortranArray);
+    RDouble2D *statisticTime = new RDouble2D(IHalf, N19, fortranArray);
+    RDouble3D *energyOfUUKxT = new RDouble3D(IHalf, XN, N3, fortranArray);
+    RDouble3D *energyOfUUKyTT = new RDouble3D(IHalf, YN, N3, fortranArray);
+    //(*epsilonXYZTime)(IHalf, N9) = 0.0;
+    (*statisticTime)(IHalf, N19) = 0.0;
+    (*energyOfUUKxT)(IHalf, XN, N3) = 0.0;
+    (*energyOfUUKyTT)(IHalf, YN, N3) = 0.0;
+
+    for(int iz = istf; iz <= iz_half; ++iz)
+    {
+        int izup = innz - iz + istf;
+
+        (*statisticTime)(iz, N19) = 0.5 * ((*statisticAll)(iz, N19) + (*statisticAll)(izup, N19));
+
+        (*energyOfUUKxT)(iz, XN, N3) = 0.5 * ((*energyOfUUKxAll)(iz, XN, N3) + (*energyOfUUKxAll)(izup, XN, N3));
+        (*energyOfUUKyTT)(iz, YN, N3) = 0.5 * ((*energyOfUUKyAll)(iz, YN, N3) + (*energyOfUUKyAll)(izup, YN, N3));
+    }
+
+    int nY = GridData -> nY;
+    Range YNHalf(jStartFourierIndexGlobal, nY/2+1);
+    RDouble3D *energyOfUUKyT = new RDouble3D(IHalf, YNHalf, N3, fortranArray);
+    (*energyOfUUKyT)(IHalf, YNHalf, N3) = 0.0;
+    (*energyOfUUKyT)(IHalf, jStartFourierIndexGlobal, N3) = (*energyOfUUKyTT)(IHalf, jStartFourierIndexGlobal, N3);
+    (*energyOfUUKyT)(IHalf, nY/2+1, N3) = (*energyOfUUKyTT)(IHalf, nY/2+1, N3);
+    for(int iy = jStartFourierIndexGlobal+1; iy <= nY/2; ++iy)
+    {
+        (*energyOfUUKyT)(IHalf, iy, N3) = (*energyOfUUKyTT)(IHalf, iy, N3) + (*energyOfUUKyTT)(IHalf, nY - iy + 2, N3);
+    }
+
+    RDouble tavg = GlobalDataBase::GetDoubleParaFromDB("tavg");
+    bool ifInitStatistic = StatisticData -> GetIfInitStatistic();
+    RDouble2D *statistic = StatisticData -> statistic;
+
+    RDouble3D *energyOfUUKx = StatisticData -> energyOfUUKx;
+    RDouble3D *energyOfUUKy = StatisticData -> energyOfUUKy;
+
+    if(statisticMethod == 0)
+    {
+        RDouble dtdtavg = timeStep / tavg;
+        if(ifInitStatistic)
+        {
+            dtdtavg = 1.0;
+        }
+
+        (*statistic)(IHalf, N19) = (1.0 - dtdtavg) * (*statistic)(IHalf, N19) + dtdtavg * (*statisticTime)(IHalf, N19);
+
+        (*energyOfUUKx)(IHalf, XN, N3) = (1.0 - dtdtavg) * (*energyOfUUKx)(IHalf, XN, N3) + dtdtavg * (*energyOfUUKxT)(IHalf, XN, N3);
+        (*energyOfUUKy)(IHalf, YNHalf, N3) = (1.0 - dtdtavg) * (*energyOfUUKy)(IHalf, YNHalf, N3) + dtdtavg * (*energyOfUUKyT)(IHalf, YNHalf, N3);
+
+        RDouble dUdZLowerBound = real((*complexVelocityGradient)(istf, jstf, kstf, 3));
+        RDouble dUdZUpperBound = real((*complexVelocityGradient)(iedf, jstf, kstf, 3));
+        RDouble tauWAverage = StatisticData -> GetTauWAverage();
+        RDouble tauW = 0.5 * ( abs(dUdZLowerBound) +abs(dUdZUpperBound) ) / reynolds;
+        tauWAverage = (1.0 - dtdtavg) * tauWAverage + dtdtavg * tauW;
+        StatisticData->SetTauWAverage(tauWAverage);
+
+        RDouble1D *nutAverage = StatisticData -> nutAverage;
+
+        //int inutavg = StatisticData -> inutavg;
+        if(viscousType > 1)
+        {
+            //if(inutavg == 0 || ifInitStatistic)
+            //{
+            //    (*nutAverage)(I) = (*realnut)(I);
+            //}
+            //else
+            //{
+                (*nutAverage)(I) = (1.0 - dtdtavg) * (*nutAverage)(I) + dtdtavg * (*realnut)(I);
+            //}
+            //inutavg = 1;
+        }
+
+        //if(ifInitStatistic)
+        //{
+        //    ifInitStatistic = false;
+        //    StatisticData->SetIfInitStatistic(ifInitStatistic);
+        //}
+    }
+    else if(statisticMethod == 1)
+    {           
+        //int nStatisticalStep = GlobalDataBase::GetIntParaFromDB("nStatisticalStep");
+
+        RDouble c1 = 1.0 / (nStatisticalStep * 1.0);
+        RDouble c2 = 1.0 - c1;
+
+        (*statistic)(IHalf, N19) = c2 * (*statistic)(IHalf, N19) + c1 * (*statisticTime)(IHalf, N19);
+
+        (*energyOfUUKx)(IHalf, XN, N3) = c2 * (*energyOfUUKx)(IHalf, XN, N3) + c1 * (*energyOfUUKxT)(IHalf, XN, N3);
+        (*energyOfUUKy)(IHalf, YNHalf, N3) = c2 * (*energyOfUUKy)(IHalf, YNHalf, N3) + c1 * (*energyOfUUKyT)(IHalf, YNHalf, N3);
+
+        RDouble dUdZLowerBound = real((*complexVelocityGradient)(istf, jstf, kstf, 3));
+        RDouble dUdZUpperBound = real((*complexVelocityGradient)(iedf, jstf, kstf, 3));
+
+        RDouble tauWAverage = StatisticData -> GetTauWAverage();
+
+        RDouble tauW = 0.5 * ( abs(dUdZLowerBound) +abs(dUdZUpperBound) ) / reynolds;
+
+        tauWAverage = c2 * tauWAverage + c1 * tauW;
+
+        StatisticData->SetTauWAverage(tauWAverage);
+
+        RDouble1D *nutAverage = StatisticData -> nutAverage;
+
+        //int inutavg = StatisticData -> inutavg;
+        if(viscousType > 1)
+        {
+            //if(inutavg == 0 || ifInitStatistic)
+            //{
+            //    (*nutAverage)(I) = (*realnut)(I);
+            //}
+            //else
+            //{
+                (*nutAverage)(I) = c2 * (*nutAverage)(I) + c1 * (*realnut)(I);
+            //}
+            //inutavg = 1;
+        }
+
+        //if(ifInitStatistic)
+        //{
+        //    ifInitStatistic = false;
+        //    StatisticData->SetIfInitStatistic(ifInitStatistic);
+        //}
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("statisticMethod", statisticMethod);
+    }
+
+    delete statisticTime; statisticTime = NULL;
+    delete energyOfUUKxT; energyOfUUKxT = NULL;
+    delete energyOfUUKyTT; energyOfUUKyTT = NULL;
+    delete energyOfUUKyT; energyOfUUKyT = NULL;
+}
+
+/*
+void SpecDiffHybSolver::OutputResidual()
+{
+    //SpecDiffHybGrid *GridData = GetGrid();
+
+    //PrepareResidual(res);
+
+    //string outputdir = "./results";
+    //outputdir = GlobalDataBase::GetStrParaFromDB("outputdir");
+    //string residualFile = outputdir + "/monitor.dat";
+    //string nutFile = outputdir + "/nut.dat";
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex  ;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex  ;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex; 
+    Range I(istf, iedf);
+    Range J(jstf, jedf);
+    Range K(kstf, kedf);
+    (*complexDivergenceU)(I, J, K) = (*complexVelocityGradient)(I, J, K, 1) + (*complexVelocityGradient)(I, J, K, 5) + (*complexVelocityGradient)(I, J, K, 9);
+
+    RDouble1D *rZ = GridData -> realZ;
+    RDouble ub = 0.0;
+    RDouble tauW = 0.0;
+    int procIDWithKx0Ky0 = GridData -> procIDWithKx0Ky0;
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if(myid == procIDWithKx0Ky0)
+    {
+        RDouble1D *uAverage = new RDouble1D(I, fortranArray);
+        for(int iz = istf; iz <= iedf; ++iz)
+        {
+            (*uAverage)(iz) = real((*complexU)(iz, jstf, kstf));
+        }
+
+        RDouble dUdZLowerBound = real((*complexVelocityGradient)(istf, jstf, kstf, 3));
+        RDouble dUdZUpperBound = real((*complexVelocityGradient)(iedf, jstf, kstf, 3));
+
+        tauW = 0.5 * ( abs(dUdZLowerBound) +abs(dUdZUpperBound) ) / reynolds;
+
+        ub = 0.0;
+        for(int iz = (istf+1); iz <= (iedf-1); ++iz)
+        {
+            ub = ub + 0.5 * ((*rZ)(iz+1) - (*rZ)(iz-1)) * (*uAverage)(iz);
+        }
+        ub = ub / ((*rZ)(iedf) - (*rZ)(istf));
+
+        delete uAverage; uAverage = NULL;
+    }
+
+    RDouble1D *kx = GridData -> realKX;
+    RDouble1D *ky = GridData -> realKY;
+    RDouble ek = 0.0;
+    for(int ix = kstf; ix <= kedf; ++ix)
+    {
+        for(int iy = jstf; iy <= jedf; ++iy)
+        {
+            RDouble k2  = (*kx)(ix) * (*kx)(ix) + (*ky)(iy) * (*ky)(iy);
+            if( k2 < TINY)
+            {
+                continue;
+            }
+            for(int iz = (istf+1); iz <= (iedf-1); ++iz)
+            {
+                ek = ek + 2.0 * real( (*complexU)(iz, iy, ix) * conj((*complexU)(iz, iy, ix))
+                    + (*complexV)(iz, iy, ix) * conj((*complexV)(iz, iy, ix))
+                    + (*complexW)(iz, iy, ix) * conj((*complexW)(iz, iy, ix))
+                    );
+            }
+        }// !for iy
+    }// !for ix
+    ek = ek / (iedf - istf - 1);
+
+    RDouble divavg = 0.0;
+    for(int iz = istf; iz <= iedf; ++iz)
+    {
+        RDouble sumDivU = 0.0;
+        for(int ix = kstf; ix <= kedf; ++ix)
+        {
+            for(int iy = jstf; iy <= jedf; ++iy)
+            {
+                sumDivU = sumDivU + real( (*complexDivergenceU)(iz, iy, ix) * conj((*complexDivergenceU)(iz, iy, ix)) );
+            }
+        }
+        divavg = divavg + sqrt(2.0 * sumDivU);
+    }
+    divavg = divavg / (iedf - istf + 1);
+
+#ifdef PH_PARALLEL
+    RDouble1D *wmpiloc = new RDouble1D(Range(1, 2), fortranArray);
+    RDouble1D *wmpi = new RDouble1D(Range(1, 2), fortranArray);
+    (*wmpiloc)(1) = ek;
+    (*wmpiloc)(2) = divavg;
+    MPI_Reduce(&(*wmpiloc)(1), &(*wmpi)(1), 2, MPI_DOUBLE, MPI_SUM, procIDWithKx0Ky0, MPI_COMM_WORLD);
+    ek = (*wmpi)(1);
+    divavg = (*wmpi)(2);
+    delete wmpiloc; wmpiloc = NULL;
+    delete wmpi; wmpi = NULL;
+#endif
+
+
+    //using namespace PHMPI;
+    //int myid = GetCurrentProcessorID();
+    //int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+
+    ActionKey *actkeyDumpResidual = new ActionKey();
+    FillActionKey(actkeyDumpResidual, DUMP_RESIDUAL, 0);
+    DumpRes(actkeyDumpResidual);
+    delete actkeyDumpResidual;
+
+        /*
+        fstream file;
+        file.open(screenOutFile.c_str(), ios_base::out|ios_base::app);
+        file << "\n";
+        file << "-----------------------------------------------------------------------------------------------------\n";
+        file << "nstep = " << nstep << "\n";
+        file << "DIVavg = " << divavg << "\n";
+        file.close();
+        file.clear();
+
+        RDouble tauWAverage = StatisticsData -> tauWAverage;
+
+        int nstart = GlobalDataBase::GetIntParaFromDB("nstart");
+        file.open(residualFile.c_str(), ios_base::in);
+        if ((!file) || (!nstart))
+        {
+            file.open(residualFile.c_str(), ios_base::out|ios_base::trunc);
+            file << "variables= \n";
+            file << "       nstep       time        rDIVavg          rUb            rEk            Tauw            rTauw_avg \n";
+            file << setw(20) << nstep;
+            file << setiosflags(ios::right);
+            file << setprecision(10);
+            file << setiosflags(ios::scientific);
+            file << setiosflags(ios::showpoint);
+            file << setw(20) << static_cast<double>(nstep) * timeStep 
+                << setw(20) << divavg 
+                << setw(20) << ub 
+                << setw(20) << ek 
+                << setw(20) << tauW 
+                << setw(20) << tauWAverage 
+                << "\n";
+            file.close();
+            file.clear();
+        }
+        else
+        {
+            file.close();
+            file.clear();
+            file.open(residualFile.c_str(), ios_base::out|ios_base::app);
+            file << setw(20) << nstep;
+            file << setiosflags(ios::right);
+            file << setprecision(10);
+            file << setiosflags(ios::scientific);
+            file << setiosflags(ios::showpoint);
+            file << setw(20) << static_cast<double>(nstep) * timeStep 
+                << setw(20) << divavg 
+                << setw(20) << ub 
+                << setw(20) << ek 
+                << setw(20) << tauW 
+                << setw(20) << tauWAverage 
+                << "\n";
+            file.close();
+            file.clear();
+        }
+
+        int viscousType = parameters->GetViscousType();
+        if(viscousType > 1)
+        {
+            RDouble1D *nutAverage = StatisticsData -> nutAverage;
+            file.open(nutFile.c_str(), ios_base::out);
+            if ( !file )
+            {
+                TK_Exit::ExceptionExit("could not open nutFile\n");
+            }
+            file << "variables= z, nut, rnut_avg, rnut_00 \n";
+            for(int iz = istf; iz <= iedf; ++iz)
+            {
+                file << setiosflags(ios::right);
+                file << setprecision(10);
+                file << setiosflags(ios::scientific);
+                file << setiosflags(ios::showpoint);
+                file << setw(20) << (*rZ)(iz) << setw(20) << (*realnut)(iz) << setw(20) << (*nutAverage)(iz) << setw(20) << (*realnut_00)(iz) << "\n";
+            }
+        }
+        
+}
+*/
+
+void SpecDiffHybSolver::DumpRes(ActionKey *actkey)
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+
+    string formatRes;
+    PrepareFormatedResidual(formatRes);
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+
+    if(myid != procIDWithKx0Ky0)
+    {
+        return;
+    }
+
+    string resFile = GetResidualFileName();
+    if (resFile == "")
+    {
+        return;
+    }
+
+    actkey->filename = resFile;
+    ios_base::openmode openmode = ios_base::out|ios_base::app;
+    actkey->openmode = openmode;
+
+    if (!actkey->IsNeedOpenFile())
+    {
+        return;
+    }
+
+    ParallelOpenFile(actkey);
+
+    std::ostringstream oss;
+    fstream &file = *(actkey->file);
+
+    if (IfFileEmpty(file))
+    {
+        oss << "Title=\"RES\"" << endl;
+        oss << "Variables=" << endl;
+        oss << "nstep" << endl;
+        oss << "time" << endl;
+        oss << "DIVavg" << endl;
+        oss << "U<sub>b</sub>" << endl;
+        oss << "E<sub>k</sub>" << endl;
+        oss << "<greek>t</greek><sub>w</sub>" << endl;
+        oss << "<greek>t</greek><sub>w_avg</sub>" << endl;
+    }
+
+    oss << formatRes;
+
+    WriteASCIIFile(file, oss.str());
+
+    ParallelCloseFile(actkey);
+}
+
+void SpecDiffHybSolver::PrepareFormatedResidual(string &res)
+{
+    SpecDiffHybGrid *GridData = GetGrid();
+    Statistics *StatisticData = GetStatisticData();
+
+    Param_SpecDiffHybSolver *parameters = GetControlParameters();
+    RDouble reynolds = parameters->GetRefReNumber();
+    RDouble timeStep = parameters->GetTimeStep();
+
+    int nstep = GlobalDataBase::GetIntParaFromDB("nstep");
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex  ;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex  ;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex; 
+    Range I(istf, iedf);
+    Range J(jstf, jedf);
+    Range K(kstf, kedf);
+    (*complexDivergenceU)(I, J, K) = (*complexVelocityGradient)(I, J, K, 1) + (*complexVelocityGradient)(I, J, K, 5) + (*complexVelocityGradient)(I, J, K, 9);
+
+    RDouble1D *rZ = GridData -> realZ;
+    RDouble ub = 0.0;
+    RDouble tauW = 0.0;
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if(myid == procIDWithKx0Ky0)
+    {
+        RDouble1D *uAverage = new RDouble1D(I, fortranArray);
+        for(int iz = istf; iz <= iedf; ++iz)
+        {
+            (*uAverage)(iz) = real((*complexU)(iz, jstf, kstf));
+        }
+
+        RDouble dUdZLowerBound = real((*complexVelocityGradient)(istf, jstf, kstf, 3));
+        RDouble dUdZUpperBound = real((*complexVelocityGradient)(iedf, jstf, kstf, 3));
+
+        tauW = 0.5 * ( abs(dUdZLowerBound) +abs(dUdZUpperBound) ) / reynolds;
+
+        ub = 0.0;
+        for(int iz = (istf+1); iz <= (iedf-1); ++iz)
+        {
+            ub = ub + 0.5 * ((*rZ)(iz+1) - (*rZ)(iz-1)) * (*uAverage)(iz);
+        }
+        ub = ub / ((*rZ)(iedf) - (*rZ)(istf));
+
+        delete uAverage; uAverage = NULL;
+    }
+
+    RDouble1D *kx = GridData -> realKX;
+    RDouble1D *ky = GridData -> realKY;
+    RDouble ek = 0.0;
+    for(int ix = kstf; ix <= kedf; ++ix)
+    {
+        for(int iy = jstf; iy <= jedf; ++iy)
+        {
+            RDouble k2  = (*kx)(ix) * (*kx)(ix) + (*ky)(iy) * (*ky)(iy);
+            if( k2 < TINY)
+            {
+                continue;
+            }
+            for(int iz = (istf+1); iz <= (iedf-1); ++iz)
+            {
+                ek = ek + 2.0 * real( (*complexU)(iz, iy, ix) * conj((*complexU)(iz, iy, ix))
+                    + (*complexV)(iz, iy, ix) * conj((*complexV)(iz, iy, ix))
+                    + (*complexW)(iz, iy, ix) * conj((*complexW)(iz, iy, ix))
+                    );
+            }
+        }// !for iy
+    }// !for ix
+    ek = ek / (iedf - istf - 1);
+
+    RDouble divavg = 0.0;
+    for(int iz = istf; iz <= iedf; ++iz)
+    {
+        RDouble sumDivU = 0.0;
+        for(int ix = kstf; ix <= kedf; ++ix)
+        {
+            for(int iy = jstf; iy <= jedf; ++iy)
+            {
+                sumDivU = sumDivU + real( (*complexDivergenceU)(iz, iy, ix) * conj((*complexDivergenceU)(iz, iy, ix)) );
+            }
+        }
+        divavg = divavg + sqrt(2.0 * sumDivU);
+    }
+    divavg = divavg / (iedf - istf + 1);
+
+#ifdef PH_PARALLEL
+    RDouble1D *wmpiloc = new RDouble1D(Range(1, 2), fortranArray);
+    RDouble1D *wmpi = new RDouble1D(Range(1, 2), fortranArray);
+    (*wmpiloc)(1) = ek;
+    (*wmpiloc)(2) = divavg;
+    MPI_Reduce(&(*wmpiloc)(1), &(*wmpi)(1), 2, MPI_DOUBLE, MPI_SUM, procIDWithKx0Ky0, MPI_COMM_WORLD);
+    ek = (*wmpi)(1);
+    divavg = (*wmpi)(2);
+    delete wmpiloc; wmpiloc = NULL;
+    delete wmpi; wmpi = NULL;
+#endif
+
+    if(myid == procIDWithKx0Ky0)
+    {
+        RDouble tauWAverage = StatisticData -> GetTauWAverage();
+
+        ostringstream oss;
+
+        oss << setiosflags(ios::left);
+        oss << setprecision(10);
+        oss << setiosflags(ios::scientific);
+        oss << setiosflags(ios::showpoint);
+
+        oss << nstep << "    ";
+        oss << static_cast<double>(nstep) * timeStep << "    ";
+        oss << divavg << "    ";
+        oss << ub << "    ";
+        oss << ek << "    ";
+        oss << tauW << "    ";
+        oss << tauWAverage << endl;
+
+        res = oss.str();
+    }
+}
+
+void SpecDiffHybSolver::OutputRestartData()
+{
+    OutputFieldRestartFile();
+
+    OutputOldTimeData();
+
+    StatisticData -> OutputStatisticRestart(GridData);
+}
+
+void SpecDiffHybSolver::OutputStatisticVisual()
+{
+    StatisticData -> OutputStatisticVisual(GridData);
+}
+
+void SpecDiffHybSolver::OutputOldTimeData()
+{
+    Param_SpecDiffHybSolver *parameters = GetControlParameters();
+    int intervalStepFlow = parameters->GetIntervalStepFlow();
+
+    int nstep = GlobalDataBase::GetIntParaFromDB("nstep");
+
+    int inout = nstep / intervalStepFlow;
+
+    string nonlinearTermFileName, pressureGradientTermFileName, laplacianVelocityTermFileName;
+    if(inout % 2  == 0)
+    {
+        nonlinearTermFileName = nonlinearTermBackupFile;
+        pressureGradientTermFileName = pressureGradientTermBackupFile;
+        laplacianVelocityTermFileName = laplacianVelocityTermBackupFile;
+    }
+    else
+    {
+        nonlinearTermFileName = nonlinearTermFile;
+        pressureGradientTermFileName = pressureGradientTermFile;
+        laplacianVelocityTermFileName = laplacianVelocityTermFile;
+    }
+
+    WriteConvectiveTerm(nonlinearTermFileName);
+
+    int iVortProjection = GlobalDataBase::GetIntParaFromDB("iVortProjection");
+    if(iVortProjection != 0)
+    {
+        TK_Exit::UnexpectedVarValue( "iVortProjection", iVortProjection );
+    }
+
+    WriteTimeDependentInformation();
+}
+
+void SpecDiffHybSolver::WriteConvectiveTerm(const string nonlinearTermFileName)
+{
+    //SpecDiffHybGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    Int1D *fourierIndexSize = GridData -> fourierIndexSize;
+
+    fstream file;
+    ios_base::openmode openMode = ios_base::out | ios_base::binary;
+    PHSPACE::OpenFile(file, nonlinearTermFileName.c_str(), openMode);
+
+    int inttmp = 1;
+    PHWrite(file, inttmp);
+
+    PHWrite(file, &(*fourierIndexSize)(1), 3);
+
+    inttmp = 3;
+    PHWrite(file, inttmp);
+
+    int nout = 3 * (iedf - istf + 1) * (jedf - jstf + 1) * (kedf - kstf + 1);
+
+    PHWrite(file, &(*convectiveTerm)(istf, jstf, kstf, 1), nout);
+
+    PHSPACE::CloseFile(file);
+}
+
+void SpecDiffHybSolver::WriteTimeDependentInformation()
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+    if(myid != procIDWithKx0Ky0)
+    {
+        return;
+    }
+
+    int nstep = GlobalDataBase::GetIntParaFromDB("nstep");
+    fstream file;
+    file.open(timeInformationRestartFile.c_str(), ios_base::out);
+    if(!file)
+    {
+        TK_Exit::FileOpenErrorExit(timeInformationRestartFile);
+    }
+    file << setw(20) << nstep;
+    file.close();
+    file.clear();
+}
+
+void SpecDiffHybSolver::DeAllocateGlobalVariables()
+{
+    delete nonlinearTermCoef; nonlinearTermCoef = NULL;
+    delete pressureGradientTermCoef; pressureGradientTermCoef = NULL;
+    delete convectiveTerm; convectiveTerm = NULL;
+    delete complexLaplacianVelocityTerm; complexLaplacianVelocityTerm = NULL;
+    delete complexPressureGradientTerm; complexPressureGradientTerm = NULL;
+
+    delete complexViscousTerm; complexViscousTerm = NULL;
+    delete complexNonlinearTerm; complexNonlinearTerm = NULL;
+    delete complexVelocityGradient; complexVelocityGradient = NULL;
+    delete realVelocityGradient; realVelocityGradient = NULL;
+    delete complexVelocitySquare; complexVelocitySquare = NULL;
+    delete realVelocitySquare; realVelocitySquare = NULL;
+
+    delete complexU; complexU = NULL;
+    delete complexV; complexV = NULL;
+    delete complexW; complexW = NULL;
+    delete complexP; complexP = NULL;
+    delete complexDivergenceU; complexDivergenceU = NULL;
+    delete realnut3d; realnut3d = NULL;
+
+    delete realnut; realnut = NULL;
+    delete realnut_00; realnut_00 = NULL;
+
+    delete GridData; GridData = NULL;
+
+    //delete RescaleFieldData; RescaleFieldData = NULL;
+
+    //delete StatisticData; StatisticData = NULL;
+
+    delete DiffBoundaryData; DiffBoundaryData = NULL;
+
+    delete CompactDifferenceFirstDerivativeData; CompactDifferenceFirstDerivativeData = NULL;
+
+    delete CompactDifferenceSecondDerivativeData; CompactDifferenceSecondDerivativeData = NULL;
+
+    delete PoissonSolverData; PoissonSolverData = NULL;
+
+    delete CorrectWallDivergenceData; CorrectWallDivergenceData = NULL;
+
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    if(viscousType > 1)
+    {
+        delete LESData; LESData = NULL;
+    }
+}
+
+LIB_EXPORT void SpecDiffHybSolver::InitControlParameters()
+{
+    FreeControlParameters();
+    controlParameters = new Param_SpecDiffHybSolver();
+    controlParameters->Init();
+
+    WriteLogFile("Control parameters initialized!\n");
+}
+
+LIB_EXPORT Param_SpecDiffHybSolver * SpecDiffHybSolver::GetControlParameters() const
+{
+    return static_cast <Param_SpecDiffHybSolver *> (controlParameters);
+}
+
+}
\ No newline at end of file
diff --git a/CFD/SpecDiffHybSolver/src/SpecGrid.cpp b/CFD/SpecDiffHybSolver/src/SpecGrid.cpp
new file mode 100644
index 0000000..cc3f7f0
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/src/SpecGrid.cpp
@@ -0,0 +1,355 @@
+#include "TK_Time.h"
+#include "TK_Exit.h"
+#include "PHMpi.h"
+#include "PHHeader.h"
+#include "GlobalDataBase.h"
+#include "Constants.h"
+#include "SpecGrid.h"
+#include "p3dfft.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+SpecGrid::SpecGrid()
+{
+}
+
+SpecGrid::~SpecGrid()
+{
+    delete realKX; realKX = NULL;
+    delete complexKX; complexKX = NULL;
+    delete realKY; realKY = NULL;
+    delete complexKY; complexKY = NULL;
+    delete physicalStartIndex; physicalStartIndex = NULL;
+    delete physicalEndIndex; physicalEndIndex = NULL;
+    delete physicalIndexSize; physicalIndexSize = NULL;
+    delete fourierStartIndex; fourierStartIndex = NULL;
+    delete fourierEndIndex; fourierEndIndex = NULL; 
+    delete fourierIndexSize; fourierIndexSize = NULL;
+    delete dimensionOfP3DFFT; dimensionOfP3DFFT = NULL;
+    delete startAndEndFourierIndexOfAll; startAndEndFourierIndexOfAll = NULL;
+    delete startAndEndPhysicalIndexOfAll; startAndEndPhysicalIndexOfAll = NULL;
+}
+
+void SpecGrid::InitGridData()
+{
+    InitGridSize();
+
+    InitGridFileName();
+
+    AllocGridData();
+
+    InitWavenumber();
+}
+
+void SpecGrid::InitGridSize()
+{
+    procIDWithKx0Ky0 = 0;
+    nX = GlobalDataBase::GetIntParaFromDB("nx");
+    nY = GlobalDataBase::GetIntParaFromDB("ny");
+    nZ = GlobalDataBase::GetIntParaFromDB("nz");
+    nX2 = 3 * nX / 2;
+    nY2 = 3 * nY / 2;
+    nZ2 = 3 * nZ / 2;
+    nXYAll = nX2 * nY2;
+    nXYZAll = nX2 * nY2 * nZ2;
+
+    //		int numberofProcessor = PHMPI::GetNumberOfProcessor();
+    Range I(1, 3);
+    physicalStartIndex = new Int1D(I, fortranArray);
+    physicalEndIndex   = new Int1D(I, fortranArray);
+    physicalIndexSize  = new Int1D(I, fortranArray);
+    fourierStartIndex  = new Int1D(I, fortranArray);
+    fourierEndIndex    = new Int1D(I, fortranArray);
+    fourierIndexSize   = new Int1D(I, fortranArray);
+    dimensionOfP3DFFT  = new Int1D(Range(1, 2), fortranArray);
+    GlobalDataBase::GetData("dimensionOfP3DFFT", &(*dimensionOfP3DFFT)(1), PHINT, 2);
+
+    InitP3DFFT();
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int nTProcessor = GetNumberOfProcessor();
+
+    // !To get startAndEndFourierIndexOfAll, write to griddistribute.dat
+    startAndEndFourierIndexOfAll = new Int2D(Range(1, 6), Range(0, nTProcessor - 1), fortranArray);
+    Int1D *startAndEndFourierIndex = new Int1D(Range(1, 6), fortranArray);
+    (*startAndEndFourierIndex)(I) = (*fourierStartIndex)(I);
+    (*startAndEndFourierIndex)(Range(4, 6)) = (*fourierEndIndex)(I);
+#ifdef PH_PARALLEL
+    MPI_Status status; 
+    if(myid == server)
+    {
+#endif
+        (*startAndEndFourierIndexOfAll)(Range(1, 6), myid) = (*startAndEndFourierIndex)(Range(1, 6));
+#ifdef PH_PARALLEL
+        for(int ip = 1; ip <= nTProcessor - 1; ++ip)
+        {
+            MPI_Recv(&(*startAndEndFourierIndexOfAll)(1, ip), 6, MPI_INTEGER, ip, ip, MPI_COMM_WORLD, &status);
+        }
+    }
+    else
+    {
+        MPI_Send(&(*startAndEndFourierIndex)(1), 6, MPI_INTEGER, 0, myid, MPI_COMM_WORLD);
+    }
+
+    MPI_Bcast(&(*startAndEndFourierIndexOfAll)(1, 0), 6 * nTProcessor, MPI_INTEGER, 0, MPI_COMM_WORLD);
+    MPI_Barrier(MPI_COMM_WORLD);
+#endif
+
+    int wordwidth = 20;
+    string filename = "griddistribute.dat";
+    fstream file;
+    if( myid == server )
+    {
+        file.open(filename.c_str(), ios_base::out);
+        if ( !file )
+        {
+            TK_Exit::ExceptionExit("could not open griddistribute.dat\n");
+        }
+        file << setw(wordwidth) << nTProcessor
+            << setw(wordwidth) << (*dimensionOfP3DFFT)(1)
+            << setw(wordwidth) << (*dimensionOfP3DFFT)(2) 
+            << "\n";
+        for(int ip = 0; ip <= nTProcessor - 1; ++ip)
+        {
+            file << setw(wordwidth) << ip 
+                << setw(wordwidth) << (*startAndEndFourierIndexOfAll)(1, ip)
+                << setw(wordwidth) << (*startAndEndFourierIndexOfAll)(2, ip)
+                << setw(wordwidth) << (*startAndEndFourierIndexOfAll)(3, ip)
+                << setw(wordwidth) << (*startAndEndFourierIndexOfAll)(4, ip)
+                << setw(wordwidth) << (*startAndEndFourierIndexOfAll)(5, ip)
+                << setw(wordwidth) << (*startAndEndFourierIndexOfAll)(6, ip)
+                << "\n";
+        }
+    }
+    file.close();
+    file.clear();
+
+    // !To get startAndEndPhysicalIndexOfAll, write to griddistribute_phy.dat
+    startAndEndPhysicalIndexOfAll = new Int2D(Range(1, 6), Range(0, nTProcessor - 1), fortranArray);
+    Int1D *startAndEndPhysicalIndex = new Int1D(Range(1, 6), fortranArray);
+    (*startAndEndPhysicalIndex)(I) = (*physicalStartIndex)(I);
+    (*startAndEndPhysicalIndex)(Range(4, 6)) = (*physicalEndIndex)(I);
+#ifdef PH_PARALLEL
+    if(myid == server)
+    {
+#endif
+        (*startAndEndPhysicalIndexOfAll)(Range(1, 6), myid) = (*startAndEndPhysicalIndex)(Range(1, 6));
+#ifdef PH_PARALLEL
+        for(int ip = 1; ip <= nTProcessor - 1; ++ip)
+        {
+            MPI_Recv(&(*startAndEndPhysicalIndexOfAll)(1, ip), 6, MPI_INTEGER, ip, ip, MPI_COMM_WORLD, &status);
+        }
+    }
+    else
+    {
+        MPI_Send(&(*startAndEndPhysicalIndex)(1), 6, MPI_INTEGER, 0, myid, MPI_COMM_WORLD);
+    }
+
+    MPI_Bcast(&(*startAndEndPhysicalIndexOfAll)(1, 0), 6 * nTProcessor, MPI_INTEGER, 0, MPI_COMM_WORLD);
+    MPI_Barrier(MPI_COMM_WORLD);
+#endif
+
+    filename = "griddistribute_phy.dat";
+    if( myid == server )
+    {
+        file.open( filename.c_str(), ios_base::out );
+        if ( !file )
+        {
+            TK_Exit::ExceptionExit("could not open griddistribute_phy.dat\n");
+        }
+        file << setw(wordwidth) << nTProcessor 
+            << setw(wordwidth) << (*dimensionOfP3DFFT)(1) 
+            << setw(wordwidth) << (*dimensionOfP3DFFT)(2) 
+            << "\n";
+        for(int ip = 0; ip <= nTProcessor - 1; ++ip)
+        {
+            file << setw(wordwidth) << ip 
+                << setw(wordwidth) << (*startAndEndPhysicalIndexOfAll)(1, ip)
+                << setw(wordwidth) << (*startAndEndPhysicalIndexOfAll)(2, ip)
+                << setw(wordwidth) << (*startAndEndPhysicalIndexOfAll)(3, ip)
+                << setw(wordwidth) << (*startAndEndPhysicalIndexOfAll)(4, ip)
+                << setw(wordwidth) << (*startAndEndPhysicalIndexOfAll)(5, ip)
+                << setw(wordwidth) << (*startAndEndPhysicalIndexOfAll)(6, ip)
+                << "\n";
+        }
+    }
+    file.close();
+    file.clear();
+
+    nXYZFourier  = (*fourierIndexSize )(1) * (*fourierIndexSize )(2) * (*fourierIndexSize )(3);
+    nXYZPhysical = (*physicalIndexSize)(1) * (*physicalIndexSize)(2) * (*physicalIndexSize)(3);
+
+    iStartFourierIndex = (*fourierStartIndex)(1);
+    jStartFourierIndex = (*fourierStartIndex)(2);
+    kStartFourierIndex = (*fourierStartIndex)(3);
+    iEndFourierIndex   = (*fourierEndIndex  )(1);
+    jEndFourierIndex   = (*fourierEndIndex  )(2);
+    kEndFourierIndex   = (*fourierEndIndex  )(3);
+
+    iStartPhysicalIndex = (*physicalStartIndex)(1);
+    jStartPhysicalIndex = (*physicalStartIndex)(2);
+    kStartPhysicalIndex = (*physicalStartIndex)(3);
+    iEndPhysicalIndex   = (*physicalEndIndex  )(1);
+    jEndPhysicalIndex   = (*physicalEndIndex  )(2);
+    kEndPhysicalIndex   = (*physicalEndIndex  )(3);
+
+    Int1D *fourierStartIndexGlobal = new Int1D(Range(1, 3), fortranArray);
+    Int1D *fourierEndIndexGlobal = new Int1D(Range(1, 3), fortranArray);
+
+    (*fourierStartIndexGlobal)(1) = iStartFourierIndex;
+    (*fourierStartIndexGlobal)(2) = jStartFourierIndex;
+    (*fourierStartIndexGlobal)(3) = kStartFourierIndex;
+    (*fourierEndIndexGlobal)(1) = iEndFourierIndex;
+    (*fourierEndIndexGlobal)(2) = jEndFourierIndex;
+    (*fourierEndIndexGlobal)(3) = kEndFourierIndex;
+
+#ifdef PH_PARALLEL
+    using namespace PHMPI;
+    MPI_Reduce(&iStartFourierIndex, &(*fourierStartIndexGlobal)(1), 1, MPI_INTEGER, MPI_MIN, procIDWithKx0Ky0, MPI_COMM_WORLD);
+    MPI_Reduce(&jStartFourierIndex, &(*fourierStartIndexGlobal)(2), 1, MPI_INTEGER, MPI_MIN, procIDWithKx0Ky0, MPI_COMM_WORLD);
+    MPI_Reduce(&kStartFourierIndex, &(*fourierStartIndexGlobal)(3), 1, MPI_INTEGER, MPI_MIN, procIDWithKx0Ky0, MPI_COMM_WORLD);
+
+    MPI_Reduce(&iEndFourierIndex, &(*fourierEndIndexGlobal)(1), 1, MPI_INTEGER, MPI_MAX, procIDWithKx0Ky0, MPI_COMM_WORLD);
+    MPI_Reduce(&jEndFourierIndex, &(*fourierEndIndexGlobal)(2), 1, MPI_INTEGER, MPI_MAX, procIDWithKx0Ky0, MPI_COMM_WORLD);
+    MPI_Reduce(&kEndFourierIndex, &(*fourierEndIndexGlobal)(3), 1, MPI_INTEGER, MPI_MAX, procIDWithKx0Ky0, MPI_COMM_WORLD);
+
+    MPI_Bcast(&(*fourierStartIndexGlobal)(1) , 3, MPI_INTEGER, procIDWithKx0Ky0, MPI_COMM_WORLD);
+    MPI_Bcast(&(*fourierEndIndexGlobal)(1), 3, MPI_INTEGER, procIDWithKx0Ky0, MPI_COMM_WORLD);
+#endif
+
+    iStartFourierIndexGlobal = (*fourierStartIndexGlobal)(1);
+    jStartFourierIndexGlobal = (*fourierStartIndexGlobal)(2);
+    kStartFourierIndexGlobal = (*fourierStartIndexGlobal)(3);
+
+    iEndFourierIndexGlobal = (*fourierEndIndexGlobal)(1);
+    jEndFourierIndexGlobal = (*fourierEndIndexGlobal)(2);
+    kEndFourierIndexGlobal = (*fourierEndIndexGlobal)(3);
+
+    nyquistX = kStartFourierIndexGlobal + nX / 2;
+    nyquistY = jStartFourierIndexGlobal + nY / 2;
+
+    //if ( (jStartFourierIndex == jStartFourierIndexGlobal) && (kStartFourierIndex == kStartFourierIndexGlobal) )
+    //{
+    //    procIDWithKx0Ky0 = myid;
+    //}
+
+    delete startAndEndFourierIndex; startAndEndFourierIndex = NULL;
+    delete startAndEndPhysicalIndex; startAndEndPhysicalIndex = NULL;
+    delete fourierStartIndexGlobal; fourierStartIndexGlobal = NULL;
+    delete fourierEndIndexGlobal; fourierEndIndexGlobal = NULL;
+}
+
+void SpecGrid::InitGridFileName()
+{
+    string outputdir = "./results";
+    outputdir = GlobalDataBase::GetStrParaFromDB("outputdir");
+
+    gridFileName = outputdir + "/grid.x"; 
+    zgridFileName = outputdir + "/rXYZ.dat";
+}
+
+void SpecGrid::InitP3DFFT()
+{
+    Int1D *memsize = new Int1D(Range(1, 3), fortranArray);
+
+    nX = GlobalDataBase::GetIntParaFromDB("nx");
+    nY = GlobalDataBase::GetIntParaFromDB("ny");
+    nZ = GlobalDataBase::GetIntParaFromDB("nz");
+
+    (*fourierStartIndex)(1) = 1;
+    (*fourierStartIndex)(2) = 1;
+    (*fourierStartIndex)(3) = 1;
+    
+    (*fourierEndIndex)(1) = nZ;
+    (*fourierEndIndex)(2) = nY;
+    (*fourierEndIndex)(3) = nX / 2 + 1;
+
+    (*physicalStartIndex)(1) = 1;
+    (*physicalStartIndex)(2) = 1;
+    (*physicalStartIndex)(3) = 1;
+
+    (*physicalEndIndex)(1) = 3 * nX / 2;
+    (*physicalEndIndex)(2) = 3 * nY / 2;
+    (*physicalEndIndex)(3) = 3 * nZ / 2;
+
+    Cp3dfft_setup(&(*dimensionOfP3DFFT)(1), nX2, nY2, nZ2, MPI_COMM_WORLD, nX, nY, nZ, 1, &(*memsize)(1));
+
+    Cp3dfft_get_dims(&(*physicalStartIndex)(1), &(*physicalEndIndex)(1), &(*physicalIndexSize)(1), 1);
+
+    Cp3dfft_get_dims(&(*fourierStartIndex)(1), &(*fourierEndIndex)(1), &(*fourierIndexSize)(1), 2);
+
+    delete memsize; memsize = NULL;
+}
+
+void SpecGrid::AllocGridData()
+{
+    Range K(kStartFourierIndex, kEndFourierIndex);
+    Range J(jStartFourierIndex, jEndFourierIndex);
+    Range I(iStartFourierIndex, iEndFourierIndex);
+
+    realKX = new RDouble1D(K, fortranArray);
+    realKY = new RDouble1D(J, fortranArray);
+    realKZ = new RDouble1D(I, fortranArray);
+
+    complexKX = new Complex1D(K, fortranArray);
+    complexKY = new Complex1D(J, fortranArray);
+    complexKZ = new Complex1D(I, fortranArray);
+}
+
+void SpecGrid::InitWavenumber()
+{
+    RDouble realXL = GlobalDataBase::GetDoubleParaFromDB("XL");
+    RDouble realAlphaX = 1.0 / realXL;
+    for (int i3 = kStartFourierIndex; i3 <= kEndFourierIndex; ++i3)
+    {
+        int ix = i3 - kStartFourierIndexGlobal;
+        (*realKX)(i3) = static_cast<double>(ix) * realAlphaX;
+        (*complexKX)(i3) = PHComplex(0.0, 1.0) * (*realKX)(i3);
+    }
+    realKNyquistX = static_cast<double>(nX) * realAlphaX / 2.0;
+
+    RDouble realYL = GlobalDataBase::GetDoubleParaFromDB("YL");
+    RDouble realAlphaY = 1.0 / realYL;
+    for ( int i2 = jStartFourierIndex; i2 <= jEndFourierIndex; ++i2 )
+    {
+        int iy = i2 - jStartFourierIndexGlobal;
+        if ( iy <= nY/2 )
+        {
+            (*realKY)(i2) = static_cast<double>(iy) * realAlphaY;
+        }
+        else
+        {
+            (*realKY)(i2) = static_cast<double>(iy - nY) * realAlphaY;
+        }
+        (*complexKY)(i2) = PHComplex(0.0, 1.0) * (*realKY)(i2);
+    }
+    realKNyquistY = static_cast<double>(nY) * realAlphaY / 2.0;
+
+    RDouble realZL = GlobalDataBase::GetDoubleParaFromDB("ZL");
+    RDouble realAlphaZ = 1.0 / realZL;
+    for ( int i1 = iStartFourierIndex; i1 <= iEndFourierIndex; ++i1 )
+    {
+        int iz = i1 - iStartFourierIndexGlobal;
+        if (iz <= nZ/2)
+        {
+            (*realKZ)(i1) = static_cast<double>(iz) * realAlphaZ;
+        }
+        else
+        {
+            (*realKZ)(i1) = static_cast<double>(iz - nZ) * realAlphaZ;
+        }
+        (*complexKZ)(i1) = PHComplex(0.0, 1.0) * (*realKZ)(i1);
+    }
+    realKNyquistZ = static_cast<double>(nZ) * realAlphaZ / 2.0;
+}
+
+int SpecGrid::GetProcIDWithKx0Ky0()
+{
+    return procIDWithKx0Ky0;
+}
+
+}
+
diff --git a/CFD/SpecDiffHybSolver/src/SpecSolver.cpp b/CFD/SpecDiffHybSolver/src/SpecSolver.cpp
new file mode 100644
index 0000000..56ee1a1
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/src/SpecSolver.cpp
@@ -0,0 +1,2342 @@
+#include "SpecSolver.h"
+#include "SpecGrid.h"
+#include "Spectrum.h"
+#include "RescaleField.h"
+#include "Statistics.h"
+#include "LES.h"
+#include "PoissonSolver.h"
+#include "PHMpi.h"
+#include "GlobalDataBase.h"
+#include "Constants.h"
+#include "IO_FileName.h"
+#include "TK_Log.h"
+#include "TK_Exit.h"
+#include "PHIO.h"
+#include "Math_BasisFunction.h"
+#include "PHMatrix.h"
+#include "p3dfft.h"
+#include <stdio.h>
+
+namespace PHSPACE
+{
+
+SpecSolver::SpecSolver()
+{
+    controlParameters = 0;
+}
+
+SpecSolver::~SpecSolver()
+{
+    FreeControlParameters();
+}
+
+void SpecSolver::Run()
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    Init();
+
+    Param_SpecSolver *parameters = GetControlParameters();
+
+    int maxSimuStep = parameters->GetMaxSimuStep();
+    int startStatisticStep = parameters->GetStartStatisticStep();
+    int intervalStepRes = parameters->GetIntervalStepRes();
+    int intervalStepStatistic = parameters->GetIntervalStepStatistic();
+    int intervalStepFlow = parameters->GetIntervalStepFlow();
+
+    int nstep = GlobalDataBase::GetIntParaFromDB("nstep");
+    int nstep0 = nstep;
+    do {
+        ++ nstep;
+        GlobalDataBase::UpdateData("nstep", &nstep, PHINT, 1);
+
+        //if( (myid == 0) && (istep%intervalStepRes == 0) )
+        //{
+        //    cout << setw(20) << istep;
+        //    cout << setiosflags(ios::right);
+        //    cout << setprecision(10);
+        //    cout << setiosflags(ios::scientific);
+        //    cout << setiosflags(ios::showpoint);
+        //    cout << setw(20) << real((*complexU)(2, 2, 2)) << setw(20) << imag((*complexU)(2, 2, 2)) << "\n" << endl;
+        //}
+
+        GetRHS();
+
+        Solve();
+
+        int nstart = GlobalDataBase::GetIntParaFromDB("nstart");
+        int timeOrderOfPressureTerm = GlobalDataBase::GetIntParaFromDB("timeOrderOfPressureTerm");
+        if( (!nstart) && ((nstep - nstep0) == timeOrderOfPressureTerm) )
+        {
+            SetTimeDataCoef();
+        }
+        else if( IsConvectiveTermFailed && ((nstep - nstep0) == timeOrderOfPressureTerm) )
+        {
+            SetTimeDataCoef();
+            IsConvectiveTermFailed = false;
+            //IsPressureGradientFailed = false;
+        }
+
+        //RescaleVelocityField(nstep);
+
+        if(nstep >= startStatisticStep)
+        {
+            GetStatistics();
+        }
+
+        if(nstep % intervalStepRes == 0)
+        {
+            OutputResidual();
+        }
+
+        if(nstep % intervalStepStatistic == 0)
+        {
+            OutputStatisticVisual();
+        }
+
+        if(nstep % intervalStepFlow == 0)
+        {
+            OutputRestartData();
+        }
+
+    } while(nstep < maxSimuStep);
+
+    WriteLogFile("Iteration Finished!\n");
+
+    DeAllocateGlobalVariables();
+}
+
+void SpecSolver::Init()
+{
+    bool readFlowFile = false;
+    int nstart = 0;
+    if(JudgeIfRestart())
+    {
+        readFlowFile = true;
+
+        nstart = 1;
+    }
+    GlobalDataBase::UpdateData("nstart", &nstart, PHINT, 1);
+
+    if(nstart == 0)
+    {
+        WriteLogFile("Initialize Flow!\n");
+    }
+    else
+    {
+        WriteLogFile("Reading Restart File As InitFlow!\n");
+    }
+
+    InitControlParameters();
+
+    //SpecturmData = new Spectrum();
+    //SpecturmData -> InitSpectrumData();
+    InitSpectrumData();
+
+    InitGridData();
+
+    InitTimeDependentData();
+
+    InitGlobal();
+
+    InitRescaleData();
+
+    InitStatisticsData();
+
+    InitFieldData();
+
+    if(nstart)
+    {
+        InputOldTimeData();
+    }
+
+    InitLESData();
+
+    OutputFieldName();
+}
+
+void SpecSolver::InitSpectrumData()
+{
+    Spectrum *SpectrumData = GetSpectrumData();
+
+    SpectrumData = new Spectrum();
+
+    SpectrumData -> InitSpectrumData();
+
+    SetSpectrumData(SpectrumData);
+
+    WriteLogFile("Spectrum data initialized!\n");
+    //SpecturmData -> InitSpectrumData();
+}
+
+void SpecSolver::InitGridData()
+{
+    SpecGrid *GridData = GetGrid();
+
+    GridData = new SpecGrid();
+
+    GridData -> InitGridData();
+
+    SetGrid(GridData);
+
+    WriteLogFile("Grid data initialized!\n");
+}
+
+void SpecSolver::InitRescaleData()
+{
+    SpecGrid *GridData = GetGrid();
+
+    RescaleFieldHIT *RescaleFieldData = GetRescaleFieldData();
+
+    RescaleFieldData = new RescaleFieldHIT();
+
+    RescaleFieldData -> InitRescaleData();
+
+    SetRescaleFieldData(RescaleFieldData);
+
+    WriteLogFile("Rescale data initialized!\n");
+}
+
+void SpecSolver::InitStatisticsData()
+{
+    SpecGrid *GridData = GetGrid();
+
+    StatisticsHIT *StatisticData = GetStatisticData();
+
+    StatisticData = new StatisticsHIT();
+
+    StatisticData -> InitStatisticsData(GridData);
+
+    SetStatisticData(StatisticData);
+
+    WriteLogFile("Statistics data initialized!\n");
+}
+
+void SpecSolver::InitLESData()
+{
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+
+    if(viscousType > 1)
+    {
+        LESHIT *LESData = GetLESData();
+
+        LESData = new LESHIT();
+
+        SpecGrid *GridData = GetGrid();
+
+        LESData -> InitLESData(GridData);
+
+        SetLESData(LESData);
+
+        WriteLogFile("LES data initialized!\n");
+    }
+}
+
+void SpecSolver::InputOldTimeData()
+{
+    ReadConvectiveTerm();
+
+    ReadTimeDependentInformation();
+
+    if(IsConvectiveTermFailed)
+    {
+        SetInitTimeDataCoef();
+    }
+}
+
+void SpecSolver::ReadConvectiveTerm()
+{
+    SpecGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    fstream file;
+    ios_base::openmode openMode = ios_base::in | ios_base::binary;
+    PHSPACE::OpenFile(file, nonlinearTermFile.c_str(), openMode);
+
+    int inttmp[5];
+    PHRead(file, inttmp, 5);
+
+    int nout = 3 * (iedf - istf + 1) * (jedf - jstf + 1) * (kedf - kstf + 1);
+
+    PHRead(file, &(*convectiveTerm)(istf, jstf, kstf, 1), nout);
+
+    PHSPACE::CloseFile(file);
+}
+
+void SpecSolver::ReadTimeDependentInformation()
+{
+    SpecGrid *GridData = GetGrid();
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    int nstep = GlobalDataBase::GetIntParaFromDB("nstep");
+
+    fstream file;        
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+    //if(myid == procIDWithKx0Ky0)
+    //{
+        file.open(timeInformationRestartFile.c_str(), ios_base::in);
+        if((!file))
+        {
+            TK_Exit::FileOpenErrorExit(timeInformationRestartFile);
+        }
+        else
+        {
+            file >> nstep;
+        }
+        file.close();
+        file.clear();
+
+        GlobalDataBase::UpdateData("nstep", &nstep, PHINT, 1);
+    //}
+
+    //GlobalDataBase::UpdateData("nstep", &nstep, PHINT, 1);
+//#ifdef PH_PARALLEL
+//    MPI_Bcast(&nstep, 1, MPI_INTEGER, procIDWithKx0Ky0, MPI_COMM_WORLD); 
+//#endif
+}
+
+void SpecSolver::GetRHS()
+{
+    GetVelocityGradient();
+    GetNonlinearTerm();
+
+    Param_SpecSolver * parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    if(viscousType > 0)
+    {
+        //GetViscousTerm();
+    }	
+}
+
+void SpecSolver::GetVelocityGradient()
+{
+    SpecGrid *GridData = GetGrid();
+
+    int ist = GridData -> iStartFourierIndex;
+    int jst = GridData -> jStartFourierIndex;
+    int kst = GridData -> kStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex;
+    int jed = GridData -> jEndFourierIndex;
+    int ked = GridData -> kEndFourierIndex;
+
+    GetGradientVector( &(*complexU)(ist, jst, kst), &(*complexVelocityGradient)(ist, jst, kst, 1), &(*complexVelocityGradient)(ist, jst, kst, 2), &(*complexVelocityGradient)(ist, jst, kst, 3) );
+    GetGradientVector( &(*complexV)(ist, jst, kst), &(*complexVelocityGradient)(ist, jst, kst, 4), &(*complexVelocityGradient)(ist, jst, kst, 5), &(*complexVelocityGradient)(ist, jst, kst, 6) );
+    GetGradientVector( &(*complexW)(ist, jst, kst), &(*complexVelocityGradient)(ist, jst, kst, 7), &(*complexVelocityGradient)(ist, jst, kst, 8), &(*complexVelocityGradient)(ist, jst, kst, 9) );
+}
+
+void SpecSolver::GetGradientVector(PHComplex *var, PHComplex *dVardX, PHComplex *dVardY, PHComplex *dVardZ)
+{
+    SpecGrid *GridData = GetGrid();
+
+    int ist = GridData -> iStartFourierIndex;
+    int jst = GridData -> jStartFourierIndex;
+    int kst = GridData -> kStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex;
+    int jed = GridData -> jEndFourierIndex;
+    int ked = GridData -> kEndFourierIndex;
+
+    Complex1D *kx = GridData -> complexKX;
+    Complex1D *ky = GridData -> complexKY;
+    Complex1D *kz = GridData -> complexKZ;
+
+    Range I(ist, ied);
+    Range J(jst, jed);
+    Range K(kst, ked);
+
+    Complex3D var3D(var, I, J, K, neverDeleteData, fortranArray);
+
+    Complex3D dVardXVec(dVardX, I, J, K, neverDeleteData, fortranArray);
+    Complex3D dVardYVec(dVardY, I, J, K, neverDeleteData, fortranArray);
+    Complex3D dVardZVec(dVardZ, I, J, K, neverDeleteData, fortranArray);
+
+    for(int iz = ist; iz <= ied; ++iz)
+    {
+        for(int iy = jst; iy <= jed; ++iy)
+        {
+            for(int ix = kst; ix <= ked; ++ix)
+            {
+                dVardXVec(iz, iy, ix) = (*kx)(ix) * var3D(iz, iy, ix);
+                dVardYVec(iz, iy, ix) = (*ky)(iy) * var3D(iz, iy, ix);
+                dVardZVec(iz, iy, ix) = (*kz)(iy) * var3D(iz, iy, ix);
+            }
+        }
+    }
+}
+
+void SpecSolver::GetNonlinearTerm()
+{
+    Param_SpecSolver *parameters = GetControlParameters();
+
+    RDouble reynolds = parameters->GetRefReNumber();
+    int viscousType = parameters->GetViscousType();
+    string viscousName = parameters->GetViscousName();
+
+    SpecGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    Range IF(istf, iedf);
+    Range JF(jstf, jedf);
+    Range KF(kstf, kedf);
+
+    int istp = GridData -> iStartPhysicalIndex;
+    int jstp = GridData -> jStartPhysicalIndex;
+    int kstp = GridData -> kStartPhysicalIndex;
+    int iedp = GridData -> iEndPhysicalIndex;
+    int jedp = GridData -> jEndPhysicalIndex;
+    int kedp = GridData -> kEndPhysicalIndex;
+
+    Range IP(istp, iedp);
+    Range JP(jstp, jedp);
+    Range KP(kstp, kedp);
+
+    int nXYZAll = GridData -> nXYZAll;
+    RDouble dnXYZAll = 1.0 / static_cast<double>(nXYZAll);
+
+    (*complexVelocityGradient)(IF, JF, KF, 10) = (*complexU)(IF, JF, KF);
+    (*complexVelocityGradient)(IF, JF, KF, 11) = (*complexV)(IF, JF, KF);
+    (*complexVelocityGradient)(IF, JF, KF, 12) = (*complexW)(IF, JF, KF);
+
+    int nXYZFourier = GridData -> nXYZFourier;
+    int nXYZPhysical = GridData -> nXYZPhysical;
+
+    unsigned char opc2r[] = "tff";
+    Cp3dfft_btran_c2r_many(reinterpret_cast<double*>(&(*complexVelocityGradient)(istf, jstf, kstf, 1)), nXYZFourier, &(*realVelocityGradient)(istp, jstp, kstp, 1), nXYZPhysical, 12, opc2r);
+
+    (*realVelocitySquare)(IP, JP, KP, 1) = (*realVelocityGradient)(IP, JP, KP, 10) * (*realVelocityGradient)(IP, JP, KP, 10); // u*u
+    (*realVelocitySquare)(IP, JP, KP, 2) = (*realVelocityGradient)(IP, JP, KP, 11) * (*realVelocityGradient)(IP, JP, KP, 10); // v*u
+    (*realVelocitySquare)(IP, JP, KP, 3) = (*realVelocityGradient)(IP, JP, KP, 12) * (*realVelocityGradient)(IP, JP, KP, 10); // w*u
+
+    (*realVelocitySquare)(IP, JP, KP, 4) = (*realVelocityGradient)(IP, JP, KP, 10) * (*realVelocityGradient)(IP, JP, KP, 11); // u*v
+    (*realVelocitySquare)(IP, JP, KP, 5) = (*realVelocityGradient)(IP, JP, KP, 11) * (*realVelocityGradient)(IP, JP, KP, 11); // v*v
+    (*realVelocitySquare)(IP, JP, KP, 6) = (*realVelocityGradient)(IP, JP, KP, 12) * (*realVelocityGradient)(IP, JP, KP, 11); // w*v
+
+    (*realVelocitySquare)(IP, JP, KP, 7) = (*realVelocityGradient)(IP, JP, KP, 10) * (*realVelocityGradient)(IP, JP, KP, 12); // u*w
+    (*realVelocitySquare)(IP, JP, KP, 8) = (*realVelocityGradient)(IP, JP, KP, 11) * (*realVelocityGradient)(IP, JP, KP, 12); // v*w
+    (*realVelocitySquare)(IP, JP, KP, 9) = (*realVelocityGradient)(IP, JP, KP, 12) * (*realVelocityGradient)(IP, JP, KP, 12); // w*w
+
+    (*realVelocitySquare)(IP, JP, KP, 10) = (*realVelocityGradient)(IP, JP, KP, 10) * (*realVelocityGradient)(IP, JP, KP, 1)
+        + (*realVelocityGradient)(IP, JP, KP, 11) * (*realVelocityGradient)(IP, JP, KP, 2)
+        + (*realVelocityGradient)(IP, JP, KP, 12) * (*realVelocityGradient)(IP, JP, KP, 3); // u*du/dx + v*du/dy +w*du/dz
+    (*realVelocitySquare)(IP, JP, KP, 11) = (*realVelocityGradient)(IP, JP, KP, 10) * (*realVelocityGradient)(IP, JP, KP, 4)
+        + (*realVelocityGradient)(IP, JP, KP, 11) * (*realVelocityGradient)(IP, JP, KP, 5)
+        + (*realVelocityGradient)(IP, JP, KP, 12) * (*realVelocityGradient)(IP, JP, KP, 6); // u*dv/dx + v*dv/dy +w*dv/dz
+    (*realVelocitySquare)(IP, JP, KP, 12) = (*realVelocityGradient)(IP, JP, KP, 10) * (*realVelocityGradient)(IP, JP, KP, 7)
+        + (*realVelocityGradient)(IP, JP, KP, 11) * (*realVelocityGradient)(IP, JP, KP, 8)
+        + (*realVelocityGradient)(IP, JP, KP, 12) * (*realVelocityGradient)(IP, JP, KP, 9); // u*dw/dx + v*dw/dy +w*dw/dz
+
+    unsigned char opr2c[] = "fft";
+    Cp3dfft_ftran_r2c_many(&(*realVelocitySquare)(istp, jstp, kstp, 1), nXYZPhysical, reinterpret_cast<double*>(&(*complexVelocitySquare)(istf, jstf, kstf, 1)), nXYZFourier, 12, opr2c);
+
+    (*complexVelocitySquare)(IF, JF, KF, Range(1, 12)) = (*complexVelocitySquare)(IF, JF, KF, Range(1, 12)) * dnXYZAll;
+
+    Complex3D *complexDivergenceOfVelocitySquare = new Complex3D(IF, JF, KF, fortranArray);
+
+    Complex4D *convectiveTermTemp = new Complex4D(IF, JF, KF, Range(1, 3), fortranArray);
+
+    GetDivergence(&(*complexVelocitySquare)(istf, jstf, kstf, 1), &(*complexVelocitySquare)(istf, jstf, kstf, 2), &(*complexVelocitySquare)(istf, jstf, kstf, 3), complexDivergenceOfVelocitySquare);
+    (*convectiveTermTemp)(IF, JF, KF, 1) = 0.5 * ( (*complexVelocitySquare)(IF, JF, KF, 10) + (*complexDivergenceOfVelocitySquare)(IF, JF, KF) );
+
+    GetDivergence(&(*complexVelocitySquare)(istf, jstf, kstf, 4), &(*complexVelocitySquare)(istf, jstf, kstf, 5), &(*complexVelocitySquare)(istf, jstf, kstf, 6), complexDivergenceOfVelocitySquare);
+    (*convectiveTermTemp)(IF, JF, KF, 2) = 0.5 * ( (*complexVelocitySquare)(IF, JF, KF, 11) + (*complexDivergenceOfVelocitySquare)(IF, JF, KF) );
+
+    GetDivergence(&(*complexVelocitySquare)(istf, jstf, kstf, 7), &(*complexVelocitySquare)(istf, jstf, kstf, 8), &(*complexVelocitySquare)(istf, jstf, kstf, 9), complexDivergenceOfVelocitySquare);
+    (*convectiveTermTemp)(IF, JF, KF, 3) = 0.5 * ( (*complexVelocitySquare)(IF, JF, KF, 12) + (*complexDivergenceOfVelocitySquare)(IF, JF, KF) );
+
+    if (viscousType <= 1)
+    {
+        realnut = 0.0;
+    }
+    else
+    {
+    }
+
+    if(viscousType > 1)
+    {
+    }
+
+    (*complexNonlinearTerm)(IF, JF, KF, Range(1, 3)) = (*nonlinearTermCoef)(0) * (*convectiveTermTemp)(IF, JF, KF, Range(1, 3)) + (*nonlinearTermCoef)(-1) * (*convectiveTerm)(IF, JF, KF, Range(1, 3));
+
+    (*convectiveTerm)(IF, JF, KF, Range(1, 3)) = (*convectiveTermTemp)(IF, JF, KF, Range(1, 3));
+
+    delete complexDivergenceOfVelocitySquare; complexDivergenceOfVelocitySquare = NULL;
+    delete convectiveTermTemp; convectiveTermTemp = NULL;
+}
+
+void SpecSolver::GetDivergence(PHComplex *vecX, PHComplex *vecY, PHComplex *vecZ, Complex3D *divVar)
+{
+    int ist = GridData -> iStartFourierIndex;
+    int jst = GridData -> jStartFourierIndex;
+    int kst = GridData -> kStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex;
+    int jed = GridData -> jEndFourierIndex;
+    int ked = GridData -> kEndFourierIndex;
+
+    Range I(ist, ied);
+    Range J(jst, jed);
+    Range K(kst, ked);
+
+    Complex1D *kx = GridData -> complexKX;
+    Complex1D *ky = GridData -> complexKY;
+    Complex1D *kz = GridData -> complexKZ;
+
+    Complex3D vecVarX(vecX, I, J, K, neverDeleteData, fortranArray);
+    Complex3D vecVarY(vecY, I, J, K, neverDeleteData, fortranArray);
+    Complex3D vecVarZ(vecZ, I, J, K, neverDeleteData, fortranArray);
+
+    (*divVar)(I, J, K) = PHComplex(0.0, 0.0);
+
+    for( int ix = kst; ix <= ked; ++ix)
+    {
+        for( int iy = jst; iy <= jed; ++iy)
+        {
+            for( int iz = ist; iz <= ied; ++iz)
+            {
+                (*divVar)(iz, iy, ix) = (*divVar)(iz, iy, ix) + (*kx)(ix) * vecVarX(iz, iy, ix) + (*ky)(iy) * vecVarY(iz, iy, ix) + (*kz)(iz) * vecVarZ(iz, iy, ix);
+            }
+        }
+    }
+}
+
+void SpecSolver::Solve()
+{
+    Param_SpecSolver *parameters = GetControlParameters();
+    RDouble reynolds = parameters->GetRefReNumber();
+    RDouble timeStep = parameters->GetTimeStep();
+
+    RDouble phi = 2.0 * reynolds / (1.0 + realnut);
+
+    SpecGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    RDouble1D &realKX = *reinterpret_cast <RDouble1D *> (GridData -> realKX);
+    RDouble1D &realKY = *reinterpret_cast <RDouble1D *> (GridData -> realKY);
+    RDouble1D &realKZ = *reinterpret_cast <RDouble1D *> (GridData -> realKZ);
+
+    Complex1D &complexKX = *reinterpret_cast <Complex1D *> (GridData -> complexKX);
+    Complex1D &complexKY = *reinterpret_cast <Complex1D *> (GridData -> complexKY);
+    Complex1D &complexKZ = *reinterpret_cast <Complex1D *> (GridData -> complexKZ);
+
+    RDouble realKNyquistX = GridData -> realKNyquistX;
+    RDouble realKNyquistY = GridData -> realKNyquistY;
+    RDouble realKNyquistZ = GridData -> realKNyquistZ;
+
+    const PHComplex cZero = PHComplex(0.0, 0.0);
+
+    for(int ix = kstf; ix <= kedf; ++ix)
+    {
+        for(int iy = jstf; iy <= jedf; ++iy)
+        {
+            for(int iz = istf; iz <= iedf; ++iz)
+            {
+                RDouble kx = realKX(ix);
+                RDouble ky = realKY(iy);
+                RDouble kz = realKZ(iz);
+
+                RDouble k2  = kx * kx + ky * ky + kz * kz;
+
+                if(k2 < TINY)
+                {
+                    (*complexP)(iz, iy, ix) = cZero;
+                    (*complexU)(iz, iy ,ix) = cZero;
+                    (*complexV)(iz, iy, ix) = cZero;
+                    (*complexW)(iz, iy, ix) = cZero;
+
+                    continue;
+                }
+
+                if( (abs(abs(ky) - abs(realKNyquistY)) < TINY) || (abs(abs(kx) - abs(realKNyquistX)) < TINY) || (abs(abs(kz) - abs(realKNyquistZ)) < TINY) )
+                {
+                    (*complexP)(iz, iy, ix) = cZero;
+                    (*complexU)(iz, iy ,ix) = cZero;
+                    (*complexV)(iz, iy, ix) = cZero;
+                    (*complexW)(iz, iy, ix) = cZero;
+
+                    continue;
+                }
+
+                PHComplex ckx = complexKX(ix);
+                PHComplex cky = complexKY(iy);
+                PHComplex ckz = complexKZ(iz);
+
+                PHComplex pLocal = (*complexP)(iz, iy, ix);
+
+                PHComplex uLocal = -(*complexNonlinearTerm)(iz, iy, ix, 1) - ckx * pLocal + (*complexViscousTerm)(iz, iy ,ix, 1);
+                PHComplex vLocal = -(*complexNonlinearTerm)(iz, iy, ix, 2) - cky * pLocal + (*complexViscousTerm)(iz, iy ,ix, 2);
+                PHComplex wLocal = -(*complexNonlinearTerm)(iz, iy, ix, 3) - ckz * pLocal + (*complexViscousTerm)(iz, iy ,ix, 3);
+
+                PoissonSolver::PoissonSolverVelocity(uLocal, timeStep, k2, phi);
+                PoissonSolver::PoissonSolverVelocity(vLocal, timeStep, k2, phi);
+                PoissonSolver::PoissonSolverVelocity(wLocal, timeStep, k2, phi);
+
+                uLocal = (*complexU)(iz, iy, ix) + uLocal;
+                vLocal = (*complexV)(iz, iy, ix) + vLocal;
+                wLocal = (*complexW)(iz, iy, ix) + wLocal;
+
+                PHComplex divergenceOfUStar = ckx * uLocal + cky * vLocal + ckz * wLocal;
+
+                RDouble psi = 1.0 / (-1.0 * timeStep * k2);
+                PHComplex deltaPressure = divergenceOfUStar * psi;
+
+                // velocity projected into divergence-free space
+                uLocal = uLocal - timeStep * ckx * deltaPressure;
+                vLocal = vLocal - timeStep * cky * deltaPressure;
+                wLocal = wLocal - timeStep * ckz * deltaPressure;
+
+                // pressure Update
+                pLocal = pLocal + deltaPressure - 1.0 / phi * divergenceOfUStar;
+
+                // update fields
+                (*complexU)(iz, iy, ix) = uLocal;
+                (*complexV)(iz, iy, ix) = vLocal;
+                (*complexW)(iz, iy, ix) = wLocal;
+                (*complexP)(iz, iy, ix) = pLocal;
+            }
+        }
+    }
+}
+
+void SpecSolver::InitTimeDependentData()
+{
+    InitTimeDependentFileName();
+
+    AllocTimeDependentData();
+
+    int nstart = GlobalDataBase::GetIntParaFromDB("nstart");
+    if(!nstart)
+    {
+        SetInitTimeDataCoef();
+    }
+    else
+    {
+        SetTimeDataCoef();
+    }
+
+    WriteLogFile("Time dependent data initialized!\n");
+}
+
+void SpecSolver::InitTimeDependentFileName()
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    stringstream strmMyid;
+    strmMyid << myid;
+
+    string outputdir = "./results";
+    outputdir = GlobalDataBase::GetStrParaFromDB("outputdir");
+
+    nonlinearTermFile = outputdir + "/NonlinearTerm_" + strmMyid.str() + ".rsta"; 
+    nonlinearTermBackupFile = outputdir + "/NonlinearTerm_" + strmMyid.str() + "_bk.rsta";
+
+    pressureGradientTermFile = outputdir + "/PressureGradientTerm_" + strmMyid.str() + ".rsta";
+    pressureGradientTermBackupFile = outputdir + "/PressureGradientTerm_" + strmMyid.str() + "_bk.rsta";
+
+    laplacianVelocityTermFile = outputdir + "/LaplacianVelocity_" + strmMyid.str() + ".rsta";
+    laplacianVelocityTermBackupFile = outputdir + "/LaplacianVelocity_" + strmMyid.str() + "_bk.rsta";
+
+    timeInformationRestartFile = outputdir + "/Timeinfo.rsta";
+}
+
+void SpecSolver::AllocTimeDependentData()
+{
+    SpecGrid *GridData = GetGrid();
+
+    int ist = GridData -> iStartFourierIndex;
+    int jst = GridData -> jStartFourierIndex;
+    int kst = GridData -> kStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex;
+    int jed = GridData -> jEndFourierIndex;
+    int ked = GridData -> kEndFourierIndex;
+
+    int timeOrderOfConvectiveTerm = GlobalDataBase::GetIntParaFromDB("timeOrderOfConvectiveTerm"); 
+    Range I( -(timeOrderOfConvectiveTerm-1), 0 );
+    nonlinearTermCoef = new RDouble1D( I, fortranArray );
+
+    int timeOrderOfPressureTerm = GlobalDataBase::GetIntParaFromDB("timeOrderOfPressureTerm");
+    Range J( -timeOrderOfPressureTerm, 0 );
+    Range K( -timeOrderOfPressureTerm, -1);
+    pressureGradientTermCoef = new RDouble1D( J, fortranArray );
+
+    Range II( ist , ied );
+    Range JJ( jst , jed );
+    Range KK( kst , ked );
+    Range NN( 1   , 3   );
+    convectiveTerm = new Complex4D( II, JJ, KK, NN , fortranArray );
+    complexLaplacianVelocityTerm = new Complex4D( II, JJ, KK, NN, fortranArray );
+    complexPressureGradientTerm = new Complex5D( II, JJ, KK, NN, K, fortranArray );
+}
+
+void SpecSolver::SetInitTimeDataCoef()
+{
+    (*nonlinearTermCoef)( 0) = 1.0;
+    (*nonlinearTermCoef)(-1) = 0.0;
+
+    int timeOrderOfPressureTerm = GlobalDataBase::GetIntParaFromDB("timeOrderOfPressureTerm");
+    for ( int i = -timeOrderOfPressureTerm ; i <= 0 ; ++i )
+    {
+        (*pressureGradientTermCoef)(i) = 0.0;
+    }
+}
+
+void SpecSolver::SetTimeDataCoef()
+{
+    (*nonlinearTermCoef)( 0) = 1.5;
+    (*nonlinearTermCoef)(-1) = -0.5;
+
+    int timeOrderOfPressureTerm = GlobalDataBase::GetIntParaFromDB("timeOrderOfPressureTerm");
+    if ( timeOrderOfPressureTerm == 1 )
+    {
+        (*pressureGradientTermCoef)( 0) = 0.0;
+        (*pressureGradientTermCoef)(-1) = 1.0;
+    }
+    else if ( timeOrderOfPressureTerm == 2 )
+    {
+        (*pressureGradientTermCoef)( 0) = 0.0;
+        (*pressureGradientTermCoef)(-1) = 2.0;
+        (*pressureGradientTermCoef)(-2) = -1.0;
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue( "timeOrderOfPressureTerm", timeOrderOfPressureTerm );
+    }
+}
+
+void SpecSolver::InitGlobal()
+{
+    SpecGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+    Range IF(istf, iedf);
+    Range JF(jstf, jedf);
+    Range KF(kstf, kedf);
+
+    int istp = GridData -> iStartPhysicalIndex;
+    int jstp = GridData -> jStartPhysicalIndex;
+    int kstp = GridData -> kStartPhysicalIndex;
+    int iedp = GridData -> iEndPhysicalIndex;
+    int jedp = GridData -> jEndPhysicalIndex;
+    int kedp = GridData -> kEndPhysicalIndex;
+    Range IP(istp, iedp);
+    Range JP(jstp, jedp);
+    Range KP(kstp, kedp);
+
+    int nstep = 0;
+    GlobalDataBase::UpdateData("nstep", &nstep, PHINT, 1);
+
+    //int nstart = GlobalDataBase::GetIntParaFromDB("nstart");
+    //if(!nstart)
+    //{
+    //    IsInitialization = true;
+    //}
+    //else
+    //{
+    //    IsInitialization = false;
+    //}
+
+    IsConvectiveTermFailed = false;
+    //IsPressureGradientFailed = false;
+
+    complexVelocityGradient = new Complex4D(IF, JF, KF, Range(1, 12), fortranArray);
+    realVelocityGradient = new RDouble4D(IP, JP, KP, Range(1, 12), fortranArray);
+    (*complexVelocityGradient)(IF, JF, KF, Range(1, 12)) = PHComplex(0.0, 0.0);
+    (*realVelocityGradient)(IP, JP, KP, Range(1, 12)) = 0.0;
+
+    complexVelocitySquare = new Complex4D(IF, JF, KF, Range(1, 12), fortranArray);
+    realVelocitySquare = new RDouble4D(IP, JP, KP, Range(1, 12), fortranArray);
+    (*complexVelocitySquare)(IF, JF, KF, Range(1, 12)) = PHComplex(0.0, 0.0);
+    (*realVelocitySquare)(IP, JP, KP, Range(1, 12)) = 0.0; 
+
+    complexViscousTerm = new Complex4D(IF, JF, KF, Range(1, 3), fortranArray);
+    (*complexViscousTerm)(IF, JF, KF, Range(1, 3)) = PHComplex(0.0, 0.0);
+    complexNonlinearTerm = new Complex4D(IF, JF, KF, Range(1, 3), fortranArray);
+    (*complexNonlinearTerm)(IF, JF, KF, Range(1, 3)) = PHComplex(0.0, 0.0);
+
+    WriteLogFile("Global data initialized!\n");
+}
+
+void SpecSolver::InitFieldData()
+{
+    InitFieldFileName();
+
+    AllocFieldData();
+
+    GetInitField();
+
+    WriteLogFile("Field data initialized!\n");
+}
+
+void SpecSolver::InitFieldFileName()
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    stringstream strmMyid;
+    strmMyid << myid;
+
+    string outputdir = "./results";
+    outputdir = GlobalDataBase::GetStrParaFromDB("outputdir");
+
+    velocityRestartFile = outputdir + "/Velocity_" + strmMyid.str() + ".rsta";
+    velocityBackupFile = outputdir + "/Velocity_" + strmMyid.str() + "_bk.rsta";
+    pressureRestartFile = outputdir + "/Pressure_" + strmMyid.str() + ".rsta";
+    pressureBackupFile = outputdir + "/Pressure_" + strmMyid.str() + "_bk.rsta";
+    velocityNameFile = outputdir + "/Velocity.nam";
+    fieldNameFile = outputdir + "/field.nam";
+}
+
+void SpecSolver::AllocFieldData()
+{
+    SpecGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex  ;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex  ;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex  ;
+
+    int istp = GridData -> iStartPhysicalIndex;
+    int jstp = GridData -> jStartPhysicalIndex;
+    int kstp = GridData -> kStartPhysicalIndex;
+    int iedp = GridData -> iEndPhysicalIndex;
+    int jedp = GridData -> jEndPhysicalIndex;
+    int kedp = GridData -> kEndPhysicalIndex;
+
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int kEndFourierIndexGlobal = GridData -> kEndFourierIndexGlobal;
+
+    Range IF(istf, iedf);
+    Range JF(jstf, jedf);
+    Range KF(kstf, kedf);
+
+    Range IP(istp, iedp);
+    Range JP(jstp, jedp);
+    Range KP(kstp, kedp);
+
+    complexU = new Complex3D(IF, JF, KF, fortranArray);
+    complexV = new Complex3D(IF, JF, KF, fortranArray);
+    complexW = new Complex3D(IF, JF, KF, fortranArray);
+    complexP = new Complex3D(IF, JF, KF, fortranArray);
+
+    complexDivergenceU = new Complex3D(IF, JF, KF, fortranArray);
+
+    (*complexU)(IF, JF, KF) = PHComplex(0.0, 0.0);
+    (*complexV)(IF, JF, KF) = PHComplex(0.0, 0.0);
+    (*complexW)(IF, JF, KF) = PHComplex(0.0, 0.0);
+    (*complexP)(IF, JF, KF) = PHComplex(0.0, 0.0);
+    (*complexDivergenceU)(IF, JF, KF) = PHComplex(0.0, 0.0);
+
+    realnut3d = new RDouble3D(IP, JP, KP, fortranArray);
+    (*realnut3d)(IP, JP, KP) = 0.0;
+
+    realnut = 0.0;
+
+    int nx = kEndFourierIndexGlobal - kStartFourierIndexGlobal + 1;
+    int nMax = int(sqrt(3.0 * nx * nx) + 0.5);
+
+    ek3DInit = new RDouble1D(Range(1, nMax), fortranArray);
+    (*ek3DInit)(Range(1, nMax)) = 0.0;
+
+    ek3D = new RDouble1D(Range(1, nMax), fortranArray);
+    (*ek3D)(Range(1, nMax)) = 0.0;
+}
+
+void SpecSolver::GetInitField()
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    if(myid == server)
+    {
+        WriteVelocityName();
+    }
+
+    int nstart = GlobalDataBase::GetIntParaFromDB("nstart");
+    if(!nstart)
+    {
+        InitProfile();
+    }
+    else
+    {
+        InitFromOldField();
+
+        int ifRescaleField = GlobalDataBase::GetIntParaFromDB("ifRescaleField");
+        if(ifRescaleField)
+        {
+            GetInitSpectrum();
+        }
+    }
+
+    OutputFieldRestartFile();
+}
+
+void SpecSolver::InitProfile()
+{
+    SpecGrid *GridData = GetGrid();
+
+    int ist = GridData -> iStartFourierIndex;
+    int jst = GridData -> jStartFourierIndex;
+    int kst = GridData -> kStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex;
+    int jed = GridData -> jEndFourierIndex;
+    int ked = GridData -> kEndFourierIndex;
+
+    Range I(ist, ied);
+    Range J(jst, jed);
+    Range K(kst, ked);
+
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int kEndFourierIndexGlobal = GridData -> kEndFourierIndexGlobal;
+
+    RDouble1D &realKX = *reinterpret_cast <RDouble1D *> (GridData -> realKX);
+    RDouble1D &realKY = *reinterpret_cast <RDouble1D *> (GridData -> realKY);
+    RDouble1D &realKZ = *reinterpret_cast <RDouble1D *> (GridData -> realKZ);
+
+    RDouble XL = GlobalDataBase::GetDoubleParaFromDB("XL");
+    RDouble YL = GlobalDataBase::GetDoubleParaFromDB("YL");
+    RDouble ZL = GlobalDataBase::GetDoubleParaFromDB("ZL");
+
+    const double pi = 2.0 * acos(0.0);
+
+    int nx = kEndFourierIndexGlobal - kStartFourierIndexGlobal + 1;
+    int nMax = int(sqrt(3.0 * nx * nx) + 0.5);
+
+    Range N(1, nMax);
+    RDouble1D *kAll = new RDouble1D(N, fortranArray);
+    RDouble1D *ekAll = new RDouble1D (N, fortranArray);
+
+    (*kAll)(N) = 0.0;
+    (*ekAll)(N) = 0.0;
+
+    RDouble kMax = static_cast<double> (nMax - kStartFourierIndexGlobal) / XL;
+
+    for(int i = 1; i <= nMax; ++i)
+    {
+        (*kAll)(i) = static_cast<double> (i - kStartFourierIndexGlobal) / XL;
+    }
+
+    (*complexP)(I, J, K) = PHComplex(0.0, 0.0);
+    (*complexU)(I, J, K) = PHComplex(0.0, 0.0);
+    (*complexV)(I, J, K) = PHComplex(0.0, 0.0);
+    (*complexW)(I, J, K) = PHComplex(0.0, 0.0);
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    srand((unsigned int)time(NULL) + (unsigned int)myid);
+
+    RDouble cp[3], vecr10[3], vecr20[3];
+
+    for(int ix = kst; ix <= ked ;++ix)
+    {
+        for(int iy = jst; iy <= jed; ++iy)
+        {
+            for(int iz = ist; iz <= ied; ++iz)
+            {
+                RDouble kx = realKX(ix);
+                RDouble ky = realKY(iy);
+                RDouble kz = realKZ(iz);
+
+                RDouble k2  = kx * kx + ky * ky + kz * kz;
+                RDouble modk = sqrt(k2);
+
+                if(k2 < TINY) continue;
+
+                RDouble vecK[3] = {kx, ky, kz};
+                RDouble vecK0[3] = {kx/modk, ky/modk, kz/modk};
+
+                // to find a vector vec0 which is not parallel to vecK0
+                RDouble vec0[3] = {1.0, 0.0, 0.0};
+                RDouble vec1[3] = {0.0, 1.0, 0.0};
+                RDouble vec2[3] = {0.0, 0.0, 1.0};
+
+                if(abs(DotProduct(vec1, vecK0, 3)) < abs(DotProduct(vec0, vecK0, 3)))
+                {
+                    vec0[0] = 0.0;
+                    vec0[1] = 1.0;
+                    vec0[2] = 0.0;
+                }
+
+                if(abs(DotProduct(vec2, vecK0, 3)) < abs(DotProduct(vec0, vecK0, 3)))
+                {
+                    vec0[0] = 0.0;
+                    vec0[1] = 0.0;
+                    vec0[2] = 1.0;
+                }
+
+                // to find vecr10 and vecr20 ,so that vecr10,vecr20,and vecK0 form a local rectangular coordinate system
+                CrossProduct(vecK0, vec0, cp);
+                NormVector(cp, vecr10, 3);
+
+                CrossProduct(vecK0, vecr10, vecr20);
+
+                RDouble phi = rand()/RDouble(RAND_MAX);
+                phi = 2.0 * pi * phi;
+
+                RDouble theta1 = rand()/RDouble(RAND_MAX);
+                theta1 = 2.0 * pi * theta1;
+
+                PHComplex alpha1 = PHComplex(cos(theta1), sin(theta1)) * cos(phi);
+                PHComplex vecUa[3] = {vecr10[0] * alpha1, vecr10[1] * alpha1, vecr10[2] * alpha1};
+
+                RDouble theta2 = rand()/RDouble(RAND_MAX);
+                theta2 = 2.0 * pi * theta2;
+
+                PHComplex alpha2 = PHComplex(cos(theta2), sin(theta2)) * cos(phi);
+                PHComplex vecUb[3] = {vecr20[0] * alpha2, vecr20[1] * alpha2, vecr20[2] * alpha2};
+
+                PHComplex vecU[3] = {vecUa[0]+vecUb[0], vecUa[1]+vecUb[1], vecUa[2]+vecUb[2]};
+
+                RDouble ek = 0.0;
+                GetAssumedSpectrum(modk, ek);
+
+                RDouble amplitude = sqrt(ek / (2.0 * pi * k2));
+
+                (*complexU)(iz, iy, ix) = amplitude * vecU[0];
+                (*complexV)(iz, iy, ix) = amplitude * vecU[1];
+                (*complexW)(iz, iy, ix) = amplitude * vecU[2];
+            }
+        }
+    }
+
+    InitPressure();
+
+    GetEkAll(ekAll, nMax);
+
+    if(myid == 0)
+    {
+        for(int ix = 1; ix <= nMax; ++ix)
+        {
+            RDouble ek = 0.0;
+            RDouble modk = (*kAll)(ix);
+
+            GetAssumedSpectrum(modk, ek);
+
+            int k = int(modk + 0.5);
+
+            if(k < 1 || k > nMax) continue;
+
+            (*ek3DInit)(k) = ek;
+        }
+    }
+    
+
+#ifdef PH_PARALLEL
+    PH_Bcast(&(*ek3DInit)(1), nMax * sizeof(RDouble), 0);
+#endif
+
+    if(myid == 0)
+    {
+        std::ostringstream oss;
+
+        oss << "variables = k, Ek, Ek3d_init" << endl;
+
+        oss << setiosflags(ios::left);
+        oss << setprecision(5);
+        oss << setiosflags(ios::scientific);
+        oss << setiosflags(ios::showpoint);
+
+        for(int ix = 2; ix <= nMax; ++ix)
+        {
+            RDouble modk = (*kAll)(ix);
+
+            int k = int(modk + 0.5);
+
+            oss << modk << "    ";
+            oss << (*ekAll)(k) << "    ";
+            oss << (*ek3DInit)(k) << "    ";
+            oss << "\n";
+        }
+        oss << endl;
+
+        string fileName = "initEk.dat";
+
+        fstream file;
+
+        ios_base::openmode openmode = ios_base::out|ios_base::trunc;
+
+        file.open(fileName.c_str(), openmode);
+
+        WriteASCIIFile(file, oss.str());
+
+        PHSPACE::CloseFile(file);
+    }
+
+    delete kAll; kAll = NULL;
+    delete ekAll; ekAll = NULL;
+}
+
+void SpecSolver::GetAssumedSpectrum(RDouble modk, RDouble &ek)
+{
+    Param_SpecSolver *parameters = GetControlParameters();
+    int spectrumType = parameters->GetSpectrumType();
+
+    if(spectrumType == 3)
+    {
+        GetCBCSpectrum(modk, ek);
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("spectrumType", spectrumType);
+    }
+}
+
+void SpecSolver::GetCBCSpectrum(RDouble modk, RDouble &ek)
+{
+    if(abs(modk) < 10 * TINY)
+    {
+        ek = 0.0;
+
+        return;
+    }
+
+    RDouble logmodk = log(modk);
+
+    RDouble logEk = 0.0;
+
+    RDouble *logK_CBC = SpectrumData -> logK_CBC;
+
+    RDouble *logEK_CBC = SpectrumData -> logEK_CBC;
+
+    RDouble *d2logEKdK2_CBC = SpectrumData -> d2logEKdK2_CBC;
+
+    int nPoints = SpectrumData -> nPoints;
+
+    Splint(logK_CBC, logEK_CBC, d2logEKdK2_CBC, nPoints, logmodk, logEk);
+
+    ek = exp(logEk);
+}
+
+void SpecSolver::InitPressure()
+{
+    SpecGrid *GridData = GetGrid();
+
+    RDouble1D &realKX = *reinterpret_cast <RDouble1D *> (GridData -> realKX);
+    RDouble1D &realKY = *reinterpret_cast <RDouble1D *> (GridData -> realKY);
+    RDouble1D &realKZ = *reinterpret_cast <RDouble1D *> (GridData -> realKZ);
+
+    int nXYZFourier = GridData -> nXYZFourier;
+    int nXYZPhysical = GridData -> nXYZPhysical;
+    int nXYZAll = GridData -> nXYZAll;
+
+    RDouble dnXYZAll = 1.0 / static_cast<double>(nXYZAll);
+
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    Range IF(istf, iedf);
+    Range JF(jstf, jedf);
+    Range KF(kstf, kedf);
+
+    int istp = GridData -> iStartPhysicalIndex;
+    int jstp = GridData -> jStartPhysicalIndex;
+    int kstp = GridData -> kStartPhysicalIndex;
+    int iedp = GridData -> iEndPhysicalIndex;
+    int jedp = GridData -> jEndPhysicalIndex;
+    int kedp = GridData -> kEndPhysicalIndex;
+
+    Range IP(istp, iedp);
+    Range JP(jstp, jedp);
+    Range KP(kstp, kedp);
+
+    (*complexVelocityGradient)(IF, JF, KF, 1) = (*complexU)(IF, JF, KF);
+    (*complexVelocityGradient)(IF, JF, KF, 2) = (*complexV)(IF, JF, KF);
+    (*complexVelocityGradient)(IF, JF, KF, 3) = (*complexW)(IF, JF, KF);
+
+    unsigned char opc2r[] = "tff";
+    Cp3dfft_btran_c2r_many(reinterpret_cast<double*>(&(*complexVelocityGradient)(istf, jstf, kstf, 1)), nXYZFourier, &(*realVelocityGradient)(istp, jstp, kstp, 1), nXYZPhysical, 3, opc2r);
+
+    for(int ix = istp; ix <= iedp; ++ix)
+    {
+        for(int iy = jstp; iy <= jedp; ++iy)
+        {
+            for(int iz = kstp; iz <= kedp; ++iz)
+            {
+                RDouble u = (*realVelocityGradient)(ix, iy, iz, 1);
+                RDouble v = (*realVelocityGradient)(ix, iy, iz, 2);
+                RDouble w = (*realVelocityGradient)(ix, iy, iz, 3);
+
+                (*realVelocityGradient)(ix, iy, iz, 1) = u * u;
+                (*realVelocityGradient)(ix, iy, iz, 2) = u * v;
+                (*realVelocityGradient)(ix, iy, iz, 3) = u * w;
+
+                (*realVelocityGradient)(ix, iy, iz, 4) = v * u;
+                (*realVelocityGradient)(ix, iy, iz, 5) = v * v;
+                (*realVelocityGradient)(ix, iy, iz, 6) = v * w;
+
+                (*realVelocityGradient)(ix, iy, iz, 7) = w * u;
+                (*realVelocityGradient)(ix, iy, iz, 8) = w * v;
+                (*realVelocityGradient)(ix, iy, iz, 9) = w * w;
+            }
+        }
+    }
+
+    unsigned char opr2c[] = "fft";
+    Cp3dfft_ftran_r2c_many(&(*realVelocityGradient)(istp, jstp, kstp, 1), nXYZPhysical, reinterpret_cast<double*>(&(*complexVelocityGradient)(istf, jstf, kstf, 1)), nXYZFourier, 9, opr2c);
+
+    (*complexVelocityGradient)(IF, JF, KF, Range(1, 9)) = (*complexVelocityGradient)(IF, JF, KF, Range(1, 9)) * dnXYZAll;
+
+    for(int ix = kstf; ix <= kedf; ++ix)
+    {
+        for(int iy = jstf; iy <= jedf; ++iy)
+        {
+            for(int iz = istf; iz <= iedf; ++iz)
+            {
+                RDouble kx = realKX(ix);
+                RDouble ky = realKY(iy);
+                RDouble kz = realKZ(iz);
+
+                RDouble k2  = kx * kx + ky * ky + kz * kz;
+
+                if(k2 < TINY)
+                {
+                    (*complexP)(iz, iy, ix) = 0.0;
+                    continue;
+                }
+
+                PHComplex uu = (*complexVelocityGradient)(iz, iy, ix, 1);
+                PHComplex uv = (*complexVelocityGradient)(iz, iy, ix, 2);
+                PHComplex uw = (*complexVelocityGradient)(iz, iy, ix, 3);
+                PHComplex vu = (*complexVelocityGradient)(iz, iy, ix, 4);
+                PHComplex vv = (*complexVelocityGradient)(iz, iy, ix, 5);
+                PHComplex vw = (*complexVelocityGradient)(iz, iy, ix, 6);
+                PHComplex wu = (*complexVelocityGradient)(iz, iy, ix, 7);
+                PHComplex wv = (*complexVelocityGradient)(iz, iy, ix, 8);
+                PHComplex ww = (*complexVelocityGradient)(iz, iy, ix, 9);
+
+                PHComplex laplacianU = -kx * kx * uu - kx * ky * uv - kx * kz * uw - ky * kx * vu - ky * ky * vv - ky * kz * vw - kz * kx * wu - kz * ky * wv - kz * kz * ww;
+
+                (*complexP)(iz, iy, ix) = laplacianU;
+            }
+        }
+    }
+}
+
+void SpecSolver::GetEkAll(RDouble1D *ek3D, int nMax)
+{
+    SpecGrid *GridData = GetGrid();
+
+    int ist = GridData -> iStartFourierIndex;
+    int jst = GridData -> jStartFourierIndex;
+    int kst = GridData -> kStartFourierIndex;
+    int ied = GridData -> iEndFourierIndex;
+    int jed = GridData -> jEndFourierIndex;
+    int ked = GridData -> kEndFourierIndex;
+
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+
+    RDouble1D &realKX = *reinterpret_cast <RDouble1D *> (GridData -> realKX);
+    RDouble1D &realKY = *reinterpret_cast <RDouble1D *> (GridData -> realKY);
+    RDouble1D &realKZ = *reinterpret_cast <RDouble1D *> (GridData -> realKZ);
+
+    RDouble1D *eK3DLocal = new RDouble1D(Range(1, nMax));
+    Int1D *incunt = new Int1D(Range(1, nMax));
+    Int1D *incuntLocal = new Int1D(Range(1, nMax));
+
+    (*eK3DLocal)(Range(1, nMax)) = 0.0;
+    (*incunt)(Range(1, nMax)) = 0;
+    (*incuntLocal)(Range(1, nMax)) = 0;
+
+    RDouble XL = GlobalDataBase::GetDoubleParaFromDB("XL");
+
+    const RDouble pi = 2.0 * acos(0.0);
+
+    RDouble kMax = static_cast<double> (nMax - 1) / XL;
+
+    for( int ix = kst; ix <= ked ;++ix )
+    {
+        for( int iy = jst; iy <= jed; ++iy )
+        {
+            for( int iz = ist; iz <= ied; ++iz)
+            {
+                RDouble kx = realKX(ix);
+                RDouble ky = realKY(iy);
+                RDouble kz = realKZ(iz);
+
+                RDouble k2  = kx * kx + ky * ky + kz * kz;
+                RDouble modk = sqrt(k2);
+
+                int kShell = int(modk + 0.5);
+
+                if(kShell > kMax || kShell == 0) continue;
+
+                int ib = 2;
+                if(kStartFourierIndexGlobal == kst && ix == kst)
+                {
+                    ib = 1;
+                }
+
+                RDouble uu = real( (*complexU)(iz, iy, ix) * conj((*complexU)(iz, iy, ix)) );
+                RDouble vv = real( (*complexV)(iz, iy, ix) * conj((*complexV)(iz, iy, ix)) );
+                RDouble ww = real( (*complexW)(iz, iy, ix) * conj((*complexW)(iz, iy, ix)) );
+
+                // Sum between (kShell-0.5, kShell+0.5)
+                (*incuntLocal)(kShell) = (*incuntLocal)(kShell) + ib;
+
+                (*eK3DLocal)(kShell) = (*eK3DLocal)(kShell) + ib * (uu + vv + ww) * (2.0 * pi * modk * modk);
+            }
+        }
+    }
+
+    //MPI_Reduce(&incuntLocal(1), &incunt(1), nMax, MPI_INTEGER, MPI_SUM, 0, MPI_COMM_WORLD);
+
+#ifdef PH_PARALLEL
+    PH_Reduce(&(*incuntLocal)(1), &(*incunt)(1), nMax, PH_SUM);
+    PH_Reduce(&(*eK3DLocal)(1), &(*ek3D)(1), nMax, PH_SUM);
+#endif
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    if(myid == 0)
+    {
+        for(int i = 1; i <= nMax; ++i)
+        {
+            (*incunt)(i) = max(1, (*incunt)(i));
+        }
+
+        for(int kShell = 1; kShell <= nMax; ++kShell)
+        {
+            RDouble ek = (*ek3D)(kShell);
+            RDouble ncunt = static_cast<RDouble> ((*incunt)(kShell));
+
+            (*ek3D)(kShell) = ek / ncunt;
+        }
+    }
+
+    PH_Bcast(&(*ek3D)(1), nMax * sizeof(RDouble), 0);
+
+    delete eK3DLocal; eK3DLocal = NULL;
+    delete incunt; incunt = NULL;
+    delete incuntLocal; incuntLocal = NULL;
+}
+
+void SpecSolver::InitFromOldField()
+{
+    ReadinVelocityRestartFile();
+
+    ReadinPressureRestartFile();
+}
+
+void SpecSolver::ReadinVelocityRestartFile()
+{
+    SpecGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    fstream velocityFile;
+    ios_base::openmode openMode = ios_base::in | ios_base::binary;
+    PHSPACE::OpenFile(velocityFile, velocityRestartFile.c_str(), openMode);
+
+    int inttmp[5];
+    PHRead(velocityFile, inttmp, 5);
+
+    int nout = (iedf - istf + 1) * (jedf - jstf + 1) * (kedf - kstf + 1);
+
+    PHRead(velocityFile, &(*complexU)(istf, jstf, kstf), nout);
+    PHRead(velocityFile, &(*complexV)(istf, jstf, kstf), nout);
+    PHRead(velocityFile, &(*complexW)(istf, jstf, kstf), nout);
+
+    PHSPACE::CloseFile(velocityFile);
+}
+
+void SpecSolver::ReadinPressureRestartFile()
+{
+    SpecGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    fstream pressureFile;
+    ios_base::openmode openMode = ios_base::in | ios_base::binary;
+    PHSPACE::OpenFile(pressureFile, pressureRestartFile.c_str(), openMode);
+
+    int inttmp[5];
+    PHRead(pressureFile, inttmp, 5);
+
+    int nout = (iedf - istf + 1) * (jedf - jstf + 1) * (kedf - kstf + 1);
+
+    PHRead(pressureFile, &(*complexP)(istf, jstf, kstf), nout);
+
+    PHSPACE::CloseFile(pressureFile);
+}
+
+void SpecSolver::GetInitSpectrum()
+{
+    SpecGrid *GridData = GetGrid();
+
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int kEndFourierIndexGlobal = GridData -> kEndFourierIndexGlobal;
+
+    int nx = kEndFourierIndexGlobal - kStartFourierIndexGlobal + 1;
+    int nMax = int(sqrt(3.0 * nx * nx) + 0.5);
+
+    Range N(1, nMax);
+
+    RDouble1D &kAll = *new RDouble1D(N, fortranArray);
+
+    RDouble XL = GlobalDataBase::GetDoubleParaFromDB("XL");
+
+    for(int i = 1; i <= nMax; ++i)
+    {
+        kAll(i) = static_cast<double> (i - kStartFourierIndexGlobal) / XL;
+    }
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    if(myid == 0)
+    {
+        for(int ix = 1; ix <= nMax; ++ix)
+        {
+            RDouble modk = kAll(ix);
+            RDouble ek = 0.0;
+
+            GetAssumedSpectrum(modk, ek);
+
+            (*ek3DInit)(int(modk + 0.5)) = ek;
+        }
+    }
+
+    PH_Bcast(&(*ek3DInit)(1), nMax * sizeof(RDouble), 0);
+
+    if(myid == 0)
+    {
+        std::ostringstream oss;
+
+        oss << "variables = k, Ek3d_init" << endl;
+
+        oss << setiosflags(ios::left);
+        oss << setprecision(5);
+        oss << setiosflags(ios::scientific);
+        oss << setiosflags(ios::showpoint);
+
+        for(int ix = 2; ix <= nMax; ++ix)
+        {
+            RDouble modk = kAll(ix);
+
+            oss << modk << "    ";
+            oss << (*ek3DInit)(int(modk + 0.5)) << "    ";
+            oss << "\n";
+        }
+        oss << endl;
+
+        string fileName = "initEk_bk.dat";
+
+        fstream file;
+
+        ios_base::openmode openmode = ios_base::out|ios_base::trunc;
+
+        file.open(fileName.c_str(), openmode);
+
+        WriteASCIIFile(file, oss.str());
+
+        PHSPACE::CloseFile(file);
+    }
+
+    delete &kAll;
+}
+
+void SpecSolver::OutputFieldRestartFile()
+{
+    Param_SpecSolver *parameters = GetControlParameters();
+    int intervalStepFlow = parameters->GetIntervalStepFlow();
+
+    int nstep = GlobalDataBase::GetIntParaFromDB("nstep");
+    
+    int nTwrest = nstep / intervalStepFlow;
+
+    string velocityFileName = "Velocity.rsta";
+    string pressureFileName = "Pressure.rsta";
+    if( nTwrest % 2 == 0 )
+    {
+        velocityFileName = velocityBackupFile;
+        pressureFileName = pressureBackupFile;
+    }
+    else
+    {
+        velocityFileName = velocityRestartFile;
+        pressureFileName = pressureRestartFile;
+    }
+
+    WriteVelocityRestartFile(velocityFileName);
+
+    WritePressureRestartFile(pressureFileName);
+}
+
+void SpecSolver::WriteVelocityRestartFile(string velocityFileName)
+{
+    SpecGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    Int1D *fourierIndexSize = GridData -> fourierIndexSize;
+
+    fstream velocityFile;
+    ios_base::openmode openMode = ios_base::out | ios_base::binary;
+    PHSPACE::OpenFile(velocityFile, velocityFileName.c_str(), openMode);
+
+    int inttmp = 1;
+    PHWrite(velocityFile, inttmp);
+
+    PHWrite(velocityFile, &(*fourierIndexSize)(1), 3);
+
+    inttmp = 3;
+    PHWrite(velocityFile, inttmp);
+
+    int nout = (iedf - istf + 1) * (jedf - jstf + 1) * (kedf - kstf + 1);
+
+    PHWrite(velocityFile, &(*complexU)(istf, jstf, kstf), nout);
+    PHWrite(velocityFile, &(*complexV)(istf, jstf, kstf), nout);
+    PHWrite(velocityFile, &(*complexW)(istf, jstf, kstf), nout);
+
+    PHSPACE::CloseFile(velocityFile);
+}
+
+void SpecSolver::WritePressureRestartFile(string pressureFileName)
+{
+    SpecGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    Int1D *fourierIndexSize = GridData -> fourierIndexSize;
+
+    fstream pressureFile;
+    ios_base::openmode openMode = ios_base::out | ios_base::binary;
+    PHSPACE::OpenFile(pressureFile, pressureFileName.c_str(), openMode);
+
+    int inttmp = 1;
+    PHWrite(pressureFile, inttmp);
+
+    PHWrite(pressureFile, &(*fourierIndexSize)(1), 3);
+
+    PHWrite(pressureFile, inttmp);
+
+    int nout = (iedf - istf + 1) * (jedf - jstf + 1) * (kedf - kstf + 1);
+
+    PHWrite(pressureFile, &(*complexP)(istf, jstf, kstf), nout);
+
+    PHSPACE::CloseFile(pressureFile);
+}
+
+void SpecSolver::Splint(RDouble *xa, RDouble *ya, RDouble *y2a, int n, RDouble x, RDouble &y)
+{
+    int klo = 0;
+    int khi = n - 1;
+
+    while((khi - klo) > 1)
+    {
+        int k = (khi + klo) / 2;
+
+        if(xa[k] > x)
+        {
+            khi = k;
+        }
+        else
+        {
+            klo = k;
+        }
+    }
+
+    RDouble h = xa[khi] - xa[klo];
+    if(abs(h) < TINY)
+    {
+        cout << "bad xa input in splint!" << endl;
+
+        TK_Exit::ExceptionExit( "bad xa input in splint! \n" );
+    }
+
+    RDouble a = (xa[khi] - x) / h;
+    RDouble b = (x - xa[klo]) / h;
+
+    y = a * ya[klo] + b * ya[khi] + ((pow(a, 3.0) - a) * y2a[klo] + (pow(b, 3.0) - b) * y2a[khi]) * (h * h) / 6.0;
+}
+
+/*
+RDouble SpecSolver:: DotProduct(RDouble *vec1, RDouble *vec2)
+{
+    RDouble product;
+
+    product = vec1[0] * vec2[0] + vec1[1] * vec2[1] + vec1[2] * vec2[2];
+
+    return product;
+}
+*/
+
+void SpecSolver::WriteVelocityName()
+{
+    fstream file;
+    file.open(velocityNameFile.c_str(), ios_base::out);
+    if ( !file )
+    {
+        TK_Exit::ExceptionExit("could not open velocityNameFile\n");
+    }
+    file << "u;velocity \n";
+    file << "v \n";
+    file << "w \n";
+    file.close();
+    file.clear();
+}
+
+void SpecSolver::OutputFieldName()
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    if(myid != 0)
+    {
+        return;
+    }
+
+    fstream file;
+    file.open(fieldNameFile.c_str(), ios_base::out);
+    if(!file)
+    {
+        TK_Exit::FileOpenErrorExit(fieldNameFile);
+    }
+    file << "p\n"
+         << "u;velocity\n"
+         << "v\n"
+         << "w\n";
+    file.close();
+    file.clear();
+}
+
+const string SpecSolver::GetResidualFileName()
+{
+    string resSaveFile = "res.dat";
+    GlobalDataBase::GetData("resSaveFile", &resSaveFile, PHSTRING, 1);
+    return resSaveFile;
+}
+
+void SpecSolver::RescaleVelocityField(const int nstep)
+{
+    int nRescale = GlobalDataBase::GetIntParaFromDB("nRescale");
+
+    RescaleFieldHIT *RescaleFieldData = GetRescaleFieldData();
+}
+
+void SpecSolver::GetStatistics()
+{
+    Param_SpecSolver *parameters = GetControlParameters();
+    int statisticMethod = parameters->GetStatisticMethod();
+    int viscousType = parameters->GetViscousType();
+
+    int nStatisticalStep = GlobalDataBase::GetIntParaFromDB("nStatisticalStep");
+    ++ nStatisticalStep;
+    GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+
+    SpecGrid *GridData = GetGrid();
+
+    int nY = GridData -> nY;
+    int nZ = GridData -> nZ;
+
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int jStartFourierIndexGlobal = GridData -> jStartFourierIndexGlobal;
+    int iStartFourierIndexGlobal = GridData -> iStartFourierIndexGlobal;
+    int kEndFourierIndexGlobal = GridData -> kEndFourierIndexGlobal;
+    int jEndFourierIndexGlobal = GridData -> jEndFourierIndexGlobal;
+    int iEndFourierIndexGlobal = GridData -> iEndFourierIndexGlobal;
+
+    Int2D *startAndEndFourierIndexOfAll = GridData -> startAndEndFourierIndexOfAll;
+
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+
+    Range I(istf, iedf);
+    Range J(jstf, jedf);
+    Range K(kstf, kedf);
+    Range XN(kStartFourierIndexGlobal, kEndFourierIndexGlobal);
+    Range YN(jStartFourierIndexGlobal, jEndFourierIndexGlobal);
+    Range ZN(iStartFourierIndexGlobal, iEndFourierIndexGlobal);
+    Range YNHalf(jStartFourierIndexGlobal, nY/2+1);
+    Range ZNHalf(kStartFourierIndexGlobal, nZ/2+1);
+    Range N3(1, 3);
+    Range N19(1, 19);
+
+    StatisticsHIT *StatisticData = GetStatisticData();
+
+    RDouble2D *energyOfUUKxAll = StatisticData -> energyOfUUKxAll;
+    RDouble2D *energyOfUUKyAll = StatisticData -> energyOfUUKyAll;
+    RDouble2D *energyOfUUKzAll = StatisticData -> energyOfUUKzAll;
+
+    RDouble2D *energyOfUUKxLocal = StatisticData -> energyOfUUKxLocal;
+    RDouble2D *energyOfUUKyLocal = StatisticData -> energyOfUUKyLocal;
+    RDouble2D *energyOfUUKzLocal = StatisticData -> energyOfUUKzLocal;
+
+    RDouble2D *energyOfUUKx = StatisticData -> energyOfUUKx;
+    RDouble2D *energyOfUUKy = StatisticData -> energyOfUUKy;
+    RDouble2D *energyOfUUKz = StatisticData -> energyOfUUKz;
+
+    StatisticData -> GetStatisticsLocal(GridData, complexU, complexV, complexW);
+
+    RDouble1D *statisticLocal = StatisticData -> statisticLocal;
+    RDouble1D *statisticAll = StatisticData -> statisticAll;
+    RDouble1D *statistic = StatisticData -> statistic;
+
+    int nstat = 19;
+    PH_Reduce(&(*statisticLocal)(1), &(*statisticAll)(1), nstat, PH_SUM);
+
+    int nx = kEndFourierIndexGlobal - kStartFourierIndexGlobal + 1;
+    int nMax = int(sqrt(3.0 * nx * nx) + 0.5);
+    GetEkAll(ek3D, nMax);
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int nTProcessor = GetNumberOfProcessor();
+
+    // !energyOfUUKxAll
+#ifdef PH_PARALLEL
+    if(myid == 0)
+    {
+#endif
+        (*energyOfUUKxAll)(XN, N3) = 0.0;
+        (*energyOfUUKxAll)(K, N3) = (*energyOfUUKxLocal)(K, N3);
+
+#ifdef PH_PARALLEL
+        RDouble2D *energyOfUUKxTmp = new RDouble2D(XN, N3, fortranArray);
+        for(int ip = 1; ip <= (nTProcessor - 1); ++ip)
+        {
+            int kstf_ip = (*startAndEndFourierIndexOfAll)(3, ip);
+            int kedf_ip = (*startAndEndFourierIndexOfAll)(6, ip);
+            int nReceive = kedf_ip - kstf_ip + 1;
+
+            (*energyOfUUKxTmp)(XN, N3) = 0.0;
+
+            for(int in = 1; in <= 3; ++in)
+            {
+                MPI_Status status;
+                MPI_Recv(&(*energyOfUUKxTmp)(kstf_ip, in), nReceive, MPI_DOUBLE, ip, ip, MPI_COMM_WORLD, &status);
+                (*energyOfUUKxAll)(Range(kstf_ip, kedf_ip), in) = (*energyOfUUKxAll)(Range(kstf_ip, kedf_ip), in) + (*energyOfUUKxTmp)(Range(kstf_ip, kedf_ip), in);
+            }
+        }
+
+        delete energyOfUUKxTmp; energyOfUUKxTmp = NULL;
+    }
+    else
+    {
+        int nSend = kedf - kstf + 1;
+        for(int in = 1; in <= 3; ++in)
+        {
+            MPI_Send(&(*energyOfUUKxLocal)(kstf, in), nSend,  MPI_DOUBLE, 0, myid, MPI_COMM_WORLD);
+        }
+    }
+#endif
+
+    // !energyOfUUKyAll
+#ifdef PH_PARALLEL
+    if(myid == 0)
+    {
+#endif
+        (*energyOfUUKyAll)(YN, N3) = 0.0;
+        (*energyOfUUKyAll)(J, N3) = (*energyOfUUKyLocal)(J, N3);
+
+#ifdef PH_PARALLEL
+        RDouble2D *energyOfUUKyTmp = new RDouble2D(YN, N3, fortranArray);
+        for(int ip = 1; ip <= (nTProcessor - 1); ++ip)
+        {
+            int jstf_ip = (*startAndEndFourierIndexOfAll)(2, ip);
+            int jedf_ip = (*startAndEndFourierIndexOfAll)(5, ip);
+            int nReceive = jedf_ip - jstf_ip + 1;
+
+            (*energyOfUUKyTmp)(YN, N3) = 0.0;
+
+            for(int in = 1; in <= 3; ++in)
+            {
+                MPI_Status status;
+                MPI_Recv(&(*energyOfUUKyTmp)(jstf_ip, in), nReceive, MPI_DOUBLE, ip, ip, MPI_COMM_WORLD, &status);
+                (*energyOfUUKyAll)(Range(jstf_ip, jedf_ip), in) = (*energyOfUUKyAll)(Range(jstf_ip, jedf_ip), in) + (*energyOfUUKyTmp)(Range(jstf_ip, jedf_ip), in);
+            }
+        }
+
+        delete energyOfUUKyTmp; energyOfUUKyTmp = NULL;
+    }
+    else
+    {
+        int nSend = jedf - jstf + 1;
+        for(int in = 1; in <= 3; ++in)
+        {
+            MPI_Send(&(*energyOfUUKyLocal)(jstf, in), nSend,  MPI_DOUBLE, 0, myid, MPI_COMM_WORLD);
+        }
+    }
+#endif
+
+    // !energyOfUUKzAll
+#ifdef PH_PARALLEL
+    if(myid == 0)
+    {
+#endif
+        (*energyOfUUKzAll)(ZN, N3) = 0.0;
+        (*energyOfUUKzAll)(I, N3) = (*energyOfUUKzLocal)(I, N3);
+
+#ifdef PH_PARALLEL
+        RDouble2D *energyOfUUKzTmp = new RDouble2D(ZN, N3, fortranArray);
+        for(int ip = 1; ip <= (nTProcessor - 1); ++ip)
+        {
+            int istf_ip = (*startAndEndFourierIndexOfAll)(1, ip);
+            int iedf_ip = (*startAndEndFourierIndexOfAll)(4, ip);
+            int nReceive = iedf_ip - istf_ip + 1;
+
+            (*energyOfUUKzTmp)(ZN, N3) = 0.0;
+
+            for(int in = 1; in <= 3; ++in)
+            {
+                MPI_Status status;
+                MPI_Recv(&(*energyOfUUKzTmp)(istf_ip, in), nReceive, MPI_DOUBLE, ip, ip, MPI_COMM_WORLD, &status);
+                (*energyOfUUKzAll)(Range(istf_ip, iedf_ip), in) = (*energyOfUUKzAll)(Range(istf_ip, iedf_ip), in) + (*energyOfUUKzTmp)(Range(istf_ip, iedf_ip), in);
+            }
+        }
+
+        delete energyOfUUKzTmp; energyOfUUKzTmp = NULL;
+    }
+    else
+    {
+        int nSend = iedf - istf + 1;
+        for(int in = 1; in <= 3; ++in)
+        {
+            MPI_Send(&(*energyOfUUKzLocal)(istf, in), nSend,  MPI_DOUBLE, 0, myid, MPI_COMM_WORLD);
+        }
+    }
+#endif
+
+    if(myid != procIDWithKx0Ky0)
+    {
+        return;
+    }
+
+    // !energyOfUUKyT
+    RDouble2D *energyOfUUKyT = new RDouble2D(YNHalf, N3, fortranArray);
+    (*energyOfUUKyT)(YNHalf, N3) = 0.0;
+
+    (*energyOfUUKyT)(jStartFourierIndexGlobal, N3) = (*energyOfUUKyAll)(jStartFourierIndexGlobal, N3);
+    (*energyOfUUKyT)(nY/2+1, N3) = (*energyOfUUKyAll)(nY/2+1, N3);
+
+    for(int iy = jStartFourierIndexGlobal+1; iy <= nY/2; ++iy)
+    {
+        (*energyOfUUKyT)(iy, N3) = (*energyOfUUKyAll)(iy, N3) + (*energyOfUUKyAll)(nY - iy + 2, N3);
+    }
+
+    // !energyOfUUKzT
+    RDouble2D *energyOfUUKzT = new RDouble2D(ZNHalf, N3, fortranArray);
+    (*energyOfUUKzT)(ZNHalf, N3) = 0.0;
+
+    (*energyOfUUKzT)(kStartFourierIndexGlobal, N3) = (*energyOfUUKzAll)(kStartFourierIndexGlobal, N3);
+    (*energyOfUUKzT)(nZ/2+1, N3) = (*energyOfUUKzAll)(nZ/2+1, N3);
+
+    for(int ix = kStartFourierIndexGlobal+1; ix <= nZ/2; ++ix)
+    {
+        (*energyOfUUKzT)(ix, N3) = (*energyOfUUKzAll)(ix, N3) + (*energyOfUUKzAll)(nZ - ix + 2, N3);
+    }
+
+    if(statisticMethod == 1)
+    {
+        RDouble c1 = 1.0 / (nStatisticalStep * 1.0);
+        RDouble c2 = 1.0 - c1;
+
+        (*statistic)(N19) = c2 * (*statistic)(N19) + c1 * (*statisticAll)(N19);
+
+        (*energyOfUUKx)(XN, N3) = c2 * (*energyOfUUKx)(XN, N3) + c1 * (*energyOfUUKxAll)(XN, N3);
+        (*energyOfUUKy)(YNHalf, N3) = c2 * (*energyOfUUKy)(YNHalf, N3) + c1 * (*energyOfUUKyT)(YNHalf, N3);
+        (*energyOfUUKz)(ZNHalf, N3) = c2 * (*energyOfUUKz)(ZNHalf, N3) + c1 * (*energyOfUUKzT)(ZNHalf, N3);
+
+        RDouble nutAverage = StatisticData -> nutAverage;
+
+        if(viscousType > 1)
+        {
+            nutAverage = c2 * nutAverage + c1 * realnut;
+        }
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("statisticMethod", statisticMethod);
+    }
+
+    delete energyOfUUKyT; energyOfUUKyT = NULL;
+    delete energyOfUUKzT; energyOfUUKzT = NULL;
+}
+
+void SpecSolver::OutputResidual()
+{
+    ActionKey *actkeyDumpResidual = new ActionKey();
+    FillActionKey(actkeyDumpResidual, DUMP_RESIDUAL, 0);
+    DumpRes(actkeyDumpResidual);
+    delete actkeyDumpResidual;
+}
+
+void SpecSolver::DumpRes(ActionKey *actkey)
+{
+    SpecGrid *GridData = GetGrid();
+
+    string formatRes;
+    PrepareFormatedResidual(formatRes);
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+
+    if(myid != procIDWithKx0Ky0)
+    {
+        return;
+    }
+
+    string resFile = GetResidualFileName();
+    if (resFile == "")
+    {
+        return;
+    }
+
+    actkey->filename = resFile;
+    ios_base::openmode openmode = ios_base::out|ios_base::app;
+    actkey->openmode = openmode;
+
+    if (!actkey->IsNeedOpenFile())
+    {
+        return;
+    }
+
+    ParallelOpenFile(actkey);
+
+    std::ostringstream oss;
+    fstream &file = *(actkey->file);
+
+    if (IfFileEmpty(file))
+    {
+        oss << "Title=\"RES\"" << endl;
+        oss << "Variables=" << endl;
+        oss << "nstep" << endl;
+        oss << "time" << endl;
+        oss << "Ek" << endl;
+        oss << "Re_EddyLength" << endl;
+        oss << "Re_TaylorScale" << endl;
+        oss << "eddyLength" << endl;
+        oss << "integralLength" << endl;
+        oss << "KolmogorovLength" << endl;
+        oss << "lambda" << endl;
+        oss << "epsilon" << endl;
+        oss << "skewness" << endl;
+    }
+
+    oss << formatRes;
+
+    WriteASCIIFile(file, oss.str());
+
+    ParallelCloseFile(actkey);
+}
+
+void SpecSolver::PrepareFormatedResidual(string &res)
+{
+    Param_SpecSolver *parameters = GetControlParameters();
+    RDouble reynolds = parameters->GetRefReNumber();
+    RDouble timeStep = parameters->GetTimeStep();
+
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    int istp = GridData -> iStartPhysicalIndex;
+    int jstp = GridData -> jStartPhysicalIndex;
+    int kstp = GridData -> kStartPhysicalIndex;
+    int iedp = GridData -> iEndPhysicalIndex;
+    int jedp = GridData -> jEndPhysicalIndex;
+    int kedp = GridData -> kEndPhysicalIndex;
+
+    int nX = GridData -> nX;
+
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+
+    int nX2 = GridData -> nX2;
+    int nY2 = GridData -> nY2;
+    int nZ2 = GridData -> nZ2;
+
+    Range I(istf, iedf);
+    Range J(jstf, jedf);
+    Range K(kstf, kedf);
+
+    Range IP(istp, iedp);
+    Range JP(jstp, jedp);
+    Range KP(kstp, kedp);
+
+    RDouble1D *statisticAll = StatisticData -> statisticAll;
+
+    (*complexDivergenceU)(I, J, K) = (*complexVelocityGradient)(I, J, K, 1) + (*complexVelocityGradient)(I, J, K, 5) + (*complexVelocityGradient)(I, J, K, 9);
+
+    RDouble sumDivU = 0.0;
+    for(int ix = kstf; ix <= kedf; ++ix)
+    {
+        for(int iy = jstf; iy <= jedf; ++iy)
+        {
+            for(int iz = istf; iz <= iedf; ++iz)
+            {
+                sumDivU = sumDivU + real( (*complexDivergenceU)(iz, iy, ix) * conj((*complexDivergenceU)(iz, iy, ix)) );
+            }
+        }
+    }
+
+    RDouble divavg = sqrt(2.0 * sumDivU);
+
+    RDouble dudx2 = 0.0;
+    RDouble dudx3 = 0.0;  
+
+    for(int iz = kstf; iz <= kedf; ++iz)
+    {
+        for(int iy = jstf; iy <= jedf; ++iy)
+        {
+            for(int ix = istf; ix <= iedf; ++ix)
+            {
+                RDouble dudx = (*realVelocityGradient)(ix, iy, iz, 1);
+
+                dudx2 = dudx2 + dudx * dudx;
+                dudx3 = dudx3 + dudx * dudx * dudx;
+            }
+        }
+    }
+
+    RDouble *wmpiloc = new RDouble[3];
+    RDouble *wmpi = new RDouble[3];
+
+    wmpiloc[0] = divavg;
+    wmpiloc[1] = dudx2;
+    wmpiloc[2] = dudx3;
+
+    wmpi[0] = divavg;
+    wmpi[1] = dudx2;
+    wmpi[2] = dudx3;
+
+    PH_Reduce(wmpiloc, wmpi, 3, PH_SUM);
+
+    divavg = wmpi[0];
+    dudx2 = wmpi[1] / (nX2 * nY2 * nZ2);
+    dudx3 = wmpi[2] / (nX2 * nY2 * nZ2);
+
+    RDouble skewness = dudx3 / (sqrt(dudx2 * dudx2 * dudx2) + TINY);
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+
+    if(myid == procIDWithKx0Ky0)
+    {
+        RDouble avgGradu2 = ((*statisticAll)(11) + (*statisticAll)(15) + (*statisticAll)(19)) / 3.0;
+
+        RDouble eps = (*statisticAll)(10) / reynolds;
+
+        RDouble kineticEnergy = 0.5 * ((*statisticAll)(4) + (*statisticAll)(5) + (*statisticAll)(6));
+
+        RDouble uprm = sqrt(2.0 / 3.0 * kineticEnergy);
+
+        RDouble eddyLength = sqrt(kineticEnergy * kineticEnergy * kineticEnergy) / eps;
+
+        RDouble reynoldsEddyLength = sqrt(kineticEnergy) * eddyLength * reynolds;
+
+        RDouble transverseTaylorScale = uprm / sqrt(avgGradu2);
+
+        RDouble reynoldsTaylorScale = uprm * transverseTaylorScale * reynolds;
+
+        RDouble KolmogorovLength = sqrt(sqrt(1.0 / (eps * reynolds * reynolds *reynolds)));
+
+        RDouble intEdk = 0.0;
+        for(int kshell = 1; kshell <= nX / 2; ++kshell)
+        {
+            intEdk = intEdk + (*ek3D)(kshell) / static_cast<RDouble> (kshell);
+        }
+
+        const double pi = 2.0 * acos(0.0);
+
+        RDouble integralLength = pi / 2.0 * intEdk / (uprm + TINY);
+
+        int nstep = GlobalDataBase::GetIntParaFromDB("nstep");
+
+        ostringstream oss;
+
+        oss << setiosflags(ios::left);
+        oss << setprecision(5);
+        oss << setiosflags(ios::scientific);
+        oss << setiosflags(ios::showpoint);
+
+        oss << nstep << "    ";
+        oss << static_cast<double>(nstep) * timeStep << "    ";
+        oss << kineticEnergy << "    ";
+        oss << reynoldsEddyLength << "    ";
+        oss << reynoldsTaylorScale << "    ";
+        oss << eddyLength << "    ";
+        oss << integralLength << "    ";
+        oss << KolmogorovLength << "    ";
+        oss << transverseTaylorScale << "    ";
+        oss << eps << "    ";
+        oss << skewness << endl;
+
+        res = oss.str();
+    }
+
+    delete []wmpiloc;
+    delete []wmpi;
+}
+
+void SpecSolver::OutputStatisticVisual()
+{
+    StatisticData -> OutputStatisticVisual(GridData);
+}
+
+void SpecSolver::OutputRestartData()
+{
+    OutputFieldRestartFile();
+
+    OutputOldTimeData();
+
+    StatisticData -> OutputStatisticRestart(GridData);
+}
+
+void SpecSolver::OutputOldTimeData()
+{
+    Param_SpecSolver *parameters = GetControlParameters();
+    int intervalStepFlow = parameters->GetIntervalStepFlow();
+
+    int nstep = GlobalDataBase::GetIntParaFromDB("nstep");
+
+    int inout = nstep / intervalStepFlow;
+
+    string nonlinearTermFileName, pressureGradientTermFileName, laplacianVelocityTermFileName;
+    if(inout % 2  == 0)
+    {
+        nonlinearTermFileName = nonlinearTermBackupFile;
+        pressureGradientTermFileName = pressureGradientTermBackupFile;
+        laplacianVelocityTermFileName = laplacianVelocityTermBackupFile;
+    }
+    else
+    {
+        nonlinearTermFileName = nonlinearTermFile;
+        pressureGradientTermFileName = pressureGradientTermFile;
+        laplacianVelocityTermFileName = laplacianVelocityTermFile;
+    }
+
+    WriteConvectiveTerm(nonlinearTermFileName);
+
+    WriteTimeDependentInformation();
+}
+
+void SpecSolver::WriteConvectiveTerm(const string nonlinearTermFileName)
+{
+    //SpecDiffHybGrid *GridData = GetGrid();
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    Int1D *fourierIndexSize = GridData -> fourierIndexSize;
+
+    fstream file;
+    ios_base::openmode openMode = ios_base::out | ios_base::binary;
+    PHSPACE::OpenFile(file, nonlinearTermFileName.c_str(), openMode);
+
+    int inttmp = 1;
+    PHWrite(file, inttmp);
+
+    PHWrite(file, &(*fourierIndexSize)(1), 3);
+
+    inttmp = 3;
+    PHWrite(file, inttmp);
+
+    int nout = 3 * (iedf - istf + 1) * (jedf - jstf + 1) * (kedf - kstf + 1);
+
+    PHWrite(file, &(*convectiveTerm)(istf, jstf, kstf, 1), nout);
+
+    PHSPACE::CloseFile(file);
+}
+
+void SpecSolver::WriteTimeDependentInformation()
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+    if(myid != procIDWithKx0Ky0)
+    {
+        return;
+    }
+
+    int nstep = GlobalDataBase::GetIntParaFromDB("nstep");
+    fstream file;
+    file.open(timeInformationRestartFile.c_str(), ios_base::out);
+    if(!file)
+    {
+        TK_Exit::FileOpenErrorExit(timeInformationRestartFile);
+    }
+    file << setw(20) << nstep;
+    file.close();
+    file.clear();
+}
+
+void SpecSolver::FillActionKey(ActionKey *actkey, int action, int level)
+{
+    actkey->action     = action;
+    actkey->solver     = 1;
+    actkey->solverID   = 0;
+    actkey->kind       = SOLVER_BASED;
+    actkey->level      = level;
+}
+
+bool SpecSolver::JudgeIfRestart()
+{
+    string outputdir = "./results";
+    outputdir = GlobalDataBase::GetStrParaFromDB("outputdir");
+
+    string restartNSFile = outputdir + "/Velocity_0.rsta";
+    //GlobalDataBase::GetData("restartNSFile", &restartNSFile, PHSTRING, 1);
+
+    //if(PHMPI::IsParallelRun())
+    //{
+    //    restartNSFile = PHSPACE::AddSymbolToFileName(restartNSFile, "_", 0);
+    //}
+
+    bool restart_flag = false;
+
+    ifstream infile(restartNSFile.c_str(), ios::in);
+    if ( infile )
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+void SpecSolver::NormVector(RDouble *vecIn, RDouble *vecOut, int nDim)
+{
+    RDouble s = 0.0;
+    for (int i = 0; i < nDim; ++ i)
+    {
+        s += vecIn[i] * vecIn[i];
+    }
+
+    const RDouble one = 1.0;
+    RDouble os = one / (s + SMALL);
+
+    for (int i = 0; i < nDim; ++ i)
+    {
+        vecOut[i] = vecIn[i] * os;
+    }
+}
+
+void SpecSolver::DeAllocateGlobalVariables()
+{
+    delete nonlinearTermCoef; nonlinearTermCoef = NULL;
+    delete pressureGradientTermCoef; pressureGradientTermCoef = NULL;
+    delete convectiveTerm; convectiveTerm = NULL;
+    delete complexLaplacianVelocityTerm; complexLaplacianVelocityTerm = NULL;
+    delete complexPressureGradientTerm; complexPressureGradientTerm = NULL;
+
+    delete complexViscousTerm; complexViscousTerm = NULL;
+    delete complexNonlinearTerm; complexNonlinearTerm = NULL;
+    delete complexVelocityGradient; complexVelocityGradient = NULL;
+    delete realVelocityGradient; realVelocityGradient = NULL;
+    delete complexVelocitySquare; complexVelocitySquare = NULL;
+    delete realVelocitySquare; realVelocitySquare = NULL;
+
+    delete complexU; complexU = NULL;
+    delete complexV; complexV = NULL;
+    delete complexW; complexW = NULL;
+    delete complexP; complexP = NULL;
+    delete complexDivergenceU; complexDivergenceU = NULL;
+    delete realnut3d; realnut3d = NULL;
+
+    delete ek3DInit; ek3DInit = NULL;
+    delete ek3D; ek3D = NULL;
+
+    delete SpectrumData; SpectrumData = NULL;
+
+    delete GridData; GridData = NULL;
+    
+    delete RescaleFieldData; RescaleFieldData = NULL;
+    
+    delete StatisticData; StatisticData = NULL;
+
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    if(viscousType > 1)
+    {
+        delete LESData; LESData = NULL;
+    }
+}
+
+void SpecSolver::InitControlParameters()
+{
+    FreeControlParameters();
+    controlParameters = new Param_SpecSolver();
+    controlParameters->Init();
+
+    WriteLogFile("Control parameters initialized!\n");
+}
+
+LIB_EXPORT Param_SpecSolver *SpecSolver::GetControlParameters() const
+{
+    return controlParameters;
+}
+
+void SpecSolver::FreeControlParameters()
+{
+    if (controlParameters)
+    {
+        delete controlParameters;
+        controlParameters = NULL;
+    }
+}
+
+}
\ No newline at end of file
diff --git a/CFD/SpecDiffHybSolver/src/Spectrum.cpp b/CFD/SpecDiffHybSolver/src/Spectrum.cpp
new file mode 100644
index 0000000..c7b6dd7
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/src/Spectrum.cpp
@@ -0,0 +1,202 @@
+#include "Spectrum.h"
+#include "Param_Spectrum.h"
+#include "SpecDiffHybGrid.h"
+#include "PHHeader.h"
+#include "GlobalDataBase.h"
+#include "TK_Exit.h"
+#include "TK_Parse.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+Spectrum::Spectrum()
+{
+}
+
+Spectrum::~Spectrum()
+{
+    delete []k_CBC;
+    delete []eK_CBC;
+    delete []logK_CBC;
+    delete []logEK_CBC;
+    delete []d2logEKdK2_CBC;
+}
+
+void Spectrum::InitSpectrumData()
+{
+    //Param_Spectrum *parameters = GetControlParameters();
+    spectrumType = GlobalDataBase::GetIntParaFromDB("spectrumType");
+    nPoints = 20;
+
+    AllocSpectrumData(nPoints);
+
+    if(spectrumType == 3)
+    {
+        InitCBCSpectrum();
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("spectrumType", spectrumType);
+    }
+}
+
+void Spectrum::AllocSpectrumData(int nPoints)
+{
+    k_CBC = new RDouble [nPoints];
+    eK_CBC = new RDouble [nPoints];
+    logK_CBC = new RDouble [nPoints];
+    logEK_CBC = new RDouble [nPoints];
+    d2logEKdK2_CBC = new RDouble [nPoints];
+
+    PHSPACE::SetField(k_CBC, 0.0, nPoints);
+    PHSPACE::SetField(eK_CBC, 0.0, nPoints);
+    PHSPACE::SetField(logK_CBC, 0.0, nPoints);
+    PHSPACE::SetField(logEK_CBC, 0.0, nPoints);
+    PHSPACE::SetField(d2logEKdK2_CBC, 0.0, nPoints);
+}
+
+void Spectrum::InitCBCSpectrum()
+{
+    const RDouble pi = 2.0 * acos(0.0);
+    const RDouble m = 0.0508;
+    const RDouble u0 = 10.0;
+    const RDouble re = 34000.0;
+    const RDouble lRef = 10.0 * m / (2.0 * pi);
+    const RDouble tRef = 64.0 * m / u0;
+    const RDouble uRef = lRef / tRef;
+
+    RDouble dlogEKdK1_CBC = 0.0;
+    RDouble dlogEKdKn_CBC = 0.0;
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    //int procIDWithKx0Ky0 = GridData -> procIDWithKx0Ky0;
+    if(myid == 0)
+    {
+        ReadCBCSpectrum();
+
+        RDouble kScale = 100.0 * lRef;
+        RDouble eKScale = 1.0e-6 * tRef * tRef / (lRef * lRef * lRef);
+
+        for(int n = 0; n < nPoints; ++n)
+        {
+            k_CBC[n] = k_CBC[n] * kScale;
+            eK_CBC[n] = eK_CBC[n] * eKScale;
+
+            logK_CBC[n] = log(k_CBC[n]);
+            logEK_CBC[n] = log(eK_CBC[n]);
+        }
+
+        WriteCBCSpectrum();
+
+        dlogEKdK1_CBC = (logEK_CBC[1] - logEK_CBC[0]) / (logK_CBC[1] - logK_CBC[0]);
+        dlogEKdKn_CBC = (logEK_CBC[nPoints - 1] - logEK_CBC[nPoints - 2]) / (logK_CBC[nPoints - 1] - logK_CBC[nPoints - 2]);
+
+        Spline(k_CBC, eK_CBC, nPoints, dlogEKdK1_CBC, dlogEKdKn_CBC, d2logEKdK2_CBC);
+    }
+    
+    MPI_Bcast(&nPoints, 1, MPI_INTEGER, 0, MPI_COMM_WORLD);
+    MPI_Bcast(logK_CBC, nPoints, MPI_DOUBLE, 0, MPI_COMM_WORLD);
+    MPI_Bcast(logEK_CBC, nPoints, MPI_DOUBLE, 0, MPI_COMM_WORLD);
+    MPI_Bcast(d2logEKdK2_CBC, nPoints, MPI_DOUBLE, 0, MPI_COMM_WORLD);
+    MPI_Bcast(&dlogEKdK1_CBC, 1, MPI_DOUBLE, 0, MPI_COMM_WORLD);
+    MPI_Bcast(&dlogEKdKn_CBC, 1, MPI_DOUBLE, 0, MPI_COMM_WORLD);
+}
+
+void Spectrum::ReadCBCSpectrum()
+{
+    string filename = "ek.dat";
+    filename = GlobalDataBase::GetStrParaFromDB("ekCBCfilename");
+    fstream file;
+    file.open(filename.c_str(),ios_base::in);
+    if ( !file )
+    {
+        TK_Exit::FileOpenErrorExit(filename);
+    }
+
+    string line,word;
+    string separator  = " =\t\r\n#$,;\"'";
+
+    for(int n = 0; n < nPoints; ++n)
+    {
+        ReadNewLine(file, line);
+
+        line = FindNextWord(line, word, separator);
+        from_string< double >( k_CBC[n], word, std::dec );
+
+        line = FindNextWord(line, word, separator);
+        from_string< double >( eK_CBC[n], word, std::dec );
+    }
+    file.close();
+    file.clear();
+}
+
+void Spectrum::WriteCBCSpectrum()
+{
+    string filename = "ek_rescale.dat";
+
+    fstream file;
+    file.open(filename.c_str(),ios_base::out);
+    if ( !file )
+    {
+        TK_Exit::FileOpenErrorExit(filename);
+    }
+    file << "variables = k, Ek \n";
+    for (int n = 0; n < nPoints; ++ n)
+    {
+        file << setiosflags(ios::right);
+        file << setprecision(10);
+        file << setiosflags(ios::scientific);
+        file << setiosflags(ios::showpoint);
+        file << setw(20) << k_CBC[n]
+             << setw(20) << eK_CBC[n]
+             << "\n";
+    }
+    file.close();
+    file.clear();
+}
+
+void Spectrum::Spline(RDouble *x, RDouble *y, int n, RDouble yp1, RDouble ypn, RDouble *y2)
+{
+    RDouble *u = new RDouble [nPoints];
+    PHSPACE::SetField(u, 0.0, nPoints);
+
+    if(yp1 > LARGE)
+    {
+        y2[0] = 0.0;
+        u[0] = 0.0;
+    }
+    else
+    {
+        y2[0] = -0.5;
+        u[0] = 3.0 / (x[1] - x[0]) * ((y[1] - y[0]) / (x[1] - x[0]) - yp1);
+    }
+
+    for(int i = 1; i < n-1; ++i)
+    {
+        RDouble sig = (x[i] - x[i-1]) / (x[i+1] - x[i-1]);
+        RDouble p = sig * y2[i-1] + 2.0;
+        y2[i] = (sig - 1.0) / p;
+        u[i] = (6.0 * ((y[i+1] - y[i])/(x[i+1] - x[i]) - (y[i] - y[i-1]) / (x[i] - x[i-1])) / (x[i+1] - x[i-1]) - sig * u[i-1]) / p;
+    }
+
+    RDouble qn = 0.0;
+    RDouble un = 0.0;
+    if(ypn < LARGE)
+    {
+        qn = 0.5;
+        un = 3.0 / (x[n-1] - x[n-2]) * (ypn - (y[n-1] - y[n-2]) / (x[n-1] - x[n-2]));
+    }
+
+    y2[n-1] = (un - qn * u[n-2]) / (qn * y2[n-2] + 1.0);
+
+    for(int i = n-2; i >= 0; --i)
+    {
+        y2[i] = y2[i] * y2[i+1] + u[i];
+    }
+
+    delete []u;
+}
+
+}
diff --git a/CFD/SpecDiffHybSolver/src/Statistics.cpp b/CFD/SpecDiffHybSolver/src/Statistics.cpp
new file mode 100644
index 0000000..b1a9a18
--- /dev/null
+++ b/CFD/SpecDiffHybSolver/src/Statistics.cpp
@@ -0,0 +1,2369 @@
+#include "Statistics.h"
+#include "GlobalDataBase.h"
+#include "PHMpi.h"
+#include "TK_Exit.h"
+#include "PHHeader.h"
+#include "TK_Parse.h"
+#include "Constants.h"
+#include "SpecDiffHybSolver.h"
+//#include "SpecSolver.h"
+#include "PHIO.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+StatisticsHIT::StatisticsHIT()
+{
+}
+
+StatisticsHIT::~StatisticsHIT()
+{
+    delete statisticAll; statisticAll = NULL;
+    delete statisticLocal; statisticLocal = NULL;
+    delete statistic; statistic = NULL;
+
+    delete energyOfUUKx; energyOfUUKx = NULL;
+    delete energyOfUUKxAll; energyOfUUKxAll = NULL;
+    delete energyOfUUKxLocal; energyOfUUKxLocal = NULL;
+
+    delete energyOfUUKy; energyOfUUKy = NULL;
+    delete energyOfUUKyAll; energyOfUUKyAll = NULL;
+    delete energyOfUUKyLocal; energyOfUUKyLocal = NULL;
+}
+
+Statistics::Statistics()
+{
+}
+
+Statistics::~Statistics()
+{
+    delete statisticAll; statisticAll = NULL;
+    delete statisticLocal; statisticLocal = NULL;
+    delete statistic; statistic = NULL;
+
+    delete nutAverage; nutAverage = NULL;
+
+    delete energyOfUUKx; energyOfUUKx = NULL;
+    delete energyOfUUKxAll; energyOfUUKxAll = NULL;
+    delete energyOfUUKxLocal; energyOfUUKxLocal = NULL;
+
+    delete energyOfUUKy; energyOfUUKy = NULL;
+    delete energyOfUUKyAll; energyOfUUKyAll = NULL;
+    delete energyOfUUKyLocal; energyOfUUKyLocal = NULL;
+}
+
+void StatisticsHIT::InitStatisticsData(SpecGrid *GridData)
+{
+    int nStatisticalStep = 0;
+    GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+
+    int istf = GridData->iStartFourierIndex;
+    int iedf = GridData->iEndFourierIndex;
+    iz_half = istf + (iedf - istf + 1) / 2;
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+
+    if (myid == procIDWithKx0Ky0)
+    {
+        InitStatisticsFileName();
+    }
+
+    AllocStatisticsdata(GridData);
+
+    InitStatisticsDataValue(GridData);
+
+    int startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+    if (myid == procIDWithKx0Ky0)
+    {
+        //if (startStatisticStep < 0)
+        if(IfStatisticExist())
+        {
+            InputStatistics(GridData);
+        }
+        else
+        {
+            ifInitStatistic = true;
+        }
+
+        WriteStatisticsName();
+    }
+}
+
+void Statistics::InitStatisticsData(SpecDiffHybGrid *GridData)
+{
+    int nStatisticalStep = 0;
+    GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+
+    //inutavg = 0;
+
+    tauWAverage = 0.0;
+
+    int istf = GridData->iStartFourierIndex;
+    int iedf = GridData->iEndFourierIndex;
+    iz_half = istf + (iedf - istf + 1) / 2;
+
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+
+    if (myid == procIDWithKx0Ky0)
+    {
+        InitStatisticsFileName();
+        OutputPlot3dGrid(GridData);
+    }
+
+    AllocStatisticsdata(GridData);
+    InitStatisticsDataValue(GridData);
+
+    int startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+    if (myid == procIDWithKx0Ky0)
+    {
+        //if (startStatisticStep < 0)
+        if(IfStatisticExist())
+        {
+            InputStatistics(GridData);
+        }
+        else
+        {
+            ifInitStatistic = true;
+        }
+
+        WriteStatisticsName();
+    }
+}
+
+void StatisticsHIT::InitStatisticsFileName()
+{
+    string outputdir = "./results";
+    outputdir = GlobalDataBase::GetStrParaFromDB("outputdir");
+
+    zGridPlot3dFile = outputdir + "/Zgrid.x";
+    zHalfGridPlot3dFile = outputdir + "/Zgrid_half.x";
+    statisticsNameFile = outputdir + "/Statistic.nam";
+    statisticsRestartFile = outputdir + "/Statistic.rsta";
+    statisticsRestartTimeFile = outputdir + "/Statistic_t.rsta";
+    statisticsInformationFile = outputdir + "/Statistic.info";
+}
+
+void Statistics::OutputPlot3dGrid(SpecDiffHybGrid *GridData)
+{
+    int istf = GridData->iStartFourierIndex;
+    int iedf = GridData->iEndFourierIndex;
+    Int1D *fourierIndexSize = GridData->fourierIndexSize;
+    RDouble1D *rZ = GridData->realZ;
+
+    int wordwidth = 20;
+    fstream file;
+    file.open(zGridPlot3dFile.c_str(), ios_base::out);
+    if (!file)
+    {
+        TK_Exit::ExceptionExit("could not open zGridPlot3dFile\n");
+    }
+    file << setw(wordwidth) << 1 << "\n";
+    file << setw(wordwidth) << 1 << setw(wordwidth) << 1 << setw(wordwidth) << (*fourierIndexSize)(1) << "\n";
+    for (int iz = istf; iz <= iedf; ++ iz)
+    {
+        file << setiosflags(ios::left);
+        file << setiosflags(ios::scientific);
+        file << setprecision(10);
+        file << setw(wordwidth);
+        file << 0.0;
+    }
+    for (int iz = istf; iz <= iedf; ++ iz)
+    {
+        file << setiosflags(ios::left);
+        file << setiosflags(ios::scientific);
+        file << setprecision(10);
+        file << setw(wordwidth);
+        file << 0.0;
+    }
+    for (int iz = istf; iz <= iedf; ++ iz)
+    {
+        file << setiosflags(ios::left);
+        file << setiosflags(ios::scientific);
+        file << setprecision(10);
+        file << setw(wordwidth);
+        file << (*rZ)(iz);
+    }
+    file.close();
+    file.clear();
+
+    int nout = iz_half - istf + 1;
+
+    file.open(zHalfGridPlot3dFile.c_str(), ios_base::out);
+    if (!file)
+    {
+        TK_Exit::ExceptionExit("could not open zHalfGridPlot3dFile\n");
+    }
+    file << setw(wordwidth) << 1 << "\n";
+    file << setw(wordwidth) << 1 << setw(wordwidth) << 1 << setw(wordwidth) << nout << "\n";
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setiosflags(ios::left);
+        file << setiosflags(ios::scientific);
+        file << setprecision(10);
+        file << setw(wordwidth);
+        file << 0.0;
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setiosflags(ios::left);
+        file << setiosflags(ios::scientific);
+        file << setprecision(10);
+        file << setw(wordwidth);
+        file << 0.0;
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setiosflags(ios::left);
+        file << setiosflags(ios::scientific);
+        file << setprecision(10);
+        file << setw(wordwidth);
+        file << (*rZ)(iz);
+    }
+    file.close();
+    file.clear();
+}
+
+void StatisticsHIT::AllocStatisticsdata(SpecGrid *GridData)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int jStartFourierIndexGlobal = GridData -> jStartFourierIndexGlobal;
+    int iStartFourierIndexGlobal = GridData -> iStartFourierIndexGlobal;
+
+    int kEndFourierIndexGlobal = GridData -> kEndFourierIndexGlobal;
+    int jEndFourierIndexGlobal = GridData -> jEndFourierIndexGlobal;
+    int iEndFourierIndexGlobal = GridData -> iEndFourierIndexGlobal;
+
+    int nY = GridData -> nY;
+    int nZ = GridData -> nZ;
+
+    Range I(istf, iedf);
+    Range J(jstf, jedf);
+    Range K(kstf, kedf);
+
+    Range XN(kStartFourierIndexGlobal, kEndFourierIndexGlobal);
+    Range YN(jStartFourierIndexGlobal, jEndFourierIndexGlobal);
+    Range ZN(iStartFourierIndexGlobal, iEndFourierIndexGlobal);
+
+    Range YNHalf(jStartFourierIndexGlobal, nY/2+1);
+    Range ZNHalf(iStartFourierIndexGlobal, nZ/2+1);
+
+    Range N19(1, 19);
+    Range N9(1, 9);
+    Range N3(1, 3);
+
+    statisticAll = new RDouble1D(N19, fortranArray);
+    statisticLocal = new RDouble1D(N19, fortranArray);
+    statistic = new RDouble1D(N19, fortranArray);
+
+    energyOfUUKx = new RDouble2D(XN, N3, fortranArray);            
+    energyOfUUKxAll = new RDouble2D(XN, N3, fortranArray);       
+    energyOfUUKxLocal = new RDouble2D(K, N3, fortranArray); 
+    
+    energyOfUUKy = new RDouble2D(YNHalf, N3, fortranArray);
+    energyOfUUKyAll = new RDouble2D(YN, N3, fortranArray);
+    energyOfUUKyLocal = new RDouble2D(J, N3, fortranArray); 
+
+    energyOfUUKz = new RDouble2D(ZNHalf, N3, fortranArray);
+    energyOfUUKzAll = new RDouble2D(ZN, N3, fortranArray);
+    energyOfUUKzLocal = new RDouble2D(I, N3, fortranArray);
+}
+
+void Statistics::AllocStatisticsdata(SpecDiffHybGrid *GridData)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int jStartFourierIndexGlobal = GridData -> jStartFourierIndexGlobal;
+    int kEndFourierIndexGlobal = GridData -> kEndFourierIndexGlobal;
+    int jEndFourierIndexGlobal = GridData -> jEndFourierIndexGlobal;
+
+    int nY = GridData -> nY;
+
+    Range I(istf, iedf);
+    Range J(jstf, jedf);
+    Range K(kstf, kedf);
+
+    Range IHalf(istf, iz_half);
+
+    Range XN(kStartFourierIndexGlobal, kEndFourierIndexGlobal);
+    Range YN(jStartFourierIndexGlobal, jEndFourierIndexGlobal);
+
+    Range YNHalf(jStartFourierIndexGlobal, nY/2+1);
+
+    Range N19(1, 19);
+    Range N9(1, 9);
+    Range N3(1, 3);
+
+    statisticAll = new RDouble2D(I, N19, fortranArray);
+    statisticLocal = new RDouble2D(I, N19, fortranArray);
+    statistic = new RDouble2D(IHalf, N19, fortranArray);
+
+    nutAverage = new RDouble1D(I, fortranArray);
+
+    energyOfUUKx = new RDouble3D(IHalf, XN, N3, fortranArray);            
+    energyOfUUKxAll = new RDouble3D(I, XN, N3, fortranArray);       
+    energyOfUUKxLocal = new RDouble3D(I, K, N3, fortranArray); 
+    
+    energyOfUUKy = new RDouble3D(IHalf, YNHalf, N3, fortranArray);
+    energyOfUUKyAll = new RDouble3D(I, YN, N3, fortranArray);
+    energyOfUUKyLocal = new RDouble3D(I, J, N3, fortranArray); 
+}
+
+void StatisticsHIT::InitStatisticsDataValue(SpecGrid *GridData)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int jStartFourierIndexGlobal = GridData -> jStartFourierIndexGlobal;
+    int iStartFourierIndexGlobal = GridData -> iStartFourierIndexGlobal;
+
+    int kEndFourierIndexGlobal = GridData -> kEndFourierIndexGlobal;
+    int jEndFourierIndexGlobal = GridData -> jEndFourierIndexGlobal;
+    int iEndFourierIndexGlobal = GridData -> iEndFourierIndexGlobal;
+
+    int nY = GridData -> nY;
+    int nZ = GridData -> nZ;
+
+    Range I(istf, iedf);
+    Range J(jstf, jedf);
+    Range K(kstf, kedf);
+
+    Range IHalf(istf, iz_half);
+
+    Range XN(kStartFourierIndexGlobal, kEndFourierIndexGlobal);
+    Range YN(jStartFourierIndexGlobal, jEndFourierIndexGlobal);
+    Range ZN(iStartFourierIndexGlobal, iEndFourierIndexGlobal);
+
+    Range YNHalf(jStartFourierIndexGlobal, nY/2+1);
+    Range ZNHalf(iStartFourierIndexGlobal, nZ/2+1);
+
+    Range N19(1, 19);
+    Range N9(1, 9);
+    Range N3(1, 3);
+
+    (*statisticAll)(N19) = 0.0;
+    (*statisticLocal)(N19) = 0.0;
+    (*statistic)(N19) = 0.0;
+
+    (*energyOfUUKx)(XN, N3) = 0.0;         
+    (*energyOfUUKxAll)(XN, N3) = 0.0;       
+    (*energyOfUUKxLocal)(K, N3) = 0.0; 
+
+    (*energyOfUUKy)(YNHalf, N3) = 0.0;
+    (*energyOfUUKyAll)(YN, N3) = 0.0;
+    (*energyOfUUKyLocal)(J, N3) = 0.0;
+
+    (*energyOfUUKz)(ZNHalf, N3) = 0.0;
+    (*energyOfUUKzAll)(ZN, N3) = 0.0;
+    (*energyOfUUKzLocal)(I, N3) = 0.0;
+}
+
+void Statistics::InitStatisticsDataValue(SpecDiffHybGrid *GridData)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int jStartFourierIndexGlobal = GridData -> jStartFourierIndexGlobal;
+    int kEndFourierIndexGlobal = GridData -> kEndFourierIndexGlobal;
+    int jEndFourierIndexGlobal = GridData -> jEndFourierIndexGlobal;
+
+    int nY = GridData -> nY;
+
+    Range I(istf, iedf);
+    Range J(jstf, jedf);
+    Range K(kstf, kedf);
+
+    Range IHalf(istf, iz_half);
+
+    Range XN(kStartFourierIndexGlobal, kEndFourierIndexGlobal);
+    Range YN(jStartFourierIndexGlobal, jEndFourierIndexGlobal);
+
+    Range YNHalf(jStartFourierIndexGlobal, nY/2+1);
+    Range N19(1, 19);
+    Range N9(1, 9);
+    Range N3(1, 3);
+
+    (*statisticAll)(I, N19) = 0.0;
+    (*statisticLocal)(I, N19) = 0.0;
+    (*statistic)(IHalf, N19) = 0.0;
+
+    (*nutAverage)(I) = 0.0;
+
+    (*energyOfUUKx)(IHalf, XN, N3) = 0.0;         
+    (*energyOfUUKxAll)(I, XN, N3) = 0.0;       
+    (*energyOfUUKxLocal)(I, K, N3) = 0.0; 
+    
+    (*energyOfUUKy)(IHalf, YNHalf, N3) = 0.0;
+    (*energyOfUUKyAll)(I, YN, N3) = 0.0;
+    (*energyOfUUKyLocal)(I, J, N3) = 0.0;  
+}
+
+void StatisticsHIT::InputStatistics(SpecGrid *GridData)
+{
+    int nstart = GlobalDataBase::GetIntParaFromDB("nstart");
+    if (!nstart)
+    {
+        ifInitStatistic = true;
+        return;
+    }
+
+    ReadStatisticsInformation();
+
+    ReadStatisticRestart(GridData);
+}
+
+void Statistics::InputStatistics(SpecDiffHybGrid *GridData)
+{
+    int nstart = GlobalDataBase::GetIntParaFromDB("nstart");
+    if (!nstart)
+    {
+        ifInitStatistic = true;
+        return;
+    }
+
+    ReadStatisticsInformation();
+
+    ReadStatisticRestart(GridData);
+}
+
+void StatisticsHIT::WriteStatisticsName()
+{
+    fstream file;
+    file.open(statisticsNameFile.c_str(), ios_base::out);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(statisticsNameFile);
+    }
+
+    file << "Uavg; mean velocity\n";
+    file << "Vavg\n";
+    file << "Wavg\n";
+    file << "<uu>\n";
+    file << "<vv>\n";
+    file << "<ww>\n";
+    file << "<uv>\n";
+    file << "<uw>\n";
+    file << "<vw>\n";
+    file << "dissipationRate\n";
+
+    file.close();
+    file.clear();
+}
+
+void StatisticsHIT::ReadStatisticsInformation()
+{
+    int statisticMethod = GlobalDataBase::GetIntParaFromDB("statisticMethod");
+
+    int istatMethTmp = 0;
+    int nStatisticalStep = 0;
+
+    string line,word;
+    string separator  = " =\t\r\n#$,;\"'";
+    fstream file;
+    file.open(statisticsInformationFile.c_str(), ios_base::in);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(statisticsInformationFile);
+    }
+
+    ReadNewLine(file, line);
+    line = FindNextWord(line, word, separator);
+    from_string<int>(istatMethTmp, word, std::dec);
+    line = FindNextWord(line, word, separator);
+    from_string<int>(nStatisticalStep, word, std::dec);
+
+    if (istatMethTmp != statisticMethod)
+    {
+        TK_Exit::ExceptionExit("istatMeth in statisticsInformationFile is NOT equal to that in para.inp!");
+    }
+
+    GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+
+    file.close();
+    file.clear();
+}
+
+void StatisticsHIT::ReadStatisticRestart(SpecGrid *GridData)
+{
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int jStartFourierIndexGlobal = GridData -> jStartFourierIndexGlobal;
+    int iStartFourierIndexGlobal = GridData -> iStartFourierIndexGlobal;
+
+    int kEndFourierIndexGlobal = GridData -> kEndFourierIndexGlobal;
+
+    int nY = GridData -> nY;
+    int nZ = GridData -> nZ;
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+
+    //int noutput1 = iz_half - istf + 1;
+    int nOutputX = 3 * (kEndFourierIndexGlobal - kStartFourierIndexGlobal + 1);
+    int nOutputY = 3 * (nY/2 + 1 - jStartFourierIndexGlobal + 1);
+    int noutputZ = 3 * (nZ/2 + 1 - iStartFourierIndexGlobal + 1);
+
+    fstream file;
+    ios_base::openmode openMode = ios_base::in | ios_base::binary;
+    PHSPACE::OpenFile(file, statisticsRestartFile.c_str(), openMode);
+
+    PHRead(file, &(*statistic)(1), 19);
+
+    PHRead(file, &(*energyOfUUKx)(kStartFourierIndexGlobal, 1), nOutputX);
+
+    PHRead(file, &(*energyOfUUKy)(jStartFourierIndexGlobal, 1), nOutputY);
+
+    PHRead(file, &(*energyOfUUKz)(iStartFourierIndexGlobal, 1), noutputZ);
+
+    PHSPACE::CloseFile(file);
+}
+
+void Statistics::ReadStatisticRestart(SpecDiffHybGrid *GridData)
+{
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int jStartFourierIndexGlobal = GridData -> jStartFourierIndexGlobal;
+    int kEndFourierIndexGlobal = GridData -> kEndFourierIndexGlobal;
+
+    int nY = GridData -> nY;
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+
+    int noutput1 = iz_half - istf + 1;
+    int noutput2 = (iz_half - istf + 1) * (kEndFourierIndexGlobal - kStartFourierIndexGlobal + 1);
+    int noutput3 = (iz_half - istf + 1) * (nY/2 + 1 - jStartFourierIndexGlobal + 1);
+
+    fstream file;
+    ios_base::openmode openMode = ios_base::in | ios_base::binary;
+    PHSPACE::OpenFile(file, statisticsRestartFile.c_str(), openMode);
+
+    PHRead(file, &(*statistic)(istf, 1), 19 * noutput1);
+
+    PHRead(file, &(*energyOfUUKx)(istf, kStartFourierIndexGlobal, 1), 3 * noutput2);
+
+    PHRead(file, &(*energyOfUUKy)(istf, jStartFourierIndexGlobal, 1), 3 * noutput3);
+
+    PHRead(file, &tauWAverage, 1);
+
+    PHRead(file, &(*nutAverage)(istf), iedf - istf + 1);
+
+    PHSPACE::CloseFile(file);
+}
+
+/*
+void Statistics::ReadStatisticsRestart(SpecDiffHybGrid *GridData)
+{
+    int istf = GridData -> iStartFourierIndex;
+
+    string line,word;
+    string separator = " =\t\r\n#$,;\"'";
+    fstream file;
+    file.open(statisticsRestartFile.c_str(), ios_base::in);
+    if (!file)
+    {
+        cout << "Warning!!!" << statisticsRestartFile << "does not exist or end during reading!" << "The statisic will begin from scratch!" << "\n" << endl;
+        ifInitStatistic = true;
+        file.close();
+        file.clear();
+    }
+    else
+    {
+        ReadNewLine(file, line);
+        ReadNewLine(file, line);
+
+        for (int iz = istf; iz <= iz_half; ++ iz)
+        {
+            file >> (*uAverage)(iz);
+        }
+        for (int iz = istf; iz <= iz_half; ++ iz)
+        {
+            file >> (*vAverage)(iz);
+        }
+        for (int iz = istf; iz <= iz_half; ++ iz)
+        {
+            file >> (*wAverage)(iz);
+        }
+        for (int iz = istf; iz <= iz_half; ++ iz)
+        {
+            file >> (*uSquare)(iz);
+        }
+        for (int iz = istf; iz <= iz_half; ++ iz)
+        {
+            file >> (*vSquare)(iz);
+        }
+        for (int iz = istf; iz <= iz_half; ++ iz)
+        {
+            file >> (*wSquare)(iz);
+        }
+        for (int iz = istf; iz <= iz_half; ++ iz)
+        {
+            file >> (*uMultiplyV)(iz);
+        }
+        for (int iz = istf; iz <= iz_half; ++ iz)
+        {
+            file >> (*uMultiplyW)(iz);
+        }
+        for (int iz = istf; iz <= iz_half; ++ iz)
+        {
+            file >> (*vMultiplyW)(iz);
+        }
+        for (int iz = istf; iz <= iz_half; ++ iz)
+        {
+            file >> (*epsilon)(iz);
+        }
+        file.close();
+        file.clear();
+
+        ReadStatisticsSelected(GridData);
+    }
+}
+
+void Statistics::ReadStatisticsSelected(SpecDiffHybGrid *GridData)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int x0Fall = GridData -> x0Fall;
+    int xNFall = GridData -> xNFall;
+    int y0Fall = GridData -> y0Fall;
+    int nY = GridData -> nY;
+    Range IHalf(istf, iz_half);
+    Range XN(x0Fall, xNFall);
+    Range YNHalf(y0Fall, nY/2+1);
+    Range N9(1, 9);
+
+    Param_SpecDiffHybSolver *parameters = GetControlParameters();
+    RDouble reynolds = parameters->GetRefReNumber();
+    RDouble dreynolds2 = 1.0 / reynolds / reynolds;
+
+    int itmp = 0;
+    RDouble rtmp = 0.0;
+
+    string line,word;
+    string separator  = " =\t\r\n#$,;\"'";
+    fstream file;
+    file.open("statistic_selected.dat", ios_base::in);
+    if (!file)
+    {
+        TK_Exit::ExceptionExit("could not open statistic_selected.dat\n");
+    }
+
+    ReadNewLine(file, line);
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        ReadNewLine(file, line);
+
+        line = FindNextWord(line, word, separator);
+        line = FindNextWord(line, word, separator);
+        line = FindNextWord(line, word, separator);
+        line = FindNextWord(line, word, separator);
+        line = FindNextWord(line, word, separator);
+        line = FindNextWord(line, word, separator);
+        line = FindNextWord(line, word, separator);
+
+        line = FindNextWord(line, word, separator);
+        from_string< double >( (*epsilonXYZ)(iz, 1), word, std::dec );
+        line = FindNextWord(line, word, separator);
+        from_string< double >( (*epsilonXYZ)(iz, 2), word, std::dec );
+        line = FindNextWord(line, word, separator);
+        from_string< double >( (*epsilonXYZ)(iz, 3), word, std::dec );
+        line = FindNextWord(line, word, separator);
+        from_string< double >( (*epsilonXYZ)(iz, 4), word, std::dec );
+        line = FindNextWord(line, word, separator);
+        from_string< double >( (*epsilonXYZ)(iz, 5), word, std::dec );
+        line = FindNextWord(line, word, separator);
+        from_string< double >( (*epsilonXYZ)(iz, 6), word, std::dec );
+        line = FindNextWord(line, word, separator);
+        from_string< double >( (*epsilonXYZ)(iz, 7), word, std::dec );
+        line = FindNextWord(line, word, separator);
+        from_string< double >( (*epsilonXYZ)(iz, 8), word, std::dec );
+        line = FindNextWord(line, word, separator);
+        from_string< double >( (*epsilonXYZ)(iz, 9), word, std::dec );
+    }
+    (*epsilonXYZ)(IHalf, N9) = (*epsilonXYZ)(IHalf, N9) / dreynolds2;
+    file.close();
+    file.clear();
+
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        // !Read rEuu_kx
+        string cheuuf = "./spectra/rEuu_kx_";
+        stringstream strmMyid;
+        strmMyid << iz;
+        cheuuf = cheuuf +  strmMyid.str() + ".dat";
+        file.open(cheuuf.c_str(), ios_base::in);
+        if (!file)
+        {
+            cout << "Error in reading in " << cheuuf << "\n";
+            cout << "rEuu_kx=rEuu_ky=0.0 will be used !!!\n" << endl;
+            (*energyOfUUKx)(IHalf, XN) = 0.0;
+            (*energyOfUUKy)(IHalf, YNHalf) = 0.0;
+        }
+
+        ReadNewLine(file, line);
+        ReadNewLine(file, line);
+        for (int ix = x0Fall; ix <= xNFall; ++ ix)
+        {
+            ReadNewLine(file, line);
+
+            line = FindNextWord(line, word, separator);
+
+            line = FindNextWord(line, word, separator);
+            from_string< double >( (*energyOfUUKx)(iz, ix, 1), word, std::dec );
+            line = FindNextWord(line, word, separator);
+            from_string< double >( (*energyOfUUKx)(iz, ix, 2), word, std::dec );
+            line = FindNextWord(line, word, separator);
+            from_string< double >( (*energyOfUUKx)(iz, ix, 3), word, std::dec );
+        }
+
+        file.close();
+        file.clear();
+
+        //! Read rEuu_ky.
+        cheuuf = "./spectra/rEuu_ky_";
+        cheuuf = cheuuf +  strmMyid.str() + ".dat";
+        file.open(cheuuf.c_str(), ios_base::in);
+        if (!file)
+        {
+            cout << "Error in reading in " << cheuuf << "\n";
+            cout << "rEuu_kx=rEuu_ky=0.0 will be used !!!\n" << endl;
+            (*energyOfUUKx)(IHalf, XN) = 0.0;
+            (*energyOfUUKy)(IHalf, YNHalf) = 0.0;
+        }
+
+        ReadNewLine(file, line);
+        ReadNewLine(file, line);
+        for (int iy = y0Fall; iy <= (nY/2+1); ++ iy)
+        {
+            ReadNewLine(file, line);
+
+            line = FindNextWord(line, word, separator);
+
+            line = FindNextWord(line, word, separator);
+            from_string< double >( (*energyOfUUKy)(iz, iy, 1), word, std::dec );
+            line = FindNextWord(line, word, separator);
+            from_string< double >( (*energyOfUUKy)(iz, iy, 2), word, std::dec );
+            line = FindNextWord(line, word, separator);
+            from_string< double >( (*energyOfUUKy)(iz, iy, 3), word, std::dec );
+        }
+
+        file.close();
+        file.clear();
+    }
+}
+*/
+
+void StatisticsHIT::GetStatisticsLocal(SpecGrid *GridData, Complex3D *complexU, Complex3D *complexV, Complex3D *complexW)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    int iStartFourierIndexGlobal = GridData -> iStartFourierIndexGlobal;
+    int jStartFourierIndexGlobal = GridData -> jStartFourierIndexGlobal;
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+
+    RDouble1D *kx = GridData -> realKX;
+    RDouble1D *ky = GridData -> realKY;
+    RDouble1D *kz = GridData -> realKZ;
+
+    if (kstf == kStartFourierIndexGlobal)
+    {
+        PHComplex sumUU = PHComplex(0.0, 0.0);
+        PHComplex sumVV = PHComplex(0.0, 0.0);
+        PHComplex sumWW = PHComplex(0.0, 0.0);
+        PHComplex sumUV = PHComplex(0.0, 0.0);
+        PHComplex sumUW = PHComplex(0.0, 0.0);
+        PHComplex sumVW = PHComplex(0.0, 0.0);
+
+        for(int iy = jstf; iy <= jedf; ++ iy)
+        {
+            for(int iz = istf; iz <= iedf; ++iz)
+            {
+                sumUU = sumUU + (*complexU)(iz, iy, kstf) * conj((*complexU)(iz, iy, kstf));
+                sumVV = sumVV + (*complexV)(iz, iy, kstf) * conj((*complexV)(iz, iy, kstf));
+                sumWW = sumWW + (*complexW)(iz, iy, kstf) * conj((*complexW)(iz, iy, kstf));
+                sumUV = sumUV + (*complexU)(iz, iy, kstf) * conj((*complexV)(iz, iy, kstf));
+                sumUW = sumUW + (*complexU)(iz, iy, kstf) * conj((*complexW)(iz, iy, kstf));
+                sumVW = sumVW + (*complexV)(iz, iy, kstf) * conj((*complexW)(iz, iy, kstf));
+            }
+        }
+
+        for(int ix = kstf + 1; ix <= kedf; ++ ix)
+        {
+            for(int iy = jstf; iy <= jedf; ++ iy)
+            {
+                for(int iz = istf; iz <= iedf; ++iz)
+                {
+                    sumUU = sumUU + 2.0 * ( (*complexU)(iz, iy, kstf) * conj((*complexU)(iz, iy, kstf)) );
+                    sumVV = sumVV + 2.0 * ( (*complexV)(iz, iy, kstf) * conj((*complexV)(iz, iy, kstf)) );
+                    sumWW = sumWW + 2.0 * ( (*complexW)(iz, iy, kstf) * conj((*complexW)(iz, iy, kstf)) );
+                    sumUV = sumUV + 2.0 * ( (*complexU)(iz, iy, kstf) * conj((*complexV)(iz, iy, kstf)) );
+                    sumUW = sumUW + 2.0 * ( (*complexU)(iz, iy, kstf) * conj((*complexW)(iz, iy, kstf)) );
+                    sumVW = sumVW + 2.0 * ( (*complexV)(iz, iy, kstf) * conj((*complexW)(iz, iy, kstf)) );
+                }
+            }
+        }
+
+        (*statisticLocal)(4) = real(sumUU);
+        (*statisticLocal)(5) = real(sumVV);
+        (*statisticLocal)(6) = real(sumWW);
+        (*statisticLocal)(7) = real(sumUV);
+        (*statisticLocal)(8) = real(sumUW);
+        (*statisticLocal)(9) = real(sumVW);
+
+        if (jstf == jStartFourierIndexGlobal && istf == iStartFourierIndexGlobal)
+        {
+            (*statisticLocal)(1) = real((*complexU)(istf, jstf, kstf));
+
+            (*statisticLocal)(4) = (*statisticLocal)(4) - real((*complexU)(istf, jstf, kstf) * conj((*complexU)(istf, jstf, kstf)));
+            (*statisticLocal)(5) = (*statisticLocal)(5) - real((*complexV)(istf, jstf, kstf) * conj((*complexV)(istf, jstf, kstf)));
+            (*statisticLocal)(6) = (*statisticLocal)(6) - real((*complexW)(istf, jstf, kstf) * conj((*complexW)(istf, jstf, kstf)));
+            (*statisticLocal)(7) = (*statisticLocal)(7) - real((*complexU)(istf, jstf, kstf) * conj((*complexV)(istf, jstf, kstf)));
+            (*statisticLocal)(8) = (*statisticLocal)(8) - real((*complexU)(istf, jstf, kstf) * conj((*complexW)(istf, jstf, kstf)));
+            (*statisticLocal)(9) = (*statisticLocal)(9) - real((*complexV)(istf, jstf, kstf) * conj((*complexW)(istf, jstf, kstf)));
+        }
+
+        // !dissipation
+        int ix0 = kstf;
+        for(int iy = jstf; iy <= jedf; ++iy)
+        {
+            for(int iz = istf; iz <= iedf; ++iz)
+            {
+                if(jstf == jStartFourierIndexGlobal && istf == iStartFourierIndexGlobal) continue;
+
+                RDouble kx2 = (*kx)(ix0) * (*kx)(ix0);
+                RDouble ky2 = (*ky)(iy) * (*ky)(iy);
+                RDouble kz2 = (*kz)(iz) * (*ky)(iz);
+
+                RDouble k2 = kx2 + ky2 + kz2;
+
+                RDouble uu = real( (*complexU)(iz, iy, ix0) * conj((*complexU)(iz, iy, ix0)) );
+                RDouble vv = real( (*complexV)(iz, iy, ix0) * conj((*complexV)(iz, iy, ix0)) );
+                RDouble ww = real( (*complexW)(iz, iy, ix0) * conj((*complexW)(iz, iy, ix0)) );
+
+                RDouble tmp = k2 * (uu + vv + ww);
+
+                (*statisticLocal)(10) = (*statisticLocal)(10) + tmp;
+
+                (*energyOfUUKxLocal)(ix0, 1) = (*energyOfUUKxLocal)(ix0, 1) + uu;
+                (*statisticLocal)(11) = (*statisticLocal)(11) + kx2 * uu;
+
+                (*energyOfUUKxLocal)(ix0, 2) = (*energyOfUUKxLocal)(ix0, 2) + vv;
+                (*statisticLocal)(12) = (*statisticLocal)(12) + kx2 * vv;
+
+                (*energyOfUUKxLocal)(ix0, 3) = (*energyOfUUKxLocal)(ix0, 3) + ww;
+                (*statisticLocal)(13) = (*statisticLocal)(13) + kx2 * ww;
+
+                (*energyOfUUKyLocal)(iy, 1) = (*energyOfUUKyLocal)(iy, 1) + uu;
+                (*statisticLocal)(14) = (*statisticLocal)(14) + ky2 * uu;
+
+                (*energyOfUUKyLocal)(iy, 2) = (*energyOfUUKyLocal)(iy, 2) + vv;
+                (*statisticLocal)(15) = (*statisticLocal)(15) + ky2 * vv;
+
+                (*energyOfUUKyLocal)(iy, 3) = (*energyOfUUKyLocal)(iy, 3) + ww;
+                (*statisticLocal)(16) = (*statisticLocal)(16) + ky2 * ww;
+
+                (*energyOfUUKzLocal)(iz, 1) = (*energyOfUUKzLocal)(iz, 1) + uu;
+                (*statisticLocal)(17) = (*statisticLocal)(17) + kz2 * uu;
+
+                (*energyOfUUKzLocal)(iz, 2) = (*energyOfUUKzLocal)(iz, 2) + vv;
+                (*statisticLocal)(18) = (*statisticLocal)(18) + kz2 * vv;
+
+                (*energyOfUUKzLocal)(iz, 3) = (*energyOfUUKzLocal)(iz, 3) + ww;
+                (*statisticLocal)(19) = (*statisticLocal)(19) + kz2 * ww;
+            }
+        }
+
+        for(int ix = kstf+1; ix <= kedf; ++ix)
+        {
+            for(int iy = jstf; iy <= jedf; ++iy)
+            {
+                for(int iz = istf; iz <= iedf; ++iz)
+                {
+                    RDouble kx2 = (*kx)(ix) * (*kx)(ix);
+                    RDouble ky2 = (*ky)(iy) * (*ky)(iy);
+                    RDouble kz2 = (*kz)(iz) * (*ky)(iz);
+
+                    RDouble k2 = kx2 + ky2 + kz2;
+
+                    RDouble uu = real( (*complexU)(iz, iy, ix) * conj((*complexU)(iz, iy, ix)) );
+                    RDouble vv = real( (*complexV)(iz, iy, ix) * conj((*complexV)(iz, iy, ix)) );
+                    RDouble ww = real( (*complexW)(iz, iy, ix) * conj((*complexW)(iz, iy, ix)) );
+
+                    RDouble tmp = k2 * (uu + vv + ww);
+
+                    (*statisticLocal)(10) = (*statisticLocal)(10) + 2.0 * tmp;
+
+                    (*energyOfUUKxLocal)(ix, 1) = (*energyOfUUKxLocal)(ix, 1) + 2.0 * uu;
+                    (*statisticLocal)(11) = (*statisticLocal)(11) + 2.0 * kx2 * uu;
+
+                    (*energyOfUUKxLocal)(ix, 2) = (*energyOfUUKxLocal)(ix, 2) + 2.0 * vv;
+                    (*statisticLocal)(12) = (*statisticLocal)(12) + 2.0 * kx2 * vv;
+
+                    (*energyOfUUKxLocal)(ix, 3) = (*energyOfUUKxLocal)(ix, 3) + 2.0 * ww;
+                    (*statisticLocal)(13) = (*statisticLocal)(13) + 2.0 * kx2 * ww;
+
+                    (*energyOfUUKyLocal)(iy, 1) = (*energyOfUUKyLocal)(iy, 1) + 2.0 * uu;
+                    (*statisticLocal)(14) = (*statisticLocal)(14) + 2.0 * ky2 * uu;
+
+                    (*energyOfUUKyLocal)(iy, 2) = (*energyOfUUKyLocal)(iy, 2) + 2.0 * vv;
+                    (*statisticLocal)(15) = (*statisticLocal)(15) + 2.0 * ky2 * vv;
+
+                    (*energyOfUUKyLocal)(iy, 3) = (*energyOfUUKyLocal)(iy, 3) + 2.0 * ww;
+                    (*statisticLocal)(16) = (*statisticLocal)(16) + 2.0 * ky2 * ww;
+
+                    (*energyOfUUKzLocal)(iz, 1) = (*energyOfUUKzLocal)(iz, 1) + 2.0 * uu;
+                    (*statisticLocal)(17) = (*statisticLocal)(17) + 2.0 * kz2 * uu;
+
+                    (*energyOfUUKzLocal)(iz, 2) = (*energyOfUUKzLocal)(iz, 2) + 2.0 * vv;
+                    (*statisticLocal)(18) = (*statisticLocal)(18) + 2.0 * kz2 * vv;
+
+                    (*energyOfUUKzLocal)(iz, 3) = (*energyOfUUKzLocal)(iz, 3) + 2.0 * ww;
+                    (*statisticLocal)(19) = (*statisticLocal)(19) + 2.0 * kz2 * ww;
+                }
+            }
+        }
+    }
+
+    else
+    {
+        PHComplex sumUU = PHComplex(0.0, 0.0);
+        PHComplex sumVV = PHComplex(0.0, 0.0);
+        PHComplex sumWW = PHComplex(0.0, 0.0);
+        PHComplex sumUV = PHComplex(0.0, 0.0);
+        PHComplex sumUW = PHComplex(0.0, 0.0);
+        PHComplex sumVW = PHComplex(0.0, 0.0);
+
+        for (int ix = kstf; ix <= kedf; ++ ix)
+        {
+            for (int iy = jstf; iy <= jedf; ++ iy)
+            {
+                for(int iz = istf; iz <= iedf; ++iz)
+                {
+                    sumUU = sumUU + 2.0 * (*complexU)(iz, iy, ix) * conj((*complexU)(iz, iy, ix));
+                    sumVV = sumVV + 2.0 * (*complexV)(iz, iy, ix) * conj((*complexV)(iz, iy, ix));
+                    sumWW = sumWW + 2.0 * (*complexW)(iz, iy, ix) * conj((*complexW)(iz, iy, ix));
+                    sumUV = sumUV + 2.0 * (*complexU)(iz, iy, ix) * conj((*complexV)(iz, iy, ix));
+                    sumUW = sumUW + 2.0 * (*complexU)(iz, iy, ix) * conj((*complexW)(iz, iy, ix));
+                    sumVW = sumVW + 2.0 * (*complexV)(iz, iy, ix) * conj((*complexW)(iz, iy, ix));
+                }
+            }
+        }
+
+        (*statisticLocal)(4) = real(sumUU);
+        (*statisticLocal)(5) = real(sumVV);
+        (*statisticLocal)(6) = real(sumWW);
+        (*statisticLocal)(7) = real(sumUV);
+        (*statisticLocal)(8) = real(sumUW);
+        (*statisticLocal)(9) = real(sumVW);
+
+        for (int ix = kstf; ix <= kedf; ++ ix)
+        {
+            for (int iy = jstf; iy <= jedf; ++ iy)
+            {
+                for(int iz = istf; iz <= iedf; ++iz)
+                {
+                    RDouble kx2 = (*kx)(ix) * (*kx)(ix);
+                    RDouble ky2 = (*ky)(iy) * (*ky)(iy);
+                    RDouble kz2 = (*kz)(iz) * (*ky)(iz);
+
+                    RDouble k2 = kx2 + ky2 + kz2;
+
+                    RDouble uu = real( (*complexU)(iz, iy, ix) * conj((*complexU)(iz, iy, ix)) );
+                    RDouble vv = real( (*complexV)(iz, iy, ix) * conj((*complexV)(iz, iy, ix)) );
+                    RDouble ww = real( (*complexW)(iz, iy, ix) * conj((*complexW)(iz, iy, ix)) );
+
+                    RDouble tmp = k2 * (uu + vv + ww);
+
+                    (*statisticLocal)(10) = (*statisticLocal)(10) + 2.0 * tmp;
+
+                    (*energyOfUUKxLocal)(ix, 1) = (*energyOfUUKxLocal)(ix, 1) + 2.0 * uu;
+                    (*statisticLocal)(11) = (*statisticLocal)(11) + 2.0 * kx2 * uu;
+
+                    (*energyOfUUKxLocal)(ix, 2) = (*energyOfUUKxLocal)(ix, 2) + 2.0 * vv;
+                    (*statisticLocal)(12) = (*statisticLocal)(12) + 2.0 * kx2 * vv;
+
+                    (*energyOfUUKxLocal)(ix, 3) = (*energyOfUUKxLocal)(ix, 3) + 2.0 * ww;
+                    (*statisticLocal)(13) = (*statisticLocal)(13) + 2.0 * kx2 * ww;
+
+                    (*energyOfUUKyLocal)(iy, 1) = (*energyOfUUKyLocal)(iy, 1) + 2.0 * uu;
+                    (*statisticLocal)(14) = (*statisticLocal)(14) + 2.0 * ky2 * uu;
+
+                    (*energyOfUUKyLocal)(iy, 2) = (*energyOfUUKyLocal)(iy, 2) + 2.0 * vv;
+                    (*statisticLocal)(15) = (*statisticLocal)(15) + 2.0 * ky2 * vv;
+
+                    (*energyOfUUKyLocal)(iy, 3) = (*energyOfUUKyLocal)(iy, 3) + 2.0 * ww;
+                    (*statisticLocal)(16) = (*statisticLocal)(16) + 2.0 * ky2 * ww;
+                }
+            }
+        }
+    }
+}
+
+void Statistics::GetStatisticsLocal(SpecDiffHybGrid *GridData, Complex3D *complexU, Complex3D *complexV, Complex3D *complexW, Complex4D *complexVelocityGradient)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int jstf = GridData -> jStartFourierIndex;
+    int kstf = GridData -> kStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+    int jedf = GridData -> jEndFourierIndex;
+    int kedf = GridData -> kEndFourierIndex;
+
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int jStartFourierIndexGlobal = GridData -> jStartFourierIndexGlobal;
+    RDouble1D *kx = GridData -> realKX;
+    RDouble1D *ky = GridData -> realKY;
+
+    Range I(istf, iedf);
+    Range IHalf(istf, iz_half);
+    Range J(jstf, jedf);
+    Range K(kstf, kedf);
+    Range N19(1, 19);
+    Range N9(1, 9);
+    Range N3(1, 3);
+
+    (*statisticLocal)(I, N19) = 0.0;
+    //(*epsXYZLocal)(I, N9) = 0.0;
+    (*energyOfUUKxLocal)(I, K, N3) = 0.0;
+    (*energyOfUUKyLocal)(I, J, N3) = 0.0;
+
+    for (int iz = istf; iz <= iedf; ++ iz)
+    {
+        if (kstf == kStartFourierIndexGlobal)
+        {
+            // !process with (0,:)modes
+            int iy0 = jstf;
+            if (jstf == jStartFourierIndexGlobal)
+            {
+                // !process with (0,0) mode
+                iy0 = jstf + 1;
+                (*statisticLocal)(iz, 1) = real((*complexU)(iz, jstf, kstf));
+            }
+
+            // !Reynolds stress
+            PHComplex sumUU = PHComplex(0.0, 0.0);
+            PHComplex sumVV = PHComplex(0.0, 0.0);
+            PHComplex sumWW = PHComplex(0.0, 0.0);
+            PHComplex sumUV = PHComplex(0.0, 0.0);
+            PHComplex sumUW = PHComplex(0.0, 0.0);
+            PHComplex sumVW = PHComplex(0.0, 0.0);
+            for (int iy = iy0; iy <= jedf; ++ iy)
+            {
+                sumUU = sumUU + (*complexU)(iz, iy, kstf) * conj((*complexU)(iz, iy, kstf));
+                sumVV = sumVV + (*complexV)(iz, iy, kstf) * conj((*complexV)(iz, iy, kstf));
+                sumWW = sumWW + (*complexW)(iz, iy, kstf) * conj((*complexW)(iz, iy, kstf));
+                sumUV = sumUV + (*complexU)(iz, iy, kstf) * conj((*complexV)(iz, iy, kstf));
+                sumUW = sumUW + (*complexU)(iz, iy, kstf) * conj((*complexW)(iz, iy, kstf));
+                sumVW = sumVW + (*complexV)(iz, iy, kstf) * conj((*complexW)(iz, iy, kstf));
+            }
+            for (int ix = kstf + 1; ix <= kedf; ++ ix)
+            {
+                for (int iy = jstf; iy <= jedf; ++ iy)
+                {
+                    sumUU = sumUU + 2.0 * (*complexU)(iz, iy, ix) * conj((*complexU)(iz, iy, ix));
+                    sumVV = sumVV + 2.0 * (*complexV)(iz, iy, ix) * conj((*complexV)(iz, iy, ix));
+                    sumWW = sumWW + 2.0 * (*complexW)(iz, iy, ix) * conj((*complexW)(iz, iy, ix));
+                    sumUV = sumUV + 2.0 * (*complexU)(iz, iy, ix) * conj((*complexV)(iz, iy, ix));
+                    sumUW = sumUW + 2.0 * (*complexU)(iz, iy, ix) * conj((*complexW)(iz, iy, ix));
+                    sumVW = sumVW + 2.0 * (*complexV)(iz, iy, ix) * conj((*complexW)(iz, iy, ix));
+                }
+            }
+            (*statisticLocal)(iz, 4) = real(sumUU);
+            (*statisticLocal)(iz, 5) = real(sumVV);
+            (*statisticLocal)(iz, 6) = real(sumWW);
+            (*statisticLocal)(iz, 7) = real(sumUV);
+            (*statisticLocal)(iz, 8) = real(sumUW);
+            (*statisticLocal)(iz, 9) = real(sumVW);
+
+            // !dissipation
+            int ix0 = kstf;
+            for (int iy = iy0; iy <= jedf; ++ iy)
+            {
+                RDouble kx2 = (*kx)(ix0) * (*kx)(ix0);
+                RDouble ky2 = (*ky)(iy) * (*ky)(iy);
+                RDouble k2 = kx2 + ky2;
+
+                RDouble uu = real( (*complexU)(iz, iy, ix0) * conj((*complexU)(iz, iy, ix0)) );
+                RDouble vv = real( (*complexV)(iz, iy, ix0) * conj((*complexV)(iz, iy, ix0)) );
+                RDouble ww = real( (*complexW)(iz, iy, ix0) * conj((*complexW)(iz, iy, ix0)) );
+
+                PHComplex complexTmp = k2 * (uu + vv + ww)
+                                     + (*complexVelocityGradient)(iz, iy, ix0, 3) * conj((*complexVelocityGradient)(iz, iy, ix0, 3))
+                                     + (*complexVelocityGradient)(iz, iy, ix0, 6) * conj((*complexVelocityGradient)(iz, iy, ix0, 6))
+                                     + (*complexVelocityGradient)(iz, iy, ix0, 9) * conj((*complexVelocityGradient)(iz, iy, ix0, 9));
+                (*statisticLocal)(iz, 10) = (*statisticLocal)(iz, 10) + real(complexTmp);
+
+                (*energyOfUUKxLocal)(iz, ix0, 1) = (*energyOfUUKxLocal)(iz, ix0, 1) + uu;
+                (*statisticLocal)(iz, 11) = (*statisticLocal)(iz, 11) + kx2 * uu;
+
+                (*energyOfUUKxLocal)(iz, ix0, 2) = (*energyOfUUKxLocal)(iz, ix0, 2) + vv;
+                (*statisticLocal)(iz, 12) = (*statisticLocal)(iz, 12) + kx2 * vv;
+
+                (*energyOfUUKxLocal)(iz, ix0, 3) = (*energyOfUUKxLocal)(iz, ix0, 3) + ww;
+                (*statisticLocal)(iz, 13) = (*statisticLocal)(iz, 13) + kx2 * ww;
+
+                (*energyOfUUKyLocal)(iz, iy, 1) = (*energyOfUUKyLocal)(iz, iy, 1) + uu;
+                (*statisticLocal)(iz, 14) = (*statisticLocal)(iz, 14) + ky2 * uu;
+
+                (*energyOfUUKyLocal)(iz, iy, 2) = (*energyOfUUKyLocal)(iz, iy, 2) + vv;
+                (*statisticLocal)(iz, 15) = (*statisticLocal)(iz, 15) + ky2 * vv;
+
+                (*energyOfUUKyLocal)(iz, iy, 3) = (*energyOfUUKyLocal)(iz, iy, 3) + ww;
+                (*statisticLocal)(iz, 16) = (*statisticLocal)(iz, 16) + ky2 * ww;
+
+                complexTmp = (*complexVelocityGradient)(iz, iy, ix0, 3) * conj((*complexVelocityGradient)(iz, iy, ix0, 3));
+                (*statisticLocal)(iz, 17) = (*statisticLocal)(iz, 17) + real(complexTmp);
+
+                complexTmp = (*complexVelocityGradient)(iz, iy, ix0, 6) * conj((*complexVelocityGradient)(iz, iy, ix0, 6));
+                (*statisticLocal)(iz, 18) = (*statisticLocal)(iz, 18) + real(complexTmp);
+
+                complexTmp = (*complexVelocityGradient)(iz, iy, ix0, 9) * conj((*complexVelocityGradient)(iz, iy, ix0, 9));
+                (*statisticLocal)(iz, 19) = (*statisticLocal)(iz, 19) + real(complexTmp);
+            }
+
+            for (int ix = kstf+1; ix <= kedf; ++ ix)
+            {
+                for (int iy = jstf; iy <= jedf; ++ iy)
+                {
+                    RDouble kx2 = (*kx)(ix) * (*kx)(ix);
+                    RDouble ky2 = (*ky)(iy) * (*ky)(iy);
+                    RDouble k2 = kx2 + ky2;
+
+                    RDouble uu = real( (*complexU)(iz, iy, ix) * conj((*complexU)(iz, iy, ix)) );
+                    RDouble vv = real( (*complexV)(iz, iy, ix) * conj((*complexV)(iz, iy, ix)) );
+                    RDouble ww = real( (*complexW)(iz, iy, ix) * conj((*complexW)(iz, iy, ix)) );
+
+                    PHComplex complexTmp = k2 * (uu + vv + ww)
+                        + (*complexVelocityGradient)(iz, iy, ix, 3) * conj((*complexVelocityGradient)(iz, iy, ix, 3))
+                        + (*complexVelocityGradient)(iz, iy, ix, 6) * conj((*complexVelocityGradient)(iz, iy, ix, 6))
+                        + (*complexVelocityGradient)(iz, iy, ix, 9) * conj((*complexVelocityGradient)(iz, iy, ix, 9));
+                    (*statisticLocal)(iz, 10) = (*statisticLocal)(iz, 10) + 2.0 * real(complexTmp);
+
+                    (*energyOfUUKxLocal)(iz, ix, 1) = (*energyOfUUKxLocal)(iz, ix, 1) + 2.0 * uu;
+                    (*statisticLocal)(iz, 11) = (*statisticLocal)(iz, 11) + 2.0 * kx2 * uu;
+
+                    (*energyOfUUKxLocal)(iz, ix, 2) = (*energyOfUUKxLocal)(iz, ix, 2) + 2.0 * vv;
+                    (*statisticLocal)(iz, 12) = (*statisticLocal)(iz, 12) + 2.0 * kx2 * vv;
+
+                    (*energyOfUUKxLocal)(iz, ix, 3) = (*energyOfUUKxLocal)(iz, ix, 3) + 2.0 * ww;
+                    (*statisticLocal)(iz, 13) = (*statisticLocal)(iz, 13) + 2.0 * kx2 * ww;
+
+                    (*energyOfUUKyLocal)(iz, iy, 1) = (*energyOfUUKyLocal)(iz, iy, 1) + 2.0 * uu;
+                    (*statisticLocal)(iz, 14) = (*statisticLocal)(iz, 14) + 2.0 * ky2 * uu;
+
+                    (*energyOfUUKyLocal)(iz, iy, 2) = (*energyOfUUKyLocal)(iz, iy, 2) + 2.0 * vv;
+                    (*statisticLocal)(iz, 15) = (*statisticLocal)(iz, 15) + 2.0 * ky2 * vv;
+
+                    (*energyOfUUKyLocal)(iz, iy, 3) = (*energyOfUUKyLocal)(iz, iy, 3) + 2.0 * ww;
+                    (*statisticLocal)(iz, 16) = (*statisticLocal)(iz, 16) + 2.0 * ky2 * ww;
+
+                    complexTmp = (*complexVelocityGradient)(iz, iy, ix, 3) * conj((*complexVelocityGradient)(iz, iy, ix, 3));
+                    (*statisticLocal)(iz, 17) = (*statisticLocal)(iz, 17) + 2.0 * real(complexTmp);
+
+                    complexTmp = (*complexVelocityGradient)(iz, iy, ix, 6) * conj((*complexVelocityGradient)(iz, iy, ix, 6));
+                    (*statisticLocal)(iz, 18) = (*statisticLocal)(iz, 18) + 2.0 * real(complexTmp);
+
+                    complexTmp = (*complexVelocityGradient)(iz, iy, ix, 9) * conj((*complexVelocityGradient)(iz, iy, ix, 9));
+                    (*statisticLocal)(iz, 19) = (*statisticLocal)(iz, 19) + 2.0 * real(complexTmp);
+                }// !for iy
+            }// !for ix             
+        }// !if(kstf == x0Fall)
+        else
+        {
+            // !process with kx!=0
+            // !Reynolds stress
+            PHComplex sumUU = PHComplex(0.0, 0.0);
+            PHComplex sumVV = PHComplex(0.0, 0.0);
+            PHComplex sumWW = PHComplex(0.0, 0.0);
+            PHComplex sumUV = PHComplex(0.0, 0.0);
+            PHComplex sumUW = PHComplex(0.0, 0.0);
+            PHComplex sumVW = PHComplex(0.0, 0.0);
+            for (int ix = kstf; ix <= kedf; ++ ix)
+            {
+                for (int iy = jstf; iy <= jedf; ++ iy)
+                {
+                    sumUU = sumUU + 2.0 * (*complexU)(iz, iy, ix) * conj((*complexU)(iz, iy, ix));
+                    sumVV = sumVV + 2.0 * (*complexV)(iz, iy, ix) * conj((*complexV)(iz, iy, ix));
+                    sumWW = sumWW + 2.0 * (*complexW)(iz, iy, ix) * conj((*complexW)(iz, iy, ix));
+                    sumUV = sumUV + 2.0 * (*complexU)(iz, iy, ix) * conj((*complexV)(iz, iy, ix));
+                    sumUW = sumUW + 2.0 * (*complexU)(iz, iy, ix) * conj((*complexW)(iz, iy, ix));
+                    sumVW = sumVW + 2.0 * (*complexV)(iz, iy, ix) * conj((*complexW)(iz, iy, ix));
+                }
+            }
+            (*statisticLocal)(iz, 4) = real(sumUU);
+            (*statisticLocal)(iz, 5) = real(sumVV);
+            (*statisticLocal)(iz, 6) = real(sumWW);
+            (*statisticLocal)(iz, 7) = real(sumUV);
+            (*statisticLocal)(iz, 8) = real(sumUW);
+            (*statisticLocal)(iz, 9) = real(sumVW);
+
+            // !dissipation
+            // !epsilon = -(kx^2+ky^2)*( cu*conjg(cu) +cv*conjg(cv) cw*conjg(cw) ) + cdudz*conjg(cdudz) +cdvdz*conjg(cdvdz) +cdwdz*conjg(cdwdz)
+            for (int ix = kstf; ix <= kedf; ++ ix)
+            {
+                for (int iy = jstf; iy <= jedf; ++ iy)
+                {
+                    RDouble kx2 = (*kx)(ix) * (*kx)(ix);
+                    RDouble ky2 = (*ky)(iy) * (*ky)(iy);
+                    RDouble k2 = kx2 + ky2;
+
+                    RDouble uu = real( (*complexU)(iz, iy, ix) * conj((*complexU)(iz, iy, ix)) );
+                    RDouble vv = real( (*complexV)(iz, iy, ix) * conj((*complexV)(iz, iy, ix)) );
+                    RDouble ww = real( (*complexW)(iz, iy, ix) * conj((*complexW)(iz, iy, ix)) );
+
+                    PHComplex complexTmp = k2 * (uu + vv + ww)
+                                         + (*complexVelocityGradient)(iz, iy, ix, 3) * conj((*complexVelocityGradient)(iz, iy, ix, 3))
+                                         + (*complexVelocityGradient)(iz, iy, ix, 6) * conj((*complexVelocityGradient)(iz, iy, ix, 6))
+                                         + (*complexVelocityGradient)(iz, iy, ix, 9) * conj((*complexVelocityGradient)(iz, iy, ix, 9));
+                    (*statisticLocal)(iz, 10) = (*statisticLocal)(iz, 10) + 2.0 * real(complexTmp);
+
+                    (*energyOfUUKxLocal)(iz, ix, 1) = (*energyOfUUKxLocal)(iz, ix, 1) + 2.0 * uu;
+                    (*statisticLocal)(iz, 11) = (*statisticLocal)(iz, 11) + 2.0 * kx2 * uu;
+
+                    (*energyOfUUKxLocal)(iz, ix, 2) = (*energyOfUUKxLocal)(iz, ix, 2) + 2.0 * vv;
+                    (*statisticLocal)(iz, 12) = (*statisticLocal)(iz, 12) + 2.0 * kx2 * vv;
+
+                    (*energyOfUUKxLocal)(iz, ix, 3) = (*energyOfUUKxLocal)(iz, ix, 3) + 2.0 * ww;
+                    (*statisticLocal)(iz, 13) = (*statisticLocal)(iz, 13) + 2.0 * kx2 * ww;
+
+                    (*energyOfUUKyLocal)(iz, iy, 1) = (*energyOfUUKyLocal)(iz, iy, 1) + 2.0 * uu;
+                    (*statisticLocal)(iz, 14) = (*statisticLocal)(iz, 14) + 2.0 * ky2 * uu;
+
+                    (*energyOfUUKyLocal)(iz, iy, 2) = (*energyOfUUKyLocal)(iz, iy, 2) + 2.0 * vv;
+                    (*statisticLocal)(iz, 15) = (*statisticLocal)(iz, 15) + 2.0 * ky2 * vv;
+
+                    (*energyOfUUKyLocal)(iz, iy, 3) = (*energyOfUUKyLocal)(iz, iy, 3) + 2.0 * ww;
+                    (*statisticLocal)(iz, 16) = (*statisticLocal)(iz, 16) + 2.0 * ky2 * ww;
+
+                    complexTmp = (*complexVelocityGradient)(iz, iy, ix, 3) * conj((*complexVelocityGradient)(iz, iy, ix, 3));
+                    (*statisticLocal)(iz, 17) = (*statisticLocal)(iz, 17) + 2.0 * real(complexTmp);
+
+                    complexTmp = (*complexVelocityGradient)(iz, iy, ix, 6) * conj((*complexVelocityGradient)(iz, iy, ix, 6));
+                    (*statisticLocal)(iz, 18) = (*statisticLocal)(iz, 18) + 2.0 * real(complexTmp);
+
+                    complexTmp = (*complexVelocityGradient)(iz, iy, ix, 9) * conj((*complexVelocityGradient)(iz, iy, ix, 9));
+                    (*statisticLocal)(iz, 19) = (*statisticLocal)(iz, 19) + 2.0 * real(complexTmp);
+                }//! for iy
+            }//! for ix
+        }//! else
+    }//! for iz
+}
+
+void StatisticsHIT::OutputStatisticRestart(SpecGrid *GridData)
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+
+    if (myid != procIDWithKx0Ky0)
+    {
+        return;
+    }
+    else
+    {
+        WriteStatisticInformation();
+
+        WriteStatisticRestart(GridData);
+
+        //WriteStatisticVisual(GridData);
+
+        //WriteSpectraVisual(GridData);
+    }
+}
+
+void Statistics::OutputStatisticRestart(SpecDiffHybGrid *GridData)
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+
+    if (myid != procIDWithKx0Ky0)
+    {
+        return;
+    }
+    else
+    {
+        WriteStatisticInformation();
+
+        WriteStatisticRestart(GridData);
+
+        //WriteStatisticVisual(GridData);
+
+        //WriteSpectraVisual(GridData);
+    }
+}
+
+void StatisticsHIT::OutputStatisticVisual(SpecGrid *GridData)
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+
+    if (myid != procIDWithKx0Ky0)
+    {
+        return;
+    }
+    else
+    {
+        WriteStatisticVisual(GridData);
+
+        WriteSpectraVisual(GridData);
+    }
+}
+
+void Statistics::OutputStatisticVisual(SpecDiffHybGrid *GridData)
+{
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    int procIDWithKx0Ky0 = GridData -> GetProcIDWithKx0Ky0();
+
+    if (myid != procIDWithKx0Ky0)
+    {
+        return;
+    }
+    else
+    {
+        WriteStatisticVisual(GridData);
+
+        WriteSpectraVisual(GridData);
+    }
+}
+
+void StatisticsHIT::WriteStatisticInformation()
+{
+    int statisticMethod = GlobalDataBase::GetIntParaFromDB("statisticMethod");
+
+    int nStatisticalStep = 0;
+    GlobalDataBase::GetData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+
+    fstream file;
+    file.open(statisticsInformationFile.c_str(), ios_base::out);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(statisticsInformationFile);
+    }
+    file << setw(20) << statisticMethod << setw(20) << nStatisticalStep << "\n";
+    file.close();
+    file.clear();
+}
+
+void StatisticsHIT::WriteStatisticRestart(SpecGrid *GridData)
+{
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int jStartFourierIndexGlobal = GridData -> jStartFourierIndexGlobal;
+    int iStartFourierIndexGlobal = GridData -> iStartFourierIndexGlobal;
+
+    int kEndFourierIndexGlobal = GridData -> kEndFourierIndexGlobal;
+
+    int nY = GridData -> nY;
+    int nZ = GridData -> nY;
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+
+    //int noutput1 = iz_half - istf + 1;
+    int nOutputX = 3 * (kEndFourierIndexGlobal - kStartFourierIndexGlobal + 1);
+    int noutputY = 3 * (nY/2 + 1 - jStartFourierIndexGlobal + 1);
+    int noutputZ = 3 * (nZ/2 + 1 - iStartFourierIndexGlobal + 1);
+
+    fstream file;
+    ios_base::openmode openMode = ios_base::out | ios_base::binary;
+    PHSPACE::OpenFile(file, statisticsRestartFile.c_str(), openMode);
+
+    PHWrite(file, &(*statistic)(1), 19);
+
+    PHWrite(file, &(*energyOfUUKx)(kStartFourierIndexGlobal, 1), nOutputX);
+
+    PHWrite(file, &(*energyOfUUKy)(jStartFourierIndexGlobal, 1), noutputY);
+
+    PHWrite(file, &(*energyOfUUKz)(iStartFourierIndexGlobal, 1), noutputZ);
+
+    PHSPACE::CloseFile(file);
+}
+
+void Statistics::WriteStatisticRestart(SpecDiffHybGrid *GridData)
+{
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int jStartFourierIndexGlobal = GridData -> jStartFourierIndexGlobal;
+    int kEndFourierIndexGlobal = GridData -> kEndFourierIndexGlobal;
+
+    int nY = GridData -> nY;
+
+    int istf = GridData -> iStartFourierIndex;
+    int iedf = GridData -> iEndFourierIndex;
+
+    int noutput1 = iz_half - istf + 1;
+    int noutput2 = (iz_half - istf + 1) * (kEndFourierIndexGlobal - kStartFourierIndexGlobal + 1);
+    int noutput3 = (iz_half - istf + 1) * (nY/2 + 1 - jStartFourierIndexGlobal + 1);
+
+    fstream file;
+    ios_base::openmode openMode = ios_base::out | ios_base::binary;
+    PHSPACE::OpenFile(file, statisticsRestartFile.c_str(), openMode);
+
+    PHWrite(file, &(*statistic)(istf, 1), 19 * noutput1);
+
+    PHWrite(file, &(*energyOfUUKx)(istf, kStartFourierIndexGlobal, 1), 3 * noutput2);
+
+    PHWrite(file, &(*energyOfUUKy)(istf, jStartFourierIndexGlobal, 1), 3 * noutput3);
+
+    PHWrite(file, &tauWAverage, 1);
+
+    PHWrite(file, &(*nutAverage)(istf), iedf - istf + 1);
+
+    PHSPACE::CloseFile(file);
+}
+
+/*
+void Statistics::WriteStatisticsRestart(SpecDiffHybGrid *GridData)
+{
+    int istf = GridData -> iStartFourierIndex;
+    int noutput = iz_half - istf + 1;
+
+    //ActionKey *actkeyDumpStatistic = new ActionKey();
+    //FillActionKey(actkeyDumpStatistic, DUMP_RESIDUAL, 0);
+    //string formatStatistic;
+    //PrepareFormatedStatistic(formatStatistic);
+    //delete actkeyDumpStatistic;
+
+    fstream file;
+    file.open(statisticsRestartFile.c_str(), ios_base::out);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(statisticsRestartFile);
+    }
+    file << setw(20) << 1 << "\n";
+    file << setw(20) << 1 << setw(20) << 1 << setw(20) << noutput << setw(20) << 10 << "\n";
+    file << setiosflags(ios::right);
+    file << setprecision(10);
+    file << setiosflags(ios::scientific);
+    file << setiosflags(ios::showpoint);
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*uAverage)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*vAverage)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*wAverage)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*uSquare)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*vSquare)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*wSquare)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*uMultiplyV)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*uMultiplyW)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*vMultiplyW)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*epsilon)(iz);
+    }
+    file.close();
+    file.clear();
+
+    file.open(statisticsRestartTimeFile.c_str(), ios_base::out);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(statisticsRestartTimeFile);
+    }
+    file << setw(20) << 1 << "\n";
+    file << setw(20) << 1 << setw(20) << 1 << setw(20) << noutput << setw(20) << 10 << "\n";
+    file << setiosflags(ios::right);
+    file << setprecision(10);
+    file << setiosflags(ios::scientific);
+    file << setiosflags(ios::showpoint);
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*uAverageTime)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*vAverageTime)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*wAverageTime)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*uSquareTime)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*vSquareTime)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*wSquareTime)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*uMultiplyVTime)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*uMultiplyWTime)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*vMultiplyWTime)(iz);
+    }
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(20) << (*epsilonTime)(iz);
+    }
+    file.close();
+    file.clear();
+}
+*/
+
+void StatisticsHIT::WriteStatisticVisual(SpecGrid *GridData)
+{
+    ActionKey *actkeyDumpStatistic = new ActionKey();
+    FillActionKey(actkeyDumpStatistic, VISUALIZATION_AVERAGE_FLOW, 0);
+
+    string formatStatistic;
+    PrepareFormatedStatistic(GridData, formatStatistic);
+
+    string statisticFileName = GetStatisticVisualFileName();
+    if (statisticFileName == "")
+    {
+        return;
+    }
+
+    actkeyDumpStatistic->filename = statisticFileName;
+    actkeyDumpStatistic->openmode = ios_base::out|ios_base::trunc;
+
+    if (!actkeyDumpStatistic->IsNeedOpenFile())
+    {
+        return;
+    }
+
+    ParallelOpenFile(actkeyDumpStatistic);
+
+    std::ostringstream oss;
+    fstream &file = *(actkeyDumpStatistic->file);
+
+    if (IfFileEmpty(file))
+    {
+        oss << "Title=\"STATISTIC\"" << endl;
+        oss << "Variables=" << endl;
+        oss << "<U>" << endl;
+        oss << "<V>" << endl;
+        oss << "<W>" << endl;
+        oss << "<uu>" << endl;
+        oss << "<vv>" << endl;
+        oss << "<ww>" << endl;
+        oss << "<uv>" << endl;
+        oss << "<uw>" << endl;
+        oss << "<vw>" << endl;
+        oss << "epsilon" << endl;
+        oss << "eps_ux" << endl;
+        oss << "eps_vx" << endl;
+        oss << "eps_wx" << endl;
+        oss << "eps_uy" << endl;
+        oss << "eps_vy" << endl;
+        oss << "eps_wy" << endl;
+        oss << "eps_uz" << endl;
+        oss << "eps_vz" << endl;
+        oss << "eps_wz" << endl;
+    }
+
+    oss << formatStatistic;
+
+    WriteASCIIFile(file, oss.str());
+
+    ParallelCloseFile(actkeyDumpStatistic);
+
+    delete actkeyDumpStatistic;
+}
+
+void Statistics::WriteStatisticVisual(SpecDiffHybGrid *GridData)
+{
+    ActionKey *actkeyDumpStatistic = new ActionKey();
+    FillActionKey(actkeyDumpStatistic, VISUALIZATION_AVERAGE_FLOW, 0);
+
+    string formatStatistic;
+    PrepareFormatedStatistic(GridData, formatStatistic);
+
+    string statisticFileName = GetStatisticVisualFileName();
+    if (statisticFileName == "")
+    {
+        return;
+    }
+
+    actkeyDumpStatistic->filename = statisticFileName;
+    actkeyDumpStatistic->openmode = ios_base::out|ios_base::trunc;
+
+    if (!actkeyDumpStatistic->IsNeedOpenFile())
+    {
+        return;
+    }
+
+    ParallelOpenFile(actkeyDumpStatistic);
+
+    std::ostringstream oss;
+    fstream &file = *(actkeyDumpStatistic->file);
+
+    if (IfFileEmpty(file))
+    {
+        oss << "Title=\"STATISTIC\"" << endl;
+        oss << "Variables=" << endl;
+        oss << "i" << endl;
+        oss << "Z" << endl;
+        oss << "Z<sup>+</sup>" << endl;
+        oss << "<U>" << endl;
+        oss << "<V>" << endl;
+        oss << "<W>" << endl;
+        oss << "<uu>" << endl;
+        oss << "<vv>" << endl;
+        oss << "<ww>" << endl;
+        oss << "<uv>" << endl;
+        oss << "<uw>" << endl;
+        oss << "<vw>" << endl;
+        oss << "epsilon" << endl;
+        oss << "eps_ux" << endl;
+        oss << "eps_vx" << endl;
+        oss << "eps_wx" << endl;
+        oss << "eps_uy" << endl;
+        oss << "eps_vy" << endl;
+        oss << "eps_wy" << endl;
+        oss << "eps_uz" << endl;
+        oss << "eps_vz" << endl;
+        oss << "eps_wz" << endl;
+        oss << "<greek>n</greek><sub>t</sub>" << endl;
+    }
+
+    oss << formatStatistic;
+
+    WriteASCIIFile(file, oss.str());
+
+    ParallelCloseFile(actkeyDumpStatistic);
+
+    delete actkeyDumpStatistic;
+}
+
+const string StatisticsHIT::GetStatisticVisualFileName()
+{
+    string statisticVisualFile = "statisticVisual.dat";
+    GlobalDataBase::GetData("statisticVisualFile", &statisticVisualFile, PHSTRING, 1);
+    return statisticVisualFile;
+}
+
+void StatisticsHIT::PrepareFormatedStatistic(SpecGrid *GridData, string &formatStatistic)
+{
+    RDouble reynolds = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+    RDouble dreynolds2 = 1.0 / reynolds / reynolds;
+
+    int istf = GridData -> iStartFourierIndex;
+
+    ostringstream oss;
+
+    oss << setiosflags(ios::left);
+    oss << setprecision(5);
+    oss << setiosflags(ios::scientific);
+    oss << setiosflags(ios::showpoint);
+
+    oss << (*statistic)(1) << "    ";
+    oss << (*statistic)(2) << "    ";
+    oss << (*statistic)(3) << "    ";
+    oss << (*statistic)(4) << "    ";
+    oss << (*statistic)(5) << "    ";
+    oss << (*statistic)(6) << "    ";
+    oss << (*statistic)(7) << "    ";
+    oss << (*statistic)(8) << "    ";
+    oss << (*statistic)(9) << "    ";
+    oss << (*statistic)(10) * dreynolds2 << "    ";
+    oss << (*statistic)(11) * dreynolds2 << "    ";
+    oss << (*statistic)(12) * dreynolds2 << "    ";
+    oss << (*statistic)(13) * dreynolds2 << "    ";
+    oss << (*statistic)(14) * dreynolds2 << "    ";
+    oss << (*statistic)(15) * dreynolds2 << "    ";
+    oss << (*statistic)(16) * dreynolds2 << "    ";
+    oss << (*statistic)(17) * dreynolds2 << "    ";
+    oss << (*statistic)(18) * dreynolds2 << "    ";
+    oss << (*statistic)(19) * dreynolds2 << "    ";
+    oss << "\n";
+
+    oss << endl;
+
+    formatStatistic = oss.str();
+}
+
+void Statistics::PrepareFormatedStatistic(SpecDiffHybGrid *GridData, string &formatStatistic)
+{
+    RDouble reynolds = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+    RDouble dreynolds2 = 1.0 / reynolds / reynolds;
+
+    RDouble1D *realZ = GridData -> realZ;
+    int istf = GridData -> iStartFourierIndex;
+
+    ostringstream oss;
+
+    oss << setiosflags(ios::left);
+    oss << setprecision(5);
+    oss << setiosflags(ios::scientific);
+    oss << setiosflags(ios::showpoint);
+
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        oss << iz << "    ";
+        oss << (*realZ)(iz) << "    ";
+        oss << (1.0 + (*realZ)(iz)) * reynolds << "    ";
+        oss << (*statistic)(iz, 1) << "    ";
+        oss << (*statistic)(iz, 2) << "    ";
+        oss << (*statistic)(iz, 3) << "    ";
+        oss << (*statistic)(iz, 4) << "    ";
+        oss << (*statistic)(iz, 5) << "    ";
+        oss << (*statistic)(iz, 6) << "    ";
+        oss << (*statistic)(iz, 7) << "    ";
+        oss << (*statistic)(iz, 8) << "    ";
+        oss << (*statistic)(iz, 9) << "    ";
+        oss << (*statistic)(iz, 10) * dreynolds2 << "    ";
+        oss << (*statistic)(iz, 11) * dreynolds2 << "    ";
+        oss << (*statistic)(iz, 12) * dreynolds2 << "    ";
+        oss << (*statistic)(iz, 13) * dreynolds2 << "    ";
+        oss << (*statistic)(iz, 14) * dreynolds2 << "    ";
+        oss << (*statistic)(iz, 15) * dreynolds2 << "    ";
+        oss << (*statistic)(iz, 16) * dreynolds2 << "    ";
+        oss << (*statistic)(iz, 17) * dreynolds2 << "    ";
+        oss << (*statistic)(iz, 18) * dreynolds2 << "    ";
+        oss << (*statistic)(iz, 19) * dreynolds2 << "    ";
+        oss << (*nutAverage)(iz) << "    ";
+        oss << "\n";
+    }
+    oss << endl;
+
+    formatStatistic = oss.str();
+}
+
+void StatisticsHIT::WriteSpectraVisual(SpecGrid *GridData)
+{
+    WriteSpectraKxVisual(GridData);
+
+    WriteSpectraKyVisual(GridData);
+}
+
+void Statistics::WriteSpectraVisual(SpecDiffHybGrid *GridData)
+{
+    WriteSpectraKxVisual(GridData);
+
+    WriteSpectraKyVisual(GridData);
+}
+
+void StatisticsHIT::WriteSpectraKxVisual(SpecGrid *GridData)
+{
+    ActionKey *actkeyDumpSpectra = new ActionKey();
+    FillActionKey(actkeyDumpSpectra, VISUALIZATION_AVERAGE_FLOW, 0);
+
+    string spectraFileName = "results/Euu_kx";
+
+    actkeyDumpSpectra->filename = spectraFileName;
+    actkeyDumpSpectra->openmode = ios_base::out|ios_base::trunc;
+
+    if (!actkeyDumpSpectra->IsNeedOpenFile())
+    {
+        return;
+    }
+
+    ParallelOpenFile(actkeyDumpSpectra);
+
+    std::ostringstream oss;
+    fstream &file = *(actkeyDumpSpectra->file);
+
+    if (IfFileEmpty(file))
+    {
+        oss << "Title=\"SPECTRA\"" << endl;
+        oss << "Variables=" << endl;
+        oss << "kx" << endl;
+        oss << "Euu" << endl;
+        oss << "Evv" << endl;
+        oss << "Eww" << endl;
+    }
+
+    string formatSpectra;
+    PrepareFormatedSpectraKx(GridData, formatSpectra);
+
+    oss << formatSpectra;
+
+    WriteASCIIFile(file, oss.str());
+
+    ParallelCloseFile(actkeyDumpSpectra);
+
+    delete actkeyDumpSpectra;
+}
+
+void Statistics::WriteSpectraKxVisual(SpecDiffHybGrid *GridData)
+{
+    ActionKey *actkeyDumpSpectra = new ActionKey();
+    FillActionKey(actkeyDumpSpectra, VISUALIZATION_AVERAGE_FLOW, 0);
+
+    string spectraFileName = "results/Euu_kx";
+
+    actkeyDumpSpectra->filename = spectraFileName;
+    actkeyDumpSpectra->openmode = ios_base::out|ios_base::trunc;
+
+    if (!actkeyDumpSpectra->IsNeedOpenFile())
+    {
+        return;
+    }
+
+    ParallelOpenFile(actkeyDumpSpectra);
+
+    std::ostringstream oss;
+    fstream &file = *(actkeyDumpSpectra->file);
+
+    if (IfFileEmpty(file))
+    {
+        oss << "Title=\"SPECTRA\"" << endl;
+        oss << "Variables=" << endl;
+        oss << "kx" << endl;
+        oss << "Euu" << endl;
+        oss << "Evv" << endl;
+        oss << "Eww" << endl;
+    }
+
+    string formatSpectra;
+    PrepareFormatedSpectraKx(GridData, formatSpectra);
+
+    oss << formatSpectra;
+
+    WriteASCIIFile(file, oss.str());
+
+    ParallelCloseFile(actkeyDumpSpectra);
+
+    delete actkeyDumpSpectra;
+}
+
+void StatisticsHIT::PrepareFormatedSpectraKx(SpecGrid *GridData, string &formatSpectra)
+{
+    RDouble reynolds = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+
+    RDouble realXL = GlobalDataBase::GetDoubleParaFromDB("XL");       
+
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int kEndFourierIndexGlobal = GridData -> kEndFourierIndexGlobal;
+
+    ostringstream oss;
+
+    oss << setiosflags(ios::left);
+    oss << setprecision(5);
+    oss << setiosflags(ios::scientific);
+    oss << setiosflags(ios::showpoint);
+
+    for (int ix = kStartFourierIndexGlobal; ix <= kEndFourierIndexGlobal; ++ ix)
+    {
+        RDouble rk_x = static_cast<double>(ix - kStartFourierIndexGlobal) / realXL;
+        oss << rk_x << "    ";
+        oss << (*energyOfUUKx)(ix, 1) << "    ";
+        oss << (*energyOfUUKx)(ix, 2) << "    ";
+        oss << (*energyOfUUKx)(ix, 3) << "    ";
+        oss << "\n";
+    }
+
+    oss << endl;
+
+    formatSpectra = oss.str();
+}
+
+void Statistics::PrepareFormatedSpectraKx(SpecDiffHybGrid *GridData, string &formatSpectra)
+{
+    RDouble reynolds = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+
+    RDouble realXL = GlobalDataBase::GetDoubleParaFromDB("XL");       
+
+    RDouble1D *realZ = GridData -> realZ;
+
+    int istf = GridData -> iStartFourierIndex;
+
+    int kStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+    int kEndFourierIndexGlobal = GridData -> kEndFourierIndexGlobal;
+
+    ostringstream oss;
+
+    oss << setiosflags(ios::left);
+    oss << setprecision(5);
+    oss << setiosflags(ios::scientific);
+    oss << setiosflags(ios::showpoint);
+
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        oss << "zone t = \"yplus = " << (1.0 + (*realZ)(iz)) * reynolds << "\"\n";
+
+        for (int ix = kStartFourierIndexGlobal; ix <= kEndFourierIndexGlobal; ++ ix)
+        {
+            RDouble rk_x = static_cast<double>(ix - kStartFourierIndexGlobal) / realXL;
+            oss << rk_x << "    ";
+            oss << (*energyOfUUKx)(iz, ix, 1) << "    ";
+            oss << (*energyOfUUKx)(iz, ix, 2) << "    ";
+            oss << (*energyOfUUKx)(iz, ix, 3) << "    ";
+            oss << "\n";
+        }
+    }
+
+    oss << endl;
+
+    formatSpectra = oss.str();
+}
+
+void StatisticsHIT::WriteSpectraKyVisual(SpecGrid *GridData)
+{
+    ActionKey *actkeyDumpSpectra = new ActionKey();
+    FillActionKey(actkeyDumpSpectra, VISUALIZATION_AVERAGE_FLOW, 0);
+
+    string spectraFileName = "results/Euu_ky";
+
+    actkeyDumpSpectra->filename = spectraFileName;
+    actkeyDumpSpectra->openmode = ios_base::out|ios_base::trunc;
+
+    if (!actkeyDumpSpectra->IsNeedOpenFile())
+    {
+        return;
+    }
+
+    ParallelOpenFile(actkeyDumpSpectra);
+
+    std::ostringstream oss;
+    fstream &file = *(actkeyDumpSpectra->file);
+
+    if (IfFileEmpty(file))
+    {
+        oss << "Title=\"SPECTRA\"" << endl;
+        oss << "Variables=" << endl;
+        oss << "ky" << endl;
+        oss << "Euu" << endl;
+        oss << "Evv" << endl;
+        oss << "Eww" << endl;
+    }
+
+    string formatSpectra;
+    PrepareFormatedSpectraKy(GridData, formatSpectra);
+
+    oss << formatSpectra;
+
+    WriteASCIIFile(file, oss.str());
+
+    ParallelCloseFile(actkeyDumpSpectra);
+
+    delete actkeyDumpSpectra;
+}
+
+void Statistics::WriteSpectraKyVisual(SpecDiffHybGrid *GridData)
+{
+    ActionKey *actkeyDumpSpectra = new ActionKey();
+    FillActionKey(actkeyDumpSpectra, VISUALIZATION_AVERAGE_FLOW, 0);
+
+    string spectraFileName = "results/Euu_ky";
+
+    actkeyDumpSpectra->filename = spectraFileName;
+    actkeyDumpSpectra->openmode = ios_base::out|ios_base::trunc;
+
+    if (!actkeyDumpSpectra->IsNeedOpenFile())
+    {
+        return;
+    }
+
+    ParallelOpenFile(actkeyDumpSpectra);
+
+    std::ostringstream oss;
+    fstream &file = *(actkeyDumpSpectra->file);
+
+    if (IfFileEmpty(file))
+    {
+        oss << "Title=\"SPECTRA\"" << endl;
+        oss << "Variables=" << endl;
+        oss << "ky" << endl;
+        oss << "Euu" << endl;
+        oss << "Evv" << endl;
+        oss << "Eww" << endl;
+    }
+
+    string formatSpectra;
+    PrepareFormatedSpectraKy(GridData, formatSpectra);
+
+    oss << formatSpectra;
+
+    WriteASCIIFile(file, oss.str());
+
+    ParallelCloseFile(actkeyDumpSpectra);
+
+    delete actkeyDumpSpectra;
+}
+
+void StatisticsHIT::PrepareFormatedSpectraKy(SpecGrid *GridData, string &formatSpectra)
+{
+    RDouble reynolds = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+
+    RDouble realYL = GlobalDataBase::GetDoubleParaFromDB("YL");
+
+    int jStartFourierIndexGlobal = GridData -> jStartFourierIndexGlobal;
+
+    int nY = GridData -> nY;
+
+    ostringstream oss;
+
+    oss << setiosflags(ios::left);
+    oss << setprecision(5);
+    oss << setiosflags(ios::scientific);
+    oss << setiosflags(ios::showpoint);
+
+    for (int iy = jStartFourierIndexGlobal; iy <= (nY/2+1); ++ iy)
+    {
+        RDouble rk_y = static_cast<double>(iy - jStartFourierIndexGlobal) / realYL;
+        oss << rk_y << "    ";
+        oss << (*energyOfUUKy)(iy, 1) << "    ";
+        oss << (*energyOfUUKy)(iy, 2) << "    ";
+        oss << (*energyOfUUKy)(iy, 3) << "    ";
+        oss << "\n";
+    }
+
+    oss << endl;
+
+    formatSpectra = oss.str();
+}
+
+void Statistics::PrepareFormatedSpectraKy(SpecDiffHybGrid *GridData, string &formatSpectra)
+{
+    RDouble reynolds = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+
+    RDouble realYL = GlobalDataBase::GetDoubleParaFromDB("YL");
+
+    RDouble1D *realZ = GridData -> realZ;
+
+    int istf = GridData -> iStartFourierIndex;
+
+    int jStartFourierIndexGlobal = GridData -> jStartFourierIndexGlobal;
+
+    int nY = GridData -> nY;
+
+    ostringstream oss;
+
+    oss << setiosflags(ios::left);
+    oss << setprecision(5);
+    oss << setiosflags(ios::scientific);
+    oss << setiosflags(ios::showpoint);
+
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        oss << "zone t = \"yplus = " << (1.0 + (*realZ)(iz)) * reynolds << "\"\n";
+
+        for (int iy = jStartFourierIndexGlobal; iy <= (nY/2+1); ++ iy)
+        {
+            RDouble rk_y = static_cast<double>(iy - jStartFourierIndexGlobal) / realYL;
+            oss << rk_y << "    ";
+            oss << (*energyOfUUKy)(iz, iy, 1) << "    ";
+            oss << (*energyOfUUKy)(iz, iy, 2) << "    ";
+            oss << (*energyOfUUKy)(iz, iy, 3) << "    ";
+            oss << "\n";
+        }
+    }
+
+    oss << endl;
+
+    formatSpectra = oss.str();
+}
+
+void StatisticsHIT::WriteSpectraKzVisual(SpecGrid *GridData)
+{
+    ActionKey *actkeyDumpSpectra = new ActionKey();
+    FillActionKey(actkeyDumpSpectra, VISUALIZATION_AVERAGE_FLOW, 0);
+
+    string spectraFileName = "results/Euu_kz";
+
+    actkeyDumpSpectra->filename = spectraFileName;
+    actkeyDumpSpectra->openmode = ios_base::out|ios_base::trunc;
+
+    if (!actkeyDumpSpectra->IsNeedOpenFile())
+    {
+        return;
+    }
+
+    ParallelOpenFile(actkeyDumpSpectra);
+
+    std::ostringstream oss;
+    fstream &file = *(actkeyDumpSpectra->file);
+
+    if (IfFileEmpty(file))
+    {
+        oss << "Title=\"SPECTRA\"" << endl;
+        oss << "Variables=" << endl;
+        oss << "kz" << endl;
+        oss << "Euu" << endl;
+        oss << "Evv" << endl;
+        oss << "Eww" << endl;
+    }
+
+    string formatSpectra;
+    PrepareFormatedSpectraKz(GridData, formatSpectra);
+
+    oss << formatSpectra;
+
+    WriteASCIIFile(file, oss.str());
+
+    ParallelCloseFile(actkeyDumpSpectra);
+
+    delete actkeyDumpSpectra;
+}
+
+void StatisticsHIT::PrepareFormatedSpectraKz(SpecGrid *GridData, string &formatSpectra)
+{
+    RDouble reynolds = GlobalDataBase::GetDoubleParaFromDB("refReNumber");
+
+    RDouble realZL = GlobalDataBase::GetDoubleParaFromDB("ZL");
+
+    int iStartFourierIndexGlobal = GridData -> kStartFourierIndexGlobal;
+
+    int nZ = GridData -> nZ;
+
+    ostringstream oss;
+
+    oss << setiosflags(ios::left);
+    oss << setprecision(5);
+    oss << setiosflags(ios::scientific);
+    oss << setiosflags(ios::showpoint);
+
+    for (int iz = iStartFourierIndexGlobal; iz <= (nZ/2+1); ++ iz)
+    {
+        RDouble kz = static_cast<double>(iz - iStartFourierIndexGlobal) / realZL;
+        oss << kz << "    ";
+        oss << (*energyOfUUKz)(iz, 1) << "    ";
+        oss << (*energyOfUUKz)(iz, 2) << "    ";
+        oss << (*energyOfUUKz)(iz, 3) << "    ";
+        oss << "\n";
+    }
+
+    oss << endl;
+
+    formatSpectra = oss.str();
+}
+
+/*
+void Statistics::WriteStatisticVisual(SpecDiffHybGrid *GridData)
+{
+    RDouble1D *realZ = GridData -> realZ;
+    int istf = GridData -> iStartFourierIndex;
+    int x0Fall = GridData -> x0Fall;
+    int xNFall = GridData -> xNFall;
+    int y0Fall = GridData -> y0Fall;
+    int nY = GridData -> nY;
+    Range IHalf(istf, iz_half);
+    Range XN(x0Fall, xNFall);
+    Range YNHalf(y0Fall, nY/2+1);
+    Range N9(1, 9);
+
+    Param_SpecDiffHybSolver *parameters = GetControlParameters();
+    RDouble reynolds = parameters->GetRefReNumber();
+    RDouble dreynolds2 = 1.0 / reynolds / reynolds;
+
+    fstream file;
+    file.open("statistic_selected.dat", ios_base::out);
+    if (!file)
+    {
+        TK_Exit::ExceptionExit("could not open statistic_selected.dat\n");
+    }
+    file << "variables = i, z, zplus, uavg, vavg, wavg, ruu, rvv, rww, epsilon, eps_ux, eps_vx, eps_wx, eps_uy, eps_vy, eps_wy, eps_uz, eps_vz, eps_wz \n";
+    int wordwidth = 20;
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        file << setw(wordwidth) << iz;
+        file << setiosflags(ios::right);
+        file << setprecision(10);
+        file << setiosflags(ios::scientific);
+        file << setiosflags(ios::showpoint);
+        file << setw(wordwidth) << (*realZ)(iz)
+             << setw(wordwidth) << (1.0 + (*realZ)(iz)) * reynolds
+             << setw(wordwidth) << (*uAverage)(iz)
+             << setw(wordwidth) << (*vAverage)(iz)
+             << setw(wordwidth) << (*wAverage)(iz)
+             << setw(wordwidth) << (*uSquare)(iz)
+             << setw(wordwidth) << (*vSquare)(iz)
+             << setw(wordwidth) << (*wSquare)(iz)
+             << setw(wordwidth) << (*epsilon)(iz) * dreynolds2
+             << setw(wordwidth) << (*epsilonXYZ)(iz, 1) * dreynolds2
+             << setw(wordwidth) << (*epsilonXYZ)(iz, 2) * dreynolds2
+             << setw(wordwidth) << (*epsilonXYZ)(iz, 3) * dreynolds2
+             << setw(wordwidth) << (*epsilonXYZ)(iz, 4) * dreynolds2
+             << setw(wordwidth) << (*epsilonXYZ)(iz, 5) * dreynolds2
+             << setw(wordwidth) << (*epsilonXYZ)(iz, 6) * dreynolds2
+             << setw(wordwidth) << (*epsilonXYZ)(iz, 7) * dreynolds2
+             << setw(wordwidth) << (*epsilonXYZ)(iz, 8) * dreynolds2
+             << setw(wordwidth) << (*epsilonXYZ)(iz, 9) * dreynolds2
+             << "\n";
+    }
+    file.close();
+    file.clear();
+
+    double realXL = GlobalDataBase::GetDoubleParaFromDB("XL");       
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        //! write rEuu_kx.
+        string cheuufx = "./spectra/rEuu_kx_";
+        stringstream strmiz;
+        strmiz << iz;
+        cheuufx = cheuufx + strmiz.str() + ".dat";
+        file.open(cheuufx.c_str(), ios_base::out);
+        if (!file)
+        {
+            TK_Exit::ExceptionExit("could not open rEuu_kx.dat\n");
+        }
+        file << "variables = kx, Euu, Evv, Eww \n";
+        file << "zone t = \" yplus = " << setw(wordwidth) << (1.0 + (*realZ)(iz)) * reynolds << "\"" << "\n";
+        for (int ix = x0Fall; ix <= xNFall; ++ ix)
+        {
+            double rk_x = static_cast<double>(ix - x0Fall) / realXL;
+            file << setiosflags(ios::right);
+            file << setprecision(10);
+            file << setiosflags(ios::scientific);
+            file << setiosflags(ios::showpoint);
+            file << setw(wordwidth) << rk_x
+                 << setw(wordwidth) << (*energyOfUUKx)(iz, ix, 1)
+                 << setw(wordwidth) << (*energyOfUUKx)(iz, ix, 2)
+                 << setw(wordwidth) << (*energyOfUUKx)(iz, ix, 3)
+                 << "\n";
+        }
+        file.close();
+        file.clear();
+    }
+
+    double realYL = GlobalDataBase::GetDoubleParaFromDB("YL");
+    for (int iz = istf; iz <= iz_half; ++ iz)
+    {
+        // !write rEuu_ky
+        string cheuufy = "./spectra/rEuu_ky_";
+        stringstream strmiz;
+        strmiz << iz;
+        cheuufy = cheuufy +  strmiz.str() + ".dat";
+        file.open(cheuufy.c_str(), ios_base::out);
+        if (!file)
+        {
+            TK_Exit::ExceptionExit("could not open rEuu_ky.dat\n");
+        }
+        file << "variables = ky, Euu, Evv, Eww \n";
+        file << "zone t = \"yplus = " << setw(wordwidth) << (1.0 + (*realZ)(iz)) * reynolds << "\"" << "\n";
+        for (int iy = y0Fall; iy <= (nY/2+1); ++ iy)
+        {
+            double rk_y = static_cast<double>(iy - y0Fall) / realYL;
+            file << setiosflags(ios::right);
+            file << setprecision(10);
+            file << setiosflags(ios::scientific);
+            file << setiosflags(ios::showpoint);
+            file << setw(wordwidth) << rk_y
+                 << setw(wordwidth) << (*energyOfUUKy)(iz, iy, 1)
+                 << setw(wordwidth) << (*energyOfUUKy)(iz, iy, 2)
+                 << setw(wordwidth) << (*energyOfUUKy)(iz, iy, 3)
+                 << "\n";
+        }
+        file.close();
+        file.clear();
+    }// !for iz
+}
+*/
+
+void StatisticsHIT::FillActionKey(ActionKey *actkey, int action, int level)
+{
+    actkey->action     = action;
+    actkey->solver     = 1;
+    actkey->solverID   = 0;
+    actkey->kind       = SOLVER_BASED;
+    actkey->level      = level;
+}
+
+bool StatisticsHIT::IfStatisticExist()
+{
+    string outputdir = "./results";
+    outputdir = GlobalDataBase::GetStrParaFromDB("outputdir");
+
+    bool statisticExist_flag = false;
+
+    ifstream infile(statisticsRestartFile.c_str(), ios::in);
+    if (infile)
+    {
+        statisticExist_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return statisticExist_flag;
+}
+
+RDouble Statistics::GetTauWAverage()
+{
+    return this->tauWAverage;
+}
+
+void Statistics::SetTauWAverage(const RDouble &tauWAverageIn)
+{
+    this->tauWAverage = tauWAverageIn;
+}
+
+bool Statistics::GetIfInitStatistic()
+{
+    return this->ifInitStatistic;
+}
+
+void Statistics::SetIfInitStatistic(const bool &ifInitStatisticIn)
+{
+    this->ifInitStatistic = ifInitStatisticIn;
+}
+
+/*
+LIB_EXPORT void Statistics::InitControlParameters()
+{
+    FreeControlParameters();
+    controlParameters = new Param_SpecSolver();
+    controlParameters->Init();
+}
+
+LIB_EXPORT Param_SpecSolver *Statistics::GetControlParameters() const
+{
+    return static_cast <Param_SpecSolver *> (controlParameters);
+}
+*/
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/include/LESSolver.h b/CFD/TurbSolver/include/LESSolver.h
new file mode 100644
index 0000000..e4f75cc
--- /dev/null
+++ b/CFD/TurbSolver/include/LESSolver.h
@@ -0,0 +1,70 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      LESSolver.h
+//! @brief     Large-eddy simulation solver.
+//! @author    Zhang Zipei.
+
+#pragma once
+#include "CFDSolver.h"
+#include "Param_LESSolver.h"
+
+namespace PHSPACE
+{
+class ActionKey;
+class ActionTag;
+class Gradient;
+class Grid;
+
+class LESSolver : public CFDSolver
+{
+private:
+    static bool init_param;
+    static bool free_param;
+
+    static int nTurbEquations;
+
+public:
+    LESSolver();
+    ~LESSolver();
+
+public:
+    void Action(ActionKey *actkey);
+    void FillActionKey(ActionKey *actkey, int action, int level);
+    void Post();
+    void PostSolve(Grid *grid_in, int stage, int level = 0);
+    void DumpResultFile(Grid *grid, int level = 0);
+
+    static void InitParameter();
+    static void FreeParameter();
+
+    virtual void ComputeViscousCoeff(Grid *grid) {};
+
+    virtual void ObtainViscosity(Grid *grid) {};
+
+    //int GetNumberOfEquations();
+
+    //! Get the file name for Restart info dumping.
+    virtual const string GetRestartFileName();
+
+    //! Compare the outnstep in the flowfield file between the NS and LES.
+    void CompareOutStepOfFlowfieldFile(int outnstepofNS, int outnstepofTurb) const;
+
+    LIB_EXPORT Param_LESSolver * GetControlParameters();
+
+private:
+    void RegisterCFDSolverInterfaceField();
+
+    void InitDependentVariables();
+    
+};
+
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/include/LESSolverStruct.h b/CFD/TurbSolver/include/LESSolverStruct.h
new file mode 100644
index 0000000..8ff5394
--- /dev/null
+++ b/CFD/TurbSolver/include/LESSolverStruct.h
@@ -0,0 +1,187 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      LESSolverStruct.h
+//! @brief     Large-eddy simulation solver for struct grid.
+//! @author    Zhang Zipei.
+
+#pragma once
+#include "LESSolver.h"
+#include "AleModel.h"
+
+namespace PHSPACE
+{
+class Grid;
+class StructBC;
+class Param_LESSolverStruct;
+
+class LESSolverStruct : public LESSolver
+{
+private:
+
+public:
+    LESSolverStruct();
+    ~LESSolverStruct();
+
+public:
+    //! Create and initialize controlparameters.
+    LIB_EXPORT void InitControlParameters();
+
+    //! Get control paramters.
+    LIB_EXPORT Param_LESSolverStruct * GetControlParameters();
+
+    //! Judge if the flow field variables file already exists in LES solver.
+    bool JudgeIfRestart();
+    bool JudgeIfReadAverage();
+
+    //! To write the flow data to restart file by HDF5 "fts" form for continue to simulation.
+    //! @param[in ]: actkey contains the control information.
+    void DumpRestartH5(ActionKey *actkey);
+
+    //! To read the flow data from restart file by HDF5 "fts" form  for continue to simulation.
+    //! @param[in ]: actkey contains the control information.
+    void ReadRestartH5(ActionKey *actkey);
+
+private:
+    void AllocateGlobalVar(Grid *gridIn);
+    void DeAllocateGlobalVar(Grid *gridIn);
+
+    void Init(Grid *gridIn);
+
+    void InitFlowAsRestart();
+
+    void ComputeCellLengthScale(Grid *gridIn);
+
+    void ComputeWallFunction(Grid *gridIn);
+
+    void WallFunctionofVanDriest(Grid *gridIn);
+    void WallFunctionofDXB(Grid *gridIn);
+    void WallFunctionofPiomelli(Grid *gridIn);
+
+    void ComputeViscousCoeff(Grid *gridIn);
+
+    void GetDependentVariablesforStructHighOrder(Grid *gridIn);
+
+    void ComputeGradientCellCenter(Grid *gridIn);
+    void ObtainGradientCellCenterHighOrder(Grid *gridIn);
+    void GetUVWTproxy(Grid *gridIn);
+    void GetUVWTfaceproxy(Grid *gridIn, int nsurf);
+    void GetUVWTfaceproxy_HDCS(Grid *gridIn, int nsurf);
+    void GetdqdkxietactaCellCenter(Grid *gridIn, int nsurf);
+    void GetdqdkxietactaCellCenter_HDCS(Grid *gridIn, int nsurf);
+
+    void UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy);
+
+    //! Interface: to get the turbulent viscosity for struct high-order solver.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void ObtainViscosity(Grid *gridIn);
+
+    //! To set turbulent flow field variables's value at the corner point.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void CornerPoint(Grid *gridIn);
+
+    //! To set the flow field value of the external boundary condition of the computational region. \n
+    //! It looped all the internal boundary and was realized by call the specific boundary functions.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void Boundary(Grid *gridIn);
+    void ObtainBoundaryValue(Grid *gridIn);
+    void VisWall(Grid *gridIn, StructBC *structBC);
+    void FarFieldBC(Grid *gridIn, StructBC *structBC);
+    void SymmetryBC(Grid *gridIn, StructBC *structBC);
+    void InFlowBC(Grid *gridIn, StructBC *structBC);
+    void OutFlowBC(Grid *gridIn, StructBC *structBC);
+
+    void Smagorinsky(Grid *gridIn);
+
+    void DynamicSmagViscosity(Grid *gridIn);
+    void DynamicSmagViscosityCompressible(Grid *gridIn);
+    //! CHANG-YUE XU, LI-WEI CHEN AND XI-YUN LU, 2010, Large-eddy simulation of the compressible flow past a wavy cylinder.
+
+    void DynamicSmagViscosityCompressibleFD(Grid *gridIn);
+
+    void DynamicSmagViscosityCompressibleOld(Grid *gridIn);
+    void DynamicSmagViscosityIncompressible(Grid *gridIn);
+    void DynamicSmagViscosityIncompressibleOld(Grid *gridIn);
+    void ComputeTestFilteredQ(Grid *gridIn);
+    void ComputeTestFilteredQFD(Grid *gridIn);
+    //void ComputeTestFilteredDensity(Grid *gridIn);
+    void ComputeTestFilteredTemperature(Grid *gridIn);
+    void ComputeTestFilteredTemperatureFD(Grid *gridIn);
+
+    void ComputeStrainRateTensor(Grid *gridIn);
+
+    void ComputeGradT(Grid *gridIn);
+    void ComputeGradTFD(Grid *gridIn);
+
+    void ComputeTestFilteredStrainRateTensor(Grid *gridIn);
+    void ComputeTestFilteredStrainRateTensorFD(Grid *gridIn);
+
+    void ComputeTestFilteredRhoUiUj(Grid *gridIn);
+    void ComputeTestFilteredRhoUiUjFD(Grid *gridIn);
+
+    void ComputeLeonardStress(Grid *gridIn);
+    void ComputeModeledStress(Grid *gridIn);
+    void ComputeTestFilteredAlphaIJ(Grid *gridIn);
+    void ComputeTestFilteredAlphaIJFD(Grid *gridIn);
+    void ComputeBetaIJ(Grid *gridIn);
+    void ComputeAnisotropicConstant(Grid *gridIn);
+    void ComputeIsotropicConstant(Grid *gridIn);
+    void ComputePrandtlNumber(Grid *gridIn);
+    void ComputeLeonardTemperatureTerm(Grid *gridIn);
+    void ComputeModeledTemperatureTerm(Grid *gridIn);
+
+    void ComputeTestFilteredRhoUT(Grid *gridIn);
+    void ComputeTestFilteredRhoUTFD(Grid *gridIn);
+    
+    void ComputeTestFilteredGradT(Grid *gridIn);
+
+    void ComputeTestFilteredRhoStrainRateMagnitudeGradT(Grid *gridIn);
+    void ComputeTestFilteredRhoStrainRateMagnitudeGradTFD(Grid *gridIn);
+
+    void WALE(Grid *grid);
+    //! F. Nicoud and F. Ducros, 1999, Subgrid-Scale Stress Modelling Based on the Square of the Velocity Gradient Tensor.
+    //! Christian Wollblad et.al., 2006, Large Eddy Simulation of Transonic Flow with Shock Wave/Turbulence Boundary Layer Interaction.
+
+    void Sigma(Grid *gridIn);
+
+    void ComputeDifferentialSigma(RDouble ** velocityGradTensor, RDouble &differentialSigma);
+
+    void filter(const int & nn, RFloat1D * fu1, RFloat1D * fu2, RFloat1D * fu3
+                ,RFloat1D * fuifuj11, RFloat1D * fuifuj22, RFloat1D * fuifuj33, RFloat1D * fuifuj12, RFloat1D * fuifuj13, RFloat1D * fuifuj23
+                ,RFloat1D * fs11    , RFloat1D * fs22    , RFloat1D * fs33    , RFloat1D * fs12    , RFloat1D * fs13    , RFloat1D * fs23    
+                ,RFloat1D * fsfs11  , RFloat1D * fsfs22  , RFloat1D * fsfs33  , RFloat1D * fsfs12  , RFloat1D * fsfs13  , RFloat1D * fsfs23);
+    void TestFilter(const int &nn,RFloat1D *fu);
+    void TestFilter(const int &n0, const int &nn, RDouble1D *&tf, RDouble1D *&f);
+    void TestFilter(const int &n0, const int &nn, RDouble *tf, RDouble *f);
+
+    //! To obtain the grid scale using in sub-grid model.
+    void GetDeltaBar(const int iDeltaBar, const RDouble deltai, const RDouble deltaj, const RDouble deltak, RDouble &deltaBar);
+
+    //! To calculate the non-isotriopic fix of filter width of Scotti&Meneveau (scotti1993, scotti1997, physics of fluid).
+    void GetFilterWidthOfScotti(const RDouble deltai, const RDouble deltaj, const RDouble deltak, RDouble &deltaBar);
+
+public:
+    void UploadInterfaceValue(ActionKey *actkey);
+    void UploadInterfaceData(ActionKey *actkey);
+
+    void DownloadInterfaceValue(ActionKey *actkey);
+    void DownloadInterfaceData(ActionKey *actkey);
+
+    void RotateVectorFromInterface(Grid *gridIn, const int &neighborZoneIndex, const int &nEquation);
+
+private:
+    FieldProxy *UVWTproxy;
+    FieldProxy *UVWTfaceIproxy;
+    FieldProxy *UVWTfaceJproxy;
+    FieldProxy *UVWTfaceKproxy;
+};
+
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/include/LESSolverUnstr.h b/CFD/TurbSolver/include/LESSolverUnstr.h
new file mode 100644
index 0000000..0d79170
--- /dev/null
+++ b/CFD/TurbSolver/include/LESSolverUnstr.h
@@ -0,0 +1,84 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      LESSolverUnstr.h
+//! @brief     Large-eddy simulation solver for unstruct grid.
+//! @author    Zhang Zipei.
+
+#pragma once
+#include "LESSolver.h"
+#include "AleModel.h"
+
+namespace PHSPACE
+{
+class Param_LESSolverUnstruct;
+
+class LESSolverUnstr : public LESSolver
+{
+
+public:
+    LESSolverUnstr();
+    ~LESSolverUnstr();
+
+    void AllocateGlobalVar(Grid *gridIn);
+
+    void DeAllocateGlobalVar(Grid *gridIn);
+
+    LIB_EXPORT void InitControlParameters();
+
+    LIB_EXPORT Param_LESSolverUnstruct *GetControlParameters();
+
+private:
+    void Init(Grid *gridIn);
+
+    void InitFlowAsRestart();
+
+    void ComputeCellLengthScale(Grid *gridIn);
+
+    void ComputeGradient(Grid *gridIn);
+
+    void GetGradientField(Grid *gridIn);
+
+    void ComputeViscousCoeff(Grid *gridIn);
+
+    void UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy);
+
+    void ObtainViscosity(Grid *gridIn);
+
+    void ObtainBoundaryValue(Grid *gridIn);
+
+    void ComputeStrainRateTensor(Grid *gridIn);
+
+    void ComputeWallFunction(Grid *gridIn);
+
+    void WallFunctionofVanDriest(Grid *gridIn);
+
+    void Boundary(Grid *gridIn);
+
+    void Smagorinsky(Grid *gridIn);
+
+    void WALE(Grid *gridIn);
+
+    void Sigma(Grid *gridIn);
+
+    void ComputeDifferentialSigma(RDouble ** velocityGradTensor, RDouble &differentialSigma);
+
+public:
+    void UploadInterfaceValue(ActionKey *actkey);
+    void UploadInterfaceData(ActionKey *actkey);
+
+    void DownloadInterfaceValue(ActionKey *actkey);
+    void DownloadInterfaceData(ActionKey *actkey);
+
+    FieldProxy * GetFieldProxy(Grid *gridIn, const string &field_name);
+};
+
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/include/Param_LESSolver.h b/CFD/TurbSolver/include/Param_LESSolver.h
new file mode 100644
index 0000000..aad9077
--- /dev/null
+++ b/CFD/TurbSolver/include/Param_LESSolver.h
@@ -0,0 +1,121 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Param_LESSolver.h
+//! @brief     Record paramters of LESSolver.
+//! @author    Zhang Zipei.
+#pragma once
+#include "LIB_Macro.h"
+#include "Param_CFDSolver.h"
+
+namespace PHSPACE
+{
+
+class Param_LESSolver : public Param_CFDSolver
+{
+public:
+    LIB_EXPORT Param_LESSolver();
+
+    LIB_EXPORT ~Param_LESSolver();
+
+public:
+
+    LIB_EXPORT void Init();
+
+    RDouble GetEddyViscosityLimit() const;
+
+    int GetWallDampingFunctionType() const;
+
+    int GetSubgridScaleModel() const;
+
+    RDouble * GetTestFilterCoef() const;
+
+    int GetTestFilterWidth() const;
+
+    RDouble GetSmagConstant() const;
+
+    RDouble GetIsotropicConstant() const;
+
+    RDouble GetYploge() const;
+
+    int GetDeltaFunctionType() const;
+
+    RDouble GetRgam() const;
+
+    int GetTurbViscousCutType() const;
+
+    RDouble GetTestFilterScale() const;
+
+    RDouble GetWaleConstant() const;
+
+    RDouble GetSigmaConstant() const;
+
+    int * GetFilterDirection() const;
+
+    int * GetAverageDirection() const;
+
+    int GetAverageWidth() const;
+
+    RDouble GetoPrandtlTurbulence() const;
+
+    RDouble GetPrandtlTurbulence() const;
+
+    RDouble GetFreeStreamViscosity() const;
+
+    string GetGradientName() const;
+
+private:
+
+    RDouble eddyViscosityLimit;
+
+    int wallDampingFunctionType;
+
+    int subgridScaleModel;
+
+    RDouble * testFilterCoef;
+
+    int testFilterWidth;
+
+    RDouble smagConstant;
+
+    RDouble isotropicConstant;
+
+    RDouble yploge;
+
+    int deltaFunctionType;
+
+    RDouble rgam;
+
+    int turbViscousCutType;
+
+    RDouble testFilterScale;
+
+    RDouble waleConstant;
+
+    RDouble sigmaConstant;
+
+    int * filterDirection;
+
+    int * averageDirection;
+
+    int averageWidth;
+
+    RDouble oPrandtlTurbulence;
+
+    RDouble prandtlTurbulence;
+
+    RDouble freeStreamViscosity;
+
+    string gradientName;
+};
+
+#include "Param_LESSolver.hxx"
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/include/Param_LESSolver.hxx b/CFD/TurbSolver/include/Param_LESSolver.hxx
new file mode 100644
index 0000000..191f1c4
--- /dev/null
+++ b/CFD/TurbSolver/include/Param_LESSolver.hxx
@@ -0,0 +1,104 @@
+inline RDouble Param_LESSolver::GetEddyViscosityLimit() const
+{
+    return eddyViscosityLimit;
+}
+
+inline int Param_LESSolver::GetWallDampingFunctionType() const
+{
+    return wallDampingFunctionType;
+}
+
+inline int Param_LESSolver::GetSubgridScaleModel() const
+{
+    return subgridScaleModel;
+}
+
+inline RDouble * Param_LESSolver::GetTestFilterCoef() const
+{
+    return testFilterCoef;
+}
+
+inline int Param_LESSolver::GetTestFilterWidth() const
+{
+    return testFilterWidth;
+}
+
+inline RDouble Param_LESSolver::GetSmagConstant() const
+{
+    return smagConstant;
+}
+
+inline RDouble Param_LESSolver::GetIsotropicConstant() const
+{
+    return isotropicConstant;
+}
+
+inline RDouble Param_LESSolver::GetYploge() const
+{
+    return yploge;
+}
+
+inline int Param_LESSolver::GetDeltaFunctionType() const
+{
+    return deltaFunctionType;
+}
+
+inline RDouble Param_LESSolver::GetRgam() const
+{
+    return rgam;
+}
+
+inline int Param_LESSolver::GetTurbViscousCutType() const
+{
+    return turbViscousCutType;
+}
+
+inline RDouble Param_LESSolver::GetTestFilterScale() const
+{
+    return testFilterScale;
+}
+
+inline RDouble Param_LESSolver::GetWaleConstant() const
+{
+    return waleConstant;
+}
+
+inline RDouble Param_LESSolver::GetSigmaConstant() const
+{
+    return sigmaConstant;
+}
+
+inline int * Param_LESSolver::GetFilterDirection() const
+{
+    return filterDirection;
+}
+
+inline int * Param_LESSolver::GetAverageDirection() const
+{
+    return averageDirection;
+}
+
+inline int Param_LESSolver::GetAverageWidth() const
+{
+    return averageWidth;
+}
+
+inline RDouble Param_LESSolver::GetoPrandtlTurbulence() const
+{
+    return oPrandtlTurbulence;
+}
+
+inline RDouble Param_LESSolver::GetPrandtlTurbulence() const
+{
+    return prandtlTurbulence;
+}
+
+inline RDouble Param_LESSolver::GetFreeStreamViscosity() const
+{
+    return freeStreamViscosity;
+}
+
+inline string Param_LESSolver::GetGradientName() const
+{
+    return gradientName;
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/include/Param_LESSolverStruct.h b/CFD/TurbSolver/include/Param_LESSolverStruct.h
new file mode 100644
index 0000000..4c81d91
--- /dev/null
+++ b/CFD/TurbSolver/include/Param_LESSolverStruct.h
@@ -0,0 +1,36 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Param_LESSolverStruct.h
+//! @brief     Record paramters of LESSolverStruct.
+//! @author    Zhang Zipei.
+#pragma once
+#include "Param_LESSolver.h"
+
+namespace PHSPACE
+{
+
+class Param_LESSolverStruct : public Param_LESSolver
+{
+public:
+    LIB_EXPORT Param_LESSolverStruct();
+
+    LIB_EXPORT ~Param_LESSolverStruct();
+
+public:
+
+    LIB_EXPORT void Init();
+
+private:
+
+};
+
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/include/Param_LESSolverUnstruct.h b/CFD/TurbSolver/include/Param_LESSolverUnstruct.h
new file mode 100644
index 0000000..b4c7f39
--- /dev/null
+++ b/CFD/TurbSolver/include/Param_LESSolverUnstruct.h
@@ -0,0 +1,36 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Param_LESSolverUnstruct.h
+//! @brief     Record paramters of LESSolverUnstruct.
+//! @author    Zhang Zipei.
+#pragma once
+#include "Param_LESSolver.h"
+
+namespace PHSPACE
+{
+
+class Param_LESSolverUnstruct : public Param_LESSolver
+{
+public:
+    LIB_EXPORT Param_LESSolverUnstruct();
+
+    LIB_EXPORT ~Param_LESSolverUnstruct();
+
+public:
+
+    LIB_EXPORT void Init();
+
+private:
+
+};
+
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/include/Param_TransitionSolver.h b/CFD/TurbSolver/include/Param_TransitionSolver.h
new file mode 100644
index 0000000..63aa2c0
--- /dev/null
+++ b/CFD/TurbSolver/include/Param_TransitionSolver.h
@@ -0,0 +1,84 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Param_TransitionSolver.h
+//! @brief     Record paramters of TransitionSolver.
+//! @author    He Kun.
+
+#pragma once
+#include "Param_CFDSolver.h"
+
+namespace PHSPACE
+{
+
+class Param_TransitionSolver : public Param_CFDSolver
+{
+public:
+
+    LIB_EXPORT ~Param_TransitionSolver();
+
+public:
+
+    LIB_EXPORT void Init();
+
+    RDouble GetTransitionCFLScale() const;
+
+    int GetTransitionType() const;
+
+    int GetNTransitionEquation() const;
+
+    RDouble Getca1() const;
+
+    RDouble Getca2() const;
+
+    RDouble Getce1() const;
+
+    RDouble Getce2() const;
+
+    RDouble Getdct() const;
+
+    RDouble Getdf() const;
+
+    RDouble Getcct() const;
+
+    RDouble Gets1() const;
+
+    RDouble Getccf() const;
+
+    RDouble *GetFreeStreamTransitionVar() const;
+
+private:
+
+    RDouble transitionCFLScale;
+
+    int transitionType;
+
+    int nTransitionEquation;
+
+    RDouble ca1;
+    RDouble ce1;
+    RDouble ca2;
+    RDouble ce2;
+    RDouble dct;
+    RDouble df;
+    RDouble cct;
+    RDouble s1;
+    RDouble ccf;
+
+    RDouble turbulenceIntensity;
+
+    RDouble freeStreamViscosity;
+
+    RDouble *freeStreamTransitionVar;
+};
+
+#include "Param_TransitionSolver.hxx"
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/include/Param_TransitionSolver.hxx b/CFD/TurbSolver/include/Param_TransitionSolver.hxx
new file mode 100644
index 0000000..e549c93
--- /dev/null
+++ b/CFD/TurbSolver/include/Param_TransitionSolver.hxx
@@ -0,0 +1,65 @@
+inline RDouble Param_TransitionSolver::GetTransitionCFLScale() const
+{
+    return transitionCFLScale;
+}
+
+inline int Param_TransitionSolver::GetTransitionType() const
+{
+    return transitionType;
+}
+
+inline int Param_TransitionSolver::GetNTransitionEquation() const
+{
+    return nTransitionEquation;
+}
+
+inline RDouble Param_TransitionSolver::Getca1() const
+{
+    return ca1;
+}
+
+inline RDouble Param_TransitionSolver::Getca2() const
+{
+    return ca2;
+}
+
+inline RDouble Param_TransitionSolver::Getce1() const
+{
+    return ce1;
+}
+
+inline RDouble Param_TransitionSolver::Getce2() const
+{
+    return ce2;
+}
+
+inline RDouble Param_TransitionSolver::Getdct() const
+{
+    return dct;
+}
+
+inline RDouble Param_TransitionSolver::Getdf() const
+{
+    return df;
+}
+
+inline RDouble Param_TransitionSolver::Getcct() const
+{
+    return cct;
+}
+
+inline RDouble Param_TransitionSolver::Gets1() const
+{
+    return s1;
+}
+
+inline RDouble Param_TransitionSolver::Getccf() const
+{
+    return ccf;
+}
+
+inline RDouble * Param_TransitionSolver::GetFreeStreamTransitionVar() const
+{
+    return freeStreamTransitionVar;
+}
+
diff --git a/CFD/TurbSolver/include/Param_TurbSolver.h b/CFD/TurbSolver/include/Param_TurbSolver.h
new file mode 100644
index 0000000..21656c0
--- /dev/null
+++ b/CFD/TurbSolver/include/Param_TurbSolver.h
@@ -0,0 +1,158 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Param_TurbSolver.h
+//! @brief     Record paramters of TurbSolver.
+//! @author    Bell, Zhang Jian, Wan Yunbo, Meng Liyuan.
+
+#pragma once
+#include "Param_CFDSolver.h"
+
+namespace PHSPACE
+{
+
+class Param_TurbSolver : public Param_CFDSolver
+{
+public:
+    LIB_EXPORT Param_TurbSolver();
+
+    LIB_EXPORT ~Param_TurbSolver();
+
+public:
+
+    LIB_EXPORT void Init();
+
+    RDouble GetTurbCFLScale() const;
+
+    int GetDESType() const;
+
+    int GetTransitionType() const;
+
+    int GetSAProductType() const;
+
+    int GetSSTProductType() const;
+
+    int GetNTurbulenceEquation() const;
+
+    RDouble GetEddyViscosityLimit() const;
+
+    int GetWallFunctionType() const;
+
+    RDouble GetSST_a1() const;
+
+    RDouble GetSST_alphaw1() const;
+
+    RDouble GetSST_alphaw2() const;
+
+    RDouble GetSST_beta1() const;
+
+    RDouble GetSST_beta2() const;
+
+    RDouble GetSST_betaStar() const;
+
+    RDouble GetSA_cv1_cube() const;
+
+    RDouble GetSSTProductLimit() const;
+
+    RDouble GetKW_sigma() const;
+
+    RDouble GetKW_sigmaW() const;
+
+    RDouble GetKW_sigmaW1() const;
+
+    RDouble GetKW_sigmaW2() const;
+
+    RDouble GetKW_sigmaK() const;
+
+    RDouble GetKW_sigmaK1() const;
+
+    RDouble GetKW_sigmaK2() const;
+
+    RDouble GetFreeStreamViscosity() const;
+
+    RDouble * GetFreeStreamTurbVar() const;
+
+    int GetKindOfTurbSource() const;
+
+    RDouble GetInviscidSpectrumRadiusCoef() const;
+
+    int GetWennSchemeFlag() const;
+
+    //! Return using original ( = 0 ) or conservative variables ( = 1 )\n.
+    //! 0: original form.\n
+    //! 1: conservative form.\n
+    int UsingConservativeForm() const;
+private:
+
+    RDouble turbCFLScale;
+
+    int DESType;
+
+    int transitionType;
+    int SAProductType;
+
+    int SSTProductType;
+
+    int nTurbulenceEquation;
+
+    RDouble eddyViscosityLimit;
+
+    int wallFunctionType;
+
+    RDouble SST_a1;
+
+    RDouble SST_alphaw1;
+
+    RDouble SST_alphaw2;
+
+    RDouble SST_beta1;
+
+    RDouble SST_beta2;
+
+    RDouble SST_betaStar;
+
+    RDouble SA_cv1_cube;
+
+    RDouble SSTProductLimit;
+
+    RDouble KW_sigma;
+
+    RDouble KW_sigmaW;
+
+    RDouble KW_sigmaW1;
+
+    RDouble KW_sigmaW2;
+
+    RDouble KW_sigmaK;
+
+    RDouble KW_sigmaK1;
+
+    RDouble KW_sigmaK2;
+
+    RDouble turbulenceIntensity;
+
+    RDouble freeStreamViscosity;
+
+    RDouble * freeStreamTurbVar;
+
+    int kindOfTurbSource;
+    int isWennScheme;
+
+    //! Used to compatible both original ( = 0 ) and conservative variables ( = 1 )\n.
+    //! 0: original form.\n
+    //! 1: conservative form.\n
+    int rhoFlag;
+
+    RDouble inviscidSpectrumRadiusCoef;
+};
+
+#include "Param_TurbSolver.hxx"
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/include/Param_TurbSolver.hxx b/CFD/TurbSolver/include/Param_TurbSolver.hxx
new file mode 100644
index 0000000..131fbaf
--- /dev/null
+++ b/CFD/TurbSolver/include/Param_TurbSolver.hxx
@@ -0,0 +1,143 @@
+inline RDouble Param_TurbSolver::GetTurbCFLScale() const
+{
+    return turbCFLScale;
+}
+
+inline int Param_TurbSolver::GetDESType() const
+{
+    return DESType;
+}
+
+inline int Param_TurbSolver::GetTransitionType() const
+{
+    return transitionType;
+}
+
+inline int Param_TurbSolver::GetSAProductType() const
+{
+    return SAProductType;
+}
+
+inline int Param_TurbSolver::GetSSTProductType() const
+{
+    return SSTProductType;
+}
+
+inline int Param_TurbSolver::GetNTurbulenceEquation() const
+{
+    return nTurbulenceEquation;
+}
+
+inline RDouble Param_TurbSolver::GetEddyViscosityLimit() const
+{
+    return eddyViscosityLimit;
+}
+
+inline int Param_TurbSolver::GetWallFunctionType() const
+{
+    return wallFunctionType;
+}
+
+inline RDouble Param_TurbSolver::GetSST_a1() const
+{
+    return SST_a1;
+}
+
+inline RDouble Param_TurbSolver::GetSST_alphaw1() const
+{
+    return SST_alphaw1;
+}
+
+inline RDouble Param_TurbSolver::GetSST_alphaw2() const
+{
+    return SST_alphaw2;
+}
+
+inline RDouble Param_TurbSolver::GetSST_beta1() const
+{
+    return SST_beta1;
+}
+
+inline RDouble Param_TurbSolver::GetSST_beta2() const
+{
+    return SST_beta2;
+}
+
+inline RDouble Param_TurbSolver::GetSST_betaStar() const
+{
+    return SST_betaStar;
+}
+
+inline RDouble Param_TurbSolver::GetSA_cv1_cube() const
+{
+    return SA_cv1_cube;
+}
+
+inline RDouble Param_TurbSolver::GetSSTProductLimit() const
+{
+    return SSTProductLimit;
+}
+
+inline RDouble Param_TurbSolver::GetKW_sigma() const
+{
+    return KW_sigma;
+}
+
+inline RDouble Param_TurbSolver::GetKW_sigmaW() const
+{
+    return KW_sigmaW;
+}
+
+inline RDouble Param_TurbSolver::GetKW_sigmaW1() const
+{
+    return KW_sigmaW1;
+}
+
+inline RDouble Param_TurbSolver::GetKW_sigmaW2() const
+{
+    return KW_sigmaW2;
+}
+
+inline RDouble Param_TurbSolver::GetKW_sigmaK() const
+{
+    return KW_sigmaK;
+}
+
+inline RDouble Param_TurbSolver::GetKW_sigmaK1() const
+{
+    return KW_sigmaK1;
+}
+
+inline RDouble Param_TurbSolver::GetKW_sigmaK2() const
+{
+    return KW_sigmaK2;
+}
+
+inline RDouble Param_TurbSolver::GetFreeStreamViscosity() const
+{
+    return freeStreamViscosity;
+}
+
+inline RDouble * Param_TurbSolver::GetFreeStreamTurbVar() const
+{
+    return freeStreamTurbVar;
+}
+
+inline int Param_TurbSolver::GetKindOfTurbSource() const
+{
+    return kindOfTurbSource;
+}
+
+inline int Param_TurbSolver::GetWennSchemeFlag() const
+{
+    return isWennScheme;
+}
+
+inline int Param_TurbSolver::UsingConservativeForm() const
+{
+    return rhoFlag;
+}
+inline RDouble Param_TurbSolver::GetInviscidSpectrumRadiusCoef() const
+{
+    return inviscidSpectrumRadiusCoef;
+}
diff --git a/CFD/TurbSolver/include/Param_TurbSolverStruct.h b/CFD/TurbSolver/include/Param_TurbSolverStruct.h
new file mode 100644
index 0000000..6479a3c
--- /dev/null
+++ b/CFD/TurbSolver/include/Param_TurbSolverStruct.h
@@ -0,0 +1,38 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Param_TurbSolverStruct.h
+//! @brief     Record paramters of TurbSolverStruct.
+//! @author    Bell, Zhang Jian, Wan Yunbo, Meng Liyuan.
+
+#pragma once
+#include "Param_TurbSolver.h"
+
+namespace PHSPACE
+{
+
+class Param_TurbSolverStruct : public Param_TurbSolver
+{
+public:
+    LIB_EXPORT Param_TurbSolverStruct();
+
+    LIB_EXPORT ~Param_TurbSolverStruct();
+
+public:
+
+    LIB_EXPORT void Init();
+
+private:
+
+};
+
+}
+
diff --git a/CFD/TurbSolver/include/Param_TurbSolverUnstruct.h b/CFD/TurbSolver/include/Param_TurbSolverUnstruct.h
new file mode 100644
index 0000000..b3f0b74
--- /dev/null
+++ b/CFD/TurbSolver/include/Param_TurbSolverUnstruct.h
@@ -0,0 +1,38 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Param_TurbSolverUnstruct.h
+//! @brief     Record paramters of TurbSolverstruct.
+//! @author    Bell, Zhang Jian, Wan Yunbo, Meng Liyuan.
+
+#pragma once
+#include "Param_TurbSolver.h"
+
+namespace PHSPACE
+{
+
+class Param_TurbSolverUnstruct : public Param_TurbSolver
+{
+public:
+    LIB_EXPORT Param_TurbSolverUnstruct();
+
+    LIB_EXPORT ~Param_TurbSolverUnstruct();
+
+public:
+
+    LIB_EXPORT void Init();
+
+private:
+
+};
+
+}
+
diff --git a/CFD/TurbSolver/include/Transition.h b/CFD/TurbSolver/include/Transition.h
new file mode 100644
index 0000000..c380149
--- /dev/null
+++ b/CFD/TurbSolver/include/Transition.h
@@ -0,0 +1,69 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Param_TransitionSolver.h
+//! @brief     Record paramters of TransitionSolver.
+//! @author    He Kun.
+
+#pragma once
+#include "LIB_Macro.h"
+#include "Precision.h"
+#include "Math_BasisFunction.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+    RDouble ReynoldsNumberBasedOnStrainRate(RDouble density, RDouble distanceToWall, RDouble viscosity,
+        RDouble strainrate, RDouble reynoldsNumberInflow);
+
+    RDouble ReynoldsNumberBasedOnDissipation(RDouble density, RDouble distanceToWall, RDouble viscosity,
+        RDouble dissipationRate, RDouble reynoldsNumberInflow);
+
+    RDouble ReynoldsDissipation(RDouble density, RDouble distanceToWall, RDouble viscosity,
+        RDouble dissipationRate, RDouble reynoldsNumberInflow);
+
+    RDouble ReynoldsNumberBasedOnScf(RDouble heightCrossFlow, RDouble velocity, RDouble density, 
+        RDouble viscosityLaminar, RDouble viscosityTurbulence, RDouble reynoldsNumberInflow);
+
+    RDouble TimeScaleInSourceTerm(RDouble density, RDouble velocity, RDouble viscosityLaminar, RDouble viscosityTurbulence, RDouble reynoldsNumberInflow);
+
+    RDouble MomentumThickness(RDouble density, RDouble velocity, RDouble viscosity, RDouble onsetReynoldsOnMomentumThickness,
+        RDouble reynoldsNumberInflow);
+
+    RDouble FlengthGivenByLangtry(RDouble localTransitiononsetReynoldsOnMomentumThickness);
+    RDouble FlengthCaliBrated(RDouble localTransitiononsetReynoldsOnMomentumThickness);
+    RDouble FlengthUnstrCaliBrated(RDouble localTransitiononsetReynoldsOnMomentumThickness);
+
+    RDouble HighReynoldsCorrectionOfFlength(RDouble ReynoldsNumberBasedOnDissipation, RDouble Flengthori);
+
+    RDouble ViscosityRatio(RDouble density, RDouble viscosity, RDouble kineticEnergy, RDouble dissipationRate, RDouble reynoldsInflow);
+
+    RDouble TransitionOnsetFunction(RDouble Rev, RDouble Rectac, RDouble RT);
+    RDouble TransitionOnsetMomentumThicknessReynolds(RDouble Rectabar);
+    RDouble TransitionOnsetMomentumThicknessReynoldsCaliBrated(RDouble Rectabar);
+    RDouble TransitionOnsetMomentumThicknessReynoldsUnstrCaliBrated(RDouble Rectabar);    
+    RDouble SeparationCorrectionOfIntermittency(RDouble gmori, RDouble Rev, RDouble Rectac, RDouble RT, RDouble Fctat, RDouble s1, RDouble refMaNumber);
+    RDouble TurbulenceIntensity(RDouble velocity, RDouble kineticEnergy);
+    RDouble ControlFunctionFturb(RDouble RT);
+    void CorrectionOfBlendingFunctionInSST(RDouble density, RDouble distance, RDouble viscosity, RDouble kineticEnergy, RDouble reynoldsInflow, RDouble &F1);
+
+    RDouble CorrectionOfDestructionInKEquation(RDouble gmeff, RDouble Dk);
+    RDouble CorrectionOfProductionInKEquation(RDouble gmeff, RDouble Pk);
+    RDouble EmpiricalCorrelationOfFlamdacta(RDouble Tu, RDouble lamdacta);
+    RDouble EmpiricalCorrelationOfRectat(RDouble Tu, RDouble Flamdacta);
+    RDouble AccelerationAlongStreamline(RDouble u, RDouble v, RDouble w, RDouble dudx, RDouble dudy, RDouble dudz,
+        RDouble dvdx, RDouble dvdy, RDouble dvdz, RDouble dwdx, RDouble dwdy, RDouble dwdz);
+    void BlendingFunctionOfFctat(RDouble gm, RDouble Rew, RDouble Rectabar, RDouble vorticity, RDouble viscosity, RDouble density,
+        RDouble absu, RDouble distance, RDouble reynoldsInflow, RDouble ce2, RDouble &Fctat, RDouble &Fctatcf);
+
+    RDouble PressureGradientFunction(RDouble density, RDouble momentumThickness, RDouble viscosity, RDouble dUds, RDouble reynoldsInflow);
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/include/TransitionSolver.h b/CFD/TurbSolver/include/TransitionSolver.h
new file mode 100644
index 0000000..aa78012
--- /dev/null
+++ b/CFD/TurbSolver/include/TransitionSolver.h
@@ -0,0 +1,91 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      TransitionSolver.h
+//! @brief     transition solver.
+//! @author    He Kun
+
+#pragma once
+#include "CFDSolver.h"
+#include "Param_TransitionSolver.h"
+
+namespace PHSPACE
+{
+class ActionKey;
+
+void Transition_MxDQ(RDouble *mat,RDouble *dq,int n_transition,RDouble *df);
+
+class TransitionSolver : public CFDSolver
+{
+private:
+
+public:
+    TransitionSolver();
+    ~TransitionSolver();
+
+public:
+    void Solve();
+    void Action(ActionKey *actkey);
+    void FillActionKey(ActionKey *actkey, int action, int level);
+    void Post();
+    void PostSolve(Grid *gridIn, int stage, int level = 0);
+    void DumpResultFile(Grid *grid, int level = 0);
+
+    void UpdateResiduals(Grid *gridIn);
+    virtual void ResetWallScalar(Grid *gridIn) {};
+
+    virtual void InviscidFlux  (Grid *gridIn){};
+    virtual void ViscousFlux   (Grid *gridIn){};
+    virtual void DualTimeSource(Grid *gridIn){};
+
+    virtual void ZeroResidualOfSpecialCells(Grid *gridIn){};
+
+    void SourceFlux(Grid *gridIn);
+    virtual void FreeGradientProxy(Grid *gridIn){};
+    virtual void Diagonal(Grid *gridIn){};
+
+    virtual void InitSpectrum(Grid *gridIn){};
+
+    virtual void SourceFluxTwoEquation(Grid *gridIn){};
+
+    virtual void InitCGrid(Grid *fineGrid, Grid *coarseGrid){};
+
+    string CastName(const string &name);
+
+    //! Get the file name for Residual dumping.
+    virtual const string GetResidualFileName();
+    //! Get the file name for Restart info dumping.
+    virtual const string GetRestartFileName();
+
+    int GetNumberOfEquations();
+
+    //! Compare the outnstep in the flowfield file between the NS and turbulence.
+    void CompareOutStepOfFlowfieldFile(int outnstepofNS, int outnstepofTransition) const;
+
+    //! Get control paramters.
+    LIB_EXPORT Param_TransitionSolver *GetControlParameters();
+    
+private:
+    void RegisterCFDSolverInterfaceField();
+
+    //! Register the interpoint field in the turbulent solver.
+    void RegisterCFDSolverInterpointField();
+    void RegisterOversetField();
+    void DeAllocateOversetInterfaceVar(Data_ParamFieldSuite *dataStore);
+    void InitCoarseGridsFlow ();
+
+    //! Prepare overset interface data for communication.
+    void PrepareOversetInterfaceData(Data_ParamFieldSuite *datastore, InterfaceDataProxy *interfaceDataProxy);
+
+    void InitDependentVariables();
+};
+
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/include/TransitionSolverStruct.h b/CFD/TurbSolver/include/TransitionSolverStruct.h
new file mode 100644
index 0000000..e844195
--- /dev/null
+++ b/CFD/TurbSolver/include/TransitionSolverStruct.h
@@ -0,0 +1,380 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      TurbSolverStruct.h
+//! @brief     turbulence solver for struct grid.
+//! @author    He Xin, He Kun, He Xianyao, Liu Jian, Zhang Zipei, Li peng, Ma Yankai.
+
+#pragma once
+#include "TransitionSolver.h"
+
+namespace PHSPACE
+{
+class StructBC;
+class Param_TransitionSolver;
+
+class TransitionSolverStr : public TransitionSolver
+{
+public:
+    TransitionSolverStr();
+    ~TransitionSolverStr();
+
+    //! To obtain the turbulent residual according to the flux between the cell face.
+    //! @param[in out ]: gridIn denotes the current computational regions of the grids, in which turbulent residual are stored.
+    //! @param[in ]: fluxProxy denotes the flux proxy of the cell face.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void LoadFlux(Grid *gridIn,  FieldProxy *fluxProxy, int iSurface);
+
+    //! To obtain the turbulent viscous flux of the cell face.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out ]: fluxProxy denotes the flux proxy of the cell face.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void CompVisFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+
+    //! To obtain the two equation turbulent viscid flux of the cell face.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out ]: fluxProxy denotes the flux proxy of the cell face.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void CompVisFluxTwoEquation(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+
+    //! To set the turbulent residual to zero of the Special cell, which is inherited from class NSSolver.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids, in which turbulent residual are stored.
+    void ZeroResidualOfSpecialCells(Grid * gridIn);
+
+    //! To set the transition variables from primitive form to conservative form in two equation model.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids, in which turbulent variables are stored.
+    void ChangeTransitionQ (Grid *gridIn);
+
+    //! To set the transition variables from conservative form to primitive form in two equation model.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids, in which turbulent variables are stored.
+    void RecoverTransitionQ(Grid *gridIn);
+
+    //! To obtain the two equation turbulent inviscid flux of the cell face.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: qLeftProxy denotes the turbulent q proxy to the left of the cell face.
+    //! @param[in ]: qRightProxy denotes the turbulent q proxy to the right of the cell face.
+    //! @param[in ]: qpmvl_proxy denotes the laminar q proxy to the left of the cell face.
+    //! @param[in ]: qpmvr_proxy denotes the laminar q proxy to the right of the cell face.
+    //! @param[out ]: fluxProxy denotes the flux proxy of the cell face.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void ComputeInviscidFlux(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, FieldProxy *qpmvl_proxy, FieldProxy *qpmvr_proxy, FieldProxy *fluxProxy, int iSurface);
+
+    //! To obtain the two equation turbulent inviscid flux of the cell face by NND method, called by function ComputeInviscidFlux.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: qLeftProxy denotes the turbulent q proxy to the left of the cell face.
+    //! @param[in ]: qRightProxy denotes the turbulent q proxy to the right of the cell face.
+    //! @param[in ]: qLaminarLeftProxy denotes the laminar q proxy to the left of the cell face.
+    //! @param[in ]: qpmvr_proxy denotes the laminar q proxy to the right of the cell face.
+    //! @param[out ]: fluxProxy denotes the flux proxy of the cell face.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void NNDFlux(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, FieldProxy *qLaminarLeftProxy, FieldProxy *qLaminarRightProxy, FieldProxy *fluxProxy, int iSurface);
+
+    //! To obtain the turbulent MUSCL interpolate value of the cell face in iSurface direction.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out ]: qLeftProxy denotes the turbulent q proxy to the left of the cell face.
+    //! @param[out ]: qRightProxy denotes the turbulent q proxy to the right of the cell face.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void GetInviscidFaceValue(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, int iSurface);
+
+    //! To obtain the laminar velocity of the cell face  for turbulent equation in iSurface direction.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out ]: qLaminarLeftProxy denotes the velocity proxy to the left of the cell face.
+    //! @param[out ]: qLaminarRightProxy denotes the velocity proxy to the right of the cell face.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void GetInvFaceQValueforTransition(Grid *gridIn, FieldProxy *qLaminarLeftProxy, FieldProxy *qLaminarRightProxy, int iSurface);
+
+    //! To modify the interpolate turbulent vaule on the boundary, especially on the SOLID SURFACE.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in out ]: qLeftProxy denotes the turbulent q proxy to the left of the cell face.
+    //! @param[in out ]: qRightProxy denotes the turbulent q proxy to the right of the cell face.
+    //! @param[in out ]: qLaminarLeftProxy denotes the velocity proxy to the left of the cell face.
+    //! @param[in out ]: qLaminarRightProxy denotes the velocity proxy to the right of the cell face.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void CorrectFaceVar(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, FieldProxy *qLaminarLeftProxy, FieldProxy *qLaminarRightProxy, int iSurface); 
+
+    //! To get the gradient of turbulent variables at the cell center.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids, on which dependent variables are stored.
+    void ComputeGradientCellCenter(Grid *gridIn);
+
+    //! To get the gradient of turbulent variables at the cell center.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids, on which dependent variables are stored.
+    //void ReconGrad(Grid *gridIn, int iSurface);
+
+    //! To modified the boundary value of the turbulent variables's gradient at the cell center.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids, on which dependent variables are stored.
+    void SetCellCenterGradientBoundary(Grid *gridIn);
+
+    //! To get the gradient of turbulent variables at the cell face from the cell center gradient.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids, on which dependent variables are stored.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void ReconGradVolWeightedwithCorrection(Grid *gridIn, int iSurface);
+
+    //! To correct the gradient of turbulent variables at the special physical boundaries, such as viscous wall, symmetry.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids, on which dependent variables are stored.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void GetGradientAtFace_CorrectionAtPhysicalBoundary(Grid *gridIn, int iSurface);
+
+    void RotateVectorFromInterface(Grid *gridIn, const int &neighborZoneIndex, const int &nEquation);//zhangyong
+
+    void AverageMixingPlane(Grid *grid) {};
+    void MixingPlaneDataTransfer(Grid *grid, Grid *NeighborGrid) {};
+    void NonReflective(Grid *grid, Grid *NeighborGrid) {};
+    void SetMixingPlaneData(Grid *grid) {};
+
+    //! Interface: to put the boundary data to DataContainer for parallel communication.
+    //! @param[in ]: actkey contains the control information for parallel communication.
+    void UploadInterfaceData(ActionKey *actkey);
+
+    //! implement: to put the boundary data to DataContainer for parallel communication, called by function UploadInterfaceData.
+    //! @param[in ]: actkey contains the control information for parallel communication.
+    void UploadInterfaceValue(ActionKey *actkey){};
+
+    //! Interface: to get the boundary data from DataContainer for parallel communication.
+    //! @param[in ]: actkey contains the control information for parallel communication.
+    void DownloadInterfaceData(ActionKey *actkey);
+
+    //! implement: to get the boundary data from DataContainer for parallel communication, called by function DownloadInterfaceData.
+    //! @param[in ]: actkey contains the control information for parallel communication.
+    void DownloadInterfaceValue(ActionKey *actkey){};
+
+    //! Implement: to compress turbulent dq data from grid to date dataContainer.
+    void CompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+    void DecompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+
+    //! Todo: overset information communication hasn't carried out yet.
+    //! @param[in ]: actkey contains the control information for parallel communication.
+    void UploadOversetData(ActionKey *actkey);
+
+    void DownloadOversetData(ActionKey *actkey);
+
+    //! To set all of the value of the turbulent field proxy equal to the input value
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out]: fieldProxy denotes the target turbulent field proxy which will be covered by input value .
+    //! @param[in ]: value denotes the source value.
+    void FillField(Grid *gridIn, FieldProxy *fieldProxy, RDouble value);
+
+    //! To set all of the value of the fieldProxy equal to the input value
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out]: targetFieldProxy denotes the target turbulent field proxy which will be covered by the source field proxy.
+    //! @param[in ]: sourceFieldProxy denotes the source turbulent field proxy.
+    void FillField(Grid *gridIn, FieldProxy *targetFieldProxy, FieldProxy *sourceFieldProxy);
+
+    //! To creat a turbulent fieldProxy and get data by field name.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in]: fieldName denotes the field name to be set into fieldProxy.
+    //! @return: the turbulent field proxy created.
+    FieldProxy *GetFieldProxy(Grid *gridIn, const string &fieldName);
+
+    //! To creat a turbulent fieldProxy without initionalization.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @return: the turbulent field proxy created.
+    FieldProxy *CreateFieldProxy(Grid *gridIn);
+
+    //! To creat a laminar fieldProxy without initionalization.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @return: the laminar field proxy created.
+    FieldProxy *CreateFlowFieldProxy(Grid *gridIn);
+
+    //! To creat a turbulent residual proxy and set by "res_turb" data in gridIn.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @return: the turbulent residual proxy created.
+    FieldProxy *GetResidualProxy(Grid *gridIn);
+
+    //! To set the turbulent right hand side proxy by "res_turb" in gridIn.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out]: rightHandSideProxy: the turbulent right hand side proxy.
+    void StoreRhsByResidual(Grid *gridIn, FieldProxy *rightHandSideProxy);
+
+    //! To initionalization the "res_turb" data in gridIn by turbulent right hand side proxy.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: rightHandSideProxy: the turbulent right hand side proxy.
+    void InitResidual(Grid *gridIn, FieldProxy *rightHandSideProxy);
+
+    //! To set the "res_turb" data in gridIn by turbulent right hand side proxy.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: rightHandSideProxy: the turbulent right hand side proxy.
+    void RecoverResidual(Grid *gridIn, FieldProxy *rightHandSideProxy);
+
+    //! Create and initialize control parameters.
+    LIB_EXPORT void InitControlParameters();
+
+    //! Get control parameters.
+    LIB_EXPORT Param_TransitionSolver *GetControlParameters();
+
+    //! Judge if the flow field variables file already exists in Turb solver.
+    bool JudgeIfRestart();
+    bool JudgeIfReadAverage();
+
+    bool JudgeIfProtectedRestart();
+
+    void InitFlowAsReadingProtectedRestart(ActionKey *actkey);
+
+    //! To write the flow data to restart file by HDF5 "fts" form for continue to simulation.
+    //! @param[in ]: actkey contains the control information.
+    void DumpRestartH5(ActionKey *actkey);
+
+    //! To read the flow data from restart file by HDF5 "fts" form  for continue to simulation.
+    //! @param[in ]: actkey contains the control information.
+    void ReadRestartH5(ActionKey *actkey);
+
+private:
+
+    //! To allocate the internal storage of field variables/residual/spectum array and other global data array.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void AllocateGlobalVar(Grid *gridIn);
+
+    //! To deallocate the internal storage of array.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void DeAllocateGlobalVar(Grid *gridIn);
+
+    //! To initionalize the flow flield according to the inflow condition
+    void InitFlowAsRestart();
+
+    //! To set the flow field value of the external boundary condition of the computational region. \n
+    //! It looped all the internal boundary and was realized by call the specific boundary functions.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void Boundary(Grid *gridIn);
+
+    //! To set the inflow boundary condition by setting the flow field value equal to the far field value.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: structBC denotes the current boundary condition region which need to be set.
+    void InFlowBC  (Grid *gridIn, StructBC *structBC);
+
+    //! To set the outflow boundary condition by 2nd order interpolation.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: structBC denotes the current boundary condition region which need to be set.
+    void OutFlowBC (Grid *gridIn, StructBC *structBC);
+
+    //! To set the symmetry boundary condition by 1st order interpolation.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: structBC denotes the current boundary condition region which need to be set.
+    void SymmetryBC(Grid *gridIn, StructBC *structBC);
+
+    //! To set the viscid wall boundary condition by setting the turbulent variables equal to zero or other specific value.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: structBC denotes the current boundary condition region which need to be set.
+    void VisWall(Grid *gridIn, StructBC *structBC);
+
+    void VisWallWithWallFunctionStandard(Grid* gridIn, StructBC *structBC);
+    void VisWallWithWallFunctionPAB3D(Grid* gridIn, StructBC *structBC);
+
+    //! To set the farfield boundary condition according to riemann method.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: structBC denotes the current boundary condition region which need to be set.
+    void FarFieldBC(Grid *gridIn, StructBC *structBC);
+
+    //! To implement the standard wall function while y+ isn't meet the need.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: structBC denotes the current boundary condition region which need to be set.
+    void WallFunctionStandard(Grid *gridIn, StructBC *structBC, int is, int js, int ks, int it, int jt, int kt, int i, int j, int k);
+
+    //! To implement the Pab3D wall function while y+ isn't meet the need.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: structBC denotes the current boundary condition region which need to be set.
+    void WallFunctionPab3D(Grid *gridIn, StructBC *structBC, int is, int js, int ks, int it, int jt, int kt, int i, int j, int k);
+
+    //! To obtain the turbulent residual according to the right hand side.
+    //! @param[in out ]: gridIn denotes the current computational regions of the grids, in which turbulent residual are stored.
+    //! @param[in ]: rightHandSideProxy denotes the right hand side proxy of the cell face.
+    void LoadResiduals(Grid *gridIn, FieldProxy *rightHandSideProxy);
+
+    //! To set the turbulent residual zero.
+    //! @param[in out ]: gridIn denotes the current computational regions of the grids, in which turbulent residual are stored.
+    void ZeroResiduals(Grid *gridIn);
+
+    //! To set the turbulent spectum zero.
+    //! @param[in out ]: gridIn denotes the current computational regions of the grids, in which turbulent spectum are stored.
+    void InitSpectrum(Grid *gridIn);
+
+    //! Interface: to get the turbulent source flux of one equation model.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void SourceFluxOneEquation(Grid *gridIn);
+
+    //! Implement: to get the turbulent source flux of one equation model by original method.
+    //! Don't use yet.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void SourceFluxOneEquationOriginal(Grid *gridIn);
+
+    //! Implement: to get the turbulent source flux of one equation model by new method.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void SourceFluxOneEquationNew(Grid *gridIn);
+
+    //! To get the turbulent source flux of two one equation model.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void SourceFluxTwoEquation(Grid *gridIn);
+
+    //! To get the turbulent inviscid flux.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void InviscidFlux(Grid *gridIn);
+
+    //! To get the turbulent viscid flux.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void ViscousFlux(Grid *gridIn);
+
+    //! To get the turbulent dual time source residual.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void DualTimeSource(Grid *gridIn);
+
+    //! To update the unsteady turbulent flow field variables such as qTurbulence, residual, volume.
+    //! q(n+1) = q(n); q(n) = q(n-1)..
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void UpdateUnsteadyFlow(Grid *gridIn);
+
+    RDouble UnsteadyConvergence(Grid *gridIn);
+
+    //! Interface: to get the turbulent spectum.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void Diagonal(Grid *gridIn);
+
+    //! Implement: to get the turbulent spectum of one equation model, called by function Spectrum.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void SpectrumRadiusOfOneEquation(Grid *gridIn);
+
+    //! Implement: to get the turbulent spectum of two equation model, called by function Spectrum.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void SpectrumRadiusOfTwoEquation(Grid *gridIn);
+
+    //! To load flow variables stored in grid to qProxy.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: qProxy denotes the turbulent field proxy.
+    void LoadQ(Grid *gridIn, FieldProxy *qProxy);
+
+    //! To get the turbulent residual for Runge-Kutta method.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void RungeKuttaResidual(Grid *gridIn, FieldProxy *dqProxy, RDouble coef);
+
+    //! Implicit LU-SGS time integration method.
+    void SolveLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+    void SolveLUSGSBackward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+
+    //! To update the turbulent flow field variables for steady flow.
+    //! q(n+1) = q(n)+dq.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: qProxy denotes the turbulent field proxy.
+    //! @param[in ]: dqProxy denotes the of turbulent field proxy increment of one iteration step.
+    void UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy);
+
+    //! To set turbulent flow field variables's value at the corner point.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void CornerPoint(Grid *gridIn);
+
+    //! To get the distance between the two point(i, j, k) and (i+1, j+1, k+1).
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: i, j, k denotes grid point index.
+    //! @return: the distance between the two point(i, j, k) and (i+1, j+1, k+1).
+    RDouble GetDistance(Grid *gridIn, int i, int j, int k);
+
+    //! To get maximum residual for output.
+    //! @param[in ]: actkey contains the control parameter.
+    void GetResidual(ActionKey *actkey);
+};
+
+}
diff --git a/CFD/TurbSolver/include/TransitionSolverUnstr.h b/CFD/TurbSolver/include/TransitionSolverUnstr.h
new file mode 100644
index 0000000..6ced52c
--- /dev/null
+++ b/CFD/TurbSolver/include/TransitionSolverUnstr.h
@@ -0,0 +1,276 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      TurbSolverUnstr.h
+//! @brief     turbulence solver for unstruct grid.
+//! @author    Bell, He Xin, Zhang Laiping, Dr. Wang, Zhang Yang, He Kun, 
+//!            Wan Yunbo, Xu Gang, Zhang Yaobing.
+
+#pragma once
+#include "TransitionSolver.h"
+#include "Limiter.h"
+#include "FaceProxy.h"
+
+namespace PHSPACE
+{
+class Param_TransitionSolver;
+
+class TransitionSolverUnstr: public TransitionSolver
+{
+private:
+    //! Gradient of variables on turbulent equation.
+    Gradient *gradientTransitionField;
+
+    //! Gradient of velocity.
+    Gradient *gradientVelocity;
+
+public:
+    TransitionSolverUnstr();
+    ~TransitionSolverUnstr();
+
+    //! Allocate and delete global variables.
+    void AllocateGlobalVar(Grid *gridIn);
+    void DeAllocateGlobalVar(Grid *gridIn);
+
+    //! Load rhs to residual which stored in grid
+    void LoadResiduals(Grid *gridIn, FieldProxy *rhsProxy);
+
+    //! Variables such as specTurb are set to zero.
+    void InitSpectrum(Grid *gridIn);
+
+    //! Boundary condition.
+    void Boundary(Grid *gridIn);
+
+    //! Outflow Boundary condition, suitable for mass out, pressure out, and velocity out in turbulence flows.
+    void OutflowBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+
+    //! Inflow Boundary condition, suitable for mass in, pressure in, and velocity in for turbulence flows.
+    void InflowBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+    
+    //! Wall Boundary condition.
+    void WallBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+    
+    //! Farfield Boundary condition.
+    void FarfieldBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+    
+    //! Residuals are set to zero
+    void ZeroResiduals(Grid *gridIn);
+
+    //! Judge if the flow field variables file already exists in Turb solver.
+    bool JudgeIfRestart();
+    bool JudgeIfReadAverage();
+
+    //! Initialize the flow field as simulation restarting.
+    void InitFlowAsRestart();
+
+    //! Write and read restart file.
+    void DumpRestartH5(ActionKey *actkey);
+    void ReadRestartH5(ActionKey *actkey);
+
+    //! Compute the residual of turbulent equation.
+    void GetResidual(ActionKey *actkey);
+
+    void RotateVectorFromInterface(Grid *gridIn, const int &neighborZoneIndex, const int &nEquation);
+
+    void InitMixingPlane(RDouble ***MixingPlaneVar, int Dim1, int Dim2, int Dim3, RDouble Value);
+
+    void AverageMixingPlane(Grid *grid);
+    void MixingPlaneDataTransfer(Grid *grid, Grid *NeighborGrid);
+    void NonReflective(Grid *grid, Grid *NeighborGrid);
+    void SetMixingPlaneData(Grid *grid);
+
+    //! Restrict defect from fine to coarse grid.
+    void RestrictDefect(Grid *fineGridIn, Grid *coarseGridIn);
+
+    //! Correct variable in fine grid using correction in coarse grid
+    void CorrectFineGrid(Grid *fineGridIn, Grid *coarseGridIn);
+
+    //! Interpolate variables of turbulence model in coarse grid to that in fine grid.
+    void InterpolatFineGrid(Grid *fineGridIn, Grid *coarseGridIn);
+
+    //! Put correction back on the coarse grid.
+    void PutCorrectionBack(Grid *gridIn, FieldProxy *qProxy);
+
+    //! Load NS variables stored in grid to q.
+    void LoadQ(Grid *gridIn, FieldProxy *qProxy);
+
+    //! Compute the residuals with RungeKutta method.
+    void RungeKuttaResidual(Grid *gridIn, FieldProxy *dqProxy, RDouble coefficient);
+
+    //! Update flow field variables of turbulene equation.
+    void UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy);
+
+    //! LU-SGS forward sweep.
+    void SolveLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+    
+    //! LU-SGS backward sweep.
+    void SolveLUSGSBackward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+    
+    //! Set the values at ghost cells.
+    void SetGhostDQLUSGS(Grid *gridIn, RDouble **dq);    // Bell 20130401 add
+    
+    void SetWallBCGhostDQLUSGS(Grid *gridIn, UnstructBC *bcRegionUnstruct, RDouble **dq);
+
+    void SetFarfieldBCGhostDQLUSGS(Grid *gridIn, UnstructBC *bcRegionUnstruct, RDouble **dq);
+    
+    //! Smooth variables of transition equation.
+    void SMoothTransition(Grid *gridIn);
+    void SMoothTransitionPoint(Grid *gridIn, RDouble *primitiveVariable, int i);
+    
+    //! Compute spectrumRadius of transition equation.
+    void Diagonal(Grid *grid);
+    
+    //! Compute inviscid flux of transition equation.
+    void InviscidFlux(Grid *gridIn);
+    
+    //! Compute viscous flux of transition equation.
+    void ViscousFlux(Grid *gridIn);
+    
+    //! Compute source term of dual time step.
+    void DualTimeSource(Grid *gridIn);
+    
+    //! Update terms used for unsteady flow simulation.
+    void UpdateUnsteadyFlow(Grid *gridIn);
+    
+    //! Convergence norm for the unsteady flow simulation.
+    RDouble UnsteadyConvergence(Grid *gridIn);
+
+    //! Restrict variables of turbulent equation on fine and coarse grid.
+    void RestrictAllQ(Grid *fineGridIn, Grid *coarseGridIn);
+    
+    //! Compute flux of the turbulent equation.
+    void LoadFlux(Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+    
+    //! Set value to flowfiled variables.
+    void FillField(Grid *gridIn, FieldProxy *fieldProxy, RDouble value);
+    void FillField(Grid *gridIn, FieldProxy *field1Proxy, FieldProxy *field2Proxy);
+    
+    //! Create proxy for variables of turbulent equation located in cell center.
+    FieldProxy *CreateFieldProxy(Grid *gridIn);
+    
+    //! Get the corresopnding proxy.
+    FieldProxy *GetFieldProxy(Grid *gridIn, const string &fieldName);
+    
+    //! Get the proxy of residuals.
+    FieldProxy *GetResidualProxy(Grid *gridIn);
+    
+    //! Load the residuals of turbulent equation.
+    void RecoverResidual(Grid *gridIn, FieldProxy *rhsProxy);
+    
+    //! Initialize the residuals of turbulent equation.
+    void InitResidual(Grid *gridIn, FieldProxy *rhsProxy);
+    
+    //! Rhs is set equal to residuals of turbulent equation. 
+    void StoreRhsByResidual(Grid *gridIn, FieldProxy *rhsProxy);
+    
+    //! Create proxy for variables of turbulent and NS equation that located in face.
+    FaceProxy *CreateFaceProxy(Grid *gridIn);
+    
+    //! Variables of transition equation that located in face.
+    TransitionFaceValue *CreateTransitionFaceValue(Grid *gridIn);
+
+    Limiter * CreateLimiter(Grid *grid_in);//!modified by zhangjian
+
+    //! Compute the node value in the transition flow.
+    //! @param[in] grid         the mesh in the computing.
+    void ComputeQTransitionNodeValue(Grid *grid_in);
+
+    //! modify the node value for the interpoint in the turbulent flow.
+    //! @param[in] grid         the mesh in the computing.
+    void ModifyQTransitionNodeValue(Grid *grid_in);
+public:
+    void SourceFluxTwoEquation(Grid *gridIn);
+
+    //! Get face value for viscous flux of computation.
+    void GetVisFaceValue(Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+
+    //! Compute viscous flux of turbulent equations.
+    void ComputeVisflux (Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+
+    //! Initialize wall distance for coarse grid.
+    void InitCGrid(Grid *fineGridIn, Grid *coarseGridIn);
+    
+    //! Upload interface value for variables in turbulence model. 
+    void UploadInterfaceValue(ActionKey *actkey);
+    void UploadInterfaceData(ActionKey *actkey);    // Bell 20120910 add
+    
+    //! Download interface value for variables in turbulence model. 
+    void DownloadInterfaceValue(ActionKey *actkey);
+    void DownloadInterfaceData(ActionKey *actkey);    // Bell 20120910 add
+
+    //! Upload the interpoint variables for send.
+    //! @param[in] actkey         the actkey store the information of the interpoint.
+    void UploadInterpointData(ActionKey *actkey);
+
+    //! Download the interpoint variables from the receive data.
+    //! @param[in] actkey         the actkey store the information of the interpoint.
+    void DownloadInterpointData(ActionKey *actkey);
+
+    void CommunicationInterpointWeight(ActionKey *actkey);
+    void DownloadInterpointWeight(ActionKey *actkey);
+
+    //! Upload overset data at interface for variables in turbulence model. 
+    void UploadOversetData(ActionKey *actkey);
+
+    //! Download overset data at interface for variables in turbulence model.
+    void DownloadOversetData(ActionKey *actkey);
+
+    //! Compute inviscid flux of turbulence model equation.
+    void ComputeInviscidFlux(Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+    
+    //! Inviscid flux scheme for turbulence model equation.
+    void NNDFlux(Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+    
+    //! Get left and right variables of turbulence model and NS equation.
+    void GetQlQr(Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+
+    //! Obtain the gradient of variables in turbulence model.
+    void GetGradientField(Grid *gridIn);
+    
+    //! Compute gradient of variables in turbulence model.
+    void ComputeGradient(Grid *grid);
+
+    //! Create and initialize controlparameters
+    LIB_EXPORT void InitControlParameters();
+
+    //! Get control paramters.
+    LIB_EXPORT Param_TransitionSolver *GetControlParameters();
+
+    ////! Implement: to compress transition dq data from grid to date dataContainer.
+    void CompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+    void DecompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+
+private:
+
+    //! Get variables at face interpolated from left and right side for turbulence model equation.
+    void GetQlQrTransition(Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+    
+    //! Get variables at face interpolated from left and right side for NS equation.
+    void GetQlQrNS(Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+    
+    //! Compute the weights used to average dqdx, dqdy, etc.
+    void ComputeFaceWeight(Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+
+    //! Read the averaged variables of statistical flow field.
+    void ReadStatisticalFlow(ActionKey *actkey);
+
+    //! Create proxy for variables of NS equations that located in face.
+    FaceProxy * CreateFaceProxyNS(Grid *gridIn);
+    
+    //! Create proxy for variables of transition equations that located in face.
+    FaceProxy * CreateFaceProxyTransition(Grid *gridIn);
+
+private:
+
+    int machZeroExp;
+};
+
+}
diff --git a/CFD/TurbSolver/include/TurbSolver.h b/CFD/TurbSolver/include/TurbSolver.h
new file mode 100644
index 0000000..e27b1b7
--- /dev/null
+++ b/CFD/TurbSolver/include/TurbSolver.h
@@ -0,0 +1,116 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      TurbSolver.h
+//! @brief     turbulence solver.
+//! @author    He Xin, Bell, He Kun, He Xianyao, Liu Jian, Zhang Zipei, Li peng, 
+//!            Ma Yankai, Zhang Yang, Wan Yunbo, Xu Gang.
+
+#pragma once
+#include "CFDSolver.h"
+#include "Param_TurbSolver.h"
+
+namespace PHSPACE
+{
+class ActionKey;
+
+void Turb_MxDQ(RDouble *mat,RDouble *dq,int n_turb,RDouble *df);
+
+class TurbSolver : public CFDSolver
+{
+private:
+
+public:
+    TurbSolver();
+    ~TurbSolver();
+
+public:
+    void Solve();
+    void Action(ActionKey *actkey);
+    void FillActionKey(ActionKey *actkey, int action, int level);
+    void Post();
+    void PostSolve(Grid *gridIn, int stage, int level = 0);
+    void DumpResultFile(Grid *grid, int level = 0);
+
+    void UpdateResiduals(Grid *gridIn);
+    virtual void ResetWallScalar(Grid *gridIn) {};
+
+    virtual void InviscidFlux  (Grid *gridIn){};
+    virtual void ViscousFlux   (Grid *gridIn){};
+    virtual void DualTimeSource(Grid *gridIn){};
+
+    virtual void ZeroResidualOfSpecialCells(Grid *gridIn){};
+
+    void SourceFlux(Grid *gridIn);
+    virtual void SourceFluxOneEquation(Grid *gridIn){};
+    virtual void SourceFluxOneEquation(Grid *gridIn,bool chantstyle){};
+    virtual void SourceFluxTwoEquation(Grid *gridIn){};
+    virtual void FreeGradientProxy(Grid *gridIn){};
+    virtual void Diagonal(Grid *gridIn){};
+
+    virtual void InitSpectrum(Grid *gridIn){};
+    void ComputeViscousCoeff(Grid *gridIn){};
+    virtual void InitCGrid(Grid *fineGrid, Grid *coarseGrid){};
+
+    string CastName(const string &name);
+
+    //! Get the file name for Residual dumping.
+    virtual const string GetResidualFileName();
+    //! Get the file name for Restart info dumping.
+    virtual const string GetRestartFileName();
+
+    int GetNumberOfEquations();
+
+    //! Compare the outnstep in the flowfield file between the NS and turbulence.
+    void CompareOutStepOfFlowfieldFile(int outnstepofNS, int outnstepofTurb) const;
+
+    //! Get control paramters.
+    LIB_EXPORT Param_TurbSolver *GetControlParameters();
+    
+private:
+    void RegisterCFDSolverInterfaceField();
+
+    //! Register the interpoint field in the turbulent solver.
+    void RegisterCFDSolverInterpointField();
+    void RegisterOversetField();
+    void DeAllocateOversetInterfaceVar(Data_ParamFieldSuite *dataStore);
+    void InitCoarseGridsFlow ();
+
+    //! Prepare overset interface data for communication.
+    void PrepareOversetInterfaceData(Data_ParamFieldSuite *datastore, InterfaceDataProxy *interfaceDataProxy);
+
+    void InitDependentVariables();
+};
+
+const int RANS  = 0;
+const int DES   = 1;
+const int DDES  = 2;
+const int IDDES = 3;
+
+//! Return the modified positive preserved working variable, if the SA nue is negative.
+//! @param[in] nueNegative     the input original negative nue.
+//! @param[in] viscousLaminar  the input original laminar viscous.
+//! @param[in] rho             the input original density.
+//! Allmaras S R, 2012.
+inline RDouble PositiveSA(RDouble &nueNegative, RDouble &viscousLaminar, RDouble &rho)
+{
+    if(nueNegative < 0.0)
+    {
+        RDouble xsi = nueNegative / (viscousLaminar / rho);
+        RDouble xsi3 = xsi * xsi * xsi;
+        return nueNegative * (16.0 + xsi3) / (16.0 - xsi3); 
+    }
+    else
+    {
+        return nueNegative; 
+    }    
+}
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/include/TurbSolverStruct.h b/CFD/TurbSolver/include/TurbSolverStruct.h
new file mode 100644
index 0000000..439e335
--- /dev/null
+++ b/CFD/TurbSolver/include/TurbSolverStruct.h
@@ -0,0 +1,474 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      TurbSolverStruct.h
+//! @brief     turbulence solver for struct grid.
+//! @author    He Xin, He Kun, He Xianyao, Liu Jian, Zhang Zipei, Li peng, Ma Yankai.
+
+#pragma once
+#include "TurbSolver.h"
+
+namespace PHSPACE
+{
+class StructBC;
+class Param_TurbSolverStruct;
+
+class TurbSolverStr : public TurbSolver
+{
+private:
+    //! Length scale of XXDES, such as DES/DDES/IDDES.
+    RDouble3D *DESLength;
+    RDouble3D *SSTLength;
+
+public:
+    TurbSolverStr();
+    ~TurbSolverStr();
+
+    //! To obtain the turbulent residual according to the flux between the cell face.
+    //! @param[in out ]: gridIn denotes the current computational regions of the grids, in which turbulent residual are stored.
+    //! @param[in ]: fluxProxy denotes the flux proxy of the cell face.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void LoadFlux(Grid *gridIn,  FieldProxy *fluxProxy, int iSurface);
+
+    //! To obtain the turbulent viscous flux of the cell face.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out ]: fluxProxy denotes the flux proxy of the cell face.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void CompVisFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+
+    //! To obtain the one equation turbulent viscous flux of the cell face.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out ]: fluxProxy denotes the flux proxy of the cell face.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void CompVisFluxOneEquation(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+
+    //! To obtain the two equation turbulent viscid flux of the cell face.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out ]: fluxProxy denotes the flux proxy of the cell face.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void CompVisFluxTwoEquation(Grid *gridIn, FieldProxy *fluxProxy, int iSurface);
+
+    //! To set the turbulent residual to zero of the Special cell, which is inherited from class NSSolver.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids, in which turbulent residual are stored.
+    void ZeroResidualOfSpecialCells(Grid * gridIn);
+
+    //! To set the turbulent variables from primitive form to conservative form in two equation model.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids, in which turbulent variables are stored.
+    void ChangeTurbQ (Grid *gridIn);
+
+    //! To set the turbulent variables from conservative form to primitive form in two equation model.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids, in which turbulent variables are stored.
+    void RecoverTurbQ(Grid *gridIn);
+
+    //! To obtain the two equation turbulent inviscid flux of the cell face.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: qLeftProxy denotes the turbulent q proxy to the left of the cell face.
+    //! @param[in ]: qRightProxy denotes the turbulent q proxy to the right of the cell face.
+    //! @param[in ]: qpmvl_proxy denotes the laminar q proxy to the left of the cell face.
+    //! @param[in ]: qpmvr_proxy denotes the laminar q proxy to the right of the cell face.
+    //! @param[out ]: fluxProxy denotes the flux proxy of the cell face.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void ComputeInviscidFlux(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, FieldProxy *qpmvl_proxy, FieldProxy *qpmvr_proxy, FieldProxy *fluxProxy, int iSurface);
+
+    //! To obtain the two equation turbulent inviscid flux of the cell face by NND method, called by function ComputeInviscidFlux.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: qLeftProxy denotes the turbulent q proxy to the left of the cell face.
+    //! @param[in ]: qRightProxy denotes the turbulent q proxy to the right of the cell face.
+    //! @param[in ]: qLaminarLeftProxy denotes the laminar q proxy to the left of the cell face.
+    //! @param[in ]: qpmvr_proxy denotes the laminar q proxy to the right of the cell face.
+    //! @param[out ]: fluxProxy denotes the flux proxy of the cell face.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void NNDFlux(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, FieldProxy *qLaminarLeftProxy, FieldProxy *qLaminarRightProxy, FieldProxy *fluxProxy, int iSurface);
+
+    //! To obtain the turbulent MUSCL interpolate value of the cell face in iSurface direction.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out ]: qLeftProxy denotes the turbulent q proxy to the left of the cell face.
+    //! @param[out ]: qRightProxy denotes the turbulent q proxy to the right of the cell face.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void GetInviscidFaceValue(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, int iSurface);
+
+    //! To obtain the laminar velocity of the cell face  for turbulent equation in iSurface direction.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out ]: qLaminarLeftProxy denotes the velocity proxy to the left of the cell face.
+    //! @param[out ]: qLaminarRightProxy denotes the velocity proxy to the right of the cell face.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void GetInvFaceQValueforTurb(Grid *gridIn, FieldProxy *qLaminarLeftProxy, FieldProxy *qLaminarRightProxy, int iSurface);
+
+    //! To modify the interpolate turbulent vaule on the boundary, especially on the SOLID SURFACE.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in out ]: qLeftProxy denotes the turbulent q proxy to the left of the cell face.
+    //! @param[in out ]: qRightProxy denotes the turbulent q proxy to the right of the cell face.
+    //! @param[in out ]: qLaminarLeftProxy denotes the velocity proxy to the left of the cell face.
+    //! @param[in out ]: qLaminarRightProxy denotes the velocity proxy to the right of the cell face.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void CorrectFaceVar(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, FieldProxy *qLaminarLeftProxy, FieldProxy *qLaminarRightProxy, int iSurface); 
+
+    //! To get the gradient of turbulent variables at the cell center.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids, on which dependent variables are stored.
+    void ComputeGradientCellCenter(Grid *gridIn);
+
+    //! To get the gradient of turbulent variables at the cell center.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids, on which dependent variables are stored.
+    //void ReconGrad(Grid *gridIn, int iSurface);
+
+    //! To modified the boundary value of the turbulent variables's gradient at the cell center.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids, on which dependent variables are stored.
+    void SetCellCenterGradientBoundary(Grid *gridIn);
+
+    //! To get the gradient of turbulent variables at the cell face from the cell center gradient.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids, on which dependent variables are stored.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void ReconGradVolWeightedwithCorrection(Grid *gridIn, int iSurface);
+
+    //! To correct the gradient of turbulent variables at the special physical boundaries, such as viscous wall, symmetry.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids, on which dependent variables are stored.
+    //! @param[in ]: iSurface denotes the direction index of the grid faces, where 1 indicates the I-direction, 2 for J-direction, and 3 is K-direction.
+    void GetGradientAtFace_CorrectionAtPhysicalBoundary(Grid *gridIn, int iSurface);
+
+    void RotateVectorFromInterface(Grid *gridIn, const int &neighborZoneIndex, const int &nEquation);//zhangyong
+
+    void AverageMixingPlane(Grid *grid) {};
+    void MixingPlaneDataTransfer(Grid *grid, Grid *NeighborGrid) {};
+    void NonReflective(Grid *grid, Grid *NeighborGrid) {};
+    void SetMixingPlaneData(Grid *grid) {};
+
+    //! Interface: to put the boundary data to DataContainer for parallel communication.
+    //! @param[in ]: actkey contains the control information for parallel communication.
+    void UploadInterfaceData(ActionKey *actkey);
+
+    //! implement: to put the boundary data to DataContainer for parallel communication, called by function UploadInterfaceData.
+    //! @param[in ]: actkey contains the control information for parallel communication.
+    void UploadInterfaceValue(ActionKey *actkey){};
+
+    //! Interface: to get the boundary data from DataContainer for parallel communication.
+    //! @param[in ]: actkey contains the control information for parallel communication.
+    void DownloadInterfaceData(ActionKey *actkey);
+
+    //! implement: to get the boundary data from DataContainer for parallel communication, called by function DownloadInterfaceData.
+    //! @param[in ]: actkey contains the control information for parallel communication.
+    void DownloadInterfaceValue(ActionKey *actkey){};
+
+    //! Implement: to compress turbulent dq data from grid to date dataContainer.
+    void CompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+    void DecompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+
+    //! Todo: overset information communication hasn't carried out yet.
+    //! @param[in ]: actkey contains the control information for parallel communication.
+    void UploadOversetData(ActionKey *actkey);
+
+    void DownloadOversetData(ActionKey *actkey);
+
+    //! To set all of the value of the turbulent field proxy equal to the input value
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out]: fieldProxy denotes the target turbulent field proxy which will be covered by input value .
+    //! @param[in ]: value denotes the source value.
+    void FillField(Grid *gridIn, FieldProxy *fieldProxy, RDouble value);
+
+    //! To set all of the value of the fieldProxy equal to the input value
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out]: targetFieldProxy denotes the target turbulent field proxy which will be covered by the source field proxy.
+    //! @param[in ]: sourceFieldProxy denotes the source turbulent field proxy.
+    void FillField(Grid *gridIn, FieldProxy *targetFieldProxy, FieldProxy *sourceFieldProxy);
+
+    //! To creat a turbulent fieldProxy and get data by field name.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in]: fieldName denotes the field name to be set into fieldProxy.
+    //! @return: the turbulent field proxy created.
+    FieldProxy *GetFieldProxy(Grid *gridIn, const string &fieldName);
+
+    //! To creat a turbulent fieldProxy without initionalization.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @return: the turbulent field proxy created.
+    FieldProxy *CreateFieldProxy(Grid *gridIn);
+
+    //! To creat a laminar fieldProxy without initionalization.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @return: the laminar field proxy created.
+    FieldProxy *CreateFlowFieldProxy(Grid *gridIn);
+
+    //! To creat a turbulent residual proxy and set by "res_turb" data in gridIn.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @return: the turbulent residual proxy created.
+    FieldProxy *GetResidualProxy(Grid *gridIn);
+
+    //! To set the turbulent right hand side proxy by "res_turb" in gridIn.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[out]: rightHandSideProxy: the turbulent right hand side proxy.
+    void StoreRhsByResidual(Grid *gridIn, FieldProxy *rightHandSideProxy);
+
+    //! To initionalization the "res_turb" data in gridIn by turbulent right hand side proxy.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: rightHandSideProxy: the turbulent right hand side proxy.
+    void InitResidual(Grid *gridIn, FieldProxy *rightHandSideProxy);
+
+    //! To set the "res_turb" data in gridIn by turbulent right hand side proxy.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: rightHandSideProxy: the turbulent right hand side proxy.
+    void RecoverResidual(Grid *gridIn, FieldProxy *rightHandSideProxy);
+
+    //! Create and initialize control parameters.
+    LIB_EXPORT void InitControlParameters();
+
+    //! Get control parameters.
+    LIB_EXPORT Param_TurbSolverStruct *GetControlParameters();
+
+    //! Judge if the flow field variables file already exists in Turb solver.
+    bool JudgeIfRestart();
+    bool JudgeIfReadAverage();
+
+    bool JudgeIfProtectedRestart();
+
+    void InitFlowAsReadingProtectedRestart(ActionKey *actkey);
+
+    //! To write the flow data to restart file by original "fts" form for continue to simulation.
+    //! @param[in ]: actkey contains the control information.
+    void DumpRestart(ActionKey *actkey);
+
+    //! To read the flow data from restart file by original "fts" form  for continue to simulation.
+    //! @param[in ]: actkey contains the control information.
+    void ReadRestart(ActionKey *actkey);
+
+    //! To write the flow data to restart file by HDF5 "fts" form for continue to simulation.
+    //! @param[in ]: actkey contains the control information.
+    void DumpRestartH5(ActionKey *actkey);
+
+    //! To read the flow data from restart file by HDF5 "fts" form  for continue to simulation.
+    //! @param[in ]: actkey contains the control information.
+    void ReadRestartH5(ActionKey *actkey);
+
+private:
+
+    //! To allocate the internal storage of field variables/residual/spectum array and other global data array.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void AllocateGlobalVar(Grid *gridIn);
+
+    //! To deallocate the internal storage of array.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void DeAllocateGlobalVar(Grid *gridIn);
+
+    //! To initionalize the flow flield according to the inflow condition
+    void InitFlowAsRestart();
+
+    //! Interface: to get the turbulent viscousity.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void ComputeViscousCoeff(Grid *gridIn);
+
+    //! Implement: to get the turbulent viscousity, called by function ComputeViscousCoeff.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void Viscosity(Grid *gridIn);
+
+    //! To set the flow field value of the external boundary condition of the computational region. \n
+    //! It looped all the internal boundary and was realized by call the specific boundary functions.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void Boundary(Grid *gridIn);
+
+    //! To set the inflow boundary condition by setting the flow field value equal to the far field value.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: structBC denotes the current boundary condition region which need to be set.
+    void InFlowBC  (Grid *gridIn, StructBC *structBC);
+
+    //! To set the outflow boundary condition by 2nd order interpolation.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: structBC denotes the current boundary condition region which need to be set.
+    void OutFlowBC (Grid *gridIn, StructBC *structBC);
+
+    //! To set the symmetry boundary condition by 1st order interpolation.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: structBC denotes the current boundary condition region which need to be set.
+    void SymmetryBC(Grid *gridIn, StructBC *structBC);
+
+    //! To set the viscid wall boundary condition by setting the turbulent variables equal to zero or other specific value.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: structBC denotes the current boundary condition region which need to be set.
+    void VisWall(Grid *gridIn, StructBC *structBC);
+
+    void VisWallWithWallFunctionStandard(Grid* gridIn, StructBC *structBC);
+    void VisWallWithWallFunctionPAB3D(Grid* gridIn, StructBC *structBC);
+
+    //! To set the farfield boundary condition according to riemann method.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: structBC denotes the current boundary condition region which need to be set.
+    void FarFieldBC(Grid *gridIn, StructBC *structBC);
+
+    //! To implement the standard wall function while y+ isn't meet the need.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: structBC denotes the current boundary condition region which need to be set.
+    void WallFunctionStandard(Grid *gridIn, StructBC *structBC, int is, int js, int ks, int it, int jt, int kt, int i, int j, int k);
+
+    //! To implement the Pab3D wall function while y+ isn't meet the need.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: structBC denotes the current boundary condition region which need to be set.
+    void WallFunctionPab3D(Grid *gridIn, StructBC *structBC, int is, int js, int ks, int it, int jt, int kt, int i, int j, int k);
+
+    //! To obtain the turbulent residual according to the right hand side.
+    //! @param[in out ]: gridIn denotes the current computational regions of the grids, in which turbulent residual are stored.
+    //! @param[in ]: rightHandSideProxy denotes the right hand side proxy of the cell face.
+    void LoadResiduals(Grid *gridIn, FieldProxy *rightHandSideProxy);
+
+    //! To set the turbulent residual zero.
+    //! @param[in out ]: gridIn denotes the current computational regions of the grids, in which turbulent residual are stored.
+    void ZeroResiduals(Grid *gridIn);
+
+    //! To set the turbulent spectum zero.
+    //! @param[in out ]: gridIn denotes the current computational regions of the grids, in which turbulent spectum are stored.
+    void InitSpectrum(Grid *gridIn);
+
+    //! Interface: to get the turbulent source flux of one equation model.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void SourceFluxOneEquation(Grid *gridIn);
+
+    //! Implement: to get the turbulent source flux of one equation model by original method.
+    //! Don't use yet.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void SourceFluxOneEquationOriginal(Grid *gridIn);
+
+    //! Implement: to get the turbulent source flux of one equation model by new method.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void SourceFluxOneEquationNew(Grid *gridIn);
+
+    //! To get the turbulent source flux of two one equation model.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void SourceFluxTwoEquation(Grid *gridIn);
+
+    //! To get the turbulent inviscid flux.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void InviscidFlux(Grid *gridIn);
+
+    //! To get the turbulent viscid flux.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void ViscousFlux(Grid *gridIn);
+
+    //! To get the turbulent dual time source residual.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void DualTimeSource(Grid *gridIn);
+
+    //! To update the unsteady turbulent flow field variables such as qTurbulence, residual, volume.
+    //! q(n+1) = q(n); q(n) = q(n-1)..
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void UpdateUnsteadyFlow(Grid *gridIn);
+
+    RDouble UnsteadyConvergence(Grid *gridIn);
+
+    //! Interface: to get the turbulent spectum.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void Diagonal(Grid *gridIn);
+
+    //! Implement: to get the turbulent spectum of one equation model, called by function Spectrum.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void SpectrumRadiusOfOneEquation(Grid *gridIn);
+
+    //! Implement: to get the turbulent spectum of two equation model, called by function Spectrum.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void SpectrumRadiusOfTwoEquation(Grid *gridIn);
+
+    //! To load flow variables stored in grid to qProxy.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: qProxy denotes the turbulent field proxy.
+    void LoadQ(Grid *gridIn, FieldProxy *qProxy);
+
+    //! To get the turbulent residual for Runge-Kutta method.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void RungeKuttaResidual(Grid *gridIn, FieldProxy *dqProxy, RDouble coef);
+
+    //! Implicit LU-SGS time integration method.
+    void SolveLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+    void SolveLUSGSBackward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+
+    //! To update the turbulent flow field variables for steady flow.
+    //! q(n+1) = q(n)+dq.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: qProxy denotes the turbulent field proxy.
+    //! @param[in ]: dqProxy denotes the of turbulent field proxy increment of one iteration step.
+    void UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy);
+
+    //! To set turbulent flow field variables's value at the corner point.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void CornerPoint(Grid *gridIn);
+
+    //! To get the distance between the two point(i, j, k) and (i+1, j+1, k+1).
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @param[in ]: i, j, k denotes grid point index.
+    //! @return: the distance between the two point(i, j, k) and (i+1, j+1, k+1).
+    RDouble GetDistance(Grid *gridIn, int i, int j, int k);
+
+    //! To get maximum residual for output.
+    //! @param[in ]: actkey contains the control parameter.
+    void GetResidual(ActionKey *actkey);
+
+    //! To get the crossing term for two equation turbulent model.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void Crossing(Grid *gridIn);
+
+    //! To get the blending term for two equation turbulent model.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void Blending(Grid *gridIn);
+
+    //! Interface: To get the length scale for DES simulation.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void ComputeLengthScaleofOneEquationModel(Grid *gridIn);
+
+    //! Interface: To get the length scale for SST-based DES simulation.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void ComputeLengthScaleofTwoEquationModel(Grid *gridIn);
+
+    //! Implement: To get the length scale for standard DES simulation.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void ComputeDESLength(Grid *gridIn);
+
+    //! Implement: To get the length scale for SST DES simulation.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void ComputeDESLengthSST(Grid *gridIn);
+
+    //! Implement: To get the length scale for standard DDES simulation.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void ComputeDDESLength(Grid *gridIn);
+
+    //! Implement: To get the length scale for SST DDES simulation.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void ComputeDDESLengthSST(Grid *gridIn);
+
+    //! Implement: To get the length scale for standard IDDES simulation.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void ComputeIDDESLength(Grid *gridIn);
+
+    //! Implement: To get the length scale for SST IDDES simulation.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void ComputeIDDESLengthSST(Grid *gridIn);
+
+    //! Implement: To get the length scale for SST simulation.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    void ComputeSSTLength(Grid *gridIn);
+
+    //! To get the length scale for one equation model turbulent simulation.
+    //! With DES: DES length scale.
+    //! Without DES: wall diatance.
+    //! @param[in ]: gridIn denotes the current computational regions of the grids.
+    //! @return: the lenth scale for turbulent simulation.
+    RDouble3D * GetLengthScale(Grid *gridIn);
+
+    //! To get the length scale for SST model turbulent simulation.
+    //! With DES: DES length scale.
+    //! Without DES: sqrt(ke) / (beta * kw).
+    //! @return: the lenth scale for SST turbulent simulation.
+    RDouble3D * GetLengthScaleSST();
+
+    RDouble3D * GetDESLength() { return this->DESLength; }
+    RDouble3D * GetSSTLength() { return this->SSTLength; }
+    void SetDESLength(RDouble3D *length) { this->DESLength = length; }
+    void SetSSTLength(RDouble3D *length) { this->SSTLength = length; }
+};
+
+void ComputeLESLengthofSA(Grid *gridIn, RDouble3D *LESLength, RDouble3D *lowReynoldsNumberCorrection, int DESType);
+void ComputeLESLengthofSST(Grid *gridIn, RDouble3D *LESLength, int DESType);
+void ComputeLowReynoldsNumberCorrection(Grid *gridIn, RDouble3D *lowReynoldsNumberCorrection);
+
+}
+
diff --git a/CFD/TurbSolver/include/TurbSolverStructFD.h b/CFD/TurbSolver/include/TurbSolverStructFD.h
new file mode 100644
index 0000000..9a41aca
--- /dev/null
+++ b/CFD/TurbSolver/include/TurbSolverStructFD.h
@@ -0,0 +1,62 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      TurbSolverStructFD.h
+//! @brief     turbulence solver for struct grid.
+//! @author    Ma Yankai, Min Yaobing.
+
+#pragma once
+#include "TurbSolverStruct.h"
+
+namespace PHSPACE
+{
+class TurbSolverStrFD : public TurbSolverStr
+{
+public:
+    TurbSolverStrFD();
+    ~TurbSolverStrFD();
+
+private:
+    void Boundary(Grid *gridIn);
+    void ComputeViscousCoeff(Grid *grid);
+    void ComputeGradientCellCenter(Grid *gridIn);
+    void GetDependentVariablesforStructHighOrder(Grid *gridIn);
+    void ObtainViscousCoefWithGhost(Grid *gridIn);
+    void ObtainqlqrLowOrder(Grid *gridIn);
+    void GetFaceVariable(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int nsurf);
+    RDouble Limiter_ThirdSmooth(const RDouble &x, const RDouble &y);
+    void GetFaceVariableCorrectionAtPhysicalBoundary(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int nsurf);
+    void ObtainGradientCellCenter_Laminar(Grid *gridIn);
+    void ObtainBoundaryValue(Grid *gridIn);
+    void ObtainViscosity(Grid *gridIn);
+    void ObtainGradientCellCenter(Grid *gridIn);
+    void ObtainCrossing(Grid *gridIn);
+    void ObtainBlending(Grid *gridIn);
+    void InFlowBC(Grid *grid, StructBC *structBC);
+    void OutFlowBC(Grid *gridIn, StructBC *structBC);
+    void VisWall(Grid *gridIn, StructBC *structBC);
+    void VisWallWithWallFunctionStandard(Grid* gridIn, StructBC *structBC);
+    void VisWallWithWallFunctionPAB3D(Grid* gridIn, StructBC *structBC);
+    void SymmetryBC(Grid *gridIn, StructBC *structBC);
+    void FarFieldBC(Grid *gridIn, StructBC *structBC);
+    void CornerPoint(Grid *gridIn);
+    void UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy);
+    void Diagonal(Grid *gridIn);
+    void SpectrumRadiusOfOneEquation(Grid *gridIn);
+    void SpectrumRadiusOfTwoEquation(Grid *gridIn);
+    void LUSGSInitializationStructHighOrder(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ);
+    void CompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex, const int &nEquation);
+    void DecompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex, const int &nEquation);
+    void SolveLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+    void SolveLUSGSBackward(Grid *gridIn, FieldProxy * dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+};
+
+}
diff --git a/CFD/TurbSolver/include/TurbSolverUnstr.h b/CFD/TurbSolver/include/TurbSolverUnstr.h
new file mode 100644
index 0000000..3972fd3
--- /dev/null
+++ b/CFD/TurbSolver/include/TurbSolverUnstr.h
@@ -0,0 +1,417 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      TurbSolverUnstr.h
+//! @brief     turbulence solver for unstruct grid.
+//! @author    Bell, He Xin, Zhang Laiping, Dr. Wang, Zhang Yang, He Kun, 
+//!            Wan Yunbo, Xu Gang, Zhang Yaobing.
+
+#pragma once
+#include "TurbSolver.h"
+#include "Limiter.h"
+#include "FaceProxy.h"
+
+namespace PHSPACE
+{
+class Param_TurbSolverUnstruct;
+
+class TurbSolverUnstr: public TurbSolver
+{
+private:
+    static const int FORMATION_ORGSA_SST = 0;
+    static const int FORMATION_SA_NSMB   = 1;
+    static const int FORMATION_SA_CFL3D  = 2;
+private:
+    //! Length scale of XXDES, such as DES/DDES/IDDES.
+    RDouble  *DESLength;
+
+    //! Gradient of variables on turbulent equation.
+    Gradient *gradientTurbField;
+
+    //! Gradient of velocity.
+    Gradient *gradientVelocity;
+
+public:
+    TurbSolverUnstr();
+    ~TurbSolverUnstr();
+
+    //! Allocate and delete global variables.
+    void AllocateGlobalVar(Grid *gridIn);
+    void DeAllocateGlobalVar(Grid *gridIn);
+
+    //! Load rhs to residual which stored in grid
+    void LoadResiduals(Grid *gridIn, FieldProxy *rhsProxy);
+
+    //! Variables such as specTurb are set to zero.
+    void InitSpectrum(Grid *gridIn);
+
+    //! Boundary condition.
+    void Boundary(Grid *gridIn);
+
+    //! Outflow Boundary condition, suitable for mass out, pressure out, and velocity out in turbulence flows.
+    void OutflowBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+
+    //! Inflow Boundary condition, suitable for mass in, pressure in, and velocity in for turbulence flows.
+    void InflowBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+    
+    //! Wall Boundary condition.
+    void WallBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+
+#ifdef USE_GMRESSOLVER
+    //! GMRESturb Wall Boundary condition.
+    void GMRES_WallBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+    
+     //! GMRESturb Farfield Boundary condition.
+    void GMRES_FarfieldBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+#endif
+
+    //! Farfield Boundary condition.
+    void FarfieldBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct);
+
+    //! Residuals are set to zero
+    void ZeroResiduals(Grid *gridIn);
+
+    void RotateVectorFromInterface(Grid *gridIn, const int &neighborZoneIndex, const int &nEquation);
+
+    void InitMixingPlane(RDouble ***MixingPlaneVar, int Dim1, int Dim2, int Dim3, RDouble Value);
+
+    void AverageMixingPlane(Grid *grid);
+    void MixingPlaneDataTransfer(Grid *grid, Grid *NeighborGrid);
+    void NonReflective(Grid *grid, Grid *NeighborGrid);
+    void SetMixingPlaneData(Grid *grid);
+
+    //! Judge if the flow field variables file already exists in Turb solver.
+    bool JudgeIfRestart();
+    bool JudgeIfReadAverage();
+
+    //! Initialize the flow field as simulation restarting.
+    void InitFlowAsRestart();
+
+    //! Write the file for flowfield restarting.
+    void DumpRestart(ActionKey *actkey);
+
+    //! Read the file for flowfield restarting.
+    void ReadRestart(ActionKey *actkey);
+
+    //! Write and read restart file.
+    void DumpRestartH5(ActionKey *actkey);
+    void ReadRestartH5(ActionKey *actkey);
+
+    //! Compute the residual of turbulent equation.
+    void GetResidual(ActionKey *actkey);
+
+    //! Restrict defect from fine to coarse grid.
+    void RestrictDefect(Grid *fineGridIn, Grid *coarseGridIn);
+
+    //! Correct variable in fine grid using correction in coarse grid
+    void CorrectFineGrid(Grid *fineGridIn, Grid *coarseGridIn);
+
+    //! Interpolate variables of turbulence model in coarse grid to that in fine grid.
+    void InterpolatFineGrid(Grid *fineGridIn, Grid *coarseGridIn);
+
+    //! Put correction back on the coarse grid.
+    void PutCorrectionBack(Grid *gridIn, FieldProxy *qProxy);
+
+    //! Load NS variables stored in grid to q.
+    void LoadQ(Grid *gridIn, FieldProxy *qProxy);
+
+    //! Compute the residuals with RungeKutta method.
+    void RungeKuttaResidual(Grid *gridIn, FieldProxy *dqProxy, RDouble coefficient);
+
+    //! Update flow field variables of turbulene equation.
+    void UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy);
+
+    //! LU-SGS forward sweep.
+    void SolveLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+    
+    //! LU-SGS backward sweep.
+    void SolveLUSGSBackward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep = false);
+    
+    //! Set the values at ghost cells.
+    void SetGhostDQLUSGS(Grid *gridIn, RDouble **dq);    // Bell 20130401 add
+    
+    void SetWallBCGhostDQLUSGS(Grid *gridIn, UnstructBC *bcRegionUnstruct, RDouble **dq);
+
+    void SetFarfieldBCGhostDQLUSGS(Grid *gridIn, UnstructBC *bcRegionUnstruct, RDouble **dq);
+    
+    //! Smooth variables of turbulent equation.
+    void SMoothTurbulence(Grid *gridIn);
+    void SMoothTurbulencePoint(Grid *gridIn, RDouble *primitiveVariable, int i);
+    
+    //! Compute spectrumRadius of turbulent equation.
+    void Diagonal(Grid *grid);
+    
+    //! Compute inviscid flux of turbulent equation.
+    void InviscidFlux(Grid *gridIn);
+    
+    //! Compute viscous flux of turbulent equation.
+    void ViscousFlux(Grid *gridIn);
+    
+    //! Compute source term of dual time step.
+    void DualTimeSource(Grid *gridIn);
+    
+    //! Update terms used for unsteady flow simulation.
+    void UpdateUnsteadyFlow(Grid *gridIn);
+    
+    //! Convergence norm for the unsteady flow simulation.
+    RDouble UnsteadyConvergence(Grid *gridIn);
+    
+    //! Modify residual values on wall boundary.
+    void ModifyResiduals(Grid *grid);
+    void ModifyResidualOnWallBoundary(Grid *gridIn);
+    
+    //! Reset variables of turbulent equation on wall boundary.
+    void ResetWallScalar(Grid *gridIn);
+    
+    //! Restrict variables of turbulent equation on fine and coarse grid.
+    void RestrictAllQ(Grid *fineGridIn, Grid *coarseGridIn);
+    
+    //! Compute flux of the turbulent equation.
+    void LoadFlux(Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+    
+    //! Set value to flowfiled variables.
+    void FillField(Grid *gridIn, FieldProxy *fieldProxy, RDouble value);
+    void FillField(Grid *gridIn, FieldProxy *field1Proxy, FieldProxy *field2Proxy);
+    
+    //! Create proxy for variables of turbulent equation located in cell center.
+    FieldProxy *CreateFieldProxy(Grid *gridIn);
+    
+    //! Get the corresopnding proxy.
+    FieldProxy *GetFieldProxy(Grid *gridIn, const string &fieldName);
+    
+    //! Get the proxy of residuals.
+    FieldProxy *GetResidualProxy(Grid *gridIn);
+    
+    //! Load the residuals of turbulent equation.
+    void RecoverResidual(Grid *gridIn, FieldProxy *rhsProxy);
+    
+    //! Initialize the residuals of turbulent equation.
+    void InitResidual(Grid *gridIn, FieldProxy *rhsProxy);
+    
+    //! Rhs is set equal to residuals of turbulent equation. 
+    void StoreRhsByResidual(Grid *gridIn, FieldProxy *rhsProxy);
+    
+    //! Create proxy for variables of turbulent and NS equation that located in face.
+    FaceProxy *CreateFaceProxy(Grid *gridIn);
+    
+    //! Variables of turbulent equation that located in face.
+    TurbFaceValue *CreateTurbFaceValue(Grid *gridIn);
+
+    Limiter * CreateLimiter(Grid *grid_in);//!modified by zhangjian
+
+    //! Compute the node value in the turbulent flow.
+    //! @param[in] grid         the mesh in the computing.
+    void ComputeQTurbNodeValue(Grid *grid_in);
+
+    //! modify the node value for the interpoint in the turbulent flow.
+    //! @param[in] grid         the mesh in the computing.
+    void ModifyQTurbNodeValue(Grid *grid_in);
+private:
+    FaceProxy * CreateFaceProxyTurb(Grid *grid_in);
+public:
+    void SourceFluxOneEquation(Grid *gridIn);
+    void SourceFluxTwoEquation(Grid *gridIn);
+
+    //! Source term of one equation turbulence model with many variants.
+    void SourceFluxOneEquationOriginal(Grid *gridIn);
+ 
+ #ifdef USE_GMRESSOLVER
+    //! GMRESturb
+    void GMRES_SourceFluxOneEquationOriginal(Grid *gridIn);
+#endif
+
+    void SourceFluxOneEquationOriginalCFL3D(Grid *gridIn);
+    //void SourceFluxOneEquationEdwards(Grid *gridIn);
+    //void SourceFluxOneEquationNew1(Grid *gridIn);
+    //void SourceFluxOneEquationNew(Grid *gridIn);
+
+    //! Get face value for viscous flux of computation.
+    void GetVisFaceValue(Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+  
+#ifdef USE_GMRESSOLVER
+    //! GMRESCoupled
+    template <typename T>
+    void GMRES_GetVisFaceValue(UnstructBCSet *unstructBCSet, int iFace, int nBoundFace, int nTurbulenceEquation, RDouble KW_sigma,  T rhol, T rhor, T pressurel, T pressurer, T *turbQl, T *turbQr, T& mul, T& mlt, T& viscousLaminarl, T& viscousLaminarr);
+   
+    //! GMRESturb
+    void GMRES_ComputeVisflux (Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+ #endif
+
+    //! Compute viscous flux of turbulent equations.
+    void ComputeVisflux (Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+    
+    //! Compute the spectrum radius of one equation turbulence model.
+    void SpectrumRadiusOfOneEquation(Grid *gridIn);
+    
+    //! Compute the spectrum radius of two equation turbulence model.
+    void SpectrumRadiusOfTwoEquation(Grid *gridIn);
+    //! Compute the blending function for EASM model.
+    //void EASMBlending(Grid *gridIn, RDouble *cross, RDouble *blend);
+    
+    //! Compute the crossing term in two equation turbulence model.
+    void Crossing(Grid *gridIn);
+    
+    //! Compute the blending function in two equation turbulence model.
+    void Blending(Grid *gridIn);
+
+    //void Crossing(Grid *gridIn, RDouble *cross);
+    //void Blending(Grid *gridIn, RDouble *cross, RDouble *blend);
+
+    //void SourceFluxEASM(Grid *gridIn);
+    //void Gatski_Speziale_Model(Grid *gridIn);
+    //void EASMko2003_Model(Grid *gridIn);
+    //void EASMko2005_Model(Grid *gridIn);
+
+    //! Compute turbulent viscous coefficient. 
+    void ComputeViscousCoeff(Grid *grid);
+    void Viscosity(Grid *grid);
+    
+    //! Initialize wall distance for coarse grid.
+    void InitCGrid(Grid *fineGridIn, Grid *coarseGridIn);
+    
+    //! Upload interface value for variables in turbulence model. 
+    void UploadInterfaceValue(ActionKey *actkey);
+    void UploadInterfaceData(ActionKey *actkey);    // Bell 20120910 add
+    
+    //! Download interface value for variables in turbulence model. 
+    void DownloadInterfaceValue(ActionKey *actkey);
+    void DownloadInterfaceData(ActionKey *actkey);    // Bell 20120910 add
+
+    //! Upload the interpoint variables for send.
+    //! @param[in] actkey         the actkey store the information of the interpoint.
+    void UploadInterpointData(ActionKey *actkey);
+
+    //! Download the interpoint variables from the receive data.
+    //! @param[in] actkey         the actkey store the information of the interpoint.
+    void DownloadInterpointData(ActionKey *actkey);
+
+    void CommunicationInterpointWeight(ActionKey *actkey);
+    void DownloadInterpointWeight(ActionKey *actkey);
+
+    //! Upload overset data at interface for variables in turbulence model. 
+    void UploadOversetData(ActionKey *actkey);
+
+    //! Download overset data at interface for variables in turbulence model.
+    void DownloadOversetData(ActionKey *actkey);
+
+    //! Compute inviscid flux of turbulence model equation.
+    void ComputeInviscidFlux(Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+    
+    //! Inviscid flux scheme for turbulence model equation.
+    void NNDFlux(Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+
+#ifdef USE_GMRESSOLVER
+    //! GMRESturb
+    void GMRES_NNDFlux(Grid *gridIn, FaceProxy *FaceProxy, int nst, int ned);
+
+    //! GMRESCoupled fix left and right variables of turbulence model and NS equations, required for GMRES by AD
+    template <typename T>
+    void FixBoundaryQlQr(UnstructBCSet *unstructBCSet, int iFace, int nTurbulenceEquation, int nEquation, T *primQl, T *primQr, T *turbQl, T *turbQr);
+
+    //! GMRES solver -- a linear system solver
+    //! This method can be referenced "Sen Zhang, Boqian Wang, et al. Implementation of a Newton-Krylov Algorithm in the Open-source Solver PHengLEI[C]."
+    //! GPPS Hong Kong , October 17-19, 2023.
+    void GMRESSolver(Grid *gridIn, FieldProxy *dqProxy);
+#endif
+
+    //! Get left and right variables of turbulence model and NS equation.
+    void GetQlQr(Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+
+    //! Obtain the gradient of variables in turbulence model.
+    void GetGradientField(Grid *gridIn);
+    
+    //! Compute gradient of variables in turbulence model.
+    void ComputeGradient(Grid *grid);
+
+    //! Create and initialize controlparameters
+    LIB_EXPORT void InitControlParameters();
+
+    //! Get control paramters.
+    LIB_EXPORT Param_TurbSolverUnstruct *GetControlParameters();
+    
+    //! Write data needed communication at interface to datacontainer.
+    void CompressSpecificArrayToInterface(DataContainer *&dataContainer, const string &fieldName, Grid *grid, const int &neighborZoneIndex, const int &neqn);
+    
+    //! Read data from datacontainer after communication.
+    void DecompressArrayFromInterface(DataContainer *&dataContainer, const string &fieldName, Grid *grid, const int &neighborZoneIndex, const int &neqn);
+
+    ////! Implement: to compress turbulenct dq data from grid to date dataContainer.
+    //void CompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+    //void DecompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *grid, const int &zoneIndex, const int &neighborZoneIndex, const int &neqn);
+
+private:
+
+    //! Get variables at face interpolated from left and right side for turbulence model equation.
+    void GetQlQrTurbulence(Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+    
+    //! Get variables at face interpolated from left and right side for NS equation.
+    void GetQlQrNS(Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+    
+    //! Compute the weights used to average dqdx, dqdy, etc.
+    void ComputeFaceWeight(Grid *gridIn, FaceProxy *faceProxy, int nst, int ned);
+    
+    //! Write the interface information. 
+    void DumpInterfaceInfoBell();         // Bell 20120910 add
+    
+    //!  Decide whether modify the computation of term with coefficient cb2 in original SA turbulence model.
+    //!  If modify the SA turbulence model: For the original SA turbulence model,
+    //!  transform the gradient square term into the viscous flux, using CFL3D or NSMB method.\n
+    //!    -# 0: SST or original SA.
+    //!    -# 1: NSMB formation SA.
+    //!    -# 2: CFL3D formation SA.
+    int TurbEquationFormation() {return this->Turb_Equation_Formation;}
+    
+    //! Compute length scale of one equation turbulence model.
+    void ComputeLengthScaleofOneEquationModel(Grid *gridIn);
+    
+    //! Compute length scale with original Deatched Eddy Simulation method.
+    void ComputeDESLength(Grid *gridIn);
+    
+    //! Compute length scale with Delayed Deatched Eddy Simulation method.
+    void ComputeDDESLength(Grid *gridIn);
+    
+    //! Compute length scale with improved Delayed Deatched Eddy Simulation method.
+    void ComputeIDDESLength(Grid *gridIn);
+    
+    //! Obtaion the length scale in turbulence simulation.
+    RDouble *GetLengthScale(Grid *gridIn);
+    
+    //! Obtaion the length scale of DES.
+    RDouble *GetDESLength() { return this->DESLength; }
+    
+    //! Set the length scale of DES.
+    void SetDESLength(RDouble *length) { this->DESLength = length; }
+    
+    //! Read the averaged variables of statistical flow field.
+    void ReadStatisticalFlow(ActionKey *actkey);
+
+    //! Create proxy for variables of NS equations that located in face.
+    FaceProxy * CreateFaceProxyNS(Grid *gridIn);
+    
+    //! Create proxy for variables of turbulent equations that located in face.
+    FaceProxy * CreateFaceProxyTurbulence(Grid *gridIn);
+
+private:
+    //! SA equation formation/variety.
+    //!    -# 0: SST
+    //!    -# 1: NSMB formation
+    //!    -# 2: CFL3D formation
+    int Turb_Equation_Formation;
+
+    int machZeroExp;
+};
+
+//! Compute length scale of LES for DES based on SA turbulence model.
+void ComputeLESLengthofSA(Grid *gridIn, RDouble *lengthOfLES, RDouble *lowReynoldsNumberCorrection, int DESType);
+
+//! Compute low Reynolds number correction term for SA turbulence model when implementing DES.
+void ComputeLowReynoldsNumberCorrection(Grid *gridIn, RDouble *lowReynoldsNumberCorrection);
+}
diff --git a/CFD/TurbSolver/src/LESSolver.cpp b/CFD/TurbSolver/src/LESSolver.cpp
new file mode 100644
index 0000000..46d7093
--- /dev/null
+++ b/CFD/TurbSolver/src/LESSolver.cpp
@@ -0,0 +1,182 @@
+#include "PHMpi.h"
+#include "LESSolver.h"
+#include "Constants.h"
+#include "Precision.h"
+#include "GlobalDataBase.h"
+#include "TK_Log.h"
+#include "TK_Exit.h"
+
+namespace PHSPACE
+{
+
+bool LESSolver::init_param = false;
+bool LESSolver::free_param = false;
+int  LESSolver::nTurbEquations = 0;
+
+LESSolver::LESSolver()
+{
+    //InitParameter();
+}
+
+LESSolver::~LESSolver()
+{
+    FreeParameter();
+}
+
+void LESSolver::InitDependentVariables()
+{
+    Grid *fineGrid = GetGrid(0);
+    //! Don't be used for STRUCTGRID because of turb viscosity being stored.
+    if (fineGrid->Type() != STRUCTGRID)
+    {
+        ComputeGradient(fineGrid);
+
+        ObtainViscosity(fineGrid);
+    }
+
+    ComputeQTurbNodeValue(fineGrid);
+}
+
+void LESSolver::FreeParameter()
+{
+    if (free_param) return;
+    free_param = true;
+
+    RDouble * turboo = reinterpret_cast<RDouble *> (GlobalDataBase::GetDataPtr("turboo"));
+    delete [] turboo;
+}
+
+void LESSolver::InitParameter()
+{
+    /*
+    string sgsmodel;
+    GlobalDataBase::GetData("sgsmodel", &sgsmodel, PHSTRING, 1);
+    int isgsmodel = 0;
+    int nwtf = 0;
+    RDouble coef_testfilter[3];
+
+    if (sgsmodel.substr(0, 11) == "smagorinsky")
+    {
+        isgsmodel = 1;
+    }
+    else if (sgsmodel.substr(0, 18) == "dynamicsmagorinsky")
+    {
+        isgsmodel = 2;
+        coef_testfilter[0] = 0.16666667;
+        coef_testfilter[1] = 0.66666667;
+        coef_testfilter[2] = 0.16666667;
+        nwtf = 1;
+        GlobalDataBase::UpdateData("coef_testfilter" ,&coef_testfilter , PHDOUBLE, 3);
+        GlobalDataBase::UpdateData("nwtf" ,&nwtf , PHINT, 1);
+    }
+    else if (sgsmodel.substr(0, 4) == "wale")
+    {
+        isgsmodel = 3;
+    }
+
+    GlobalDataBase::UpdateData("isgsmodel", &isgsmodel , PHINT, 1);
+
+    return;
+    */
+}
+
+void LESSolver::Action(ActionKey *actkey)
+{
+    CFDSolver::Action(actkey);
+}
+
+void LESSolver::FillActionKey(ActionKey *actkey, int action, int level)
+{
+    actkey->action   = action;
+    actkey->solver   = TURBULENCE;
+    actkey->solverID = this->GetIndex();
+    actkey->kind     = SOLVER_BASED;
+    actkey->level    = level;
+}
+
+void LESSolver::PostSolve(Grid *grid_in, int stage, int level)
+{
+    CommunicationInterfaceData();
+}
+
+void LESSolver::DumpResultFile(Grid *grid, int level)
+{
+    int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int intervalStepFlow = GlobalDataBase::GetIntParaFromDB("intervalStepFlow");
+
+    bool isSubIterationDump = true; //! It is true default in steady simulations.
+
+    Param_LESSolver *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        GlobalDataBase::GetData("isSubIterationDump", &isSubIterationDump, PHBOOL, 1);
+    }
+
+    if (outnstep % intervalStepFlow == 0 && level == 0 && isSubIterationDump)
+    {
+        //! To dump restart data for continual simulation.
+        ActionKey *actkeyDumpRestartData = new ActionKey();
+        FillActionKey(actkeyDumpRestartData, DUMP_RESTART, 0);
+        DumpRestartData(actkeyDumpRestartData);
+        delete actkeyDumpRestartData;
+    }
+}
+
+void LESSolver::Post()
+{
+    //! To dump restart data for continual simulation.
+    ActionKey *actkeyDumpRestartData = new ActionKey();
+    FillActionKey(actkeyDumpRestartData, DUMP_RESTART, 0);
+    DumpRestartData(actkeyDumpRestartData);
+    delete actkeyDumpRestartData;
+}
+
+void LESSolver::RegisterCFDSolverInterfaceField()
+{
+    CFDSolver::RegisterInterfaceField("vist", PHDOUBLE, 1);
+
+    CFDSolver::RegisterInterfaceField("subgridScaleEnergy", PHDOUBLE, 1);
+
+    CFDSolver::RegisterInterfaceField("turbulentPrandtlNumber", PHDOUBLE, 1);
+}
+
+//! Compare the outnstep in the flowfield file between the NS and turbulence.
+void LESSolver::CompareOutStepOfFlowfieldFile(int outnstepofNS, int outnstepofTurb) const
+{
+    if (outnstepofNS == outnstepofTurb) return;
+
+    ostringstream oss;
+    oss << "outnstepofNS   = " << outnstepofNS   << endl;
+    oss << "outnstepofTurb = " << outnstepofTurb << endl;
+    oss << "The NS flowfield file is not matched with the turbulence." << endl;
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (!isUnsteady)
+    {
+        oss << "Warning: Cluster writes files error! It needs more iteration step." << endl;
+        PrintToWindow(oss.str());
+        WriteLogFile (oss.str());
+
+		GlobalDataBase::UpdateData("outnstep", &outnstepofTurb, PHINT, 1);
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("Error: Cluster writes files error! Please restart the calculation. \n");
+    }
+}
+
+//! Get the file name for Residual dumping.
+const string LESSolver::GetRestartFileName()
+{
+    string turbFile = "turb.dat";
+    GlobalDataBase::GetData("turbfile", &turbFile, PHSTRING, 1);
+    return turbFile;
+}
+
+LIB_EXPORT Param_LESSolver *LESSolver::GetControlParameters()
+{
+    return static_cast <Param_LESSolver *> (controlParameters);
+}
+
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/src/LESSolverStruct.cpp b/CFD/TurbSolver/src/LESSolverStruct.cpp
new file mode 100644
index 0000000..aa6cfef
--- /dev/null
+++ b/CFD/TurbSolver/src/LESSolverStruct.cpp
@@ -0,0 +1,7487 @@
+#include "PHMpi.h"
+#include "LESSolverStruct.h"
+#include "GradientOperation.h"
+#include "Math_BasisFunction.h"
+#include "Constants.h"
+#include "Param_LESSolverStruct.h"
+#include "TK_Exit.h"
+#include "Glb_Dimension.h"
+#include "AleModel.h"
+#include "NSSolverStructFD.h"
+#include "IO_FileName.h"
+#pragma warning(disable:6385)
+#pragma warning(disable:26451)
+using namespace std;
+
+namespace PHSPACE
+{
+
+LESSolverStruct::LESSolverStruct()
+{
+
+}
+
+LESSolverStruct::~LESSolverStruct()
+{
+    DeAllocateGlobalVariables();
+    FreeControlParameters();
+}
+
+void LESSolverStruct::AllocateGlobalVar(Grid *gridIn)
+{
+    Param_LESSolverStruct *parameters = GetControlParameters();
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Range IFACE, JFACE, KFACE;
+    GetRange(ni, nj, nk, 0, 0, IFACE, JFACE, KFACE);
+
+    Range Direction(1, 3);
+    Range N(1, 6);
+    Range M(1, 3);
+
+    RDouble3D *cellLengthScale = new RDouble3D(Range(1, ni-1), Range(1, nj-1), Range(1, nk-1), fortranArray);    //! Length scale of cell.
+    *cellLengthScale = 0.0;
+    grid->UpdateDataPtr("cellLengthScale", cellLengthScale);    //! Length scale of cell.
+
+    RDouble3D *wallFunction = new RDouble3D(I, J, K, fortranArray); //! Wall damping function.
+    *wallFunction = 1.0;
+    grid->UpdateDataPtr("wallFunction", wallFunction);    //! Wall damping function.
+
+    RDouble3D *anisotropicConstant = new RDouble3D(I, J, K, fortranArray);    //! Model coefficients of the anisotropic SGS stresses using in dynamic model.
+    *anisotropicConstant = 0.0;
+    grid->UpdateDataPtr("anisotropicConstant", anisotropicConstant);    //! Model coefficients of the anisotropic SGS stresses using in dynamic model.
+
+    RDouble3D *isotropicConstant = new RDouble3D(I, J, K, fortranArray);    //! Model coefficients of the isotropic SGS stresses using in dynamic model.
+    *isotropicConstant = 0.0;
+    grid->UpdateDataPtr("isotropicConstant", isotropicConstant);    //! Model coefficients of the isotropic SGS stresses using in dynamic model.
+
+    RDouble3D *turbulentPrandtlNumber = new RDouble3D(I, J, K, fortranArray);    //! Turbulence Prandtl number using in dynamic model.
+    *turbulentPrandtlNumber = 0.9;
+    grid->UpdateDataPtr("turbulentPrandtlNumber", turbulentPrandtlNumber);    //! Turbulence Prandtl number using in dynamic model.
+
+    RDouble4D *strainRateTensor = new RDouble4D(I, J, K, Range(0, 9), fortranArray);    //! Strain Rate Tensor Sij and Omegaij
+    *strainRateTensor = 0.0;
+    grid->UpdateDataPtr("strainRateTensor", strainRateTensor);    //! Strain Rate Tensor Sij and Omegaij.
+
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+    if (isFVMOrFDM == FD_METHOD)
+    {
+        Range I4(- 3, ni + 3);
+        Range J4(- 3, nj + 3);
+        Range K4(- 3, nk + 3);
+        UVWTproxy = new FieldProxy();    //! Flow field variables u/v/w/t used in calculating gradient of u/v/w/t;
+        UVWTfaceIproxy = new FieldProxy();    //! Flow field variables u/v/w/t defined on I faces.
+        UVWTfaceJproxy = new FieldProxy();    //! Flow field variables u/v/w/t defined on J faces.
+        UVWTfaceKproxy = new FieldProxy();    //! Flow field variables u/v/w/t defined on K faces.
+        UVWTproxy->SetField_STR(new RDouble4D(I4, J4, K4, Range(0, 3), fortranArray), true);
+        UVWTfaceIproxy->SetField_STR(new RDouble4D(I, J, K, Range(0, 3), fortranArray), true); 
+        UVWTfaceJproxy->SetField_STR(new RDouble4D(I, J, K, Range(0, 3), fortranArray), true);
+        UVWTfaceKproxy->SetField_STR(new RDouble4D(I, J, K, Range(0, 3), fortranArray), true);
+    }
+
+    int subgridScaleModel = parameters->GetSubgridScaleModel();
+    if (subgridScaleModel == 2 || subgridScaleModel == 4)
+    {
+        RDouble4D *leonardStress = new RDouble4D(I, J, K, N, fortranArray);    //! Leonard stresses using in dynamic model.
+        RDouble4D *modeledStress = new RDouble4D(I, J, K, N, fortranArray);    //! Modeled stresses using in dynamic model.
+        RDouble4D *leonardTemperatureFlux = new RDouble4D(I, J, K, Range(0, 2), fortranArray);    //! Leonard heat flux using in dynamic model.
+        RDouble4D *modeledTemperatureFlux = new RDouble4D(I, J, K, Range(0, 2), fortranArray);    //! Modeled heat flux using in dynamic model.
+        RDouble4D *testFilteredQ = new RDouble4D(I, J, K, Range(0, 3), fortranArray);    //! Flow field variables after test filtering.
+        RDouble3D *testFilteredTemperature = new RDouble3D(I, J, K, fortranArray);    //! Temperature after test filtering.
+        RDouble4D *testFilteredStrainRateTensor = new RDouble4D(I, J, K, Range(0, 6), fortranArray);    //! Strain rate tensor after test filtering.
+        RDouble4D *testFilteredRhoUiUj = new RDouble4D(I, J, K, N, fortranArray);    //! rhoUiUj after test filtering.
+        RDouble4D *testFilteredRhoUT = new RDouble4D(I, J, K, M, fortranArray);    //! rhoUT after test filtering.
+        RDouble4D *testFilteredAlphaIJ = new RDouble4D(I, J, K, Range(0, 6), fortranArray);
+        RDouble4D *betaIJ = new RDouble4D(I, J, K, N, fortranArray);
+        RDouble4D *gradT = new RDouble4D(I, J, K, Range(0, 2), fortranArray);    //! Temperature gradient.
+        RDouble4D *testFilteredGradT = new RDouble4D(I, J, K, Range(0, 2), fortranArray);    //! Temperature gradient after test filtering.
+        RDouble4D *testFilteredRhoStrainRateMagnitudeGradT = new RDouble4D(I, J, K, Range(0, 2), fortranArray);    //! rho|S|gradT after test filtering.
+
+        *leonardStress = 0.0;
+        *modeledStress= 0.0;
+        *leonardTemperatureFlux = 0.0;
+        *modeledTemperatureFlux = 0.0;
+        *testFilteredQ = 0.0;
+        *testFilteredTemperature = 0.0;
+        *testFilteredStrainRateTensor = 0.0;
+        *testFilteredRhoUiUj = 0.0;
+        *testFilteredRhoUT = 0.0;
+        *testFilteredAlphaIJ = 0.0;
+        *betaIJ = 0.0;
+        *gradT = 0.0;
+        *testFilteredGradT = 0.0;
+        *testFilteredRhoStrainRateMagnitudeGradT = 0.0;
+ 
+        grid->UpdateDataPtr("leonardStress", leonardStress);    //! Leonard stresses using in dynamic model.
+        grid->UpdateDataPtr("modeledStress", modeledStress);    //! Modeled stresses using in dynamic model.
+        grid->UpdateDataPtr("leonardTemperatureFlux", leonardTemperatureFlux);    //! Leonard heat flux using in dynamic model.
+        grid->UpdateDataPtr("modeledTemperatureFlux", modeledTemperatureFlux);    //! Modeled heat flux using in dynamic model.
+        grid->UpdateDataPtr("testFilteredQ", testFilteredQ);    //! Flow field variables after test filtering.
+        grid->UpdateDataPtr("testFilteredTemperature", testFilteredTemperature);    //! Temperature after test filtering.
+        grid->UpdateDataPtr("testFilteredStrainRateTensor", testFilteredStrainRateTensor);    //! Strain rate tensor after test filtering.
+        grid->UpdateDataPtr("testFilteredRhoUiUj", testFilteredRhoUiUj);    //! rhoUiUj after test filtering.
+        grid->UpdateDataPtr("testFilteredRhoUT", testFilteredRhoUT);    //! rhoUT after test filtering.
+        grid->UpdateDataPtr("testFilteredAlphaIJ", testFilteredAlphaIJ);
+        grid->UpdateDataPtr("betaIJ", betaIJ);
+        grid->UpdateDataPtr("gradT", gradT);    //! Temperature gradient.
+        grid->UpdateDataPtr("testFilteredGradT", testFilteredGradT);    //! Temperature gradient after test filtering.
+        grid->UpdateDataPtr("testFilteredRhoStrainRateMagnitudeGradT", testFilteredRhoStrainRateMagnitudeGradT);    //! rho|S|gradT after test filtering.
+    }
+
+    Init(grid);
+}
+
+void LESSolverStruct::DeAllocateGlobalVar(Grid *gridIn)
+{
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble3D *cellLengthScale = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("cellLengthScale"));
+    RDouble3D *wallFunction = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("wallFunction"));
+    delete cellLengthScale;
+    delete wallFunction;
+
+    RDouble3D *anisotropicConstant = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("anisotropicConstant"));
+    RDouble3D *isotropicConstant = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("isotropicConstant"));
+    RDouble3D *turbulentPrandtlNumber = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("turbulentPrandtlNumber"));
+    RDouble4D *strainRateTensor = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("strainRateTensor"));
+
+    delete isotropicConstant;
+    delete anisotropicConstant;
+    delete turbulentPrandtlNumber;
+    delete strainRateTensor;
+
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+    if (isFVMOrFDM == FD_METHOD)
+    {
+        delete UVWTproxy;
+        delete UVWTfaceIproxy;
+        delete UVWTfaceJproxy;
+        delete UVWTfaceKproxy;
+    }
+
+    int subgridScaleModel = parameters->GetSubgridScaleModel();
+    if (subgridScaleModel == 2 || subgridScaleModel == 4)
+    { 
+        RDouble4D *leonardStress = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("leonardStress"));
+        RDouble4D *modeledStress = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("modeledStress"));
+        RDouble4D *leonardTemperatureFlux = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("leonardTemperatureFlux"));
+        RDouble4D *modeledTemperatureFlux = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("modeledTemperatureFlux"));
+        RDouble4D *testFilteredQ = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredQ"));
+        RDouble3D *testFilteredTemperature = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("testFilteredTemperature"));
+        RDouble4D *testFilteredStrainRateTensor = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredStrainRateTensor"));
+        RDouble4D *testFilteredRhoUiUj = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredRhoUiUj"));
+        RDouble4D *testFilteredRhoUT = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredRhoUT"));
+        RDouble4D *testFilteredAlphaIJ = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredAlphaIJ"));
+        RDouble4D *betaIJ = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("betaIJ"));
+        RDouble4D *gradT = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradT"));
+        RDouble4D *testFilteredGradT = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredGradT"));
+        RDouble4D *testFilteredRhoStrainRateMagnitudeGradT = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredRhoStrainRateMagnitudeGradT"));
+
+        delete leonardStress;
+        delete modeledStress;
+        delete leonardTemperatureFlux;
+        delete modeledTemperatureFlux;
+        delete testFilteredQ;
+        delete testFilteredTemperature;
+        delete testFilteredStrainRateTensor;
+        delete testFilteredRhoUiUj;
+        delete testFilteredRhoUT;
+        delete testFilteredAlphaIJ;
+        delete betaIJ;
+        delete gradT;
+        delete testFilteredGradT;
+        delete testFilteredRhoStrainRateMagnitudeGradT;
+    }
+}
+
+LIB_EXPORT void LESSolverStruct::InitControlParameters()
+{
+    FreeControlParameters();
+    controlParameters = new Param_LESSolverStruct();
+    controlParameters->Init();
+}
+
+LIB_EXPORT Param_LESSolverStruct * LESSolverStruct::GetControlParameters()
+{
+    return static_cast<Param_LESSolverStruct *> (controlParameters);
+}
+
+bool LESSolverStruct::JudgeIfRestart()
+{
+    string turbFile = ".\results\turb.dat";
+    GlobalDataBase::GetData("turbfile", &turbFile, PHSTRING, 1);
+
+    if (PHMPI::IsParallelRun())
+    {
+        turbFile = PHSPACE::AddSymbolToFileName(turbFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(turbFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+bool LESSolverStruct::JudgeIfReadAverage()
+{
+    string turbFile = ".\results\turb.dat";
+    GlobalDataBase::GetData("turbfile", &turbFile, PHSTRING, 1);
+    string averageTurbFile = AddSymbolToFileName(turbFile, "_", "Average");
+
+    if (PHMPI::IsParallelRun())
+    {
+        averageTurbFile = PHSPACE::AddSymbolToFileName(averageTurbFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(averageTurbFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+void LESSolverStruct::DumpRestartH5(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int currentProcessorID = GetCurrentProcessorID();
+
+    int version = 1;
+    int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    if (currentProcessorID == GetServerProcessorID())
+    {
+        WriteData(actkey->filepos, &version, "Version");
+        WriteData(actkey->filepos, &outIterStep, "outnstep");
+
+        if (IsNeedStatistics())
+        {
+            int nStatisticalStep = 0;
+            GlobalDataBase::GetData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+            WriteData(actkey->filepos, &nStatisticalStep, "nStatisticalStep");
+        }
+    }
+
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    StructGrid *strGrid = StructGridCast(GetGrid(actkey->level));
+    int nTotalCell = strGrid->GetNTotalCell();
+
+    int ist, ied, jst, jed, kst, ked;
+    strGrid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    RDouble3D &viscousTurbulent = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss<<"Group"<<gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    WriteData(grploc, &nTotalCell, "nTotalCell");
+    WriteData(grploc, &viscousTurbulent(ist, jst, kst), "visturb");
+
+    H5Gclose(grploc);
+}
+
+void LESSolverStruct::ReadRestartH5(ActionKey *actkey)
+{
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    StructGrid *strGrid = StructGridCast(GetGrid(actkey->level));
+    int nTotalCell = strGrid->GetNTotalCell();
+
+    int ist, ied, jst, jed, kst, ked;
+    strGrid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    RDouble3D &viscousTurbulent = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    int outIterstepofNS = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int outIterStepofTurb = 0;
+    ReadData(actkey->filepos, &outIterStepofTurb, "outnstep");
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss<<"Group"<<gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    int nTotalCellRestart = 0;
+    ReadData(grploc, &nTotalCellRestart, "nTotalCell");
+    if(nTotalCellRestart != nTotalCell)
+    {
+        ostringstream erroeInfo;
+        erroeInfo << " Error: the cell number in turb.dat is not equal to the cell number in grid file !" << endl;
+        TK_Exit::ExceptionExit(erroeInfo.str());
+    }
+
+    ReadData(grploc, &viscousTurbulent(ist, jst, kst), "visturb");
+
+    H5Gclose(grploc);
+
+    CompareOutStepOfFlowfieldFile(outIterstepofNS, outIterStepofTurb);
+}
+
+void LESSolverStruct::InitFlowAsRestart()
+{
+    Param_LESSolverStruct *parameters = GetControlParameters();
+
+    StructGrid *grid = StructGridCast(GetGrid(0));
+
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &subgridScaleEnergy = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+    RDouble3D &turbulentPrandtlNumber = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("turbulentPrandtlNumber"));
+
+    RDouble freeStreamViscosity = parameters->GetFreeStreamViscosity();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                viscousTurbulence(i, j, k) = freeStreamViscosity;
+
+                subgridScaleEnergy(i, j, k) = 0.0;
+
+                turbulentPrandtlNumber(i, j, k) = 0.9;
+            }
+        }
+    }
+}
+
+void LESSolverStruct::Init(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    ComputeCellLengthScale(grid);
+}
+
+void LESSolverStruct::UploadInterfaceData(ActionKey *actkey)
+{
+    UploadInterfaceValue(actkey);
+}
+
+void LESSolverStruct::UploadInterfaceValue(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = reinterpret_cast<StructGrid *> (GetGrid(level));
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo)
+    {
+        return;
+    }
+
+    RDouble3D *viscousTurbulence = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    PHSPACE::UploadInterfaceValue(grid, viscousTurbulence, "vist");
+
+    RDouble3D *subgridScaleEnergy = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+    PHSPACE::UploadInterfaceValue(grid, subgridScaleEnergy, "subgridScaleEnergy");
+
+    RDouble3D *turbulentPrandtlNumber = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("turbulentPrandtlNumber"));
+    PHSPACE::UploadInterfaceValue(grid, turbulentPrandtlNumber, "turbulentPrandtlNumber");
+}
+
+void LESSolverStruct::DownloadInterfaceData(ActionKey *actkey)
+{
+    DownloadInterfaceValue(actkey);
+}
+
+void LESSolverStruct::DownloadInterfaceValue(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = reinterpret_cast<StructGrid *> (GetGrid(level));
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo)
+    {
+        return;
+    }
+
+    RDouble3D *viscousTurbulence = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    PHSPACE::DownloadInterfaceValue(grid, viscousTurbulence, "vist");
+
+    RDouble3D *subgridScaleEnergy = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+    PHSPACE::DownloadInterfaceValue(grid, subgridScaleEnergy, "subgridScaleEnergy");
+
+    RDouble3D *turbulentPrandtlNumber = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("turbulentPrandtlNumber"));
+    PHSPACE::DownloadInterfaceValue(grid, turbulentPrandtlNumber, "turbulentPrandtlNumber");
+}
+
+void LESSolverStruct::RotateVectorFromInterface(Grid *gridIn, const int &neighborZoneIndex, const int &nEquation)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+    StructBCSet * structBCSet = finestGrid->GetStructBCSet();
+    RDouble4D &rotNSgradValueX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotNSgradValueX"));
+    RDouble4D &rotNSgradValueY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotNSgradValueY"));
+    RDouble4D &rotNSgradValueZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotNSgradValueZ"));
+
+    rotNSgradValueX = 0.0;
+    rotNSgradValueY = 0.0;
+    rotNSgradValueZ = 0.0;
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+    double rotationAngle        = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+    rotationAngle = rotationAngle*PI/180;
+    if(nEquation > 0)
+    {
+        RDouble4D &fieldRecvNSY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+        RDouble4D &fieldRecvNSZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int iFace = interfaceIndexContainerForReceive[iLocalFace];
+                int it, jt, kt;
+                finestGrid->GetTargetIndexIJK(iFace, iGhostLayer + 1, it, jt, kt);
+                finestGrid->RemapMultigridIJK(level, it, jt, kt);
+                int *ibcregions = structBCSet->GetIFaceInfo();
+                int iBCRegion = ibcregions[iFace];
+                StructBC * bcregion = structBCSet->GetBCRegion(iBCRegion);
+
+                string bcName = bcregion->GetBCName();
+                if (bcName == "Periodic_up")
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        rotNSgradValueY(it, jt, kt, m) = fieldRecvNSY(it, jt, kt, m) * cos(2*PI-rotationAngle) - fieldRecvNSZ(it, jt, kt, m) * sin(2*PI-rotationAngle);
+                        rotNSgradValueZ(it, jt, kt, m) = fieldRecvNSY(it, jt, kt, m) * sin(2*PI-rotationAngle) + fieldRecvNSZ(it, jt, kt, m) * cos(2*PI-rotationAngle);
+                    }
+                }
+                else if(bcName == "Periodic_down")
+                {
+                    for (int m = 0; m < nEquation; ++ m)
+                    {
+                        rotNSgradValueY(it, jt, kt, m) = fieldRecvNSY(it, jt, kt, m) * cos(rotationAngle) - fieldRecvNSZ(it, jt, kt, m) * sin(rotationAngle);
+                        rotNSgradValueZ(it, jt, kt, m) = fieldRecvNSY(it, jt, kt, m) * sin(rotationAngle) + fieldRecvNSZ(it, jt, kt, m) * cos(rotationAngle);
+                    }
+                }
+
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    fieldRecvNSY(it, jt, kt, m) = rotNSgradValueY(it, jt, kt, m);
+                    fieldRecvNSZ(it, jt, kt, m) = rotNSgradValueZ(it, jt, kt, m);
+                }
+            }
+        }
+    }
+}
+
+/*
+void LESSolverStruct::ComputeCellLengthScale(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble3D &cellLengthScale = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("cellLengthScale"));
+
+    RDouble4D &area = *(grid->GetFaceArea());
+    RDouble3D &vol  = *(grid->GetCellVolume());
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int nDim = GetDim();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+    //double areaL[3], areaR[3], delta[3];
+
+    int i, j, k;
+
+    //! inner cells
+    for (k = kst; k <= ked; ++ k)
+    {
+        for (j = jst; j <= jed; ++ j)
+        {
+            for (i = ist; i <= ied; ++ i)
+            {
+                RDouble len3 = 1.0;
+
+                for (int iSurface = 1; iSurface <= nDim; ++iSurface)
+                {
+                    int il1, jl1, kl1;
+                    GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+                    int il = i + il1;
+                    int jl = j + jl1;
+                    int kl = k + kl1;
+
+                    //areaL[iSurface - 1] = area(i, j, k, iSurface);
+                    //areaR[iSurface - 1] = area(il, jl, kl, iSurface);
+                    RDouble areaL = area(i, j, k, iSurface);
+                    RDouble areaR = area(il, jl, kl, iSurface);
+
+                    RDouble volume = vol(i, j, k);
+
+                    //delta[iSurface - 1] = 2.0 * volume / (areaL[iSurface - 1] + areaR[iSurface - 1]);
+                    RDouble delta = 2.0 * volume / (areaL + areaR);
+
+                    len3 = len3 * delta;
+                }
+                
+                cellLengthScale(i, j, k) = pow(len3, third);
+            }
+        }
+    }
+
+    //! ghost cells, for i = 0 and ni;
+    i = 0;
+
+    for (k = kst; k <= ked; ++ k)
+    {
+        for (j = jst; j <= jed; ++ j)
+        {
+            RDouble len3 = 1.0;
+
+            for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+            {
+                int il1, jl1, kl1;
+                GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+                int il = i + il1;
+                int jl = j + jl1;
+                int kl = k + kl1;
+
+                RDouble areaL = area(i, j, k, iSurface);
+                RDouble areaR = area(il, jl, kl, iSurface);
+
+                RDouble volume = vol(i, j, k);
+
+                RDouble delta = 2.0 * volume / (areaL + areaR);
+
+                len3 = len3 * delta;
+            }
+
+            cellLengthScale(i, j, k) = pow(len3, third);
+        }
+    }
+
+    i = ni;
+
+    for (k = kst; k <= ked; ++ k)
+    {
+        for (j = jst; j <= jed; ++ j)
+        {
+            RDouble len3 = 1.0;
+
+            for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+            {
+                int il1, jl1, kl1;
+                GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+                int il = i + il1;
+                int jl = j + jl1;
+                int kl = k + kl1;
+
+                RDouble areaL = area(i, j, k, iSurface);
+                RDouble areaR = area(il, jl, kl, iSurface);
+
+                RDouble volume = vol(i, j, k);
+
+                RDouble delta = 2.0 * volume / (areaL + areaR);
+
+                len3 = len3 * delta;
+            }
+
+            cellLengthScale(i, j, k) = pow(len3, third);
+        }
+    }
+
+    //! ghost cells, for j = 0 and nj;
+    j = 0;
+
+    for (k = kst; k <= ked; ++ k)
+    {
+        for (i = ist; i <= ied; ++ i)
+        {
+            RDouble len3 = 1.0;
+
+            for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+            {
+                int il1, jl1, kl1;
+                GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+                int il = i + il1;
+                int jl = j + jl1;
+                int kl = k + kl1;
+
+                RDouble areaL = area(i, j, k, iSurface);
+                RDouble areaR = area(il, jl, kl, iSurface);
+
+                RDouble volume = vol(i, j, k);
+
+                RDouble delta = 2.0 * volume / (areaL + areaR);
+
+                len3 = len3 * delta;
+            }
+
+            cellLengthScale(i, j, k) = pow(len3, third);
+        }
+    }
+
+    j = nj;
+
+    for (k = kst; k <= ked; ++ k)
+    {
+        for (i = ist; i <= ied; ++ i)
+        {
+            RDouble len3 = 1.0;
+
+            for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+            {
+                int il1, jl1, kl1;
+                GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+                int il = i + il1;
+                int jl = j + jl1;
+                int kl = k + kl1;
+
+                RDouble areaL = area(i, j, k, iSurface);
+                RDouble areaR = area(il, jl, kl, iSurface);
+
+                RDouble volume = vol(i, j, k);
+
+                RDouble delta = 2.0 * volume / (areaL + areaR);
+
+                len3 = len3 * delta;
+            }
+
+            cellLengthScale(i, j, k) = pow(len3, third);
+        }
+    }
+
+    //! ghost cells, for k = 0 and nk;
+    k = 0;
+
+    for (j = jst; j <= jed; ++ j)
+    {
+        for (i = ist; i <= ied; ++ i)
+        {
+            RDouble len3 = 1.0;
+
+            for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+            {
+                int il1, jl1, kl1;
+                GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+                int il = i + il1;
+                int jl = j + jl1;
+                int kl = k + kl1;
+
+                RDouble areaL = area(i, j, k, iSurface);
+                RDouble areaR = area(il, jl, kl, iSurface);
+
+                RDouble volume = vol(i, j, k);
+
+                RDouble delta = 2.0 * volume / (areaL + areaR);
+
+                len3 = len3 * delta;
+            }
+
+            cellLengthScale(i, j, k) = pow(len3, third);
+        }
+    }
+
+    k = nk;
+
+    for (j = jst; j <= jed; ++ j)
+    {
+        for (i = ist; i <= ied; ++ i)
+        {
+            RDouble len3 = 1.0;
+
+            for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+            {
+                int il1, jl1, kl1;
+                GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+                int il = i + il1;
+                int jl = j + jl1;
+                int kl = k + kl1;
+
+                RDouble areaL = area(i, j, k, iSurface);
+                RDouble areaR = area(il, jl, kl, iSurface);
+
+                RDouble volume = vol(i, j, k);
+
+                RDouble delta = 2.0 * volume / (areaL + areaR);
+
+                len3 = len3 * delta;
+            }
+
+            cellLengthScale(i, j, k) = pow(len3, third);
+        }
+    }
+}
+*/
+
+void LESSolverStruct::ComputeCellLengthScale(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble3D &cellLengthScale = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("cellLengthScale"));
+/*
+    RDouble4D &area = *(grid->GetFaceArea());
+    RDouble3D &vol  = *(grid->GetCellVolume());
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int nDim = GetDim();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+    //double areaL[3], areaR[3], delta[3];
+
+    int i, j, k;
+
+    //! inner cells
+    for (k = kst; k <= ked; ++ k)
+    {
+        for (j = jst; j <= jed; ++ j)
+        {
+            for (i = ist; i <= ied; ++ i)
+            {
+                RDouble len3 = 1.0;
+
+                for (int iSurface = 1; iSurface <= nDim; ++iSurface)
+                {
+                    int il1, jl1, kl1;
+                    GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+                    int il = i + il1;
+                    int jl = j + jl1;
+                    int kl = k + kl1;
+
+                    //areaL[iSurface - 1] = area(i, j, k, iSurface);
+                    //areaR[iSurface - 1] = area(il, jl, kl, iSurface);
+                    RDouble areaL = area(i, j, k, iSurface);
+                    RDouble areaR = area(il, jl, kl, iSurface);
+
+                    RDouble volume = vol(i, j, k);
+
+                    //delta[iSurface - 1] = 2.0 * volume / (areaL[iSurface - 1] + areaR[iSurface - 1]);
+                    RDouble delta = 2.0 * volume / (areaL + areaR);
+
+                    len3 = len3 * delta;
+                }
+                
+                cellLengthScale(i, j, k) = pow(len3, third);
+            }
+        }
+    }
+
+    GhostCell3D(cellLengthScale, ni, nj, nk);
+*/
+    RDouble3D *largestLocalGridLength = grid->GetLargestLocalGridLength();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                cellLengthScale(i, j, k) = (*largestLocalGridLength)(i, j, k);
+            }
+        }
+    }
+}
+
+void LESSolverStruct::ComputeWallFunction(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int wallDampingFunctionType = parameters->GetWallDampingFunctionType();
+
+    RDouble3D &wallFunction = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("wallFunction"));
+
+    int iterationStep;
+    int nMGLevel = parameters->GetNMGLevel();        
+    if (nMGLevel <= 1)
+    {
+        //! Finest grid.
+        GlobalDataBase::GetData("outnstep", &iterationStep, PHINT, 1);
+    }
+    else
+    {
+        //! Coarse grid.
+        GlobalDataBase::GetData("newnstep", &iterationStep, PHINT, 1);
+    }
+
+    int cflNstep    = parameters->GetCFLVaryStep();
+    if(iterationStep < cflNstep)
+    {
+        WallFunctionofVanDriest(grid);
+
+        return;
+    }
+
+    if (wallDampingFunctionType == 0)
+    {
+        wallFunction = 1.0;
+    }
+    else if (wallDampingFunctionType == 1)
+    {
+        WallFunctionofVanDriest(grid);
+    }
+    else if (wallDampingFunctionType == 2)
+    {
+        WallFunctionofDXB(grid);
+    }
+    else if (wallDampingFunctionType == 3)
+    {
+        WallFunctionofPiomelli(grid);
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("wallDampingFunctionType", wallDampingFunctionType);
+    }
+}
+
+void LESSolverStruct::WallFunctionofVanDriest(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble3D & wallDistance = * StructGridCast(grid)->GetWallDist();
+
+    RDouble4D & q = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble3D & visl = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+
+    RDouble3D &wallFunction = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("wallFunction"));
+
+    RDouble4D &strainRateTensor = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("strainRateTensor"));
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    RDouble refReNumber = parameters->GetRefReNumber();
+
+    const double kappa = 0.41;
+    const double Ap = 25.0;
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble wallDist = wallDistance(i, j, k);
+
+                RDouble mul = visl(i, j, k);
+
+                RDouble rho = q(i, j, k, IR);
+
+                RDouble strain = strainRateTensor(i, j, k, 0);
+
+                RDouble yplus = strain * (kappa * wallDist) * (kappa * wallDist) * rho / mul * refReNumber;
+
+                RDouble wf = 1.0 - exp(-yplus / Ap);
+                wallFunction(i, j, k) = wf;
+            }
+        }
+    }
+}
+
+void LESSolverStruct::WallFunctionofDXB(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid * grid = StructGridCast(gridIn);
+
+    RDouble3D & wallDistance = * StructGridCast(grid)->GetWallDist();
+
+    RDouble4D & q = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble3D & visl = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+
+    RDouble3D &wallFunction = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("wallFunction"));
+
+    RDouble4D &strainRateTensor = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("strainRateTensor"));
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble rgam = parameters->GetRgam();
+
+    const double kappa = 0.41;
+    const double Ap = 25.0;
+    const double yploge = 1000.0;
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble wallDist = wallDistance(i, j, k);
+
+                RDouble mul = visl(i, j, k);
+
+                RDouble rho = q(i, j, k, IR);
+
+                RDouble strain = strainRateTensor(i, j, k, 0);
+
+                RDouble yplus = strain * (kappa * wallDist) * (kappa * wallDist) * rho / mul * refReNumber;
+
+                RDouble ffd = tanh((yploge/yplus) * (yploge/yplus) * (yploge/yplus));
+                RDouble vanDriestInner = rgam * MIN((1.0 - exp(-pow(yplus/Ap, 7.0/6.0))), (1.0 - exp(-yplus / Ap)));
+                RDouble vanDriestOut = 1.0;
+
+                wallFunction(i, j, k) = vanDriestInner * ffd + vanDriestOut * (1.0 - ffd);
+            }
+        }
+    }
+}
+
+void LESSolverStruct::WallFunctionofPiomelli(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid * grid = StructGridCast(gridIn);
+
+    RDouble3D & wallDistance = * StructGridCast(grid)->GetWallDist();
+
+    RDouble4D & q = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble3D & visl = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+
+    RDouble3D &wallFunction = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("wallFunction"));
+
+    RDouble4D &strainRateTensor = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("strainRateTensor"));
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    RDouble refReNumber = parameters->GetRefReNumber();
+
+    const double kappa = 0.41;
+    const double Ap = 25.0;
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble wallDist = wallDistance(i, j, k);
+
+                RDouble mul = visl(i, j, k);
+
+                RDouble rho = q(i, j, k, IR);
+
+                RDouble strain = strainRateTensor(i, j, k, 0);
+
+                RDouble yplus = strain * (kappa * wallDist) * (kappa * wallDist) * rho / mul * refReNumber;
+
+                wallFunction(i, j, k) = sqrt(1.0 - exp(-(yplus/Ap) * (yplus/Ap) * (yplus/Ap)));
+            }
+        }
+    }
+}
+
+void LESSolverStruct::ComputeViscousCoeff(Grid *gridIn)
+{
+}
+
+void LESSolverStruct::GetDependentVariablesforStructHighOrder(Grid *gridIn)
+{
+    ObtainGradientCellCenterHighOrder(gridIn);
+}
+
+void LESSolverStruct::ComputeGradientCellCenter(Grid *gridIn)
+{
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+    if (isFVMOrFDM == FD_METHOD) return;
+
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &xfv = *(strgrid->GetFaceVectorX());
+    RDouble4D &yfv = *(strgrid->GetFaceVectorY());
+    RDouble4D &zfv = *(strgrid->GetFaceVectorZ());
+    RDouble3D &volume      = *(strgrid->GetCellVolume());
+
+    int ndim = GetDim();
+    int nTemperatureModel = 1;
+
+    RDouble4D &q = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("q"));
+    RDouble4D &temperature = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("t"));
+
+    RDouble4D &dqdx = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &dqdy = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &dqdz = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    dqdx = 0.0;
+    dqdy = 0.0;
+    dqdz = 0.0;
+
+    for (int iSurface = 1; iSurface <= ndim; ++ iSurface)
+    {
+        int il1, jl1, kl1;
+        GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+        int ist = 1;
+        int ied = ni - 1 + il1;
+        int jst = 1;
+        int jed = nj - 1 + jl1;
+        int kst = 1;
+        int ked = nk - 1 + kl1;
+
+        if (ndim == TWO_D)
+        {
+            ked = 1;
+        }
+        int il, jl, kl;
+
+        //! The gradient of u,v,w.
+        for (int m = 0; m < ndim; ++ m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        il = i - il1;
+                        jl = j - jl1;
+                        kl = k - kl1;
+
+                        RDouble phis = q(i,j,k,m+1) + q(il,jl,kl,m+1);
+
+                        RDouble ddx = phis * xfv(i, j, k, iSurface);
+                        RDouble ddy = phis * yfv(i, j, k, iSurface);
+                        RDouble ddz = phis * zfv(i, j, k, iSurface);
+
+                        dqdx(i ,j ,k ,m) -= ddx;
+                        dqdy(i ,j ,k ,m) -= ddy;
+                        dqdz(i ,j ,k ,m) -= ddz;
+
+                        dqdx(il, jl, kl, m) += ddx;
+                        dqdy(il, jl, kl, m) += ddy;
+                        dqdz(il, jl, kl, m) += ddz;
+                    }
+                }
+            }
+        }
+
+        //! The gradient of temperature.
+        for (int m = 0; m < nTemperatureModel; ++ m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        il = i - il1;
+                        jl = j - jl1;
+                        kl = k - kl1;
+
+                        RDouble phis = temperature(i, j, k, m) + temperature(il, jl, kl, m);
+
+                        RDouble ddx = phis * xfv(i, j, k, iSurface);
+                        RDouble ddy = phis * yfv(i, j, k, iSurface);
+                        RDouble ddz = phis * zfv(i, j, k, iSurface);
+
+                        dqdx(i, j, k, m + 3) -= ddx;
+                        dqdy(i, j, k, m + 3) -= ddy;
+                        dqdz(i, j, k, m + 3) -= ddz;
+
+                        dqdx(il, jl, kl, m + 3) += ddx;
+                        dqdy(il, jl, kl, m + 3) += ddy;
+                        dqdz(il, jl, kl, m + 3) += ddz;
+                    }
+                }
+            }
+        }
+    }
+
+    int ist = 1;
+    int ied = ni-1;
+    int jst = 1;
+    int jed = nj-1;
+    int kst = 1;
+    int ked = nk-1;
+
+    if (ndim == TWO_D) ked = 1;
+
+    int nTotalVariable = nTemperatureModel + 3;
+    for (int m = 0; m < nTotalVariable; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble oov = half / volume(i, j, k);
+                    dqdx(i, j, k, m) *= oov;
+                    dqdy(i, j, k, m) *= oov;
+                    dqdz(i, j, k, m) *= oov;
+                }
+            }
+        }
+    }
+}
+
+void LESSolverStruct::ObtainGradientCellCenterHighOrder(Grid *gridIn)
+{
+    StructGrid *strgrid = StructGridCast(gridIn);
+
+    GetUVWTproxy(strgrid);
+
+    int nDim = GetDim();
+    for(int nsurf = 1; nsurf <= nDim; ++nsurf)
+    {
+        GetUVWTfaceproxy(strgrid, nsurf);
+        GetdqdkxietactaCellCenter(strgrid, nsurf);
+    }
+
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &xfv  = *(strgrid->GetFaceVectorX());
+    RDouble4D &yfv  = *(strgrid->GetFaceVectorY());
+    RDouble4D &zfv  = *(strgrid->GetFaceVectorZ());
+    RDouble3D &vol  = *(strgrid->GetCellVolume());  
+
+    RDouble4D &dqdx = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &dqdy = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &dqdz = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterZ"));  
+
+    RDouble4D &dqdkxi = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdkxi"));
+    RDouble4D &dqdeta = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdeta"));
+    RDouble4D &dqdcta = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdcta"));
+
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni - 1;
+    int jed = nj - 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    } 
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble kxix = half * (xfv(i, j, k, 1) + xfv(i + 1, j, k, 1)); 
+                RDouble kxiy = half * (yfv(i, j, k, 1) + yfv(i + 1, j, k, 1));
+                RDouble kxiz = half * (zfv(i, j, k, 1) + zfv(i + 1, j, k, 1));
+
+                RDouble etax = half * (xfv(i, j, k, 2) + xfv(i, j + 1, k, 2)); 
+                RDouble etay = half * (yfv(i, j, k, 2) + yfv(i, j + 1, k, 2));
+                RDouble etaz = half * (zfv(i, j, k, 2) + zfv(i, j + 1, k, 2));
+                for (int m = 0; m <= 3; ++ m)
+                {
+                    dqdx(i, j, k, m) = kxix * dqdkxi(i, j, k, m) + etax * dqdeta(i, j, k, m);
+                    dqdy(i, j, k, m) = kxiy * dqdkxi(i, j, k, m) + etay * dqdeta(i, j, k, m);
+                    dqdz(i, j, k, m) = kxiz * dqdkxi(i, j, k, m) + etaz * dqdeta(i, j, k, m);
+                }
+            }
+        }
+    }
+
+    if (nDim == 3)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble ctax = half * (xfv(i, j, k, 3) + xfv(i, j, k + 1, 3));
+                    RDouble ctay = half * (yfv(i, j, k, 3) + yfv(i, j, k + 1, 3));
+                    RDouble ctaz = half * (zfv(i, j, k, 3) + zfv(i, j, k + 1, 3));
+                    for (int m = 0; m <= 3; ++ m)
+                    {
+                        dqdx(i, j, k, m) += ctax * dqdcta(i, j, k, m);
+                        dqdy(i, j, k, m) += ctay * dqdcta(i, j, k, m);
+                        dqdz(i, j, k, m) += ctaz * dqdcta(i, j, k, m);
+                    }
+                }
+            }
+        }
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int m = 0; m <= 3; ++ m)
+                {
+                    dqdx(i, j, k, m) /= vol(i, j, k);
+                    dqdy(i, j, k, m) /= vol(i, j, k);
+                    dqdz(i, j, k, m) /= vol(i, j, k);
+                }
+            }
+        }
+    }
+
+    GhostCell3D(dqdx, ni, nj, nk, 4);
+    GhostCell3D(dqdy, ni, nj, nk, 4);
+    GhostCell3D(dqdz, ni, nj, nk, 4);
+}
+
+void LESSolverStruct::GetUVWTproxy(Grid *gridIn)
+{
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &q = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("q_FD"));
+    RDouble4D &t = *reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("t_FD"));
+    RDouble4D &UVWT = UVWTproxy->GetField_STR();
+
+    int ist = - 3;
+    int jst = - 3;
+    int kst = - 3;
+    int ied = ni + 3;
+    int jed = nj + 3;
+    int ked = nk + 3;
+    
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                UVWT(i, j, k, 0) = q(i, j, k, 1);
+                UVWT(i, j, k, 1) = q(i, j, k, 2);
+                UVWT(i, j, k, 2) = q(i, j, k, 3);
+                UVWT(i, j, k, 3) = t(i, j, k, 0);
+            }
+        }
+    }
+}
+
+void LESSolverStruct::GetUVWTfaceproxy(Grid *gridIn, int nsurf)
+{
+    string highordersolvername = GlobalDataBase::GetStrParaFromDB("str_highorder_solver");
+    if(highordersolvername.substr(0, 4) == "HDCS")
+    {
+        GetUVWTfaceproxy_HDCS(gridIn, nsurf);
+        return;
+    }
+
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &UVWT = UVWTproxy->GetField_STR();
+
+    RDouble4D *UVWTface;
+    Int1D *DiffOrder;
+    if (nsurf == 1)
+    {
+        UVWTface = &(UVWTfaceIproxy->GetField_STR());
+        DiffOrder = strgrid->DiscretePrecisionKXI;
+    }
+    else if (nsurf == 2)
+    {
+        UVWTface = &(UVWTfaceJproxy->GetField_STR());
+        DiffOrder = strgrid->DiscretePrecisionETA;
+    }
+    else
+    {
+        UVWTface = &(UVWTfaceKproxy->GetField_STR());
+        DiffOrder = strgrid->DiscretePrecisionCTA;
+    }
+    
+    int il1, jl1, kl1;
+    GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+    int ist = 1 - il1;
+    int jst = 1 - jl1;
+    int kst = 1 - kl1;
+    int ied = ni - 1 + 2*il1;
+    int jed = nj - 1 + 2*jl1;
+    int ked = nk - 1 + 2*kl1;    
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int localcellID = i * il1 + j * jl1 + k * kl1;
+                
+                if((*DiffOrder)(localcellID) == 2 || (*DiffOrder)(localcellID - 1) == 2)
+                {
+                    for (int m = 0; m <= 3; ++m)
+                    {                    
+                        RDouble b = UVWT(i - il1,   j - jl1,   k - kl1,   m);
+                        RDouble c = UVWT(i,         j,         k,         m);
+                        (*UVWTface)(i, j, k, m) = half * (b + c);
+                    }
+                }
+                else
+                {
+                    for (int m = 0; m <= 3; ++m)
+                    {                    
+                        RDouble a = UVWT(i - il1*2, j - jl1*2, k - kl1*2, m);
+                        RDouble b = UVWT(i - il1,   j - jl1,   k - kl1,   m);
+                        RDouble c = UVWT(i,         j,         k,         m);
+                        RDouble d = UVWT(i + il1,   j + jl1,   k + kl1,   m);
+                        (*UVWTface)(i, j, k, m) = (- a + 9.0 * b + 9.0 * c - d) / 16.0;
+                    }
+                    if ((*UVWTface)(i, j, k, 3) < SMALL)
+                    {
+                        (*UVWTface)(i, j, k, 3) = half * (UVWT(i - il1, j - jl1, k - kl1,  3) + UVWT(i, j, k, 3));
+                    }
+                }                
+            }
+        }
+    }   
+}
+
+void LESSolverStruct::GetUVWTfaceproxy_HDCS(Grid *gridIn, int nsurf)
+{
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &UVWT = UVWTproxy->GetField_STR();
+
+    RDouble4D *UVWTface;
+    if (nsurf == 1)
+    {
+        UVWTface = &(UVWTfaceIproxy->GetField_STR());
+    }
+    else if (nsurf == 2)
+    {
+        UVWTface = &(UVWTfaceJproxy->GetField_STR());
+    }
+    else
+    {
+        UVWTface = &(UVWTfaceKproxy->GetField_STR());
+    }
+    
+    int il1, jl1, kl1;
+    GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni - 1 + il1;
+    int jed = nj - 1 + jl1;
+    int ked = nk - 1 + kl1;    
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int m = 0; m <= 3; ++m)
+                {
+                    RDouble a = UVWT(i - il1*3, j - jl1*3, k - kl1*3, m);
+                    RDouble b = UVWT(i - il1*2, j - jl1*2, k - kl1*2, m);
+                    RDouble c = UVWT(i - il1,   j - jl1,   k - kl1,   m);
+                    RDouble d = UVWT(i,         j,         k,         m);
+                    RDouble e = UVWT(i + il1,   j + jl1,   k + kl1,   m);
+                    RDouble f = UVWT(i + il1*2, j + jl1*2, k + kl1*2, m);
+                    (*UVWTface)(i, j, k, m) = (150.0 * (c + d) - 25.0 * (b + e) + 3.0 * (a + f)) / 256.0;
+                }
+                if ((*UVWTface)(i, j, k, 3) < SMALL)
+                {
+                    (*UVWTface)(i, j, k, 3) = half * (UVWT(i - il1, j - jl1, k - kl1,  3) + UVWT(i, j, k, 3));
+                }
+            }
+        }
+    }   
+}
+
+void LESSolverStruct::GetdqdkxietactaCellCenter(Grid *gridIn, int nsurf)
+{
+    string highordersolvername = GlobalDataBase::GetStrParaFromDB("str_highorder_solver");
+    if(highordersolvername.substr(0, 4) == "HDCS")
+    {
+        GetdqdkxietactaCellCenter_HDCS(gridIn, nsurf);
+        return;
+    }
+
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D *UVWTface;
+    Int1D *DiffOrder;
+    RDouble4D *dqdkxietacta;
+    if (nsurf == 1)
+    {
+        UVWTface = &(UVWTfaceIproxy->GetField_STR());
+        DiffOrder = strgrid->DiscretePrecisionKXI;
+        dqdkxietacta = &(*reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdkxi")));
+    }
+    else if (nsurf == 2)
+    {
+        UVWTface = &(UVWTfaceJproxy->GetField_STR());
+        DiffOrder = strgrid->DiscretePrecisionETA;
+        dqdkxietacta = &(*reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdeta")));
+    }
+    else
+    {
+        UVWTface = &(UVWTfaceKproxy->GetField_STR());
+        DiffOrder = strgrid->DiscretePrecisionCTA;
+        dqdkxietacta = &(*reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdcta")));
+    }
+
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni - 1;
+    int jed = nj - 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    int il1, jl1, kl1;
+    GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int localcellID = i * il1 + j * jl1 + k * kl1;
+                
+                if((*DiffOrder)(localcellID) == 2)
+                {
+                    for (int m = 0; m <= 3; ++ m)
+                    {
+                        RDouble q1 = (*UVWTface)(i      , j      , k      , m);
+                        RDouble q2 = (*UVWTface)(i + il1, j + jl1, k + kl1, m);
+
+                        (*dqdkxietacta)(i, j, k, m) = q2 - q1;
+                    }
+                }
+                else
+                {
+                    for (int m = 0; m <= 3; ++ m)
+                    {
+                        RDouble q0 = (*UVWTface)(i - il1    , j - jl1    , k - kl1    , m);
+                        RDouble q1 = (*UVWTface)(i          , j          , k          , m);
+                        RDouble q2 = (*UVWTface)(i + il1    , j + jl1    , k + kl1    , m);
+                        RDouble q3 = (*UVWTface)(i + il1 * 2, j + jl1 * 2, k + kl1 * 2, m);
+
+                        (*dqdkxietacta)(i, j, k, m) = (27.0 * (q2 - q1) - (q3 - q0)) / 24.0;
+                    }
+                }
+            }
+        }
+    }   
+}
+
+void LESSolverStruct::GetdqdkxietactaCellCenter_HDCS(Grid *gridIn, int nsurf)
+{
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    const RDouble alfa_sixth =  64.0 / 45.0;
+    const RDouble    a_sixth = - 2.0 / 9.0;
+    const RDouble    b_sixth =   1.0 / 180.0;
+
+    RDouble4D &UVWT = UVWTproxy->GetField_STR();
+    RDouble4D *UVWTface;
+    RDouble4D *dqdkxietacta;
+    if (nsurf == 1)
+    {
+        UVWTface = &(UVWTfaceIproxy->GetField_STR());
+        dqdkxietacta = &(*reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdkxi")));
+    }
+    else if (nsurf == 2)
+    {
+        UVWTface = &(UVWTfaceJproxy->GetField_STR());
+        dqdkxietacta = &(*reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdeta")));
+    }
+    else
+    {
+        UVWTface = &(UVWTfaceKproxy->GetField_STR());
+        dqdkxietacta = &(*reinterpret_cast <RDouble4D *> (strgrid->GetDataPtr("dqdcta")));
+    }
+
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni - 1;
+    int jed = nj - 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    int il1, jl1, kl1;
+    GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int m = 0; m <= 3; ++ m)
+                {
+                    RDouble fL = (*UVWTface)(i          , j          , k          , m);
+                    RDouble fR = (*UVWTface)(i + il1    , j + jl1    , k + kl1    , m);
+
+                    RDouble CL2 = UVWT(i - il1*2, j - jl1*2, k - kl1*2, m);
+                    RDouble CL1 = UVWT(i - il1,   j - jl1,   k - kl1,   m);                    
+                    RDouble CR1 = UVWT(i + il1,   j + jl1,   k + kl1,   m);
+                    RDouble CR2 = UVWT(i + il1*2, j + jl1*2, k + kl1*2, m);
+                    
+                    (*dqdkxietacta)(i, j, k, m) = alfa_sixth * (fR - fL) + a_sixth * (CR1 - CL1) + b_sixth * (CR2 - CL2);
+                }
+            }
+        }
+    }   
+}
+
+void LESSolverStruct::UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy)
+{
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    ObtainViscosity(grid);
+
+    ObtainBoundaryValue(grid);
+}
+
+void LESSolverStruct::ObtainViscosity(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    ComputeStrainRateTensor(grid);
+
+    ComputeWallFunction(grid);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int subgridScaleModel = parameters->GetSubgridScaleModel();
+
+    int iterationStep;
+    int nMGLevel = parameters->GetNMGLevel();        
+    if (nMGLevel <= 1)
+    {
+        //! Finest grid.
+        GlobalDataBase::GetData("outnstep", &iterationStep, PHINT, 1);
+    }
+    else
+    {
+        //! Coarse grid.
+        GlobalDataBase::GetData("newnstep", &iterationStep, PHINT, 1);
+    }
+
+    int cflNstep    = parameters->GetCFLVaryStep();
+
+    if(iterationStep < cflNstep)
+    {
+        Smagorinsky(grid);
+
+        return;
+    }
+
+    if (subgridScaleModel == 1)
+    {
+        Smagorinsky(grid);
+    }
+    else if (subgridScaleModel == 2)
+    {
+        DynamicSmagViscosityCompressibleFD(grid);
+    }
+    else if (subgridScaleModel == 3)
+    {
+        WALE(grid);
+    }
+    else if (subgridScaleModel == 6)
+    {
+        Sigma(grid);
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("subgridScaleModel", subgridScaleModel);
+    }
+}
+
+void LESSolverStruct::Smagorinsky(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble3D &cellLengthScale = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("cellLengthScale"));
+    RDouble3D &wallFunction = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("wallFunction"));
+
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &subgridScaleEnergy = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+    RDouble3D &turbulentPrandtlNumber = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("turbulentPrandtlNumber"));
+
+    RDouble4D &q = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D &strainRateTensor = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("strainRateTensor"));
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+
+    RDouble eddyViscosityLimit = parameters->GetEddyViscosityLimit();
+
+    int monitorVistmax = GlobalDataBase::GetIntParaFromDB("monitor_vistmax");
+
+    RDouble refReNumber  = parameters->GetRefReNumber();
+
+    RDouble smagConstant = parameters->GetSmagConstant();
+
+    RDouble iConstant = parameters->GetIsotropicConstant();
+
+    RDouble viscousTurbulenceMaximum = 0.0;
+    int imax = 1;
+    int jmax = 1;
+    int kmax = 1;
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble deltaBar = cellLengthScale(i, j, k);
+
+                RDouble dampingFunction = wallFunction(i, j, k);
+
+                RDouble rho = ABS(q(i, j, k, IR)) + SMALL;
+
+                RDouble Strain = strainRateTensor(i, j, k, 0);
+
+                RDouble mut = (smagConstant * deltaBar * dampingFunction) * (smagConstant * deltaBar * dampingFunction) * rho * Strain * refReNumber;
+                RDouble kSGS = 2.0 * dampingFunction * dampingFunction * iConstant * rho * Strain * Strain * refReNumber;
+
+                viscousTurbulence(i, j, k) = MIN(eddyViscosityLimit, mut);
+                subgridScaleEnergy(i, j, k) = kSGS;
+
+                if (viscousTurbulenceMaximum < mut)
+                {
+                    viscousTurbulenceMaximum = mut;
+                    imax = i;
+                    jmax = j;
+                    kmax = k;
+                }
+            }
+        }
+    }
+
+    RDouble prandtlTurbulence = parameters->GetPrandtlTurbulence();
+
+    turbulentPrandtlNumber = prandtlTurbulence;
+
+    RDouble vist_max = viscousTurbulenceMaximum;
+    grid->UpdateData("vist_max", &vist_max, PHDOUBLE, 1);
+
+#ifdef PH_PARALLEL
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if (myid == server)
+    {
+#endif
+        if (monitorVistmax)
+        {
+            cout << "vistmax = " << viscousTurbulenceMaximum << " " << imax << " " << jmax << " " << kmax << "\n";
+        }
+#ifdef PH_PARALLEL
+    }
+#endif
+}
+
+void LESSolverStruct::DynamicSmagViscosity(Grid *grid_in)
+{
+    using namespace IDX;
+
+    RDouble u1, u2, u3;
+    RDouble s11, s22, s33, s12, s13, s23;
+    RDouble sij2, smod;
+    RDouble dudx, dudy, dudz;
+    RDouble dvdx, dvdy, dvdz;
+    RDouble dwdx, dwdy, dwdz;
+    RDouble rho, mut, mul;
+
+    RDouble rL11, rL22, rL33, rL12, rL13, rL23;
+    RDouble rM11, rM22, rM33, rM12, rM13, rM23;
+    RDouble tfss, tfsijtfsij;
+
+    StructGrid *grid = StructGridCast(grid_in);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+    int nis1 = ni - 1;
+    int njs1 = nj - 1;
+    int nks1 = nk - 1;
+
+    RFloat4D & q    = * reinterpret_cast<RFloat4D *> (grid->GetDataPtr("q" ));
+    RFloat3D & visl = * reinterpret_cast<RFloat3D *> (grid->GetDataPtr("visl"));
+    RFloat3D & vist = * reinterpret_cast<RFloat3D *> (grid->GetDataPtr("vist"));
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+
+    RDouble refReNumber = parameters->GetRefReNumber();
+
+    RDouble rfwr = parameters->GetTestFilterScale();
+
+    int turbViscousCutType = parameters->GetTurbViscousCutType();
+
+    int *filterDirection = parameters->GetFilterDirection();
+
+    int *averageDirection = parameters->GetAverageDirection();
+
+    Range I(1, ni-1);
+    Range J(1, nj-1);
+    Range K(1, nk-1);
+    if (nk == 1) K.setRange(1, 1);
+
+    int ist, ied, jst, jed, kst, ked;
+    GetIJKRegion(I, J, K, ist, ied, jst, jed, kst, ked);
+
+    Range II(-1, ni+1);
+    Range JJ(-1, nj+1);
+    Range KK(-1, nk+1);
+
+    RFloat3D gradux(II, JJ, KK, fortranArray);
+    RFloat3D graduy(II, JJ, KK, fortranArray);
+    RFloat3D graduz(II, JJ, KK, fortranArray);
+
+    RFloat3D gradvx(II, JJ, KK, fortranArray);
+    RFloat3D gradvy(II, JJ, KK, fortranArray);
+    RFloat3D gradvz(II, JJ, KK, fortranArray);
+
+    RFloat3D gradwx(II, JJ, KK, fortranArray);
+    RFloat3D gradwy(II, JJ, KK, fortranArray);
+    RFloat3D gradwz(II, JJ, KK, fortranArray);
+
+    GradCenter(grid, q, gradux, graduy, graduz, IU);
+    GradCenter(grid, q, gradvx, gradvy, gradvz, IV);
+    GradCenter(grid, q, gradwx, gradwy, gradwz, IW);
+
+    Range III(0, ni);
+    Range JJJ(0, nj);
+    Range KKK(0, nk);
+
+    RFloat3D *tfu1, *tfu2, *tfu3;
+    RFloat3D *tfuifuj11, *tfuifuj22, *tfuifuj33, *tfuifuj12, *tfuifuj13, *tfuifuj23;
+    RFloat3D *tfs11, *tfs22, *tfs33, *tfs12, *tfs13, *tfs23;
+    RFloat3D *tfsfs11, *tfsfs22, *tfsfs33, *tfsfs12, *tfsfs13, *tfsfs23;
+    RFloat3D *rLijMij, *rMijMij;
+    RFloat3D *tfsmod;
+    RFloat3D *rLijMijavg, *rMijMijavg;
+    RFloat3D *cdelta2;
+
+    RFloat1D *fs11, *fs22, *fs33, *fs12, *fs13, *fs23;
+    RFloat1D *fsfs11, *fsfs22, *fsfs33, *fsfs12, *fsfs13, *fsfs23;
+    RFloat1D *fu1, *fu2, *fu3;
+    RFloat1D *fuifuj11, *fuifuj22, *fuifuj33, *fuifuj12, *fuifuj13, *fuifuj23;
+
+    tfu1 = new RFloat3D(III, JJJ, KKK, fortranArray);
+    tfu2 = new RFloat3D(III, JJJ, KKK, fortranArray);
+    tfu3 = new RFloat3D(III, JJJ, KKK, fortranArray);
+
+    tfuifuj11 = new RFloat3D(III, JJJ, KKK, fortranArray);
+    tfuifuj22 = new RFloat3D(III, JJJ, KKK, fortranArray);
+    tfuifuj33 = new RFloat3D(III, JJJ, KKK, fortranArray);
+    tfuifuj12 = new RFloat3D(III, JJJ, KKK, fortranArray);
+    tfuifuj13 = new RFloat3D(III, JJJ, KKK, fortranArray);
+    tfuifuj23 = new RFloat3D(III, JJJ, KKK, fortranArray);
+
+    tfs11 = new RFloat3D(III, JJJ, KKK, fortranArray);
+    tfs22 = new RFloat3D(III, JJJ, KKK, fortranArray);
+    tfs33 = new RFloat3D(III, JJJ, KKK, fortranArray);
+    tfs12 = new RFloat3D(III, JJJ, KKK, fortranArray);
+    tfs13 = new RFloat3D(III, JJJ, KKK, fortranArray);
+    tfs23 = new RFloat3D(III, JJJ, KKK, fortranArray);
+
+    tfsfs11 = new RFloat3D(III, JJJ, KKK, fortranArray);
+    tfsfs22 = new RFloat3D(III, JJJ, KKK, fortranArray);
+    tfsfs33 = new RFloat3D(III, JJJ, KKK, fortranArray);
+    tfsfs12 = new RFloat3D(III, JJJ, KKK, fortranArray);
+    tfsfs13 = new RFloat3D(III, JJJ, KKK, fortranArray);
+    tfsfs23 = new RFloat3D(III, JJJ, KKK, fortranArray);
+
+    rLijMij = new RFloat3D(III, JJJ, KKK, fortranArray);
+    rMijMij = new RFloat3D(III, JJJ, KKK, fortranArray);
+
+    tfsmod = new RFloat3D(III, JJJ, KKK, fortranArray);
+
+    rLijMijavg = new RFloat3D(III, JJJ, KKK, fortranArray);
+    rMijMijavg = new RFloat3D(III, JJJ, KKK, fortranArray);
+
+    cdelta2 = new RFloat3D(III, JJJ, KKK, fortranArray);
+
+    Range IJKMAX (0, MAX(MAX(ni, nj), nk));
+
+    fs11 = new RFloat1D(IJKMAX, fortranArray);
+    fs22 = new RFloat1D(IJKMAX, fortranArray);
+    fs33 = new RFloat1D(IJKMAX, fortranArray);
+    fs12 = new RFloat1D(IJKMAX, fortranArray);
+    fs13 = new RFloat1D(IJKMAX, fortranArray);
+    fs23 = new RFloat1D(IJKMAX, fortranArray);
+    
+    fsfs11 = new RFloat1D(IJKMAX, fortranArray);
+    fsfs22 = new RFloat1D(IJKMAX, fortranArray);
+    fsfs33 = new RFloat1D(IJKMAX, fortranArray);
+    fsfs12 = new RFloat1D(IJKMAX, fortranArray);
+    fsfs13 = new RFloat1D(IJKMAX, fortranArray);
+    fsfs23 = new RFloat1D(IJKMAX, fortranArray);
+
+    fu1 = new RFloat1D(IJKMAX, fortranArray);
+    fu2 = new RFloat1D(IJKMAX, fortranArray);
+    fu3 = new RFloat1D(IJKMAX, fortranArray);
+
+    fuifuj11 = new RFloat1D(IJKMAX, fortranArray);
+    fuifuj22 = new RFloat1D(IJKMAX, fortranArray);
+    fuifuj33 = new RFloat1D(IJKMAX, fortranArray);
+    fuifuj12 = new RFloat1D(IJKMAX, fortranArray);
+    fuifuj13 = new RFloat1D(IJKMAX, fortranArray);
+    fuifuj23 = new RFloat1D(IJKMAX, fortranArray);
+
+    //! Prepare variables to be filtered
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+
+                u1 = q(i, j, k, IU);    //! q(j,k,i,2:4) = F(u(1:3)) --- IMPLICIT Filter!!!!
+                u2 = q(i, j, k, IV);
+                u3 = q(i, j, k, IW);
+
+                dudx = gradux(i, j, k);
+                dudy = graduy(i, j, k);
+                dudz = graduz(i, j, k);
+
+                dvdx = gradvx(i, j, k);
+                dvdy = gradvy(i, j, k);
+                dvdz = gradvz(i, j, k);
+
+                dwdx = gradwx(i, j, k);
+                dwdy = gradwy(i, j, k);
+                dwdz = gradwz(i, j, k);
+
+                s11 = dudx;
+                s22 = dvdy;
+                s33 = dwdz;
+                s12 = half * (dudy + dvdx);
+                s13 = half * (dudz + dwdx);
+                s23 = half * (dvdz + dwdy);
+
+                sij2 = s11 * s11 + s22 * s22 + s33 * s33 + two * (s12 * s12 + s13 * s13 + s23 * s23);
+                smod = sqrt(2.0 * sij2);
+                //! F(ui)
+                (*tfu1)(i, j, k) = u1;
+                (*tfu2)(i, j, k) = u2;
+                (*tfu3)(i, j, k) = u3;
+                //! F(ui)F(uj)
+                (*tfuifuj11)(i, j, k) = u1 * u1;
+                (*tfuifuj22)(i, j, k) = u2 * u2;
+                (*tfuifuj33)(i, j, k) = u3 * u3;
+                (*tfuifuj12)(i, j, k) = u1 * u2;
+                (*tfuifuj13)(i, j, k) = u1 * u3;
+                (*tfuifuj23)(i, j, k) = u2 * u3;
+                //! F(Sij)
+                (*tfs11)(i, j, k) = s11;
+                (*tfs22)(i, j, k) = s22;
+                (*tfs33)(i, j, k) = s33;
+                (*tfs12)(i, j, k) = s12;
+                (*tfs13)(i, j, k) = s13;
+                (*tfs23)(i, j, k) = s23;
+                //! F(|S|)
+                (*tfsmod)(i, j, k) = smod;
+                //! F(|S|)F(Sij)
+                (*tfsfs11)(i, j, k) = smod * s11;
+                (*tfsfs22)(i, j, k) = smod * s22;
+                (*tfsfs33)(i, j, k) = smod * s33;
+                (*tfsfs12)(i, j, k) = smod * s12;
+                (*tfsfs13)(i, j, k) = smod * s13;
+                (*tfsfs23)(i, j, k) = smod * s23;
+            }
+        }
+    }
+
+    RDouble a = (*tfs11)(1, 1, 1);
+    RDouble b = (*tfs22)(1, 1, 1);
+    RDouble c = (*tfs33)(1, 1, 1);
+    RDouble d = (*tfs12)(1, 1, 1);
+    RDouble e = (*tfs13)(1, 1, 1);
+    RDouble f = (*tfs23)(1, 1, 1);
+    RDouble g = (*tfsfs11)(1, 1, 1);
+    RDouble h = (*tfsfs22)(1, 1, 1);
+    RDouble p = (*tfsfs33)(1, 1, 1);
+    RDouble r = (*tfsfs12)(1, 1, 1);
+    RDouble s = (*tfsfs13)(1, 1, 1);
+    
+    //! Get filtered variables in I direction
+    if (filterDirection[0] == 1)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! F(ui)
+                    (*fu1)(i) = (*tfu1)(i, j, k);
+                    (*fu2)(i) = (*tfu2)(i, j, k);
+                    (*fu3)(i) = (*tfu3)(i, j, k);
+                    //! F(ui)F(uj)
+                    (*fuifuj11)(i) = (*tfuifuj11)(i, j, k);
+                    (*fuifuj22)(i) = (*tfuifuj22)(i, j, k);
+                    (*fuifuj33)(i) = (*tfuifuj33)(i, j, k);
+                    (*fuifuj12)(i) = (*tfuifuj12)(i, j, k);
+                    (*fuifuj13)(i) = (*tfuifuj13)(i, j, k);
+                    (*fuifuj23)(i) = (*tfuifuj23)(i, j, k);
+                    //! F(Sij)
+                    (*fs11)(i) = (*tfs11)(i, j, k);
+                    (*fs22)(i) = (*tfs22)(i, j, k);
+                    (*fs33)(i) = (*tfs33)(i, j, k);
+                    (*fs12)(i) = (*tfs12)(i, j, k);
+                    (*fs13)(i) = (*tfs13)(i, j, k);
+                    (*fs23)(i) = (*tfs23)(i, j, k);
+                    //! F(|S|)F(Sij)
+                    (*fsfs11)(i) = (*tfsfs11)(i, j, k);
+                    (*fsfs22)(i) = (*tfsfs22)(i, j, k);
+                    (*fsfs33)(i) = (*tfsfs33)(i, j, k);
+                    (*fsfs12)(i) = (*tfsfs12)(i, j, k);
+                    (*fsfs13)(i) = (*tfsfs13)(i, j, k);
+                    (*fsfs23)(i) = (*tfsfs23)(i, j, k);
+                }
+                //! left boundary:
+                int i0 = 0;
+
+                u1 = q(i0, j, k, IU);
+                u2 = q(i0, j, k, IV);
+                u3 = q(i0, j, k, IW);
+                //! F(ui)
+                (*fu1)(i0) = u1;
+                (*fu2)(i0) = u2;
+                (*fu3)(i0) = u3;
+                //! F(ui)F(uj)
+                (*fuifuj11)(i0) = u1 * u1;
+                (*fuifuj22)(i0) = u2 * u2;
+                (*fuifuj33)(i0) = u3 * u3;
+                (*fuifuj12)(i0) = u1 * u2;
+                (*fuifuj13)(i0) = u1 * u3;
+                (*fuifuj23)(i0) = u2 * u3;
+                //! F(Sij) 
+                (*fs11)(i0) = (*fs11)(1);
+                (*fs22)(i0) = (*fs22)(1);
+                (*fs33)(i0) = (*fs33)(1);
+                (*fs12)(i0) = (*fs12)(1);
+                (*fs13)(i0) = (*fs13)(1);
+                (*fs23)(i0) = (*fs23)(1);
+                //! F(|S|)F(Sij)
+                (*fsfs11)(i0) = (*fsfs11)(1);
+                (*fsfs22)(i0) = (*fsfs22)(1);
+                (*fsfs33)(i0) = (*fsfs33)(1);
+                (*fsfs12)(i0) = (*fsfs12)(1);
+                (*fsfs13)(i0) = (*fsfs13)(1);
+                (*fsfs23)(i0) = (*fsfs23)(1);
+                //! Right boundary:
+                u1 = q(ni, j, k, IU);
+                u2 = q(ni, j, k, IV);
+                u3 = q(ni, j, k, IW);
+                //! F(ui)
+                (*fu1)(ni) = u1;
+                (*fu2)(ni) = u2;
+                (*fu3)(ni) = u3;
+                //! F(ui)F(uj)
+                (*fuifuj11)(ni) = u1 * u1;
+                (*fuifuj22)(ni) = u2 * u2;
+                (*fuifuj33)(ni) = u3 * u3;
+                (*fuifuj12)(ni) = u1 * u2;
+                (*fuifuj13)(ni) = u1 * u3;
+                (*fuifuj23)(ni) = u2 * u3;
+                //! F(Sij) 
+                (*fs11)(ni) = (*fs11)(nis1);
+                (*fs22)(ni) = (*fs22)(nis1);
+                (*fs33)(ni) = (*fs33)(nis1);
+                (*fs12)(ni) = (*fs12)(nis1);
+                (*fs13)(ni) = (*fs13)(nis1);
+                (*fs23)(ni) = (*fs23)(nis1);
+                //! F(|S|)F(Sij)
+                (*fsfs11)(ni) = (*fsfs11)(nis1);
+                (*fsfs22)(ni) = (*fsfs22)(nis1);
+                (*fsfs33)(ni) = (*fsfs33)(nis1);
+                (*fsfs12)(ni) = (*fsfs12)(nis1);
+                (*fsfs13)(ni) = (*fsfs13)(nis1);
+                (*fsfs23)(ni) = (*fsfs23)(nis1);
+                //! Filter
+                filter(ni, fu1, fu2, fu3, fuifuj11, fuifuj22, fuifuj33, fuifuj12, fuifuj13, fuifuj23, fs11, fs22, fs33, fs12, fs13, fs23, fsfs11, fsfs22, fsfs33, fsfs12, fsfs13, fsfs23);
+
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    //! Fill TF(ui)
+                    (*tfu1)(i, j, k) = (*fu1)(i);
+                    (*tfu2)(i, j, k) = (*fu2)(i);
+                    (*tfu3)(i, j, k) = (*fu3)(i);
+                    //! Fill T(F(ui)F(uj))
+                    (*tfuifuj11)(i, j, k) = (*fuifuj11)(i);
+                    (*tfuifuj22)(i, j, k) = (*fuifuj22)(i);
+                    (*tfuifuj33)(i, j, k) = (*fuifuj33)(i);
+                    (*tfuifuj12)(i, j, k) = (*fuifuj12)(i);
+                    (*tfuifuj13)(i, j, k) = (*fuifuj13)(i);
+                    (*tfuifuj23)(i, j, k) = (*fuifuj23)(i);
+                    //! Get T(F(Sij))
+                    (*tfs11)(i, j, k) = (*fs11)(i);
+                    (*tfs22)(i, j, k) = (*fs22)(i);
+                    (*tfs33)(i, j, k) = (*fs33)(i);
+                    (*tfs12)(i, j, k) = (*fs12)(i);
+                    (*tfs13)(i, j, k) = (*fs13)(i);
+                    (*tfs23)(i, j, k) = (*fs23)(i);
+                    //! Get T(F(|S|)F(Sij))
+                    (*tfsfs11)(i, j, k) = (*fsfs11)(i);
+                    (*tfsfs22)(i, j, k) = (*fsfs22)(i);
+                    (*tfsfs33)(i, j, k) = (*fsfs33)(i);
+                    (*tfsfs12)(i, j, k) = (*fsfs12)(i);
+                    (*tfsfs13)(i, j, k) = (*fsfs13)(i);
+                    (*tfsfs23)(i, j, k) = (*fsfs23)(i);
+                }
+            }
+        }
+    } //! filterDirection[0] == 1
+
+    a = (*tfs11)(1, 1, 1);
+    b = (*tfs22)(1, 1, 1);
+    c = (*tfs33)(1, 1, 1);
+    d = (*tfs12)(1, 1, 1);
+    e = (*tfs13)(1, 1, 1);
+    f = (*tfs23)(1, 1, 1);
+    g = (*tfsfs11)(1, 1, 1);
+    h = (*tfsfs22)(1, 1, 1);
+    p = (*tfsfs33)(1, 1, 1);
+    r = (*tfsfs12)(1, 1, 1);
+    s = (*tfsfs13)(1, 1, 1);
+
+// get filtered variables in J direction
+    if (filterDirection[1] == 1) 
+    {
+        for (int i = ist; i <= ied; ++ i)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    //! F(ui)
+                    (*fu1)(j) = (*tfu1)(i, j, k);
+                    (*fu2)(j) = (*tfu2)(i, j, k);
+                    (*fu3)(j) = (*tfu3)(i, j, k);
+                    //! F(ui)F(uj)
+                    (*fuifuj11)(j) = (*tfuifuj11)(i, j, k);
+                    (*fuifuj22)(j) = (*tfuifuj22)(i, j, k);
+                    (*fuifuj33)(j) = (*tfuifuj33)(i, j, k);
+                    (*fuifuj12)(j) = (*tfuifuj12)(i, j, k);
+                    (*fuifuj13)(j) = (*tfuifuj13)(i, j, k);
+                    (*fuifuj23)(j) = (*tfuifuj23)(i, j, k);
+                    //! F(Sij)
+                    (*fs11)(j) = (*tfs11)(i, j, k);
+                    (*fs22)(j) = (*tfs22)(i, j, k);
+                    (*fs33)(j) = (*tfs33)(i, j, k);
+                    (*fs12)(j) = (*tfs12)(i, j, k);
+                    (*fs13)(j) = (*tfs13)(i, j, k);
+                    (*fs23)(j) = (*tfs23)(i, j, k);
+                    //! F(|S|)F(Sij)
+                    (*fsfs11)(j) = (*tfsfs11)(i, j, k);
+                    (*fsfs22)(j) = (*tfsfs22)(i, j, k);
+                    (*fsfs33)(j) = (*tfsfs33)(i, j, k);
+                    (*fsfs12)(j) = (*tfsfs12)(i, j, k);
+                    (*fsfs13)(j) = (*tfsfs13)(i, j, k);
+                    (*fsfs23)(j) = (*tfsfs23)(i, j, k);
+                }
+                //! Left boundary:
+                int j0 = 0;
+
+                u1 = q(i, j0, k, IU);
+                u2 = q(i, j0, k, IV);
+                u3 = q(i, j0, k, IW);
+                //! F(ui)
+                (*fu1)(j0) = u1;
+                (*fu2)(j0) = u2;
+                (*fu3)(j0) = u3;
+                //! F(ui)F(uj)
+                (*fuifuj11)(j0) = u1 * u1;
+                (*fuifuj22)(j0) = u2 * u2;
+                (*fuifuj33)(j0) = u3 * u3;
+                (*fuifuj12)(j0) = u1 * u2;
+                (*fuifuj13)(j0) = u1 * u3;
+                (*fuifuj23)(j0) = u2 * u3;
+                //! F(Sij) 
+                (*fs11)(j0) = (*fs11)(1);
+                (*fs22)(j0) = (*fs22)(1);
+                (*fs33)(j0) = (*fs33)(1);
+                (*fs12)(j0) = (*fs12)(1);
+                (*fs13)(j0) = (*fs13)(1);
+                (*fs23)(j0) = (*fs23)(1);
+                //! F(|S|)F(Sij)
+                (*fsfs11)(j0) = (*fsfs11)(1);
+                (*fsfs22)(j0) = (*fsfs22)(1);
+                (*fsfs33)(j0) = (*fsfs33)(1);
+                (*fsfs12)(j0) = (*fsfs12)(1);
+                (*fsfs13)(j0) = (*fsfs13)(1);
+                (*fsfs23)(j0) = (*fsfs23)(1);
+                //! Right boundary:
+                u1 = q(i, nj, k, IU);
+                u2 = q(i, nj, k, IV);
+                u3 = q(i, nj, k, IW);
+                //! F(ui)
+                (*fu1)(nj) = u1;
+                (*fu2)(nj) = u2;
+                (*fu3)(nj) = u3;
+                //! F(ui)F(uj)
+                (*fuifuj11)(nj) = u1 * u1;
+                (*fuifuj22)(nj) = u2 * u2;
+                (*fuifuj33)(nj) = u3 * u3;
+                (*fuifuj12)(nj) = u1 * u2;
+                (*fuifuj13)(nj) = u1 * u3;
+                (*fuifuj23)(nj) = u2 * u3;
+                //! F(Sij)
+                (*fs11)(nj) = (*fs11)(njs1);
+                (*fs22)(nj) = (*fs22)(njs1);
+                (*fs33)(nj) = (*fs33)(njs1);
+                (*fs12)(nj) = (*fs12)(njs1);
+                (*fs13)(nj) = (*fs13)(njs1);
+                (*fs23)(nj) = (*fs23)(njs1);
+                //! F(|S|)F(Sij)
+                (*fsfs11)(nj) = (*fsfs11)(njs1);
+                (*fsfs22)(nj) = (*fsfs22)(njs1);
+                (*fsfs33)(nj) = (*fsfs33)(njs1);
+                (*fsfs12)(nj) = (*fsfs12)(njs1);
+                (*fsfs13)(nj) = (*fsfs13)(njs1);
+                (*fsfs23)(nj) = (*fsfs23)(njs1);        
+                //! Filter
+                filter(nj, fu1, fu2, fu3, fuifuj11, fuifuj22, fuifuj33, fuifuj12, fuifuj13, fuifuj23, fs11, fs22, fs33, fs12, fs13, fs23, fsfs11, fsfs22, fsfs33, fsfs12, fsfs13, fsfs23);
+
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    //! Fill TF(ui)
+                    (*tfu1)(i,j,k) = (*fu1)(j);
+                    (*tfu2)(i,j,k) = (*fu2)(j);
+                    (*tfu3)(i,j,k) = (*fu3)(j);
+                    //! Fill T(F(ui)F(uj))
+                    (*tfuifuj11)(i,j,k) = (*fuifuj11)(j);
+                    (*tfuifuj22)(i,j,k) = (*fuifuj22)(j);
+                    (*tfuifuj33)(i,j,k) = (*fuifuj33)(j);
+                    (*tfuifuj12)(i,j,k) = (*fuifuj12)(j);
+                    (*tfuifuj13)(i,j,k) = (*fuifuj13)(j);
+                    (*tfuifuj23)(i,j,k) = (*fuifuj23)(j);
+                    //! Get T(F(Sij))
+                    (*tfs11)(i,j,k) = (*fs11)(j);
+                    (*tfs22)(i,j,k) = (*fs22)(j);
+                    (*tfs33)(i,j,k) = (*fs33)(j);
+                    (*tfs12)(i,j,k) = (*fs12)(j);
+                    (*tfs13)(i,j,k) = (*fs13)(j);
+                    (*tfs23)(i,j,k) = (*fs23)(j);
+                    //! Get T(F(|S|)F(Sij))
+                    (*tfsfs11)(i,j,k) = (*fsfs11)(j);
+                    (*tfsfs22)(i,j,k) = (*fsfs22)(j);
+                    (*tfsfs33)(i,j,k) = (*fsfs33)(j);
+                    (*tfsfs12)(i,j,k) = (*fsfs12)(j);
+                    (*tfsfs13)(i,j,k) = (*fsfs13)(j);
+                    (*tfsfs23)(i,j,k) = (*fsfs23)(j);
+                }
+            }
+        }
+
+    } //! filterDirection[1] == 0
+
+    a = (*tfs11)(1, 1, 1);
+    b = (*tfs22)(1, 1, 1);
+    c = (*tfs33)(1, 1, 1);
+    d = (*tfs12)(1, 1, 1);
+    e = (*tfs13)(1, 1, 1);
+    f = (*tfs23)(1, 1, 1);
+    g = (*tfsfs11)(1, 1, 1);
+    h = (*tfsfs22)(1, 1, 1);
+    p = (*tfsfs33)(1, 1, 1);
+    r = (*tfsfs12)(1, 1, 1);
+    s = (*tfsfs13)(1, 1, 1);
+
+    //! Get filtered variables in K direction
+    if (filterDirection[2] == 1) 
+    {
+        for (int i = ist; i <= ied; ++ i)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int k = kst; k <= ked; ++ k)
+                {
+                    //! F(ui)
+                    (*fu1)(k) = (*tfu1)(i,j,k);
+                    (*fu2)(k) = (*tfu2)(i,j,k);
+                    (*fu3)(k) = (*tfu3)(i,j,k);
+                    //! F(ui)F(uj)
+                    (*fuifuj11)(k) = (*tfuifuj11)(i,j,k);
+                    (*fuifuj22)(k) = (*tfuifuj22)(i,j,k);
+                    (*fuifuj33)(k) = (*tfuifuj33)(i,j,k);
+                    (*fuifuj12)(k) = (*tfuifuj12)(i,j,k);
+                    (*fuifuj13)(k) = (*tfuifuj13)(i,j,k);
+                    (*fuifuj23)(k) = (*tfuifuj23)(i,j,k);
+                    //! F(Sij)
+                    (*fs11)(k) = (*tfs11)(i,j,k);
+                    (*fs22)(k) = (*tfs22)(i,j,k);
+                    (*fs33)(k) = (*tfs33)(i,j,k);
+                    (*fs12)(k) = (*tfs12)(i,j,k);
+                    (*fs13)(k) = (*tfs13)(i,j,k);
+                    (*fs23)(k) = (*tfs23)(i,j,k);
+                    //! F(|S|)F(Sij)
+                    (*fsfs11)(k) = (*tfsfs11)(i,j,k);
+                    (*fsfs22)(k) = (*tfsfs22)(i,j,k);
+                    (*fsfs33)(k) = (*tfsfs33)(i,j,k);
+                    (*fsfs12)(k) = (*tfsfs12)(i,j,k);
+                    (*fsfs13)(k) = (*tfsfs13)(i,j,k);
+                    (*fsfs23)(k) = (*tfsfs23)(i,j,k);
+                }
+                //! left boundary:
+                int k0 = 0;
+
+                u1 = q(i,j,k0,IU);
+                u2 = q(i,j,k0,IV);
+                u3 = q(i,j,k0,IW);
+                //! F(ui)
+                (*fu1)(k0) = u1;
+                (*fu2)(k0) = u2;
+                (*fu3)(k0) = u3;
+                //! F(ui)F(uj)
+                (*fuifuj11)(k0) = u1*u1;
+                (*fuifuj22)(k0) = u2*u2;
+                (*fuifuj33)(k0) = u3*u3;
+                (*fuifuj12)(k0) = u1*u2;
+                (*fuifuj13)(k0) = u1*u3;
+                (*fuifuj23)(k0) = u2*u3;
+                //! F(Sij) 
+                (*fs11)(k0) = (*fs11)(1);
+                (*fs22)(k0) = (*fs22)(1);
+                (*fs33)(k0) = (*fs33)(1);
+                (*fs12)(k0) = (*fs12)(1);
+                (*fs13)(k0) = (*fs13)(1);
+                (*fs23)(k0) = (*fs23)(1);
+                //! F(|S|)F(Sij)
+                (*fsfs11)(k0) = (*fsfs11)(1);
+                (*fsfs22)(k0) = (*fsfs22)(1);
+                (*fsfs33)(k0) = (*fsfs33)(1);
+                (*fsfs12)(k0) = (*fsfs12)(1);
+                (*fsfs13)(k0) = (*fsfs13)(1);
+                (*fsfs23)(k0) = (*fsfs23)(1);
+                //! Right boundary:
+                u1 = q(i,j,nk,IU);
+                u2 = q(i,j,nk,IV);
+                u3 = q(i,j,nk,IW);
+                //! F(ui)
+                (*fu1)(nk) = u1;
+                (*fu2)(nk) = u2;
+                (*fu3)(nk) = u3;
+                //! F(ui)F(uj)
+                (*fuifuj11)(nk) = u1*u1;
+                (*fuifuj22)(nk) = u2*u2;
+                (*fuifuj33)(nk) = u3*u3;
+                (*fuifuj12)(nk) = u1*u2;
+                (*fuifuj13)(nk) = u1*u3;
+                (*fuifuj23)(nk) = u2*u3;
+                //! F(Sij)
+                (*fs11)(nk) = (*fs11)(nks1);
+                (*fs22)(nk) = (*fs22)(nks1);
+                (*fs33)(nk) = (*fs33)(nks1);
+                (*fs12)(nk) = (*fs12)(nks1);
+                (*fs13)(nk) = (*fs13)(nks1);
+                (*fs23)(nk) = (*fs23)(nks1);
+                //! F(|S|)F(Sij)
+                (*fsfs11)(nk) = (*fsfs11)(nks1);
+                (*fsfs22)(nk) = (*fsfs22)(nks1);
+                (*fsfs33)(nk) = (*fsfs33)(nks1);
+                (*fsfs12)(nk) = (*fsfs12)(nks1);
+                (*fsfs13)(nk) = (*fsfs13)(nks1);
+                (*fsfs23)(nk) = (*fsfs23)(nks1);        
+                //! Filter
+                filter(nk,fu1,fu2,fu3,fuifuj11,fuifuj22,fuifuj33,fuifuj12,fuifuj13,fuifuj23,fs11,fs22,fs33,fs12,fs13,fs23,fsfs11,fsfs22,fsfs33,fsfs12,fsfs13,fsfs23);
+        
+                for (int k = kst; k <= ked; ++ k)
+                {
+                    //! Fill TF(ui)
+                    (*tfu1)(i,j,k) = (*fu1)(k);
+                    (*tfu2)(i,j,k) = (*fu2)(k);
+                    (*tfu3)(i,j,k) = (*fu3)(k);
+                    //! Fill T(F(ui)F(uj))
+                    (*tfuifuj11)(i,j,k) = (*fuifuj11)(k);
+                    (*tfuifuj22)(i,j,k) = (*fuifuj22)(k);
+                    (*tfuifuj33)(i,j,k) = (*fuifuj33)(k);
+                    (*tfuifuj12)(i,j,k) = (*fuifuj12)(k);
+                    (*tfuifuj13)(i,j,k) = (*fuifuj13)(k);
+                    (*tfuifuj23)(i,j,k) = (*fuifuj23)(k);
+                    //! Get T(F(Sij))
+                    (*tfs11)(i,j,k) = (*fs11)(k);
+                    (*tfs22)(i,j,k) = (*fs22)(k);
+                    (*tfs33)(i,j,k) = (*fs33)(k);
+                    (*tfs12)(i,j,k) = (*fs12)(k);
+                    (*tfs13)(i,j,k) = (*fs13)(k);
+                    (*tfs23)(i,j,k) = (*fs23)(k);
+                    //! Get T(F(|S|)F(Sij))
+                    (*tfsfs11)(i,j,k) = (*fsfs11)(k);
+                    (*tfsfs22)(i,j,k) = (*fsfs22)(k);
+                    (*tfsfs33)(i,j,k) = (*fsfs33)(k);
+                    (*tfsfs12)(i,j,k) = (*fsfs12)(k);
+                    (*tfsfs13)(i,j,k) = (*fsfs13)(k);
+                    (*tfsfs23)(i,j,k) = (*fsfs23)(k);
+                }
+            }
+        }
+
+    } //! filterDirection[2] == 1
+
+    //! Get LijMij, MijMij
+    for (int i = ist; i <= ied; ++ i) 
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                //! Lij = T(F(ui)F(uj)) - TF(ui)*TF(uj)
+                rL11 = (*tfuifuj11)(i,j,k) - (*tfu1)(i,j,k) * (*tfu1)(i,j,k);
+                rL22 = (*tfuifuj22)(i,j,k) - (*tfu2)(i,j,k) * (*tfu2)(i,j,k);
+                rL33 = (*tfuifuj33)(i,j,k) - (*tfu3)(i,j,k) * (*tfu3)(i,j,k);
+                rL12 = (*tfuifuj12)(i,j,k) - (*tfu1)(i,j,k) * (*tfu2)(i,j,k);
+                rL13 = (*tfuifuj13)(i,j,k) - (*tfu1)(i,j,k) * (*tfu3)(i,j,k);
+                rL23 = (*tfuifuj23)(i,j,k) - (*tfu2)(i,j,k) * (*tfu3)(i,j,k);
+                //! Mij = (TF(Detla)/F(Delta))^2*|TF(S)|*T(F(Sij)) -  T(F(|S|)F(Sij))
+                //! TF(|S|)
+                tfsijtfsij = (*tfs11)(i,j,k) * (*tfs11)(i,j,k) 
+                           + (*tfs22)(i,j,k) * (*tfs22)(i,j,k)
+                           + (*tfs33)(i,j,k) * (*tfs33)(i,j,k)
+                           + 2.0*( (*tfs12)(i,j,k) * (*tfs12)(i,j,k)
+                                  + (*tfs13)(i,j,k) * (*tfs13)(i,j,k)
+                                  + (*tfs23)(i,j,k) * (*tfs23)(i,j,k));
+                tfss = sqrt(2.0*tfsijtfsij);
+
+                rM11 = rfwr * rfwr * tfss * (*tfs11)(i,j,k) - (*tfsfs11)(i,j,k);
+                rM22 = rfwr * rfwr * tfss * (*tfs22)(i,j,k) - (*tfsfs22)(i,j,k);
+                rM33 = rfwr * rfwr * tfss * (*tfs33)(i,j,k) - (*tfsfs33)(i,j,k);
+                rM12 = rfwr * rfwr * tfss * (*tfs12)(i,j,k) - (*tfsfs12)(i,j,k);
+                rM13 = rfwr * rfwr * tfss * (*tfs13)(i,j,k) - (*tfsfs13)(i,j,k);
+                rM23 = rfwr * rfwr * tfss * (*tfs23)(i,j,k) - (*tfsfs23)(i,j,k);
+
+                (*rLijMij)(i,j,k) = rL11*rM11 +rL22*rM22 +rL33*rM33
+                                  + 2.0*(rL12*rM12 +rL13*rM13 +rL23*rM23);
+
+                (*rMijMij)(i,j,k) = rM11*rM11 +rM22*rM22 +rM33*rM33
+                                  + 2.0*(rM12*rM12 +rM13*rM13 +rM23*rM23);
+            }
+        }
+    }
+
+    a = (*tfs11)(1, 1, 1);
+    b = (*tfsfs11)(1, 1, 1);
+
+    //! Get <LijMij>, <MijMij> in I direction
+    
+    if ((averageDirection[0] == 0) && (averageDirection[1] == 0) && (averageDirection[2] == 0))
+    {
+        int averageWidth = parameters->GetAverageWidth();
+
+        int naw = averageWidth;
+        //! Boundary points and corner points were averaged only with points inside this block!
+        //! This should be OK, since the foregoing filter operations were executed only on points in this block also!
+        for (int i = ist; i <= ied; ++ i)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int k = kst; k <= ked; ++ k)
+                {
+                    RDouble rLMavg = 0.0;
+                    RDouble rMMavg = 0.0;
+                    int nnavg = 0;
+                    for (int idi = -naw; idi <= naw; ++ idi)
+                    {
+                        for (int idj = -naw; j <= naw; ++ idj)
+                        {
+                            for (int idk = -naw; k <= naw; ++ idk)
+                            {
+                                int ii = i + idi;
+                                int jj = j + idj;
+                                int kk = k + idk;
+                                bool Lvalid = (ii>=1 && ii<=nis1) && (jj>=1 && jj<=njs1) && (kk>=1 && kk<=nks1);
+                                if (Lvalid) 
+                                {
+                                    nnavg = nnavg + 1;
+                                    rLMavg = rLMavg + (*rLijMij)(jj,kk,ii);
+                                    rMMavg = rMMavg + (*rMijMij)(jj,kk,ii);
+                                }
+                            }
+                        }
+                    }
+                    (*rLijMijavg)(i,j,k) = rLMavg/(static_cast<RDouble>(nnavg)+EPSILON);
+                    (*rMijMijavg)(i,j,k) = rMMavg/(static_cast<RDouble>(nnavg) + EPSILON);
+                }
+            }
+        }
+
+        for (int i = ist; i <= ied; ++ i)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int k = kst; k <= ked; ++ k)
+                {
+                    (*rLijMij)(i,j,k) = (*rLijMijavg)(i,j,k);
+                    (*rMijMij)(i,j,k) = (*rMijMijavg)(i,j,k);
+                }
+            }
+        }
+    }
+    else
+    {
+        if (averageDirection[0] != 0)
+        //! Get <LijMij>, <MijMij> in I direction
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int k = kst; k <= ked; ++ k)
+                {
+                    RDouble rLMavg = 0.0;
+                    RDouble rMMavg = 0.0;
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        rLMavg = rLMavg + (*rLijMij)(i,j,k);
+                        rMMavg = rMMavg + (*rMijMij)(i,j,k);
+                    }
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        (*rLijMij)(i,j,k) = rLMavg/nis1;
+                        (*rMijMij)(i,j,k) = rMMavg/nis1;
+                    }
+                }
+            }
+        }
+
+        RDouble lm = (*rLijMij)(1, 1, 1);
+        RDouble mm = (*rMijMij)(1, 1, 1);
+
+        if (averageDirection[1] != 0)
+        //! Get <LijMij>, <MijMij> in J direction
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble rLMavg = 0.0;
+                    RDouble rMMavg = 0.0;
+                    for (int j = ist; j <= jed; ++ j)
+                    {
+                        rLMavg = rLMavg + (*rLijMij)(i,j,k);
+                        rMMavg = rMMavg + (*rMijMij)(i,j,k);
+                    }
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        (*rLijMij)(i,j,k) = rLMavg/njs1;
+                        (*rMijMij)(i,j,k) = rMMavg/njs1;
+                    }
+                }
+            }
+        }
+
+        lm = (*rLijMij)(1, 1, 1);
+        mm = (*rMijMij)(1, 1, 1);
+
+        if (averageDirection[2] != 0)
+        //! Get <LijMij>, <MijMij> in K direction
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    RDouble rLMavg = 0.0;
+                    RDouble rMMavg = 0.0;
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        rLMavg = rLMavg + (*rLijMij)(i,j,k);
+                        rMMavg = rMMavg + (*rMijMij)(i,j,k);
+                    }
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        (*rLijMij)(i,j,k) = rLMavg/nks1;
+                        (*rMijMij)(i,j,k) = rMMavg/nks1;
+                    }
+                }
+            }
+        }
+    }
+
+
+    //! Get cdelta2, get vist(i,j,k)
+
+    int nNegativeCr = 0;
+    int nNegativeMu = 0;
+    int nLowerBoundCr = 0;
+    int nUpperBoundCr = 0;
+
+    for (int i = ist; i <= ied; ++ i)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                RDouble lijmij = (*rLijMij)(i,j,k);
+                RDouble mijmij = (*rMijMij)(i,j,k);
+                RDouble cr = -0.5 * lijmij / mijmij;
+
+                (*cdelta2)(i,j,k) = cr;
+
+                u1 = q(i,j,k,IU);    //! q(j,k,i,2:4) = F(u(1:3)) --- IMPLICIT Filter!!!!
+                u2 = q(i,j,k,IV);
+                u3 = q(i,j,k,IW);
+
+                dudx = gradux(i,j,k);
+                dudy = graduy(i,j,k);
+                dudz = graduz(i,j,k);
+
+                dvdx = gradvx(i,j,k);
+                dvdy = gradvy(i,j,k);
+                dvdz = gradvz(i,j,k);
+
+                dwdx = gradwx(i,j,k);
+                dwdy = gradwy(i,j,k);
+                dwdz = gradwz(i,j,k);
+
+                s11 = dudx;
+                s22 = dvdy;
+                s33 = dwdz;
+                s12 = half * (dudy + dvdx);
+                s13 = half * (dudz + dwdx);
+                s23 = half * (dvdz + dwdy);
+
+                sij2 = s11 * s11 + s22 * s22 + s33 * s33 + two * (s12 * s12 + s13 * s13 + s23 * s23);
+                smod = sqrt(2.0*sij2);
+                rho = q(i,j,k,IR);
+                mul = visl(i,j,k);
+
+                mut = rho * refReNumber * (*cdelta2)(i,j,k) * smod;
+                //! Smagorinsky nut
+
+                if (cr < 0.0)
+                {
+                    nNegativeCr = nNegativeCr + 1;
+                }
+
+                if (cr < -0.01)
+                {
+                    //cr = -0.01;
+                    nLowerBoundCr = nLowerBoundCr + 1;
+                }
+
+                if (cr > 0.5)
+                {
+                    //cr = 0.5;
+                    nUpperBoundCr = nUpperBoundCr + 1;
+                }
+
+                if (mut < -mul)
+                {
+                    nNegativeMu = nNegativeMu + 1;
+                }
+
+                if (turbViscousCutType == 1)
+                {
+                    mut = MAX(mut - mul, 0.0);
+                }
+                else if (turbViscousCutType == 2)
+                {
+                    mut = MAX(mut, 0.0);
+                }
+
+                vist(i,j,k) = mut;
+            }
+        }
+    }
+
+    grid->UpdateData("nNegativeCr", &nNegativeCr, PHINT, 1);
+    grid->UpdateData("nNegativeMu", &nNegativeMu, PHINT, 1);
+
+    int monitorNegativeConstant = GlobalDataBase::GetIntParaFromDB("monitorNegativeConstant");
+
+#ifdef PH_PARALLEL
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if (myid == server)
+    {
+#endif
+        if (monitorNegativeConstant)
+        {
+            RDouble percentNegativeCr = nNegativeCr / static_cast<RDouble> ((ni-1) * (nj-1) * (nk-1));
+            RDouble percentNegativeMu = nNegativeMu / static_cast<RDouble> ((ni-1) * (nj-1) * (nk-1));
+            RDouble percentLowerBoundCr = nLowerBoundCr / static_cast<RDouble> ((ni-1) * (nj-1) * (nk-1));
+            RDouble percentUpperBoundCr = nUpperBoundCr / static_cast<RDouble> ((ni-1) * (nj-1) * (nk-1));
+
+            cout << "percentNegativeCr = " << percentNegativeCr << "\n";
+            //cout << "nNegativeCi = " << nNegativeCi << "\n";
+            //cout << "nNegativePrt = " << nNegativePrt << "\n";
+            cout << "percentNegativeMu = " << percentNegativeMu << "\n";
+            cout << "percentLowerBoundCr = " << percentLowerBoundCr << "\n";
+            cout << "percentUpperBoundCr = " << percentUpperBoundCr << "\n";
+        }
+#ifdef PH_PARALLEL
+    }
+#endif
+
+    delete tfu1      ; delete tfu2      ; delete tfu3;
+    delete tfuifuj11 ; delete tfuifuj22 ; delete tfuifuj33; delete tfuifuj12; delete tfuifuj13; delete tfuifuj23;
+    delete tfs11     ; delete tfs22     ; delete tfs33    ; delete tfs12    ; delete tfs13    ; delete tfs23    ;
+    delete tfsfs11   ; delete tfsfs22   ; delete tfsfs33  ; delete tfsfs12  ; delete tfsfs13  ; delete tfsfs23  ;
+    delete rLijMij   ; delete rMijMij   ;
+    delete tfsmod    ;
+    delete rLijMijavg; delete rMijMijavg;
+    delete cdelta2   ;
+
+    delete fs11      ; delete fs22      ; delete fs33     ; delete fs12     ; delete fs13     ; delete fs23     ;
+    delete fsfs11    ; delete fsfs22    ; delete fsfs33   ; delete fsfs12   ; delete fsfs13   ; delete fsfs23   ;
+    delete fu1       ; delete fu2       ; delete fu3      ;
+    delete fuifuj11  ; delete fuifuj22  ; delete fuifuj33 ; delete fuifuj12 ; delete fuifuj13 ; delete fuifuj23 ;
+}
+
+
+void LESSolverStruct::DynamicSmagViscosityCompressibleOld(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+
+    RDouble refReNumber = parameters->GetRefReNumber();
+
+    int turbViscousCutType = parameters->GetTurbViscousCutType();
+
+    RDouble eddyViscosityLimit = parameters->GetEddyViscosityLimit();
+
+    int monitorVistmax = GlobalDataBase::GetIntParaFromDB("monitor_vistmax");
+
+    int monitorNegativeConstant = GlobalDataBase::GetIntParaFromDB("monitorNegativeConstant");
+
+    int prtCutType = GlobalDataBase::GetIntParaFromDB("prtCutType");
+
+    RDouble oprt = parameters->GetoPrandtlTurbulence();
+
+    RDouble refGama = parameters->GetRefGama();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+
+    RDouble4D &wallFunction = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("wallFunction"));
+
+    RDouble4D &q = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &visl = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+
+    RDouble5D &gradPrimtiveVarFaceXofLES = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("gradPrimtiveVarFaceXofLES"));
+    RDouble5D &gradPrimtiveVarFaceYofLES = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("gradPrimtiveVarFaceYofLES"));
+    RDouble5D &gradPrimtiveVarFaceZofLES = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("gradPrimtiveVarFaceZofLES"));
+
+    RDouble5D &gradtx = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("gradTemperatureFaceXofLES"));
+    RDouble5D &gradty = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("gradTemperatureFaceYofLES"));
+    RDouble5D &gradtz = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("gradTemperatureFaceZofLES"));
+
+    RDouble3D &turbulentPrandtlNumber = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("turbulentPrandtlNumber"));
+    RDouble3D &anisotropicConstant = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("anisotropicConstant"));
+    RDouble3D &isotropicConstant = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("isotropicConstant"));
+
+    RDouble5D &subgridStress = * reinterpret_cast<RDouble5D *> (grid->GetDataPtr("subgridStress"));
+    //RDouble4D &subgridEnergy = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("kSGS"));
+    RDouble5D &subgridHeatFlux = * reinterpret_cast<RDouble5D *> (grid->GetDataPtr("subgridHeatFlux"));
+
+    ComputeAnisotropicConstant(grid);
+
+    ComputeIsotropicConstant(grid);
+
+    ComputePrandtlNumber(grid);
+
+    double vistmax  = 0.0;
+    double vistmin  = 1.0e30;
+
+    int nNegativeCr = 0;
+    int nLowerBoundCr = 0;
+    int nUpperBoundCr = 0;
+    int nNegativeCi = 0;
+    int nNegativePrt = 0;
+    int nNegativeMu = 0;
+
+    int imax = 1;
+    int jmax = 1;
+    int kmax = 1;
+
+    int imin = 1;
+    int jmin = 1;
+    int kmin = 1;
+
+    int nDim = GetDim();
+
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        int ist, ied, jst, jed, kst, ked;
+        grid->GetFaceIterationIndex(ist, ied, jst, jed, kst, ked, iSurface);
+
+        int il1, jl1, kl1;
+        GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int il = i + il1;
+                    int jl = j + jl1;
+                    int kl = k + kl1;
+
+                    RDouble dudx = gradPrimtiveVarFaceXofLES(il, jl, kl, IU, iSurface);
+                    RDouble dudy = gradPrimtiveVarFaceYofLES(il, jl, kl, IU, iSurface);
+                    RDouble dudz = gradPrimtiveVarFaceZofLES(il, jl, kl, IU, iSurface);
+
+                    RDouble dvdx = gradPrimtiveVarFaceXofLES(il, jl, kl, IV, iSurface);
+                    RDouble dvdy = gradPrimtiveVarFaceYofLES(il, jl, kl, IV, iSurface);
+                    RDouble dvdz = gradPrimtiveVarFaceZofLES(il, jl, kl, IV, iSurface);
+
+                    RDouble dwdx = gradPrimtiveVarFaceXofLES(il, jl, kl, IW, iSurface);
+                    RDouble dwdy = gradPrimtiveVarFaceYofLES(il, jl, kl, IW, iSurface);
+                    RDouble dwdz = gradPrimtiveVarFaceZofLES(il, jl, kl, IW, iSurface);
+
+                    RDouble dtdx = gradtx(il, jl, kl, ITT, iSurface);
+                    RDouble dtdy = gradty(il, jl, kl, ITT, iSurface);
+                    RDouble dtdz = gradtz(il, jl, kl, ITT, iSurface);
+
+                    RDouble s11 = dudx;
+                    RDouble s22 = dvdy;
+                    RDouble s33 = dwdz;
+                    RDouble s12 = half * (dudy + dvdx);
+                    RDouble s13 = half * (dudz + dwdx);
+                    RDouble s23 = half * (dvdz + dwdy);
+
+                    RDouble sijsij = s11 * s11 + s22 * s22 + s33 * s33 + two * (s12 * s12 + s13 * s13 + s23 * s23);
+                    RDouble ss = sqrt(two * sijsij);
+                    RDouble skk = s11 + s22 + s33;
+
+                    RDouble rho = 0.5 * (q(i, j, k, IR) + q(il, jl, kl, IR));
+                    RDouble mul = 0.5 * (visl(i, j, k) + visl(il, jl, kl));
+                    RDouble dampingFunction = wallFunction(il, jl, kl, iSurface);
+
+                    RDouble cr = 0.5 * (anisotropicConstant(il, jl, kl) + anisotropicConstant(i, j, k));
+
+                    if (cr < -0.01)
+                    {
+                        //cr = -0.01;
+                        nLowerBoundCr = nLowerBoundCr + 1;
+                    }
+
+                    /*
+                    if (cr > 0.5)
+                    {
+                        cr = 0.5;
+                        nUpperBoundCr = nUpperBoundCr + 1;
+                    }
+                    */
+
+                    RDouble mut = cr * dampingFunction * dampingFunction * rho * ss * refReNumber;
+
+                    RDouble ci = 0.5 * (isotropicConstant(i, j, k) + isotropicConstant(il, jl, kl));
+                    //ci = MIN(MAX(ci, 0.0), 0.01);
+
+                    RDouble kSGS = 2.0 * ci * dampingFunction * dampingFunction * rho * ss * ss * refReNumber;
+
+                    oprt = 2.0 / (turbulentPrandtlNumber(il, jl, kl) + turbulentPrandtlNumber(i, j, k));
+                    //kSGS = 0.0;
+
+                    RDouble hfxSGS = -mut * specificHeatAtConstantPressure * oprt * dtdx;
+                    RDouble hfySGS = -mut * specificHeatAtConstantPressure * oprt * dtdy;
+                    RDouble hfzSGS = -mut * specificHeatAtConstantPressure * oprt * dtdz;
+
+                    subgridHeatFlux(il, jl, kl, 1, iSurface) = hfxSGS;
+                    subgridHeatFlux(il, jl, kl, 2, iSurface) = hfySGS;
+                    subgridHeatFlux(il, jl, kl, 3, iSurface) = hfzSGS;
+
+                    if (mut < -mul)
+                    {
+                        nNegativeMu = nNegativeMu + 1;
+                    }
+
+                    if (turbViscousCutType == 1)
+                    {
+                        mut = MAX(mut - mul, 0.0);
+                    }
+                    else if (turbViscousCutType == 2)
+                    {
+                        mut = MAX(mut, 0.0);
+                    }
+                    else if (turbViscousCutType == 3)
+                    {
+                        mut = MAX(mut, -mul);
+                    }
+
+                    if (prtCutType == 1)
+                    {
+                        oprt = MAX(oprt, 0.0);
+                    }
+
+                    mut = MIN(eddyViscosityLimit, mut);
+
+                    RDouble txxSGS = -2.0 * mut * (s11 - 1.0/3.0 * skk) + 1.0/3.0 * kSGS;
+                    RDouble tyySGS = -2.0 * mut * (s22 - 1.0/3.0 * skk) + 1.0/3.0 * kSGS;
+                    RDouble tzzSGS = -2.0 * mut * (s33 - 1.0/3.0 * skk) + 1.0/3.0 * kSGS;
+                    RDouble txySGS = -2.0 * mut * s12;
+                    RDouble txzSGS = -2.0 * mut * s13;
+                    RDouble tyzSGS = -2.0 * mut * s23;
+
+                    subgridStress(il, jl, kl, 1, iSurface) = txxSGS;
+                    subgridStress(il, jl, kl, 2, iSurface) = tyySGS;
+                    subgridStress(il, jl, kl, 3, iSurface) = tzzSGS;
+                    subgridStress(il, jl, kl, 4, iSurface) = txySGS;
+                    subgridStress(il, jl, kl, 5, iSurface) = txzSGS;
+                    subgridStress(il, jl, kl, 6, iSurface) = tyzSGS;     
+
+                    if (vistmax < mut)
+                    {
+                        vistmax = mut;
+                        imax = i;
+                        jmax = j;
+                        kmax = k;
+                    }
+
+                    if (vistmin > mut)
+                    {
+                        vistmin = mut;
+                        imin = i;
+                        jmin = j;
+                        kmin = k;
+                    }
+
+                    if (cr < 0.0)
+                    {
+                        nNegativeCr = nNegativeCr + 1;
+                    }
+
+                    if (ci < 0.0)
+                    {
+                        nNegativeCi = nNegativeCi + 1;
+                    }
+
+                    if (oprt < 0.0)
+                    {
+                        nNegativePrt = nNegativePrt + 1;
+                    }
+                }
+            }
+        }
+
+    }
+
+    double vist_max = vistmax;
+    double vist_min = vistmin;
+
+    grid->UpdateData("vist_max", &vist_max, PHDOUBLE, 1);
+    grid->UpdateData("vist_min", &vist_min, PHDOUBLE, 1);
+    grid->UpdateData("nNegativeCr", &nNegativeCr, PHINT, 1);
+    grid->UpdateData("nNegativeCi", &nNegativeCi, PHINT, 1);
+    grid->UpdateData("nNegativePrt", &nNegativePrt, PHINT, 1);
+    grid->UpdateData("nNegativeMu", &nNegativeMu, PHINT, 1);
+    grid->UpdateData("nLowerBoundCr", &nLowerBoundCr, PHINT, 1);
+    grid->UpdateData("nUpperBoundCr", &nUpperBoundCr, PHINT, 1);
+
+#ifdef PH_PARALLEL
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if (myid == server)
+    {
+#endif
+        if (monitorVistmax)
+        {
+            cout << "vistmax = " << vistmax << " " << imax << " " << jmax << " " << kmax << "\n";
+            cout << "vistmin = " << vistmin << " " << imin << " " << jmin << " " << kmin << "\n";
+        }
+
+        if (monitorNegativeConstant)
+        {
+            RDouble percentNegativeCr = nNegativeCr / static_cast<RDouble> (ni * nj * nk * nDim);
+            RDouble percentNegativeMu = nNegativeMu / static_cast<RDouble> (ni * nj * nk * nDim);
+            RDouble percentLowerBoundCr = nLowerBoundCr / static_cast<RDouble> (ni * nj * nk * nDim);
+            RDouble percentUpperBoundCr = nUpperBoundCr / static_cast<RDouble> (ni * nj * nk * nDim);
+
+            cout << "percentNegativeCr = " << percentNegativeCr << "\n";
+            //cout << "nNegativeCi = " << nNegativeCi << "\n";
+            //cout << "nNegativePrt = " << nNegativePrt << "\n";
+            cout << "percentNegativeMu = " << percentNegativeMu << "\n";
+            cout << "percentLowerBoundCr = " << percentLowerBoundCr << "\n";
+            cout << "percentUpperBoundCr = " << percentUpperBoundCr << "\n";
+        }
+#ifdef PH_PARALLEL
+    }
+#endif
+}
+
+void LESSolverStruct::DynamicSmagViscosityCompressible(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int monitorNegativeConstant = GlobalDataBase::GetIntParaFromDB("monitorNegativeConstant");
+
+    RDouble3D &wallFunction = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("wallFunction"));
+
+    RDouble3D &turbulentPrandtlNumber = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("turbulentPrandtlNumber"));
+    RDouble3D &anisotropicConstant = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("anisotropicConstant"));
+    RDouble3D &isotropicConstant = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("isotropicConstant"));
+
+    ComputeAnisotropicConstant(grid);
+
+    ComputeIsotropicConstant(grid);
+
+    ComputePrandtlNumber(grid);
+
+    int nNegativeCr = 0;
+    int nLowerBoundCr = 0;
+    int nUpperBoundCr = 0;
+    int nNegativeCi = 0;
+    int nNegativePrt = 0;
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble dampingFunction = wallFunction(i, j, k);
+
+                RDouble cr = anisotropicConstant(i, j, k);
+
+                RDouble ci = isotropicConstant(i, j, k);
+
+                RDouble prt = turbulentPrandtlNumber(i, j, k);
+
+                if (cr < -0.01)
+                {
+                    //cr = -0.01;
+                    nLowerBoundCr = nLowerBoundCr + 1;
+                }
+
+                if (cr > 0.5)
+                {
+                    //cr = 0.5;
+                    nUpperBoundCr = nUpperBoundCr + 1;
+                }
+
+                if (cr < 0.0)
+                {
+                    nNegativeCr = nNegativeCr + 1;
+                }
+
+                if (ci < 0.0)
+                {
+                    nNegativeCi = nNegativeCi + 1;
+                }
+
+                if (prt < 0.0)
+                {
+                    nNegativePrt = nNegativePrt + 1;
+                }
+
+                anisotropicConstant(i, j, k) = cr * dampingFunction * dampingFunction;
+
+                isotropicConstant(i, j, k) = ci * dampingFunction * dampingFunction;
+
+                //turbulentPrandtlNumber(i, j, k) = prt;
+            }
+        }
+    }
+
+    grid->UpdateData("nNegativeCr", &nNegativeCr, PHINT, 1);
+    grid->UpdateData("nNegativeCi", &nNegativeCi, PHINT, 1);
+    grid->UpdateData("nNegativePrt", &nNegativePrt, PHINT, 1);
+    grid->UpdateData("nLowerBoundCr", &nLowerBoundCr, PHINT, 1);
+    grid->UpdateData("nUpperBoundCr", &nUpperBoundCr, PHINT, 1);
+
+#ifdef PH_PARALLEL
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if (myid == server)
+    {
+#endif
+        if (monitorNegativeConstant)
+        {
+            RDouble percentNegativeCr = nNegativeCr / static_cast<RDouble> ((ni + 1) * (nj + 1) * (nk + 1));
+            RDouble percentLowerBoundCr = nLowerBoundCr / static_cast<RDouble> ((ni + 1) * (nj + 1) * (nk + 1));
+            RDouble percentUpperBoundCr = nUpperBoundCr / static_cast<RDouble> ((ni + 1) * (nj + 1) * (nk + 1));
+
+            cout << "percentNegativeCr = " << percentNegativeCr << "\n";
+            cout << "percentNegativeCi = " << nNegativeCi << "\n";
+            cout << "percentNegativePrt = " << nNegativePrt << "\n";
+            cout << "percentLowerBoundCr = " << percentLowerBoundCr << "\n";
+            cout << "percentUpperBoundCr = " << percentUpperBoundCr << "\n";
+        }
+#ifdef PH_PARALLEL
+    }
+#endif
+}
+
+void LESSolverStruct::DynamicSmagViscosityCompressibleFD(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &q = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+
+    RDouble refReNumber = parameters->GetRefReNumber();
+
+    int monitorNegativeConstant = GlobalDataBase::GetIntParaFromDB("monitorNegativeConstant");
+
+    RDouble3D &visl = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+
+    RDouble3D &wallFunction = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("wallFunction"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &subgridScaleEnergy = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+
+    RDouble3D &turbulentPrandtlNumber = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("turbulentPrandtlNumber"));
+    RDouble3D &anisotropicConstant = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("anisotropicConstant"));
+    RDouble3D &isotropicConstant = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("isotropicConstant"));
+
+    ComputeAnisotropicConstant(grid);
+
+    ComputeIsotropicConstant(grid);
+
+    ComputePrandtlNumber(grid);
+
+    int nNegativeCr = 0;
+    int nLowerBoundCr = 0;
+    int nUpperBoundCr = 0;
+    int nNegativeCi = 0;
+    int nNegativePrt = 0;
+
+    int turbViscousCutType = parameters->GetTurbViscousCutType();
+
+    RDouble viscousTurbulenceMaximum = 0.0;
+    int imax = 1;
+    int jmax = 1;
+    int kmax = 1;
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble cr = anisotropicConstant(i, j, k);
+                RDouble ci = isotropicConstant(i, j, k);
+                RDouble prt = turbulentPrandtlNumber(i, j, k);
+
+                RDouble dampingFunction = wallFunction(i, j, k);
+                //RDouble dampingFunction = 1.0;
+
+                RDouble rho = ABS(q(i, j, k, IR)) + SMALL;
+
+                RDouble dudx = gradUVWTCellCenterX(i, j, k, 0);
+                RDouble dudy = gradUVWTCellCenterY(i, j, k, 0);
+                RDouble dudz = gradUVWTCellCenterZ(i, j, k, 0);
+
+                RDouble dvdx = gradUVWTCellCenterX(i, j, k, 1);
+                RDouble dvdy = gradUVWTCellCenterY(i, j, k, 1);
+                RDouble dvdz = gradUVWTCellCenterZ(i, j, k, 1);
+
+                RDouble dwdx = gradUVWTCellCenterX(i, j, k, 2);
+                RDouble dwdy = gradUVWTCellCenterY(i, j, k, 2);
+                RDouble dwdz = gradUVWTCellCenterZ(i, j, k, 2);
+
+                RDouble s11 = dudx; 
+                RDouble s22 = dvdy; 
+                RDouble s33 = dwdz;
+                RDouble s12 = half * (dudy + dvdx); 
+                RDouble s13 = half * (dudz + dwdx); 
+                RDouble s23 = half * (dvdz + dwdy);
+
+                RDouble sij2 = two * (s11*s11 + s22*s22 + s33*s33 + two * (s12*s12 + s13*s13 + s23*s23));  //! modulus of S.
+                RDouble Strain = sqrt(sij2);
+
+                RDouble mut = dampingFunction * dampingFunction * cr * rho * Strain * refReNumber;
+                RDouble kSGS = 2.0 * dampingFunction * dampingFunction * ci * rho * Strain * Strain * refReNumber;
+
+                RDouble mul = visl(i, j, k);
+                if (turbViscousCutType == 1)
+                {
+                    mut = MAX(mut - mul, 0.0);
+                    kSGS = 0.0;
+                    prt = 0.9;
+                }
+                else if (turbViscousCutType == 2)
+                {
+                    mut = MAX(mut, 0.0);
+                    kSGS = 0.0;
+                    prt = 0.9;
+                }
+                else if (turbViscousCutType == 3)
+                {
+                    mut = MAX(mut, -mul);
+                    kSGS = 0.0;
+                    prt = 0.9;
+                }
+
+                viscousTurbulence(i, j, k) = mut;
+                subgridScaleEnergy(i, j, k) = kSGS;
+                turbulentPrandtlNumber(i, j, k) = prt;
+
+                if (cr < -0.01)
+                {
+                    //cr = -0.01;
+                    nLowerBoundCr = nLowerBoundCr + 1;
+                }
+
+                if (cr > 0.5)
+                {
+                    //cr = 0.5;
+                    nUpperBoundCr = nUpperBoundCr + 1;
+                }
+
+                if (cr < 0.0)
+                {
+                    nNegativeCr = nNegativeCr + 1;
+                }
+
+                if (ci < 0.0)
+                {
+                    nNegativeCi = nNegativeCi + 1;
+                }
+
+                if (prt < 0.0)
+                {
+                    nNegativePrt = nNegativePrt + 1;
+                }
+
+                if (viscousTurbulenceMaximum < mut)
+                {
+                    viscousTurbulenceMaximum = mut;
+                    imax = i;
+                    jmax = j;
+                    kmax = k;
+                }
+            }
+        }
+    }
+
+    grid->UpdateData("nNegativeCr", &nNegativeCr, PHINT, 1);
+    grid->UpdateData("nNegativeCi", &nNegativeCi, PHINT, 1);
+    grid->UpdateData("nNegativePrt", &nNegativePrt, PHINT, 1);
+    grid->UpdateData("nLowerBoundCr", &nLowerBoundCr, PHINT, 1);
+    grid->UpdateData("nUpperBoundCr", &nUpperBoundCr, PHINT, 1);
+
+#ifdef PH_PARALLEL
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if (myid == server)
+    {
+#endif
+        if (monitorNegativeConstant)
+        {
+            RDouble percentNegativeCr = nNegativeCr / static_cast<RDouble> ((ni + 1) * (nj + 1) * (nk + 1));
+            RDouble percentLowerBoundCr = nLowerBoundCr / static_cast<RDouble> ((ni + 1) * (nj + 1) * (nk + 1));
+            RDouble percentUpperBoundCr = nUpperBoundCr / static_cast<RDouble> ((ni + 1) * (nj + 1) * (nk + 1));
+
+            cout << "percentNegativeCr = " << percentNegativeCr << "\n";
+            cout << "percentNegativeCi = " << nNegativeCi << "\n";
+            cout << "percentNegativePrt = " << nNegativePrt << "\n";
+            cout << "percentLowerBoundCr = " << percentLowerBoundCr << "\n";
+            cout << "percentUpperBoundCr = " << percentUpperBoundCr << "\n";
+        }
+#ifdef PH_PARALLEL
+    }
+#endif
+}
+
+void LESSolverStruct::DynamicSmagViscosityIncompressibleOld(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+
+    RDouble refReNumber = parameters->GetRefReNumber();
+
+    int turbViscousCutType = parameters->GetTurbViscousCutType();
+
+    RDouble eddyViscosityLimit = parameters->GetEddyViscosityLimit();
+
+    int monitorVistmax = GlobalDataBase::GetIntParaFromDB("monitor_vistmax");
+
+    int monitorNegativeConstant = GlobalDataBase::GetIntParaFromDB("monitorNegativeConstant");
+
+    int prtCutType = GlobalDataBase::GetIntParaFromDB("prtCutType");
+
+    RDouble oprt = parameters->GetoPrandtlTurbulence();
+
+    RDouble refGama = parameters->GetRefGama();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+
+    RDouble4D &wallFunction = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("wallFunction"));
+
+    RDouble4D &q = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &visl = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+
+    RDouble5D &gradPrimtiveVarFaceXofLES = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("gradPrimtiveVarFaceXofLES"));
+    RDouble5D &gradPrimtiveVarFaceYofLES = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("gradPrimtiveVarFaceYofLES"));
+    RDouble5D &gradPrimtiveVarFaceZofLES = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("gradPrimtiveVarFaceZofLES"));
+
+    RDouble5D &gradtx = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("gradTemperatureFaceXofLES"));
+    RDouble5D &gradty = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("gradTemperatureFaceYofLES"));
+    RDouble5D &gradtz = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("gradTemperatureFaceZofLES"));
+
+    RDouble3D &anisotropicConstant = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("anisotropicConstant"));
+    RDouble3D &isotropicConstant = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("isotropicConstant"));
+
+    RDouble5D &subgridStress = * reinterpret_cast<RDouble5D *> (grid->GetDataPtr("subgridStress"));
+    RDouble5D &subgridHeatFlux = * reinterpret_cast<RDouble5D *> (grid->GetDataPtr("subgridHeatFlux"));
+
+    ComputeAnisotropicConstant(grid);
+
+    //ComputePrandtlNumber(grid);
+
+    double vistmax  = 0.0;
+    double vistmin  = 1.0e30;
+
+    int nNegativeCr = 0;
+    int nLowerBoundCr = 0;
+    int nUpperBoundCr = 0;
+    int nNegativeCi = 0;
+    int nNegativePrt = 0;
+    int nNegativeMu = 0;
+
+    int imax = 1;
+    int jmax = 1;
+    int kmax = 1;
+
+    int imin = 1;
+    int jmin = 1;
+    int kmin = 1;
+
+    int nDim = GetDim();
+
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        int ist, ied, jst, jed, kst, ked;
+        grid->GetFaceIterationIndex(ist, ied, jst, jed, kst, ked, iSurface);
+
+        int il1, jl1, kl1;
+        GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int il = i + il1;
+                    int jl = j + jl1;
+                    int kl = k + kl1;
+
+                    RDouble dudx = gradPrimtiveVarFaceXofLES(il, jl, kl, IU, iSurface);
+                    RDouble dudy = gradPrimtiveVarFaceYofLES(il, jl, kl, IU, iSurface);
+                    RDouble dudz = gradPrimtiveVarFaceZofLES(il, jl, kl, IU, iSurface);
+
+                    RDouble dvdx = gradPrimtiveVarFaceXofLES(il, jl, kl, IV, iSurface);
+                    RDouble dvdy = gradPrimtiveVarFaceYofLES(il, jl, kl, IV, iSurface);
+                    RDouble dvdz = gradPrimtiveVarFaceZofLES(il, jl, kl, IV, iSurface);
+
+                    RDouble dwdx = gradPrimtiveVarFaceXofLES(il, jl, kl, IW, iSurface);
+                    RDouble dwdy = gradPrimtiveVarFaceYofLES(il, jl, kl, IW, iSurface);
+                    RDouble dwdz = gradPrimtiveVarFaceZofLES(il, jl, kl, IW, iSurface);
+
+                    RDouble dtdx = gradtx(il, jl, kl, ITT, iSurface);
+                    RDouble dtdy = gradty(il, jl, kl, ITT, iSurface);
+                    RDouble dtdz = gradtz(il, jl, kl, ITT, iSurface);
+
+                    RDouble s11 = dudx;
+                    RDouble s22 = dvdy;
+                    RDouble s33 = dwdz;
+                    RDouble s12 = half * (dudy + dvdx);
+                    RDouble s13 = half * (dudz + dwdx);
+                    RDouble s23 = half * (dvdz + dwdy);
+
+                    RDouble sijsij = s11 * s11 + s22 * s22 + s33 * s33 + two * (s12 * s12 + s13 * s13 + s23 * s23);
+                    RDouble ss = sqrt(two * sijsij);
+
+                    RDouble rho = 0.5 * (q(i, j, k, IR) + q(il, jl, kl, IR));
+                    RDouble mul = 0.5 * (visl(i, j, k) + visl(il, jl, kl));
+                    RDouble dampingFunction = wallFunction(il, jl, kl, iSurface);
+
+                    RDouble cr = 0.5 * (anisotropicConstant(il, jl, kl) + anisotropicConstant(i, j, k));
+
+                    if (cr < -0.01)
+                    {
+                        //cr = -0.01;
+                        nLowerBoundCr = nLowerBoundCr + 1;
+                    }
+
+                    if (cr > 0.5)
+                    {
+                        //cr = 0.5;
+                        nUpperBoundCr = nUpperBoundCr + 1;
+                    }                   
+
+                    RDouble mut = cr * dampingFunction * dampingFunction * rho * ss * refReNumber;
+
+                    RDouble ci = 0.5 * (isotropicConstant(i, j, k) + isotropicConstant(il, jl, kl));
+                    //ci = MIN(MAX(ci, 0.0), 0.01);
+
+                    RDouble kSGS = 2.0 * ci * dampingFunction * dampingFunction * rho * ss * ss * refReNumber;
+
+                    //oprt = 2.0 / (turbulentPrandtlNumber(il, jl, kl) + turbulentPrandtlNumber(i, j, k));
+                    oprt = 1.111111;
+
+                    RDouble hfxSGS = -mut * specificHeatAtConstantPressure * oprt * dtdx;
+                    RDouble hfySGS = -mut * specificHeatAtConstantPressure * oprt * dtdy;
+                    RDouble hfzSGS = -mut * specificHeatAtConstantPressure * oprt * dtdz;
+
+                    subgridHeatFlux(il, jl, kl, 1, iSurface) = hfxSGS;
+                    subgridHeatFlux(il, jl, kl, 2, iSurface) = hfySGS;
+                    subgridHeatFlux(il, jl, kl, 3, iSurface) = hfzSGS;
+
+                    if (mut < -mul)
+                    {
+                        nNegativeMu = nNegativeMu + 1;
+                    }
+
+                    if (turbViscousCutType == 1)
+                    {
+                        mut = MAX(mut - mul, 0.0);
+                    }
+                    else if (turbViscousCutType == 2)
+                    {
+                        mut = MAX(mut, 0.0);
+                    }
+                    else if (turbViscousCutType == 3)
+                    {
+                        mut = MAX(mut, -mul);
+                    }
+
+                    if (prtCutType == 1)
+                    {
+                        oprt = MAX(oprt, 0.0);
+                    }
+
+                    mut = MIN(eddyViscosityLimit, mut);
+
+                    RDouble txxSGS = -2.0 * mut * s11 + 1.0/3.0 * kSGS;
+                    RDouble tyySGS = -2.0 * mut * s22 + 1.0/3.0 * kSGS;
+                    RDouble tzzSGS = -2.0 * mut * s33 + 1.0/3.0 * kSGS;
+                    RDouble txySGS = -2.0 * mut * s12;
+                    RDouble txzSGS = -2.0 * mut * s13;
+                    RDouble tyzSGS = -2.0 * mut * s23;
+
+                    subgridStress(il, jl, kl, 1, iSurface) = txxSGS;
+                    subgridStress(il, jl, kl, 2, iSurface) = tyySGS;
+                    subgridStress(il, jl, kl, 3, iSurface) = tzzSGS;
+                    subgridStress(il, jl, kl, 4, iSurface) = txySGS;
+                    subgridStress(il, jl, kl, 5, iSurface) = txzSGS;
+                    subgridStress(il, jl, kl, 6, iSurface) = tyzSGS;     
+
+                    if (vistmax < mut)
+                    {
+                        vistmax = mut;
+                        imax = i;
+                        jmax = j;
+                        kmax = k;
+                    }
+
+                    if (vistmin > mut)
+                    {
+                        vistmin = mut;
+                        imin = i;
+                        jmin = j;
+                        kmin = k;
+                    }
+
+                    if (cr < 0.0)
+                    {
+                        nNegativeCr = nNegativeCr + 1;
+                    }
+
+                    if (ci < 0.0)
+                    {
+                        nNegativeCi = nNegativeCi + 1;
+                    }
+
+                    if (oprt < 0.0)
+                    {
+                        nNegativePrt = nNegativePrt + 1;
+                    }
+                }
+            }
+        }
+
+    }
+
+    double vist_max = vistmax;
+    double vist_min = vistmin;
+
+    grid->UpdateData("vist_max", &vist_max, PHDOUBLE, 1);
+    grid->UpdateData("vist_min", &vist_min, PHDOUBLE, 1);
+    grid->UpdateData("nNegativeCr", &nNegativeCr, PHINT, 1);
+    grid->UpdateData("nNegativeCi", &nNegativeCi, PHINT, 1);
+    grid->UpdateData("nNegativePrt", &nNegativePrt, PHINT, 1);
+    grid->UpdateData("nNegativeMu", &nNegativeMu, PHINT, 1);
+    grid->UpdateData("nLowerBoundCr", &nLowerBoundCr, PHINT, 1);
+    grid->UpdateData("nUpperBoundCr", &nUpperBoundCr, PHINT, 1);
+
+#ifdef PH_PARALLEL
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if (myid == server)
+    {
+#endif
+        if (monitorVistmax)
+        {
+            cout << "vistmax = " << vistmax << " " << imax << " " << jmax << " " << kmax << "\n";
+            cout << "vistmin = " << vistmin << " " << imin << " " << jmin << " " << kmin << "\n";
+        }
+
+        if (monitorNegativeConstant)
+        {
+            RDouble percentNegativeCr = nNegativeCr / static_cast<RDouble> (ni * nj * nk * nDim);
+            RDouble percentNegativeMu = nNegativeMu / static_cast<RDouble> (ni * nj * nk * nDim);
+            RDouble percentLowerBoundCr = nLowerBoundCr / static_cast<RDouble> (ni * nj * nk * nDim);
+            RDouble percentUpperBoundCr = nUpperBoundCr / static_cast<RDouble> (ni * nj * nk * nDim);
+
+            cout << "percentNegativeCr = " << percentNegativeCr << "\n";
+            //cout << "nNegativeCi = " << nNegativeCi << "\n";
+            //cout << "nNegativePrt = " << nNegativePrt << "\n";
+            cout << "percentNegativeMu = " << percentNegativeMu << "\n";
+            cout << "percentLowerBoundCr = " << percentLowerBoundCr << "\n";
+            cout << "percentUpperBoundCr = " << percentUpperBoundCr << "\n";
+        }
+#ifdef PH_PARALLEL
+    }
+#endif
+}
+
+void LESSolverStruct::DynamicSmagViscosityIncompressible(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+
+    //RDouble refReNumber  = parameters->GetRefReNumber();
+
+    int monitorNegativeConstant = GlobalDataBase::GetIntParaFromDB("monitorNegativeConstant");
+
+    RDouble3D &wallFunction = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("wallFunction"));
+
+    RDouble3D &turbulentPrandtlNumber = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("turbulentPrandtlNumber"));
+    RDouble3D &anisotropicConstant = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("anisotropicConstant"));
+    RDouble3D &isotropicConstant = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("isotropicConstant"));
+
+    ComputeAnisotropicConstant(grid);
+
+    //ComputePrandtlNumber(grid);
+
+    int nNegativeCr = 0;
+    int nLowerBoundCr = 0;
+    int nUpperBoundCr = 0;
+
+    int ist, ied, jst, jed, kst, ked;
+    //grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble dampingFunction = wallFunction(i, j, k);
+
+                RDouble cr = anisotropicConstant(i, j, k);
+
+                if (cr < -0.01)
+                {
+                    //cr = -0.01;
+                    nLowerBoundCr = nLowerBoundCr + 1;
+                }
+
+                if (cr > 0.5)
+                {
+                    //cr = 0.5;
+                    nUpperBoundCr = nUpperBoundCr + 1;
+                }                    
+
+                if (cr < 0.0)
+                {
+                    nNegativeCr = nNegativeCr + 1;
+                }
+
+                anisotropicConstant(i, j, k) = cr * dampingFunction * dampingFunction;
+            }
+        }
+    }
+
+    RDouble prandtlTurbulence = parameters->GetPrandtlTurbulence();
+
+    turbulentPrandtlNumber = prandtlTurbulence;
+
+    isotropicConstant = 0.0;
+
+    grid->UpdateData("nNegativeCr", &nNegativeCr, PHINT, 1);
+    grid->UpdateData("nLowerBoundCr", &nLowerBoundCr, PHINT, 1);
+    grid->UpdateData("nUpperBoundCr", &nUpperBoundCr, PHINT, 1);
+
+#ifdef PH_PARALLEL
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if (myid == server)
+    {
+#endif
+        if (monitorNegativeConstant)
+        {
+            RDouble percentNegativeCr = nNegativeCr / static_cast<RDouble> ((ni + 1) * (nj + 1) * (nk + 1));
+            RDouble percentLowerBoundCr = nLowerBoundCr / static_cast<RDouble> ((ni + 1) * (nj + 1) * (nk + 1));
+            RDouble percentUpperBoundCr = nUpperBoundCr / static_cast<RDouble> ((ni + 1) * (nj + 1) * (nk + 1));
+
+            cout << "percentNegativeCr = " << percentNegativeCr << "\n";
+            cout << "percentLowerBoundCr = " << percentLowerBoundCr << "\n";
+            cout << "percentUpperBoundCr = " << percentUpperBoundCr << "\n";
+        }
+#ifdef PH_PARALLEL
+    }
+#endif
+}
+
+void LESSolverStruct::ComputeTestFilteredQ(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int *filterDirection = parameters->GetFilterDirection();
+
+    RDouble4D &q = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D &testFilteredQ = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredQ"));
+
+    RDouble1D *testFilteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *testFilteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *testFilteredVariableZ = new RDouble1D(K, fortranArray);
+    RDouble1D *filteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *filteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *filteredVariableZ = new RDouble1D(K, fortranArray);
+
+    testFilteredQ(I, J, K, Range(IR, IW)) = q(I, J, K, Range(IR, IW));
+
+    //! Get conservative variables for test filtering
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+    for(int m = IU; m <= IW; ++m)
+    {
+        for(int k = kst; k <= ked; ++k)
+        {
+            for(int j = jst; j <= jed; ++j)
+            {
+                for(int i = ist; i <= ied; ++i)
+                {
+                    RDouble rho = q(i, j, k, IR);
+                    RDouble primitiveVariable = q(i, j, k, m);
+                    testFilteredQ(i, j, k, m) = rho * primitiveVariable;
+                }
+            }
+        }
+    }
+
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+    //! filter Q in I direction
+    if (filterDirection[0] == 1) 
+    {
+        for (int n = 0; n <= 3; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    (*testFilteredVariableX)(I) = testFilteredQ(I, j, k, n);
+                    (*filteredVariableX)(I) = testFilteredQ(I, j, k, n);
+                    TestFilter(ist, ied, testFilteredVariableX, filteredVariableX);
+                    testFilteredQ(I, j, k, n) = (*testFilteredVariableX)(I);
+                }
+            }
+        }
+    }
+
+    //! filter Q in J direction
+    if (filterDirection[1] == 1)
+    {
+        for (int n = 0; n <= 3; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableY)(J) = testFilteredQ(i, J, k, n);
+                    (*filteredVariableY)(J) = testFilteredQ(i, J, k, n);
+                    TestFilter(jst, jed, testFilteredVariableY, filteredVariableY);
+                    testFilteredQ(i, J, k, n) = (*testFilteredVariableY)(J);
+                }
+            }
+        }
+    }
+
+    //! filter Q in K direction
+    if (filterDirection[2] == 1) 
+    {
+        for (int n = 0; n <= 3; ++ n)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableZ)(K) = testFilteredQ(i, j, K, n);
+                    (*filteredVariableZ)(K) = testFilteredQ(i, j, K, n);
+                    TestFilter(kst, ked, testFilteredVariableZ, filteredVariableZ);
+                    testFilteredQ(i, j, K, n) = (*testFilteredVariableZ)(K);
+                }
+            }
+        }
+    }
+
+    //! Recover primitive variables after test filtering
+    for(int m = IU; m <= IW; ++m)
+    {
+        for(int k = kst; k <= ked; ++k)
+        {
+            for(int j = jst; j <= jed; ++j)
+            {
+                for(int i = ist; i <= ied; ++i)
+                {
+                    RDouble rho = testFilteredQ(i, j, k, IR);
+                    RDouble conservativeVariable = testFilteredQ(i, j, k, m);
+                    testFilteredQ(i, j, k, m) = conservativeVariable / rho;
+                }
+            }
+        }
+    }
+
+    delete testFilteredVariableX;
+    delete testFilteredVariableY;
+    delete testFilteredVariableZ;
+    delete filteredVariableX;
+    delete filteredVariableY;
+    delete filteredVariableZ;
+}
+
+void LESSolverStruct::ComputeTestFilteredQFD(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);    
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int *filterDirection = parameters->GetFilterDirection();
+
+    RDouble4D &q = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_FD"));
+
+    RDouble4D &testFilteredQ = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredQ"));
+
+    RDouble1D *testFilteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *testFilteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *testFilteredVariableZ = new RDouble1D(K, fortranArray);
+    RDouble1D *filteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *filteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *filteredVariableZ = new RDouble1D(K, fortranArray);
+
+    testFilteredQ(I, J, K, Range(IR, IW)) = q(I, J, K, Range(IR, IW));
+
+    // !get conservative variables for test filtering
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+    for(int m = IU; m <= IW; ++m)
+    {
+        for(int k = kst; k <= ked; ++k)
+        {
+            for(int j = jst; j <= jed; ++j)
+            {
+                for(int i = ist; i <= ied; ++i)
+                {
+                    RDouble rho = q(i, j, k, IR);
+                    RDouble primitiveVariable = q(i, j, k, m);
+                    testFilteredQ(i, j, k, m) = rho * primitiveVariable;
+                }
+            }
+        }
+    }
+
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+    //! filter Q in I direction
+    if (filterDirection[0] == 1) 
+    {
+        for (int n = 0; n <= 3; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    (*testFilteredVariableX)(I) = testFilteredQ(I, j, k, n);
+                    (*filteredVariableX)(I) = testFilteredQ(I, j, k, n);
+                    TestFilter(ist, ied, testFilteredVariableX, filteredVariableX);
+                    testFilteredQ(I, j, k, n) = (*testFilteredVariableX)(I);
+                }
+            }
+        }
+    }
+
+    //! filter Q in J direction
+    if (filterDirection[1] == 1)
+    {
+        for (int n = 0; n <= 3; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableY)(J) = testFilteredQ(i, J, k, n);
+                    (*filteredVariableY)(J) = testFilteredQ(i, J, k, n);
+                    TestFilter(jst, jed, testFilteredVariableY, filteredVariableY);
+                    testFilteredQ(i, J, k, n) = (*testFilteredVariableY)(J);
+                }
+            }
+        }
+    }
+
+    //! filter Q in K direction
+    if (filterDirection[2] == 1) 
+    {
+        for (int n = 0; n <= 3; ++ n)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableZ)(K) = testFilteredQ(i, j, K, n);
+                    (*filteredVariableZ)(K) = testFilteredQ(i, j, K, n);
+                    TestFilter(kst, ked, testFilteredVariableZ, filteredVariableZ);
+                    testFilteredQ(i, j, K, n) = (*testFilteredVariableZ)(K);
+                }
+            }
+        }
+    }
+
+    //! Recover primitive variables after test filtering
+    for(int m = IU; m <= IW; ++m)
+    {
+        for(int k = kst; k <= ked; ++k)
+        {
+            for(int j = jst; j <= jed; ++j)
+            {
+                for(int i = ist; i <= ied; ++i)
+                {
+                    RDouble rho = testFilteredQ(i, j, k, IR);
+                    RDouble conservativeVariable = testFilteredQ(i, j, k, m);
+                    testFilteredQ(i, j, k, m) = conservativeVariable / rho;
+                }
+            }
+        }
+    }
+
+    delete testFilteredVariableX;
+    delete testFilteredVariableY;
+    delete testFilteredVariableZ;
+    delete filteredVariableX;
+    delete filteredVariableY;
+    delete filteredVariableZ;
+}
+
+/*
+void LESSolverStruct::ComputeTestFilteredDensity(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+    //grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int *filterDirection = parameters->GetFilterDirection();
+
+    RDouble4D &q = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble3D &testFilteredDensity = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("testFilteredDensity"));
+
+    RDouble1D *testFilteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *testFilteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *testFilteredVariableZ = new RDouble1D(K, fortranArray);
+    RDouble1D *filteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *filteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *filteredVariableZ = new RDouble1D(K, fortranArray);
+
+    testFilteredDensity(I, J, K) = q(I, J, K, IR);
+
+    //! filter density in I direction
+    if (filterDirection[0] == 1) 
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                (*testFilteredVariableX)(I) = testFilteredDensity(I, j, k);
+                (*filteredVariableX)(I) = testFilteredDensity(I, j, k);
+                TestFilter(ist, ied, testFilteredVariableX, filteredVariableX);
+                testFilteredDensity(I, j, k) = (*testFilteredVariableX)(I);
+            }
+        }
+    }
+
+    //! filter density in J direction
+    if (filterDirection[1] == 1)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                (*testFilteredVariableY)(J) = testFilteredDensity(i, J, k);
+                (*filteredVariableY)(J) = testFilteredDensity(i, J, k);
+                TestFilter(jst, jed, testFilteredVariableY, filteredVariableY);
+                testFilteredDensity(i, J, k) = (*testFilteredVariableY)(J);
+            }
+        }
+    }
+
+    //! filter density in K direction
+    if (filterDirection[2] == 1)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                (*testFilteredVariableZ)(K) = testFilteredDensity(i, j, K);
+                (*filteredVariableZ)(K) = testFilteredDensity(i, j, K);
+                TestFilter(kst, ked, testFilteredVariableZ, filteredVariableZ);
+                testFilteredDensity(i, j, K) = (*testFilteredVariableZ)(K);
+            }
+        }
+    }
+
+    delete testFilteredVariableX;
+    delete testFilteredVariableY;
+    delete testFilteredVariableZ;
+    delete filteredVariableX;
+    delete filteredVariableY;
+    delete filteredVariableZ;
+}
+*/
+
+void LESSolverStruct::ComputeTestFilteredTemperature(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    //grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int *filterDirection = parameters->GetFilterDirection();
+
+    RDouble4D &temperatures = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble4D &q = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble3D &testFilteredTemperature = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("testFilteredTemperature"));
+    RDouble4D &testFilteredQ = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredQ"));
+
+    RDouble1D *testFilteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *testFilteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *testFilteredVariableZ = new RDouble1D(K, fortranArray);
+    RDouble1D *filteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *filteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *filteredVariableZ = new RDouble1D(K, fortranArray);
+  
+    //! Get conservative variables for test filtering
+    testFilteredTemperature(I, J, K) = temperatures(I, J, K, ITT) * q(I, J, K, IR);
+
+    //! filter temperature in I direction
+    if (filterDirection[0] == 1)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                (*testFilteredVariableX)(I) = testFilteredTemperature(I, j, k);
+                (*filteredVariableX)(I) = testFilteredTemperature(I, j, k);
+                TestFilter(ist, ied, testFilteredVariableX, filteredVariableX);
+                testFilteredTemperature(I, j, k) = (*testFilteredVariableX)(I);
+            }
+        }
+    }
+
+    //! filter temperature in J direction
+    if (filterDirection[1] == 1)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                (*testFilteredVariableY)(J) = testFilteredTemperature(i, J, k);
+                (*filteredVariableY)(J) = testFilteredTemperature(i, J, k);
+                TestFilter(jst, jed, testFilteredVariableY, filteredVariableY);
+                testFilteredTemperature(i, J, k) = (*testFilteredVariableY)(J);
+            }
+        }
+    }
+
+    //! filter temperature in K direction
+    if (filterDirection[2] == 1)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                (*testFilteredVariableZ)(K) = testFilteredTemperature(i, j, K);
+                (*filteredVariableZ)(K) = testFilteredTemperature(i, j, K);
+                TestFilter(kst, ked, testFilteredVariableZ, filteredVariableZ);
+                testFilteredTemperature(i, j, K) = (*testFilteredVariableZ)(K);
+            }
+        }
+    }
+
+    //! Recover primitive variables after test filtering
+    for(int k = kst; k <= ked; ++k)
+    {
+        for(int j = jst; j <= jed; ++j)
+        {
+            for(int i = ist; i <= ied; ++i)
+            {
+                RDouble rho = testFilteredQ(i, j, k, IR);
+                RDouble conservativeVariable = testFilteredQ(i, j, k, IR);
+                testFilteredTemperature(i, j, k) = conservativeVariable / rho;
+            }
+        }
+    }
+
+    delete testFilteredVariableX;
+    delete testFilteredVariableY;
+    delete testFilteredVariableZ;
+    delete filteredVariableX;
+    delete filteredVariableY;
+    delete filteredVariableZ;
+}
+
+void LESSolverStruct::ComputeTestFilteredTemperatureFD(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    //grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int *filterDirection = parameters->GetFilterDirection();
+
+    RDouble4D &temperatures = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("t_FD"));
+    RDouble4D &q = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_FD"));
+
+    RDouble3D &testFilteredTemperature = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("testFilteredTemperature"));
+    RDouble4D &testFilteredQ = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredQ"));
+
+    RDouble1D *testFilteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *testFilteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *testFilteredVariableZ = new RDouble1D(K, fortranArray);
+    RDouble1D *filteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *filteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *filteredVariableZ = new RDouble1D(K, fortranArray);
+  
+    //! Get conservative variables for test filtering
+    testFilteredTemperature(I, J, K) = temperatures(I, J, K, ITT) * q(I, J, K, IR);
+
+    //! filter temperature in I direction
+    if (filterDirection[0] == 1)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                (*testFilteredVariableX)(I) = testFilteredTemperature(I, j, k);
+                (*filteredVariableX)(I) = testFilteredTemperature(I, j, k);
+                TestFilter(ist, ied, testFilteredVariableX, filteredVariableX);
+                testFilteredTemperature(I, j, k) = (*testFilteredVariableX)(I);
+            }
+        }
+    }
+
+    //! filter temperature in J direction
+    if (filterDirection[1] == 1)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                (*testFilteredVariableY)(J) = testFilteredTemperature(i, J, k);
+                (*filteredVariableY)(J) = testFilteredTemperature(i, J, k);
+                TestFilter(jst, jed, testFilteredVariableY, filteredVariableY);
+                testFilteredTemperature(i, J, k) = (*testFilteredVariableY)(J);
+            }
+        }
+    }
+
+    //! filter temperature in K direction
+    if (filterDirection[2] == 1)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                (*testFilteredVariableZ)(K) = testFilteredTemperature(i, j, K);
+                (*filteredVariableZ)(K) = testFilteredTemperature(i, j, K);
+                TestFilter(kst, ked, testFilteredVariableZ, filteredVariableZ);
+                testFilteredTemperature(i, j, K) = (*testFilteredVariableZ)(K);
+            }
+        }
+    }
+
+    //! Recover primitive variables after test filtering
+    for(int k = kst; k <= ked; ++k)
+    {
+        for(int j = jst; j <= jed; ++j)
+        {
+            for(int i = ist; i <= ied; ++i)
+            {
+                RDouble rho = testFilteredQ(i, j, k, IR);
+                RDouble conservativeVariable = testFilteredQ(i, j, k, IR);
+                testFilteredTemperature(i, j, k) = conservativeVariable / rho;
+            }
+        }
+    }
+
+    delete testFilteredVariableX;
+    delete testFilteredVariableY;
+    delete testFilteredVariableZ;
+    delete filteredVariableX;
+    delete filteredVariableY;
+    delete filteredVariableZ;
+}
+
+void LESSolverStruct::ComputeStrainRateTensor(Grid *gridIn)
+{
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int subgridScaleModel = parameters->GetSubgridScaleModel();
+    if(subgridScaleModel == 6)
+    {
+        return;
+    }
+
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+
+    RDouble4D &strainRateTensor = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("strainRateTensor"));
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble dudx = gradUVWTCellCenterX(i, j, k, 0);
+                RDouble dudy = gradUVWTCellCenterY(i, j, k, 0);
+                RDouble dudz = gradUVWTCellCenterZ(i, j, k, 0);
+
+                RDouble dvdx = gradUVWTCellCenterX(i, j, k, 1);
+                RDouble dvdy = gradUVWTCellCenterY(i, j, k, 1);
+                RDouble dvdz = gradUVWTCellCenterZ(i, j, k, 1);
+
+                RDouble dwdx = gradUVWTCellCenterX(i, j, k, 2);
+                RDouble dwdy = gradUVWTCellCenterY(i, j, k, 2);
+                RDouble dwdz = gradUVWTCellCenterZ(i, j, k, 2);
+
+                RDouble s11 = dudx; 
+                RDouble s22 = dvdy; 
+                RDouble s33 = dwdz;
+                RDouble s12 = half * (dudy + dvdx); 
+                RDouble s13 = half * (dudz + dwdx); 
+                RDouble s23 = half * (dvdz + dwdy);
+
+                RDouble s = 2.0 * (s11 * s11 + s22 * s22 + s33 * s33 + 2.0 * (s12 * s12 + s13 * s13 + s23 * s23));
+
+                RDouble omega12 = 0.5 * (dudy - dvdx);
+                RDouble omega13 = 0.5 * (dudz - dwdx);
+                RDouble omega23 = 0.5 * (dvdz - dwdy);
+
+                strainRateTensor(i, j, k, 0) = sqrt(s);
+
+                strainRateTensor(i, j, k, 1) = s11;
+                strainRateTensor(i, j, k, 2) = s22;
+                strainRateTensor(i, j, k, 3) = s33;
+                strainRateTensor(i, j, k, 4) = s12;
+                strainRateTensor(i, j, k, 5) = s13;
+                strainRateTensor(i, j, k, 6) = s23;
+
+                strainRateTensor(i, j, k, 7) = omega12;
+                strainRateTensor(i, j, k, 8) = omega13;
+                strainRateTensor(i, j, k, 9) = omega23;
+
+            }
+        }
+    }
+}
+
+void LESSolverStruct::ComputeGradT(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    RDouble4D &gradT = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradT"));
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    gradT(I, J, K, 0) = gradUVWTCellCenterX(I, J, K, 3);
+    gradT(I, J, K, 1) = gradUVWTCellCenterY(I, J, K, 3);
+    gradT(I, J, K, 2) = gradUVWTCellCenterZ(I, J, K, 3);
+}
+
+void LESSolverStruct::ComputeGradTFD(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    RDouble4D &gradT = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradT"));
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    gradT(I, J, K, 0) = gradUVWTCellCenterX(I, J, K, 3);
+    gradT(I, J, K, 1) = gradUVWTCellCenterY(I, J, K, 3);
+    gradT(I, J, K, 2) = gradUVWTCellCenterZ(I, J, K, 3);
+}
+
+void LESSolverStruct::ComputeTestFilteredStrainRateTensor(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Range N(0, 6);
+
+    int ist, ied, jst, jed, kst, ked;
+    //grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int *filterDirection = parameters->GetFilterDirection();
+
+    RDouble4D &strainRateTensor = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("strainRateTensor"));
+    RDouble4D &testFilteredStrainRateTensor = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredStrainRateTensor"));
+
+    RDouble1D *testFilteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *testFilteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *testFilteredVariableZ = new RDouble1D(K, fortranArray);
+    RDouble1D *filteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *filteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *filteredVariableZ = new RDouble1D(K, fortranArray);
+
+    testFilteredStrainRateTensor(I, J, K, N) = strainRateTensor(I, J, K, N);
+
+    //! filter Sij in I direction
+    if (filterDirection[0] == 1)
+    {
+        for (int n = 1; n <= 6; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    (*testFilteredVariableX)(I) = testFilteredStrainRateTensor(I, j, k, n);
+                    (*filteredVariableX)(I) = testFilteredStrainRateTensor(I, j, k, n);
+                    TestFilter(ist, ied, testFilteredVariableX, filteredVariableX);
+                    testFilteredStrainRateTensor(I, j, k, n) = (*testFilteredVariableX)(I);
+                }
+            }
+        }
+    }
+
+    //! filter Sij in J direction
+    if (filterDirection[1] == 1)
+    {
+        for (int n = 1; n <= 6; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableY)(J) = testFilteredStrainRateTensor(i, J, k, n);
+                    (*filteredVariableY)(J) = testFilteredStrainRateTensor(i, J, k, n);
+                    TestFilter(jst, jed, testFilteredVariableY, filteredVariableY);
+                    testFilteredStrainRateTensor(i, J, k, n) = (*testFilteredVariableY)(J);
+                }
+            }
+        }
+    }
+
+    //! filter Sij in K direction
+    if (filterDirection[2] == 1)
+    {
+        for (int n = 1; n <= 6; ++ n)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableZ)(K) = testFilteredStrainRateTensor(i, j, K, n);
+                    (*filteredVariableZ)(K) = testFilteredStrainRateTensor(i, j, K, n);
+                    TestFilter(kst, ked, testFilteredVariableZ, filteredVariableZ);
+                    testFilteredStrainRateTensor(i, j, K, n) = (*testFilteredVariableZ)(K);
+                }
+            }
+        }
+    }
+
+    //! Compute |S|
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble tFS11 = testFilteredStrainRateTensor(i, j, k, 1);
+                RDouble tFS22 = testFilteredStrainRateTensor(i, j, k, 2);
+                RDouble tFS33 = testFilteredStrainRateTensor(i, j, k, 3);
+                RDouble tFS12 = testFilteredStrainRateTensor(i, j, k, 4);
+                RDouble tFS13 = testFilteredStrainRateTensor(i, j, k, 5);
+                RDouble tFS23 = testFilteredStrainRateTensor(i, j, k, 6);
+
+                RDouble tFS = 2.0 * (tFS11 * tFS11 + tFS22 * tFS22 + tFS33 * tFS33 + 2.0 * (tFS12 * tFS12 + tFS13 * tFS13 + tFS23 * tFS23));
+                testFilteredStrainRateTensor(i, j, k, 0) = sqrt(tFS);
+            }
+        }
+    }
+
+    delete testFilteredVariableX;
+    delete testFilteredVariableY;
+    delete testFilteredVariableZ;
+    delete filteredVariableX;
+    delete filteredVariableY;
+    delete filteredVariableZ;
+}
+
+void LESSolverStruct::ComputeTestFilteredStrainRateTensorFD(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Range N(0, 6);
+
+    int ist, ied, jst, jed, kst, ked;
+    //grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    RDouble4D &testFilteredStrainRateTensor = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredStrainRateTensor"));
+
+    RDouble4D &testFilteredQ = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredQ"));
+
+    RDouble3D gradux(I, J, K, fortranArray);
+    RDouble3D graduy(I, J, K, fortranArray);
+    RDouble3D graduz(I, J, K, fortranArray);
+
+    RDouble3D gradvx(I, J, K, fortranArray);
+    RDouble3D gradvy(I, J, K, fortranArray);
+    RDouble3D gradvz(I, J, K, fortranArray);
+
+    RDouble3D gradwx(I, J, K, fortranArray);
+    RDouble3D gradwy(I, J, K, fortranArray);
+    RDouble3D gradwz(I, J, K, fortranArray);
+
+    GradCenter(grid, testFilteredQ, gradux, graduy, graduz, IU);
+    GradCenter(grid, testFilteredQ, gradvx, gradvy, gradvz, IV);
+    GradCenter(grid, testFilteredQ, gradwx, gradwy, gradwz, IW);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble dudx = gradux(i, j, k);
+                RDouble dudy = graduy(i, j, k);
+                RDouble dudz = graduz(i, j, k);
+
+                RDouble dvdx = gradvx(i, j, k);
+                RDouble dvdy = gradvy(i, j, k);
+                RDouble dvdz = gradvz(i, j, k);
+
+                RDouble dwdx = gradwx(i, j, k);
+                RDouble dwdy = gradwy(i, j, k);
+                RDouble dwdz = gradwz(i, j, k);
+
+                RDouble s11 = dudx; 
+                RDouble s22 = dvdy; 
+                RDouble s33 = dwdz;
+                RDouble s12 = half * (dudy + dvdx); 
+                RDouble s13 = half * (dudz + dwdx); 
+                RDouble s23 = half * (dvdz + dwdy);
+
+                RDouble sij2 = two * (s11*s11 + s22*s22 + s33*s33 + two * (s12*s12 + s13*s13 + s23*s23));  //! modulus of S.
+                RDouble Strain = sqrt(sij2);
+
+                testFilteredStrainRateTensor(i, j, k, 0) = Strain;
+                testFilteredStrainRateTensor(i, j, k, 1) = s11;
+                testFilteredStrainRateTensor(i, j, k, 2) = s22;
+                testFilteredStrainRateTensor(i, j, k, 3) = s33;
+                testFilteredStrainRateTensor(i, j, k, 4) = s12;
+                testFilteredStrainRateTensor(i, j, k, 5) = s13;
+                testFilteredStrainRateTensor(i, j, k, 6) = s23;
+            }
+        }
+    }
+}
+
+void LESSolverStruct::ComputeTestFilteredRhoUiUj(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    //grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();    
+    int *filterDirection = parameters->GetFilterDirection();
+    int subgridScaleModel  = parameters->GetSubgridScaleModel();
+    
+    RDouble4D &q = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    
+    RDouble4D &testFilteredRhoUiUj = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredRhoUiUj"));
+
+    RDouble1D *testFilteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *testFilteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *testFilteredVariableZ = new RDouble1D(K, fortranArray);
+    RDouble1D *filteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *filteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *filteredVariableZ = new RDouble1D(K, fortranArray);
+
+    if (subgridScaleModel == 2)
+    {
+        testFilteredRhoUiUj(I, J, K, 1) = q(I, J, K, IR) * q(I, J, K, IU) * q(I, J, K, IU);
+        testFilteredRhoUiUj(I, J, K, 2) = q(I, J, K, IR) * q(I, J, K, IV) * q(I, J, K, IV);
+        testFilteredRhoUiUj(I, J, K, 3) = q(I, J, K, IR) * q(I, J, K, IW) * q(I, J, K, IW);
+        testFilteredRhoUiUj(I, J, K, 4) = q(I, J, K, IR) * q(I, J, K, IU) * q(I, J, K, IV);
+        testFilteredRhoUiUj(I, J, K, 5) = q(I, J, K, IR) * q(I, J, K, IU) * q(I, J, K, IW);
+        testFilteredRhoUiUj(I, J, K, 6) = q(I, J, K, IR) * q(I, J, K, IV) * q(I, J, K, IW);
+    }
+    else if (subgridScaleModel == 4)
+    {
+        testFilteredRhoUiUj(I, J, K, 1) = q(I, J, K, IU) * q(I, J, K, IU);
+        testFilteredRhoUiUj(I, J, K, 2) = q(I, J, K, IV) * q(I, J, K, IV);
+        testFilteredRhoUiUj(I, J, K, 3) = q(I, J, K, IW) * q(I, J, K, IW);
+        testFilteredRhoUiUj(I, J, K, 4) = q(I, J, K, IU) * q(I, J, K, IV);
+        testFilteredRhoUiUj(I, J, K, 5) = q(I, J, K, IU) * q(I, J, K, IW);
+        testFilteredRhoUiUj(I, J, K, 6) = q(I, J, K, IV) * q(I, J, K, IW);
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("subgridScaleModel", subgridScaleModel);
+    }
+
+    //! filter RhoUiUj in I direction
+    if (filterDirection[0] == 1)
+    {
+        for (int n = 1; n <= 6; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    (*testFilteredVariableX)(I) = testFilteredRhoUiUj(I, j, k, n);
+                    (*filteredVariableX)(I) = testFilteredRhoUiUj(I, j, k, n);
+                    TestFilter(ist, ied, testFilteredVariableX, filteredVariableX);
+                    testFilteredRhoUiUj(I, j, k, n) = (*testFilteredVariableX)(I);
+                }
+            }
+        }
+    }
+
+    //! filter RhoUiUj in J direction
+    if (filterDirection[1] == 1)
+    {
+        for (int n = 1; n <= 6; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableY)(J) = testFilteredRhoUiUj(i, J, k, n);
+                    (*filteredVariableY)(J) = testFilteredRhoUiUj(i, J, k, n);
+                    TestFilter(jst, jed, testFilteredVariableY, filteredVariableY);
+                    testFilteredRhoUiUj(i, J, k, n) = (*testFilteredVariableY)(J);
+                }
+            }
+        }
+    }
+
+    //! filter RhoUiUj in K direction
+    if (filterDirection[2] == 1)
+    {
+        for (int n = 1; n <= 6; ++ n)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableZ)(K) = testFilteredRhoUiUj(i, j, K, n);
+                    (*filteredVariableZ)(K) = testFilteredRhoUiUj(i, j, K, n);                
+                    TestFilter(kst, ked, testFilteredVariableZ, filteredVariableZ);
+                    testFilteredRhoUiUj(i, j, K, n) = (*testFilteredVariableZ)(K);
+                }
+            }
+        }
+    }
+
+    delete testFilteredVariableX;
+    delete testFilteredVariableY;
+    delete testFilteredVariableZ;
+    delete filteredVariableX;
+    delete filteredVariableY;
+    delete filteredVariableZ;
+}
+
+void LESSolverStruct::ComputeTestFilteredRhoUiUjFD(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    //grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();    
+    int *filterDirection = parameters->GetFilterDirection();
+    int subgridScaleModel  = parameters->GetSubgridScaleModel();
+    
+    RDouble4D &q = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_FD"));
+    
+    RDouble4D &testFilteredRhoUiUj = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredRhoUiUj"));
+
+    RDouble1D *testFilteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *testFilteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *testFilteredVariableZ = new RDouble1D(K, fortranArray);
+    RDouble1D *filteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *filteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *filteredVariableZ = new RDouble1D(K, fortranArray);
+
+    if (subgridScaleModel == 2)
+    {
+        testFilteredRhoUiUj(I, J, K, 1) = q(I, J, K, IR) * q(I, J, K, IU) * q(I, J, K, IU);
+        testFilteredRhoUiUj(I, J, K, 2) = q(I, J, K, IR) * q(I, J, K, IV) * q(I, J, K, IV);
+        testFilteredRhoUiUj(I, J, K, 3) = q(I, J, K, IR) * q(I, J, K, IW) * q(I, J, K, IW);
+        testFilteredRhoUiUj(I, J, K, 4) = q(I, J, K, IR) * q(I, J, K, IU) * q(I, J, K, IV);
+        testFilteredRhoUiUj(I, J, K, 5) = q(I, J, K, IR) * q(I, J, K, IU) * q(I, J, K, IW);
+        testFilteredRhoUiUj(I, J, K, 6) = q(I, J, K, IR) * q(I, J, K, IV) * q(I, J, K, IW);
+    }
+    else if (subgridScaleModel == 4)
+    {
+        testFilteredRhoUiUj(I, J, K, 1) = q(I, J, K, IU) * q(I, J, K, IU);
+        testFilteredRhoUiUj(I, J, K, 2) = q(I, J, K, IV) * q(I, J, K, IV);
+        testFilteredRhoUiUj(I, J, K, 3) = q(I, J, K, IW) * q(I, J, K, IW);
+        testFilteredRhoUiUj(I, J, K, 4) = q(I, J, K, IU) * q(I, J, K, IV);
+        testFilteredRhoUiUj(I, J, K, 5) = q(I, J, K, IU) * q(I, J, K, IW);
+        testFilteredRhoUiUj(I, J, K, 6) = q(I, J, K, IV) * q(I, J, K, IW);
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("subgridScaleModel", subgridScaleModel);
+    }
+
+    //! filter RhoUiUj in I direction
+    if (filterDirection[0] == 1)
+    {
+        for (int n = 1; n <= 6; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    (*testFilteredVariableX)(I) = testFilteredRhoUiUj(I, j, k, n);
+                    (*filteredVariableX)(I) = testFilteredRhoUiUj(I, j, k, n);
+                    TestFilter(ist, ied, testFilteredVariableX, filteredVariableX);
+                    testFilteredRhoUiUj(I, j, k, n) = (*testFilteredVariableX)(I);
+                }
+            }
+        }
+    }
+
+    //! filter RhoUiUj in J direction
+    if (filterDirection[1] == 1)
+    {
+        for (int n = 1; n <= 6; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableY)(J) = testFilteredRhoUiUj(i, J, k, n);
+                    (*filteredVariableY)(J) = testFilteredRhoUiUj(i, J, k, n);
+                    TestFilter(jst, jed, testFilteredVariableY, filteredVariableY);
+                    testFilteredRhoUiUj(i, J, k, n) = (*testFilteredVariableY)(J);
+                }
+            }
+        }
+    }
+
+    //! filter RhoUiUj in K direction
+    if (filterDirection[2] == 1)
+    {
+        for (int n = 1; n <= 6; ++ n)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableZ)(K) = testFilteredRhoUiUj(i, j, K, n);
+                    (*filteredVariableZ)(K) = testFilteredRhoUiUj(i, j, K, n);                
+                    TestFilter(kst, ked, testFilteredVariableZ, filteredVariableZ);
+                    testFilteredRhoUiUj(i, j, K, n) = (*testFilteredVariableZ)(K);
+                }
+            }
+        }
+    }
+
+    delete testFilteredVariableX;
+    delete testFilteredVariableY;
+    delete testFilteredVariableZ;
+    delete filteredVariableX;
+    delete filteredVariableY;
+    delete filteredVariableZ;
+}
+
+void LESSolverStruct::ComputeLeonardStress(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    RDouble4D &leonardStress = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("leonardStress"));
+    RDouble4D &testFilteredRhoUiUj = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredRhoUiUj"));
+    RDouble4D &testFilteredQ = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredQ"));
+
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+    if (isFVMOrFDM == FV_METHOD)
+    {
+        ComputeTestFilteredQ(grid);
+    }
+    else
+    {
+        ComputeTestFilteredQFD(grid);
+    }
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int subgridScaleModel = parameters->GetSubgridScaleModel();
+
+    if (subgridScaleModel == 4)
+    {
+        testFilteredQ(I, J, K, 0) = 1.0;
+    }
+
+    if (isFVMOrFDM == FV_METHOD)
+    {
+        ComputeTestFilteredRhoUiUj(grid);
+    }
+    else
+    {
+        ComputeTestFilteredRhoUiUjFD(grid);
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble tFRho = testFilteredQ(i, j, k, 0);
+
+                RDouble tFU = testFilteredQ(i, j, k, 1);
+                RDouble tFV = testFilteredQ(i, j, k, 2);
+                RDouble tFW = testFilteredQ(i, j, k, 3);
+
+                RDouble tFRhoUU = testFilteredRhoUiUj(i, j, k, 1);
+                RDouble tFRhoVV = testFilteredRhoUiUj(i, j, k, 2);
+                RDouble tFRhoWW = testFilteredRhoUiUj(i, j, k, 3);
+                RDouble tFRhoUV = testFilteredRhoUiUj(i, j, k, 4);
+                RDouble tFRhoUW = testFilteredRhoUiUj(i, j, k, 5);
+                RDouble tFRhoVW = testFilteredRhoUiUj(i, j, k, 6);
+
+                leonardStress(i, j, k, 1) = tFRhoUU - tFRho * tFU * tFU;
+                leonardStress(i, j, k, 2) = tFRhoVV - tFRho * tFV * tFV;
+                leonardStress(i, j, k, 3) = tFRhoWW - tFRho * tFW * tFW;
+                leonardStress(i, j, k, 4) = tFRhoUV - tFRho * tFU * tFV;
+                leonardStress(i, j, k, 5) = tFRhoUW - tFRho * tFU * tFW;
+                leonardStress(i, j, k, 6) = tFRhoVW - tFRho * tFV * tFW;
+            }
+        }
+    }
+}
+
+void LESSolverStruct::ComputeModeledStress(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    Range N(1, 6);
+
+    RDouble4D &modeledStress = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("modeledStress"));
+    RDouble4D &testFilteredAlphaIJ = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredAlphaIJ"));
+    RDouble4D &betaIJ = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("betaIJ"));
+
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+    if (isFVMOrFDM == FV_METHOD)
+    {
+        ComputeTestFilteredAlphaIJ(grid);
+    }
+    else
+    {
+        ComputeTestFilteredAlphaIJFD(grid);
+    }
+
+    ComputeBetaIJ(grid);
+
+    for(int m = 1; m <= 6; ++m)
+    {
+        for(int k = kst; k <= ked; ++k)
+        {
+            for(int j = jst; j <= jed; ++j)
+            {
+                for(int i = ist; i <= ied; ++i)
+                {
+                    RDouble beta = betaIJ(i, j, k, m);
+                    RDouble alpha = testFilteredAlphaIJ(i, j, k, m); 
+                    modeledStress(i, j, k, m) = beta - alpha; 
+                }
+            }
+        }
+    }
+}
+
+void LESSolverStruct::ComputeTestFilteredAlphaIJ(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int *filterDirection = parameters->GetFilterDirection();
+    int subgridScaleModel = parameters->GetSubgridScaleModel();
+
+    RDouble4D &q = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D &strainRateTensor = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("strainRateTensor"));
+
+    RDouble4D &testFilteredAlphaIJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("testFilteredAlphaIJ"));
+
+    RDouble1D *testFilteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *testFilteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *testFilteredVariableZ = new RDouble1D(K, fortranArray);
+    RDouble1D *filteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *filteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *filteredVariableZ = new RDouble1D(K, fortranArray);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+
+    if (subgridScaleModel == 2)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble rho = q(i, j, k, IR);
+                    RDouble s = strainRateTensor(i, j, k, 0);
+                    RDouble s11 = strainRateTensor(i, j, k, 1);
+                    RDouble s22 = strainRateTensor(i, j, k, 2);
+                    RDouble s33 = strainRateTensor(i, j, k, 3);
+                    RDouble s12 = strainRateTensor(i, j, k, 4);
+                    RDouble s13 = strainRateTensor(i, j, k, 5);
+                    RDouble s23 = strainRateTensor(i, j, k, 6);
+
+                    testFilteredAlphaIJ(i, j, k, 1) = -2.0 * rho * s * (s11 - 1.0/3.0 * (s11 + s22 + s33));
+                    testFilteredAlphaIJ(i, j, k, 2) = -2.0 * rho * s * (s22 - 1.0/3.0 * (s11 + s22 + s33));
+                    testFilteredAlphaIJ(i, j, k, 3) = -2.0 * rho * s * (s33 - 1.0/3.0 * (s11 + s22 + s33));
+                    testFilteredAlphaIJ(i, j, k, 4) = -2.0 * rho * s * s12;
+                    testFilteredAlphaIJ(i, j, k, 5) = -2.0 * rho * s * s13;
+                    testFilteredAlphaIJ(i, j, k, 6) = -2.0 * rho * s * s23;
+
+                    testFilteredAlphaIJ(i, j, k, 0) = 2.0 * rho * s * s;
+                }
+            }
+        }
+    }
+    else if (subgridScaleModel == 4)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble s = strainRateTensor(i, j, k, 0);
+                    RDouble s11 = strainRateTensor(i, j, k, 1);
+                    RDouble s22 = strainRateTensor(i, j, k, 2);
+                    RDouble s33 = strainRateTensor(i, j, k, 3);
+                    RDouble s12 = strainRateTensor(i, j, k, 4);
+                    RDouble s13 = strainRateTensor(i, j, k, 5);
+                    RDouble s23 = strainRateTensor(i, j, k, 6);
+
+                    testFilteredAlphaIJ(i, j, k, 1) = -2.0 * s * s11;
+                    testFilteredAlphaIJ(i, j, k, 2) = -2.0 * s * s22;
+                    testFilteredAlphaIJ(i, j, k, 3) = -2.0 * s * s33;
+                    testFilteredAlphaIJ(i, j, k, 4) = -2.0 * s * s12;
+                    testFilteredAlphaIJ(i, j, k, 5) = -2.0 * s * s13;
+                    testFilteredAlphaIJ(i, j, k, 6) = -2.0 * s * s23;
+
+                    testFilteredAlphaIJ(i, j, k, 0) = 2.0 * s * s;
+                }
+            }
+        }
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("subgridScaleModel", subgridScaleModel);
+    }
+
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    //! filter AlphaIJ in I direction
+    if (filterDirection[0] == 1)
+    {
+        for (int n = 0; n <= 6; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    (*testFilteredVariableX)(I) = testFilteredAlphaIJ(I, j, k, n);
+                    (*filteredVariableX)(I) = testFilteredAlphaIJ(I, j, k, n);
+                    TestFilter(ist, ied, testFilteredVariableX, filteredVariableX);
+                    testFilteredAlphaIJ(I, j, k, n) = (*testFilteredVariableX)(I);
+                }
+            }
+        }
+    }
+
+    //! filter AlphaIJ in J direction
+    if (filterDirection[1] == 1)
+    {
+        for (int n = 0; n <= 6; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableY)(J) = testFilteredAlphaIJ(i, J, k, n);
+                    (*filteredVariableY)(J) = testFilteredAlphaIJ(i, J, k, n);
+                    TestFilter(jst, jed, testFilteredVariableY, filteredVariableY);
+                    testFilteredAlphaIJ(i, J, k, n) = (*testFilteredVariableY)(J);
+                }
+            }
+        }
+    }
+
+    //! filter AlphaIJ in K direction
+    if (filterDirection[2] == 1)
+    {
+        for (int n = 0; n <= 6; ++ n)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableZ)(K) = testFilteredAlphaIJ(i, j, K, n);
+                    (*filteredVariableZ)(K) = testFilteredAlphaIJ(i, j, K, n);                
+                    TestFilter(kst, ked, testFilteredVariableZ, filteredVariableZ);
+                    testFilteredAlphaIJ(i, j, K, n) = (*testFilteredVariableZ)(K);
+                }
+            }
+        }
+    }
+
+    delete testFilteredVariableX;
+    delete testFilteredVariableY;
+    delete testFilteredVariableZ;
+    delete filteredVariableX;
+    delete filteredVariableY;
+    delete filteredVariableZ;
+}
+
+void LESSolverStruct::ComputeTestFilteredAlphaIJFD(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int *filterDirection = parameters->GetFilterDirection();
+    int subgridScaleModel = parameters->GetSubgridScaleModel();
+
+    RDouble4D &q = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_FD"));
+    RDouble4D &strainRateTensor = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("strainRateTensor"));
+
+    RDouble4D &testFilteredAlphaIJ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("testFilteredAlphaIJ"));
+
+    RDouble1D *testFilteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *testFilteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *testFilteredVariableZ = new RDouble1D(K, fortranArray);
+    RDouble1D *filteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *filteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *filteredVariableZ = new RDouble1D(K, fortranArray);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+
+    if (subgridScaleModel == 2)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble rho = q(i, j, k, IR);
+                    RDouble s = strainRateTensor(i, j, k, 0);
+                    RDouble s11 = strainRateTensor(i, j, k, 1);
+                    RDouble s22 = strainRateTensor(i, j, k, 2);
+                    RDouble s33 = strainRateTensor(i, j, k, 3);
+                    RDouble s12 = strainRateTensor(i, j, k, 4);
+                    RDouble s13 = strainRateTensor(i, j, k, 5);
+                    RDouble s23 = strainRateTensor(i, j, k, 6);
+
+                    testFilteredAlphaIJ(i, j, k, 1) = -2.0 * rho * s * (s11 - 1.0/3.0 * (s11 + s22 + s33));
+                    testFilteredAlphaIJ(i, j, k, 2) = -2.0 * rho * s * (s22 - 1.0/3.0 * (s11 + s22 + s33));
+                    testFilteredAlphaIJ(i, j, k, 3) = -2.0 * rho * s * (s33 - 1.0/3.0 * (s11 + s22 + s33));
+                    testFilteredAlphaIJ(i, j, k, 4) = -2.0 * rho * s * s12;
+                    testFilteredAlphaIJ(i, j, k, 5) = -2.0 * rho * s * s13;
+                    testFilteredAlphaIJ(i, j, k, 6) = -2.0 * rho * s * s23;
+
+                    testFilteredAlphaIJ(i, j, k, 0) = 2.0 * rho * s * s;
+                }
+            }
+        }
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("subgridScaleModel", subgridScaleModel);
+    }
+
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+    //! filter AlphaIJ in I direction
+    if (filterDirection[0] == 1)
+    {
+        for (int n = 0; n <= 6; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    (*testFilteredVariableX)(I) = testFilteredAlphaIJ(I, j, k, n);
+                    (*filteredVariableX)(I) = testFilteredAlphaIJ(I, j, k, n);
+                    TestFilter(ist, ied, testFilteredVariableX, filteredVariableX);
+                    testFilteredAlphaIJ(I, j, k, n) = (*testFilteredVariableX)(I);
+                }
+            }
+        }
+    }
+
+    //! filter AlphaIJ in J direction
+    if (filterDirection[1] == 1)
+    {
+        for (int n = 0; n <= 6; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableY)(J) = testFilteredAlphaIJ(i, J, k, n);
+                    (*filteredVariableY)(J) = testFilteredAlphaIJ(i, J, k, n);
+                    TestFilter(jst, jed, testFilteredVariableY, filteredVariableY);
+                    testFilteredAlphaIJ(i, J, k, n) = (*testFilteredVariableY)(J);
+                }
+            }
+        }
+    }
+
+    //! filter AlphaIJ in K direction
+    if (filterDirection[2] == 1)
+    {
+        for (int n = 0; n <= 6; ++ n)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableZ)(K) = testFilteredAlphaIJ(i, j, K, n);
+                    (*filteredVariableZ)(K) = testFilteredAlphaIJ(i, j, K, n);                
+                    TestFilter(kst, ked, testFilteredVariableZ, filteredVariableZ);
+                    testFilteredAlphaIJ(i, j, K, n) = (*testFilteredVariableZ)(K);
+                }
+            }
+        }
+    }
+
+    delete testFilteredVariableX;
+    delete testFilteredVariableY;
+    delete testFilteredVariableZ;
+    delete filteredVariableX;
+    delete filteredVariableY;
+    delete filteredVariableZ;
+}
+
+void LESSolverStruct::ComputeBetaIJ(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    RDouble testFilterScale = parameters->GetTestFilterScale();
+    int subgridScaleModel = parameters->GetSubgridScaleModel();
+
+    RDouble4D &testFilteredQ = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredQ"));
+    RDouble4D &testFilteredStrainRateTensor = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredStrainRateTensor"));
+
+    RDouble4D &betaIJ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("betaIJ"));
+    
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+    if (isFVMOrFDM == FV_METHOD)
+    {
+        ComputeTestFilteredStrainRateTensor(grid);
+    }
+    else
+    {
+        ComputeTestFilteredStrainRateTensor(grid);
+    }
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    if (subgridScaleModel == 2)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble rho = testFilteredQ(i, j, k, 0);
+                    RDouble s = testFilteredStrainRateTensor(i, j, k, 0);
+                    RDouble s11 = testFilteredStrainRateTensor(i, j, k, 1);
+                    RDouble s22 = testFilteredStrainRateTensor(i, j, k, 2);
+                    RDouble s33 = testFilteredStrainRateTensor(i, j, k, 3);
+                    RDouble s12 = testFilteredStrainRateTensor(i, j, k, 4);
+                    RDouble s13 = testFilteredStrainRateTensor(i, j, k, 5);
+                    RDouble s23 = testFilteredStrainRateTensor(i, j, k, 6);
+
+                    betaIJ(i, j, k, 1) = -2.0 * testFilterScale * testFilterScale * rho * s * (s11 - 1.0/3.0 * (s11 + s22 + s33));
+                    betaIJ(i, j, k, 2) = -2.0 * testFilterScale * testFilterScale * rho * s * (s22 - 1.0/3.0 * (s11 + s22 + s33));
+                    betaIJ(i, j, k, 3) = -2.0 * testFilterScale * testFilterScale * rho * s * (s33 - 1.0/3.0 * (s11 + s22 + s33));
+                    betaIJ(i, j, k, 4) = -2.0 * testFilterScale * testFilterScale * rho * s * s12;
+                    betaIJ(i, j, k, 5) = -2.0 * testFilterScale * testFilterScale * rho * s * s13;
+                    betaIJ(i, j, k, 6) = -2.0 * testFilterScale * testFilterScale * rho * s * s23;
+                }
+            }
+        }
+    }
+    else if (subgridScaleModel == 4)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble s = testFilteredStrainRateTensor(i, j, k, 0);
+                    RDouble s11 = testFilteredStrainRateTensor(i, j, k, 1);
+                    RDouble s22 = testFilteredStrainRateTensor(i, j, k, 2);
+                    RDouble s33 = testFilteredStrainRateTensor(i, j, k, 3);
+                    RDouble s12 = testFilteredStrainRateTensor(i, j, k, 4);
+                    RDouble s13 = testFilteredStrainRateTensor(i, j, k, 5);
+                    RDouble s23 = testFilteredStrainRateTensor(i, j, k, 6);
+
+                    betaIJ(i, j, k, 1) = -2.0 * testFilterScale * testFilterScale * s * s11;
+                    betaIJ(i, j, k, 2) = -2.0 * testFilterScale * testFilterScale * s * s22;
+                    betaIJ(i, j, k, 3) = -2.0 * testFilterScale * testFilterScale * s * s33;
+                    betaIJ(i, j, k, 4) = -2.0 * testFilterScale * testFilterScale * s * s12;
+                    betaIJ(i, j, k, 5) = -2.0 * testFilterScale * testFilterScale * s * s13;
+                    betaIJ(i, j, k, 6) = -2.0 * testFilterScale * testFilterScale * s * s23;
+                }
+            }
+        }
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("subgridScaleModel", subgridScaleModel);
+    }
+}
+
+void LESSolverStruct::ComputeAnisotropicConstant(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int subgridScaleModel = parameters->GetSubgridScaleModel();
+
+    RDouble3D &anisotropicConstant = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("anisotropicConstant"));
+    RDouble4D &leonardStress = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("leonardStress"));
+    RDouble4D &modeledStress = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("modeledStress"));
+
+    ComputeLeonardStress(grid);
+
+    ComputeModeledStress(grid);
+
+    RDouble3D *LijMij = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *MijMij = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *LmmMnn = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *LijMijAvg = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *MijMijAvg = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *LmmMnnAvg = new RDouble3D(I, J, K, fortranArray);
+
+    if (subgridScaleModel == 2)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble l11 = leonardStress(i, j, k, 1);
+                    RDouble l22 = leonardStress(i, j, k, 2);
+                    RDouble l33 = leonardStress(i, j, k, 3);
+                    RDouble l12 = leonardStress(i, j, k, 4);
+                    RDouble l13 = leonardStress(i, j, k, 5);
+                    RDouble l23 = leonardStress(i, j, k, 6);
+
+                    RDouble m11 = modeledStress(i, j, k, 1);
+                    RDouble m22 = modeledStress(i, j, k, 2);
+                    RDouble m33 = modeledStress(i, j, k, 3);
+                    RDouble m12 = modeledStress(i, j, k, 4);
+                    RDouble m13 = modeledStress(i, j, k, 5);
+                    RDouble m23 = modeledStress(i, j, k, 6);
+
+                    RDouble lm = l11 * m11 + l22 * m22 + l33 * m33 + 2.0 * (l12 * m12 + l13 * m13 + l23 * m23);
+                    RDouble mm = m11 * m11 + m22 * m22 + m33 * m33 + 2.0 * (m12 * m12 + m13 * m13 + m23 * m23);
+                    RDouble lmmn = (l11 + l22 + l33) * (m11 + m22 + m33);
+
+                    (*LijMij)(i, j, k) = lm;
+                    (*MijMij)(i, j, k) = mm;
+                    (*LmmMnn)(i, j, k) = lmmn;
+                }
+            }
+        }
+    }
+    else if (subgridScaleModel == 4)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble l11 = leonardStress(i, j, k, 1);
+                    RDouble l22 = leonardStress(i, j, k, 2);
+                    RDouble l33 = leonardStress(i, j, k, 3);
+                    RDouble l12 = leonardStress(i, j, k, 4);
+                    RDouble l13 = leonardStress(i, j, k, 5);
+                    RDouble l23 = leonardStress(i, j, k, 6);
+
+                    RDouble m11 = modeledStress(i, j, k, 1);
+                    RDouble m22 = modeledStress(i, j, k, 2);
+                    RDouble m33 = modeledStress(i, j, k, 3);
+                    RDouble m12 = modeledStress(i, j, k, 4);
+                    RDouble m13 = modeledStress(i, j, k, 5);
+                    RDouble m23 = modeledStress(i, j, k, 6);
+
+                    RDouble lm = l11 * m11 + l22 * m22 + l33 * m33 + 2.0 * (l12 * m12 + l13 * m13 + l23 * m23);
+                    RDouble mm = m11 * m11 + m22 * m22 + m33 * m33 + 2.0 * (m12 * m12 + m13 * m13 + m23 * m23);
+
+                    (*LijMij)(i, j, k) = lm;
+                    (*MijMij)(i, j, k) = mm;
+                    (*LmmMnn)(i, j, k) = 0.0;
+                }
+            }
+        }
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("subgridScaleModel", subgridScaleModel);
+    }
+
+    (*LijMijAvg)(I, J, K) = (*LijMij)(I, J, K);
+    (*MijMijAvg)(I, J, K) = (*MijMij)(I, J, K);
+    (*LmmMnnAvg)(I, J, K) = (*LmmMnn)(I, J, K);
+
+    int *averageDirection = parameters->GetAverageDirection();
+    
+    //grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    if (averageDirection[0] == 0 && averageDirection[1] == 0 && averageDirection[2] == 0)
+    {
+        int averageWidth = parameters->GetAverageWidth();
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble LMAvg = 0.0;
+                    RDouble MMAvg = 0.0;
+                    RDouble LmMnAvg = 0.0;
+
+                    int nAvg = 0;
+
+                    for (int ka = -averageWidth; ka <= averageWidth; ++ ka)
+                    {
+                        for (int ja = -averageWidth; ja <= averageWidth; ++ ja)
+                        {
+                            for (int ia = -averageWidth; ia <= averageWidth; ++ ia)
+                            {
+                                int kk = k + ka;
+                                int jj = j + ja;
+                                int ii = i + ia;
+
+                                bool ifAverage = (ii >= ist && ii <= ied) && (jj >= jst && jj <= jed) && (kk >= kst && kk <= ked);
+
+                                if (ifAverage)
+                                {
+                                    LMAvg = LMAvg + (*LijMij)(ii, jj, kk);
+                                    MMAvg = MMAvg + (*MijMij)(ii, jj, kk);
+                                    LmMnAvg = LmMnAvg + (*LmmMnn)(ii, jj, kk);
+                                    nAvg = nAvg + 1;
+                                }
+                            }
+                        }
+                    }
+
+                    (*LijMijAvg)(i, j, k) = LMAvg / static_cast<RDouble>(nAvg);
+                    (*MijMijAvg)(i, j, k) = MMAvg / static_cast<RDouble>(nAvg);
+                    (*LmmMnnAvg)(i, j, k) = LmMnAvg / static_cast<RDouble>(nAvg);
+                }
+            }
+        }
+    }
+    else
+    {
+        //! average in I direction
+        if (averageDirection[0] != 0)
+        {
+            int nAvg = ied - ist + 1;
+
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    RDouble LMAvg = 0.0;
+                    RDouble MMAvg = 0.0;
+                    RDouble LmMnAvg = 0.0;
+
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        LMAvg = LMAvg + (*LijMij)(i, j, k);
+                        MMAvg = MMAvg + (*MijMij)(i, j, k);
+                        LmMnAvg = LmMnAvg + (*LmmMnn)(i, j, k);
+                    }
+
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        (*LijMijAvg)(i, j, k) = LMAvg / static_cast <RDouble>(nAvg);
+                        (*MijMijAvg)(i, j, k) = MMAvg / static_cast <RDouble>(nAvg);
+                        (*LmmMnnAvg)(i, j, k) = LmMnAvg / static_cast <RDouble>(nAvg);
+                    }
+
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        (*LijMij)(i, j, k) = (*LijMijAvg)(i, j, k);
+                        (*MijMij)(i, j, k) = (*MijMijAvg)(i, j, k);
+                        (*LmmMnn)(i, j, k) = (*LmmMnnAvg)(i, j, k);
+                    }
+                }
+            }
+        }
+
+        RDouble lm = (*LijMijAvg)(1, 1, 1);
+        RDouble mm = (*MijMijAvg)(1, 1, 1);
+
+        //! average in J direction
+        if (averageDirection[1] != 0)
+        {
+            int nAvg = jed - jst + 1;
+
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble LMAvg = 0.0;
+                    RDouble MMAvg = 0.0;
+                    RDouble LmMnAvg = 0.0;
+
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        LMAvg = LMAvg + (*LijMij)(i, j, k);
+                        MMAvg = MMAvg + (*MijMij)(i, j, k);
+                        LmMnAvg = LmMnAvg + (*LmmMnn)(i, j, k);
+                    }
+
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        (*LijMijAvg)(i, j, k) = LMAvg / static_cast <RDouble>(nAvg);
+                        (*MijMijAvg)(i, j, k) = MMAvg / static_cast <RDouble>(nAvg);
+                        (*LmmMnnAvg)(i, j, k) = LmMnAvg / static_cast <RDouble>(nAvg);
+                    }
+
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        (*LijMij)(i, j, k) = (*LijMijAvg)(i, j, k);
+                        (*MijMij)(i, j, k) = (*MijMijAvg)(i, j, k);
+                        (*LmmMnn)(i, j, k) = (*LmmMnnAvg)(i, j, k);
+                    }
+                }
+            }
+        }
+
+        lm = (*LijMijAvg)(1, 1, 1);
+        mm = (*MijMijAvg)(1, 1, 1);
+
+        //! average in K direction
+        if (averageDirection[2] != 0)
+        {
+            int nAvg = ked - kst + 1;
+
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble LMAvg = 0.0;
+                    RDouble MMAvg = 0.0;
+                    RDouble LmMnAvg = 0.0;
+
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        LMAvg = LMAvg + (*LijMij)(i, j, k);
+                        MMAvg = MMAvg + (*MijMij)(i, j, k);
+                        LmMnAvg = LmMnAvg + (*LmmMnn)(i, j, k);
+                    }
+
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        (*LijMijAvg)(i, j, k) = LMAvg / static_cast <RDouble>(nAvg);
+                        (*MijMijAvg)(i, j, k) = MMAvg / static_cast <RDouble>(nAvg);
+                        (*LmmMnnAvg)(i, j, k) = LmMnAvg / static_cast <RDouble>(nAvg);
+                    }
+
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        (*LijMij)(i, j, k) = (*LijMijAvg)(i, j, k);
+                        (*MijMij)(i, j, k) = (*MijMijAvg)(i, j, k);
+                        (*LmmMnn)(i, j, k) = (*LmmMnnAvg)(i, j, k);
+                    }
+                }
+            }
+        }
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble lm = (*LijMijAvg)(i, j, k);
+                RDouble mm = (*MijMijAvg)(i, j, k);
+                RDouble lmMn = (*LmmMnnAvg)(i, j, k);
+
+                anisotropicConstant(i, j, k) = (lm - 1.0/3.0 * lmMn) / mm; 
+            }
+        }
+    }
+
+    //GhostCell3D(anisotropicConstant, ni, nj, nk);
+
+    delete LijMij;
+    delete MijMij;
+    delete LmmMnn;
+    delete LijMijAvg;
+    delete MijMijAvg;
+    delete LmmMnnAvg;
+}
+
+void LESSolverStruct::ComputeIsotropicConstant(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    RDouble testFilterScale = parameters->GetTestFilterScale();
+    int *averageDirection = parameters->GetAverageDirection();
+
+    RDouble3D &isotropicConstant = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("isotropicConstant"));
+    RDouble4D &leonardStress = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("leonardStress"));
+    RDouble4D &testFilteredQ = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredQ"));
+    RDouble4D &testFilteredAlphaIJ = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredAlphaIJ"));
+    RDouble4D &testFilteredStrainRateTensor = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredStrainRateTensor"));
+
+    RDouble3D *numerator = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *denominator = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *numeratorAvg = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *denominatorAvg = new RDouble3D(I, J, K, fortranArray);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble l11 = leonardStress(i, j, k, 1);
+                RDouble l22 = leonardStress(i, j, k, 2);
+                RDouble l33 = leonardStress(i, j, k, 3);
+                (*numerator)(i, j, k) = l11 + l22 + l33;
+
+                RDouble tFRho = testFilteredQ(i, j, k, 0);
+                RDouble testFilteredStranRateMagnitude = testFilteredStrainRateTensor(i, j, k, 0);
+                RDouble testFilteredAlpha = testFilteredAlphaIJ(i, j, k, 0);
+                (*denominator)(i, j, k) = 2.0 * testFilterScale * testFilterScale * tFRho * testFilteredStranRateMagnitude * testFilteredStranRateMagnitude - testFilteredAlpha;
+            }
+        }
+    }
+
+    (*numeratorAvg)(I, J, K) = (*numerator)(I, J, K);
+    (*denominatorAvg)(I, J, K) = (*denominator)(I, J, K);
+
+    if (averageDirection[0] == 0 && averageDirection[1] == 0 && averageDirection[2] == 0)
+    {
+        int averageWidth = parameters->GetAverageWidth();
+        
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble num = 0.0;
+                    RDouble den = 0.0;
+
+                    int nAvg = 0;
+
+                    for (int ka = -averageWidth; ka <= averageWidth; ++ ka)
+                    {
+                        for (int ja = -averageWidth; ja <= averageWidth; ++ ja)
+                        {
+                            for (int ia = -averageWidth; ia <= averageWidth; ++ ia)
+                            {
+                                int kk = k + ka;
+                                int jj = j + ja;
+                                int ii = i + ia;
+
+                                bool ifAverage = (ii >= ist && ii <= ied) && (jj >= jst && jj <= jed) && (kk >= kst && kk <= ked);
+
+                                if (ifAverage)
+                                {
+                                    num = num + (*numerator)(ii, jj, kk);
+                                    den = den + (*denominator)(ii, jj, kk);
+                                    nAvg = nAvg + 1;
+                                }
+                            }
+                        }
+                    }
+
+                    (*numeratorAvg)(i, j, k) = num / nAvg;
+                    (*denominatorAvg)(i, j, k) = den / nAvg;
+                }
+            }
+        }
+    }
+    else
+    {
+        //! average in I direction
+        if (averageDirection[0] != 0)
+        {
+            int nAvg = ied - ist + 1;
+
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    RDouble num = 0.0;
+                    RDouble den = 0.0;
+
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        num = num + (*numerator)(i, j, k);
+                        den = den + (*denominator)(i, j, k);
+                    }
+
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        (*numeratorAvg)(i, j, k) = num / static_cast<RDouble>(nAvg);
+                        (*denominatorAvg)(i, j, k) = den / static_cast<RDouble>(nAvg);
+                    }
+
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        (*numerator)(i, j, k) = (*numeratorAvg)(i, j, k);
+                        (*denominator)(i, j, k) = (*denominatorAvg)(i, j, k);
+                    }
+                }
+            }
+        }
+
+        //! average in J direction
+        if (averageDirection[1] != 0)
+        {
+            int nAvg = jed - jst + 1;
+
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble num = 0.0;
+                    RDouble den = 0.0;
+
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        num = num + (*numerator)(i, j, k);
+                        den = den + (*denominator)(i, j, k);
+                    }
+
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        (*numeratorAvg)(i, j, k) = num / static_cast<RDouble>(nAvg);
+                        (*denominatorAvg)(i, j, k) = den / static_cast<RDouble>(nAvg);
+                    }
+
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        (*numerator)(i, j, k) = (*numeratorAvg)(i, j, k);
+                        (*denominator)(i, j, k) = (*denominatorAvg)(i, j, k);
+                    }
+                }
+            }
+        }
+
+        //! average in K direction
+        if (averageDirection[2] != 0)
+        {
+            int nAvg = ked - kst + 1;
+
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble num = 0.0;
+                    RDouble den = 0.0;
+
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        num = num + (*numerator)(i, j, k);
+                        den = den + (*denominator)(i, j, k);
+                    }
+
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        (*numeratorAvg)(i, j, k) = num / static_cast<RDouble>(nAvg);
+                        (*denominatorAvg)(i, j, k) = den / static_cast<RDouble>(nAvg);
+                    }
+
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        (*numerator)(i, j, k) = (*numeratorAvg)(i, j, k);
+                        (*denominator)(i, j, k) = (*denominatorAvg)(i, j, k);
+                    }
+                }
+            }
+        }
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble num = (*numeratorAvg)(i, j, k);
+                RDouble den = (*denominatorAvg)(i, j, k);
+                isotropicConstant(i, j, k) = num / den;
+            }
+        }
+    }
+
+    delete numerator;
+    delete denominator;
+    delete numeratorAvg;
+    delete denominatorAvg;
+}
+
+void LESSolverStruct::ComputePrandtlNumber(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int *averageDirection = parameters->GetAverageDirection();
+
+    RDouble3D &turbulentPrandtlNumber = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("turbulentPrandtlNumber"));
+
+    RDouble3D &anisotropicConstant = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("anisotropicConstant"));
+
+    RDouble4D &leonardTemperatureFlux = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("leonardTemperatureFlux"));
+    RDouble4D &modeledTemperatureFlux = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("modeledTemperatureFlux"));
+
+    RDouble3D *numerator = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *denominator = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *numeratorAvg = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *denominatorAvg = new RDouble3D(I, J, K, fortranArray);
+
+    ComputeLeonardTemperatureTerm(grid);
+
+    ComputeModeledTemperatureTerm(grid);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble mTF0 = modeledTemperatureFlux(i, j, k, 0);
+                RDouble mTF1 = modeledTemperatureFlux(i, j, k, 1);
+                RDouble mTF2 = modeledTemperatureFlux(i, j, k, 2);
+
+                RDouble lTF0 = leonardTemperatureFlux(i, j, k, 0);
+                RDouble lTF1 = leonardTemperatureFlux(i, j, k, 1);
+                RDouble lTF2 = leonardTemperatureFlux(i, j, k, 2);
+
+                (*numerator)(i, j, k) = mTF0 * mTF0 + mTF1 * mTF1 + mTF2 * mTF2;
+                (*denominator)(i, j, k) = lTF0 * mTF0 + lTF1 * mTF1 + lTF2 * mTF2;
+            }
+        }
+    }
+
+    (*numeratorAvg)(I, J, K) = (*numerator)(I, J, K);
+    (*denominatorAvg)(I, J, K) = (*denominator)(I, J, K);
+
+    if (averageDirection[0] == 0 && averageDirection[1] == 0 && averageDirection[2] == 0)
+    {
+        int averageWidth = parameters->GetAverageWidth();
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble num = 0.0;
+                    RDouble den = 0.0;
+
+                    int nAvg = 0;
+
+                    for (int ka = -averageWidth; ka <= averageWidth; ++ ka)
+                    {
+                        for (int ja = -averageWidth; ja <= averageWidth; ++ ja)
+                        {
+                            for (int ia = -averageWidth; ia <= averageWidth; ++ ia)
+                            {
+                                int kk = k + ka;
+                                int jj = j + ja;
+                                int ii = i + ia;
+
+                                bool ifAverage = (ii >= ist && ii <= ied) && (jj >= jst && jj <= jed) && (kk >= kst && kk <= ked);
+
+                                if (ifAverage)
+                                {
+                                    num = num + (*numerator)(ii, jj, kk);
+                                    den = den + (*denominator)(ii, jj, kk);
+                                    nAvg = nAvg + 1;
+                                }
+                            }
+                        }
+                    }
+
+                    (*numeratorAvg)(i, j, k) = num / nAvg;
+                    (*denominatorAvg)(i, j, k) = den / nAvg;
+                }
+            }
+        }
+    }
+    else
+    {
+        //! average in I direction
+        if (averageDirection[0] != 0)
+        {
+            int nAvg = ied - ist + 1;
+
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    RDouble num = 0.0;
+                    RDouble den = 0.0;
+
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        num = num + (*numerator)(i, j, k);
+                        den = den + (*denominator)(i, j, k);
+                    }
+
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        (*numeratorAvg)(i, j, k) = num / nAvg;
+                        (*denominatorAvg)(i, j, k) = den / nAvg;
+                    }
+
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        (*numerator)(i, j, k) = (*numeratorAvg)(i, j, k);
+                        (*denominator)(i, j, k) = (*denominatorAvg)(i, j, k);
+                    }
+                }
+            }
+        }
+
+        //! average in J direction
+        if (averageDirection[1] != 0)
+        {
+            int nAvg = jed - jst + 1;
+
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble num = 0.0;
+                    RDouble den = 0.0;
+
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        num = num + (*numerator)(i, j, k);
+                        den = den + (*denominator)(i, j, k);
+                    }
+
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        (*numeratorAvg)(i, j, k) = num / nAvg;
+                        (*denominatorAvg)(i, j, k) = den / nAvg;
+                    }
+
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        (*numerator)(i, j, k) = (*numeratorAvg)(i, j, k);
+                        (*denominator)(i, j, k) = (*denominatorAvg)(i, j, k);
+                    }
+                }
+            }
+        }
+
+        //! average in K direction
+        if (averageDirection[2] != 0)
+        {
+            int nAvg = ked - kst + 1;
+
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble num = 0.0;
+                    RDouble den = 0.0;
+
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        num = num + (*numerator)(i, j, k);
+                        den = den + (*denominator)(i, j, k);
+                    }
+
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        (*numeratorAvg)(i, j, k) = num / nAvg;
+                        (*denominatorAvg)(i, j, k) = den / nAvg;
+                    }
+
+                    for (int k = kst; k <= ked; ++ k)
+                    {
+                        (*numerator)(i, j, k) = (*numeratorAvg)(i, j, k);
+                        (*denominator)(i, j, k) = (*denominatorAvg)(i, j, k);
+                    }
+                }
+            }
+        }
+    }
+
+    //grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble cr = anisotropicConstant(i, j, k);
+
+                RDouble KjKj = (*numeratorAvg)(i, j, k);
+                RDouble NjNj = (*denominatorAvg)(i, j, k);
+
+                RDouble prt = cr * KjKj / NjNj;
+                turbulentPrandtlNumber(i, j, k) = prt;
+            }
+        }
+    }
+
+    delete numerator;
+    delete denominator;
+    delete numeratorAvg;
+    delete denominatorAvg;
+}
+
+void LESSolverStruct::ComputeLeonardTemperatureTerm(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    RDouble4D &leonardTemperatureFlux = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("leonardTemperatureFlux"));
+
+    RDouble4D &testFilteredRhoUT = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredRhoUT"));
+    RDouble3D &testFilteredTemperature = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("testFilteredTemperature"));
+    RDouble4D &testFilteredQ = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredQ"));
+
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+    if (isFVMOrFDM == FV_METHOD)
+    {
+        ComputeTestFilteredRhoUT(grid);
+
+        ComputeTestFilteredTemperature(grid);
+    }
+    else
+    {
+        ComputeTestFilteredRhoUTFD(grid);
+
+        ComputeTestFilteredTemperatureFD(grid);
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble tFRhoUT = testFilteredRhoUT(i, j, k, 1);
+                RDouble tFRhoVT = testFilteredRhoUT(i, j, k, 2);
+                RDouble tFRhoWT = testFilteredRhoUT(i, j, k, 3);
+
+                RDouble tFRho = testFilteredQ(i, j, k, 0);
+
+                RDouble tFU = testFilteredQ(i, j, k, 1);
+                RDouble tFV = testFilteredQ(i, j, k, 2);
+                RDouble tFW = testFilteredQ(i, j, k, 3);
+
+                RDouble tFT = testFilteredTemperature(i, j, k);
+
+                leonardTemperatureFlux(i, j, k, 0) = tFRhoUT - tFRho * tFU * tFT;
+                leonardTemperatureFlux(i, j, k, 1) = tFRhoVT - tFRho * tFV * tFT;
+                leonardTemperatureFlux(i, j, k, 2) = tFRhoWT - tFRho * tFW * tFT;
+            }
+        }
+    }
+}
+
+void LESSolverStruct::ComputeModeledTemperatureTerm(Grid *gridIn)
+{
+    using namespace IDX;
+ 
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    RDouble testFilterScale = parameters->GetTestFilterScale();
+
+    RDouble4D &modeledTemperatureFlux = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("modeledTemperatureFlux"));
+
+    RDouble4D &testFilteredQ = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredQ"));
+    RDouble4D &testFilteredRhoStrainRateMagnitudeGradT = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredRhoStrainRateMagnitudeGradT"));
+    RDouble4D &testFilteredGradT = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredGradT"));
+    RDouble4D &testFilteredStrainRateTensor = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredStrainRateTensor"));
+
+    ComputeTestFilteredGradT(grid);
+
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+    if (isFVMOrFDM == FV_METHOD)
+    {
+        ComputeTestFilteredRhoStrainRateMagnitudeGradT(grid);
+    }
+    else
+    {
+        ComputeTestFilteredRhoStrainRateMagnitudeGradTFD(grid);
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble tFRSGradTx = testFilteredRhoStrainRateMagnitudeGradT(i, j, k, 0);
+                RDouble tFRSGradTy = testFilteredRhoStrainRateMagnitudeGradT(i, j, k, 1);
+                RDouble tFRSGradTz = testFilteredRhoStrainRateMagnitudeGradT(i, j, k, 2);
+
+                RDouble tFGradTx = testFilteredGradT(i, j, k, 0);
+                RDouble tFGradTy = testFilteredGradT(i, j, k, 1);
+                RDouble tFGradTz = testFilteredGradT(i, j, k, 2);
+
+                RDouble tFRho = testFilteredQ(i, j, k, 0);
+                RDouble tFS = testFilteredStrainRateTensor(i, j, k, 0);
+
+                modeledTemperatureFlux(i, j, k, 0) = tFRSGradTx - testFilterScale * testFilterScale * tFRho * tFS * tFGradTx;
+                modeledTemperatureFlux(i, j, k, 1) = tFRSGradTy - testFilterScale * testFilterScale * tFRho * tFS * tFGradTy;
+                modeledTemperatureFlux(i, j, k, 2) = tFRSGradTz - testFilterScale * testFilterScale * tFRho * tFS * tFGradTz;
+            }
+        }
+    }
+}
+
+void LESSolverStruct::ComputeTestFilteredRhoUT(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    //grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int *filterDirection = parameters->GetFilterDirection();
+
+    RDouble4D &q = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &temperatures = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("t"));
+
+    RDouble4D &testFilteredRhoUT = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredRhoUT"));
+
+    testFilteredRhoUT(I, J, K, 1) = q(I, J, K, IR) * q(I, J, K, IU) * temperatures(I, J, K, ITT);
+    testFilteredRhoUT(I, J, K, 2) = q(I, J, K, IR) * q(I, J, K, IV) * temperatures(I, J, K, ITT);
+    testFilteredRhoUT(I, J, K, 3) = q(I, J, K, IR) * q(I, J, K, IW) * temperatures(I, J, K, ITT);
+
+    RDouble1D *testFilteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *testFilteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *testFilteredVariableZ = new RDouble1D(K, fortranArray);
+    RDouble1D *filteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *filteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *filteredVariableZ = new RDouble1D(K, fortranArray);
+
+    //! filter rhoUT in I direction
+    if (filterDirection[0] == 1)
+    {
+        for (int n = 1; n <= 3; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    (*testFilteredVariableX)(I) = testFilteredRhoUT(I, j, k, n);
+                    (*filteredVariableX)(I) = testFilteredRhoUT(I, j, k, n);
+                    TestFilter(ist, ied, testFilteredVariableX, filteredVariableX);
+                    testFilteredRhoUT(I, j, k, n) = (*testFilteredVariableX)(I);
+                }
+            }
+        }
+    }
+
+    //! filter rhoUT in J direction
+    if (filterDirection[1] == 1)
+    {
+        for (int n = 1; n <= 3; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableY)(J) = testFilteredRhoUT(i, J, k, n);
+                    (*filteredVariableY)(J) = testFilteredRhoUT(i, J, k, n);
+                    TestFilter(jst, jed, testFilteredVariableY, filteredVariableY);
+                    testFilteredRhoUT(i, J, k, n) = (*testFilteredVariableY)(J);
+                }
+            }
+        }
+    }
+
+    //! filter rhoUT in K direction
+    if (filterDirection[2] == 1)
+    {
+        for (int n = 1; n <= 3; ++ n)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableZ)(K) = testFilteredRhoUT(i, j, K, n);
+                    (*filteredVariableZ)(K) = testFilteredRhoUT(i, j, K, n);                
+                    TestFilter(kst, ked, testFilteredVariableZ, filteredVariableZ);
+                    testFilteredRhoUT(i, j, K, n) = (*testFilteredVariableZ)(K);
+                }
+            }
+        }
+    }
+
+    delete testFilteredVariableX;
+    delete testFilteredVariableY;
+    delete testFilteredVariableZ;
+    delete filteredVariableX;
+    delete filteredVariableY;
+    delete filteredVariableZ;
+}
+
+void LESSolverStruct::ComputeTestFilteredRhoUTFD(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    //grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int *filterDirection = parameters->GetFilterDirection();
+
+    RDouble4D &q = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_FD"));
+    RDouble4D &temperatures = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("t_FD"));
+
+    RDouble4D &testFilteredRhoUT = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredRhoUT"));
+
+    testFilteredRhoUT(I, J, K, 1) = q(I, J, K, IR) * q(I, J, K, IU) * temperatures(I, J, K, ITT);
+    testFilteredRhoUT(I, J, K, 2) = q(I, J, K, IR) * q(I, J, K, IV) * temperatures(I, J, K, ITT);
+    testFilteredRhoUT(I, J, K, 3) = q(I, J, K, IR) * q(I, J, K, IW) * temperatures(I, J, K, ITT);
+
+    RDouble1D *testFilteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *testFilteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *testFilteredVariableZ = new RDouble1D(K, fortranArray);
+    RDouble1D *filteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *filteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *filteredVariableZ = new RDouble1D(K, fortranArray);
+
+    //! filter rhoUT in I direction
+    if (filterDirection[0] == 1)
+    {
+        for (int n = 1; n <= 3; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    (*testFilteredVariableX)(I) = testFilteredRhoUT(I, j, k, n);
+                    (*filteredVariableX)(I) = testFilteredRhoUT(I, j, k, n);
+                    TestFilter(ist, ied, testFilteredVariableX, filteredVariableX);
+                    testFilteredRhoUT(I, j, k, n) = (*testFilteredVariableX)(I);
+                }
+            }
+        }
+    }
+
+    //! filter rhoUT in J direction
+    if (filterDirection[1] == 1)
+    {
+        for (int n = 1; n <= 3; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableY)(J) = testFilteredRhoUT(i, J, k, n);
+                    (*filteredVariableY)(J) = testFilteredRhoUT(i, J, k, n);
+                    TestFilter(jst, jed, testFilteredVariableY, filteredVariableY);
+                    testFilteredRhoUT(i, J, k, n) = (*testFilteredVariableY)(J);
+                }
+            }
+        }
+    }
+
+    //! filter rhoUT in K direction
+    if (filterDirection[2] == 1)
+    {
+        for (int n = 1; n <= 3; ++ n)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableZ)(K) = testFilteredRhoUT(i, j, K, n);
+                    (*filteredVariableZ)(K) = testFilteredRhoUT(i, j, K, n);                
+                    TestFilter(kst, ked, testFilteredVariableZ, filteredVariableZ);
+                    testFilteredRhoUT(i, j, K, n) = (*testFilteredVariableZ)(K);
+                }
+            }
+        }
+    }
+
+    delete testFilteredVariableX;
+    delete testFilteredVariableY;
+    delete testFilteredVariableZ;
+    delete filteredVariableX;
+    delete filteredVariableY;
+    delete filteredVariableZ;
+}
+
+void LESSolverStruct::ComputeTestFilteredGradT(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    //grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int *filterDirection = parameters->GetFilterDirection();
+
+    RDouble4D &gradT = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradT"));
+    RDouble4D &testFilteredGradT = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredGradT"));
+
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+    if (isFVMOrFDM == FV_METHOD)
+    {
+        ComputeGradT(grid);
+    }
+    else
+    {
+        ComputeGradTFD(grid);
+    }
+
+    RDouble1D *testFilteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *testFilteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *testFilteredVariableZ = new RDouble1D(K, fortranArray);
+    RDouble1D *filteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *filteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *filteredVariableZ = new RDouble1D(K, fortranArray);
+
+    testFilteredGradT(I, J, K, Range(0, 2)) = gradT(I, J, K, Range(0, 2));
+
+    //! filter gradT in I direction
+    if (filterDirection[0] == 1)
+    {
+        for (int n = 0; n <= 2; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    (*testFilteredVariableX)(I) = testFilteredGradT(I, j, k, n);
+                    (*filteredVariableX)(I) = testFilteredGradT(I, j, k, n);
+                    TestFilter(ist, ied, testFilteredVariableX, filteredVariableX);
+                    testFilteredGradT(I, j, k, n) = (*testFilteredVariableX)(I);
+                }
+            }
+        }
+    }
+
+    //! filter gradT in J direction
+    if (filterDirection[1] == 1)
+    {
+        for (int n = 1; n <= 2; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableY)(J) = testFilteredGradT(i, J, k, n);
+                    (*filteredVariableY)(J) = testFilteredGradT(i, J, k, n);
+                    TestFilter(jst, jed, testFilteredVariableY, filteredVariableY);
+                    testFilteredGradT(i, J, k, n) = (*testFilteredVariableY)(J);
+                }
+            }
+        }
+    }
+
+    //! filter gradT in K direction
+    if (filterDirection[2] == 1)
+    {
+        for (int n = 1; n <= 2; ++ n)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableZ)(K) = testFilteredGradT(i, j, K, n);
+                    (*filteredVariableZ)(K) = testFilteredGradT(i, j, K, n);
+                    TestFilter(kst, ked, testFilteredVariableZ, filteredVariableZ);
+                    testFilteredGradT(i, j, K, n) = (*testFilteredVariableZ)(K);
+                }
+            }
+        }
+    }
+
+    delete testFilteredVariableX;
+    delete testFilteredVariableY;
+    delete testFilteredVariableZ;
+    delete filteredVariableX;
+    delete filteredVariableY;
+    delete filteredVariableZ;
+}
+
+void LESSolverStruct::ComputeTestFilteredRhoStrainRateMagnitudeGradT(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int *filterDirection = parameters->GetFilterDirection();
+
+    RDouble4D &q = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D &testFilteredRhoStrainRateMagnitudeGradT = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredRhoStrainRateMagnitudeGradT"));    
+    RDouble4D &strainRateTensor = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("strainRateTensor"));
+    RDouble4D &gradT = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradT"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble rho = q(i, j, k, IR);
+                RDouble strainRateMagnitude = strainRateTensor(i, j, k, 0);
+                RDouble dtdx = gradT(i, j, k, 0);
+                RDouble dtdy = gradT(i, j, k, 1);
+                RDouble dtdz = gradT(i, j, k, 2);
+
+                testFilteredRhoStrainRateMagnitudeGradT(i, j, k, 0) = rho * strainRateMagnitude * dtdx;
+                testFilteredRhoStrainRateMagnitudeGradT(i, j, k, 1) = rho * strainRateMagnitude * dtdy;
+                testFilteredRhoStrainRateMagnitudeGradT(i, j, k, 2) = rho * strainRateMagnitude * dtdz;
+            }
+        }
+    }
+
+    RDouble1D *testFilteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *testFilteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *testFilteredVariableZ = new RDouble1D(K, fortranArray);
+    RDouble1D *filteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *filteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *filteredVariableZ = new RDouble1D(K, fortranArray);
+
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+    //! filter strainRateMagnitudeGradT in I direction
+    if (filterDirection[0] == 1)
+    {
+        for (int n = 0; n <= 2; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    (*testFilteredVariableX)(I) = testFilteredRhoStrainRateMagnitudeGradT(I, j, k, n);
+                    (*filteredVariableX)(I) = testFilteredRhoStrainRateMagnitudeGradT(I, j, k, n);
+                    TestFilter(ist, ied, testFilteredVariableX, filteredVariableX);
+                    testFilteredRhoStrainRateMagnitudeGradT(I, j, k, n) = (*testFilteredVariableX)(I);
+                }
+            }
+        }
+    }
+
+    //! filter strainRateMagnitudeGradT in J direction
+    if (filterDirection[1] == 1) 
+    {
+        for (int n = 0; n <= 2; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableY)(J) = testFilteredRhoStrainRateMagnitudeGradT(i, J, k, n);
+                    (*filteredVariableY)(J) = testFilteredRhoStrainRateMagnitudeGradT(i, J, k, n);
+                    TestFilter(jst, jed, testFilteredVariableY, filteredVariableY);
+                    testFilteredRhoStrainRateMagnitudeGradT(i, J, k, n) = (*testFilteredVariableY)(J);
+                }
+            }
+        }
+    }
+
+    //! filter strainRateMagnitudeGradT in K direction
+    if (filterDirection[2] == 1)
+    {
+        for (int n = 0; n <= 2; ++ n)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableZ)(K) = testFilteredRhoStrainRateMagnitudeGradT(i, j, K, n);
+                    (*filteredVariableZ)(K) = testFilteredRhoStrainRateMagnitudeGradT(i, j, K, n);
+                    TestFilter(kst, ked, testFilteredVariableZ, filteredVariableZ);
+                    testFilteredRhoStrainRateMagnitudeGradT(i, j, K, n) = (*testFilteredVariableZ)(K);
+                }
+            }
+        }
+    }
+
+    delete testFilteredVariableX;
+    delete testFilteredVariableY;
+    delete testFilteredVariableZ;
+    delete filteredVariableX;
+    delete filteredVariableY;
+    delete filteredVariableZ;
+}
+
+void LESSolverStruct::ComputeTestFilteredRhoStrainRateMagnitudeGradTFD(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    int *filterDirection = parameters->GetFilterDirection();
+
+    RDouble4D &q = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_FD"));
+
+    RDouble4D &testFilteredRhoStrainRateMagnitudeGradT = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("testFilteredRhoStrainRateMagnitudeGradT"));    
+    RDouble4D &strainRateTensor = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("strainRateTensor"));
+    RDouble4D &gradT = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradT"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 1);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble rho = q(i, j, k, IR);
+                RDouble strainRateMagnitude = strainRateTensor(i, j, k, 0);
+                RDouble dtdx = gradT(i, j, k, 0);
+                RDouble dtdy = gradT(i, j, k, 1);
+                RDouble dtdz = gradT(i, j, k, 2);
+
+                testFilteredRhoStrainRateMagnitudeGradT(i, j, k, 0) = rho * strainRateMagnitude * dtdx;
+                testFilteredRhoStrainRateMagnitudeGradT(i, j, k, 1) = rho * strainRateMagnitude * dtdy;
+                testFilteredRhoStrainRateMagnitudeGradT(i, j, k, 2) = rho * strainRateMagnitude * dtdz;
+            }
+        }
+    }
+
+    RDouble1D *testFilteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *testFilteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *testFilteredVariableZ = new RDouble1D(K, fortranArray);
+    RDouble1D *filteredVariableX = new RDouble1D(I, fortranArray);
+    RDouble1D *filteredVariableY = new RDouble1D(J, fortranArray);
+    RDouble1D *filteredVariableZ = new RDouble1D(K, fortranArray);
+
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 0);
+    //! filter strainRateMagnitudeGradT in I direction
+    if (filterDirection[0] == 1)
+    {
+        for (int n = 0; n <= 2; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    (*testFilteredVariableX)(I) = testFilteredRhoStrainRateMagnitudeGradT(I, j, k, n);
+                    (*filteredVariableX)(I) = testFilteredRhoStrainRateMagnitudeGradT(I, j, k, n);
+                    TestFilter(ist, ied, testFilteredVariableX, filteredVariableX);
+                    testFilteredRhoStrainRateMagnitudeGradT(I, j, k, n) = (*testFilteredVariableX)(I);
+                }
+            }
+        }
+    }
+
+    //! filter strainRateMagnitudeGradT in J direction
+    if (filterDirection[1] == 1) 
+    {
+        for (int n = 0; n <= 2; ++ n)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableY)(J) = testFilteredRhoStrainRateMagnitudeGradT(i, J, k, n);
+                    (*filteredVariableY)(J) = testFilteredRhoStrainRateMagnitudeGradT(i, J, k, n);
+                    TestFilter(jst, jed, testFilteredVariableY, filteredVariableY);
+                    testFilteredRhoStrainRateMagnitudeGradT(i, J, k, n) = (*testFilteredVariableY)(J);
+                }
+            }
+        }
+    }
+
+    //! filter strainRateMagnitudeGradT in K direction
+    if (filterDirection[2] == 1)
+    {
+        for (int n = 0; n <= 2; ++ n)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    (*testFilteredVariableZ)(K) = testFilteredRhoStrainRateMagnitudeGradT(i, j, K, n);
+                    (*filteredVariableZ)(K) = testFilteredRhoStrainRateMagnitudeGradT(i, j, K, n);
+                    TestFilter(kst, ked, testFilteredVariableZ, filteredVariableZ);
+                    testFilteredRhoStrainRateMagnitudeGradT(i, j, K, n) = (*testFilteredVariableZ)(K);
+                }
+            }
+        }
+    }
+
+    delete testFilteredVariableX;
+    delete testFilteredVariableY;
+    delete testFilteredVariableZ;
+    delete filteredVariableX;
+    delete filteredVariableY;
+    delete filteredVariableZ;
+}
+
+void LESSolverStruct::WALE(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble3D &cellLengthScale = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("cellLengthScale"));
+    RDouble3D &wallFunction = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("wallFunction"));
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+
+    RDouble waleConstant = parameters->GetWaleConstant();
+
+    RDouble iConstant = parameters->GetIsotropicConstant();
+
+    RDouble refReNumber  = parameters->GetRefReNumber();
+
+    RDouble4D &q = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &subgridScaleEnergy = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+    RDouble3D &turbulentPrandtlNumber = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("turbulentPrandtlNumber"));
+
+    RDouble4D &strainRateTensor = * reinterpret_cast<RDouble4D *> (grid->GetDataPtr("strainRateTensor"));
+
+    RDouble eddyViscosityLimit = parameters->GetEddyViscosityLimit();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {                
+                RDouble deltaBar = cellLengthScale(i, j, k);
+
+                RDouble dampingFunction = wallFunction(i, j, k);
+
+                RDouble rho = ABS(q(i, j, k, IR)) + SMALL;
+
+                RDouble s11 = strainRateTensor(i, j, k, 1);
+                RDouble s22 = strainRateTensor(i, j, k, 2);
+                RDouble s33 = strainRateTensor(i, j, k, 3);
+                RDouble s12 = strainRateTensor(i, j, k, 4);
+                RDouble s13 = strainRateTensor(i, j, k, 5);
+                RDouble s23 = strainRateTensor(i, j, k, 6);
+
+                RDouble omega12 = strainRateTensor(i, j, k, 7);
+                RDouble omega13 = strainRateTensor(i, j, k, 8);
+                RDouble omega23 = strainRateTensor(i, j, k, 9);
+
+                RDouble sij2  = s11 * s11 + s22 * s22 + s33 * s33 + 2.0 * (s12 * s12 + s13 * s13 + s23 * s23);
+                RDouble omegaij2 = 2.0 * (omega12 * omega12 + omega13 * omega13 + omega23 * omega23);
+                RDouble sij2SubOmegaij2 = 1.0/3.0 * (sij2 - omegaij2);
+
+                RDouble sd11 = s11 * s11 + s12 * s12 + s13 * s13 - omega12 * omega12 - omega13 * omega13 - sij2SubOmegaij2;
+                RDouble sd22 = s12 * s12 + s22 * s22 + s23 * s23 - omega12 * omega12 - omega23 * omega23 - sij2SubOmegaij2;
+                RDouble sd33 = s13 * s13 + s23 * s23 + s33 * s33 - omega13 * omega13 - omega23 * omega23 - sij2SubOmegaij2;
+                RDouble sd12 = s11 * s12 + s12 * s22 + s13 * s23 - omega13 * omega23;
+                RDouble sd13 = s11 * s13 + s12 * s23 + s13 * s33 + omega12 * omega23;
+                RDouble sd23 = s12 * s13 + s22 * s23 + s23 * s33 - omega12 * omega13;
+
+                RDouble sdij2 = sd11 * sd11 + sd22 * sd22 + sd33 * sd33 + 2.0 * (sd12 * sd12 + sd13 * sd13 + sd23 * sd23);
+
+                RDouble ss = pow(sdij2, 1.5) / (pow(sij2, 2.5) + pow(sdij2, 1.25) + SMALL);
+
+                RDouble mut = (waleConstant * deltaBar * dampingFunction) * (waleConstant * deltaBar * dampingFunction) * rho * ss * refReNumber;
+                mut = MIN(eddyViscosityLimit, mut);
+                RDouble kSGS = 2.0 * iConstant / rho * (mut /deltaBar) * (mut /deltaBar) / refReNumber;  //! Divide by one refReNumber here, and divide by another refReNumber in the Viscousflux.
+
+                viscousTurbulence(i, j, k) = mut;
+                subgridScaleEnergy(i, j, k) = kSGS;
+            }
+        }
+    }
+
+    RDouble prandtlTurbulence = parameters->GetPrandtlTurbulence();
+
+    turbulentPrandtlNumber = prandtlTurbulence;
+}
+
+void LESSolverStruct::Sigma(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble3D &cellLengthScale = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("cellLengthScale"));
+    RDouble3D &wallFunction = * reinterpret_cast<RDouble3D *> (grid->GetDataPtr("wallFunction"));
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+
+    RDouble sigmaConstant = parameters->GetSigmaConstant();
+
+    RDouble refReNumber  = parameters->GetRefReNumber();
+
+    RDouble4D &q = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &subgridScaleEnergy = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+    RDouble3D &turbulentPrandtlNumber = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("turbulentPrandtlNumber"));
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    RDouble eddyViscosityLimit = parameters->GetEddyViscosityLimit();
+
+    int imax = 1;
+    int jmax = 1;
+    int kmax = 1;
+
+    int imin = 1;
+    int jmin = 1;
+    int kmin = 1;
+
+    RDouble viscousTurbulenceMaximum = -1.0e30;
+    RDouble viscousTurbulenceMinimum = 1.0e30;
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble ** velocityGradTensor = AleModel :: CreateMatrix();
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                velocityGradTensor[0][0] = gradUVWTCellCenterX(i, j, k, 0);
+                velocityGradTensor[0][1] = gradUVWTCellCenterY(i, j, k, 0);
+                velocityGradTensor[0][2] = gradUVWTCellCenterZ(i, j, k, 0);
+
+                velocityGradTensor[1][0] = gradUVWTCellCenterX(i, j, k, 1);
+                velocityGradTensor[1][1] = gradUVWTCellCenterY(i, j, k, 1);
+                velocityGradTensor[1][2] = gradUVWTCellCenterZ(i, j, k, 1);
+
+                velocityGradTensor[2][0] = gradUVWTCellCenterX(i, j, k, 2);
+                velocityGradTensor[2][1] = gradUVWTCellCenterY(i, j, k, 2);
+                velocityGradTensor[2][2] = gradUVWTCellCenterZ(i, j, k, 2);
+
+                RDouble differentialSigma = 0.0;
+                ComputeDifferentialSigma(velocityGradTensor, differentialSigma);
+
+                RDouble deltaBar = cellLengthScale(i, j, k);
+                RDouble rho = ABS(q(i, j, k, IR)) + SMALL;
+                RDouble dampingFunction = wallFunction(i, j, k);
+
+                RDouble mut = rho * (sigmaConstant * deltaBar * dampingFunction) * (sigmaConstant * deltaBar * dampingFunction) * differentialSigma * refReNumber;
+                mut = MIN(eddyViscosityLimit, mut);
+
+                viscousTurbulence(i, j, k) = mut;
+                subgridScaleEnergy(i, j, k) = 0.0;
+
+                if (viscousTurbulenceMaximum < mut)
+                {
+                    viscousTurbulenceMaximum = mut;
+                    imax = i;
+                    jmax = j;
+                    kmax = k;
+                }
+
+                if (viscousTurbulenceMinimum > mut)
+                {
+                    viscousTurbulenceMinimum = mut;
+                    imin = i;
+                    jmin = j;
+                    kmin = k;
+                }
+            }
+        }
+    }
+
+    RDouble prandtlTurbulence = parameters->GetPrandtlTurbulence();
+
+    turbulentPrandtlNumber = prandtlTurbulence;
+
+    AleModel::DestroyMatrix(velocityGradTensor);
+}
+
+void LESSolverStruct::ComputeDifferentialSigma(RDouble ** velocityGradTensor, RDouble &differentialSigma)
+{
+    RDouble ** velocityGradTensorTranspose = AleModel :: CreateMatrix();
+    RDouble ** gij = AleModel :: CreateMatrix();
+    RDouble ** gij2 = AleModel :: CreateMatrix();
+
+    AleModel::SetMatrix(velocityGradTensorTranspose, velocityGradTensor);
+
+    AleModel::TransposeMatrix(velocityGradTensorTranspose);
+
+    AleModel::MatrixMultiply(velocityGradTensorTranspose, velocityGradTensor, gij);
+
+    AleModel::MatrixMultiply(gij, gij, gij2);
+
+    RDouble tracegij = gij[0][0] + gij[1][1] + gij[2][2];
+    RDouble tracegij2 = gij2[0][0] + gij2[1][1] + gij2[2][2];
+
+    RDouble detgij = gij[0][0] * (gij[1][1] * gij[2][2] - gij[1][2] * gij[2][1])
+                   - gij[0][1] * (gij[1][0] * gij[2][2] - gij[1][2] * gij[2][0])
+                   + gij[0][2] * (gij[1][0] * gij[2][1] - gij[1][1] * gij[2][0]);
+
+    RDouble t1 = tracegij;
+    RDouble t2 = 0.5 * (tracegij * tracegij - tracegij2);
+    RDouble t3 = detgij;
+
+    RDouble alpha1 = t1 * t1 / 9.0 - t2 / 3.0;
+    RDouble alpha2 = t1 * t1 * t1 / 27.0 - t1 * t2 / 6.0 + t3 / 2.0;
+    RDouble alpha3 = 1.0 /3.0 * acos(MAX(MIN(alpha2 / sqrt(alpha1 * alpha1 * alpha1), 1.0), -1.0));
+
+    RDouble sigma1 = sqrt(MAX(t1 / 3.0 + 2.0 * sqrt(alpha1) * cos(alpha3), 0.0));
+    RDouble sigma2 = sqrt(MAX(t1 / 3.0 - 2.0 * sqrt(alpha1) * cos(acos(0.5) + alpha3), 0.0));
+    RDouble sigma3 = sqrt(MAX(t1 / 3.0 - 2.0 * sqrt(alpha1) * cos(acos(0.5) - alpha3), 0.0));
+
+    differentialSigma = sigma3 * (sigma1 - sigma2) * (sigma2 - sigma3) / sigma1 / sigma1;
+    differentialSigma = MAX(differentialSigma, 0.0);
+
+    AleModel::DestroyMatrix(velocityGradTensorTranspose);
+    AleModel::DestroyMatrix(gij);
+    AleModel::DestroyMatrix(gij2);
+}
+
+void LESSolverStruct::filter(const int & nn
+                            , RFloat1D * fu1, RFloat1D * fu2, RFloat1D * fu3
+                            , RFloat1D * fuifuj11, RFloat1D * fuifuj22, RFloat1D * fuifuj33, RFloat1D * fuifuj12, RFloat1D * fuifuj13, RFloat1D * fuifuj23
+                            , RFloat1D * fs11    , RFloat1D * fs22    , RFloat1D * fs33    , RFloat1D * fs12    , RFloat1D * fs13    , RFloat1D * fs23    
+                            , RFloat1D * fsfs11  , RFloat1D * fsfs22  , RFloat1D * fsfs33  , RFloat1D * fsfs12  , RFloat1D * fsfs13  , RFloat1D * fsfs23)
+{
+    //! Get TF(ui)
+    TestFilter(nn, fu1);
+    TestFilter(nn, fu2);
+    TestFilter(nn, fu3);
+    //! Get T(F(ui)F(uj))
+    TestFilter(nn, fuifuj11);
+    TestFilter(nn, fuifuj22);
+    TestFilter(nn, fuifuj33);
+    TestFilter(nn, fuifuj12);
+    TestFilter(nn, fuifuj13);
+    TestFilter(nn, fuifuj23);
+    //! Get T(F(Sij))
+    TestFilter(nn, fs11);
+    TestFilter(nn, fs22);
+    TestFilter(nn, fs33);
+    TestFilter(nn, fs12);
+    TestFilter(nn, fs13);
+    TestFilter(nn, fs23);
+    //! Get T(F(|S|)F(Sij))
+    TestFilter(nn, fsfs11);
+    TestFilter(nn, fsfs22);
+    TestFilter(nn, fsfs33);
+    TestFilter(nn, fsfs12);
+    TestFilter(nn, fsfs13);
+    TestFilter(nn, fsfs23);
+}
+
+void LESSolverStruct::TestFilter(const int &nn, RFloat1D *fu)
+{
+    RFloat1D *tfu;
+    Range II(1,nn);
+    tfu = new RFloat1D(II, fortranArray);
+    (* tfu) = 0.0;
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+
+    int testFilterWidth = parameters->GetTestFilterWidth();
+
+    RDouble * testFilterCoef = parameters->GetTestFilterCoef();
+
+    for (int i = 1; i <= (nn-1); ++ i)
+    {
+        (*tfu)(i) = 0.0;
+        for (int nw = -testFilterWidth; nw <= testFilterWidth; ++ nw)
+        {
+            RDouble coef = testFilterCoef[nw + testFilterWidth];
+            RDouble f = (*fu)(i+nw);
+
+            (*tfu)(i) = (*tfu)(i) + coef * f;
+        }
+    }
+
+    for (int i = 1; i <= (nn-1); ++ i)
+    {
+        (*fu)(i) = (*tfu)(i);
+    }
+
+    delete tfu;
+}
+
+void LESSolverStruct::TestFilter(const int &n0, const int &nn, RDouble1D *&tf, RDouble1D *&f)
+{
+    Param_LESSolverStruct *parameters = GetControlParameters();
+
+    int testFilterWidth = parameters->GetTestFilterWidth();
+
+    RDouble * testFilterCoef = parameters->GetTestFilterCoef();
+
+    for (int i = n0; i <= nn; ++ i)
+    {
+        RDouble sum = 0.0;
+        for (int nw = -testFilterWidth; nw <= testFilterWidth; ++ nw)
+        {
+            RDouble coef = testFilterCoef[nw + testFilterWidth];
+            RDouble x = (*f)(i + nw);
+            sum = sum + coef * x;
+
+            (*tf)(i) = sum;
+        }
+    }
+}
+
+void LESSolverStruct::TestFilter(const int &n0, const int &nn, RDouble *tf, RDouble *f)
+{
+    Param_LESSolverStruct *parameters = GetControlParameters();
+
+    int testFilterWidth = parameters->GetTestFilterWidth();
+
+    RDouble * testFilterCoef = parameters->GetTestFilterCoef();
+
+    for (int i = n0; i <= nn; ++ i)
+    {
+        tf[i] = 0.0;
+        for (int nw = -testFilterWidth; nw <= testFilterWidth; ++ nw)
+        {
+            tf[i] = tf[i] + testFilterCoef[nw + testFilterWidth] * f[i+nw];
+        }
+    }
+}
+
+void LESSolverStruct::GetDeltaBar(const int deltaFunctionType, const RDouble deltai, const RDouble deltaj, const RDouble deltak, RDouble &deltaBar)
+{
+    if (deltaFunctionType == 1)
+    {
+        deltaBar = MAX(MAX(deltai, deltaj), deltak);
+    }
+    else if (deltaFunctionType == 2)
+    {
+        deltaBar = pow((deltaj * deltak * deltai), third);
+    }
+    else if (deltaFunctionType == 3)
+    {
+        GetFilterWidthOfScotti(deltai, deltaj, deltak, deltaBar);
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("deltaFunctionType", deltaFunctionType);
+    }
+}
+
+void LESSolverStruct::GetFilterWidthOfScotti(const RDouble deltai, const RDouble deltaj, const RDouble deltak, RDouble &deltaBar)
+{
+    RDouble deltaMax = MAX(MAX(deltai, deltaj), deltak);
+    RDouble a1 = deltai / deltaMax;
+    RDouble a2 = deltaj / deltaMax;
+    RDouble a3 = deltak / deltaMax;
+
+    if (a2 < a1)
+    {
+        RDouble atmp = a1;
+        a1 = a2;
+        a2 = atmp;
+    }
+    if (a3 < a1)
+    {
+        RDouble atmp = a1;
+        a1 = a3;
+        a3 = atmp;
+    }
+    if (a3 < a2)
+    {
+        RDouble atmp = a2;
+        a2 = a3;
+        a3 = atmp;
+    }
+
+    deltaBar = cosh(sqrt(4.0 / 27.0) * (log(a1) * log(a1) - log(a1) * log(a2) + log(a2) * log(a2)));
+}
+
+void LESSolverStruct::Boundary(Grid *gridIn)
+{
+    int isFVMOrFDM = GlobalDataBase::GetIntParaFromDB("isFVMOrFDM");
+    if (isFVMOrFDM == FD_METHOD) return;
+
+    using namespace PHENGLEI;
+    StructGrid *grid = StructGridCast(gridIn);
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (IsInterface(BCType))
+        {
+            continue;
+        }
+        else if (BCType == EXTRAPOLATION)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (IsWall(BCType))
+        {
+            VisWall(grid, structBC);
+        }
+        else if (BCType == SYMMETRY)
+        {
+            SymmetryBC(grid, structBC);
+        }
+        else if (BCType == FARFIELD)
+        {
+            FarFieldBC(grid, structBC);
+        }
+        else if (BCType == INFLOW)
+        {
+            InFlowBC(grid, structBC);
+        }
+        else if (BCType == PRESSURE_INLET)
+        {
+            InFlowBC(grid, structBC);
+        }
+        else if (BCType == MASS_FLOW_INLET)
+        {
+            InFlowBC(grid, structBC);
+        }
+        else if (BCType == OUTFLOW)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == PRESSURE_OUTLET)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == MASS_FLOW_OUTLET)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == POLE || BCType / 10 == POLE)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == EXTERNAL_BC)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else
+        {
+            ostringstream oss;
+            oss << "Error : Illegal BCtype ID " << BCType << endl;
+            TK_Exit::ExceptionExit(oss);
+        }
+    }
+
+    CornerPoint(grid);
+}
+
+void LESSolverStruct::ObtainBoundaryValue(Grid *gridIn)
+{
+    using namespace PHENGLEI;
+    StructGrid *grid = StructGridCast(gridIn);
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (IsInterface(BCType))
+        {
+            continue;
+        }
+        else if (BCType == EXTRAPOLATION)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (IsWall(BCType))
+        {
+            VisWall(grid, structBC);
+        }
+        else if (BCType == SYMMETRY)
+        {
+            SymmetryBC(grid, structBC);
+        }
+        else if (BCType == FARFIELD)
+        {
+            FarFieldBC(grid, structBC);
+        }
+        else if (BCType == INFLOW)
+        {
+            InFlowBC(grid, structBC);
+        }
+        else if (BCType == PRESSURE_INLET)
+        {
+            InFlowBC(grid, structBC);
+        }
+        else if (BCType == MASS_FLOW_INLET)
+        {
+            InFlowBC(grid, structBC);
+        }
+        else if (BCType == OUTFLOW)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == PRESSURE_OUTLET)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == MASS_FLOW_OUTLET)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == POLE || BCType / 10 == POLE)
+        {
+            OutFlowBC(grid, structBC);
+        }
+
+        else if (BCType == EXTERNAL_BC)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else
+        {
+            ostringstream oss;
+            oss << "Error : Illegal BCtype ID " << BCType << endl;
+            TK_Exit::ExceptionExit(oss);
+        }
+    }
+
+    CornerPoint(grid);
+}
+
+void LESSolverStruct::CornerPoint(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble3D & viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    FillCornerPoint3D(viscousTurbulence, ni, nj, nk);
+}
+
+void LESSolverStruct::VisWall(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble3D &viscousTurbulence   = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &subgridScaleEnergy = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    using namespace IDX;
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni-1, nj-1, nk-1);
+                RestrictIndex(is2, js2, ks2, ni-1, nj-1, nk-1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                viscousTurbulence(it1, jt1, kt1) = -viscousTurbulence(is1, js1, ks1);
+                viscousTurbulence(it2, jt2, kt2) = -viscousTurbulence(is2, js2, ks2);
+
+                subgridScaleEnergy(it1, jt1, kt1) = -subgridScaleEnergy(is1, js1, ks1);
+                subgridScaleEnergy(it2, jt2, kt2) = -subgridScaleEnergy(is2, js2, ks2);
+            }
+        }
+    }
+}
+
+void LESSolverStruct::FarFieldBC(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &faceNormalX  = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalY  = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalZ  = *(grid->GetFaceNormalZ());
+
+    Param_LESSolverStruct *parameters = GetControlParameters();
+
+    RDouble4D &qLaminar         = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &gamma            = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &subgridScaleEnergy = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+
+    int nm = GlobalDataBase::GetIntParaFromDB("nm");
+
+    RDouble refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+    RDouble freeStreamViscosity = parameters->GetFreeStreamViscosity();
+
+    using namespace IDX;
+
+    RDouble *primitiveVariablesInfinity = reinterpret_cast<RDouble *> (GlobalDataBase::GetDataPtr("prim_inf"));
+    RDouble rFarfield = primitiveVariablesInfinity[IR];
+    RDouble uFarfield = primitiveVariablesInfinity[IU];
+    RDouble vFarfield = primitiveVariablesInfinity[IV];
+    RDouble wFarfield = primitiveVariablesInfinity[IW];
+    RDouble pFarfield = primitiveVariablesInfinity[IP];
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+    int leftOrRightIndex    = structBC->GetFaceLeftOrRightIndex();
+
+    RDouble *prims1 = new RDouble [nm];
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int in, jn, kn;
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+                RDouble nxs = leftOrRightIndex * faceNormalX(in, jn, kn, iSurface);
+                RDouble nys = leftOrRightIndex * faceNormalY(in, jn, kn, iSurface);
+                RDouble nzs = leftOrRightIndex * faceNormalZ(in, jn, kn, iSurface);
+
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni-1, nj-1, nk-1);
+                RestrictIndex(is2, js2, ks2, ni-1, nj-1, nk-1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                for (int m = 0; m < nm; ++ m)
+                {
+                    prims1[m] = qLaminar(is1, js1, ks1, m);
+                }
+
+                RDouble rin = prims1[IR];
+                RDouble uin = prims1[IU];
+                RDouble vin = prims1[IV];
+                RDouble win = prims1[IW];
+                RDouble pin = prims1[IP];
+
+                RDouble vno = nxs * uFarfield + nys * vFarfield + nzs * wFarfield;
+                RDouble vni = nxs * uin + nys * vin + nzs * win;
+                RDouble vei = sqrt(uin * uin + vin * vin + win * win);
+
+                RDouble gama = gamma(is1, js1, ks1);
+
+                RDouble coo = sqrt(ABS(refGama * pFarfield / rFarfield));
+                RDouble cIN = sqrt(ABS(gama  * pin / rin));
+
+                if (vei > cIN)
+                {
+                    if (vni >= 0.0)
+                    {
+                        viscousTurbulence(it1, jt1, kt1) = viscousTurbulence(is1, js1, ks1);
+                        viscousTurbulence(it2, jt2, kt2) = viscousTurbulence(is2, js2, ks2);
+
+                        subgridScaleEnergy(it1, jt1, kt1) = subgridScaleEnergy(is1, js1, ks1);
+                        subgridScaleEnergy(it2, jt2, kt2) = subgridScaleEnergy(is2, js2, ks2);
+                    }
+                    else
+                    {
+                        viscousTurbulence(it1, jt1, kt1) = freeStreamViscosity;
+                        viscousTurbulence(it2, jt2, kt2) = freeStreamViscosity;
+
+                        subgridScaleEnergy(it1, jt1, kt1) = 0.0;
+                        subgridScaleEnergy(it2, jt2, kt2) = 0.0;
+                    }
+                    continue;
+                }
+
+                RDouble riemp = vni + 2.0 * cIN / (gama  - 1.0);
+                RDouble riemm = vno - 2.0 * coo / (refGama - 1.0);
+                RDouble vnb = half * (riemp + riemm);
+
+                if (vnb  >= 0.0)
+                {
+                    //! Exit.
+                    viscousTurbulence(it1, jt1, kt1) = viscousTurbulence(is1, js1, ks1);
+                    viscousTurbulence(it2, jt2, kt2) = viscousTurbulence(it1, jt1, kt1);
+
+                    subgridScaleEnergy(it1, jt1, kt1) = subgridScaleEnergy(is1, js1, ks1);
+                    subgridScaleEnergy(it2, jt2, kt2) = subgridScaleEnergy(it1, jt1, kt1);
+                }
+                else
+                {
+                    //! Inlet.
+                    viscousTurbulence(it1, jt1, kt1) = freeStreamViscosity;
+                    viscousTurbulence(it2, jt2, kt2) = freeStreamViscosity;
+
+                    subgridScaleEnergy(it1, jt1, kt1) = 0.0;
+                    subgridScaleEnergy(it2, jt2, kt2) = 0.0;
+                }
+            }
+        }
+    }
+    delete [] prims1;
+}
+
+void LESSolverStruct::SymmetryBC(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &subgridScaleEnergy = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int is, js, ks, it, jt, kt;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int layer = 1; layer <= 2; ++ layer)
+                {
+                    structBC->GetInsideCellIndex(i, j, k, is, js, ks, layer);
+                    RestrictIndex(is, js, ks, ni-1, nj-1, nk-1);
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    viscousTurbulence(it, jt, kt) = viscousTurbulence(is, js, ks);
+                    subgridScaleEnergy(it, jt, kt) = subgridScaleEnergy(is, js, ks);
+                }
+            }
+        }
+    }
+}
+
+void LESSolverStruct::InFlowBC(Grid *grid, StructBC *structBC)
+{
+    Param_LESSolverStruct *parameters = GetControlParameters();
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &subgridScaleEnergy = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+    RDouble freeStreamViscosity = parameters->GetFreeStreamViscosity();
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int it, jt, kt;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int layer = 1; layer <= 2; ++ layer)
+                {
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    viscousTurbulence(it, jt, kt) = freeStreamViscosity;
+                    subgridScaleEnergy(it, jt, kt) = 0.0;
+                }
+            }
+        }
+    }
+}
+
+void LESSolverStruct::OutFlowBC(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &subgridScaleEnergy = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("subgridScaleEnergy"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni-1, nj-1, nk-1);
+                RestrictIndex(is2, js2, ks2, ni-1, nj-1, nk-1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                viscousTurbulence(it1, jt1, kt1) = viscousTurbulence(is1, js1, ks1);
+                viscousTurbulence(it2, jt2, kt2) = viscousTurbulence(it1, jt1, kt1);
+
+                subgridScaleEnergy(it1, jt1, kt1) = subgridScaleEnergy(is1, js1, ks1);
+                subgridScaleEnergy(it2, jt2, kt2) = subgridScaleEnergy(it1, jt1, kt1);
+            }
+        }
+    }
+}
+
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/src/LESSolverUnstr.cpp b/CFD/TurbSolver/src/LESSolverUnstr.cpp
new file mode 100644
index 0000000..2e64cef
--- /dev/null
+++ b/CFD/TurbSolver/src/LESSolverUnstr.cpp
@@ -0,0 +1,1063 @@
+#include "LESSolverUnstr.h"
+#include "Geo_UnstructBC.h"
+#include "IO_FileName.h"
+#include "MultiGridOperation.h"
+#include "PHMatrix.h"
+#include "TK_Exit.h"
+#include "Param_LESSolverUnstruct.h"
+#include "Residual.h"
+#include "FieldProxy.h"
+#include "Math_BasisFunction.h"
+#include "Constants.h"
+#include "TK_Log.h"
+#include "IO_FileName.h"
+#include "Geo_Grid.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+LESSolverUnstr::LESSolverUnstr()
+{
+
+}
+
+LESSolverUnstr::~LESSolverUnstr()
+{
+
+}
+
+void LESSolverUnstr::AllocateGlobalVar(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal = numberOfBoundaryFace + numberOfTotalCell;
+
+    RDouble *cellLengthScale = new RDouble[numberOfTotalCell];    //! Length scale of cell.
+    grid->UpdateDataPtr("cellLengthScale", cellLengthScale);
+
+    RDouble **strainRateTensor = NewPointer2<RDouble>(10, numberOfTotal);    //! Strain Rate Tensor Sij and Omegaij
+    grid->UpdateDataPtr("strainRateTensor", strainRateTensor);
+
+    RDouble *wallFunction = new RDouble[numberOfTotalCell];    //! Wall damping function.
+    grid->UpdateDataPtr("wallFunction", wallFunction);
+
+    Init(grid);
+}
+
+void LESSolverUnstr::DeAllocateGlobalVar(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **strainRateTensor = reinterpret_cast<RDouble **> (grid->GetDataPtr("strainRateTensor"));
+    DelPointer2(strainRateTensor);
+
+    RDouble *cellLengthScale  = reinterpret_cast<RDouble *> (grid->GetDataPtr("cellLengthScale"));
+    delete []cellLengthScale;
+
+    RDouble *wallFunction  = reinterpret_cast<RDouble *> (grid->GetDataPtr("wallFunction"));
+    delete []wallFunction;
+}
+
+void LESSolverUnstr::InitFlowAsRestart()
+{
+    UnstructGrid *grid = UnstructGridCast(GetGrid(0));
+
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    Param_LESSolverUnstruct *parameters = GetControlParameters();
+    RDouble freeStreamViscosity = parameters->GetFreeStreamViscosity();
+
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble  *> (grid->GetDataPtr("vist"));
+    RDouble *subgridScaleEnergy = reinterpret_cast<RDouble  *> (grid->GetDataPtr("subgridScaleEnergy"));
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        viscousTurbulence[iCell] = freeStreamViscosity;
+        subgridScaleEnergy[iCell] = 0.0;
+    }
+}
+
+void LESSolverUnstr::Init(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    ComputeCellLengthScale(grid);
+}
+
+void LESSolverUnstr::ComputeCellLengthScale(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    RDouble *vol  = grid->GetCellVolume();
+    RDouble *cellLengthScale = reinterpret_cast<RDouble *> (grid->GetDataPtr("cellLengthScale"));
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        RDouble volume = vol[iCell];
+
+        cellLengthScale[iCell] = pow(volume, third);
+    }
+}
+
+void LESSolverUnstr::Boundary(Grid *gridIn)
+{
+    /*
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *wallDistance = grid->GetWallDist();
+
+    RDouble  *nxs  = grid->GetFaceNormalX();
+    RDouble  *nys  = grid->GetFaceNormalY();
+    RDouble  *nzs  = grid->GetFaceNormalZ();
+
+    UnstructBCSet **bcRecord = grid->GetBCRecord();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+
+    Param_LESSolverUnstruct *parameters = GetControlParameters();
+    RDouble **q      = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *gamma = reinterpret_cast<RDouble *> (grid->GetDataPtr("gama"));
+    RDouble *viscousLaminar = reinterpret_cast<RDouble  *> (grid->GetDataPtr("visl"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble  *> (grid->GetDataPtr("vist"));
+
+    RDouble freeStreamViscosity = parameters->GetFreeStreamViscosity();
+
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble refGama = parameters->GetRefGama();
+
+    using namespace IDX;
+    using namespace PHENGLEI;
+
+    RDouble *primitiveVariableInflow = reinterpret_cast<RDouble *> (GlobalDataBase::GetDataPtr("prim_inf"));
+    RDouble roo = primitiveVariableInflow[IR];
+    RDouble uoo = primitiveVariableInflow[IU];
+    RDouble voo = primitiveVariableInflow[IV];
+    RDouble woo = primitiveVariableInflow[IW];
+    RDouble poo = primitiveVariableInflow[IP];
+
+    RDouble gamm1 = refGama - 1.0;
+
+    int count = 0;
+
+    for (int iFace = 0; iFace < numberOfBoundaryFace; ++ iFace)
+    {
+        int le = leftCellOfFace [iFace];
+        int re = rightCellOfFace[iFace];
+        int bcType = bcRecord[iFace]->GetKey();
+
+        if (IsInterface(bcType))
+        {
+            //! This statement is very important, and related to the way this part is written.
+            continue;
+        }
+        else if (bcType == EXTRAPOLATION)
+        {
+            viscousTurbulence[re] = viscousTurbulence[le];
+        }
+        else if (IsWall(bcType))
+        {
+            viscousTurbulence[re] = -viscousTurbulence[le];
+        }
+        else if (bcType == SYMMETRY)
+        {
+            viscousTurbulence[re] = viscousTurbulence[le];
+        }
+        else if (bcType == FARFIELD)
+        {
+            RDouble rin,uin,vin,win,pin;
+            RDouble vno,vni,vei,coo,cin;
+            RDouble riemp,riemm,cb,vnb;
+
+            rin = q[IR][le];
+            uin = q[IU][le];
+            vin = q[IV][le];
+            win = q[IW][le];
+            pin = q[IP][le];
+
+            vno = nxs[iFace] * uoo + nys[iFace] * voo + nzs[iFace] * woo;
+            vni = nxs[iFace] * uin + nys[iFace] * vin + nzs[iFace] * win;
+            vei = sqrt(uin * uin + vin * vin + win * win);
+
+            RDouble gama = gamma[le];
+
+            coo = sqrt(ABS(refGama * poo / roo));
+            cin = sqrt(ABS(gama  * pin / rin));
+
+            //! supersonic
+            if (vei > cin)
+            {
+                if (vni >= 0.0)
+                {
+                    //! exit
+                    viscousTurbulence[re] = viscousTurbulence[le];
+                }
+                else
+                {
+                    //! inlet
+                    viscousTurbulence[re] = freeStreamViscosity;
+                }
+                continue;
+            }
+
+            //! subsonic
+            riemp = vni + 2.0 * cin / (gama  - 1.0);
+            riemm = vno - 2.0 * coo / (refGama - 1.0);
+            vnb   = half   * (riemp + riemm);
+            cb    = fourth * (riemp - riemm) * gama;
+
+            if (vnb >= 0.0)
+            {
+                //! exit
+                viscousTurbulence[re] = viscousTurbulence[le];
+            }
+            else
+            {
+                //! inlet
+                viscousTurbulence[re] = freeStreamViscosity;
+            }
+
+        }
+        else if (bcType == INFLOW)
+        {
+            viscousTurbulence[re] = freeStreamViscosity;
+        }
+        else if (bcType == PRESSURE_INLET)
+        {
+            viscousTurbulence[re] = freeStreamViscosity;
+        }
+        else if (bcType == MASS_FLOW_INLET)
+        {
+            viscousTurbulence[re] = freeStreamViscosity;
+        }
+        else if (bcType == OUTFLOW)
+        {
+            viscousTurbulence[re] = viscousTurbulence[le];
+        }
+        else if (bcType == PRESSURE_OUTLET)
+        {
+            viscousTurbulence[re] = viscousTurbulence[le];
+        }
+        else if (bcType == MASS_FLOW_OUTLET)
+        {
+            viscousTurbulence[re] = viscousTurbulence[le];
+        }
+        else
+        {
+            viscousTurbulence[re] = viscousTurbulence[le];
+        }
+    }
+    */
+}
+
+void LESSolverUnstr::ObtainBoundaryValue(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble  *nxs  = grid->GetFaceNormalX();
+    RDouble  *nys  = grid->GetFaceNormalY();
+    RDouble  *nzs  = grid->GetFaceNormalZ();
+
+    UnstructBCSet **bcRecord = grid->GetBCRecord();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+
+    Param_LESSolverUnstruct *parameters = GetControlParameters();
+    RDouble **q      = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *gamma = reinterpret_cast<RDouble *> (grid->GetDataPtr("gama"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble  *> (grid->GetDataPtr("vist"));
+    RDouble *subgridScaleEnergy = reinterpret_cast<RDouble  *> (grid->GetDataPtr("subgridScaleEnergy"));
+
+    RDouble freeStreamViscosity = parameters->GetFreeStreamViscosity();
+
+    RDouble refGama = parameters->GetRefGama();
+
+    using namespace IDX;
+    using namespace PHENGLEI;
+
+    RDouble *primitiveVariableInflow = reinterpret_cast<RDouble *> (GlobalDataBase::GetDataPtr("prim_inf"));
+    RDouble roo = primitiveVariableInflow[IR];
+    RDouble uoo = primitiveVariableInflow[IU];
+    RDouble voo = primitiveVariableInflow[IV];
+    RDouble woo = primitiveVariableInflow[IW];
+    RDouble poo = primitiveVariableInflow[IP];
+
+    for (int iFace = 0; iFace < numberOfBoundaryFace; ++ iFace)
+    {
+        int le = leftCellOfFace [iFace];
+        int re = rightCellOfFace[iFace];
+        int bcType = bcRecord[iFace]->GetKey();
+
+        if (IsInterface(bcType))
+        {
+            //! This statement is very important, and related to the way this part is written.
+            continue;
+        }
+        else if (bcType == EXTRAPOLATION)
+        {
+            viscousTurbulence[re] = viscousTurbulence[le];
+            subgridScaleEnergy[re] = subgridScaleEnergy[le];
+        }
+        else if (IsWall(bcType))
+        {
+            viscousTurbulence[re] = -viscousTurbulence[le];
+            subgridScaleEnergy[re] = -subgridScaleEnergy[le];
+        }
+        else if (bcType == SYMMETRY)
+        {
+            viscousTurbulence[re] = viscousTurbulence[le];
+            subgridScaleEnergy[re] = subgridScaleEnergy[le];
+        }
+        else if (bcType == FARFIELD)
+        {
+            RDouble rin,uin,vin,win,pin;
+            RDouble vno,vni,vei,coo,cIN;
+            RDouble riemp,riemm,cb,vnb;
+
+            rin = q[IR][le];
+            uin = q[IU][le];
+            vin = q[IV][le];
+            win = q[IW][le];
+            pin = q[IP][le];
+
+            vno = nxs[iFace] * uoo + nys[iFace] * voo + nzs[iFace] * woo;
+            vni = nxs[iFace] * uin + nys[iFace] * vin + nzs[iFace] * win;
+            vei = sqrt(uin * uin + vin * vin + win * win);
+
+            RDouble gama = gamma[le];
+
+            coo = sqrt(ABS(refGama * poo / roo));
+            cIN = sqrt(ABS(gama  * pin / rin));
+
+            //! supersonic
+            if (vei > cIN)
+            {
+                if (vni >= 0.0)
+                {
+                    //! exit
+                    viscousTurbulence[re] = viscousTurbulence[le];
+                    subgridScaleEnergy[re] = subgridScaleEnergy[le];
+                }
+                else
+                {
+                    //! inlet
+                    viscousTurbulence[re] = freeStreamViscosity;
+                    subgridScaleEnergy[re] = 0.0;
+                }
+                continue;
+            }
+
+            //! subsonic
+            riemp = vni + 2.0 * cIN / (gama  - 1.0);
+            riemm = vno - 2.0 * coo / (refGama - 1.0);
+            vnb   = half   * (riemp + riemm);
+            cb    = fourth * (riemp - riemm) * gama;
+
+            if (vnb >= 0.0)
+            {
+                //! exit
+                viscousTurbulence[re] = viscousTurbulence[le];
+                subgridScaleEnergy[re] = subgridScaleEnergy[le];
+            }
+            else
+            {
+                //! inlet
+                viscousTurbulence[re] = freeStreamViscosity;
+                subgridScaleEnergy[re] = 0.0;
+            }
+
+        }
+        else if (bcType == INFLOW)
+        {
+            viscousTurbulence[re] = freeStreamViscosity;
+            subgridScaleEnergy[re] = 0.0;
+        }
+        else if (bcType == PRESSURE_INLET)
+        {
+            viscousTurbulence[re] = freeStreamViscosity;
+            subgridScaleEnergy[re] = 0.0;
+        }
+        else if (bcType == MASS_FLOW_INLET)
+        {
+            viscousTurbulence[re] = freeStreamViscosity;
+            subgridScaleEnergy[re] = 0.0;
+        }
+        else if (bcType == OUTFLOW)
+        {
+            viscousTurbulence[re] = viscousTurbulence[le];
+            subgridScaleEnergy[re] = subgridScaleEnergy[le];
+        }
+        else if (bcType == PRESSURE_OUTLET)
+        {
+            viscousTurbulence[re] = viscousTurbulence[le];
+            subgridScaleEnergy[re] = subgridScaleEnergy[le];
+        }
+        else if (bcType == MASS_FLOW_OUTLET)
+        {
+            viscousTurbulence[re] = viscousTurbulence[le];
+            subgridScaleEnergy[re] = subgridScaleEnergy[le];
+        }
+        else
+        {
+            viscousTurbulence[re] = viscousTurbulence[le];
+            subgridScaleEnergy[re] = subgridScaleEnergy[le];
+        }
+    }
+}
+
+void LESSolverUnstr::ComputeGradient(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    if(grid->IsFinestGrid())
+    {
+        GetGradientField(grid);
+    }
+    else
+    {
+        return;
+    }
+}
+
+void LESSolverUnstr::GetGradientField(Grid *gridIn)
+{ 
+    UnstructGrid *gridUnstruct = UnstructGridCast(gridIn);
+    int nEquation = GetNumberOfEquations();
+
+    RDouble **gradPrimtiveVarX = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **gradPrimtiveVarY = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **gradPrimtiveVarZ = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradPrimtiveVarZ"));
+    FieldProxy *qProxy = GetFieldProxy(gridIn, "q");
+    RDouble **q     = qProxy->GetField_UNS();
+    RDouble **qnode = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("qnode"));
+
+    for (int m = 0; m < 5; ++ m)
+    {
+        string gradientName = GlobalDataBase::GetStrParaFromDB("gradientName");
+
+        if (gradientName == "ggnode" || gradientName == "ggnodelaplacian")
+        {
+            gridUnstruct->CompGradientGGNode_NEW(q[m], qnode[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+            //gridUnstruct->CompGradientGGNode(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }
+        else if (gradientName == "ggcell")
+        {
+            gridUnstruct->CompGradientGGCell(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }
+        else if (gradientName == "lsq")
+        {
+            gridUnstruct->CompGradientLSQ(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }    
+        else if (gradientName == "ggnode_weight")
+        {
+            gridUnstruct->CompGradientGGNodeWeight(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }
+        else if (gradientName == "gg_m2")
+        {
+            gridUnstruct->CompGradientGGModified2(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }
+        else if (gradientName == "ggcellnew")
+        {
+            gridUnstruct->CompGradientGGCellNew(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }
+        else if (gradientName == "ggcellw")
+        {
+            gridUnstruct->CompGradientGGCellW(q[m], gradPrimtiveVarX[m], gradPrimtiveVarY[m], gradPrimtiveVarZ[m]);
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("No reconstruction method has been choosed ! /n");
+        }
+    }
+
+    PHSPACE::CommunicateInterfaceValue(gridUnstruct, gradPrimtiveVarX, "dqdx", nEquation);
+    PHSPACE::CommunicateInterfaceValue(gridUnstruct, gradPrimtiveVarY, "dqdy", nEquation);
+    PHSPACE::CommunicateInterfaceValue(gridUnstruct, gradPrimtiveVarZ, "dqdz", nEquation);
+
+    int nTemperatureModel = 1;
+
+    RDouble **gradTemperatureX = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradTemperatureX"));
+    RDouble **gradTemperatureY = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradTemperatureY"));
+    RDouble **gradTemperatureZ = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradTemperatureZ"));
+    RDouble **t     = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("t"));
+    RDouble **tnode = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("tnode"));
+
+    for (int m = 0; m < nTemperatureModel; ++ m)
+    {
+        string gradientName = GlobalDataBase::GetStrParaFromDB("gradientName");
+
+        if (gradientName == "ggnode" || gradientName == "ggnodelaplacian")
+        {
+            gridUnstruct->CompGradientGGNode_NEW(t[m], tnode[m], gradTemperatureX[m], gradTemperatureY[m], gradTemperatureZ[m]);
+            //gridUnstruct->CompGradientGGNode(t[m], gradTemperatureX[m], gradTemperatureY[m], gradTemperatureZ[m]);
+        }
+        else if (gradientName == "ggcell")
+        {
+            gridUnstruct->CompGradientGGCell(t[m], gradTemperatureX[m], gradTemperatureY[m], gradTemperatureZ[m]);
+        }
+        else if (gradientName == "lsq")
+        {
+            gridUnstruct->CompGradientLSQ(t[m], gradTemperatureX[m], gradTemperatureY[m], gradTemperatureZ[m]);
+        }    
+        else if (gradientName == "ggnode_weight")
+        {
+            gridUnstruct->CompGradientGGNodeWeight(t[m], gradTemperatureX[m], gradTemperatureY[m], gradTemperatureZ[m]);
+        }
+        else if (gradientName == "gg_m2")
+        {
+            gridUnstruct->CompGradientGGModified2(t[m], gradTemperatureX[m], gradTemperatureY[m], gradTemperatureZ[m]);
+        }
+        else if (gradientName == "ggcellnew")
+        {
+            gridUnstruct->CompGradientGGCellNew(t[m], gradTemperatureX[m], gradTemperatureY[m], gradTemperatureZ[m]);
+        }
+        else if (gradientName == "ggcellw")
+        {
+            gridUnstruct->CompGradientGGCellW(t[m], gradTemperatureX[m], gradTemperatureY[m], gradTemperatureZ[m]);
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("No reconstruction method has been choosed ! /n");
+        }
+    }
+
+    PHSPACE::CommunicateInterfaceValue(gridUnstruct, gradTemperatureX, "dtdx", nTemperatureModel);
+    PHSPACE::CommunicateInterfaceValue(gridUnstruct, gradTemperatureY, "dtdy", nTemperatureModel);
+    PHSPACE::CommunicateInterfaceValue(gridUnstruct, gradTemperatureZ, "dtdz", nTemperatureModel);
+
+    delete qProxy;
+}
+
+void LESSolverUnstr::ComputeViscousCoeff(Grid *gridIn)
+{
+    /*
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    ComputeStrainRateTensor(grid);
+
+    ComputeWallFunction(grid);
+
+    Param_LESSolverUnstruct *parameters = GetControlParameters();
+    int subgridScaleModel = parameters->GetSubgridScaleModel();
+
+    if (subgridScaleModel == 1)
+    {
+        Smagorinsky(grid);
+    }
+    else if (subgridScaleModel == 3)
+    {
+        WALE(grid);
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("subgridScaleModel", subgridScaleModel);
+    }
+    */
+}
+
+void LESSolverUnstr::UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy)
+{
+    UnstructGrid *grid  = UnstructGridCast(gridIn);
+
+    ObtainViscosity(grid);
+
+    ObtainBoundaryValue(grid);
+}
+
+void LESSolverUnstr::ObtainViscosity(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    ComputeStrainRateTensor(grid);
+
+    ComputeWallFunction(grid);
+
+    Param_LESSolverUnstruct *parameters = GetControlParameters();
+    int subgridScaleModel = parameters->GetSubgridScaleModel();
+
+    if (subgridScaleModel == 1)
+    {
+        Smagorinsky(grid);
+    }
+    else if (subgridScaleModel == 3)
+    {
+        WALE(grid);
+    }
+    else if (subgridScaleModel == 6)
+    {
+        Sigma(grid);
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("subgridScaleModel", subgridScaleModel);
+    }
+}
+
+void LESSolverUnstr::Smagorinsky(Grid *gridIn)
+{
+    using namespace IDX;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **q = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+
+    RDouble *cellLengthScale = reinterpret_cast<RDouble *> (grid->GetDataPtr("cellLengthScale"));
+    RDouble *wallFunction = reinterpret_cast<RDouble * > (grid->GetDataPtr("wallFunction"));
+    RDouble **strainRateTensor = reinterpret_cast<RDouble **> (grid->GetDataPtr("strainRateTensor"));
+
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble * > (grid->GetDataPtr("vist"));
+    RDouble *subgridScaleEnergy = reinterpret_cast<RDouble * > (grid->GetDataPtr("subgridScaleEnergy"));
+
+    Param_LESSolverUnstruct *parameters = GetControlParameters();
+
+    RDouble eddyViscosityLimit = parameters->GetEddyViscosityLimit();
+
+    RDouble refReNumber  = parameters->GetRefReNumber();
+
+    RDouble smagConstant = parameters->GetSmagConstant();
+
+    RDouble iConstant = parameters->GetIsotropicConstant();
+
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        RDouble rho = ABS(q[IR][iCell]) + SMALL;
+
+        RDouble deltaBar = cellLengthScale[iCell];
+
+        RDouble dampingFunction = wallFunction[iCell];
+
+        RDouble strain = strainRateTensor[0][iCell];
+
+        RDouble mut = (smagConstant * deltaBar * dampingFunction) * (smagConstant * deltaBar * dampingFunction) * rho * strain * refReNumber;
+        RDouble kSGS = 2.0 * dampingFunction * dampingFunction * iConstant * rho * strain * strain * refReNumber;
+
+        viscousTurbulence[iCell] = MIN(eddyViscosityLimit, mut);
+        subgridScaleEnergy[iCell] = kSGS;
+    }
+}
+
+void LESSolverUnstr::WALE(Grid *gridIn)
+{
+    using namespace IDX;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **q = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+
+    RDouble *cellLengthScale = reinterpret_cast<RDouble *> (grid->GetDataPtr("cellLengthScale"));
+    RDouble *wallFunction = reinterpret_cast<RDouble * > (grid->GetDataPtr("wallFunction"));
+    RDouble **strainRateTensor = reinterpret_cast<RDouble **> (grid->GetDataPtr("strainRateTensor"));
+
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble * > (grid->GetDataPtr("vist"));
+    RDouble *subgridScaleEnergy = reinterpret_cast<RDouble * > (grid->GetDataPtr("subgridScaleEnergy"));
+
+    Param_LESSolverUnstruct *parameters = GetControlParameters();
+
+    RDouble eddyViscosityLimit = parameters->GetEddyViscosityLimit();
+
+    RDouble refReNumber  = parameters->GetRefReNumber();
+
+    RDouble waleConstant = parameters->GetWaleConstant();
+
+    RDouble iConstant = parameters->GetIsotropicConstant();
+
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    RDouble viscousTurbulenceMax = 0.0;
+    RDouble viscousTurbulenceMin = 1.0e30;
+
+    int iMax = 0;
+    int iMin = 0;
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        RDouble rho = ABS(q[IR][iCell]) + SMALL;
+
+        RDouble deltaBar = cellLengthScale[iCell];
+
+        RDouble dampingFunction = wallFunction[iCell];
+
+        RDouble s11 = strainRateTensor[1][iCell];
+        RDouble s22 = strainRateTensor[2][iCell];
+        RDouble s33 = strainRateTensor[3][iCell];
+        RDouble s12 = strainRateTensor[4][iCell];
+        RDouble s13 = strainRateTensor[5][iCell];
+        RDouble s23 = strainRateTensor[6][iCell];
+
+        RDouble omega12 = strainRateTensor[7][iCell];
+        RDouble omega13 = strainRateTensor[8][iCell];
+        RDouble omega23 = strainRateTensor[9][iCell];
+
+        RDouble sij2  = s11 * s11 + s22 * s22 + s33 * s33 + two * (s12 * s12 + s13 * s13 + s23 * s23);                   
+        RDouble omegaij2 = 2.0 * (omega12 * omega12 + omega13 * omega13 + omega23 * omega23);
+        RDouble sij2SubOmegaij2 = 1.0/3.0 * (sij2 - omegaij2);
+
+        RDouble sd11 = s11 * s11 + s12 * s12 + s13 * s13 - omega12 * omega12 - omega13 * omega13 - sij2SubOmegaij2;
+        RDouble sd22 = s12 * s12 + s22 * s22 + s23 * s23 - omega12 * omega12 - omega23 * omega23 - sij2SubOmegaij2;
+        RDouble sd33 = s13 * s13 + s23 * s23 + s33 * s33 - omega13 * omega13 - omega23 * omega23 - sij2SubOmegaij2;
+        RDouble sd12 = s11 * s12 + s12 * s22 + s13 * s23 - omega13 * omega23;
+        RDouble sd13 = s11 * s13 + s12 * s23 + s13 * s33 + omega12 * omega23;
+        RDouble sd23 = s12 * s13 + s22 * s23 + s23 * s33 - omega12 * omega13;
+
+        RDouble sdij2 = sd11 * sd11 + sd22 * sd22 + sd33 * sd33 + 2.0 * (sd12 * sd12 + sd13 * sd13 + sd23 * sd23);
+
+        RDouble ss = pow(sdij2, 1.5) / (pow(sij2, 2.5) + pow(sdij2, 1.25) + SMALL);
+
+        RDouble mut = (waleConstant * deltaBar * dampingFunction) * (waleConstant * deltaBar * dampingFunction) * rho * ss * refReNumber;
+        mut = MIN(eddyViscosityLimit, mut);
+        RDouble kSGS = 2.0 * iConstant /rho * (mut /deltaBar) * (mut /deltaBar) / refReNumber;  //! Divide by one refReNumber here, and divide by another refReNumber in the Viscousflux.
+
+        viscousTurbulence[iCell] = mut;
+        subgridScaleEnergy[iCell] = kSGS;
+
+        if (viscousTurbulenceMax < viscousTurbulence[iCell]) 
+        {
+            viscousTurbulenceMax = viscousTurbulence[iCell];
+            iMax = iCell;
+        }
+        if (viscousTurbulenceMin > viscousTurbulence[iCell])
+        {
+            viscousTurbulenceMin = viscousTurbulence[iCell];
+            iMin = iCell;
+        }
+    }
+}
+
+void LESSolverUnstr::Sigma(Grid *gridIn)
+{
+    using namespace IDX;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **q = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+
+    RDouble *cellLengthScale = reinterpret_cast<RDouble *> (grid->GetDataPtr("cellLengthScale"));
+    RDouble *wallFunction = reinterpret_cast<RDouble * > (grid->GetDataPtr("wallFunction"));
+
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble * > (grid->GetDataPtr("vist"));
+    RDouble *subgridScaleEnergy = reinterpret_cast<RDouble * > (grid->GetDataPtr("subgridScaleEnergy"));
+
+    RDouble **gradientPrimtiveVariableX = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **gradientPrimtiveVariableY = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **gradientPrimtiveVariableZ = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    RDouble *dudx = gradientPrimtiveVariableX[1];
+    RDouble *dudy = gradientPrimtiveVariableY[1];
+    RDouble *dudz = gradientPrimtiveVariableZ[1];
+
+    RDouble *dvdx = gradientPrimtiveVariableX[2];
+    RDouble *dvdy = gradientPrimtiveVariableY[2];
+    RDouble *dvdz = gradientPrimtiveVariableZ[2];
+
+    RDouble *dwdx = gradientPrimtiveVariableX[3];
+    RDouble *dwdy = gradientPrimtiveVariableY[3];
+    RDouble *dwdz = gradientPrimtiveVariableZ[3];
+
+    Param_LESSolverUnstruct *parameters = GetControlParameters();
+
+    RDouble eddyViscosityLimit = parameters->GetEddyViscosityLimit();
+
+    RDouble refReNumber  = parameters->GetRefReNumber();
+
+    RDouble sigmaConstant = parameters->GetSigmaConstant();
+
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    RDouble viscousTurbulenceMax = 0.0;
+    RDouble viscousTurbulenceMin = 1.0e30;
+
+    int iMax = 0;
+    int iMin = 0;
+
+    RDouble ** velocityGradTensor = AleModel :: CreateMatrix();
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        velocityGradTensor[0][0] = dudx[iCell];
+        velocityGradTensor[0][1] = dudy[iCell];
+        velocityGradTensor[0][2] = dudz[iCell];
+
+        velocityGradTensor[1][0] = dvdx[iCell];
+        velocityGradTensor[1][1] = dvdy[iCell];
+        velocityGradTensor[1][2] = dvdz[iCell];
+
+        velocityGradTensor[2][0] = dwdx[iCell];
+        velocityGradTensor[2][1] = dwdy[iCell];
+        velocityGradTensor[2][2] = dwdz[iCell];
+
+        RDouble differentialSigma = 0.0;
+        ComputeDifferentialSigma(velocityGradTensor, differentialSigma);
+
+        RDouble rho = ABS(q[IR][iCell]) + SMALL;
+
+        RDouble deltaBar = cellLengthScale[iCell];
+
+        RDouble dampingFunction = wallFunction[iCell];
+
+        RDouble mut = rho * (sigmaConstant * deltaBar * dampingFunction) * (sigmaConstant * deltaBar * dampingFunction) * differentialSigma * refReNumber;
+        mut = MIN(eddyViscosityLimit, mut);
+
+        viscousTurbulence[iCell] = mut;
+        subgridScaleEnergy[iCell] = 0.0;
+
+        if (viscousTurbulenceMax < viscousTurbulence[iCell]) 
+        {
+            viscousTurbulenceMax = viscousTurbulence[iCell];
+            iMax = iCell;
+        }
+        if (viscousTurbulenceMin > viscousTurbulence[iCell])
+        {
+            viscousTurbulenceMin = viscousTurbulence[iCell];
+            iMin = iCell;
+        }
+    }
+}
+
+void LESSolverUnstr::ComputeDifferentialSigma(RDouble ** velocityGradTensor, RDouble &differentialSigma)
+{
+    RDouble ** velocityGradTensorTranspose = AleModel :: CreateMatrix();
+    RDouble ** gij = AleModel :: CreateMatrix();
+    RDouble ** gij2 = AleModel :: CreateMatrix();
+
+    AleModel::SetMatrix(velocityGradTensorTranspose, velocityGradTensor);
+
+    AleModel::TransposeMatrix(velocityGradTensorTranspose);
+
+    AleModel::MatrixMultiply(velocityGradTensorTranspose, velocityGradTensor, gij);
+
+    AleModel::MatrixMultiply(gij, gij, gij2);
+
+    RDouble tracegij = gij[0][0] + gij[1][1] + gij[2][2];
+    RDouble tracegij2 = gij2[0][0] + gij2[1][1] + gij2[2][2];
+
+    RDouble detgij = gij[0][0] * (gij[1][1] * gij[2][2] - gij[1][2] * gij[2][1])
+                   - gij[0][1] * (gij[1][0] * gij[2][2] - gij[1][2] * gij[2][0])
+                   + gij[0][2] * (gij[1][0] * gij[2][1] - gij[1][1] * gij[2][0]);
+
+    RDouble t1 = tracegij;
+    RDouble t2 = 0.5 * (tracegij * tracegij - tracegij2);
+    RDouble t3 = detgij;
+
+    RDouble alpha1 = t1 * t1 / 9.0 - t2 / 3.0;
+    RDouble alpha2 = t1 * t1 * t1 / 27.0 - t1 * t2 / 6.0 + t3 / 2.0;
+    RDouble alpha3 = 1.0 /3.0 * acos(MAX(MIN(alpha2 / sqrt(alpha1 * alpha1 * alpha1), 1.0), -1.0));
+
+    RDouble sigma1 = sqrt(MAX(t1 / 3.0 + 2.0 * sqrt(alpha1) * cos(alpha3), 0.0));
+    RDouble sigma2 = sqrt(MAX(t1 / 3.0 - 2.0 * sqrt(alpha1) * cos(acos(0.5) + alpha3), 0.0));
+    RDouble sigma3 = sqrt(MAX(t1 / 3.0 - 2.0 * sqrt(alpha1) * cos(acos(0.5) - alpha3), 0.0));
+
+    differentialSigma = sigma3 * (sigma1 - sigma2) * (sigma2 - sigma3) / sigma1 / sigma1;
+    differentialSigma = MAX(differentialSigma, 0.0);
+
+    AleModel::DestroyMatrix(velocityGradTensorTranspose);
+    AleModel::DestroyMatrix(gij);
+    AleModel::DestroyMatrix(gij2);
+}
+
+void LESSolverUnstr::ComputeStrainRateTensor(Grid *gridIn)
+{
+    Param_LESSolverUnstruct *parameters = GetControlParameters();
+    int subgridScaleModel = parameters->GetSubgridScaleModel();
+    if(subgridScaleModel == 6)
+    {
+        return;
+    }
+
+    using namespace IDX;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **strainRateTensor = reinterpret_cast<RDouble **> (grid->GetDataPtr("strainRateTensor"));
+
+    RDouble **gradientPrimtiveVariableX = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **gradientPrimtiveVariableY = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **gradientPrimtiveVariableZ = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    RDouble *dudx = gradientPrimtiveVariableX[1];
+    RDouble *dudy = gradientPrimtiveVariableY[1];
+    RDouble *dudz = gradientPrimtiveVariableZ[1];
+
+    RDouble *dvdx = gradientPrimtiveVariableX[2];
+    RDouble *dvdy = gradientPrimtiveVariableY[2];
+    RDouble *dvdz = gradientPrimtiveVariableZ[2];
+
+    RDouble *dwdx = gradientPrimtiveVariableX[3];
+    RDouble *dwdy = gradientPrimtiveVariableY[3];
+    RDouble *dwdz = gradientPrimtiveVariableZ[3];
+
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal = numberOfBoundaryFace + numberOfTotalCell;
+
+    for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+    {
+        RDouble s11 = dudx[iCell];
+        RDouble s22 = dvdy[iCell];
+        RDouble s33 = dwdz[iCell];
+        RDouble s12 = half * (dudy[iCell] + dvdx[iCell]);
+        RDouble s13 = half * (dudz[iCell] + dwdx[iCell]);
+        RDouble s23 = half * (dvdz[iCell] + dwdy[iCell]);
+
+        RDouble omega12 = 0.5 * (dudy[iCell] - dvdx[iCell]);
+        RDouble omega13 = 0.5 * (dudz[iCell] - dwdx[iCell]);
+        RDouble omega23 = 0.5 * (dvdz[iCell] - dwdy[iCell]);
+
+        RDouble sij2 = two * (PHSPACE::SQR(s11, s22, s33) + two * PHSPACE::SQR(s12, s13, s23));
+        RDouble ss = sqrt(sij2);
+
+        strainRateTensor[0][iCell] = ss;
+
+        strainRateTensor[1][iCell] = s11;
+        strainRateTensor[2][iCell] = s22;
+        strainRateTensor[3][iCell] = s33;
+        strainRateTensor[4][iCell] = s12;
+        strainRateTensor[5][iCell] = s13;
+        strainRateTensor[6][iCell] = s23;
+
+        strainRateTensor[7][iCell] = omega12;
+        strainRateTensor[8][iCell] = omega13;
+        strainRateTensor[9][iCell] = omega23;
+    }
+}
+
+void LESSolverUnstr::ComputeWallFunction(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    
+    Param_LESSolverUnstruct *parameters = GetControlParameters();
+    int wallDampingFunctionType = parameters->GetWallDampingFunctionType();
+
+    RDouble *wallFunction = reinterpret_cast<RDouble * > (grid->GetDataPtr("wallFunction"));
+
+    if (wallDampingFunctionType == 0)
+    {
+        int numberOfTotalCell = grid->GetNTotalCell();
+
+        for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+        {
+            wallFunction[iCell] = 1.0;
+        }
+    }
+    else if (wallDampingFunctionType == 1)
+    {
+        WallFunctionofVanDriest(grid);
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("wallDampingFunctionType", wallDampingFunctionType);
+    }
+}
+
+void LESSolverUnstr::WallFunctionofVanDriest(Grid *gridIn)
+{
+    using namespace IDX;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble *wallDistance = grid->GetWallDist();
+
+    RDouble **q = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+
+    RDouble *visl = reinterpret_cast<RDouble * > (grid->GetDataPtr("visl"));
+
+    RDouble *wallFunction = reinterpret_cast <RDouble *> (grid->GetDataPtr("wallFunction"));
+
+    RDouble **strainRateTensor = reinterpret_cast<RDouble **> (grid->GetDataPtr("strainRateTensor"));
+
+    Param_LESSolverUnstruct *parameters = GetControlParameters();
+    RDouble refReNumber = parameters->GetRefReNumber();
+
+    const double kappa = 0.41;
+    const double Ap = 25.0;
+
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        RDouble wallDist = wallDistance[iCell];
+
+        RDouble mul = visl[iCell];
+
+        RDouble rho = q[IR][iCell];
+
+        RDouble ss = strainRateTensor[0][iCell];
+
+        RDouble yplus = ss * (kappa * wallDist) * (kappa * wallDist) * rho / mul * refReNumber;
+
+        wallFunction[iCell] = 1.0 - exp(-yplus / Ap);
+    }
+}
+
+void LESSolverUnstr::UploadInterfaceData(ActionKey *actkey)
+{
+    UploadInterfaceValue(actkey);
+}
+
+void LESSolverUnstr::UploadInterfaceValue(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(GetGrid(level));
+
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (interfaceInformation == 0) return;
+
+    RDouble* viscousTurbulence = reinterpret_cast<RDouble*> (grid->GetDataPtr("vist"));
+    PHSPACE::UploadInterfaceValue(grid, viscousTurbulence, "vist");
+
+    RDouble* subgridScaleEnergy = reinterpret_cast<RDouble*> (grid->GetDataPtr("subgridScaleEnergy"));
+    PHSPACE::UploadInterfaceValue(grid, subgridScaleEnergy, "subgridScaleEnergy");
+}
+
+void LESSolverUnstr::DownloadInterfaceData(ActionKey *actkey)
+{
+    DownloadInterfaceValue(actkey);
+}
+
+void LESSolverUnstr::DownloadInterfaceValue(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(GetGrid(level));
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (interfaceInformation == 0) return;
+
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+    PHSPACE::DownloadInterfaceValue(grid, viscousTurbulence, "vist");
+
+    RDouble *subgridScaleEnergy = reinterpret_cast<RDouble *> (grid->GetDataPtr("subgridScaleEnergy"));
+    PHSPACE::DownloadInterfaceValue(grid, subgridScaleEnergy, "subgridScaleEnergy");
+}
+
+LIB_EXPORT void LESSolverUnstr::InitControlParameters()
+{
+    FreeControlParameters();
+    controlParameters = new Param_LESSolverUnstruct();
+    controlParameters->Init();
+}
+
+LIB_EXPORT Param_LESSolverUnstruct * LESSolverUnstr::GetControlParameters()
+{
+    return static_cast<Param_LESSolverUnstruct *>(controlParameters);
+}
+
+FieldProxy * LESSolverUnstr::GetFieldProxy(Grid *gridIn, const string &field_name)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble ** field = reinterpret_cast< RDouble ** > (grid->GetDataPtr(field_name));
+
+    FieldProxy * field_proxy = new FieldProxy();
+
+    field_proxy->SetField_UNS(field);
+
+    return field_proxy;
+}
+
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/src/Param_LESSolver.cpp b/CFD/TurbSolver/src/Param_LESSolver.cpp
new file mode 100644
index 0000000..aaf58b9
--- /dev/null
+++ b/CFD/TurbSolver/src/Param_LESSolver.cpp
@@ -0,0 +1,148 @@
+#include "Param_LESSolver.h"
+#include "GlobalDataBase.h"
+#include "Constants.h"
+#include "TK_Exit.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Param_LESSolver::Param_LESSolver()
+{
+
+}
+
+LIB_EXPORT Param_LESSolver::~Param_LESSolver()
+{
+    if (filterDirection != NULL)
+    {
+        delete [] filterDirection;
+        filterDirection = NULL;
+    }
+
+    if (averageDirection != NULL)
+    {
+        delete [] averageDirection;
+        averageDirection = NULL;
+    }
+
+    if (testFilterCoef != NULL)
+    {
+        delete [] testFilterCoef;
+        testFilterCoef = NULL;
+    }
+}
+
+LIB_EXPORT void Param_LESSolver::Init()
+{
+    Param_CFDSolver::Init();
+
+    testFilterCoef = new RDouble [3]();
+
+    filterDirection = new int [3]();
+
+    averageDirection = new int [3]();
+
+    eddyViscosityLimit = GlobalDataBase::GetDoubleParaFromDB("eddyViscosityLimit");
+
+    wallDampingFunctionType = GlobalDataBase::GetIntParaFromDB("wallDampingFunctionType");
+
+    deltaFunctionType = GlobalDataBase::GetIntParaFromDB("deltaFunctionType");
+
+    turbViscousCutType = GlobalDataBase::GetIntParaFromDB("turbViscousCutType");
+
+    smagConstant = GlobalDataBase::GetDoubleParaFromDB("smagConstant");
+
+    isotropicConstant = GlobalDataBase::GetDoubleParaFromDB("isotropicConstant");
+
+    string sgsmodel;
+    GlobalDataBase::GetData("sgsmodel", &sgsmodel, PHSTRING, 1);
+
+    if (sgsmodel.substr(0, 11) == "smagorinsky")
+    {
+        subgridScaleModel = 1;
+    }
+    else if (sgsmodel.substr(0, 6) == "dsmCom")
+    {
+        subgridScaleModel = 2;
+
+        testFilterCoef[0] = 0.166666666666;
+        testFilterCoef[1] = 0.666666666667;
+        testFilterCoef[2] = 0.166666666667;
+
+        testFilterWidth = 1;
+
+        GlobalDataBase::GetData("filterDirection", filterDirection, PHINT, 3);
+
+        GlobalDataBase::GetData("averageDirection", averageDirection, PHINT, 3);
+
+        averageWidth = GlobalDataBase::GetIntParaFromDB("averageWidth");
+
+        testFilterScale = GlobalDataBase::GetDoubleParaFromDB("testFilterScale");
+    }
+    else if (sgsmodel.substr(0, 4) == "wale")
+    {
+        subgridScaleModel = 3;
+        waleConstant = GlobalDataBase::GetDoubleParaFromDB("waleConstant");
+        isotropicConstant = GlobalDataBase::GetDoubleParaFromDB("isotropicConstant");
+    }
+    else if (sgsmodel.substr(0, 6) == "dsmInc")
+    {
+        subgridScaleModel = 4;
+
+        testFilterCoef[0] = 0.166666666666;
+        testFilterCoef[1] = 0.666666666667;
+        testFilterCoef[2] = 0.166666666667;
+
+        testFilterWidth = 1;
+
+        GlobalDataBase::GetData("filterDirection", filterDirection, PHINT, 3);
+
+        GlobalDataBase::GetData("averageDirection", averageDirection, PHINT, 3);
+
+        averageWidth = GlobalDataBase::GetIntParaFromDB("averageWidth");
+
+        testFilterScale = GlobalDataBase::GetDoubleParaFromDB("testFilterScale");
+    }
+    else if (sgsmodel.substr(0, 6) == "dsmOld")
+    {
+        subgridScaleModel = 5;
+
+        testFilterCoef[0] = 0.166666666666;
+        testFilterCoef[1] = 0.666666666667;
+        testFilterCoef[2] = 0.166666666667;
+
+        testFilterWidth = 1;
+
+        GlobalDataBase::GetData("filterDirection", filterDirection, PHINT, 3);
+
+        GlobalDataBase::GetData("averageDirection", averageDirection, PHINT, 3);
+
+        averageWidth = GlobalDataBase::GetIntParaFromDB("averageWidth");
+
+        testFilterScale = GlobalDataBase::GetDoubleParaFromDB("testFilterScale");
+    }
+    else if (sgsmodel.substr(0, 5) == "sigma")
+    {
+        subgridScaleModel = 6;
+        sigmaConstant = GlobalDataBase::GetDoubleParaFromDB("sigmaConstant");
+        isotropicConstant = GlobalDataBase::GetDoubleParaFromDB("isotropicConstant");
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("sgsmodel", sgsmodel);
+    }
+
+    if (wallDampingFunctionType == 2)
+    {
+        yploge = 1000.0;
+        rgam = 0.41;
+    }
+
+    prandtlTurbulence = GlobalDataBase::GetDoubleParaFromDB("prt");
+
+    oPrandtlTurbulence = GlobalDataBase::GetDoubleParaFromDB("oprt");
+
+    freeStreamViscosity = GlobalDataBase::GetDoubleParaFromDB("freeStreamViscosity");
+}
+
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/src/Param_LESSolverStruct.cpp b/CFD/TurbSolver/src/Param_LESSolverStruct.cpp
new file mode 100644
index 0000000..89672ea
--- /dev/null
+++ b/CFD/TurbSolver/src/Param_LESSolverStruct.cpp
@@ -0,0 +1,21 @@
+#include "Param_LESSolverStruct.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Param_LESSolverStruct::Param_LESSolverStruct()
+{
+
+}
+
+LIB_EXPORT Param_LESSolverStruct::~Param_LESSolverStruct()
+{
+
+}
+
+LIB_EXPORT void Param_LESSolverStruct::Init()
+{
+    Param_LESSolver::Init();
+}
+
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/src/Param_LESSolverUnstruct.cpp b/CFD/TurbSolver/src/Param_LESSolverUnstruct.cpp
new file mode 100644
index 0000000..265e2b4
--- /dev/null
+++ b/CFD/TurbSolver/src/Param_LESSolverUnstruct.cpp
@@ -0,0 +1,21 @@
+#include "Param_LESSolverUnstruct.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Param_LESSolverUnstruct::Param_LESSolverUnstruct()
+{
+
+}
+
+LIB_EXPORT Param_LESSolverUnstruct::~Param_LESSolverUnstruct()
+{
+
+}
+
+LIB_EXPORT void Param_LESSolverUnstruct::Init()
+{
+    Param_LESSolver::Init();
+}
+
+}
diff --git a/CFD/TurbSolver/src/Param_TransitionSolver.cpp b/CFD/TurbSolver/src/Param_TransitionSolver.cpp
new file mode 100644
index 0000000..c8ee449
--- /dev/null
+++ b/CFD/TurbSolver/src/Param_TransitionSolver.cpp
@@ -0,0 +1,77 @@
+#include "Param_TransitionSolver.h"
+#include "Transition.h"
+#include "GlobalDataBase.h"
+#include "Constants.h"
+#pragma warning(disable:6386)
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Param_TransitionSolver::~Param_TransitionSolver()
+{
+    if (freeStreamTransitionVar != NULL)
+    {
+        delete[]freeStreamTransitionVar;
+        freeStreamTransitionVar = NULL;
+    }
+}
+
+LIB_EXPORT void Param_TransitionSolver::Init()
+{
+    Param_CFDSolver::Init();
+
+    transitionCFLScale = GlobalDataBase::GetDoubleParaFromDB("turbCFLScale");
+
+    transitionType = GlobalDataBase::GetIntParaFromDB("transitionType");
+
+    nTransitionEquation = GlobalDataBase::GetIntParaFromDB("n_transition");
+
+    freeStreamViscosity = GlobalDataBase::GetDoubleParaFromDB("freeStreamViscosity");
+
+    using namespace IDX;
+    RDouble* prim_inf = reinterpret_cast<RDouble*>(GlobalDataBase::GetDataPtr("prim_inf"));
+    RDouble reference_density_farfield = prim_inf[IR];
+
+    string viscousName;
+    GlobalDataBase::GetData("viscousName", &viscousName, PHSTRING, 1);
+
+    RDouble refReNumber = 1.0e5;
+    GlobalDataBase::GetData("refReNumber", &refReNumber, PHDOUBLE, 1);
+
+    RDouble turb_cmu=1.0;
+    if (transitionType == IREGAMA)
+    {
+        ce1 = 1.0;
+        ca1 = 2.0;
+        ce2 = 50.0;
+        ca2 = 0.06;
+        dct = 2.0;
+        df = 1.0;
+        cct = 0.03;
+        s1 = 2.0;
+        ccf = 0.6;
+    }
+
+    freeStreamTransitionVar = new RDouble[nTransitionEquation];
+
+    RDouble TUoo = 0.18;
+    RDouble Fcta = 1.0;
+    freeStreamTransitionVar[IGAMA] = 1.0;
+
+    RDouble mutoo = GlobalDataBase::GetDoubleParaFromDB("freeStreamViscosity");
+    RDouble kwoo = GlobalDataBase::GetDoubleParaFromDB("kwoo") / refReNumber;
+    RDouble keoo = mutoo * kwoo / (turb_cmu * reference_density_farfield);
+
+    turbulenceIntensity = GlobalDataBase::GetDoubleParaFromDB("turbIntensity");
+
+    if (turbulenceIntensity >= SMALL)
+    {
+        keoo = 1.5 * (0.01 * turbulenceIntensity) * (0.01 * turbulenceIntensity);
+    }
+
+    TUoo = TurbulenceIntensity(1.0, keoo);
+    freeStreamTransitionVar[IRECT] = EmpiricalCorrelationOfRectat(TUoo, Fcta);
+
+}
+
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/src/Param_TurbSolver.cpp b/CFD/TurbSolver/src/Param_TurbSolver.cpp
new file mode 100644
index 0000000..90c06a2
--- /dev/null
+++ b/CFD/TurbSolver/src/Param_TurbSolver.cpp
@@ -0,0 +1,281 @@
+#include "Param_TurbSolver.h"
+#include "Transition.h"
+#include "GlobalDataBase.h"
+#include "Constants.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Param_TurbSolver::Param_TurbSolver()
+{
+
+}
+
+LIB_EXPORT Param_TurbSolver::~Param_TurbSolver()
+{
+    if (freeStreamTurbVar != NULL)
+    {
+        delete []freeStreamTurbVar;
+        freeStreamTurbVar = NULL;
+    }
+}
+
+LIB_EXPORT void Param_TurbSolver::Init()
+{
+    Param_CFDSolver::Init();
+
+    turbCFLScale = GlobalDataBase::GetDoubleParaFromDB("turbCFLScale");
+
+    DESType = GlobalDataBase::GetIntParaFromDB("DESType");
+
+    transitionType = GlobalDataBase::GetIntParaFromDB("transitionType");
+
+    SAProductType = GlobalDataBase::GetIntParaFromDB("SAProductType");
+
+    SSTProductType = GlobalDataBase::GetIntParaFromDB("SSTProductType");
+
+    nTurbulenceEquation = GlobalDataBase::GetIntParaFromDB("n_turb");
+
+    eddyViscosityLimit = GlobalDataBase::GetDoubleParaFromDB("eddyViscosityLimit");
+
+    wallFunctionType = GlobalDataBase::GetIntParaFromDB("wallFunctionType");
+
+    int originaltscheme = GlobalDataBase::GetIntParaFromDB("OriginalTscheme");
+
+    inviscidSpectrumRadiusCoef = 1.0;
+  
+    SST_a1 = 0.31;
+
+    freeStreamViscosity = GlobalDataBase::GetDoubleParaFromDB("freeStreamViscosity");
+
+    using namespace IDX;
+    RDouble * prim_inf = reinterpret_cast< RDouble * > (GlobalDataBase::GetDataPtr("prim_inf" ));
+    RDouble reference_density_farfield = prim_inf[IR];
+
+    RDouble refReNumber = 1.0e5;
+    GlobalDataBase::GetData("refReNumber", &refReNumber, PHDOUBLE, 1);
+   
+    RDouble muoo = 1.0e-1;
+    GlobalDataBase::GetData("muoo", &muoo, PHDOUBLE, 1);
+    RDouble kwoo = 1.0e-8;
+    GlobalDataBase::GetData("kwoo", &kwoo, PHDOUBLE, 1);
+
+    int viscousType = 1;
+    GlobalDataBase::GetData("viscousType", &viscousType, PHINT, 1);
+
+    int neasm = -1;
+    GlobalDataBase::GetData("neasm", &neasm, PHINT, 1);
+
+    string viscousName;
+    GlobalDataBase::GetData("viscousName", &viscousName, PHSTRING, 1);
+
+    if (viscousName.substr(0, 12) == "easm-kw-2001" || viscousName.substr(0, 12) == "easm-kw-2003")
+    {
+        neasm = 2;
+    }
+    else if (viscousName.substr(0, 12) == "easm-kw-2005")
+    {
+        neasm = 3;
+    }
+    GlobalDataBase::UpdateData("neasm",&neasm, PHINT, 1);
+
+    int nolstress, nrokplus;
+
+    if (viscousType >= TWO_EQU && neasm > 0)
+    {
+        nolstress = 1;
+        nrokplus  = 1;
+    }
+    else
+    {
+        nolstress = - 1;
+        nrokplus  = - 1;
+    }
+    GlobalDataBase::UpdateData("nolstress",&nolstress, PHINT, 1);
+    GlobalDataBase::UpdateData("nrokplus" ,&nrokplus , PHINT, 1);
+
+    RDouble turb_fbeta, turb_fbetas, turb_cmu;
+
+    RDouble SA_cv1;
+
+    //! clz begin
+    SSTProductLimit = 10.0;    //! Refer to the version of 2003.
+
+    turb_fbeta  = 1.0;
+    turb_fbetas = 1.0;
+    SST_betaStar = 0.09;
+    //! In fact, turb_cmu should be 0.09, but it is necessary because turb_cmu is generally absorbed.
+    turb_cmu = 1.0;
+
+    rhoFlag = 1;    // original (= 0) or conservative (= 1) variable.
+
+    if (viscousName.substr(0,6) == "1eq-sa")
+    {
+        SA_cv1    = 7.1;
+        KW_sigma  = 2.0/3.0;
+
+        SA_cv1_cube = SA_cv1 * SA_cv1 * SA_cv1;
+        GlobalDataBase::UpdateData("SA_cv1_cube", &SA_cv1_cube, PHDOUBLE, 1);  // GMRESCoupled
+        
+        if(originaltscheme == GMRES)
+        {
+            rhoFlag = 1;   
+        }
+        else
+        {
+            rhoFlag = 0; // using conservative var in SA model.
+        }
+    }
+    else if (viscousName.substr(0,6) == "2eq-kw")
+    {
+        if (viscousName.substr(0,18) == "2eq-kw-wilcox-1988")
+        {
+            KW_sigmaK   = 0.5;
+            KW_sigmaW   = 0.5;
+            SST_betaStar = 1.0;
+            turb_cmu    = 0.09;
+
+            if (neasm == 1)
+            {
+                KW_sigmaK   = 0.5;
+                KW_sigmaW   = 0.5;
+                SST_betaStar = 1.0;
+                turb_cmu    = 0.09;
+            }
+        }
+        else if (viscousName.substr(0,18) == "2eq-kw-wilcox-1993")
+        {
+            KW_sigmaK   = 1.0;
+            KW_sigmaW   = 0.6;
+        }
+        else if (viscousName.substr(0,18) == "2eq-kw-wilcox-1998")
+        {
+            KW_sigmaK   = 0.5;
+            KW_sigmaW   = 0.5;
+
+            if (neasm == 1)
+            {
+                KW_sigmaK   = 0.5;
+                KW_sigmaW   = 0.5;
+                SST_betaStar = 1.0;
+                turb_cmu    = 0.09;
+            }
+        }
+        else if (viscousName.substr(0,18) == "2eq-kw-wilcox-2006")
+        {
+            KW_sigmaK   = 0.6;
+            KW_sigmaW   = 0.5;
+        }
+        else if (viscousName.substr(0,14) == "2eq-kw-kok-tnt")
+        {
+            KW_sigmaK   = 0.667;
+            KW_sigmaW   = 0.5;
+
+            if (neasm == 1)
+            {
+                KW_sigmaK   = 1.0 / 1.4;
+                KW_sigmaW   = 1.0 / 2.2;
+                SST_betaStar = 1.0;
+                turb_cmu    = 0.09;
+            }
+        }
+        else if (viscousName.substr(0,17) == "2eq-kw-menter-sst")
+        {
+            KW_sigmaK1  = 0.85;
+            KW_sigmaW1  = 0.5;
+            SST_alphaw1 = 0.555;     //! = 5/9  refer to the version of SST-2003
+            SST_beta1   = 0.075;
+
+            KW_sigmaK2  = 1.0;
+            KW_sigmaW2  = 0.856;
+            SST_alphaw2 = 0.44;
+            SST_beta2   = 0.0828;
+        }
+        else if (viscousName.substr(0,17) == "2eq-kw-menter-bsl")
+        {
+            KW_sigmaK1  = 0.5;
+            KW_sigmaW1  = 0.5;
+            SST_alphaw1 = 0.5532;
+            SST_beta1   = 0.075;
+
+            KW_sigmaK2  = 1.0;
+            KW_sigmaW2  = 0.856;
+            SST_alphaw2 = 0.4404;
+            SST_beta2   = 0.0828;
+        }
+        else if (viscousName.substr(0,10) == "2eq-kw-hyb")
+        {
+        }
+        else if (viscousName.substr(0,10) == "2eq-kw-bdp")
+        {
+        }
+    }
+    else if (viscousName.substr(0,4) == "easm")
+    {
+        //! It is a specific easm, not a random collected one.
+        if (viscousName.substr(0,12) == "easm-kw-2001")
+        {
+            KW_sigmaK   = 0.5;
+            KW_sigmaW   = 0.5339;
+            SST_betaStar = 1.0;
+            turb_cmu    = 0.0895;
+        }
+        else if (viscousName.substr(0,12) == "easm-kw-2003")
+        {
+            KW_sigmaK   = 1.0;
+            KW_sigmaW   = 0.5339;
+            SST_betaStar = 1.0;
+            turb_cmu    = 0.0895;
+        }
+        else if (viscousName.substr(0,12) == "easm-kw-2005")
+        {
+            KW_sigmaK1  = 1.1;
+            KW_sigmaW1  = 0.53;
+            SST_alphaw1 = 0.518;
+            SST_beta1   = 0.0747;
+
+            KW_sigmaK2  = 1.1;
+            KW_sigmaW2  = 1.0;
+            SST_alphaw2 = 0.44;
+            SST_beta2   = 0.0828;
+
+            SST_betaStar = 0.09;
+        }
+    }
+
+    GlobalDataBase::UpdateData("turb_fbeta", &turb_fbeta, PHDOUBLE, 1);
+    GlobalDataBase::UpdateData("turb_fbetas", &turb_fbetas, PHDOUBLE, 1);
+
+    freeStreamTurbVar = new RDouble [nTurbulenceEquation];
+
+    //! This code should be check for structured grid.
+    if (viscousType == ONE_EQU)
+    {
+        RDouble muoo1 = GlobalDataBase::GetDoubleParaFromDB("muoo");
+        freeStreamTurbVar[ISA] = muoo1 / (reference_density_farfield * turb_cmu + SMALL);
+    }
+    else if (viscousType == TWO_EQU)
+    {
+        RDouble kwoo1 = GlobalDataBase::GetDoubleParaFromDB("kwoo") / refReNumber;
+        RDouble mutoo = 0.01;
+        RDouble keoo = mutoo * kwoo1 / (turb_cmu * reference_density_farfield);
+
+        if (transitionType == IREGAMA)
+        {
+            mutoo = GlobalDataBase::GetDoubleParaFromDB("freeStreamViscosity");
+            turbulenceIntensity = GlobalDataBase::GetDoubleParaFromDB("turbIntensity");
+            if (turbulenceIntensity >= SMALL)
+            {
+                keoo = 1.5 * (0.01 * turbulenceIntensity) * (0.01 * turbulenceIntensity);
+                kwoo1 = keoo * (turb_cmu * reference_density_farfield) / mutoo;
+            }
+        }
+        freeStreamTurbVar[IKE] = keoo;
+        freeStreamTurbVar[IKW] = kwoo1;
+    }
+
+    kindOfTurbSource = GlobalDataBase::GetIntParaFromDB("kindOfTurbSource");
+    isWennScheme = GlobalDataBase::GetIntParaFromDB("isWennScheme");
+}
+
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/src/Param_TurbSolverStruct.cpp b/CFD/TurbSolver/src/Param_TurbSolverStruct.cpp
new file mode 100644
index 0000000..bd2f668
--- /dev/null
+++ b/CFD/TurbSolver/src/Param_TurbSolverStruct.cpp
@@ -0,0 +1,21 @@
+#include "Param_TurbSolverStruct.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Param_TurbSolverStruct::Param_TurbSolverStruct()
+{
+
+}
+
+LIB_EXPORT Param_TurbSolverStruct::~Param_TurbSolverStruct()
+{
+
+}
+
+LIB_EXPORT void Param_TurbSolverStruct::Init()
+{
+    Param_TurbSolver::Init();
+}
+
+}
diff --git a/CFD/TurbSolver/src/Param_TurbSolverUnstruct.cpp b/CFD/TurbSolver/src/Param_TurbSolverUnstruct.cpp
new file mode 100644
index 0000000..50d1dc5
--- /dev/null
+++ b/CFD/TurbSolver/src/Param_TurbSolverUnstruct.cpp
@@ -0,0 +1,21 @@
+#include "Param_TurbSolverUnstruct.h"
+
+namespace PHSPACE
+{
+
+LIB_EXPORT Param_TurbSolverUnstruct::Param_TurbSolverUnstruct()
+{
+
+}
+
+LIB_EXPORT Param_TurbSolverUnstruct::~Param_TurbSolverUnstruct()
+{
+
+}
+
+LIB_EXPORT void Param_TurbSolverUnstruct::Init()
+{
+    Param_TurbSolver::Init();
+}
+
+}
diff --git a/CFD/TurbSolver/src/Transition.cpp b/CFD/TurbSolver/src/Transition.cpp
new file mode 100644
index 0000000..189dc01
--- /dev/null
+++ b/CFD/TurbSolver/src/Transition.cpp
@@ -0,0 +1,356 @@
+#include "Transition.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+RDouble ReynoldsNumberBasedOnStrainRate(RDouble density, RDouble distanceToWall, RDouble viscosity,
+    RDouble strainrate, RDouble reynoldsNumberInflow)
+{
+    return density * distanceToWall * distanceToWall * strainrate * reynoldsNumberInflow / viscosity;
+};
+
+RDouble ReynoldsNumberBasedOnDissipation(RDouble density, RDouble distanceToWall, RDouble viscosity,
+    RDouble dissipationRate, RDouble reynoldsNumberInflow)
+{
+    return density * distanceToWall * distanceToWall * dissipationRate * reynoldsNumberInflow * reynoldsNumberInflow / viscosity;
+};
+
+RDouble ReynoldsNumberBasedOnScf(RDouble heightCrossFlow, RDouble velocity, RDouble density,
+    RDouble viscosityLaminar, RDouble viscosityTurbulence, RDouble reynoldsNumberInflow)
+{
+    RDouble heightCF = 4.0e-6;
+    RDouble thetat = 1.0;
+    RDouble deltHeight  = heightCrossFlow * (1.0 + MIN((viscosityTurbulence / viscosityLaminar), 0.4));
+    RDouble dHPos = MAX(0.1066 - deltHeight, 0.0);
+    RDouble dHNeg = MAX((deltHeight - 0.1066), 0.0);
+    RDouble fDHPos = dHPos * (6200.0 + 50000.0 * dHPos);
+    RDouble fDHNeg = 75.0 * tanh(dHNeg * 80.0);
+
+    int maxIter = 30;
+    for (int iter = 0; iter < maxIter; ++iter)
+    {
+        RDouble reynoldsSCFa = reynoldsNumberInflow * thetat * density * (velocity / 0.82) / viscosityLaminar;
+        //RDouble reynoldsSCFb = -14.7 * log(heightCF / thetat) + 296.77 + functionDeltah1 - functionDeltah2;
+        RDouble reynoldsSCFb = -35.088 * log(heightCF / thetat) + 319.51 + fDHPos - fDHNeg;
+        if (ABS((reynoldsSCFa - reynoldsSCFb) / reynoldsSCFa) <= 1.0e-6)
+        {
+            break;
+        }
+        //thetat = (viscosityLaminar / (reynoldsNumberInflow * density * (velocity / 0.82)))
+        //    * (-14.7 * log(heightCF / thetat) + 296.77 + functionDeltah1 - functionDeltah2);
+        thetat = (viscosityLaminar / (reynoldsNumberInflow * density * (velocity / 0.82)))
+            * (-35.088 * log(heightCF / thetat) + 319.51 + fDHPos - fDHNeg);
+    }
+    thetat = reynoldsNumberInflow * thetat * density * (velocity / 0.82) / viscosityLaminar;
+    return thetat;
+}
+
+RDouble TimeScaleInSourceTerm(RDouble density, RDouble velocity, RDouble viscosityLaminar, RDouble viscosityTurbulence, RDouble reynoldsNumberInflow)
+{
+    RDouble timeScale = 500.0 * viscosityLaminar / (density * velocity * velocity * reynoldsNumberInflow);
+    //timeScale = MIN(timeScale, density*gridLength/(viscosityLaminar + viscosityTurbulence));
+    return timeScale;
+};
+
+RDouble MomentumThickness(RDouble density, RDouble velocity, RDouble viscosity, RDouble onsetReynoldsOnMomentumThickness,
+    RDouble reynoldsNumberInflow)
+{
+    return onsetReynoldsOnMomentumThickness * viscosity / (density * velocity * reynoldsNumberInflow);
+};
+
+RDouble FlengthGivenByLangtry(RDouble Rectabar)
+{
+    RDouble Flength;
+    if (Rectabar < 400.0)
+    {
+        Flength = 39.8189 - Rectabar * (1.1927e-2 + 1.32567e-4 * Rectabar);
+    }
+    else if (Rectabar >= 400.0 && Rectabar < 596.0)
+    {
+        Flength = 2.63404e2 - Rectabar * (1.23939 - Rectabar * (1.94548e-3 - 1.01695e-6 * Rectabar));
+    }
+    else if (Rectabar >= 596.0 && Rectabar < 1200.)
+    {
+        Flength = 0.5 - 3.0e-4 * (Rectabar - 596.0);
+    }
+    else
+    {
+        Flength = 0.3188;
+    }
+    return Flength;
+};
+
+RDouble FlengthCaliBrated(RDouble Rectabar)
+{
+    RDouble Flength;
+    if (Rectabar < 103.0)
+    {
+        Flength = 39.0 - Rectabar * (0.01482 + 2.687e-007 * Rectabar * Rectabar);
+    }
+    else if (Rectabar < 182.0)
+    {
+        Flength = 40.74 - Rectabar * (0.06538 - Rectabar * (0.0004908 - 1.857e-006 * Rectabar));
+    }
+    else if (Rectabar < 360.0)
+    {
+        Flength = 20.09 + Rectabar * (0.2749 - Rectabar * (0.001379 -  1.567e-006 * Rectabar));
+    }
+    else if (Rectabar < 687.0)
+    {
+        Flength = 107.7 - Rectabar * (0.4551 - Rectabar * (0.000649 - 3.103e-007 * Rectabar));
+    }
+    else if (Rectabar < 959.0)
+    {
+        Flength = 10.73 - Rectabar * (0.0317 - Rectabar * (3.263e-005 - 1.127e-008 * Rectabar));
+    }
+    else if (Rectabar < 1870.0)
+    {
+        Flength = 0.8605 - Rectabar * (0.0008168 - Rectabar * (4.233e-007 - 7.545e-011 * Rectabar));
+    }
+    else
+    {
+        Flength = 0.32;
+    }
+    return Flength;
+};
+
+RDouble FlengthUnstrCaliBrated(RDouble Rectabar)
+{
+    RDouble Flength;
+    if (Rectabar < 102.7)
+    {
+        Flength = 39.0 - Rectabar * (0.01137 + 6.02e-007 * Rectabar * Rectabar);
+    }
+    else if (Rectabar < 170.3)
+    {
+        Flength = 39.67 - Rectabar * (0.03083 - Rectabar * (0.0001895 - 1.217e-006 * Rectabar));
+    }
+    else if (Rectabar < 360.0)
+    {
+        Flength = 27.49 + Rectabar * (0.1838 - Rectabar * (0.001071 -  1.249e-006 * Rectabar));
+    }
+    else if (Rectabar < 694.0)
+    {
+        Flength = 98.13 - Rectabar * (0.4049 - Rectabar * (0.0005647 - 2.648e-007 * Rectabar));
+    }
+    else if (Rectabar < 959.0)
+    {
+        Flength = 15.2 - Rectabar * (0.04645 - Rectabar * (4.814e-005 - 1.668e-008 * Rectabar));
+    }
+    else if (Rectabar < 1870.0)
+    {
+        Flength = 0.5262 - Rectabar * (0.000556 - Rectabar * (2.846e-007 - 5.073e-011 * Rectabar));
+    }
+    else
+    {
+        Flength = 0.15;
+    }
+    return Flength;
+};
+
+RDouble HighReynoldsCorrectionOfFlength(RDouble ReynoldsNumberBasedOnDissipation, RDouble Flengthori)
+{
+    RDouble Rw = ReynoldsNumberBasedOnDissipation / 500.0;
+    RDouble Fsublayer = exp(-(6.25 * Rw * Rw));
+    return Flengthori - (Flengthori - 40.0) * Fsublayer;
+};
+
+RDouble ViscosityRatio(RDouble density, RDouble viscosity, RDouble kineticEnergy, RDouble dissipationRate, RDouble reynoldsInflow)
+{
+    return density * kineticEnergy / (viscosity * dissipationRate);
+};
+
+RDouble TransitionOnsetFunction(RDouble Rev, RDouble Rectac, RDouble RT)
+{
+    RDouble Fonset1, Fonset2, Fonset3;
+
+    Fonset1 = Rev / (2.193 * Rectac);
+
+    Fonset2 = MIN(MAX(Fonset1, pow(Fonset1, 4.0)), 2.0);
+
+    Fonset3 = MAX(1.0 - RT * RT * RT / 15.625, 0.0);
+
+    return MAX(Fonset2 - Fonset3, 0.0);
+};
+
+RDouble TransitionOnsetMomentumThicknessReynolds(RDouble Rectabar)
+{
+    if (Rectabar > 1870.0)
+    {
+        return Rectabar - 593.11 - 0.482 * (Rectabar - 1870.0);
+    }
+    else
+    {
+        return - 3.96035 + Rectabar * (1.0120656 - Rectabar * (8.6823e-4 - Rectabar * (6.96506e-7 - 1.74105e-10 * Rectabar)));
+    }
+};
+
+RDouble TransitionOnsetMomentumThicknessReynoldsCaliBrated(RDouble Rectabar)
+{
+    RDouble rectac = 0.0;
+    if (Rectabar < 103.0)
+    {
+        rectac = 7.0 + Rectabar * (0.875 + 8.04e-007 * Rectabar * Rectabar);
+    }
+    else if (Rectabar < 181.0)
+    {
+        rectac = 11.92 + Rectabar * (0.7317 + Rectabar * (0.001391 - 3.698e-006 * Rectabar));
+    }
+    else if (Rectabar < 685.0)
+    {
+        rectac = -12.75 + Rectabar * (1.141 - Rectabar * (0.0008683 - 4.631e-007 * Rectabar));
+    }
+    else if (Rectabar < 959.0)
+    {
+        rectac = 159.0 + Rectabar * (0.3885 + Rectabar * (0.0002297 - 7.122e-008 * Rectabar));
+    }
+    else
+    {
+        rectac = 104.2 + Rectabar * (0.56 + Rectabar * (5.09e-005 - 9.073e-009 * Rectabar));
+    }
+    return rectac;
+};
+
+RDouble TransitionOnsetMomentumThicknessReynoldsUnstrCaliBrated(RDouble Rectabar)
+{
+    RDouble rectac = 0.0;
+    if (Rectabar < 102.7)
+    {
+        rectac = -7.0 + Rectabar * (1.058 + 3.394e-006 * Rectabar * Rectabar);
+    }
+    else if (Rectabar < 170.3)
+    {
+        rectac = -12.45 + Rectabar * (1.217 - Rectabar * (0.001549 - 1.633e-006 * Rectabar));
+    }
+    else if (Rectabar < 694.0)
+    {
+        rectac = -7.556 + Rectabar * (1.131 - Rectabar * (0.001043 - 6.43e-007 * Rectabar));
+    }
+    else if (Rectabar < 959.0)
+    {
+        rectac = 82.62 + Rectabar * (0.7413 - Rectabar * (0.0004813 - 3.732e-007 * Rectabar));
+    }
+    else
+    {
+        rectac = 602.9 - Rectabar * (0.8863 - Rectabar * (0.001216 - 2.167e-007 * Rectabar));
+    }
+    return rectac;
+};
+
+RDouble SeparationCorrectionOfIntermittency(RDouble gmori, RDouble Rev, RDouble Rectac, RDouble RT, RDouble Fctat, RDouble s1, RDouble refMaNumber)
+{
+    RDouble xsep = 1.3;
+    if (refMaNumber <= 4.0)
+    {
+        xsep += 0.04375 * (4.0 - refMaNumber) * (4.0 - refMaNumber);
+    }
+    RDouble Freattach = exp(-pow(RT / 20.0, 4.0));
+    RDouble gmsep = Fctat * MIN(xsep, s1 * Freattach * MAX(0.0, Rev / (3.235 * Rectac) - 1.0));
+
+    return MAX(gmori, gmsep);
+}
+
+RDouble TurbulenceIntensity(RDouble velocity, RDouble kineticEnergy)
+{
+    return MAX(0.027, 100.0 * sqrt(2.0 * kineticEnergy / 3.0) / velocity);
+}
+
+RDouble ControlFunctionFturb(RDouble RT)
+{
+    return exp(-pow(RT / 4.0, 4.0));
+}
+
+void CorrectionOfBlendingFunctionInSST(RDouble density, RDouble distance, RDouble viscosity, RDouble kineticEnergy, RDouble reynoldsInflow, RDouble &F1)
+{
+    RDouble ry = reynoldsInflow * density * distance * sqrt(kineticEnergy) / viscosity;
+    RDouble F3 = exp(-pow(ry / 120.0, 8.0));
+
+    F1 = MAX(F1, F3);
+}
+
+RDouble CorrectionOfDestructionInKEquation(RDouble gmeff, RDouble Dk)
+{
+    return Dk * MIN(1.0, MAX(0.1, gmeff));
+}
+
+RDouble CorrectionOfProductionInKEquation(RDouble gmeff, RDouble Pk)
+{
+    return gmeff * Pk;
+}
+
+RDouble EmpiricalCorrelationOfFlamdacta(RDouble Tu, RDouble lamdacta)
+{
+    if (lamdacta > 0.0)
+    {
+        return 1.0 + 0.275 * (1.0 - exp(-35.0 * lamdacta)) * exp(-2.0 * Tu);
+    }
+    else if (lamdacta < 0.0)
+    {
+        return 1.0 + lamdacta * (12.986 + lamdacta * (123.66 + 405.689 * lamdacta)) * exp(-pow(Tu / 1.5, 1.5));
+    }
+    else
+    {
+        return 1.0;
+    }
+}
+
+RDouble EmpiricalCorrelationOfRectat(RDouble Tu, RDouble Flamdacta)
+{
+    RDouble Rectat;
+    if (Tu > 1.3)
+    {
+        Rectat = 331.5 * Flamdacta * pow(Tu - 0.5658, -0.671);
+    }
+    else
+    {
+        Rectat = Flamdacta * (1173.51 - 589.428 * Tu + 0.2196 / (Tu * Tu));
+    }
+
+    return MIN(MAX(20.0, Rectat), 5000);
+}
+
+RDouble AccelerationAlongStreamline(RDouble u, RDouble v, RDouble w,
+    RDouble dudx, RDouble dudy, RDouble dudz,
+    RDouble dvdx, RDouble dvdy, RDouble dvdz,
+    RDouble dwdx, RDouble dwdy, RDouble dwdz)
+{
+    RDouble absu = MAX(SMALL, DISTANCE(u, v, w));
+
+    RDouble uu = u / absu;
+    RDouble vv = v / absu;
+    RDouble ww = w / absu;
+
+    RDouble dUx = uu * dudx + vv * dvdx + ww * dwdx;
+    RDouble dUy = uu * dudy + vv * dvdy + ww * dwdy;
+    RDouble dUz = uu * dudz + vv * dvdz + ww * dwdz;
+
+    return uu * dUx + vv * dUy + ww * dUz;
+}
+
+void BlendingFunctionOfFctat(RDouble gm, RDouble Rew, RDouble Rectabar, RDouble vorticity, RDouble viscosity, RDouble density,
+    RDouble absu, RDouble distance, RDouble reynoldsInflow, RDouble ce2, RDouble &Fctat, RDouble &Fctatcf)
+{
+    RDouble ctaBL = Rectabar * viscosity / reynoldsInflow / MAX(density * absu, SMALL);
+
+    RDouble deltaBL = 7.5 * ctaBL;
+
+    RDouble delta = 50.0 * vorticity * distance * deltaBL / MAX(absu, SMALL);
+
+    RDouble Fwake = exp(-(Rew / 1.0e5) * (Rew / 1.0e5));
+
+    RDouble tmp1 = Fwake * exp(-pow(distance / delta, 4.0));
+    RDouble tmp2 = 1.0 - ((ce2 * gm - 1.0) / (ce2 - 1.0)) * ((ce2 * gm - 1.0) / (ce2 - 1.0));
+
+    Fctat = MIN(1.0, MAX(tmp1, tmp2));
+    Fctatcf = MIN(tmp1, 1.0);
+};
+
+RDouble PressureGradientFunction(RDouble density, RDouble momentumThickness, RDouble viscosity, RDouble dUds, RDouble reynoldsInflow)
+{
+    RDouble lamdacta = density * momentumThickness * momentumThickness * dUds * reynoldsInflow / viscosity;
+
+    return lamdacta;
+};
+
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/src/TransitionSolver.cpp b/CFD/TurbSolver/src/TransitionSolver.cpp
new file mode 100644
index 0000000..0e92f28
--- /dev/null
+++ b/CFD/TurbSolver/src/TransitionSolver.cpp
@@ -0,0 +1,340 @@
+#include "TransitionSolver.h"
+#include "Constants.h"
+#include "TK_Exit.h"
+#include "TK_Log.h"
+
+namespace PHSPACE
+{
+
+void Transition_MxDQ(RDouble *mat,RDouble *dq,int numberOfTransitionEquation, RDouble *df)
+{
+    for (int m = 0; m < numberOfTransitionEquation; ++ m)
+    {
+        df[m] = mat[m] * dq[m];
+    }
+}
+
+TransitionSolver::TransitionSolver()
+{
+}
+
+TransitionSolver::~TransitionSolver()
+{
+}
+
+string TransitionSolver::CastName(const string &name)
+{
+    if (name == "res")
+    {
+        return "res_transition";
+    }
+    else if (name == "q")
+    {
+        return "q_transition";
+    }
+
+    return name;
+}
+
+int TransitionSolver::GetNumberOfEquations()
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    return nTransitionEquation;
+}
+
+void TransitionSolver::InitDependentVariables()
+{
+    Grid *fineGrid = GetGrid(0);
+
+    ComputeQTransitionNodeValue(fineGrid);
+}
+
+void TransitionSolver::InitCoarseGridsFlow()
+{
+}
+
+void TransitionSolver::Action(ActionKey *actkey)
+{
+    CFDSolver::Action(actkey);
+}
+
+void TransitionSolver::FillActionKey(ActionKey *actkey, int action, int level)
+{
+    actkey->action   = action;
+    actkey->solver   = TRANSITION;
+    actkey->solverID = this->GetIndex();
+    actkey->kind     = SOLVER_BASED;
+    actkey->level    = level;
+}
+
+void TransitionSolver::Solve()
+{
+    int outnstep = 0;
+    //! Get iteration and zonal number.
+    GlobalDataBase::GetData("outnstep", &outnstep, PHINT, 1);
+
+    Grid *grid = GetGrid(0);
+
+    //! Zero the residuals of the finest grid.
+    ZeroResiduals(grid);
+
+    //! Solve NS for all grids starting from the finest grid.
+    SolveOnGrid(grid);
+
+    CommunicationInterfaceData();
+
+    InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+    if (interpointInformation)
+    {
+        CommunicationInterpointData();
+    }
+    GlobalDataBase::UpdateData("outnstep", &outnstep, PHINT, 1);
+
+    int intervalStepFlow = 100;
+    GlobalDataBase::GetData("intervalStepFlow", &intervalStepFlow, PHINT, 1);
+
+    if (outnstep % intervalStepFlow == 0)
+    {
+        //! To dump restart data for continual simulation.
+        ActionKey *actkeyDumpRestartData = new ActionKey();
+        FillActionKey(actkeyDumpRestartData, DUMP_RESTART, 0);
+        DumpRestartData(actkeyDumpRestartData);
+        delete actkeyDumpRestartData;
+    }
+
+    int intervalStepRes;
+    GlobalDataBase::GetData("intervalStepRes", &intervalStepRes, PHINT, 1);
+    if (outnstep % intervalStepRes == 0)
+    {
+        //! To dump residual data.
+        ActionKey *actkeyDumpResidual = new ActionKey();
+        FillActionKey(actkeyDumpResidual, DUMP_RESIDUAL, 0);
+        DumpResidual(actkeyDumpResidual);
+        delete actkeyDumpResidual;
+    }
+}
+
+void TransitionSolver::PostSolve(Grid *grid_in, int stage, int level)
+{
+    CommunicationInterfaceData();
+}
+
+void TransitionSolver::DumpResultFile(Grid *grid, int level)
+{
+    int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int intervalStepFlow = GlobalDataBase::GetIntParaFromDB("intervalStepFlow");
+
+    bool isSubIterationDump = true; //! It is true default in steady simulations.
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        GlobalDataBase::GetData("isSubIterationDump", &isSubIterationDump, PHBOOL, 1);
+    }
+
+    int nProtectData = 0;
+    if(GlobalDataBase::IsExist("nProtectData", PHINT, 1))
+    {
+        nProtectData = GlobalDataBase::GetIntParaFromDB("nProtectData");
+    }
+
+    if (outnstep % intervalStepFlow == 0 && level == 0 && isSubIterationDump)
+    {
+
+        if(nProtectData ==0)
+        {
+            //! To dump restart data for continual simulation.
+            ActionKey *actkeyDumpRestartData = new ActionKey();
+            FillActionKey(actkeyDumpRestartData, DUMP_RESTART, 0);
+            DumpRestartData(actkeyDumpRestartData);
+            delete actkeyDumpRestartData;
+        }
+        else
+        {
+            int RestartFile = 0;
+            ActionKey *actkeyDumpRestartData = new ActionKey();
+            FillActionKey(actkeyDumpRestartData, DUMP_RESTART, level);
+            DumpTransitionProtectData(actkeyDumpRestartData, RestartFile);
+            delete actkeyDumpRestartData;
+        
+            if(outnstep > 1)
+            {
+                if(RestartFile == 0)
+                {
+                    string path = "./results/transition1.dat";
+                    remove(path.c_str());
+
+                    if(PHMPI::IsParallelRun())
+                    {
+                        string path1 = "./results/transition1_0.dat";
+                        remove(path1.c_str());
+                    }
+                }
+
+                else if(RestartFile == 1)
+                {
+                    string path = "./results/transition0.dat";
+                    remove(path.c_str());
+
+                    if(PHMPI::IsParallelRun())
+                    {
+                        string path2 = "./results/transition0_0.dat";
+                        remove(path2.c_str());
+                    }
+                }
+            }
+        }
+    }
+
+    int intervalStepRes = GlobalDataBase::GetIntParaFromDB("intervalStepRes");
+    if (outnstep == 1 || outnstep % intervalStepRes == 0 && (!isUnsteady || !isSubIterationDump))
+    {
+        //! To dump residual data.
+        ActionKey * actkeyDumpResidual = new ActionKey();
+        FillActionKey(actkeyDumpResidual, DUMP_RESIDUAL, level);
+        DumpResidual(actkeyDumpResidual);
+        delete actkeyDumpResidual;
+    }
+}
+
+void TransitionSolver::Post()
+{
+    //! To dump restart data for continual simulation.
+    ActionKey *actkeyDumpRestartData = new ActionKey();
+    FillActionKey(actkeyDumpRestartData, DUMP_RESTART, 0);
+    DumpRestartData(actkeyDumpRestartData);
+    delete actkeyDumpRestartData;
+}
+
+void TransitionSolver::RegisterCFDSolverInterfaceField()
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    
+    CFDSolver::RegisterInterfaceField("transition::q", PHDOUBLE, nTransitionEquation);
+
+    CFDSolver::RegisterInterfaceField("transition::dq", PHDOUBLE, nTransitionEquation);
+
+    CFDSolver::RegisterInterfaceField("transition::dqdx", PHDOUBLE, nTransitionEquation);
+    CFDSolver::RegisterInterfaceField("transition::dqdy", PHDOUBLE, nTransitionEquation);
+    CFDSolver::RegisterInterfaceField("transition::dqdz", PHDOUBLE, nTransitionEquation);
+}
+
+void TransitionSolver::RegisterCFDSolverInterpointField()
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    CFDSolver::RegisterInterpointField("qTransitionNode", PHDOUBLE, nTransitionEquation);
+}
+
+void TransitionSolver::RegisterOversetField()
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    CFDSolver::RegisterOversetField("transition::q", PHDOUBLE, nTransitionEquation);
+}
+
+void TransitionSolver::DeAllocateOversetInterfaceVar(Data_ParamFieldSuite *dataStore)
+{
+    RDouble **q = reinterpret_cast <RDouble **> (dataStore->GetDataPtr("transition::q"));
+    DelPointer2(q);
+}
+
+void TransitionSolver::PrepareOversetInterfaceData(Data_ParamFieldSuite *datastore, InterfaceDataProxy *interfaceDataProxy)
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **qTransition = reinterpret_cast<RDouble **> (datastore->GetDataPtr("transition::q"));
+
+    vector<RDouble **> &vectorData = interfaceDataProxy->GetVectorData();
+    vector<int>   &vectorDimension = interfaceDataProxy->GetVectorDimension();
+
+    vectorDimension.push_back(nTransitionEquation);
+    vectorData.push_back(qTransition);
+}
+
+//! Drive functions to calculate residuals for different orders and dimensions.
+void TransitionSolver::UpdateResiduals(Grid *grid)
+{
+    //! Set values for flow variables in ghost cells.
+    Boundary(grid);
+
+    //! Zero the other variables of the grid.
+    InitSpectrum(grid);
+
+    //! Compute the source term.
+    SourceFlux(grid);
+
+    //! Compute the spectrum radius.
+    Diagonal(grid);
+
+    //! Compute the inviscid flux.
+    InviscidFlux(grid);
+
+    //! Compute the viscous flux.
+    ViscousFlux(grid);
+
+    DualTimeSource(grid);
+
+    ZeroResidualOfSpecialCells(grid); 
+
+    FreeGradientProxy(grid);
+}
+
+void TransitionSolver::SourceFlux(Grid *grid)
+{
+    SourceFluxTwoEquation(grid);
+}
+
+//! Compare the outnstep in the flowfield file between the NS and transition.
+void TransitionSolver::CompareOutStepOfFlowfieldFile(int outnstepofNS, int outnstepofTransition) const
+{
+    if (outnstepofNS == outnstepofTransition) return;
+
+    ostringstream oss;
+    oss << "outnstepofNS   = " << outnstepofNS   << endl;
+    oss << "outnstepofTransition = " << outnstepofTransition << endl;
+    oss << "The NS flowfield file is not matched with the transition." << endl;
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (!isUnsteady)
+    {
+        oss << "Warning: Cluster writes files error! It needs more iteration step." << endl;
+        PrintToWindow(oss.str());
+        WriteLogFile (oss.str());
+
+        GlobalDataBase::UpdateData("outnstep", &outnstepofTransition, PHINT, 1);
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("Error: Cluster writes files error! Please restart the calculation. \n");
+    }
+}
+
+//! Get the file name for Residual dumping.
+const string TransitionSolver::GetResidualFileName()
+{
+    string transitionResFile = "transitionRes.dat";
+    GlobalDataBase::GetData("transitionResFile", &transitionResFile, PHSTRING, 1);
+    return transitionResFile;
+}
+
+//! Get the file name for relay calculation.
+const string TransitionSolver::GetRestartFileName()
+{
+    string transitionFile = "transition.dat";
+    GlobalDataBase::GetData("transitionFile", &transitionFile, PHSTRING, 1);
+    return transitionFile;
+}
+
+LIB_EXPORT Param_TransitionSolver *TransitionSolver::GetControlParameters()
+{
+    return static_cast <Param_TransitionSolver *> (controlParameters);
+}
+
+}
diff --git a/CFD/TurbSolver/src/TransitionSolverStruct.cpp b/CFD/TurbSolver/src/TransitionSolverStruct.cpp
new file mode 100644
index 0000000..70d9971
--- /dev/null
+++ b/CFD/TurbSolver/src/TransitionSolverStruct.cpp
@@ -0,0 +1,3338 @@
+#include <cmath>
+#include "TransitionSolverStruct.h"
+#include "OversetGridFactory.h"
+#include "Geo_StructBC.h"
+#include "GradientOperation.h"
+#include "Math_Limiter.h"
+#include "TK_Exit.h"
+#include "Param_TransitionSolver.h"
+#include "Residual.h"
+#include "FieldProxy.h"
+#include "Glb_Dimension.h"
+#include "TK_Log.h"
+#include "IO_FileName.h"
+#include "Transition.h"
+#include <cstdio>
+#include <stdio.h>
+#include "TK_Time.h"
+
+
+using namespace std;
+
+namespace PHSPACE
+{
+TransitionSolverStr::TransitionSolverStr()
+{
+}
+
+TransitionSolverStr::~TransitionSolverStr()
+{
+    DeAllocateGlobalVariables();
+
+    FreeControlParameters();
+}
+
+void TransitionSolverStr::AllocateGlobalVar(Grid *gridIn)
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    if (nTransitionEquation == 0)
+    {
+        return;
+    }
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Range IFACE, JFACE, KFACE;
+    GetRange(ni, nj, nk, -2, 2, IFACE, JFACE, KFACE);
+
+    Range M(0, nTransitionEquation - 1);
+
+    RDouble4D *qTransition = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *residualTransition = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *spectrumTransition = new RDouble4D(I, J, K, M, fortranArray);
+
+    grid->UpdateDataPtr("q_transition", qTransition);    //! Unknown variable of transition model.
+    grid->UpdateDataPtr("res_transition", residualTransition);    //! Residual or right-hand side.
+    grid->UpdateDataPtr("spec_transition", spectrumTransition);    //! Spectral radius of transition.
+
+    RDouble4D *gradTransitionX = new RDouble4D(IFACE, JFACE, KFACE, M, fortranArray);
+    RDouble4D *gradTransitionY = new RDouble4D(IFACE, JFACE, KFACE, M, fortranArray);
+    RDouble4D *gradTransitionZ = new RDouble4D(IFACE, JFACE, KFACE, M, fortranArray);
+    grid->UpdateDataPtr("gradTransitionX", gradTransitionX);    //! Gradient of unknown variable at face, for x direction. in x-face.
+    grid->UpdateDataPtr("gradTransitionY", gradTransitionY);    //! Gradient of unknown variable at face, for y direction. in y-face.
+    grid->UpdateDataPtr("gradTransitionZ", gradTransitionZ);    //! Gradient of unknown variable at face, for z direction. in z-face.
+
+    RDouble4D *gradTransitionCellCenterX = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *gradTransitionCellCenterY = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *gradTransitionCellCenterZ = new RDouble4D(I, J, K, M, fortranArray);
+    grid->UpdateDataPtr("gradTransitionCellCenterX", gradTransitionCellCenterX);    //! Gradient of unknown variable at cell-center in x-direction.
+    grid->UpdateDataPtr("gradTransitionCellCenterY", gradTransitionCellCenterY);    //! Gradient of unknown variable at cell-center in y-direction.
+    grid->UpdateDataPtr("gradTransitionCellCenterZ", gradTransitionCellCenterZ);    //! Gradient of unknown variable at cell-center in z-direction.
+
+    //! Temporary variable for periodic boundary condition.
+    RDouble4D *rotTransitiongradValueX = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *rotTransitiongradValueY = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *rotTransitiongradValueZ = new RDouble4D(I, J, K, M, fortranArray);
+    grid->UpdateDataPtr("rotTransitiongradValueX", rotTransitiongradValueX);
+    grid->UpdateDataPtr("rotTransitiongradValueY", rotTransitiongradValueY);
+    grid->UpdateDataPtr("rotTransitiongradValueZ", rotTransitiongradValueZ);
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble4D *qTransitionUnsteadyn1 = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *qTransitionUnsteadyn2 = new RDouble4D(I, J, K, M, fortranArray);
+
+        RDouble4D *residualTransitionUnsteadyn1 = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *residualTransitionUnsteadyn2 = new RDouble4D(I, J, K, M, fortranArray);
+
+        //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+        RDouble4D *residualTransitionUnsteadyTemporary = new RDouble4D(I, J, K, M, fortranArray);
+
+        grid->UpdateDataPtr("q_transition_unsteady_n1", qTransitionUnsteadyn1);
+        grid->UpdateDataPtr("q_transition_unsteady_n2", qTransitionUnsteadyn2);
+        grid->UpdateDataPtr("res_transition_unsteady_n1", residualTransitionUnsteadyn1);
+        grid->UpdateDataPtr("res_transition_unsteady_n2", residualTransitionUnsteadyn2);
+        grid->UpdateDataPtr("res_transition_unsteady_tmp", residualTransitionUnsteadyTemporary);
+
+        //! Statistical variables for DES simulation.
+        int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+        if (ifStaticsFlowField > 0)
+        {
+            RDouble4D *qAverageTransition = new RDouble4D(I, J, K, M, fortranArray);
+            grid->UpdateDataPtr("qAverage_transition", qAverageTransition);
+        }
+    }
+
+    int numberOfDimensions = GetDim();
+    Range D(1, numberOfDimensions);
+
+    RDouble5D *matrixTransitionLeft, *matrixTransitionRight;
+
+    matrixTransitionLeft = new RDouble5D(I, J, K, M, D, fortranArray);
+    matrixTransitionRight = new RDouble5D(I, J, K, M, D, fortranArray);
+
+    grid->UpdateDataPtr("mat_transitionl", matrixTransitionLeft);
+    grid->UpdateDataPtr("mat_transitionr", matrixTransitionRight);
+}
+
+void TransitionSolverStr::DeAllocateGlobalVar(Grid *gridIn)
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    if (nTransitionEquation == 0)
+    {
+        return;
+    }
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D *qTransition = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+    RDouble4D *residualTransition = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition"));
+    RDouble4D *spectrumTransition = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_transition"));
+
+    delete qTransition;
+    delete residualTransition;
+    delete spectrumTransition;
+
+    RDouble4D *gradTransitionX = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionX"));
+    RDouble4D *gradTransitionY = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionY"));
+    RDouble4D *gradTransitionZ = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionZ"));
+
+    delete gradTransitionX;
+    delete gradTransitionY;
+    delete gradTransitionZ;
+
+    RDouble4D *gradTransitionCellCenterX = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionCellCenterX"));
+    RDouble4D *gradTransitionCellCenterY = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionCellCenterY"));
+    RDouble4D *gradTransitionCellCenterZ = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionCellCenterZ"));
+
+    delete gradTransitionCellCenterX;
+    delete gradTransitionCellCenterY;
+    delete gradTransitionCellCenterZ;
+
+    RDouble4D *rotTransitiongradValueX = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotTransitiongradValueX"));
+    RDouble4D *rotTransitiongradValueY = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotTransitiongradValueY"));
+    RDouble4D *rotTransitiongradValueZ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotTransitiongradValueZ"));
+    delete rotTransitiongradValueX;
+    delete rotTransitiongradValueY;
+    delete rotTransitiongradValueZ;
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble4D *qTransitionUnsteadyn1 = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition_unsteady_n1"));
+        RDouble4D *qTransitionUnsteadyn2 = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition_unsteady_n2"));
+        RDouble4D *residualTransitionUnsteadyn1 = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition_unsteady_n1"));
+        RDouble4D *residualTransitionUnsteadyn2 = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition_unsteady_n2"));
+
+        //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+        RDouble4D *residualTransitionUnsteadyTemporary = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition_unsteady_tmp"));
+
+        delete qTransitionUnsteadyn1;
+        delete qTransitionUnsteadyn2;
+        delete residualTransitionUnsteadyn1;
+        delete residualTransitionUnsteadyn2;
+        delete residualTransitionUnsteadyTemporary;
+
+        //! Statistical variables for DES simulation.
+        int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+        if (ifStaticsFlowField > 0)
+        {
+            RDouble4D *qAverageTransition = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("qAverage_transition"));
+            delete qAverageTransition;
+        }
+    }
+
+    RDouble5D *matrixTransitionLeft, *matrixTransitionRight;
+    matrixTransitionLeft = reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_transitionl"));
+    matrixTransitionRight = reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_transitionr"));
+
+    delete matrixTransitionLeft;
+    delete matrixTransitionRight;
+}
+
+bool TransitionSolverStr::JudgeIfRestart()
+{
+    string transitionFile = ".\results\transition.dat";
+    GlobalDataBase::GetData("transitionFile", &transitionFile, PHSTRING, 1);
+
+    if (PHMPI::IsParallelRun())
+    {
+        transitionFile = PHSPACE::AddSymbolToFileName(transitionFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(transitionFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+bool TransitionSolverStr::JudgeIfProtectedRestart()
+{
+    string protectionTransitionFile0 = "./results/transition0.dat";
+    GlobalDataBase::GetData("protectionTransitionFile0", &protectionTransitionFile0, PHSTRING, 1);
+    if (PHMPI::IsParallelRun())
+    {
+        protectionTransitionFile0 = PHSPACE::AddSymbolToFileName(protectionTransitionFile0, "_", 0);
+    }
+
+    string protectionTransitionFile1 = "./results/transition1.dat";
+    GlobalDataBase::GetData("protectionTransitionFile1", &protectionTransitionFile1, PHSTRING, 1);
+    if (PHMPI::IsParallelRun())
+    {
+        protectionTransitionFile1 = PHSPACE::AddSymbolToFileName(protectionTransitionFile1, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile_0(protectionTransitionFile0.c_str(), ios::in);
+    if (infile_0)
+    {
+        restart_flag = true;
+        infile_0.close();
+        infile_0.clear();
+    }
+
+    ifstream infile_1(protectionTransitionFile1.c_str(), ios::in);
+    if (infile_1)
+    {
+        restart_flag = true;
+        infile_1.close();
+        infile_1.clear();
+    }
+
+    return restart_flag;
+}
+
+bool TransitionSolverStr::JudgeIfReadAverage()
+{
+    string transitionFile = ".\results\transition.dat";
+    GlobalDataBase::GetData("transitionFile", &transitionFile, PHSTRING, 1);
+    string averageTransitionFile = AddSymbolToFileName(transitionFile, "_", "Average");
+
+    if (PHMPI::IsParallelRun())
+    {
+        averageTransitionFile = PHSPACE::AddSymbolToFileName(averageTransitionFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(averageTransitionFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+void TransitionSolverStr::InitFlowAsReadingProtectedRestart(ActionKey *actkey)
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+    int RestartFile = 0;
+    string protectionTransitionFile0 = "./results/transition0.dat";
+    GlobalDataBase::GetData("protectionTransitionFile0", &protectionTransitionFile0, PHSTRING, 1);
+
+    string protectionTransitionFile1 = "./results/transition1.dat";
+    GlobalDataBase::GetData("protectionTransitionFile1", &protectionTransitionFile1, PHSTRING, 1);
+
+    if (PHMPI::IsParallelRun())
+    {
+        protectionTransitionFile0 = PHSPACE::AddSymbolToFileName(protectionTransitionFile0, "_", 0);
+        protectionTransitionFile1 = PHSPACE::AddSymbolToFileName(protectionTransitionFile1, "_", 0);
+    }
+
+    ifstream infile_0(protectionTransitionFile0.c_str(), ios::in);
+    if (infile_0)
+    {
+        RestartFile = 0;
+    }
+
+    ifstream infile_1(protectionTransitionFile1.c_str(), ios::in);
+    if (infile_1)
+    {
+        RestartFile = 1;
+    }
+
+    if (infile_0 && infile_1)     //If both flow0 and flow1 exist,determine which file to use by the last modified time.
+    {
+        RDouble TimeFile0, TimeFile1;
+        TIME_SPACE::GetFileModifiedTime(protectionTransitionFile0, TimeFile0);
+        TIME_SPACE::GetFileModifiedTime(protectionTransitionFile1, TimeFile1);
+        if (TimeFile0 < TimeFile1)
+        {
+            RestartFile = 0;
+        }
+        else if (TimeFile0 > TimeFile1)
+        {
+            RestartFile = 1;
+        }
+    }
+
+    if (RestartFile == 0)
+    {
+        actkey->filename = protectionTransitionFile0;
+    }
+    else
+    {
+        actkey->filename = protectionTransitionFile1;
+    }
+
+    if (actkey->filename == "")
+    {
+        return;
+    }
+
+    hid_t file;
+    file = OpenHDF5File(actkey->filename);
+    actkey->filepos = file;
+
+    int nZones = GetNumberofGlobalZones();
+    int currentProcessorID = GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int recvProcess = GetZoneProcessorID(iZone);
+
+        if (currentProcessorID == recvProcess)
+        {
+            CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->ReadRestartH5(actkey);
+        }
+    }
+
+    H5Fclose(file);
+    actkey->filepos = 0;
+}
+
+void TransitionSolverStr::DumpRestartH5(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int currentProcessorID = GetCurrentProcessorID();
+
+    int version = 1;
+    int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    if (currentProcessorID == GetServerProcessorID())
+    {
+        WriteData(actkey->filepos, &version, "Version");
+        WriteData(actkey->filepos, &outIterStep, "outnstep");
+
+        if (IsNeedStatistics())
+        {
+            int nStatisticalStep = 0;
+            GlobalDataBase::GetData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+            WriteData(actkey->filepos, &nStatisticalStep, "nStatisticalStep");
+        }
+    }
+
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    StructGrid *strGrid = StructGridCast(GetGrid(actkey->level));
+    int nTotalCell = strGrid->GetNTotalCell();
+
+    int ist, ied, jst, jed, kst, ked;
+    strGrid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    Range M(0, nTransitionEquation - 1);
+    int mst = M.first();
+
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    WriteData(grploc, &nTotalCell, "nTotalCell");
+    WriteData(grploc, &qTransition(ist, jst, kst, mst), "q_transition");
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady == 1)
+    {
+        RDouble4D &qTransitionUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition_unsteady_n1"));
+        WriteData(grploc, &qTransitionUnsteadyn1(ist, jst, kst, mst), "q_transition_unsteady_n1");
+
+        RDouble4D &qTransitionUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition_unsteady_n2"));
+        WriteData(grploc, &qTransitionUnsteadyn2(ist, jst, kst, mst), "q_transition_unsteady_n2");
+
+        RDouble4D &residualTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition"));
+        WriteData(grploc, &residualTransition(ist, jst, kst, mst), "res_transition");
+
+        RDouble4D &residualTransitionUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition_unsteady_n1"));
+        WriteData(grploc, &residualTransitionUnsteadyn1(ist, jst, kst, mst), "res_transition_unsteady_n1");
+
+        RDouble4D &residualTransitionUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition_unsteady_n2"));
+        WriteData(grploc, &residualTransitionUnsteadyn2(ist, jst, kst, mst), "res_transition_unsteady_n2");
+
+        if (IsNeedStatistics())
+        {
+            RDouble4D &qAverageTransition = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage_transition"));
+            WriteData(grploc, &qAverageTransition(ist, jst, kst, mst), "qAverageTransition");
+        }
+    }
+
+    H5Gclose(grploc);
+}
+
+void TransitionSolverStr::ReadRestartH5(ActionKey *actkey)
+{
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    StructGrid *strGrid = StructGridCast(GetGrid(actkey->level));
+    int nTotalCell = strGrid->GetNTotalCell();
+
+    int ist, ied, jst, jed, kst, ked;
+    strGrid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    Range M(0, nTransitionEquation - 1);
+    int mst = M.first();
+
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+
+    int outIterstepofNS = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int outIterStepofTransition = 0;
+    ReadData(actkey->filepos, &outIterStepofTransition, "outnstep");
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    int nTotalCellRestart = 0;
+    ReadData(grploc, &nTotalCellRestart, "nTotalCell");
+    if (nTotalCellRestart != nTotalCell)
+    {
+        ostringstream erroeInfo;
+        erroeInfo << " Error: the cell number in transition.dat is not equal to the cell number in grid file !" << endl;
+        TK_Exit::ExceptionExit(erroeInfo.str());
+    }
+
+    ReadData(grploc, &qTransition(ist, jst, kst, mst), "q_transition");
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble4D &qTransitionUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition_unsteady_n1"));
+        RDouble4D &qTransitionUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition_unsteady_n2"));
+        RDouble4D &residualTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition"));
+        RDouble4D &residualTransitionUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition_unsteady_n1"));
+        RDouble4D &residualTransitionUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition_unsteady_n2"));
+        RDouble4D &qAverageTransition = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage_transition"));
+
+        int ifStartFromSteadyResults = parameters->GetIfStartFromSteadyResults();
+
+        if (ifStartFromSteadyResults)
+        {
+            if (grid->GetGridID()->GetIndex() == 0)
+            {
+                PrintToWindow("Restart from steady Transition flow field, reset outer step to be zero!\n");
+            }
+
+            outIterStepofTransition = 0;
+            GlobalDataBase::UpdateData("outnstep", &outIterStepofTransition, PHINT, 1);
+
+            qTransitionUnsteadyn1 = qTransition;
+            qTransitionUnsteadyn2 = qTransition;
+
+            residualTransition = 0.0;
+            residualTransitionUnsteadyn1 = 0.0;
+            residualTransitionUnsteadyn2 = 0.0;
+        }
+        else
+        {
+            ReadData(grploc, &qTransitionUnsteadyn1(ist, jst, kst, mst), "q_transition_unsteady_n1");
+            ReadData(grploc, &qTransitionUnsteadyn2(ist, jst, kst, mst), "q_transition_unsteady_n2");
+            ReadData(grploc, &residualTransition(ist, jst, kst, mst), "res_transition");
+            ReadData(grploc, &residualTransitionUnsteadyn1(ist, jst, kst, mst), "res_transition_unsteady_n1");
+            ReadData(grploc, &residualTransitionUnsteadyn2(ist, jst, kst, mst), "res_transition_unsteady_n2");
+        }
+
+        int nStatisticalStep = 0;
+        int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+        int startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+        bool isReadAverageFlow = ifStaticsFlowField && (outIterStepofTransition >= startStatisticStep);
+        if (isReadAverageFlow)
+        {
+            if (ifStartFromSteadyResults)
+            {
+                qAverageTransition = qTransition;
+                GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+            }
+            else
+            {
+                ReadData(grploc, &qAverageTransition(ist, jst, kst, mst), "qAverageTransition");
+
+                ReadData(actkey->filepos, &nStatisticalStep, "nStatisticalStep");
+                GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+            }
+        }
+    }
+
+    H5Gclose(grploc);
+
+    CompareOutStepOfFlowfieldFile(outIterstepofNS, outIterStepofTransition);
+}
+
+void TransitionSolverStr::GetResidual(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+
+    RDouble4D &residualTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition"));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    PHSPACE::ComputeResidualonGrid(grid, actkey, residualTransition, nTransitionEquation);
+}
+
+void TransitionSolverStr::ZeroResiduals(Grid *gridIn)
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    if (nTransitionEquation == 0)
+    {
+        return;
+    }
+
+    RDouble4D &residualTransition = *reinterpret_cast<RDouble4D *> (gridIn->GetDataPtr("res_transition"));
+    residualTransition = 0;
+}
+
+void TransitionSolverStr::InitSpectrum(Grid *gridIn)
+{
+    RDouble4D &spectrumTransition = *reinterpret_cast<RDouble4D *> (gridIn->GetDataPtr("spec_transition"));
+    spectrumTransition = 0;
+}
+
+void TransitionSolverStr::InitFlowAsRestart()
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    if (nTransitionEquation == 0)
+    {
+        return;
+    }
+
+    StructGrid *grid = StructGridCast(GetGrid(0));
+
+    //int outIterStep = 0;
+    //GlobalDataBase::UpdateData("outnstep", &outIterStep, PHINT, 1);
+
+    RDouble *freeStreamTransitionVar = parameters->GetFreeStreamTransitionVar();
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    Range M(0, nTransitionEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int m = mst; m <= med; ++m)
+    {
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    qTransition(i, j, k, m) = freeStreamTransitionVar[m];
+                }
+            }
+        }
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble4D &qTransitionUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition_unsteady_n1"));
+        RDouble4D &qTransitionUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition_unsteady_n2"));
+
+        qTransitionUnsteadyn1 = qTransition;
+        qTransitionUnsteadyn2 = qTransitionUnsteadyn1;
+
+        RDouble4D &residualTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition"));
+        RDouble4D &residualTransitionUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition_unsteady_n1"));
+        RDouble4D &residualTransitionUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition_unsteady_n2"));
+
+        residualTransition = 0.0;
+        residualTransitionUnsteadyn1 = 0.0;
+        residualTransitionUnsteadyn2 = 0.0;
+
+        //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+        RDouble4D &residualTransitionUnsteadyTemporary = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition_unsteady_tmp"));
+
+        residualTransitionUnsteadyTemporary = 0.0;
+    }
+}
+
+void TransitionSolverStr::FillField(Grid *gridIn, FieldProxy *fieldProxy, RDouble value)
+{
+    RDouble4D &field = fieldProxy->GetField_STR();
+
+    field = value;
+}
+
+void TransitionSolverStr::FillField(Grid *gridIn, FieldProxy *fieldProxyTarget, FieldProxy *fieldProxySource)
+{
+    RDouble4D &fieldTarget = fieldProxyTarget->GetField_STR();
+    RDouble4D &fieldSource = fieldProxySource->GetField_STR();
+
+    fieldTarget = fieldSource;
+}
+
+FieldProxy *TransitionSolverStr::CreateFieldProxy(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+    Range M(0, nTransitionEquation - 1);
+
+    RDouble4D *field = new RDouble4D(I, J, K, M, fortranArray);
+
+    FieldProxy *fieldProxy = new FieldProxy();
+    fieldProxy->SetField_STR(field, true);
+    return fieldProxy;
+}
+
+FieldProxy *TransitionSolverStr::CreateFlowFieldProxy(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int numberOfLaminar = GlobalDataBase::GetIntParaFromDB("nl");
+    int numberOfChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    int numberOfEquation = numberOfLaminar + numberOfChemical;
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+    Range M(0, numberOfEquation - 1);
+
+    RDouble4D *field = new RDouble4D(I, J, K, M, fortranArray);
+
+    FieldProxy *fieldProxy = new FieldProxy();
+    fieldProxy->SetField_STR(field, true);
+    return fieldProxy;
+}
+
+FieldProxy *TransitionSolverStr::GetFieldProxy(Grid *gridIn, const string &fieldName)
+{
+    Grid *grid = gridIn;
+
+    RDouble4D *field = reinterpret_cast<RDouble4D *> (grid->GetDataPtr(fieldName));
+
+    FieldProxy *fieldProxy = new FieldProxy();
+
+    fieldProxy->SetField_STR(field);
+
+    return fieldProxy;
+}
+
+FieldProxy *TransitionSolverStr::GetResidualProxy(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &residualTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition"));
+
+    FieldProxy *residualProxy = new FieldProxy();
+
+    residualProxy->SetField_STR(&residualTransition);
+
+    return residualProxy;
+}
+
+void TransitionSolverStr::StoreRhsByResidual(Grid *gridIn, FieldProxy *rightHandSideProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &residualTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition"));
+
+    RDouble4D &rightHandSide = rightHandSideProxy->GetField_STR();
+
+    rightHandSide = residualTransition;
+}
+
+void TransitionSolverStr::InitResidual(Grid *gridIn, FieldProxy *rightHandSideProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    Range M(0, nTransitionEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    RDouble4D &residualTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition"));
+    RDouble4D &rightHandSide = rightHandSideProxy->GetField_STR();
+
+    for (int m = mst; m <= med; ++m)
+    {
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    RDouble &resTransition = residualTransition(i, j, k, m);
+                    resTransition = -rightHandSide(i, j, k, m);
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverStr::RecoverResidual(Grid *gridIn, FieldProxy *rightHandSideProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &residualTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition"));
+    RDouble4D &rightHandSide = rightHandSideProxy->GetField_STR();
+
+    if (grid->GetLevel() != 0)
+    {
+        residualTransition = rightHandSide;
+    }
+}
+
+LIB_EXPORT void TransitionSolverStr::InitControlParameters()
+{
+    FreeControlParameters();
+    controlParameters = new Param_TransitionSolver();
+    controlParameters->Init();
+}
+
+LIB_EXPORT Param_TransitionSolver *TransitionSolverStr::GetControlParameters()
+{
+    return static_cast <Param_TransitionSolver *> (controlParameters);
+}
+
+void TransitionSolverStr::LoadQ(Grid *gridIn, FieldProxy *qTrubProxy)
+{
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (gridIn->GetDataPtr("q_transition"));
+    RDouble4D &qTransitionInProxy = qTrubProxy->GetField_STR();
+
+    qTransitionInProxy = qTransition;
+}
+
+void TransitionSolverStr::RungeKuttaResidual(Grid *gridIn, FieldProxy *dqTransitionProxy, RDouble RKCoeff)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &dqTransition = dqTransitionProxy->GetField_STR();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble3D &dt = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("dt"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    Range M(0, nTransitionEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int m = mst; m <= med; ++m)
+    {
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    RDouble &dq = dqTransition(i, j, k, m);
+                    dq *= dt(i, j, k) * RKCoeff;
+                }
+            }
+        }
+    }
+}
+
+//! Load rhs to residual res stored in grid.
+void TransitionSolverStr::LoadResiduals(Grid *gridIn, FieldProxy *rightHandSideProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &rightHandSide = rightHandSideProxy->GetField_STR();
+
+    RDouble4D &residualTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition"));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    Range M(0, nTransitionEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int m = mst; m <= med; ++m)
+    {
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    RDouble &resTransition = residualTransition(i, j, k, m);
+                    resTransition = -rightHandSide(i, j, k, m);
+                }
+            }
+        }
+    }
+}
+
+RDouble TransitionSolverStr::UnsteadyConvergence(Grid *gridIn)
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        return zero;
+    }
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+    RDouble4D &qTransitionUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition_unsteady_n1"));
+    RDouble4D &qTransitionUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition_unsteady_n2"));
+    RDouble4D &residualTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition"));
+
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble *qTransition0 = new RDouble[nTransitionEquation];
+    RDouble *qTransition1 = new RDouble[nTransitionEquation];
+    RDouble *qTransition2 = new RDouble[nTransitionEquation];
+
+    RDouble *qTransitionConserve0 = new RDouble[nTransitionEquation];
+    RDouble *qTransitionConserve1 = new RDouble[nTransitionEquation];
+    RDouble *qTransitionConserve2 = new RDouble[nTransitionEquation];
+
+    using namespace IDX;
+
+    RDouble summedPrimitive = zero;
+    RDouble summedConserve = zero;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                for (int m = 0; m < nTransitionEquation; ++m)
+                {
+                    qTransition0[m] = qTransition(i, j, k, m);
+                    qTransition1[m] = qTransitionUnsteadyn1(i, j, k, m);
+                    qTransition2[m] = qTransitionUnsteadyn2(i, j, k, m);
+                }
+
+                RDouble rho = 1.0;
+
+                if (nTransitionEquation >= 2)
+                {
+                    rho = qLaminar(i, j, k, IR);
+                }
+
+                for (int m = 0; m < nTransitionEquation; ++m)
+                {
+                    qTransitionConserve0[m] = rho * qTransition0[m];
+                    qTransitionConserve1[m] = rho * qTransition1[m];
+                    qTransitionConserve2[m] = rho * qTransition2[m];
+                }
+
+                for (int m = 0; m < nTransitionEquation; ++m)
+                {
+                    RDouble dqTransitionPseudo = residualTransition(i, j, k, m);           // qn+1, p+1 - qn+1, p
+                    RDouble dqTransitionPhysical = qTransitionConserve0[m] - qTransitionConserve1[m];  // qn+1, p+1 - qn
+                    summedPrimitive += dqTransitionPseudo * dqTransitionPseudo;
+                    summedConserve += dqTransitionPhysical * dqTransitionPhysical;
+                }
+            }
+        }
+    }
+
+    delete[] qTransition0;    qTransition0 = NULL;
+    delete[] qTransition1;    qTransition1 = NULL;
+    delete[] qTransition2;    qTransition2 = NULL;
+    delete[] qTransitionConserve0;    qTransitionConserve0 = NULL;
+    delete[] qTransitionConserve1;    qTransitionConserve1 = NULL;
+    delete[] qTransitionConserve2;    qTransitionConserve2 = NULL;
+
+    RDouble unsteadyConvergence = sqrt(ABS(summedPrimitive / (summedConserve + SMALL)));
+    return unsteadyConvergence;
+}
+
+void TransitionSolverStr::UpdateUnsteadyFlow(Grid *gridIn)
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        return;
+    }
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    //! The volume at current timestep. If it is dualtime step method, it represents the volume at timestep of n+1.
+    RDouble3D &volume = grid->GetVolume(0);
+    //! The volume at timestep of n  .
+    RDouble3D &volumeUnsteadyn1 = grid->GetVolume(1);
+    //! The volume at timestep of n-1.
+    RDouble3D &volumeUnsteadyn2 = grid->GetVolume(2);
+
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+    RDouble4D &qTransitionUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition_unsteady_n1"));
+    RDouble4D &qTransitionUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition_unsteady_n2"));
+
+    RDouble4D &residualTransitionUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition_unsteady_n1"));
+    RDouble4D &residualTransitionUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition_unsteady_n2"));
+    RDouble4D &residualTransitionUnsteadyTemporary = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition_unsteady_tmp"));
+
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    qTransitionUnsteadyn2 = qTransitionUnsteadyn1;
+    qTransitionUnsteadyn1 = qTransition;
+
+    volumeUnsteadyn2 = volumeUnsteadyn1;
+    volumeUnsteadyn1 = volume;
+
+    //! Here the current outnstep is over, the value of the stored resTmp should be assigned to resn1 for the next outnstep.
+    //! It should be noticed that residualUnsteadyTemporary only contain the inviscid and viscous flux.
+    residualTransitionUnsteadyn2 = residualTransitionUnsteadyn1;
+    residualTransitionUnsteadyn1 = residualTransitionUnsteadyTemporary;
+
+    //! Statistical variables for DES simulation.
+    int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+    if (ifStaticsFlowField > 0)
+    {
+        int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+        int startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+
+        if (outIterStep >= startStatisticStep)
+        {
+            int nStatisticalStep = GlobalDataBase::GetIntParaFromDB("nStatisticalStep");
+            RDouble statisticalTimePeriod = GlobalDataBase::GetDoubleParaFromDB("statisticalTimePeriod");
+            RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+            RDouble coeff1 = 1.0 / (nStatisticalStep * 1.0);
+            if (statisticalTimePeriod > 0.0)
+            {
+                coeff1 = MAX(coeff1, physicalTimeStep / statisticalTimePeriod);
+            }
+            RDouble coeff2 = 1.0 - coeff1;
+
+            RDouble4D &qAverageTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("qAverage_transition"));
+
+            for (int k = kst; k <= ked; ++k)
+            {
+                for (int j = jst; j <= jed; ++j)
+                {
+                    for (int i = ist; i <= ied; ++i)
+                    {
+                        for (int m = 0; m < nTransitionEquation; ++m)
+                        {
+                            qAverageTransition(i, j, k, m) = coeff2 * qAverageTransition(i, j, k, m) + coeff1 * qTransition(i, j, k, m);
+                        }
+                    }
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverStr::DualTimeSource(Grid *gridIn)
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        return;
+    }
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+    RDouble4D &qTransitionUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition_unsteady_n1"));
+    RDouble4D &qTransitionUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition_unsteady_n2"));
+
+    RDouble4D &residualTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition"));
+    RDouble4D &residualTransitionUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition_unsteady_n1"));
+    RDouble4D &residualTransitionUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition_unsteady_n2"));
+    RDouble4D &residualTransitionUnsteadyTemporary = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition_unsteady_tmp"));
+
+    //! The volume at current timestep. If it is dualtime step method, it represents the volume at timestep of n+1.
+    RDouble3D &volume = grid->GetVolume(0);
+    //! The volume at timestep of n  .
+    RDouble3D &volumeUnsteadyn1 = grid->GetVolume(1);
+    //! the volume at timestep of n-1.
+    RDouble3D &volumeUnsteadyn2 = grid->GetVolume(2);
+
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    //! The primitive variables.
+    RDouble *qTransitionPrimtive0 = new RDouble[nTransitionEquation];
+    RDouble *qTransitionPrimtive1 = new RDouble[nTransitionEquation];
+    RDouble *qTransitionPrimtive2 = new RDouble[nTransitionEquation];
+
+    //! The conservative variables.
+    RDouble *qTransitionConserve0 = new RDouble[nTransitionEquation];
+    RDouble *qTransitionConserve1 = new RDouble[nTransitionEquation];
+    RDouble *qTransitionConserve2 = new RDouble[nTransitionEquation];
+
+    //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux,
+    //! used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+    residualTransitionUnsteadyTemporary = residualTransition;
+
+    //! Computation of dualtime coefficients, including three coefficients for Residual of R(p), R(n) and R(n-1);
+    //! and three coefficients for conservative variables of qcsv(p), qcsv(n), and qcsv(n-1).
+    RDouble dualTimeCoefficient[7];
+    const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+    ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+
+    RDouble dualTimeResC1 = dualTimeCoefficient[0];
+    RDouble dualTimeResC2 = dualTimeCoefficient[1];
+    RDouble dualTimeResC3 = dualTimeCoefficient[2];
+    RDouble dualTimeQC1 = dualTimeCoefficient[3];
+    RDouble dualTimeQC2 = dualTimeCoefficient[4];
+    RDouble dualTimeQC3 = dualTimeCoefficient[5];
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                for (int m = 0; m < nTransitionEquation; ++m)
+                {
+                    qTransitionPrimtive0[m] = qTransition(i, j, k, m);
+                    qTransitionPrimtive1[m] = qTransitionUnsteadyn1(i, j, k, m);
+                    qTransitionPrimtive2[m] = qTransitionUnsteadyn2(i, j, k, m);
+                }
+
+                RDouble roe = 1.0;
+
+                if (nTransitionEquation >= 2)
+                {
+                    roe = qLaminar(i, j, k, IR);
+                }
+
+                for (int m = 0; m < nTransitionEquation; ++m)
+                {
+                    qTransitionConserve0[m] = roe * qTransitionPrimtive0[m];
+                    qTransitionConserve1[m] = roe * qTransitionPrimtive1[m];
+                    qTransitionConserve2[m] = roe * qTransitionPrimtive2[m];
+                }
+
+                for (int m = 0; m < nTransitionEquation; ++m)
+                {
+                    RDouble dualSrcRes = dualTimeResC1 * residualTransition(i, j, k, m) +
+                        dualTimeResC2 * residualTransitionUnsteadyn1(i, j, k, m) +
+                        dualTimeResC3 * residualTransitionUnsteadyn2(i, j, k, m);
+
+                    RDouble dualSrcQ = dualTimeQC1 * qTransitionConserve0[m] * volume(i, j, k) +
+                        dualTimeQC2 * qTransitionConserve1[m] * volumeUnsteadyn1(i, j, k) +
+                        dualTimeQC3 * qTransitionConserve2[m] * volumeUnsteadyn2(i, j, k);
+
+                    residualTransition(i, j, k, m) = dualSrcRes + dualSrcQ;
+                }
+            }
+        }
+    }
+
+    delete[]qTransitionPrimtive0;
+    delete[]qTransitionPrimtive1;
+    delete[]qTransitionPrimtive2;
+    delete[]qTransitionConserve0;
+    delete[]qTransitionConserve1;
+    delete[]qTransitionConserve2;
+}
+
+
+void TransitionSolverStr::SourceFluxTwoEquation(Grid *gridIn)
+{
+    //! This routine calculates the source terms relative to k and omega equations for k-omega
+    //! two-equation models.
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &qPrimitive = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousLaminar = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+    RDouble4D &spectrumTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_transition"));
+    RDouble4D &residualTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition"));
+
+    RDouble3D &walldist = *grid->GetWallDist();
+
+    RDouble3D &vol = *(grid->GetCellVolume());
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble refMaNumber = parameters->GetRefMachNumber();
+    string viscousName = parameters->GetViscousName();
+
+    //! To determine if compressible correction used or not.
+    int isCC = 0;
+    if (GlobalDataBase::IsExist("compressibleCorrection", PHINT, 1))
+    {
+        isCC = GlobalDataBase::GetIntParaFromDB("compressibleCorrection");
+    }
+
+    int freeturbIntensitySRModify = 0;
+    if (GlobalDataBase::IsExist("freeturbIntensitySRModify", PHINT, 1))
+    {
+        freeturbIntensitySRModify = GlobalDataBase::GetIntParaFromDB("freeturbIntensitySRModify");
+    }
+    double freeDecayXLocation = 0.0;
+    if (GlobalDataBase::IsExist("freeDecayXLocation", PHDOUBLE, 1))
+    {
+        freeDecayXLocation = GlobalDataBase::GetDoubleParaFromDB("freeDecayXLocation");
+    }
+
+    RDouble compressibleFix = 1.0 + 0.20 * pow(refMaNumber, 2.6);
+    int transitionMaFix = 1;
+    if (GlobalDataBase::IsExist("transitionMaFix", PHINT, 1))
+    {
+        transitionMaFix = GlobalDataBase::GetIntParaFromDB("transitionMaFix");
+    }
+    if (transitionMaFix == 0)
+    {
+        compressibleFix = 1.0;
+    }
+
+    RDouble pressure = 0.0, density = 0.0, ke = 0.0, kw = 0.0;
+    RDouble sij2 = 0.0, divv = 0.0, mut = 0.0;
+    RDouble volume = 0.0;
+    RDouble dudx0 = 0.0, dudy0 = 0.0, dudz0 = 0.0, dvdx0 = 0.0, dvdy0 = 0.0, dvdz0 = 0.0, dwdx0 = 0.0, dwdy0 = 0.0, dwdz0 = 0.0;
+    RDouble s11 = 0.0, s22 = 0.0, s33 = 0.0, s12 = 0.0, s13 = 0.0, s23 = 0.0, w12 = 0.0, w13 = 0.0, w23 = 0.0;
+
+    Range II, JJ, KK;
+    GetRange(ni, nj, nk, -2, 1, II, JJ, KK);
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    using namespace IDX;
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble ca1 = parameters->Getca1();
+    RDouble ca2 = parameters->Getca2();
+    RDouble ce1 = parameters->Getce1();
+    RDouble ce2 = parameters->Getce2();
+    RDouble cct = parameters->Getcct();
+    RDouble  s1 = parameters->Gets1();
+    RDouble ccf = parameters->Getccf();
+
+    RDouble3D &gamaeff = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("gamaeff"));
+    RDouble3D &rescf = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("rescf"));
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                density = qPrimitive(i, j, k, IR);
+                pressure = qPrimitive(i, j, k, IP);
+                ke = qTurbulence(i, j, k, IKE);
+                kw = qTurbulence(i, j, k, IKW);
+                mut = viscousTurbulence(i, j, k);
+                volume = vol(i, j, k);
+
+                dudx0 = gradUVWTCellCenterX(i, j, k, 0);
+                dudy0 = gradUVWTCellCenterY(i, j, k, 0);
+                dudz0 = gradUVWTCellCenterZ(i, j, k, 0);
+                dvdx0 = gradUVWTCellCenterX(i, j, k, 1);
+                dvdy0 = gradUVWTCellCenterY(i, j, k, 1);
+                dvdz0 = gradUVWTCellCenterZ(i, j, k, 1);
+                dwdx0 = gradUVWTCellCenterX(i, j, k, 2);
+                dwdy0 = gradUVWTCellCenterY(i, j, k, 2);
+                dwdz0 = gradUVWTCellCenterZ(i, j, k, 2);
+
+                s11 = dudx0;
+                s22 = dvdy0;
+                s33 = dwdz0;
+                s12 = half * (dudy0 + dvdx0);
+                s13 = half * (dudz0 + dwdx0);
+                s23 = half * (dvdz0 + dwdy0);
+                w12 = half * (dudy0 - dvdx0);
+                w13 = half * (dudz0 - dwdx0);
+                w23 = half * (dvdz0 - dwdy0);
+
+                sij2 = two * (s11 * s11 + s22 * s22 + s33 * s33 + two * (s12 * s12 + s13 * s13 + s23 * s23));    //! Modulus of S.
+                divv = s11 + s22 + s33;    //! Divergence of velocity.
+
+                RDouble mul = viscousLaminar(i, j, k);
+                RDouble um = qPrimitive(i, j, k, IU);
+                RDouble vm = qPrimitive(i, j, k, IV);
+                RDouble wm = qPrimitive(i, j, k, IW);
+                RDouble intermittency = qTransition(i, j, k, IGAMA);
+                RDouble Rectabar = qTransition(i, j, k, IRECT);
+
+                RDouble wallDistance = walldist(i, j, k);
+
+                RDouble vorx = dvdz0 - dwdy0;
+                RDouble vory = dudz0 - dwdx0;
+                RDouble vorz = dudy0 - dvdx0;
+
+                RDouble vorticity = DISTANCE(vorx, vory, vorz);
+                RDouble strainRate = sqrt(sij2);
+
+                RDouble absU = MAX(DISTANCE(um, vm, wm), SMALL);
+
+                RDouble RT = ViscosityRatio(density, mul, ke, kw, refReNumber);
+                RDouble Rev = ReynoldsNumberBasedOnStrainRate(density, wallDistance, mul, strainRate, refReNumber);
+                RDouble rectac = TransitionOnsetMomentumThicknessReynoldsCaliBrated(Rectabar);
+
+                RDouble Rw = ReynoldsNumberBasedOnDissipation(density, wallDistance, mul, kw, refReNumber);
+                RDouble flength = HighReynoldsCorrectionOfFlength(Rw, FlengthCaliBrated(Rectabar));
+                RDouble Fonset = TransitionOnsetFunction(Rev, rectac, RT);
+                RDouble Fturb = ControlFunctionFturb(RT);
+
+                RDouble production1OfGama = ca1 * flength * density * strainRate * sqrt(intermittency * Fonset);
+                RDouble production2OfGama = production1OfGama * (-ce1 * intermittency);
+
+                RDouble productionOfGama = production1OfGama + production2OfGama;
+
+                RDouble specGamap = MIN(0.0, 1.5 * production2OfGama + 0.5 * production1OfGama) / (density * intermittency);
+
+                RDouble destruction2OfGama = ca2 * Fturb * density * vorticity * intermittency;
+                RDouble destruction1OfGama = ce2 * intermittency * destruction2OfGama;
+
+                RDouble destructionOfGama = destruction1OfGama + destruction2OfGama;
+                RDouble specGamad = MAX(0.0, 2.0 * destruction1OfGama + destruction2OfGama) / (density * intermittency);
+
+                residualTransition(i, j, k, IGAMA) += (productionOfGama - destructionOfGama) * volume;
+                spectrumTransition(i, j, k, IGAMA) += (specGamad - specGamap) * volume;
+
+                RDouble Fctat = 1.0, Fctatcf = 1.0;
+                BlendingFunctionOfFctat(intermittency, Rw, Rectabar, vorticity, mul, density, absU, wallDistance, refReNumber, ce2, Fctat, Fctatcf);
+                RDouble tscl = TimeScaleInSourceTerm(density, absU, mul, mut, refReNumber);
+                RDouble TU = TurbulenceIntensity(absU, ke);
+                gamaeff(i, j, k) = SeparationCorrectionOfIntermittency(intermittency, Rev, rectac, RT, Fctat, s1, refMaNumber);
+
+                RDouble dUds = AccelerationAlongStreamline(um, vm, wm, dudx0, dudy0, dudz0, dvdx0, dvdy0, dvdz0, dwdx0, dwdy0, dwdz0);
+
+                RDouble momentumThickness = 0.0;
+                RDouble Rectat;
+                const int subIter = 10;
+                RDouble lamdacta0, lamdacta = 1.0;
+                for (int iter = 0; iter < subIter; ++iter)
+                {
+                    lamdacta0 = lamdacta;
+                    lamdacta = PressureGradientFunction(density, momentumThickness, mul, dUds, refReNumber);
+                    lamdacta = lamdacta * compressibleFix;
+                    lamdacta = MAX(-0.1, MIN(0.1, lamdacta));
+                    RDouble Flamdacta = EmpiricalCorrelationOfFlamdacta(TU, lamdacta);
+                    Rectat = EmpiricalCorrelationOfRectat(TU, Flamdacta);
+                    momentumThickness = MomentumThickness(density, absU, mul, Rectat, refReNumber);
+                    if (abs(lamdacta0 - lamdacta) <= SMALL)
+                    {
+                        break;
+                    }
+                }
+
+                RDouble omegaStreamWise = abs((dwdy0 - dvdz0) * um + (dudz0 - dwdx0) * vm + (dvdx0 - dudy0) * wm) / absU;
+                RDouble heightCrossFlow = wallDistance * omegaStreamWise / absU;
+                rescf(i, j, k) = ReynoldsNumberBasedOnScf(heightCrossFlow, absU, density, mul, mut, refReNumber);
+
+                RDouble coecommon = cct * (1.0 - Fctat) / MAX(tscl, SMALL);
+
+                RDouble prodRe = coecommon * density * Rectat;
+                RDouble destRe = coecommon * density * Rectabar;
+
+                RDouble prodRecf = cct * density * ccf * MIN(rescf(i, j, k) - Rectabar, 0.0) * Fctatcf / tscl;
+                RDouble specRe = destRe / (density * Rectabar);
+
+                residualTransition(i, j, k, IRECT) += (prodRe + prodRecf - destRe) * volume;
+                spectrumTransition(i, j, k, IRECT) += specRe * volume;
+            }
+        }
+    }
+}
+
+void TransitionSolverStr::Diagonal(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble4D &faceVectorX = *(grid->GetFaceVectorX());
+    RDouble4D &faceVectorY = *(grid->GetFaceVectorY());
+    RDouble4D &faceVectorZ = *(grid->GetFaceVectorZ());
+    RDouble4D &area = *(grid->GetFaceArea());
+    RDouble3D &volume = *(grid->GetCellVolume());
+    RDouble4D &faceNormalVelocity = *(grid->GetFaceNormalVelocity());
+
+    RDouble4D &spectrumTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_transition"));
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousLaminar = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTransition = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &dt = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("dt"));
+
+    RDouble5D &matrixTransitionLeft = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_transitionl"));
+    RDouble5D &matrixTransitionRight = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_transitionr"));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    RDouble transitionCFLScale = parameters->GetTransitionCFLScale();
+    string viscousName = parameters->GetViscousName();
+
+    Range M(0, nTransitionEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    RDouble csrv = GlobalDataBase::GetDoubleParaFromDB("csrv");
+    int ifLowSpeedPrecon = GlobalDataBase::GetIntParaFromDB("ifLowSpeedPrecon");
+
+    RDouble3D *preconCoefficient = NULL;
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        preconCoefficient = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+    }
+
+    matrixTransitionLeft = 0.0;
+    matrixTransitionRight = 0.0;
+
+    using namespace IDX;
+
+    RDouble dualTimeSpectrumC1 = zero;
+    RDouble dualTimeSpectrumC2 = one;
+
+    //! If flow is unsteady, it needs to count the contribution of unsteady.
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble dualTimeCoefficient[7];
+        const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+        ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+        dualTimeSpectrumC1 = -dualTimeCoefficient[3];
+        dualTimeSpectrumC2 = dualTimeCoefficient[6];
+    }
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble volumeCell = volume(i, j, k);
+                RDouble dtCell = dt(i, j, k);
+                RDouble specTransitionDelta = dualTimeSpectrumC1 * volumeCell + dualTimeSpectrumC2 / (transitionCFLScale * dtCell + SMALL);
+                for (int m = mst; m <= med; ++m)
+                {
+                    RDouble &specTrans = spectrumTransition(i, j, k, m);
+                    specTrans += specTransitionDelta;
+                }
+            }
+        }
+    }
+
+    int nDim = GetDim();
+
+    vector<RDouble> work(nTransitionEquation);
+
+    //int il, jl, kl;
+    for (int iSurface = 1; iSurface <= nDim; ++iSurface)
+    {
+        int il1, jl1, kl1;
+        grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+        grid->GetFaceIterationIndex(ist, ied, jst, jed, kst, ked, iSurface);
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    int il, jl, kl;
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    RDouble nx0 = faceVectorX(i, j, k, iSurface);
+                    RDouble ny0 = faceVectorY(i, j, k, iSurface);
+                    RDouble nz0 = faceVectorZ(i, j, k, iSurface);
+                    RDouble vgn0 = faceNormalVelocity(i, j, k, iSurface) * area(i, j, k, iSurface);
+
+                    RDouble nx1 = faceVectorX(il, jl, kl, iSurface);
+                    RDouble ny1 = faceVectorY(il, jl, kl, iSurface);
+                    RDouble nz1 = faceVectorZ(il, jl, kl, iSurface);
+                    RDouble vgn1 = faceNormalVelocity(il, jl, kl, iSurface) * area(il, jl, kl, iSurface);
+
+                    RDouble nx = half * (nx0 + nx1);
+                    RDouble ny = half * (ny0 + ny1);
+                    RDouble nz = half * (nz0 + nz1);
+                    RDouble vgn = half * (vgn0 + vgn1);
+
+                    RDouble ul = qLaminar(i, j, k, IU);
+                    RDouble vl = qLaminar(i, j, k, IV);
+                    RDouble wl = qLaminar(i, j, k, IW);
+                    RDouble Vn = ul * nx + vl * ny + wl * nz - vgn;
+                    if (ifLowSpeedPrecon != 0)
+                    {
+                        RDouble preconCoeff = (*preconCoefficient)(i, j, k);
+                        Vn = half * Vn * (1.0 + preconCoeff);
+                    }
+                    RDouble absVn = ABS(Vn);
+
+                    for (int m = M.first(); m <= M.last(); ++m)
+                    {
+                        RDouble &specTransition = spectrumTransition(i, j, k, m);
+                        specTransition += absVn;
+
+                        RDouble &matTransitionLeft = matrixTransitionLeft(il, jl, kl, m, iSurface);
+                        RDouble &matTransitionRight = matrixTransitionRight(i, j, k, m, iSurface);
+                        matTransitionLeft += half * (-Vn - absVn);
+                        matTransitionRight += half * (Vn - absVn);
+                    }
+                }
+            }
+        }
+    }
+
+    RDouble dct = parameters->Getdct();
+    RDouble df = parameters->Getdf();
+
+    //int il, jl, kl;
+    for (int iSurface = 1; iSurface <= nDim; ++iSurface)
+    {
+        int il1, jl1, kl1;
+        grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+        grid->GetFaceIterationIndex(ist, ied, jst, jed, kst, ked, iSurface);
+
+        Range M1(0, nTransitionEquation - 1);
+        int mst1 = M1.first();
+        int med1 = M1.last();
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    int il, jl, kl;
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    RDouble rho = qLaminar(i, j, k, IR);
+                    RDouble muLaminar = viscousLaminar(i, j, k);
+                    RDouble muTransition = viscousTransition(i, j, k);
+
+                    RDouble cellVolume = volume(i, j, k) + SMALL;
+                    RDouble oVolume = one / cellVolume;
+
+                    RDouble nx0 = faceVectorX(i, j, k, iSurface);
+                    RDouble ny0 = faceVectorY(i, j, k, iSurface);
+                    RDouble nz0 = faceVectorZ(i, j, k, iSurface);
+
+                    RDouble nx1 = faceVectorX(il, jl, kl, iSurface);
+                    RDouble ny1 = faceVectorY(il, jl, kl, iSurface);
+                    RDouble nz1 = faceVectorZ(il, jl, kl, iSurface);
+
+                    RDouble nx = half * (nx0 + nx1);
+                    RDouble ny = half * (ny0 + ny1);
+                    RDouble nz = half * (nz0 + nz1);
+
+                    RDouble ns = nx * nx + ny * ny + nz * nz;
+                    RDouble ns2 = 2.0 * csrv * ns;
+
+                    work[IGAMA] = (muLaminar + muTransition / df) / rho * ns2 * oVolume * oRefReNumber;
+                    work[IRECT] = (muLaminar + muTransition) * dct / rho * ns2 * oVolume * oRefReNumber;
+
+                    for (int m = mst1; m <= med1; ++m)
+                    {
+                        RDouble &specTransition = spectrumTransition(i, j, k, m);
+                        specTransition += work[m];
+
+                        RDouble &matTransitionLeft = matrixTransitionLeft(il, jl, kl, m, iSurface);
+                        RDouble &matTransitionRight = matrixTransitionRight(i, j, k, m, iSurface);
+                        matTransitionLeft += - half * work[m];
+                        matTransitionRight += - half * work[m];
+                    }
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverStr::ChangeTransitionQ(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    Range M(0, nTransitionEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble density = qLaminar(i, j, k, IR);
+                for (int m = mst; m <= med; ++m)
+                {
+                    qTransition(i, j, k, m) *= density;
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverStr::RecoverTransitionQ(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    Range M(0, nTransitionEquation - 1);
+
+    int mst = M.first();
+    int med = M.last();
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble rho = qLaminar(i, j, k, IR) + SMALL;
+                for (int m = mst; m <= med; ++m)
+                {
+                    qTransition(i, j, k, m) /= rho;
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverStr::InviscidFlux(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    FieldProxy *qTransitionLeftPproxy = CreateFieldProxy(grid);
+    FieldProxy *qTransitionRightPproxy = CreateFieldProxy(grid);
+    FieldProxy *fluxProxy = CreateFieldProxy(grid);
+
+    FieldProxy *qLaminarLeftProxy;
+    FieldProxy *qLaminarRightProxy;
+
+    int turbOrderStruct = 2;
+    if (GlobalDataBase::IsExist("turbOrderStruct", PHINT, 1))
+    {
+        turbOrderStruct = GlobalDataBase::GetIntParaFromDB("turbOrderStruct");
+    }
+    if (turbOrderStruct == 2)
+    {
+        qLaminarLeftProxy = new FieldProxy();
+        qLaminarRightProxy = new FieldProxy();
+    }
+    else
+    {
+        qLaminarLeftProxy = CreateFlowFieldProxy(grid);
+        qLaminarRightProxy = CreateFlowFieldProxy(grid);
+    }
+
+    ChangeTransitionQ(grid);
+
+    int nDim = GetDim();
+    for (int iSurface = 1; iSurface <= nDim; ++iSurface)
+    {
+        if (turbOrderStruct == 2)
+        {
+            if (iSurface == 1)
+            {
+                qLaminarLeftProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1")));
+                qLaminarRightProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1")));
+            }
+            else if (iSurface == 2)
+            {
+                qLaminarLeftProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2")));
+                qLaminarRightProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2")));
+            }
+            else
+            {
+                qLaminarLeftProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3")));
+                qLaminarRightProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3")));
+            }
+        }
+        else if (turbOrderStruct == 1)
+        {
+            //! Interpolate u ,v, w, for transition equation.
+            GetInvFaceQValueforTransition(grid, qLaminarLeftProxy, qLaminarRightProxy, iSurface);
+        }
+
+        //! Interpolate den*k den*w.
+        GetInviscidFaceValue(grid, qTransitionLeftPproxy, qTransitionRightPproxy, iSurface);
+
+        //! Correct the variables at the face where the BC condition is set to be wall.
+        CorrectFaceVar(grid, qTransitionLeftPproxy, qTransitionRightPproxy, qLaminarLeftProxy, qLaminarRightProxy, iSurface);
+
+        ComputeInviscidFlux(grid, qTransitionLeftPproxy, qTransitionRightPproxy, qLaminarLeftProxy, qLaminarRightProxy, fluxProxy, iSurface);
+
+        LoadFlux(grid, fluxProxy, iSurface);
+    }
+
+    RecoverTransitionQ(grid);
+
+    delete qTransitionLeftPproxy;
+    delete qTransitionRightPproxy;
+
+    delete qLaminarLeftProxy;
+    delete qLaminarRightProxy;
+
+    delete fluxProxy;
+}
+
+void TransitionSolverStr::GetInviscidFaceValue(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    Range M(0, nTransitionEquation - 1);
+
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+
+    RDouble4D &qLeft = qLeftProxy->GetField_STR();
+    RDouble4D &qRight = qRightProxy->GetField_STR();
+
+    RDouble MUSCLCoefXk = GlobalDataBase::GetDoubleParaFromDB("MUSCLCoefXk");
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    I = Range(1 - il1, ni - 1 + il1);
+    J = Range(1 - jl1, nj - 1 + jl1);
+    K = Range(1 - kl1, nk - 1 + kl1);
+    if (nk == 1)
+    {
+        K.setRange(1, 1);
+    }
+    int turbOrderStruct = 2;
+    if (GlobalDataBase::IsExist("turbOrderStruct", PHINT, 1))
+    {
+        turbOrderStruct = GlobalDataBase::GetIntParaFromDB("turbOrderStruct");
+    }
+    if (turbOrderStruct == 2)
+    {
+        RDouble4D *dql = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *dqr = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *dqlr = new RDouble4D(I, J, K, M, fortranArray);
+
+        (*dql)(I, J, K, M) = qTransition(I, J, K, M) - qTransition(I - il1, J - jl1, K - kl1, M);
+        (*dqr)(I, J, K, M) = qTransition(I + il1, J + jl1, K + kl1, M) - qTransition(I, J, K, M);
+        (*dqlr)(I, J, K, M) = Smoothturb((*dql)(I, J, K, M), (*dqr)(I, J, K, M));
+
+        qLeft(I, J, K, M) = qTransition(I, J, K, M) + 0.25 * (*dqlr)(I, J, K, M) * ((1.0 - MUSCLCoefXk * (*dqlr)(I, J, K, M)) * (*dql)(I, J, K, M) + (1.0 + MUSCLCoefXk * (*dqlr)(I, J, K, M)) * (*dqr)(I, J, K, M));
+        qRight(I, J, K, M) = qTransition(I, J, K, M) - 0.25 * (*dqlr)(I, J, K, M) * ((1.0 - MUSCLCoefXk * (*dqlr)(I, J, K, M)) * (*dqr)(I, J, K, M) + (1.0 + MUSCLCoefXk * (*dqlr)(I, J, K, M)) * (*dql)(I, J, K, M));
+
+        delete dql; dql = NULL;
+        delete dqr; dqr = NULL;
+        delete dqlr; dqlr = NULL;
+
+    }
+    else if (turbOrderStruct == 1)
+    {
+        qLeft(I, J, K, M) = qTransition(I, J, K, M);
+        qRight(I, J, K, M) = qTransition(I, J, K, M);
+    }
+}
+
+void TransitionSolverStr::GetInvFaceQValueforTransition(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Range M(1, 3);
+
+    FieldProxy *qProxy = GetFieldProxy(grid, "q");
+
+    RDouble4D &q = qProxy->GetField_STR();
+    RDouble4D &qLeft = qLeftProxy->GetField_STR();
+    RDouble4D &qRight = qRightProxy->GetField_STR();
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    I = Range(1 - il1, ni - 1 + il1);
+    J = Range(1 - jl1, nj - 1 + jl1);
+    K = Range(1 - kl1, nk - 1 + kl1);
+    if (nk == 1)
+    {
+        K.setRange(1, 1);
+    }
+
+    qLeft(I, J, K, M) = q(I, J, K, M);
+    qRight(I, J, K, M) = q(I, J, K, M);
+
+    delete qProxy;
+}
+
+void TransitionSolverStr::CorrectFaceVar(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, FieldProxy *qLaminarLeftProxy, FieldProxy *qLaminarRightProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    using namespace IDX;
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    Range M(0, nTransitionEquation - 1);
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!(IsWall(BCType) && viscousType > INVISCID))
+        {
+            continue;
+        }
+
+        int *faceDirectionIndex = structBC->GetFaceDirectionIndex();
+        int iSurfOfBC = structBC->GetFaceDirection() + 1;
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (iSurfOfBC != iSurface)
+        {
+            continue;
+        }
+
+        int il, jl, kl;
+        int id, jd, kd;
+
+        GetBCFaceIDX(faceDirectionIndex, id, jd, kd);
+
+        kst = kst + kd;
+        ked = ked + kd;
+        jst = jst + jd;
+        jed = jed + jd;
+        ist = ist + id;
+        ied = ied + id;
+
+        int di, dj, dk;
+
+        di = ABS(faceDirectionIndex[0]);
+        dj = ABS(faceDirectionIndex[1]);
+        dk = ABS(faceDirectionIndex[2]);
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    il = i - di;
+                    jl = j - dj;
+                    kl = k - dk;
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverStr::ComputeInviscidFlux(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, FieldProxy *qLaminarLeftProxy, FieldProxy *qLaminarRightProxy, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    NNDFlux(grid, qLeftProxy, qRightProxy, qLaminarLeftProxy, qLaminarRightProxy, fluxProxy, iSurface);
+}
+
+void TransitionSolverStr::NNDFlux(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, FieldProxy *qLaminarLeftProxy, FieldProxy *qLaminarRightProxy, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &qLeft = qLeftProxy->GetField_STR();
+    RDouble4D &qRight = qRightProxy->GetField_STR();
+
+    RDouble4D &qLaminarLeft = qLaminarLeftProxy->GetField_STR();
+    RDouble4D &qLaminarRight = qLaminarRightProxy->GetField_STR();
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+
+    RDouble4D &faceNormalX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalZ = *(grid->GetFaceNormalZ());
+    RDouble4D &sarea = *(grid->GetFaceArea());
+    RDouble4D &svgn = *(grid->GetFaceNormalVelocity());
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetFaceIterationIndex(ist, ied, jst, jed, kst, ked, iSurface);
+
+    Range M(0, nTransitionEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    using namespace IDX;
+
+    RDouble *priml = new RDouble[nTransitionEquation];
+    RDouble *primr = new RDouble[nTransitionEquation];
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                int il, jl, kl;
+                grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                RDouble xfn = faceNormalX(il, jl, kl, iSurface);
+                RDouble yfn = faceNormalY(il, jl, kl, iSurface);
+                RDouble zfn = faceNormalZ(il, jl, kl, iSurface);
+                RDouble area = sarea(il, jl, kl, iSurface);
+                RDouble vgn = svgn(il, jl, kl, iSurface);
+
+                for (int m = mst; m <= med; ++m)
+                {
+                    priml[m] = qLeft(i, j, k, m);
+                    primr[m] = qRight(il, jl, kl, m);
+                }
+
+                RDouble ul = qLaminarLeft(i, j, k, IU);
+                RDouble vl = qLaminarLeft(i, j, k, IV);
+                RDouble wl = qLaminarLeft(i, j, k, IW);
+
+                RDouble ur = qLaminarRight(il, jl, kl, IU);
+                RDouble vr = qLaminarRight(il, jl, kl, IV);
+                RDouble wr = qLaminarRight(il, jl, kl, IW);
+
+                RDouble vnl = xfn * ul + yfn * vl + zfn * wl - vgn;
+                RDouble vnr = xfn * ur + yfn * vr + zfn * wr - vgn;
+
+                RDouble vnla = half * (vnl + ABS(vnl));
+                RDouble vnra = half * (vnr - ABS(vnr));
+
+                for (int m = mst; m <= med; ++m)
+                {
+                    flux(il, jl, kl, m) = (vnla * priml[m] + vnra * primr[m]) * area;
+                }
+            }
+        }
+    }
+    delete[]priml;
+    delete[]primr;
+}
+
+void TransitionSolverStr::LoadFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble4D &residualTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition"));
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    Range M(0, nTransitionEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int m = mst; m <= med; ++m)
+    {
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    int il, jl, kl;
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+                    residualTransition(i, j, k, m) -= (flux(il, jl, kl, m) - flux(i, j, k, m));
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverStr::ComputeGradientCellCenter(Grid *gridIn)
+{
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &faceVectorX = *(strgrid->GetFaceVectorX());
+    RDouble4D &faceVectorY = *(strgrid->GetFaceVectorY());
+    RDouble4D &faceVectorZ = *(strgrid->GetFaceVectorZ());
+    RDouble3D &volume = *(strgrid->GetCellVolume());
+
+    int ndim = GetDim();
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("q_transition"));
+    RDouble4D &gradTransitionCellCenterX = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("gradTransitionCellCenterX"));
+    RDouble4D &gradTransitionCellCenterY = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("gradTransitionCellCenterY"));
+    RDouble4D &gradTransitionCellCenterZ = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("gradTransitionCellCenterZ"));
+
+    gradTransitionCellCenterX = 0.0;
+    gradTransitionCellCenterY = 0.0;
+    gradTransitionCellCenterZ = 0.0;
+
+    for (int iSurface = 1; iSurface <= ndim; ++iSurface)
+    {
+        int il1, jl1, kl1;
+        strgrid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+        int ist = 1;
+        int ied = ni - 1 + il1;
+        int jst = 1;
+        int jed = nj - 1 + jl1;
+        int kst = 1;
+        int ked = nk - 1 + kl1;
+
+        if (ndim == TWO_D)
+        {
+            ked = 1;
+        }
+
+        //! The gradient of u,v,w.
+        for (int m = 0; m < nTransitionEquation; ++m)
+        {
+            for (int k = kst; k <= ked; ++k)
+            {
+                for (int j = jst; j <= jed; ++j)
+                {
+                    for (int i = ist; i <= ied; ++i)
+                    {
+                        int il, jl, kl;
+                        strgrid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                        RDouble phis = qTransition(i, j, k, m) + qTransition(il, jl, kl, m);
+
+                        RDouble ddx = phis * faceVectorX(i, j, k, iSurface);
+                        RDouble ddy = phis * faceVectorY(i, j, k, iSurface);
+                        RDouble ddz = phis * faceVectorZ(i, j, k, iSurface);
+
+                        RDouble &gradTransitionccXLeft = gradTransitionCellCenterX(i, j, k, m);
+                        RDouble &gradTransitionccYLeft = gradTransitionCellCenterY(i, j, k, m);
+                        RDouble &gradTransitionccZLeft = gradTransitionCellCenterZ(i, j, k, m);
+                        gradTransitionccXLeft -= ddx;
+                        gradTransitionccYLeft -= ddy;
+                        gradTransitionccZLeft -= ddz;
+
+                        RDouble &gradTransitionccXRight = gradTransitionCellCenterX(il, jl, kl, m);
+                        RDouble &gradTransitionccYRight = gradTransitionCellCenterY(il, jl, kl, m);
+                        RDouble &gradTransitionccZRight = gradTransitionCellCenterZ(il, jl, kl, m);
+                        gradTransitionccXRight += ddx;
+                        gradTransitionccYRight += ddy;
+                        gradTransitionccZRight += ddz;
+                    }
+                }
+            }
+        }
+    }
+
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+
+    if (ndim == TWO_D) ked = 1;
+
+    for (int m = 0; m < nTransitionEquation; ++m)
+    {
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    RDouble oov = half / volume(i, j, k);
+                    RDouble &gradTransitionccX = gradTransitionCellCenterX(i, j, k, m);
+                    RDouble &gradTransitionccY = gradTransitionCellCenterY(i, j, k, m);
+                    RDouble &gradTransitionccZ = gradTransitionCellCenterZ(i, j, k, m);
+                    gradTransitionccX *= oov;
+                    gradTransitionccY *= oov;
+                    gradTransitionccZ *= oov;
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverStr::RotateVectorFromInterface(Grid *gridIn, const int &neighborZoneIndex, const int &nEquation)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+    StructBCSet *structBCSet = finestGrid->GetStructBCSet();
+    RDouble4D &rotTransitiongradValueX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotTransitiongradValueX"));
+    RDouble4D &rotTransitiongradValueY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotTransitiongradValueY"));
+    RDouble4D &rotTransitiongradValueZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotTransitiongradValueZ"));
+
+    rotTransitiongradValueX = 0.0;
+    rotTransitiongradValueY = 0.0;
+    rotTransitiongradValueZ = 0.0;
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    double rotationAngle = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+    rotationAngle = rotationAngle * PI / 180;
+    if (nEquation > 0)
+    {
+        RDouble4D &fieldRecvTransitionY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTransitionCellCenterY"));
+        RDouble4D &fieldRecvTransitionZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTransitionCellCenterZ"));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++iLocalFace)
+            {
+                int iFace = interfaceIndexContainerForReceive[iLocalFace];
+                int it, jt, kt;
+                finestGrid->GetTargetIndexIJK(iFace, iGhostLayer + 1, it, jt, kt);
+                finestGrid->RemapMultigridIJK(level, it, jt, kt);
+                int *ibcregions = structBCSet->GetIFaceInfo();
+                int ibcregion = ibcregions[iFace];
+                StructBC *bcregion = structBCSet->GetBCRegion(ibcregion);
+                string bcName = bcregion->GetBCName();
+                if (bcName == "Periodic_up")
+                {
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        rotTransitiongradValueY(it, jt, kt, m) = fieldRecvTransitionY(it, jt, kt, m) * cos(2 * PI - rotationAngle) - fieldRecvTransitionZ(it, jt, kt, m) * sin(2 * PI - rotationAngle);
+                        rotTransitiongradValueZ(it, jt, kt, m) = fieldRecvTransitionY(it, jt, kt, m) * sin(2 * PI - rotationAngle) + fieldRecvTransitionZ(it, jt, kt, m) * cos(2 * PI - rotationAngle);
+                    }
+                }
+                else if (bcName == "Periodic_down")
+                {
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        rotTransitiongradValueY(it, jt, kt, m) = fieldRecvTransitionY(it, jt, kt, m) * cos(rotationAngle) - fieldRecvTransitionZ(it, jt, kt, m) * sin(rotationAngle);
+                        rotTransitiongradValueZ(it, jt, kt, m) = fieldRecvTransitionY(it, jt, kt, m) * sin(rotationAngle) + fieldRecvTransitionZ(it, jt, kt, m) * cos(rotationAngle);
+                    }
+                }
+
+                for (int m = 0; m < nEquation; ++m)
+                {
+                    fieldRecvTransitionY(it, jt, kt, m) = rotTransitiongradValueY(it, jt, kt, m);
+                    fieldRecvTransitionZ(it, jt, kt, m) = rotTransitiongradValueZ(it, jt, kt, m);
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverStr::ReconGradVolWeightedwithCorrection(Grid *gridIn, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+
+    RDouble4D &gradTransitionX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionX"));
+    RDouble4D &gradTransitionY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionY"));
+    RDouble4D &gradTransitionZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionZ"));
+
+    gradTransitionX = 0.0;
+    gradTransitionY = 0.0;
+    gradTransitionZ = 0.0;
+
+    RDouble4D &gradTransitionCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionCellCenterX"));
+    RDouble4D &gradTransitionCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionCellCenterY"));
+    RDouble4D &gradTransitionCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionCellCenterZ"));
+
+    RDouble3D &xcc = *(grid->GetCellCenterX());
+    RDouble3D &ycc = *(grid->GetCellCenterY());
+    RDouble3D &zcc = *(grid->GetCellCenterZ());
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    Range I(1, ni - 1 + il1);
+    Range J(1, nj - 1 + jl1);
+    Range K(1, nk - 1 + kl1);
+    if (nk == 1)
+    {
+        K.setRange(1, 1);
+    }
+
+    int ist, ied, jst, jed, kst, ked;
+    GetIJKRegion(I, J, K, ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble dx = xcc(i, j, k) - xcc(i - il1, j - jl1, k - kl1);
+                RDouble dy = ycc(i, j, k) - ycc(i - il1, j - jl1, k - kl1);
+                RDouble dz = zcc(i, j, k) - zcc(i - il1, j - jl1, k - kl1);
+                RDouble dr = sqrt(dx * dx + dy * dy + dz * dz);
+
+                dx = dx / dr;
+                dy = dy / dr;
+                dz = dz / dr;
+
+                for (int m = 0; m < nEquation; ++m)
+                {
+                    RDouble a = half * (gradTransitionCellCenterX(i, j, k, m) + gradTransitionCellCenterX(i - il1, j - jl1, k - kl1, m));
+                    RDouble b = half * (gradTransitionCellCenterY(i, j, k, m) + gradTransitionCellCenterY(i - il1, j - jl1, k - kl1, m));
+                    RDouble c = half * (gradTransitionCellCenterZ(i, j, k, m) + gradTransitionCellCenterZ(i - il1, j - jl1, k - kl1, m));
+                    RDouble dqdr = (qTransition(i, j, k, m) - qTransition(i - il1, j - jl1, k - kl1, m)) / dr;
+                    RDouble d = a * dx + b * dy + c * dz - dqdr;
+
+                    RDouble &gradTranX = gradTransitionX(i, j, k, m);
+                    RDouble &gradTranY = gradTransitionY(i, j, k, m);
+                    RDouble &gradTranZ = gradTransitionZ(i, j, k, m);
+                    gradTranX = a - d * dx;
+                    gradTranY = b - d * dy;
+                    gradTranZ = c - d * dz;
+                }
+            }
+        }
+    }
+
+    GetGradientAtFace_CorrectionAtPhysicalBoundary(grid, iSurface);
+}
+
+void TransitionSolverStr::GetGradientAtFace_CorrectionAtPhysicalBoundary(Grid *gridIn, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D &gradTransitionFaceX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionX"));
+    RDouble4D &gradTransitionFaceY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionY"));
+    RDouble4D &gradTransitionFaceZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionZ"));
+
+    RDouble4D &gradTransitionCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionCellCenterX"));
+    RDouble4D &gradTransitionCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionCellCenterY"));
+    RDouble4D &gradTransitionCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionCellCenterZ"));
+
+    StructBCSet *compositeBCRegion = grid->GetStructBCSet();
+    int nBCRegion = compositeBCRegion->GetnBCRegion();
+
+    using namespace PHENGLEI;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++iBCRegion)
+    {
+        StructBC *bcregion = compositeBCRegion->GetBCRegion(iBCRegion);
+        int BCType = bcregion->GetBCType();
+        int nsurf_bc = bcregion->GetFaceDirection() + 1;
+
+        int ist, ied, jst, jed, kst, ked;
+        bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (IsInterface(BCType) || nsurf_bc != iSurface) // inner P TO P BC in the current direction
+        {
+            continue;
+        }
+        else if (BCType == SYMMETRY) // symmetry BC
+        {
+            RDouble xfnSign;
+            RDouble yfnSign;
+            RDouble zfnSign;
+
+            xfnSign = ABS(xfn(ist, jst, kst, iSurface)) - 0.1;
+            yfnSign = ABS(yfn(ist, jst, kst, iSurface)) - 0.1;
+            zfnSign = ABS(zfn(ist, jst, kst, iSurface)) - 0.1;
+
+            if (xfnSign > 0.0) // for Y-Z symmetry plane
+            {
+                for (int k = kst; k <= ked; ++k)
+                {
+                    for (int j = jst; j <= jed; ++j)
+                    {
+                        for (int i = ist; i <= ied; ++i)
+                        {
+                            int ibc1, jbc1, kbc1;
+                            bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                            for (int m = 0; m < nEquation; ++m)
+                            {
+                                gradTransitionFaceX(ibc1, jbc1, kbc1, m) = 0.0;
+                                gradTransitionFaceY(ibc1, jbc1, kbc1, m) = gradTransitionCellCenterY(i, j, k, m);
+                                gradTransitionFaceZ(ibc1, jbc1, kbc1, m) = gradTransitionCellCenterZ(i, j, k, m);
+                            }
+                        }
+                    }
+                }
+            }
+
+            if (yfnSign > 0.0) // for X-Z symmetry plane
+            {
+                for (int k = kst; k <= ked; ++k)
+                {
+                    for (int j = jst; j <= jed; ++j)
+                    {
+                        for (int i = ist; i <= ied; ++i)
+                        {
+                            int ibc1, jbc1, kbc1;
+                            bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                            for (int m = 0; m < nEquation; ++m)
+                            {
+                                gradTransitionFaceX(ibc1, jbc1, kbc1, m) = gradTransitionCellCenterX(i, j, k, m);
+                                gradTransitionFaceY(ibc1, jbc1, kbc1, m) = 0.0;
+                                gradTransitionFaceZ(ibc1, jbc1, kbc1, m) = gradTransitionCellCenterZ(i, j, k, m);
+                            }
+                        }
+                    }
+                }
+            }
+
+            if (zfnSign > 0.0) // for X-Y symmetry plane
+            {
+                for (int k = kst; k <= ked; ++k)
+                {
+                    for (int j = jst; j <= jed; ++j)
+                    {
+                        for (int i = ist; i <= ied; ++i)
+                        {
+                            int ibc1, jbc1, kbc1;
+                            bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                            for (int m = 0; m < nEquation; ++m)
+                            {
+                                gradTransitionFaceX(ibc1, jbc1, kbc1, m) = gradTransitionCellCenterX(i, j, k, m);
+                                gradTransitionFaceY(ibc1, jbc1, kbc1, m) = gradTransitionCellCenterY(i, j, k, m);
+                                gradTransitionFaceZ(ibc1, jbc1, kbc1, m) = 0.0;
+                            }
+                        }
+                    }
+                }
+            }
+        }
+        else
+        {
+            for (int k = kst; k <= ked; ++k)
+            {
+                for (int j = jst; j <= jed; ++j)
+                {
+                    for (int i = ist; i <= ied; ++i)
+                    {
+                        int ibc1, jbc1, kbc1;
+                        bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            gradTransitionFaceX(ibc1, jbc1, kbc1, m) = gradTransitionCellCenterX(i, j, k, m);
+                            gradTransitionFaceY(ibc1, jbc1, kbc1, m) = gradTransitionCellCenterY(i, j, k, m);
+                            gradTransitionFaceZ(ibc1, jbc1, kbc1, m) = gradTransitionCellCenterZ(i, j, k, m);
+                        }
+                    }
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverStr::ViscousFlux(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    FieldProxy *fluxProxy = CreateFieldProxy(grid);
+
+    int nDim = GetDim();
+    for (int iSurface = 1; iSurface <= nDim; ++iSurface)
+    {
+        ReconGradVolWeightedwithCorrection(gridIn, iSurface);
+
+        CompVisFlux(grid, fluxProxy, iSurface);
+
+        LoadFlux(grid, fluxProxy, iSurface);
+    }
+
+    delete fluxProxy;
+}
+
+void TransitionSolverStr::CompVisFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &gradientTransitionX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionX"));
+    RDouble4D &gradientTransitionY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionY"));
+    RDouble4D &gradientTransitionZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTransitionZ"));
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+
+    RDouble4D &faceNormalX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalZ = *(grid->GetFaceNormalZ());
+    RDouble4D &area = *(grid->GetFaceArea());
+
+    RDouble3D &viscousLaminar = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTransition = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    string viscousName = parameters->GetViscousName();
+
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    RDouble *fvis = new RDouble[nTransitionEquation];
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetFaceIterationIndex(ist, ied, jst, jed, kst, ked, iSurface);
+
+    using namespace IDX;
+
+    RDouble dct = parameters->Getdct();
+    RDouble df = parameters->Getdf();
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                int il, jl, kl;
+                grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                RDouble nxs = faceNormalX(il, jl, kl, iSurface);
+                RDouble nys = faceNormalY(il, jl, kl, iSurface);
+                RDouble nzs = faceNormalZ(il, jl, kl, iSurface);
+                RDouble nss = area(il, jl, kl, iSurface);
+
+
+                RDouble muLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(il, jl, kl));
+                RDouble muTransition = half * (viscousTransition(i, j, k) + viscousTransition(il, jl, kl));
+
+                RDouble dkgamadx = gradientTransitionX(il, jl, kl, IGAMA);
+                RDouble dkgamady = gradientTransitionY(il, jl, kl, IGAMA);
+                RDouble dkgamadz = gradientTransitionZ(il, jl, kl, IGAMA);
+
+                RDouble dkrectdx = gradientTransitionX(il, jl, kl, IRECT);
+                RDouble dkrectdy = gradientTransitionY(il, jl, kl, IRECT);
+                RDouble dkrectdz = gradientTransitionZ(il, jl, kl, IRECT);
+
+                RDouble mlt3 = muLaminar + muTransition / df;
+                RDouble mlt4 = (muLaminar + muTransition) * dct;
+
+                RDouble dkgamadn = nxs * dkgamadx + nys * dkgamady + nzs * dkgamadz;
+                RDouble dkrectdn = nxs * dkrectdx + nys * dkrectdy + nzs * dkrectdz;
+
+                fvis[IGAMA] = -oRefReNumber * mlt3 * dkgamadn * nss;
+                fvis[IRECT] = -oRefReNumber * mlt4 * dkrectdn * nss;
+
+                for (int m = 0; m < nTransitionEquation; ++m)
+                {
+                    RDouble &fluxface = flux(il, jl, kl, m);
+                    fluxface = fvis[m];
+                }
+            }
+        }
+    }
+
+    delete[]fvis;    fvis = NULL;
+}
+
+void TransitionSolverStr::ZeroResidualOfSpecialCells(Grid *gridIn)
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int isOverset = parameters->GetIsOverLapping();
+    if (!isOverset)
+    {
+        return;
+    }
+
+    RDouble4D &residualTransition = *reinterpret_cast<RDouble4D *> (gridIn->GetDataPtr("res_transition"));
+    StructGrid *grid = PHSPACE::StructGridCast(gridIn);
+    int numberOfEquations = GetNumberOfEquations();
+
+    int *iBlank = grid->GetCellTypeContainer();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int cellLabel = 0;
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                if (iBlank[cellLabel] != GENERIC_COLOR)
+                {
+                    for (int m = 0; m < numberOfEquations; ++m)
+                    {
+                        residualTransition(i, j, k, m) = 0.0;
+                    }
+                }
+                cellLabel += 1;
+            }
+        }
+    }
+}
+
+void TransitionSolverStr::SolveLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &dqTransition = dqProxy->GetField_STR();
+    RDouble4D &deltaFlux = LUplusDQ->GetField_STR();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble *dqNeighbor = new RDouble[nTransitionEquation + 1];
+    RDouble *prim = new RDouble[nTransitionEquation + 1];
+    RDouble *rhs0 = new RDouble[nTransitionEquation + 1];
+    RDouble *dflux = new RDouble[nTransitionEquation + 1];
+    RDouble *mat_abc = new RDouble[nTransitionEquation + 1];
+    RDouble *dqOld = new RDouble[nTransitionEquation + 1];
+    RDouble *Ux = new RDouble[nTransitionEquation + 1];
+
+    RDouble4D &spectrumTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_transition"));
+    RDouble4D &residualTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition"));
+    RDouble5D &matrixTransitionLeft = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_transitionl"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int nDim = GetDim();
+
+    Range M(0, nTransitionEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                for (int m = mst; m <= med; ++m)
+                {
+                    rhs0[m] = 0.0;
+                }
+
+                for (int m = mst; m <= med; ++m)
+                {
+                    //! Back up the old dq, to compute the convergence.
+                    //! it is initialized by zero or res in the first sweep,
+                    //! then it is updated by backward sweep, that is dq*.
+                    dqOld[m] = dqTransition(i, j, k, m);
+
+                    //! Here, the deltaFlux is computed in Upper backward sweep!
+                    //! res: b      deltaFlux: Ux, which is computed in backward sweep.
+                    //! the dq is not the real dq, now.
+                    //! Although the 'dq' changed can not the right one, it dosen't matter, since 
+                    //! the following only using the lower neighbor cells, whose 'dq' has been updated.
+                    //! It is convenient for precondition transform.
+                    RDouble &dq = dqTransition(i, j, k, m);
+                    dq = residualTransition(i, j, k, m);
+
+                    Ux[m] = deltaFlux(i, j, k, m);
+
+                    //! Then reset it to zero to store the Lower forward sweep!
+                    RDouble &df = deltaFlux(i, j, k, m);
+                    df = 0.0;
+                }
+
+                for (int iSurface = 1; iSurface <= nDim; ++iSurface)
+                {
+                    int il, jl, kl, il1, jl1, kl1;
+                    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+                    grid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    for (int m = mst; m <= med; ++m)
+                    {
+                        dqNeighbor[m] = dqTransition(il, jl, kl, m);
+                    }
+
+                    for (int m = mst; m <= med; ++m)
+                    {
+                        mat_abc[m] = matrixTransitionLeft(il, jl, kl, m, iSurface);
+                    }
+
+                    Transition_MxDQ(mat_abc, dqNeighbor, nTransitionEquation, dflux);
+
+                    for (int m = 0; m < nTransitionEquation; ++m)
+                    {
+                        rhs0[m] += dflux[m];
+                    }
+                }
+
+                for (int m = mst; m <= med; ++m)
+                {
+                    //! dq = { (b - Ux) - Lx } / D.
+                    //! Note: the 'dq' has actually initialized by the residual at the beginning of this function.
+                    //! the 'rhs0' is the total Delta Flux of the neighbors.            
+                    //! rhs0: Lx    diagonal: D.
+                    dqTransition(i, j, k, m) = (dqTransition(i, j, k, m) - Ux[m] - rhs0[m]) / spectrumTransition(i, j, k, m);
+
+                    //! Store the lower forward sweep delta-flux, which will be used in the backward sweep.
+                    deltaFlux(i, j, k, m) += rhs0[m];
+
+                    sweepNormal += SQR(dqTransition(i, j, k, m) - dqOld[m]);
+                }
+            }
+        }
+    }
+
+    delete[]dqNeighbor;
+    delete[]prim;
+    delete[]rhs0;
+    delete[]dflux;
+    delete[]mat_abc;
+    delete[]dqOld;
+    delete[]Ux;
+}
+
+void TransitionSolverStr::SolveLUSGSBackward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &dqTransition = dqProxy->GetField_STR();
+    RDouble4D &deltaFlux = LUplusDQ->GetField_STR();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble *dqNeighbor = new RDouble[nTransitionEquation + 1];
+    RDouble *dqOld = new RDouble[nTransitionEquation + 1];
+    RDouble *prim = new RDouble[nTransitionEquation + 1];
+    RDouble *rhs0 = new RDouble[nTransitionEquation + 1];
+    RDouble *dflux = new RDouble[nTransitionEquation + 1];
+    RDouble *mat_abc = new RDouble[nTransitionEquation + 1];
+    RDouble *Lx = new RDouble[nTransitionEquation + 1];
+
+    RDouble4D &spectrumTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_transition"));
+    RDouble4D &residualTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_transition"));
+    RDouble5D &matrixTransitionRight = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_transitionr"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    Range M(0, nTransitionEquation - 1);
+
+    int nDim = GetDim();
+
+    int mst = M.first();
+    int med = M.last();
+
+    for (int k = ked; k >= kst; --k)
+    {
+        for (int j = jed; j >= jst; --j)
+        {
+            for (int i = ied; i >= ist; --i)
+            {
+                for (int m = mst; m <= med; ++m)
+                {
+                    rhs0[m] = 0.0;
+                }
+
+                for (int m = mst; m <= med; ++m)
+                {
+                    //! Back up the old dq, to compute the convergence.
+                    //! The 'dq' is dq*, which has been updated in forward.
+                    dqOld[m] = dqTransition(i, j, k, m);
+
+                    //! The dq is not the real dq, now.
+                    //! it is convenient for precondition transform.
+                    dqTransition(i, j, k, m) = residualTransition(i, j, k, m);
+
+                    Lx[m] = deltaFlux(i, j, k, m);
+
+                    deltaFlux(i, j, k, m) = 0.0;
+                }
+
+                for (int iSurface = 1; iSurface <= nDim; ++iSurface)
+                {
+                    int il, jl, kl, il1, jl1, kl1;
+                    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    for (int m = mst; m <= med; ++m)
+                    {
+                        dqNeighbor[m] = dqTransition(il, jl, kl, m);
+                    }
+
+                    for (int m = mst; m <= med; ++m)
+                    {
+                        mat_abc[m] = matrixTransitionRight(il, jl, kl, m, iSurface);
+                    }
+
+                    Transition_MxDQ(mat_abc, dqNeighbor, nTransitionEquation, dflux);
+
+                    for (int m = mst; m <= med; ++m)
+                    {
+                        rhs0[m] += dflux[m];
+                    }
+                }
+
+                for (int m = mst; m <= med; ++m)
+                {
+                    //! Note: the 'dq' has been updated by the forward sweep.
+                    //! The 'rhs0' is the total Delta Flux of the neighbors.
+                    //! x = {(b - LX) - Ux} / D.
+                    //! rhs0: Ux.    diagonal: D.
+                    dqTransition(i, j, k, m) = (dqTransition(i, j, k, m) - Lx[m] - rhs0[m]) / spectrumTransition(i, j, k, m);
+
+                    //! Store the upper backward sweep delta-flux, which will be used in the forward sweep.
+                    deltaFlux(i, j, k, m) += rhs0[m];
+
+                    sweepNormal += SQR(dqTransition(i, j, k, m) - dqOld[m]);
+                }
+            }
+        }
+    }
+
+    delete[]dqNeighbor;
+    delete[]dqOld;
+    delete[]prim;
+    delete[]rhs0;
+    delete[]dflux;
+    delete[]mat_abc;
+    delete[]Lx;
+}
+
+void TransitionSolverStr::UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &qTransition = qProxy->GetField_STR();
+    RDouble4D &dqTransition = dqProxy->GetField_STR();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble4D &qpmv = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    Range M(0, nTransitionEquation - 1);
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble rho = qpmv(i, j, k, IR);
+                RDouble &kgama = qTransition(i, j, k, IGAMA);
+                RDouble &krect = qTransition(i, j, k, IRECT);
+
+                RDouble dkgama = dqTransition(i, j, k, IGAMA);
+                RDouble dkrect = dqTransition(i, j, k, IRECT);
+
+                kgama += dkgama / rho;
+                krect += dkrect / rho;
+
+                kgama = MIN(kgama, 1.00);
+                krect = MAX(krect, 20.0);
+            }
+        }
+    }
+}
+
+
+void TransitionSolverStr::Boundary(Grid *gridIn)
+{
+    using namespace PHENGLEI;
+    StructGrid *grid = StructGridCast(gridIn);
+
+    StructBCSet *StructBCSet = grid->GetStructBCSet();
+    int nBCRegion = StructBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++iBCRegion)
+    {
+        StructBC *structBC = StructBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (IsInterface(BCType))
+        {
+            continue;
+        }
+        else if (BCType == EXTRAPOLATION)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (IsWall(BCType))
+        {
+            VisWall(grid, structBC);
+        }
+        else if (BCType == SYMMETRY)
+        {
+            SymmetryBC(grid, structBC);
+        }
+        else if (BCType == FARFIELD)
+        {
+            FarFieldBC(grid, structBC);
+        }
+        else if (BCType == INFLOW)
+        {
+            InFlowBC(grid, structBC);
+        }
+        else if (BCType == PRESSURE_INLET)
+        {
+            InFlowBC(grid, structBC);
+        }
+        else if (BCType == MASS_FLOW_INLET)
+        {
+            InFlowBC(grid, structBC);
+        }
+        else if (BCType == OUTFLOW)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == PRESSURE_OUTLET)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == MASS_FLOW_OUTLET)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == POLE || BCType / 10 == POLE)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == OVERSET)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == EXTERNAL_BC)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else
+        {
+            ostringstream oss;
+            oss << "Error : Illegal BCtype ID " << BCType << endl;
+            TK_Exit::ExceptionExit(oss);
+        }
+    }
+    CornerPoint(grid);
+}
+
+void TransitionSolverStr::CornerPoint(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+    FillCornerPoint3D(qTransition, ni, nj, nk, nTransitionEquation);
+}
+
+void TransitionSolverStr::InFlowBC(Grid *grid, StructBC *structBC)
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+    RDouble *freeStreamTransitionVar = parameters->GetFreeStreamTransitionVar();
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int it, jt, kt;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                for (int layer = 1; layer <= 2; ++layer)
+                {
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    for (int m = 0; m < nTransitionEquation; ++m)
+                    {
+                        qTransition(it, jt, kt, m) = freeStreamTransitionVar[m];
+                    }
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverStr::OutFlowBC(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                RestrictIndex(is2, js2, ks2, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                for (int m = 0; m < nTransitionEquation; ++m)
+                {
+                    qTransition(it1, jt1, kt1, m) = two * qTransition(is1, js1, ks1, m) - qTransition(is2, js2, ks2, m);
+                    qTransition(it2, jt2, kt2, m) = two * qTransition(it1, jt1, kt1, m) - qTransition(is1, js1, ks1, m);
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverStr::SymmetryBC(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int is, js, ks, it, jt, kt;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                for (int layer = 1; layer <= 2; ++layer)
+                {
+                    structBC->GetInsideCellIndex(i, j, k, is, js, ks, layer);
+                    RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    for (int m = 0; m < nTransitionEquation; ++m)
+                    {
+                        qTransition(it, jt, kt, m) = qTransition(is, js, ks, m);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverStr::VisWall(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    using namespace IDX;
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                RestrictIndex(is2, js2, ks2, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                qTransition(it1, jt1, kt1, IDX::IGAMA) = qTransition(is1, js1, ks1, IDX::IGAMA);
+                qTransition(it2, jt2, kt2, IDX::IGAMA) = qTransition(it1, jt1, kt1, IDX::IGAMA);
+
+                qTransition(it1, jt1, kt1, IDX::IRECT) = qTransition(is1, js1, ks1, IDX::IRECT);
+                qTransition(it2, jt2, kt2, IDX::IRECT) = qTransition(it1, jt1, kt1, IDX::IRECT);
+            }
+        }
+    }
+}
+
+void TransitionSolverStr::FarFieldBC(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &faceNormalX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalZ = *(grid->GetFaceNormalZ());
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    RDouble *freeStreamTransitionVar = parameters->GetFreeStreamTransitionVar();
+
+    RDouble4D &qTransition = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &gamma = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("gama"));
+
+    int nm = GlobalDataBase::GetIntParaFromDB("nm");
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+
+    using namespace IDX;
+
+    RDouble *primitiveVariablesInfinity = reinterpret_cast<RDouble *> (GlobalDataBase::GetDataPtr("prim_inf"));
+    RDouble rFarfield = primitiveVariablesInfinity[IR];
+    RDouble uFarfield = primitiveVariablesInfinity[IU];
+    RDouble vFarfield = primitiveVariablesInfinity[IV];
+    RDouble wFarfield = primitiveVariablesInfinity[IW];
+    RDouble pFarfield = primitiveVariablesInfinity[IP];
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+    int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+
+    RDouble *prims1 = new RDouble[nm];
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                int in, jn, kn;
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+                RDouble nxs = leftOrRightIndex * faceNormalX(in, jn, kn, iSurface);
+                RDouble nys = leftOrRightIndex * faceNormalY(in, jn, kn, iSurface);
+                RDouble nzs = leftOrRightIndex * faceNormalZ(in, jn, kn, iSurface);
+
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                RestrictIndex(is2, js2, ks2, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                for (int m = 0; m < nm; ++m)
+                {
+                    prims1[m] = qLaminar(is1, js1, ks1, m);
+                }
+
+                RDouble rin = prims1[IR];
+                RDouble uin = prims1[IU];
+                RDouble vin = prims1[IV];
+                RDouble win = prims1[IW];
+                RDouble pin = prims1[IP];
+
+                RDouble vno = nxs * uFarfield + nys * vFarfield + nzs * wFarfield;
+                RDouble vni = nxs * uin + nys * vin + nzs * win;
+                RDouble vei = sqrt(uin * uin + vin * vin + win * win);
+
+                RDouble gama = gamma(is1, js1, ks1);
+
+                RDouble coo = sqrt(ABS(refGama * pFarfield / rFarfield));
+                RDouble cIN = sqrt(ABS(gama * pin / rin));
+
+                if (vei > cIN)
+                {
+                    if (vni >= 0.0)
+                    {
+                        for (int m = 0; m < nTransitionEquation; ++m)
+                        {
+                            qTransition(it1, jt1, kt1, m) = qTransition(is1, js1, ks1, m);
+                            qTransition(it2, jt2, kt2, m) = qTransition(is2, js2, ks2, m);
+                        }
+                    }
+                    else
+                    {
+                        for (int m = 0; m < nTransitionEquation; ++m)
+                        {
+                            qTransition(it1, jt1, kt1, m) = freeStreamTransitionVar[m];
+                            qTransition(it2, jt2, kt2, m) = freeStreamTransitionVar[m];
+                        }
+                    }
+                    continue;
+                }
+
+                RDouble riemp = vni + 2.0 * cIN / (gama - 1.0);
+                RDouble riemm = vno - 2.0 * coo / (refGama - 1.0);
+                RDouble vnb = half * (riemp + riemm);
+
+                if (vnb >= 0.0)
+                {
+                    //! Exit.
+                    for (int m = 0; m < nTransitionEquation; ++m)
+                    {
+                        qTransition(it1, jt1, kt1, m) = qTransition(is1, js1, ks1, m);
+                        qTransition(it2, jt2, kt2, m) = qTransition(is2, js2, ks2, m);
+                    }
+                }
+                else
+                {
+                    //! Inlet.
+                    for (int m = 0; m < nTransitionEquation; ++m)
+                    {
+                        qTransition(it1, jt1, kt1, m) = freeStreamTransitionVar[m];
+                        qTransition(it2, jt2, kt2, m) = freeStreamTransitionVar[m];
+                    }
+                }
+            }
+        }
+    }
+    delete[] prims1;
+}
+
+void TransitionSolverStr::UploadInterfaceData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = reinterpret_cast<StructGrid *> (GetGrid(level));
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo)
+    {
+        return;
+    }
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    RDouble4D *qTransition = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+    PHSPACE::UploadInterfaceValue(grid, qTransition, "transition::q", nTransitionEquation);
+}
+
+void TransitionSolverStr::DownloadInterfaceData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = reinterpret_cast<StructGrid *> (GetGrid(level));
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo)
+    {
+        return;
+    }
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    RDouble4D *qTransition = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+    PHSPACE::DownloadInterfaceValue(grid, qTransition, "transition::q", nTransitionEquation);
+
+}
+
+void TransitionSolverStr::UploadOversetData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble4D *qTransition = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+    PHSPACE::UploadOversetValue(grid, qTransition, "transition::q", nTransitionEquation);
+}
+
+void TransitionSolverStr::DownloadOversetData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble4D *qTransition = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_transition"));
+    PHSPACE::DownloadOversetValue(grid, qTransition, "transition::q", nTransitionEquation);
+}
+
+void TransitionSolverStr::CompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex, const int &nEquation)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &fieldSend = fieldProxy->GetField_STR();
+
+    for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+    {
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForSend[iLocalFace];
+            int is, js, ks;
+            finestGrid->GetSourceIndexIJK(iFace, iGhostLayer + 1, is, js, ks);
+            finestGrid->RemapMultigridIJK(level, is, js, ks);
+            for (int m = 0; m < nEquation; ++m)
+            {
+                PHWrite(dataContainer, fieldSend(is, js, ks, m));
+            }
+        }
+    }
+}
+
+void TransitionSolverStr::DecompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex, const int &nEquation)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &fieldRecv = fieldProxy->GetField_STR();
+
+    for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+    {
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForReceive[iLocalFace];
+            int it, jt, kt;
+            finestGrid->GetTargetIndexIJK(iFace, iGhostLayer + 1, it, jt, kt);
+            finestGrid->RemapMultigridIJK(level, it, jt, kt);
+            for (int m = 0; m < nEquation; ++m)
+            {
+                PHRead(dataContainer, fieldRecv(it, jt, kt, m));
+            }
+        }
+    }
+}
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/src/TransitionSolverUnstr.cpp b/CFD/TurbSolver/src/TransitionSolverUnstr.cpp
new file mode 100644
index 0000000..c3c4576
--- /dev/null
+++ b/CFD/TurbSolver/src/TransitionSolverUnstr.cpp
@@ -0,0 +1,4665 @@
+#include "TransitionSolverUnstr.h"
+#include "Geo_UnstructBC.h"
+#include "IO_FileName.h"
+#include "MultiGridOperation.h"
+#include "PHMatrix.h"
+#include "TK_Exit.h"
+#include "Param_TransitionSolver.h"
+#include "Residual.h"
+#include "FieldProxy.h"
+#include "Math_BasisFunction.h"
+#include "Constants.h"
+#include "TK_Log.h"
+#include "IO_FileName.h"
+#include "Transition.h"
+using namespace std;
+
+namespace PHSPACE
+{
+
+TransitionSolverUnstr::TransitionSolverUnstr()
+{
+    gradientTransitionField = 0;
+    gradientVelocity = 0;
+}
+
+TransitionSolverUnstr::~TransitionSolverUnstr()
+{
+    DeAllocateGlobalVariables();
+
+    FreeControlParameters();
+}
+
+void TransitionSolverUnstr::AllocateGlobalVar(Grid *gridIn)
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    if (nTransitionEquation == 0) return;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfTotalFace = grid->GetNTotalFace();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal = numberOfTotalCell + numberOfBoundaryFace;
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+    int nTurboZone = 0;
+    if (referenceFrame)
+    {
+        nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+    }
+
+    RDouble **qTransition = NewPointer2<RDouble>(nTransitionEquation, numberOfTotal);
+    RDouble **residualTransition = NewPointer2<RDouble>(nTransitionEquation, numberOfTotal);
+    RDouble **spectrumTransition = NewPointer2<RDouble>(nTransitionEquation, numberOfTotal);
+
+    grid->UpdateDataPtr("q_transition", qTransition);    //! Unknown variable of transition model.
+    grid->UpdateDataPtr("res_transition", residualTransition);    //! Residual or right-hand side.
+    grid->UpdateDataPtr("spec_transition", spectrumTransition);    //! Spectral radius of transition model.
+
+    RDouble **gradientTransitionX = NewPointer2<RDouble>(nTransitionEquation, numberOfTotal);
+    RDouble **gradientTransitionY = NewPointer2<RDouble>(nTransitionEquation, numberOfTotal);
+    RDouble **gradientTransitionZ = NewPointer2<RDouble>(nTransitionEquation, numberOfTotal);
+
+    grid->UpdateDataPtr("gradTransitionX", gradientTransitionX);
+    grid->UpdateDataPtr("gradTransitionY", gradientTransitionY);
+    grid->UpdateDataPtr("gradTransitionZ", gradientTransitionZ);
+
+    //! Temporary variable for periodic boundary condition.
+    RDouble **rotTransitiongradValueX = NewPointer2<RDouble>(nTransitionEquation, numberOfTotal);
+    RDouble **rotTransitiongradValueY = NewPointer2<RDouble>(nTransitionEquation, numberOfTotal);
+    RDouble **rotTransitiongradValueZ = NewPointer2<RDouble>(nTransitionEquation, numberOfTotal);
+
+    grid->UpdateDataPtr("rotTraTransitionitiongradValueX", rotTransitiongradValueX);
+    grid->UpdateDataPtr("rotTraTransitionitiongradValueY", rotTransitiongradValueY);
+    grid->UpdateDataPtr("rotTraTransitionitiongradValueZ", rotTransitiongradValueZ);
+
+    //! allocate mixing plane variables.
+    //! for multi-row turbomachinery.
+    if (nTurboZone > 0)
+    {
+        int nSpanSection = PHSPACE::GlobalDataBase::GetIntParaFromDB("nSpanSection");
+        int nType = 2;
+
+        //! zone with MixingIn and MixingOut.
+        int nFlag = 10 * nTurboZone + 2;
+
+        RDouble ***SpanTransFlux      = NewPointer3<RDouble>(nFlag, nTransitionEquation, nSpanSection);
+        RDouble ***qTrans_Span        = NewPointer3<RDouble>(nFlag, nTransitionEquation, nSpanSection);
+        RDouble ***qTransSpanNeighbor = NewPointer3<RDouble>(nFlag, nTransitionEquation, nSpanSection);
+        RDouble ***dqTransSpanIn      = NewPointer3<RDouble>(nFlag, nTransitionEquation, nSpanSection);
+        RDouble ***dqTransSpanEx      = NewPointer3<RDouble>(nFlag, nTransitionEquation, nSpanSection);
+        RDouble ***dcTransSpan        = NewPointer3<RDouble>(nFlag, nTransitionEquation, nSpanSection);
+        InitMixingPlane(SpanTransFlux, nFlag, nTransitionEquation, nSpanSection, zero);
+        InitMixingPlane(qTrans_Span, nFlag, nTransitionEquation, nSpanSection, zero);
+        InitMixingPlane(qTransSpanNeighbor, nFlag, nTransitionEquation, nSpanSection, zero);
+        InitMixingPlane(dqTransSpanIn, nFlag, nTransitionEquation, nSpanSection, zero);
+        InitMixingPlane(dqTransSpanEx, nFlag, nTransitionEquation, nSpanSection, zero);
+        InitMixingPlane(dcTransSpan, nFlag, nTransitionEquation, nSpanSection, zero);
+        grid->UpdateDataPtr("SpanTransFlux", SpanTransFlux);
+        grid->UpdateDataPtr("qTrans_Span", qTrans_Span);
+        grid->UpdateDataPtr("qTransSpanNeighbor", qTransSpanNeighbor);
+        grid->UpdateDataPtr("dqTransSpanIn", dqTransSpanIn);
+        grid->UpdateDataPtr("dqTransSpanEx", dqTransSpanEx);
+        grid->UpdateDataPtr("dcTransSpan", dcTransSpan);
+    }
+
+
+    int numberOfTotalNode = grid->GetNTotalNode();
+    RDouble **qTransitionNode = NewPointer2<RDouble>(nTransitionEquation, numberOfTotalNode);
+    grid->UpdateDataPtr("qTransitionNode", qTransitionNode);    //! Unknown variable of transition model at node.
+
+    int *nodeValueSliceTransition = new int[numberOfTotalNode];
+    grid->UpdateDataPtr("nodeValueSliceTransition", nodeValueSliceTransition);
+
+    int *nodeValueSliceTransitionTrade = new int[numberOfTotalNode];
+    PHSPACE::SetField(nodeValueSliceTransitionTrade, 0, numberOfTotalNode);
+    grid->UpdateDataPtr("nodeValueSliceTransitionTrade", nodeValueSliceTransitionTrade);
+
+    InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+    if (interpointInformation)
+    {
+        int numberOfInterPoint = interpointInformation->GetNumberOfInterpoints();
+        RDouble **qTransitionInterPoint = NewPointer2<RDouble>(nTransitionEquation, numberOfInterPoint);
+        grid->UpdateDataPtr("transition::qInterpoint", qTransitionInterPoint);    //! Unknown variable of transition model at interPoint.
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble **qTransitionUnsteadyN1 = NewPointer2<RDouble>(nTransitionEquation, numberOfTotal);
+        RDouble **qTransitionUnsteadyN2 = NewPointer2<RDouble>(nTransitionEquation, numberOfTotal);
+        RDouble **residualTransitionUnsteadyN1 = NewPointer2<RDouble>(nTransitionEquation, numberOfTotal);
+        RDouble **residualTransitionUnsteadyN2 = NewPointer2<RDouble>(nTransitionEquation, numberOfTotal);
+
+        //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+        RDouble **residualTransitionUnsteadyTemporary = NewPointer2<RDouble>(nTransitionEquation, numberOfTotal);
+
+        grid->UpdateDataPtr("q_transition_unsteady_n1", qTransitionUnsteadyN1);
+        grid->UpdateDataPtr("q_transition_unsteady_n2", qTransitionUnsteadyN2);
+        grid->UpdateDataPtr("res_transition_unsteady_n1", residualTransitionUnsteadyN1);
+        grid->UpdateDataPtr("res_transition_unsteady_n2", residualTransitionUnsteadyN2);
+        grid->UpdateDataPtr("res_transition_unsteady_tmp", residualTransitionUnsteadyTemporary);
+
+        //! Statistical variables for DES simulation.
+        int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+        if (ifStaticsFlowField > 0)
+        {
+            RDouble **qAverageTransition = NewPointer2<RDouble>(nTransitionEquation, numberOfTotal);
+            grid->UpdateDataPtr("qAverageTransition", qAverageTransition);
+        }
+    }
+
+    RDouble **matrixTransitionLeft = NewPointer2<RDouble>(nTransitionEquation, numberOfTotalFace);
+    RDouble **matrixTransitionRight = NewPointer2<RDouble>(nTransitionEquation, numberOfTotalFace);
+
+    grid->UpdateDataPtr("mat_transitionl", matrixTransitionLeft);
+    grid->UpdateDataPtr("mat_transitionr", matrixTransitionRight);
+}
+
+void TransitionSolverUnstr::DeAllocateGlobalVar(Grid *gridIn)
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    if (nTransitionEquation == 0) return;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+    RDouble **residualTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition"));
+    RDouble **spectrumTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("spec_transition"));
+
+    DelPointer2(qTransition);
+    DelPointer2(residualTransition);
+    DelPointer2(spectrumTransition);
+
+    RDouble **gradientTransitionX = reinterpret_cast<RDouble **> (grid->GetDataPtr("gradTransitionX"));
+    RDouble **gradientTransitionY = reinterpret_cast<RDouble **> (grid->GetDataPtr("gradTransitionY"));
+    RDouble **gradientTransitionZ = reinterpret_cast<RDouble **> (grid->GetDataPtr("gradTransitionZ"));
+
+    DelPointer2(gradientTransitionX);
+    DelPointer2(gradientTransitionY);
+    DelPointer2(gradientTransitionZ);
+
+    RDouble **rotTransitiongradValueX = reinterpret_cast<RDouble **> (grid->GetDataPtr("rotTransitiongradValueX"));
+    RDouble **rotTransitiongradValueY = reinterpret_cast<RDouble **> (grid->GetDataPtr("rotTransitiongradValueY"));
+    RDouble **rotTransitiongradValueZ = reinterpret_cast<RDouble **> (grid->GetDataPtr("rotTransitiongradValueZ"));
+
+    DelPointer2(rotTransitiongradValueX);
+    DelPointer2(rotTransitiongradValueY);
+    DelPointer2(rotTransitiongradValueZ);
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+    int nTurboZone = 0;
+    if (referenceFrame)
+    {
+        nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+    }
+
+    //! deallocate mixing plane array.
+    if (nTurboZone > 0)
+    {
+        int nType = 2;
+        int nSpanSection = PHSPACE::GlobalDataBase::GetIntParaFromDB("nSpanSection");
+
+        RDouble ***SpanTransFlux      = reinterpret_cast <RDouble ***> (grid->GetDataPtr("SpanTransFlux"));
+        RDouble ***qTrans_Span        = reinterpret_cast <RDouble ***> (grid->GetDataPtr("qTrans_Span"));
+        RDouble ***qTransSpanNeighbor = reinterpret_cast <RDouble ***> (grid->GetDataPtr("qTransSpanNeighbor"));
+        RDouble ***dqTransSpanIn      = reinterpret_cast <RDouble ***> (grid->GetDataPtr("dqTransSpanIn"));
+        RDouble ***dqTransSpanEx      = reinterpret_cast <RDouble ***> (grid->GetDataPtr("dqTransSpanEx"));
+        RDouble ***dcTransSpan        = reinterpret_cast <RDouble ***> (grid->GetDataPtr("dcTransSpan"));
+
+        DelPointer3(SpanTransFlux);
+        DelPointer3(qTrans_Span);
+        DelPointer3(qTransSpanNeighbor);
+        DelPointer3(dqTransSpanIn);
+        DelPointer3(dqTransSpanEx);
+        DelPointer3(dcTransSpan);
+    }
+
+    RDouble **qTransitionNode = reinterpret_cast<RDouble **> (grid->GetDataPtr("qTransitionNode"));
+    DelPointer2(qTransitionNode);
+
+    int *nodeValueSliceTransition = reinterpret_cast<int *> (grid->GetDataPtr("nodeValueSliceTransition"));
+    int *nodeValueSliceTransitionTrade = reinterpret_cast<int *> (grid->GetDataPtr("nodeValueSliceTransitionTrade"));
+
+    delete [] nodeValueSliceTransition;
+    delete [] nodeValueSliceTransitionTrade;
+
+    InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+    if (interpointInformation)
+    {
+        RDouble **qTransitionInterPoint = reinterpret_cast<RDouble **> (grid->GetDataPtr("qTransitionInterPoint"));
+        DelPointer2(qTransitionInterPoint);
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+
+    if (isUnsteady)
+    {
+        RDouble **qTransitionUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition_unsteady_n1"));
+        RDouble **qTransitionUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition_unsteady_n2"));
+        RDouble **residualTransitionUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition_unsteady_n1"));
+        RDouble **residualTransitionUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition_unsteady_n2"));
+        RDouble **residualTransitionUnsteadyTemporary = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition_unsteady_tmp"));
+
+        DelPointer2(qTransitionUnsteadyN1);
+        DelPointer2(qTransitionUnsteadyN2);
+        DelPointer2(residualTransitionUnsteadyN1);
+        DelPointer2(residualTransitionUnsteadyN2);
+        DelPointer2(residualTransitionUnsteadyTemporary);
+
+        //! Statistical variables for DES simulation.
+        int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+        if (ifStaticsFlowField > 0)
+        {
+            RDouble **qAverageTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("qAverageTransition"));
+            DelPointer2(qAverageTransition);
+        }
+    }
+
+    RDouble **matrixTransitionLeft = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_transitionl"));
+    RDouble **matrixTransitionRight = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_transitionr"));
+
+    DelPointer2(matrixTransitionLeft);
+    DelPointer2(matrixTransitionRight);
+}
+
+bool TransitionSolverUnstr::JudgeIfRestart()
+{
+    string transitionFile = ".\results\transition.dat";
+    GlobalDataBase::GetData("transitionFile", &transitionFile, PHSTRING, 1);
+
+    if (PHMPI::IsParallelRun())
+    {
+        transitionFile = PHSPACE::AddSymbolToFileName(transitionFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(transitionFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+bool TransitionSolverUnstr::JudgeIfReadAverage()
+{
+    string transitionFile = ".\results\transition.dat";
+    GlobalDataBase::GetData("transitionFile", &transitionFile, PHSTRING, 1);
+    string averageTransitionFile = AddSymbolToFileName(transitionFile, "_", "Average");
+
+    if (PHMPI::IsParallelRun())
+    {
+        averageTransitionFile = PHSPACE::AddSymbolToFileName(averageTransitionFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(averageTransitionFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+void TransitionSolverUnstr::DumpRestartH5(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int currentProcessorID = GetCurrentProcessorID();
+
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfTotal = numberOfTotalCell + numberOfBoundaryFace;
+
+    int version = 1;
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    int outerIterationStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    if (currentProcessorID == GetServerProcessorID())
+    {
+        WriteData(actkey->filepos, &version, "Version");
+        WriteData(actkey->filepos, &outerIterationStep, "outnstep");
+
+        if (IsNeedStatistics())
+        {
+            int nStatisticalStep = 0;
+            GlobalDataBase::GetData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+            WriteData(actkey->filepos, &nStatisticalStep, "nStatisticalStep");
+        }
+    }
+
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+    double **qTemporary = NewPointer2<double>(nTransitionEquation, numberOfTotal);
+
+    for (int iEquation = 0; iEquation < nTransitionEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTemporary[iEquation][iCell] = static_cast<double>(qTransition[iEquation][iCell]);
+        }
+    }
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    WriteData(grploc, qTemporary[0], "q_transition");
+    WriteData(grploc, &numberOfTotalCell, "nTotalCell");
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        H5Gclose(grploc);
+        DelPointer2(qTemporary);
+
+        return;
+    }
+
+    RDouble **qTransitionUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition_unsteady_n1"));
+    for (int iEquation = 0; iEquation < nTransitionEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTemporary[iEquation][iCell] = static_cast<double>(qTransitionUnsteadyN1[iEquation][iCell]);
+        }
+    }
+
+    WriteData(grploc, qTemporary[0], "q_transition_unsteady_n1");
+
+    RDouble **qTransitionUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition_unsteady_n2"));
+    for (int iEquation = 0; iEquation < nTransitionEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTemporary[iEquation][iCell] = static_cast<double>(qTransitionUnsteadyN2[iEquation][iCell]);
+        }
+    }
+
+    WriteData(grploc, qTemporary[0], "q_transition_unsteady_n2");
+
+    RDouble **residualTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition"));
+    for (int iEquation = 0; iEquation < nTransitionEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTemporary[iEquation][iCell] = static_cast<double>(residualTransition[iEquation][iCell]);
+        }
+    }
+
+    WriteData(grploc, qTemporary[0], "res_transition");
+
+    RDouble **residualTransitionUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition_unsteady_n1"));
+    for (int iEquation = 0; iEquation < nTransitionEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTemporary[iEquation][iCell] = static_cast<double>(residualTransitionUnsteadyN1[iEquation][iCell]);
+        }
+    }
+
+    WriteData(grploc, qTemporary[0], "res_transition_unsteady_n1");
+
+    RDouble **residualTransitionUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition_unsteady_n2"));
+    for (int iEquation = 0; iEquation < nTransitionEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTemporary[iEquation][iCell] = static_cast<double>(residualTransitionUnsteadyN2[iEquation][iCell]);
+        }
+    }
+
+    WriteData(grploc, qTemporary[0], "res_transition_unsteady_n2");
+
+    if (IsNeedStatistics())
+    {
+        RDouble **qAverageTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("qAverageTransition"));
+        for (int iEquation = 0; iEquation < nTransitionEquation; ++ iEquation)
+        {
+            for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+            {
+                qTemporary[iEquation][iCell] = static_cast<double>(qAverageTransition[iEquation][iCell]);
+            }
+        }
+
+        WriteData(grploc, qTemporary[0], "qAverageTransition");
+    }
+
+    H5Gclose(grploc);
+    DelPointer2(qTemporary);
+}
+
+void TransitionSolverUnstr::ReadRestartH5(ActionKey *actkey)
+{
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfTotal = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+    double **qTemporary = NewPointer2<double>(nTransitionEquation, numberOfTotal);
+
+    int outerIterationStepOfTransition = 0;
+    ReadData(actkey->filepos, &outerIterationStepOfTransition, "outnstep");
+
+    int outerIterationStepOfNS = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    int nTotalCellRestart = 0;
+    ReadData(grploc, &nTotalCellRestart, "nTotalCell");
+    if (nTotalCellRestart != numberOfTotalCell)
+    {
+        ostringstream erroeInfo;
+        erroeInfo << " Error: the cell number in transition.dat is not equal to the cell number in grid file !" << endl;
+        TK_Exit::ExceptionExit(erroeInfo.str());
+    }
+
+    ReadData(grploc, qTemporary[0], "q_transition");
+    for (int iEquation = 0; iEquation < nTransitionEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTransition[iEquation][iCell] = static_cast<RDouble>(qTemporary[iEquation][iCell]);
+        }
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble **qTransitionUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition_unsteady_n1"));
+        RDouble **qTransitionUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition_unsteady_n2"));
+
+        RDouble **residualTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition"));
+        RDouble **residualTransitionUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition_unsteady_n1"));
+        RDouble **residualTransitionUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition_unsteady_n2"));
+        RDouble **qAverageTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("qAverageTransition"));
+
+        //! Start from steady flow field and reset the outer step when start from steady flow.
+        int ifStartFromSteadyResults = parameters->GetIfStartFromSteadyResults();
+        if (ifStartFromSteadyResults)
+        {
+            PrintToWindow("Restart from steady Transition flow field, reset outer step to be zero!\n");
+
+            outerIterationStepOfTransition = 0;
+            GlobalDataBase::UpdateData("outnstep", &outerIterationStepOfTransition, PHINT, 1);
+
+            for (int m = 0; m < nTransitionEquation; ++ m)
+            {
+                for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+                {
+                    qTransitionUnsteadyN1[m][iCell] = qTransition[m][iCell];
+                    qTransitionUnsteadyN2[m][iCell] = qTransition[m][iCell];
+
+                    residualTransition[m][iCell] = 0.0;
+                    residualTransitionUnsteadyN1[m][iCell] = 0.0;
+                    residualTransitionUnsteadyN2[m][iCell] = 0.0;
+                }
+            }
+        }
+        else
+        {
+            ReadData(grploc, qTemporary[0], "q_transition_unsteady_n1");
+            for (int iEquation = 0; iEquation < nTransitionEquation; ++ iEquation)
+            {
+                for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+                {
+                    qTransitionUnsteadyN1[iEquation][iCell] = static_cast<RDouble>(qTemporary[iEquation][iCell]);
+                }
+            }
+
+            ReadData(grploc, qTemporary[0], "q_transition_unsteady_n2");
+            for (int iEquation = 0; iEquation < nTransitionEquation; ++ iEquation)
+            {
+                for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+                {
+                    qTransitionUnsteadyN2[iEquation][iCell] = static_cast<RDouble>(qTemporary[iEquation][iCell]);
+                }
+            }
+
+            ReadData(grploc, qTemporary[0], "res_transition");
+            for (int iEquation = 0; iEquation < nTransitionEquation; ++ iEquation)
+            {
+                for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+                {
+                    residualTransition[iEquation][iCell] = static_cast<RDouble>(qTemporary[iEquation][iCell]);
+                }
+            }
+
+            ReadData(grploc, qTemporary[0], "res_transition_unsteady_n1");
+            for (int iEquation = 0; iEquation < nTransitionEquation; ++ iEquation)
+            {
+                for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+                {
+                    residualTransitionUnsteadyN1[iEquation][iCell] = static_cast<RDouble>(qTemporary[iEquation][iCell]);
+                }
+            }
+
+            ReadData(grploc, qTemporary[0], "res_transition_unsteady_n2");
+            for (int iEquation = 0; iEquation < nTransitionEquation; ++ iEquation)
+            {
+                for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+                {
+                    residualTransitionUnsteadyN2[iEquation][iCell] = static_cast<RDouble>(qTemporary[iEquation][iCell]);
+                }
+            }
+        }
+
+        int nStatisticalStep = 0;
+        int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+        int startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+        bool isReadAverageFlow = ifStaticsFlowField && (outerIterationStepOfTransition >= startStatisticStep);
+        if (isReadAverageFlow)
+        {
+            if (ifStartFromSteadyResults)
+            {
+                for (int iEquation = 0; iEquation < nTransitionEquation; ++ iEquation)
+                {
+                    for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+                    {
+                        qAverageTransition[iEquation][iCell] = static_cast<RDouble>(qTemporary[iEquation][iCell]);
+                    }
+                }
+
+                GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+            }
+            else
+            {
+                ReadData(grploc, qTemporary[0], "qAverageTransition");
+                for (int iEquation = 0; iEquation < nTransitionEquation; ++ iEquation)
+                {
+                    for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+                    {
+                        qAverageTransition[iEquation][iCell] = qTemporary[iEquation][iCell];
+                    }
+                }
+
+                ReadData(actkey->filepos, &nStatisticalStep, "nStatisticalStep");
+                GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+            }
+        }
+    }
+
+    H5Gclose(grploc);
+    DelPointer2(qTemporary);
+
+    CompareOutStepOfFlowfieldFile(outerIterationStepOfNS, outerIterationStepOfTransition);
+}
+
+void TransitionSolverUnstr::InitFlowAsRestart()
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    if (nTransitionEquation == 0) return;
+
+    UnstructGrid *grid = UnstructGridCast(GetGrid(0));
+
+    //int outerIterationStep = 0;
+    //GlobalDataBase::UpdateData("outnstep", &outerIterationStep, PHINT, 1);
+
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal = numberOfTotalCell + numberOfBoundaryFace;
+
+    RDouble *freeStreamTransitionVar = parameters->GetFreeStreamTransitionVar();
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTransition[m][iCell] = freeStreamTransitionVar[m];
+        }
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady) return;
+
+    RDouble **qTransitionUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition_unsteady_n1"));
+    RDouble **qTransitionUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition_unsteady_n2"));
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTransitionUnsteadyN1[m][iCell] = qTransition[m][iCell];
+            qTransitionUnsteadyN2[m][iCell] = qTransition[m][iCell];
+        }
+    }
+
+    RDouble **residualTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition"));
+    RDouble **residualTransitionUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition_unsteady_n1"));
+    RDouble **residualTransitionUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition_unsteady_n2"));
+    RDouble **residualTransitionUnsteadyTemporary = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition_unsteady_tmp"));
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            residualTransition[m][iCell] = 0.0;
+            residualTransitionUnsteadyN1[m][iCell] = 0.0;
+            residualTransitionUnsteadyN2[m][iCell] = 0.0;
+            residualTransitionUnsteadyTemporary[m][iCell] = 0.0;
+        }
+    }
+}
+
+void TransitionSolverUnstr::ZeroResiduals(Grid *gridIn)
+{
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(gridIn);
+
+    int numberOfGeneralCells = grid->GetNTotalCell() + grid->GetNBoundFace();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **residualTransition = reinterpret_cast<RDouble **>(grid->GetDataPtr("res_transition"));
+
+    for (int iEquation = 0; iEquation < nTransitionEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < numberOfGeneralCells; ++ iCell)
+        {
+            residualTransition[iEquation][iCell] = 0.0;
+        }
+    }
+    return;
+}
+
+void TransitionSolverUnstr::InitSpectrum(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfTotal = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    if (nTransitionEquation == 0) return;
+
+    RDouble transitionCFLScale = parameters->GetTransitionCFLScale();
+
+    RDouble *vol = grid->GetCellVolume();
+    RDouble *dt = reinterpret_cast<RDouble *> (grid->GetDataPtr("dt"));
+    RDouble **spectrumTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("spec_transition"));
+
+    RDouble dualTimeSpectrumC1 = zero;
+    RDouble dualTimeSpectrumC2 = one;
+
+    //! If flow is unsteady, need to count the contribution of unsteady.
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble dualTimeCoefficient[7];
+        const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+        ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+        dualTimeSpectrumC1 = - dualTimeCoefficient[3];
+        dualTimeSpectrumC2 = dualTimeCoefficient[6];
+    }
+
+    for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+    {
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            spectrumTransition[m][iCell] = 0.0;
+        }
+    }
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            spectrumTransition[m][iCell] = dualTimeSpectrumC1 * vol[iCell] + dualTimeSpectrumC2 / (transitionCFLScale * dt[iCell] + SMALL);
+        }
+    }
+}
+
+void TransitionSolverUnstr::CorrectFineGrid(Grid *fineGrid, Grid *coarseGrid)
+{
+    int numberOfTotalCellOnFineGrid = UnstructGridCast(fineGrid)->GetNTotalCell();
+    int *cell2CoarseGridCell = UnstructGridCast(fineGrid)->GetCell2CoarseGridCell();
+
+    RDouble **qTransitionFineGrid = reinterpret_cast<RDouble **> (fineGrid->GetDataPtr("q_transition"));
+    RDouble **qTransitionCoarseGrid = reinterpret_cast<RDouble **> (coarseGrid->GetDataPtr("q_transition"));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotalCellOnFineGrid; ++ iCell)
+        {
+            qTransitionFineGrid[m][iCell] += qTransitionCoarseGrid[m][cell2CoarseGridCell[iCell]];
+        }
+    }
+}
+
+void TransitionSolverUnstr::InterpolatFineGrid(Grid *fineGridIn, Grid *coarseGridIn)
+{
+    UnstructGrid *fineGrid = UnstructGridCast(fineGridIn);
+    UnstructGrid *coarseGrid = UnstructGridCast(coarseGridIn);
+
+    RDouble **qTransitionFineGrid = reinterpret_cast<RDouble **> (fineGrid->GetDataPtr("q_transition"));
+    RDouble **qTransitionCoarseGrid = reinterpret_cast<RDouble **> (coarseGrid->GetDataPtr("q_transition"));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        InterpolatQ(fineGrid, qTransitionFineGrid[m], coarseGrid, qTransitionCoarseGrid[m]);
+    }
+}
+
+void TransitionSolverUnstr::PutCorrectionBack(Grid *gridIn, FieldProxy *qProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    RDouble **q = qProxy->GetField_UNS();
+    RDouble **qOld = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            qOld[m][iCell] += q[m][iCell];
+        }
+    }
+}
+
+void TransitionSolverUnstr::RestrictDefect(Grid *fineGridIn, Grid *coarseGridIn)
+{
+    UnstructGrid *fineGrid = UnstructGridCast(fineGridIn);
+    UnstructGrid *coarseGrid = UnstructGridCast(coarseGridIn);
+
+    int numberOfTotalCellOnFineGrid = fineGrid->GetNTotalCell();
+    int *cell2CoarseGridCell = fineGrid->GetCell2CoarseGridCell();
+
+    ZeroResiduals(coarseGrid);
+
+    RDouble **residualTransitionCoarseGrid = reinterpret_cast<RDouble **> (coarseGrid->GetDataPtr("res_transition"));
+    RDouble **residualTransitionFineGrid = reinterpret_cast<RDouble **> (fineGrid->GetDataPtr("res_transition"));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotalCellOnFineGrid; ++ iCell)
+        {
+            residualTransitionCoarseGrid[m][cell2CoarseGridCell[iCell]] -= residualTransitionFineGrid[m][iCell];
+        }
+    }
+}
+
+void TransitionSolverUnstr::LoadQ(Grid *gridIn, FieldProxy *qProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    RDouble **qqTransition = qProxy->GetField_UNS();
+
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            qqTransition[m][iCell] = qTransition[m][iCell];
+        }
+    }
+}
+
+void TransitionSolverUnstr::UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    RDouble **qPrimitiveVariable = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble **qTransition = qProxy->GetField_UNS();
+    RDouble **dqTransition = dqProxy->GetField_UNS();
+
+    using namespace IDX;
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        RDouble rho = qPrimitiveVariable[IR][iCell];
+        RDouble &kgama = qTransition[IGAMA][iCell];
+        RDouble &krect = qTransition[IRECT][iCell];
+
+        RDouble dkgama = dqTransition[IGAMA][iCell];
+        RDouble dkrect = dqTransition[IRECT][iCell];
+
+        kgama += dkgama / rho;
+        krect += dkrect / rho;
+
+        kgama = MIN(kgama, 1.00);
+        krect = MAX(krect, 20.0);
+    }
+}
+
+void TransitionSolverUnstr::SMoothTransitionPoint(Grid *gridIn, RDouble *primitiveVariable, int i)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    int **cell2Face = grid->GetCell2Face();
+    int *faceNumberOfEachCell = grid->GetFaceNumberOfEachCell();
+
+    int le, re, ie, face;
+    RDouble volumeSum = zero;
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        primitiveVariable[m] = zero;
+    }
+
+    for (int j = 0; j < faceNumberOfEachCell[i]; ++ j)
+    {
+        face = cell2Face[i][j];
+        le = leftCellOfFace[face];
+        re = rightCellOfFace[face];
+
+        if (le != i)
+        {
+            ie = le;
+        }
+        else
+        {
+            ie = re;
+        }
+
+        if (ie >= numberOfTotalCell) continue;
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            primitiveVariable[m] += qTransition[m][ie];
+        }
+        volumeSum += 1.0;
+    }
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        primitiveVariable[m] /= volumeSum;
+    }
+}
+
+void TransitionSolverUnstr::SMoothTransition(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal = numberOfTotalCell + numberOfBoundaryFace;
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble *volume = grid->GetCellVolume();
+
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **tmporary = NewPointer2<RDouble>(nTransitionEquation, numberOfTotal);
+
+    int **cell2Face = grid->GetCell2Face();
+    int *faceNumberOfEachCell = grid->GetFaceNumberOfEachCell();
+
+    for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+    {
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            qTransition[m][iCell] *= volume[iCell];
+            tmporary[m][iCell] = qTransition[m][iCell];
+        }
+    }
+
+    RDouble volumeSum;
+
+    int le, re, ie, face;
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        volumeSum = volume[iCell];
+        for (int j = 0; j < faceNumberOfEachCell[iCell]; ++ j)
+        {
+            face = cell2Face[iCell][j];
+            le = leftCellOfFace[face];
+            re = rightCellOfFace[face];
+
+            if (le != iCell)
+            {
+                ie = le;
+            }
+            else
+            {
+                ie = re;
+            }
+
+            if (ie >= numberOfTotalCell) continue;
+
+            for (int m = 0; m < nTransitionEquation; ++ m)
+            {
+                qTransition[m][iCell] += tmporary[m][ie];
+            }
+            volumeSum += volume[ie];
+        }
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            qTransition[m][iCell] /= volumeSum;
+        }
+    }
+
+    DelPointer2(tmporary);
+}
+
+void TransitionSolverUnstr::RungeKuttaResidual(Grid *gridIn, FieldProxy *dqProxy, RDouble coefficient)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    RDouble **dqTransition = dqProxy->GetField_UNS();
+
+    RDouble *dt = reinterpret_cast<RDouble *> (grid->GetDataPtr("dt"));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            dqTransition[m][iCell] = dt[iCell] * coefficient * dqTransition[m][iCell];
+        }
+    }
+}
+
+void TransitionSolverUnstr::SolveLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble **dq = dqProxy->GetField_UNS();
+    int *iBlank = grid->GetBlankIndex();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble *df = new RDouble[nTransitionEquation];
+    RDouble *rhs0 = new RDouble[nTransitionEquation];
+    RDouble *dqOld = new RDouble[nTransitionEquation];
+
+    RDouble **spectrumTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("spec_transition"));
+    RDouble **matrixTransitionLeft = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_transitionl"));
+    RDouble **matrixTransitionRight = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_transitionr"));
+    RDouble **residualTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition"));
+
+    int **cell2Face = grid->GetCell2Face();
+    int *faceNumberOfEachCell = grid->GetFaceNumberOfEachCell();
+
+    RDouble **deltaFlux = LUplusDQ->GetField_UNS();
+    RDouble *matrixUx = new RDouble[nTransitionEquation];
+
+    //! Now the Forward Sweep
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        if (iBlank[iCell] <= 0)
+        {
+            for (int m = 0; m < nTransitionEquation; ++ m)
+            {
+                dq[m][iCell] = 0.0;
+            }
+            continue;
+        }
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            rhs0[m] = 0.0;
+        }
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            //! Back up the old dq, to compute the convergency.
+            dqOld[m] = dq[m][iCell];
+
+            //! Here, the deltaFlux is computed in Upper backward sweep!
+            //! res: b      deltaFlux: Ux, which is computed in backward sweep.
+            //! the dq is not the real dq, now.
+            //! Although the 'dq' changed can not the right one, it dosen't matter, since 
+            //! the following only using the lower neighbor cells, whose 'dq' has been updated.
+            //! It is convenient for precondition transform.
+            dq[m][iCell] = residualTransition[m][iCell];
+            matrixUx[m] = deltaFlux[m][iCell];
+
+            //! Then reset it to zero to store the Lower forward sweep!
+            deltaFlux[m][iCell] = 0.0;
+        }
+
+        for (int jFace = 0; jFace < faceNumberOfEachCell[iCell]; ++ jFace)
+        {
+            int face = cell2Face[iCell][jFace];
+            int le = leftCellOfFace[face];
+            int re = rightCellOfFace[face];
+
+            //! One of le and re must be cell itself.
+            if (le > iCell || re > iCell) continue;
+
+            if (re == iCell)
+            {
+                //! Now its neighboring cell belongs to lower triangular
+                SWAP(le, re);
+
+                for (int m = 0; m < nTransitionEquation; ++ m)
+                {
+                    df[m] = matrixTransitionLeft[m][face] * dq[m][re];
+                }
+            }
+            else
+            {
+                for (int m = 0; m < nTransitionEquation; ++ m)
+                {
+                    df[m] = matrixTransitionRight[m][face] * dq[m][re];
+                }
+            }
+
+            //! Add Flux together
+            for (int m = 0; m < nTransitionEquation; ++ m)
+            {
+                rhs0[m] += df[m];
+            }
+        }
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            //! dq = { (b - Ux) - Lx } / D.
+            //! Note: the 'dq' has actually initialized by the residual at the beginning of this function.
+            //! the 'rhs0' is the total Delta Flux of the neighbors.            
+            //! rhs0: Lx    diagonal: D.
+            dq[m][iCell] = (dq[m][iCell] - matrixUx[m] - rhs0[m]) / spectrumTransition[m][iCell];
+
+            //! Store the lower forward sweep delta-flux, which will be used in the backward sweep.
+            deltaFlux[m][iCell] += rhs0[m];
+
+            sweepNormal += SQR(dq[m][iCell] - dqOld[m]);
+        }
+    }
+
+    delete[]rhs0;
+    delete[]df;
+    delete[]dqOld;
+    delete[]matrixUx;
+}
+
+void TransitionSolverUnstr::SolveLUSGSBackward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble **dq = dqProxy->GetField_UNS();
+    int *iBlank = grid->GetBlankIndex();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble *df = new RDouble[nTransitionEquation];
+    RDouble *rhs0 = new RDouble[nTransitionEquation];
+    RDouble *dqOld = new RDouble[nTransitionEquation];
+
+    RDouble **spectrumTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("spec_transition"));
+    RDouble **matrixTransitionLeft = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_transitionl"));
+    RDouble **matrixTransitionRight = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_transitionr"));
+    RDouble **residualTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition"));
+
+    int **cell2Face = grid->GetCell2Face();
+    int *faceNumberOfEachCell = grid->GetFaceNumberOfEachCell();
+
+    RDouble **deltaFlux = LUplusDQ->GetField_UNS();
+    RDouble *matrixLx = new RDouble[nTransitionEquation];
+
+    // Backward Sweep
+    for (int iCell = numberOfTotalCell - 1; iCell >= 0; -- iCell)
+    {
+        if (iBlank[iCell] <= 0)
+        {
+            for (int m = 0; m < nTransitionEquation; ++ m)
+            {
+                dq[m][iCell] = 0.0;
+            }
+            continue;
+        }
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            rhs0[m] = 0.0;
+        }
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            //! Back up the old dq, to compute the convergence.
+            //! the 'dq' is dq*, which has been updated in forward.
+            dqOld[m] = dq[m][iCell];
+
+            //! the dq is not the real dq, now.
+            //! it is convenient for precondition transform.
+            dq[m][iCell] = residualTransition[m][iCell];
+
+            matrixLx[m] = deltaFlux[m][iCell];
+
+            deltaFlux[m][iCell] = 0.0;
+        }
+
+        for (int jFace = 0; jFace < faceNumberOfEachCell[iCell]; ++ jFace)
+        {
+            int face = cell2Face[iCell][jFace];
+            int le = leftCellOfFace[face];
+            int re = rightCellOfFace[face];
+
+            //! One of le and re must be cell itself.
+            if (le < iCell || re < iCell) continue;
+
+            if (re == iCell)
+            {
+                //! Now its neighboring cell belongs to upper triangular
+                SWAP(le, re);
+
+                for (int m = 0; m < nTransitionEquation; ++ m)
+                {
+                    df[m] = matrixTransitionLeft[m][face] * dq[m][re];
+                }
+            }
+            else
+            {
+                for (int m = 0; m < nTransitionEquation; ++ m)
+                {
+                    df[m] = matrixTransitionRight[m][face] * dq[m][re];
+                }
+            }
+
+            for (int m = 0; m < nTransitionEquation; ++ m)
+            {
+                rhs0[m] += df[m];
+            }
+        }
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            //! Note: the 'dq' has been updated by the forward sweep.
+            //! the 'rhs0' is the total Delta Flux of the neighbors.
+            //! x = {(b - LX) - Ux} / D.
+            //! rhs0: Ux.    diagonal: D.
+            dq[m][iCell] = (dq[m][iCell] - matrixLx[m] - rhs0[m]) / spectrumTransition[m][iCell];
+
+            //! Store the upper backward sweep delta-flux, which will be used in the forward sweep.
+            deltaFlux[m][iCell] += rhs0[m];
+
+            sweepNormal += SQR(dq[m][iCell] - dqOld[m]);
+        }
+    }
+
+    delete[]rhs0;
+    delete[]df;
+    delete[]dqOld;
+    delete[]matrixLx;
+}
+
+// Bell 20130401 add
+void TransitionSolverUnstr::SetGhostDQLUSGS(Grid *gridIn, RDouble **dq)
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    if (nTransitionEquation != 1)
+    {
+        cout << "SetGhostDQLUSGS function is turned off !\n";
+        return;
+    }
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        if (IsInterface(bcType))
+        {
+            continue;
+        }
+
+        if (IsWall(bcType))
+        {
+            SetWallBCGhostDQLUSGS(grid, bcRegion, dq);
+        }
+        //FARFIELD, SYMMETRY, INFLOW and OUTFLOW can use the same module.
+        else if (bcType == PHENGLEI::FARFIELD || bcType == PHENGLEI::SYMMETRY
+            || bcType == PHENGLEI::INFLOW || bcType == PHENGLEI::OUTFLOW)
+        {
+            SetFarfieldBCGhostDQLUSGS(grid, bcRegion, dq);
+        }
+        else
+        {
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                int iFace = *iter;
+                int re = rightCellOfFace[iFace];
+                for (int m = 0; m < nTransitionEquation; ++ m)
+                {
+                    dq[m][re] = 0.0;
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverUnstr::SetWallBCGhostDQLUSGS(Grid *gridIn, UnstructBC *bcRegionUnstruct, RDouble **dq)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        int iFace = *iter;
+        int re = rightCellOfFace[iFace];
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            dq[m][re] = 0.0;
+        }
+    }
+}
+
+void TransitionSolverUnstr::SetFarfieldBCGhostDQLUSGS(Grid *gridIn, UnstructBC *bcRegionUnstruct, RDouble **dq)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        int iFace = *iter;
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            dq[m][re] = dq[m][le];
+        }
+    }
+}
+
+void TransitionSolverUnstr::LoadResiduals(Grid *gridIn, FieldProxy *rhsProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal = numberOfTotalCell + numberOfBoundaryFace;
+
+    RDouble **rhs = rhsProxy->GetField_UNS();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **residualTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition"));
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            residualTransition[m][iCell] = - rhs[m][iCell];
+        }
+    }
+}
+
+RDouble TransitionSolverUnstr::UnsteadyConvergence(Grid *gridIn)
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady) return zero;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    RDouble **qPrimitive = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+    RDouble **qTransitionUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition_unsteady_n1"));
+    RDouble **qTransitionUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition_unsteady_n2"));
+    RDouble **residualTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition"));
+
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble *primitive0 = new RDouble[nTransitionEquation];
+    RDouble *primitive1 = new RDouble[nTransitionEquation];
+    RDouble *primitive2 = new RDouble[nTransitionEquation];
+
+    RDouble *qConservative0 = new RDouble[nTransitionEquation];
+    RDouble *qConservative1 = new RDouble[nTransitionEquation];
+    RDouble *qConservative2 = new RDouble[nTransitionEquation];
+
+    RDouble sum1 = zero;
+    RDouble sum2 = zero;
+
+    using namespace IDX;
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            primitive0[m] = qTransition[m][iCell];
+            primitive1[m] = qTransitionUnsteadyN1[m][iCell];
+            primitive2[m] = qTransitionUnsteadyN2[m][iCell];
+        }
+
+        RDouble coefficient = 1.0;
+
+        if (nTransitionEquation >= 2)
+        {
+            coefficient = qPrimitive[IR][iCell];
+        }
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            qConservative0[m] = coefficient * primitive0[m];
+            qConservative1[m] = coefficient * primitive1[m];
+            qConservative2[m] = coefficient * primitive2[m];
+        }
+
+        //! nl is needed.
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            //! Here, res must be transformed into dqthat is, res is not equal to rhs but dq.
+            RDouble dqp = residualTransition[m][iCell];        // qn+1,p+1 - qn+1,p
+            RDouble dqn = qConservative0[m] - qConservative1[m];  // qn+1,p+1 - qn
+            sum1 += dqp * dqp;
+            sum2 += dqn * dqn;
+        }
+    }
+
+    delete[]primitive0;
+    delete[]primitive1;
+    delete[]primitive2;
+    delete[]qConservative0;
+    delete[]qConservative1;
+    delete[]qConservative2;
+
+    RDouble cvg = sqrt(ABS(sum1 / (sum2 + SMALL)));
+    return cvg;
+}
+
+void TransitionSolverUnstr::UpdateUnsteadyFlow(Grid *gridIn)
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady) return;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal = numberOfTotalCell + numberOfBoundaryFace;
+
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+    RDouble **qTransitionUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition_unsteady_n1"));
+    RDouble **qTransitionUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition_unsteady_n2"));
+
+    RDouble **residualTransitionUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition_unsteady_n1"));
+    RDouble **residualTransitionUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition_unsteady_n2"));
+    RDouble **residualTransitionUnsteadyTemporary = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition_unsteady_tmp"));
+
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTransitionUnsteadyN2[m][iCell] = qTransitionUnsteadyN1[m][iCell];
+        }
+    }
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTransitionUnsteadyN1[m][iCell] = qTransition[m][iCell];
+        }
+    }
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            residualTransitionUnsteadyN2[m][iCell] = residualTransitionUnsteadyN1[m][iCell];
+        }
+    }
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            residualTransitionUnsteadyN1[m][iCell] = residualTransitionUnsteadyTemporary[m][iCell]; //! Here the current outerIterationStep is over, the value of the stored resTmp should be assigned to resn1 for the next outerIterationStep. It should be noticed that resTmp only contain the inviscid and viscous flux.
+        }
+    }
+
+    //! Statistical variables for DES simulation.
+    int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+    if (ifStaticsFlowField > 0)
+    {
+        int outerIterationStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+        int startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+
+        if (outerIterationStep >= startStatisticStep)
+        {
+            int numberOfStatisticalStep = GlobalDataBase::GetIntParaFromDB("nStatisticalStep");
+            RDouble statisticalTimePeriod = GlobalDataBase::GetDoubleParaFromDB("statisticalTimePeriod");
+            RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+            RDouble c1 = 1.0 / (numberOfStatisticalStep * 1.0);
+            if (statisticalTimePeriod > 0.0)
+            {
+                c1 = MAX(c1, physicalTimeStep / statisticalTimePeriod);
+            }
+            RDouble c2 = 1.0 - c1;
+
+            RDouble **qAverageTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("qAverageTransition"));
+            for (int m = 0; m < nTransitionEquation; ++ m)
+            {
+                for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+                {
+                    qAverageTransition[m][iCell] = c2 * qAverageTransition[m][iCell] + c1 * qTransition[m][iCell];
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverUnstr::DualTimeSource(Grid *gridIn)
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady) return;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    RDouble **qPrimitive = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+    RDouble **qTransitionUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition_unsteady_n1"));
+    RDouble **qTransitionUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition_unsteady_n2"));
+
+    RDouble **residualTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition"));
+    RDouble **residualTransitionUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition_unsteady_n1"));
+    RDouble **residualTransitionUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition_unsteady_n2"));
+    RDouble **residualTransitionUnsteadyTemporary = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition_unsteady_tmp"));
+
+    RDouble *volume = grid->GetCellVolume();
+    RDouble *volumeN1 = grid->GetCellVolume();
+    RDouble *volumeN2 = grid->GetCellVolume();
+
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble *primitive0 = new RDouble[nTransitionEquation];
+    RDouble *primitive1 = new RDouble[nTransitionEquation];
+    RDouble *primitive2 = new RDouble[nTransitionEquation];
+
+    RDouble *qConservative0 = new RDouble[nTransitionEquation];
+    RDouble *qConservative1 = new RDouble[nTransitionEquation];
+    RDouble *qConservative2 = new RDouble[nTransitionEquation];
+
+    //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            residualTransitionUnsteadyTemporary[m][iCell] = residualTransition[m][iCell];
+        }
+    }
+
+    //! Computation of dualtime coefficients, including three coefficients for Residual of R(p), R(n) and R(n-1);
+    //! and three coefficients for conservative variables of qcsv(p), qcsv(n), and qcsv(n-1).
+    RDouble dualTimeCoefficient[7];
+    const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+    ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+
+    RDouble dualTimeResC1 = dualTimeCoefficient[0];
+    RDouble dualTimeResC2 = dualTimeCoefficient[1];
+    RDouble dualTimeResC3 = dualTimeCoefficient[2];
+    RDouble dualTimeQC1 = dualTimeCoefficient[3];
+    RDouble dualTimeQC2 = dualTimeCoefficient[4];
+    RDouble dualTimeQC3 = dualTimeCoefficient[5];
+
+    using namespace IDX;
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            primitive0[m] = qTransition[m][iCell];
+            primitive1[m] = qTransitionUnsteadyN1[m][iCell];
+            primitive2[m] = qTransitionUnsteadyN2[m][iCell];
+        }
+
+        RDouble coefficient = 1.0;
+
+        if (nTransitionEquation >= 2)
+        {
+            coefficient = qPrimitive[IR][iCell];
+        }
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            qConservative0[m] = coefficient * primitive0[m];
+            qConservative1[m] = coefficient * primitive1[m];
+            qConservative2[m] = coefficient * primitive2[m];
+        }
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            RDouble dualSrcRes = dualTimeResC1 * residualTransition[m][iCell] +
+                dualTimeResC2 * residualTransitionUnsteadyN1[m][iCell] +
+                dualTimeResC3 * residualTransitionUnsteadyN2[m][iCell];
+
+            RDouble dualSrcQ = dualTimeQC1 * qConservative0[m] * volume[iCell] +
+                dualTimeQC2 * qConservative1[m] * volumeN1[iCell] +
+                dualTimeQC3 * qConservative2[m] * volumeN2[iCell];
+
+            residualTransition[m][iCell] = dualSrcRes + dualSrcQ;
+        }
+    }
+
+    delete[]primitive0;
+    delete[]primitive1;
+    delete[]primitive2;
+    delete[]qConservative0;
+    delete[]qConservative1;
+    delete[]qConservative2;
+}
+
+void TransitionSolverUnstr::FillField(Grid *gridIn, FieldProxy *fieldProxy, RDouble value)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **field = fieldProxy->GetField_UNS();
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            field[m][iCell] = value;
+        }
+    }
+}
+
+void TransitionSolverUnstr::FillField(Grid *gridIn, FieldProxy *field1Proxy, FieldProxy *field2Proxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **field1 = field1Proxy->GetField_UNS();
+    RDouble **field2 = field2Proxy->GetField_UNS();
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            field1[m][iCell] = field2[m][iCell];
+        }
+    }
+}
+
+FieldProxy *TransitionSolverUnstr::CreateFieldProxy(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **field = NewPointer2<RDouble>(nTransitionEquation, numberOfTotal);
+
+    FieldProxy *fieldProxy = new FieldProxy();
+
+    fieldProxy->SetField_UNS(field, true);
+
+    return fieldProxy;
+}
+
+FieldProxy *TransitionSolverUnstr::GetFieldProxy(Grid *gridIn, const string &fieldName)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **field = reinterpret_cast<RDouble **> (grid->GetDataPtr(fieldName));
+
+    FieldProxy *fieldProxy = new FieldProxy();
+
+    fieldProxy->SetField_UNS(field);
+
+    return fieldProxy;
+}
+
+FieldProxy *TransitionSolverUnstr::GetResidualProxy(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **residualTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition"));
+
+    FieldProxy *residualTransitionProxy = new FieldProxy();
+
+    residualTransitionProxy->SetField_UNS(residualTransition);
+
+    return residualTransitionProxy;
+}
+
+void TransitionSolverUnstr::RecoverResidual(Grid *gridIn, FieldProxy *rhsProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **residualTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition"));
+
+    if (grid->GetLevel() != 0)
+    {
+        RDouble **rhs = rhsProxy->GetField_UNS();
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+            {
+                residualTransition[m][iCell] = rhs[m][iCell];
+            }
+        }
+    }
+}
+
+void TransitionSolverUnstr::StoreRhsByResidual(Grid *gridIn, FieldProxy *rhsProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **residualTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition"));
+    RDouble **rhs = rhsProxy->GetField_UNS();
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            rhs[m][iCell] = residualTransition[m][iCell];
+        }
+    }
+}
+
+void TransitionSolverUnstr::InitResidual(Grid *gridIn, FieldProxy *rhsProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **residualTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition"));
+    RDouble **rhs = rhsProxy->GetField_UNS();
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            residualTransition[m][iCell] = - rhs[m][iCell];
+        }
+    }
+}
+
+void TransitionSolverUnstr::RestrictAllQ(Grid *fineGridIn, Grid *coarseGridIn)
+{
+    UnstructGrid *fineGrid = UnstructGridCast(fineGridIn);
+    UnstructGrid *coarseGrid = UnstructGridCast(coarseGridIn);
+
+    RDouble **qTransitionFineGrid = reinterpret_cast<RDouble **> (fineGrid->GetDataPtr("q_transition"));
+    RDouble **qTransitionCoarseGrid = reinterpret_cast<RDouble **> (coarseGrid->GetDataPtr("q_transition"));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        RestrictQ(fineGrid, qTransitionFineGrid[m], coarseGrid, qTransitionCoarseGrid[m]);
+    }
+}
+
+void TransitionSolverUnstr::LoadFlux(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble **flux = faceProxy->GetFlux();
+
+    //! Determine if there are boundary faces.
+    int nMid = localStart;
+    if (localEnd <= numberOfBoundaryFace)
+    {
+        //! If all boundary faces
+        nMid = localEnd;
+    }
+    else if (localStart < numberOfBoundaryFace)
+    {
+        //! Part of them are boundary faces
+        nMid = numberOfBoundaryFace;
+    }
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **residualTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition"));
+    using namespace IDX;
+
+    //! For boundary faces, remember re is ghost cell
+    for (int i = localStart; i < nMid; ++ i)
+    {
+        int le, j;
+        le = leftCellOfFace[i];
+        j = i - localStart;
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            residualTransition[m][le] -= flux[m][j];
+        }
+    }
+
+    //! Interior faces
+    for (int i = nMid; i < localEnd; ++ i)
+    {
+        int le, re, j;
+        le = leftCellOfFace[i];
+        re = rightCellOfFace[i];
+        j = i - localStart;
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            residualTransition[m][le] -= flux[m][j];
+            residualTransition[m][re] += flux[m][j];
+        }
+    }
+}
+
+void TransitionSolverUnstr::SourceFluxTwoEquation(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **primitiveVariables = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *viscousLaminar = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+    RDouble **spectrumTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("spec_transition"));
+    RDouble **residualTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition"));
+
+    RDouble *wallDistance = grid->GetWallDist();
+    RDouble *vol = grid->GetCellVolume();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    RDouble refReNumber = parameters->GetRefReNumber();
+
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal = numberOfTotalCell + numberOfBoundaryFace;
+
+    RDouble density, ke, kw;
+    RDouble sij2, mut;
+    RDouble volume;
+
+    RDouble s11, s22, s33, s12, s13, s23, w12, w13, w23;
+
+    RDouble *dudx = new RDouble[numberOfTotal]();
+    RDouble *dudy = new RDouble[numberOfTotal]();
+    RDouble *dudz = new RDouble[numberOfTotal]();
+
+    RDouble *dvdx = new RDouble[numberOfTotal]();
+    RDouble *dvdy = new RDouble[numberOfTotal]();
+    RDouble *dvdz = new RDouble[numberOfTotal]();
+
+    RDouble *dwdx = new RDouble[numberOfTotal]();
+    RDouble *dwdy = new RDouble[numberOfTotal]();
+    RDouble *dwdz = new RDouble[numberOfTotal]();
+
+    using namespace IDX;
+    grid->CompGradient(primitiveVariables[IU], dudx, dudy, dudz);
+    grid->CompGradient(primitiveVariables[IV], dvdx, dvdy, dvdz);
+    grid->CompGradient(primitiveVariables[IW], dwdx, dwdy, dwdz);
+
+    int freeturbIntensitySRModify = 0;
+    if (GlobalDataBase::IsExist("freeturbIntensitySRModify", PHINT, 1))
+    {
+        freeturbIntensitySRModify = GlobalDataBase::GetIntParaFromDB("freeturbIntensitySRModify");
+    }
+    double freeDecayXLocation = 0.0;
+    if (GlobalDataBase::IsExist("freeDecayXLocation", PHDOUBLE, 1))
+    {
+        freeDecayXLocation = GlobalDataBase::GetDoubleParaFromDB("freeDecayXLocation");
+    }
+
+    using namespace IDX;
+    RDouble refMaNumber = parameters->GetRefMachNumber();
+
+    RDouble compressibleFix = 1.0 + 0.40 * pow(refMaNumber, 1.75);
+
+    RDouble ca1 = parameters->Getca1();
+    RDouble ca2 = parameters->Getca2();
+    RDouble ce1 = parameters->Getce1();
+    RDouble ce2 = parameters->Getce2();
+    RDouble cct = parameters->Getcct();
+    RDouble s1 = parameters->Gets1();
+    RDouble ccf = parameters->Getccf();
+
+    RDouble *gamaeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("gamaeff"));
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        density = primitiveVariables[IR][iCell];
+        ke = qTurbulence[IKE][iCell];
+        kw = qTurbulence[IKW][iCell];
+        mut = viscousTurbulence[iCell];
+        volume = vol[iCell];
+
+        s11 = dudx[iCell];
+        s22 = dvdy[iCell];
+        s33 = dwdz[iCell];
+        s12 = half * (dudy[iCell] + dvdx[iCell]);
+        s13 = half * (dudz[iCell] + dwdx[iCell]);
+        s23 = half * (dvdz[iCell] + dwdy[iCell]);
+        w12 = half * (dudy[iCell] - dvdx[iCell]);
+        w13 = half * (dudz[iCell] - dwdx[iCell]);
+        w23 = half * (dvdz[iCell] - dwdy[iCell]);
+
+        sij2 = two * (s11 * s11 + s22 * s22 + s33 * s33 + two * (s12 * s12 + s13 * s13 + s23 * s23));
+
+        RDouble mul = viscousLaminar[iCell];
+        RDouble um = primitiveVariables[IU][iCell];
+        RDouble vm = primitiveVariables[IV][iCell];
+        RDouble wm = primitiveVariables[IW][iCell];
+        RDouble intermittency = qTransition[IGAMA][iCell];
+        RDouble Rectabar = qTransition[IRECT][iCell];
+
+        RDouble wallDist = wallDistance[iCell];
+
+        RDouble vorx = dvdz[iCell] - dwdy[iCell];
+        RDouble vory = dudz[iCell] - dwdx[iCell];
+        RDouble vorz = dudy[iCell] - dvdx[iCell];
+
+        RDouble vorticity = DISTANCE(vorx, vory, vorz);
+        RDouble strainRate = sqrt(sij2);
+
+        RDouble absU = MAX(DISTANCE(um, vm, wm), SMALL);
+
+        RDouble RT = ViscosityRatio(density, mul, ke, kw, refReNumber);
+        RDouble Rev = ReynoldsNumberBasedOnStrainRate(density, wallDist, mul, strainRate, refReNumber);
+        RDouble Rectac = TransitionOnsetMomentumThicknessReynolds(Rectabar);
+
+        RDouble Rw = ReynoldsNumberBasedOnDissipation(density, wallDist, mul, kw, refReNumber);
+        RDouble Flength = HighReynoldsCorrectionOfFlength(Rw, FlengthGivenByLangtry(Rectabar));
+
+        RDouble Fonset = TransitionOnsetFunction(Rev, Rectac, RT);
+        RDouble Fturb = ControlFunctionFturb(RT);
+
+        RDouble production1OfGama = ca1 * Flength * density * strainRate * sqrt(intermittency * Fonset);
+        RDouble production2OfGama = production1OfGama * (-ce1 * intermittency);
+
+        RDouble productionOfGama = production1OfGama + production2OfGama;
+
+        RDouble specGamap = MIN(0.0, 1.5 * production2OfGama + 0.5 * production1OfGama) / (density * intermittency);
+
+        RDouble destruction2OfGama = -ca2 * Fturb * density * vorticity * intermittency;
+        RDouble destruction1OfGama = -ce2 * intermittency * destruction2OfGama;
+
+        RDouble destructionOfGama = destruction1OfGama + destruction2OfGama;
+        RDouble specGamad = MAX(0.0, 2.0 * destruction1OfGama + destruction2OfGama) / (density * intermittency);
+
+        residualTransition[IGAMA][iCell] += (productionOfGama - destructionOfGama) * volume;
+        spectrumTransition[IGAMA][iCell] += (specGamad - specGamap) * volume;
+
+        RDouble Fctat = 1.0, Fctatcf = 1.0;
+        BlendingFunctionOfFctat(intermittency, Rw, Rectabar, vorticity, mul, density, absU, wallDist, refReNumber, ce2, Fctat, Fctatcf);
+        RDouble tscl = TimeScaleInSourceTerm(density, absU, mul, mut, refReNumber);
+        RDouble TU = TurbulenceIntensity(absU, ke);
+        gamaeff[iCell] = SeparationCorrectionOfIntermittency(intermittency, Rev, Rectac, RT, Fctat, s1, refMaNumber);
+
+        RDouble dUds = AccelerationAlongStreamline(um, vm, wm, dudx[iCell], dudy[iCell], dudz[iCell], dvdx[iCell], dvdy[iCell], dvdz[iCell], dwdx[iCell], dwdy[iCell], dwdz[iCell]);
+
+        RDouble momentumThickness = 0.0;
+        RDouble Rectat;
+        const int subIter = 10;
+        RDouble lamdacta0, lamdacta = 1.0;
+        for (int iter = 0; iter < subIter; ++iter)
+        {
+            lamdacta0 = lamdacta;
+            lamdacta = PressureGradientFunction(density, momentumThickness, mul, dUds, refReNumber);
+            lamdacta = lamdacta * compressibleFix;
+            lamdacta = MAX(-0.1, MIN(0.1, lamdacta));
+            RDouble Flamdacta = EmpiricalCorrelationOfFlamdacta(TU, lamdacta);
+            Rectat = EmpiricalCorrelationOfRectat(TU, Flamdacta);
+            momentumThickness = MomentumThickness(density, absU, mul, Rectat, refReNumber);
+            if (abs(lamdacta0 - lamdacta) <= SMALL)
+            {
+                break;
+            }
+        }
+        RDouble omegaStreamWise = abs((dwdy[iCell] - dvdz[iCell]) * um + (dudz[iCell] - dwdx[iCell]) * vm + (dvdx[iCell] - dudy[iCell]) * wm) / absU;
+        RDouble heightCrossFlow = wallDist * omegaStreamWise / absU;
+        RDouble Rescf = ReynoldsNumberBasedOnScf(heightCrossFlow, absU, density, mul, mut, refReNumber);
+
+        RDouble coecommon = cct * (1.0 - Fctat) / MAX(tscl, SMALL);
+
+        RDouble prodRe = coecommon * density * Rectat;
+        RDouble destRe = coecommon * density * Rectabar;
+
+        RDouble prodRecf = cct * density * ccf * MIN(Rescf - Rectabar, 0.0) * Fctatcf / tscl;
+        RDouble specRe = destRe / (density * Rectabar);
+
+        residualTransition[IRECT][iCell] += (prodRe + prodRecf - destRe) * volume;
+        spectrumTransition[IRECT][iCell] += specRe * volume;
+    }
+
+    delete[]dudx;
+    delete[]dudy;
+    delete[]dudz;
+
+    delete[]dvdx;
+    delete[]dvdy;
+    delete[]dvdz;
+
+    delete[]dwdx;
+    delete[]dwdy;
+    delete[]dwdz;
+}
+
+FaceProxy *TransitionSolverUnstr::CreateFaceProxy(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    FaceProxy *faceProxy = CreateFaceProxyTransition(grid);
+    faceProxy->SetNext(CreateFaceProxyNS(grid));
+
+    return faceProxy;
+}
+
+FaceProxy *TransitionSolverUnstr::CreateFaceProxyNS(Grid *gridIn)
+{
+    int nl;
+    GlobalDataBase::GetData("nl", &nl, PHINT, 1);
+
+    int nchem;
+    GlobalDataBase::GetData("nchem", &nchem, PHINT, 1);
+
+    int numberOfEquation = nl + nchem;
+
+    FaceProxy *faceProxy = new FaceProxy();
+    faceProxy->Create(SEGCTION_LENGTH, numberOfEquation);
+
+    return faceProxy;
+}
+
+FaceProxy *TransitionSolverUnstr::CreateFaceProxyTransition(Grid *gridIn)
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    FaceProxy *faceProxy = new FaceProxy();
+    faceProxy->Create(SEGCTION_LENGTH, nTransitionEquation);
+
+    return faceProxy;
+}
+
+TransitionFaceValue *TransitionSolverUnstr::CreateTransitionFaceValue(Grid *gridIn)
+{
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    TransitionFaceValue *facevar = new TransitionFaceValue(nTransitionEquation, SEGCTION_LENGTH);
+    return facevar;
+}
+
+void TransitionSolverUnstr::ComputeQTransitionNodeValue(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotalNode = grid->GetNTotalNode();
+    int numberOfTotalFace = grid->GetNTotalFace();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **qTransitionNode = reinterpret_cast<RDouble **>(grid->GetDataPtr("qTransitionNode"));
+    RDouble **qTransition = reinterpret_cast<RDouble **>(grid->GetDataPtr("q_transition"));
+    int *nodeValueSliceTransition = reinterpret_cast<int *>(grid->GetDataPtr("nodeValueSliceTransition"));
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    int *face2node = grid->GetFace2Node();
+    int *nodeNumberOfEachFace = grid->GetNodeNumberOfEachFace();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    for (int iNode = 0; iNode < numberOfTotalNode; ++ iNode)
+    {
+        nodeValueSliceTransition[iNode] = 0;
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            qTransitionNode[m][iNode] = 0;
+        }
+    }
+
+    //! Boundary faces
+    int nodePosition = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            // iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            int le = leftCellOfFace[iFace];
+            int re = rightCellOfFace[iFace];
+
+            if (bcType != PHENGLEI::INTERFACE)
+            {
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    //! From left
+                    int point = face2node[nodePosition + jNode];
+
+                    for (int m = 0; m < nTransitionEquation; ++ m)
+                    {
+                        qTransitionNode[m][point] += qTransition[m][le];
+                    }
+                    nodeValueSliceTransition[point] += 1;
+
+                    //! From right
+                    for (int m = 0; m < nTransitionEquation; ++ m)
+                    {
+                        qTransitionNode[m][point] += qTransition[m][re];
+                    }
+                    nodeValueSliceTransition[point] += 1;
+                }
+            }
+            else
+            {
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    int point = face2node[nodePosition + jNode];
+                    for (int m = 0; m < nTransitionEquation; ++ m)
+                    {
+                        qTransition[m][point] += qTransition[m][le];
+                    }
+                    nodeValueSliceTransition[point] += 1;
+                }
+            }
+            nodePosition += nodeNumberOfEachFace[iFace];
+        }
+    }
+
+    //! Interior faces
+    for (int iFace = numberOfBoundaryFace; iFace < numberOfTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+        for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+        {
+            //! From left
+            int point = face2node[nodePosition + jNode];
+            for (int m = 0; m < nTransitionEquation; ++ m)
+            {
+                qTransitionNode[m][point] += qTransition[m][le];
+            }
+            ++ nodeValueSliceTransition[point];
+
+            for (int m = 0; m < nTransitionEquation; ++ m)
+            {
+                qTransitionNode[m][point] += qTransition[m][re];
+            }
+            ++ nodeValueSliceTransition[point];
+        }
+        nodePosition += nodeNumberOfEachFace[iFace];
+    }
+
+    nodePosition = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            // iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            if (bcType == PHENGLEI::SYMMETRY)
+            {
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    int point = face2node[nodePosition + jNode];
+
+                    for (int m = 0; m < nTransitionEquation; ++ m)
+                    {
+                        qTransitionNode[m][point] = 0;
+                    }
+                    nodeValueSliceTransition[point] = 0;
+                }
+            }
+            nodePosition += nodeNumberOfEachFace[iFace];
+        }
+    }
+
+    nodePosition = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            // iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            int le = leftCellOfFace[iFace];
+            int re = iFace + numberOfTotalCell;
+
+            if (bcType == PHENGLEI::SYMMETRY)
+            {
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    int point = face2node[nodePosition + jNode];
+
+                    for (int m = 0; m < nTransitionEquation; ++ m)
+                    {
+                        qTransitionNode[m][point] += qTransition[m][le];
+                    }
+                    ++ nodeValueSliceTransition[point];
+
+                    for (int m = 0; m < nTransitionEquation; ++ m)
+                    {
+                        qTransitionNode[m][point] += qTransition[m][re];
+                    }
+                    ++ nodeValueSliceTransition[point];
+                }
+            }
+            nodePosition += nodeNumberOfEachFace[iFace];
+        }
+    }
+
+    nodePosition = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            // iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            if (bcType == PHENGLEI::FARFIELD)
+            {
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    int point = face2node[nodePosition + jNode];
+
+                    for (int m = 0; m < nTransitionEquation; ++ m)
+                    {
+                        qTransitionNode[m][point] = 0;
+                    }
+                    nodeValueSliceTransition[point] = 0;
+                }
+            }
+            nodePosition += nodeNumberOfEachFace[iFace];
+        }
+    }
+
+    nodePosition = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            // iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            int le = leftCellOfFace[iFace];
+            int re = iFace + numberOfTotalCell;
+
+            if (bcType == PHENGLEI::FARFIELD)
+            {
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    int point = face2node[nodePosition + jNode];
+
+                    for (int m = 0; m < nTransitionEquation; ++ m)
+                    {
+                        qTransitionNode[m][point] += qTransition[m][le];
+                    }
+                    ++ nodeValueSliceTransition[point];
+
+                    for (int m = 0; m < nTransitionEquation; ++ m)
+                    {
+                        qTransitionNode[m][point] += qTransition[m][re];
+                    }
+                    ++ nodeValueSliceTransition[point];
+                }
+            }
+            nodePosition += nodeNumberOfEachFace[iFace];
+        }
+    }
+
+    nodePosition = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            // iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            if (bcType == PHENGLEI::SOLID_SURFACE)
+            {
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    int point = face2node[nodePosition + jNode];
+
+                    for (int m = 0; m < nTransitionEquation; ++ m)
+                    {
+                        qTransitionNode[m][point] = 0;
+                    }
+                    nodeValueSliceTransition[point] = 0;
+                }
+            }
+            nodePosition += nodeNumberOfEachFace[iFace];
+        }
+    }
+
+    nodePosition = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            // iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            int le = leftCellOfFace[iFace];
+            int re = iFace + numberOfTotalCell;
+            if (bcType == PHENGLEI::SOLID_SURFACE)
+            {
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    int point = face2node[nodePosition + jNode];
+
+                    for (int m = 0; m < nTransitionEquation; ++ m)
+                    {
+                        qTransitionNode[m][point] += qTransition[m][le];
+                    }
+                    ++ nodeValueSliceTransition[point];
+
+                    for (int m = 0; m < nTransitionEquation; ++ m)
+                    {
+                        qTransitionNode[m][point] += qTransition[m][re];
+                    }
+                    ++ nodeValueSliceTransition[point];
+                }
+            }
+            nodePosition += nodeNumberOfEachFace[iFace];
+        }
+    }
+
+    //! Change the number of points divided by the interpoint to the number of points before partition,because it is a face loop,each point is calculated twice,so the number of points needs to be multiplied by 2.
+    InterpointInformation *interPointInfor = grid->GetInterpointInfo();
+    if (interPointInfor)
+    {
+        int numberOfInterPoint = interPointInfor->GetNumberOfInterpoints();
+        int *labelOfInterPoint = interPointInfor->GetLabelOfInterPoint();
+        int *interPoint2GlobalPoint = interPointInfor->GetInterPoint2GlobalPoint();
+
+        int globalPoint = 0;
+        for (int iPoint = 0; iPoint < numberOfInterPoint; ++ iPoint)
+        {
+            globalPoint = interPoint2GlobalPoint[iPoint];
+            if (labelOfInterPoint[iPoint] != 1)
+            {
+                for (int m = 0; m < nTransitionEquation; ++ m)
+                {
+                    globalPoint = interPoint2GlobalPoint[iPoint];
+                    qTransitionNode[m][globalPoint] = 0;
+                }
+            }
+        }
+        RDouble **qTransitionInterPoint = reinterpret_cast<RDouble **> (grid->GetDataPtr("transition::qInterpoint"));
+        for (int iPoint = 0; iPoint < numberOfInterPoint; ++ iPoint)
+        {
+            for (int m = 0; m < nTransitionEquation; ++ m)
+            {
+                qTransitionInterPoint[m][iPoint] = 0;
+            }
+        }
+    }
+}
+
+void TransitionSolverUnstr::ModifyQTransitionNodeValue(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalNode = grid->GetNTotalNode();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **qTransitionNode = reinterpret_cast<RDouble **>(grid->GetDataPtr("qTransitionNode"));
+    int *nodeValueSliceTransition = reinterpret_cast<int *>(grid->GetDataPtr("nodeValueSliceTransition"));
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        if (nodeValueSliceTransition[iNode] != 0)
+        {
+            for (int m = 0; m < nTransitionEquation; m++)
+            {
+                qTransitionNode[m][iNode] /= nodeValueSliceTransition[iNode];
+            }
+        }
+        else
+        {
+            for (int m = 0; m < nTransitionEquation; m++)
+            {
+                qTransitionNode[m][iNode] = 0.0;
+            }
+        }
+    }
+}
+
+void TransitionSolverUnstr::ComputeFaceWeight(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble *deltL = faceProxy->GetWeightL();
+    RDouble *deltR = faceProxy->GetWeightR();
+
+    grid->FaceWeight(deltL, deltR, localStart, localEnd);
+}
+
+void TransitionSolverUnstr::ViscousFlux(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalFace = grid->GetNTotalFace();
+
+    FaceProxy *faceProxy = CreateFaceProxy(grid);
+    faceProxy->SetTransitionFaceValue(CreateTransitionFaceValue(grid));
+
+    int localStart, localEnd;
+    localStart = 0;
+    do
+    {
+        localEnd = localStart + SEGCTION_LENGTH;
+        if (localEnd > numberOfTotalFace) localEnd = numberOfTotalFace;
+
+        ComputeFaceWeight(grid, faceProxy, localStart, localEnd);
+
+        GetVisFaceValue(grid, faceProxy, localStart, localEnd);
+
+        ComputeVisflux(grid, faceProxy, localStart, localEnd);
+
+        //LoadFlux(grid, faceProxy, localStart, localEnd);
+
+        localStart = localEnd;
+    } while (localStart < numberOfTotalFace);
+
+    delete faceProxy;
+}
+
+void TransitionSolverUnstr::GetVisFaceValue(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    TransitionFaceValue *faceVariable = faceProxy->GetTransitionFaceValue();
+
+    RDouble *viscousLaminar = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+
+    RDouble *mul = faceVariable->mul;
+    RDouble *mut = faceVariable->mut;
+    RDouble **mlt = faceVariable->mlt;
+
+    int le, re, jFace;
+    for (int iFace = localStart; iFace < localEnd; ++ iFace)
+    {
+        le = leftCellOfFace[iFace];
+        re = rightCellOfFace[iFace];
+        if (iFace < numberOfBoundaryFace) re = iFace + numberOfTotalCell;
+        jFace = iFace - localStart;
+
+        mul[jFace] = half * (viscousLaminar[le] + viscousLaminar[re]);
+        mut[jFace] = half * (viscousTurbulence[le] + viscousTurbulence[re]);
+    }
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    int nMid = numberOfBoundaryFace;
+    if (localEnd < numberOfBoundaryFace) nMid = localEnd;
+
+    if (localStart < numberOfBoundaryFace)
+    {
+        for (int iFace = localStart; iFace < nMid; ++ iFace)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+            int bcType = bcRegion->GetBCType();
+
+            jFace = iFace - localStart;
+
+            le = leftCellOfFace[iFace];
+
+            if (IsInterface(bcType))
+            {
+                continue;
+            }
+
+            if (IsWall(bcType))
+            {
+                mul[jFace] = viscousLaminar[le];
+                mut[jFace] = 0.0;
+            }
+            else
+            {
+                mul[jFace] = viscousLaminar[le];
+                mut[jFace] = viscousTurbulence[le];
+            }
+        }
+    }
+
+    using namespace IDX;
+
+    RDouble dct = parameters->Getdct();
+    RDouble df = parameters->Getdf();
+
+    for (int iFace = localStart; iFace < localEnd; ++ iFace)
+    {
+        le = leftCellOfFace[iFace];
+        re = rightCellOfFace[iFace];
+        if (iFace < numberOfBoundaryFace) re = iFace + numberOfTotalCell;
+        jFace = iFace - localStart;
+
+        mlt[IGAMA][jFace] = mul[jFace] + mut[jFace] / df;
+        mlt[IRECT][jFace] = (mul[jFace] + mut[jFace]) * dct;
+    }
+}
+
+//! Bell 20130513 mod.
+void TransitionSolverUnstr::ComputeVisflux(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    RDouble **flux = faceProxy->GetFlux();
+    TransitionFaceValue *faceVariable = faceProxy->GetTransitionFaceValue();
+
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+
+    RDouble *cellCenterX = grid->GetCellCenterX();
+    RDouble *cellCenterY = grid->GetCellCenterY();
+    RDouble *cellCenterZ = grid->GetCellCenterZ();
+
+    RDouble *xfc = grid->GetFaceCenterX();
+    RDouble *yfc = grid->GetFaceCenterY();
+    RDouble *zfc = grid->GetFaceCenterZ();
+
+    RDouble **mlt = faceVariable->mlt;
+
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+
+    RDouble **residualTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition"));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    RDouble *dfd1 = new RDouble[nTransitionEquation];
+    RDouble *dfd2 = new RDouble[nTransitionEquation];
+    RDouble *dfdn = new RDouble[nTransitionEquation];
+
+    RDouble *f1 = new RDouble[nTransitionEquation];
+    RDouble *f2 = new RDouble[nTransitionEquation];
+    RDouble *fMid = new RDouble[nTransitionEquation];
+
+    int le, re, jFace;
+    for (int iFace = localStart; iFace < localEnd; ++ iFace)
+    {
+        le = leftCellOfFace[iFace];
+        re = rightCellOfFace[iFace];
+        jFace = iFace - localStart;
+
+        RDouble nxs = xfn[iFace];
+        RDouble nys = yfn[iFace];
+        RDouble nzs = zfn[iFace];
+
+        RDouble dxL = cellCenterX[le] - xfc[iFace];
+        RDouble dyL = cellCenterY[le] - yfc[iFace];
+        RDouble dzL = cellCenterZ[le] - zfc[iFace];
+
+        RDouble dxR = cellCenterX[re] - xfc[iFace];
+        RDouble dyR = cellCenterY[re] - yfc[iFace];
+        RDouble dzR = cellCenterZ[re] - zfc[iFace];
+
+        RDouble dL = nxs * dxL + nys * dyL + nzs * dzL;
+        RDouble dR = nxs * dxR + nys * dyR + nzs * dzR;
+
+        RDouble distTemp = - dL / (DISTANCE(dxL, dyL, dzL) + SMALL);
+        distTemp = MIN(distTemp, 1.0);
+        distTemp = MAX(distTemp, -1.0);
+        RDouble angle1 = asin(distTemp) * 180.0 / PI;
+
+        distTemp = dR / (DISTANCE(dxR, dyR, dzR) + SMALL);
+        distTemp = MIN(distTemp, 1.0);
+        distTemp = MAX(distTemp, -1.0);
+        RDouble angle2 = asin(distTemp) * 180.0 / PI;
+
+        //! quantities at points 1 and 2
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            f1[m] = qTransition[m][le];
+            f2[m] = qTransition[m][re];
+        }
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            fMid[m] = half * (f1[m] + f2[m]);
+        }
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            dfdn[m] = 0.0;
+        }
+
+        if (angle1 > 0.0 && angle2 > 0.0 && ABS(dL) > TINY &&ABS(dR) > TINY)
+        {
+            for (int m = 0; m < nTransitionEquation; ++ m)
+            {
+                dfd1[m] = (f1[m] - fMid[m]) / dL;
+            }
+
+            for (int m = 0; m < nTransitionEquation; ++ m)
+            {
+                dfd2[m] = (f2[m] - fMid[m]) / dR;
+            }
+
+            RDouble dtmp = dL * dL + dR * dR;
+            RDouble weightL = dL * dL / dtmp;
+            RDouble weightR = 1.0 - weightL;
+
+            for (int m = 0; m < nTransitionEquation; ++ m)
+            {
+                dfdn[m] = weightL * dfd1[m] + weightR * dfd2[m];
+            }
+
+            if (iFace < numberOfBoundaryFace)
+            {
+                UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+                int bcType = bcRegion->GetBCType();
+
+                if (bcType != PHENGLEI::INTERFACE && bcType != PHENGLEI::SYMMETRY)
+                {
+                    RDouble normalDist = (cellCenterX[re] - cellCenterX[le]) * nxs +
+                        (cellCenterY[re] - cellCenterY[le]) * nys +
+                        (cellCenterZ[re] - cellCenterZ[le]) * nzs;
+
+                    for (int m = 0; m < nTransitionEquation; ++ m)
+                    {
+                        dfdn[m] = (f2[m] - f1[m]) / normalDist;
+                    }
+                }
+            }
+        }
+
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            flux[m][jFace] = - oRefReNumber * mlt[m][jFace] * dfdn[m] * area[iFace];
+        }
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            residualTransition[m][le] -= flux[m][jFace];
+
+            if (iFace >= numberOfBoundaryFace)
+            {
+                residualTransition[m][re] += flux[m][jFace];
+            }
+        }
+
+    }
+
+    delete[]dfd1;
+    delete[]dfd2;
+    delete[]dfdn;
+
+    delete[]f1;
+    delete[]f2;
+    delete[]fMid;
+}
+
+void TransitionSolverUnstr::Diagonal(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalFace = grid->GetNTotalFace();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    RDouble **q = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *viscousLaminar = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+
+    RDouble **spectrumTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("spec_transition"));
+    RDouble **matrixTransitionLeft = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_transitionl"));
+    RDouble **matrixTransitionRight = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_transitionr"));
+
+    RDouble *vol = grid->GetCellVolume();
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *vgn = grid->GetFaceNormalVelocity();
+
+    RDouble uL, vL, wL, vnL, absVnL;
+    RDouble uR, vR, wR, vnR, absVnR;
+
+    RDouble vn, absVn, ns2, rho, mul, mut, volume, oVolume;
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    vector<RDouble> work(nTransitionEquation);
+
+    using namespace IDX;
+
+    for (int iFace = 0; iFace < numberOfTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+
+        //! Calculate velocity at the cell interface.
+        uL = q[IU][le];
+        vL = q[IV][le];
+        wL = q[IW][le];
+        vnL = xfn[iFace] * uL + yfn[iFace] * vL + zfn[iFace] * wL - vgn[iFace];
+
+        absVnL = ABS(vnL);
+
+        uR = q[IU][re];
+        vR = q[IV][re];
+        wR = q[IW][re];
+        vnR = xfn[iFace] * uR + yfn[iFace] * vR + zfn[iFace] * wR - vgn[iFace];
+
+        absVnR = ABS(vnR);
+
+        vn = half * (vnL + vnR);
+        absVn = ABS(vn);
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            spectrumTransition[m][le] += area[iFace] * half * absVn;
+            spectrumTransition[m][re] += area[iFace] * half * absVn;
+
+            matrixTransitionRight[m][iFace] = area[iFace] * half * (vnR - absVn);
+            matrixTransitionLeft[m][iFace] = area[iFace] * half * (- vnL - absVn);
+        }
+    }
+
+    RDouble dct = parameters->Getdct();
+    RDouble df = parameters->Getdf();
+
+    for (int iFace = 0; iFace < numberOfTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+        rho = half * (q[IR][le] + q[IR][re]);
+        mul = half * (viscousLaminar[le] + viscousLaminar[re]);
+        mut = half * (viscousTurbulence[le] + viscousTurbulence[re]);
+
+
+        volume = half * (vol[le] + vol[re]);
+        oVolume = one / volume;
+
+        ns2 = area[iFace] * area[iFace];
+
+        work[IGAMA] = (mul + mut / dct) / rho * ns2 * oVolume;
+        work[IRECT] = (mul + mut) * df / rho * ns2 * oVolume;
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            spectrumTransition[m][le] += oRefReNumber * work[m];
+            spectrumTransition[m][re] += oRefReNumber * work[m];
+
+            matrixTransitionLeft[m][iFace] += - oRefReNumber * work[m];
+            matrixTransitionRight[m][iFace] += - oRefReNumber * work[m];
+        }
+    }
+}
+
+void TransitionSolverUnstr::GetQlQr(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    GetQlQrTransition(grid, faceProxy, localStart, localEnd);
+
+    FaceProxy *faceProxyNS = faceProxy->GetNext();
+    GetQlQrNS(grid, faceProxyNS, localStart, localEnd);
+
+}
+
+void TransitionSolverUnstr::GetQlQrTransition(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **qTransitionVarables = reinterpret_cast <RDouble **> (grid->GetDataPtr("q_transition"));
+
+    RDouble **qL = faceProxy->GetQL();
+    RDouble **qR = faceProxy->GetQR();
+
+    for (int iFace = localStart; iFace < localEnd; ++ iFace)
+    {
+        int le, re, jFace;
+        le = leftCellOfFace[iFace];
+        re = rightCellOfFace[iFace];
+        jFace = iFace - localStart;
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            qL[m][jFace] = qTransitionVarables[m][le];
+            qR[m][jFace] = qTransitionVarables[m][re];
+        }
+    }
+
+    //! Boundary fix.
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    int nBoundFace = grid->GetNBoundFace();
+    int nMid = 0;
+
+    //! Check if there are boundary faces. If no, return.
+    if (localStart >= nBoundFace)
+    {
+        return;
+    }
+
+    if (localEnd <= nBoundFace)
+    {
+        //! If they are all boundary faces.
+        nMid = localEnd;
+    }
+    else
+    {
+        //! Part of them are boundary faces.
+        nMid = nBoundFace;
+    }
+
+    for (int iFace = localStart; iFace < nMid; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        int bcType = bcRegion->GetBCType();
+
+        int jFace = iFace - localStart;
+
+        if (bcType == PHENGLEI::INTERFACE)
+        {
+            continue;
+        }
+
+        if (bcType == PHENGLEI::SYMMETRY)
+        {
+            for (int m = 0; m < nTransitionEquation; ++ m)
+            {
+                qR[m][jFace] = qL[m][jFace];
+            }
+        }
+        else
+        {
+            for (int m = 0; m < nTransitionEquation; ++ m)
+            {
+                RDouble temp = half * (qR[m][jFace] + qL[m][jFace]);
+                qR[m][jFace] = temp;
+                qL[m][jFace] = temp;
+            }
+        }
+    }
+}
+
+void TransitionSolverUnstr::GetQlQrNS(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    int nl = GlobalDataBase::GetIntParaFromDB("nl");
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nEquation = nl + nchem;
+
+    RDouble **q = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+
+    RDouble **qL = faceProxy->GetQL();
+    RDouble **qR = faceProxy->GetQR();
+
+    for (int iFace = localStart; iFace < localEnd; ++ iFace)
+    {
+        int le, re, jFace;
+        le = leftCellOfFace[iFace];
+        re = rightCellOfFace[iFace];
+        jFace = iFace - localStart;
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            qL[m][jFace] = q[m][le];
+            qR[m][jFace] = q[m][re];
+        }
+    }
+
+    //! Boundary fix.
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    int nBoundFace = grid->GetNBoundFace();
+    int nMid = 0;
+
+    //! Check if there are boundary faces. If no, return.
+    if (localStart >= nBoundFace)
+    {
+        return;
+    }
+
+    if (localEnd <= nBoundFace)
+    {
+        //! If they are all boundary faces.
+        nMid = localEnd;
+    }
+    else
+    {
+        //! Part of them are boundary faces.
+        nMid = nBoundFace;
+    }
+
+    for (int iFace = localStart; iFace < nMid; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        int bcType = bcRegion->GetBCType();
+
+        int jFace = iFace - localStart;
+
+        if (bcType == PHENGLEI::INTERFACE)
+        {
+            continue;
+        }
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            RDouble temp = half * (qR[m][jFace] + qL[m][jFace]);
+            qR[m][jFace] = temp;
+            qL[m][jFace] = temp;
+        }
+    }
+}
+
+void TransitionSolverUnstr::InviscidFlux(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalFace = grid->GetNTotalFace();
+
+    FaceProxy *faceProxy = CreateFaceProxy(grid);
+
+    int localStart, localEnd;
+
+    localStart = 0;
+    do
+    {
+        localEnd = localStart + SEGCTION_LENGTH;
+        if (localEnd > numberOfTotalFace) localEnd = numberOfTotalFace;
+
+        GetQlQr(grid, faceProxy, localStart, localEnd);
+
+        ComputeInviscidFlux(grid, faceProxy, localStart, localEnd);
+
+        LoadFlux(grid, faceProxy, localStart, localEnd);
+
+        localStart = localEnd;
+
+    } while (localStart < numberOfTotalFace);
+
+    delete faceProxy;
+}
+
+void TransitionSolverUnstr::ComputeInviscidFlux(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    NNDFlux(grid, faceProxy, localStart, localEnd);
+}
+
+void TransitionSolverUnstr::NNDFlux(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble *xfn = grid->GetFaceNormalX();
+    RDouble *yfn = grid->GetFaceNormalY();
+    RDouble *zfn = grid->GetFaceNormalZ();
+    RDouble *vgn = grid->GetFaceNormalVelocity();
+    RDouble *area = grid->GetFaceArea();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **qL = faceProxy->GetQL();
+    RDouble **qR = faceProxy->GetQR();
+    RDouble **flux = faceProxy->GetFlux();
+
+    FaceProxy *faceProxyNS = faceProxy->GetNext();
+
+    RDouble **qPrimitiveVariableL = faceProxyNS->GetQL();
+    RDouble **qPrimitiveVariableR = faceProxyNS->GetQR();
+
+    RDouble *primitiveVariableL = new RDouble[nTransitionEquation];
+    RDouble *primitiveVariableR = new RDouble[nTransitionEquation];
+    RDouble *f = new RDouble[nTransitionEquation];
+
+    RDouble rL, uL, vL, wL, vnL, vnLL, rR, uR, vR, wR, vnR, vnRR;
+    RDouble rhoFlag = 0, rhoCoefficientL, rhoCoefficientR;
+
+    using namespace IDX;
+
+    for (int iFace = localStart; iFace < localEnd; ++ iFace)
+    {
+        int le, re, jFace;
+        jFace = iFace - localStart;
+        le = leftCellOfFace[iFace];
+        re = rightCellOfFace[iFace];
+
+        rL = qPrimitiveVariableL[IR][jFace];
+        uL = qPrimitiveVariableL[IU][jFace];
+        vL = qPrimitiveVariableL[IV][jFace];
+        wL = qPrimitiveVariableL[IW][jFace];
+
+        rR = qPrimitiveVariableR[IR][jFace];
+        uR = qPrimitiveVariableR[IU][jFace];
+        vR = qPrimitiveVariableR[IV][jFace];
+        wR = qPrimitiveVariableR[IW][jFace];
+
+        vnL = xfn[iFace] * uL + yfn[iFace] * vL + zfn[iFace] * wL - vgn[iFace];
+        vnR = xfn[iFace] * uR + yfn[iFace] * vR + zfn[iFace] * wR - vgn[iFace];
+
+        vnLL = half * (vnL + ABS(vnL));
+        vnRR = half * (vnR - ABS(vnR));
+
+        rhoCoefficientL = rhoFlag * one + (one - rhoFlag) * rL;
+        rhoCoefficientR = rhoFlag * one + (one - rhoFlag) * rR;
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            primitiveVariableL[m] = rhoCoefficientL * qL[m][jFace];
+            primitiveVariableR[m] = rhoCoefficientR * qR[m][jFace];
+        }
+
+        //! Consider vgn here!
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            f[m] = (vnLL * primitiveVariableL[m] + vnRR * primitiveVariableR[m]);
+        }
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            flux[m][jFace] = f[m] * area[iFace];
+        }
+    }
+
+    delete[]primitiveVariableL;
+    delete[]primitiveVariableR;
+    delete[]f;
+}
+
+void TransitionSolverUnstr::GetResidual(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = UnstructGridCast(GetGrid(level));
+
+    RDouble **residualTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_transition"));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    PHSPACE::ComputeResidualonGrid(grid, actkey, residualTransition, nTransitionEquation);
+}
+
+void TransitionSolverUnstr::CompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex, const int &nEquation)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation) return;
+
+    int iNeighborZone = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend = interfaceInformation->GetFaceIndexForSend(iNeighborZone);
+    dataContainer->moveto_begin();
+
+    RDouble **dq = fieldProxy->GetField_UNS();
+
+    for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+    {
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int sourceCell;
+            int iFace = interfaceIndexContainerForSend[iLocalFace];
+            grid->GetSourceIndex(iFace, iGhostLayer + 1, sourceCell);
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                PHWrite(dataContainer, dq[m][sourceCell]);
+            }
+        }
+    }
+}
+
+void TransitionSolverUnstr::DecompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex, const int &nEquation)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation) return;
+
+    int iNeighborZone = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = interfaceInformation->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+    RDouble **dq = fieldProxy->GetField_UNS();
+
+    for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+    {
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForReceive[iLocalFace];
+            int targetCell;
+            grid->GetTargetIndex(iFace, iGhostLayer + 1, targetCell);
+
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                PHRead(dataContainer, dq[m][targetCell]);
+            }
+        }
+    }
+}
+
+void TransitionSolverUnstr::Boundary(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    using namespace PHENGLEI;
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+   
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+
+    //! Parallel
+    int currentZone = grid->GetOrdinaryGridIndex();
+    //! Serial
+    if (currentZone == -1)
+    {
+        currentZone = grid->GetZoneID();
+    }
+    int MixingPlaneNumber = 0;
+
+    string MixingIn, MixingOut;
+    if (referenceFrame == ROTATIONAL_FRAME)
+    {
+        int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+        string MixingPlane[100];
+        GlobalDataBase::GetData("MixingPlane", &MixingPlane, PHSTRING, 2 * nTurboZone - 2);
+
+        if (currentZone == 0)
+        {
+            MixingOut = MixingPlane[2 * currentZone];
+        }
+        else if (currentZone == nTurboZone)
+        {
+            MixingIn = MixingPlane[2 * currentZone - 1];
+        }
+        else
+        {
+            MixingIn = MixingPlane[2 * currentZone - 1];
+            MixingOut = MixingPlane[2 * currentZone];
+        }
+    }
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+
+        if (bcName == MixingIn || bcName == MixingOut)
+        {
+            continue;
+        }
+        if (IsInterface(bcType))
+        {
+            continue;
+        }
+        if (bcType == EXTRAPOLATION || bcType == SYMMETRY || bcType == OUTFLOW || bcType == PRESSURE_OUTLET || bcType == MASS_FLOW_OUTLET)
+        {
+            OutflowBCRegion(grid, bcRegion);
+        }
+        else if (bcType == INFLOW || bcType == PRESSURE_INLET || bcType == MASS_FLOW_INLET)
+        {
+            InflowBCRegion(grid, bcRegion);
+        }
+        else if (IsWall(bcType))
+        {
+            WallBCRegion(grid, bcRegion);
+        }
+        else if (bcType == FARFIELD)
+        {
+            FarfieldBCRegion(grid, bcRegion);
+        }
+        else
+        {
+            OutflowBCRegion(grid, bcRegion);
+        }
+    }
+}
+
+void TransitionSolverUnstr::OutflowBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        // iFace is the face number in the set of faceIndex.
+        int iFace = *iter;
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            qTransition[m][re] = qTransition[m][le];
+        }
+    }
+}
+
+void TransitionSolverUnstr::InflowBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    RDouble *freeStreamTransitionVar = parameters->GetFreeStreamTransitionVar();
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        // iFace is the face number in the set of faceIndex.
+        int iFace = *iter;
+        int re = rightCellOfFace[iFace];
+
+        for (int m = 0; m < nTransitionEquation; ++ m)
+        {
+            qTransition[m][re] = freeStreamTransitionVar[m];
+        }
+    }
+}
+
+void TransitionSolverUnstr::WallBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+
+    using namespace IDX;
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        // iFace is the face number in the set of faceIndex.
+        int iFace = *iter;
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+        qTransition[IGAMA][re] = qTransition[IGAMA][le];
+        qTransition[IRECT][re] = qTransition[IRECT][le];
+    }
+}
+
+void TransitionSolverUnstr::FarfieldBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *nxs = grid->GetFaceNormalX();
+    RDouble *nys = grid->GetFaceNormalY();
+    RDouble *nzs = grid->GetFaceNormalZ();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble *freeStreamTransitionVar = parameters->GetFreeStreamTransitionVar();
+
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+    RDouble **q = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *gamma = reinterpret_cast<RDouble *> (grid->GetDataPtr("gama"));
+
+    using namespace IDX;
+    RDouble *primitiveVariableInflow = reinterpret_cast<RDouble *> (GlobalDataBase::GetDataPtr("prim_inf"));
+    RDouble roo = primitiveVariableInflow[IR];
+    RDouble uoo = primitiveVariableInflow[IU];
+    RDouble voo = primitiveVariableInflow[IV];
+    RDouble woo = primitiveVariableInflow[IW];
+    RDouble poo = primitiveVariableInflow[IP];
+
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        // iFace is the face number in the set of faceIndex.
+        int iFace = *iter;
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+
+        RDouble rin, uin, vin, win, pin;
+        RDouble vno, vni, vei, coo, cIN;
+        RDouble riemp, riemm, cb, vnb;
+
+        rin = q[IR][le];
+        uin = q[IU][le];
+        vin = q[IV][le];
+        win = q[IW][le];
+        pin = q[IP][le];
+
+        vno = nxs[iFace] * uoo + nys[iFace] * voo + nzs[iFace] * woo;
+        vni = nxs[iFace] * uin + nys[iFace] * vin + nzs[iFace] * win;
+        vei = sqrt(uin * uin + vin * vin + win * win);
+
+        RDouble gama = gamma[le];
+
+        coo = sqrt(ABS(refGama * poo / roo));
+        cIN = sqrt(ABS(gama * pin / rin));
+
+        //! supersonic
+        if (vei > cIN)
+        {
+            if (vni >= 0.0)
+            {
+                //! exit
+                for (int m = 0; m < nTransitionEquation; ++ m)
+                {
+                    qTransition[m][re] = qTransition[m][le];
+                }
+            }
+            else
+            {
+                //! inlet
+                for (int m = 0; m < nTransitionEquation; ++ m)
+                {
+                    qTransition[m][re] = freeStreamTransitionVar[m];
+                }
+            }
+            continue;
+        }
+
+        //! subsonic
+        riemp = vni + 2.0 * cIN / (gama - 1.0);
+        riemm = vno - 2.0 * coo / (refGama - 1.0);
+        vnb = half * (riemp + riemm);
+        cb = fourth * (riemp - riemm) * gama;
+
+        if (vnb >= 0.0)
+        {
+            //! exit
+            for (int m = 0; m < nTransitionEquation; ++ m)
+            {
+                qTransition[m][re] = qTransition[m][le];
+            }
+        }
+        else
+        {
+            //! inlet
+            for (int m = 0; m < nTransitionEquation; ++ m)
+            {
+                qTransition[m][re] = freeStreamTransitionVar[m];
+            }
+        }
+
+    }
+}
+
+void TransitionSolverUnstr::InitCGrid(Grid *fineGridIn, Grid *coarseGridIn)
+{
+    UnstructGrid *fineGrid = UnstructGridCast(fineGridIn);
+    UnstructGrid *coarseGrid = UnstructGridCast(coarseGridIn);
+
+    int *cell2CoarseGridCell = fineGrid->GetCell2CoarseGridCell();
+    int numberOfTotalCellOnFineGrid = fineGrid->GetNTotalCell();
+    int numberOfTotalCellOnCoarseGrid = coarseGrid->GetNTotalCell();
+
+    RDouble *volumeOfCoarseGrid = coarseGrid->GetCellVolume();
+    RDouble *volumeOfFineGrid = fineGrid->GetCellVolume();
+
+    RDouble *walldistanceOfFineGrid = fineGrid->GetWallDist();
+
+    if (!coarseGrid->GetWallDist())
+    {
+        coarseGrid->AllocateWalldist();
+    }
+    RDouble *walldistanceOfCoarseGrid = coarseGrid->GetWallDist();
+
+    for (int iCell = 0; iCell < numberOfTotalCellOnCoarseGrid; ++ iCell)
+    {
+        walldistanceOfCoarseGrid[iCell] = 0.0;
+    }
+
+    for (int iCell = 0; iCell < numberOfTotalCellOnFineGrid; ++ iCell)
+    {
+        walldistanceOfCoarseGrid[cell2CoarseGridCell[iCell]] += volumeOfFineGrid[iCell] * walldistanceOfFineGrid[iCell];
+    }
+
+    for (int iCell = 0; iCell < numberOfTotalCellOnCoarseGrid; ++ iCell)
+    {
+        walldistanceOfCoarseGrid[iCell] /= volumeOfCoarseGrid[iCell];
+    }
+}
+
+void TransitionSolverUnstr::UploadInterfaceData(ActionKey *actkey)
+{
+    UploadInterfaceValue(actkey);
+}
+
+void TransitionSolverUnstr::UploadInterfaceValue(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(GetGrid(level));
+
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (interfaceInformation == 0) return;
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+    PHSPACE::UploadInterfaceValue(grid, qTransition, "transition::q", nTransitionEquation);
+}
+
+void TransitionSolverUnstr::UploadInterpointData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(GetGrid(level));
+    InterpointInformation *interPointInformation = grid->GetInterpointInfo();
+    if (interPointInformation == 0)
+    {
+        return;
+    }
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    RDouble **qTransitionNode = reinterpret_cast<RDouble **> (grid->GetDataPtr("qTransitionNode"));
+    PHSPACE::UploadInterpointValue(grid, qTransitionNode, "qTransitionNode", nTransitionEquation);
+}
+
+void TransitionSolverUnstr::DownloadInterpointData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(GetGrid(level));
+    InterpointInformation *interPointInformation = grid->GetInterpointInfo();
+    if (interPointInformation == 0)
+    {
+        return;
+    }
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    RDouble **qTransitionNode = reinterpret_cast<RDouble **> (grid->GetDataPtr("qTransitionNode"));
+    PHSPACE::DownloadInterpointValue(grid, qTransitionNode, "qTransitionNode", nTransitionEquation);
+}
+
+void TransitionSolverUnstr::CommunicationInterpointWeight(ActionKey *actkey)
+{
+    int level = actkey->level;
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int myid = GetCurrentProcessorID();
+        int tag = iZone + level * nZones;
+        int send_proc = GetZoneProcessorID(iZone);
+
+        ZoneNeighbor *zoneNeighborForPoint = zoneConnectivityForPoint->GetZoneNeighborForPoint(iZone);
+        std::size_t numberOfNeighbor = zoneNeighborForPoint->GetNumberOfNeighbor();
+
+        for (std::size_t iNeighborZone = 0; iNeighborZone < numberOfNeighbor; ++ iNeighborZone)
+        {
+            int neighborZoneIndex = zoneNeighborForPoint->GetZoneIndexOfNeighbor(iNeighborZone);
+            int recv_proc = GetZoneProcessorID(neighborZoneIndex);
+
+            DataContainer *cdata = new DataContainer();
+
+            if (myid == send_proc)
+            {
+                UnstructGrid *grid = UnstructGridCast(PHSPACE::GetGrid(iZone, level));
+                InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+                int *nodeValueSliceTransition = reinterpret_cast<int *>(grid->GetDataPtr("nodeValueSliceTransition"));
+
+                cdata->moveto_begin();
+
+                int iNeighbor = interpointInformation->FindIthNeighbor(neighborZoneIndex);
+                int numberOfInterpointsForNeighbor = interpointInformation->GetNumberOfInterpointsForNeighbor(iNeighbor);
+                int *pointIndexForSend = interpointInformation->GetPointIndexForSend(iNeighbor);
+                int *interPoint2GlobalPoint = interpointInformation->GetInterPoint2GlobalPoint();
+
+                int iPoint;
+                int globalPoint;
+                int valueWeight;
+                for (int ipointLocal = 0; ipointLocal < numberOfInterpointsForNeighbor; ++ ipointLocal)
+                {
+                    iPoint = pointIndexForSend[ipointLocal];
+                    globalPoint = interPoint2GlobalPoint[iPoint];
+                    valueWeight = nodeValueSliceTransition[globalPoint];
+
+                    cdata->write(&valueWeight, sizeof(int));
+                }
+            }
+
+            PH_Trade(cdata, send_proc, recv_proc, tag);
+
+            if (myid == recv_proc)
+            {
+                UnstructGrid *gridNeighbor = UnstructGridCast(PHSPACE::GetGrid(neighborZoneIndex, level));
+                InterpointInformation *interpointInformationNeighbor = gridNeighbor->GetInterpointInfo();
+                int *nodeValueSliceTransitionTrade = reinterpret_cast<int *>(gridNeighbor->GetDataPtr("nodeValueSliceTransitionTrade"));
+
+                cdata->moveto_begin();
+
+                int iNeighbor = interpointInformationNeighbor->FindIthNeighbor(iZone);
+                int numberOfInterpointsForNeighbor = interpointInformationNeighbor->GetNumberOfInterpointsForNeighbor(iNeighbor);
+                int *pointIndexForReceive = interpointInformationNeighbor->GetPointIndexForReceive(iNeighbor);
+                int *interPoint2GlobalPoint = interpointInformationNeighbor->GetInterPoint2GlobalPoint();
+
+                int iPoint;
+                int globalPoint;
+                int valueWeight;
+                for (int j = 0; j < numberOfInterpointsForNeighbor; ++ j)
+                {
+                    iPoint = pointIndexForReceive[j];
+                    globalPoint = interPoint2GlobalPoint[iPoint];
+                    cdata->read(&valueWeight, sizeof(int));
+
+                    nodeValueSliceTransitionTrade[globalPoint] += valueWeight;
+                }
+            }
+
+            delete cdata;
+        }
+    }
+}
+
+void TransitionSolverUnstr::DownloadInterpointWeight(ActionKey *actkey)
+{
+    int level = actkey->level;
+
+    using namespace PHMPI;
+
+    int myid = GetCurrentProcessorID();
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int currentZoneProc = GetZoneProcessorID(iZone);
+
+        if (myid != currentZoneProc)
+        {
+            continue;
+        }
+
+        UnstructGrid *grid = UnstructGridCast(PHSPACE::GetGrid(iZone, level));
+        int nTotalNode = grid->GetNTotalNode();
+        int *nodeValueSliceTransition = reinterpret_cast<int *>(grid->GetDataPtr("nodeValueSliceTransition"));
+        int *nodeValueSliceTransitionTrade = reinterpret_cast<int *>(grid->GetDataPtr("nodeValueSliceTransitionTrade"));
+
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            nodeValueSliceTransition[iNode] += nodeValueSliceTransitionTrade[iNode];
+        }
+
+        PHSPACE::SetField(nodeValueSliceTransitionTrade, 0, nTotalNode);
+    }
+}
+
+// Bell 20120910 add
+void TransitionSolverUnstr::DownloadInterfaceData(ActionKey *actkey)
+{
+    DownloadInterfaceValue(actkey);
+}
+//
+
+void TransitionSolverUnstr::DownloadInterfaceValue(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(GetGrid(level));
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (interfaceInformation == 0) return;
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+    PHSPACE::DownloadInterfaceValue(grid, qTransition, "transition::q", nTransitionEquation);
+}
+
+//! need further compllished!!!
+void TransitionSolverUnstr::UploadOversetData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(GetGrid(level));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+    PHSPACE::UploadOversetValue(grid, qTransition, "transition::q", nTransitionEquation);
+}
+
+//! need further compllished!!!
+void TransitionSolverUnstr::DownloadOversetData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(GetGrid(level));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    RDouble **qTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_transition"));
+
+    PHSPACE::DownloadOversetValue(grid, qTransition, "transition::q", nTransitionEquation);
+}
+
+void TransitionSolverUnstr::ReadStatisticalFlow(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = UnstructGridCast(GetGrid(level));
+
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfTotal = numberOfTotalCell + numberOfBoundaryFace;
+
+    RDouble **qAverageTransition = reinterpret_cast<RDouble **> (grid->GetDataPtr("qAverageTransition"));
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    int nTransitionEquation = parameters->GetNTransitionEquation();
+
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+
+    int numberOfStatisticalStep = 0;
+    cdata->read(&numberOfStatisticalStep, sizeof(int));
+
+    GlobalDataBase::UpdateData("nStatisticalStep", &numberOfStatisticalStep, PHINT, 1);
+
+    for (int m = 0; m < nTransitionEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            cdata->read(&qAverageTransition[m][iCell], sizeof(RDouble));
+        }
+    }
+}
+
+void TransitionSolverUnstr::ComputeGradient(Grid *gridIn)
+{
+    GetGradientField(gridIn);
+}
+
+void TransitionSolverUnstr::InitMixingPlane(RDouble ***MixingPlaneVar, int Dim1, int Dim2, int Dim3, RDouble Value)
+{
+    for (int iDim1 = 0; iDim1 < Dim1; iDim1++)
+    {
+        for (int iDim2 = 0; iDim2 < Dim2; iDim2++)
+        {
+            for (int iDim3 = 0; iDim3 < Dim3; iDim3++)
+            {
+                MixingPlaneVar[iDim1][iDim2][iDim3] = Value;
+            }
+        }
+    }
+}
+
+//! need to input q_average, which means flux averaged primitive variable of mixing plane.
+//! this function should be called in boundary condition part.
+void TransitionSolverUnstr::AverageMixingPlane(Grid *grid)
+{
+    UnstructGrid *gridUnstruct   = UnstructGridCast(grid);
+    UnstructBCSet *unstructBCSet = gridUnstruct->GetUnstructBCSet();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble gama1   = refGama - 1;
+
+    RDouble refDensity  = parameters->GetRefDimensionalDensity();
+    RDouble refPressure = parameters->GetRefDimensionalPressure();
+
+    RDouble **q           = reinterpret_cast<RDouble **> (gridUnstruct->GetDataPtr("q"));
+    RDouble **qTransition = reinterpret_cast<RDouble **> (gridUnstruct->GetDataPtr("q_transition"));
+
+    RDouble **r_ori    = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Face"));
+    RDouble **r_target = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Span"));
+
+    RDouble **SpanArea = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("SpanArea"));
+
+    //! nSpan is the number of spanwise point to do data average
+    //! also interpolate data on these points.
+    //! nSpanSection
+    int nSpanSection = PHSPACE::GlobalDataBase::GetIntParaFromDB("nSpanSection");
+    RDouble nSpan = (RDouble)(nSpanSection);
+
+    RDouble Area;
+
+    RDouble *nxs, *nys, *nzs, *ns;
+
+    nxs = gridUnstruct->GetFaceNormalX();
+    nys = gridUnstruct->GetFaceNormalY();
+    nzs = gridUnstruct->GetFaceNormalZ();
+    ns  = gridUnstruct->GetFaceArea();
+
+    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+    string MixingPlane[100];
+    GlobalDataBase::GetData("MixingPlane", &MixingPlane, PHSTRING, 2 * nTurboZone - 2);
+
+    //r_ori should be an array that contains coordinate of each node.
+    //the range of this array is equal to the face number of this boundary.
+    RDouble r_min, r_max;
+
+    r_min = 1e6;
+    r_max = 0;
+
+    RDouble *xfc = gridUnstruct->GetFaceCenterX();
+    RDouble *yfc = gridUnstruct->GetFaceCenterY();
+    RDouble *zfc = gridUnstruct->GetFaceCenterZ();
+
+    RDouble *gama = reinterpret_cast< RDouble * > (grid->GetDataPtr("gama"));
+
+    int **face2nodeArray = gridUnstruct->GetFace2NodeArray();
+    int * node_number_of_each_face = gridUnstruct->GetNodeNumberOfEachFace();
+
+    int *leftCellofFace  = gridUnstruct->GetLeftCellOfFace();
+    int *rightCellofFace = gridUnstruct->GetRightCellOfFace();
+    int nTotalCell       = gridUnstruct->GetNTotalCell();
+
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    RDouble PeriodicRotationAngle[100];
+    GlobalDataBase::GetData("PeriodicRotationAngle", &PeriodicRotationAngle, PHDOUBLE, nTurboZone);
+
+    using namespace IDX;
+
+    RDouble ***SpanFlux      = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("SpanFlux"));
+    RDouble ***SpanTransFlux = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("SpanTransFlux"));
+    int FlowDirection = -1;
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *vgn = gridUnstruct->GetFaceNormalVelocity();
+
+    RDouble *primi = new RDouble[nEquation]();
+    RDouble *primo = new RDouble[nEquation]();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+
+        int bcType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+
+        //! find mixing plane and average data.
+        //! Parallel
+        int iTurboZone = gridUnstruct->GetOrdinaryGridIndex();
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = gridUnstruct->GetZoneID();
+        }
+
+        RDouble rotationAngle = PeriodicRotationAngle[iTurboZone] / 180 * PI;
+
+        string MixingPlaneIn, MixingPlaneOut;
+        int SourceFlag;
+
+        if (iTurboZone == 0)
+        {
+            MixingPlaneOut = MixingPlane[0];
+        }
+        else if (iTurboZone == nTurboZone)
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+        }
+        else
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+            MixingPlaneOut = MixingPlane[2 * iTurboZone];
+        }
+
+        if (bcName == MixingPlaneIn || bcName == MixingPlaneOut)
+        {
+            if (bcName == MixingPlaneIn)
+            {
+                FlowDirection = 0;
+                SourceFlag = 1 + (iTurboZone - 1) * 10;
+            }
+            if (bcName == MixingPlaneOut)
+            {
+                FlowDirection = 1;
+                SourceFlag = 0 + (iTurboZone + 1) * 10;
+            }
+            int MixingFlag = FlowDirection + iTurboZone * 10;
+
+            //! preprocess of mixing plane.
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                //! iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+
+                int le = leftCellofFace[iFace];
+                int re = rightCellofFace[iFace];
+
+                //! need to compute total area, total flux of this bc region.
+                //also need to compute flux of each spanwise.
+                //spanwise can be defined based on mesh or manually.
+                r_ori[MixingFlag][iFace] = sqrt(yfc[iFace] * yfc[iFace] + zfc[iFace] * zfc[iFace]);
+
+                r_min = MIN(r_ori[MixingFlag][iFace], r_min);
+                r_max = MAX(r_ori[MixingFlag][iFace], r_max);
+            }
+
+            //! get target radius.
+            for (int iSpan = 0; iSpan <= nSpanSection; iSpan++)
+            {
+                r_target[MixingFlag][iSpan] = r_min + iSpan * (r_max - r_min) / nSpan;
+            }
+
+            //! compute average flux.
+            for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+            {
+                RDouble Flux[5]      = { 0, 0, 0, 0, 0 };
+                RDouble TransFlux[5] = { 0, 0, 0, 0, 0 };
+
+                RDouble TotalArea = 0.0;
+
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    //! iFace is the face number in the set of faceIndex.
+                    int iFace = *iter;
+
+                    int le = leftCellofFace[iFace];
+                    int re = rightCellofFace[iFace];
+
+                    Area = ns[iFace];
+
+                    RDouble r_Face = sqrt(yfc[iFace] * yfc[iFace] + zfc[iFace] * zfc[iFace]);
+
+                    RDouble Velocity_ti = (q[IV][le] * zfc[iFace] - q[IW][le] * yfc[iFace]) / r_Face;
+                    RDouble Velocity_ri = (q[IV][le] * yfc[iFace] + q[IW][le] * zfc[iFace]) / r_Face;
+
+                    RDouble Velocity_to = (q[IV][re] * zfc[iFace] - q[IW][re] * yfc[iFace]) / r_Face;
+                    RDouble Velocity_ro = (q[IV][re] * yfc[iFace] + q[IW][re] * zfc[iFace]) / r_Face;
+
+                    RDouble nrs = (nys[iFace] * yfc[iFace] + nzs[iFace] * zfc[iFace]) / r_Face;
+
+                    RDouble vni = q[IU][le] * nxs[iFace] + Velocity_ri * nrs - vgn[iFace];
+                    RDouble vno = q[IU][re] * nxs[iFace] + Velocity_ro * nrs - vgn[iFace];
+                    //! find face center that locate in target span.
+                    //! compute flux at each span.
+                    if (r_Face > r_target[MixingFlag][iSpan] && r_Face <= r_target[MixingFlag][iSpan + 1])
+                    {
+                        TotalArea += Area;
+                        for (int m = 0; m < nEquation; m++)
+                        {
+                            TransFlux[m] += q[IR][le] * vni * qTransition[m][le] * ns[iFace];
+                        }
+                    }
+                }
+
+                SpanArea[MixingFlag][iSpan] = TotalArea;
+
+                for (int m = 0; m < nEquation; m++)
+                {
+                    SpanTransFlux[MixingFlag][m][iSpan] = TransFlux[m] / SpanArea[MixingFlag][iSpan];
+                }
+            }
+        }
+    }
+}
+
+//! SpanFlux from AverageMixingPlane should be input data.
+//! Here we will obtain averaged primitive variable of each span from SpanFlux.
+//! The averaged primitive variable will be treated as outlet data of upstream and inlet data of downsteam.
+void TransitionSolverUnstr::MixingPlaneDataTransfer(Grid *grid, Grid *NeighborGrid)
+{
+    UnstructGrid *gridUnstruct   = UnstructGridCast(grid);
+    UnstructGrid *gridSource     = UnstructGridCast(NeighborGrid);
+    UnstructBCSet *unstructBCSet = gridUnstruct->GetUnstructBCSet();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble gama1 = refGama - 1;
+
+    RDouble refDensity  = parameters->GetRefDimensionalDensity();
+    RDouble refPressure = parameters->GetRefDimensionalPressure();
+
+    RDouble **q           = reinterpret_cast< RDouble ** > (gridUnstruct->GetDataPtr("q"));
+    RDouble **qTransition = reinterpret_cast< RDouble ** > (gridUnstruct->GetDataPtr("q_transition"));
+
+    RDouble **r_target = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Span"));
+
+    RDouble **SpanArea = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("SpanArea"));
+    //! nSpan is the number of spanwise point to do data average
+    //! also interpolate data on these points.
+    int nSpanSection = PHSPACE::GlobalDataBase::GetIntParaFromDB("nSpanSection");
+
+    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+    string MixingPlane[100];
+    GlobalDataBase::GetData("MixingPlane", &MixingPlane, PHSTRING, 2 * nTurboZone - 2);
+
+    RDouble *xfc = gridUnstruct->GetFaceCenterX();
+    RDouble *yfc = gridUnstruct->GetFaceCenterY();
+    RDouble *zfc = gridUnstruct->GetFaceCenterZ();
+
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    //! qSpanNeighbor: record flow variable in neighbor zone at each span.
+    RDouble ***qTrans_Span   = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("qTrans_Span"));
+    RDouble ***SourceFlux    = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("SpanFlux"));
+    RDouble ***SpanTransFlux = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("SpanTransFlux"));
+    RDouble ***qSpanNeighbor = reinterpret_cast< RDouble *** > (gridSource->GetDataPtr("qTransSpanNeighbor"));
+
+    using namespace IDX;
+
+    int FlowDirection = -1;
+
+    int nEquation = GetNumberOfEquations();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+
+        int bcType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+
+        //! Parallel
+        int iTurboZone = gridUnstruct->GetOrdinaryGridIndex();
+        int SourceZone = gridSource->GetOrdinaryGridIndex();
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = gridUnstruct->GetZoneID();
+            SourceZone = gridSource->GetZoneID();
+        }
+
+        string MixingPlaneIn, MixingPlaneOut;
+
+        if (iTurboZone == 0)
+        {
+            MixingPlaneOut = MixingPlane[0];
+        }
+        else if (iTurboZone == nTurboZone)
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+        }
+        else
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+            MixingPlaneOut = MixingPlane[2 * iTurboZone];
+        }
+
+        //! TargetMixingFlag is Mixingplane in current zone, which need neighbor zone data.
+        //! SourceMixingFlag is Mixingplane in neighbor zone, which provide the data. 
+        int MixingFlag, TargetFlag;
+        if (bcName == MixingPlaneIn || bcName == MixingPlaneOut)
+        {
+            //! downstream to upstream: transfer data from MixingIn to MixingOut.
+            if (SourceZone == iTurboZone + 1)
+            {
+                if (bcName == MixingPlaneIn) continue;
+                //! upstream MixingIn.
+                TargetFlag = 0 + SourceZone * 10;
+                //! current MixingOut.
+                MixingFlag = 1 + iTurboZone * 10;
+            }
+            //! upstream to downstream: transfer data from MixingOut to MixingIn.
+            else if (SourceZone == iTurboZone - 1)
+            {
+                if (bcName == MixingPlaneOut) continue;
+                TargetFlag = 1 + SourceZone * 10;
+                MixingFlag = 0 + iTurboZone * 10;
+            }
+
+            //! compute flow variables.
+            for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+            {
+                for (int m = 0; m < nEquation; m++)
+                {
+                    qTrans_Span[MixingFlag][m][iSpan] = SpanTransFlux[MixingFlag][m][iSpan] / SourceFlux[MixingFlag][IR][iSpan];
+                }
+
+                for (int m = 0; m < nEquation; m++)
+                {
+                    qSpanNeighbor[TargetFlag][m][iSpan] = qTrans_Span[MixingFlag][m][iSpan];
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverUnstr::NonReflective(Grid *grid, Grid *NeighborGrid)
+{
+    UnstructGrid *gridUnstruct = UnstructGridCast(grid);
+    UnstructGrid *gridTarget = UnstructGridCast(NeighborGrid);
+    UnstructBCSet *unstructBCSet = gridUnstruct->GetUnstructBCSet();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble gama1 = refGama - 1;
+
+    RDouble refDensity = parameters->GetRefDimensionalDensity();
+    RDouble refPressure = parameters->GetRefDimensionalPressure();
+
+    RDouble **q = reinterpret_cast< RDouble ** > (gridUnstruct->GetDataPtr("q"));
+    RDouble **qTransition = reinterpret_cast< RDouble **> (gridUnstruct->GetDataPtr("q_transition"));
+
+    RDouble **r_ori = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Face"));
+    RDouble **r_target = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Span"));
+
+    RDouble ***qTrans_Span = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("qTrans_Span"));
+
+    RDouble **SpanArea = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("SpanArea"));
+    //! nSpan is the number of spanwise point to do data average
+    //! also interpolate data on these points.
+    int nSpanSection = PHSPACE::GlobalDataBase::GetIntParaFromDB("nSpanSection");
+
+    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+    string MixingPlane[100];
+    GlobalDataBase::GetData("MixingPlane", &MixingPlane, PHSTRING, 2 * nTurboZone - 2);
+
+    RDouble *xcc = gridUnstruct->GetCellCenterX();
+    RDouble *ycc = gridUnstruct->GetCellCenterY();
+    RDouble *zcc = gridUnstruct->GetCellCenterZ();
+
+    RDouble *xfc = gridUnstruct->GetFaceCenterX();
+    RDouble *yfc = gridUnstruct->GetFaceCenterY();
+    RDouble *zfc = gridUnstruct->GetFaceCenterZ();
+
+    RDouble *ns = gridUnstruct->GetFaceArea();
+
+    int *leftCellofFace  = gridUnstruct->GetLeftCellOfFace();
+    int *rightCellofFace = gridUnstruct->GetRightCellOfFace();
+
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    RDouble **nxsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("nxsSpan"));
+    RDouble **ntsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("ntsSpan"));
+    RDouble **nrsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("nrsSpan"));
+
+    //! qSpanNeighbor: record flow variable in neighbor zone at each span.
+    RDouble ***q_SpanCurrent = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("q_Span"));
+    RDouble ***q_SpanTarget  = reinterpret_cast< RDouble *** > (gridTarget->GetDataPtr("q_Span"));
+
+    RDouble ***qTrans_SpanCurrent = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("qTrans_Span"));
+    RDouble ***qTransSpanNeighbor = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("qTransSpanNeighbor"));
+    RDouble ***SpanTransFlux      = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("SpanTransFlux"));
+
+    RDouble ***qTrans_SpanTarget = reinterpret_cast< RDouble *** > (gridTarget->GetDataPtr("qTrans_Span"));
+
+    RDouble ***dqTransSpanIn = reinterpret_cast <RDouble ***> (gridUnstruct->GetDataPtr("dqTransSpanIn"));
+    RDouble ***dqTransSpanEx = reinterpret_cast <RDouble ***> (gridUnstruct->GetDataPtr("dqTransSpanEx"));
+    RDouble ***dcTransSpan   = reinterpret_cast <RDouble ***> (gridUnstruct->GetDataPtr("dcTransSpan"));
+
+    using namespace IDX;
+
+    int FlowDirection = -1;
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *ExtraDqTrans = new RDouble[nEquation];
+    RDouble *deltaQTrans  = new RDouble[nEquation];
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion++)
+    {
+        UnstructBC *bcRegion   = unstructBCSet->GetBCRegion(iBCRegion);
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+
+        int bcType    = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+
+        //! Parallel
+        int iTurboZone = gridUnstruct->GetOrdinaryGridIndex();
+        int TargetZone = gridTarget->GetOrdinaryGridIndex();
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = gridUnstruct->GetZoneID();
+            TargetZone = gridTarget->GetZoneID();
+        }
+
+        string MixingPlaneIn, MixingPlaneOut;
+
+        if (iTurboZone == 0)
+        {
+            MixingPlaneOut = MixingPlane[0];
+        }
+        else if (iTurboZone == nTurboZone)
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+        }
+        else
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+            MixingPlaneOut = MixingPlane[2 * iTurboZone];
+        }
+
+        //! TargetMixingFlag is Mixingplane in current zone, which need neighbor zone data.
+        //! SourceMixingFlag is Mixingplane in neighbor zone, which provide the data. 
+        int MixingFlag, TargetFlag;
+        if (bcName == MixingPlaneIn || bcName == MixingPlaneOut)
+        {
+            //! downstream to upstream: transfer data from MixingIn to MixingOut.
+            if (TargetZone == iTurboZone + 1)
+            {
+                if (bcName == MixingPlaneIn) continue;
+                //! upstream MixingIn.
+                TargetFlag = 0 + TargetZone * 10;
+                //! current MixingOut.
+                MixingFlag = 1 + iTurboZone * 10;
+            }
+            //! upstream to downstream: transfer data from MixingOut to MixingIn.
+            else if (TargetZone == iTurboZone - 1)
+            {
+                if (bcName == MixingPlaneOut) continue;
+                TargetFlag = 1 + TargetZone * 10;
+                MixingFlag = 0 + iTurboZone * 10;
+            }
+            if (bcName == MixingPlaneIn || bcName == MixingPlaneOut)
+            {
+                //! compute variable perturbation
+                for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+                {
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        ExtraDqTrans[m] = 0.0;
+                    }
+
+                    //! interpolation
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        dqTransSpanIn[MixingFlag][m][iSpan] = qTrans_SpanTarget[TargetFlag][m][iSpan] - qTrans_SpanCurrent[MixingFlag][m][iSpan];
+                    }
+                    //! extrapolation
+                    vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                    {
+                        int iFace = *iter;
+
+                        int re = rightCellofFace[iFace];
+                        int le = leftCellofFace[iFace];
+
+                        RDouble r_Face = sqrt(yfc[iFace] * yfc[iFace] + zfc[iFace] * zfc[iFace]);
+
+                        //! extrapolating q[m][le] and q on the interface to obtain ExtraDq.
+                        if (r_Face > r_target[MixingFlag][iSpan] && r_Face <= r_target[MixingFlag][iSpan + 1])
+                        {
+                            for (int m = 0; m < nEquation; m++)
+                            {
+                                ExtraDqTrans[m] = half * (qTrans_Span[MixingFlag][m][iSpan] - qTransition[m][le]) * ns[iFace];
+                            }
+                        }
+                    }
+
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        dqTransSpanEx[MixingFlag][m][iSpan] = ExtraDqTrans[m] / SpanArea[MixingFlag][iSpan];
+                    }
+                }
+                for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+                {
+                    //! after data transfer in NSSlover, IU, IV, IW refers to vx, vtheta, vr.
+                    RDouble vn = nxsSpan[MixingFlag][iSpan] * q_SpanCurrent[MixingFlag][IU][iSpan]
+                        + nrsSpan[MixingFlag][iSpan] * q_SpanCurrent[MixingFlag][IW][iSpan];
+
+                    RDouble avgRho = half * (q_SpanCurrent[MixingFlag][IR][iSpan] + q_SpanTarget[TargetFlag][IR][iSpan]);
+                    RDouble avgP = half * (q_SpanCurrent[MixingFlag][IP][iSpan] + q_SpanTarget[TargetFlag][IP][iSpan]);
+
+                    RDouble c = sqrt(refGama * (avgP / avgRho));
+
+                    RDouble rhoc = half * (q_SpanCurrent[MixingFlag][IR][iSpan] + q_SpanTarget[TargetFlag][IR][iSpan]) * c;
+
+                    if (vn > 0)
+                    {
+                        for (int m = 0; m < nEquation; m++)
+                        {
+                            dcTransSpan[MixingFlag][m][iSpan] = rhoc * dqTransSpanEx[MixingFlag][m][iSpan];
+                        }
+                    }
+                    else
+                    {
+                        for (int m = 0; m < nEquation; m++)
+                        {
+                            dcTransSpan[MixingFlag][m][iSpan] = rhoc * dqTransSpanIn[MixingFlag][m][iSpan];
+                        }
+                    }
+
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        deltaQTrans[m] = dcTransSpan[MixingFlag][m][iSpan] / rhoc;
+                    }
+
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        qTransSpanNeighbor[MixingFlag][m][iSpan] = qTrans_SpanCurrent[MixingFlag][m][iSpan] + deltaQTrans[m];
+                    }
+                }
+            }
+        }
+    }
+    delete [] ExtraDqTrans;
+    delete [] deltaQTrans;
+}
+
+//! function to set radial profile of mixingin and mixingout.
+//! treat mixingin as a kind of inlet and treat mixing as a kind of outlet.
+void TransitionSolverUnstr::SetMixingPlaneData(Grid *grid)
+{
+    UnstructGrid *gridUnstruct = UnstructGridCast(grid);
+    UnstructBCSet *unstructBCSet = gridUnstruct->GetUnstructBCSet();
+
+    Param_TransitionSolver *parameters = GetControlParameters();
+    RDouble refPressure = parameters->GetRefDimensionalPressure();
+    RDouble refGama     = parameters->GetRefGama();
+    RDouble gama1       = refGama - 1;
+
+    RDouble **q           = reinterpret_cast< RDouble ** > (gridUnstruct->GetDataPtr("q"));
+    RDouble **qTransition = reinterpret_cast< RDouble ** > (gridUnstruct->GetDataPtr("q_transition"));
+
+    RDouble **r_ori    = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Face"));
+    RDouble **r_target = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Span"));
+
+    //! nSpan is the number of spanwise point to do data average
+    //! also interpolate data on these points.
+    //! nSpan is set to 50 temporary.
+    int nSpanSection = PHSPACE::GlobalDataBase::GetIntParaFromDB("nSpanSection");
+    RDouble nSpan = (RDouble)(nSpanSection);
+
+    RDouble *nxs, *nys, *nzs, *ns;
+
+    nxs = gridUnstruct->GetFaceNormalX();
+    nys = gridUnstruct->GetFaceNormalY();
+    nzs = gridUnstruct->GetFaceNormalZ();
+    ns = gridUnstruct->GetFaceArea();
+
+    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+    string MixingPlane[100];
+    GlobalDataBase::GetData("MixingPlane", &MixingPlane, PHSTRING, 2 * nTurboZone - 2);
+
+    RDouble *xfc = gridUnstruct->GetFaceCenterX();
+    RDouble *yfc = gridUnstruct->GetFaceCenterY();
+    RDouble *zfc = gridUnstruct->GetFaceCenterZ();
+
+    RDouble *xcc = gridUnstruct->GetCellCenterX();
+    RDouble *ycc = gridUnstruct->GetCellCenterY();
+    RDouble *zcc = gridUnstruct->GetCellCenterZ();
+
+    int **face2nodeArray = gridUnstruct->GetFace2NodeArray();
+    int * node_number_of_each_face = gridUnstruct->GetNodeNumberOfEachFace();
+
+    int *leftCellofFace = gridUnstruct->GetLeftCellOfFace();
+    int *rightCellofFace = gridUnstruct->GetRightCellOfFace();
+    int nTotalCell = gridUnstruct->GetNTotalCell();
+
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    int nEquation = GetNumberOfEquations();
+
+    using namespace IDX;
+
+    RDouble ***qTrans_Span   = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("qTrans_Span"));
+    RDouble ***qSpanNeighbor = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("qTransSpanNeighbor"));
+
+    int FlowDirection = -1;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+
+        int bcType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+
+        //! Parallel
+        int iTurboZone = gridUnstruct->GetOrdinaryGridIndex();
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = gridUnstruct->GetZoneID();
+        }
+
+        //! use new bcType to define mixing plane.
+        //! if (bcType == -1)
+        string MixingPlaneIn = "";
+        string MixingPlaneOut = "";
+
+        if (iTurboZone == 0)
+        {
+            MixingPlaneOut = MixingPlane[0];
+        }
+        else if (iTurboZone == nTurboZone)
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+        }
+        else
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+            MixingPlaneOut = MixingPlane[2 * iTurboZone];
+        }
+
+        if (bcName == MixingPlaneIn || bcName == MixingPlaneOut)
+        {
+            if (bcName == MixingPlaneIn)
+            {
+                FlowDirection = 0;
+            }
+            if (bcName == MixingPlaneOut)
+            {
+                FlowDirection = 1;
+            }
+            int MixingFlag = FlowDirection + iTurboZone * 10;
+
+            for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+            {
+                for (int m = 0; m < nEquation; m++)
+                {
+                    qTrans_Span[MixingFlag][m][iSpan] = qSpanNeighbor[MixingFlag][m][iSpan];
+                }
+            }
+
+            for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+            {
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    //! iFace is the face number in the set of faceIndex.
+                    int iFace = *iter;
+
+                    int le = leftCellofFace[iFace];
+                    int re = rightCellofFace[iFace];
+                    //! find face center that locate in target span.
+                    //! compute variable at each span.
+                    if (r_ori[MixingFlag][iFace] > r_target[MixingFlag][iSpan] && r_ori[MixingFlag][iFace] <= r_target[MixingFlag][iSpan + 1])
+                    {
+                        for (int m = 0; m < nEquation; m++)
+                        {
+                            qTransition[m][re] = qTrans_Span[MixingFlag][m][iSpan];
+                        }
+                    }
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverUnstr::RotateVectorFromInterface(Grid *gridIn, const int &neighborZoneIndex, const int &nEquation)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    RDouble **rotTransitiongradValueX = reinterpret_cast <RDouble **> (grid->GetDataPtr("rotTransitiongradValueX"));
+    RDouble **rotTransitiongradValueY = reinterpret_cast <RDouble **> (grid->GetDataPtr("rotTransitiongradValueY"));
+    RDouble **rotTransitiongradValueZ = reinterpret_cast <RDouble **> (grid->GetDataPtr("rotTransitiongradValueZ"));
+
+    int iNeighborZone = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+
+    if (iNeighborZone = -1)
+    {
+        return;
+    }
+
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = interfaceInformation->GetFaceIndexForRecv(iNeighborZone);
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+    int* interFace2BoundaryFace = interfaceInformation->GetInterFace2BoundaryFace();
+
+    RDouble rotationAngle = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+    rotationAngle = rotationAngle * PI / 180.0;
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+
+    if (referenceFrame == ROTATIONAL_FRAME)
+    {
+        int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+        RDouble PeriodicRotationAngle[100];
+        GlobalDataBase::GetData("PeriodicRotationAngle", &PeriodicRotationAngle, PHDOUBLE, nTurboZone);
+
+        //! Parallel
+        int iTurboZone = grid->GetOrdinaryGridIndex();
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = grid->GetZoneID();
+        }
+        PeriodicRotationAngle[iTurboZone] = PeriodicRotationAngle[iTurboZone] * PI / 180.0;
+        rotationAngle = PeriodicRotationAngle[iTurboZone];
+    }
+
+    if (nEquation > 0)
+    {
+        RDouble **fieldRecvTransitionY = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTransitionY"));
+        RDouble **fieldRecvTransitionZ = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTransitionZ"));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++iLocalFace)
+            {
+                int t1;
+                int iFace = interfaceIndexContainerForReceive[iLocalFace];
+                grid->GetTargetIndex(iFace, 1, t1);
+
+                int iBFace = interFace2BoundaryFace[iFace];
+                UnstructBC *bcregion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iBFace]);
+                string bcName = bcregion->GetBCName();
+
+                if (referenceFrame == ROTATIONAL_FRAME)
+                {
+                    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+                    string Periodic_Name[100];
+                    GlobalDataBase::GetData("Periodic_Name", &Periodic_Name, PHSTRING, 2 * nTurboZone);
+
+                    //! Parallel
+                    int iTurboZone = grid->GetOrdinaryGridIndex();
+                    //! Serial
+                    if (iTurboZone == -1)
+                    {
+                        iTurboZone = grid->GetZoneID();
+                    }
+
+                    //! need loop over bcregions
+                    if (bcName == Periodic_Name[2 * iTurboZone])
+                    {
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            rotTransitiongradValueY[m][t1] = fieldRecvTransitionY[m][t1] * cos(2 * PI - rotationAngle) - fieldRecvTransitionZ[m][t1] * sin(2 * PI - rotationAngle);
+                            rotTransitiongradValueZ[m][t1] = fieldRecvTransitionY[m][t1] * sin(2 * PI - rotationAngle) + fieldRecvTransitionZ[m][t1] * cos(2 * PI - rotationAngle);
+                        }
+
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            fieldRecvTransitionY[m][t1] = rotTransitiongradValueY[m][t1];
+                            fieldRecvTransitionZ[m][t1] = rotTransitiongradValueZ[m][t1];
+                        }
+                    }
+                    else if (bcName == Periodic_Name[2 * iTurboZone + 1])
+                    {
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            rotTransitiongradValueY[m][t1] = fieldRecvTransitionY[m][t1] * cos(rotationAngle) - fieldRecvTransitionZ[m][t1] * sin(rotationAngle);
+                            rotTransitiongradValueZ[m][t1] = fieldRecvTransitionY[m][t1] * sin(rotationAngle) + fieldRecvTransitionZ[m][t1] * cos(rotationAngle);
+                        }
+
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            fieldRecvTransitionY[m][t1] = rotTransitiongradValueY[m][t1];
+                            fieldRecvTransitionZ[m][t1] = rotTransitiongradValueZ[m][t1];
+                        }
+                    }
+                }
+
+                else
+                {
+                    //! need loop over bcregions
+                    if (bcName == "Periodic_up")
+                    {
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            rotTransitiongradValueY[m][t1] = fieldRecvTransitionY[m][t1] * cos(2 * PI - rotationAngle) - fieldRecvTransitionZ[m][t1] * sin(2 * PI - rotationAngle);
+                            rotTransitiongradValueZ[m][t1] = fieldRecvTransitionY[m][t1] * sin(2 * PI - rotationAngle) + fieldRecvTransitionZ[m][t1] * cos(2 * PI - rotationAngle);
+                        }
+
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            fieldRecvTransitionY[m][t1] = rotTransitiongradValueY[m][t1];
+                            fieldRecvTransitionZ[m][t1] = rotTransitiongradValueZ[m][t1];
+                        }
+                    }
+                    else if (bcName == "Periodic_down")
+                    {
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            rotTransitiongradValueY[m][t1] = fieldRecvTransitionY[m][t1] * cos(rotationAngle) - fieldRecvTransitionZ[m][t1] * sin(rotationAngle);
+                            rotTransitiongradValueZ[m][t1] = fieldRecvTransitionY[m][t1] * sin(rotationAngle) + fieldRecvTransitionZ[m][t1] * cos(rotationAngle);
+                        }
+
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            fieldRecvTransitionY[m][t1] = rotTransitiongradValueY[m][t1];
+                            fieldRecvTransitionZ[m][t1] = rotTransitiongradValueZ[m][t1];
+                        }
+                    }
+                }
+            }
+        }
+    }
+}
+
+void TransitionSolverUnstr::GetGradientField(Grid *gridIn)
+{
+    UnstructGrid *gridUnstruct = UnstructGridCast(gridIn);
+    int numberOfEquations = this->GetNumberOfEquations();
+
+    RDouble **gradientTransitionX = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradTransitionX"));
+    RDouble **gradientTransitionY = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradTransitionY"));
+    RDouble **gradientTransitionZ = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradTransitionZ"));
+    RDouble **qTransitionNode = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("qTransitionNode"));
+    RDouble **qTransition = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("q_transition"));
+
+    for (int m = 0; m < numberOfEquations; ++ m)
+    {
+        string gradientName = GlobalDataBase::GetStrParaFromDB("gradientName");
+        if (gradientName == "ggnode" || gradientName == "ggnodelaplacian")
+        {
+            gridUnstruct->CompGradientGGNode_NEW(qTransition[m], qTransitionNode[m], gradientTransitionX[m], gradientTransitionY[m], gradientTransitionZ[m]);
+        }
+        else if (gradientName == "ggcell")
+        {
+            gridUnstruct->CompGradientGGCell(qTransition[m], gradientTransitionX[m], gradientTransitionY[m], gradientTransitionZ[m]);
+        }
+        else if (gradientName == "lsq")
+        {
+            gridUnstruct->CompGradientLSQ(qTransition[m], gradientTransitionX[m], gradientTransitionY[m], gradientTransitionZ[m]);
+        }
+        else if (gradientName == "ggnode_weight")
+        {
+            gridUnstruct->CompGradientGGNodeWeight(qTransition[m], gradientTransitionX[m], gradientTransitionY[m], gradientTransitionZ[m]);
+        }
+        else if (gradientName == "gg_m2")
+        {
+            gridUnstruct->CompGradientGGModified2(qTransition[m], gradientTransitionX[m], gradientTransitionY[m], gradientTransitionZ[m]);
+        }
+        else if (gradientName == "ggcellnew")
+        {
+            gridUnstruct->CompGradientGGCellNew(qTransition[m], gradientTransitionX[m], gradientTransitionY[m], gradientTransitionZ[m]);
+        }
+        else if (gradientName == "ggcellw")
+        {
+            gridUnstruct->CompGradientGGCellW(qTransition[m], gradientTransitionX[m], gradientTransitionY[m], gradientTransitionZ[m]);
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("No reconstruction method has been choosed ! /n");
+        }
+    }
+}
+
+LIB_EXPORT void TransitionSolverUnstr::InitControlParameters()
+{
+    FreeControlParameters();
+    controlParameters = new Param_TransitionSolver();
+    controlParameters->Init();
+
+    //! Compute machin zero. reference from cfl3d.
+    machZeroExp = 1;
+    RDouble add, x11;
+    RDouble compare = 1.0;
+    for (int iCount = 0; iCount < 20; ++ iCount)
+    {
+        add = 1.0;
+        for (int n = 0; n < iCount + 1; ++ n)
+        {
+            add = add * 0.1;
+        }
+
+        x11 = compare + add;
+        if (x11 == compare)
+        {
+            machZeroExp = iCount + 1;
+            break;
+        }
+    }
+}
+
+LIB_EXPORT Param_TransitionSolver *TransitionSolverUnstr::GetControlParameters()
+{
+    return static_cast<Param_TransitionSolver *>(controlParameters);
+}
+
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/src/TurbSolver.cpp b/CFD/TurbSolver/src/TurbSolver.cpp
new file mode 100644
index 0000000..88bdf0c
--- /dev/null
+++ b/CFD/TurbSolver/src/TurbSolver.cpp
@@ -0,0 +1,364 @@
+#include "TurbSolver.h"
+#include "Constants.h"
+#include "TK_Exit.h"
+#include "TK_Log.h"
+
+namespace PHSPACE
+{
+
+void Turb_MxDQ(RDouble *mat,RDouble *dq,int numberOfTurbulenceEquation, RDouble *df)
+{
+    for (int m = 0; m < numberOfTurbulenceEquation; ++ m)
+    {
+        df[m] = mat[m] * dq[m];
+    }
+}
+
+TurbSolver::TurbSolver()
+{
+}
+
+TurbSolver::~TurbSolver()
+{
+}
+
+string TurbSolver::CastName(const string &name)
+{
+    if (name == "res")
+    {
+        return "res_turb";
+    }
+    else if (name == "q")
+    {
+        return "q_turb";
+    }
+
+    return name;
+}
+
+int TurbSolver::GetNumberOfEquations()
+{
+    Param_TurbSolver *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    return nTurbulenceEquation;
+}
+
+void TurbSolver::InitDependentVariables()
+{
+    Grid *fineGrid = GetGrid(0);
+    //! Don't be used for STRUCTGRID because of turb viscosity being stored.
+    //if (fineGrid->Type() != STRUCTGRID)
+    //{
+    //    ComputeViscousCoeff(fineGrid);
+    //}
+
+    ComputeQTurbNodeValue(fineGrid);
+}
+
+void TurbSolver::InitCoarseGridsFlow()
+{
+}
+
+void TurbSolver::Action(ActionKey *actkey)
+{
+    CFDSolver::Action(actkey);
+}
+
+void TurbSolver::FillActionKey(ActionKey *actkey, int action, int level)
+{
+    actkey->action   = action;
+    actkey->solver   = TURBULENCE;
+    actkey->solverID = this->GetIndex();
+    actkey->kind     = SOLVER_BASED;
+    actkey->level    = level;
+}
+
+void TurbSolver::Solve()
+{
+    int outnstep = 0;
+    //! Get iteration and zonal number.
+    GlobalDataBase::GetData("outnstep", &outnstep, PHINT, 1);
+
+    Grid *grid = GetGrid(0);
+
+    //! Zero the residuals of the finest grid.
+    ZeroResiduals(grid);
+
+    //! Solve NS for all grids starting from the finest grid.
+    SolveOnGrid(grid);
+
+    CommunicationInterfaceData();
+
+    InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+    if (interpointInformation)
+    {
+        CommunicationInterpointData();
+    }
+    GlobalDataBase::UpdateData("outnstep", &outnstep, PHINT, 1);
+
+    int intervalStepFlow = 100;
+    GlobalDataBase::GetData("intervalStepFlow", &intervalStepFlow, PHINT, 1);
+
+    if (outnstep % intervalStepFlow == 0)
+    {
+        //! To dump restart data for continual simulation.
+        ActionKey *actkeyDumpRestartData = new ActionKey();
+        FillActionKey(actkeyDumpRestartData, DUMP_RESTART, 0);
+        DumpRestartData(actkeyDumpRestartData);
+        delete actkeyDumpRestartData;
+    }
+
+    int intervalStepRes;
+    GlobalDataBase::GetData("intervalStepRes", &intervalStepRes, PHINT, 1);
+    if (outnstep % intervalStepRes == 0)
+    {
+        //! To dump residual data.
+        ActionKey *actkeyDumpResidual = new ActionKey();
+        FillActionKey(actkeyDumpResidual, DUMP_RESIDUAL, 0);
+        DumpResidual(actkeyDumpResidual);
+        delete actkeyDumpResidual;
+    }
+}
+
+void TurbSolver::PostSolve(Grid *grid_in, int stage, int level)
+{
+    CommunicationInterfaceData();
+}
+
+void TurbSolver::DumpResultFile(Grid *grid, int level)
+{
+    int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int intervalStepFlow = GlobalDataBase::GetIntParaFromDB("intervalStepFlow");
+
+    bool isSubIterationDump = true; //! It is true default in steady simulations.
+
+    Param_TurbSolver *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        GlobalDataBase::GetData("isSubIterationDump", &isSubIterationDump, PHBOOL, 1);
+    }
+
+    int nProtectData = 0;
+    if(GlobalDataBase::IsExist("nProtectData", PHINT, 1))
+    {
+        nProtectData = GlobalDataBase::GetIntParaFromDB("nProtectData");
+    }
+
+    if (outnstep % intervalStepFlow == 0 && level == 0 && isSubIterationDump)
+    {
+
+        if(nProtectData ==0)
+        {
+            //! To dump restart data for continual simulation.
+            ActionKey *actkeyDumpRestartData = new ActionKey();
+            FillActionKey(actkeyDumpRestartData, DUMP_RESTART, 0);
+            DumpRestartData(actkeyDumpRestartData);
+            delete actkeyDumpRestartData;
+        }
+        else
+        {
+            int RestartFile = 0;
+            ActionKey *actkeyDumpRestartData = new ActionKey();
+            FillActionKey(actkeyDumpRestartData, DUMP_RESTART, level);
+            DumpTurbProtectData(actkeyDumpRestartData, RestartFile);
+            delete actkeyDumpRestartData;
+        
+            if(outnstep > 1)
+            {
+                if(RestartFile == 0)
+                {
+                    string path = "./results/turb1.dat";
+                    remove(path.c_str());
+
+                    if(PHMPI::IsParallelRun())
+                    {
+                        string path1 = "./results/turb1_0.dat";
+                        remove(path1.c_str());
+                    }
+                }
+
+                else if(RestartFile == 1)
+                {
+                    string path = "./results/turb0.dat";
+                    remove(path.c_str());
+
+                    if(PHMPI::IsParallelRun())
+                    {
+                        string path2 = "./results/turb0_0.dat";
+                        remove(path2.c_str());
+                    }
+                }
+            }
+        }
+    }
+
+    int intervalStepRes = GlobalDataBase::GetIntParaFromDB("intervalStepRes");
+    if (outnstep == 1 || outnstep % intervalStepRes == 0 && (!isUnsteady || !isSubIterationDump))
+    {
+        //! To dump residual data.
+        ActionKey * actkeyDumpResidual = new ActionKey();
+        FillActionKey(actkeyDumpResidual, DUMP_RESIDUAL, level);
+        DumpResidual(actkeyDumpResidual);
+        delete actkeyDumpResidual;
+    }
+}
+
+void TurbSolver::Post()
+{
+    //! To dump restart data for continual simulation.
+    ActionKey *actkeyDumpRestartData = new ActionKey();
+    FillActionKey(actkeyDumpRestartData, DUMP_RESTART, 0);
+    DumpRestartData(actkeyDumpRestartData);
+    delete actkeyDumpRestartData;
+}
+
+void TurbSolver::RegisterCFDSolverInterfaceField()
+{
+    Param_TurbSolver *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    
+    CFDSolver::RegisterInterfaceField("turb::q", PHDOUBLE, nTurbulenceEquation);
+
+    CFDSolver::RegisterInterfaceField("turb::dq", PHDOUBLE, nTurbulenceEquation);
+
+    CFDSolver::RegisterInterfaceField("turb::dqdx", PHDOUBLE, nTurbulenceEquation);
+    CFDSolver::RegisterInterfaceField("turb::dqdy", PHDOUBLE, nTurbulenceEquation);
+    CFDSolver::RegisterInterfaceField("turb::dqdz", PHDOUBLE, nTurbulenceEquation);
+
+    CFDSolver::RegisterInterfaceField("vist", PHDOUBLE, 1);
+    CFDSolver::RegisterInterfaceField("blend", PHDOUBLE, 1);
+}
+
+void TurbSolver::RegisterCFDSolverInterpointField()
+{
+    Param_TurbSolver *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    CFDSolver::RegisterInterpointField("qTurbNode", PHDOUBLE, nTurbulenceEquation);
+}
+
+void TurbSolver::RegisterOversetField()
+{
+    Param_TurbSolver *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    CFDSolver::RegisterOversetField("turb::q", PHDOUBLE, nTurbulenceEquation);
+}
+
+void TurbSolver::DeAllocateOversetInterfaceVar(Data_ParamFieldSuite *dataStore)
+{
+    RDouble **q = reinterpret_cast <RDouble **> (dataStore->GetDataPtr("turb::q"));
+    DelPointer2(q);
+}
+
+void TurbSolver::PrepareOversetInterfaceData(Data_ParamFieldSuite *datastore, InterfaceDataProxy *interfaceDataProxy)
+{
+    Param_TurbSolver *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (datastore->GetDataPtr("turb::q"));
+
+    vector<RDouble **> &vectorData = interfaceDataProxy->GetVectorData();
+    vector<int>   &vectorDimension = interfaceDataProxy->GetVectorDimension();
+
+    vectorDimension.push_back(nTurbulenceEquation);
+    vectorData.push_back(qTurbulence);
+}
+
+//! Drive functions to calculate residuals for different orders and dimensions.
+void TurbSolver::UpdateResiduals(Grid *grid)
+{
+    //! Set values for flow variables in ghost cells.
+    Boundary(grid);
+
+    //! Modify the variable value in the cell center with wall boundary face.
+    //ResetWallScalar(grid);
+
+    //! Zero the other variables of the grid.
+    InitSpectrum(grid);
+
+    //! Compute the source term.
+    SourceFlux(grid);
+
+    //! Compute the spectrum radius.
+    //Diagonal(grid);
+
+    //! Compute the inviscid flux.
+    InviscidFlux(grid);
+
+    //! Compute the viscous flux.
+    ViscousFlux(grid);
+
+    DualTimeSource(grid);
+
+    ZeroResidualOfSpecialCells(grid);       //! Added By Guo Yongheng 20160825.
+
+    ModifyResiduals(grid);
+
+    FreeGradientProxy(grid);
+}
+
+void TurbSolver::SourceFlux(Grid *grid)
+{
+    Param_TurbSolver *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+    if (viscousType == ONE_EQU)
+    {
+        //! One equation turbulence model.
+        SourceFluxOneEquation(grid);
+    }
+    else if (viscousType == TWO_EQU)
+    {
+        //! Two equation turbulence model.
+        SourceFluxTwoEquation(grid);
+    }
+}
+
+//! Compare the outnstep in the flowfield file between the NS and turbulence.
+void TurbSolver::CompareOutStepOfFlowfieldFile(int outnstepofNS, int outnstepofTurb) const
+{
+    if (outnstepofNS == outnstepofTurb) return;
+
+    ostringstream oss;
+    oss << "outnstepofNS   = " << outnstepofNS   << endl;
+    oss << "outnstepofTurb = " << outnstepofTurb << endl;
+    oss << "The NS flowfield file is not matched with the turbulence." << endl;
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (!isUnsteady)
+    {
+        oss << "Warning: Cluster writes files error! It needs more iteration step." << endl;
+        PrintToWindow(oss.str());
+        WriteLogFile (oss.str());
+
+        GlobalDataBase::UpdateData("outnstep", &outnstepofTurb, PHINT, 1);
+    }
+    else
+    {
+        TK_Exit::ExceptionExit("Error: Cluster writes files error! Please restart the calculation. \n");
+    }
+}
+
+//! Get the file name for Residual dumping.
+const string TurbSolver::GetResidualFileName()
+{
+    string turbresFile = "turbres.dat";
+    GlobalDataBase::GetData("turbresfile", &turbresFile, PHSTRING, 1);
+    return turbresFile;
+}
+
+//! Get the file name for relay calculation.
+const string TurbSolver::GetRestartFileName()
+{
+    string turbFile = "turb.dat";
+    GlobalDataBase::GetData("turbfile", &turbFile, PHSTRING, 1);
+    return turbFile;
+}
+
+LIB_EXPORT Param_TurbSolver *TurbSolver::GetControlParameters()
+{
+    return static_cast <Param_TurbSolver *> (controlParameters);
+}
+
+}
diff --git a/CFD/TurbSolver/src/TurbSolverStruct.cpp b/CFD/TurbSolver/src/TurbSolverStruct.cpp
new file mode 100644
index 0000000..ede2e94
--- /dev/null
+++ b/CFD/TurbSolver/src/TurbSolverStruct.cpp
@@ -0,0 +1,6275 @@
+#include <cmath>
+#include "TurbSolverStruct.h"
+#include "OversetGridFactory.h"
+#include "Geo_StructBC.h"
+#include "GradientOperation.h"
+#include "Math_Limiter.h"
+#include "TK_Exit.h"
+#include "Param_TurbSolverStruct.h"
+#include "Residual.h"
+#include "FieldProxy.h"
+#include "Glb_Dimension.h"
+#include "TK_Log.h"
+#include "IO_FileName.h"
+#include "Transition.h"
+#include <cstdio>
+#include <stdio.h>
+#include "TK_Time.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+TurbSolverStr::TurbSolverStr()
+{
+    DESLength = 0;
+    SSTLength = 0;
+}
+
+TurbSolverStr::~TurbSolverStr()
+{
+    DeAllocateGlobalVariables();
+
+    delete DESLength;
+    DESLength = NULL;
+
+    delete SSTLength;
+    SSTLength = NULL;
+
+    FreeControlParameters();
+}
+
+void TurbSolverStr::AllocateGlobalVar(Grid *gridIn)
+{
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    int viscoueType = parameters->GetViscousType();
+
+    if (nTurbulenceEquation == 0)
+    {
+        return;
+    }
+
+    int transitionType = parameters->GetTransitionType();
+    int isWennScheme = parameters->GetWennSchemeFlag();
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    if (isWennScheme == 1)
+    {
+        GetRange(ni, nj, nk, -3, 2, I, J, K);
+    }
+
+    Range IFACE, JFACE, KFACE;
+    GetRange(ni, nj, nk, -2, 2, IFACE, JFACE, KFACE);
+
+    Range M(0, nTurbulenceEquation - 1);
+
+    RDouble4D *qTurbulence = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *residualTurbulence = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *spectrumTurbulence = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *spectrumTurbulence0 = new RDouble4D(I, J, K, M, fortranArray);
+
+    grid->UpdateDataPtr("q_turb", qTurbulence);    //! Unknown variable of turbulent model.
+    grid->UpdateDataPtr("res_turb", residualTurbulence);    //! Residual or right-hand side.
+    grid->UpdateDataPtr("spec_turb", spectrumTurbulence);    //! Spectral radius of turbulent model.
+    grid->UpdateDataPtr("spec_turb0", spectrumTurbulence0);    //! Spectral radius of turbulent model.
+
+    RDouble4D *gradTurbulenceX = new RDouble4D(IFACE, JFACE, KFACE, M, fortranArray);
+    RDouble4D *gradTurbulenceY = new RDouble4D(IFACE, JFACE, KFACE, M, fortranArray);
+    RDouble4D *gradTurbulenceZ = new RDouble4D(IFACE, JFACE, KFACE, M, fortranArray);
+    grid->UpdateDataPtr("gradTurbulenceX", gradTurbulenceX);    //! Gradient of unknown variable at face, for x direction. in x-face.
+    grid->UpdateDataPtr("gradTurbulenceY", gradTurbulenceY);    //! Gradient of unknown variable at face, for y direction. in y-face.
+    grid->UpdateDataPtr("gradTurbulenceZ", gradTurbulenceZ);    //! Gradient of unknown variable at face, for z direction. in z-face.
+
+    RDouble4D *gradTurbulenceCellCenterX = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *gradTurbulenceCellCenterY = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *gradTurbulenceCellCenterZ = new RDouble4D(I, J, K, M, fortranArray);
+    grid->UpdateDataPtr("gradTurbulenceCellCenterX", gradTurbulenceCellCenterX);    //! Gradient of unknown variable at cell-center in x-direction.
+    grid->UpdateDataPtr("gradTurbulenceCellCenterY", gradTurbulenceCellCenterY);    //! Gradient of unknown variable at cell-center in y-direction.
+    grid->UpdateDataPtr("gradTurbulenceCellCenterZ", gradTurbulenceCellCenterZ);    //! Gradient of unknown variable at cell-center in z-direction.
+
+    //! Temporary variable for periodic boundary condition.
+    RDouble4D *rotTurbgradValueX = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *rotTurbgradValueY = new RDouble4D(I, J, K, M, fortranArray);
+    RDouble4D *rotTurbgradValueZ = new RDouble4D(I, J, K, M, fortranArray);
+    grid->UpdateDataPtr("rotTurbgradValueX", rotTurbgradValueX);
+    grid->UpdateDataPtr("rotTurbgradValueY", rotTurbgradValueY);
+    grid->UpdateDataPtr("rotTurbgradValueZ", rotTurbgradValueZ);
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble4D *qTurbUnsteadyn1 = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *qTurbUnsteadyn2 = new RDouble4D(I, J, K, M, fortranArray);
+
+        RDouble4D *residualTurbUnsteadyn1 = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *residualTurbUnsteadyn2 = new RDouble4D(I, J, K, M, fortranArray);
+
+        //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+        RDouble4D *residualTurbUnsteadyTemporary = new RDouble4D(I, J, K, M, fortranArray);
+
+        grid->UpdateDataPtr("q_turb_unsteady_n1", qTurbUnsteadyn1);
+        grid->UpdateDataPtr("q_turb_unsteady_n2", qTurbUnsteadyn2);
+        grid->UpdateDataPtr("res_turb_unsteady_n1", residualTurbUnsteadyn1);
+        grid->UpdateDataPtr("res_turb_unsteady_n2", residualTurbUnsteadyn2);
+        grid->UpdateDataPtr("res_turb_unsteady_tmp", residualTurbUnsteadyTemporary);
+
+        //! Statistical variables for DES simulation.
+        int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+        if (ifStaticsFlowField > 0)
+        {
+            RDouble4D *qAverageTurb = new RDouble4D(I, J, K, M, fortranArray);
+            grid->UpdateDataPtr("qAverage_turb", qAverageTurb);
+        }
+    }
+
+    if (viscoueType == 4)
+    {
+        RDouble3D *cross = new RDouble3D(I, J, K, fortranArray);
+        grid->UpdateDataPtr("cross", cross);    //! For the crossing term in two equation turbulence model.
+        RDouble3D *blend = new RDouble3D(I, J, K, fortranArray);
+        grid->UpdateDataPtr("blend", blend);    //! For blending function F1.
+        RDouble3D *SST_F2 = new RDouble3D(I, J, K, fortranArray);
+        grid->UpdateDataPtr("SST_F2", SST_F2);  //! For blending function F2.
+
+        if (transitionType == IREGAMA)
+        {
+            RDouble3D *SpSdRatio = new RDouble3D(I, J, K, fortranArray);  //! SpSdRatio.
+            grid->UpdateDataPtr("SpSdRatio", SpSdRatio);
+            RDouble3D *gamaeff = new RDouble3D(I, J, K, fortranArray);  //! gamaeff.
+            grid->UpdateDataPtr("gamaeff", gamaeff);
+            RDouble3D *rescf = new RDouble3D(I, J, K, fortranArray);  //! rescf.
+            grid->UpdateDataPtr("rescf", rescf);
+        }
+    }
+
+    int numberOfDimensions = GetDim();
+    Range D(1, numberOfDimensions);
+
+    RDouble5D *matrixTurbLeft, *matrixTurbRight;
+
+    matrixTurbLeft = new RDouble5D(I, J, K, M, D, fortranArray);
+    matrixTurbRight = new RDouble5D(I, J, K, M, D, fortranArray);
+
+    grid->UpdateDataPtr("mat_turbl", matrixTurbLeft);
+    grid->UpdateDataPtr("mat_turbr", matrixTurbRight);
+}
+
+void TurbSolverStr::DeAllocateGlobalVar(Grid *gridIn)
+{
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    int viscoueType = parameters->GetViscousType();
+    if (nTurbulenceEquation == 0)
+    {
+        return;
+    }
+
+    int transitionType = parameters->GetTransitionType();
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D *qTurbulence = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble4D *residualTurbulence = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+    RDouble4D *spectrumTurbulence = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_turb"));
+    RDouble4D *spectrumTurbulence0 = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_turb0"));
+
+    delete qTurbulence;
+    delete residualTurbulence;
+    delete spectrumTurbulence;
+    delete spectrumTurbulence0;
+
+    RDouble4D *gradTurbulenceX = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceX"));
+    RDouble4D *gradTurbulenceY = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceY"));
+    RDouble4D *gradTurbulenceZ = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceZ"));
+
+    delete gradTurbulenceX;
+    delete gradTurbulenceY;
+    delete gradTurbulenceZ;
+
+    RDouble4D *gradTurbulenceCellCenterX = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceCellCenterX"));
+    RDouble4D *gradTurbulenceCellCenterY = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceCellCenterY"));
+    RDouble4D *gradTurbulenceCellCenterZ = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceCellCenterZ"));
+
+    delete gradTurbulenceCellCenterX;
+    delete gradTurbulenceCellCenterY;
+    delete gradTurbulenceCellCenterZ;
+
+    RDouble4D *rotTurbgradValueX = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotTurbgradValueX"));
+    RDouble4D *rotTurbgradValueY = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotTurbgradValueY"));
+    RDouble4D *rotTurbgradValueZ = reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotTurbgradValueZ"));
+    delete rotTurbgradValueX;
+    delete rotTurbgradValueY;
+    delete rotTurbgradValueZ;
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble4D *qTurbUnsteadyn1 = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n1"));
+        RDouble4D *qTurbUnsteadyn2 = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n2"));
+        RDouble4D *residualTurbUnsteadyn1 = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_n1"));
+        RDouble4D *residualTurbUnsteadyn2 = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_n2"));
+
+        //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+        RDouble4D *residualTurbUnsteadyTemporary = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_tmp"));
+
+        delete qTurbUnsteadyn1;
+        delete qTurbUnsteadyn2;
+        delete residualTurbUnsteadyn1;
+        delete residualTurbUnsteadyn2;
+        delete residualTurbUnsteadyTemporary;
+
+        //! Statistical variables for DES simulation.
+        int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+        if (ifStaticsFlowField > 0)
+        {
+            RDouble4D *qAverageTurb = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("qAverage_turb"));
+            delete qAverageTurb;
+        }
+    }
+
+    if (viscoueType == 4)
+    {
+        RDouble3D *cross = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("cross"));
+        delete cross;
+        RDouble3D *blend = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("blend"));
+        delete blend;
+        RDouble3D *SST_F2 = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("SST_F2"));
+        delete SST_F2;
+        if (transitionType == IREGAMA)
+        {
+            RDouble3D *SpSdRatio = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("SpSdRatio"));
+            delete SpSdRatio;
+            RDouble3D *gamaeff = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("gamaeff"));
+            delete gamaeff;
+            RDouble3D *rescf = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("rescf"));
+            delete rescf;
+        }
+    }
+
+    RDouble5D *matrixTurbLeft, *matrixTurbRight;
+    matrixTurbLeft = reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_turbl"));
+    matrixTurbRight = reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_turbr"));
+
+    delete matrixTurbLeft;
+    delete matrixTurbRight;
+}
+
+bool TurbSolverStr::JudgeIfRestart()
+{
+    string turbFile = ".\results\turb.dat";
+    GlobalDataBase::GetData("turbfile", &turbFile, PHSTRING, 1);
+
+    if (PHMPI::IsParallelRun())
+    {
+        turbFile = PHSPACE::AddSymbolToFileName(turbFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(turbFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+bool TurbSolverStr::JudgeIfProtectedRestart()
+{
+    string protectionTurbFile0 = "./results/turb0.dat";
+    GlobalDataBase::GetData("protectionTurbFile0", &protectionTurbFile0, PHSTRING, 1);
+    if (PHMPI::IsParallelRun())
+    {
+        protectionTurbFile0 = PHSPACE::AddSymbolToFileName(protectionTurbFile0, "_", 0);
+    }
+
+    string protectionTurbFile1 = "./results/turb1.dat";
+    GlobalDataBase::GetData("protectionTurbFile1", &protectionTurbFile1, PHSTRING, 1);
+    if (PHMPI::IsParallelRun())
+    {
+        protectionTurbFile1 = PHSPACE::AddSymbolToFileName(protectionTurbFile1, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile_0(protectionTurbFile0.c_str(), ios::in);
+    if (infile_0)
+    {
+        restart_flag = true;
+        infile_0.close();
+        infile_0.clear();
+    }
+
+    ifstream infile_1(protectionTurbFile1.c_str(), ios::in);
+    if (infile_1)
+    {
+        restart_flag = true;
+        infile_1.close();
+        infile_1.clear();
+    }
+
+    return restart_flag;
+}
+
+bool TurbSolverStr::JudgeIfReadAverage()
+{
+    string turbFile = ".\results\turb.dat";
+    GlobalDataBase::GetData("turbfile", &turbFile, PHSTRING, 1);
+    string averageTurbFile = AddSymbolToFileName(turbFile, "_", "Average");
+
+    if (PHMPI::IsParallelRun())
+    {
+        averageTurbFile = PHSPACE::AddSymbolToFileName(averageTurbFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(averageTurbFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+void TurbSolverStr::InitFlowAsReadingProtectedRestart(ActionKey *actkey)
+{
+    int zoneIDofThisSolver = GetZoneLocalID();
+    if (zoneIDofThisSolver != 0)
+    {
+        //! Very Important: only the first zone on a processor need to implement the task.
+        //! other wise, the tasks would be implemented several times.
+        return;
+    }
+
+    using namespace PHMPI;
+    int RestartFile = 0;
+    string protectionTurbFile0 = "./results/turb0.dat";
+    GlobalDataBase::GetData("protectionTurbFile0", &protectionTurbFile0, PHSTRING, 1);
+
+    string protectionTurbFile1 = "./results/turb1.dat";
+    GlobalDataBase::GetData("protectionTurbFile1", &protectionTurbFile1, PHSTRING, 1);
+
+    if(PHMPI::IsParallelRun())
+    {
+        protectionTurbFile0 = PHSPACE::AddSymbolToFileName(protectionTurbFile0, "_", 0);
+        protectionTurbFile1 = PHSPACE::AddSymbolToFileName(protectionTurbFile1, "_", 0);
+    }
+
+    ifstream infile_0(protectionTurbFile0.c_str(), ios::in);
+    if (infile_0)
+    {
+        RestartFile = 0;
+    }
+
+    ifstream infile_1(protectionTurbFile1.c_str(), ios::in);
+    if (infile_1)
+    {
+        RestartFile = 1;
+    }
+
+    if(infile_0 && infile_1)     //If both flow0 and flow1 exist,determine which file to use by the last modified time.
+    {
+        RDouble TimeFile0, TimeFile1;
+        TIME_SPACE::GetFileModifiedTime(protectionTurbFile0, TimeFile0);
+        TIME_SPACE::GetFileModifiedTime(protectionTurbFile1, TimeFile1);
+        if(TimeFile0 < TimeFile1)
+        {
+            RestartFile = 0;
+        }
+        else if (TimeFile0 > TimeFile1)
+        {
+            RestartFile = 1;
+        }
+    }
+
+    if(RestartFile == 0)
+    {
+        actkey->filename = protectionTurbFile0;
+    }
+    else
+    {
+        actkey->filename = protectionTurbFile1;
+    }
+
+    if (actkey->filename == "")
+    {
+        return;
+    }
+
+    hid_t file;
+    file = OpenHDF5File(actkey->filename);
+    actkey->filepos = file;
+
+    int nZones = GetNumberofGlobalZones();
+    int currentProcessorID = GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int recvProcess = GetZoneProcessorID(iZone);
+
+        if (currentProcessorID == recvProcess)
+        {
+            CFDSolver *solver = static_cast <CFDSolver *> (GlobalSolvers::GetSolver(iZone, actkey->solverID));
+            solver->ReadRestartH5(actkey);
+        }
+    }
+
+    H5Fclose(file);
+    actkey->filepos = 0;
+}
+
+void TurbSolverStr::DumpRestart(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    Range M(0, nTurbulenceEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    int outerIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    DataContainer *dataContainer = actkey->GetData();
+    dataContainer->moveto_begin();
+    dataContainer->write(&outerIterStep, sizeof(int));
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+
+    for (int m = mst; m <= med; ++m)
+    {
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    dataContainer->write(&qTurbulence(i, j, k, m), sizeof(RDouble));
+                }
+            }
+        }
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble4D &qTurbUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n1"));
+        RDouble4D &qTurbUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n2"));
+
+        for (int m = mst; m <= med; ++m)
+        {
+            for (int k = kst; k <= ked; ++k)
+            {
+                for (int j = jst; j <= jed; ++j)
+                {
+                    for (int i = ist; i <= ied; ++i)
+                    {
+                        dataContainer->write(&qTurbUnsteadyn1(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+
+        for (int m = mst; m <= med; ++m)
+        {
+            for (int k = kst; k <= ked; ++k)
+            {
+                for (int j = jst; j <= jed; ++j)
+                {
+                    for (int i = ist; i <= ied; ++i)
+                    {
+                        dataContainer->write(&qTurbUnsteadyn2(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+
+        RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+        RDouble4D &residualTurbUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_n1"));
+        RDouble4D &residualTurbUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_n2"));
+
+        for (int m = mst; m <= med; ++m)
+        {
+            for (int k = kst; k <= ked; ++k)
+            {
+                for (int j = jst; j <= jed; ++j)
+                {
+                    for (int i = ist; i <= ied; ++i)
+                    {
+                        dataContainer->write(&residualTurbulence(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+
+        for (int m = mst; m <= med; ++m)
+        {
+            for (int k = kst; k <= ked; ++k)
+            {
+                for (int j = jst; j <= jed; ++j)
+                {
+                    for (int i = ist; i <= ied; ++i)
+                    {
+                        dataContainer->write(&residualTurbUnsteadyn1(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+
+        for (int m = mst; m <= med; ++m)
+        {
+            for (int k = kst; k <= ked; ++k)
+            {
+                for (int j = jst; j <= jed; ++j)
+                {
+                    for (int i = ist; i <= ied; ++i)
+                    {
+                        dataContainer->write(&residualTurbUnsteadyn2(i, j, k, m), sizeof(RDouble));
+                    }
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStr::DumpRestartH5(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int currentProcessorID = GetCurrentProcessorID();
+
+    int version = 1;
+    int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    if (currentProcessorID == GetServerProcessorID())
+    {
+        WriteData(actkey->filepos, &version, "Version");
+        WriteData(actkey->filepos, &outIterStep, "outnstep");
+
+        if (IsNeedStatistics())
+        {
+            int nStatisticalStep = 0;
+            GlobalDataBase::GetData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+            WriteData(actkey->filepos, &nStatisticalStep, "nStatisticalStep");
+        }
+    }
+
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    StructGrid *strGrid = StructGridCast(GetGrid(actkey->level));
+    int nTotalCell = strGrid->GetNTotalCell();
+
+        Param_TurbSolverStruct *parameters = GetControlParameters();
+        int isWennScheme = parameters->GetWennSchemeFlag();
+
+    int ist, ied, jst, jed, kst, ked;
+    strGrid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+        if (isWennScheme == 1)
+        {
+            strGrid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 3);
+        }
+
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    Range M(0, nTurbulenceEquation - 1);
+    int mst = M.first();
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &SpSdRatio = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("SpSdRatio"));
+    RDouble3D &gamaeff = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("gamaeff"));
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    WriteData(grploc, &nTotalCell, "nTotalCell");
+    WriteData(grploc, &qTurbulence(ist, jst, kst, mst), "q_turb");
+    WriteData(grploc, &viscousTurbulence(ist, jst, kst), "visturb");
+    int transitionType = GlobalDataBase::GetIntParaFromDB("transitionType");
+    if (transitionType == IREGAMA)
+    {
+        WriteData(grploc, &SpSdRatio(ist, jst, kst), "SpSdRatio");
+        WriteData(grploc, &gamaeff(ist, jst, kst), "gamaeff");
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady == 1)
+    {
+        RDouble4D &qTurbUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n1"));
+        WriteData(grploc, &qTurbUnsteadyn1(ist, jst, kst, mst), "q_turb_unsteady_n1");
+
+        RDouble4D &qTurbUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n2"));
+        WriteData(grploc, &qTurbUnsteadyn2(ist, jst, kst, mst), "q_turb_unsteady_n2");
+
+        RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+        WriteData(grploc, &residualTurbulence(ist, jst, kst, mst), "res_turb");
+
+        RDouble4D &residualTurbUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_n1"));
+        WriteData(grploc, &residualTurbUnsteadyn1(ist, jst, kst, mst), "res_turb_unsteady_n1");
+
+        RDouble4D &residualTurbUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_n2"));
+        WriteData(grploc, &residualTurbUnsteadyn2(ist, jst, kst, mst), "res_turb_unsteady_n2");
+
+        if (IsNeedStatistics())
+        {
+            RDouble4D &qAverageTurb = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage_turb"));
+            WriteData(grploc, &qAverageTurb(ist, jst, kst, mst), "qAverageTurb");
+        }
+    }
+
+    H5Gclose(grploc);
+}
+
+void TurbSolverStr::ReadRestartH5(ActionKey *actkey)
+{
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    StructGrid *strGrid = StructGridCast(GetGrid(actkey->level));
+    int nTotalCell = strGrid->GetNTotalCell();
+
+        Param_TurbSolverStruct *parameters = GetControlParameters();
+        int isWennScheme = parameters->GetWennSchemeFlag();
+
+    int ist, ied, jst, jed, kst, ked;
+    strGrid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+        if (isWennScheme == 1)
+        {
+            strGrid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 3);
+        }
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    Range M(0, nTurbulenceEquation - 1);
+    int mst = M.first();
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &SpSdRatio = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("SpSdRatio"));
+    RDouble3D &gamaeff = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("gamaeff"));
+
+    int outIterstepofNS = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int outIterStepofTurb = 0;
+    ReadData(actkey->filepos, &outIterStepofTurb, "outnstep");
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss << "Group" << gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    int nTotalCellRestart = 0;
+    ReadData(grploc, &nTotalCellRestart, "nTotalCell");
+    if (nTotalCellRestart != nTotalCell)
+    {
+        ostringstream erroeInfo;
+        erroeInfo << " Error: the cell number in turb.dat is not equal to the cell number in grid file !" << endl;
+        TK_Exit::ExceptionExit(erroeInfo.str());
+    }
+
+    ReadData(grploc, &qTurbulence(ist, jst, kst, mst), "q_turb");
+    ReadData(grploc, &viscousTurbulence(ist, jst, kst), "visturb");
+    int transitionType = GlobalDataBase::GetIntParaFromDB("transitionType");
+    if (transitionType == IREGAMA)
+    {
+        ReadData(grploc, &SpSdRatio(ist, jst, kst), "SpSdRatio");
+        ReadData(grploc, &gamaeff(ist, jst, kst), "gamaeff");
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble4D &qTurbUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n1"));
+        RDouble4D &qTurbUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n2"));
+        RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+        RDouble4D &residualTurbUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_n1"));
+        RDouble4D &residualTurbUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_n2"));
+        RDouble4D &qAverageTurb = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qAverage_turb"));
+
+        int ifStartFromSteadyResults = parameters->GetIfStartFromSteadyResults();
+
+        if (ifStartFromSteadyResults)
+        {
+            if (grid->GetGridID()->GetIndex() == 0)
+            {
+                PrintToWindow("Restart from steady Turbulence flow field, reset outer step to be zero!\n");
+            }
+
+            outIterStepofTurb = 0;
+            GlobalDataBase::UpdateData("outnstep", &outIterStepofTurb, PHINT, 1);
+
+            qTurbUnsteadyn1 = qTurbulence;
+            qTurbUnsteadyn2 = qTurbulence;
+
+            residualTurbulence = 0.0;
+            residualTurbUnsteadyn1 = 0.0;
+            residualTurbUnsteadyn2 = 0.0;
+        }
+        else
+        {
+            ReadData(grploc, &qTurbUnsteadyn1(ist, jst, kst, mst), "q_turb_unsteady_n1");
+            ReadData(grploc, &qTurbUnsteadyn2(ist, jst, kst, mst), "q_turb_unsteady_n2");
+            ReadData(grploc, &residualTurbulence(ist, jst, kst, mst), "res_turb");
+            ReadData(grploc, &residualTurbUnsteadyn1(ist, jst, kst, mst), "res_turb_unsteady_n1");
+            ReadData(grploc, &residualTurbUnsteadyn2(ist, jst, kst, mst), "res_turb_unsteady_n2");
+        }
+
+        int nStatisticalStep = 0;
+        int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+        int startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+        bool isReadAverageFlow = ifStaticsFlowField && (outIterStepofTurb >= startStatisticStep);
+        if (isReadAverageFlow)
+        {
+            if (ifStartFromSteadyResults)
+            {
+                qAverageTurb = qTurbulence;
+                GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+            }
+            else
+            {
+                ReadData(grploc, &qAverageTurb(ist, jst, kst, mst), "qAverageTurb");
+
+                ReadData(actkey->filepos, &nStatisticalStep, "nStatisticalStep");
+                GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+            }
+        }
+    }
+
+    H5Gclose(grploc);
+
+    CompareOutStepOfFlowfieldFile(outIterstepofNS, outIterStepofTurb);
+}
+
+void TurbSolverStr::ReadRestart(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+
+    Range M(0, nTurbulenceEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    DataContainer *dataContainer = actkey->GetData();
+    dataContainer->moveto_begin();
+    int outnstepofTurb = 0;
+    dataContainer->read(&outnstepofTurb, sizeof(int));
+
+    int outIterstepofNS = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    for (int m = mst; m <= med; ++m)
+    {
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    dataContainer->read(&qTurbulence(i, j, k, m), sizeof(RDouble));
+                }
+            }
+        }
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble4D &qTurbulencen1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n1"));
+        RDouble4D &qTurbulencen2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n2"));
+
+        RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+        RDouble4D &residualTurbulencen1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_n1"));
+        RDouble4D &residualTurbulencen2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_n2"));
+
+        int ifStartFromSteadyResults = parameters->GetIfStartFromSteadyResults();
+
+        if (ifStartFromSteadyResults)
+        {
+            if (grid->GetGridID()->GetIndex() == 0)
+            {
+                PrintToWindow("Restart from steady Turbulence flow field, reset outer step to be zero!\n");
+            }
+
+            //! Start from steady flow field.
+            //! Reset the outer step when start from steady flow.
+            outnstepofTurb = 0;
+            GlobalDataBase::UpdateData("outnstep", &outnstepofTurb, PHINT, 1);
+
+            qTurbulencen1 = qTurbulence;
+            qTurbulencen2 = qTurbulence;
+
+            residualTurbulence = 0.0;
+            residualTurbulencen1 = 0.0;
+            residualTurbulencen2 = 0.0;
+        }
+        else
+        {
+            //! Start from unsteady flow field.
+            for (int m = mst; m <= med; ++m)
+            {
+                for (int k = kst; k <= ked; ++k)
+                {
+                    for (int j = jst; j <= jed; ++j)
+                    {
+                        for (int i = ist; i <= ied; ++i)
+                        {
+                            dataContainer->read(&qTurbulencen1(i, j, k, m), sizeof(RDouble));
+                        }
+                    }
+                }
+            }
+
+            for (int m = mst; m <= med; ++m)
+            {
+                for (int k = kst; k <= ked; ++k)
+                {
+                    for (int j = jst; j <= jed; ++j)
+                    {
+                        for (int i = ist; i <= ied; ++i)
+                        {
+                            dataContainer->read(&qTurbulencen2(i, j, k, m), sizeof(RDouble));
+                        }
+                    }
+                }
+            }
+
+            for (int m = mst; m <= med; ++m)
+            {
+                for (int k = kst; k <= ked; ++k)
+                {
+                    for (int j = jst; j <= jed; ++j)
+                    {
+                        for (int i = ist; i <= ied; ++i)
+                        {
+                            dataContainer->read(&residualTurbulence(i, j, k, m), sizeof(RDouble));
+                        }
+                    }
+                }
+            }
+
+            for (int m = mst; m <= med; ++m)
+            {
+                for (int k = kst; k <= ked; ++k)
+                {
+                    for (int j = jst; j <= jed; ++j)
+                    {
+                        for (int i = ist; i <= ied; ++i)
+                        {
+                            dataContainer->read(&residualTurbulencen1(i, j, k, m), sizeof(RDouble));
+                        }
+                    }
+                }
+            }
+
+            for (int m = mst; m <= med; ++m)
+            {
+                for (int k = kst; k <= ked; ++k)
+                {
+                    for (int j = jst; j <= jed; ++j)
+                    {
+                        for (int i = ist; i <= ied; ++i)
+                        {
+                            dataContainer->read(&residualTurbulencen2(i, j, k, m), sizeof(RDouble));
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    CompareOutStepOfFlowfieldFile(outIterstepofNS, outnstepofTurb);
+}
+
+void TurbSolverStr::GetResidual(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    PHSPACE::ComputeResidualonGrid(grid, actkey, residualTurbulence, nTurbulenceEquation);
+}
+
+void TurbSolverStr::ZeroResiduals(Grid *gridIn)
+{
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    if (nTurbulenceEquation == 0)
+    {
+        return;
+    }
+
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (gridIn->GetDataPtr("res_turb"));
+    residualTurbulence = 0;
+}
+
+void TurbSolverStr::InitSpectrum(Grid *gridIn)
+{
+    RDouble4D &spectrumTurbulence = *reinterpret_cast<RDouble4D *> (gridIn->GetDataPtr("spec_turb"));
+    spectrumTurbulence = 0;
+}
+
+void TurbSolverStr::InitFlowAsRestart()
+{
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    if (nTurbulenceEquation == 0)
+    {
+        return;
+    }
+
+    StructGrid *grid = StructGridCast(GetGrid(0));
+
+    //int outIterStep = 0;
+    //GlobalDataBase::UpdateData("outnstep", &outIterStep, PHINT, 1);
+
+    RDouble *freeStreamTurbVar = parameters->GetFreeStreamTurbVar();
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    RDouble freeStreamViscosity = parameters->GetFreeStreamViscosity();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    Range M(0, nTurbulenceEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int m = mst; m <= med; ++m)
+    {
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    qTurbulence(i, j, k, m) = freeStreamTurbVar[m];
+                }
+            }
+        }
+    }
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                viscousTurbulence(i, j, k) = freeStreamViscosity;
+            }
+        }
+    }
+
+    int transitionType = GlobalDataBase::GetIntParaFromDB("transitionType");
+    if (transitionType == IREGAMA)
+    {
+        RDouble3D &SpSdRatio = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("SpSdRatio"));
+        SpSdRatio = 1.0;
+
+        RDouble3D &gamaeff = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("gamaeff"));
+        gamaeff = 0.0;
+    }
+
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble4D &qTurbUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n1"));
+        RDouble4D &qTurbUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n2"));
+
+        qTurbUnsteadyn1 = qTurbulence;
+        qTurbUnsteadyn2 = qTurbUnsteadyn1;
+
+        RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+        RDouble4D &residualTurbUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_n1"));
+        RDouble4D &residualTurbUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_n2"));
+
+        residualTurbulence = 0.0;
+        residualTurbUnsteadyn1 = 0.0;
+        residualTurbUnsteadyn2 = 0.0;
+
+        //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+        RDouble4D &residualTurbUnsteadyTemporary = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_tmp"));
+
+        residualTurbUnsteadyTemporary = 0.0;
+    }
+}
+
+void TurbSolverStr::FillField(Grid *gridIn, FieldProxy *fieldProxy, RDouble value)
+{
+    RDouble4D &field = fieldProxy->GetField_STR();
+
+    field = value;
+}
+
+void TurbSolverStr::FillField(Grid *gridIn, FieldProxy *fieldProxyTarget, FieldProxy *fieldProxySource)
+{
+    RDouble4D &fieldTarget = fieldProxyTarget->GetField_STR();
+    RDouble4D &fieldSource = fieldProxySource->GetField_STR();
+
+    fieldTarget = fieldSource;
+}
+
+FieldProxy *TurbSolverStr::CreateFieldProxy(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    int isWennScheme = parameters->GetWennSchemeFlag();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    if (isWennScheme == 1)
+    {
+        GetRange(ni, nj, nk, -3, 2, I, J, K);
+    }
+
+    Range M(0, nTurbulenceEquation - 1);
+
+    RDouble4D *field = new RDouble4D(I, J, K, M, fortranArray);
+
+    FieldProxy *fieldProxy = new FieldProxy();
+    fieldProxy->SetField_STR(field, true);
+    return fieldProxy;
+}
+
+FieldProxy *TurbSolverStr::CreateFlowFieldProxy(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int numberOfLaminar = GlobalDataBase::GetIntParaFromDB("nl");
+    int numberOfChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    int numberOfEquation = numberOfLaminar + numberOfChemical;
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+    Range M(0, numberOfEquation - 1);
+
+    RDouble4D *field = new RDouble4D(I, J, K, M, fortranArray);
+
+    FieldProxy *fieldProxy = new FieldProxy();
+    fieldProxy->SetField_STR(field, true);
+    return fieldProxy;
+}
+
+FieldProxy *TurbSolverStr::GetFieldProxy(Grid *gridIn, const string &fieldName)
+{
+    Grid *grid = gridIn;
+
+    RDouble4D *field = reinterpret_cast<RDouble4D *> (grid->GetDataPtr(fieldName));
+
+    FieldProxy *fieldProxy = new FieldProxy();
+
+    fieldProxy->SetField_STR(field);
+
+    return fieldProxy;
+}
+
+FieldProxy *TurbSolverStr::GetResidualProxy(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+
+    FieldProxy *residualProxy = new FieldProxy();
+
+    residualProxy->SetField_STR(&residualTurbulence);
+
+    return residualProxy;
+}
+
+void TurbSolverStr::StoreRhsByResidual(Grid *gridIn, FieldProxy *rightHandSideProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+
+    RDouble4D &rightHandSide = rightHandSideProxy->GetField_STR();
+
+    rightHandSide = residualTurbulence;
+}
+
+void TurbSolverStr::InitResidual(Grid *gridIn, FieldProxy *rightHandSideProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    Range M(0, nTurbulenceEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+    RDouble4D &rightHandSide = rightHandSideProxy->GetField_STR();
+
+    for (int m = mst; m <= med; ++m)
+    {
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    RDouble &resTurb = residualTurbulence(i, j, k, m);
+                    resTurb = -rightHandSide(i, j, k, m);
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStr::RecoverResidual(Grid *gridIn, FieldProxy *rightHandSideProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+    RDouble4D &rightHandSide = rightHandSideProxy->GetField_STR();
+
+    if (grid->GetLevel() != 0)
+    {
+        residualTurbulence = rightHandSide;
+    }
+}
+
+LIB_EXPORT void TurbSolverStr::InitControlParameters()
+{
+    FreeControlParameters();
+    controlParameters = new Param_TurbSolverStruct();
+    controlParameters->Init();
+}
+
+LIB_EXPORT Param_TurbSolverStruct *TurbSolverStr::GetControlParameters()
+{
+    return static_cast <Param_TurbSolverStruct *> (controlParameters);
+}
+
+void TurbSolverStr::LoadQ(Grid *gridIn, FieldProxy *qTrubProxy)
+{
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (gridIn->GetDataPtr("q_turb"));
+    RDouble4D &qTurbInProxy = qTrubProxy->GetField_STR();
+
+    qTurbInProxy = qTurbulence;
+}
+
+void TurbSolverStr::RungeKuttaResidual(Grid *gridIn, FieldProxy *dqTurbProxy, RDouble RKCoeff)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &dqTurb = dqTurbProxy->GetField_STR();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble3D &dt = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("dt"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    Range M(0, nTurbulenceEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int m = mst; m <= med; ++m)
+    {
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    RDouble &dq = dqTurb(i, j, k, m);
+                    dq *= dt(i, j, k) * RKCoeff;
+                }
+            }
+        }
+    }
+}
+
+//! Load rhs to residual res stored in grid.
+void TurbSolverStr::LoadResiduals(Grid *gridIn, FieldProxy *rightHandSideProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &rightHandSide = rightHandSideProxy->GetField_STR();
+
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    Range M(0, nTurbulenceEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int m = mst; m <= med; ++m)
+    {
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    RDouble &resTurb = residualTurbulence(i, j, k, m);
+                    resTurb = -rightHandSide(i, j, k, m);
+                }
+            }
+        }
+    }
+}
+
+RDouble TurbSolverStr::UnsteadyConvergence(Grid *gridIn)
+{
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        return zero;
+    }
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble4D &qTurbUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n1"));
+    RDouble4D &qTurbUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n2"));
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble *qTurb0 = new RDouble[nTurbulenceEquation];
+    RDouble *qTurb1 = new RDouble[nTurbulenceEquation];
+    RDouble *qTurb2 = new RDouble[nTurbulenceEquation];
+
+    RDouble *qTurbConserve0 = new RDouble[nTurbulenceEquation];
+    RDouble *qTurbConserve1 = new RDouble[nTurbulenceEquation];
+    RDouble *qTurbConserve2 = new RDouble[nTurbulenceEquation];
+
+    using namespace IDX;
+
+    RDouble summedPrimitive = zero;
+    RDouble summedConserve = zero;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                for (int m = 0; m < nTurbulenceEquation; ++m)
+                {
+                    qTurb0[m] = qTurbulence(i, j, k, m);
+                    qTurb1[m] = qTurbUnsteadyn1(i, j, k, m);
+                    qTurb2[m] = qTurbUnsteadyn2(i, j, k, m);
+                }
+
+                RDouble rho = 1.0;
+
+                if (nTurbulenceEquation >= 2)
+                {
+                    rho = qLaminar(i, j, k, IR);
+                }
+
+                for (int m = 0; m < nTurbulenceEquation; ++m)
+                {
+                    qTurbConserve0[m] = rho * qTurb0[m];
+                    qTurbConserve1[m] = rho * qTurb1[m];
+                    qTurbConserve2[m] = rho * qTurb2[m];
+                }
+
+                for (int m = 0; m < nTurbulenceEquation; ++m)
+                {
+                    RDouble dqTurbPseudo = residualTurbulence(i, j, k, m);           // qn+1, p+1 - qn+1, p
+                    RDouble dqTurbPhysical = qTurbConserve0[m] - qTurbConserve1[m];  // qn+1, p+1 - qn
+                    summedPrimitive += dqTurbPseudo * dqTurbPseudo;
+                    summedConserve += dqTurbPhysical * dqTurbPhysical;
+                }
+            }
+        }
+    }
+
+    delete[] qTurb0;    qTurb0 = NULL;
+    delete[] qTurb1;    qTurb1 = NULL;
+    delete[] qTurb2;    qTurb2 = NULL;
+    delete[] qTurbConserve0;    qTurbConserve0 = NULL;
+    delete[] qTurbConserve1;    qTurbConserve1 = NULL;
+    delete[] qTurbConserve2;    qTurbConserve2 = NULL;
+
+    RDouble unsteadyConvergence = sqrt(ABS(summedPrimitive / (summedConserve + SMALL)));
+    return unsteadyConvergence;
+}
+
+void TurbSolverStr::UpdateUnsteadyFlow(Grid *gridIn)
+{
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        return;
+    }
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    //! The volume at current timestep. If it is dualtime step method, it represents the volume at timestep of n+1.
+    RDouble3D &volume = grid->GetVolume(0);
+    //! The volume at timestep of n  .
+    RDouble3D &volumeUnsteadyn1 = grid->GetVolume(1);
+    //! The volume at timestep of n-1.
+    RDouble3D &volumeUnsteadyn2 = grid->GetVolume(2);
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble4D &qTurbUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n1"));
+    RDouble4D &qTurbUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n2"));
+
+    RDouble4D &residualTurbUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_n1"));
+    RDouble4D &residualTurbUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_n2"));
+    RDouble4D &residualTurbUnsteadyTemporary = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_tmp"));
+
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    qTurbUnsteadyn2 = qTurbUnsteadyn1;
+    qTurbUnsteadyn1 = qTurbulence;
+
+    volumeUnsteadyn2 = volumeUnsteadyn1;
+    volumeUnsteadyn1 = volume;
+
+    //! Here the current outnstep is over, the value of the stored resTmp should be assigned to resn1 for the next outnstep.
+    //! It should be noticed that residualUnsteadyTemporary only contain the inviscid and viscous flux.
+    residualTurbUnsteadyn2 = residualTurbUnsteadyn1;
+    residualTurbUnsteadyn1 = residualTurbUnsteadyTemporary;
+
+    //! Statistical variables for DES simulation.
+    int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+    if (ifStaticsFlowField > 0)
+    {
+        int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+        int startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+
+        if (outIterStep >= startStatisticStep)
+        {
+            int nStatisticalStep = GlobalDataBase::GetIntParaFromDB("nStatisticalStep");
+            RDouble statisticalTimePeriod = GlobalDataBase::GetDoubleParaFromDB("statisticalTimePeriod");
+            RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+            RDouble coeff1 = 1.0 / (nStatisticalStep * 1.0);
+            if (statisticalTimePeriod > 0.0)
+            {
+                coeff1 = MAX(coeff1, physicalTimeStep / statisticalTimePeriod);
+            }
+            RDouble coeff2 = 1.0 - coeff1;
+
+            RDouble4D &qAverageTurb = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("qAverage_turb"));
+
+            for (int k = kst; k <= ked; ++k)
+            {
+                for (int j = jst; j <= jed; ++j)
+                {
+                    for (int i = ist; i <= ied; ++i)
+                    {
+                        for (int m = 0; m < nTurbulenceEquation; ++m)
+                        {
+                            qAverageTurb(i, j, k, m) = coeff2 * qAverageTurb(i, j, k, m) + coeff1 * qTurbulence(i, j, k, m);
+                        }
+                    }
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStr::DualTimeSource(Grid *gridIn)
+{
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        return;
+    }
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble4D &qTurbUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n1"));
+    RDouble4D &qTurbUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb_unsteady_n2"));
+
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+    RDouble4D &residualTurbUnsteadyn1 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_n1"));
+    RDouble4D &residualTurbUnsteadyn2 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_n2"));
+    RDouble4D &residualTurbUnsteadyTemporary = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb_unsteady_tmp"));
+
+    //! The volume at current timestep. If it is dualtime step method, it represents the volume at timestep of n+1.
+    RDouble3D &volume = grid->GetVolume(0);
+    //! The volume at timestep of n  .
+    RDouble3D &volumeUnsteadyn1 = grid->GetVolume(1);
+    //! the volume at timestep of n-1.
+    RDouble3D &volumeUnsteadyn2 = grid->GetVolume(2);
+
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    //! The primitive variables.
+    RDouble *qTurbPrimtive0 = new RDouble[nTurbulenceEquation];
+    RDouble *qTurbPrimtive1 = new RDouble[nTurbulenceEquation];
+    RDouble *qTurbPrimtive2 = new RDouble[nTurbulenceEquation];
+
+    //! The conservative variables.
+    RDouble *qTurbConserve0 = new RDouble[nTurbulenceEquation];
+    RDouble *qTurbConserve1 = new RDouble[nTurbulenceEquation];
+    RDouble *qTurbConserve2 = new RDouble[nTurbulenceEquation];
+
+    //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux,
+    //! used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+    residualTurbUnsteadyTemporary = residualTurbulence;
+
+    //! Computation of dualtime coefficients, including three coefficients for Residual of R(p), R(n) and R(n-1);
+    //! and three coefficients for conservative variables of qcsv(p), qcsv(n), and qcsv(n-1).
+    RDouble dualTimeCoefficient[7];
+    const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+    ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+
+    RDouble dualTimeResC1 = dualTimeCoefficient[0];
+    RDouble dualTimeResC2 = dualTimeCoefficient[1];
+    RDouble dualTimeResC3 = dualTimeCoefficient[2];
+    RDouble dualTimeQC1 = dualTimeCoefficient[3];
+    RDouble dualTimeQC2 = dualTimeCoefficient[4];
+    RDouble dualTimeQC3 = dualTimeCoefficient[5];
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                for (int m = 0; m < nTurbulenceEquation; ++m)
+                {
+                    qTurbPrimtive0[m] = qTurbulence(i, j, k, m);
+                    qTurbPrimtive1[m] = qTurbUnsteadyn1(i, j, k, m);
+                    qTurbPrimtive2[m] = qTurbUnsteadyn2(i, j, k, m);
+                }
+
+                RDouble roe = 1.0;
+
+                if (nTurbulenceEquation >= 2)
+                {
+                    roe = qLaminar(i, j, k, IR);
+                }
+
+                for (int m = 0; m < nTurbulenceEquation; ++m)
+                {
+                    qTurbConserve0[m] = roe * qTurbPrimtive0[m];
+                    qTurbConserve1[m] = roe * qTurbPrimtive1[m];
+                    qTurbConserve2[m] = roe * qTurbPrimtive2[m];
+                }
+
+                for (int m = 0; m < nTurbulenceEquation; ++m)
+                {
+                    RDouble dualSrcRes = dualTimeResC1 * residualTurbulence(i, j, k, m) +
+                        dualTimeResC2 * residualTurbUnsteadyn1(i, j, k, m) +
+                        dualTimeResC3 * residualTurbUnsteadyn2(i, j, k, m);
+
+                    RDouble dualSrcQ = dualTimeQC1 * qTurbConserve0[m] * volume(i, j, k) +
+                        dualTimeQC2 * qTurbConserve1[m] * volumeUnsteadyn1(i, j, k) +
+                        dualTimeQC3 * qTurbConserve2[m] * volumeUnsteadyn2(i, j, k);
+
+                    residualTurbulence(i, j, k, m) = dualSrcRes + dualSrcQ;
+                }
+            }
+        }
+    }
+
+    delete[]qTurbPrimtive0;
+    delete[]qTurbPrimtive1;
+    delete[]qTurbPrimtive2;
+    delete[]qTurbConserve0;
+    delete[]qTurbConserve1;
+    delete[]qTurbConserve2;
+}
+
+RDouble TurbSolverStr::GetDistance(Grid *gridIn, int i, int j, int k)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int nk = grid->GetNK();
+
+    RDouble3D &xx = *grid->GetStructX();
+    RDouble3D &yy = *grid->GetStructY();
+    RDouble3D &zz = *grid->GetStructZ();
+
+    RDouble dx = xx(i + 1, j, k) - xx(i, j, k);
+    RDouble dy = yy(i + 1, j, k) - yy(i, j, k);
+    RDouble dz = zz(i + 1, j, k) - zz(i, j, k);
+
+    RDouble dsDirI = (dx * dx + dy * dy + dz * dz);
+
+    dx = xx(i, j + 1, k) - xx(i, j, k);
+    dy = yy(i, j + 1, k) - yy(i, j, k);
+    dz = zz(i, j + 1, k) - zz(i, j, k);
+
+    RDouble dsDirJ = (dx * dx + dy * dy + dz * dz);
+
+    RDouble dsDirK = 0.0;
+    if (nk == 1)
+    {
+        dsDirK = 0;
+    }
+    else
+    {
+        dx = xx(i, j, k + 1) - xx(i, j, k);
+        dy = yy(i, j, k + 1) - yy(i, j, k);
+        dz = zz(i, j, k + 1) - zz(i, j, k);
+        dsDirK = (dx * dx + dy * dy + dz * dz);
+    }
+
+    return sqrt(MAX(MAX(dsDirI, dsDirJ), dsDirK));
+
+}
+
+void TurbSolverStr::SourceFluxOneEquation(Grid *grid)
+{
+    ComputeLengthScaleofOneEquationModel(grid);
+
+    SourceFluxOneEquationOriginal(grid);
+}
+
+void TurbSolverStr::SourceFluxOneEquationOriginal(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble4D &spectrumTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_turb"));
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+    RDouble3D &viscousLaminar = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+
+    RDouble3D *lengthScale = this->GetLengthScale(gridIn);
+
+    RDouble3D &volume = *(grid->GetCellVolume());
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    //! von karman constant.
+    const RDouble karm = 0.41;
+    const RDouble cb1 = 0.1355;
+    const RDouble cb2 = 0.622;
+    const RDouble cv1 = 7.1;
+    const RDouble cw2 = 0.3;
+    const RDouble cw3 = 2.0;
+    const RDouble sigma = 2.0 / 3.0;
+
+    RDouble oSigma = one / sigma;
+    RDouble oKarmQuadratic = one / (karm * karm);
+    RDouble cw1 = cb1 * oKarmQuadratic + (one + cb2) / sigma;
+    RDouble cv13 = cv1 * cv1 * cv1;
+    RDouble cw32 = cw3 * cw3;
+    RDouble cw36 = cw32 * cw32 * cw32;
+    RDouble or6 = one / six;
+
+    int SAProductType = parameters->GetSAProductType();
+
+    using namespace IDX;
+
+    Range II, JJ, KK;
+    GetRange(ni, nj, nk, -2, 1, II, JJ, KK);
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    RDouble4D &gradTurbulenceCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceCellCenterX"));
+    RDouble4D &gradTurbulenceCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceCellCenterY"));
+    RDouble4D &gradTurbulenceCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceCellCenterZ"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble dudx = gradUVWTCellCenterX(i, j, k, 0);
+                RDouble dudy = gradUVWTCellCenterY(i, j, k, 0);
+                RDouble dudz = gradUVWTCellCenterZ(i, j, k, 0);
+
+                RDouble dvdx = gradUVWTCellCenterX(i, j, k, 1);
+                RDouble dvdy = gradUVWTCellCenterY(i, j, k, 1);
+                RDouble dvdz = gradUVWTCellCenterZ(i, j, k, 1);
+
+                RDouble dwdx = gradUVWTCellCenterX(i, j, k, 2);
+                RDouble dwdy = gradUVWTCellCenterY(i, j, k, 2);
+                RDouble dwdz = gradUVWTCellCenterZ(i, j, k, 2);
+
+                RDouble nu = qTurbulence(i, j, k, ISA);
+                RDouble vol = volume(i, j, k);
+                RDouble density = qLaminar(i, j, k, IR);
+                RDouble vislam = viscousLaminar(i, j, k);
+                RDouble dn = (*lengthScale)(i, j, k);
+
+                RDouble work1 = dudx + dvdy + dwdz;
+                RDouble work2 = dudx * dudx + dvdy * dvdy + dwdz * dwdz;
+                RDouble work3 = (dudy + dvdx) * (dudy + dvdx) +
+                    (dvdz + dwdy) * (dvdz + dwdy) +
+                    (dwdx + dudz) * (dwdx + dudz);
+                RDouble work4 = sqrt((dwdy - dvdz) * (dwdy - dvdz) +
+                    (dudz - dwdx) * (dudz - dwdx) +
+                    (dvdx - dudy) * (dvdx - dudy));
+
+                RDouble stp, str;
+                if (SAProductType == 1)
+                {
+                    //! Classical production (instead of rotational).
+                    stp = two * work2 + work3 - two3rd * work1 * work1;
+                    work4 = sqrt(ABS(stp));
+                }
+                else if (SAProductType == 4)
+                {
+                    //! Correction on the rotational production term for laminar vortex.
+                    stp = two * work2 + work3 - two3rd * work1 * work1;
+                    str = work4;
+                    work4 = str - two * MAX(zero, str - sqrt(ABS(stp)));
+                }
+                else if (SAProductType == 5)
+                {
+                    //! Higher correction on the rotational production term for laminar vortex.
+                    stp = two * work2 + work3 - two3rd * work1 * work1;
+                    str = work4;
+                    stp = ABS(stp);
+                    work4 = str * (one - MAX(zero, (str * str - stp) / (str * str + stp + SMALL)));
+                }
+
+                str = work4;
+
+                RDouble odnQuadratic = one / (dn * dn);
+                RDouble kyQuadratic = oKarmQuadratic * odnQuadratic;
+                RDouble oLam = one / (vislam / density);
+                RDouble ld = MAX(nu * oLam, 1E-20);
+                RDouble ld3 = POWER3(ld);
+                RDouble fv1 = ld3 / (ld3 + cv13);
+                RDouble fv2 = one - ld / (one + ld * fv1);
+                RDouble std = MAX(str + nu * fv2 * kyQuadratic * oRefReNumber, 1.E-20);
+                RDouble product = cb1 * std * nu;
+                RDouble dproduct_dnu = cb1 * str;
+
+                RDouble oostd = one / std;
+                RDouble nuQuadratic = nu * nu;
+                RDouble r = MIN(nu * oostd * kyQuadratic * oRefReNumber, 10.0);
+                RDouble r3 = POWER3(r);
+                RDouble r6 = r3 * r3;
+                RDouble g = r + cw2 * (r6 - r);
+                RDouble g3 = g * g * g;
+                RDouble g6 = g3 * g3;
+                g6 = MAX(g6, 1E-10);
+                RDouble fw = g * pow(static_cast<RDouble>((one + cw36) / (g6 + cw36)), static_cast<RDouble>(or6));
+                RDouble destruc = cw1 * fw * nuQuadratic * odnQuadratic * oRefReNumber;
+
+                RDouble ddestruc_dnu = two * (cw1 * fw - cb1 * oKarmQuadratic * fv2) * odnQuadratic * nu * oRefReNumber;
+                ddestruc_dnu = abs(ddestruc_dnu);
+
+                RDouble dkedx = gradTurbulenceCellCenterX(i, j, k, ISA);
+                RDouble dkedy = gradTurbulenceCellCenterY(i, j, k, ISA);
+                RDouble dkedz = gradTurbulenceCellCenterZ(i, j, k, ISA);
+                RDouble gradientQuadratic = dkedx * dkedx + dkedy * dkedy + dkedz * dkedz;
+                RDouble sdi = oSigma * cb2 * gradientQuadratic * oRefReNumber;
+                RDouble dsdi_dnu = 0.0;
+
+                RDouble &resTurb = residualTurbulence(i, j, k, ISA);
+                RDouble &spectTurb = spectrumTurbulence(i, j, k, ISA);
+                resTurb += (product - destruc + sdi) * vol;
+                spectTurb += (dproduct_dnu + ddestruc_dnu + dsdi_dnu) * vol;
+            }
+        }
+    }
+}
+
+//! Hekun test by using chant SA  source model.
+void TurbSolverStr::SourceFluxOneEquationNew(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble4D &spectrumTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_turb"));
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+    RDouble3D &viscousLaminar = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+
+    RDouble3D *lengthScale = this->GetLengthScale(gridIn);
+
+    RDouble3D &volume = *(grid->GetCellVolume());
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    //! von karman constant.
+    const RDouble karm = 0.41;
+    const RDouble cb1 = 0.1355;
+    const RDouble cb2 = 0.622;
+    const RDouble cv1 = 7.1;
+    const RDouble cw2 = 0.3;
+    const RDouble cw3 = 2.0;
+    const RDouble sigma = 2.0 / 3.0;
+
+    RDouble osigma = 1.0 / sigma;
+    RDouble okarm2 = one / (karm * karm);
+    RDouble cw1 = cb1 * okarm2 + (one + cb2) * osigma;
+    RDouble cv13 = cv1 * cv1 * cv1;
+    RDouble cw32 = cw3 * cw3;
+    RDouble cw36 = cw32 * cw32 * cw32;
+    RDouble cv2 = 5.0;
+
+    using namespace IDX;
+
+    Range II, JJ, KK;
+    GetRange(ni, nj, nk, -2, 1, II, JJ, KK);
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    RDouble4D &gradTurbulenceCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceCellCenterX"));
+    RDouble4D &gradTurbulenceCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceCellCenterY"));
+    RDouble4D &gradTurbulenceCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceCellCenterZ"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble dudx = gradUVWTCellCenterX(i, j, k, 0);
+                RDouble dudy = gradUVWTCellCenterY(i, j, k, 0);
+                RDouble dudz = gradUVWTCellCenterZ(i, j, k, 0);
+
+                RDouble dvdx = gradUVWTCellCenterX(i, j, k, 1);
+                RDouble dvdy = gradUVWTCellCenterY(i, j, k, 1);
+                RDouble dvdz = gradUVWTCellCenterZ(i, j, k, 1);
+
+                RDouble dwdx = gradUVWTCellCenterX(i, j, k, 2);
+                RDouble dwdy = gradUVWTCellCenterY(i, j, k, 2);
+                RDouble dwdz = gradUVWTCellCenterZ(i, j, k, 2);
+
+                RDouble work1 = dudx + dvdy + dwdz;
+                RDouble work2 = dudx * dudx + dvdy * dvdy + dwdz * dwdz;
+                RDouble work3 = (dudy + dvdx) * (dudy + dvdx) +
+                    (dvdz + dwdy) * (dvdz + dwdy) +
+                    (dwdx + dudz) * (dwdx + dudz);
+                RDouble work4 = sqrt((dwdy - dvdz) * (dwdy - dvdz) +
+                    (dudz - dwdx) * (dudz - dwdx) +
+                    (dvdx - dudy) * (dvdx - dudy));
+
+                RDouble stp = two * work2 + work3 - two3rd * work1 * work1;
+                RDouble str = work4;
+                work4 = str - two * MAX(zero, str - sqrt(ABS(stp)));
+                str = work4;
+                RDouble vtbar = qTurbulence(i, j, k, ISA);
+                RDouble vol = volume(i, j, k);
+
+                RDouble vsl = viscousLaminar(i, j, k);
+                RDouble rho = qLaminar(i, j, k, IR);
+                RDouble olam = rho / (vsl + SMALL);
+
+                RDouble dn = (*lengthScale)(i, j, k);
+
+                RDouble dn2 = dn * dn;
+                RDouble od2 = one / dn2;
+
+                //! Spalart mod. Use limited version of ld.
+                //! All the functions are well-behaved as ld -> 0.
+                RDouble ld = MAX(olam * vtbar, SMALL);
+                RDouble ld3 = POWER3(ld);
+                //! Spalart mod. New damping functions so Stilde is always positive.
+                RDouble fv1 = ld3 / (ld3 + cv13);
+                RDouble fvt = 1.0 / (1.0 + ld / cv2);
+                RDouble fv2 = POWER3(fvt);
+                RDouble fv3 = (1 + ld * fv1) / ld * (1 - fv2);
+                RDouble omg = str;
+
+                RDouble ki2 = karm * karm;
+                RDouble reki2dn2 = ki2 * dn2 * refReNumber;
+                RDouble sbar = fv3 * omg + vtbar / reki2dn2 * fv2;
+                sbar = MAX(sbar, SMALL);
+                RDouble std = sbar;
+                RDouble oostd = SIGN(one, std) / (ABS(std) + SMALL);
+                RDouble rbar = vtbar * oostd / reki2dn2;
+                rbar = MIN(rbar, 10.0);
+                RDouble rbar2 = rbar * rbar;
+                RDouble rbar5 = rbar2 * rbar2 * rbar;
+                RDouble gbar = MAX(rbar * (1.0 + cw2 * (rbar5 - 1.0)), SMALL);
+                RDouble g3 = POWER3(gbar);
+                RDouble g6 = g3 * g3;
+                g6 = MAX(g6, 1E-20);
+                RDouble fw = pow(static_cast<RDouble>((1.0 + cw36) / (1.0 + pow(cw3 / gbar, 6.0))), 1.0 / 6.0);
+                RDouble ft2 = 0.0;
+                RDouble cpmu = cb1 * (1.0 - ft2) * str;
+                RDouble cdmu = (cw1 * fw - cb1 * fv2 / ki2) * vtbar * od2 * oRefReNumber;
+
+                //! Calculate "negative" production term in order to assure a zero.
+                //! Solution in the laminar region.
+
+                RDouble srct = cpmu - cdmu;
+
+                RDouble dkedx = gradTurbulenceCellCenterX(i, j, k, ISA);
+                RDouble dkedy = gradTurbulenceCellCenterY(i, j, k, ISA);
+                RDouble dkedz = gradTurbulenceCellCenterZ(i, j, k, ISA);
+
+                //! Non linear diffusion term.
+                RDouble grd2 = dkedx * dkedx + dkedy * dkedy + dkedz * dkedz;
+                RDouble sdi = osigma * cb2 * grd2 * oRefReNumber;
+
+                RDouble &resTurb = residualTurbulence(i, j, k, ISA);
+                RDouble &spectTurb = spectrumTurbulence(i, j, k, ISA);
+                resTurb += (srct * vtbar + sdi) * vol;
+                spectTurb += (abs(cpmu) + 2.0 * abs(cdmu)) * vol;
+            }
+        }
+    }
+}
+
+void TurbSolverStr::Crossing(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &cross = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("cross"));
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+    RDouble4D &area = *(grid->GetFaceArea());
+    RDouble3D &volume = *(grid->GetCellVolume());
+
+    GreenGeo3D greenGeo3D;
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int ndim = GetDim();
+    int js = 1;
+    int ks = 1;
+    if (ndim == 2)
+    {
+        ks = 0;
+    }
+    if (ndim == 1)
+    {
+        js = 0;
+    }
+
+    RDouble dkedx, dkedy, dkedz, dkwdx, dkwdy, dkwdz;
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                Get_SPM(i, j, k, js, ks, ndim, &greenGeo3D, faceNormalComponentX, faceNormalComponentY, faceNormalComponentZ, area, volume);
+                DXDYDZ(qTurbulence, &greenGeo3D, i, j, k, js, ks, IDX::IKE, dkedx, dkedy, dkedz);
+                DXDYDZ(qTurbulence, &greenGeo3D, i, j, k, js, ks, IDX::IKW, dkwdx, dkwdy, dkwdz);
+                RDouble &crossCell = cross(i, j, k);
+                crossCell = dkedx * dkwdx + dkedy * dkwdy + dkedz * dkwdz;
+            }
+        }
+    }
+}
+
+void TurbSolverStr::Blending(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &viscousLaminar = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+
+    RDouble3D &cross = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("cross"));
+    RDouble3D &blend = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("blend"));
+
+    RDouble3D &walldist = *StructGridCast(grid)->GetWallDist();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+    RDouble oRefReNumberSqr = oRefReNumber * oRefReNumber;
+    int transitionType = parameters->GetTransitionType();
+
+    RDouble betas = 0.09;
+    RDouble sigw2 = 0.856;
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    using namespace IDX;
+
+    //! Compute maximum cross diffusion term across flowfield
+    RDouble cdkwmin = 1.0e-10;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble rho = qLaminar(i, j, k, IR);
+                RDouble ke = qTurbulence(i, j, k, IKE);
+                RDouble kw = qTurbulence(i, j, k, IKW);
+                RDouble crss = cross(i, j, k);
+
+                RDouble miuLam = viscousLaminar(i, j, k);
+                RDouble dist = walldist(i, j, k);
+                RDouble dist2 = dist * dist;
+
+                //calculate cd_kw
+                RDouble crossDiff = 2.0 * rho * sigw2 * crss / (kw + SMALL);
+
+                //! Original Menter CD_kw calculation.
+                RDouble cdkw = MAX(crossDiff, cdkwmin);
+
+                //! Calculate arg1.
+                RDouble term1 = sqrt(ABS(ke)) * oRefReNumber / (betas * dist * kw + SMALL);
+                RDouble term2 = 500.0 * miuLam * oRefReNumberSqr / (rho * kw * dist2 + SMALL);
+                RDouble term3 = MAX(term1, term2);
+                RDouble term4 = 4.0 * rho * sigw2 * ke / (cdkw * dist2 + SMALL);
+                RDouble arg1 = MIN(term3, term4);
+
+                //! Compute the blending function fbsl.
+                RDouble &blendCell = blend(i, j, k);
+                blendCell = tanh(static_cast<RDouble>(arg1 * arg1 * arg1 * arg1));
+                if (transitionType == IREGAMA)
+                {
+                    CorrectionOfBlendingFunctionInSST(rho, dist, miuLam, ke, refReNumber, blendCell);
+                }
+            }
+        }
+    }
+    grid->GhostCell3DExceptInterface(blend);
+    //GhostCell3D(blend, ni, nj, nk);
+    //PHSPACE::CommunicateInterfaceValue(grid, &blend, "blend");
+}
+
+void TurbSolverStr::SourceFluxTwoEquation(Grid *gridIn)
+{
+    //! This routine calculates the source terms relative to k and omega equations for k-omega
+    //! two-equation models.
+    StructGrid *grid = StructGridCast(gridIn);
+
+    ComputeLengthScaleofTwoEquationModel(grid);
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &qPrimitive = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble4D &spectrumTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_turb"));
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+
+    RDouble3D *lengthScale = this->GetLengthScaleSST();
+    RDouble3D *SSTLength = this->GetSSTLength();
+
+    RDouble3D &xc = *(grid->GetCellCenterX());
+    RDouble3D &vol = *(grid->GetCellVolume());
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+    RDouble refMaNumber = parameters->GetRefMachNumber();
+    string viscousName = parameters->GetViscousName();
+
+    int neasm = GlobalDataBase::GetIntParaFromDB("neasm");
+    int SSTProductType = parameters->GetSSTProductType();
+
+    //! To determine if DES used or not.
+    int isdes = 0;
+    isdes = parameters->GetDESType();
+
+    RDouble cdissk = 0.0, cdissw = 0.0;
+
+    //! To determine if compressible correction used or not.
+    int isCC = 0;
+    if (GlobalDataBase::IsExist("compressibleCorrection", PHINT, 1))
+    {
+        isCC = GlobalDataBase::GetIntParaFromDB("compressibleCorrection");
+    }
+
+    int freeturbIntensitySRModify = 0;
+    if (GlobalDataBase::IsExist("freeturbIntensitySRModify", PHINT, 1))
+    {
+        freeturbIntensitySRModify = GlobalDataBase::GetIntParaFromDB("freeturbIntensitySRModify");
+    }
+    double freeDecayXLocation = 0.0;
+    if (GlobalDataBase::IsExist("freeDecayXLocation", PHDOUBLE, 1))
+    {
+        freeDecayXLocation = GlobalDataBase::GetDoubleParaFromDB("freeDecayXLocation");
+    }
+
+    const RDouble a1 = 1.0, a2 = 0.4, a3 = 0.2, mt02 = 0.25 * 0.25;
+    RDouble mt2 = 0.0, sonicSpeedSQR = 0.0, f2mt2 = 0.0, a1f2mt2 = 0.0, pdbar = 0.0, prodk_cc = 0.0, prodw_cc = 0.0, dissk_cc = 0.0, dissw_cc = 0.0;
+    RDouble3D &gama = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("gama"));
+
+    RDouble cblend = 0.0, pressure = 0.0, density = 0.0, ke = 0.0, kw = 0.0;
+    RDouble sij2 = 0.0, divv = 0.0, prodk = 0.0, dissk = 0.0, prodw = 0.0, dissw = 0.0, cdkww = 0.0, crss = 0.0, mut = 0.0;
+    RDouble srck = 0.0, srcw = 0.0, volume = 0.0;
+    RDouble dudx0 = 0.0, dudy0 = 0.0, dudz0 = 0.0, dvdx0 = 0.0, dvdy0 = 0.0, dvdz0 = 0.0, dwdx0 = 0.0, dwdy0 = 0.0, dwdz0 = 0.0;
+    RDouble s11 = 0.0, s22 = 0.0, s33 = 0.0, s12 = 0.0, s13 = 0.0, s23 = 0.0, w12 = 0.0, w13 = 0.0, w23 = 0.0;
+    RDouble vort2 = 0.0;
+    RDouble cprodk = 0.0, cprodw = 0.0, ccdkww = 0.0, source_dk_neg = 0.0, source_dw_neg = 0.0;
+
+    RDouble turb_fbetas = 0.0, turb_fbeta = 0.0, turb_beta = 0.0, turb_alphaw = 0.0;
+
+    Range II, JJ, KK;
+    GetRange(ni, nj, nk, -2, 1, II, JJ, KK);
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    using namespace IDX;
+
+    RDouble3D &sourceEnergy = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("sengy"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble SpSdlimit = MIN(1.0 + 0.00075 * refMaNumber * refMaNumber * refMaNumber * refMaNumber, 1.2);
+
+    int transitionType = parameters->GetTransitionType();
+
+    RDouble *freeStreamTurbVar = parameters->GetFreeStreamTurbVar();
+
+    //! K-OMEGA MODELS
+    if (viscousName.substr(0, 6) == "2eq-kw")
+    {
+        //! MENTER'S K-OMEGA SST MODEL
+        if (viscousName.substr(0, 13) == "2eq-kw-menter")
+        {
+            //! Turbulence model constants
+            RDouble SSTProductLimit = parameters->GetSSTProductLimit();
+            GlobalDataBase::GetData("turb_fbetas", &turb_fbetas, PHDOUBLE, 1);
+            GlobalDataBase::GetData("turb_fbeta", &turb_fbeta, PHDOUBLE, 1);
+
+            RDouble SST_beta1 = parameters->GetSST_beta1();
+            RDouble SST_beta2 = parameters->GetSST_beta2();
+            RDouble SST_betaStar = parameters->GetSST_betaStar();
+            RDouble KW_sigmaW2 = parameters->GetKW_sigmaW2();
+
+            RDouble SST_alphaw1 = parameters->GetSST_alphaw1();
+            RDouble SST_alphaw2 = parameters->GetSST_alphaw2();
+
+            RDouble3D &cross = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("cross"));
+            RDouble3D &blend = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("blend"));
+
+            RDouble3D &SpSdRatio = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("SpSdRatio"));
+            RDouble3D &gamaeff = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("gamaeff"));
+
+            for (int k = kst; k <= ked; ++k)
+            {
+                for (int j = jst; j <= jed; ++j)
+                {
+                    for (int i = ist; i <= ied; ++i)
+                    {
+                        density = qPrimitive(i, j, k, IR);
+                        pressure = qPrimitive(i, j, k, IP);
+                        ke = qTurbulence(i, j, k, IKE);
+                        kw = qTurbulence(i, j, k, IKW);
+                        mut = viscousTurbulence(i, j, k);
+                        volume = vol(i, j, k);
+                        RDouble lhyb = (*lengthScale)(i, j, k);
+                        RDouble lSST = (*SSTLength)(i, j, k);
+
+                        dudx0 = gradUVWTCellCenterX(i, j, k, 0);
+                        dudy0 = gradUVWTCellCenterY(i, j, k, 0);
+                        dudz0 = gradUVWTCellCenterZ(i, j, k, 0);
+                        dvdx0 = gradUVWTCellCenterX(i, j, k, 1);
+                        dvdy0 = gradUVWTCellCenterY(i, j, k, 1);
+                        dvdz0 = gradUVWTCellCenterZ(i, j, k, 1);
+                        dwdx0 = gradUVWTCellCenterX(i, j, k, 2);
+                        dwdy0 = gradUVWTCellCenterY(i, j, k, 2);
+                        dwdz0 = gradUVWTCellCenterZ(i, j, k, 2);
+
+                        s11 = dudx0;
+                        s22 = dvdy0;
+                        s33 = dwdz0;
+                        s12 = half * (dudy0 + dvdx0);
+                        s13 = half * (dudz0 + dwdx0);
+                        s23 = half * (dvdz0 + dwdy0);
+                        w12 = half * (dudy0 - dvdx0);
+                        w13 = half * (dudz0 - dwdx0);
+                        w23 = half * (dvdz0 - dwdy0);
+
+                        sij2 = two * (s11 * s11 + s22 * s22 + s33 * s33 + two * (s12 * s12 + s13 * s13 + s23 * s23));    //! Modulus of S.
+                        divv = s11 + s22 + s33;    //! Divergence of velocity.
+
+                        cblend = blend(i, j, k);
+                        crss = cross(i, j, k);
+                        turb_beta = cblend * SST_beta1 + (1.0 - cblend) * SST_beta2;
+                        turb_alphaw = cblend * SST_alphaw1 + (1.0 - cblend) * SST_alphaw2;
+
+                        //! SST-2003 standard version.
+                        prodk = mut * (sij2 - two3rd * divv * divv) * oRefReNumber - two3rd * density * ke * divv;
+
+                        //! Produck term based on vorticity.
+                        if (SSTProductType != 0)
+                        {
+                            vort2 = four * (w12 * w12 + w13 * w13 + w23 * w23);    //! Vorticity.
+                            prodk = mut * vort2 * oRefReNumber - two3rd * density * ke * divv;    //! SST-V.
+                        }
+
+                        //dissk = turb_fbetas * SST_betaStar * rho * ke * kw * refReNumber;  //! Distructive term of TKE.
+                        dissk = turb_fbetas * density * sqrt(ke) * ke / lhyb * refReNumber;  //! Distructive term of TKE, modified by Zhang Zipei on 20210622.
+                        dissw = turb_fbeta * turb_beta * density * kw * kw * refReNumber;    //! Distructive term of Omega.
+                        prodk = MIN(prodk, SSTProductLimit * dissk);
+
+                        //cdissk = dissk / (density * ke);
+                        cdissk = dissk / (density * ke) * lSST / lhyb;  //! modified by Zhang Zipei on 20210622.
+                        cdissw = two * dissw / (density * kw);
+
+                        prodw = turb_alphaw * density / MAX(mut, 1.E-20) * prodk;
+                        //! Re-gama transition model.
+                        //! S-R Modify
+                        if (transitionType == IREGAMA && freeturbIntensitySRModify == 1 && xc(i, j, k) < freeDecayXLocation)
+                        {
+                            RDouble keamb = freeStreamTurbVar[IKE];
+                            RDouble kwamb = freeStreamTurbVar[IKW];
+                            //prodk += turb_fbetas * SST_betaStar * density * keamb * kwamb * refReNumber;
+                            prodk += turb_fbetas * density * sqrt(keamb) * keamb / lhyb * refReNumber;
+                            prodw += turb_fbeta * turb_beta * density * kwamb * kwamb * refReNumber;
+                        }
+
+                        cprodk = two3rd * (max(divv, zero) + divv * divv * oRefReNumber / kw);
+
+                        //! Produck term based on vorticity.
+                        if (SSTProductType != 0)
+                        {
+                            cprodk = two3rd * max(divv, zero);
+                        }
+                        cprodw = turb_alphaw * two3rd * max(divv, zero);
+
+                        cdkww = (one - cblend) * two * density * KW_sigmaW2 * crss * oRefReNumber / kw;
+                        ccdkww = ABS(cdkww / density / kw);
+
+                        //! Re-gama transition model.
+                        if (transitionType == IREGAMA)
+                        {
+                            prodk = CorrectionOfProductionInKEquation(gamaeff(i, j, k), prodk);
+                            dissk = CorrectionOfDestructionInKEquation(gamaeff(i, j, k), dissk);
+                            SpSdRatio(i, j, k) = MIN(MAX(prodk / dissk, 1.0), SpSdlimit);
+                        }
+
+                        srck = prodk - dissk;
+                        srcw = prodw - dissw + cdkww;
+
+                        residualTurbulence(i, j, k, IKE) += srck * volume;
+                        residualTurbulence(i, j, k, IKW) += srcw * volume;
+
+                        if (neasm > 0)
+                        {
+                            sourceEnergy(i, j, k) = -srck * volume;
+                        }
+
+                        source_dk_neg = ABS(cprodk + cdissk);
+                        source_dw_neg = ABS(cprodw + cdissw + ccdkww);
+
+                        spectrumTurbulence(i, j, k, IKE) += source_dk_neg * volume;
+                        spectrumTurbulence(i, j, k, IKW) += source_dw_neg * volume;
+
+                        //! To determine if compressible correction used or not.
+                        a1f2mt2 = 0.0;
+
+                        if (isCC == 1)
+                        {
+                            sonicSpeedSQR = gama(i, j, k) * pressure / density;
+                            mt2 = (ke + ke) / sonicSpeedSQR;
+                            f2mt2 = (1.0 - cblend) * MAX(mt2 - mt02, 0.0);
+                            a1f2mt2 = a1 * f2mt2;
+                        }
+
+                        //! To determine if compressible correction used or not.
+                        if (isCC == 1)
+                        {
+                            if (isdes == 1)
+                            {
+                                dissk_cc = 0.0;
+                            }
+                            else
+                            {
+                                dissk_cc = a1f2mt2 * dissk;
+                            }
+                            dissw_cc = -a1f2mt2 * SST_betaStar / turb_beta * dissw;
+
+                            pdbar = f2mt2 * (a3 * dissk - a2 * prodk);
+
+                            prodk_cc = pdbar;
+
+                            prodw_cc = -pdbar * density / mut * refReNumber;
+
+                            residualTurbulence(i, j, k, IKE) += (prodk_cc - dissk_cc) * volume;
+                            residualTurbulence(i, j, k, IKW) += (prodw_cc - dissw_cc) * volume;
+                        }
+                    }
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStr::Diagonal(Grid *gridIn)
+{
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int viscoueType = parameters->GetViscousType();
+
+    if (viscoueType == 3)
+    {
+        SpectrumRadiusOfOneEquation(gridIn);
+    }
+    else if (viscoueType == 4)
+    {
+        SpectrumRadiusOfTwoEquation(gridIn);
+    }
+}
+
+void TurbSolverStr::SpectrumRadiusOfOneEquation(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &faceVectorX = *(grid->GetFaceVectorX());
+    RDouble4D &faceVectorY = *(grid->GetFaceVectorY());
+    RDouble4D &faceVectorZ = *(grid->GetFaceVectorZ());
+    RDouble4D &area = *(grid->GetFaceArea());
+    RDouble3D &volume = *(grid->GetCellVolume());
+    RDouble4D &faceNormalVelocity = *(grid->GetFaceNormalVelocity());
+
+    RDouble4D &spectrumTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_turb"));
+    RDouble4D &spectrumTurbulence0 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_turb0"));
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousLaminar = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &dt = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("dt"));
+
+    RDouble5D &matrixTurbLeft = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_turbl"));
+    RDouble5D &matrixTurbRight = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_turbr"));
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+    RDouble3D *timeCoefficientInverse = NULL;
+    RDouble3D *preconCoefficient = NULL;
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        timeCoefficientInverse = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("timeCoefficientInverse"));
+        preconCoefficient = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+    }
+
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    RDouble turbCFLScale = parameters->GetTurbCFLScale();
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    RDouble csrv = GlobalDataBase::GetDoubleParaFromDB("csrv");
+
+    //! Initialize some constants.
+    RDouble sigma = 2.0 / 3.0;
+    RDouble osigma = one / sigma;
+
+    matrixTurbLeft = 0;
+    matrixTurbRight = 0;
+
+    int nDim = GetDim();
+
+    using namespace IDX;
+
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        int il1, jl1, kl1;
+        grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+        int ist, ied, jst, jed, kst, ked;
+        grid->GetFaceIterationIndex(ist, ied, jst, jed, kst, ked, iSurface);
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    int il, jl, kl;
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    //!left face of i-cell
+                    RDouble nx0 = faceVectorX(i, j, k, iSurface);
+                    RDouble ny0 = faceVectorY(i, j, k, iSurface);
+                    RDouble nz0 = faceVectorZ(i, j, k, iSurface);
+                    RDouble vgn0 = faceNormalVelocity(i, j, k, iSurface) * area(i, j, k, iSurface);
+
+                    //!right face of i-cell
+                    RDouble nx1 = faceVectorX(il, jl, kl, iSurface);
+                    RDouble ny1 = faceVectorY(il, jl, kl, iSurface);
+                    RDouble nz1 = faceVectorZ(il, jl, kl, iSurface);
+                    RDouble vgn1 = faceNormalVelocity(il, jl, kl, iSurface) * area(il, jl, kl, iSurface);
+
+                    //!cell center value of i-cell
+                    RDouble nx = half * (nx0 + nx1);
+                    RDouble ny = half * (ny0 + ny1);
+                    RDouble nz = half * (nz0 + nz1);
+                    RDouble vgn = half * (vgn0 + vgn1);
+
+                    RDouble ul = qLaminar(i, j, k, IU);
+                    RDouble vl = qLaminar(i, j, k, IV);
+                    RDouble wl = qLaminar(i, j, k, IW);
+                    RDouble Vn = ul * nx + vl * ny + wl * nz - vgn;
+                    if(ifLowSpeedPrecon != 0)
+                    {
+                        RDouble timeCoeff = (*timeCoefficientInverse)(i, j, k);
+                        RDouble preconCoeff = (*preconCoefficient)(i, j, k);
+                        Vn = half * timeCoeff * Vn * (1.0 + preconCoeff);
+                    }
+                    RDouble absVn = ABS(Vn);
+
+                    spectrumTurbulence(i, j, k, ISA) += absVn;
+
+                    matrixTurbLeft(il, jl, kl, ISA, iSurface) += half * (-Vn - absVn);
+                    matrixTurbRight(i, j, k, ISA, iSurface) += half * (Vn - absVn);
+
+                    RDouble rl = qLaminar(i, j, k, IR);
+                    RDouble nul = qTurbulence(i, j, k, ISA);
+                    RDouble nueff_l = ABS(viscousLaminar(i, j, k) / rl + nul);
+
+                    RDouble cellVolume = volume(i, j, k);
+                    RDouble oVolume = one / cellVolume;
+                    RDouble ns = nx * nx + ny * ny + nz * nz;
+                    RDouble ns2 = 2.0 * csrv * ns;
+
+                    spectrumTurbulence(i, j, k, ISA) += oRefReNumber * oVolume * (osigma * nueff_l * ns2);
+
+                    matrixTurbLeft(il, jl, kl, ISA, iSurface) += -half * oRefReNumber * oVolume * (osigma * nueff_l * ns2);
+                    matrixTurbRight(i, j, k, ISA, iSurface) += -half * oRefReNumber * oVolume * (osigma * nueff_l * ns2);
+                }
+            }
+        }
+    }
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                spectrumTurbulence0(i, j, k, ISA) = spectrumTurbulence(i, j, k, ISA);
+            }
+        }
+    }
+    GhostCell3D(spectrumTurbulence0, ni, nj, nk, nTurbulenceEquation);
+    
+
+
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                spectrumTurbulence0(i, j, k, ISA) = spectrumTurbulence(i, j, k, ISA);
+            }
+        }
+    }
+    GhostCell3D(spectrumTurbulence0, ni, nj, nk, nTurbulenceEquation);
+    
+    RDouble dualTimeSpectrumC1 = zero;
+    RDouble dualTimeSpectrumC2 = one;
+
+    //! If flow is unsteady, need to count the contribution of unsteady.
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble dualTimeCoefficient[7];
+        const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+        ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+        dualTimeSpectrumC1 = -dualTimeCoefficient[3];
+        dualTimeSpectrumC2 = dualTimeCoefficient[6];
+    }
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble &specTub = spectrumTurbulence(i, j, k, ISA);
+                specTub += dualTimeSpectrumC1 * volume(i, j, k) + dualTimeSpectrumC2 / (turbCFLScale * dt(i, j, k) + SMALL);
+                spectrumTurbulence0(i, j, k, ISA) = specTub;
+            }
+        }
+    }
+    GhostCell3D(spectrumTurbulence, ni, nj, nk, nTurbulenceEquation);
+}
+
+void TurbSolverStr::SpectrumRadiusOfTwoEquation(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble4D &faceVectorX = *(grid->GetFaceVectorX());
+    RDouble4D &faceVectorY = *(grid->GetFaceVectorY());
+    RDouble4D &faceVectorZ = *(grid->GetFaceVectorZ());
+    RDouble4D &area = *(grid->GetFaceArea());
+    RDouble3D &volume = *(grid->GetCellVolume());
+    RDouble4D &faceNormalVelocity = *(grid->GetFaceNormalVelocity());
+
+    RDouble4D &spectrumTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_turb"));
+    RDouble4D &spectrumTurbulence0 = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_turb0"));
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousLaminar = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &dt = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("dt"));
+
+    RDouble5D &matrixTurbLeft = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_turbl"));
+    RDouble5D &matrixTurbRight = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_turbr"));
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    RDouble turbCFLScale = parameters->GetTurbCFLScale();
+    string viscousName = parameters->GetViscousName();
+
+    Range M(0, nTurbulenceEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    RDouble csrv = GlobalDataBase::GetDoubleParaFromDB("csrv");
+    int nDiagonalModifiedTurb = parameters->GetnDiagonalModifiedTurb();
+
+    int ifLowSpeedPrecon = parameters->GetIfLowSpeedPrecon();
+    RDouble3D *timeCoefficientInverse = NULL;
+    RDouble3D *preconCoefficient = NULL;
+
+    if (ifLowSpeedPrecon != 0)
+    {
+        timeCoefficientInverse = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("timeCoefficientInverse"));
+        preconCoefficient = reinterpret_cast< RDouble3D *> (grid->GetDataPtr("preconCoefficient"));
+    }
+
+    matrixTurbLeft = 0.0;
+    matrixTurbRight = 0.0;
+
+    using namespace IDX;
+
+    RDouble dualTimeSpectrumC1 = zero;
+    RDouble dualTimeSpectrumC2 = one;
+
+    //! If flow is unsteady, it needs to count the contribution of unsteady.
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble dualTimeCoefficient[7];
+        const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+        ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+        dualTimeSpectrumC1 = -dualTimeCoefficient[3];
+        dualTimeSpectrumC2 = dualTimeCoefficient[6];
+    }
+
+    if(nDiagonalModifiedTurb == 0)
+    {
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    RDouble volumeCell = volume(i, j, k);
+                    RDouble dtCell = dt(i, j, k);
+                    RDouble specTurbDelta = dualTimeSpectrumC1 * volumeCell + dualTimeSpectrumC2 / (turbCFLScale * dtCell + SMALL);
+                    for (int m = mst; m <= med; ++m)
+                    {
+                        RDouble &specTur = spectrumTurbulence(i, j, k, m);
+                        specTur += specTurbDelta;
+                    }
+                }
+            }
+        }
+    }
+
+    int nDim = GetDim();
+
+    vector<RDouble> work(nTurbulenceEquation);
+
+    //int il, jl, kl;
+    for (int iSurface = 1; iSurface <= nDim; ++iSurface)
+    {
+        int il1, jl1, kl1;
+        grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+        grid->GetFaceIterationIndex(ist, ied, jst, jed, kst, ked, iSurface);
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    int il, jl, kl;
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    RDouble nx0 = faceVectorX(i, j, k, iSurface);
+                    RDouble ny0 = faceVectorY(i, j, k, iSurface);
+                    RDouble nz0 = faceVectorZ(i, j, k, iSurface);
+                    RDouble vgn0 = faceNormalVelocity(i, j, k, iSurface) * area(i, j, k, iSurface);
+
+                    RDouble nx1 = faceVectorX(il, jl, kl, iSurface);
+                    RDouble ny1 = faceVectorY(il, jl, kl, iSurface);
+                    RDouble nz1 = faceVectorZ(il, jl, kl, iSurface);
+                    RDouble vgn1 = faceNormalVelocity(il, jl, kl, iSurface) * area(il, jl, kl, iSurface);
+
+                    RDouble nx = half * (nx0 + nx1);
+                    RDouble ny = half * (ny0 + ny1);
+                    RDouble nz = half * (nz0 + nz1);
+                    RDouble vgn = half * (vgn0 + vgn1);
+
+                    RDouble ul = qLaminar(i, j, k, IU);
+                    RDouble vl = qLaminar(i, j, k, IV);
+                    RDouble wl = qLaminar(i, j, k, IW);
+                    RDouble Vn = ul * nx + vl * ny + wl * nz - vgn;
+                    if (ifLowSpeedPrecon != 0)
+                    {
+                        RDouble timeCoeff = (*timeCoefficientInverse)(i, j, k);
+                        RDouble preconCoeff = (*preconCoefficient)(i, j, k);
+                        Vn = half * timeCoeff * Vn * (1.0 + preconCoeff);
+                    }
+                    RDouble absVn = ABS(Vn);
+
+                    for (int m = M.first(); m <= M.last(); ++m)
+                    {
+                        RDouble &specTurb = spectrumTurbulence(i, j, k, m);
+                        specTurb += absVn;
+
+                        RDouble &matTurbLeft = matrixTurbLeft(il, jl, kl, m, iSurface);
+                        RDouble &matTurbRight = matrixTurbRight(i, j, k, m, iSurface);
+                        matTurbLeft += half * (-Vn - absVn);
+                        matTurbRight += half * (Vn - absVn);
+                    }
+                }
+            }
+        }
+    }
+
+    if (viscousName.substr(0, 13) == "2eq-kw-menter" || viscousName.substr(0, 12) == "easm-kw-2005")
+    {
+        RDouble3D &blend = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("blend"));
+
+        RDouble KW_sigmaK1 = parameters->GetKW_sigmaK1();
+        RDouble KW_sigmaK2 = parameters->GetKW_sigmaK2();
+        RDouble KW_sigmaW1 = parameters->GetKW_sigmaW1();
+        RDouble KW_sigmaW2 = parameters->GetKW_sigmaW2();
+
+        //int il, jl, kl;
+        for (int iSurface = 1; iSurface <= nDim; ++iSurface)
+        {
+            int il1, jl1, kl1;
+            grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+            grid->GetFaceIterationIndex(ist, ied, jst, jed, kst, ked, iSurface);
+
+            for (int k = kst; k <= ked; ++k)
+            {
+                for (int j = jst; j <= jed; ++j)
+                {
+                    for (int i = ist; i <= ied; ++i)
+                    {
+                        int il, jl, kl;
+                        grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                        RDouble rho = qLaminar(i, j, k, IR);
+                        RDouble muLaminar = viscousLaminar(i, j, k);
+                        RDouble muTurbulence = viscousTurbulence(i, j, k);
+
+                        RDouble cblend = blend(i, j, k);
+                        RDouble tsigKTurbulence = cblend * KW_sigmaK1 + (1.0 - cblend) * KW_sigmaK2;
+                        RDouble tsigWTurbulence = cblend * KW_sigmaW1 + (1.0 - cblend) * KW_sigmaW2;
+
+                        RDouble cellVolume = volume(i, j, k) + SMALL;
+                        RDouble oVolume = one / cellVolume;
+
+                        RDouble nx0 = faceVectorX(i, j, k, iSurface);
+                        RDouble ny0 = faceVectorY(i, j, k, iSurface);
+                        RDouble nz0 = faceVectorZ(i, j, k, iSurface);
+
+                        RDouble nx1 = faceVectorX(il, jl, kl, iSurface);
+                        RDouble ny1 = faceVectorY(il, jl, kl, iSurface);
+                        RDouble nz1 = faceVectorZ(il, jl, kl, iSurface);
+
+                        RDouble nx = half * (nx0 + nx1);
+                        RDouble ny = half * (ny0 + ny1);
+                        RDouble nz = half * (nz0 + nz1);
+
+                        RDouble ns = nx * nx + ny * ny + nz * nz;
+                        RDouble ns2 = 2.0 * csrv * ns;
+
+                        work[IKE] = (muLaminar + muTurbulence * tsigKTurbulence) / rho * ns2 * oVolume * oRefReNumber;
+                        work[IKW] = (muLaminar + muTurbulence * tsigWTurbulence) / rho * ns2 * oVolume * oRefReNumber;
+
+                        for (int m = mst; m <= med; ++m)
+                        {
+                            RDouble &specTurb = spectrumTurbulence(i, j, k, m);
+                            specTurb += work[m];
+
+                            RDouble &matTurbLeft  = matrixTurbLeft(il, jl, kl, m, iSurface);
+                            RDouble &matTurbRight = matrixTurbRight(i,  j,  k, m, iSurface);
+                            matTurbLeft  += - half * work[m];
+                            matTurbRight += - half * work[m];
+                        }
+                    }
+                }
+            }
+        }
+    }
+    if(nDiagonalModifiedTurb != 0)
+    {
+        int ni = grid->GetNI();
+        int nj = grid->GetNJ();
+        int nk = grid->GetNK();
+        grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+         for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    for (int m = mst; m <= med; ++m)
+                    {
+                        spectrumTurbulence0(i, j, k, m) = spectrumTurbulence(i, j, k, m);
+                    }
+                }
+            }
+        }
+        GhostCell3D(spectrumTurbulence0, ni, nj, nk, nTurbulenceEquation);
+    
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    RDouble volumeCell = volume(i, j, k);
+                    RDouble dtCell = dt(i, j, k);
+                    RDouble specTurbDelta = dualTimeSpectrumC1 * volumeCell + dualTimeSpectrumC2 / (turbCFLScale * dtCell + SMALL);
+                    for (int m = mst; m <= med; ++m)
+                    {
+                        RDouble &specTur = spectrumTurbulence(i, j, k, m);
+                        specTur += specTurbDelta;
+                    }
+                }
+            }
+        }
+
+        GhostCell3D(spectrumTurbulence, ni, nj, nk, nTurbulenceEquation);
+    }
+}
+
+void TurbSolverStr::ChangeTurbQ(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    int viscousType = parameters->GetViscousType();
+
+    if (viscousType == ONE_EQU)
+    {
+        return;
+    }
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    Range M(0, nTurbulenceEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble density = qLaminar(i, j, k, IR);
+                for (int m = mst; m <= med; ++m)
+                {
+                    qTurbulence(i, j, k, m) *= density;
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStr::RecoverTurbQ(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    int viscousType = parameters->GetViscousType();
+    if (viscousType == ONE_EQU)
+    {
+        return;
+    }
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked, 2);
+
+    Range M(0, nTurbulenceEquation - 1);
+
+    int mst = M.first();
+    int med = M.last();
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble rho = qLaminar(i, j, k, IR) + SMALL;
+                for (int m = mst; m <= med; ++m)
+                {
+                    RDouble &qTurb = qTurbulence(i, j, k, m);
+                    qTurb /= rho;
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStr::InviscidFlux(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    FieldProxy *qTurbulenceLeftPproxy = CreateFieldProxy(grid);
+    FieldProxy *qTurbulenceRightPproxy = CreateFieldProxy(grid);
+    FieldProxy *fluxProxy = CreateFieldProxy(grid);
+
+    FieldProxy *qLaminarLeftProxy;
+    FieldProxy *qLaminarRightProxy;
+
+    int turbOrderStruct = 2;
+    if (GlobalDataBase::IsExist("turbOrderStruct", PHINT, 1))
+    {
+        turbOrderStruct = GlobalDataBase::GetIntParaFromDB("turbOrderStruct");
+    }
+    if (turbOrderStruct == 2)
+    {
+        qLaminarLeftProxy = new FieldProxy();
+        qLaminarRightProxy = new FieldProxy();
+    }
+    else
+    {
+        qLaminarLeftProxy = CreateFlowFieldProxy(grid);
+        qLaminarRightProxy = CreateFlowFieldProxy(grid);
+    }
+
+    ChangeTurbQ(grid);
+
+    int nDim = GetDim();
+    for (int iSurface = 1; iSurface <= nDim; ++iSurface)
+    {
+        if (turbOrderStruct == 2)
+        {
+            if (iSurface == 1)
+            {
+                qLaminarLeftProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1")));
+                qLaminarRightProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1")));
+            }
+            else if (iSurface == 2)
+            {
+                qLaminarLeftProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2")));
+                qLaminarRightProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2")));
+            }
+            else
+            {
+                qLaminarLeftProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3")));
+                qLaminarRightProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3")));
+            }
+        }
+        else if (turbOrderStruct == 1)
+        {
+            //! Interpolate u ,v, w, for turb equation.
+            GetInvFaceQValueforTurb(grid, qLaminarLeftProxy, qLaminarRightProxy, iSurface);
+        }
+
+        //! Interpolate den*k den*w.
+        GetInviscidFaceValue(grid, qTurbulenceLeftPproxy, qTurbulenceRightPproxy, iSurface);
+
+        //! Correct the variables at the face where the BC condition is set to be wall.
+        CorrectFaceVar(grid, qTurbulenceLeftPproxy, qTurbulenceRightPproxy, qLaminarLeftProxy, qLaminarRightProxy, iSurface);
+
+        ComputeInviscidFlux(grid, qTurbulenceLeftPproxy, qTurbulenceRightPproxy, qLaminarLeftProxy, qLaminarRightProxy, fluxProxy, iSurface);
+
+        LoadFlux(grid, fluxProxy, iSurface);
+    }
+
+    RecoverTurbQ(grid);
+
+    delete qTurbulenceLeftPproxy;
+    delete qTurbulenceRightPproxy;
+
+    delete qLaminarLeftProxy;
+    delete qLaminarRightProxy;
+
+    delete fluxProxy;
+}
+
+void TurbSolverStr::GetInviscidFaceValue(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    Range M(0, nTurbulenceEquation - 1);
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+
+    RDouble4D &qLeft = qLeftProxy->GetField_STR();
+    RDouble4D &qRight = qRightProxy->GetField_STR();
+
+    RDouble MUSCLCoefXk = GlobalDataBase::GetDoubleParaFromDB("MUSCLCoefXk");
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    I = Range(1 - il1, ni - 1 + il1);
+    J = Range(1 - jl1, nj - 1 + jl1);
+    K = Range(1 - kl1, nk - 1 + kl1);
+    if (nk == 1)
+    {
+        K.setRange(1, 1);
+    }
+    int turbOrderStruct = 2;
+    if (GlobalDataBase::IsExist("turbOrderStruct", PHINT, 1))
+    {
+        turbOrderStruct = GlobalDataBase::GetIntParaFromDB("turbOrderStruct");
+    }
+    if (turbOrderStruct == 2)
+    {
+        RDouble4D *dql = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *dqr = new RDouble4D(I, J, K, M, fortranArray);
+        RDouble4D *dqlr = new RDouble4D(I, J, K, M, fortranArray);
+
+        (*dql)(I, J, K, M) = qTurbulence(I, J, K, M) - qTurbulence(I - il1, J - jl1, K - kl1, M);
+        (*dqr)(I, J, K, M) = qTurbulence(I + il1, J + jl1, K + kl1, M) - qTurbulence(I, J, K, M);
+        (*dqlr)(I, J, K, M) = Smoothturb((*dql)(I, J, K, M), (*dqr)(I, J, K, M));
+
+        qLeft(I, J, K, M) = qTurbulence(I, J, K, M) + 0.25 * (*dqlr)(I, J, K, M) * ((1.0 - MUSCLCoefXk * (*dqlr)(I, J, K, M)) * (*dql)(I, J, K, M) + (1.0 + MUSCLCoefXk * (*dqlr)(I, J, K, M)) * (*dqr)(I, J, K, M));
+        qRight(I, J, K, M) = qTurbulence(I, J, K, M) - 0.25 * (*dqlr)(I, J, K, M) * ((1.0 - MUSCLCoefXk * (*dqlr)(I, J, K, M)) * (*dqr)(I, J, K, M) + (1.0 + MUSCLCoefXk * (*dqlr)(I, J, K, M)) * (*dql)(I, J, K, M));
+
+        delete dql; dql = NULL;
+        delete dqr; dqr = NULL;
+        delete dqlr; dqlr = NULL;
+
+    }
+    else if (turbOrderStruct == 1)
+    {
+        qLeft(I, J, K, M) = qTurbulence(I, J, K, M);
+        qRight(I, J, K, M) = qTurbulence(I, J, K, M);
+    }
+}
+
+void TurbSolverStr::GetInvFaceQValueforTurb(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    Range M(1, 3);
+
+    FieldProxy *qProxy = GetFieldProxy(grid, "q");
+
+    RDouble4D &q = qProxy->GetField_STR();
+    RDouble4D &qLeft = qLeftProxy->GetField_STR();
+    RDouble4D &qRight = qRightProxy->GetField_STR();
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    I = Range(1 - il1, ni - 1 + il1);
+    J = Range(1 - jl1, nj - 1 + jl1);
+    K = Range(1 - kl1, nk - 1 + kl1);
+    if (nk == 1)
+    {
+        K.setRange(1, 1);
+    }
+
+    qLeft(I, J, K, M) = q(I, J, K, M);
+    qRight(I, J, K, M) = q(I, J, K, M);
+
+    delete qProxy;
+}
+
+void TurbSolverStr::CorrectFaceVar(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, FieldProxy *qLaminarLeftProxy, FieldProxy *qLaminarRightProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    using namespace IDX;
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    Range M(0, nTurbulenceEquation - 1);
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (!(IsWall(BCType) && viscousType > INVISCID))
+        {
+            continue;
+        }
+
+        int *faceDirectionIndex = structBC->GetFaceDirectionIndex();
+        int iSurfOfBC = structBC->GetFaceDirection() + 1;
+
+        int ist, ied, jst, jed, kst, ked;
+        structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (iSurfOfBC != iSurface)
+        {
+            continue;
+        }
+
+        int il, jl, kl;
+        int id, jd, kd;
+
+        GetBCFaceIDX(faceDirectionIndex, id, jd, kd);
+
+        kst = kst + kd;
+        ked = ked + kd;
+        jst = jst + jd;
+        jed = jed + jd;
+        ist = ist + id;
+        ied = ied + id;
+
+        int di, dj, dk;
+
+        di = ABS(faceDirectionIndex[0]);
+        dj = ABS(faceDirectionIndex[1]);
+        dk = ABS(faceDirectionIndex[2]);
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    il = i - di;
+                    jl = j - dj;
+                    kl = k - dk;
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStr::ComputeInviscidFlux(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, FieldProxy *qLaminarLeftProxy, FieldProxy *qLaminarRightProxy, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    NNDFlux(grid, qLeftProxy, qRightProxy, qLaminarLeftProxy, qLaminarRightProxy, fluxProxy, iSurface);
+}
+
+void TurbSolverStr::NNDFlux(Grid *gridIn, FieldProxy *qLeftProxy, FieldProxy *qRightProxy, FieldProxy *qLaminarLeftProxy, FieldProxy *qLaminarRightProxy, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &qLeft = qLeftProxy->GetField_STR();
+    RDouble4D &qRight = qRightProxy->GetField_STR();
+
+    RDouble4D &qLaminarLeft = qLaminarLeftProxy->GetField_STR();
+    RDouble4D &qLaminarRight = qLaminarRightProxy->GetField_STR();
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+
+    RDouble4D &faceNormalX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalZ = *(grid->GetFaceNormalZ());
+    RDouble4D &sarea = *(grid->GetFaceArea());
+    RDouble4D &svgn = *(grid->GetFaceNormalVelocity());
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetFaceIterationIndex(ist, ied, jst, jed, kst, ked, iSurface);
+
+    Range M(0, nTurbulenceEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    using namespace IDX;
+
+    RDouble *priml = new RDouble[nTurbulenceEquation];
+    RDouble *primr = new RDouble[nTurbulenceEquation];
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                int il, jl, kl;
+                grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                RDouble xfn = faceNormalX(il, jl, kl, iSurface);
+                RDouble yfn = faceNormalY(il, jl, kl, iSurface);
+                RDouble zfn = faceNormalZ(il, jl, kl, iSurface);
+                RDouble area = sarea(il, jl, kl, iSurface);
+                RDouble vgn = svgn(il, jl, kl, iSurface);
+
+                for (int m = mst; m <= med; ++m)
+                {
+                    priml[m] = qLeft(i, j, k, m);
+                    primr[m] = qRight(il, jl, kl, m);
+                }
+
+                RDouble ul = qLaminarLeft(i, j, k, IU);
+                RDouble vl = qLaminarLeft(i, j, k, IV);
+                RDouble wl = qLaminarLeft(i, j, k, IW);
+
+                RDouble ur = qLaminarRight(il, jl, kl, IU);
+                RDouble vr = qLaminarRight(il, jl, kl, IV);
+                RDouble wr = qLaminarRight(il, jl, kl, IW);
+
+                RDouble vnl = xfn * ul + yfn * vl + zfn * wl - vgn;
+                RDouble vnr = xfn * ur + yfn * vr + zfn * wr - vgn;
+
+                RDouble vnla = half * (vnl + ABS(vnl));
+                RDouble vnra = half * (vnr - ABS(vnr));
+
+                for (int m = mst; m <= med; ++m)
+                {
+                    flux(il, jl, kl, m) = (vnla * priml[m] + vnra * primr[m]) * area;
+                }
+            }
+        }
+    }
+    delete[]priml;
+    delete[]primr;
+}
+
+void TurbSolverStr::LoadFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    Range M(0, nTurbulenceEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int m = mst; m <= med; ++m)
+    {
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    int il, jl, kl;
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    RDouble &resTurb = residualTurbulence(i, j, k, m);
+                    RDouble &fluxLeft = flux(il, jl, kl, m);
+                    RDouble &fluxRight = flux(i, j, k, m);
+                    resTurb -= (fluxLeft - fluxRight);
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStr::ComputeGradientCellCenter(Grid *gridIn)
+{
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &faceVectorX = *(strgrid->GetFaceVectorX());
+    RDouble4D &faceVectorY = *(strgrid->GetFaceVectorY());
+    RDouble4D &faceVectorZ = *(strgrid->GetFaceVectorZ());
+    RDouble3D &volume = *(strgrid->GetCellVolume());
+
+    int ndim = GetDim();
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("q_turb"));
+    RDouble4D &gradTurbulenceCellCenterX = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("gradTurbulenceCellCenterX"));
+    RDouble4D &gradTurbulenceCellCenterY = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("gradTurbulenceCellCenterY"));
+    RDouble4D &gradTurbulenceCellCenterZ = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("gradTurbulenceCellCenterZ"));
+
+    gradTurbulenceCellCenterX = 0.0;
+    gradTurbulenceCellCenterY = 0.0;
+    gradTurbulenceCellCenterZ = 0.0;
+
+    for (int iSurface = 1; iSurface <= ndim; ++iSurface)
+    {
+        int il1, jl1, kl1;
+        strgrid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+        int ist = 1;
+        int ied = ni - 1 + il1;
+        int jst = 1;
+        int jed = nj - 1 + jl1;
+        int kst = 1;
+        int ked = nk - 1 + kl1;
+
+        if (ndim == TWO_D)
+        {
+            ked = 1;
+        }
+
+        //! The gradient of u,v,w.
+        for (int m = 0; m < nTurbulenceEquation; ++m)
+        {
+            for (int k = kst; k <= ked; ++k)
+            {
+                for (int j = jst; j <= jed; ++j)
+                {
+                    for (int i = ist; i <= ied; ++i)
+                    {
+                        int il, jl, kl;
+                        strgrid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                        RDouble phis = qTurbulence(i, j, k, m) + qTurbulence(il, jl, kl, m);
+
+                        RDouble ddx = phis * faceVectorX(i, j, k, iSurface);
+                        RDouble ddy = phis * faceVectorY(i, j, k, iSurface);
+                        RDouble ddz = phis * faceVectorZ(i, j, k, iSurface);
+
+                        RDouble &gradTurbccXLeft = gradTurbulenceCellCenterX(i, j, k, m);
+                        RDouble &gradTurbccYLeft = gradTurbulenceCellCenterY(i, j, k, m);
+                        RDouble &gradTurbccZLeft = gradTurbulenceCellCenterZ(i, j, k, m);
+                        gradTurbccXLeft -= ddx;
+                        gradTurbccYLeft -= ddy;
+                        gradTurbccZLeft -= ddz;
+
+                        RDouble &gradTurbccXRight = gradTurbulenceCellCenterX(il, jl, kl, m);
+                        RDouble &gradTurbccYRight = gradTurbulenceCellCenterY(il, jl, kl, m);
+                        RDouble &gradTurbccZRight = gradTurbulenceCellCenterZ(il, jl, kl, m);
+                        gradTurbccXRight += ddx;
+                        gradTurbccYRight += ddy;
+                        gradTurbccZRight += ddz;
+                    }
+                }
+            }
+        }
+    }
+
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+
+    if (ndim == TWO_D) ked = 1;
+
+    for (int m = 0; m < nTurbulenceEquation; ++m)
+    {
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    RDouble oov = half / volume(i, j, k);
+                    RDouble &gradTurbccX = gradTurbulenceCellCenterX(i, j, k, m);
+                    RDouble &gradTurbccY = gradTurbulenceCellCenterY(i, j, k, m);
+                    RDouble &gradTurbccZ = gradTurbulenceCellCenterZ(i, j, k, m);
+                    gradTurbccX *= oov;
+                    gradTurbccY *= oov;
+                    gradTurbccZ *= oov;
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStr::RotateVectorFromInterface(Grid *gridIn, const int &neighborZoneIndex, const int &nEquation)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+    StructBCSet *structBCSet = finestGrid->GetStructBCSet();
+    RDouble4D &rotTurbgradValueX = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotTurbgradValueX"));
+    RDouble4D &rotTurbgradValueY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotTurbgradValueY"));
+    RDouble4D &rotTurbgradValueZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("rotTurbgradValueZ"));
+
+    rotTurbgradValueX = 0.0;
+    rotTurbgradValueY = 0.0;
+    rotTurbgradValueZ = 0.0;
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    double rotationAngle = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+    rotationAngle = rotationAngle * PI / 180;
+    if (nEquation > 0)
+    {
+        RDouble4D &fieldRecvTurbY = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTurbulenceCellCenterY"));
+        RDouble4D &fieldRecvTurbZ = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("gradTurbulenceCellCenterZ"));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++iLocalFace)
+            {
+                int iFace = interfaceIndexContainerForReceive[iLocalFace];
+                int it, jt, kt;
+                finestGrid->GetTargetIndexIJK(iFace, iGhostLayer + 1, it, jt, kt);
+                finestGrid->RemapMultigridIJK(level, it, jt, kt);
+                int *ibcregions = structBCSet->GetIFaceInfo();
+                int iBCRegion = ibcregions[iFace];
+                StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+                string bcName = bcregion->GetBCName();
+                if (bcName == "Periodic_up")
+                {
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        rotTurbgradValueY(it, jt, kt, m) = fieldRecvTurbY(it, jt, kt, m) * cos(2 * PI - rotationAngle) - fieldRecvTurbZ(it, jt, kt, m) * sin(2 * PI - rotationAngle);
+                        rotTurbgradValueZ(it, jt, kt, m) = fieldRecvTurbY(it, jt, kt, m) * sin(2 * PI - rotationAngle) + fieldRecvTurbZ(it, jt, kt, m) * cos(2 * PI - rotationAngle);
+                    }
+                }
+                else if (bcName == "Periodic_down")
+                {
+                    for (int m = 0; m < nEquation; ++m)
+                    {
+                        rotTurbgradValueY(it, jt, kt, m) = fieldRecvTurbY(it, jt, kt, m) * cos(rotationAngle) - fieldRecvTurbZ(it, jt, kt, m) * sin(rotationAngle);
+                        rotTurbgradValueZ(it, jt, kt, m) = fieldRecvTurbY(it, jt, kt, m) * sin(rotationAngle) + fieldRecvTurbZ(it, jt, kt, m) * cos(rotationAngle);
+                    }
+                }
+
+                for (int m = 0; m < nEquation; ++m)
+                {
+                    fieldRecvTurbY(it, jt, kt, m) = rotTurbgradValueY(it, jt, kt, m);
+                    fieldRecvTurbZ(it, jt, kt, m) = rotTurbgradValueZ(it, jt, kt, m);
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStr::ReconGradVolWeightedwithCorrection(Grid *gridIn, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+
+    RDouble4D &gradTurbulenceX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceX"));
+    RDouble4D &gradTurbulenceY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceY"));
+    RDouble4D &gradTurbulenceZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceZ"));
+
+    gradTurbulenceX = 0.0;
+    gradTurbulenceY = 0.0;
+    gradTurbulenceZ = 0.0;
+
+    RDouble4D &gradTurbulenceCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceCellCenterX"));
+    RDouble4D &gradTurbulenceCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceCellCenterY"));
+    RDouble4D &gradTurbulenceCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceCellCenterZ"));
+
+    RDouble3D &xcc = *(grid->GetCellCenterX());
+    RDouble3D &ycc = *(grid->GetCellCenterY());
+    RDouble3D &zcc = *(grid->GetCellCenterZ());
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    Range I(1, ni - 1 + il1);
+    Range J(1, nj - 1 + jl1);
+    Range K(1, nk - 1 + kl1);
+    if (nk == 1)
+    {
+        K.setRange(1, 1);
+    }
+
+    int ist, ied, jst, jed, kst, ked;
+    GetIJKRegion(I, J, K, ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble dx = xcc(i, j, k) - xcc(i - il1, j - jl1, k - kl1);
+                RDouble dy = ycc(i, j, k) - ycc(i - il1, j - jl1, k - kl1);
+                RDouble dz = zcc(i, j, k) - zcc(i - il1, j - jl1, k - kl1);
+                RDouble dr = sqrt(dx * dx + dy * dy + dz * dz);
+
+                dx = dx / dr;
+                dy = dy / dr;
+                dz = dz / dr;
+
+                for (int m = 0; m < nEquation; ++m)
+                {
+                    RDouble a = half * (gradTurbulenceCellCenterX(i, j, k, m) + gradTurbulenceCellCenterX(i - il1, j - jl1, k - kl1, m));
+                    RDouble b = half * (gradTurbulenceCellCenterY(i, j, k, m) + gradTurbulenceCellCenterY(i - il1, j - jl1, k - kl1, m));
+                    RDouble c = half * (gradTurbulenceCellCenterZ(i, j, k, m) + gradTurbulenceCellCenterZ(i - il1, j - jl1, k - kl1, m));
+                    RDouble dqdr = (qTurbulence(i, j, k, m) - qTurbulence(i - il1, j - jl1, k - kl1, m)) / dr;
+                    RDouble d = a * dx + b * dy + c * dz - dqdr;
+
+                    RDouble &gradTurbX = gradTurbulenceX(i, j, k, m);
+                    RDouble &gradTurbY = gradTurbulenceY(i, j, k, m);
+                    RDouble &gradTurbZ = gradTurbulenceZ(i, j, k, m);
+                    gradTurbX = a - d * dx;
+                    gradTurbY = b - d * dy;
+                    gradTurbZ = c - d * dz;
+                }
+            }
+        }
+    }
+
+    GetGradientAtFace_CorrectionAtPhysicalBoundary(grid, iSurface);
+}
+
+void TurbSolverStr::GetGradientAtFace_CorrectionAtPhysicalBoundary(Grid *gridIn, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &xfn = *(grid->GetFaceNormalX());
+    RDouble4D &yfn = *(grid->GetFaceNormalY());
+    RDouble4D &zfn = *(grid->GetFaceNormalZ());
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble4D &gradTurbulenceFaceX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceX"));
+    RDouble4D &gradTurbulenceFaceY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceY"));
+    RDouble4D &gradTurbulenceFaceZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceZ"));
+
+    RDouble4D &gradTurbulenceCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceCellCenterX"));
+    RDouble4D &gradTurbulenceCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceCellCenterY"));
+    RDouble4D &gradTurbulenceCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceCellCenterZ"));
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    using namespace PHENGLEI;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = bcregion->GetBCType();
+        int nsurf_bc = bcregion->GetFaceDirection() + 1;
+
+        int ist, ied, jst, jed, kst, ked;
+        bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+        if (IsInterface(BCType) || nsurf_bc != iSurface) //! Inner P TO P BC in the current direction
+        {
+            continue;
+        }
+        else if (BCType == SYMMETRY) //! Symmetry BC
+        {
+            RDouble xfnSign;
+            RDouble yfnSign;
+            RDouble zfnSign;
+
+            xfnSign = ABS(xfn(ist, jst, kst, iSurface)) - 0.1;
+            yfnSign = ABS(yfn(ist, jst, kst, iSurface)) - 0.1;
+            zfnSign = ABS(zfn(ist, jst, kst, iSurface)) - 0.1;
+
+            if (xfnSign > 0.0) //! For Y-Z symmetry plane
+            {
+                for (int k = kst; k <= ked; ++k)
+                {
+                    for (int j = jst; j <= jed; ++j)
+                    {
+                        for (int i = ist; i <= ied; ++i)
+                        {
+                            int ibc1, jbc1, kbc1;
+                            bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                            for (int m = 0; m < nEquation; ++m)
+                            {
+                                gradTurbulenceFaceX(ibc1, jbc1, kbc1, m) = 0.0;
+                                gradTurbulenceFaceY(ibc1, jbc1, kbc1, m) = gradTurbulenceCellCenterY(i, j, k, m);
+                                gradTurbulenceFaceZ(ibc1, jbc1, kbc1, m) = gradTurbulenceCellCenterZ(i, j, k, m);
+                            }
+                        }
+                    }
+                }
+            }
+
+            if (yfnSign > 0.0) //! For X-Z symmetry plane
+            {
+                for (int k = kst; k <= ked; ++k)
+                {
+                    for (int j = jst; j <= jed; ++j)
+                    {
+                        for (int i = ist; i <= ied; ++i)
+                        {
+                            int ibc1, jbc1, kbc1;
+                            bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                            for (int m = 0; m < nEquation; ++m)
+                            {
+                                gradTurbulenceFaceX(ibc1, jbc1, kbc1, m) = gradTurbulenceCellCenterX(i, j, k, m);
+                                gradTurbulenceFaceY(ibc1, jbc1, kbc1, m) = 0.0;
+                                gradTurbulenceFaceZ(ibc1, jbc1, kbc1, m) = gradTurbulenceCellCenterZ(i, j, k, m);
+                            }
+                        }
+                    }
+                }
+            }
+
+            if (zfnSign > 0.0) //! For X-Y symmetry plane
+            {
+                for (int k = kst; k <= ked; ++k)
+                {
+                    for (int j = jst; j <= jed; ++j)
+                    {
+                        for (int i = ist; i <= ied; ++i)
+                        {
+                            int ibc1, jbc1, kbc1;
+                            bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                            for (int m = 0; m < nEquation; ++m)
+                            {
+                                gradTurbulenceFaceX(ibc1, jbc1, kbc1, m) = gradTurbulenceCellCenterX(i, j, k, m);
+                                gradTurbulenceFaceY(ibc1, jbc1, kbc1, m) = gradTurbulenceCellCenterY(i, j, k, m);
+                                gradTurbulenceFaceZ(ibc1, jbc1, kbc1, m) = 0.0;
+                            }
+                        }
+                    }
+                }
+            }
+        }
+        else
+        {
+            for (int k = kst; k <= ked; ++k)
+            {
+                for (int j = jst; j <= jed; ++j)
+                {
+                    for (int i = ist; i <= ied; ++i)
+                    {
+                        int ibc1, jbc1, kbc1;
+                        bcregion->GetBoundaryFaceIndex(i, j, k, ibc1, jbc1, kbc1);
+
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            gradTurbulenceFaceX(ibc1, jbc1, kbc1, m) = gradTurbulenceCellCenterX(i, j, k, m);
+                            gradTurbulenceFaceY(ibc1, jbc1, kbc1, m) = gradTurbulenceCellCenterY(i, j, k, m);
+                            gradTurbulenceFaceZ(ibc1, jbc1, kbc1, m) = gradTurbulenceCellCenterZ(i, j, k, m);
+                        }
+                    }
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStr::ViscousFlux(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    FieldProxy *fluxProxy = CreateFieldProxy(grid);
+
+    int nDim = GetDim();
+    for (int iSurface = 1; iSurface <= nDim; ++iSurface)
+    {
+        ReconGradVolWeightedwithCorrection(gridIn, iSurface);
+
+        CompVisFlux(grid, fluxProxy, iSurface);
+
+        LoadFlux(grid, fluxProxy, iSurface);
+    }
+
+    delete fluxProxy;
+}
+
+void TurbSolverStr::CompVisFlux(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+    if (viscousType == ONE_EQU)
+    {
+        //! One equation turbulence model.
+        CompVisFluxOneEquation(gridIn, fluxProxy, iSurface);
+    }
+    else if (viscousType == TWO_EQU)
+    {
+        //! Two equation turbulence model.
+        CompVisFluxTwoEquation(gridIn, fluxProxy, iSurface);
+    }
+}
+
+void TurbSolverStr::CompVisFluxOneEquation(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &gradientTurbulenceX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceX"));
+    RDouble4D &gradientTurbulenceY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceY"));
+    RDouble4D &gradientTurbulenceZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceZ"));
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+
+    RDouble4D &faceNormalX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalZ = *(grid->GetFaceNormalZ());
+    RDouble4D &area = *(grid->GetFaceArea());
+
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &viscousLaminar = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    RDouble KW_sigma = parameters->GetKW_sigma();
+
+    RDouble oSigmaTurbulence = 1.0 / KW_sigma;
+
+    RDouble *fvis = new RDouble[nTurbulenceEquation];
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetFaceIterationIndex(ist, ied, jst, jed, kst, ked, iSurface);
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                int il, jl, kl;
+                grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                RDouble nxs = faceNormalX(il, jl, kl, iSurface);
+                RDouble nys = faceNormalY(il, jl, kl, iSurface);
+                RDouble nzs = faceNormalZ(il, jl, kl, iSurface);
+                RDouble nss = area(il, jl, kl, iSurface);
+
+                RDouble dkedx = gradientTurbulenceX(il, jl, kl, ISA);
+                RDouble dkedy = gradientTurbulenceY(il, jl, kl, ISA);
+                RDouble dkedz = gradientTurbulenceZ(il, jl, kl, ISA);
+
+                RDouble dkedn = nxs * dkedx + nys * dkedy + nzs * dkedz;
+
+                RDouble orl = 1.0 / (qLaminar(i, j, k, IR) + SMALL);
+                RDouble orr = 1.0 / (qLaminar(il, jl, kl, IR) + SMALL);
+
+                //! flux.
+                RDouble keViscous = half * (viscousLaminar(i, j, k) * orl + viscousLaminar(il, jl, kl) * orr + qTurbulence(i, j, k, ISA) + qTurbulence(il, jl, kl, ISA));
+                fvis[0] = -oRefReNumber * (oSigmaTurbulence * keViscous * dkedn * nss);
+
+                for (int m = 0; m < nTurbulenceEquation; ++m)
+                {
+                    RDouble &fluxface = flux(il, jl, kl, m);
+                    fluxface = fvis[m];
+                }
+            }
+        }
+    }
+    delete[]fvis;    fvis = NULL;
+}
+
+void TurbSolverStr::CompVisFluxTwoEquation(Grid *gridIn, FieldProxy *fluxProxy, int iSurface)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &gradientTurbulenceX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceX"));
+    RDouble4D &gradientTurbulenceY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceY"));
+    RDouble4D &gradientTurbulenceZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradTurbulenceZ"));
+
+    RDouble4D &flux = fluxProxy->GetField_STR();
+
+    RDouble4D &faceNormalX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalZ = *(grid->GetFaceNormalZ());
+    RDouble4D &area = *(grid->GetFaceArea());
+
+    RDouble3D &viscousLaminar = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    string viscousName = parameters->GetViscousName();
+
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    RDouble *fvis = new RDouble[nTurbulenceEquation];
+
+    int il1, jl1, kl1;
+    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetFaceIterationIndex(ist, ied, jst, jed, kst, ked, iSurface);
+
+    using namespace IDX;
+
+    if (viscousName.substr(0, 13) == "2eq-kw-menter" || viscousName.substr(0, 12) == "easm-kw-2005")
+    {
+        RDouble3D &blend = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("blend"));
+
+        RDouble KW_sigmaK1 = parameters->GetKW_sigmaK1();
+        RDouble KW_sigmaW1 = parameters->GetKW_sigmaW1();
+        RDouble KW_sigmaW2 = parameters->GetKW_sigmaW2();
+        RDouble KW_sigmaK2 = parameters->GetKW_sigmaK2();
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    int il, jl, kl;
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    RDouble nxs = faceNormalX(il, jl, kl, iSurface);
+                    RDouble nys = faceNormalY(il, jl, kl, iSurface);
+                    RDouble nzs = faceNormalZ(il, jl, kl, iSurface);
+                    RDouble nss = area(il, jl, kl, iSurface);
+
+                    RDouble dkedx = gradientTurbulenceX(il, jl, kl, IKE);
+                    RDouble dkedy = gradientTurbulenceY(il, jl, kl, IKE);
+                    RDouble dkedz = gradientTurbulenceZ(il, jl, kl, IKE);
+
+                    RDouble dkwdx = gradientTurbulenceX(il, jl, kl, IKW);
+                    RDouble dkwdy = gradientTurbulenceY(il, jl, kl, IKW);
+                    RDouble dkwdz = gradientTurbulenceZ(il, jl, kl, IKW);
+
+                    RDouble cblend = half * (blend(i, j, k) + blend(il, jl, kl));
+                    RDouble sigkTurbulence = cblend * KW_sigmaK1 + (1.0 - cblend) * KW_sigmaK2;
+                    RDouble sigwTurbulence = cblend * KW_sigmaW1 + (1.0 - cblend) * KW_sigmaW2;
+                    RDouble muLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(il, jl, kl));
+                    RDouble muTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(il, jl, kl));
+
+                    RDouble mlt1 = muLaminar + muTurbulence * sigkTurbulence;
+                    RDouble mlt2 = muLaminar + muTurbulence * sigwTurbulence;
+
+                    RDouble dkedn = nxs * dkedx + nys * dkedy + nzs * dkedz;
+                    RDouble dkwdn = nxs * dkwdx + nys * dkwdy + nzs * dkwdz;
+
+                    fvis[IKE] = -oRefReNumber * mlt1 * dkedn * nss;
+                    fvis[IKW] = -oRefReNumber * mlt2 * dkwdn * nss;
+
+                    for (int m = 0; m < nTurbulenceEquation; ++m)
+                    {
+                        RDouble &fluxface = flux(il, jl, kl, m);
+                        fluxface = fvis[m];
+                    }
+                }
+            }
+        }
+    }
+    else
+    {
+        RDouble KW_sigmaK = parameters->GetKW_sigmaK();
+        RDouble KW_sigmaW = parameters->GetKW_sigmaW();
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    int il, jl, kl;
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    RDouble nxs = faceNormalX(il, jl, kl, iSurface);
+                    RDouble nys = faceNormalY(il, jl, kl, iSurface);
+                    RDouble nzs = faceNormalZ(il, jl, kl, iSurface);
+                    RDouble nss = area(il, jl, kl, iSurface);
+
+                    RDouble dkedx = gradientTurbulenceX(il, jl, kl, IKE);
+                    RDouble dkedy = gradientTurbulenceY(il, jl, kl, IKE);
+                    RDouble dkedz = gradientTurbulenceZ(il, jl, kl, IKE);
+
+                    RDouble dkwdx = gradientTurbulenceX(il, jl, kl, IKW);
+                    RDouble dkwdy = gradientTurbulenceY(il, jl, kl, IKW);
+                    RDouble dkwdz = gradientTurbulenceZ(il, jl, kl, IKW);
+
+                    RDouble muLaminar = half * (viscousLaminar(i, j, k) + viscousLaminar(il, jl, kl));
+                    RDouble muTurbulence = half * (viscousTurbulence(i, j, k) + viscousTurbulence(il, jl, kl));
+
+                    RDouble mlt1 = muLaminar + muTurbulence * KW_sigmaK;
+                    RDouble mlt2 = muLaminar + muTurbulence * KW_sigmaW;
+
+                    RDouble dkedn = nxs * dkedx + nys * dkedy + nzs * dkedz;
+                    RDouble dkwdn = nxs * dkwdx + nys * dkwdy + nzs * dkwdz;
+
+                    fvis[IKE] = -oRefReNumber * mlt1 * dkedn * nss;
+                    fvis[IKW] = -oRefReNumber * mlt2 * dkwdn * nss;
+
+                    for (int m = 0; m < nTurbulenceEquation; ++m)
+                    {
+                        RDouble &fluxface = flux(il, jl, kl, m);
+                        fluxface = fvis[m];
+                    }
+                }
+            }
+        }
+    }
+
+    delete[]fvis;    fvis = NULL;
+}
+
+void TurbSolverStr::ZeroResidualOfSpecialCells(Grid *gridIn)
+{
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int isOverset = parameters->GetIsOverLapping();
+    if (!isOverset)
+    {
+        return;
+    }
+
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (gridIn->GetDataPtr("res_turb"));
+    StructGrid *grid = PHSPACE::StructGridCast(gridIn);
+    int numberOfEquations = GetNumberOfEquations();
+
+    int *iBlank = grid->GetCellTypeContainer();
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int cellLabel = 0;
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                if (iBlank[cellLabel] != GENERIC_COLOR)
+                {
+                    for (int m = 0; m < numberOfEquations; ++m)
+                    {
+                        residualTurbulence(i, j, k, m) = 0.0;
+                    }
+                }
+                cellLabel += 1;
+            }
+        }
+    }
+}
+
+void TurbSolverStr::SolveLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &dqTurbulence = dqProxy->GetField_STR();
+    RDouble4D &deltaFlux = LUplusDQ->GetField_STR();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble *dqNeighbor = new RDouble[nTurbulenceEquation + 1];
+    RDouble *prim = new RDouble[nTurbulenceEquation + 1];
+    RDouble *rhs0 = new RDouble[nTurbulenceEquation + 1];
+    RDouble *dflux = new RDouble[nTurbulenceEquation + 1];
+    RDouble *mat_abc = new RDouble[nTurbulenceEquation + 1];
+    RDouble *dqOld = new RDouble[nTurbulenceEquation + 1];
+    RDouble *Ux = new RDouble[nTurbulenceEquation + 1];
+
+    RDouble4D &spectrumTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_turb"));
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+    RDouble5D &matrixTurbulenceLeft = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_turbl"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int nDim = GetDim();
+
+    Range M(0, nTurbulenceEquation - 1);
+    int mst = M.first();
+    int med = M.last();
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                for (int m = mst; m <= med; ++m)
+                {
+                    rhs0[m] = 0.0;
+                }
+
+                for (int m = mst; m <= med; ++m)
+                {
+                    //! Back up the old dq, to compute the convergence.
+                    //! it is initialized by zero or res in the first sweep,
+                    //! then it is updated by backward sweep, that is dq*.
+                    dqOld[m] = dqTurbulence(i, j, k, m);
+
+                    //! Here, the deltaFlux is computed in Upper backward sweep!
+                    //! res: b      deltaFlux: Ux, which is computed in backward sweep.
+                    //! the dq is not the real dq, now.
+                    //! Although the 'dq' changed can not the right one, it dosen't matter, since 
+                    //! the following only using the lower neighbor cells, whose 'dq' has been updated.
+                    //! It is convenient for precondition transform.
+                    RDouble &dq = dqTurbulence(i, j, k, m);
+                    dq = residualTurbulence(i, j, k, m);
+
+                    Ux[m] = deltaFlux(i, j, k, m);
+
+                    //! Then reset it to zero to store the Lower forward sweep!
+                    RDouble &df = deltaFlux(i, j, k, m);
+                    df = 0.0;
+                }
+
+                for (int iSurface = 1; iSurface <= nDim; ++iSurface)
+                {
+                    int il, jl, kl, il1, jl1, kl1;
+                    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+                    grid->GetLeftCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+                    
+                    for (int m = mst; m <= med; ++m)
+                    {
+                        dqNeighbor[m] = dqTurbulence(il, jl, kl, m);
+                    }
+
+                    for (int m = mst; m <= med; ++m)
+                    {
+                        mat_abc[m] = matrixTurbulenceLeft(il, jl, kl, m, iSurface);
+                    }
+
+                    Turb_MxDQ(mat_abc, dqNeighbor, nTurbulenceEquation, dflux);
+
+                    for (int m = 0; m < nTurbulenceEquation; ++m)
+                    {
+                        rhs0[m] += dflux[m];
+                    }
+                }
+
+                for (int m = mst; m <= med; ++m)
+                {
+                    //! dq = { (b - Ux) - Lx } / D.
+                    //! Note: the 'dq' has actually initialized by the residual at the beginning of this function.
+                    //! the 'rhs0' is the total Delta Flux of the neighbors.            
+                    //! rhs0: Lx    diagonal: D.
+                    dqTurbulence(i, j, k, m) = (dqTurbulence(i, j, k, m) - Ux[m] - rhs0[m]) / spectrumTurbulence(i, j, k, m);
+
+                    //! Store the lower forward sweep delta-flux, which will be used in the backward sweep.
+                    deltaFlux(i, j, k, m) += rhs0[m];
+
+                    sweepNormal += SQR(dqTurbulence(i, j, k, m) - dqOld[m]);
+                }
+            }
+        }
+    }
+
+    delete[]dqNeighbor;
+    delete[]prim;
+    delete[]rhs0;
+    delete[]dflux;
+    delete[]mat_abc;
+    delete[]dqOld;
+    delete[]Ux;
+}
+
+void TurbSolverStr::SolveLUSGSBackward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &dqTurbulence = dqProxy->GetField_STR();
+    RDouble4D &deltaFlux = LUplusDQ->GetField_STR();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble *dqNeighbor = new RDouble[nTurbulenceEquation + 1];
+    RDouble *dqOld = new RDouble[nTurbulenceEquation + 1];
+    RDouble *prim = new RDouble[nTurbulenceEquation + 1];
+    RDouble *rhs0 = new RDouble[nTurbulenceEquation + 1];
+    RDouble *dflux = new RDouble[nTurbulenceEquation + 1];
+    RDouble *mat_abc = new RDouble[nTurbulenceEquation + 1];
+    RDouble *Lx = new RDouble[nTurbulenceEquation + 1];
+
+    RDouble4D &spectrumTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_turb"));
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+    RDouble5D &matrixTurbulenceRight = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_turbr"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    Range M(0, nTurbulenceEquation - 1);
+
+    int nDim = GetDim();
+
+    int mst = M.first();
+    int med = M.last();
+
+    for (int k = ked; k >= kst; --k)
+    {
+        for (int j = jed; j >= jst; --j)
+        {
+            for (int i = ied; i >= ist; --i)
+            {
+                for (int m = mst; m <= med; ++m)
+                {
+                    rhs0[m] = 0.0;
+                }
+
+                for (int m = mst; m <= med; ++m)
+                {
+                    //! Back up the old dq, to compute the convergence.
+                    //! The 'dq' is dq*, which has been updated in forward.
+                    dqOld[m] = dqTurbulence(i, j, k, m);
+
+                    //! The dq is not the real dq, now.
+                    //! it is convenient for precondition transform.
+                    dqTurbulence(i, j, k, m) = residualTurbulence(i, j, k, m);
+
+                    Lx[m] = deltaFlux(i, j, k, m);
+
+                    deltaFlux(i, j, k, m) = 0.0;
+                }
+
+                for (int iSurface = 1; iSurface <= nDim; ++iSurface)
+                {
+                    int il, jl, kl, il1, jl1, kl1;
+                    grid->GetNsurfIndex(il1, jl1, kl1, iSurface);
+
+                    grid->GetRightCellOfFace(i, j, k, il1, jl1, kl1, il, jl, kl);
+
+                    for (int m = mst; m <= med; ++m)
+                    {
+                        dqNeighbor[m] = dqTurbulence(il, jl, kl, m);
+                    }
+
+                    for (int m = mst; m <= med; ++m)
+                    {
+                        mat_abc[m] = matrixTurbulenceRight(il, jl, kl, m, iSurface);
+                    }
+
+                    Turb_MxDQ(mat_abc, dqNeighbor, nTurbulenceEquation, dflux);
+
+                    for (int m = mst; m <= med; ++m)
+                    {
+                        rhs0[m] += dflux[m];
+                    }
+                }
+
+                for (int m = mst; m <= med; ++m)
+                {
+                    //! Note: the 'dq' has been updated by the forward sweep.
+                    //! The 'rhs0' is the total Delta Flux of the neighbors.
+                    //! x = {(b - LX) - Ux} / D.
+                    //! rhs0: Ux.    diagonal: D.
+                    dqTurbulence(i, j, k, m) = (dqTurbulence(i, j, k, m) - Lx[m] - rhs0[m]) / spectrumTurbulence(i, j, k, m);
+
+                    //! Store the upper backward sweep delta-flux, which will be used in the forward sweep.
+                    deltaFlux(i, j, k, m) += rhs0[m];
+
+                    sweepNormal += SQR(dqTurbulence(i, j, k, m) - dqOld[m]);
+                }
+            }
+        }
+    }
+
+    delete[]dqNeighbor;
+    delete[]dqOld;
+    delete[]prim;
+    delete[]rhs0;
+    delete[]dflux;
+    delete[]mat_abc;
+    delete[]Lx;
+}
+
+void TurbSolverStr::UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &qTurbulence = qProxy->GetField_STR();
+    RDouble4D &dqTurbulence = dqProxy->GetField_STR();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    int viscousType = parameters->GetViscousType();
+
+    RDouble4D &qpmv = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    Range M(0, nTurbulenceEquation - 1);
+
+    using namespace IDX;
+    if (viscousType == ONE_EQU)
+    {
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    qTurbulence(i, j, k, ISA) = MAX(qTurbulence(i, j, k, ISA) + dqTurbulence(i, j, k, ISA), zero);
+                }
+            }
+        }
+    }
+    else if (viscousType == TWO_EQU)
+    {
+        RDouble *freeStreamTurbVar = parameters->GetFreeStreamTurbVar();
+        RDouble kelim = 1.0e-5 * freeStreamTurbVar[IKE];
+        RDouble kwlim = 1.0e-5 * freeStreamTurbVar[IKW];
+
+        RDouble ke, kw, dke, dkw, rho;
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    rho = qpmv(i, j, k, IR);
+                    ke = qTurbulence(i, j, k, IKE);
+                    kw = qTurbulence(i, j, k, IKW);
+                    dke = dqTurbulence(i, j, k, IKE);
+                    dkw = dqTurbulence(i, j, k, IKW);
+                    ke += dke / rho;
+                    kw += dkw / rho;
+                    ke = MAX(ke, kelim);
+                    kw = MAX(kw, kwlim);
+                    qTurbulence(i, j, k, IKE) = ke;
+                    qTurbulence(i, j, k, IKW) = kw;
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStr::ComputeViscousCoeff(Grid *grid)
+{
+    Viscosity(grid);
+}
+
+void TurbSolverStr::Viscosity(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble3D &wallDistant = *grid->GetWallDist();
+
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousLaminar = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &SST_F2 = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("SST_F2"));
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    RDouble eddyViscosityLimit = parameters->GetEddyViscosityLimit();
+    int transitionType = parameters->GetTransitionType();
+
+    int monitorVistmax = GlobalDataBase::GetIntParaFromDB("monitor_vistmax");
+
+    string viscousName = parameters->GetViscousName();
+
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble reynoldsSquare = refReNumber * refReNumber;
+
+    RDouble viscousTurbulenceMaximum = 0.0;
+    RDouble viscousTurbulenceMinimum = 1.0e30;
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int imax = 1;
+    int jmax = 1;
+    int kmax = 1;
+
+    using namespace IDX;
+
+    if (viscousName.substr(0, 6) == "1eq-sa")
+    {
+        RDouble SA_cv1_cube = parameters->GetSA_cv1_cube();
+
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    RDouble ld = qTurbulence(i, j, k, ISA) * qLaminar(i, j, k, IR) / (viscousLaminar(i, j, k) + SMALL);
+                    RDouble ld3 = ld * ld * ld;
+                    RDouble fv1 = ld3 / (ld3 + SA_cv1_cube);
+                    viscousTurbulence(i, j, k) = qLaminar(i, j, k, IR) * fv1 * qTurbulence(i, j, k, ISA);
+                    viscousTurbulence(i, j, k) = MIN(eddyViscosityLimit, viscousTurbulence(i, j, k));
+                    if (viscousTurbulenceMaximum < viscousTurbulence(i, j, k))
+                    {
+                        viscousTurbulenceMaximum = viscousTurbulence(i, j, k);
+                        imax = i;
+                        jmax = j;
+                        kmax = k;
+                    }
+                }
+            }
+        }
+    }
+    else if (viscousName.substr(0, 6) == "2eq-kw")
+    {
+        //! Two equation models.
+        if (viscousName.substr(0, 17) == "2eq-kw-menter-sst")
+        {
+            //! Original Menter k-w-SST model.
+            RDouble SST_a1 = parameters->GetSST_a1();
+            RDouble SST_betaStar = parameters->GetSST_betaStar();
+
+            Range II, JJ, KK;
+            GetRange(ni, nj, nk, -2, 1, II, JJ, KK);
+
+            RDouble4D &gradUVWTCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+            RDouble4D &gradUVWTCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+            RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+            RDouble3D &SpSdRatio = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("SpSdRatio"));
+
+            for (int k = kst; k <= ked; ++k)
+            {
+                for (int j = jst; j <= jed; ++j)
+                {
+                    for (int i = ist; i <= ied; ++i)
+                    {
+                        RDouble rho = ABS(qLaminar(i, j, k, IR)) + SMALL;
+                        RDouble ke = qTurbulence(i, j, k, IDX::IKE);
+                        RDouble kw = qTurbulence(i, j, k, IDX::IKW);
+                        RDouble ds = wallDistant(i, j, k);
+                        RDouble ds2 = ds * ds;
+
+                        RDouble dudx = gradUVWTCellCenterX(i, j, k, 0);
+                        RDouble dudy = gradUVWTCellCenterY(i, j, k, 0);
+                        RDouble dudz = gradUVWTCellCenterZ(i, j, k, 0);
+
+                        RDouble dvdx = gradUVWTCellCenterX(i, j, k, 1);
+                        RDouble dvdy = gradUVWTCellCenterY(i, j, k, 1);
+                        RDouble dvdz = gradUVWTCellCenterZ(i, j, k, 1);
+
+                        RDouble dwdx = gradUVWTCellCenterX(i, j, k, 2);
+                        RDouble dwdy = gradUVWTCellCenterY(i, j, k, 2);
+                        RDouble dwdz = gradUVWTCellCenterZ(i, j, k, 2);
+
+                        //RDouble vort  = sqrt((dwdy - dvdz) * (dwdy - dvdz) +
+                        //    (dudz - dwdx) * (dudz - dwdx) +
+                        //    (dvdx - dudy) * (dvdx - dudy));
+
+                        RDouble s11 = dudx;
+                        RDouble s22 = dvdy;
+                        RDouble s33 = dwdz;
+                        RDouble s12 = half * (dudy + dvdx);
+                        RDouble s13 = half * (dudz + dwdx);
+                        RDouble s23 = half * (dvdz + dwdy);
+
+                        RDouble sij2 = two * (s11 * s11 + s22 * s22 + s33 * s33 + two * (s12 * s12 + s13 * s13 + s23 * s23));  //! modulus of S.
+                        RDouble Strain = sqrt(sij2);
+
+                        RDouble part1 = two * sqrt(ke) / (SST_betaStar * kw * ds * refReNumber);
+                        RDouble part2 = 500.0 * viscousLaminar(i, j, k) / (rho * kw * ds2 * reynoldsSquare);
+                        RDouble arg2 = MAX(part1, part2);
+                        RDouble f2 = tanh(static_cast<RDouble>(arg2 * arg2));
+                        SST_F2(i, j, k) = f2;
+
+                        RDouble &turbulentViscosity = viscousTurbulence(i, j, k);
+                        turbulentViscosity = rho * ke / MAX(kw, Strain * f2 / (SST_a1 * refReNumber));
+                        if (transitionType == IREGAMA)
+                        {
+                            turbulentViscosity = turbulentViscosity * sqrt(SpSdRatio(i, j, k));
+                        }
+                        turbulentViscosity = MIN(eddyViscosityLimit, turbulentViscosity);
+                        turbulentViscosity = MAX(1.E-5, turbulentViscosity);
+
+                        if (viscousTurbulenceMaximum < viscousTurbulence(i, j, k))
+                        {
+                            viscousTurbulenceMaximum = turbulentViscosity;
+                            imax = i;
+                            jmax = j;
+                            kmax = k;
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    RDouble vist_max = viscousTurbulenceMaximum;
+    RDouble vist_min = viscousTurbulenceMinimum;
+
+    grid->UpdateData("vist_max", &vist_max, PHDOUBLE, 1);
+    grid->UpdateData("vist_min", &vist_min, PHDOUBLE, 1);
+
+#ifdef PH_PARALLEL
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if (myid == server)
+    {
+#endif
+        if (monitorVistmax)
+        {
+            cout << "vistmax = " << viscousTurbulenceMaximum << " " << imax << " " << jmax << " " << kmax << "\n";
+        }
+#ifdef PH_PARALLEL
+    }
+#endif
+}
+
+void TurbSolverStr::Boundary(Grid *gridIn)
+{
+    using namespace PHENGLEI;
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int wallFunctionType = parameters->GetWallFunctionType();
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (IsInterface(BCType))
+        {
+            continue;
+        }
+        else if (BCType == EXTRAPOLATION)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (IsWall(BCType))
+        {
+            if (wallFunctionType == WALLFUNCTION::NONE)
+            {
+                VisWall(grid, structBC);
+            }
+            else if (wallFunctionType == WALLFUNCTION::STANDARD)
+            {
+                VisWallWithWallFunctionStandard(grid, structBC);
+            }
+            else if (wallFunctionType == WALLFUNCTION::PAB3D)
+            {
+                VisWallWithWallFunctionPAB3D(grid, structBC);
+            }
+        }
+        else if (BCType == SYMMETRY)
+        {
+            SymmetryBC(grid, structBC);
+        }
+        else if (BCType == FARFIELD)
+        {
+            FarFieldBC(grid, structBC);
+        }
+        else if (BCType == INFLOW)
+        {
+            InFlowBC(grid, structBC);
+        }
+        else if (BCType == PRESSURE_INLET)
+        {
+            InFlowBC(grid, structBC);
+        }
+        else if (BCType == MASS_FLOW_INLET)
+        {
+            InFlowBC(grid, structBC);
+        }
+        else if (BCType == OUTFLOW)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == PRESSURE_OUTLET)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == MASS_FLOW_OUTLET)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == POLE || BCType / 10 == POLE)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == OVERSET)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == EXTERNAL_BC)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else
+        {
+            ostringstream oss;
+            oss << "Error : Illegal BCtype ID " << BCType << endl;
+            TK_Exit::ExceptionExit(oss);
+        }
+    }
+    CornerPoint(grid);
+}
+
+void TurbSolverStr::CornerPoint(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    FillCornerPoint3D(qTurbulence, ni, nj, nk, nTurbulenceEquation);
+
+    RDouble3D &viscousTurbulence = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("vist"));
+    FillCornerPoint3D(viscousTurbulence, ni, nj, nk);
+}
+
+void TurbSolverStr::InFlowBC(Grid *grid, StructBC *structBC)
+{
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble *freeStreamTurbVar = parameters->GetFreeStreamTurbVar();
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble freeStreamViscosity = parameters->GetFreeStreamViscosity();
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int it, jt, kt;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                for (int layer = 1; layer <= 2; ++layer)
+                {
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    for (int m = 0; m < nTurbulenceEquation; ++m)
+                    {
+                        qTurbulence(it, jt, kt, m) = freeStreamTurbVar[m];
+                    }
+                    viscousTurbulence(it, jt, kt) = freeStreamViscosity;
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStr::OutFlowBC(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                RestrictIndex(is2, js2, ks2, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                for (int m = 0; m < nTurbulenceEquation; ++m)
+                {
+                    qTurbulence(it1, jt1, kt1, m) = two * qTurbulence(is1, js1, ks1, m) - qTurbulence(is2, js2, ks2, m);
+                    qTurbulence(it2, jt2, kt2, m) = two * qTurbulence(it1, jt1, kt1, m) - qTurbulence(is1, js1, ks1, m);
+                }
+                viscousTurbulence(it1, jt1, kt1) = viscousTurbulence(is1, js1, ks1);
+                viscousTurbulence(it2, jt2, kt2) = viscousTurbulence(it1, jt1, kt1);
+            }
+        }
+    }
+}
+
+void TurbSolverStr::SymmetryBC(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int is, js, ks, it, jt, kt;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                for (int layer = 1; layer <= 2; ++layer)
+                {
+                    structBC->GetInsideCellIndex(i, j, k, is, js, ks, layer);
+                    RestrictIndex(is, js, ks, ni - 1, nj - 1, nk - 1);
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    for (int m = 0; m < nTurbulenceEquation; ++m)
+                    {
+                        qTurbulence(it, jt, kt, m) = qTurbulence(is, js, ks, m);
+                    }
+                    viscousTurbulence(it, jt, kt) = viscousTurbulence(is, js, ks);
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStr::VisWall(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &viscousLaminars = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    RDouble3D &wallDistant = *StructGridCast(grid)->GetWallDist();
+
+    RDouble refReNumber = parameters->GetRefReNumber();
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    const RDouble beta1 = 0.075;
+
+    int viscousType = parameters->GetViscousType();
+
+    using namespace IDX;
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                RestrictIndex(is2, js2, ks2, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                if (viscousType == ONE_EQU)
+                {
+                    qTurbulence(it1, jt1, kt1, IDX::ISA) = 0.0;
+                    qTurbulence(it2, jt2, kt2, IDX::ISA) = 0.0;
+                }
+                else if (viscousType == TWO_EQU)
+                {
+                    RDouble density = qLaminar(i, j, k, IR);
+
+                    RDouble dist = wallDistant(i, j, k);
+                    RDouble dist2 = dist * dist;
+                    RDouble muLaminar = viscousLaminars(i, j, k);
+
+                    RDouble kw_wall = 60.0 * muLaminar / (density * beta1 * dist2 * refReNumber * refReNumber);
+
+                    qTurbulence(it1, jt1, kt1, IDX::IKE) = -qTurbulence(is1, js1, ks1, IDX::IKE);
+                    qTurbulence(it2, jt2, kt2, IDX::IKE) = qTurbulence(it1, jt1, kt1, IDX::IKE);
+
+                    qTurbulence(it1, jt1, kt1, IDX::IKW) = 2.0 * kw_wall - qTurbulence(is1, js1, ks1, IDX::IKW);
+                    qTurbulence(it2, jt2, kt2, IDX::IKW) = qTurbulence(it1, jt1, kt1, IDX::IKW);
+                    }
+                viscousTurbulence(it1, jt1, kt1) = -viscousTurbulence(is1, js1, ks1);
+                viscousTurbulence(it2, jt2, kt2) = -viscousTurbulence(is2, js2, ks2);
+            }
+        }
+    }
+}
+
+void TurbSolverStr::VisWallWithWallFunctionStandard(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &viscousLaminars = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble4D &heatTransferCoeff = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("heatTransferCoeff"));
+
+    RDouble4D &faceNormalX = *reinterpret_cast<RDouble4D *> (grid->GetFaceNormalX());
+    RDouble4D &faceNormalY = *reinterpret_cast<RDouble4D *> (grid->GetFaceNormalY());
+    RDouble4D &faceNormalZ = *reinterpret_cast<RDouble4D *> (grid->GetFaceNormalZ());
+
+    RDouble3D &wallDistant = *StructGridCast(grid)->GetWallDist();
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    using namespace IDX;
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+
+    RDouble prandtlLaminar = GlobalDataBase::GetDoubleParaFromDB("prl");
+    RDouble prandtlTurbulence = GlobalDataBase::GetDoubleParaFromDB("prt");
+
+    RDouble jayatillekeP = 9.24 * (pow((prandtlLaminar / prandtlTurbulence), 0.75) - 1.0)
+        * (1.0 + 0.28 * exp(-0.007 * prandtlLaminar / prandtlTurbulence));
+    RDouble refGama = parameters->GetRefGama();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble specificHeatAtConstantPressure = 1.0 / ((refGama - 1.0) * refMachNumber * refMachNumber);
+
+    const RDouble E_ = 9.793;
+    const RDouble beta1 = 0.075;
+    const RDouble yPluslimit = 11.225;
+    const RDouble kappa1 = 0.4178;
+    const RDouble CMu = 0.09;
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                RestrictIndex(is2, js2, ks2, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                RDouble rhoInside = qLaminar(is1, js1, ks1, IDX::IR);
+                RDouble rhoGhost = qLaminar(it1, jt1, kt1, IDX::IR);
+                RDouble densityWall = half * (rhoInside + rhoGhost);
+                RDouble up = qLaminar(is1, js1, ks1, IDX::IU);
+                RDouble vp = qLaminar(is1, js1, ks1, IDX::IV);
+                RDouble wp = qLaminar(is1, js1, ks1, IDX::IW);
+                RDouble laminarViscosity = half * (viscousLaminars(is1, js1, ks1) + viscousLaminars(it1, jt1, kt1));
+                RDouble turbulentViscosity = half * (viscousTurbulence(is1, js1, ks1) + viscousTurbulence(it1, jt1, kt1));
+                RDouble alphaLaminar = laminarViscosity / prandtlLaminar * specificHeatAtConstantPressure;
+                RDouble alphaTurbulent = turbulentViscosity / prandtlTurbulence * specificHeatAtConstantPressure;
+
+                RDouble xfn = faceNormalX(is1, js1, ks1, iSurface);
+                RDouble yfn = faceNormalY(is1, js1, ks1, iSurface);
+                RDouble zfn = faceNormalZ(is1, js1, ks1, iSurface);
+
+                RDouble vpn = up * xfn + vp * yfn + wp * zfn;
+                RDouble vpt = sqrt(up * up + vp * vp + wp * wp - vpn * vpn);
+                RDouble small = 1.0e-15;
+                RDouble uvw = max(vpt, small);
+
+                RDouble wallDistance = wallDistant(is1, js1, ks1);
+
+                //! Obtain the reynold number.
+                RDouble refReNumber = parameters->GetRefReNumber();
+
+                RDouble taow = (laminarViscosity + turbulentViscosity) * uvw / wallDistance / refReNumber;
+                RDouble utao = sqrt(taow / densityWall);
+
+                RDouble yPlus = refReNumber * wallDistance * densityWall * utao / laminarViscosity;
+                RDouble epslon = 1.0;
+                RDouble viscousTurbulenceWall;
+                RDouble tempturePlus=1.0;
+                int iter = 0;
+                while (epslon > 0.001 && ++iter < 10)
+                {
+                    RDouble utemp = utao;
+
+                    if (yPlus > yPluslimit)
+                    {
+                        utao = kappa1 * uvw / (log(E_ * yPlus));
+                        tempturePlus = prandtlTurbulence * (log(E_ * yPlus) / kappa1 + jayatillekeP);
+                    }
+                    else
+                    {
+                        utao = uvw / yPlus;
+                        tempturePlus = prandtlLaminar * yPlus;
+                    }
+                    yPlus = refReNumber * wallDistance * densityWall * utao / laminarViscosity;
+                    taow = densityWall * utao * utao;
+
+                    epslon = abs(utao - utemp) / (abs(utemp) + 1.0e-20);
+                }
+
+                viscousTurbulenceWall = laminarViscosity * (taow / (uvw + small) / laminarViscosity * wallDistance * refReNumber - 1.0);
+                viscousTurbulence(it1, jt1, kt1) = 2.0 * viscousTurbulenceWall - viscousTurbulence(is1, js1, ks1);
+                viscousTurbulence(it2, jt2, kt2) = viscousTurbulence(it1, jt1, kt1);
+
+                //RDouble alphaT = densityWall * wallDistance * utao * specificHeatAtConstantPressure / tempturePlus * refReNumber;
+                RDouble alphaT = densityWall * wallDistance * specificHeatAtConstantPressure / (tempturePlus * pow(CMu, 0.25)) * refReNumber;
+                RDouble alpha = alphaLaminar + alphaTurbulent;
+                heatTransferCoeff(it1, jt1, kt1, ITT) = alphaT - alpha;
+
+                if (viscousType == ONE_EQU)
+                {
+                    qTurbulence(it1, jt1, kt1, IDX::ISA) = -qTurbulence(is1, js1, ks1, IDX::ISA);
+                    qTurbulence(it2, jt2, kt2, IDX::ISA) = qTurbulence(it1, jt1, kt1, IDX::ISA);
+                }
+                else if (viscousType == TWO_EQU)
+                {
+                    RDouble distanceSquare = wallDistance * wallDistance;
+
+                    RDouble omgi = 6.0 * laminarViscosity / (densityWall * beta1 * distanceSquare * refReNumber * refReNumber);
+                    RDouble omgo = utao / (0.126 * wallDistance * refReNumber);
+                    RDouble kwWall = sqrt(omgi * omgi + omgo * omgo);
+
+                    if (yPlus > 11.225)
+                    {
+                        qTurbulence(is1, js1, ks1, IDX::IKW) = kwWall;
+                        qTurbulence(it1, jt1, kt1, IDX::IKW) = 20.0 * kwWall - qTurbulence(is1, js1, ks1, IDX::IKW);
+                        qTurbulence(is1, js1, ks1, IDX::IKE) = qTurbulence(is1, js1, ks1, IDX::IKW) * viscousTurbulence(is1, js1, ks1) / densityWall;
+                        qTurbulence(it1, jt1, kt1, IDX::IKE) = -qTurbulence(is1, js1, ks1, IDX::IKE);
+
+                        qTurbulence(it2, jt2, kt2, IDX::IKW) = qTurbulence(it1, jt1, kt1, IDX::IKW);
+                        qTurbulence(it2, jt2, kt2, IDX::IKE) = qTurbulence(it1, jt1, kt1, IDX::IKE);
+                    }
+                    else
+                    {
+                        qTurbulence(it1, jt1, kt1, IDX::IKW) = 20.0 * omgi - qTurbulence(is1, js1, ks1, IDX::IKW);
+                        qTurbulence(it1, jt1, kt1, IDX::IKE) = -qTurbulence(is1, js1, ks1, IDX::IKE);
+
+                        qTurbulence(it2, jt2, kt2, IDX::IKW) = qTurbulence(it1, jt1, kt1, IDX::IKW);
+                        qTurbulence(it2, jt2, kt2, IDX::IKE) = qTurbulence(it1, jt1, kt1, IDX::IKE);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStr::VisWallWithWallFunctionPAB3D(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    using namespace IDX;
+
+    RDouble paba10[7] = { 2.354039, 0.1179840, -4.2899192e-04, 2.0404148e-06,-5.1775775e-09, 6.2687308e-12, -2.916958e-15 };
+    RDouble paba11[5] = { 5.777191, 6.8756983e-02, -7.1582745e-06, 1.5594904e-09, -1.4865778e-13 };
+    RDouble paba12[5] = { 31.08654, 5.0429072e-02, -2.0072314e-8 };
+    RDouble beta1 = 0.075;
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &viscousLaminars = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    RDouble4D &faceNormalX = *reinterpret_cast<RDouble4D *> (grid->GetFaceNormalX());
+    RDouble4D &faceNormalY = *reinterpret_cast<RDouble4D *> (grid->GetFaceNormalY());
+    RDouble4D &faceNormalZ = *reinterpret_cast<RDouble4D *> (grid->GetFaceNormalZ());
+
+    RDouble3D &wallDistant = *StructGridCast(grid)->GetWallDist();
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    using namespace IDX;
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                int is1, js1, ks1, is2, js2, ks2;
+                int it1, jt1, kt1, it2, jt2, kt2;
+
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                RestrictIndex(is2, js2, ks2, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                RDouble rhoInside = qLaminar(is1, js1, ks1, IDX::IR);
+                RDouble rhoGhost = qLaminar(it1, jt1, kt1, IDX::IR);
+                RDouble up = qLaminar(is1, js1, ks1, IDX::IU);
+                RDouble vp = qLaminar(is1, js1, ks1, IDX::IV);
+                RDouble wp = qLaminar(is1, js1, ks1, IDX::IW);
+                RDouble laminarViscosity = viscousLaminars(is1, js1, ks1);
+
+                RDouble xfn = faceNormalX(is1, js1, ks1, iSurface);
+                RDouble yfn = faceNormalY(is1, js1, ks1, iSurface);
+                RDouble zfn = faceNormalZ(is1, js1, ks1, iSurface);
+
+                RDouble vpn = up * xfn + vp * yfn + wp * zfn;
+                RDouble vpt = sqrt(up * up + vp * vp + wp * wp - vpn * vpn);
+                RDouble small = 1.0e-15;
+                RDouble uvw = max(vpt, small);
+
+                //RDouble uu = sqrt(up * up + vp * vp + wp * wp);
+                RDouble &uu = uvw;
+
+                RDouble wallDistance = wallDistant(is1, js1, ks1);
+
+                RDouble refReNumber = parameters->GetRefReNumber(); //! Obtain the reynold number.
+
+                RDouble rc = rhoInside * refReNumber * wallDistance * uu / laminarViscosity;
+                RDouble xnplus = 0.0;
+                //! The original one here is yPlus.
+                if (rc <= 20.24)
+                {
+                    xnplus = sqrt(rc);
+                }
+                else if (rc <= 435.0)
+                {
+                    xnplus = paba10[0] + paba10[1] * rc + paba10[2] * rc * rc + paba10[3] * rc * rc * rc + paba10[4] * rc * rc * rc * rc + paba10[5] * rc * rc * rc * rc * rc + paba10[6] * rc * rc * rc * rc * rc * rc;
+                }
+                else if (rc <= 4000.0)
+                {
+                    xnplus = paba11[0] + paba11[1] * rc + paba11[2] * rc * rc + paba11[3] * rc * rc * rc + paba11[4] * rc * rc * rc * rc;
+                }
+                else if (rc > 4000.0)
+                {
+                    xnplus = paba12[0] + paba12[1] * rc + paba12[2] * rc * rc;
+                }
+
+                RDouble xnplussav = xnplus;
+
+                //if (xnplus >= Ylim)
+                {
+                    //! Newton iteration to solve for nplus, assuming it is in log region:
+                    for (int iter = 0; ; ++iter)
+                    {
+                        RDouble f = rc / xnplus - 2.44 * (log(xnplus)) - 5.2;
+                        RDouble dfdn = -rc / (xnplus * xnplus) - 2.44 / xnplus;
+                        RDouble delta = -f / dfdn;
+                        xnplus = fabs(xnplus + delta);
+                        if (iter > 10)
+                        {
+                            //! Revert back to approx series soln if Newton iteration fails.
+                            xnplus = xnplussav;
+                            break;
+                        }
+                        else if (abs(delta) < 1.e-3)
+                        {
+                            break;
+                        }
+                    }
+                }
+
+                RDouble viscousTurbulenceWall = laminarViscosity * (laminarViscosity * xnplus * xnplus / (wallDistance * rhoInside * uu * refReNumber) - 1.0);
+                viscousTurbulenceWall = MAX(viscousTurbulenceWall, 0.0);
+                viscousTurbulence(it1, jt1, kt1) = 2.0 * viscousTurbulenceWall - viscousTurbulence(is1, js1, ks1);
+                viscousTurbulence(it2, jt2, kt2) = viscousTurbulence(it1, jt1, kt1);
+
+                if (viscousType == ONE_EQU)
+                {
+                    qTurbulence(it1, jt1, kt1, IDX::ISA) = -qTurbulence(is1, js1, ks1, IDX::ISA);
+                    qTurbulence(it2, jt2, kt2, IDX::ISA) = qTurbulence(it1, jt1, kt1, IDX::ISA);
+                }
+                else if (viscousType == TWO_EQU)
+                {
+                    RDouble distanceSquare = wallDistance * wallDistance;
+
+                    RDouble omgi = 6.0 * laminarViscosity / (rhoInside * beta1 * distanceSquare * refReNumber * refReNumber);
+                    RDouble taow = laminarViscosity * uvw / wallDistance / refReNumber;
+                    RDouble utao = sqrt(taow / rhoInside);
+                    RDouble omgo = utao / (0.126 * wallDistance * refReNumber);
+                    //RDouble omgo = 0.0;
+                    RDouble kwWall = sqrt(omgi * omgi + omgo * omgo);
+
+                    //qTurbulence(is1, js1, ks1, IDX::IKW) = kwWall;
+                    qTurbulence(it1, jt1, kt1, IDX::IKW) = 20.0 * kwWall - qTurbulence(is1, js1, ks1, IDX::IKW);
+                    qTurbulence(it2, jt2, kt2, IDX::IKW) = qTurbulence(it1, jt1, kt1, IDX::IKW);
+
+                    qTurbulence(it1, jt1, kt1, IDX::IKE) = qTurbulence(it1, jt1, kt1, IDX::IKW) * viscousTurbulence(it1, jt1, kt1) / rhoGhost;
+                    //qTurbulence(is1, js1, ks1, IDX::IKE) = qTurbulence(is1, js1, ks1, IDX::IKW) * viscousTurbulence(is1, js1, ks1) / rhoInside;
+                    qTurbulence(it2, jt2, kt2, IDX::IKE) = qTurbulence(it1, jt1, kt1, IDX::IKE);
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStr::FarFieldBC(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &faceNormalX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalZ = *(grid->GetFaceNormalZ());
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    RDouble *freeStreamTurbVar = parameters->GetFreeStreamTurbVar();
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &gamma = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    int nm = GlobalDataBase::GetIntParaFromDB("nm");
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+    RDouble freeStreamViscosity = parameters->GetFreeStreamViscosity();
+
+    using namespace IDX;
+
+    RDouble *primitiveVariablesInfinity = reinterpret_cast<RDouble *> (GlobalDataBase::GetDataPtr("prim_inf"));
+    RDouble rFarfield = primitiveVariablesInfinity[IR];
+    RDouble uFarfield = primitiveVariablesInfinity[IU];
+    RDouble vFarfield = primitiveVariablesInfinity[IV];
+    RDouble wFarfield = primitiveVariablesInfinity[IW];
+    RDouble pFarfield = primitiveVariablesInfinity[IP];
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+    int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+
+    RDouble *prims1 = new RDouble[nm];
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                int in, jn, kn;
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+                RDouble nxs = leftOrRightIndex * faceNormalX(in, jn, kn, iSurface);
+                RDouble nys = leftOrRightIndex * faceNormalY(in, jn, kn, iSurface);
+                RDouble nzs = leftOrRightIndex * faceNormalZ(in, jn, kn, iSurface);
+
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                RestrictIndex(is2, js2, ks2, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                for (int m = 0; m < nm; ++m)
+                {
+                    prims1[m] = qLaminar(is1, js1, ks1, m);
+                }
+
+                RDouble rin = prims1[IR];
+                RDouble uin = prims1[IU];
+                RDouble vin = prims1[IV];
+                RDouble win = prims1[IW];
+                RDouble pin = prims1[IP];
+
+                RDouble vno = nxs * uFarfield + nys * vFarfield + nzs * wFarfield;
+                RDouble vni = nxs * uin + nys * vin + nzs * win;
+                RDouble vei = sqrt(uin * uin + vin * vin + win * win);
+
+                RDouble gama = gamma(is1, js1, ks1);
+
+                RDouble coo = sqrt(ABS(refGama * pFarfield / rFarfield));
+                RDouble cIN = sqrt(ABS(gama * pin / rin));
+
+                if (vei > cIN)
+                {
+                    if (vni >= 0.0)
+                    {
+                        for (int m = 0; m < nTurbulenceEquation; ++m)
+                        {
+                            qTurbulence(it1, jt1, kt1, m) = qTurbulence(is1, js1, ks1, m);
+                            qTurbulence(it2, jt2, kt2, m) = qTurbulence(is2, js2, ks2, m);
+                        }
+                        viscousTurbulence(it1, jt1, kt1) = viscousTurbulence(is1, js1, ks1);
+                        viscousTurbulence(it2, jt2, kt2) = viscousTurbulence(is2, js2, ks2);
+                    }
+                    else
+                    {
+                        for (int m = 0; m < nTurbulenceEquation; ++m)
+                        {
+                            qTurbulence(it1, jt1, kt1, m) = freeStreamTurbVar[m];
+                            qTurbulence(it2, jt2, kt2, m) = freeStreamTurbVar[m];
+                        }
+                        viscousTurbulence(it1, jt1, kt1) = freeStreamViscosity;
+                        viscousTurbulence(it2, jt2, kt2) = freeStreamViscosity;
+                    }
+                    continue;
+                }
+
+                RDouble riemp = vni + 2.0 * cIN / (gama - 1.0);
+                RDouble riemm = vno - 2.0 * coo / (refGama - 1.0);
+                RDouble vnb = half * (riemp + riemm);
+
+                if (vnb >= 0.0)
+                {
+                    //! Exit.
+                    for (int m = 0; m < nTurbulenceEquation; ++m)
+                    {
+                        qTurbulence(it1, jt1, kt1, m) = qTurbulence(is1, js1, ks1, m);
+                        qTurbulence(it2, jt2, kt2, m) = qTurbulence(is2, js2, ks2, m);
+                    }
+                    viscousTurbulence(it1, jt1, kt1) = viscousTurbulence(is1, js1, ks1);
+                    viscousTurbulence(it2, jt2, kt2) = viscousTurbulence(it1, jt1, kt1);
+                }
+                else
+                {
+                    //! Inlet.
+                    for (int m = 0; m < nTurbulenceEquation; ++m)
+                    {
+                        qTurbulence(it1, jt1, kt1, m) = freeStreamTurbVar[m];
+                        qTurbulence(it2, jt2, kt2, m) = freeStreamTurbVar[m];
+                    }
+                    viscousTurbulence(it1, jt1, kt1) = freeStreamViscosity;
+                    viscousTurbulence(it2, jt2, kt2) = freeStreamViscosity;
+                }
+            }
+        }
+    }
+    delete[] prims1;
+}
+
+void TurbSolverStr::WallFunctionStandard(Grid *gridIn, StructBC *structBC, int is, int js, int ks, int it, int jt, int kt, int i, int j, int k)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &faceNormalX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalZ = *(grid->GetFaceNormalZ());
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousLaminars = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &walldist = *StructGridCast(grid)->GetWallDist();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+
+    using namespace IDX;
+
+    RDouble rhoInside = qLaminar(is, js, ks, IDX::IR);
+    RDouble rhoGhost = abs(qLaminar(it, jt, kt, IDX::IR));
+    RDouble densityWall = 0.5 * (rhoInside + rhoGhost);
+    RDouble up = qLaminar(is, js, ks, IDX::IU);
+    RDouble vp = qLaminar(is, js, ks, IDX::IV);
+    RDouble wp = qLaminar(is, js, ks, IDX::IW);
+    RDouble laminarViscosity = viscousLaminars(is, js, ks);
+
+    RDouble xfn = faceNormalX(is, js, ks, iSurface);
+    RDouble yfn = faceNormalY(is, js, ks, iSurface);
+    RDouble zfn = faceNormalZ(is, js, ks, iSurface);
+
+    RDouble vpn = up * xfn + vp * yfn + wp * zfn;
+    RDouble vpt = sqrt(up * up + vp * vp + wp * wp - vpn * vpn);
+    RDouble small = 1.0e-15;
+    RDouble uvw = max(vpt, small);
+
+    RDouble wallDistance = walldist(is, js, ks);
+
+    //! Obtain the reynolds number.
+    RDouble refReNumber = parameters->GetRefReNumber();
+
+    RDouble taow = laminarViscosity * uvw / wallDistance / refReNumber;
+    RDouble utao = sqrt(taow / densityWall);
+
+    RDouble E_ = 9.793;
+    RDouble beta1 = 0.075;
+    RDouble kappa1 = 0.4178;
+
+    const RDouble yPluslimit = 11.225;
+
+    RDouble yPlus;
+    RDouble epslon = 1.0;
+    int iter = 0;
+    while (epslon > 0.001)
+    {
+        yPlus = refReNumber * wallDistance * densityWall * utao / laminarViscosity;
+        yPlus = MAX(yPlus, yPluslimit);
+        RDouble utemp = utao;
+
+        utao = kappa1 * uvw / (log(E_ * yPlus));
+
+        epslon = abs(utao - utemp) / (abs(utemp) + 1.0e-20);
+        if (++iter > 20)
+        {
+            break;
+        }
+    }
+    taow = densityWall * utao * utao;
+    RDouble viscousTurbulenceWall = laminarViscosity * (taow / (uvw + small) / laminarViscosity * wallDistance * refReNumber - 1.0);
+    viscousTurbulence(it, jt, kt) = 2.0 * viscousTurbulenceWall - viscousTurbulence(is, js, ks);
+
+    if (nTurbulenceEquation == 1)
+    {
+        qTurbulence(it, jt, kt, 0) = -qTurbulence(is, js, ks, 0);
+    }
+    else if (nTurbulenceEquation == 2)
+    {
+        RDouble omgi = 60.0 * laminarViscosity / (beta1 * wallDistance * wallDistance * refReNumber * refReNumber);
+        RDouble omgo = utao / (0.126 * wallDistance * refReNumber);
+
+        qTurbulence(it, jt, kt, 1) = 2.0 * sqrt(omgi * omgi + omgo * omgo) - qTurbulence(is, js, ks, 1);
+        qTurbulence(is, js, ks, 0) = qTurbulence(is, js, ks, 1) * viscousTurbulence(is, js, ks) / rhoInside;
+        qTurbulence(it, jt, kt, 0) = qTurbulence(it, jt, kt, 1) * viscousTurbulence(it, jt, kt) / rhoGhost;
+    }
+}
+
+void TurbSolverStr::WallFunctionPab3D(Grid *gridIn, StructBC *structBC, int is, int js, int ks, int it, int jt, int kt, int i, int j, int k)
+{
+    RDouble paba10[7] = { 2.354039, 0.1179840, -4.2899192e-04, 2.0404148e-06,-5.1775775e-09, 6.2687308e-12, -2.916958e-15 };
+    RDouble paba11[5] = { 5.777191, 6.8756983e-02, -7.1582745e-06, 1.5594904e-09, -1.4865778e-13 };
+    RDouble paba12[5] = { 31.08654, 5.0429072e-02, -2.0072314e-8 };
+    RDouble Ylim = 10.0;
+    RDouble beta1 = 0.075;
+
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble4D &qLaminar = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousLaminar = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble4D &temperature = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("t"));
+    RDouble3D &wallDistance = *StructGridCast(grid)->GetWallDist();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    using namespace IDX;
+
+    RDouble up = qLaminar(is, js, ks, IDX::IU);
+    RDouble vp = qLaminar(is, js, ks, IDX::IV);
+    RDouble wp = qLaminar(is, js, ks, IDX::IW);
+    RDouble laminarViscosity = viscousLaminar(is, js, ks);
+
+    RDouble temperatureWall = GlobalDataBase::GetDoubleParaFromDB("wallTemperature");
+    RDouble refDimensionalTemperature = parameters->GetRefDimensionalTemperature();
+    temperatureWall = temperatureWall / refDimensionalTemperature;
+
+    RDouble PrandtlNumber = GlobalDataBase::GetDoubleParaFromDB("prl");
+    RDouble rWF = pow(static_cast<RDouble>(PrandtlNumber), 1.0 / 3.0);
+
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    RDouble refGama = parameters->GetRefGama();
+
+    RDouble uu = sqrt(up * up + vp * vp + wp * wp);
+
+    RDouble wallTemperature = 1.0;
+    if (temperatureWall < 0.0)
+    {
+        RDouble moo2 = refMachNumber * refMachNumber;
+        RDouble cp = 1.0 / (refGama - 1.0) / moo2;
+        RDouble tm = temperature(is, js, ks, IDX::ITT);
+        wallTemperature = tm + 0.5 * rWF * uu * uu / cp;
+    }
+    else
+    {
+        wallTemperature = temperatureWall;
+    }
+
+    RDouble rhoInside = qLaminar(is, js, ks, IDX::IR);
+    RDouble rhoGhost = abs(qLaminar(it, jt, kt, IDX::IR));
+    RDouble densityWall = 0.5 * (rhoInside + rhoGhost);
+
+    RDouble wallDist = wallDistance(is, js, ks);
+
+    RDouble refReNumber = parameters->GetRefReNumber(); //! Obtain the reynolds number.
+    RDouble taow = laminarViscosity * uu / wallDist / refReNumber;
+    RDouble utao = sqrt(taow / densityWall);
+
+    RDouble rc = densityWall * refReNumber * wallDist * uu / laminarViscosity;
+    RDouble xnplus = 0.0;
+    //! The original one here is yPlus.
+    if (rc <= 20.24)
+    {
+        xnplus = sqrt(rc);
+    }
+    else if (rc <= 435.0)
+    {
+        xnplus = paba10[0] + paba10[1] * rc + paba10[2] * rc * rc + paba10[3] * rc * rc * rc + paba10[4] * rc * rc * rc * rc + paba10[5] * rc * rc * rc * rc * rc + paba10[6] * rc * rc * rc * rc * rc * rc;
+    }
+    else if (rc <= 4000.0)
+    {
+        xnplus = paba11[0] + paba11[1] * rc + paba11[2] * rc * rc + paba11[3] * rc * rc * rc + paba11[4] * rc * rc * rc * rc;
+    }
+    else if (rc > 4000.0)
+    {
+        xnplus = paba12[0] + paba12[1] * rc + paba12[2] * rc * rc;
+    }
+    RDouble xnplussav = xnplus;
+    if (xnplus >= Ylim)
+    {
+        //! Newton iteration to solve for nplus, assuming it is in log region:
+        for (int iter = 0; ; ++iter)
+        {
+            RDouble f = rc / xnplus - 2.44 * (log(xnplus)) - 5.2;
+            RDouble dfdn = -rc / (xnplus * xnplus) - 2.44 / xnplus;
+            RDouble delta = -f / dfdn;
+            xnplus = fabs(xnplus + delta);
+            if (iter > 20)
+            {
+                //! Revert back to approx series soln if Newton iteration fails.
+                xnplus = xnplussav;
+                break;
+            }
+            else if (abs(delta) < 1.e-3)
+            {
+                break;
+            }
+        }
+    }
+
+    RDouble xmut = laminarViscosity * (laminarViscosity * xnplus * xnplus / (wallDist * densityWall * uu * refReNumber) - 1.0);
+    viscousTurbulence(it, jt, kt) = 2.0 * xmut - viscousTurbulence(is, js, ks);
+
+    if (nTurbulenceEquation == 1)
+    {
+        qTurbulence(it, jt, kt, 0) = -qTurbulence(is, js, ks, 0);
+    }
+    else if (nTurbulenceEquation == 2)
+    {
+        RDouble omgi = 60.0 * laminarViscosity / (beta1 * wallDist * wallDist * refReNumber * refReNumber);
+        taow = laminarViscosity * uu / wallDist / refReNumber;
+        utao = sqrt(taow / densityWall);
+        RDouble omgo = utao / (0.126 * wallDist * refReNumber);
+        //qTurbulence(is, js, ks, 1) = sqrt(omgi * omgi + omgo * omgo);
+        qTurbulence(it, jt, kt, 1) = 2.0 * sqrt(omgi * omgi + omgo * omgo) - qTurbulence(is, js, ks, 1);
+        qTurbulence(is, js, ks, 0) = qTurbulence(is, js, ks, 1) * viscousTurbulence(is, js, ks) / rhoInside;
+        qTurbulence(it, jt, kt, 0) = qTurbulence(it, jt, kt, 1) * viscousTurbulence(it, jt, kt) / rhoGhost;
+    }
+}
+
+void TurbSolverStr::UploadInterfaceData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = reinterpret_cast<StructGrid *> (GetGrid(level));
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo)
+    {
+        return;
+    }
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    RDouble4D *qTurbulence = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    PHSPACE::UploadInterfaceValue(grid, qTurbulence, "turb::q", nTurbulenceEquation);
+
+    RDouble3D *viscousTurbulence = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    PHSPACE::UploadInterfaceValue(grid, viscousTurbulence, "vist");
+}
+
+void TurbSolverStr::DownloadInterfaceData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = reinterpret_cast<StructGrid *> (GetGrid(level));
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+    if (!interfaceInfo)
+    {
+        return;
+    }
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    RDouble4D *qTurbulence = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    PHSPACE::DownloadInterfaceValue(grid, qTurbulence, "turb::q", nTurbulenceEquation);
+
+    RDouble3D *viscousTurbulence = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    PHSPACE::DownloadInterfaceValue(grid, viscousTurbulence, "vist");
+}
+
+void TurbSolverStr::UploadOversetData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble4D *qTurbulence = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    PHSPACE::UploadOversetValue(grid, qTurbulence, "turb::q", nTurbulenceEquation);
+}
+
+void TurbSolverStr::DownloadOversetData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    StructGrid *grid = StructGridCast(GetGrid(level));
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble4D *qTurbulence = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    PHSPACE::DownloadOversetValue(grid, qTurbulence, "turb::q", nTurbulenceEquation);
+}
+
+void TurbSolverStr::CompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex, const int &nEquation)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &fieldSend = fieldProxy->GetField_STR();
+
+    for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+    {
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForSend[iLocalFace];
+            int is, js, ks;
+            finestGrid->GetSourceIndexIJK(iFace, iGhostLayer + 1, is, js, ks);
+            finestGrid->RemapMultigridIJK(level, is, js, ks);
+            for (int m = 0; m < nEquation; ++m)
+            {
+                PHWrite(dataContainer, fieldSend(is, js, ks, m));
+            }
+        }
+    }
+}
+
+void TurbSolverStr::DecompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex, const int &nEquation)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &fieldRecv = fieldProxy->GetField_STR();
+
+    for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+    {
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForReceive[iLocalFace];
+            int it, jt, kt;
+            finestGrid->GetTargetIndexIJK(iFace, iGhostLayer + 1, it, jt, kt);
+            finestGrid->RemapMultigridIJK(level, it, jt, kt);
+            for (int m = 0; m < nEquation; ++m)
+            {
+                PHRead(dataContainer, fieldRecv(it, jt, kt, m));
+            }
+        }
+    }
+}
+
+void TurbSolverStr::ComputeLengthScaleofOneEquationModel(Grid *gridIn)
+{
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int DESType = parameters->GetDESType();
+    if (DESType == DES)
+    {
+        ComputeDESLength(gridIn);
+    }
+    else if (DESType == DDES)
+    {
+        ComputeDDESLength(gridIn);
+    }
+    else if (DESType == IDDES)
+    {
+        ComputeIDDESLength(gridIn);
+    }
+}
+
+void TurbSolverStr::ComputeLengthScaleofTwoEquationModel(Grid *gridIn)
+{
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int DESType = parameters->GetDESType();
+    if (DESType == DES)
+    {
+        ComputeDESLengthSST(gridIn);
+    }
+    else if (DESType == DDES)
+    {
+        ComputeDDESLengthSST(gridIn);
+    }
+    else if (DESType == IDDES)
+    {
+        ComputeIDDESLengthSST(gridIn);
+    }
+
+    ComputeSSTLength(gridIn);
+
+}
+
+void TurbSolverStr::ComputeDESLength(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble3D *wallDistant = grid->GetWallDist();
+
+    RDouble3D *DESLength = this->GetDESLength();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int DESType = parameters->GetDESType();
+
+    if (!DESLength)
+    {
+        DESLength = new RDouble3D(I, J, K, fortranArray);
+    }
+
+    RDouble3D *LESLength = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *lowReynoldsNumberCorrection = new RDouble3D(I, J, K, fortranArray);
+    ComputeLESLengthofSA(gridIn, LESLength, lowReynoldsNumberCorrection, DESType);
+
+    RDouble lengthRANS, lengthLES;
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                lengthRANS = (*wallDistant)(i, j, k);
+                lengthLES = (*LESLength)(i, j, k);
+                (*DESLength)(i, j, k) = MIN(lengthRANS, lengthLES);
+            }
+        }
+    }
+
+    this->SetDESLength(DESLength);
+
+    delete LESLength;
+    delete lowReynoldsNumberCorrection;
+}
+
+void TurbSolverStr::ComputeDESLengthSST(Grid *gridIn)
+{
+    using namespace IDX;
+
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble3D *DESLength = this->GetDESLength();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int DESType = parameters->GetDESType();
+    RDouble SST_betaStar = parameters->GetSST_betaStar();
+
+    if (!DESLength)
+    {
+        DESLength = new RDouble3D(I, J, K, fortranArray);
+    }
+
+    RDouble3D *LESLength = new RDouble3D(I, J, K, fortranArray);
+    ComputeLESLengthofSST(gridIn, LESLength, DESType);
+
+    RDouble4D &qTurbulent = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble ke = qTurbulent(i, j, k, IKE);
+                RDouble kw = qTurbulent(i, j, k, IKW);
+
+                RDouble lengthRANS = sqrt(ke) / (SST_betaStar * kw);
+                RDouble lengthLES = (*LESLength)(i, j, k);
+                (*DESLength)(i, j, k) = MIN(lengthRANS, lengthLES);
+            }
+        }
+    }
+
+    this->SetDESLength(DESLength);
+
+    delete LESLength;
+}
+
+void TurbSolverStr::ComputeDDESLength(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble3D *wallDistant = grid->GetWallDist();
+
+    RDouble3D *DDESLength = this->GetDESLength();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int DESType = parameters->GetDESType();
+
+    if (!DDESLength)
+    {
+        DDESLength = new RDouble3D(I, J, K, fortranArray);
+    }
+
+    RDouble3D *LESLength = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *lowReynoldsNumberCorrection = new RDouble3D(I, J, K, fortranArray);
+    ComputeLESLengthofSA(gridIn, LESLength, lowReynoldsNumberCorrection, DESType);
+
+    RDouble4D *qLaminar = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D *viscousLaminar = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D *viscousTurbulence = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Range II, JJ, KK;
+    GetRange(ni, nj, nk, -2, 1, II, JJ, KK);
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    using namespace IDX;
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    const RDouble karm = 0.41;
+    const RDouble kap2 = karm * karm;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble laminarViscosity = (*viscousLaminar)(i, j, k);
+                RDouble turbulentViscosity = (*viscousTurbulence)(i, j, k);
+                RDouble density = (*qLaminar)(i, j, k, IR);
+
+                RDouble wallDistance = (*wallDistant)(i, j, k);
+                RDouble wallDistance2 = SQR(wallDistance);
+                RDouble lengthRans = wallDistance;
+                RDouble lengthLes = (*LESLength)(i, j, k);
+
+                RDouble dudx = gradUVWTCellCenterX(i, j, k, 0);
+                RDouble dudy = gradUVWTCellCenterY(i, j, k, 0);
+                RDouble dudz = gradUVWTCellCenterZ(i, j, k, 0);
+
+                RDouble dvdx = gradUVWTCellCenterX(i, j, k, 1);
+                RDouble dvdy = gradUVWTCellCenterY(i, j, k, 1);
+                RDouble dvdz = gradUVWTCellCenterZ(i, j, k, 1);
+
+                RDouble dwdx = gradUVWTCellCenterX(i, j, k, 2);
+                RDouble dwdy = gradUVWTCellCenterY(i, j, k, 2);
+                RDouble dwdz = gradUVWTCellCenterZ(i, j, k, 2);
+
+                RDouble sumOfgradient2 = SQR(dudx, dudy, dudz) +
+                    SQR(dvdx, dvdy, dvdz) +
+                    SQR(dwdx, dwdy, dwdz);
+
+                RDouble nueff = oRefReNumber * (laminarViscosity + turbulentViscosity) / density;
+                RDouble rd = nueff / (kap2 * wallDistance2 * MAX(sqrt(sumOfgradient2), 1.0e-20));
+                RDouble fd = 1.0 - tanh(static_cast<RDouble>(POWER3(8.0 * rd)));
+
+                (*DDESLength)(i, j, k) = lengthRans - fd * MAX(0.0, (lengthRans - lengthLes));
+
+            }
+        }
+    }
+
+    this->SetDESLength(DDESLength);
+
+    delete LESLength;
+    delete lowReynoldsNumberCorrection;
+}
+
+void TurbSolverStr::ComputeDDESLengthSST(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble3D *wallDistant = grid->GetWallDist();
+
+    RDouble3D *DDESLength = this->GetDESLength();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int DESType = parameters->GetDESType();
+
+    if (!DDESLength)
+    {
+        DDESLength = new RDouble3D(I, J, K, fortranArray);
+    }
+
+    RDouble3D *LESLength = new RDouble3D(I, J, K, fortranArray);
+    ComputeLESLengthofSST(gridIn, LESLength, DESType);
+
+    RDouble4D &qTurbulent = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble4D *qLaminar = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D *viscousLaminar = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D *viscousTurbulent = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Range II, JJ, KK;
+    GetRange(ni, nj, nk, -2, 1, II, JJ, KK);
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    using namespace IDX;
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+    RDouble SST_betaStar = parameters->GetSST_betaStar();
+
+    const RDouble karm = 0.41;
+    const RDouble kap2 = karm * karm;
+    const RDouble cdt = 20.0;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble ke = qTurbulent(i, j, k, IKE);
+                RDouble kw = qTurbulent(i, j, k, IKW);
+
+                RDouble laminarViscosity = (*viscousLaminar)(i, j, k);
+                RDouble turbulentViscosity = (*viscousTurbulent)(i, j, k);
+                RDouble density = (*qLaminar)(i, j, k, IR);
+
+                RDouble wallDistance = (*wallDistant)(i, j, k);
+                RDouble wallDistance2 = SQR(wallDistance);
+                RDouble lengthRANS = sqrt(ke) / (SST_betaStar * kw);
+                RDouble lengthLES = (*LESLength)(i, j, k);
+
+                RDouble dudx = gradUVWTCellCenterX(i, j, k, 0);
+                RDouble dudy = gradUVWTCellCenterY(i, j, k, 0);
+                RDouble dudz = gradUVWTCellCenterZ(i, j, k, 0);
+
+                RDouble dvdx = gradUVWTCellCenterX(i, j, k, 1);
+                RDouble dvdy = gradUVWTCellCenterY(i, j, k, 1);
+                RDouble dvdz = gradUVWTCellCenterZ(i, j, k, 1);
+
+                RDouble dwdx = gradUVWTCellCenterX(i, j, k, 2);
+                RDouble dwdy = gradUVWTCellCenterY(i, j, k, 2);
+                RDouble dwdz = gradUVWTCellCenterZ(i, j, k, 2);
+
+                RDouble sumOfgradient2 = SQR(dudx, dudy, dudz) +
+                    SQR(dvdx, dvdy, dvdz) +
+                    SQR(dwdx, dwdy, dwdz);
+
+                RDouble nueff = oRefReNumber * (laminarViscosity + turbulentViscosity) / density;
+                RDouble rd = nueff / (kap2 * wallDistance2 * MAX(sqrt(sumOfgradient2), 1.0e-20));
+                RDouble fd = 1.0 - tanh(static_cast<RDouble>(POWER3(cdt * rd)));
+
+                (*DDESLength)(i, j, k) = lengthRANS - fd * MAX(0.0, (lengthRANS - lengthLES));
+
+            }
+        }
+    }
+
+    this->SetDESLength(DDESLength);
+
+    delete LESLength;
+}
+
+void TurbSolverStr::ComputeIDDESLength(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble3D *wallDistant = grid->GetWallDist();
+
+    RDouble3D *largestLocalGridLength = grid->GetLargestLocalGridLength();
+
+    RDouble3D *IDDESLength = this->GetDESLength();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int DESType = parameters->GetDESType();
+
+    if (!IDDESLength)
+    {
+        IDDESLength = new RDouble3D(I, J, K, fortranArray);
+    }
+
+    RDouble3D *LESLength = new RDouble3D(I, J, K, fortranArray);
+    RDouble3D *lowReynoldsNumberCorrection = new RDouble3D(I, J, K, fortranArray);
+    ComputeLESLengthofSA(gridIn, LESLength, lowReynoldsNumberCorrection, DESType);
+
+    RDouble4D *qLaminar = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D *viscousLaminar = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D *viscousTurbulence = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Range II, JJ, KK;
+    GetRange(ni, nj, nk, -2, 1, II, JJ, KK);
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    using namespace IDX;
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    const RDouble karm = 0.41;
+    const RDouble kap2 = karm * karm;
+
+    RDouble ct = 1.63;
+    RDouble cl = 3.55;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble laminarViscosity = (*viscousLaminar)(i, j, k);
+                RDouble turbulentViscosity = (*viscousTurbulence)(i, j, k);
+                RDouble density = (*qLaminar)(i, j, k, IR);
+                RDouble wallDistance = (*wallDistant)(i, j, k);
+                RDouble wallDistance2 = SQR(wallDistance);
+                RDouble lengthRans = wallDistance;
+                RDouble lengthLes = (*LESLength)(i, j, k);
+                RDouble largestLocalGridSpacing = (*largestLocalGridLength)(i, j, k);
+
+                RDouble alf = 0.25 - wallDistance / largestLocalGridSpacing;
+                RDouble fb = MIN(2.0 * exp(-9.0 * alf * alf), 1.0);
+
+                RDouble dudx = gradUVWTCellCenterX(i, j, k, 0);
+                RDouble dudy = gradUVWTCellCenterY(i, j, k, 0);
+                RDouble dudz = gradUVWTCellCenterZ(i, j, k, 0);
+
+                RDouble dvdx = gradUVWTCellCenterX(i, j, k, 1);
+                RDouble dvdy = gradUVWTCellCenterY(i, j, k, 1);
+                RDouble dvdz = gradUVWTCellCenterZ(i, j, k, 1);
+
+                RDouble dwdx = gradUVWTCellCenterX(i, j, k, 2);
+                RDouble dwdy = gradUVWTCellCenterY(i, j, k, 2);
+                RDouble dwdz = gradUVWTCellCenterZ(i, j, k, 2);
+
+                RDouble sumOfgradient2 = SQR(dudx, dudy, dudz) +
+                    SQR(dvdx, dvdy, dvdz) +
+                    SQR(dwdx, dwdy, dwdz);
+
+                RDouble nuet = oRefReNumber * turbulentViscosity / density;
+                RDouble rdt = nuet / (kap2 * wallDistance2 * MAX(sqrt(sumOfgradient2), 1.0e-10));
+                RDouble ft = tanh(static_cast<RDouble>(POWER3(ct * ct * rdt)));
+
+                RDouble fdt = 1.0 - tanh(static_cast<RDouble>(POWER3(8.0 * rdt)));
+                RDouble fdb = MAX((1.0 - fdt), fb);
+
+                RDouble nuel = oRefReNumber * laminarViscosity / density;
+                RDouble rdl = nuel / (kap2 * wallDistance2 * MAX(sqrt(sumOfgradient2), 1.0e-10));
+                RDouble fl = tanh(static_cast<RDouble>(pow(static_cast<RDouble>(cl * cl * rdl), 10.0)));
+
+                RDouble fe2 = 1.0 - MAX(ft, fl);
+
+                RDouble fe1 = 0.0;
+                if (alf < 0.0)
+                {
+                    fe1 = 2.0 * exp(-9.0 * alf * alf);
+                }
+                else
+                {
+                    fe1 = 2.0 * exp(-11.09 * alf * alf);
+                }
+
+                RDouble fe = fe2 * MAX((fe1 - 1.0), 0.0) * (*lowReynoldsNumberCorrection)(i, j, k);
+
+                (*IDDESLength)(i, j, k) = fdb * (1.0 + fe) * lengthRans + (1.0 - fdb) * lengthLes;
+
+            }
+        }
+    }
+
+    this->SetDESLength(IDDESLength);
+
+    delete LESLength;
+    delete lowReynoldsNumberCorrection;
+}
+
+void TurbSolverStr::ComputeIDDESLengthSST(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble3D *wallDistant = grid->GetWallDist();
+
+    RDouble3D *largestLocalGridLength = grid->GetLargestLocalGridLength();
+
+    RDouble3D *IDDESLength = this->GetDESLength();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int DESType = parameters->GetDESType();
+    RDouble SST_betaStar = parameters->GetSST_betaStar();
+
+    if (!IDDESLength)
+    {
+        IDDESLength = new RDouble3D(I, J, K, fortranArray);
+    }
+
+    RDouble3D *LESLength = new RDouble3D(I, J, K, fortranArray);
+    ComputeLESLengthofSST(gridIn, LESLength, DESType);
+
+    RDouble4D &qTurbulent = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble4D *qLaminar = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D *viscousLaminar = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D *viscousTurbulent = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    Range II, JJ, KK;
+    GetRange(ni, nj, nk, -2, 1, II, JJ, KK);
+
+    RDouble4D &gradUVWTCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &gradUVWTCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    using namespace IDX;
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    const RDouble karm = 0.41;
+    const RDouble kap2 = karm * karm;
+
+    RDouble ct = 1.87;
+    RDouble cl = 5.0;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble ke = qTurbulent(i, j, k, IKE);
+                RDouble kw = qTurbulent(i, j, k, IKW);
+
+                RDouble laminarViscosity = (*viscousLaminar)(i, j, k);
+                RDouble turbulentViscosity = (*viscousTurbulent)(i, j, k);
+                RDouble density = (*qLaminar)(i, j, k, IR);
+                RDouble wallDistance = (*wallDistant)(i, j, k);
+                RDouble wallDistance2 = SQR(wallDistance);
+                RDouble lengthRANS = sqrt(ke) / (SST_betaStar * kw);
+                RDouble lengthLES = (*LESLength)(i, j, k);
+                RDouble largestLocalGridSpacing = (*largestLocalGridLength)(i, j, k);
+
+                RDouble alf = 0.25 - wallDistance / largestLocalGridSpacing;
+                RDouble fb = MIN(2.0 * exp(-9.0 * alf * alf), 1.0);
+
+                RDouble dudx = gradUVWTCellCenterX(i, j, k, 0);
+                RDouble dudy = gradUVWTCellCenterY(i, j, k, 0);
+                RDouble dudz = gradUVWTCellCenterZ(i, j, k, 0);
+
+                RDouble dvdx = gradUVWTCellCenterX(i, j, k, 1);
+                RDouble dvdy = gradUVWTCellCenterY(i, j, k, 1);
+                RDouble dvdz = gradUVWTCellCenterZ(i, j, k, 1);
+
+                RDouble dwdx = gradUVWTCellCenterX(i, j, k, 2);
+                RDouble dwdy = gradUVWTCellCenterY(i, j, k, 2);
+                RDouble dwdz = gradUVWTCellCenterZ(i, j, k, 2);
+
+                RDouble sumOfgradient2 = SQR(dudx, dudy, dudz) +
+                    SQR(dvdx, dvdy, dvdz) +
+                    SQR(dwdx, dwdy, dwdz);
+
+                RDouble nuet = oRefReNumber * turbulentViscosity / density;
+                RDouble rdt = nuet / (kap2 * wallDistance2 * MAX(sqrt(sumOfgradient2), 1.0e-10));
+                RDouble ft = tanh(static_cast<RDouble>(POWER3(ct * ct * rdt)));
+
+                RDouble fdt = 1.0 - tanh(static_cast<RDouble>(POWER3(8.0 * rdt)));
+                RDouble fdb = MAX((1.0 - fdt), fb);
+
+                RDouble nuel = oRefReNumber * laminarViscosity / density;
+                RDouble rdl = nuel / (kap2 * wallDistance2 * MAX(sqrt(sumOfgradient2), 1.0e-10));
+                RDouble fl = tanh(static_cast<RDouble>(pow(static_cast<RDouble>(cl * cl * rdl), 10.0)));
+
+                RDouble fe2 = 1.0 - MAX(ft, fl);
+
+                RDouble fe1 = 0.0;
+                if (alf < 0.0)
+                {
+                    fe1 = 2.0 * exp(-9.0 * alf * alf);
+                }
+                else
+                {
+                    fe1 = 2.0 * exp(-11.09 * alf * alf);
+                }
+
+                RDouble fe = fe2 * MAX((fe1 - 1.0), 0.0);
+
+                (*IDDESLength)(i, j, k) = fdb * (1.0 + fe) * lengthRANS + (1.0 - fdb) * lengthLES;
+
+            }
+        }
+    }
+
+    this->SetDESLength(IDDESLength);
+
+    delete LESLength;
+}
+
+void TurbSolverStr::ComputeSSTLength(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, 0, -1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble3D *SSTLength = this->GetSSTLength();
+
+    if (!SSTLength)
+    {
+        SSTLength = new RDouble3D(I, J, K, fortranArray);
+    }
+
+    RDouble4D &qTurbulent = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    RDouble SST_betaStar = parameters->GetSST_betaStar();
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble ke = qTurbulent(i, j, k, IKE);
+                RDouble kw = qTurbulent(i, j, k, IKW);
+
+                (*SSTLength)(i, j, k) = sqrt(ke) / (SST_betaStar * kw);
+            }
+        }
+    }
+
+    this->SetSSTLength(SSTLength);
+}
+
+RDouble3D *TurbSolverStr::GetLengthScale(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int DESType = parameters->GetDESType();
+
+    if (DESType != 0)
+    {
+        return this->GetDESLength();
+    }
+    else
+    {
+        return grid->GetWallDist();
+    }
+}
+
+RDouble3D *TurbSolverStr::GetLengthScaleSST()
+{
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int DESType = parameters->GetDESType();
+
+    if (DESType != 0)
+    {
+        return this->GetDESLength();
+    }
+    else
+    {
+        return this->GetSSTLength();
+    }
+}
+
+void ComputeLESLengthofSA(Grid *gridIn, RDouble3D *LESLength, RDouble3D *lowReynoldsNumberCorrection, int DESType)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    //! Compute LES length.
+    RDouble CDES = 0.65;
+
+    ComputeLowReynoldsNumberCorrection(gridIn, lowReynoldsNumberCorrection);
+
+    if (DESType == IDDES)
+    {
+        RDouble3D *subGridLength = grid->GetSubgridLength();
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    (*LESLength)(i, j, k) = CDES * (*lowReynoldsNumberCorrection)(i, j, k) * (*subGridLength)(i, j, k);
+                }
+            }
+        }
+    }
+    else
+    {
+        RDouble3D *largestLocalGridLength = grid->GetLargestLocalGridLength();
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    (*LESLength)(i, j, k) = CDES * (*lowReynoldsNumberCorrection)(i, j, k) * (*largestLocalGridLength)(i, j, k);
+                }
+            }
+        }
+    }
+}
+
+void ComputeLESLengthofSST(Grid *gridIn, RDouble3D *LESLength, int DESType)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    //! Compute LES length.
+    //RDouble CDES = 0.65;
+    const RDouble cDES_ke = 0.61, cDES_kw = 0.78;
+
+    RDouble3D &blend = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("blend"));
+
+    if (DESType == IDDES)
+    {
+        RDouble3D *subGridLength = grid->GetSubgridLength();
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    RDouble cblend = blend(i, j, k);
+                    RDouble cDES = cblend * cDES_kw + (1.0 - cblend) * cDES_ke;
+
+                    (*LESLength)(i, j, k) = cDES * (*subGridLength)(i, j, k);
+                }
+            }
+        }
+    }
+    else
+    {
+        RDouble3D *largestLocalGridLength = grid->GetLargestLocalGridLength();
+        for (int k = kst; k <= ked; ++k)
+        {
+            for (int j = jst; j <= jed; ++j)
+            {
+                for (int i = ist; i <= ied; ++i)
+                {
+                    RDouble cblend = blend(i, j, k);
+                    RDouble cDES = cblend * cDES_kw + (1.0 - cblend) * cDES_ke;
+
+                    (*LESLength)(i, j, k) = cDES * (*largestLocalGridLength)(i, j, k);
+                }
+            }
+        }
+    }
+}
+
+void ComputeLowReynoldsNumberCorrection(Grid *gridIn, RDouble3D *lowReynoldsNumberCorrection)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    //! Compute low Reynolds number correction.
+    RDouble4D *qLaminar = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D *viscousLaminar = reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble4D *qTurbulence = reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+
+    const RDouble ct3 = 1.2;
+    const RDouble ct4 = 0.5;
+    const RDouble karm = 0.41;
+    const RDouble cb1 = 0.1355;
+    const RDouble cb2 = 0.622;
+    const RDouble cv1 = 7.1;
+    const RDouble sigma = 2.0 / 3.0;
+    const RDouble cv13 = POWER3(cv1 * cv1 * cv1);
+    const RDouble kap2 = karm * karm;
+    const RDouble rkap2 = one / kap2;
+    const RDouble cw1 = cb1 * rkap2 + (one + cb2) / sigma;
+    const RDouble turbulentFwStar = 0.424;
+
+    using namespace IDX;
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                RDouble nuet = (*qTurbulence)(i, j, k, ISA);
+                RDouble olam = (*qLaminar)(i, j, k, IR) / ((*viscousLaminar)(i, j, k) + SMALL);
+                RDouble xsi = nuet * olam + SMALL;
+                RDouble xsi3 = POWER3(xsi);
+                RDouble xsi2 = SQR(xsi);
+
+                RDouble turbulentFt2 = 0.0;
+                int codeOfFt2 = 0;
+                if (codeOfFt2)
+                {
+                    turbulentFt2 = ct3 * exp(-ct4 * xsi2);
+                }
+
+                RDouble turbulentFv1 = xsi3 / (xsi3 + cv13);
+                RDouble turbulentFv2 = one - xsi / (one + xsi * turbulentFv1);
+
+                RDouble numerator = 1.0 - (cb1 / (cw1 * kap2 * turbulentFwStar)) * (turbulentFt2 + (1.0 - turbulentFt2) * turbulentFv2);
+                RDouble denominator = turbulentFv1 * MAX(1.0e-10, (1.0 - turbulentFt2));
+
+                (*lowReynoldsNumberCorrection)(i, j, k) = sqrt(MIN(1.0e2, numerator / denominator));
+            }
+        }
+    }
+}
+
+}
diff --git a/CFD/TurbSolver/src/TurbSolverStructFD.cpp b/CFD/TurbSolver/src/TurbSolverStructFD.cpp
new file mode 100644
index 0000000..51e8e7a
--- /dev/null
+++ b/CFD/TurbSolver/src/TurbSolverStructFD.cpp
@@ -0,0 +1,2082 @@
+#include "TurbSolverStructFD.h"
+#include "Param_TurbSolverStruct.h"
+#include "TK_Exit.h"
+#include "Glb_Dimension.h"
+#include "GradientOperation.h"
+
+namespace PHSPACE
+{
+TurbSolverStrFD::TurbSolverStrFD()
+{
+}
+
+TurbSolverStrFD::~TurbSolverStrFD()
+{
+}
+
+void TurbSolverStrFD::Boundary(Grid *gridIn)
+{
+}
+
+void TurbSolverStrFD::ComputeViscousCoeff(Grid *grid)
+{
+}
+
+void TurbSolverStrFD::ComputeGradientCellCenter(Grid *gridIn)
+{
+}
+
+void TurbSolverStrFD::GetDependentVariablesforStructHighOrder(Grid *gridIn)
+{
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int viscousType = parameters->GetViscousType();
+
+    ObtainViscousCoefWithGhost(gridIn);
+    ObtainqlqrLowOrder(gridIn);
+    ObtainGradientCellCenter_Laminar(gridIn);
+
+    ObtainViscosity(gridIn);
+    ObtainBoundaryValue(gridIn);
+    ObtainGradientCellCenter(gridIn);
+
+    if(viscousType == TWO_EQU)
+    {
+        ObtainCrossing(gridIn);
+        ObtainBlending(gridIn);
+    }
+}
+
+void TurbSolverStrFD::ObtainViscousCoefWithGhost(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble3D &visl = *reinterpret_cast <RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble4D &q_laminar = *reinterpret_cast <RDouble4D *> (grid->GetDataPtr("q"));    
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    RDouble refMachNumber = parameters->GetRefMachNumber();
+    const RDouble refGama = 1.4;
+    RDouble nonDimensionalSutherlandTemperature = GlobalDataBase::GetDoubleParaFromDB("tsuth");
+
+    Range I, J, K;
+    GetRange(ni, nj, nk, -2, 1, I, J, K);
+
+    int ist, ied, jst, jed, kst, ked;
+    GetIJKRegion(I, J, K, ist, ied, jst, jed, kst, ked);
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble rs = q_laminar(i, j, k, 0);
+                RDouble ps = q_laminar(i, j, k, 4);
+                RDouble tm = refGama * refMachNumber * refMachNumber * ps / rs;
+                visl(i, j, k) = tm * sqrt(tm) * (1.0 + nonDimensionalSutherlandTemperature) / (tm + nonDimensionalSutherlandTemperature);
+            }
+        }
+    }
+}
+
+void TurbSolverStrFD::ObtainqlqrLowOrder(Grid *gridIn)
+{
+    StructGrid * grid = StructGridCast(gridIn);
+
+    FieldProxy *qlProxy = new FieldProxy();
+    FieldProxy *qrProxy = new FieldProxy();
+
+    int nDim = GetDim();
+    for (int nsurf = 1; nsurf <= nDim; ++ nsurf)
+    {
+        if (nsurf == 1)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql1")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr1")));
+        }
+        else if (nsurf == 2)
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql2")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr2")));
+        }
+        else
+        {
+            qlProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("ql3")));
+            qrProxy->SetField_STR(reinterpret_cast <RDouble4D *> (grid->GetDataPtr("qr3")));
+        }
+        
+        GetFaceVariable(grid, qlProxy, qrProxy, nsurf);
+        GetFaceVariableCorrectionAtPhysicalBoundary(grid, qlProxy, qrProxy, nsurf);
+    }
+
+    delete qlProxy;
+    delete qrProxy;
+}
+
+void TurbSolverStrFD::GetFaceVariable(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int nsurf)
+{
+    StructGrid * grid = StructGridCast(gridIn);
+    RDouble4D & q = * reinterpret_cast< RDouble4D * > (grid->GetDataPtr("q"));
+    RDouble4D & ql = qlProxy->GetField_STR();
+    RDouble4D & qr = qrProxy->GetField_STR();
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int il1, jl1, kl1;
+    GetNsurfIndex(nsurf, il1, jl1, kl1);
+    
+    int ist = 1;
+    int jst = 1;
+    int kst = 1;
+    int ied = ni - 1 + il1;
+    int jed = nj - 1 + jl1;
+    int ked = nk - 1 + kl1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }   
+
+    RDouble PlateL[3];
+    RDouble PlateR[3];
+    
+    for (int m = 1; m <= 3; ++m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    for (int ip = 0; ip <= 2; ++ ip)
+                    {
+                        int iL = i + (ip - 2) * il1;
+                        int jL = j + (ip - 2) * jl1;
+                        int kL = k + (ip - 2) * kl1;
+
+                        int iR = i + (1 - ip) * il1;
+                        int jR = j + (1 - ip) * jl1;
+                        int kR = k + (1 - ip) * kl1;
+                        
+                        PlateL[ip] = q(iL, jL, kL, m);
+                        PlateR[ip] = q(iR, jR, kR, m);
+                    }
+                    ql(i - il1, j - jl1, k - kl1, m) = PlateL[1] + half * Limiter_ThirdSmooth(PlateL[2] - PlateL[1], PlateL[1] - PlateL[0]);
+                    qr(i,       j,       k,       m) = PlateR[1] + half * Limiter_ThirdSmooth(PlateR[2] - PlateR[1], PlateR[1] - PlateR[0]);
+                }
+            }
+        }
+    }
+}
+
+RDouble TurbSolverStrFD::Limiter_ThirdSmooth(const RDouble &x, const RDouble &y)
+{
+   const RDouble eps2 = 1.0e-6;
+    RDouble Smooth1 = x * (y * y + 2.0 * eps2) +  y * (2.0 * x * x + eps2);
+    RDouble Smooth2 = 2.0 * x * x - x * y + 2.0 * y * y + 3.0 * eps2;
+    RDouble Smooth = Smooth1 / Smooth2;
+    return  Smooth;
+}
+
+void TurbSolverStrFD::GetFaceVariableCorrectionAtPhysicalBoundary(Grid *gridIn, FieldProxy *qlProxy, FieldProxy *qrProxy, int nsurf)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    RDouble4D & ql = qlProxy->GetField_STR();
+    RDouble4D & qr = qrProxy->GetField_STR();
+    
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *bcregion = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = bcregion->GetBCType();
+        int nsurf_bc = bcregion->GetFaceDirection() + 1;
+        if (!IsWall(BCType) || nsurf_bc != nsurf)
+        {
+            continue;
+        }
+        int ist, ied, jst, jed, kst, ked;
+        bcregion->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+        
+        int il1, jl1, kl1;
+        GetNsurfIndex(nsurf, il1, jl1, kl1);
+
+        int *s_lr3d = bcregion->GetFaceDirectionIndex();
+        int id, jd, kd;
+        GetBCFaceIDX(s_lr3d, id, jd, kd);
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int ibc = i + id;
+                    int jbc = j + jd;
+                    int kbc = k + kd;
+                    
+                    qr(ibc, jbc, kbc, 1) = 0.0;
+                    qr(ibc, jbc, kbc, 2) = 0.0;
+                    qr(ibc, jbc, kbc, 3) = 0.0;
+                    
+                    ql(ibc - il1, jbc - jl1, kbc - kl1, 1) = 0.0;
+                    ql(ibc - il1, jbc - jl1, kbc - kl1, 2) = 0.0;
+                    ql(ibc - il1, jbc - jl1, kbc - kl1, 3) = 0.0;
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStrFD::ObtainGradientCellCenter_Laminar(Grid *gridIn)
+{
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &xfv = *(strgrid->GetFaceVectorX());
+    RDouble4D &yfv = *(strgrid->GetFaceVectorY());
+    RDouble4D &zfv = *(strgrid->GetFaceVectorZ());
+    RDouble3D &volume      = *(strgrid->GetCellVolume());
+
+    int ndim = GetDim();
+
+    RDouble4D &q = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("q"));
+    RDouble4D &dqdx = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterX"));
+    RDouble4D &dqdy = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterY"));
+    RDouble4D &dqdz = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("gradUVWTCellCenterZ"));
+
+    dqdx = 0.0;
+    dqdy = 0.0;
+    dqdz = 0.0;
+
+    for (int iSurface = 1; iSurface <= ndim; ++ iSurface)
+    {
+        int il1, jl1, kl1;
+        GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+        int ist = 1;
+        int ied = ni - 1 + il1;
+        int jst = 1;
+        int jed = nj - 1 + jl1;
+        int kst = 1;
+        int ked = nk - 1 + kl1;
+
+        if (ndim == TWO_D)
+        {
+            ked = 1;
+        }
+        int il, jl, kl;
+
+        //! The gradient of u,v,w.
+        for (int m = 0; m < ndim; ++ m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        il = i - il1;
+                        jl = j - jl1;
+                        kl = k - kl1;
+
+                        RDouble phis = q(i,j,k,m+1) + q(il,jl,kl,m+1);
+
+                        RDouble ddx = phis * xfv(i, j, k, iSurface);
+                        RDouble ddy = phis * yfv(i, j, k, iSurface);
+                        RDouble ddz = phis * zfv(i, j, k, iSurface);
+
+                        dqdx(i ,j ,k ,m) -= ddx;
+                        dqdy(i ,j ,k ,m) -= ddy;
+                        dqdz(i ,j ,k ,m) -= ddz;
+
+                        dqdx(il, jl, kl, m) += ddx;
+                        dqdy(il, jl, kl, m) += ddy;
+                        dqdz(il, jl, kl, m) += ddz;
+                    }
+                }
+            }
+        }
+    }
+
+    int ist = 1;
+    int ied = ni-1;
+    int jst = 1;
+    int jed = nj-1;
+    int kst = 1;
+    int ked = nk-1;
+
+    if (ndim == TWO_D) ked = 1;
+
+    for (int m = 0; m < ndim; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble oov = half / volume(i, j, k);
+                    dqdx(i, j, k, m) *= oov;
+                    dqdy(i, j, k, m) *= oov;
+                    dqdz(i, j, k, m) *= oov;
+                }
+            }
+        }
+    }
+}
+
+
+void TurbSolverStrFD::ObtainBoundaryValue(Grid *gridIn)
+{
+    using namespace PHENGLEI;
+    StructGrid *grid = StructGridCast(gridIn);
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int wallFunctionType = parameters->GetWallFunctionType();
+
+    StructBCSet *structBCSet = grid->GetStructBCSet();
+    int nBCRegion = structBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        StructBC *structBC = structBCSet->GetBCRegion(iBCRegion);
+        int BCType = structBC->GetBCType();
+
+        if (IsInterface(BCType))
+        {
+            continue;
+        }
+        else if (BCType == EXTRAPOLATION)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (IsWall(BCType))
+        {
+            if (wallFunctionType == WALLFUNCTION::NONE)
+            {
+                VisWall(grid, structBC);
+            }
+            else if(wallFunctionType == WALLFUNCTION::STANDARD)
+            { 
+                VisWallWithWallFunctionStandard(grid, structBC);
+            }
+            else if (wallFunctionType == WALLFUNCTION::PAB3D)
+            {
+                VisWallWithWallFunctionPAB3D(grid, structBC);
+            }
+        }
+        else if (BCType == SYMMETRY)
+        {
+            SymmetryBC(grid, structBC);
+        }
+        else if (BCType == FARFIELD)
+        {
+            FarFieldBC(grid, structBC);
+        }
+        else if (BCType == INFLOW)
+        {
+            InFlowBC(grid, structBC);
+        }
+        else if (BCType == OUTFLOW)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == POLE || BCType / 10 == POLE)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else if (BCType == EXTERNAL_BC)
+        {
+            OutFlowBC(grid, structBC);
+        }
+        else
+        {
+            ostringstream oss;
+            oss << "Error : Illegal BCtype ID " << BCType << endl;
+            TK_Exit::ExceptionExit(oss);
+        }
+    }
+    CornerPoint(grid);
+}
+
+void TurbSolverStrFD::ObtainViscosity(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble3D &wallDistant = *grid->GetWallDist();
+
+    RDouble4D &qLaminar          = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousLaminar    = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble4D &qTurbulence       = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &SST_F2            = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("SST_F2"));
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    RDouble eddyViscosityLimit = parameters->GetEddyViscosityLimit();
+
+    int monitorVistmax = GlobalDataBase::GetIntParaFromDB("monitor_vistmax");
+
+    string viscousName = parameters->GetViscousName();
+
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble reynoldsSquare = refReNumber * refReNumber;
+
+    RDouble viscousTurbulenceMaximum = 0.0;
+    RDouble viscousTurbulenceMinimum = 1.0e30;
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int imax = 1;
+    int jmax = 1;
+    int kmax = 1;
+
+    using namespace IDX;
+
+    if (viscousName.substr(0,6) == "1eq-sa")
+    {
+        RDouble SA_cv1_cube = parameters->GetSA_cv1_cube();
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble ld   = qTurbulence(i, j, k, ISA) * qLaminar(i, j, k, IR) / (viscousLaminar(i, j, k) + SMALL);
+                    RDouble ld3  = ld * ld * ld;
+                    RDouble fv1  = ld3 / (ld3 + SA_cv1_cube);
+                    viscousTurbulence(i, j, k) = qLaminar(i, j, k, IR) * fv1 * qTurbulence(i, j, k, ISA);
+                    viscousTurbulence(i, j, k) = MIN(eddyViscosityLimit, viscousTurbulence(i, j, k));
+                    if (viscousTurbulenceMaximum < viscousTurbulence(i, j, k))
+                    {
+                        viscousTurbulenceMaximum =  viscousTurbulence(i, j, k);
+                        imax = i;
+                        jmax = j;
+                        kmax = k;
+                    }
+                }
+            }
+        }
+    }
+    else if (viscousName.substr(0,6) == "2eq-kw")
+    {
+        //! Two equation models.
+        if (viscousName.substr(0,17) == "2eq-kw-menter-sst")
+        {
+            //! Original Menter k-w-SST model.
+            RDouble SST_a1    = parameters->GetSST_a1();
+            RDouble SST_betaStar = parameters->GetSST_betaStar();
+
+            Range II, JJ, KK;
+            GetRange(ni, nj, nk, -2, 1, II, JJ, KK);
+
+            RDouble4D &gradUVWTCellCenterX = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterX"));
+            RDouble4D &gradUVWTCellCenterY = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterY"));
+            RDouble4D &gradUVWTCellCenterZ = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("gradUVWTCellCenterZ"));
+
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        RDouble rho = ABS(qLaminar(i, j, k, IR)) + SMALL;
+                        RDouble ke  = qTurbulence(i, j, k, IDX::IKE);
+                        RDouble kw  = qTurbulence(i, j, k, IDX::IKW);
+                        RDouble ds  = wallDistant(i, j, k);
+                        RDouble ds2 = ds * ds;
+
+                        RDouble dudx = gradUVWTCellCenterX(i, j, k, 0);
+                        RDouble dudy = gradUVWTCellCenterY(i, j, k, 0);
+                        RDouble dudz = gradUVWTCellCenterZ(i, j, k, 0);
+
+                        RDouble dvdx = gradUVWTCellCenterX(i, j, k, 1);
+                        RDouble dvdy = gradUVWTCellCenterY(i, j, k, 1);
+                        RDouble dvdz = gradUVWTCellCenterZ(i, j, k, 1);
+
+                        RDouble dwdx = gradUVWTCellCenterX(i, j, k, 2);
+                        RDouble dwdy = gradUVWTCellCenterY(i, j, k, 2);
+                        RDouble dwdz = gradUVWTCellCenterZ(i, j, k, 2);
+
+                        RDouble s11 = dudx; 
+                        RDouble s22 = dvdy; 
+                        RDouble s33 = dwdz;
+                        RDouble s12 = half * (dudy + dvdx); 
+                        RDouble s13 = half * (dudz + dwdx); 
+                        RDouble s23 = half * (dvdz + dwdy);
+
+                        RDouble sij2 = two * (s11*s11 + s22*s22 + s33*s33 + two*(s12*s12 + s13*s13 + s23*s23));  //! modulus of S.
+                        RDouble Strain = sqrt(sij2);
+
+                        RDouble part1 = two * sqrt(ke) / (SST_betaStar * kw * ds * refReNumber);
+                        RDouble part2 = 500.0 * viscousLaminar(i, j, k) / (rho * kw * ds2 * reynoldsSquare);
+                        RDouble arg2  = MAX(part1, part2);
+                        RDouble f2    = tanh(static_cast<RDouble>(arg2 * arg2));
+                        SST_F2(i, j, k) = f2;
+
+                        RDouble &turbulentViscosity = viscousTurbulence(i, j, k);
+                        turbulentViscosity = rho * ke / MAX(kw, Strain * f2 / (SST_a1 * refReNumber));
+                        turbulentViscosity = MIN(eddyViscosityLimit, turbulentViscosity);
+                        turbulentViscosity = MAX(1.E-5,turbulentViscosity);
+
+                        if (viscousTurbulenceMaximum < viscousTurbulence(i, j, k))
+                        {
+                            viscousTurbulenceMaximum = turbulentViscosity;
+                            imax = i;
+                            jmax = j;
+                            kmax = k;
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    RDouble vist_max = viscousTurbulenceMaximum;
+    RDouble vist_min = viscousTurbulenceMinimum;
+
+    grid->UpdateData("vist_max", &vist_max, PHDOUBLE, 1);
+    grid->UpdateData("vist_min", &vist_min, PHDOUBLE, 1);
+
+#ifdef PH_PARALLEL
+    using namespace PHMPI;
+    int myid = GetCurrentProcessorID();
+    if (myid == server)
+    {
+#endif
+        if (monitorVistmax)
+        {
+            cout << "vistmax = " << viscousTurbulenceMaximum << " " << imax << " " << jmax << " " << kmax << "\n";
+        }
+#ifdef PH_PARALLEL
+    }
+#endif
+}
+
+void TurbSolverStrFD::ObtainGradientCellCenter(Grid *gridIn)
+{
+    StructGrid *strgrid = StructGridCast(gridIn);
+    int ni = strgrid->GetNI();
+    int nj = strgrid->GetNJ();
+    int nk = strgrid->GetNK();
+
+    RDouble4D &faceVectorX = *(strgrid->GetFaceVectorX());
+    RDouble4D &faceVectorY = *(strgrid->GetFaceVectorY());
+    RDouble4D &faceVectorZ = *(strgrid->GetFaceVectorZ());
+    RDouble3D &volume      = *(strgrid->GetCellVolume());
+
+    int ndim = GetDim();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("q_turb"));
+    RDouble4D &gradTurbulenceCellCenterX = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("gradTurbulenceCellCenterX"));
+    RDouble4D &gradTurbulenceCellCenterY = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("gradTurbulenceCellCenterY"));
+    RDouble4D &gradTurbulenceCellCenterZ = *reinterpret_cast<RDouble4D *> (strgrid->GetDataPtr("gradTurbulenceCellCenterZ"));
+
+    gradTurbulenceCellCenterX = 0.0;
+    gradTurbulenceCellCenterY = 0.0;
+    gradTurbulenceCellCenterZ = 0.0;
+
+    for (int iSurface = 1; iSurface <= ndim; ++ iSurface)
+    {
+        int il1, jl1, kl1;
+        GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+        int ist = 1;
+        int ied = ni - 1 + il1;
+        int jst = 1;
+        int jed = nj - 1 + jl1;
+        int kst = 1;
+        int ked = nk - 1 + kl1;
+
+        if (ndim == TWO_D)
+        {
+            ked = 1;
+        }
+        int il, jl, kl;
+
+        //! The gradient of u,v,w.
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            for (int k = kst; k <= ked; ++ k)
+            {
+                for (int j = jst; j <= jed; ++ j)
+                {
+                    for (int i = ist; i <= ied; ++ i)
+                    {
+                        il = i - il1;
+                        jl = j - jl1;
+                        kl = k - kl1;
+
+                        RDouble phis = qTurbulence(i, j, k, m) + qTurbulence(il, jl, kl, m);
+
+                        RDouble ddx = phis * faceVectorX(i, j, k, iSurface);
+                        RDouble ddy = phis * faceVectorY(i, j, k, iSurface);
+                        RDouble ddz = phis * faceVectorZ(i, j, k, iSurface);
+
+                        RDouble &gradTurbccXLeft = gradTurbulenceCellCenterX(i, j, k, m);
+                        RDouble &gradTurbccYLeft = gradTurbulenceCellCenterY(i, j, k, m);
+                        RDouble &gradTurbccZLeft = gradTurbulenceCellCenterZ(i, j, k, m);
+                        gradTurbccXLeft -= ddx;
+                        gradTurbccYLeft -= ddy;
+                        gradTurbccZLeft -= ddz;
+
+                        RDouble &gradTurbccXRight = gradTurbulenceCellCenterX(il, jl, kl, m);
+                        RDouble &gradTurbccYRight = gradTurbulenceCellCenterY(il, jl, kl, m);
+                        RDouble &gradTurbccZRight = gradTurbulenceCellCenterZ(il, jl, kl, m);
+                        gradTurbccXRight += ddx;
+                        gradTurbccYRight += ddy;
+                        gradTurbccZRight += ddz;
+                    }
+                }
+            }
+        }
+    }
+
+    int ist = 1;
+    int ied = ni-1;
+    int jst = 1;
+    int jed = nj-1;
+    int kst = 1;
+    int ked = nk-1;
+
+    if (ndim == TWO_D) ked = 1;
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    RDouble oov = half / volume(i, j, k);
+                    RDouble &gradTurbccX = gradTurbulenceCellCenterX(i, j, k, m);
+                    RDouble &gradTurbccY = gradTurbulenceCellCenterY(i, j, k, m);
+                    RDouble &gradTurbccZ = gradTurbulenceCellCenterZ(i, j, k, m);
+                    gradTurbccX *= oov;
+                    gradTurbccY *= oov;
+                    gradTurbccZ *= oov;
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStrFD::ObtainCrossing(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &cross = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("cross"));
+
+    RDouble4D &faceNormalComponentX = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalComponentY = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalComponentZ = *(grid->GetFaceNormalZ());
+    RDouble4D &area   = *(grid->GetFaceArea()  );
+    RDouble3D &volume = *(grid->GetCellVolume());
+
+    GreenGeo3D greenGeo3D;
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int ndim = GetDim();
+    int js = 1;
+    int ks = 1;
+    if (ndim == 2)
+    {
+        ks = 0;
+    }
+    if (ndim == 1)
+    {
+        js = 0;
+    }
+
+    RDouble dkedx,dkedy,dkedz,dkwdx,dkwdy,dkwdz;
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                Get_SPM(i, j, k, js, ks, ndim, &greenGeo3D, faceNormalComponentX, faceNormalComponentY, faceNormalComponentZ, area, volume);
+                DXDYDZ(qTurbulence, &greenGeo3D, i, j, k, js, ks, IDX::IKE, dkedx, dkedy, dkedz);
+                DXDYDZ(qTurbulence, &greenGeo3D, i, j, k, js, ks, IDX::IKW, dkwdx, dkwdy, dkwdz);
+                RDouble &crossCell = cross(i, j, k);
+                crossCell = dkedx * dkwdx + dkedy * dkwdy + dkedz * dkwdz;
+            }
+        }
+    }
+}
+
+void TurbSolverStrFD::ObtainBlending(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &qLaminar       = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &qTurbulence    = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &viscousLaminar = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+
+    RDouble3D &cross = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("cross"));
+    RDouble3D &blend = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("blend"));
+
+    RDouble3D &walldist = * StructGridCast(grid)->GetWallDist();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+    RDouble oRefReNumberSqr = oRefReNumber * oRefReNumber;
+
+    RDouble betas = 0.09;
+    RDouble sigw2 = 0.856;
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    using namespace IDX;
+
+    //! Compute maximum cross diffusion term across flowfield
+    RDouble cdkwmin = 1.0e-10;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble rho  = qLaminar(i, j, k,IR);
+                RDouble ke   = qTurbulence(i, j, k, IKE);
+                RDouble kw   = qTurbulence(i, j, k, IKW);
+                RDouble crss = cross(i, j, k);
+ 
+                RDouble miuLam = viscousLaminar(i, j, k);
+                RDouble dist   = walldist(i, j, k);
+                RDouble dist2  = dist * dist;
+
+                //! Calculate cd_kw
+                RDouble crossDiff = 2.0 * rho * sigw2 * crss / (kw + SMALL);
+
+                //! Original Menter CD_kw calculation.
+                RDouble cdkw = MAX(crossDiff, cdkwmin);
+
+                //! Calculate arg1.
+                RDouble term1 = sqrt(ABS(ke)) * oRefReNumber /(betas * dist * kw + SMALL);
+                RDouble term2 = 500.0 * miuLam * oRefReNumberSqr / (rho * kw * dist2 + SMALL);
+                RDouble term3 = MAX(term1, term2);
+                RDouble term4 = 4.0 * rho * sigw2 * ke / (cdkw * dist2 + SMALL);
+                RDouble arg1  = MIN(term3, term4);
+     
+                //! Compute the blending function fbsl.
+                RDouble &blendCell = blend(i, j, k);
+                blendCell = tanh(static_cast<RDouble>(arg1 * arg1 * arg1 * arg1));
+            }
+        }
+    }
+    GhostCell3D(blend, ni, nj, nk);
+}
+
+
+void TurbSolverStrFD::CornerPoint(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    FillCornerPoint3D(qTurbulence, ni, nj, nk, nTurbulenceEquation);
+}
+
+void TurbSolverStrFD::InFlowBC(Grid *grid, StructBC *structBC)
+{
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble   *freeStreamTurbVar =  parameters->GetFreeStreamTurbVar();
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble freeStreamViscosity = parameters->GetFreeStreamViscosity();
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int it, jt, kt;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int layer = 1; layer <= 2; ++ layer)
+                {
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulence(it, jt, kt, m) = freeStreamTurbVar[m];
+                    }
+                    viscousTurbulence(it, jt, kt) = freeStreamViscosity;
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStrFD::OutFlowBC(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni-1, nj-1, nk-1);
+                RestrictIndex(is2, js2, ks2, ni-1, nj-1, nk-1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                for (int m = 0; m < nTurbulenceEquation; ++ m)
+                {
+                    qTurbulence(it1, jt1, kt1, m) = two * qTurbulence(is1, js1, ks1, m) - qTurbulence(is2, js2, ks2, m);
+                    qTurbulence(it2, jt2, kt2, m) = two * qTurbulence(it1, jt1, kt1, m) - qTurbulence(is1, js1, ks1, m);
+                }
+                viscousTurbulence(it1, jt1, kt1) = viscousTurbulence(is1, js1, ks1);
+                viscousTurbulence(it2, jt2, kt2) = viscousTurbulence(it1, jt1, kt1);
+            }
+        }
+    }
+}
+
+void TurbSolverStrFD::VisWall(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble4D &qLaminar          = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble4D &qTurbulence       = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &viscousLaminars   = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    RDouble3D &wallDistant = *StructGridCast(grid)->GetWallDist();
+
+    RDouble refReNumber = parameters->GetRefReNumber();
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    const RDouble beta1 = 0.075;
+
+    using namespace IDX;
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni-1, nj-1, nk-1);
+                RestrictIndex(is2, js2, ks2, ni-1, nj-1, nk-1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                if (nTurbulenceEquation == 1)
+                {
+                    qTurbulence(it1, jt1, kt1, IDX::ISA) = 0.0;
+                    qTurbulence(it2, jt2, kt2, IDX::ISA) = 0.0;
+                }
+                else if (nTurbulenceEquation == 2)
+                {
+                    RDouble rho   = qLaminar(i, j, k, IR);
+
+                    RDouble dist  = wallDistant(i, j, k);
+                    RDouble dist2 = dist * dist;
+                    RDouble muLaminar = viscousLaminars(i, j, k);
+
+                    RDouble kw_wall = 60.0 * muLaminar / (rho * beta1 * dist2 * refReNumber * refReNumber);
+
+                    qTurbulence(it1, jt1, kt1, IDX::IKE) = - qTurbulence(is1, js1, ks1, IDX::IKE);
+                    qTurbulence(it2, jt2, kt2, IDX::IKE) =   qTurbulence(it1, jt1, kt1, IDX::IKE);
+          
+                    qTurbulence(it1, jt1, kt1, IDX::IKW) = 2.0 * kw_wall - qTurbulence(is1, js1, ks1, IDX::IKW);
+                    qTurbulence(it2, jt2, kt2, IDX::IKW) = qTurbulence(it1, jt1, kt1, IDX::IKW);
+                }
+                viscousTurbulence(it1, jt1, kt1) = -viscousTurbulence(is1, js1, ks1);
+                viscousTurbulence(it2, jt2, kt2) = -viscousTurbulence(is2, js2, ks2);
+            }
+        }
+    }
+}
+
+void TurbSolverStrFD::VisWallWithWallFunctionStandard(Grid* gridIn, StructBC *structBC)
+{
+    StructGrid* grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble4D& qLaminar = *reinterpret_cast<RDouble4D*> (grid->GetDataPtr("q"));
+    RDouble4D& qTurbulence = *reinterpret_cast<RDouble4D*> (grid->GetDataPtr("q_turb"));
+    RDouble3D& viscousLaminars = *reinterpret_cast<RDouble3D*> (grid->GetDataPtr("visl"));
+    RDouble3D& viscousTurbulence = *reinterpret_cast<RDouble3D*> (grid->GetDataPtr("vist"));
+
+    RDouble4D& faceNormalX = *reinterpret_cast<RDouble4D*> (grid->GetFaceNormalX());
+    RDouble4D& faceNormalY = *reinterpret_cast<RDouble4D*> (grid->GetFaceNormalY());
+    RDouble4D& faceNormalZ = *reinterpret_cast<RDouble4D*> (grid->GetFaceNormalZ());
+
+    RDouble3D& wallDistant = *StructGridCast(grid)->GetWallDist();
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    using namespace IDX;
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+
+    const RDouble E_ = 9.793;
+    const RDouble beta1 = 0.075;
+    const RDouble kappa1 = 0.4178;
+    const RDouble yPluslimit = 11.225;
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                RestrictIndex(is2, js2, ks2, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                RDouble rhoInside = qLaminar(is1, js1, ks1, IDX::IR);
+                RDouble rhoGhost  = qLaminar(it1, jt1, kt1, IDX::IR);
+                RDouble densityWall = 0.5 * (rhoInside + rhoGhost);
+                RDouble up = qLaminar(is1, js1, ks1, IDX::IU);
+                RDouble vp = qLaminar(is1, js1, ks1, IDX::IV);
+                RDouble wp = qLaminar(is1, js1, ks1, IDX::IW);
+                RDouble laminarViscosity = viscousLaminars(is1, js1, ks1);
+
+                RDouble xfn = faceNormalX(is1, js1, ks1, iSurface);
+                RDouble yfn = faceNormalY(is1, js1, ks1, iSurface);
+                RDouble zfn = faceNormalZ(is1, js1, ks1, iSurface);
+
+                RDouble vpn = up * xfn + vp * yfn + wp * zfn;
+                RDouble vpt = sqrt(up * up + vp * vp + wp * wp - vpn * vpn);
+                RDouble small = 1.0e-15;
+                RDouble uvw = max(vpt, small);
+
+                RDouble wallDistance = wallDistant(is1, js1, ks1);
+
+                //! Obtain the reynold number.
+                RDouble refReNumber = parameters->GetRefReNumber();
+
+                RDouble taow = laminarViscosity * uvw / wallDistance / refReNumber;
+                RDouble utao = sqrt(taow / densityWall);
+
+                RDouble yPlus;
+                RDouble epslon = 1.0;
+                int iter = 0;
+                while (epslon > 0.001 && ++iter < 20)
+                {
+                    yPlus = refReNumber * wallDistance * densityWall * utao / laminarViscosity;
+                    yPlus = MAX(yPlus, yPluslimit);
+                    RDouble utemp = utao;
+
+                    utao = kappa1 * uvw / (log(E_ * yPlus));
+
+                    epslon = abs(utao - utemp) / (abs(utemp) + 1.0e-20);
+                }
+                taow = densityWall * utao * utao;
+                RDouble viscousTurbulenceWall = laminarViscosity * (taow / (uvw + small) / laminarViscosity * wallDistance * refReNumber - 1.0);
+                viscousTurbulence(it1, jt1, kt1) = 2.0 * viscousTurbulenceWall - viscousTurbulence(is1, js1, ks1);
+                viscousTurbulence(it2, jt2, kt2) = viscousTurbulence(it1, jt1, kt1);
+
+                if (nTurbulenceEquation == 1)
+                {
+                    qTurbulence(it1, jt1, kt1, IDX::ISA) = -qTurbulence(is1, js1, ks1, IDX::ISA);
+                    qTurbulence(it2, jt2, kt2, IDX::ISA) =  qTurbulence(it1, jt1, kt1, IDX::ISA);
+                }
+                else if (nTurbulenceEquation == 2)
+                {
+                    RDouble distanceSquare = wallDistance * wallDistance;
+
+                    RDouble omgi = 60.0 * laminarViscosity / (rhoInside * beta1 * distanceSquare * refReNumber * refReNumber);
+                    //RDouble omgo = utao / (0.126 * wallDistance * refReNumber);
+                    RDouble omgo = 0.0;
+                    RDouble kwWall = sqrt(omgi * omgi + omgo * omgo);
+
+                    qTurbulence(it1, jt1, kt1, IDX::IKE) = -qTurbulence(is1, js1, ks1, IDX::IKE);
+                    qTurbulence(it2, jt2, kt2, IDX::IKE) =  qTurbulence(it1, jt1, kt1, IDX::IKE);
+
+                    qTurbulence(it1, jt1, kt1, IDX::IKW) = 2.0 * kwWall - qTurbulence(is1, js1, ks1, IDX::IKW);
+                    qTurbulence(it2, jt2, kt2, IDX::IKW) = qTurbulence(it1, jt1, kt1, IDX::IKW);
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStrFD::VisWallWithWallFunctionPAB3D(Grid* gridIn, StructBC *structBC)
+{
+    StructGrid* grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    using namespace IDX;
+
+    RDouble paba10[7] = { 2.354039, 0.1179840, -4.2899192e-04, 2.0404148e-06,-5.1775775e-09, 6.2687308e-12, -2.916958e-15 };
+    RDouble paba11[5] = { 5.777191, 6.8756983e-02, -7.1582745e-06, 1.5594904e-09, -1.4865778e-13 };
+    RDouble paba12[5] = { 31.08654, 5.0429072e-02, -2.0072314e-8 };
+    RDouble beta1 = 0.075;
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble4D& qLaminar = *reinterpret_cast<RDouble4D*> (grid->GetDataPtr("q"));
+    RDouble4D& qTurbulence = *reinterpret_cast<RDouble4D*> (grid->GetDataPtr("q_turb"));
+    RDouble3D& viscousLaminars = *reinterpret_cast<RDouble3D*> (grid->GetDataPtr("visl"));
+    RDouble3D& viscousTurbulence = *reinterpret_cast<RDouble3D*> (grid->GetDataPtr("vist"));
+
+    RDouble4D& faceNormalX = *reinterpret_cast<RDouble4D*> (grid->GetFaceNormalX());
+    RDouble4D& faceNormalY = *reinterpret_cast<RDouble4D*> (grid->GetFaceNormalY());
+    RDouble4D& faceNormalZ = *reinterpret_cast<RDouble4D*> (grid->GetFaceNormalZ());
+
+    RDouble3D& wallDistant = *StructGridCast(grid)->GetWallDist();
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    using namespace IDX;
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+
+    for (int k = kst; k <= ked; ++k)
+    {
+        for (int j = jst; j <= jed; ++j)
+        {
+            for (int i = ist; i <= ied; ++i)
+            {
+                int is1, js1, ks1, is2, js2, ks2;
+                int it1, jt1, kt1, it2, jt2, kt2;
+
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni - 1, nj - 1, nk - 1);
+                RestrictIndex(is2, js2, ks2, ni - 1, nj - 1, nk - 1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                RDouble rhoInside = qLaminar(is1, js1, ks1, IDX::IR);
+                RDouble rhoGhost = qLaminar(it1, jt1, kt1, IDX::IR);
+                RDouble up = qLaminar(is1, js1, ks1, IDX::IU);
+                RDouble vp = qLaminar(is1, js1, ks1, IDX::IV);
+                RDouble wp = qLaminar(is1, js1, ks1, IDX::IW);
+                RDouble laminarViscosity = viscousLaminars(is1, js1, ks1);
+
+                RDouble xfn = faceNormalX(is1, js1, ks1, iSurface);
+                RDouble yfn = faceNormalY(is1, js1, ks1, iSurface);
+                RDouble zfn = faceNormalZ(is1, js1, ks1, iSurface);
+
+                RDouble vpn = up * xfn + vp * yfn + wp * zfn;
+                RDouble vpt = sqrt(up * up + vp * vp + wp * wp - vpn * vpn);
+                RDouble small = 1.0e-15;
+                RDouble uvw = max(vpt, small);
+
+                //RDouble uu = sqrt(up * up + vp * vp + wp * wp);
+                RDouble& uu = uvw;
+
+                RDouble wallDistance = wallDistant(is1, js1, ks1);
+
+                RDouble refReNumber = parameters->GetRefReNumber(); //! Obtain the reynold number.
+
+                RDouble rc = rhoInside * refReNumber * wallDistance * uu / laminarViscosity;
+                RDouble xnplus = 0.0;
+                //! The original one here is yPlus.
+                if (rc <= 20.24)
+                {
+                    xnplus = sqrt(rc);
+                }
+                else if (rc <= 435.0)
+                {
+                    xnplus = paba10[0] + paba10[1] * rc + paba10[2] * rc * rc + paba10[3] * rc * rc * rc + paba10[4] * rc * rc * rc * rc + paba10[5] * rc * rc * rc * rc * rc + paba10[6] * rc * rc * rc * rc * rc * rc;
+                }
+                else if (rc <= 4000.0)
+                {
+                    xnplus = paba11[0] + paba11[1] * rc + paba11[2] * rc * rc + paba11[3] * rc * rc * rc + paba11[4] * rc * rc * rc * rc;
+                }
+                else if (rc > 4000.0)
+                {
+                    xnplus = paba12[0] + paba12[1] * rc + paba12[2] * rc * rc;
+                }
+                RDouble xnplussav = xnplus;
+
+                //if (xnplus >= Ylim)
+                {
+                    //! Newton iteration to solve for nplus, assuming it is in log region:
+                    for (int iter = 0; ; ++iter)
+                    {
+                        RDouble f = rc / xnplus - 2.44 * (log(xnplus)) - 5.2;
+                        RDouble dfdn = -rc / (xnplus * xnplus) - 2.44 / xnplus;
+                        RDouble delta = -f / dfdn;
+                        xnplus = fabs(xnplus + delta);
+                        if (iter > 10)
+                        {
+                            //! Revert back to approx series soln if Newton iteration fails.
+                            xnplus = xnplussav;
+                            break;
+                        }
+                        else if (abs(delta) < 1.e-3)
+                        {
+                            break;
+                        }
+                    }
+                }
+
+                RDouble viscousTurbulenceWall = laminarViscosity * (laminarViscosity * xnplus * xnplus / (wallDistance * rhoInside * uu * refReNumber) - 1.0);
+                viscousTurbulenceWall = MAX(viscousTurbulenceWall, 0.0);
+                viscousTurbulence(it1, jt1, kt1) = 2.0 * viscousTurbulenceWall - viscousTurbulence(is1, js1, ks1);
+                viscousTurbulence(it2, jt2, kt2) = viscousTurbulence(it1, jt1, kt1);
+
+                if (nTurbulenceEquation == 1)
+                {
+                    qTurbulence(it1, jt1, kt1, IDX::ISA) = -qTurbulence(is1, js1, ks1, IDX::ISA);
+                    qTurbulence(it2, jt2, kt2, IDX::ISA) =  qTurbulence(it1, jt1, kt1, IDX::ISA);
+                }
+                else if (nTurbulenceEquation == 2)
+                {
+                    RDouble distanceSquare = wallDistance * wallDistance;
+
+                    RDouble omgi = 60.0 * laminarViscosity / (rhoInside * beta1 * distanceSquare * refReNumber * refReNumber);
+                    RDouble taow = laminarViscosity * uvw / wallDistance / refReNumber;
+                    RDouble utao = sqrt(taow / rhoInside);
+                    RDouble omgo = utao / (0.126 * wallDistance * refReNumber);
+                    RDouble kwWall = sqrt(omgi * omgi + omgo * omgo);
+
+                    qTurbulence(it1, jt1, kt1, IDX::IKW) = 2.0 * kwWall - qTurbulence(is1, js1, ks1, IDX::IKW);
+                    qTurbulence(it2, jt2, kt2, IDX::IKW) = qTurbulence(it1, jt1, kt1, IDX::IKW);
+
+                    qTurbulence(it1, jt1, kt1, IDX::IKE) = qTurbulence(it1, jt1, kt1, IDX::IKW) * viscousTurbulence(it1, jt1, kt1) / rhoGhost;
+                    qTurbulence(it2, jt2, kt2, IDX::IKE) = qTurbulence(it1, jt1, kt1, IDX::IKE);
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStrFD::SymmetryBC(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble4D &qTurbulence       = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int is, js, ks, it, jt, kt;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int layer = 1; layer <= 2; ++ layer)
+                {
+                    structBC->GetInsideCellIndex(i, j, k, is, js, ks, layer);
+                    RestrictIndex(is, js, ks, ni-1, nj-1, nk-1);
+                    structBC->GetGhostCellIndex(i, j, k, it, jt, kt, layer);
+
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulence(it, jt, kt, m) = qTurbulence(is, js, ks, m);
+                    }
+                    viscousTurbulence(it, jt, kt) = viscousTurbulence(is, js, ks);
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStrFD::FarFieldBC(Grid *gridIn, StructBC *structBC)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &faceNormalX  = *(grid->GetFaceNormalX());
+    RDouble4D &faceNormalY  = *(grid->GetFaceNormalY());
+    RDouble4D &faceNormalZ  = *(grid->GetFaceNormalZ());
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    RDouble *freeStreamTurbVar = parameters->GetFreeStreamTurbVar();
+
+    RDouble4D &qTurbulence       = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble4D &qLaminar          = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &gamma             = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("gama"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("vist"));
+
+    int nm = GlobalDataBase::GetIntParaFromDB("nm");
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble refGama = GlobalDataBase::GetDoubleParaFromDB("refGama");
+    RDouble freeStreamViscosity = parameters->GetFreeStreamViscosity();
+
+    using namespace IDX;
+
+    RDouble *primitiveVariablesInfinity = reinterpret_cast<RDouble *> (GlobalDataBase::GetDataPtr("prim_inf"));
+    RDouble rFarfield = primitiveVariablesInfinity[IR];
+    RDouble uFarfield = primitiveVariablesInfinity[IU];
+    RDouble vFarfield = primitiveVariablesInfinity[IV];
+    RDouble wFarfield = primitiveVariablesInfinity[IW];
+    RDouble pFarfield = primitiveVariablesInfinity[IP];
+
+    int ist, ied, jst, jed, kst, ked;
+    structBC->GetIJKRegion(ist, ied, jst, jed, kst, ked);
+
+    int iSurface = structBC->GetFaceDirection() + 1;
+    int leftOrRightIndex = structBC->GetFaceLeftOrRightIndex();
+
+    RDouble *prims1 = new RDouble [nm];
+
+    int is1, js1, ks1, is2, js2, ks2;
+    int it1, jt1, kt1, it2, jt2, kt2;
+
+    using namespace IDX;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                int in, jn, kn;
+                structBC->GetBoundaryFaceIndex(i, j, k, in, jn, kn);
+                RDouble nxs = leftOrRightIndex * faceNormalX(in, jn, kn, iSurface);
+                RDouble nys = leftOrRightIndex * faceNormalY(in, jn, kn, iSurface);
+                RDouble nzs = leftOrRightIndex * faceNormalZ(in, jn, kn, iSurface);
+
+                structBC->GetInsideCellIndex(i, j, k, is1, js1, ks1, 1);
+                structBC->GetInsideCellIndex(i, j, k, is2, js2, ks2, 2);
+
+                RestrictIndex(is1, js1, ks1, ni-1, nj-1, nk-1);
+                RestrictIndex(is2, js2, ks2, ni-1, nj-1, nk-1);
+
+                structBC->GetGhostCellIndex(i, j, k, it1, jt1, kt1, 1);
+                structBC->GetGhostCellIndex(i, j, k, it2, jt2, kt2, 2);
+
+                for (int m = 0; m < nm; ++ m)
+                {
+                    prims1[m] = qLaminar(is1, js1, ks1, m);
+                }
+
+                RDouble rin = prims1[IR];
+                RDouble uin = prims1[IU];
+                RDouble vin = prims1[IV];
+                RDouble win = prims1[IW];
+                RDouble pin = prims1[IP];
+
+                RDouble vno = nxs * uFarfield + nys * vFarfield + nzs * wFarfield;
+                RDouble vni = nxs * uin + nys * vin + nzs * win;
+                RDouble vei = sqrt(uin * uin + vin * vin + win * win);
+
+                RDouble gama = gamma(is1, js1, ks1);
+
+                RDouble coo = sqrt(ABS(refGama * pFarfield / rFarfield));
+                RDouble cIN = sqrt(ABS(gama  * pin / rin));
+
+                if (vei > cIN)
+                {
+                    if (vni >= 0.0)
+                    {
+                        for (int m = 0; m < nTurbulenceEquation; ++ m)
+                        {
+                            qTurbulence(it1, jt1, kt1, m) = qTurbulence(is1, js1, ks1, m);
+                            qTurbulence(it2, jt2, kt2, m) = qTurbulence(is2, js2, ks2, m);
+                        }
+                        viscousTurbulence(it1, jt1, kt1) = viscousTurbulence(is1, js1, ks1);
+                        viscousTurbulence(it2, jt2, kt2) = viscousTurbulence(is2, js2, ks2);
+                    }
+                    else
+                    {
+                        for (int m = 0; m < nTurbulenceEquation; ++ m)
+                        {
+                            qTurbulence(it1, jt1, kt1,m) = freeStreamTurbVar[m];
+                            qTurbulence(it2, jt2, kt2,m) = freeStreamTurbVar[m];
+                        }
+                        viscousTurbulence(it1, jt1, kt1) = freeStreamViscosity;
+                        viscousTurbulence(it2, jt2, kt2) = freeStreamViscosity;
+                    }
+                    continue;
+                }
+
+                RDouble riemp = vni + 2.0 * cIN / (gama  - 1.0);
+                RDouble riemm = vno - 2.0 * coo / (refGama - 1.0);
+                RDouble vnb = half * (riemp + riemm);
+
+                if (vnb >= 0.0)
+                {
+                    //! Exit.
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulence(it1, jt1, kt1, m) = qTurbulence(is1, js1, ks1, m);
+                        qTurbulence(it2, jt2, kt2, m) = qTurbulence(is2, js2, ks2, m);
+                    }
+                    viscousTurbulence(it1, jt1, kt1) = viscousTurbulence(is1, js1, ks1);
+                    viscousTurbulence(it2, jt2, kt2) = viscousTurbulence(it1, jt1, kt1);
+                }
+                else
+                {
+                    //! Inlet.
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulence(it1, jt1, kt1, m) = freeStreamTurbVar[m];
+                        qTurbulence(it2, jt2, kt2, m) = freeStreamTurbVar[m];
+                    }
+                    viscousTurbulence(it1, jt1, kt1) = freeStreamViscosity;
+                    viscousTurbulence(it2, jt2, kt2) = freeStreamViscosity;
+                }
+            }
+        }
+    }
+    delete []prims1;
+}
+
+void TurbSolverStrFD::UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &qTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    RDouble4D &dqTurbulence = dqProxy->GetField_STR();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble4D &qpmv = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    Range M(0, nTurbulenceEquation - 1);
+
+    using namespace IDX;
+    if (nTurbulenceEquation == 1)
+    {
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    qTurbulence(i, j, k,ISA) = MAX(qTurbulence(i, j, k, ISA) + dqTurbulence(i, j, k, ISA), zero);
+                }
+            }
+        }
+    }
+    else if (nTurbulenceEquation == 2)
+    {
+        RDouble   *freeStreamTurbVar =  parameters->GetFreeStreamTurbVar();
+        RDouble kelim = 1.0e-5 * freeStreamTurbVar[IKE];
+        RDouble kwlim = 1.0e-5 * freeStreamTurbVar[IKW];
+
+        RDouble ke,kw,dke,dkw,rho;
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {                  
+                    rho = qpmv(i, j, k,IR);
+                    ke  = qTurbulence(i, j, k, IKE);
+                    kw  = qTurbulence(i, j, k, IKW); 
+                    dke = dqTurbulence(i, j, k, IKE);
+                    dkw = dqTurbulence(i, j, k, IKW);
+                    ke += dke / rho;
+                    kw += dkw / rho;
+                    ke = MAX(ke, kelim);
+                    kw = MAX(kw, kwlim);
+                    qTurbulence(i, j, k, IKE) = ke;
+                    qTurbulence(i, j, k, IKW) = kw;
+                }
+            }
+        }
+    }
+    ObtainViscosity(gridIn);
+    ObtainBoundaryValue(gridIn);
+}
+
+void TurbSolverStrFD::Diagonal(Grid *gridIn)
+{
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    if (nTurbulenceEquation == 1)
+    {
+        SpectrumRadiusOfOneEquation(gridIn);
+    }
+    else if (nTurbulenceEquation == 2)
+    {
+        SpectrumRadiusOfTwoEquation(gridIn);
+    }
+}
+
+void TurbSolverStrFD::SpectrumRadiusOfOneEquation(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &faceVectorX  = *(grid->GetFaceVectorX());
+    RDouble4D &faceVectorY  = *(grid->GetFaceVectorY());
+    RDouble4D &faceVectorZ  = *(grid->GetFaceVectorZ());
+    RDouble3D &volume       = *(grid->GetCellVolume());
+    
+    RDouble4D &qLaminar         = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousLaminar   = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble4D &qTurbulence      = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("q_turb"));
+    
+    RDouble5D &matrixTurbLeft   = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_turbl"));
+    RDouble5D &matrixTurbRight  = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_turbr"));
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+
+    RDouble turbCFLScale = parameters->GetTurbCFLScale();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    //! Initialize some constants.
+    RDouble sigma  = 2.0 / 3.0;
+    RDouble osigma = one / sigma;
+
+    matrixTurbLeft  = 0.0;
+    matrixTurbRight = 0.0;
+
+    int nDim = GetDim();
+
+    using namespace IDX;
+
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        int il1, jl1, kl1;
+        GetNsurfIndex(iSurface, il1, jl1, kl1);
+        
+        int ist = 1 - il1;
+        int jst = 1 - jl1;
+        int kst = 1 - kl1;
+        int ied = ni - 1 + il1;
+        int jed = nj - 1 + jl1;
+        int ked = nk - 1 + kl1;
+        if (nk == 1)
+        {
+            kst = 1;
+            ked = 1;
+        }
+        
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int il = i + il1;
+                    int jl = j + jl1;
+                    int kl = k + kl1;
+
+                    RDouble nx0 = faceVectorX(i, j, k, iSurface);
+                    RDouble ny0 = faceVectorY(i, j, k, iSurface);
+                    RDouble nz0 = faceVectorZ(i, j, k, iSurface);
+
+                    RDouble nx1 = faceVectorX(il, jl, kl, iSurface);
+                    RDouble ny1 = faceVectorY(il, jl, kl, iSurface);
+                    RDouble nz1 = faceVectorZ(il, jl, kl, iSurface);
+
+                    RDouble nx = 0.5 * (nx0 + nx1);
+                    RDouble ny = 0.5 * (ny0 + ny1);
+                    RDouble nz = 0.5 * (nz0 + nz1);
+                    RDouble ns  = nx * nx +  ny * ny +  nz * nz;
+
+                    RDouble ul  = qLaminar(i, j, k, IU);
+                    RDouble vl  = qLaminar(i, j, k, IV);
+                    RDouble wl  = qLaminar(i, j, k, IW);
+                    RDouble Vn = ul * nx + vl * ny + wl * nz;
+                    RDouble absVn = ABS(Vn);
+
+                    RDouble rl = qLaminar(i, j, k, IR);
+                    RDouble nul = qTurbulence(i, j, k, ISA);
+                    RDouble nueff_l = ABS(viscousLaminar(i , j , k) / rl + nul);
+
+                    RDouble cellVolume  = volume(i, j, k);
+                    RDouble oVolume = one / cellVolume;
+
+                    matrixTurbLeft (i, j, k, ISA, iSurface) =   half * (Vn + absVn) + oRefReNumber * oVolume * (osigma * nueff_l * ns);
+                    matrixTurbRight(i, j, k, ISA, iSurface) = - half * (Vn - absVn) + oRefReNumber * oVolume * (osigma * nueff_l * ns);
+                }
+            }
+        }
+    }
+
+    RDouble4D &spectrumTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_turb"));
+    RDouble3D &dt = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("dt"));
+
+    RDouble dualTimeSpectrumC1 = zero;
+    RDouble dualTimeSpectrumC2 = one;
+
+    //! If flow is unsteady, need to count the contribution of unsteady.
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble dualTimeCoefficient[7];
+        const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+        ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+        dualTimeSpectrumC1 = - dualTimeCoefficient[3];
+        dualTimeSpectrumC2 =   dualTimeCoefficient[6];
+    }
+
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble &specTub = spectrumTurbulence(i, j, k, ISA);
+                specTub += dualTimeSpectrumC1 * volume(i, j, k) + dualTimeSpectrumC2 / (turbCFLScale * dt(i, j, k) + SMALL);
+                
+                for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+                {
+                    specTub += matrixTurbLeft (i, j, k, ISA, iSurface) + matrixTurbRight(i, j, k, ISA, iSurface);
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStrFD::SpectrumRadiusOfTwoEquation(Grid *gridIn)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    RDouble4D &faceVectorX  = *(grid->GetFaceVectorX());
+    RDouble4D &faceVectorY  = *(grid->GetFaceVectorY());
+    RDouble4D &faceVectorZ  = *(grid->GetFaceVectorZ());
+    RDouble3D &volume = *(grid->GetCellVolume());
+    
+    RDouble4D &qLaminar          = *reinterpret_cast< RDouble4D *> (grid->GetDataPtr("q"));
+    RDouble3D &viscousLaminar    = *reinterpret_cast< RDouble3D *> (grid->GetDataPtr("visl"));
+    RDouble3D &viscousTurbulence = *reinterpret_cast< RDouble3D *> (grid->GetDataPtr("vist"));
+    RDouble3D &blend             = *reinterpret_cast<RDouble3D *> (grid->GetDataPtr("blend"));
+
+    RDouble5D &matrixTurbLeft  = *reinterpret_cast< RDouble5D *> (grid->GetDataPtr("mat_turbl"));
+    RDouble5D &matrixTurbRight = *reinterpret_cast< RDouble5D *> (grid->GetDataPtr("mat_turbr"));
+
+    matrixTurbLeft  = 0.0;
+    matrixTurbRight = 0.0;
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    RDouble turbCFLScale = parameters->GetTurbCFLScale();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+    RDouble KW_sigmaK1   = parameters->GetKW_sigmaK1();
+    RDouble KW_sigmaK2   = parameters->GetKW_sigmaK2();
+    RDouble KW_sigmaW1   = parameters->GetKW_sigmaW1();
+    RDouble KW_sigmaW2   = parameters->GetKW_sigmaW2();
+    
+    using namespace IDX;
+
+    int mst = 0;
+    int med = 1;
+
+    RDouble work[2];
+
+    int nDim = GetDim();
+    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+    {
+        int il1, jl1, kl1;
+        GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+        int ist = 1 - il1;
+        int jst = 1 - jl1;
+        int kst = 1 - kl1;
+        int ied = ni - 1 + il1;
+        int jed = nj - 1 + jl1;
+        int ked = nk - 1 + kl1;
+        if (nk == 1)
+        {
+            kst = 1;
+            ked = 1;
+        }
+
+        for (int k = kst; k <= ked; ++ k)
+        {
+            for (int j = jst; j <= jed; ++ j)
+            {
+                for (int i = ist; i <= ied; ++ i)
+                {
+                    int il = i + il1;
+                    int jl = j + jl1;
+                    int kl = k + kl1;
+
+                    RDouble nx0 = faceVectorX(i, j, k, iSurface);
+                    RDouble ny0 = faceVectorY(i, j, k, iSurface);
+                    RDouble nz0 = faceVectorZ(i, j, k, iSurface);
+
+                    RDouble nx1 = faceVectorX(il, jl, kl, iSurface);
+                    RDouble ny1 = faceVectorY(il, jl, kl, iSurface);
+                    RDouble nz1 = faceVectorZ(il, jl, kl, iSurface);
+
+                    RDouble nx = 0.5 * (nx0 + nx1);
+                    RDouble ny = 0.5 * (ny0 + ny1);
+                    RDouble nz = 0.5 * (nz0 + nz1);
+                    RDouble ns  = nx * nx + ny * ny + nz * nz;
+
+                    RDouble ul  = qLaminar(i, j, k, IU);
+                    RDouble vl  = qLaminar(i, j, k, IV);
+                    RDouble wl  = qLaminar(i, j, k, IW);
+                    RDouble Vn = ul * nx + vl * ny + wl * nz;
+                    RDouble absVn = ABS(Vn);
+                    
+                    RDouble rhoAverage = qLaminar(i, j, k,IR);
+                    RDouble muLaminarAverage = viscousLaminar(i ,j ,k);
+                    RDouble muTurbulenceAverage = viscousTurbulence(i ,j ,k);
+                    
+                    RDouble cblendAverage = blend(i, j, k);
+                    RDouble tsigKTurbulence = cblendAverage * KW_sigmaK1 + (1.0 - cblendAverage) * KW_sigmaK2;
+                    RDouble tsigWTurbulence = cblendAverage * KW_sigmaW1 + (1.0 - cblendAverage) * KW_sigmaW2;
+                    
+                    RDouble cellVolumeAverage  = volume(i, j, k);
+                    RDouble oVolume = one / cellVolumeAverage;
+                    
+                    work[0] = (muLaminarAverage + muTurbulenceAverage * tsigKTurbulence) / rhoAverage * ns * oVolume * oRefReNumber;
+                    work[1] = (muLaminarAverage + muTurbulenceAverage * tsigWTurbulence) / rhoAverage * ns * oVolume * oRefReNumber;
+                    
+                    for (int m = mst; m <= med; ++ m)
+                    {
+                        matrixTurbLeft (i, j, k, m, iSurface) =   half * (Vn + absVn) + work[m];
+                        matrixTurbRight(i, j, k, m, iSurface) = - half * (Vn - absVn) + work[m];
+                    }
+                }
+            }
+        }
+    }
+
+    RDouble4D &spectrumTurbulence = *reinterpret_cast< RDouble4D *> (grid->GetDataPtr("spec_turb"));
+    RDouble3D &dt = *reinterpret_cast< RDouble3D *> (grid->GetDataPtr("dt"));
+
+    RDouble dualTimeSpectrumC1 = zero;
+    RDouble dualTimeSpectrumC2 = one;
+
+    //! If flow is unsteady, it needs to count the contribution of unsteady.
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble dualTimeCoefficient[7];
+        const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+        ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+        dualTimeSpectrumC1 = - dualTimeCoefficient[3];
+        dualTimeSpectrumC2 =   dualTimeCoefficient[6];
+    }
+
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                RDouble volumeCell = volume(i, j, k);
+                RDouble dtCell = dt(i, j, k);
+                RDouble specTurbDelta = dualTimeSpectrumC1 * volumeCell + dualTimeSpectrumC2 / (turbCFLScale * dtCell + SMALL);
+                for (int m = mst; m <= med; ++ m)
+                {
+                    RDouble &specTur = spectrumTurbulence(i, j, k, m);
+                    specTur += specTurbDelta;
+
+                    for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+                    {
+                        specTur += matrixTurbLeft (i, j, k, m, iSurface) + matrixTurbRight(i, j, k, m, iSurface);
+                    }
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverStrFD::LUSGSInitializationStructHighOrder(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ)
+{
+    StructGrid *grid = StructGridCast(gridIn);   
+    RDouble4D &spectrumTurbulence = *reinterpret_cast< RDouble4D *> (grid->GetDataPtr("spec_turb"));
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+    RDouble4D &dq = dqProxy->GetField_STR();
+    RDouble4D &dRHS = LUplusDQ->GetField_STR();
+    
+    dRHS = 0.0;
+    dq = 0.0;
+    //! This statement is necessary.
+    //! Otherwise debug failed to run for unknown reason.
+
+    int ni = grid->GetNI();
+    int nj = grid->GetNJ();
+    int nk = grid->GetNK();
+
+    int ist = 1;
+    int ied = ni - 1;
+    int jst = 1;
+    int jed = nj - 1;
+    int kst = 1;
+    int ked = nk - 1;
+    if (nk == 1)
+    {
+        kst = 1;
+        ked = 1;
+    }
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int m = 0; m < nTurbulenceEquation; ++ m)
+                {
+                    dq(i, j, k, m) = residualTurbulence(i, j, k, m) / spectrumTurbulence(i, j, k, m);
+                }
+            }
+        }
+    }     
+}
+
+void TurbSolverStrFD::CompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex, const int &nEquation)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = finestInterfaceInfo->GetFaceIndexForSend(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &fieldSend = fieldProxy->GetField_STR();
+
+    for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+    {
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForSend[iLocalFace];
+            int is, js, ks;
+            finestGrid->GetSourceIndexIJK(iFace, iGhostLayer + 1, is, js, ks);
+            finestGrid->RemapMultigridIJK(level, is, js, ks);
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                PHWrite(dataContainer, fieldSend(is, js, ks, m));
+            }
+        }
+    }
+}
+
+void TurbSolverStrFD::DecompressDQ(DataContainer *&dataContainer, FieldProxy *fieldProxy, Grid *gridIn, const int &zoneIndex, const int &neighborZoneIndex, const int &nEquation)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+    int level = grid->GetLevel();
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    StructGrid *finestGrid = StructGridCast(grid->GetFinestGrid());
+    InterfaceInfo *finestInterfaceInfo = finestGrid->GetInterfaceInfo();
+
+    int iNeighborZone                            = finestInterfaceInfo->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = finestInterfaceInfo->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = finestInterfaceInfo->GetFaceIndexForRecv(iNeighborZone);
+
+    dataContainer->moveto_begin();
+
+    RDouble4D &fieldRecv = fieldProxy->GetField_STR();
+
+    for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+    {
+        for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+        {
+            int iFace = interfaceIndexContainerForReceive[iLocalFace];
+            int it, jt, kt;
+            finestGrid->GetTargetIndexIJK(iFace, iGhostLayer + 1, it, jt, kt);
+            finestGrid->RemapMultigridIJK(level, it, jt, kt);
+            for (int m = 0; m < nEquation; ++ m)
+            {
+                PHRead(dataContainer, fieldRecv(it, jt, kt, m));
+            }
+        }
+    }
+}
+
+void TurbSolverStrFD::SolveLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &dqTurbulence = dqProxy->GetField_STR();
+    RDouble4D &dRHS         = LUplusDQ->GetField_STR();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble *dqNeighbor = new RDouble[nTurbulenceEquation];
+    RDouble *df_total   = new RDouble[nTurbulenceEquation];
+    RDouble *df         = new RDouble[nTurbulenceEquation];
+    RDouble *mat_abc    = new RDouble[nTurbulenceEquation];
+
+    RDouble4D &spectrumTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_turb"));
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+    RDouble5D &matrixTurbulenceLeft = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_turbl"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int nDim = GetDim();
+
+    int mst = 0;
+    int med = nTurbulenceEquation - 1;
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                for (int m = mst; m <= med; ++ m)
+                {
+                    df_total[m] = 0.0;
+                }
+                
+                for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+                {
+                    int il1, jl1, kl1;
+                    GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+                    int il = i - il1;
+                    int jl = j - jl1;
+                    int kl = k - kl1;
+
+                    for (int m = mst; m <= med; ++ m)
+                    {
+                        dqNeighbor[m] = dqTurbulence(il, jl, kl, m);
+                        mat_abc[m] = matrixTurbulenceLeft(il, jl, kl, m, iSurface);
+                    }
+
+                    Turb_MxDQ(mat_abc, dqNeighbor, nTurbulenceEquation, df);
+
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        df_total[m] += df[m];
+                    }
+                }
+                
+                for (int m = mst; m <= med; ++ m)
+                {
+                    RDouble dqOld = dqTurbulence(i, j, k, m);
+
+                    dqTurbulence(i, j, k, m) = (residualTurbulence(i, j, k, m) + dRHS(i, j, k, m) + df_total[m]) / spectrumTurbulence(i, j, k, m);
+                    dRHS(i, j, k, m) = df_total[m];
+
+                    sweepNormal += SQR(dqTurbulence(i, j, k, m) - dqOld);
+                }
+            }
+        }
+    }
+
+    delete []dqNeighbor;
+    delete []df_total;
+    delete []df;
+    delete []mat_abc;
+}
+
+void TurbSolverStrFD::SolveLUSGSBackward(Grid *gridIn, FieldProxy * dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    StructGrid *grid = StructGridCast(gridIn);
+
+    RDouble4D &dqTurbulence = dqProxy->GetField_STR();
+    RDouble4D &dRHS         = LUplusDQ->GetField_STR();
+
+    Param_TurbSolverStruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble *dqNeighbor = new RDouble[nTurbulenceEquation];
+    RDouble *df_total   = new RDouble[nTurbulenceEquation];
+    RDouble *df         = new RDouble[nTurbulenceEquation];
+    RDouble *mat_abc    = new RDouble[nTurbulenceEquation];
+
+    RDouble4D &spectrumTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("spec_turb"));
+    RDouble4D &residualTurbulence = *reinterpret_cast<RDouble4D *> (grid->GetDataPtr("res_turb"));
+    RDouble5D &matrixTurbulenceRight = *reinterpret_cast<RDouble5D *> (grid->GetDataPtr("mat_turbr"));
+
+    int ist, ied, jst, jed, kst, ked;
+    grid->GetCellIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    int nDim = GetDim();
+
+    int mst = 0;
+    int med = nTurbulenceEquation - 1;
+
+    for (int k = ked; k >= kst; -- k)
+    {
+        for (int j = jed; j >= jst; -- j)
+        {
+            for (int i = ied; i >= ist; -- i)
+            {
+                for (int m = mst; m <= med; ++ m)
+                {
+                    df_total[m] = 0.0;
+                }
+                
+                for (int iSurface = 1; iSurface <= nDim; ++ iSurface)
+                {
+                    int il1, jl1, kl1;
+                    GetNsurfIndex(iSurface, il1, jl1, kl1);
+
+                    int il = i + il1;
+                    int jl = j + jl1;
+                    int kl = k + kl1;
+
+                    for (int m = mst; m <= med; ++ m)
+                    {
+                        dqNeighbor[m] = dqTurbulence(il, jl, kl, m);
+                        mat_abc[m] = matrixTurbulenceRight(il, jl, kl, m, iSurface);
+                    }
+
+                    Turb_MxDQ(mat_abc, dqNeighbor, nTurbulenceEquation, df);
+
+                    for (int m = mst; m <= med; ++ m)
+                    {
+                        df_total[m] += df[m];
+                    }
+                }
+                
+                for (int m = mst; m <= med; ++ m)
+                {
+                    RDouble dqOld  = dqTurbulence(i, j, k, m);
+
+                    dqTurbulence(i, j, k, m) = (residualTurbulence(i, j, k, m) + dRHS(i, j, k, m) + df_total[m]) / spectrumTurbulence(i, j, k, m);
+                    dRHS(i, j, k, m) = df_total[m];
+
+                    sweepNormal += SQR(dqTurbulence(i, j, k, m) - dqOld);
+                }
+            }
+        }
+    }
+
+    delete []dqNeighbor;
+    delete []df_total;
+    delete []df;
+    delete []mat_abc;
+}
+
+}
\ No newline at end of file
diff --git a/CFD/TurbSolver/src/TurbSolverUnstr.cpp b/CFD/TurbSolver/src/TurbSolverUnstr.cpp
new file mode 100644
index 0000000..5e7b0fb
--- /dev/null
+++ b/CFD/TurbSolver/src/TurbSolverUnstr.cpp
@@ -0,0 +1,8552 @@
+#include "TurbSolverUnstr.h"
+#include "Geo_UnstructBC.h"
+#include "IO_FileName.h"
+#include "MultiGridOperation.h"
+#include "PHMatrix.h"
+#include "TK_Exit.h"
+#include "Param_TurbSolverUnstruct.h"
+#include "Residual.h"
+#include "FieldProxy.h"
+#include "Math_BasisFunction.h"
+#include "Constants.h"
+#include "TK_Log.h"
+#include "IO_FileName.h"
+#include "Transition.h"
+#include "Flux_Inviscid.h"
+#include "Gas.h"
+#ifdef USE_GMRESSOLVER
+#include "Sacado.hpp"
+#endif
+using namespace std;
+
+namespace PHSPACE
+{
+#ifdef USE_GMRESSOLVER
+typedef Sacado::Fad::DFad<RDouble> ADReal;
+#endif
+TurbSolverUnstr::TurbSolverUnstr()
+{
+    DESLength = 0;
+    gradientTurbField = 0;
+    gradientVelocity = 0;
+}
+
+TurbSolverUnstr::~TurbSolverUnstr()
+{
+    DeAllocateGlobalVariables();
+
+    delete []DESLength; 
+    DESLength = 0;
+
+    FreeControlParameters();
+}
+
+void TurbSolverUnstr::AllocateGlobalVar(Grid *gridIn)
+{
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    int viscoueType = parameters->GetViscousType();
+    if (nTurbulenceEquation == 0) return;
+
+    int transitionType = parameters->GetTransitionType();
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfTotalFace    = grid->GetNTotalFace();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    RDouble **qTurbulence        = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotal);
+    RDouble **residualTurbulence = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotal);
+    RDouble **spectrumTurbulence = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotal);
+
+    grid->UpdateDataPtr("q_turb"   , qTurbulence      );    //! Unknown variable of turbulent model.
+    grid->UpdateDataPtr("res_turb" , residualTurbulence);    //! Residual or right-hand side.
+    grid->UpdateDataPtr("spec_turb", spectrumTurbulence);    //! Spectral radius of turbulent model.
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+    int nTurboZone = 0;
+    if(referenceFrame)
+    {
+        nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+    }
+
+#ifdef USE_GMRESSOLVER
+    //! GMRESturb
+    int originaltscheme = GlobalDataBase::GetIntParaFromDB("OriginalTscheme");
+
+    if( originaltscheme == GMRES )
+    {
+
+        vector<int> AI = grid->GetJacobianAI4GMRES();
+        int TotalSize = AI[numberOfTotal];
+        RDouble** dRdq_turb = NewPointer2<RDouble>(nTurbulenceEquation, nTurbulenceEquation * TotalSize);
+        grid->UpdateDataPtr("dRdq_turb", dRdq_turb);
+        PHSPACE::SetField(dRdq_turb, nTurbulenceEquation, nTurbulenceEquation * TotalSize, 0.0);
+
+        // GMRESCoupled1st
+        vector<int> AI1st   = grid->GetJacobianAI1st4GMRES(); 
+        int JacOrder        = grid->GetJacobianOrder();
+        if( JacOrder == 2 )
+        {
+            int TotalSize1st            = AI1st[numberOfTotal];
+            RDouble** dRdq_turb1st      = NewPointer2<RDouble>(nTurbulenceEquation, nTurbulenceEquation * TotalSize1st);
+            grid->UpdateDataPtr("dRdq_turb1st", dRdq_turb1st);
+            PHSPACE::SetField(dRdq_turb1st, nTurbulenceEquation, nTurbulenceEquation * TotalSize1st, 0.0);
+        }
+        else
+        {
+            RDouble** dRdq_turb1st = NewPointer2<RDouble>(1,1);
+            grid->UpdateDataPtr("dRdq_turb1st",dRdq_turb1st);
+        }
+
+    }
+
+
+    RDouble **dDdP_turb = NewPointer2<RDouble>(nTurbulenceEquation, nTurbulenceEquation*numberOfBoundaryFace);
+    grid->UpdateDataPtr("dDdP_turb", dDdP_turb);
+    PHSPACE::SetField(dDdP_turb, nTurbulenceEquation, nTurbulenceEquation*numberOfBoundaryFace, 0.0);
+#endif
+
+    RDouble **gradientTurbulenceX = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotal);
+    RDouble **gradientTurbulenceY = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotal);
+    RDouble **gradientTurbulenceZ = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotal);
+
+    grid->UpdateDataPtr("gradTurbulenceX", gradientTurbulenceX);
+    grid->UpdateDataPtr("gradTurbulenceY", gradientTurbulenceY);
+    grid->UpdateDataPtr("gradTurbulenceZ", gradientTurbulenceZ);
+
+    //! Temporary variable for periodic boundary condition.
+    RDouble **rotNSgradValueX = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotal);
+    RDouble **rotNSgradValueY = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotal);
+    RDouble **rotNSgradValueZ = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotal);
+    grid->UpdateDataPtr("rotTurbgradValueX", rotNSgradValueX);
+    grid->UpdateDataPtr("rotTurbgradValueY", rotNSgradValueY);
+    grid->UpdateDataPtr("rotTurbgradValueZ", rotNSgradValueZ);
+
+    //! allocate mixing plane variables.
+    //! for multi-row turbomachinery.
+    if (nTurboZone > 0)
+    {
+        int nSpanSection = PHSPACE::GlobalDataBase::GetIntParaFromDB("nSpanSection");
+        int nType = 2;
+
+        //! zone with MixingIn and MixingOut.
+        int nFlag = 10 * nTurboZone + 2;
+
+        RDouble ***SpanTurbFlux      = NewPointer3<RDouble>(nFlag, nTurbulenceEquation, nSpanSection);
+        RDouble ***qTurb_Span        = NewPointer3<RDouble>(nFlag, nTurbulenceEquation, nSpanSection);
+        RDouble ***qTurbSpanNeighbor = NewPointer3<RDouble>(nFlag, nTurbulenceEquation, nSpanSection);
+        RDouble ***dqTurbSpanIn      = NewPointer3<RDouble>(nFlag, nTurbulenceEquation, nSpanSection);
+        RDouble ***dqTurbSpanEx      = NewPointer3<RDouble>(nFlag, nTurbulenceEquation, nSpanSection);
+        RDouble ***dcTurbSpan        = NewPointer3<RDouble>(nFlag, nTurbulenceEquation, nSpanSection);
+        InitMixingPlane(SpanTurbFlux, nFlag, nTurbulenceEquation, nSpanSection, zero);
+        InitMixingPlane(qTurb_Span, nFlag, nTurbulenceEquation, nSpanSection, zero);
+        InitMixingPlane(qTurbSpanNeighbor, nFlag, nTurbulenceEquation, nSpanSection, zero);
+        InitMixingPlane(dqTurbSpanIn, nFlag, nTurbulenceEquation, nSpanSection, zero);
+        InitMixingPlane(dqTurbSpanEx, nFlag, nTurbulenceEquation, nSpanSection, zero);
+        InitMixingPlane(dcTurbSpan, nFlag, nTurbulenceEquation, nSpanSection, zero);
+        grid->UpdateDataPtr("SpanTurbFlux", SpanTurbFlux);
+        grid->UpdateDataPtr("qTurb_Span", qTurb_Span);
+        grid->UpdateDataPtr("qTurbSpanNeighbor", qTurbSpanNeighbor);
+        grid->UpdateDataPtr("dqTurbSpanIn", dqTurbSpanIn);
+        grid->UpdateDataPtr("dqTurbSpanEx", dqTurbSpanEx);
+        grid->UpdateDataPtr("dcTurbSpan", dcTurbSpan);
+    }
+
+    int numberOfTotalNode = grid->GetNTotalNode();
+    RDouble **qTurbulenceNode = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotalNode);
+    grid->UpdateDataPtr("qTurbNode", qTurbulenceNode);    //! Unknown variable of turbulent model at node.
+
+    int *nodeValueSliceTurb = new int[numberOfTotalNode];
+    grid->UpdateDataPtr("nodeValueSliceTurb", nodeValueSliceTurb);
+
+    int *nodeValueSliceTurbTrade = new int[numberOfTotalNode];
+    PHSPACE::SetField(nodeValueSliceTurbTrade, 0, numberOfTotalNode);
+    grid->UpdateDataPtr("nodeValueSliceTurbTrade", nodeValueSliceTurbTrade);
+
+    InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+    if (interpointInformation)
+    {
+        int numberOfInterPoint = interpointInformation->GetNumberOfInterpoints();
+        RDouble **qTurbulenceInterPoint = NewPointer2<RDouble>(nTurbulenceEquation, numberOfInterPoint);
+        grid->UpdateDataPtr("turb::qInterpoint", qTurbulenceInterPoint);    //! Unknown variable of turbulent model at interPoint.
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble **qTurbulenceUnsteadyN1 = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotal);
+        RDouble **qTurbulenceUnsteadyN2 = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotal);
+        RDouble **residualTurbulenceUnsteadyN1 = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotal);
+        RDouble **residualTurbulenceUnsteadyN2 = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotal);
+
+        //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+        RDouble **residualTurbulenceUnsteadyTemporary = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotal);
+
+        grid->UpdateDataPtr("q_turb_unsteady_n1", qTurbulenceUnsteadyN1);
+        grid->UpdateDataPtr("q_turb_unsteady_n2", qTurbulenceUnsteadyN2);
+        grid->UpdateDataPtr("res_turb_unsteady_n1", residualTurbulenceUnsteadyN1);
+        grid->UpdateDataPtr("res_turb_unsteady_n2", residualTurbulenceUnsteadyN2);
+        grid->UpdateDataPtr("res_turb_unsteady_tmp", residualTurbulenceUnsteadyTemporary);
+
+        //! Statistical variables for DES simulation.
+        int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+        if (ifStaticsFlowField > 0)
+        {
+            RDouble **qAverageTurbulence = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotal);
+            grid->UpdateDataPtr("qAverageTurb", qAverageTurbulence);
+        }
+    }
+
+    if (viscoueType == 4)
+    {
+        RDouble *cross = new RDouble[numberOfTotal];
+        grid->UpdateDataPtr("cross", cross);    //! For the crossing term in two equation turbulence model.
+        RDouble *blend = new RDouble[numberOfTotal];
+        grid->UpdateDataPtr("blend", blend);    //! For blending function F1.
+        RDouble *SST_F2 = new RDouble[numberOfTotal];
+        grid->UpdateDataPtr("SST_F2", SST_F2);    //! For blending function F2.
+        if (transitionType == IREGAMA)
+        {
+            RDouble *SpSdRatio = new RDouble[numberOfTotal];
+            grid->UpdateDataPtr("SpSdRatio", SpSdRatio);
+
+            RDouble *gamaeff = new RDouble[numberOfTotal];
+            grid->UpdateDataPtr("gamaeff", gamaeff);
+        }
+    }
+
+    int viscousType = parameters->GetViscousType();
+    int neasm    = GlobalDataBase::GetIntParaFromDB("neasm");
+
+    if (viscousType >= TWO_EQU && neasm > 0)
+    {
+        int naniss = 5;
+        RDouble **aniss = NewPointer2<RDouble>(naniss, numberOfTotal);
+
+        grid->UpdateDataPtr("aniss", aniss);
+
+        RDouble *sengy = new RDouble[numberOfTotal];
+
+        grid->UpdateDataPtr("sengy", sengy);
+    }
+
+    RDouble **matrixTurbulenceLeft  = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotalFace);
+    RDouble **matrixTurbulenceRight = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotalFace);
+
+    grid->UpdateDataPtr("mat_turbl", matrixTurbulenceLeft);
+    grid->UpdateDataPtr("mat_turbr", matrixTurbulenceRight);
+}
+
+void TurbSolverUnstr::DeAllocateGlobalVar(Grid *gridIn)
+{
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    int viscoueType = parameters->GetViscousType();
+    if (nTurbulenceEquation == 0) return;
+
+    int transitionType = parameters->GetTransitionType();
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **qTurbulence        = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"  ));
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+    RDouble **spectrumTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("spec_turb"));
+
+    DelPointer2(qTurbulence      );
+    DelPointer2(residualTurbulence);
+    DelPointer2(spectrumTurbulence);
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+    int nTurboZone = 0;
+    if (referenceFrame)
+    {
+        nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+    }
+
+#ifdef USE_GMRESSOLVER
+    // GMRESCoupled1st
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+
+    if( tscheme == GMRES )
+    {
+        RDouble** dRdq_turb     = reinterpret_cast<RDouble**> (grid->GetDataPtr("dRdq_turb"));
+        RDouble** dRdq_turb1st  = reinterpret_cast<RDouble**> (grid->GetDataPtr("dRdq_turb1st"));
+        DelPointer2(dRdq_turb      );
+        DelPointer2(dRdq_turb1st);
+    }
+    
+    RDouble** dDdP_turb     = reinterpret_cast<RDouble**> (grid->GetDataPtr("dDdP_turb"));
+    DelPointer2(dDdP_turb);
+#endif
+
+    RDouble **gradientTurbulenceX = reinterpret_cast<RDouble **> (grid->GetDataPtr("gradTurbulenceX"));
+    RDouble **gradientTurbulenceY = reinterpret_cast<RDouble **> (grid->GetDataPtr("gradTurbulenceY"));
+    RDouble **gradientTurbulenceZ = reinterpret_cast<RDouble **> (grid->GetDataPtr("gradTurbulenceZ"));
+
+    DelPointer2(gradientTurbulenceX);
+    DelPointer2(gradientTurbulenceY);
+    DelPointer2(gradientTurbulenceZ);
+
+    RDouble **qTurbulenceNode = reinterpret_cast<RDouble **> (grid->GetDataPtr("qTurbNode"));
+    DelPointer2(qTurbulenceNode);
+
+    int *nodeValueSliceTurb = reinterpret_cast<int *> (grid->GetDataPtr("nodeValueSliceTurb"));
+    int *nodeValueSliceTurbTrade = reinterpret_cast<int *> (grid->GetDataPtr("nodeValueSliceTurbTrade"));
+
+    delete [] nodeValueSliceTurb;
+    delete [] nodeValueSliceTurbTrade;
+
+    InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+    if (interpointInformation)
+    {
+        RDouble **qTurbulenceInterPoint = reinterpret_cast<RDouble **> (grid->GetDataPtr("qTurbulenceInterPoint"));
+        DelPointer2(qTurbulenceInterPoint);
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+
+    if (isUnsteady)
+    {
+        RDouble **qTurbulenceUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n1"));
+        RDouble **qTurbulenceUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n2"));
+        RDouble **residualTurbulenceUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_n1"));
+        RDouble **residualTurbulenceUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_n2"));
+        RDouble **residualTurbulenceUnsteadyTemporary = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_tmp"));
+
+        DelPointer2(qTurbulenceUnsteadyN1);
+        DelPointer2(qTurbulenceUnsteadyN2);
+        DelPointer2(residualTurbulenceUnsteadyN1);
+        DelPointer2(residualTurbulenceUnsteadyN2);
+        DelPointer2(residualTurbulenceUnsteadyTemporary);
+
+        //! Statistical variables for DES simulation.
+        int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+        if (ifStaticsFlowField > 0)
+        {
+            RDouble **qAverageTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("qAverageTurb"));
+            DelPointer2(qAverageTurbulence);
+        }
+    }
+
+    //! deallocate mixing plane array.
+    if (nTurboZone > 0)
+    {
+        int nType = 2;
+        int nSpanSection = PHSPACE::GlobalDataBase::GetIntParaFromDB("nSpanSection");
+
+        RDouble ***SpanTurbFlux      = reinterpret_cast <RDouble ***> (grid->GetDataPtr("SpanTurbFlux"));
+        RDouble ***qTurb_Span        = reinterpret_cast <RDouble ***> (grid->GetDataPtr("qTurb_Span"));
+        RDouble ***qTurbSpanNeighbor = reinterpret_cast <RDouble ***> (grid->GetDataPtr("qTurbSpanNeighbor"));
+        RDouble ***dqTurbSpanIn      = reinterpret_cast <RDouble ***> (grid->GetDataPtr("dqTurbSpanIn"));
+        RDouble ***dqTurbSpanEx      = reinterpret_cast <RDouble ***> (grid->GetDataPtr("dqTurbSpanEx"));
+        RDouble ***dcTurbSpan        = reinterpret_cast <RDouble ***> (grid->GetDataPtr("dcTurbSpan"));
+
+        DelPointer3(SpanTurbFlux);
+        DelPointer3(qTurb_Span);
+        DelPointer3(qTurbSpanNeighbor);
+        DelPointer3(dqTurbSpanIn);
+        DelPointer3(dqTurbSpanEx);
+        DelPointer3(dcTurbSpan);
+    }
+
+    if (viscoueType == 4)
+    {
+        RDouble *cross  = reinterpret_cast<RDouble *> (grid->GetDataPtr("cross"));
+        delete []cross;
+        RDouble *blend  = reinterpret_cast<RDouble *> (grid->GetDataPtr("blend"));
+        delete []blend;
+        RDouble *SST_F2 = reinterpret_cast<RDouble *> (grid->GetDataPtr("SST_F2"));
+        delete []SST_F2;
+        if (transitionType == IREGAMA)
+        {
+            RDouble *SpSdRatio = reinterpret_cast<RDouble *> (grid->GetDataPtr("SpSdRatio"));
+            delete [] SpSdRatio;
+            RDouble *gamaeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("gamaeff"));
+            delete [] gamaeff;
+        }
+    }
+
+    int viscousType = parameters->GetViscousType();
+    int neasm    = GlobalDataBase::GetIntParaFromDB("neasm");
+
+    if (viscousType >= TWO_EQU && neasm > 0)
+    {
+        RDouble **aniss = reinterpret_cast<RDouble **> (grid->GetDataPtr("aniss"));
+        DelPointer2(aniss);
+
+        RDouble *sengy = reinterpret_cast<RDouble * > (grid->GetDataPtr("sengy"));
+        delete []sengy;
+    }
+
+    RDouble **matrixTurbulenceLeft  = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_turbl"));
+    RDouble **matrixTurbulenceRight = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_turbr"));
+
+    DelPointer2(matrixTurbulenceLeft);
+    DelPointer2(matrixTurbulenceRight);
+}
+
+bool TurbSolverUnstr::JudgeIfRestart()
+{
+    string turbFile = ".\results\turb.dat";
+    GlobalDataBase::GetData("turbfile", &turbFile, PHSTRING, 1);
+
+    if (PHMPI::IsParallelRun())
+    {
+        turbFile = PHSPACE::AddSymbolToFileName(turbFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(turbFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+bool TurbSolverUnstr::JudgeIfReadAverage()
+{
+    string turbFile = ".\results\turb.dat";
+    GlobalDataBase::GetData("turbfile", &turbFile, PHSTRING, 1);
+    string averageTurbFile = AddSymbolToFileName(turbFile, "_", "Average");
+
+    if (PHMPI::IsParallelRun())
+    {
+        averageTurbFile = PHSPACE::AddSymbolToFileName(averageTurbFile, "_", 0);
+    }
+
+    bool restart_flag = false;
+
+    ifstream infile(averageTurbFile.c_str(), ios::in);
+    if (infile)
+    {
+        restart_flag = true;
+        infile.close();
+        infile.clear();
+    }
+
+    return restart_flag;
+}
+
+void TurbSolverUnstr::DumpRestart(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = UnstructGridCast(GetGrid(level));
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    int outerIterationStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+    cdata->write(&outerIterationStep, sizeof(int));
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        cdata->write(qTurbulence[m], sizeof(RDouble) * numberOfTotal);
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady) return;
+
+    RDouble **qTurbulenceUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n1"));
+    RDouble **qTurbulenceUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n2"));
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        cdata->write(qTurbulenceUnsteadyN1[m], sizeof(RDouble) * numberOfTotal);
+    }
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        cdata->write(qTurbulenceUnsteadyN2[m], sizeof(RDouble) * numberOfTotal);
+    }
+
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+    RDouble **residualTurbulenceUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_n1"));
+    RDouble **residualTurbulenceUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_n2"));
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        cdata->write(residualTurbulence[m], sizeof(RDouble) * numberOfTotal);
+    }
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        cdata->write(residualTurbulenceUnsteadyN1[m], sizeof(RDouble) * numberOfTotal);
+    }
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        cdata->write(residualTurbulenceUnsteadyN2[m], sizeof(RDouble) * numberOfTotal);
+    }
+}
+
+void TurbSolverUnstr::DumpRestartH5(ActionKey *actkey)
+{
+    using namespace PHMPI;
+    int currentProcessorID = GetCurrentProcessorID();
+
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    int version = 1;
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    int outerIterationStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    if (currentProcessorID == GetServerProcessorID())
+    {
+        WriteData(actkey->filepos, &version, "Version");
+        WriteData(actkey->filepos, &outerIterationStep, "outnstep");
+
+        if (IsNeedStatistics())
+        {
+            int nStatisticalStep = 0;
+            GlobalDataBase::GetData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+            WriteData(actkey->filepos, &nStatisticalStep, "nStatisticalStep");
+        }
+    }
+
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    double **qTemporary  = NewPointer2<double>(nTurbulenceEquation, numberOfTotal);
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss<<"Group"<<gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    for (int iEquation = 0; iEquation < nTurbulenceEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTemporary[iEquation][iCell] = static_cast<double>(qTurbulence[iEquation][iCell]);
+        }
+    }
+    WriteData(grploc, qTemporary[0], "q_turb");
+    WriteData(grploc, &numberOfTotalCell, "nTotalCell");
+
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+    double *qTemporary2  = new double[numberOfTotal];
+    for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+    {
+        qTemporary2[iCell] = static_cast<double>(viscousTurbulence[iCell]);
+    }
+
+    WriteData(grploc, qTemporary2, "visturb");
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady)
+    {
+        H5Gclose(grploc);
+        DelPointer2(qTemporary);
+
+        return;
+    }
+
+    RDouble **qTurbulenceUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n1"));
+    for (int iEquation = 0; iEquation < nTurbulenceEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTemporary[iEquation][iCell] = static_cast<double>(qTurbulenceUnsteadyN1[iEquation][iCell]);
+        }
+    }
+
+    WriteData(grploc, qTemporary[0], "q_turb_unsteady_n1");
+
+    RDouble **qTurbulenceUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n2"));
+    for (int iEquation = 0; iEquation < nTurbulenceEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTemporary[iEquation][iCell] = static_cast<double>(qTurbulenceUnsteadyN2[iEquation][iCell]);
+        }
+    }
+
+    WriteData(grploc, qTemporary[0], "q_turb_unsteady_n2");
+
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+    for (int iEquation = 0; iEquation < nTurbulenceEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTemporary[iEquation][iCell] = static_cast<double>(residualTurbulence[iEquation][iCell]);
+        }
+    }
+
+    WriteData(grploc, qTemporary[0], "res_turb");
+
+    RDouble **residualTurbulenceUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_n1"));
+    for (int iEquation = 0; iEquation < nTurbulenceEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTemporary[iEquation][iCell] = static_cast<double>(residualTurbulenceUnsteadyN1[iEquation][iCell]);
+        }
+    }
+
+    WriteData(grploc, qTemporary[0], "res_turb_unsteady_n1");
+
+    RDouble **residualTurbulenceUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_n2"));
+    for (int iEquation = 0; iEquation < nTurbulenceEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTemporary[iEquation][iCell] = static_cast<double>(residualTurbulenceUnsteadyN2[iEquation][iCell]);
+        }
+    }
+
+    WriteData(grploc, qTemporary[0], "res_turb_unsteady_n2");
+
+    if (IsNeedStatistics())
+    {
+        RDouble **qAverageTurb = reinterpret_cast<RDouble **> (grid->GetDataPtr("qAverageTurb"));
+        for (int iEquation = 0; iEquation < nTurbulenceEquation; ++ iEquation)
+        {
+            for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+            {
+                qTemporary[iEquation][iCell] = static_cast<double>(qAverageTurb[iEquation][iCell]);
+            }
+        }
+
+        WriteData(grploc, qTemporary[0], "qAverageTurb");
+    }
+
+    H5Gclose(grploc);
+    DelPointer2(qTemporary);
+    delete qTemporary2;
+}
+
+void TurbSolverUnstr::ReadRestartH5(ActionKey *actkey)
+{
+    Grid *grid = GetGrid(actkey->level);
+    int gridID = grid->GetZoneID();
+
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+    double **qTemporary  = NewPointer2<double>(nTurbulenceEquation, numberOfTotal);
+
+    int outerIterationStepOfTurbulence = 0;
+    ReadData(actkey->filepos, &outerIterationStepOfTurbulence, "outnstep");
+
+    int outerIterationStepOfNS = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    hid_t grploc;
+    string grpName;
+
+    ostringstream oss;
+    oss<<"Group"<<gridID;
+    grpName = oss.str();
+
+    grploc = OpenGroup(actkey->filepos, grpName);
+
+    int nTotalCellRestart = 0;
+    ReadData(grploc, &nTotalCellRestart, "nTotalCell");
+    if(nTotalCellRestart != numberOfTotalCell)
+    {
+        ostringstream erroeInfo;
+        erroeInfo << " Error: the cell number in turb.dat is not equal to the cell number in grid file !" << endl;
+        TK_Exit::ExceptionExit(erroeInfo.str());
+    }
+
+    ReadData(grploc, qTemporary[0], "q_turb");
+    for (int iEquation = 0; iEquation < nTurbulenceEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTurbulence[iEquation][iCell] = static_cast<RDouble>(qTemporary[iEquation][iCell]);
+        }
+    }
+    if (CheckDataExist(grploc, "visturb"))
+    {
+        double *qTemporary1d  = new double[numberOfTotal];
+        ReadData(grploc, qTemporary1d, "visturb");
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            viscousTurbulence[iCell] = static_cast<RDouble>(qTemporary1d[iCell]);
+        }
+        delete qTemporary1d;
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble **qTurbulenceUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n1"));
+        RDouble **qTurbulenceUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n2"));
+
+        RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+        RDouble **residualTurbulenceUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_n1"));
+        RDouble **residualTurbulenceUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_n2"));
+        RDouble **qAverageTurb = reinterpret_cast<RDouble **> (grid->GetDataPtr("qAverageTurb"));
+
+        //! Start from steady flow field and reset the outer step when start from steady flow.
+        int ifStartFromSteadyResults = parameters->GetIfStartFromSteadyResults();
+        if (ifStartFromSteadyResults)
+        {
+            PrintToWindow("Restart from steady Turbulent flow field, reset outer step to be zero!\n");
+
+            outerIterationStepOfTurbulence = 0;
+            GlobalDataBase::UpdateData("outnstep", &outerIterationStepOfTurbulence, PHINT, 1);
+
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+                {
+                    qTurbulenceUnsteadyN1[m][iCell] = qTurbulence[m][iCell];
+                    qTurbulenceUnsteadyN2[m][iCell] = qTurbulence[m][iCell];
+
+                    residualTurbulence[m][iCell] = 0.0;
+                    residualTurbulenceUnsteadyN1[m][iCell] = 0.0;
+                    residualTurbulenceUnsteadyN2[m][iCell] = 0.0;
+                }
+            }
+        }
+        else
+        {
+            ReadData(grploc, qTemporary[0], "q_turb_unsteady_n1");
+            for (int iEquation = 0; iEquation < nTurbulenceEquation; ++ iEquation)
+            {
+                for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+                {
+                    qTurbulenceUnsteadyN1[iEquation][iCell] = static_cast<RDouble>(qTemporary[iEquation][iCell]);
+                }
+            }
+
+            ReadData(grploc, qTemporary[0], "q_turb_unsteady_n2");
+            for (int iEquation = 0; iEquation < nTurbulenceEquation; ++ iEquation)
+            {
+                for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+                {
+                    qTurbulenceUnsteadyN2[iEquation][iCell] = static_cast<RDouble>(qTemporary[iEquation][iCell]);
+                }
+            }
+
+            ReadData(grploc, qTemporary[0], "res_turb");
+            for (int iEquation = 0; iEquation < nTurbulenceEquation; ++ iEquation)
+            {
+                for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+                {
+                    residualTurbulence[iEquation][iCell] = static_cast<RDouble>(qTemporary[iEquation][iCell]);
+                }
+            }
+
+            ReadData(grploc, qTemporary[0], "res_turb_unsteady_n1");
+            for (int iEquation = 0; iEquation < nTurbulenceEquation; ++ iEquation)
+            {
+                for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+                {
+                    residualTurbulenceUnsteadyN1[iEquation][iCell] = static_cast<RDouble>(qTemporary[iEquation][iCell]);
+                }
+            }
+
+            ReadData(grploc, qTemporary[0], "res_turb_unsteady_n2");
+            for (int iEquation = 0; iEquation < nTurbulenceEquation; ++ iEquation)
+            {
+                for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+                {
+                    residualTurbulenceUnsteadyN2[iEquation][iCell] = static_cast<RDouble>(qTemporary[iEquation][iCell]);
+                }
+            }
+        }
+
+        int nStatisticalStep = 0;
+        int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+        int startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+        bool isReadAverageFlow = ifStaticsFlowField && (outerIterationStepOfTurbulence >= startStatisticStep);
+        if (isReadAverageFlow)
+        {
+            if (ifStartFromSteadyResults)
+            {
+                for (int iEquation = 0; iEquation < nTurbulenceEquation; ++ iEquation)
+                {
+                    for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+                    {
+                        qAverageTurb[iEquation][iCell] = static_cast<RDouble>(qTemporary[iEquation][iCell]);
+                    }
+                }
+
+                GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+            }
+            else
+            {
+                ReadData(grploc, qTemporary[0], "qAverageTurb");
+                for (int iEquation = 0; iEquation < nTurbulenceEquation; ++ iEquation)
+                {
+                    for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+                    {
+                        qAverageTurb[iEquation][iCell] = qTemporary[iEquation][iCell];
+                    }
+                }
+
+                ReadData(actkey->filepos, &nStatisticalStep, "nStatisticalStep");
+                GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+            }
+        }
+    }
+
+    H5Gclose(grploc);
+    DelPointer2(qTemporary);
+
+    CompareOutStepOfFlowfieldFile(outerIterationStepOfNS, outerIterationStepOfTurbulence);
+}
+
+void TurbSolverUnstr::ReadRestart(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = UnstructGridCast(GetGrid(level));
+
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+    int outerIterationStepOfTurbulence = 0;
+    cdata->read(&outerIterationStepOfTurbulence, sizeof(int));
+
+    int outerIterationStepOfNS = GlobalDataBase::GetIntParaFromDB("outnstep");
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            cdata->read(&qTurbulence[m][iCell], sizeof(RDouble));
+        }
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble **qTurbulenceUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n1"));
+        RDouble **qTurbulenceUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n2"));
+
+        RDouble **residualTurbulence           = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+        RDouble **residualTurbulenceUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_n1"));
+        RDouble **residualTurbulenceUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_n2"));
+
+        int ifStartFromSteadyResults = parameters->GetIfStartFromSteadyResults();
+
+        if (ifStartFromSteadyResults)
+        {
+            PrintToWindow("Restart from steady Turbulent flow field, reset outer step to be zero!\n");
+
+            //! Start from steady flow field and reset the outer step when start from steady flow.
+            outerIterationStepOfTurbulence = 0;
+            GlobalDataBase::UpdateData("outnstep", &outerIterationStepOfTurbulence, PHINT, 1);
+
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+                {
+                    qTurbulenceUnsteadyN1[m][iCell] = qTurbulence[m][iCell];
+                    qTurbulenceUnsteadyN2[m][iCell] = qTurbulence[m][iCell];
+
+                    residualTurbulence          [m][iCell] = 0.0;
+                    residualTurbulenceUnsteadyN1[m][iCell] = 0.0;
+                    residualTurbulenceUnsteadyN2[m][iCell] = 0.0;
+                }
+            }
+        }
+        else
+        {
+            //! Start from unsteady flow field.
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                cdata->read(qTurbulenceUnsteadyN1[m], sizeof(RDouble) * numberOfTotal);
+            }
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                cdata->read(qTurbulenceUnsteadyN2[m], sizeof(RDouble) * numberOfTotal);
+            }
+
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                cdata->read(residualTurbulence[m], sizeof(RDouble) * numberOfTotal);
+            }
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                cdata->read(residualTurbulenceUnsteadyN1[m], sizeof(RDouble) * numberOfTotal);
+            }
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                cdata->read(residualTurbulenceUnsteadyN2[m], sizeof(RDouble) * numberOfTotal);
+            }
+        }
+    }
+
+    CompareOutStepOfFlowfieldFile(outerIterationStepOfNS, outerIterationStepOfTurbulence);
+}
+
+void TurbSolverUnstr::InitFlowAsRestart()
+{
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    if (nTurbulenceEquation == 0) return;
+
+    UnstructGrid *grid = UnstructGridCast(GetGrid(0));
+
+    //int outerIterationStep = 0;
+    //GlobalDataBase::UpdateData("outnstep", &outerIterationStep, PHINT, 1);
+
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    RDouble *freeStreamTurbVar =  parameters->GetFreeStreamTurbVar();
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTurbulence[m][iCell] = freeStreamTurbVar[m];
+        }
+    }
+
+    RDouble *SpSdRatio = reinterpret_cast<RDouble *> (grid->GetDataPtr("SpSdRatio"));
+    RDouble *gamaeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("gamaeff"));
+    int transitionType = parameters->GetTransitionType();
+    if (transitionType == IREGAMA)
+    {
+        SetField(SpSdRatio, 1.0, numberOfTotal);
+        SetField(gamaeff, 0.0, numberOfTotal);
+    }
+
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady) return;
+
+    RDouble **qTurbulenceUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n1"));
+    RDouble **qTurbulenceUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n2"));
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTurbulenceUnsteadyN1[m][iCell] = qTurbulence[m][iCell];
+        }
+    }
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTurbulenceUnsteadyN2[m][iCell] = qTurbulence[m][iCell];
+        }
+    }
+
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+    RDouble **residualTurbulenceUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_n1"));
+    RDouble **residualTurbulenceUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_n2"));
+    RDouble **residualTurbulenceUnsteadyTemporary = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_tmp"));
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            residualTurbulence[m][iCell] = 0.0;
+            residualTurbulenceUnsteadyN1[m][iCell] = 0.0;
+            residualTurbulenceUnsteadyN2[m][iCell] = 0.0;
+            residualTurbulenceUnsteadyTemporary[m][iCell] = 0.0;
+        }
+    }
+}
+
+void TurbSolverUnstr::ZeroResiduals(Grid *gridIn)
+{
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(gridIn);
+
+    int numberOfGeneralCells = grid->GetNTotalCell() + grid->GetNBoundFace();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **>(grid->GetDataPtr("res_turb"));
+
+    for (int iEquation = 0; iEquation < nTurbulenceEquation; ++ iEquation)
+    {
+        for (int iCell = 0; iCell < numberOfGeneralCells; ++ iCell)
+        {
+            residualTurbulence[iEquation][iCell] = 0.0;
+        }
+    }
+
+#ifdef USE_GMRESSOLVER
+    // GMRESturb zero residual
+
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+
+    if( tscheme == GMRES )
+    {
+        RDouble** dRdq_turb = reinterpret_cast<RDouble**> (grid->GetDataPtr("dRdq_turb"));
+        // GMRESturb CSR
+        vector<int> AI = grid->GetJacobianAI4GMRES();
+        PHSPACE::SetField(dRdq_turb, nTurbulenceEquation, nTurbulenceEquation * AI[numberOfGeneralCells], 0.0);
+        //! GMRESCoupled
+        int nLaminar = grid->GetBlockSizeOfJacobianMatrix();
+        nLaminar -= nTurbulenceEquation;
+        RDouble **dRdqCoupledTerm_turb = reinterpret_cast<RDouble **>(grid->GetDataPtr("dRdqCoupledTerm_turb"));
+        PHSPACE::SetField(dRdqCoupledTerm_turb, nTurbulenceEquation, nLaminar * AI[numberOfGeneralCells], 0.0);
+    }
+#endif
+
+    return;
+}
+
+void TurbSolverUnstr::InitSpectrum(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    if (nTurbulenceEquation == 0) return;
+
+    RDouble turbCFLScale = parameters->GetTurbCFLScale();
+
+    RDouble *vol  = grid->GetCellVolume();
+    RDouble *dt = reinterpret_cast<RDouble *> (grid->GetDataPtr("dt"));
+    RDouble **spectrumTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("spec_turb"));
+
+    RDouble dualTimeSpectrumC1 = zero;
+    RDouble dualTimeSpectrumC2 = one;
+
+    //! If flow is unsteady, need to count the contribution of unsteady.
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (isUnsteady)
+    {
+        RDouble dualTimeCoefficient[7];
+        const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+        ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+        dualTimeSpectrumC1 = - dualTimeCoefficient[3];
+        dualTimeSpectrumC2 =   dualTimeCoefficient[6];
+    }
+
+    for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+    {
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            spectrumTurbulence[m][iCell] = 0.0;
+        }
+    }
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            spectrumTurbulence[m][iCell] = dualTimeSpectrumC1 * vol[iCell] + dualTimeSpectrumC2 / (turbCFLScale * dt[iCell] + SMALL);
+        }
+    }
+}
+
+void TurbSolverUnstr::CorrectFineGrid(Grid *fineGrid, Grid *coarseGrid)
+{
+    int numberOfTotalCellOnFineGrid = UnstructGridCast(fineGrid)->GetNTotalCell();
+    int *cell2CoarseGridCell = UnstructGridCast(fineGrid)->GetCell2CoarseGridCell();
+
+    RDouble **qTurbulenceFineGrid = reinterpret_cast<RDouble **> (fineGrid->GetDataPtr("q_turb"));
+    RDouble **qTurbulenceCoarseGrid = reinterpret_cast<RDouble **> (coarseGrid->GetDataPtr("q_turb"));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int iCell = 0; iCell <numberOfTotalCellOnFineGrid; ++ iCell)
+        {
+            qTurbulenceFineGrid[m][iCell] += qTurbulenceCoarseGrid[m][cell2CoarseGridCell[iCell]];
+        }
+    }
+}
+
+void TurbSolverUnstr::InterpolatFineGrid(Grid *fineGridIn, Grid *coarseGridIn)
+{
+    UnstructGrid *fineGrid = UnstructGridCast(fineGridIn);
+    UnstructGrid *coarseGrid = UnstructGridCast(coarseGridIn);
+
+    RDouble **qTurbulenceFineGrid = reinterpret_cast<RDouble **> (fineGrid->GetDataPtr("q_turb"));
+    RDouble **qTurbulenceCoarseGrid = reinterpret_cast<RDouble **> (coarseGrid->GetDataPtr("q_turb"));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        InterpolatQ(fineGrid, qTurbulenceFineGrid[m], coarseGrid, qTurbulenceCoarseGrid[m]);
+    }
+
+    RDouble *viscousOfFineGrid = reinterpret_cast<RDouble *> (fineGrid->GetDataPtr("vist"));
+    RDouble *viscousOfCoarseGrid = reinterpret_cast<RDouble *> (coarseGrid->GetDataPtr("vist"));
+    InterpolatQ(fineGrid, viscousOfFineGrid, coarseGrid, viscousOfCoarseGrid);
+}
+
+void TurbSolverUnstr::PutCorrectionBack(Grid *gridIn, FieldProxy *qProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+
+    RDouble **q = qProxy->GetField_UNS();
+    RDouble **qOld = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            qOld[m][iCell] += q[m][iCell];
+        }
+    }
+}
+
+void TurbSolverUnstr::RestrictDefect(Grid *fineGridIn, Grid *coarseGridIn)
+{
+    UnstructGrid *fineGrid = UnstructGridCast(fineGridIn);
+    UnstructGrid *coarseGrid = UnstructGridCast(coarseGridIn);
+
+    int numberOfTotalCellOnFineGrid = fineGrid->GetNTotalCell();
+    int *cell2CoarseGridCell = fineGrid->GetCell2CoarseGridCell();
+
+    ZeroResiduals(coarseGrid);
+
+    RDouble **residualTuebulenceCoarseGrid = reinterpret_cast<RDouble **> (coarseGrid->GetDataPtr("res_turb"));
+    RDouble **residualTuebulenceFineGrid = reinterpret_cast<RDouble **> (fineGrid->GetDataPtr("res_turb"));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int iCell = 0; iCell <numberOfTotalCellOnFineGrid; ++ iCell)
+        {
+            residualTuebulenceCoarseGrid[m][cell2CoarseGridCell[iCell]] -= residualTuebulenceFineGrid[m][iCell];
+        }
+    }
+}
+
+void TurbSolverUnstr::LoadQ(Grid *gridIn, FieldProxy *qProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+
+    RDouble **qqTurbulence = qProxy->GetField_UNS();
+
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            qqTurbulence[m][iCell] = qTurbulence[m][iCell];
+        }
+    }
+}
+
+void TurbSolverUnstr::UpdateFlowField(Grid *gridIn, FieldProxy *qProxy, FieldProxy *dqProxy)
+{
+    UnstructGrid *grid  = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    RDouble **qPrimitiveVariable = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble **qTurbulence  = qProxy->GetField_UNS();
+    RDouble **dqTurbulence = dqProxy->GetField_UNS();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    int viscoueType = parameters->GetViscousType();
+
+    using namespace IDX;
+
+    RDouble *primitiveVariable = new RDouble [nTurbulenceEquation];
+
+    if (viscoueType == 3)
+    {
+        //! Spalart-allmaras model.
+
+        RDouble nuoo  = 1.0;        //!Nondimensional inflow laminar viscosity / rho.
+        RDouble nuMax = 1.0e10 * nuoo;
+        int newNstep = GlobalDataBase::GetIntParaFromDB("newnstep");
+        if(newNstep < 1000)
+        {
+            nuMax = 1.0e5 * nuoo;
+        }
+
+        for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+        {
+            qTurbulence[ISA][iCell] += dqTurbulence[ISA][iCell]; 
+        }
+    }
+    else if (viscoueType == 4)
+    {
+        RDouble *freeStreamTurbVar = parameters->GetFreeStreamTurbVar();
+
+        RDouble kelim = 1.0e-5 * freeStreamTurbVar[IKE];
+        RDouble kwlim = 1.0e-5 * freeStreamTurbVar[IKW];
+
+        for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+        {
+            RDouble ke,kw,dke,dkw,rho;
+            rho = qPrimitiveVariable[IR][iCell];
+            ke  = qTurbulence[IKE][iCell];
+            kw  = qTurbulence[IKW][iCell]; 
+            dke = dqTurbulence[IKE][iCell];
+            dkw = dqTurbulence[IKW][iCell];
+            ke += dke/rho;
+            kw += dkw/rho;
+            ke = MAX(ke,kelim);
+            kw = MAX(kw,kwlim);
+            qTurbulence[IKE][iCell] = ke;
+            qTurbulence[IKW][iCell] = kw;
+        }
+    }
+
+    delete [] primitiveVariable;
+}
+
+void TurbSolverUnstr::SMoothTurbulencePoint(Grid *gridIn, RDouble *primitiveVariable, int i)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    int **cell2Face = grid->GetCell2Face();
+    int *faceNumberOfEachCell = grid->GetFaceNumberOfEachCell();
+
+    int le,re,ie,face;
+    RDouble volumeSum = zero;
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        primitiveVariable[m] = zero;
+    }
+
+    for (int j = 0; j < faceNumberOfEachCell[i]; ++ j)
+    {
+        face = cell2Face[i][j];
+        le   = leftCellOfFace[face];
+        re   = rightCellOfFace[face];
+
+        if (le != i)
+        {
+            ie = le;
+        }
+        else
+        {
+            ie = re;
+        }
+
+        if (ie >= numberOfTotalCell) continue;
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            primitiveVariable[m] += qTurbulence[m][ie];
+        }
+        volumeSum += 1.0;
+    }
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        primitiveVariable[m] /= volumeSum;
+    }
+}
+
+void TurbSolverUnstr::SMoothTurbulence(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace  = grid->GetRightCellOfFace();
+
+    RDouble *volume = grid->GetCellVolume() ;
+
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **tmporary = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotal);
+
+    int **cell2Face = grid->GetCell2Face();
+    int *faceNumberOfEachCell = grid->GetFaceNumberOfEachCell();
+
+    for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+    {
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            qTurbulence[m][iCell] *= volume[iCell];
+            tmporary[m][iCell]     = qTurbulence[m][iCell];
+        }
+    }
+
+    RDouble volumeSum;
+
+    int le,re,ie,face;
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        volumeSum = volume[iCell];
+        for (int j = 0; j < faceNumberOfEachCell[iCell]; ++ j)
+        {
+            face = cell2Face[iCell][j];
+            le    = leftCellOfFace [face];
+            re    = rightCellOfFace[face];
+            
+            if (le != iCell)
+            {
+                ie = le;
+            }
+            else
+            {
+                ie = re;
+            }
+
+            if (ie >= numberOfTotalCell) continue;
+
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                qTurbulence[m][iCell] += tmporary[m][ie];
+            }
+            volumeSum += volume[ie];
+        }
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            qTurbulence[m][iCell] /= volumeSum;
+        }
+    }
+
+    DelPointer2(tmporary);
+}
+
+void TurbSolverUnstr::RungeKuttaResidual(Grid *gridIn, FieldProxy *dqProxy, RDouble coefficient)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    RDouble **dqTurbulence = dqProxy->GetField_UNS();
+
+    RDouble *dt = reinterpret_cast<RDouble *> (grid->GetDataPtr("dt"));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            dqTurbulence[m][iCell] = dt[iCell] * coefficient * dqTurbulence[m][iCell];
+        }
+    }
+}
+
+void TurbSolverUnstr::SolveLUSGSForward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble **dq = dqProxy->GetField_UNS();
+    int *iBlank = grid->GetBlankIndex();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble *df    = new RDouble [nTurbulenceEquation];
+    RDouble *rhs0  = new RDouble [nTurbulenceEquation];
+    RDouble *dqOld = new RDouble [nTurbulenceEquation];
+
+    RDouble **spectrumTurbulence    = reinterpret_cast<RDouble **> (grid->GetDataPtr("spec_turb"));
+    RDouble **matrixTurbulenceLeft  = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_turbl"));
+    RDouble **matrixTurbulenceRight = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_turbr"));
+    RDouble **residualTurbulence    = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+
+    int **cell2Face = grid->GetCell2Face();
+    int *faceNumberOfEachCell = grid->GetFaceNumberOfEachCell();
+
+    RDouble **deltaFlux = LUplusDQ->GetField_UNS();
+    RDouble *matrixUx = new RDouble [nTurbulenceEquation];
+
+    //! Now the Forward Sweep
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        if (iBlank[iCell] <= 0)
+        {
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                dq[m][iCell] = 0.0;
+            }
+            continue;
+        }
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            rhs0[m] = 0.0;
+        }
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            //! Back up the old dq, to compute the convergency.
+            dqOld[m] = dq[m][iCell];
+
+            //! Here, the deltaFlux is computed in Upper backward sweep!
+            //! res: b      deltaFlux: Ux, which is computed in backward sweep.
+            //! the dq is not the real dq, now.
+            //! Although the 'dq' changed can not the right one, it dosen't matter, since 
+            //! the following only using the lower neighbor cells, whose 'dq' has been updated.
+            //! It is convenient for precondition transform.
+            dq[m][iCell] = residualTurbulence[m][iCell];
+            matrixUx[m]  = deltaFlux[m][iCell];
+
+            //! Then reset it to zero to store the Lower forward sweep!
+            deltaFlux[m][iCell] = 0.0;
+        }
+
+        for (int jFace = 0; jFace < faceNumberOfEachCell[iCell]; ++ jFace)
+        {
+            int face = cell2Face[iCell][jFace];
+            int le   = leftCellOfFace [face];
+            int re   = rightCellOfFace [face];
+            
+            //! One of le and re must be cell itself.
+            if (le > iCell || re > iCell) continue;            
+
+            if (re == iCell)
+            {
+                //! Now its neighboring cell belongs to lower triangular
+                SWAP(le, re);
+
+                for (int m = 0; m < nTurbulenceEquation; ++ m)
+                {
+                    df[m] = matrixTurbulenceLeft[m][face] * dq[m][re];
+                }
+            }
+            else
+            {
+                for (int m = 0; m < nTurbulenceEquation; ++ m)
+                {
+                    df[m] = matrixTurbulenceRight[m][face] * dq[m][re];
+                }
+            }
+
+            //! Add Flux together
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                rhs0[m] += df[m];
+            }
+        }
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            //! dq = { (b - Ux) - Lx } / D.
+            //! Note: the 'dq' has actually initialized by the residual at the beginning of this function.
+            //! the 'rhs0' is the total Delta Flux of the neighbors.            
+            //! rhs0: Lx    diagonal: D.
+            dq[m][iCell] = (dq[m][iCell] - matrixUx[m] - rhs0[m]) / spectrumTurbulence[m][iCell];
+
+            //! Store the lower forward sweep delta-flux, which will be used in the backward sweep.
+            deltaFlux[m][iCell] += rhs0[m];
+
+            sweepNormal += SQR(dq[m][iCell] - dqOld[m]);
+        }
+    }
+
+    delete []rhs0;
+    delete []df;
+    delete []dqOld;
+    delete []matrixUx;
+}
+
+void TurbSolverUnstr::SolveLUSGSBackward(Grid *gridIn, FieldProxy *dqProxy, FieldProxy *LUplusDQ, RDouble &sweepNormal, bool iAdvanceStep)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble **dq = dqProxy->GetField_UNS();
+    int *iBlank = grid->GetBlankIndex();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble *df    = new RDouble [nTurbulenceEquation];
+    RDouble *rhs0  = new RDouble [nTurbulenceEquation];
+    RDouble *dqOld = new RDouble [nTurbulenceEquation];
+
+    RDouble **spectrumTurbulence    = reinterpret_cast<RDouble **> (grid->GetDataPtr("spec_turb"));
+    RDouble **matrixTurbulenceLeft  = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_turbl"));
+    RDouble **matrixTurbulenceRight = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_turbr"));
+    RDouble **residualTurbulence    = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+
+    int **cell2Face = grid->GetCell2Face();
+    int *faceNumberOfEachCell = grid->GetFaceNumberOfEachCell();
+
+    RDouble **deltaFlux = LUplusDQ->GetField_UNS();
+    RDouble *matrixLx = new RDouble [nTurbulenceEquation];
+
+    //! Backward Sweep
+    for (int iCell = numberOfTotalCell - 1; iCell >= 0; -- iCell)
+    {
+        if (iBlank[iCell] <= 0)
+        {
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                dq[m][iCell] = 0.0;
+            }
+            continue;
+        }
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            rhs0[m] = 0.0;
+        }
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            //! Back up the old dq, to compute the convergence.
+            //! the 'dq' is dq*, which has been updated in forward.
+            dqOld[m] = dq[m][iCell];
+
+            //! the dq is not the real dq, now.
+            //! it is convenient for precondition transform.
+            dq[m][iCell] = residualTurbulence[m][iCell];
+
+            matrixLx[m] = deltaFlux[m][iCell];
+
+            deltaFlux[m][iCell] = 0.0;
+        }
+
+        for (int jFace = 0; jFace < faceNumberOfEachCell[iCell]; ++ jFace)
+        {
+            int face  = cell2Face[iCell][jFace];
+            int le    = leftCellOfFace  [face];
+            int re    = rightCellOfFace [face];
+
+            //! One of le and re must be cell itself.
+            if (le < iCell || re < iCell) continue;
+            
+            if (re == iCell)
+            {
+                //! Now its neighboring cell belongs to upper triangular
+                SWAP(le, re);
+
+                for (int m = 0; m < nTurbulenceEquation; ++ m)
+                {
+                    df[m] = matrixTurbulenceLeft[m][face] * dq[m][re];
+                }
+            }
+            else
+            {
+                for (int m = 0; m < nTurbulenceEquation; ++ m)
+                {
+                    df[m] = matrixTurbulenceRight[m][face] * dq[m][re];
+                }
+            }
+
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                rhs0[m] += df[m];
+            }
+        }
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            //! Note: the 'dq' has been updated by the forward sweep.
+            //! the 'rhs0' is the total Delta Flux of the neighbors.
+            //! x = {(b - LX) - Ux} / D.
+            //! rhs0: Ux.    diagonal: D.
+            dq[m][iCell] = (dq[m][iCell] - matrixLx[m] - rhs0[m]) / spectrumTurbulence[m][iCell];
+
+            //! Store the upper backward sweep delta-flux, which will be used in the forward sweep.
+            deltaFlux[m][iCell] += rhs0[m];
+
+            sweepNormal += SQR(dq[m][iCell] - dqOld[m]);
+        }
+    }
+
+    delete []rhs0;
+    delete []df;
+    delete []dqOld;
+    delete []matrixLx;
+}
+
+// Bell 20130401 add
+void TurbSolverUnstr::SetGhostDQLUSGS(Grid *gridIn, RDouble **dq)
+{
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    if (nTurbulenceEquation != 1)
+    {
+        cout <<"SetGhostDQLUSGS function is turned off !\n";
+        return;
+    }
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *rightCellOfFace  = grid->GetRightCellOfFace();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        if (IsInterface(bcType))
+        {
+            continue;
+        }
+
+        if (IsWall(bcType))
+        {
+            SetWallBCGhostDQLUSGS(grid, bcRegion, dq);
+        }
+        //! FARFIELD, SYMMETRY, INFLOW and OUTFLOW can use the same module.
+        else if (bcType == PHENGLEI::FARFIELD || bcType == PHENGLEI::SYMMETRY 
+            || bcType == PHENGLEI::INFLOW   || bcType == PHENGLEI::OUTFLOW)
+        {
+            SetFarfieldBCGhostDQLUSGS(grid, bcRegion, dq);
+        }
+        else
+        {
+            vector<int> *faceIndex = bcRegion->GetFaceIndex();
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                int iFace = *iter;
+                int re = rightCellOfFace[iFace];
+                for (int m = 0; m < nTurbulenceEquation; ++ m)
+                {
+                    dq[m][re] = 0.0; 
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverUnstr::SetWallBCGhostDQLUSGS(Grid *gridIn, UnstructBC *bcRegionUnstruct, RDouble **dq)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *rightCellOfFace  = grid->GetRightCellOfFace();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        int iFace = *iter;
+        int re = rightCellOfFace[iFace];
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            dq[m][re] = 0.0;
+        }
+    }
+}
+
+void TurbSolverUnstr::SetFarfieldBCGhostDQLUSGS(Grid *gridIn, UnstructBC *bcRegionUnstruct, RDouble **dq)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace  = grid->GetRightCellOfFace();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        int iFace = *iter;
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            dq[m][re] = dq[m][le]; 
+        }
+    }
+}
+
+
+void TurbSolverUnstr::ModifyResiduals(Grid *grid)
+{
+    ModifyResidualOnWallBoundary(grid);
+}
+
+void TurbSolverUnstr::LoadResiduals(Grid *gridIn, FieldProxy *rhsProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    RDouble **rhs = rhsProxy->GetField_UNS();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            residualTurbulence[m][iCell] = - rhs[m][iCell];
+        }
+    }
+}
+
+RDouble TurbSolverUnstr::UnsteadyConvergence(Grid *gridIn)
+{
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady) return zero;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+
+    RDouble **qPrimitive  = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble **qTurbulenceUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n1"));
+    RDouble **qTurbulenceUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n2"));
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble *primitive0 = new RDouble[nTurbulenceEquation];
+    RDouble *primitive1 = new RDouble[nTurbulenceEquation];
+    RDouble *primitive2 = new RDouble[nTurbulenceEquation];
+
+    RDouble *qConservative0 = new RDouble[nTurbulenceEquation];
+    RDouble *qConservative1 = new RDouble[nTurbulenceEquation];
+    RDouble *qConservative2 = new RDouble[nTurbulenceEquation];
+
+    RDouble sum1 = zero;
+    RDouble sum2 = zero;
+
+    using namespace IDX;
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            primitive0[m] = qTurbulence[m][iCell];
+            primitive1[m] = qTurbulenceUnsteadyN1[m][iCell];
+            primitive2[m] = qTurbulenceUnsteadyN2[m][iCell];
+        }
+
+        RDouble coefficient = 1.0;
+
+        if (nTurbulenceEquation >= 2)
+        {
+            coefficient = qPrimitive[IR][iCell];
+        }
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            qConservative0[m] = coefficient * primitive0[m];
+            qConservative1[m] = coefficient * primitive1[m];
+            qConservative2[m] = coefficient * primitive2[m];
+        }
+
+        //! nl is needed.
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            //! Here, res must be transformed into dq��that is, res is not equal to rhs but dq.
+            RDouble dqp = residualTurbulence[m][iCell];        // qn+1,p+1 - qn+1,p
+            RDouble dqn = qConservative0[m] - qConservative1[m];  // qn+1,p+1 - qn
+            sum1 += dqp * dqp;
+            sum2 += dqn * dqn;
+        }
+    }
+
+    delete []primitive0;
+    delete []primitive1;
+    delete []primitive2;
+    delete []qConservative0;
+    delete []qConservative1;
+    delete []qConservative2;
+
+    RDouble cvg = sqrt(ABS(sum1 / (sum2 + SMALL)));
+    return cvg;
+}
+
+void TurbSolverUnstr::UpdateUnsteadyFlow(Grid *gridIn)
+{
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady) return;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble **qTurbulenceUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n1"));
+    RDouble **qTurbulenceUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n2"));
+
+    RDouble **residualTurbulenceUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_n1"));
+    RDouble **residualTurbulenceUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_n2"));
+    RDouble **residualTurbulenceUnsteadyTemporary = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_tmp"));
+
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTurbulenceUnsteadyN2[m][iCell] = qTurbulenceUnsteadyN1[m][iCell];
+        }
+    }
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            qTurbulenceUnsteadyN1[m][iCell] = qTurbulence[m][iCell];
+        }
+    }
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            residualTurbulenceUnsteadyN2[m][iCell] = residualTurbulenceUnsteadyN1[m][iCell];
+        }
+    }
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            residualTurbulenceUnsteadyN1[m][iCell] = residualTurbulenceUnsteadyTemporary[m][iCell]; //! Here the current outerIterationStep is over, the value of the stored resTmp should be assigned to resn1 for the next outerIterationStep. It should be noticed that resTmp only contain the inviscid and viscous flux.
+        }
+    }
+
+    //! Statistical variables for DES simulation.
+    int ifStaticsFlowField = parameters->GetIfStaticsFlowField();
+    if (ifStaticsFlowField > 0)
+    {
+        int outerIterationStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+        int startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+
+        if (outerIterationStep >= startStatisticStep)
+        {
+            int numberOfStatisticalStep = GlobalDataBase::GetIntParaFromDB("nStatisticalStep");
+            RDouble statisticalTimePeriod = GlobalDataBase::GetDoubleParaFromDB("statisticalTimePeriod");
+            RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+            RDouble c1 = 1.0 / (numberOfStatisticalStep * 1.0);
+            if(statisticalTimePeriod > 0.0)
+            {
+                c1 = MAX(c1, physicalTimeStep / statisticalTimePeriod);
+            }
+            RDouble c2 = 1.0 - c1;
+
+            RDouble **qAverageTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("qAverageTurb"));
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+                {
+                    //qAverageTurbulence[m][iCell] = c1 * qAverageTurbulence[m][iCell] + c2 * qTurbulence[m][iCell];
+                    qAverageTurbulence[m][iCell] = c2 * qAverageTurbulence[m][iCell] + c1 * qTurbulence[m][iCell];
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverUnstr::DualTimeSource(Grid *gridIn)
+{
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int isUnsteady = parameters->GetIsUnsteady();
+    if (!isUnsteady) return;
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+
+    RDouble **qPrimitive  = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble **qTurbulenceUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n1"));
+    RDouble **qTurbulenceUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb_unsteady_n2"));
+
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+    RDouble **residualTurbulenceUnsteadyN1 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_n1"));
+    RDouble **residualTurbulenceUnsteadyN2 = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_n2"));
+    RDouble **residualTurbulenceUnsteadyTemporary = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb_unsteady_tmp"));
+
+    RDouble *volume   = grid->GetCellVolume();
+    RDouble *volumeN1 = grid->GetCellVolume();
+    RDouble *volumeN2 = grid->GetCellVolume();
+
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble *primitive0 = new RDouble[nTurbulenceEquation];
+    RDouble *primitive1 = new RDouble[nTurbulenceEquation];
+    RDouble *primitive2 = new RDouble[nTurbulenceEquation];
+
+    RDouble *qConservative0 = new RDouble[nTurbulenceEquation];
+    RDouble *qConservative1 = new RDouble[nTurbulenceEquation];
+    RDouble *qConservative2 = new RDouble[nTurbulenceEquation];
+
+    //! Store the historical sum of InviscidFlux, ViscousFlux, et al., exclusive of DualTimeSourceFlux, used in UpdateUnsteadyFlow for the Rn in the dualtime method.
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            residualTurbulenceUnsteadyTemporary[m][iCell] = residualTurbulence[m][iCell];
+        }
+    }
+
+    //! Computation of dualtime coefficients, including three coefficients for Residual of R(p), R(n) and R(n-1);
+    //! and three coefficients for conservative variables of qcsv(p), qcsv(n), and qcsv(n-1).
+    RDouble dualTimeCoefficient[7];
+    const int methodOfDualTime = GlobalDataBase::GetIntParaFromDB("methodOfDualTime");
+    ComputeDualTimeCoefficient(methodOfDualTime, dualTimeCoefficient);
+
+    RDouble dualTimeResC1 = dualTimeCoefficient[0];
+    RDouble dualTimeResC2 = dualTimeCoefficient[1];
+    RDouble dualTimeResC3 = dualTimeCoefficient[2];
+    RDouble dualTimeQC1   = dualTimeCoefficient[3];
+    RDouble dualTimeQC2   = dualTimeCoefficient[4];
+    RDouble dualTimeQC3   = dualTimeCoefficient[5];
+
+    using namespace IDX;
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            primitive0[m] = qTurbulence[m][iCell];
+            primitive1[m] = qTurbulenceUnsteadyN1[m][iCell];
+            primitive2[m] = qTurbulenceUnsteadyN2[m][iCell];
+        }
+
+        RDouble coefficient = 1.0;
+
+        if (nTurbulenceEquation >= 2)
+        {
+            coefficient  = qPrimitive[IR][iCell];
+        }
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            qConservative0[m] = coefficient * primitive0[m];
+            qConservative1[m] = coefficient * primitive1[m];
+            qConservative2[m] = coefficient * primitive2[m];
+        }
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            RDouble dualSrcRes = dualTimeResC1 * residualTurbulence[m][iCell] +
+                                 dualTimeResC2 * residualTurbulenceUnsteadyN1[m][iCell] +
+                                 dualTimeResC3 * residualTurbulenceUnsteadyN2[m][iCell];
+
+            RDouble dualSrcQ   = dualTimeQC1 * qConservative0[m]* volume  [iCell] + 
+                                 dualTimeQC2 * qConservative1[m]* volumeN1[iCell] + 
+                                 dualTimeQC3 * qConservative2[m]* volumeN2[iCell];
+
+            residualTurbulence[m][iCell] = dualSrcRes + dualSrcQ;
+        }
+    }
+
+    delete []primitive0;
+    delete []primitive1;
+    delete []primitive2;
+    delete []qConservative0;
+    delete []qConservative1;
+    delete []qConservative2;
+}
+
+void TurbSolverUnstr::FillField(Grid *gridIn, FieldProxy *fieldProxy, RDouble value)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **field = fieldProxy->GetField_UNS();
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            field[m][iCell] = value;
+        }
+    }
+}
+
+void TurbSolverUnstr::FillField(Grid *gridIn, FieldProxy *field1Proxy, FieldProxy *field2Proxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **field1 = field1Proxy->GetField_UNS();
+    RDouble **field2 = field2Proxy->GetField_UNS();
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            field1[m][iCell] = field2[m][iCell];
+        }
+    }
+}
+
+FieldProxy * TurbSolverUnstr::CreateFieldProxy(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **field = NewPointer2<RDouble>(nTurbulenceEquation, numberOfTotal);
+
+    FieldProxy *fieldProxy = new FieldProxy();
+
+    fieldProxy->SetField_UNS(field, true);
+
+    return fieldProxy;
+}
+
+FieldProxy * TurbSolverUnstr::GetFieldProxy(Grid *gridIn, const string &fieldName)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **field = reinterpret_cast<RDouble **> (grid->GetDataPtr(fieldName));
+
+    FieldProxy *fieldProxy = new FieldProxy();
+
+    fieldProxy->SetField_UNS(field);
+
+    return fieldProxy;
+}
+
+FieldProxy * TurbSolverUnstr::GetResidualProxy(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+
+    FieldProxy *residualTurbulenceProxy = new FieldProxy();
+
+    residualTurbulenceProxy->SetField_UNS(residualTurbulence);
+
+    return residualTurbulenceProxy;
+}
+
+void TurbSolverUnstr::RecoverResidual(Grid *gridIn, FieldProxy *rhsProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+
+    if (grid->GetLevel() != 0) 
+    {
+        RDouble **rhs = rhsProxy->GetField_UNS();
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+            {
+                residualTurbulence[m][iCell] = rhs[m][iCell];
+            }
+        }
+    }
+}
+
+void TurbSolverUnstr::StoreRhsByResidual(Grid *gridIn, FieldProxy *rhsProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+    RDouble **rhs = rhsProxy->GetField_UNS();
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            rhs[m][iCell] = residualTurbulence[m][iCell];
+        }
+    }
+}
+
+void TurbSolverUnstr::InitResidual(Grid *gridIn, FieldProxy *rhsProxy)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+    RDouble **rhs = rhsProxy->GetField_UNS();
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            residualTurbulence[m][iCell] = - rhs[m][iCell];
+        }
+    }
+}
+
+void TurbSolverUnstr::RestrictAllQ(Grid *fineGridIn, Grid *coarseGridIn)
+{
+    UnstructGrid *fineGrid   = UnstructGridCast(fineGridIn);
+    UnstructGrid *coarseGrid = UnstructGridCast(coarseGridIn);
+
+    RDouble **qTurbulenceFineGrid   = reinterpret_cast<RDouble **> (fineGrid->GetDataPtr("q_turb"));
+    RDouble **qTurbulenceCoarseGrid = reinterpret_cast<RDouble **> (coarseGrid->GetDataPtr("q_turb"));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        RestrictQ(fineGrid, qTurbulenceFineGrid[m], coarseGrid, qTurbulenceCoarseGrid[m]);
+    }
+
+    RDouble *viscousOfFineGrid   = reinterpret_cast<RDouble *> (fineGrid->GetDataPtr("vist"));
+    RDouble *viscousOfCoarseGrid = reinterpret_cast<RDouble *> (coarseGrid->GetDataPtr("vist"));
+    RestrictQ(fineGrid, viscousOfFineGrid, coarseGrid, viscousOfCoarseGrid);
+    //coarseGrid->SetGhostCellExceptInterface(cvist);
+    coarseGrid->SetGhostCell(viscousOfCoarseGrid);
+}
+
+// Bell 20130513 mod
+void TurbSolverUnstr::LoadFlux(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace  = grid->GetRightCellOfFace();
+
+    RDouble **flux = faceProxy->GetFlux();
+
+    //! Determine if there are boundary faces.
+    int nMid  = localStart;
+    if (localEnd <= numberOfBoundaryFace)
+    {
+       //! If all boundary faces
+       nMid = localEnd;
+    }
+    else if (localStart < numberOfBoundaryFace)
+    {
+       //! Part of them are boundary faces
+       nMid = numberOfBoundaryFace;
+    }
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+    using namespace IDX;
+
+    //! For boundary faces, remember re is ghost cell
+    for (int i = localStart; i < nMid; ++ i)
+    {
+        int le,j;
+        le = leftCellOfFace[i];
+        j = i - localStart;
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            residualTurbulence[m][le] -= flux[m][j];          
+        }
+    }
+
+    //! Interior faces
+    for (int i = nMid; i <localEnd; ++ i)
+    {
+        int le,re,j;
+        le = leftCellOfFace[i];
+        re = rightCellOfFace[i];
+        j  = i - localStart;
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            residualTurbulence[m][le] -= flux[m][j];
+            residualTurbulence[m][re] += flux[m][j];
+        }
+    }
+}
+
+void TurbSolverUnstr::ModifyResidualOnWallBoundary(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int modifyTurbulenceResidual = GlobalDataBase::GetIntParaFromDB("mod_turb_res");
+
+    //! modify the residuals for the cells next to the wall
+    if (modifyTurbulenceResidual != 1) return;
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int viscoueType = parameters->GetViscousType();
+
+    using namespace PHENGLEI;
+    if (viscoueType == 3)
+    {
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int nBCRegion = unstructBCSet->GetnBCRegion();
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+            int bcType = bcRegion->GetBCType();
+
+            if (IsWall(bcType))
+            {
+                vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter ++)
+                {
+                    //! iFace is the face number in the set of faceIndex.
+                    int iFace = *iter;
+                    int le = leftCellOfFace[iFace];
+                    int re = rightCellOfFace[iFace];
+                    residualTurbulence[0][le] = 0.0;
+                    residualTurbulence[0][re] = 0.0;    //! Bell 20130508 add
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverUnstr::ResetWallScalar(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int viscoueType = parameters->GetViscousType();
+
+    using namespace PHENGLEI;
+    if (viscoueType == 3)
+    {
+        UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+        int nBCRegion = unstructBCSet->GetnBCRegion();
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+            int bcType = bcRegion->GetBCType();
+
+            if (IsWall(bcType))
+            {
+                vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    //! iFace is the face number in the set of faceIndex.
+                    int iFace = *iter;
+                    int le = leftCellOfFace[iFace];
+                    qTurbulence[0][le] = 0.0;
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverUnstr::SourceFluxOneEquation(Grid *grid)
+{
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+
+    ComputeLengthScaleofOneEquationModel(grid);
+
+    if (TurbEquationFormation() == FORMATION_SA_CFL3D)
+    {
+        SourceFluxOneEquationOriginalCFL3D(grid);
+    }
+    else
+    {
+        if (tscheme != GMRES)
+        {
+            SourceFluxOneEquationOriginal(grid);
+        }
+#ifdef USE_GMRESSOLVER
+        else
+        {
+            GMRES_SourceFluxOneEquationOriginal(grid);
+        }
+#endif
+    }
+}
+
+#ifdef USE_GMRESSOLVER
+//! GMRESturb
+void TurbSolverUnstr::GMRES_SourceFluxOneEquationOriginal(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+
+    RDouble **gradientPrimtiveVariableX = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **gradientPrimtiveVariableY = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **gradientPrimtiveVariableZ = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    RDouble *dudx = gradientPrimtiveVariableX[1];
+    RDouble *dudy = gradientPrimtiveVariableY[1];
+    RDouble *dudz = gradientPrimtiveVariableZ[1];
+
+    RDouble *dvdx = gradientPrimtiveVariableX[2];
+    RDouble *dvdy = gradientPrimtiveVariableY[2];
+    RDouble *dvdz = gradientPrimtiveVariableZ[2];
+
+    RDouble *dwdx = gradientPrimtiveVariableX[3];
+    RDouble *dwdy = gradientPrimtiveVariableY[3];
+    RDouble *dwdz = gradientPrimtiveVariableZ[3];
+
+    RDouble **dqdx = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTurbulenceX"));
+    RDouble **dqdy = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTurbulenceY"));
+    RDouble **dqdz = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTurbulenceZ"));
+
+    RDouble **q         = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+    RDouble **spectrumTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("spec_turb"));
+    RDouble *viscousLaminar = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+
+    RDouble **dRdq_turb = reinterpret_cast<RDouble **>(grid->GetDataPtr("dRdq_turb"));
+    RDouble **dDdP_turb = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP_turb"));
+    RDouble **dRdqCoupledTerm_turb = reinterpret_cast<RDouble **>(grid->GetDataPtr("dRdqCoupledTerm_turb"));
+    RDouble **dDdP = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP"));
+    vector<int> AI = grid->GetJacobianAI4GMRES();
+    vector<int> AJ = grid->GetJacobianAJ4GMRES();
+
+    RDouble *lengthScale = this->GetLengthScale(gridIn);
+    RDouble *nxs,*nys,*nzs,*ns,*vol;
+
+    nxs = grid->GetFaceNormalX();
+    nys = grid->GetFaceNormalY();
+    nzs = grid->GetFaceNormalZ();
+    ns  = grid->GetFaceArea();
+    vol = grid->GetCellVolume();
+
+    int **cell2face = grid->GetCell2Face();
+    vector<int> * c2c = grid->GetCell2Cell();
+    int *faceNumberOfEachCell = grid->GetFaceNumberOfEachCell();
+    int *leftCellofFace = grid->GetLeftCellOfFace();
+    int *rightCellofFace = grid->GetRightCellOfFace();
+    InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    using namespace IDX;
+
+    //! Work    = temporary storage array, contains on input the
+    //!          velocity gradients:
+    //!          work(n,1) = ui,i
+    //!          work(n,2) = u1,1**2 + u2,2**2 + u3,3**2
+    //!          work(n,3) = (u1,2+u2,1)**2 + (u1,3+u3,1)**2 + (u2,3+u3,2)**2
+    //!          work(n,4) = sqrt((u3,2-u2,3)**2 + (u1,3-u3,1)**2
+    //!                                           + (u2,1-u1,2)**2)
+    //!  calculation of dnu/dxi
+    //!  dnu/dx in work(.,5), dnu/dy in work(.,6), dnu/dz in work(.,7)
+
+    //! Von karman constant
+    const RDouble karm   = 0.41;
+    const RDouble cb1    = 0.1355;
+    const RDouble cb2    = 0.622;
+    const RDouble cv1    = 7.1;
+    const RDouble cw2    = 0.3;
+    const RDouble cw3    = 2.0;
+    const RDouble sigma  = 2.0/3.0;
+    const RDouble sdilim = 1.0e9;
+
+    RDouble kap2,oKap2;
+    kap2  = karm * karm;
+    oKap2 = one / kap2;
+
+    RDouble osigma = 1.0 / sigma;
+    RDouble cw1    = cb1 * oKap2 + (one + cb2) / sigma;
+    RDouble cv13   = cv1 * cv1 * cv1;
+    RDouble cw36   = pow(cw3,6);
+    RDouble or6    = one / six;
+
+    RDouble cb2s, cw1Kap2;
+    RDouble distance2, oDistance2;
+    RDouble volume, ftrans;
+    RDouble saC2, saC3;
+
+    ADReal nueSA, gradx, grady, gradz, cmachfix, xsi, xsi2, xsi3, fv1, fv2, ft2, nuetRs;
+    ADReal r, r5, g, g6, fw, grd2, rs, std, ostd, sBar, omega, olam;
+    ADReal production, diffsource, wallDest, source;
+    ADReal prod, dest, prodp, destp, prde, prdep, part1, part2;
+    ADReal dsdnu, dfv2dk, dfwdg, dgdr, drdnu, dfwdnu, temp;
+
+    ADReal dudy_ad, dudz_ad;
+    ADReal dvdx_ad, dvdz_ad;
+    ADReal dwdx_ad, dwdy_ad;
+    ADReal rho, pressure, mul;
+
+    RDouble coefficientofStateEquation = GAS_SPACE::gas->GetCoefficientOfStateEquation();
+    RDouble nonDimensionalSutherlandTemperature = GlobalDataBase::GetDoubleParaFromDB("tsuth");
+    RDouble viscousLaminarMin;
+    GlobalDataBase::GetData("visl_min", &viscousLaminarMin, PHDOUBLE, 1);
+
+    int nLaminar = grid->GetBlockSizeOfJacobianMatrix();
+    nLaminar--;
+
+    //! GMRESCoupled
+    RDouble *gradperturb = new RDouble[nLaminar];
+    for (int m = 0; m < nLaminar; m++)
+    {
+        gradperturb[m] = 0.0;
+    }
+
+    int colidx, colidx_bc;
+
+    saC2 = 0.7;
+    saC3 = 0.9;
+
+    cb2s = osigma * cb2;
+    cw1Kap2 = cw1 * kap2;
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        //! AD info
+        nueSA    = qTurbulence[ISA][iCell];
+        dudy_ad  = dudy[iCell];
+        dudz_ad  = dudz[iCell];
+        dvdx_ad  = dvdx[iCell];
+        dvdz_ad  = dvdz[iCell];
+        dwdx_ad  = dwdx[iCell];
+        dwdy_ad  = dwdy[iCell];
+        rho      = q[IR][iCell];
+        pressure = q[IP][iCell];
+
+        nueSA.diff(0, 9);
+        dudy_ad.diff(1, 9);
+        dudz_ad.diff(2, 9);
+        dvdx_ad.diff(3, 9);
+        dvdz_ad.diff(4, 9);
+        dwdx_ad.diff(5, 9);
+        dwdy_ad.diff(6, 9);
+        rho.diff(7, 9);
+        pressure.diff(8, 9);
+
+        //! compute viscousLaminar (mul)
+        ADReal t = pressure / (coefficientofStateEquation * rho);
+        mul = t * sqrt(t) * (1.0 + nonDimensionalSutherlandTemperature) / (t + nonDimensionalSutherlandTemperature);
+        mul = max(viscousLaminarMin, mul);
+
+        //! Omega: magnitude of the vorticity.
+        // omega = sqrt(SQR(dwdy[iCell] - dvdz[iCell]) +
+        //             SQR(dudz[iCell] - dwdx[iCell]) +
+        //             SQR(dvdx[iCell] - dudy[iCell]));
+        omega = pow(dwdy_ad - dvdz_ad, 2) + pow(dudz_ad - dwdx_ad, 2) + pow(dvdx_ad - dudy_ad,2);
+        omega = pow(omega,0.5);
+        
+
+        volume = vol[iCell];
+        cmachfix = nueSA * (dudx[iCell] + dvdy[iCell] + dwdz[iCell]);
+        cmachfix = 0.0;
+        olam     = rho / (mul + SMALL);
+        distance2 = lengthScale[iCell] * lengthScale[iCell];
+        oDistance2 = one / distance2;
+
+        xsi      = nueSA * olam + SMALL;
+        xsi3     = xsi * xsi * xsi;
+        fv1      = xsi3 / (xsi3 + cv13);
+        fv2      = one - xsi / (one + xsi * fv1);
+
+        //! Here, absorb oRefReNumber into rs.
+        rs     = nueSA * oKap2 * oDistance2 * oRefReNumber;
+        nuetRs = nueSA * rs;
+
+        //! sBar = fv2 * nueSA / (k2 * distance2).
+        sBar    = rs * fv2;
+
+        if (sBar >= - saC2 * omega)
+        {
+            std = omega + sBar;
+        }
+        else
+        {
+            std = omega + omega * (saC2 * saC2 * omega + saC3 * sBar) / ((saC3 - 2 *saC2) * omega - sBar);
+        }
+
+        ostd    = one / (std + SMALL);
+        r       = rs * ostd;
+
+        r    = min(r, static_cast<RDouble>(ten));
+        r5   = pow(r, 5);
+        g    = r + cw2 * (r5 * r - r);
+        g6   = pow(g, 6);
+        fw   = g * pow((static_cast<RDouble>(one) + cw36) / (g6 + cw36), or6);
+
+        //! Calculate "negative" production term in order to assure a zero.
+        //! Solution in the laminar region.
+
+        ftrans = zero;
+        xsi2   = xsi * xsi;
+        ft2    = 0.0;       //! Do Not consider transition here!
+        grd2 = SQR(dqdx[ISA][iCell]) + SQR(dqdy[ISA][iCell]) + SQR(dqdz[ISA][iCell]);
+
+        //! cb1  * omega * nueSA + cb1  * nueSA_rs * fv2.
+        production  = cb1 * (one - ft2) * std * nueSA;       
+
+        //! cb2s * rho * gradnue2.
+        diffsource  = cb2s * grd2 * oRefReNumber;           
+
+        //! ft2 = 0.0, cw1Kap2 = Cw1 * Kap2, so,
+        //! cw1Kap2 * fw * nuetRs = (Cw1 * Kap2 * fw * nueSA) * (nueSA2 * oKap2 * oDistance2)
+        //!                       = Cw1 * fw * (nueSA/d)^2
+        wallDest   = (cw1Kap2 * fw - cb1 * ft2) * nuetRs; //! The Re has been included in nuetRs.
+
+        diffsource = min(sdilim * production, diffsource);
+        source     = production - wallDest;
+
+        if(TurbEquationFormation() == FORMATION_SA_NSMB)
+        {
+            //source  += diffsource;                        //! Bell 20130513 delete for modsa.
+        }
+        else if(TurbEquationFormation() == FORMATION_ORGSA_SST)
+        {
+            source  += diffsource;
+        }
+
+        source *= volume;
+
+        residualTurbulence[ISA][iCell] += source.val();
+
+        // assemable Jacobian matrix, this is 1eq-sa, so only scalar production
+        colidx = GetIndexOfBlockJacobianMatrix(AI,AJ,1,iCell,iCell);
+        dRdq_turb[ISA][colidx] -= source.dx(0);
+
+        //! GMRESCoupled
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, iCell, iCell);
+        dRdqCoupledTerm_turb[ISA][colidx + IR] -= source.dx(7);
+        dRdqCoupledTerm_turb[ISA][colidx + IP] -= source.dx(8);
+
+        // find neighbors
+        for (int j = 0; j < faceNumberOfEachCell[iCell]; j++)
+        {
+            int face = cell2face[iCell][j];
+            int le = leftCellofFace[face];
+            int re = rightCellofFace[face];
+            gradperturb[IU] = (nys[face] * source.dx(1) + nzs[face] * source.dx(2)) / volume * 0.5 * ns[face];
+            gradperturb[IV] = (nxs[face] * source.dx(3) + nzs[face] * source.dx(4)) / volume * 0.5 * ns[face];
+            gradperturb[IW] = (nxs[face] * source.dx(5) + nys[face] * source.dx(6)) / volume * 0.5 * ns[face];
+            //! if neighbor cell sits at the left cell of face
+            if(iCell == re)
+            {
+                // perturbation of the left cell, influences the right cell
+                // colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, 1, iCell, le);
+                // dRdq_turb[ISA][colidx] -= (-nxs[face] * source.dx(1) - nys[face] * source.dx(2) - nzs[face] * source.dx(3)) / volume * 0.5 * ns[face];
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, iCell, le);
+                dRdqCoupledTerm_turb[ISA][colidx + IU] += gradperturb[IU];
+                dRdqCoupledTerm_turb[ISA][colidx + IV] += gradperturb[IV];
+                dRdqCoupledTerm_turb[ISA][colidx + IW] += gradperturb[IW];
+            }
+            //! if neighbor cell sits at the right cell of face
+            else
+            {
+                //! not boundary face
+                if(re < numberOfTotalCell)
+                {
+                    // colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, 1, iCell, re);
+                    // dRdq_turb[ISA][colidx] -= (nxs[face] * source.dx(1) + nys[face] * source.dx(2) + nzs[face] * source.dx(3)) / volume * 0.5 *  ns[face];
+                    colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, iCell, re);
+                    dRdqCoupledTerm_turb[ISA][colidx + IU] -= gradperturb[IU];
+                    dRdqCoupledTerm_turb[ISA][colidx + IV] -= gradperturb[IV];
+                    dRdqCoupledTerm_turb[ISA][colidx + IW] -= gradperturb[IW];
+                }
+                else
+                {
+                    if (interfaceInfo != nullptr && interfaceInfo->MatchedLocalPhysicalCellIndex(iCell) >= -1)
+                    {
+                        // it is for the interface boundary
+                        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, re, iCell);
+                        dRdqCoupledTerm_turb[ISA][colidx + IU] += gradperturb[IU];
+                        dRdqCoupledTerm_turb[ISA][colidx + IV] += gradperturb[IV];
+                        dRdqCoupledTerm_turb[ISA][colidx + IW] += gradperturb[IW];
+                    }
+                    else
+                    {
+                        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, iCell, iCell);
+                        colidx_bc = (re - numberOfTotalCell) * nLaminar;
+                        for (int indexI = 0; indexI < nLaminar; indexI++)
+                        {
+                            for (int indexJ = 0; indexJ < nLaminar; indexJ++)
+                            {
+                                dRdqCoupledTerm_turb[ISA][colidx + indexI] -= gradperturb[indexJ] * dDdP[indexJ][colidx_bc + indexI];
+                            }
+                        }
+                    }
+                }
+            }
+        }
+
+        //! Spectrum.
+        dfv2dk = (three * cv13 * pow(fv1/(xsi+SMALL), 2) - one) / pow(one + xsi * fv1, 2);
+        dsdnu  = oRefReNumber * oKap2 * oDistance2 * (fv2 + xsi * dfv2dk);
+        dfwdg   = fw / (g + SMALL) * (one - g6 / (g6 + cw36));
+        dgdr    = one + cw2 * (six * r5 - one);
+        drdnu   = oRefReNumber * oKap2 * oDistance2 * ostd * (one - nueSA * ostd * dsdnu);
+        dfwdnu  = dfwdg * dgdr * drdnu;
+
+        prod = cb1 * (one - ft2) * std;
+        dest = (cw1*fw - cb1*ft2*oKap2) * nueSA * oDistance2 * oRefReNumber;
+
+        prodp = cb1 * ((one - ft2) * dsdnu);
+        destp = (cw1 * (fw + dfwdnu * nueSA) - cb1 * ft2 * oKap2) * oDistance2 * oRefReNumber;
+
+        prde  = prod  - dest;
+        prdep = prodp - destp;
+
+        part1 = - half * (prde  - ABS(prde));
+        part2 = - half * (prdep - ABS(prdep)) * nueSA;
+
+        temp = (part1 + part2) * volume; 
+        spectrumTurbulence[ISA][iCell] += temp.val(); 
+    }
+
+    delete []gradperturb;
+}
+#endif
+
+//! Bell 20130513 mod
+void TurbSolverUnstr::SourceFluxOneEquationOriginal(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+
+    RDouble **gradientPrimtiveVariableX = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **gradientPrimtiveVariableY = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **gradientPrimtiveVariableZ = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    RDouble *dudx = gradientPrimtiveVariableX[IDX::IU];
+    RDouble *dudy = gradientPrimtiveVariableY[IDX::IU];
+    RDouble *dudz = gradientPrimtiveVariableZ[IDX::IU];
+
+    RDouble *dvdx = gradientPrimtiveVariableX[IDX::IV];
+    RDouble *dvdy = gradientPrimtiveVariableY[IDX::IV];
+    RDouble *dvdz = gradientPrimtiveVariableZ[IDX::IV];
+
+    RDouble *dwdx = gradientPrimtiveVariableX[IDX::IW];
+    RDouble *dwdy = gradientPrimtiveVariableY[IDX::IW];
+    RDouble *dwdz = gradientPrimtiveVariableZ[IDX::IW];
+
+    RDouble **dqdx = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTurbulenceX"));
+    RDouble **dqdy = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTurbulenceY"));
+    RDouble **dqdz = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTurbulenceZ"));
+
+    RDouble **q         = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+    RDouble **spectrumTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("spec_turb"));
+    RDouble *viscousLaminar = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+
+    RDouble *lengthScale = this->GetLengthScale(gridIn);
+    RDouble *nxs,*nys,*nzs,*ns,*vol;
+
+    nxs = grid->GetFaceNormalX();
+    nys = grid->GetFaceNormalY();
+    nzs = grid->GetFaceNormalZ();
+    ns  = grid->GetFaceArea();
+    vol = grid->GetCellVolume();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    using namespace IDX;
+
+    //! Work   = temporary storage array, contains on input the
+    //!          velocity gradients:
+    //!          work(n,1) = ui,i
+    //!          work(n,2) = u1,1**2 + u2,2**2 + u3,3**2
+    //!          work(n,3) = (u1,2+u2,1)**2 + (u1,3+u3,1)**2 + (u2,3+u3,2)**2
+    //!          work(n,4) = sqrt((u3,2-u2,3)**2 + (u1,3-u3,1)**2
+    //!                                           + (u2,1-u1,2)**2)
+    //!  calculation of dnu/dxi
+    //!  dnu/dx in work(.,5), dnu/dy in work(.,6), dnu/dz in work(.,7)
+
+    //! Von karman constant
+    const RDouble karm   = 0.41;
+    const RDouble cb1    = 0.1355;
+    const RDouble cb2    = 0.622;
+    const RDouble cv1    = 7.1;
+    const RDouble cw2    = 0.3;
+    const RDouble cw3    = 2.0;
+    const RDouble sigma  = 2.0/3.0;
+    const RDouble sdilim = 1.0e9;
+
+    RDouble kap2,oKap2;
+    kap2  = karm * karm;
+    oKap2 = one / kap2;
+
+    RDouble osigma = 1.0 / sigma;
+    RDouble cw1    = cb1 * oKap2 + (one + cb2) / sigma;
+    RDouble cv13   = cv1 * cv1 * cv1;
+    RDouble cw36   = pow(cw3,6);
+    RDouble or6    = one / six;
+    RDouble ct3    = 1.2;
+
+    RDouble production, diffsource, wallDest, source;
+    RDouble cb2s, cw1Kap2, rs, std, ostd, nuetRs;
+    RDouble prod, dest, prodp, destp, prde, prdep, part1, part2;
+    RDouble distance2, oDistance2, xsi, xsi2, xsi3, fv1, fv2, ft2;
+    RDouble r, r5, g, g6, fw, grd2;
+    RDouble dsdnu, dfv2dk, dfwdg, dgdr, drdnu, dfwdnu;
+    RDouble nueSA, volume, ftrans, olam, cmachfix;
+    RDouble sBar, omega;
+    RDouble saC2, saC3;
+
+    saC2 = 0.7;
+    saC3 = 0.9;
+
+    cb2s = osigma * cb2;
+    cw1Kap2 = cw1 * kap2;
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        nueSA = qTurbulence[ISA][iCell];
+
+        //! Omega: magnitude of the vorticity.
+        omega = sqrt(SQR(dwdy[iCell] - dvdz[iCell]) +
+                    SQR(dudz[iCell] - dwdx[iCell]) +
+                    SQR(dvdx[iCell] - dudy[iCell]));   
+       
+        volume   = vol[iCell];
+        cmachfix = nueSA * (dudx[iCell] + dvdy[iCell] + dwdz[iCell]);
+        cmachfix = 0.0;
+        olam     = q[IR][iCell] / (viscousLaminar[iCell] + SMALL);
+        distance2= lengthScale[iCell] * lengthScale[iCell];
+        oDistance2 = one / distance2;
+
+        xsi      = nueSA * olam + SMALL;
+        xsi3     = xsi * xsi * xsi;
+        fv1      = xsi3 / (xsi3 + cv13);
+        fv2      = one - xsi / (one + xsi * fv1);
+
+        //! Here, absorb oRefReNumber into rs.
+        rs     = nueSA * oKap2 * oDistance2 * oRefReNumber;
+        nuetRs = nueSA * rs;
+
+        //! sBar = fv2 * nueSA / (k2 * distance2).
+        sBar    = rs * fv2;
+
+        if (sBar >= - saC2 * omega)
+        {
+            std = omega + sBar;
+        }
+        else
+        {
+            std = omega + omega * (saC2 * saC2 * omega + saC3 * sBar) / ((saC3 - 2 *saC2) * omega - sBar);
+        }
+
+        //std     = MAX(str + rs * fv2, 0.3*str);
+        ostd    = one / (std + SMALL);
+        r       = rs * ostd;
+
+        r    = MIN(r, static_cast<RDouble>(ten));
+        r5   = pow(r, 5);
+        g    = r + cw2 * (r5 * r - r);
+        g6   = pow(g, 6);
+        fw   = g * pow((static_cast<RDouble>(one) + cw36) / (g6 + cw36), or6);
+
+        //! Calculate "negative" production term in order to assure a zero.
+        //! Solution in the laminar region.
+
+        ftrans = zero;
+        xsi2   = xsi * xsi;
+        ft2    = 0.0;       //! Do Not consider transition here!
+        //ft2    = ct3 * exp(- ct4 * xsi2) * ftrans;
+        grd2 = SQR(dqdx[ISA][iCell]) + SQR(dqdy[ISA][iCell]) + SQR(dqdz[ISA][iCell]);
+
+        //! cb1  * omega * nueSA + cb1  * nueSA_rs * fv2.
+        production  = cb1 * (one - ft2) * std * nueSA;       
+
+        //! cb2s * rho * gradnue2.
+        diffsource  = cb2s * grd2 * oRefReNumber;           
+
+        //! ft2 = 0.0, cw1Kap2 = Cw1 * Kap2, so,
+        //! cw1Kap2 * fw * nuetRs = (Cw1 * Kap2 * fw * nueSA) * (nueSA2 * oKap2 * oDistance2)
+        //!                       = Cw1 * fw * (nueSA/d)^2
+        wallDest   = (cw1Kap2 * fw - cb1 * ft2) * nuetRs; //! The Re has been included in nuetRs.
+
+        RDouble destrAlpha = 50.0;
+        if(nueSA < 0.0)
+        {
+            production = cb1 * (one - ct3) * omega * nueSA;
+            wallDest   = - destrAlpha * cw1Kap2 * nuetRs;
+        }
+
+        diffsource = MIN(sdilim * production, diffsource);
+        source     = production - wallDest;
+
+        if(TurbEquationFormation() == FORMATION_SA_NSMB)
+        {
+            //source  += diffsource;                        //! Bell 20130513 delete for modsa.
+        }
+        else if(TurbEquationFormation() == FORMATION_ORGSA_SST)
+        {
+            source  += diffsource;
+        }
+
+        residualTurbulence[ISA][iCell] += (source) * volume;
+
+        //! Spectrum.
+        dfv2dk = (three * cv13 * pow(fv1/(xsi+SMALL), 2) - one) / pow(one + xsi * fv1, 2);
+        dsdnu  = oRefReNumber * oKap2 * oDistance2 * (fv2 + xsi * dfv2dk);
+        dfwdg   = fw / (g + SMALL) * (one - g6 / (g6 + cw36));
+        dgdr    = one + cw2 * (six * r5 - one);
+        drdnu   = oRefReNumber * oKap2 * oDistance2 * ostd * (one - nueSA * ostd * dsdnu);
+        dfwdnu  = dfwdg * dgdr * drdnu;
+
+        //dft2dnu = - two * ct3 * ct4 * xsi * exp (- ct4 * xsi2) * olam * ftrans;
+
+        prod = cb1 * (one - ft2) * std;
+        dest = (cw1*fw - cb1*ft2*oKap2) * nueSA * oDistance2 * oRefReNumber;
+
+        prodp = cb1 * ((one - ft2) * dsdnu);
+        destp = (cw1 * (fw + dfwdnu * nueSA) - cb1 * ft2 * oKap2) * oDistance2 * oRefReNumber;
+
+        if(nueSA < 0.0)
+        {
+            prod = cb1 * (one - ct3) * omega;
+            dest = - destrAlpha * cw1 * nueSA * oDistance2 * oRefReNumber;
+
+            prodp = cb1 * ((one - ct3) * dsdnu);
+            destp = -destrAlpha * cw1 * oDistance2 * oRefReNumber;
+        }
+
+        prde  = prod  - dest;
+        prdep = prodp - destp;
+
+        part1 = - half * (prde  - ABS(prde));
+        part2 = - half * (prdep - ABS(prdep)) * nueSA;
+
+        spectrumTurbulence[ISA][iCell] += (part1 + part2) * volume;        
+    }
+}
+
+void TurbSolverUnstr::SourceFluxOneEquationOriginalCFL3D(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+
+    RDouble **gradientPrimtiveVariableX = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **gradientPrimtiveVariableY = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **gradientPrimtiveVariableZ = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    RDouble *drhodx = gradientPrimtiveVariableX[IDX::IR];
+    RDouble *drhody = gradientPrimtiveVariableY[IDX::IR];
+    RDouble *drhodz = gradientPrimtiveVariableZ[IDX::IR];
+
+    RDouble *dudy = gradientPrimtiveVariableY[IDX::IU];
+    RDouble *dudz = gradientPrimtiveVariableZ[IDX::IU];
+
+    RDouble *dvdx = gradientPrimtiveVariableX[IDX::IV];
+    RDouble *dvdz = gradientPrimtiveVariableZ[IDX::IV];
+
+    RDouble *dwdx = gradientPrimtiveVariableX[IDX::IW];
+    RDouble *dwdy = gradientPrimtiveVariableY[IDX::IW];
+
+    RDouble **dqdx = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTurbulenceX"));
+    RDouble **dqdy = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTurbulenceY"));
+    RDouble **dqdz = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTurbulenceZ"));
+
+    RDouble **q         = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+    RDouble **spectrumTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("spec_turb"));
+    RDouble *viscousLaminar = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+
+    RDouble *lengthScale = this->GetLengthScale(gridIn);
+    RDouble *nxs,*nys,*nzs,*ns,*vol;
+
+    nxs = grid->GetFaceNormalX();
+    nys = grid->GetFaceNormalY();
+    nzs = grid->GetFaceNormalZ();
+    ns  = grid->GetFaceArea();
+    vol = grid->GetCellVolume();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    using namespace IDX;
+
+    //! Von karman constant
+    const RDouble karm   = 0.41;
+    const RDouble cb1    = 0.1355;
+    const RDouble cb2    = 0.622;
+    const RDouble cv1    = 7.1;
+    const RDouble cw2    = 0.3;
+    const RDouble cw3    = 2.0;
+    const RDouble sigma  = 2.0/3.0;
+
+    RDouble kap2,oKap2;
+    kap2  = karm * karm;
+    oKap2 = one / kap2;
+
+    RDouble osigma = 1.0 / sigma;
+    RDouble cw1    = cb1 * oKap2 + (one + cb2) / sigma;
+    RDouble cv13   = cv1 * cv1 * cv1;
+    RDouble cw36   = pow(cw3, 6.0);
+    RDouble or6    = one / six;
+
+    RDouble ct3 = 1.2;
+    RDouble ct4 = 0.5; 
+
+    RDouble production, wallDest, source;
+    RDouble cb2s, cw1Kap2, S, oS;
+    RDouble distance2, oDistance2, xsi, xsi3, fv1, fv2, ft2;
+    RDouble r, r5, g, g6, fw;
+    RDouble nue, nueSA, volume, ftrans, rho, vis;
+    RDouble sBar, omega;
+    RDouble saC2, saC3;
+
+    saC2 = 0.7;
+    saC3 = 0.9;
+
+    cb2s = osigma * cb2;
+    cw1Kap2 = cw1 * kap2;
+
+    RDouble machinZero = pow(10.0, -machZeroExp + 1);
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        nueSA = qTurbulence[ISA][iCell];
+        rho   = q[IR][iCell];
+        vis   = viscousLaminar[iCell];
+        nue   = vis / (rho + SMALL);        
+
+        //! Omega: magnitude of the vorticity.
+        omega = sqrt(SQR(dwdy[iCell] - dvdz[iCell]) +
+                     SQR(dudz[iCell] - dwdx[iCell]) +
+                     SQR(dvdx[iCell] - dudy[iCell]));   
+
+        volume   = vol[iCell];
+  
+        distance2= lengthScale[iCell] * lengthScale[iCell];
+        oDistance2 = one / distance2;
+
+        xsi      = nueSA / nue;
+        xsi3     = xsi * xsi * xsi;
+        fv1      = xsi3 / (xsi3 + cv13);
+        fv2      = one - xsi / (one + xsi * fv1);
+
+        //! Important, Reynolds will exist when nueSA / ( k2 * distance2) appear,
+        //! so include the oRefReNumber for coding convenient.
+        //! Here, absorb oRefReNumber into rs(term0): nueSA / (k2 * distance2).
+        //! oRefReNumber is used both in S and r, so it is included into term0.
+        RDouble term0 = nueSA * oKap2 * oDistance2 * oRefReNumber;        
+
+        //!sBar = fv2 * nueSA / (k2 * distance2).
+        sBar    = term0 * fv2;
+
+        if (sBar >= - saC2 * omega)
+        {
+            S = omega + sBar;
+        }
+        else
+        {
+            S = omega + omega * (saC2 * saC2 * omega + saC3 * sBar) / ((saC3 - 2 *saC2) * omega - sBar);
+        }
+        oS    = one / (S + SMALL);
+
+        r     = term0 * oS;
+        r    = MIN(r, static_cast<RDouble>(ten));
+
+        r5   = pow(r, 5);
+        g    = r + cw2 * (r5 * r - r);
+        g    = MAX(g, machinZero);
+
+        g6   = pow(g, 6);
+        fw   = g * pow((static_cast<RDouble>(one) + cw36) / (g6 + cw36), or6);
+
+        //! ftrans: transition or not -- 1/0.
+        //! More work should be done to compare the influence of ft2.
+        ftrans = zero;  // one.
+        ft2    = ct3 * exp(- ct4 * xsi * xsi);
+        ft2   *= ftrans;
+
+        //! Using CFL3D terms.
+        //! CFL3D user's manual v5.0, and, open source code.
+        //! Here, consider omega only, since the sBar has been moved into 
+        //! the wallDest term because they all have the Reynolds.
+        RDouble term1_CFL3D = cb1 * (one - ft2) * omega;
+        RDouble term2_CFL3D = cb1 * ((one - ft2) * fv2 + ft2) * oKap2 - cw1 * fw;
+
+        RDouble destrAlpha = 50.0;
+        if(nueSA < 0.0)
+        {
+            term1_CFL3D = cb1 * ( one - ct3) * omega;
+            term2_CFL3D = destrAlpha * cw1;
+        }
+
+        production  = rho * term1_CFL3D * nueSA;     
+        wallDest    = rho * term2_CFL3D * nueSA * nueSA * oDistance2 * oRefReNumber;
+        source      = production + wallDest;
+
+        //! Conservative term: (1+cb2) * Grad(Rho) * Grad(nue) / sigma.
+        RDouble gradRhoNue = drhodx[iCell] * dqdx[ISA][iCell] + 
+                             drhody[iCell] * dqdy[ISA][iCell] +
+                             drhodz[iCell] * dqdz[ISA][iCell];
+        RDouble nuePositive  = PositiveSA(nue, vis, rho);
+        RDouble conserveTerm = (1 + cb2) * osigma * (vis / rho + nuePositive) * gradRhoNue * oRefReNumber;
+        source -= conserveTerm;
+
+        residualTurbulence[ISA][iCell] += source * volume;
+        
+        //! Spectrum, reference from CFL3D codes.
+        RDouble derivativePart1 = 2.0 * term2_CFL3D * nueSA * oDistance2;
+        RDouble dfv1  = (fv1 - fv1 * fv1) * 3.0 / nueSA;
+        RDouble dfv2  = (fv2 - 1.0) / nueSA + (1.0 - fv2) * (1.0 - fv2) * (fv1 / nueSA + dfv1);
+        RDouble dft2  = -(2.0 * ct4 * nueSA / (nue * nue)) * ft2;
+        RDouble drr   = r / nueSA - r * r * (fv2 / nueSA + dfv2); 
+        RDouble dgg   = (1.0 - cw2 + 6.0 * cw2 * pow(r, 5.0)) * drr;
+
+        g  = MAX(g, 10.0 * machinZero); //! Fix for single prec. via CFL3D via TLNS3D via FUN3D vi Tim Barth
+        g6 = pow(g, 6);
+
+        RDouble dfw   = pow((1.0 + cw36) / (g6 + cw36), or6) - 
+                       (pow(1.0 + cw36, or6) / (pow(g6 + cw36,(7.0 / 6.0)))) * g6;      
+        dfw *= dgg;  
+        RDouble derivativePart2  = oDistance2 * nueSA * nueSA * 
+            (cb1 * oKap2 * (dfv2 - ft2 * dfv2 - fv2 * dft2 + dft2)-cw1 * dfw);
+
+        if(nueSA < 0.0)
+        {
+            derivativePart2 = 0.0;
+        }
+
+        //! The source spectrum terms lie on left side of equation, so minus it.
+        spectrumTurbulence[ISA][iCell] -= (derivativePart1 + derivativePart2) * oRefReNumber * volume;
+
+        //! The following term is negatived. it may delay the converge, although may improve robust.
+        spectrumTurbulence[ISA][iCell] -= term1_CFL3D * volume;
+    }
+}
+
+void TurbSolverUnstr::SourceFluxTwoEquation(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **primitiveVariables = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble * > (grid->GetDataPtr("vist"));
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble **spectrumTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("spec_turb"));
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+
+    RDouble *xc   = grid->GetCellCenterX();
+    RDouble *vol  = grid->GetCellVolume();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    RDouble refReNumber  = parameters->GetRefReNumber();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    string viscousName = parameters->GetViscousName();
+
+    int neasm = -1;
+    GlobalDataBase::GetData("neasm",&neasm, PHINT, 1);
+
+    int SSTProductType = parameters->GetSSTProductType();
+
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    RDouble cblend, density, ke, kw;
+    RDouble sij2, divv, prodk, dissk, prodw, dissw, cdkww, crss, mut;
+    RDouble srck, srcw, fskn, fswn, diak, diaw, oork, oorw, volume;
+    /*RDouble turbXk, turbXw, turbXk2, turbFk2, turbFw;*/
+    RDouble s11, s22, s33, s12, s13, s23, w12, w13, w23;
+    RDouble vort2;
+
+    RDouble turbFbetas, turbFbeta, turbBeta, turbAlphaw/*, turbSigd*/;
+
+    RDouble *dudx = new RDouble[numberOfTotal]();
+    RDouble *dudy = new RDouble[numberOfTotal]();
+    RDouble *dudz = new RDouble[numberOfTotal]();
+    
+    RDouble *dvdx = new RDouble[numberOfTotal]();
+    RDouble *dvdy = new RDouble[numberOfTotal]();
+    RDouble *dvdz = new RDouble[numberOfTotal]();
+    
+    RDouble *dwdx = new RDouble[numberOfTotal]();
+    RDouble *dwdy = new RDouble[numberOfTotal]();
+    RDouble *dwdz = new RDouble[numberOfTotal]();
+
+    using namespace IDX;
+    grid->CompGradient(primitiveVariables[IU], dudx, dudy, dudz);
+    grid->CompGradient(primitiveVariables[IV], dvdx, dvdy, dvdz);
+    grid->CompGradient(primitiveVariables[IW], dwdx, dwdy, dwdz);
+
+    RDouble **aniss = 0;
+    RDouble *sengy  = 0;
+
+    if (neasm > 0)
+    {
+        aniss = reinterpret_cast<RDouble **> (grid->GetDataPtr("aniss"));
+        sengy = reinterpret_cast<RDouble * > (grid->GetDataPtr("sengy"));
+    }
+
+    int freeturbIntensitySRModify = 0;
+    if (GlobalDataBase::IsExist("freeturbIntensitySRModify", PHINT, 1))
+    {
+        freeturbIntensitySRModify = GlobalDataBase::GetIntParaFromDB("freeturbIntensitySRModify");
+    }
+    double freeDecayXLocation = 0.0;
+    if (GlobalDataBase::IsExist("freeDecayXLocation", PHDOUBLE, 1))
+    {
+        freeDecayXLocation = GlobalDataBase::GetDoubleParaFromDB("freeDecayXLocation");
+    }
+
+    using namespace IDX;
+    RDouble refMaNumber = parameters->GetRefMachNumber();
+    RDouble SpSdlimit = MIN(1.0 + 0.00075 * refMaNumber * refMaNumber * refMaNumber * refMaNumber, 1.2);
+
+    int transitionType = parameters->GetTransitionType();
+
+    RDouble *freeStreamTurbVar = parameters->GetFreeStreamTurbVar();
+
+    //! K-OMEGA MODELS
+    if (viscousName.substr(0, 6) == "2eq-kw")
+    {
+        //! MENTER'S K-OMEGA SST MODEL
+        if (viscousName.substr(0, 17) == "2eq-kw-menter-sst")
+        {
+            //turbulence model constants
+            RDouble SSTProductLimit = parameters->GetSSTProductLimit();
+            GlobalDataBase::GetData("turb_fbetas", &turbFbetas, PHDOUBLE, 1);
+            GlobalDataBase::GetData("turb_fbeta" , &turbFbeta , PHDOUBLE, 1);
+            RDouble SST_beta1 = parameters->GetSST_beta1();
+            RDouble SST_beta2 = parameters->GetSST_beta2();
+            RDouble SST_betaStar = parameters->GetSST_betaStar();
+            RDouble KW_sigmaW2 = parameters->GetKW_sigmaW2();
+            RDouble SST_alphaw1 = parameters->GetSST_alphaw1();
+            RDouble SST_alphaw2 = parameters->GetSST_alphaw2();
+
+            RDouble *cross = reinterpret_cast<RDouble  *> (grid->GetDataPtr("cross"));
+            RDouble *blend = reinterpret_cast<RDouble  *> (grid->GetDataPtr("blend"));
+            RDouble *SpSdRatio = NULL, *gamaeff = NULL;
+            if (transitionType == IREGAMA)
+            {
+                SpSdRatio = reinterpret_cast<RDouble *> (grid->GetDataPtr("SpSdRatio"));
+                gamaeff = reinterpret_cast<RDouble *> (grid->GetDataPtr("gamaeff"));
+            }
+
+            for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+            {
+                cblend  = blend[iCell];
+                crss    = cross[iCell];
+                density = primitiveVariables[IR][iCell];
+                ke      = qTurbulence[IKE][iCell];
+                kw      = qTurbulence[IKW][iCell];
+                mut     = viscousTurbulence[iCell];
+                volume  = vol[iCell];
+
+                turbBeta   = cblend * SST_beta1   + (1.0 - cblend) * SST_beta2;
+                turbAlphaw = cblend * SST_alphaw1 + (1.0 - cblend) * SST_alphaw2;
+
+                s11 = dudx[iCell];
+                s22 = dvdy[iCell];
+                s33 = dwdz[iCell];
+                s12 = half * (dudy[iCell] + dvdx[iCell]);
+                s13 = half * (dudz[iCell] + dwdx[iCell]);
+                s23 = half * (dvdz[iCell] + dwdy[iCell]);
+                w12 = half * (dudy[iCell] - dvdx[iCell]);
+                w13 = half * (dudz[iCell] - dwdx[iCell]);
+                w23 = half * (dvdz[iCell] - dwdy[iCell]);
+                
+                sij2 = two * (s11*s11 + s22*s22 + s33*s33 + two*(s12*s12 + s13*s13 + s23*s23));
+                divv = s11 + s22 + s33;
+
+                if (neasm < 0)
+                {
+                    if (SSTProductType == 0)
+                    {
+                        //! Boussinesq approximation,full production.
+                        prodk = mut * (sij2 - two3rd * divv * divv) * oRefReNumber - two3rd * density * ke * divv;
+                    }
+                    else
+                    {
+                        vort2 = four * (w12 * w12 + w13 * w13 + w23 * w23);
+                        prodk = mut * (vort2) * oRefReNumber - two3rd * density * ke * divv;
+                    }
+                }
+                dissk = turbFbetas * SST_betaStar * density * ke * kw * refReNumber;
+
+                //! Limit production
+                prodk = MIN(prodk, SSTProductLimit * dissk);
+                prodw = turbAlphaw * density / (mut + SMALL) * prodk;
+                dissw = turbFbeta * turbBeta * density * kw * kw * refReNumber;
+                cdkww = two * (one - cblend) * density * KW_sigmaW2 * crss / (kw + SMALL) * oRefReNumber;
+                //! Re-gama transition model
+                if (transitionType == IREGAMA && freeturbIntensitySRModify == 1 && xc[iCell] < freeDecayXLocation)
+                {
+                    //! S-R Modify
+                    RDouble keamb = freeStreamTurbVar[IKE];
+                    RDouble kwamb = freeStreamTurbVar[IKW];
+                    prodk += turbFbetas * SST_betaStar * density * keamb * kwamb * refReNumber;
+                    prodw += turbFbeta * turbBeta * density * kwamb * kwamb * refReNumber;
+                }
+
+                //! Re-gama transition model
+                if (transitionType == IREGAMA)
+                {
+                    RDouble gmeff = gamaeff[iCell];
+                    prodk = CorrectionOfProductionInKEquation(gmeff, prodk);
+                    dissk = CorrectionOfDestructionInKEquation(gmeff, dissk);
+                    SpSdRatio[iCell] = MIN(MAX(prodk / (dissk + SMALL), 1.0), SpSdlimit);
+                }
+
+                srck  = prodk - dissk;
+                srcw  = prodw - dissw + cdkww;
+
+                residualTurbulence[IKE][iCell] += (srck) * volume;
+                residualTurbulence[IKW][iCell] += (srcw) * volume;
+
+                if (neasm > 0)
+                {
+                    sengy[iCell] = - (srck) * volume;
+                }
+
+                diak = - two * turbFbetas * SST_betaStar * kw;
+                diaw = - two * turbFbeta  * turbBeta  * kw - ABS(cdkww) / (density * kw + SMALL);
+
+                fskn = half * (srck - ABS(srck));
+                fswn = half * (srcw - ABS(srcw));
+
+                oork = 1.0 / (density * ke + SMALL);
+                oorw = 1.0 / (density * kw + SMALL);
+
+                spectrumTurbulence[IKE][iCell] += - (diak + fskn * oork) * volume;
+                spectrumTurbulence[IKW][iCell] += - (diaw + fswn * oorw) * volume;
+            }
+        }
+    }
+
+    delete []dudx;
+    delete []dudy;
+    delete []dudz;
+
+    delete []dvdx;
+    delete []dvdy;
+    delete []dvdz;
+
+    delete []dwdx;
+    delete []dwdy;
+    delete []dwdz;
+}
+
+void TurbSolverUnstr::Crossing(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal        = numberOfTotalCell + numberOfBoundaryFace;
+
+    RDouble *dkedx = new RDouble [numberOfTotal];
+    RDouble *dkedy = new RDouble [numberOfTotal];
+    RDouble *dkedz = new RDouble [numberOfTotal];
+    RDouble *dkwdx = new RDouble [numberOfTotal];
+    RDouble *dkwdy = new RDouble [numberOfTotal];
+    RDouble *dkwdz = new RDouble [numberOfTotal];
+
+    RDouble *cross = reinterpret_cast<RDouble  *> (grid->GetDataPtr("cross"));
+
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    grid->CompGradient(qTurbulence[0], dkedx, dkedy, dkedz);
+    grid->CompGradient(qTurbulence[1], dkwdx, dkwdy, dkwdz);
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        cross[iCell] = dkedx[iCell] * dkwdx[iCell] + dkedy[iCell] * dkwdy[iCell] + dkedz[iCell] * dkwdz[iCell];
+    }
+    delete []dkedx;
+    delete []dkedy;
+    delete []dkedz;
+
+    delete []dkwdx;
+    delete []dkwdy;
+    delete []dkwdz;
+}
+
+void TurbSolverUnstr::Blending(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell    = grid->GetNTotalCell();
+
+    RDouble **q      = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *viscousLaminar   = reinterpret_cast<RDouble * > (grid->GetDataPtr("visl"));
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble *cross = reinterpret_cast<RDouble  *> (grid->GetDataPtr("cross"));
+    RDouble *blend = reinterpret_cast<RDouble  *> (grid->GetDataPtr("blend"));
+
+    RDouble *wallDistance = grid->GetWallDist();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble oReynolds = 1.0 / refReNumber;
+    RDouble oReynoldsSqr = oReynolds * oReynolds;
+    int transitionType = parameters->GetTransitionType();
+
+    RDouble betas = 0.09;
+    RDouble sigw2 = 0.856;
+
+    using namespace IDX;
+
+    //! Compute maximum cross diffusion term across flowfield
+    RDouble cdkwmax, crossDiff;
+    cdkwmax = 0.0;
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        RDouble rho  = q[IR][iCell];
+        RDouble kw   = qTurbulence[IKW][iCell];
+        RDouble crss = cross[iCell];
+
+        crossDiff = 2.0 * (rho) * crss * sigw2 / (kw + SMALL);
+    }
+
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+    {
+        RDouble rho   = q[IR][iCell];
+        RDouble ke    = qTurbulence[IKE][iCell];
+        RDouble kw    = qTurbulence[IKW][iCell];
+        RDouble crss  = cross[iCell];
+        RDouble visL  = viscousLaminar[iCell];
+        RDouble dist  = wallDistance[iCell];
+        RDouble dist2 = dist * dist;
+        RDouble cdkw, term1, term2, term3, term4, arg1;
+
+        //! calculate cd_kw
+        crossDiff = 2.0 * (rho) * sigw2 * crss / (kw + SMALL);
+
+        //! Original Menter CD_kw calculation
+        cdkw = MAX(crossDiff, 1.0e-10);
+
+        //! calculate arg1
+        term1 = sqrt(ABS(ke)) * oReynolds / (betas * dist * kw + SMALL);
+        term2 = 500.0 * visL * oReynoldsSqr / (rho * kw * dist2 + SMALL);
+        term3 = MAX(term1, term2);
+        term4 = 4.0 * rho * sigw2 * ke / (cdkw * dist2 + SMALL);
+        arg1  = MIN(term3, term4);
+
+        //! Compute the blending function fbsl
+        blend[iCell] = tanh(arg1 * arg1 * arg1 * arg1);
+
+        if (transitionType == IREGAMA)
+        {
+            CorrectionOfBlendingFunctionInSST(rho, dist, visL, ke, refReNumber, blend[iCell]);
+        }
+    }
+
+    grid->SetGhostCellExceptInterface(blend);
+}
+
+FaceProxy * TurbSolverUnstr::CreateFaceProxy(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast (gridIn);
+
+    FaceProxy *faceProxy = CreateFaceProxyTurbulence(grid);
+    faceProxy->SetNext(CreateFaceProxyNS(grid));
+
+    return faceProxy;
+}
+
+FaceProxy * TurbSolverUnstr::CreateFaceProxyNS(Grid *gridIn)
+{
+    int nl;
+    GlobalDataBase::GetData("nl", &nl, PHINT, 1);
+
+    int nchem;
+    GlobalDataBase::GetData("nchem", &nchem, PHINT, 1);
+
+    int numberOfEquation = nl + nchem;
+
+    FaceProxy *faceProxy = new FaceProxy();
+    faceProxy->Create(SEGCTION_LENGTH, numberOfEquation);
+
+    return faceProxy;
+}
+
+FaceProxy * TurbSolverUnstr::CreateFaceProxyTurbulence(Grid *gridIn)
+{
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    FaceProxy *faceProxy = new FaceProxy();
+    faceProxy->Create(SEGCTION_LENGTH, nTurbulenceEquation);
+
+    return faceProxy;
+}
+
+TurbFaceValue * TurbSolverUnstr::CreateTurbFaceValue(Grid *gridIn)
+{
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    TurbFaceValue *facevar = new TurbFaceValue(nTurbulenceEquation, SEGCTION_LENGTH);
+    return facevar;
+}
+
+void TurbSolverUnstr::ComputeQTurbNodeValue(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotalNode = grid->GetNTotalNode();
+    int numberOfTotalFace = grid->GetNTotalFace();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **qTurbulenceNode = reinterpret_cast<RDouble **>(grid->GetDataPtr("qTurbNode"));
+    RDouble     **qTurbulence = reinterpret_cast<RDouble **>(grid->GetDataPtr("q_turb"));
+    int   *nodeValueSliceTurb = reinterpret_cast<int      *>(grid->GetDataPtr("nodeValueSliceTurb"));
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    int *face2node = grid->GetFace2Node();
+    int *nodeNumberOfEachFace = grid->GetNodeNumberOfEachFace();
+ 
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    for (int iNode = 0; iNode < numberOfTotalNode; ++ iNode)
+    {
+        nodeValueSliceTurb[iNode] = 0;
+
+        for(int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            qTurbulenceNode[m][iNode] = 0; 
+        }
+    }
+
+    //! Boundary faces
+    int nodePosition = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            //! iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            int le = leftCellOfFace [iFace];
+            int re = rightCellOfFace[iFace];
+
+            if (bcType != PHENGLEI::INTERFACE)
+            {
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    //! From left
+                    int point = face2node[nodePosition + jNode];
+
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulenceNode[m][point] += qTurbulence[m][le];
+                    }            
+                    nodeValueSliceTurb[point] += 1;
+
+                    //! From right
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulenceNode[m][point] += qTurbulence[m][re];
+                    }
+                    nodeValueSliceTurb[point] += 1;
+                }
+            }
+            else
+            {
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    int point = face2node[nodePosition + jNode];
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulenceNode[m][point] += qTurbulence[m][le];
+                    }
+                    nodeValueSliceTurb[point] += 1;
+                }
+            }        
+            nodePosition += nodeNumberOfEachFace[iFace];
+        }
+    }
+
+    //! Interior faces
+    for (int iFace = numberOfBoundaryFace; iFace < numberOfTotalFace; ++ iFace)
+    {
+        int le  = leftCellOfFace [iFace];
+        int re  = rightCellOfFace[iFace];
+        for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+        {
+            //! From left
+            int point = face2node[nodePosition + jNode];
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                qTurbulenceNode[m][point] += qTurbulence[m][le];
+            }            
+            ++ nodeValueSliceTurb[point];
+
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                qTurbulenceNode[m][point] += qTurbulence[m][re];
+            }
+            ++ nodeValueSliceTurb[point];
+        }
+        nodePosition += nodeNumberOfEachFace[iFace];
+    }
+
+    nodePosition = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            //! iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            if (bcType == PHENGLEI::SYMMETRY)
+            {
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    int point = face2node[nodePosition + jNode];
+
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulenceNode[m][point] = 0;
+                    }            
+                    nodeValueSliceTurb[point] = 0;
+                }
+            }
+            nodePosition += nodeNumberOfEachFace[iFace];
+        }
+    }
+
+    nodePosition = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            //! iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            int le = leftCellOfFace[iFace];
+            int re = iFace + numberOfTotalCell;
+
+            if (bcType == PHENGLEI::SYMMETRY)
+            {
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    int point = face2node[nodePosition + jNode];
+
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulenceNode[m][point] += qTurbulence[m][le];
+                    }            
+                    ++ nodeValueSliceTurb[point];
+
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulenceNode[m][point] += qTurbulence[m][re];
+                    }
+                    ++ nodeValueSliceTurb[point];
+                }
+            }
+            nodePosition += nodeNumberOfEachFace[iFace];
+        }
+    }
+
+    nodePosition = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            //! iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            if (bcType == PHENGLEI::FARFIELD)
+            {
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    int point = face2node[nodePosition + jNode];
+
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulenceNode[m][point] = 0;
+                    }            
+                    nodeValueSliceTurb[point] = 0;
+                }
+            }
+            nodePosition += nodeNumberOfEachFace[iFace];
+        }
+    }
+
+    nodePosition = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            //! iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            int le = leftCellOfFace[iFace];
+            int re = iFace + numberOfTotalCell;
+
+            if (bcType == PHENGLEI::FARFIELD)
+            {
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    int point = face2node[nodePosition + jNode];
+
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulenceNode[m][point] += qTurbulence[m][le];
+                    }            
+                    ++ nodeValueSliceTurb[point];
+
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulenceNode[m][point] += qTurbulence[m][re];
+                    }
+                    ++ nodeValueSliceTurb[point];
+                }
+            }
+            nodePosition += nodeNumberOfEachFace[iFace];
+        }
+    }
+
+    nodePosition = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            //! iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            if (bcType == PHENGLEI::SOLID_SURFACE)
+            {
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    int point = face2node[nodePosition + jNode];
+
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulenceNode[m][point] = 0;
+                    }            
+                    nodeValueSliceTurb[point] = 0;
+                }
+            }
+            nodePosition += nodeNumberOfEachFace[iFace];
+        }
+    }
+
+    nodePosition = 0;
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            //! iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            int le = leftCellOfFace[iFace];
+            int re = iFace + numberOfTotalCell;
+            if (bcType == PHENGLEI::SOLID_SURFACE)
+            {
+                for (int jNode = 0; jNode < nodeNumberOfEachFace[iFace]; ++ jNode)
+                {
+                    int point = face2node[nodePosition + jNode];
+
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulenceNode[m][point] += qTurbulence[m][le];
+                    }            
+                    ++ nodeValueSliceTurb[point];
+
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulenceNode[m][point] += qTurbulence[m][re];
+                    }
+                    ++ nodeValueSliceTurb[point];
+                }
+            }
+            nodePosition += nodeNumberOfEachFace[iFace];
+        }
+    }
+
+    //! Change the number of points divided by the interpoint to the number of points before partition,because it is a face loop,each point is calculated twice,so the number of points needs to be multiplied by 2.
+    InterpointInformation *interPointInfor = grid->GetInterpointInfo();
+    if (interPointInfor)
+    {
+        int numberOfInterPoint = interPointInfor->GetNumberOfInterpoints();
+        int *labelOfInterPoint = interPointInfor->GetLabelOfInterPoint();
+        int *interPoint2GlobalPoint = interPointInfor->GetInterPoint2GlobalPoint();
+        
+        int globalPoint = 0;
+        for (int iPoint = 0; iPoint < numberOfInterPoint; ++ iPoint)
+        {
+            globalPoint = interPoint2GlobalPoint[iPoint];
+            if (labelOfInterPoint[iPoint] != 1)
+            {
+                for (int m = 0; m < nTurbulenceEquation;++ m)
+                {    
+                    globalPoint = interPoint2GlobalPoint[iPoint];
+                    qTurbulenceNode[m][globalPoint] = 0;
+                }
+            }
+        }
+        RDouble **qTurbulenceInterPoint = reinterpret_cast<RDouble **> (grid->GetDataPtr("turb::qInterpoint"));
+        for (int iPoint = 0; iPoint < numberOfInterPoint; ++ iPoint)
+        {
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                qTurbulenceInterPoint[m][iPoint] = 0;
+            }
+        }
+    }
+}
+
+void TurbSolverUnstr::ModifyQTurbNodeValue(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int nTotalNode = grid->GetNTotalNode();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **qTurbulenceNode = reinterpret_cast<RDouble **>(grid->GetDataPtr("qTurbNode"));
+    int   *nodeValueSliceTurb = reinterpret_cast<int      *>(grid->GetDataPtr("nodeValueSliceTurb"));
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        if (nodeValueSliceTurb[iNode] != 0)
+        {
+            for (int m = 0; m < nTurbulenceEquation; m++)
+            {
+                qTurbulenceNode[m][iNode] /= nodeValueSliceTurb[iNode];
+            }
+        }
+        else
+        {
+            for (int m = 0; m < nTurbulenceEquation; m++)
+            {
+                qTurbulenceNode[m][iNode] = 0.0;
+            }
+        }
+    }
+}
+
+void TurbSolverUnstr::ComputeFaceWeight(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble *deltL = faceProxy->GetWeightL();
+    RDouble *deltR = faceProxy->GetWeightR();
+
+    grid->FaceWeight(deltL, deltR, localStart, localEnd);
+}
+
+void TurbSolverUnstr::ViscousFlux(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalFace = grid->GetNTotalFace();
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+    FaceProxy *faceProxy = CreateFaceProxy(grid);
+    faceProxy->SetTurbFaceValue(CreateTurbFaceValue(grid));
+
+    int localStart,localEnd;
+    localStart = 0;
+    do
+    {
+        localEnd = localStart + SEGCTION_LENGTH;
+        if (localEnd > numberOfTotalFace) localEnd = numberOfTotalFace;
+
+        ComputeFaceWeight(grid, faceProxy, localStart, localEnd);
+
+        // GetVisFaceValue(grid, faceProxy, localStart, localEnd);
+
+        if(tscheme != GMRES)
+        {
+            GetVisFaceValue(grid, faceProxy, localStart, localEnd);
+
+            ComputeVisflux(grid, faceProxy, localStart, localEnd);
+        }
+#ifdef USE_GMRESSOLVER
+        else
+        {
+            GMRES_ComputeVisflux(grid, faceProxy, localStart, localEnd);
+        }
+#endif
+        localStart = localEnd;
+    } while (localStart < numberOfTotalFace);
+
+    delete faceProxy;
+}
+
+void TurbSolverUnstr::GetVisFaceValue(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    //! GMRESturb
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    TurbFaceValue *faceVariable = faceProxy->GetTurbFaceValue();
+
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+
+    RDouble *viscousLaminar = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int viscoueType = parameters->GetViscousType();
+
+    string viscousName = parameters->GetViscousName();
+
+    RDouble *mul   = faceVariable->mul;
+    RDouble *mut   = faceVariable->mut;
+    RDouble **mlt  = faceVariable->mlt;
+
+    int le,re,jFace;
+    for (int iFace = localStart; iFace <localEnd; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+        if (iFace < numberOfBoundaryFace) re = iFace + numberOfTotalCell;
+        jFace  = iFace - localStart;
+
+        mul[jFace] = half * (viscousLaminar[le] + viscousLaminar[re]);
+        mut[jFace] = half * (viscousTurbulence[le] + viscousTurbulence[re]);
+    }
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    int nMid = numberOfBoundaryFace;
+    if (localEnd < numberOfBoundaryFace) nMid = localEnd;
+
+    if (localStart < numberOfBoundaryFace)
+    {
+        for (int iFace = localStart; iFace < nMid; ++ iFace)
+        {
+            UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+            int bcType = bcRegion->GetBCType();
+
+            jFace  = iFace - localStart;
+
+            le = leftCellOfFace[iFace];
+
+            if (IsInterface(bcType))
+            {
+                continue;
+            }
+
+            if (IsWall(bcType))
+            {
+                mul[jFace] = viscousLaminar[le];
+                mut[jFace] = 0.0;
+            }
+            else
+            {
+                mul[jFace] = viscousLaminar[le];
+                mut[jFace] = viscousTurbulence[le];
+            }
+        }
+    }
+
+    using namespace IDX;
+
+    if (viscoueType == 3)
+    {
+        RDouble KW_sigma = parameters->GetKW_sigma();
+        RDouble oSigma = 1.0 / KW_sigma;
+        RDouble **qPrimitiveVariable = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+
+        for (int iFace = localStart; iFace <localEnd; ++ iFace)
+        {
+            le = leftCellOfFace [iFace];
+            re = rightCellOfFace[iFace];
+            jFace  = iFace - localStart;
+
+            RDouble nueLeft = qTurbulence[ISA][le];
+            RDouble visLeft = viscousLaminar[le];
+            RDouble rhoLeft = qPrimitiveVariable[IR][le]; 
+
+            RDouble nueRight= qTurbulence[ISA][re]; 
+            RDouble visRight= viscousLaminar[re];
+            RDouble rhoRight= qPrimitiveVariable[IR][re];
+
+            if(iFace < numberOfBoundaryFace)
+            {
+                //! move to the upper BC loop future.
+                if(nueLeft < 0.0)
+                {        
+                    nueLeft  = PositiveSA(nueLeft, visLeft, rhoLeft);
+
+                    int bcType = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace])->GetBCType();
+                    if(IsWall(bcType))
+                    {                        
+                        nueRight = -nueLeft;
+                    }
+                }
+            }
+            else
+            {
+                nueLeft  = PositiveSA(nueLeft, visLeft, rhoLeft);
+                nueRight = PositiveSA(nueRight, visRight, rhoRight);
+            }
+
+            mlt[ISA][jFace] = oSigma * half * (visLeft / rhoLeft + visRight / rhoRight
+                                             + nueLeft + nueRight );
+        }// iFace loop
+    }
+    else
+    {
+        if (viscousName.substr(0, 13) == "2eq-kw-menter" || viscousName.substr(0, 12) == "easm-kw-2005")
+        {
+            RDouble *blend = reinterpret_cast<RDouble  *> (grid->GetDataPtr("blend"));
+
+            RDouble turbSigk,turbSigw;
+
+            RDouble KW_sigmaK1 = parameters->GetKW_sigmaK1();
+            RDouble KW_sigmaW1 = parameters->GetKW_sigmaW1();
+            RDouble KW_sigmaK2 = parameters->GetKW_sigmaK2();
+            RDouble KW_sigmaW2 = parameters->GetKW_sigmaW2();
+
+            for (int iFace = localStart; iFace <localEnd; ++ iFace)
+            {
+                le = leftCellOfFace [iFace];
+                re = rightCellOfFace[iFace];
+                if (iFace < numberOfBoundaryFace) re = iFace + numberOfTotalCell;
+                jFace  = iFace - localStart;
+
+                //RDouble cblend = half * (blend[le] + blend[re]);
+                RDouble cblend = blend[le];
+                turbSigk   = cblend * KW_sigmaK1 + (1.0 - cblend) * KW_sigmaK2;
+                turbSigw   = cblend * KW_sigmaW1 + (1.0 - cblend) * KW_sigmaW2;
+
+                mlt[IKE][jFace] = mul[jFace] + mut[jFace] * turbSigk;
+                mlt[IKW][jFace] = mul[jFace] + mut[jFace] * turbSigw;
+            }
+        }
+        else
+        {
+            RDouble turbSigk,turbSigw;
+
+            GlobalDataBase::GetData("turbSigk", &turbSigk, PHDOUBLE, 1);
+            GlobalDataBase::GetData("turbSigw", &turbSigw, PHDOUBLE, 1);
+
+            for (int iFace = localStart; iFace <localEnd; ++ iFace)
+            {
+                le = leftCellOfFace [iFace];
+                re = rightCellOfFace[iFace];
+                if (iFace < numberOfBoundaryFace) re = iFace + numberOfTotalCell;
+                jFace  = iFace - localStart;
+
+                mlt[IKE][jFace] = mul[jFace] + mut[jFace] * turbSigk;
+                mlt[IKW][jFace] = mul[jFace] + mut[jFace] * turbSigw;
+            }
+        }
+    }
+}
+
+#ifdef USE_GMRESSOLVER
+//! GMRESCoupled
+template <typename T>
+void TurbSolverUnstr::GMRES_GetVisFaceValue(UnstructBCSet *unstructBCSet, int iFace, int nBoundFace, int nTurbulenceEquation, RDouble KW_sigma, T rhol, T rhor, T pressurel, T pressurer, T* turbQl, T* turbQr, T& mul, T& mlt, T& viscousLaminarl, T& viscousLaminarr)
+{
+    RDouble coefficientOfStateEquation = GAS_SPACE::gas->GetCoefficientOfStateEquation();
+    RDouble nonDimensionalSutherlandTemperature = GlobalDataBase::GetDoubleParaFromDB("tsuth");
+    RDouble viscousLaminarMin;
+    GlobalDataBase::GetData("visl_min", &viscousLaminarMin, PHDOUBLE, 1);
+
+    //! compute viscousLaminar (mul)
+    T tl = pressurel / (coefficientOfStateEquation * rhol);
+    T tr = pressurer / (coefficientOfStateEquation * rhor);
+    viscousLaminarl = tl * sqrt(tl) * (1.0 + nonDimensionalSutherlandTemperature) / (tl + nonDimensionalSutherlandTemperature);
+    viscousLaminarr = tr * sqrt(tr) * (1.0 + nonDimensionalSutherlandTemperature) / (tr + nonDimensionalSutherlandTemperature);
+    viscousLaminarl = max(viscousLaminarMin, viscousLaminarl);
+    viscousLaminarr = max(viscousLaminarMin, viscousLaminarr);
+    mul = half * (viscousLaminarl + viscousLaminarr);
+
+    if(iFace < nBoundFace)
+    {
+        int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        int bcType = bcRegion->GetBCType();
+        if(!IsInterface(bcType))
+        {
+            mul = viscousLaminarl;
+        }
+    }
+
+    RDouble oSigma = 1. / KW_sigma;
+    T oRho = two / (rhol + rhor + SMALL);
+    mlt = oSigma * (mul * oRho + half * (turbQl[IDX::ISA] + turbQr[IDX::ISA]));
+
+    return;
+}
+
+//! GMRESturb
+void TurbSolverUnstr::GMRES_ComputeVisflux(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int nTotalCell = grid->GetNTotalCell();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    RDouble **flux  = faceProxy->GetFlux();
+    TurbFaceValue *faceVariable = faceProxy->GetTurbFaceValue();
+    
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+    
+    RDouble *cellCenterX = grid->GetCellCenterX();
+    RDouble *cellCenterY = grid->GetCellCenterY();
+    RDouble *cellCenterZ = grid->GetCellCenterZ();
+
+    RDouble *xfc  = grid->GetFaceCenterX();
+    RDouble *yfc  = grid->GetFaceCenterY();
+    RDouble *zfc  = grid->GetFaceCenterZ();
+
+    // RDouble **mlt  = faceVariable->mlt;
+
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+
+    // RDouble *viscousLaminar = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+    RDouble **qPrimitiveVariable = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+
+    RDouble **dDdP_turb = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP_turb"));
+    RDouble **dRdq_turb = reinterpret_cast<RDouble **>(grid->GetDataPtr("dRdq_turb"));
+    RDouble **dDdP = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP"));
+    RDouble **dRdqCoupledTerm_turb = reinterpret_cast<RDouble **>(grid->GetDataPtr("dRdqCoupledTerm_turb"));
+    vector<int> AI = grid->GetJacobianAI4GMRES();
+    vector<int> AJ = grid->GetJacobianAJ4GMRES();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    int nLaminar = grid->GetBlockSizeOfJacobianMatrix();
+    nLaminar -= nTurbulenceEquation;
+
+    RDouble KW_sigma = parameters->GetKW_sigma();
+
+    const RDouble cb2    = 0.622;
+    const RDouble sigma  = 2.0/3.0;
+    const RDouble osigma = 1.0 / sigma;
+
+    ADReal rhol, pressurel;
+    ADReal rhor, pressurer;
+    ADReal viscousLaminarl, viscousLaminarr;
+    ADReal mlt, mul;
+
+    ADReal *dfd1  = new ADReal[nTurbulenceEquation];
+    ADReal *dfd2  = new ADReal[nTurbulenceEquation];
+    ADReal *dfdn  = new ADReal[nTurbulenceEquation];
+
+    ADReal *f1    = new ADReal[nTurbulenceEquation];
+    ADReal *f2    = new ADReal[nTurbulenceEquation];
+    ADReal *fMid  = new ADReal[nTurbulenceEquation];
+
+    // ADReal *ADmlt  = new ADReal[nTurbulenceEquation];
+    ADReal *turbQl = new ADReal[nTurbulenceEquation];
+    ADReal *turbQr = new ADReal[nTurbulenceEquation];
+    ADReal *fluxt  = new ADReal[nTurbulenceEquation];
+    ADReal *fluxtr = new ADReal[nTurbulenceEquation];
+
+    RDouble dfluxdturbQl[nTurbulenceEquation][nTurbulenceEquation];
+    RDouble dfluxdturbQr[nTurbulenceEquation][nTurbulenceEquation];
+    // RDouble dfluxdmlt[nTurbulenceEquation][nTurbulenceEquation];
+
+    RDouble dDdPlocal[nTurbulenceEquation][nTurbulenceEquation];
+    RDouble dDdplocal_ns[nLaminar][nLaminar];
+    // RDouble tmpmatrix[nTurbulenceEquation][nTurbulenceEquation];
+
+    using namespace IDX;
+
+    int le, re, jFace, colidx;
+    for (int iFace = localStart; iFace <localEnd; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+        jFace  = iFace - localStart;
+
+        //! AD info
+        for (int m = 0; m < nTurbulenceEquation; m++)
+        {
+            turbQl[m] = qTurbulence[m][le];
+            turbQr[m] = qTurbulence[m][re];
+
+            turbQl[m].diff(m, 6);
+            turbQr[m].diff(m + 3, 6);
+        }
+        rhol      = qPrimitiveVariable[IR][le];
+        rhor      = qPrimitiveVariable[IR][re];
+        pressurel = qPrimitiveVariable[IP][le];
+        pressurer = qPrimitiveVariable[IP][re];
+        rhol.diff(1, 6);
+        pressurel.diff(2, 6);
+        rhor.diff(4, 6);
+        pressurer.diff(5, 6);
+
+        //! compute mul and mlt
+        GMRES_GetVisFaceValue(unstructBCSet, iFace, numberOfBoundaryFace, nTurbulenceEquation, KW_sigma, rhol, rhor, pressurel, pressurer, turbQl, turbQr, mul, mlt, viscousLaminarl, viscousLaminarr);
+
+        RDouble nxs = xfn[iFace];
+        RDouble nys = yfn[iFace];
+        RDouble nzs = zfn[iFace];       
+
+        RDouble dxL = cellCenterX[le] - xfc[iFace];
+        RDouble dyL = cellCenterY[le] - yfc[iFace];
+        RDouble dzL = cellCenterZ[le] - zfc[iFace];
+
+        RDouble dxR = cellCenterX[re] - xfc[iFace];
+        RDouble dyR = cellCenterY[re] - yfc[iFace];
+        RDouble dzR = cellCenterZ[re] - zfc[iFace];
+
+        RDouble dL = nxs * dxL + nys * dyL + nzs * dzL;
+        RDouble dR = nxs * dxR + nys * dyR + nzs * dzR;
+
+        RDouble distTemp = - dL / (DISTANCE(dxL, dyL, dzL) + SMALL);
+        distTemp = MIN(distTemp,  1.0);
+        distTemp = MAX(distTemp, -1.0);
+        RDouble angle1 = asin(distTemp) * 180.0 / PI;
+
+        distTemp = dR / (DISTANCE(dxR, dyR, dzR) + SMALL);
+        distTemp = MIN(distTemp,  1.0);
+        distTemp = MAX(distTemp, -1.0);
+        RDouble angle2 = asin(distTemp) * 180.0 / PI;
+
+        //! Quantities at points 1 and 2
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            f1[m] = turbQl[m];
+            f2[m] = turbQr[m];
+        }
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            fMid[m] = half * (f1[m] + f2[m]);
+        }
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            dfdn[m] = 0.0;
+        }
+
+        if (angle1 > 0.0 && angle2 > 0.0 && ABS(dL) > TINY && ABS(dR) > TINY)
+        {
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                dfd1[m] = (f1[m] - fMid[m]) / dL;
+            }
+
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                dfd2[m] = (f2[m] - fMid[m]) / dR;
+            }
+
+            RDouble dtmp = dL * dL + dR * dR;
+            RDouble weightL = dL * dL / dtmp;
+            RDouble weightR = 1.0 - weightL;
+
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                dfdn[m] = weightL * dfd1[m] + weightR * dfd2[m];
+            }
+
+            if (iFace < numberOfBoundaryFace)
+            {
+                UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+                int bcType = bcRegion->GetBCType();
+
+                if (bcType != PHENGLEI::INTERFACE && bcType != PHENGLEI::SYMMETRY)
+                {
+                    RDouble normalDist = (cellCenterX[re] - cellCenterX[le]) * nxs +
+                                         (cellCenterY[re] - cellCenterY[le]) * nys +
+                                         (cellCenterZ[re] - cellCenterZ[le]) * nzs;
+
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        dfdn[m] = (f2[m] - f1[m]) / normalDist;
+                    }
+                }
+            }
+        }
+        
+ if(TurbEquationFormation() == FORMATION_SA_NSMB)
+        {
+            int m = IDX::ISA;
+
+            ADReal flux1 = - oRefReNumber * (1.0 + cb2) * mlt * dfdn[m] * area[iFace];
+            ADReal flux2 =  oRefReNumber * cb2 * osigma * dfdn[m] * area[iFace];
+            fluxt[m] = flux1 + flux2 * (viscousLaminarl / rhol + turbQl[m]);
+
+            residualTurbulence[m][le] -= fluxt[m].val();
+
+            dfluxdturbQl[m][m] = fluxt[m].dx(0);
+            dfluxdturbQr[m][m] = fluxt[m].dx(3);
+
+            //! Jacobian components for residual of the left cell
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, le, le);
+            dRdq_turb[m][colidx] += dfluxdturbQl[m][m];
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, le, le);
+            dRdqCoupledTerm_turb[ISA][colidx + IR] += fluxt[m].dx(1);
+            dRdqCoupledTerm_turb[ISA][colidx + IP] += fluxt[m].dx(2);
+
+
+            if(iFace < numberOfBoundaryFace)
+            {
+                UnstructBC* bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+                int bcType = bcRegion->GetBCType();
+                
+                if(bcType != PHENGLEI::INTERFACE)
+                {
+                    int indexre = (re - nTotalCell) * nTurbulenceEquation;
+                    dDdPlocal[m][m] = dDdP_turb[m][indexre + m];
+                    indexre = (re - nTotalCell) * nLaminar; //! index for coupled term
+
+                    //! firstly, Jacobian components for residual of the right cell
+                    // colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, le, re);
+                    // dRdq_turb[m][colidx] += dfluxdturbQr[m][m];
+                    // colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, le, re);
+                    // dRdqCoupledTerm_turb[ISA][colidx + IR] += fluxt[m].dx(4);
+                    // dRdqCoupledTerm_turb[ISA][colidx + IP] += fluxt[m].dx(5);
+
+                    // colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, re, re);
+                    // dRdq_turb[m][colidx] -= dfluxdturbQr[m][m];
+                    // colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, re, re);
+                    // dRdqCoupledTerm_turb[ISA][colidx + IR] -= fluxt[m].dx(4);
+                    // dRdqCoupledTerm_turb[ISA][colidx + IP] -= fluxt[m].dx(5);
+
+                    colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, le, le);
+                    dRdq_turb[m][colidx] += dfluxdturbQr[m][m] * dDdPlocal[m][m];
+                    colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, le, le);
+                    dRdqCoupledTerm_turb[ISA][colidx + IR] += (fluxt[ISA].dx(4) * dDdP[IR][indexre + IR] + fluxt[ISA].dx(5) * dDdP[IP][indexre + IR]);
+                    dRdqCoupledTerm_turb[ISA][colidx + IU] += (fluxt[ISA].dx(4) * dDdP[IR][indexre + IU] + fluxt[ISA].dx(5) * dDdP[IP][indexre + IU]);
+                    dRdqCoupledTerm_turb[ISA][colidx + IV] += (fluxt[ISA].dx(4) * dDdP[IR][indexre + IV] + fluxt[ISA].dx(5) * dDdP[IP][indexre + IV]);
+                    dRdqCoupledTerm_turb[ISA][colidx + IW] += (fluxt[ISA].dx(4) * dDdP[IR][indexre + IW] + fluxt[ISA].dx(5) * dDdP[IP][indexre + IW]);
+                    dRdqCoupledTerm_turb[ISA][colidx + IP] += (fluxt[ISA].dx(4) * dDdP[IR][indexre + IP] + fluxt[ISA].dx(5) * dDdP[IP][indexre + IP]);
+
+                    // colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, re, le);
+                    // dRdq_turb[m][colidx] -= dfluxdturbQr[m][m] * dDdPlocal[m][m];
+                    // colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, re, le);
+                    // dRdqCoupledTerm_turb[ISA][colidx + IR] -= (fluxt[ISA].dx(4) * dDdP[IR][indexre + IR] + fluxt[ISA].dx(5) * dDdP[IP][indexre + IR]);
+                    // dRdqCoupledTerm_turb[ISA][colidx + IU] -= (fluxt[ISA].dx(4) * dDdP[IR][indexre + IU] + fluxt[ISA].dx(5) * dDdP[IP][indexre + IU]);
+                    // dRdqCoupledTerm_turb[ISA][colidx + IV] -= (fluxt[ISA].dx(4) * dDdP[IR][indexre + IV] + fluxt[ISA].dx(5) * dDdP[IP][indexre + IV]);
+                    // dRdqCoupledTerm_turb[ISA][colidx + IW] -= (fluxt[ISA].dx(4) * dDdP[IR][indexre + IW] + fluxt[ISA].dx(5) * dDdP[IP][indexre + IW]);
+                    // dRdqCoupledTerm_turb[ISA][colidx + IP] -= (fluxt[ISA].dx(4) * dDdP[IR][indexre + IP] + fluxt[ISA].dx(5) * dDdP[IP][indexre + IP]);
+                }
+                else
+                {
+                    fluxtr[m] = flux1 + flux2 * (viscousLaminarr / rhor + turbQr[m]);
+
+                    residualTurbulence[m][re] += fluxtr[m].val();
+
+                    dfluxdturbQl[m][m] = fluxtr[m].dx(0);
+                    dfluxdturbQr[m][m] = fluxtr[m].dx(3);
+
+                    //! Jacobian components for residual of the right cell
+                    colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, re, le);
+                    dRdq_turb[m][colidx] -= dfluxdturbQl[m][m];
+                    colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, re, le);
+                    dRdqCoupledTerm_turb[ISA][colidx + IR] -= fluxt[m].dx(1);
+                    dRdqCoupledTerm_turb[ISA][colidx + IP] -= fluxt[m].dx(2);
+
+                    // colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, re, re);
+                    // dRdq_turb[m][colidx] -= dfluxdturbQr[m][m];
+                    // colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, re, re);
+                    // dRdqCoupledTerm_turb[ISA][colidx + IR] -= fluxt[m].dx(4);
+                    // dRdqCoupledTerm_turb[ISA][colidx + IP] -= fluxt[m].dx(5);  
+                }
+            }
+            else
+            {
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, le, re);
+                dRdq_turb[m][colidx] += dfluxdturbQr[m][m];
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, le, re);
+                dRdqCoupledTerm_turb[ISA][colidx + IR] += fluxt[m].dx(4);
+                dRdqCoupledTerm_turb[ISA][colidx + IP] += fluxt[m].dx(5);    
+
+                fluxtr[m] = flux1 + flux2 * (viscousLaminarr / rhor + turbQr[m]);
+
+                residualTurbulence[m][re] += fluxtr[m].val();
+
+                dfluxdturbQl[m][m] = fluxtr[m].dx(0);
+                dfluxdturbQr[m][m] = fluxtr[m].dx(3);
+
+                //! Jacobian components for residual of the right cell
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, re, le);
+                dRdq_turb[m][colidx] -= dfluxdturbQl[m][m];
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, re, le);
+                dRdqCoupledTerm_turb[ISA][colidx + IR] -= fluxt[m].dx(1);
+                dRdqCoupledTerm_turb[ISA][colidx + IP] -= fluxt[m].dx(2);
+
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, re, re);
+                dRdq_turb[m][colidx] -= dfluxdturbQr[m][m];
+                colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, re, re);
+                dRdqCoupledTerm_turb[ISA][colidx + IR] -= fluxt[m].dx(4);
+                dRdqCoupledTerm_turb[ISA][colidx + IP] -= fluxt[m].dx(5);  
+            }
+        }
+        else 
+        {
+            printf("TurbEquationFormation(): %d", TurbEquationFormation());
+            TK_Exit::ExceptionExit("GMRES RANS solver supports 1eq-sa-Original so far");
+        }
+    }
+
+    delete []dfd1;
+    delete []dfd2;
+    delete []dfdn;
+
+    delete []f1;
+    delete []f2;
+    delete []fMid;
+
+    delete []turbQl;
+    delete []turbQr;
+    delete []fluxt;
+    delete []fluxtr;
+}
+
+#endif
+//! Bell 20130513 mod.
+void TurbSolverUnstr::ComputeVisflux(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    RDouble **flux  = faceProxy->GetFlux();
+    TurbFaceValue *faceVariable = faceProxy->GetTurbFaceValue();
+    
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+    
+    RDouble *cellCenterX = grid->GetCellCenterX();
+    RDouble *cellCenterY = grid->GetCellCenterY();
+    RDouble *cellCenterZ = grid->GetCellCenterZ();
+
+    RDouble *xfc  = grid->GetFaceCenterX();
+    RDouble *yfc  = grid->GetFaceCenterY();
+    RDouble *zfc  = grid->GetFaceCenterZ();
+
+    RDouble **mlt  = faceVariable->mlt;
+
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+
+    RDouble *viscousLaminar = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+    RDouble **qPrimitiveVariable = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+
+    RDouble **residualTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    RDouble skewnessAngle = parameters->GetSkewnessAngle();
+
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    const RDouble cb2    = 0.622;
+    const RDouble sigma  = 2.0/3.0;
+    const RDouble osigma = 1.0 / sigma;
+
+    RDouble *dfd1  = new RDouble[nTurbulenceEquation];
+    RDouble *dfd2  = new RDouble[nTurbulenceEquation];
+    RDouble *dfdn  = new RDouble[nTurbulenceEquation];
+
+    RDouble *f1    = new RDouble[nTurbulenceEquation];
+    RDouble *f2    = new RDouble[nTurbulenceEquation];
+    RDouble *fMid  = new RDouble[nTurbulenceEquation];
+
+    int le, re, jFace;
+    for (int iFace = localStart; iFace <localEnd; ++ iFace)
+    {
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+        jFace  = iFace - localStart;
+
+        RDouble nxs = xfn[iFace];
+        RDouble nys = yfn[iFace];
+        RDouble nzs = zfn[iFace];       
+
+        RDouble dxL = cellCenterX[le] - xfc[iFace];
+        RDouble dyL = cellCenterY[le] - yfc[iFace];
+        RDouble dzL = cellCenterZ[le] - zfc[iFace];
+
+        RDouble dxR = cellCenterX[re] - xfc[iFace];
+        RDouble dyR = cellCenterY[re] - yfc[iFace];
+        RDouble dzR = cellCenterZ[re] - zfc[iFace];
+
+        RDouble dL = nxs * dxL + nys * dyL + nzs * dzL;
+        RDouble dR = nxs * dxR + nys * dyR + nzs * dzR;
+
+        RDouble distTemp = - dL / (DISTANCE(dxL, dyL, dzL) + SMALL);
+        distTemp = MIN(distTemp,  1.0);
+        distTemp = MAX(distTemp, -1.0);
+        RDouble angle1 = asin(distTemp) * 180.0 / PI;
+
+        distTemp = dR / (DISTANCE(dxR, dyR, dzR) + SMALL);
+        distTemp = MIN(distTemp,  1.0);
+        distTemp = MAX(distTemp, -1.0);
+        RDouble angle2 = asin(distTemp) * 180.0 / PI;
+
+        //! quantities at points 1 and 2
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            f1[m] = qTurbulence[m][le];
+            f2[m] = qTurbulence[m][re];
+        }
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            fMid[m] = half * (f1[m] + f2[m]);
+        }
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            dfdn[m] = 0.0;
+        }
+
+        if (angle1 > skewnessAngle && angle2 > skewnessAngle && ABS(dL) > TINY && ABS(dR) > TINY)
+        {
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                dfd1[m] = (f1[m] - fMid[m]) / dL;
+            }
+
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                dfd2[m] = (f2[m] - fMid[m]) / dR;
+            }
+
+            RDouble dtmp = dL * dL + dR * dR;
+            RDouble weightL = dL * dL / dtmp;
+            RDouble weightR = 1.0 - weightL;
+
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                dfdn[m] = weightL * dfd1[m] + weightR * dfd2[m];
+            }
+
+            if (iFace < numberOfBoundaryFace)
+            {
+                UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+                int bcType = bcRegion->GetBCType();
+
+                if (bcType != PHENGLEI::INTERFACE && bcType != PHENGLEI::SYMMETRY)
+                {
+                    RDouble normalDist = (cellCenterX[re] - cellCenterX[le]) * nxs +
+                                         (cellCenterY[re] - cellCenterY[le]) * nys +
+                                         (cellCenterZ[re] - cellCenterZ[le]) * nzs;
+
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        dfdn[m] = (f2[m] - f1[m]) / normalDist;
+                    }
+                }
+            }
+        }
+        
+        if(TurbEquationFormation() == FORMATION_SA_CFL3D)
+        {
+            int m = IDX::ISA;
+
+            RDouble nueLeft = qTurbulence[IDX::ISA][le];
+            RDouble visLeft = viscousLaminar[le];
+            RDouble rhoLeft = qPrimitiveVariable[IDX::IR][le]; 
+            RDouble nueRight= qTurbulence[IDX::ISA][re]; 
+            RDouble visRight= viscousLaminar[re];
+            RDouble rhoRight= qPrimitiveVariable[IDX::IR][re];
+            nueLeft  = PositiveSA(nueLeft, visLeft, rhoLeft);
+            nueRight = PositiveSA(nueRight, visRight, rhoRight);
+            if(iFace < numberOfBoundaryFace)
+            {
+                int bcType = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace])->GetBCType();
+                if(IsWall(bcType))
+                {                    
+                    nueRight = -nueLeft;
+                }
+            }
+
+            RDouble viscousFace = half * (viscousLaminar[le] + viscousLaminar[re]);
+            RDouble rhoFace     = half * (qPrimitiveVariable[IDX::IR][le] + qPrimitiveVariable[IDX::IR][re]);
+            RDouble nueFace     = viscousFace / rhoFace;
+            RDouble nueSAFace   = half * (nueLeft + nueRight);
+
+            //! Term1 && term2.           
+            RDouble flux1 = - oRefReNumber * osigma * (nueFace + (1.0 + cb2) * nueSAFace) * dfdn[m] * area[iFace];
+            RDouble flux2 =   oRefReNumber * osigma * cb2 * dfdn[m] * area[iFace];
+
+            residualTurbulence[m][le] -= flux1;
+            residualTurbulence[m][le] -= flux2 * qTurbulence[IDX::ISA][le];
+
+            if(iFace >= numberOfBoundaryFace)
+            {
+                residualTurbulence[m][re] += flux1;
+                residualTurbulence[m][re] += flux2 * qTurbulence[IDX::ISA][re];
+            }
+        }
+        else if(TurbEquationFormation() == FORMATION_SA_NSMB)
+        {     
+            int m = IDX::ISA;
+
+            RDouble flux1 = - oRefReNumber * (1.0 + cb2) * mlt[m][jFace] * dfdn[m] * area[iFace];
+            RDouble flux2 =  oRefReNumber * cb2 * osigma * dfdn[m] * area[iFace];
+            
+            RDouble nueLeft = qTurbulence[IDX::ISA][le];
+            RDouble visLeft = viscousLaminar[le];
+            RDouble rhoLeft = qPrimitiveVariable[IDX::IR][le]; 
+            RDouble nueRight= qTurbulence[IDX::ISA][re]; 
+            RDouble visRight= viscousLaminar[re];
+            RDouble rhoRight= qPrimitiveVariable[IDX::IR][re];
+            nueLeft  = PositiveSA(nueLeft, visLeft, rhoLeft);
+            nueRight = PositiveSA(nueRight, visRight, rhoRight);
+
+            residualTurbulence[m][le] -= flux1;
+            residualTurbulence[m][le] -= flux2 * (viscousLaminar[le] / qPrimitiveVariable[IDX::IR][le] + nueLeft);
+
+            if(iFace >= numberOfBoundaryFace)
+            {
+                residualTurbulence[m][re] += flux1;
+                residualTurbulence[m][re] += flux2 * (viscousLaminar[re] / qPrimitiveVariable[IDX::IR][re] + nueRight);
+            }
+        }
+        else if(TurbEquationFormation() == FORMATION_ORGSA_SST)
+        {
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                flux[m][jFace] = - oRefReNumber * mlt[m][jFace] * dfdn[m] * area[iFace];
+            }
+            
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                residualTurbulence[m][le] -= flux[m][jFace];
+
+                if(iFace >= numberOfBoundaryFace)
+                {
+                    residualTurbulence[m][re] += flux[m][jFace];
+                }
+            }
+        }        
+    }
+
+    delete []dfd1;
+    delete []dfd2;
+    delete []dfdn;
+
+    delete []f1;
+    delete []f2;
+    delete []fMid;
+}
+
+void TurbSolverUnstr::Diagonal(Grid *grid)
+{
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int viscoueType = parameters->GetViscousType();
+
+    if (viscoueType == 3)
+    {
+        SpectrumRadiusOfOneEquation(grid);
+    }
+    else if (viscoueType == 4)
+    {
+        SpectrumRadiusOfTwoEquation(grid);
+    }
+}
+
+void TurbSolverUnstr::SpectrumRadiusOfOneEquation(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalFace    = grid->GetNTotalFace();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+
+    RDouble **q         = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble *viscousLaminar = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+
+    RDouble **spectrumTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("spec_turb"));
+    RDouble **matrixTurbulenceLeft = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_turbl"));
+    RDouble **matrixTurbulenceRight = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_turbr"));
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    //! Initialize some constants
+    RDouble sigma  = 2.0 / 3.0;
+    RDouble osigma = one / sigma;
+    const RDouble cb2 = 0.622;
+
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble *vol  = grid->GetCellVolume();
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *vgn  = grid->GetFaceNormalVelocity();
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    using namespace IDX;
+    //! rhoFlag, is used to compatible both original (0) and conservative (1) variable form.
+    int rhoFlag = parameters->UsingConservativeForm();
+
+    RDouble invJacobianL, invJacobianR;
+    for (int iFace = 0; iFace < numberOfTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace [iFace];
+        int re = rightCellOfFace[iFace];
+
+        //! Consider vgn here!
+
+        //! Inviscid Jacobian.
+        RDouble rhoL = q[IR][le];
+        RDouble uL = q[IU][le];
+        RDouble vL = q[IV][le];
+        RDouble wL = q[IW][le];
+        //RDouble vnL = xfn[iFace] * uL + yfn[iFace] * vL + zfn[iFace] * wL;
+        RDouble vnL = xfn[iFace] * uL + yfn[iFace] * vL + zfn[iFace] * wL - vgn[iFace];
+        RDouble rhoCoefficientL = rhoFlag * one +  (1 - rhoFlag) * rhoL;
+        if (vnL > 0.0)
+        {
+            invJacobianL = rhoCoefficientL * vnL * area[iFace];
+        }
+        else
+        {
+            invJacobianL = 0.0;
+        }
+
+        RDouble rhoR = q[IR][re];
+        RDouble uR = q[IU][re];
+        RDouble vR = q[IV][re];
+        RDouble wR = q[IW][re];
+        //RDouble vnR = xfn[iFace] * uR + yfn[iFace] * vR + zfn[iFace] * wR;
+        RDouble vnR = xfn[iFace] * uR + yfn[iFace] * vR + zfn[iFace] * wR - vgn[iFace];
+
+        RDouble rhoCoefficientR = rhoFlag * one +  (1 - rhoFlag) * rhoR;
+        if (vnR < 0.0)
+        {
+            invJacobianR = rhoCoefficientR * vnR * area[iFace];
+        }
+        else
+        {
+            invJacobianR = 0.0;
+        }
+
+        spectrumTurbulence[ISA][le] += invJacobianL;
+        spectrumTurbulence[ISA][re] -= invJacobianR;
+
+        matrixTurbulenceRight[ISA][iFace] = invJacobianR;
+        matrixTurbulenceLeft[ISA][iFace]  = -invJacobianL;
+        
+        //! Viscous Jacobian.
+        RDouble orL = 1.0 / (rhoL + SMALL);
+        RDouble orR = 1.0 / (rhoR + SMALL);
+
+        RDouble nueL = qTurbulence[ISA][le];
+        RDouble nueR = qTurbulence[ISA][re];
+
+        nueL = PositiveSA(nueL, viscousLaminar[le], rhoL);
+        nueR = PositiveSA(nueR, viscousLaminar[re], rhoR);
+        if(iFace < numberOfBoundaryFace)
+        {
+            int bcType = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace])->GetBCType();
+            if(IsWall(bcType))
+            {                    
+                nueR = -nueL;
+            }
+        } 
+
+        RDouble nueffL = viscousLaminar[le] * orL + ABS(nueL);
+        RDouble nueffR = viscousLaminar[re] * orR + ABS(nueR);
+
+        RDouble nueff   = half * (nueffL + nueffR);
+
+        RDouble volume  = half * (vol[le] + vol[re]);
+        RDouble oVolume = one / volume;
+
+        RDouble ns2     = area[iFace] * area[iFace];
+        RDouble lengthScale = ns2 * oVolume;
+
+        //! Since the accuracy of the viscous spectrum radius has little effect on time advancing,
+        //! the approximate method is used here.
+        if (TurbEquationFormation() == FORMATION_SA_CFL3D)
+        {    
+            RDouble viscousFace = half * (viscousLaminar[le] + viscousLaminar[re]);
+            RDouble rhoFace     = half * (q[IDX::IR][le] + q[IDX::IR][re]);
+            RDouble nueFace     = viscousFace / rhoFace;
+            RDouble nueSAFace   = half * (nueL + nueR);         
+            
+            //! Term1 && term2.           
+            RDouble term1 =   oRefReNumber * osigma * (1.0 + cb2) * (nueFace + nueSAFace) * lengthScale;
+            RDouble term2 = - oRefReNumber * osigma * cb2 * lengthScale;
+
+            RDouble jocabianL = (term1 + term2 * nueL);
+            RDouble jocabianR = (term1 + term2 * nueR);
+
+            //! For iCell itself, Jacobian is negative, move it to left side, neg-neg is positive now.
+            spectrumTurbulence[ISA][le] += jocabianL;
+            spectrumTurbulence[ISA][re] += jocabianR;
+
+            matrixTurbulenceRight[ISA][iFace] -= jocabianR;  //! Right cell of iFace.
+            matrixTurbulenceLeft[ISA][iFace]  -= jocabianL;  //! Left cell of iFace.
+        }
+        else if (TurbEquationFormation() == FORMATION_SA_NSMB)
+        {
+            spectrumTurbulence[ISA][le] += oRefReNumber * oVolume * (1.0 + cb2) * (osigma * nueff * ns2);
+            spectrumTurbulence[ISA][re] += oRefReNumber * oVolume * (1.0 + cb2) * (osigma * nueff * ns2);
+
+            matrixTurbulenceLeft[ISA][iFace]  += - oRefReNumber * oVolume * (1.0 + cb2) * (osigma * nueff * ns2);
+            matrixTurbulenceRight[ISA][iFace]  += - oRefReNumber * oVolume * (1.0 + cb2) * (osigma * nueff * ns2);
+
+            //! �����nsmb��2��ò��ҲӦ�üӵ�spectrumTurbulence��
+            RDouble coeffLe, coeffRe;
+            coeffLe = cb2 * osigma * nueffL;
+            coeffRe = cb2 * osigma * nueffR;
+            matrixTurbulenceLeft[ISA][iFace] += oRefReNumber * oVolume * ns2 * coeffLe;
+            matrixTurbulenceRight[ISA][iFace] += oRefReNumber * oVolume * ns2 * coeffRe;
+        } 
+        else if (TurbEquationFormation() == FORMATION_ORGSA_SST)
+        { 
+            spectrumTurbulence[ISA][le] += oRefReNumber * oVolume * (osigma * nueff * ns2);
+            spectrumTurbulence[ISA][re] += oRefReNumber * oVolume * (osigma * nueff * ns2);
+
+            matrixTurbulenceLeft[ISA][iFace] += - oRefReNumber * oVolume * (osigma * nueff * ns2);
+            matrixTurbulenceRight[ISA][iFace] += - oRefReNumber * oVolume * (osigma * nueff * ns2);
+        }  
+        //*/
+    }
+}
+
+void TurbSolverUnstr::SpectrumRadiusOfTwoEquation(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalFace = grid->GetNTotalFace();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+
+    RDouble **q = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *viscousLaminar = reinterpret_cast<RDouble * > (grid->GetDataPtr("visl"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble * > (grid->GetDataPtr("vist"));
+    
+    RDouble **spectrumTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("spec_turb"));
+    RDouble **matrixTurbulenceLeft = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_turbl"));
+    RDouble **matrixTurbulenceRight = reinterpret_cast<RDouble **> (grid->GetDataPtr("mat_turbr"));
+
+    RDouble *vol  = grid->GetCellVolume();
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *area = grid->GetFaceArea();
+    RDouble *vgn  = grid->GetFaceNormalVelocity();
+
+    RDouble uL, vL, wL, vnL, absVnL;
+    RDouble uR, vR, wR, vnR, absVnR;
+
+    RDouble vn, absVn, ns2, rho, mul, mut, cblend, volume, oVolume;
+
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    vector<RDouble> work(nTurbulenceEquation);
+
+    using namespace IDX;
+
+    for (int iFace = 0; iFace < numberOfTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace [iFace];
+        int re = rightCellOfFace[iFace];
+
+        //! Calculate velocity at the cell interface.
+        uL = q[IU][le];
+        vL = q[IV][le];
+        wL = q[IW][le];
+        //vnL = xfn[iFace] * uL + yfn[iFace] * vL + zfn[iFace] * wL;
+        vnL = xfn[iFace] * uL + yfn[iFace] * vL + zfn[iFace] * wL - vgn[iFace];
+
+        absVnL = ABS(vnL);
+
+        uR = q[IU][re];
+        vR = q[IV][re];
+        wR = q[IW][re];
+        //vnR = xfn[iFace] * uR + yfn[iFace] * vR + zfn[iFace] * wR;
+        vnR = xfn[iFace] * uR + yfn[iFace] * vR + zfn[iFace] * wR - vgn[iFace];
+
+        absVnR = ABS(vnR);
+
+        vn = half * (vnL + vnR);
+        absVn = ABS(vn);
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            spectrumTurbulence[m][le] += area[iFace] * half * absVn;
+            spectrumTurbulence[m][re] += area[iFace] * half * absVn;
+
+            matrixTurbulenceRight[m][iFace]  = area[iFace] * half * ( vnR - absVn);
+            matrixTurbulenceLeft[m][iFace]   = area[iFace] * half * (- vnL - absVn);
+        }
+    }
+
+    RDouble *blend = reinterpret_cast<RDouble  *> (grid->GetDataPtr("blend"));
+
+    RDouble turbSigk, turbSigw;
+
+    RDouble KW_sigmaK1 = parameters->GetKW_sigmaK1();
+    RDouble KW_sigmaW1 = parameters->GetKW_sigmaW1();
+    RDouble KW_sigmaK2 = parameters->GetKW_sigmaK2();
+    RDouble KW_sigmaW2 = parameters->GetKW_sigmaW2();
+
+    for (int iFace = 0; iFace < numberOfTotalFace; ++ iFace)
+    {
+        int le = leftCellOfFace [iFace];
+        int re = rightCellOfFace[iFace];
+        rho = half * (q[IR][le] + q[IR][re]);
+        mul = half * (viscousLaminar[le] + viscousLaminar[re]);
+        mut = half * (viscousTurbulence[le] + viscousTurbulence[re]);
+
+        cblend    = half * (blend[le] + blend[re]);
+        turbSigk = cblend * KW_sigmaK1 + (1.0 - cblend) * KW_sigmaK2;
+        turbSigw = cblend * KW_sigmaW1 + (1.0 - cblend) * KW_sigmaW2;
+
+        volume  = half * (vol[le] + vol[re]);
+        oVolume = one / volume;
+
+        ns2     = area[iFace] * area[iFace];
+        work[IKE] = (mul + mut * turbSigk) / rho * ns2 * oVolume;
+        work[IKW] = (mul + mut * turbSigw) / rho * ns2 * oVolume;
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            spectrumTurbulence[m][le] += oRefReNumber * work[m];
+            spectrumTurbulence[m][re] += oRefReNumber * work[m];
+
+            matrixTurbulenceLeft[m][iFace]  += - oRefReNumber * work[m];
+            matrixTurbulenceRight[m][iFace] += - oRefReNumber * work[m];
+        }
+    }
+}
+
+void TurbSolverUnstr::GetQlQr(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    GetQlQrTurbulence(grid, faceProxy, localStart, localEnd);
+
+    FaceProxy *faceProxyNS = faceProxy->GetNext();
+    GetQlQrNS(grid, faceProxyNS, localStart, localEnd);
+
+}
+
+void TurbSolverUnstr::GetQlQrTurbulence(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **qTurbulenceVarables = reinterpret_cast <RDouble **> (grid->GetDataPtr("q_turb"));
+
+    RDouble **qL = faceProxy->GetQL();
+    RDouble **qR = faceProxy->GetQR();
+
+    //! GMRESturb
+    faceProxy->SetlocalStart(localStart);
+    faceProxy->SetlocalEnd(localEnd);
+
+    for (int iFace = localStart; iFace <localEnd; ++ iFace)
+    {
+        int le, re, jFace;
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+        jFace  = iFace - localStart;
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            qL[m][jFace] = qTurbulenceVarables[m][le];
+            qR[m][jFace] = qTurbulenceVarables[m][re];
+        }
+    }
+
+    //! Boundary fix.
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    int nBoundFace = grid->GetNBoundFace();
+    int nMid = 0;
+
+    //! Check if there are boundary faces. If no, return.
+    if (localStart >= nBoundFace)
+    {
+        return;
+    }
+
+    if (localEnd <= nBoundFace)
+    {
+        //! If they are all boundary faces.
+        nMid = localEnd;
+    }
+    else
+    {
+        //! Part of them are boundary faces.
+        nMid = nBoundFace;
+    }
+
+    for (int iFace = localStart; iFace < nMid; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        int bcType = bcRegion->GetBCType();
+
+        int jFace = iFace - localStart;
+
+        if (bcType == PHENGLEI::INTERFACE)
+        {
+            continue;
+        }
+
+        if (bcType == PHENGLEI::SYMMETRY)
+        {
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                qR[m][jFace] = qL[m][jFace];
+            }
+        }
+        else
+        {
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                RDouble temp = half * (qR[m][jFace] + qL[m][jFace]);
+                qR[m][jFace] = temp;
+                qL[m][jFace] = temp;
+            }            
+        }
+    }
+}
+
+void TurbSolverUnstr::GetQlQrNS(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    int nl    = GlobalDataBase::GetIntParaFromDB("nl");
+    int nchem = GlobalDataBase::GetIntParaFromDB("nchem");
+    int nEquation = nl + nchem;
+   
+    RDouble **q = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+
+    RDouble **qL = faceProxy->GetQL();
+    RDouble **qR = faceProxy->GetQR();
+
+    for (int iFace = localStart; iFace <localEnd; ++ iFace)
+    {
+        int le, re, jFace;
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+        jFace  = iFace - localStart;
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            qL[m][jFace] = q[m][le];
+            qR[m][jFace] = q[m][re];
+        }
+    }
+
+    //! Boundary fix.
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+    
+    int nBoundFace = grid->GetNBoundFace();
+    int nMid = 0;
+
+    //! Check if there are boundary faces. If no, return.
+    if (localStart >= nBoundFace)
+    {
+        return;
+    }
+
+    if (localEnd <= nBoundFace)
+    {
+        //! If they are all boundary faces.
+        nMid = localEnd;
+    }
+    else
+    {
+        //! Part of them are boundary faces.
+        nMid = nBoundFace;
+    }
+
+    for (int iFace = localStart; iFace < nMid; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        int bcType = bcRegion->GetBCType();
+       
+        int jFace = iFace - localStart;
+
+        if (bcType == PHENGLEI::INTERFACE)
+        {
+            continue;
+        }
+
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            RDouble temp = half * (qR[m][jFace] + qL[m][jFace]);
+            qR[m][jFace] = temp;
+            qL[m][jFace] = temp;
+        }
+    }
+}
+#ifdef USE_GMRESSOLVER
+//! GMRESCoupled
+template <typename T>
+void TurbSolverUnstr::FixBoundaryQlQr(UnstructBCSet *unstructBCSet, int iFace, int nTurbulenceEquation, int nEquation, T *primQl, T *primQr, T *turbQl, T *turbQr)
+{
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+    UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+    int bcType = bcRegion->GetBCType();
+
+    if(bcType == PHENGLEI::INTERFACE)
+    {
+        return;
+    }
+    
+    if(bcType == PHENGLEI::SYMMETRY)
+    {
+        //! Turbulence
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            turbQr[m] = turbQl[m];
+        }
+        //! NS
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            T temp = (primQl[m] + primQr[m]) * half;
+            primQl[m] = temp;
+            primQr[m] = temp;
+        }
+    }
+    else
+    {
+        //! Turbulence
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            T temp = (turbQl[m] + turbQr[m]) * half;
+            turbQl[m] = temp;
+            turbQr[m] = temp;
+        }
+        //! NS
+        for (int m = 0; m < nEquation; ++ m)
+        {
+            T temp = (primQl[m] + primQr[m]) * half;
+            primQl[m] = temp;
+            primQr[m] = temp;
+        }
+    }
+} 
+#endif
+
+void TurbSolverUnstr::InviscidFlux(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalFace = grid->GetNTotalFace();
+
+    FaceProxy *faceProxy = CreateFaceProxy(grid);
+
+    //! GMRESCoupled
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+   
+    int localStart, localEnd;
+
+    localStart = 0;
+    do
+    {
+        localEnd = localStart + SEGCTION_LENGTH;
+        if (localEnd > numberOfTotalFace) localEnd = numberOfTotalFace;
+
+        if(tscheme != GMRES)
+        {
+            GetQlQr(grid, faceProxy, localStart, localEnd);
+        }
+
+        ComputeInviscidFlux(grid, faceProxy, localStart, localEnd);
+
+        LoadFlux(grid, faceProxy, localStart, localEnd);
+
+        localStart = localEnd;
+
+    } while (localStart < numberOfTotalFace);
+
+    delete faceProxy;
+}
+
+void TurbSolverUnstr::ComputeInviscidFlux(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+
+    if(tscheme != GMRES)
+    {
+        NNDFlux(grid, faceProxy, localStart, localEnd);
+    }
+#ifdef USE_GMRESSOLVER  
+    else
+    {
+        GMRES_NNDFlux(grid, faceProxy, localStart, localEnd);
+    }
+ #endif
+}
+#ifdef USE_GMRESSOLVER  
+void TurbSolverUnstr::GMRES_NNDFlux(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+    int nBoundFace = grid->GetNBoundFace();
+
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *vgn  = grid->GetFaceNormalVelocity();
+    RDouble *area = grid->GetFaceArea();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    int viscoueType = parameters->GetViscousType();
+
+    int subJacMatSize = grid->GetBlockSizeOfJacobianMatrix();
+    int nLaminar = subJacMatSize - nTurbulenceEquation;
+    
+    // RDouble **qL = faceProxy->GetQL();
+    // RDouble **qR   = faceProxy->GetQR();
+    RDouble **flux = faceProxy->GetFlux();
+
+    int nMid = 0;
+    int colidx;
+
+    //! Check if there are boundary faces, if no 
+    if (localStart >= nBoundFace)
+    {
+        nMid = localStart;
+    }
+    else if (localEnd <= nBoundFace)
+    {
+        //! If they are all boundary faces.
+        nMid = localEnd;
+    }
+    else
+    {
+        //! Part of them are boundary faces.
+        nMid = nBoundFace;
+    }
+
+    FaceProxy *faceProxyNS = faceProxy->GetNext();
+
+    // RDouble **qPrimitiveVariableL = faceProxyNS->GetQL();
+    // RDouble **qPrimitiveVariableR = faceProxyNS->GetQR();
+    RDouble **q = reinterpret_cast<RDouble **>(grid->GetDataPtr("q"));
+    RDouble **q_turb = reinterpret_cast<RDouble **>(grid->GetDataPtr("q_turb"));
+
+
+    ADReal *primitiveVariableL = new ADReal[nTurbulenceEquation];
+    ADReal *primitiveVariableR = new ADReal[nTurbulenceEquation];
+    ADReal *turbQl             = new ADReal[nTurbulenceEquation];
+    ADReal *turbQr             = new ADReal[nTurbulenceEquation];
+    ADReal *primQl             = new ADReal[nLaminar];
+    ADReal *primQr             = new ADReal[nLaminar];
+    ADReal *turbQle            = new ADReal[nTurbulenceEquation];
+    ADReal *turbQre            = new ADReal[nTurbulenceEquation];
+    ADReal *primQle            = new ADReal[nLaminar];
+    ADReal *primQre            = new ADReal[nLaminar];
+    ADReal *f = new ADReal[nTurbulenceEquation];
+
+    RDouble **dRdq_turb = reinterpret_cast<RDouble **>(grid->GetDataPtr("dRdq_turb"));
+    RDouble **dDdP_turb = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP_turb"));
+    RDouble **dDdP = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP"));
+    RDouble **dRdqCoupledTerm_turb = reinterpret_cast<RDouble **>(grid->GetDataPtr("dRdqCoupledTerm_turb"));
+    RDouble dFluxdturbQl[nTurbulenceEquation][nTurbulenceEquation];
+    RDouble dFluxdturbQr[nTurbulenceEquation][nTurbulenceEquation];
+    RDouble dDdPlocal[nTurbulenceEquation][nTurbulenceEquation];
+    RDouble dFluxdpBC[nTurbulenceEquation][nTurbulenceEquation];
+    RDouble dDdPlocal_ns[nLaminar][nLaminar];
+
+    vector<int> AI = grid->GetJacobianAI4GMRES();
+    vector<int> AJ = grid->GetJacobianAJ4GMRES();
+    int nTotalCell = grid->GetNTotalCell();
+
+    ADReal rL,uL,vL,wL,vnL,vnLL,rR,uR,vR,wR,vnR,vnRR;
+    ADReal rhoFlag = 0, rhoCoefficientL, rhoCoefficientR;
+
+    using namespace IDX;
+
+    if (viscoueType == 3)
+    {
+        //! rhoFlag, is used to compatible both original and conversative variables.
+        //! For SA equation, using original variable; else, using conversative variables.
+        rhoFlag = 1;
+    }
+
+    // boundary face
+    for (int iFace = localStart; iFace <nMid; ++ iFace)
+    {
+        int le, re, jFace;
+        jFace = iFace - localStart;
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        // AD init
+        for (int m = 0; m < nTurbulenceEquation; m++)
+        {
+            turbQle[m] = q_turb[m][le];
+            turbQre[m] = q_turb[m][re];
+            turbQle[m].diff(m, 2 * subJacMatSize);
+            turbQre[m].diff(m + subJacMatSize, 2 * subJacMatSize);
+        }
+        for (int m = 0; m < nLaminar; m++)
+        {
+            primQle[m] = q[m][le];
+            primQre[m] = q[m][re];
+            primQle[m].diff(nTurbulenceEquation + m, 2 * subJacMatSize);
+            primQre[m].diff(nTurbulenceEquation + m + subJacMatSize, 2 * subJacMatSize);
+        }
+
+        //! GMRESCoupled get QlQr
+        for (int m = 0; m < nTurbulenceEquation; m++)
+        {
+            turbQl[m] = turbQle[m];
+            turbQr[m] = turbQre[m];
+        }
+        for (int m = 0; m < nLaminar; m++)
+        {
+            primQl[m] = primQle[m];
+            primQr[m] = primQre[m];
+        }
+        FixBoundaryQlQr(unstructBCSet, iFace, nTurbulenceEquation, nLaminar, primQl, primQr, turbQl, turbQr);
+
+        rL = primQl[IR];
+        uL = primQl[IU];
+        vL = primQl[IV];
+        wL = primQl[IW];
+
+        rR = primQr[IR];
+        uR = primQr[IU];
+        vR = primQr[IV];
+        wR = primQr[IW];
+
+        vnL  = xfn[iFace] * uL + yfn[iFace] * vL + zfn[iFace] * wL - vgn[iFace];
+        vnR  = xfn[iFace] * uR + yfn[iFace] * vR + zfn[iFace] * wR - vgn[iFace];
+
+        vnLL = half * (vnL + ABS(vnL));
+        vnRR = half * (vnR - ABS(vnR));
+
+        rhoCoefficientL = rhoFlag * one + (one - rhoFlag) * rL;
+        rhoCoefficientR = rhoFlag * one + (one - rhoFlag) * rR;
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            primitiveVariableL[m] = rhoCoefficientL * turbQl[m];
+            primitiveVariableR[m] = rhoCoefficientR * turbQr[m];
+        }
+
+        //! Consider vgn here!
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            f[m] = (vnLL * primitiveVariableL[m] + vnRR * primitiveVariableR[m]);
+        }
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            f[m] *= area[iFace];
+            flux[m][jFace] = f[m].val();            
+            for (int n = 0; n < nTurbulenceEquation; n++)
+            {
+                dFluxdturbQl[m][n] = f[m].dx(n);
+                dFluxdturbQr[m][n] = f[m].dx(subJacMatSize + n);
+            }
+        }
+
+        // //! consider boundary
+        // int indexre = (re - nTotalCell) * nTurbulenceEquation;
+        // for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+        // {
+        //     for (int indexJ = 0; indexJ < nTurbulenceEquation; indexJ++)
+        //     {
+        //         dDdPlocal[indexI][indexJ] = dDdP_turb[indexI][indexre + indexJ];
+        //     }
+        // }
+        // indexre = (re - nTotalCell) * nLaminar;
+        // for (int indexI = 0; indexI < nLaminar; indexI++)
+        // {
+        //     for (int indexJ = 0; indexJ < nLaminar; indexJ++)
+        //     {
+        //         dDdPlocal_ns[indexI][indexJ] = dDdP[indexI][indexre + indexJ];
+        //     }
+        // }
+        
+
+        //! for boundary condition except symmetry and interface
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+        int bcType = bcRegion->GetBCType();
+
+        // //! turbulence
+        // colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, re, le);
+        // for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+        // {
+        //     for (int indexJ = 0; indexJ < nTurbulenceEquation; indexJ++)
+        //     {
+        //         dRdq_turb[indexI][colidx + indexJ] -= dFluxdturbQl[indexI][indexJ];
+        //         //! consider boundary
+        //         for (int indexK = 0; indexK < nTurbulenceEquation; indexK++)
+        //         {
+        //             dRdq_turb[indexI][colidx + indexJ] -= dFluxdturbQr[indexI][indexK] * dDdPlocal[indexK][indexJ];                           
+        //         }
+        //     }
+        // }
+        // //! NS
+        // colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, re, le);
+        // for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+        // {
+        //     for (int indexJ = 0; indexJ < nLaminar; indexJ++)
+        //     {
+        //         dRdqCoupledTerm_turb[indexI][colidx + indexJ] -= f[indexI].dx(nTurbulenceEquation + indexJ);
+        //         //! consider boundary
+        //         for (int indexK = 0; indexK < nLaminar; indexK++)
+        //         {
+        //             dRdqCoupledTerm_turb[indexI][colidx + indexJ] -= f[indexI].dx(nTurbulenceEquation + subJacMatSize + indexK) * dDdPlocal_ns[indexK][indexJ];
+        //         }
+        //     }
+        // }
+
+        if (bcType != PHENGLEI::INTERFACE)
+        {
+            //! consider boundary
+            int indexre = (re - nTotalCell) * nTurbulenceEquation;
+            for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nTurbulenceEquation; indexJ++)
+                {
+                    dDdPlocal[indexI][indexJ] = dDdP_turb[indexI][indexre + indexJ];
+                }
+            }
+            indexre = (re - nTotalCell) * nLaminar;
+            for (int indexI = 0; indexI < nLaminar; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nLaminar; indexJ++)
+                {
+                    dDdPlocal_ns[indexI][indexJ] = dDdP[indexI][indexre + indexJ];
+                }
+            }
+        
+        //! turbulence
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, le, le);
+        for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+        {
+            for (int indexJ = 0; indexJ < nTurbulenceEquation; indexJ++)
+            {
+                dRdq_turb[indexI][colidx + indexJ] += dFluxdturbQl[indexI][indexJ];
+                //! consider boundary
+                for (int indexK = 0; indexK < nTurbulenceEquation; indexK++)
+                {
+                    dRdq_turb[indexI][colidx + indexJ] += dFluxdturbQr[indexI][indexK] * dDdPlocal[indexK][indexJ];
+                }
+            }
+        }
+        //! NS
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, le, le);
+        for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+        {
+            for (int indexJ = 0; indexJ < nLaminar; indexJ++)
+            {
+                dRdqCoupledTerm_turb[indexI][colidx + indexJ] += f[indexI].dx(nTurbulenceEquation + indexJ);
+                //! consider boundary
+                for (int indexK = 0; indexK < nLaminar; indexK++)
+                {
+                    dRdqCoupledTerm_turb[indexI][colidx + indexJ] += f[indexI].dx(nTurbulenceEquation + subJacMatSize + indexK) * dDdPlocal_ns[indexK][indexJ];
+                }            
+            }
+        }
+        }
+        else
+        {
+            //! turbulence
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, re, le);
+            for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nTurbulenceEquation; indexJ++)
+                {
+                    dRdq_turb[indexI][colidx + indexJ] -= dFluxdturbQl[indexI][indexJ];
+                }
+            }
+            //! NS
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, re, le);
+            for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nLaminar; indexJ++)
+                {
+                    dRdqCoupledTerm_turb[indexI][colidx + indexJ] -= f[indexI].dx(nTurbulenceEquation + indexJ);
+                }
+            }
+        
+            //! turbulence
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, le, le);
+            for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nTurbulenceEquation; indexJ++)
+                {
+                    dRdq_turb[indexI][colidx + indexJ] += dFluxdturbQl[indexI][indexJ];
+                }
+            }
+            //! NS
+            colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, le, le);
+            for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+            {
+                for (int indexJ = 0; indexJ < nLaminar; indexJ++)
+                {
+                    dRdqCoupledTerm_turb[indexI][colidx + indexJ] += f[indexI].dx(nTurbulenceEquation + indexJ);
+                }
+            }
+        }
+    }
+    
+    //! interior face
+    for (int iFace = nMid; iFace <localEnd; ++ iFace)
+    {
+        int le, re, jFace;
+        jFace = iFace - localStart;
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        // AD init
+        for (int m = 0; m < nTurbulenceEquation; m++)
+        {
+            turbQle[m] = q_turb[m][le];
+            turbQre[m] = q_turb[m][re];
+            turbQle[m].diff(m, 2 * subJacMatSize);
+            turbQre[m].diff(m + subJacMatSize, 2 * subJacMatSize);
+        }
+        for (int m = 0; m < nLaminar; m++)
+        {
+            primQle[m] = q[m][le];
+            primQre[m] = q[m][re];
+            primQle[m].diff(nTurbulenceEquation + m, 2 * subJacMatSize);
+            primQre[m].diff(nTurbulenceEquation + m + subJacMatSize, 2 * subJacMatSize);
+        }
+
+        //! GMRESCoupled get QlQr
+        for (int m = 0; m < nTurbulenceEquation; m++)
+        {
+            turbQl[m] = turbQle[m];
+            turbQr[m] = turbQre[m];
+        }
+        for (int m = 0; m < nLaminar; m++)
+        {
+            primQl[m] = primQle[m];
+            primQr[m] = primQre[m];
+        }
+
+        rL = primQl[IR];
+        uL = primQl[IU];
+        vL = primQl[IV];
+        wL = primQl[IW];
+
+        rR = primQr[IR];
+        uR = primQr[IU];
+        vR = primQr[IV];
+        wR = primQr[IW];
+
+        vnL  = xfn[iFace] * uL + yfn[iFace] * vL + zfn[iFace] * wL - vgn[iFace];
+        vnR  = xfn[iFace] * uR + yfn[iFace] * vR + zfn[iFace] * wR - vgn[iFace];
+
+        vnLL = half * (vnL + ABS(vnL));
+        vnRR = half * (vnR - ABS(vnR));
+
+        rhoCoefficientL = rhoFlag * one + (one - rhoFlag) * rL;
+        rhoCoefficientR = rhoFlag * one + (one - rhoFlag) * rR;
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            primitiveVariableL[m] = rhoCoefficientL * turbQl[m];
+            primitiveVariableR[m] = rhoCoefficientR * turbQr[m];
+        }
+
+        //! Consider vgn here!
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            f[m] = (vnLL * primitiveVariableL[m] + vnRR * primitiveVariableR[m]);
+        }
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            f[m] *= area[iFace];
+            flux[m][jFace] = f[m].val();            
+            for (int n = 0; n < nTurbulenceEquation; n++)
+            {
+                dFluxdturbQl[m][n] = f[m].dx(n);
+                dFluxdturbQr[m][n] = f[m].dx(subJacMatSize + n);
+            }
+        }
+
+        //! turbulence
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, re, le);
+        for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+        {
+            for (int indexJ = 0; indexJ < nTurbulenceEquation; indexJ++)
+            {
+                dRdq_turb[indexI][colidx + indexJ] -= dFluxdturbQl[indexI][indexJ];
+            }
+        }
+        //! NS
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, re, le);
+        for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+        {
+            for (int indexJ = 0; indexJ < nLaminar; indexJ++)
+            {
+                dRdqCoupledTerm_turb[indexI][colidx + indexJ] -= f[indexI].dx(nTurbulenceEquation + indexJ);
+            }
+        }
+        
+        //! turbulence
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, le, le);
+        for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+        {
+            for (int indexJ = 0; indexJ < nTurbulenceEquation; indexJ++)
+            {
+                dRdq_turb[indexI][colidx + indexJ] += dFluxdturbQl[indexI][indexJ];
+            }
+        }
+        //! NS
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, le, le);
+        for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+        {
+            for (int indexJ = 0; indexJ < nLaminar; indexJ++)
+            {
+                dRdqCoupledTerm_turb[indexI][colidx + indexJ] += f[indexI].dx(nTurbulenceEquation + indexJ);
+            }
+        }
+
+        //! turbulence
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, re, re);
+        for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+        {
+            for (int indexJ = 0; indexJ < nTurbulenceEquation; indexJ++)
+            {
+                dRdq_turb[indexI][colidx + indexJ] -= dFluxdturbQr[indexI][indexJ];
+            }
+        }
+        //! NS
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, re, re);
+        for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+        {
+            for (int indexJ = 0; indexJ < nLaminar; indexJ++)
+            {
+                dRdqCoupledTerm_turb[indexI][colidx + indexJ] -= f[indexI].dx(nTurbulenceEquation + subJacMatSize + indexJ);
+            }
+        }
+
+        //! turbulence
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nTurbulenceEquation, le, re);
+        for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+        {
+            for (int indexJ = 0; indexJ < nTurbulenceEquation; indexJ++)
+            {
+                dRdq_turb[indexI][colidx + indexJ] += dFluxdturbQr[indexI][indexJ];
+            }
+        }
+        //! NS
+        colidx = GetIndexOfBlockJacobianMatrix(AI, AJ, nLaminar, le, re);
+        for (int indexI = 0; indexI < nTurbulenceEquation; indexI++)
+        {
+            for (int indexJ = 0; indexJ < nLaminar; indexJ++)
+            {
+                dRdqCoupledTerm_turb[indexI][colidx + indexJ] += f[indexI].dx(nTurbulenceEquation + subJacMatSize + indexJ);
+            }
+        }
+    }
+   
+    delete []primitiveVariableL;
+    delete []primitiveVariableR;
+    delete []f;
+    delete []turbQl;
+    delete []turbQr;
+    delete []turbQle;
+    delete []turbQre;
+    delete []primQl;
+    delete []primQr;
+    delete []primQle;
+    delete []primQre;
+}
+ #endif
+void TurbSolverUnstr::NNDFlux(Grid *gridIn, FaceProxy *faceProxy, int localStart, int localEnd)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble *xfn  = grid->GetFaceNormalX();
+    RDouble *yfn  = grid->GetFaceNormalY();
+    RDouble *zfn  = grid->GetFaceNormalZ();
+    RDouble *vgn  = grid->GetFaceNormalVelocity();
+    RDouble *area = grid->GetFaceArea();
+
+    int *leftCellOfFace = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **qL   = faceProxy->GetQL();
+    RDouble **qR   = faceProxy->GetQR();
+    RDouble **flux = faceProxy->GetFlux();
+
+    FaceProxy *faceProxyNS = faceProxy->GetNext();
+
+    RDouble **qPrimitiveVariableL = faceProxyNS->GetQL();
+    RDouble **qPrimitiveVariableR = faceProxyNS->GetQR();
+
+    RDouble *qTurbL = new RDouble[nTurbulenceEquation];
+    RDouble *qTurbR = new RDouble[nTurbulenceEquation];
+    RDouble *f = new RDouble[nTurbulenceEquation];
+
+    RDouble rL,uL,vL,wL,vnL,vnLL,rR,uR,vR,wR,vnR,vnRR;
+    RDouble rhoCoefficientL, rhoCoefficientR;
+
+    using namespace IDX;
+    //! rhoFlag, is used to compatible both original (0) and conservative (1) variable form.
+    int rhoFlag = parameters->UsingConservativeForm();
+
+    for (int iFace = localStart; iFace <localEnd; ++ iFace)
+    {
+        int le, re, jFace;
+        jFace = iFace - localStart;
+        le = leftCellOfFace [iFace];
+        re = rightCellOfFace[iFace];
+
+        rL = qPrimitiveVariableL[IR][jFace];
+        uL = qPrimitiveVariableL[IU][jFace];
+        vL = qPrimitiveVariableL[IV][jFace];
+        wL = qPrimitiveVariableL[IW][jFace];
+
+        rR = qPrimitiveVariableR[IR][jFace];
+        uR = qPrimitiveVariableR[IU][jFace];
+        vR = qPrimitiveVariableR[IV][jFace];
+        wR = qPrimitiveVariableR[IW][jFace];
+
+        vnL  = xfn[iFace] * uL + yfn[iFace] * vL + zfn[iFace] * wL - vgn[iFace];
+        vnR  = xfn[iFace] * uR + yfn[iFace] * vR + zfn[iFace] * wR - vgn[iFace];
+
+        vnLL = half * (vnL + ABS(vnL));
+        vnRR = half * (vnR - ABS(vnR));
+
+        rhoCoefficientL = (1 - rhoFlag) * one + rhoFlag * rL;
+        rhoCoefficientR = (1 - rhoFlag) * one + rhoFlag * rR;
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            qTurbL[m] = rhoCoefficientL * qL[m][jFace];
+            qTurbR[m] = rhoCoefficientR * qR[m][jFace];
+        }
+
+        //! Consider vgn here!
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            f[m] = (vnLL * qTurbL[m] + vnRR * qTurbR[m]);
+        }
+
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            flux[m][jFace] = f[m] * area[iFace];
+        }
+    }
+   
+    delete []qTurbL;
+    delete []qTurbR;
+    delete []f;
+}
+
+void TurbSolverUnstr::GetResidual(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = UnstructGridCast(GetGrid(level));
+
+    RDouble **residualTurbulence  = reinterpret_cast<RDouble **> (grid->GetDataPtr("res_turb"));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    PHSPACE::ComputeResidualonGrid(grid, actkey, residualTurbulence, nTurbulenceEquation);
+}
+
+void TurbSolverUnstr::CompressSpecificArrayToInterface(DataContainer *&dataContainer, const string &fieldName, Grid *gridIn, const int &neighborZoneIndex, const int &nEquation)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = interfaceInformation->GetFaceIndexForSend(iNeighborZone);
+    dataContainer->moveto_begin();
+    if (0 == nEquation)
+    {
+        RDouble *fieldSend = reinterpret_cast <RDouble *> (grid->GetDataPtr(fieldName));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int sourceCell;
+                int iFace = interfaceIndexContainerForSend[iLocalFace];
+                grid->GetSourceIndex(iFace, iGhostLayer + 1, sourceCell);
+                PHWrite(dataContainer, fieldSend[sourceCell]);
+            }
+        }
+    }
+    else
+    {
+        RDouble **fieldSend = reinterpret_cast <RDouble **> (grid->GetDataPtr(fieldName));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int sourceCell;
+                int iFace = interfaceIndexContainerForSend[iLocalFace];
+                grid->GetSourceIndex(iFace, iGhostLayer + 1, sourceCell);
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    PHWrite(dataContainer, fieldSend[m][sourceCell]);
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverUnstr::DecompressArrayFromInterface(DataContainer *&dataContainer, const string &fieldName, Grid *gridIn, const int &neighborZoneIndex, const int &nEquation)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = interfaceInformation->GetFaceIndexForRecv(iNeighborZone);
+    
+    dataContainer->moveto_begin();
+
+    if (0 == nEquation)
+    {
+        RDouble *fieldReceive = reinterpret_cast <RDouble *> (grid->GetDataPtr(fieldName));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int targetCell;
+                int iFace = interfaceIndexContainerForReceive[iLocalFace];
+                grid->GetTargetIndex(iFace, iGhostLayer + 1, targetCell);
+                PHRead(dataContainer, fieldReceive[targetCell]);
+            }
+        }
+    }
+    else
+    {
+        RDouble **fieldReceive = reinterpret_cast <RDouble **> (grid->GetDataPtr(fieldName));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; -- iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+            {
+                int iFace = interfaceIndexContainerForReceive[iLocalFace];
+                int targetCell;
+                grid->GetTargetIndex(iFace, iGhostLayer + 1, targetCell);
+                for (int m = 0; m < nEquation; ++ m)
+                {
+                    PHRead(dataContainer, fieldReceive[m][targetCell]);
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverUnstr::Boundary(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    using namespace PHENGLEI;
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+
+    //! Parallel
+    int currentZone = grid->GetOrdinaryGridIndex();
+
+    //! Serial
+    if (currentZone == -1)
+    {
+        currentZone = grid->GetZoneID();
+    }
+    int MixingPlaneNumber = 0;
+
+    string MixingIn, MixingOut;
+    if (referenceFrame == ROTATIONAL_FRAME)
+    {
+        int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+        string MixingPlane[100];
+        GlobalDataBase::GetData("MixingPlane", &MixingPlane, PHSTRING, 2 * nTurboZone - 2);
+
+        if (currentZone == 0)
+        {
+            MixingOut = MixingPlane[2 * currentZone];
+        }
+        else if (currentZone == nTurboZone)
+        {
+            MixingIn = MixingPlane[2 * currentZone - 1];
+        }
+        else
+        {
+            MixingIn = MixingPlane[2 * currentZone - 1];
+            MixingOut = MixingPlane[2 * currentZone];
+        }
+    }
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        int bcType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+
+        if (bcName == MixingIn || bcName == MixingOut)
+        {
+            continue;
+        }
+
+        if (IsInterface(bcType))
+        {
+            continue;
+        }
+        if (bcType == EXTRAPOLATION || bcType == SYMMETRY || bcType == OUTFLOW || bcType == PRESSURE_OUTLET || bcType == MASS_FLOW_OUTLET)
+        {
+            OutflowBCRegion(grid, bcRegion);
+        }
+        else if(bcType == INFLOW || bcType == PRESSURE_INLET || bcType == MASS_FLOW_INLET)
+        {
+            InflowBCRegion(grid, bcRegion);
+        }
+        else if(IsWall(bcType))
+        {
+            WallBCRegion(grid, bcRegion);
+        }
+        else if (bcType == FARFIELD)
+        {
+            FarfieldBCRegion(grid, bcRegion);
+        }
+        else
+        {
+            OutflowBCRegion(grid, bcRegion);
+        }
+    }
+}
+
+void TurbSolverUnstr::OutflowBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble  *> (grid->GetDataPtr("vist"));
+    
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        // iFace is the face number in the set of faceIndex.
+        int iFace = *iter;
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+
+        viscousTurbulence[re] = viscousTurbulence[le];
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            qTurbulence[m][re] = qTurbulence[m][le];
+        }
+    }
+}
+
+void TurbSolverUnstr::InflowBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    RDouble *freeStreamTurbVar =  parameters->GetFreeStreamTurbVar();
+    RDouble freeStreamViscosity = parameters->GetFreeStreamViscosity();
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble  *> (grid->GetDataPtr("vist"));
+
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();    
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        //! iFace is the face number in the set of faceIndex.
+        int iFace = *iter;
+        int re = rightCellOfFace[iFace];
+    
+        viscousTurbulence[re] = freeStreamViscosity;
+        for (int m = 0; m < nTurbulenceEquation; ++ m)
+        {
+            qTurbulence[m][re] = freeStreamTurbVar[m];
+        }
+    }
+}
+
+void TurbSolverUnstr::WallBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *wallDistance = grid->GetWallDist();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int viscoueType = parameters->GetViscousType();
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble **q      = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *viscousLaminar = reinterpret_cast<RDouble  *> (grid->GetDataPtr("visl"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble  *> (grid->GetDataPtr("vist"));
+
+    using namespace IDX;
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+    if(tscheme != GMRES)
+    {
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            //! iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            int le = leftCellOfFace[iFace];
+            int re = rightCellOfFace[iFace];
+
+            viscousTurbulence[re] = -viscousTurbulence[le];
+            if (viscoueType == 3)
+            {
+                qTurbulence[ISA][re] = - qTurbulence[ISA][le];
+            }
+            else if (viscoueType == 4)
+            {
+                RDouble beta1 = 0.075;
+                RDouble rho   = q[IR][le];
+                RDouble dist  = wallDistance[le];
+                RDouble dist2 = dist * dist;
+
+                RDouble kwWall = 60.0 * viscousLaminar[le] / (rho * beta1 * dist2 * refReNumber * refReNumber);
+
+                qTurbulence[IKE][re] = -qTurbulence[IKE][le];
+                //qTurbulence[IKW][re] = MAX(two * kw_wall - qTurbulence[IKW][le],SMALL);
+                qTurbulence[IKW][re] = two * kwWall - qTurbulence[IKW][le];
+            }
+        }
+    }
+    else
+    {
+#ifdef USE_GMRESSOLVER
+        //! GMRESturb Allocation
+        int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+        int nTotalCell = grid->GetNTotalCell();
+        ADReal *turbQl = new ADReal[nTurbulenceEquation]();
+        ADReal *turbQr = new ADReal[nTurbulenceEquation]();
+        RDouble **dDdP_turb = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP_turb"));
+
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            //! iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            int le = leftCellOfFace[iFace];
+            int re = rightCellOfFace[iFace];
+
+            for (int n = 0; n < nTurbulenceEquation; n++)
+            {
+                turbQl[n] = qTurbulence[n][le];
+                turbQl[n].diff(n, nTurbulenceEquation);
+            }
+
+            viscousTurbulence[re] = -viscousTurbulence[le];
+            if (viscoueType == 3)
+            {
+                for (int n = 0; n < nTurbulenceEquation; n++)
+                {
+                    turbQr[n] = -turbQl[n];
+                }
+
+                int idx = (re - nTotalCell) * nTurbulenceEquation;        
+                for (int m = 0; m < nTurbulenceEquation; m++)
+                {
+                    qTurbulence[m][re] = turbQr[m].val();
+                    for (int n = 0; n < nTurbulenceEquation; n++)
+                    {
+                        dDdP_turb[m][idx + n] = turbQr[m].dx(n);
+                    }
+                }
+            }
+            else
+            {
+                TK_Exit::ExceptionExit("GMRES for 1eq-sa only so far");
+            }
+        }
+
+        delete[] turbQl; turbQl = nullptr;
+        delete[] turbQr; turbQr = nullptr;
+#endif
+    }
+}
+#ifdef USE_GMRESSOLVER
+//! GMRESturb
+void TurbSolverUnstr::GMRES_WallBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble *wallDistance = grid->GetWallDist();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int viscoueType = parameters->GetViscousType();
+    RDouble refReNumber = parameters->GetRefReNumber();
+    int transitionType = parameters->GetTransitionType();
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble **q      = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *viscousLaminar = reinterpret_cast<RDouble  *> (grid->GetDataPtr("visl"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble  *> (grid->GetDataPtr("vist"));
+
+    //! GMRESturb Allocation
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    int nTotalCell = grid->GetNTotalCell();
+    ADReal *turbQl = new ADReal[nTurbulenceEquation]();
+    ADReal *turbQr = new ADReal[nTurbulenceEquation]();
+    RDouble **dDdP_turb = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP_turb"));
+
+    using namespace IDX;
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        //! iFace is the face number in the set of faceIndex.
+        int iFace = *iter;
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+
+        for (int n = 0; n < nTurbulenceEquation; n++)
+        {
+            turbQl[n] = qTurbulence[n][le];
+            turbQl[n].diff(n, nTurbulenceEquation);
+        }
+
+        viscousTurbulence[re] = -viscousTurbulence[le];
+        if (viscoueType == 3)
+        {
+            for (int n = 0; n < nTurbulenceEquation; n++)
+            {
+                turbQr[n] = -turbQl[n];
+            }
+
+            int idx = (re - nTotalCell) * nTurbulenceEquation;        
+            for (int m = 0; m < nTurbulenceEquation; m++)
+            {
+                qTurbulence[m][re] = turbQr[m].val();
+                for (int n = 0; n < nTurbulenceEquation; n++)
+                {
+                    dDdP_turb[m][idx + n] = turbQr[m].dx(n);
+                }
+            }
+            /* printf("turbulence wall bc: %d\n", le);
+            for (int m = 0; m < nTurbulenceEquation; m++)
+            {
+                for (int n = 0; n < nTurbulenceEquation; n++)
+                {
+                    int index;
+                    index = (re - nTotalCell) * nTurbulenceEquation;
+                    printf("%lf  ", dDdP_turb[m][index + n]);
+                }
+                printf("\n");
+            }
+            printf("-------------------------------------------------\n"); */
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("GMRES for 1eq-sa only so far");
+        }
+    }
+
+    delete[] turbQl; turbQl = nullptr;
+    delete[] turbQr; turbQr = nullptr;
+}
+#endif
+void TurbSolverUnstr::FarfieldBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble  *nxs  = grid->GetFaceNormalX();
+    RDouble  *nys  = grid->GetFaceNormalY();
+    RDouble  *nzs  = grid->GetFaceNormalZ();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble *freeStreamTurbVar =  parameters->GetFreeStreamTurbVar();
+    RDouble freeStreamViscosity = parameters->GetFreeStreamViscosity();
+
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble **q      = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble  *> (grid->GetDataPtr("vist"));
+    RDouble *gamma = reinterpret_cast<RDouble *> (grid->GetDataPtr("gama"));
+
+    using namespace IDX;
+    RDouble *primitiveVariableInflow = reinterpret_cast<RDouble *> (GlobalDataBase::GetDataPtr("prim_inf"));
+    RDouble roo = primitiveVariableInflow[IR];
+    RDouble uoo = primitiveVariableInflow[IU];
+    RDouble voo = primitiveVariableInflow[IV];
+    RDouble woo = primitiveVariableInflow[IW];
+    RDouble poo = primitiveVariableInflow[IP];
+    
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+
+    if (tscheme != GMRES)
+    {
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            //! iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            int le = leftCellOfFace[iFace];
+            int re = rightCellOfFace[iFace];
+
+            RDouble rin,uin,vin,win,pin;
+            RDouble vno,vni,vei,coo,cIN;
+            RDouble riemp,riemm,cb,vnb;
+
+            rin = q[IR][le];
+            uin = q[IU][le];
+            vin = q[IV][le];
+            win = q[IW][le];
+            pin = q[IP][le];
+
+            vno = nxs[iFace] * uoo + nys[iFace] * voo + nzs[iFace] * woo;
+            vni = nxs[iFace] * uin + nys[iFace] * vin + nzs[iFace] * win;
+            vei = sqrt(uin * uin + vin * vin + win * win);
+
+            RDouble gama = gamma[le];
+
+            coo = sqrt(ABS(refGama * poo / roo));
+            cIN = sqrt(ABS(gama  * pin / rin));
+
+            //! supersonic
+            if (vei > cIN)
+            {
+                if (vni >= 0.0)
+                {
+                    //! exit
+                    viscousTurbulence[re] = viscousTurbulence[le];
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulence[m][re] = qTurbulence[m][le];
+                    }
+                }
+                else
+                {
+                    //! inlet
+                    viscousTurbulence[re] = freeStreamViscosity;
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        qTurbulence[m][re] = freeStreamTurbVar[m];
+                    }
+                }
+                continue;
+            }
+
+            //! subsonic
+            riemp = vni + 2.0 * cIN / (gama  - 1.0);
+            riemm = vno - 2.0 * coo / (refGama - 1.0);
+            vnb   = half   * (riemp + riemm);
+            cb    = fourth * (riemp - riemm) * gama;
+
+            if (vnb >= 0.0)
+            {
+                //! exit
+                viscousTurbulence[re] = viscousTurbulence[le];
+                for (int m = 0; m < nTurbulenceEquation; ++ m)
+                {
+                    qTurbulence[m][re] = qTurbulence[m][le];
+                }
+            }
+            else
+            {
+                //! inlet
+                viscousTurbulence[re] = freeStreamViscosity;
+                for (int m = 0; m < nTurbulenceEquation; ++ m)
+                {
+                    qTurbulence[m][re] = freeStreamTurbVar[m];
+                }
+            }
+
+        }
+    }
+    else
+    {
+#ifdef USE_GMRESSOLVER
+        //! GMRESturb
+        int nTotalCell = grid->GetNTotalCell();
+        ADReal *turbQl = new ADReal[nTurbulenceEquation]();
+        ADReal *turbQr = new ADReal[nTurbulenceEquation]();
+        RDouble **dDdP_turb = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP_turb"));
+
+        for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+        {
+            //! iFace is the face number in the set of faceIndex.
+            int iFace = *iter;
+            int le = leftCellOfFace[iFace];
+            int re = rightCellOfFace[iFace];
+
+            for (int m = 0; m < nTurbulenceEquation; m++)
+            {
+                turbQl[m] = qTurbulence[m][le];
+                turbQl[m].diff(m, nTurbulenceEquation);
+            }
+
+
+            RDouble rin,uin,vin,win,pin;
+            RDouble vno,vni,vei,coo,cin;
+            RDouble riemp,riemm,cb,vnb;
+
+            rin = q[IR][le];
+            uin = q[IU][le];
+            vin = q[IV][le];
+            win = q[IW][le];
+            pin = q[IP][le];
+
+            vno = nxs[iFace] * uoo + nys[iFace] * voo + nzs[iFace] * woo;
+            vni = nxs[iFace] * uin + nys[iFace] * vin + nzs[iFace] * win;
+            vei = sqrt(uin * uin + vin * vin + win * win);
+
+            RDouble gama = gamma[le];
+
+            coo = sqrt(ABS(refGama * poo / roo));
+            cin = sqrt(ABS(gama  * pin / rin));
+
+            //! Supersonic
+            if (vei > cin)
+            {
+                if (vni >= 0.0)
+                {
+                    //! Exit
+                    viscousTurbulence[re] = viscousTurbulence[le];
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        turbQr[m] = turbQl[m];
+                    }
+                }
+                else
+                {
+                    //! Inlet
+                    viscousTurbulence[re] = freeStreamViscosity;
+                    for (int m = 0; m < nTurbulenceEquation; ++ m)
+                    {
+                        turbQr[m] = freeStreamTurbVar[m];
+                    }
+                }
+                continue;
+            }
+
+            //! Subsonic
+            riemp = vni + 2.0 * cin / (gama  - 1.0);
+            riemm = vno - 2.0 * coo / (refGama - 1.0);
+            vnb   = half   * (riemp + riemm);
+            cb    = fourth * (riemp - riemm) * gama;
+
+            if (vnb >= 0.0)
+            {
+                //! Exit
+                viscousTurbulence[re] = viscousTurbulence[le];
+                for (int m = 0; m < nTurbulenceEquation; ++ m)
+                {
+                    turbQr[m] = turbQl[m];
+                }
+            }
+            else
+            {
+                //! Inlet
+                viscousTurbulence[re] = freeStreamViscosity;
+                for (int m = 0; m < nTurbulenceEquation; ++ m)
+                {
+                    turbQr[m] = freeStreamTurbVar[m];
+                }
+            }
+
+            int idx = (re - nTotalCell) * nTurbulenceEquation;        
+            for (int m = 0; m < nTurbulenceEquation; m++)
+            {
+                qTurbulence[m][re] = turbQr[m].val();
+                for (int n = 0; n < nTurbulenceEquation; n++)
+                {
+                    dDdP_turb[m][idx + n] = turbQr[m].dx(n);
+                }
+            }
+        }
+#endif
+    }
+}
+#ifdef USE_GMRESSOLVER
+//! GMRESturb
+void TurbSolverUnstr::GMRES_FarfieldBCRegion(Grid *gridIn, UnstructBC *bcRegionUnstruct)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+    RDouble  *nxs  = grid->GetFaceNormalX();
+    RDouble  *nys  = grid->GetFaceNormalY();
+    RDouble  *nzs  = grid->GetFaceNormalZ();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble *freeStreamTurbVar =  parameters->GetFreeStreamTurbVar();
+    RDouble freeStreamViscosity = parameters->GetFreeStreamViscosity();
+
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble **q      = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble  *> (grid->GetDataPtr("vist"));
+    RDouble *gamma = reinterpret_cast<RDouble *> (grid->GetDataPtr("gama"));
+
+    //! GMRESturb
+    int nTotalCell = grid->GetNTotalCell();
+    ADReal *turbQl = new ADReal[nTurbulenceEquation]();
+    ADReal *turbQr = new ADReal[nTurbulenceEquation]();
+    RDouble **dDdP_turb = reinterpret_cast<RDouble **>(grid->GetDataPtr("dDdP_turb"));
+
+    using namespace IDX;
+    RDouble *primitiveVariableInflow = reinterpret_cast<RDouble *> (GlobalDataBase::GetDataPtr("prim_inf"));
+    RDouble roo = primitiveVariableInflow[IR];
+    RDouble uoo = primitiveVariableInflow[IU];
+    RDouble voo = primitiveVariableInflow[IV];
+    RDouble woo = primitiveVariableInflow[IW];
+    RDouble poo = primitiveVariableInflow[IP];
+    
+    vector<int> *faceIndex = bcRegionUnstruct->GetFaceIndex();
+    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+    {
+        //! iFace is the face number in the set of faceIndex.
+        int iFace = *iter;
+        int le = leftCellOfFace[iFace];
+        int re = rightCellOfFace[iFace];
+
+        for (int m = 0; m < nTurbulenceEquation; m++)
+        {
+            turbQl[m] = qTurbulence[m][le];
+            turbQl[m].diff(m, nTurbulenceEquation);
+        }
+        
+
+        RDouble rin,uin,vin,win,pin;
+        RDouble vno,vni,vei,coo,cin;
+        RDouble riemp,riemm,cb,vnb;
+
+        rin = q[IR][le];
+        uin = q[IU][le];
+        vin = q[IV][le];
+        win = q[IW][le];
+        pin = q[IP][le];
+
+        vno = nxs[iFace] * uoo + nys[iFace] * voo + nzs[iFace] * woo;
+        vni = nxs[iFace] * uin + nys[iFace] * vin + nzs[iFace] * win;
+        vei = sqrt(uin * uin + vin * vin + win * win);
+
+        RDouble gama = gamma[le];
+
+        coo = sqrt(ABS(refGama * poo / roo));
+        cin = sqrt(ABS(gama  * pin / rin));
+
+        //! Supersonic
+        if (vei > cin)
+        {
+            if (vni >= 0.0)
+            {
+                //! Exit
+                viscousTurbulence[re] = viscousTurbulence[le];
+                for (int m = 0; m < nTurbulenceEquation; ++ m)
+                {
+                    turbQr[m] = turbQl[m];
+                }
+            }
+            else
+            {
+                //! Inlet
+                viscousTurbulence[re] = freeStreamViscosity;
+                for (int m = 0; m < nTurbulenceEquation; ++ m)
+                {
+                    turbQr[m] = freeStreamTurbVar[m];
+                }
+            }
+            continue;
+        }
+
+        //! Subsonic
+        riemp = vni + 2.0 * cin / (gama  - 1.0);
+        riemm = vno - 2.0 * coo / (refGama - 1.0);
+        vnb   = half   * (riemp + riemm);
+        cb    = fourth * (riemp - riemm) * gama;
+
+        if (vnb >= 0.0)
+        {
+            //! Exit
+            viscousTurbulence[re] = viscousTurbulence[le];
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                turbQr[m] = turbQl[m];
+            }
+        }
+        else
+        {
+            //! Inlet
+            viscousTurbulence[re] = freeStreamViscosity;
+            for (int m = 0; m < nTurbulenceEquation; ++ m)
+            {
+                turbQr[m] = freeStreamTurbVar[m];
+            }
+        }
+
+        int idx = (re - nTotalCell) * nTurbulenceEquation;        
+        for (int m = 0; m < nTurbulenceEquation; m++)
+        {
+            qTurbulence[m][re] = turbQr[m].val();
+            for (int n = 0; n < nTurbulenceEquation; n++)
+            {
+                dDdP_turb[m][idx + n] = turbQr[m].dx(n);
+            }
+        }
+        /* printf("turbulence far bc: %d\n", le);
+        for (int m = 0; m < nTurbulenceEquation; m++)
+        {
+            for (int n = 0; n < nTurbulenceEquation; n++)
+            {
+                int index;
+                index = (re - nTotalCell) * nTurbulenceEquation;
+                printf("%lf  ", dDdP_turb[m][index + n]);
+            }
+            printf("\n");
+        }
+        printf("-------------------------------------------------\n"); */
+    }
+}
+#endif
+void TurbSolverUnstr::ComputeViscousCoeff(Grid *grid)
+{
+    Viscosity(grid);
+}
+
+void TurbSolverUnstr::Viscosity(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    RDouble **q = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+
+    RDouble *viscousLaminar = reinterpret_cast<RDouble * > (grid->GetDataPtr("visl"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble * > (grid->GetDataPtr("vist"));
+
+    RDouble *SST_F2 = reinterpret_cast<RDouble *> (grid->GetDataPtr("SST_F2"));
+
+    RDouble *wallDistance = grid->GetWallDist();
+
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotal = numberOfBoundaryFace + numberOfTotalCell;
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    RDouble eddyViscosityLimit = parameters->GetEddyViscosityLimit();
+    int monitorViscousTurbulenceMax = GlobalDataBase::GetIntParaFromDB("monitor_vistmax");
+
+    string viscousName  = parameters->GetViscousName();
+    RDouble refReNumber = parameters->GetRefReNumber();
+    RDouble reynoldsSquare = refReNumber * refReNumber;
+
+    RDouble viscousTurbulenceMax = 0.0;
+    RDouble viscousTurbulenceMin = 1.0e30;
+
+    RDouble part1, part2, arg2, f2;
+    RDouble ld, ld3, fv1;
+    RDouble rho, ke, kw, ds, ds2;
+
+    int iMax = 0;
+    int iMin = 0;
+
+    using namespace IDX;
+
+    if (viscousName.substr(0, 6) == "1eq-sa")
+    {
+        RDouble SA_cv1_cube = parameters->GetSA_cv1_cube();
+
+        for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+        {
+            RDouble nue = qTurbulence[0][iCell];
+            if(nue > 0.0)
+            {
+                ld  = nue * q[IR][iCell] / (viscousLaminar[iCell] + SMALL);
+            ld3  = ld * ld * ld;
+            fv1 = ld3 / (ld3 + SA_cv1_cube);
+                viscousTurbulence[iCell] = q[IR][iCell] * fv1 * nue;
+            }
+            else
+            {
+                viscousTurbulence[iCell] = 0.0;
+            }
+
+            if (iCell < numberOfTotalCell && viscousTurbulenceMax < viscousTurbulence[iCell])    //! Bell 20130527 add iCell <numberOfTotalCell
+            {
+                viscousTurbulenceMax = viscousTurbulence[iCell];
+                iMax = iCell;
+            }
+            if (iCell < numberOfTotalCell && viscousTurbulenceMin > viscousTurbulence[iCell])    //! Bell 20130527 add iCell <numberOfTotalCell
+            {
+                viscousTurbulenceMin = viscousTurbulence[iCell];
+                iMin = iCell;
+            }
+        }
+    }
+    else if (viscousName.substr(0, 6) == "2eq-kw")
+    {
+        if (viscousName.substr(0, 17) == "2eq-kw-menter-sst")
+        {
+            //! Original Menter k-w-SST model
+            //! Important: no repalce! otherwise it can not repeat.
+            RDouble SST_a1 = parameters->GetSST_a1();
+            RDouble SST_betaStar = parameters->GetSST_betaStar();
+
+            RDouble *dudx = new RDouble [numberOfTotal];
+            RDouble *dudy = new RDouble [numberOfTotal];
+            RDouble *dudz = new RDouble [numberOfTotal];
+
+            RDouble *dvdx = new RDouble [numberOfTotal];
+            RDouble *dvdy = new RDouble [numberOfTotal];
+            RDouble *dvdz = new RDouble [numberOfTotal];
+
+            RDouble *dwdx = new RDouble [numberOfTotal];
+            RDouble *dwdy = new RDouble [numberOfTotal];
+            RDouble *dwdz = new RDouble [numberOfTotal];
+
+            grid->CompGradient(q[IU], dudx, dudy, dudz);
+            grid->CompGradient(q[IV], dvdx, dvdy, dvdz);
+            grid->CompGradient(q[IW], dwdx, dwdy, dwdz);
+
+            RDouble *SpSdRatio = reinterpret_cast<RDouble *> (grid->GetDataPtr("SpSdRatio"));
+
+            for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell)
+            {
+                rho = ABS(q[IR][iCell]) + SMALL;
+                ke  = qTurbulence[IKE][iCell];
+                kw  = qTurbulence[IKW][iCell];
+                ds  = wallDistance[iCell];
+                ds2 = ds * ds;
+
+                RDouble s11 = dudx[iCell];
+                RDouble s22 = dvdy[iCell];
+                RDouble s33 = dwdz[iCell];
+                RDouble s12 = half * (dudy[iCell] + dvdx[iCell]);
+                RDouble s13 = half * (dudz[iCell] + dwdx[iCell]);
+                RDouble s23 = half * (dvdz[iCell] + dwdy[iCell]);
+
+                RDouble sij2 = two * (PHSPACE::SQR(s11, s22, s33) + two * PHSPACE::SQR(s12, s13, s23));
+
+                part1 = 2.0 * sqrt(ke) / (SST_betaStar * kw * ds * refReNumber);
+                part2 = 500.0 * viscousLaminar[iCell] / (rho * kw * ds2 * reynoldsSquare);
+                arg2  = MAX(part1, part2);
+                f2    = tanh(arg2 * arg2);
+                SST_F2[iCell] = f2;
+
+                //viscousTurbulence[iCell] = rho * ke / MAX(kw, vort * f2 / turbA1) * refReNumber;
+                viscousTurbulence[iCell] = rho * ke / MAX(kw, sqrt(sij2) * f2 / (SST_a1 * refReNumber));
+
+                int transitionType = parameters->GetTransitionType();
+                if (transitionType == IREGAMA)
+                {
+                    viscousTurbulence[iCell] = viscousTurbulence[iCell] * sqrt(SpSdRatio[iCell]);
+                }
+
+                viscousTurbulence[iCell] = MIN(eddyViscosityLimit, viscousTurbulence[iCell]); //viscousLaminar[iCell] * coef_kvist * 
+
+                if (viscousTurbulenceMax < viscousTurbulence[iCell]) 
+                {
+                    viscousTurbulenceMax = viscousTurbulence[iCell];
+                    iMax = iCell;
+                }
+                if (viscousTurbulenceMin > viscousTurbulence[iCell])
+                {
+                    viscousTurbulenceMin = viscousTurbulence[iCell];
+                    iMin = iCell;
+                }
+            }
+
+            delete []dudx;
+            delete []dudy;
+            delete []dudz;
+
+            delete []dvdx;
+            delete []dvdy;
+            delete []dvdz;
+
+            delete []dwdx;
+            delete []dwdy;
+            delete []dwdz;
+
+        }
+    }
+
+    RDouble vistMax = viscousTurbulenceMax;
+    RDouble vistMin = viscousTurbulenceMin;
+
+    grid->UpdateData("vist_max", &vistMax, PHDOUBLE, 1);
+    grid->UpdateData("vist_min", &vistMin, PHDOUBLE, 1);
+
+    if (monitorViscousTurbulenceMax)
+    {
+        int outnstep = GlobalDataBase::GetIntParaFromDB("outnstep");
+        int intervalStepRes = GlobalDataBase::GetIntParaFromDB("intervalStepRes");
+        if (outnstep % intervalStepRes == 0)
+        {
+        grid->CompareMaxMinValue(viscousTurbulenceMax, 1);
+        grid->CompareMaxMinValue(viscousTurbulenceMin, 2);
+
+        ostringstream oss;
+        cout << setprecision(6);
+        cout << setiosflags(ios::scientific);
+        oss  << "Max && min viscosity: " << viscousTurbulenceMax << " " << viscousTurbulenceMin << " " << "\n";
+        PrintToWindow(oss);
+    }
+}
+}
+
+void TurbSolverUnstr::InitCGrid(Grid *fineGridIn, Grid *coarseGridIn)
+{
+    UnstructGrid *fineGrid = UnstructGridCast(fineGridIn);
+    UnstructGrid *coarseGrid = UnstructGridCast(coarseGridIn);
+
+    int *cell2CoarseGridCell = fineGrid->GetCell2CoarseGridCell();
+    int numberOfTotalCellOnFineGrid = fineGrid->GetNTotalCell();
+    int numberOfTotalCellOnCoarseGrid = coarseGrid->GetNTotalCell();
+
+    RDouble *volumeOfCoarseGrid = coarseGrid->GetCellVolume();
+    RDouble *volumeOfFineGrid = fineGrid->GetCellVolume();
+
+    RDouble *walldistanceOfFineGrid = fineGrid->GetWallDist();
+
+    if (!coarseGrid->GetWallDist())
+    {
+        coarseGrid->AllocateWalldist();
+    }
+    RDouble *walldistanceOfCoarseGrid = coarseGrid->GetWallDist();
+
+    for (int iCell = 0; iCell <numberOfTotalCellOnCoarseGrid; ++ iCell)
+    {
+        walldistanceOfCoarseGrid[iCell] = 0.0;
+    }
+
+    for (int iCell = 0; iCell <numberOfTotalCellOnFineGrid; ++ iCell)
+    {
+        walldistanceOfCoarseGrid[cell2CoarseGridCell[iCell]] += volumeOfFineGrid[iCell] * walldistanceOfFineGrid[iCell];
+    }
+
+    for (int iCell = 0; iCell <numberOfTotalCellOnCoarseGrid; ++ iCell)
+    {
+        walldistanceOfCoarseGrid[iCell] /= volumeOfCoarseGrid[iCell];
+    }
+}
+
+void TurbSolverUnstr::UploadInterfaceData(ActionKey *actkey)
+{
+    UploadInterfaceValue(actkey);
+}
+
+void TurbSolverUnstr::UploadInterfaceValue(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(GetGrid(level));
+
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (interfaceInformation == 0) return;
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    PHSPACE::UploadInterfaceValue(grid, qTurbulence, "turb::q", nTurbulenceEquation);
+
+    RDouble* viscousTurbulence = reinterpret_cast<RDouble*> (grid->GetDataPtr("vist"));
+    PHSPACE::UploadInterfaceValue(grid, viscousTurbulence, "vist");
+}
+
+void TurbSolverUnstr::UploadInterpointData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(GetGrid(level));
+    InterpointInformation *interPointInformation = grid->GetInterpointInfo();
+    if (interPointInformation == 0)
+    {
+        return;
+    }
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    RDouble **qTurbulenceNode = reinterpret_cast<RDouble **> (grid->GetDataPtr("qTurbNode"));
+    PHSPACE::UploadInterpointValue(grid, qTurbulenceNode, "qTurbNode", nTurbulenceEquation);
+}
+
+void TurbSolverUnstr::DownloadInterpointData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(GetGrid(level));
+    InterpointInformation *interPointInformation = grid->GetInterpointInfo();
+    if (interPointInformation == 0)
+    {
+        return;
+    }
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    RDouble **qTurbulenceNode = reinterpret_cast<RDouble **> (grid->GetDataPtr("qTurbNode"));
+    PHSPACE::DownloadInterpointValue(grid, qTurbulenceNode, "qTurbNode", nTurbulenceEquation);
+}
+
+void TurbSolverUnstr::CommunicationInterpointWeight(ActionKey *actkey)
+{
+    int level = actkey->level;
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int myid = GetCurrentProcessorID();
+        int tag = iZone + level * nZones;
+        int send_proc = GetZoneProcessorID(iZone);
+
+        ZoneNeighbor *zoneNeighborForPoint = zoneConnectivityForPoint->GetZoneNeighborForPoint(iZone);
+        std::size_t numberOfNeighbor = zoneNeighborForPoint->GetNumberOfNeighbor();
+
+        for (std::size_t iNeighborZone = 0; iNeighborZone < numberOfNeighbor; ++ iNeighborZone)
+        {
+            int neighborZoneIndex = zoneNeighborForPoint->GetZoneIndexOfNeighbor(iNeighborZone);
+            int recv_proc = GetZoneProcessorID(neighborZoneIndex);
+
+            DataContainer *cdata = new DataContainer();
+
+            if (myid == send_proc)
+            {
+                UnstructGrid *grid = UnstructGridCast(PHSPACE::GetGrid(iZone, level));
+                InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+                int *nodeValueSliceTurb = reinterpret_cast<int *>(grid->GetDataPtr("nodeValueSliceTurb"));
+
+                cdata->moveto_begin();
+
+                int iNeighbor = interpointInformation->FindIthNeighbor(neighborZoneIndex);
+                int numberOfInterpointsForNeighbor = interpointInformation->GetNumberOfInterpointsForNeighbor(iNeighbor);
+                int *pointIndexForSend = interpointInformation->GetPointIndexForSend(iNeighbor);
+                int *interPoint2GlobalPoint = interpointInformation->GetInterPoint2GlobalPoint();
+
+                int iPoint;
+                int globalPoint;
+                int valueWeight;
+                for (int ipointLocal = 0; ipointLocal < numberOfInterpointsForNeighbor; ++ ipointLocal)
+                {
+                    iPoint = pointIndexForSend[ipointLocal];
+                    globalPoint = interPoint2GlobalPoint[iPoint];
+                    valueWeight = nodeValueSliceTurb[globalPoint];
+
+                    cdata->write(&valueWeight, sizeof(int));
+                }
+            }
+
+            PH_Trade(cdata, send_proc, recv_proc, tag);
+
+            if (myid == recv_proc)
+            {
+                UnstructGrid *gridNeighbor = UnstructGridCast(PHSPACE::GetGrid(neighborZoneIndex, level));
+                InterpointInformation *interpointInformationNeighbor = gridNeighbor->GetInterpointInfo();
+                int *nodeValueSliceTurbTrade = reinterpret_cast<int *>(gridNeighbor->GetDataPtr("nodeValueSliceTurbTrade"));
+
+                cdata->moveto_begin();
+
+                int iNeighbor = interpointInformationNeighbor->FindIthNeighbor(iZone);
+                int numberOfInterpointsForNeighbor = interpointInformationNeighbor->GetNumberOfInterpointsForNeighbor(iNeighbor);
+                int *pointIndexForReceive = interpointInformationNeighbor->GetPointIndexForReceive(iNeighbor);
+                int *interPoint2GlobalPoint = interpointInformationNeighbor->GetInterPoint2GlobalPoint();
+
+                int iPoint;
+                int globalPoint;
+                int valueWeight;
+                for (int j = 0; j < numberOfInterpointsForNeighbor; ++ j)
+                {
+                    iPoint = pointIndexForReceive[j];
+                    globalPoint = interPoint2GlobalPoint[iPoint];
+                    cdata->read(&valueWeight, sizeof(int));
+
+                    nodeValueSliceTurbTrade[globalPoint] += valueWeight;
+                }
+            }
+
+            delete cdata;
+        }
+    }
+}
+
+void TurbSolverUnstr::DownloadInterpointWeight(ActionKey *actkey)
+{
+    int level = actkey->level;
+
+    using namespace PHMPI;
+
+    int myid = GetCurrentProcessorID();
+    int nZones = GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int currentZoneProc = GetZoneProcessorID(iZone);
+
+        if (myid != currentZoneProc)
+        {
+            continue;
+        }
+
+        UnstructGrid *grid = UnstructGridCast(PHSPACE::GetGrid(iZone, level));
+        int nTotalNode = grid->GetNTotalNode();
+        int *nodeValueSliceTurb = reinterpret_cast<int *>(grid->GetDataPtr("nodeValueSliceTurb"));
+        int *nodeValueSliceTurbTrade = reinterpret_cast<int *>(grid->GetDataPtr("nodeValueSliceTurbTrade"));
+
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            nodeValueSliceTurb[iNode] += nodeValueSliceTurbTrade[iNode];
+        }
+
+        PHSPACE::SetField(nodeValueSliceTurbTrade, 0, nTotalNode);
+    }
+}
+
+//! Bell 20120910 add
+void TurbSolverUnstr::DownloadInterfaceData(ActionKey *actkey)
+{
+    DownloadInterfaceValue(actkey);
+}
+//
+
+void TurbSolverUnstr::DownloadInterfaceValue(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(GetGrid(level));
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (interfaceInformation == 0) return;
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    PHSPACE::DownloadInterfaceValue(grid, qTurbulence, "turb::q", nTurbulenceEquation); 
+
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+    PHSPACE::DownloadInterfaceValue(grid, viscousTurbulence, "vist");
+}
+
+//! need further compllished!!!
+void TurbSolverUnstr::UploadOversetData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(GetGrid(level));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    PHSPACE::UploadOversetValue(grid, qTurbulence, "turb::q", nTurbulenceEquation);
+}
+
+//! need further compllished!!!
+void TurbSolverUnstr::DownloadOversetData(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = reinterpret_cast<UnstructGrid *>(GetGrid(level));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+
+    PHSPACE::DownloadOversetValue(grid, qTurbulence, "turb::q", nTurbulenceEquation);
+}
+
+//! Bell 20120910 add
+void TurbSolverUnstr::DumpInterfaceInfoBell()
+{
+    int level = 0;
+    UnstructGrid *grid = UnstructGridCast(GetGrid(level));
+    
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation) return;
+
+    fstream file;
+    std::ostringstream oss;
+    oss << AbsoluteFilename("interface") << grid->GetZoneID() << ".dat";
+    file.open(oss.str().c_str(), ios_base::out);
+    file.setf(ios::scientific);
+    file.precision(8);
+    int seprate = 20;
+
+    int numberOfInterFace = interfaceInformation->GetNIFace();
+    if (numberOfInterFace == 0) return;
+
+    int *interFace2ZoneID       = interfaceInformation->GetInterFace2ZoneID();
+    int *interFace2InterFaceID  = interfaceInformation->GetInterFace2InterFaceID();
+    int *interface2BoundaryFace = interfaceInformation->GetInterFace2BoundaryFace();
+
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+
+    int *leftCellOfFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfFace = grid->GetRightCellOfFace();
+
+    RDouble *viscousLaminar = reinterpret_cast<RDouble *> (grid->GetDataPtr("visl"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble *> (grid->GetDataPtr("vist"));
+
+    RDouble **Q1;
+    RDouble **Q2;
+
+    RDouble **visLaminar = new RDouble *[1];
+    RDouble **VisTurbulence = new RDouble *[1];
+    visLaminar[0] = viscousLaminar;
+    VisTurbulence[0] = viscousTurbulence;
+    Q1 = visLaminar;
+    Q2 = VisTurbulence;
+
+    file << " numberOfInterFace = " << numberOfInterFace << " numberOfBoundaryFace = " << numberOfBoundaryFace << "numberOfTotalCell = " << grid->GetNTotalCell() << "\n";
+    file << "i" << setw(seprate) << "nb_zone" << setw(seprate) << "le" << setw(seprate) << "re" << setw(seprate) << "tle" << setw(seprate)  << "tre" << setw(seprate)
+         << "qTurbulence[L]" << setw(seprate) << "qTurbulence[R]"
+         << endl;
+    
+    for (int iFace = 0; iFace < numberOfInterFace; ++ iFace)
+    {
+        int targetZone = interFace2ZoneID[iFace];
+        int targetInterface = interFace2InterFaceID[iFace];
+        UnstructGrid *targetGrid = UnstructGridCast(PHSPACE::GetGrid(targetZone,0));
+
+        if(!targetGrid) return;
+
+        InterfaceInfo *targetInterfaceInformation = targetGrid->GetInterfaceInfo();
+       
+        int *targetInterface2BoundaryFace = targetInterfaceInformation->GetInterFace2BoundaryFace();
+
+        int *targetLeftCellOfFace = targetGrid->GetLeftCellOfFace();
+        int *targetRightCellOfFace = targetGrid->GetRightCellOfFace();
+
+        int le = leftCellOfFace [interface2BoundaryFace[iFace]];
+        int re = rightCellOfFace[interface2BoundaryFace[iFace]];
+
+        int tle = targetLeftCellOfFace [targetInterface2BoundaryFace[targetInterface]];
+        int tre = targetRightCellOfFace[targetInterface2BoundaryFace[targetInterface]];
+
+        file << iFace << setw(seprate) << targetZone << setw(seprate) << le << setw(seprate) << re << setw(seprate) << tle << setw(seprate) << tre << setw(seprate)
+             << Q1[0][le]<< setw(seprate) << Q1[0][re] << setw(seprate)
+             << Q2[0][le]<< setw(seprate) << Q2[0][re]
+             << endl;
+
+    }
+    delete [] visLaminar[1];    visLaminar[1] = NULL;
+    delete [] VisTurbulence[1];    VisTurbulence[1] = NULL;
+    file.close();
+    file.clear();
+}
+//*/
+
+void TurbSolverUnstr::ComputeLengthScaleofOneEquationModel(Grid *gridIn)
+{
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int DESType = parameters->GetDESType();
+
+    if (DESType == DES)
+    {
+        ComputeDESLength(gridIn);
+    }
+    else if (DESType == DDES)
+    {
+        ComputeDDESLength(gridIn);
+    }
+    else if (DESType == IDDES)
+    {
+        ComputeIDDESLength(gridIn);
+    }
+}
+
+void TurbSolverUnstr::ComputeDESLength(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+    RDouble *wallDistance = grid->GetWallDist();
+
+    RDouble *DESLength = this->GetDESLength();
+    if(!DESLength)
+    {
+        DESLength = new RDouble [numberOfTotalCell];
+    }
+    
+    RDouble *lengthOfLES = new RDouble [numberOfTotalCell];
+    RDouble *lowReynoldsNumberCorrection = new RDouble [numberOfTotalCell];
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int DESType = parameters->GetDESType();
+    ComputeLESLengthofSA(gridIn, lengthOfLES, lowReynoldsNumberCorrection, DESType);
+
+    RDouble lengthRANS, lengthLES;
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell) 
+    {
+        lengthRANS = wallDistance[iCell];
+        lengthLES  = lengthOfLES[iCell];
+
+        DESLength[iCell] = MIN(lengthRANS, lengthLES);
+    }
+
+    this->SetDESLength(DESLength);
+    
+    delete []lengthOfLES;
+    delete []lowReynoldsNumberCorrection;
+}
+
+void TurbSolverUnstr::ComputeDDESLength(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+    RDouble *wallDist = grid->GetWallDist();
+
+    RDouble *DDESLength = this->GetDESLength();
+    if(!DDESLength)
+    {
+        DDESLength = new RDouble [numberOfTotalCell];
+    }
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int DESType = parameters->GetDESType();
+
+    RDouble *lengthOfLES = new RDouble [numberOfTotalCell];
+    RDouble *lowReynoldsNumberCorrection = new RDouble [numberOfTotalCell];
+    ComputeLESLengthofSA(gridIn, lengthOfLES, lowReynoldsNumberCorrection, DESType);
+
+    RDouble **q     = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *viscousLaminar  = reinterpret_cast<RDouble * > (grid->GetDataPtr("visl"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble * > (grid->GetDataPtr("vist"));
+
+    RDouble **gradientPrimtiveVariableX = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **gradientPrimtiveVariableY = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **gradientPrimtiveVariableZ = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    RDouble *dudx = gradientPrimtiveVariableX[1];
+    RDouble *dudy = gradientPrimtiveVariableY[1];
+    RDouble *dudz = gradientPrimtiveVariableZ[1];
+
+    RDouble *dvdx = gradientPrimtiveVariableX[2];
+    RDouble *dvdy = gradientPrimtiveVariableY[2];
+    RDouble *dvdz = gradientPrimtiveVariableZ[2];
+
+    RDouble *dwdx = gradientPrimtiveVariableX[3];
+    RDouble *dwdy = gradientPrimtiveVariableY[3];
+    RDouble *dwdz = gradientPrimtiveVariableZ[3];
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+    const RDouble karm   = 0.41;
+    const RDouble kap2   = karm * karm;
+
+    using namespace IDX;
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell) 
+    {
+        RDouble laminarViscosity = viscousLaminar[iCell];
+        RDouble turbulentViscosity = viscousTurbulence[iCell];
+        RDouble density = q[IR][iCell];
+
+        RDouble wallDistance  = wallDist[iCell];
+        RDouble wallDistance2 = SQR(wallDistance);
+        RDouble lengthRans    = wallDistance;
+        RDouble lengthLes     = lengthOfLES[iCell];
+
+        RDouble sumOfGradient2 = SQR(dudx[iCell], dudy[iCell], dudz[iCell]) + 
+            SQR(dvdx[iCell], dvdy[iCell], dvdz[iCell]) + 
+            SQR(dwdx[iCell], dwdy[iCell], dwdz[iCell]);
+
+        RDouble nueff = oRefReNumber * (laminarViscosity + turbulentViscosity) / density;
+        RDouble rd    = nueff / (kap2 * wallDistance2 * MAX(sqrt(sumOfGradient2), 1.0e-20));
+        RDouble fd    = 1.0 - tanh(POWER3(8.0 * rd));
+
+        DDESLength[iCell] = lengthRans - fd * MAX(0.0, (lengthRans - lengthLes));
+    }
+
+    this->SetDESLength(DDESLength);
+
+    delete [] lengthOfLES;
+    delete [] lowReynoldsNumberCorrection;
+}
+
+void TurbSolverUnstr::ComputeIDDESLength(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+    RDouble *wallDist = grid->GetWallDist();
+    RDouble *largestLocalGridLength = grid->GetLargestLocalGridLength();
+
+    RDouble *IDDESLength = this->GetDESLength();
+    if(!IDDESLength)
+    {
+        IDDESLength = new RDouble [numberOfTotalCell];
+    }
+
+    RDouble *lengthOfLES = new RDouble [numberOfTotalCell];
+    RDouble *lowReynoldsNumberCorrection = new RDouble [numberOfTotalCell];
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int DESType = parameters->GetDESType();
+    ComputeLESLengthofSA(gridIn, lengthOfLES, lowReynoldsNumberCorrection, DESType);
+
+    RDouble **q     = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble *viscousLaminar  = reinterpret_cast<RDouble * > (grid->GetDataPtr("visl"));
+    RDouble *viscousTurbulence = reinterpret_cast<RDouble * > (grid->GetDataPtr("vist"));
+
+    RDouble **gradientPrimtiveVariableX = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarX"));
+    RDouble **gradientPrimtiveVariableY = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarY"));
+    RDouble **gradientPrimtiveVariableZ = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradPrimtiveVarZ"));
+
+    RDouble *dudx = gradientPrimtiveVariableX[1];
+    RDouble *dudy = gradientPrimtiveVariableY[1];
+    RDouble *dudz = gradientPrimtiveVariableZ[1];
+
+    RDouble *dvdx = gradientPrimtiveVariableX[2];
+    RDouble *dvdy = gradientPrimtiveVariableY[2];
+    RDouble *dvdz = gradientPrimtiveVariableZ[2];
+
+    RDouble *dwdx = gradientPrimtiveVariableX[3];
+    RDouble *dwdy = gradientPrimtiveVariableY[3];
+    RDouble *dwdz = gradientPrimtiveVariableZ[3];
+
+    RDouble oRefReNumber = parameters->GetoRefReNumber();
+    const RDouble karm = 0.41;
+    const RDouble kap2 = karm * karm;
+
+    using namespace IDX;
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell) 
+    {
+        RDouble laminarViscosity        = viscousLaminar[iCell];
+        RDouble turbulentViscosity      = viscousTurbulence[iCell];
+        RDouble density                 = q[IR][iCell];
+
+        RDouble wallDistance            = wallDist[iCell];
+        RDouble wallDistance2           = SQR(wallDistance);
+        RDouble lengthRans              = wallDistance;
+        RDouble lengthLes               = lengthOfLES[iCell];
+        RDouble largestLocalGridSpacing = largestLocalGridLength[iCell];
+
+        RDouble alf  = 0.25 - wallDistance / largestLocalGridSpacing;
+        RDouble fb   = MIN(2.0 * exp(- 9.0 * alf * alf),  1.0);
+
+        RDouble sumOfGradient2 = SQR(dudx[iCell], dudy[iCell], dudz[iCell]) + 
+                                SQR(dvdx[iCell], dvdy[iCell], dvdz[iCell]) + 
+                                SQR(dwdx[iCell], dwdy[iCell], dwdz[iCell]);
+
+        RDouble nuet = oRefReNumber * turbulentViscosity / density;
+        RDouble rdt  = nuet / (kap2 * wallDistance2 * MAX(sqrt(sumOfGradient2), 1.0e-10));
+
+        RDouble fdt  = 1.0 - tanh(POWER3(8.0 * rdt));
+        RDouble fdb  = MAX((1.0 - fdt), fb);
+
+        RDouble ct   = 1.63;
+        RDouble cL   = 3.55;
+        RDouble nuel = oRefReNumber * laminarViscosity / density;
+        RDouble rdl  = nuel / (kap2 * wallDistance2 * MAX(sqrt(sumOfGradient2), 1.0e-10));
+
+        RDouble fl   = tanh(pow(cL * cL * rdl, 10.0));
+        RDouble ft   = tanh(POWER3(ct * ct * rdt));
+
+        RDouble fe2  = 1.0 - MAX(ft, fl);
+
+        RDouble fe1 = 0.0;
+        if (alf < 0.0)
+        {
+            fe1 = 2.0 * exp(- 9.0 * alf * alf);
+        }
+        else
+        {
+            fe1 = 2.0 * exp(- 11.09 * alf * alf);
+        }
+
+        RDouble fe = fe2 * MAX((fe1 - 1.0), 0.0) * lowReynoldsNumberCorrection[iCell];
+
+        IDDESLength[iCell]  =  fdb * (1.0 + fe) * lengthRans  +  (1.0 - fdb) * lengthLes;
+    }
+
+    this->SetDESLength(IDDESLength);
+
+    delete []lengthOfLES;
+    delete []lowReynoldsNumberCorrection;
+}
+
+RDouble * TurbSolverUnstr::GetLengthScale(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int DESType = parameters->GetDESType();
+
+    if (DESType != 0)
+    {
+        return this->GetDESLength();
+    }
+    else
+    {
+        return grid->GetWallDist();
+    }
+}
+
+void TurbSolverUnstr::ReadStatisticalFlow(ActionKey *actkey)
+{
+    int level = actkey->level;
+    UnstructGrid *grid = UnstructGridCast(GetGrid(level));
+
+    int numberOfBoundaryFace = grid->GetNBoundFace();
+    int numberOfTotalCell = grid->GetNTotalCell();
+    int numberOfTotal = numberOfTotalCell + numberOfBoundaryFace;
+
+    RDouble **qAverageTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("qAverageTurb"));
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    DataContainer *cdata = actkey->GetData();
+    cdata->moveto_begin();
+
+    int numberOfStatisticalStep = 0;
+    cdata->read(&numberOfStatisticalStep, sizeof(int));
+
+    GlobalDataBase::UpdateData("nStatisticalStep", &numberOfStatisticalStep, PHINT, 1);
+
+    for (int m = 0; m < nTurbulenceEquation; ++ m)
+    {
+        for (int iCell = 0; iCell < numberOfTotal; ++ iCell)
+        {
+            cdata->read(&qAverageTurbulence[m][iCell], sizeof(RDouble));
+        }
+    }
+}
+
+void ComputeLESLengthofSA(Grid *gridIn, RDouble *lengthOfLES, RDouble *lowReynoldsNumberCorrection, int DESType)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    //! Compute LES length.
+    RDouble CoeffOfDES = 0.65;
+
+    ComputeLowReynoldsNumberCorrection(gridIn, lowReynoldsNumberCorrection);
+
+    if (DESType == IDDES)
+    {
+        RDouble *subgridLength = grid->GetSubgridLength();
+
+        for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell) 
+        {
+            lengthOfLES[iCell] = CoeffOfDES * lowReynoldsNumberCorrection[iCell] * subgridLength[iCell];
+        }
+    }
+    else
+    {
+        RDouble *largestLocalGridLength = grid->GetLargestLocalGridLength();
+
+        for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell) 
+        {
+            lengthOfLES[iCell] = CoeffOfDES * lowReynoldsNumberCorrection[iCell] * largestLocalGridLength[iCell];
+        }
+    }
+}
+
+void ComputeLowReynoldsNumberCorrection(Grid *gridIn, RDouble *lowReynoldsNumberCorrection)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    int numberOfTotalCell = grid->GetNTotalCell();
+
+    //! Compute low Reynolds number correction.
+    RDouble **q      = reinterpret_cast<RDouble **> (grid->GetDataPtr("q"));
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (grid->GetDataPtr("q_turb"));
+    RDouble *viscousLaminar   = reinterpret_cast<RDouble * > (grid->GetDataPtr("visl"));
+
+    const RDouble karm   = 0.41;
+    const RDouble cb1    = 0.1355;
+    const RDouble cb2    = 0.622;
+    const RDouble cv1    = 7.1;
+    const RDouble sigma  = 2.0/3.0;
+    const RDouble cv13   =  cv1 * cv1 * cv1;
+    const RDouble kap2   = karm * karm;
+    const RDouble rkap2  = one / kap2;
+    const RDouble cw1    = cb1 * rkap2 + (one + cb2) / sigma;
+    const RDouble turbulentFwStar          = 0.424;
+
+    using namespace IDX;
+    for (int iCell = 0; iCell < numberOfTotalCell; ++ iCell) 
+    {
+        RDouble nuet = qTurbulence[ISA][iCell];
+        RDouble olam = q[IR][iCell] / (viscousLaminar[iCell] + SMALL);
+        RDouble xsi  = nuet * olam + SMALL;
+        RDouble xsi3 = POWER3(xsi);
+
+        RDouble turbulentFt2 = 0.0; 
+
+        RDouble turbulentFv1 = xsi3 / (xsi3 + cv13);
+        RDouble turbulentFv2 = one - xsi / (one + xsi * turbulentFv1);
+
+        RDouble numerator   =  1.0  -  (cb1 / (cw1 * kap2 * turbulentFwStar)) * (turbulentFt2 + (1.0 - turbulentFt2) * turbulentFv2);
+        RDouble denominator =  turbulentFv1 * MAX(1.0e-10, (1.0 - turbulentFt2));
+
+        lowReynoldsNumberCorrection[iCell] = sqrt(MIN(1.0e2, numerator/denominator));
+    }
+}
+
+void TurbSolverUnstr::ComputeGradient(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    if(grid->IsFinestGrid())
+    {
+        GetGradientField(gridIn);
+    }
+}
+
+void TurbSolverUnstr::InitMixingPlane(RDouble ***MixingPlaneVar, int Dim1, int Dim2, int Dim3, RDouble Value)
+{
+    for (int iDim1 = 0; iDim1 < Dim1; iDim1++)
+    {
+        for (int iDim2 = 0; iDim2 < Dim2; iDim2++)
+        {
+            for (int iDim3 = 0; iDim3 < Dim3; iDim3++)
+            {
+                MixingPlaneVar[iDim1][iDim2][iDim3] = Value;
+            }
+        }
+    }
+}
+
+//! need to input q_average, which means flux averaged primitive variable of mixing plane.
+//! this function should be called in boundary condition part.
+void TurbSolverUnstr::AverageMixingPlane(Grid *grid)
+{
+    UnstructGrid *gridUnstruct   = UnstructGridCast(grid);
+    UnstructBCSet *unstructBCSet = gridUnstruct->GetUnstructBCSet();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble gama1   = refGama - 1;
+
+    RDouble refDensity  = parameters->GetRefDimensionalDensity();
+    RDouble refPressure = parameters->GetRefDimensionalPressure();
+
+    RDouble **q           = reinterpret_cast< RDouble ** > (gridUnstruct->GetDataPtr("q"));
+    RDouble **qTurbulence = reinterpret_cast< RDouble ** > (gridUnstruct->GetDataPtr("q_turb"));
+
+    RDouble **r_ori    = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Face"));
+    RDouble **r_target = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Span"));
+
+    RDouble **SpanArea = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("SpanArea"));
+
+    //! nSpan is the number of spanwise point to do data average
+    //! also interpolate data on these points.
+    int nSpanSection = PHSPACE::GlobalDataBase::GetIntParaFromDB("nSpanSection");
+    RDouble nSpan = (RDouble)(nSpanSection);
+
+    RDouble Area;
+
+    RDouble *nxs, *nys, *nzs, *ns;
+
+    nxs = gridUnstruct->GetFaceNormalX();
+    nys = gridUnstruct->GetFaceNormalY();
+    nzs = gridUnstruct->GetFaceNormalZ();
+    ns  = gridUnstruct->GetFaceArea();
+
+    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+    string MixingPlane[100];
+    GlobalDataBase::GetData("MixingPlane", &MixingPlane, PHSTRING, 2 * nTurboZone - 2);
+
+    //! r_ori should be an array that contains coordinate of each node.
+    //! the range of this array is equal to the face number of this boundary.
+    RDouble r_min, r_max;
+
+    r_min = 1e6;
+    r_max = 0;
+
+    RDouble *xfc = gridUnstruct->GetFaceCenterX();
+    RDouble *yfc = gridUnstruct->GetFaceCenterY();
+    RDouble *zfc = gridUnstruct->GetFaceCenterZ();
+
+    RDouble *gama = reinterpret_cast< RDouble * > (grid->GetDataPtr("gama"));
+
+    int **face2nodeArray = gridUnstruct->GetFace2NodeArray();
+    int * node_number_of_each_face = gridUnstruct->GetNodeNumberOfEachFace();
+
+    int *leftCellofFace  = gridUnstruct->GetLeftCellOfFace();
+    int *rightCellofFace = gridUnstruct->GetRightCellOfFace();
+    int nTotalCell       = gridUnstruct->GetNTotalCell();
+
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    RDouble PeriodicRotationAngle[100];
+    GlobalDataBase::GetData("PeriodicRotationAngle", &PeriodicRotationAngle, PHDOUBLE, nTurboZone);
+
+    using namespace IDX;
+
+    RDouble ***SpanFlux     = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("SpanFlux"));
+    RDouble ***SpanTurbFlux = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("SpanTurbFlux"));
+    int FlowDirection = -1;
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *vgn = gridUnstruct->GetFaceNormalVelocity();
+
+    RDouble *primi = new RDouble[nEquation]();
+    RDouble *primo = new RDouble[nEquation]();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+
+        int bcType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+
+        //! find mixing plane and average data.
+        //! Parallel
+        int iTurboZone = gridUnstruct->GetOrdinaryGridIndex();
+
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = gridUnstruct->GetZoneID();
+        }
+
+        RDouble rotationAngle = PeriodicRotationAngle[iTurboZone] / 180.0 * PI;
+
+        string MixingPlaneIn, MixingPlaneOut;
+        int SourceFlag;
+
+        if (iTurboZone == 0)
+        {
+            MixingPlaneOut = MixingPlane[0];
+        }
+        else if (iTurboZone == nTurboZone)
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+        }
+        else
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+            MixingPlaneOut = MixingPlane[2 * iTurboZone];
+        }
+
+        if (bcName == MixingPlaneIn || bcName == MixingPlaneOut)
+        {
+            if (bcName == MixingPlaneIn)
+            {
+                FlowDirection = 0;
+                SourceFlag = 1 + (iTurboZone - 1) * 10;
+            }
+            if (bcName == MixingPlaneOut)
+            {
+                FlowDirection = 1;
+                SourceFlag = 0 + (iTurboZone + 1) * 10;
+            }
+            int MixingFlag = FlowDirection + iTurboZone * 10;
+
+            //! preprocess of mixing plane.
+            for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+            {
+                //! iFace is the face number in the set of faceIndex.
+                int iFace = *iter;
+
+                int le = leftCellofFace[iFace];
+                int re = rightCellofFace[iFace];
+
+                //! need to compute total area, total flux of this bc region.
+                //! also need to compute flux of each spanwise.
+                //! spanwise can be defined based on mesh or manually.
+                r_ori[MixingFlag][iFace] = sqrt(yfc[iFace] * yfc[iFace] + zfc[iFace] * zfc[iFace]);
+
+                r_min = MIN(r_ori[MixingFlag][iFace], r_min);
+                r_max = MAX(r_ori[MixingFlag][iFace], r_max);
+            }
+
+            //! get target radius.
+            for (int iSpan = 0; iSpan <= nSpanSection; iSpan++)
+            {
+                r_target[MixingFlag][iSpan] = r_min + iSpan * (r_max - r_min) / nSpan;
+            }
+
+            //! compute average flux.
+            for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+            {
+                RDouble Flux[5]     = { 0.0, 0.0, 0.0, 0.0, 0.0 };
+                RDouble TurbFlux[5] = { 0.0, 0.0, 0.0, 0.0, 0.0 };
+                RDouble TotalArea = 0.0;
+
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    //! iFace is the face number in the set of faceIndex.
+                    int iFace = *iter;
+
+                    int le = leftCellofFace[iFace];
+                    int re = rightCellofFace[iFace];
+
+                    Area = ns[iFace];
+
+                    RDouble r_Face = sqrt(yfc[iFace] * yfc[iFace] + zfc[iFace] * zfc[iFace]);
+
+                    RDouble Velocity_ti = (q[IV][le] * zfc[iFace] - q[IW][le] * yfc[iFace]) / r_Face;
+                    RDouble Velocity_ri = (q[IV][le] * yfc[iFace] + q[IW][le] * zfc[iFace]) / r_Face;
+
+                    RDouble Velocity_to = (q[IV][re] * zfc[iFace] - q[IW][re] * yfc[iFace]) / r_Face;
+                    RDouble Velocity_ro = (q[IV][re] * yfc[iFace] + q[IW][re] * zfc[iFace]) / r_Face;
+
+                    RDouble nrs = (nys[iFace] * yfc[iFace] + nzs[iFace] * zfc[iFace]) / r_Face;
+
+                    RDouble vni = q[IU][le] * nxs[iFace] + Velocity_ri * nrs - vgn[iFace];
+                    RDouble vno = q[IU][re] * nxs[iFace] + Velocity_ro * nrs - vgn[iFace];
+                    //! find face center that locate in target span.
+                    //! compute flux at each span.
+                    if (r_Face > r_target[MixingFlag][iSpan] && r_Face <= r_target[MixingFlag][iSpan + 1])
+                    {
+                        TotalArea += Area;
+
+                        for (int m = 0; m < nEquation; m++)
+                        {
+                            TurbFlux[m] += q[IR][le] * vni * qTurbulence[m][le] * ns[iFace];
+                        }
+                    }
+                }
+
+                SpanArea[MixingFlag][iSpan] = TotalArea;
+
+                for (int m = 0; m < nEquation; m++)
+                {
+                    SpanTurbFlux[MixingFlag][m][iSpan] = TurbFlux[m] / SpanArea[MixingFlag][iSpan];
+                }
+            }
+        }
+    }
+}
+
+//! SpanFlux from AverageMixingPlane should be input data.
+//! Here we will obtain averaged primitive variable of each span from SpanFlux.
+//! The averaged primitive variable will be treated as outlet data of upstream and inlet data of downsteam.
+void TurbSolverUnstr::MixingPlaneDataTransfer(Grid *grid, Grid *NeighborGrid)
+{
+    UnstructGrid *gridUnstruct   = UnstructGridCast(grid);
+    UnstructGrid *gridSource     = UnstructGridCast(NeighborGrid);
+    UnstructBCSet *unstructBCSet = gridUnstruct->GetUnstructBCSet();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble gama1   = refGama - 1;
+
+    RDouble refDensity  = parameters->GetRefDimensionalDensity();
+    RDouble refPressure = parameters->GetRefDimensionalPressure();
+
+    RDouble **q           = reinterpret_cast< RDouble ** > (gridUnstruct->GetDataPtr("q"));
+    RDouble **qTurbulence = reinterpret_cast< RDouble **> (gridUnstruct->GetDataPtr("q_turb"));
+
+    RDouble **r_target = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Span"));
+
+    RDouble **SpanArea = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("SpanArea"));
+    //! nSpan is the number of spanwise point to do data average
+    //! also interpolate data on these points.
+    int nSpanSection = PHSPACE::GlobalDataBase::GetIntParaFromDB("nSpanSection");
+
+    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+    string MixingPlane[100];
+    GlobalDataBase::GetData("MixingPlane", &MixingPlane, PHSTRING, 2 * nTurboZone - 2);
+
+    RDouble *xfc = gridUnstruct->GetFaceCenterX();
+    RDouble *yfc = gridUnstruct->GetFaceCenterY();
+    RDouble *zfc = gridUnstruct->GetFaceCenterZ();
+
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    //! qSpanNeighbor: record flow variable in neighbor zone at each span.
+    RDouble ***qTurb_Span    = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("qTurb_Span"));
+    RDouble ***SourceFlux    = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("SpanFlux"));
+    RDouble ***SpanTurbFlux  = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("SpanTurbFlux"));
+
+    RDouble ***qTurbSpanNeighbor = reinterpret_cast< RDouble *** > (gridSource->GetDataPtr("qTurbSpanNeighbor"));
+
+    using namespace IDX;
+
+    int FlowDirection = -1;
+
+    int nEquation = GetNumberOfEquations();
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+
+        int bcType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+
+        //! Parallel
+        int iTurboZone = gridUnstruct->GetOrdinaryGridIndex();
+        int SourceZone = gridSource->GetOrdinaryGridIndex();
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = gridUnstruct->GetZoneID();
+            SourceZone = gridSource->GetZoneID();
+        }
+
+        string MixingPlaneIn, MixingPlaneOut;
+
+        if (iTurboZone == 0)
+        {
+            MixingPlaneOut = MixingPlane[0];
+        }
+        else if (iTurboZone == nTurboZone)
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+        }
+        else
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+            MixingPlaneOut = MixingPlane[2 * iTurboZone];
+        }
+
+        //! TargetMixingFlag is Mixingplane in current zone, which need neighbor zone data.
+        //! SourceMixingFlag is Mixingplane in neighbor zone, which provide the data. 
+        int MixingFlag, TargetFlag;
+        if (bcName == MixingPlaneIn || bcName == MixingPlaneOut)
+        {
+            //! downstream to upstream: transfer data from MixingIn to MixingOut.
+            if (SourceZone == iTurboZone + 1)
+            {
+                if (bcName == MixingPlaneIn) continue;
+                //! upstream MixingIn.
+                TargetFlag = 0 + SourceZone * 10;
+                //! current MixingOut.
+                MixingFlag = 1 + iTurboZone * 10;
+            }
+            //! upstream to downstream: transfer data from MixingOut to MixingIn.
+            else if (SourceZone == iTurboZone - 1)
+            {
+                if (bcName == MixingPlaneOut) continue;
+                TargetFlag = 1 + SourceZone * 10;
+                MixingFlag = 0 + iTurboZone * 10;
+            }
+
+            //! compute flow variables.
+            for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+            {
+                for (int m = 0; m < nEquation; m++)
+                {
+                    qTurb_Span[MixingFlag][m][iSpan] = SpanTurbFlux[MixingFlag][m][iSpan] / SourceFlux[MixingFlag][IR][iSpan];
+                }
+
+                for (int m = 0; m < nEquation; m++)
+                {
+                    qTurbSpanNeighbor[TargetFlag][m][iSpan] = qTurb_Span[MixingFlag][m][iSpan];
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverUnstr::NonReflective(Grid *grid, Grid *NeighborGrid)
+{
+    UnstructGrid *gridUnstruct   = UnstructGridCast(grid);
+    UnstructGrid *gridTarget     = UnstructGridCast(NeighborGrid);
+    UnstructBCSet *unstructBCSet = gridUnstruct->GetUnstructBCSet();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    RDouble refGama = parameters->GetRefGama();
+    RDouble gama1   = refGama - 1;
+
+    RDouble refDensity  = parameters->GetRefDimensionalDensity();
+    RDouble refPressure = parameters->GetRefDimensionalPressure();
+
+    RDouble **q           = reinterpret_cast< RDouble ** > (gridUnstruct->GetDataPtr("q"));
+    RDouble **qTurbulence = reinterpret_cast< RDouble **> (gridUnstruct->GetDataPtr("q_turb"));
+
+    RDouble **r_ori    = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Face"));
+    RDouble **r_target = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Span"));
+
+    RDouble ***qTurb_Span = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("qTurb_Span"));
+
+    RDouble **SpanArea = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("SpanArea"));
+    //! nSpan is the number of spanwise point to do data average
+    //! also interpolate data on these points.
+    int nSpanSection = PHSPACE::GlobalDataBase::GetIntParaFromDB("nSpanSection");
+
+    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+    string MixingPlane[100];
+    GlobalDataBase::GetData("MixingPlane", &MixingPlane, PHSTRING, 2 * nTurboZone - 2);
+
+    RDouble *xcc = gridUnstruct->GetCellCenterX();
+    RDouble *ycc = gridUnstruct->GetCellCenterY();
+    RDouble *zcc = gridUnstruct->GetCellCenterZ();
+
+    RDouble *xfc = gridUnstruct->GetFaceCenterX();
+    RDouble *yfc = gridUnstruct->GetFaceCenterY();
+    RDouble *zfc = gridUnstruct->GetFaceCenterZ();
+
+    RDouble *ns = gridUnstruct->GetFaceArea();
+
+    int *leftCellofFace  = gridUnstruct->GetLeftCellOfFace();
+    int *rightCellofFace = gridUnstruct->GetRightCellOfFace();
+
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    RDouble **nxsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("nxsSpan"));
+    RDouble **ntsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("ntsSpan"));
+    RDouble **nrsSpan = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("nrsSpan"));
+
+    //! qSpanNeighbor: record flow variable in neighbor zone at each span.
+    RDouble ***q_SpanCurrent     = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("q_Span"));
+    RDouble ***q_SpanTarget      = reinterpret_cast< RDouble *** > (gridTarget->GetDataPtr("q_Span"));
+
+    RDouble ***qTurb_SpanCurrent = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("qTurb_Span"));
+    RDouble ***qTurbSpanNeighbor = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("qTurbSpanNeighbor"));
+    RDouble ***SpanTurbFlux      = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("SpanTurbFlux"));
+
+    RDouble ***qTurb_SpanTarget = reinterpret_cast< RDouble *** > (gridTarget->GetDataPtr("qTurb_Span"));
+
+    RDouble ***dqTurbSpanIn = reinterpret_cast <RDouble ***> (gridUnstruct->GetDataPtr("dqTurbSpanIn"));
+    RDouble ***dqTurbSpanEx = reinterpret_cast <RDouble ***> (gridUnstruct->GetDataPtr("dqTurbSpanEx"));
+    RDouble ***dcTurbSpan   = reinterpret_cast <RDouble ***> (gridUnstruct->GetDataPtr("dcTurbSpan"));
+
+    using namespace IDX;
+
+    int FlowDirection = -1;
+
+    int nEquation = GetNumberOfEquations();
+
+    RDouble *ExtraDqTurb = new RDouble[nEquation];
+    RDouble *deltaQTurb  = new RDouble[nEquation];
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion++)
+    {
+        UnstructBC* bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+
+        int bcType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+
+        //! Parallel
+        int iTurboZone = gridUnstruct->GetOrdinaryGridIndex();
+        int TargetZone = gridTarget->GetOrdinaryGridIndex();
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = gridUnstruct->GetZoneID();
+            TargetZone = gridTarget->GetZoneID();
+        }
+
+        string MixingPlaneIn, MixingPlaneOut;
+
+        if (iTurboZone == 0)
+        {
+            MixingPlaneOut = MixingPlane[0];
+        }
+        else if (iTurboZone == nTurboZone)
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+        }
+        else
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+            MixingPlaneOut = MixingPlane[2 * iTurboZone];
+        }
+
+        //! TargetMixingFlag is Mixingplane in current zone, which need neighbor zone data.
+        //! SourceMixingFlag is Mixingplane in neighbor zone, which provide the data. 
+        int MixingFlag, TargetFlag;
+        if (bcName == MixingPlaneIn || bcName == MixingPlaneOut)
+        {
+            //! downstream to upstream: transfer data from MixingIn to MixingOut.
+            if (TargetZone == iTurboZone + 1)
+            {
+                if (bcName == MixingPlaneIn) continue;
+                //! upstream MixingIn.
+                TargetFlag = 0 + TargetZone * 10;
+                //! current MixingOut.
+                MixingFlag = 1 + iTurboZone * 10;
+            }
+            //! upstream to downstream: transfer data from MixingOut to MixingIn.
+            else if (TargetZone == iTurboZone - 1)
+            {
+                if (bcName == MixingPlaneOut) continue;
+                TargetFlag = 1 + TargetZone * 10;
+                MixingFlag = 0 + iTurboZone * 10;
+            }
+            if (bcName == MixingPlaneIn || bcName == MixingPlaneOut)
+            {
+                //! compute variable perturbation
+                for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+                {
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        ExtraDqTurb[m] = 0.0;
+                    }
+
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        dqTurbSpanIn[MixingFlag][m][iSpan] = qTurb_SpanTarget[TargetFlag][m][iSpan] - qTurb_SpanCurrent[MixingFlag][m][iSpan];
+                    }
+
+                    //! extrapolation
+                    vector<int> *faceIndex = bcRegion->GetFaceIndex();
+                    for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                    {
+                        int iFace = *iter;
+
+                        int re = rightCellofFace[iFace];
+                        int le = leftCellofFace[iFace];
+
+                        RDouble r_Face = sqrt(yfc[iFace] * yfc[iFace] + zfc[iFace] * zfc[iFace]);
+
+                        if (r_Face > r_target[MixingFlag][iSpan] && r_Face <= r_target[MixingFlag][iSpan + 1])
+                        {
+                            for (int m = 0; m < nEquation; m++)
+                            {
+                                ExtraDqTurb[m] = (qTurb_Span[MixingFlag][m][iSpan] - qTurbulence[m][le]) * ns[iFace];
+                            }
+                        }
+                    }
+
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        dqTurbSpanEx[MixingFlag][m][iSpan] = ExtraDqTurb[m] / SpanArea[MixingFlag][iSpan];
+                    }
+                }
+                for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+                {
+                    //! after data transfer in NSSlover, IU, IV, IW refers to vx, vtheta, vr.
+                    RDouble vn = nxsSpan[MixingFlag][iSpan] * q_SpanCurrent[MixingFlag][IU][iSpan]
+                        + nrsSpan[MixingFlag][iSpan] * q_SpanCurrent[MixingFlag][IW][iSpan];
+
+                    RDouble avgRho = half * (q_SpanCurrent[MixingFlag][IR][iSpan] + q_SpanTarget[TargetFlag][IR][iSpan]);
+                    RDouble avgP   = half * (q_SpanCurrent[MixingFlag][IP][iSpan] + q_SpanTarget[TargetFlag][IP][iSpan]);
+
+                    RDouble c = sqrt(refGama * (avgP / avgRho));
+
+                    RDouble rhoc = half * (q_SpanCurrent[MixingFlag][IR][iSpan] + q_SpanTarget[TargetFlag][IR][iSpan]) * c;
+
+                    if (vn > 0)
+                    {
+                        for (int m = 0; m < nEquation; m++)
+                        {
+                            dcTurbSpan[MixingFlag][m][iSpan] = rhoc * dqTurbSpanEx[MixingFlag][m][iSpan];
+                        }
+                    }
+                    else
+                    {
+                        for (int m = 0; m < nEquation; m++)
+                        {
+                            dcTurbSpan[MixingFlag][m][iSpan] = rhoc * dqTurbSpanIn[MixingFlag][m][iSpan];
+                        }
+                    }
+
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        deltaQTurb[m] = dcTurbSpan[MixingFlag][m][iSpan] / rhoc;
+                    }
+
+                    for (int m = 0; m < nEquation; m++)
+                    {
+                        qTurbSpanNeighbor[MixingFlag][m][iSpan] += deltaQTurb[m];
+                    }
+                }
+            }
+        }
+    }
+    delete[]ExtraDqTurb;
+    delete[]deltaQTurb;
+}
+
+//! function to set radial profile of mixingin and mixingout.
+//! treat mixingin as a kind of inlet and treat mixing as a kind of outlet.
+void TurbSolverUnstr::SetMixingPlaneData(Grid *grid)
+{
+    UnstructGrid *gridUnstruct   = UnstructGridCast(grid);
+    UnstructBCSet *unstructBCSet = gridUnstruct->GetUnstructBCSet();
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    RDouble refPressure = parameters->GetRefDimensionalPressure();
+    RDouble refGama     = parameters->GetRefGama();
+    RDouble gama1       = refGama - 1.0;
+
+    RDouble **q           = reinterpret_cast< RDouble ** > (gridUnstruct->GetDataPtr("q"));
+    RDouble **qTurbulence = reinterpret_cast<RDouble **> (gridUnstruct->GetDataPtr("q_turb"));
+
+    RDouble **r_ori    = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Face"));
+    RDouble **r_target = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("Radius_Span"));
+
+    //! nSpan is the number of spanwise point to do data average
+    //! also interpolate data on these points.
+    //! nSpan is set to 50 temporary.
+    int nSpanSection = PHSPACE::GlobalDataBase::GetIntParaFromDB("nSpanSection");
+    RDouble nSpan = (RDouble)(nSpanSection);
+
+    RDouble *nxs, *nys, *nzs, *ns;
+
+    nxs = gridUnstruct->GetFaceNormalX();
+    nys = gridUnstruct->GetFaceNormalY();
+    nzs = gridUnstruct->GetFaceNormalZ();
+    ns = gridUnstruct->GetFaceArea();
+
+    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+    string MixingPlane[100];
+    GlobalDataBase::GetData("MixingPlane", &MixingPlane, PHSTRING, 2 * nTurboZone - 2);
+
+    RDouble *xfc = gridUnstruct->GetFaceCenterX();
+    RDouble *yfc = gridUnstruct->GetFaceCenterY();
+    RDouble *zfc = gridUnstruct->GetFaceCenterZ();
+
+    RDouble *xcc = gridUnstruct->GetCellCenterX();
+    RDouble *ycc = gridUnstruct->GetCellCenterY();
+    RDouble *zcc = gridUnstruct->GetCellCenterZ();
+
+    int **face2nodeArray = gridUnstruct->GetFace2NodeArray();
+    int * node_number_of_each_face = gridUnstruct->GetNodeNumberOfEachFace();
+
+    int *leftCellofFace  = gridUnstruct->GetLeftCellOfFace();
+    int *rightCellofFace = gridUnstruct->GetRightCellOfFace();
+    int nTotalCell = gridUnstruct->GetNTotalCell();
+
+    int nBCRegion = unstructBCSet->GetnBCRegion();
+
+    int nEquation = GetNumberOfEquations();
+
+    using namespace IDX;
+
+    RDouble ***qTurb_Span    = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("qTurb_Span"));
+    RDouble ***qSpanNeighbor = reinterpret_cast< RDouble *** > (gridUnstruct->GetDataPtr("qTurbSpanNeighbor"));
+
+    int FlowDirection = -1;
+
+    for (int iBCRegion = 0; iBCRegion < nBCRegion; iBCRegion++)
+    {
+        UnstructBC *bcRegion = unstructBCSet->GetBCRegion(iBCRegion);
+        vector<int> *faceIndex = bcRegion->GetFaceIndex();
+
+        int bcType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+
+        //! Parallel
+        int iTurboZone = gridUnstruct->GetOrdinaryGridIndex();
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = gridUnstruct->GetZoneID();
+        }
+
+        //! use new bcType to define mixing plane.
+        //! if (bcType == -1)
+        string MixingPlaneIn = "";
+        string MixingPlaneOut = "";
+
+        if (iTurboZone == 0)
+        {
+            MixingPlaneOut = MixingPlane[0];
+        }
+        else if (iTurboZone == nTurboZone)
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+        }
+        else
+        {
+            MixingPlaneIn = MixingPlane[2 * iTurboZone - 1];
+            MixingPlaneOut = MixingPlane[2 * iTurboZone];
+        }
+
+        if (bcName == MixingPlaneIn || bcName == MixingPlaneOut)
+        {
+            if (bcName == MixingPlaneIn)
+            {
+                FlowDirection = 0;
+            }
+            if (bcName == MixingPlaneOut)
+            {
+                FlowDirection = 1;
+            }
+            int MixingFlag = FlowDirection + iTurboZone * 10;
+
+            for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+            {
+                for (int m = 0; m < nEquation; m++)
+                {
+                    qTurb_Span[MixingFlag][m][iSpan] = qSpanNeighbor[MixingFlag][m][iSpan];
+                }
+            }
+
+            for (int iSpan = 0; iSpan < nSpanSection; iSpan++)
+            {
+                for (vector<int>::iterator iter = faceIndex->begin(); iter != faceIndex->end(); iter++)
+                {
+                    //! iFace is the face number in the set of faceIndex.
+                    int iFace = *iter;
+
+                    int le = leftCellofFace[iFace];
+                    int re = rightCellofFace[iFace];
+
+                    //! find face center that locate in target span.
+                    //! compute variable at each span.
+                    if (r_ori[MixingFlag][iFace] > r_target[MixingFlag][iSpan] && r_ori[MixingFlag][iFace] <= r_target[MixingFlag][iSpan + 1])
+                    {
+                        for (int m = 0; m < nEquation; m++)
+                        {
+                            qTurbulence[m][re] = qTurb_Span[MixingFlag][m][iSpan];
+                        }
+                    }
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverUnstr::RotateVectorFromInterface(Grid *gridIn, const int &neighborZoneIndex, const int &nEquation)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation)
+    {
+        return;
+    }
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    RDouble **rotTurbgradValueX = reinterpret_cast <RDouble **> (grid->GetDataPtr("rotTurbgradValueX"));
+    RDouble **rotTurbgradValueY = reinterpret_cast <RDouble **> (grid->GetDataPtr("rotTurbgradValueY"));
+    RDouble **rotTurbgradValueZ = reinterpret_cast <RDouble **> (grid->GetDataPtr("rotTurbgradValueZ"));
+
+    int iNeighborZone = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+
+    if (iNeighborZone = -1)
+    {
+        return;
+    }
+
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive = interfaceInformation->GetFaceIndexForRecv(iNeighborZone);
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+    int* interFace2BoundaryFace = interfaceInformation->GetInterFace2BoundaryFace();
+
+    RDouble rotationAngle = PHSPACE::GlobalDataBase::GetDoubleParaFromDB("rotationAngle");
+    rotationAngle = rotationAngle * PI / 180.0;
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+
+    if (referenceFrame == ROTATIONAL_FRAME)
+    {
+        int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+        RDouble PeriodicRotationAngle[100];
+        GlobalDataBase::GetData("PeriodicRotationAngle", &PeriodicRotationAngle, PHDOUBLE, nTurboZone);
+
+        //! Parallel
+        int iTurboZone = grid->GetOrdinaryGridIndex();
+        //! Serial
+        if (iTurboZone == -1)
+        {
+            iTurboZone = grid->GetZoneID();
+        }
+        PeriodicRotationAngle[iTurboZone] = PeriodicRotationAngle[iTurboZone] * PI / 180.0;
+        rotationAngle = PeriodicRotationAngle[iTurboZone];
+    }
+
+    if (nEquation > 0)
+    {
+        RDouble **fieldRecvTurbY = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTurbulenceY"));
+        RDouble **fieldRecvTurbZ = reinterpret_cast <RDouble **> (grid->GetDataPtr("gradTurbulenceZ"));
+
+        for (int iGhostLayer = GetNumberOfGhostCellLayers() - 1; iGhostLayer >= 0; --iGhostLayer)
+        {
+            for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++iLocalFace)
+            {
+                int iFace = interfaceIndexContainerForReceive[iLocalFace];
+                int t1;
+                grid->GetTargetIndex(iFace, 1, t1);
+
+                int iBFace = interFace2BoundaryFace[iFace];
+                UnstructBC *bcregion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iBFace]);
+                string bcName = bcregion->GetBCName();
+
+                if (referenceFrame == ROTATIONAL_FRAME)
+                {
+                    int nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+                    string Periodic_Name[100];
+                    GlobalDataBase::GetData("Periodic_Name", &Periodic_Name, PHSTRING, 2 * nTurboZone);
+
+                    //! Parallel
+                    int iTurboZone = grid->GetOrdinaryGridIndex();
+                    //! Serial
+                    if (iTurboZone == -1)
+                    {
+                        iTurboZone = grid->GetZoneID();
+                    }
+
+                    //! need loop over bcregions
+                    if (bcName == Periodic_Name[2 * iTurboZone])
+                    {
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            rotTurbgradValueY[m][t1] = fieldRecvTurbY[m][t1] * cos(2 * PI - rotationAngle) - fieldRecvTurbZ[m][t1] * sin(2 * PI - rotationAngle);
+                            rotTurbgradValueZ[m][t1] = fieldRecvTurbY[m][t1] * sin(2 * PI - rotationAngle) + fieldRecvTurbZ[m][t1] * cos(2 * PI - rotationAngle);
+                        }
+
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            fieldRecvTurbY[m][t1] = rotTurbgradValueY[m][t1];
+                            fieldRecvTurbZ[m][t1] = rotTurbgradValueZ[m][t1];
+                        }
+                    }
+                    else if (bcName == Periodic_Name[2 * iTurboZone + 1])
+                    {
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            rotTurbgradValueY[m][t1] = fieldRecvTurbY[m][t1] * cos(rotationAngle) - fieldRecvTurbZ[m][t1] * sin(rotationAngle);
+                            rotTurbgradValueZ[m][t1] = fieldRecvTurbY[m][t1] * sin(rotationAngle) + fieldRecvTurbZ[m][t1] * cos(rotationAngle);
+                        }
+
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            fieldRecvTurbY[m][t1] = rotTurbgradValueY[m][t1];
+                            fieldRecvTurbZ[m][t1] = rotTurbgradValueZ[m][t1];
+                        }
+                    }
+                }
+                else
+                {
+                    //! need loop over bcregions
+                    if (bcName == "Periodic_up")
+                    {
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            rotTurbgradValueY[m][t1] = fieldRecvTurbY[m][t1] * cos(2 * PI - rotationAngle) - fieldRecvTurbZ[m][t1] * sin(2 * PI - rotationAngle);
+                            rotTurbgradValueZ[m][t1] = fieldRecvTurbY[m][t1] * sin(2 * PI - rotationAngle) + fieldRecvTurbZ[m][t1] * cos(2 * PI - rotationAngle);
+                        }
+
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            fieldRecvTurbY[m][t1] = rotTurbgradValueY[m][t1];
+                            fieldRecvTurbZ[m][t1] = rotTurbgradValueZ[m][t1];
+                        }
+                    }
+                    else if (bcName == "Periodic_down")
+                    {
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            rotTurbgradValueY[m][t1] = fieldRecvTurbY[m][t1] * cos(rotationAngle) - fieldRecvTurbZ[m][t1] * sin(rotationAngle);
+                            rotTurbgradValueZ[m][t1] = fieldRecvTurbY[m][t1] * sin(rotationAngle) + fieldRecvTurbZ[m][t1] * cos(rotationAngle);
+                        }
+
+                        for (int m = 0; m < nEquation; ++m)
+                        {
+                            fieldRecvTurbY[m][t1] = rotTurbgradValueY[m][t1];
+                            fieldRecvTurbZ[m][t1] = rotTurbgradValueZ[m][t1];
+                        }
+                    }
+                }
+            }
+        }
+    }
+}
+
+void TurbSolverUnstr::GetGradientField(Grid *gridIn)
+{
+    UnstructGrid *gridUnstruct = UnstructGridCast(gridIn);
+    int numberOfEquations = this->GetNumberOfEquations();
+
+    RDouble **gradientTurbulenceX = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradTurbulenceX"));
+    RDouble **gradientTurbulenceY = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradTurbulenceY"));
+    RDouble **gradientTurbulenceZ = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("gradTurbulenceZ"));
+    RDouble **qTurbulenceNode = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("qTurbNode"));
+    RDouble **qTurbulence = reinterpret_cast <RDouble **> (gridUnstruct->GetDataPtr("q_turb"));
+
+    for (int m = 0; m < numberOfEquations; ++ m)
+    {
+        string gradientName = GlobalDataBase::GetStrParaFromDB("gradientName");
+        if (gradientName == "ggnode" || gradientName == "ggnodelaplacian")
+        {
+            gridUnstruct->CompGradientGGNode_NEW(qTurbulence[m], qTurbulenceNode[m], gradientTurbulenceX[m], gradientTurbulenceY[m], gradientTurbulenceZ[m]);
+        }
+        else if (gradientName == "ggcell")
+        {
+            gridUnstruct->CompGradientGGCell(qTurbulence[m], gradientTurbulenceX[m], gradientTurbulenceY[m], gradientTurbulenceZ[m]);
+        }
+        else if (gradientName == "lsq")
+        {
+            gridUnstruct->CompGradientLSQ(qTurbulence[m], gradientTurbulenceX[m], gradientTurbulenceY[m], gradientTurbulenceZ[m]);
+        }    
+        else if (gradientName == "ggnode_weight")
+        {
+            gridUnstruct->CompGradientGGNodeWeight(qTurbulence[m], gradientTurbulenceX[m], gradientTurbulenceY[m], gradientTurbulenceZ[m]);
+        }
+        else if (gradientName == "gg_m2")
+        {
+            gridUnstruct->CompGradientGGModified2(qTurbulence[m], gradientTurbulenceX[m], gradientTurbulenceY[m], gradientTurbulenceZ[m]);
+        }
+        else if (gradientName == "ggcellnew")
+        {
+            gridUnstruct->CompGradientGGCellNew(qTurbulence[m], gradientTurbulenceX[m], gradientTurbulenceY[m], gradientTurbulenceZ[m]);
+        }
+        else if (gradientName == "ggcellw")
+        {
+            gridUnstruct->CompGradientGGCellW(qTurbulence[m], gradientTurbulenceX[m], gradientTurbulenceY[m], gradientTurbulenceZ[m]);
+        }
+        else
+        {
+            TK_Exit::ExceptionExit("No reconstruction method has been choosed ! /n");
+        }
+    }
+}
+#ifdef USE_GMRESSOLVER
+//! GMRES solver -- a linear system solver
+void TurbSolverUnstr::GMRESSolver(Grid *gridIn, FieldProxy *dqProxy)
+{
+    // GMRESCoupled
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    if ( viscousType == ONE_EQU )
+    {
+        return;
+    }
+    
+
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int nTurbulenceEquation = parameters->GetNTurbulenceEquation();
+
+    //! Memory allocating
+    RDouble **dRdq = reinterpret_cast<RDouble**>(grid->GetDataPtr("dRdq_turb"));
+        
+    int nTotalCells = grid->GetNTotalCell();
+    int nBoundFace = grid->GetNBoundFace();
+        
+    RDouble **res = reinterpret_cast<RDouble **>(grid->GetDataPtr("res_turb"));
+    RDouble* vol = grid->GetCellVolume();
+    RDouble* dt = reinterpret_cast<RDouble*> (grid->GetDataPtr("dt"));
+    vector<int> AI = grid->GetJacobianAI4GMRES();  // GMRESSparse GMRESCSR
+    vector<int> AJ = grid->GetJacobianAJ4GMRES();  // GMRESSparse GMRESCSR
+
+    // adding diagoal for turbulence equations
+    // GMRESCSR
+    for (int icell = 0; icell < nTotalCells; icell++)
+    {
+        vector<int>::iterator result = find(AJ.begin() + AI[icell], AJ.begin() + AI[icell + 1], icell); // find qcell
+        int index = distance(AJ.begin(), result);
+        index *= nTurbulenceEquation;
+        for (int iequ = 0; iequ < nTurbulenceEquation; iequ++)
+        {
+             dRdq[iequ][index + iequ] += 1.0 / dt[icell];
+        }
+    }
+
+    // entry to PETSc for turbulence equations
+
+    Vec x, b;
+    Mat A;
+    KSP ksp;                        // define solver
+    PC pc;                          // define matrix
+    PetscInt nTotalSize;            // dimension size of matrix and vector
+    PetscInt nLevels = 3;           // define number of levels used by preconditioner ILU
+    PetscInt MaxStepsRestart = 500;  // define maximum steps required by [restart]
+    PetscInt MaxSteps = 500;        // define maximum steps
+    PetscReal rTolerance = 1.e-1;   // define tolerance of relative error // -1
+    PetscReal dropTolerance = 1.e5; // define tolerance of drop error
+
+    nTotalSize = nTurbulenceEquation * nTotalCells;
+
+    // initialize PETSc
+    PetscInitialize(PETSC_NULL, PETSC_NULL, PETSC_NULL, PETSC_NULL);
+
+    // create vectors;
+    VecCreate(PETSC_COMM_SELF, &x);
+    PetscObjectSetName((PetscObject)x, "solution");
+    VecSetSizes(x, PETSC_DECIDE, nTotalSize);
+    VecSetUp(x);
+    VecDuplicate(x, &b);
+
+    // create matrix
+    // GMRESCSR
+    PetscInt nnz[nTotalCells];
+    for (int icell = 0; icell < nTotalCells; icell++)
+    {
+        int count = 0;
+        for (int j = AI[icell]; j < AI[icell + 1]; j++)
+        {
+            if(AJ[j] < nTotalCells)
+            {
+                count++;
+            }
+        }
+        nnz[icell] = count;
+    }
+    MatCreate(PETSC_COMM_SELF, &A);
+    MatSetSizes(A, PETSC_DECIDE, PETSC_DECIDE, nTotalSize, nTotalSize);
+    MatSetType(A, MATBAIJ);
+    MatSetBlockSize(A, nTurbulenceEquation);
+    MatSeqBAIJSetPreallocation(A, nTurbulenceEquation, PETSC_DEFAULT, nnz);
+    MatSetUp(A);
+
+    // assemble matrix
+    // improved approach to assemble matrix CSR
+    double beforematrix = clock();
+    PetscInt petsccol[nTurbulenceEquation];
+    PetscInt petscrow;
+    int jmax = AI[nTotalCells];
+    int rcell = 0;
+    int j = AI[rcell];
+    do
+    {
+        int rowidx = rcell * nTurbulenceEquation;
+        for (j = AI[rcell]; j < AI[rcell + 1]; j++)
+        {
+            int qcell = AJ[j]; // get qcell (colume index of matrix)
+            // start to insert values: limited to dimension of nTotalSize
+            if(qcell < nTotalCells)
+            {
+                int colidx = qcell * nTurbulenceEquation;
+
+                for (int irow = 0; irow < nTurbulenceEquation; irow++)
+                {
+                    petscrow = rowidx + irow;
+                    for (int n = 0; n < nTurbulenceEquation; n++)
+                    {
+                        petsccol[n] = colidx + n;
+                    }
+                    MatSetValues(A, 1, &petscrow, nTurbulenceEquation, petsccol, &dRdq[irow][j * nTurbulenceEquation], INSERT_VALUES);
+                }
+            }
+        }
+        rcell++; // update rcell, go to the next row index of matrix
+    } while (j < jmax);
+    MatAssemblyBegin(A, MAT_FINAL_ASSEMBLY);
+    MatAssemblyEnd(A, MAT_FINAL_ASSEMBLY);
+   
+    // assemble vector
+    VecSet(b, zero);
+    for (PetscInt icell = 0; icell < nTotalCells; icell++)
+    {
+        for (PetscInt iequ = 0; iequ < nTurbulenceEquation; iequ++)
+        {
+            PetscInt isize = icell * nTurbulenceEquation + iequ;
+            VecSetValues(b, 1, &isize, &res[iequ][icell], ADD_VALUES);
+        }
+    }
+    VecAssemblyBegin(b);
+    VecAssemblyEnd(b);
+  
+    // define solver
+    KSPCreate(PETSC_COMM_SELF, &ksp);
+    KSPSetType(ksp, KSPGMRES);
+    KSPSetPCSide(ksp, PC_RIGHT);
+    KSPSetOperators(ksp, A, A);
+    KSPGetPC(ksp, &pc);
+    PCSetType(pc, PCILU);
+    PCFactorSetLevels(pc, nLevels);
+    KSPGMRESSetRestart(ksp, MaxStepsRestart);
+    KSPGMRESSetOrthogonalization(ksp, KSPGMRESModifiedGramSchmidtOrthogonalization);
+    KSPSetTolerances(ksp, rTolerance, 1.e-20, dropTolerance, MaxSteps);
+
+    // solution
+    KSPSolve(ksp, b, x);
+
+    //! GMRESResidual
+    RDouble **dq = dqProxy->GetField_UNS();
+
+    // convert x to dqProxy
+    for (PetscInt icell = 0; icell < nTotalCells; icell++)
+    {
+        for (PetscInt iequ = 0; iequ < nTurbulenceEquation; iequ++)
+        {
+            PetscInt isize = icell * nTurbulenceEquation + iequ;
+            VecGetValues(x, 1, &isize, &dq[iequ][icell]);
+        }
+    }
+
+    // free work space
+    VecDestroy(&x);
+    VecDestroy(&b);
+    MatDestroy(&A);
+    KSPDestroy(&ksp);
+    PetscFinalize();
+    return;
+}
+#endif
+LIB_EXPORT void TurbSolverUnstr::InitControlParameters()
+{
+    FreeControlParameters();
+    controlParameters = new Param_TurbSolverUnstruct();
+    controlParameters->Init();
+
+    //! Define turbulent equation formation: Original SA / CFL3D SA / NSMB SA, or SST.
+    Param_TurbSolverUnstruct *parameters = GetControlParameters();
+    int viscoueType = parameters->GetViscousType();
+    if (viscoueType == 3)
+    {
+        Turb_Equation_Formation = FORMATION_SA_NSMB;
+    }
+    else
+    {
+        Turb_Equation_Formation = FORMATION_ORGSA_SST;
+    }
+
+    //! Compute machin zero. reference from cfl3d.
+    machZeroExp = 1;
+    RDouble add, x11;
+    RDouble compare = 1.0;
+    for(int iCount = 0; iCount < 20;++ iCount)
+    {
+        add = 1.0;
+        for(int n = 0; n < iCount + 1; ++ n)
+        {
+            add = add * 0.1;
+        }
+
+        x11 = compare +add;
+        if(x11 == compare)
+        {
+            machZeroExp = iCount + 1;
+            break;
+        }
+    }
+}
+
+LIB_EXPORT Param_TurbSolverUnstruct * TurbSolverUnstr::GetControlParameters()
+{
+    return static_cast<Param_TurbSolverUnstruct *>(controlParameters);
+}
+
+}
diff --git a/CHANGELOG.md b/CHANGELOG.md
new file mode 100644
index 0000000..8605ce0
--- /dev/null
+++ b/CHANGELOG.md
@@ -0,0 +1,65 @@
+## PHengLEI2012.v7407
+- 调整风雷软件构建过程；
+- 重构亚声速入口、出口边界条件；
+- 新增平移、旋转周期边界条件；
+- 新增质量流量入口、出口边界条件；
+- 新增HDCS格式；
+- 新增数据点监控功能；
+- 新增流程，支持转化/分区/计算合并操作；
+- 删除个别冗余的文件、函数；
+- 部分文件格式调整；
+- 更新《风雷软件应用与开发指南》等。
+
+## PHengLEI2012.v7628
+- 新增结构网格大涡模拟功能模块；
+- 新增Smagorinsky亚格子模型、动态Smagorinsky亚格子模型、WALE亚格子模型；
+- 修复个别内存泄漏问题；
+- 部分文件格式调整；
+- 更新《风雷软件应用与开发指南》等。
+
+## PHengLEI2171.v7934
+
+- 天河二号GPU并行版本；
+- 无锡太湖之光并行版本；
+- 结构重叠网格装配库；
+- 非结构重叠网格功能；
+- 结构/非结构求解器混合计算；
+- LES湍流模拟；
+- 流场点、线、面监控。
+
+## PHengLEI2112.v9198
+
+- 高阶有限差分方法LES求解器功能扩展；
+- 转捩模型；
+- 非定常动网格；
+- 非结构网格变形；
+- 自定义边界条件；
+- 更新《风雷软件应用与开发指南》等。
+
+## PHengLEI2206.v10111
+
+- 不可压Simple求解器；
+- 非定常动态重叠装配及计算；
+- WENN高精度算法；
+- 百亿网格并行生成；
+- Matrix-SSOR加速算法；
+- 结构熵修正算法；
+- 非结构多组分模拟；
+- 更新《风雷软件应用与开发指南》等。
+
+## PHengLEI2306.v889
+
+- GMRES求解器；
+- SIMPLE重大升级；
+- LBM求解器；
+- Ensight输出接口；
+- 华为昇腾软硬件一体化湍流AI预测；
+- Bug、内存修复；
+- 更新《风雷软件应用与开发指南》等。
+
+## PHengLEI2312.v975
+
+- 风雷可视化（GUI）；
+- 多参考系模型;
+- Bug修复；
+- 更新《风雷软件应用与开发指南》等。
\ No newline at end of file
diff --git a/GUI/3rdparty/README.md b/GUI/3rdparty/README.md
new file mode 100644
index 0000000..485d5be
--- /dev/null
+++ b/GUI/3rdparty/README.md
@@ -0,0 +1,8 @@
+
+# 说明
+&ensp;&ensp;&ensp;&ensp;存放编译时需要的VTK 7.1版本的文件，直接将编译的VTK文件放置此处即可
+
+
+
+
+
diff --git a/GUI/CMakeLists.txt b/GUI/CMakeLists.txt
new file mode 100644
index 0000000..12d2245
--- /dev/null
+++ b/GUI/CMakeLists.txt
@@ -0,0 +1,141 @@
+#! This framework is developed based on QT 5.12 and VTK 7.1
+#! If you cannot compile the project, configure the corresponding library files for the QT and VTK versions
+PROJECT(PHengLEI)
+set(AppName PHengLEI)
+CMAKE_MINIMUM_REQUIRED(VERSION 2.9.0)
+
+# Add qt lib
+if(UNIX)
+    set(path_to_qt5_root /vol8/home/tool/qt5)
+else()
+    set(path_to_qt5_root C:/Qt/Qt5.12.12/5.12.12/msvc2015_64)
+endif()
+
+SET(CMAKE_PREFIX_PATH
+    ${path_to_qt5_root}
+	${path_to_qt5_root}/lib/cmake/Qt5Core
+	${path_to_qt5_root}/lib/cmake/Qt5Gui
+	${path_to_qt5_root}/lib/cmake/Qt5Widgets)
+
+SET(CMAKE_INCLUDE_CURRENT_DIR ON)
+SET(CMAKE_AUTOMOC ON)
+SET(CMAKE_AUTOUIC ON)
+SET(CMAKE_AUTORCC ON)
+set(AUTOGEN_BUILD_DIR ${CMAKE_CURRENT_SOURCE_DIR}/temp)
+
+# Set the compiler parameters
+if(MSVC)
+   set(CMAKE_CXX_FLAGS "/utf-8 ${CMAKE_CXX_FLAGS}")
+endif()
+
+# Add an output path
+set(CMAKE_RUNTIME_OUTPUT_DIRECTORY ${CMAKE_SOURCE_DIR}/bin)
+
+# Add the path of the vtk in release mode
+set(VTKPath ${PROJECT_SOURCE_DIR}/3rdparty/VTK/x64)
+if("${CMAKE_BUILD_TYPE}" STREQUAL "Debug")
+    set(VTKPath ${PROJECT_SOURCE_DIR}/3rdparty/VTK/x64)
+endif()
+message("vtk path ${VTKPath}")
+IF(NOT VTK_BINARY_DIR)
+    if(CMAKE_SIZEOF_VOID_P EQUAL 8)
+        MESSAGE( " ^^^^^^^^^^ x64")
+        FIND_PACKAGE(VTK  REQUIRED
+                   NO_MODULE
+                   PATHS ${VTKPath}
+                   NO_DEFAULT_PATH
+        )
+    else()
+        MESSAGE( " ********** x86")
+        FIND_PACKAGE(VTK  REQUIRED
+                    NO_MODULE
+                    PATHS ${VTKPath}
+                    NO_DEFAULT_PATH
+        )
+    endif()
+IF(NOT VTK_DIR)
+    MESSAGE(FATAL_ERROR "Please set VTK_DIR.")
+ENDIF(NOT VTK_DIR)
+    INCLUDE(${VTK_USE_FILE})
+ENDIF(NOT VTK_BINARY_DIR)
+
+# use what QVTK built with
+SET(QT_MOC_EXECUTABLE ${VTK_QT_MOC_EXECUTABLE} CACHE FILEPATH "")
+SET(QT_UIC_EXECUTABLE ${VTK_QT_UIC_EXECUTABLE} CACHE FILEPATH "")
+SET(QT_QMAKE_EXECUTABLE ${VTK_QT_QMAKE_EXECUTABLE} CACHE FILEPATH "")
+
+find_package(Qt5 COMPONENTS
+                    Widgets
+                    Core
+                    Gui
+                 REQUIRED)
+if(WIN32)
+    find_package(Qt5 COMPONENTS WinExtras REQUIRED)
+endif()
+
+LINK_DIRECTORIES(3rdparty)
+add_definitions(-D VS)
+
+# Add all the source files
+SET(MainWindow_CPP_PATH ./MainWindow/src)
+SET(MainWindow_SOURCES 
+	${MainWindow_CPP_PATH}/GuiPHengLEI.cpp	
+	${MainWindow_CPP_PATH}/main.cpp
+	${MainWindow_CPP_PATH}/DefaultWidget.cpp
+	${MainWindow_CPP_PATH}/TextView.cpp
+)
+source_group(src FILES ${MainWindow_SOURCES})
+include_directories(${MainWindow_CPP_PATH})
+
+# Add all the header files
+SET(MainWindow_H_PATH ./MainWindow/include)
+SET(MainWindow_HEADERS
+	${MainWindow_H_PATH}/GuiPHengLEI.h
+	${MainWindow_H_PATH}/DefaultWidget.h
+	${MainWindow_H_PATH}/TextView.h
+)
+source_group(include FILES ${MainWindow_HEADERS})
+include_directories(${MainWindow_H_PATH})
+# Add the .ui files
+SET(PHengLEI_FORMS 
+	MainWindow/src/GuiPHengLEI.ui
+)
+# Add a resource file 
+SET(PHengLEI_RESOURCES 
+  ./Resources/images/images.qrc
+  ./Resources/images/png.qrc
+)
+SET(EXE_ICON
+  ./Resources/logo.rc
+)
+
+# The rest should just work 
+QT5_WRAP_UI(UISrcs ${PHengLEI_FORMS})
+qt5_add_resources(ResourceSrcs ${PHengLEI_RESOURCES})
+
+SOURCE_GROUP("Resources" FILES
+  ${PHengLEI_RESOURCES}
+  ${EXE_ICON}
+)
+
+ADD_DEFINITIONS(-DQT_GUI_LIBS -DQT_CORE_LIB -DQT3_SUPPORT)
+
+ADD_EXECUTABLE( ${AppName}
+    ${PHengLEI_FORMS}
+    ${MainWindow_SOURCES}
+    ${MainWindow_HEADERS}
+    ${ResourceSrcs}
+    ${BigResourceSrcs}
+    ${EXE_ICON}
+    ${UI_FILES}
+)
+
+set(LinkList
+    Qt5::Core
+    Qt5::Gui
+    Qt5::Widgets
+    ${VTK_LIBRARIES}
+    )
+TARGET_LINK_LIBRARIES(${AppName}
+    ${LinkList}
+ )
diff --git a/GUI/MainWindow/include/DefaultWidget.h b/GUI/MainWindow/include/DefaultWidget.h
new file mode 100644
index 0000000..6d6b8d5
--- /dev/null
+++ b/GUI/MainWindow/include/DefaultWidget.h
@@ -0,0 +1,73 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      DefauleWidget.h.
+//! @brief     DefauleWidget for load the view
+//! @author    Hleo.
+#ifndef DEFAULTWIDGET_H
+#define DEFAULTWIDGET_H
+
+#include <string>
+#include <QWidget>
+#include "QVTKWidget.h"
+#include "vtkActor.h"
+#include "vtkAxes.h"
+#include "vtkContourFilter.h"
+#include "vtkDataSet.h"
+#include "vtkFloatArray.h"
+#include "vtkGaussianSplatter.h"
+#include "vtkImageData.h"
+#include "vtkPointData.h"
+#include "vtkPoints.h"
+#include "vtkPolyDataMapper.h"
+#include "vtkProperty.h"
+#include "vtkRenderWindow.h"
+#include "vtkRenderWindowInteractor.h"
+#include "vtkRenderer.h"
+#include "vtkTubeFilter.h"
+#include "vtkUnstructuredGrid.h"
+#include "vtkSmartPointer.h"
+#include "vtkVectorText.h"
+#include "vtkElevationFilter.h"
+#include "vtkTexture.h"
+#include "vtkAxesActor.h"
+#include "vtkTecplotReader.h"
+#include "vtkExtractBlock.h"
+#include "vtkCompositeDataGeometryFilter.h"
+#include "vtkLookupTable.h"
+#include "vtkScalarBarActor.h"
+#include "vtkMultiBlockDataSet.h"
+#include "vtkPointData.h"
+using namespace std;
+class vtkDataSet;
+class vtkRenderer;
+class vtkActor;
+class vtkScalarBarActor;
+class   DefaultWidget : public QVTKWidget
+{
+	Q_OBJECT
+		typedef QVTKWidget Superclass;
+public:
+	DefaultWidget(QWidget* parent = NULL);
+	virtual ~DefaultWidget();
+
+	//! use vtk to load  flow field view
+	void loadTecplotFile(QString fileName);
+
+protected:
+	vtkRenderer*    renderer;
+	vtkMultiBlockDataSet* multiBlockDataSet;
+	vtkSmartPointer<vtkActor> tecplotActor;
+	vtkSmartPointer<vtkScalarBarActor> scalarBarActor;
+	vtkSmartPointer<vtkAxesActor> axesActor;
+	vtkSmartPointer<vtkActor> actor;
+};
+#endif
diff --git a/GUI/MainWindow/include/GuiPHengLEI.h b/GUI/MainWindow/include/GuiPHengLEI.h
new file mode 100644
index 0000000..c0516ed
--- /dev/null
+++ b/GUI/MainWindow/include/GuiPHengLEI.h
@@ -0,0 +1,95 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      GUIPHengLEI.h.
+//! @brief     GUIPHengLEI widget for load software interface
+//! @author    Hleo.
+#ifndef GUIPHENGLEI_H
+#define GUIPHENGLEI_H
+
+#include <QMainWindow>
+#include <QPushButton>
+#include "DefaultWidget.h"
+#include "TextView.h"
+QT_BEGIN_NAMESPACE
+class QAction;
+class QActionGroup;
+class QLabel;
+class QMenu;
+QT_END_NAMESPACE
+
+class GuiPHengLEI : public QMainWindow
+{
+	Q_OBJECT
+private:
+	GuiPHengLEI(GuiPHengLEI* q);
+public:
+	GuiPHengLEI();
+
+protected:
+#ifndef QT_NO_CONTEXTMENU
+	void contextMenuEvent(QContextMenuEvent *event) override;
+#endif //! QT_NO_CONTEXTMENU
+	
+	//! slots method
+private slots:
+	void newFile();
+	//! import tecplotFile for load  flow field view
+	void importTecplotFile();
+	
+private:
+	//! create Action
+	void createActions();
+	//! create Menus
+	void createMenus();
+
+	bool containsChinese(const QString &target);
+	//! MenuButton
+	QMenu *fileMenu;
+	QMenu *editMenu;
+	QMenu *formatMenu;
+	QMenu *viewMenu;
+	QMenu *helpMenu;
+	QMenu *importMenu;
+
+	//! Action Button
+	QAction *importTecplotAction;
+	QActionGroup *alignmentGroup;
+	QAction *newAction;
+	QAction *openAction;
+	QAction *saveAction;
+	QAction *saveAsAction;
+	QAction *exitAction;
+	QAction *startAction;
+	QAction *stopAction;
+	QAction *cutAction;
+	QAction *gridAction;
+	QAction *airAction;
+	QAction *flowAction;
+	QAction *settingAction;
+	QAction *leftAlignAction;
+	QAction *rightAlignAction;
+	QAction *justifyAction;
+	QAction *centerAction;
+	QAction *setLineSpacingAction;
+	QAction *workAction;
+	QAction *saveViewAction;
+	QAction *dataAction;
+	QAction *aboutAction;
+	QAction *userAction;
+	QAction *demoAction;
+	QLabel *infoLabel;
+
+	TextView*    textView;
+	QTabWidget*  outputTab;
+	DefaultWidget*     defaultWidget;
+};
+#endif
diff --git a/GUI/MainWindow/include/TextView.h b/GUI/MainWindow/include/TextView.h
new file mode 100644
index 0000000..4f7ccc8
--- /dev/null
+++ b/GUI/MainWindow/include/TextView.h
@@ -0,0 +1,45 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      TextView.h.
+//! @brief     TextView 
+//! @author    Hleo.
+#ifndef TEXTVIEW_H
+#define TEXTVIEW_H
+
+#include <QTextEdit>
+
+class TextView : public QTextEdit
+{
+    Q_OBJECT
+
+public:
+    TextView(QWidget* parent = nullptr);
+
+	void adjustContents(int maxLength);
+	
+	void moveToEnd();
+
+    QString getText()const;
+
+	//Set the maximum number of characters to ensure that too much data is added at one time
+    void setMaximumCharCount(int max);
+
+	//Append characters, if the maximum length is exceeded, only the last 20 percent of the text is displayed
+    void appendText(const QString& text);
+
+protected:
+	
+private:
+    int maxCharCount;
+};
+
+#endif // TEXTVIEW_H
diff --git a/GUI/MainWindow/src/DefaultWidget.cpp b/GUI/MainWindow/src/DefaultWidget.cpp
new file mode 100644
index 0000000..f57737d
--- /dev/null
+++ b/GUI/MainWindow/src/DefaultWidget.cpp
@@ -0,0 +1,175 @@
+#include "DefaultWidget.h"
+#include <QtGui>
+#include <QtWidgets>
+#include <QMessageBox>
+#include <QString>
+#include "vtkActor.h"
+#include "vtkAxes.h"
+#include "vtkContourFilter.h"
+#include "vtkDataSet.h"
+#include "vtkFloatArray.h"
+#include "vtkGaussianSplatter.h"
+#include "vtkImageData.h"
+#include "vtkPointData.h"
+#include "vtkPoints.h"
+#include "vtkPolyDataMapper.h"
+#include "vtkProperty.h"
+#include "vtkRenderWindow.h"
+#include "vtkRenderWindowInteractor.h"
+#include "vtkRenderer.h"
+#include "vtkTubeFilter.h"
+#include "vtkUnstructuredGrid.h"
+#include "vtkSmartPointer.h"
+#include "vtkVectorText.h"
+#include "vtkElevationFilter.h"
+#include "vtkTexture.h"
+#include "vtkAxesActor.h"
+#include "vtkTextActor.h"
+#include "vtkCaptionActor2D.h"
+#include "vtkTextProperty.h"
+#include "vtkProperty2D.h"
+
+#ifdef WIN32
+#if defined(VS) && (_MSC_VER >= 1600)
+#pragma execution_character_set("utf-8")
+#endif
+#endif
+
+#define VTK_CREATE(type, name) \
+  vtkSmartPointer<type> name = vtkSmartPointer<type>::New()
+
+//! load init View Widget 
+DefaultWidget::DefaultWidget(QWidget* parent)
+	:QVTKWidget(parent)
+{
+	renderer = vtkRenderer::New();
+
+	VTK_CREATE(vtkVectorText, text);
+	text->SetText("风雷软件PHengLEI");
+	
+	VTK_CREATE(vtkPolyDataMapper, mapper);
+	mapper->SetInputConnection(text->GetOutputPort());
+
+	// Actor in scene
+	actor = vtkSmartPointer<vtkActor>::New();
+	actor->SetMapper(mapper);
+	actor->SetPosition(15, 15, 0);
+	actor->GetProperty()->SetColor(255, 0.0, 0.0);
+	actor->SetScale(4, 4, 4);
+	renderer->AddActor(actor);
+
+	VTK_CREATE(vtkAxes, axes);
+	axes->SetOrigin(-2, -5, 0);
+	axes->SetScaleFactor(3);
+	axes->SymmetricOn();
+
+	axesActor =	vtkSmartPointer<vtkAxesActor>::New();
+	axesActor->SetOrigin(-2, -5, 0);
+	axesActor->SetNormalizedShaftLength(1, 1, 1);
+	axesActor->SetNormalizedTipLength(0.1, 0.1, 0.1);
+	axesActor->SetTotalLength(15, 15, 15);
+	axesActor->SetCylinderRadius(0.01);
+	renderer->AddActor(axesActor);
+
+	vtkCaptionActor2D* xAxisCaptionActor = axesActor->GetXAxisCaptionActor2D();
+	vtkTextProperty* captionTextPropertyX = xAxisCaptionActor->GetCaptionTextProperty();
+	captionTextPropertyX->SetColor(1, 0, 0);
+	xAxisCaptionActor->SetWidth(0.5);
+	xAxisCaptionActor->SetHeight(0.2);
+	xAxisCaptionActor->GetTextActor()->SetTextScaleModeToNone();
+	xAxisCaptionActor->GetCaptionTextProperty()->SetFontSize(20);
+
+	vtkCaptionActor2D* yAxisCaptionActor = axesActor->GetYAxisCaptionActor2D();
+	vtkTextProperty* captionTextPropertyY = yAxisCaptionActor->GetCaptionTextProperty();
+	captionTextPropertyY->SetColor(0, 1, 0);
+	yAxisCaptionActor->SetWidth(0.5);
+	yAxisCaptionActor->SetHeight(0.2);
+	yAxisCaptionActor->GetTextActor()->SetTextScaleModeToNone();
+	yAxisCaptionActor->GetCaptionTextProperty()->SetFontSize(20);
+
+	vtkCaptionActor2D* zAxisCaptionActor = axesActor->GetZAxisCaptionActor2D();
+	vtkTextProperty* captionTextPropertyZ = zAxisCaptionActor->GetCaptionTextProperty();
+	captionTextPropertyZ->SetColor(0, 0, 1);
+	zAxisCaptionActor->SetWidth(0.5);
+	zAxisCaptionActor->SetHeight(0.2);
+	zAxisCaptionActor->GetTextActor()->SetTextScaleModeToNone();
+	zAxisCaptionActor->GetCaptionTextProperty()->SetFontSize(20);
+
+	tecplotActor = vtkSmartPointer<vtkActor>::New();
+	scalarBarActor = vtkSmartPointer<vtkScalarBarActor>::New();
+
+	renderer->SetBackground2(231 / 255.0, 234 / 255.0, 255 / 255.0);
+	renderer->SetBackground(147 / 255.0, 149 / 255.0, 255 / 255.0);
+
+	renderer->GradientBackgroundOn();
+	GetRenderWindow()->AddRenderer(renderer);
+}
+
+DefaultWidget::~DefaultWidget()
+{
+
+}
+
+void DefaultWidget::loadTecplotFile(QString fileName)
+{
+
+	vtkSmartPointer<vtkTecplotReader> tecplotReader = vtkSmartPointer<vtkTecplotReader>::New();
+	tecplotReader->SetFileName(fileName.toLocal8Bit());
+	tecplotReader->Update();
+
+	multiBlockDataSet = tecplotReader->GetOutput();
+	int num = multiBlockDataSet->GetNumberOfPoints();
+	if (num==0)
+	{
+		QMessageBox::warning(this, QString("ERROR"), QString("File Error"));
+	}
+	
+	vtkSmartPointer<vtkCompositeDataGeometryFilter> polyDataExtractFilter = vtkSmartPointer<vtkCompositeDataGeometryFilter>::New();
+	polyDataExtractFilter->SetInputData(multiBlockDataSet);
+	polyDataExtractFilter->Update();
+
+	vtkPolyData* polyData = polyDataExtractFilter->GetOutput();
+	QString value = "mach";
+	polyData->GetPointData()->SetActiveScalars(value.toLocal8Bit());
+	vtkDataArray* pointDataArray = polyData->GetPointData()->GetArray(value.toLocal8Bit().constData());
+	double pointDataRange[2] = { 0 };
+	double MaxValue = -1e30;
+	double MinValue = 1e30;
+	if (pointDataArray != 0)
+	{
+		pointDataArray->GetRange(pointDataRange);
+		MinValue = min(pointDataRange[0], MinValue);
+		MaxValue = max(pointDataRange[1], MaxValue);
+	}
+	if (MinValue > MaxValue)
+		return;
+	vtkSmartPointer<vtkLookupTable> lookupTable = vtkSmartPointer<vtkLookupTable>::New();
+	lookupTable->SetTableRange(pointDataRange);
+	lookupTable->SetHueRange(0.666,0);
+	lookupTable->SetRange(MinValue, MaxValue);
+	lookupTable->ForceBuild();
+
+	vtkSmartPointer<vtkPolyDataMapper> tecplotMapper =
+		vtkSmartPointer<vtkPolyDataMapper>::New();
+	tecplotMapper->SetInputData(polyData);
+	tecplotMapper->SetLookupTable(lookupTable);
+	tecplotMapper->SetScalarRange(MinValue, MaxValue);
+	
+	tecplotActor->SetMapper(tecplotMapper);
+	tecplotActor->GetProperty()->SetRepresentationToSurface();
+	
+	scalarBarActor->SetLookupTable(tecplotMapper->GetLookupTable());
+	scalarBarActor->GetPositionCoordinate()->SetCoordinateSystemToNormalizedViewport();
+	scalarBarActor->GetPositionCoordinate()->SetValue(0.25, 0.01);
+	scalarBarActor->SetOrientationToHorizontal();
+	scalarBarActor->SetWidth(0.5);
+	scalarBarActor->SetHeight(0.1);
+	scalarBarActor->SetTitle(value.toLocal8Bit());
+	renderer->RemoveActor(actor);
+	renderer->RemoveActor(axesActor);
+	renderer->RemoveActor(tecplotActor);
+	renderer->RemoveActor(scalarBarActor);
+	renderer->AddActor(tecplotActor);
+	renderer->AddActor(scalarBarActor);
+	GetRenderWindow()->Render();
+}
diff --git a/GUI/MainWindow/src/GuiPHengLEI.cpp b/GUI/MainWindow/src/GuiPHengLEI.cpp
new file mode 100644
index 0000000..c28b0ab
--- /dev/null
+++ b/GUI/MainWindow/src/GuiPHengLEI.cpp
@@ -0,0 +1,187 @@
+#include "GuiPHengLei.h"
+#include "DefaultWidget.h"
+#include <QMap>
+#include <QList>
+#include <QAction>
+#include <QIcon>
+#include <QLabel>
+#include <QMenu>
+#include <QMenuBar>
+#include <QContextMenuEvent>
+#include <QMessageBox>
+#include <QVBoxLayout>
+#include <QStatusBar>
+#include <QString>
+#include <QSplitter>
+#include <QFileDialog>
+#if defined(VS) && (_MSC_VER >= 1600)
+#pragma execution_character_set("utf-8")
+#endif
+
+GuiPHengLEI::GuiPHengLEI()
+{
+	QWidget *widget = new QWidget;
+	setCentralWidget(widget);
+	QWidget *topFiller = new QWidget;
+	topFiller->setSizePolicy(QSizePolicy::Expanding, QSizePolicy::Expanding);
+	defaultWidget = new DefaultWidget();
+
+	textView = new TextView();
+	textView->append(QString("\n"));
+	textView->append(QString("欢迎使用风雷软件"));
+	textView->setFont(QFont("宋体", 20));
+
+	textView->setAlignment(Qt::AlignCenter);
+	outputTab = new QTabWidget();
+	outputTab->setObjectName("tabwgt_output");
+	outputTab->addTab(textView, QString("解算器输出显示"));
+	outputTab->resize(200, 200);
+
+	QSplitter *splitter = new QSplitter(Qt::Vertical);
+	splitter->addWidget(defaultWidget);
+	splitter->addWidget(outputTab);
+
+	QVBoxLayout *layout = new QVBoxLayout();
+	layout->setMargin(5);
+	layout->addWidget(splitter);
+	widget->setLayout(layout);
+
+	createActions();
+	createMenus();
+
+	QString message = tr("PHengLEI");
+	statusBar()->showMessage(message);
+
+	setWindowTitle(tr("PHengLEI"));
+	resize(480, 320);
+}
+
+
+#ifndef QT_NO_CONTEXTMENU
+void GuiPHengLEI::contextMenuEvent(QContextMenuEvent *event)
+{
+	QMenu menu(this);
+	menu.exec(event->globalPos());
+}
+#endif 
+
+void GuiPHengLEI::newFile()
+{
+	infoLabel->setText(tr("Invoked <b>File|New</b>"));
+}
+
+void GuiPHengLEI::createActions()
+{
+	importTecplotAction = new QAction(QString("导入"), this);
+	connect(importTecplotAction, &QAction::triggered, this, &GuiPHengLEI::importTecplotFile);
+	
+	newAction = new QAction(QString("新建工程"), this);
+	newAction->setStatusTip(QString("新建工程"));
+	//connect(newAct, &QAction::triggered, this, &GUIPHengLEI::newFile);
+
+	openAction = new QAction(QString("打开工程"), this);
+	openAction->setStatusTip(QString("打开工程"));
+
+	saveAction = new QAction(QString("保存工程"), this);
+	saveAction->setStatusTip(QString("保存工程"));
+
+	saveAsAction = new QAction(QString("另存为"), this);
+	saveAsAction->setStatusTip(QString("另存为"));
+
+	exitAction = new QAction(QString("退出"), this);
+	exitAction->setStatusTip(QString("退出"));
+
+	startAction = new QAction(QString("启动"), this);
+	startAction->setStatusTip(QString("启动"));
+
+	stopAction = new QAction(QString("停止"), this);
+	stopAction->setStatusTip(QString("停止"));
+
+	cutAction = new QAction(QString("清空"), this);
+	cutAction->setStatusTip(QString("清空"));
+
+	gridAction = new QAction(QString("网格视图"), this);
+	gridAction->setStatusTip(QString("网格视图"));
+
+	airAction = new QAction(QString("气动力视图"), this);
+	airAction->setStatusTip(QString("气动力视图"));
+
+	flowAction = new QAction(QString("流场视图"), this);
+	flowAction->setStatusTip(QString("流场视图"));
+	
+	settingAction = new QAction(QString("设置"), this);
+	settingAction->setStatusTip(QString("设置"));
+	
+	workAction = new QAction(QString("作业查询"), this);
+	workAction->setStatusTip(QString("作业查询"));
+
+	saveViewAction = new QAction(QString("保存视图"), this);
+	saveViewAction->setStatusTip(QString("保存视图"));
+
+	dataAction = new QAction(QString("数据处理"), this);
+	dataAction->setStatusTip(QString("数据处理"));
+	
+	aboutAction = new QAction(QString("关于"), this);
+	aboutAction->setStatusTip(QString("关于"));
+
+	userAction = new QAction(QString("用户手册"), this);
+	userAction->setStatusTip(QString("用户手册"));
+
+	demoAction = new QAction(QString("算例库"), this);
+	demoAction->setStatusTip(QString("算例库"));
+
+}
+
+void GuiPHengLEI::createMenus()
+{
+	importMenu = menuBar()->addMenu(QString("文件"));
+	importMenu->addAction(importTecplotAction);
+
+	fileMenu = menuBar()->addMenu(QString("工程"));
+	fileMenu->addAction(newAction);
+	fileMenu->addAction(openAction);
+	fileMenu->addAction(saveAction);
+	fileMenu->addAction(saveAsAction);
+	fileMenu->addSeparator();
+	fileMenu->addAction(exitAction);
+
+	editMenu = menuBar()->addMenu(QString("计算"));
+	editMenu->addAction(startAction);
+	editMenu->addAction(stopAction);
+	editMenu->addSeparator();
+	editMenu->addAction(cutAction);
+	editMenu->addSeparator();
+
+	viewMenu = menuBar()->addMenu(QString("视图"));
+	viewMenu->addAction(gridAction);
+	viewMenu->addAction(airAction);
+	viewMenu->addAction(flowAction);
+
+	formatMenu = menuBar()->addMenu(QString("工具"));
+	formatMenu->addAction(settingAction);
+	formatMenu->addAction(workAction);
+	formatMenu->addAction(saveViewAction);
+	formatMenu->addAction(dataAction);
+
+	helpMenu = menuBar()->addMenu(QString("帮助"));
+	helpMenu->addAction(aboutAction);
+	helpMenu->addAction(userAction);
+	helpMenu->addAction(demoAction);
+}
+
+void GuiPHengLEI::importTecplotFile()
+{
+	QString fileName = QFileDialog::getOpenFileName(this, QString("打开流场结果文件"),
+		NULL, QString("流场文件(*.plt)"));
+	if (GuiPHengLEI::containsChinese(fileName))
+	{
+		QMessageBox::warning(this, QString("错误"), QString("工程目录不能含有中文，请重新选择工程目录"));
+		return;
+	}
+	defaultWidget->loadTecplotFile(fileName);
+}
+
+bool GuiPHengLEI::containsChinese(const QString &target)
+{
+	return target.contains(QRegExp("[\\x4e00-\\x9fa5]"));
+}
diff --git a/GUI/MainWindow/src/GuiPHengLEI.ui b/GUI/MainWindow/src/GuiPHengLEI.ui
new file mode 100644
index 0000000..574f8d9
--- /dev/null
+++ b/GUI/MainWindow/src/GuiPHengLEI.ui
@@ -0,0 +1,313 @@
+<?xml version="1.0" encoding="utf-8"?>
+<ui version="4.0">
+  <class>GUIPHengLEIClass</class>
+  <widget class="QMainWindow" name="GUIPHengLEIClass">
+    <property name="geometry">
+      <rect>
+        <x>0</x>
+        <y>0</y>
+        <width>1280</width>
+        <height>900</height>
+      </rect>
+    </property>
+    <property name="windowTitle">
+      <string>GUIPHengLEIClass</string>
+    </property>
+    <property name="styleSheet">
+      <string notr="true"/>
+    </property>
+    <widget class="QWidget" name="centralwidget">
+      <layout class="QVBoxLayout" name="verticalLayout">
+        <property name="leftMargin">
+          <number>0</number>
+        </property>
+        <property name="topMargin">
+          <number>0</number>
+        </property>
+        <property name="rightMargin">
+          <number>0</number>
+        </property>
+        <property name="bottomMargin">
+          <number>0</number>
+        </property>
+        <item>
+          <widget class="QSplitter" name="splitter">
+            <property name="orientation">
+              <enum>Qt::Vertical</enum>
+            </property>
+            <widget class="QStackedWidget" name="vtkMainDrawWidget">
+              <property name="sizePolicy">
+                <sizepolicy hsizetype="Expanding" vsizetype="Expanding">
+                  <horstretch>0</horstretch>
+                  <verstretch>1</verstretch>
+                </sizepolicy>
+              </property>
+              <property name="currentIndex">
+                <number>1</number>
+              </property>
+            </widget>
+            <widget class="QFrame" name="frame_output">
+              <property name="frameShape">
+                <enum>QFrame::StyledPanel</enum>
+              </property>
+              <property name="frameShadow">
+                <enum>QFrame::Raised</enum>
+              </property>
+            </widget>
+          </widget>
+        </item>
+      </layout>
+    </widget>
+    <widget class="QMenuBar" name="menubar">
+      <property name="geometry">
+        <rect>
+          <x>0</x>
+          <y>0</y>
+          <width>1280</width>
+          <height>26</height>
+        </rect>
+      </property>
+    </widget>
+    <widget class="QStatusBar" name="statusbar"/>
+    <widget class="QDockWidget" name="controlDockWidget">
+      <property name="sizePolicy">
+        <sizepolicy hsizetype="Ignored" vsizetype="Preferred">
+          <horstretch>0</horstretch>
+          <verstretch>1</verstretch>
+        </sizepolicy>
+      </property>
+      <property name="minimumSize">
+        <size>
+          <width>300</width>
+          <height>44</height>
+        </size>
+      </property>
+      <property name="features">
+        <set>QDockWidget::DockWidgetClosable</set>
+      </property>
+      <property name="allowedAreas">
+        <set>Qt::LeftDockWidgetArea</set>
+      </property>
+      <property name="windowTitle">
+        <string/>
+      </property>
+      <attribute name="dockWidgetArea">
+        <number>1</number>
+      </attribute>
+      <widget class="QWidget" name="controlWidget">
+        <property name="sizePolicy">
+          <sizepolicy hsizetype="Preferred" vsizetype="Preferred">
+            <horstretch>1</horstretch>
+            <verstretch>1</verstretch>
+          </sizepolicy>
+        </property>
+      </widget>
+    </widget>
+    <widget class="QDockWidget" name="drawDockWidget">
+      <property name="minimumSize">
+        <size>
+          <width>97</width>
+          <height>44</height>
+        </size>
+      </property>
+      <property name="floating">
+        <bool>false</bool>
+      </property>
+      <property name="allowedAreas">
+        <set>Qt::BottomDockWidgetArea|Qt::RightDockWidgetArea</set>
+      </property>
+      <property name="windowTitle">
+        <string>监控控制面板</string>
+      </property>
+      <attribute name="dockWidgetArea">
+        <number>2</number>
+      </attribute>
+      <widget class="QWidget" name="drawDockWidgetContents"/>
+    </widget>
+    <action name="action">
+      <property name="text">
+        <string>导入</string>
+      </property>
+    </action>
+    <action name="action_2">
+      <property name="text">
+        <string>导出</string>
+      </property>
+    </action>
+    <action name="action_5">
+      <property name="text">
+        <string>本地</string>
+      </property>
+    </action>
+    <action name="exitSystem">
+      <property name="text">
+        <string>退出</string>
+      </property>
+    </action>
+    <action name="newProject">
+      <property name="text">
+        <string>新建工程</string>
+      </property>
+    </action>
+    <action name="action_8">
+      <property name="text">
+        <string>打开工程</string>
+      </property>
+    </action>
+    <action name="action_9">
+      <property name="text">
+        <string>保存工程</string>
+      </property>
+    </action>
+    <action name="action_10">
+      <property name="text">
+        <string>传输工程</string>
+      </property>
+    </action>
+    <action name="action_11">
+      <property name="text">
+        <string>获取结果</string>
+      </property>
+    </action>
+    <action name="action_12">
+      <property name="text">
+        <string>参数配置</string>
+      </property>
+    </action>
+    <action name="startSolver">
+      <property name="text">
+        <string>启动</string>
+      </property>
+    </action>
+    <action name="stopSolver">
+      <property name="text">
+        <string>停止</string>
+      </property>
+    </action>
+    <action name="setTimer">
+      <property name="text">
+        <string>设置定时器</string>
+      </property>
+    </action>
+    <action name="action_17">
+      <property name="text">
+        <string>开始监控残差</string>
+      </property>
+    </action>
+    <action name="beginMonitorAirforce">
+      <property name="text">
+        <string>开始监控气动力</string>
+      </property>
+    </action>
+    <action name="action_19">
+      <property name="text">
+        <string>停止监控</string>
+      </property>
+    </action>
+    <action name="stopTimer">
+      <property name="text">
+        <string>停止定时器</string>
+      </property>
+    </action>
+    <action name="controlDockWidgetAction">
+      <property name="text">
+        <string>控制视图</string>
+      </property>
+    </action>
+    <action name="dataTableDockWidgetAction">
+      <property name="text">
+        <string>统计视图</string>
+      </property>
+    </action>
+    <action name="solverOutputDockWidgetAction">
+      <property name="text">
+        <string>监控视图</string>
+      </property>
+    </action>
+    <action name="action_28">
+      <property name="text">
+        <string>三维</string>
+      </property>
+    </action>
+    <action name="action_29">
+      <property name="text">
+        <string>二维</string>
+      </property>
+    </action>
+    <action name="actionXY">
+      <property name="text">
+        <string>XY图</string>
+      </property>
+    </action>
+    <action name="action_30">
+      <property name="text">
+        <string>云图</string>
+      </property>
+    </action>
+    <action name="action_31">
+      <property name="text">
+        <string>使用手册_c+a+o</string>
+      </property>
+      <property name="shortcut">
+        <string>Ctrl+Alt+O</string>
+      </property>
+    </action>
+    <action name="action_32">
+      <property name="text">
+        <string>理论手册</string>
+      </property>
+    </action>
+    <action name="about">
+      <property name="text">
+        <string>关于</string>
+      </property>
+    </action>
+    <action name="openFile">
+      <property name="text">
+        <string>打开</string>
+      </property>
+    </action>
+    <action name="displaySolverOutput">
+      <property name="checkable">
+        <bool>true</bool>
+      </property>
+      <property name="checked">
+        <bool>false</bool>
+      </property>
+      <property name="text">
+        <string>显示解算器输出</string>
+      </property>
+    </action>
+    <action name="action_3">
+      <property name="text">
+        <string>本机信息</string>
+      </property>
+    </action>
+    <action name="beginMonitorRes">
+      <property name="checkable">
+        <bool>true</bool>
+      </property>
+      <property name="text">
+        <string>监控残差</string>
+      </property>
+    </action>
+    <action name="beginMonitorAir">
+      <property name="checkable">
+        <bool>true</bool>
+      </property>
+      <property name="text">
+        <string>监控气动力</string>
+      </property>
+    </action>
+    <action name="beginMonitorSolver">
+      <property name="checkable">
+        <bool>true</bool>
+      </property>
+      <property name="text">
+        <string>控制台输出</string>
+      </property>
+    </action>
+  </widget>
+  <resources/>
+  <connections/>
+</ui>
diff --git a/GUI/MainWindow/src/TextView.cpp b/GUI/MainWindow/src/TextView.cpp
new file mode 100644
index 0000000..73a14d4
--- /dev/null
+++ b/GUI/MainWindow/src/TextView.cpp
@@ -0,0 +1,68 @@
+#include "TextView.h"
+#include <QMenu>
+#include <QAction>
+#include <QContextMenuEvent>
+#include <QScrollBar>
+
+#ifdef WIN32
+#if defined(VS) && (_MSC_VER >= 1600)
+#pragma execution_character_set("utf-8")
+#endif
+#endif
+
+
+TextView::TextView(QWidget* parent)
+    : QTextEdit(parent)
+{
+    setReadOnly(true);
+	maxCharCount = 100000;
+}
+
+void TextView::adjustContents(int maxLength)
+{
+	QString plainText = toPlainText();
+	int _length = plainText.count();
+	if (_length > maxLength)
+    {
+        int position = 0.8*_length;
+		if (position > 0)
+            plainText.remove(0, position);
+        this->setPlainText(plainText);
+		moveToEnd();
+	}
+}
+
+void TextView::moveToEnd()
+{
+    moveCursor(QTextCursor::End);
+    verticalScrollBar()->setValue(verticalScrollBar()->maximum());
+}
+
+QString TextView::getText() const
+{
+    return toPlainText();
+}
+
+void TextView::setMaximumCharCount(int max)
+{
+	maxCharCount = max;
+}
+
+void TextView::appendText(const QString &text)
+{
+    QString temp = toPlainText() + text;
+    int _length = temp.count();
+    if (_length > maxCharCount)
+    {
+        int position = 0.8 * _length;
+        if (position > 0){
+            temp.remove(0, position);
+        }
+        this->setPlainText(temp);
+        moveToEnd();
+    }
+    else{
+        append(text);
+    }
+}
+
diff --git a/GUI/MainWindow/src/main.cpp b/GUI/MainWindow/src/main.cpp
new file mode 100644
index 0000000..bb2bbce
--- /dev/null
+++ b/GUI/MainWindow/src/main.cpp
@@ -0,0 +1,51 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      main.cpp.
+//! @brief     PHengLEI GUI main entrance.
+//! @author    Hleo.
+#include "GuiPHengLEI.h"
+#include <QTextCodec>
+#include <QtWidgets/QApplication>
+#ifdef Q_OS_WIN
+#include <Windows.h>
+#include <MMSystem.h>
+#endif
+#include "vtkOutputWindow.h"
+#include <QMessageBox>
+#include <QTranslator>
+#include <QFileInfo>
+#include <QTextCodec>
+#ifdef Q_OS_WIN
+#pragma comment(linker, "/subsystem:\"windows\" /entry:\"mainCRTStartup\"" )
+#endif
+
+void initApplication()
+{
+	QTextCodec *codec = QTextCodec::codecForName("UTF-8");
+
+	QTextCodec::setCodecForLocale(codec);
+
+	qApp->setOrganizationName("CARDC");
+	qApp->setApplicationName("PHengLEI");
+}
+
+int main(int argc, char *argv[])
+{
+	vtkOutputWindow::SetGlobalWarningDisplay(0);
+	QApplication app(argc, argv);
+	Q_INIT_RESOURCE(images);
+	initApplication();
+
+	GuiPHengLEI window;
+	window.showMaximized();
+	return app.exec();
+}
diff --git a/GUI/README.md b/GUI/README.md
new file mode 100644
index 0000000..b2b51bc
--- /dev/null
+++ b/GUI/README.md
@@ -0,0 +1,49 @@
+
+# 说明
+&ensp;&ensp;&ensp;&ensp;风雷可视化(GUI)是一款基于QT和VTK开发的跨平台数值模拟可视化软件基础框架，本框架可集成求解器、前处理、后处理等模块，实现网格处理、参数设置、流场显示等功能。
+
+## 源码文件夹结构
+- 3rdparty:  编译所需要的三方库
+- MainWindow： 风雷可视化框架源代码
+- Resources： 资源文件
+
+## 编译说明
+
+&ensp;&ensp;&ensp;&ensp;项目采用cmake构建系统组织代码，可以直接使用cmake工具生成visual studio工程（建议使用VS2015），或者可以直接使用支持cmake系统的IDE（比如：vscode等）打开项目文件夹进行构建、编译。
+
+## 运行说明
+&ensp;&ensp;&ensp;&ensp;项目建议采用QT5.12和VTK7.1编译，运行时需要将VTK7.1版本的库文件拷贝至bin目录下（bin文件夹由程序编译后自动生成）。
+
+## 特别说明
+
+&ensp;&ensp;&ensp;&ensp;源码绝对路径中不要出现中文字符、空格以及特殊字符:(){}*/?|\等 要求cmake的最低版本为2.9。
+
+## 开源说明
+&ensp;&ensp;&ensp;&ensp;关于第三方开源库的声明如下：
+&ensp;&ensp;&ensp;&ensp;风雷可视化框架使用了多种用于辅助开发的第三方开源库，比如利用cmake工具构建工程项目，QT用于搭建软件界面，VTK用于二维、三维图形绘制。
+为方便用户使用，特在此准备了相关网址以及软件版本号，链接如下：
+
+- CMAKE 2.9
+
+​       网址：https://cmake.org/
+
+- QT 5.12
+
+​       网址：https://www.qt.io/
+
+- VTK 7.1
+
+​       网址：https://vtk.org/
+
+## 致谢
+
+&ensp;&ensp;&ensp;&ensp;感谢@肖翰为风雷团队作出的贡献。
+
+## 联系我们
+
+&ensp;&ensp;&ensp;&ensp;电子邮箱：phenglei@126.com。
+
+
+
+
+
diff --git a/GUI/Resources/images/PHengLEI.ico b/GUI/Resources/images/PHengLEI.ico
new file mode 100644
index 0000000..e15f9c8
Binary files /dev/null and b/GUI/Resources/images/PHengLEI.ico differ
diff --git a/GUI/Resources/images/PHengLei.png b/GUI/Resources/images/PHengLei.png
new file mode 100644
index 0000000..258c24e
Binary files /dev/null and b/GUI/Resources/images/PHengLei.png differ
diff --git a/GUI/Resources/images/images.qrc b/GUI/Resources/images/images.qrc
new file mode 100644
index 0000000..f166b43
--- /dev/null
+++ b/GUI/Resources/images/images.qrc
@@ -0,0 +1,5 @@
+<RCC>
+	<qresource prefix="/phenglei" >
+		<file>PHengLEI.ico</file>
+	</qresource>
+</RCC>
\ No newline at end of file
diff --git a/GUI/Resources/images/png.qrc b/GUI/Resources/images/png.qrc
new file mode 100644
index 0000000..3834179
--- /dev/null
+++ b/GUI/Resources/images/png.qrc
@@ -0,0 +1,5 @@
+<RCC>
+    <qresource prefix="/png">
+        <file>PHengLei.png</file>
+    </qresource>
+</RCC>
diff --git a/GUI/Resources/logo.rc b/GUI/Resources/logo.rc
new file mode 100644
index 0000000..6c91d1d
--- /dev/null
+++ b/GUI/Resources/logo.rc
@@ -0,0 +1 @@
+IDI_ICON1 ICON DISCARDABLE "images/PHengLEI.ico"
\ No newline at end of file
diff --git a/LICENSE b/LICENSE
new file mode 100644
index 0000000..d6bbd21
--- /dev/null
+++ b/LICENSE
@@ -0,0 +1,18 @@
+��Э������������Ҳ��"�û�"�����й����������о��뷢չ���ģ����¼��"����"�������ڹ�����ֵ�綴��NNW��"���ף�PHengLEI��"������Э�飬�������Ķ�.
+
+
+1. �����߲���˽���Կ�������¼�ȷ�ʽ������ߣ�����ͬһ��λ�ڵ�������Ա�������������û�������д��Э�飬���������벢����Ȩ������ѻ�ȡ.
+
+2. �û�������"���ף�PHengLEI��"���������ӡ��޸�Դ���룬��Ȩ���������ʹ�÷�����������û����Է���������ʹ�����鼰���ܣ�����������̰�������.
+
+3. �û������俪�������֪ʶ��Ȩ�������������ɹ������������Ŷӣ�����"���ף�PHengLEI��"�����п�Դ�������߽��ڴ���������.
+
+4. ��������������������ѧ���о�����������ijɹ���Ӧ���ù�����ֵ�綴"���ף�PHengLEI��"����; ������������;,������Ҫ����ע����"���ף�PHengLEI��"��������.
+
+5. һ������ʹ�ñ�����������ʾͬ�����Э�����������Լ�����������ͬ��Э������������ܻ��ʹ�ñ�������Ȩ��.
+
+6. "���ף�PHengLEI��"���������Ŀ���,һ��֪ʶ��Ȩ���Լ���������ص�������Ϣ���ݣ������������ڣ����ֱ���������ϡ�ͼ�ꡢͼ�Ρ�ͼ����ɫ�ʡ������ܡ��й����ݡ�ӡˢ���ϡ�������ĵ��Ⱦ��ܡ��л����񹲺͹�����Ȩ���������л����񹲺͹�������������������������л����񹲺͹��̱귨�������л����񹲺͹�ר��������������������������Ӧ�Ĺ�����Լ�Լ�����֪ʶ��Ȩ���ɷ���ı��������漰��������Ȩ�����������⣬������������֪ʶ��Ȩ.
+
+7. ����õ�ֻ�DZ�������ʹ��Ȩ�������������л����񹲺͹���������ʹ��.
+
+8. ��Э������ս���Ȩ������.
diff --git a/Main/CMakeLists.txt b/Main/CMakeLists.txt
new file mode 100644
index 0000000..66ec9c1
--- /dev/null
+++ b/Main/CMakeLists.txt
@@ -0,0 +1,264 @@
+#+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+#          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+#          P   P  H   H  E      NN   N  G      L      E       I          +
+#          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+#          P      H   H  E      N  N N  G   G  L      E       I          +
+#          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+#------------------------------------------------------------------------+
+#          Platform for Hybrid Engineering Simulation of Flows           +
+#          China Aerodynamics Research and Development Center            +
+#                     (C) Copyright, Since 2010                          +
+#+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+#! @file      CMakeLists.txt
+#! @brief     It defines the project.
+#! @author    Bell, Xu Qingxin, He Kun, He Xin.
+cmake_minimum_required(VERSION 2.8)
+
+#1. output message:
+message(STATUS "") 
+message(STATUS "--- Enter subdirectory <Main>, Start to call ${CMAKE_CURRENT_LIST_FILE} ---")
+message(STATUS "This current binary directory is ${CMAKE_CURRENT_BINARY_DIR}.")
+message(STATUS "This current source directory is ${CMAKE_CURRENT_SOURCE_DIR}.")
+
+#2. set executable name:
+set(EXECUTABLE_TARGET_NAME "${CMAKE_PROJECT_NAME}")
+message(STATUS "The executable name is ${EXECUTABLE_TARGET_NAME}.")
+
+# Define some pre-definition.
+if(USE_OCC)
+  message(STATUS "USE_OCC is turned on!")
+  add_definitions(-DUSE_OCC)
+endif()
+if(USE_DOUBLE_PRECISION)
+  message(STATUS "USE_DOUBLE_PRECISION is turned on!")
+  add_definitions(-DPH_DOUBLE_PREC)
+endif()
+
+if(USE_SMARTARRAY)
+  message(STATUS "USE_SMARTARRAY is turned on!")
+  add_definitions(-DUSE_SMARTARRAY)
+endif()
+if(WIN32)
+if(USE_Windows_X64)
+  message(STATUS "USE_Windows_X64 is turned on!")
+  add_definitions(-DUSE_WINDOWS_X64)
+endif(USE_Windows_X64)
+endif(WIN32)
+
+#3. set environment for MPICH and 3rdParty lib directory:
+if(WIN32)
+  include_directories("${MSMPI_HOME_DIRECTORY}/Include")
+  link_directories("${MSMPI_HOME_DIRECTORY}/lib")
+  if(USE_Windows_X64)
+    link_directories("${MSMPI_HOME_DIRECTORY}/Lib/x64")
+    set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/${THIRD_PARTY_COMPILER_FLAG}/win-x64")
+  else(USE_Windows_X64) 
+    link_directories("${MSMPI_HOME_DIRECTORY}/Lib/x86")
+    set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/${THIRD_PARTY_COMPILER_FLAG}/win-x86")
+  endif(USE_Windows_X64)
+else(WIN32)
+  set(CMAKE_CXX_COMPILER  mpicxx)
+  set(CMAKE_C_COMPILER    mpicc)
+  if(${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR} MATCHES "Linux-x86_64")
+    if(USE_INTEL_COMPILER)
+      set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/liblinux/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR}/intel")
+      message(STATUS "USE_INTEL_COMPILER is turned on!")
+    else(USE_INTEL_COMPILER)
+      set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/liblinux/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR}/gcc")
+      message(STATUS "USE_INTEL_COMPILER is turned off!")
+    endif()
+  else(${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR} MATCHES "Linux-aarch64")
+    set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/liblinux/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR}")
+  endif()
+endif(WIN32)
+# specify directory in which the linker will look for libraries for myself libraries:
+message(STATUS "The 3rdparty path is: ${THIRDPARTY_LIB_DIR}.") 
+link_directories("${THIRDPARTY_LIB_DIR}")
+
+#5. set current directory:
+
+#6. set subdirectory <include>:
+set(MAIN_H_PATH   include)
+set(MAIN_H_LIST
+${MAIN_H_PATH}/CFDSimulation.h
+${MAIN_H_PATH}/Simulation.h
+${MAIN_H_PATH}/GridFactory.h
+${MAIN_H_PATH}/FieldViewIn.h
+${MAIN_H_PATH}/GridPartition.h
+${MAIN_H_PATH}/GridView.h
+${MAIN_H_PATH}/FluentIn.h
+${MAIN_H_PATH}/Gmesh.h
+${MAIN_H_PATH}/GridgenIn.h
+${MAIN_H_PATH}/SolversList.h
+)
+source_group(Main\\include FILES ${MAIN_H_LIST}) 
+include_directories(${MAIN_H_PATH})
+
+#7. set directory <src>:
+set(MAIN_CPP_PATH  src)
+set(MAIN_CPP_LIST
+${MAIN_CPP_PATH}/main.cpp
+${MAIN_CPP_PATH}/CFDSimulation.cpp
+${MAIN_CPP_PATH}/Simulation.cpp
+${MAIN_CPP_PATH}/GridFactory.cpp
+${MAIN_CPP_PATH}/FieldViewIn.cpp
+${MAIN_CPP_PATH}/GridPartition.cpp
+${MAIN_CPP_PATH}/GridView.cpp
+${MAIN_CPP_PATH}/FluentIn.cpp
+${MAIN_CPP_PATH}/Gmesh.cpp
+${MAIN_CPP_PATH}/GridgenIn.cpp
+)
+
+source_group(Main\\src FILES ${MAIN_CPP_LIST}) 
+include_directories(${MAIN_CPP_PATH})
+
+#20.1 set header file list
+set(HEAD_LIST 
+${MAIN_H_LIST}
+)
+
+#20.2 set source file list:
+set(CPP_LIST 
+${MAIN_CPP_LIST}
+)
+
+#21. adds flags to the compiler command line for sources in the current directory and below:
+add_definitions(-DPH_PARALLEL -DPH_CGNS)
+
+# For OCC.
+set(OCC_LIBS)
+if(USE_OCC)
+  message(STATUS "Using OpenCasCade ...... ")
+  set(OCC_LIBS_REQUIRED
+      # subset of DataExchange
+      TKSTEP TKSTEP209 TKSTEPAttr TKSTEPBase TKIGES TKSTL TKXSBase
+      # ModelingAlgorithms
+      TKOffset TKFeat TKFillet TKBool TKShHealing TKMesh TKHLR TKBO TKPrim
+      TKTopAlgo TKGeomAlgo
+      # ModelingData
+      TKBRep TKGeomBase TKG3d TKG2d
+      # FoundationClasses
+      # TKAdvTools -- not necessary? (and removed from OCC 6.8)
+      TKMath TKernel)
+  
+  # Set the path of the OCC library.
+  set(3RDPARTY_LIB_PATH ${PROJECT_SOURCE_DIR}/3rdparty/occ730-vc11-bit64-release)
+  set(OCC_LIB_PATH ${3RDPARTY_LIB_PATH} CACHE PATH "path to OpenCasCade library.")
+  message(STATUS "Path to OpenCasCade library: " ${OCC_LIB_PATH})
+  
+  # Check if all the library exist -- it's need to be checked. 
+  foreach(OCC ${OCC_LIBS_REQUIRED})     
+      list(APPEND OCC_LIBS ${OCC})
+      unset(OCC CACHE)
+  endforeach(OCC)
+  
+  if(WIN32)           
+    MESSAGE(STATUS "Using Win32 OpenCasCade.")
+    MESSAGE(STATUS "${OCC_LIB_PATH}/lib")
+    MESSAGE(STATUS "${OCC_LIB_PATH}/bin")
+    link_directories("${OCC_LIB_PATH}/lib")
+    link_directories("${OCC_LIB_PATH}/bin") 
+    include_directories("${OCC_LIB_PATH}/inc")
+  else(WIN32)
+    MESSAGE(STATUS "Using NON-Win32 OpenCasCade.")
+    MESSAGE(STATUS "${OCC_LIB_PATH}/lin64/gcc/lib")
+    MESSAGE(STATUS "${OCC_LIB_PATH}/inc")
+    link_directories("${OCC_LIB_PATH}/lin64/gcc/lib")
+    include_directories("${OCC_LIB_PATH}/inc")
+  endif(WIN32)
+endif(USE_OCC)
+
+#22. build executable program:
+
+# Building Executable Program.
+message(STATUS "Building Executable Program ${EXECUTABLE_TARGET_NAME} ...")
+add_executable(${EXECUTABLE_TARGET_NAME} ${CPP_LIST} ${HEAD_LIST})  
+ if(WIN32) 
+    set_target_properties(${EXECUTABLE_TARGET_NAME} PROPERTIES COMPILE_FLAGS "/MP")
+ endif(WIN32)
+# Collect the linraries to be linked.
+# link the API/MESH etc. libraries, no matter build them or not.
+# Important: the top library should be list firstly!!!
+# For example, the Mesh is previous API.
+
+set(API_TARGET_NAME "PHAPI")
+set(MESH_TARGET_NAME "PHMesh")
+set(CFD_TARGET_NAME "PHCFD")
+set(Grider_TARGET_NAME "PHGrider")
+
+message(STATUS "Linking ${MESH_TARGET_NAME} ...")
+list(APPEND LINK_LIBRARY_LIST ${MESH_TARGET_NAME})
+
+message(STATUS "Linking ${CFD_TARGET_NAME} ...")
+list(APPEND LINK_LIBRARY_LIST ${CFD_TARGET_NAME})
+
+list(APPEND LINK_LIBRARY_LIST ${API_TARGET_NAME})
+
+message(STATUS "Link library list: ${LINK_LIBRARY_LIST}.")
+
+if(BUILD_GMRESSolver)
+  #for Sacado
+  list(APPEND LINK_LIBRARY_LIST ${Sacado_LIBRARIES})
+  #for PETSc
+  list(APPEND LINK_LIBRARY_LIST ${PETSC_Libraries})
+
+  list(APPEND LINK_LIBRARY_LIST ${CMAKE_DL_LIBS})
+endif()
+#23. link a target to given libraries:
+target_link_libraries(${EXECUTABLE_TARGET_NAME} ${LINK_LIBRARY_LIST})
+
+if(USE_TecplotLib)
+  if(WIN32)
+    if(USE_Windows_X64)
+      add_custom_command(TARGET ${EXECUTABLE_TARGET_NAME} POST_BUILD COMMAND ${CMAKE_COMMAND} -E copy_if_different "${PROJECT_SOURCE_DIR}/3rdparty/${THIRD_PARTY_COMPILER_FLAG}/win-x64/tecio.dll" $<TARGET_FILE_DIR:${EXECUTABLE_TARGET_NAME}>)
+    else(USE_Windows_X64) 
+      add_custom_command(TARGET ${EXECUTABLE_TARGET_NAME} POST_BUILD COMMAND ${CMAKE_COMMAND} -E copy_if_different "${PROJECT_SOURCE_DIR}/3rdparty/${THIRD_PARTY_COMPILER_FLAG}/win-x86/tecio.dll" $<TARGET_FILE_DIR:${EXECUTABLE_TARGET_NAME}>)
+    endif(USE_Windows_X64)
+  endif(WIN32)
+endif(USE_TecplotLib)
+
+# Some pre-definitions that occ need.
+if(USE_OCC)
+  target_link_libraries(${EXECUTABLE_TARGET_NAME} ${OCC_LIBS})  
+  add_definitions(-DWNT)
+  add_definitions(-DNOTCL)
+endif(USE_OCC)
+
+# For OpenMP
+if(USE_OMP)
+find_package (OpenMP)
+if (OpenMP_FOUND)
+
+if(WIN32)
+target_include_directories (${API_TARGET_NAME}
+    PRIVATE
+        ${OpenMP_CXX_INCLUDE_DIRS}
+)
+
+target_compile_options (${API_TARGET_NAME}
+    PRIVATE
+        ${OpenMP_CXX_FLAGS}
+)
+
+target_compile_features (${API_TARGET_NAME}
+    PUBLIC 
+        cxx_std_14
+)
+
+target_link_libraries (${API_TARGET_NAME}
+    PRIVATE 
+        ${OpenMP_CXX_LIBRARIES}
+)
+else(WIN32) 
+  set(CMAKE_C_FLAGS "${CMAKE_C_FLAGS} ${OpenMP_C_FLAGS}")
+  set(CMAKE_CXX_FLAGS "${CMAKE_CXX_FLAGS} ${OpenMP_CXX_FLAGS}")
+  set(CMAKE_EXE_LINKER_FLAGS "${CMAKE_EXE_LINKER_FLAGS} ${OpenMP_EXE_LINKER_FLAGS}")
+endif(WIN32)
+endif (OpenMP_FOUND)
+endif(USE_OMP)
+
+# For UGKS
+
+#24. exit:
+message(STATUS "--- Exit ${CMAKE_CURRENT_LIST_FILE}! ---")
+
diff --git a/Main/include/CFDSimulation.h b/Main/include/CFDSimulation.h
new file mode 100644
index 0000000..26dfc89
--- /dev/null
+++ b/Main/include/CFDSimulation.h
@@ -0,0 +1,31 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      CFDSimulation.h
+//! @brief     The entrance of CFD simulation.
+//! @author    He Xin.
+
+#pragma once
+
+namespace PHSPACE
+{
+//! Entrance of PHengLEI.
+void RunPHengLEI();
+
+//! Show welcome information.
+void ShowWelcomeTitle();
+
+//! After reading control parameters from files, a preliminary self-check will be carried out to avoid the easy-neglected mistakes.
+static void ControlParametersPreliminarySelfCheck();
+
+//! According to the functions of PHengLEI, the control parameters self-check process includes six parts listed as follows.
+static void ParametersSelfCheckForCFD();
+}
diff --git a/Main/include/FieldViewIn.h b/Main/include/FieldViewIn.h
new file mode 100644
index 0000000..da5cd95
--- /dev/null
+++ b/Main/include/FieldViewIn.h
@@ -0,0 +1,24 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      FieldViewIn.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+using namespace std;
+
+namespace PHSPACE
+{
+//! To translate the grid from fieldview format to fts.
+void FieldView2PHengLEI();
+}
+
diff --git a/Main/include/FluentIn.h b/Main/include/FluentIn.h
new file mode 100644
index 0000000..a28360b
--- /dev/null
+++ b/Main/include/FluentIn.h
@@ -0,0 +1,25 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      FluentIn.h
+//! @brief     Conver fluent grid to fts grid.
+//! @author    He Xin.
+
+#pragma once
+using namespace std;
+
+namespace PHSPACE
+{
+
+//! To translate the grid from fluent format to fts.
+void Fluent2PHengLEI();
+
+}
\ No newline at end of file
diff --git a/Main/include/Gmesh.h b/Main/include/Gmesh.h
new file mode 100644
index 0000000..c5af316
--- /dev/null
+++ b/Main/include/Gmesh.h
@@ -0,0 +1,178 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Gmesh.h
+//! @brief     Convert gmsh grid to fts grid.
+//! @author    He Xin.
+
+#pragma once
+#include "Precision.h"
+#include <vector>
+#include <set>
+#include <string>
+using namespace std;
+
+namespace PHSPACE
+{
+#include "GmshDefines.h"
+
+typedef enum
+{
+    PH_MSH_LIN_2 = MSH_LIN_2,
+    PH_MSH_TRI_3   ,
+    PH_MSH_QUA_4   ,
+    PH_MSH_TET_4   ,
+    PH_MSH_HEX_8   ,
+    PH_MSH_PRI_6   ,
+    PH_MSH_PYR_5   ,
+    PH_MSH_LIN_3   ,
+    PH_MSH_TRI_6   ,
+    PH_MSH_QUA_9   ,
+    PH_MSH_TET_10  ,
+    PH_MSH_HEX_27  ,
+    PH_MSH_PRI_18  ,
+    PH_MSH_PYR_14  ,
+    PH_MSH_PNT     ,
+    PH_MSH_QUA_8   ,
+    PH_MSH_HEX_20  ,
+    PH_MSH_PRI_15  ,
+    PH_MSH_PYR_13  ,
+    PH_MSH_TRI_9   ,
+    PH_MSH_TRI_10  ,
+    PH_MSH_TRI_12  ,
+    PH_MSH_TRI_15  ,
+    PH_MSH_TRI_15I ,
+    PH_MSH_TRI_21  ,
+    PH_MSH_LIN_4   ,
+    PH_MSH_LIN_5   ,
+    PH_MSH_LIN_6   ,
+    PH_MSH_TET_20  ,
+    PH_MSH_TET_35  ,
+    PH_MSH_TET_56  ,
+    PH_MSH_TET_34  ,
+    PH_MSH_TET_52  ,
+    PH_MSH_POLYG_  ,
+    PH_MSH_POLYH_  ,
+    PH_MSH_QUA_16  ,
+    PH_MSH_QUA_25  ,
+    PH_MSH_QUA_36  ,
+    PH_MSH_QUA_12  ,
+    PH_MSH_QUA_16I ,
+    PH_MSH_QUA_20  ,
+    PH_MSH_TRI_28  ,
+    PH_MSH_TRI_36  ,
+    PH_MSH_TRI_45  ,
+    PH_MSH_TRI_55  ,
+    PH_MSH_TRI_66  ,
+    PH_MSH_QUA_49  ,
+    PH_MSH_QUA_64  ,
+    PH_MSH_QUA_81  ,
+    PH_MSH_QUA_100 ,
+    PH_MSH_QUA_121 ,
+    PH_MSH_TRI_18  ,
+    PH_MSH_TRI_21I ,
+    PH_MSH_TRI_24  ,
+    PH_MSH_TRI_27  ,
+    PH_MSH_TRI_30  ,
+    PH_MSH_QUA_24  ,
+    PH_MSH_QUA_28  ,
+    PH_MSH_QUA_32  ,
+    PH_MSH_QUA_36I ,
+    PH_MSH_QUA_40  ,
+    PH_MSH_LIN_7   ,
+    PH_MSH_LIN_8   ,
+    PH_MSH_LIN_9   ,
+    PH_MSH_LIN_10  ,
+    PH_MSH_LIN_11  ,
+    PH_MSH_LIN_B   ,
+    PH_MSH_TRI_B   ,
+    PH_MSH_POLYG_B ,
+    PH_MSH_LIN_C   ,
+    PH_MSH_TET_84  ,
+    PH_MSH_TET_120 ,
+    PH_MSH_TET_165 ,
+    PH_MSH_TET_220 ,
+    PH_MSH_TET_286 ,
+    PH_MSH_HEX_64  ,
+    PH_MSH_HEX_125 ,
+    PH_MSH_HEX_196 ,
+    PH_MSH_TET_74  ,
+    PH_MSH_TET_100 ,
+    PH_MSH_TET_130 ,
+    PH_MSH_TET_164 ,
+    PH_MSH_TET_202 ,
+    PH_MSH_NUM_TYPE
+} GmshElemEnum;
+
+class CGNSFactory;
+
+class GmeshElem
+{
+public:
+    int ntype;       //�ж����ֲ�ͬ�ĵ�Ԫ��
+    int **conn_list; //���ӱ�
+    int *type;       //ÿ�ֵ�Ԫ������
+    int *istart;     //ÿ�ֵ�Ԫ����ʼ���
+    int *iend;       //ÿ�ֵ�Ԫ����ֹ���
+    int *number;     //ÿ�ֵ�Ԫ������
+    int nTotalCell;
+public:
+    GmeshElem();
+    ~GmeshElem();
+public:
+    void Create(int ntype);
+    int  GetNTotalCell() const { return nTotalCell; };
+    void SetNTotalCell(int nTotalCell) { this->nTotalCell = nTotalCell; };
+    void TreatElements(CGNSFactory *factory_cgns, vector<int> &type_container, vector<int> &number_container, vector<int> &index_container, vector<int> &bctype_container, int *e_nvertex);
+};
+
+class Gmesh
+{
+public:
+    Gmesh();
+    ~Gmesh();
+public:
+    void Read(fstream &file, CGNSFactory *factory_cgns);
+private:
+    void ReadMeshFormat(fstream &file);
+    void ReadNodes(fstream &file, CGNSFactory *factory_cgns);
+    void ReadElements(fstream &file, CGNSFactory *factory_cgns);
+public:
+    int NofValidElementTypesGmsh;
+    int *TypeGmsh2CGNS;
+    int *gmesh_nvertex;
+    int *cgns_nvertex;
+    void InitGmshNVertex();
+    void InitCGNSNVertex();
+    void InitGmsh2CGNSMap();
+private:
+    int *elem_pt;
+    //version-number is a real number equal to 2.2
+    RDouble version_number;
+    //
+    //file-type is an integer equal to 0 in the ASCII file format.
+    int file_type;
+
+    //data-size is an integer equal to the size of the floating point numbers used in the file
+    //(currently only data-size = sizeof(RDouble) is supported).
+    int data_size;
+
+    //number-of-nodes
+    //is the number of nodes in the mesh.
+    int nTotalNode, nTotalCell;
+
+    vector<string> keyword;
+};
+
+void CreateValueSet(vector<int> &value_container, set<int> &value_set);
+
+}
+
diff --git a/Main/include/GridFactory.h b/Main/include/GridFactory.h
new file mode 100644
index 0000000..a03e704
--- /dev/null
+++ b/Main/include/GridFactory.h
@@ -0,0 +1,40 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      GridFactory.h
+//! @brief     Some functions about grid.
+//! @author    He Xin, Bell, Baka.
+
+#pragma once
+#include "MixGrid.h"
+
+namespace PHSPACE
+{
+//! 
+void CreateGrid();
+
+void ConvertGrid();
+
+void RefineGrid();
+
+void CombineGrid();
+
+void RepairGrid();
+
+void MirrorGrid();
+
+void StructToUnstructGrid();
+
+//!
+void OversetGridView();
+
+void Fantasy2Fluent();
+}
diff --git a/Main/include/GridPartition.h b/Main/include/GridPartition.h
new file mode 100644
index 0000000..4653288
--- /dev/null
+++ b/Main/include/GridPartition.h
@@ -0,0 +1,139 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      GridPartition.h
+//! @brief     Grid partition: Structured and Unstructured.
+//! @author    He Xin, Bell, Baka.
+
+#pragma once
+#include <fstream>
+#include <vector>
+#include "Math_BasisFunction.h"
+using namespace std;
+
+namespace PHSPACE
+{
+class Grid;
+class StructGrid;
+class InterfaceInfo;
+class DataContainer;
+class GridRefine;
+
+void PartitionGrid();
+void PartitionUnstructGrid();
+void RefineStructGrid();
+void PartitionStructGrid();
+
+void MultiGridPartition();
+void GetPartitionPara(PHVectorString1D &gridFileNameList, PHVectorString1D &outFileNameList, PHVectorInt1D &gridTypeList, PHVectorInt1D &maxProcList);
+
+void RefineStructGrid(const string &coordinateFile, const string &layoutFile);
+
+void ReadGridgenBC(const string &BCFile, DataContainer *cData);
+void ReadGridgenBC(fstream &file, DataContainer *cData);
+
+class BlockBCPatchRefine
+{
+public:
+    BlockBCPatchRefine() {};
+    ~BlockBCPatchRefine() {};
+
+public:
+    void SetContent(const int &nb, const int &imin, const int &imax, const int &jmin, const int &jmax, const int &kmin, const int &kmax);
+    void RefineBC();
+
+private:
+    int st[3], ed[3];
+    int nd[3];
+    int nb;
+};
+
+class BlockRefine;
+
+class BlockBCRefine
+{
+public:
+    BlockBCRefine() {next = 0;};
+    ~BlockBCRefine() {delete next;};
+
+public:
+    void SetContent(const int &BCType, const int &imin, const int &imax, const int &jmin, const int &jmax, const int &kmin, const int &kmax);
+    void SetPatchContent(const int &nb, const int &imin, const int &imax, const int &jmin, const int &jmax, const int &kmin, const int &kmax);
+    void Refine();
+    void RefineBC();
+
+private:
+    int st[3],ed[3];
+    int nd[3];
+
+    BlockBCPatchRefine *next;
+    int BCType;
+    int nb;
+};
+
+class BlockRefine
+{
+public:
+    BlockRefine() {};
+    ~BlockRefine() {};
+
+public:
+    int size() {return dim[0] * dim[1] * dim[2];}
+    int cellsize() {return (dim[0] - 1) * (dim[1] - 1) * MAX(dim[2] - 1, 1);}
+    void SetID(const int &id) {this->id = id;}
+    int GetID() const {return id;}
+
+    void SetNI(const int &ni) {this->dim[0] = ni;}
+    void SetNJ(const int &nj) {this->dim[1] = nj;}
+    void SetNK(const int &nk) {this->dim[2] = nk;}
+
+    int  GetNI() const {return dim[0];}
+    int  GetNJ() const {return dim[1];}
+    int  GetNK() const {return dim[2];}
+
+    vector <BlockBCRefine *> &GetBCList() {return BCList;}
+
+public:
+    void Refine();
+    void SetNewDimension();
+    void DumpGrid(fstream &file, Grid *gridIn);
+    void RefineCoordinate(RDouble3D &x, RDouble3D &xold, const int &ni, const int &nj, const int &nk);
+    StructGrid *CreateStructGrid(const int &ni, const int &nj, const int &nk);
+
+private:
+    int dim[3], oldDim[3];
+    int id;
+    vector <BlockBCRefine *> BCList;
+};
+
+class GridRefine
+{
+private:
+    vector <BlockRefine *> refblock;
+    int numberOfTotalBlocks;
+    int numberOfBlocks;
+public:
+    GridRefine() {};
+    ~GridRefine() {};
+public:
+    void Init(DataContainer *cData);
+    void Refine();
+    void DumpGrid();
+    void DumpLayout(DataContainer *cData);
+    void RefineStructGrid();
+private:
+    void SetNewDimension();
+    int  MapBC(int i);
+};
+
+void GetIJKRegion(int *dim, int &ist, int &ied, int &jst, int &jed, int &kst, int &ked, int m);
+void GetIJKRegion(int *st, int *ed, int &ist, int &ied, int &jst, int &jed, int &kst, int &ked, int m);
+}
diff --git a/Main/include/GridView.h b/Main/include/GridView.h
new file mode 100644
index 0000000..e3ae5b8
--- /dev/null
+++ b/Main/include/GridView.h
@@ -0,0 +1,187 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      GridView.h
+//! @brief     Show relationship between different overset grids.
+//! @author    Guo Yongheng.
+
+#pragma once
+#include <fstream>
+#include <vector>
+#include "Precision.h"
+using namespace std;
+
+namespace PHSPACE
+{
+const int WHITE = 0, BLUE = 1, RED = 2, PURPLE = 3;
+const int ASPECTX = 0, ASPECTY = 1, ASPECTZ = 2;
+const int EXTERNAL_BC = 9;
+
+class PHSimpleFace
+{
+public:
+    PHSimpleFace();
+    ~PHSimpleFace();
+public:
+    void SetKeyParameter(int *keyNumber);
+    PHSimpleFace * GetNextPointer();
+    void CreateNewSimpleFace();
+    void ShowSimpleFace();
+    int GetKeyParameter();
+    int * GetLocalParameter();
+protected:
+    int keyNumber[7];
+    PHSimpleFace *simpleFaceNext;
+};
+
+class BasalGrid
+{
+public:
+    BasalGrid();
+    ~BasalGrid();
+public:
+    void GenerateBasalSpace(int iDimension, int jDimension, int kDimension);
+    void SetCoordinate(int aspect, int i, int j, int k, RDouble coordinate);
+    int GetIDimension();
+    int GetJDimension();
+    int GetKDimension();
+    RDouble GetCoordinate(int aspect, int i, int j, int k);
+    RDouble * GetX() { return xCoordinate; }
+    RDouble * GetY() { return yCoordinate; }
+    RDouble * GetZ() { return zCoordinate; }
+protected:
+    int iDimension, jDimension, kDimension;
+    int pointNumber;
+    RDouble *xCoordinate;
+    RDouble *yCoordinate;
+    RDouble *zCoordinate;
+};
+
+class BoundaryCluster
+{
+public:
+    BoundaryCluster();
+    ~BoundaryCluster();
+public:
+    void SetBlockLabel(int blockLabel);
+    void SetBlockDimension(int iDimension, int jDimension, int kDimension);
+    void SetProcessLabel(int processLabel);
+    void SetOverallFaceNumber(int overallFaceNumber);
+    void SetExternalFaceNumber(int externalFaceNumber);
+    int GetOverallFaceNumber();
+    int GetProcessLabel();
+    int GetExternalFaceNumber();
+    vector< vector< int > > ExtractPhysicalBoundaryIndex();
+public:
+    void SetKeyNumberPointer(int *keyNumber);
+    void CreateNewSimpleFace(int iFace);
+    void DeleteLinkedTable();
+public:
+    PHSimpleFace * GetSimpleFaceHead();
+    void RecordSolidFaceInformation();
+    void OutputHoleSurfaceDimension(ofstream &outfile);
+    void OutputHoleSurfaceGrid(ofstream &outfile, BasalGrid *basalGrid);
+    int GetNumberOfSolidFaces() { return numberOfSolidFaces; }
+    void ShowBoundaryCluster();
+    void SetSlaveBlockList();
+    int * GetSlaveBlockList();
+protected:
+    int iDimension, jDimension, kDimension;
+    int overallFaceNumber, externalFaceNumber;
+    int blockLabel, processLabel;
+    PHSimpleFace *simpleFaceHead;
+    PHSimpleFace *simpleFaceGuard;
+    int *keyNumber;
+    int *slaveBlockList;
+
+    int numberOfSolidFaces;
+    vector< int > ist, ied, jst, jed, kst, ked;
+};
+
+class LinkedBlocks
+{
+public:
+    LinkedBlocks();
+    ~LinkedBlocks();
+public:
+    void SetBlockLabel(int blockLabel);
+    int GetBlockLabel();
+    LinkedBlocks * GetNextPointer();
+    void CreateNewLinkedBlock();
+protected:
+    int blockLabel;
+    LinkedBlocks *linkedBlocksNext;
+};
+
+class BlockCluster
+{
+public:
+    BlockCluster();
+    ~BlockCluster();
+public:
+    void CreatNewLinkedBlock();
+    void DeleteLinkedTable();
+    void SetBlockLabel(int blockLabel);
+    void ShowLinkedBlocks();
+    void SetListColor(int listColor);
+    void SetGroupLabel(int groupLabel);
+    void SetNewBlockLabel(int newBlockLabel);
+    int GetListColor();
+    int GetGroupLabel();
+    int GetNewBlockLabel();
+    LinkedBlocks * GetLinkedBlocksHead();
+protected:
+    LinkedBlocks *linkedBlocksHead;
+    LinkedBlocks *linkedBlocksGuard;
+    int listColor, groupLabel, newBlockLabel;
+};
+
+class BlockGroupManager
+{
+public:
+    BlockGroupManager();
+    ~BlockGroupManager();
+public:
+    void Run();
+protected:
+    void InputOriginalGrid();
+    void InputOriginalBoundary();
+    void ShowOriginalBoundary();
+    void GatherLinkedBlocks();
+    void ShowLinkedBlocks();
+    void MarkerBlocksRelation();
+    void PermuteBlockLabel();
+    void SeparateGrid();
+    void OutputNewBlockGroup(int iGroup, ofstream &myFile);
+    int SearchColorfulList(int spectrum);
+    void OutputNewSurfaceGrid();
+    void OutputNewGrid();
+    void OutputNewBoundary();
+    void OutputStandardBoundary();
+    void OutputZoneInverseMapping();
+    void OutputHoleGroup(int iGroup);
+protected:
+    int globalBlockNumber, processNumber, groupNumber, fileNumber;
+    int originalExternalLabel;
+    int keyNumber[7];
+
+    bool readProc;
+
+    BoundaryCluster *boundaryCluster;
+    BlockCluster *blockCluster;
+    BasalGrid *basalGrid;
+    int *InverseMapping;
+    int *blockStart;
+    int *blockEnd;
+};
+
+}
+
diff --git a/Main/include/GridgenIn.h b/Main/include/GridgenIn.h
new file mode 100644
index 0000000..afbfb4d
--- /dev/null
+++ b/Main/include/GridgenIn.h
@@ -0,0 +1,53 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      GridgenIn.h
+//! @brief     Explain this file briefly.
+//! @author    He Xin.
+
+#pragma once
+using namespace std;
+
+namespace PHSPACE
+{
+class Grid;
+
+//! To read the grid such as coordinate and boundary condition information from plot3d/gridgen format file.
+//! @param[in ]: structGrids denotes the current computational regions of the structure grids.
+//! @param[in ]: numberOfBlocks denotes the number of total grid blocks.
+//! @param[in ]: gridgenFile denotes the source file in which the grid stored.
+//! @param[in ]: BCFile denotes the source file in which the boundary information stored.
+void ReadPlot3dGrid(Grid **&structGrids, int &numberOfBlocks, const string &gridgenFile, const string &BCFile);
+
+void ReadGridgenGrid(Grid **&structGrids, int &numberOfBlocks, const string &gridgenFile, const string &BCFile);
+
+//! To read the grid coordinate from plot3d binary/ASCII format file.
+//! @param[in ]: structGrids denotes the current computational regions of the structure grids.
+//! @param[in ]: numberOfBlocks denotes the number of total grid blocks.
+//! @param[in ]: coordinateFile denotes the source file in which the grid coordinate stored.
+void ReadPlot3DCoorBinary(const string &coordinateFile, int &numberOfBlocks, Grid **&structGrids);
+
+void ReadPlot3DCoorASCII(const string &coordinateFile, int &numberOfBlocks, Grid **&structGrids);
+
+//! To read the grid coordinate from gridgen ASCII format file.
+//! @param[in ]: structGrids denotes the current computational regions of the structure grids.
+//! @param[in ]: numberOfBlocks denotes the number of total grid blocks.
+//! @param[in ]: coordinateFile denotes the source file in which the grid coordinate stored.
+void ReadGridgenCoorASCII(const string &coordinateFile, int &numberOfBlocks, Grid **&structGrids);
+
+//! To read the grid boundary information from ".inp" format file.
+//! @param[in ]: structGrids denotes the current computational regions of the structure grids.
+//! @param[in ]: numberOfBlocks denotes the number of total grid blocks.
+//! @param[in ]: BCFile denotes the source file in which the grid boundary condition information stored.
+void ReadBoundaryFile(Grid **&structGrids, int &numberOfBlocks, const string &BCFile);
+
+int CheckCoorFileIfASCII(const string &coordinateFile);
+}
diff --git a/Main/include/Simulation.h b/Main/include/Simulation.h
new file mode 100644
index 0000000..4cb9931
--- /dev/null
+++ b/Main/include/Simulation.h
@@ -0,0 +1,148 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Simulation.h
+//! @brief     Explain this file briefly.
+//! @author    PHengLEI team.
+
+#pragma once
+#include "Precision.h"
+
+namespace PHSPACE
+{
+class Zone;
+class TimeSpan;
+class Region;
+
+class Simulation
+{
+private:
+    Region *region;
+public:
+    Simulation(int dimension);
+    ~Simulation();
+public:
+    //! Select task according to taskType.
+    void Start();
+
+    //! Main part of simulation.
+    void SolveSimulation();
+
+    //! Post process of simulation.
+    void PostSimulation();
+
+private:
+    //! Main work flow of CFD simulation process.
+    void RunCFD();
+
+    //! Compute wall distance for turbulent flow while there was no .wdt file.
+    void ComputeWallDistance();
+
+    //! Need convert process or not.
+    void IsNeedConvert();
+
+    //! The work flow to convert, partition and compute.
+    void RunIntegrativeSolver();
+
+    //! Check the .fts grid.
+    void RunGridCheckSolver();
+
+    //! Run SpecDiffHyb solver.
+#ifdef USE_SpecDiffHybSolver
+    void RunSpecDiffHybSolver();
+    void RunSpecSolver();
+#endif
+
+    //! Identify the motive derivatives from the unsteady result file "./results/aircoef.dat".
+
+    //! Run post process without flow field simulation.
+    void RunPostProcessing();
+
+    //! Read the grid such as grid coordinate, boundary information, wall distance for turbulent flow and interpoint information.
+    void ReadGeometry();
+
+    //! Update all zones parameter.
+    void UpdateAllZonesPara();
+
+    //! Initialize the geometry.
+    void InitGeometry();
+
+    //! Communicate the grid metrics on the interfaces.
+    void SwapGeommetry();
+
+    //! Initialize overset grid.
+    void InitOversetGrid();
+
+    //! Run CFD using the self-adaption method.
+    void SelfAdaptionRunCFD();
+    void FirstStepRunCFD(bool isStart = true);
+    void SecondStepRunCFD(bool isStart = false);
+    void ThirdStepRunCFD(bool isStart = false);
+    void FinalStepRunCFD();
+
+    //! The numerical iteration process similar to the function named SolveSimulation.
+    void SelfAdaptionSolve();
+
+    //! Release the dynamic memories related to the solvers.
+    void RefreshSolvers();
+
+    //! Check whether the current computation is restart process.
+    bool IsRestartProcess();
+
+    //! Define solver names for all zones and create the newly defined solvers.
+    //! IMPORTANT for solver developers:
+    //! Define your solver name which is same with the solver class name here!
+    void DefineAndCreateSolvers();
+
+    //! Initialize global boundary condition.
+    void InitGlobalBoundaryCondition();
+
+    void InitGlobalVolumeCondition();
+
+    //! Initialize each solver on each zone.
+    void InitializeSolvers();
+
+    //! Initionalize flow field in the first flowInitStep steps with coarse grid when multigrid simulation.
+    void MultiGridInitFlow();
+
+    //!
+    void OversetGridConfig();
+
+    //!
+    void UpdateOuterIterationStep(int &outerIterStep);
+
+    //! 
+    void SolveOneOuterStep();
+
+    //!
+    void PreSolve();
+
+    //!
+    void MainSolve();
+
+    //!
+    void PostSolve();
+
+    //!
+    void SolveSteady();
+
+    //!
+    void SolveSteadyByGMRES();
+
+    //!
+    void SolveUnsteady();
+
+    //!
+    bool IsSubIterationConvergence(const int &innerIterStep, const int &minSubIteration, const int &maxSubIteration, const RDouble &tolalSubIteration, const RDouble &averageQuotientMaxInSolvers);
+
+};
+}
+
diff --git a/Main/include/SolversList.h b/Main/include/SolversList.h
new file mode 100644
index 0000000..a51707c
--- /dev/null
+++ b/Main/include/SolversList.h
@@ -0,0 +1,35 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      SolversList.h
+//! @brief     This file include all solvers' head file, if you want develop new solver, include here.
+//! @author    Bell, He Xin.
+
+#pragma once
+
+#include "NSSolver.h"                 //! Base NS solver.
+#include "NSSolverStructFD.h"         //! Structured NS solver, Finite Difference Method.
+#include "NSSolverStructFV.h"         //! Structured NS solver, Finite Volume Method.
+#include "NSSolverUnstruct.h"         //! Unstructured NS solver, Finite Volume Method.
+#include "NCCRSolverStruct.h"         //! Structured NS solver, Finite Volume Method.
+
+#include "TurbSolver.h"               //! Base turbulent solver.
+#include "TurbSolverStruct.h"         //! Structured turbulent solver.
+#include "TurbSolverUnstr.h"          //! Unstructured turbulent solver.
+#include "TurbSolverStructFD.h"       //! Structured FD turbulent solver.
+
+#include "TransitionSolver.h"               //! Base transition solver.
+#include "TransitionSolverStruct.h"         //! Structured transition solver.
+#include "TransitionSolverUnstr.h"          //! Unstructured transition solver.
+
+#ifdef USE_DEMOSOLVER
+#include "DemoSolver.h"
+#endif
diff --git a/Main/src/CFDSimulation.cpp b/Main/src/CFDSimulation.cpp
new file mode 100644
index 0000000..7c926df
--- /dev/null
+++ b/Main/src/CFDSimulation.cpp
@@ -0,0 +1,248 @@
+#include "GlobalDataBase.h"
+#include "CFDSimulation.h"
+#include "Simulation.h"
+#include "TK_Exit.h"
+#include "Constants.h"
+#include "PHIO.h"
+#include "TK_Log.h"
+#include "Residual.h"
+#include "Post_Visual.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+void RunPHengLEI()
+{
+    //! Initialize global variables and MPI.
+
+    PHMPI::Initialization();
+
+    //! Read control parameters and do self-checking.
+    ReadControlParameters();
+
+    ShowWelcomeTitle();
+
+    CompleteParamInfo();
+       
+    ControlParametersPreliminarySelfCheck();
+
+    //! Start CFD simulation.
+    int dimension = GlobalDataBase::GetIntParaFromDB("ndim");
+    Simulation *simulation = new Simulation(dimension);
+
+    simulation->Start();
+
+    delete simulation;
+}
+
+void ShowWelcomeTitle()
+{
+    using namespace PHMPI;
+    PH_Barrier();
+
+    int myid = GetCurrentProcessorID();
+    if (myid == PHMPI::GetServerProcessorID())
+    {
+        ostringstream oss;
+        oss << "$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$" << endl;
+        oss << "$#                                                     #$" << endl;
+        oss << "$#  PPPPP H   H  EEEE N     N  GGGGG  L     EEEEE III  #$" << endl;
+        oss << "$#  P   P H   H  E    N N   N  G      L     E      I   #$" << endl;
+        oss << "$#  PPPPP HHHHH  EEEE N  N  N  G  GG  L     EEEEE  I   #$" << endl;
+        oss << "$#  P     H   H  E    N   N N  G   G  L     E      I   #$" << endl;
+        oss << "$#  P     H   H  EEEE N     N  GGGGG  LLLLL EEEEE III  #$" << endl;
+        oss << "$#                                                     #$" << endl;
+        oss << "$#=====================================================#$" << endl;
+        oss << "$#                                                     #$" << endl;
+        oss << "$# Platform for Hybrid Engineering Simulation of Flows #$" << endl;
+        oss << "$#                                                     #$" << endl;
+        oss << "$#       Computational Aerodynamics Institute          #$" << endl;
+        oss << "$#  China Aerodynamics Research and Development Center #$" << endl;
+        oss << "$#            (C) Copyright, Since 2010                #$" << endl;
+        oss << "$#                  PHengLEI 2312                      #$" << endl;
+        oss << "$#                                                     #$" << endl;
+        oss << "$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$" << endl;
+
+        cout << oss.str();
+    }
+}
+
+void ParametersSelfCheckForCFD()
+{
+    //! Is in Multi-Grid initialization state.
+    int isInMGIniting = 0;
+    GlobalDataBase::UpdateData("isInMGIniting", &isInMGIniting, PHINT, 1);
+
+    //! Is in fine-Grid initialization state.
+    int isInIniting = 1;
+    GlobalDataBase::UpdateData("isInIniting", &isInIniting, PHINT, 1);
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+
+    //flowfield must be initialization from the flowInitStep, which is less than the maxSimuStep
+    int flowInitStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("flowInitStep");
+    int maxSimuStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("maxSimuStep");
+    if (flowInitStep > maxSimuStep || isUnsteady)
+    {
+        //! If the maximum simulation step is small than the initialization step,
+        //! do not init then.
+        flowInitStep = 0;
+        GlobalDataBase::UpdateData("flowInitStep", &flowInitStep, PHINT, 1);
+    }
+
+    int visualVariablesSize = GlobalDataBase::GetSizeOfData("visualVariables");
+    int nVisualVariables = visualVariablesSize;
+    GlobalDataBase::UpdateData("nVisualVariables", &nVisualVariables, PHINT, 1);
+
+    int *visualVariables = new int[nVisualVariables];
+    GlobalDataBase::GetData("visualVariables", visualVariables, PHINT, nVisualVariables);
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+    int iLES = GlobalDataBase::GetIntParaFromDB("iLES");
+    for (int i = 0; i < nVisualVariables; ++ i)
+    {
+        if (visualVariables[i] >= VISUAL_VISCOSITY_LAMINAR && visualVariables[i] < VISUAL_CP)
+        {
+            if (viscousType == INVISCID)
+            {
+                ostringstream oss;
+                oss << "The array \"visualVariables\" is error. The euler solver cannot export the data related to viscosity." << endl;
+                TK_Exit::ExceptionExit(oss);
+            }
+        }
+
+        if (visualVariables[i] == VISUAL_VISCOSITY_TURBULENT)
+        {
+            if (viscousType == LAMINAR && iLES == NOLES_SOLVER)
+            {
+                ostringstream oss;
+                oss << "The array \"visualVariables\" is error. The laminar solver cannot export the data related to turbulence." << endl;
+                TK_Exit::ExceptionExit(oss);
+            }
+        }
+
+        if (visualVariables[i] == VISUAL_INTERMITTENCY || visualVariables[i] == VISUAL_MOMENTUMTHICKREYNOLDS)
+        {
+            if (viscousType == ONE_EQU)
+            {
+                ostringstream oss;
+                oss << "The array \"visualVariables\" is error. The solver cannot export the transition data with SA model." << endl;
+                TK_Exit::ExceptionExit(oss);
+            }
+            else if (viscousType == TWO_EQU)
+            {
+                int transitionType = GlobalDataBase::GetIntParaFromDB("transitionType");
+                if (transitionType != IREGAMA)
+                {
+                    ostringstream oss;
+                    oss << "transitionType = " << transitionType << endl;
+                    oss << "The array \"visualVariables\" is error. The solver cannot export the transition data with transition type Not Equal 2." << endl;
+                    TK_Exit::ExceptionExit(oss);
+                }
+            }
+        }
+    }
+
+    delete [] visualVariables;
+
+    if (isUnsteady)
+    {
+        //minSubIter means the minimum subIteration in unsteady.
+        int minSubIter = GlobalDataBase::GetIntParaFromDB("min_sub_iter");
+        if (minSubIter <= 0)
+        {
+            ostringstream oss;
+            oss << "The variable \"min_sub_iter\" must be greater than 1." << endl;
+            TK_Exit::ExceptionExit(oss);
+        }
+
+        int maxSubIter = GlobalDataBase::GetIntParaFromDB("max_sub_iter");
+        if (minSubIter > maxSubIter)
+        {
+            ostringstream oss;
+            oss << "Warning: The variable \"min_sub_iter\" cannot be greater than \"max_sub_iter\"! Now let them be equal: max_sub_iter = min_sub_iter!" << endl;
+            PrintToWindow(oss.str());
+            WriteLogFile(oss.str());
+
+            maxSubIter = minSubIter;
+            GlobalDataBase::UpdateData("max_sub_iter", &maxSubIter, PHINT, 1);
+        }
+    }
+
+    //! If use Block-LUSGS, ROE scheme must be selected.
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+    if (tscheme == Block_LU_SGS)
+    {
+        string uns_scheme_name = GlobalDataBase::GetStrParaFromDB("uns_scheme_name");
+        if (uns_scheme_name.substr(0, 3) != "roe")
+        {
+            ostringstream oss;
+            oss << "Error: if BLU is used, ROE scheme must be selected!" << endl;
+            PrintToWindow(oss.str());
+            WriteLogFile(oss.str());
+            TK_Exit::ExceptionExit(oss);
+        }
+    }
+    //! Judge if use wenn scheme, provided by Li Qin.
+    int isWennScheme = 0;
+    string str_limiter_name = GlobalDataBase::GetStrParaFromDB("str_limiter_name");
+    if (str_limiter_name == "weno3_js"
+        || str_limiter_name == "wenn3_zm"
+        || str_limiter_name == "wenn3_zes2"
+        || str_limiter_name == "wenn3_zes3"
+        || str_limiter_name == "wenn3_prm211")
+    {
+        isWennScheme = 1;
+    }
+    GlobalDataBase::UpdateData("isWennScheme", &isWennScheme, PHINT, 1);
+}
+
+void ControlParametersPreliminarySelfCheck()
+{
+    int taskType = GetTaskCode();
+
+    switch (taskType)
+    {
+        case SOLVE_FIELD:
+            //Checks before CFD calculations, such as the number of output items and the number of steps taken to start the calculation.
+            ParametersSelfCheckForCFD();
+            break;
+        case CREATE_GRID:
+            break;
+        case CAL_WALL_DIST:
+            break;
+        case PARTITION_GRID:
+            break;
+        case OVERSETGRID_VIEW:
+            break;
+        case OVERSET_CONFIG:
+            break;
+        case HO_SOLVER:
+            break;
+        case INTEGRATIVE_SOLVER:
+            ParametersSelfCheckForCFD();
+            break;
+        case POST_PROCESSING:
+            break;
+        case SPECDIFFHYB_SOLVER:
+            break;
+        case SPEC_SOLVER:
+            break;
+ #ifdef USE_LBMSolverMPI
+        case LBM_SOLVER_MPI:
+            break;
+        #endif
+        #ifdef USE_LBMSolverOMP
+        case LBM_SOLVER_OMP:
+            break;
+        #endif
+        default:
+            TK_Exit::UnexpectedVarValue("taskType = ", taskType);
+            break;
+    }
+}
+
+}
+
+
+
diff --git a/Main/src/FieldViewIn.cpp b/Main/src/FieldViewIn.cpp
new file mode 100644
index 0000000..d4806c5
--- /dev/null
+++ b/Main/src/FieldViewIn.cpp
@@ -0,0 +1,33 @@
+#include "FieldViewIn.h"
+#include "Pre_FieldViewToPHengLEI_Unstruct.h"
+#include "OverLappingGrid.h"
+using namespace std;
+
+#pragma warning (disable:913)
+namespace PHSPACE
+{
+void FieldView2PHengLEI()
+{
+    string fromGridFile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+    string outGridFile  = GlobalDataBase::GetStrParaFromDB("out_gfile");
+
+    //! Read field view grid and convert it's format.
+    Pre_FieldViewToPHengLEI_Unstruct fieldViewGridConversion(fromGridFile);
+
+    fieldViewGridConversion.Run();
+
+    int numberOfBlocks = fieldViewGridConversion.GetNumberofBlocks();
+    Grid **grids = fieldViewGridConversion.GetGrids();
+
+    //! Construct block connection and dump out to file.
+    ConstructGlobalInterfaceLink(grids, numberOfBlocks);
+    DumpGrid(outGridFile, grids, numberOfBlocks);
+
+    fieldViewGridConversion.WriteAdditionalInformation(outGridFile, grids);
+    DumpCharacteristicBoundary(outGridFile, grids, numberOfBlocks);
+
+    //! Clear the memory.
+    fieldViewGridConversion.Clear();
+}
+
+}
diff --git a/Main/src/FluentIn.cpp b/Main/src/FluentIn.cpp
new file mode 100644
index 0000000..431cabd
--- /dev/null
+++ b/Main/src/FluentIn.cpp
@@ -0,0 +1,28 @@
+#include "Pre_FluentToPHengLEI_Unstruct.h"
+#include "OverLappingGrid.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+void Fluent2PHengLEI()
+{
+    string fromGridFile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+    string outGridFile  = GlobalDataBase::GetStrParaFromDB("out_gfile");
+
+    Pre_FluentToPHengLEI_Unstruct fluentGridConversion(fromGridFile);
+
+    fluentGridConversion.Run();
+    int numberOfBlocks = fluentGridConversion.GetNumberofBlocks();
+    Grid **grids = fluentGridConversion.GetGrids();
+
+    ConstructGlobalInterfaceLink(grids, numberOfBlocks);
+    DumpGrid(outGridFile, grids, numberOfBlocks);
+    fluentGridConversion.WriteAdditionalInformation(outGridFile);
+    DumpCharacteristicBoundary(outGridFile, grids, numberOfBlocks);
+
+    fluentGridConversion.Clear();
+}
+
+}
diff --git a/Main/src/Gmesh.cpp b/Main/src/Gmesh.cpp
new file mode 100644
index 0000000..0d99cf5
--- /dev/null
+++ b/Main/src/Gmesh.cpp
@@ -0,0 +1,736 @@
+#include "Gmesh.h"
+#include "TK_Parse.h"
+#include "Math_BasisFunction.h"
+#include "Pre_GridBase.h"
+using namespace std;
+
+#pragma warning (disable:913)
+namespace PHSPACE
+{
+void ElemReorderGmsh2CGNS(int etype, int *node, int *node_cgns, int nvertex)
+{
+    for (int i = 0; i < nvertex; ++ i)
+    {
+        node_cgns[i] = node[i];
+    }
+
+    if (etype == PYRA_14)
+    {
+        //! Pyramid
+        node_cgns[6 ] = node[8 ];
+        node_cgns[7 ] = node[10]; 
+        node_cgns[8 ] = node[6 ];
+        node_cgns[9 ] = node[7 ];
+        node_cgns[10] = node[9 ];
+    }
+    else if (etype == TETRA_10)
+    {
+        //! Tetrahedron
+        node_cgns[8 ] = node[9 ];
+        node_cgns[9 ] = node[8 ]; 
+    }
+    else if (etype == PENTA_15)
+    {
+        //! TriangularPrism
+        node_cgns[7 ] = node[9 ];
+        node_cgns[8 ] = node[7 ];
+        node_cgns[9 ] = node[8 ];
+        node_cgns[13] = node[14];
+        node_cgns[14] = node[13];
+    }
+    else if (etype == PENTA_18)
+    {
+        //! TriangularPrism
+        node_cgns[7 ] = node[9 ];
+        node_cgns[8 ] = node[7 ];
+        node_cgns[9 ] = node[8 ];
+        node_cgns[13] = node[14];
+        node_cgns[14] = node[13];
+        node_cgns[16] = node[17];
+        node_cgns[17] = node[16];
+    }
+    else if (etype == HEXA_20)
+    {
+        //! Hexahedron
+        node_cgns[9 ] = node[11];
+        node_cgns[10] = node[13];
+        node_cgns[11] = node[9 ];
+        node_cgns[12] = node[10];
+        node_cgns[13] = node[12];
+        node_cgns[17] = node[18];
+        node_cgns[18] = node[19];
+        node_cgns[19] = node[17];
+    }
+    else if (etype == HEXA_27)
+    {
+        //! Hexahedron
+        node_cgns[9 ] = node[11];
+        node_cgns[10] = node[13];
+        node_cgns[11] = node[9 ];
+        node_cgns[12] = node[10];
+        node_cgns[13] = node[12];
+        node_cgns[17] = node[18];
+        node_cgns[18] = node[19];
+        node_cgns[19] = node[17];
+
+        node_cgns[22] = node[23];
+        node_cgns[23] = node[24];
+        node_cgns[24] = node[22];
+    }
+    else
+    {
+        ;
+    }
+}
+
+GmeshElem::GmeshElem()
+{
+    ntype      = 0;
+    conn_list  = 0;
+    type       = 0;
+    istart     = 0;
+    iend       = 0;
+    number     = 0;
+    nTotalCell = 0;
+}
+
+GmeshElem::~GmeshElem()
+{
+    //conn_list = new int * [ntype];
+    for (int i = 0; i < ntype; ++ i)
+    {
+        delete [] conn_list[i];
+    }
+    delete [] conn_list;
+    delete [] type;
+    delete [] istart;
+    delete [] iend;
+    delete [] number;
+}
+
+void GmeshElem::Create(int ntype)
+{
+    this->ntype = ntype;
+    conn_list = new int * [ntype];
+    type      = new int [ntype];
+    istart    = new int [ntype];
+    iend      = new int [ntype];
+    number    = new int [ntype];
+}
+
+void CreateValueSet(vector<int> &value_container, set<int> &value_set)
+{
+    for (std::size_t i = 0; i < value_container.size(); ++ i)
+    { 
+        value_set.insert(value_container[i]);
+    }
+}
+
+void GmeshElem::TreatElements(CGNSFactory *factory_cgns, vector<int> &type_container, vector<int> &number_container, vector<int> &index_container, vector<int> &bctype_container, int *e_nvertex)
+{
+    //�ҳ����в�ͬ�ĵ�Ԫ����
+    set<int> elem_type_set;
+    for (std::size_t i = 0; i < type_container.size(); ++ i)
+    { 
+        int etype = type_container[i];
+        elem_type_set.insert(etype);
+    }
+
+    int nSections = static_cast<int>(elem_type_set.size());
+
+    this->Create(nSections);
+
+    Set2Array(elem_type_set, type);
+
+    for (int m = 0; m < nSections; ++ m)
+    {
+        int nelem_this_type = 0;
+        for (std::size_t i = 0; i < type_container.size(); ++ i)
+        {
+            int etype     = type_container[i];
+            int nelem_num = number_container[i];
+            if (etype == type[m])
+            {
+                nelem_this_type += nelem_num;
+            }
+        }
+        int nvertex  = e_nvertex[ type[m] ];
+        conn_list[m] = new int[ nelem_this_type * nvertex ];
+        number[m]    = nelem_this_type;
+    }
+
+    nTotalCell = 0;
+    for (int m = 0; m < nSections; ++ m)
+    {
+        nTotalCell += number[m];
+    }
+
+    istart[0] = 1;
+    for (int m = 0; m < nSections; ++ m)
+    {
+        iend[m] = istart[m] + number[m] - 1;
+        if (m < nSections - 1)
+        {
+            istart[m+1] = iend[m] + 1;
+        }
+    }
+
+    for (int m = 0; m < nSections; ++ m)
+    {
+        int icount = 0;
+        int jcount = 0;
+        for (std::size_t i = 0; i < type_container.size(); ++ i)
+        {
+            int etype     = type_container[i];
+            int nelem_num = number_container[i];
+            int nvertex   = e_nvertex[ etype ];
+            int ptmax     = nelem_num * nvertex;
+
+            if (etype == type[m])
+            {
+                for (int j = 0; j < ptmax; ++ j)
+                {
+                    conn_list[m][icount+j] = index_container[jcount+j];
+                }
+                icount += ptmax;
+            }
+            jcount += ptmax;
+        }
+    }
+
+    //�ҳ����в�ͬ�ı߽�����
+    set<int> bc_type_set;
+    CreateValueSet(bctype_container, bc_type_set);
+
+    //ɾ���ڱ߽�
+    bc_type_set.erase(0);
+
+    //! Determine the number of boundary conditions for this zone.
+    int nBCRegions = static_cast<int>(bc_type_set.size());
+    int *bctype_array = new int [nBCRegions];
+
+    Set2Array(bc_type_set, bctype_array);
+
+    CGNSBase *base_cgns = factory_cgns->GetCGNSBase(0);
+    base_cgns->CreateBC(nBCRegions);
+
+    int * base_cgns_nBCElem          = base_cgns->GetNumberOfBCElements();
+    int * base_cgns_bc_elem_set_type = base_cgns->GetBoundaryElementType();
+    int * base_cgns_bc_grid_location = base_cgns->GetBoundaryGridLocation();
+    int **base_cgns_bc_conn_list     = (int**) base_cgns->GetBoundaryElementConnectionList();
+    cout << "    Warning: the cgsize_t type of conn_list has been convert to int type, when deal with GMSH grid!!!" 
+         << endl;
+    PointSetType_t ptsetType = PointList;
+
+    //! Loop over the number of boundary conditions.
+    for (int iBCRegion = 0; iBCRegion < nBCRegions; ++ iBCRegion)
+    {
+        GridLocation_t igr = FaceCenter;
+        cout << " Grid Location Name = " << GridLocationName[igr] << "\n";
+
+        if (igr == FaceCenter)
+        {
+            cout << "\nGridLocation = FaceCenter means BC data refers to elements, not nodes\n";
+        }
+        else if (igr == Vertex)
+        {
+            cout << "\nGridLocation = Vertex means BC data refers to nodes, not elements\n";
+        }
+
+        int bctype = bctype_array[iBCRegion];
+        int nBCElem = 0;
+        for (std::size_t i = 0; i < bctype_container.size(); ++ i)
+        {
+            if (bctype == bctype_container[i])
+            {
+                ++ nBCElem;
+            }
+        }
+
+        base_cgns_nBCElem         [iBCRegion] = nBCElem;
+        base_cgns_bc_conn_list    [iBCRegion] = new int [nBCElem];
+        //base_cgns->bc_type        [iBCRegion] = bocoType;
+        base_cgns_bc_elem_set_type[iBCRegion] = ptsetType;
+        base_cgns_bc_grid_location[iBCRegion] = igr;
+
+        cout << "PointSetType_t = " << ptsetType << "\n";
+
+        if (nBCElem == 2)
+        {
+            cout << base_cgns_bc_conn_list[iBCRegion][0] << " " << base_cgns_bc_conn_list[iBCRegion][1] << "\n";
+        }
+        else
+        {
+            for (int j = 0; j < MIN(20, nBCElem); ++ j)
+            {
+                cout << base_cgns_bc_conn_list[iBCRegion][j] << " ";
+            }
+            cout << "\n";
+        }
+    }
+
+    delete [] bctype_array;
+}
+
+Gmesh::Gmesh()
+{
+    //vector<string> keyword;
+    keyword.push_back("MeshFormat");
+    keyword.push_back("Nodes");
+    keyword.push_back("$Elements");
+    keyword.push_back("PhysicalNames");
+    keyword.push_back("NodeData");
+    keyword.push_back("ElementData");
+    keyword.push_back("ElementNodeData");
+
+    elem_pt = new int [NofValidElementTypes];
+
+    elem_pt[NODE   ] = 1;
+    elem_pt[BAR_2  ] = 2;
+    elem_pt[TRI_3  ] = 3;
+    elem_pt[QUAD_4 ] = 4;
+    elem_pt[TETRA_4] = 4;
+    elem_pt[PYRA_5 ] = 5;
+    elem_pt[PENTA_6] = 6;
+    elem_pt[HEXA_8 ] = 8;
+
+    NofValidElementTypesGmsh = MSH_NUM_TYPE;
+    TypeGmsh2CGNS = new int [NofValidElementTypesGmsh+1];
+
+    InitGmsh2CGNSMap();
+
+    gmesh_nvertex = new int [NofValidElementTypesGmsh];
+
+    InitGmshNVertex();
+
+    cgns_nvertex = new int [NofValidElementTypesGmsh];
+
+    InitCGNSNVertex();
+}
+
+Gmesh::~Gmesh()
+{
+    delete [] elem_pt;
+    delete [] TypeGmsh2CGNS;
+    delete [] gmesh_nvertex;
+    delete [] cgns_nvertex;
+}
+
+void Gmesh::InitGmshNVertex()
+{
+    for (int i = 0; i < NofValidElementTypesGmsh; ++ i)
+    {
+        gmesh_nvertex[i] = 1;
+    }
+
+    gmesh_nvertex[ PHSPACE::PH_MSH_LIN_2   ] = 2;
+    gmesh_nvertex[ PHSPACE::PH_MSH_TRI_3   ] = 3;
+    gmesh_nvertex[ PHSPACE::PH_MSH_QUA_4   ] = 4;
+    gmesh_nvertex[ PHSPACE::PH_MSH_TET_4   ] = 4;
+    gmesh_nvertex[ PHSPACE::PH_MSH_HEX_8   ] = 8;
+    gmesh_nvertex[ PHSPACE::PH_MSH_PRI_6   ] = 6;
+    gmesh_nvertex[ PHSPACE::PH_MSH_PYR_5   ] = 5;
+    gmesh_nvertex[ PHSPACE::PH_MSH_LIN_3   ] = 3;
+    gmesh_nvertex[ PHSPACE::PH_MSH_TRI_6   ] = 6;
+    gmesh_nvertex[ PHSPACE::PH_MSH_QUA_9   ] = 9;
+    gmesh_nvertex[ PHSPACE::PH_MSH_TET_10  ] = 10;
+    gmesh_nvertex[ PHSPACE::PH_MSH_HEX_27  ] = 27;
+    gmesh_nvertex[ PHSPACE::PH_MSH_PRI_18  ] = 18;
+    gmesh_nvertex[ PHSPACE::PH_MSH_PYR_14  ] = 14;
+    gmesh_nvertex[ PHSPACE::PH_MSH_PNT     ] = 1;
+    gmesh_nvertex[ PHSPACE::PH_MSH_QUA_8   ] = 8;
+    gmesh_nvertex[ PHSPACE::PH_MSH_HEX_20  ] = 20;
+    gmesh_nvertex[ PHSPACE::PH_MSH_PRI_15  ] = 15;
+    gmesh_nvertex[ PHSPACE::PH_MSH_PYR_13  ] = 13;
+}
+
+void Gmesh::InitGmsh2CGNSMap()
+{
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_LIN_2   ] = BAR_2;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_3   ] = TRI_3;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_4   ] = QUAD_4;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TET_4   ] = TETRA_4;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_HEX_8   ] = HEXA_8;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_PRI_6   ] = PENTA_6;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_PYR_5   ] = PYRA_5;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_LIN_3   ] = BAR_3;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_6   ] = TRI_6;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_9   ] = QUAD_9;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TET_10  ] = TETRA_10;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_HEX_27  ] = HEXA_27;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_PRI_18  ] = PENTA_18;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_PYR_14  ] = PYRA_14;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_PNT     ] = NODE;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_8   ] = QUAD_8;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_HEX_20  ] = HEXA_20;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_PRI_15  ] = PENTA_15;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_PYR_13  ] = PYRA_13;
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_9   ] = TRI_6;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_10  ] = TRI_6;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_12  ] = TRI_6;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_15  ] = TRI_6;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_15I ] = TRI_6;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_21  ] = TRI_6;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_LIN_4   ] = BAR_3;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_LIN_5   ] = BAR_3;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_LIN_6   ] = BAR_3;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TET_20  ] = TETRA_10;    //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TET_35  ] = TETRA_10;    //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TET_56  ] = TETRA_10;    //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TET_34  ] = TETRA_10;    //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TET_52  ] = TETRA_10;    //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_POLYG_  ] = NGON_n;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_POLYH_  ] = NGON_n;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_16  ] = QUAD_9;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_25  ] = QUAD_9;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_36  ] = QUAD_9;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_12  ] = QUAD_9;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_16I ] = QUAD_9;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_20  ] = QUAD_9;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_28  ] = TRI_6;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_36  ] = TRI_6;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_45  ] = TRI_6;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_55  ] = TRI_6;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_66  ] = TRI_6;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_49  ] = QUAD_9;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_64  ] = QUAD_9;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_81  ] = QUAD_9;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_100 ] = QUAD_9;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_121 ] = QUAD_9;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_18  ] = TRI_6;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_21I ] = TRI_6;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_24  ] = TRI_6;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_27  ] = TRI_6;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_30  ] = TRI_6;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_24  ] = QUAD_9;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_28  ] = QUAD_9;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_32  ] = QUAD_9;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_36I ] = QUAD_9;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_QUA_40  ] = QUAD_9;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_LIN_7   ] = BAR_3;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_LIN_8   ] = BAR_3;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_LIN_9   ] = BAR_3;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_LIN_10  ] = BAR_3;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_LIN_11  ] = BAR_3;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_LIN_B   ] = BAR_3;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TRI_B   ] = TRI_6;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_POLYG_B ] = NGON_n;      //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_LIN_C   ] = BAR_3;       //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TET_84  ] = TETRA_10;    //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TET_120 ] = TETRA_10;    //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TET_165 ] = TETRA_10;    //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TET_220 ] = TETRA_10;    //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TET_286 ] = TETRA_10;    //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_HEX_64  ] = HEXA_20;     //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_HEX_125 ] = HEXA_20;     //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_HEX_196 ] = HEXA_20;     //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TET_74  ] = TETRA_10;    //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TET_100 ] = TETRA_10;    //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TET_130 ] = TETRA_10;    //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TET_164 ] = TETRA_10;    //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_TET_202 ] = TETRA_10;    //CGNSû�ж�Ӧ����
+    TypeGmsh2CGNS[ PHSPACE::PH_MSH_NUM_TYPE] = NGON_n;      //CGNSû�ж�Ӧ����
+}
+
+void Gmesh::InitCGNSNVertex()
+{
+    for (int i = 0; i < NofValidElementTypes; ++ i)
+    {
+        cgns_nvertex[i] = 1;
+    }
+
+    cgns_nvertex[ ElementTypeNull         ] = 0;
+    cgns_nvertex[ ElementTypeUserDefined  ] = 0;
+    cgns_nvertex[ NODE                    ] = NPE_NODE;
+    cgns_nvertex[ BAR_2                   ] = NPE_BAR_2;
+    cgns_nvertex[ BAR_3                   ] = NPE_BAR_3;
+    cgns_nvertex[ TRI_3                   ] = NPE_TRI_3;
+    cgns_nvertex[ TRI_6                   ] = NPE_TRI_6;
+    cgns_nvertex[ QUAD_4                  ] = NPE_QUAD_4;
+    cgns_nvertex[ QUAD_8                  ] = NPE_QUAD_8;
+    cgns_nvertex[ QUAD_9                  ] = NPE_QUAD_9;
+    cgns_nvertex[ TETRA_4                 ] = NPE_TETRA_4;
+    cgns_nvertex[ TETRA_10                ] = NPE_TETRA_10;
+    cgns_nvertex[ PYRA_5                  ] = NPE_PYRA_5;
+    cgns_nvertex[ PYRA_14                 ] = NPE_PYRA_13;
+    cgns_nvertex[ PENTA_6                 ] = NPE_PYRA_14;
+    cgns_nvertex[ PENTA_15                ] = NPE_PENTA_6;
+    cgns_nvertex[ PENTA_18                ] = NPE_PENTA_15; 
+    cgns_nvertex[ HEXA_8                  ] = NPE_PENTA_18;
+    cgns_nvertex[ HEXA_20                 ] = NPE_HEXA_8;
+    cgns_nvertex[ HEXA_27                 ] = NPE_HEXA_20;
+    cgns_nvertex[ MIXED                   ] = NPE_HEXA_27;
+    cgns_nvertex[ PYRA_13                 ] = NPE_MIXED;
+    cgns_nvertex[ NGON_n                  ] = NPE_NGON_n;
+    cgns_nvertex[ NFACE_n                 ] = NPE_NFACE_n;
+}
+
+void Gmesh::Read(fstream &file, CGNSFactory *factory_cgns)
+{
+    ReadMeshFormat(file);
+    ReadNodes(file, factory_cgns);
+    ReadElements(file, factory_cgns);
+}
+
+void Gmesh::ReadMeshFormat(fstream &file)
+{
+    string line,word;
+    string separator = " =\t\r\n#$,;";
+    do
+    {
+        getline(file,line);
+        line = FindNextWord(line,word,separator);
+        transform(word.begin(), word.end(), word.begin(), ToLower());
+    } while (word != "meshformat");
+
+    getline(file,line);
+
+    line = FindNextWord(line,word,separator);
+    from_string< RDouble >(version_number,word,std::dec);
+
+    line = FindNextWord(line,word,separator);
+    from_string< int >(file_type,word,std::dec);
+
+    line = FindNextWord(line,word,separator);
+    from_string< int >(data_size,word,std::dec);
+
+
+    cout << "version-number = " << version_number << "\n";
+    cout << "file-type      = " << file_type      << "\n";
+    cout << "data-size      = " << data_size      << "\n";
+}
+
+void Gmesh::ReadNodes(fstream &file, CGNSFactory *factory_cgns)
+{
+    string line,word;
+    string separator = " =\t\r\n#$,;";
+    do
+    {
+        getline(file,line);
+        line = FindNextWord(line,word,separator);
+        transform(word.begin(), word.end(), word.begin(), ToLower());
+    } while (word != "nodes");
+
+    getline(file,line);
+
+    line = FindNextWord(line,word,separator);
+    from_string< int >(nTotalNode,word,std::dec);
+
+    int nBlocks = 1;
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        cout << " iZone = " << iZone << " nBlocks = " << nBlocks << "\n";
+
+        RDouble *x = new RDouble[ nTotalNode ];
+        RDouble *y = new RDouble[ nTotalNode ];
+        RDouble *z = new RDouble[ nTotalNode ];
+
+        RawGrid *rawgrid = factory_cgns->GetRawGrid(iZone);
+
+        rawgrid->SetX(x);
+        rawgrid->SetY(y);
+        rawgrid->SetZ(z);
+
+        RDouble xmin,ymin,zmin,xmax,ymax,zmax;
+        xmin = ymin = zmin =   LARGE;
+        xmax = ymax = zmax = - LARGE;
+
+        cout << " Read grid coordinates \n";
+
+        int iskip = 500000;
+        int index;
+
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            if (iNode % iskip == 0)
+            {
+                cout << " iNode = " << iNode << " nTotalNode = " << nTotalNode << "\n";
+            }
+            getline(file,line);
+            line = FindNextWord(line,word,separator);
+            from_string< int >(index,word,std::dec);
+
+            line = FindNextWord(line,word,separator);
+            from_string< RDouble >(x[iNode],word,std::dec);
+
+            line = FindNextWord(line,word,separator);
+            from_string< RDouble >(y[iNode],word,std::dec);
+
+            line = FindNextWord(line,word,separator);
+            from_string< RDouble >(z[iNode],word,std::dec);
+
+            xmin = MIN(xmin, x[iNode]);
+            ymin = MIN(ymin, y[iNode]);
+            zmin = MIN(zmin, z[iNode]);
+
+            xmax = MAX(xmax, x[iNode]);
+            ymax = MAX(ymax, y[iNode]);
+            zmax = MAX(zmax, z[iNode]);
+        }
+
+        cout << setiosflags(ios::right);
+        cout << setprecision(8);
+        cout << setiosflags(ios::scientific);
+        cout << setiosflags(ios::showpoint);
+        int wordwidth = 16;
+        cout << " xmin = " << setw(wordwidth) << xmin << " xmax = " << setw(wordwidth) << xmax << "\n";
+        cout << " ymin = " << setw(wordwidth) << ymin << " ymax = " << setw(wordwidth) << ymax << "\n";
+        cout << " zmin = " << setw(wordwidth) << zmin << " zmax = " << setw(wordwidth) << zmax << "\n";
+    }
+}
+
+//$MeshFormat
+//2.2 0 8
+//$EndMeshFormat
+//$Nodes
+//6 six mesh nodes:
+//1 0.0 0.0 0.0 node #1: coordinates (0.0, 0.0, 0.0)
+//2 1.0 0.0 0.0 node #2: coordinates (1.0, 0.0, 0.0)
+//3 1.0 1.0 0.0 etc.
+//4 0.0 1.0 0.0
+//5 2.0 0.0 0.0
+//6 2.0 1.0 0.0
+//$EndNodes
+//$Elements
+//2 two elements:
+//1 3 2 99 2 1 2 3 4 quad #1: type 3, physical 99, elementary 2, nodes 1 2 3 4
+//2 3 2 99 2 2 5 6 3 quad #2: type 3, physical 99, elementary 2, nodes 2 5 6 3
+//$EndElements
+//$NodeData
+//1 one string tag:
+//"A scalar view" the name of the view ("A scalar view")
+//1 one real tag:
+//0.0 the time value (0.0)
+//3 three integer tags:
+//0 the time step (0; time steps always start at 0)
+//1 1-component (scalar) field
+//6 six associated nodal values
+//1 0.0 value associated with node #1 (0.0)
+//2 0.1 value associated with node #2 (0.1)
+//3 0.2 etc.
+//4 0.0
+//5 0.2
+//6 0.4
+//$EndNodeData
+
+//2 two elements:
+//1 3 2 99 2 1 2 3 4 quad #1: type 3, physical 99, elementary 2, nodes 1 2 3 4
+//2 3 2 99 2 2 5 6 3 quad #2: type 3, physical 99, elementary 2, nodes 2 5 6 3
+
+//elm-number
+//is the number (index) of the n-th element in the mesh; elm-number must be a
+//postive (non-zero) integer. Note that the elm-numbers do not necessarily have
+//to form a dense nor an ordered sequence.
+//elm-type
+//number-of-tags
+//gives the number of integer tags that follow for the n-th element. By default,
+//the first tag is the number of the physical entity to which the element belongs;
+//the second is the number of the elementary geometrical entity to which the
+//element belongs; the third is the number of mesh partitions to which the element
+//belongs, followed by the partition ids (negative partition ids indicate ghost
+//cells). A zero tag is equivalent to no tag.
+
+//number-of-elements
+//elm-number elm-type number-of-tags < tag > ... node-number-list
+
+//quad #1: type 3, physical 99, elementary 2, nodes 1 2 3 4
+//#1 : 3-node triangle.type 
+//elm-number elm-type number-of-tags physical    elementary 
+//1           2          2            0          2
+//1 2 2 0 2 1 2 3 
+//2 2 2 0 2 2 4 3 
+//3 2 2 0 2 5 6 7  
+//
+//35 27 2 1 0 25 17 26 27 28
+//36 27 2 1 0 17 18 29 30 31
+//37 27 2 1 0 18 19 32 33 34
+//38 27 2 1 0 19 11 35 36 37
+//39 27 2 1 0 11 12 38 39 40
+//40 27 2 1 0 12 23 41 42 43 
+
+void Gmesh::ReadElements(fstream &file, CGNSFactory *factory_cgns)
+{
+    string line,word;
+    string separator = " =\t\r\n#$,;";
+    do
+    {
+        getline(file,line);
+        line = FindNextWord(line,word,separator);
+        transform(word.begin(), word.end(), word.begin(), ToLower());
+    } while (word != "elements");
+
+    getline(file,line);
+
+    //���е�Ԫ�������߽絥Ԫ
+    int elements = 0;
+
+    line = FindNextWord(line,word,separator);
+    from_string< int >(elements,word,std::dec);
+
+    cout << " Read grid coordinates \n";
+
+    int elem_index,gmsh_elem_type;
+    int number_of_tags;
+    int elem_tag[3];
+
+    vector<int> elem_type_container;
+    vector<int> elem_number_container;
+    vector<int> elem_index_container;
+    vector<int> elem_bctype_container;
+
+    int *node_gmsh = new int [NofValidElementTypesGmsh]();
+    int *node_cgns = new int [NofValidElementTypesGmsh]();
+
+    GmeshElem *gmshelem = new GmeshElem();
+
+    for (int i = 0; i < elements; ++ i)
+    {
+        getline(file,line);
+        line = FindNextWord(line,word,separator);
+        from_string< int >(elem_index,word,std::dec);
+
+        line = FindNextWord(line,word,separator);
+        from_string< int >(gmsh_elem_type,word,std::dec);
+
+        line = FindNextWord(line,word,separator);
+        from_string< int >(number_of_tags,word,std::dec);
+
+        for (int j = 0; j < number_of_tags; ++ j)
+        {
+            line = FindNextWord(line,word,separator);
+            from_string< int >(elem_tag[j],word,std::dec);
+        }
+
+        elem_bctype_container.push_back(elem_tag[0]);
+
+        int cgns_elem_type = TypeGmsh2CGNS[ gmsh_elem_type ];
+        int cgns_vnum = cgns_nvertex[ cgns_elem_type ];
+        int gesh_vnum = gmesh_nvertex[ gmsh_elem_type ];
+
+        elem_type_container.push_back(cgns_elem_type);
+        elem_number_container.push_back(1);
+
+        int nodeindex;
+        for (int j = 0; j < gesh_vnum; ++ j)
+        {
+            line = FindNextWord(line,word,separator);
+            from_string< int >(nodeindex,word,std::dec);
+            node_gmsh[j] = nodeindex;
+        }
+
+        ElemReorderGmsh2CGNS(cgns_elem_type, node_gmsh, node_cgns, gesh_vnum);
+        for (int j = 0; j < cgns_vnum; ++ j)
+        {
+            elem_index_container.push_back(node_cgns[j]);
+        }
+    }
+
+    gmshelem->TreatElements(factory_cgns, elem_type_container, elem_number_container, elem_index_container, elem_bctype_container, cgns_nvertex);
+
+    delete gmshelem;    gmshelem = NULL;
+    delete [] node_gmsh;    node_gmsh = NULL;
+    delete [] node_cgns;    node_cgns = NULL;
+}
+
+}
diff --git a/Main/src/GridFactory.cpp b/Main/src/GridFactory.cpp
new file mode 100644
index 0000000..c93ca37
--- /dev/null
+++ b/Main/src/GridFactory.cpp
@@ -0,0 +1,986 @@
+#include "Pre_HDF5File.h"
+#include "Glb_Dimension.h"
+#include "GridFactory.h"
+#include "GridgenIn.h"
+#include "IO_FileName.h"
+#include "TK_Parse.h"
+#include "FluentIn.h"
+#include "OverLappingGrid.h"
+#include "PHIO.h"
+#include "TK_Log.h"
+#include "Pre_StructToUnstruct.h"
+
+
+#include "FieldViewIn.h"
+#include "GridView.h"
+#include "Pre_CGNSToPlot3D_Struct.h"
+#include "Mesh_Refine_Struct.h"
+#include "Pre_CGNSToPHengLEI_Unstruct.h"
+#include "Pre_FluentToPHengLEI_Unstruct.h"
+#include "Pre_FieldViewToPHengLEI_Unstruct.h"
+#include "Pre_Plot3DToPHengLEI_Struct.h"
+#include "Pre_CGNSToPHengLEI_Struct.h"
+#include "Gmesh.h"
+#include "Pre_GridTranslator.h"
+#include "Pre_GridCombine.h"
+#include "Pre_GridMirror.h"
+#include "Mesh_Deformation.h"
+#include "Mesh_Refine_Unstruct.h"
+#pragma warning (disable:913)
+
+namespace PHSPACE
+{
+void CreateGrid()
+{
+    int gridObject = GlobalDataBase::GetIntParaFromDB("gridobj");
+
+    switch (gridObject)
+    {
+    case PHSPACE::GRID_CONVERSION:
+        ConvertGrid();
+        break;
+    case PHSPACE::GRID_REFINE:
+        RefineGrid();
+        break;
+    case PHSPACE::GRID_MERGING:
+        CombineGrid();
+        break;
+    case PHSPACE::GRID_DEFORMATION:
+        DeformGrid();
+        break;
+    case PHSPACE::GRID_MIRROR:
+        MirrorGrid();
+        break;
+    case PHSPACE::GRID_STRTOUNS:
+        StructToUnstructGrid();
+    default:
+        break;
+    }
+}
+
+void OversetGridView()
+{
+    BlockGroupManager *blockGroupManager = new BlockGroupManager();
+    blockGroupManager->Run();
+    delete blockGroupManager;
+
+    return;
+}
+
+void ReadGMSH(CGNSFactory *&factoryCGNS, int &numberOfBlocks, const string &filename)
+{
+    fstream file;
+    file.open(filename.c_str(), ios_base::in);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(filename);
+    }
+
+    numberOfBlocks = 1;
+
+    factoryCGNS = new CGNSFactory(numberOfBlocks);
+
+    Gmesh *gmsh = new Gmesh();
+    gmsh->Read(file, factoryCGNS);
+    delete gmsh;
+
+    file.close();
+    file.clear();
+}
+
+void GridgenToPHengLEI()
+{
+    string fromGridFile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+    string outGridFile  = GlobalDataBase::GetStrParaFromDB("out_gfile");
+    string boundaryFile = GlobalDataBase::GetStrParaFromDB("bnd_file");
+    int dumpOldGrid = GlobalDataBase::GetIntParaFromDB("dumpOldGrid");
+
+    int codeOfOversetGrid = GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+
+    int numberOfBlocks;
+    Grid **structgrids;
+    ReadGridgenGrid(structgrids, numberOfBlocks, fromGridFile, boundaryFile);
+
+    int ndim = PHSPACE::GetDim();
+    int periodicType = PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType");
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        structgrids[iZone]->SetLnkInfo();
+    }
+
+    if (ndim == TWO_D || codeOfOversetGrid == 10 || (ndim == THREE_D && periodicType != 0))
+    {
+        CheckMeshMultigrid(structgrids, numberOfBlocks);
+
+        for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+        {
+            structgrids[iZone]->ProcessBCInfo();
+        }
+
+        ConstructGlobalInterfaceLink(structgrids, numberOfBlocks);
+
+        if (dumpOldGrid)
+        {
+            WriteLnkFile(outGridFile, structgrids, numberOfBlocks);
+        }
+
+        DumpGrid(outGridFile, structgrids, numberOfBlocks);
+        WriteBoundaryInfo(structgrids, numberOfBlocks);
+        DumpCharacteristicBoundary(outGridFile, structgrids, numberOfBlocks);
+        WriteBCNameInfo(outGridFile, structgrids, numberOfBlocks);
+
+        for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+        {
+            delete structgrids[iZone];
+        }
+        delete [] structgrids;
+    }
+    else
+    {
+        if (dumpOldGrid)
+        {
+            WriteLnkFile(outGridFile, structgrids, numberOfBlocks);
+        }
+
+        CheckMeshMultigrid(structgrids, numberOfBlocks);
+        GridTranslator *gridTranslator = new GridTranslator(structgrids, numberOfBlocks);
+        gridTranslator->Run();
+
+        WriteBoundaryInfo(structgrids, numberOfBlocks);
+        DumpCharacteristicBoundary(outGridFile, structgrids, numberOfBlocks);
+        WriteBCNameInfo(outGridFile, structgrids, numberOfBlocks);
+
+        delete gridTranslator;
+    }
+}
+
+void GMSH2PHengLEI()
+{
+    string fromGridFile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+    string outGridFile = GlobalDataBase::GetStrParaFromDB("out_gfile");
+
+    int numberOfBlocks;
+    CGNSFactory *factoryCGNS;
+    ReadGMSH(factoryCGNS, numberOfBlocks, fromGridFile);
+
+    factoryCGNS->ConvertGrid2Fantasy();
+
+    Grid **grids = new Grid * [numberOfBlocks];
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        GridID *index = new GridID(iZone);
+        Grid *grid = CreateGridGeneral(UNSTRUCTGRID, index, 0, GetDim());
+        grids[iZone] = grid;
+        CGNS2UnsGrid(factoryCGNS, iZone, UnstructGridCast(grid));
+    }
+
+    delete factoryCGNS;
+
+    ConstructGlobalInterfaceLink(grids, numberOfBlocks);
+    DumpGrid(outGridFile, grids, numberOfBlocks);
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        delete grids[iZone];
+    }
+    delete [] grids;
+}
+
+void Ustar2PHengLEI()
+{
+    string fromGridFile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+    string outGridFile = GlobalDataBase::GetStrParaFromDB("out_gfile");
+
+    int numberOfBlocks = 1;
+    Grid **grids = new Grid * [numberOfBlocks];
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        GridID *index = new GridID(iZone);
+        Grid *grid = CreateGridGeneral(UNSTRUCTGRID, index, 0, GetDim());
+        grids[iZone] = grid;
+        ReadUstarGrid(fromGridFile, UnstructGridCast(grid));
+        grid->ComputeMinMaxBox();
+    }
+
+    ConstructGlobalInterfaceLink(grids, numberOfBlocks);
+    DumpGrid(outGridFile, grids, numberOfBlocks);
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        delete grids[iZone];
+    }
+    delete [] grids;
+}
+
+void Plot3DToPHengLEI()
+{
+    string fromGridFile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+    string outGridFile  = GlobalDataBase::GetStrParaFromDB("out_gfile");
+    string boundaryFile = GlobalDataBase::GetStrParaFromDB("bnd_file");
+    int dumpOldGrid = GlobalDataBase::GetIntParaFromDB("dumpOldGrid");
+
+    int isOverset = GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+
+    int numberOfBlocks;
+    Grid **structgrids;
+    ReadPlot3dGrid(structgrids, numberOfBlocks, fromGridFile, boundaryFile);
+
+    int ndim = PHSPACE::GetDim();
+    int periodicType = PHSPACE::GlobalDataBase::GetIntParaFromDB("periodicType");
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        structgrids[iZone]->SetLnkInfo();
+    }
+
+    if (ndim == TWO_D || isOverset || (ndim == THREE_D && periodicType != 0))
+    {
+        CheckMeshMultigrid(structgrids, numberOfBlocks);
+
+        for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+        {
+            structgrids[iZone]->ProcessBCInfo();
+        }
+
+        ConstructGlobalInterfaceLink(structgrids, numberOfBlocks);
+
+        if (dumpOldGrid)
+        {
+            WriteLnkFile(outGridFile, structgrids, numberOfBlocks);
+        }
+
+        DumpGrid(outGridFile, structgrids, numberOfBlocks);
+        WriteBoundaryInfo(structgrids, numberOfBlocks);
+        DumpCharacteristicBoundary(outGridFile, structgrids, numberOfBlocks);
+        WriteBCNameInfo(outGridFile, structgrids, numberOfBlocks);
+
+        for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+        {
+            delete structgrids[iZone];
+        }
+        delete [] structgrids;
+    }
+    else
+    {
+        if (dumpOldGrid)
+        {
+            WriteLnkFile(outGridFile, structgrids, numberOfBlocks);
+        }
+
+        CheckMeshMultigrid(structgrids, numberOfBlocks);
+        GridTranslator *gridTranslator = new GridTranslator(structgrids, numberOfBlocks);
+        gridTranslator->Run();
+
+        WriteBoundaryInfo(structgrids, numberOfBlocks);
+        DumpCharacteristicBoundary(outGridFile, structgrids, numberOfBlocks);
+        WriteBCNameInfo(outGridFile, structgrids, numberOfBlocks);
+
+        delete gridTranslator;
+    }
+}
+
+void Plot3DGridProcess()
+{
+    int toGridType = GlobalDataBase::GetIntParaFromDB("to_gtype");
+
+    if (toGridType == PHENGLEI_TYPE)
+    {
+        Plot3DToPHengLEI();
+    }
+}
+
+void CGNS2StructGrid()
+{
+    string cgnsfile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+
+    Pre_CGNSToPlot3D_Struct cgnsGridConversion(cgnsfile);
+
+    cgnsGridConversion.Run();
+
+    Plot3DGridProcess();
+}
+
+void CGNS2UnstructGrid()
+{
+    string fromGridFile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+    string outGridFile = GlobalDataBase::GetStrParaFromDB("out_gfile");
+
+    //! Read CGNS grid and convert it's format.
+    Pre_CGNSToPHengLEI_Unstruct cgnsGridConversion(fromGridFile);
+    cgnsGridConversion.Run();
+
+    int numberOfBlocks = cgnsGridConversion.GetNumberofBlocks();
+    Grid **grids = cgnsGridConversion.GetGrids();
+
+    //! Construct block connection and dump out to file.
+    ConstructGlobalInterfaceLink(grids, numberOfBlocks);
+
+    int referenceFrame = PHSPACE::GlobalDataBase::GetIntParaFromDB("referenceFrame");
+    int nTurboZone = 1;
+    if (referenceFrame == ROTATIONAL_FRAME)
+    {
+        nTurboZone = PHSPACE::GlobalDataBase::GetIntParaFromDB("nTurboZone");
+    }
+
+    int hasVolumeCondition = GlobalDataBase::GetIntParaFromDB("hasVolumeCondition");
+    if ((numberOfBlocks > 1) && (!hasVolumeCondition) && nTurboZone<=1)
+    {
+        cout << "\n";
+        cout << "Blocks > 1, Start to Combine Grids" << endl;
+        CombinGrid *combinedGrid = new CombinGrid(0, grids, numberOfBlocks);
+
+        combinedGrid->RunCombinGrid();
+
+        Grid **gridMerged = combinedGrid->GetGridAll();
+
+        for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+        {
+            delete grids[iZone];
+        }
+
+        grids = gridMerged;
+
+        numberOfBlocks = 1;
+        cgnsGridConversion.SetNumberofBlocks(numberOfBlocks);
+
+        DumpGrid(outGridFile, gridMerged, 1);
+
+        delete combinedGrid;
+    }
+    else
+    {
+        DumpGrid(outGridFile, grids, numberOfBlocks);
+    }
+
+    cgnsGridConversion.WriteAdditionalInformation(outGridFile, grids);
+    DumpCharacteristicBoundary(outGridFile, grids, numberOfBlocks);
+
+    delete grids[0];
+}
+
+void Fantasy2Plot3D()
+{
+    string fromGridFile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+    GlobalDataBase::UpdateData("gridfile", &fromGridFile, PHSTRING, 1);
+
+    string outGridFile = GlobalDataBase::GetStrParaFromDB("out_gfile");
+
+    string fname, fext;
+    GetNameExt(outGridFile, fname, fext, ".");
+
+    string cellFile = fname + ".grd";
+    string boundaryFile = fname + ".inp";
+
+    using namespace PHMPI;
+
+    Region *region = new Region();
+
+    region->ReadGrid();
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    Grid **Grids = new Grid * [nZones];
+
+    for (int iZone = 0; iZone < nZones; iZone ++)
+    {
+        Grids[iZone] = GetGrid(iZone, 0);
+    }
+
+    ReProcessBCInfo(Grids, nZones);
+    ReadLnkFile(fromGridFile, Grids, nZones);
+
+    cout << endl << "Writing grd file ...." << endl;
+    FantasyWriteToGrd(cellFile, Grids, nZones);
+    FantasyWriteToInp(boundaryFile, Grids, nZones);
+
+    delete region;
+}
+
+void FantasyOld2New()
+{
+    string fromGridFile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+    GlobalDataBase::UpdateData("gridfile", &fromGridFile, PHSTRING, 1);
+
+    string outGridFile = GlobalDataBase::GetStrParaFromDB("out_gfile");
+
+    Region *region = new Region();
+    region->ReadGrid();
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    Grid **Grids = new Grid * [nZones];
+
+    for (int iZone = 0; iZone < nZones; iZone ++)
+    {
+        Grids[iZone] = GetGrid(iZone);
+    }
+
+    DumpGrid(outGridFile, Grids, nZones);
+
+    delete region;
+}
+
+Pre_GridConversion * GetConvertType(const string &gridFileName, int gridType, int fromGridType)
+{
+    Pre_GridConversion *gridConversion = NULL;
+    if (gridType == UNSTRUCTGRID)
+    {
+        switch (fromGridType)
+        {
+        case CGNS_TYPE:
+            gridConversion = new Pre_CGNSToPHengLEI_Unstruct(gridFileName);
+            break;
+        case FLUENT_TYPE:
+            gridConversion = new Pre_FluentToPHengLEI_Unstruct(gridFileName);
+            break;
+        case FIELDVIEW_TYPE:
+            gridConversion = new Pre_FieldViewToPHengLEI_Unstruct(gridFileName);
+            break;
+        default:
+            TK_Exit::UnexpectedVarValue("from_gtype", fromGridType);
+            break;
+        }
+    }
+    else if (gridType == STRUCTGRID)
+    {
+        switch (fromGridType)
+        {
+        case CGNS_TYPE:
+            gridConversion = new Pre_CGNSToPHengLEI_Struct(gridFileName);
+            break;
+        case PLOT3D_TYPE:
+            gridConversion = new Pre_Plot3DToPHengLEI_Struct(gridFileName);
+            break;
+        default:
+            TK_Exit::UnexpectedVarValue("from_gtype", fromGridType);
+            break;
+        }
+    }
+    else
+    {
+        TK_Exit::UnexpectedVarValue("gridtype", gridType);
+    }
+
+    return gridConversion;
+}
+
+void GridgenGridProcess()
+{
+    int toGridType = GlobalDataBase::GetIntParaFromDB("to_gtype");
+
+    if (toGridType == PHENGLEI_TYPE)
+    {
+        GridgenToPHengLEI();
+    }
+}
+
+void GmeshGridProcess()
+{
+    int toGridType = GlobalDataBase::GetIntParaFromDB("to_gtype");
+
+    if (toGridType == PHENGLEI_TYPE)
+    {
+        GMSH2PHengLEI();
+    }
+}
+
+void UstarGridProcess()
+{
+    int toGridType = GlobalDataBase::GetIntParaFromDB("to_gtype");
+
+    if (toGridType == PHENGLEI_TYPE)
+    {
+        Ustar2PHengLEI();
+    }
+}
+
+void FluentGridProcess()
+{
+    int toGridType = GlobalDataBase::GetIntParaFromDB("to_gtype");
+
+    if (toGridType == PHENGLEI_TYPE)
+    {
+        Fluent2PHengLEI();
+    }
+}
+
+void FieldViewGridProcess()
+{
+    int toGridType = GlobalDataBase::GetIntParaFromDB("to_gtype");
+
+    if (toGridType == PHENGLEI_TYPE)
+    {
+        FieldView2PHengLEI();
+    }
+}
+
+void CGNSGridProcess()
+{
+    int gridtype = GlobalDataBase::GetIntParaFromDB("gridtype");
+
+    if (gridtype == STRUCTGRID)
+    {
+        CGNS2StructGrid();
+    }
+    else if (gridtype == UNSTRUCTGRID)
+    {
+        CGNS2UnstructGrid();
+    }
+}
+
+void Fantasy2Fluent()
+{
+    string fromGridFile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+    GlobalDataBase::UpdateData("gridfile", &fromGridFile, PHSTRING, 1);
+
+    string outGridFile = GlobalDataBase::GetStrParaFromDB("out_gfile");
+
+    using namespace PHMPI;
+
+    Region *region = new Region();
+    region->ReadGrid();
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    Grid **grids = new Grid * [nZones];
+
+    for (int iZone = 0; iZone < nZones; iZone ++)
+    {
+        grids[iZone] = GetGrid(iZone, 0);
+    }
+
+    if (nZones > 1)
+    {
+        cout << "\n";
+        cout << "Blocks > 1, Start to Combine Grids" << endl;
+        CombinGrid *combinedGrid = new CombinGrid(0, grids, nZones);
+        combinedGrid->RunCombinGrid();
+
+        Grid **gridMerged = combinedGrid->GetGridAll();
+
+        FantasyWriteToFluent(outGridFile, gridMerged);
+
+        delete gridMerged[0];
+        delete []gridMerged;
+        delete combinedGrid;
+    }
+    else
+    {
+        FantasyWriteToFluent(outGridFile, grids);
+    }
+
+    delete []grids;
+    delete region;
+}
+
+void FantasyGridProcess()
+{
+    int toGridType = GlobalDataBase::GetIntParaFromDB("to_gtype");
+
+    if (toGridType == USTAR_TYPE)
+    {
+        Fantasy2Ustar();
+    }
+    else if (toGridType == PLOT3D_TYPE)
+    {
+        Fantasy2Plot3D();
+    }
+    else if (toGridType == PHENGLEI_TYPE)
+    {
+        FantasyOld2New();
+    }
+    else if (toGridType == FLUENT_TYPE)
+    {
+        Fantasy2Fluent();
+    }
+
+}
+
+void MixedGridProcess()
+{
+    int fromGridType = MIXGRID_TYPE;
+    int omitBlankBC = 0;
+    GlobalDataBase::UpdateData("from_gtype", &fromGridType, PHINT, 1);
+    GlobalDataBase::UpdateData("omit_no_bound_bc", &omitBlankBC, PHINT, 1);
+
+    int numberOfGridGroups = 2;
+    string structGridInMixture = GlobalDataBase::GetStrParaFromDB("mixgrid_str");
+    string unstructGridInMixture = GlobalDataBase::GetStrParaFromDB("mixgrid_uns");
+
+    GlobalDataBase::UpdateData("gridfile", &structGridInMixture, PHSTRING, 1);
+    GlobalDataBase::UpdateData("gridfile1", &unstructGridInMixture, PHSTRING, 1);
+    GlobalDataBase::UpdateData("numberOfGridGroups", &numberOfGridGroups, PHINT, 1);
+
+    Region *region = new Region();
+    region->ReadGrid();
+    region->BuildAndDumpMixedGrid();
+    delete region;
+}
+
+void MultiGridConvert()
+{
+    int toGridType = GlobalDataBase::GetIntParaFromDB("to_gtype");
+    if (toGridType != PHENGLEI_TYPE)
+    {
+        ostringstream oss;
+        oss << "  Error: this situation has not been considered, for to_gtype" << " = " << toGridType << " when numberOfGridFile > 1" << endl;
+        TK_Exit::ExceptionExit(oss.str());
+    }
+
+    int fromGridType = GlobalDataBase::GetIntParaFromDB("from_gtype");
+    int gridType = GlobalDataBase::GetIntParaFromDB("gridtype");
+
+    int numberOfGridFile = PHSPACE::GlobalDataBase::GetIntParaFromDB("numberOfGridFile");
+    PHVectorString1D gridFileNameList;
+    gridFileNameList.push_back(PHSPACE::GlobalDataBase::GetStrParaFromDB("from_gfile"));
+
+    for (int iGridFile = 1; iGridFile < numberOfGridFile; ++ iGridFile)
+    {
+        ostringstream oss;
+        oss << "from_gfile" << iGridFile;
+        gridFileNameList.push_back(PHSPACE::GlobalDataBase::GetStrParaFromDB(oss.str()));
+    }
+
+    vector <Grid *> totalGrids;
+    totalGrids.resize(0);
+
+    for (int iGridFile = 0; iGridFile < numberOfGridFile; ++ iGridFile)
+    {
+        string gridFileName = gridFileNameList[iGridFile];
+        Pre_GridConversion *gridConversion = GetConvertType(gridFileName, gridType, fromGridType);
+        gridConversion->Run();
+
+        int nZones = gridConversion->GetNumberofBlocks();
+        Grid **grids = gridConversion->GetGrids();
+
+        ConstructGlobalInterfaceLink(grids, nZones);
+
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            grids[iZone]->SetFileIndex(iGridFile);
+            totalGrids.push_back(grids[iZone]);
+        }
+
+        string outGridFile = ChangeExtensionOfFileName(gridFileName, "fts");
+        DumpGrid(outGridFile, grids, nZones);
+        DumpCharacteristicBoundary(outGridFile, grids, nZones);
+        WriteBCNameInfo(outGridFile, grids, nZones);
+
+        delete gridConversion;
+        delete [] grids;
+    }
+
+    WriteBoundaryInfo(&totalGrids[0], static_cast<int>(totalGrids.size()));
+
+    for (int iZone = 0; iZone < totalGrids.size(); ++ iZone)
+    {
+        delete totalGrids[iZone];
+    }
+}
+
+void ConvertGrid()
+{
+    int numberOfGridFile = GlobalDataBase::GetIntParaFromDB("numberOfGridFile");
+    if (numberOfGridFile > 1)
+    {
+        MultiGridConvert();
+        return;
+    }
+
+    int fromGridType = GlobalDataBase::GetIntParaFromDB("from_gtype");
+    int gridType     = GlobalDataBase::GetIntParaFromDB("gridtype");
+
+    if (gridType == MIXGRID)
+    {
+        MixedGridProcess();
+    }
+    else
+    {
+        switch (fromGridType)
+        {
+        case PHENGLEI_TYPE:
+            FantasyGridProcess();
+            break;
+        case CGNS_TYPE:
+            CGNSGridProcess();
+            break;
+        case PLOT3D_TYPE:
+            Plot3DGridProcess();
+            break;
+        case FIELDVIEW_TYPE:
+            FieldViewGridProcess();
+            break;
+        case FLUENT_TYPE:
+            FluentGridProcess();
+            break;
+        case USTAR_TYPE:
+            UstarGridProcess();
+            break;
+        case GMSH_TYPE:
+            GmeshGridProcess();
+            break;
+        case GRIDGEN_TYPE:
+            GridgenGridProcess();
+            break;
+        default:
+            TK_Exit::UnexpectedVarValue("from_gtype", fromGridType);
+            break;
+        }
+    }
+}
+
+void RefineGrid()
+{
+    RefineParameter *refineParameter = new RefineParameter();
+    int anisoRefine = GlobalDataBase::GetIntParaFromDB("anisoRefine");
+
+    refineParameter->SetAnisoRefineType(anisoRefine);
+
+    int gridtype = GlobalDataBase::GetIntParaFromDB("gridtype");
+    string fromGridFile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+    Mesh_Refine *meshRefine = 0;
+    if (gridtype == UNSTRUCTGRID)
+    {
+        meshRefine = new Mesh_Refine_Unstruct(fromGridFile);
+    }
+    else if (gridtype == STRUCTGRID)
+    {
+        meshRefine = new Mesh_Refine_Struct(fromGridFile);
+
+    }
+    meshRefine->SetRefineParameter(refineParameter);
+    meshRefine->Run();
+
+    delete refineParameter;
+    delete meshRefine;
+}
+
+void CombineGrid()
+{
+    string fromGridFile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+    string outGridFile = GlobalDataBase::GetStrParaFromDB("out_gfile");
+    GlobalDataBase::UpdateData("gridfile", &fromGridFile, PHSTRING, 1);
+
+    Region *region = new Region();
+    region->ReadGrid();
+    region->SetupMultiBlockRelationship();
+
+    using namespace PHMPI;
+    int nZones = GetNumberofGlobalZones();
+    if (nZones < 2)
+    {
+        TK_Exit::ExceptionExit("/n Error: number of blocks < 2, don't need to merge or combine grid!");
+    }
+
+    int nLocalZones = GetNumberofLocalZones();
+    Grid **grids = new Grid * [nLocalZones];
+    for (int iZone = 0; iZone < nLocalZones; ++ iZone)
+    {
+        int zoneID = GetLocalZoneIDToGlobalZoneID(iZone);
+        grids[iZone] = GetGrid(zoneID);
+    }
+
+    CombinGrid *combinedGrid = new CombinGrid(region, grids, nLocalZones);
+
+    combinedGrid->RunCombinGrid();
+
+    //combinedGrid->DumpMergedGrid(outGridFile, combinedGrid->GetGridAll(), 1);
+    DumpGrid(outGridFile, combinedGrid->GetGridAll(), 1);
+    delete combinedGrid;    combinedGrid = NULL;
+    delete region;    region = NULL;
+}
+
+void RepairGrid()
+{
+}
+
+void MirrorGrid()
+{
+    string fromGridFile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+
+    Pre_GridMirror GridMirror(fromGridFile);
+
+    GridMirror.Run();
+}
+
+void StructToUnstructGrid()
+{
+    //! Read grid.
+    string fromGridFile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+    GlobalDataBase::UpdateData("gridfile", &fromGridFile, PHSTRING, 1);
+    Region *region = new Region();
+    region->ReadGrid();
+
+    //! Get struct grid.
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    Grid **structGrid = new Grid * [nZones];
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        structGrid[iZone] = GetGrid(iZone);
+    }
+
+    //! Struct to unstruct grid.
+    Pre_StructToUnstruct *struct2Unstruct = new Pre_StructToUnstruct(structGrid, nZones);
+    struct2Unstruct->Run();
+
+    //! Dump grid.
+    Grid **unstructGrid = struct2Unstruct->GetUnstructGrids();
+    string outGridFile = GlobalDataBase::GetStrParaFromDB("out_gfile");
+    DumpGrid(outGridFile, unstructGrid, nZones);
+
+    delete [] structGrid;
+    delete struct2Unstruct;
+    delete region;
+}
+
+void GridgenToMIX()
+{
+    string fromGridFile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+    string outGridFile  = GlobalDataBase::GetStrParaFromDB("out_gfile");
+    string boundaryFile = GlobalDataBase::GetStrParaFromDB("bnd_file");
+
+    int numberOfBlocks;
+    Grid **structgrids;
+    ReadPlot3dGrid(structgrids, numberOfBlocks, fromGridFile, boundaryFile);
+
+    Grid **grids = new Grid * [numberOfBlocks];
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        GridID *index = new GridID(iZone);
+        Grid *grid;
+        if (iZone % 2 != 0)
+        {
+            grid = CreateGridGeneral(UNSTRUCTGRID, index, 0, GetDim());
+            grids[iZone] = grid;
+            StrGridToUnsGrid(StructGridCast(structgrids[iZone]), UnstructGridCast(grid));
+        }
+        else
+        {
+            grid = CreateGridGeneral(STRUCTGRID, index, 0, GetDim());
+            grids[iZone] = grid;
+            StructGridCast(grid)->CopyGrid(StructGridCast(structgrids[iZone]));
+            grid->ProcessBCInfo();
+        }
+    }
+
+    ConstructGlobalInterfaceLink(grids, numberOfBlocks);
+    DumpGrid(outGridFile, grids, numberOfBlocks);
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        delete grids[iZone];
+    }
+    delete [] grids;
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        delete structgrids[iZone];
+    }
+    delete [] structgrids;
+}
+
+void GridgenToMBlockUns()
+{
+    string fromGridFile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+    string outGridFile  = GlobalDataBase::GetStrParaFromDB("out_gfile");
+    string boundaryFile = GlobalDataBase::GetStrParaFromDB("bnd_file");
+
+    int numberOfBlocks;
+
+    Grid **structgrids;
+    ReadPlot3dGrid(structgrids, numberOfBlocks, fromGridFile, boundaryFile);
+
+    Grid **grids = new Grid * [numberOfBlocks];
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        GridID *index = new GridID(iZone);
+        Grid *grid = CreateGridGeneral(UNSTRUCTGRID, index, 0, GetDim());
+        grids[iZone] = grid;
+        StrGridToUnsGrid(StructGridCast(structgrids[iZone]), UnstructGridCast(grid));
+    }
+
+    ConstructGlobalInterfaceLink(grids, numberOfBlocks);
+    DumpGrid(outGridFile, grids, numberOfBlocks);
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        delete grids[iZone];
+    }
+    delete [] grids;
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        delete structgrids[iZone];
+    }
+    delete [] structgrids;
+}
+
+void GridgenToSingleUns()
+{
+    string fromGridFile = GlobalDataBase::GetStrParaFromDB("from_gfile");
+    string outGridFile  = GlobalDataBase::GetStrParaFromDB("out_gfile");
+    string boundaryFile = GlobalDataBase::GetStrParaFromDB("bnd_file");
+
+    int nBlocks;
+    Grid **structgrids;
+    ReadPlot3dGrid(structgrids, nBlocks, fromGridFile, boundaryFile);
+
+    int numberOfBlocks = 1;
+
+    Grid **grids = new Grid * [numberOfBlocks];
+
+    int nb = 0;
+    GridID *index = new GridID(nb);
+    Grid *grid = CreateGridGeneral(UNSTRUCTGRID, index, 0, GetDim());
+    grids[nb] = grid;
+
+    StrGridToUnsGrid(structgrids, nBlocks, UnstructGridCast(grid));
+
+    ConstructGlobalInterfaceLink(grids, numberOfBlocks);
+    DumpGrid(outGridFile, grids, numberOfBlocks);
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        delete grids[iZone];
+    }
+    delete [] grids;
+
+    for (int iBlock = 0; iBlock < nBlocks; ++ iBlock)
+    {
+        delete structgrids[iBlock];
+    }
+    delete [] structgrids;
+}
+
+void Gridgen2Fantasy()
+{
+    int gridtype   = GlobalDataBase::GetIntParaFromDB("gridtype");
+    int multiblock = GlobalDataBase::GetIntParaFromDB("multiblock");
+
+    int sys_gridtype;
+    if (gridtype == 0)
+    {
+        sys_gridtype = UNSTRUCTGRID;
+        GlobalDataBase::UpdateData("sys_gridtype", &sys_gridtype, PHINT, 1);
+
+        if (multiblock)
+        {
+            GridgenToMBlockUns();
+        }
+        else
+        {
+            GridgenToSingleUns();
+        }
+    }
+    else if (gridtype == 1)
+    {
+        sys_gridtype = STRUCTGRID;
+        GlobalDataBase::UpdateData("sys_gridtype", &sys_gridtype, PHINT, 1);
+
+        Plot3DToPHengLEI();
+    }
+}
+
+}
+
diff --git a/Main/src/GridPartition.cpp b/Main/src/GridPartition.cpp
new file mode 100644
index 0000000..d019882
--- /dev/null
+++ b/Main/src/GridPartition.cpp
@@ -0,0 +1,1009 @@
+#include "Glb_Dimension.h"
+#include "GridPartition.h"
+#include "Pre_UnstructGridPartition.h"
+#include "TK_Parse.h"
+#include "GridgenIn.h"
+#include "Pre_StructGridPartition.h"
+#include "GridType.h"
+#include "TK_Log.h"
+#include "IO_FileName.h"
+
+using namespace std;
+
+#pragma warning (disable:913)
+namespace PHSPACE
+{
+void PartitionGrid()
+{
+    int axisup = 1;
+    GlobalDataBase::UpdateData("axisup", &axisup, PHINT, 1);
+
+    int numberOfGridFile = GlobalDataBase::GetIntParaFromDB("numberOfGridFile");
+    if (numberOfGridFile > 1)
+    {
+        MultiGridPartition();
+        return;
+    }
+
+    int partitionedGridType = GlobalDataBase::GetIntParaFromDB("pgridtype");
+    if (partitionedGridType == UNSTRUCTGRID)
+    {
+        PartitionUnstructGrid();
+    }
+    else if (partitionedGridType == STRUCTGRID)
+    {
+        PartitionStructGrid();
+    }
+}
+
+void MultiGridPartition()
+{
+    PHVectorString1D gridFileNameList;
+    PHVectorString1D outFileNameList;
+    PHVectorInt1D gridTypeList;
+    PHVectorInt1D maxProcList;
+
+    GetPartitionPara(gridFileNameList, outFileNameList, gridTypeList, maxProcList);
+    int axisup = 1;
+    GlobalDataBase::UpdateData("axisup", &axisup, PHINT, 1);
+
+    int numberOfGridFile = GlobalDataBase::GetIntParaFromDB("numberOfGridFile");
+    for (int iGridFile = 0; iGridFile < numberOfGridFile; ++ iGridFile)
+    {
+        int pgridtype = gridTypeList[iGridFile];
+        int maxproc = maxProcList[iGridFile];
+        string original_grid_file  = gridFileNameList[iGridFile];
+        string partition_grid_file = outFileNameList[iGridFile];
+
+        GlobalDataBase::UpdateData("pgridtype", &pgridtype, PHINT, 1);
+        GlobalDataBase::UpdateData("maxproc", &maxproc, PHINT, 1);
+        GlobalDataBase::UpdateData("original_grid_file", &original_grid_file, PHSTRING, 1);
+        GlobalDataBase::UpdateData("partition_grid_file", &partition_grid_file, PHSTRING, 1);
+
+        if (pgridtype == UNSTRUCTGRID)
+        {
+            PartitionUnstructGrid();
+        }
+        else if (pgridtype == STRUCTGRID)
+        {
+            PartitionStructGrid();
+        }
+
+        DeleteGGrids();
+        PHMPI::SetNumberofLocalZones(0);
+    }
+}
+
+void GetPartitionPara(PHVectorString1D &gridFileNameList, PHVectorString1D &outFileNameList, PHVectorInt1D &gridTypeList, PHVectorInt1D &maxProcList)
+{
+    gridFileNameList.push_back(PHSPACE::GlobalDataBase::GetStrParaFromDB("original_grid_file"));
+    gridTypeList.push_back(PHSPACE::GlobalDataBase::GetIntParaFromDB("pgridtype"));
+    maxProcList.push_back(PHSPACE::GlobalDataBase::GetIntParaFromDB("maxproc"));
+    outFileNameList.push_back(AddSymbolToFileName(gridFileNameList[0], "__", maxProcList[0]));
+
+    int numberOfGridFile = GlobalDataBase::GetIntParaFromDB("numberOfGridFile");
+    for (int iGridFile = 1; iGridFile < numberOfGridFile; ++ iGridFile)
+    {
+        ostringstream ossFileName;
+        ossFileName << "original_grid_file" << iGridFile;
+        gridFileNameList.push_back(PHSPACE::GlobalDataBase::GetStrParaFromDB(ossFileName.str()));
+
+        ostringstream ossGridType;
+        ossGridType << "pgridtype" << iGridFile;
+        gridTypeList.push_back(PHSPACE::GlobalDataBase::GetIntParaFromDB(ossGridType.str()));
+
+        ostringstream ossMaxProc;
+        ossMaxProc << "maxproc" << iGridFile;
+        maxProcList.push_back(PHSPACE::GlobalDataBase::GetIntParaFromDB(ossMaxProc.str()));
+
+        outFileNameList.push_back(AddSymbolToFileName(gridFileNameList[iGridFile], "__", maxProcList[iGridFile]));
+    }
+}
+
+void PartitionStructGrid()
+{
+    int maximumProcess = PHSPACE::GlobalDataBase::GetIntParaFromDB("maxproc");
+
+    if (maximumProcess < 2)
+    {
+        return;
+    }
+
+    Pre_StrGridPartition blockSplittingManager(maximumProcess);
+
+    blockSplittingManager.Run();
+}
+
+void PartitionUnstructGrid()
+{
+    string originalGridFile = GlobalDataBase::GetStrParaFromDB("original_grid_file");
+    GlobalDataBase::UpdateData("gridfile", &originalGridFile, PHSTRING, 1);
+
+    string partitionGridFile = GlobalDataBase::GetStrParaFromDB("partition_grid_file");
+
+    int nProcessor = GlobalDataBase::GetIntParaFromDB("maxproc");
+    int partMethod = GlobalDataBase::GetIntParaFromDB("npartmethod");
+
+    Grid **parititionGrids = 0;
+
+    Region *region = new Region();
+
+    int numberOfProcessor = PHMPI::GetNumberOfProcessor();
+    if (numberOfProcessor == 1)
+    {
+        //! Serial partition.
+        //! Step1: Read the original grid.
+        region->ReadGrid();
+
+        int nZones = PHMPI::GetNumberofGlobalZones();
+        PrintToWindow("Number of original && final partitions: ", nZones, nProcessor, "\n");
+        if (nZones > 1)
+        {
+            TK_Exit::ExceptionExit("Error: could not partition Multi Zones serially, using parallel please!");
+        }
+
+        //! Step2: partition grid serially.
+        Grid *grid = GetGrid(0, 0);
+
+        Pre_UnstructGridPartition unstructGridParition(UnstructGridCast(grid), nProcessor, partMethod, originalGridFile);
+
+        unstructGridParition.PartitionGridSerial(partitionGridFile);
+
+        unstructGridParition.DumpPartitionGrids(partitionGridFile);
+
+        parititionGrids = unstructGridParition.GetPartitionGrids();
+    }
+    else
+    {
+        int parallelPartitionMethod = METIS_METHOD;
+        GlobalDataBase::GetData("parallelPartitionMethod", &parallelPartitionMethod, PHINT, 1);
+
+        //! Parallel partition.
+        //! Step1: Read the original grid.
+        region->ReadGrid();
+
+        int nZones = PHMPI::GetNumberofGlobalZones();
+        PrintToWindow("Number of original && final partitions: ", nZones, nProcessor, "\n");
+        if (nZones != numberOfProcessor)
+        {
+            TK_Exit::ExceptionExit("Error: nZones must be equal to nProcessor for parallel partition!");
+        }
+
+        region->SetupMultiBlockRelationship();
+
+        //! Find out the grid in this processor.
+        //! Warning: only ONE grid in each processor in case of parallel partition.
+        Grid *gridOfThisProcessor = 0;
+        int myID = PHMPI::GetCurrentProcessorID();
+        for (int iZone = 0; iZone < nZones; ++ iZone)
+        {
+            int procID = PHMPI::GetZoneProcessorID(iZone);
+
+            if (myID == procID)
+            {
+                gridOfThisProcessor = GetGrid(iZone, 0);
+                break;
+            }
+        }
+
+        //! Step2: partition grid parallel.
+        Pre_UnstructGridPartition parallelUnstructGridParition(UnstructGridCast(gridOfThisProcessor), nProcessor, partMethod, originalGridFile, parallelPartitionMethod);
+
+        parallelUnstructGridParition.PartitionGridParallel(partitionGridFile);
+
+        parallelUnstructGridParition.DumpPartitionGrids(partitionGridFile);
+
+        parititionGrids = parallelUnstructGridParition.GetPartitionGrids();
+    }
+
+    //! Free the partition grids.
+    for (int iProc = 0; iProc < nProcessor; ++ iProc)
+    {
+        delete parititionGrids[iProc];
+    }
+    delete [] parititionGrids;
+
+    delete region;
+}
+
+void RefineStructGrid()
+{
+    string coordinateFile = GlobalDataBase::GetStrParaFromDB("coor_file");
+    string layoutFile = GlobalDataBase::GetStrParaFromDB("layout_file");
+
+    PHSPACE::RefineStructGrid(coordinateFile, layoutFile);
+}
+
+void ReadGridgenBC(const string &BCFile, DataContainer *cData)
+{
+    fstream file;
+    file.open(BCFile.c_str(),ios_base::in);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(BCFile);
+    }
+
+    ReadGridgenBC(file, cData);
+
+    file.close();
+    file.clear();
+}
+
+void ReadGridgenBC(fstream &file, DataContainer *cDdata)
+{
+    string line, word;
+    string separator = " =\t\r\n#$,;";
+
+    CharVecSizeType sizeOfIntType = sizeof(int);
+
+    ReadNewLine(file, line);
+    line = FindNextWord(line, word, separator);
+    int flowSolverId;
+    from_string <int> (flowSolverId, word, std::dec);
+    cDdata->write(&flowSolverId, sizeOfIntType);
+    cout << "flow_solver_id = " << flowSolverId << "\n";
+
+    ReadNewLine(file, line);
+    line = FindNextWord(line, word, separator);
+    int numberOfBlocks;
+    from_string <int> (numberOfBlocks, word, std::dec);
+
+    cDdata->write(&numberOfBlocks, sizeOfIntType);
+
+    cout << "number_of_blocks = " << numberOfBlocks << "\n";
+
+    int nDim = GetDim();
+
+    for (int i = 0; i < numberOfBlocks; ++ i)
+    {
+        int ni,nj,nk;
+
+        ReadNewLine(file, line);
+        line = FindNextWord(line, word, separator);
+        from_string <int> (ni, word, std::dec);
+        line = FindNextWord(line, word, separator);
+        from_string <int> (nj, word, std::dec);
+        nk = 1;
+        if (nDim == THREE_D)
+        {
+            line = FindNextWord(line, word, separator);
+            from_string <int> (nk, word, std::dec);
+        }
+
+        cDdata->write(&ni, sizeOfIntType);
+        cDdata->write(&nj, sizeOfIntType);
+        cDdata->write(&nk, sizeOfIntType);
+
+        int wordwidth = 8;
+
+        cout << setiosflags(ios::right);
+        cout << " i = " << setw(wordwidth) << i;
+        cout << " nBlocks = " << setw(wordwidth) << numberOfBlocks;
+        cout << " ni, nj, nk = ";
+        cout << setw(wordwidth) << ni;
+        cout << setw(wordwidth) << nj;
+        cout << setw(wordwidth) << nk;
+        cout << "\n";
+
+        string blockName;
+        ReadNewLine(file, line);
+        line = FindNextWord(line, blockName, separator);
+        cDdata->write_string(blockName);
+
+        int nBCRegion;
+        ReadNewLine(file, line);
+        line = FindNextWord(line, word, separator);
+        from_string <int> (nBCRegion, word, std::dec);
+        cDdata->write(&nBCRegion, sizeOfIntType);
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            int imin, imax, jmin, jmax, kmin, kmax, BCType;
+            ReadNewLine(file, line);
+            line = FindNextWord(line, word, separator);
+            from_string <int> (imin, word, std::dec);
+            line = FindNextWord(line, word, separator);
+            from_string <int> (imax, word, std::dec);
+
+            line = FindNextWord(line, word, separator);
+            from_string <int> (jmin, word, std::dec);
+            line = FindNextWord(line, word, separator);
+            from_string <int> (jmax, word, std::dec);
+
+            if (nDim == THREE_D)
+            {
+                line = FindNextWord(line, word, separator);
+                from_string <int> (kmin, word, std::dec);
+                line = FindNextWord(line, word, separator);
+                from_string <int> (kmax, word, std::dec);
+            }
+            else
+            {
+                kmin = 1;
+                kmax = 1;
+            }
+
+            cDdata->write(&imin, sizeOfIntType);
+            cDdata->write(&imax, sizeOfIntType);
+            cDdata->write(&jmin, sizeOfIntType);
+            cDdata->write(&jmax, sizeOfIntType);
+            cDdata->write(&kmin, sizeOfIntType);
+            cDdata->write(&kmax, sizeOfIntType);
+
+            line = FindNextWord(line, word, separator);
+            from_string <int> (BCType, word, std::dec);
+
+            cDdata->write(&BCType, sizeOfIntType);
+
+            if (IsInterface(BCType))
+            {
+                int nbt;
+                ReadNewLine(file, line);
+                line = FindNextWord(line, word, separator);
+                from_string <int> (imin, word, std::dec);
+                line = FindNextWord(line, word, separator);
+                from_string <int> (imax, word, std::dec);
+
+                line = FindNextWord(line, word, separator);
+                from_string <int> (jmin, word, std::dec);
+                line = FindNextWord(line, word, separator);
+                from_string <int> (jmax, word, std::dec);
+
+                if (nDim == THREE_D)
+                {
+                    line = FindNextWord(line, word, separator);
+                    from_string <int> (kmin, word, std::dec);
+                    line = FindNextWord(line, word, separator);
+                    from_string <int> (kmax, word, std::dec);
+                }
+                else
+                {
+                    kmin = 1;
+                    kmax = 1;
+                }
+
+                line = FindNextWord(line, word, separator);
+                from_string <int> (nbt, word, std::dec);
+
+                cDdata->write(&imin, sizeOfIntType);
+                cDdata->write(&imax, sizeOfIntType);
+                cDdata->write(&jmin, sizeOfIntType);
+                cDdata->write(&jmax, sizeOfIntType);
+                cDdata->write(&kmin, sizeOfIntType);
+                cDdata->write(&kmax, sizeOfIntType);
+
+                cDdata->write(&nbt, sizeOfIntType);
+            }
+        }
+    }
+}
+
+void BlockRefine::SetNewDimension()
+{
+    int ni = dim[0];
+    int nj = dim[1];
+    int nk = dim[2];
+
+    oldDim[0] = dim[0];
+    oldDim[1] = dim[1];
+    oldDim[2] = dim[2];
+
+    dim[0] = 2 * (ni - 1) + 1;
+    dim[1] = 2 * (nj - 1) + 1;
+    dim[2] = 2 * (nk - 1) + 1;
+}
+
+void BlockRefine::Refine()
+{
+    uint_t nBCRegion = BCList.size();
+
+    for (uint_t iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+    {
+        BCList[iBCRegion]->Refine();
+    }
+}
+
+void BlockRefine::RefineCoordinate(RDouble3D &x, RDouble3D &xold, const int &ni, const int &nj, const int &nk)
+{
+    int istp = 2;
+    int jstp = 2;
+    int kstp = 2;
+
+    int i, j, k, ii, jj, kk;
+    for (k = 1; k <= nk; k += kstp)
+    {
+        for (j = 1; j <= nj; j += jstp)
+        {
+            for (i = 1; i <= ni; i += istp)
+            {
+                ii = (i + 1) / 2;
+                jj = (j + 1) / 2;
+                kk = (k + 1) / 2;
+                x(i, j, k) = xold(ii, jj, kk);
+            }
+        }
+    }
+
+    for (k = 1; k <= nk; k += kstp)
+    {
+        for (j = 1; j <= nj; j += jstp)
+        {
+            for (i = 2; i <= ni; i += istp)
+            {
+                x(i, j, k) = half * (x(i-1, j, k) + x(i+1, j, k));
+            }
+        }
+    }
+
+    for (k = 1; k <= nk; k += kstp)
+    {
+        for (j = 2; j <= nj; j += jstp)
+        {
+            for (i = 1; i <= ni; i += istp)
+            {
+                x(i, j, k) = half * (x(i, j-1, k) + x(i, j+1, k));
+            }
+        }
+    }
+
+    for (k = 2; k <= nk; k += kstp)
+    {
+        for (j = 1; j <= nj; j += jstp)
+        {
+            for (i = 1; i <= ni; i += istp)
+            {
+                x(i, j, k) = half * (x(i, j, k-1) + x(i, j, k+1));
+            }
+        }
+    }
+
+    for (k = 1; k <= nk; k += kstp)
+    {
+        for (j = 2; j <= nj; j += jstp)
+        {
+            for (i = 2; i <= ni; i += istp)
+            {
+                x(i, j, k) = fourth * (x(i-1, j-1, k) + x(i+1, j+1, k) 
+                                     + x(i+1, j-1, k) + x(i-1, j+1, k));
+            }
+        }
+    }
+
+    for (k = 2; k <= nk; k += kstp)
+    {
+        for (j = 1; j <= nj; j += jstp)
+        {
+            for (i = 2; i <= ni; i += istp)
+            {
+                x(i, j, k) = fourth * (x(i-1, j, k-1) + x(i+1, j, k+1) 
+                                     + x(i+1, j, k-1) + x(i-1, j, k+1));
+            }
+        }
+    }
+
+    for (k = 2; k <= nk; k += kstp)
+    {
+        for (j = 2; j <= nj; j += jstp)
+        {
+            for (i = 1; i <= ni; i += istp)
+            {
+                x(i, j, k) = fourth * (x(i, j-1 ,k-1) + x(i, j+1, k+1) 
+                                     + x(i, j+1, k-1) + x(i, j-1, k+1));
+            }
+        }
+    }
+
+    for (k = 2; k <= nk; k += kstp)
+    {
+        for (j = 2; j <= nj; j += jstp)
+        {
+            for (i = 2; i <= ni; i += istp)
+            {
+                x(i, j, k) = eighth * (x(i-1, j-1, k-1) + x(i+1, j+1, k-1) 
+                                     + x(i-1, j+1, k-1) + x(i+1, j-1, k-1)
+                                     + x(i-1, j-1, k+1) + x(i+1, j+1, k+1) 
+                                     + x(i-1, j+1, k+1) + x(i+1, j-1, k+1));
+            }
+        }
+    }
+}
+
+StructGrid *BlockRefine::CreateStructGrid(const int &ni, const int &nj, const int &nk)
+{
+    GridID *index = new GridID(0);
+    StructGrid *grid = StructGridCast(CreateGridGeneral(STRUCTGRID, index, 0, GetDim()));
+
+    grid->SetNI(ni);
+    grid->SetNJ(nj);
+    grid->SetNK(nk);
+
+    grid->SetBasicDimension();
+
+    int nTotalNode = grid->GetNTotalNode();
+    RDouble *x = new RDouble[nTotalNode];
+    RDouble *y = new RDouble[nTotalNode];
+    RDouble *z = new RDouble[nTotalNode];
+    grid->SetX(x);
+    grid->SetY(y);
+    grid->SetZ(z);
+    grid->SetArrayLayout();
+
+    return grid;
+}
+
+void BlockRefine::DumpGrid(fstream &file, Grid *gridIn)
+{
+    StructGrid *gridOld = StructGridCast(gridIn);
+
+    //! ni,nj,nk are fine grid dimension
+    int ni = this->GetNI();
+    int nj = this->GetNJ();
+    int nk = this->GetNK();
+
+    StructGrid *grid = CreateStructGrid(ni,nj,nk);
+
+    RDouble3D &xx = *(grid->GetStructX());
+    RDouble3D &yy = *(grid->GetStructY());
+    RDouble3D &zz = *(grid->GetStructZ());
+
+    RDouble3D &xxOld = *(gridOld->GetStructX());
+    RDouble3D &yyOld = *(gridOld->GetStructY());
+    RDouble3D &zzOld = *(gridOld->GetStructZ());
+
+    RefineCoordinate(xx, xxOld, ni, nj, nk);
+    RefineCoordinate(yy, yyOld, ni, nj, nk);
+    RefineCoordinate(zz, zzOld, ni, nj, nk);
+
+    grid->WriteXYZ(file, 1, ni, 1, nj, 1, nk);
+
+    delete grid;
+}
+
+void BlockBCRefine::RefineBC()
+{
+    for (int m = 0; m < 3; ++ m)
+    {
+        st[m] = SIGN(1, st[m]) * (2 * ABS(st[m]) - 1);
+        ed[m] = SIGN(1, ed[m]) * (2 * ABS(ed[m]) - 1);
+    }
+}
+
+void BlockBCRefine::Refine()
+{
+    RefineBC();
+    if (next)
+    {
+        next->RefineBC();
+    }
+}
+
+void BlockBCRefine::SetContent(const int &BCType, const int &imin, const int &imax, 
+                                 const int &jmin, const int &jmax, const int &kmin, const int &kmax)
+{
+    this->BCType = BCType;
+
+    this->st[0]  = imin;
+    this->ed[0]  = imax;
+
+    this->st[1]  = jmin;
+    this->ed[1]  = jmax;
+
+    this->st[2]  = kmin;
+    this->ed[2]  = kmax;
+}
+
+void BlockBCRefine::SetPatchContent(const int &nb, const int &imin, const int &imax, 
+                                      const int &jmin, const int &jmax, const int &kmin, const int &kmax)
+{
+    if (!this->next)
+    {
+        this->next = new BlockBCPatchRefine();
+    }
+
+    this->next->SetContent(nb, imin, imax, jmin, jmax, kmin, kmax);
+}
+
+void BlockBCPatchRefine::RefineBC()
+{
+    for (int m = 0; m < 3; ++ m)
+    {
+        st[m] = SIGN(1, st[m]) * (2 * ABS(st[m]) - 1);
+        ed[m] = SIGN(1, ed[m]) * (2 * ABS(ed[m]) - 1);
+    }
+}
+
+void BlockBCPatchRefine::SetContent(const int &BCType, const int &imin, const int &imax, 
+                                      const int &jmin, const int &jmax, const int &kmin, const int &kmax)
+{
+    this->nb    = BCType;
+
+    this->st[0] = imin;
+    this->ed[0] = imax;
+
+    this->st[1] = jmin;
+    this->ed[1] = jmax;
+
+    this->st[2] = kmin;
+    this->ed[2] = kmax;
+}
+
+void GridRefine::Init(DataContainer *cDdata)
+{
+    CharVecSizeType sizeOfIntType = sizeof(int);
+
+    cDdata->moveto_begin();
+    int flowSolverId;
+    cDdata->read(&flowSolverId, sizeOfIntType);
+
+    cDdata->read(&numberOfBlocks, sizeOfIntType);
+
+    cout << "number_of_blocks = " << numberOfBlocks << "\n";
+
+    refblock.resize(numberOfBlocks);
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        refblock[iZone] = new BlockRefine();
+        refblock[iZone]->SetID(iZone);
+    }
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        int ni, nj, nk;
+
+        cDdata->read(&ni, sizeOfIntType);
+        cDdata->read(&nj, sizeOfIntType);
+        cDdata->read(&nk, sizeOfIntType);
+
+        string blockname;
+        cDdata->read_string(blockname);
+
+        BlockRefine *block = refblock[iZone];
+
+        block->SetNI(ni);
+        block->SetNJ(nj);
+        block->SetNK(nk);
+
+        int nBCRegion;
+        cDdata->read(&nBCRegion, sizeOfIntType);
+
+        vector <BlockBCRefine *> &BCList = block->GetBCList();
+
+        BCList.resize(nBCRegion);
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            int imin, imax, jmin, jmax, kmin, kmax, BCType;
+
+            cDdata->read(&imin, sizeOfIntType);
+            cDdata->read(&imax, sizeOfIntType);
+            cDdata->read(&jmin, sizeOfIntType);
+            cDdata->read(&jmax, sizeOfIntType);
+            cDdata->read(&kmin, sizeOfIntType);
+            cDdata->read(&kmax, sizeOfIntType);
+            cDdata->read(&BCType, sizeOfIntType);
+
+            BlockBCRefine *BCRefined = new BlockBCRefine();
+            BCList[iBCRegion] = BCRefined;
+
+            BCRefined->SetContent(BCType, imin, imax, jmin, jmax, kmin, kmax);
+
+            if (IsInterface(BCType))
+            {
+                int indexOfTargetBoundary;
+                cDdata->read(&imin, sizeOfIntType);
+                cDdata->read(&imax, sizeOfIntType);
+                cDdata->read(&jmin, sizeOfIntType);
+                cDdata->read(&jmax, sizeOfIntType);
+                cDdata->read(&kmin, sizeOfIntType);
+                cDdata->read(&kmax, sizeOfIntType);
+                cDdata->read(&indexOfTargetBoundary , sizeOfIntType);
+
+                BCRefined->SetPatchContent(BCType, imin, imax, jmin, jmax, kmin, kmax);
+            }
+        }
+    }
+}
+
+void GridRefine::SetNewDimension()
+{
+    uint_t numberOfBlocks = refblock.size();
+    for (uint_t iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        BlockRefine *blockToRefin = refblock[iZone];
+        blockToRefin->SetNewDimension();
+    }
+}
+
+void GridRefine::Refine()
+{
+    SetNewDimension();
+    uint_t numberOfBlocks = refblock.size();
+    for (uint_t iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        BlockRefine *blockToRefin = refblock[iZone];
+        blockToRefin->Refine();
+    }
+}
+
+int GridRefine::MapBC(int i)
+{
+    return SIGN(1,i) * (2 * ABS(i) - 1);
+}
+
+void GridRefine::DumpLayout(DataContainer *cDdata)
+{
+    fstream file;
+    string partLayoutFile = GlobalDataBase::GetStrParaFromDB("part_layout_file");
+
+    file.open(partLayoutFile.c_str(), ios_base::out);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(partLayoutFile);
+    }
+
+    CharVecSizeType sizeOfIntType = sizeof(int);
+
+    cDdata->moveto_begin();
+
+    file << setiosflags(ios::right);
+    int wordwidth = 8;
+
+    int flowSolverID;
+    cDdata->read(&flowSolverID, sizeOfIntType);
+
+    file << setw(wordwidth) << flowSolverID << "\n";
+
+    int numberOfBlocks;
+    cDdata->read(&numberOfBlocks, sizeOfIntType);
+
+    file << setw(wordwidth) << numberOfBlocks << "\n";
+
+    cout << "number_of_blocks = " << numberOfBlocks << "\n";
+
+    for (int iBlock = 0; iBlock < numberOfBlocks; ++ iBlock)
+    {
+        int ni, nj, nk;
+
+        cDdata->read(&ni, sizeOfIntType);
+        cDdata->read(&nj, sizeOfIntType);
+        cDdata->read(&nk, sizeOfIntType);
+
+        file << setw(wordwidth) << 2 * ni - 1;
+        file << setw(wordwidth) << 2 * nj - 1;
+
+        if (GetDim() == THREE_D)
+        {
+            file << setw(wordwidth) << 2 * nk - 1;
+        }
+
+        file << "\n";
+
+        string blockName;
+        cDdata->read_string(blockName);
+
+        file << blockName << "\n";
+
+        int nBCRegion;
+        cDdata->read(&nBCRegion, sizeOfIntType);
+
+        file << setw(wordwidth) << nBCRegion << "\n";
+
+        for (int iBCRegion = 0; iBCRegion < nBCRegion; ++ iBCRegion)
+        {
+            int imin, imax, jmin, jmax, kmin, kmax, BCType;
+
+            cDdata->read(&imin, sizeOfIntType);
+            cDdata->read(&imax, sizeOfIntType);
+            cDdata->read(&jmin, sizeOfIntType);
+            cDdata->read(&jmax, sizeOfIntType);
+            cDdata->read(&kmin, sizeOfIntType);
+            cDdata->read(&kmax, sizeOfIntType);
+            cDdata->read(&BCType, sizeOfIntType);
+
+            file << setw(wordwidth) << MapBC(imin);
+            file << setw(wordwidth) << MapBC(imax);
+            file << setw(wordwidth) << MapBC(jmin);
+            file << setw(wordwidth) << MapBC(jmax);
+
+            if (GetDim() == THREE_D)
+            {
+                file << setw(wordwidth) << MapBC(kmin);
+                file << setw(wordwidth) << MapBC(kmax);
+            }
+
+            file << setw(wordwidth) << BCType << "\n";
+
+            if (IsInterface(BCType))
+            {
+                int nbt;
+                cDdata->read(&imin, sizeOfIntType);
+                cDdata->read(&imax, sizeOfIntType);
+                cDdata->read(&jmin, sizeOfIntType);
+                cDdata->read(&jmax, sizeOfIntType);
+                cDdata->read(&kmin, sizeOfIntType);
+                cDdata->read(&kmax, sizeOfIntType);
+                cDdata->read(&nbt , sizeOfIntType);
+
+                file << setw(wordwidth) << MapBC(imin);
+                file << setw(wordwidth) << MapBC(imax);
+                file << setw(wordwidth) << MapBC(jmin);
+                file << setw(wordwidth) << MapBC(jmax);
+
+                if (GetDim() == THREE_D)
+                {
+                    file << setw(wordwidth) << MapBC(kmin);
+                    file << setw(wordwidth) << MapBC(kmax);
+                }
+                file << setw(wordwidth) << nbt << "\n";
+            }
+        }
+    }
+
+    file.close();
+    file.clear();
+}
+
+void GridRefine::DumpGrid()
+{
+    string coordinateFile            = GlobalDataBase::GetStrParaFromDB("coor_file");
+    string partitionedCoordinateFile = GlobalDataBase::GetStrParaFromDB("part_coor_file");
+
+    CharVecSizeType sizeOfIntType = sizeof(int);
+
+    uint_t numberOfBlocks = refblock.size();
+    int nBlocks;
+    Grid **structGrids;
+    ReadPlot3DCoorBinary(coordinateFile, nBlocks, structGrids);
+
+    fstream file;
+    file.open(partitionedCoordinateFile.c_str(),ios_base::out|ios_base::binary|ios_base::trunc);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(partitionedCoordinateFile);
+    }
+
+    file.write(reinterpret_cast <char *> (&nBlocks), sizeOfIntType);
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        int ni = refblock[iZone]->GetNI();
+        int nj = refblock[iZone]->GetNJ();
+        int nk = refblock[iZone]->GetNK();
+        file.write(reinterpret_cast <char *> (&ni), sizeOfIntType);
+        file.write(reinterpret_cast <char *> (&nj), sizeOfIntType);
+        file.write(reinterpret_cast <char *> (&nk), sizeOfIntType);
+    }
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        BlockRefine *blockRefined = refblock[iZone];
+        blockRefined->DumpGrid(file,structGrids[iZone]);
+    }
+
+    file.close();
+
+    for (int iZone = 0; iZone < nBlocks; ++ iZone)
+    {
+        delete structGrids[iZone];
+    }
+    delete []structGrids;
+}
+
+void GridRefine::RefineStructGrid()
+{
+    string layoutFile = GlobalDataBase::GetStrParaFromDB("layout_file");
+
+    DataContainer *cDdata = new DataContainer();
+
+    ReadGridgenBC(layoutFile, cDdata);
+
+    this->Init(cDdata);
+    this->Refine();
+    this->DumpLayout(cDdata);
+    this->DumpGrid();
+
+    delete cDdata;
+}
+#pragma warning(disable:4100)
+void RefineStructGrid(const string &coordinateFile, const string &layoutFile)
+{
+    GridRefine *gridToRefine = new GridRefine;
+
+    gridToRefine->RefineStructGrid();
+
+    delete gridToRefine;
+}
+#pragma warning(default:4100)
+int in_set(int *a, int n, int value)
+{
+    for (int i = 0; i < n; ++ i)
+    {
+        if (a[i] == value)
+        {
+            return 1;
+        }
+    }
+    return 0;
+}
+
+void GetIJKRegion(int *dim, int &ist, int &ied, int &jst, int &jed, int &kst, int &ked, int m)
+{
+    ist = 1;
+    ied = dim[0];
+
+    jst = 1;
+    jed = dim[1];
+
+    kst = 1;
+    ked = dim[2];
+
+    if (m == 0)
+    {
+        ied = 1;
+    }
+    else if (m == 1)
+    {
+        ist = dim[0];
+    }
+    else if (m == 2)
+    {
+        jed = 1;
+    }  
+    else if (m == 3)
+    {
+        jst = dim[1];
+    }
+    else if (m == 4)
+    {
+        ked = 1;
+    }
+    else if (m == 5)
+    {
+        kst = dim[2];
+    }
+}
+
+void GetIJKRegion(int *st, int *ed, int &ist, int &ied, int &jst, int &jed, int &kst, int &ked, int m)
+{
+    ist = st[0];
+    ied = ed[0];
+
+    jst = st[1];
+    jed = ed[1];
+
+    kst = st[2];
+    ked = ed[2];
+
+    if (m == 0)
+    {
+        ied = st[0];
+    }
+    else if (m == 1)
+    {
+        ist = ed[0];
+    }
+    else if (m == 2)
+    {
+        jed = st[1];
+    }
+    else if (m == 3)
+    {
+        jst = ed[1];
+    }
+    else if (m == 4)
+    {
+        ked = st[2];
+    }
+    else if (m == 5)
+    {
+        kst = ed[2];
+    }
+}
+
+void GetIJKRegion(int *box_st, int *box_ed, int *st, int *ed, int m)
+{
+    GetIJKRegion(box_st, box_ed, st[0], ed[0], st[1], ed[1], st[2], ed[2], m);
+}
+
+}
diff --git a/Main/src/GridView.cpp b/Main/src/GridView.cpp
new file mode 100644
index 0000000..b60f59e
--- /dev/null
+++ b/Main/src/GridView.cpp
@@ -0,0 +1,1365 @@
+#include "GridView.h"
+#include "Geo_SimpleBC.h"
+#include "PHMpi.h"
+#include "TK_Parse.h"
+#include "Constants.h"
+#include "GlobalDataBase.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+PHSimpleFace::PHSimpleFace()
+{
+    simpleFaceNext = 0;
+}
+
+PHSimpleFace::~PHSimpleFace()
+{
+    
+}
+
+void PHSimpleFace::SetKeyParameter(int *keyNumber)
+{
+    for (int i = 0; i < 7; ++ i)
+    {
+        this->keyNumber[i] = keyNumber[i];
+    }
+
+    return;
+}
+
+int PHSimpleFace::GetKeyParameter()
+{
+    return this->keyNumber[6];
+}
+
+int * PHSimpleFace::GetLocalParameter()
+{
+    return keyNumber;
+}
+
+void PHSimpleFace::CreateNewSimpleFace()
+{
+    this->simpleFaceNext = new PHSimpleFace();
+
+    return;
+}
+
+PHSimpleFace * PHSimpleFace::GetNextPointer()
+{
+    return simpleFaceNext;
+}
+
+void PHSimpleFace::ShowSimpleFace()
+{
+    for (int i = 0; i < 7; ++ i)
+    {
+        cout << setw(8) << keyNumber[i];
+    }
+    cout << endl;
+
+    return;
+}
+
+
+BoundaryCluster::BoundaryCluster()
+{
+    simpleFaceHead = 0;
+    simpleFaceGuard = 0;
+    slaveBlockList = 0;
+}
+BoundaryCluster::~BoundaryCluster()
+{
+    DeleteLinkedTable();
+
+    if (slaveBlockList)
+    {
+        delete [] slaveBlockList;
+    }
+}
+
+void BoundaryCluster::SetBlockDimension(int iDimension, int jDimension, int kDimension)
+{
+    this->iDimension = iDimension;
+    this->jDimension = jDimension;
+    this->kDimension = kDimension;
+
+    return;
+}
+
+void BoundaryCluster::SetBlockLabel(int blockLabel)
+{
+    this->blockLabel = blockLabel;
+
+    return;
+}
+
+void BoundaryCluster::SetProcessLabel(int processLabel)
+{
+    this->processLabel = processLabel;
+
+    return;
+}
+
+void BoundaryCluster::SetOverallFaceNumber(int overallFaceNumber)
+{
+    this->overallFaceNumber = overallFaceNumber;
+
+    return;
+}
+
+void BoundaryCluster::SetExternalFaceNumber(int externalFaceNumber)
+{
+    this->externalFaceNumber = externalFaceNumber;
+
+    return;
+}
+
+int BoundaryCluster::GetExternalFaceNumber()
+{
+    return this->externalFaceNumber;
+}
+
+vector <vector <int> > BoundaryCluster::ExtractPhysicalBoundaryIndex()
+{
+    vector <vector<int> > pbi;
+    vector <int> trans(6);
+
+    simpleFaceGuard = simpleFaceHead;
+    while(simpleFaceGuard)
+    {
+        const int *localParameter = simpleFaceGuard->GetLocalParameter();
+
+        if (localParameter[6] == GRIDGEN_SPACE::INTERFACE)
+        {
+            simpleFaceGuard = simpleFaceGuard->GetNextPointer();
+        }
+        else
+        {
+            for (int i = 0; i < 6; ++ i)
+            {
+                trans[i] = localParameter[i] - 1;
+            }
+
+            pbi.push_back(trans);
+        }
+
+        simpleFaceGuard = simpleFaceGuard->GetNextPointer();
+    }
+
+    return pbi;
+}
+
+int BoundaryCluster::GetOverallFaceNumber()
+{
+    return this->overallFaceNumber;
+}
+
+int BoundaryCluster::GetProcessLabel()
+{
+    return this->processLabel;
+}
+
+void BoundaryCluster::SetKeyNumberPointer(int *keyNumber)
+{
+    this->keyNumber = keyNumber;
+
+    return;
+}
+
+void BoundaryCluster::CreateNewSimpleFace(int iFace)
+{
+    if (iFace == 0)
+    {
+        simpleFaceHead = new PHSimpleFace();
+        simpleFaceGuard = simpleFaceHead;
+    }
+    else
+    {
+        simpleFaceGuard->CreateNewSimpleFace();
+        simpleFaceGuard = simpleFaceGuard->GetNextPointer();
+    }
+    simpleFaceGuard->SetKeyParameter(keyNumber);
+
+    return;
+}
+
+void BoundaryCluster::DeleteLinkedTable()
+{
+    if (simpleFaceHead)
+    {
+        simpleFaceGuard = simpleFaceHead;
+        simpleFaceHead = simpleFaceHead->GetNextPointer();
+        delete simpleFaceGuard;
+    }
+
+    return;
+}
+
+void BoundaryCluster::ShowBoundaryCluster()
+{
+    simpleFaceGuard = simpleFaceHead;
+    while(simpleFaceGuard)
+    {
+        simpleFaceGuard->ShowSimpleFace();
+        simpleFaceGuard = simpleFaceGuard->GetNextPointer();
+    }
+
+    return;
+}
+
+PHSimpleFace * BoundaryCluster::GetSimpleFaceHead()
+{
+    return simpleFaceHead;
+}
+
+void BoundaryCluster::OutputHoleSurfaceGrid(ofstream &outFile, BasalGrid *basalGrid)
+{
+    int ni = basalGrid->GetIDimension();
+    int nj = basalGrid->GetJDimension();
+
+    RDouble *x = basalGrid->GetX();
+    RDouble *y = basalGrid->GetY();
+    RDouble *z = basalGrid->GetZ();
+
+    int is, js, ks;
+    for (int m = 0; m < numberOfSolidFaces; ++ m)
+    {
+        for (int k = kst[m]; k <= ked[m]; ++ k)
+        {
+            ks = k-1;
+            for (int j = jst[m]; j <= jed[m]; ++ j)
+            {
+                js = j-1;
+                for (int i = ist[m]; i <= ied[m]; ++ i)
+                {
+                    is = i-1;
+                    int mm = ni*nj*ks + ni*js + is;
+                    outFile.write((char*)&x[mm], sizeof(RDouble));
+                }
+            }
+        }
+
+        for (int k = kst[m]; k <= ked[m]; ++ k)
+        {
+            ks = k-1;
+            for (int j = jst[m]; j <= jed[m]; ++ j)
+            {
+                js = j-1;
+                for (int i = ist[m]; i <= ied[m]; ++ i)
+                {
+                    is = i-1;
+                    int mm = ni*nj*ks + ni*js + is;
+                    outFile.write((char*)&y[mm], sizeof(RDouble));
+                }
+            }
+        }
+
+        for (int k = kst[m]; k <= ked[m]; ++ k)
+        {
+            ks = k-1;
+            for (int j = jst[m]; j <= jed[m]; ++ j)
+            {
+                js = j-1;
+                for (int i = ist[m]; i <= ied[m]; ++ i)
+                {
+                    is = i-1;
+                    int mm = ni*nj*ks + ni*js + is;
+                    outFile.write((char*)&z[mm], sizeof(RDouble));
+                }
+            }
+        }
+    }
+
+    return;
+}
+
+void BoundaryCluster::OutputHoleSurfaceDimension(ofstream &outFile)
+{
+    int ni, nj, nk;
+    for (int iFace = 0; iFace < numberOfSolidFaces; ++ iFace)
+    {
+        ni = ied[iFace]-ist[iFace]+1;
+        nj = jed[iFace]-jst[iFace]+1;
+        nk = ked[iFace]-kst[iFace]+1;
+        if (nk == 1)
+        {
+            outFile.write((char*)&ni, sizeof(int));
+            outFile.write((char*)&nj, sizeof(int));
+            outFile.write((char*)&nk, sizeof(int));
+        }
+        else if (nj == 1)
+        {
+            outFile.write((char*)&ni, sizeof(int));
+            outFile.write((char*)&nk, sizeof(int));
+            outFile.write((char*)&nj, sizeof(int));
+        }
+        else
+        {
+            outFile.write((char*)&nj, sizeof(int));
+            outFile.write((char*)&nk, sizeof(int));
+            outFile.write((char*)&ni, sizeof(int));
+        }
+    }
+
+    return;
+}
+
+void BoundaryCluster::RecordSolidFaceInformation()
+{
+    simpleFaceGuard = simpleFaceHead;
+    int counter = 0;
+
+    while (simpleFaceGuard)
+    {
+        const int *localParameter = simpleFaceGuard->GetLocalParameter();
+
+        if (localParameter[6] == -1)
+        {
+            simpleFaceGuard = simpleFaceGuard->GetNextPointer();
+        }
+        else if (localParameter[6] == GRIDGEN_SPACE::SOLID_SURFACE)
+        {
+            ist.push_back(localParameter[0]);
+            ied.push_back(localParameter[1]);
+
+            jst.push_back(localParameter[2]);
+            jed.push_back(localParameter[3]);
+
+            kst.push_back(localParameter[4]);
+            ked.push_back(localParameter[5]);
+
+            counter += 1;
+        }
+
+        simpleFaceGuard = simpleFaceGuard->GetNextPointer();
+    }
+
+    numberOfSolidFaces = counter;
+
+    return;
+}
+
+void BoundaryCluster::SetSlaveBlockList()
+{
+    if (externalFaceNumber > 0)
+    {
+        int id = 0;
+        slaveBlockList = new int[externalFaceNumber];
+        simpleFaceGuard = simpleFaceHead;
+        while (simpleFaceGuard)
+        {
+            int sign = simpleFaceGuard->GetKeyParameter();
+            simpleFaceGuard = simpleFaceGuard->GetNextPointer();
+            if (sign == -1)
+            {
+                int slaveBlockLabel = simpleFaceGuard->GetKeyParameter();
+                slaveBlockList[id] = slaveBlockLabel;
+                id += 1;
+            }
+        }
+    }
+
+    return;
+}
+
+int * BoundaryCluster::GetSlaveBlockList()
+{
+    return slaveBlockList;
+}
+
+LinkedBlocks::LinkedBlocks()
+{
+    linkedBlocksNext = 0;
+    blockLabel       = 0;
+}
+
+LinkedBlocks::~LinkedBlocks()
+{
+
+}
+
+void LinkedBlocks::CreateNewLinkedBlock()
+{
+    this->linkedBlocksNext = new LinkedBlocks();
+
+    return;
+}
+
+void LinkedBlocks::SetBlockLabel(int blockLabel)
+{
+    this->blockLabel = blockLabel;
+
+    return;
+}
+
+int LinkedBlocks::GetBlockLabel()
+{
+    return this->blockLabel;
+}
+
+LinkedBlocks * LinkedBlocks::GetNextPointer()
+{
+    return linkedBlocksNext;
+}
+
+BlockCluster::BlockCluster()
+{
+    groupLabel = 0;
+    newBlockLabel = 0;
+    linkedBlocksHead = 0;
+    linkedBlocksGuard = 0;
+    listColor = WHITE;
+}
+
+BlockCluster::~BlockCluster()
+{
+    DeleteLinkedTable();
+}
+
+void BlockCluster::CreatNewLinkedBlock()
+{
+    if (!linkedBlocksHead)
+    {
+        linkedBlocksHead = new LinkedBlocks();
+        linkedBlocksGuard = linkedBlocksHead;
+    }
+    else
+    {
+        linkedBlocksGuard->CreateNewLinkedBlock();
+        linkedBlocksGuard = linkedBlocksGuard->GetNextPointer();
+    }
+
+    return;
+}
+
+void BlockCluster::DeleteLinkedTable()
+{
+    if (linkedBlocksHead)
+    {
+        linkedBlocksGuard = linkedBlocksHead;
+        linkedBlocksHead = linkedBlocksHead->GetNextPointer();
+        delete linkedBlocksGuard;
+    }
+
+    return;
+}
+
+void BlockCluster::SetBlockLabel(int blockLabel)
+{
+    linkedBlocksGuard->SetBlockLabel(blockLabel);
+
+    return;
+}
+
+void BlockCluster::ShowLinkedBlocks()
+{
+    linkedBlocksGuard = linkedBlocksHead;
+    while (linkedBlocksGuard)
+    {
+        int blockLabel = linkedBlocksGuard->GetBlockLabel();
+        linkedBlocksGuard = linkedBlocksGuard->GetNextPointer();
+        cout << '\t' << blockLabel;
+    }
+    cout << endl;
+
+    return;
+}
+
+void BlockCluster::SetListColor(int listColor)
+{
+    this->listColor = listColor;
+
+    return;
+}
+
+void BlockCluster::SetGroupLabel(int groupLabel)
+{
+    this->groupLabel = groupLabel;
+
+    return;
+}
+
+void BlockCluster::SetNewBlockLabel(int newBlockLabel)
+{
+    this->newBlockLabel = newBlockLabel;
+
+    return;
+}
+
+int BlockCluster::GetNewBlockLabel()
+{
+    return this->newBlockLabel;
+}
+
+int BlockCluster::GetListColor()
+{
+    return this->listColor;
+}
+
+int BlockCluster::GetGroupLabel()
+{
+    return this->groupLabel;
+}
+
+LinkedBlocks * BlockCluster::GetLinkedBlocksHead()
+{
+    return linkedBlocksHead;
+}
+
+BasalGrid::BasalGrid()
+{
+    xCoordinate = 0;
+    yCoordinate = 0;
+    zCoordinate = 0;
+}
+
+BasalGrid::~BasalGrid()
+{
+    delete [] xCoordinate;
+    delete [] yCoordinate;
+    delete [] zCoordinate;
+}
+
+void BasalGrid::GenerateBasalSpace(int iDimension, int jDimension, int kDimension)
+{
+    this->iDimension = iDimension;
+    this->jDimension = jDimension;
+    this->kDimension = kDimension;
+    pointNumber = iDimension * jDimension * kDimension;
+    xCoordinate = new RDouble[pointNumber];
+    yCoordinate = new RDouble[pointNumber];
+    zCoordinate = new RDouble[pointNumber];
+
+    return;
+}
+
+void BasalGrid::SetCoordinate(int aspect, int i, int j, int k, RDouble coordinate)
+{
+    int pointLabel = iDimension*jDimension*k+iDimension*j+i;
+    if (aspect == ASPECTX)
+    {
+        xCoordinate[pointLabel] = coordinate;
+    }
+    else if (aspect == ASPECTY)
+    {
+        yCoordinate[pointLabel] = coordinate;
+    }
+    else
+    {
+        zCoordinate[pointLabel] = coordinate;
+    }
+
+    return;
+}
+
+int BasalGrid::GetIDimension()
+{
+    return this->iDimension;
+}
+
+int BasalGrid::GetJDimension()
+{
+    return this->jDimension;
+}
+
+int BasalGrid::GetKDimension()
+{
+    return this->kDimension;
+}
+
+RDouble BasalGrid::GetCoordinate(int aspect, int i, int j, int k)
+{
+    int pointLabel = iDimension*jDimension*k + iDimension*j + i;
+    RDouble coordinate = 0;
+    if (aspect == ASPECTX)
+    {
+        coordinate = xCoordinate[pointLabel];
+    }
+    else if (aspect == ASPECTY)
+    {
+        coordinate = yCoordinate[pointLabel];
+    }
+    else
+    {
+        coordinate = zCoordinate[pointLabel];
+    }
+
+    return coordinate;
+}
+
+BlockGroupManager::BlockGroupManager()
+{
+    basalGrid = 0;
+    boundaryCluster = 0;
+    blockCluster = 0;
+    InverseMapping = 0;
+    blockStart = 0;
+    blockEnd = 0;
+}
+
+BlockGroupManager::~BlockGroupManager()
+{
+    delete [] basalGrid;
+    delete [] boundaryCluster;
+    delete [] blockCluster;
+    delete [] InverseMapping;
+    delete [] blockStart;
+    delete [] blockEnd;
+}
+
+void BlockGroupManager::Run()
+{
+    InputOriginalBoundary();
+
+    InputOriginalGrid();
+
+    ShowOriginalBoundary();
+
+    OutputStandardBoundary();
+
+    GatherLinkedBlocks();
+
+    ShowLinkedBlocks();
+
+    MarkerBlocksRelation();
+
+    PermuteBlockLabel();
+
+    SeparateGrid();
+
+    //OutputNewGrid();
+    OutputNewSurfaceGrid();
+
+    OutputNewBoundary();
+
+    OutputZoneInverseMapping();
+
+    return;
+}
+
+void BlockGroupManager::InputOriginalGrid()
+{
+    int iDimension, jDimension, kDimension;
+    RDouble coordinate;
+    string originalGridFileName;
+    GlobalDataBase::GetData("originalGridFileName", &originalGridFileName, PHSTRING,1);
+
+    ifstream infile(originalGridFileName.c_str(), ios_base::binary);
+    infile.read((char *)&globalBlockNumber, sizeof(int));
+    basalGrid = new BasalGrid[globalBlockNumber];
+    for (int iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        infile.read((char *)&iDimension, sizeof(int));
+        infile.read((char *)&jDimension, sizeof(int));
+        infile.read((char *)&kDimension, sizeof(int));
+        basalGrid[iBlock].GenerateBasalSpace(iDimension, jDimension, kDimension);
+    }
+
+    for (int iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        iDimension = basalGrid[iBlock].GetIDimension();
+        jDimension = basalGrid[iBlock].GetJDimension();
+        kDimension = basalGrid[iBlock].GetKDimension();
+        for (int aspect = ASPECTX; aspect <= ASPECTZ; ++ aspect)
+        {
+            for (int k = 0; k < kDimension; ++ k)
+            {
+                for (int j = 0; j < jDimension; ++ j)
+                {
+                    for (int i = 0; i < iDimension; ++ i)
+                    {
+                        infile.read((char *)&coordinate, sizeof(RDouble));
+                        basalGrid[iBlock].SetCoordinate(aspect, i, j, k, coordinate);
+                    }
+                }
+            }
+        }
+    }
+
+    infile.close();
+
+    return;
+}
+
+void BlockGroupManager::InputOriginalBoundary()
+{
+    string line, word;
+    string separator = " =\t\r\n#$,;";
+
+    int iSolver, processLabel, iDimension, jDimension, kDimension;
+    processLabel = 0;
+
+    string temp, originalBoundaryFileName;
+    fstream file;
+    GlobalDataBase::GetData("originalBoundaryFileName", &originalBoundaryFileName, PHSTRING, 1);
+    file.open(originalBoundaryFileName.c_str(), ios_base::in);
+    file >> iSolver;
+    file >> globalBlockNumber;
+    boundaryCluster = new BoundaryCluster[globalBlockNumber];
+    for (int iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        ReadNewLine(file, line);
+        line = FindNextWord(line, word, separator);
+        from_string< int >(iDimension, word, std::dec);
+        line = FindNextWord(line, word, separator);
+        from_string< int >(jDimension, word, std::dec);
+        line = FindNextWord(line, word, separator);
+        from_string< int >(kDimension, word, std::dec);
+
+        line = FindNextWord(line, word, separator);
+        if (word == "proc")
+        {
+            readProc = true;
+            line = FindNextWord(line, word, separator);
+            from_string< int >(processLabel, word, std::dec);
+        }
+
+        boundaryCluster[iBlock].SetBlockDimension(iDimension, jDimension, kDimension);
+        boundaryCluster[iBlock].SetProcessLabel(processLabel);
+        file >> temp;
+
+        int blockLabel = iBlock + 1;
+        boundaryCluster[iBlock].SetBlockLabel(blockLabel);
+        int overallFaceNumber;
+        file >> overallFaceNumber;
+        boundaryCluster[iBlock].SetOverallFaceNumber(overallFaceNumber);
+        int iFace = 0, externalFaceNumber = 0;
+        for (int overallFace = 0; overallFace < overallFaceNumber; ++ overallFace)
+        {
+            file >> keyNumber[0] >> keyNumber[1] >> keyNumber[2] >> keyNumber[3] >> keyNumber[4] >> keyNumber[5] >> keyNumber[6];
+            boundaryCluster[iBlock].SetKeyNumberPointer(keyNumber);
+            boundaryCluster[iBlock].CreateNewSimpleFace(iFace);
+            iFace += 1;
+            if (keyNumber[6] == -1)
+            {
+                file >> keyNumber[0] >> keyNumber[1] >> keyNumber[2] >> keyNumber[3] >> keyNumber[4] >> keyNumber[5] >> keyNumber[6];
+                boundaryCluster[iBlock].SetKeyNumberPointer(keyNumber);
+                boundaryCluster[iBlock].CreateNewSimpleFace(iFace);
+                iFace += 1;
+                externalFaceNumber += 1;
+            }
+        }
+        boundaryCluster[iBlock].SetExternalFaceNumber(externalFaceNumber);
+        boundaryCluster[iBlock].SetSlaveBlockList();
+    }
+
+    file.close();
+
+    return;
+}
+
+
+void BlockGroupManager::ShowOriginalBoundary()
+{
+    cout << "ShowOriginalData" << endl;
+    for (int iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        cout << "iBlock = " << setw(8) << iBlock << endl;
+        boundaryCluster[iBlock].ShowBoundaryCluster();
+    }
+
+    return;
+}
+
+void BlockGroupManager::GatherLinkedBlocks()
+{
+    blockCluster = new BlockCluster[globalBlockNumber];
+    for (int iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        int externalFaceNumber = boundaryCluster[iBlock].GetExternalFaceNumber();
+        if (externalFaceNumber > 0)
+        {
+            const int *slaveBlockList = boundaryCluster[iBlock].GetSlaveBlockList();
+            for (int iFace = 0; iFace < externalFaceNumber; ++ iFace)
+            {
+                blockCluster[iBlock].CreatNewLinkedBlock();
+                blockCluster[iBlock].SetBlockLabel(slaveBlockList[iFace]);
+            }
+        }
+    }
+
+    return;
+}
+
+void BlockGroupManager::ShowLinkedBlocks()
+{
+    cout << "ShowLinkedBlocks" << endl;
+    for (int iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        cout << "iBlock = " << iBlock << endl;
+        blockCluster[iBlock].ShowLinkedBlocks();
+    }
+
+    return;
+}
+
+void BlockGroupManager::MarkerBlocksRelation()
+{
+    int groupCounter = 0;
+    while (true)
+    {
+        int whiteLabel = SearchColorfulList(WHITE);
+        if (whiteLabel < 0)
+        {
+            break;
+        }
+        else
+        {
+            if (!blockCluster[whiteLabel].GetLinkedBlocksHead())
+            {
+                blockCluster[whiteLabel].SetListColor(RED);
+                blockCluster[whiteLabel].SetGroupLabel(groupCounter);
+                groupCounter += 1;
+            }
+            else
+            {
+                blockCluster[whiteLabel].SetListColor(BLUE);
+                while (true)
+                {
+                    int blueLabel = SearchColorfulList(BLUE);
+                    LinkedBlocks *listGuide = blockCluster[blueLabel].GetLinkedBlocksHead();
+                    if (blueLabel >= 0)
+                    {
+                        while (listGuide)
+                        {
+                            int iSlaveBlock = listGuide->GetBlockLabel();
+                            blockCluster[iSlaveBlock-1].SetListColor(BLUE);
+                            listGuide = listGuide->GetNextPointer();
+                        }
+                        blockCluster[blueLabel].DeleteLinkedTable();
+                        blockCluster[blueLabel].SetListColor(PURPLE);
+                    }
+                    else
+                    {
+                        break;
+                    }
+                }
+
+                for (int iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+                {
+                    int color = blockCluster[iBlock].GetListColor();
+                    if (color == PURPLE)
+                    {
+                        blockCluster[iBlock].SetListColor(RED);
+                        blockCluster[iBlock].SetGroupLabel(groupCounter);
+                    }
+                }
+                groupCounter += 1;
+            }
+        }
+    }
+
+    this->groupNumber = groupCounter;
+
+    for (int iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        int i = blockCluster[iBlock].GetGroupLabel();
+        cout << "iBlock = " << iBlock+1 << '\t' << "group = " << i << endl;
+    }
+
+    return;
+}
+
+int BlockGroupManager::SearchColorfulList(int spectrum)
+{
+    int blockLabel = -1;
+    for (int iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        int color = blockCluster[iBlock].GetListColor();
+        if (color == spectrum)
+        {
+            blockLabel = iBlock;
+            break;
+        }
+    }
+
+    return blockLabel;
+}
+
+void BlockGroupManager::PermuteBlockLabel()
+{
+    int newBlockLabel = 0;
+    for (int iGroup = 0; iGroup < groupNumber; ++ iGroup)
+    {
+        for (int iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+        {
+            int jGroup = blockCluster[iBlock].GetGroupLabel();
+            if (iGroup == jGroup)
+            {
+                blockCluster[iBlock].SetNewBlockLabel(newBlockLabel);
+                newBlockLabel += 1;
+            }
+        }
+    }
+
+    InverseMapping = new int [globalBlockNumber];
+
+    for (int iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        newBlockLabel = blockCluster[iBlock].GetNewBlockLabel();
+        InverseMapping[newBlockLabel] = iBlock;
+    }
+
+    blockStart = new int [groupNumber];
+    blockStart[0] = 0;
+    blockEnd = new int [groupNumber];
+    blockEnd[groupNumber-1] = globalBlockNumber - 1;
+
+    int groupLabel = 0;
+    for (int iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        int oldBlockLabel = InverseMapping[iBlock];
+        int groupGuard = blockCluster[oldBlockLabel].GetGroupLabel();
+        if (groupGuard != groupLabel)
+        {
+            blockEnd[groupLabel] = iBlock - 1;
+            groupLabel += 1;
+            blockStart[groupLabel] = iBlock;
+        }
+    }
+
+    return;
+}
+
+void BlockGroupManager::SeparateGrid()
+{
+    string gridGroupFileName;
+
+    GlobalDataBase::GetData("gridGroupFileName", &gridGroupFileName, PHSTRING, 1);
+
+    ofstream myFile(gridGroupFileName.c_str());
+    
+    for (int iGroup = 0; iGroup < groupNumber; ++ iGroup)
+    {
+        OutputNewBlockGroup(iGroup, myFile);
+
+        OutputHoleGroup(iGroup);
+    }
+
+    myFile.close();
+
+    return;
+}
+
+void BlockGroupManager::OutputNewBlockGroup(int iGroup, ofstream &myFile)
+{
+    ostringstream oss;
+    string gridGroupHeadName;
+    GlobalDataBase::GetData("gridGroupHeadName", &gridGroupHeadName, PHSTRING, 1);
+    oss << gridGroupHeadName << iGroup << ".grd";
+    string file = oss.str();
+    ofstream outFile(file.c_str(), ios_base::binary);
+
+    int localBlockNumber = blockEnd[iGroup] - blockStart[iGroup] + 1;
+    myFile << "iGroup = " << setw(8) << iGroup << "  blockStart = " << setw(8) << blockStart[iGroup] << "  blockEnd = " << setw(8) << blockEnd[iGroup] << endl;
+
+    vector< vector < vector < int > > > bcIndexTable;
+    bcIndexTable.resize(localBlockNumber);
+
+    int iCounter = 0;
+    for (int iBlock = blockStart[iGroup]; iBlock <= blockEnd[iGroup]; ++ iBlock)
+    {
+        int oldBlockLabel = InverseMapping[iBlock];
+        BoundaryCluster &bc = boundaryCluster[oldBlockLabel];
+        bcIndexTable[iCounter] = bc.ExtractPhysicalBoundaryIndex();
+
+        iCounter += 1;
+    }
+
+    uint_t numberOfPhysicsFaces = 0;
+    for (int m = 0; m < localBlockNumber; ++ m)
+    {
+        numberOfPhysicsFaces += bcIndexTable[m].size();
+    }
+    outFile.write((char *)&numberOfPhysicsFaces, sizeof(int));
+
+    int si, sj, sk;
+    for (int m = 0; m < localBlockNumber; ++ m)
+    {
+        if (bcIndexTable[m].size() == 0) continue;
+
+        for (std::size_t n = 0; n < bcIndexTable[m].size(); ++ n)
+        {
+            si = bcIndexTable[m][n][1] - bcIndexTable[m][n][0] + 1;
+            sj = bcIndexTable[m][n][3] - bcIndexTable[m][n][2] + 1;
+            sk = bcIndexTable[m][n][5] - bcIndexTable[m][n][4] + 1;
+            if (sk == 1)
+            {
+                outFile.write((char *)&si,  sizeof(int));
+                outFile.write((char *)&sj,  sizeof(int));
+                outFile.write((char *)&sk,  sizeof(int));
+            }
+            else if (sj == 1)
+            {
+                outFile.write((char *)&si,  sizeof(int));
+                outFile.write((char *)&sk,  sizeof(int));
+                outFile.write((char *)&sj,  sizeof(int));
+            }
+            else
+            {
+                outFile.write((char *)&sj,  sizeof(int));
+                outFile.write((char *)&sk,  sizeof(int));
+                outFile.write((char *)&si,  sizeof(int));
+            }
+        }
+    }
+
+    for (int m = 0; m < localBlockNumber; ++ m)
+    {
+        if (bcIndexTable[m].size() == 0) continue;
+
+        int oldBlockLabel = InverseMapping[blockStart[iGroup] + m];
+        for (std::size_t n = 0; n < bcIndexTable[m].size(); ++ n)
+        {
+            int ist = bcIndexTable[m][n][0];
+            int ied = bcIndexTable[m][n][1];
+
+            int jst = bcIndexTable[m][n][2];
+            int jed = bcIndexTable[m][n][3];
+
+            int kst = bcIndexTable[m][n][4];
+            int ked = bcIndexTable[m][n][5];
+
+            for (int aspect = ASPECTX; aspect <= ASPECTZ; ++ aspect)
+            {
+                for (int k = kst; k <= ked; ++ k)
+                {
+                    for (int j = jst; j <= jed; ++ j)
+                    {
+                        for (int i = ist; i <= ied; ++ i)
+                        {
+                            RDouble coordinate = basalGrid[oldBlockLabel].GetCoordinate(aspect, i, j, k);
+                            outFile.write((char *)&coordinate, sizeof(RDouble));
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    outFile.close();
+    return;
+}
+
+void BlockGroupManager::OutputNewSurfaceGrid()
+{
+    vector <int> localNumberOfSurfaces, localNumberOfPoints;
+    vector <int> ni, nj;
+    vector <RDouble> coordinate;
+
+    for (int iGroup = 0; iGroup < groupNumber; ++ iGroup)
+    {
+        ostringstream oss;
+        string gridGroupHeadName;
+        GlobalDataBase::GetData("gridGroupHeadName", &gridGroupHeadName, PHSTRING, 1);
+        oss << gridGroupHeadName << iGroup << ".grd";
+        string file = oss.str();
+        ifstream infile(file.c_str(), ios_base::binary);
+
+        int ns;
+        infile.read((char *)&ns, sizeof(int));
+        localNumberOfSurfaces.push_back(ns);
+
+        int is, js, ks, np = 0;
+        for (int id = 0; id < ns; ++ id)
+        {
+            infile.read((char *)&is, sizeof(int));
+            ni.push_back(is);
+
+            infile.read((char *)&js, sizeof(int));
+            nj.push_back(js);
+
+            infile.read((char *)&ks, sizeof(int));
+            np += is * js;
+        }
+
+        localNumberOfPoints.push_back(np);
+
+        RDouble ss;
+        for (int ip = 0; ip < 3 * np; ++ ip)
+        {
+            infile.read((char *)&ss, sizeof(RDouble));
+            coordinate.push_back(ss);
+        }
+        infile.close();
+    }
+
+    string newGridFileName;
+    GlobalDataBase::GetData("newGridFileName", &newGridFileName, PHSTRING,1);
+    ofstream outFile(newGridFileName.c_str(), ios_base::binary);
+
+    int nst = 0, npt = 0;
+    for (int iGroup = 0; iGroup < groupNumber; ++ iGroup)
+    {
+        nst += localNumberOfSurfaces[iGroup];
+        npt += localNumberOfPoints[iGroup];
+    }
+    outFile.write((char *)&nst, sizeof(int));
+
+    int kk = 1;
+    for (int iSurface = 0; iSurface < nst; ++ iSurface)
+    {
+        outFile.write((char *)&ni[iSurface], sizeof(int));
+        outFile.write((char *)&nj[iSurface], sizeof(int));
+        outFile.write((char *)&kk          , sizeof(int));
+    }
+
+    outFile.write((char *)&coordinate[0], 3 * npt * sizeof(RDouble));
+    outFile.close();
+
+    string surfaceGroupFileName;
+    GlobalDataBase::GetData("surfaceGroupFileName", &surfaceGroupFileName, PHSTRING,1);
+    ofstream surfile(surfaceGroupFileName.c_str());
+    int istart = 0;
+    for (int iGroup = 0; iGroup < groupNumber; ++ iGroup)
+    {
+        int iSurfaceStart = istart, iSurfaceEnd = istart + localNumberOfSurfaces[iGroup] - 1;
+        surfile << "iGroup = " << setw(8) << iGroup << "  surfaceStart = " << setw(8) << iSurfaceStart  << "  surfaceEnd = " << setw(8) << iSurfaceEnd << endl;
+        istart = iSurfaceEnd + 1;
+    }
+    surfile.close();
+
+    return;
+}
+
+void BlockGroupManager::OutputNewGrid()
+{
+    int iDimension, jDimension, kDimension;
+    string newGridFileName;
+    GlobalDataBase::GetData("newGridFileName", &newGridFileName, PHSTRING,1);
+    ofstream outFile(newGridFileName.c_str(), ios::binary);
+    outFile.write((char *)&globalBlockNumber, sizeof(int));
+
+    for (int iGroup = 0; iGroup < groupNumber; ++ iGroup)
+    {
+        for (int iBlock = blockStart[iGroup]; iBlock <= blockEnd[iGroup]; ++ iBlock)
+        {
+            int oldBlockLabel = InverseMapping[iBlock];
+            iDimension = basalGrid[oldBlockLabel].GetIDimension();
+            jDimension = basalGrid[oldBlockLabel].GetJDimension();
+            kDimension = basalGrid[oldBlockLabel].GetKDimension();
+
+            outFile.write((char *)&iDimension, sizeof(int));
+            outFile.write((char *)&jDimension, sizeof(int));
+            outFile.write((char *)&kDimension, sizeof(int));
+        }
+    }
+
+    for (int iGroup = 0; iGroup < groupNumber; ++ iGroup)
+    {
+        for (int iBlock = blockStart[iGroup]; iBlock <= blockEnd[iGroup]; ++ iBlock)
+        {
+            int oldBlockLabel = InverseMapping[iBlock];
+            iDimension = basalGrid[oldBlockLabel].GetIDimension();
+            jDimension = basalGrid[oldBlockLabel].GetJDimension();
+            kDimension = basalGrid[oldBlockLabel].GetKDimension();
+
+            for (int aspect = ASPECTX; aspect <= ASPECTZ; ++ aspect)
+            {
+                for (int k = 0; k < kDimension; ++ k)
+                {
+                    for (int j = 0; j < jDimension; ++ j)
+                    {
+                        for (int i = 0; i < iDimension; ++ i)
+                        {
+                            RDouble coordinate = basalGrid[oldBlockLabel].GetCoordinate(aspect, i, j, k);
+                            outFile.write((char *)&coordinate, sizeof(RDouble));
+                        }
+                    }
+                }
+            }
+        }
+    }
+    outFile.close();
+
+    return;
+}
+
+void BlockGroupManager::OutputNewBoundary()
+{
+    int iDimension, jDimension, kDimension, lastPara;
+    int iSolver = 1;
+    PHSimpleFace *simpleFaceGuard = 0;
+    string newBoundaryFileName;
+    GlobalDataBase::GetData("newBoundaryFileName", &newBoundaryFileName, PHSTRING,1);
+    ofstream outFile(newBoundaryFileName.c_str());
+    outFile << iSolver << endl;
+    outFile << globalBlockNumber << endl;
+    for (int iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        int oldBlockLabel = InverseMapping[iBlock];
+        iDimension = basalGrid[oldBlockLabel].GetIDimension();
+        jDimension = basalGrid[oldBlockLabel].GetJDimension();
+        kDimension = basalGrid[oldBlockLabel].GetKDimension();
+
+        outFile << iDimension << setw(4) << jDimension << setw(4) << kDimension << setw(8) << "proc " << iBlock << endl;
+        
+        outFile << "block" << iBlock+1 << endl;
+        int overallFaceNumber = boundaryCluster[oldBlockLabel].GetOverallFaceNumber();
+        outFile << setw(8) << overallFaceNumber << endl;
+        int externalSign = 0;
+        simpleFaceGuard = boundaryCluster[oldBlockLabel].GetSimpleFaceHead();
+
+        while (simpleFaceGuard)
+        {
+            const int *localParameter = simpleFaceGuard->GetLocalParameter();
+            if (externalSign == 0)
+            {
+                lastPara = localParameter[6];
+                if (lastPara == -1)
+                {
+                    externalSign = 1;
+                }
+            }
+            else
+            {
+                int oldSlaveLabel = localParameter[6]-1;
+                lastPara = blockCluster[oldSlaveLabel].GetNewBlockLabel()+1;
+                externalSign = 0;
+            }
+            
+            for (int i = 0; i < 6; ++ i)
+            {
+                outFile << setw(8) << localParameter[i];
+            }
+            outFile << setw(8) << lastPara << endl;
+            simpleFaceGuard = simpleFaceGuard->GetNextPointer();
+        }
+    }
+    outFile.close();
+
+    return;
+}
+
+void BlockGroupManager::OutputStandardBoundary()
+{
+    using namespace PHMPI;
+
+    GlobalDataBase::GetData("originalExternalLabel", &originalExternalLabel, PHINT, 1);
+
+    int iDimension, jDimension, kDimension, lastPara;
+    int iSolver = 1;
+    PHSimpleFace *simpleFaceGuard = 0;
+
+    string standardBoundaryFileName;
+    GlobalDataBase::GetData("standardBoundaryFileName", &standardBoundaryFileName, PHSTRING,1);
+    ofstream outFile(standardBoundaryFileName.c_str());
+    outFile << iSolver << endl;
+    outFile << globalBlockNumber << endl;
+    for (int iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        int oldBlockLabel = iBlock;
+        iDimension = basalGrid[oldBlockLabel].GetIDimension();
+        jDimension = basalGrid[oldBlockLabel].GetJDimension();
+        kDimension = basalGrid[oldBlockLabel].GetKDimension();
+
+        int proc = boundaryCluster[iBlock].GetProcessLabel();
+
+        if (!readProc)
+        {
+            outFile << iDimension << setw(4) << jDimension << setw(4) << kDimension << endl;
+        }
+        else
+        {
+            outFile << iDimension << setw(4) << jDimension << setw(4) << kDimension << setw(8) << "proc " << proc << endl;
+        }
+
+        outFile << "block" << iBlock+1 << endl;
+        int internalFaceNumber = boundaryCluster[oldBlockLabel].GetOverallFaceNumber();
+        outFile << setw(8) << internalFaceNumber << endl;
+        int externalSign = 0;
+        simpleFaceGuard = boundaryCluster[oldBlockLabel].GetSimpleFaceHead();
+
+        while (simpleFaceGuard)
+        {
+            const int *localParameter = simpleFaceGuard->GetLocalParameter();
+            if (externalSign == 0)
+            {
+                lastPara = localParameter[6];
+
+                if (lastPara == originalExternalLabel)
+                {
+                    lastPara = EXTERNAL_BC;
+                }
+
+                if (lastPara == -1)
+                {
+                    externalSign = 1;
+                }
+            }
+            else
+            {
+                int oldSlaveLabel = localParameter[6]-1;
+                lastPara = oldSlaveLabel+1;
+                externalSign = 0;
+            }
+            
+            for (int i = 0; i < 6; ++ i)
+            {
+                outFile << setw(8) << localParameter[i];
+            }
+            outFile << setw(8) << lastPara << endl;
+            simpleFaceGuard = simpleFaceGuard->GetNextPointer();
+        }
+    }
+    outFile.close();
+
+    return;
+}
+
+void BlockGroupManager::OutputZoneInverseMapping()
+{
+    string inverseMappingFileName;
+    GlobalDataBase::GetData("inverseMappingFileName", &inverseMappingFileName, PHSTRING,1);
+    ofstream outFile(inverseMappingFileName.c_str(), ios::binary);
+    for (int iBlock = 0; iBlock < globalBlockNumber; ++ iBlock)
+    {
+        int oldBlockLabel = InverseMapping[iBlock];
+        cout << "iBlock = " << iBlock << "  oldBlockLabel = " << oldBlockLabel << endl;
+        outFile.write((char *)&oldBlockLabel, sizeof(int));
+    }
+    outFile.close();
+
+    return;
+}
+
+void BlockGroupManager::OutputHoleGroup(int iGroup)
+{
+    ostringstream oss;
+    string holeGroupHeadName;
+    GlobalDataBase::GetData("holeGroupHeadName", &holeGroupHeadName, PHSTRING, 1);
+    oss << holeGroupHeadName << iGroup << ".grd";
+    string name = oss.str();
+    ofstream outFile(name.c_str(), ios_base::binary);
+
+    int solidFaceCounter = 0;
+
+    for (int iBlock = blockStart[iGroup]; iBlock <= blockEnd[iGroup]; ++ iBlock)
+    {
+        int oldBlockLabel = InverseMapping[iBlock];
+        boundaryCluster[oldBlockLabel].RecordSolidFaceInformation();
+        solidFaceCounter += boundaryCluster[oldBlockLabel].GetNumberOfSolidFaces();
+    }
+
+    outFile.write((char *)&solidFaceCounter, sizeof(int));
+
+    for (int iBlock = blockStart[iGroup]; iBlock <= blockEnd[iGroup]; ++ iBlock)
+    {
+        int oldBlockLabel = InverseMapping[iBlock];
+        boundaryCluster[oldBlockLabel].OutputHoleSurfaceDimension(outFile);
+    }
+
+    for (int iBlock = blockStart[iGroup]; iBlock <= blockEnd[iGroup]; ++ iBlock)
+    {
+        int oldBlockLabel = InverseMapping[iBlock];
+        boundaryCluster[oldBlockLabel].OutputHoleSurfaceGrid(outFile, &basalGrid[oldBlockLabel]);
+    }
+
+    outFile.close();
+
+    return;
+}
+
+}
\ No newline at end of file
diff --git a/Main/src/GridgenIn.cpp b/Main/src/GridgenIn.cpp
new file mode 100644
index 0000000..f2b4e45
--- /dev/null
+++ b/Main/src/GridgenIn.cpp
@@ -0,0 +1,533 @@
+#include <string>
+#include "GridgenIn.h"
+#include "Geo_StructBC.h"
+#include "TK_Parse.h"
+#include "Glb_Dimension.h"
+#include "Math_BasisFunction.h"
+#include "TK_Exit.h"
+#include "Geo_StructGrid.h"
+#include "GridType.h"
+
+#pragma warning (disable:913)
+namespace PHSPACE
+{
+void ReadPlot3dGrid(Grid **&structGrids, int &numberOfBlocks, const string &gridgenFile, const string &BCFile)
+{
+    int fileFormat = GlobalDataBase::GetIntParaFromDB("fileformat");
+    //! Fileformat: Grid file format.
+    //!             1 --- ASCII
+    //!             0 --- BINARY
+    fileFormat = CheckCoorFileIfASCII(gridgenFile);
+    GlobalDataBase::UpdateData("fileformat", &fileFormat, PHINT, 1);
+
+    if (fileFormat == 1)
+    {
+        ReadPlot3DCoorASCII(gridgenFile, numberOfBlocks, structGrids);
+    }
+    else if (fileFormat == 0)
+    {
+        ReadPlot3DCoorBinary(gridgenFile, numberOfBlocks, structGrids);
+    }
+    ReadBoundaryFile(structGrids, numberOfBlocks, BCFile);
+}
+
+void ReadGridgenGrid(Grid **&structGrids, int &numberOfBlocks, const string &gridgenFile, const string &BCFile)
+{
+    int fileFormat = GlobalDataBase::GetIntParaFromDB("fileformat");
+    //! Fileformat: Grid file format.
+    //!             1 --- ASCII
+    //!             0 --- BINARY
+    fileFormat = CheckCoorFileIfASCII(gridgenFile);
+    GlobalDataBase::UpdateData("fileformat", &fileFormat, PHINT, 1);
+
+    if (fileFormat == 1)
+    {
+        ReadGridgenCoorASCII(gridgenFile, numberOfBlocks, structGrids);
+    }
+    else
+    {
+        ostringstream oss;
+        oss << "  Error: this situation has not been considered, for file type = BINARY, when from_gtype = Gridgen." << endl;
+        TK_Exit::ExceptionExit(oss.str());
+    }
+
+    ReadBoundaryFile(structGrids, numberOfBlocks, BCFile);
+}
+
+void ReadPlot3DCoorBinary(const string &coordinateFile, int &numberOfBlocks, Grid **&structGrids)
+{
+    fstream file;
+    file.open(coordinateFile.c_str(), ios_base::in|ios_base::binary);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(coordinateFile);
+    }
+
+    CharVecSizeType sizeOfIntType = sizeof(int);
+
+    file.read(reinterpret_cast <char *> (&numberOfBlocks), sizeOfIntType);
+
+    structGrids = new Grid *[numberOfBlocks];
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        int ni, nj, nk;
+        file.read(reinterpret_cast <char *> (&ni), sizeOfIntType);
+        file.read(reinterpret_cast <char *> (&nj), sizeOfIntType);
+        file.read(reinterpret_cast <char *> (&nk), sizeOfIntType);
+
+        GridID *index = new GridID(iZone);
+        StructGrid *grid = StructGridCast(CreateGridGeneral(STRUCTGRID, index, 0, GetDim()));
+        structGrids[iZone] = grid;
+        grid->SetNI(ni);
+        grid->SetNJ(nj);
+        grid->SetNK(nk);
+
+        grid->SetBasicDimension();
+
+        int nTotalNode = grid->GetNTotalNode();
+        RDouble *x = new RDouble[nTotalNode];
+        RDouble *y = new RDouble[nTotalNode];
+        RDouble *z = new RDouble[nTotalNode];
+        grid->SetX(x);
+        grid->SetY(y);
+        grid->SetZ(z);
+        grid->SetArrayLayout();
+
+        int wordWidth = 8;
+
+        cout << setiosflags(ios::right);
+        cout << " iZone = " << setw(wordWidth) << iZone;
+        cout << " numberOfBlocks = " << setw(wordWidth) << numberOfBlocks;
+        cout << " ni, nj, nk = ";
+        cout << setw(wordWidth) << ni;
+        cout << setw(wordWidth) << nj;
+        cout << setw(wordWidth) << nk;
+        cout << "\n";
+        //cin.get();
+
+        //delete index;
+    }
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        StructGrid *grid = StructGridCast(structGrids[iZone]);
+        grid->ReadXYZ(file);
+    }
+    file.close();
+    file.clear();
+}
+
+void ReadGridgenCoorASCII(const string &coordinateFile, int &numberOfBlocks, Grid **&structGrids)
+{
+    fstream file;
+    file.open(coordinateFile.c_str(),ios_base::in);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(coordinateFile);
+    }
+    file >> numberOfBlocks;
+
+    structGrids = new Grid *[numberOfBlocks];
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        int ni, nj, nk;
+        file >> ni;
+        file >> nj;
+        file >> nk;
+
+        GridID *index = new GridID(iZone);
+        StructGrid *grid = StructGridCast(CreateGridGeneral(STRUCTGRID, index, 0, GetDim()));
+        structGrids[iZone] = grid;
+        grid->SetNI(ni);
+        grid->SetNJ(nj);
+        grid->SetNK(nk);
+
+        grid->SetBasicDimension();
+
+        int nTotalNode = grid->GetNTotalNode();
+        RDouble *x = new RDouble[nTotalNode];
+        RDouble *y = new RDouble[nTotalNode];
+        RDouble *z = new RDouble[nTotalNode];
+        grid->SetX(x);
+        grid->SetY(y);
+        grid->SetZ(z);
+        grid->SetArrayLayout();
+
+        int wordWidth = 8;
+
+        cout << setiosflags(ios::right);
+        cout << " iZone = " << setw(wordWidth) << iZone;
+        cout << " numberOfBlocks = " << setw(wordWidth) << numberOfBlocks;
+        cout << " ni, nj, nk = ";
+        cout << setw(wordWidth) << ni;
+        cout << setw(wordWidth) << nj;
+        cout << setw(wordWidth) << nk;
+        cout << "\n";
+
+        grid->ReadXYZ(file);
+    }
+
+    file.close();
+    file.clear();
+}
+
+int CheckCoorFileIfASCII(const string &coordinateFile)
+{
+    fstream file;
+    file.open(coordinateFile.c_str(), ios_base::in|ios_base::binary);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(coordinateFile);
+    }
+
+    CharVecSizeType sizeOfIntType = sizeof(int);
+
+    int numberOfBlocks = 0;
+    file.read(reinterpret_cast <char *> (&numberOfBlocks), sizeOfIntType);
+
+    file.close();
+    file.clear();
+
+    if(numberOfBlocks <= static_cast <int> (1e8))
+    {
+        return 0;
+    }
+    else
+    {
+        return 1;
+    }
+}
+
+void ReadPlot3DCoorASCII(const string &coordinateFile, int &numberOfBlocks, Grid **&structGrids)
+{
+    fstream file;
+    file.open(coordinateFile.c_str(), ios_base::in);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(coordinateFile);
+    }
+    file >> numberOfBlocks;
+
+    structGrids = new Grid *[numberOfBlocks];
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        int ni, nj, nk;
+        file >> ni;
+        file >> nj;
+        file >> nk;
+
+        GridID *index = new GridID(iZone);
+        StructGrid *grid = StructGridCast(CreateGridGeneral(STRUCTGRID, index, 0, GetDim()));
+        structGrids[iZone] = grid;
+        grid->SetNI(ni);
+        grid->SetNJ(nj);
+        grid->SetNK(nk);
+
+        grid->SetBasicDimension();
+
+        int nTotalNode = grid->GetNTotalNode();
+        RDouble *x = new RDouble[nTotalNode];
+        RDouble *y = new RDouble[nTotalNode];
+        RDouble *z = new RDouble[nTotalNode];
+        grid->SetX(x);
+        grid->SetY(y);
+        grid->SetZ(z);
+        grid->SetArrayLayout();
+
+        int wordWidth = 8;
+
+        cout << setiosflags(ios::right);
+        cout << " iZone = " << setw(wordWidth) << iZone;
+        cout << " numberOfBlocks = " << setw(wordWidth) << numberOfBlocks;
+        cout << " ni, nj, nk = ";
+        cout << setw(wordWidth) << ni;
+        cout << setw(wordWidth) << nj;
+        cout << setw(wordWidth) << nk;
+        cout << "\n";
+    }
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        StructGrid *grid = StructGridCast(structGrids[iZone]);
+        grid->ReadXYZ(file);
+    }
+    file.close();
+    file.clear();
+}
+
+void ReadBoundaryFile(Grid **&structGrids, int &inputNumberOfBlocks, const string &BCFile)
+{
+    fstream file;
+    file.open(BCFile.c_str(), ios_base::in);
+    if(!file)
+    {
+        TK_Exit::FileOpenErrorExit(BCFile);
+    }
+
+    string line, word;
+    string separator = " =\t\r\n#$,;";
+
+    ReadNewLine(file, line);
+    line = FindNextWord(line, word, separator);
+    int flowSolverID;
+    from_string <int> (flowSolverID, word, std::dec);
+    cout << "flow_solver_id = " << flowSolverID << "\n";
+
+    ReadNewLine(file, line);
+    line = FindNextWord(line, word, separator);
+    int numberOfBlocks;
+    from_string <int> (numberOfBlocks, word, std::dec);
+    cout << "number_of_blocks = " << numberOfBlocks << "\n";
+
+    if (numberOfBlocks != inputNumberOfBlocks)
+    {
+        TK_Exit::ExceptionExit("The number of blocks in boundary file is inconsistent with the number of blocks in grid file!\n");
+    }
+
+    int nDim = GetDim();
+
+    bool blockProcessFlag = false;
+
+    using namespace PHMPI;
+
+    CreatetZoneProcessorID_INP(numberOfBlocks);
+    int *blockProcessorINP = GetZoneProcessorID_INP();
+
+    string boundaryName[100] = {"NO_BOUNDARY_CONDITION", "EXTRAPOLATION", "SOLID_SURFACE", "SYMMETRY", 
+                                "FARFIELD", "INFLOW", "OUTFLOW", "POLE", "Wall_8", "Wall_9", "Wall_10", "Wall_11", 
+                                "Wall_12", "Wall_13", "Wall_14", "Wall_15", "Wall_16", "Wall_17", "Wall_18", "Wall_19",
+                                "Wall_20", "Wall_21", "Wall_22", "Wall_23", "Wall_24", "Wall_25", "Wall_26", "Wall_27", 
+                                "Wall_28", "Wall_29", "Wall_30", "Wall_31", "Wall_32", "Wall_33", "Wall_34", "Wall_35",
+                                "Wall_36", "Wall_37", "Wall_38", "Wall_39", "Wall_40", "Wall_41", "Wall_42", "Wall_43",
+                                "Wall_44", "Wall_45", "Wall_46", "Wall_47", "Wall_48", "Wall_49", "Wall_50"};
+    boundaryName[52] = "PRESSURE_INLET";
+    boundaryName[62] = "PRESSURE_OUTLET";
+    boundaryName[71] = "POLE1";
+    boundaryName[72] = "POLE2";
+    boundaryName[73] = "POLE3";
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        StructGrid *grid = StructGridCast(structGrids[iZone]);
+
+        int ni, nj, nk;
+        ReadNewLine(file, line);
+        line = FindNextWord(line, word, separator);
+        from_string <int> (ni,word, std::dec);
+        line = FindNextWord(line, word, separator);
+        from_string <int> (nj, word, std::dec);
+        nk = 1;
+        if (nDim == THREE_D)
+        {
+            line = FindNextWord(line, word, separator);
+            from_string <int> (nk, word, std::dec);
+        }
+
+        cout << "ni,nj,nk = " << ni << " " << nj << " " << nk << "\n";
+        int ndif = ABS(ni - grid->GetNI()) + ABS(nj - grid->GetNJ()) + ABS(nk - grid->GetNK()) ;
+        if (ndif != 0)
+        {
+            cout << "No." << iZone + 1 << "The number of IJK-Dimension in boundary file is inconsistent with the number of IJK-Dimension in grid file!\n";
+        }
+
+        line = FindNextWord(line, word, separator);
+        if (word == "proc")
+        {
+            blockProcessFlag = true;
+            line = FindNextWord(line, word, separator);
+            int proc = 0;
+            from_string <int> (proc, word, std::dec);
+            blockProcessorINP[iZone] = proc;
+        }
+
+        string blockname;
+        ReadNewLine(file, line);
+        line = FindNextWord(line, blockname, separator);
+        int numberOfBCRegion;
+        ReadNewLine(file, line);
+        line = FindNextWord(line, word, separator);
+        from_string <int> (numberOfBCRegion, word, std::dec);
+
+        grid->CreateCompositeBCRegion(numberOfBCRegion);
+        StructBCSet *structBCSet = grid->GetStructBCSet();
+        for (int iBCRegion = 0; iBCRegion < numberOfBCRegion; ++ iBCRegion)
+        {
+            int imin, imax, jmin, jmax, kmin, kmax, BCType;
+            ReadNewLine(file, line);
+            line = FindNextWord(line, word, separator);
+            from_string <int> (imin, word, std::dec);
+            line = FindNextWord(line, word, separator);
+            from_string <int> (imax, word, std::dec);
+
+            line = FindNextWord(line, word, separator);
+            from_string <int> (jmin, word, std::dec);
+            line = FindNextWord(line, word, separator);
+            from_string <int> (jmax, word, std::dec);
+
+            if (nDim == THREE_D)
+            {
+                line = FindNextWord(line, word, separator);
+                from_string <int> (kmin, word, std::dec);
+                line = FindNextWord(line, word, separator);
+                from_string <int> (kmax, word, std::dec);
+            }
+            else
+            {
+                kmin = 1;
+                kmax = 1;
+            }
+
+            line = FindNextWord(line, word, separator);
+            from_string <int> (BCType, word, std::dec);
+
+            StructBC *BCRegions = new StructBC(iZone, iBCRegion);
+            structBCSet->SetBCRegion(iBCRegion, BCRegions);
+            BCRegions->SetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+            BCRegions->SetBCType(BCType);
+
+            string bcName;
+            line = FindNextWord(line, bcName, separator);
+            if (bcName == "")
+            {
+                if (BCType == -1)
+                {
+                    bcName = "Connection";
+                }
+                else
+                {
+                    bcName = boundaryName[BCType];
+                    if ((BCType > 7) && (BCType < 51))
+                    {
+                        BCType = 2;
+                        BCRegions->SetBCType(BCType);
+                    }
+                }
+                BCRegions->SetBCName(bcName);
+            }
+            else
+            {
+                BCRegions->SetBCName(bcName);
+            }
+
+            if (IsInterface(BCType))
+            {
+                int nbt, originalBlockIndex;
+                ReadNewLine(file, line);
+                line = FindNextWord(line, word, separator);
+                from_string <int> (imin, word, std::dec);
+                line = FindNextWord(line, word, separator);
+                from_string <int> (imax, word, std::dec);
+
+                line = FindNextWord(line, word, separator);
+                from_string <int> (jmin, word, std::dec);
+                line = FindNextWord(line, word, separator);
+                from_string <int> (jmax, word, std::dec);
+
+                if (nDim == THREE_D)
+                {
+                    line = FindNextWord(line, word, separator);
+                    from_string <int> (kmin, word, std::dec);
+                    line = FindNextWord(line, word, separator);
+                    from_string <int> (kmax, word, std::dec);
+                }
+                else
+                {
+                    kmin = 1;
+                    kmax = 1;
+                }
+
+                line = FindNextWord(line, word, separator);
+                from_string <int> (originalBlockIndex , word, std::dec);
+                nbt = originalBlockIndex - 1;
+                BCRegions->SetTargetIJKRegion(imin, imax, jmin, jmax, kmin, kmax);
+                BCRegions->SetTargetRegionBlock(nbt);
+                if (nDim == THREE_D)
+                {
+                    BCRegions->ComputeRelativeParameters();
+                }
+            }
+        }
+    }
+
+    if (!blockProcessFlag)
+    {
+        delete [] blockProcessorINP;
+        SetZoneProcessID_INP(0);
+    }
+
+    file.close();
+    file.clear();
+}
+
+void ReadPartitionFileForOverset(int &inputNumberOfBlocks, const string &PartitionFile)
+{
+    fstream file;
+    file.open(PartitionFile.c_str(), ios_base::in);
+    if (!file)
+    {
+        TK_Exit::FileOpenErrorExit(PartitionFile);
+    }
+
+    string line, word;
+    string separator = " =\t\r\n#$,;";
+
+    string str1;
+    ReadNewLine(file, line);
+    line = FindNextWord(line, str1, separator);
+
+    ReadNewLine(file, line);
+    line = FindNextWord(line, word, separator);
+    int numberOfBlocks;
+    from_string <int> (numberOfBlocks, word, std::dec);
+    cout << "number_of_blocks = " << numberOfBlocks << "\n";
+
+    if (numberOfBlocks != inputNumberOfBlocks)
+    {
+        TK_Exit::ExceptionExit(" the numberOfBlocks of partition files does not agree with in mesh file\n");
+    }
+
+    ReadNewLine(file, line);    //! Read the third line.
+
+    bool blockProcessFlag = true;
+
+    using namespace PHMPI;
+
+    CreatetZoneProcessorID_INP(numberOfBlocks);
+    CreateZoneGroupID(numberOfBlocks);
+    int *blockProcessorINP = GetZoneProcessorID_INP();
+    int *blockGroupID = GetZoneGroupID();
+
+    for (int iZone = 0; iZone < numberOfBlocks; ++ iZone)
+    {
+        int zone, rank, group;
+        ReadNewLine(file, line);
+        line = FindNextWord(line, word, separator);
+        from_string <int> (zone, word, std::dec);
+        line = FindNextWord(line, word, separator);
+        from_string <int> (rank, word, std::dec);
+        line = FindNextWord(line, word, separator);
+        from_string <int> (group, word, std::dec);
+
+        cout << "zone, rank, group = " << zone << " " << rank << " " << group << "\n";
+
+        if (iZone != zone)
+        {
+            cout << "partition.ppsh NO." << iZone + 1 << "block data error!\n";
+        }
+
+        blockProcessorINP[iZone] = rank;
+        blockGroupID[iZone] = group;
+    }
+
+    if (!blockProcessFlag)
+    {
+        delete [] blockProcessorINP;
+        delete [] blockGroupID;
+        SetZoneProcessID_INP(0);
+    }
+
+    file.close();
+    file.clear();
+}
+
+}
diff --git a/Main/src/Simulation.cpp b/Main/src/Simulation.cpp
new file mode 100644
index 0000000..9fb2a7c
--- /dev/null
+++ b/Main/src/Simulation.cpp
@@ -0,0 +1,2078 @@
+#include "Simulation.h"
+#include "IO_FileName.h"
+#include "TK_Parse.h"
+#include "GridFactory.h"
+#include "AleManager.h"
+#include "GridPartition.h"
+#include "Controller.h"
+#include "TK_Time.h"
+#include "PHIO.h"
+#include "Geo_Sample.h"
+#include "Geo_SimpleVC.h"
+#include "UnstructuredOversetConfig.h"
+#include "HOSimulation.h"
+#include "Post_ProbesWrite.h"
+
+#include "OversetInformation.h"
+#include "SolversList.h"
+#include "PostProcess.h"
+#include "Glb_Dimension.h"
+#include "Zone.h"
+#include "Pre_WalldistCompute.h"
+#include "Post_WriteVisualFile.h"
+#include "LESSolverStruct.h"
+#include "LESSolverUnstr.h"
+#ifdef USE_INCOMSOLVER
+#include "IncomUnstructSolver.h"
+#endif
+#ifdef USE_SpecDiffHybSolver
+#include "SpecDiffHybSolver.h"
+#include "SpecSolver.h"
+#endif
+#ifdef USE_DEMOSOLVER
+#include "DemoSolver.h"
+#endif
+#ifdef USE_LBMSolverMPI
+#include "LBMSolverMPI.hpp"
+#endif
+#ifdef USE_LBMSolverOMP
+#include "LBMSolverOMP.hpp"
+#endif
+using namespace std;
+
+namespace PHSPACE
+{
+Simulation::Simulation(int dimension)
+{
+    using namespace PHMPI;
+
+    SetDim(dimension);
+
+    region = new Region();
+}
+
+Simulation::~Simulation()
+{
+    using namespace PHMPI;
+
+    delete region;
+
+    TK_Exit::ExitPHengLEI();
+}
+
+void Simulation::Start()
+{
+    int taskType = GetTaskCode();
+
+    switch (taskType)
+    {
+    case SOLVE_FIELD:
+        RunCFD();
+        break;
+    case CREATE_GRID:
+        PHSPACE::CreateGrid();
+        break;
+    case CAL_WALL_DIST:
+        ComputeWallDistance();
+        break;
+    case PARTITION_GRID:
+        IsNeedConvert();
+        PHSPACE::PartitionGrid();
+        break;
+    case OVERSETGRID_VIEW:
+        PHSPACE::OversetGridView();
+        break;
+    case OVERSET_CONFIG:
+        PHSPACE::RunOversetGridConfig();
+        break;
+    case HO_SOLVER:
+        {
+            HOUnstruct::HOSimulation *uho = new HOUnstruct::HOSimulation();
+            uho->Run();
+            delete uho;
+            break;
+        }
+    case INTEGRATIVE_SOLVER:
+        RunIntegrativeSolver();
+        break;
+    #ifdef USE_SpecDiffHybSolver
+    case SPECDIFFHYB_SOLVER:
+        RunSpecDiffHybSolver();
+        break;
+    case SPEC_SOLVER:
+        RunSpecSolver();
+        break;
+    #endif
+    case POST_PROCESSING:
+        RunPostProcessing();
+        break;
+    #ifdef USE_LBMSolverMPI
+    case LBM_SOLVER_MPI:
+        RunLBMSolverMPI();
+        break;
+    #endif
+    #ifdef USE_LBMSolverOMP
+    case LBM_SOLVER_OMP:
+        RunLBMSolverOMP();
+        break;
+    #endif
+    default:
+        TK_Exit::UnexpectedVarValue("taskType = ", taskType);
+        break;
+    }
+}
+
+void Simulation::IsNeedConvert()
+{
+    string originalGridFile = GlobalDataBase::GetStrParaFromDB("original_grid_file");
+
+    string fileMame, fileSuffix;
+    GetNameExt(originalGridFile, fileMame, fileSuffix, ".");
+
+    set < pair<string, int> > gridTypeMap;
+    gridTypeMap.insert(pair <string, int> ("fts",  PHENGLEI_TYPE ));
+    gridTypeMap.insert(pair <string, int> ("cgns", CGNS_TYPE     ));
+    gridTypeMap.insert(pair <string, int> ("grd",  PLOT3D_TYPE   ));
+    gridTypeMap.insert(pair <string, int> ("uns",  FIELDVIEW_TYPE));
+    gridTypeMap.insert(pair <string, int> ("cas",  FLUENT_TYPE   ));
+
+    int sourceGridType = 0;
+    set< pair<string, int> >::iterator iter;
+    for (iter = gridTypeMap.begin(); iter != gridTypeMap.end(); ++ iter)
+    {
+        if (fileSuffix.compare((*iter).first) != 0)
+        {
+            continue;
+        }
+
+        sourceGridType = (*iter).second;
+        break;
+    }
+
+    if (sourceGridType == 0)
+    {
+        ostringstream oss;
+        oss << "  Error: this situation has not been considered, for filetype = ." << fileSuffix << endl;
+        TK_Exit::ExceptionExit(oss.str());
+    }
+
+    if (sourceGridType != PHENGLEI_TYPE)
+    {
+        GlobalDataBase::UpdateData("from_gtype", &sourceGridType, PHINT, 1);
+        GlobalDataBase::UpdateData("from_gfile", &originalGridFile, PHSTRING, 1);
+
+        int targetGridType = 1;
+        GlobalDataBase::UpdateData("to_gtype", &targetGridType, PHINT, 1);
+
+        string outputGridFile = ChangeExtensionOfFileName(originalGridFile, "fts");
+        GlobalDataBase::UpdateData("out_gfile", &outputGridFile, PHSTRING, 1);
+
+        int partitionedGridType = GlobalDataBase::GetIntParaFromDB("pgridtype");
+        GlobalDataBase::UpdateData("gridtype", &partitionedGridType, PHINT, 1);
+
+        int gridObjection = 1;
+        GlobalDataBase::UpdateData("gridobj", &gridObjection, PHINT, 1);
+
+        int numberOfSimulationTask = PHSPACE::CREATE_GRID;
+        GlobalDataBase::UpdateData("nsimutask", &numberOfSimulationTask, PHINT, 1);
+
+        int multiBlock = 1;
+        GlobalDataBase::UpdateData("multiblock", &multiBlock, PHINT, 1);
+
+        int axisUp = 1;
+        GlobalDataBase::UpdateData("axisup", &axisUp, PHINT, 1);
+
+        int iadapt = 0;
+        GlobalDataBase::UpdateData("iadapt", &iadapt, PHINT, 1);
+
+        CompleteParamInfo();
+
+        PHSPACE::CreateGrid();
+
+        GlobalDataBase::UpdateData("original_grid_file", &outputGridFile, PHSTRING, 1);
+
+        numberOfSimulationTask = PHSPACE::PARTITION_GRID;
+        GlobalDataBase::UpdateData("nsimutask", &numberOfSimulationTask, PHINT, 1);
+    }
+}
+
+void Simulation::RunCFD()
+{
+    double last_time[3] = {0.0};
+    TIME_SPACE::StartTime(last_time);
+
+    ReadGeometry();
+    
+    UpdateAllZonesPara();
+
+    InitGeometry();
+
+    SwapGeommetry();
+
+    //! If not the OversetGrid, this function will not be used.
+    InitOversetGrid();
+
+    //! Determines whether the current program is still processing the gird. Normally this judgment is not triggered.
+    if (PHMPI::CurrentProcessorIsGridProcessor())
+    {
+        return;
+    }
+
+    //! The flag of solver, the adaptive method sets value great than zero.
+    int isAdaptiveSolver = GlobalDataBase::GetIntParaFromDB("isAdaptiveSolver");
+    //! Solving the NS equations using the automated process from the perfect gas to the thermochemical nonequilibrium gas. This judgment is not invoked if the calculation does not involve a chemical reaction.
+    if (isAdaptiveSolver > 0)
+    {
+        GenerateWalldist();
+        //! Run CFD using the adaptive method.
+        SelfAdaptionRunCFD();
+        return;
+    }
+
+    //! Define solver names for all zones and create the new defined solvers.
+    //! IMPORTANT for solver developers:
+    //! Define your solver name which is same with the solver class name here!
+    DefineAndCreateSolvers();
+
+    //! If running struct grid, this part seems negligible.
+    InitGlobalBoundaryCondition();
+    //! If the file volume_condition.hypara is not exist,return.
+    InitGlobalVolumeCondition();
+    //! Calculate the distance between the single domain and the wall
+    GenerateWalldist();
+
+    //! Initialize each solver on each zone.
+    InitializeSolvers();
+    //! If it is not multigrid, this part of the function simply exits.
+    MultiGridInitFlow();
+
+    //! The main simulation entrance.
+    SolveSimulation();
+
+    //! Do some work after simulation.
+    PostSimulation();
+}
+
+bool Simulation::IsRestartProcess()
+{
+    using namespace PHMPI;
+
+    string restartFile = ".\results\flow.dat";
+    GlobalDataBase::GetData("restartNSFile", &restartFile, PHSTRING, 1);
+    if (PHMPI::IsParallelRun())
+    {
+        restartFile = PHSPACE::AddSymbolToFileName(restartFile, "_", 0);
+    }
+
+    ifstream infile(restartFile.c_str(), ios::in);
+    bool isRestart = false;
+    if (infile)
+    {
+        isRestart = true;
+        infile.close();
+        infile.clear();
+    }
+
+    if (isRestart)
+    {
+        hid_t file;
+        file = OpenHDF5File(restartFile);
+        int gridID = 0;
+        hid_t grploc;
+        string grpName;
+        ostringstream oss;
+        oss << "Group" << gridID;
+        grpName = oss.str();
+
+        grploc = OpenGroup(file, grpName);
+
+        int preChemical = 0, preTemperatureModel = 1;
+        if (CheckDataExist(grploc, "nIsChemicalFlow"))
+        {
+            ReadData(grploc, &preChemical, "nIsChemicalFlow");
+        }
+        if (CheckDataExist(grploc, "nTemperatureModel"))
+        {
+            ReadData(grploc, &preTemperatureModel, "nTemperatureModel");
+        }
+
+        GlobalDataBase::UpdateData("previousChemical", &preChemical, PHINT, 1);
+        GlobalDataBase::UpdateData("previousTModel", &preTemperatureModel, PHINT, 1);
+
+        H5Gclose(grploc);
+        H5Fclose(file);
+    }
+
+    return isRestart;
+}
+
+void Simulation::SelfAdaptionRunCFD()
+{
+    int nFinalChemical = GlobalDataBase::GetIntParaFromDB("nchem");
+    GlobalDataBase::UpdateData("nFinalChemical", &nFinalChemical, PHINT, 1);
+    int nFinalTModel = GlobalDataBase::GetIntParaFromDB("ntmodel");
+    GlobalDataBase::UpdateData("nFinalTModel", &nFinalTModel, PHINT, 1);
+    string nFinalNameList = GlobalDataBase::GetStrParaFromDB("speciesName");
+    string nFinalMassFraction = GlobalDataBase::GetStrParaFromDB("initMassFraction");
+    GlobalDataBase::UpdateData("nFinalNameList", &nFinalNameList, PHSTRING, 1);
+    GlobalDataBase::UpdateData("nFinalMassFraction", &nFinalMassFraction, PHSTRING, 1);
+
+    if (IsRestartProcess())
+    {
+        int preChemical = GlobalDataBase::GetIntParaFromDB("previousChemical");
+        int preTModel = GlobalDataBase::GetIntParaFromDB("previousTModel");
+
+        if (preChemical == 1 && preTModel == 1)
+        {
+            //! Restart from the one-temperature model.
+            SecondStepRunCFD(true);
+            if (nFinalTModel == 1)
+            {
+                //! The third step: the final gas model.
+                FinalStepRunCFD();
+            }
+            else
+            {
+                //! The second step: two-temperature model.
+                ThirdStepRunCFD();
+
+                //! The third step: the final gas model.
+                FinalStepRunCFD();
+            }
+
+            return;
+        }
+        else if (preChemical == 1 && preTModel == 2)
+        {
+            //! Restart from the two-temperature model.
+            ThirdStepRunCFD(true);
+
+            //! The third step: the final gas model.
+            FinalStepRunCFD();
+
+            return;
+        }
+    }
+
+    //! The first step: the perfect gas.
+    FirstStepRunCFD();
+    if (nFinalChemical == 0)
+    {
+        return;
+    }
+    //! The second step: one-temperature model.
+    SecondStepRunCFD();
+    if (nFinalTModel == 1)
+    {
+        //! The third step: the final gas model.
+        FinalStepRunCFD();
+    }
+    else
+    {
+        //! The second step: two-temperature model.
+        ThirdStepRunCFD();
+
+        //! The third step: the final gas model.
+        FinalStepRunCFD();
+    }
+}
+
+void Simulation::FirstStepRunCFD(bool isStart/* = true*/)
+{
+    //! Record the serial number of current iteration step.
+    int nCurrentStep = 1;
+    GlobalDataBase::UpdateData("nCurrentStep", &nCurrentStep, PHINT, 1);
+
+    int nCurrentProcessorID = PHMPI::GetCurrentProcessorID();
+    if (nCurrentProcessorID == PHMPI::server)
+    {
+        cout << endl;
+        cout << "nCurrentStep=" << nCurrentStep << endl;
+    }
+
+    //! The first step: run CFD using the perfect gas model.
+    int nCurChemical = 0;
+    GlobalDataBase::UpdateData("nchem", &nCurChemical, PHINT, 1);
+    int nCurTModel = 1;
+    GlobalDataBase::UpdateData("ntmodel", &nCurTModel, PHINT, 1);
+
+    //! The index of the variable pressure.
+    int nKeyVariableIndex = 4;
+    GlobalDataBase::UpdateData("nKeyVariableIndex", &nKeyVariableIndex, PHINT, 1);
+    string keyVariable = "pressure";
+    GlobalDataBase::UpdateData("keyVariable", &keyVariable, PHSTRING, 1);
+
+    DefineAndCreateSolvers();
+
+    InitGlobalBoundaryCondition();
+
+    GenerateWalldist();
+
+    InitializeSolvers();
+
+    MultiGridInitFlow();
+
+    SelfAdaptionSolve();
+
+    PostSimulation();
+
+    //! Release the dynamic memories at first.
+    CleanGlobalValuesSolver();
+
+    RefreshSolvers();
+}
+
+void Simulation::SecondStepRunCFD(bool isStart/* = false*/)
+{
+    //! Record the serial number of current iteration step.
+    int nCurrentStep = 2;
+    GlobalDataBase::UpdateData("nCurrentStep", &nCurrentStep, PHINT, 1);
+
+    int nCurrentProcessorID = PHMPI::GetCurrentProcessorID();
+    if (nCurrentProcessorID == PHMPI::server)
+    {
+        cout << endl;
+        cout << "nCurrentStep=" << nCurrentStep << endl;
+    }
+
+    //! The second step: run CFD using the one-temperature model.
+    int nCurChemical = 1;
+    GlobalDataBase::UpdateData("nchem", &nCurChemical, PHINT, 1);
+    int nCurTModel = 1;
+    GlobalDataBase::UpdateData("ntmodel", &nCurTModel, PHINT, 1);
+    string speciesName = "O, O2, NO, N, N2";
+    GlobalDataBase::UpdateData("speciesName", &speciesName, PHSTRING, 1);
+    string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+    GlobalDataBase::UpdateData("initMassFraction", &initMassFraction, PHSTRING, 1);
+
+    int nControlVariable = 1;
+    if (GlobalDataBase::IsExist("nControlVariable", PHINT, 1))
+    {
+        nControlVariable = GlobalDataBase::GetIntParaFromDB("nControlVariable");
+    }
+    int nKeyVariableIndex = nControlVariable;
+    if (nControlVariable == 5)
+    {
+        nKeyVariableIndex = 6;
+    }
+    else if (nControlVariable == 6)
+    {
+        nKeyVariableIndex = 9;
+    }
+    else if (nControlVariable > 6)  //! default.
+    {
+        nKeyVariableIndex = 1;      //! The index of the variable temperature.
+    }
+    GlobalDataBase::UpdateData("nKeyVariableIndex", &nKeyVariableIndex, PHINT, 1);
+
+    string keyVariable = "";
+    switch (nControlVariable)
+    {
+    case 0:
+        keyVariable = "density";
+    case 1:
+        keyVariable = "translation temperature";
+    case 2:
+        keyVariable = "vibration temperature";
+    case 3:
+        keyVariable = "electron temperature";
+    case 4:
+        keyVariable = "pressure";
+    default:
+        keyVariable = "translation temperature";
+        break;
+    }
+    GlobalDataBase::UpdateData("keyVariable", &keyVariable, PHSTRING, 1);
+
+    if (!isStart)
+    {
+        InitGlobalValuesSolver();
+    }
+    else
+    {
+        DefineAndCreateSolvers();
+
+        GenerateWalldist();
+    }
+
+    InitGlobalBoundaryCondition();
+
+    InitializeSolvers();
+
+    MultiGridInitFlow();
+
+    SelfAdaptionSolve();
+
+    PostSimulation();
+
+    //! Release the dynamic memories at first.
+    CleanGlobalValuesSolver();
+
+    RefreshSolvers();
+}
+
+void Simulation::ThirdStepRunCFD(bool isStart/* = false*/)
+{
+    //! Record the serial number of current iteration step.
+    int nCurrentStep = 3;
+    GlobalDataBase::UpdateData("nCurrentStep", &nCurrentStep, PHINT, 1);
+
+    int nCurrentProcessorID = PHMPI::GetCurrentProcessorID();
+    if (nCurrentProcessorID == PHMPI::server)
+    {
+        cout << endl;
+        cout << "nCurrentStep=" << nCurrentStep << endl;
+    }
+
+    //! The third step: run CFD using the two-temperature model.
+    int nCurChemical = 1;
+    GlobalDataBase::UpdateData("nchem", &nCurChemical, PHINT, 1);
+    int nCurTModel = 2;
+    GlobalDataBase::UpdateData("ntmodel", &nCurTModel, PHINT, 1);
+    int nEnergyAssembly = 0;
+    if (GlobalDataBase::IsExist("nEnergyAssembly", PHINT, 1))
+    {
+        nEnergyAssembly = GlobalDataBase::GetIntParaFromDB("nEnergyAssembly");
+    }
+    if (nEnergyAssembly == 1)
+    {
+        //! The vibration energy is computed using the polynomial fitting method.
+        int nTEnergyModel = 1;
+        GlobalDataBase::UpdateData("nTEnergyModel", &nTEnergyModel, PHINT, 1);
+    }
+
+    string speciesName = "O, O2, NO, N, N2";
+    GlobalDataBase::UpdateData("speciesName", &speciesName, PHSTRING, 1);
+    string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+    GlobalDataBase::UpdateData("initMassFraction", &initMassFraction, PHSTRING, 1);
+
+    //! The index of the variable vibrational temperature.
+    int nKeyVariableIndex = 2;
+    GlobalDataBase::UpdateData("nKeyVariableIndex", &nKeyVariableIndex, PHINT, 1);
+    string keyVariable = "vibration temperature";
+    GlobalDataBase::UpdateData("keyVariable", &keyVariable, PHSTRING, 1);
+
+    if (!isStart)
+    {
+        InitGlobalValuesSolver();
+    }
+    else
+    {
+        DefineAndCreateSolvers();
+
+        GenerateWalldist();
+    }
+
+    InitGlobalBoundaryCondition();
+
+    InitializeSolvers();
+
+    MultiGridInitFlow();
+
+    SelfAdaptionSolve();
+
+    PostSimulation();
+
+    //! Release the dynamic memories at first.
+    CleanGlobalValuesSolver();
+
+    RefreshSolvers();
+}
+
+void Simulation::FinalStepRunCFD()
+{
+    //! Record the serial number of current iteration step.
+    int nCurrentStep = 4;
+    GlobalDataBase::UpdateData("nCurrentStep", &nCurrentStep, PHINT, 1);
+
+    int nCurrentProcessorID = PHMPI::GetCurrentProcessorID();
+    if (nCurrentProcessorID == PHMPI::server)
+    {
+        cout << endl;
+        cout << "nCurrentStep=" << nCurrentStep << endl;
+    }
+
+    //! The third step: run CFD using the final gas model.
+    int nCurChemical = GlobalDataBase::GetIntParaFromDB("nFinalChemical");
+    GlobalDataBase::UpdateData("nchem", &nCurChemical, PHINT, 1);
+    int nCurTModel = GlobalDataBase::GetIntParaFromDB("nFinalTModel");
+    GlobalDataBase::UpdateData("ntmodel", &nCurTModel, PHINT, 1);
+    string speciesName = GlobalDataBase::GetStrParaFromDB("nFinalNameList");
+    GlobalDataBase::UpdateData("speciesName", &speciesName, PHSTRING, 1);
+    string initMassFraction = GlobalDataBase::GetStrParaFromDB("nFinalMassFraction");
+    GlobalDataBase::UpdateData("initMassFraction", &initMassFraction, PHSTRING, 1);
+    int nEnergyAssembly = 0;
+    if (GlobalDataBase::IsExist("nEnergyAssembly", PHINT, 1))
+    {
+        nEnergyAssembly = GlobalDataBase::GetIntParaFromDB("nEnergyAssembly");
+    }
+    if (nEnergyAssembly == 1)
+    {
+        //! The vibration energy is computed using the default method.
+        int nTEnergyModel = 0;
+        GlobalDataBase::UpdateData("nTEnergyModel", &nTEnergyModel, PHINT, 1);
+    }
+
+    //! Default: the index of the variable vibrational temperature.
+    int nKeyVariableIndex = 2;
+    string keyVariable = "vibration temperature";
+    if (nCurTModel == 1)
+    {
+        int nControlVariable = 1;
+        if (GlobalDataBase::IsExist("nControlVariable",PHINT, 1))
+        {
+            nControlVariable = GlobalDataBase::GetIntParaFromDB("nControlVariable");
+        }
+
+        switch (nControlVariable)
+        {
+        case 0:
+            keyVariable = "density";
+        case 1:
+            keyVariable = "translation temperature";
+        case 2:
+            keyVariable = "vibration temperature";
+        case 3:
+            keyVariable = "electron temperature";
+        case 4:
+            keyVariable = "pressure";
+        default:
+            keyVariable = "translation temperature";
+            break;
+        }
+
+        nKeyVariableIndex = nControlVariable;   //! The index of the variable temperature.
+        if (nControlVariable == 5)
+        {
+            nKeyVariableIndex = 6;
+        }
+        else if (nControlVariable == 6)
+        {
+            nKeyVariableIndex = 9;
+        }
+        else if (nControlVariable > 6)
+        {
+            nKeyVariableIndex = 1;
+        }
+    }
+    GlobalDataBase::UpdateData("nKeyVariableIndex", &nKeyVariableIndex, PHINT, 1);
+    GlobalDataBase::UpdateData("keyVariable", &keyVariable, PHSTRING, 1);
+
+    InitGlobalValuesSolver();
+
+    InitGlobalBoundaryCondition();
+
+    InitializeSolvers();
+
+    MultiGridInitFlow();
+
+    SelfAdaptionSolve();
+
+    PostSimulation();
+}
+
+void Simulation::RunIntegrativeSolver()
+{
+    int numberOfProcessor = PHMPI::GetNumberOfProcessor();
+    int currentProcessor  = PHMPI::GetCurrentProcessorID();
+    int serverProcessor   = PHMPI::GetServerProcessorID();
+    int tasktype = 0;
+
+    string fromGridName = GlobalDataBase::GetStrParaFromDB("from_gfile");
+    string outGridName = ChangeExtensionOfFileName(fromGridName, "fts");
+    string partition_grid_file = AddSymbolToFileName(outGridName, "__", numberOfProcessor);
+    GlobalDataBase::UpdateData("out_gfile", &outGridName, PHSTRING, 1);
+
+    bool partitionFtsExist = false;
+    if (numberOfProcessor > 1)
+    {
+        if (SerialFileExist(partition_grid_file))
+        {
+            partitionFtsExist = true;
+        }
+    }
+
+    //! fts file not exist, need convert grid.
+    if (!SerialFileExist(outGridName))
+    {
+        if (!partitionFtsExist)
+        {
+            WriteLogFile("Begin convert grid !\n");
+            PrintToWindow("Begin convert grid !\n\n");
+
+            tasktype = PHSPACE::CREATE_GRID;
+            GlobalDataBase::UpdateData("nsimutask", &tasktype, PHINT, 1);
+
+            int isConvertOver = 0;
+            PHMPI::SetNumberOfProcessor(1);
+
+            if (currentProcessor == serverProcessor)
+            {
+                CreateGrid();
+                isConvertOver = 1;
+            }
+
+            PHMPI::SetNumberOfProcessor(numberOfProcessor);
+            PHMPI::PH_Bcast(&isConvertOver, 1*sizeof(int), serverProcessor);
+            WriteLogFile("Convert grid complete !\n");
+            PrintToWindow("Convert grid complete !\n\n");
+        }
+    }
+
+    //! If need PartitionGrid.
+    if (numberOfProcessor > 1)
+    {
+        if (!partitionFtsExist)
+        {
+            WriteLogFile("Begin partition grid !\n");
+            PrintToWindow("Begin partition grid !\n\n");
+            PHMPI::SetNumberOfProcessor(1);
+
+            tasktype = PHSPACE::PARTITION_GRID;
+            GlobalDataBase::UpdateData("nsimutask", &tasktype, PHINT, 1);
+
+            int numberOfMultigrid = GlobalDataBase::GetIntParaFromDB("nMGLevel");
+            int maxproc = numberOfProcessor;
+            int pgridtype = GlobalDataBase::GetIntParaFromDB("gridtype");
+
+            GlobalDataBase::UpdateData("pgridtype", &pgridtype, PHINT, 1);
+            GlobalDataBase::UpdateData("maxproc", &maxproc, PHINT, 1);
+            GlobalDataBase::UpdateData("numberOfMultigrid", &numberOfMultigrid, PHINT, 1);
+            GlobalDataBase::UpdateData("partition_grid_file", &partition_grid_file, PHSTRING, 1);
+            GlobalDataBase::UpdateData("original_grid_file", &outGridName, PHSTRING, 1);
+
+            int isPartitionOver = 0;
+            if (currentProcessor == serverProcessor)
+            {
+                PartitionGrid();
+                isPartitionOver = 1;
+
+                DeleteGGrids();
+                PHMPI::SetNumberofLocalZones(0);
+            }
+            else
+            {
+                bool fileExist = true;
+                bool fileCheck = true;
+                PH_AllReduce(&fileExist, &fileCheck, 1, MPI_MIN);
+            }
+
+            PHMPI::SetNumberOfProcessor(numberOfProcessor);
+            PHMPI::PH_Bcast(&isPartitionOver, 1 * sizeof(int), serverProcessor);
+            WriteLogFile("Partition grid complete !\n");
+            PrintToWindow("Partition grid complete !\n\n");
+        }
+
+        string walldistfile = ChangeExtensionOfFileName(partition_grid_file, "wdt");
+        GlobalDataBase::UpdateData("gridfile", &partition_grid_file, PHSTRING, 1);
+        GlobalDataBase::UpdateData("walldistfile", &walldistfile, PHSTRING, 1);
+    }
+    else
+    {
+        string walldistfile = ChangeExtensionOfFileName(outGridName, "wdt");
+        GlobalDataBase::UpdateData("gridfile", &outGridName, PHSTRING, 1);
+        GlobalDataBase::UpdateData("walldistfile", &walldistfile, PHSTRING, 1);
+    }
+
+    WriteLogFile("Begin CFD simulation !\n");
+    PrintToWindow("Begin CFD simulation !\n\n");
+
+    tasktype = PHSPACE::SOLVE_FIELD;
+    GlobalDataBase::UpdateData("nsimutask", &tasktype, PHINT, 1);
+
+    RunCFD();
+}
+
+void Simulation::RunGridCheckSolver()
+{
+    string inputGridName = GlobalDataBase::GetStrParaFromDB("input_gfile");
+    GlobalDataBase::UpdateData("gridfile", &inputGridName, PHSTRING, 1);
+
+    Region *region = new Region();
+    region->ReadGrid();
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    Grid **gridArray = new Grid * [nZones];
+
+    fstream file;
+    string FantasyCheckFileName = ChangeExtensionOfFileName(inputGridName, "fts_check");
+    PHSPACE::OpenSerialFile(file, FantasyCheckFileName, ios_base::out);
+
+    int *globalBlockProcInp = PHMPI::GetZoneProcessorID_INP();
+    int *globalBlockType    = PHMPI::GetZoneGridType();
+    int *globalBlockIdx     = PHMPI::GetZoneGridID();
+
+    file << "TotalInfo : Global information of current grid." << endl;
+    file << "block_idxNumber  ZoneID" << endl;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        file << iZone << setw(10) << globalBlockIdx[iZone] << endl;
+    }
+
+    file << "block_procNumber  ZoneProcessorID" << endl;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        file << iZone << setw(10) << globalBlockProcInp[iZone] << endl;
+    }
+
+    file << "block_typeNumber  ZoneGridType" << endl;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        file << iZone << setw(10) << globalBlockType[iZone] << endl;
+    }
+
+    file << "nBlocks" << setw(10) << nZones << endl;
+    file << endl;
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        gridArray[iZone] = GetGrid(iZone);
+        int gridType = gridArray[iZone]->Grid::Type();
+
+        if (gridType == UNSTRUCTGRID)
+        {
+            UnstructGrid *grid = UnstructGridCast(gridArray[iZone]);
+
+            int nTotalNode = grid->GetNTotalNode();
+            int nTotalFace = grid->GetNTotalFace();
+            int nTotalCell = grid->GetNTotalCell();
+
+            file << "ZoneID : " << iZone << endl;
+            file << "GridInformation  Value" << endl;
+            file << "nTotalNode" << setw(10) << nTotalNode << endl;
+            file << "nTotalFace" << setw(10) << nTotalFace << endl;
+            file << "nTotalCell" << setw(10) << nTotalCell << endl;
+
+            file << "CellTopology." << endl;
+            int *nodeNumberOfEachCell = grid->GetNodeNumberOfEachCell();
+            int *cell2Node = grid->GetCell2Node();
+            int nodeCount = 0;
+
+            file << "nodeNumberOfEachCell :" << endl;
+            file << "cellNumber nodeNumber " << endl;
+            for (int iCell =0; iCell < nTotalCell; iCell ++)
+            {
+                file << iCell << setw(8) << nodeNumberOfEachCell[iCell] << endl;
+                nodeCount += nodeNumberOfEachCell[iCell];
+            }
+
+            file << "cell2Node :" << endl;
+            file << "nodeCountNumber nodeNumber " << endl;
+            for (int iCount =0; iCount < nodeCount; iCount ++)
+            {
+                file << iCount << setw(8) << cell2Node[iCount] << endl;
+            }
+
+            file << "FaceTopology." << endl;
+
+            int nBoundFace = grid->GetNBoundFace();
+
+            UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+            int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+          
+            file << "nBoundFace : " << nBoundFace << endl;
+
+            file << "faceNumber  BcType  BCName" << endl;
+            
+            for (int iFace = 0; iFace < nBoundFace; ++iFace)
+            {
+                UnstructBC *bcRegion = unstructBCSet->GetBCRegion(bcRegionIDofBCFace[iFace]);
+                int bcType = bcRegion->GetBCType();
+                string bcName = bcRegion->GetBCName();
+                file << iFace << setw(10) << bcType << setw(20) << bcName <<endl;
+            }
+
+
+            int *nodeNumberOfEachFace = grid->GetNodeNumberOfEachFace();
+            int *face2Node = grid->GetFace2Node();
+            int faceCount = 0;
+
+            file << "nodeNumberOfEachFace :" << endl;
+            file << "faceNumber nodeNumber " << endl;
+            for (int iFace = 0; iFace < nTotalFace; iFace ++)
+            {
+                file << iFace << setw(8) << nodeNumberOfEachFace[iFace] << endl;
+                faceCount += nodeNumberOfEachFace[iFace];
+            }
+
+            file << "face2Node :" << endl;
+            file << "faceCountNumber nodeNumber " << endl;
+            for (int iCount =0; iCount < faceCount; iCount ++)
+            {
+                file << iCount << setw(8) << face2Node[iCount] << endl;
+            }
+
+            int *leftCellOfFace  = grid->GetLeftCellOfFace();
+            int *rightCellOfFace = grid->GetRightCellOfFace();
+            
+            file << "leftCellOfFace :" << endl;
+            file << "faceNumber leftCellNumber " << endl;
+            for (int iFace = 0; iFace < nTotalFace; iFace ++)
+            {
+                file << iFace << setw(8) << leftCellOfFace[iFace] << endl;
+            }
+
+            file << "rightCellOfFace :" << endl;
+            file << "faceNumber rightCellNumber " << endl;
+            for (int iFace = 0; iFace < nTotalFace; iFace ++)
+            {
+                file << iFace << setw(8) << rightCellOfFace[iFace] << endl;
+            }
+
+            InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+            if (interfaceInfo)
+            {
+                int nIFace = interfaceInfo->GetNIFace();
+                file << "nIFace = " << nIFace << endl;
+
+                int *interFace2ZoneID       = interfaceInfo->GetInterFace2ZoneID();
+                int *interFace2InterFaceID  = interfaceInfo->GetInterFace2InterFaceID();
+                int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+
+                file << "interFace2ZoneID" << endl;
+                file << "interFaceNumber  ZoneID" << endl;
+                for (int iFace = 0; iFace < nIFace; iFace ++)
+                {
+                    file << iFace << setw(8) << interFace2ZoneID[iFace] << endl;
+                }
+
+                file << "interFace2InterFaceID" << endl;
+                file << "interFaceNumber  InterFaceID" << endl;
+                for (int iFace = 0; iFace < nIFace; iFace ++)
+                {
+                    file << iFace << setw(8) << interFace2InterFaceID[iFace] << endl;
+                }
+
+                file << "interFace2BoundaryFace" << endl;
+                file << "interFaceNumber  BoundaryFaceID" << endl;
+                for (int iFace = 0; iFace < nIFace; iFace ++)
+                {
+                    file << iFace << setw(8) << interFace2BoundaryFace[iFace] << endl;
+                }
+            }
+            else
+            {
+                file << "There is no interface exist, nIFace = 0." << endl;
+            }
+
+            InterpointInformation *interpointInformation = grid->GetInterpointInfo();
+            if (interpointInformation)
+            {
+                int nIPoint = interpointInformation->GetNumberOfInterpoints();
+                file << "nIPoint = " << nIPoint << endl;
+
+                int *cellNumberOfInterPoint = interpointInformation->GetCellNumberOfInterPoint();
+                int *interPoint2GlobalPoint = interpointInformation->GetInterPoint2GlobalPoint();
+                int *interPoint2InterPointID = interpointInformation->GetInterPoint2InterPointID();
+                int *interPoint2ZoneID = interpointInformation->GetInterPoint2ZoneID();
+                int *labelOfInterPoint = interpointInformation->GetLabelOfInterPoint();
+                int *totalZonesOfInterPoint = interpointInformation->GetTotalZonesOfInterPoint();
+
+                file << "cellNumberOfInterPoint" << endl;
+                file << "interPointNumber  totalCellNumbers" << endl;
+                for (int iPoint = 0; iPoint < nIPoint; iPoint ++)
+                {
+                    file << iPoint << setw(8) << cellNumberOfInterPoint[iPoint] << endl;
+                }
+
+                file << "interPoint2GlobalPoint" << endl;
+                file << "interPointNumber  gobalPointNumber" << endl;
+                for (int iPoint = 0; iPoint < nIPoint; iPoint ++)
+                {
+                    file << iPoint << setw(8) << interPoint2GlobalPoint[iPoint] << endl;
+                }
+
+                file << "interPoint2InterPointID" << endl;
+                file << "interPointNumber  interPointID" << endl;
+                for (int iPoint = 0; iPoint < nIPoint; iPoint ++)
+                {
+                    file << iPoint << setw(8) << interPoint2InterPointID[iPoint] << endl;
+                }
+
+                file << "interPoint2ZoneID" << endl;
+                file << "interPointNumber  ZoneID" << endl;
+                for (int iPoint = 0; iPoint < nIPoint; iPoint ++)
+                {
+                    file << iPoint << setw(8) << interPoint2ZoneID[iPoint] << endl;
+                }
+
+                file << "labelOfInterPoint" << endl;
+                file << "interPointNumber  label" << endl;
+                for (int iPoint = 0; iPoint < nIPoint; iPoint ++)
+                {
+                    file << iPoint << setw(8) << labelOfInterPoint[iPoint] << endl;
+                }
+
+                file << "totalZonesOfInterPoint" << endl;
+                file << "interPointNumber  totalZones" << endl;
+                for (int iPoint = 0; iPoint < nIPoint; iPoint ++)
+                {
+                    file << iPoint << setw(8) << totalZonesOfInterPoint[iPoint] << endl;
+                }  
+            }
+            else
+            {
+                file << "There is no interpoint exist, nIPoint = 0." << endl;
+            }
+
+            file << endl;
+
+        }
+        else if (gridType == STRUCTGRID)
+        {
+            int iMin, iMax, jMin, jMax, kMin, kMax, bcType;
+            int sLr, sNd;
+            StructGrid *grid = StructGridCast(gridArray[iZone]);
+
+            int iDimensions[3];
+            iDimensions[0] = grid->GetNI();
+            iDimensions[1] = grid->GetNJ();
+            iDimensions[2] = grid->GetNK();
+
+            file << "ZoneID : " << iZone << endl;
+            file << "iDimensions : Dimensions of different directions in current zone." << endl;
+            file << "iDimensions_i" << setw(10) << iDimensions[0] << endl;
+            file << "iDimensions_j" << setw(10) << iDimensions[1] << endl;
+            file << "iDimensions_k" << setw(10) << iDimensions[2] << endl;
+
+            StructBCSet *structBCSet = grid->GetStructBCSet();
+            int nBCRegion = structBCSet->GetnBCRegion();
+            file << "nBCRegion : " << nBCRegion << endl;
+
+            file << "BCInfor : Boundary information of current zone ." << endl;
+            file << "bcNumber  iMin  iMax  jMin  jMax  kMin  kMax  bcType  sLr  sNd  BCName" << endl;
+            int nBCTotal = nBCRegion;
+            for (int ibcRegion = 0; ibcRegion < nBCRegion; ++ ibcRegion)
+            {
+                StructBC *bcRegion = structBCSet->GetBCRegion(ibcRegion);
+                bcType = bcRegion->GetBCType();
+                if (bcType == -1)
+                {
+                    nBCTotal ++;
+                }
+            }
+
+            int **BCInfor = NewPointer2<int>(nBCTotal, 9);
+            int iBCinfo = 0;
+
+            for (int ibcRegion = 0; ibcRegion < nBCRegion; ++ ibcRegion)
+            {
+                int index = 0;
+                StructBC *bcRegion = structBCSet->GetBCRegion(ibcRegion);
+                bcRegion->GetIJKRegion(iMin, iMax, jMin, jMax, kMin, kMax);
+                bcType = bcRegion->GetBCType();
+                sLr = bcRegion->GetFaceLeftOrRightIndex();
+                sNd = bcRegion->GetFaceDirection();
+                string bcName = bcRegion->GetBCName();
+
+                BCInfor[iBCinfo][index++] = iMin;
+                BCInfor[iBCinfo][index++] = iMax;
+                BCInfor[iBCinfo][index++] = jMin;
+                BCInfor[iBCinfo][index++] = jMax;
+                BCInfor[iBCinfo][index++] = kMin;
+                BCInfor[iBCinfo][index++] = kMax;
+                BCInfor[iBCinfo][index++] = bcType;
+                BCInfor[iBCinfo][index++] = sLr;
+                BCInfor[iBCinfo][index++] = sNd;
+
+                file << iBCinfo << setw(8) << iMin << setw(8) << iMax 
+                     << setw(8) << jMin << setw(8) << jMax << setw(8) << kMin 
+                     << setw(8) << kMax << setw(8) << bcType << setw(8) 
+                     << sLr << setw(10) << sNd << setw(20) << bcName << endl;
+
+                iBCinfo ++;
+
+                if (bcType == -1)
+                {
+                    index = 0;
+                    int *t_st = bcRegion->GetTargetStart();
+                    int *t_ed = bcRegion->GetTargetEnd();
+                    int neighborZoneIndex = bcRegion->GetTargetRegionBlock();
+
+                    BCInfor[iBCinfo][index++] = t_st[0];
+                    BCInfor[iBCinfo][index++] = t_ed[0];
+                    BCInfor[iBCinfo][index++] = t_st[1];
+                    BCInfor[iBCinfo][index++] = t_ed[1];
+                    BCInfor[iBCinfo][index++] = t_st[2];
+                    BCInfor[iBCinfo][index++] = t_ed[2];
+                    BCInfor[iBCinfo][index++] = neighborZoneIndex;
+                    BCInfor[iBCinfo][index++] = 0;
+                    BCInfor[iBCinfo][index++] = 0;
+
+                    file << iBCinfo << setw(8) << t_st[0] << setw(8) << t_ed[0] 
+                         << setw(8) << t_st[1] << setw(8) << t_ed[1] << setw(8) << t_st[2] 
+                         << setw(8) << t_ed[2] << setw(8) << neighborZoneIndex << setw(8) 
+                         << 0 << setw(8) << 0 << endl;
+
+                    iBCinfo ++;
+                }
+            }
+
+            InterfaceInfo *interfaceInfo = grid->GetInterfaceInfo();
+            if (interfaceInfo)
+            {
+                int nIFace = interfaceInfo->GetNIFace();
+                file << "nIFace = " << nIFace << endl;
+
+                int *interFace2ZoneID       = interfaceInfo->GetInterFace2ZoneID();
+                int *interFace2InterFaceID  = interfaceInfo->GetInterFace2InterFaceID();
+                int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+
+                file << "interFace2ZoneID" << endl;
+                file << "interFaceNumber  ZoneID" << endl;
+                for (int iFace = 0; iFace < nIFace; iFace ++)
+                {
+                    file << iFace << setw(8) << interFace2ZoneID[iFace] << endl;
+                }
+
+                file << "interFace2InterFaceID" << endl;
+                file << "interFaceNumber  InterFaceID" << endl;
+                for (int iFace = 0; iFace < nIFace; iFace ++)
+                {
+                    file << iFace << setw(8) << interFace2InterFaceID[iFace] << endl;
+                }
+
+                file << "interFace2BoundaryFace" << endl;
+                file << "interFaceNumber  BoundaryFaceID" << endl;
+                for (int iFace = 0; iFace < nIFace; iFace ++)
+                {
+                    file << iFace << setw(8) << interFace2BoundaryFace[iFace] << endl;
+                }
+            }
+            else
+            {
+                file << "There is no interface exist, nIFace = 0." << endl;
+            }
+
+            file << endl;
+
+        }
+        else
+        {
+            TK_Exit::UnexpectedVarValue("gridType", gridType);
+        }
+    }
+
+    PHSPACE::CloseFile(file);
+
+    delete region;
+    delete [] gridArray;
+}
+
+void Simulation::RunPostProcessing()
+{
+    PostProcess *postProcess = new PostProcess(this->region);
+    postProcess->Run();
+
+    delete postProcess;
+    postProcess = NULL;
+}
+
+
+#ifdef USE_SpecDiffHybSolver
+void Simulation::RunSpecDiffHybSolver()
+{
+    double last_time[3];
+    TIME_SPACE::StartTime(last_time);
+
+    SpecDiffHybSolver *solver = new SpecDiffHybSolver();
+
+    solver->Run();
+
+    delete solver;
+
+    WriteLogFile("SpecDiffHybSolver Finished!\n");
+}
+
+void Simulation::RunSpecSolver()
+{
+    double last_time[3];
+    TIME_SPACE::StartTime(last_time);
+
+    SpecSolver *solver = new SpecSolver();
+
+    solver->Run();
+
+    delete solver;
+}
+#endif
+
+void Simulation::ComputeWallDistance()
+{
+    double last_time[3] = {0.0};
+    TIME_SPACE::StartTime(last_time);
+
+    ReadGeometry();
+
+    UpdateAllZonesPara();
+
+    InitGeometry();
+
+    GlobalBoundaryCondition::ReadGlobalBoundaryCondition();
+
+    GlobalBoundaryCondition::ChangeBCTypeByGlobalBC();
+
+    InitGlobalBoundaryCondition();
+
+    GenerateWalldist();
+
+    WriteLogFile("Generate wall distance ...");
+}
+
+void Simulation::InitOversetGrid()
+{
+    //! The overset config process must be taken after reading in ordinary grid and initializing!
+    //! Read overset information files or config.
+
+    int isOverset = PHSPACE::GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+    //int isAle = PHSPACE::GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+
+    if (!isOverset)
+    {
+        return;
+    }
+
+    int readOversetFileOrNot = PHSPACE::GlobalDataBase::GetIntParaFromDB("readOversetFileOrNot");
+
+    //! If the processor is grid processor, and overset grid need to be assembled.
+    if (PHMPI::CurrentProcessorIsGridProcessor() && readOversetFileOrNot != 1)
+    {
+        OversetGridConfig();
+        WriteLogFile("Run overset configuration ...");
+    }
+
+    //! Wait for the grid processors.
+    PH_Barrier();
+
+    //! For the original processors.
+    if (!PHMPI::CurrentProcessorIsGridProcessor())
+    {
+        //! If the overset files is aviable or has been prepared by grid processors, just read it!
+        if (readOversetFileOrNot == 1 || PHMPI::GetNumberOfGridProcessor() != 0)
+        {
+            region->ReadOversetGrid();
+            WriteLogFile("Read overset information \n");
+        }
+        //! Else it should be done by these processors by themselves.
+        else
+        {
+            TimeSpan *timeSpan = new TimeSpan();
+            WriteLogFile("Run overset configuration ...\n");
+            OversetGridConfig();
+            timeSpan->ShowTimeSpanToLogFile("Run overset configuration");
+            delete timeSpan;
+        }
+
+        //int isAle = PHSPACE::GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+        //if (!isAle)
+        //{
+        InitializeOversetInterfaceTopology();
+        //}
+        WriteLogFile("Initialize oversetInterface topology \n");
+    }
+}
+
+void Simulation::OversetGridConfig()
+{
+   ReConfigUnstructOversetGrid();
+}
+
+void Simulation::ReadGeometry()
+{
+    TimeSpan testTime;
+
+    this->region->ReadGrid();
+
+    testTime.ShowTimeSpanToLogFile("Grid Reading");
+}
+
+void Simulation::InitGeometry()
+{
+    this->region->InitGeometry();
+}
+
+void Simulation::SwapGeommetry()
+{
+    this->region->SwapGeommetry();
+}
+
+void Simulation::InitializeSolvers()
+{
+    WriteLogFile("Creating and initialization solvers start \n");
+
+    int nSolver = GlobalDataBase::GetIntParaFromDB("maxNumOfSolver");
+    for (int iSolver = 0; iSolver < nSolver; ++ iSolver)
+    {
+        Controller *controller = new Controller(iSolver, this->region);
+
+        controller->Initialize(iSolver);
+
+        delete controller;
+    }
+
+    CreateAleManager();
+
+    WriteLogFile("Creating and initialization solvers over \n");
+}
+
+void Simulation::RefreshSolvers()
+{
+    FreeAleManager();
+
+    int nSolver = GlobalDataBase::GetIntParaFromDB("maxNumOfSolver");
+    for (int iSolver = 0; iSolver < nSolver; ++ iSolver)
+    {
+        Controller *controller = new Controller(iSolver, this->region);
+
+        controller->CleanUp(iSolver);
+
+        delete controller;
+    }
+
+    WriteLogFile("Creating and initialization solvers over \n");
+}
+
+void Simulation::DefineAndCreateSolvers()
+{
+    InitGlobalValuesOfAllZones();
+
+    Region *region = this->region;
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+
+	printf("In Simulation.cpp, print nZones = %d\n", nZones);
+
+    int maxNumOfSolver = 0;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Zone *zone = region->GetZone(iZone);
+        if (!zone)
+        {
+            continue;
+        }
+
+        vector<PHSolver *> solverList;
+        PHGeometry *geometry = zone->GetGeometry();
+
+#ifdef USE_DEMOSOLVER
+		printf("Simulation.cpp--USE_DEMOSOLVER\n");
+        PHSolver *solver = new DemoSolver();
+        solver->SetName("DemoSolver");
+        solver->SetKey(DENSITY_BASED_SOLVER);
+        solverList.push_back(solver);
+#else
+
+        //! For each zone, define the solver names on it.
+        //! If you are solver developer, define your solver name here,
+        //! according your solver logic.
+        int dgHighOrder = 0;
+        zone->GetData("dg_high_order", &dgHighOrder, PHINT, 1);
+
+        //! First: NS equations solver.
+        if (!dgHighOrder)
+        {
+            int gridType = geometry->GetGrid()->Type();
+
+            int compressible = COMPRESSIBLE;
+            zone->GetData("compressible", &compressible, PHINT, 1);
+
+            if (compressible == COMPRESSIBLE)
+            {
+                //! Add compressible solvers.
+                if (gridType == UNSTRUCTGRID)
+                {
+                    //! Add unstructured NS solver.
+                    PHSolver *solver = new NSSolverUnstruct();
+                    solver->SetName("NSSolverUnstruct");
+                    solver->SetKey(DENSITY_BASED_SOLVER);
+                    solverList.push_back(solver);
+                }
+                else if (gridType == STRUCTGRID)
+                {
+                    int isFVMOrFDM = 0;
+                    zone->GetData("isFVMOrFDM", &isFVMOrFDM, PHINT, 1);
+
+                    int isCalRarefied = GlobalDataBase::GetIntParaFromDB("isCalRarefied");
+                    
+                    int isAdaptiveSolver = 0;
+                    zone->GetData("isAdaptiveSolver", &isAdaptiveSolver, PHINT, 1);
+
+                    if (isFVMOrFDM == FV_METHOD)    //! Add structured FV NS solver.
+                    {
+                        if (!isCalRarefied)
+                        {
+                            PHSolver* solver = new NSSolverStructFV();
+                            solver->SetName("NSSolverStructFV");
+                            solver->SetKey(DENSITY_BASED_SOLVER);
+                            solverList.push_back(solver);
+                        }
+                        else
+                        {
+                            PHSolver* solver = new NCCRSolverStruct();
+                            solver->SetName("NCCRSolverStruct");
+                            solver->SetKey(DENSITY_BASED_SOLVER);
+                            solverList.push_back(solver);
+                        }
+                    }
+                    else    //! Add structured FD NS solver.
+                    {
+                        PHSolver *solver = new NSSolverStructFD();
+                        solver->SetName("NSSolverStructFD");
+                        solver->SetKey(DENSITY_BASED_SOLVER);
+                        solverList.push_back(solver);
+                    }
+                }
+            }
+#ifdef USE_INCOMSOLVER
+            else if (compressible == INCOMPRESSIBLE)
+            {
+                PHSolver *solver = new IncomUnstructSolver();
+                solver->SetName("IncomUnstructSolver");
+                solver->SetKey(PRESSURE_BASED_SOLVER);
+                solverList.push_back(solver);
+            }
+#endif
+        }
+        else
+        {
+            //! To do
+        }
+
+        //! Second: turbulent equations solver.
+        int viscousType = ONE_EQU;
+        zone->GetData("viscousType", &viscousType, PHINT, 1);
+        if (viscousType > LAMINAR)
+        {
+            int compressible = COMPRESSIBLE;
+            zone->GetData("compressible", &compressible, PHINT, 1);
+            if (compressible)
+            {
+                int gridType = geometry->GetGrid()->Type();
+                if (gridType == UNSTRUCTGRID)
+                {
+                    //! Add unstructured turbulent solver.
+                    PHSolver *solver = new TurbSolverUnstr();
+                    solver->SetName("TurbSolverUnstr");
+                    solver->SetKey(DENSITY_BASED_SOLVER);
+                    solverList.push_back(solver);
+                }
+                else if (gridType == STRUCTGRID)
+                {
+                    int isFVMOrFDM = 0;
+                    zone->GetData("isFVMOrFDM", &isFVMOrFDM, PHINT, 1);
+                   
+                    if (isFVMOrFDM == FV_METHOD)
+                    {
+                        //! Add structured turbulent solver.
+                        PHSolver *solver = new TurbSolverStr();
+                        solver->SetName("TurbSolverStr");
+                        solver->SetKey(DENSITY_BASED_SOLVER);
+                        solverList.push_back(solver);
+                    }
+                    else
+                    {
+                        //! Add structured FD turbulent solver.
+                        PHSolver *solver = new TurbSolverStrFD();
+                        solver->SetName("TurbSolverStrFD");
+                        solver->SetKey(DENSITY_BASED_SOLVER);
+                        solverList.push_back(solver);
+                    }
+                }
+            }
+            else
+            {
+            }
+        }
+
+        if (viscousType > ONE_EQU)
+        {
+            int transitionType = 1;
+            zone->GetData("transitionType", &transitionType, PHINT, 1);
+            if (transitionType == IREGAMA)
+            {
+                int gridType = geometry->GetGrid()->Type();
+                if (gridType == UNSTRUCTGRID)
+                {
+                    //! Add unstructured turbulent solver.
+                    PHSolver *solver = new TransitionSolverUnstr();
+                    solver->SetName("TransitionSolverUnstr");
+                    solver->SetKey(DENSITY_BASED_SOLVER);
+                    solverList.push_back(solver);
+                }
+                else if (gridType == STRUCTGRID)
+                {
+                    int isFVMOrFDM = 0;
+                    zone->GetData("isFVMOrFDM", &isFVMOrFDM, PHINT, 1);
+
+                    if (isFVMOrFDM == FV_METHOD)
+                    {
+                        //! Add structured turbulent solver.
+                        PHSolver *solver = new TransitionSolverStr();
+                        solver->SetName("TransitionSolverStr");
+                        solver->SetKey(DENSITY_BASED_SOLVER);
+                        solverList.push_back(solver);
+                    }
+                }
+            }
+            else
+            {
+            }
+        }
+
+        int iLES = 0;
+        zone->GetData("iLES", &iLES, PHINT, 1);
+        if (iLES == LES_SOLVER)
+        {
+            int gridType = geometry->GetGrid()->Type();
+            if (gridType == UNSTRUCTGRID)
+            {
+                //! Add unstructured LES solver.
+                PHSolver *solver = new LESSolverUnstr();
+                solver->SetName("LESSolverUnstr");
+                solver->SetKey(DENSITY_BASED_SOLVER);
+                solverList.push_back(solver);
+            }
+            else if (gridType == STRUCTGRID)
+            {
+                //! Add structured LES solver.
+                PHSolver *solver = new LESSolverStruct();
+                solver->SetName("LESSolverStruct");
+                solver->SetKey(DENSITY_BASED_SOLVER);
+                solverList.push_back(solver);
+            }
+        }
+#endif
+
+        //! Finally, push the solvers into the list.
+        for (std::size_t iSolver = 0; iSolver < solverList.size(); ++ iSolver)
+        {
+            PHSolver *solver = solverList[iSolver];
+
+            solver->SetGeometry(geometry);      //Assigns the geometry to the "SetGeometry" of Solver
+            solver->SetIndex(static_cast<int> (iSolver));
+            zone->AddSolver(solver);
+        }
+
+        if (maxNumOfSolver < solverList.size())
+        {
+            maxNumOfSolver = solverList.size();
+        }
+        
+    }    //! iZone
+    GlobalDataBase::UpdateData("maxNumOfSolver", &maxNumOfSolver, PHINT, 1);
+    
+}
+
+void Simulation::PreSolve()
+{
+    int isInIniting = GlobalDataBase::GetIntParaFromDB("isInIniting");
+    int outIterStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("outnstep");
+    int flowInitStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("flowInitStep");
+    if (isInIniting == 1)
+    {
+#ifdef USE_GMRESSOLVER
+        // GMRES Init by LU_SGS
+        int flowInitMethod = GlobalDataBase::GetIntParaFromDB("flowInitMethod");
+        int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+        if( 3 == flowInitMethod )
+        {
+            int originaltscheme = GlobalDataBase::GetIntParaFromDB("OriginalTscheme");
+ 
+            if (originaltscheme == GMRES && outIterStep <= flowInitStep)
+            {
+                tscheme = LU_SGS;
+                GlobalDataBase::UpdateData("tscheme", &tscheme, PHINT, 1);
+            }
+
+            if (originaltscheme == GMRES && outIterStep > flowInitStep)
+            {
+                tscheme = GMRES;
+                GlobalDataBase::UpdateData("tscheme", &tscheme, PHINT, 1);
+            }
+        }
+#endif
+        int nMGLevel = GlobalDataBase::GetIntParaFromDB("nMGLevel");
+        if (nMGLevel > 1)
+        {
+            //! For MG case, only initialize on coarse grid.
+            isInIniting = 0;
+            GlobalDataBase::UpdateData("isInIniting", &isInIniting, PHINT, 1);
+        }
+        else
+        {
+            //! For single grid case, check if in the state of initialization.
+            if ((flowInitStep > 0 && outIterStep > flowInitStep) || flowInitStep == 0)
+            {
+                isInIniting = 0;
+                GlobalDataBase::UpdateData("isInIniting", &isInIniting, PHINT, 1);
+
+                PrintToWindow("End init flow by first order ... \n");
+            }
+        }
+    }
+
+}
+
+void Simulation::PostSolve()
+{
+    using namespace PHMPI;
+
+    //! Dump tecflow file.
+    int intervalStepPlot = GlobalDataBase::GetIntParaFromDB("intervalStepPlot");
+    int intervalStepSample = GlobalDataBase::GetIntParaFromDB("intervalStepSample");
+    int outIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (outIterStep == 1 || outIterStep % intervalStepPlot == 0 || ((outIterStep + 1) % intervalStepPlot == 0 && !isUnsteady))
+    {
+        WriteVisualFile();
+    }
+
+    if (!GlobalDataBase::IsExist("ifSetDataMonitor", PHINT, 1))
+    {
+        return;
+    }
+    else
+    {
+        int ifSetDataMonitor = GlobalDataBase::GetIntParaFromDB("ifSetDataMonitor");
+        if (!ifSetDataMonitor) return;
+
+        if (outIterStep % intervalStepSample == 0)
+        {
+            Post_ProbesWrite generateProbesVarFile;
+            generateProbesVarFile.Run();
+        }
+    }
+}
+
+void Simulation::MainSolve()
+{
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (!isUnsteady)
+    {
+        SolveSteady();
+    }
+    else
+    {
+        SolveUnsteady();
+    }
+}
+
+void Simulation::SolveOneOuterStep()
+{
+    PreSolve();
+
+    MainSolve();
+
+    PostSolve();
+}
+
+void Simulation::SolveSimulation()
+{
+    WriteLogFile("Start iterating ...");
+    bool continueSolve = true;
+
+    int maxSimuStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("maxSimuStep");
+    int isOverset = PHSPACE::GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+    int sysGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+
+    //! Wait for all processors here!
+    if (!isOverset || sysGridType == STRUCTGRID)        //If overset is 1 or grid is structgrid
+    {
+        PrintToWindow("Wait for all processors before iteration ... \n");
+        PH_Barrier();
+        PrintToWindow("Wait is over,start iteration ... \n");
+    }
+
+    int outIterStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("outnstep");
+    if (maxSimuStep == 0)
+    {
+        continueSolve = false;          // If maxSimuStep equals 0 then Simulation will not run
+    }
+
+    while (continueSolve)
+    {
+        UpdateOuterIterationStep(outIterStep);
+
+        SolveOneOuterStep();
+
+        if (outIterStep >= maxSimuStep && maxSimuStep > 0)
+        {
+            continueSolve = false;
+        }
+    }
+
+}
+
+void Simulation::SelfAdaptionSolve()
+{
+    WriteLogFile("Start iterating ...");
+    bool continueSolve = true;
+
+    int maxSimuStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("maxSimuStep");
+    int isOverset = PHSPACE::GlobalDataBase::GetIntParaFromDB("codeOfOversetGrid");
+    int sysGridType = PHSPACE::GlobalDataBase::GetIntParaFromDB("sys_gridtype");
+
+    //! Wait for all processors here!
+    if (!isOverset || sysGridType == STRUCTGRID)
+    {
+        PrintToWindow("Wait for all processors before iteration ... \n");
+        PH_Barrier();
+        PrintToWindow("Wait is over,start iteration ... \n");
+    }
+
+    //! Set the flag to pause the numerical iteration.
+    RDouble monitorResidual = 0.0;
+    PHSPACE::GlobalDataBase::UpdateData("monitorResidual", &monitorResidual, PHDOUBLE, 1);
+    int nPauseKey = 0;
+    PHSPACE::GlobalDataBase::UpdateData("nPauseKey", &nPauseKey, PHINT, 1);
+
+    int outIterStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("outnstep");
+    if (maxSimuStep == 0)
+    {
+        continueSolve = false;
+    }
+
+    while (continueSolve)
+    {
+        UpdateOuterIterationStep(outIterStep);
+
+        SolveOneOuterStep();
+
+        int nPauseKey1 = PHSPACE::GlobalDataBase::GetIntParaFromDB("nPauseKey");
+
+        if ((outIterStep >= maxSimuStep && maxSimuStep > 0) || nPauseKey1 == 1)
+        {
+            continueSolve = false;
+        }
+    }
+}
+
+void Simulation::PostSimulation()
+{
+    this->region->PostSimulation();
+
+    int IsUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    int isAle = GlobalDataBase::GetIntParaFromDB("codeOfAleModel");
+    if (IsUnsteady && isAle)
+    {
+        //PostprocessAfterInnerIterationStepForAleSolvers();
+
+        FreeAleManager();
+    }
+
+    return;
+}
+
+void Simulation::UpdateOuterIterationStep(int &outIterStep)
+{
+    outIterStep ++;
+    GlobalDataBase::UpdateData("outnstep", &outIterStep, PHINT, 1);
+
+    int newIterStep = GlobalDataBase::GetIntParaFromDB("newnstep");
+    newIterStep ++;
+    GlobalDataBase::UpdateData("newnstep", &newIterStep, PHINT, 1);
+
+    int isUnsteady = GlobalDataBase::GetIntParaFromDB("iunsteady");
+    if (!isUnsteady)
+    {
+        return;
+    }
+
+    RDouble physicalTime = GlobalDataBase::GetDoubleParaFromDB("physicalTime");
+    RDouble physicalTimeStep = GlobalDataBase::GetDoubleParaFromDB("physicalTimeStep");
+
+    physicalTime += physicalTimeStep;
+
+    GlobalDataBase::UpdateData("physicalTime", &physicalTime, PHDOUBLE, 1);
+
+    int ifStaticsFlowField = GlobalDataBase::GetIntParaFromDB("ifStaticsFlowField");
+    if (ifStaticsFlowField == 1)
+    {
+        int startStatisticStep = GlobalDataBase::GetIntParaFromDB("startStatisticStep");
+        if (outIterStep >= startStatisticStep)
+        {
+            int nStatisticalStep = GlobalDataBase::GetIntParaFromDB("nStatisticalStep");
+            ++ nStatisticalStep;
+            GlobalDataBase::UpdateData("nStatisticalStep", &nStatisticalStep, PHINT, 1);
+        }
+    }
+#ifdef USE_GMRESSOLVER
+    int flowInitMethod = GlobalDataBase::GetIntParaFromDB("flowInitMethod");
+
+    if( 3 == flowInitMethod )
+    {
+        int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+        if ( newIterStep == 1 )
+        {
+            GlobalDataBase::UpdateData("OriginalTscheme", &tscheme, PHINT, 1);
+}
+    }
+#endif
+}
+
+void Simulation::UpdateAllZonesPara()
+{
+    this->region->UpdateAllZonesPara();
+}
+
+void Simulation::InitGlobalBoundaryCondition()
+{
+    this->region->ReSetBoundaryConditionByGlobalBC();
+}
+
+void Simulation::InitGlobalVolumeCondition()
+{
+    GlobalVolumeCondition::ReadGlobalVolumeCondition();
+    GlobalVolumeCondition::SetVCDataByGlobalVC();
+}
+
+void Simulation::MultiGridInitFlow()
+{
+    WriteLogFile("Multi-Grid Init Flow ...");
+    int nMGLevel = GlobalDataBase::GetIntParaFromDB("nMGLevel");
+    if (nMGLevel <= 1)
+    {
+        return;
+    }
+
+    int outIterStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("outnstep");
+    if (outIterStep > 0)
+    {
+        return;    //! Read from flow file.
+    }
+
+    int flowInitStep = PHSPACE::GlobalDataBase::GetIntParaFromDB("flowInitStep");
+    if (flowInitStep <= 0) return;
+
+    int nSolver = 1;    //! Consider NS solver only.
+
+    int isInMGIniting = 1;
+    GlobalDataBase::UpdateData("isInMGIniting", &isInMGIniting, PHINT, 1);
+
+    for (int iLevel = nMGLevel - 1; iLevel > 0; -- iLevel)
+    {
+        int levelStep = 0;
+        int totalLevelStep = flowInitStep * iLevel;
+
+        ostringstream oss;
+        oss << "Start init flow on level " << iLevel << ", " << totalLevelStep << " iterations ...";
+        WriteLogFile(oss.str());
+        oss << endl;
+        PrintToWindow(oss.str());
+
+        while (levelStep < totalLevelStep)
+        {
+            ++ levelStep;
+
+            UpdateOuterIterationStep(outIterStep);
+
+            //using namespace PHMPI;
+            for (int iSolver = 0; iSolver < nSolver; ++ iSolver)
+            {
+                Controller *controller = new Controller(iSolver, this->region);
+                controller->MultiGridInitFlow(iLevel);
+                controller->PostSolve(iLevel);
+                delete controller;    controller = nullptr;
+            }
+        }
+
+        //! Interpolate from coarse grid to fine grid.
+        for (int iSolver = 0; iSolver < nSolver; ++ iSolver)
+        {
+            Controller *controller = new Controller(iSolver, this->region);
+            controller->InterpolatFineGrid(iSolver, iLevel - 1);
+            delete controller;    controller = nullptr;
+        }
+    }
+
+    isInMGIniting = 0;
+    GlobalDataBase::UpdateData("isInMGIniting", &isInMGIniting, PHINT, 1);
+
+    int newIterStep = 0;
+    GlobalDataBase::UpdateData("newnstep", &newIterStep, PHINT, 1);
+
+    PrintToWindow("End init flow by coarse grid ... \n");
+    WriteLogFile("End init flow by coarse grid ...");
+}
+
+void Simulation::SolveSteady()
+{
+    int nSolver = GlobalDataBase::GetIntParaFromDB("maxNumOfSolver");
+    //! Get iteration number.
+    int outerIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int turbInterval = GlobalDataBase::GetIntParaFromDB("turbInterval");
+    int tscheme = GlobalDataBase::GetIntParaFromDB("tscheme");
+
+    if (tscheme != GMRES)
+    {
+        for (int iSolver = 0; iSolver < nSolver; ++iSolver)
+        {
+            //! iSolver = 1 or 2, is supposed as turbulence computing.
+            if ((iSolver != NS_SOLVER) && (outerIterStep % turbInterval != 0))
+            {
+                //! Turbulence cannot be calculated by the conventional NS solver.
+                return;
+            }
+
+            Controller* controller = new Controller(iSolver, this->region);
+
+            controller->SolveSteadyField();
+
+            controller->PostSolve();
+
+            delete controller;
+        }
+    }
+    else
+    {
+        //! NS and turbulence are coupled for calculation by GMRES.
+        SolveSteadyByGMRES();
+    }
+
+}
+void Simulation::SolveSteadyByGMRES()
+{
+    int nSolver = GlobalDataBase::GetIntParaFromDB("maxNumOfSolver");
+    //! Get iteration number.
+    int outerIterStep = GlobalDataBase::GetIntParaFromDB("outnstep");
+    int turbInterval = GlobalDataBase::GetIntParaFromDB("turbInterval");
+  
+    int viscousType = GlobalDataBase::GetIntParaFromDB("viscousType");
+
+    if (viscousType == ONE_EQU)
+    {
+        Controller *controllerNS = new Controller(NS_SOLVER, this->region);
+        Controller *controllerTurb = new Controller(TURB_SOLVER, this->region);
+
+        controllerNS->SolveSteadyField();
+        controllerTurb->SolveSteadyField();
+
+#ifdef USE_GMRESSOLVER
+        controllerNS->GMRESSolver_Coupled(0);
+#endif
+        controllerNS->PostSolve();
+        controllerTurb->PostSolve();
+
+        delete controllerNS;
+        delete controllerTurb;
+    }
+    else if (viscousType == INVISCID || viscousType == LAMINAR)
+    {
+        Controller *controller = new Controller(NS_SOLVER, this->region);
+
+        controller->SolveSteadyField();
+
+        controller->PostSolve();
+
+        delete controller;
+    }
+    else if (viscousType == TWO_EQU) //TWO_EQU turbulence are coupled will be done in the future.
+    {
+        for (int iSolver = 0; iSolver < nSolver; ++iSolver)
+        {
+            //! iSolver = 1 or 2, is supposed as turbulence computing.
+            if ((iSolver == TURB_SOLVER) && (outerIterStep % turbInterval != 0))
+            {
+                return;
+            }
+            Controller *controller = new Controller(iSolver, this->region);
+          
+            controller->SolveSteadyField();
+            controller->PostSolve();
+
+            delete controller;
+        }
+    }
+
+}
+void Simulation::SolveUnsteady()
+{
+        int minSubItertation = GlobalDataBase::GetIntParaFromDB("min_sub_iter");
+        int maxSubItertation = GlobalDataBase::GetIntParaFromDB("max_sub_iter");
+        RDouble toltalSubItertation = GlobalDataBase::GetDoubleParaFromDB("tol_sub_iter");
+
+        int innerIterStep = 0;
+        int nSolver = GlobalDataBase::GetIntParaFromDB("maxNumOfSolver");
+
+        bool isSubIterationDump = false;
+        GlobalDataBase::UpdateData("isSubIterationDump", &isSubIterationDump, PHBOOL, 1);
+
+        bool isSubIterationConvergence = false;
+        while (!isSubIterationConvergence)
+        {
+            innerIterStep += 1;
+            GlobalDataBase::UpdateData("innstep", &innerIterStep, PHINT, 1);
+
+            SolveSingleInnerIterationStepForAleSolvers();
+
+            RDouble subIterationNormOneSolver = zero;
+            RDouble maxSubIterationNormAllSolvers = -LARGE;
+
+            for (int iSolver = 0; iSolver < nSolver; ++ iSolver)
+            {
+                Controller *controller = new Controller(iSolver, this->region);
+
+                controller->SolveSteadyField();
+
+                //! Here is in the sub-iteration, PostSolve is only for the CommunicationInterfaceData and dumps the "res.dat", which contains index of the sub-iteration residual.
+                controller->PostSolve();
+
+                subIterationNormOneSolver = controller->ComputeSubIterationNorm(iSolver, 0);
+                maxSubIterationNormAllSolvers = MAX(maxSubIterationNormAllSolvers, subIterationNormOneSolver);
+
+                delete controller;
+            }
+
+            PH_CompareMaxMin(maxSubIterationNormAllSolvers, 1);
+
+            //! Sub-iteration continue or not judgement.
+            isSubIterationConvergence = IsSubIterationConvergence(innerIterStep, minSubItertation, maxSubItertation, toltalSubItertation, maxSubIterationNormAllSolvers);
+        }
+
+        PostprocessAfterInnerIterationStepForAleSolvers();
+
+        //! Here is already (innstep == max_sub_iter || isSubIterationConvergence).
+        isSubIterationDump = true;
+        GlobalDataBase::UpdateData("isSubIterationDump", &isSubIterationDump, PHBOOL, 1);
+
+        //! Update physical time step flow field after sub-iteration convergence.
+        for (int iSolver = 0; iSolver < nSolver; ++ iSolver)
+        {
+            Controller *controller = new Controller(iSolver, this->region);
+
+            controller->UpdateUnsteadyFlow(iSolver, 0);
+
+            //! Here is out of the sub-iteration, PostSolve is to dump various files according to the parameters in the "cfd_para.hypara", such as intervalStepFlow, intervalStepPlot, intervalStepForce, intervalStepRes, et al.
+            controller->PostSolve();
+
+            delete controller;
+        }
+    }
+
+bool Simulation::IsSubIterationConvergence(const int &innerIterStep, const int &minSubIteration, const int &maxSubIteration, const RDouble &tolalSubIteration, const RDouble &averageQuotientMaxInSolvers)
+{
+    bool isSubIterationConvergence = false;
+
+    if (innerIterStep < minSubIteration)
+    {
+        isSubIterationConvergence = false;
+    }
+    else if (averageQuotientMaxInSolvers <= tolalSubIteration)
+    {
+        isSubIterationConvergence = true;
+    }
+    else if (innerIterStep >= maxSubIteration)
+    {
+        isSubIterationConvergence = true;
+    }
+    else
+    {
+        isSubIterationConvergence = false;
+    }
+
+    return isSubIterationConvergence;
+}
+
+
+}
+
diff --git a/Main/src/main.cpp b/Main/src/main.cpp
new file mode 100644
index 0000000..d11dd9b
--- /dev/null
+++ b/Main/src/main.cpp
@@ -0,0 +1,70 @@
+//! @file      main.cpp.
+//! @brief     PHengLEI's main entrance.
+//! @author    Bell.
+//!                     1. Introduction of PHengLEI
+//!    PHengLEI is a Computational Fluid Dynamics (CFD) software platform developed
+//! by China Aerodynamics Research and Development Center (CARDC).
+//! PHengLEI is a structured/unstructured
+//! general brand CFD software, meaning the structured and unstructured solvers
+//! can run on structured and unstructured grid respectively. PHengLEI is developed on
+//! the basis of existing in-house codes and software in CARDC, and making full use of
+//! years of technical reserves on the developing of professional software.
+//! The range of applied flow velocity covers low-subsonic-transonic-hypersonic speed.
+//! Modern software engineering method was employed as the guidance in the process of
+//! the software development, and the software architecture for next generation was designed
+//! in consideration of the CFD industrial features.
+
+//!                     2. Development history
+//!    Since 2003, a structured/unstructured hybrid prototype codes named 'Fantasy' was developed
+//! by Dr. Eric (He Xin) and Dr. Zhang Laiping, supported by National Basic Research Program of China,
+//! (No. 2009CB723802).
+//!    Since 2011, a professional CFD software development team was assembled to develop general
+//! CFD software which is named 'HyperFLOW' firstly, supported by National Natural Science Foundation
+//! of China (No. 11272339).
+//!    2013.12.28, the general CFD software 'PHengLEI' was released to CARDC users.
+//!    2016.04.28, PHengLEI (version 1.0) was officially released to CFD users in the field of aeronautic
+//! and aerospace in CHINA. Several versions were released in the next few yeas till 2018.12.
+//!    2018.12.07, Computational Fluid Dynamics Software Engineering Center was set up in CARDC,
+//! to develop National Numerical Wind-tunnel (NNW) project. PHengLEI, as the most important part of NNW,
+//! is entrusted with a new mission.
+//!    2020, Open source.
+//!    2023, the PHengLEI development team relocated to Chengdu.
+
+//!                     3. Acknowledgements
+//!    During the development of prototype before 2003, we got a lot of help from Dr. Wang and other
+//! researchers. PHengLEI is developed from HyperFLOW v1.0, which is mostly developed by Eric.
+//!    Thanks for all!
+
+//! Declaration: If the user uses the "PHengLEI" software for academic research or engineering application,
+//! the software based on the National Numerical Windtunnel should be marked in the prominent position of 
+//! the paper results, and references related to the "PHengLEI" software (e.g. [1] and [2]) should be cited.
+//! 
+//! [1] Zhao Z, et al. Design of general CFD software PHengLEI[J]. Computer Engineering & Science, 2020, 42(2): 
+//!     210-219.
+//! [2] Zhao Z, et al. PHengLEI: A Large Scale Parallel CFD Framework for Arbitrary Grids[J]. Chinese Journal 
+//!     of Computers, 2018, 42(11): 2368-2383.
+#include "CFDSimulation.h"
+#include "TK_Time.h"
+using namespace std;
+using namespace PHSPACE;
+
+int main()
+{
+    //! Do some prepare for time statistic.
+    setvbuf(stdout, NULL, _IONBF, 0);
+    //Calculate the time between now and the last running
+    PHSPACE::TIME_SPACE::GetWallTimeForResidual();
+    //Measure the wall-clock time that elapses from the start of the program to the time of the current call,i.e, the actual elapsed time.
+    PHSPACE::TIME_SPACE::GetWallTime();
+    PHSPACE::TIME_SPACE::GetCPUTime(0);
+
+    //! Entrance of PHengLEI.
+    RunPHengLEI();
+
+    //! Print job over information.
+    string infor = "Job Done.\n";
+    WriteLogFile(infor);
+    PrintToWindow(infor);
+
+    return 0;
+}
diff --git a/Mesh/CMakeLists.txt b/Mesh/CMakeLists.txt
new file mode 100644
index 0000000..a6c0d26
--- /dev/null
+++ b/Mesh/CMakeLists.txt
@@ -0,0 +1,281 @@
+#+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+#          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+#          P   P  H   H  E      NN   N  G      L      E       I          +
+#          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+#          P      H   H  E      N  N N  G   G  L      E       I          +
+#          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+#------------------------------------------------------------------------+
+#          Platform for Hybrid Engineering Simulation of Flows           +
+#          China Aerodynamics Research and Development Center            +
+#                     (C) Copyright, Since 2010                          +
+#+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+#! @file      CMakeLists.txt
+#! @brief     It defines the Mesh module, such as parallel mesh generation.
+#! @author    Bell.
+
+#. output message:
+message(STATUS "") 
+message(STATUS "--- Enter subdirectory <MESH>, Start to call ${CMAKE_CURRENT_LIST_FILE} ---") 
+message(STATUS "This current binary directory is ${CMAKE_CURRENT_BINARY_DIR}.")
+message(STATUS "This current source directory is ${CMAKE_CURRENT_SOURCE_DIR}.")
+
+include(${PROJECT_SOURCE_DIR}/../PHengLEI/PHMacro.cmake)
+if(USE_OCC)
+  message(STATUS "USE_OCC is turned on!")
+  add_definitions(-DUSE_OCC)
+endif()
+if(USE_DOUBLE_PRECISION)
+  message(STATUS "USE_DOUBLE_PRECISION is turned on!")
+  add_definitions(-DPH_DOUBLE_PREC)
+endif()
+if(USE_SMARTARRAY)
+  message(STATUS "USE_SMARTARRAY is turned on!")
+  add_definitions(-DUSE_SMARTARRAY)
+endif()
+if(WIN32)
+if(USE_Windows_X64)
+  message(STATUS "USE_Windows_X64 is turned on!")
+  add_definitions(-DUSE_WINDOWS_X64)
+endif(USE_Windows_X64)
+endif(WIN32)
+
+
+set(MESH_TARGET_NAME "PHMesh")
+set(LIBRARY_OUTPUT_PATH)
+
+if(WIN32)
+if(USE_Windows_X64)
+  set(LIB_API_EXPORT_PATH ${PROJECT_SOURCE_DIR}/../API/bin/${CMAKE_SYSTEM_NAME}-x64/${CMAKE_BUILD_TYPE})
+  set(CMAKE_EXE_LINKER_FLAGS "/machine:x64")
+else(USE_Windows_X64)
+  set(LIB_API_EXPORT_PATH ${PROJECT_SOURCE_DIR}/../API/bin/${CMAKE_SYSTEM_NAME}-x86/${CMAKE_BUILD_TYPE})
+endif(USE_Windows_X64)
+else(WIN32)
+  set(LIB_API_EXPORT_PATH ${PROJECT_SOURCE_DIR}/../API/bin/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR})
+endif(WIN32)
+link_directories("${LIB_API_EXPORT_PATH}")
+
+if(WIN32)
+if(USE_Windows_X64)
+ set(LIBRARY_OUTPUT_PATH ${PROJECT_SOURCE_DIR}/../Mesh/bin/${CMAKE_SYSTEM_NAME}-x64/${CMAKE_BUILD_TYPE})
+ set(CMAKE_EXE_LINKER_FLAGS "/machine:x64")
+else(USE_Windows_X64)
+  set(LIBRARY_OUTPUT_PATH ${PROJECT_SOURCE_DIR}/../Mesh/bin/${CMAKE_SYSTEM_NAME}-x86/${CMAKE_BUILD_TYPE})
+endif(USE_Windows_X64)
+else(WIN32)
+  set(LIBRARY_OUTPUT_PATH ${PROJECT_SOURCE_DIR}/../Mesh/bin/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR})
+endif(WIN32)
+message(STATUS "Mesh library path is: ${LIBRARY_OUTPUT_PATH}.")
+
+#set options
+if (NOT BUILD_LIBRARY_TYPE)
+  set (BUILD_LIBRARY_TYPE "Static" CACHE STRING "The type of PHengLEI libraries" FORCE)
+  SET_PROPERTY(CACHE BUILD_LIBRARY_TYPE PROPERTY STRINGS Shared Static)
+endif()
+
+#3. set environment for MPICH:
+if(WIN32)
+  set(MSMPI_HOME_DIRECTORY "C:/Program Files (x86)/Microsoft SDKs/MPI" CACHE PATH "path to installed MPICH")
+  include_directories("${MSMPI_HOME_DIRECTORY}/Include")
+  link_directories("${MSMPI_HOME_DIRECTORY}/lib")
+  if(USE_Windows_X64)
+    link_directories("${MSMPI_HOME_DIRECTORY}/Lib/x64")
+    set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/${THIRD_PARTY_COMPILER_FLAG}/win-x64")
+  else(USE_Windows_X64) 
+    link_directories("${MSMPI_HOME_DIRECTORY}/Lib/x86")
+    set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/${THIRD_PARTY_COMPILER_FLAG}/win-x86")
+  endif(USE_Windows_X64)
+else(WIN32)
+  set(CMAKE_CXX_COMPILER  mpicxx)
+  set(CMAKE_C_COMPILER    mpicc)
+  if(${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR} MATCHES "Linux-x86_64")
+    if(USE_INTEL_COMPILER)
+      set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/liblinux/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR}/intel")
+      message(STATUS "USE_INTEL_COMPILER is turned on!")
+    else(USE_INTEL_COMPILER)
+      set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/liblinux/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR}/gcc")
+      message(STATUS "USE_INTEL_COMPILER is turned off!")
+    endif()
+  else(${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR} MATCHES "Linux-aarch64")
+    set(THIRDPARTY_LIB_DIR "${PROJECT_SOURCE_DIR}/3rdparty/liblinux/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR}")
+  endif()
+endif(WIN32)
+# specify directory in which the linker will look for libraries for myself libraries:
+message(STATUS "The 3rdparty path is: ${THIRDPARTY_LIB_DIR}.") 
+link_directories("${THIRDPARTY_LIB_DIR}")
+
+includeHeadFiles()
+
+set(HDF5_H_PATH   ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/HDF5/include)
+include_directories("${HDF5_H_PATH}")
+
+if(USE_TecplotLib)
+set(TECIO_H_PATH  ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/TECIO/include)
+include_directories("${TECIO_H_PATH}")
+endif(USE_TecplotLib)
+
+set(MEITIS_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/metis/include)
+include_directories("${MEITIS_H_PATH}")
+set(CGNS_H_PATH   ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/cgns/include)
+include_directories("${CGNS_H_PATH}")
+# set(EIGEN_PATH   ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/eigen)
+# include_directories("${EIGEN_PATH}")
+set(MGRID_H_PATH   ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/mgrid/include)
+include_directories("${MGRID_H_PATH}")
+
+# set current directory:
+# set(EIGEN_H_PATH   ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty)
+# include_directories(${EIGEN_H_PATH})
+
+# set subdirectory <include>:
+set(OVERSET_H_PATH   include)
+set(OVERSET_H_LIST
+${OVERSET_H_PATH}/UnstructuredOversetConfig.h
+${OVERSET_H_PATH}/OversetKDTree.h
+${OVERSET_H_PATH}/DynamicGrid.h
+${OVERSET_H_PATH}/Mesh_Deformation.h
+${OVERSET_H_PATH}/Mesh_DeformationRBF.h
+${OVERSET_H_PATH}/Mesh_DeformationSPRING.h
+${OVERSET_H_PATH}/ComputationalGrid.h
+${OVERSET_H_PATH}/InterfaceLinkStructure.h
+${OVERSET_H_PATH}/Mesh_CellTopo.h
+${OVERSET_H_PATH}/Mesh_FaceTopo.h
+${OVERSET_H_PATH}/Mesh_Refine.h
+${OVERSET_H_PATH}/Mesh_Refine_Struct.h
+${OVERSET_H_PATH}/Mesh_Refine_Unstruct.h
+${OVERSET_H_PATH}/Mesh_RefineController.h
+${OVERSET_H_PATH}/Mesh_ConstructInterfaceLink.h
+)
+source_group(include FILES ${OVERSET_H_LIST}) 
+include_directories(${OVERSET_H_PATH})
+
+
+# set directory <src>:
+set(OVERSET_CPP_PATH  src)
+set(OVERSET_CPP_LIST
+${OVERSET_CPP_PATH}/UnstructuredOversetConfig.cpp
+${OVERSET_CPP_PATH}/OversetKDTree.cpp
+${OVERSET_CPP_PATH}/DynamicGrid.cpp
+${OVERSET_CPP_PATH}/Mesh_Deformation.cpp
+${OVERSET_CPP_PATH}/Mesh_DeformationRBF.cpp
+${OVERSET_CPP_PATH}/Mesh_DeformationSPRING.cpp
+${OVERSET_CPP_PATH}/ComputationalGrid.cpp
+${OVERSET_CPP_PATH}/InterfaceLinkStructure.cpp
+${OVERSET_CPP_PATH}/Mesh_CellTopo.cpp
+${OVERSET_CPP_PATH}/Mesh_FaceTopo.cpp
+${OVERSET_CPP_PATH}/Mesh_Refine.cpp
+${OVERSET_CPP_PATH}/Mesh_Refine_Struct.cpp
+${OVERSET_CPP_PATH}/Mesh_Refine_Unstruct.cpp
+${OVERSET_CPP_PATH}/Mesh_RefineController.cpp
+${OVERSET_CPP_PATH}/Mesh_ConstructInterfaceLink.cpp
+)
+source_group(src FILES ${OVERSET_CPP_LIST}) 
+include_directories(${OVERSET_CPP_PATH})
+
+
+# set header file list:
+set(HEAD_LIST
+${OVERSET_H_LIST}
+)
+# set source file list:
+set(CPP_LIST 
+${OVERSET_CPP_LIST}
+)
+# adds flags to the compiler command line for sources in the current directory and below:
+add_definitions(-DPH_PARALLEL -DPH_CGNS)
+
+# For OCC.
+set(OCC_LIBS)
+if(USE_OCC)
+  message(STATUS "Using OpenCasCade ...... ")
+  set(OCC_LIBS_REQUIRED
+      # subset of DataExchange
+      TKSTEP TKSTEP209 TKSTEPAttr TKSTEPBase TKIGES TKSTL TKXSBase
+      # ModelingAlgorithms
+      TKOffset TKFeat TKFillet TKBool TKShHealing TKMesh TKHLR TKBO TKPrim
+      TKTopAlgo TKGeomAlgo
+      # ModelingData
+      TKBRep TKGeomBase TKG3d TKG2d
+      # FoundationClasses
+      # TKAdvTools -- not necessary? (and removed from OCC 6.8)
+      TKMath TKernel)
+  
+  # Set the path of the OCC library.
+  set(3RDPARTY_LIB_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/occ730-vc11-bit64-release)
+  set(OCC_LIB_PATH ${3RDPARTY_LIB_PATH} CACHE PATH "path to OpenCasCade library.")
+  message(STATUS "Path to OpenCasCade library: " ${OCC_LIB_PATH})
+  
+  # Check if all the library exist -- it's need to be checked. 
+  foreach(OCC ${OCC_LIBS_REQUIRED})
+      list(APPEND OCC_LIBS ${OCC})
+      unset(OCC CACHE)
+  endforeach(OCC)
+  
+  if(WIN32)           
+    MESSAGE(STATUS "Using Win32 OpenCasCade.")
+    MESSAGE(STATUS "${OCC_LIB_PATH}/lib")
+    MESSAGE(STATUS "${OCC_LIB_PATH}/bin")
+    link_directories("${OCC_LIB_PATH}/lib")
+    link_directories("${OCC_LIB_PATH}/bin") 
+    include_directories("${OCC_LIB_PATH}/inc")
+  else(WIN32)
+    MESSAGE(STATUS "Using NON-Win32 OpenCasCade.")
+    MESSAGE(STATUS "${OCC_LIB_PATH}/lin64/gcc/lib")
+    MESSAGE(STATUS "${OCC_LIB_PATH}/inc")
+    link_directories("${OCC_LIB_PATH}/lin64/gcc/lib")
+    include_directories("${OCC_LIB_PATH}/inc")
+  endif(WIN32)
+endif()
+
+# build executable program or library to the project using the specified source files and header files:
+if ("${BUILD_LIBRARY_TYPE}" STREQUAL "Shared")
+  # Building Shared Library.   
+  message(STATUS "Building Shared Library ${MESH_TARGET_NAME} ...")
+  add_library(${MESH_TARGET_NAME} SHARED ${CPP_LIST} ${HEAD_LIST})
+elseif ("${BUILD_LIBRARY_TYPE}" STREQUAL "Static")
+  # Building Static Library.
+  message(STATUS "Building Static Library ${MESH_TARGET_NAME} ...")
+  add_library(${MESH_TARGET_NAME} STATIC ${CPP_LIST} ${HEAD_LIST}) 
+endif() 
+
+# link API library:
+set(API_TARGET_NAME "PHAPI")
+list(APPEND LINK_LIBRARY_LIST ${API_TARGET_NAME})
+target_link_libraries(${MESH_TARGET_NAME} ${LINK_LIBRARY_LIST})
+
+# For OpenMP
+if(USE_OMP)
+find_package (OpenMP)
+if (OpenMP_FOUND)
+
+if(WIN32)
+target_include_directories (${MESH_TARGET_NAME}
+  PRIVATE
+    ${OpenMP_CXX_INCLUDE_DIRS}
+)
+
+target_compile_options (${MESH_TARGET_NAME}
+  PRIVATE
+    ${OpenMP_CXX_FLAGS}
+)
+
+target_compile_features (${MESH_TARGET_NAME}
+  PUBLIC
+    cxx_std_14
+)
+
+target_link_libraries (${MESH_TARGET_NAME}
+  PRIVATE
+    ${OpenMP_CXX_LIBRARIES}
+)
+else(WIN32)
+  set(CMAKE_C_FLAGS "${CMAKE_C_FLAGS} ${OpenMP_C_FLAGS}")
+  set(CMAKE_CXX_FLAGS "${CMAKE_CXX_FLAGS} ${OpenMP_CXX_FLAGS}")
+  set(CMAKE_EXE_LINKER_FLAGS "${CMAKE_EXE_LINKER_FLAGS} ${OpenMP_EXE_LINKER_FLAGS}")
+endif(WIN32)
+endif (OpenMP_FOUND)
+endif(USE_OMP)
+
+# exit:
+message(STATUS "--- Exit ${CMAKE_CURRENT_LIST_FILE}! ---")
+
diff --git a/Mesh/include/ComputationalGrid.h b/Mesh/include/ComputationalGrid.h
new file mode 100644
index 0000000..b8bd70a
--- /dev/null
+++ b/Mesh/include/ComputationalGrid.h
@@ -0,0 +1,214 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      ComputationalGrid.h
+//! @brief     Construct grid interface information, used in Parallel unstructured grid refining. 
+//! @author    Baka, Bell.
+
+#pragma once
+#include "TypeDefine.h"
+#include "DataContainer.h"
+#include "Geo_Interface.h"
+#include "Region.h"
+
+namespace PHSPACE
+{
+class InterfaceLinkStructure;
+
+//! @brief ZoneInterface store base information of grid.
+class ZoneInterface
+{
+public:
+    ZoneInterface();
+    ~ZoneInterface();
+
+private:
+    //! Grid index.
+    int zoneIndex;
+
+    //! Nodes number of grid.
+    int numberOfNodes;
+
+    //! Min-max box of the nodes coordinates.
+    RDouble *pmin, *pmax;
+    RDouble disMin, disMax;
+    
+    //! Coordinates.
+    RDouble *x, *y, *z;
+
+    //! Face topo information.
+    PHVectorInt2D faceNodeIndexContainer;
+
+public:
+    void SetNumberOfNodes(int numIn) { this->numberOfNodes = numIn; }
+    int  GetNumberOfNodes() const { return this->numberOfNodes; }
+
+    uint_t GetNumberOfFaces() const { return this->faceNodeIndexContainer.size(); }
+
+    void SetZoneIndex(int indexIn) { this->zoneIndex = indexIn; }
+    int  GetZoneIndex() const { return this->zoneIndex; }
+
+    void SetMinBox(RDouble *boxIn) { this->pmin = boxIn; }
+    void SetMaxBox(RDouble *boxIn) { this->pmax = boxIn; }
+    RDouble * GetMinBox() const { return this->pmin; }
+    RDouble * GetMaxBox() const { return this->pmax; }
+
+    void SetMinMaxDistance(RDouble &dismin, RDouble &dismax) { this->disMin = dismin; this->disMax = dismax; }
+    void GetMinMaxDistance(RDouble &dismin, RDouble &dismax) { dismin = this->disMin; dismax = this->disMax; }
+
+    void SetX(RDouble *x) { this->x = x; }
+    void SetY(RDouble *y) { this->y = y; }
+    void SetZ(RDouble *z) { this->z = z; }
+
+    RDouble * GetX() const { return x; }
+    RDouble * GetY() const { return y; }
+    RDouble * GetZ() const { return z; }
+
+    PHVectorInt2D & GetFaceNodeIndexContainer() { return this->faceNodeIndexContainer; }
+
+    //! Compress and decompress data, used to communicate grid information.
+    void Encode(DataContainer *&dataContainer);
+    void Decode(DataContainer *&dataContainer);
+};
+
+//! @brief ComputationalGridProcess construct grid interface information, used in Parallel unstructured grid refining. 
+class ComputationalGridProcess
+{
+public:
+    ComputationalGridProcess(Region *region);
+    ~ComputationalGridProcess();
+protected:
+    //! Number of grid.
+    int numberOfZones;
+
+    //! Interface information.
+    InterfaceLinkStructure *interfaceLinkStructure;
+
+    //! Interface information of neighbor grid.
+    vector< ZoneInterface * > neighborZoneInterfaces;
+    vector< ZoneInterface * > zoneInterfacesTopologyList;
+
+    //! current grid.
+    int currentZoneID;
+    UnstructGrid *currentGrid;
+
+    //! boundary information of face.
+    vector< PHVectorInt1D >    boundaryTypeVectorList;
+    vector< vector< string > > boundaryNameVectorList;
+
+    //! Index map between loacl interface and global interface.
+    vector< PHVectorInt1D > newLocalInterfaceIndexToGlobalInterfaceIndexMappingList;
+    
+    //! Left cell index of boundary face.
+    vector< PHVectorInt1D > newBoundaryLeftCellIndexList;
+
+    //! Face topo information.
+    vector< PHVectorInt1D > newLeftCellIndexVectorList, newRightCellIndexVectorList;
+    vector< PHVectorInt2D > faceNodeIndexVectorList;
+
+ public:
+    //! Initialize: allocate memory.
+    void Initialize(Grid **gridContainer, int nZones);
+
+    //! Construct grid interface information. 
+    void PostProcessMultiZoneComputationalGrids();
+
+protected:
+    //! Construct neighbor grid interface topo information
+    void CreateNeighborZoneInterfacesTopology();
+
+    //! Construct grid interface topo information
+    void BuildZoneInterfacesOfThisProcessor();
+    void BuildZoneInterfacesTopology(UnstructGrid *unstructuredGrid, int iZone);
+
+    //! Init neighbor grid interfaces.
+    void InitZoneInterfacesOfThisProcessor();
+    void AddZoneInterfacesTopology(ZoneInterface *zoneInterfaceIn);
+
+    //! Communicate interface information.
+    void SwapZoneInterfaceTopologyToNeighborZones();
+    void SwapZoneInterfaceTopologyToNeighborZonesNonBlocking();
+    void SwapZoneInterfaceTopologyToNeighborZonesBlocking();
+    void SwapInterfaceTopologyBetweenTwoNeighboringZone(int zoneIndex, int sendProcessorIndex, int receiveProcessorIndex);
+    void CompressZoneInterfaceIntoDataContainer(DataContainer *&dataContainer, int globalZoneIndex);
+    void AnasysZoneInterfaceFromDataContainer(DataContainer *&dataContainer);
+    void DecodeZoneInterfacesTopology(DataContainer *&dataContainer);
+
+    //! Get the length of neighbors.
+    void SwapZoneInterfaceLengthToNeighborZones(vector<CharVecSizeType> &neighborLength);
+
+    //! Create interfaceLink structure.
+    void CreateInterfaceLinkStructure();
+
+    //! Get neighbor grid coordinates information.
+    void GetNeighborZoneBoundingBox   (RDouble *pmin, RDouble *pmax);
+    void GetNeighborZoneMinMaxDistance(RDouble &mindis, RDouble &maxdis);
+
+    //! Covert NO_BOUNDARY_CONDITION to INTERFACE.
+    void PreprocessBoundaryCondition();
+    void ChangeBoundaryConditionTypeIfNeeded();
+
+    //! Construct grid interface information map between local grid and neighbor frid.
+    void GenerateLocalGlobalInterfaceMappingByNeighborZones();
+    void GenerateLocalGlobalInterfaceMappingByNeighborZones(int iZone);
+
+    //! Build interface information for each grid.
+    void CreateInterfaceInformation();
+    void CreateLocalInterfaceToBoundaryFaceIndexesMapping();
+
+    //! Reconstruct interface topology, only used to QUAD_4 face.
+    void ReconstructInterfaceTopology();
+
+    //! Reconstruct face topology, after node index changed.
+    void ReGenerateLocalGlobalInterfaceMapping();
+    void InitializeNewLocalGlobalInterfaceMapping();
+    void ModifyFaceNodesIndexes               (InterfaceLinkStructure *interfaceLinkStructure);
+    void ModifyBoundaryInformation            (InterfaceLinkStructure *interfaceLinkStructure);
+    void SetBoundaryFaceNodeIndexVector       (InterfaceLinkStructure *interfaceLinkStructure);
+    void SetNewFaceToCellIndexesContainer     (InterfaceLinkStructure *interfaceLinkStructure);
+    void ResetNumberOfBoundaryCondition       (InterfaceLinkStructure *interfaceLinkStructure, PHVectorInt1D &numberOfChildFacesOfInterface);
+    void ProcessGlobalToLocalInterfaceTerm    (InterfaceLinkStructure *interfaceLinkStructure);
+    void DoFurtherWorkUsingBoundaryTypeVector (InterfaceLinkStructure *interfaceLinkStructure);
+    void ReGenerateLocalGlobalInterfaceMapping(InterfaceLinkStructure *interfaceLinkStructure);
+
+    //! Update interface information after reconstruct face topology.
+    void UpdateLocalGlobalInterfaceMapping();
+    void UpdateOtherTopologyTerm();
+    void UpdateOtherTopologyTerm(InterfaceLinkStructure *interfaceLinkStructure);
+    void UpdateOtherBoundaryTopologyTerm();
+    void UpdateOtherGridFaceTopologyTerm();
+
+    //! Search neighbor grid index and interface index of in neighbor grid of each interface in current grid.
+    void MatchInterfaceTopology();
+
+private:
+    Grid ** GetGridContainer() { return gridContainer; }
+    Grid  * GetGrid(int iZone) { return gridContainer[iZone]; }
+    InterfaceLinkStructure * GetInterfaceLinkStructure() { return interfaceLinkStructure; }
+    vector< ZoneInterface* > & GetNeighborZoneInterfaces() { return neighborZoneInterfaces; }
+
+private:
+    Region *region;
+    Grid **gridContainer;
+
+};
+
+//! Return if interface is exist in grid.
+bool ExistInterfaces(UnstructGrid *unstructuredGrid);
+
+//! Return node coordinate in face.
+void GetFaceCoordinateList(PHVectorInt1D &faceNodeIndexes, int numberOfPoints, RDouble *xList, RDouble *yList, RDouble *zList, RDouble *x, RDouble *y, RDouble *z);
+
+//! Construct ADTNode by node coordinate in face, then insert in ADTree.
+int  GetCoordinateIndex(DataStruct_AdtTree< int, RDouble > *adtTree, RDouble *coordinate, RDouble *minWindow, RDouble *maxWindow, int &pointCount, int &pointIndex);
+void GetCoordinateIndexList(InterfaceLinkStructure *interfaceLinkStructure, int &pointCount, RDouble *xList, RDouble *yList, RDouble *zList, int numberOfPoints, PHVectorInt1D &pointIndexes);
+
+}
\ No newline at end of file
diff --git a/Mesh/include/DynamicGrid.h b/Mesh/include/DynamicGrid.h
new file mode 100644
index 0000000..68fed3d
--- /dev/null
+++ b/Mesh/include/DynamicGrid.h
@@ -0,0 +1,99 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      DynamicGrid.h
+//! @brief     Dynamic grid structures, for arbitrary mixed cells.
+//! @author    Bell, Baka.
+
+#pragma once
+#include "Region.h"
+#include "Geo_Grid.h"
+
+using namespace std;
+namespace PHSPACE
+{
+class DYCell;
+class DYFace;
+class DYNode;
+
+class DynamicGrid
+{
+private:
+    //! Original grid.
+    Grid *stationalGrid;
+
+    //! Number of total nodes.
+    int nTotalNode;
+
+    //! The number of Total Faces.
+    int nTotalFace;
+
+    //! The number of Total Cells.
+    int nTotalCell;
+
+    //! The number of boundary faces which include interface faces.
+    int nBoundFace;
+
+    //! Node information.
+    DYNode *nodeArray;
+
+    //! Face information.
+    DYFace *faceArray;
+
+    //! Cell information.
+    DYCell *cellArray;
+
+    //! Location of each node. When node on second segment, value = 1.
+    int *secondSegment;
+
+    //! The node index which is rotate center of second segment.
+    int rotateNodeIndex;
+
+public:
+    //! @param[in] stationalGridIn  Original grid.
+    DynamicGrid(Grid *stationalGridIn);
+    ~DynamicGrid();
+
+public:
+    int GetNTotalNode() { return this->nTotalNode; }
+    int GetNTotalFace() { return this->nTotalFace; }
+    int GetNTotalCell() { return this->nTotalCell; }
+    int GetNBoundFace() { return this->nBoundFace; }
+    int GetRotateNodeIndex() { return this->rotateNodeIndex; }
+
+    DYNode * GetNodeArray() { return this->nodeArray; }
+    DYFace * GetFaceArray() { return this->faceArray; }
+    DYCell * GetCellArray() { return this->cellArray; }
+
+    int * GetSecondSegment() { return this->secondSegment; }
+    void SetSecondSegment(int *secondSegmentIn) { this->secondSegment = secondSegmentIn; }
+
+public:
+    //! Computer spring coefficient.
+    void CalSpringK();
+
+    //! Construct node topo.
+    void FindNode2Node();
+
+    //! Construct cell topo.
+    void ReconstrcutImplicitGeomeInfor();
+
+    //! Distill grid information from original grid.
+    void StationalData2DynamicData();
+
+    void SetSymmetryToZero();
+};
+
+const int STATIC_POINT        = 0;
+const int DYNAMIC_POINT_WALL  = 1;
+const int DYNAMIC_POINT_FIELD = 2;
+
+}
diff --git a/Mesh/include/InterfaceLinkStructure.h b/Mesh/include/InterfaceLinkStructure.h
new file mode 100644
index 0000000..6dc4c97
--- /dev/null
+++ b/Mesh/include/InterfaceLinkStructure.h
@@ -0,0 +1,191 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      InterfaceLinkStructure.h
+//! @brief     Store interface information of grid, used in unstructured grid refining.
+//! @author    Baka, Bell.
+
+#pragma once
+#include "Geo_Point.h"
+#include "DataStruct_Sort.h"
+using namespace std;
+
+namespace PHSPACE
+{
+class Grid;
+class ZoneInterface;
+
+//! @brief FaceSearching achieve face search.
+class FaceSearching
+{
+public:
+    FaceSearching(const PHVectorInt1D &nodeIndexes, int faceIndex = 0);
+    ~FaceSearching();
+
+public:
+    //! Face index.
+    int faceIndex;
+
+    //! Node index on face.
+    PHVectorInt1D nodeIndexes;
+
+    //! Node index on face, after reorder.
+    PHVectorInt1D sortedNodeIndexes;
+
+public:
+    int GetFaceIndex() { return faceIndex; }
+    uint_t GetNumberOfNodes() { return nodeIndexes.size(); }
+    const PHVectorInt1D & GetNodeIndexes() { return nodeIndexes; }
+
+};
+
+//! @brief CompareFaceByMethod1 used to construct face list.
+class CompareFaceByMethod1
+{
+public:
+    bool operator() (const FaceSearching *lhs, const FaceSearching *rhs) const
+    {
+        return lhs->sortedNodeIndexes < rhs->sortedNodeIndexes;
+    }
+};
+
+//! @brief FaceSearchingManager achieve face search.
+class FaceSearchingManager
+{
+public:
+    FaceSearchingManager();
+    ~FaceSearchingManager();
+
+protected:
+    //! Face list, used to face search.
+    PHVector1D < FaceSearching * > referenceFacesArray;
+    set< FaceSearching *, CompareFaceByMethod1 > referenceFacesSet;
+
+    //! Face status.
+    PHVectorInt1D statusContainerOfFaces;
+
+    //! Children face of each face.
+    PHVectorInt2D childFaceIndexes;
+
+    //! Node index map between child face and parent face.
+    PHVectorInt2D relativeChildFaceNodeIndexes;
+
+public:
+    //! Add face.
+    void AddFace(const PHVectorInt1D &faceNodeIndexes);
+
+    //! Split QUAD_4 face to TRI_3 face.
+    void ComputeNewFaceIndex();
+
+protected:
+    //! Find if face is exist.
+    set< FaceSearching *, CompareFaceByMethod1 >::iterator FindFace(FaceSearching *faceSearching);
+
+    //! Split QUAD_4 face to TRI_3 face.
+    void SplitQuadrilateralToTriangle(FaceSearching *parentFaceSearching);
+
+    //! Get face index and coordinates.
+    void GetTriangleIndexes(FaceSearching *parentFaceSearching, PHVectorInt2D &localTriangleIndexesContainer, PHVectorInt2D &triangleIndexesContainer);
+    void GetLocalTriangleIndexes(PHVectorInt2D &localTriangleIndexesContainer);
+
+public:
+    PHVectorInt2D & GetGlobalChildFaceIndexes() { return childFaceIndexes; }
+    PHVectorInt2D & GetRelativeChildFaceNodeIndexes() { return relativeChildFaceNodeIndexes; }
+
+};
+
+//! @brief InterfaceLinkStructure store interface information of grid.
+class InterfaceLinkStructure
+{
+public:
+    typedef DataStruct_AdtTree < int, RDouble > AdtTree;
+
+protected:
+    //! Node coordinate of interface.
+    AdtTree coordinateTree;
+
+    //! FaceList, used to face search.
+    set < DataStruct_Sort< PHVectorInt1D > > referenceInterfaceListForSearching;
+    set < DataStruct_Sort< set< int > > > referenceInterfaceSetForSearching;
+
+    //! Interface index map between local interface and global interface.
+    PHVectorInt2D globalInterfaceIndexToZoneIndexesMapping;
+    PHVectorInt2D globalInterfaceIndexToLocalInterfaceIndexesMapping;
+    PHVectorInt2D localInterfaceIndexToGlobalInterfaceIndexMapping;
+
+    //! Interface index map between local interface and global interface finally.
+    PHVectorInt2D newGlobalInterfaceIndexToZoneIndexesMapping;
+    PHVectorInt2D newGlobalInterfaceIndexToLocalInterfaceIndexesMapping;
+
+    //! Global faces status.
+    PHVectorInt1D statusContainerOfGlobalFaces;
+
+    //! Face search.
+    FaceSearchingManager *faceSearchingManager;
+
+public:
+    InterfaceLinkStructure(RDouble *pmin, RDouble *pmax, RDouble tolerance, int nZones);
+    ~InterfaceLinkStructure();
+
+public:
+    //! Create interfacelink information
+    void CreateLinkInformation(PHVectorInt1D &facePointIndexes, int zoneIndex, int iLocalInterfaceCount);
+
+    //! Search neighbor grid index and interface index of in neighbor grid of each interface in current grid.
+    void MatchInterfaceTopology(Grid *grid);
+
+    //! Reconstruct interface topology, only used to QUAD_4 face.
+    void ReconstructInterfaceTopology();
+
+    //! Initialize size by number of interfaces of the grid.
+    void InitializeInterface(Grid *grid);
+    void InitializeInterface(ZoneInterface *zoneInterfaceTopology);
+
+    //! Init new interface map by old interface map.
+    void InitializeNewLocalGlobalInterfaceMapping();
+
+    //! Update interface index map between local interface and global interface.
+    void UpdateLocalGlobalInterfaceMapping();
+
+    //! Init face status.
+    void InitializeStatusContainerOfGlobalFaces();
+
+    //! Add face.
+    void AddFace(const PHVectorInt1D &facePointIndexes);
+
+    //! Create interfaceLink information.
+    void CreateLinkInformationBySet(PHVectorInt1D &facePointIndexes, int zoneIndex, int iLocalInterfaceCount);
+
+public:
+    int GetNumberOfInterfacePoints() { return coordinateTree.GetNodeNum(); }
+    AdtTree & GetCoordinateTree() { return coordinateTree; }
+    RDouble GetTolerance() const { return tolerance; }
+    PHVectorInt1D & GetStatusContainerOfGlobalFaces() { return statusContainerOfGlobalFaces; }
+
+    set < DataStruct_Sort< set< int > > >    & GetReferenceInterfaceSetForSearching () { return referenceInterfaceSetForSearching; }
+    set < DataStruct_Sort< PHVectorInt1D > > & GetReferenceInterfaceListForSearching() { return referenceInterfaceListForSearching; }
+
+    PHVectorInt2D & GetGlobalInterfaceIndexToZoneIndexesMapping             () { return globalInterfaceIndexToZoneIndexesMapping; }
+    PHVectorInt2D & GetGlobalInterfaceIndexToLocalInterfaceIndexesMapping   () { return globalInterfaceIndexToLocalInterfaceIndexesMapping; }
+    PHVectorInt2D & GetLocalInterfaceIndexToGlobalInterfaceIndexMapping     () { return localInterfaceIndexToGlobalInterfaceIndexMapping; }
+    PHVectorInt2D & GetNewGlobalInterfaceIndexToZoneIndexesMapping          () { return newGlobalInterfaceIndexToZoneIndexesMapping; }
+    PHVectorInt2D & GetNewGlobalInterfaceIndexToLocalInterfaceIndexesMapping() { return newGlobalInterfaceIndexToLocalInterfaceIndexesMapping; }
+
+    FaceSearchingManager * GetFaceSearchingManager() { return faceSearchingManager; }
+
+private:
+    RDouble tolerance;
+};
+
+//! Create interfacelink information
+void CreateLinkInformation(PHVectorInt1D &facePointIndexes, int zoneIndex, int iLocalInterfaceCount, InterfaceLinkStructure *interfaceLinkStructure);
+
+}
diff --git a/Mesh/include/Mesh_CellTopo.h b/Mesh/include/Mesh_CellTopo.h
new file mode 100644
index 0000000..dbe027b
--- /dev/null
+++ b/Mesh/include/Mesh_CellTopo.h
@@ -0,0 +1,115 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Mesh_CellTopo.h
+//! @brief     Store cell information of grid, used in unstructured grid refining.
+//! @author    Baka, Bell.
+
+#pragma once
+#include "TypeDefine.h"
+
+namespace PHSPACE
+{
+//! @brief Mesh_CellTopo store cell information of grid, used in unstructured grid refining.
+class Mesh_CellTopo
+{
+private:
+    //! Cell type, such as TETRA_4, PENTA_6.
+    PHVectorInt1D cellType;
+
+    //! Cell level, parent cell or child cell.
+    PHVectorInt1D cellLevel;
+
+    //! Cell refine type, ISOTROPICREFINE or ANISOTROPICREFINE.
+    PHVectorInt1D refineType;
+
+    //! Parent cell index of each cell.
+    PHVectorInt1D parentCellIndex;
+
+    //! Children cell index of each cell.
+    PHVectorInt2D childrenCellIndexes;
+
+    //! Cell index map between refined cell and global cell.
+    PHVectorInt1D computationalToGlobalCellIndex;
+    PHVectorInt1D globalToComputationalCellIndex;
+
+    //! Cell modified status.
+    PHVectorInt1D computationalCellModifiedStatus;
+    PHVectorInt1D cellModifiedStatus;
+    PHVectorInt1D cellComputationalStatus;
+
+    //! Cell topo information.
+    PHVectorInt2D cell2Node;
+    PHVectorInt2D cell2Face;
+    PHVector1D< set< int > > node2Cell;
+    PHVector1D< set< int > > cell2Cell;
+
+public:
+    Mesh_CellTopo();
+    ~Mesh_CellTopo();
+
+public:
+    PHVectorInt1D & GetCellType() { return cellType; }
+    PHVectorInt1D & GetCellLevel(){ return cellLevel; }
+    PHVectorInt1D & GetRefineType() { return this->refineType; }
+    PHVectorInt1D & GetComputationalToGlobalCellIndex() { return computationalToGlobalCellIndex; }
+    PHVectorInt1D & GetGlobalToComputationalCellIndex() { return globalToComputationalCellIndex; }
+    PHVectorInt1D & GetParentCellIndex() { return parentCellIndex; }
+    PHVectorInt1D & GetComputationalCellModifiedStatus(){ return computationalCellModifiedStatus; }
+    PHVectorInt1D & GetCellModifiedStatus() { return cellModifiedStatus; }
+    PHVectorInt1D & GetCellComputationalStatus() { return cellComputationalStatus; }
+
+    PHVectorInt2D & GetCell2Node() { return cell2Node; }
+    PHVectorInt2D & GetCell2Face() { return cell2Face; }
+    PHVectorInt1D & GetCell2Node(int cellIndex) { return cell2Node[cellIndex]; }
+    PHVectorInt1D & GetChildrenCellIndexe(int cellIndex) { return childrenCellIndexes[cellIndex]; }
+
+    PHVector1D< set< int > > & GetNode2Cell() { return node2Cell; }
+    PHVector1D< set< int > > & GetCell2Cell() { return cell2Cell; }
+
+    int GetNTotalCell();
+    int GetCellType(int cellIndex) { return cellType[cellIndex]; }
+    int GetCellLevel(int cellIndex) { return cellLevel[cellIndex]; }
+    int GetRefineType(int cellIndex) { return refineType[cellIndex]; }
+    int GetCellComputationalStatus(int cellIndex) { return cellComputationalStatus[cellIndex]; }
+    int GetCellModifiedStatus(int cellIndex) { return cellModifiedStatus[cellIndex]; }
+
+    void SetAllCellLevelToZero();
+    void SetAllParentIndexToRootState();
+    void SetCellType(int cellIndex, int cellTypeIn);
+    void SetCellModifiedStatus(int cellIndex, int cellModifiedStatusIn);
+    void SetComputationalStatusOfCell(int cellIndex, int computationalStatusOfCell);
+    void SetCell2Node(int cellIndex, PHVectorInt1D &cell2NodeIn);
+    void SetParentCellIndex(int cellIndex, int parentCellIndexIn);
+    void SetCellLevel(int cellIndex, int cellLevelIn);
+
+    //! Add new cell.
+    void AddCell(PHVectorInt1D &cell2Node, int cellType, int cellLevel, int parentCellIndex);
+    void ResizeCellNumber(int nTotalCellIn);
+
+    //! Return if need split.
+    bool ElementNeedSplit(int cellIndex);
+};
+
+const int SPLIT = 0;
+const int NOCHANGE = 1;
+const int MERGE_ELEMENT = 2;
+const int DELETE = 3;
+const int HIDDEN = 4;
+const int ON = 5;
+const int BOUNDARYFACE = 6;
+const int HANGINGFACE = 7;
+const int GENERALFACE = 8;
+
+const int ISOTROPICREFINE = 0;
+const int ANISOTROPICREFINE = 1;
+
+}
\ No newline at end of file
diff --git a/Mesh/include/Mesh_ConstructInterfaceLink.h b/Mesh/include/Mesh_ConstructInterfaceLink.h
new file mode 100644
index 0000000..8da19e1
--- /dev/null
+++ b/Mesh/include/Mesh_ConstructInterfaceLink.h
@@ -0,0 +1,69 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Mesh_ConstructInterfaceLink.h
+//! @brief     Construct grid interface information, support for parallel operation. 
+//! @author    Baka.
+
+#pragma once
+#include "Geo_Grid.h"
+#include "ComputationalGrid.h"
+
+namespace PHSPACE
+{
+
+class Mesh_ConstructInterfaceLink
+{
+private:
+    //! Number of grid in this process.
+    int nZonesInCurrentProcess;
+
+    //! Grids in this process.
+    Grid **gridContainer;
+
+    //! The number of global zones.
+    int nZonesGlobal;
+
+    //! 
+    int *zoneProc;
+
+    int *localZoneIndex;
+
+    //! Interface information
+    vector< ZoneInterface * > zoneInterfacesTopologyList;
+
+public:
+    Mesh_ConstructInterfaceLink(Grid **gridIn, int nZonesInCurrentProcessIn);
+    ~Mesh_ConstructInterfaceLink();
+
+public:
+    void Run();
+
+private:
+    void ReorderGridIndex();
+    void ChangeNoBoundaryCondition();
+
+    void BuildZoneInterfacesInfo();
+    void CollectUnsGridInterfaceInfo(Grid *grid, DataContainer *cdata);
+    void DecodeInterfaceInfo(ZoneInterface *zoneInterface, DataContainer *cdata);
+    void ConstructInterfaceLink();
+    void BuildGridLink(int iZone, LinkStruct *link);
+
+    void GetBoundingBox(RDouble *pmin, RDouble *pmax);
+    void GetMinMaxDS(RDouble &mindis, RDouble &maxdis);
+
+
+};
+
+
+
+
+}
\ No newline at end of file
diff --git a/Mesh/include/Mesh_Deformation.h b/Mesh/include/Mesh_Deformation.h
new file mode 100644
index 0000000..d07a90e
--- /dev/null
+++ b/Mesh/include/Mesh_Deformation.h
@@ -0,0 +1,125 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Mesh_Deformation.h
+//! @brief     Grid deformation.
+//! @author    Bell, Baka.
+
+//! REFERENCES
+//! [1] Zhao Z, et al. An efficient large-scale mesh deformation method based on 
+//!     MPI/OpenMP hybrid parallel radial basis function interpolation[J]. 
+//!     Chinese Journal of Aeronautics, DOI: 10.1016/j.cja.2019.12.025.
+
+#pragma once
+#include "DynamicGrid.h"
+#pragma warning(disable:4100)
+namespace PHSPACE
+{
+
+//! @brief DeformParameter class storage the parameter of grid deform.
+class DeformParameter
+{
+private:
+    //! Number of deform step.
+    int nDeformStep;
+
+    //! The max flap angle
+    RDouble flapAngle;
+
+    //! Rotate postion.
+    RDouble rotatePostionZ, rotatePostionY;
+
+    //! If dump slice grid.
+    int gridSlice;
+
+    //! Grid slice axis
+    int sliceAxis;
+
+    //! Grid slice position.
+    RDouble slicePosition;
+
+public:
+    void SetNDeformStep(int nDeformStepIn);
+    void SetFlapAngle(RDouble flapAngleIn);
+    void SetRotatePostionZ(RDouble rotatePostionZIn);
+    void SetRotatePostionY(RDouble rotatePostionYIn);
+    void SetGridSlice(int gridSliceIn);
+    void SetSliceAxis(int sliceAxisIn);
+    void SetSlicePosition(RDouble slicePositionIn);
+
+    int GetNDeformStep();
+    RDouble GetFlapAngle();
+    RDouble GetRotatePostionZ();
+    RDouble GetRotatePostionY();
+    int GetGridSlice();
+    int GetSliceAxis();
+    RDouble GetSlicePosition();
+};
+
+//! @brief Mesh_Deformation achieve unstructured grid deform.
+class Mesh_Deformation
+{
+public:
+    //! @param[in] nZonesIn         Number of grid.
+    //! @param[in] stationalGridIn  Original grid.
+    Mesh_Deformation(int nZonesIn, Grid **stationalGridIn);
+    virtual ~Mesh_Deformation();
+
+public:
+    void Run();
+
+    //! @param[in] deformParameterIn   Grid deform parameter.
+    void SetDeformParameter(DeformParameter *deformParameterIn);
+
+    virtual void SetNumberOfReferenceCP(int numberOfReferenceCPIn) {};
+    virtual void SetInfluencePara(RDouble influenceParaIn) {};
+
+private:
+    //! Transform stationalGrid to deformedGrid.
+    virtual void TransformGrid() = 0;
+
+    //! Grid deformed.
+    virtual void Deforming() = 0;
+
+    //! Set vector of surface node.
+    virtual void SurfaceGridMove(int iStep) = 0;
+
+    virtual void MatchControlPoints() = 0;
+    virtual void PostTreat() = 0;
+
+protected:
+    void SetNodeAttribute(DynamicGrid *grid);
+
+    //! Set z coordinate of node(in symmetry face) to zero.
+    void SetSymmetryToZero();
+
+    //! Dump surface and slice grid into tecpolt file.
+    void PostVisual(string visualFileName, int iStep);
+
+protected:
+    //! Number of grid.
+    int numberOfZones;
+
+    //! Original grid.
+    Grid **stationalGrid;
+
+    //! Deformed grid.
+    DynamicGrid **deformedGrid;
+
+    //! Grid deform parameter.
+    DeformParameter *deformParameter;
+};
+
+void DeformGrid();
+
+const int SPRING = 1;
+const int RBF    = 2;
+}
diff --git a/Mesh/include/Mesh_DeformationRBF.h b/Mesh/include/Mesh_DeformationRBF.h
new file mode 100644
index 0000000..f87c83a
--- /dev/null
+++ b/Mesh/include/Mesh_DeformationRBF.h
@@ -0,0 +1,92 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Mesh_DeformationRBF.h
+//! @brief     Grid deformation by RBF method.
+//! @author    Bell, Baka.
+
+//! REFERENCES
+//! [1] Zhao Z, et al. Numerical simulation of unsteady flows on bird-like flapping
+//!     wing[J]. Transactions of Nanjing University of Aeronautics & Astronautics, 
+//!     2013, 30(sup):93-100.
+//! [2] Zhao Z et al. An efficient large-scale mesh deformation method based on 
+//!     MPI/OpenMP hybrid parallel radial basis function interpolation[J]. 
+//!     Chin J Aeronaut, 2020, 33(5): 1392-1404.
+
+#pragma once
+#include "Mesh_Deformation.h"
+
+namespace PHSPACE
+{
+
+typedef PHVector1D< Point3D > PointArray;
+typedef DataStruct_AdtTree<int, RDouble> CPTree;
+typedef DataStruct_AdtNode<int, RDouble> CPNode;
+
+//! @brief Mesh_DeformationRBF class achieve unstructured grid deform by RBF method.
+class Mesh_DeformationRBF : public Mesh_Deformation
+{
+private:
+    //! Number of control point.
+    int nControlPoints;
+
+    //! The coordinate of each control point.
+    PointArray controlPointCoordinates;
+
+    //! The most displacement of each control point.
+    PointArray controlPointVectors;
+
+    //! The zone index and node index each control point belong
+    PHVectorInt2D controlPointToGlobalPointIndex;
+
+    //! The RBF influence radius parameter: multiply it to the maximum boundary deformation distance
+    //! is the influence radius used in RBF method (influenceRadius in following).
+    //! the points that out of the radius will not been deformed.
+    //! 10.0-50.0 is recommended.
+    RDouble influencePara;
+
+    //! The ADTree of control point
+    CPTree *controlPointTree;
+
+    //! Number of reference Control Points.
+    int numberOfReferenceCP;
+
+    RDouble wallTolerance;
+    PHVectorInt1D secondSegment;
+    PHVectorInt1D rotateNodeIndex;
+
+public:
+    //! @param[in] nZonesIn         Number of grid.
+    //! @param[in] stationalGridIn  Original grid.
+    Mesh_DeformationRBF(int nZonesIn, Grid **stationalGridIn);
+    ~Mesh_DeformationRBF();
+
+    void SetNumberOfReferenceCP(int numberOfReferenceCPIn);
+    void SetInfluencePara(RDouble influenceParaIn);
+
+private:
+    void TransformGrid();
+    void MatchControlPoints();
+    void PostTreat();
+    void Deforming();
+    void SurfaceGridMove(int iStep);
+    void BuildControlPointTree();
+    void FindOutReferenceCP(DYNode point, PHVectorInt1D &referenceCP);
+    void RBFDeformingKernel(DynamicGrid *grid, int nodeIndex, PHVectorInt1D &referenceCP);
+};
+
+RDouble Wendland  (RDouble distance, RDouble radius);
+RDouble WendlandC0(RDouble distance, RDouble radius);
+RDouble WendlandC2(RDouble distance, RDouble radius);
+RDouble WendlandC4(RDouble distance, RDouble radius);
+//void MatrixInverse(vector< vector< RDouble > > &maxtrix, const int size);
+
+}
diff --git a/Mesh/include/Mesh_DeformationSPRING.h b/Mesh/include/Mesh_DeformationSPRING.h
new file mode 100644
index 0000000..9652e28
--- /dev/null
+++ b/Mesh/include/Mesh_DeformationSPRING.h
@@ -0,0 +1,44 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Mesh_DeformationSPRING.h
+//! @brief     Grid deformation by SPRING method.
+//! @author    Bell, Baka.
+
+//! REFERENCES
+//! [1] Zhao Z, et al. Numerical simulation of unsteady flows on bird-like flapping 
+//!     wing[J]. Transactions of Nanjing University of Aeronautics & Astronautics, 
+//!     2013, 30(sup):93-100.
+
+#pragma once
+#include "Mesh_Deformation.h"
+
+namespace PHSPACE
+{
+
+//! @brief Mesh_DeformationSPRING class achieve unstructured grid deform by SPRING method.
+class Mesh_DeformationSPRING : public Mesh_Deformation
+{
+public:
+    //! @param[in] nZonesIn         Number of grid.
+    //! @param[in] stationalGridIn  Original grid.
+    Mesh_DeformationSPRING(int nZonesIn, Grid **stationalGridIn);
+    ~Mesh_DeformationSPRING();
+
+private:
+    void Deforming();
+    void SurfaceGridMove(int iStep);
+    void TransformGrid();
+    void MatchControlPoints();
+    void PostTreat();
+};
+
+}
diff --git a/Mesh/include/Mesh_FaceTopo.h b/Mesh/include/Mesh_FaceTopo.h
new file mode 100644
index 0000000..b4bce05
--- /dev/null
+++ b/Mesh/include/Mesh_FaceTopo.h
@@ -0,0 +1,147 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Mesh_FaceTopo.h
+//! @brief     Store face information of grid, used in unstructured grid refining.
+//! @author    Baka, Bell.
+
+#pragma once
+#include "TypeDefine.h"
+#include "Pre_GridBase.h"
+
+namespace PHSPACE
+{
+//! @brief Mesh_FaceTopo store face information of grid, used in unstructured grid refining.
+class Mesh_FaceTopo
+{
+private:
+    //! Face type, such as TRI_3, QUAD_4.
+    PHVectorInt1D faceType;
+
+    //! Face topo information of grid.
+    PHVectorInt1D leftCellIndex;
+    PHVectorInt1D rightCellIndex;
+    PHVectorInt2D face2Node;
+
+    //! Face to node information, after refined.
+    PHVectorInt2D compositeFace2Node;
+
+    //! Parent face index of each face.
+    PHVectorInt1D parentFaceIndex;
+
+    //! Children face index of each face.
+    PHVectorInt2D childrenFaceIndex;
+
+    //! Face index map between refined face and global face.
+    PHVectorInt1D computationalToGlobalFaceIndex;
+    PHVectorInt1D globalToComputationalFaceIndex;
+
+    //! Face type face refined.
+    PHVectorInt1D compositeFaceType;
+
+    //! Face index map between children face and refined face.
+    PHVectorInt1D childrenToCompositeFaceIndex;
+    PHVectorInt1D compositeToChildrenFaceIndex;
+
+    //! Middle node of each edge.
+    PHVectorInt1D middleNodeOfEdge;
+    set< MultiIndex > edgesWithMiddleNode;
+
+    //! Face metrics information.
+    PHVectorRDouble1D faceArea;
+    PHVectorRDouble1D faceNormalX;
+    PHVectorRDouble1D faceNormalY;
+    PHVectorRDouble1D faceNormalZ;
+
+    //! All face of grid, used to face search.
+    set< MultiIndex > faceList;
+    set< MultiIndex > compositeFacesList;
+
+    //! Boundary condition of each grid.
+    vector< SimpleBC * > faceBoundaryCondition;
+
+public:
+    Mesh_FaceTopo();
+    ~Mesh_FaceTopo();
+
+public:
+    PHVectorInt1D & GetFaceType() { return faceType; }
+    PHVectorInt1D & GetLeftCellIndex() { return leftCellIndex; }
+    PHVectorInt1D & GetRightCellIndex() { return rightCellIndex; }
+    PHVectorInt2D & GetFace2Node() { return face2Node; }
+    PHVectorInt2D & GetCompositeFace2Node() { return compositeFace2Node; }
+    PHVectorInt2D & GetIntermediateFace2Node() { return intermediateFace2Node; }
+
+    PHVectorInt1D & GetParentFaceIndex() { return parentFaceIndex; }
+    PHVectorInt2D & GetChildrenFaceIndex() { return childrenFaceIndex; }
+
+    PHVectorInt1D & GetComputationalToGlobalFaceIndex() { return computationalToGlobalFaceIndex; }
+    PHVectorInt1D & GetGlobalToComputationalFaceIndex() { return globalToComputationalFaceIndex; }
+
+    PHVectorInt1D & GetCompositeFaceType() { return compositeFaceType; }
+    PHVectorInt1D & GetChildrenToCompositeFaceIndex() { return childrenToCompositeFaceIndex; }
+    PHVectorInt1D & GetCompositeToChildrenFaceIndex() { return compositeToChildrenFaceIndex; }
+    PHVectorInt1D & GetMiddleNodeOfEdge() { return middleNodeOfEdge; }
+
+    PHVectorRDouble1D & GetFaceArea() { return faceArea; }
+    PHVectorRDouble1D & GetFaceNormalX() { return faceNormalX; }
+    PHVectorRDouble1D & GetFaceNormalY() { return faceNormalY; }
+    PHVectorRDouble1D & GetFaceNormalZ() { return faceNormalZ; }
+
+    int GetNTotalCompositeFaces() { return static_cast<int>(compositeFace2Node.size()); }
+
+    set < MultiIndex > & GetFaceList() { return faceList; }
+    vector< SimpleBC * > & GetFaceBoundaryCondition() { return faceBoundaryCondition; }
+
+    int GetNTotalFaces();
+    int GetNBoundaryFaces();
+    int GetNumberOfTotalEdgesWithMiddleNode();
+
+    //! Find if face is exist.
+    int FindFace(MultiIndex face);
+    int FindFace(PHVectorInt1D face2Node);
+    int FindCompositeFace(MultiIndex compositeFace);
+    int FindEdgeWithMiddleNode(MultiIndex edgeWithMiddleNode);
+
+    //! Insert face.
+    void InsertFace(MultiIndex face);
+    void InsertCompositeFace(MultiIndex compositeface);
+    void InsertEdgeWithMiddleNode(MultiIndex edgeWithMiddleNode);
+
+    //! Add face.
+    int AddFace(PHVectorInt1D &face2NodeIn, int faceTypeIn, int parentFaceIndex);
+    void ResizeFaceNumber(int faceNumber);
+
+    //! Set default information of face, after refined.
+    void SetDefaultFaceInformation(int faceIndex, int faceTypeIn, PHVectorInt1D &face2NodeIn, int parentFaceIndex);
+    void AddFaceHierachical(int faceIndex, int parentFaceIndexIn);
+    void ScanChildFace(PHVectorInt1D cell2Node, int cellType, int cellIndex);
+
+private:
+    PHVectorInt2D intermediateFace2Node;
+
+};
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+}
\ No newline at end of file
diff --git a/Mesh/include/Mesh_Refine.h b/Mesh/include/Mesh_Refine.h
new file mode 100644
index 0000000..5a9cab4
--- /dev/null
+++ b/Mesh/include/Mesh_Refine.h
@@ -0,0 +1,83 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Mesh_Refine.h
+//! @brief     Grid refine.
+//! @author    Bell, Baka.
+
+#pragma once
+#include "Region.h"
+
+namespace PHSPACE
+{
+
+//! @brief RefineParameter class storage the parameter of grid refine.
+class RefineParameter
+{
+private:
+    //! Mesh refine type, ISOTROPICREFINE or ANISOTROPICREFINE.
+    int anisoRefine;
+
+public:
+    void SetAnisoRefineType(int anisoRefineIn);
+    int GetAnisoRefineType();
+
+};
+
+//! @brief Mesh_Refine achieve grid refine.
+class Mesh_Refine
+{
+private:
+    string gridFileName;
+
+public:
+    Mesh_Refine(const string &gridFileNameIn);
+    ~Mesh_Refine();
+
+public:
+    void Run();
+    void SetRefineParameter(RefineParameter *refineParameterIn);
+
+protected:
+    //! Read original grid.
+    void ReadGrid();
+
+    //! Initialize: allocate memory.
+    virtual void AllocateMemory() {};
+
+    //! Construct grid information.
+    virtual void ConstructGridTopo() {};
+
+    //! Set Refine property of each cell.
+    virtual void BuildRefineProperty() {};
+
+    //! Set refine type of each cell.
+    virtual void FixAnisoRefineType() {};
+
+    //! Grid refine.
+    virtual void RefineGrid() {};
+
+    //! Generate refined grid, and then dump grid.
+    virtual void GenerateAndDumpComputationalGrid() {};
+    void DumpComputationalGrid();
+
+protected:
+    //! Number of grid in this process.
+    int numberOfZones;
+
+    //! Grid refine parameter.
+    RefineParameter *refineParameter;
+
+    Region *region;
+    Grid **refinedGrids;
+};
+
+}
diff --git a/Mesh/include/Mesh_RefineController.h b/Mesh/include/Mesh_RefineController.h
new file mode 100644
index 0000000..e9f2458
--- /dev/null
+++ b/Mesh/include/Mesh_RefineController.h
@@ -0,0 +1,144 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Mesh_RefineController.h
+//! @brief     Single unstructured grid refine.
+//! @author    Baka, Bell.
+
+#pragma once
+#include "Mesh_CellTopo.h"
+#include "Geo_PointFactory.h"
+#include "Mesh_FaceTopo.h"
+
+namespace PHSPACE
+{
+
+//! @brief Mesh_RefineController achieve single unstructured grid refine.
+class Mesh_RefineController
+{
+private:
+    //! Current grid index.
+    int zoneIndex;
+
+    //! Node number.
+    int nTotalNode;
+
+    //! Boundary face number
+    int nBoundaryFace;
+
+    //! Cell number.
+    int oldNumberOfCell;
+
+    //! Cell inoformation of grid.
+    Mesh_CellTopo *cellTopo;
+
+    //! Face inoformation of grid.
+    Mesh_FaceTopo *faceTopo;
+
+    //! Node inoformation of grid.
+    Geo_PointFactory *nodeTopo;
+
+    //! Interface inoformation of grid.
+    InterfaceInfo *interfaceInformation;
+
+    //! Face inoformation of refined grid.
+    Mesh_FaceTopo *computationalFaceTopo;
+
+    //! If current grid has been refined.
+    bool hasBeenRefined;
+
+public:
+    Mesh_RefineController();
+    ~Mesh_RefineController();
+
+public:
+    //! Return cell, face and node information of grid.
+    Mesh_CellTopo    * GetCellFactory() { return this->cellTopo; }
+    Mesh_FaceTopo    * GetFaceFactory() { return this->faceTopo; }
+    Geo_PointFactory * GetNodeFactory() { return this->nodeTopo; }
+
+    //! Set interface information of grid.
+    void SetInterfaceInformation(InterfaceInfo *interfaceInformationIn) { this->interfaceInformation = interfaceInformationIn; }
+
+    //! Construct grid topo information, node to cell, cell to cell.
+    void Initialize();
+    void ConstructNode2Cell();
+    void ConstructCell2Cell();
+
+    //! Set refine type of each cell.
+    void InitAnisoRefineType();
+    void FixAnisoRefineType();
+
+    //! Grid refine.
+    void RefineGrid();
+
+    //! Split all cell.
+    void SplitAllElements();
+    void SplitElement(int cellIndex);
+    void ReactivateChildElement(int cellIndex);
+    void AddChildElement(int parentElementIndex);
+
+    //! Split all face.
+    void SplitElementFace(int cellIndex);
+    void SplitFace(PHVectorInt1D &iCompositeFace2Node, int compositeFaceType);
+
+    //! Construct grid information after refined.
+    void ConstructBasicData();
+    void ScanAllElementsToReconstructFaceDataStructure();
+
+    //! Reorder cell index after refined.
+    void GenerateCellIndex();
+
+    //! Construct cell and face index map between refined cells and global cells.
+    void GenerateGlobalToComputationalCellFaceIndex();
+    void GenerateGlobalToComputationalCellFaceIndex(int iFace, int &iComputationalFaceCount, int &iBoundaryFace);
+    void GenerateGlobalToComputationalCellFaceIndexNoParentCase(int iFace, int &iComputationalFaceCount, int &iBoundaryFace);
+    void GenerateGlobalToComputationalCellFaceIndexWithParentCase(int iFace, int &iComputationalFaceCount, int &iBoundaryFace);
+    void GenerateComputationalCellFaceInformation();
+    void GenerateComputationalElementFaceInformationFirstPart();
+    void GenerateComputationalElementFaceInformationSecondPart();
+
+    //! Construct face topo information after refined, include face to cell and face to node.
+    void ProcessBoundaryFace(int iFaceForComputation);
+    void ProcessGereralFace(int iFaceForComputation);
+    void ProcessHangingFace(int iFaceForComputation);
+    void GenerateComputationalFaceNodeIndex();
+
+    //! Construct middle points of each edge.
+    void GenerateEdgesWithMiddlePoints(int iCompositeFace);
+
+    //! Set grid information.
+    void SetZoneIndex(int zoneIndexIn) { this->zoneIndex = zoneIndexIn; }
+    void SetNTotalNode(int nTotalNodeIn) { this->nTotalNode = nTotalNodeIn; }
+    void SetNBoundaryFace(int nBoundaryFacesIn) { this->nBoundaryFace = nBoundaryFacesIn; }
+    void SetOldNumberOfCell(int oldNumberOfCellIn) { this->oldNumberOfCell = oldNumberOfCellIn; }
+    void SetRefineStatus(bool statusIn) { this->hasBeenRefined = statusIn; }
+
+    //! Return grid information.
+    int GetNBoundaryFace() { return this->nBoundaryFace; }
+    int GetOldNumberOfCell() { return this->oldNumberOfCell; }
+
+    //! Generate refined grid.
+    void GenerateComputationalGrid(Grid *gridIn);
+    void GenerateComputationalUnstructuredGrid(UnstructGrid *grid);
+    void ReorderFaceToNodeIndexes(UnstructGrid *grid);
+    void ReorderFaceToCellIndexes(UnstructGrid *grid);
+    void GenerateCellToNode(UnstructGrid *grid);
+
+    //! Communicate interface information, when parallel grid refining.
+    void CompressRefineType(DataContainer *dataContainer, int neighborZoneIndex);
+    void DecompressRefineType(DataContainer *dataContainer, int neighborZoneIndex);
+    bool IsNeedInfectInterfaceIsotropicRefineType();
+    void GetSourceCellIndex(int iFace, int &sourceIndex);
+    void GetTargetIndex(int iFace, int &targetIndex);
+};
+
+}
\ No newline at end of file
diff --git a/Mesh/include/Mesh_Refine_Struct.h b/Mesh/include/Mesh_Refine_Struct.h
new file mode 100644
index 0000000..ffd2969
--- /dev/null
+++ b/Mesh/include/Mesh_Refine_Struct.h
@@ -0,0 +1,48 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Mesh_Refine_Struct.h
+//! @brief     Structured grid refine.
+//! @author    Baka, He Xianyao.
+
+#pragma once
+#include "Region.h"
+#include "Geometry.h"
+#include "Mesh_Refine.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+
+class Mesh_Refine_Struct : public Mesh_Refine
+{
+public:
+    LIB_EXPORT Mesh_Refine_Struct(const string &from_gfile);
+    LIB_EXPORT ~Mesh_Refine_Struct();
+
+private:
+    //! Initialize: allocate memory.
+    void AllocateMemory();
+
+    //! Grid refine.
+    void RefineGrid();
+    void RefineGrid(int iZone, StructGrid *grid_in);
+
+    //! Generate refined grid, and then dump grid.
+    void GenerateAndDumpComputationalGrid();
+    void GenerateBCRegion();
+
+private:
+    vector<Grid *> OrdinaryGrid;
+};
+
+}
\ No newline at end of file
diff --git a/Mesh/include/Mesh_Refine_Unstruct.h b/Mesh/include/Mesh_Refine_Unstruct.h
new file mode 100644
index 0000000..8a366e8
--- /dev/null
+++ b/Mesh/include/Mesh_Refine_Unstruct.h
@@ -0,0 +1,83 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      Mesh_Refine_Unstruct.h
+//! @brief     Parallel unstructured grid refine.
+//! @author    Baka, Bell.
+
+//! REFERENCES
+//! [1] Zhao Z et al. A large-scale parallel hybrid grid generation technique for 
+//!     realistic complex geometry[J]. Int J Numer Meth Fluids, 2020, 92(10): 1235-1255
+
+#pragma once
+#include <stdio.h>
+#include <string>
+#include "Region.h"
+#include "Mesh_Refine.h"
+#include "Mesh_RefineController.h"
+
+namespace PHSPACE
+{
+
+//! @brief Mesh_Refine_Unstruct achieve unstructured grid refine.
+class Mesh_Refine_Unstruct : public Mesh_Refine
+{
+public:
+    Mesh_Refine_Unstruct(const string &gridFileNameIn);
+    ~Mesh_Refine_Unstruct();
+
+private:
+    //! Initialize: allocate memory.
+    void AllocateMemory();
+
+    //! Construct grid topology information.
+    void ConstructGridTopo();
+    void ConstructGridTopo(Grid *grid);
+    void ConstructCellTopo(Grid *grid);
+    void ConstructNodeTopo(Grid *grid);
+    void ConstructFaceTopo(Grid *grid);
+    void ConstructMetrics (Grid *grid);
+    void ConstructInterFaceTopo(Grid *grid);
+
+    //! Set Refine property of each cell.
+    void BuildRefineProperty();
+    void SetDefaultRefineProperty(int iZone);
+    void ComputeRefineProperty(int iZone);
+    void PrepareDataStructure(int iZone);
+    void SetCellModifiedStatusToNoChange(int iZone);
+    void SetCellComputationalStatusToHiddenState(int iZone);
+    void SetCurrentCellModifiedStatusByOldCellModifiedStatus(int iZone);
+    void ResetCellProperty(int iZone);
+
+    //! Set current cell computational status to ON, if old cell modified status is NOCHANGE;
+    void SetCurrentCellComputationalStatus(int iZone);
+
+    //! Set refine type of each cell.
+    void FixAnisoRefineType();
+    void InitAnisoRefineType();
+    void SwapInterfaceRefineType();
+    bool IsNeedInfectInterfaceIsotropicRefineType();
+
+    //! Grid refine.
+    void RefineGrid();
+
+    //! Generate refined grid, and then dump grid.
+    void GenerateAndDumpComputationalGrid();
+    void AllocateComputationalGrid();
+    void GenerateComputationalGrid();
+    void GenerateGlobalInterfaceLink();
+
+private:
+    Mesh_RefineController **gridRefineControllers;
+
+};
+
+}
diff --git a/Mesh/include/OversetKDTree.h b/Mesh/include/OversetKDTree.h
new file mode 100644
index 0000000..340bae1
--- /dev/null
+++ b/Mesh/include/OversetKDTree.h
@@ -0,0 +1,166 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      OversetKDTree.h
+//! @brief     Unstructured grid overset KDT tree.
+//! @author    Chang Xinhua, He Kun, Zhang Laiping.
+
+#pragma once
+#include "TypeDefine.h"
+#include "DataContainer.h"
+#include "Geo_Grid.h"
+#include "Glb_Dimension.h"
+#include "Region.h"
+namespace PHSPACE
+{
+class BasicKDTree;
+class GridKDTree;
+
+class BasicKDTree
+{
+    typedef int (BasicKDTree:: *PartitionMethod)(int, int, int);
+public:
+    BasicKDTree(RDouble **dataIn,
+        int         numberOfSearchElementsIn,
+        int         numberOfSearchDirectionIn);
+    ~BasicKDTree();
+private:
+    PartitionMethod partitionMethod;
+
+    int numberOfSearchDirection;
+    int numberOfSearchElements;
+    RDouble **data;
+
+    int *elementOrder;
+
+    int *leftSonIndex;
+    int *rightSonIndex;
+    int rootIndex;
+public:
+    void BuildBasicKDTree();
+private:
+    void SwapElementIndex(int indexA, int indexB);
+    int  PartitionSinglePivotDoubleEndScanQuickSort(int iStart, int iFinal, int iLayer);
+    int  PartitionSinglePivotPreConditionDoubleEndScanQuickSort(int iStart, int iFinal, int iLayer);
+    int  PartitionSinglePivotForwardScanQuickSort(int iPivot, int iFinal, int iLayer);
+    int  PartitionSinglePivotPreConditionForwardScanQuickSort(int iPivot, int iFinal, int iLayer);
+    int  FindHalfSinglePivotQuickSort(int iStart, int iFinal, int iLayer);
+    void TreeSortSinglePivotQuickSort(int iStart, int iFinal, int iLayer);
+public:
+    int   GetRootIndex() { return this->rootIndex; }
+    int *GetLeftSonIndex() { return this->leftSonIndex; }
+    int *GetRightSonIndex() { return this->rightSonIndex; }
+};
+
+class GridKDTree
+{
+    typedef bool (GridKDTree:: *InCellCheckMethod)(RDouble *, int, int &);
+public:
+    GridKDTree(UnstructGrid *GridIn,
+        int *keySearchOfCellsIn = NULL,
+        RDouble *minBoxOfZoneIn = NULL,
+        RDouble *maxBoxOfZoneIn = NULL);
+    ~GridKDTree();
+private:
+    int geometricDimension;
+    UnstructGrid *grid;
+    BasicKDTree *basicKDTree;
+    InCellCheckMethod           inCellCheckMethod;
+    int *leftSonIndex;
+    int *rightSonIndex;
+    int                         rootIndex;
+
+    int                         numberOfSearchDirection;
+    int                         numberOfSearchCells;
+    vector< int >               searchCellIndex;
+
+    RDouble *minBoxOfZone;
+    RDouble *maxBoxOfZone;
+    RDouble **cellBox;
+
+    bool                        ifAuxiliaryGrid;
+private:
+    void ComputeGlobalBox(RDouble tolerance);
+    void ComputeCellBox(RDouble tolerance);
+public:
+    void EnlargeCellBox(const int &cellIndex, const RDouble &eps);
+    int  SearchNodeInKDTree(RDouble *nodeCoordinateIn);
+private:
+    void SearchNodeInKDTree(RDouble *nodeCoordinateIn, int rootIndexIn, int &donorCellIndexIn, int iLayerIn);
+private:
+    bool InCellCheck2D(RDouble *nodeCoordinateIn, int rootIndexIn, int &donorCellIndexIn);
+    bool InCellCheck3D(RDouble *nodeCoordinateIn, int rootIndexIn, int &donorCellIndexIn);
+private:
+    bool     In4PointsCell(const RDouble &x1, const RDouble &y1, const RDouble &z1,
+        const RDouble &x2, const RDouble &y2, const RDouble &z2,
+        const RDouble &x3, const RDouble &y3, const RDouble &z3,
+        const RDouble &x4, const RDouble &y4, const RDouble &z4,
+        RDouble *nodeCoordinateIn, const RDouble &eps);
+    RDouble ComputeVolumeBy4Ppoints(const RDouble &x1, const RDouble &y1, const RDouble &z1,
+        const RDouble &x2, const RDouble &y2, const RDouble &z2,
+        const RDouble &x3, const RDouble &y3, const RDouble &z3,
+        const RDouble &x4, const RDouble &y4, const RDouble &z4);
+private:
+    inline bool IfNodeIsInCellBox(RDouble *nodeCoordinateIn, int rootIndexIn)
+    {
+        for (int iDimension = 0; iDimension < geometricDimension; ++ iDimension)
+        {
+            RDouble &nodeCoordinateInThisDimension = nodeCoordinateIn[iDimension];
+            if (nodeCoordinateInThisDimension < cellBox[iDimension][rootIndexIn]) return false;
+            if (nodeCoordinateInThisDimension > cellBox[iDimension + geometricDimension][rootIndexIn]) return false;
+        }
+        return true;
+    }
+
+    inline bool IfInLeftHalfTree(RDouble *nodeCoordinateIn, int rootIndexIn, int iDirectionIn)
+    {
+        if (iDirectionIn < geometricDimension)
+        {
+            if (cellBox[iDirectionIn][rootIndexIn] > nodeCoordinateIn[iDirectionIn]) return true;
+        }
+        return false;
+    }
+
+    inline bool IfInRightHalfTree(RDouble *nodeCoordinateIn, int rootIndexIn, int iDirectionIn)
+    {
+        if (iDirectionIn >= geometricDimension)
+        {
+            if (cellBox[iDirectionIn][rootIndexIn] < nodeCoordinateIn[iDirectionIn - geometricDimension]) return true;
+        }
+        return false;
+    }
+};
+
+inline bool IfNodeIsInBox(RDouble *nodeCoordinateIn, RDouble *minBoxIn, RDouble *maxBoxIn, int geometricDimensionIn)
+{
+    for (int iDimension = 0; iDimension < geometricDimensionIn; ++ iDimension)
+    {
+        RDouble &nodeCoordinateInThisDimension = nodeCoordinateIn[iDimension];
+        if (nodeCoordinateInThisDimension < minBoxIn[iDimension]) return false;
+        if (nodeCoordinateInThisDimension > maxBoxIn[iDimension]) return false;
+    }
+    return true;
+};
+
+inline bool IfNodeIsInBox(vector< RDouble * > &nodeCoordinateIn, int nodeIndexIn, RDouble *minBoxIn, RDouble *maxBoxIn, int geometricDimensionIn)
+{
+    for (int iDimension = 0; iDimension < geometricDimensionIn; ++ iDimension)
+    {
+        RDouble &nodeCoordinateInThisDimension = nodeCoordinateIn[iDimension][nodeIndexIn];
+        if (nodeCoordinateInThisDimension < minBoxIn[iDimension]) return false;
+        if (nodeCoordinateInThisDimension > maxBoxIn[iDimension]) return false;
+    }
+    return true;
+};
+
+RDouble GetToleranceForOversetSearch();
+
+}
\ No newline at end of file
diff --git a/Mesh/include/UnstructuredOversetConfig.h b/Mesh/include/UnstructuredOversetConfig.h
new file mode 100644
index 0000000..04cd21b
--- /dev/null
+++ b/Mesh/include/UnstructuredOversetConfig.h
@@ -0,0 +1,622 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//! @file      UnstructuredOversetConfig.h
+//! @brief     Unstructured grid overset configuration.
+//! @author    Chang Xinhua, He Kun, Zhang Laiping.
+
+#pragma once
+#include "PHMpi.h"
+#include "OversetKDTree.h"
+using namespace std;
+
+namespace PHSPACE
+{
+class OversetConfigFactoryMulti;
+class OversetInformationProxy;
+class UnstructGrid;
+class OversetConfig;
+class InterCells;
+class ZoneSearchNodes;
+class Pre_WalldistCompute;
+class TimeSpan;
+
+void RunOversetGridConfig();
+
+void RunUnstructuredOversetGridConfig();    //! Perform an oversetConfig individually.
+
+void InitializeOversetGridConfig();
+
+void ReConfigUnstructOversetGrid();
+
+void OutUnstructOversetGridConfig();
+
+void FreeUnstructOversetGridConfig();
+
+OversetConfigFactoryMulti *GetOversetConfigFactoryMulti();
+
+class OversetConfigFactoryMulti    //! Call OversetConfig as a whole, and complete the information communication between each zone.
+{
+public:
+    OversetConfigFactoryMulti();
+    ~OversetConfigFactoryMulti();
+
+private:
+    int numberOfBlocks;    //! Number of overlapping grids.
+    int numberOfZones;     //! Total number of partitions in the grid.
+    OversetConfig **oversetConfigMultiZone;    //! Corresponding to each grid partition.
+    int geometricDimension;
+private:
+    ZoneSearchNodes **zonesSearchNodes;     //! Set of all calculate points.
+    InterCells **zonesInterpolateCells;    //! Set of all interpolation cells.
+    TimeSpan *testTime;
+
+private:
+    vector< UnstructGrid * > innerGrid;
+
+private:    //! This part of data is used to complete the attribute communication of the points on the interface.
+    vector< int > numberOfGlobalNodes;    //! Number of calculate points in the whole grid.
+    vector< vector< int > > keyActiveOfGlobalInterNodes;    //! Property of points on the interface.
+
+    int *numberOfInterfaceNodesInBlocks;
+    int **keyOfInterfaceNodesInBlocks;
+private:    //! Smallest box of each Block is used to improve the query efficiency.
+    RDouble **pMinOfBlocks;
+    RDouble **pMaxOfBlocks;
+
+public:
+    void Initialize();
+    void OversetConfigMulti();
+    void FreeKeyBasicActiveNodes();
+    void BuildNodesMinDistanceInOtherBlocks();
+    void BuildNodesMinDistanceInOtherBlocks2();
+    void BuildLocalToGlobalInterfaceNodesMaps();
+
+    void NodesOperator();
+    void CellsOperator();
+    void OutPutOversetFiles();
+    void OutPutOversetInformation();
+    void OutPutOversetVisualizations(const string &name);
+public:
+    RDouble **GetMinBoxOfBlocks() {
+        return this->pMinOfBlocks;
+    }
+    RDouble **GetMaxBoxOfBlocks() {
+        return this->pMaxOfBlocks;
+    }
+    InterCells **GetZonesInterpolateCells() {
+        return this->zonesInterpolateCells;
+    }
+    ZoneSearchNodes **GetZonesSearchNodes() {
+        return this->zonesSearchNodes;
+    }
+
+    int **GetKeyOfInterfaceNodesInBlocks() {
+        return this->keyOfInterfaceNodesInBlocks;
+    }
+
+private:    //! Initialize.
+    void BuildNodesMinDistanceInThisBlocks(vector< RDouble > *&wallNodeCoordinateXIn,
+        vector< RDouble > *&wallNodeCoordinateYIn,
+        vector< RDouble > *&wallNodeCoordinateZIn);
+    void ReadInInnerGrid();
+    void SetNodesMinDistanceInThisBlocksByWalldist();
+    void SetNodesMinDistanceInOtherBlocks();
+
+    bool ReadInInnerGridH5(const string &fileName, UnstructGrid *gridIn);
+    void BuildLocalToGlobalInterfaceNodesMap(int iBlockIn, int* numberOfNodesInBlocksIn);
+
+    void GetGlobalInterfaceNodes();
+    void GetGlobalInterfaceNodes(int iBlock);
+    void ComputeNodeWalldist();
+    void ComputeNodeWalldistInOtherBlock();
+    void ReComputeWallDistance();
+    void ComputeNodeAndCellTopology();
+
+private:    //! Core process: points.
+    void SetInitialValue();
+    void CalMinBoxForSearch();
+    void SetBufferRegionOnOversetBoundary();
+    void BuildKDTreesBySearchRegions();
+    void BuildNodesMinDistanceInOtherBlocksByKDTrees();
+    void SetActivePropertyForSearchRegions();
+    void SetSearchRegionByActivePropertys();
+    void BuildMinMaxBoxOfZoneBySearchRegions();
+    void BuildKDTreeByMinMaxBoxOfZones();
+    void BuildInBlockCellsAndNodesByInnerAuxiliaryGridKDTrees(vector< GridKDTree * > &innerAuxiliaryGridKDTreesIn);
+
+    void BuildMinMaxBoxOfBlocks();
+
+    void BuildZonesSearchNodes();
+    void SearchZonesSearchNodesInKDTrees();
+    void AllReduceNodesMinDistanceInOtherBlock();
+    void SetNodesMinDistanceInOtherBlockByZonesNodes();
+
+    void SpecifyInitialInterNodesByDistance();
+    void SpecifySpecicalCellsInteractWithWallBoundary();
+    void SpecifyCellsInBodyByAuxiliaryInnerGrid();
+    void FillTheActiveRegion();
+    void SetNodeCharacterOnPhysicalBoundary();
+    void SetNegativeForBufferRegion();
+    void InterFaceBoundaryOptimize();
+    void SetNegativeForInnerNodes();
+    void SetNegativeForInnerAndInitialInterNodes();
+private:    //! Core process: cells.
+    void FindActiveCells();
+    void FindInterCells();
+    void CreatGlobalInterCells();
+    void AllReduceZonesInterpolateCells();
+private:    //! Core process: cells.
+    void BuildInterpolateRelationships();
+    void FindInterpolateRelationships();
+
+private:    //! Check.
+    void CheckInterpolateRelationships();
+    bool CheckDonorZoneAndDonorCellServer();
+    void PrintCellInformation();
+
+private:    //! Communication of interface.
+    void CharacterNodeToCell();
+    void CharacterCellToNode();
+    int  CharacterNodeToValidNodeByCell();
+
+    void CommunicateNodePropertyByKeyOfInterfaceNodesInBlocks();
+    void CommunicateNodeCharacterOnInterface();
+    void CommunicateCellIBlank();
+
+private:    //! Reconstruction of interpolation information.
+    void ResetOversetInformation();
+    void GetInterAndDonorCellManagers();
+    void GetInterAndDonorCellManagersNew();
+    void GetNeighborZoneIndexContainerForTargetZone(int iZone, PHVectorInt1D &neighborZoneList);
+
+private:    //! Output file.
+    void OutKeyActive();
+    void OutPutTecplot();
+    void OutPutBoundaryCells();
+    void OutInterCellInformation();
+    void OutGlobalInterCells();
+    void OutGlobalNodes();
+
+public:
+    int GetNumberOfBlocks() {
+        return numberOfBlocks;
+    }
+
+    vector< UnstructGrid * > &GetInnerGrid() {
+        return innerGrid;
+    }
+};
+
+class ZoneSearchNodes
+{
+public:
+    ZoneSearchNodes(int numberOfSearchNodesIn, int blockIndexIn);
+    ~ZoneSearchNodes();
+
+private:
+    int numberOfNodes;
+    int blockIndex;
+
+    RDouble *x;
+    RDouble *y;
+    RDouble *z;
+
+    RDouble *nodesMinDistanceToOtherBlock;
+
+    RDouble *pMin;
+    RDouble *pMax;
+
+public:
+
+    void SetNumberOfNodes(int numberOfNodesIn) {
+        this->numberOfNodes = numberOfNodesIn;
+    }
+    void SetBlockIndex(int blockIndex) {
+        this->blockIndex = blockIndex;
+    }
+
+    int GetNumberOfNodes() {
+        return numberOfNodes;
+    }
+    int GetBlockIndex() {
+        return blockIndex;
+    }
+
+    RDouble *GetX() {
+        return x;
+    }
+    RDouble *GetY() {
+        return y;
+    }
+    RDouble *GetZ() {
+        return z;
+    }
+    RDouble *GetNodesMinDistanceToOtherBlock() {
+        return nodesMinDistanceToOtherBlock;
+    }
+
+    RDouble *GetPMin() {
+        return pMin;
+    }
+    RDouble *GetPMax() {
+        return pMax;
+    }
+};
+
+class InterCells
+{
+public:
+    InterCells(int numberOfInterpolateCellsIn, int blockIndexIn);
+    ~InterCells();
+
+private:
+    int numberOfInterCells;
+    int blockIndex;
+
+    int *donorZoneIndex;
+    int *donorCellIndex;
+
+    int *donorLevel;
+    RDouble *cellMinDistance;
+
+    RDouble *x;
+    RDouble *y;
+    RDouble *z;
+
+public:
+    void FreeUselessMemery();
+
+    int GetBlockIndex() {
+        return blockIndex;
+    }
+
+    int GetNumberOfInterCells() {
+        return numberOfInterCells;
+    }
+
+    int *GetDonorZoneIndex() {
+        return donorZoneIndex;
+    }
+    int *GetDonorCellIndex() {
+        return donorCellIndex;
+    }
+
+    RDouble *GetX() {
+        return x;
+    }
+    RDouble *GetY() {
+        return y;
+    }
+    RDouble *GetZ() {
+        return z;
+    }
+    RDouble *GetMinDist() {
+        return cellMinDistance;
+    }
+    int *GetKey() {
+        return donorLevel;
+    }
+
+    void SetCellCenterX(RDouble *xIn) {
+        this->x = xIn;
+    }
+    void SetCellCenterY(RDouble *yIn) {
+        this->y = yIn;
+    }
+    void SetCellCenterZ(RDouble *zIn) {
+        this->z = zIn;
+    }
+};
+
+class OversetConfig
+{
+    typedef void ( OversetConfig:: *BuildInBlockCellsAndNodesMethod )( vector< GridKDTree * > & );
+public:
+    OversetConfig();
+    ~OversetConfig();
+
+public:    //! Necessary global information.
+    int numberOfZones;
+    int blockIndex;
+    int zoneIndex;
+    int geometricDimension;
+
+    UnstructGrid *grid;
+
+    OversetInformationProxy *oversetInformationProxy;    //! Information of interpolation calculated.
+    BuildInBlockCellsAndNodesMethod buildInBlockCellsAndNodesMethod;
+
+public:    //! Improve efficiency of query.
+    GridKDTree *gridKDTree;
+    RDouble *minBoxOfZone;
+    RDouble *maxBoxOfZone;
+
+public:
+    int numberOfInterCells;
+
+    int *localToGlobalInterfaceNodesMap;
+    int *keyActiveOfNodes;
+
+    vector< int > interpolateCellList;
+
+    int *keyBufferOfNodes;
+
+    int *keyBufferOfCells;
+
+    int *keySearchOfNodes;    //! keySearch = 1��cells and points used for query.
+
+    int *keySearchOfCells;    //! keySearch = 0��points in the non overlapping areas (For example, point in the far field).
+
+    int *keyBasicActiveNodes;
+
+    //!the mark of the node which is inside of the body of other block
+    //!0 - outside
+    //!1 - inside
+    int *keyInBlockNodes;
+
+    RDouble *nodesMinDistanceInThisBlock;
+
+    RDouble *nodesMinDistanceInOtherBlock;
+
+public:
+    vector< RDouble > nodeWalldistDistance;
+
+public:    //! Boundary condition.
+    vector< int > interfaceBoundaryNodeList;
+    vector< int > physicalBoundaryNodeList;
+    vector< int > innerBoundaryNodeList;
+
+    vector< int > localToGlobalInterNodesIndex;    //! From local interNode to global interNode.
+    vector< int > localToGlobalNodesIndex;         //! From local interNode to global Node.
+public:
+    void BuildBoundaryNodeList(vector< RDouble > &wallNodeCoordinateXIn,
+        vector< RDouble > &wallNodeCoordinateYIn,
+        vector< RDouble > &wallNodeCoordinateZIn);
+    void BuildNodesMinDistanceInThisBlock(vector< RDouble > *wallNodeCoordinateXInBlocksIn,
+        vector< RDouble > *wallNodeCoordinateYInBlocksIn,
+        vector< RDouble > *wallNodeCoordinateZInBlocksIn);
+
+    void BuildBoundaryNodeList();
+    void SetNodesMinDistanceInThisBlocksByWalldist();
+    void SetNodesMinDistanceInOtherBlocks();
+
+public:    //! Initialize.
+    void Initialize(UnstructGrid *gridIn, int nZone, int iZone, int iBlock);
+    void SetInitialValue();
+    void FreeKeyBasicActiveNode();
+    void FreeKeyInBlockNodes();
+    void SetInitialValueForBufferRigion();
+    void SetKeyBufferByKeyActive();
+
+public:    //! Core operations: points.
+    void ComputeNodeAndCellTopology();
+    void CopyMinDist(RDouble *nodesMinDistanceInOtherBlockIn);
+    void BuildKDTreeByMinMaxBoxOfZone();
+    void SearchZonesSearchNodesInKDTree();
+
+    RDouble ComputeDistanceInDonorZone(RDouble *nodeCoordinateIn, int donorCell);
+    void SpecifyInitialInterNodesByDistance();
+    void SpecifySpecicalCellsInteractWithWallBoundary();
+    void SetNegativeForBufferRegion();
+    void SetNegativeForInnerNodes();
+    void SetNegativeForInnerAndInitialInterNodes();
+    void SetNodeCharacterOnPhysicalBoundary();
+    void FillTheRemainingNodes();
+
+public:    //! Core operations: globalNodes.
+    void BuildMinMaxBoxOfZone();
+
+public:    //! Core operations: points.
+    void SetActivePropertyForSearchRegion();
+    void SetSearchRegionByActiveProperty();
+    void BuildMinMaxBoxOfZoneBySearchRegion();
+
+public:    //! Core operations: cells.
+    void FindActiveCells();
+    void FindInterCells();
+    int  FindDonorCell(RDouble *nodeCoordinateIn);
+    void FindInterpolateRelationship();
+    void CheckInterpolateRelationship(int iBlockIn,
+        InterCells *zoneInterpolateCellsIn,
+        int &numberOfInterpolateCellsInThisBlockIn,
+        int &numberOfNegativeCellsInThisBlock_1In,
+        int &numberOfNegativeCellsInThisBlock_2In,
+        int &numberOfNegativeCellsInThisBlock_3In);
+
+public:    //! Reconstruction of interpolation information.
+    void InitializeOversetInformation();
+    void PostProcessOversetInformation();
+
+public:    //! Communication.
+    void MarkGlobalInterfaceNodes(int iBlock, vector< int > &keyNodesGlobal);
+    void CalLocalToGlobalInterfaceNodes(int iBlock, vector< int > &keyNodesGlobal);
+
+    void CharacterNodeToCell();
+    void CharacterCellToNode();
+    void CharacterInterfaceToNode();
+    int  CharacterNodeToValidNodeByCell();
+    void UpdateInterfaceNodeCharacter();
+    void DownInterfaceNodeCharacter();
+
+public:
+    void BuildInBlockCellsAndNodesByInnerAuxiliaryGridKDTree(vector< GridKDTree * > &innerAuxiliaryGridKDTreesIn);
+
+public:    //! Check&Output.
+    void OutPutOversetVisualization(const string &name);
+    void OutPutOversetVisualizationHeader(fstream &file);
+    void OutPutOversetVisualizationCell(fstream &file);
+    void OutPutOversetVisualizationPoint(fstream &file);
+    void OutPutOversetVisualizationTail(fstream &file);
+    void ShowGrid();
+    void ShowBoundaryCells();
+    void PrintGridByOverSetConditionPoint(fstream &file, int key);
+    void PrintGridByOverSetConditionCell(fstream &file, int key);
+    void OutKeyBuffer();
+    void OutKeyActive();
+    void OutputLocalNodeWalldistance();
+
+    inline bool IfZoneSearchNodesIntersectionWithThisZone(RDouble *minBoxOfZoneSearchNodesIn, RDouble *maxBoxOfZoneSearchNodesIn)
+    {
+        for (int iDimension = 0; iDimension < geometricDimension; ++ iDimension)
+        {
+            if (maxBoxOfZoneSearchNodesIn[iDimension] < minBoxOfZone[iDimension]) return false;
+            if (minBoxOfZoneSearchNodesIn[iDimension] > maxBoxOfZone[iDimension]) return false;
+        }
+        return true;
+    }
+
+public:
+    int *GetKeyActiveOfNodes()
+    {
+        return keyActiveOfNodes;
+    }
+    int *GetKeyActiveOfCells();
+    int *GetKeyBufferOfCells()
+    {
+        return keyBufferOfCells;
+    }
+    int *GetKeyBufferOfNodes()
+    {
+        return keyBufferOfNodes;
+    }
+    int *GetKeySearchOfCells()
+    {
+        return keySearchOfCells;
+    }
+    int *GetKeySearchOfNodes()
+    {
+        return keySearchOfNodes;
+    }
+
+    vector< int > &GetInterfaceBoundaryNodeList()
+    {
+        return interfaceBoundaryNodeList;
+    }
+
+    int *GetLocalToGlobalInterfaceNodesMap()
+    {
+        return localToGlobalInterfaceNodesMap;
+    }
+
+    RDouble *GetPMin()
+    {
+        return minBoxOfZone;
+    }
+    RDouble *GetPMax()
+    {
+        return maxBoxOfZone;
+    }
+    RDouble *GetNodeWalldistDistance()
+    {
+        return nodesMinDistanceInOtherBlock;
+    }
+    int GetBlockIndex() {
+        return blockIndex;
+    }
+    int GetNumberOfInterCells()
+    {
+        return numberOfInterCells;
+    }
+    //vector< int > &GetInterCellIndex() { return interpolateCellList; }
+    vector< int > &GetInterpolateCellList()
+    {
+        return this->interpolateCellList;
+    }
+
+    OversetInformationProxy *GetOversetInformationProxy()
+    {
+        return oversetInformationProxy;
+    }
+    UnstructGrid *GetGrid()
+    {
+        return grid;
+    }
+private:
+    inline void OutPutValueName(fstream &file, const string &name)
+    {
+        file << "# " << name << endl;
+    }
+
+    inline void OutPutNullValue(fstream &file, int length)
+    {
+        int numberOfWordsInEachLine = 5;
+        int iPrint = 0;
+        for (int iValue = 0; iValue < length; ++ iValue)
+        {
+            file << 0 << " ";
+            ++ iPrint;
+            if (iPrint % numberOfWordsInEachLine == 0) file << endl;
+        }
+        if (iPrint % numberOfWordsInEachLine != 0) file << endl;
+        file << endl;
+    }
+
+    inline void OutPutVectorValue(fstream &file, int length, vector< int > &value)
+    {
+        bool *valueFull = new bool[length];
+        SetField(valueFull, false, length);
+        int numberOfValue = static_cast<int>(value.size());
+        for (int iValue = 0; iValue < numberOfValue; ++ iValue)
+        {
+            valueFull[value[iValue]] = true;
+        }
+
+        int numberOfWordsInEachLine = 5;
+        int iPrint = 0;
+        for (int iValue = 0; iValue < length; ++ iValue)
+        {
+            file << valueFull[iValue] << " ";
+            ++ iPrint;
+            if (iPrint % numberOfWordsInEachLine == 0) file << endl;
+        }
+        if (iPrint % numberOfWordsInEachLine != 0) file << endl;
+        file << endl;
+
+        delete[] valueFull;
+    }
+
+    template < typename T >
+    inline void OutPutPointerValue(fstream &file, int length, T *value)
+    {
+        if (NULL == value)
+        {
+            OutPutNullValue(file, length);
+        }
+        else
+        {
+            int numberOfWordsInEachLine = 5;
+            int iPrint = 0;
+            for (int iValue = 0; iValue < length; ++ iValue)
+            {
+                file << value[iValue] << " ";
+                ++ iPrint;
+                if (iPrint % numberOfWordsInEachLine == 0) file << endl;
+            }
+            if (iPrint % numberOfWordsInEachLine != 0) file << endl;
+            file << endl;
+        }
+    }
+};
+
+RDouble GetToleranceForOversetBox();
+int GetTwoOrderInterpolationOrNot();
+int GetKeyEnlargeOfNodes();
+int GetReadInAuxiliaryInnerGrid();
+int GetReadInAuxiliaryOuterGrid();
+int GetReadInSklFileOrNot();
+int GetSymetryOrNot();
+int GetIfOutPutOversetVisualization();
+
+template< typename T >
+void PH_AllreduceSepModeForVector(vector< T > &sendingBuffer, vector< T > &receivingBuffer, int numberOfElements, MPI_Datatype mpiDataType, PH_Op op);
+
+}
\ No newline at end of file
diff --git a/Mesh/src/ComputationalGrid.cpp b/Mesh/src/ComputationalGrid.cpp
new file mode 100644
index 0000000..2324574
--- /dev/null
+++ b/Mesh/src/ComputationalGrid.cpp
@@ -0,0 +1,1496 @@
+#include "ComputationalGrid.h"
+#include "IO_FileName.h"
+#include "Glb_Dimension.h"
+#include "TK_Log.h"
+#include "InterfaceLinkStructure.h"
+using namespace std;
+
+namespace PHSPACE
+{
+ZoneInterface::ZoneInterface()
+{
+    pmin = 0;
+    pmax = 0;
+    x    = 0;
+    y    = 0;
+    z    = 0;
+    zoneIndex = 0;
+    numberOfNodes = 0;
+    disMin = 0.0;
+    disMax = 0.0;
+}
+
+ZoneInterface::~ZoneInterface()
+{
+    delete [] pmin;
+    delete [] pmax;
+    delete [] x;
+    delete [] y;
+    delete [] z;
+}
+
+void ZoneInterface::Encode(DataContainer *&dataContainer)
+{
+    dataContainer->moveto_begin();
+
+    int zoneIndex = this->GetZoneIndex();
+    PHWrite(dataContainer, zoneIndex);
+
+    int dimension = 3;
+    RDouble *minBox = this->GetMinBox();
+    RDouble *maxBox = this->GetMaxBox();
+    PHWrite(dataContainer, minBox, dimension);
+    PHWrite(dataContainer, maxBox, dimension);
+    PHWrite(dataContainer, disMin);
+    PHWrite(dataContainer, disMax);
+
+    int numberOfNodes = this->GetNumberOfNodes();
+    RDouble *x = this->GetX();
+    RDouble *y = this->GetY();
+    RDouble *z = this->GetZ();
+    PHWrite(dataContainer, numberOfNodes);
+    PHWrite(dataContainer, x, numberOfNodes);
+    PHWrite(dataContainer, y, numberOfNodes);
+    PHWrite(dataContainer, z, numberOfNodes);
+
+    uint_t numberOfFaces = this->GetNumberOfFaces();
+    PHVectorInt2D &faceNodeIndexContainer = this->GetFaceNodeIndexContainer();
+    PHWrite(dataContainer, numberOfFaces);
+    PHWrite(dataContainer, faceNodeIndexContainer, numberOfFaces);
+}
+
+void ZoneInterface::Decode(DataContainer *&dataContainer)
+{
+    dataContainer->moveto_begin();
+
+    int zoneIndex;
+    PHRead(dataContainer, zoneIndex);
+    this->SetZoneIndex(zoneIndex);
+
+    int dimension = 3;
+    RDouble *minBox = new RDouble [dimension];
+    RDouble *maxBox = new RDouble [dimension];
+    PHRead(dataContainer, minBox, dimension);
+    PHRead(dataContainer, maxBox, dimension);
+    PHRead(dataContainer, disMin);
+    PHRead(dataContainer, disMax);
+    this->SetMinBox(minBox);
+    this->SetMaxBox(maxBox);
+
+    int numberOfNodes;
+    PHRead(dataContainer, numberOfNodes);
+
+    RDouble *x = new RDouble [numberOfNodes];
+    RDouble *y = new RDouble [numberOfNodes];
+    RDouble *z = new RDouble [numberOfNodes];
+    PHRead(dataContainer, x, numberOfNodes);
+    PHRead(dataContainer, y, numberOfNodes);
+    PHRead(dataContainer, z, numberOfNodes);
+    this->SetNumberOfNodes(numberOfNodes);
+    this->SetX(x);
+    this->SetY(y);
+    this->SetZ(z);
+
+    uint_t numberOfFaces;
+    PHRead(dataContainer, numberOfFaces);
+
+    PHVectorInt2D &faceNodeIndexContainer = this->GetFaceNodeIndexContainer();
+    faceNodeIndexContainer.resize(numberOfFaces);
+    PHRead(dataContainer, faceNodeIndexContainer, numberOfFaces);
+}
+
+ComputationalGridProcess::ComputationalGridProcess(Region *region)
+{
+    this->region = region;
+
+    interfaceLinkStructure = 0;
+}
+
+ComputationalGridProcess::~ComputationalGridProcess()
+{
+    delete interfaceLinkStructure;
+}
+
+void ComputationalGridProcess::Initialize(Grid **gridContainer, int nZones)
+{
+    this->numberOfZones = nZones;
+    this->gridContainer = gridContainer;
+
+    boundaryTypeVectorList.resize(nZones);
+    boundaryNameVectorList.resize(nZones);
+    newLocalInterfaceIndexToGlobalInterfaceIndexMappingList.resize(nZones);
+    faceNodeIndexVectorList.resize(nZones);
+    newBoundaryLeftCellIndexList.resize(nZones);
+    newLeftCellIndexVectorList.resize(nZones);
+    newRightCellIndexVectorList.resize(nZones);
+    zoneInterfacesTopologyList.resize(nZones);
+}
+
+void ComputationalGridProcess::PostProcessMultiZoneComputationalGrids()
+{
+    WriteLogFile("Start Generating Global Interface Link!");
+
+    CreateNeighborZoneInterfacesTopology();
+
+    CreateInterfaceLinkStructure();
+
+    PreprocessBoundaryCondition();
+
+    GenerateLocalGlobalInterfaceMappingByNeighborZones();
+
+    ReconstructInterfaceTopology();
+
+    ReGenerateLocalGlobalInterfaceMapping();
+
+    MatchInterfaceTopology();
+
+    PHSPACE::WriteLogFile("End Generating Global Interface Link!");
+}
+
+void ComputationalGridProcess::CreateInterfaceLinkStructure()
+{
+    RDouble mindis, maxdis, pmin[3], pmax[3];
+
+    GetNeighborZoneBoundingBox(pmin, pmax);
+    GetNeighborZoneMinMaxDistance(mindis, maxdis);
+
+    PrintToWindow(" mindis = ", mindis, "\n");
+
+    if (GetDim() == TWO_D)
+    {
+        pmin[ 2 ] -= mindis;
+        pmax[ 2 ] += maxdis;
+    }
+
+    vector< ZoneInterface * > &neighborZoneInterfaces = this->GetNeighborZoneInterfaces();
+    int maxNumberOfNeighborZones = 0;
+    for (std::size_t iZone = 0; iZone < neighborZoneInterfaces.size(); ++ iZone)
+    {
+        int zoneNumber = neighborZoneInterfaces[iZone]->GetZoneIndex();
+        maxNumberOfNeighborZones = MAX(maxNumberOfNeighborZones, zoneNumber);
+    }
+
+    interfaceLinkStructure = new InterfaceLinkStructure(pmin, pmax, mindis / 5, maxNumberOfNeighborZones + 1);
+}
+
+void ComputationalGridProcess::PreprocessBoundaryCondition()
+{
+    ChangeBoundaryConditionTypeIfNeeded();
+}
+
+void ComputationalGridProcess::ChangeBoundaryConditionTypeIfNeeded()
+{
+    int ignoreNoBoundaryCondition = GlobalDataBase::GetIntParaFromDB("omit_no_bound_bc");
+
+    if (ignoreNoBoundaryCondition == 1)
+    {
+        return;
+    }
+
+    Grid **gridContainer = this->GetGridContainer();
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        Grid *grid = gridContainer[iZone];
+        grid->ChangeBCType(PHENGLEI::NO_BOUNDARY_CONDITION, PHENGLEI::INTERFACE);
+    }
+}
+
+void ComputationalGridProcess::GenerateLocalGlobalInterfaceMappingByNeighborZones()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridContainer[iZone]);
+
+        currentZoneID = iZone;
+        currentGrid   = grid;
+
+        this->CreateInterfaceInformation();
+    }
+
+    uint_t numberOfNeighborZone = this->neighborZoneInterfaces.size();
+    for (int iZone = 0; iZone < numberOfNeighborZone; ++ iZone)
+    {
+        this->GenerateLocalGlobalInterfaceMappingByNeighborZones(iZone);
+    }
+}
+
+void ComputationalGridProcess::CreateInterfaceInformation()
+{
+    UnstructGrid *unstructuredGrid = currentGrid;
+
+    int numberOfBoundaryFaces = unstructuredGrid->GetNBoundFace();
+   
+    UnstructBCSet *unstructBCSet = unstructuredGrid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    InterfaceInfo *interfaceInformation = 0;
+    int numberOfInterfaces = 0;
+    for (int iFace = 0; iFace < numberOfBoundaryFaces; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet ->GetBCRegion(bcRegionIDofBCFace[iFace]);
+
+        int boundaryConditionType = bcRegion->GetBCType();
+        if(boundaryConditionType == PHENGLEI::INTERFACE || boundaryConditionType < 0)
+        {
+            ++ numberOfInterfaces;
+        }
+    }
+    if (numberOfInterfaces == 0)
+    {
+        unstructuredGrid->SetInterfaceInfo(interfaceInformation);
+        return;
+    }
+
+    interfaceInformation = new InterfaceInfo(numberOfInterfaces);
+    unstructuredGrid->SetInterfaceInfo(interfaceInformation);
+
+    CreateLocalInterfaceToBoundaryFaceIndexesMapping();
+}
+
+void ComputationalGridProcess::CreateLocalInterfaceToBoundaryFaceIndexesMapping()
+{
+    UnstructGrid *unstructuredGrid = currentGrid;
+
+    InterfaceInfo *interfaceInformation = unstructuredGrid->GetInterfaceInfo();
+    if (! interfaceInformation) return;
+
+    UnstructBCSet *unstructBCSet = unstructuredGrid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    int *localInterfaceToBoundaryFaceIndexesMapping = interfaceInformation->GetInterFace2BoundaryFace();
+    int numberOfBoundaryFaces = unstructuredGrid->GetNBoundFace();
+
+    int iLocalInterfaceCount  = 0;
+    for (int iBoundaryFace = 0; iBoundaryFace < numberOfBoundaryFaces; ++ iBoundaryFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet ->GetBCRegion(bcRegionIDofBCFace[iBoundaryFace]);
+        int boundaryConditionType = bcRegion->GetBCType();
+        if (!IsInterface(boundaryConditionType))
+        {
+            continue;
+        }
+
+        localInterfaceToBoundaryFaceIndexesMapping[iLocalInterfaceCount] = iBoundaryFace;
+        ++ iLocalInterfaceCount;
+    }
+}
+
+void ComputationalGridProcess::GenerateLocalGlobalInterfaceMappingByNeighborZones(int iZone)
+{
+    InterfaceLinkStructure *interfaceLinkStructure = this->GetInterfaceLinkStructure();
+
+    vector< ZoneInterface * > &neighborZoneInterfaces = this->GetNeighborZoneInterfaces();
+    ZoneInterface *zoneInterfacesTopology = neighborZoneInterfaces[iZone];
+    int zoneIndex = zoneInterfacesTopology->GetZoneIndex();
+
+    interfaceLinkStructure->InitializeInterface(zoneInterfacesTopology);
+
+    RDouble *x = zoneInterfacesTopology->GetX();
+    RDouble *y = zoneInterfacesTopology->GetY();
+    RDouble *z = zoneInterfacesTopology->GetZ();
+
+    PHVectorInt2D &faceNodeIndexContainer = zoneInterfacesTopology->GetFaceNodeIndexContainer();
+    
+    uint_t numberOfInterfaces = zoneInterfacesTopology->GetNumberOfFaces();
+
+    if (numberOfInterfaces == 0) 
+    {
+        return;
+    }
+
+    int maxNumberOfFaceNodes = -1;
+    for (int iFace = 0; iFace < numberOfInterfaces; ++ iFace)
+    {
+        maxNumberOfFaceNodes = MAX(maxNumberOfFaceNodes, (int)faceNodeIndexContainer[iFace].size());
+    }
+
+    RDouble *xList = new RDouble[maxNumberOfFaceNodes];
+    RDouble *yList = new RDouble[maxNumberOfFaceNodes];
+    RDouble *zList = new RDouble[maxNumberOfFaceNodes];
+
+    PHVectorInt1D facePointIndexes;
+    PHVectorInt1D faceNodeIndexes(maxNumberOfFaceNodes);
+
+    int iLocalInterfaceCount = 0;
+    int pointCount = interfaceLinkStructure->GetNumberOfInterfacePoints();
+
+    for (int iFace = 0; iFace < numberOfInterfaces; ++ iFace)
+    {
+        int faceNodeNumber = static_cast<int>(faceNodeIndexContainer[iFace].size());
+
+        for (int iNode = 0; iNode < faceNodeNumber; ++ iNode)
+        {
+            faceNodeIndexes[iNode] = faceNodeIndexContainer[iFace][iNode];
+        }
+        facePointIndexes.resize(faceNodeNumber);
+
+        GetFaceCoordinateList(faceNodeIndexes, faceNodeNumber, xList, yList, zList, x, y, z);
+        GetCoordinateIndexList(interfaceLinkStructure, pointCount, xList, yList, zList, faceNodeNumber, facePointIndexes);
+        CreateLinkInformation(facePointIndexes, zoneIndex, iLocalInterfaceCount, interfaceLinkStructure);
+
+        ++ iLocalInterfaceCount;
+    }
+
+    delete [] xList;
+    delete [] yList;
+    delete [] zList;
+}
+
+void ComputationalGridProcess::ReGenerateLocalGlobalInterfaceMapping()
+{
+    WriteLogFile("Start ReGenerateLocalGlobalInterfaceMapping");
+
+    InterfaceLinkStructure *interfaceLinkStructure = this->GetInterfaceLinkStructure();
+    Grid **gridContainer = this->GetGridContainer();
+    InitializeNewLocalGlobalInterfaceMapping();
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridContainer[iZone]);
+
+        currentZoneID = iZone;
+        currentGrid   = grid;
+
+        ReGenerateLocalGlobalInterfaceMapping(interfaceLinkStructure);
+    }
+
+    UpdateLocalGlobalInterfaceMapping();
+    UpdateOtherTopologyTerm();
+}
+
+void ComputationalGridProcess::ReGenerateLocalGlobalInterfaceMapping(InterfaceLinkStructure *interfaceLinkStructure)
+{
+    UnstructGrid *unstructuredGrid = currentGrid;
+
+    if (!ExistInterfaces(unstructuredGrid))
+    {
+        return;
+    }
+
+    ModifyFaceNodesIndexes(interfaceLinkStructure);
+    ModifyBoundaryInformation(interfaceLinkStructure);
+}
+
+void ComputationalGridProcess::ModifyBoundaryInformation(InterfaceLinkStructure *interfaceLinkStructure)
+{
+    UnstructGrid *unstructuredGrid = currentGrid;
+
+    FaceSearchingManager *faceSearchingManager = interfaceLinkStructure->GetFaceSearchingManager();
+    
+    PHVectorInt2D &globalChildFaceIndexes = faceSearchingManager->GetGlobalChildFaceIndexes();
+    PHVectorInt2D &localInterfaceIndexToGlobalInterfaceIndexMapping = interfaceLinkStructure->GetLocalInterfaceIndexToGlobalInterfaceIndexMapping();
+
+    int numberOfBoundaryFaces = unstructuredGrid->GetNBoundFace();
+    int localInterfaceIndex = 0;
+
+    PHVectorInt1D localInterfaceIndexToBoundaryFaceIndexMapping;
+
+    UnstructBCSet *unstructBCSet = unstructuredGrid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    for (int iFace = 0; iFace < numberOfBoundaryFaces; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet ->GetBCRegion(bcRegionIDofBCFace[iFace]);
+
+        int boundaryConditionType = bcRegion->GetBCType();
+        if (IsInterface(boundaryConditionType))
+        {
+            localInterfaceIndexToBoundaryFaceIndexMapping.push_back(iFace);
+            ++ localInterfaceIndex;
+        }
+    }
+
+    int zoneIndex = unstructuredGrid->GetZoneID();
+    uint_t numberOfInterfaces = localInterfaceIndexToBoundaryFaceIndexMapping.size();
+    uint_t newNumberOfInterfaces = numberOfInterfaces;
+
+    PHVectorInt1D &newLocalInterfaceIndexToGlobalInterfaceIndexMapping = this->newLocalInterfaceIndexToGlobalInterfaceIndexMappingList[currentZoneID];
+
+    PHVectorInt1D numberOfChildFacesOfInterface;
+    numberOfChildFacesOfInterface.resize(numberOfInterfaces);
+    ZeroField(numberOfChildFacesOfInterface, numberOfInterfaces);
+
+    for (int interfaceIndex = 0; interfaceIndex < numberOfInterfaces; ++ interfaceIndex)
+    {
+        int globalInterfaceIndex  = localInterfaceIndexToGlobalInterfaceIndexMapping[zoneIndex][interfaceIndex];
+        uint_t numberOfChildFaces = globalChildFaceIndexes[globalInterfaceIndex].size();
+
+        if (numberOfChildFaces > 0)
+        {
+            numberOfChildFacesOfInterface[interfaceIndex] = static_cast<int>(numberOfChildFaces);
+            for (int iChildFace = 0; iChildFace < numberOfChildFaces; ++ iChildFace)
+            {
+                int childFaceIndex = globalChildFaceIndexes[globalInterfaceIndex][iChildFace];
+                newLocalInterfaceIndexToGlobalInterfaceIndexMapping.push_back(childFaceIndex);
+                numberOfChildFacesOfInterface.push_back(0);
+            }
+            ++ newNumberOfInterfaces;
+        }
+        else
+        {
+            newLocalInterfaceIndexToGlobalInterfaceIndexMapping.push_back(globalInterfaceIndex);
+        }
+    }
+
+    ResetNumberOfBoundaryCondition(interfaceLinkStructure, numberOfChildFacesOfInterface);
+}
+
+void ComputationalGridProcess::ResetNumberOfBoundaryCondition(InterfaceLinkStructure *interfaceLinkStructure, PHVectorInt1D &numberOfChildFacesOfInterface)
+{
+    UnstructGrid *unstructuredGrid = currentGrid;
+
+    UnstructBCSet *unstructBCSet = unstructuredGrid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    int numberOfBoundaryFaces = unstructuredGrid->GetNBoundFace();
+
+    PHVectorInt1D &boundaryTypeVector = boundaryTypeVectorList[currentZoneID];
+    vector< string > &boundaryNameVector = boundaryNameVectorList[currentZoneID];
+
+    boundaryTypeVector.resize(0);
+    boundaryNameVector.resize(0);
+
+    int localInterfaceIndex = 0;
+    for (int iFace = 0; iFace < numberOfBoundaryFaces; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet ->GetBCRegion(bcRegionIDofBCFace[iFace]);
+
+        int boundaryConditionType = bcRegion->GetBCType();
+        string bcName = bcRegion->GetBCName();
+        if (IsInterface(boundaryConditionType))
+        {
+            int numberOfChildFaces = numberOfChildFacesOfInterface[localInterfaceIndex];
+
+            if (numberOfChildFaces > 0)
+            {
+                for (int iChildFace = 0; iChildFace < numberOfChildFaces; ++ iChildFace)
+                {
+                    boundaryTypeVector.push_back(boundaryConditionType);
+                    boundaryNameVector.push_back(bcName);
+                }
+            }
+            else
+            {
+                boundaryTypeVector.push_back(boundaryConditionType);
+                boundaryNameVector.push_back(bcName);
+            }
+
+            ++ localInterfaceIndex;
+        }
+        else
+        {
+            boundaryTypeVector.push_back(boundaryConditionType);
+            boundaryNameVector.push_back(bcName);
+        }
+    }
+
+    DoFurtherWorkUsingBoundaryTypeVector(interfaceLinkStructure);
+}
+
+void ComputationalGridProcess::DoFurtherWorkUsingBoundaryTypeVector(InterfaceLinkStructure *interfaceLinkStructure)
+{
+    UnstructGrid *unstructuredGrid = currentGrid;
+
+    PHVectorInt2D &localInterfaceIndexToGlobalInterfaceIndexMapping = interfaceLinkStructure->GetLocalInterfaceIndexToGlobalInterfaceIndexMapping();
+    PHVectorInt1D &newLocalInterfaceIndexToGlobalInterfaceIndexMapping = this->newLocalInterfaceIndexToGlobalInterfaceIndexMappingList[currentZoneID];
+
+    int zoneIndex = unstructuredGrid->GetZoneID();
+    localInterfaceIndexToGlobalInterfaceIndexMapping[zoneIndex] = newLocalInterfaceIndexToGlobalInterfaceIndexMapping;
+
+    ProcessGlobalToLocalInterfaceTerm(interfaceLinkStructure);
+}
+
+void ComputationalGridProcess::ProcessGlobalToLocalInterfaceTerm(InterfaceLinkStructure *interfaceLinkStructure)
+{
+    UnstructGrid *unstructuredGrid = currentGrid;
+
+    PHVectorInt2D &localInterfaceIndexToGlobalInterfaceIndexMapping = interfaceLinkStructure->GetLocalInterfaceIndexToGlobalInterfaceIndexMapping();
+    PHVectorInt1D &newLocalInterfaceIndexToGlobalInterfaceIndexMapping = this->newLocalInterfaceIndexToGlobalInterfaceIndexMappingList[currentZoneID];
+
+    PHVectorInt1D tmp = newLocalInterfaceIndexToGlobalInterfaceIndexMapping;
+    sort(tmp.begin(), tmp.end());
+
+    int zoneIndex = unstructuredGrid->GetZoneID();
+    localInterfaceIndexToGlobalInterfaceIndexMapping[zoneIndex] = newLocalInterfaceIndexToGlobalInterfaceIndexMapping;
+
+    uint_t numberOfNewInterfaces = newLocalInterfaceIndexToGlobalInterfaceIndexMapping.size();
+
+    PHVectorInt2D &newGlobalInterfaceIndexToZoneIndexesMapping = interfaceLinkStructure->GetNewGlobalInterfaceIndexToZoneIndexesMapping();
+    PHVectorInt2D &newGlobalInterfaceIndexToLocalInterfaceIndexesMapping = interfaceLinkStructure->GetNewGlobalInterfaceIndexToLocalInterfaceIndexesMapping();
+
+    for (int localInterfaceIndex = 0; localInterfaceIndex < numberOfNewInterfaces; ++ localInterfaceIndex)
+    {
+        int globalInterfaceIndex = newLocalInterfaceIndexToGlobalInterfaceIndexMapping[localInterfaceIndex];
+
+        int currentSize = static_cast<int>(newGlobalInterfaceIndexToZoneIndexesMapping.size());
+        currentSize = MAX(globalInterfaceIndex + 1, currentSize);
+
+        newGlobalInterfaceIndexToZoneIndexesMapping.resize(currentSize);
+        newGlobalInterfaceIndexToLocalInterfaceIndexesMapping.resize(currentSize);
+
+        uint_t numberOfFaceZone = newGlobalInterfaceIndexToZoneIndexesMapping[globalInterfaceIndex].size();
+        if (numberOfFaceZone < 2)
+        {
+            newGlobalInterfaceIndexToZoneIndexesMapping[globalInterfaceIndex].push_back(zoneIndex);
+            newGlobalInterfaceIndexToLocalInterfaceIndexesMapping[globalInterfaceIndex].push_back(localInterfaceIndex);
+        }
+    }
+}
+
+void ComputationalGridProcess::ModifyFaceNodesIndexes(InterfaceLinkStructure *interfaceLinkStructure)
+{
+    UnstructGrid *unstructuredGrid = currentGrid;
+
+    int numberOfFaces = unstructuredGrid->GetNTotalFace();
+
+    int *faceNodeNumberContainer = unstructuredGrid->GetNodeNumberOfEachFace();
+    int *faceNodeIndexContainer  = unstructuredGrid->GetFace2Node();
+
+    PHVectorInt2D &faceNodeIndexVector = this->faceNodeIndexVectorList[currentZoneID];
+
+    int numberOfBoundaryFaces = unstructuredGrid->GetNBoundFace();
+
+    int iCount = 0;
+    for (int iFace = 0; iFace < numberOfBoundaryFaces; ++ iFace)
+    {
+        int numberOfFaceNodes = faceNodeNumberContainer[iFace];
+        iCount += numberOfFaceNodes;
+    }
+
+    int innerFaceStartPosition = iCount;
+
+    SetBoundaryFaceNodeIndexVector(interfaceLinkStructure);
+    SetNewFaceToCellIndexesContainer(interfaceLinkStructure);
+
+    for (int iFace = numberOfBoundaryFaces; iFace < numberOfFaces; ++ iFace)
+    {
+        int numberOfFaceNodes = faceNodeNumberContainer[iFace];
+        PHVectorInt1D tmpVector;
+        for (int iNode = 0; iNode < numberOfFaceNodes; ++ iNode)
+        {
+            int nodeIndex = faceNodeIndexContainer[innerFaceStartPosition ++];
+            tmpVector.push_back(nodeIndex);
+        }
+        faceNodeIndexVector.push_back(tmpVector);
+    }
+}
+
+void ComputationalGridProcess::SetNewFaceToCellIndexesContainer(InterfaceLinkStructure *interfaceLinkStructure)
+{
+    UnstructGrid *unstructuredGrid = currentGrid;
+
+    int numberOfBoundaryFaces = unstructuredGrid->GetNBoundFace();
+
+    PHVectorInt1D &newLeftCellIndexVector  = this->newLeftCellIndexVectorList[currentZoneID];
+    PHVectorInt1D &newRightCellIndexVector = this->newRightCellIndexVectorList[currentZoneID];
+
+    int *leftCellIndexContainer  = unstructuredGrid->GetLeftCellOfFace();
+    int *rightCellIndexContainer = unstructuredGrid->GetRightCellOfFace();
+
+    FaceSearchingManager *faceSearchingManager = interfaceLinkStructure->GetFaceSearchingManager();
+    PHVectorInt2D &globalChildFaceIndexes = faceSearchingManager->GetGlobalChildFaceIndexes();
+    PHVectorInt2D &localInterfaceIndexToGlobalInterfaceIndexMapping = interfaceLinkStructure->GetLocalInterfaceIndexToGlobalInterfaceIndexMapping();
+
+    int zoneIndex = unstructuredGrid->GetZoneID();
+
+    int localInterfaceIndex = 0;
+  
+    UnstructBCSet *unstructBCSet = unstructuredGrid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    for (int iFace = 0; iFace < numberOfBoundaryFaces; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet ->GetBCRegion(bcRegionIDofBCFace[iFace]);
+
+        int boundaryConditionType = bcRegion->GetBCType();
+
+        if (IsInterface(boundaryConditionType))
+        {
+            int globalInterfaceIndex  = localInterfaceIndexToGlobalInterfaceIndexMapping[zoneIndex][localInterfaceIndex];
+            uint_t numberOfChildFaces = globalChildFaceIndexes[globalInterfaceIndex].size();
+
+            if (numberOfChildFaces > 0)
+            {
+                for (int iChildFace = 0; iChildFace < numberOfChildFaces; ++ iChildFace)
+                {
+                    newLeftCellIndexVector.push_back(leftCellIndexContainer[iFace]);
+                }
+            }
+            else
+            {
+                newLeftCellIndexVector.push_back(leftCellIndexContainer[iFace]);
+            }
+            ++ localInterfaceIndex;
+        }
+        else
+        {
+            newLeftCellIndexVector.push_back(leftCellIndexContainer[iFace]);
+        }
+    }
+
+    uint_t newNumberOfBoundaryFaces = newLeftCellIndexVector.size();
+    int numberOfCells = unstructuredGrid->GetNTotalCell();
+
+    for (int iFace = 0; iFace < newNumberOfBoundaryFaces; ++ iFace)
+    {
+        newRightCellIndexVector.push_back(iFace + numberOfCells);
+    }
+    newRightCellIndexVector.resize(newNumberOfBoundaryFaces);
+
+    int numberOfFaces = unstructuredGrid->GetNTotalFace();
+    for (int iFace = numberOfBoundaryFaces; iFace < numberOfFaces; ++ iFace)
+    {
+        newLeftCellIndexVector .push_back(leftCellIndexContainer [iFace]);
+        newRightCellIndexVector.push_back(rightCellIndexContainer[iFace]);
+    }
+}
+
+void ComputationalGridProcess::SetBoundaryFaceNodeIndexVector(InterfaceLinkStructure *interfaceLinkStructure)
+{
+    UnstructGrid *unstructuredGrid = currentGrid;
+
+    int numberOfBoundaryFaces = unstructuredGrid->GetNBoundFace();
+
+    int *faceNodeNumberContainer = unstructuredGrid->GetNodeNumberOfEachFace();
+    int *faceNodeIndexContainer  = unstructuredGrid->GetFace2Node();
+
+    PHVectorInt1D &newBoundaryLeftCellIndex = this->newBoundaryLeftCellIndexList[currentZoneID];
+
+    int *leftCellIndexContainer = unstructuredGrid->GetLeftCellOfFace();
+
+    FaceSearchingManager *faceSearchingManager  = interfaceLinkStructure->GetFaceSearchingManager();
+    PHVectorInt2D &relativeChildFaceNodeIndexes = faceSearchingManager->GetRelativeChildFaceNodeIndexes();
+    PHVectorInt2D &globalChildFaceIndexes       = faceSearchingManager->GetGlobalChildFaceIndexes();
+
+    PHVectorInt2D &localInterfaceIndexToGlobalInterfaceIndexMapping = interfaceLinkStructure->GetLocalInterfaceIndexToGlobalInterfaceIndexMapping();
+
+    int zoneIndex = unstructuredGrid->GetZoneID();
+
+    PHVectorInt2D &faceNodeIndexVector = this->faceNodeIndexVectorList[currentZoneID];
+    faceNodeIndexVector.resize(0);
+
+    int localInterfaceIndex = 0;
+    int facePointStartPosition = 0;
+
+    UnstructBCSet *unstructBCSet = unstructuredGrid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    for (int iFace = 0; iFace < numberOfBoundaryFaces; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet ->GetBCRegion(bcRegionIDofBCFace[iFace]);
+
+        int boundaryConditionType = bcRegion->GetBCType();
+        int numberOfFaceNodes = faceNodeNumberContainer[iFace];
+        PHVectorInt1D tmpVector;
+
+        if (IsInterface(boundaryConditionType))
+        {
+            int globalInterfaceIndex  = localInterfaceIndexToGlobalInterfaceIndexMapping[zoneIndex][localInterfaceIndex];
+            uint_t numberOfChildFaces = globalChildFaceIndexes[globalInterfaceIndex].size();
+
+            if (numberOfChildFaces > 0)
+            {
+                for (int iChildFace = 0; iChildFace < numberOfChildFaces; ++ iChildFace)
+                {
+                    newBoundaryLeftCellIndex.push_back(leftCellIndexContainer[iFace]);
+
+                    int childFaceIndex = globalChildFaceIndexes[globalInterfaceIndex][iChildFace];
+                    uint_t numberOfChildFaceNodes = relativeChildFaceNodeIndexes[childFaceIndex].size();
+
+                    tmpVector.resize(0);
+                    for (int iNode = 0; iNode < numberOfChildFaceNodes; ++ iNode)
+                    {
+                        int relativeNodeIndex = facePointStartPosition + relativeChildFaceNodeIndexes[childFaceIndex][iNode];
+                        int nodeIndex = faceNodeIndexContainer[relativeNodeIndex];
+                        tmpVector.push_back(nodeIndex);
+                    }
+                    faceNodeIndexVector.push_back(tmpVector);
+                }
+            }
+            else
+            {
+                newBoundaryLeftCellIndex.push_back(leftCellIndexContainer[iFace]);
+
+                for (int iNode = 0; iNode < numberOfFaceNodes; ++ iNode)
+                {
+                    int nodeIndex = faceNodeIndexContainer[facePointStartPosition + iNode];
+                    tmpVector.push_back(nodeIndex);
+                }
+                faceNodeIndexVector.push_back(tmpVector);
+            }
+            ++ localInterfaceIndex;
+        }
+        else
+        {
+            newBoundaryLeftCellIndex.push_back(leftCellIndexContainer[iFace]);
+
+            for (int iNode = 0; iNode < numberOfFaceNodes; ++ iNode)
+            {
+                int nodeIndex = faceNodeIndexContainer[facePointStartPosition + iNode];
+                tmpVector.push_back(nodeIndex);
+            }
+            faceNodeIndexVector.push_back(tmpVector);
+        }
+
+        facePointStartPosition += numberOfFaceNodes;
+    }
+}
+
+void ComputationalGridProcess::InitializeNewLocalGlobalInterfaceMapping()
+{
+    InterfaceLinkStructure *interfaceLinkStructure = this->GetInterfaceLinkStructure();
+    interfaceLinkStructure->InitializeNewLocalGlobalInterfaceMapping();
+}
+
+void ComputationalGridProcess::UpdateLocalGlobalInterfaceMapping()
+{
+    InterfaceLinkStructure *interfaceLinkStructure = this->GetInterfaceLinkStructure();
+    interfaceLinkStructure->UpdateLocalGlobalInterfaceMapping();
+}
+
+void ComputationalGridProcess::UpdateOtherTopologyTerm()
+{
+    InterfaceLinkStructure *interfaceLinkStructure = this->GetInterfaceLinkStructure();
+    Grid **gridContainer = this->GetGridContainer();
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        Grid *grid = gridContainer[iZone];
+
+        currentZoneID = iZone;
+        currentGrid   = UnstructGridCast(grid);
+
+        UpdateOtherTopologyTerm(interfaceLinkStructure);
+    }
+}
+
+void ComputationalGridProcess::UpdateOtherTopologyTerm(InterfaceLinkStructure *interfaceLinkStructure)
+{
+    UnstructGrid  *unstructuredGrid = currentGrid;
+    InterfaceInfo *interfaceInformation = unstructuredGrid->GetInterfaceInfo();
+
+    if (!interfaceInformation) return;
+
+    UpdateOtherBoundaryTopologyTerm();
+    UpdateOtherGridFaceTopologyTerm();
+
+    int currentZoneIndex = unstructuredGrid->GetZoneID();
+
+    PHVectorInt2D &localInterfaceIndexToGlobalInterfaceIndexMapping = interfaceLinkStructure->GetLocalInterfaceIndexToGlobalInterfaceIndexMapping();
+
+    uint_t numberOfNewInterfaces = localInterfaceIndexToGlobalInterfaceIndexMapping[currentZoneIndex].size();
+    interfaceInformation->ReSize(static_cast<int>(numberOfNewInterfaces));
+
+    CreateLocalInterfaceToBoundaryFaceIndexesMapping();
+}
+
+void ComputationalGridProcess::UpdateOtherGridFaceTopologyTerm()
+{
+    UnstructGrid *unstructuredGrid = currentGrid;
+    int numberOfFaces = unstructuredGrid->GetNTotalFace();
+
+    int *leftCellIndexContainer  = unstructuredGrid->GetLeftCellOfFace();
+    int *rightCellIndexContainer = unstructuredGrid->GetRightCellOfFace();
+    delete [] leftCellIndexContainer;
+    delete [] rightCellIndexContainer;
+
+    PHVectorInt1D &newLeftCellIndexVector  = this->newLeftCellIndexVectorList [currentZoneID];
+    PHVectorInt1D &newRightCellIndexVector = this->newRightCellIndexVectorList[currentZoneID];
+
+    int newNumberOfFaces = static_cast<int>(newLeftCellIndexVector.size());
+    unstructuredGrid->SetNTotalFace(newNumberOfFaces);
+
+    leftCellIndexContainer  = new int[newNumberOfFaces];
+    rightCellIndexContainer = new int[newNumberOfFaces];
+    unstructuredGrid->SetLeftCellOfFace(leftCellIndexContainer);
+    unstructuredGrid->SetRightCellOfFace(rightCellIndexContainer);
+
+    for (int iFace = 0; iFace < newNumberOfFaces; ++ iFace)
+    {
+        leftCellIndexContainer [iFace] = newLeftCellIndexVector [iFace];
+        rightCellIndexContainer[iFace] = newRightCellIndexVector[iFace];
+    }
+
+    int *faceNodeNumberContainer = unstructuredGrid->GetNodeNumberOfEachFace();
+    int *faceNodeIndexContainer  = unstructuredGrid->GetFace2Node();
+    delete [] faceNodeNumberContainer;    faceNodeNumberContainer = NULL;
+    delete [] faceNodeIndexContainer;     faceNodeIndexContainer  = NULL;
+
+    PHVectorInt2D &faceNodeIndexVector = faceNodeIndexVectorList[currentZoneID];
+    uint_t sizeOfFaceNodeIndexContainer = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        sizeOfFaceNodeIndexContainer += faceNodeIndexVector[iFace].size();
+    }
+    faceNodeNumberContainer = new int[numberOfFaces];
+    faceNodeIndexContainer  = new int[sizeOfFaceNodeIndexContainer];
+    unstructuredGrid->SetFace2Node(faceNodeIndexContainer );
+    unstructuredGrid->SetNodeNumberOfEachFace(faceNodeNumberContainer);
+
+    int faceNodeStartPosition = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        int numberOfFaceNodes = static_cast<int>(faceNodeIndexVector[iFace].size());
+        faceNodeNumberContainer[iFace] = numberOfFaceNodes;
+
+        for (int iNode = 0; iNode < numberOfFaceNodes; ++ iNode)
+        {
+            faceNodeIndexContainer[faceNodeStartPosition + iNode] = faceNodeIndexVector[iFace][iNode];
+        }
+        faceNodeStartPosition += numberOfFaceNodes;
+    }
+}
+
+void ComputationalGridProcess::UpdateOtherBoundaryTopologyTerm()
+{
+    UnstructGrid *unstructuredGrid = currentGrid;
+
+    int numberOfBoundaryFaces = unstructuredGrid->GetNBoundFace();
+   
+    UnstructBCSet **bcr = unstructuredGrid->GetBCRecord();
+    for (int iFace = 0; iFace < numberOfBoundaryFaces; ++ iFace)
+    {
+        delete bcr[iFace];
+    }
+    delete [] bcr;
+
+    PHVectorInt1D &boundaryTypeVector    = boundaryTypeVectorList[currentZoneID];
+    vector< string > &boundaryNameVector = boundaryNameVectorList[currentZoneID];
+
+    int newNumberOfBoundaryFaces = static_cast<int>(boundaryTypeVector.size());
+    unstructuredGrid->SetNBoundFace(newNumberOfBoundaryFaces);
+
+    UnstructBCSet **bcrNew = new UnstructBCSet *[newNumberOfBoundaryFaces];
+ 
+    //! Create UnstructbcRegion.
+    set<string> bcNameSet;
+    for (int iFace = 0; iFace < newNumberOfBoundaryFaces; iFace++)
+    {   
+        bcrNew[iFace] = new UnstructBCSet;
+        bcrNew[iFace]->SetKey(boundaryTypeVector[iFace]);
+        bcrNew[iFace]->SetBCName(boundaryNameVector[iFace]);
+
+        bcNameSet.insert(boundaryNameVector[iFace]);
+    }
+
+    unstructuredGrid->SetBCRecord(bcrNew);
+
+    int nBCRegionUnstruct = static_cast<int>(bcNameSet.size());
+
+    unstructuredGrid->CreateUnstructBCSet(nBCRegionUnstruct);
+
+    UnstructBCSet *unstructBCSetNew = unstructuredGrid->GetUnstructBCSet();
+    int* bcRegionIDofBCFace = new int[newNumberOfBoundaryFaces];
+    set<string>::iterator iter;
+    int count = 0;
+    for (iter = bcNameSet.begin(); iter != bcNameSet.end(); iter++)
+    {
+        UnstructBC *unstructBC = new UnstructBC(count);
+        unstructBCSetNew->SetBCRegion(count, unstructBC);
+        unstructBC->SetBCName(*iter);
+
+        for (int iFace = 0; iFace < newNumberOfBoundaryFaces; iFace++)
+        {
+            if (boundaryNameVector[iFace] == unstructBC->GetBCName())
+            {
+                unstructBC->SetBCType(boundaryTypeVector[iFace]);
+                bcRegionIDofBCFace[iFace] = count;
+                vector<int> *faceIndex = unstructBC->GetFaceIndex();
+                faceIndex->push_back(iFace);
+            }
+
+        }
+        count++;
+    }
+    unstructBCSetNew->SetBCFaceInfo(bcRegionIDofBCFace);
+}
+
+void ComputationalGridProcess::MatchInterfaceTopology()
+{
+    WriteLogFile("Start MatchInterfaceTopology");
+
+    InterfaceLinkStructure *interfaceLinkStructure = this->GetInterfaceLinkStructure();
+
+    Grid **gridContainer = this->GetGridContainer();
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        Grid *grid = gridContainer[iZone];
+
+        currentZoneID = iZone;
+        currentGrid   = UnstructGridCast(grid);
+
+        interfaceLinkStructure->MatchInterfaceTopology(grid);
+    }
+}
+
+void ComputationalGridProcess::ReconstructInterfaceTopology()
+{
+    InterfaceLinkStructure *interfaceLinkStructure = this->GetInterfaceLinkStructure();
+    interfaceLinkStructure->ReconstructInterfaceTopology();
+}
+
+void ComputationalGridProcess::GetNeighborZoneBoundingBox(RDouble *pmin, RDouble *pmax)
+{
+    pmin[0] = LARGE;
+    pmin[1] = LARGE;
+    pmin[2] = LARGE;
+
+    pmax[0] = - LARGE;
+    pmax[1] = - LARGE;
+    pmax[2] = - LARGE;
+
+    vector< ZoneInterface * > &neighborZoneInterfaces = this->GetNeighborZoneInterfaces();
+    uint_t numberOfNeighborZones = neighborZoneInterfaces.size();
+    for (int iZone = 0; iZone < numberOfNeighborZones; ++ iZone)
+    {
+        ZoneInterface *zoneInterface = neighborZoneInterfaces[iZone];
+        RDouble *localPmin = zoneInterface->GetMinBox();
+        RDouble *localPmax = zoneInterface->GetMaxBox();
+
+        pmin[0] = MIN(pmin[0], localPmin[0]);
+        pmin[1] = MIN(pmin[1], localPmin[1]);
+        pmin[2] = MIN(pmin[2], localPmin[2]);
+
+        pmax[0] = MAX(pmax[0], localPmax[0]);
+        pmax[1] = MAX(pmax[1], localPmax[1]);
+        pmax[2] = MAX(pmax[2], localPmax[2]);
+    }
+}
+
+void ComputationalGridProcess::GetNeighborZoneMinMaxDistance(RDouble &mindis, RDouble &maxdis)
+{
+    mindis =   LARGE;
+    maxdis = - LARGE;
+
+    vector< ZoneInterface * > &neighborZoneInterfaces = this->GetNeighborZoneInterfaces();
+    uint_t numberOfNeighborZones = neighborZoneInterfaces.size();
+    for (int iZone = 0; iZone < numberOfNeighborZones; ++ iZone)
+    {
+        RDouble dismin, dismax;
+        ZoneInterface *zoneInterface = neighborZoneInterfaces[iZone];
+
+        zoneInterface->GetMinMaxDistance(dismin, dismax);
+
+        mindis = MIN(mindis, dismin);
+        maxdis = MAX(maxdis, dismax);
+    }
+}
+
+void ComputationalGridProcess::CreateNeighborZoneInterfacesTopology()
+{
+    PHSPACE::WriteLogFile("Start Creating Neighbor Zone Interfaces Topology!");
+
+    BuildZoneInterfacesOfThisProcessor();
+
+    InitZoneInterfacesOfThisProcessor();
+
+    SwapZoneInterfaceTopologyToNeighborZones();
+
+    PHSPACE::WriteLogFile("End Creating Neighbor Zone Interfaces Topology!");
+}
+
+void ComputationalGridProcess::BuildZoneInterfacesOfThisProcessor()
+{
+    Grid **gridContainer = this->GetGridContainer();
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        UnstructGrid *grid = UnstructGridCast(gridContainer[iZone]);
+        BuildZoneInterfacesTopology(grid, iZone);
+    }
+}
+
+void ComputationalGridProcess::BuildZoneInterfacesTopology(UnstructGrid *unstructuredGrid, int iZone)
+{
+    ZoneInterface *zoneInterfacesTopology = new ZoneInterface();
+    zoneInterfacesTopologyList[iZone] = zoneInterfacesTopology;
+
+    zoneInterfacesTopology->SetZoneIndex( unstructuredGrid->GetZoneID());
+
+    RDouble *minBox = unstructuredGrid->GetMinBox();
+    RDouble *maxBox = unstructuredGrid->GetMaxBox();
+    RDouble *pMin = new RDouble[3];
+    RDouble *pMax = new RDouble[3];
+    SetField(pMin, minBox, 3);
+    SetField(pMax, maxBox, 3);
+    zoneInterfacesTopology->SetMinBox(pMin);
+    zoneInterfacesTopology->SetMaxBox(pMax);
+
+    RDouble disMin, disMax;
+    unstructuredGrid->GetMinMaxDS(disMin, disMax);
+    zoneInterfacesTopology->SetMinMaxDistance(disMin, disMax);
+
+    int numberOfNodes = unstructuredGrid->GetNTotalNode();
+    vector< bool > isInterfaceNode(numberOfNodes);
+
+    int *faceNodeNumberContainer = unstructuredGrid->GetNodeNumberOfEachFace();
+    int *faceNodeIndexContainer  = unstructuredGrid->GetFace2Node();
+    int numberOfBoundaryFaces = unstructuredGrid->GetNBoundFace();
+
+    UnstructBCSet *unstructBCSet = unstructuredGrid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    int interfaceIndex = 0;
+    int nodePosition = 0;
+    for (int iBoundaryFace = 0; iBoundaryFace < numberOfBoundaryFaces; ++ iBoundaryFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet ->GetBCRegion(bcRegionIDofBCFace[iBoundaryFace]);
+
+        int boundaryConditionType = bcRegion->GetBCType();
+        int faceNodeNumber = faceNodeNumberContainer[iBoundaryFace];
+        if (!IsInterface(boundaryConditionType))
+        {
+            nodePosition += faceNodeNumber;
+            continue;
+        }
+
+        for (int iNode = 0; iNode < faceNodeNumber; ++ iNode)
+        {
+            int nodeIndex = faceNodeIndexContainer[nodePosition + iNode];
+            isInterfaceNode[nodeIndex] = true;
+        }
+        ++ interfaceIndex;
+        nodePosition += faceNodeNumber;
+    }
+
+    int numberOfNodesOnInterfaces = 0;
+    PHVectorInt1D globalNodeIndexToLocalNodeIndex(numberOfNodes);
+    SetField(globalNodeIndexToLocalNodeIndex, -1, numberOfNodes);
+    for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        if (isInterfaceNode[iNode])
+        {
+            globalNodeIndexToLocalNodeIndex[iNode] = numberOfNodesOnInterfaces;
+            ++ numberOfNodesOnInterfaces;
+        }
+    }
+
+    RDouble *x    = unstructuredGrid->GetX();
+    RDouble *y    = unstructuredGrid->GetY();
+    RDouble *z    = unstructuredGrid->GetZ();
+    RDouble *xNew = new RDouble[numberOfNodesOnInterfaces];
+    RDouble *yNew = new RDouble[numberOfNodesOnInterfaces];
+    RDouble *zNew = new RDouble[numberOfNodesOnInterfaces];
+    zoneInterfacesTopology->SetX(xNew);
+    zoneInterfacesTopology->SetY(yNew);
+    zoneInterfacesTopology->SetZ(zNew);
+
+    numberOfNodesOnInterfaces = 0;
+    for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        if (isInterfaceNode[iNode])
+        {
+            xNew[numberOfNodesOnInterfaces] = x[iNode];
+            yNew[numberOfNodesOnInterfaces] = y[iNode];
+            zNew[numberOfNodesOnInterfaces] = z[iNode];
+
+            ++ numberOfNodesOnInterfaces;
+        }
+    }
+    zoneInterfacesTopology->SetNumberOfNodes(numberOfNodesOnInterfaces);
+
+    PHVectorInt2D &faceNodeIndexContainerOfZoneInterfaces = zoneInterfacesTopology->GetFaceNodeIndexContainer();
+    faceNodeIndexContainerOfZoneInterfaces.resize(interfaceIndex);
+
+    interfaceIndex = 0;
+    nodePosition = 0;
+    for (int iBoundaryFace = 0; iBoundaryFace < numberOfBoundaryFaces; ++ iBoundaryFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet ->GetBCRegion(bcRegionIDofBCFace[iBoundaryFace]);
+
+        int boundaryConditionType = bcRegion->GetBCType();
+        int faceNodeNumber = faceNodeNumberContainer[iBoundaryFace];
+        if (!IsInterface(boundaryConditionType))
+        {
+            nodePosition += faceNodeNumber;
+            continue;
+        }
+        faceNodeIndexContainerOfZoneInterfaces[interfaceIndex].resize(faceNodeNumber);
+
+        for (int iNode = 0; iNode < faceNodeNumber; ++ iNode)
+        {
+            int globalNodeIndex = faceNodeIndexContainer[nodePosition + iNode];
+            int localNodeIndex  = globalNodeIndexToLocalNodeIndex[globalNodeIndex];
+            faceNodeIndexContainerOfZoneInterfaces[interfaceIndex][iNode] = localNodeIndex;
+        }
+
+        ++ interfaceIndex;
+        nodePosition += faceNodeNumber;
+    }
+}
+
+void ComputationalGridProcess::InitZoneInterfacesOfThisProcessor()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        ZoneInterface *zoneInterfaceTopology = this->zoneInterfacesTopologyList[iZone];
+        this->AddZoneInterfacesTopology(zoneInterfaceTopology);
+    }
+}
+
+void ComputationalGridProcess::SwapZoneInterfaceLengthToNeighborZones(vector<CharVecSizeType> &neighborLength)
+{
+    PHSPACE::WriteLogFile("Start Swapping Length of Neighbor Zones ...");
+
+    int nZones = PHMPI::GetNumberofGlobalZones();
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Grid *grid = this->GetGrid(0);
+        if (region->ZoneBelongToCurrentProcessor(iZone))
+        {
+            int localZoneIndex = region->GetProcessGlobalZoneIndexToLocalZoneIndex(iZone);
+            grid = this->GetGrid(localZoneIndex);
+        }
+
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int sendProcessorIndex    = PHMPI::GetZoneProcessorID(iZone);
+            int receiveProcessorIndex = PHMPI::GetZoneProcessorID(neighborZone);
+
+            DataContainer *dataContainer = new DataContainer();
+            if (PHMPI::GetCurrentProcessorID() == sendProcessorIndex)
+            {
+                DataContainer *tempData = new DataContainer();
+                this->CompressZoneInterfaceIntoDataContainer(tempData, iZone);
+
+                dataContainer->moveto_begin();
+                CharVecSizeType len = tempData->size();
+                PHWrite(dataContainer, len);
+                delete tempData;
+            }
+
+            PHMPI::PH_Trade(dataContainer, sendProcessorIndex, receiveProcessorIndex);
+
+            if (PHMPI::GetCurrentProcessorID() == receiveProcessorIndex)
+            {
+                dataContainer->moveto_begin();
+                CharVecSizeType len;
+                PHRead(dataContainer, len);
+                neighborLength.push_back(len);
+            }
+
+            delete dataContainer;
+        }
+    }
+
+    PHSPACE::WriteLogFile("End Swapping Length of Neighbor Zones !");
+}
+
+void ComputationalGridProcess::SwapZoneInterfaceTopologyToNeighborZones()
+{
+    PHSPACE::WriteLogFile("Start Swapping Zone Interface Topology To Neighbor Zones!");
+
+    if (PHMPI::GetNumberOfProcessor() > 1)
+    {
+        SwapZoneInterfaceTopologyToNeighborZonesNonBlocking();
+    }
+    else
+    {
+        SwapZoneInterfaceTopologyToNeighborZonesBlocking();
+    }
+
+    PHSPACE::WriteLogFile("End Swapping Zone Interface Topology To Neighbor Zones!");
+}
+
+void ComputationalGridProcess::SwapZoneInterfaceTopologyToNeighborZonesBlocking()
+{
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Grid *grid = this->GetGrid(0);
+        if (region->ZoneBelongToCurrentProcessor(iZone))
+        {
+            int localZoneIndex = region->GetProcessGlobalZoneIndexToLocalZoneIndex(iZone);
+            grid = this->GetGrid(localZoneIndex);
+        }
+
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int sendProcessorIndex    = PHMPI::GetZoneProcessorID(iZone);
+            int receiveProcessorIndex = PHMPI::GetZoneProcessorID(neighborZone);
+
+            this->SwapInterfaceTopologyBetweenTwoNeighboringZone(iZone, sendProcessorIndex, receiveProcessorIndex);
+        }
+    }
+}
+
+void ComputationalGridProcess::SwapZoneInterfaceTopologyToNeighborZonesNonBlocking()
+{
+    vector<CharVecSizeType> neighborLength;
+    SwapZoneInterfaceLengthToNeighborZones(neighborLength);
+
+    PHSPACE::WriteLogFile("Start Swapping Zone Interface Topology To Neighbor Zones!");
+    
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    vector< PH_Request > requestContainer;
+    vector< vector< DataContainer * > > receivedDataBuffer;
+    vector< vector< DataContainer * > > sendDataBuffer;
+    receivedDataBuffer.resize(nZones);
+    sendDataBuffer.resize(nZones);
+
+    int neighborCount = 0;
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Grid *grid = this->GetGrid(0);
+        if (region->ZoneBelongToCurrentProcessor(iZone))
+        {
+            int localZoneIndex = region->GetProcessGlobalZoneIndexToLocalZoneIndex(iZone);
+            grid = this->GetGrid(localZoneIndex);
+        }
+
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int sendProcessor    = PHMPI::GetZoneProcessorID(iZone);
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            DataContainer *receivedBuffer = 0;
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == receiveProcessor)
+            {
+                receivedBuffer = new DataContainer;
+                receivedDataBuffer[iZone].push_back(receivedBuffer);
+            }
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = new DataContainer;
+                sendDataBuffer[iZone].push_back(sendBuffer);
+            }
+
+            int tag = iZone;
+            if (currentProcessor == sendProcessor)
+            {
+                this->CompressZoneInterfaceIntoDataContainer(sendBuffer, iZone);
+            }
+            if (sendProcessor == receiveProcessor) continue;
+            
+            if (currentProcessor == sendProcessor)
+            {
+                streamsize nlen = sendBuffer->size();
+                send(sendBuffer, receiveProcessor, nlen, requestContainer, tag);
+            }
+            else if (currentProcessor == receiveProcessor)
+            {
+                CharVecSizeType nlen = neighborLength[neighborCount++];
+                receive(receivedBuffer, sendProcessor, nlen, requestContainer, tag);
+            }
+        }
+    }
+
+    if (PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_Wait(static_cast<int>(requestContainer.size()), &(requestContainer[0]));
+    }
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        Grid *grid = this->GetGrid(0);
+        if (region->ZoneBelongToCurrentProcessor(iZone))
+        {
+            int localZoneIndex = region->GetProcessGlobalZoneIndexToLocalZoneIndex(iZone);
+            grid = this->GetGrid(localZoneIndex);
+        }
+
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        int count = 0;
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor == receiveProcessor)
+            {
+                DataContainer *receiveData = receivedDataBuffer[iZone][count];
+                this->AnasysZoneInterfaceFromDataContainer(receiveData);
+
+                ++ count;
+            }
+        }
+    }
+
+    for (std::size_t iDim = 0; iDim < receivedDataBuffer.size(); ++ iDim)
+    {
+        for (std::size_t jDim = 0; jDim < receivedDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete receivedDataBuffer[iDim][jDim];
+        }
+    }
+    for (std::size_t iDim = 0; iDim < sendDataBuffer.size(); ++ iDim)
+    {
+        for (std::size_t jDim = 0; jDim < sendDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete sendDataBuffer[iDim][jDim];
+        }
+    }
+
+    PH_Barrier();
+}
+
+void ComputationalGridProcess::SwapInterfaceTopologyBetweenTwoNeighboringZone(int zoneIndex, int sendProcessorIndex, int receiveProcessorIndex)
+{
+    DataContainer *dataContainer = new DataContainer();
+
+    if (PHMPI::GetCurrentProcessorID() == sendProcessorIndex)
+    {
+        this->CompressZoneInterfaceIntoDataContainer(dataContainer, zoneIndex);
+    }
+
+    PHMPI::PH_Trade(dataContainer, sendProcessorIndex, receiveProcessorIndex);
+
+    if (PHMPI::GetCurrentProcessorID() == receiveProcessorIndex)
+    {
+        this->AnasysZoneInterfaceFromDataContainer(dataContainer);
+    }
+
+    delete dataContainer;
+}
+
+void ComputationalGridProcess::CompressZoneInterfaceIntoDataContainer(DataContainer *&dataContainer, int globalZoneIndex)
+{
+    int localZoneIndex = region->GetProcessGlobalZoneIndexToLocalZoneIndex(globalZoneIndex);
+    ZoneInterface *zoneInterface = zoneInterfacesTopologyList[localZoneIndex];
+    zoneInterface->Encode(dataContainer);
+}
+
+void ComputationalGridProcess::AnasysZoneInterfaceFromDataContainer(DataContainer *&dataContainer)
+{
+    this->DecodeZoneInterfacesTopology(dataContainer);
+}
+
+void ComputationalGridProcess::DecodeZoneInterfacesTopology(DataContainer *&dataContainer)
+{
+    ZoneInterface *zoneInterfacesTopology = new ZoneInterface();
+    zoneInterfacesTopology->Decode(dataContainer);
+
+    this->AddZoneInterfacesTopology(zoneInterfacesTopology);
+}
+
+void ComputationalGridProcess::AddZoneInterfacesTopology(ZoneInterface *zoneInterfaceIn)
+{
+    int zoneIndex = zoneInterfaceIn->GetZoneIndex();
+
+    vector< ZoneInterface * > &neighborZoneInterfaces = this->GetNeighborZoneInterfaces();
+    for (std::size_t iZone = 0; iZone < neighborZoneInterfaces.size(); ++ iZone)
+    {
+        if (neighborZoneInterfaces[iZone]->GetZoneIndex() == zoneIndex)
+        {
+            delete zoneInterfaceIn;
+            return;
+        }
+    }
+    
+    neighborZoneInterfaces.push_back(zoneInterfaceIn);
+}
+
+bool ExistInterfaces(UnstructGrid *unstructuredGrid)
+{
+    int numberOfBoundaryFaces = unstructuredGrid->GetNBoundFace();
+    UnstructBCSet *unstructBCSet = unstructuredGrid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+
+    for (int iFace = 0; iFace < numberOfBoundaryFaces; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet ->GetBCRegion(bcRegionIDofBCFace[iFace]);
+
+        int boundaryConditionType = bcRegion->GetBCType();
+        if (IsInterface(boundaryConditionType))
+        {
+            return true;
+        }
+    }
+
+    return false;
+}
+
+void GetFaceCoordinateList(PHVectorInt1D &faceNodeIndexes, int numberOfPoints, RDouble *xList, RDouble *yList, RDouble *zList, RDouble *x, RDouble *y, RDouble *z)
+{
+    for (int iNode = 0; iNode < numberOfPoints; ++ iNode)
+    {
+        xList[iNode] = x[faceNodeIndexes[iNode]];
+        yList[iNode] = y[faceNodeIndexes[iNode]];
+        zList[iNode] = z[faceNodeIndexes[iNode]];
+    }
+}
+
+void GetCoordinateIndexList(InterfaceLinkStructure *interfaceLinkStructure, int &pointCount, RDouble *xList, RDouble *yList, RDouble *zList, int numberOfPoints, PHVectorInt1D &pointIndexes)
+{
+    DataStruct_AdtTree< int, RDouble > *coordinateTree = &interfaceLinkStructure->GetCoordinateTree();
+    RDouble diffTolerance = interfaceLinkStructure->GetTolerance();
+
+    RDouble coordinate[3], minWindow[3], maxWindow[3];
+
+    for (int iNode = 0; iNode < numberOfPoints; ++ iNode)
+    {
+        coordinate[0] = xList[iNode];
+        coordinate[1] = yList[iNode];
+        coordinate[2] = zList[iNode];
+
+        minWindow[0] = coordinate[0] - diffTolerance;
+        minWindow[1] = coordinate[1] - diffTolerance;
+        minWindow[2] = coordinate[2] - diffTolerance;
+
+        maxWindow[0] = coordinate[0] + diffTolerance;
+        maxWindow[1] = coordinate[1] + diffTolerance;
+        maxWindow[2] = coordinate[2] + diffTolerance;
+
+        GetCoordinateIndex(coordinateTree, coordinate, minWindow, maxWindow, pointCount, pointIndexes[iNode]);
+    }
+}
+
+int GetCoordinateIndex(DataStruct_AdtTree< int, RDouble > *adtTree, RDouble *coordinate, RDouble *minWindow, RDouble *maxWindow, int &pointCount, int &pointIndex)
+{
+    typedef DataStruct_AdtTree< int, RDouble > AdtTree;
+    typedef DataStruct_AdtNode< int, RDouble > AdtNode;
+
+    AdtNode *node;
+    AdtTree::AdtNodeList nodeList;
+
+    nodeList.resize(0);
+    adtTree->FindNodesInRegion(minWindow, maxWindow, nodeList);
+
+    if (nodeList.size() == 0)
+    {
+        node = new AdtNode(3, coordinate, pointCount);
+        adtTree->AddNode(node);
+        pointIndex = pointCount;
+        ++ pointCount;
+        return 0;
+    }
+    else
+    {
+        if (nodeList.size() > 1)
+        {
+            cout << " impossible nodeList.size() = " << nodeList.size() << "\n";
+            TK_Exit::PrintDebugInfoExit("");
+        }
+        node = nodeList[0];
+        pointIndex = node->GetData();
+        return 1;
+    }
+}
+
+}
\ No newline at end of file
diff --git a/Mesh/src/DynamicGrid.cpp b/Mesh/src/DynamicGrid.cpp
new file mode 100644
index 0000000..c5e9c99
--- /dev/null
+++ b/Mesh/src/DynamicGrid.cpp
@@ -0,0 +1,289 @@
+#include "DynamicGrid.h"
+#include "GeometryUnit.h"
+#include "HyList.h"
+
+namespace PHSPACE
+{
+DynamicGrid::DynamicGrid(Grid *stationalGridIn)
+{
+    stationalGrid = stationalGridIn;
+
+    nodeArray = 0;
+    faceArray = 0;
+    cellArray = 0;
+
+    nTotalNode = 0;
+    nTotalCell = 0;
+    nBoundFace = 0;
+    nTotalFace = 0;
+
+    secondSegment = 0;
+    rotateNodeIndex = 0;
+}
+
+DynamicGrid::~DynamicGrid()
+{
+    delete [] nodeArray;
+    delete [] faceArray;
+    delete [] cellArray;
+    delete [] secondSegment;
+}
+
+void DynamicGrid::CalSpringK()
+{
+    RDouble dx, dy ,dz, dd; 
+    double kk;
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        int nodeIndex1 = iNode;
+        int nNodes = nodeArray[iNode].nodeNumberAround;
+        nodeArray[iNode].node2nodeK = new double [nNodes];
+
+        for (int jNode = 0; jNode < nNodes; ++ jNode)
+        {
+            int nodeIndex2 = nodeArray[iNode].node2node[jNode];
+
+            dx = nodeArray[nodeIndex1].x - nodeArray[nodeIndex2].x;
+            dy = nodeArray[nodeIndex1].y - nodeArray[nodeIndex2].y;
+            dz = nodeArray[nodeIndex1].z - nodeArray[nodeIndex2].z;
+            dd = sqrt(dx * dx + dy * dy + dz * dz);
+
+            kk = static_cast <double> (1.0 / dd);
+            nodeArray[iNode].node2nodeK[jNode] = kk;
+        }
+    }
+}
+
+void DynamicGrid::FindNode2Node()
+{
+    if (nodeArray[0].node2node != 0) return;
+
+    HyList <int> *node2node = new HyList <int> [nTotalNode];
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        node2node[iNode].SetAverNnode(16);
+    }
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        int nNodes = faceArray[iFace].nodeNumber;
+        int *face2node = faceArray[iFace].face2node;
+
+        for (int iNode = 0; iNode < nNodes; ++ iNode)
+        {
+            int nodeIndex1 = face2node[iNode];
+            int nodeIndex2 = face2node[(iNode + 1) % nNodes];
+
+            node2node[nodeIndex1].insert(nodeIndex2);
+            node2node[nodeIndex2].insert(nodeIndex1);
+        }
+    }
+
+    int minsize = 10000, maxsize = 0, aversize = 0;
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        int nNodes = node2node[iNode].size();
+        nodeArray[iNode].nodeNumberAround = nNodes;
+
+        nodeArray[iNode].node2node = new int[nNodes];
+        for (int jNode = 0; jNode < nNodes; ++ jNode)
+        {
+            nodeArray[iNode].node2node[jNode] = node2node[iNode].GetData(jNode);
+        }
+
+        minsize = MIN(minsize, nNodes);
+        maxsize = MAX(maxsize, nNodes);
+        aversize += nNodes;
+    }
+
+    delete [] node2node;
+    CalSpringK();
+}
+
+void DynamicGrid::ReconstrcutImplicitGeomeInfor()
+{
+    cellArray = new DYCell[nTotalCell];
+
+    HyList <int> *cell2face = new HyList <int> [nTotalCell];
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        cell2face[iCell].SetAverNnode(6);
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int leftCell = faceArray[iFace].leftCell;
+        cell2face[leftCell].insert(iFace);
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        int leftCell  = faceArray[iFace].leftCell;
+        int rightCell = faceArray[iFace].rightCell;
+
+        cell2face[leftCell ].insert(iFace);
+        cell2face[rightCell].insert(iFace);
+    }
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        int nFaces = cell2face[iCell].size();
+        cellArray[iCell].faceNumber = nFaces;
+
+        cellArray[iCell].cell2face = new int[nFaces];
+        for (int iFace = 0; iFace < nFaces; ++ iFace)
+        {
+            cellArray[iCell].cell2face[iFace] = cell2face[iCell].GetData(iFace);
+        }
+    }
+    delete [] cell2face;
+
+    FindNode2Node();
+}
+
+void DynamicGrid::SetSymmetryToZero()
+{
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int bcType = faceArray[iFace].bcType;
+        if (bcType == PHENGLEI::SYMMETRY)
+        {
+            int *face2node = faceArray[iFace].face2node;
+            for (int iNode = 0; iNode < faceArray[iFace].nodeNumber; ++ iNode)
+            {
+                int nodeIndex = face2node[iNode];
+                nodeArray[nodeIndex].z    = 0.0;
+                nodeArray[nodeIndex].znew = 0.0;
+            }
+        }
+    }
+}
+
+void DynamicGrid::StationalData2DynamicData()
+{
+    UnstructGrid *grid = UnstructGridCast(stationalGrid);
+
+    nTotalNode = grid->GetNTotalNode();
+    nTotalFace = grid->GetNTotalFace();
+    nTotalCell = grid->GetNTotalCell(); 
+    nBoundFace = grid->GetNBoundFace();
+
+    //! Node info.
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    DYNode *nodeList = new DYNode[nTotalNode];
+    this->nodeArray = nodeList;
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        nodeList[iNode].x = x[iNode];
+        nodeList[iNode].y = y[iNode];
+        nodeList[iNode].z = z[iNode];
+
+        nodeList[iNode].xnew = x[iNode];
+        nodeList[iNode].ynew = y[iNode];
+        nodeList[iNode].znew = z[iNode];
+    }
+
+    //! Face info.
+    int *face2node           = grid->GetFace2Node();
+    int *nodeNumOfEaceFace   = grid->GetNodeNumberOfEachFace();
+    int *leftCellOfEachFace  = grid->GetLeftCellOfFace();
+    int *rightCellOfEachFace = grid->GetRightCellOfFace();
+    UnstructBCSet **bcr = grid->GetBCRecord();
+
+    int count = 0;
+    DYFace *faceList = new DYFace[nTotalFace];
+    this->faceArray = faceList;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        int nNodes = nodeNumOfEaceFace[iFace];
+        faceList[iFace].nodeNumber = nNodes;
+        faceList[iFace].face2node  = new int[nNodes];
+
+        for (int iNode = 0; iNode < nNodes; ++ iNode)
+        {
+            faceList[iFace].face2node[iNode] = face2node[count ++];
+        }
+
+        faceList[iFace].leftCell  = leftCellOfEachFace [iFace];
+        faceList[iFace].rightCell = rightCellOfEachFace[iFace];
+
+        if (iFace < nBoundFace)
+        {
+            faceList[iFace].bcType = bcr[iFace]->GetKey(); 
+        }
+        else
+        {
+            faceList[iFace].bcType = PHENGLEI::INTERIOR;
+        }
+    }
+
+    //! Find the index of the rotate point of second segment.
+    double secondSegmentRotatePostionX = 0.0, secondSegmentRotatePostionY = 0.0, secondSegmentRotatePostionZ = 0.0;
+    int *secondSegment = new int[nTotalNode];
+    SetField(secondSegment, 0, nTotalNode);
+    this->secondSegment = secondSegment;
+
+    SimpleBC *boundaryCondition = NULL;
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int bctype = faceArray[iFace].bcType;
+        if (bctype != PHENGLEI::SOLID_SURFACE)
+        {
+            continue;
+        }
+
+        boundaryCondition = bcr[iFace]->GetBoundaryCondition();
+        int isSecondSegment = 0;
+        boundaryCondition->GetParamData("isSecondSegment", &isSecondSegment, PHINT, 1);
+
+        if (!isSecondSegment)
+        {
+            continue;
+        }
+
+        int *face2nodeFaceA = faceArray[iFace].face2node;
+        for (int iNode = 0; iNode < faceArray[iFace].nodeNumber; ++ iNode)
+        {
+            int nodeIndex = face2nodeFaceA[iNode];
+            secondSegment[nodeIndex] = 1;
+        }
+
+        boundaryCondition->GetParamData("secondSegmentRotatePostionX", &secondSegmentRotatePostionX, PHINT, 1);
+        boundaryCondition->GetParamData("secondSegmentRotatePostionY", &secondSegmentRotatePostionY, PHINT, 1);
+        boundaryCondition->GetParamData("secondSegmentRotatePostionZ", &secondSegmentRotatePostionZ, PHINT, 1);
+    }
+
+    rotateNodeIndex = -1;
+    double minDist = 1000.0;
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        if (secondSegment[iNode] != 1)
+        {
+            continue;
+        }
+
+        double dx, dy, dz;
+        dx = nodeList[iNode].x - secondSegmentRotatePostionX;
+        dy = nodeList[iNode].y - secondSegmentRotatePostionY;
+        dz = nodeList[iNode].z - secondSegmentRotatePostionZ;
+
+        double dd = sqrt(dx * dx + dy * dy + dz * dz);
+        minDist = MIN(minDist, dd);
+        if (dd <= 5.0e-07)
+        {
+            rotateNodeIndex = iNode;
+            break;
+        }
+
+        if (rotateNodeIndex >= 0)
+        {
+            break;
+        }
+    }
+}
+
+}
\ No newline at end of file
diff --git a/Mesh/src/InterfaceLinkStructure.cpp b/Mesh/src/InterfaceLinkStructure.cpp
new file mode 100644
index 0000000..0cb4fbd
--- /dev/null
+++ b/Mesh/src/InterfaceLinkStructure.cpp
@@ -0,0 +1,393 @@
+#include "InterfaceLinkStructure.h"
+#include "Geo_Element.h"
+#include "ComputationalGrid.h"
+
+namespace PHSPACE
+{
+
+FaceSearching::FaceSearching(const PHVectorInt1D &nodeIndexes, int faceIndex)
+{
+    this->faceIndex         = faceIndex;
+    this->nodeIndexes       = nodeIndexes;
+    this->sortedNodeIndexes = nodeIndexes;
+    std::sort(sortedNodeIndexes.begin(), sortedNodeIndexes.end());
+}
+
+FaceSearching::~FaceSearching()
+{
+
+}
+
+FaceSearchingManager::FaceSearchingManager()
+{
+
+}
+
+FaceSearchingManager::~FaceSearchingManager()
+{
+    referenceFacesSet.clear();
+    for (std::size_t i = 0; i < referenceFacesArray.size(); ++ i)
+    {
+        delete referenceFacesArray[i];
+    }
+}
+
+void FaceSearchingManager::AddFace(const PHVectorInt1D &faceNodeIndexes)
+{
+    int faceIndex = static_cast<int>(referenceFacesArray.size());
+    FaceSearching *faceSearching = new FaceSearching(faceNodeIndexes, faceIndex);
+
+    set<FaceSearching *, CompareFaceByMethod1>::iterator iter = referenceFacesSet.find(faceSearching);
+
+    if (iter == referenceFacesSet.end())
+    {
+        referenceFacesSet.insert(faceSearching);
+        referenceFacesArray.push_back(faceSearching);
+    }
+    else
+    {
+        delete faceSearching;
+    }
+}
+
+void FaceSearchingManager::ComputeNewFaceIndex()
+{
+    int numberOfFaces = static_cast<int>(referenceFacesArray.size());
+    if (numberOfFaces == 0)
+    {
+        return;
+    }
+
+    statusContainerOfFaces.resize(numberOfFaces);
+    SetField(statusContainerOfFaces, INVALID_INDEX, numberOfFaces);
+
+    childFaceIndexes.resize(numberOfFaces);
+    relativeChildFaceNodeIndexes.resize(numberOfFaces);
+
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        FaceSearching *faceSearching = referenceFacesArray[iFace];
+        SplitQuadrilateralToTriangle(faceSearching);
+    }
+}
+
+set<FaceSearching *, CompareFaceByMethod1>::iterator FaceSearchingManager::FindFace(FaceSearching *faceSearching)
+{
+    return referenceFacesSet.find(faceSearching);
+}
+
+void FaceSearchingManager::GetLocalTriangleIndexes(PHVectorInt2D &localTriangleIndexesContainer)
+{
+    PHVectorInt1D localIndexes1(3), localIndexes2(3);
+    localIndexes1[0] = 0;
+    localIndexes1[1] = 1;
+    localIndexes1[2] = 2;
+
+    localIndexes2[0] = 2;
+    localIndexes2[1] = 3;
+    localIndexes2[2] = 0;
+
+    localTriangleIndexesContainer.push_back(localIndexes1);
+    localTriangleIndexesContainer.push_back(localIndexes2);
+
+    localIndexes1[0] = 3;
+    localIndexes1[1] = 0;
+    localIndexes1[2] = 1;
+
+    localIndexes2[0] = 1;
+    localIndexes2[1] = 2;
+    localIndexes2[2] = 3;
+
+    localTriangleIndexesContainer.push_back(localIndexes1);
+    localTriangleIndexesContainer.push_back(localIndexes2);
+}
+
+void FaceSearchingManager::GetTriangleIndexes(FaceSearching *parentFaceSearching, PHVectorInt2D &localTriangleIndexesContainer, PHVectorInt2D &triangleIndexesContainer)
+{
+    const PHVectorInt1D &originalFaceNodeIndexes = parentFaceSearching->GetNodeIndexes();
+
+    triangleIndexesContainer.resize(localTriangleIndexesContainer.size());
+    uint_t localTriangleIndexesContainerSize = localTriangleIndexesContainer.size();
+    for (int i = 0; i < localTriangleIndexesContainerSize; ++ i)
+    {
+        PHVectorInt1D &triangleIndexes = triangleIndexesContainer[i];
+        for (int iNode = 0; iNode < 3; ++ iNode)
+        {
+            triangleIndexes.push_back(originalFaceNodeIndexes[localTriangleIndexesContainer[i][iNode]]);
+        }
+    }
+}
+
+void FaceSearchingManager::SplitQuadrilateralToTriangle(FaceSearching *parentFaceSearching)
+{
+    uint_t numberOfNodes = parentFaceSearching->GetNumberOfNodes();
+    if (numberOfNodes <= 3) return;
+
+    PHVectorInt2D localTriangleIndexesContainer;
+    GetLocalTriangleIndexes(localTriangleIndexesContainer);
+
+    PHVectorInt2D triangleIndexesContainer;
+    GetTriangleIndexes(parentFaceSearching, localTriangleIndexesContainer, triangleIndexesContainer);
+    uint_t triangleIndexesContainerSize = triangleIndexesContainer.size();
+    for (int i = 0; i < triangleIndexesContainerSize; ++ i)
+    {
+        PHVectorInt1D &triangleIndexes = triangleIndexesContainer[i];
+
+        FaceSearching *faceSearching = new FaceSearching(triangleIndexes);
+        set<FaceSearching *, CompareFaceByMethod1>::iterator iter = FindFace(faceSearching);
+
+        if (iter != referenceFacesSet.end())
+        {
+            int faceIndex = (*iter)->GetFaceIndex();
+
+            int parentFaceIndex = parentFaceSearching->GetFaceIndex();
+            childFaceIndexes[parentFaceIndex].push_back(faceIndex);
+
+            relativeChildFaceNodeIndexes[faceIndex] = localTriangleIndexesContainer[i];
+        }
+
+        delete faceSearching;
+    }
+}
+
+InterfaceLinkStructure::InterfaceLinkStructure(RDouble *pmin, RDouble *pmax, RDouble tolerance, int nZones) : coordinateTree(3, pmin, pmax)
+{
+    this->tolerance = tolerance;
+    localInterfaceIndexToGlobalInterfaceIndexMapping.resize(nZones);
+
+    faceSearchingManager = new FaceSearchingManager();
+}
+
+InterfaceLinkStructure::~InterfaceLinkStructure()
+{
+    delete faceSearchingManager;
+}
+
+void InterfaceLinkStructure::CreateLinkInformation(PHVectorInt1D &facePointIndexes, int zoneIndex, int iLocalInterfaceCount)
+{
+    set< DataStruct_Sort< PHVectorInt1D > > &referenceInterfaceListForSearching = this->GetReferenceInterfaceListForSearching();
+    PHVectorInt2D &globalInterfaceIndexToZoneIndexesMapping           = this->GetGlobalInterfaceIndexToZoneIndexesMapping();
+    PHVectorInt2D &globalInterfaceIndexToLocalInterfaceIndexesMapping = this->GetGlobalInterfaceIndexToLocalInterfaceIndexesMapping();
+
+    int numberOfGlobalInterfaces = static_cast<int>(globalInterfaceIndexToZoneIndexesMapping.size());
+
+    AddFace(facePointIndexes);
+
+    sort(facePointIndexes.begin(), facePointIndexes.end());
+    DataStruct_Sort< PHVectorInt1D > face(facePointIndexes, numberOfGlobalInterfaces);
+    set< DataStruct_Sort< PHVectorInt1D > >::iterator iter = referenceInterfaceListForSearching.find(face);
+
+    if (iter == referenceInterfaceListForSearching.end())
+    {
+        PHVectorInt2D &localInterfaceIndexToGlobalInterfaceIndexMapping = this->GetLocalInterfaceIndexToGlobalInterfaceIndexMapping();
+
+        referenceInterfaceListForSearching.insert(face);
+        localInterfaceIndexToGlobalInterfaceIndexMapping[zoneIndex][iLocalInterfaceCount] = numberOfGlobalInterfaces;
+        PHVectorInt1D zoneIndexVector;
+        PHVectorInt1D localInterfaceIndexVector;
+        zoneIndexVector.push_back(zoneIndex);
+        localInterfaceIndexVector.push_back(iLocalInterfaceCount);
+
+        globalInterfaceIndexToZoneIndexesMapping.push_back(zoneIndexVector);
+        globalInterfaceIndexToLocalInterfaceIndexesMapping.push_back(localInterfaceIndexVector);
+    }
+    else
+    {
+        PHVectorInt2D &localInterfaceIndexToGlobalInterfaceIndexMapping = this->GetLocalInterfaceIndexToGlobalInterfaceIndexMapping();
+
+        int globalInterfaceIndex = iter->index;
+        localInterfaceIndexToGlobalInterfaceIndexMapping[zoneIndex][iLocalInterfaceCount] = globalInterfaceIndex;
+        globalInterfaceIndexToZoneIndexesMapping[globalInterfaceIndex].push_back(zoneIndex);
+        globalInterfaceIndexToLocalInterfaceIndexesMapping[globalInterfaceIndex].push_back(iLocalInterfaceCount);
+        referenceInterfaceListForSearching.erase(iter);
+    }
+}
+
+void InterfaceLinkStructure::CreateLinkInformationBySet(PHVectorInt1D &facePointIndexes, int zoneIndex, int iLocalInterfaceCount)
+{
+    set < DataStruct_Sort< set< int > > > &referenceInterfaceSetForSearching = this->GetReferenceInterfaceSetForSearching();
+    PHVectorInt2D &globalInterfaceIndexToZoneIndexesMapping = this->GetGlobalInterfaceIndexToZoneIndexesMapping();
+    PHVectorInt2D &globalInterfaceIndexToLocalInterfaceIndexesMapping = this->GetGlobalInterfaceIndexToLocalInterfaceIndexesMapping();
+
+    int numberOfGlobalInterfaces = static_cast<int>(globalInterfaceIndexToZoneIndexesMapping.size());
+
+    set< int > faceSet;
+    uint_t facePointIndexesSize = facePointIndexes.size();
+    for (int iNode = 0; iNode < facePointIndexesSize; ++ iNode)
+    {
+        faceSet.insert(facePointIndexes[iNode]);
+    }
+
+    DataStruct_Sort< set<int> > sortFaceSet(faceSet, numberOfGlobalInterfaces);
+
+    set < DataStruct_Sort< set< int > > > ::iterator iter = referenceInterfaceSetForSearching.find(sortFaceSet);
+    if (iter == referenceInterfaceSetForSearching.end())
+    {
+        PHVectorInt2D &localInterfaceIndexToGlobalInterfaceIndexMapping = this->GetLocalInterfaceIndexToGlobalInterfaceIndexMapping();
+
+        referenceInterfaceSetForSearching.insert(sortFaceSet);
+        localInterfaceIndexToGlobalInterfaceIndexMapping[zoneIndex][iLocalInterfaceCount] = numberOfGlobalInterfaces;
+
+        PHVectorInt1D zoneIndexVector;
+        PHVectorInt1D localInterfaceIndexVector;
+        zoneIndexVector.push_back(zoneIndex);
+        localInterfaceIndexVector.push_back(iLocalInterfaceCount);
+
+        globalInterfaceIndexToZoneIndexesMapping.push_back(zoneIndexVector);
+        globalInterfaceIndexToLocalInterfaceIndexesMapping.push_back(localInterfaceIndexVector);
+    }
+    else
+    {
+        PHVectorInt2D &localInterfaceIndexToGlobalInterfaceIndexMapping = this->GetLocalInterfaceIndexToGlobalInterfaceIndexMapping();
+
+        int globalInterfaceIndex = iter->index;
+        localInterfaceIndexToGlobalInterfaceIndexMapping[zoneIndex][iLocalInterfaceCount] = globalInterfaceIndex;
+        globalInterfaceIndexToZoneIndexesMapping [globalInterfaceIndex].push_back(zoneIndex);
+        globalInterfaceIndexToLocalInterfaceIndexesMapping[globalInterfaceIndex].push_back(iLocalInterfaceCount);
+        referenceInterfaceSetForSearching.erase(iter);
+    }
+}
+
+void InterfaceLinkStructure::MatchInterfaceTopology(Grid *grid)
+{
+    InterfaceInfo *interfaceInformation = grid->GetInterfaceInfo();
+    if (!interfaceInformation) return;
+    
+    int numberOfInterfaces = interfaceInformation->GetNIFace();
+    int currentZoneGlobalIndex = grid->GetZoneID();
+
+    int nPeoridic = 0;
+    
+    PHVectorInt2D &globalInterfaceIndexToZoneIndexesMapping           = this->GetGlobalInterfaceIndexToZoneIndexesMapping();
+    PHVectorInt2D &globalInterfaceIndexToLocalInterfaceIndexesMapping = this->GetGlobalInterfaceIndexToLocalInterfaceIndexesMapping();
+    PHVectorInt2D &localInterfaceIndexToGlobalInterfaceIndexMapping   = this->GetLocalInterfaceIndexToGlobalInterfaceIndexMapping();
+
+    uint_t numberOfNewInterfaces = localInterfaceIndexToGlobalInterfaceIndexMapping[currentZoneGlobalIndex].size();
+    
+    int *neighborZoneIndexContainer               = interfaceInformation->GetInterFace2ZoneID();
+    int *neighborZoneLocalInterfaceIndexContainer = interfaceInformation->GetInterFace2InterFaceID();
+
+    UnstructGrid *unstrGrid = UnstructGridCast(grid);
+    unstrGrid->ComputeMetrics();
+    RDouble *xfc = unstrGrid->GetFaceCenterX();
+    RDouble *yfc = unstrGrid->GetFaceCenterY();
+    RDouble *zfc = unstrGrid->GetFaceCenterZ();
+
+    for (int iLocalInterface = 0; iLocalInterface < numberOfNewInterfaces; ++ iLocalInterface)
+    {
+        int  globalInterfaceIndex   = localInterfaceIndexToGlobalInterfaceIndexMapping[currentZoneGlobalIndex][iLocalInterface];
+        bool findRequestedInterface = false;
+        uint_t numberOfZonesBelongToCurrentInterface = globalInterfaceIndexToZoneIndexesMapping[globalInterfaceIndex].size();
+
+        if (numberOfZonesBelongToCurrentInterface != 2)
+        {
+            if (numberOfZonesBelongToCurrentInterface > 2)
+            {
+                cout << " More than two faces coincide\n";
+            }
+            else
+            {
+                cout << " Less than two faces coincide\n";
+            }
+            cout << " Current ZoneIndex  = " << currentZoneGlobalIndex << "\n";
+            cout << " numberOfZonesBelongToCurrentInterface = " << numberOfZonesBelongToCurrentInterface << "\n";
+            cout << " LocalInterface Index = " << iLocalInterface << " numberOfInterfaces = " << numberOfInterfaces << "\n";
+        }
+        
+
+        for (int iZoneBelongToCurrentInterface = 0; iZoneBelongToCurrentInterface < numberOfZonesBelongToCurrentInterface; ++ iZoneBelongToCurrentInterface)
+        {
+            int candidateNeighborZoneIndex               = globalInterfaceIndexToZoneIndexesMapping[globalInterfaceIndex][iZoneBelongToCurrentInterface];
+            int candidateNeighborZonelocalInterfaceIndex = globalInterfaceIndexToLocalInterfaceIndexesMapping[globalInterfaceIndex][iZoneBelongToCurrentInterface];
+
+            if ((candidateNeighborZoneIndex != currentZoneGlobalIndex) || (candidateNeighborZonelocalInterfaceIndex != iLocalInterface))
+            {
+                neighborZoneIndexContainer              [iLocalInterface] = candidateNeighborZoneIndex;
+                neighborZoneLocalInterfaceIndexContainer[iLocalInterface] = candidateNeighborZonelocalInterfaceIndex;
+                findRequestedInterface = true;
+                break;
+            }
+        }
+
+        if (!findRequestedInterface)
+        {
+            int bcFaceID = interfaceInformation->GetInterFace2BoundaryFace()[globalInterfaceIndex];
+            cout << "   Face center: " << xfc[bcFaceID] << " " << yfc[bcFaceID] << " " << zfc[bcFaceID] << "  ";
+            cout << "iLocalInterface = " << iLocalInterface << ", neighbor zone can not been found!!!\n";
+            ++ nPeoridic;
+            TK_Exit::ExceptionExit("Wrong neighbor zone interface!");
+        }
+    }
+}
+
+void InterfaceLinkStructure::ReconstructInterfaceTopology()
+{
+    FaceSearchingManager *faceSearchingManager = GetFaceSearchingManager();
+    faceSearchingManager->ComputeNewFaceIndex();
+}
+
+void InterfaceLinkStructure::InitializeInterface(Grid *grid)
+{
+    int zoneIndex = grid->GetZoneID();
+    int numberOfInterfaces = grid->GetNIFace();
+
+    PHVectorInt2D &localInterfaceIndexToGlobalInterfaceIndexMapping = this->GetLocalInterfaceIndexToGlobalInterfaceIndexMapping();
+    localInterfaceIndexToGlobalInterfaceIndexMapping[zoneIndex].resize(numberOfInterfaces);
+}
+
+void InterfaceLinkStructure::InitializeInterface(ZoneInterface *zoneInterfaceTopology)
+{
+    int zoneIndex = zoneInterfaceTopology->GetZoneIndex();
+    uint_t numberOfInterfaces = zoneInterfaceTopology->GetNumberOfFaces();
+
+    PHVectorInt2D &localInterfaceIndexToGlobalInterfaceIndexMapping = this->GetLocalInterfaceIndexToGlobalInterfaceIndexMapping();
+    localInterfaceIndexToGlobalInterfaceIndexMapping[zoneIndex].resize(numberOfInterfaces);
+}
+
+void InterfaceLinkStructure::InitializeNewLocalGlobalInterfaceMapping()
+{
+    PHVectorInt2D &globalInterfaceIndexToZoneIndexesMapping           = this->GetGlobalInterfaceIndexToZoneIndexesMapping();
+    PHVectorInt2D &globalInterfaceIndexToLocalInterfaceIndexesMapping = this->GetGlobalInterfaceIndexToLocalInterfaceIndexesMapping();
+
+    PHVectorInt2D &newGlobalInterfaceIndexToZoneIndexesMapping           = this->GetNewGlobalInterfaceIndexToZoneIndexesMapping();
+    PHVectorInt2D &newGlobalInterfaceIndexToLocalInterfaceIndexesMapping = this->GetNewGlobalInterfaceIndexToLocalInterfaceIndexesMapping ();
+
+    newGlobalInterfaceIndexToZoneIndexesMapping           = globalInterfaceIndexToZoneIndexesMapping;
+    newGlobalInterfaceIndexToLocalInterfaceIndexesMapping = globalInterfaceIndexToLocalInterfaceIndexesMapping;
+}
+
+void InterfaceLinkStructure::UpdateLocalGlobalInterfaceMapping()
+{
+    PHVectorInt2D &globalInterfaceIndexToZoneIndexesMapping           = this->GetGlobalInterfaceIndexToZoneIndexesMapping();
+    PHVectorInt2D &globalInterfaceIndexToLocalInterfaceIndexesMapping = this->GetGlobalInterfaceIndexToLocalInterfaceIndexesMapping();
+
+    PHVectorInt2D &newGlobalInterfaceIndexToZoneIndexesMapping           = this->GetNewGlobalInterfaceIndexToZoneIndexesMapping();
+    PHVectorInt2D &newGlobalInterfaceIndexToLocalInterfaceIndexesMapping = this->GetNewGlobalInterfaceIndexToLocalInterfaceIndexesMapping ();
+
+    globalInterfaceIndexToZoneIndexesMapping           = newGlobalInterfaceIndexToZoneIndexesMapping;
+    globalInterfaceIndexToLocalInterfaceIndexesMapping = newGlobalInterfaceIndexToLocalInterfaceIndexesMapping;
+}
+
+void InterfaceLinkStructure::InitializeStatusContainerOfGlobalFaces()
+{
+    PHVectorInt1D &statusContainerOfGlobalFaces = GetStatusContainerOfGlobalFaces();
+
+    PHVectorInt2D &globalInterfaceIndexToLocalInterfaceIndexesMapping = this->GetGlobalInterfaceIndexToLocalInterfaceIndexesMapping();
+    int numberOfTotalInterfaces = static_cast<int>(globalInterfaceIndexToLocalInterfaceIndexesMapping.size());
+
+    statusContainerOfGlobalFaces.resize(numberOfTotalInterfaces);
+    SetField(statusContainerOfGlobalFaces, INVALID_INDEX, numberOfTotalInterfaces);
+}
+
+void InterfaceLinkStructure::AddFace(const PHVectorInt1D &facePointIndexes)
+{
+    FaceSearchingManager *faceSearchingManager = GetFaceSearchingManager();
+    faceSearchingManager->AddFace(facePointIndexes);
+}
+
+void CreateLinkInformation(PHVectorInt1D &facePointIndexes, int zoneIndex, int iLocalInterfaceCount, InterfaceLinkStructure *interfaceLinkStructure)
+{
+    interfaceLinkStructure->CreateLinkInformation(facePointIndexes, zoneIndex, iLocalInterfaceCount);
+}
+
+}
diff --git a/Mesh/src/Mesh_CellTopo.cpp b/Mesh/src/Mesh_CellTopo.cpp
new file mode 100644
index 0000000..488b777
--- /dev/null
+++ b/Mesh/src/Mesh_CellTopo.cpp
@@ -0,0 +1,114 @@
+#include "Mesh_CellTopo.h"
+#include "PHHeader.h"
+#include "Geo_Element.h"
+
+namespace PHSPACE
+{
+
+Mesh_CellTopo::Mesh_CellTopo()
+{
+    cellType.resize(0);
+    cellLevel.resize(0);
+    parentCellIndex.resize(0);
+
+    computationalToGlobalCellIndex.resize(0);
+    globalToComputationalCellIndex.resize(0);
+}
+
+Mesh_CellTopo::~Mesh_CellTopo()
+{
+
+}
+
+int Mesh_CellTopo::GetNTotalCell()
+{
+    return static_cast<int>(cellType.size());
+}
+
+void Mesh_CellTopo::SetAllCellLevelToZero()
+{
+    int nTotalCell = GetNTotalCell();
+
+    PHVectorInt1D &cellLevel = GetCellLevel();
+    cellLevel.resize(nTotalCell);
+
+    SetField(cellLevel, 0, nTotalCell);
+}
+
+void Mesh_CellTopo::SetAllParentIndexToRootState()
+{
+    int nTotalCell = GetNTotalCell();
+
+    PHVectorInt1D &parentCellIndex = GetParentCellIndex();
+    parentCellIndex.resize(nTotalCell);
+
+    SetField(parentCellIndex, PHSPACE::INVALID_INDEX, nTotalCell);
+}
+
+void Mesh_CellTopo::SetCellType(int cellIndex, int cellTypeIn)
+{
+    this->cellType[cellIndex] = cellTypeIn;
+}
+
+void Mesh_CellTopo::SetCellModifiedStatus(int cellIndex, int cellModifiedStatusIn)
+{
+    this->cellModifiedStatus[cellIndex] = cellModifiedStatusIn;
+}
+
+void Mesh_CellTopo::SetComputationalStatusOfCell(int cellIndex, int computationalStatusOfCell)
+{
+    this->cellComputationalStatus[cellIndex] = computationalStatusOfCell;
+}
+
+void Mesh_CellTopo::SetCell2Node(int cellIndex, PHVectorInt1D &cell2NodeIn)
+{
+    this->cell2Node[cellIndex] = cell2NodeIn;
+}
+
+void Mesh_CellTopo::SetParentCellIndex(int cellIndex, int parentCellIndexIn)
+{
+    this->parentCellIndex[cellIndex] = parentCellIndexIn;
+}
+
+void Mesh_CellTopo::SetCellLevel(int cellIndex, int cellLevelIn)
+{
+    this->cellLevel[cellIndex] = cellLevelIn;
+}
+
+bool Mesh_CellTopo::ElementNeedSplit(int cellIndex)
+{
+    return cellModifiedStatus[cellIndex] == SPLIT;
+}
+
+void Mesh_CellTopo::AddCell(PHVectorInt1D &cell2Node, int cellType, int cellLevel, int parentCellIndex)
+{
+    int cellIndex = GetNTotalCell();
+    ResizeCellNumber(cellIndex + 1);
+
+    SetCell2Node(cellIndex, cell2Node);
+    SetCellType(cellIndex, cellType);
+    SetParentCellIndex(cellIndex, parentCellIndex);
+    SetCellLevel(cellIndex, cellLevel);
+
+    SetCellModifiedStatus(cellIndex, NOCHANGE);
+    SetComputationalStatusOfCell(cellIndex, ON);
+
+    PHVectorInt1D &childrenCellIndexe = GetChildrenCellIndexe(parentCellIndex);
+    childrenCellIndexe.push_back(cellIndex);
+
+    globalToComputationalCellIndex[cellIndex] = INVALID_INDEX;
+}
+
+void Mesh_CellTopo::ResizeCellNumber(int nTotalCellIn)
+{
+    this->cell2Node.resize(nTotalCellIn);
+    this->cellType.resize(nTotalCellIn);
+    this->cellLevel.resize(nTotalCellIn);
+    this->cellModifiedStatus.resize(nTotalCellIn);
+    this->cellComputationalStatus.resize(nTotalCellIn);
+    this->parentCellIndex.resize(nTotalCellIn);
+    this->childrenCellIndexes.resize(nTotalCellIn);
+    this->globalToComputationalCellIndex.resize(nTotalCellIn);
+}
+
+}
\ No newline at end of file
diff --git a/Mesh/src/Mesh_ConstructInterfaceLink.cpp b/Mesh/src/Mesh_ConstructInterfaceLink.cpp
new file mode 100644
index 0000000..53899fe
--- /dev/null
+++ b/Mesh/src/Mesh_ConstructInterfaceLink.cpp
@@ -0,0 +1,519 @@
+#include "Mesh_ConstructInterfaceLink.h"
+#include "PHMpi.h"
+#include "Geo_SimpleBC.h"
+#include "PHHeader.h"
+#include "GridType.h"
+#include "Glb_Dimension.h"
+#include "Pre_GridConversion.h"
+#include "TK_Log.h"
+
+namespace PHSPACE
+{
+
+Mesh_ConstructInterfaceLink::Mesh_ConstructInterfaceLink(Grid **gridIn, int nZonesInCurrentProcessIn)
+{
+    this->nZonesInCurrentProcess = nZonesInCurrentProcessIn;
+    this->gridContainer          = gridIn;
+    this->nZonesGlobal           = 0;
+    this->zoneProc               = 0;
+    this->localZoneIndex         = 0;
+
+    this->zoneInterfacesTopologyList.resize(0);
+}
+
+Mesh_ConstructInterfaceLink::~Mesh_ConstructInterfaceLink()
+{
+    if (zoneProc)
+    {
+        delete [] zoneProc; zoneProc = nullptr;
+    }
+
+    if (localZoneIndex)
+    {
+        delete [] localZoneIndex; localZoneIndex = nullptr;
+    }
+
+    for (int iZone = 0; iZone < zoneInterfacesTopologyList.size(); ++ iZone)
+    {
+        delete zoneInterfacesTopologyList[iZone];
+    }
+}
+
+void Mesh_ConstructInterfaceLink::Run()
+{
+    ReorderGridIndex();
+
+    ChangeNoBoundaryCondition();
+
+    BuildZoneInterfacesInfo();
+
+    ConstructInterfaceLink();
+}
+
+void Mesh_ConstructInterfaceLink::CollectUnsGridInterfaceInfo(Grid *grid, DataContainer *cdata)
+{
+    UnstructGrid *unsGrid = UnstructGridCast(grid);
+
+    int gridIndex = unsGrid->GetZoneID();
+    PHWrite(cdata, gridIndex);
+
+    int nIFace = unsGrid->CompNIFace();
+    PHWrite(cdata, nIFace);
+
+    InterfaceInfo *interfaceInfo = 0;
+    if (0 == nIFace)
+    {
+        unsGrid->SetInterfaceInfo(interfaceInfo);
+        return;
+    }
+
+    interfaceInfo = new InterfaceInfo(nIFace);
+    unsGrid->SetInterfaceInfo(interfaceInfo);
+    int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+
+    RDouble *minBox = unsGrid->GetMinBox();
+    RDouble *maxBox = unsGrid->GetMaxBox();
+    PHWrite(cdata, minBox, 3);
+    PHWrite(cdata, maxBox, 3);
+
+    RDouble disMin, disMax;
+    unsGrid->GetMinMaxDS(disMin, disMax);
+    PHWrite(cdata, disMin);
+    PHWrite(cdata, disMax);
+
+    int numberOfNodes = unsGrid->GetNTotalNode();
+    vector< bool > isInterfaceNode(numberOfNodes);
+    SetField(isInterfaceNode, false, numberOfNodes);
+
+    int *faceNodeNumberContainer = unsGrid->GetNodeNumberOfEachFace();
+    int *faceNodeIndexContainer  = unsGrid->GetFace2Node();
+    int  numberOfBoundaryFaces   = unsGrid->GetNBoundFace();
+
+    UnstructBCSet **bcRegion = unsGrid->GetBCRecord();
+
+    int *nodeNumOfFaceLocal = new int[nIFace];
+    int faceNodeLocalSize = 0;
+    int interfaceIndex = 0;
+    int nodePosition = 0;
+    for (int iBFace = 0; iBFace < numberOfBoundaryFaces; ++ iBFace)
+    {
+        int bcType = bcRegion[iBFace]->GetKey();
+        int faceNodeNumber = faceNodeNumberContainer[iBFace];
+        if (!IsInterface(bcType))
+        {
+            nodePosition += faceNodeNumber;
+            continue;
+        }
+
+        for (int iNode = 0; iNode < faceNodeNumber; ++ iNode)
+        {
+            int nodeIndex = faceNodeIndexContainer[nodePosition + iNode];
+            isInterfaceNode[nodeIndex] = true;
+        }
+
+        interFace2BoundaryFace[interfaceIndex] = iBFace;
+        nodeNumOfFaceLocal[interfaceIndex] = faceNodeNumber;
+        faceNodeLocalSize += faceNodeNumber;
+        ++ interfaceIndex;
+
+        nodePosition += faceNodeNumber;
+    }
+
+    int numberOfNodesOnInterfaces = 0;
+    PHVectorInt1D globalNodeIndexToLocalNodeIndex(numberOfNodes);
+    SetField(globalNodeIndexToLocalNodeIndex, -1, numberOfNodes);
+    for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        if (isInterfaceNode[iNode])
+        {
+            globalNodeIndexToLocalNodeIndex[iNode] = numberOfNodesOnInterfaces;
+            ++ numberOfNodesOnInterfaces;
+        }
+    }
+
+    RDouble *x    = unsGrid->GetX();
+    RDouble *y    = unsGrid->GetY();
+    RDouble *z    = unsGrid->GetZ();
+    RDouble *xNew = new RDouble[numberOfNodesOnInterfaces];
+    RDouble *yNew = new RDouble[numberOfNodesOnInterfaces];
+    RDouble *zNew = new RDouble[numberOfNodesOnInterfaces];
+
+    numberOfNodesOnInterfaces = 0;
+    for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+    {
+        if (isInterfaceNode[iNode])
+        {
+            xNew[numberOfNodesOnInterfaces] = x[iNode];
+            yNew[numberOfNodesOnInterfaces] = y[iNode];
+            zNew[numberOfNodesOnInterfaces] = z[iNode];
+
+            ++ numberOfNodesOnInterfaces;
+        }
+    }
+
+    PHWrite(cdata, numberOfNodesOnInterfaces);
+    PHWrite(cdata, xNew, numberOfNodesOnInterfaces);
+    PHWrite(cdata, yNew, numberOfNodesOnInterfaces);
+    PHWrite(cdata, zNew, numberOfNodesOnInterfaces);
+    delete [] xNew; xNew = nullptr;
+    delete [] yNew; yNew = nullptr;
+    delete [] zNew; zNew = nullptr;
+
+    int *face2NodeLocal = new int[faceNodeLocalSize];
+    int nodePos = 0;
+    nodePosition = 0;
+    for (int iBFace = 0; iBFace < numberOfBoundaryFaces; ++ iBFace)
+    {
+        int bcType = bcRegion[iBFace]->GetKey();
+        int faceNodeNumber = faceNodeNumberContainer[iBFace];
+        if (!IsInterface(bcType))
+        {
+            nodePosition += faceNodeNumber;
+            continue;
+        }
+
+        for (int iNode = 0; iNode < faceNodeNumber; ++ iNode)
+        {
+            int globalNodeIndex = faceNodeIndexContainer[nodePosition + iNode];
+            int localNodeIndex  = globalNodeIndexToLocalNodeIndex[globalNodeIndex];
+            face2NodeLocal[nodePos] = localNodeIndex;
+            nodePos ++;
+        }
+
+        nodePosition += faceNodeNumber;
+    }
+
+    PHWrite(cdata, nodeNumOfFaceLocal, nIFace);
+    PHWrite(cdata, face2NodeLocal    , faceNodeLocalSize);
+    delete [] nodeNumOfFaceLocal; nodeNumOfFaceLocal = nullptr;
+    delete [] face2NodeLocal; face2NodeLocal = nullptr;
+}
+
+void Mesh_ConstructInterfaceLink::DecodeInterfaceInfo(ZoneInterface *zoneInterface, DataContainer *cdata)
+{
+    cdata->moveto_begin();
+
+    int zoneIndex = -1;
+    PHRead(cdata, zoneIndex);
+    zoneInterface->SetZoneIndex(zoneIndex);
+
+    int nIFace = 0;
+    PHRead(cdata, nIFace);
+
+    RDouble *minBox = new RDouble[3];
+    RDouble *maxBox = new RDouble[3];
+    PHRead(cdata, minBox, 3);
+    PHRead(cdata, maxBox, 3);
+    zoneInterface->SetMinBox(minBox);
+    zoneInterface->SetMaxBox(maxBox);
+
+    RDouble disMin, disMax;
+    PHRead(cdata, disMin);
+    PHRead(cdata, disMax);
+    zoneInterface->SetMinMaxDistance(disMin, disMax);
+
+    int numberOfNodesOnInterfaces = 0;
+    PHRead(cdata, numberOfNodesOnInterfaces);
+    zoneInterface->SetNumberOfNodes(numberOfNodesOnInterfaces);
+
+    RDouble *xCoor = new RDouble[numberOfNodesOnInterfaces];
+    RDouble *yCoor = new RDouble[numberOfNodesOnInterfaces];
+    RDouble *zCoor = new RDouble[numberOfNodesOnInterfaces];
+    PHRead(cdata, xCoor, numberOfNodesOnInterfaces);
+    PHRead(cdata, yCoor, numberOfNodesOnInterfaces);
+    PHRead(cdata, zCoor, numberOfNodesOnInterfaces);
+    zoneInterface->SetX(xCoor);
+    zoneInterface->SetY(yCoor);
+    zoneInterface->SetZ(zCoor);
+
+    int *nodeNumOfFace = new int[nIFace];
+    PHRead(cdata, nodeNumOfFace, nIFace);
+
+    int faceNodeSize = 0;
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        faceNodeSize += nodeNumOfFace[iFace];
+    }
+
+    int *face2Node = new int[faceNodeSize];
+    PHRead(cdata, face2Node, faceNodeSize);
+
+    PHVectorInt2D &faceNodeIndexContainerOfZoneInterfaces = zoneInterface->GetFaceNodeIndexContainer();
+    faceNodeIndexContainerOfZoneInterfaces.resize(nIFace);
+
+    int nodepos = 0;
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        int nodeNumber = nodeNumOfFace[iFace];
+        faceNodeIndexContainerOfZoneInterfaces[iFace].resize(nodeNumber);
+
+        for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+        {
+            faceNodeIndexContainerOfZoneInterfaces[iFace][iNode] = face2Node[nodepos];
+            nodepos ++;
+        }
+    }
+
+    delete [] nodeNumOfFace; nodeNumOfFace = nullptr;
+    delete [] face2Node; face2Node = nullptr;
+}
+
+void Mesh_ConstructInterfaceLink::BuildZoneInterfacesInfo()
+{
+    int myid  = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < nZonesGlobal; ++ iZone)
+    {
+        DataContainer *cdata = new DataContainer();
+        cdata->moveto_begin();
+
+        int sendProc = zoneProc[iZone];
+        int tag = iZone;
+
+        if (sendProc == myid)
+        {
+            int localGridIndex = this->localZoneIndex[iZone];
+            int gridType = gridContainer[localGridIndex]->Type();
+            if (gridType == PHSPACE::UNSTRUCTGRID)
+            {
+                CollectUnsGridInterfaceInfo(gridContainer[localGridIndex], cdata);
+            }
+            else
+            {
+
+            }
+
+        }
+
+        PHMPI::PH_Bcast(cdata, sendProc, tag);
+        cdata->moveto_begin();
+
+        int neighborZoneIndex = -1;
+        PHRead(cdata, neighborZoneIndex);
+
+        int nIFace = 0;
+        PHRead(cdata, nIFace);
+
+        if (0 == nIFace)
+        {
+            delete cdata;
+            continue;
+        }
+
+        RDouble *neighborMinBox = new RDouble[3];
+        RDouble *neighborMaxBox = new RDouble[3];
+        PHRead(cdata, neighborMinBox, 3);
+        PHRead(cdata, neighborMaxBox, 3);
+
+        RDouble disMin, disMax;
+        PHRead(cdata, disMin);
+        PHRead(cdata, disMax);
+
+        RDouble dist = half * disMin;
+
+        bool currentZoneIsNeighbor = false;
+        for (int iZone = 0; iZone < nZonesInCurrentProcess; ++ iZone)
+        {
+            RDouble *minBox = gridContainer[iZone]->GetMinBox();
+            RDouble *maxBox = gridContainer[iZone]->GetMaxBox();
+
+            if (!(neighborMinBox[0] > (maxBox[0] + dist) || neighborMaxBox[0] < (minBox[0] - dist) ||
+                  neighborMinBox[1] > (maxBox[1] + dist) || neighborMaxBox[1] < (minBox[1] - dist) ||
+                  neighborMinBox[2] > (maxBox[2] + dist) || neighborMaxBox[2] < (minBox[2] - dist)))
+            {
+                currentZoneIsNeighbor = true;
+                break;
+            }
+        }
+        delete [] neighborMinBox; neighborMinBox = nullptr;
+        delete [] neighborMaxBox; neighborMaxBox = nullptr;
+
+        if (!currentZoneIsNeighbor)
+        {
+            delete cdata;
+            continue;
+        }
+
+        ZoneInterface *zoneInterfacesTopology = new ZoneInterface();
+        DecodeInterfaceInfo(zoneInterfacesTopology, cdata);
+
+        zoneInterfacesTopologyList.push_back(zoneInterfacesTopology);
+        delete cdata;
+    }
+
+}
+
+void Mesh_ConstructInterfaceLink::BuildGridLink(int iZone, LinkStruct *link)
+{
+    ZoneInterface *currentZoneInterfaceInfo = zoneInterfacesTopologyList[iZone];
+
+    int zoneIndex = currentZoneInterfaceInfo->GetZoneIndex();
+    int nIFace    = currentZoneInterfaceInfo->GetNumberOfFaces();
+
+    VVInt &facemap = link->GetFaceMap();
+    facemap[zoneIndex].resize(nIFace);
+
+    RDouble *x = currentZoneInterfaceInfo->GetX();
+    RDouble *y = currentZoneInterfaceInfo->GetY();
+    RDouble *z = currentZoneInterfaceInfo->GetZ();
+
+    PHVectorInt2D &faceNodeIndexContainerOfZoneInterfaces = currentZoneInterfaceInfo->GetFaceNodeIndexContainer();
+
+    int maxlist = 0;
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        int nodeNum = faceNodeIndexContainerOfZoneInterfaces[iFace].size();
+        maxlist = MAX(maxlist, nodeNum);
+    }
+
+    RDouble *xlist = new RDouble[maxlist];
+    RDouble *ylist = new RDouble[maxlist];
+    RDouble *zlist = new RDouble[maxlist];
+
+    vector<int> index(maxlist), pindex(maxlist);
+
+    RDouble                          tol       = link->GetTolerance();
+    VVInt                           &zoneid    = link->GetZoneID();
+    VVInt                           &faceid    = link->GetFaceID();
+    LinkStruct::AdtTree             &coor_tree = link->GetCoordinateTree();
+    set < DataStruct_Sort< VInt > > &facelist  = link->GetFaceList();
+
+    uint_t fcount = zoneid.size();
+    int    pcount = coor_tree.GetNodeNum();
+    for (int iFace = 0; iFace < nIFace; ++ iFace)
+    {
+        int nodeNum = faceNodeIndexContainerOfZoneInterfaces[iFace].size();
+        for (int iNode = 0; iNode < nodeNum; ++ iNode)
+        {
+            index[iNode] = faceNodeIndexContainerOfZoneInterfaces[iFace][iNode];
+        }
+        pindex.resize(nodeNum);
+
+        GetFaceCoorList(index, nodeNum, xlist, ylist, zlist, x, y, z);
+        GetCoorIndexList(&coor_tree, tol, pcount, xlist, ylist, zlist, nodeNum, pindex);
+        Create_Link_Info(pindex, zoneIndex, iFace, fcount, facelist, zoneid, faceid, link);
+    }
+
+    delete [] xlist; xlist = nullptr;
+    delete [] ylist; ylist = nullptr;
+    delete [] zlist; zlist = nullptr;
+}
+
+void Mesh_ConstructInterfaceLink::ConstructInterfaceLink()
+{
+    RDouble mindis, maxdis, pmin[3], pmax[3];
+
+    GetBoundingBox(pmin, pmax);
+    GetMinMaxDS(mindis, maxdis);
+
+    if (GetDim() == TWO_D)
+    {
+        pmin[2] -= mindis;
+        pmax[2] += maxdis;
+    }
+
+    LinkStruct link(pmin, pmax, mindis / 2.0, this->nZonesGlobal);
+    for (int iZone = 0; iZone < zoneInterfacesTopologyList.size(); ++ iZone)
+    {
+        BuildGridLink(iZone, &link);
+    }
+
+    for (int iZone = 0; iZone < nZonesInCurrentProcess; ++ iZone)
+    {
+        MatchInterface(gridContainer[iZone], &link);
+    }
+}
+
+void Mesh_ConstructInterfaceLink::GetBoundingBox(RDouble *pmin, RDouble *pmax)
+{
+    pmin[0] = LARGE;
+    pmin[1] = LARGE;
+    pmin[2] = LARGE;
+
+    pmax[0] = - LARGE;
+    pmax[1] = - LARGE;
+    pmax[2] = - LARGE;
+
+    for (int iZone = 0; iZone < zoneInterfacesTopologyList.size(); ++ iZone)
+    {
+        RDouble *local_pmin = zoneInterfacesTopologyList[iZone]->GetMinBox();
+        RDouble *local_pmax = zoneInterfacesTopologyList[iZone]->GetMaxBox();
+
+        pmin[0] = MIN(pmin[0], local_pmin[0]);
+        pmin[1] = MIN(pmin[1], local_pmin[1]);
+        pmin[2] = MIN(pmin[2], local_pmin[2]);
+
+        pmax[0] = MAX(pmax[0], local_pmax[0]);
+        pmax[1] = MAX(pmax[1], local_pmax[1]);
+        pmax[2] = MAX(pmax[2], local_pmax[2]);
+    }
+}
+
+void Mesh_ConstructInterfaceLink::GetMinMaxDS(RDouble &mindis, RDouble &maxdis)
+{
+    mindis =   LARGE;
+    maxdis = - LARGE;
+
+    for (int iZone = 0; iZone < zoneInterfacesTopologyList.size(); ++ iZone)
+    {
+        RDouble dismin, dismax;
+        zoneInterfacesTopologyList[iZone]->GetMinMaxDistance(dismin, dismax);
+
+        mindis = MIN(mindis, dismin);
+        maxdis = MAX(maxdis, dismax);
+    }
+}
+
+void Mesh_ConstructInterfaceLink::ReorderGridIndex()
+{
+    int nProc = PHMPI::GetNumberOfProcessor();
+    int myid  = PHMPI::GetCurrentProcessorID();
+
+    int *nZonesOfEachProcessor = new int[nProc]();
+    PH_AllGather(&nZonesInCurrentProcess, 1, nZonesOfEachProcessor, 1);
+
+    int zoneInsexStart = 0;
+    for (int iProc = 0; iProc < myid; ++ iProc)
+    {
+        zoneInsexStart += nZonesOfEachProcessor[iProc];
+    }
+
+    PH_AllReduce(&nZonesInCurrentProcess, &nZonesGlobal, 1, PH_SUM);
+    this->localZoneIndex = new int[nZonesGlobal];
+    this->zoneProc       = new int[nZonesGlobal];
+
+    int *tempZoneProc = new int[nZonesGlobal];
+    SetField(tempZoneProc, 0, nZonesGlobal);
+
+    for (int iZone = 0; iZone < nZonesInCurrentProcess; ++ iZone)
+    {
+        int gridIndex = iZone + zoneInsexStart;
+        gridContainer[iZone]->SetZoneID(gridIndex);
+        gridContainer[iZone]->SetZoneLocalID(iZone);
+
+        tempZoneProc[gridIndex]   = myid;
+        localZoneIndex[gridIndex] = iZone;
+    }
+
+    PH_AllReduce(tempZoneProc, zoneProc, nZonesGlobal, MPI_SUM);
+    delete [] tempZoneProc; tempZoneProc = nullptr;
+}
+
+void Mesh_ConstructInterfaceLink::ChangeNoBoundaryCondition()
+{
+    int ignoreNoBoundaryCondition = GlobalDataBase::GetIntParaFromDB("omit_no_bound_bc");
+    if (ignoreNoBoundaryCondition == 1)
+    {
+        return;
+    }
+
+    for (int iZone = 0; iZone < nZonesInCurrentProcess; ++ iZone)
+    {
+        Grid *grid = gridContainer[iZone];
+        grid->ChangeBCType(PHENGLEI::NO_BOUNDARY_CONDITION, PHENGLEI::INTERFACE);
+    }
+}
+
+
+
+
+}
\ No newline at end of file
diff --git a/Mesh/src/Mesh_Deformation.cpp b/Mesh/src/Mesh_Deformation.cpp
new file mode 100644
index 0000000..ba05396
--- /dev/null
+++ b/Mesh/src/Mesh_Deformation.cpp
@@ -0,0 +1,485 @@
+#include "Mesh_Deformation.h"
+#include "Mesh_DeformationSPRING.h"
+#include "Mesh_DeformationRBF.h"
+#include "PHIO.h"
+#include "IO_FileName.h"
+#include "GeometryUnit.h"
+#include "TK_Log.h"
+
+namespace PHSPACE
+{
+
+Mesh_Deformation::Mesh_Deformation(int nZonesIn, Grid **stationalGridIn)
+{
+    this->numberOfZones = nZonesIn;
+    this->stationalGrid = stationalGridIn;
+
+    this->deformedGrid = 0;
+    this->deformParameter = 0;
+}
+
+Mesh_Deformation::~Mesh_Deformation()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        delete deformedGrid[iZone];
+    }
+    delete [] deformedGrid;
+}
+
+void Mesh_Deformation::SetDeformParameter(DeformParameter *deformParameterIn)
+{
+    this->deformParameter = deformParameterIn;
+}
+
+void Mesh_Deformation::Run()
+{
+    TransformGrid();
+    MatchControlPoints();
+    Deforming();
+}
+
+void Mesh_Deformation::SetNodeAttribute(DynamicGrid *grid)
+{
+    int nTotalNode = grid->GetNTotalNode();
+    int nBoundFace = grid->GetNBoundFace();
+
+    DYFace *faceArray = grid->GetFaceArray();
+    DYNode *nodeArray = grid->GetNodeArray();
+
+    for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+    {
+        nodeArray[iNode].moveType = DYNAMIC_POINT_FIELD;
+    }
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        int bctype = faceArray[iFace].bcType;
+        if (bctype != PHENGLEI::SYMMETRY)
+        {
+            int *face2node = faceArray[iFace].face2node;
+            for (int iNode = 0; iNode < faceArray[iFace].nodeNumber; ++ iNode)
+            {
+                int nodeIndex = face2node[iNode];
+                nodeArray[nodeIndex].moveType = STATIC_POINT;
+            }
+        }
+    }
+}
+
+void Mesh_Deformation::SetSymmetryToZero()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        DynamicGrid *grid = deformedGrid[iZone];
+        grid->SetSymmetryToZero();
+    }
+}
+
+void Mesh_Deformation::PostVisual(string visualFileName, int iStep)
+{
+    string fileName = AddSymbolToFileName(visualFileName, "_", iStep);
+    fstream visualFile;
+    OpenFile(visualFile, fileName, ios::out);
+    visualFile.setf(ios::scientific);
+    visualFile.precision(6);
+
+    visualFile << "TITLE     = \"3D Grid\"\n";
+    visualFile << "VARIABLES = \"X\"\n";
+    visualFile << "            \"Y\"\n";
+    visualFile << "            \"Z\"\n";
+
+    const int OUT   = 1;
+    const int UNOUT = 2;
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        DynamicGrid *grid = deformedGrid[iZone];
+
+        int nTotalNode = grid->GetNTotalNode();
+        int nTotalFace = grid->GetNTotalFace();
+        int nTotalCell = grid->GetNTotalCell();
+
+        DYNode *nodeArray = grid->GetNodeArray();
+        DYFace *faceArray = grid->GetFaceArray();
+
+        int nNodesOut, nFacesOut;
+
+        int *nodeMark       = new int[nTotalNode];
+        int *faceMark       = new int[nTotalFace];
+        int *cellMark       = new int[nTotalCell];
+        int *localNodeIndex = new int[nTotalNode];
+
+        //! Dump wall
+        for (int iNode = 0 ; iNode < nTotalNode; ++ iNode)
+        {
+            nodeMark[iNode] = UNOUT;
+            localNodeIndex[iNode] = -1;
+        }
+
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            faceMark[iFace] = UNOUT;
+        }
+
+        nFacesOut = 0;
+        int *face2node;
+        for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+        {
+            if (faceArray[iFace].bcType == PHENGLEI::SOLID_SURFACE)
+            {
+                ++ nFacesOut;
+                face2node = faceArray[iFace].face2node;
+                for (int iNode = 0; iNode < faceArray[iFace].nodeNumber; ++ iNode)
+                {
+                    int nodeIndex = face2node[iNode];
+                    nodeMark[nodeIndex] = OUT;
+                }
+            }
+        }
+
+        nNodesOut = 0;
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            if (nodeMark[iNode] == OUT)
+            {
+                localNodeIndex[iNode] = nNodesOut;
+                nNodesOut ++;
+            }
+        }
+
+        if (nNodesOut)
+        {
+            visualFile << "ZONE T=\" Grid" << iZone << " SolidSurface \"\n";
+            visualFile << "N= " << nNodesOut << ", E= " << nFacesOut << ", F=FEPOINT, ET=Quadrilateral\n";
+            visualFile << "DT=(SINGLE SINGLE SINGLE)\n";
+
+            for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+            {
+                if (nodeMark[iNode] == OUT)
+                {
+                    visualFile << nodeArray[iNode].x << "	" << nodeArray[iNode].y << "	" << nodeArray[iNode].z << endl;
+                }
+            }
+
+            for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+            {
+                if (faceArray[iFace].bcType == PHENGLEI::SOLID_SURFACE)
+                {
+                    face2node = faceArray[iFace].face2node;
+                    for (int iNode = 0; iNode < faceArray[iFace].nodeNumber; ++ iNode)
+                    {
+                        int nodeIndex = face2node[iNode];
+
+                        nodeIndex = localNodeIndex[nodeIndex] + 1;
+                        visualFile << nodeIndex << "    ";
+                    }
+
+                    for (int iNode = faceArray[iFace].nodeNumber; iNode < 4; ++ iNode)
+                    {
+                        visualFile << localNodeIndex[face2node[0]] + 1;
+                        visualFile << "    ";
+                    }
+                    visualFile << endl;
+                }
+            }
+        }
+
+        int gridSlice = deformParameter->GetGridSlice();
+        if (gridSlice)
+        {
+            int sliceAxis = deformParameter->GetSliceAxis();
+            RDouble slicePosition = deformParameter->GetSlicePosition();
+
+            for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+            {
+                nodeMark[iNode] = UNOUT;
+                localNodeIndex[iNode] = -1;
+            }
+
+            for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+            {
+                faceMark[iFace] = UNOUT;
+            }
+
+            for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+            {
+                cellMark[iCell] = UNOUT;
+            }
+
+            RDouble rmin, rmax;
+            for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+            {
+                rmin =  1.0e30;
+                rmax = -1.0e30;
+
+                face2node = faceArray[iFace].face2node;
+                for (int iNode = 0; iNode < faceArray[iFace].nodeNumber; ++ iNode)
+                {
+                    int nodeIndex = face2node[iNode];
+                    if (sliceAxis == X_DIR)
+                    {
+                        if (nodeArray[nodeIndex].x > rmax)
+                        {
+                            rmax = nodeArray[nodeIndex].x;
+                        }
+
+                        if (nodeArray[nodeIndex].x < rmin)
+                        {
+                            rmin = nodeArray[nodeIndex].x;
+                        }
+                    }
+                    else if (sliceAxis == Y_DIR)
+                    {
+                        if (nodeArray[nodeIndex].y > rmax)
+                        {
+                            rmax = nodeArray[nodeIndex].y;
+                        }
+
+                        if (nodeArray[nodeIndex].y < rmin)
+                        {
+                            rmin = nodeArray[nodeIndex].y;
+                        }
+                    }
+                    else
+                    {
+                        if (nodeArray[nodeIndex].z > rmax)
+                        {
+                            rmax = nodeArray[nodeIndex].z;
+                        }
+
+                        if (nodeArray[nodeIndex].z < rmin)
+                        {
+                            rmin = nodeArray[nodeIndex].z;
+                        }
+                    }
+                }
+
+                if ((rmax - slicePosition) * (rmin - slicePosition) <= 0.0)
+                {
+                    int leftCell = faceArray[iFace].leftCell;
+                    cellMark[leftCell] = OUT;
+
+                    int rightCell = faceArray[iFace].rightCell;
+                    if (rightCell >= 0 && rightCell < nTotalCell)
+                    {
+                        cellMark[rightCell] = OUT;
+                    }
+                }
+            }
+
+            nFacesOut  = 0;
+            for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+            {
+                if (faceArray[iFace].bcType == PHENGLEI::INTERIOR)
+                {
+                    int leftCell  = faceArray[iFace].leftCell;
+                    int rightCell = faceArray[iFace].rightCell;
+                    if (cellMark[leftCell] == OUT || cellMark[rightCell] == OUT)
+                    {
+                        ++ nFacesOut;
+                        faceMark[iFace] = OUT;
+                        face2node = faceArray[iFace].face2node;
+                        for (int iNode = 0; iNode < faceArray[iFace].nodeNumber; ++ iNode)
+                        {
+                            int nodeIndex = face2node[iNode];
+                            nodeMark[nodeIndex] = OUT;
+                        }
+                    }
+                }
+            }
+
+            nNodesOut = 0;
+            for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+            {
+                if (nodeMark[iNode] == OUT)
+                {
+                    localNodeIndex[iNode] = nNodesOut;
+                    nNodesOut ++ ;
+                }
+            }
+
+            if (nNodesOut)
+            {
+                visualFile << "ZONE T=\" Grid" << iZone << " SliceGrid \"\n";
+                visualFile << "N= " << nNodesOut << ", E= " << nFacesOut << ", F=FEPOINT, ET=Quadrilateral\n";
+                visualFile << "DT=(SINGLE SINGLE SINGLE)\n";
+
+                for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+                {
+                    if (nodeMark[iNode] == OUT)
+                    {
+                        visualFile << nodeArray[iNode].x << "	" << nodeArray[iNode].y << "	" << nodeArray[iNode].z << endl;
+                    }
+                }
+
+                for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+                {
+                    if (faceMark[iFace] == OUT)
+                    {
+                        face2node = faceArray[iFace].face2node;
+                        for (int iNode = 0; iNode < faceArray[iFace].nodeNumber; ++ iNode)
+                        {
+                            int nodeIndex = face2node[iNode];
+
+                            nodeIndex = localNodeIndex[nodeIndex] + 1;
+                            visualFile << nodeIndex << "    ";
+                        }
+
+                        if (faceArray[iFace].nodeNumber == 3)
+                        {
+                            visualFile << localNodeIndex [face2node[2]] + 1;
+                        }
+                        visualFile << endl;
+                    }
+                }
+            }
+        }
+
+        delete [] nodeMark;
+        delete [] faceMark;
+        delete [] cellMark;
+        delete [] localNodeIndex;
+    }
+
+    CloseFile(visualFile);
+}
+
+void DeformParameter::SetNDeformStep(int nDeformStepIn)
+{
+    this->nDeformStep = nDeformStepIn;
+}
+
+int DeformParameter::GetNDeformStep()
+{
+    return this->nDeformStep;
+}
+
+void DeformParameter::SetFlapAngle(RDouble flapAngleIn)
+{
+    this->flapAngle = flapAngleIn * PI / 180.0;
+}
+
+RDouble DeformParameter::GetFlapAngle()
+{
+    return this->flapAngle;
+}
+
+void DeformParameter::SetRotatePostionZ(RDouble rotatePostionZIn)
+{
+    this->rotatePostionZ = rotatePostionZIn;
+}
+
+RDouble DeformParameter::GetRotatePostionZ()
+{
+    return this->rotatePostionZ;
+}
+
+void DeformParameter::SetRotatePostionY(RDouble rotatePostionYIn)
+{
+    this->rotatePostionY = rotatePostionYIn;
+}
+
+RDouble DeformParameter::GetRotatePostionY()
+{
+    return this->rotatePostionY;
+}
+
+void DeformParameter::SetGridSlice(int gridSliceIn)
+{
+    this->gridSlice = gridSliceIn;
+}
+
+int DeformParameter::GetGridSlice()
+{
+    return this->gridSlice;
+}
+
+void DeformParameter::SetSliceAxis(int sliceAxisIn)
+{
+    this->sliceAxis = sliceAxisIn;
+}
+
+int DeformParameter::GetSliceAxis()
+{
+    return this->sliceAxis;
+}
+
+void DeformParameter::SetSlicePosition(RDouble slicePositionIn)
+{
+    this->slicePosition = slicePositionIn;
+}
+
+RDouble DeformParameter::GetSlicePosition()
+{
+    return this->slicePosition;
+}
+
+void DeformGrid()
+{
+    using namespace PHMPI;
+
+    //! Read stational grid.
+    string grid_file;
+    GlobalDataBase::GetData("stationalGridFile", &grid_file, PHSTRING, 1);
+    GlobalDataBase::UpdateData("gridfile", &grid_file, PHSTRING, 1);
+
+    Region *gridHandler = new Region();
+    gridHandler->ReadGrid();
+
+    GlobalBoundaryCondition::ReadGlobalBoundaryCondition();
+    gridHandler->ReSetBoundaryConditionByGlobalBC();
+
+    int nZones = GetNumberofGlobalZones();
+    Grid **stationalGrid = new Grid *[nZones];
+
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        stationalGrid[iZone] = GetGrid(iZone, 0);
+    }
+
+    //! Get deform parameter.
+    int nDeformStep = GlobalDataBase::GetIntParaFromDB("nDeformStep");
+    RDouble flapAngle = GlobalDataBase::GetDoubleParaFromDB("flapAngle");
+    RDouble rotatePostionZ = GlobalDataBase::GetDoubleParaFromDB("rotatePostionZ");
+    RDouble rotatePostionY = GlobalDataBase::GetDoubleParaFromDB("rotatePostionY");
+    int gridSlice = GlobalDataBase::GetIntParaFromDB("gridSlice");
+    int sliceAxis = GlobalDataBase::GetIntParaFromDB("sliceAxis");
+    RDouble slicePosition = GlobalDataBase::GetDoubleParaFromDB("slicePosition");
+
+    DeformParameter *deformParameter = new DeformParameter();
+    deformParameter->SetNDeformStep(nDeformStep);
+    deformParameter->SetFlapAngle(flapAngle);
+    deformParameter->SetRotatePostionZ(rotatePostionZ);
+    deformParameter->SetRotatePostionY(rotatePostionY);
+    deformParameter->SetGridSlice(gridSlice);
+    deformParameter->SetSliceAxis(sliceAxis);
+    deformParameter->SetSlicePosition(slicePosition);
+
+    //! Grid deformation.
+    Mesh_Deformation *gridDeformation = 0;
+    int deformationMethod = GlobalDataBase::GetIntParaFromDB("deformationMethod");
+    if (deformationMethod == SPRING)
+    {
+        gridDeformation = new Mesh_DeformationSPRING(nZones, stationalGrid);
+    }
+    else
+    {
+        int numberOfReferenceCP = GlobalDataBase::GetIntParaFromDB("numberOfReferenceCP");
+        RDouble influencePara = GlobalDataBase::GetDoubleParaFromDB("influencePara");
+
+        gridDeformation = new Mesh_DeformationRBF(nZones, stationalGrid);
+        gridDeformation->SetNumberOfReferenceCP(numberOfReferenceCP);
+        gridDeformation->SetInfluencePara(influencePara);
+    }
+
+    gridDeformation->SetDeformParameter(deformParameter);
+    gridDeformation->Run();
+
+    delete deformParameter;
+    delete gridDeformation;
+    delete gridHandler;
+    delete [] stationalGrid;
+}
+
+}
\ No newline at end of file
diff --git a/Mesh/src/Mesh_DeformationRBF.cpp b/Mesh/src/Mesh_DeformationRBF.cpp
new file mode 100644
index 0000000..1a3dd43
--- /dev/null
+++ b/Mesh/src/Mesh_DeformationRBF.cpp
@@ -0,0 +1,825 @@
+#include "Mesh_DeformationRBF.h"
+#include "Mesh_DeformationSPRING.h"
+#include "PHIO.h"
+#include "IO_FileName.h"
+#include "GeometryUnit.h"
+#include "TK_Log.h"
+#include "Geo_Element.h"
+//#include "Eigen/Eigen"
+#include "MatrixLUSGS.h"
+
+//using namespace Eigen;
+
+namespace PHSPACE
+{
+//typedef Matrix< RDouble, Dynamic, Dynamic > RBFMatrix;
+
+Mesh_DeformationRBF::Mesh_DeformationRBF(int nZonesIn, Grid **stationalGridIn) : 
+    Mesh_Deformation(nZonesIn, stationalGridIn)
+{
+    nControlPoints = 0;
+    controlPointVectors.resize(0);
+    controlPointCoordinates.resize(0);
+    controlPointToGlobalPointIndex.resize(0);
+
+    secondSegment.resize(0);
+    rotateNodeIndex.resize(0);
+
+    influencePara       = 0;
+    controlPointTree    = 0;
+    numberOfReferenceCP = 0;
+}
+
+Mesh_DeformationRBF::~Mesh_DeformationRBF()
+{
+    delete controlPointTree;
+}
+
+void Mesh_DeformationRBF::SetNumberOfReferenceCP(int numberOfReferenceCPIn)
+{
+    this->numberOfReferenceCP = numberOfReferenceCPIn;
+}
+
+void Mesh_DeformationRBF::SetInfluencePara(RDouble influenceParaIn)
+{
+    this->influencePara = influenceParaIn;
+}
+
+void Mesh_DeformationRBF::TransformGrid()
+{
+    deformedGrid = new DynamicGrid *[numberOfZones];
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        deformedGrid[iZone] = new DynamicGrid(stationalGrid[iZone]);
+        deformedGrid[iZone]->StationalData2DynamicData();
+        SetNodeAttribute(deformedGrid[iZone]);
+    }
+
+    SetSymmetryToZero();
+}
+
+void Mesh_DeformationRBF::SurfaceGridMove(int iStep)
+{
+    RDouble flapAngle = deformParameter->GetFlapAngle();
+    int nDeformStep = deformParameter->GetNDeformStep();
+    RDouble rotatePostionZ = deformParameter->GetRotatePostionZ();
+    RDouble rotatePostionY = deformParameter->GetRotatePostionY();
+
+    RDouble xVector, yVector, zVector;
+    RDouble xNew, yNew, zNew;
+    RDouble tNow = (iStep + 1) * 1.0 / nDeformStep;
+    RDouble tOld = iStep * 1.0 / nDeformStep;
+    RDouble omega = 2.0 * PI;
+    RDouble amplitude = flapAngle;
+
+    RDouble angle_step = amplitude * sin(omega * tNow);
+    angle_step        -= amplitude * sin(omega * tOld);
+
+    for (int iNode = 0; iNode < nControlPoints; ++ iNode)
+    {
+        RDouble currentRotatePosition;
+        if (controlPointCoordinates[iNode].Z() > 0)
+        {
+            currentRotatePosition = rotatePostionZ;
+        }
+        else
+        {
+            currentRotatePosition = -rotatePostionZ;
+        }
+
+        xNew =  controlPointCoordinates[iNode].X();
+        yNew = -sin(angle_step) * (abs(controlPointCoordinates[iNode].Z() - currentRotatePosition)) + cos(angle_step) * (controlPointCoordinates[iNode].Y() - rotatePostionY);
+        zNew =  cos(angle_step) * (abs(controlPointCoordinates[iNode].Z() - currentRotatePosition)) + sin(angle_step) * (controlPointCoordinates[iNode].Y() - rotatePostionY);
+
+        yNew += rotatePostionY;
+        if (controlPointCoordinates[iNode].Z() > 0)
+        {
+            zNew = currentRotatePosition + zNew;
+        }
+        else
+        {
+            zNew = currentRotatePosition - zNew;
+        }
+
+        xVector = xNew - controlPointCoordinates[iNode].X();
+        yVector = yNew - controlPointCoordinates[iNode].Y();
+        zVector = zNew - controlPointCoordinates[iNode].Z();
+
+        Point3D node;
+        node.SetX(xVector);
+        node.SetY(yVector);
+        node.SetZ(zVector);
+
+        controlPointVectors[iNode] = node;
+
+        PHVectorInt1D globalIndex = controlPointToGlobalPointIndex[iNode];
+        int zoneIndex = globalIndex[0];
+        int nodeIndex = globalIndex[1];
+
+        DynamicGrid *grid = deformedGrid[zoneIndex];
+        DYNode *nodeArray = grid->GetNodeArray();
+
+        nodeArray[nodeIndex].xnew = xNew;
+        nodeArray[nodeIndex].ynew = yNew;
+        nodeArray[nodeIndex].znew = zNew;
+    }
+
+    //! Second segment.
+    RDouble phase = - PI * 3 / 4.0;
+    angle_step    = amplitude * sin(omega * tNow + phase);
+    angle_step   -= amplitude * sin(omega * tOld + phase);
+
+    //! The rotate angle times of segment1.
+    double times = 1.0;
+
+    for (int iNode = 0; iNode < nControlPoints; ++ iNode)
+    {
+        if (secondSegment[iNode] != 1)
+        {
+            continue;
+        }
+
+        int rotateNodeIndexCurrent = rotateNodeIndex[iNode];
+
+        RDouble secondSegmentRotatePostionY = controlPointCoordinates[rotateNodeIndexCurrent].Y() + controlPointVectors[rotateNodeIndexCurrent].Y();
+        RDouble secondSegmentRotatePostionZ = controlPointCoordinates[rotateNodeIndexCurrent].Z() + controlPointVectors[rotateNodeIndexCurrent].Z();
+
+        RDouble xCoor = controlPointCoordinates[iNode].X() + controlPointVectors[iNode].X();
+        RDouble yCoor = controlPointCoordinates[iNode].Y() + controlPointVectors[iNode].Y();
+        RDouble zCoor = controlPointCoordinates[iNode].Z() + controlPointVectors[iNode].Z();
+
+        RDouble currentRotatePosition;
+        if (controlPointCoordinates[iNode].Z() > 0)
+        {
+            currentRotatePosition = secondSegmentRotatePostionZ;
+        }
+        else
+        {
+            currentRotatePosition = - secondSegmentRotatePostionZ;
+        }
+
+        xNew =  xCoor;
+        yNew = -sin(angle_step * times) * (abs(zCoor - currentRotatePosition)) + cos(angle_step * times) * (yCoor - secondSegmentRotatePostionY);
+        zNew =  cos(angle_step * times) * (abs(zCoor - currentRotatePosition)) + sin(angle_step * times) * (yCoor - secondSegmentRotatePostionY);
+
+        yNew += secondSegmentRotatePostionY;
+        if (controlPointCoordinates[iNode].Z() > 0)
+        {
+            zNew = currentRotatePosition + zNew;
+        }
+        else
+        {
+            zNew = currentRotatePosition - zNew;
+        }
+
+        xVector = xNew - controlPointCoordinates[iNode].X();
+        yVector = yNew - controlPointCoordinates[iNode].Y();
+        zVector = zNew - controlPointCoordinates[iNode].Z();
+
+        Point3D node;
+        node.SetX(xVector);
+        node.SetY(yVector);
+        node.SetZ(zVector);
+
+        controlPointVectors[iNode] = node;
+
+        PHVectorInt1D globalIndex = controlPointToGlobalPointIndex[iNode];
+        int zoneIndex = globalIndex[0];
+        int nodeIndex = globalIndex[1];
+
+        DynamicGrid *grid = deformedGrid[zoneIndex];
+        DYNode *nodeArray = grid->GetNodeArray();
+
+        nodeArray[nodeIndex].xnew = xNew;
+        nodeArray[nodeIndex].ynew = yNew;
+        nodeArray[nodeIndex].znew = zNew;
+    }
+}
+
+void Mesh_DeformationRBF::Deforming()
+{
+    string visualFileName = GlobalDataBase::GetStrParaFromDB("visualFileName");
+    PostVisual(visualFileName, 0);
+
+    PrintToWindow("  Start Deforming ... ", "\n");
+    WriteLogFile("  Start Deforming ... ", "\n");
+
+    //! RBF deform
+    int nDeformStep = deformParameter->GetNDeformStep();
+    for (int iStep = 0; iStep < nDeformStep; ++ iStep)
+    {
+        BuildControlPointTree();
+
+        PrintToWindow("  iStep =  ", iStep + 1, "\n");
+        SurfaceGridMove(iStep);
+
+        for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+        {
+            DynamicGrid *grid = deformedGrid[iZone];
+            DYNode *nodeArray = grid->GetNodeArray();
+            int nTotalNode = grid->GetNTotalNode();
+
+            int nNeedDeformPoints = 0;
+            for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+            {
+                if (nodeArray[iNode].moveType != DYNAMIC_POINT_FIELD) continue;
+                ++ nNeedDeformPoints;
+            }
+
+            int count = 0;
+            int interval = GetProgressInterval(nNeedDeformPoints, 20);
+            for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+            {
+                if (nodeArray[iNode].moveType != DYNAMIC_POINT_FIELD) continue;
+
+                count ++;
+                if (count > 0 && count % interval == 0)
+                {
+                    ProgressMonitorToWindows(count, nNeedDeformPoints, "Field point deformation");
+                    ProgressMonitorToLogFile(count, nNeedDeformPoints, "Field point deformation");
+                }
+
+                //! Fine reference control point.
+                PHVectorInt1D referenceCP;
+                FindOutReferenceCP(nodeArray[iNode], referenceCP);
+                if (referenceCP.size() == 0) continue;
+
+                RBFDeformingKernel(grid, iNode, referenceCP);
+            }
+        }
+
+        PostTreat();
+        PostVisual(visualFileName, iStep + 1);
+    }
+
+    PrintToWindow("  End Deforming ... ", "\n");
+    WriteLogFile("  End Deforming ... ", "\n");
+}
+
+void Mesh_DeformationRBF::BuildControlPointTree()
+{
+    // Compute the boundary.
+    RDouble wallBound[6];
+    for (int iDim = 0; iDim < 3; ++ iDim)
+    {
+        wallBound[iDim]     =  PHSPACE::LARGE;
+        wallBound[iDim + 3] = -PHSPACE::LARGE;
+    }
+
+    for (int iPoint = 0; iPoint < nControlPoints; ++ iPoint)
+    {
+        RDouble x0 = controlPointCoordinates[iPoint].X();
+        RDouble y0 = controlPointCoordinates[iPoint].Y();
+        RDouble z0 = controlPointCoordinates[iPoint].Z();
+
+        wallBound[0] = MIN(x0, wallBound[0]);
+        wallBound[1] = MIN(y0, wallBound[1]);
+        wallBound[2] = MIN(z0, wallBound[2]);
+
+        wallBound[3] = MAX(x0, wallBound[3]);
+        wallBound[4] = MAX(y0, wallBound[4]);
+        wallBound[5] = MAX(z0, wallBound[5]);
+    }
+
+    wallTolerance = 0;
+    for (int iDim = 0; iDim < 3; ++ iDim)
+    {
+        wallTolerance = MAX(wallTolerance, wallBound[iDim + 3] - wallBound[iDim]);
+    }
+    wallTolerance *= 0.01;
+
+    for (int iDim = 0; iDim < 3; ++ iDim)
+    {
+        wallBound[iDim]     -= wallTolerance;
+        wallBound[iDim + 3] += wallTolerance;
+    }
+
+    //! Build Tree.
+    RDouble wallMin[6], wallMax[6];
+    for (int iDim = 0; iDim < 3; ++ iDim)
+    {
+        wallMin[iDim] = wallBound[iDim];
+        wallMax[iDim] = wallBound[iDim + 3];
+    }
+    for (int iDim = 3; iDim < 6; ++ iDim)
+    {
+        wallMin[iDim] = wallBound[iDim - 3];
+        wallMax[iDim] = wallBound[iDim];
+    }
+
+    if (controlPointTree)
+    {
+        delete controlPointTree;
+    }
+    controlPointTree = new CPTree(6, wallMin, wallMax);
+
+    RDouble triBox[6];
+
+    for (int iPoint = 0; iPoint < nControlPoints; ++ iPoint)
+    {
+        for (int iDim = 0; iDim < 3; ++ iDim)
+        {
+            triBox[iDim]     =  PHSPACE::LARGE;
+            triBox[iDim + 3] = -PHSPACE::LARGE;
+        }
+
+        RDouble xCoor = controlPointCoordinates[iPoint].X();
+        RDouble yCoor = controlPointCoordinates[iPoint].Y();
+        RDouble zCoor = controlPointCoordinates[iPoint].Z();
+
+        triBox[0] = MIN(triBox[0], xCoor);
+        triBox[1] = MIN(triBox[1], yCoor);
+        triBox[2] = MIN(triBox[2], zCoor);
+
+        triBox[3] = MAX(triBox[3], xCoor);
+        triBox[4] = MAX(triBox[4], yCoor);
+        triBox[5] = MAX(triBox[5], zCoor);
+
+        CPNode *cpNode = new CPNode(6, triBox, iPoint);
+        controlPointTree->AddNode(cpNode);
+    }
+}
+
+void Mesh_DeformationRBF::FindOutReferenceCP(DYNode point, PHVectorInt1D &referenceCP)
+{
+    RDouble xCoor = point.x;
+    RDouble yCoor = point.y;
+    RDouble zCoor = point.z;
+
+    RDouble *rmin, *rmax;
+    rmin = controlPointTree->GetMin();
+    rmax = controlPointTree->GetMax();
+    RDouble pmin[6], pmax[6];
+    RDouble dis = 0.1 * wallTolerance;
+
+    // The maximum wanted wall points that in the box,
+    // it is set to be sqrt(nTPoints), usually.
+    int nCPLimitedMax = MAX(1 * (int) sqrt(nControlPoints * 1.0), 1);
+    nCPLimitedMax     = MIN(nCPLimitedMax, nControlPoints);
+    nCPLimitedMax     = MIN(nCPLimitedMax, 1000);
+    int nCPLimitedMin = this->numberOfReferenceCP;
+
+    // Find out by control points tree.
+    bool finalFound = false;
+    int cpMin = nCPLimitedMin;
+    int cpMax = nCPLimitedMax;
+    cpMax = MAX(cpMin, cpMax);
+
+    CPTree::AdtNodeList nList;
+
+    // Enlarge time, the number of probe time.
+    // If lose once, enlarge the search scope then, by multiple 2 times.
+    int nEnlargeTime = 1;
+    int iEnlarge = 0;
+    while (iEnlarge < nEnlargeTime)
+    {
+        ++ iEnlarge;
+
+        pmin[0] = rmin[0];
+        pmin[1] = rmin[1];
+        pmin[2] = rmin[2];
+        pmax[3] = rmax[3];
+        pmax[4] = rmax[4];
+        pmax[5] = rmax[5];
+
+        pmin[3] = xCoor - dis;
+        pmin[4] = yCoor - dis;
+        pmin[5] = zCoor - dis;
+
+        pmax[0] = xCoor + dis;
+        pmax[1] = yCoor + dis;
+        pmax[2] = zCoor + dis;
+
+        RDouble size_min = 0;
+        RDouble size_max = dis * 2.0;
+        RDouble radius;
+
+        int iSearch = 0;
+        bool isFoundNearestCP = false;
+        int nSearchTimes = 100;
+        while (iSearch < nSearchTimes)
+        {
+            ++ iSearch;
+
+            radius = 0.5 * (size_min + size_max);
+            pmin[3] = xCoor - radius;
+            pmin[4] = yCoor - radius;
+            pmin[5] = zCoor - radius;
+
+            pmax[0] = xCoor + radius;
+            pmax[1] = yCoor + radius;
+            pmax[2] = zCoor + radius;
+
+            nList.clear();
+            nList.reserve(cpMax + 1);
+            controlPointTree->FindNodesInRegion(pmin, pmax, nList, cpMax + 1);
+
+            int nNearCP = static_cast<int>(nList.size());
+            if ((nNearCP > cpMin && nNearCP <= cpMax))
+            {
+                // case 1: the number of control points in the box is according with the anticipate.
+                // case 2: the worst case, to ensure the success, accept this case, although 
+                //         the control point found are to much.
+                PHVectorInt1D     referenceCPTemp  (numberOfReferenceCP, PHSPACE::INVALID_INDEX);
+                PHVectorRDouble1D referenceDistance(numberOfReferenceCP, PHSPACE::LARGE);
+
+                for (int iPoint = 0; iPoint < nNearCP; ++ iPoint)
+                {
+                    int cpIndex = nList[iPoint]->GetData();
+
+                    RDouble dx = xCoor - controlPointCoordinates[cpIndex].X();
+                    RDouble dy = yCoor - controlPointCoordinates[cpIndex].Y();
+                    RDouble dz = zCoor - controlPointCoordinates[cpIndex].Z();
+
+                    // Second, find the minimum distance.
+                    RDouble dist = SQR(dx, dy, dz);
+
+                    // Find out the maximum distance and the points in the reference CP queue.
+                    // In order to compare it with the others.
+                    int     maxPoint    = PHSPACE::INVALID_INDEX;
+                    RDouble maxDistance = PHSPACE::SMALL;
+                    for (int iReference = 0; iReference < numberOfReferenceCP; ++ iReference)
+                    {
+                        if (referenceDistance[iReference] > maxDistance)
+                        {
+                            maxDistance = referenceDistance[iReference];
+                            maxPoint    = iReference;
+                        }
+                    }
+
+                    if (dist < maxDistance)
+                    {
+                        referenceCPTemp  [maxPoint] = cpIndex;
+                        referenceDistance[maxPoint] = dist;
+                    }
+                }
+
+                // Find out the real reference Control Points.
+                int numberOfRealCP = 0;
+                for (int iReference = 0; iReference < numberOfReferenceCP; ++ iReference)
+                {
+                    if (referenceCPTemp[iReference] != PHSPACE::INVALID_INDEX)
+                    {
+                        ++ numberOfRealCP;
+                    }
+                }
+
+                referenceCP.clear();
+                referenceCP.resize(numberOfRealCP);
+                int count = 0;
+                for (int iReference = 0; iReference < numberOfReferenceCP; ++ iReference)
+                {
+                    if (referenceCPTemp[iReference] != PHSPACE::INVALID_INDEX)
+                    {
+                        referenceCP[count] = referenceCPTemp[iReference];
+                        ++ count;
+                    }
+                }
+
+                if (numberOfRealCP == 0) TK_Exit::ExceptionExit("Error: The real Control Points do not exist!");
+
+                isFoundNearestCP = true;
+                break;
+            } 
+            else if (nNearCP > cpMax && (size_max - size_min) > 0.01 * dis)
+            {
+                // The box is too large and so lead to too large number of wall faces,
+                // in order to reduce the wall faces, decrease the search radius.
+                size_max = radius;
+                continue;
+            }
+            else
+            {
+                // The box is too small and so lead to nearly non wall faces,
+                // in order to get more the wall faces, increase the search radius.
+                size_min = radius;
+                size_max = size_max * 2.0;
+                continue;
+            }
+        }
+
+        if (isFoundNearestCP)
+        {
+            finalFound = true;
+            break;
+        }
+        else
+        {
+            // Enlarge the limitation.
+            cpMax *= 2;
+            cpMin = MAX(1 * (int)sqrt(cpMax * 1.0), 1);
+            continue;
+        }
+    }
+
+    if (!finalFound)
+    {
+        referenceCP.clear();
+    }
+}
+
+void Mesh_DeformationRBF::MatchControlPoints()
+{
+    RDouble rotatePostionZ = this->deformParameter->GetRotatePostionZ();
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        DynamicGrid *grid = deformedGrid[iZone];
+        DYFace *faceArray = grid->GetFaceArray();
+        DYNode *nodeArray = grid->GetNodeArray();
+
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotalNode = grid->GetNTotalNode();
+
+        int *nodeMark = new int[nTotalNode];
+        SetField(nodeMark, 0, nTotalNode);
+
+        int *secondSegmentCurrent = grid->GetSecondSegment();
+        int rotateNodeIndexCurrent = grid->GetRotateNodeIndex();
+
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            int bctype = faceArray[iFace].bcType;
+            if (bctype != PHENGLEI::SOLID_SURFACE)
+            {
+                continue;
+            }
+
+            for (int iNode = 0; iNode < faceArray[iFace].nodeNumber; ++ iNode)
+            {
+                int nodeIndex = faceArray[iFace].face2node[iNode];
+                if (nodeMark[nodeIndex] == 1)
+                {
+                    continue;
+                }
+
+                if (fabs(nodeArray[nodeIndex].z) < rotatePostionZ)
+                {
+                    continue;
+                }
+                nodeMark[nodeIndex] = 1;
+
+                nodeArray[nodeIndex].moveType = DYNAMIC_POINT_WALL;
+
+                Point3D node;
+                node.SetX(nodeArray[nodeIndex].x);
+                node.SetY(nodeArray[nodeIndex].y);
+                node.SetZ(nodeArray[nodeIndex].z);
+                controlPointCoordinates.push_back(node);
+
+                secondSegment.push_back(secondSegmentCurrent[nodeIndex]);
+
+                //rotateNodeIndex.push_back(rotateNodeIndexCurrent);
+                if (rotateNodeIndexCurrent == nodeIndex)
+                {
+                    rotateNodeIndexCurrent = static_cast<int>(controlPointCoordinates.size()) - 1;
+                }
+
+
+                PHVectorInt1D globalIndex;
+                globalIndex.push_back(iZone);
+                globalIndex.push_back(nodeIndex);
+
+                controlPointToGlobalPointIndex.push_back(globalIndex);
+            }
+        }
+
+        for (int iControlPoint = 0; iControlPoint < controlPointCoordinates.size(); ++ iControlPoint)
+        {
+            rotateNodeIndex.push_back(rotateNodeIndexCurrent);
+        }
+
+        delete [] nodeMark;
+    }
+
+    nControlPoints = static_cast<int>(controlPointCoordinates.size());
+    controlPointVectors.resize(nControlPoints);
+}
+
+void Mesh_DeformationRBF::PostTreat()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        DynamicGrid *grid = deformedGrid[iZone];
+        DYNode *nodeArray = grid->GetNodeArray();
+
+        int nTotalNode = grid->GetNTotalNode();
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            if (nodeArray[iNode].moveType == STATIC_POINT)
+            {
+                continue;
+            }
+
+            nodeArray[iNode].x = nodeArray[iNode].xnew;
+            nodeArray[iNode].y = nodeArray[iNode].ynew;
+            nodeArray[iNode].z = nodeArray[iNode].znew;
+        }
+    }
+
+    for (int iNode = 0; iNode < nControlPoints; ++ iNode)
+    {
+        PHVectorInt1D globalIndex = controlPointToGlobalPointIndex[iNode];
+        int zoneIndex = globalIndex[0];
+        int nodeIndex = globalIndex[1];
+
+        DynamicGrid *grid = deformedGrid[zoneIndex];
+        DYNode *nodeArray = grid->GetNodeArray();
+
+        controlPointCoordinates[iNode].SetX(nodeArray[nodeIndex].x);
+        controlPointCoordinates[iNode].SetY(nodeArray[nodeIndex].y);
+        controlPointCoordinates[iNode].SetZ(nodeArray[nodeIndex].z);
+    }
+
+    SetSymmetryToZero();
+}
+
+void Mesh_DeformationRBF::RBFDeformingKernel(DynamicGrid *grid, int nodeIndex, PHVectorInt1D &referenceCP)
+{
+    DYNode *nodeArray = grid->GetNodeArray();
+    int numberOfRealCP = static_cast<int>(referenceCP.size());
+
+    Range M(0, numberOfRealCP - 1);
+    RDouble2D *controlMatrix = new RDouble2D(M, M, fortranArray);
+    RDouble2D &controlMatrix2D = *reinterpret_cast<RDouble2D *> (controlMatrix);
+    RDouble2D *inverseMatrix = new RDouble2D(M, M, fortranArray);
+	RDouble2D &inverseMatrix2D = *reinterpret_cast<RDouble2D *> (inverseMatrix);
+
+    /*vector< vector< RDouble > > controlMatrix;
+    controlMatrix.resize(numberOfRealCP);
+    for (int iPoint = 0; iPoint < numberOfRealCP; ++ iPoint)
+    {
+        controlMatrix[iPoint].resize(numberOfRealCP);
+    }*/
+
+    // Compute the influence Radius.
+    RDouble maxProjectDist = PHSPACE::SMALL;
+    for (int iPoint = 0; iPoint < numberOfRealCP; ++ iPoint)
+    {
+        int nodeIndexTmp = referenceCP[iPoint];
+        RDouble dx = controlPointVectors[nodeIndexTmp].X();
+        RDouble dy = controlPointVectors[nodeIndexTmp].Y();
+        RDouble dz = controlPointVectors[nodeIndexTmp].Z();
+        RDouble dist = DISTANCE(dx, dy, dz);
+        maxProjectDist = MAX(maxProjectDist, dist);
+    }
+    RDouble influenceRadius = maxProjectDist * this->influencePara;
+
+    for (int iPoint = 0; iPoint < numberOfRealCP; ++ iPoint)
+    {
+        int iPointIndex = referenceCP[iPoint];
+        for (int jPoint = 0; jPoint < numberOfRealCP; ++ jPoint)
+        {
+            int jPointIndex = referenceCP[jPoint];
+
+            RDouble dx = controlPointCoordinates[iPointIndex].X() - controlPointCoordinates[jPointIndex].X();
+            RDouble dy = controlPointCoordinates[iPointIndex].Y() - controlPointCoordinates[jPointIndex].Y();
+            RDouble dz = controlPointCoordinates[iPointIndex].Z() - controlPointCoordinates[jPointIndex].Z();
+            RDouble distance = DISTANCE(dx, dy, dz);
+
+            if (iPoint != jPoint && distance <= 1.0e-10)
+            {
+                ostringstream oss;
+                oss << "Error: Two overlapping control points are found! " << endl;
+                TK_Exit::ExceptionExit(oss.str());
+            }
+
+            controlMatrix2D(iPoint, jPoint) = Wendland(distance, influenceRadius);
+            //controlMatrix[iPoint][jPoint] = Wendland(distance, influenceRadius);
+        }
+    }
+
+    //MatrixInverse(controlMatrix, numberOfRealCP);
+    ObtainInverseDiagonalMatrix(controlMatrix, numberOfRealCP, inverseMatrix);
+
+    // Compute Coefficient Vector.
+    PHVectorRDouble1D coefficientX(numberOfRealCP);
+    PHVectorRDouble1D coefficientY(numberOfRealCP);
+    PHVectorRDouble1D coefficientZ(numberOfRealCP);
+
+    for (int iPoint = 0; iPoint < numberOfRealCP; ++ iPoint)
+    {
+        coefficientX[iPoint] = 0;
+        coefficientY[iPoint] = 0;
+        coefficientZ[iPoint] = 0;
+
+        for (int jPoint = 0; jPoint < numberOfRealCP; ++ jPoint)
+        {
+            int CPIndex = referenceCP[jPoint];
+
+            RDouble dx = controlPointVectors[CPIndex].X();
+            RDouble dy = controlPointVectors[CPIndex].Y();
+            RDouble dz = controlPointVectors[CPIndex].Z();
+
+            coefficientX[iPoint] += inverseMatrix2D(iPoint, jPoint) * dx;
+            coefficientY[iPoint] += inverseMatrix2D(iPoint, jPoint) * dy;
+            coefficientZ[iPoint] += inverseMatrix2D(iPoint, jPoint) * dz;
+        }
+    }
+
+    // Interpolating from boundary to field.
+    RDouble volumDx = 0;
+    RDouble volumDy = 0;
+    RDouble volumDz = 0;
+
+    RDouble xCoor = nodeArray[nodeIndex].x;
+    RDouble yCoor = nodeArray[nodeIndex].y;
+    RDouble zCoor = nodeArray[nodeIndex].z;
+
+    for (int iPoint = 0; iPoint < numberOfRealCP; ++ iPoint)
+    {
+        int nodeIndexOfCP = referenceCP[iPoint];
+
+        RDouble dx = controlPointCoordinates[nodeIndexOfCP].X() - xCoor;
+        RDouble dy = controlPointCoordinates[nodeIndexOfCP].Y() - yCoor;
+        RDouble dz = controlPointCoordinates[nodeIndexOfCP].Z() - zCoor;
+        RDouble distance = DISTANCE(dx, dy, dz);
+        RDouble fai = Wendland(distance, influenceRadius);
+
+        volumDx += fai * coefficientX[iPoint];
+        volumDy += fai * coefficientY[iPoint];
+        volumDz += fai * coefficientZ[iPoint];
+    }
+
+    RDouble xNew = xCoor + volumDx;
+    RDouble yNew = yCoor + volumDy;
+    RDouble zNew = zCoor + volumDz;
+
+    nodeArray[nodeIndex].xnew = xNew;
+    nodeArray[nodeIndex].ynew = yNew;
+    nodeArray[nodeIndex].znew = zNew;
+
+    delete controlMatrix;
+    delete inverseMatrix;
+}
+
+RDouble Wendland(RDouble distance, RDouble radius)
+{
+    //return WendlandC0(distance, radius);
+    return WendlandC2(distance, radius);
+    //return WendlandC4(distance, radius);
+}
+
+RDouble WendlandC0(RDouble distance, RDouble radius)
+{
+    if (distance > radius)
+    {
+        return 0;
+    }
+    else
+    {
+        return (1 - distance / radius) * (1 - distance / radius);
+    }
+}
+
+RDouble WendlandC2(RDouble distance, RDouble radius)
+{
+    if (distance > radius)
+    {
+        return 0;
+    }
+    else
+    {
+        RDouble enta = distance / (radius + 1.0e-12);
+        return pow((1 - enta), 4) * (4 * enta + 1.0);
+    }
+}
+
+RDouble WendlandC4(RDouble distance, RDouble radius)
+{
+    if (distance > radius)
+    {
+        return 0;
+    }
+    else
+    {
+        RDouble enta = distance / (radius + 1.0e-12);
+        return pow((1 - enta), 6.0) * (35. * enta + 18. * enta + 3.0);
+    }
+}
+
+//void MatrixInverse(vector< vector< RDouble > > &maxtrix, const int size)
+//{
+//    RBFMatrix maxtrixOfEigenForm(size, size);
+//
+//    for (int i = 0; i < size; ++ i)
+//    {
+//        for (int j = 0; j < size; ++ j)
+//        {
+//            maxtrixOfEigenForm(i, j) = maxtrix[i][j];
+//        }
+//    }
+//
+//    RBFMatrix inversedMatrixOfEigenForm = maxtrixOfEigenForm.inverse();
+//
+//    for (int i = 0; i < size; ++ i)
+//    {
+//        for (int j = 0; j < size; ++ j)
+//        {
+//            maxtrix[i][j] = inversedMatrixOfEigenForm(i, j);
+//        }
+//    }
+//}
+
+}
\ No newline at end of file
diff --git a/Mesh/src/Mesh_DeformationSPRING.cpp b/Mesh/src/Mesh_DeformationSPRING.cpp
new file mode 100644
index 0000000..149623f
--- /dev/null
+++ b/Mesh/src/Mesh_DeformationSPRING.cpp
@@ -0,0 +1,330 @@
+#include "Mesh_DeformationSPRING.h"
+#include "PHIO.h"
+#include "IO_FileName.h"
+#include "GeometryUnit.h"
+#include "TK_Log.h"
+#include "Geo_Element.h"
+
+namespace PHSPACE
+{
+
+Mesh_DeformationSPRING::Mesh_DeformationSPRING(int nZonesIn, Grid **stationalGridIn) : 
+    Mesh_Deformation(nZonesIn, stationalGridIn)
+{
+
+}
+
+Mesh_DeformationSPRING::~Mesh_DeformationSPRING()
+{
+
+}
+void Mesh_DeformationSPRING::SurfaceGridMove(int iStep)
+{
+    RDouble flapAngle = deformParameter->GetFlapAngle();
+    int nDeformStep = deformParameter->GetNDeformStep();
+    RDouble rotatePostionZ = deformParameter->GetRotatePostionZ();
+    RDouble rotatePostionY = deformParameter->GetRotatePostionY();
+
+    RDouble xNew, yNew, zNew;
+    RDouble tNow = (iStep + 1) * 1.0 / nDeformStep;
+    RDouble tOld = iStep * 1.0 / nDeformStep;
+    RDouble omega = 2.0 * PI;
+    RDouble amplitude = flapAngle;
+
+    RDouble angle_step = amplitude * sin(omega * tNow);
+    angle_step        -= amplitude * sin(omega * tOld);
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        DynamicGrid *grid = deformedGrid[iZone];
+        DYNode *nodeArray = grid->GetNodeArray();
+
+        int nTotalNode = grid->GetNTotalNode();
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            if (nodeArray[iNode].moveType != DYNAMIC_POINT_WALL)
+            {
+                continue;
+            }
+
+            RDouble currentRotatePosition;
+            if (nodeArray[iNode].z > 0)
+            {
+                currentRotatePosition = rotatePostionZ;
+            }
+            else
+            {
+                currentRotatePosition = - rotatePostionZ;
+            }
+
+            xNew = nodeArray[iNode].x;
+            yNew = -sin(angle_step) * (abs(nodeArray[iNode].z - currentRotatePosition)) + cos(angle_step) * (nodeArray[iNode].y - rotatePostionY);
+            zNew =  cos(angle_step) * (abs(nodeArray[iNode].z - currentRotatePosition)) + sin(angle_step) * (nodeArray[iNode].y - rotatePostionY);
+
+            yNew += rotatePostionY;
+            if (nodeArray[iNode].z > 0)
+            {
+                zNew = currentRotatePosition + zNew;
+            }
+            else
+            {
+                zNew = currentRotatePosition - zNew;
+            }
+
+            nodeArray[iNode].xnew = xNew;
+            nodeArray[iNode].ynew = yNew;
+            nodeArray[iNode].znew = zNew;
+        }
+
+        //! Second segment.
+        RDouble phase = - PI * 3 / 4.0;
+        angle_step    = amplitude * sin(omega * tNow + phase);
+        angle_step   -= amplitude * sin(omega * tOld + phase);
+
+        int rotateNodeIndex = grid->GetRotateNodeIndex();
+        if (rotateNodeIndex == -1)
+        {
+            return;
+        }
+
+        RDouble secondSegmentRotatePostionY = nodeArray[rotateNodeIndex].ynew;
+        RDouble secondSegmentRotatePostionZ = nodeArray[rotateNodeIndex].znew;
+
+        //! The rotate angle times of segment1.
+        double times = 1.0;
+        int *secondSegment = grid->GetSecondSegment();
+
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            if (nodeArray[iNode].moveType != DYNAMIC_POINT_WALL)
+            {
+                continue;
+            }
+
+            if (secondSegment[iNode] != 1)
+            {
+                continue;
+            }
+
+            RDouble currentRotatePosition;
+            if (nodeArray[iNode].z > 0)
+            {
+                currentRotatePosition = secondSegmentRotatePostionZ;
+            }
+            else
+            {
+                currentRotatePosition = - secondSegmentRotatePostionZ;
+            }
+
+            xNew = nodeArray[iNode].xnew;
+            yNew = -sin(angle_step * times) * (abs(nodeArray[iNode].znew - currentRotatePosition)) + cos(angle_step * times) * (nodeArray[iNode].ynew - secondSegmentRotatePostionY);
+            zNew =  cos(angle_step * times) * (abs(nodeArray[iNode].znew - currentRotatePosition)) + sin(angle_step * times) * (nodeArray[iNode].ynew - secondSegmentRotatePostionY);
+
+            yNew += secondSegmentRotatePostionY;
+            if (nodeArray[iNode].z > 0)
+            {
+                zNew = currentRotatePosition + zNew;
+            }
+            else
+            {
+                zNew = currentRotatePosition - zNew;
+            }
+
+            nodeArray[iNode].xnew = xNew;
+            nodeArray[iNode].ynew = yNew;
+            nodeArray[iNode].znew = zNew;
+        }
+    }
+}
+
+void Mesh_DeformationSPRING::TransformGrid()
+{
+    deformedGrid = new DynamicGrid *[numberOfZones];
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        deformedGrid[iZone] = new DynamicGrid(stationalGrid[iZone]);
+        deformedGrid[iZone]->StationalData2DynamicData();
+        deformedGrid[iZone]->ReconstrcutImplicitGeomeInfor();
+        SetNodeAttribute(deformedGrid[iZone]);
+    }
+
+    SetSymmetryToZero();
+}
+
+void Mesh_DeformationSPRING::Deforming()
+{
+    string visualFileName = GlobalDataBase::GetStrParaFromDB("visualFileName");
+    PostVisual(visualFileName, 0);
+
+    PrintToWindow("  Start Deforming ... ", "\n");
+    WriteLogFile("  Start Deforming ... ", "\n");
+
+    int nDeformStep = deformParameter->GetNDeformStep();
+    for (int iStep = 0; iStep < nDeformStep; ++ iStep)
+    {
+        PrintToWindow("  iStep =  ", iStep + 1, "\n");
+        SurfaceGridMove(iStep);
+
+        for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+        {
+            DynamicGrid *grid = deformedGrid[iZone];
+            DYNode *nodeArray = grid->GetNodeArray();
+            int nTotalNode = grid->GetNTotalNode();
+
+            RDouble norm, norm1=1.0;
+            RDouble normx, normy, normz;
+            RDouble dxn, dyn, dzn;
+            RDouble rn;
+            RDouble dx, dy, dz;
+
+            int springOrder = 2;
+            RDouble epsilon = 1.0e-12;
+            int numberOfSpringRelax = 4000;
+            for (int iter = 1; iter < numberOfSpringRelax; ++ iter)
+            {
+                normx = 0;
+                normy = 0;
+                normz = 0;
+                norm  = 0;
+
+                for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+                {
+                    if (nodeArray[iNode].moveType == DYNAMIC_POINT_FIELD)
+                    {
+                        dxn = nodeArray[iNode].xnew - nodeArray[iNode].x;
+                        dyn = nodeArray[iNode].ynew - nodeArray[iNode].y;
+                        dzn = nodeArray[iNode].znew - nodeArray[iNode].z;
+
+                        dx = 0;
+                        dy = 0;
+                        dz = 0;
+                        rn = 0;
+
+                        for (int jNode = 0; jNode < nodeArray[iNode].nodeNumberAround; ++ jNode)
+                        {
+                            int nodeIndex   = nodeArray[iNode].node2node[jNode];
+                            RDouble springK = nodeArray[iNode].node2nodeK[jNode];
+                            springK         = pow(springK, springOrder * 1.0);
+
+                            dx = dx + springK * (nodeArray[nodeIndex].xnew - nodeArray[nodeIndex].x);
+                            dy = dy + springK * (nodeArray[nodeIndex].ynew - nodeArray[nodeIndex].y);
+                            dz = dz + springK * (nodeArray[nodeIndex].znew - nodeArray[nodeIndex].z);
+                            rn = rn + springK;
+                        }
+
+                        dx = dx / rn;
+                        dy = dy / rn;
+                        dz = dz / rn;
+
+                        normx = normx + fabs(dx - dxn);
+                        normy = normy + fabs(dy - dyn);
+                        normz = normz + fabs(dz - dzn);
+                        norm  = norm  + sqrt((dx - dxn) * (dx - dxn)
+                              + (dy - dyn) * (dy - dyn)
+                              + (dz - dzn) * (dz - dzn));
+
+                        nodeArray[iNode].xnew = nodeArray[iNode].x + dx;
+                        nodeArray[iNode].ynew = nodeArray[iNode].y + dy;
+                        nodeArray[iNode].znew = nodeArray[iNode].z + dz;
+                    }
+                }
+
+                if (iter == 1)
+                {
+                    cout << "#iter       normx     normy     normz    norm\n";
+                    cout << "iter = " << iter << "	" << normx << "	" << normy << "	" << normz << "	" << norm << endl;
+                    norm1 = norm;
+                }
+
+                if (iter % 100 == 0)
+                {
+                    cout << "iter = " << iter << "	" << normx << "	" << normy << "	" << normz << "	" << norm << endl;
+                }
+
+                if (norm / norm1 < epsilon)
+                {
+                    break;
+                }
+            }
+        }
+
+        PostTreat();
+        PostVisual(visualFileName, iStep + 1);
+    }
+
+    PrintToWindow("  End Deforming ... ", "\n");
+    WriteLogFile("  End Deforming ... ", "\n");
+}
+
+void Mesh_DeformationSPRING::MatchControlPoints()
+{
+    RDouble rotatePostion = this->deformParameter->GetRotatePostionZ();
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        DynamicGrid *grid = deformedGrid[iZone];
+        DYFace *faceArray = grid->GetFaceArray();
+        DYNode *nodeArray = grid->GetNodeArray();
+
+        int nBoundFace = grid->GetNBoundFace();
+        int nTotalNode = grid->GetNTotalNode();
+
+        int *nodeMark = new int[nTotalNode];
+        SetField(nodeMark, 0, nTotalNode);
+
+        for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+        {
+            int bctype = faceArray[iFace].bcType;
+            if (bctype != PHENGLEI::SOLID_SURFACE)
+            {
+                continue;
+            }
+
+            for (int iNode = 0; iNode < faceArray[iFace].nodeNumber; ++ iNode)
+            {
+                int nodeIndex = faceArray[iFace].face2node[iNode];
+                if (nodeMark[nodeIndex] == 1)
+                {
+                    continue;
+                }
+
+                if (fabs(nodeArray[nodeIndex].z) < rotatePostion)
+                {
+                    continue;
+                }
+                nodeMark[nodeIndex] = 1;
+
+                nodeArray[nodeIndex].moveType = DYNAMIC_POINT_WALL;
+            }
+        }
+
+        delete [] nodeMark;
+    }
+}
+
+void Mesh_DeformationSPRING::PostTreat()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        DynamicGrid *grid = deformedGrid[iZone];
+        DYNode *nodeArray = grid->GetNodeArray();
+
+        int nTotalNode = grid->GetNTotalNode();
+        for (int iNode = 0; iNode < nTotalNode; ++ iNode)
+        {
+            if (nodeArray[iNode].moveType == STATIC_POINT)
+            {
+                continue;
+            }
+
+            nodeArray[iNode].x = nodeArray[iNode].xnew;
+            nodeArray[iNode].y = nodeArray[iNode].ynew;
+            nodeArray[iNode].z = nodeArray[iNode].znew;
+        }
+    }
+
+    SetSymmetryToZero();
+}
+
+}
\ No newline at end of file
diff --git a/Mesh/src/Mesh_FaceTopo.cpp b/Mesh/src/Mesh_FaceTopo.cpp
new file mode 100644
index 0000000..e300c54
--- /dev/null
+++ b/Mesh/src/Mesh_FaceTopo.cpp
@@ -0,0 +1,229 @@
+#include "Mesh_FaceTopo.h"
+#include "Geo_Element.h"
+#include "TK_Exit.h"
+
+namespace PHSPACE
+{
+Mesh_FaceTopo::Mesh_FaceTopo()
+{
+
+}
+
+Mesh_FaceTopo::~Mesh_FaceTopo()
+{
+
+}
+
+int Mesh_FaceTopo::GetNTotalFaces()
+{
+    return static_cast<int>(faceType.size());
+}
+
+int Mesh_FaceTopo::GetNumberOfTotalEdgesWithMiddleNode()
+{
+    return static_cast<int>(middleNodeOfEdge.size());
+}
+
+int Mesh_FaceTopo::GetNBoundaryFaces()
+{
+    int nTotalFaces = this->GetNTotalFaces();
+    int nBoundaryFaces = 0;
+
+    for (int iFace = 0; iFace < nTotalFaces; ++ iFace)
+    {
+        int rightCell = rightCellIndex[iFace];
+        bool isBoundaryFace = (childrenFaceIndex[iFace].size() == 0);
+        isBoundaryFace = isBoundaryFace && PHSPACE::IsBoundaryFace(rightCell);
+
+        if (isBoundaryFace)
+        {
+            ++ nBoundaryFaces;
+        }
+    }
+
+    return nBoundaryFaces;
+}
+
+int Mesh_FaceTopo::FindFace(MultiIndex face)
+{
+    set< MultiIndex >::iterator iter = faceList.find(face);
+    if (iter == faceList.end())
+    {
+        return PHSPACE::INVALID_INDEX;
+    }
+    return iter->id;
+}
+
+int Mesh_FaceTopo::FindFace(PHVectorInt1D face2Node)
+{
+    uint_t nodeNumber = face2Node.size();
+
+    PHVectorInt1D faceOfSort = face2Node;
+    sort(faceOfSort.begin(), faceOfSort.end());
+
+    MultiIndex faceOfMultiIndex(static_cast<int>(nodeNumber), GetNTotalFaces());
+    faceOfMultiIndex.SetData(&faceOfSort[0]);
+
+    return FindFace(faceOfMultiIndex);
+}
+
+int Mesh_FaceTopo::FindCompositeFace(MultiIndex compositeFace)
+{
+    set< MultiIndex >::iterator iter = compositeFacesList.find(compositeFace);
+    if (iter == compositeFacesList.end())
+    {
+        return PHSPACE::INVALID_INDEX;
+    }
+    return iter->id;
+}
+
+int Mesh_FaceTopo::FindEdgeWithMiddleNode(MultiIndex edgeWithMiddleNode)
+{
+    set< MultiIndex >::iterator iter = edgesWithMiddleNode.find(edgeWithMiddleNode);
+    if (iter == edgesWithMiddleNode.end())
+    {
+        return INVALID_INDEX;
+    }
+    return iter->id;
+}
+
+void Mesh_FaceTopo::InsertFace(MultiIndex face)
+{
+    faceList.insert(face);
+}
+
+void Mesh_FaceTopo::InsertCompositeFace(MultiIndex compositeface)
+{
+    compositeFacesList.insert(compositeface);
+}
+
+void Mesh_FaceTopo::InsertEdgeWithMiddleNode(MultiIndex edgeWithMiddleNode)
+{
+    edgesWithMiddleNode.insert(edgeWithMiddleNode);
+}
+
+int Mesh_FaceTopo::AddFace(PHVectorInt1D &face2NodeIn, int faceTypeIn, int parentFaceIndex)
+{
+    uint_t nodeNumber = face2NodeIn.size();
+
+    PHVectorInt1D sortedFaceNodeIndex = face2NodeIn;
+    sort(sortedFaceNodeIndex.begin(), sortedFaceNodeIndex.end());
+
+    MultiIndex faceOfMultiIndex(static_cast<int>(nodeNumber), GetNTotalFaces());
+    faceOfMultiIndex.SetData(&sortedFaceNodeIndex[0]);
+
+    int faceIndex = FindFace(faceOfMultiIndex);
+    if (faceIndex == PHSPACE::INVALID_INDEX)
+    {
+        InsertFace(faceOfMultiIndex);
+        faceIndex = this->GetNTotalFaces();
+
+        ResizeFaceNumber(faceIndex + 1);
+        SetDefaultFaceInformation(faceIndex, faceTypeIn, face2NodeIn, parentFaceIndex);
+        AddFaceHierachical(faceIndex, parentFaceIndex);
+    }
+    return faceIndex;
+}
+
+void Mesh_FaceTopo::ResizeFaceNumber(int faceNumber)
+{
+    faceType             .resize(faceNumber);
+    face2Node            .resize(faceNumber);
+    leftCellIndex        .resize(faceNumber);
+    rightCellIndex       .resize(faceNumber);
+    parentFaceIndex      .resize(faceNumber);
+    childrenFaceIndex    .resize(faceNumber);
+    faceBoundaryCondition.resize(faceNumber);
+}
+
+void Mesh_FaceTopo::SetDefaultFaceInformation(int faceIndex, int faceTypeIn, PHVectorInt1D &face2NodeIn, int parentFaceIndex)
+{
+    this->leftCellIndex[faceIndex] = PHSPACE::INVALID_INDEX;
+    this->rightCellIndex[faceIndex] = PHSPACE::INVALID_INDEX;
+
+    SimpleBC *parentBC = this->faceBoundaryCondition[parentFaceIndex];
+    this->faceBoundaryCondition[faceIndex] = parentBC;
+
+    this->faceType[faceIndex] = faceTypeIn;
+    this->face2Node[faceIndex] = face2NodeIn;
+}
+
+void Mesh_FaceTopo::AddFaceHierachical(int faceIndex, int parentFaceIndexIn)
+{
+    this->parentFaceIndex[faceIndex] = parentFaceIndexIn;
+    this->childrenFaceIndex[parentFaceIndexIn].push_back(faceIndex);
+}
+
+void Mesh_FaceTopo::ScanChildFace(PHVectorInt1D cell2Node, int cellType, int cellIndex)
+{
+    BasicElement *basicElement = GetBasicElement(cellType);
+    uint_t faceNumber = basicElement->GetElementFaceNumber();
+    PHVectorInt1D absoluteFace2Node;
+
+    for (int iFace = 0; iFace < faceNumber; ++ iFace)
+    {
+        vector< int > &relativeFace2Node = basicElement->GetElementFace(iFace);
+        int iFaceType = basicElement->GetFaceElementType(iFace);
+
+        uint_t nodeNumber = relativeFace2Node.size();
+        absoluteFace2Node.resize(nodeNumber);
+
+        for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+        {
+            int relativeIndex = relativeFace2Node[iNode];
+            int nodeIndex = cell2Node[relativeIndex];
+            absoluteFace2Node[iNode] = nodeIndex;
+        }
+
+        PHVectorInt1D sortedFace2Node = absoluteFace2Node;
+        sort(sortedFace2Node.begin(), sortedFace2Node.end());
+
+        MultiIndex faceOfMultiIndex(static_cast<int>(nodeNumber), GetNTotalFaces());
+        faceOfMultiIndex.SetData(&sortedFace2Node[0]);
+
+        int globalFaceIndex = FindFace(faceOfMultiIndex);
+        if (globalFaceIndex == INVALID_INDEX)
+        {
+            uint_t globalFaceNumber = faceList.size();
+            uint_t faceNumber1 = leftCellIndex.size();
+            if (globalFaceNumber != faceNumber1)
+            {
+                cout << "globalFaceNumber != faceNumber " << globalFaceNumber << " " << faceNumber1 << "\n";
+                TK_Exit::PrintDebugInfoExit("");
+            }
+
+            InsertFace(faceOfMultiIndex);
+
+            leftCellIndex.push_back(cellIndex);
+            rightCellIndex.push_back(INVALID_INDEX);
+            faceBoundaryCondition.push_back(0);
+            faceType.push_back(iFaceType);
+
+            face2Node.push_back(absoluteFace2Node);
+            parentFaceIndex.push_back(INVALID_INDEX);
+            childrenFaceIndex.resize(childrenFaceIndex.size() + 1);
+        }
+        else
+        {
+            if (leftCellIndex[globalFaceIndex] == INVALID_INDEX)
+            {
+                leftCellIndex[globalFaceIndex] = cellIndex;
+            }
+            else
+            {
+                int rightCell = rightCellIndex[globalFaceIndex];
+                bool isBoundaryFace = PHSPACE::IsBoundaryFace(rightCell);
+
+                if (isBoundaryFace)
+                {
+                    if (leftCellIndex[globalFaceIndex] != cellIndex)
+                    {
+                        rightCellIndex[globalFaceIndex] = cellIndex;
+                    }
+                }
+            }
+        }
+    }
+}
+
+}
\ No newline at end of file
diff --git a/Mesh/src/Mesh_Refine.cpp b/Mesh/src/Mesh_Refine.cpp
new file mode 100644
index 0000000..e916745
--- /dev/null
+++ b/Mesh/src/Mesh_Refine.cpp
@@ -0,0 +1,92 @@
+#include "Mesh_Refine.h"
+#include "TK_Log.h"
+#include "Pre_HDF5File.h"
+
+namespace PHSPACE
+{
+
+Mesh_Refine::Mesh_Refine(const string &gridFileNameIn)
+{
+    this->gridFileName = gridFileNameIn;
+    numberOfZones = 0;
+
+    region = 0;
+    refinedGrids = 0;
+    refineParameter = 0;
+}
+
+Mesh_Refine::~Mesh_Refine()
+{
+    delete region;
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        delete refinedGrids[iZone];
+    }
+    delete [] refinedGrids;
+}
+
+void Mesh_Refine::Run()
+{
+    ReadGrid();
+
+    AllocateMemory();
+
+    ConstructGridTopo();
+
+    BuildRefineProperty();
+
+    FixAnisoRefineType();
+
+    RefineGrid();
+
+    GenerateAndDumpComputationalGrid();
+}
+
+void Mesh_Refine::SetRefineParameter(RefineParameter *refineParameterIn)
+{
+    this->refineParameter = refineParameterIn;
+}
+
+void Mesh_Refine::ReadGrid()
+{
+    GlobalDataBase::UpdateData("gridfile", &gridFileName, PHSTRING, 1);
+
+    region = new Region();
+    region->ReadGrid();
+    region->SetupMultiBlockRelationship();
+}
+
+void Mesh_Refine::DumpComputationalGrid()
+{
+    string out_gfile;
+    GlobalDataBase::GetData("out_gfile", &out_gfile, PHSTRING, 1);
+
+    WriteLogFile(" Grid Writing ...");
+    if (PHMPI::GetCurrentProcessorID() == 0) cout << "  Grid Writing ... " << endl;
+
+    if (out_gfile == "") return;
+
+    PrintToWindow("    Writing new HDF5 version grid to file ....\n");
+    WriteLogFile("    Writing new HDF5 version grid to file ....\n");
+
+    IO_HDF5Write writeGrid(out_gfile, refinedGrids, numberOfZones);
+    writeGrid.Run();
+
+    WriteLogFile(" End Writing Grid!");
+}
+
+
+void RefineParameter::SetAnisoRefineType(int anisoRefineIn)
+{
+    this->anisoRefine = anisoRefineIn;
+}
+
+int RefineParameter::GetAnisoRefineType()
+{
+    return this->anisoRefine;
+}
+
+}
+
+
diff --git a/Mesh/src/Mesh_RefineController.cpp b/Mesh/src/Mesh_RefineController.cpp
new file mode 100644
index 0000000..2e7bf2b
--- /dev/null
+++ b/Mesh/src/Mesh_RefineController.cpp
@@ -0,0 +1,1562 @@
+#include "Mesh_RefineController.h"
+#include "Geo_Element.h"
+#include "TK_Log.h"
+
+namespace PHSPACE
+{
+
+Mesh_RefineController::Mesh_RefineController()
+{
+    zoneIndex = 0;
+    nTotalNode = 0;
+    nBoundaryFace = 0;
+    oldNumberOfCell = 0;
+    hasBeenRefined = false;
+
+    cellTopo = new Mesh_CellTopo();
+    nodeTopo = new Geo_PointFactory();
+    faceTopo = new Mesh_FaceTopo();
+    computationalFaceTopo = new Mesh_FaceTopo();
+    interfaceInformation = 0;
+}
+
+Mesh_RefineController::~Mesh_RefineController()
+{
+    delete cellTopo;
+    delete nodeTopo;
+    delete faceTopo;
+    delete computationalFaceTopo;
+}
+
+void Mesh_RefineController::Initialize()
+{
+    this->SetNBoundaryFace(faceTopo->GetNBoundaryFaces());
+    this->SetOldNumberOfCell(cellTopo->GetNTotalCell());
+}
+
+void Mesh_RefineController::ConstructNode2Cell()
+{
+    int nTotalNode = static_cast<int>(nodeTopo->GetNumberOfPoints());
+    this->SetNTotalNode(nTotalNode);
+
+    PHVector1D < set< int > > &node2Cell = cellTopo->GetNode2Cell();
+
+    PHVectorInt1D &leftCellIndex  = faceTopo->GetLeftCellIndex();
+    PHVectorInt1D &rightCellIndex = faceTopo->GetRightCellIndex();
+    PHVectorInt2D &face2NodeArray = faceTopo->GetFace2Node();
+
+    node2Cell.resize(nTotalNode);
+
+    int nTotalFace = faceTopo->GetNTotalFaces();
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        int leftCell  = leftCellIndex [iFace];
+        int rightCell = rightCellIndex[iFace];
+
+        uint_t nodeNumber = face2NodeArray[iFace].size();
+        for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+        {
+            int nodeIndex = face2NodeArray[iFace][iNode];
+
+            node2Cell[nodeIndex].insert(leftCell);
+            if (!PHSPACE::IsBoundaryFace(rightCell))
+            {
+                node2Cell[nodeIndex].insert(rightCell);
+            }
+        }
+    }
+}
+
+void Mesh_RefineController::ConstructCell2Cell()
+{
+    PHVector1D < set< int > > &cell2Cell = cellTopo->GetCell2Cell();
+    PHVector1D < set< int > > &node2Cell = cellTopo->GetNode2Cell();
+    PHVectorInt2D &cell2Node = cellTopo->GetCell2Node();
+
+    int nTotalCell = cellTopo->GetNTotalCell();
+    cell2Cell.resize(nTotalCell);
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        PHVectorInt1D &iCell2Node = cell2Node[iCell];
+
+        int nodeNumber = static_cast<int>(iCell2Node.size());
+        for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+        {
+            int nodeIndex = iCell2Node[iNode];;
+            set< int > &iNode2Cell = node2Cell[nodeIndex];
+
+            for (set< int >::iterator iterN = iNode2Cell.begin(); iterN != iNode2Cell.end(); ++ iterN)
+            {
+                int cellIndex = *iterN;
+                if (cellIndex != iCell)
+                {
+                    cell2Cell[iCell].insert(cellIndex);
+                }
+            }
+        }
+    }
+}
+
+void Mesh_RefineController::InitAnisoRefineType()
+{
+    int nTotalCell = cellTopo->GetNTotalCell();
+    int nBoundFace = faceTopo->GetNBoundaryFaces();
+    int nTotal = nTotalCell + nBoundFace;
+
+    PHVectorInt1D &cellType = cellTopo->GetCellType();
+    PHVectorInt1D &refineType = cellTopo->GetRefineType();
+    refineType.resize(nTotal);
+
+    int anisoRefine = GlobalDataBase::GetIntParaFromDB("anisoRefine");
+    if (anisoRefine == ISOTROPICREFINE)
+    {
+        //! Set all cells to be isotropic refine.
+        SetField(refineType, ISOTROPICREFINE, nTotal);
+    }
+    else
+    {
+        //! Set all cells to be anisotropic refine.
+        SetField(refineType, ANISOTROPICREFINE, nTotal);
+
+        //! Set all the non-prism cells to be isotropic refine.
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            if (cellType[iCell] != PENTA_6)
+            {
+                refineType[iCell] = ISOTROPICREFINE;
+            }
+        }
+    }
+}
+
+void Mesh_RefineController::FixAnisoRefineType()
+{
+    int nTotalCell = cellTopo->GetNTotalCell();
+    int nBoundFace = faceTopo->GetNBoundaryFaces();
+    int nTotalFace = faceTopo->GetNTotalFaces();
+
+    PHVectorInt2D &cell2Face = cellTopo->GetCell2Face();
+    PHVectorInt1D &refineType = cellTopo->GetRefineType();
+
+    PHVectorInt1D &faceType = faceTopo->GetFaceType();
+    PHVectorInt1D &leftCellIndex = faceTopo->GetLeftCellIndex();
+    PHVectorInt1D &rightCellIndex = faceTopo->GetRightCellIndex();
+    vector<SimpleBC *> &faceBoundaryCondition = faceTopo->GetFaceBoundaryCondition();
+
+    deque<int> cellQueue;
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        if (faceType[iFace] != QUAD_4) continue;
+        if (faceBoundaryCondition[iFace]->GetBCType() != PHENGLEI::INTERFACE) continue;
+
+        int leftCell  = leftCellIndex[iFace];
+        int rightCell = rightCellIndex[iFace];
+
+        if (leftCell >= nTotalCell)
+        {
+            SWAP(leftCell, rightCell);
+        }
+        if (rightCell < 0)
+        {
+            rightCell = -rightCell;
+        }
+
+        if (refineType[leftCell] != ISOTROPICREFINE && refineType[rightCell] == ISOTROPICREFINE)
+        {
+            cellQueue.push_back(leftCell);
+        }
+    }
+
+    for (int iFace = nBoundFace; iFace < nTotalFace; ++ iFace)
+    {
+        if (faceType[iFace] != QUAD_4) continue;
+
+        int leftCell  = leftCellIndex[iFace];
+        int rightCell = rightCellIndex[iFace];
+
+        if (refineType[leftCell] == ISOTROPICREFINE && refineType[rightCell] != ISOTROPICREFINE)
+        {
+            cellQueue.push_back(rightCell);
+        }
+        if (refineType[leftCell] != ISOTROPICREFINE && refineType[rightCell] == ISOTROPICREFINE)
+        {
+            cellQueue.push_back(leftCell);
+        }
+    }
+
+    while (!cellQueue.empty())
+    {
+        int currentCellID = cellQueue.front();
+        cellQueue.pop_front();
+
+        if (refineType[currentCellID] == ISOTROPICREFINE)
+        {
+            continue;
+        }
+
+        refineType[currentCellID] = ISOTROPICREFINE;
+
+        int nFace = static_cast<int>(cell2Face[currentCellID].size());
+        for (int iFace = 0; iFace < nFace; ++ iFace)
+        {
+            int faceID = cell2Face[currentCellID][iFace];
+
+            if (faceID < nBoundFace) continue;
+            if (faceType[faceID] != QUAD_4) continue;
+
+            int leftCell  = leftCellIndex[faceID];
+            int rightCell = rightCellIndex[faceID];
+
+            int nextCell = rightCell;
+            if (rightCell == currentCellID)
+            {
+                nextCell = leftCell;
+            }
+
+            cellQueue.push_back(nextCell);
+        }
+    }
+}
+
+void Mesh_RefineController::RefineGrid()
+{
+    WriteLogFile("Start Splitting Grid!");
+
+    int numberOfGridSelfRefine = 1;
+    for (int iGridSelfRefine = 0; iGridSelfRefine < numberOfGridSelfRefine; ++ iGridSelfRefine)
+    {
+        this->SplitAllElements();
+    }
+
+    this->SetRefineStatus(true);
+
+    WriteLogFile("End Splitting Grid!");
+
+    ConstructBasicData();
+}
+
+void Mesh_RefineController::ConstructBasicData()
+{
+    WriteLogFile("Start Constructing Basic Data!");
+
+    ScanAllElementsToReconstructFaceDataStructure();
+
+    GenerateCellIndex();
+
+    GenerateGlobalToComputationalCellFaceIndex();
+
+    GenerateComputationalCellFaceInformation();
+
+    GenerateComputationalFaceNodeIndex();
+}
+
+void Mesh_RefineController::ScanAllElementsToReconstructFaceDataStructure()
+{
+    int nTotalCell = cellTopo->GetNTotalCell();
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        int iCellType = cellTopo->GetCellType(iCell);
+        if (!IsBasicVolumeElementType(iCellType))
+        {
+            continue;
+        }
+
+        faceTopo->ScanChildFace(cellTopo->GetCell2Node(iCell), iCellType, iCell);
+    }
+
+    PrintToWindow("  Total Element Number = ", nTotalCell, "\n");
+}
+
+void Mesh_RefineController::GenerateCellIndex()
+{
+    PHVectorInt1D &computationalToGlobalCellIndex = cellTopo->GetComputationalToGlobalCellIndex();
+    PHVectorInt1D &globalToComputationalCellIndex = cellTopo->GetGlobalToComputationalCellIndex();
+
+    int nTotalCell = cellTopo->GetNTotalCell();
+    globalToComputationalCellIndex.resize(nTotalCell);
+
+    int computationalCell = 0;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        int computationalStatusOfCell = cellTopo->GetCellComputationalStatus(iCell);
+        if (computationalStatusOfCell == ON)
+        {
+            ++computationalCell;
+        }
+    }
+
+    int numberOfComputationalCell = computationalCell;
+    computationalToGlobalCellIndex.resize(numberOfComputationalCell);
+
+    computationalCell = 0;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        int computationalStatusOfCell = cellTopo->GetCellComputationalStatus(iCell);
+        if (computationalStatusOfCell == ON)
+        {
+            computationalToGlobalCellIndex[computationalCell] = iCell;
+            globalToComputationalCellIndex[iCell] = computationalCell;
+
+            ++ computationalCell;
+        }
+    }
+}
+
+void Mesh_RefineController::GenerateComputationalFaceNodeIndex()
+{
+    PHVectorInt1D &computationalToGlobalNodeIndex = nodeTopo->GetComputationalToGlobalNodeIndexMapping();
+    PHVectorInt1D &globalToComputationalNodeIndex = nodeTopo->GetGlobalToComputationalNodeIndexMapping();
+
+    PHVectorInt2D &intermediateFace2Node  = computationalFaceTopo->GetIntermediateFace2Node();
+    PHVectorInt2D &computationalFace2Node = computationalFaceTopo->GetFace2Node();
+
+    int numberOfFacesForComputation = computationalFaceTopo->GetNTotalFaces();
+
+    set< int > computationalNodeIndexSet;
+    for (int iFaceForComputation = 0; iFaceForComputation < numberOfFacesForComputation; ++ iFaceForComputation)
+    {
+        PHVectorInt1D faceNodesIndexes = intermediateFace2Node[iFaceForComputation];
+        uint_t faceNodesIndexesSize = faceNodesIndexes.size();
+        for (int iNode = 0; iNode < faceNodesIndexesSize; ++ iNode)
+        {
+            int globalNodeIndex = faceNodesIndexes[iNode];
+            computationalNodeIndexSet.insert(globalNodeIndex);
+        }
+    }
+
+    int nTotalFaces = faceTopo->GetNTotalFaces();
+    PHVectorInt2D &face2Node = faceTopo->GetFace2Node();
+
+    set< int > globalNodeIndexSet;
+    for (int iFace = 0; iFace < nTotalFaces; ++ iFace)
+    {
+        PHVectorInt1D faceNodesIndexes = face2Node[iFace];
+        uint_t faceNodesIndexesSize = faceNodesIndexes.size();
+        for (int iNode = 0; iNode < faceNodesIndexesSize; ++ iNode)
+        {
+            int globalNodeIndex = faceNodesIndexes[iNode];
+            globalNodeIndexSet.insert(globalNodeIndex);
+        }
+    }
+
+    uint_t numberOfNodesForComputation = computationalNodeIndexSet.size();
+    uint_t numberOfNodes = globalNodeIndexSet.size();
+
+    computationalToGlobalNodeIndex.resize(numberOfNodesForComputation);
+    globalToComputationalNodeIndex.resize(numberOfNodes);
+    SetField(globalToComputationalNodeIndex, INVALID_INDEX, static_cast<int>(numberOfNodes));
+
+    int iNodeForComputation = 0;
+    for (set< int >::iterator iter = computationalNodeIndexSet.begin(); iter != computationalNodeIndexSet.end(); ++ iter)
+    {
+        int nodeIndex = *iter;
+
+        computationalToGlobalNodeIndex[iNodeForComputation] = nodeIndex;
+        globalToComputationalNodeIndex[nodeIndex] = iNodeForComputation;
+        ++ iNodeForComputation;
+    }
+
+    for (int iFaceForComputation = 0; iFaceForComputation < numberOfFacesForComputation; ++ iFaceForComputation)
+    {
+        PHVectorInt1D &faceNodeIndexArray = intermediateFace2Node[iFaceForComputation];
+        PHVectorInt1D faceNodeIndexArrayForComputation;
+        uint_t numberOfNodesOfFace = faceNodeIndexArray.size();
+        for (int iNode = 0; iNode < numberOfNodesOfFace; ++ iNode)
+        {
+            int nodeIndex = faceNodeIndexArray[iNode];
+            int nodeIndexForComputation = globalToComputationalNodeIndex[nodeIndex];
+            faceNodeIndexArrayForComputation.push_back(nodeIndexForComputation);
+        }
+        computationalFace2Node.push_back(faceNodeIndexArrayForComputation);
+    }
+}
+
+void Mesh_RefineController::GenerateComputationalCellFaceInformation()
+{
+    GenerateComputationalElementFaceInformationFirstPart();
+
+    GenerateComputationalElementFaceInformationSecondPart();
+}
+
+void Mesh_RefineController::GenerateComputationalElementFaceInformationSecondPart()
+{
+    PHVectorInt1D &parentFaceIndex              = faceTopo->GetParentFaceIndex();
+    PHVectorInt1D &childrenToCompositeFaceIndex = faceTopo->GetChildrenToCompositeFaceIndex();
+
+    PHVectorInt1D &faceTypeForComputation         = computationalFaceTopo->GetFaceType();
+    PHVectorInt1D &computationalToGlobalFaceIndex = computationalFaceTopo->GetComputationalToGlobalFaceIndex();
+
+    int numberOfFacesForComputation = computationalFaceTopo->GetNTotalFaces();
+    for (int iFaceForComputation = 0; iFaceForComputation < numberOfFacesForComputation; ++ iFaceForComputation)
+    {
+        if (faceTypeForComputation[iFaceForComputation] == HANGINGFACE)
+        {
+            int faceIndex = computationalToGlobalFaceIndex[iFaceForComputation];
+            int faceParentID = parentFaceIndex[faceIndex];
+
+            if (faceParentID == INVALID_INDEX)
+            {
+                cout << "error Generate EdgesWithMiddlePoints \n";
+            }
+
+            int iCompositeFace = childrenToCompositeFaceIndex[faceParentID];
+            GenerateEdgesWithMiddlePoints(iCompositeFace);
+        }
+    }
+
+    PHVectorInt2D &intermediateFace2Node = computationalFaceTopo->GetIntermediateFace2Node();
+
+    for (int iFaceForComputation = 0; iFaceForComputation < numberOfFacesForComputation; ++ iFaceForComputation)
+    {
+        PHVectorInt1D &middleNodeOfEdge = faceTopo->GetMiddleNodeOfEdge();
+
+        PHVectorInt1D &iFace2Node = intermediateFace2Node[iFaceForComputation];
+        PHVectorInt1D iFace2NodeForComputation = iFace2Node;
+
+        uint_t nodeNumber = iFace2Node.size();
+        for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+        {
+            int iNode0 = iNode;
+            int iNode1 = (iNode + 1) % nodeNumber;
+
+            int nodeIndex0 = iFace2Node[iNode0];
+            int nodeIndex1 = iFace2Node[iNode1];
+
+            PHVectorInt1D edgeNodeIndexes;
+            edgeNodeIndexes.push_back(nodeIndex0);
+            edgeNodeIndexes.push_back(nodeIndex1);
+
+            PHVectorInt1D sortedEdgeNodeIndexes = edgeNodeIndexes;
+            sort(sortedEdgeNodeIndexes.begin(), sortedEdgeNodeIndexes.end());
+
+            int edgeWithMiddlePointCandidateIndex = faceTopo->GetNumberOfTotalEdgesWithMiddleNode();
+            int edgeNodeNumber = 2;
+
+            MultiIndex edgeOfMultiIndex(edgeNodeNumber, edgeWithMiddlePointCandidateIndex);
+
+            edgeOfMultiIndex.SetData(&sortedEdgeNodeIndexes[0]);
+
+            int edgeWithMiddlePointIndex = faceTopo->FindEdgeWithMiddleNode(edgeOfMultiIndex);
+
+            if (edgeWithMiddlePointIndex == INVALID_INDEX) continue;
+
+            int middlePointIndex = middleNodeOfEdge[edgeWithMiddlePointIndex];
+
+            PHVectorInt1D::iterator iter = find(iFace2NodeForComputation.begin(), iFace2NodeForComputation.end(), nodeIndex1);
+
+            if (iter == iFace2NodeForComputation.begin())
+            {
+                iFace2NodeForComputation.push_back(middlePointIndex);
+            }
+            else
+            {
+                iFace2NodeForComputation.insert(iter, middlePointIndex);
+            }
+        }
+        intermediateFace2Node[iFaceForComputation] = iFace2NodeForComputation;
+    }
+}
+
+void Mesh_RefineController::GenerateEdgesWithMiddlePoints(int iCompositeFace)
+{
+    PHVectorInt1D &middleNodeOfEdge   = faceTopo->GetMiddleNodeOfEdge();
+    PHVectorInt1D &compositeFaceType  = faceTopo->GetCompositeFaceType();
+    PHVectorInt2D &compositeFace2Node = faceTopo->GetCompositeFace2Node();
+
+    int iCompositeFaceType = compositeFaceType[iCompositeFace];
+    int simpleFaceType = GetSimpleElementType(iCompositeFaceType);
+    int simpleFaceNodeNumber = GetElementNodeNumbers(simpleFaceType);
+
+    int edgeNodeNumber = 2;
+    for (int iNode = 0; iNode < simpleFaceNodeNumber; ++ iNode)
+    {
+        int iMiddleNode = simpleFaceNodeNumber + iNode;
+
+        int iNode0 = iNode;
+        int iNode1 = (iNode + 1) % simpleFaceNodeNumber;
+
+        PHVectorInt1D edgeNodeIndexes;
+        edgeNodeIndexes.push_back(compositeFace2Node[iCompositeFace][iNode0]);
+        edgeNodeIndexes.push_back(compositeFace2Node[iCompositeFace][iNode1]);
+
+        PHVectorInt1D sortedEdgeNodeIndexes = edgeNodeIndexes;
+        sort(sortedEdgeNodeIndexes.begin(), sortedEdgeNodeIndexes.end());
+
+        int edgeWithMiddleNodeIndexCandidate = faceTopo->GetNumberOfTotalEdgesWithMiddleNode();
+
+        MultiIndex edgeOfMultiIndex(edgeNodeNumber, edgeWithMiddleNodeIndexCandidate);
+        edgeOfMultiIndex.SetData(&sortedEdgeNodeIndexes[0]);
+
+        int edgeWithMiddleNodeIndex = faceTopo->FindEdgeWithMiddleNode(edgeOfMultiIndex);
+        if (edgeWithMiddleNodeIndex == INVALID_INDEX)
+        {
+            faceTopo->InsertEdgeWithMiddleNode(edgeOfMultiIndex);
+            middleNodeOfEdge.push_back(compositeFace2Node[iCompositeFace][iMiddleNode]);
+        }
+    }
+}
+
+void Mesh_RefineController::GenerateComputationalElementFaceInformationFirstPart()
+{
+    PHVectorInt1D &computationalToGlobalFaceIndex = computationalFaceTopo->GetComputationalToGlobalFaceIndex();
+    PHVectorInt1D &faceTypeForComputation         = computationalFaceTopo->GetFaceType();
+
+    PHVectorInt2D &face2Node = faceTopo->GetFace2Node();
+    PHVectorInt2D &intermediateFace2NodeForComputation = computationalFaceTopo->GetIntermediateFace2Node();
+
+    int numberOfFacesForComputation = computationalFaceTopo->GetNTotalFaces();
+    for (int iFaceForComputation = 0; iFaceForComputation < numberOfFacesForComputation; ++ iFaceForComputation)
+    {
+        int faceIndex = computationalToGlobalFaceIndex[iFaceForComputation];
+        int faceType = faceTypeForComputation[iFaceForComputation];
+
+        if (faceType == BOUNDARYFACE)
+        {
+            ProcessBoundaryFace(iFaceForComputation);
+        }
+        else if (faceType == GENERALFACE)
+        {
+            ProcessGereralFace(iFaceForComputation);
+        }
+        else if (faceType == HANGINGFACE)
+        {
+            ProcessHangingFace(iFaceForComputation);
+        }
+
+        PHVectorInt1D &iFace2Node = face2Node[faceIndex];
+        intermediateFace2NodeForComputation.push_back(iFace2Node);
+    }
+}
+
+void Mesh_RefineController::ProcessBoundaryFace(int iFaceForComputation)
+{
+    PHVectorInt1D &cellComputationalStatus        = cellTopo->GetCellComputationalStatus();
+    PHVectorInt1D &globalToComputationalCellIndex = cellTopo->GetGlobalToComputationalCellIndex();
+
+    PHVectorInt1D &leftCellIndex  = faceTopo->GetLeftCellIndex();
+    PHVectorInt1D &rightCellIndex = faceTopo->GetRightCellIndex();
+
+    PHVectorInt1D &leftCellIndexForComputation    = computationalFaceTopo->GetLeftCellIndex();
+    PHVectorInt1D &rightCellIndexForComputation   = computationalFaceTopo->GetRightCellIndex();
+    PHVectorInt1D &computationalToGlobalFaceIndex = computationalFaceTopo->GetComputationalToGlobalFaceIndex();
+
+    int faceIndex = computationalToGlobalFaceIndex[iFaceForComputation];
+    int leftCell = leftCellIndex[faceIndex];
+    int rightCell = rightCellIndex[faceIndex];
+
+    bool isRightElementExist = !IsElementNotExist(rightCell);
+    if (cellComputationalStatus[leftCell] == HIDDEN)
+    {
+        string err = " Error: ProcessBoundaryFace error computationalStatus of left Element ";
+        TK_Exit::ExceptionExit(err);
+    }
+    else if (isRightElementExist)
+    {
+        string err = " Error: ProcessBoundaryFace error computationalStatus of right Element ";
+        TK_Exit::ExceptionExit(err);
+    }
+    else
+    {
+        int leftCellForComputation = globalToComputationalCellIndex[leftCell];
+        leftCellIndexForComputation.push_back(leftCellForComputation);
+        rightCellIndexForComputation.push_back(INVALID_INDEX);
+    }
+}
+
+void Mesh_RefineController::ProcessGereralFace(int iFaceForComputation)
+{
+    PHVectorInt1D &globalToComputationalCellIndex = cellTopo->GetGlobalToComputationalCellIndex();
+
+    PHVectorInt1D &leftCellIndex  = faceTopo->GetLeftCellIndex();
+    PHVectorInt1D &rightCellIndex = faceTopo->GetRightCellIndex();
+
+    PHVectorInt1D &leftCellIndexForComputation    = computationalFaceTopo->GetLeftCellIndex();
+    PHVectorInt1D &rightCellIndexForComputation   = computationalFaceTopo->GetRightCellIndex();
+    PHVectorInt1D &computationalToGlobalFaceIndex = computationalFaceTopo->GetComputationalToGlobalFaceIndex();
+
+    int faceIndex = computationalToGlobalFaceIndex[iFaceForComputation];
+    int leftCell  = leftCellIndex[faceIndex];
+    int rightCell = rightCellIndex[faceIndex];
+
+    int leftCellForComputation  = globalToComputationalCellIndex[leftCell];
+    int rightCellForComputation = globalToComputationalCellIndex[rightCell];
+
+    leftCellIndexForComputation.push_back(leftCellForComputation);
+    rightCellIndexForComputation.push_back(rightCellForComputation);
+}
+
+void Mesh_RefineController::ProcessHangingFace(int iFaceForComputation)
+{
+    PHVectorInt1D &cellComputationalStatus        = cellTopo->GetCellComputationalStatus();
+    PHVectorInt1D &globalToComputationalCellIndex = cellTopo->GetGlobalToComputationalCellIndex();
+
+    PHVectorInt1D &leftCellIndex   = faceTopo->GetLeftCellIndex();
+    PHVectorInt1D &rightCellIndex  = faceTopo->GetRightCellIndex();
+    PHVectorInt1D &parentFaceIndex = faceTopo->GetParentFaceIndex();
+
+    PHVectorInt1D &leftCellIndexForComputation    = computationalFaceTopo->GetLeftCellIndex();
+    PHVectorInt1D &rightCellIndexForComputation   = computationalFaceTopo->GetRightCellIndex();
+    PHVectorInt1D &computationalToGlobalFaceIndex = computationalFaceTopo->GetComputationalToGlobalFaceIndex();
+
+    int faceIndex = computationalToGlobalFaceIndex[iFaceForComputation];
+    int leftCell = leftCellIndex[faceIndex];
+    int rightCell = rightCellIndex[faceIndex];
+
+    int parentFace = parentFaceIndex[faceIndex];
+    if (parentFace == INVALID_INDEX)
+    {
+        string err = " Error: ProcessHangingFace error parentFaceIndex ";
+        TK_Exit::ExceptionExit(err);
+    }
+
+    if (cellComputationalStatus[leftCell] == HIDDEN)
+    {
+        if (rightCell == INVALID_INDEX)
+        {
+            string err = " Error: ProcessHangingFace error rightElementIndex ";
+            TK_Exit::ExceptionExit(err);
+        }
+        else
+        {
+            if (cellComputationalStatus[rightCell] == HIDDEN)
+            {
+                string err = " Error: ProcessHangingFace error rightElementStatus ";
+                TK_Exit::ExceptionExit(err);
+            }
+
+            int leftCellParent  = leftCellIndex[parentFace];
+            int rightCellParent = rightCellIndex[parentFace];
+
+            if (cellComputationalStatus[leftCellParent] == ON)
+            {
+                int leftCellForComputation = globalToComputationalCellIndex[leftCellParent];
+                leftCellIndexForComputation.push_back(leftCellForComputation);
+            }
+            else if (cellComputationalStatus[rightCellParent] == ON)
+            {
+                int leftCellForComputation = globalToComputationalCellIndex[rightCellParent];
+                leftCellIndexForComputation.push_back(leftCellForComputation);
+            }
+            else
+            {
+                string err = " Error: ProcessHangingFace error leftElementIndexForComputation ";
+                TK_Exit::ExceptionExit(err);
+            }
+
+            int rightCellForComputation = globalToComputationalCellIndex[rightCell];
+            rightCellIndexForComputation.push_back(rightCellForComputation);
+        }
+    }
+    else if (cellComputationalStatus[leftCell] == ON)
+    {
+        int leftCellForComputation = globalToComputationalCellIndex[leftCell];
+        leftCellIndexForComputation.push_back(leftCellForComputation);
+
+        if (rightCell == INVALID_INDEX)
+        {
+            int leftCellParent  = leftCellIndex[parentFace];
+            int rightCellParent = rightCellIndex[parentFace];
+
+            if (cellComputationalStatus[leftCellParent] == ON)
+            {
+                int rightCellForComputation = globalToComputationalCellIndex[leftCellParent];
+                rightCellIndexForComputation.push_back(rightCellForComputation);
+            }
+            else if (cellComputationalStatus[rightCellParent] == ON)
+            {
+                int rightCellForComputation = globalToComputationalCellIndex[rightCellParent];
+                rightCellIndexForComputation.push_back(rightCellForComputation);
+            }
+            else
+            {
+                string err = " Error: ProcessHangingFace error rightElementIndexForComputation 0 ";
+                TK_Exit::ExceptionExit(err);
+            }
+        }
+        else
+        {
+            if (cellComputationalStatus[rightCell] == HIDDEN)
+            {
+                int leftCellParent  = leftCellIndex[parentFace];
+                int rightCellParent = rightCellIndex[parentFace];
+
+                if (cellComputationalStatus[leftCellParent] == ON)
+                {
+                    int rightCellForComputation = globalToComputationalCellIndex[leftCellParent];
+                    rightCellIndexForComputation.push_back(rightCellForComputation);
+                }
+                else if (cellComputationalStatus[rightCellParent] == ON)
+                {
+                    int rightCellForComputation = globalToComputationalCellIndex[rightCellParent];
+                    rightCellIndexForComputation.push_back(rightCellForComputation);
+                }
+                else
+                {
+                    string err = " ProcessHangingFace error rightElementIndexForComputation 1 ";
+                    TK_Exit::ExceptionExit(err);
+                }
+            }
+            else
+            {
+                string err = " ProcessHangingFace error rightElementIndexForComputation 2 ";
+                TK_Exit::ExceptionExit(err);
+            }
+        }
+    }
+    else
+    {
+        string err = " ProcessHangingFace error ";
+        TK_Exit::ExceptionExit(err);
+    }
+}
+
+void Mesh_RefineController::GenerateGlobalToComputationalCellFaceIndex()
+{
+    PHVectorInt1D &globalToComputationalFaceIndex = faceTopo->GetGlobalToComputationalFaceIndex();
+
+    int numberOfTotalFaces = faceTopo->GetNTotalFaces();
+    globalToComputationalFaceIndex.resize(numberOfTotalFaces);
+
+    int iComputationalFaceCount = 0;
+    int iBoundaryFace = 0;
+
+    for (int iFace = 0; iFace < numberOfTotalFaces; ++ iFace)
+    {
+        GenerateGlobalToComputationalCellFaceIndex(iFace, iComputationalFaceCount, iBoundaryFace);
+    }
+}
+
+void Mesh_RefineController::GenerateGlobalToComputationalCellFaceIndex(int iFace, int &iComputationalFaceCount, int &iBoundaryFace)
+{
+    PHVectorInt1D &parentFaceIndex = faceTopo->GetParentFaceIndex();
+    int parentFace = parentFaceIndex[iFace];
+
+    if (parentFace == INVALID_INDEX)
+    {
+        GenerateGlobalToComputationalCellFaceIndexNoParentCase(iFace, iComputationalFaceCount, iBoundaryFace);
+    }
+    else
+    {
+        GenerateGlobalToComputationalCellFaceIndexWithParentCase(iFace, iComputationalFaceCount, iBoundaryFace);
+    }
+}
+
+void Mesh_RefineController::GenerateGlobalToComputationalCellFaceIndexWithParentCase(int iFace, int &iComputationalFaceCount, int &iBoundaryFace)
+{
+    PHVectorInt1D &cellComputationalStatus = cellTopo->GetCellComputationalStatus();
+
+    PHVectorInt1D &parentFaceIndex = faceTopo->GetParentFaceIndex();
+    PHVectorInt1D &leftCellIndex   = faceTopo->GetLeftCellIndex();
+    PHVectorInt1D &rightCellIndex  = faceTopo->GetRightCellIndex();
+
+    PHVectorInt1D      &faceTypeForComputation              = computationalFaceTopo->GetFaceType();
+    vector<SimpleBC *> &faceBoundaryCondition               = faceTopo->GetFaceBoundaryCondition();
+    vector<SimpleBC *> &faceBoundaryConditionForComputation = computationalFaceTopo->GetFaceBoundaryCondition();
+
+    PHVectorInt1D &computationalToGlobalFaceIndex = computationalFaceTopo->GetComputationalToGlobalFaceIndex();
+    PHVectorInt1D &globalToComputationalFaceIndex = faceTopo->GetGlobalToComputationalFaceIndex();
+
+    int leftCell   = leftCellIndex[iFace];
+    int rightCell  = rightCellIndex[iFace];
+    int parentFace = parentFaceIndex[iFace];
+
+    bool isLeftCellNotExist = IsElementNotExist(leftCell);
+    if (isLeftCellNotExist)
+    {
+        TK_Exit::PrintDebugInfoExit(" GenerateGlobalToComputationalElementFaceIndexMappingWithParentCase error\n");
+    }
+
+    bool isRightCellNotExist = IsElementNotExist(rightCell);
+    if (isRightCellNotExist)
+    {
+        int rightCellIndexOfParent = rightCellIndex[parentFace];
+
+        bool isBoundaryFaceOfParent = PHSPACE::IsBoundaryFace(rightCellIndexOfParent);
+        if (isBoundaryFaceOfParent)
+        {
+            if (cellComputationalStatus[leftCell] == HIDDEN)
+            {
+                return;
+            }
+            else
+            {
+                computationalToGlobalFaceIndex.push_back(iFace);
+                globalToComputationalFaceIndex[iFace] = iComputationalFaceCount;
+
+                faceBoundaryConditionForComputation.push_back(faceBoundaryCondition[iFace]);
+                faceTypeForComputation.push_back(BOUNDARYFACE);
+
+                ++ iComputationalFaceCount;
+                ++ iBoundaryFace;
+                return;
+            }
+        }
+        else
+        {
+            if (cellComputationalStatus[leftCell] == HIDDEN)
+            {
+                return;
+            }
+            else if (cellComputationalStatus[leftCell] == ON)
+            {
+                computationalToGlobalFaceIndex.push_back(iFace);
+                globalToComputationalFaceIndex[iFace] = iComputationalFaceCount;
+
+                faceTypeForComputation.push_back(PHSPACE::HANGINGFACE);
+                ++ iComputationalFaceCount;
+
+                return;
+            }
+        }
+    }
+    else
+    {
+        if ((cellComputationalStatus[leftCell]  == HIDDEN) &&
+            (cellComputationalStatus[rightCell] == ON))
+        {
+            int leftParent  = leftCellIndex[parentFace];
+            int rightParent = rightCellIndex[parentFace];
+
+            if (cellComputationalStatus[leftParent]  == HIDDEN &&
+                cellComputationalStatus[rightParent] == HIDDEN)
+            {
+                return;
+            }
+            else
+            {
+                computationalToGlobalFaceIndex.push_back(iFace);
+                globalToComputationalFaceIndex[iFace] = iComputationalFaceCount;
+
+                faceTypeForComputation.push_back(HANGINGFACE);
+
+                ++ iComputationalFaceCount;
+                return;
+            }
+        }
+        else if ((cellComputationalStatus[leftCell]  == ON) &&
+                 (cellComputationalStatus[rightCell] == HIDDEN))
+        {
+            int leftParent  = leftCellIndex[parentFace];
+            int rightParent = rightCellIndex[parentFace];
+            if (cellComputationalStatus[leftParent]  == HIDDEN &&
+                cellComputationalStatus[rightParent] == HIDDEN)
+            {
+                return;
+            }
+            else
+            {
+                computationalToGlobalFaceIndex.push_back(iFace);
+                globalToComputationalFaceIndex[iFace] = iComputationalFaceCount;
+
+                faceTypeForComputation.push_back(HANGINGFACE);
+
+                ++ iComputationalFaceCount;
+
+                return;
+            }
+        }
+        else if ((cellComputationalStatus[leftCell]  == HIDDEN) &&
+                 (cellComputationalStatus[rightCell] == HIDDEN))
+        {
+            return;
+        }
+        else if ((cellComputationalStatus[leftCell]  == ON) &&
+                 (cellComputationalStatus[rightCell] == ON))
+        {
+            computationalToGlobalFaceIndex.push_back(iFace);
+            globalToComputationalFaceIndex[iFace] = iComputationalFaceCount;
+
+            faceTypeForComputation.push_back(GENERALFACE);
+
+            ++ iComputationalFaceCount;
+
+            return;
+        }
+    }
+}
+
+void Mesh_RefineController::GenerateGlobalToComputationalCellFaceIndexNoParentCase(int iFace, int &iComputationalFaceCount, int &iBoundaryFace)
+{
+    PHVectorInt1D &cellComputationalStatus = cellTopo->GetCellComputationalStatus();
+                  
+    PHVectorInt1D &leftCellIndex  = faceTopo->GetLeftCellIndex();
+    PHVectorInt1D &rightCellIndex = faceTopo->GetRightCellIndex();
+
+    PHVectorInt1D      &faceTypeForComputation              = computationalFaceTopo->GetFaceType();
+    vector<SimpleBC *> &faceBoundaryCondition               = faceTopo->GetFaceBoundaryCondition();
+    vector<SimpleBC *> &faceBoundaryConditionForComputation = computationalFaceTopo->GetFaceBoundaryCondition();
+
+    PHVectorInt1D &computationalToGlobalFaceIndex = computationalFaceTopo->GetComputationalToGlobalFaceIndex();
+    PHVectorInt1D &globalToComputationalFaceIndex = faceTopo->GetGlobalToComputationalFaceIndex();
+
+    int leftCell  = leftCellIndex [iFace];
+    int rightCell = rightCellIndex[iFace];
+
+    bool isLeftCellNotExist = IsElementNotExist(leftCell);
+    if (isLeftCellNotExist)
+    {
+        TK_Exit::PrintDebugInfoExit("error\n");
+    }
+    else
+    {
+        bool isRightCellNotExist = IsElementNotExist(rightCell);
+        if (isRightCellNotExist)
+        {
+            if (cellComputationalStatus[leftCell] == HIDDEN)
+            {
+                return;
+            }
+            else
+            {
+                computationalToGlobalFaceIndex.push_back(iFace);
+                globalToComputationalFaceIndex[iFace] = iComputationalFaceCount;
+
+                faceBoundaryConditionForComputation.push_back(faceBoundaryCondition[iFace]);//*/
+                faceTypeForComputation.push_back(BOUNDARYFACE);
+
+                ++ iComputationalFaceCount;
+                ++ iBoundaryFace;
+
+                return;
+            }
+        }
+        else
+        {
+            if (cellComputationalStatus[leftCell]  == HIDDEN ||
+                cellComputationalStatus[rightCell] == HIDDEN)
+            {
+                return;
+            }
+            else
+            {
+                computationalToGlobalFaceIndex.push_back(iFace);
+                globalToComputationalFaceIndex[iFace] = iComputationalFaceCount;
+
+                faceTypeForComputation.push_back(GENERALFACE);
+                ++ iComputationalFaceCount;
+
+                return;
+            }
+        }
+    }
+}
+
+void Mesh_RefineController::SplitAllElements()
+{
+    int nTotalCell = cellTopo->GetNTotalCell();
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        SplitElement(iCell);
+    }
+}
+
+void Mesh_RefineController::SplitElement(int cellIndex)
+{
+    if (!cellTopo->ElementNeedSplit(cellIndex)) return;
+
+    int cellType = cellTopo->GetCellType(cellIndex);
+    if (!IsBasicVolumeElementType(cellType))
+    {
+        ReactivateChildElement(cellIndex);
+        return;
+    }
+
+    int refineType                = cellTopo->GetRefineType(cellIndex);
+    int typeOfCompositeCell       = GetRefineElemType(cellType, refineType);
+    int NodeNumberOfCell          = GetElementNodeNumbers(cellType);
+    int NodeNumberOfCompositeCell = GetElementNodeNumbers(typeOfCompositeCell);
+
+    cellTopo->SetCellType(cellIndex, typeOfCompositeCell);
+
+    PHVectorInt2D &cell2Node = cellTopo->GetCell2Node();
+    cell2Node[cellIndex].resize(NodeNumberOfCompositeCell);
+
+    for (int iNode = NodeNumberOfCell; iNode < NodeNumberOfCompositeCell; ++ iNode)
+    {
+        vector< int > &relatedPointListForMiddlePointComputation = GetRelatedPointListForMiddlePointComputation(typeOfCompositeCell, iNode);
+
+        Geo_PointFactory::point_type *centerPoint = nodeTopo->GetCenterPoint(cell2Node[cellIndex], relatedPointListForMiddlePointComputation);
+        bool isNodeExist;
+        int index = nodeTopo->AddPoint(centerPoint, isNodeExist);
+        cell2Node[cellIndex][iNode] = index;
+    }
+
+    AddChildElement(cellIndex);
+    SplitElementFace(cellIndex);
+}
+
+void Mesh_RefineController::ReactivateChildElement(int cellIndex)
+{
+    PHVectorInt1D &childrenCellIndexe = cellTopo->GetChildrenCellIndexe(cellIndex);
+    uint_t childrenNumber = childrenCellIndexe.size();
+    for (int iChildCell = 0; iChildCell < childrenNumber; ++ iChildCell)
+    {
+        int iChildCellIndex = childrenCellIndexe[iChildCell];
+
+        int childCellModifiedStatus = cellTopo->GetCellModifiedStatus(iChildCellIndex);
+        if (childCellModifiedStatus != NOCHANGE)
+        {
+            TK_Exit::PrintDebugInfoExit("ReactivateChildElement error\n");
+        }
+
+        cellTopo->SetComputationalStatusOfCell(iChildCellIndex, ON);
+    }
+}
+
+void Mesh_RefineController::AddChildElement(int parentElementIndex)
+{
+    int parentCellType  = cellTopo->GetCellType(parentElementIndex);
+    int parentCellLevel = cellTopo->GetCellLevel(parentElementIndex);
+
+    BasicElement *basicElement = GetBasicElement(parentCellType);
+
+    //! Judge the dividing method.
+    bool usingDividingCase2 = false;
+    if (parentCellType == TETRA_10)
+    {
+        PHVectorInt1D &parentCell2Node = cellTopo->GetCell2Node(parentElementIndex);
+
+        int node7 = parentCell2Node[7 - 1];
+        int node9 = parentCell2Node[9 - 1];
+        int node5 = parentCell2Node[5 - 1];
+        int node10 = parentCell2Node[10 - 1];
+
+        RDouble dx, dy, dz;
+        dx = nodeTopo->GetPoint(node7).X() - nodeTopo->GetPoint(node9).X();
+        dy = nodeTopo->GetPoint(node7).Y() - nodeTopo->GetPoint(node9).Y();
+        dz = nodeTopo->GetPoint(node7).Z() - nodeTopo->GetPoint(node9).Z();
+        RDouble dist1 = dx * dx + dy * dy + dz * dz;
+
+        dx = nodeTopo->GetPoint(node5).X() - nodeTopo->GetPoint(node10).X();
+        dy = nodeTopo->GetPoint(node5).Y() - nodeTopo->GetPoint(node10).Y();
+        dz = nodeTopo->GetPoint(node5).Z() - nodeTopo->GetPoint(node10).Z();
+        RDouble dist2 = dx * dx + dy * dy + dz * dz;
+
+        if (dist1 > dist2)
+        {
+            usingDividingCase2 = true;
+        }
+    }
+
+    uint_t numberOfChildCell = GetChildElementNumber(parentCellType);
+
+    PHVectorInt1D childCell2Node;
+    for (int iChildCell = 0; iChildCell < numberOfChildCell; ++ iChildCell)
+    {
+        int childCellType = basicElement->GetChildElementType(iChildCell);
+        PHVectorInt1D &parentCell2Node = cellTopo->GetCell2Node(parentElementIndex);
+
+        vector< int > childElementRelativeNodeIndex = basicElement->GetChildElementRelativeNodeIndex(iChildCell);
+        if (usingDividingCase2)
+        {
+            childElementRelativeNodeIndex = basicElement->GetChildElementRelativeNodeIndexCase2(iChildCell);
+        }
+
+        int nodeNumberOfChildCell = GetElementNodeNumbers(childCellType);
+        childCell2Node.resize(nodeNumberOfChildCell);
+        for (int iNode = 0; iNode < nodeNumberOfChildCell; ++ iNode)
+        {
+            childCell2Node[iNode] = parentCell2Node[childElementRelativeNodeIndex[iNode]];
+        }
+
+        cellTopo->AddCell(childCell2Node, childCellType, parentCellLevel + 1, parentElementIndex);
+    }
+}
+
+void Mesh_RefineController::SplitElementFace(int cellIndex)
+{
+    int cellType = cellTopo->GetCellType(cellIndex);
+
+    BasicElement *basicElement = GetBasicElement(cellType);
+
+    uint_t numberOfFaces = basicElement->GetElementPhysicsFaceNumber();
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        int iFaceType = basicElement->GetElementPhysicsFaceType(iFace);
+
+        vector< int > &relativeFace2Node = basicElement->GetElementPhysicsFace(iFace);
+        PHVectorInt1D &parentCell2Node = cellTopo->GetCell2Node(cellIndex);
+
+        PHVectorInt1D iFace2Node;
+        uint_t nodeNumber = relativeFace2Node.size();
+        iFace2Node.resize(nodeNumber);
+        for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+        {
+            iFace2Node[iNode] = parentCell2Node[relativeFace2Node[iNode]];
+        }
+
+        SplitFace(iFace2Node, iFaceType);
+    }
+}
+
+void Mesh_RefineController::SplitFace(PHVectorInt1D &iCompositeFace2Node, int iCompositeFaceTypeIn)
+{
+    BasicElement *basicElement = GetBasicElement(iCompositeFaceTypeIn);
+
+    uint_t numberOfChildFaces  = GetChildElementNumbers(iCompositeFaceTypeIn);
+    int chindrenFaceType       = GetSimpleElementType(iCompositeFaceTypeIn);
+    int chindrenFaceNodeNumber = GetElementNodeNumbers(chindrenFaceType);
+
+    PHVectorInt1D chindrenFace2Node;
+    chindrenFace2Node.resize(chindrenFaceNodeNumber);
+    for (int iNode = 0; iNode < chindrenFaceNodeNumber; ++ iNode)
+    {
+        chindrenFace2Node[iNode] = iCompositeFace2Node[iNode];
+    }
+
+    PHVectorInt2D &compositeFace2Node = faceTopo->GetCompositeFace2Node();
+
+    PHVectorInt1D sortedCompositeFace2Node = iCompositeFace2Node;
+    sort(sortedCompositeFace2Node.begin(), sortedCompositeFace2Node.end());
+
+    uint_t nodeNumberOfCompositeFace = iCompositeFace2Node.size();
+
+    int candidateCompositeFaceIndex = faceTopo->GetNTotalCompositeFaces();
+    MultiIndex compositeFaceOfMultiIndex(static_cast<int>(nodeNumberOfCompositeFace), candidateCompositeFaceIndex);
+    compositeFaceOfMultiIndex.SetData(&sortedCompositeFace2Node[0]);
+
+    PHVectorInt1D &compositeFaceType            = faceTopo->GetCompositeFaceType();
+    PHVectorInt1D &childrenToCompositeFaceIndex = faceTopo->GetChildrenToCompositeFaceIndex();
+    PHVectorInt1D &compositeToChildrenFaceIndex = faceTopo->GetCompositeToChildrenFaceIndex();
+
+    compositeToChildrenFaceIndex.resize(candidateCompositeFaceIndex);
+
+    int compositeFaceIndex = faceTopo->FindCompositeFace(compositeFaceOfMultiIndex);
+    int parentFaceIndex = faceTopo->FindFace(chindrenFace2Node);
+
+    if (compositeFaceIndex == INVALID_INDEX)
+    {
+        faceTopo->InsertCompositeFace(compositeFaceOfMultiIndex);
+        compositeFace2Node.push_back(iCompositeFace2Node);
+
+        compositeToChildrenFaceIndex.resize(candidateCompositeFaceIndex + 1);
+
+        int newSize = MAX(parentFaceIndex + 1, static_cast<int>(childrenToCompositeFaceIndex.size()));
+        childrenToCompositeFaceIndex.resize(newSize);
+
+        childrenToCompositeFaceIndex[parentFaceIndex] = candidateCompositeFaceIndex;
+        compositeToChildrenFaceIndex[candidateCompositeFaceIndex] = parentFaceIndex;
+
+        compositeFaceType.push_back(iCompositeFaceTypeIn);
+    }
+
+    for (int iChildFace = 0; iChildFace < numberOfChildFaces; ++ iChildFace)
+    {
+        int childFaceType = basicElement->GetChildElementType(iChildFace);
+        int childFaceNodeNumber = GetElementNodeNumbers(childFaceType);
+
+        vector< int > &childFaceElementRelativeNodeIndex = basicElement->GetChildElementRelativeNodeIndex(iChildFace);
+
+        PHVectorInt1D childFace2Node;
+        childFace2Node.resize(childFaceNodeNumber);
+        for (int iNode = 0; iNode < childFaceNodeNumber; ++ iNode)
+        {
+            childFace2Node[iNode] = iCompositeFace2Node[childFaceElementRelativeNodeIndex[iNode]];
+        }
+
+        faceTopo->AddFace(childFace2Node, childFaceType, parentFaceIndex);
+    }
+}
+
+void Mesh_RefineController::GenerateComputationalGrid(Grid *gridIn)
+{
+    UnstructGrid *grid = UnstructGridCast(gridIn);
+
+    int globalZoneIndex = PHMPI::GetLocalZoneIDToGlobalZoneID(this->zoneIndex);
+    grid->SetZoneID(globalZoneIndex);
+
+    PHVectorInt1D &computationalToGlobalCellIndex = cellTopo->GetComputationalToGlobalCellIndex();
+    int numberOfComputationalElements = static_cast<int>(computationalToGlobalCellIndex.size());
+    int numberOfNodes = static_cast<int>(nodeTopo->GetNumberOfComputationalNodes());
+
+    PrintToWindow("  nTCell of Computational: ", numberOfComputationalElements, "\n");
+    grid->SetNTotalCell(numberOfComputationalElements);
+    grid->SetNTotalNode(numberOfNodes);
+
+    RDouble *x = new RDouble[numberOfNodes];
+    RDouble *y = new RDouble[numberOfNodes];
+    RDouble *z = new RDouble[numberOfNodes];
+
+    grid->SetX(x);
+    grid->SetY(y);
+    grid->SetZ(z);
+
+    PHVectorInt1D &computationalToGlobalNodeIndexMapping = nodeTopo->GetComputationalToGlobalNodeIndexMapping();
+    uint_t numberOfNodesForComputation = computationalToGlobalNodeIndexMapping.size();
+    for (int iNode = 0; iNode < numberOfNodesForComputation; ++ iNode)
+    {
+        int nodeIndex = computationalToGlobalNodeIndexMapping[iNode];
+
+        x[iNode] = nodeTopo->GetPoint(nodeIndex).X();
+        y[iNode] = nodeTopo->GetPoint(nodeIndex).Y();
+        z[iNode] = nodeTopo->GetPoint(nodeIndex).Z();
+    }
+
+    this->GenerateComputationalUnstructuredGrid(grid);
+    this->GenerateCellToNode(grid);
+}
+
+void Mesh_RefineController::GenerateCellToNode(UnstructGrid *grid)
+{
+    PHVectorInt2D &cell2Node                      = cellTopo->GetCell2Node();
+    PHVectorInt1D &cellComputationalStatus        = cellTopo->GetCellComputationalStatus();
+    PHVectorInt1D &computationalToGlobalCellIndex = cellTopo->GetComputationalToGlobalCellIndex();
+
+    int nTotalCell = cellTopo->GetNTotalCell();
+    int numberOfComputationalCell = nTotalCell;
+    uint_t isComputationalCellExist = computationalToGlobalCellIndex.size();
+    if (isComputationalCellExist != 0)
+    {
+        numberOfComputationalCell = static_cast<int>(computationalToGlobalCellIndex.size());
+    }
+
+    vector< vector< int > > cellToNodeArray;
+    cellToNodeArray.resize(numberOfComputationalCell);
+
+    int countCell = 0;
+    int countNode = 0;
+    for (int elementIndex = 0; elementIndex < nTotalCell; ++ elementIndex)
+    {
+        if (isComputationalCellExist != 0)
+        {
+            if (cellComputationalStatus[elementIndex] == HIDDEN)
+            {
+                continue;
+            }
+        }
+
+        PHVectorInt1D &elementNodeIndexes = cell2Node[elementIndex];
+        int numberOfNodes = static_cast <int> (elementNodeIndexes.size());
+
+        ASSERT(countCell < numberOfComputationalCell);
+
+        cellToNodeArray[countCell].resize(numberOfNodes);
+        for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+        {
+            cellToNodeArray[countCell][iNode] = elementNodeIndexes[iNode];
+        }
+
+        countNode += numberOfNodes;
+        ++ countCell;
+    }
+
+    int *cellNodeNumberContainer = new int[numberOfComputationalCell];
+    int *cellNodeIndexContainer  = new int[countNode];
+
+    countNode = 0;
+    for (int iCell = 0; iCell < numberOfComputationalCell; ++ iCell)
+    {
+        int nodeNumber = static_cast<int>(cellToNodeArray[iCell].size());
+        cellNodeNumberContainer[iCell] = nodeNumber;
+
+        for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+        {
+            cellNodeIndexContainer[countNode ++] = cellToNodeArray[iCell][iNode];
+        }
+    }
+
+    grid->SetNodeNumberOfEachCell(cellNodeNumberContainer);
+    grid->SetCell2Node(cellNodeIndexContainer);
+}
+
+void Mesh_RefineController::GenerateComputationalUnstructuredGrid(UnstructGrid *grid)
+{
+    vector<SimpleBC *> &faceBoundaryCondition = computationalFaceTopo->GetFaceBoundaryCondition();
+
+    int numberOfFaces = computationalFaceTopo->GetNTotalFaces();
+    int numberOfBoundaryFaces = static_cast<int>(faceBoundaryCondition.size());
+    grid->SetNBoundFace(numberOfBoundaryFaces);
+    grid->SetNTotalFace(numberOfFaces);
+
+    UnstructBCSet **bcr = new UnstructBCSet *[numberOfBoundaryFaces];
+    grid->SetBCRecord(bcr);
+
+    set<string> bcNameSet;
+    uint_long iCount = 0;
+
+    for (int iFace = 0; iFace < numberOfBoundaryFaces; iFace++)
+    {  
+        SimpleBC *bc = faceBoundaryCondition[iFace];
+        if (bc == 0)
+        {
+            TK_Exit::ExceptionExit("boundary Condition == 0 in generate unstruct grid!");
+        }
+        if (bc->GetBCName() == "")
+        {
+            TK_Exit::ExceptionExit("bcName = null in generate unstruct grid!");
+        }
+
+        bcr[iCount] = new UnstructBCSet();
+        bcr[iCount]->SetKey(bc->GetBCType());
+        bcr[iCount]->SetBCName(bc->GetBCName());
+        bcr[iCount]->SetBoundaryCondition(bc);
+
+        bcNameSet.insert(bc->GetBCName());
+
+        ++ iCount;
+    }
+    int nBCRegionUnstruct = static_cast<int>(bcNameSet.size());
+
+    grid->CreateUnstructBCSet(nBCRegionUnstruct);
+
+    UnstructBCSet *unstructBCSet = grid->GetUnstructBCSet();
+    int* bcRegionIDofBCFace = new int[numberOfBoundaryFaces];
+    set<string>::iterator iter;
+    int count = 0;
+
+    for (iter = bcNameSet.begin(); iter != bcNameSet.end(); iter++)
+    {
+        UnstructBC *unstructBC = new UnstructBC(count);
+        unstructBCSet->SetBCRegion(count, unstructBC);
+        unstructBC->SetBCName(*iter);
+
+        for (int iFace = 0; iFace < numberOfBoundaryFaces; iFace++)
+        {
+            SimpleBC *bc = faceBoundaryCondition[iFace];
+            if (bc->GetBCName() == unstructBC->GetBCName())
+            {
+                unstructBC->SetBCType(bc->GetBCType());
+                bcRegionIDofBCFace[iFace] = count;
+                vector<int> *faceIndex = unstructBC->GetFaceIndex();
+                faceIndex->push_back(iFace);
+            }
+
+        }
+        count++;
+    }
+    unstructBCSet->SetBCFaceInfo(bcRegionIDofBCFace);
+
+    ReorderFaceToNodeIndexes(grid);
+    ReorderFaceToCellIndexes(grid);
+}
+
+void Mesh_RefineController::ReorderFaceToNodeIndexes(UnstructGrid *grid)
+{
+    int numberOfFaces = grid->GetNTotalFace();
+
+    PHVectorInt1D &rightCellIndex = computationalFaceTopo->GetRightCellIndex();
+    PHVectorInt2D &face2Node      = computationalFaceTopo->GetFace2Node();
+
+    int *nodeNumberOfEachFace = new int[numberOfFaces];
+
+    int iCount = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        int rightCell = rightCellIndex[iFace];
+        if (rightCell == INVALID_INDEX)
+        {
+            nodeNumberOfEachFace[iCount] = static_cast<int>(face2Node[iFace].size());
+            ++ iCount;
+        }
+    }
+
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        int rightCell = rightCellIndex[iFace];
+        if (rightCell != INVALID_INDEX)
+        {
+            nodeNumberOfEachFace[iCount] = static_cast<int>(face2Node[iFace].size());
+            ++ iCount;
+        }
+    }
+    grid->SetNodeNumberOfEachFace(nodeNumberOfEachFace);
+
+    int face2NodeSize = 0;
+    iCount = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        face2NodeSize += nodeNumberOfEachFace[iCount];
+        ++ iCount;
+    }
+
+    int *face2NodeArray = new int[face2NodeSize];
+    grid->SetFace2Node(face2NodeArray);
+
+    int iFace2NodeCount = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        int rightCell = rightCellIndex[iFace];
+        if (rightCell == INVALID_INDEX)
+        {
+            PHVectorInt1D &faceNodeIndexes = face2Node[iFace];
+            uint_t nodeNumber = faceNodeIndexes.size();
+            for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+            {
+                face2NodeArray[iFace2NodeCount] = faceNodeIndexes[iNode];
+                ++ iFace2NodeCount;
+            }
+        }
+    }
+
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        int rightCell = rightCellIndex[iFace];
+        if (rightCell != INVALID_INDEX)
+        {
+            PHVectorInt1D &faceNodeIndexes = face2Node[iFace];
+            uint_t nodeNumber = faceNodeIndexes.size();
+            for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+            {
+                face2NodeArray[iFace2NodeCount] = faceNodeIndexes[iNode];
+                ++ iFace2NodeCount;
+            }
+        }
+    }
+}
+
+void Mesh_RefineController::ReorderFaceToCellIndexes(UnstructGrid *grid)
+{
+    PHVectorInt1D &leftCellIndex  = computationalFaceTopo->GetLeftCellIndex();
+    PHVectorInt1D &rightCellIndex = computationalFaceTopo->GetRightCellIndex();
+
+    int numberOfFaces = grid->GetNTotalFace();
+    int numberOfBoundaryFaces = grid->GetNBoundFace();
+
+    int *leftCellOfFace  = new int[numberOfFaces];
+    int *rightCellOfFace = new int[numberOfFaces];
+
+    grid->SetLeftCellOfFace(leftCellOfFace);
+    grid->SetRightCellOfFace(rightCellOfFace);
+
+    int iFaceCount = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        int rightCell = rightCellIndex[iFace];
+        if (rightCell == INVALID_INDEX)
+        {
+            leftCellOfFace [iFaceCount] = leftCellIndex [iFace];
+            rightCellOfFace[iFaceCount] = rightCellIndex[iFace];
+            ++ iFaceCount;
+        }
+    }
+
+    if (iFaceCount != numberOfBoundaryFaces)
+    {
+        TK_Exit::PrintDebugInfoExit(" FATAL ERROR : iFaceCount != numberOfBoundaryFaces \n");
+    }
+
+    for (int iFace = 0; iFace < numberOfFaces; ++ iFace)
+    {
+        int rightCell = rightCellIndex[iFace];
+        if (rightCell != INVALID_INDEX)
+        {
+            leftCellOfFace [iFaceCount] = leftCellIndex [iFace];
+            rightCellOfFace[iFaceCount] = rightCellIndex[iFace];
+            ++ iFaceCount;
+        }
+    }
+}
+
+void Mesh_RefineController::CompressRefineType(DataContainer *dataContainer, int neighborZoneIndex)
+{
+    if (!interfaceInformation) return;
+
+    PHVectorInt1D &refineType = cellTopo->GetRefineType();
+
+    int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForSend          = interfaceInformation->GetFaceIndexForSend(iNeighborZone);
+    dataContainer->moveto_begin();
+
+    int *dataTemp = new int[interfaceNumberBetweenTwoNeighboringZone];
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int sourceCell;
+        int iFace = interfaceIndexContainerForSend[iLocalFace];
+        this->GetSourceCellIndex(iFace, sourceCell);
+
+        dataTemp[iLocalFace] = refineType[sourceCell];
+    }
+    PHWrite(dataContainer, dataTemp, interfaceNumberBetweenTwoNeighboringZone);
+    delete [] dataTemp;
+}
+
+void Mesh_RefineController::DecompressRefineType(DataContainer *dataContainer, int neighborZoneIndex)
+{
+    if (!interfaceInformation) return;
+
+    PHVectorInt1D &refineType = cellTopo->GetRefineType();
+
+    int iNeighborZone                            = interfaceInformation->FindIthNeighbor(neighborZoneIndex);
+    int interfaceNumberBetweenTwoNeighboringZone = interfaceInformation->GetNIFaceOfNeighbor(iNeighborZone);
+    int *interfaceIndexContainerForReceive       = interfaceInformation->GetFaceIndexForRecv(iNeighborZone);
+    dataContainer->moveto_begin();
+
+    int *dataTemp = new int[interfaceNumberBetweenTwoNeighboringZone];
+    PHRead(dataContainer, dataTemp, interfaceNumberBetweenTwoNeighboringZone);
+
+    for (int iLocalFace = 0; iLocalFace < interfaceNumberBetweenTwoNeighboringZone; ++ iLocalFace)
+    {
+        int iFace = interfaceIndexContainerForReceive[iLocalFace];
+        int targetCell;
+        this->GetTargetIndex(iFace, targetCell);
+
+        refineType[targetCell] = dataTemp[iLocalFace];
+    }
+
+    delete [] dataTemp;
+}
+
+bool Mesh_RefineController::IsNeedInfectInterfaceIsotropicRefineType()
+{
+    int nTotalCell            = cellTopo->GetNTotalCell();
+    PHVectorInt1D &refineType = cellTopo->GetRefineType();
+
+    int nBoundFace                            = faceTopo->GetNBoundaryFaces();
+    PHVectorInt1D &faceType                   = faceTopo->GetFaceType();
+    PHVectorInt1D &leftCellIndex              = faceTopo->GetLeftCellIndex();
+    PHVectorInt1D &rightCellIndex             = faceTopo->GetRightCellIndex();
+    vector<SimpleBC *> &faceBoundaryCondition = faceTopo->GetFaceBoundaryCondition();
+
+    bool doseInterfaceIsotropicRefineTypeExist = false;
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        if (faceBoundaryCondition[iFace]->GetBCType() != PHENGLEI::INTERFACE) continue;
+        if (faceType[iFace] != QUAD_4) continue;
+
+        int leftCell  = leftCellIndex[iFace];
+        int rightCell = rightCellIndex[iFace];
+
+        if (leftCell >= nTotalCell)
+        {
+            SWAP(leftCell, rightCell);
+        }
+        if (rightCell < 0)
+        {
+            rightCell = -rightCell;
+        }
+
+        if (refineType[leftCell] != ISOTROPICREFINE && refineType[rightCell] == ISOTROPICREFINE)
+        {
+            doseInterfaceIsotropicRefineTypeExist = true;
+            break;
+        }
+    }
+
+    return doseInterfaceIsotropicRefineTypeExist;
+}
+
+void Mesh_RefineController::GetSourceCellIndex(int iFace, int &sourceIndex)
+{
+    int *localInterfaceToBoundaryFaceIndexesMapping = this->interfaceInformation->GetInterFace2BoundaryFace();
+
+    PHVectorInt1D &leftCellIndex = faceTopo->GetLeftCellIndex();
+    int boundaryFaceIndex = localInterfaceToBoundaryFaceIndexesMapping[iFace];
+    sourceIndex = leftCellIndex[boundaryFaceIndex];
+}
+
+void Mesh_RefineController::GetTargetIndex(int iFace, int &targetIndex)
+{
+    int *localInterfaceToBoundaryFaceIndexesMapping = interfaceInformation->GetInterFace2BoundaryFace();
+
+    PHVectorInt1D &rightCellIndex = faceTopo->GetRightCellIndex();
+    int boundaryFaceIndex = localInterfaceToBoundaryFaceIndexesMapping[iFace];
+    targetIndex = rightCellIndex[boundaryFaceIndex];
+    targetIndex = -targetIndex;
+}
+
+}
\ No newline at end of file
diff --git a/Mesh/src/Mesh_Refine_Struct.cpp b/Mesh/src/Mesh_Refine_Struct.cpp
new file mode 100644
index 0000000..5ce7467
--- /dev/null
+++ b/Mesh/src/Mesh_Refine_Struct.cpp
@@ -0,0 +1,302 @@
+#include "Mesh_Refine_Struct.h"
+#include "Glb_Dimension.h"
+#include "Pre_GridConversion.h"
+#include "Zone.h"
+
+using namespace std;
+
+namespace PHSPACE
+{
+LIB_EXPORT Mesh_Refine_Struct::Mesh_Refine_Struct(const string &gridFileNameIn) :
+    Mesh_Refine(gridFileNameIn)
+{
+    OrdinaryGrid.resize(0);
+}
+
+LIB_EXPORT Mesh_Refine_Struct::~Mesh_Refine_Struct()
+{
+
+}
+
+void Mesh_Refine_Struct::AllocateMemory()
+{
+    numberOfZones = PHMPI::GetNumberofLocalZones();
+    refinedGrids = new Grid * [numberOfZones];
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        Zone *zone = region->GetZone(iZone);
+        if (!zone) continue;
+
+        Grid *grid = zone->GetGeometry()->GetGrid();
+        OrdinaryGrid.push_back(grid);
+    }
+}
+
+void Mesh_Refine_Struct::RefineGrid()
+{
+    for (int iZone = 0; iZone < numberOfZones; iZone ++)
+    {
+        StructGrid *grid = StructGridCast(OrdinaryGrid[iZone]);
+        RefineGrid(iZone, grid);
+    }
+}
+
+void Mesh_Refine_Struct::RefineGrid(int iZone, StructGrid *gridIn)
+{
+    int newNodeI, newNodeJ, newNodeK;
+
+    GridID *indexNew = new GridID(iZone);
+    Grid *gridNew = CreateGridGeneral(STRUCTGRID, indexNew, 0, GetDim());
+    refinedGrids[iZone] = gridNew;
+    StructGrid *strGridNew = StructGridCast(gridNew);
+
+    int ni = gridIn->GetNI();
+    int nj = gridIn->GetNJ();
+    int nk = gridIn->GetNK();
+
+    strGridNew->SetNI((ni-1)*2+1);
+    strGridNew->SetNJ((nj-1)*2+1);
+    strGridNew->SetNK((nk-1)*2+1);
+    strGridNew->SetBasicDimension();
+
+    int nTotalNode = strGridNew->GetNTotalNode();
+    RDouble *nx = new RDouble [nTotalNode];
+    RDouble *ny = new RDouble [nTotalNode];
+    RDouble *nz = new RDouble [nTotalNode];
+    strGridNew->SetX(nx);
+    strGridNew->SetY(ny);
+    strGridNew->SetZ(nz);
+    strGridNew->SetArrayLayout();
+
+    int ist, ied, jst, jed, kst, ked;
+    gridIn->GetNodeIterationIndex(ist, ied, jst, jed, kst, ked);
+
+    RDouble3D &xx = *gridIn->GetStructX();
+    RDouble3D &yy = *gridIn->GetStructY();
+    RDouble3D &zz = *gridIn->GetStructZ();
+
+    RDouble3D &nxx = *strGridNew->GetStructX();
+    RDouble3D &nyy = *strGridNew->GetStructY();
+    RDouble3D &nzz = *strGridNew->GetStructZ();
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                newNodeI = (i-1) * 2 + 1;
+                newNodeJ = (j-1) * 2 + 1;
+                newNodeK = (k-1) * 2 + 1;
+                nxx(newNodeI, newNodeJ, newNodeK) = xx(i, j, k);
+                nyy(newNodeI, newNodeJ, newNodeK) = yy(i, j, k);
+                nzz(newNodeI, newNodeJ, newNodeK) = zz(i, j, k);
+            }
+        }
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied-1; ++ i)
+            {
+                newNodeI = (i-1) * 2 + 2;
+                newNodeJ = (j-1) * 2 + 1;
+                newNodeK = (k-1) * 2 + 1;
+                nxx(newNodeI, newNodeJ, newNodeK) = 0.5 * (nxx(newNodeI-1, newNodeJ, newNodeK) + nxx(newNodeI+1, newNodeJ, newNodeK));
+                nyy(newNodeI, newNodeJ, newNodeK) = 0.5 * (nyy(newNodeI-1, newNodeJ, newNodeK) + nyy(newNodeI+1, newNodeJ, newNodeK));
+                nzz(newNodeI, newNodeJ, newNodeK) = 0.5 * (nzz(newNodeI-1, newNodeJ, newNodeK) + nzz(newNodeI+1, newNodeJ, newNodeK));
+            }
+        }
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed-1; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                newNodeI = (i-1) * 2 + 1;
+                newNodeJ = (j-1) * 2 + 2;
+                newNodeK = (k-1) * 2 + 1;
+                nxx(newNodeI, newNodeJ, newNodeK) = 0.5 * (nxx(newNodeI, newNodeJ-1, newNodeK) + nxx(newNodeI, newNodeJ+1, newNodeK));
+                nyy(newNodeI, newNodeJ, newNodeK) = 0.5 * (nyy(newNodeI, newNodeJ-1, newNodeK) + nyy(newNodeI, newNodeJ+1, newNodeK));
+                nzz(newNodeI, newNodeJ, newNodeK) = 0.5 * (nzz(newNodeI, newNodeJ-1, newNodeK) + nzz(newNodeI, newNodeJ+1, newNodeK));
+            }
+        }
+    }
+
+    for (int k = kst; k <= ked-1; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                newNodeI = (i-1) * 2 + 1;
+                newNodeJ = (j-1) * 2 + 1;
+                newNodeK = (k-1) * 2 + 2;
+                nxx(newNodeI, newNodeJ, newNodeK) = 0.5 * (nxx(newNodeI, newNodeJ, newNodeK-1) + nxx(newNodeI, newNodeJ, newNodeK+1));
+                nyy(newNodeI, newNodeJ, newNodeK) = 0.5 * (nyy(newNodeI, newNodeJ, newNodeK-1) + nyy(newNodeI, newNodeJ, newNodeK+1));
+                nzz(newNodeI, newNodeJ, newNodeK) = 0.5 * (nzz(newNodeI, newNodeJ, newNodeK-1) + nzz(newNodeI, newNodeJ, newNodeK+1));
+            }
+        }
+    }
+
+    for (int k = kst; k <= ked; ++ k)
+    {
+        for (int j = jst; j <= jed-1; ++ j)
+        {
+            for (int i = ist; i <= ied-1; ++ i)
+            {
+                newNodeI = (i-1) * 2 + 2;
+                newNodeJ = (j-1) * 2 + 2;
+                newNodeK = (k-1) * 2 + 1;
+                nxx(newNodeI, newNodeJ, newNodeK) = 0.25 * (nxx(newNodeI-1, newNodeJ, newNodeK) + nxx(newNodeI+1, newNodeJ, newNodeK) + nxx(newNodeI, newNodeJ-1, newNodeK) + nxx(newNodeI, newNodeJ+1, newNodeK));
+                nyy(newNodeI, newNodeJ, newNodeK) = 0.25 * (nyy(newNodeI-1, newNodeJ, newNodeK) + nyy(newNodeI+1, newNodeJ, newNodeK) + nyy(newNodeI, newNodeJ-1, newNodeK) + nyy(newNodeI, newNodeJ+1, newNodeK));
+                nzz(newNodeI, newNodeJ, newNodeK) = 0.25 * (nzz(newNodeI-1, newNodeJ, newNodeK) + nzz(newNodeI+1, newNodeJ, newNodeK) + nzz(newNodeI, newNodeJ-1, newNodeK) + nzz(newNodeI, newNodeJ+1, newNodeK));
+            }
+        }
+    }
+
+    for (int k = kst; k <= ked-1; ++ k)
+    {
+        for (int j = jst; j <= jed; ++ j)
+        {
+            for (int i = ist; i <= ied-1; ++ i)
+            {
+                newNodeI = (i-1) * 2 + 2;
+                newNodeJ = (j-1) * 2 + 1;
+                newNodeK = (k-1) * 2 + 2;
+                nxx(newNodeI, newNodeJ, newNodeK) = 0.25 * (nxx(newNodeI-1, newNodeJ, newNodeK) + nxx(newNodeI+1, newNodeJ, newNodeK) + nxx(newNodeI, newNodeJ, newNodeK-1) + nxx(newNodeI, newNodeJ, newNodeK+1));
+                nyy(newNodeI, newNodeJ, newNodeK) = 0.25 * (nyy(newNodeI-1, newNodeJ, newNodeK) + nyy(newNodeI+1, newNodeJ, newNodeK) + nyy(newNodeI, newNodeJ, newNodeK-1) + nyy(newNodeI, newNodeJ, newNodeK+1));
+                nzz(newNodeI, newNodeJ, newNodeK) = 0.25 * (nzz(newNodeI-1, newNodeJ, newNodeK) + nzz(newNodeI+1, newNodeJ, newNodeK) + nzz(newNodeI, newNodeJ, newNodeK-1) + nzz(newNodeI, newNodeJ, newNodeK+1));
+            }
+        }
+    }
+
+    for (int k = kst; k <= ked-1; ++ k)
+    {
+        for (int j = jst; j <= jed-1; ++ j)
+        {
+            for (int i = ist; i <= ied; ++ i)
+            {
+                newNodeI = (i-1) * 2 + 1;
+                newNodeJ = (j-1) * 2 + 2;
+                newNodeK = (k-1) * 2 + 2;
+                nxx(newNodeI, newNodeJ, newNodeK) = 0.25 * (nxx(newNodeI, newNodeJ-1, newNodeK) + nxx(newNodeI, newNodeJ+1, newNodeK) + nxx(newNodeI, newNodeJ, newNodeK-1) + nxx(newNodeI, newNodeJ, newNodeK+1));
+                nyy(newNodeI, newNodeJ, newNodeK) = 0.25 * (nyy(newNodeI, newNodeJ-1, newNodeK) + nyy(newNodeI, newNodeJ+1, newNodeK) + nyy(newNodeI, newNodeJ, newNodeK-1) + nyy(newNodeI, newNodeJ, newNodeK+1));
+                nzz(newNodeI, newNodeJ, newNodeK) = 0.25 * (nzz(newNodeI, newNodeJ-1, newNodeK) + nzz(newNodeI, newNodeJ+1, newNodeK) + nzz(newNodeI, newNodeJ, newNodeK-1) + nzz(newNodeI, newNodeJ, newNodeK+1));
+            }
+        }
+    }
+
+    for (int k = kst; k <= ked-1; ++ k)
+    {
+        for (int j = jst; j <= jed-1; ++ j)
+        {
+            for (int i = ist; i <= ied-1; ++ i)
+            {
+                newNodeI = (i-1) * 2 + 2;
+                newNodeJ = (j-1) * 2 + 2;
+                newNodeK = (k-1) * 2 + 2;
+                nxx(newNodeI, newNodeJ, newNodeK) = 0.125 * (nxx(newNodeI-1, newNodeJ-1, newNodeK-1) + nxx(newNodeI+1, newNodeJ-1, newNodeK-1) + nxx(newNodeI-1, newNodeJ+1, newNodeK-1) + nxx(newNodeI+1, newNodeJ+1, newNodeK-1)
+                                                  + nxx(newNodeI-1, newNodeJ-1, newNodeK+1) + nxx(newNodeI+1, newNodeJ-1, newNodeK+1) + nxx(newNodeI-1, newNodeJ+1, newNodeK+1) + nxx(newNodeI+1, newNodeJ+1, newNodeK+1));
+                nyy(newNodeI, newNodeJ, newNodeK) = 0.125 * (nyy(newNodeI-1, newNodeJ-1, newNodeK-1) + nyy(newNodeI+1, newNodeJ-1, newNodeK-1) + nyy(newNodeI-1, newNodeJ+1, newNodeK-1) + nyy(newNodeI+1, newNodeJ+1, newNodeK-1)
+                                                  + nyy(newNodeI-1, newNodeJ-1, newNodeK+1) + nyy(newNodeI+1, newNodeJ-1, newNodeK+1) + nyy(newNodeI-1, newNodeJ+1, newNodeK+1) + nyy(newNodeI+1, newNodeJ+1, newNodeK+1));
+                nzz(newNodeI, newNodeJ, newNodeK) = 0.125 * (nzz(newNodeI-1, newNodeJ-1, newNodeK-1) + nzz(newNodeI+1, newNodeJ-1, newNodeK-1) + nzz(newNodeI-1, newNodeJ+1, newNodeK-1) + nzz(newNodeI+1, newNodeJ+1, newNodeK-1)
+                                                  + nzz(newNodeI-1, newNodeJ-1, newNodeK+1) + nzz(newNodeI+1, newNodeJ-1, newNodeK+1) + nzz(newNodeI-1, newNodeJ+1, newNodeK+1) + nzz(newNodeI+1, newNodeJ+1, newNodeK+1));
+            }
+        }
+    }
+
+    strGridNew->ComputeMinMaxBox();
+}
+
+void Mesh_Refine_Struct::GenerateAndDumpComputationalGrid()
+{
+    GenerateBCRegion();
+
+    ConstructGlobalInterfaceLink(refinedGrids, numberOfZones);
+
+    DumpComputationalGrid();
+}
+
+void Mesh_Refine_Struct::GenerateBCRegion()
+{
+    for (int iZone = 0; iZone < numberOfZones; iZone ++)
+    {
+        StructGrid *grid       = StructGridCast(OrdinaryGrid[iZone]);
+        StructGrid *strGridNew = StructGridCast(refinedGrids[iZone]);
+
+        strGridNew->CopyStructBCSet(grid->GetStructBCSet());
+        StructBCSet *rhs = strGridNew->GetStructBCSet();
+
+        int numberOfBoundaryFaces = rhs->GetnBCRegion();
+        for (int iBCRegion = 0; iBCRegion < numberOfBoundaryFaces; iBCRegion ++)
+        {
+            StructBC *bcregion = rhs->GetBCRegion(iBCRegion);
+
+            int bctype = bcregion->GetBCType();
+
+            int *s_st   = bcregion->GetStartPoint();
+            int *s_ed   = bcregion->GetEndPoint();
+            int *t_st   = bcregion->GetTargetStart();
+            int *t_ed   = bcregion->GetTargetEnd();
+            int *s_lr3d = bcregion->GetFaceDirectionIndex();
+            int *t_lr3d = bcregion->GetFaceDirectionIndexOfTargetBlock();
+
+            for (int m = 0; m < GetDim(); ++ m)
+            {
+                if (s_st[m] == s_ed[m])
+                {
+                    if (s_st[m] > 1 || s_lr3d[m] == 1)
+                    {
+                        s_st[m] += 1;
+                        s_ed[m] += 1;
+                    }
+                }
+                else
+                {
+                    s_ed[m] += 1;
+                }
+            }
+
+            for (int m = 0; m < GetDim(); ++ m)
+            {
+                s_st[m] = (s_st[m]-1) * 2 + 1;
+                s_ed[m] = (s_ed[m]-1) * 2 + 1;
+            }
+
+            if (bctype == PHENGLEI::INTERFACE)
+            {
+                for (int m = 0; m < GetDim(); ++ m)
+                {
+                    if (t_st[m] == t_ed[m])
+                    {
+                        if (t_st[m] > 1 || t_lr3d[m] == 1)
+                        {
+                            t_st[m] += 1;
+                            t_ed[m] += 1;
+                        }
+                    }
+                    else
+                    {
+                        t_ed[m] += 1;
+                    }
+                }
+
+                for (int m = 0; m < GetDim(); ++ m)
+                {
+                    t_st[m] = (t_st[m]-1) * 2 + 1;
+                    t_ed[m] = (t_ed[m]-1) * 2 + 1;
+                }
+            }
+        }
+
+        strGridNew->ProcessBCInfo();
+    }
+}
+
+}
diff --git a/Mesh/src/Mesh_Refine_Unstruct.cpp b/Mesh/src/Mesh_Refine_Unstruct.cpp
new file mode 100644
index 0000000..8f8acef
--- /dev/null
+++ b/Mesh/src/Mesh_Refine_Unstruct.cpp
@@ -0,0 +1,781 @@
+#include "Mesh_Refine_Unstruct.h"
+#include "GlobalDataBase.h"
+#include "TK_Log.h"
+#include "TK_Time.h"
+#include "Glb_Dimension.h"
+#include "Geo_Element.h"
+#include "GridType.h"
+#include "PHHeader.h"
+#include "ComputationalGrid.h"
+
+using namespace std;
+namespace PHSPACE
+{
+Mesh_Refine_Unstruct::Mesh_Refine_Unstruct(const string &gridFileNameIn) :
+    Mesh_Refine(gridFileNameIn)
+{
+    gridRefineControllers = 0;
+}
+
+Mesh_Refine_Unstruct::~Mesh_Refine_Unstruct()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        delete gridRefineControllers[iZone];
+    }
+    delete [] gridRefineControllers;
+
+}
+
+void Mesh_Refine_Unstruct::GenerateAndDumpComputationalGrid()
+{
+    WriteLogFile("Start Generating Grid!");
+
+    AllocateComputationalGrid();
+
+    GenerateComputationalGrid();
+
+    GenerateGlobalInterfaceLink();
+
+    DumpComputationalGrid();
+}
+
+void Mesh_Refine_Unstruct::GenerateGlobalInterfaceLink()
+{
+    ComputationalGridProcess *computationalGridProcess = new ComputationalGridProcess(region);
+    computationalGridProcess->Initialize(refinedGrids, numberOfZones);
+    computationalGridProcess->PostProcessMultiZoneComputationalGrids();
+
+    delete computationalGridProcess;
+}
+
+void Mesh_Refine_Unstruct::GenerateComputationalGrid()
+{
+    int nTCellLocal = 0;
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        gridRefineControllers[iZone]->GenerateComputationalGrid(refinedGrids[iZone]);
+
+        nTCellLocal += refinedGrids[iZone]->GetNTotalCell();
+    }
+
+    RDouble nTCellGlobal = nTCellLocal * 1.0;
+    RDouble ntCellLocalTemp = nTCellLocal * 1.0;
+    PH_Reduce(&ntCellLocalTemp, &nTCellGlobal, 1, PH_SUM);
+
+    int maxNTCellLocal, minNTCellLocal;
+    PH_Reduce(&nTCellLocal, &maxNTCellLocal, 1, PH_MAX);
+    PH_Reduce(&nTCellLocal, &minNTCellLocal, 1, PH_MIN);
+    PrintToWindow("  Number of Global cell: ", nTCellGlobal, "\n");
+    PrintToWindow("  Min & Max number of cell after adapt: ", minNTCellLocal, maxNTCellLocal, "\n");
+}
+
+void Mesh_Refine_Unstruct::AllocateComputationalGrid()
+{
+    refinedGrids = new Grid *[numberOfZones];
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        Grid *grid = CreateGridGeneral(UNSTRUCTGRID, new GridID(iZone), 0, GetDim());
+        refinedGrids[iZone] = grid;
+    }
+}
+
+void Mesh_Refine_Unstruct::AllocateMemory()
+{
+    numberOfZones = PHMPI::GetNumberofLocalZones();
+    gridRefineControllers = new Mesh_RefineController * [numberOfZones];
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        Mesh_RefineController *gridRefineController = new Mesh_RefineController();
+        gridRefineController->SetZoneIndex(iZone);
+        gridRefineControllers[iZone] = gridRefineController;
+    }
+}
+
+void Mesh_Refine_Unstruct::ConstructGridTopo()
+{
+    WriteLogFile("Start Constructing Grid Info!");
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int globalZoneIndex = PHMPI::GetLocalZoneIDToGlobalZoneID(iZone);
+
+        Grid *grid = GetGrid(globalZoneIndex, 0);
+        grid->ComputeMetrics();
+        grid->SkewnessSummary();
+
+        ConstructGridTopo(grid);
+    }
+
+    WriteLogFile("End Constructing Grid Info!");
+}
+
+void Mesh_Refine_Unstruct::ConstructGridTopo(Grid *grid)
+{
+    ConstructCellTopo(grid);
+
+    ConstructNodeTopo(grid);
+
+    ConstructFaceTopo(grid);
+
+    ConstructMetrics(grid);
+
+    ConstructInterFaceTopo(grid);
+}
+
+void Mesh_Refine_Unstruct::ConstructMetrics(Grid *grid)
+{
+    UnstructGrid *unstructuredGrid = UnstructGridCast(grid);
+
+    RDouble *faceAreaContainer    = unstructuredGrid->GetFaceArea();
+    RDouble *faceNormalXContainer = unstructuredGrid->GetFaceNormalX();
+    RDouble *faceNormalYContainer = unstructuredGrid->GetFaceNormalY();
+    RDouble *faceNormalZContainer = unstructuredGrid->GetFaceNormalZ();
+
+    int localIndex = grid->GetZoneLocalID();
+    Mesh_RefineController *currentController = gridRefineControllers[localIndex];
+    Mesh_FaceTopo *faceTopo = currentController->GetFaceFactory();
+
+    PHVectorRDouble1D &faceArea    = faceTopo->GetFaceArea();
+    PHVectorRDouble1D &faceNormalX = faceTopo->GetFaceNormalX();
+    PHVectorRDouble1D &faceNormalY = faceTopo->GetFaceNormalY();
+    PHVectorRDouble1D &faceNormalZ = faceTopo->GetFaceNormalZ();
+
+    int nTotalFace = unstructuredGrid->GetNTotalFace();
+    faceArea.resize(nTotalFace);
+    faceNormalX.resize(nTotalFace);
+    faceNormalY.resize(nTotalFace);
+    faceNormalZ.resize(nTotalFace);
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        faceArea   [iFace] = faceAreaContainer   [iFace];
+        faceNormalX[iFace] = faceNormalXContainer[iFace];
+        faceNormalY[iFace] = faceNormalYContainer[iFace];
+        faceNormalZ[iFace] = faceNormalZContainer[iFace];
+    }
+}
+
+void Mesh_Refine_Unstruct::ConstructCellTopo(Grid *grid)
+{
+    int dimension = GetDim();
+    UnstructGrid *unstructuredGrid = UnstructGridCast(grid);
+
+    int nTotalCell = unstructuredGrid->GetNTotalCell();
+    int *nodeNumberOfEachCell = unstructuredGrid->GetNodeNumberOfEachCell();
+    int *cell2Node  = unstructuredGrid->GetCell2Node();
+
+    int localIndex = grid->GetZoneLocalID();
+    Mesh_RefineController *currentController = gridRefineControllers[localIndex];
+    Mesh_CellTopo *cellTopo = currentController->GetCellFactory();
+    PHVectorInt1D &computationalToGlobalCellIndex = cellTopo->GetComputationalToGlobalCellIndex();
+    PHVectorInt1D &globalToComputationalCellIndex = cellTopo->GetGlobalToComputationalCellIndex();
+
+    computationalToGlobalCellIndex.resize(nTotalCell);
+    globalToComputationalCellIndex.resize(nTotalCell);
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        computationalToGlobalCellIndex[iCell] = iCell;
+        globalToComputationalCellIndex[iCell] = iCell;
+    }
+
+    PHVectorInt1D &cellType = cellTopo->GetCellType();
+    cellType.resize(nTotalCell);
+
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        int nodeNumber = nodeNumberOfEachCell[iCell];
+        int iCellType = GetCellType(dimension, nodeNumber);
+        cellType[iCell] = iCellType;
+    }
+
+    cellTopo->SetAllCellLevelToZero();
+    cellTopo->SetAllParentIndexToRootState();
+
+    PHVectorInt2D &cell2NodeArray = cellTopo->GetCell2Node();
+    cell2NodeArray.resize(nTotalCell);
+    int count = 0;
+    for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+    {
+        int nodeNumber = nodeNumberOfEachCell[iCell];
+        cell2NodeArray[iCell].resize(nodeNumber);
+        for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+        {
+            cell2NodeArray[iCell][iNode] = cell2Node[count ++];
+        }
+    }
+
+    int anisoRefine = this->refineParameter->GetAnisoRefineType();
+    if (anisoRefine)
+    {
+        int *faceNumberOfEachCell = unstructuredGrid->GetFaceNumberOfEachCell();
+        int **cell2Face = unstructuredGrid->GetCell2Face();
+
+        PHVectorInt2D &cell2FaceArray = cellTopo->GetCell2Face();
+        cell2FaceArray.resize(nTotalCell);
+
+        for (int iCell = 0; iCell < nTotalCell; ++ iCell)
+        {
+            int faceNumber = faceNumberOfEachCell[iCell];
+            cell2FaceArray[iCell].resize(faceNumber);
+            for (int iFace = 0; iFace < faceNumber; ++ iFace)
+            {
+                cell2FaceArray[iCell][iFace] = cell2Face[iCell][iFace];
+            }
+        }
+    }
+}
+
+void Mesh_Refine_Unstruct::ConstructNodeTopo(Grid *grid)
+{
+    UnstructGrid *unstructuredGrid = UnstructGridCast(grid);
+
+    RDouble *x = unstructuredGrid->GetX();
+    RDouble *y = unstructuredGrid->GetY();
+    RDouble *z = unstructuredGrid->GetZ();
+
+    int localIndex = grid->GetZoneLocalID();
+    Mesh_RefineController *currentController = gridRefineControllers[localIndex];
+    Geo_PointFactory *nodeTopo = currentController->GetNodeFactory();
+
+    RDouble minDistance, maxDistance;
+    unstructuredGrid->GetMinMaxDS(minDistance, maxDistance);
+    nodeTopo->SetMinDistance(minDistance);
+
+    int nTotalNode = unstructuredGrid->GetNTotalNode();
+    for (int iPoint = 0; iPoint < nTotalNode; ++ iPoint)
+    {
+        Point3D *point = new Point3D(x[iPoint], y[iPoint], z[iPoint], iPoint);
+
+        bool isNodeExist;
+        nodeTopo->AddPoint(point, isNodeExist);
+    }
+
+    int oldNumberOfComputationalNodes = nTotalNode;
+    nodeTopo->SetOldNumberOfComputationalNodes(oldNumberOfComputationalNodes);
+}
+
+void Mesh_Refine_Unstruct::ConstructFaceTopo(Grid *grid)
+{
+    int dimension = GetDim();
+    UnstructGrid *unstructuredGrid = UnstructGridCast(grid);
+
+    int nTotalFace            = unstructuredGrid->GetNTotalFace();
+    int nBoundFace            = unstructuredGrid->GetNBoundFace();
+    int nTotalCell            = unstructuredGrid->GetNTotalCell();
+    int *face2Node            = unstructuredGrid->GetFace2Node();
+    int *leftCellOfFace       = unstructuredGrid->GetLeftCellOfFace();
+    int *rightCellOfFace      = unstructuredGrid->GetRightCellOfFace();
+    int *nodeNumberOfEachFace = unstructuredGrid->GetNodeNumberOfEachFace();
+
+    int localIndex = grid->GetZoneLocalID();
+    Mesh_RefineController *currentController = gridRefineControllers[localIndex];
+    Mesh_FaceTopo *faceTopo = currentController->GetFaceFactory();
+
+    PHVectorInt1D &computationalToGlobalFaceIndex = faceTopo->GetComputationalToGlobalFaceIndex();
+    computationalToGlobalFaceIndex.resize(nTotalFace);
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        computationalToGlobalFaceIndex[iFace] = iFace;
+    }
+
+    PHVectorInt1D &leftCellIndex  = faceTopo->GetLeftCellIndex();
+    PHVectorInt1D &rightCellIndex = faceTopo->GetRightCellIndex();
+    leftCellIndex.resize(nTotalFace);
+    rightCellIndex.resize(nTotalFace);
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        int leftCell  = leftCellOfFace [iFace];
+        int rightCell = rightCellOfFace[iFace];
+        if (rightCell >= nTotalCell)
+        {
+            rightCell = - rightCell;
+        }
+
+        leftCellIndex [iFace] = leftCell;
+        rightCellIndex[iFace] = rightCell;
+    }
+
+    int nodeCount = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++iFace)
+    {
+        int nodeNumber = nodeNumberOfEachFace[iFace];
+        PHVectorInt1D iFace2Node;
+        iFace2Node.resize(nodeNumber);
+        for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+        {
+            iFace2Node[iNode] = face2Node[nodeCount ++];
+        }
+
+        sort(iFace2Node.begin(), iFace2Node.end());
+
+        MultiIndex faceOfMultiIndex(nodeNumber, iFace);
+        faceOfMultiIndex.SetData(&iFace2Node[0]);
+        int id = faceTopo->FindFace(faceOfMultiIndex);
+        if (id == PHSPACE::INVALID_INDEX)
+        {
+            faceTopo->InsertFace(faceOfMultiIndex);
+        }
+    }
+
+    PHVectorInt2D &face2NodeArray = faceTopo->GetFace2Node();
+    face2NodeArray.resize(nTotalFace);
+    nodeCount = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        int nodeNumber = nodeNumberOfEachFace[iFace];
+        face2NodeArray[iFace].resize(nodeNumber);
+
+        for (int iNode = 0; iNode < nodeNumber; ++ iNode)
+        {
+            face2NodeArray[iFace][iNode] = face2Node[nodeCount ++];
+        }
+    }
+
+    vector<SimpleBC * > &faceBoundaryCondition = faceTopo->GetFaceBoundaryCondition();
+    faceBoundaryCondition.resize(nTotalFace);
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        faceBoundaryCondition[iFace] = 0;
+    }
+    UnstructBCSet *unstructBCSet = unstructuredGrid->GetUnstructBCSet();
+    int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        UnstructBC *bcRegion = unstructBCSet ->GetBCRegion(bcRegionIDofBCFace[iFace]);
+
+        SimpleBC *iFaceBoundaryCondtion = new SimpleBC();
+        int boundaryType = bcRegion->GetBCType();
+        iFaceBoundaryCondtion->SetBCType(boundaryType);
+        if (boundaryType != PHENGLEI::INTERFACE)
+        {
+            string bcName = bcRegion->GetBCName();
+            iFaceBoundaryCondtion->SetBCName(bcName);
+        }
+        else
+        {
+            string bcName = "Interface";
+            iFaceBoundaryCondtion->SetBCName(bcName);
+        }
+        faceBoundaryCondition[iFace] = iFaceBoundaryCondtion;
+    }
+
+    PHVectorInt1D &faceType = faceTopo->GetFaceType();
+    faceType.resize(nTotalFace);
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        int nodeNumber  = nodeNumberOfEachFace[iFace];
+        int iFaceType   = GetFaceType(dimension, nodeNumber);
+        faceType[iFace] = iFaceType;
+    }
+
+    PHVectorInt1D &parentFaceIndex = faceTopo->GetParentFaceIndex();
+    parentFaceIndex.resize(nTotalFace);
+    SetField(parentFaceIndex, PHSPACE::INVALID_INDEX, nTotalFace);
+
+    PHVectorInt2D &childrenFaceIndex = faceTopo->GetChildrenFaceIndex();
+    childrenFaceIndex.resize(nTotalFace);
+
+    PHVectorInt1D &childrenToCompositeFaceIndex = faceTopo->GetChildrenToCompositeFaceIndex();
+    childrenToCompositeFaceIndex.resize(nTotalFace);
+}
+
+void Mesh_Refine_Unstruct::ConstructInterFaceTopo(Grid *grid)
+{
+    UnstructGrid *unstructuredGrid = UnstructGridCast(grid);
+
+    int localIndex = grid->GetZoneLocalID();
+    Mesh_RefineController *currentController = gridRefineControllers[localIndex];
+
+    currentController->SetInterfaceInformation(unstructuredGrid->GetInterfaceInfo());
+}
+
+void Mesh_Refine_Unstruct::RefineGrid()
+{
+    WriteLogFile("Start Grid Adaptive!");
+    PrintToWindow("Start Grid Adaptive!\n");
+
+    PH_Barrier();
+    TimeSpan timeSpan;
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        Mesh_RefineController *currentController = gridRefineControllers[iZone];
+        currentController->RefineGrid();
+    }
+
+    PH_Barrier();
+    WriteLogFile("Time consuming of grid refinement: ", timeSpan.GetTimeSpan());
+
+    WriteLogFile("End Grid Adaptive!");
+    PrintToWindow("End Grid Adaptive!\n");
+}
+
+void Mesh_Refine_Unstruct::FixAnisoRefineType()
+{
+    InitAnisoRefineType();
+
+    if (GetDim() == PHSPACE::TWO_D) return;
+
+    int anisoRefine = this->refineParameter->GetAnisoRefineType();
+    if (anisoRefine != ANISOTROPICREFINE) return;
+
+    WriteLogFile("Start to fix cell type!");
+    TimeSpan fixTime;
+
+    int infectTime = 0;
+    int isContinueInfect = 1;
+    while (isContinueInfect)
+    {
+        isContinueInfect = 0;
+
+        if (infectTime > 0)
+        {
+            PrintToWindow("\nInfect isotropic refine type time: ", infectTime, "......");
+            WriteLogFile("\nInfect isotropic refine type time: ", infectTime, "......");
+        }
+
+        for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+        {
+            Mesh_RefineController *currentController = gridRefineControllers[iZone];
+            currentController->FixAnisoRefineType();
+        }
+
+        SwapInterfaceRefineType();
+
+        isContinueInfect = IsNeedInfectInterfaceIsotropicRefineType();
+
+        PH_CompareMaxMin(isContinueInfect, 1);
+
+        ++ infectTime;
+    }
+
+    PrintToWindow("\n");
+
+    fixTime.ShowTimeSpanToLogFile("Fix cell refine type");
+    WriteLogFile("End fix cell type!");
+}
+
+bool Mesh_Refine_Unstruct::IsNeedInfectInterfaceIsotropicRefineType()
+{
+    bool isContinue = false;
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        Mesh_RefineController *currentController = gridRefineControllers[iZone];
+
+        if (currentController->IsNeedInfectInterfaceIsotropicRefineType())
+        {
+            isContinue = true;
+            break;
+        }
+    }
+
+    return isContinue;
+}
+
+void Mesh_Refine_Unstruct::SwapInterfaceRefineType()
+{
+    WriteLogFile("Start Swapping refine type!");
+
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    int nZones = PHMPI::GetNumberofGlobalZones();
+    vector< PH_Request > requestContainer;
+    vector< vector< DataContainer * > > receivedDataBuffer;
+    vector< vector< DataContainer * > > sendDataBuffer;
+    receivedDataBuffer.resize(nZones);
+    sendDataBuffer.resize(nZones);
+
+    //! Compress the send information into the actkey.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+        if (currentProcessor == sendProcessor)
+        {
+            sendDataBuffer[iZone].resize(numberOfNeighbor);
+        }
+
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = new DataContainer;
+                sendDataBuffer[iZone][iNeighbor] = sendBuffer;
+
+                int localZoneIndex = region->GetProcessGlobalZoneIndexToLocalZoneIndex(iZone);
+                Mesh_RefineController *currentController = gridRefineControllers[localZoneIndex];
+                currentController->CompressRefineType(sendBuffer, neighborZone);
+            }
+        }
+    }
+
+    //! Communication.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int sendProcessor = PHMPI::GetZoneProcessorID(iZone);
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+
+            if (currentProcessor != sendProcessor && currentProcessor != receiveProcessor)
+            {
+                continue;
+            }
+
+            DataContainer *receivedBuffer = 0;
+            DataContainer *sendBuffer = 0;
+            if (currentProcessor == receiveProcessor)
+            {
+                receivedBuffer = new DataContainer;
+                receivedDataBuffer[iZone].push_back(receivedBuffer);
+            }
+            if (currentProcessor == sendProcessor)
+            {
+                sendBuffer = sendDataBuffer[iZone][iNeighbor];
+            }
+
+            int tag = iZone;
+            if (currentProcessor == sendProcessor)
+            {
+                if (sendProcessor != receiveProcessor)
+                {
+                    streamsize nlen = sendBuffer->size();
+                    send(sendBuffer, receiveProcessor, nlen, requestContainer, tag);
+                }
+            }
+            if (currentProcessor == receiveProcessor)
+            {
+                int neighborOrer = -1;
+                ZoneNeighbor *globalNeighborZonesTemp = zoneConnectivity->GetZoneNeighbor(neighborZone);
+                std::size_t numberOfNeighborTemp = globalNeighborZonesTemp->GetNumberOfNeighbor();
+
+                for (std::size_t iNeighbor1 = 0; iNeighbor1 < numberOfNeighborTemp; ++ iNeighbor1)
+                {
+                    uint_t neighborZoneTemp = globalNeighborZonesTemp->GetZoneIndexOfNeighbor(iNeighbor1);
+                    if (neighborZoneTemp == iZone)
+                    {
+                        neighborOrer = static_cast<int>(iNeighbor1);
+                        break;
+                    }
+                }
+
+                ASSERT(neighborOrer != -1);
+
+                if (sendProcessor != receiveProcessor)
+                {
+                    CharVecSizeType nlen = sendDataBuffer[neighborZone][neighborOrer]->size();
+                    receive(receivedBuffer, sendProcessor, nlen, requestContainer, tag);
+                }
+                else
+                {
+                    uint_t lastID = receivedDataBuffer[iZone].size();
+                    SWAP(receivedDataBuffer[iZone][lastID - 1], sendDataBuffer[neighborZone][neighborOrer]);
+                }
+            }
+        }
+    }
+
+    if (PHMPI::GetNumberOfProcessor() > 1)
+    {
+        PH_Wait(static_cast<int>(requestContainer.size()), &(requestContainer[0]));
+    }
+
+    //! Decompress the interface data from datacontainer.
+    for (int iZone = 0; iZone < nZones; ++ iZone)
+    {
+        ZoneNeighbor *globalNeighborZones = zoneConnectivity->GetZoneNeighbor(iZone);
+        std::size_t numberOfNeighbor = globalNeighborZones->GetNumberOfNeighbor();
+
+        int count = 0;
+        for (std::size_t iNeighbor = 0; iNeighbor < numberOfNeighbor; ++ iNeighbor)
+        {
+            int neighborZone = globalNeighborZones->GetZoneIndexOfNeighbor(iNeighbor);
+
+            int receiveProcessor = PHMPI::GetZoneProcessorID(neighborZone);
+            if (currentProcessor == receiveProcessor)
+            {
+                DataContainer *receiveData = receivedDataBuffer[iZone][count];
+
+                int localZoneIndex = region->GetProcessGlobalZoneIndexToLocalZoneIndex(neighborZone);
+                Mesh_RefineController *currentController = gridRefineControllers[localZoneIndex];
+                currentController->DecompressRefineType(receiveData, iZone);
+
+                ++ count;
+            }
+        }
+    }
+
+    for (std::size_t iDim = 0; iDim < receivedDataBuffer.size(); ++ iDim)
+    {
+        for (std::size_t jDim = 0; jDim < receivedDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete receivedDataBuffer[iDim][jDim];
+        }
+    }
+    receivedDataBuffer.clear();
+    for (std::size_t iDim = 0; iDim < sendDataBuffer.size(); ++ iDim)
+    {
+        for (std::size_t jDim = 0; jDim < sendDataBuffer[iDim].size(); ++ jDim)
+        {
+            delete sendDataBuffer[iDim][jDim];
+        }
+    }
+    sendDataBuffer.clear();
+    requestContainer.clear();
+
+    WriteLogFile("End Swapping refine type!");
+}
+
+void Mesh_Refine_Unstruct::InitAnisoRefineType()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        Mesh_RefineController *currentController = gridRefineControllers[iZone];
+        currentController->InitAnisoRefineType();
+    }
+}
+
+void Mesh_Refine_Unstruct::BuildRefineProperty()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        SetDefaultRefineProperty(iZone);
+
+        ComputeRefineProperty(iZone);
+
+        ResetCellProperty(iZone);
+    }
+}
+
+void Mesh_Refine_Unstruct::ResetCellProperty(int iZone)
+{
+    Mesh_RefineController *currentController = gridRefineControllers[iZone];
+    Mesh_CellTopo *cellTopo = currentController->GetCellFactory();
+
+    PHVectorInt1D &cellComputationalStatus = cellTopo->GetCellComputationalStatus();
+    PHVectorInt1D &cellModifiedStatus = cellTopo->GetCellModifiedStatus();
+
+    SetField(cellModifiedStatus, SPLIT, static_cast<int>(cellModifiedStatus.size()));
+    SetField(cellComputationalStatus, HIDDEN, static_cast<int>(cellComputationalStatus.size()));
+}
+
+void Mesh_Refine_Unstruct::ComputeRefineProperty(int iZone)
+{
+    PrepareDataStructure(iZone);
+
+    SetCellModifiedStatusToNoChange(iZone);
+
+    SetCellComputationalStatusToHiddenState(iZone);
+
+    SetCurrentCellModifiedStatusByOldCellModifiedStatus(iZone);
+
+    SetCurrentCellComputationalStatus(iZone);
+}
+
+void Mesh_Refine_Unstruct::PrepareDataStructure(int iZone)
+{
+    Mesh_RefineController *currentController = gridRefineControllers[iZone];
+
+    currentController->Initialize();
+    currentController->ConstructNode2Cell();
+    currentController->ConstructCell2Cell();
+}
+
+void Mesh_Refine_Unstruct::SetCellModifiedStatusToNoChange(int iZone)
+{
+    Mesh_RefineController *currentController = gridRefineControllers[iZone];
+    Mesh_CellTopo *cellTopo = currentController->GetCellFactory();
+
+    int numberOfTotal = cellTopo->GetNTotalCell() + currentController->GetNBoundaryFace();
+
+    PHVectorInt1D &cellModifiedStatus = cellTopo->GetCellModifiedStatus();
+    cellModifiedStatus.resize(numberOfTotal);
+    SetField(cellModifiedStatus, NOCHANGE, numberOfTotal);
+}
+
+void Mesh_Refine_Unstruct::SetCellComputationalStatusToHiddenState(int iZone)
+{
+    Mesh_RefineController *currentController = gridRefineControllers[iZone];
+    Mesh_CellTopo *cellTopo = currentController->GetCellFactory();
+
+    int numberOfTotal = cellTopo->GetNTotalCell() + currentController->GetNBoundaryFace();
+
+    PHVectorInt1D &cellComputationalStatus = cellTopo->GetCellComputationalStatus();
+    cellComputationalStatus.resize(numberOfTotal);
+    SetField(cellComputationalStatus, HIDDEN, numberOfTotal);
+}
+
+void Mesh_Refine_Unstruct::SetCurrentCellModifiedStatusByOldCellModifiedStatus(int iZone)
+{
+    Mesh_RefineController *currentController = gridRefineControllers[iZone];
+    Mesh_CellTopo *cellTopo = currentController->GetCellFactory();
+
+    PHVectorInt1D &computationalCellModifiedStatus = cellTopo->GetComputationalCellModifiedStatus();
+    PHVectorInt1D &computationalToGlobalCellIndex = cellTopo->GetComputationalToGlobalCellIndex();
+
+    int oldNumberOfCell = currentController->GetOldNumberOfCell();
+    for (int iCell = 0; iCell < oldNumberOfCell; ++ iCell)
+    {
+        int cellIndex = computationalToGlobalCellIndex[iCell];
+        int cellModifiedStatus = computationalCellModifiedStatus[iCell];
+        cellTopo->SetCellModifiedStatus(cellIndex, cellModifiedStatus);
+    }
+}
+
+void Mesh_Refine_Unstruct::SetCurrentCellComputationalStatus(int iZone)
+{
+    Mesh_RefineController *currentController = gridRefineControllers[iZone];
+    Mesh_CellTopo *cellTopo = currentController->GetCellFactory();
+
+    PHVectorInt1D &computationalCellModifiedStatus = cellTopo->GetComputationalCellModifiedStatus();
+    PHVectorInt1D &computationalToGlobalCellIndex = cellTopo->GetComputationalToGlobalCellIndex();
+
+    int oldNumberOfCell = currentController->GetOldNumberOfCell();
+    for (int iCell = 0; iCell < oldNumberOfCell; ++ iCell)
+    {
+        int cellIndex = computationalToGlobalCellIndex[iCell];
+        int cellModifiedStatus = computationalCellModifiedStatus[iCell];
+
+        if (cellModifiedStatus == NOCHANGE)
+        {
+            cellTopo->SetComputationalStatusOfCell(cellIndex, ON);
+        }
+    }
+}
+
+void Mesh_Refine_Unstruct::SetDefaultRefineProperty(int iZone)
+{
+    Mesh_RefineController *currentController = gridRefineControllers[iZone];
+    Mesh_CellTopo *cellTopo = currentController->GetCellFactory();
+
+    int nTotalCell = cellTopo->GetNTotalCell();
+    PHVectorInt1D &computationalCellModifiedStatus = cellTopo->GetComputationalCellModifiedStatus();
+    computationalCellModifiedStatus.resize(nTotalCell);
+    SetField(computationalCellModifiedStatus, NOCHANGE, nTotalCell);
+}
+
+}
+
+
diff --git a/Mesh/src/OversetKDTree.cpp b/Mesh/src/OversetKDTree.cpp
new file mode 100644
index 0000000..0c5f705
--- /dev/null
+++ b/Mesh/src/OversetKDTree.cpp
@@ -0,0 +1,605 @@
+#include "OversetKDTree.h"
+#include "Geo_Grid.h"
+#include "Pointer.h"
+
+namespace PHSPACE
+{
+
+BasicKDTree::BasicKDTree(RDouble **dataIn,
+    int         numberOfSearchElementsIn,
+    int         numberOfSearchDirectionIn) :
+    data(dataIn),
+    numberOfSearchElements(numberOfSearchElementsIn),
+    numberOfSearchDirection(numberOfSearchDirectionIn)
+{
+    leftSonIndex = new int[numberOfSearchElements];
+    rightSonIndex = new int[numberOfSearchElements];
+    SetField(leftSonIndex, - 1, numberOfSearchElements);
+    SetField(rightSonIndex, - 1, numberOfSearchElements);
+
+    if (numberOfSearchElements == 1)
+    {
+        rootIndex = 0;
+        return;
+    }
+
+    BuildBasicKDTree();
+}
+
+BasicKDTree::~BasicKDTree()
+{
+    data = NULL;
+
+    delete[] leftSonIndex;
+    delete[] rightSonIndex;
+
+    leftSonIndex = NULL;
+    rightSonIndex = NULL;
+}
+
+void BasicKDTree::BuildBasicKDTree()
+{
+    partitionMethod = & BasicKDTree::PartitionSinglePivotPreConditionDoubleEndScanQuickSort;
+
+    elementOrder = new int[numberOfSearchElements];
+    for (int iElement = 0; iElement < numberOfSearchElements; ++ iElement)
+    {
+        elementOrder[iElement] = iElement;
+    }
+
+    int iLayer = 0;
+    int iStart = 0;
+    int iFinal = numberOfSearchElements - 1;
+
+    TreeSortSinglePivotQuickSort(iStart, iFinal, iLayer);
+
+    rootIndex = elementOrder[iFinal / 2];
+
+    delete[] elementOrder;
+    elementOrder = NULL;
+}
+
+void BasicKDTree::SwapElementIndex(int indexA, int indexB)
+{
+    int      tempOrder = elementOrder[indexA];
+    elementOrder[indexA] = elementOrder[indexB];
+    elementOrder[indexB] = tempOrder;
+}
+
+int  BasicKDTree::PartitionSinglePivotDoubleEndScanQuickSort(int iStart, int iFinal, int iLayer)
+{
+    int     iPivot = iFinal --;
+
+    while (iStart <= iFinal)
+    {
+        while (iStart <= iFinal && data[iLayer][elementOrder[iStart]] < data[iLayer][elementOrder[iPivot]])
+        {
+            iStart ++;
+        }
+
+        while (iStart <= iFinal && data[iLayer][elementOrder[iFinal]] >= data[iLayer][elementOrder[iPivot]])
+        {
+            iFinal --;
+        }
+
+        if (iStart < iFinal)
+        {
+            SwapElementIndex(iStart, iFinal);
+        }
+    }
+
+    SwapElementIndex(iStart, iPivot);
+
+    return iStart;
+}
+
+int  BasicKDTree::PartitionSinglePivotPreConditionDoubleEndScanQuickSort(int iStart, int iFinal, int iLayer)
+{
+    SwapElementIndex(iFinal, (iStart + iFinal) / 2);
+
+    int     iPivot = iFinal --;
+
+    while (iStart <= iFinal)
+    {
+        while (iStart <= iFinal && data[iLayer][elementOrder[iStart]] < data[iLayer][elementOrder[iPivot]])
+        {
+            iStart ++;
+        }
+
+        while (iStart <= iFinal && data[iLayer][elementOrder[iFinal]] >= data[iLayer][elementOrder[iPivot]])
+        {
+            iFinal --;
+        }
+
+        if (iStart < iFinal)
+        {
+            SwapElementIndex(iStart, iFinal);
+        }
+    }
+
+    SwapElementIndex(iStart, iPivot);
+
+    return iStart;
+}
+
+int  BasicKDTree::PartitionSinglePivotForwardScanQuickSort(int iPivot, int iFinal, int iLayer)
+{
+    int       indexA = iPivot;
+
+    for (int indexB = iPivot + 1; indexB <= iFinal; ++ indexB)
+    {
+        if (data[iLayer][elementOrder[indexB]] < data[iLayer][elementOrder[iPivot]])
+        {
+            SwapElementIndex(++ indexA, indexB);
+        }
+    }
+
+    SwapElementIndex(iPivot, indexA);
+
+    return indexA;
+}
+
+int  BasicKDTree::PartitionSinglePivotPreConditionForwardScanQuickSort(int iPivot, int iFinal, int iLayer)
+{
+    SwapElementIndex(iPivot, (iPivot + iFinal) / 2);
+
+    int       indexA = iPivot;
+
+    for (int indexB = iPivot + 1; indexB <= iFinal; ++ indexB)
+    {
+        if (data[iLayer][elementOrder[indexB]] < data[iLayer][elementOrder[iPivot]])
+        {
+            SwapElementIndex(++ indexA, indexB);
+        }
+    }
+
+    SwapElementIndex(iPivot, indexA);
+
+    return indexA;
+}
+
+int  BasicKDTree::FindHalfSinglePivotQuickSort(int iStart, int iFinal, int iLayer)
+{
+    int middle = (iStart + iFinal) / 2;
+
+    int iPoint = - 1;
+
+    while (iPoint != middle)
+    {
+        iPoint = (this->*partitionMethod)(iStart, iFinal, iLayer);
+
+        if (iPoint < middle)
+        {
+            iStart = iPoint + 1;
+        }
+        else if (iPoint > middle)
+        {
+            iFinal = iPoint - 1;
+        }
+        else
+        {
+            break;
+        }
+    }
+
+    return iPoint;
+}
+
+void BasicKDTree::TreeSortSinglePivotQuickSort(int iStart, int iFinal, int iLayer)
+{
+    iLayer %= numberOfSearchDirection;
+
+    int middle = FindHalfSinglePivotQuickSort(iStart, iFinal, iLayer);
+
+    if (middle == iStart)
+    {
+        leftSonIndex[elementOrder[middle]] = - 1;
+    }
+    else if (middle == iStart + 1)
+    {
+        leftSonIndex[elementOrder[middle]] = elementOrder[iStart];
+    }
+    else
+    {
+        TreeSortSinglePivotQuickSort(iStart, middle - 1, iLayer + 1);
+        leftSonIndex[elementOrder[middle]] = elementOrder[(iStart + middle - 1) / 2];
+    }
+
+    if (middle == iFinal - 1)
+    {
+        rightSonIndex[elementOrder[middle]] = elementOrder[iFinal];
+    }
+    else
+    {
+        TreeSortSinglePivotQuickSort(middle + 1, iFinal, iLayer + 1);
+        rightSonIndex[elementOrder[middle]] = elementOrder[(middle + 1 + iFinal) / 2];
+    }
+}
+
+GridKDTree::GridKDTree(UnstructGrid *gridIn, int *keySearchOfCellsIn, RDouble *minBoxOfZoneIn, RDouble *maxBoxOfZoneIn) : grid(gridIn)
+{
+    geometricDimension = GetDim();
+    rootIndex = 0;
+    leftSonIndex = NULL;
+    rightSonIndex = NULL;
+
+    ifAuxiliaryGrid = false;
+    if (NULL == keySearchOfCellsIn)
+    {
+        ifAuxiliaryGrid = true;
+    }
+
+    int numberOfTotalCells = grid->GetNTotalCell();
+
+    numberOfSearchCells = 0;
+    if (ifAuxiliaryGrid)
+    {
+        for (int iCell = 0; iCell < numberOfTotalCells; ++ iCell)
+        {
+            searchCellIndex.push_back(iCell);
+        }
+        numberOfSearchCells = numberOfTotalCells;
+    }
+    else
+    {
+        for (int iCell = 0; iCell < numberOfTotalCells; ++ iCell)
+        {
+            if (keySearchOfCellsIn[iCell])
+            {
+                searchCellIndex.push_back(iCell);
+                ++ numberOfSearchCells;
+            }
+        }
+    }
+
+    if (!numberOfSearchCells)
+    {
+        return;
+    }
+
+    switch (geometricDimension)
+    {
+    case TWO_D:
+        inCellCheckMethod = & GridKDTree::InCellCheck2D;
+        break;
+    case THREE_D:
+        inCellCheckMethod = & GridKDTree::InCellCheck3D;
+        break;
+    default:
+        exit(- 1);
+    }
+
+    numberOfSearchDirection = 2 * geometricDimension;
+
+    RDouble tolerance = GlobalDataBase::GetDoubleParaFromDB("toleranceForOversetBox");
+    if (ifAuxiliaryGrid)
+    {
+        ComputeGlobalBox(0.0);
+    }
+    else
+    {
+        minBoxOfZone = minBoxOfZoneIn;
+        maxBoxOfZone = maxBoxOfZoneIn;
+    }
+
+    ComputeCellBox(tolerance);
+
+    basicKDTree = new BasicKDTree(cellBox, numberOfSearchCells,  2 * geometricDimension);
+
+    rootIndex = basicKDTree->GetRootIndex();
+    leftSonIndex = basicKDTree->GetLeftSonIndex();
+    rightSonIndex = basicKDTree->GetRightSonIndex();
+}
+
+GridKDTree::~GridKDTree()
+{
+    if (!numberOfSearchCells)
+    {
+        return;
+    }
+
+    delete basicKDTree;
+
+    leftSonIndex = NULL;
+    rightSonIndex = NULL;
+
+    if (ifAuxiliaryGrid)
+    {
+        delete[] minBoxOfZone;
+        delete[] maxBoxOfZone;
+        minBoxOfZone = NULL;
+        maxBoxOfZone = NULL;
+    }
+    else
+    {
+        minBoxOfZone = NULL;
+        maxBoxOfZone = NULL;
+    }
+
+    DelPointer2(cellBox);
+    cellBox = NULL;
+}
+
+void GridKDTree::ComputeGlobalBox(RDouble tolerance)
+{
+    minBoxOfZone = new RDouble[geometricDimension];
+    maxBoxOfZone = new RDouble[geometricDimension];
+    SetField(minBoxOfZone, LARGE, geometricDimension);
+    SetField(maxBoxOfZone, - LARGE, geometricDimension);
+
+    vector< RDouble * > nodeCoordinate;
+    RDouble *x = grid->GetX();
+    nodeCoordinate.push_back(x);
+    RDouble *y = grid->GetY();
+    nodeCoordinate.push_back(y);
+    RDouble *z = grid->GetZ();
+    nodeCoordinate.push_back(z);
+
+    int numberOfNodes = grid->GetNTotalNode();
+    for (int iDimension = 0; iDimension < geometricDimension; ++ iDimension)
+    {
+        RDouble &minInThisDimension = minBoxOfZone[iDimension];
+        RDouble &maxInThisDimension = maxBoxOfZone[iDimension];
+        for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+        {
+            RDouble &nodeCoordinateInThisDimension = nodeCoordinate[iDimension][iNode];
+            minInThisDimension = MIN(minInThisDimension, nodeCoordinateInThisDimension);
+            maxInThisDimension = MAX(maxInThisDimension, nodeCoordinateInThisDimension);
+        }
+        minInThisDimension -= tolerance;
+        maxInThisDimension += tolerance;
+    }
+}
+
+void GridKDTree::ComputeCellBox(RDouble tolerance)
+{
+    cellBox = NewPointer2< RDouble >(numberOfSearchDirection, numberOfSearchCells);
+
+    int **cellNodeIndex = grid->GetCell2NodeArray();
+    int *cellNodeNumber = grid->GetNodeNumberOfEachCell();
+    vector< RDouble * > nodeCoordinate;
+    RDouble *x = grid->GetX();
+    nodeCoordinate.push_back(x);
+    RDouble *y = grid->GetY();
+    nodeCoordinate.push_back(y);
+    RDouble *z = grid->GetZ();
+    nodeCoordinate.push_back(z);
+
+    for (int iDimension = 0; iDimension < geometricDimension; ++ iDimension)
+    {
+        SetField(cellBox[iDimension], LARGE, numberOfSearchCells);
+        SetField(cellBox[iDimension + geometricDimension], - LARGE, numberOfSearchCells);
+        for (int iCell = 0; iCell < numberOfSearchCells; ++ iCell)
+        {
+            RDouble &minInThisDimension = cellBox[iDimension][iCell];
+            RDouble &maxInThisDimension = cellBox[iDimension + geometricDimension][iCell];
+            int &cellIndex = searchCellIndex[iCell];
+            int &numberOfNodesInThisCell = cellNodeNumber[cellIndex];
+            for (int iNode = 0; iNode < numberOfNodesInThisCell; ++ iNode)
+            {
+                RDouble &nodeCoordinateInThisDimension = nodeCoordinate[iDimension][cellNodeIndex[cellIndex][iNode]];
+                minInThisDimension = MIN(minInThisDimension, nodeCoordinateInThisDimension);
+                maxInThisDimension = MAX(maxInThisDimension, nodeCoordinateInThisDimension);
+            }
+            minInThisDimension -= tolerance;
+            maxInThisDimension += tolerance;
+        }
+    }
+}
+void GridKDTree::EnlargeCellBox(const int &cellIndex, const RDouble &eps)
+{
+    for (int iDimension = 0; iDimension < geometricDimension; ++ iDimension)
+    {
+        RDouble &minInThisDimension = cellBox[iDimension][cellIndex];
+        RDouble &maxInThisDimension = cellBox[iDimension + geometricDimension][cellIndex];
+        minInThisDimension -= eps;
+        maxInThisDimension += eps;
+    }
+}
+
+int  GridKDTree::SearchNodeInKDTree(RDouble *nodeCoordinateIn)
+{
+    int donorCellIndex = -1;
+
+    if (numberOfSearchCells)
+    {
+        if (IfNodeIsInBox(nodeCoordinateIn, minBoxOfZone, maxBoxOfZone, geometricDimension))
+        {
+            SearchNodeInKDTree(nodeCoordinateIn, rootIndex, donorCellIndex, 0);
+        }
+    }
+
+    return donorCellIndex;
+}
+
+void GridKDTree::SearchNodeInKDTree(RDouble *nodeCoordinateIn, int rootIndexIn, int &donorCellIndexIn, int iLayerIn)
+{
+    if (rootIndexIn == - 1)
+    {
+        return;
+    }
+
+    iLayerIn %= numberOfSearchDirection;
+
+    if (IfNodeIsInCellBox(nodeCoordinateIn, rootIndexIn))
+    {
+        if ((this->*inCellCheckMethod)(nodeCoordinateIn, rootIndexIn, donorCellIndexIn)) return;
+
+        SearchNodeInKDTree(nodeCoordinateIn, leftSonIndex[rootIndexIn], donorCellIndexIn, iLayerIn + 1);
+        if (donorCellIndexIn != - 1) return;
+        SearchNodeInKDTree(nodeCoordinateIn, rightSonIndex[rootIndexIn], donorCellIndexIn, iLayerIn + 1);
+    }
+    else
+    {
+        if (IfInLeftHalfTree(nodeCoordinateIn, rootIndexIn, iLayerIn))
+        {
+            SearchNodeInKDTree(nodeCoordinateIn, leftSonIndex[rootIndexIn], donorCellIndexIn, iLayerIn + 1);
+        }
+        else if (IfInRightHalfTree(nodeCoordinateIn, rootIndexIn, iLayerIn))
+        {
+            SearchNodeInKDTree(nodeCoordinateIn, rightSonIndex[rootIndexIn], donorCellIndexIn, iLayerIn + 1);
+        }
+        else
+        {
+            SearchNodeInKDTree(nodeCoordinateIn, leftSonIndex[rootIndexIn], donorCellIndexIn, iLayerIn + 1);
+            if (donorCellIndexIn != - 1) return;
+            SearchNodeInKDTree(nodeCoordinateIn, rightSonIndex[rootIndexIn], donorCellIndexIn, iLayerIn + 1);
+        }
+    }
+}
+
+bool GridKDTree::InCellCheck2D(RDouble *nodeCoordinateIn, int rootIndexIn, int &donorCellIndexIn)
+{
+    int *leftCellIndex = grid->GetLeftCellOfFace();
+
+    int *cellFaceNumber = grid->GetFaceNumberOfEachCell();
+    int **cellFaceIndex = grid->GetCell2Face();
+
+    RDouble eps = GetToleranceForOversetSearch();
+
+    RDouble *faceNormalX = grid->GetFaceNormalX();
+    RDouble *faceNormalY = grid->GetFaceNormalY();
+
+    RDouble *faceCenterX = grid->GetFaceCenterX();
+    RDouble *faceCenterY = grid->GetFaceCenterY();
+
+    int &cellIndex = searchCellIndex[rootIndexIn];
+    int &numberOfFacesInCell = cellFaceNumber[cellIndex];
+
+    for (int iFace = 0; iFace < numberOfFacesInCell; ++ iFace)
+    {
+        int &faceIndex = cellFaceIndex[cellIndex][iFace];
+
+        RDouble &thisFaceNormalX = faceNormalX[faceIndex];
+        RDouble &thisFaceNormalY = faceNormalY[faceIndex];
+
+        RDouble &thisFaceCenterX = faceCenterX[faceIndex];
+        RDouble &thisFaceCenterY = faceCenterY[faceIndex];
+
+        RDouble nominalAngle = (nodeCoordinateIn[0] - thisFaceCenterX) * thisFaceNormalX
+            + (nodeCoordinateIn[1] - thisFaceCenterY) * thisFaceNormalY;
+
+        if (leftCellIndex[faceIndex] == cellIndex) nominalAngle = - nominalAngle;
+
+        if (nominalAngle < - eps) return false;
+
+    }
+
+    donorCellIndexIn = cellIndex;
+
+    return true;
+}
+
+bool GridKDTree::InCellCheck3D(RDouble *nodeCoordinateIn, int rootIndexIn, int &donorCellIndexIn)
+{
+    int *cellFaceNumber = grid->GetFaceNumberOfEachCell();
+    int **cellFaceIndex = grid->GetCell2Face();
+    int *faceNodeNumber = grid->GetNodeNumberOfEachFace();
+    int **faceNodeIndex = grid->GetFace2NodeArray();
+
+    RDouble eps = GetToleranceForOversetSearch();
+
+    RDouble *cellCenterX = grid->GetCellCenterX();
+    RDouble *cellCenterY = grid->GetCellCenterY();
+    RDouble *cellCenterZ = grid->GetCellCenterZ();
+
+    RDouble *faceCenterX = grid->GetFaceCenterX();
+    RDouble *faceCenterY = grid->GetFaceCenterY();
+    RDouble *faceCenterZ = grid->GetFaceCenterZ();
+
+    RDouble *nodeCoordinateX = grid->GetX();
+    RDouble *nodeCoordinateY = grid->GetY();
+    RDouble *nodeCoordinateZ = grid->GetZ();
+
+    int &cellIndex = searchCellIndex[rootIndexIn];
+    int &numberOfFacesInCell = cellFaceNumber[cellIndex];
+
+    RDouble &thisCellCenterX = cellCenterX[cellIndex];
+    RDouble &thisCellCenterY = cellCenterY[cellIndex];
+    RDouble &thisCellCenterZ = cellCenterZ[cellIndex];
+
+    for (int iFace = 0; iFace < numberOfFacesInCell; ++ iFace)
+    {
+        int &faceIndex = cellFaceIndex[cellIndex][iFace];
+        int &faceNodesNumber = faceNodeNumber[faceIndex];
+
+        RDouble &thisFaceCenterX = faceCenterX[faceIndex];
+        RDouble &thisFaceCenterY = faceCenterY[faceIndex];
+        RDouble &thisFaceCenterZ = faceCenterZ[faceIndex];
+
+        for (int iNode = 0; iNode < faceNodesNumber; ++ iNode)
+        {
+            int nodeIndex1 = faceNodeIndex[faceIndex][iNode];
+            int nodeIndex2 = faceNodeIndex[faceIndex][(iNode + 1) % faceNodesNumber];
+
+            RDouble &nodeCoordinateX1 = nodeCoordinateX[nodeIndex1];
+            RDouble &nodeCoordinateY1 = nodeCoordinateY[nodeIndex1];
+            RDouble &nodeCoordinateZ1 = nodeCoordinateZ[nodeIndex1];
+            RDouble &nodeCoordinateX2 = nodeCoordinateX[nodeIndex2];
+            RDouble &nodeCoordinateY2 = nodeCoordinateY[nodeIndex2];
+            RDouble &nodeCoordinateZ2 = nodeCoordinateZ[nodeIndex2];
+
+            if (In4PointsCell(nodeCoordinateX1, nodeCoordinateY1, nodeCoordinateZ1,
+                nodeCoordinateX2, nodeCoordinateY2, nodeCoordinateZ2,
+                thisFaceCenterX, thisFaceCenterY, thisFaceCenterZ,
+                thisCellCenterX, thisCellCenterY, thisCellCenterZ,
+                nodeCoordinateIn, eps))
+            {
+                donorCellIndexIn = cellIndex;
+                return true;
+            }
+        }
+    }
+    return false;
+}
+
+bool GridKDTree::In4PointsCell(const RDouble &x1, const RDouble &y1, const RDouble &z1,
+    const RDouble &x2, const RDouble &y2, const RDouble &z2,
+    const RDouble &x3, const RDouble &y3, const RDouble &z3,
+    const RDouble &x4, const RDouble &y4, const RDouble &z4,
+    RDouble *nodeCoordinateIn, const RDouble &eps)
+{
+    RDouble volume = ABS(ComputeVolumeBy4Ppoints(x1, y1, z1, x2, y2, z2, x3, y3, z3, x4, y4, z4));
+
+    RDouble volume1 = ABS(ComputeVolumeBy4Ppoints(x1, y1, z1, x2, y2, z2, x3, y3, z3,
+        nodeCoordinateIn[0], nodeCoordinateIn[1], nodeCoordinateIn[2]));
+    RDouble volume2 = ABS(ComputeVolumeBy4Ppoints(x2, y2, z2, x3, y3, z3, x4, y4, z4,
+        nodeCoordinateIn[0], nodeCoordinateIn[1], nodeCoordinateIn[2]));
+    RDouble volume3 = ABS(ComputeVolumeBy4Ppoints(x3, y3, z3, x4, y4, z4, x1, y1, z1,
+        nodeCoordinateIn[0], nodeCoordinateIn[1], nodeCoordinateIn[2]));
+    RDouble volume4 = ABS(ComputeVolumeBy4Ppoints(x4, y4, z4, x1, y1, z1, x2, y2, z2,
+        nodeCoordinateIn[0], nodeCoordinateIn[1], nodeCoordinateIn[2]));
+
+    if(ABS((volume1 + volume2 + volume3 + volume4) / volume - 1.0) > eps)
+    {
+        return false;
+    }
+    return true;
+}
+
+RDouble GridKDTree::ComputeVolumeBy4Ppoints(const RDouble &x1, const RDouble &y1, const RDouble &z1,
+    const RDouble &x2, const RDouble &y2, const RDouble &z2,
+    const RDouble &x3, const RDouble &y3, const RDouble &z3,
+    const RDouble &x4, const RDouble &y4, const RDouble &z4)
+{
+    RDouble xx1 = x2 - x1;
+    RDouble yy1 = y2 - y1;
+    RDouble zz1 = z2 - z1;
+    RDouble xx2 = x3 - x1;
+    RDouble yy2 = y3 - y1;
+    RDouble zz2 = z3 - z1;
+    RDouble xx3 = x4 - x1;
+    RDouble yy3 = y4 - y1;
+    RDouble zz3 = z4 - z1;
+
+    RDouble volume = xx1 * yy2 * zz3+ xx2 * yy3 * zz1+ xx3 * yy1 * zz2
+        - xx3 * yy2 * zz1- xx2 * yy1 * zz3- xx1 * yy3 * zz2;
+    return volume + SMALL;
+}
+
+RDouble GetToleranceForOversetSearch()
+{
+    return GlobalDataBase::GetDoubleParaFromDB("toleranceForOversetSearch");
+}
+
+}
\ No newline at end of file
diff --git a/Mesh/src/UnstructuredOversetConfig.cpp b/Mesh/src/UnstructuredOversetConfig.cpp
new file mode 100644
index 0000000..42c9870
--- /dev/null
+++ b/Mesh/src/UnstructuredOversetConfig.cpp
@@ -0,0 +1,4554 @@
+#include "UnstructuredOversetConfig.h"
+#include "Pre_WalldistCompute.h"
+#include "IO_FileName.h"
+#include "Glb_Dimension.h"
+#include "PHIO.h"
+#include "IO_HDF5File.h"
+#include "Region.h"
+#include "Task.h"
+#include "Task_ServerUpdateInterface.h"
+#include "OversetKDTree.h"
+using namespace std;
+
+namespace PHSPACE
+{
+
+OversetConfigFactoryMulti *oversetConfigFactory = NULL;
+
+Region *region;
+
+void RunOversetGridConfig()
+{
+    if (region == NULL)
+    {
+        region = new Region;
+    }
+
+    region->InitGridForOversetConfig();
+
+    RunUnstructuredOversetGridConfig();
+
+    //delete region;
+}
+
+void RunUnstructuredOversetGridConfig()
+{
+    ReConfigUnstructOversetGrid();
+
+    //OutUnstructOversetGridConfig();
+
+    FreeUnstructOversetGridConfig();
+}
+
+void InitializeOversetGridConfig()
+{
+    if (oversetConfigFactory == NULL)
+    {
+        oversetConfigFactory = new OversetConfigFactoryMulti();
+        oversetConfigFactory->Initialize();
+    }
+}
+
+void ReConfigUnstructOversetGrid()
+{
+    InitializeOversetGridConfig();
+
+    oversetConfigFactory->OversetConfigMulti();
+
+    int outTecplotOverset = GlobalDataBase::GetIntParaFromDB("outTecplotOverset");
+
+    if (outTecplotOverset == 1)
+    {
+        oversetConfigFactory->OutPutOversetFiles();
+    }
+}
+
+void OutUnstructOversetGridConfig()
+{
+    oversetConfigFactory->OutPutOversetFiles();
+}
+
+void FreeUnstructOversetGridConfig()
+{
+    if (oversetConfigFactory != NULL)
+    {
+        delete oversetConfigFactory;
+        oversetConfigFactory = NULL;
+    }
+}
+
+OversetConfigFactoryMulti *GetOversetConfigFactoryMulti()
+{
+    return oversetConfigFactory;
+}
+
+OversetConfigFactoryMulti::OversetConfigFactoryMulti()
+{
+    numberOfInterfaceNodesInBlocks = NULL;
+    keyOfInterfaceNodesInBlocks = NULL;
+
+    numberOfBlocks = 0;
+    numberOfZones = 0;
+
+    oversetConfigMultiZone = NULL;
+    zonesSearchNodes = NULL;
+    zonesInterpolateCells = NULL;
+
+    testTime = 0;
+    geometricDimension = GetDim();
+
+    pMinOfBlocks = NULL;
+    pMaxOfBlocks = NULL;
+}
+
+OversetConfigFactoryMulti::~OversetConfigFactoryMulti()
+{
+    delete[] numberOfInterfaceNodesInBlocks;
+    numberOfInterfaceNodesInBlocks = NULL;
+
+    DelPointer2(keyOfInterfaceNodesInBlocks);
+    keyOfInterfaceNodesInBlocks = NULL;
+
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessor == processorIndex)
+        {
+            if (oversetConfigMultiZone[iZone]) delete oversetConfigMultiZone[iZone];
+        }
+        delete zonesInterpolateCells[iZone];
+        zonesInterpolateCells[iZone] = NULL;
+    }
+
+    delete[] oversetConfigMultiZone;
+    delete[] zonesSearchNodes;
+    delete[] zonesInterpolateCells;
+
+    for (unsigned iBlock = 0; iBlock < innerGrid.size(); ++iBlock)
+    {
+        if (innerGrid[iBlock]) delete innerGrid[iBlock];
+    }
+    innerGrid.resize(0);
+}
+
+void OversetConfigFactoryMulti::Initialize()
+{
+    //TimeSpan *timeSpan = new TimeSpan();
+    if (GetIfOutPutOversetVisualization() == 1)
+    {
+        PHMakeDir("OversetOutput");
+    }
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    numberOfBlocks = PHSPACE::GlobalDataBase::GetIntParaFromDB("numberOfGridGroups");
+
+    numberOfZones = PHMPI::GetNumberofGlobalZones();
+    oversetConfigMultiZone = new OversetConfig * [numberOfZones];
+
+    //vector< RDouble > *wallNodeCoordinateX = new vector< RDouble >[this->numberOfZones];
+    //vector< RDouble > *wallNodeCoordinateY = new vector< RDouble >[this->numberOfZones];
+    //vector< RDouble > *wallNodeCoordinateZ = new vector< RDouble >[this->numberOfZones];
+    zonesSearchNodes = new ZoneSearchNodes * [numberOfZones];
+    zonesInterpolateCells = new InterCells * [numberOfZones];
+    for (int iZone = 0; iZone < this->numberOfZones; ++iZone)
+    {
+        oversetConfigMultiZone[iZone] = NULL;
+        zonesSearchNodes[iZone] = NULL;
+        zonesInterpolateCells[iZone] = NULL;
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+
+        if (currentProcessor == processorIndex)
+        {
+            OversetConfig *oversetGrid = new OversetConfig();
+
+            Grid *grid = GetGrid(iZone, 0);
+            UnstructGrid *gridUnstr = PHSPACE::UnstructGridCast(grid);
+            int iBlock = grid->GetIBlock();
+
+            oversetGrid->Initialize(gridUnstr, this->numberOfZones, iZone, iBlock);
+            oversetGrid->BuildBoundaryNodeList();
+            this->oversetConfigMultiZone[iZone] = oversetGrid;
+        }
+    }
+
+    //BuildNodesMinDistanceInThisBlocks(wallNodeCoordinateX, wallNodeCoordinateY, wallNodeCoordinateZ);               //! Minimum wall distance of nodes.
+    ComputeNodeWalldist();                 //! Minimum wall distance of nodes.
+
+    SetNodesMinDistanceInThisBlocksByWalldist();
+
+    ComputeNodeAndCellTopology();          //! Calculate the topological relationship of point to point and volume to point.
+
+    BuildLocalToGlobalInterfaceNodesMaps();
+
+    ReadInInnerGrid();                     //! Read in the internal grid of the object to accurately estimate whether it is in the object.
+
+    SetBufferRegionOnOversetBoundary();    //! Set buffer on the boundary of overset.
+    //timeSpan->ShowTimeSpanToLogfile("OversetConfigFactoryMulti::Initialize");
+    //delete timeSpan;
+    OutPutOversetVisualizations("0_1_Initialize");
+}
+
+void OversetConfigFactoryMulti::BuildLocalToGlobalInterfaceNodesMaps()
+{
+    int *numberOfNodesInBlocksLocal = new int[numberOfBlocks];
+    int *numberOfNodesInBlocks = new int[numberOfBlocks];
+    SetField(numberOfNodesInBlocksLocal, 0, numberOfBlocks);
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessor == processorIndex)
+        {
+            UnstructGrid *grid = oversetConfigMultiZone[iZone]->GetGrid();
+            numberOfNodesInBlocksLocal[grid->GetIBlock()] += grid->GetNTotalNode();
+        }
+    }
+    PH_AllReduce(numberOfNodesInBlocksLocal, numberOfNodesInBlocks, numberOfBlocks, MPI_SUM);
+    delete[] numberOfNodesInBlocksLocal;
+    numberOfNodesInBlocksLocal = NULL;
+
+    numberOfInterfaceNodesInBlocks = new int[numberOfBlocks];
+    SetField(numberOfInterfaceNodesInBlocks, 0, numberOfBlocks);
+    for (int iBlock = 0; iBlock < numberOfBlocks; ++ iBlock)
+    {
+        BuildLocalToGlobalInterfaceNodesMap(iBlock, numberOfNodesInBlocks);
+    }
+
+    delete[] numberOfNodesInBlocks;
+    numberOfNodesInBlocks = NULL;
+
+    keyOfInterfaceNodesInBlocks = NewPointer2< int >(numberOfBlocks, numberOfInterfaceNodesInBlocks);
+}
+
+void OversetConfigFactoryMulti::BuildLocalToGlobalInterfaceNodesMap(int iBlockIn, int *numberOfNodesInBlocksIn)
+{
+    int &numberOfNodesInThisBlock = numberOfNodesInBlocksIn[iBlockIn];
+
+    int *keyOfNodesInBlocks = new int[numberOfNodesInThisBlock];
+    int *keyOfNodesInBlocksGlobal = new int[numberOfNodesInThisBlock];
+    SetField(keyOfNodesInBlocks, 0, numberOfNodesInThisBlock);
+    SetField(keyOfNodesInBlocksGlobal, 0, numberOfNodesInThisBlock);
+
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessor == processorIndex)
+        {
+            UnstructGrid *grid = oversetConfigMultiZone[iZone]->GetGrid();
+            int blockIndex = grid->GetIBlock();
+            if (blockIndex == iBlockIn)
+            {
+                vector< int > &localToGlobalNodesMap = grid->GetLocalToGlobalNodesMap();
+                vector< int > &interfaceBoundaryNodeList = oversetConfigMultiZone[iZone]->GetInterfaceBoundaryNodeList();
+                int             numberOfinterfaceBoundaryNodes = static_cast<int>(interfaceBoundaryNodeList.size());
+                for (int iNode = 0; iNode < numberOfinterfaceBoundaryNodes; ++ iNode)
+                {
+                    keyOfNodesInBlocks[localToGlobalNodesMap[interfaceBoundaryNodeList[iNode]]] = 1;
+                }
+            }
+        }
+    }
+
+    PH_AllReduce(keyOfNodesInBlocks, keyOfNodesInBlocksGlobal, numberOfNodesInThisBlock, MPI_MAX);
+
+    for (int iNode = 0; iNode < numberOfNodesInThisBlock; ++ iNode)
+    {
+        if (keyOfNodesInBlocksGlobal[iNode])
+        {
+            keyOfNodesInBlocks[iNode] = (numberOfInterfaceNodesInBlocks[iBlockIn]) ++;
+        }
+    }
+
+    delete[] keyOfNodesInBlocksGlobal;
+    keyOfNodesInBlocksGlobal = NULL;
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessor == processorIndex)
+        {
+            UnstructGrid *grid = oversetConfigMultiZone[iZone]->GetGrid();
+            int blockIndex = grid->GetIBlock();
+            if (blockIndex == iBlockIn)
+            {
+                vector< int > &localToGlobalNodesMap = grid->GetLocalToGlobalNodesMap();
+                int *localToGlobalInterfaceNodesMap = oversetConfigMultiZone[iZone]->GetLocalToGlobalInterfaceNodesMap();
+                vector< int > &interfaceBoundaryNodeList = oversetConfigMultiZone[iZone]->GetInterfaceBoundaryNodeList();
+                int             numberOfinterfaceBoundaryNodes = static_cast<int>(interfaceBoundaryNodeList.size());
+
+                for (int iNode = 0; iNode < numberOfinterfaceBoundaryNodes; ++ iNode)
+                {
+                    localToGlobalInterfaceNodesMap[iNode] = keyOfNodesInBlocks[localToGlobalNodesMap[interfaceBoundaryNodeList[iNode]]];
+                }
+            }
+        }
+    }
+
+    delete[] keyOfNodesInBlocks;
+    keyOfNodesInBlocks = NULL;
+}
+
+void OversetConfigFactoryMulti::BuildNodesMinDistanceInThisBlocks(vector< RDouble > *&wallNodeCoordinateXIn,
+    vector< RDouble > *&wallNodeCoordinateYIn,
+    vector< RDouble > *&wallNodeCoordinateZIn)
+{
+    vector< RDouble > *wallNodeCoordinateXInBlocks = new vector< RDouble >[numberOfBlocks];
+    vector< RDouble > *wallNodeCoordinateYInBlocks = new vector< RDouble >[numberOfBlocks];
+    vector< RDouble > *wallNodeCoordinateZInBlocks = new vector< RDouble >[numberOfBlocks];
+
+    int blockIndexOfThisZone = 0;
+    int numberOfWallNodesInThisZones = 0;
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessor == processorIndex)
+        {
+            blockIndexOfThisZone = oversetConfigMultiZone[iZone]->GetGrid()->GetIBlock();
+            numberOfWallNodesInThisZones = static_cast<int>(wallNodeCoordinateXIn[iZone].size());
+        }
+        PHMPI::PH_Bcast(&numberOfWallNodesInThisZones, sizeof(int), processorIndex);
+
+        if (numberOfWallNodesInThisZones)
+        {
+            if (currentProcessor != processorIndex)
+            {
+                wallNodeCoordinateXIn[iZone].resize(numberOfWallNodesInThisZones);
+                wallNodeCoordinateYIn[iZone].resize(numberOfWallNodesInThisZones);
+                wallNodeCoordinateZIn[iZone].resize(numberOfWallNodesInThisZones);
+            }
+
+            PHMPI::PH_Bcast(& wallNodeCoordinateXIn[iZone][0], numberOfWallNodesInThisZones * sizeof(RDouble), processorIndex);
+            PHMPI::PH_Bcast(& wallNodeCoordinateYIn[iZone][0], numberOfWallNodesInThisZones * sizeof(RDouble), processorIndex);
+            PHMPI::PH_Bcast(& wallNodeCoordinateZIn[iZone][0], numberOfWallNodesInThisZones * sizeof(RDouble), processorIndex);
+
+            PHMPI::PH_Bcast(& blockIndexOfThisZone, sizeof(int), processorIndex);
+            for (int iNode = 0; iNode < numberOfWallNodesInThisZones; ++ iNode)
+            {
+                wallNodeCoordinateXInBlocks[blockIndexOfThisZone].push_back(wallNodeCoordinateXIn[iZone][iNode]);
+                wallNodeCoordinateYInBlocks[blockIndexOfThisZone].push_back(wallNodeCoordinateYIn[iZone][iNode]);
+                wallNodeCoordinateZInBlocks[blockIndexOfThisZone].push_back(wallNodeCoordinateZIn[iZone][iNode]);
+            }
+        }
+    }
+
+    delete[] wallNodeCoordinateXIn;
+    delete[] wallNodeCoordinateYIn;
+    delete[] wallNodeCoordinateZIn;
+    wallNodeCoordinateXIn = NULL;
+    wallNodeCoordinateYIn = NULL;
+    wallNodeCoordinateZIn = NULL;
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessor == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->BuildNodesMinDistanceInThisBlock(wallNodeCoordinateXInBlocks,
+                wallNodeCoordinateYInBlocks,
+                wallNodeCoordinateZInBlocks);
+        }
+    }
+
+    delete[] wallNodeCoordinateXInBlocks;
+    delete[] wallNodeCoordinateYInBlocks;
+    delete[] wallNodeCoordinateZInBlocks;
+    wallNodeCoordinateXInBlocks = NULL;
+    wallNodeCoordinateYInBlocks = NULL;
+    wallNodeCoordinateZInBlocks = NULL;
+}
+void OversetConfigFactoryMulti::SetNodesMinDistanceInThisBlocksByWalldist()
+{
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessor == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->SetNodesMinDistanceInThisBlocksByWalldist();
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::SetNodesMinDistanceInOtherBlocks()
+{
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessor == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->SetNodesMinDistanceInOtherBlocks();
+        }
+    }
+}
+
+bool OversetConfigFactoryMulti::ReadInInnerGridH5(const string &fileName, UnstructGrid *gridIn)
+{
+    bool HDF5FileRead = false;
+
+    fstream file;
+    OpenFile(file, fileName, ios_base::in | ios_base::binary);
+    int nZone;
+    int sizeInt = sizeof(int);
+    file.read((char *)&nZone, sizeInt);
+    CloseFile(file);
+
+    if (nZone <= static_cast <int> ( 1e8 ))
+    {
+        return HDF5FileRead;
+    }
+
+    hid_t h5File, grpGrid, grpData;
+    string grpName;
+    h5File = OpenHDF5File(fileName);
+
+    ostringstream oss;
+    oss << "Grid-" << "0";
+    grpName = oss.str();
+    grpGrid = OpenGroup(h5File, grpName);
+
+    int *iDimensions = ReadIntOneRow(grpGrid, "iDimensions");
+    gridIn->SetNTotalNode(iDimensions[0]);
+    gridIn->SetNTotalFace(iDimensions[1]);
+    gridIn->SetNTotalCell(iDimensions[2]);
+    delete[] iDimensions;
+
+    //! Read Grid Coordinates.
+    grpData = OpenGroup(grpGrid, "GridCoordinates");
+
+    RDouble *CoordinateX = ReadDoubleOneRow(grpData, "CoordinateX");
+    RDouble *CoordinateY = ReadDoubleOneRow(grpData, "CoordinateY");
+    RDouble *CoordinateZ = ReadDoubleOneRow(grpData, "CoordinateZ");
+    gridIn->SetX(CoordinateX);
+    gridIn->SetY(CoordinateY);
+    gridIn->SetZ(CoordinateZ);
+
+    gridIn->RotateAboutAxis();
+
+    gridIn->ComputeMinMaxBox();
+
+    H5Gclose(grpData);
+
+    //! Read Face Topology.
+    grpData = OpenGroup(grpGrid, "FaceTopology");
+
+    int *nodeNumberOfEachFace = ReadIntOneRow(grpData, "nodeNumberOfEachFace");
+    gridIn->SetNodeNumberOfEachFace(nodeNumberOfEachFace);
+
+    int *face2Node = ReadIntOneRow(grpData, "face2Node");
+    gridIn->SetFace2Node(face2Node);
+
+    int *leftCellOfFace = ReadIntOneRow(grpData, "leftCellOfFace");
+    int *rightCellOfFace = ReadIntOneRow(grpData, "rightCellOfFace");
+    gridIn->SetLeftCellOfFace(leftCellOfFace);
+    gridIn->SetRightCellOfFace(rightCellOfFace);
+
+    int nTotalFace = gridIn->GetNTotalFace();
+    int *nodePosi = new int[nTotalFace + 1];
+    int nodeSum = 0;
+    nodePosi[0] = 0;
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        nodeSum += nodeNumberOfEachFace[iFace];
+        nodePosi[iFace + 1] = nodeSum;
+    }
+
+    for (int iFace = 0; iFace < nTotalFace; ++ iFace)
+    {
+        if (leftCellOfFace[iFace] < 0)
+        {
+            std::reverse(face2Node + nodePosi[iFace], face2Node + nodePosi[iFace + 1]);
+            SWAP(leftCellOfFace[iFace], rightCellOfFace[iFace]);
+        }
+    }
+    delete[] nodePosi;
+
+    int nBoundFace = 0;
+    ReadData(grpData, &nBoundFace, "nBoundFace");
+    gridIn->SetNBoundFace(nBoundFace);
+
+    int *BcType = ReadIntOneRow(grpData, "BcType");
+    UnstructBCSet **bcr = new UnstructBCSet * [nBoundFace];
+    for (int iFace = 0; iFace < nBoundFace; ++ iFace)
+    {
+        bcr[iFace] = new UnstructBCSet();
+        bcr[iFace]->SetKey(BcType[iFace]);
+    }
+    gridIn->SetBCRecord(bcr);
+    delete[] BcType;
+
+    gridIn->SpecifyRightCellofBC();
+
+    H5Gclose(grpData);
+
+    //! Read Interface Info.
+    grpData = OpenGroup(grpGrid, "InterfaceInfo");
+
+    InterfaceInfo *interfaceInfo = 0;
+    gridIn->SetInterfaceInfo(interfaceInfo);
+
+    int nIFace = 0;
+    ReadData(grpData, &nIFace, "nIFace");
+
+    if (nIFace > 0)
+    {
+        interfaceInfo = new InterfaceInfo(nIFace, gridIn);
+        gridIn->SetInterfaceInfo(interfaceInfo);
+
+        int *interFace2ZoneID = interfaceInfo->GetInterFace2ZoneID();
+        int *interFace2InterFaceID = interfaceInfo->GetInterFace2InterFaceID();
+        int *interFace2BoundaryFace = interfaceInfo->GetInterFace2BoundaryFace();
+
+        int *interFace2ZoneIDTemp = ReadIntOneRow(grpData, "interFace2ZoneID");
+        int *interFace2InterFaceIDTemp = ReadIntOneRow(grpData, "interFace2InterFaceID");
+        int *interFace2BoundaryFaceTemp = ReadIntOneRow(grpData, "interFace2BoundaryFace");
+
+        for (int iFace = 0; iFace < nIFace; ++ iFace)
+        {
+            interFace2ZoneID[iFace] = interFace2ZoneIDTemp[iFace];
+            interFace2InterFaceID[iFace] = interFace2InterFaceIDTemp[iFace];
+            interFace2BoundaryFace[iFace] = interFace2BoundaryFaceTemp[iFace];
+        }
+
+        delete[] interFace2ZoneIDTemp;
+        delete[] interFace2InterFaceIDTemp;
+        delete[] interFace2BoundaryFaceTemp;
+    }
+
+    H5Gclose(grpData);
+
+    //! Read Cell Topology.
+    grpData = OpenGroup(grpGrid, "CellTopology");
+
+    int *cell2Node = ReadIntOneRow(grpData, "cell2Node");
+    int *nodeNumberOfEachCell = ReadIntOneRow(grpData, "nodeNumberOfEachCell");
+
+    gridIn->SetNodeNumberOfEachCell(nodeNumberOfEachCell);
+    gridIn->SetCell2Node(cell2Node);
+
+    H5Gclose(grpData);
+
+    //! Read Unstr BCName.
+    grpData = OpenGroup(grpGrid, "BCName");
+
+    char *BCName = ReadCharData(grpData, "BCName");
+
+    int nBFaces = gridIn->GetNBoundFace();
+    string *BCNameList = new string[nBFaces];
+    uint_long count = 0;
+    for (int iFace = 0; iFace < nBFaces; ++ iFace)
+    {
+        while (BCName[count] != '\0')
+        {
+            BCNameList[iFace].push_back(BCName[count]);
+            ++count;
+        }
+        ++count;
+    }
+
+    for (int iFace = 0; iFace < nBFaces; ++ iFace)
+    {
+        bcr[iFace]->SetBCName(BCNameList[iFace]);
+    }
+
+    delete[] BCNameList;
+    delete[] BCName;
+    H5Gclose(grpData);
+
+    H5Gclose(grpGrid);
+    H5Fclose(h5File);
+
+    HDF5FileRead = true;
+    return HDF5FileRead;
+}
+
+void OversetConfigFactoryMulti::ReadInInnerGrid()
+{
+    if (GetReadInAuxiliaryInnerGrid() != 1)
+    {
+        return;
+    }
+
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    int serverProcessor = PHMPI::GetServerSepMode();
+
+    innerGrid.resize(numberOfBlocks);
+
+    for (int iBlock = 0; iBlock < numberOfBlocks; ++iBlock)
+    {
+        ostringstream oss;
+
+        oss << "auxiliaryInnerGrid" << iBlock;
+
+        int fileID = PHMPI::GetFileIndexofCurrentProcessor();
+        string fileName = AddSymbolToFileName(GlobalDataBase::GetStrParaFromDB(oss.str()), "_", fileID);
+
+        if (!FileExist(fileName))
+        {
+            innerGrid[iBlock] = NULL;
+            continue;
+        }
+
+        UnstructGrid *grid = new UnstructGrid();
+        grid->InitGrid(new GridID(0, 0), 0, GetDim(), UNSTRUCTGRID);
+        innerGrid[iBlock] = grid;
+        innerGrid[iBlock]->SetIBlock(iBlock);
+
+        bool fileIsH5File = false;
+        fileIsH5File = ReadInInnerGridH5(fileName, grid);
+        if (fileIsH5File)
+        {
+            //ostringstream oss;
+            //oss << "./results/auxiliaryInnerGrid" << iBlock;
+            //string fileName = oss.str();
+            //
+            //innerGrid[iBlock] ->Output(fileName);
+            continue;
+        }
+
+        fstream file;
+
+        DataContainer *dataContainer = new DataContainer;
+
+        if (currentProcessor == serverProcessor)
+        {
+            cout << "Read in auxiliary inner grid" << fileName << endl;
+
+            OpenFile(file, fileName, ios_base::in | ios_base::binary);
+
+            int numberOfZones;
+
+            vector < int > zoneProcessorIndexContainer;
+            vector < int > zoneIndexContainer;
+            vector < int > zoneTypeContainer;
+
+            PHRead(file, numberOfZones);
+
+            zoneProcessorIndexContainer.resize(numberOfZones);
+            zoneIndexContainer.resize(numberOfZones);
+            zoneTypeContainer.resize(numberOfZones);
+
+            PHRead(file, zoneProcessorIndexContainer, numberOfZones);
+            PHRead(file, zoneIndexContainer, numberOfZones);
+            PHRead(file, zoneTypeContainer, numberOfZones);
+
+            dataContainer->readfile(file);
+
+            CloseFile(file);
+        }
+
+        int tag = 0;
+
+        PHMPI::PH_BcastByServerSepMode(dataContainer, tag);
+
+        innerGrid[iBlock]->Decode(dataContainer, 0);
+
+        delete dataContainer;
+    }
+}
+
+void OversetConfigFactoryMulti::ComputeNodeWalldist()
+{
+    int walldistMethod = 3;
+
+    int level = 0;
+
+    Pre_WalldistCompute *wallDistCompute = new Pre_WalldistCompute(walldistMethod, level);
+
+    wallDistCompute->ComputeNodeDistance();
+
+    delete wallDistCompute;
+}
+
+void OversetConfigFactoryMulti::ComputeNodeWalldistInOtherBlock()
+{
+    int walldistMethod = 3;
+
+    int level = 0;
+
+    Pre_WalldistCompute *wallDistCompute = new Pre_WalldistCompute(walldistMethod, level);
+
+    wallDistCompute->ComputeNodeDistanceInOtherBlock();
+
+    delete wallDistCompute;
+}
+
+void OversetConfigFactoryMulti::ComputeNodeAndCellTopology()
+{
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessor == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->ComputeNodeAndCellTopology();
+        }
+    }
+}
+
+//! Get the overall globalInterfaceNodes according to the localToGlobalNodeList information of each zone.
+void OversetConfigFactoryMulti::GetGlobalInterfaceNodes()
+{
+    if (numberOfZones == numberOfBlocks)
+    {
+        return;
+    }
+
+    for (int iBlock = 0; iBlock < numberOfBlocks; ++ iBlock)
+    {
+        GetGlobalInterfaceNodes(iBlock);
+    }
+}
+
+void OversetConfigFactoryMulti::GetGlobalInterfaceNodes(int iBlock)
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+
+    //! step1: Distinguish globalInterNodes.
+    vector< int > keyNodesGlobal;
+    vector< int > keyNodesGlobalAllProcessor;
+
+    int numberOfNodesInThisBlock = numberOfGlobalNodes[iBlock];
+
+    keyNodesGlobal.resize(numberOfNodesInThisBlock);
+    keyNodesGlobalAllProcessor.resize(numberOfNodesInThisBlock);
+
+    SetField(keyNodesGlobal, 0, numberOfNodesInThisBlock);
+    SetField(keyNodesGlobalAllProcessor, 0, numberOfNodesInThisBlock);
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int sendProcessorIndex = PHMPI::GetZoneProcessorIDSepMode(iZone);
+        if (currentProcessorIndex == sendProcessorIndex)
+        {
+            oversetConfigMultiZone[iZone]->MarkGlobalInterfaceNodes(iBlock, keyNodesGlobal);
+        }
+    }
+
+    PH_AllreduceSepModeForVector(keyNodesGlobal, keyNodesGlobalAllProcessor, numberOfNodesInThisBlock, MPI_INT, MPI_MAX);
+
+    //! step2��keyNodesGlobal becomes the number which points to the new sequence.
+    int numberOfGlobalInterfaceNodes = 0;
+    for (int iNode = 0; iNode < numberOfNodesInThisBlock; ++ iNode)
+    {
+        if (keyNodesGlobalAllProcessor[iNode] == 1)
+        {
+            keyNodesGlobal[iNode] = numberOfGlobalInterfaceNodes;
+            numberOfGlobalInterfaceNodes++;
+        }
+    }
+
+    //! step3��Get localToGlobalInterfaceNodes.
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int sendProcessorIndex = PHMPI::GetZoneProcessorIDSepMode(iZone);
+        if (currentProcessorIndex == sendProcessorIndex)
+        {
+            oversetConfigMultiZone[iZone]->CalLocalToGlobalInterfaceNodes(iBlock, keyNodesGlobal);
+        }
+    }
+
+    keyActiveOfGlobalInterNodes[iBlock].resize(numberOfGlobalInterfaceNodes);
+    SetField(&keyActiveOfGlobalInterNodes[iBlock][0], 0, numberOfGlobalInterfaceNodes);
+}
+
+void OversetConfigFactoryMulti::OversetConfigMulti()
+{
+    SetInitialValue();    //! Set initial value.
+
+    NodesOperator();
+
+    CellsOperator();
+}
+
+void OversetConfigFactoryMulti::SpecifyCellsInBodyByAuxiliaryInnerGrid()
+{
+    //TimeSpan *timeSpan = new TimeSpan();
+    vector< GridKDTree * > innerAuxiliaryGridKDTrees;
+
+    innerAuxiliaryGridKDTrees.resize(numberOfBlocks);
+
+    //! step1��Interal grid establishment ADT-Tree.
+    for (int iBlock = 0; iBlock < numberOfBlocks; ++iBlock)
+    {
+        //! Set CurrentActionKey to 0, avoid unnecessary error in ComputMetrices.
+        PHSPACE::SetCurrentActionKey(0);
+
+        if (innerGrid[iBlock])
+        {
+            innerGrid[iBlock]->ComputeMetrics();
+            innerAuxiliaryGridKDTrees[iBlock] = new GridKDTree(innerGrid[iBlock]);
+        }
+        else
+        {
+            innerAuxiliaryGridKDTrees[iBlock] = NULL;
+        }
+    }
+
+    BuildInBlockCellsAndNodesByInnerAuxiliaryGridKDTrees(innerAuxiliaryGridKDTrees);
+
+    for (int iBlock = 0; iBlock < numberOfBlocks; ++iBlock)
+    {
+        if (innerAuxiliaryGridKDTrees[iBlock] != 0)
+        {
+            delete innerAuxiliaryGridKDTrees[iBlock];
+        }
+    }
+    //timeSpan->ShowTimeSpanToLogfile("SpecifyCellsInBodyByAuxiliaryInnerGrid");
+    //delete timeSpan;
+    OutPutOversetVisualizations("1_3_BuildInBlockCellsAndNodes");
+}
+
+void OversetConfigFactoryMulti::BuildInBlockCellsAndNodesByInnerAuxiliaryGridKDTrees(vector< GridKDTree * > &innerAuxiliaryGridKDTreesIn)
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->BuildInBlockCellsAndNodesByInnerAuxiliaryGridKDTree(innerAuxiliaryGridKDTreesIn);
+        }
+    }
+}
+
+//! Expand a row of active points, points in the innerBody and buffer are set to inactive.
+void OversetConfigFactoryMulti::InterFaceBoundaryOptimize()
+{
+    //TimeSpan *timeSpan = new TimeSpan();
+    int twoOrderInterpolationOrNot = GetTwoOrderInterpolationOrNot() + 1;
+
+    for (int iter = 0; iter < twoOrderInterpolationOrNot; ++ iter)
+    {
+        CharacterNodeToCell();
+        CharacterCellToNode();
+        //SetNegativeForInnerAndInitialInterNodes();
+        SetNegativeForInnerNodes();
+    }
+
+    //! Points in buffer are set to inactive.
+    SetNegativeForBufferRegion();
+
+    //timeSpan->ShowTimeSpanToLogfile("InterFaceBoundaryOptimize");
+    //delete timeSpan;
+    OutPutOversetVisualizations("1_5_InterFaceBoundaryOptimize");
+}
+
+void OversetConfigFactoryMulti::SetNegativeForInnerNodes()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->SetNegativeForInnerNodes();
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::SetNegativeForInnerAndInitialInterNodes()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->SetNegativeForInnerAndInitialInterNodes();
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::NodesOperator()
+{
+    BuildNodesMinDistanceInOtherBlocks();
+
+    if (GetReadInAuxiliaryInnerGrid() == 1)
+    {
+        SpecifyCellsInBodyByAuxiliaryInnerGrid();
+    }
+    else
+    {
+        SpecifySpecicalCellsInteractWithWallBoundary();
+    }
+
+    SpecifyInitialInterNodesByDistance();
+
+    FillTheActiveRegion();          //! Physical boundary advancement.
+
+    InterFaceBoundaryOptimize();    //! Hole boundary optimization (expand active areas).
+}
+
+void OversetConfigFactoryMulti::ReComputeWallDistance()
+{
+    int numberOfMovingBodies = GlobalDataBase::GetIntParaFromDB("numberOfMovingBodies");
+
+    int key = 0;
+
+    for (int iBody = 0; iBody < numberOfMovingBodies; ++iBody)
+    {
+        ostringstream oss;
+
+        oss << "morphing_" << iBody;
+
+        int morphingManner = GlobalDataBase::GetIntParaFromDB(oss.str());
+
+        if (morphingManner != 0)
+        {
+            key = 1;
+            break;
+        }
+    }
+
+    //! No need to solve the wall distance again if the overall objects don't deform.
+    if (key == 0)
+    {
+        return;
+    }
+
+    ComputeNodeWalldist();
+}
+
+void OversetConfigFactoryMulti::BuildNodesMinDistanceInOtherBlocks()
+{
+    //TimeSpan *timeSpan = new TimeSpan();
+    BuildKDTreesBySearchRegions();
+
+    BuildNodesMinDistanceInOtherBlocksByKDTrees();
+    //timeSpan->ShowTimeSpanToLogfile("BuildNodesMinDistanceInOtherBlocks");
+    //delete timeSpan;
+    OutPutOversetVisualizations("1_1_BuildNodesMinDistanceInOtherBlocks");
+}
+
+void OversetConfigFactoryMulti::BuildNodesMinDistanceInOtherBlocks2()
+{
+    //TimeSpan *timeSpan = new TimeSpan();
+    //timeSpan->ShowTimeSpanToLogfile("BuildNodesMinDistanceInOtherBlocks");
+    //delete timeSpan;
+    BuildKDTreesBySearchRegions();
+
+    BuildZonesSearchNodes();
+
+    ComputeNodeWalldistInOtherBlock();
+
+    SetNodesMinDistanceInOtherBlocks();
+
+    OutPutOversetVisualizations("1_1_BuildNodesMinDistanceInOtherBlocks");
+}
+
+void OversetConfigFactoryMulti::BuildNodesMinDistanceInOtherBlocksByKDTrees()
+{
+    //TimeSpan *timeSpan = new TimeSpan();
+    BuildZonesSearchNodes();
+    //timeSpan->ShowTimeSpan("BuildZonesSearchNodes ");
+    //delete timeSpan;
+
+    //timeSpan = new TimeSpan();
+    SearchZonesSearchNodesInKDTrees();
+    //timeSpan->ShowTimeSpan("SearchZonesSearchNodesInKDTrees ");
+    //delete timeSpan;
+
+    AllReduceNodesMinDistanceInOtherBlock();
+
+    SetNodesMinDistanceInOtherBlockByZonesNodes();
+}
+
+void OversetConfigFactoryMulti::SearchZonesSearchNodesInKDTrees()
+{
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessor == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->SearchZonesSearchNodesInKDTree();
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::AllReduceNodesMinDistanceInOtherBlock()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        ZoneSearchNodes *&zoneSearchNodes = zonesSearchNodes[iZone];
+        int numberOfNodes = zoneSearchNodes->GetNumberOfNodes();
+        RDouble *nodesMinDistanceToOtherBlock = zoneSearchNodes->GetNodesMinDistanceToOtherBlock();
+
+        if (numberOfNodes)
+        {
+            RDouble *nodesMinDistanceInOtherBlockGlobal = new RDouble[numberOfNodes];
+
+            PH_AllReduce(nodesMinDistanceToOtherBlock, nodesMinDistanceInOtherBlockGlobal, numberOfNodes, PH_MIN);
+
+            SetField(nodesMinDistanceToOtherBlock, nodesMinDistanceInOtherBlockGlobal, numberOfNodes);
+
+            delete[] nodesMinDistanceInOtherBlockGlobal;
+            nodesMinDistanceInOtherBlockGlobal = NULL;
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::SetNodesMinDistanceInOtherBlockByZonesNodes()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        ZoneSearchNodes *&zoneSearchNodes = zonesSearchNodes[iZone];
+        if (currentProcessorIndex == processorIndex)
+        {
+            RDouble *nodesMinDistanceToOtherBlock = zoneSearchNodes->GetNodesMinDistanceToOtherBlock();
+            oversetConfigMultiZone[iZone]->CopyMinDist(nodesMinDistanceToOtherBlock);
+        }
+        delete zonesSearchNodes[iZone];
+        zonesSearchNodes[iZone] = NULL;
+    }
+}
+
+void OversetConfigFactoryMulti::CellsOperator()
+{
+    FindActiveCells();    //! Identify active cells.
+
+    FindInterCells();     //! Identify interpolation type.
+
+    BuildInterpolateRelationships();
+
+    CheckInterpolateRelationships();
+
+    ResetOversetInformation();    //! Rebuild interpolation information.
+}
+
+void OversetConfigFactoryMulti::SetInitialValue()
+{
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessor == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->SetInitialValue();
+        }
+        if (NULL != zonesInterpolateCells[iZone])
+        {
+            delete zonesInterpolateCells[iZone];
+            zonesInterpolateCells[iZone] = NULL;
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::CalMinBoxForSearch()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->BuildMinMaxBoxOfZoneBySearchRegion();
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::SetBufferRegionOnOversetBoundary()
+{
+    //! Query physical boundary points and overset boundary points.
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessor == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->SetInitialValueForBufferRigion();
+        }
+    }
+
+    CharacterNodeToCell();    //! A row of points and cells are left in the buffer.
+    //! Increase the interpolation area to improve the reconstruction accuracy of interpolation cells, two row of points and cells will be left in the buffer (There's no necessary actually).
+    int keyEnlargeOfActiveNodes = GetKeyEnlargeOfNodes();
+    for (int iter = 0; iter < keyEnlargeOfActiveNodes; ++ iter)
+    {
+        CharacterCellToNode();
+
+        CharacterNodeToCell();
+    }
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessor == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->SetKeyBufferByKeyActive();
+        }
+    }
+}
+
+//! Identify searchRegion, starting from search point and expand twice.
+//! Identify search point by judging whether it's in other blocks.
+void OversetConfigFactoryMulti::BuildKDTreesBySearchRegions()
+{
+    //TimeSpan *timeSpan = new TimeSpan();
+    BuildMinMaxBoxOfBlocks();
+
+    SetActivePropertyForSearchRegions();
+
+    //! Why the value is 2 (Ensure that searchRegion covers all blocks except this block).
+
+    for (int i = 0; i < 2; ++ i)
+    {
+        CharacterNodeToCell();
+
+        CharacterCellToNode();
+    }
+
+    SetSearchRegionByActivePropertys();
+
+    BuildMinMaxBoxOfZoneBySearchRegions();
+
+    //TimeSpan *timeSpan = new TimeSpan();
+    BuildKDTreeByMinMaxBoxOfZones();
+    //timeSpan->ShowTimeSpan("BuildKDTreeByMinMaxBoxOfZones");
+    //delete timeSpan;
+}
+
+void OversetConfigFactoryMulti::SetActivePropertyForSearchRegions()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->SetActivePropertyForSearchRegion();
+        }
+    }
+    DelPointer2(pMinOfBlocks);
+    DelPointer2(pMaxOfBlocks);
+    pMinOfBlocks = NULL;
+    pMaxOfBlocks = NULL;
+}
+
+void OversetConfigFactoryMulti::SetSearchRegionByActivePropertys()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->SetSearchRegionByActiveProperty();
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::BuildMinMaxBoxOfZoneBySearchRegions()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->BuildMinMaxBoxOfZoneBySearchRegion();
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::BuildKDTreeByMinMaxBoxOfZones()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->BuildKDTreeByMinMaxBoxOfZone();
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::BuildMinMaxBoxOfBlocks()
+{
+    pMinOfBlocks = NewPointer2< RDouble >(numberOfBlocks, geometricDimension);
+    pMaxOfBlocks = NewPointer2< RDouble >(numberOfBlocks, geometricDimension);
+    RDouble **minBoxOfBlocksLocal = NewPointer2< RDouble >(numberOfBlocks, geometricDimension);
+    RDouble **maxBoxOfBlocksLocal = NewPointer2< RDouble >(numberOfBlocks, geometricDimension);
+
+    for (int iBlock = 0; iBlock < numberOfBlocks; ++iBlock)
+    {
+        SetField(pMinOfBlocks[iBlock], LARGE, geometricDimension);
+        SetField(pMaxOfBlocks[iBlock], -LARGE, geometricDimension);
+        SetField(minBoxOfBlocksLocal[iBlock], LARGE, geometricDimension);
+        SetField(maxBoxOfBlocksLocal[iBlock], -LARGE, geometricDimension);
+    }
+
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->BuildMinMaxBoxOfZone();
+
+            RDouble *minBoxOfZone = oversetConfigMultiZone[iZone]->GetPMin();
+            RDouble *maxBoxOfZone = oversetConfigMultiZone[iZone]->GetPMax();
+            int blockIndex = oversetConfigMultiZone[iZone]->GetGrid()->GetIBlock();
+            for (int iDimension = 0; iDimension < geometricDimension; ++iDimension)
+            {
+                RDouble &minInThisDimension = minBoxOfBlocksLocal[blockIndex][iDimension];
+                RDouble &maxInThisDimension = maxBoxOfBlocksLocal[blockIndex][iDimension];
+                minInThisDimension = MIN(minInThisDimension, minBoxOfZone[iDimension]);
+                maxInThisDimension = MAX(maxInThisDimension, maxBoxOfZone[iDimension]);
+            }
+        }
+    }
+
+    RDouble eps = GetToleranceForOversetBox();
+    for (int iBlock = 0; iBlock < numberOfBlocks; ++iBlock)
+    {
+        PH_AllReduce(minBoxOfBlocksLocal[iBlock], pMinOfBlocks[iBlock], geometricDimension, PH_MIN);
+        PH_AllReduce(maxBoxOfBlocksLocal[iBlock], pMaxOfBlocks[iBlock], geometricDimension, PH_MAX);
+
+        for (int iDimension = 0; iDimension < geometricDimension; ++iDimension)
+        {
+            pMinOfBlocks[iBlock][iDimension] -= eps;
+            pMaxOfBlocks[iBlock][iDimension] += eps;
+        }
+    }
+
+    DelPointer2(minBoxOfBlocksLocal);
+    DelPointer2(maxBoxOfBlocksLocal);
+    minBoxOfBlocksLocal = NULL;
+    maxBoxOfBlocksLocal = NULL;
+}
+
+void OversetConfigFactoryMulti::BuildZonesSearchNodes()
+{
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        int *keySearchOfNodes = NULL;
+        int   numberOfNodes = 0;
+
+        int   blockIndex = 0;
+        int   numberOfSearchNodes = 0;
+
+        if (currentProcessor == processorIndex)
+        {
+            keySearchOfNodes = oversetConfigMultiZone[iZone]->GetKeySearchOfNodes();
+            numberOfNodes = oversetConfigMultiZone[iZone]->GetGrid()->GetNTotalNode();
+
+            blockIndex = oversetConfigMultiZone[iZone]->GetGrid()->GetIBlock();
+
+            for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+            {
+                if (keySearchOfNodes[iNode])
+                {
+                    ++ numberOfSearchNodes;
+                }
+            }
+        }
+
+        PHMPI::PH_Bcast(&numberOfSearchNodes, sizeof(int), processorIndex, 1);
+
+        PHMPI::PH_Bcast(&blockIndex, sizeof(int), processorIndex, 1);
+
+        if(zonesSearchNodes[iZone])
+        {
+            delete zonesSearchNodes[iZone];
+            zonesSearchNodes[iZone] = NULL;
+        }
+        zonesSearchNodes[iZone] = new ZoneSearchNodes(numberOfSearchNodes, blockIndex);
+
+        RDouble *minBoxOfZoneSearchNodes = zonesSearchNodes[iZone]->GetPMin();
+        RDouble *maxBoxOfZoneSearchNodes = zonesSearchNodes[iZone]->GetPMax();
+
+        if (currentProcessor == processorIndex)
+        {
+            RDouble *minBoxOfZone = oversetConfigMultiZone[iZone]->GetPMin();
+            RDouble *maxBoxOfZone = oversetConfigMultiZone[iZone]->GetPMax();
+
+            SetField(minBoxOfZoneSearchNodes, minBoxOfZone, geometricDimension);
+            SetField(maxBoxOfZoneSearchNodes, maxBoxOfZone, geometricDimension);
+        }
+        PHMPI::PH_Bcast(minBoxOfZoneSearchNodes, geometricDimension * sizeof(RDouble), processorIndex);
+        PHMPI::PH_Bcast(maxBoxOfZoneSearchNodes, geometricDimension * sizeof(RDouble), processorIndex);
+
+        if (numberOfSearchNodes)
+        {
+            RDouble *searchNodeCoordinateX = zonesSearchNodes[iZone]->GetX();
+            RDouble *searchNodeCoordinateY = zonesSearchNodes[iZone]->GetY();
+            RDouble *searchNodeCoordinateZ = zonesSearchNodes[iZone]->GetZ();
+
+            if (currentProcessor == processorIndex)
+            {
+                RDouble *nodeCoordinateX = oversetConfigMultiZone[iZone]->GetGrid()->GetX();
+                RDouble *nodeCoordinateY = oversetConfigMultiZone[iZone]->GetGrid()->GetY();
+                RDouble *nodeCoordinateZ = oversetConfigMultiZone[iZone]->GetGrid()->GetZ();
+
+                numberOfSearchNodes = 0;
+
+                for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+                {
+                    if (keySearchOfNodes[iNode])
+                    {
+                        searchNodeCoordinateX[numberOfSearchNodes] = nodeCoordinateX[iNode];
+                        searchNodeCoordinateY[numberOfSearchNodes] = nodeCoordinateY[iNode];
+                        searchNodeCoordinateZ[numberOfSearchNodes] = nodeCoordinateZ[iNode];
+
+                        ++numberOfSearchNodes;
+                    }
+                }
+            }
+            PHMPI::PH_Bcast(searchNodeCoordinateX, numberOfSearchNodes * sizeof(RDouble), processorIndex);
+            PHMPI::PH_Bcast(searchNodeCoordinateY, numberOfSearchNodes * sizeof(RDouble), processorIndex);
+            PHMPI::PH_Bcast(searchNodeCoordinateZ, numberOfSearchNodes * sizeof(RDouble), processorIndex);
+        }
+    }
+    MPI_Barrier(MPI_COMM_WORLD);
+}
+
+void OversetConfigFactoryMulti::SpecifyInitialInterNodesByDistance()
+{
+    //TimeSpan *timeSpan = new TimeSpan();
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->SpecifyInitialInterNodesByDistance();
+        }
+    }
+    //timeSpan->ShowTimeSpanToLogfile("SpecifyInitialInterNodesByDistance");
+    //delete timeSpan;
+    OutPutOversetVisualizations("1_2_BuildKeyBasicActiveNodesByDistances");
+}
+
+void OversetConfigFactoryMulti::SpecifySpecicalCellsInteractWithWallBoundary()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->SpecifySpecicalCellsInteractWithWallBoundary();
+        }
+    }
+    OutPutOversetVisualizations("1_3_BuildInBlockCellsAndNodes");
+}
+
+void OversetConfigFactoryMulti::FillTheActiveRegion()
+{
+    int numberOfNewNodesPresentCycle = 0;
+    int sum = 0;
+
+    SetNodeCharacterOnPhysicalBoundary();
+    do
+    {
+        numberOfNewNodesPresentCycle = CharacterNodeToValidNodeByCell();
+
+        //! mpi_reduce.
+        PH_AllReduce(&numberOfNewNodesPresentCycle, &sum, 1, PH_SUM);
+        numberOfNewNodesPresentCycle = sum;
+
+    } while (numberOfNewNodesPresentCycle > 0);
+
+    FreeKeyBasicActiveNodes();
+
+    OutPutOversetVisualizations("1_4_BuildActiveRegion");
+}
+
+void OversetConfigFactoryMulti::SetNodeCharacterOnPhysicalBoundary()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->SetNodeCharacterOnPhysicalBoundary();
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::SetNegativeForBufferRegion()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->SetNegativeForBufferRegion();
+        }
+    }
+}
+void OversetConfigFactoryMulti::BuildInterpolateRelationships()
+{
+    CreatGlobalInterCells();
+
+    FindInterpolateRelationships();
+
+    AllReduceZonesInterpolateCells();
+}
+
+void OversetConfigFactoryMulti::FindInterpolateRelationships()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->FindInterpolateRelationship();
+        }
+    }
+}
+
+void OversetConfig::FindInterpolateRelationship()
+{
+    RDouble *nodeCoordinate = new RDouble[THREE_D];
+    int *keyActiveOfCells = this->GetKeyActiveOfCells();
+
+    int blockIndex = grid->GetIBlock();
+    int zoneIndex = grid->GetZoneID();
+    InterCells **zonesInterpolateCells = GetOversetConfigFactoryMulti()->GetZonesInterpolateCells();
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        InterCells *&zoneInterpolateCells = zonesInterpolateCells[iZone];
+
+        if (blockIndex != zoneInterpolateCells->GetBlockIndex())
+        {
+            int numberOfInterpolateCells = zoneInterpolateCells->GetNumberOfInterCells();
+
+            RDouble *interpolateCellCenterX = zoneInterpolateCells->GetX();
+            RDouble *interpolateCellCenterY = zoneInterpolateCells->GetY();
+            RDouble *interpolateCellCenterZ = zoneInterpolateCells->GetZ();
+
+            int *donorZoneIndex = zoneInterpolateCells->GetDonorZoneIndex();
+            int *donorCellIndex = zoneInterpolateCells->GetDonorCellIndex();
+
+            int *donorLevel = zoneInterpolateCells->GetKey();
+            RDouble *cellMinDistance = zoneInterpolateCells->GetMinDist();
+
+            for (int iCell = 0; iCell < numberOfInterpolateCells; ++iCell)
+            {
+                nodeCoordinate[0] = interpolateCellCenterX[iCell];
+                nodeCoordinate[1] = interpolateCellCenterY[iCell];
+                nodeCoordinate[2] = interpolateCellCenterZ[iCell];
+
+                int donorCellIndexOfThisCell = gridKDTree->SearchNodeInKDTree(nodeCoordinate);
+
+                if (donorCellIndexOfThisCell != -1)
+                {
+                    int donorLevelNow = -3;
+
+                    int &donorLevelOfThisCell = donorLevel[iCell];
+                    RDouble &cellMinDistanceOfThisCell = cellMinDistance[iCell];
+
+                    switch (keyActiveOfCells[donorCellIndexOfThisCell])
+                    {
+                    case -1:
+                        donorLevelNow = -1;
+                        break;
+                    case   0:
+                        donorLevelNow = -2;
+                        break;
+                    case   1:
+                        donorLevelNow = 1;
+                        break;
+                    }
+
+                    if (donorLevelNow > donorLevelOfThisCell)
+                    {
+                        donorLevelOfThisCell = donorLevelNow;
+                        cellMinDistanceOfThisCell = ComputeDistanceInDonorZone(nodeCoordinate, donorCellIndexOfThisCell);
+                        donorZoneIndex[iCell] = zoneIndex;
+                        donorCellIndex[iCell] = donorCellIndexOfThisCell;
+                    }
+                    else if (donorLevelNow == donorLevelOfThisCell)
+                    {
+                        RDouble cellMinDistanceNow = ComputeDistanceInDonorZone(nodeCoordinate, donorCellIndexOfThisCell);
+                        if (cellMinDistanceNow < cellMinDistanceOfThisCell)
+                        {
+                            cellMinDistanceOfThisCell = cellMinDistanceNow;
+                            donorZoneIndex[iCell] = zoneIndex;
+                            donorCellIndex[iCell] = donorCellIndexOfThisCell;
+                        }
+                    }
+                }
+            }
+        }
+    }
+
+    delete gridKDTree;
+    gridKDTree = NULL;
+
+    delete[] minBoxOfZone;
+    delete[] maxBoxOfZone;
+
+    minBoxOfZone = NULL;
+    maxBoxOfZone = NULL;
+
+    delete[] nodeCoordinate;
+    nodeCoordinate = NULL;
+}
+
+void OversetConfigFactoryMulti::CreatGlobalInterCells()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int   blockIndex = 0;
+        int   numberOfInterpolateCells = 0;
+
+        int zoneProcessorIndexOfThisZone = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == zoneProcessorIndexOfThisZone)
+        {
+            blockIndex = oversetConfigMultiZone[iZone]->GetGrid()->GetIBlock();
+            numberOfInterpolateCells = static_cast<int>( ( oversetConfigMultiZone[iZone]->GetInterpolateCellList() ).size() );
+        }
+
+        PHMPI::PH_Bcast(&blockIndex, sizeof(int), zoneProcessorIndexOfThisZone);
+        PHMPI::PH_Bcast(&numberOfInterpolateCells, sizeof(int), zoneProcessorIndexOfThisZone);
+
+        if (zonesInterpolateCells[iZone])
+        {
+            delete zonesInterpolateCells[iZone];
+            zonesInterpolateCells[iZone] = NULL;
+        }
+
+        zonesInterpolateCells[iZone] = new InterCells(numberOfInterpolateCells, blockIndex);
+
+        if (numberOfInterpolateCells)
+        {
+            RDouble *interpolateCellCenterX = zonesInterpolateCells[iZone]->GetX();
+            RDouble *interpolateCellCenterY = zonesInterpolateCells[iZone]->GetY();
+            RDouble *interpolateCellCenterZ = zonesInterpolateCells[iZone]->GetZ();
+
+            if (currentProcessorIndex == zoneProcessorIndexOfThisZone)
+            {
+                vector< int > &interpolateCellList = oversetConfigMultiZone[iZone]->GetInterpolateCellList();
+
+                RDouble *cellCenterX = oversetConfigMultiZone[iZone]->GetGrid()->GetCellCenterX();
+                RDouble *cellCenterY = oversetConfigMultiZone[iZone]->GetGrid()->GetCellCenterY();
+                RDouble *cellCenterZ = oversetConfigMultiZone[iZone]->GetGrid()->GetCellCenterZ();
+
+                for (int iCell = 0; iCell < numberOfInterpolateCells; ++iCell)
+                {
+                    int &cellIndex = interpolateCellList[iCell];
+
+                    interpolateCellCenterX[iCell] = cellCenterX[cellIndex];
+                    interpolateCellCenterY[iCell] = cellCenterY[cellIndex];
+                    interpolateCellCenterZ[iCell] = cellCenterZ[cellIndex];
+                }
+            }
+
+            PHMPI::PH_Bcast(interpolateCellCenterX, numberOfInterpolateCells * sizeof(RDouble), zoneProcessorIndexOfThisZone);
+            PHMPI::PH_Bcast(interpolateCellCenterY, numberOfInterpolateCells * sizeof(RDouble), zoneProcessorIndexOfThisZone);
+            PHMPI::PH_Bcast(interpolateCellCenterZ, numberOfInterpolateCells * sizeof(RDouble), zoneProcessorIndexOfThisZone);
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::AllReduceZonesInterpolateCells()
+{
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        InterCells *zoneInterpolateCells = zonesInterpolateCells[iZone];
+
+        int numberOfInterpolateCells = zoneInterpolateCells->GetNumberOfInterCells();
+
+        if (numberOfInterpolateCells)
+        {
+            int *donorZoneIndex = zoneInterpolateCells->GetDonorZoneIndex();
+            int *donorCellIndex = zoneInterpolateCells->GetDonorCellIndex();
+            int *donorLevel = zoneInterpolateCells->GetKey();
+            RDouble *cellMinDistance = zoneInterpolateCells->GetMinDist();
+
+            int *donorZoneIndexGlobal = new int[numberOfInterpolateCells];
+            int *donorCellIndexGlobal = new int[numberOfInterpolateCells];
+            int *donorLevelGlobal = new int[numberOfInterpolateCells];
+            RDouble *cellMinDistanceGlobal = new RDouble[numberOfInterpolateCells];
+
+            PH_AllReduce(donorLevel, donorLevelGlobal, numberOfInterpolateCells, PH_MAX);
+            for (int iCell = 0; iCell < numberOfInterpolateCells; ++iCell)
+            {
+                if (donorLevelGlobal[iCell] > donorLevel[iCell])
+                {
+                    cellMinDistance[iCell] = LARGE;
+                    donorZoneIndex[iCell] = -1;
+                }
+            }
+
+            PH_AllReduce(cellMinDistance, cellMinDistanceGlobal, numberOfInterpolateCells, PH_MIN);
+            for (int iCell = 0; iCell < numberOfInterpolateCells; ++iCell)
+            {
+                if (cellMinDistanceGlobal[iCell] < cellMinDistance[iCell])
+                {
+                    donorZoneIndex[iCell] = -1;
+                }
+            }
+
+            PH_AllReduce(donorZoneIndex, donorZoneIndexGlobal, numberOfInterpolateCells, PH_MAX);
+            for (int iCell = 0; iCell < numberOfInterpolateCells; ++iCell)
+            {
+                if (donorZoneIndexGlobal[iCell] != donorZoneIndex[iCell])
+                {
+                    donorCellIndex[iCell] = -1;
+                }
+            }
+
+            PH_AllReduce(donorCellIndex, donorCellIndexGlobal, numberOfInterpolateCells, PH_MAX);
+
+            SetField(donorLevel, donorLevelGlobal, numberOfInterpolateCells);
+            SetField(cellMinDistance, cellMinDistanceGlobal, numberOfInterpolateCells);
+            SetField(donorZoneIndex, donorZoneIndexGlobal, numberOfInterpolateCells);
+            SetField(donorCellIndex, donorCellIndexGlobal, numberOfInterpolateCells);
+
+            delete[] donorLevelGlobal;
+            delete[] cellMinDistanceGlobal;
+            delete[] donorZoneIndexGlobal;
+            delete[] donorCellIndexGlobal;
+
+            donorLevelGlobal = NULL;
+            cellMinDistanceGlobal = NULL;
+            donorZoneIndexGlobal = NULL;
+            donorCellIndexGlobal = NULL;
+        }
+    }
+}
+
+
+//! Identify active cells.
+void OversetConfigFactoryMulti::FindActiveCells()
+{
+    //TimeSpan *timeSpan = new TimeSpan();
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    //! Interpolation cells are determined.
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (processorIndex == currentProcessorIndex)
+        {
+            oversetConfigMultiZone[iZone]->FindActiveCells();
+        }
+    }
+    //timeSpan->ShowTimeSpanToLogfile("FindActiveCells");
+    //delete timeSpan;
+    OutPutOversetVisualizations("2_1_FindActiveCells");
+}
+
+//! Identify interpolation cells.
+void OversetConfigFactoryMulti::FindInterCells()
+{
+    //TimeSpan *timeSpan = new TimeSpan();
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+
+    //! Interpolation cells are determined.
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (processorIndex == currentProcessorIndex)
+        {
+            oversetConfigMultiZone[iZone]->FindInterCells();
+        }
+    }
+    OutPutOversetVisualizations("2_2_FindInterpolateCells");
+    //timeSpan->ShowTimeSpanToLogfile("FindInterCells");
+    //delete timeSpan;
+}
+
+void OversetConfigFactoryMulti::CheckInterpolateRelationships()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for (int iBlock = 0; iBlock < numberOfBlocks; ++iBlock)
+    {
+        int numberOfInterpolateCellsInThisBlock;
+
+        int numberOfNegativeCellsInThisBlock_1;
+        int numberOfNegativeCellsInThisBlock_2;
+        int numberOfNegativeCellsInThisBlock_3;
+
+        int numberOfInterpolateCellsInThisBlockLocal = 0;
+
+        int numberOfNegativeCellsInThisBlock_1Local = 0;
+        int numberOfNegativeCellsInThisBlock_2Local = 0;
+        int numberOfNegativeCellsInThisBlock_3Local = 0;
+
+        for (int iZone = 0; iZone < numberOfZones; ++iZone)
+        {
+            int zoneProcessorIndex = PHMPI::GetZoneProcessorID(iZone);
+            if (currentProcessorIndex == zoneProcessorIndex)
+            {
+                oversetConfigMultiZone[iZone]->CheckInterpolateRelationship(iBlock, zonesInterpolateCells[iZone],
+                    numberOfInterpolateCellsInThisBlockLocal,
+                    numberOfNegativeCellsInThisBlock_1Local,
+                    numberOfNegativeCellsInThisBlock_2Local,
+                    numberOfNegativeCellsInThisBlock_3Local);
+            }
+        }
+
+        PH_AllReduce(&numberOfInterpolateCellsInThisBlockLocal, &numberOfInterpolateCellsInThisBlock, 1, PH_SUM);
+        PH_AllReduce(&numberOfNegativeCellsInThisBlock_1Local, &numberOfNegativeCellsInThisBlock_1, 1, PH_SUM);
+        PH_AllReduce(&numberOfNegativeCellsInThisBlock_2Local, &numberOfNegativeCellsInThisBlock_2, 1, PH_SUM);
+        PH_AllReduce(&numberOfNegativeCellsInThisBlock_3Local, &numberOfNegativeCellsInThisBlock_3, 1, PH_SUM);
+
+        if (currentProcessorIndex == PHMPI::GetServerProcessorID())
+        {
+            //cout << "Block" << iBlock << "->InterpolateCellsNumber = " << numberOfInterpolateCellsInThisBlock << endl;
+            //
+            //if (numberOfNegativeCellsInThisBlock_1)
+            //{
+            //    cout << "Block" << iBlock << "->NegativeCell_1 = " << numberOfNegativeCellsInThisBlock_1 << endl;
+            //}
+            //if (numberOfNegativeCellsInThisBlock_2)
+            //{
+            //    cout << "Block" << iBlock << "->NegativeCell_2 = " << numberOfNegativeCellsInThisBlock_2 << endl;
+            //}
+            //if (numberOfNegativeCellsInThisBlock_3)
+            //{
+            //    cout << "Block" << iBlock << "->NegativeCell_3 = " << numberOfNegativeCellsInThisBlock_3 << endl;
+            //    exit(- 1);
+            //}
+        }
+    }
+
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int zoneProcessorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == zoneProcessorIndex)
+        {
+            //zonesInterpolateCells[iZone]->FreeUselessMemery();
+            //if (zonesInterpolateCells[iZone])
+            //{
+            //    delete zonesInterpolateCells[iZone];
+            //    zonesInterpolateCells[iZone] = NULL;
+            //}
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::ResetOversetInformation()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+
+    //! Initialize oversetInformation on each zone.
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->InitializeOversetInformation();
+        }
+    }
+
+    //! Get oversetInterCells and oversetDonorCells at MainProcess, where oversetDonorCells should swap with neighbor zone.
+    GetInterAndDonorCellManagersNew();
+
+    //! PostProcessOversetInformation, get storageIndexContainer (Interpolation or contribution cell for a neighbor zone, its serial number in the whole interpolation or contribution cell).
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->PostProcessOversetInformation();
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::GetInterAndDonorCellManagers()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int sendProcessorIndex = PHMPI::GetZoneProcessorIDSepMode(iZone);
+
+        //! First get neighborZoneIndexContainer and broadcast to all process.
+        PHVectorInt1D neighborZoneIndexContainer;
+        if (currentProcessorIndex == sendProcessorIndex)
+        {
+            OversetInformationProxy *oversetInformationProxy = oversetConfigMultiZone[iZone]->GetOversetInformationProxy();
+            oversetInformationProxy->GetNeighborZoneIndexContainer(neighborZoneIndexContainer);
+        }
+
+        int numberOfNeighbors = static_cast<int>( neighborZoneIndexContainer.size() );
+        PHMPI::PH_Bcast(&numberOfNeighbors, sizeof(int), sendProcessorIndex);
+
+        if (numberOfNeighbors != 0)
+        {
+            neighborZoneIndexContainer.resize(numberOfNeighbors);
+            PHMPI::PH_Bcast(&neighborZoneIndexContainer[0], numberOfNeighbors * sizeof(int), sendProcessorIndex);
+        }
+
+        //! Loop query all neighbors one by one.
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbors; ++iNeighbor)
+        {
+            int donorZoneIndex = neighborZoneIndexContainer[iNeighbor];
+            int receiveProcessorIndex = PHMPI::GetZoneProcessorIDSepMode(donorZoneIndex);
+
+            PHVectorInt1D     donorCellIndexContainer;
+            PHVectorRDouble1D interCellCenterX;
+            PHVectorRDouble1D interCellCenterY;
+            PHVectorRDouble1D interCellCenterZ;
+
+            if (currentProcessorIndex == sendProcessorIndex)
+            {
+                //! Get interCells ready.
+                OversetInformationProxy *oversetInformationProxy = oversetConfigMultiZone[iZone]->GetOversetInformationProxy();
+                OversetSwapManager *oversetSwapManager = oversetInformationProxy->GetOversetSwapManager();
+
+                OversetInterplateCell *oversetInterplateCell = new OversetInterplateCell();
+                oversetInterplateCell->SetZoneIndex(iZone);
+                oversetInterplateCell->SetDonorZoneIndex(donorZoneIndex);
+                PHVectorInt1D &cellIndexContainer = oversetInterplateCell->GetCellIndexContainer();
+                oversetInformationProxy->GetCellIndexContainer(donorZoneIndex, cellIndexContainer);
+
+                oversetSwapManager->AddOversetInterplateCell(oversetInterplateCell);
+
+                //! Get necessary information ready for donorCells.
+                oversetInformationProxy->GetDonorCellIndexContainer(donorZoneIndex, donorCellIndexContainer, interCellCenterX, interCellCenterY, interCellCenterZ);
+            }
+
+            int numberOfDonorCells = static_cast<int>( donorCellIndexContainer.size() );
+            PHMPI::PH_Trade(&numberOfDonorCells, sizeof(int), sendProcessorIndex, receiveProcessorIndex, iZone);
+
+            int *index = new int[numberOfDonorCells];
+            RDouble *xCell = new RDouble[numberOfDonorCells];
+            RDouble *yCell = new RDouble[numberOfDonorCells];
+            RDouble *zCell = new RDouble[numberOfDonorCells];
+
+            donorCellIndexContainer.resize(numberOfDonorCells);
+            interCellCenterX.resize(numberOfDonorCells);
+            interCellCenterY.resize(numberOfDonorCells);
+            interCellCenterZ.resize(numberOfDonorCells);
+
+            if (currentProcessorIndex == sendProcessorIndex)
+            {
+                for (int iCell = 0; iCell < numberOfDonorCells; ++iCell)
+                {
+                    index[iCell] = donorCellIndexContainer[iCell];
+                    xCell[iCell] = interCellCenterX[iCell];
+                    yCell[iCell] = interCellCenterY[iCell];
+                    zCell[iCell] = interCellCenterZ[iCell];
+                }
+            }
+
+            PHMPI::PH_Trade(index, numberOfDonorCells * sizeof(int), sendProcessorIndex, receiveProcessorIndex, iZone);
+            PHMPI::PH_Trade(xCell, numberOfDonorCells * sizeof(RDouble), sendProcessorIndex, receiveProcessorIndex, iZone);
+            PHMPI::PH_Trade(yCell, numberOfDonorCells * sizeof(RDouble), sendProcessorIndex, receiveProcessorIndex, iZone);
+            PHMPI::PH_Trade(zCell, numberOfDonorCells * sizeof(RDouble), sendProcessorIndex, receiveProcessorIndex, iZone);
+
+            if (currentProcessorIndex == receiveProcessorIndex)
+            {
+                for (int iCell = 0; iCell < numberOfDonorCells; ++iCell)
+                {
+                    donorCellIndexContainer[iCell] = index[iCell];
+                    interCellCenterX[iCell] = xCell[iCell];
+                    interCellCenterY[iCell] = yCell[iCell];
+                    interCellCenterZ[iCell] = zCell[iCell];
+                }
+
+                OversetInformationProxy *oversetInformationProxy = oversetConfigMultiZone[donorZoneIndex]->GetOversetInformationProxy();
+                OversetSwapManager *oversetSwapManager = oversetInformationProxy->GetOversetSwapManager();
+
+                OversetDonorCell *oversetDonorCell = new OversetDonorCell();
+                oversetDonorCell->SetZoneIndex(donorZoneIndex);
+                oversetDonorCell->SetInterplateZoneIndex(iZone);
+                oversetDonorCell->SetDonorCellIndexContainer(donorCellIndexContainer);
+                oversetDonorCell->SetInterCellCenterX(interCellCenterX);
+                oversetDonorCell->SetInterCellCenterY(interCellCenterY);
+                oversetDonorCell->SetInterCellCenterZ(interCellCenterZ);
+
+                oversetSwapManager->AddOversetDonorCell(oversetDonorCell);
+            }
+
+            delete[] index;
+            delete[] xCell;
+            delete[] yCell;
+            delete[] zCell;
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::GetInterAndDonorCellManagersNew()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int sendProcessorIndex = PHMPI::GetZoneProcessorID(iZone);
+
+        //! First get neighborZoneIndexContainer and broadcast to all process.
+        PHVectorInt1D neighborZoneIndexContainer;
+
+        GetNeighborZoneIndexContainerForTargetZone(iZone, neighborZoneIndexContainer);
+
+        int numberOfNeighbors = static_cast<int>( neighborZoneIndexContainer.size() );
+
+        //! Loop query all neighbors one by one.
+        for (int iNeighbor = 0; iNeighbor < numberOfNeighbors; ++iNeighbor)
+        {
+            DataContainer *dataContainer = new DataContainer;
+
+            int donorZoneIndex = neighborZoneIndexContainer[iNeighbor];
+            int receiveProcessorIndex = PHMPI::GetZoneProcessorID(donorZoneIndex);
+
+            int numberOfDonorCell;
+            PHVectorInt1D     donorCellIndexContainer;
+            PHVectorRDouble1D interCellCenterX;
+            PHVectorRDouble1D interCellCenterY;
+            PHVectorRDouble1D interCellCenterZ;
+
+            if (currentProcessorIndex != receiveProcessorIndex && currentProcessorIndex != sendProcessorIndex)
+            {
+                continue;
+            }
+
+            if (currentProcessorIndex == sendProcessorIndex)
+            {
+                //! Get interCells ready.
+                OversetInformationProxy *oversetInformationProxy = oversetConfigMultiZone[iZone]->GetOversetInformationProxy();
+                OversetSwapManager *oversetSwapManager = oversetInformationProxy->GetOversetSwapManager();
+
+                OversetInterplateCell *oversetInterplateCell = new OversetInterplateCell();
+                oversetInterplateCell->SetZoneIndex(iZone);
+                oversetInterplateCell->SetDonorZoneIndex(donorZoneIndex);
+                PHVectorInt1D &cellIndexContainer = oversetInterplateCell->GetCellIndexContainer();
+                oversetInformationProxy->GetCellIndexContainer(donorZoneIndex, cellIndexContainer);
+
+                oversetSwapManager->AddOversetInterplateCell(oversetInterplateCell);
+
+                //! Get necessary information ready for donorCells.
+                oversetInformationProxy->GetDonorCellIndexContainer(donorZoneIndex, donorCellIndexContainer, interCellCenterX, interCellCenterY, interCellCenterZ);
+
+                numberOfDonorCell = static_cast<int>( donorCellIndexContainer.size() );
+
+                PHSPACE::PHWrite(dataContainer, numberOfDonorCell);
+
+                PHSPACE::PHWrite(dataContainer, donorCellIndexContainer, numberOfDonorCell);
+                PHSPACE::PHWrite(dataContainer, interCellCenterX, numberOfDonorCell);
+                PHSPACE::PHWrite(dataContainer, interCellCenterY, numberOfDonorCell);
+                PHSPACE::PHWrite(dataContainer, interCellCenterZ, numberOfDonorCell);
+            }
+
+            PHMPI::PH_Trade(dataContainer, sendProcessorIndex, receiveProcessorIndex);
+
+            if (currentProcessorIndex == receiveProcessorIndex)
+            {
+                dataContainer->moveto_begin();
+
+                PHSPACE::PHRead(dataContainer, numberOfDonorCell);
+
+                donorCellIndexContainer.resize(numberOfDonorCell);
+                interCellCenterX.resize(numberOfDonorCell);
+                interCellCenterY.resize(numberOfDonorCell);
+                interCellCenterZ.resize(numberOfDonorCell);
+
+                PHSPACE::PHRead(dataContainer, donorCellIndexContainer, numberOfDonorCell);
+                PHSPACE::PHRead(dataContainer, interCellCenterX, numberOfDonorCell);
+                PHSPACE::PHRead(dataContainer, interCellCenterY, numberOfDonorCell);
+                PHSPACE::PHRead(dataContainer, interCellCenterZ, numberOfDonorCell);
+
+                OversetInformationProxy *oversetInformationProxy = oversetConfigMultiZone[donorZoneIndex]->GetOversetInformationProxy();
+                OversetSwapManager *oversetSwapManager = oversetInformationProxy->GetOversetSwapManager();
+
+                OversetDonorCell *oversetDonorCell = new OversetDonorCell();
+                oversetDonorCell->SetZoneIndex(donorZoneIndex);
+                oversetDonorCell->SetInterplateZoneIndex(iZone);
+                oversetDonorCell->SetDonorCellIndexContainer(donorCellIndexContainer);
+                oversetDonorCell->SetInterCellCenterX(interCellCenterX);
+                oversetDonorCell->SetInterCellCenterY(interCellCenterY);
+                oversetDonorCell->SetInterCellCenterZ(interCellCenterZ);
+
+                oversetSwapManager->AddOversetDonorCell(oversetDonorCell);
+            }
+
+            delete dataContainer;
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::GetNeighborZoneIndexContainerForTargetZone(int iZone, PHVectorInt1D &neighborZoneList)
+{
+    InterCells *zoneInterpolateCells = zonesInterpolateCells[iZone];
+    int numberOfInterCells = zoneInterpolateCells->GetNumberOfInterCells();
+
+    int *donorZone = zoneInterpolateCells->GetDonorZoneIndex();
+
+    set< int > neighborZoneIndexSet;
+
+    for (int iCell = 0; iCell < numberOfInterCells; ++iCell)
+    {
+        neighborZoneIndexSet.insert(donorZone[iCell]);
+    }
+
+    for (set< int >::iterator iter = neighborZoneIndexSet.begin(); iter != neighborZoneIndexSet.end(); ++iter)
+    {
+        neighborZoneList.push_back(*iter);
+    }
+}
+
+void OversetConfigFactoryMulti::OutPutOversetVisualizations(const string &name)
+{
+    if (GetIfOutPutOversetVisualization() == 0)
+    {
+        return;
+    }
+
+    string fileDir = "OversetOutput/" + name;
+    PHMakeDir(fileDir);
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->OutPutOversetVisualization(name);
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::FreeKeyBasicActiveNodes()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->FreeKeyBasicActiveNode();
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::OutPutOversetFiles()
+{
+    OutPutBoundaryCells();
+
+    PrintCellInformation();
+
+    OutPutTecplot();
+
+    OutPutOversetInformation();
+}
+
+void OversetConfigFactoryMulti::OutPutOversetInformation()
+{
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    int serverProcessor = PHMPI::GetServerSepMode();
+
+    string oversetGridFileName = GlobalDataBase::GetStrParaFromDB("oversetGridFileName");
+    fstream file;
+    if (currentProcessor == serverProcessor)
+    {
+        PrintToWindow("Output Overset Configuration Information: ", oversetGridFileName, "\n");
+        OpenFile(file, oversetGridFileName, ios_base::out | ios_base::binary);
+    }
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        DataContainer *dataContainer = new DataContainer;
+
+        int sendProcessorIndex = PHMPI::GetZoneProcessorIDSepMode(iZone);
+
+        if (currentProcessor == sendProcessorIndex)
+        {
+            oversetConfigMultiZone[iZone]->GetGrid()->Encode(dataContainer, 1);
+        }
+
+        PHMPI::PH_Trade(dataContainer, sendProcessorIndex, serverProcessor);
+
+        if (currentProcessor == serverProcessor)
+        {
+            dataContainer->moveto_begin();
+            dataContainer->writefile(file);
+        }
+        delete dataContainer;
+    }
+
+    if (currentProcessor == serverProcessor)
+    {
+        CloseFile(file);
+    }
+}
+
+void OversetConfigFactoryMulti::OutPutTecplot()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->ShowGrid();
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::OutPutBoundaryCells()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->ShowBoundaryCells();
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::PrintCellInformation()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    int serverProcessorIndex = PHMPI::GetServerSepMode();
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int numberOfActiveCells = 0;
+        int numberOfNegativeCells = 0;
+        int numberOfInterCells = 0;
+
+        int sendProcessorIndex = PHMPI::GetZoneProcessorIDSepMode(iZone);
+
+        DataContainer *dataContainer = new DataContainer;
+        int tag = 0;
+
+        if (currentProcessorIndex == sendProcessorIndex)
+        {
+            int *keyActiveOfCells = oversetConfigMultiZone[iZone]->GetKeyActiveOfCells();
+
+            int numberOfCells = ( oversetConfigMultiZone[iZone]->grid )->GetNTotalCell();
+
+            for (int iCell = 0; iCell < numberOfCells; ++iCell)
+            {
+                if (keyActiveOfCells[iCell] == 1)
+                {
+                    numberOfActiveCells++;
+                }
+                else if (keyActiveOfCells[iCell] == 0)
+                {
+                    numberOfNegativeCells++;
+                }
+                else if (keyActiveOfCells[iCell] == -1)
+                {
+                    numberOfInterCells++;
+                }
+            }
+
+            if (currentProcessorIndex != serverProcessorIndex)
+            {
+                PHWrite(dataContainer, numberOfActiveCells);
+                PHWrite(dataContainer, numberOfNegativeCells);
+                PHWrite(dataContainer, numberOfInterCells);
+                send(dataContainer, serverProcessorIndex, tag);
+            }
+        }
+
+        if (currentProcessorIndex == serverProcessorIndex)
+        {
+            if (currentProcessorIndex != sendProcessorIndex)
+            {
+                receive(dataContainer, sendProcessorIndex, tag);
+                PHRead(dataContainer, numberOfActiveCells);
+                PHRead(dataContainer, numberOfNegativeCells);
+                PHRead(dataContainer, numberOfInterCells);
+            }
+
+            cout << "iZone = " << iZone << endl;
+            cout << "       numberOfActiveCells   = " << numberOfActiveCells << endl;
+            cout << "       numberOfNegativeCells = " << numberOfNegativeCells << endl;
+            cout << "       numberOfInterCells    = " << numberOfInterCells << endl;
+        }
+
+        delete dataContainer;
+    }
+}
+
+void OversetConfigFactoryMulti::CharacterNodeToCell()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->CharacterNodeToCell();
+        }
+    }
+}
+
+//! For physical boundary advance, advanced to the interpolation boundary and stop, advanced to wallCell and stop too.
+int OversetConfigFactoryMulti::CharacterNodeToValidNodeByCell()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+
+    int numberOfNewNodesAllZones = 0;
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+
+        if (currentProcessorIndex == processorIndex)
+        {
+            int numberOfNewNodes = oversetConfigMultiZone[iZone]->CharacterNodeToValidNodeByCell();
+            numberOfNewNodesAllZones += numberOfNewNodes;
+        }
+    }
+
+    //! Transmission of point attributes through interface communication. InnerAndInitialInterNodes needs to be constrained.
+    //CommunicateNodePropertyByKeyOfInterfaceNodesInBlocks();
+    CommunicateNodeCharacterOnInterface();
+
+    SetNegativeForInnerAndInitialInterNodes();
+
+    return numberOfNewNodesAllZones;
+}
+
+void OversetConfigFactoryMulti::CharacterCellToNode()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->CharacterCellToNode();
+        }
+    }
+
+    //! Transmission of point attributes through interface communication.
+    //CommunicateNodePropertyByKeyOfInterfaceNodesInBlocks();
+    CommunicateNodeCharacterOnInterface();
+}
+
+void OversetConfigFactoryMulti::CommunicateCellIBlank()
+{
+    using namespace PHMPI;
+    ActionKey *actkey = new ActionKey();
+    actkey->action = COMMCELLIBLANK;
+    actkey->kind = GRID_BASED;
+    actkey->level = 0;
+
+    if (IsNeedNonBlockingCommunication(actkey))
+    {
+        MainTaskNonBlocking(actkey);
+    }
+    else
+    {
+        MainTaskBlocking(actkey);
+    }
+
+    delete actkey;
+}
+
+//! Through the communication of virtual cell information in interface, realize the indirect communication of point attributes.
+void OversetConfigFactoryMulti::CommunicateNodeCharacterOnInterface()
+{
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+
+    //! step1: Communication cell properties.
+    CommunicateCellIBlank();
+
+    //! step2: Judge the property of points through Interface.
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessor == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->CharacterInterfaceToNode();
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::CommunicateNodePropertyByKeyOfInterfaceNodesInBlocks()
+{
+    for (int iBlock = 0; iBlock < numberOfBlocks; ++ iBlock)
+    {
+        SetField(keyOfInterfaceNodesInBlocks[iBlock], 0, numberOfInterfaceNodesInBlocks[iBlock]);
+    }
+
+    //! step1: Every zone update keyActiveOfGlobalNodes (Summary keyActiveOfNodes).
+    int currentProcessor = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessor == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->UpdateInterfaceNodeCharacter();
+        }
+    }
+
+    //! step2: mpiAllreduce.
+    for (int iBlock = 0; iBlock < numberOfBlocks; ++ iBlock)
+    {
+        int &numberOfInterfaceNodesInThisBlock = numberOfInterfaceNodesInBlocks[iBlock];
+        int *keyOfInterfaceNodesInThisBlockGlobal = new int[numberOfInterfaceNodesInThisBlock];
+
+        PH_AllReduce(keyOfInterfaceNodesInBlocks[iBlock], keyOfInterfaceNodesInThisBlockGlobal, numberOfInterfaceNodesInThisBlock, MPI_MAX);
+        SetField(keyOfInterfaceNodesInBlocks[iBlock], keyOfInterfaceNodesInThisBlockGlobal, numberOfInterfaceNodesInThisBlock);
+
+        delete[] keyOfInterfaceNodesInThisBlockGlobal;
+        keyOfInterfaceNodesInThisBlockGlobal = NULL;
+    }
+
+    //! step3: Assign the value of after mpiAllreduce to keyActiveOfNodes.
+    for (int iZone = 0; iZone < numberOfZones; ++ iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessor == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->DownInterfaceNodeCharacter();
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::OutInterCellInformation()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+
+    string fileName = AddSymbolToFileName("interCells.dat", currentProcessorIndex);
+    fstream file;
+    PHSPACE::OpenFile(file, fileName, ios_base::out);
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        InterCells *zoneInterpolateCells = zonesInterpolateCells[iZone];
+        int numberOfInterCells = zoneInterpolateCells->GetNumberOfInterCells();
+
+        RDouble *minDist = zoneInterpolateCells->GetMinDist();
+        int *donorZone = zoneInterpolateCells->GetDonorZoneIndex();
+        int *donorCell = zoneInterpolateCells->GetDonorCellIndex();
+
+        file << "iZone = " << iZone << endl;
+        for (int iCell = 0; iCell < numberOfInterCells; ++iCell)
+        {
+            file << "iCell = " << iCell << ":" << endl;
+            file << "        " << minDist[iCell] << endl;
+            file << "        " << donorZone[iCell] << endl;
+            file << "        " << donorCell[iCell] << endl;
+        }
+    }
+    PHSPACE::CloseFile(file);
+}
+
+void OversetConfigFactoryMulti::OutKeyActive()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        int processorIndex = PHMPI::GetZoneProcessorID(iZone);
+        if (currentProcessorIndex == processorIndex)
+        {
+            oversetConfigMultiZone[iZone]->OutKeyActive();
+        }
+    }
+}
+
+void OversetConfigFactoryMulti::OutGlobalInterCells()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    string  fileName = AddSymbolToFileName("globalInterCell.dat", currentProcessorIndex);
+    fstream file;
+
+    PHSPACE::OpenFile(file, fileName, ios_base::out);
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        InterCells *zoneInterpolateCells = zonesInterpolateCells[iZone];
+        int blockIndex = zoneInterpolateCells->GetBlockIndex();
+        int numberOfInterCells = zoneInterpolateCells->GetNumberOfInterCells();
+
+        RDouble *x = zoneInterpolateCells->GetX();
+        RDouble *y = zoneInterpolateCells->GetX();
+        RDouble *z = zoneInterpolateCells->GetX();
+
+        file << "blockIndex         = " << blockIndex << endl;
+        file << "numberOfInterCells = " << numberOfInterCells << endl;
+
+        for (int iCell = 0; iCell < numberOfInterCells; ++iCell)
+        {
+            file << x[iCell] << "  " << y[iCell] << "  " << z[iCell] << endl;
+        }
+    }
+
+    PHSPACE::CloseFile(file);
+}
+
+void OversetConfigFactoryMulti::OutGlobalNodes()
+{
+    int currentProcessorIndex = PHMPI::GetCurrentProcessorID();
+    string fileName = AddSymbolToFileName("globalNodes.dat", currentProcessorIndex);
+    fstream file;
+
+    PHSPACE::OpenFile(file, fileName, ios_base::out);
+
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        ZoneSearchNodes *zoneSearchNodes = zonesSearchNodes[iZone];
+        int blockIndex = zoneSearchNodes->GetBlockIndex();
+        int numberOfNodes = zoneSearchNodes->GetNumberOfNodes();
+
+        RDouble *x = zoneSearchNodes->GetX();
+        RDouble *y = zoneSearchNodes->GetX();
+        RDouble *z = zoneSearchNodes->GetX();
+        RDouble *pMin = zoneSearchNodes->GetPMin();
+        RDouble *pMax = zoneSearchNodes->GetPMax();
+
+        file << "blockIndex    = " << blockIndex << endl;
+        file << "numberOfNodes = " << numberOfNodes << endl;
+
+        file << pMin[0] << "  " << pMin[1] << "  " << pMin[2] << endl;
+
+        file << pMax[0] << "  " << pMax[1] << "  " << pMax[2] << endl;
+
+        for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+        {
+            file << x[iNode] << "  " << y[iNode] << "  " << z[iNode] << endl;
+        }
+    }
+
+    PHSPACE::CloseFile(file);
+}
+
+ZoneSearchNodes::ZoneSearchNodes(int numberOfSearchNodesIn,
+    int blockIndexIn) :
+    numberOfNodes(numberOfSearchNodesIn),
+    blockIndex(blockIndexIn)
+{
+    int geometricDimension = GetDim();
+    pMin = new RDouble[geometricDimension];
+    pMax = new RDouble[geometricDimension];
+
+    if (numberOfNodes)
+    {
+        x = new RDouble[numberOfNodes];
+        y = new RDouble[numberOfNodes];
+        z = new RDouble[numberOfNodes];
+
+        nodesMinDistanceToOtherBlock = new RDouble[numberOfNodes];
+
+        SetField(nodesMinDistanceToOtherBlock, LARGE, numberOfNodes);
+    }
+}
+
+ZoneSearchNodes ::~ZoneSearchNodes()
+{
+    if (numberOfNodes)
+    {
+        delete [] x;
+        delete [] y;
+        delete [] z;
+        delete [] nodesMinDistanceToOtherBlock;
+
+        x = NULL;
+        y = NULL;
+        z = NULL;
+        nodesMinDistanceToOtherBlock = NULL;
+    }
+
+    delete [] pMin;
+    delete [] pMax;
+
+    pMax = NULL;
+    pMin = NULL;
+}
+
+InterCells::InterCells(int numberOfInterpolateCellsIn,
+    int blockIndexIn) :
+    numberOfInterCells(numberOfInterpolateCellsIn),
+    blockIndex(blockIndexIn)
+{
+    if (numberOfInterCells)
+    {
+        donorZoneIndex = new int[numberOfInterCells];
+        donorCellIndex = new int[numberOfInterCells];
+
+        donorLevel = new int[numberOfInterCells];
+        cellMinDistance = new RDouble[numberOfInterCells];
+
+        x = new RDouble[numberOfInterCells];
+        y = new RDouble[numberOfInterCells];
+        z = new RDouble[numberOfInterCells];
+
+        SetField(donorZoneIndex, -1, numberOfInterCells);
+        SetField(donorCellIndex, -1, numberOfInterCells);
+
+        SetField(donorLevel, -3, numberOfInterCells);
+        SetField(cellMinDistance, LARGE, numberOfInterCells);
+    }
+}
+
+InterCells::~InterCells()
+{
+    if (numberOfInterCells)
+    {
+        delete[] donorZoneIndex;
+        delete[] donorCellIndex;
+
+        donorZoneIndex = NULL;
+        donorCellIndex = NULL;
+
+        if (NULL != donorLevel)
+        {
+            delete[] donorLevel;
+            delete[] cellMinDistance;
+
+            delete[] x;
+            delete[] y;
+            delete[] z;
+
+            donorLevel = NULL;
+            cellMinDistance = NULL;
+
+            x = NULL;
+            y = NULL;
+            z = NULL;
+        }
+    }
+}
+
+void InterCells::FreeUselessMemery()
+{
+    if (numberOfInterCells)
+    {
+        delete[] donorLevel;
+        delete[] cellMinDistance;
+
+        delete[] x;
+        delete[] y;
+        delete[] z;
+
+        donorLevel = NULL;
+        cellMinDistance = NULL;
+
+        x = NULL;
+        y = NULL;
+        z = NULL;
+    }
+}
+
+OversetConfig::OversetConfig()
+{
+    gridKDTree = NULL;
+
+    minBoxOfZone = NULL;
+    maxBoxOfZone = NULL;
+
+    keyActiveOfNodes = NULL;
+
+    keyBufferOfNodes = NULL;
+    keyBufferOfCells = NULL;
+    keySearchOfNodes = NULL;
+    keySearchOfCells = NULL;
+    keyInBlockNodes = NULL;
+    keyBasicActiveNodes = NULL;
+
+    nodesMinDistanceInThisBlock = NULL;
+    nodesMinDistanceInOtherBlock = NULL;
+
+    localToGlobalInterfaceNodesMap = NULL;
+
+    zoneIndex = 0;
+}
+
+void OversetConfig::BuildBoundaryNodeList(vector< RDouble > &wallNodeCoordinateXIn,
+    vector< RDouble > &wallNodeCoordinateYIn,
+    vector< RDouble > &wallNodeCoordinateZIn)
+{
+    int   numberOfBoundaryElements = grid->GetNBoundFace();
+    int *faceNodeNumber = grid->GetNodeNumberOfEachFace();
+    int **faceNodeIndex = grid->GetFace2NodeArray();
+
+    UnstructBCSet **unstructBCSet = grid->GetBCRecord();
+
+    RDouble *nodeCoordinateX = grid->GetX();
+    RDouble *nodeCoordinateY = grid->GetY();
+    RDouble *nodeCoordinateZ = grid->GetZ();
+
+    set< int > interfaceBoundaryNodeSet;
+    set< int > wallBoundaryNodeSet;
+    set< int > oversetBoundaryNodeSet;
+    set< int > symmetryBoundaryNodeSet;
+    set< int > physicalBoundaryNodeSet;
+
+    for (int iFace = 0; iFace < numberOfBoundaryElements; ++iFace)
+    {
+        int boundaryConditionOfThisFace = unstructBCSet[iFace]->GetKey();
+        int &numberOfNodesInThisFace = faceNodeNumber[iFace];
+
+        switch (boundaryConditionOfThisFace)
+        {
+        case PHENGLEI::INTERFACE:
+            for (int iNode = 0; iNode < numberOfNodesInThisFace; ++iNode)
+            {
+                interfaceBoundaryNodeSet.insert(faceNodeIndex[iFace][iNode]);
+            }
+            break;
+        case PHENGLEI::SOLID_SURFACE:
+            for (int iNode = 0; iNode < numberOfNodesInThisFace; ++iNode)
+            {
+                wallBoundaryNodeSet.insert(faceNodeIndex[iFace][iNode]);
+            }
+            break;
+        case PHENGLEI::OVERSET:
+            for (int iNode = 0; iNode < numberOfNodesInThisFace; ++iNode)
+            {
+                oversetBoundaryNodeSet.insert(faceNodeIndex[iFace][iNode]);
+            }
+            break;
+        case PHENGLEI::SYMMETRY:
+            for (int iNode = 0; iNode < numberOfNodesInThisFace; ++iNode)
+            {
+                symmetryBoundaryNodeSet.insert(faceNodeIndex[iFace][iNode]);
+            }
+            break;
+        default:
+            for (int iNode = 0; iNode < numberOfNodesInThisFace; ++iNode)
+            {
+                physicalBoundaryNodeSet.insert(faceNodeIndex[iFace][iNode]);
+            }
+        }
+    }
+
+    for (set< int >::iterator iter = interfaceBoundaryNodeSet.begin(); iter != interfaceBoundaryNodeSet.end(); ++iter)
+    {
+        interfaceBoundaryNodeList.push_back(*iter);
+    }
+    for (set< int >::iterator iter = oversetBoundaryNodeSet.begin(); iter != oversetBoundaryNodeSet.end(); ++iter)
+    {
+        innerBoundaryNodeList.push_back(*iter);
+    }
+    for (set< int >::iterator iter = physicalBoundaryNodeSet.begin(); iter != physicalBoundaryNodeSet.end(); ++iter)
+    {
+        physicalBoundaryNodeList.push_back(*iter);
+    }
+
+    for (set< int >::iterator iter = wallBoundaryNodeSet.begin(); iter != wallBoundaryNodeSet.end(); ++iter)
+    {
+        physicalBoundaryNodeList.push_back(*iter);
+        wallNodeCoordinateXIn.push_back(nodeCoordinateX[*iter]);
+        wallNodeCoordinateYIn.push_back(nodeCoordinateY[*iter]);
+        wallNodeCoordinateZIn.push_back(nodeCoordinateZ[*iter]);
+    }
+
+    if (GetSymetryOrNot())
+    {
+        for (set< int >::iterator iter = symmetryBoundaryNodeSet.begin(); iter != symmetryBoundaryNodeSet.end(); ++iter)
+        {
+            physicalBoundaryNodeList.push_back(*iter);
+        }
+    }
+}
+
+void OversetConfig::BuildBoundaryNodeList()
+{
+    int   numberOfBoundaryElements = grid->GetNBoundFace();
+    int *faceNodeNumber = grid->GetNodeNumberOfEachFace();
+    int **faceNodeIndex = grid->GetFace2NodeArray();
+
+    UnstructBCSet **bcr = grid->GetBCRecord();
+    //int *bcRegionIDofBCFace = unstructBCSet->GetBCFaceInfo();
+
+    set< int > interfaceBoundaryNodeSet;
+    set< int > wallBoundaryNodeSet;
+    set< int > oversetBoundaryNodeSet;
+    set< int > symmetryBoundaryNodeSet;
+    set< int > physicalBoundaryNodeSet;
+
+    for (int iFace = 0; iFace < numberOfBoundaryElements; ++iFace)
+    {
+        //UnstructBC *bcRegion = bcr[iFace];
+        int boundaryConditionOfThisFace = bcr[iFace]->GetKey();
+        int &numberOfNodesInThisFace = faceNodeNumber[iFace];
+
+        switch (boundaryConditionOfThisFace)
+        {
+        case PHENGLEI::INTERFACE:
+            for (int iNode = 0; iNode < numberOfNodesInThisFace; ++iNode)
+            {
+                interfaceBoundaryNodeSet.insert(faceNodeIndex[iFace][iNode]);
+            }
+            break;
+        case PHENGLEI::SOLID_SURFACE:
+            for (int iNode = 0; iNode < numberOfNodesInThisFace; ++iNode)
+            {
+                wallBoundaryNodeSet.insert(faceNodeIndex[iFace][iNode]);
+            }
+            break;
+        case PHENGLEI::OVERSET:
+            for (int iNode = 0; iNode < numberOfNodesInThisFace; ++iNode)
+            {
+                oversetBoundaryNodeSet.insert(faceNodeIndex[iFace][iNode]);
+            }
+            break;
+        case PHENGLEI::SYMMETRY:
+            for (int iNode = 0; iNode < numberOfNodesInThisFace; ++iNode)
+            {
+                symmetryBoundaryNodeSet.insert(faceNodeIndex[iFace][iNode]);
+            }
+            break;
+        default:
+            for (int iNode = 0; iNode < numberOfNodesInThisFace; ++iNode)
+            {
+                physicalBoundaryNodeSet.insert(faceNodeIndex[iFace][iNode]);
+            }
+        }
+    }
+
+    for (set< int >::iterator iter = interfaceBoundaryNodeSet.begin(); iter != interfaceBoundaryNodeSet.end(); ++iter)
+    {
+        interfaceBoundaryNodeList.push_back(*iter);
+    }
+    for (set< int >::iterator iter = oversetBoundaryNodeSet.begin(); iter != oversetBoundaryNodeSet.end(); ++iter)
+    {
+        innerBoundaryNodeList.push_back(*iter);
+    }
+    for (set< int >::iterator iter = physicalBoundaryNodeSet.begin(); iter != physicalBoundaryNodeSet.end(); ++iter)
+    {
+        physicalBoundaryNodeList.push_back(*iter);
+    }
+
+    for (set< int >::iterator iter = wallBoundaryNodeSet.begin(); iter != wallBoundaryNodeSet.end(); ++iter)
+    {
+        physicalBoundaryNodeList.push_back(*iter);
+    }
+
+    if (GetSymetryOrNot())
+    {
+        for (set< int >::iterator iter = symmetryBoundaryNodeSet.begin(); iter != symmetryBoundaryNodeSet.end(); ++iter)
+        {
+            physicalBoundaryNodeList.push_back(*iter);
+        }
+    }
+    if (NULL == localToGlobalInterfaceNodesMap)
+    {
+        localToGlobalInterfaceNodesMap = new int[interfaceBoundaryNodeList.size()];
+    }
+
+}
+
+void OversetConfig::BuildInBlockCellsAndNodesByInnerAuxiliaryGridKDTree(vector< GridKDTree * > &innerAuxiliaryGridKDTreesIn)
+{
+    RDouble *nodeCoordinate = new RDouble[THREE_D];
+
+    int blockIndex = grid->GetIBlock();
+
+    int numberOfNodes = grid->GetNTotalNode();
+    int numberOfCells = grid->GetNTotalCell();
+    int numberOfBlocks = GetOversetConfigFactoryMulti()->GetNumberOfBlocks();
+
+    RDouble *cellCenterX = grid->GetCellCenterX();
+    RDouble *cellCenterY = grid->GetCellCenterY();
+    RDouble *cellCenterZ = grid->GetCellCenterZ();
+
+    int **cellNodeIndexContainer = grid->GetCell2NodeArray();
+    int *cellNodeNumberContainer = grid->GetNodeNumberOfEachCell();
+
+    SetField(keyInBlockNodes, 0, numberOfNodes);
+
+    int donorCellIndex;
+    int symetryOrNot = GetSymetryOrNot();
+    for (int iCell = 0; iCell < numberOfCells; ++iCell)
+    {
+        donorCellIndex = -2;
+
+        if (!symetryOrNot || cellCenterZ[iCell] > 1.0e-5)
+        {
+            donorCellIndex = -1;
+
+            nodeCoordinate[0] = cellCenterX[iCell];
+            nodeCoordinate[1] = cellCenterY[iCell];
+            nodeCoordinate[2] = cellCenterZ[iCell];
+
+            for (int iBlock = 0; iBlock < numberOfBlocks; ++iBlock)
+            {
+                if (blockIndex != iBlock)
+                {
+                    if (innerAuxiliaryGridKDTreesIn[iBlock] != NULL)
+                    {
+                        donorCellIndex = innerAuxiliaryGridKDTreesIn[iBlock]->SearchNodeInKDTree(nodeCoordinate);
+                    }
+                }
+            }
+        }
+
+        if (donorCellIndex != -1)
+        {
+            for (int iNode = 0; iNode < cellNodeNumberContainer[iCell]; ++iNode)
+            {
+                keyInBlockNodes[cellNodeIndexContainer[iCell][iNode]] = 1;
+            }
+        }
+    }
+
+    delete[] nodeCoordinate;
+    nodeCoordinate = NULL;
+}
+
+OversetConfig::~OversetConfig()
+{
+    delete[] keyActiveOfNodes;
+    keyActiveOfNodes = NULL;
+
+    delete[] keyBufferOfNodes;
+    keyBufferOfNodes = NULL;
+
+    delete[] keyBufferOfCells;
+    keyBufferOfCells = NULL;
+    
+    FreeKeyInBlockNodes();
+
+    if (nodesMinDistanceInThisBlock != NULL)
+    {
+        delete[] nodesMinDistanceInThisBlock;
+        nodesMinDistanceInThisBlock = NULL;
+    }
+
+    if (localToGlobalInterfaceNodesMap != NULL)
+    {
+        delete[] localToGlobalInterfaceNodesMap;
+        localToGlobalInterfaceNodesMap = NULL;
+    }
+}
+
+void OversetConfig::FreeKeyBasicActiveNode()
+{
+    delete[] keyBasicActiveNodes;
+    keyBasicActiveNodes = NULL;
+}
+
+void OversetConfig::FreeKeyInBlockNodes()
+{
+    delete[] keyInBlockNodes;
+    keyInBlockNodes = NULL;
+}
+
+void OversetConfig::Initialize(UnstructGrid *gridIn,
+    int nZone, int iZone, int iBlock)
+{
+    geometricDimension = GetDim();
+    numberOfZones = nZone;
+    zoneIndex = iZone;
+    blockIndex = iBlock;
+    grid = gridIn;
+    oversetInformationProxy = NULL;
+
+    int numberOfNodes = grid->GetNTotalNode();
+
+    keyActiveOfNodes = new int[numberOfNodes];
+    SetField(keyActiveOfNodes, 0, numberOfNodes);
+
+    nodesMinDistanceInThisBlock = new RDouble[numberOfNodes];
+    SetField(nodesMinDistanceInThisBlock, LARGE, numberOfNodes);
+
+    keyInBlockNodes = new int[numberOfNodes];
+}
+
+void OversetConfig::SetInitialValue()
+{
+    interpolateCellList.resize(0);
+}
+
+//! Calculate the minimum box according to the cell.
+void OversetConfig::BuildMinMaxBoxOfZoneBySearchRegion()
+{
+    int numberOfCells = grid->GetNTotalCell();
+
+    int **cellNodeIndexContainer = grid->GetCell2NodeArray();
+    int *cellNodeNumberContainer = grid->GetNodeNumberOfEachCell();
+
+    vector< RDouble * > nodeCoordinate;
+    RDouble *x = grid->GetX();
+    nodeCoordinate.push_back(x);
+    RDouble *y = grid->GetY();
+    nodeCoordinate.push_back(y);
+    RDouble *z = grid->GetZ();
+    nodeCoordinate.push_back(z);
+
+    SetField(minBoxOfZone, LARGE, geometricDimension);
+    SetField(maxBoxOfZone, -LARGE, geometricDimension);
+
+    RDouble eps = GetToleranceForOversetBox();
+    for (int iDimension = 0; iDimension < geometricDimension; ++iDimension)
+    {
+        RDouble &minInThisDimension = minBoxOfZone[iDimension];
+        RDouble &maxInThisDimension = maxBoxOfZone[iDimension];
+        for (int iCell = 0; iCell < numberOfCells; ++iCell)
+        {
+            if (keySearchOfCells[iCell])
+            {
+                int cellNodeNumber = cellNodeNumberContainer[iCell];
+
+                for (int iNode = 0; iNode < cellNodeNumber; ++iNode)
+                {
+                    int &nodeIndex = cellNodeIndexContainer[iCell][iNode];
+
+                    RDouble &nodeCoordinateInThisDimension = nodeCoordinate[iDimension][nodeIndex];
+                    minInThisDimension = MIN(minInThisDimension, nodeCoordinateInThisDimension);
+                    maxInThisDimension = MAX(maxInThisDimension, nodeCoordinateInThisDimension);
+                }
+            }
+        }
+        minInThisDimension -= eps;
+        maxInThisDimension += eps;
+    }
+}
+
+void OversetConfig::SetInitialValueForBufferRigion()
+{
+    //! Because communicate_cell_iblank is the direct communication keyActiveOfCells.
+    //! keyBuffer is determined by keyActiveOfCells array.
+    int *keyActiveOfCells = this->GetKeyActiveOfCells();
+
+    int numberOfNodes = grid->GetNTotalNode();
+    int numberOfCells = grid->GetNTotalCell();
+
+    SetField(keyActiveOfNodes, 0, numberOfNodes);
+    SetField(keyActiveOfCells, 0, numberOfCells);
+
+    int numberOfInnerBoundaryNodes = static_cast<int>(innerBoundaryNodeList.size());
+    for (int iNode = 0; iNode < numberOfInnerBoundaryNodes; ++iNode)
+    {
+        keyActiveOfNodes[innerBoundaryNodeList[iNode]] = 1;
+    }
+}
+
+void OversetConfig::BuildNodesMinDistanceInThisBlock(vector< RDouble > *wallNodeCoordinateXInBlocksIn,
+    vector< RDouble > *wallNodeCoordinateYInBlocksIn,
+    vector< RDouble > *wallNodeCoordinateZInBlocksIn)
+{
+    int blockIndex = grid->GetIBlock();
+    int numberOfNodes = grid->GetNTotalNode();
+    int numberOfWallNodesInBlock = static_cast<int>(wallNodeCoordinateXInBlocksIn[blockIndex].size());
+
+    nodesMinDistanceInThisBlock = new RDouble[numberOfNodes];
+
+    if (!numberOfWallNodesInBlock)
+    {
+        double wallDistanceOfBackground = GlobalDataBase::GetDoubleParaFromDB("walldistMainZone");
+        SetField(nodesMinDistanceInThisBlock, wallDistanceOfBackground, numberOfNodes);
+        return;
+    }
+
+    RDouble *nodeCoordinateX = grid->GetX();
+    RDouble *nodeCoordinateY = grid->GetY();
+    RDouble *nodeCoordinateZ = grid->GetZ();
+
+    SetField(nodesMinDistanceInThisBlock, LARGE, numberOfNodes);
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        for (int iWallNode = 0; iWallNode < numberOfWallNodesInBlock; ++iWallNode)
+        {
+            RDouble dx = nodeCoordinateX[iNode] - wallNodeCoordinateXInBlocksIn[blockIndex][iWallNode];
+            RDouble dy = nodeCoordinateY[iNode] - wallNodeCoordinateYInBlocksIn[blockIndex][iWallNode];
+            RDouble dz = nodeCoordinateZ[iNode] - wallNodeCoordinateZInBlocksIn[blockIndex][iWallNode];
+            RDouble tempDistance = DISTANCE(dx, dy, dz);
+
+            nodesMinDistanceInThisBlock[iNode] = MIN(tempDistance, nodesMinDistanceInThisBlock[iNode]);
+        }
+    }
+}
+
+void OversetConfig::SetNodesMinDistanceInThisBlocksByWalldist()
+{
+    int numberOfNodes = grid->GetNTotalNode();
+    vector<RDouble> &nodeWalldist = grid->GetNodeWallDist();
+
+    SetField(nodesMinDistanceInThisBlock, &nodeWalldist[0], numberOfNodes);
+}
+
+void OversetConfig::SetNodesMinDistanceInOtherBlocks()
+{
+    int numberOfNodes = grid->GetNTotalNode();
+    vector<RDouble> &nodeWalldistInOtherBlocks = grid->GetNodeWallDistInOtherBlock();
+    nodesMinDistanceInOtherBlock = new RDouble[numberOfNodes];
+    SetField(nodesMinDistanceInOtherBlock, &nodeWalldistInOtherBlocks[0], numberOfNodes);
+}
+
+void OversetConfig::SetKeyBufferByKeyActive()
+{
+    //! Because communicate_cell_iblank is the direct communication keyActiveOfCells.
+    //! keyBuffer is determined by keyActiveOfCells array.
+    int numberOfNodes = grid->GetNTotalNode();
+    int numberOfCells = grid->GetNTotalCell();
+    keyBufferOfNodes = new int[numberOfNodes];
+    keyBufferOfCells = new int[numberOfCells];
+
+    int *keyActiveOfCells = this->GetKeyActiveOfCells();
+
+    SetField(keyBufferOfCells, keyActiveOfCells, numberOfCells);
+    SetField(keyBufferOfNodes, keyActiveOfNodes, numberOfNodes);
+}
+
+void OversetConfig::ComputeNodeAndCellTopology()
+{
+    grid->GetCell2NodeArray();
+    grid->GetCell2Face();
+}
+
+void OversetConfig::CopyMinDist(RDouble *nodesMinDistanceInOtherBlockIn)
+{
+    int numberOfNodes = grid->GetNTotalNode();
+    nodesMinDistanceInOtherBlock = new RDouble[numberOfNodes];
+    SetField(nodesMinDistanceInOtherBlock, LARGE, numberOfNodes);
+
+    int iSearchNode = 0;
+
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        if (keySearchOfNodes[iNode])
+        {
+            nodesMinDistanceInOtherBlock[iNode] = nodesMinDistanceInOtherBlockIn[iSearchNode++];
+        }
+    }
+
+    delete[] keySearchOfNodes;
+    keySearchOfNodes = NULL;
+}
+
+void OversetConfig::BuildMinMaxBoxOfZone()
+{
+    minBoxOfZone = new RDouble[geometricDimension];
+    maxBoxOfZone = new RDouble[geometricDimension];
+    SetField(minBoxOfZone, LARGE, geometricDimension);
+    SetField(maxBoxOfZone, -LARGE, geometricDimension);
+
+    vector< RDouble * > nodeCoordinate;
+    RDouble *x = grid->GetX();
+    nodeCoordinate.push_back(x);
+    RDouble *y = grid->GetY();
+    nodeCoordinate.push_back(y);
+    RDouble *z = grid->GetZ();
+    nodeCoordinate.push_back(z);
+
+    int numberOfNodes = grid->GetNTotalNode();
+    for (int iDimension = 0; iDimension < geometricDimension; ++iDimension)
+    {
+        RDouble &minInThisDimension = minBoxOfZone[iDimension];
+        RDouble &maxInThisDimension = maxBoxOfZone[iDimension];
+        for (int iNode = 0; iNode < numberOfNodes; ++ iNode)
+        {
+            RDouble &nodeCoordinateInThisDimension = nodeCoordinate[iDimension][iNode];
+            minInThisDimension = MIN(minInThisDimension, nodeCoordinateInThisDimension);
+            maxInThisDimension = MAX(maxInThisDimension, nodeCoordinateInThisDimension);
+        }
+    }
+}
+
+void OversetConfig::BuildKDTreeByMinMaxBoxOfZone()
+{
+    gridKDTree = new GridKDTree(grid, keySearchOfCells, minBoxOfZone, maxBoxOfZone);
+
+    delete[] keySearchOfCells;
+    keySearchOfCells = NULL;
+}
+
+RDouble OversetConfig::ComputeDistanceInDonorZone(RDouble *nodeCoordinateIn, int donorCell)
+{
+    if (donorCell < 0)
+    {
+        return LARGE;
+    }
+
+    int **cellNodeIndexContainer = grid->GetCell2NodeArray();
+    int *cellNodeNumberContainer = grid->GetNodeNumberOfEachCell();
+
+    RDouble *coordinateX = grid->GetX();
+    RDouble *coordinateY = grid->GetY();
+    RDouble *coordinateZ = grid->GetZ();
+
+    int &numberOfNodeInCell = cellNodeNumberContainer[donorCell];
+
+    RDouble weightDist = 0.0;
+    RDouble weight = 0.0;
+
+    for (int iNode = 0; iNode < numberOfNodeInCell; ++iNode)
+    {
+        int &nodeIndex = cellNodeIndexContainer[donorCell][iNode];
+
+        RDouble dx = nodeCoordinateIn[0] - coordinateX[nodeIndex];
+        RDouble dy = nodeCoordinateIn[1] - coordinateY[nodeIndex];
+        RDouble dz = nodeCoordinateIn[2] - coordinateZ[nodeIndex];
+        RDouble dist = DISTANCE(dx, dy, dz) + TINY;
+
+        weight += 1.0 / dist;
+        weightDist += 1.0 / dist * nodesMinDistanceInThisBlock[nodeIndex];
+    }
+
+    weightDist /= ( weight + TINY );
+
+    return weightDist;
+}
+
+//! Interpolation boundary is determined according to the local distance and neighbor distance.
+//! Overset boundary can be ignored.
+void OversetConfig::SpecifyInitialInterNodesByDistance()
+{
+    int numberOfNodes = grid->GetNTotalNode();
+
+    keyBasicActiveNodes = new int[numberOfNodes];
+    SetField(keyBasicActiveNodes, 0, numberOfNodes);
+
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        if (nodesMinDistanceInOtherBlock[iNode] > nodesMinDistanceInThisBlock[iNode])
+        {
+            keyBasicActiveNodes[iNode] = 1;
+        }
+    }
+
+    delete[] nodesMinDistanceInOtherBlock;
+    nodesMinDistanceInOtherBlock = NULL;
+}
+
+//! Any two points of an cell pass through the physical plane, the cell is a boundary cell.
+//! This method isn't applicable in the presence of background grid.
+void OversetConfig::SpecifySpecicalCellsInteractWithWallBoundary()
+{
+    int numberOfCells = grid->GetNTotalCell();
+    int numberOfNodes = grid->GetNTotalNode();
+
+    int **cellNodeIndexContainer = grid->GetCell2NodeArray();
+    int *cellNodeNumberContainer = grid->GetNodeNumberOfEachCell();
+
+    int *innerCellOrNot = new int[numberOfCells];
+
+    SetField(innerCellOrNot, 0, numberOfCells);
+    SetField(keyInBlockNodes, 0, numberOfNodes);
+
+    RDouble *xNode = grid->GetX();
+    RDouble *yNode = grid->GetY();
+    RDouble *zNode = grid->GetZ();
+
+    for (int iCell = 0; iCell < numberOfCells; ++iCell)
+    {
+        int node1 = cellNodeIndexContainer[iCell][0];
+
+        int numberOfNodeInCell = cellNodeNumberContainer[iCell];
+
+        for (int iNode = 1; iNode < numberOfNodeInCell; ++iNode)
+        {
+            int node2 = cellNodeIndexContainer[iCell][iNode];
+
+            RDouble dist1 = nodesMinDistanceInOtherBlock[node1];
+            RDouble dist2 = nodesMinDistanceInOtherBlock[node2];
+
+            RDouble dx = xNode[node1] - xNode[node2];
+            RDouble dy = yNode[node1] - yNode[node2];
+            RDouble dz = zNode[node1] - zNode[node2];
+
+            RDouble length = DISTANCE(dx, dy, dz);
+
+            if (dist1 < length || dist2 < length)
+            {
+                if (dist2 > 0.5 * LARGE || dist1 > 0.5 * LARGE)
+                {
+                    innerCellOrNot[iCell] = 1;
+                    break;
+                }
+            }
+        }
+    }
+
+    for (int iCell = 0; iCell < numberOfCells; ++iCell)
+    {
+        if (innerCellOrNot[iCell] == 1)
+        {
+            for (int iNode = 0; iNode < cellNodeNumberContainer[iCell]; ++iNode)
+            {
+                int nodeIndex = cellNodeIndexContainer[iCell][iNode];
+                keyInBlockNodes[nodeIndex] = 1;
+            }
+        }
+    }
+    delete[]innerCellOrNot;
+}
+
+void OversetConfig::SetNegativeForBufferRegion()
+{
+    int numberOfNodes = grid->GetNTotalNode();
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        if (keyBufferOfNodes[iNode])
+        {
+            keyActiveOfNodes[iNode] = 0;
+        }
+    }
+}
+
+void OversetConfig::SetNegativeForInnerNodes()
+{
+    int numberOfNodes = grid->GetNTotalNode();
+
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        if (keyInBlockNodes[iNode])
+        {
+            keyActiveOfNodes[iNode] = 0;
+        }
+    }
+}
+
+void OversetConfig::SetNegativeForInnerAndInitialInterNodes()
+{
+    int numberOfNodes = grid->GetNTotalNode();
+
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        if (!keyBasicActiveNodes[iNode] || keyInBlockNodes[iNode])
+        {
+            keyActiveOfNodes[iNode] = 0;
+        }
+    }
+}
+
+void OversetConfig::SetNodeCharacterOnPhysicalBoundary()
+{
+    int *keyActiveOfCells = this->GetKeyActiveOfCells();
+
+    int numberOfNodes = grid->GetNTotalNode();
+    int numberOfCells = grid->GetNTotalCell();
+
+    SetField(keyActiveOfNodes, 0, numberOfNodes);
+    SetField(keyActiveOfCells, 0, numberOfCells);
+
+    int numberOfPhysicalBoundaryNodes = static_cast<int>(physicalBoundaryNodeList.size());
+    for (int iNode = 0; iNode < numberOfPhysicalBoundaryNodes; ++iNode)
+    {
+        keyActiveOfNodes[physicalBoundaryNodeList[iNode]] = 1;
+    }
+}
+
+void OversetConfig::FillTheRemainingNodes()
+{
+    int numberOfNodes = grid->GetNTotalNode();
+
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        if (keyActiveOfNodes[iNode] == 0)
+        {
+            keyActiveOfNodes[iNode] = -1;
+        }
+    }
+}
+
+void OversetConfig::SetActivePropertyForSearchRegion()
+{
+    //! Because communicate_cell_iblank is the direct communication keyActiveOfCells.
+    //! keyBuffer is determined by keyActiveOfCells array.
+    OversetConfigFactoryMulti *overs = GetOversetConfigFactoryMulti();
+    RDouble **pMinOfBlocks = overs->GetMinBoxOfBlocks();
+    RDouble **pMaxOfBlocks = overs->GetMaxBoxOfBlocks();
+
+    int numberOfNodes = grid->GetNTotalNode();
+    int numberOfCells = grid->GetNTotalCell();
+    int *keyActiveOfCells = GetKeyActiveOfCells();
+
+    SetField(keyActiveOfNodes, 0, numberOfNodes);
+    SetField(keyActiveOfCells, 0, numberOfCells);
+
+    vector< RDouble * > nodeCoordinate;
+    RDouble *x = grid->GetX();
+    nodeCoordinate.push_back(x);
+    RDouble *y = grid->GetY();
+    nodeCoordinate.push_back(y);
+    RDouble *z = grid->GetZ();
+    nodeCoordinate.push_back(z);
+
+    int blockIndex = grid->GetIBlock();
+    int numberOfBlocks = overs->GetNumberOfBlocks();
+    for (int iBlock = 0; iBlock < numberOfBlocks; ++iBlock)
+    {
+        if (iBlock != blockIndex)
+        {
+            for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+            {
+                if (IfNodeIsInBox(nodeCoordinate, iNode, pMinOfBlocks[iBlock], pMaxOfBlocks[iBlock], geometricDimension))
+                {
+                    keyActiveOfNodes[iNode] = 1;
+                }
+            }
+        }
+    }
+}
+
+void OversetConfig::SetSearchRegionByActiveProperty()
+{
+    //! keySearch is determined by keyActive array.
+    int numberOfNodes = grid->GetNTotalNode();
+    int numberOfCells = grid->GetNTotalCell();
+
+    keySearchOfNodes = new int[numberOfNodes];
+    keySearchOfCells = new int[numberOfCells];
+
+    int *keyActiveOfCells = this->GetKeyActiveOfCells();
+
+    SetField(keySearchOfNodes, keyActiveOfNodes, numberOfNodes);
+    SetField(keySearchOfCells, keyActiveOfCells, numberOfCells);
+}
+
+//! It is an active cell if the all cell nodes are 1.
+void OversetConfig::FindActiveCells()
+{
+    int numberOfCells = grid->GetNTotalCell();
+
+    int **cellNodeIndex = grid->GetCell2NodeArray();
+    int *cellNodeNumber = grid->GetNodeNumberOfEachCell();
+
+    int *keyActiveOfCells = this->GetKeyActiveOfCells();
+
+    SetField(keyActiveOfCells, 1, numberOfCells);
+
+    for (int iCell = 0; iCell < numberOfCells; ++iCell)
+    {
+        int &numberOfNodeInCell = cellNodeNumber[iCell];
+        for (int iNode = 0; iNode < numberOfNodeInCell; ++iNode)
+        {
+            if (!keyActiveOfNodes[cellNodeIndex[iCell][iNode]])
+            {
+                keyActiveOfCells[iCell] = 0;
+                break;
+            }
+        }
+    }
+}
+
+void OversetConfig::SearchZonesSearchNodesInKDTree()
+{
+    RDouble *nodeCoordinate = new RDouble[THREE_D];
+    int blockIndex = grid->GetIBlock();
+
+    ZoneSearchNodes **zonesSearchNodes = GetOversetConfigFactoryMulti()->GetZonesSearchNodes();
+    for (int iZone = 0; iZone < numberOfZones; ++iZone)
+    {
+        ZoneSearchNodes *&zoneSearchNodes = zonesSearchNodes[iZone];
+        RDouble *pMin = zoneSearchNodes->GetPMin();
+        RDouble *pMax = zoneSearchNodes->GetPMax();
+
+        if (blockIndex != zoneSearchNodes->GetBlockIndex())
+        {
+            if (IfZoneSearchNodesIntersectionWithThisZone(pMin, pMax))
+            {
+                int numberOfSearchNodes = zoneSearchNodes->GetNumberOfNodes();
+
+                RDouble *searchNodeCoordinateX = zoneSearchNodes->GetX();
+                RDouble *searchNodeCoordinateY = zoneSearchNodes->GetY();
+                RDouble *searchNodeCoordinateZ = zoneSearchNodes->GetZ();
+
+                RDouble *nodesMinDistanceToOtherBlock = zoneSearchNodes->GetNodesMinDistanceToOtherBlock();
+
+                for (int iNode = 0; iNode < numberOfSearchNodes; ++iNode)
+                {
+                    RDouble &nodesMinDistanceInOtherBlockOfThisNode = nodesMinDistanceToOtherBlock[iNode];
+
+                    nodeCoordinate[0] = searchNodeCoordinateX[iNode];
+                    nodeCoordinate[1] = searchNodeCoordinateY[iNode];
+                    nodeCoordinate[2] = searchNodeCoordinateZ[iNode];
+
+                    nodesMinDistanceInOtherBlockOfThisNode = MIN(nodesMinDistanceInOtherBlockOfThisNode,
+                        ComputeDistanceInDonorZone(nodeCoordinate, FindDonorCell(nodeCoordinate)));
+                }
+            }
+        }
+    }
+
+    delete[] nodeCoordinate;
+    nodeCoordinate = NULL;
+}
+
+int OversetConfig::FindDonorCell(RDouble *nodeCoordinateIn)
+{
+    int donorCellIndex = gridKDTree->SearchNodeInKDTree(nodeCoordinateIn);
+    if (donorCellIndex != -1)
+    {
+        if (keyBufferOfCells[donorCellIndex]) donorCellIndex = -1;
+    }
+
+    return donorCellIndex;
+}
+
+//! It is an interpolation cell if the cell node has both 1 and 0.
+void OversetConfig::FindInterCells()
+{
+    int numberOfCells = grid->GetNTotalCell();
+
+    int **cellNodeIndexContainer = grid->GetCell2NodeArray();
+    int *cellNodeNumberContainer = grid->GetNodeNumberOfEachCell();
+
+    int *keyActiveOfCells = this->GetKeyActiveOfCells();
+
+    for (int iCell = 0; iCell < numberOfCells; ++iCell)
+    {
+        if (keyActiveOfCells[iCell] == 0)
+        {
+            int numberOfNodeInCell = cellNodeNumberContainer[iCell];
+            for (int iNode = 0; iNode < numberOfNodeInCell; ++iNode)
+            {
+                int nodeIndex = cellNodeIndexContainer[iCell][iNode];
+                if (keyActiveOfNodes[nodeIndex])
+                {
+                    keyActiveOfCells[iCell] = -1;
+                    interpolateCellList.push_back(iCell);
+                    break;
+                }
+            }
+        }
+    }
+}
+
+void OversetConfig::InitializeOversetInformation()
+{
+    //! Movement of the mesh, because of the ressembly of the mesh, it is necessary to delete oversetInformationProxy and regenerate it.
+    if (oversetInformationProxy != 0)
+    {
+        delete oversetInformationProxy;
+        oversetInformationProxy = 0;
+    }
+
+    oversetInformationProxy = new OversetInformationProxy();
+    oversetInformationProxy->SetGrid(grid);
+    grid->SetOversetInformationProxy(oversetInformationProxy);
+
+    //
+    PHVector1D < OversetCell * > *oversetCellContainer = new PHVector1D < OversetCell * >();
+
+    InterCells **zonesInterpolateCells = GetOversetConfigFactoryMulti()->GetZonesInterpolateCells();
+    InterCells *zoneInterpolateCells = zonesInterpolateCells[zoneIndex];
+
+    int numberOfInterCells = zoneInterpolateCells->GetNumberOfInterCells();
+
+    int *donorCellIndex = zoneInterpolateCells->GetDonorCellIndex();
+    int *donorZoneIndex = zoneInterpolateCells->GetDonorZoneIndex();
+
+    for (int iCell = 0; iCell < numberOfInterCells; ++iCell)
+    {
+        int interCell = interpolateCellList[iCell];
+        int donorCell = donorCellIndex[iCell];
+        int donorZone = donorZoneIndex[iCell];
+
+        OversetCell *oversetCell = new OversetCell();
+        oversetCell->SetCellIndex(interCell);
+        oversetCell->SetZoneIndex(zoneIndex);
+        oversetCell->SetDonorCellIndex(donorCell);
+        oversetCell->SetDonorZoneIndex(donorZone);
+
+        oversetCellContainer->push_back(oversetCell);
+    }
+
+    oversetInformationProxy->InitializeReceivingInformation(oversetCellContainer);
+}
+
+void OversetConfig::PostProcessOversetInformation()
+{
+    oversetInformationProxy->PostProcessOversetInformation();
+}
+
+void OversetConfig::MarkGlobalInterfaceNodes(int iBlock, vector< int > &keyNodesGlobal)
+{
+    if (blockIndex != iBlock) return;
+
+    int numberOfInterNodes = static_cast<int>(interfaceBoundaryNodeList.size());
+    for (int iNode = 0; iNode < numberOfInterNodes; ++iNode)
+    {
+        int localNodeIndex = interfaceBoundaryNodeList[iNode];
+        int globalNodeIndex = localToGlobalNodesIndex[localNodeIndex];
+        keyNodesGlobal[globalNodeIndex] = 1;
+    }
+}
+
+void OversetConfig::CalLocalToGlobalInterfaceNodes(int iBlock, vector< int > &keyNodesGlobal)
+{
+    if (blockIndex != iBlock) return;
+
+    int numberOfInterNodes = static_cast<int>(interfaceBoundaryNodeList.size());
+    localToGlobalInterNodesIndex.resize(numberOfInterNodes);
+
+    for (int iNode = 0; iNode < numberOfInterNodes; ++iNode)
+    {
+        int localNodeIndex = interfaceBoundaryNodeList[iNode];
+        int globalNodeIndex = localToGlobalNodesIndex[localNodeIndex];
+        int globelInterNodeIndex = keyNodesGlobal[globalNodeIndex];
+
+        //! Connection from local interNodes to global sequence.
+        localToGlobalInterNodesIndex[iNode] = globelInterNodeIndex;
+    }
+}
+
+//! If a cell has a node of 1, its attributes is 1, otherwise it is 0.
+void OversetConfig::CharacterNodeToCell()
+{
+    int numberOfCells = grid->GetNTotalCell();
+
+    int **cellNodeIndex = grid->GetCell2NodeArray();
+    int *cellNodeNumber = grid->GetNodeNumberOfEachCell();
+
+    int *keyActiveOfCells = this->GetKeyActiveOfCells();
+    //SetField(keyActiveOfCells, 0, numberOfCells);
+
+    for (int iCell = 0; iCell < numberOfCells; ++iCell)
+    {
+        int &numberOfNodeInCell = cellNodeNumber[iCell];
+        for (int iNode = 0; iNode < numberOfNodeInCell; ++iNode)
+        {
+            if (keyActiveOfNodes[cellNodeIndex[iCell][iNode]])
+            {
+                keyActiveOfCells[iCell] = 1;
+                break;
+            }
+        }
+    }
+}
+
+//! Property of the point on interface is judged by the property of the virtual cell on interface.
+void OversetConfig::CharacterInterfaceToNode()
+{
+    int numberOfBoundaryFaces = grid->GetNBoundFace();
+
+    UnstructBCSet **unstructBCSet = grid->GetBCRecord();
+
+    int *faceNodeNumber = grid->GetNodeNumberOfEachFace();
+    int *faceNodeIndex = grid->GetFace2Node();
+
+    int *leftCellIndex = grid->GetLeftCellOfFace();
+    int *rightCellIndex = grid->GetRightCellOfFace();
+
+    int *keyActiveOfCells = grid->GetBlankIndex();
+
+    int iCount = 0;
+    for (int iFace = 0; iFace < numberOfBoundaryFaces; ++iFace)
+    {
+        int boundaryType = unstructBCSet[iFace]->GetKey();
+
+        int numberOfNodesInFace = faceNodeNumber[iFace];
+
+        int leftCell = leftCellIndex[iFace];
+        int rightCell = rightCellIndex[iFace];
+
+        if (boundaryType == PHENGLEI::INTERFACE)
+        {
+            if (keyActiveOfCells[leftCell] != 1 && keyActiveOfCells[rightCell] != 1)
+            {
+                iCount += numberOfNodesInFace;
+                continue;
+            }
+
+            for (int iNode = 0; iNode < numberOfNodesInFace; ++iNode)
+            {
+                int nodeIndex = faceNodeIndex[iCount];
+                keyActiveOfNodes[nodeIndex] = 1;
+                iCount++;
+            }
+        }
+        else
+        {
+            iCount += numberOfNodesInFace;
+        }
+    }
+}
+
+void OversetConfig::CharacterCellToNode()
+{
+    int *keyActiveOfCells = this->GetKeyActiveOfCells();
+
+    int numberOfCells = grid->GetNTotalCell();
+
+    int **cellNodeIndexContainer = grid->GetCell2NodeArray();
+    int *cellNodeNumberContainer = grid->GetNodeNumberOfEachCell();
+
+    for (int iCell = 0; iCell < numberOfCells; ++iCell)
+    {
+        if (keyActiveOfCells[iCell])
+        {
+            int &numberOfNodeInCell = cellNodeNumberContainer[iCell];
+            for (int iNode = 0; iNode < numberOfNodeInCell; ++iNode)
+            {
+                int &nodeIndex = cellNodeIndexContainer[iCell][iNode];
+                keyActiveOfNodes[nodeIndex] = 1;
+            }
+        }
+    }
+}
+
+//! Property of the point on interface is judged by the property of the virtual cell on interface.
+int OversetConfig::CharacterNodeToValidNodeByCell()
+{
+    int numberOfCells = grid->GetNTotalCell();
+
+    int **cellNodeIndexContainer = grid->GetCell2NodeArray();
+    int *cellNodeNumberContainer = grid->GetNodeNumberOfEachCell();
+
+    int *keyActiveOfCells = this->GetKeyActiveOfCells();
+
+    int numberOfNewNodes = 0;
+
+    for (int iCell = 0; iCell < numberOfCells; ++iCell)
+    {
+        int cellNodeNumber = cellNodeNumberContainer[iCell];
+
+        for (int iNode = 0; iNode < cellNodeNumber; ++iNode)
+        {
+            int nodeIndex = cellNodeIndexContainer[iCell][iNode];
+
+            if (keyActiveOfNodes[nodeIndex])
+            {
+                keyActiveOfCells[iCell] = 1;
+                break;
+            }
+        }
+
+        if (keyActiveOfCells[iCell])
+        {
+            for (int iNode = 0; iNode < cellNodeNumber; ++iNode)
+            {
+                int &nodeIndex = cellNodeIndexContainer[iCell][iNode];
+                if (keyBasicActiveNodes[nodeIndex] && !keyInBlockNodes[nodeIndex] && !keyActiveOfNodes[nodeIndex])
+                {
+                    keyActiveOfNodes[nodeIndex] = 1;
+                    numberOfNewNodes++;
+                }
+            }
+        }
+    }
+    return numberOfNewNodes;
+}
+
+void OversetConfig::CheckInterpolateRelationship(int iBlockIn,
+    InterCells *zoneInterpolateCellsIn,
+    int &numberOfInterpolateCellsInThisBlockIn,
+    int &numberOfNegativeCellsInThisBlock_1In,
+    int &numberOfNegativeCellsInThisBlock_2In,
+    int &numberOfNegativeCellsInThisBlock_3In)
+{
+    if (iBlockIn == zoneInterpolateCellsIn->GetBlockIndex())
+    {
+        int        zoneIndex = grid->GetZoneID();
+
+        int        numberOfInterpolateCells = zoneInterpolateCellsIn->GetNumberOfInterCells();
+
+        int *donorLevel = zoneInterpolateCellsIn->GetKey();
+
+        int *donorZoneIndex = zoneInterpolateCellsIn->GetDonorZoneIndex();
+        int *donorCellIndex = zoneInterpolateCellsIn->GetDonorCellIndex();
+
+        RDouble *interpolateCellCenterX = zoneInterpolateCellsIn->GetX();
+        RDouble *interpolateCellCenterY = zoneInterpolateCellsIn->GetY();
+        RDouble *interpolateCellCenterZ = zoneInterpolateCellsIn->GetZ();
+
+        for (int iCell = 0; iCell < numberOfInterpolateCells; ++iCell)
+        {
+            ++numberOfInterpolateCellsInThisBlockIn;
+            int &donorLevelOfThisCell = donorLevel[iCell];
+            switch (donorLevelOfThisCell)
+            {
+            case -3:
+                ++numberOfNegativeCellsInThisBlock_3In;
+                /*cout << "ERROR:" << endl;
+                cout << "DonorLevel  = " << donorLevelOfThisCell << endl;
+                cout << "Interpolate = " << zoneIndex << " -> " << interpolateCellList[iCell] << endl;
+                cout << "Donor       = " << donorZoneIndex[iCell] << " -> " << donorCellIndex[iCell] << endl;
+                cout << "Postion     = " << setprecision(8) << setw(12)
+                    << interpolateCellCenterX[iCell] << " "
+                    << interpolateCellCenterY[iCell] << " "
+                    << interpolateCellCenterZ[iCell] << endl;*/
+                break;
+            case -2:
+                ++numberOfNegativeCellsInThisBlock_2In;
+              /*  cout << "WARNING:" << endl;
+                cout << "DonorLevel  = " << donorLevelOfThisCell << endl;
+                cout << "Interpolate = " << zoneIndex << "->" << interpolateCellList[iCell] << endl;
+                cout << "Donor       = " << donorZoneIndex[iCell] << "->" << donorCellIndex[iCell] << endl;
+                cout << "Postion     = " << setprecision(8) << setw(12)
+                    << interpolateCellCenterX[iCell] << " "
+                    << interpolateCellCenterY[iCell] << " "
+                    << interpolateCellCenterZ[iCell] << endl;*/
+                break;
+            case -1:
+                ++numberOfNegativeCellsInThisBlock_1In;
+                break;
+            }
+        }
+    }
+}
+
+void OversetConfig::DownInterfaceNodeCharacter()
+{
+    int    blockIndex = grid->GetIBlock();
+    int **keyOfInterfaceNodesInBlocks = GetOversetConfigFactoryMulti()->GetKeyOfInterfaceNodesInBlocks();
+
+    int numberOfInterfaceBoundaryNodes = static_cast<int>(interfaceBoundaryNodeList.size());
+    for (int iNode = 0; iNode < numberOfInterfaceBoundaryNodes; ++ iNode)
+    {
+        keyActiveOfNodes[interfaceBoundaryNodeList[iNode]] =
+            keyOfInterfaceNodesInBlocks[blockIndex][localToGlobalInterfaceNodesMap[iNode]];
+    }
+}
+
+void OversetConfig::UpdateInterfaceNodeCharacter()
+{
+    int blockIndex = grid->GetIBlock();
+    int **keyOfInterfaceNodesInBlocks = GetOversetConfigFactoryMulti()->GetKeyOfInterfaceNodesInBlocks();
+
+    int numberOfInterfaceBoundaryNodes = static_cast<int>(interfaceBoundaryNodeList.size());
+    for (int iNode = 0; iNode < numberOfInterfaceBoundaryNodes; ++ iNode)
+    {
+        int &valueGlobal = keyOfInterfaceNodesInBlocks[blockIndex][localToGlobalInterfaceNodesMap[iNode]];
+        valueGlobal = MAX(valueGlobal, keyActiveOfNodes[interfaceBoundaryNodeList[iNode]]);
+    }
+}
+
+void OversetConfig::ShowBoundaryCells()
+{
+    string fileName = AddSymbolToFileName("./results/boundaryCells.dat", zoneIndex);
+
+    fstream file;
+
+    PHSPACE::OpenFile(file, fileName, ios_base::out);
+
+    int numberOfNodes = grid->GetNTotalNode();
+    int numberOfFaces = grid->GetNTotalFace();
+    int numberOfCells = grid->GetNTotalCell();
+
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    int *faceNodeNumberContainer = grid->GetNodeNumberOfEachFace();
+    int *faceNodeIndexContainer = grid->GetFace2Node();
+    int *leftCellIndexContainer = grid->GetLeftCellOfFace();
+    int *rightCellIndexContainer = grid->GetRightCellOfFace();
+
+    int numberOfNodesInZone = 0;
+    int numberOfFacesInZone = 0;
+    int numberOfCellsInZone = 0;
+
+    vector< int > keyNodes;
+    vector< int > keyFaces;
+    vector< int > nodeList;
+    vector< int > cellList;
+
+    keyNodes.resize(numberOfNodes);
+    keyFaces.resize(numberOfFaces);
+    nodeList.resize(numberOfNodes);
+    cellList.resize(numberOfCells);
+
+    SetField(keyNodes, 0, numberOfNodes);
+    SetField(keyFaces, 0, numberOfFaces);
+    SetField(nodeList, -1, numberOfNodes);
+    SetField(cellList, 0, numberOfCells);
+
+    int **cellNodeIndexContainer = grid->GetCell2NodeArray();
+    int *cellNodeNumberContainer = grid->GetNodeNumberOfEachCell();
+
+    int **cellFaceIndexContainer = grid->GetCell2Face();
+
+    int *cellFaceNumberContainer = grid->GetFaceNumberOfEachCell();
+
+    for (int iCell = 0; iCell < numberOfCells; ++iCell)
+    {
+        bool innerCellOrNot = false;
+        for (int iNode = 0; iNode < cellNodeNumberContainer[iCell]; ++iNode)
+        {
+            int nodeIndex = cellNodeIndexContainer[iCell][iNode];
+            if (keyInBlockNodes[nodeIndex])
+            {
+                innerCellOrNot = true;
+                continue;
+            }
+        }
+        if (innerCellOrNot)
+        {
+            numberOfCellsInZone++;
+            cellList[iCell] = numberOfCellsInZone;
+
+            for (int iNodes = 0; iNodes < cellNodeNumberContainer[iCell]; ++iNodes)
+            {
+                keyNodes[cellNodeIndexContainer[iCell][iNodes]] = 1;
+            }
+
+            for (int iFaces = 0; iFaces < cellFaceNumberContainer[iCell]; ++iFaces)
+            {
+                keyFaces[cellFaceIndexContainer[iCell][iFaces]] = 1;
+            }
+        }
+    }
+
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        if (keyNodes[iNode] == 1)
+        {
+            numberOfNodesInZone++;
+            nodeList[iNode] = numberOfNodesInZone;
+        }
+    }
+
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        if (keyFaces[iFace] == 1)
+        {
+            numberOfFacesInZone++;
+        }
+    }
+
+    if (numberOfCellsInZone == 0)
+    {
+        return;
+    }
+
+    file << "title     = \"overset grid \"\n";
+    file << "variables = \"x\" \"y\" \"z\"\n";
+
+    file << "ZONE T=\"Boundary Cells\" \n";
+
+    if (PHSPACE::GetDim() == THREE_D)
+    {
+        file << "ZoneType = FEPolyhedron\n";
+    }
+    else
+    {
+        file << "ZoneType = FEPolygon\n";
+    }
+
+    int totalNumFaceNodes = 0;
+
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        if (keyFaces[iFace] != 1) continue;
+        totalNumFaceNodes += faceNodeNumberContainer[iFace];
+    }
+
+    file << "Nodes    = " << numberOfNodesInZone << "\n";
+    file << "Faces    = " << numberOfFacesInZone << "\n";
+    file << "Elements = " << numberOfCellsInZone << "\n";
+    file << "TotalNumFaceNodes = " << totalNumFaceNodes << "\n";
+    file << "NumConnectedBoundaryFaces = 0\n";
+    file << "TotalNumBoundaryConnections = 0\n";
+
+    int numberOfWordsInEachLine = 5;
+    int iPrint = 0;
+
+    //nodes coordinate x
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        if (keyNodes[iNode] != 1) continue;
+        file << x[iNode] << " ";
+        iPrint++;
+        if (iPrint % numberOfWordsInEachLine == 0) file << "\n";
+    }
+    if (iPrint % numberOfWordsInEachLine != 0) file << "\n";
+
+    //nodes coordinate y
+    iPrint = 0;
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        if (keyNodes[iNode] != 1) continue;
+        file << y[iNode] << " ";
+        iPrint++;
+        if (iPrint % numberOfWordsInEachLine == 0) file << "\n";
+    }
+    if (iPrint % numberOfWordsInEachLine != 0) file << "\n";
+
+    //nodes coordinate z
+    iPrint = 0;
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        if (keyNodes[iNode] != 1) continue;
+        file << z[iNode] << " ";
+        iPrint++;
+        if (iPrint % numberOfWordsInEachLine == 0) file << "\n";
+    }
+    if (iPrint % numberOfWordsInEachLine != 0) file << "\n";
+
+    //face nodes number
+    iPrint = 0;
+    if (PHSPACE::GetDim() == THREE_D)
+    {
+        for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+        {
+            if (keyFaces[iFace] != 1) continue;
+            file << faceNodeNumberContainer[iFace] << " ";
+            iPrint++;
+            if (iPrint % numberOfWordsInEachLine == 0) file << "\n";
+        }
+        if (iPrint % numberOfWordsInEachLine != 0) file << "\n";
+    }
+
+    //face nodes list
+    int count = 0;
+    iPrint = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        int faceNodeNumber = faceNodeNumberContainer[iFace];
+
+        if (keyFaces[iFace] == 0)
+        {
+            count += faceNodeNumber;
+            continue;
+        }
+
+        for (int iNode = 0; iNode < faceNodeNumberContainer[iFace]; ++iNode)
+        {
+            int nodeIndex = nodeList[faceNodeIndexContainer[count++]];
+            file << nodeIndex << " ";
+            iPrint++;
+            if (iPrint % numberOfWordsInEachLine == 0) file << "\n";
+        }
+    }
+    if (iPrint % numberOfWordsInEachLine != 0) file << "\n";
+
+    //left cell
+    iPrint = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        if (keyFaces[iFace] == 0) continue;
+
+        int cellIndex = cellList[leftCellIndexContainer[iFace]];
+        file << cellIndex << " ";
+        iPrint++;
+        if (iPrint % numberOfWordsInEachLine == 0) file << "\n";
+    }
+    if (iPrint % numberOfWordsInEachLine != 0) file << "\n";
+
+    //right cell
+    iPrint = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        int cellIndex;
+        if (keyFaces[iFace] == 0) continue;
+        int rightCell = rightCellIndexContainer[iFace];
+
+        if (rightCell >= numberOfCells || rightCell < 0)
+        {
+            cellIndex = 0;
+        }
+        else
+        {
+            cellIndex = cellList[rightCellIndexContainer[iFace]];
+        }
+
+        file << cellIndex << " ";
+        iPrint++;
+        if (iPrint % numberOfWordsInEachLine == 0) file << "\n";
+    }
+    if (iPrint % numberOfWordsInEachLine != 0) file << "\n";
+
+    PHSPACE::CloseFile(file);
+}
+
+void OversetConfig::OutPutOversetVisualization(const string &name)
+{
+    ostringstream oss;
+    oss << "OversetOutput/" << name << "/" << grid->GetZoneID() << ".dat";
+
+    string fileName = oss.str();
+
+    fstream file;
+
+    OpenFile(file, fileName, ios_base::out | ios_base::trunc);
+
+    OutPutOversetVisualizationHeader(file);
+    OutPutOversetVisualizationCell(file);
+    OutPutOversetVisualizationPoint(file);
+    OutPutOversetVisualizationTail(file);
+
+    CloseFile(file);
+}
+
+void OversetConfig::OutPutOversetVisualizationHeader(fstream &file)
+{
+    int numberOfNodes = grid->GetNTotalNode();
+    int numberOfFaces = grid->GetNTotalFace();
+    int numberOfCells = grid->GetNTotalCell();
+
+    RDouble *nodeCoordinateX = grid->GetX();
+    RDouble *nodeCoordinateY = grid->GetY();
+    RDouble *nodeCoordinateZ = grid->GetZ();
+
+    int *faceNodeNumber = grid->GetNodeNumberOfEachFace();
+
+    file << "Title = \"OverSetVisualization\"" << endl << endl;
+
+    file << "Variables = \"X\" \"Y\" \"Z\"" << endl;
+    file << "\"keyActiveOfCells\" \"keyBufferOfCells\" \"keySearchOfCells\" \"interpolateCellList\"" << endl;
+    file << "\"keyActiveOfNodes\" \"keyBufferOfNodes\" \"keySearchOfNodes\" \"keyInBlockNodes\" " << endl;
+    file << "\"keyBasicActiveNodes\"  \"nodesMinDistanceInOtherBlock\" " << endl;
+    file << endl;
+
+    file << "Zone T    = \"Zone_" << grid->GetZoneID() << "\"" << endl << endl;
+    file << "VARLOCATION = ( [1-3,8-13]=NODAL, [4-7]=CELLCENTERED )" << endl << endl;
+    if (THREE_D == geometricDimension)
+    {
+        file << "ZoneType = FEPolyhedron" << endl << endl;
+    }
+    else
+    {
+        file << "ZoneType = FEPolygon" << endl << endl;
+    }
+
+    int totalNumberOfFaceNodes = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        totalNumberOfFaceNodes += faceNodeNumber[iFace];
+    }
+    file << "Nodes                       = " << numberOfNodes << endl;
+    file << "Faces                       = " << numberOfFaces << endl;
+    file << "Elements                    = " << numberOfCells << endl;
+    file << "TotalNumFaceNodes           = " << totalNumberOfFaceNodes << endl;
+    file << "NumConnectedBoundaryFaces   = 0" << endl;
+    file << "TotalNumBoundaryConnections = 0" << endl;
+    file << endl;
+
+    OutPutValueName(file, "nodeCoordinateX");
+    OutPutPointerValue(file, numberOfNodes, nodeCoordinateX);
+
+    OutPutValueName(file, "nodeCoordinateY");
+    OutPutPointerValue(file, numberOfNodes, nodeCoordinateY);
+
+    OutPutValueName(file, "nodeCoordinateZ");
+    OutPutPointerValue(file, numberOfNodes, nodeCoordinateZ);
+}
+
+void OversetConfig::OutPutOversetVisualizationCell(fstream &file)
+{
+    int numberOfCells = grid->GetNTotalCell();
+
+    OutPutValueName(file, "keyActiveOfCells");
+    OutPutPointerValue(file, numberOfCells, GetKeyActiveOfCells());
+
+    OutPutValueName(file, "keyBufferOfCells");
+    OutPutPointerValue(file, numberOfCells, keyBufferOfCells);
+
+    OutPutValueName(file, "keySearchOfCells");
+    OutPutPointerValue(file, numberOfCells, keySearchOfCells);
+
+    OutPutValueName(file, "interpolateCellList");
+    OutPutVectorValue(file, numberOfCells, interpolateCellList);
+}
+
+void OversetConfig::OutPutOversetVisualizationPoint(fstream &file)
+{
+    int numberOfNodes = grid->GetNTotalNode();
+
+    OutPutValueName(file, "keyActiveOfNodes");
+    OutPutPointerValue(file, numberOfNodes, keyActiveOfNodes);
+
+    OutPutValueName(file, "keyBufferOfNodes");
+    OutPutPointerValue(file, numberOfNodes, keyBufferOfNodes);
+
+    OutPutValueName(file, "keySearchOfNodes");
+    OutPutPointerValue(file, numberOfNodes, keySearchOfNodes);
+
+    OutPutValueName(file, "keyInBlockNodes");
+    OutPutPointerValue(file, numberOfNodes, keyInBlockNodes);
+
+    OutPutValueName(file, "keyBasicActiveNodes");
+    OutPutPointerValue(file, numberOfNodes, keyBasicActiveNodes);
+
+    OutPutValueName(file, "nodesMinDistanceInOtherBlock");
+    OutPutPointerValue(file, numberOfNodes, nodesMinDistanceInOtherBlock);
+
+}
+
+void OversetConfig::OutPutOversetVisualizationTail(fstream &file)
+{
+    int    numberOfFaces = grid->GetNTotalFace();
+    int    numberOfCells = grid->GetNTotalCell();
+
+    int *faceNodeNumber = grid->GetNodeNumberOfEachFace();
+    int **faceNodeIndex = grid->GetFace2NodeArray();
+    int *leftCellIndex = grid->GetLeftCellOfFace();
+    int *rightCellIndex = grid->GetRightCellOfFace();
+
+    if (THREE_D == geometricDimension)
+    {
+        OutPutValueName(file, "faceNodeNumber");
+        OutPutPointerValue(file, numberOfFaces, faceNodeNumber);
+    }
+
+    int numberOfWordsInEachLine = 5;
+    int iPrint = 0;
+
+    OutPutValueName(file, "faceNodeIndex");
+    iPrint = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        for (int iNode = 0; iNode < faceNodeNumber[iFace]; ++iNode)
+        {
+            int nodeIndex = faceNodeIndex[iFace][iNode] + 1;
+            file << nodeIndex << " ";
+            ++iPrint;
+            if (iPrint % numberOfWordsInEachLine == 0) file << endl;
+        }
+    }
+    if (iPrint % numberOfWordsInEachLine != 0) file << endl;
+    file << endl;
+
+    OutPutValueName(file, "leftCellIndex");
+    iPrint = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        int cellIndex = leftCellIndex[iFace] + 1;
+        if (cellIndex > numberOfCells || cellIndex < 0) cellIndex = 0;
+        file << cellIndex << " ";
+        ++iPrint;
+        if (iPrint % numberOfWordsInEachLine == 0) file << endl;
+    }
+    if (iPrint % numberOfWordsInEachLine != 0) file << endl;
+    file << endl;
+
+    OutPutValueName(file, "rightCellIndex");
+    iPrint = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        int cellIndex = rightCellIndex[iFace] + 1;
+        if (cellIndex > numberOfCells || cellIndex < 0) cellIndex = 0;
+        file << cellIndex << " ";
+        ++iPrint;
+        if (iPrint % numberOfWordsInEachLine == 0) file << endl;
+    }
+    if (iPrint % numberOfWordsInEachLine != 0) file << endl;
+    file << endl;
+}
+
+void OversetConfig::ShowGrid()
+{
+    string fileName = AddSymbolToFileName("./results/oversetGrid.dat", zoneIndex);
+
+    fstream file;
+
+    PHSPACE::OpenFile(file, fileName, ios_base::out);
+
+    PrintGridByOverSetConditionCell(file, -1);
+    PrintGridByOverSetConditionCell(file, 1);
+
+    PHSPACE::CloseFile(file);
+}
+
+void OversetConfig::PrintGridByOverSetConditionCell(fstream &file, int key)
+{
+    int numberOfNodes = grid->GetNTotalNode();
+    int numberOfFaces = grid->GetNTotalFace();
+    int numberOfCells = grid->GetNTotalCell();
+
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    int *faceNodeNumberContainer = grid->GetNodeNumberOfEachFace();
+    int *faceNodeIndexContainer = grid->GetFace2Node();
+    int *leftCellIndexContainer = grid->GetLeftCellOfFace();
+    int *rightCellIndexContainer = grid->GetRightCellOfFace();
+
+    int numberOfNodesInZone = 0;
+    int numberOfFacesInZone = 0;
+    int numberOfCellsInZone = 0;
+
+    vector< int > keyNodes;
+    vector< int > keyFaces;
+    vector< int > nodeList;
+    vector< int > cellList;
+
+    keyNodes.resize(numberOfNodes);
+    keyFaces.resize(numberOfFaces);
+    nodeList.resize(numberOfNodes);
+    cellList.resize(numberOfCells);
+
+    SetField(keyNodes, 0, numberOfNodes);
+    SetField(keyFaces, 0, numberOfFaces);
+    SetField(nodeList, -1, numberOfNodes);
+    SetField(cellList, 0, numberOfCells);
+
+    int **cellNodeIndexContainer = grid->GetCell2NodeArray();
+    int *cellNodeNumberContainer = grid->GetNodeNumberOfEachCell();
+
+    int **cellFaceIndexContainer = grid->GetCell2Face();
+    int *cellFaceNumberContainer = grid->GetFaceNumberOfEachCell();
+
+    int *keyActiveOfCells = this->GetKeyActiveOfCells();
+
+    for (int iCell = 0; iCell < numberOfCells; ++iCell)
+    {
+        if (keyActiveOfCells[iCell] == key)
+        {
+            numberOfCellsInZone++;
+            cellList[iCell] = numberOfCellsInZone;
+
+            for (int iNodes = 0; iNodes < cellNodeNumberContainer[iCell]; ++iNodes)
+            {
+                keyNodes[cellNodeIndexContainer[iCell][iNodes]] = 1;
+            }
+
+            for (int iFaces = 0; iFaces < cellFaceNumberContainer[iCell]; ++iFaces)
+            {
+                keyFaces[cellFaceIndexContainer[iCell][iFaces]] = 1;
+            }
+        }
+    }
+
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        if (keyNodes[iNode] == 1)
+        {
+            numberOfNodesInZone++;
+            nodeList[iNode] = numberOfNodesInZone;
+        }
+    }
+
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        if (keyFaces[iFace] == 1)
+        {
+            numberOfFacesInZone++;
+        }
+    }
+
+    if (numberOfCellsInZone == 0)
+    {
+        return;
+    }
+
+    file << "title     = \"overset grid \"\n";
+    file << "variables = \"x\" \"y\" \"z\"\n";
+
+    if (key == 0)
+    {
+        file << "ZONE T=\"Negative Cells\" \n";
+    }
+    else if (key == 1)
+    {
+        file << "ZONE T=\"Active Cells\" \n";
+    }
+    else if (key == -1)
+    {
+        file << "ZONE T=\"Interpolation Cells\" \n";
+    }
+
+    if (PHSPACE::GetDim() == THREE_D)
+    {
+        file << "ZoneType = FEPolyhedron\n";
+    }
+    else
+    {
+        file << "ZoneType = FEPolygon\n";
+    }
+
+    int totalNumFaceNodes = 0;
+
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        if (keyFaces[iFace] != 1) continue;
+        totalNumFaceNodes += faceNodeNumberContainer[iFace];
+    }
+
+    file << "Nodes    = " << numberOfNodesInZone << "\n";
+    file << "Faces    = " << numberOfFacesInZone << "\n";
+    file << "Elements = " << numberOfCellsInZone << "\n";
+    file << "TotalNumFaceNodes = " << totalNumFaceNodes << "\n";
+    file << "NumConnectedBoundaryFaces = 0\n";
+    file << "TotalNumBoundaryConnections = 0\n";
+
+    int numberOfWordsInEachLine = 5;
+    int iPrint = 0;
+
+    //nodes coordinate x
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        if (keyNodes[iNode] != 1) continue;
+        file << x[iNode] << " ";
+        iPrint++;
+        if (iPrint % numberOfWordsInEachLine == 0) file << "\n";
+    }
+    if (iPrint % numberOfWordsInEachLine != 0) file << "\n";
+
+    //nodes coordinate y
+    iPrint = 0;
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        if (keyNodes[iNode] != 1) continue;
+        file << y[iNode] << " ";
+        iPrint++;
+        if (iPrint % numberOfWordsInEachLine == 0) file << "\n";
+    }
+    if (iPrint % numberOfWordsInEachLine != 0) file << "\n";
+
+    //nodes coordinate z
+    iPrint = 0;
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        if (keyNodes[iNode] != 1) continue;
+        file << z[iNode] << " ";
+        iPrint++;
+        if (iPrint % numberOfWordsInEachLine == 0) file << "\n";
+    }
+    if (iPrint % numberOfWordsInEachLine != 0) file << "\n";
+
+    //face nodes number
+    iPrint = 0;
+    if (PHSPACE::GetDim() == THREE_D)
+    {
+        for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+        {
+            if (keyFaces[iFace] != 1) continue;
+            file << faceNodeNumberContainer[iFace] << " ";
+            iPrint++;
+            if (iPrint % numberOfWordsInEachLine == 0) file << "\n";
+        }
+        if (iPrint % numberOfWordsInEachLine != 0) file << "\n";
+    }
+
+    //face nodes list
+    int count = 0;
+    iPrint = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        int faceNodeNumber = faceNodeNumberContainer[iFace];
+
+        if (keyFaces[iFace] == 0)
+        {
+            count += faceNodeNumber;
+            continue;
+        }
+
+        for (int iNode = 0; iNode < faceNodeNumberContainer[iFace]; ++iNode)
+        {
+            int nodeIndex = nodeList[faceNodeIndexContainer[count++]];
+            file << nodeIndex << " ";
+            iPrint++;
+            if (iPrint % numberOfWordsInEachLine == 0) file << "\n";
+        }
+    }
+    if (iPrint % numberOfWordsInEachLine != 0) file << "\n";
+
+    //left cell
+    iPrint = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        if (keyFaces[iFace] == 0) continue;
+
+        int cellIndex = cellList[leftCellIndexContainer[iFace]];
+        file << cellIndex << " ";
+        iPrint++;
+        if (iPrint % numberOfWordsInEachLine == 0) file << "\n";
+    }
+    if (iPrint % numberOfWordsInEachLine != 0) file << "\n";
+
+    //right cell
+    iPrint = 0;
+    for (int iFace = 0; iFace < numberOfFaces; ++iFace)
+    {
+        int cellIndex;
+        if (keyFaces[iFace] == 0) continue;
+        int rightCell = rightCellIndexContainer[iFace];
+
+        if (rightCell >= numberOfCells || rightCell < 0)
+        {
+            cellIndex = 0;
+        }
+        else
+        {
+            cellIndex = cellList[rightCellIndexContainer[iFace]];
+        }
+
+        file << cellIndex << " ";
+        iPrint++;
+        if (iPrint % numberOfWordsInEachLine == 0) file << "\n";
+    }
+    if (iPrint % numberOfWordsInEachLine != 0) file << "\n";
+}
+
+void OversetConfig::PrintGridByOverSetConditionPoint(fstream &file, int key)
+{
+    int numberOfNodes = grid->GetNTotalNode();
+
+    RDouble *x = grid->GetX();
+    RDouble *y = grid->GetY();
+    RDouble *z = grid->GetZ();
+
+    int numberOfSpecifyNodes = 0;
+
+    vector< int > nodeList;
+
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        if (keyActiveOfNodes[iNode] == key)
+        {
+            numberOfSpecifyNodes++;
+            nodeList.push_back(iNode);
+        }
+    }
+
+    if (numberOfSpecifyNodes != 0)
+    {
+        file << "Title=\"THE SPECIFY NODES\" \n";
+        file << "Variables=\"x\" \"y\" \"z\" \n";
+
+        if (key == 1)
+        {
+            file << "ZONE T=\"Active Nodes\" \n";
+        }
+        else if (key == -1)
+        {
+            file << "ZONE T=\"Negative Nodes\" \n";
+        }
+
+        file << "N=" << numberOfSpecifyNodes << " E=" << numberOfSpecifyNodes << " F=FEPOINT, ET=quadrilateral\n";
+
+        for (int iSpecifyNodes = 0; iSpecifyNodes < numberOfSpecifyNodes; ++iSpecifyNodes)
+        {
+            int activeNodeIndex = nodeList[iSpecifyNodes];
+
+            file << x[activeNodeIndex] << " ";
+            file << y[activeNodeIndex] << " ";
+            file << z[activeNodeIndex] << " ";
+            file << "\n";
+        }
+
+        for (int iSpecifyNodes = 0; iSpecifyNodes < numberOfSpecifyNodes; ++iSpecifyNodes)
+        {
+            file << iSpecifyNodes + 1 << " ";
+            file << iSpecifyNodes + 1 << " ";
+            file << iSpecifyNodes + 1 << " ";
+            file << iSpecifyNodes + 1 << " ";
+            file << "\n";
+        }
+    }
+}
+
+void OversetConfig::OutKeyBuffer()
+{
+    int numberOfNodes = grid->GetNTotalNode();
+    int numberOfCells = grid->GetNTotalCell();
+
+    string fileName = AddSymbolToFileName("keyBuffer.dat", zoneIndex);
+    fstream file;
+
+    PHSPACE::OpenFile(file, fileName, ios_base::out);
+
+    for (int iCell = 0; iCell < numberOfCells; ++iCell)
+    {
+        file << keyBufferOfCells[iCell] << endl;
+    }
+
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        file << keyBufferOfNodes[iNode] << endl;
+    }
+
+    CloseFile(file);
+}
+
+void OversetConfig::OutKeyActive()
+{
+    int numberOfNodes = grid->GetNTotalNode();
+    string fileName = AddSymbolToFileName("keyActive.dat", zoneIndex);
+    fstream file;
+
+    PHSPACE::OpenFile(file, fileName, ios_base::out);
+
+    file << "keyActiveOfNodes" << endl;
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        file << keyActiveOfNodes[iNode] << endl;
+    }
+
+    CloseFile(file);
+}
+
+void OversetConfig::OutputLocalNodeWalldistance()
+{
+    int numberOfNodes = grid->GetNTotalNode();
+
+    string fileName = AddSymbolToFileName("localNodeWalldistance.dat", zoneIndex);
+    fstream file;
+
+    PHSPACE::OpenFile(file, fileName, ios_base::out);
+
+    for (int iNode = 0; iNode < numberOfNodes; ++iNode)
+    {
+        file << nodeWalldistDistance[iNode] << endl;
+    }
+
+    PHSPACE::CloseFile(file);
+}
+
+int *OversetConfig::GetKeyActiveOfCells()
+{
+    int *keyActiveOfCells = this->grid->GetBlankIndex();
+    return keyActiveOfCells;
+}
+
+RDouble GetToleranceForOversetBox()
+{
+    return GlobalDataBase::GetDoubleParaFromDB("toleranceForOversetBox");
+}
+
+int GetTwoOrderInterpolationOrNot()
+{
+    return GlobalDataBase::GetIntParaFromDB("twoOrderInterpolationOrNot");
+}
+
+int GetKeyEnlargeOfNodes()
+{
+    return GlobalDataBase::GetIntParaFromDB("keyEnlargeOfActiveNodes");
+}
+
+int GetReadInAuxiliaryInnerGrid()
+{
+    return GlobalDataBase::GetIntParaFromDB("readInAuxiliaryInnerGrid");
+}
+
+int GetReadInAuxiliaryOuterGrid()
+{
+    return GlobalDataBase::GetIntParaFromDB("readInAuxiliaryOuterGrid");
+}
+
+int GetReadInSklFileOrNot()
+{
+    return GlobalDataBase::GetIntParaFromDB("readInSklFileOrNot");
+}
+
+int GetSymetryOrNot()
+{
+    return GlobalDataBase::GetIntParaFromDB("symetryOrNot");
+}
+
+int GetIfOutPutOversetVisualization()
+{
+    return GlobalDataBase::GetIntParaFromDB("outPutOversetVisualization");
+}
+
+template< typename T >
+void PH_AllreduceSepModeForVector(vector< T > &sendingBuffer, vector< T > &receivingBuffer, int numberOfElements, MPI_Datatype mpiDataType, PH_Op op)
+{
+    T *send = &sendingBuffer[0];
+    T *recv = &receivingBuffer[0];
+
+    PH_AllreduceSepMode(send, recv, numberOfElements, mpiDataType, op);
+}
+
+}
diff --git a/PHengLEI软件开源协议.docx b/PHengLEI软件开源协议.docx
new file mode 100644
index 0000000..6d34e40
Binary files /dev/null and b/PHengLEI软件开源协议.docx differ
diff --git a/Readme.md b/Readme.md
new file mode 100644
index 0000000..6168aed
--- /dev/null
+++ b/Readme.md
@@ -0,0 +1,83 @@
+<div align=left><img src="PHengLEI\Documents/PHengLEI-LOGO.png" style="zoom: 15%;"/><br>
+
+# 风雷软件（PHengLEI2312.v975）
+
+备注：主分支为master分支，更稳定，更多新功能请切换到ActiveBranch分支。
+
+## 1.软件简介
+
+&ensp;&ensp;&ensp;&ensp;风雷软件<sup>[1,2]</sup>（PHengLEI，Platform for Hybrid ENGineering simulation of flows）是中国空气动力研究与发展中心（CARDC）研发的面向流体工程的混合CFD平台。平台以面向对象的设计理念，采用C++语言编程。2020年12月，风雷软件正式面向全国开源，与其他开源CFD软件相比，风雷软件具有扩展能力强、开发难度低、计算效率高等特点。（更多介绍请阅读PHengLEI/Documents文件夹下的**《风雷软件应用与开发指南》**）
+
+&ensp;&ensp;&ensp;&ensp;风雷软件更多动态和Demo请登录以下网址查看：
+
+- 官网地址: https://www.cardc.cn/nnw/products.aspx?t=9
+- 代码库地址：https://forge.osredm.com/PHengLEI/PHengLEI
+- 算例库地址：https://forge.osredm.com/PHengLEI/PHengLEI-TestCases
+- 论坛（常见问题、算例展示、技术分享）地址：https://osredm.com/forums/theme/38
+
+&ensp;&ensp;&ensp;&ensp;风雷软件用户录制视频教程地址：
+
+- 视频教程：https://www.bilibili.com/video/BV1eX4y1T7yW?from=search&seid=9482198996609923785
+
+[1] 赵钟,等.风雷（PHengLEI）通用CFD软件设计[J]. 计算机工程与科学, 2020, 42(2): 210-219.( ZHAO Zhong, et al. Design of general CFD software PHengLEI [J]. Computer Engineering & Science, 2020, 42(2): 210-219. (in Chinese) )
+[2] 赵钟,等.适用于任意网格的大规模并行CFD计算框架PHengLEI[J]. 计算机学报, 2019, 42(11):2368
+-2383. ( ZHAO Zhong, et al. PHengLEI: A Large Scale Parallel CFD Framework for Arbitrary Grids [J]. Chinese Journal of Computers, 2019, 42(11): 2368-2383. (in Chinese) )
+
+**声明：** 若用户将该软件用于学术研究或工程应用，须在相关的论文成果的显要位置处标注基于“风雷（PHengLEI）“软件，并引用“风雷（PHengLEI）”软件相关的参考文献（例如[1]和[2]）。
+
+## 2.软件功能
+
+&ensp;&ensp;&ensp;&ensp;风雷软件是一款结构/非结构通用CFD软件，计算范围覆盖低速、亚跨声速和高超声速。软件采用有限体积法求解定常/非定常的雷诺平均NS方程（RANS方程），集成了典型湍流模型，如SA、SST模型等；无粘项采用Roe、Vanleer、AUSM、Steger-Warming等格式；粘性项采用中心格式，时间推进采用LU-SGS或Block LU-SGS隐式方法求解；非定常计算时，采用双时间步方法。针对大规模问题，软件支持分区并行计算，并且使用多重网格技术加速收敛。同时，风雷软件也提供常用前/后置接口，如Gridgen、ICEM-CFD、FieldView、Tecplot等。
+
+
+## 3.代码获取
+
+1. 环境准备，安装git，官网地址：https://git-scm.com/;
+2. 点击右上角Fork按钮；
+3. Fork完成后，将生成并跳转到新的仓库，复制新仓库版本库地址，如https://git.osredm.com/PHengLEI/PHengLEI.git;
+4. 在本地选择一个目录，右键打开git bash，输入命令进行代码克隆，如git clone https://git.osredm.com/PHengLEI/PHengLEI.git;
+5. 输入用户名和密码，其中用户名是指上面命令中p开头的用户名，比如p68217053；
+6. 项目克隆完成后，进入项目目录，默认分支为master分支，可通过命令切换到ActiveBranch分支，如git checkout ActiveBranch;
+7. 切换到开发分支后，可输入git log查看日志，确认当前版本。
+
+## 4.软件安装
+
+&ensp;&ensp;&ensp;&ensp;风雷软件能够在Windows、Linux、Mac系统下运行，源代码采用C++语言编写，需要CMake软件构建项目，并行计算采用MPI库。因此，操作系统必须提供C++编译器、CMake2.8以上版本软件和MPI1.0或MPI2.0标准库。
+
+### 4.1 Windows环境配置
+
+&ensp;&ensp;&ensp;&ensp;Windows环境下所有必备软件按照默认步骤安装即可。
+
+1. 安装Microsoft Visual Studio 2012以上版本；
+2. 安装MPI库，推荐采用MSMPI；
+3. 安装Cmake。
+
+### 4.2 Linux环境配置
+
+&ensp;&ensp;&ensp;&ensp;Linux环境配置的简要步骤如下：
+
+1. 安装Cmake；
+2. 安装MPICH3库；
+3. 编译HDF5库；
+4. 编译CGNS库；
+5. 编译metis库和parmetis库。
+
+**备注：**Linux环境配置的具体步骤请阅读《风雷软件应用与开发指南》。
+
+## 5.如何贡献
+
+&ensp;&ensp;&ensp;&ensp;针对基于风雷软件进行二次开发的用户，后续添加如何测试、提交Pull Request的步骤。
+
+&ensp;&ensp;&ensp;&ensp;软件贡献者信息参见项目根目录下的Contributing文件（待增加）。
+
+## 6.软件版权
+
+&ensp;&ensp;&ensp;&ensp;风雷软件开源协议参见项目根目录下的LICENSE文件。
+
+## 7.鸣谢
+
+&ensp;&ensp;&ensp;&ensp;感谢所有参与风雷软件开发与推广的工作人员，也感谢所有支持风雷软件发展并提出宝贵意见和建议的广大用户。
+
+## 8.联系我们
+
+&ensp;&ensp;&ensp;&ensp;电子邮箱：phenglei@126.com。
\ No newline at end of file
diff --git a/Readme.pdf b/Readme.pdf
new file mode 100644
index 0000000..8d4bb62
Binary files /dev/null and b/Readme.pdf differ
diff --git a/caseVersion b/caseVersion
new file mode 100644
index 0000000..19b4cc8
--- /dev/null
+++ b/caseVersion
@@ -0,0 +1 @@
+v2206
\ No newline at end of file
diff --git a/phenglei/CMakeLists.txt b/phenglei/CMakeLists.txt
new file mode 100644
index 0000000..f24ddf6
--- /dev/null
+++ b/phenglei/CMakeLists.txt
@@ -0,0 +1,398 @@
+cmake_minimum_required(VERSION 2.8)
+
+#build the project:
+project(PHengLEIv3d0 CXX)
+
+#set working directory:
+set(EXEC_WORKING_DIR PHengLEIv3d0)
+
+#set COMPILER:
+if(WIN32)
+  if(CMAKE_GENERATOR MATCHES "Visual Studio 11 2012")
+    SET(THIRD_PARTY_COMPILER_FLAG "libwindows/libvs12")
+    add_definitions(-DVS12)
+  elseif(CMAKE_GENERATOR MATCHES "Visual Studio 12 2013")
+    SET(THIRD_PARTY_COMPILER_FLAG "libwindows/libvs12")
+    add_definitions(-DVS13)
+  elseif(CMAKE_GENERATOR MATCHES "Visual Studio 14 2015")
+    SET(THIRD_PARTY_COMPILER_FLAG "libwindows/libvs19")
+  elseif(CMAKE_GENERATOR MATCHES "Visual Studio 15 2017")
+    SET(THIRD_PARTY_COMPILER_FLAG "libwindows/libvs19")
+  elseif(CMAKE_GENERATOR MATCHES "Visual Studio 16 2019")
+    SET(THIRD_PARTY_COMPILER_FLAG "libwindows/libvs19")
+  elseif(CMAKE_GENERATOR MATCHES "Visual Studio 17 2022")
+    SET(THIRD_PARTY_COMPILER_FLAG "libwindows/libvs19")
+  endif()
+else(WIN32)
+  SET(THIRD_PARTY_COMPILER_FLAG "Unix")
+  include(CheckCXXCompilerFlag)
+  CHECK_CXX_COMPILER_FLAG("-std=c++11" COMPILER_SUPPORTS_CXX11)
+  if(COMPILER_SUPPORTS_CXX11)
+  set(CMAKE_CXX_FLAGS "${CMAKE_CXX_FLAGS} -std=c++11")
+  endif()
+endif()
+
+include(${PROJECT_SOURCE_DIR}/../PHengLEI/PHMacro.cmake)
+
+#set cmake environment:
+set(CMAKE_USE_RELATIVE_PATHS ON)
+
+if(NOT CMAKE_BUILD_TYPE)
+  set(CMAKE_BUILD_TYPE "Release" CACHE STRING "CHOOSE" FORCE)
+endif()
+message(STATUS "The current CMAKE_BUILD_TYPE is ${CMAKE_BUILD_TYPE}.")
+
+#output message:
+message(STATUS "Welcome to Build Project ${CMAKE_PROJECT_NAME}.")
+message(STATUS "The OS is ${CMAKE_SYSTEM_ID}, version ${CMAKE_SYSTEM_VERSION}.")
+message(STATUS "The COMPILER is ${THIRD_PARTY_COMPILER_FLAG}.")
+message(STATUS "The working directory is ${CMAKE_BINARY_DIR}/${EXEC_WORKING_DIR}/${DLL_WORKING_DIR}.")
+message(STATUS "--- Start to call ${CMAKE_CURRENT_LIST_FILE} ---") 
+message(STATUS "The current binary directory is ${CMAKE_CURRENT_BINARY_DIR}.")
+message(STATUS "The current source directory is ${CMAKE_CURRENT_SOURCE_DIR}.")
+
+# Define some pre-definition.
+opt_build(API "Build PHengLEI framework or not" ON) #Build API or not.
+opt_build(CFD "Build CFD module or not" ON) #Build CFD or not.
+opt_build(MESH "Build Mesh module or not" ON) #Build Mesh or not.
+opt_build(DemoSolver "Build Solver Template or not" OFF)# Build Solver Template option.
+opt_build(IncomSolver "Build Pressure Based Solver or not" OFF)# Build IncomSolver option.
+if(BUILD_IncomSolver)
+  opt(HypreLib "Build Pressure Based Solver or not" ON)# Build IncomSolver option.
+  opt(UnapLib "Build Pressure Based Solver or not" OFF)# Build IncomSolver option.
+  opt(YhamgLib "Build Pressure Based Solver or not" OFF)# Build IncomSolver option.
+endif()
+opt_build(GMRESSolver "Build GMRES Solver or not" OFF)# Build GMRESSolver option.
+opt_build(SpecDiffHybSolver "Build Spectra-Difference Hybrid Solver or not" OFF) #Build Spectra-Difference Hybrid Solver or not.
+opt(DOUBLE_PRECISION "Use double precision or not" ON)
+opt(ERROR_DATA_DEBUG "Build error data debug or not" OFF)
+opt(OCC "Use OpenCasCade Library" OFF) #Use occ or not.
+opt(OMP "Use OpenMP or not" OFF) #Use OPenMP or not.
+opt(SMARTARRAY "Use smart array more efficenet than origial array" ON) #Use smart array or not.
+opt(TecplotLib "Use tecplot lib to dump binary flow file" OFF) #Use tecplotlib or not.
+opt_build(LBMSolverMPI "Build LBM-MPI module or not" OFF) #Build LBM-MPI or not.
+opt_build(LBMSolverOMP "Build LBM-OMP module or not" OFF) #Build LBM-OMP or not.
+opt(Windows_X64 "Compile PHengLEI X64 on Windows platform" ON) ###
+if(WIN32)
+  opt(INTELMPI "Use INTELMPI module or not" OFF) #Use INTELMPI or not.
+  if(USE_INTELMPI)
+    set(mpiname impi)
+    set(MSMPI_HOME_DIRECTORY "C:/Program Files (x86)/Intel/IMPI/intel64")
+  else(USE_INTELMPI)
+    set(mpiname msmpi)
+    set(MSMPI_HOME_DIRECTORY "C:/Program Files (x86)/Microsoft SDKs/MPI")
+  endif()
+  message(STATUS "\n\nThe current MSMPI_HOME_DIRECTORY is ${MSMPI_HOME_DIRECTORY}.")
+endif(WIN32)
+
+set(GPROF OFF)
+if(GPROF)
+  set(CMAKE_CXX_FLAGS "$ENV{CMAKE_CXX_FLAGS} -pg")
+  set(CMAKE_C_FLAGS "$ENV{CMAKE_C_FLAGS} -pg")
+  set(CMAKE_EXE_LINKER_FLAGS "$ENV{CMAKE_EXE_LINKER_FLAGS} -pg")
+  set(CMAKE_SHARED_LINKER_FLAGS "$ENV{CMAKE_SHARED_LINKER_FLAGS} -pg")
+endif()
+
+if(USE_OCC)
+  message(STATUS "USE_OCC is turned on!")
+  add_definitions(-DUSE_OCC)
+endif()
+
+if(USE_DOUBLE_PRECISION)
+  message(STATUS "USE_DOUBLE_PRECISION is turned on!")
+  add_definitions(-DPH_DOUBLE_PREC)
+endif()
+
+if(USE_SMARTARRAY)
+  message(STATUS "USE_SMARTARRAY is turned on!")
+  add_definitions(-DUSE_SMARTARRAY)
+endif()
+
+if(BUILD_SpecDiffHybSolver)
+  message(STATUS "BUILD_SpecDiffHybSolver is turned on!")
+  add_definitions(-DUSE_SpecDiffHybSolver)
+endif()
+
+if(BUILD_DemoSolver)
+  message(STATUS "BUILD_DemoSolver is turned on!")
+  add_definitions(-DUSE_DEMOSOLVER)
+endif()
+
+if(BUILD_GMRESSolver)
+  message(STATUS "BUILD_GMRESSolver is turned on!")
+  add_definitions(-DUSE_GMRESSOLVER)
+
+  #For Sacado
+  SET(SACADO_DIR ${PROJECT_SOURCE_DIR}/3rdparty/Sacado)
+  FIND_PATH(Sacado_INCLUDE_DIR Sacado.hpp
+  HINTS ${SACADO_DIR}
+  PATH_SUFFIXES include
+  )
+  FIND_LIBRARY(Sacado_LIBRARY NAMES sacado
+  HINTS ${SACADO_DIR}
+  PATH_SUFFIXES lib
+  )
+  set(Sacado_LIBRARIES ${Sacado_LIBRARY})
+  include_directories("${Sacado_INCLUDE_DIR}")
+
+  #For petsc
+  set(PETSC ${PROJECT_SOURCE_DIR}/3rdparty/PETSc/)
+  set(PETSC_Include_Dir ${PROJECT_SOURCE_DIR}/3rdparty/PETSc/include)
+  include_directories("${PETSC_Include_Dir}")
+
+  FIND_LIBRARY(PETSC_Lib NAMES petsc
+    HINTS ${PETSC}
+    PATH_SUFFIXES lib
+ )
+
+ FIND_LIBRARY(F2cblas_Lib NAMES f2cblas
+    HINTS ${PETSC}
+    PATH_SUFFIXES lib
+ )
+ FIND_LIBRARY(F2clapack_Lib NAMES f2clapack
+    HINTS ${PETSC}
+    PATH_SUFFIXES lib
+ )
+ set(PETSC_Libraries ${PETSC_Lib} ${F2cblas_Lib} ${F2clapack_Lib})
+
+endif()
+
+if(USE_OMP)
+  message(STATUS "USE_OMP is turned on!")
+  add_definitions(-DUSE_OMP)
+  find_package(OpenMP)
+  if(OpenMP_FOUND)
+    message(STATUS "OpenMP_VERSION = ${OpenMP_VERSION}")
+    message(STATUS "OpenMP_FOUND   = ${OpenMP_FOUND}")
+    message(STATUS "OpenMP_CXX_FOUND = ${OpenMP_CXX_FOUND}")
+    message(STATUS "OpenMP_CXX_FLAGS = ${OpenMP_CXX_FLAGS}")
+    message(STATUS "OpenMP_CXX_INCLUDE_DIRS = ${OpenMP_CXX_INCLUDE_DIRS}")
+    message(STATUS "OpenMP_CXX_LIB_NAMES = ${OpenMP_CXX_LIB_NAMES}")
+    message(STATUS "OpenMP_CXX_LIBRARIES = ${OpenMP_CXX_LIBRARIES}")
+    message(STATUS "OpenMP_LIBRARY = ${OpenMP_LIBRARY}")
+    message(STATUS "OpenMP_CXX_SPEC_DATE = ${OpenMP_CXX_SPEC_DATE}")
+    message(STATUS "OpenMP_CXX_VERSION_MAJOR = ${OpenMP_CXX_VERSION_MAJOR}")
+    message(STATUS "OpenMP_CXX_VERSION_MINOR = ${OpenMP_CXX_VERSION_MINOR}")
+    message(STATUS "OpenMP_CXX_VERSION = ${OpenMP_CXX_VERSION}") 
+  endif(OpenMP_FOUND)
+endif(USE_OMP)
+
+find_package(MPI REQUIRED)
+include_directories ("${MPI_CXX_INCLUDE_DIRS}")
+message (STATUS "MPI_CXX_INCLUDE_DIRS = ${MPI_CXX_INCLUDE_DIRS}") 
+message (STATUS "MPI_CXX_LIBRARIES = ${MPI_CXX_LIBRARIES}") 
+
+set(CMAKE_CXX_COMPILER  mpicxx)
+set(CMAKE_C_COMPILER    mpicc)
+
+if(USE_ERROR_DATA_DEBUG)
+  message(STATUS "USE_ERROR_DATA_DEBUG is turned on!")
+  add_definitions(-DUSE_ERROR_DATA_DEBUG)
+endif(USE_ERROR_DATA_DEBUG)
+
+if(BUILD_IncomSolver)
+  message(STATUS "BUILD_IncomSolver is turned on!")
+  add_definitions(-DUSE_INCOMSOLVER)
+  if(USE_HypreLib)
+    add_definitions(-DUSE_HypreLib)
+  endif(USE_HypreLib)
+  
+  if(USE_UnapLib)
+    add_definitions(-DUSE_UnapLib)
+  endif(USE_UnapLib)
+  
+  if(USE_YhamgLib)
+    add_definitions(-DUSE_YhamgLib)
+  endif(USE_YhamgLib)
+endif(BUILD_IncomSolver)
+
+if(BUILD_LBM)
+  message(STATUS "BUILD_LBM is turned on!")
+  add_definitions(-DUSE_LBM_CODE)
+  add_compile_options(-std=c++14)
+endif(BUILD_LBM)
+
+if(USE_TecplotLib)
+  message(STATUS "USE_TecplotLib is turned on!")
+  add_definitions(-DUSE_TecplotLib)
+endif(USE_TecplotLib)
+
+if(WIN32)
+  if(USE_Windows_X64)
+    message(STATUS "USE_Windows_X64 is turned on!")
+    add_definitions(-DUSE_WINDOWS_X64)
+  endif(USE_Windows_X64)
+endif(WIN32)
+
+if(WIN32)
+  add_definitions(-D_SCL_SECURE_NO_WARNINGS)
+endif()
+
+if(BUILD_LBMSolverMPI)
+  message(STATUS "BUILD_LBM-MPI is turned on!")
+  add_definitions(-DUSE_LBMSolverMPI)
+endif(BUILD_LBMSolverMPI)
+
+if(BUILD_LBMSolverOMP)
+  message(STATUS "BUILD_LBM-OMP is turned on!")
+  add_definitions(-DUSE_LBMSolverOMP)
+endif(BUILD_LBMSolverOMP)
+# Add subdirectory or link library PHAPI.
+set(API_TARGET_NAME "PHAPI")
+
+includeHeadFiles()
+
+set(HDF5_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/HDF5/include)
+include_directories("${HDF5_H_PATH}")
+set(GMSH_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/Gmsh/include)
+include_directories("${GMSH_H_PATH}")
+set(PARMETIS_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/parmetis/include)
+include_directories("${PARMETIS_H_PATH}")
+if(USE_TecplotLib)
+  set(TECIO_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/TECIO/include)
+  include_directories("${TECIO_H_PATH}")
+endif(USE_TecplotLib)
+
+set(MEITIS_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/metis/include)
+include_directories("${MEITIS_H_PATH}")
+set(CGNS_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/cgns/include)
+include_directories("${CGNS_H_PATH}")
+set(MGRID_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/mgrid/include)
+include_directories("${MGRID_H_PATH}")
+
+if(USE_HypreLib)
+  set(HYPRE_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/hypre/include)
+  include_directories("${HYPRE_H_PATH}")
+endif(USE_HypreLib)
+
+if(USE_UnapLib)
+  set(UNAP_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/unapLib/include)
+  include_directories("${UNAP_H_PATH}")
+endif(USE_UnapLib)
+
+if(USE_YhamgLib)
+  set(YHAMG_H_PATH ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/yhamg/include)
+  include_directories("${YHAMG_H_PATH}")
+endif(USE_YhamgLib)
+
+if(WIN32)
+  if(USE_Windows_X64)
+    set(LIB_API_EXPORT_PATH ${PROJECT_SOURCE_DIR}/../API/bin/${CMAKE_SYSTEM_NAME}-x64/${CMAKE_BUILD_TYPE})
+    set(CMAKE_EXE_LINKER_FLAGS "/machine:x64")
+  else(USE_Windows_X64)
+    set(LIB_API_EXPORT_PATH ${PROJECT_SOURCE_DIR}/../API/bin/${CMAKE_SYSTEM_NAME}-x86/${CMAKE_BUILD_TYPE})
+  endif(USE_Windows_X64)
+else(WIN32)
+  set(LIB_API_EXPORT_PATH ${PROJECT_SOURCE_DIR}/../API/bin/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR})
+endif(WIN32)
+
+if(BUILD_API)
+  message(STATUS "Build API!")
+  add_subdirectory(../API ${EXEC_WORKING_DIR}/API)
+  if(WIN32)
+    set_target_properties(${API_TARGET_NAME} PROPERTIES COMPILE_FLAGS "/MP")
+  endif(WIN32)
+else(BUILD_API)
+  message(STATUS "Link API!") 
+  link_directories("${LIB_API_EXPORT_PATH}")  
+endif(BUILD_API)
+
+# Add subdirectory or link library PHMesh.
+set(MESH_TARGET_NAME "PHMesh")
+if(WIN32)
+  if(USE_Windows_X64)
+    set(LIB_MESH_EXPORT_PATH ${PROJECT_SOURCE_DIR}/../Mesh/bin/${CMAKE_SYSTEM_NAME}-x64/${CMAKE_BUILD_TYPE})
+  else(USE_Windows_X64)
+    set(LIB_MESH_EXPORT_PATH ${PROJECT_SOURCE_DIR}/../Mesh/bin/${CMAKE_SYSTEM_NAME}-x86/${CMAKE_BUILD_TYPE})
+  endif(USE_Windows_X64)
+else(WIN32)
+  set(LIB_MESH_EXPORT_PATH ${PROJECT_SOURCE_DIR}/../Mesh/bin/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR})
+endif(WIN32)
+
+set(MESH_H_PATH ${PROJECT_SOURCE_DIR}/../Mesh/include)
+include_directories(${MESH_H_PATH})
+if(BUILD_MESH)
+  message(STATUS "Build MESH!")
+  add_subdirectory(../Mesh ${EXEC_WORKING_DIR}/Mesh)
+  if(WIN32)
+    set_target_properties(${Mesh_TARGET_NAME} PROPERTIES COMPILE_FLAGS "/MP")
+  endif(WIN32)
+else(BUILD_MESH)
+  message(STATUS "Link MESH!") 
+  link_directories("${LIB_MESH_EXPORT_PATH}")  
+endif(BUILD_MESH)
+# Add subdirectory or link library PHCFD.
+set(CFD_TARGET_NAME "PHCFD")
+if(WIN32)
+    if(USE_Windows_X64)
+      set(LIB_Grid_EXPORT_PATH ${PROJECT_SOURCE_DIR}/../Grider/bin/${CMAKE_SYSTEM_NAME}-x64/${CMAKE_BUILD_TYPE})
+    else(USE_Windows_X64)
+      set(LIB_Grid_EXPORT_PATH ${PROJECT_SOURCE_DIR}/../Grider/bin/${CMAKE_SYSTEM_NAME}-x86/${CMAKE_BUILD_TYPE})
+    endif(USE_Windows_X64)
+else(WIN32)
+  set(LIB_CFD_EXPORT_PATH ${PROJECT_SOURCE_DIR}/../CFD/bin/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR})
+endif(WIN32)
+
+set(CFD_H_PATH ${PROJECT_SOURCE_DIR}/../CFD)
+include_directories(${CFD_H_PATH}/NSSolver/include)
+include_directories(${CFD_H_PATH}/Solver/include)
+include_directories(${CFD_H_PATH}/TurbSolver/include)
+include_directories(${CFD_H_PATH}/PostProcess/include)
+include_directories(${CFD_H_PATH}/HOSolverUnstruct/include)
+if(BUILD_LBMSolverMPI)
+include_directories(${CFD_H_PATH}/LBMSolverMPI/include)
+endif(BUILD_LBMSolverMPI)
+if(BUILD_LBMSolverOMP)
+include_directories(${CFD_H_PATH}/LBMSolverOMP/include)
+endif(BUILD_LBMSolverOMP)
+
+if(BUILD_SpecDiffHybSolver)
+  include_directories(${CFD_H_PATH}/SpecDiffHybSolver/include)
+endif(BUILD_SpecDiffHybSolver)
+if(BUILD_IncomSolver)
+include_directories(${CFD_H_PATH}/IncomSolver/include)
+endif(BUILD_IncomSolver)
+if(BUILD_DemoSolver)
+  include_directories(${CFD_H_PATH}/DemoSolver/include)
+endif(BUILD_DemoSolver)
+if(BUILD_CFD)
+  message(STATUS "Build CFD!")
+  add_subdirectory(../CFD ${EXEC_WORKING_DIR}/CFD)
+  if(WIN32)
+    set_target_properties(${CFD_TARGET_NAME} PROPERTIES COMPILE_FLAGS "/MP")
+  endif(WIN32)
+else(BUILD_CFD)
+  message(STATUS "Link CFD!") 
+  link_directories("${LIB_CFD_EXPORT_PATH}")  
+endif(BUILD_CFD)
+
+if(WIN32)
+  if(USE_Windows_X64)
+    link_directories("${PROJECT_SOURCE_DIR}/3rdparty/${THIRD_PARTY_COMPILER_FLAG}/win-x64")
+  else(USE_Windows_X64)
+    link_directories("${PROJECT_SOURCE_DIR}/3rdparty/${THIRD_PARTY_COMPILER_FLAG}/win-x86")
+  endif(USE_Windows_X64)
+  message(STATUS "CMAKE_CXX_COMPILER! ${CMAKE_CXX_COMPILER}")
+else(WIN32)
+  if(${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR} MATCHES "Linux-x86_64")
+    opt(INTEL_COMPILER "Use intel compiler or not" OFF) #Use INTEL COMPILER or not.
+    if(USE_INTEL_COMPILER)
+      link_directories("${PROJECT_SOURCE_DIR}/3rdparty/liblinux/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR}/intel")
+      message(STATUS "USE_INTEL_COMPILER is turned on!")
+    else(USE_INTEL_COMPILER)
+      link_directories("${PROJECT_SOURCE_DIR}/3rdparty/liblinux/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR}/gcc")
+      message(STATUS "USE_INTEL_COMPILER is turned off!")
+    endif()
+  else(${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR} MATCHES "Linux-aarch64")
+    link_directories("${PROJECT_SOURCE_DIR}/3rdparty/liblinux/${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR}")
+  endif()
+endif(WIN32)
+
+# look for CMakeLists.txt in subdirectory <codes> and build an executable target:
+add_subdirectory(../Main ${EXEC_WORKING_DIR})
+
+
+#exit:
+message(STATUS "--- Exit ${CMAKE_CURRENT_LIST_FILE}! ---")
+message(STATUS "Finished build project ${PROJECT_NAME}! ")
+
diff --git a/phenglei/Documents/PHengLEI软件开源协议.docx b/phenglei/Documents/PHengLEI软件开源协议.docx
new file mode 100644
index 0000000..6a5297e
Binary files /dev/null and b/phenglei/Documents/PHengLEI软件开源协议.docx differ
diff --git a/phenglei/Documents/风雷软件应用与开发指南2312.v975.pdf b/phenglei/Documents/风雷软件应用与开发指南2312.v975.pdf
new file mode 100644
index 0000000..a12fa93
Binary files /dev/null and b/phenglei/Documents/风雷软件应用与开发指南2312.v975.pdf differ
diff --git a/phenglei/Makefile b/phenglei/Makefile
new file mode 100644
index 0000000..893f82f
--- /dev/null
+++ b/phenglei/Makefile
@@ -0,0 +1,102 @@
+#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+#                                                                             +
+#       Hybrid Platform for Engineering and Research of Flows (HyperFlow)     +
+#                        （C）Zhang Laiping and He Xin                        +
+#                    State Key Laboratory of Aerodynamics                     +
+#                    Computational Aerodynamics Institute                     +
+#            China Aerodynamics Research and Development Center               +
+#                                 Since 2007                                  +
+#                                                                             +
+#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+#! @file      Makefile
+#! @brief     It defines the configuration options.
+#! @author    Bell.
+
+########## User input if the 3rdparty libraries have been changed: Start #####
+hdf5_version     = 1.8.8-p1
+cgns_version     = 3.3.0
+parmetis_version = 4.0.3
+metis_version    = 5.0.1
+########## User input if the 3rdparty libraries have been changed: End #######
+
+# Number of processor to parallel compiling.
+nProcessor   = 64
+cc           = mpicc
+cxx          = mpicxx
+
+# Basically envioment informations.
+cputype = $(shell uname -m | sed "s/\\ /_/g")
+systype = $(shell uname -s)
+PATH_MPICC           = $(shell which mpicc)
+PATH_MPICXX          = $(shell which mpicxx)
+PATH_MPIEXEC         = $(shell which mpiexec)
+# Path for 3rdparty.
+PARMETISBUILDDIR     = build/$(systype)-$(cputype)
+LIB_SOURCE_DIR       = 3rdparty
+LIB_BINARY_DIR       = $(LIB_SOURCE_DIR)/liblinux/$(systype)-$(cputype)
+LIB_HDF5_INCLUDE_DIR = $(LIB_SOURCE_DIR)/HDF5/include
+
+define run-config
+  # Important: the default path is the one of Makefile's, except for '&&' connectivity.
+  # Boost/blitz/eigen  
+  cd $(LIB_SOURCE_DIR) && tar -xvf eigen.tar.gz
+  
+  mkdir -p $(LIB_BINARY_DIR)
+  mkdir -p $(LIB_HDF5_INCLUDE_DIR)
+  
+  # Tecplot.
+  # Tecplot lib could not been compiled, must be installed for different linux platform, so copy it directly.
+  # it's supported only for Linux-aarch64 and Linux-x86_64 now.
+  cd $(LIB_SOURCE_DIR) && cp libtecio-$(systype)-$(cputype).a $(CURDIR)/$(LIB_BINARY_DIR)/libtecio.a
+  
+  # HDF5
+  cd $(LIB_SOURCE_DIR) && tar -xvf hdf5-$(hdf5_version).tar.gz
+  cd $(LIB_SOURCE_DIR)/hdf5-$(hdf5_version) && mkdir build && mkdir lib && cd build && cmake .. -DHDF5_ENABLE_LARGE_FILE=ON -DCMAKE_INSTALL_PREFIX=../lib -DHDF5_ENABLE_PARALLEL=ON && cmake .. -DMPI_COMPILER=$(PATH_MPICC) -DMPIEXEC=$(PATH_MPIEXEC) && make -j $(nProcessor) && make install  
+  cp $(CURDIR)/$(LIB_SOURCE_DIR)/hdf5-$(hdf5_version)/lib/lib/libhdf5.a $(CURDIR)/$(LIB_BINARY_DIR) 
+  
+  # CGNS
+  cd $(LIB_SOURCE_DIR) && tar -xvf cgns-$(cgns_version).tar.gz
+  cd $(LIB_SOURCE_DIR)/CGNS-$(cgns_version) && mkdir build && mkdir lib && cd build && cmake .. -DCMAKE_INSTALL_PREFIX=$(LIB_SOURCE_DIR)/CGNS-$(cgns_version)/lib -DCGNS_ENABLE_HDF5=ON -DHDF5_DIR=$(CURDIR)/$(LIB_SOURCE_DIR)/hdf5-$(hdf5_version)/build -DHDF5_NEED_MPI=ON -DMPIEXEC=$(PATH_MPIEXEC) -DMPI_COMPILER=$(PATH_MPICC) && make -j $(nProcessor) && make install && cp $(LIB_SOURCE_DIR)/CGNS-$(cgns_version)/lib/lib/libcgns.a $(CURDIR)/$(LIB_BINARY_DIR)
+  
+  # Metis && Parmetis.
+  cd $(LIB_SOURCE_DIR) && tar -xvf parmetis-$(parmetis_version).tar.gz
+  cd $(LIB_SOURCE_DIR)/parmetis-$(parmetis_version) && make config prefix=$(LIB_SOURCE_DIR)/parmetis-$(parmetis_version)
+  cd $(LIB_SOURCE_DIR)/parmetis-$(parmetis_version)/$(PARMETISBUILDDIR) && make -j $(nProcessor)  
+  cp $(LIB_SOURCE_DIR)/parmetis-$(parmetis_version)/$(PARMETISBUILDDIR)/libparmetis/libparmetis.a $(CURDIR)/$(LIB_BINARY_DIR)
+  cd $(LIB_SOURCE_DIR) && tar -xvf metis-$(metis_version).tar.gz
+  cd $(LIB_SOURCE_DIR)/metis-$(metis_version) && make config prefix=$(LIB_SOURCE_DIR)/metis-$(metis_version)
+  cd $(LIB_SOURCE_DIR)/metis-$(metis_version)/$(PARMETISBUILDDIR) && make -j $(nProcessor)
+  cp $(LIB_SOURCE_DIR)/metis-$(metis_version)/$(PARMETISBUILDDIR)/libmetis/libmetis.a $(CURDIR)/$(LIB_BINARY_DIR)
+  
+  # Build PHengLEIv3d0
+  mkdir build
+  cd build && cmake .. -DCMAKE_INSTALL_PREFIX=$(CURDIR)/build
+  cd build && make -j$(nProcessor)
+endef
+  
+#all clean install:
+#	@if [ ! -f $(BUILDDIR)/Makefile ]; then \
+#		more BUILD.txt; \
+#	else \
+#	  	make -C $(BUILDDIR) $@ $(MAKEFLAGS); \
+#	fi
+
+#uninstall:
+#	xargs rm < $(BUILDDIR)/install_manifest.txt
+
+config:distclean
+	$(run-config)
+
+distclean:
+	rm -rf $(LIB_SOURCE_DIR)/hdf5-$(hdf5_version)/build
+	rm -rf $(LIB_SOURCE_DIR)/CGNS-$(cgns_version)/build
+	rm -rf $(LIB_BINARY_DIR)
+
+#remake:
+#	find . -name CMakeLists.txt -exec touch {} ';'
+
+#dist:
+#	util/mkdist.sh $(PKGNAME)
+
+
+#.PHONY: config distclean dist all clean install uninstall remake
diff --git a/phenglei/PHMacro.cmake b/phenglei/PHMacro.cmake
new file mode 100644
index 0000000..0b5f89b
--- /dev/null
+++ b/phenglei/PHMacro.cmake
@@ -0,0 +1,105 @@
+#+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+#          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+#          P   P  H   H  E      NN   N  G      L      E       I          +
+#          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+#          P      H   H  E      N  N N  G   G  L      E       I          +
+#          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+#------------------------------------------------------------------------+
+#          Platform for Hybrid Engineering Simulation of Flows           +
+#           China Aerodynamics Research and Development Center           +
+#                     (C) Copyright, Since 2010                          +
+#+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+#! @file      PHMacro.cmake
+#! @brief     It defines the macro of USE_XX precondition.
+#! @author    Bell.
+
+#Mac function to define pre-definition.
+macro(opt OPTION HELP VALUE)
+  option(USE_${OPTION} ${HELP} ${VALUE})
+  set(OPT_TEXI "${OPT_TEXI}\n@item USE_${OPTION}\n${HELP} (default: ${VALUE})")
+  if(${VALUE} STREQUAL "ON")
+    message(STATUS "${OPTION} is turned on by default")
+  else()
+	message(STATUS "${OPTION} is turned off by default")
+  endif()
+endmacro(opt)
+
+macro(opt_build OPTION HELP VALUE)
+  option(BUILD_${OPTION} ${HELP} ${VALUE})
+  set(OPT_TEXI "${OPT_TEXI}\n@item BUILD_${OPTION}\n${HELP} (default: ${VALUE})")
+  if(${VALUE} STREQUAL "ON")
+    message(STATUS "${OPTION} is turned on by default")
+  else()
+	message(STATUS "${OPTION} is turned off by default")
+  endif()
+endmacro(opt_build)
+
+macro(includeAPIHeadFiles path)
+message(STATUS "includeAPIHeadFiles is ${path}")
+include_directories(${path}/DataStruct/include)
+include_directories(${path}/Data/include)
+include_directories(${path}/Math/include)
+include_directories(${path}/FYMPI/include)
+include_directories(${path}/Toolkit/include)
+include_directories(${path}/IO/include)
+include_directories(${path}/Geometry/include)
+include_directories(${path}/Physics/include)
+include_directories(${path}/PreProcess/include)
+include_directories(${path}/PostProcess/include)
+include_directories(${path}/Common/include)
+endmacro(includeAPIHeadFiles)
+
+macro(includeHeadFiles)
+message(STATUS "includeHeadFiles is ${PROJECT_SOURCE_DIR}")
+set(DataStruct_H_PATH   ${PROJECT_SOURCE_DIR}/../API/DataStruct/include)
+include_directories(${DataStruct_H_PATH})
+set(Data_H_PATH   ${PROJECT_SOURCE_DIR}/../API/Data/include)
+include_directories(${Data_H_PATH})
+set(Math_H_PATH   ${PROJECT_SOURCE_DIR}/../API/Math/include)
+include_directories(${Math_H_PATH})
+set(PHMPI_H_PATH   ${PROJECT_SOURCE_DIR}/../API/FYMPI/include)
+include_directories(${PHMPI_H_PATH})
+set(Toolkit_H_PATH   ${PROJECT_SOURCE_DIR}/../API/Toolkit/include)
+include_directories(${Toolkit_H_PATH})
+set(IO_H_PATH   ${PROJECT_SOURCE_DIR}/../API/IO/include)
+include_directories(${IO_H_PATH})
+set(Geometry_H_PATH   ${PROJECT_SOURCE_DIR}/../API/Geometry/include)
+include_directories(${Geometry_H_PATH})
+set(Physics_H_PATH   ${PROJECT_SOURCE_DIR}/../API/Physics/include)
+include_directories(${Physics_H_PATH})
+set(PreProcess_H_PATH   ${PROJECT_SOURCE_DIR}/../API/PreProcess/include)
+include_directories(${PreProcess_H_PATH})
+set(PostProcess_H_PATH   ${PROJECT_SOURCE_DIR}/../API/PostProcess/include)
+include_directories(${PostProcess_H_PATH})
+set(Common_H_PATH   ${PROJECT_SOURCE_DIR}/../API/Common/include)
+include_directories(${Common_H_PATH})
+set(HyFLOW_H_PATH   ${PROJECT_SOURCE_DIR}/../HyFLOW/include)
+include_directories(${HyFLOW_H_PATH})
+set(MultiSpecies_H_PATH   ${PROJECT_SOURCE_DIR}/../API/MultiSpecies/include)
+include_directories(${MultiSpecies_H_PATH})
+endmacro(includeHeadFiles)
+
+
+
+macro(include3rpartyHeadFiles)
+message(STATUS "include3rpartyHeadFiles is ${PROJECT_SOURCE_DIR}")
+set(HDF5_H_PATH    ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/HDF5/include)
+include_directories("${HDF5_H_PATH}")
+
+if(USE_TecplotLib)
+set(TECIO_H_PATH   ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/TECIO/include)
+include_directories("${TECIO_H_PATH}")
+endif(USE_TecplotLib)
+
+set(PARMETIS_H_PATH  ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/parmetis/include)
+include_directories("${PARMETIS_H_PATH}")
+
+set(MEITIS_H_PATH    ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/metis/include)
+include_directories("${MEITIS_H_PATH}")
+
+set(CGNS_H_PATH      ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/cgns/include)
+include_directories("${CGNS_H_PATH}")
+
+set(MGRID_H_PATH    ${PROJECT_SOURCE_DIR}/../PHengLEI/3rdparty/mgrid/include)
+include_directories("${MGRID_H_PATH}")
+endmacro(include3rpartyHeadFiles)
diff --git a/phenglei/tutorials/.gitignore b/phenglei/tutorials/.gitignore
new file mode 100644
index 0000000..b4a1578
--- /dev/null
+++ b/phenglei/tutorials/.gitignore
@@ -0,0 +1,9 @@
+# ---> Perl6
+# Gitignore for Perl 6 (http://www.perl6.org)
+# As part of https://github.com/github/gitignore
+
+# precompiled files
+.precomp
+lib/.precomp
+
+
diff --git a/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..573ffdb
--- /dev/null
+++ b/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,197 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxsimustep: the max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:       the step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   the step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce:   the step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    the step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 150000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.1;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 2.0e5;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "nolim";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 100.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+		
+string gridfile   = "./grid/flat_laminar_73_81.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+
+double MUSCLCoefXk = 0.333333;
\ No newline at end of file
diff --git a/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..c995a53
--- /dev/null
+++ b/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/flat_laminar_73_81.grd";
+string out_gfile  = "./grid/flat_laminar_73_81.fts";
diff --git a/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/bin/key.hypara b/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/bin/partition.hypara b/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/bin/partition.hypara
new file mode 100644
index 0000000..6c83cd6
--- /dev/null
+++ b/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 1;
+
+string original_grid_file  = "./grid/flat_laminar_73_81.fts";
+string partition_grid_file = "./grid/flat_laminar_73_81.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/grid/网格地址.txt b/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A01_TwoD_Plate_Laminar_Struct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..0c7580e
--- /dev/null
+++ b/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,196 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 5.00;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 327.36;
+
+int inflowParaType = 0;
+double refReNumber = 1.5e7;
+double refDimensionalTemperature = 300.33;
+double freestream_vibration_temperature = 10000.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 0.001;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 2.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 0.0002;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd      = 100;
+int    CFLVaryStep = 500;
+double ktmax       = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/plate_137_97.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
+
+double MUSCLCoefXk = 0.333333;
diff --git a/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..9c07ac6
--- /dev/null
+++ b/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/plate_137_97.grd";
+string out_gfile  = "./grid/plate_137_97.fts";
diff --git a/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/bin/key.hypara b/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..63c7ada
--- /dev/null
+++ b/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/bin/partition.hypara b/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/bin/partition.hypara
new file mode 100644
index 0000000..05c79be
--- /dev/null
+++ b/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 1;
+
+string original_grid_file  = "./grid/plate_137_97.fts";
+string partition_grid_file = "./grid/plate_137_97.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/grid/网格地址.txt b/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/bin/cfd_para.hypara b/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..85734e3
--- /dev/null
+++ b/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,198 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 100000;
+
+int intervalStepFlow  = 5000;
+int intervalStepPlot  = 5000;
+int intervalStepForce = 100;
+int intervalStepRes   = 100;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 5.0e6;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 0.001;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 2.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+int    viscousType    = 4;
+string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "nolim";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 500.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+		
+string gridfile   = "./grid/Mesh4_137_97.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+
+double MUSCLCoefXk = 0.333333;
+
diff --git a/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/bin/grid_para.hypara b/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/bin/grid_para.hypara
new file mode 100644
index 0000000..2cd00bd
--- /dev/null
+++ b/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/Mesh4_137_97.grd";
+string out_gfile  = "./grid/Mesh4_137_97.fts";
diff --git a/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/bin/key.hypara b/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/bin/partition.hypara b/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/bin/partition.hypara
new file mode 100644
index 0000000..b22eded
--- /dev/null
+++ b/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 1;
+
+string original_grid_file  = "./grid/Mesh4_137_97.fts";
+string partition_grid_file = "./grid/Mesh4_137_97.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/grid/网格地址.txt b/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A03_TwoD_plate_SST_LowMach_Struct/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/bin/cfd_para_supersonic.hypara b/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/bin/cfd_para_supersonic.hypara
new file mode 100644
index 0000000..4c8bc45
--- /dev/null
+++ b/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/bin/cfd_para_supersonic.hypara
@@ -0,0 +1,192 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 20000;
+
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 2000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 5.00;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 327.36;
+
+int inflowParaType = 0;
+double refReNumber = 1.5e7;
+double refDimensionalTemperature = 300.33;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 0.001;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 2.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+int    viscousType    = 4;
+string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd = 50.0;
+
+double ktmax  = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/Mesh4_137_97.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
+
+double MUSCLCoefXk = 0.333333;
diff --git a/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..8b54fdc
--- /dev/null
+++ b/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/Mesh4_137_97.grd";
+string out_gfile  = "./grid/Mesh4_137_97.fts";
diff --git a/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/bin/key.hypara b/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..5c88d75
--- /dev/null
+++ b/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/bin/partition.hypara b/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/bin/partition.hypara
new file mode 100644
index 0000000..b22eded
--- /dev/null
+++ b/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 1;
+
+string original_grid_file  = "./grid/Mesh4_137_97.fts";
+string partition_grid_file = "./grid/Mesh4_137_97.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/grid/网格地址.txt b/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A04_TwoD_Plate_SST_Ma5_Struct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/bin/cfd_para.hypara b/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..4dc8207
--- /dev/null
+++ b/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,195 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 30000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 8.03;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 294.0 ;
+
+int    inflowParaType = 0;
+double refReNumber    = 3.67e5;
+double refDimensionalTemperature = 125.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 0.0001;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "vanleer";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd = 3.0;
+
+double ktmax  = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/input.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
+
+double MUSCLCoefXk = 0.333333;
diff --git a/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/bin/grid_para.hypara b/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/bin/grid_para.hypara
new file mode 100644
index 0000000..6c7b6fb
--- /dev/null
+++ b/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string   from_gfile = "./grid/input.grd";
+string   out_gfile  = "./grid/input.fts";
diff --git a/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/bin/key.hypara b/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/bin/key.hypara
new file mode 100644
index 0000000..63c7ada
--- /dev/null
+++ b/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/bin/partition.hypara b/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/bin/partition.hypara
new file mode 100644
index 0000000..fc504bf
--- /dev/null
+++ b/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 1;
+
+string original_grid_file  = "./grid/input.fts";
+string partition_grid_file = "./grid/input.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/grid/网格地址.txt b/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A05_TwoD_Cylinder_Laminar_Ma8d03_Struct/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/bin/cfd_para_transonic.hypara b/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..9aeb6e7
--- /dev/null
+++ b/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/bin/cfd_para_transonic.hypara
@@ -0,0 +1,203 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.799;
+double attackd       = 2.26;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 9.0e6;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 5.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 30.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+		
+string gridfile   = "./grid/NACA0012__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), iblank(81).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
diff --git a/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..2f0ea32
--- /dev/null
+++ b/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/NACA0012.grd";
+string out_gfile  = "./grid/NACA0012.fts";
diff --git a/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/bin/key.hypara b/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..1e90187
--- /dev/null
+++ b/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/bin/partition.hypara b/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..3f9e99f
--- /dev/null
+++ b/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/NACA0012.fts";
+string partition_grid_file = "./grid/NACA0012__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/grid/网格地址.txt b/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A06_ThreeD_NACA0012_SA_Struct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/bin/cfd_para_transonic.hypara b/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..e5b8431
--- /dev/null
+++ b/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/bin/cfd_para_transonic.hypara
@@ -0,0 +1,203 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 30000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+int    viscousType    = 4;
+string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 5.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 10.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/rae2822_vis2d__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), iblank(81).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
diff --git a/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..a1268e6
--- /dev/null
+++ b/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/rae2822_vis2d.grd";
+string out_gfile  = "./grid/rae2822_vis2d.fts";
diff --git a/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/bin/key.hypara b/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..686cff9
--- /dev/null
+++ b/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/bin/partition.hypara b/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..2a1a0e5
--- /dev/null
+++ b/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/rae2822_vis2d.fts";
+string partition_grid_file = "./grid/rae2822_vis2d__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/grid/网格地址.txt b/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A07_TwoD_Rae2822_SST_Struct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..278e7ce
--- /dev/null
+++ b/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,195 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 19.0;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 9.0e6;
+double refDimensionalTemperature = 288.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+int    viscousType    = 4;
+string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 10.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/30p30n_str__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
diff --git a/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..380a737
--- /dev/null
+++ b/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/30p30n_str.grd";
+string out_gfile  = "./grid/30p30n_str.fts";
diff --git a/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/bin/key.hypara b/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/bin/partition.hypara b/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..fe89f5f
--- /dev/null
+++ b/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/30p30n_str.fts";
+string partition_grid_file = "./grid/30p30n_str__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/grid/网格地址.txt b/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A08_TwoD_30p30n_SST_Struct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/bin/cfd_para_transonic.hypara b/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..dee3be2
--- /dev/null
+++ b/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/bin/cfd_para_transonic.hypara
@@ -0,0 +1,205 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 10000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.8395;
+double attackd       = 3.06;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 1.171e7;
+double refDimensionalTemperature = 288;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+int    viscousType    = 4;
+string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 5.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 10.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 2;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/m6_str__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), iblank(81).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+
+double MUSCLCoefXk = 0.333333;
diff --git a/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/bin/grid_para.hypara b/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..dd164cb
--- /dev/null
+++ b/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes     = 1;
+int axisRotateOrder[]    = [1];
+double axisRotateAngles[]= [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/m6_str.cgns";
+string out_gfile  = "./grid/m6_str.fts";
diff --git a/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/bin/key.hypara b/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/bin/key.hypara
new file mode 100644
index 0000000..1e90187
--- /dev/null
+++ b/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/bin/partition.hypara b/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..49d50d7
--- /dev/null
+++ b/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/m6_str.fts";
+string partition_grid_file = "./grid/m6_str__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 2;
diff --git a/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/grid/网格地址.txt b/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A09_ThreeD_M6_SST_Struct_MG2_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/bin/cfd_para.hypara b/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/bin/cfd_para_transonic.hypara b/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..37787d6
--- /dev/null
+++ b/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/bin/cfd_para_transonic.hypara
@@ -0,0 +1,205 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 15000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 10;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.785;
+double attackd       = 2.61;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 1.703665e7;
+double refDimensionalTemperature = 298.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 0.1937;         // unit of meter.
+double forceReferenceArea = 0.12892;          // unit of meter^2.
+double TorqueRefX = 0.66087;                  // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+//int    viscousType = 3;
+//string viscousName = "1eq-sa";
+
+int    viscousType = 4;
+string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 5.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 30.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/stm-dkbm-c-all__16.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), iblank(81).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+
+double MUSCLCoefXk = 0.333333;
diff --git a/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/bin/grid_para.hypara b/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..d401594
--- /dev/null
+++ b/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/stm-dkbm-c-all.grd";
+string out_gfile  = "./grid/stm-dkbm-c-all.fts";
diff --git a/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/bin/key.hypara b/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/bin/key.hypara
new file mode 100644
index 0000000..1e90187
--- /dev/null
+++ b/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/bin/partition.hypara b/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/bin/partition.hypara
new file mode 100644
index 0000000..041126e
--- /dev/null
+++ b/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 16;
+
+string original_grid_file  = "./grid/stm-dkbm-c-all.fts";
+string partition_grid_file = "./grid/stm-dkbm-c-all__16.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/grid/网格地址.txt b/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A10_ThreeD_CHNT_SST_Struct_16CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/boundary_condition.hypara b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/boundary_condition.hypara
new file mode 100644
index 0000000..e7adfcf
--- /dev/null
+++ b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/boundary_condition.hypara
@@ -0,0 +1,64 @@
+# nBoundaryConditions: Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 5;
+string bcName = "SOLID_SURFACE";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "SYMMETRY";
+{
+  int bcType = 3;
+}
+string bcName = "INFLOW";
+{
+  int bcType = 5;
+}
+string bcName = "OUTFLOW";
+{
+  int bcType = 6;
+}
+string bcName = "POLE3";
+{
+  int bcType = 73;
+}
+
+# 'bcType' is defined as following:
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/cfd_para.hypara b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..5ae8b6c
--- /dev/null
+++ b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,193 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 25000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 10.00;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 294.0;
+
+int inflowParaType = 0;
+double refReNumber = 1.0e5;
+double refDimensionalTemperature = 79.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 0.0001;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd   = 10.0;
+int CFLVaryStep = 100;
+double ktmax    = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/3dball.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/grid_para.hypara b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/grid_para.hypara
new file mode 100644
index 0000000..9059d59
--- /dev/null
+++ b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/3dball.grd";
+string out_gfile  = "./grid/3dball.fts";
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/key.hypara b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/key.hypara
new file mode 100644
index 0000000..b892406
--- /dev/null
+++ b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/partition.hypara b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/partition.hypara
new file mode 100644
index 0000000..33091ae
--- /dev/null
+++ b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/3dball.fts";
+string partition_grid_file = "./grid/3dball__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball.grd b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball.grd
new file mode 100644
index 0000000..7da0c53
Binary files /dev/null and b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball.grd differ
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball.inp b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball.inp
new file mode 100644
index 0000000..4ebca51
--- /dev/null
+++ b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball.inp
@@ -0,0 +1,11 @@
+     1
+     1
+    61     81     19
+A              
+     6
+       1       61        1       81        1        1        3
+       1       61        1       81       19       19        3
+       1        1        1       81       19        1       73
+      61       61        1       81       19        1        6
+       1       61        1        1       19        1        2
+       1       61       81       81       19        1        5
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball_0.bcmesh b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball_0.bcmesh
new file mode 100644
index 0000000..1036f3a
Binary files /dev/null and b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball_0.bcmesh differ
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball_0.bcname b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball_0.bcname
new file mode 100644
index 0000000..8028173
--- /dev/null
+++ b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball_0.bcname
@@ -0,0 +1,27 @@
+# Boundary Face Information of Grid ./grid/3dball.fts
+# nBoundaryConditions: number of global boundary conditions.
+# bcName             : Boundary Condition Name.
+# bcType(in PHengLEI): Boundary Condition Type.
+
+int nBoundaryConditions = 5;
+string bcName = "SOLID_SURFACE";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "SYMMETRY";
+{
+  int bcType = 3;
+}
+string bcName = "INFLOW";
+{
+  int bcType = 5;
+}
+string bcName = "OUTFLOW";
+{
+  int bcType = 6;
+}
+string bcName = "POLE3";
+{
+  int bcType = 73;
+}
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball_0.fts b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball_0.fts
new file mode 100644
index 0000000..5eff95b
Binary files /dev/null and b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball_0.fts differ
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball_0.wdt b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball_0.wdt
new file mode 100644
index 0000000..51b901e
Binary files /dev/null and b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball_0.wdt differ
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball__4_0.fts b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball__4_0.fts
new file mode 100644
index 0000000..4c05867
Binary files /dev/null and b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/grid/3dball__4_0.fts differ
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/log0.log b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/log0.log
new file mode 100644
index 0000000..0d2f879
--- /dev/null
+++ b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/log0.log
@@ -0,0 +1,53 @@
+This grid file is new HDF5 version!
+
+Global grid files number: 1
+Max processor ID : 1 of total zone 1, Zones' distribution is specified by partition ...
+
+Zone index in current processor : 0 
+
+ 0.011  seconds: Grid Reading
+Start Swapping Zone Neighbors Information!
+Start broadcasting neighbor information to neighbor zones using new method... 
+End broadcasting neighbor information to neighbor zones by new method... 
+ 0.001  seconds: Neighbor zone information BCast 
+Start SwapNeighborsSendContent ...
+End SwapNeighborsSendContent ...
+ 0.001  seconds: Swap Neighbor Send Content 
+End Swapping Zone Neighbors Information!
+
+The most valid multi-grid level is: 2 
+
+Change boundary condition ...
+Monitoring probes ...
+Swap geommetry sucessfully ...
+  Start Wall Distance Computing ...
+  End compressing, start decompressing ...
+
+ 0.001  seconds: Wall structure collection to server
+ 0.001  seconds: Wall structure BCasting from server
+  The axis with maximum parallel faces is: -1
+
+Wall dist computing for axis: 1
+Wall dist computing for axis: 2
+Wall dist computing for axis: 3
+Wall dist computing for axis: 4
+     10% wall distance completed ...
+     20% wall distance completed ...
+     30% wall distance completed ...
+     40% wall distance completed ...
+     50% wall distance completed ...
+     60% wall distance completed ...
+     70% wall distance completed ...
+     80% wall distance completed ...
+     90% wall distance completed ...
+     100% wall distance completed ...
+17.980  seconds: Wall distance computing
+  End Wall Distance Computing ...
+  Wall face structure deleting ...
+
+Creating and initialization solvers start 
+
+Creating and initialization solvers over 
+
+Multi-Grid Init Flow ...
+Start iterating ...
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/log1.log b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/log1.log
new file mode 100644
index 0000000..2fbefa9
--- /dev/null
+++ b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/log1.log
@@ -0,0 +1,3 @@
+   ---- numberOfProcessor = 4, numberOfTotalZones = 1 ----
+Abnormally Exit Program!!!
+
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/log2.log b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/log2.log
new file mode 100644
index 0000000..e69de29
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/log3.log b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/log3.log
new file mode 100644
index 0000000..2fbefa9
--- /dev/null
+++ b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/log3.log
@@ -0,0 +1,3 @@
+   ---- numberOfProcessor = 4, numberOfTotalZones = 1 ----
+Abnormally Exit Program!!!
+
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/res.dat b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/res.dat
new file mode 100644
index 0000000..1ce2a94
--- /dev/null
+++ b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/res.dat
@@ -0,0 +1,16 @@
+Title="THE RESIDUAL"
+Variables=
+"iter"
+"averageRes"
+"maxRes"
+"maxResCoorX"
+"maxResCoorY"
+"maxResCoorZ"
+"maxResVariable"
+"WallTime"
+1          1.79680e-04    2.27201e-03    3.02218e-01    7.10852e-01    6.21915e-02    0    1.82430e+01
+10         1.48270e-04    1.99316e-03    2.31173e-01    -6.34570e-01    5.55177e-02    0    1.99380e+01
+20         1.25063e-04    1.35055e-03    1.68551e-01    -5.51337e-01    4.82357e-02    0    2.17290e+01
+30         1.25396e-04    1.23766e-03    7.27298e-01    6.81122e-01    6.81122e-01    0    2.35340e+01
+40         1.25199e-04    1.39521e-03    4.43434e-01    8.26633e-01    7.23210e-02    0    2.53140e+01
+50         1.30315e-04    1.61539e-03    3.99990e-01    7.97408e-01    6.97642e-02    0    2.70670e+01
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/sentinel b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/sentinel
new file mode 100644
index 0000000..e69de29
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/tecflow.plt b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/tecflow.plt
new file mode 100644
index 0000000..1c5a6b3
--- /dev/null
+++ b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/tecflow.plt
@@ -0,0 +1,33670 @@
+title="Flow Fields of PHengLEI"
+variables="x", "y", "z", "density", "u", "v", "w", "pressure", "temperature", "mach", "cp"
+zone T = "Zone0 SYMMETRY"
+I = 61
+J = 81
+K = 1
+f = BLOCK
+2.2204460493e-16    3.4267502444e-04    1.3704652454e-03    3.0826662669e-03    5.4781046317e-03    
+8.5551386262e-03    1.2311659405e-02    1.6745092436e-02    2.1852399266e-02    2.7630079602e-02    
+3.4074173711e-02    4.1180265132e-02    4.8943483705e-02    5.7358508908e-02    6.6419573503e-02    
+7.6120467489e-02    8.6454542357e-02    9.7414715650e-02    1.0899347581e-01    1.2118288734e-01    
+1.3397459622e-01    1.4735983565e-01    1.6132943205e-01    1.7587381138e-01    1.9098300563e-01    
+2.0664665971e-01    2.2285403854e-01    2.3959403440e-01    2.5685517452e-01    2.7462562899e-01    
+2.9289321881e-01    3.1164542431e-01    3.3086939364e-01    3.5055195167e-01    3.7067960895e-01    
+3.9123857099e-01    4.1221474771e-01    4.3359376308e-01    4.5536096498e-01    4.7750143528e-01    
+5.0000000000e-01    5.2284123974e-01    5.4600950026e-01    5.6948890319e-01    5.9326335692e-01    
+6.1731656763e-01    6.4163205045e-01    6.6619314077e-01    6.9098300563e-01    7.1598465530e-01    
+7.4118095490e-01    7.6655463614e-01    7.9208830918e-01    8.1776447451e-01    8.4356553496e-01    
+8.6947380778e-01    8.9547153673e-01    9.2154090427e-01    9.4766404376e-01    9.7382305169e-01    
+1.0000000000e+00    -1.0000000000e-04   2.4270929195e-04    1.2706022920e-03    2.9829745335e-03    
+5.3783599374e-03    8.4552651405e-03    1.2211728591e-02    1.6645104095e-02    2.1752282989e-02    
+2.7529911206e-02    3.3974029934e-02    4.1079800569e-02    4.8842783609e-02    5.7257660137e-02    
+6.6318527158e-02    7.6019248342e-02    8.6353246296e-02    9.7313307547e-02    1.0889179625e-01    
+1.2108104795e-01    1.3387271088e-01    1.4725783230e-01    1.6122743492e-01    1.7577194696e-01    
+1.9088092672e-01    2.0654428213e-01    2.2275152386e-01    2.3949143551e-01    2.5675244569e-01    
+2.7452295652e-01    2.9279079232e-01    3.1154298095e-01    3.3076715443e-01    3.5045014114e-01    
+3.7057799222e-01    3.9113718536e-01    4.1211387339e-01    4.3349351750e-01    4.5526132809e-01    
+4.7740273685e-01    4.9990257354e-01    5.2274489578e-01    5.4591462961e-01    5.6939590014e-01    
+5.9317220007e-01    6.1722750933e-01    6.4154556784e-01    6.6610954179e-01    6.9090247944e-01    
+7.1590776232e-01    7.4110825720e-01    7.6648623322e-01    7.9202486554e-01    8.1770665493e-01    
+8.4351377356e-01    8.6942874745e-01    8.9543395260e-01    9.2151156865e-01    9.4764372509e-01    
+9.7381251355e-01    1.0000000000e+00    -2.0993045568e-04   1.3281650668e-04    1.1608224921e-03    
+2.8733829567e-03    5.2687101403e-03    8.3454737625e-03    1.2101874192e-02    1.6535186457e-02    
+2.1642224708e-02    2.7419795631e-02    3.3863941424e-02    4.0969359417e-02    4.8732083534e-02    
+5.7146796624e-02    6.6207446451e-02    7.5907977673e-02    8.6241891074e-02    9.7201829158e-02    
+1.0878001945e-01    1.2096909545e-01    1.3376070787e-01    1.4714569957e-01    1.6111530901e-01    
+1.7565996695e-01    1.9076871092e-01    2.0643173800e-01    2.2263882899e-01    2.3937864809e-01    
+2.5663951541e-01    2.7441008821e-01    2.9267819442e-01    3.1143036451e-01    3.3065476239e-01    
+3.5033822036e-01    3.7046628449e-01    3.9102573167e-01    4.1200298179e-01    4.3338331709e-01    
+4.5515179679e-01    4.7729423721e-01    4.9979547219e-01    5.2263898443e-01    5.4581033787e-01    
+5.6929366146e-01    5.9307199093e-01    6.1712960713e-01    6.4145049711e-01    6.6601764105e-01    
+6.9081395663e-01    7.1582323353e-01    7.4102834029e-01    7.6641103758e-01    7.9195512166e-01    
+8.1764309360e-01    8.4345687201e-01    8.6937921243e-01    8.9539263620e-01    9.2147931987e-01    
+9.4762138870e-01    9.7380092892e-01    1.0000000000e+00    -3.3077750656e-04   1.2010867078e-05    
+1.0401410579e-03    2.7529084370e-03    5.1481716188e-03    8.2247796004e-03    1.1981110750e-02    
+1.6414353495e-02    2.1521237139e-02    2.7298745078e-02    3.3742920623e-02    4.0847950955e-02    
+4.8610390438e-02    5.7024923859e-02    6.6085334923e-02    7.5785657319e-02    8.6119477771e-02    
+9.7079280457e-02    1.0865714270e-01    1.2084602555e-01    1.3363758245e-01    1.4702243153e-01    
+1.6099204848e-01    1.7553686681e-01    1.9064535158e-01    2.0630801772e-01    2.2251494301e-01    
+2.3925466036e-01    2.5651537064e-01    2.7428601156e-01    2.9255441502e-01    3.1130656474e-01    
+3.3053120931e-01    3.5021518534e-01    3.7034348366e-01    3.9090321013e-01    4.1188107815e-01    
+4.3326217328e-01    4.5503138853e-01    4.7717496307e-01    4.9967773518e-01    5.2252255560e-01    
+5.4569568948e-01    5.6918127002e-01    5.9296183056e-01    6.1702198279e-01    6.4134598543e-01    
+6.6591661415e-01    6.9071664311e-01    7.1573031064e-01    7.4094048726e-01    7.6632837467e-01    
+7.9187845190e-01    8.1757322035e-01    8.4339431989e-01    8.6932475836e-01    8.9534721689e-01    
+9.2144386863e-01    9.4759683419e-01    9.7378819388e-01    1.0000000000e+00    -4.6362522026e-04   
+-1.2079132303e-04   9.0747540742e-04    2.6204702484e-03    5.0156630727e-03    8.0920999580e-03    
+1.1848354948e-02    1.6281521271e-02    2.1388234953e-02    2.7165673653e-02    3.3609881905e-02    
+4.0714486079e-02    4.8476612663e-02    5.6890948573e-02    6.5951097165e-02    7.5651189997e-02    
+8.5984908269e-02    9.6944562111e-02    1.0852206373e-01    1.2071073426e-01    1.3350223011e-01    
+1.4688692243e-01    1.6085654761e-01    1.7540154226e-01    1.9050974209e-01    2.0617201145e-01    
+2.2237875460e-01    2.3911836009e-01    2.5637889773e-01    2.7414961353e-01    2.9241834377e-01    
+3.1117047109e-01    3.3039538685e-01    3.5007993238e-01    3.7020848816e-01    3.9076852163e-01    
+4.1174706893e-01    4.3312899933e-01    4.5489902319e-01    4.7704384445e-01    4.9954830636e-01    
+5.2239456485e-01    5.4556965599e-01    5.6905771759e-01    5.9284073077e-01    6.1690367086e-01    
+6.4123109525e-01    6.6580555483e-01    6.9060966591e-01    7.1562816008e-01    7.4084391003e-01    
+7.6623750295e-01    7.9179416848e-01    8.1749640836e-01    8.4332555605e-01    8.6926489675e-01    
+8.9529728724e-01    9.2140489693e-01    9.4756984131e-01    9.7377419419e-01    1.0000000000e+00    
+-6.0966531730e-04   -2.6678137578e-04   7.6163545326e-04    2.4748803443e-03    4.8699958243e-03    
+7.9462446226e-03    1.1702415891e-02    1.6135498201e-02    2.1242025044e-02    2.7019387630e-02    
+3.3463631835e-02    4.0567767534e-02    4.8329550145e-02    5.6743668931e-02    6.5803528985e-02    
+7.5503369456e-02    8.5836975403e-02    9.6796465619e-02    1.0837357080e-01    1.2056200792e-01    
+1.3335343667e-01    1.4673795665e-01    1.6070759090e-01    1.7525277937e-01    1.9036066596e-01    
+2.0602249914e-01    2.2222904205e-01    2.3896852458e-01    2.5622887244e-01    2.7399967056e-01    
+2.9226876003e-01    3.1102086272e-01    3.3024607660e-01    3.4993124819e-01    3.7006008699e-01    
+3.9062045796e-01    4.1159975197e-01    4.3298260060e-01    4.5475351337e-01    4.7689970517e-01    
+4.9940602466e-01    5.2225386405e-01    5.4543110679e-01    5.6892189585e-01    5.9270760521e-01    
+6.1677361003e-01    6.4110479596e-01    6.6568346680e-01    6.9049206538e-01    7.1551586551e-01    
+7.4073774224e-01    7.6613760726e-01    7.9170151533e-01    8.1741196859e-01    8.4324996365e-01    
+8.6919909060e-01    8.9524239934e-01    9.2136205516e-01    9.4754016792e-01    9.7375880428e-01    
+1.0000000000e+00    -7.7020786146e-04   -4.2726890602e-04   6.0131292707e-04    2.3148326992e-03    
+4.7098631543e-03    7.7859051877e-03    1.1541984420e-02    1.5974974374e-02    2.1081295825e-02    
+2.6858574738e-02    3.3302858468e-02    4.0406479168e-02    4.8167883648e-02    5.6581763749e-02    
+6.5641306612e-02    7.5340869663e-02    8.5674352129e-02    9.6633662471e-02    1.0821033185e-01    
+1.2039851238e-01    1.3318986736e-01    1.4657419789e-01    1.6054384211e-01    1.7508924365e-01    
+1.9019678589e-01    2.0585813958e-01    2.2206446236e-01    2.3880380972e-01    2.5606394895e-01    
+2.7383483757e-01    2.9210432194e-01    3.1085639756e-01    3.3008193917e-01    3.4976779898e-01    
+3.6989694891e-01    3.9045769089e-01    4.1143780577e-01    4.3282166381e-01    4.5459355375e-01    
+4.7674125219e-01    4.9924961375e-01    5.2209919100e-01    5.4527879903e-01    5.6877258638e-01    
+5.9256125968e-01    6.1663063356e-01    6.4096595458e-01    6.6554925487e-01    6.9036278659e-01    
+7.1539241957e-01    7.4062103151e-01    7.6602779147e-01    7.9159966129e-01    8.1731914357e-01    
+8.4316686458e-01    8.6912674961e-01    8.9518206083e-01    9.2131495901e-01    9.4750754782e-01    
+9.7374188607e-01    1.0000000000e+00    -9.4669301182e-04   -6.0369357933e-04   4.2506964348e-04    
+2.1388915937e-03    4.5338285804e-03    7.6096433162e-03    1.1365621372e-02    1.5798509801e-02    
+2.0904605462e-02    2.6681792393e-02    3.3126119573e-02    4.0229174133e-02    4.7990162932e-02    
+5.6403780645e-02    6.5462974819e-02    7.5162232900e-02    8.5495579622e-02    9.6454692229e-02    
+1.0803088253e-01    1.2021878098e-01    1.3301005488e-01    1.4639417714e-01    1.6036383231e-01    
+1.7490946808e-01    1.9001663178e-01    2.0567745836e-01    2.2188353916e-01    2.3862273792e-01    
+2.5588264781e-01    2.7365363591e-01    2.9192355439e-01    3.1067560026e-01    3.2990150213e-01    
+3.4958811851e-01    3.6971761047e-01    3.9027876030e-01    4.1125977758e-01    4.3264474527e-01    
+4.5441770942e-01    4.7656706411e-01    4.9907767051e-01    5.2192915823e-01    5.4511136642e-01    
+5.6860844981e-01    5.9240038138e-01    6.1647345887e-01    6.4081332561e-01    6.6540171509e-01    
+6.9022066983e-01    7.1525671489e-01    7.4049273087e-01    7.6590707047e-01    7.9148769269e-01    
+8.1721710060e-01    8.4307551339e-01    8.6904722483e-01    8.9511573042e-01    9.2126318599e-01    
+9.4747168840e-01    9.7372328781e-01    1.0000000000e+00    -1.1407039418e-03   -7.9763802663e-04   
+2.3132459871e-04    1.9454787346e-03    4.3403129712e-03    7.4158778378e-03    1.1171744671e-02    
+1.5604521491e-02    2.0710368940e-02    2.6487454755e-02    3.2931829700e-02    4.0034261899e-02    
+4.7794793739e-02    5.6208123007e-02    6.5266933866e-02    7.4965856692e-02    8.5299054192e-02    
+9.6257949425e-02    1.0783361307e-01    1.2002120144e-01    1.3281238620e-01    1.4619627950e-01    
+1.6016594672e-01    1.7471183998e-01    1.8981858756e-01    2.0547883467e-01    2.2168464946e-01    
+2.3842368487e-01    2.5568334264e-01    2.7345444010e-01    2.9172483581e-01    3.1047684896e-01    
+3.2970314688e-01    3.4939059496e-01    3.6952046291e-01    3.9008206110e-01    4.1106407038e-01    
+4.3245025790e-01    4.5422440295e-01    4.7637557836e-01    4.9888865253e-01    5.2174224042e-01    
+5.4492730698e-01    5.6842801372e-01    5.9222352712e-01    6.1630067602e-01    6.4064553989e-01    
+6.6523952394e-01    6.9006444022e-01    7.1510753412e-01    7.4035168939e-01    7.6577436133e-01    
+7.9136460510e-01    8.1710492430e-01    8.4297509062e-01    8.6895980287e-01    8.9504281311e-01    
+9.2120627168e-01    9.4743226797e-01    9.7370284266e-01    1.0000000000e+00    -1.3539810413e-03   
+-1.0108420413e-03   1.8339788121e-05    1.7328590973e-03    4.1275803802e-03    7.2028705643e-03    
+1.0958615129e-02    1.5391269258e-02    2.0496843847e-02    2.6273818505e-02    3.2718245957e-02    
+3.9819993993e-02    4.7580023495e-02    5.5993035674e-02    6.5051425153e-02    7.4749979431e-02    
+8.5083012890e-02    9.6041669165e-02    1.0761675385e-01    1.1980400135e-01    1.3259508811e-01    
+1.4597872973e-01    1.5994841019e-01    1.7449458651e-01    1.8960087663e-01    2.0526048675e-01    
+2.2146600910e-01    2.3820486494e-01    2.5546424556e-01    2.7323546324e-01    2.9150638356e-01    
+3.1025836075e-01    3.2948509405e-01    3.4917345642e-01    3.6930373769e-01    3.8986582876e-01    
+4.1084892856e-01    4.3223645706e-01    4.5401190026e-01    4.7616507721e-01    4.9868086420e-01    
+5.2153676082e-01    5.4472496961e-01    5.6822965951e-01    5.9202911043e-01    6.1611073505e-01    
+6.4046109228e-01    6.6506122647e-01    6.8989269630e-01    7.1494353902e-01    7.4019664185e-01    
+7.6562847356e-01    7.9122929435e-01    8.1698160838e-01    8.4286469540e-01    8.6886369952e-01    
+8.9496265477e-01    9.2114370551e-01    9.4738893292e-01    9.7368036721e-01    1.0000000000e+00    
+-1.5884375285e-03   -1.2452181862e-03   -2.1579538469e-04   1.4991253611e-03    3.8937224736e-03    
+6.9687106980e-03    1.0724320853e-02    1.5156840106e-02    2.0262114740e-02    2.6038967201e-02    
+3.2483452376e-02    3.9584448307e-02    4.7343925587e-02    5.5756589190e-02    6.4814515442e-02    
+7.4512664575e-02    8.4845517703e-02    9.5803911290e-02    1.0737835953e-01    1.1956523230e-01    
+1.3235621134e-01    1.4573957628e-01    1.5970927129e-01    1.7425575878e-01    1.8936154602e-01    
+2.0502045589e-01    2.2122565677e-01    2.3796431520e-01    2.5522339114e-01    2.7299474097e-01    
+2.9126623801e-01    3.1001817567e-01    3.2924538757e-01    3.4893475503e-01    3.6906549067e-01    
+3.8962812357e-01    4.1061242217e-01    4.3200142481e-01    4.5377829508e-01    4.7593367233e-01    
+4.9845244155e-01    5.2131087616e-01    5.4450253921e-01    5.6801160783e-01    5.9181538728e-01    
+6.1590193207e-01    6.4025832819e-01    6.6486522324e-01    6.8970389743e-01    7.1476325845e-01    
+7.4002619738e-01    7.6546809847e-01    7.9108054663e-01    8.1684604663e-01    8.4274333744e-01    
+8.6875805266e-01    8.9487453634e-01    9.2107492625e-01    9.4734129449e-01    9.7365565984e-01    
+1.0000000000e+00    -1.8461766134e-03   -1.5028689503e-03   -4.7318124709e-04   1.2421807998e-03    
+3.6366414111e-03    6.7112976899e-03    1.0466760088e-02    1.4899131072e-02    2.0004075962e-02    
+2.5780794092e-02    3.2225342721e-02    3.9325511861e-02    4.7084382081e-02    5.5496662491e-02    
+6.4554079518e-02    7.4251783273e-02    8.4584438161e-02    9.5542542974e-02    1.0711629156e-01    
+1.1930275240e-01    1.3209361301e-01    1.4547667380e-01    1.5944638481e-01    1.7399321437e-01    
+1.8909844879e-01    2.0475658886e-01    2.2096143635e-01    2.3769987777e-01    2.5495861878e-01    
+2.7273011390e-01    2.9100224491e-01    3.0975413911e-01    3.2898187716e-01    3.4867234951e-01    
+3.6880358464e-01    3.8936681317e-01    4.1035242963e-01    4.3174305280e-01    4.5352149185e-01    
+4.7567928789e-01    4.9820133548e-01    5.2106256013e-01    5.4425802045e-01    5.6777190262e-01    
+5.9158044044e-01    6.1567239400e-01    6.4003542869e-01    6.6464975600e-01    6.8949634997e-01    
+7.1456507521e-01    7.3983882699e-01    7.6529179741e-01    7.9091702757e-01    8.1669702298e-01    
+8.4260992808e-01    8.6864191459e-01    8.9477766736e-01    9.2099931688e-01    9.4728892536e-01    
+9.7362849892e-01    1.0000000000e+00    -2.1295103638e-03   -1.7861056094e-03   -7.5612669848e-04   
+9.5972047278e-04    3.3540310276e-03    6.4283223971e-03    1.0183622365e-02    1.4615830355e-02    
+1.9720412757e-02    2.5496983218e-02    3.1941601602e-02    3.9040861847e-02    4.6799064722e-02    
+5.5210923887e-02    6.4267781120e-02    7.3964995268e-02    8.4297432231e-02    9.5255219594e-02    
+1.0682819905e-01    1.1901420704e-01    1.3180493747e-01    1.4518766391e-01    1.5915739250e-01    
+1.7370459810e-01    1.8880922481e-01    2.0446651864e-01    2.2067097764e-01    2.3740918050e-01    
+2.5466755331e-01    2.7243920814e-01    2.9071203610e-01    3.0946388252e-01    3.2869219895e-01    
+3.4838388592e-01    3.6851567015e-01    3.8907955346e-01    4.1006661864e-01    4.3145902326e-01    
+4.5323918689e-01    4.7539964191e-01    4.9792529344e-01    5.2078958518e-01    5.4398921987e-01    
+5.6750839358e-01    5.9132216231e-01    6.1542006176e-01    6.3979039426e-01    6.6441289189e-01    
+6.8926819210e-01    7.1434721146e-01    7.3963284988e-01    7.6509798885e-01    7.9073727033e-01    
+8.1653320060e-01    8.4246327056e-01    8.6851424348e-01    8.9467117884e-01    9.2091619916e-01    
+9.4723135573e-01    9.7359864080e-01    1.0000000000e+00    -2.4409804468e-03   -2.0974689594e-03   
+-1.0671699225e-03   6.4921054812e-04    3.0433561453e-03    6.1172463682e-03    9.8723677753e-03    
+1.4304396587e-02    1.9408580504e-02    2.5184988630e-02    3.1629683697e-02    3.8727944788e-02    
+4.6485414049e-02    5.4896810138e-02    6.3953051986e-02    7.3649727907e-02    8.3981925304e-02    
+9.4939363692e-02    1.0651149764e-01    1.1869700782e-01    1.3148759514e-01    1.4486995401e-01    
+1.5883970194e-01    1.7338732093e-01    1.8849127957e-01    2.0414764312e-01    2.2035167506e-01    
+2.3708961567e-01    2.5434758372e-01    2.7211941412e-01    2.9039300822e-01    3.0914480213e-01    
+3.2837375438e-01    3.4806677659e-01    3.6819916444e-01    3.8876376755e-01    4.0975242531e-01    
+4.3114678830e-01    4.5292884775e-01    4.7509222582e-01    4.9762183916e-01    5.2048950257e-01    
+5.4369372617e-01    5.6721871690e-01    5.9103823599e-01    6.1514267178e-01    6.3952102680e-01    
+6.6415250608e-01    6.8901737712e-01    7.1410771285e-01    7.3940641830e-01    7.6488493421e-01    
+7.9053966238e-01    8.1635310992e-01    8.4230204928e-01    8.6837389405e-01    8.9455411552e-01    
+9.2082482748e-01    9.4716806917e-01    9.7356581763e-01    1.0000000000e+00    -2.7833809284e-03   
+-2.4397521088e-03   -1.4091011561e-03   3.0786557299e-04    2.7018298314e-03    5.7752790722e-03    
+9.5302041871e-03    1.3962036027e-02    1.9065781888e-02    2.4842011558e-02    3.1286790923e-02    
+3.8383953640e-02    4.6140616436e-02    5.4551503462e-02    6.3607068815e-02    7.3303153062e-02    
+8.3635087102e-02    9.4592141860e-02    1.0616334634e-01    1.1834830927e-01    1.3113873927e-01    
+1.4452069408e-01    1.5849046326e-01    1.7303853668e-01    1.8814176091e-01    2.0379710181e-01    
+2.2000066427e-01    2.3673831659e-01    2.5399583969e-01    2.7176786310e-01    2.9004229943e-01    
+3.0879403560e-01    3.2802368682e-01    3.4771817685e-01    3.6785122827e-01    3.8841662266e-01    
+4.0940703116e-01    4.3080354699e-01    4.5258769053e-01    4.7475428191e-01    4.9728825049e-01    
+5.2015962040e-01    5.4336888860e-01    5.6690027401e-01    5.9072611449e-01    6.1483773571e-01    
+6.3922490992e-01    6.6386626278e-01    6.8874165506e-01    7.1384443094e-01    7.3915750103e-01    
+7.6465072228e-01    7.9032243106e-01    8.1615513540e-01    8.4212481799e-01    8.6821960727e-01    
+8.9442542729e-01    9.2072438217e-01    9.4709849797e-01    9.7352973497e-01    1.0000000000e+00    
+-3.1597833380e-03   -2.8160255347e-03   -1.7849877193e-03   -6.7376513630e-05   2.3263883983e-03    
+5.3993528654e-03    9.1540621953e-03    1.3585677503e-02    1.8688941806e-02    2.4464975300e-02    
+3.0909847333e-02    3.8005802604e-02    4.5761578847e-02    5.4171906260e-02    6.3226727939e-02    
+7.2922161754e-02    8.3253806286e-02    9.4210439318e-02    1.0578062203e-01    1.1796498336e-01    
+1.3075524041e-01    1.4413675104e-01    1.5810654359e-01    1.7265511657e-01    1.8775753346e-01    
+2.0341175015e-01    2.1961479652e-01    2.3635213191e-01    2.5360916588e-01    2.7138140145e-01    
+2.8965676365e-01    3.0840843636e-01    3.2763885595e-01    3.4733495957e-01    3.6746874045e-01    
+3.8803500470e-01    4.0902733779e-01    4.3042622024e-01    4.5221265484e-01    4.7438277863e-01    
+4.9692153495e-01    5.1979697942e-01    5.4301179318e-01    5.6655020829e-01    5.9038299790e-01    
+6.1450251810e-01    6.3889938728e-01    6.6355159422e-01    6.8843855255e-01    7.1355500394e-01    
+7.3888386514e-01    7.6439325204e-01    7.9008362768e-01    8.1593750112e-01    8.4192998683e-01    
+8.6804999912e-01    8.9428395973e-01    9.2061396218e-01    9.4702201804e-01    9.7349006914e-01    
+1.0000000000e+00    -3.5735642221e-03   -3.2296646265e-03   -2.1982015311e-03   -4.7988184937e-04   
+1.9136639201e-03    4.9860954732e-03    8.7405675897e-03    1.3171944862e-02    1.8274679787e-02    
+2.4050497624e-02    3.0495471528e-02    3.7590099446e-02    4.5344901099e-02    5.3754613326e-02    
+6.2808617481e-02    7.2503336274e-02    8.2834662547e-02    9.3790831974e-02    1.0535989145e-01    
+1.1754359145e-01    1.3033365838e-01    1.4371468071e-01    1.5768449894e-01    1.7223362109e-01    
+1.8733515047e-01    2.0298813131e-01    2.1919061033e-01    2.3592759733e-01    2.5318409359e-01    
+2.7095656241e-01    2.8923294242e-01    3.0798454536e-01    3.2721580962e-01    3.4691368706e-01    
+3.6704826984e-01    3.8761549034e-01    4.0860993915e-01    4.3001142324e-01    4.5180037639e-01    
+4.7397438338e-01    4.9651840288e-01    5.1939832654e-01    5.4261923655e-01    5.6616537944e-01    
+5.9000580827e-01    6.1413401185e-01    6.3854153876e-01    6.6320567763e-01    6.8810535057e-01    
+7.1323683551e-01    7.3858305596e-01    7.6411021383e-01    7.8982111003e-01    8.1569825476e-01    
+8.4171580805e-01    8.6786354811e-01    8.9412844379e-01    9.2049257698e-01    9.4693794329e-01    
+9.7344646431e-01    1.0000000000e+00    -4.0284354336e-03   -3.6843799649e-03   -2.6524493574e-03   
+-9.3335084467e-04   1.4599540205e-03    4.5317997388e-03    8.2860110856e-03    1.2717126685e-02    
+1.7819279662e-02    2.3594860425e-02    3.0039946316e-02    3.7133115070e-02    4.4886845352e-02    
+5.3295881301e-02    6.2348986748e-02    7.2042919514e-02    8.2373895925e-02    9.3329555709e-02    
+1.0489738040e-01    1.1708035340e-01    1.2987021133e-01    1.4325069688e-01    1.5722054334e-01    
+1.7177026919e-01    1.8687082293e-01    2.0252244520e-01    2.1872430053e-01    2.3546090454e-01    
+2.5271680969e-01    2.7048953491e-01    2.8876703380e-01    3.0751856004e-01    3.2675075286e-01    
+3.4645058028e-01    3.6658604459e-01    3.8715431628e-01    4.0815109091e-01    4.2955543499e-01    
+4.5134715682e-01    4.7352543262e-01    4.9607523796e-01    5.1896008561e-01    5.4218769726e-01    
+5.6574233533e-01    5.8959116200e-01    6.1372891125e-01    6.3814815426e-01    6.6282540996e-01    
+6.8773906013e-01    7.1288707151e-01    7.3825237506e-01    7.6379906863e-01    7.8953252319e-01    
+8.1543525014e-01    8.4148036034e-01    8.6765858166e-01    8.9395748441e-01    9.2035913769e-01    
+9.4684551955e-01    9.7339852933e-01    1.0000000000e+00    -4.5284774291e-03   -4.1842506085e-03   
+-3.1518060627e-03   -1.4318513776e-03   9.6118866029e-04    4.0323903678e-03    7.7863150492e-03    
+1.2217142990e-02    1.7318656229e-02    2.3093976376e-02    2.9539185376e-02    3.6630750064e-02    
+4.4383302583e-02    5.2791595097e-02    6.1843712590e-02    7.1536781273e-02    8.1867373078e-02    
+9.2822472609e-02    1.0438893990e-01    1.1657111370e-01    1.2936074187e-01    1.4274063733e-01    
+1.5671051484e-01    1.7126090434e-01    1.8636038555e-01    2.0201051433e-01    2.1821168404e-01    
+2.3494786703e-01    2.5220312237e-01    2.6997612945e-01    2.8825485834e-01    3.0700630026e-01    
+3.2623951384e-01    3.4594148488e-01    3.6607791827e-01    3.8664734555e-01    4.0764667695e-01    
+4.2905416504e-01    4.5084893048e-01    4.7303189900e-01    4.9558806475e-01    5.1847832537e-01    
+5.4171330416e-01    5.6527728102e-01    5.8913533946e-01    6.1328358232e-01    6.3771570488e-01    
+6.6240737996e-01    6.8733639537e-01    7.1250257435e-01    7.3788885604e-01    7.6345702530e-01    
+7.8921527835e-01    8.1514612797e-01    8.4122153160e-01    8.6743326111e-01    8.9376954799e-01    
+9.2021244726e-01    9.4674391770e-01    9.7334583418e-01    1.0000000000e+00    -5.0781758734e-03   
+-4.7337606849e-03   -3.7007511644e-03   -1.9798552850e-03   4.1289362706e-04    3.4833873706e-03    
+7.2369969194e-03    1.1667508636e-02    1.6768318609e-02    2.2543352259e-02    2.8988696592e-02    
+3.6078497923e-02    4.3829755721e-02    5.2237230974e-02    6.1288262405e-02    7.0980381198e-02    
+8.1310550205e-02    9.2265033846e-02    1.0383000894e-01    1.1601130417e-01    1.2880067978e-01    
+1.4217992655e-01    1.5614983817e-01    1.7070095724e-01    1.8579925941e-01    2.0144774639e-01    
+2.1764816239e-01    2.3438388255e-01    2.5163842356e-01    2.6941174049e-01    2.8769182152e-01    
+3.0644317076e-01    3.2567750647e-01    3.4538183399e-01    3.6551933268e-01    3.8609003031e-01    
+4.0709217239e-01    4.2850311670e-01    4.5030122800e-01    4.7248935524e-01    4.9505251301e-01    
+5.1794872413e-01    5.4119180165e-01    5.6476604470e-01    5.8863425166e-01    6.1279403019e-01    
+6.3724031130e-01    6.6194783769e-01    6.8689374417e-01    7.1207989488e-01    7.3748923792e-01    
+7.6308101551e-01    7.8886652966e-01    8.1482829465e-01    8.4093699998e-01    8.6718556520e-01    
+8.9356294862e-01    9.2005118980e-01    9.4663222633e-01    9.7328790616e-01    1.0000000000e+00    
+-5.6824618780e-03   -5.3378396158e-03   -4.3042090161e-03   -2.5822784776e-03   -1.8984960146e-04   
+2.8798658740e-03    6.6331289962e-03    1.1063293086e-02    1.6163329954e-02    2.1938048658e-02    
+2.8383541763e-02    3.5471404628e-02    4.3221239134e-02    5.1627815968e-02    6.0677653486e-02    
+7.0368728060e-02    8.0698432282e-02    9.1652238873e-02    1.0321557360e-01    1.1539590301e-01    
+1.2818500096e-01    1.4156353463e-01    1.5553348376e-01    1.7008540483e-01    1.8518241088e-01    
+2.0082909303e-01    2.1702868048e-01    2.3376389184e-01    2.5101764758e-01    2.6879130514e-01    
+2.8707287258e-01    3.0582411992e-01    3.2505968920e-01    3.4476660722e-01    3.6490527700e-01    
+3.8547737113e-01    4.0648260300e-01    4.2789734675e-01    4.4969913616e-01    4.7189293442e-01    
+4.9446377855e-01    5.1736653108e-01    5.4061851158e-01    5.6420404028e-01    5.8808340356e-01    
+6.1225586331e-01    6.3671770898e-01    6.6144266077e-01    6.8640713568e-01    7.1161524140e-01    
+7.3704993591e-01    7.6266766623e-01    7.8848314864e-01    8.1447889903e-01    8.4062421308e-01    
+8.6691327196e-01    8.9333583300e-01    9.1987391874e-01    9.4650944349e-01    9.7322422562e-01    
+1.0000000000e+00    -6.3467562366e-03   -6.0019063374e-03   -4.9675929824e-03   -3.2445250384e-03   
+-8.5244797919e-04   2.2164119426e-03    5.9692942365e-03    1.0399076179e-02    1.5498263170e-02    
+2.1272635651e-02    2.7718292302e-02    3.4804024202e-02    4.2552294076e-02    5.0957883274e-02    
+6.0006408318e-02    6.9696334978e-02    8.0025528260e-02    9.0978590568e-02    1.0254012202e-01    
+1.1471938971e-01    1.2750818244e-01    1.4088593218e-01    1.5485592255e-01    1.6940872527e-01    
+1.8450430649e-01    2.0014900458e-01    2.1634768119e-01    2.3308233323e-01    2.5033522571e-01    
+2.6810925772e-01    2.8639245918e-01    3.0514359452e-01    3.2438051986e-01    3.4409028563e-01    
+3.6423024280e-01    3.8480387210e-01    4.0581250059e-01    4.2723142108e-01    4.4903725386e-01    
+4.7123728630e-01    4.9381658007e-01    5.1672652360e-01    5.3998829118e-01    5.6358622626e-01    
+5.8747785373e-01    6.1166425400e-01    6.3614320987e-01    6.6088731748e-01    6.8587220475e-01    
+7.1110444572e-01    7.3656700920e-01    7.6221326948e-01    7.8806169613e-01    8.1409480684e-01    
+8.4028036501e-01    8.6661393876e-01    8.9308616376e-01    9.1967904386e-01    9.4637446776e-01    
+9.7315422132e-01    1.0000000000e+00    -7.0770180521e-03   -6.7319179104e-03   -5.6968539994e-03   
+-3.9725357004e-03   -1.5808453952e-03   1.4870740126e-03    5.2395376601e-03    9.6688995057e-03    
+1.4767152223e-02    2.0541144100e-02    2.6986980539e-02    3.4070369859e-02    4.1816919726e-02    
+5.0221423212e-02    5.9268505447e-02    6.8957170199e-02    7.9285801803e-02    9.0238045916e-02    
+1.0179759502e-01    1.1397569556e-01    1.2676415275e-01    1.4014104072e-01    1.5411107643e-01    
+1.6866484834e-01    1.8375886324e-01    1.9940138024e-01    2.1559905557e-01    2.3233309275e-01    
+2.4958503625e-01    2.6735947989e-01    2.8564447764e-01    3.0439548984e-01    3.2363390591e-01    
+3.4334680221e-01    3.6348817462e-01    3.8406349154e-01    4.0507585396e-01    4.2649936596e-01    
+4.4830964363e-01    4.7051652933e-01    4.9310511184e-01    5.1602296047e-01    5.3929548703e-01    
+5.6290706049e-01    5.8681217005e-01    6.1101389519e-01    6.3551166037e-01    6.6027682607e-01    
+6.8528415275e-01    7.1054292569e-01    7.3603612567e-01    7.6171374907e-01    7.8759839146e-01    
+8.1367257254e-01    8.3990237126e-01    8.6628488041e-01    8.9281170123e-01    9.1946481702e-01    
+9.4622608832e-01    9.7307726527e-01    1.0000000000e+00    -7.8797981936e-03   -7.5344229591e-03   
+-6.4985339586e-03   -4.7728411386e-03   -2.3815759938e-03   6.8530950268e-04    4.4373129303e-03    
+8.8662129618e-03    1.3963438628e-02    1.9737012105e-02    2.6183046185e-02    3.3263860296e-02    
+4.1008519352e-02    4.9411829309e-02    5.8457325458e-02    6.8144602990e-02    7.8472617138e-02    
+8.9423961806e-02    1.0098133171e-01    1.1315814918e-01    1.2594623752e-01    1.3932217815e-01    
+1.5329226368e-01    1.6784710105e-01    1.8293939408e-01    1.9857951340e-01    2.1477608802e-01    
+2.3150944927e-01    2.4876034956e-01    2.6653524571e-01    2.8482221812e-01    3.0357309496e-01    
+3.2281314979e-01    3.4252948751e-01    3.6267241569e-01    3.8324958783e-01    4.0426605496e-01    
+4.2569461443e-01    4.4750977838e-01    4.6972419790e-01    4.9232299156e-01    5.1524953031e-01    
+5.3853388427e-01    5.6216045047e-01    5.8608038094e-01    6.1029895279e-01    6.3481739513e-01    
+6.5960571009e-01    6.8463770450e-01    7.0992564417e-01    7.3545252298e-01    7.6116462400e-01    
+7.8708907854e-01    8.1320840845e-01    8.3948684101e-01    8.6592314507e-01    8.9250998331e-01    
+9.1922931647e-01    9.4606297413e-01    9.7299266714e-01    1.0000000000e+00    -8.7622980613e-03   
+-8.4166204161e-03   -7.3798243909e-03   -5.6526205537e-03   -3.2618227896e-03   -1.9607387661e-04   
+3.5554236292e-03    7.9838159863e-03    1.3079912610e-02    1.8853026139e-02    2.5299277486e-02    
+3.2377260659e-02    4.0119841138e-02    4.8521839042e-02    5.7565591600e-02    6.7251344153e-02    
+7.7578679529e-02    8.8529035434e-02    1.0008400973e-01    1.1225941673e-01    1.2504709959e-01    
+1.3842199879e-01    1.5239213911e-01    1.6694814772e-01    1.8203854790e-01    1.9767603143e-01    
+2.1387139603e-01    2.3060401424e-01    2.4785376771e-01    2.6562916132e-01    2.8391830448e-01    
+3.0266903252e-01    3.2191088885e-01    3.4163100974e-01    3.6177564818e-01    3.8235485976e-01    
+4.0337583924e-01    4.2480994740e-01    4.4663048288e-01    4.6885318436e-01    4.9146320318e-01    
+5.1439929501e-01    5.3769665088e-01    5.6133969866e-01    5.8527592185e-01    6.0951301335e-01    
+6.3405418620e-01    6.5886794923e-01    6.8392706100e-01    7.0924706379e-01    7.3481096589e-01    
+7.6056096831e-01    7.8652918852e-01    8.1269815075e-01    8.3903004672e-01    8.6552548775e-01    
+8.9217830344e-01    9.1897042965e-01    9.4588366196e-01    9.7289966802e-01    1.0000000000e+00    
+-9.7324341872e-03   -9.3864241006e-03   -8.3486309790e-03   -6.6197660738e-03   -4.2294821035e-03   
+-1.1649826418e-03   2.5859587018e-03    7.0137929702e-03    1.2108648432e-02    1.7881256338e-02    
+2.4327746528e-02    3.1402617638e-02    3.9142913127e-02    4.7543468687e-02    5.6585304506e-02    
+6.6269380644e-02    7.6595969843e-02    8.7545238795e-02    9.9097579585e-02    1.1127143605e-01    
+1.2405867316e-01    1.3743242753e-01    1.5140262806e-01    1.6595992423e-01    1.8104824358e-01    
+1.9668282959e-01    2.1287686401e-01    2.2960866539e-01    2.4685715816e-01    2.6463309861e-01    
+2.8292462810e-01    3.0167519256e-01    3.2091902928e-01    3.4064330902e-01    3.6078982758e-01    
+3.8137128112e-01    4.0239722103e-01    4.2383742891e-01    4.4566386932e-01    4.6789567520e-01    
+4.9051803390e-01    5.1346462747e-01    5.3677627640e-01    5.6043744247e-01    5.8439157629e-01    
+6.0864902654e-01    6.3321518713e-01    6.5805692535e-01    6.8314584736e-01    7.0850109727e-01    
+7.3410569926e-01    7.5989736686e-01    7.8591369886e-01    8.1213722214e-01    8.3852789067e-01    
+8.6508834126e-01    8.9181368623e-01    9.1868583418e-01    9.4568654327e-01    9.7279743367e-01    
+1.0000000000e+00    -1.0798909251e-02   -1.0452533710e-02   -9.4136444759e-03   -7.6829535510e-03   
+-5.2932343966e-03   -2.2301084625e-03   1.5202214895e-03    5.9474422484e-03    1.1040933296e-02    
+1.6812985367e-02    2.3259738118e-02    3.0331188123e-02    3.8068971713e-02    4.6467941697e-02    
+5.5507670437e-02    6.5189903684e-02    7.5515672607e-02    8.6463746667e-02    9.8013192436e-02    
+1.1018534438e-01    1.2297209148e-01    1.3634458732e-01    1.5031485405e-01    1.6487356565e-01    
+1.7995959754e-01    1.9559099828e-01    2.1178357043e-01    2.2851447386e-01    2.4576158074e-01    
+2.6353812234e-01    2.8183227513e-01    3.0058265976e-01    3.1982867354e-01    3.3955752513e-01    
+3.5970611049e-01    3.8029002864e-01    4.0132142157e-01    4.2276833489e-01    4.4460126663e-01    
+4.6684308101e-01    4.8947900499e-01    5.1243714319e-01    5.3576450455e-01    5.5944558812e-01    
+5.8341941120e-01    6.0769924191e-01    6.3229287164e-01    6.5716536311e-01    6.8228705564e-01    
+7.0768105289e-01    7.3333039643e-01    7.5916786676e-01    7.8523708828e-01    8.1152059076e-01    
+8.3797586823e-01    8.6460778412e-01    8.9141286088e-01    9.1837297709e-01    9.4546984980e-01    
+9.7268504698e-01    1.0000000000e+00    -1.1971290149e-02   -1.1624512862e-02   -1.0584418666e-02   
+-8.8517203896e-03   -6.4626221398e-03   -3.4010061309e-03   3.4865171564e-04    4.7751980407e-03    
+9.8671891811e-03    1.5638630222e-02    2.2085671607e-02    2.9153360776e-02    3.6888383022e-02    
+4.5285609976e-02    5.4323022394e-02    6.4003229742e-02    7.4328096933e-02    8.5274857443e-02    
+9.6821120701e-02    1.0899139887e-01    1.2177760729e-01    1.3514871962e-01    1.4911905913e-01    
+1.6367932671e-01    1.7876284398e-01    1.9439074315e-01    2.1058170781e-01    2.2731162412e-01    
+2.4455720749e-01    2.6233440994e-01    2.8063144653e-01    2.9938163348e-01    3.1863004051e-01    
+3.3836391794e-01    3.5851477536e-01    3.7910140287e-01    4.0013879033e-01    4.2159307498e-01    
+4.4343314266e-01    4.6568595943e-01    4.8833679579e-01    5.1130762503e-01    5.3465225914e-01    
+5.5835523812e-01    5.8235070568e-01    6.0665513933e-01    6.3127896601e-01    6.5618526467e-01    
+6.8134298199e-01    7.0677957436e-01    7.3247810250e-01    7.5836592398e-01    7.8449328719e-01    
+8.1084272507e-01    8.3736902745e-01    8.6407950547e-01    8.9097223175e-01    9.1802905186e-01    
+9.4523163768e-01    9.7256149978e-01    1.0000000000e+00    -1.3260093812e-02   -1.2912874884e-02   
+-1.1871456069e-02   -1.0136551101e-02   -7.7481354147e-03   -4.6881792733e-03   -9.3926027547e-04   
+3.4865446414e-03    8.5768869273e-03    1.4347656258e-02    2.0795014942e-02    2.7858569805e-02    
+3.5590556495e-02    4.3985867327e-02    5.3020733402e-02    6.2698713671e-02    7.3022589582e-02    
+8.3967906100e-02    9.5510670812e-02    1.0767888912e-01    1.2046450537e-01    1.3383409682e-01    
+1.4780451632e-01    1.6236649440e-01    1.7744724734e-01    1.9307129721e-01    2.0926049475e-01    
+2.2598932593e-01    2.4323323449e-01    2.6101116341e-01    2.7931137018e-01    2.9806133982e-01    
+3.1731237776e-01    3.3705178013e-01    3.5720513522e-01    3.7779474113e-01    3.9883871842e-01    
+4.2030110639e-01    4.4214901865e-01    4.6441393041e-01    4.8708116000e-01    5.1006594058e-01    
+5.3342956269e-01    5.5715661139e-01    5.8117587283e-01    6.0550735261e-01    6.3016437494e-01    
+6.5510783799e-01    6.8030515753e-01    7.0578857490e-01    7.3154117191e-01    7.5748434463e-01    
+7.8367562326e-01    8.1009754423e-01    8.3670192462e-01    8.6349876635e-01    8.9048784613e-01    
+9.1765097329e-01    9.4496977001e-01    9.7242568378e-01    1.0000000000e+00    -1.4676881552e-02   
+-1.4329177126e-02   -1.3286302150e-02   -1.1548971357e-02   -9.1613060156e-03   -6.1031745742e-03   
+-2.3550677961e-03   2.0699220874e-03    7.1584517799e-03    1.2928482698e-02    1.9376190188e-02    
+2.6435200191e-02    3.4163849880e-02    4.2557054310e-02    5.1589121178e-02    6.1264653209e-02    
+7.1587439403e-02    8.2531168534e-02    9.4070087277e-02    1.0623604118e-01    1.1902100645e-01    
+1.3238892597e-01    1.4635943342e-01    1.6092329186e-01    1.7600100596e-01    1.9162082428e-01    
+2.0780807922e-01    2.2453571750e-01    2.4177778494e-01    2.5955651248e-01    2.7786020423e-01    
+2.9660993498e-01    3.1586386509e-01    3.3560934105e-01    3.5576544185e-01    3.7635832194e-01    
+3.9740954344e-01    4.1888083944e-01    4.4073737527e-01    4.6301558310e-01    4.8570083386e-01    
+5.0870095120e-01    5.3208544691e-01    5.5583895557e-01    5.7988437373e-01    6.0424558544e-01    
+6.2893909989e-01    6.5392341794e-01    6.7916427237e-01    7.0469916468e-01    7.3051119983e-01    
+7.5651522043e-01    7.8277676157e-01    8.0927836354e-01    8.3596857544e-01    8.6286035718e-01    
+8.8995535882e-01    9.1723534980e-01    9.4468189769e-01    9.7227638064e-01    1.0000000000e+00    
+-1.6234362770e-02   -1.5886124635e-02   -1.4841648895e-02   -1.3101651381e-02   -1.0714810897e-02   
+-7.6586853564e-03   -3.9114714552e-03   5.1262245847e-04    5.5991595588e-03    1.1368378736e-02    
+1.7816469671e-02    2.4870483488e-02    3.2595464796e-02    4.0986353650e-02    5.0015343338e-02    
+5.9688184009e-02    7.0009772271e-02    8.0951756381e-02    9.2486447232e-02    1.0464991186e-01    
+1.1743416152e-01    1.3080024308e-01    1.4477084721e-01    1.5933677272e-01    1.7441114622e-01    
+1.9002631278e-01    2.0621143221e-01    2.2293775912e-01    2.4017780261e-01    2.5795740807e-01    
+2.7626493089e-01    2.9501439902e-01    3.1427150851e-01    3.3402366119e-01    3.5418278036e-01    
+3.7477925977e-01    3.9583844487e-01    4.1731953351e-01    4.3918554928e-01    4.6147837354e-01    
+4.8418343504e-01    5.0720041215e-01    5.3060785431e-01    5.5439045052e-01    5.7846462288e-01    
+6.0285851904e-01    6.2759214944e-01    6.5262137957e-01    6.7791009211e-01    7.0350157106e-01    
+7.2937894683e-01    7.5544985778e-01    7.8178863883e-01    8.0837783447e-01    8.3516240134e-01    
+8.6215855108e-01    8.8936999309e-01    9.1677845300e-01    9.4436543833e-01    9.7211225101e-01    
+1.0000000000e+00    -1.7946508971e-02   -1.7597684126e-02   -1.6551448658e-02   -1.4808519606e-02   
+-1.2422585892e-02   -9.3686654475e-03   -5.6224330899e-03   -1.1993241200e-03   3.8850225146e-03    
+9.6533493413e-03    1.6101861799e-02    2.3150383287e-02    3.0871331927e-02    3.9259675257e-02    
+4.8285282186e-02    5.7955164233e-02    6.8275435604e-02    7.9215501404e-02    9.0745544514e-02    
+1.0290627266e-01    1.1568973564e-01    1.2905379674e-01    1.4302450714e-01    1.5759270501e-01    
+1.7266340616e-01    1.8827345902e-01    2.0445623088e-01    2.2118111620e-01    2.3841893475e-01    
+2.5619950531e-01    2.7451123963e-01    2.9326041907e-01    3.1252102366e-01    3.3228051610e-01    
+3.5244295338e-01    3.7304338953e-01    3.9411132905e-01    4.1560318278e-01    4.3747961989e-01    
+4.5978851206e-01    4.8251535161e-01    5.0555086274e-01    5.2898353003e-01    5.5279810232e-01    
+5.7690388430e-01    6.0133371063e-01    6.2611144068e-01    6.5119004286e-01    6.7653136604e-01    
+7.0218505094e-01    7.2813425595e-01    7.5427869976e-01    7.8070239099e-01    8.0738787876e-01    
+8.3427617048e-01    8.6138705243e-01    8.8872649787e-01    9.1627618426e-01    9.4401755312e-01    
+9.7193182256e-01    1.0000000000e+00    -1.9828679091e-02   -1.9479209273e-02   -1.8431039330e-02   
+-1.6684887624e-02   -1.4299950726e-02   -1.1248454354e-02   -7.5033010115e-03   -3.0812747948e-03   
+2.0006638510e-03    7.7680097127e-03    1.4216985552e-02    2.1259469297e-02    2.8975984808e-02    
+3.7361529831e-02    4.6383418078e-02    5.6050047696e-02    6.6368871402e-02    7.7306828395e-02    
+8.8831762224e-02    1.0098948216e-01    1.1377208033e-01    1.2713392032e-01    1.4110474755e-01    
+1.5567544343e-01    1.7074210755e-01    1.8634653889e-01    2.0252673005e-01    2.1925003063e-01    
+2.3648540329e-01    2.5426703480e-01    2.7258339885e-01    2.9133226092e-01    3.1059670770e-01    
+3.3036426876e-01    3.5053035365e-01    3.7113513946e-01    3.9221270277e-01    4.1371639061e-01    
+4.3560428394e-01    4.5793083963e-01    4.8068161989e-01    5.0373750556e-01    5.2719790294e-01    
+5.5104762668e-01    5.7518815727e-01    5.9965748179e-01    6.2448369080e-01    6.4961656790e-01    
+6.7501572619e-01    7.0073779437e-01    7.2676596160e-01    7.5299124042e-01    7.7950827379e-01    
+8.0629961594e-01    8.3330193285e-01    8.6053894044e-01    8.8801910065e-01    9.1572403795e-01    
+9.4363512132e-01    9.7173347674e-01    1.0000000000e+00    -2.1897757281e-02   -2.1547578442e-02   
+-2.0497281920e-02   -1.8747587536e-02   -1.6363746443e-02   -1.3314914864e-02   -9.5709476885e-03   
+-5.1501117474e-03   -7.0820214750e-05   5.6954472677e-03    1.2144932505e-02    1.9180778932e-02    
+2.6892421082e-02    3.5274889915e-02    4.4292690198e-02    5.3955744406e-02    6.4272976688e-02    
+7.5208615460e-02    8.6727932631e-02    9.8882345618e-02    1.1166399311e-01    1.2502339141e-01    
+1.3899434708e-01    1.5356778904e-01    1.6863001523e-01    1.8422826681e-01    2.0040562100e-01    
+2.1712717947e-01    2.3435986335e-01    2.5214266116e-01    2.7046411469e-01    2.8921262788e-01    
+3.0848129839e-01    3.2825772933e-01    3.4842782405e-01    3.6903739147e-01    3.9012553424e-01    
+4.1164223137e-01    4.3354271859e-01    4.5588869187e-01    4.7866579025e-01    5.0174407374e-01    
+5.2523495496e-01    5.4912332084e-01    5.7330205072e-01    5.9781479579e-01    6.2269429793e-01    
+6.4788683970e-01    6.7334957639e-01    6.9914681863e-01    7.2526178938e-01    7.5157593050e-01    
+7.7819557531e-01    8.0510328367e-01    8.3223094899e-01    8.5960660708e-01    8.8724145566e-01    
+9.1511706100e-01    9.4321471230e-01    9.7151543429e-01    1.0000000000e+00    -2.4172304364e-02   
+-2.3821346094e-02   -2.2768711815e-02   -2.1015122949e-02   -1.8632486479e-02   -1.5586584320e-02   
+-1.1843921103e-02   -7.4243936367e-03   -2.3480120876e-03   3.4170699276e-03    9.8671151478e-03    
+1.6895665140e-02    2.4601949985e-02    3.2981037147e-02    4.1994343513e-02    5.1653467256e-02    
+6.1968950077e-02    7.2902040418e-02    8.4415183173e-02    9.6565960818e-02    1.0934656323e-01    
+1.2270327738e-01    1.3667437423e-01    1.5125083496e-01    1.6630818253e-01    1.8189964066e-01    
+1.9807387616e-01    2.1479351951e-01    2.3202324760e-01    2.4980732753e-01    2.6813437595e-01    
+2.8688250563e-01    3.0615581930e-01    3.2594200093e-01    3.4611650368e-01    3.6673132755e-01    
+3.8783110037e-01    4.0936209868e-01    4.3127643040e-01    4.5364374953e-01    4.7644977955e-01    
+4.9955268507e-01    5.2307707729e-01    5.4700792266e-01    5.7122864520e-01    5.9578912267e-01    
+6.2072721019e-01    6.4598534161e-01    6.7151797033e-01    6.9739785175e-01    7.2360824600e-01    
+7.5002007385e-01    7.7675251989e-01    8.0378815014e-01    8.3105361155e-01    8.5858168876e-01    
+8.8638658698e-01    9.1444980847e-01    9.4275255475e-01    9.7127573922e-01    1.0000000000e+00    
+-2.6672724336e-02   -2.6320909235e-02   -2.5265705049e-02   -2.3507834962e-02   -2.1126522739e-02   
+-1.8083840904e-02   -1.4342611134e-02   -9.9245220812e-03   -4.8513394903e-03   9.1243933550e-04    
+7.3631001477e-03    1.4383629137e-02    2.2084024669e-02    3.0459394347e-02    3.9467760528e-02    
+4.9122563494e-02    5.9436123125e-02    7.0366411965e-02    8.1872767154e-02    9.4019548452e-02    
+1.0679900199e-01    1.2015276544e-01    1.3412401751e-01    1.4870379679e-01    1.6375578125e-01    
+1.7933977133e-01    1.9551057843e-01    2.1222811649e-01    2.2945459527e-01    2.4724008463e-01    
+2.6557328354e-01    2.8432099161e-01    3.0359940953e-01    3.2339631015e-01    3.4357565867e-01    
+3.6419626097e-01    3.8530881876e-01    4.0685553841e-01    4.2878508946e-01    4.5117587418e-01    
+4.7401370888e-01    4.9714368151e-01    5.2070491254e-01    5.4468245580e-01    5.6894934107e-01    
+5.9356229098e-01    6.1856478168e-01    6.4389501609e-01    6.6950447743e-01    6.9547520449e-01    
+7.2179049823e-01    7.4830971355e-01    7.7516616250e-01    8.0234241787e-01    8.2975935914e-01    
+8.5745499138e-01    8.8544682594e-01    9.1371629472e-01    9.4224450285e-01    9.7101224133e-01    
+1.0000000000e+00    -2.9421447406e-02   -2.9068690387e-02   -2.8010661090e-02   -2.6248084636e-02   
+-2.3868228164e-02   -2.0829086447e-02   -1.7089432472e-02   -1.2672924673e-02   -7.6032587113e-03   
+-1.8409124877e-03   4.6104250477e-03    1.1622136511e-02    1.9316057897e-02    2.7687340925e-02    
+3.6690276340e-02    4.6340329455e-02    5.6651774915e-02    6.7578984051e-02    7.9077877640e-02    
+9.1220265735e-02    1.0399845631e-01    1.1734897605e-01    1.3132039874e-01    1.4590382611e-01    
+1.6094991490e-01    1.7652569530e-01    1.9269273355e-01    2.0940795725e-01    2.2663086405e-01    
+2.4441790282e-01    2.6275786299e-01    2.8150510758e-01    3.0078913663e-01    3.2059782068e-01    
+3.4078249617e-01    3.6140945072e-01    3.8253606309e-01    4.0410006529e-01    4.2604634702e-01    
+4.4846292757e-01    4.7133572530e-01    4.9449545292e-01    5.1809718101e-01    5.4212605948e-01    
+5.6644369165e-01    5.9111432476e-01    6.1618761417e-01    6.4159711172e-01    6.6729103552e-01    
+6.9336162959e-01    7.1979223983e-01    7.4642950667e-01    7.7342227258e-01    8.0075311779e-01    
+8.2833658157e-01    8.5621640782e-01    8.8441374235e-01    9.1290993971e-01    9.4168599908e-01    
+9.7072257691e-01    1.0000000000e+00    -3.2443131203e-02   -3.2089338728e-02   -3.1028203774e-02   
+-2.9260453590e-02   -2.6882197432e-02   -2.3846947382e-02   -2.0109025686e-02   -1.5694256166e-02   
+-1.0628456051e-02   -4.8676846935e-03   1.5843967667e-03    8.5864150841e-03    1.6273219410e-02    
+2.4640009967e-02    3.3636975315e-02    4.3281806898e-02    5.3590928240e-02    6.4514751844e-02    
+7.6005442861e-02    8.8143001488e-02    1.0091980369e-01    1.1426675760e-01    1.2823836785e-01    
+1.4282580559e-01    1.5786541323e-01    1.7343216871e-01    1.8959506384e-01    2.0630774335e-01    
+2.2352672346e-01    2.4131546549e-01    2.5966285834e-01    2.7840959343e-01    2.9769979082e-01    
+3.1752142845e-01    3.3771195990e-01    3.5834589752e-01    3.7948796014e-01    4.0107096113e-01    
+4.2303563498e-01    4.4548057300e-01    4.6839180574e-01    4.9158424316e-01    5.1523048987e-01    
+5.3931580136e-01    5.6368921982e-01    5.8842326433e-01    6.1357438308e-01    6.3907101498e-01    
+6.6485778874e-01    6.9103816708e-01    7.1759554526e-01    7.4436258669e-01    7.7150520645e-01    
+7.9900599297e-01    8.2677251570e-01    8.5485482726e-01    8.8327806885e-01    9.1202350998e-01    
+9.4107203333e-01    9.7040414749e-01    1.0000000000e+00    -3.5764881970e-02   -3.5409951213e-02   
+-3.4345402197e-02   -3.2571964508e-02   -3.0195467582e-02   -2.7164495660e-02   -2.3428478265e-02   
+-1.9015619644e-02   -1.3954069272e-02   -8.1950291719e-03   -1.7421299117e-03   5.2492326860e-03    
+1.2928213196e-02    2.1290065158e-02    3.0280467585e-02    3.9919559114e-02    5.0226125543e-02    
+6.1146227415e-02    7.2627901308e-02    8.4760150879e-02    9.7535426835e-02    1.1087846080e-01    
+1.2485027725e-01    1.3944212361e-01    1.5447460649e-01    1.7003144082e-01    1.8618978141e-01    
+2.0289966408e-01    2.2011432756e-01    2.3790494200e-01    2.5626050563e-01    2.7500668062e-01    
+2.9430365890e-01    3.1413953645e-01    3.3433650539e-01    3.5497811953e-01    3.7613716669e-01    
+3.9774105313e-01    4.1972594551e-01    4.4220205702e-01    4.6515554156e-01    4.8838393701e-01    
+5.1207912323e-01    5.3622647180e-01    5.6066121639e-01    5.8546496935e-01    6.1070164625e-01    
+6.3629406532e-01    6.6218290947e-01    6.8848397415e-01    7.1518070891e-01    7.4209041213e-01    
+7.6939776692e-01    7.9708537070e-01    8.2505313096e-01    8.5335803556e-01    8.8202961780e-01    
+9.1104905374e-01    9.4039709800e-01    9.7005409658e-01    1.0000000000e+00    -3.9416497724e-02   
+-3.9060315651e-02   -3.7992013539e-02   -3.6212323550e-02   -3.3837760557e-02   -3.0811491599e-02   
+-2.7077567612e-02   -2.2666809651e-02   -1.7609931040e-02   -1.1852794119e-02   -5.3989958478e-03   
+1.5806528687e-03    9.2510326226e-03    1.7607455565e-02    2.6590643342e-02    3.6223424803e-02    
+4.6527182604e-02    5.7443193160e-02    6.8914954488e-02    8.1041367789e-02    9.3814965934e-02    
+1.0715369070e-01    1.2112573381e-01    1.3572242658e-01    1.5074707719e-01    1.6629300516e-01    
+1.8244633891e-01    1.9915314701e-01    2.1636306520e-01    2.3415573798e-01    2.5252028379e-01    
+2.7126584306e-01    2.9057027560e-01    3.1042180716e-01    3.3062585287e-01    3.5127590583e-01    
+3.7245362417e-01    3.9408047008e-01    4.1608758879e-01    4.3859796948e-01    4.6159790160e-01    
+4.8486582588e-01    5.0861481152e-01    5.3283035774e-01    5.5733251842e-01    5.8221290219e-01    
+6.0754363355e-01    6.3324135191e-01    6.5924240249e-01    6.8567613822e-01    7.1252606831e-01    
+7.3959260028e-01    7.6708104904e-01    7.9497402188e-01    8.2316300349e-01    8.5171260561e-01    
+8.8065718987e-01    9.0997782955e-01    9.3965513851e-01    9.6966928402e-01    1.0000000000e+00    
+-4.3430735563e-02   -4.3073177911e-02   -4.2000750004e-02   -4.0214186833e-02   -3.7841749820e-02   
+-3.4820650854e-02   -3.1089028160e-02   -2.6680579463e-02   -2.1628836541e-02   -1.5873791794e-02   
+-9.4190052351e-03   -2.4522336415e-03   5.2086912616e-03    1.3559146058e-02    2.2534402738e-02    
+3.2160247513e-02    4.2460917776e-02    5.3372430730e-02    6.4833295129e-02    7.6953292592e-02    
+8.9725046312e-02    1.0305903395e-01    1.1703132624e-01    1.3163334670e-01    1.4664938724e-01    
+1.6218332580e-01    1.7833115552e-01    1.9503458373e-01    2.1223928539e-01    2.3003422092e-01    
+2.4840864088e-01    2.6715352329e-01    2.8646615032e-01    3.0633489042e-01    3.2654671564e-01    
+3.4720604544e-01    3.6840428910e-01    3.9005637446e-01    4.1208792667e-01    4.3463597961e-01    
+4.5768697177e-01    4.8099835027e-01    5.0480647787e-01    5.2909699408e-01    5.5367326557e-01    
+5.7863788994e-01    6.0407201581e-01    6.2988549014e-01    6.5600988978e-01    6.8258947139e-01    
+7.0960780979e-01    7.3684674434e-01    7.6453427051e-01    7.9265300650e-01    8.2108517774e-01    
+8.4990377698e-01    8.7914847359e-01    9.0880022791e-01    9.3883949906e-01    9.6924625782e-01    
+1.0000000000e+00    -4.7444973402e-02   -4.7086040170e-02   -4.6009486470e-02   -4.4216050116e-02   
+-4.1845739084e-02   -3.8829810109e-02   -3.5100488707e-02   -3.0694349275e-02   -2.5647742042e-02   
+-1.9894789468e-02   -1.3439014622e-02   -6.4851201518e-03   1.1663499007e-03    9.5108365511e-03    
+1.8478162134e-02    2.8097070223e-02    3.8394652948e-02    4.9301668300e-02    6.0751635770e-02    
+7.2865217395e-02    8.5635126690e-02    9.8964377204e-02    1.1293691866e-01    1.2754426681e-01    
+1.4255169730e-01    1.5807364645e-01    1.7421597212e-01    1.9091602044e-01    2.0811550558e-01    
+2.2591270386e-01    2.4429699797e-01    2.6304120352e-01    2.8236202505e-01    3.0224797367e-01    
+3.2246757841e-01    3.4313618506e-01    3.6435495403e-01    3.8603227884e-01    4.0808826455e-01    
+4.3067398974e-01    4.5377604195e-01    4.7713087467e-01    5.0099814422e-01    5.2536363042e-01    
+5.5001401273e-01    5.7506287769e-01    6.0060039806e-01    6.2652962837e-01    6.5277737706e-01    
+6.7950280456e-01    7.0668955128e-01    7.3410088839e-01    7.6198749199e-01    7.9033199113e-01    
+8.1900735199e-01    8.4809494834e-01    8.7763975732e-01    9.0762262628e-01    9.3802385961e-01    
+9.6882323162e-01    1.0000000000e+00    -5.1459211241e-02   -5.1098902430e-02   -5.0018222935e-02   
+-4.8217913400e-02   -4.5849728348e-02   -4.2838969364e-02   -3.9111949255e-02   -3.4708119087e-02   
+-2.9666647543e-02   -2.3915787142e-02   -1.7459024010e-02   -1.0518006662e-02   -2.8759914603e-03   
+5.4625270442e-03    1.4421921530e-02    2.4033892933e-02    3.4328388121e-02    4.5230905870e-02    
+5.6669976412e-02    6.8777142199e-02    8.1545207068e-02    9.4869720456e-02    1.0884251109e-01    
+1.2345518692e-01    1.3845400735e-01    1.5396396709e-01    1.7010078873e-01    1.8679745716e-01    
+2.0399172577e-01    2.2179118680e-01    2.4018535506e-01    2.5892888375e-01    2.7825789978e-01    
+2.9816105693e-01    3.1838844118e-01    3.3906632467e-01    3.6030561896e-01    3.8200818322e-01    
+4.0408860243e-01    4.2671199988e-01    4.4986511213e-01    4.7326339907e-01    4.9718981058e-01    
+5.2163026676e-01    5.4635475988e-01    5.7148786544e-01    5.9712878031e-01    6.2317376661e-01    
+6.4954486434e-01    6.7641613773e-01    7.0377129277e-01    7.3135503245e-01    7.5944071346e-01    
+7.8801097575e-01    8.1692952625e-01    8.4628611970e-01    8.7613104104e-01    9.0644502465e-01    
+9.3720822016e-01    9.6840020541e-01    1.0000000000e+00    -5.5473449080e-02   -5.5111764690e-02   
+-5.4026959401e-02   -5.2219776683e-02   -4.9853717612e-02   -4.6848128618e-02   -4.3123409802e-02   
+-3.8721888899e-02   -3.3685553044e-02   -2.7936784817e-02   -2.1479033397e-02   -1.4550893172e-02   
+-6.9183328213e-03   1.4142175372e-03    1.0365680926e-02    1.9970715643e-02    3.0262123293e-02    
+4.1160143440e-02    5.2588317053e-02    6.4689067002e-02    7.7455287446e-02    9.0775063708e-02    
+1.0474810352e-01    1.1936610703e-01    1.3435631741e-01    1.4985428773e-01    1.6598560534e-01    
+1.8267889387e-01    1.9986794597e-01    2.1766966974e-01    2.3607371215e-01    2.5481656398e-01    
+2.7415377450e-01    2.9407414018e-01    3.1430930395e-01    3.3499646429e-01    3.5625628389e-01    
+3.7798408760e-01    4.0008894032e-01    4.2275001001e-01    4.4595418230e-01    4.6939592346e-01    
+4.9338147693e-01    5.1789690310e-01    5.4269550703e-01    5.6791285320e-01    5.9365716257e-01    
+6.1981790484e-01    6.4631235163e-01    6.7332947090e-01    7.0085303426e-01    7.2860917651e-01    
+7.5689393494e-01    7.8568996037e-01    8.1485170050e-01    8.4447729107e-01    8.7462232476e-01    
+9.0526742301e-01    9.3639258071e-01    9.6797717921e-01    1.0000000000e+00    -5.9487686919e-02   
+-5.9124626950e-02   -5.8035695866e-02   -5.6221639967e-02   -5.3857706876e-02   -5.0857287873e-02   
+-4.7134870350e-02   -4.2735658711e-02   -3.7704458544e-02   -3.1957782491e-02   -2.5499042784e-02   
+-1.8583779683e-02   -1.0960674182e-02   -2.6340919697e-03   6.3094403222e-03    1.5907538353e-02    
+2.6195858465e-02    3.7089381010e-02    4.8506657694e-02    6.0600991805e-02    7.3365367824e-02    
+8.6680406960e-02    1.0065369595e-01    1.1527702714e-01    1.3025862746e-01    1.4574460838e-01    
+1.6187042195e-01    1.7856033058e-01    1.9574416616e-01    2.1354815268e-01    2.3196206924e-01    
+2.5070424420e-01    2.7004964923e-01    2.8998722344e-01    3.1023016673e-01    3.3092660390e-01    
+3.5220694882e-01    3.7395999198e-01    3.9608927820e-01    4.1878802015e-01    4.4204325248e-01    
+4.6552844786e-01    4.8957314328e-01    5.1416353944e-01    5.3903625419e-01    5.6433784095e-01    
+5.9018554482e-01    6.1646204307e-01    6.4307983891e-01    6.7024280407e-01    6.9793477574e-01    
+7.2586332056e-01    7.5434715641e-01    7.8336894500e-01    8.1277387475e-01    8.4266846243e-01    
+8.7311360848e-01    9.0408982138e-01    9.3557694126e-01    9.6755415301e-01    1.0000000000e+00    
+-6.3501924758e-02   -6.3137489210e-02   -6.2044432332e-02   -6.0223503250e-02   -5.7861696140e-02   
+-5.4866447128e-02   -5.1146330897e-02   -4.6749428523e-02   -4.1723364045e-02   -3.5978780166e-02   
+-2.9519052172e-02   -2.2616666193e-02   -1.5003015543e-02   -6.6824014766e-03   2.2531997182e-03    
+1.1844361063e-02    2.2129593637e-02    3.3018618580e-02    4.4424998335e-02    5.6512916608e-02    
+6.9275448202e-02    8.2585750211e-02    9.6559288374e-02    1.1118794725e-01    1.2616093751e-01    
+1.4163492902e-01    1.5775523855e-01    1.7444176730e-01    1.9162038635e-01    2.0942663562e-01    
+2.2785042633e-01    2.4659192443e-01    2.6594552395e-01    2.8590030670e-01    3.0615102950e-01    
+3.2685674352e-01    3.4815761375e-01    3.6993589636e-01    3.9208961608e-01    4.1482603028e-01    
+4.3813232265e-01    4.6166097226e-01    4.8576480964e-01    5.1043017578e-01    5.3537700134e-01    
+5.6076282870e-01    5.8671392708e-01    6.1310618131e-01    6.3984732620e-01    6.6715613724e-01    
+6.9501651723e-01    7.2311746462e-01    7.5180037789e-01    7.8104792962e-01    8.1069604900e-01    
+8.4085963380e-01    8.7160489221e-01    9.0291221975e-01    9.3476130181e-01    9.6713112680e-01    
+1.0000000000e+00    -6.7516162597e-02   -6.7150351470e-02   -6.6053168797e-02   -6.4225366533e-02   
+-6.1865685404e-02   -5.8875606383e-02   -5.5157791444e-02   -5.0763198335e-02   -4.5742269546e-02   
+-3.9999777840e-02   -3.3539061559e-02   -2.6649552703e-02   -1.9045356904e-02   -1.0730710984e-02   
+-1.8030408858e-03   7.7811837725e-03    1.8063328809e-02    2.8947856150e-02    4.0343338977e-02    
+5.2424841412e-02    6.5185528579e-02    7.8491093463e-02    9.2464880802e-02    1.0709886736e-01    
+1.2206324757e-01    1.3752524966e-01    1.5364005516e-01    1.7032320401e-01    1.8749660654e-01    
+2.0530511856e-01    2.2373878342e-01    2.4247960466e-01    2.6184139868e-01    2.8181338995e-01    
+3.0207189227e-01    3.2278688313e-01    3.4410827868e-01    3.6591180074e-01    3.8808995396e-01    
+4.1086404042e-01    4.3422139283e-01    4.5779349666e-01    4.8195647599e-01    5.0669681212e-01    
+5.3171774849e-01    5.5718781645e-01    5.8324230933e-01    6.0975031954e-01    6.3661481348e-01    
+6.6406947041e-01    6.9209825872e-01    7.2037160867e-01    7.4925359936e-01    7.7872691424e-01    
+8.0861822326e-01    8.3905080516e-01    8.7009617593e-01    9.0173461811e-01    9.3394566236e-01    
+9.6670810060e-01    1.0000000000e+00    -7.1530400436e-02   -7.1163213730e-02   -7.0061905263e-02   
+-6.8227229817e-02   -6.5869674668e-02   -6.2884765638e-02   -5.9169251992e-02   -5.4776968147e-02   
+-4.9761175047e-02   -4.4020775515e-02   -3.7559070946e-02   -3.0682439213e-02   -2.3087698265e-02   
+-1.4779020491e-02   -5.8592814898e-03   3.7180064824e-03    1.3997063982e-02    2.4877093720e-02    
+3.6261679618e-02    4.8336766215e-02    6.1095608957e-02    7.4396436715e-02    8.8370473229e-02    
+1.0300978748e-01    1.1796555762e-01    1.3341557031e-01    1.4952487177e-01    1.6620464073e-01    
+1.8337282673e-01    2.0118360150e-01    2.1962714050e-01    2.3836728489e-01    2.5773727341e-01    
+2.7772647321e-01    2.9799275504e-01    3.1871702274e-01    3.4005894361e-01    3.6188770512e-01    
+3.8409029184e-01    4.0690205055e-01    4.3031046301e-01    4.5392602105e-01    4.7814814234e-01    
+5.0296344846e-01    5.2805849564e-01    5.5361280420e-01    5.7977069158e-01    6.0639445777e-01    
+6.3338230076e-01    6.6098280358e-01    6.8918000020e-01    7.1762575273e-01    7.4670682084e-01    
+7.7640589887e-01    8.0654039751e-01    8.3724197652e-01    8.6858745965e-01    9.0055701648e-01    
+9.3313002291e-01    9.6628507440e-01    1.0000000000e+00    -7.5544638275e-02   -7.5176075990e-02   
+-7.4070641728e-02   -7.2229093100e-02   -6.9873663932e-02   -6.6893924892e-02   -6.3180712539e-02   
+-5.8790737959e-02   -5.3780080548e-02   -4.8041773189e-02   -4.1579080333e-02   -3.4715325724e-02   
+-2.7130039626e-02   -1.8827329997e-02   -9.9155220938e-03   -3.4517080772e-04   9.9307991538e-03    
+2.0806331290e-02    3.2180020259e-02    4.4248691018e-02    5.7005689335e-02    7.0301779967e-02    
+8.4276065657e-02    9.8920707587e-02    1.1386786768e-01    1.2930589095e-01    1.4540968837e-01    
+1.6208607744e-01    1.7924904692e-01    1.9706208444e-01    2.1551549759e-01    2.3425496512e-01    
+2.5363314813e-01    2.7363955646e-01    2.9391361781e-01    3.1464716236e-01    3.3600960854e-01    
+3.5786360950e-01    3.8009062972e-01    4.0294006069e-01    4.2639953318e-01    4.5005854545e-01    
+4.7433980870e-01    4.9923008479e-01    5.2439924280e-01    5.5003779196e-01    5.7629907384e-01    
+6.0303859601e-01    6.3014978805e-01    6.5789613675e-01    6.8626174169e-01    7.1487989679e-01    
+7.4416004231e-01    7.7408488349e-01    8.0446257176e-01    8.3543314789e-01    8.6707874337e-01    
+8.9937941485e-01    9.3231438346e-01    9.6586204820e-01    1.0000000000e+00    -7.9558876114e-02   
+-7.9188938250e-02   -7.8079378194e-02   -7.6230956384e-02   -7.3877653196e-02   -7.0903084147e-02   
+-6.7192173087e-02   -6.2804507771e-02   -5.7798986049e-02   -5.2062770863e-02   -4.5599089721e-02   
+-3.8748212234e-02   -3.1172380987e-02   -2.2875639504e-02   -1.3971762698e-02   -4.4083480978e-03   
+5.8645343260e-03    1.6735568860e-02    2.8098360900e-02    4.0160615822e-02    5.2915769713e-02    
+6.6207123219e-02    8.0181658084e-02    9.4831627698e-02    1.0977017773e-01    1.2519621159e-01    
+1.4129450498e-01    1.5796751416e-01    1.7512526712e-01    1.9294056738e-01    2.1140385468e-01    
+2.3014264534e-01    2.4952902286e-01    2.6955263972e-01    2.8983448059e-01    3.1057730197e-01    
+3.3196027346e-01    3.5383951388e-01    3.7609096760e-01    3.9897807082e-01    4.2248860336e-01    
+4.4619106985e-01    4.7053147505e-01    4.9549672113e-01    5.2073998995e-01    5.4646277971e-01    
+5.7282745609e-01    5.9968273424e-01    6.2691727533e-01    6.5480946992e-01    6.8334348318e-01    
+7.1213404084e-01    7.4161326379e-01    7.7176386811e-01    8.0238474602e-01    8.3362431925e-01    
+8.6557002710e-01    8.9820181322e-01    9.3149874401e-01    9.6543902199e-01    1.0000000000e+00    
+-8.3573113953e-02   -8.3201800510e-02   -8.2088114660e-02   -8.0232819667e-02   -7.7881642460e-02   
+-7.4912243402e-02   -7.1203633634e-02   -6.6818277583e-02   -6.1817891550e-02   -5.6083768538e-02   
+-4.9619099108e-02   -4.2781098744e-02   -3.5214722348e-02   -2.6923949011e-02   -1.8028003302e-02   
+-8.4715253880e-03   1.7982694981e-03    1.2664806430e-02    2.4016701541e-02    3.6072540625e-02    
+4.8825850091e-02    6.2112466470e-02    7.6087250512e-02    9.0742547810e-02    1.0567248779e-01    
+1.2108653223e-01    1.3717932159e-01    1.5384895087e-01    1.7100148731e-01    1.8881905032e-01    
+2.0729221177e-01    2.2603032557e-01    2.4542489758e-01    2.6546572297e-01    2.8575534336e-01    
+3.0650744159e-01    3.2791093839e-01    3.4981541826e-01    3.7209130549e-01    3.9501608096e-01    
+4.1857767354e-01    4.4232359425e-01    4.6672314140e-01    4.9176335747e-01    5.1708073710e-01    
+5.4288776746e-01    5.6935583834e-01    5.9632687247e-01    6.2368476261e-01    6.5172280309e-01    
+6.8042522467e-01    7.0938818490e-01    7.3906648526e-01    7.6944285274e-01    8.0030692027e-01    
+8.3181549062e-01    8.6406131082e-01    8.9702421158e-01    9.3068310456e-01    9.6501599579e-01    
+1.0000000000e+00    -8.7587351792e-02   -8.7214662770e-02   -8.6096851125e-02   -8.4234682950e-02   
+-8.1885631724e-02   -7.8921402657e-02   -7.5215094182e-02   -7.0832047395e-02   -6.5836797050e-02   
+-6.0104766212e-02   -5.3639108495e-02   -4.6813985254e-02   -3.9257063709e-02   -3.0972258518e-02   
+-2.2084243906e-02   -1.2534702678e-02   -2.2679953297e-03   8.5940440000e-03    1.9935042183e-02    
+3.1984465428e-02    4.4735930469e-02    5.8017809722e-02    7.1992842939e-02    8.6653467921e-02    
+1.0157479784e-01    1.1697685288e-01    1.3306413819e-01    1.4973038758e-01    1.6687770750e-01    
+1.8469753326e-01    2.0318056886e-01    2.2191800580e-01    2.4132077231e-01    2.6137880623e-01    
+2.8167620613e-01    3.0243758120e-01    3.2386160332e-01    3.4579132263e-01    3.6809164337e-01    
+3.9105409109e-01    4.1466674371e-01    4.3845611864e-01    4.6291480775e-01    4.8802999381e-01    
+5.1342148426e-01    5.3931275521e-01    5.6588422060e-01    5.9297101071e-01    6.2045224990e-01    
+6.4863613626e-01    6.7750696615e-01    7.0664232895e-01    7.3651970674e-01    7.6712183736e-01    
+7.9822909452e-01    8.3000666198e-01    8.6255259454e-01    8.9584660995e-01    9.2986746511e-01    
+9.6459296959e-01    1.0000000000e+00    -9.1601589631e-02   -9.1227525030e-02   -9.0105587591e-02   
+-8.8236546234e-02   -8.5889620988e-02   -8.2930561912e-02   -7.9226554729e-02   -7.4845817207e-02   
+-6.9855702551e-02   -6.4125763887e-02   -5.7659117883e-02   -5.0846871765e-02   -4.3299405070e-02   
+-3.5020568025e-02   -2.6140484510e-02   -1.6597879968e-02   -6.3342601575e-03   4.5232815700e-03    
+1.5853382824e-02    2.7896390231e-02    4.0646010847e-02    5.3923152974e-02    6.7898435367e-02    
+8.2564388032e-02    9.7477107895e-02    1.1286717352e-01    1.2894895480e-01    1.4561182430e-01    
+1.6275392769e-01    1.8057601620e-01    1.9906892595e-01    2.1780568603e-01    2.3721664704e-01    
+2.5729188948e-01    2.7759706890e-01    2.9836772082e-01    3.1981226825e-01    3.4176722701e-01    
+3.6409198125e-01    3.8709210122e-01    4.1075581389e-01    4.3458864304e-01    4.5910647411e-01    
+4.8429663015e-01    5.0976223141e-01    5.3573774297e-01    5.6241260285e-01    5.8961514894e-01    
+6.1721973718e-01    6.4554946942e-01    6.7458870764e-01    7.0389647301e-01    7.3397292821e-01    
+7.6480082198e-01    7.9615126877e-01    8.2819783334e-01    8.6104387826e-01    8.9466900832e-01    
+9.2905182566e-01    9.6416994338e-01    1.0000000000e+00    -9.5615827470e-02   -9.5240387290e-02   
+-9.4114324056e-02   -9.2238409517e-02   -8.9893610252e-02   -8.6939721166e-02   -8.3238015277e-02   
+-7.8859587019e-02   -7.3874608052e-02   -6.8146761561e-02   -6.1679127270e-02   -5.4879758275e-02   
+-4.7341746431e-02   -3.9068877532e-02   -3.0196725114e-02   -2.0661057258e-02   -1.0400524985e-02   
+4.5251913998e-04    1.1771723465e-02    2.3808315035e-02    3.6556091225e-02    4.9828496226e-02    
+6.3804027794e-02    7.8475308144e-02    9.3379417949e-02    1.0875749416e-01    1.2483377141e-01    
+1.4149326101e-01    1.5863014788e-01    1.7645449914e-01    1.9495728304e-01    2.1369336625e-01    
+2.3311252176e-01    2.5320497274e-01    2.7351793167e-01    2.9429786043e-01    3.1576293318e-01    
+3.3774313139e-01    3.6009231913e-01    3.8313011136e-01    4.0684488406e-01    4.3072116744e-01    
+4.5529814046e-01    4.8056326649e-01    5.0610297856e-01    5.3216273072e-01    5.5894098511e-01    
+5.8625928717e-01    6.1398722447e-01    6.4246280259e-01    6.7167044913e-01    7.0115061707e-01    
+7.3142614969e-01    7.6247980661e-01    7.9407344303e-01    8.2638900471e-01    8.5953516199e-01    
+8.9349140668e-01    9.2823618621e-01    9.6374691718e-01    1.0000000000e+00    -9.9630065309e-02   
+-9.9253249549e-02   -9.8123060522e-02   -9.6240272801e-02   -9.3897599516e-02   -9.0948880421e-02   
+-8.7249475824e-02   -8.2873356831e-02   -7.7893513553e-02   -7.2167759236e-02   -6.5699136657e-02   
+-5.8912644785e-02   -5.1384087792e-02   -4.3117187039e-02   -3.4252965718e-02   -2.4724234548e-02   
+-1.4466789813e-02   -3.6182432900e-03   7.6900641064e-03    1.9720239838e-02    3.2466171603e-02    
+4.5733839478e-02    5.9709620222e-02    7.4386228255e-02    8.9281728004e-02    1.0464781481e-01    
+1.2071858802e-01    1.3737469773e-01    1.5450636807e-01    1.7233298208e-01    1.9084564013e-01    
+2.0958104648e-01    2.2900839649e-01    2.4911805599e-01    2.6943879445e-01    2.9022800004e-01    
+3.1171359811e-01    3.3371903577e-01    3.5609265701e-01    3.7916812149e-01    4.0293395424e-01    
+4.2685369184e-01    4.5148980681e-01    4.7682990283e-01    5.0244372572e-01    5.2858771847e-01    
+5.5546936736e-01    5.8290342540e-01    6.1075471175e-01    6.3937613576e-01    6.6875219062e-01    
+6.9840476112e-01    7.2887937116e-01    7.6015879123e-01    7.9199561728e-01    8.2458017607e-01    
+8.5802644571e-01    8.9231380505e-01    9.2742054677e-01    9.6332389098e-01    1.0000000000e+00    
+-1.0364430315e-01   -1.0326611181e-01   -1.0213179699e-01   -1.0024213608e-01   -9.7901588779e-02   
+-9.4958039676e-02   -9.1260936371e-02   -8.6887126643e-02   -8.1912419054e-02   -7.6188756910e-02   
+-6.9719146045e-02   -6.2945531296e-02   -5.5426429153e-02   -4.7165496546e-02   -3.8309206322e-02   
+-2.8787411839e-02   -1.8533054641e-02   -7.6890057201e-03   3.6084047476e-03    1.5632164641e-02    
+2.8376251981e-02    4.1639182729e-02    5.5615212649e-02    7.0297148366e-02    8.5184038058e-02    
+1.0053813545e-01    1.1660340462e-01    1.3325613444e-01    1.5038258827e-01    1.6821146502e-01    
+1.8673399722e-01    2.0546872671e-01    2.2490427121e-01    2.4503113925e-01    2.6535965722e-01    
+2.8615813966e-01    3.0766426304e-01    3.2969494015e-01    3.5209299489e-01    3.7520613163e-01    
+3.9902302442e-01    4.2298621623e-01    4.4768147317e-01    4.7309653917e-01    4.9878447287e-01    
+5.2501270622e-01    5.5199774961e-01    5.7954756364e-01    6.0752219903e-01    6.3628946893e-01    
+6.6583393210e-01    6.9565890518e-01    7.2633259264e-01    7.5783777585e-01    7.8991779153e-01    
+8.2277134744e-01    8.5651772943e-01    8.9113620342e-01    9.2660490732e-01    9.6290086478e-01    
+1.0000000000e+00    -1.0765854099e-01   -1.0727897407e-01   -1.0614053345e-01   -1.0424399937e-01   
+-1.0190557804e-01   -9.8967198931e-02   -9.5272396919e-02   -9.0900896455e-02   -8.5931324555e-02   
+-8.0209754584e-02   -7.3739155432e-02   -6.6978417806e-02   -5.9468770514e-02   -5.1213806053e-02   
+-4.2365446926e-02   -3.2850589129e-02   -2.2599319469e-02   -1.1759768150e-02   -4.7325461117e-04   
+1.1544089445e-02    2.4286332359e-02    3.7544525981e-02    5.1520805077e-02    6.6208068478e-02    
+8.1086348112e-02    9.6428456092e-02    1.1248822123e-01    1.2913757115e-01    1.4625880846e-01    
+1.6408994796e-01    1.8262235431e-01    2.0135640694e-01    2.2080014594e-01    2.4094422250e-01    
+2.6128051999e-01    2.8208827927e-01    3.0361492797e-01    3.2567084453e-01    3.4809333278e-01    
+3.7124414176e-01    3.9511209459e-01    4.1911874063e-01    4.4387313952e-01    4.6936317551e-01    
+4.9512522002e-01    5.2143769398e-01    5.4852613187e-01    5.7619170187e-01    6.0428968632e-01    
+6.3320280210e-01    6.6291567359e-01    6.9291304923e-01    7.2378581411e-01    7.5551676048e-01    
+7.8783996578e-01    8.2096251880e-01    8.5500901315e-01    8.8995860178e-01    9.2578926787e-01    
+9.6247783857e-01    1.0000000000e+00    -1.1167277883e-01   -1.1129183633e-01   -1.1014926992e-01   
+-1.0824586265e-01   -1.0590956731e-01   -1.0297635819e-01   -9.9283857466e-02   -9.4914666267e-02   
+-8.9950230056e-02   -8.4230752259e-02   -7.7759164819e-02   -7.1011304316e-02   -6.3511111875e-02   
+-5.5262115560e-02   -4.6421687530e-02   -3.6913766419e-02   -2.6665584296e-02   -1.5830530580e-02   
+-4.5549139699e-03   7.4560142479e-03    2.0196412737e-02    3.3449869233e-02    4.7426397504e-02    
+6.2118988589e-02    7.6988658167e-02    9.2318776735e-02    1.0837303784e-01    1.2501900787e-01    
+1.4213502865e-01    1.5996843090e-01    1.7851071140e-01    1.9724408717e-01    2.1669602067e-01    
+2.3685730576e-01    2.5720138276e-01    2.7801841889e-01    2.9956559290e-01    3.2164674891e-01    
+3.4409367066e-01    3.6728215190e-01    3.9120116477e-01    4.1525126503e-01    4.4006480587e-01    
+4.6562981184e-01    4.9146596718e-01    5.1786268173e-01    5.4505451412e-01    5.7283584010e-01    
+6.0105717360e-01    6.3011613527e-01    6.5999741508e-01    6.9016719329e-01    7.2123903559e-01    
+7.5319574510e-01    7.8576214004e-01    8.1915369017e-01    8.5350029688e-01    8.8878100015e-01    
+9.2497362842e-01    9.6205481237e-01    1.0000000000e+00    -1.1568701666e-01   -1.1530469859e-01   
+-1.1415800638e-01   -1.1224772593e-01   -1.0991355657e-01   -1.0698551744e-01   -1.0329531801e-01   
+-9.8928436079e-02   -9.3969135556e-02   -8.8251749933e-02   -8.1779174206e-02   -7.5044190826e-02   
+-6.7553453236e-02   -5.9310425067e-02   -5.0477928134e-02   -4.0976943709e-02   -3.0731849124e-02   
+-1.9901293010e-02   -8.6365733287e-03   3.3679390512e-03    1.6106493115e-02    2.9355212485e-02    
+4.3331989932e-02    5.8029908700e-02    7.2890968221e-02    8.8209097378e-02    1.0425785444e-01    
+1.2090044458e-01    1.3801124884e-01    1.5584691384e-01    1.7439906849e-01    1.9313176739e-01    
+2.1259189539e-01    2.3277038902e-01    2.5312224553e-01    2.7394855850e-01    2.9551625783e-01    
+3.1762265329e-01    3.4009400854e-01    3.6332016203e-01    3.8729023494e-01    4.1138378943e-01    
+4.3625647223e-01    4.6189644818e-01    4.8780671433e-01    5.1428766948e-01    5.4158289637e-01    
+5.6947997834e-01    5.9782466088e-01    6.2702946844e-01    6.5707915656e-01    6.8742133734e-01    
+7.1869225706e-01    7.5087472972e-01    7.8368431429e-01    8.1734486153e-01    8.5199158060e-01    
+8.8760339852e-01    9.2415798897e-01    9.6163178617e-01    1.0000000000e+00    -1.1970125450e-01   
+-1.1931756085e-01   -1.1816674285e-01   -1.1624958922e-01   -1.1391754584e-01   -1.1099467670e-01   
+-1.0730677856e-01   -1.0294220589e-01   -9.7988041057e-02   -9.2272747608e-02   -8.5799183594e-02   
+-7.9077077337e-02   -7.1595794597e-02   -6.3358734574e-02   -5.4534168738e-02   -4.5040120999e-02   
+-3.4798113952e-02   -2.3972055440e-02   -1.2718232687e-02   -7.2013614550e-04   1.2016573493e-02    
+2.5260555737e-02    3.9237582359e-02    5.3940828812e-02    6.8793278275e-02    8.4099418021e-02    
+1.0014267105e-01    1.1678188130e-01    1.3388746903e-01    1.5172539679e-01    1.7028742558e-01    
+1.8901944762e-01    2.0848777012e-01    2.2868347227e-01    2.4904310831e-01    2.6987869812e-01    
+2.9146692275e-01    3.1359855767e-01    3.3609434642e-01    3.5935817217e-01    3.8337930512e-01    
+4.0751631382e-01    4.3244813858e-01    4.5816308452e-01    4.8414746148e-01    5.1071265723e-01    
+5.3811127863e-01    5.6612411657e-01    5.9459214817e-01    6.2394280161e-01    6.5416089805e-01    
+6.8467548140e-01    7.1614547854e-01    7.4855371435e-01    7.8160648854e-01    8.1553603289e-01    
+8.5048286432e-01    8.8642579688e-01    9.2334234952e-01    9.6120875996e-01    1.0000000000e+00    
+-1.2371549234e-01   -1.2333042311e-01   -1.2217547931e-01   -1.2025145250e-01   -1.1792153510e-01   
+-1.1500383595e-01   -1.1131823911e-01   -1.0695597570e-01   -1.0200694656e-01   -9.6293745282e-02   
+-8.9819192981e-02   -8.3109963847e-02   -7.5638135958e-02   -6.7407044081e-02   -5.8590409342e-02   
+-4.9103298289e-02   -3.8864378780e-02   -2.8042817870e-02   -1.6799892046e-02   -4.8082113422e-03   
+7.9266538707e-03    2.1165898988e-02    3.5143174787e-02    4.9851748923e-02    6.4695588330e-02    
+7.9989738663e-02    9.6027487657e-02    1.1266331801e-01    1.2976368923e-01    1.4760387973e-01    
+1.6617578266e-01    1.8490712785e-01    2.0438364484e-01    2.2459655553e-01    2.4496397108e-01    
+2.6580883773e-01    2.8741758768e-01    3.0957446205e-01    3.3209468430e-01    3.5539618230e-01    
+3.7946837530e-01    4.0364883822e-01    4.2863980493e-01    4.5442972086e-01    4.8048820864e-01    
+5.0713764498e-01    5.3463966088e-01    5.6276825480e-01    5.9135963545e-01    6.2085613478e-01    
+6.5124263954e-01    6.8192962546e-01    7.1359870001e-01    7.4623269897e-01    7.7952866279e-01    
+8.1372720426e-01    8.4897414804e-01    8.8524819525e-01    9.2252671007e-01    9.6078573376e-01    
+1.0000000000e+00    -1.2772973018e-01   -1.2734328537e-01   -1.2618421578e-01   -1.2425331578e-01   
+-1.2192552436e-01   -1.1901299520e-01   -1.1532969966e-01   -1.1096974552e-01   -1.0602585206e-01   
+-1.0031474296e-01   -9.3839202368e-02   -8.7142850357e-02   -7.9680477319e-02   -7.1455353588e-02   
+-6.2646649946e-02   -5.3166475579e-02   -4.2930643608e-02   -3.2113580300e-02   -2.0881551405e-02   
+-8.8962865389e-03   3.8367342486e-03    1.7071242240e-02    3.1048767214e-02    4.5762669035e-02    
+6.0597898384e-02    7.5880059306e-02    9.1912304264e-02    1.0854475473e-01    1.2563990942e-01    
+1.4348236267e-01    1.6206413975e-01    1.8079480808e-01    2.0027951957e-01    2.2050963878e-01    
+2.4088483385e-01    2.6173897734e-01    2.8336825261e-01    3.0555036643e-01    3.2809502218e-01    
+3.5143419244e-01    3.7555744547e-01    3.9978136262e-01    4.2483147129e-01    4.5069635720e-01    
+4.7682895579e-01    5.0356263274e-01    5.3116804314e-01    5.5941239304e-01    5.8812712274e-01    
+6.1776946795e-01    6.4832438103e-01    6.7918376951e-01    7.1105192149e-01    7.4391168359e-01    
+7.7745083705e-01    8.1191837562e-01    8.4746543176e-01    8.8407059362e-01    9.2171107062e-01    
+9.6036270756e-01    1.0000000000e+00    -1.3174396802e-01   -1.3135614763e-01   -1.3019295225e-01   
+-1.2825517907e-01   -1.2592951363e-01   -1.2302215446e-01   -1.1934116020e-01   -1.1498351533e-01   
+-1.1004475756e-01   -1.0433574063e-01   -9.7859211756e-02   -9.1175736867e-02   -8.3722818680e-02   
+-7.5503663095e-02   -6.6702890550e-02   -5.7229652870e-02   -4.6996908436e-02   -3.6184342730e-02   
+-2.4963210764e-02   -1.2984361736e-02   -2.5318537345e-04   1.2976585492e-02    2.6954359642e-02    
+4.1673589146e-02    5.6500208439e-02    7.1770379949e-02    8.7797120870e-02    1.0442619144e-01    
+1.2151612961e-01    1.3936084561e-01    1.5795249684e-01    1.7668248831e-01    1.9617539430e-01    
+2.1642272204e-01    2.3680569662e-01    2.5766911696e-01    2.7931891754e-01    3.0152627081e-01    
+3.2409536006e-01    3.4747220257e-01    3.7164651565e-01    3.9591388702e-01    4.2102313764e-01    
+4.4696299354e-01    4.7316970294e-01    4.9998762049e-01    5.2769642539e-01    5.5605653127e-01    
+5.8489461002e-01    6.1468280112e-01    6.4540612251e-01    6.7643791357e-01    7.0850514296e-01    
+7.4159066822e-01    7.7537301130e-01    8.1010954699e-01    8.4595671549e-01    8.8289299198e-01    
+9.2089543117e-01    9.5993968136e-01    1.0000000000e+00    -1.3575820586e-01   -1.3536900989e-01   
+-1.3420168871e-01   -1.3225704235e-01   -1.2993350289e-01   -1.2703131371e-01   -1.2335262075e-01   
+-1.1899728514e-01   -1.1406366306e-01   -1.0835673831e-01   -1.0187922114e-01   -9.5208623378e-02   
+-8.7765160041e-02   -7.9551972601e-02   -7.0759131154e-02   -6.1292830160e-02   -5.1063173263e-02   
+-4.0255105160e-02   -2.9044870123e-02   -1.7072436932e-02   -4.3431049955e-03   8.8819287437e-03    
+2.2859952069e-02    3.7584509257e-02    5.2402518493e-02    6.7660700592e-02    8.3681937477e-02    
+1.0030762815e-01    1.1739234980e-01    1.3523932855e-01    1.5384085393e-01    1.7257016853e-01    
+1.9207126902e-01    2.1233580529e-01    2.3272655939e-01    2.5359925657e-01    2.7526958247e-01    
+2.9750217519e-01    3.2009569795e-01    3.4351021270e-01    3.6773558582e-01    3.9204641141e-01    
+4.1721480399e-01    4.4322962988e-01    4.6951045010e-01    4.9641260824e-01    5.2422480764e-01    
+5.5270066950e-01    5.8166209730e-01    6.1159613429e-01    6.4248786400e-01    6.7369205762e-01    
+7.0595836444e-01    7.3926965284e-01    7.7329518555e-01    8.0830071835e-01    8.4444799921e-01    
+8.8171539035e-01    9.2007979172e-01    9.5951665515e-01    1.0000000000e+00    -1.3977244370e-01   
+-1.3938187215e-01   -1.3821042518e-01   -1.3625890563e-01   -1.3393749215e-01   -1.3104047297e-01   
+-1.2736408130e-01   -1.2301105495e-01   -1.1808256856e-01   -1.1237773598e-01   -1.0589923053e-01   
+-9.9241509888e-02   -9.1807501402e-02   -8.3600282108e-02   -7.4815371758e-02   -6.5356007450e-02   
+-5.5129438091e-02   -4.4325867590e-02   -3.3126529481e-02   -2.1160512129e-02   -8.4330246176e-03   
+4.7872719955e-03    1.8765544497e-02    3.3495429369e-02    4.8304828547e-02    6.3551021235e-02    
+7.9566754084e-02    9.6189064868e-02    1.1326856999e-01    1.3111781149e-01    1.4972921102e-01    
+1.6845784876e-01    1.8796714375e-01    2.0824888855e-01    2.2864742217e-01    2.4952939619e-01    
+2.7122024740e-01    2.9347807957e-01    3.1609603583e-01    3.3954822284e-01    3.6382465600e-01    
+3.8817893581e-01    4.1340647034e-01    4.3949626622e-01    4.6585119725e-01    4.9283759599e-01    
+5.2075318990e-01    5.4934480774e-01    5.7842958459e-01    6.0850946746e-01    6.3956960549e-01    
+6.7094620168e-01    7.0341158591e-01    7.3694863746e-01    7.7121735980e-01    8.0649188971e-01    
+8.4293928293e-01    8.8053778872e-01    9.1926415227e-01    9.5909362895e-01    1.0000000000e+00    
+-1.4378668154e-01   -1.4339473441e-01   -1.4221916164e-01   -1.4026076892e-01   -1.3794148142e-01   
+-1.3504963222e-01   -1.3137554185e-01   -1.2702482476e-01   -1.2210147406e-01   -1.1639873365e-01   
+-1.0991923992e-01   -1.0327439640e-01   -9.5849842762e-02   -8.7648591615e-02   -7.8871612362e-02   
+-6.9419184740e-02   -5.9195702919e-02   -4.8396630020e-02   -3.7208188840e-02   -2.5248587326e-02   
+-1.2522944240e-02   6.9261524726e-04    1.4671136925e-02    2.9406349480e-02    4.4207138602e-02    
+5.9441341878e-02    7.5451570691e-02    9.2070501582e-02    1.0914479018e-01    1.2699629443e-01    
+1.4561756811e-01    1.6434552899e-01    1.8386301847e-01    2.0416197180e-01    2.2456828494e-01    
+2.4545953580e-01    2.6717091233e-01    2.8945398395e-01    3.1209637371e-01    3.3558623297e-01    
+3.5991372618e-01    3.8431146021e-01    4.0959813670e-01    4.3576290255e-01    4.6219194440e-01    
+4.8926258375e-01    5.1728157215e-01    5.4598894597e-01    5.7519707187e-01    6.0542280063e-01    
+6.3665134698e-01    6.6820034574e-01    7.0086480739e-01    7.3462762209e-01    7.6913953406e-01    
+8.0468306108e-01    8.4143056665e-01    8.7936018708e-01    9.1844851282e-01    9.5867060275e-01    
+1.0000000000e+00    -1.4780091938e-01   -1.4740759667e-01   -1.4622789811e-01   -1.4426263220e-01   
+-1.4194547068e-01   -1.3905879148e-01   -1.3538700239e-01   -1.3103859458e-01   -1.2612037956e-01   
+-1.2041973133e-01   -1.1393924930e-01   -1.0730728291e-01   -9.9892184123e-02   -9.1696901122e-02   
+-8.2927852966e-02   -7.3482362030e-02   -6.3261967747e-02   -5.2467392450e-02   -4.1289848199e-02   
+-2.9336662522e-02   -1.6612863862e-02   -3.4020415009e-03   1.0576729352e-02    2.5317269591e-02    
+4.0109448656e-02    5.5331662521e-02    7.1336387298e-02    8.7951938296e-02    1.0502101038e-01    
+1.2287477737e-01    1.4150592520e-01    1.6023320922e-01    1.7975889320e-01    2.0007505506e-01    
+2.2048914771e-01    2.4138967542e-01    2.6312157726e-01    2.8542988832e-01    3.0809671159e-01    
+3.3162424311e-01    3.5600279635e-01    3.8044398461e-01    4.0578980305e-01    4.3202953889e-01    
+4.5853269155e-01    4.8568757150e-01    5.1380995440e-01    5.4263308420e-01    5.7196455915e-01    
+6.0233613380e-01    6.3373308846e-01    6.6545448979e-01    6.9831802886e-01    7.3230660671e-01    
+7.6706170831e-01    8.0287423244e-01    8.3992185038e-01    8.7818258545e-01    9.1763287337e-01    
+9.5824757654e-01    1.0000000000e+00    -1.5181515722e-01   -1.5142045893e-01   -1.5023663457e-01   
+-1.4826449548e-01   -1.4594945995e-01   -1.4306795073e-01   -1.3939846294e-01   -1.3505236439e-01   
+-1.3013928506e-01   -1.2444072900e-01   -1.1795925869e-01   -1.1134016942e-01   -1.0393452548e-01   
+-9.5745210629e-02   -8.6984093570e-02   -7.7545539320e-02   -6.7328232575e-02   -5.6538154880e-02   
+-4.5371507558e-02   -3.3424737719e-02   -2.0702783484e-02   -7.4966982491e-03   6.4823217795e-03    
+2.1228189703e-02    3.6011758710e-02    5.1221983164e-02    6.7221203905e-02    8.3833375010e-02    
+1.0089723057e-01    1.1875326031e-01    1.3739428229e-01    1.5612088944e-01    1.7565476793e-01    
+1.9598813831e-01    2.1641001048e-01    2.3731981503e-01    2.5907224219e-01    2.8140579270e-01    
+3.0409704947e-01    3.2766225324e-01    3.5209186653e-01    3.7657650900e-01    4.0198146940e-01    
+4.2829617523e-01    4.5487343871e-01    4.8211255925e-01    5.1033833666e-01    5.3927722243e-01    
+5.6873204644e-01    5.9924946697e-01    6.3081482995e-01    6.6270863385e-01    6.9577125034e-01    
+7.2998559133e-01    7.6498388256e-01    8.0106540381e-01    8.3841313410e-01    8.7700498382e-01    
+9.1681723392e-01    9.5782455034e-01    1.0000000000e+00    -1.5582939505e-01   -1.5543332119e-01   
+-1.5424537104e-01   -1.5226635877e-01   -1.4995344921e-01   -1.4707710999e-01   -1.4340992349e-01   
+-1.3906613420e-01   -1.3415819057e-01   -1.2846172668e-01   -1.2197926808e-01   -1.1537305593e-01   
+-1.0797686685e-01   -9.9793520136e-02   -9.1040334174e-02   -8.1608716610e-02   -7.1394497402e-02   
+-6.0608917310e-02   -4.9453166916e-02   -3.7512812916e-02   -2.4792703106e-02   -1.1591354997e-02   
+2.3879142071e-03    1.7139109814e-02    3.1914068765e-02    4.7112303807e-02    6.3106020512e-02    
+7.9714811724e-02    9.6773450759e-02    1.1463174325e-01    1.3328263938e-01    1.5200856967e-01    
+1.7155064265e-01    1.9190122157e-01    2.1233087325e-01    2.3324995464e-01    2.5502290712e-01    
+2.7738169708e-01    3.0009738735e-01    3.2370026338e-01    3.4818093671e-01    3.7270903340e-01    
+3.9817313576e-01    4.2456281157e-01    4.5121418586e-01    4.7853754700e-01    5.0686671891e-01    
+5.3592136067e-01    5.6549953372e-01    5.9616280014e-01    6.2789657144e-01    6.5996277790e-01    
+6.9322447181e-01    7.2766457596e-01    7.6290605682e-01    7.9925657517e-01    8.3690441782e-01    
+8.7582738218e-01    9.1600159447e-01    9.5740152414e-01    1.0000000000e+00    -1.5984363289e-01   
+-1.5944618345e-01   -1.5825410750e-01   -1.5626822205e-01   -1.5395743847e-01   -1.5108626924e-01   
+-1.4742138404e-01   -1.4307990401e-01   -1.3817709607e-01   -1.3248272435e-01   -1.2599927747e-01   
+-1.1940594244e-01   -1.1201920821e-01   -1.0384182964e-01   -9.5096574778e-02   -8.5671893900e-02   
+-7.5460762230e-02   -6.4679679740e-02   -5.3534826275e-02   -4.1600888113e-02   -2.8882622728e-02   
+-1.5686011746e-02   -1.7064933654e-03   1.3050029926e-02    2.7816378819e-02    4.3002624450e-02    
+5.8990837119e-02    7.5596248438e-02    9.2649670951e-02    1.1051022619e-01    1.2917099647e-01    
+1.4789624990e-01    1.6744651738e-01    1.8781430483e-01    2.0825173603e-01    2.2918009426e-01    
+2.5097357205e-01    2.7335760146e-01    2.9609772524e-01    3.1973827351e-01    3.4427000688e-01    
+3.6884155780e-01    3.9436480211e-01    4.2082944791e-01    4.4755493301e-01    4.7496253475e-01    
+5.0339510117e-01    5.3256549890e-01    5.6226702101e-01    5.9307613331e-01    6.2497831292e-01    
+6.5721692196e-01    6.9067769329e-01    7.2534356058e-01    7.6082823107e-01    7.9744774653e-01    
+8.3539570154e-01    8.7464978055e-01    9.1518595502e-01    9.5697849794e-01    1.0000000000e+00    
+-1.6385787073e-01   -1.6345904571e-01   -1.6226284397e-01   -1.6027008533e-01   -1.5796142774e-01   
+-1.5509542850e-01   -1.5143284458e-01   -1.4709367382e-01   -1.4219600157e-01   -1.3650372203e-01   
+-1.3001928685e-01   -1.2343882895e-01   -1.1606154957e-01   -1.0789013915e-01   -9.9152815382e-02   
+-8.9735071191e-02   -7.9527027058e-02   -6.8750442170e-02   -5.7616485634e-02   -4.5688963309e-02   
+-3.2972542350e-02   -1.9780668494e-02   -5.8009009379e-03   8.9609500369e-03    2.3718688873e-02    
+3.8892945093e-02    5.4875653726e-02    7.1477685152e-02    8.8525891143e-02    1.0638870913e-01    
+1.2505935356e-01    1.4378393013e-01    1.6334239210e-01    1.8372738808e-01    2.0417259880e-01    
+2.2511023387e-01    2.4692423697e-01    2.6933350584e-01    2.9209806312e-01    3.1577628365e-01    
+3.4035907706e-01    3.6497408219e-01    3.9055646846e-01    4.1709608425e-01    4.4389568017e-01    
+4.7138752251e-01    4.9992348342e-01    5.2920963713e-01    5.5903450829e-01    5.8998946648e-01    
+6.2206005441e-01    6.5447106602e-01    6.8813091476e-01    7.2302254520e-01    7.5875040532e-01    
+7.9563891790e-01    8.3388698527e-01    8.7347217892e-01    9.1437031557e-01    9.5655547173e-01    
+1.0000000000e+00    -1.6787210857e-01   -1.6747190797e-01   -1.6627158044e-01   -1.6427194862e-01   
+-1.6196541700e-01   -1.5910458775e-01   -1.5544430513e-01   -1.5110744364e-01   -1.4621490707e-01   
+-1.4052471970e-01   -1.3403929624e-01   -1.2747171546e-01   -1.2010389093e-01   -1.1193844866e-01   
+-1.0320905599e-01   -9.3798248481e-02   -8.3593291886e-02   -7.2821204600e-02   -6.1698144993e-02   
+-4.9777038506e-02   -3.7062461972e-02   -2.3875325242e-02   -9.8953085104e-03   4.8718701483e-03    
+1.9620998928e-02    3.4783265736e-02    5.0760470333e-02    6.7359121866e-02    8.4402111335e-02    
+1.0226719207e-01    1.2094771065e-01    1.3967161036e-01    1.5923826683e-01    1.7964047134e-01    
+2.0009346157e-01    2.2104037349e-01    2.4287490190e-01    2.6530941022e-01    2.8809840100e-01    
+3.1181429378e-01    3.3644814723e-01    3.6110660659e-01    3.8674813482e-01    4.1336272059e-01    
+4.4023642732e-01    4.6781251026e-01    4.9645186567e-01    5.2585377537e-01    5.5580199557e-01    
+5.8690279965e-01    6.1914179590e-01    6.5172521007e-01    6.8558413624e-01    7.2070152983e-01    
+7.5667257957e-01    7.9383008926e-01    8.3237826899e-01    8.7229457728e-01    9.1355467612e-01    
+9.5613244553e-01    1.0000000000e+00    -1.7188634641e-01   -1.7148477023e-01   -1.7028031690e-01   
+-1.6827381190e-01   -1.6596940627e-01   -1.6311374701e-01   -1.5945576568e-01   -1.5512121345e-01   
+-1.5023381257e-01   -1.4454571738e-01   -1.3805930563e-01   -1.3150460197e-01   -1.2414623229e-01   
+-1.1598675816e-01   -1.0726529659e-01   -9.7861425771e-02   -8.7659556714e-02   -7.6891967030e-02   
+-6.5779804352e-02   -5.3865113703e-02   -4.1152381594e-02   -2.7969981990e-02   -1.3989716083e-02   
+7.8279025965e-04    1.5523308982e-02    3.0673586379e-02    4.6645286940e-02    6.3240558581e-02    
+8.0278331526e-02    9.8145675007e-02    1.1683606773e-01    1.3555929058e-01    1.5513414156e-01    
+1.7555355459e-01    1.9601432434e-01    2.1697051310e-01    2.3882556683e-01    2.6128531460e-01    
+2.8409873888e-01    3.0785230392e-01    3.3253721741e-01    3.5723913099e-01    3.8293980117e-01    
+4.0962935693e-01    4.3657717447e-01    4.6423749801e-01    4.9298024793e-01    5.2249791360e-01    
+5.5256948286e-01    5.8381613282e-01    6.1622353739e-01    6.4897935413e-01    6.8303735771e-01    
+7.1838051445e-01    7.5459475383e-01    7.9202126063e-01    8.3086955271e-01    8.7111697565e-01    
+9.1273903667e-01    9.5570941933e-01    1.0000000000e+00    -1.7590058425e-01   -1.7549763249e-01   
+-1.7428905337e-01   -1.7227567519e-01   -1.6997339553e-01   -1.6712290626e-01   -1.6346722623e-01   
+-1.5913498326e-01   -1.5425271807e-01   -1.4856671505e-01   -1.4207931502e-01   -1.3553748848e-01   
+-1.2818857365e-01   -1.2003506767e-01   -1.1132153719e-01   -1.0192460306e-01   -9.1725821541e-02   
+-8.0962729461e-02   -6.9861463710e-02   -5.7953188899e-02   -4.5242301216e-02   -3.2064638738e-02   
+-1.8084123655e-02   -3.3062896290e-03   1.1425619037e-02    2.6563907022e-02    4.2530103547e-02    
+5.9121995295e-02    7.6154551718e-02    9.4024157947e-02    1.1272442482e-01    1.3144697081e-01    
+1.5103001628e-01    1.7146663785e-01    1.9193518711e-01    2.1290065272e-01    2.3477623176e-01    
+2.5726121898e-01    2.8009907676e-01    3.0389031405e-01    3.2862628759e-01    3.5337165539e-01    
+3.7913146752e-01    4.0589599327e-01    4.3291792163e-01    4.6066248576e-01    4.8950863018e-01    
+5.1914205183e-01    5.4933697014e-01    5.8072946599e-01    6.1330527887e-01    6.4623349818e-01    
+6.8049057919e-01    7.1605949907e-01    7.5251692808e-01    7.9021243199e-01    8.2936083643e-01    
+8.6993937402e-01    9.1192339723e-01    9.5528639313e-01    1.0000000000e+00    -1.7991482209e-01   
+-1.7951049475e-01   -1.7829778983e-01   -1.7627753847e-01   -1.7397738479e-01   -1.7113206552e-01   
+-1.6747868677e-01   -1.6314875307e-01   -1.5827162357e-01   -1.5258771272e-01   -1.4609932440e-01   
+-1.3957037499e-01   -1.3223091501e-01   -1.2408337718e-01   -1.1537777780e-01   -1.0598778035e-01   
+-9.5792086369e-02   -8.5033491891e-02   -7.3943123069e-02   -6.2041264096e-02   -4.9332220838e-02   
+-3.6159295487e-02   -2.2178531228e-02   -7.3953695176e-03   7.3279290909e-03    2.2454227665e-02    
+3.8414920154e-02    5.5003432009e-02    7.2030771910e-02    8.9902640887e-02    1.0861278191e-01    
+1.2733465104e-01    1.4692589101e-01    1.6737972110e-01    1.8785604989e-01    2.0883079233e-01    
+2.3072689669e-01    2.5323712336e-01    2.7609941464e-01    2.9992832418e-01    3.2471535776e-01    
+3.4950417978e-01    3.7532313388e-01    4.0216262960e-01    4.2925866878e-01    4.5708747352e-01    
+4.8603701243e-01    5.1578619007e-01    5.4610445742e-01    5.7764279916e-01    6.1038702036e-01    
+6.4348764224e-01    6.7794380066e-01    7.1373848370e-01    7.5043910233e-01    7.8840360336e-01    
+8.2785212016e-01    8.6876177238e-01    9.1110775778e-01    9.5486336692e-01    1.0000000000e+00    
+-1.8392905993e-01   -1.8352335701e-01   -1.8230652630e-01   -1.8027940175e-01   -1.7798137406e-01   
+-1.7514122477e-01   -1.7149014732e-01   -1.6716252288e-01   -1.6229052907e-01   -1.5660871040e-01   
+-1.5011933379e-01   -1.4360326150e-01   -1.3627325637e-01   -1.2813168668e-01   -1.1943401840e-01   
+-1.1005095764e-01   -9.9858351197e-02   -8.9104254321e-02   -7.8024782428e-02   -6.6129339293e-02   
+-5.3422140460e-02   -4.0253952235e-02   -2.6272938800e-02   -1.1484449406e-02   3.2302391452e-03    
+1.8344548308e-02    3.4299736761e-02    5.0884868723e-02    6.7906992102e-02    8.5781123827e-02    
+1.0450113900e-01    1.2322233127e-01    1.4282176573e-01    1.6329280436e-01    1.8377691266e-01    
+2.0476093194e-01    2.2667756162e-01    2.4921302774e-01    2.7209975252e-01    2.9596633432e-01    
+3.2080442794e-01    3.4563670418e-01    3.7151480023e-01    3.9842926594e-01    4.2559941593e-01    
+4.5351246127e-01    4.8256539469e-01    5.1243032830e-01    5.4287194471e-01    5.7455613233e-01    
+6.0746876185e-01    6.4074178630e-01    6.7539702214e-01    7.1141746832e-01    7.4836127658e-01    
+7.8659477472e-01    8.2634340388e-01    8.6758417075e-01    9.1029211833e-01    9.5444034072e-01    
+1.0000000000e+00    -1.8794329777e-01   -1.8753621927e-01   -1.8631526276e-01   -1.8428126504e-01   
+-1.8198536332e-01   -1.7915038403e-01   -1.7550160787e-01   -1.7117629270e-01   -1.6630943457e-01   
+-1.6062970807e-01   -1.5413934318e-01   -1.4763614801e-01   -1.4031559773e-01   -1.3217999619e-01   
+-1.2349025901e-01   -1.1411413493e-01   -1.0392461602e-01   -9.3175016751e-02   -8.2106441787e-02   
+-7.0217414490e-02   -5.7512060082e-02   -4.4348608983e-02   -3.0367346373e-02   -1.5573529295e-02   
+-8.6745080039e-04   1.4234868951e-02    3.0184553368e-02    4.6766305437e-02    6.3783212293e-02    
+8.1659606767e-02    1.0038949609e-01    1.1911001149e-01    1.3871764046e-01    1.5920588761e-01    
+1.7969777543e-01    2.0069107156e-01    2.2262822655e-01    2.4518893212e-01    2.6810009041e-01    
+2.9200434445e-01    3.1689349811e-01    3.4176922858e-01    3.6770646658e-01    3.9469590228e-01    
+4.2194016309e-01    4.4993744902e-01    4.7909377694e-01    5.0907446653e-01    5.3963943199e-01    
+5.7146946550e-01    6.0455050334e-01    6.3799593035e-01    6.7285024361e-01    7.0909645294e-01    
+7.4628345084e-01    7.8478594608e-01    8.2483468760e-01    8.6640656912e-01    9.0947647888e-01    
+9.5401731452e-01    1.0000000000e+00    -1.9195753561e-01   -1.9154908153e-01   -1.9032399923e-01   
+-1.8828312832e-01   -1.8598935259e-01   -1.8315954328e-01   -1.7951306842e-01   -1.7519006251e-01   
+-1.7032834007e-01   -1.6465070575e-01   -1.5815935257e-01   -1.5166903452e-01   -1.4435793909e-01   
+-1.3622830570e-01   -1.2754649961e-01   -1.1817731222e-01   -1.0799088085e-01   -9.7245779181e-02   
+-8.6188101145e-02   -7.4305489686e-02   -6.1601979704e-02   -4.8443265731e-02   -3.4461753945e-02   
+-1.9662609184e-02   -4.9651407460e-03   1.0125189594e-02    2.6069369974e-02    4.2647742151e-02    
+5.9659432485e-02    7.7538089707e-02    9.6277853181e-02    1.1499769172e-01    1.3461351519e-01    
+1.5511897087e-01    1.7561863820e-01    1.9662121117e-01    2.1857889148e-01    2.4116483650e-01    
+2.6410042829e-01    2.8804235459e-01    3.1298256829e-01    3.3790175298e-01    3.6389813293e-01    
+3.9096253862e-01    4.1828091024e-01    4.4636243677e-01    4.7562215919e-01    5.0571860477e-01    
+5.3640691928e-01    5.6838279867e-01    6.0163224482e-01    6.3525007441e-01    6.7030346509e-01    
+7.0677543757e-01    7.4420562509e-01    7.8297711745e-01    8.2332597132e-01    8.6522896749e-01    
+9.0866083943e-01    9.5359428831e-01    1.0000000000e+00    -1.9597177344e-01   -1.9556194379e-01   
+-1.9433273569e-01   -1.9228499160e-01   -1.8999334185e-01   -1.8716870254e-01   -1.8352452896e-01   
+-1.7920383232e-01   -1.7434724557e-01   -1.6867170342e-01   -1.6217936195e-01   -1.5570192103e-01   
+-1.4840028046e-01   -1.4027661521e-01   -1.3160274021e-01   -1.2224048951e-01   -1.1205714568e-01   
+-1.0131654161e-01   -9.0269760504e-02   -7.8393564883e-02   -6.5691899326e-02   -5.2537922479e-02   
+-3.8556161518e-02   -2.3751689072e-02   -9.0628306917e-03   6.0155102367e-03    2.1954186581e-02    
+3.8529178865e-02    5.5535652677e-02    7.3416572647e-02    9.2166210270e-02    1.1088537195e-01    
+1.3050938991e-01    1.5103205412e-01    1.7153950097e-01    1.9255135079e-01    2.1452955641e-01    
+2.3714074088e-01    2.6010076617e-01    2.8408036472e-01    3.0907163847e-01    3.3403427737e-01    
+3.6008979929e-01    3.8722917496e-01    4.1462165739e-01    4.4278742452e-01    4.7215054145e-01    
+5.0236274300e-01    5.3317440656e-01    5.6529613184e-01    5.9871398631e-01    6.3250421846e-01    
+6.6775668656e-01    7.0445442219e-01    7.4212779934e-01    7.8116828881e-01    8.2181725505e-01    
+8.6405136585e-01    9.0784519998e-01    9.5317126211e-01    1.0000000000e+00    -1.9998601128e-01   
+-1.9957480605e-01   -1.9834147216e-01   -1.9628685489e-01   -1.9399733111e-01   -1.9117786179e-01   
+-1.8753598951e-01   -1.8321760213e-01   -1.7836615107e-01   -1.7269270110e-01   -1.6619937134e-01   
+-1.5973480754e-01   -1.5244262182e-01   -1.4432492471e-01   -1.3565898082e-01   -1.2630366680e-01   
+-1.1612341051e-01   -1.0538730404e-01   -9.4351419863e-02   -8.2481640080e-02   -6.9781818948e-02   
+-5.6632579228e-02   -4.2650569090e-02   -2.7840768961e-02   -1.3160520637e-02   1.9058308797e-03    
+1.7839003188e-02    3.4410615580e-02    5.1411872869e-02    6.9295055588e-02    8.8054567359e-02    
+1.0677305218e-01    1.2640526464e-01    1.4694513738e-01    1.6746036375e-01    1.8848149040e-01    
+2.1048022134e-01    2.3311664526e-01    2.5610110405e-01    2.8011837486e-01    3.0516070864e-01    
+3.3016680177e-01    3.5628146564e-01    3.8349581130e-01    4.1096240455e-01    4.3921241228e-01    
+4.6867892370e-01    4.9900688123e-01    5.2994189384e-01    5.6220946501e-01    5.9579572780e-01    
+6.2975836252e-01    6.6520990804e-01    7.0213340681e-01    7.4004997359e-01    7.7935946018e-01    
+8.2030853877e-01    8.6287376422e-01    9.0702956053e-01    9.5274823591e-01    1.0000000000e+00    
+-2.0400024912e-01   -2.0358766831e-01   -2.0235020863e-01   -2.0028871817e-01   -1.9800132038e-01   
+-1.9518702105e-01   -1.9154745006e-01   -1.8723137194e-01   -1.8238505658e-01   -1.7671369877e-01   
+-1.7021938073e-01   -1.6376769405e-01   -1.5648496318e-01   -1.4837323422e-01   -1.3971522142e-01   
+-1.3036684409e-01   -1.2018967534e-01   -1.0945806647e-01   -9.8433079222e-02   -8.6569715276e-02   
+-7.3871738570e-02   -6.0727235976e-02   -4.6744976663e-02   -3.1929848849e-02   -1.7258210583e-02   
+-2.2038484774e-03   1.3723819795e-02    3.0292052294e-02    4.7288093060e-02    6.5173538528e-02    
+8.3942924449e-02    1.0266073241e-01    1.2230113936e-01    1.4285822063e-01    1.6338122652e-01    
+1.8441163002e-01    2.0643088626e-01    2.2909254964e-01    2.5210144193e-01    2.7615638499e-01    
+3.0124977882e-01    3.2629932617e-01    3.5247313199e-01    3.7976244764e-01    4.0730315170e-01    
+4.3563740003e-01    4.6520730596e-01    4.9565101947e-01    5.2670938113e-01    5.5912279818e-01    
+5.9287746928e-01    6.2701250657e-01    6.6266312951e-01    6.9981239144e-01    7.3797214785e-01    
+7.7755063154e-01    8.1879982249e-01    8.6169616259e-01    9.0621392108e-01    9.5232520971e-01    
+1.0000000000e+00    
+0.0000000000e+00    2.6176948308e-02    5.2335956243e-02    7.8459095728e-02    1.0452846327e-01    
+1.3052619222e-01    1.5643446504e-01    1.8223552549e-01    2.0791169082e-01    2.3344536386e-01    
+2.5881904510e-01    2.8401534470e-01    3.0901699437e-01    3.3380685923e-01    3.5836794955e-01    
+3.8268343237e-01    4.0673664308e-01    4.3051109681e-01    4.5399049974e-01    4.7715876026e-01    
+5.0000000000e-01    5.2249856472e-01    5.4463903502e-01    5.6640623692e-01    5.8778525229e-01    
+6.0876142901e-01    6.2932039105e-01    6.4944804833e-01    6.6913060636e-01    6.8835457569e-01    
+7.0710678119e-01    7.2537437101e-01    7.4314482548e-01    7.6040596560e-01    7.7714596146e-01    
+7.9335334029e-01    8.0901699437e-01    8.2412618862e-01    8.3867056795e-01    8.5264016435e-01    
+8.6602540378e-01    8.7881711266e-01    8.9100652419e-01    9.0258528435e-01    9.1354545764e-01    
+9.2387953251e-01    9.3358042650e-01    9.4264149109e-01    9.5105651630e-01    9.5881973487e-01    
+9.6592582629e-01    9.7236992040e-01    9.7814760073e-01    9.8325490756e-01    9.8768834060e-01    
+9.9144486137e-01    9.9452189537e-01    9.9691733373e-01    9.9862953475e-01    9.9965732498e-01    
+1.0000000000e+00    0.0000000000e+00    2.6179566003e-02    5.2341189839e-02    7.8466941637e-02    
+1.0453894686e-01    1.3053934081e-01    1.5645029253e-01    1.8225405724e-01    2.0793297119e-01    
+2.3346941216e-01    2.5884587855e-01    2.8404510366e-01    3.0904971382e-01    3.3384257166e-01    
+3.5840673760e-01    3.8272535871e-01    4.0678174299e-01    4.3055946599e-01    4.5404230806e-01    
+4.7721405454e-01    5.0005882352e-01    5.2256107244e-01    5.4470527273e-01    5.6647624640e-01    
+5.8785941696e-01    6.0883998609e-01    6.2940340581e-01    6.4953567606e-01    6.6922310382e-01    
+6.8845200823e-01    7.0720920768e-01    7.2548232378e-01    7.4325837363e-01    7.6052517041e-01    
+7.7727144767e-01    7.9348546862e-01    8.0915583596e-01    8.2427204683e-01    8.3882399532e-01    
+8.5280122556e-01    8.6619415136e-01    8.7899455616e-01    8.9119271833e-01    9.0278026930e-01    
+9.1375019928e-01    9.2409453828e-01    9.3380572140e-01    9.4287756732e-01    9.5130435042e-01    
+9.5907932120e-01    9.6619713779e-01    9.7265483907e-01    9.7844607958e-01    9.8356687409e-01    
+9.8801514922e-01    9.9178712853e-01    9.9487948446e-01    9.9729007815e-01    9.9901723794e-01    
+1.0000597605e+00    1.0004169117e+00    0.0000000000e+00    2.6182443647e-02    5.2346943154e-02    
+7.8475566682e-02    1.0455047152e-01    1.3055379512e-01    1.5646769175e-01    1.8227442927e-01    
+2.0795636480e-01    2.3349584857e-01    2.5887537667e-01    2.8407781782e-01    3.0908568245e-01    
+3.3388183049e-01    3.5844937749e-01    3.8277144853e-01    4.0683132153e-01    4.3061263846e-01    
+4.5409926119e-01    4.7727483978e-01    5.0012348849e-01    5.2262978747e-01    5.4477808815e-01    
+5.6655320813e-01    5.8794094651e-01    6.0892634424e-01    6.2949466431e-01    6.4963200562e-01    
+6.6932478670e-01    6.8855911626e-01    7.0732180558e-01    7.2560099675e-01    7.4338319763e-01    
+7.6065621281e-01    7.7740939523e-01    7.9363071789e-01    8.0930846515e-01    8.2443238943e-01    
+8.3899265872e-01    8.5297828088e-01    8.6637965635e-01    8.7918962060e-01    8.9139740240e-01    
+9.0299461715e-01    9.1397527270e-01    9.2433089511e-01    9.3405338912e-01    9.4313708699e-01    
+9.5157679560e-01    9.5936468563e-01    9.6649539176e-01    9.7296805146e-01    9.7877419874e-01    
+9.8390982031e-01    9.8837441143e-01    9.9216338437e-01    9.9527258377e-01    9.9769983779e-01    
+9.9944344181e-01    1.0005021597e+00    1.0008752246e+00    0.0000000000e+00    2.6185607054e-02    
+5.2353267800e-02    7.8485048232e-02    1.0456314062e-01    1.3056968481e-01    1.5648681880e-01    
+1.8229682433e-01    2.0798208150e-01    2.3352491024e-01    2.5890780410e-01    2.8411378065e-01    
+3.0912522294e-01    3.3392498789e-01    3.5849625172e-01    3.8282211528e-01    4.0688582344e-01    
+4.3067109119e-01    4.5416187002e-01    4.7734166129e-01    5.0019457499e-01    5.2270532622e-01    
+5.4485813447e-01    5.6663781251e-01    5.8803057232e-01    6.0902127815e-01    6.2959498519e-01    
+6.4973790114e-01    6.6943656715e-01    6.8867686060e-01    7.0744558498e-01    7.2573145449e-01    
+7.4352041722e-01    7.6080026831e-01    7.7756104162e-01    7.9379039108e-01    8.0947625112e-01    
+8.2460865477e-01    8.3917807118e-01    8.5317291859e-01    8.6658358282e-01    8.7940405583e-01    
+8.9162241252e-01    9.0323025071e-01    9.1422269694e-01    9.2459072324e-01    9.3432565137e-01    
+9.4342237815e-01    9.5187629583e-01    9.5967838805e-01    9.6682326372e-01    9.7331236728e-01    
+9.7913490163e-01    9.8428682266e-01    9.8876935001e-01    9.9257700413e-01    9.9570471964e-01    
+9.9815028842e-01    9.9991196967e-01    1.0009884912e+00    1.0013790501e+00    0.0000000000e+00    
+2.6189084601e-02    5.2360220512e-02    7.8495471343e-02    1.0457706783e-01    1.3058715242e-01    
+1.5650784526e-01    1.8232144333e-01    2.0801035199e-01    2.3355685786e-01    2.5894345172e-01    
+2.8415331474e-01    3.0916868997e-01    3.3397243103e-01    3.5854778076e-01    3.8287781347e-01    
+4.0694573764e-01    4.3073534854e-01    4.5423069619e-01    4.7741511847e-01    5.0027272070e-01    
+5.2278836631e-01    5.4494612976e-01    5.6673081850e-01    5.8812909838e-01    6.0912563943e-01    
+6.2970526840e-01    6.4985431257e-01    6.6955944791e-01    6.8880629749e-01    7.0758165623e-01    
+7.2587486727e-01    7.4367126335e-01    7.6095862918e-01    7.7772774718e-01    7.9396592054e-01    
+8.0966069900e-01    8.2480242407e-01    8.3938189593e-01    8.5338688472e-01    8.6680776012e-01    
+8.7963978546e-01    8.9186976718e-01    9.0348928376e-01    9.1449469153e-01    9.2487635350e-01    
+9.3462495051e-01    9.4373600003e-01    9.5220553780e-01    9.6002324255e-01    9.6718369485e-01    
+9.7369087522e-01    9.7953142396e-01    9.8470126306e-01    9.8920350780e-01    9.9303169821e-01    
+9.9617976857e-01    9.9864547086e-01    1.0004270245e+00    1.0015231175e+00    1.0019329078e+00    
+0.0000000000e+00    2.6192907485e-02    5.2367863660e-02    7.8506929517e-02    1.0459237808e-01    
+1.3060635464e-01    1.5653095973e-01    1.8234850711e-01    2.0804142986e-01    2.3359197803e-01    
+2.5898263930e-01    2.8419677476e-01    3.0921647348e-01    3.3402458549e-01    3.5860442688e-01    
+3.8293904274e-01    4.0701160160e-01    4.3080598695e-01    4.5430635712e-01    4.7749587028e-01    
+5.0035862663e-01    5.2287965266e-01    5.4504286338e-01    5.6683306040e-01    5.8823740853e-01    
+6.0924036426e-01    6.2982650323e-01    6.4998228419e-01    6.6969453129e-01    6.8894858806e-01    
+7.0773123997e-01    7.2603252160e-01    7.4383708918e-01    7.6113271600e-01    7.7791100736e-01    
+7.9415888088e-01    8.0986346339e-01    8.2501543554e-01    8.3960596141e-01    8.5362209866e-01    
+8.6705419925e-01    8.7989892412e-01    8.9214168528e-01    9.0377403997e-01    9.1479369642e-01    
+9.2519034813e-01    9.3495397141e-01    9.4408076598e-01    9.5256747499e-01    9.6040234268e-01    
+9.6757991843e-01    9.7410697072e-01    9.7996732276e-01    9.8515685927e-01    9.8968077943e-01    
+9.9353154550e-01    9.9670199202e-01    9.9918982717e-01    1.0009932266e+00    1.0021108348e+00    
+1.0025417660e+00    0.0000000000e+00    2.6197109999e-02    5.2376265808e-02    7.8519525540e-02    
+1.0460920870e-01    1.3062746372e-01    1.5655636958e-01    1.8237825844e-01    2.0807559391e-01    
+2.3363058579e-01    2.5902571840e-01    2.8424455055e-01    3.0926900211e-01    3.3408191912e-01    
+3.5866669821e-01    3.8300635236e-01    4.0708400615e-01    4.3088364006e-01    4.5438953152e-01    
+4.7758464112e-01    5.0045306341e-01    5.2298000415e-01    5.4514920309e-01    5.6694545539e-01    
+5.8835647437e-01    6.0936648179e-01    6.2995977724e-01    6.5012296397e-01    6.6984302906e-01    
+6.8910500873e-01    7.0789567806e-01    7.2620583171e-01    7.4401938227e-01    7.6132409044e-01    
+7.7811246612e-01    7.9437100306e-01    8.1008636320e-01    8.2524960002e-01    8.3985227761e-01    
+8.5388067042e-01    8.6732511090e-01    8.8018379642e-01    8.9244060609e-01    9.0408707377e-01    
+9.1512239386e-01    9.2553552387e-01    9.3531566559e-01    9.4445976876e-01    9.5296535420e-01    
+9.6081908917e-01    9.6801548882e-01    9.7456438641e-01    9.8044650830e-01    9.8565769827e-01    
+9.9020544631e-01    9.9408102989e-01    9.9727607464e-01    9.9978824054e-01    1.0016156551e+00    
+1.0027569150e+00    1.0032110867e+00    0.0000000000e+00    2.6201729842e-02    5.2385502327e-02    
+7.8533372405e-02    1.0462771068e-01    1.3065066904e-01    1.5658430274e-01    1.8241096421e-01    
+2.0811315061e-01    2.3367302747e-01    2.5907307544e-01    2.8429707069e-01    3.0932674707e-01    
+3.3414494624e-01    3.5873515338e-01    3.8308034613e-01    4.0716360079e-01    4.3096900449e-01    
+4.5448096552e-01    4.7768222730e-01    5.0055687820e-01    5.2309032101e-01    5.4526610282e-01    
+5.6706901171e-01    5.8848736399e-01    6.0950512336e-01    6.3010628596e-01    6.5027761389e-01    
+6.7000627334e-01    6.8927696269e-01    7.0807644561e-01    7.2639635232e-01    7.4421977790e-01    
+7.6153446923e-01    7.7833393065e-01    7.9460418993e-01    8.1033139799e-01    8.2550701810e-01    
+8.4012305414e-01    8.5416491953e-01    8.6762292532e-01    8.8049695784e-01    8.9276921110e-01    
+9.0443119326e-01    9.1548373246e-01    9.2591497713e-01    9.3571327764e-01    9.4487640825e-01    
+9.5340274462e-01    9.6127722049e-01    9.6849431333e-01    9.7506722555e-01    9.8097327915e-01    
+9.8620827286e-01    9.9078221500e-01    9.9468508059e-01    9.9790716629e-01    1.0004460791e+00    
+1.0022998937e+00    1.0034671539e+00    1.0039468739e+00    0.0000000000e+00    2.6206808456e-02    
+5.2395656075e-02    7.8548594328e-02    1.0464804999e-01    1.3067617875e-01    1.5661500980e-01    
+1.8244691782e-01    2.0815443686e-01    2.3371968381e-01    2.5912513526e-01    2.8435480633e-01    
+3.0939022637e-01    3.3421423225e-01    3.5881040645e-01    3.8316168782e-01    4.0725109955e-01    
+4.3106284599e-01    4.5458147933e-01    4.7778950424e-01    5.0067100227e-01    5.2321159284e-01    
+5.4539461123e-01    5.6720483774e-01    5.8863125154e-01    6.0965753267e-01    6.3026734366e-01    
+6.5044762126e-01    6.7018572852e-01    6.8946599245e-01    7.0827516419e-01    7.2660579249e-01    
+7.4444007373e-01    7.6176573960e-01    7.7857738761e-01    7.9486053333e-01    8.1060076585e-01    
+8.2578999897e-01    8.4042072001e-01    8.5447739587e-01    8.6795031407e-01    8.8084121762e-01    
+8.9313044808e-01    9.0480948537e-01    9.1588095362e-01    9.2633211183e-01    9.3615037439e-01    
+9.4533442193e-01    9.5388356991e-01    9.6178084634e-01    9.6902068731e-01    9.7561999892e-01    
+9.8155236074e-01    9.8681352202e-01    9.9141625946e-01    9.9534911628e-01    9.9860092820e-01    
+1.0011692440e+00    1.0030520802e+00    1.0042479228e+00    1.0047557282e+00    0.0000000000e+00    
+2.6212391400e-02    5.2406818135e-02    7.8565327856e-02    1.0467040909e-01    1.3070422169e-01    
+1.5664876620e-01    1.8248644179e-01    2.0819982302e-01    2.3377097334e-01    2.5918236485e-01    
+2.8441827537e-01    3.0946000945e-01    3.3429039867e-01    3.5889313249e-01    3.8325110711e-01    
+4.0734728734e-01    4.3116600639e-01    4.5469197462e-01    4.7790743427e-01    5.0079645937e-01    
+5.2334490751e-01    5.4553588110e-01    5.6735415191e-01    5.8878942778e-01    6.0982507693e-01    
+6.3044439513e-01    6.5063451113e-01    6.7038300442e-01    6.8967379373e-01    7.0849361644e-01    
+7.2683603102e-01    7.4468224593e-01    7.6201997616e-01    7.7884502096e-01    7.9514233280e-01    
+8.1089688316e-01    8.2610108113e-01    8.4074794545e-01    8.5482090254e-01    8.6831021401e-01    
+8.8121966396e-01    8.9352755754e-01    9.0522534362e-01    9.1631762066e-01    9.2679066990e-01    
+9.3663087683e-01    9.4583791847e-01    9.5441214334e-01    9.6233448453e-01    9.6959933261e-01    
+9.7622766520e-01    9.8218894777e-01    9.8747887518e-01    9.9211326741e-01    9.9607909373e-01    
+9.9936358384e-01    1.0019642225e+00    1.0038789623e+00    1.0051062256e+00    1.0056449054e+00    
+0.0000000000e+00    2.6218528755e-02    5.2419088640e-02    7.8583723100e-02    1.0469498854e-01    
+1.3073504942e-01    1.5668587477e-01    1.8252989066e-01    2.0824971623e-01    2.3382735615e-01    
+2.5924527760e-01    2.8448804718e-01    3.0953672231e-01    3.3437412876e-01    3.5898407361e-01    
+3.8334940614e-01    4.0745302701e-01    4.3127941108e-01    4.5481344259e-01    4.7803707528e-01    
+5.0093437495e-01    5.2349146093e-01    5.4569117972e-01    5.6751829366e-01    5.8896331165e-01    
+6.1000925909e-01    6.3063902861e-01    6.5083996002e-01    6.7059987072e-01    6.8990223063e-01    
+7.0873376199e-01    7.2708913329e-01    7.4494846694e-01    7.6229945958e-01    7.7913923153e-01    
+7.9545211623e-01    8.1122240627e-01    8.2644305517e-01    8.4110766588e-01    8.5519852098e-01    
+8.6870585365e-01    8.8163569175e-01    8.9396410178e-01    9.0568249849e-01    9.1679765072e-01    
+9.2729476488e-01    9.3715909536e-01    9.4639141450e-01    9.5499320652e-01    9.6294310151e-01    
+9.7023544003e-01    9.7689567551e-01    9.8288875080e-01    9.8821030094e-01    9.9287949143e-01    
+9.9688156127e-01    1.0002019747e+00    1.0028381459e+00    1.0047879576e+00    1.0060497618e+00    
+1.0066223819e+00    0.0000000000e+00    2.6225275578e-02    5.2432577661e-02    7.8603945075e-02    
+1.0472200885e-01    1.3076893848e-01    1.5672666839e-01    1.8257765421e-01    2.0830456406e-01    
+2.3388933803e-01    2.5931443787e-01    2.8456474765e-01    3.0962105311e-01    3.3446617363e-01    
+3.5908404559e-01    3.8345746671e-01    4.0756926711e-01    4.3140407737e-01    4.5494697289e-01    
+4.7817959024e-01    5.0108598616e-01    5.2365256778e-01    5.4586190019e-01    5.6769873544e-01    
+5.8915446298e-01    6.1021173138e-01    6.3085299009e-01    6.5106581092e-01    6.7083827282e-01    
+6.9015335235e-01    7.0899775509e-01    7.2736736976e-01    7.4524112491e-01    7.6260669697e-01    
+7.7946265854e-01    7.9579266257e-01    8.1158025531e-01    8.2681898879e-01    8.4150310818e-01    
+8.5561363866e-01    8.6914078212e-01    8.8209303299e-01    8.9444399686e-01    9.0618505092e-01    
+9.1732534995e-01    9.2784891879e-01    9.3773976839e-01    9.4699987521e-01    9.5563197193e-01    
+9.6361215694e-01    9.7093471582e-01    9.7763002228e-01    9.8365804745e-01    9.8901436061e-01    
+9.9372180499e-01    9.9776371750e-01    1.0011236215e+00    1.0037988540e+00    1.0057872202e+00    
+1.0070869954e+00    1.0076969263e+00    0.0000000000e+00    2.6232692391e-02    5.2447406204e-02    
+7.8626175185e-02    1.0475171240e-01    1.3080619289e-01    1.5677151300e-01    1.8263016089e-01    
+2.0836485854e-01    2.3395747499e-01    2.5939046608e-01    2.8464906483e-01    3.0971375834e-01    
+3.3456735898e-01    3.5919394525e-01    3.8357625819e-01    4.0769705038e-01    4.3154112359e-01    
+4.5509376335e-01    4.7833625759e-01    5.0125265306e-01    5.2382967327e-01    5.4604957399e-01    
+5.6789709590e-01    5.8936459650e-01    6.1043431009e-01    6.3108819891e-01    6.5131408985e-01    
+6.7110034934e-01    6.9042941160e-01    7.0928796390e-01    7.2767323639e-01    7.4556284515e-01    
+7.6294444444e-01    7.7981820333e-01    7.9616702672e-01    8.1197364039e-01    8.2723225432e-01    
+8.4193781970e-01    8.5606997941e-01    8.6961890096e-01    8.8259579030e-01    8.9497154770e-01    
+9.0673750909e-01    9.1790545212e-01    9.2845810271e-01    9.3837810490e-01    9.4766875884e-01    
+9.5633416964e-01    9.6434765262e-01    9.7170343288e-01    9.7843729304e-01    9.8450373877e-01    
+9.8989826706e-01    9.9464776412e-01    9.9873347586e-01    1.0021367921e+00    1.0048549647e+00    
+1.0068857142e+00    1.0082272311e+00    1.0088781778e+00    0.0000000000e+00    2.6240845727e-02    
+5.2463707289e-02    7.8650612846e-02    1.0478436565e-01    1.3084714682e-01    1.5682081088e-01    
+1.8268788173e-01    2.0843114053e-01    2.3403237826e-01    2.5947404423e-01    2.8474175508e-01    
+3.0981566962e-01    3.3467859249e-01    3.5931475845e-01    3.8370684621e-01    4.0783752312e-01    
+4.3169177913e-01    4.5525513078e-01    4.7850848271e-01    5.0143587074e-01    5.2402436614e-01    
+5.4625588465e-01    5.6811515447e-01    5.8959559724e-01    6.1067899188e-01    6.3134676505e-01    
+6.5158702400e-01    6.7138845126e-01    6.9073288480e-01    7.0960699178e-01    7.2800947696e-01    
+7.4591651367e-01    7.6331573177e-01    7.8020905533e-01    7.9657856693e-01    8.1240609040e-01    
+8.2768655901e-01    8.4241570006e-01    8.5657163688e-01    8.7014449919e-01    8.8314847371e-01    
+8.9555148674e-01    9.0734482888e-01    9.1854316109e-01    9.2912778136e-01    9.3907983114e-01    
+9.4840406566e-01    9.5710609879e-01    9.6515618637e-01    9.7254848704e-01    9.7932472947e-01    
+9.8543341110e-01    9.9086994946e-01    9.9566567521e-01    9.9979953564e-01    1.0032505751e+00    
+1.0060159521e+00    1.0080932936e+00    1.0094806973e+00    1.0101767331e+00    0.0000000000e+00    
+2.6249808727e-02    5.2481627145e-02    7.8677477279e-02    1.0482026151e-01    1.3089216767e-01    
+1.5687500427e-01    1.8275133451e-01    2.0850400463e-01    2.3411471977e-01    2.5956592207e-01    
+2.8484364990e-01    3.0992770116e-01    3.3480087200e-01    3.5944756894e-01    3.8385040221e-01    
+4.0799194543e-01    4.3185739545e-01    4.5543252273e-01    4.7869781058e-01    5.0163728277e-01    
+5.2423839290e-01    5.4648268291e-01    5.6835486724e-01    5.8984953741e-01    6.1094797169e-01    
+6.3163100798e-01    6.5188706176e-01    6.7170516300e-01    6.9106649427e-01    7.0995770057e-01    
+7.2837910776e-01    7.4630530309e-01    7.6372388962e-01    7.8063872072e-01    7.9703097496e-01    
+8.1288148467e-01    8.2818597822e-01    8.4294103612e-01    8.5712311122e-01    8.7072229171e-01    
+8.8375604109e-01    8.9618901637e-01    9.0801245829e-01    9.1924419745e-01    9.2986396216e-01    
+9.3985124199e-01    9.4921239181e-01    9.5795468403e-01    9.6604501120e-01    9.7347745894e-01    
+9.8030029237e-01    9.8645540411e-01    9.9193812435e-01    9.9678466952e-01    1.0009714600e+00    
+1.0044749619e+00    1.0072922308e+00    1.0094207912e+00    1.0108586385e+00    1.0116042407e+00    
+0.0000000000e+00    2.6259661793e-02    5.2501326525e-02    7.8707009471e-02    1.0485972199e-01    
+1.3094165930e-01    1.5693457931e-01    1.8282108844e-01    2.0858410446e-01    2.3420523817e-01    
+2.5966692380e-01    2.8495566334e-01    3.1005085793e-01    3.3493529441e-01    3.5959356813e-01    
+3.8400821398e-01    4.0816170259e-01    4.3203945822e-01    4.5562753051e-01    4.7890593956e-01    
+5.0185869594e-01    5.2447367350e-01    5.4673200326e-01    5.6861838458e-01    5.9012869499e-01    
+6.1124366242e-01    6.3194347752e-01    6.5221689463e-01    6.7205332567e-01    6.9143323267e-01    
+7.1034323635e-01    7.2878544458e-01    7.4673270107e-01    7.6417257941e-01    7.8111105384e-01    
+7.9752830917e-01    8.1340408775e-01    8.2873499204e-01    8.4351854044e-01    8.5772934948e-01    
+8.7135746166e-01    8.8442394269e-01    8.9688985560e-01    9.0874638635e-01    9.2001484993e-01    
+9.3067324907e-01    9.4069925745e-01    9.5010098842e-01    9.5888753764e-01    9.6702210039e-01    
+9.7449868197e-01    9.8137273312e-01    9.8757888570e-01    9.9311237387e-01    9.9801478505e-01    
+1.0022597618e+00    1.0058209358e+00    1.0086952497e+00    1.0108801153e+00    1.0123734155e+00    
+1.0131735064e+00    0.0000000000e+00    2.6270493314e-02    5.2522982144e-02    7.8739474345e-02    
+1.0490310108e-01    1.3099606567e-01    1.5700007042e-01    1.8289776925e-01    2.0867215857e-01    
+2.3430474546e-01    2.5977795546e-01    2.8507880023e-01    3.1018624474e-01    3.3508306559e-01    
+3.5975406569e-01    3.8418169717e-01    4.0834831740e-01    4.3223960066e-01    4.5584190345e-01    
+4.7913473670e-01    5.0210209644e-01    5.2473231853e-01    5.4700608225e-01    5.6890807039e-01    
+5.9043557420e-01    6.1156871658e-01    6.3228697672e-01    6.5257948141e-01    6.7243606248e-01    
+6.9183638987e-01    7.1076705758e-01    7.2923213249e-01    7.4720254162e-01    7.6466582614e-01    
+7.8163029180e-01    7.9807503093e-01    8.1397858771e-01    8.2933852543e-01    8.4415339357e-01    
+8.5839578996e-01    8.7205570689e-01    8.8515816996e-01    8.9766029136e-01    9.0955319680e-01    
+9.2086203170e-01    9.3156290185e-01    9.4163148471e-01    9.5107782672e-01    9.5991302787e-01    
+9.6809621899e-01    9.7562131711e-01    9.8255167211e-01    9.8881393412e-01    9.9440323172e-01    
+9.9936705667e-01    1.0036759979e+00    1.0073005711e+00    1.0102375949e+00    1.0124843569e+00    
+1.0140386167e+00    1.0148986073e+00    0.0000000000e+00    2.6282400454e-02    5.2546788264e-02    
+7.8775163129e-02    1.0495078791e-01    1.3105587483e-01    1.5707206510e-01    1.8298206482e-01    
+2.0876895685e-01    2.3441413427e-01    2.5990001308e-01    2.8521416517e-01    3.1033507608e-01    
+3.3524551112e-01    3.5993050140e-01    3.8437240804e-01    4.0855346392e-01    4.3245961815e-01    
+4.5607756459e-01    4.7938625445e-01    5.0236966772e-01    5.2501664819e-01    5.4730737854e-01    
+5.6922652333e-01    5.9077292790e-01    6.1192605011e-01    6.3266458695e-01    6.5297807471e-01    
+6.7285680679e-01    6.9227958242e-01    7.1123296620e-01    7.2972317855e-01    7.4771903948e-01    
+7.6520805451e-01    7.8220109244e-01    7.9867604465e-01    8.1461013812e-01    8.3000199244e-01    
+8.4485129050e-01    8.5912841102e-01    8.7282329104e-01    8.8596530934e-01    8.9850723490e-01    
+9.1044012721e-01    9.2179334249e-01    9.3254090121e-01    9.4265628638e-01    9.5215166952e-01    
+9.6104035395e-01    9.6927700247e-01    9.7685543504e-01    9.8384768513e-01    9.9017162848e-01    
+9.9582227763e-01    1.0008536150e+00    1.0052328726e+00    1.0089271409e+00    1.0119331019e+00    
+1.0142479071e+00    1.0158691801e+00    1.0167950186e+00    0.0000000000e+00    2.6295490027e-02    
+5.2572958440e-02    7.8814395972e-02    1.0500321027e-01    1.3112162332e-01    1.5715120917e-01    
+1.8307473132e-01    2.0887536765e-01    2.3453438589e-01    2.6003419156e-01    2.8536297246e-01    
+3.1049868704e-01    3.3542408823e-01    3.6012445798e-01    3.8458205736e-01    4.0877898242e-01    
+4.3270148438e-01    4.5633662797e-01    4.7966274904e-01    5.0266381005e-01    5.2532921308e-01    
+5.4763859493e-01    5.6957660010e-01    5.9114378237e-01    6.1231886848e-01    6.3307969560e-01    
+6.5341625015e-01    6.7331933293e-01    6.9276678601e-01    7.1174514166e-01    7.3026298773e-01    
+7.4828682792e-01    7.6580412864e-01    7.8282857620e-01    7.9933674178e-01    8.1530440437e-01    
+8.3073134474e-01    8.4561849179e-01    8.5993378468e-01    8.7366709980e-01    8.8685260134e-01    
+8.9943828379e-01    9.1141513385e-01    9.2281713668e-01    9.3361602037e-01    9.4378285553e-01    
+9.5333214981e-01    9.6227962865e-01    9.7057504312e-01    9.7821210649e-01    9.8527239814e-01    
+9.9166414808e-01    9.9738224127e-01    1.0024877954e+00    1.0069443521e+00    1.0107152366e+00    
+1.0137969805e+00    1.0161865858e+00    1.0178815267e+00    1.0188797522e+00    0.0000000000e+00    
+2.6309879455e-02    5.2601727433e-02    7.8857524815e-02    1.0506083840e-01    1.3119390094e-01    
+1.5723821262e-01    1.8317660002e-01    2.0899234552e-01    2.3466657904e-01    2.6018169459e-01    
+2.8552655700e-01    3.1067854532e-01    3.3562039887e-01    3.6033767533e-01    3.8481252582e-01    
+4.0902689594e-01    4.3296736903e-01    4.5662141752e-01    4.7996670082e-01    5.0298716205e-01    
+5.2567281709e-01    5.4800270261e-01    5.6996144108e-01    5.9155146437e-01    6.1275069550e-01    
+6.3353602643e-01    6.5389793840e-01    6.7382779003e-01    6.9330237113e-01    7.1230817848e-01    
+7.3085640241e-01    7.4891100035e-01    7.6645939564e-01    7.8351837195e-01    8.0006304914e-01    
+8.1606761442e-01    8.3153312506e-01    8.4646187966e-01    8.6081913562e-01    8.7459470262e-01    
+8.8782800547e-01    9.0046179009e-01    9.1248696309e-01    9.2394259830e-01    9.3479790375e-01    
+9.4502129814e-01    9.5462985716e-01    9.6364196897e-01    9.7200198512e-01    9.7970350161e-01    
+9.8683859165e-01    9.9330488167e-01    9.9909711641e-01    1.0042842573e+00    1.0088257893e+00    
+1.0126808982e+00    1.0158459508e+00    1.0183177842e+00    1.0200937085e+00    1.0211715093e+00    
+0.0000000000e+00    2.6325697819e-02    5.2633353319e-02    7.8904936548e-02    1.0512418926e-01    
+1.3127335605e-01    1.5733385590e-01    1.8328858476e-01    2.0912093983e-01    2.3481189958e-01    
+2.6034384534e-01    2.8570638623e-01    3.1087626434e-01    3.3583620404e-01    3.6057206613e-01    
+3.8506588084e-01    4.0929942840e-01    4.3325965724e-01    4.5693448796e-01    4.8030083638e-01    
+5.0334262438e-01    5.2605054255e-01    5.4840296785e-01    5.7038449852e-01    5.9199963106e-01    
+6.1322540492e-01    6.3403767299e-01    6.5442746048e-01    6.7438673923e-01    6.9389114230e-01    
+7.1292712742e-01    7.3150874588e-01    7.4959715594e-01    7.6717973364e-01    7.8427666756e-01    
+8.0086148213e-01    8.1690661471e-01    8.3241452581e-01    8.4738901979e-01    8.6179240594e-01    
+8.7561442062e-01    8.8890027169e-01    9.0158693522e-01    9.1366522986e-01    9.2517982339e-01    
+9.3609715354e-01    9.4638272373e-01    9.5605643277e-01    9.6513959589e-01    9.7357062897e-01    
+9.8134299905e-01    9.8856031530e-01    9.9510854759e-01    1.0009822865e+00    1.0062591161e+00    
+1.0108940618e+00    1.0148417590e+00    1.0180983932e+00    1.0206606203e+00    1.0225255700e+00    
+1.0236908484e+00    0.0000000000e+00    2.6343087018e-02    5.2668119800e-02    7.8957056483e-02    
+1.0519383116e-01    1.3136070142e-01    1.5743899700e-01    1.8341169008e-01    2.0926230414e-01    
+2.3497165111e-01    2.6052209839e-01    2.8590407331e-01    3.1109361777e-01    3.3607343965e-01    
+3.6082973301e-01    3.8534439518e-01    4.0959902457e-01    4.3358097100e-01    4.5727864773e-01    
+4.8066815314e-01    5.0373338574e-01    5.2646577786e-01    5.4884298124e-01    5.7084956750e-01    
+5.9249230274e-01    6.1374725515e-01    6.3458913535e-01    6.5500956653e-01    6.7500119463e-01    
+6.9453838113e-01    7.1360754082e-01    7.3222587002e-01    7.5035144991e-01    7.6797160448e-01    
+7.8511026538e-01    8.0173920316e-01    8.1782893155e-01    8.3338345367e-01    8.4840822915e-01    
+8.6286232645e-01    8.7673540126e-01    8.9007901882e-01    9.0282381238e-01    9.1496050389e-01    
+9.2653991057e-01    9.3752542475e-01    9.4787934509e-01    9.5762467384e-01    9.6678594400e-01    
+9.7529504630e-01    9.8314530606e-01    9.9045301397e-01    9.9709132575e-01    1.0030546625e+00    
+1.0084300873e+00    1.0131677232e+00    1.0172172032e+00    1.0205745133e+00    1.0232361106e+00    
+1.0251989264e+00    1.0264603693e+00    0.0000000000e+00    2.6362203044e-02    5.2706338750e-02    
+7.9014352165e-02    1.0527038881e-01    1.3145672058e-01    1.5755457908e-01    1.8354702033e-01    
+2.0941770657e-01    2.3514726669e-01    2.6071805279e-01    2.8612139163e-01    3.1133255538e-01    
+3.3633423383e-01    3.6111298738e-01    3.8565056725e-01    4.0992837201e-01    4.3393419268e-01    
+4.5765698414e-01    4.8107194612e-01    5.0416295148e-01    5.2692224793e-01    5.4932668997e-01    
+5.7136081995e-01    5.9303389896e-01    6.1432092748e-01    6.3519536042e-01    6.5564947835e-01    
+6.7567666826e-01    6.9524989372e-01    7.1435552236e-01    7.3301420786e-01    7.5118064871e-01    
+7.6884211171e-01    7.8602664326e-01    8.0270408588e-01    8.1884283866e-01    8.3444860048e-01    
+8.4952865066e-01    8.6403849493e-01    8.7796770040e-01    8.9137482092e-01    9.0418351709e-01    
+9.1638440454e-01    9.2803506060e-01    9.3909552981e-01    9.4952458777e-01    9.5934864839e-01    
+9.6859578197e-01    9.7719070613e-01    9.8512659038e-01    9.9253366623e-01    9.9927100282e-01    
+1.0053328349e+00    1.0108166459e+00    1.0156671696e+00    1.0198285398e+00    1.0232965234e+00    
+1.0260673589e+00    1.0281377594e+00    1.0295049162e+00    0.0000000000e+00    2.6383217378e-02    
+5.2748353016e-02    7.9077337569e-02    1.0535454899e-01    1.3156227488e-01    1.5768163900e-01    
+1.8369578949e-01    2.0958854117e-01    2.3534032171e-01    2.6093346635e-01    2.8636029065e-01    
+3.1159522058e-01    3.3662092607e-01    3.6142437021e-01    3.8598714361e-01    4.1029042515e-01    
+4.3432249088e-01    4.5807289107e-01    4.8151583758e-01    5.0463517505e-01    5.2742404756e-01    
+5.4985843318e-01    5.7192284209e-01    5.9362927816e-01    6.1495156809e-01    6.3586178641e-01    
+6.5635293634e-01    6.7641921950e-01    6.9603206276e-01    7.1517778188e-01    7.3388083124e-01    
+7.5209219072e-01    7.6979906428e-01    7.8703402164e-01    8.0376478586e-01    8.1995743136e-01    
+8.3561952123e-01    8.5076033512e-01    8.6533146230e-01    8.7932237245e-01    8.9279930207e-01    
+9.0567824667e-01    9.1794970500e-01    9.2967868584e-01    9.4082155345e-01    9.5133321055e-01    
+9.6124382147e-01    9.7058534510e-01    9.7927461361e-01    9.8730462525e-01    9.9482093675e-01    
+1.0016671317e+00    1.0078372402e+00    1.0134402007e+00    1.0184148223e+00    1.0226991940e+00    
+1.0262888416e+00    1.0291797631e+00    1.0313684318e+00    1.0328518006e+00    0.0000000000e+00    
+2.6406318531e-02    5.2794539491e-02    7.9146577710e-02    1.0544706666e-01    1.3167831120e-01    
+1.5782131654e-01    1.8385933210e-01    2.0977634042e-01    2.3555254796e-01    2.6117027146e-01    
+2.8662291342e-01    3.1188396964e-01    3.3693608815e-01    3.6176667476e-01    3.8635714354e-01    
+4.1068843181e-01    4.3474934886e-01    4.5853009945e-01    4.8200380949e-01    5.0515429258e-01    
+5.2797567818e-01    5.5044298092e-01    5.7254067560e-01    5.9428378122e-01    6.1564483418e-01    
+6.3659439153e-01    6.5712625091e-01    6.7723550945e-01    6.9689190474e-01    7.1608169552e-01    
+7.3483351427e-01    7.5309425302e-01    7.7085104659e-01    7.8814143729e-01    8.0493081817e-01    
+8.2118270819e-01    8.3690671974e-01    8.5211433146e-01    8.6675282722e-01    8.8081156961e-01    
+8.9436524069e-01    9.0732140971e-01    9.1967044694e-01    9.3148553056e-01    9.4271897910e-01    
+9.5332143781e-01    9.6332719387e-01    9.7277248091e-01    9.8156546261e-01    9.8969894891e-01    
+9.9733534365e-01    1.0043012072e+00    1.0105903444e+00    1.0163242864e+00    1.0214353295e+00    
+1.0258549172e+00    1.0295783106e+00    1.0326012431e+00    1.0349199248e+00    1.0365310458e+00    
+0.0000000000e+00    2.6431713735e-02    5.2845312493e-02    7.9222693713e-02    1.0554877175e-01    
+1.3180587046e-01    1.5797486470e-01    1.8403911524e-01    2.0998278899e-01    2.3578584925e-01    
+2.6143059240e-01    2.8691161584e-01    3.1220139279e-01    3.3728254727e-01    3.6214297172e-01    
+3.8676388614e-01    4.1112596236e-01    4.3521859579e-01    4.5903271071e-01    4.8254023923e-01    
+5.0572496085e-01    5.2858208824e-01    5.5108557691e-01    5.7321986278e-01    5.9500327942e-01    
+6.1640694476e-01    6.3739974768e-01    6.5797635914e-01    6.7813286072e-01    6.9783713295e-01    
+7.1707537190e-01    7.3588080307e-01    7.5419582466e-01    7.7200749554e-01    7.8935882435e-01    
+8.0621264281e-01    8.2252966060e-01    8.3832174292e-01    8.5360278581e-01    8.6831534016e-01    
+8.8244865083e-01    8.9608668415e-01    9.0912774633e-01    9.2156206639e-01    9.3347180319e-01    
+9.4480482777e-01    9.5550710510e-01    9.6561745464e-01    9.7517680928e-01    9.8408380335e-01    
+9.9233103982e-01    1.0000994426e+00    1.0071968584e+00    1.0136168444e+00    1.0194947749e+00    
+1.0247557867e+00    1.0293240181e+00    1.0331944389e+00    1.0363624918e+00    1.0388240971e+00    
+1.0405756568e+00    0.0000000000e+00    2.6459630797e-02    5.2901127485e-02    7.9306368383e-02    
+1.0566057662e-01    1.3194609694e-01    1.5814366089e-01    1.8423675167e-01    2.1020973885e-01    
+2.3604231842e-01    2.6171676439e-01    2.8722898772e-01    3.1255033751e-01    3.3766341135e-01    
+3.6255663669e-01    3.8721102014e-01    4.1160694167e-01    4.3573444107e-01    4.5958523356e-01    
+4.8312993889e-01    5.0635229907e-01    5.2924871757e-01    5.5179198561e-01    5.7396649635e-01    
+5.9579422707e-01    6.1724473639e-01    6.3828507937e-01    6.5891088699e-01    6.7911932306e-01    
+6.9887622663e-01    7.1816772487e-01    7.3703209242e-01    7.5540678739e-01    7.7327878515e-01    
+7.9069710350e-01    8.0762175847e-01    8.2401037152e-01    8.3987728436e-01    8.5523905046e-01    
+8.7003301775e-01    8.8424830168e-01    8.9797907479e-01    9.1111346040e-01    9.2364153227e-01    
+9.3565532174e-01    9.4709781071e-01    9.5790981911e-01    9.6813514875e-01    9.7781989840e-01    
+9.8685222680e-01    9.9522450935e-01    1.0031380292e+00    1.0103800609e+00    1.0169438896e+00    
+1.0229801074e+00    1.0284059806e+00    1.0331376166e+00    1.0371696651e+00    1.0404972495e+00    
+1.0431159716e+00    1.0450219161e+00    0.0000000000e+00    2.6490320151e-02    5.2962485160e-02    
+7.9398352328e-02    1.0578348422e-01    1.3210024854e-01    1.5832921932e-01    1.8445401429e-01    
+2.1045922586e-01    2.3632425614e-01    2.6203135456e-01    2.8757787608e-01    3.1293393403e-01    
+3.3808209697e-01    3.6301138046e-01    3.8770255658e-01    4.1213568443e-01    4.3630151214e-01    
+4.6019262445e-01    4.8377819841e-01    5.0704193484e-01    5.2998154624e-01    5.5256854391e-01    
+5.7478727404e-01    5.9666371943e-01    6.1816572455e-01    6.3925832853e-01    6.5993821772e-01    
+6.8020374561e-01    7.0001850705e-01    7.1936855347e-01    7.3829771004e-01    7.5673800424e-01    
+7.7467631960e-01    7.9216827987e-01    8.0917080575e-01    8.2563812378e-01    8.4158729816e-01    
+8.5703780364e-01    8.7192126856e-01    8.8622666606e-01    9.0005938844e-01    9.1329636493e-01    
+9.2592749859e-01    9.3805567364e-01    9.4961849731e-01    9.6055113357e-01    9.7090286136e-01    
+9.8072545833e-01    9.8989556732e-01    9.9840531359e-01    1.0064783613e+00    1.0138793699e+00    
+1.0206013255e+00    1.0268115492e+00    1.0324186553e+00    1.0373299228e+00    1.0415396495e+00    
+1.0450426076e+00    1.0478340488e+00    1.0499097092e+00    0.0000000000e+00    2.6524057098e-02    
+5.3029935932e-02    7.9499470698e-02    1.0591859711e-01    1.3226970810e-01    1.5853320454e-01    
+1.8469285208e-01    2.1073348807e-01    2.3663419157e-01    2.6237718497e-01    2.8796141064e-01    
+3.1335562343e-01    3.3854235998e-01    3.6351128237e-01    3.8824290483e-01    4.1271693375e-01    
+4.3692489596e-01    4.6086033202e-01    4.8449083306e-01    5.0780005459e-01    5.3078714813e-01    
+5.5342221799e-01    5.7568955869e-01    5.9761955634e-01    6.1917817102e-01    6.4032822577e-01    
+6.6106756707e-01    6.8139585625e-01    7.0127422112e-01    7.2068862982e-01    7.3968900927e-01    
+7.5820141698e-01    7.7621263559e-01    7.9378555075e-01    8.1087368047e-01    8.2742751926e-01    
+8.4346712411e-01    8.5901518121e-01    8.7399703127e-01    8.8840149104e-01    9.0234628672e-01    
+9.1569604183e-01    9.2844047178e-01    9.4069439142e-01    9.5238949957e-01    9.6345474259e-01    
+9.7394542043e-01    9.8391955359e-01    9.9324112542e-01    1.0019019862e+00    1.0101504036e+00    
+1.0177261762e+00    1.0246219616e+00    1.0310234708e+00    1.0368298069e+00    1.0419385440e+00    
+1.0463435932e+00    1.0500393404e+00    1.0530206525e+00    1.0552828825e+00    0.0000000000e+00    
+2.6561144278e-02    5.3104084874e-02    7.9610630582e-02    1.0606712733e-01    1.3245599576e-01    
+1.5875744642e-01    1.8495540755e-01    2.1103498577e-01    2.3697490500e-01    2.6275735792e-01    
+2.8838303192e-01    3.1381918851e-01    3.3904832921e-01    3.6406082682e-01    3.8883691212e-01    
+4.1335590378e-01    4.3761018462e-01    4.6159434599e-01    4.8527423557e-01    5.0863345907e-01    
+5.3167274996e-01    5.5436066580e-01    5.7668144431e-01    5.9867031221e-01    6.2029115805e-01    
+6.4150436867e-01    6.6230906595e-01    6.8270634892e-01    7.0265463332e-01    7.2213979577e-01    
+7.4121847084e-01    7.5981015328e-01    7.7790151476e-01    7.9556342401e-01    8.1274565842e-01    
+8.2939460986e-01    8.4553362535e-01    8.6118892139e-01    8.7627892668e-01    8.9079228604e-01    
+9.0486028442e-01    9.1833401758e-01    9.3120299466e-01    9.4359514590e-01    9.5543567499e-01    
+9.6664669322e-01    9.7729011949e-01    9.8743083707e-01    9.9691891268e-01    1.0057458943e+00    
+1.0141870964e+00    1.0219549880e+00    1.0290418650e+00    1.0356536553e+00    1.0416790060e+00    
+1.0470048224e+00    1.0516245904e+00    1.0555322715e+00    1.0587223096e+00    1.0611896363e+00    
+0.0000000000e+00    2.6601914383e-02    5.3185597143e-02    7.9732829150e-02    1.0623040727e-01    
+1.3266078264e-01    1.5900395654e-01    1.8524403597e-01    2.1136642357e-01    2.3734945282e-01    
+2.6317528377e-01    2.8884652213e-01    3.1432878771e-01    3.3960454348e-01    3.6466494353e-01    
+3.8948990704e-01    4.1405832644e-01    4.3836352558e-01    4.6240125090e-01    4.8613543353e-01    
+5.0954962443e-01    5.3264629609e-01    5.5539230575e-01    5.7777182870e-01    5.9982541292e-01    
+6.2151466976e-01    6.4279730793e-01    6.6367385134e-01    6.8414697948e-01    7.0417212673e-01    
+7.2373506911e-01    7.4289981492e-01    7.6157864443e-01    7.7975810733e-01    7.9751784817e-01    
+8.1480353230e-01    8.3155704153e-01    8.4780533958e-01    8.6357852387e-01    8.7878742470e-01    
+8.9342049789e-01    9.0762393355e-01    9.2123395634e-01    9.3423984866e-01    9.4678395852e-01    
+9.5878434951e-01    9.7015561909e-01    9.8096696241e-01    9.9129080700e-01    1.0009619210e+00    
+1.0099715200e+00    1.0186246512e+00    1.0266037400e+00    1.0339006851e+00    1.0407436382e+00    
+1.0470097526e+00    1.0525742053e+00    1.0574300147e+00    1.0615706757e+00    1.0649901672e+00    
+1.0676829577e+00    0.0000000000e+00    2.6646733146e-02    5.3275203951e-02    7.9867162593e-02    
+1.0640990166e-01    1.3288590579e-01    1.5927494624e-01    1.8556132652e-01    2.1173077464e-01    
+2.3776119495e-01    2.6363471157e-01    2.8935603902e-01    3.1488899244e-01    3.4021599237e-01    
+3.6532905178e-01    3.9020774734e-01    4.1483050288e-01    4.3919167672e-01    4.6328828514e-01    
+4.8708215237e-01    5.1055676917e-01    5.3371651979e-01    5.5652639225e-01    5.7897049323e-01    
+6.0109522040e-01    6.2285968176e-01    6.4421864194e-01    6.6517416613e-01    6.8573067122e-01    
+7.0584031416e-01    7.2548876037e-01    7.4474812413e-01    7.6352275480e-01    7.8179906800e-01    
+7.9966635557e-01    8.1706576244e-01    8.3393421251e-01    8.5030264538e-01    8.6620542476e-01    
+8.8154502801e-01    8.9630970315e-01    9.1066202563e-01    9.2442187224e-01    9.3757827609e-01    
+9.5028943476e-01    9.6246556266e-01    9.7401299729e-01    9.8500893258e-01    9.9553408953e-01    
+1.0054064184e+00    1.0146167696e+00    1.0235028754e+00    1.0317141343e+00    1.0392420081e+00    
+1.0463390797e+00    1.0528698666e+00    1.0586966533e+00    1.0638119441e+00    1.0682087210e+00    
+1.0718804517e+00    1.0748210955e+00    0.0000000000e+00    2.6696002615e-02    5.3373709124e-02    
+8.0014835959e-02    1.0660722065e-01    1.3313338470e-01    1.5957284646e-01    1.8591012546e-01    
+2.1213130744e-01    2.3821382495e-01    2.6413976263e-01    2.8991615326e-01    3.1550482805e-01    
+3.4088816092e-01    3.6605910901e-01    3.9099687245e-01    4.1567935995e-01    4.4010206704e-01    
+4.6426340592e-01    4.8812288470e-01    5.1166392798e-01    5.3489302157e-01    5.5777309870e-01    
+5.8028819061e-01    6.0249112555e-01    6.2433825957e-01    6.4578112090e-01    6.6682346901e-01    
+6.8747163076e-01    7.0767416021e-01    7.2741660115e-01    7.4677997887e-01    7.6565992419e-01    
+7.8404270537e-01    8.0202821954e-01    8.1955264234e-01    8.3654744740e-01    8.5304794503e-01    
+8.6909318889e-01    8.8457647389e-01    8.9948581965e-01    9.1400181409e-01    9.2792636271e-01    
+9.4124822458e-01    9.5414302077e-01    9.6651233706e-01    9.7825343072e-01    9.8945228881e-01    
+1.0001987494e+00    1.0102922747e+00    1.0197233137e+00    1.0288655295e+00    1.0373320140e+00    
+1.0451137488e+00    1.0524901740e+00    1.0593119167e+00    1.0654270883e+00    1.0708276281e+00    
+1.0755059545e+00    1.0794549728e+00    1.0826680830e+00    0.0000000000e+00    2.6750164768e-02    
+5.3481996310e-02    8.0177173963e-02    1.0682413432e-01    1.3340543938e-01    1.5990032952e-01    
+1.8629356172e-01    2.1257161497e-01    2.3871140317e-01    2.6469496757e-01    2.9053188940e-01    
+3.1618181894e-01    3.4162707887e-01    3.6686166425e-01    3.9186436127e-01    4.1661251240e-01    
+4.4110286328e-01    4.6533536064e-01    4.8926696649e-01    5.1288103271e-01    5.3618635535e-01    
+5.5914360879e-01    5.8173674134e-01    6.0402565044e-01    6.2596366691e-01    6.4749876114e-01    
+6.6863655519e-01    6.8938547552e-01    7.0969011552e-01    7.2953588531e-01    7.4901360604e-01    
+7.6800932425e-01    7.8650914615e-01    8.0462462736e-01    8.2228648075e-01    8.3942018843e-01    
+8.5606586544e-01    8.7226772115e-01    8.8790895616e-01    9.0297733900e-01    9.1767325877e-01    
+9.3177886505e-01    9.4528261567e-01    9.5837928543e-01    9.7096097460e-01    9.8291495852e-01    
+9.9433689057e-01    1.0053266312e+00    1.0156633188e+00    1.0253369608e+00    1.0347607196e+00    
+1.0435077748e+00    1.0515685802e+00    1.0592520999e+00    1.0663936917e+00    1.0728258862e+00    
+1.0785400016e+00    1.0835278365e+00    1.0877816784e+00    1.0912943120e+00    0.0000000000e+00    
+2.6809705470e-02    5.3601036906e-02    8.0355632870e-02    1.0706258851e-01    1.3370451034e-01    
+1.6026033314e-01    1.8671507496e-01    2.1305564705e-01    2.3925839317e-01    2.6530530690e-01    
+2.9120877094e-01    3.1692603812e-01    3.4243937474e-01    3.6774391689e-01    3.9281799569e-01    
+4.1763833114e-01    4.4220304313e-01    4.6651376534e-01    4.9052466082e-01    5.1421900148e-01    
+5.3760812306e-01    5.6065021678e-01    5.8332913976e-01    6.0571256064e-01    6.2775048459e-01    
+6.4938697089e-01    6.7062968908e-01    6.9148937378e-01    7.1190626438e-01    7.3186562405e-01    
+7.5146904256e-01    7.7059203043e-01    7.8922051574e-01    8.0747887031e-01    8.2529180177e-01    
+8.4257820573e-01    8.5938347910e-01    8.7575749893e-01    8.9157236911e-01    9.0681558213e-01    
+9.2170929464e-01    9.3601393843e-01    9.4971764019e-01    9.6303623047e-01    9.7585138211e-01    
+9.8803939726e-01    9.9970655553e-01    1.0109637350e+00    1.0215677320e+00    1.0315080687e+00    
+1.0412413289e+00    1.0502968168e+00    1.0586644057e+00    1.0666855160e+00    1.0741787192e+00    
+1.0809594184e+00    1.0870182488e+00    1.0923463279e+00    1.0969352638e+00    1.1007771649e+00    
+0.0000000000e+00    2.6875158834e-02    5.3731898777e-02    8.0551813560e-02    1.0732472228e-01    
+1.3403328041e-01    1.6065608676e-01    1.8717844638e-01    2.1358774571e-01    2.3985970178e-01    
+2.6597625569e-01    2.9195286991e-01    3.1774416165e-01    3.4333233528e-01    3.6871378123e-01    
+3.9386633036e-01    4.1876601835e-01    4.4341247587e-01    4.6780919101e-01    4.9190724993e-01    
+5.1568983664e-01    5.3917107878e-01    5.6230643780e-01    5.8507967060e-01    6.0756698872e-01    
+6.2971474142e-01    6.5146268846e-01    6.7282075026e-01    6.9380219873e-01    7.1434248693e-01    
+7.3442671646e-01    7.5416831512e-01    7.7343121111e-01    7.9220113669e-01    8.1061655259e-01    
+8.2859556486e-01    8.4604982854e-01    8.6303054692e-01    8.7959382754e-01    8.9559957565e-01    
+9.1103498030e-01    9.2614612726e-01    9.4066957389e-01    9.5459308285e-01    9.6815563137e-01    
+9.8122742937e-01    9.9367271613e-01    1.0056094527e+00    1.0171606289e+00    1.0280584804e+00    
+1.0382919957e+00    1.0483654923e+00    1.0577600415e+00    1.0664648790e+00    1.0748571041e+00    
+1.0827368355e+00    1.0899006474e+00    1.0963384247e+00    1.1020405357e+00    1.1069978419e+00    
+1.1112017083e+00    0.0000000000e+00    2.6947112016e-02    5.3875755827e-02    8.0767475886e-02    
+1.0761288713e-01    1.3439469884e-01    1.6109114052e-01    1.8768783269e-01    2.1417268420e-01    
+2.4052072307e-01    2.6671383276e-01    2.9277086129e-01    3.1864352857e-01    3.4431397089e-01    
+3.6977995751e-01    3.9501876943e-01    4.2000569004e-01    4.4474201078e-01    4.6923325834e-01    
+4.9342713644e-01    5.1730673244e-01    5.4088924313e-01    5.6412712912e-01    5.8700403713e-01    
+6.0960556995e-01    6.3187405790e-01    6.5374453425e-01    6.7522939379e-01    6.9634469774e-01    
+7.1702063747e-01    7.3724213701e-01    7.5713563775e-01    7.7655233536e-01    7.9547774687e-01    
+8.1406582102e-01    8.3222740668e-01    8.4986619931e-01    8.6703978519e-01    8.8381112107e-01    
+9.0002670216e-01    9.1567338393e-01    9.3102355757e-01    9.4578753518e-01    9.5995267918e-01    
+9.7378341212e-01    9.8713734263e-01    9.9986544923e-01    1.0120985344e+00    1.0239729026e+00    
+1.0351937897e+00    1.0457495976e+00    1.0561971176e+00    1.0659643986e+00    1.0750399749e+00    
+1.0838401681e+00    1.0921448117e+00    1.0997297812e+00    1.1065841365e+00    1.1126974225e+00    
+1.1180596799e+00    1.1226614564e+00    0.0000000000e+00    2.7026210476e-02    5.4033898538e-02    
+8.1004554465e-02    1.0792966807e-01    1.3479200777e-01    1.6156939710e-01    1.8824780338e-01    
+2.1481570974e-01    2.4124738678e-01    2.6752465460e-01    2.9367008294e-01    3.1963220673e-01    
+3.4539308737e-01    3.7095200996e-01    3.9628565095e-01    4.2136846678e-01    4.4620357457e-01    
+4.7079874206e-01    4.9509795460e-01    5.1908419336e-01    5.4277802903e-01    5.6612862338e-01    
+5.8911950202e-01    6.1184659159e-01    6.3424780435e-01    6.5625297773e-01    6.7787722661e-01    
+6.9913967849e-01    7.1996474056e-01    7.4033714166e-01    7.6039762904e-01    7.7998340148e-01    
+7.9907973938e-01    8.1785761753e-01    8.3621990694e-01    8.5406155309e-01    8.7144715909e-01    
+8.8844721107e-01    9.0489346250e-01    9.2077240217e-01    9.3638533895e-01    9.5141373334e-01    
+9.6584450786e-01    9.7997005713e-01    9.9363413720e-01    1.0066731489e+00    1.0192320116e+00    
+1.0314616662e+00    1.0430376677e+00    1.0539477734e+00    1.0648064589e+00    1.0749834856e+00    
+1.0844666169e+00    1.0937152914e+00    1.1024870428e+00    1.1105349927e+00    1.1178472941e+00    
+1.1244125867e+00    1.1302200088e+00    1.1352592097e+00    0.0000000000e+00    2.7113163774e-02    
+5.4207745541e-02    8.1265176026e-02    1.0827790679e-01    1.3522877129e-01    1.6209514674e-01    
+1.8886338172e-01    2.1552259066e-01    2.4204621151e-01    2.6841599473e-01    2.9465860140e-01    
+3.2071906513e-01    3.4657936505e-01    3.7224045257e-01    3.9767833958e-01    4.2286657347e-01    
+4.4781027830e-01    4.7251968543e-01    4.9693469262e-01    5.2103816425e-01    5.4485437997e-01    
+5.6832887514e-01    5.9144504222e-01    6.1431015689e-01    6.3685727463e-01    6.5901052107e-01    
+6.8078800128e-01    7.0221221355e-01    7.2320120651e-01    7.4373949437e-01    7.6398355092e-01    
+7.8375518810e-01    8.0303942616e-01    8.2202595670e-01    8.4060888067e-01    8.5867352463e-01    
+8.7629220530e-01    8.9354368593e-01    9.1024351432e-01    9.2637777616e-01    9.4227956964e-01    
+9.5759863861e-01    9.7232142197e-01    9.8677106419e-01    1.0007760931e+00    1.0141568843e+00    
+1.0270738755e+00    1.0396940981e+00    1.0516604785e+00    1.0629600653e+00    1.0742707471e+00    
+1.0848982091e+00    1.0948293673e+00    1.1045710594e+00    1.1138563045e+00    1.1224132110e+00    
+1.1302289347e+00    1.1372911201e+00    1.1435879138e+00    1.1491079772e+00    0.0000000000e+00    
+2.7208751931e-02    5.4398856343e-02    8.1551678496e-02    1.0866072721e-01    1.3570890741e-01    
+1.6267310572e-01    1.8954008978e-01    2.1629966806e-01    2.4292436318e-01    2.6939584901e-01    
+2.9574528425e-01    3.2191385352e-01    3.4788344550e-01    3.7365684339e-01    3.9920932854e-01    
+4.2451344897e-01    4.4957653504e-01    4.7441152633e-01    4.9895382709e-01    5.2318617335e-01    
+5.4713692203e-01    5.7074762193e-01    5.9400151915e-01    6.1701836546e-01    6.3972587721e-01    
+6.6204190103e-01    6.8398782915e-01    7.0558986536e-01    7.2675906828e-01    7.4747971621e-01    
+7.6792557119e-01    7.8790153031e-01    8.0739232788e-01    8.2660823095e-01    8.4543369949e-01    
+8.6374348594e-01    8.8161838668e-01    8.9914626396e-01    9.1612485067e-01    9.3253978933e-01    
+9.4875912430e-01    9.6439773317e-01    9.7944152316e-01    9.9424744224e-01    1.0086272777e+00    
+1.0223837886e+00    1.0356944723e+00    1.0487440480e+00    1.0611395737e+00    1.0728673189e+00    
+1.0846748822e+00    1.0957975098e+00    1.1062211861e+00    1.1165048546e+00    1.1263545858e+00    
+1.1354709905e+00    1.1438401286e+00    1.1514485506e+00    1.1582833126e+00    1.1643319905e+00    
+0.0000000000e+00    2.7313832428e-02    5.4608945319e-02    8.1866631967e-02    1.0908156344e-01    
+1.3623672324e-01    1.6330845865e-01    1.9028399805e-01    2.1715391280e-01    2.4388971932e-01    
+2.7047300728e-01    2.9693987966e-01    3.2322728985e-01    3.4931702708e-01    3.7521388827e-01    
+4.0089235168e-01    4.2632386671e-01    4.5151818912e-01    4.7649123565e-01    5.0117347082e-01    
+5.2554748955e-01    5.4964613091e-01    5.7340656130e-01    5.9681186590e-01    6.1999551147e-01    
+6.4287934509e-01    6.6537431084e-01    6.8750541450e-01    7.0930293337e-01    7.3067024193e-01    
+7.5159135912e-01    7.7225905204e-01    7.9245962320e-01    8.1217749258e-01    8.3164554592e-01    
+8.5073764481e-01    8.6931691753e-01    8.8747348214e-01    9.0530520352e-01    9.2259023052e-01    
+9.3931371849e-01    9.5588212827e-01    9.7187200879e-01    9.8726868285e-01    1.0024662587e+00    
+1.0172581208e+00    1.0314276620e+00    1.0451711335e+00    1.0586926992e+00    1.0715599863e+00    
+1.0837584080e+00    1.0961121953e+00    1.1077791607e+00    1.1187442645e+00    1.1296237300e+00    
+1.1400940033e+00    1.1498254671e+00    1.1588029760e+00    1.1670118784e+00    1.1744380315e+00    
+1.1810678177e+00    0.0000000000e+00    2.7418912924e-02    5.4819034295e-02    8.2181585438e-02    
+1.0950239967e-01    1.3676453907e-01    1.6394381158e-01    1.9102790631e-01    2.1800815753e-01    
+2.4485507545e-01    2.7155016555e-01    2.9813447507e-01    3.2454072618e-01    3.5075060867e-01    
+3.7677093316e-01    4.0257537482e-01    4.2813428445e-01    4.5345984320e-01    4.7857094497e-01    
+5.0339311455e-01    5.2790880574e-01    5.5215533979e-01    5.7606550066e-01    5.9962221265e-01    
+6.2297265748e-01    6.4603281297e-01    6.6870672064e-01    6.9102299986e-01    7.1301600139e-01    
+7.3458141558e-01    7.5570300203e-01    7.7659253288e-01    7.9701771610e-01    8.1696265728e-01    
+8.3668286088e-01    8.5604159013e-01    8.7489034911e-01    8.9332857760e-01    9.1146414309e-01    
+9.2905561036e-01    9.4608764765e-01    9.6300513224e-01    9.7934628441e-01    9.9509584253e-01    
+1.0106850752e+00    1.0258889638e+00    1.0404715355e+00    1.0546477948e+00    1.0686413504e+00    
+1.0819803989e+00    1.0946494970e+00    1.1075495084e+00    1.1197608116e+00    1.1312673428e+00    
+1.1427426055e+00    1.1538334209e+00    1.1641799436e+00    1.1737658235e+00    1.1825752062e+00    
+1.1905927505e+00    1.1978036449e+00    0.0000000000e+00    2.7523993421e-02    5.5029123271e-02    
+8.2496538909e-02    1.0992323590e-01    1.3729235490e-01    1.6457916452e-01    1.9177181457e-01    
+2.1886240227e-01    2.4582043158e-01    2.7262732382e-01    2.9932907048e-01    3.2585416250e-01    
+3.5218419025e-01    3.7832797804e-01    4.0425839796e-01    4.2994470220e-01    4.5540149728e-01    
+4.8065065429e-01    5.0561275828e-01    5.3027012194e-01    5.5466454867e-01    5.7872444003e-01    
+6.0243255939e-01    6.2594980349e-01    6.4918628085e-01    6.7203913045e-01    6.9454058521e-01    
+7.1672906941e-01    7.3849258923e-01    7.5981464494e-01    7.8092601373e-01    8.0157580899e-01    
+8.2174782198e-01    8.4172017585e-01    8.6134553545e-01    8.8046378069e-01    8.9918367306e-01    
+9.1762308265e-01    9.3552099021e-01    9.5286157681e-01    9.7012813621e-01    9.8682056004e-01    
+1.0029230022e+00    1.0189038916e+00    1.0345198069e+00    1.0495154089e+00    1.0641244561e+00    
+1.0785900015e+00    1.0924008115e+00    1.1055405860e+00    1.1189868216e+00    1.1317424626e+00    
+1.1437904211e+00    1.1558614810e+00    1.1675728384e+00    1.1785344201e+00    1.1887286709e+00    
+1.1981385340e+00    1.2067474694e+00    1.2145394721e+00    0.0000000000e+00    2.7629073917e-02    
+5.5239212247e-02    8.2811492380e-02    1.1034407213e-01    1.3782017073e-01    1.6521451745e-01    
+1.9251572284e-01    2.1971664700e-01    2.4678578771e-01    2.7370448208e-01    3.0052366588e-01    
+3.2716759883e-01    3.5361777184e-01    3.7988502293e-01    4.0594142110e-01    4.3175511994e-01    
+4.5734315135e-01    4.8273036361e-01    5.0783240201e-01    5.3263143813e-01    5.5717375756e-01    
+5.8138337940e-01    6.0524290614e-01    6.2892694950e-01    6.5233974874e-01    6.7537154025e-01    
+6.9805817057e-01    7.2044213742e-01    7.4240376288e-01    7.6392628785e-01    7.8525949457e-01    
+8.0613390188e-01    8.2653298667e-01    8.4675749081e-01    8.6664948077e-01    8.8603721227e-01    
+9.0503876852e-01    9.2378202221e-01    9.4198637005e-01    9.5963550597e-01    9.7725114017e-01    
+9.9429483566e-01    1.0107501619e+00    1.0271227081e+00    1.0431506499e+00    1.0585592823e+00    
+1.0736011174e+00    1.0885386527e+00    1.1028212241e+00    1.1164316751e+00    1.1304241347e+00    
+1.1437241135e+00    1.1563134994e+00    1.1689803564e+00    1.1813122560e+00    1.1928888966e+00    
+1.2036915184e+00    1.2137018618e+00    1.2229021883e+00    1.2312752993e+00    0.0000000000e+00    
+2.7734154413e-02    5.5449301223e-02    8.3126445850e-02    1.1076490836e-01    1.3834798656e-01    
+1.6584987038e-01    1.9325963110e-01    2.2057089174e-01    2.4775114384e-01    2.7478164035e-01    
+3.0171826129e-01    3.2848103516e-01    3.5505135342e-01    3.8144206781e-01    4.0762444424e-01    
+4.3356553768e-01    4.5928480543e-01    4.8481007293e-01    5.1005204573e-01    5.3499275433e-01    
+5.5968296644e-01    5.8404231877e-01    6.0805325288e-01    6.3190409552e-01    6.5549321662e-01    
+6.7870395006e-01    7.0157575592e-01    7.2415520544e-01    7.4631493653e-01    7.6803793076e-01    
+7.8959297542e-01    8.1069199477e-01    8.3131815137e-01    8.5179480577e-01    8.7195342609e-01    
+8.9161064385e-01    9.1089386398e-01    9.2994096178e-01    9.4845174990e-01    9.6640943513e-01    
+9.8437414414e-01    1.0017691113e+00    1.0185773216e+00    1.0353415245e+00    1.0517814930e+00    
+1.0676031557e+00    1.0830777787e+00    1.0984873039e+00    1.1132416367e+00    1.1273227641e+00    
+1.1418614478e+00    1.1557057644e+00    1.1688365778e+00    1.1820992319e+00    1.1950516735e+00    
+1.2072433732e+00    1.2186543658e+00    1.2292651897e+00    1.2390569073e+00    1.2480111265e+00    
+0.0000000000e+00    2.7839234910e-02    5.5659390198e-02    8.3441399321e-02    1.1118574459e-01    
+1.3887580239e-01    1.6648522332e-01    1.9400353937e-01    2.2142513647e-01    2.4871649998e-01    
+2.7585879862e-01    3.0291285670e-01    3.2979447149e-01    3.5648493500e-01    3.8299911270e-01    
+4.0930746738e-01    4.3537595543e-01    4.6122645951e-01    4.8688978225e-01    5.1227168946e-01    
+5.3735407052e-01    5.6219217532e-01    5.8670125813e-01    6.1086359963e-01    6.3488124153e-01    
+6.5864668450e-01    6.8203635986e-01    7.0509334128e-01    7.2786827346e-01    7.5022611018e-01    
+7.7214957367e-01    7.9392645626e-01    8.1525008766e-01    8.3610331607e-01    8.5683212074e-01    
+8.7725737141e-01    8.9718407543e-01    9.1674895944e-01    9.3609990134e-01    9.5491712975e-01    
+9.7318336429e-01    9.9149714811e-01    1.0092433869e+00    1.0264044813e+00    1.0435603410e+00    
+1.0604123360e+00    1.0766470292e+00    1.0925544400e+00    1.1084359550e+00    1.1236620492e+00    
+1.1382138532e+00    1.1532987610e+00    1.1676874154e+00    1.1813596561e+00    1.1952181073e+00    
+1.2087910911e+00    1.2215978497e+00    1.2336172133e+00    1.2448285175e+00    1.2552116262e+00    
+1.2647469537e+00    0.0000000000e+00    2.7944315406e-02    5.5869479174e-02    8.3756352792e-02    
+1.1160658082e-01    1.3940361821e-01    1.6712057625e-01    1.9474744763e-01    2.2227938121e-01    
+2.4968185611e-01    2.7693595689e-01    3.0410745211e-01    3.3110790781e-01    3.5791851659e-01    
+3.8455615759e-01    4.1099049052e-01    4.3718637317e-01    4.6316811359e-01    4.8896949157e-01    
+5.1449133319e-01    5.3971538672e-01    5.6470138420e-01    5.8936019750e-01    6.1367394637e-01    
+6.3785838754e-01    6.6180015238e-01    6.8536876967e-01    7.0861092663e-01    7.3158134148e-01    
+7.5413728383e-01    7.7626121658e-01    7.9825993710e-01    8.1980818055e-01    8.4088848076e-01    
+8.6186943570e-01    8.8256131673e-01    9.0275750702e-01    9.2260405490e-01    9.4225884090e-01    
+9.6138250959e-01    9.7995729345e-01    9.9862015208e-01    1.0167176625e+00    1.0342316410e+00    
+1.0517791575e+00    1.0690431791e+00    1.0856909026e+00    1.1020311013e+00    1.1183846062e+00    
+1.1340824618e+00    1.1491049422e+00    1.1647360741e+00    1.1796690663e+00    1.1938827344e+00    
+1.2083369828e+00    1.2225305086e+00    1.2359523262e+00    1.2485800607e+00    1.2603918453e+00    
+1.2713663451e+00    1.2814827809e+00    0.0000000000e+00    2.8049395903e-02    5.6079568150e-02    
+8.4071306263e-02    1.1202741705e-01    1.3993143404e-01    1.6775592919e-01    1.9549135589e-01    
+2.2313362594e-01    2.5064721224e-01    2.7801311516e-01    3.0530204752e-01    3.3242134414e-01    
+3.5935209817e-01    3.8611320247e-01    4.1267351366e-01    4.3899679091e-01    4.6510976767e-01    
+4.9104920089e-01    5.1671097692e-01    5.4207670291e-01    5.6721059309e-01    5.9201913687e-01    
+6.1648429312e-01    6.4083553355e-01    6.6495362027e-01    6.8870117947e-01    7.1212851198e-01    
+7.3529440949e-01    7.5804845748e-01    7.8037285950e-01    8.0259341795e-01    8.2436627345e-01    
+8.4567364546e-01    8.6690675067e-01    8.8786526204e-01    9.0833093860e-01    9.2845915036e-01    
+9.4841778047e-01    9.6784788944e-01    9.8673122261e-01    1.0057431560e+00    1.0241919382e+00    
+1.0420588007e+00    1.0599979739e+00    1.0776740222e+00    1.0947347760e+00    1.1115077625e+00    
+1.1283332574e+00    1.1445028744e+00    1.1599960312e+00    1.1761733872e+00    1.1916507172e+00    
+1.2064058127e+00    1.2214558583e+00    1.2362699262e+00    1.2503068027e+00    1.2635429082e+00    
+1.2759551731e+00    1.2875210640e+00    1.2982186081e+00    0.0000000000e+00    2.8154476399e-02    
+5.6289657126e-02    8.4386259734e-02    1.1244825328e-01    1.4045924987e-01    1.6839128212e-01    
+1.9623526416e-01    2.2398787068e-01    2.5161256837e-01    2.7909027343e-01    3.0649664292e-01    
+3.3373478047e-01    3.6078567975e-01    3.8767024736e-01    4.1435653680e-01    4.4080720866e-01    
+4.6705142175e-01    4.9312891021e-01    5.1893062065e-01    5.4443801911e-01    5.6971980197e-01    
+5.9467807624e-01    6.1929463987e-01    6.4381267956e-01    6.6810708815e-01    6.9203358928e-01    
+7.1564609734e-01    7.3900747751e-01    7.6195963113e-01    7.8448450241e-01    8.0692689879e-01    
+8.2892436634e-01    8.5045881016e-01    8.7194406563e-01    8.9316920736e-01    9.1390437018e-01    
+9.3431424582e-01    9.5457672003e-01    9.7431326929e-01    9.9350515177e-01    1.0128661600e+00    
+1.0316662138e+00    1.0498859603e+00    1.0682167904e+00    1.0863048652e+00    1.1037786494e+00    
+1.1209844238e+00    1.1382819085e+00    1.1549232870e+00    1.1708871203e+00    1.1876107004e+00    
+1.2036323682e+00    1.2189288911e+00    1.2345747337e+00    1.2500093437e+00    1.2646612793e+00    
+1.2785057556e+00    1.2915185010e+00    1.3036757830e+00    1.3149544353e+00    0.0000000000e+00    
+2.8259556895e-02    5.6499746102e-02    8.4701213205e-02    1.1286908951e-01    1.4098706570e-01    
+1.6902663505e-01    1.9697917242e-01    2.2484211541e-01    2.5257792450e-01    2.8016743170e-01    
+3.0769123833e-01    3.3504821679e-01    3.6221926134e-01    3.8922729224e-01    4.1603955994e-01    
+4.4261762640e-01    4.6899307583e-01    4.9520861953e-01    5.2115026438e-01    5.4679933530e-01    
+5.7222901085e-01    5.9733701560e-01    6.2210498661e-01    6.4678982558e-01    6.7126055603e-01    
+6.9536599908e-01    7.1916368269e-01    7.4272054553e-01    7.6587080479e-01    7.8859614532e-01    
+8.1126037964e-01    8.3348245923e-01    8.5524397486e-01    8.7698138059e-01    8.9847315268e-01    
+9.1947780176e-01    9.4016934128e-01    9.6073565959e-01    9.8077864913e-01    1.0002790809e+00    
+1.0199891640e+00    1.0391404894e+00    1.0577131200e+00    1.0764356068e+00    1.0949357083e+00    
+1.1128225229e+00    1.1304610851e+00    1.1482305597e+00    1.1653436996e+00    1.1817782093e+00    
+1.1990480135e+00    1.2156140191e+00    1.2314519694e+00    1.2476936092e+00    1.2637487613e+00    
+1.2790157558e+00    1.2934686031e+00    1.3070818288e+00    1.3198305019e+00    1.3316902625e+00    
+0.0000000000e+00    2.8364637392e-02    5.6709835078e-02    8.5016166676e-02    1.1328992574e-01    
+1.4151488153e-01    1.6966198799e-01    1.9772308068e-01    2.2569636015e-01    2.5354328064e-01    
+2.8124458997e-01    3.0888583374e-01    3.3636165312e-01    3.6365284292e-01    3.9078433713e-01    
+4.1772258308e-01    4.4442804414e-01    4.7093472990e-01    4.9728832885e-01    5.2336990811e-01    
+5.4916065150e-01    5.7473821973e-01    5.9999595497e-01    6.2491533336e-01    6.4976697159e-01    
+6.7441402392e-01    6.9869840889e-01    7.2268126805e-01    7.4643361354e-01    7.6978197844e-01    
+7.9270778823e-01    8.1559386048e-01    8.3804055212e-01    8.6002913955e-01    8.8201869556e-01    
+9.0377709800e-01    9.2505123334e-01    9.4602443674e-01    9.6689459916e-01    9.8724402898e-01    
+1.0070530101e+00    1.0271121679e+00    1.0466147650e+00    1.0655402797e+00    1.0846544233e+00    
+1.1035665513e+00    1.1218663963e+00    1.1399377464e+00    1.1581792109e+00    1.1757641122e+00    
+1.1926692984e+00    1.2104853266e+00    1.2275956700e+00    1.2439750477e+00    1.2608124846e+00    
+1.2774881788e+00    1.2933702323e+00    1.3084314505e+00    1.3226451566e+00    1.3359852208e+00    
+1.3484260897e+00    0.0000000000e+00    2.8469717888e-02    5.6919924054e-02    8.5331120147e-02    
+1.1371076197e-01    1.4204269736e-01    1.7029734092e-01    1.9846698895e-01    2.2655060488e-01    
+2.5450863677e-01    2.8232174824e-01    3.1008042915e-01    3.3767508945e-01    3.6508642451e-01    
+3.9234138201e-01    4.1940560622e-01    4.4623846189e-01    4.7287638398e-01    4.9936803817e-01    
+5.2558955183e-01    5.5152196769e-01    5.7724742862e-01    6.0265489434e-01    6.2772568010e-01    
+6.5274411760e-01    6.7756749180e-01    7.0203081869e-01    7.2619885340e-01    7.5014668156e-01    
+7.7369315209e-01    7.9681943114e-01    8.1992734133e-01    8.4259864501e-01    8.6481430425e-01    
+8.8705601052e-01    9.0908104332e-01    9.3062466492e-01    9.5187953220e-01    9.7305353872e-01    
+9.9370940882e-01    1.0138269393e+00    1.0342351719e+00    1.0540890407e+00    1.0733674394e+00    
+1.0928732397e+00    1.1121973944e+00    1.1309102697e+00    1.1494144077e+00    1.1681278621e+00    
+1.1861845247e+00    1.2035603874e+00    1.2219226398e+00    1.2395773209e+00    1.2564981261e+00    
+1.2739313601e+00    1.2912275964e+00    1.3077247088e+00    1.3233942980e+00    1.3382084844e+00    
+1.3521399398e+00    1.3651619169e+00    0.0000000000e+00    2.8574798385e-02    5.7130013030e-02    
+8.5646073618e-02    1.1413159820e-01    1.4257051319e-01    1.7093269385e-01    1.9921089721e-01    
+2.2740484962e-01    2.5547399290e-01    2.8339890650e-01    3.1127502456e-01    3.3898852578e-01    
+3.6652000609e-01    3.9389842690e-01    4.2108862936e-01    4.4804887963e-01    4.7481803806e-01    
+5.0144774749e-01    5.2780919556e-01    5.5388328389e-01    5.7975663750e-01    6.0531383370e-01    
+6.3053602685e-01    6.5572126361e-01    6.8072095968e-01    7.0536322850e-01    7.2971643876e-01    
+7.5385974958e-01    7.7760432574e-01    8.0093107405e-01    8.2426082217e-01    8.4715673790e-01    
+8.6959946895e-01    8.9209332549e-01    9.1438498864e-01    9.3619809651e-01    9.5773462766e-01    
+9.7921247828e-01    1.0001747887e+00    1.0206008684e+00    1.0413581759e+00    1.0615633163e+00    
+1.0811945991e+00    1.1010920562e+00    1.1208282374e+00    1.1399541432e+00    1.1588910690e+00    
+1.1780765132e+00    1.1966049373e+00    1.2144514764e+00    1.2333599529e+00    1.2515589719e+00    
+1.2690212044e+00    1.2870502355e+00    1.3049670139e+00    1.3220791853e+00    1.3383571454e+00    
+1.3537718123e+00    1.3682946587e+00    1.3818977441e+00    0.0000000000e+00    2.8679878881e-02    
+5.7340102006e-02    8.5961027088e-02    1.1455243443e-01    1.4309832902e-01    1.7156804679e-01    
+1.9995480547e-01    2.2825909435e-01    2.5643934903e-01    2.8447606477e-01    3.1246961996e-01    
+3.4030196210e-01    3.6795358767e-01    3.9545547178e-01    4.2277165250e-01    4.4985929737e-01    
+4.7675969214e-01    5.0352745680e-01    5.3002883929e-01    5.5624460008e-01    5.8226584638e-01    
+6.0797277307e-01    6.3334637359e-01    6.5869840962e-01    6.8387442756e-01    7.0869563831e-01    
+7.3323402411e-01    7.5757281760e-01    7.8151549939e-01    8.0504271696e-01    8.2859430302e-01    
+8.5171483080e-01    8.7438463364e-01    8.9713064045e-01    9.1968893396e-01    9.4177152809e-01    
+9.6358972312e-01    9.8537141785e-01    1.0066401685e+00    1.0273747976e+00    1.0484811798e+00    
+1.0690375919e+00    1.0890217588e+00    1.1093108727e+00    1.1294590805e+00    1.1489980166e+00    
+1.1683677303e+00    1.1880251644e+00    1.2070253499e+00    1.2253425655e+00    1.2447972660e+00    
+1.2635406228e+00    1.2815442827e+00    1.3001691110e+00    1.3187064315e+00    1.3364336619e+00    
+1.3533199929e+00    1.3693351401e+00    1.3844493776e+00    1.3986335712e+00    0.0000000000e+00    
+2.8784959377e-02    5.7550190981e-02    8.6275980559e-02    1.1497327066e-01    1.4362614485e-01    
+1.7220339972e-01    2.0069871374e-01    2.2911333909e-01    2.5740470516e-01    2.8555322304e-01    
+3.1366421537e-01    3.4161539843e-01    3.6938716926e-01    3.9701251667e-01    4.2445467564e-01    
+4.5166971512e-01    4.7870134622e-01    5.0560716612e-01    5.3224848302e-01    5.5860591628e-01    
+5.8477505526e-01    6.1063171244e-01    6.3615672034e-01    6.6167555564e-01    6.8702789545e-01    
+7.1202804811e-01    7.3675160946e-01    7.6128588561e-01    7.8542667304e-01    8.0915435987e-01    
+8.3292778386e-01    8.5627292369e-01    8.7916979834e-01    9.0216795541e-01    9.2499287927e-01    
+9.4734495967e-01    9.6944481858e-01    9.9153035741e-01    1.0131055484e+00    1.0341487267e+00    
+1.0556041838e+00    1.0765118675e+00    1.0968489185e+00    1.1175296891e+00    1.1380899235e+00    
+1.1580418900e+00    1.1778443915e+00    1.1979738156e+00    1.2174457625e+00    1.2362336545e+00    
+1.2562345792e+00    1.2755222737e+00    1.2940673610e+00    1.3132879865e+00    1.3324458490e+00    
+1.3507881384e+00    1.3682828403e+00    1.3848984679e+00    1.4006040965e+00    1.4153693984e+00    
+0.0000000000e+00    2.8890039874e-02    5.7760279957e-02    8.6590934030e-02    1.1539410689e-01    
+1.4415396068e-01    1.7283875266e-01    2.0144262200e-01    2.2996758382e-01    2.5837006129e-01    
+2.8663038131e-01    3.1485881078e-01    3.4292883476e-01    3.7082075084e-01    3.9856956155e-01    
+4.2613769878e-01    4.5348013286e-01    4.8064300030e-01    5.0768687544e-01    5.3446812675e-01    
+5.6096723247e-01    5.8728426415e-01    6.1329065181e-01    6.3896706709e-01    6.6465270165e-01    
+6.9018136333e-01    7.1536045792e-01    7.4026919482e-01    7.6499895363e-01    7.8933784669e-01    
+8.1326600278e-01    8.3726126471e-01    8.6083101658e-01    8.8395496304e-01    9.0720527038e-01    
+9.3029682459e-01    9.5291839125e-01    9.7529991404e-01    9.9768929697e-01    1.0195709282e+00    
+1.0409226559e+00    1.0627271878e+00    1.0839861431e+00    1.1046760781e+00    1.1257485056e+00    
+1.1467207666e+00    1.1670857634e+00    1.1873210528e+00    1.2079224667e+00    1.2278661751e+00    
+1.2471247436e+00    1.2676718923e+00    1.2875039247e+00    1.3065904394e+00    1.3264068619e+00    
+1.3461852666e+00    1.3651426149e+00    1.3832456878e+00    1.4004617957e+00    1.4167588155e+00    
+1.4321052256e+00    0.0000000000e+00    2.8995120370e-02    5.7970368933e-02    8.6905887501e-02    
+1.1581494312e-01    1.4468177651e-01    1.7347410559e-01    2.0218653026e-01    2.3082182856e-01    
+2.5933541743e-01    2.8770753958e-01    3.1605340619e-01    3.4424227108e-01    3.7225433242e-01    
+4.0012660644e-01    4.2782072192e-01    4.5529055060e-01    4.8258465438e-01    5.0976658476e-01    
+5.3668777048e-01    5.6332854866e-01    5.8979347303e-01    6.1594959117e-01    6.4177741383e-01    
+6.6762984766e-01    6.9333483121e-01    7.1869286772e-01    7.4378678017e-01    7.6871202165e-01    
+7.9324902034e-01    8.1737764569e-01    8.4159474555e-01    8.6538910947e-01    8.8874012774e-01    
+9.1224258534e-01    9.3560076991e-01    9.5849182283e-01    9.8115500950e-01    1.0038482365e+00    
+1.0260363081e+00    1.0476965851e+00    1.0698501917e+00    1.0914604188e+00    1.1125032378e+00    
+1.1339673220e+00    1.1553516096e+00    1.1761296369e+00    1.1967977141e+00    1.2178711179e+00    
+1.2382865877e+00    1.2580158326e+00    1.2791092054e+00    1.2994855756e+00    1.3191135177e+00    
+1.3395257374e+00    1.3599246841e+00    1.3794970914e+00    1.3982085352e+00    1.4160251235e+00    
+1.4329135344e+00    1.4488410528e+00    0.0000000000e+00    2.9100200867e-02    5.8180457909e-02    
+8.7220840972e-02    1.1623577934e-01    1.4520959233e-01    1.7410945852e-01    2.0293043853e-01    
+2.3167607329e-01    2.6030077356e-01    2.8878469785e-01    3.1724800160e-01    3.4555570741e-01    
+3.7368791401e-01    4.0168365132e-01    4.2950374506e-01    4.5710096835e-01    4.8452630845e-01    
+5.1184629408e-01    5.3890741421e-01    5.6568986486e-01    5.9230268191e-01    6.1860853054e-01    
+6.4458776058e-01    6.7060699367e-01    6.9648829909e-01    7.2202527753e-01    7.4730436553e-01    
+7.7242508966e-01    7.9716019399e-01    8.2148928860e-01    8.4592822640e-01    8.6994720236e-01    
+8.9352529243e-01    9.1727990031e-01    9.4090471523e-01    9.6406525441e-01    9.8701010496e-01    
+1.0100071761e+00    1.0325016879e+00    1.0544705142e+00    1.0769731957e+00    1.0989346944e+00    
+1.1203303975e+00    1.1421861385e+00    1.1639824527e+00    1.1851735103e+00    1.2062743754e+00    
+1.2278197691e+00    1.2487070002e+00    1.2689069216e+00    1.2905465186e+00    1.3114672265e+00    
+1.3316365960e+00    1.3526446128e+00    1.3736641017e+00    1.3938515680e+00    1.4131713827e+00    
+1.4315884514e+00    1.4490682533e+00    1.4655768800e+00    0.0000000000e+00    2.9205281363e-02    
+5.8390546885e-02    8.7535794443e-02    1.1665661557e-01    1.4573740816e-01    1.7474481146e-01    
+2.0367434679e-01    2.3253031803e-01    2.6126612969e-01    2.8986185612e-01    3.1844259700e-01    
+3.4686914374e-01    3.7512149559e-01    4.0324069621e-01    4.3118676820e-01    4.5891138609e-01    
+4.8646796253e-01    5.1392600340e-01    5.4112705793e-01    5.6805118105e-01    5.9481189079e-01    
+6.2126746991e-01    6.4739810732e-01    6.7358413969e-01    6.9964176698e-01    7.2535768733e-01    
+7.5082195088e-01    7.7613815768e-01    8.0107136764e-01    8.2560093151e-01    8.5026170724e-01    
+8.7450529526e-01    8.9831045713e-01    9.2231721527e-01    9.4620866055e-01    9.6963868599e-01    
+9.9286520042e-01    1.0161661157e+00    1.0389670677e+00    1.0612444434e+00    1.0840961997e+00    
+1.1064089700e+00    1.1281575572e+00    1.1504049550e+00    1.1726132958e+00    1.1942173837e+00    
+1.2157510367e+00    1.2377684203e+00    1.2591274128e+00    1.2797980107e+00    1.3019838317e+00    
+1.3234488775e+00    1.3441596743e+00    1.3657634883e+00    1.3874035192e+00    1.4082060445e+00    
+1.4281342301e+00    1.4471517792e+00    1.4652229722e+00    1.4823127072e+00    0.0000000000e+00    
+2.9310361859e-02    5.8600635861e-02    8.7850747914e-02    1.1707745180e-01    1.4626522399e-01    
+1.7538016439e-01    2.0441825505e-01    2.3338456276e-01    2.6223148582e-01    2.9093901439e-01    
+3.1963719241e-01    3.4818258006e-01    3.7655507718e-01    4.0479774109e-01    4.3286979134e-01    
+4.6072180383e-01    4.8840961661e-01    5.1600571272e-01    5.4334670166e-01    5.7041249725e-01    
+5.9732109968e-01    6.2392640927e-01    6.5020845407e-01    6.7656128570e-01    7.0279523486e-01    
+7.2869009714e-01    7.5433953624e-01    7.7985122570e-01    8.0498254130e-01    8.2971257442e-01    
+8.5459518809e-01    8.7906338815e-01    9.0309562183e-01    9.2735453023e-01    9.5151260587e-01    
+9.7521211758e-01    9.9872029589e-01    1.0223250552e+00    1.0454324476e+00    1.0680183725e+00    
+1.0912192037e+00    1.1138832456e+00    1.1359847169e+00    1.1586237714e+00    1.1812441388e+00    
+1.2032612572e+00    1.2252276980e+00    1.2477170714e+00    1.2695478254e+00    1.2906890997e+00    
+1.3134211448e+00    1.3354305284e+00    1.3566827527e+00    1.3788823638e+00    1.4011429368e+00    
+1.4225605210e+00    1.4430970776e+00    1.4627151070e+00    1.4813776912e+00    1.4990485344e+00    
+0.0000000000e+00    2.9415442356e-02    5.8810724837e-02    8.8165701385e-02    1.1749828803e-01    
+1.4679303982e-01    1.7601551732e-01    2.0516216332e-01    2.3423880750e-01    2.6319684195e-01    
+2.9201617266e-01    3.2083178782e-01    3.4949601639e-01    3.7798865876e-01    4.0635478598e-01    
+4.3455281448e-01    4.6253222158e-01    4.9035127069e-01    5.1808542204e-01    5.4556634539e-01    
+5.7277381344e-01    5.9983030856e-01    6.2658534864e-01    6.5301880081e-01    6.7953843171e-01    
+7.0594870274e-01    7.3202250694e-01    7.5785712159e-01    7.8356429372e-01    8.0889371495e-01    
+8.3382421734e-01    8.5892866893e-01    8.8362148104e-01    9.0788078652e-01    9.3239184520e-01    
+9.5681655119e-01    9.8078554916e-01    1.0045753913e+00    1.0284839948e+00    1.0518978274e+00    
+1.0747923017e+00    1.0983422076e+00    1.1213575213e+00    1.1438118766e+00    1.1668425879e+00    
+1.1898749819e+00    1.2123051306e+00    1.2347043593e+00    1.2576657226e+00    1.2799682380e+00    
+1.3015801888e+00    1.3248584580e+00    1.3474121793e+00    1.3692058310e+00    1.3920012392e+00    
+1.4148823543e+00    1.4369149975e+00    1.4580599250e+00    1.4782784348e+00    1.4975324101e+00    
+1.5157843616e+00    0.0000000000e+00    2.9520522852e-02    5.9020813813e-02    8.8480654855e-02    
+1.1791912426e-01    1.4732085565e-01    1.7665087026e-01    2.0590607158e-01    2.3509305223e-01    
+2.6416219809e-01    2.9309333092e-01    3.2202638323e-01    3.5080945272e-01    3.7942224034e-01    
+4.0791183086e-01    4.3623583762e-01    4.6434263932e-01    4.9229292477e-01    5.2016513136e-01    
+5.4778598912e-01    5.7513512964e-01    6.0233951744e-01    6.2924428801e-01    6.5582914756e-01    
+6.8251557772e-01    7.0910217062e-01    7.3535491675e-01    7.6137470694e-01    7.8727736173e-01    
+8.1280488860e-01    8.3793586025e-01    8.6326214978e-01    8.8817957393e-01    9.1266595122e-01    
+9.3742916016e-01    9.6212049650e-01    9.8635898074e-01    1.0104304868e+00    1.0346429344e+00    
+1.0583632073e+00    1.0815662308e+00    1.1054652116e+00    1.1288317969e+00    1.1516390363e+00    
+1.1750614043e+00    1.1985058249e+00    1.2213490040e+00    1.2441810205e+00    1.2676143738e+00    
+1.2903886506e+00    1.3124712778e+00    1.3362957711e+00    1.3593938302e+00    1.3817289093e+00    
+1.4051201147e+00    1.4286217719e+00    1.4512694741e+00    1.4730227725e+00    1.4938417627e+00    
+1.5136871290e+00    1.5325201888e+00    0.0000000000e+00    2.9625603349e-02    5.9230902789e-02    
+8.8795608326e-02    1.1833996049e-01    1.4784867148e-01    1.7728622319e-01    2.0664997985e-01    
+2.3594729697e-01    2.6512755422e-01    2.9417048919e-01    3.2322097864e-01    3.5212288905e-01    
+3.8085582193e-01    4.0946887575e-01    4.3791886076e-01    4.6615305706e-01    4.9423457885e-01    
+5.2224484068e-01    5.5000563285e-01    5.7749644583e-01    6.0484872632e-01    6.3190322738e-01    
+6.5863949431e-01    6.8549272373e-01    7.1225563851e-01    7.3868732655e-01    7.6489229230e-01    
+7.9099042975e-01    8.1671606225e-01    8.4204750316e-01    8.6759563062e-01    8.9273766682e-01    
+9.1745111592e-01    9.4246647512e-01    9.6742444182e-01    9.9193241232e-01    1.0162855823e+00    
+1.0408018739e+00    1.0648285871e+00    1.0883401600e+00    1.1125882156e+00    1.1363060725e+00    
+1.1594661960e+00    1.1832802208e+00    1.2071366680e+00    1.2303928774e+00    1.2536576818e+00    
+1.2775630249e+00    1.3008090632e+00    1.3233623668e+00    1.3477330842e+00    1.3713754812e+00    
+1.3942519876e+00    1.4182389901e+00    1.4423611894e+00    1.4656239506e+00    1.4879856199e+00    
+1.5094050905e+00    1.5298418480e+00    1.5492560160e+00    0.0000000000e+00    2.9730683845e-02    
+5.9440991764e-02    8.9110561797e-02    1.1876079672e-01    1.4837648731e-01    1.7792157612e-01    
+2.0739388811e-01    2.3680154170e-01    2.6609291035e-01    2.9524764746e-01    3.2441557404e-01    
+3.5343632537e-01    3.8228940351e-01    4.1102592064e-01    4.3960188390e-01    4.6796347481e-01    
+4.9617623293e-01    5.2432455000e-01    5.5222527658e-01    5.7985776203e-01    6.0735793521e-01    
+6.3456216674e-01    6.6144984105e-01    6.8846986975e-01    7.1540910639e-01    7.4201973636e-01    
+7.6840987765e-01    7.9470349777e-01    8.2062723590e-01    8.4615914607e-01    8.7192911146e-01    
+8.9729575971e-01    9.2223628062e-01    9.4750379009e-01    9.7272838714e-01    9.9750584390e-01    
+1.0221406777e+00    1.0469608135e+00    1.0712939670e+00    1.0951140892e+00    1.1197112195e+00    
+1.1437803481e+00    1.1672933556e+00    1.1914990373e+00    1.2157675110e+00    1.2394367509e+00    
+1.2631343431e+00    1.2875116761e+00    1.3112294757e+00    1.3342534559e+00    1.3591703974e+00    
+1.3833571321e+00    1.4067750660e+00    1.4313578656e+00    1.4561006070e+00    1.4799784271e+00    
+1.5029484673e+00    1.5249684183e+00    1.5459965669e+00    1.5659918432e+00    0.0000000000e+00    
+2.9835764341e-02    5.9651080740e-02    8.9425515268e-02    1.1918163295e-01    1.4890430314e-01    
+1.7855692906e-01    2.0813779637e-01    2.3765578644e-01    2.6705826648e-01    2.9632480573e-01    
+3.2561016945e-01    3.5474976170e-01    3.8372298509e-01    4.1258296552e-01    4.4128490704e-01    
+4.6977389255e-01    4.9811788700e-01    5.2640425932e-01    5.5444492031e-01    5.8221907822e-01    
+6.0986714409e-01    6.3722110611e-01    6.6426018780e-01    6.9144701576e-01    7.1856257427e-01    
+7.4535214616e-01    7.7192746301e-01    7.9841656578e-01    8.2453840955e-01    8.5027078898e-01    
+8.7626259231e-01    9.0185385261e-01    9.2702144531e-01    9.5254110505e-01    9.7803233246e-01    
+1.0030792755e+00    1.0279957732e+00    1.0531197530e+00    1.0777593468e+00    1.1018880183e+00    
+1.1268342235e+00    1.1512546238e+00    1.1751205153e+00    1.1997178537e+00    1.2243983541e+00    
+1.2484806243e+00    1.2726110044e+00    1.2974603273e+00    1.3216498883e+00    1.3451445449e+00    
+1.3706077105e+00    1.3953387830e+00    1.4192981443e+00    1.4444767411e+00    1.4698400245e+00    
+1.4943329036e+00    1.5179113148e+00    1.5405317461e+00    1.5621512858e+00    1.5827276704e+00    
+0.0000000000e+00    2.9940844838e-02    5.9861169716e-02    8.9740468739e-02    1.1960246918e-01    
+1.4943211897e-01    1.7919228199e-01    2.0888170464e-01    2.3851003117e-01    2.6802362261e-01    
+2.9740196400e-01    3.2680476486e-01    3.5606319803e-01    3.8515656668e-01    4.1414001041e-01    
+4.4296793018e-01    4.7158431030e-01    5.0005954108e-01    5.2848396864e-01    5.5666456403e-01    
+5.8458039442e-01    6.1237635297e-01    6.3988004548e-01    6.6707053454e-01    6.9442416177e-01    
+7.2171604215e-01    7.4868455597e-01    7.7544504836e-01    8.0212963380e-01    8.2844958320e-01    
+8.5438243189e-01    8.8059607315e-01    9.0641194550e-01    9.3180661001e-01    9.5757842002e-01    
+9.8333627778e-01    1.0086527071e+00    1.0338508686e+00    1.0592786926e+00    1.0842247267e+00    
+1.1086619475e+00    1.1339572275e+00    1.1587288994e+00    1.1829476750e+00    1.2079366702e+00    
+1.2330291971e+00    1.2575244977e+00    1.2820876657e+00    1.3074089784e+00    1.3320703009e+00    
+1.3560356339e+00    1.3820450236e+00    1.4073204340e+00    1.4318212226e+00    1.4575956165e+00    
+1.4835794421e+00    1.5086873802e+00    1.5328741622e+00    1.5560950740e+00    1.5783060047e+00    
+1.5994634976e+00    0.0000000000e+00    3.0045925334e-02    6.0071258692e-02    9.0055422210e-02    
+1.2002330541e-01    1.4995993480e-01    1.7982763493e-01    2.0962561290e-01    2.3936427591e-01    
+2.6898897875e-01    2.9847912227e-01    3.2799936027e-01    3.5737663435e-01    3.8659014826e-01    
+4.1569705529e-01    4.4465095332e-01    4.7339472804e-01    5.0200119516e-01    5.3056367796e-01    
+5.5888420776e-01    5.8694171061e-01    6.1488556185e-01    6.4253898485e-01    6.6988088129e-01    
+6.9740130778e-01    7.2486951004e-01    7.5201696578e-01    7.7896263372e-01    8.0584270182e-01    
+8.3236075685e-01    8.5849407480e-01    8.8492955400e-01    9.1097003839e-01    9.3659177471e-01    
+9.6261573498e-01    9.8864022310e-01    1.0142261386e+00    1.0397059641e+00    1.0654376322e+00    
+1.0906901065e+00    1.1154358766e+00    1.1410802314e+00    1.1662031750e+00    1.1907748347e+00    
+1.2161554866e+00    1.2416600402e+00    1.2665683711e+00    1.2915643270e+00    1.3173576296e+00    
+1.3424907135e+00    1.3669267230e+00    1.3934823368e+00    1.4193020849e+00    1.4443443009e+00    
+1.4707144920e+00    1.4973188597e+00    1.5230418567e+00    1.5478370097e+00    1.5716584018e+00    
+1.5944607237e+00    1.6161993248e+00    0.0000000000e+00    3.0151005831e-02    6.0281347668e-02    
+9.0370375681e-02    1.2044414164e-01    1.5048775063e-01    1.8046298786e-01    2.1036952116e-01    
+2.4021852064e-01    2.6995433488e-01    2.9955628054e-01    3.2919395568e-01    3.5869007068e-01    
+3.8802372985e-01    4.1725410018e-01    4.4633397646e-01    4.7520514578e-01    5.0394284924e-01    
+5.3264338728e-01    5.6110385149e-01    5.8930302681e-01    6.1739477074e-01    6.4519792421e-01    
+6.7269122803e-01    7.0037845379e-01    7.2802297792e-01    7.5534937558e-01    7.8248021907e-01    
+8.0955576984e-01    8.3627193050e-01    8.6260571771e-01    8.8926303484e-01    9.1552813128e-01    
+9.4137693940e-01    9.6765304994e-01    9.9394416842e-01    1.0197995702e+00    1.0455610596e+00    
+1.0715965717e+00    1.0971554864e+00    1.1222098058e+00    1.1482032354e+00    1.1736774506e+00    
+1.1986019944e+00    1.2243743031e+00    1.2502908832e+00    1.2756122446e+00    1.3010409883e+00    
+1.3273062808e+00    1.3529111261e+00    1.3778178120e+00    1.4049196499e+00    1.4312837358e+00    
+1.4568673793e+00    1.4838333674e+00    1.5110582772e+00    1.5373963332e+00    1.5627998571e+00    
+1.5872217296e+00    1.6106154426e+00    1.6329351520e+00    0.0000000000e+00    3.0256086327e-02    
+6.0491436644e-02    9.0685329152e-02    1.2086497787e-01    1.5101556646e-01    1.8109834079e-01    
+2.1111342943e-01    2.4107276538e-01    2.7091969101e-01    3.0063343881e-01    3.3038855108e-01    
+3.6000350701e-01    3.8945731143e-01    4.1881114506e-01    4.4801699960e-01    4.7701556353e-01    
+5.0588450332e-01    5.3472309660e-01    5.6332349522e-01    5.9166434300e-01    6.1990397962e-01    
+6.4785686358e-01    6.7550157478e-01    7.0335559981e-01    7.3117644580e-01    7.5868178539e-01    
+7.8599780442e-01    8.1326883785e-01    8.4018310415e-01    8.6671736062e-01    8.9359651569e-01    
+9.2008622417e-01    9.4616210410e-01    9.7269036491e-01    9.9924811374e-01    1.0253730018e+00    
+1.0514161550e+00    1.0777555113e+00    1.1036208662e+00    1.1289837350e+00    1.1553262394e+00    
+1.1811517263e+00    1.2064291541e+00    1.2325931196e+00    1.2589217263e+00    1.2846561180e+00    
+1.3105176495e+00    1.3372549320e+00    1.3633315387e+00    1.3887089011e+00    1.4163569630e+00    
+1.4432653868e+00    1.4693904576e+00    1.4969522429e+00    1.5247976948e+00    1.5517508097e+00    
+1.5777627046e+00    1.6027850574e+00    1.6267701615e+00    1.6496709792e+00    0.0000000000e+00    
+3.0361166823e-02    6.0701525620e-02    9.1000282623e-02    1.2128581410e-01    1.5154338228e-01    
+1.8173369373e-01    2.1185733769e-01    2.4192701011e-01    2.7188504714e-01    3.0171059708e-01    
+3.3158314649e-01    3.6131694334e-01    3.9089089301e-01    4.2036818995e-01    4.4970002274e-01    
+4.7882598127e-01    5.0782615740e-01    5.3680280592e-01    5.6554313895e-01    5.9402565920e-01    
+6.2241318850e-01    6.5051580295e-01    6.7831192152e-01    7.0633274582e-01    7.3432991368e-01    
+7.6201419519e-01    7.8951538978e-01    8.1698190587e-01    8.4409427780e-01    8.7082900353e-01    
+8.9792999653e-01    9.2464431706e-01    9.5094726880e-01    9.7772767987e-01    1.0045520591e+00    
+1.0309464334e+00    1.0572712505e+00    1.0839144509e+00    1.1100862461e+00    1.1357576641e+00    
+1.1624492433e+00    1.1886260019e+00    1.2142563138e+00    1.2408119360e+00    1.2675525693e+00    
+1.2936999914e+00    1.3199943108e+00    1.3472035831e+00    1.3737519513e+00    1.3995999901e+00    
+1.4277942762e+00    1.4552470377e+00    1.4819135359e+00    1.5100711184e+00    1.5385371123e+00    
+1.5661052862e+00    1.5927255520e+00    1.6183483852e+00    1.6429248805e+00    1.6664068064e+00    
+0.0000000000e+00    3.0466247320e-02    6.0911614596e-02    9.1315236093e-02    1.2170665033e-01    
+1.5207119811e-01    1.8236904666e-01    2.1260124595e-01    2.4278125485e-01    2.7285040327e-01    
+3.0278775534e-01    3.3277774190e-01    3.6263037966e-01    3.9232447460e-01    4.2192523483e-01    
+4.5138304588e-01    4.8063639901e-01    5.0976781148e-01    5.3888251524e-01    5.6776278268e-01    
+5.9638697539e-01    6.2492239738e-01    6.5317474231e-01    6.8112226827e-01    7.0930989183e-01    
+7.3748338157e-01    7.6534660500e-01    7.9303297513e-01    8.2069497389e-01    8.4800545146e-01    
+8.7494064644e-01    9.0226347738e-01    9.2920240996e-01    9.5573243350e-01    9.8276499484e-01    
+1.0098560044e+00    1.0365198650e+00    1.0631263459e+00    1.0900733904e+00    1.1165516259e+00    
+1.1425315933e+00    1.1695722473e+00    1.1961002775e+00    1.2220834735e+00    1.2490307525e+00    
+1.2761834124e+00    1.3027438649e+00    1.3294709721e+00    1.3571522343e+00    1.3841723638e+00    
+1.4104910791e+00    1.4392315893e+00    1.4672286886e+00    1.4944366143e+00    1.5231899938e+00    
+1.5522765299e+00    1.5804597628e+00    1.6076883995e+00    1.6339117131e+00    1.6590795994e+00    
+1.6831426336e+00    0.0000000000e+00    3.0571327816e-02    6.1121703572e-02    9.1630189564e-02    
+1.2212748656e-01    1.5259901394e-01    1.8300439959e-01    2.1334515422e-01    2.4363549958e-01    
+2.7381575941e-01    3.0386491361e-01    3.3397233731e-01    3.6394381599e-01    3.9375805618e-01    
+4.2348227972e-01    4.5306606902e-01    4.8244681676e-01    5.1170946555e-01    5.4096222455e-01    
+5.6998242641e-01    5.9874829159e-01    6.2743160627e-01    6.5583368168e-01    6.8393261502e-01    
+7.1228703784e-01    7.4063684945e-01    7.6867901480e-01    7.9655056049e-01    8.2440804190e-01    
+8.5191662511e-01    8.7905228935e-01    9.0659695822e-01    9.3376050285e-01    9.6051759819e-01    
+9.8780230980e-01    1.0151599497e+00    1.0420932966e+00    1.0689814414e+00    1.0962323300e+00    
+1.1230170058e+00    1.1493055224e+00    1.1766952513e+00    1.2035745531e+00    1.2299106331e+00    
+1.2572495689e+00    1.2848142555e+00    1.3117877383e+00    1.3389476334e+00    1.3671008855e+00    
+1.3945927764e+00    1.4213821682e+00    1.4506689024e+00    1.4792103396e+00    1.5069596926e+00    
+1.5363088693e+00    1.5660159474e+00    1.5948142393e+00    1.6226512469e+00    1.6494750409e+00    
+1.6752343183e+00    1.6998784607e+00    0.0000000000e+00    3.0676408313e-02    6.1331792547e-02    
+9.1945143035e-02    1.2254832279e-01    1.5312682977e-01    1.8363975253e-01    2.1408906248e-01    
+2.4448974432e-01    2.7478111554e-01    3.0494207188e-01    3.3516693272e-01    3.6525725232e-01    
+3.9519163776e-01    4.2503932460e-01    4.5474909216e-01    4.8425723450e-01    5.1365111963e-01    
+5.4304193387e-01    5.7220207014e-01    6.0110960778e-01    6.2994081515e-01    6.5849262105e-01    
+6.8674296176e-01    7.1526418385e-01    7.4379031733e-01    7.7201142461e-01    8.0006814584e-01    
+8.2812110992e-01    8.5582779876e-01    8.8316393227e-01    9.1093043907e-01    9.3831859574e-01    
+9.6530276289e-01    9.9283962476e-01    1.0204638950e+00    1.0476667281e+00    1.0748365369e+00    
+1.1023912695e+00    1.1294823856e+00    1.1560794516e+00    1.1838182552e+00    1.2110488288e+00    
+1.2377377928e+00    1.2654683854e+00    1.2934450985e+00    1.3208316117e+00    1.3484242947e+00    
+1.3770495366e+00    1.4050131890e+00    1.4322732572e+00    1.4621062155e+00    1.4911919905e+00    
+1.5194827709e+00    1.5494277447e+00    1.5797553650e+00    1.6091687158e+00    1.6376140944e+00    
+1.6650383687e+00    1.6913890372e+00    1.7166142879e+00    0.0000000000e+00    3.0781488809e-02    
+6.1541881523e-02    9.2260096506e-02    1.2296915902e-01    1.5365464560e-01    1.8427510546e-01    
+2.1483297074e-01    2.4534398905e-01    2.7574647167e-01    3.0601923015e-01    3.3636152812e-01    
+3.6657068864e-01    3.9662521935e-01    4.2659636949e-01    4.5643211530e-01    4.8606765224e-01    
+5.1559277371e-01    5.4512164319e-01    5.7442171386e-01    6.0347092398e-01    6.3245002403e-01    
+6.6115156042e-01    6.8955330851e-01    7.1824132987e-01    7.4694378521e-01    7.7534383441e-01    
+8.0358573120e-01    8.3183417794e-01    8.5973897241e-01    8.8727557518e-01    9.1526391991e-01    
+9.4287668863e-01    9.7008792759e-01    9.9787693973e-01    1.0257678403e+00    1.0532401597e+00    
+1.0806916323e+00    1.1085502091e+00    1.1359477654e+00    1.1628533808e+00    1.1909412592e+00    
+1.2185231044e+00    1.2455649525e+00    1.2736872018e+00    1.3020759416e+00    1.3298754851e+00    
+1.3579009560e+00    1.3869981878e+00    1.4154336016e+00    1.4431643463e+00    1.4735435287e+00    
+1.5031736414e+00    1.5320058492e+00    1.5625466202e+00    1.5934947825e+00    1.6235231923e+00    
+1.6525769418e+00    1.6806016965e+00    1.7075437562e+00    1.7333501151e+00    0.0000000000e+00    
+3.0886569306e-02    6.1751970499e-02    9.2575049977e-02    1.2338999525e-01    1.5418246143e-01    
+1.8491045840e-01    2.1557687901e-01    2.4619823379e-01    2.7671182780e-01    3.0709638842e-01    
+3.3755612353e-01    3.6788412497e-01    3.9805880093e-01    4.2815341437e-01    4.5811513844e-01    
+4.8787806999e-01    5.1753442779e-01    5.4720135251e-01    5.7664135759e-01    6.0583224017e-01    
+6.3495923291e-01    6.6381049978e-01    6.9236365525e-01    7.2121847588e-01    7.5009725310e-01    
+7.7867624422e-01    8.0710331655e-01    8.3554724596e-01    8.6365014606e-01    8.9138721809e-01    
+9.1959740076e-01    9.4743478152e-01    9.7487309228e-01    1.0029142547e+00    1.0310717856e+00    
+1.0588135913e+00    1.0865467278e+00    1.1147091487e+00    1.1424131453e+00    1.1696273099e+00    
+1.1980642632e+00    1.2259973800e+00    1.2533921122e+00    1.2819060183e+00    1.3107067846e+00    
+1.3389193586e+00    1.3673776173e+00    1.3969468390e+00    1.4258540142e+00    1.4540554353e+00    
+1.4849808418e+00    1.5151552923e+00    1.5445289276e+00    1.5756654957e+00    1.6072342001e+00    
+1.6378776689e+00    1.6675397893e+00    1.6961650244e+00    1.7236984751e+00    1.7500859423e+00    
+0.0000000000e+00    3.0991649802e-02    6.1962059475e-02    9.2890003448e-02    1.2381083148e-01    
+1.5471027726e-01    1.8554581133e-01    2.1632078727e-01    2.4705247852e-01    2.7767718393e-01    
+3.0817354669e-01    3.3875071894e-01    3.6919756130e-01    3.9949238252e-01    4.2971045926e-01    
+4.5979816158e-01    4.8968848773e-01    5.1947608187e-01    5.4928106183e-01    5.7886100132e-01    
+6.0819355637e-01    6.3746844180e-01    6.6646943915e-01    6.9517400200e-01    7.2419562189e-01    
+7.5325072098e-01    7.8200865402e-01    8.1062090190e-01    8.3926031397e-01    8.6756131971e-01    
+8.9549886100e-01    9.2393088160e-01    9.5199287442e-01    9.7965825698e-01    1.0079515697e+00    
+1.0363757310e+00    1.0643870229e+00    1.0924018232e+00    1.1208680882e+00    1.1488785251e+00    
+1.1764012391e+00    1.2051872671e+00    1.2334716556e+00    1.2612192719e+00    1.2901248348e+00    
+1.3193376277e+00    1.3479632320e+00    1.3768542785e+00    1.4068954902e+00    1.4362744268e+00    
+1.4649465243e+00    1.4964181549e+00    1.5271369433e+00    1.5570520059e+00    1.5887843711e+00    
+1.6209736176e+00    1.6522321454e+00    1.6825026367e+00    1.7117283522e+00    1.7398531940e+00    
+1.7668217695e+00    0.0000000000e+00    3.1096730298e-02    6.2172148451e-02    9.3204956919e-02    
+1.2423166771e-01    1.5523809309e-01    1.8618116426e-01    2.1706469553e-01    2.4790672326e-01    
+2.7864254007e-01    3.0925070496e-01    3.3994531435e-01    3.7051099763e-01    4.0092596410e-01    
+4.3126750414e-01    4.6148118472e-01    4.9149890547e-01    5.2141773595e-01    5.5136077115e-01    
+5.8108064505e-01    6.1055487256e-01    6.3997765068e-01    6.6912837852e-01    6.9798434874e-01    
+7.2717276790e-01    7.5640418886e-01    7.8534106383e-01    8.1413848726e-01    8.4297338199e-01    
+8.7147249336e-01    8.9961050391e-01    9.2826436245e-01    9.5655096731e-01    9.8444342168e-01    
+1.0129888846e+00    1.0416796763e+00    1.0699604545e+00    1.0982569187e+00    1.1270270278e+00    
+1.1553439050e+00    1.1831751682e+00    1.2123102711e+00    1.2409459312e+00    1.2690464316e+00    
+1.2983436512e+00    1.3279684707e+00    1.3570071054e+00    1.3863309398e+00    1.4168441413e+00    
+1.4466948393e+00    1.4758376134e+00    1.5078554681e+00    1.5391185942e+00    1.5695750842e+00    
+1.6019032466e+00    1.6347130352e+00    1.6665866219e+00    1.6974654842e+00    1.7272916800e+00    
+1.7560079129e+00    1.7835575967e+00    0.0000000000e+00    3.1201810795e-02    6.2382237427e-02    
+9.3519910390e-02    1.2465250394e-01    1.5576590892e-01    1.8681651720e-01    2.1780860380e-01    
+2.4876096799e-01    2.7960789620e-01    3.1032786323e-01    3.4113990976e-01    3.7182443395e-01    
+4.0235954568e-01    4.3282454903e-01    4.6316420786e-01    4.9330932322e-01    5.2335939003e-01    
+5.5344048047e-01    5.8330028878e-01    6.1291618875e-01    6.4248685956e-01    6.7178731788e-01    
+7.0079469549e-01    7.3014991391e-01    7.5955765675e-01    7.8867347363e-01    8.1765607261e-01    
+8.4668645001e-01    8.7538366701e-01    9.0372214682e-01    9.3259784329e-01    9.6110906020e-01    
+9.8922858638e-01    1.0180261996e+00    1.0469836216e+00    1.0755338860e+00    1.1041120142e+00    
+1.1331859674e+00    1.1618092848e+00    1.1899490974e+00    1.2194332751e+00    1.2484202069e+00    
+1.2768735913e+00    1.3065624677e+00    1.3365993138e+00    1.3660509788e+00    1.3958076011e+00    
+1.4267927925e+00    1.4571152519e+00    1.4867287024e+00    1.5192927812e+00    1.5511002451e+00    
+1.5820981625e+00    1.6150221220e+00    1.6484524527e+00    1.6809410984e+00    1.7124283316e+00    
+1.7428550078e+00    1.7721626319e+00    1.8002934239e+00    0.0000000000e+00    3.1306891291e-02    
+6.2592326403e-02    9.3834863860e-02    1.2507334017e-01    1.5629372475e-01    1.8745187013e-01    
+2.1855251206e-01    2.4961521273e-01    2.8057325233e-01    3.1140502150e-01    3.4233450516e-01    
+3.7313787028e-01    4.0379312727e-01    4.3438159392e-01    4.6484723100e-01    4.9511974096e-01    
+5.2530104410e-01    5.5552018979e-01    5.8551993251e-01    6.1527750495e-01    6.4499606844e-01    
+6.7444625725e-01    7.0360504224e-01    7.3312705993e-01    7.6271112463e-01    7.9200588344e-01    
+8.2117365797e-01    8.5039951802e-01    8.7929484066e-01    9.0783378973e-01    9.3693132414e-01    
+9.6566715309e-01    9.9401375107e-01    1.0230635145e+00    1.0522875669e+00    1.0811073176e+00    
+1.1099671096e+00    1.1393449069e+00    1.1682746647e+00    1.1967230266e+00    1.2265562790e+00    
+1.2558944825e+00    1.2847007509e+00    1.3147812841e+00    1.3452301568e+00    1.3750948523e+00    
+1.4052842624e+00    1.4367414437e+00    1.4675356645e+00    1.4976197915e+00    1.5307300943e+00    
+1.5630818961e+00    1.5946212409e+00    1.6281409975e+00    1.6621918703e+00    1.6952955750e+00    
+1.7273911791e+00    1.7584183356e+00    1.7883173508e+00    1.8170292511e+00    0.0000000000e+00    
+3.1411971788e-02    6.2802415379e-02    9.4149817331e-02    1.2549417640e-01    1.5682154058e-01    
+1.8808722306e-01    2.1929642033e-01    2.5046945746e-01    2.8153860846e-01    3.1248217976e-01    
+3.4352910057e-01    3.7445130661e-01    4.0522670885e-01    4.3593863880e-01    4.6653025414e-01    
+4.9693015870e-01    5.2724269818e-01    5.5759989911e-01    5.8773957624e-01    6.1763882114e-01    
+6.4750527733e-01    6.7710519662e-01    7.0641538898e-01    7.3610420594e-01    7.6586459251e-01    
+7.9533829324e-01    8.2469124332e-01    8.5411258604e-01    8.8320601431e-01    9.1194543264e-01    
+9.4126480498e-01    9.7022524598e-01    9.9879891577e-01    1.0281008295e+00    1.0575915122e+00    
+1.0866807492e+00    1.1158222051e+00    1.1455038465e+00    1.1747400445e+00    1.2034969557e+00    
+1.2336792830e+00    1.2633687581e+00    1.2925279106e+00    1.3230001006e+00    1.3538609999e+00    
+1.3841387257e+00    1.4147609237e+00    1.4466900948e+00    1.4779560771e+00    1.5085108805e+00    
+1.5421674075e+00    1.5750635470e+00    1.6071443192e+00    1.6412598730e+00    1.6759312878e+00    
+1.7096500515e+00    1.7423540265e+00    1.7739816635e+00    1.8044720697e+00    1.8337650783e+00    
+0.0000000000e+00    3.1517052284e-02    6.3012504355e-02    9.4464770802e-02    1.2591501263e-01    
+1.5734935640e-01    1.8872257600e-01    2.2004032859e-01    2.5132370220e-01    2.8250396459e-01    
+3.1355933803e-01    3.4472369598e-01    3.7576474293e-01    4.0666029043e-01    4.3749568369e-01    
+4.6821327728e-01    4.9874057645e-01    5.2918435226e-01    5.5967960843e-01    5.8995921996e-01    
+6.2000013734e-01    6.5001448621e-01    6.7976413599e-01    7.0922573573e-01    7.3908135195e-01    
+7.6901806039e-01    7.9867070305e-01    8.2820882868e-01    8.5782565406e-01    8.8711718796e-01    
+9.1605707555e-01    9.4559828582e-01    9.7478333887e-01    1.0035840805e+00    1.0331381445e+00    
+1.0628954576e+00    1.0922541808e+00    1.1216773006e+00    1.1516627861e+00    1.1812054244e+00    
+1.2102708849e+00    1.2408022870e+00    1.2708430337e+00    1.3003550703e+00    1.3312189171e+00    
+1.3624918429e+00    1.3931825991e+00    1.4242375850e+00    1.4566387460e+00    1.4883764897e+00    
+1.5194019695e+00    1.5536047206e+00    1.5870451979e+00    1.6196673975e+00    1.6543787484e+00    
+1.6896707054e+00    1.7240045280e+00    1.7573168740e+00    1.7895449913e+00    1.8206267887e+00    
+1.8505009055e+00    
+0.0000000000e+00    -1.6028228611e-18   -3.2045472274e-18   -4.8040753572e-18   -6.4003110136e-18   
+-7.9921602166e-18   -9.5785319923e-18   -1.1158339120e-17   -1.2730498880e-17   -1.4293933792e-17   
+-1.5847572356e-17   -1.7390349785e-17   -1.8921208738e-17   -2.0439100038e-17   -2.1942983401e-17   
+-2.3431828139e-17   -2.4904613872e-17   -2.6360331227e-17   -2.7797982528e-17   -2.9216582480e-17   
+-3.0615158846e-17   -3.1992753111e-17   -3.3348421141e-17   -3.4681233829e-17   -3.5990277732e-17   
+-3.7274655696e-17   -3.8533487473e-17   -3.9765910323e-17   -4.0971079604e-17   -4.2148169354e-17   
+-4.3296372854e-17   -4.4414903182e-17   -4.5502993754e-17   -4.6559898848e-17   -4.7584894112e-17   
+-4.8577277067e-17   -4.9536367583e-17   -5.0461508347e-17   -5.1352065313e-17   -5.2207428140e-17   
+-5.3027010602e-17   -5.3810251001e-17   -5.4556612541e-17   -5.5265583704e-17   -5.5936678597e-17   
+-5.6569437284e-17   -5.7163426105e-17   -5.7718237968e-17   -5.8233492635e-17   -5.8708836974e-17   
+-5.9143945210e-17   -5.9538519139e-17   -5.9892288342e-17   -6.0205010361e-17   -6.0476470874e-17   
+-6.0706483835e-17   -6.0894891604e-17   -6.1041565056e-17   -6.1146403669e-17   -6.1209335591e-17   
+-6.1230317691e-17   0.0000000000e+00    -1.6029831434e-18   -3.2048676821e-18   -4.8045557647e-18   
+-6.4009529272e-18   -7.9929653092e-18   -9.5795011143e-18   -1.1159473825e-17   -1.2731801884e-17   
+-1.4295406278e-17   -1.5849215376e-17   -1.7392171936e-17   -1.8923212160e-17   -2.0441286721e-17   
+-2.1945358406e-17   -2.3434395302e-17   -2.4907375354e-17   -2.6363292888e-17   -2.7801154768e-17   
+-2.9219968166e-17   -3.0618760629e-17   -3.1996580479e-17   -3.3352476897e-17   -3.4685520531e-17   
+-3.5994818858e-17   -3.7279465771e-17   -3.8538570493e-17   -3.9771275797e-17   -4.0976743253e-17   
+-4.2154135179e-17   -4.3302644460e-17   -4.4421513164e-17   -4.5509946344e-17   -4.6567197796e-17   
+-4.7592577673e-17   -4.8585367327e-17   -4.9544868898e-17   -5.0470439291e-17   -5.1361459720e-17   
+-5.2217289968e-17   -5.3037343070e-17   -5.3821115922e-17   -5.4568013267e-17   -5.5277522695e-17   
+-5.5949214993e-17   -5.6582602156e-17   -5.7177220983e-17   -5.7732692991e-17   -5.8248667597e-17   
+-5.8724731528e-17   -5.9160557699e-17   -5.9555964800e-17   -5.9910564297e-17   -6.0224112171e-17   
+-6.0496481470e-17   -6.0727440962e-17   -6.0916786898e-17   -6.1064388315e-17   -6.1170142858e-17   
+-6.1233976845e-17   -6.1255845327e-17   0.0000000000e+00    -1.6031593424e-18   -3.2052199595e-18   
+-4.8050838789e-18   -6.4016585857e-18   -7.9938503512e-18   -9.5805664745e-18   -1.1160721211e-17   
+-1.2733234283e-17   -1.4297024988e-17   -1.5851021556e-17   -1.7394175034e-17   -1.8925414530e-17   
+-2.0443690552e-17   -2.1947969260e-17   -2.3437217397e-17   -2.4910411064e-17   -2.6366548654e-17   
+-2.7804642026e-17   -2.9223690066e-17   -3.0622720085e-17   -3.2000787922e-17   -3.3356935409e-17   
+-3.4690232923e-17   -3.5999810938e-17   -3.7284753508e-17   -3.8544158280e-17   -3.9777174086e-17   
+-4.0982969328e-17   -4.2160693438e-17   -4.3309538866e-17   -4.4428779548e-17   -4.5517589357e-17   
+-4.6575221564e-17   -4.7601024246e-17   -4.8594260986e-17   -4.9554214432e-17   -5.0480257119e-17   
+-5.1371787034e-17   -5.2228131122e-17   -5.3048701599e-17   -5.3833059780e-17   -5.4580546138e-17   
+-5.5290647281e-17   -5.5962996310e-17   -5.6597074359e-17   -5.7192385756e-17   -5.7748583463e-17   
+-5.8265349502e-17   -5.8742204483e-17   -5.9178819885e-17   -5.9575142894e-17   -5.9930655137e-17   
+-6.0245110877e-17   -6.0518479210e-17   -6.0750479226e-17   -6.0940856494e-17   -6.1089478028e-17   
+-6.1196239456e-17   -6.1261065089e-17   -6.1283907973e-17   0.0000000000e+00    -1.6033530388e-18   
+-3.2056072196e-18   -4.8056644372e-18   -6.4024343192e-18   -7.9948232818e-18   -9.5817376298e-18   
+-1.1162092468e-17   -1.2734808924e-17   -1.4298804443e-17   -1.5853007098e-17   -1.7396377049e-17   
+-1.8927835607e-17   -2.0446333094e-17   -2.1950839384e-17   -2.3440319738e-17   -2.4913748233e-17   
+-2.6370127734e-17   -2.7808475584e-17   -2.9227781568e-17   -3.0627072734e-17   -3.2005413183e-17   
+-3.3361836670e-17   -3.4695413276e-17   -3.6005298755e-17   -3.7290566342e-17   -3.8550300960e-17   
+-3.9783658103e-17   -4.0989813681e-17   -4.2167902961e-17   -4.3317117917e-17   -4.4436767517e-17   
+-4.5525991356e-17   -4.6584042128e-17   -4.7610309602e-17   -4.8604037826e-17   -4.9564488019e-17   
+-5.0491049903e-17   -5.1383139898e-17   -5.2240048851e-17   -5.3061188082e-17   -5.3846189718e-17   
+-5.4594323579e-17   -5.5305075199e-17   -5.5978146174e-17   -5.6612983718e-17   -5.7209056461e-17   
+-5.7766051931e-17   -5.8283687996e-17   -5.8761412582e-17   -5.9198895588e-17   -5.9596225461e-17   
+-5.9952741089e-17   -6.0268194851e-17   -6.0542661425e-17   -6.0775805296e-17   -6.0967316310e-17   
+-6.1117059264e-17   -6.1224927566e-17   -6.1290843319e-17   -6.1314757368e-17   0.0000000000e+00    
+-1.6035659702e-18   -3.2060329363e-18   -4.8063026477e-18   -6.4032870867e-18   -7.9958928289e-18   
+-9.5830250863e-18   -1.1163599897e-17   -1.2736539935e-17   -1.4300760606e-17   -1.5855189813e-17   
+-1.7398797735e-17   -1.8930497107e-17   -2.0449238052e-17   -2.1953994524e-17   -2.3443730155e-17   
+-2.4917416799e-17   -2.6374062232e-17   -2.7812689833e-17   -2.9232279374e-17   -3.0631857620e-17   
+-3.2010497754e-17   -3.3367224650e-17   -3.4701108062e-17   -3.6011331537e-17   -3.7296956416e-17   
+-3.8557053636e-17   -3.9790786012e-17   -4.0997337709e-17   -4.2175828423e-17   -4.3325449603e-17   
+-4.4445548727e-17   -4.5535227713e-17   -4.6593738614e-17   -4.7620517037e-17   -4.8614785551e-17   
+-4.9575781822e-17   -5.0502914458e-17   -5.1395620152e-17   -5.2253150065e-17   -5.3074914529e-17   
+-5.3860623518e-17   -5.4609469184e-17   -5.5320935875e-17   -5.5994800489e-17   -5.6630472950e-17   
+-5.7227382642e-17   -5.7785255098e-17   -5.8303847587e-17   -5.8782528132e-17   -5.9220964901e-17   
+-5.9619401622e-17   -5.9977020277e-17   -6.0293571168e-17   -6.0569245044e-17   -6.0803646359e-17   
+-6.0996403707e-17   -6.1147379442e-17   -6.1256464536e-17   -6.1323578662e-17   -6.1348670249e-17   
+0.0000000000e+00    -1.6038000466e-18   -3.2065009287e-18   -4.8070042353e-18   -6.4042245378e-18   
+-7.9970685869e-18   -9.5844403930e-18   -1.1165257021e-17   -1.2738442843e-17   -1.4302911025e-17   
+-1.5857589281e-17   -1.7401458805e-17   -1.8933422907e-17   -2.0452431486e-17   -2.1957462983e-17   
+-2.3447479243e-17   -2.4921449670e-17   -2.6378387444e-17   -2.7817322575e-17   -2.9237223833e-17   
+-3.0637117668e-17   -3.2016087246e-17   -3.3373147680e-17   -3.4707368366e-17   -3.6017963402e-17   
+-3.7303981054e-17   -3.8564476883e-17   -3.9798621754e-17   -4.1005608907e-17   -4.2184540920e-17   
+-4.3334608663e-17   -4.4455201951e-17   -4.5545381281e-17   -4.6604398006e-17   -4.7631738116e-17   
+-4.8626600573e-17   -4.9588197150e-17   -5.0515957218e-17   -5.1409339753e-17   -5.2267552289e-17   
+-5.3090004075e-17   -5.3876490660e-17   -5.4626118815e-17   -5.5338371588e-17   -5.6013108654e-17   
+-5.6649698941e-17   -5.7247528696e-17   -5.7806365227e-17   -5.8326009116e-17   -5.8805740553e-17   
+-5.9245225797e-17   -5.9644879282e-17   -6.0003710500e-17   -6.0321467469e-17   -6.0598468537e-17   
+-6.0834252167e-17   -6.1028379615e-17   -6.1180710551e-17   -6.1291133271e-17   -6.1359564774e-17   
+-6.1385950833e-17   0.0000000000e+00    -1.6040573678e-18   -3.2070153949e-18   -4.8077754938e-18   
+-6.4052550822e-18   -7.9983611030e-18   -9.5859962461e-18   -1.1167078704e-17   -1.2740534719e-17   
+-1.4305274990e-17   -1.5860227028e-17   -1.7404384132e-17   -1.8936639251e-17   -2.0455942043e-17   
+-2.1961275877e-17   -2.3451600633e-17   -2.4925883023e-17   -2.6383142169e-17   -2.7822415370e-17   
+-2.9242659300e-17   -3.0642900062e-17   -3.2022231800e-17   -3.3379658894e-17   -3.4714250347e-17   
+-3.6025253841e-17   -3.7311703270e-17   -3.8572637293e-17   -3.9807235622e-17   -4.1014701473e-17   
+-4.2194118607e-17   -4.3344677260e-17   -4.4465813785e-17   -4.5556543145e-17   -4.6616115923e-17   
+-4.7644073500e-17   -4.8639588882e-17   -4.9601845376e-17   -5.0530295184e-17   -5.1424421772e-17   
+-5.2283384720e-17   -5.3106592082e-17   -5.3893933481e-17   -5.4644421832e-17   -5.5357538747e-17   
+-5.6033234903e-17   -5.6670834161e-17   -5.7269675345e-17   -5.7829571688e-17   -5.8350371386e-17   
+-5.8831258074e-17   -5.9271895910e-17   -5.9672886990e-17   -6.0033051182e-17   -6.0352134000e-17   
+-6.0630594057e-17   -6.0867897271e-17   -6.1063530876e-17   -6.1217351592e-17   -6.1329244769e-17   
+-6.1399124472e-17   -6.1426933549e-17   0.0000000000e+00    -1.6043402423e-18   -3.2075809499e-18   
+-4.8086233417e-18   -6.4063879642e-18   -7.9997819718e-18   -9.5877066025e-18   -1.1169081289e-17   
+-1.2742834328e-17   -1.4307873708e-17   -1.5863126715e-17   -1.7407599957e-17   -1.8940174994e-17   
+-2.0459801213e-17   -2.1965467408e-17   -2.3456131295e-17   -2.4930756629e-17   -2.6388369060e-17   
+-2.7828013903e-17   -2.9248634533e-17   -3.0649256675e-17   -3.2028986537e-17   -3.3386816702e-17   
+-3.4721815740e-17   -3.6033268254e-17   -3.7320192338e-17   -3.8581608068e-17   -3.9816704886e-17   
+-4.1024696972e-17   -4.2204647402e-17   -4.3355745714e-17   -4.4477479422e-17   -4.5568813433e-17   
+-4.6628997484e-17   -4.7657633843e-17   -4.8653866988e-17   -4.9616848934e-17   -5.0546056975e-17   
+-5.1441001505e-17   -5.2300789383e-17   -5.3124827353e-17   -5.3913108455e-17   -5.4664542421e-17   
+-5.5378609293e-17   -5.6055359779e-17   -5.6694068205e-17   -5.7294021258e-17   -5.7855082656e-17   
+-5.8377152941e-17   -5.8859309600e-17   -5.9301214487e-17   -5.9703675991e-17   -6.0065305529e-17   
+-6.0385845857e-17   -6.0665909787e-17   -6.0904883487e-17   -6.1102172818e-17   -6.1257631255e-17   
+-6.1371140912e-17   -6.1442612627e-17   -6.1471986035e-17   0.0000000000e+00    -1.6046512074e-18   
+-3.2082026671e-18   -4.8095553849e-18   -6.4076333466e-18   -8.0013439394e-18   -9.5895868051e-18   
+-1.1171282740e-17   -1.2745362298e-17   -1.4310730490e-17   -1.5866314354e-17   -1.7411135128e-17   
+-1.8944061851e-17   -2.0464043617e-17   -2.1970075178e-17   -2.3461111872e-17   -2.4936114206e-17   
+-2.6394115005e-17   -2.7834168396e-17   -2.9255203134e-17   -3.0656244528e-17   -3.2036412049e-17   
+-3.3394685312e-17   -3.4730132411e-17   -3.6042078535e-17   -3.7329524408e-17   -3.8591469683e-17   
+-3.9827114491e-17   -4.1035685070e-17   -4.2216221755e-17   -4.3367913316e-17   -4.4490303510e-17   
+-4.5582302216e-17   -4.6643158242e-17   -4.7672540791e-17   -4.8669562976e-17   -4.9633342414e-17   
+-5.0563383983e-17   -5.1459227680e-17   -5.2319922409e-17   -5.3144873470e-17   -5.3934187590e-17   
+-5.4686661076e-17   -5.5401772239e-17   -5.6079681758e-17   -5.6719609495e-17   -5.7320784830e-17   
+-5.7883126979e-17   -5.8406594026e-17   -5.8890146771e-17   -5.9333444533e-17   -5.9737522480e-17   
+-6.0100762879e-17   -6.0422905455e-17   -6.0704732531e-17   -6.0945542603e-17   -6.1144652081e-17   
+-6.1301910872e-17   -6.1417197533e-17   -6.1490419355e-17   -6.1521512439e-17   0.0000000000e+00    
+-1.6049930528e-18   -3.2088861236e-18   -4.8105799841e-18   -6.4090024012e-18   -8.0030610175e-18   
+-9.5916537204e-18   -1.1173702805e-17   -1.2748141307e-17   -1.4313870964e-17   -1.5869818540e-17   
+-1.7415021358e-17   -1.8948334691e-17   -2.0468707311e-17   -2.1975140520e-17   -2.3466587044e-17   
+-2.4942003814e-17   -2.6400431549e-17   -2.7840934057e-17   -2.9262424027e-17   -3.0663926306e-17   
+-3.2044574949e-17   -3.3403335312e-17   -3.4739274965e-17   -3.6051763716e-17   -3.7339783196e-17   
+-3.8602310600e-17   -3.9838557818e-17   -4.1047764336e-17   -4.2228945494e-17   -4.3381289217e-17   
+-4.4504401089e-17   -4.5597130497e-17   -4.6658725228e-17   -4.7688928066e-17   -4.8686817647e-17   
+-4.9651473771e-17   -5.0582431643e-17   -5.1479263798e-17   -5.2340955431e-17   -5.3166910258e-17   
+-5.3957359980e-17   -5.4710976214e-17   -5.5427235372e-17   -5.6106419019e-17   -5.6747687151e-17   
+-5.7350206148e-17   -5.7913956232e-17   -5.8438958745e-17   -5.8924046213e-17   -5.9368875169e-17   
+-5.9774730079e-17   -6.0139741305e-17   -6.0463645240e-17   -6.0747410549e-17   -6.0990239355e-17   
+-6.1191349727e-17   -6.1350587657e-17   -6.1467827787e-17   -6.1542973508e-17   -6.1575957040e-17   
+0.0000000000e+00    -1.6053688451e-18   -3.2096374505e-18   -4.8117063308e-18   -6.4105074091e-18   
+-8.0049486093e-18   -9.5939258898e-18   -1.1176363193e-17   -1.2751196284e-17   -1.4317323302e-17   
+-1.5873670707e-17   -1.7419293508e-17   -1.8953031844e-17   -2.0473834132e-17   -2.1980708873e-17   
+-2.3472605924e-17   -2.4948478288e-17   -2.6407375354e-17   -2.7848371580e-17   -2.9270361988e-17   
+-3.0672370920e-17   -3.2053548461e-17   -3.3412844295e-17   -3.4749325417e-17   -3.6062410681e-17   
+-3.7351060729e-17   -3.8614228070e-17   -3.9851137518e-17   -4.1061043128e-17   -4.2242932757e-17   
+-4.3395993405e-17   -4.4519898621e-17   -4.5613431294e-17   -4.6675838086e-17   -4.7706942672e-17   
+-4.8705785785e-17   -4.9671405654e-17   -5.0603370822e-17   -5.1501289594e-17   -5.2364077129e-17   
+-5.3191135399e-17   -5.3982833494e-17   -5.4737705957e-17   -5.5455227110e-17   -5.6135811412e-17   
+-5.6778553047e-17   -5.7382549136e-17   -5.7947846970e-17   -5.8474537428e-17   -5.8961312024e-17   
+-5.9407824228e-17   -5.9815632562e-17   -6.0182590466e-17   -6.0508430672e-17   -6.0794326689e-17   
+-6.1039374697e-17   -6.1242684664e-17   -6.1404098269e-17   -6.1523485856e-17   -6.1600746528e-17   
+-6.1635808238e-17   0.0000000000e+00    -1.6057819552e-18   -3.2104633876e-18   -4.8129445287e-18   
+-6.4121618712e-18   -8.0070236475e-18   -9.5964236959e-18   -1.1179287770e-17   -1.2754554634e-17   
+-1.4321118472e-17   -1.5877905413e-17   -1.7423989902e-17   -1.8958195446e-17   -2.0479470068e-17   
+-2.1986830190e-17   -2.3479222508e-17   -2.4955595706e-17   -2.6415008710e-17   -2.7856547683e-17   
+-2.9279088224e-17   -3.0681654123e-17   -3.2063413085e-17   -3.3423297564e-17   -3.4760373924e-17   
+-3.6074114937e-17   -3.7363458171e-17   -3.8627328999e-17   -3.9864966441e-17   -4.1075640564e-17   
+-4.2258309020e-17   -4.3412157786e-17   -4.4536935129e-17   -4.5631350835e-17   -4.6694650329e-17   
+-4.7726746211e-17   -4.8726637546e-17   -4.9693316865e-17   -5.0626389356e-17   -5.1525502652e-17   
+-5.2389494916e-17   -5.3217766207e-17   -5.4010836643e-17   -5.4767090085e-17   -5.5485998555e-17   
+-5.6168122604e-17   -5.6812484067e-17   -5.7418103930e-17   -5.7985103213e-17   -5.8513649237e-17   
+-5.9002278500e-17   -5.9450641107e-17   -5.9860596849e-17   -6.0229694745e-17   -6.0557663501e-17   
+-6.0845901816e-17   -6.1093389403e-17   -6.1299117393e-17   -6.1462922728e-17   -6.1584671024e-17   
+-6.1664256673e-17   -6.1701602933e-17   0.0000000000e+00    -1.6062360890e-18   -3.2113713440e-18   
+-4.8143056854e-18   -6.4139806289e-18   -8.0093047465e-18   -9.5991695457e-18   -1.1182502771e-17   
+-1.2758246484e-17   -1.4325290520e-17   -1.5882560644e-17   -1.7429152670e-17   -1.8963871816e-17   
+-2.0485665679e-17   -2.1993559381e-17   -2.3486496148e-17   -2.4963419917e-17   -2.6423400094e-17   
+-2.7865535709e-17   -2.9288681015e-17   -3.0691859190e-17   -3.2074257310e-17   -3.3434788891e-17   
+-3.4772519598e-17   -3.6086981480e-17   -3.7377086736e-17   -3.8641730911e-17   -3.9880168638e-17   
+-4.1091687593e-17   -4.2275212216e-17   -4.3429927364e-17   -4.4555663439e-17   -4.5651049867e-17   
+-4.6715330714e-17   -4.7748516331e-17   -4.8749559981e-17   -4.9717403958e-17   -5.0651693736e-17   
+-5.1552120177e-17   -5.2417436805e-17   -5.3247041576e-17   -5.4041620633e-17   -5.4799392190e-17   
+-5.5519825744e-17   -5.6203642444e-17   -5.6849784592e-17   -5.7457189478e-17   -5.8026059170e-17   
+-5.8556645026e-17   -5.9047313134e-17   -5.9497709897e-17   -5.9910026294e-17   -6.0281476693e-17   
+-6.0611785374e-17   -6.0902598588e-17   -6.1152768016e-17   -6.1361154149e-17   -6.1527588724e-17   
+-6.1651932159e-17   -6.1734073664e-17   -6.1773931341e-17   0.0000000000e+00    -1.6067353203e-18   
+-3.2123694645e-18   -4.8158020112e-18   -6.4159799975e-18   -8.0118123691e-18   -9.6021880707e-18   
+-1.1186037037e-17   -1.2762304951e-17   -1.4329876871e-17   -1.5887678161e-17   -1.7434828124e-17   
+-1.8970111877e-17   -2.0492476542e-17   -2.2000956811e-17   -2.3494492094e-17   -2.4972021107e-17   
+-2.6432624781e-17   -2.7875416288e-17   -2.9299226414e-17   -3.0703077667e-17   -3.2086178417e-17   
+-3.3447421358e-17   -3.4785871393e-17   -3.6101125728e-17   -3.7392068680e-17   -3.8657562997e-17   
+-3.9896880483e-17   -4.1109328165e-17   -4.2293793976e-17   -4.3449461542e-17   -4.4576251556e-17   
+-4.5672705103e-17   -4.6738064755e-17   -4.7772448323e-17   -4.8774758719e-17   -4.9743883010e-17   
+-5.0679510957e-17   -5.1581380943e-17   -5.2448153452e-17   -5.3279224122e-17   -5.4075461614e-17   
+-5.4834902042e-17   -5.5557012128e-17   -5.6242689566e-17   -5.6890789229e-17   -5.7500156398e-17   
+-5.8071082240e-17   -5.8603910493e-17   -5.9096819913e-17   -5.9549452832e-17   -5.9964364308e-17   
+-6.0338400825e-17   -6.0671281796e-17   -6.0964925607e-17   -6.1218043195e-17   -6.1429351438e-17   
+-6.1598676348e-17   -6.1725872630e-17   -6.1810823801e-17   -6.1853442290e-17   0.0000000000e+00    
+-1.6072841277e-18   -3.2134667031e-18   -4.8174469289e-18   -6.4181779126e-18   -8.0145690099e-18   
+-9.6055063491e-18   -1.1189922270e-17   -1.2766766443e-17   -1.4334918668e-17   -1.5893303870e-17   
+-1.7441067176e-17   -1.8976971603e-17   -2.0499963756e-17   -2.2009088840e-17   -2.3503282073e-17   
+-2.4981476434e-17   -2.6442765520e-17   -2.7886278054e-17   -2.9310819020e-17   -3.0715410190e-17   
+-3.2099283343e-17   -3.3461308287e-17   -3.4800549082e-17   -3.6116674566e-17   -3.7408538399e-17   
+-3.8674967282e-17   -3.9915251890e-17   -4.1128720526e-17   -4.2314220990e-17   -4.3470935553e-17   
+-4.4598884168e-17   -4.5696510803e-17   -4.6763056390e-17   -4.7798756872e-17   -4.8802459806e-17   
+-4.9772991552e-17   -5.0710090554e-17   -5.1613547436e-17   -5.2481920401e-17   -5.3314602542e-17   
+-5.4112663158e-17   -5.4873938184e-17   -5.5597891289e-17   -5.6285614246e-17   -5.6935865813e-17   
+-5.7547390129e-17   -5.8120576307e-17   -5.8655869637e-17   -5.9151242940e-17   -5.9606334076e-17   
+-6.0024098334e-17   -6.0400977782e-17   -6.0736686484e-17   -6.1033441984e-17   -6.1289800497e-17   
+-6.1504321028e-17   -6.1676823297e-17   -6.1807155728e-17   -6.1895195576e-17   -6.1940849038e-17   
+0.0000000000e+00    -1.6078874340e-18   -3.2146729024e-18   -4.8192551944e-18   -6.4205940906e-18   
+-8.0175993978e-18   -9.6091541477e-18   -1.1194193326e-17   -1.2771670981e-17   -1.4340461138e-17   
+-1.5899488238e-17   -1.7447925794e-17   -1.8984512532e-17   -2.0508194483e-17   -2.2018028416e-17   
+-2.3512944938e-17   -2.4991870719e-17   -2.6453913282e-17   -2.7898218442e-17   -2.9323562824e-17   
+-3.0728967388e-17   -3.2113689649e-17   -3.3476574251e-17   -3.4816684333e-17   -3.6133767473e-17   
+-3.7426643636e-17   -3.8694099892e-17   -3.9935447662e-17   -4.1150038636e-17   -4.2336676499e-17   
+-4.3494542031e-17   -4.4623764300e-17   -4.5722680517e-17   -4.6790529808e-17   -4.7827677979e-17   
+-4.8832911738e-17   -4.9804990704e-17   -5.0743706844e-17   -5.1648908209e-17   -5.2519040562e-17   
+-5.3353494200e-17   -5.4153558984e-17   -5.4916850792e-17   -5.5642829937e-17   -5.6332801542e-17   
+-5.6985418707e-17   -5.7599314385e-17   -5.8174985360e-17   -5.8712988560e-17   -5.9211070421e-17   
+-5.9668863887e-17   -6.0089764222e-17   -6.0469768916e-17   -6.0808586155e-17   -6.1108762349e-17   
+-6.1368683626e-17   -6.1586735441e-17   -6.1762730594e-17   -6.1896510607e-17   -6.1987945852e-17   
+-6.2036935674e-17   0.0000000000e+00    -1.6085506515e-18   -3.2159988827e-18   -4.8212430290e-18   
+-6.4232502061e-18   -8.0209307170e-18   -9.6131641893e-18   -1.1198888516e-17   -1.2777062562e-17   
+-1.4346554001e-17   -1.5906286742e-17   -1.7455465505e-17   -1.8992802309e-17   -2.0517242559e-17   
+-2.2027855733e-17   -2.3523567369e-17   -2.5003297203e-17   -2.6466168067e-17   -2.7911344565e-17   
+-2.9337572145e-17   -3.0743870878e-17   -3.2129526566e-17   -3.3493356195e-17   -3.4834421887e-17   
+-3.6152557784e-17   -3.7446546806e-17   -3.8715132457e-17   -3.9957648966e-17   -4.1173473732e-17   
+-4.2361361942e-17   -4.3520492740e-17   -4.4651115143e-17   -4.5751449003e-17   -4.6820731462e-17   
+-4.7859471084e-17   -4.8866387685e-17   -4.9840167519e-17   -5.0780661386e-17   -5.1687780468e-17   
+-5.2559846924e-17   -5.3396247977e-17   -5.4198515953e-17   -5.4964024819e-17   -5.5692231197e-17   
+-5.6384674751e-17   -5.7039892430e-17   -5.7656394957e-17   -5.8234797479e-17   -5.8775779652e-17   
+-5.9276839045e-17   -5.9737603193e-17   -6.0161951031e-17   -6.0545391324e-17   -6.0887625791e-17   
+-6.1191562370e-17   -6.1455400209e-17   -6.1677333980e-17   -6.1857168878e-17   -6.1994738833e-17   
+-6.2089906654e-17   -6.2142564151e-17   0.0000000000e+00    -1.6092797295e-18   -3.2174565390e-18   
+-4.8234282646e-18   -6.4261700860e-18   -8.0245928513e-18   -9.6175724462e-18   -1.1204049961e-17   
+-1.2782989552e-17   -1.4353251913e-17   -1.5913760369e-17   -1.7463753943e-17   -1.9001915299e-17   
+-2.0527189151e-17   -2.2038658948e-17   -2.3535244656e-17   -2.5015858390e-17   -2.6479639808e-17   
+-2.7925774172e-17   -2.9352972656e-17   -3.0760254353e-17   -3.2146936162e-17   -3.3511804663e-17   
+-3.4853920862e-17   -3.6173214059e-17   -3.7468426451e-17   -3.8738253651e-17   -3.9982054960e-17   
+-4.1199236040e-17   -4.2388498763e-17   -4.3549020473e-17   -4.4681182049e-17   -4.5783074331e-17   
+-4.6853932278e-17   -4.7894421389e-17   -4.8903187946e-17   -4.9878837552e-17   -5.0821285681e-17   
+-5.1730512919e-17   -5.2604705544e-17   -5.3443247399e-17   -5.4247937354e-17   -5.5015883441e-17   
+-5.5746538228e-17   -5.6441699206e-17   -5.7099775641e-17   -5.7719143889e-17   -5.8300549215e-17   
+-5.8844806186e-17   -5.9349138792e-17   -5.9813168626e-17   -6.0241306320e-17   -6.0628523381e-17   
+-6.0974514423e-17   -6.1282584810e-17   -6.1550728144e-17   -6.1776929367e-17   -6.1960985313e-17   
+-6.2102721570e-17   -6.2201992628e-17   -6.2258682017e-17   0.0000000000e+00    -1.6100812082e-18   
+-3.2190589472e-18   -4.8258305040e-18   -6.4293799232e-18   -8.0286186523e-18   -9.6224184632e-18   
+-1.1209723960e-17   -1.2789505119e-17   -1.4360614958e-17   -1.5921976160e-17   -1.7472865461e-17   
+-1.9011933250e-17   -2.0538123484e-17   -2.2050534970e-17   -2.3548081551e-17   -2.5029666959e-17   
+-2.6494449354e-17   -2.7941636705e-17   -2.9369902509e-17   -3.0778264781e-17   -3.2166074610e-17   
+-3.3532085147e-17   -3.4875356173e-17   -3.6195921596e-17   -3.7492478845e-17   -3.8763670886e-17   
+-4.0008884581e-17   -4.1227556663e-17   -4.2418330393e-17   -4.3580381139e-17   -4.4714234737e-17   
+-4.5817840198e-17   -4.6890430086e-17   -4.7932842418e-17   -4.8943642641e-17   -4.9921347695e-17   
+-5.0865944155e-17   -5.1777488898e-17   -5.2654018829e-17   -5.3494914077e-17   -5.4302266525e-17   
+-5.5072891860e-17   -5.5806238194e-17   -5.6504386450e-17   -5.7165605529e-17   -5.7788124076e-17   
+-5.8372830398e-17   -5.8920687370e-17   -5.9428618233e-17   -5.9896238050e-17   -6.0328541950e-17   
+-6.0719910830e-17   -6.1070031493e-17   -6.1382646193e-17   -6.1655522578e-17   -6.1886415030e-17   
+-6.2075111193e-17   -6.2221427484e-17   -6.2325209250e-17   -6.2386330917e-17   0.0000000000e+00    
+-1.6109622775e-18   -3.2208204818e-18   -4.8284712967e-18   -6.4329085119e-18   -8.0330442337e-18   
+-9.6277457118e-18   -1.1215961413e-17   -1.2796667711e-17   -1.4368709186e-17   -1.5931007817e-17   
+-1.7482881794e-17   -1.9022946030e-17   -2.0550143646e-17   -2.2063590336e-17   -2.3562193207e-17   
+-2.5044846783e-17   -2.6510729556e-17   -2.7959074459e-17   -2.9388513572e-17   -3.0798063727e-17   
+-3.2187113592e-17   -3.3554379576e-17   -3.4898920109e-17   -3.6220884094e-17   -3.7518919751e-17   
+-3.8791612167e-17   -4.0038378506e-17   -4.1258689653e-17   -4.2451124440e-17   -4.3614856062e-17   
+-4.4750569706e-17   -4.5856058474e-17   -4.6930552292e-17   -4.7975078831e-17   -4.8988114672e-17   
+-4.9968079289e-17   -5.0915037418e-17   -5.1829129805e-17   -5.2708229149e-17   -5.3551711492e-17   
+-5.4361990830e-17   -5.5135561476e-17   -5.5871866639e-17   -5.6573298822e-17   -5.7237972624e-17   
+-5.7863954310e-17   -5.8452289431e-17   -5.9004103901e-17   -5.9515990345e-17   -5.9987556646e-17   
+-6.0424440476e-17   -6.0820373469e-17   -6.1175033842e-17   -6.1492644127e-17   -6.1770723576e-17   
+-6.2006773118e-17   -6.2200570293e-17   -6.2351921436e-17   -6.2460661844e-17   -6.2526655934e-17   
+0.0000000000e+00    -1.6119308409e-18   -3.2227569449e-18   -4.8313743323e-18   -6.4367875056e-18   
+-8.0379092955e-18   -9.6336019804e-18   -1.1222818274e-17   -1.2804541582e-17   -1.4377607209e-17   
+-1.5940936359e-17   -1.7493892795e-17   -1.9035052428e-17   -2.0563357465e-17   -2.2077942160e-17   
+-2.3577706216e-17   -2.5061534032e-17   -2.6528626455e-17   -2.7978243862e-17   -2.9408972799e-17   
+-3.0819828798e-17   -3.2210241842e-17   -3.3578887944e-17   -3.4924824051e-17   -3.6248325483e-17   
+-3.7547986360e-17   -3.8822328146e-17   -4.0070801311e-17   -4.1292914290e-17   -4.2487175086e-17   
+-4.3652754503e-17   -4.4790512904e-17   -4.5898071999e-17   -4.6974658817e-17   -4.8021509512e-17   
+-4.9037002978e-17   -5.0019451543e-17   -5.0969005866e-17   -5.1885898889e-17   -5.2767822800e-17   
+-5.3614149149e-17   -5.4427646031e-17   -5.5204454469e-17   -5.5944012288e-17   -5.6649054508e-17   
+-5.7317526101e-17   -5.7947314831e-17   -5.8539639109e-17   -5.9095804073e-17   -5.9612038907e-17   
+-6.0087943596e-17   -6.0529862163e-17   -6.0930812506e-17   -6.1290463404e-17   -6.1613565358e-17   
+-6.1897364559e-17   -6.2139083312e-17   -6.2338488054e-17   -6.2495374033e-17   -6.2609565498e-17   
+-6.2680915864e-17   0.0000000000e+00    -1.6129955871e-18   -3.2248857075e-18   -4.8345656524e-18   
+-6.4410517010e-18   -8.0432574800e-18   -9.6400398031e-18   -1.1230356052e-17   -1.2813197363e-17   
+-1.4387388846e-17   -1.5951850850e-17   -1.7505997238e-17   -1.9048361048e-17   -2.0577883477e-17   
+-2.2093719185e-17   -2.3594759737e-17   -2.5079878400e-17   -2.6548300599e-17   -2.7999316874e-17   
+-2.9431463721e-17   -3.0843755240e-17   -3.2235666832e-17   -3.3605830104e-17   -3.4953300372e-17   
+-3.6278491926e-17   -3.7579939415e-17   -3.8856094361e-17   -4.0106443849e-17   -4.1330537589e-17   
+-4.2526805725e-17   -4.3694416431e-17   -4.4834422643e-17   -4.5944257658e-17   -4.7023145320e-17   
+-4.8072550972e-17   -4.9090746115e-17   -5.0075925296e-17   -5.1028333627e-17   -5.1948305403e-17   
+-5.2833334372e-17   -5.3682787151e-17   -5.4499821093e-17   -5.5280188851e-17   -5.6023322328e-17   
+-5.6732333077e-17   -5.7404979601e-17   -5.8038953433e-17   -5.8635663008e-17   -5.9196610490e-17   
+-5.9717625527e-17   -6.0198299427e-17   -6.0645752703e-17   -6.1052218643e-17   -6.1417355646e-17   
+-6.1746494617e-17   -6.2036581568e-17   -6.2284532512e-17   -6.2490101677e-17   -6.2653072126e-17   
+-6.2773255963e-17   -6.2850494509e-17   0.0000000000e+00    -1.6141660674e-18   -3.2272258660e-18   
+-4.8380738852e-18   -6.4457393504e-18   -8.0491367637e-18   -9.6471169310e-18   -1.1238642366e-17   
+-1.2822712703e-17   -1.4398141844e-17   -1.5963849200e-17   -1.7519303708e-17   -1.9062991273e-17   
+-2.0593851988e-17   -2.2111062940e-17   -2.3613506751e-17   -2.5100044449e-17   -2.6569928475e-17   
+-2.8022482532e-17   -2.9456188093e-17   -3.0870057687e-17   -3.2263616639e-17   -3.3635447743e-17   
+-3.4984604522e-17   -3.6311654035e-17   -3.7615065554e-17   -3.8893213714e-17   -4.0145625854e-17   
+-4.1371897054e-17   -4.2570371867e-17   -4.3740215579e-17   -4.4882692820e-17   -4.5995029764e-17   
+-4.7076446755e-17   -4.8128661081e-17   -4.9149826190e-17   -5.0138007150e-17   -5.1093552904e-17   
+-5.2016909167e-17   -5.2905351542e-17   -5.3758241218e-17   -5.4579163467e-17   -5.5363444003e-17   
+-5.6110508217e-17   -5.6823881589e-17   -5.7501117632e-17   -5.8139692165e-17   -5.8741222517e-17   
+-5.9307427444e-17   -5.9833697381e-17   -6.0319614095e-17   -6.0773151703e-17   -6.1185680962e-17   
+-6.1556848867e-17   -6.1892624358e-17   -6.2189623460e-17   -6.2444425480e-17   -6.2656771223e-17   
+-6.2826430359e-17   -6.2953201637e-17   -6.3036913085e-17   0.0000000000e+00    -1.6154527818e-18   
+-3.2297984129e-18   -4.8419305015e-18   -6.4508925048e-18   -8.0555998871e-18   -9.6548968500e-18   
+-1.1247751549e-17   -1.2833172960e-17   -1.4409962664e-17   -1.5977039041e-17   -1.7533931570e-17   
+-1.9079074347e-17   -2.0611406245e-17   -2.2130129009e-17   -2.3634115428e-17   -2.5122213077e-17   
+-2.6593704097e-17   -2.8047948646e-17   -2.9483367708e-17   -3.0898972087e-17   -3.2294341990e-17   
+-3.3668006549e-17   -3.5019017316e-17   -3.6348109292e-17   -3.7653679879e-17   -3.8934019189e-17   
+-4.0188698810e-17   -4.1417363702e-17   -4.2618264326e-17   -4.3790562790e-17   -4.4935756444e-17   
+-4.6050843771e-17   -4.7135041264e-17   -4.8190343179e-17   -4.9214773187e-17   -5.0206254015e-17   
+-5.1165248754e-17   -5.2092325598e-17   -5.2984520345e-17   -5.3841188218e-17   -5.4666384900e-17   
+-5.5454966770e-17   -5.6206352062e-17   -5.6924521285e-17   -5.7606802608e-17   -5.8250434712e-17   
+-5.8857264567e-17   -5.9429249027e-17   -5.9961295698e-17   -6.0452975862e-17   -6.0913202003e-17   
+-6.1332396698e-17   -6.1710194400e-17   -6.2053265448e-17   -6.2357863110e-17   -6.2620196548e-17   
+-6.2839991815e-17   -6.3017003854e-17   -6.3151016737e-17   -6.3241843876e-17   0.0000000000e+00    
+-1.6168672727e-18   -3.2326264254e-18   -4.8461700974e-18   -6.4565573909e-18   -8.0627048280e-18   
+-9.6634493504e-18   -1.1257765315e-17   -1.2844671968e-17   -1.4422957345e-17   -1.5991538693e-17   
+-1.7550012047e-17   -1.9096754544e-17   -2.0630703719e-17   -2.2151088426e-17   -2.3656770641e-17   
+-2.5146583152e-17   -2.6619840747e-17   -2.8075943660e-17   -2.9513246383e-17   -3.0930757818e-17   
+-3.2328118508e-17   -3.3703798593e-17   -3.5056847458e-17   -3.6388184723e-17   -3.7696128782e-17   
+-3.8978876834e-17   -4.0236049106e-17   -4.1467345396e-17   -4.2670912724e-17   -4.3845909709e-17   
+-4.4994089529e-17   -4.6112200364e-17   -4.7199454475e-17   -4.8258150591e-17   -4.9286169716e-17   
+-5.0281278105e-17   -5.1244064327e-17   -5.2175231224e-17   -5.3071550970e-17   -5.3932372233e-17   
+-5.4762267819e-17   -5.5555578165e-17   -5.6311713637e-17   -5.7035154961e-17   -5.7722982584e-17   
+-5.8372174499e-17   -5.8984830121e-17   -5.9563168047e-17   -6.0101565110e-17   -6.0599581060e-17   
+-6.1067159936e-17   -6.1493681975e-17   -6.1878767844e-17   -6.2229858930e-17   -6.2542809723e-17   
+-6.2813422485e-17   -6.3041407046e-17   -6.3226502165e-17   -6.3368475778e-17   -6.3467125228e-17   
+0.0000000000e+00    -1.6184222291e-18   -3.2357352724e-18   -4.8508307044e-18   -6.4627848260e-18   
+-8.0705153219e-18   -9.6728511530e-18   -1.1268773494e-17   -1.2857312880e-17   -1.4437242457e-17   
+-1.6007478227e-17   -1.7567689387e-17   -1.9116190464e-17   -2.0651917521e-17   -2.2174129208e-17   
+-2.3681675620e-17   -2.5173373286e-17   -2.6648572885e-17   -2.8106718708e-17   -2.9546092147e-17   
+-3.0965700017e-17   -3.2365249189e-17   -3.3743144949e-17   -3.5098434305e-17   -3.6432239826e-17   
+-3.7742793055e-17   -3.9028189047e-17   -4.0288101503e-17   -4.1522290499e-17   -4.2728789347e-17   
+-4.3906752830e-17   -4.5058215355e-17   -4.6179649945e-17   -4.7270264212e-17   -4.8332691588e-17   
+-4.9364656246e-17   -5.0363752429e-17   -5.1330706647e-17   -5.2266369757e-17   -5.3167224134e-17   
+-5.4032611237e-17   -5.4867672349e-17   -5.5666180730e-17   -5.6427538097e-17   -5.7156775065e-17   
+-5.7850699760e-17   -5.8506003601e-17   -5.9125063516e-17   -5.9710385837e-17   -6.0255763914e-17   
+-6.0760744823e-17   -6.1236406594e-17   -6.1670983615e-17   -6.2064081398e-17   -6.2423988950e-17   
+-6.2746122378e-17   -6.3025836637e-17   -6.3262823728e-17   -6.3456804613e-17   -6.3607529492e-17   
+-6.3714778046e-17   0.0000000000e+00    -1.6201315997e-18   -3.2391528421e-18   -4.8559541310e-18   
+-6.4696306738e-18   -8.0791014335e-18   -9.6831865974e-18   -1.1280874835e-17   -1.2871209092e-17   
+-1.4452946145e-17   -1.6025000628e-17   -1.7587122168e-17   -1.9137556460e-17   -2.0675237950e-17   
+-2.2199458045e-17   -2.3709053777e-17   -2.5202823803e-17   -2.6680158256e-17   -2.8140549857e-17   
+-2.9582199644e-17   -3.1004112136e-17   -3.2406067115e-17   -3.3786398578e-17   -3.5144150916e-17   
+-3.6480669802e-17   -3.7794091302e-17   -3.9082398187e-17   -4.0345322941e-17   -4.1582691901e-17   
+-4.2792413383e-17   -4.3973637949e-17   -4.5128709167e-17   -4.6253797578e-17   -4.7348105678e-17   
+-4.8414634845e-17   -4.9450936846e-17   -5.0454416829e-17   -5.1425952943e-17   -5.2366558761e-17   
+-5.3272398079e-17   -5.4142804430e-17   -5.4983544029e-17   -5.5787766633e-17   -5.6554864454e-17   
+-5.7290472600e-17   -5.7991099834e-17   -5.8653122544e-17   -5.9279222726e-17   -5.9872223024e-17   
+-6.0425275361e-17   -6.0937912882e-17   -6.1422460216e-17   -6.1865892115e-17   -6.2267797433e-17   
+-6.2637396966e-17   -6.2969624906e-17   -6.3259344483e-17   -6.3506228095e-17   -6.3709977144e-17   
+-6.3870322329e-17   -6.3987023916e-17   0.0000000000e+00    -1.6220107186e-18   -3.2429097921e-18   
+-4.8615863372e-18   -6.4771563455e-18   -8.0885401851e-18   -9.6945483986e-18   -1.1294177894e-17   
+-1.2886485261e-17   -1.4470209282e-17   -1.6044263085e-17   -1.7608484713e-17   -1.9161044197e-17   
+-2.0700874203e-17   -2.2227302151e-17   -2.3739150709e-17   -2.5235198889e-17   -2.6714880198e-17   
+-2.8177740594e-17   -2.9621892781e-17   -3.1046338753e-17   -3.2450938447e-17   -3.3833947490e-17   
+-3.5194407394e-17   -3.6533909095e-17   -3.7850483700e-17   -3.9141990543e-17   -4.0408226727e-17   
+-4.1649091438e-17   -4.2862355576e-17   -4.4047165066e-17   -4.5206203337e-17   -4.6335308408e-17   
+-4.7433677157e-17   -4.8504715441e-17   -4.9545785502e-17   -5.0554084617e-17   -5.1530657631e-17   
+-5.2476696990e-17   -5.3388016275e-17   -5.4263940309e-17   -5.5110922295e-17   -5.5921426571e-17   
+-5.6694834898e-17   -5.7437446909e-17   -5.8145442276e-17   -5.8814851067e-17   -5.9448690648e-17   
+-6.0050131381e-17   -6.0611620068e-17   -6.1132674536e-17   -6.1626989811e-17   -6.2080155918e-17   
+-6.2491743399e-17   -6.2871997369e-17   -6.3215322254e-17   -6.3516040722e-17   -6.3773803625e-17   
+-6.3988290861e-17   -6.4159211693e-17   -6.4286305042e-17   0.0000000000e+00    -1.6240764426e-18   
+-3.2470398243e-18   -4.8677778471e-18   -6.4854293506e-18   -8.0989162477e-18   -9.7070384784e-18   
+-1.1308802008e-17   -1.2903278423e-17   -1.4489186726e-17   -1.6065438391e-17   -1.7631968656e-17   
+-1.9186864373e-17   -2.0729056254e-17   -2.2257911304e-17   -2.3772236404e-17   -2.5270788970e-17   
+-2.6753050187e-17   -2.8218624541e-17   -2.9665527627e-17   -3.1092758666e-17   -3.2500265706e-17   
+-3.3886218225e-17   -3.5249654570e-17   -3.6592435293e-17   -3.7912476119e-17   -3.9207500690e-17   
+-4.0477377147e-17   -4.1722084752e-17   -4.2939243348e-17   -4.4127993760e-17   -4.5291393030e-17   
+-4.6424913636e-17   -4.7527746273e-17   -4.8603741451e-17   -4.9650053063e-17   -5.0663649871e-17   
+-5.1645759971e-17   -5.2597772447e-17   -5.3515115886e-17   -5.4397105533e-17   -5.5250949803e-17   
+-5.6068359550e-17   -5.6848705045e-17   -5.7599016437e-17   -5.8315111625e-17   -5.8992639970e-17   
+-5.9634987507e-17   -6.0245706849e-17   -6.0816469653e-17   -6.1346776910e-17   -6.1851830126e-17   
+-6.2315697093e-17   -6.2737928219e-17   -6.3129894662e-17   -6.3485418468e-17   -6.3798228067e-17   
+-6.4067950624e-17   -6.4294242398e-17   -6.4476789087e-17   -6.4615306147e-17   0.0000000000e+00    
+-1.6263473024e-18   -3.2515799875e-18   -4.8745842022e-18   -6.4945239029e-18   -8.1103227007e-18   
+-9.7207688801e-18   -1.1324878363e-17   -1.2921739223e-17   -1.4510048718e-17   -1.6088716501e-17   
+-1.7657784661e-17   -1.9215248610e-17   -2.0760036910e-17   -2.2291560085e-17   -2.3808607659e-17   
+-2.5309913308e-17   -2.6795010629e-17   -2.8263568449e-17   -2.9713495612e-17   -3.1143788287e-17   
+-3.2554491388e-17   -3.3943679682e-17   -3.5310388042e-17   -3.6656773409e-17   -3.7980624668e-17   
+-3.9279516294e-17   -4.0553394518e-17   -4.1802326634e-17   -4.3023766425e-17   -4.4216849113e-17   
+-4.5385042448e-17   -4.6523417070e-17   -4.7631156881e-17   -4.8712601195e-17   -4.9764674867e-17   
+-5.0784095453e-17   -5.1772292499e-17   -5.2730871249e-17   -5.3654837067e-17   -5.4543494671e-17   
+-5.5404882681e-17   -5.6229883643e-17   -5.7017855198e-17   -5.7776630555e-17   -5.8501629913e-17   
+-5.9188084121e-17   -5.9839784493e-17   -6.0460703852e-17   -6.1041661736e-17   -6.1582140625e-17   
+-6.2098998109e-17   -6.2574628580e-17   -6.3008560314e-17   -6.3413402331e-17   -6.3782336467e-17   
+-6.4108437901e-17   -6.4391307761e-17   -6.4630576318e-17   -6.4825903363e-17   -6.4976978561e-17   
+0.0000000000e+00    -1.6288436689e-18   -3.2565710096e-18   -4.8820664593e-18   -6.5045215857e-18   
+-8.1228618664e-18   -9.7358627732e-18   -1.1342551173e-17   -1.2942033264e-17   -1.4532982400e-17   
+-1.6114306234e-17   -1.7686164314e-17   -1.9246451531e-17   -2.0794094087e-17   -2.2328550343e-17   
+-2.3848590746e-17   -2.5352922871e-17   -2.6841137935e-17   -2.8312975493e-17   -2.9766227036e-17   
+-3.1199885383e-17   -3.2614101927e-17   -3.4006847324e-17   -3.5377152624e-17   -3.6727500592e-17   
+-3.8055540679e-17   -3.9358683375e-17   -4.0636960761e-17   -4.1890536901e-17   -4.3116683029e-17   
+-4.4314528206e-17   -4.5487991680e-17   -4.6631702345e-17   -4.7744836634e-17   -4.8832271208e-17   
+-4.9890679139e-17   -5.0916501831e-17   -5.1911390282e-17   -5.2877187368e-17   -5.3808433197e-17   
+-5.4704420918e-17   -5.5574101795e-17   -5.6407447815e-17   -5.7203802733e-17   -5.7971882565e-17   
+-5.8706670318e-17   -5.9402936767e-17   -6.0064918753e-17   -6.0697051037e-17   -6.1289216418e-17   
+-6.1840877030e-17   -6.2370710999e-17   -6.2859273143e-17   -6.3306067409e-17   -6.3725063604e-17   
+-6.4108739776e-17   -6.4449452985e-17   -6.4746775735e-17   -6.5000309727e-17   -6.5209686278e-17   
+-6.5374566695e-17   0.0000000000e+00    -1.6315879359e-18   -3.2620576630e-18   -4.8902917387e-18   
+-6.5155120839e-18   -8.1366462284e-18   -9.7524555587e-18   -1.1361978974e-17   -1.2964342596e-17   
+-1.4558193501e-17   -1.6142437144e-17   -1.7717362195e-17   -1.9280753045e-17   -2.0831533296e-17   
+-2.2369213902e-17   -2.3892544335e-17   -2.5400203479e-17   -2.6891845893e-17   -2.8367288881e-17   
+-2.9824194931e-17   -3.1261553176e-17   -3.2679632063e-17   -3.4076287801e-17   -3.5450547234e-17   
+-3.6805251308e-17   -3.8137896191e-17   -3.9445712109e-17   -4.0728825512e-17   -4.1987506849e-17   
+-4.3218826675e-17   -4.4421907279e-17   -4.5601164240e-17   -4.6750740841e-17   -4.7869805305e-17   
+-4.8963824998e-17   -5.0029196209e-17   -5.1062056765e-17   -5.2064301110e-17   -5.3038033344e-17   
+-5.3977282124e-17   -5.4881327873e-17   -5.5760125138e-17   -5.6602644918e-17   -5.7408215705e-17   
+-5.8186523989e-17   -5.8932072169e-17   -5.9639125259e-17   -6.0312409871e-17   -6.0956868574e-17   
+-6.1561354409e-17   -6.2125307139e-17   -6.2669406218e-17   -6.3172184209e-17   -6.3633118315e-17   
+-6.4067674261e-17   -6.4467556421e-17   -6.4824332422e-17   -6.5137543298e-17   -6.5406759350e-17   
+-6.5631580585e-17   -6.5811637141e-17   0.0000000000e+00    -1.6346047212e-18   -3.2680891660e-18   
+-4.8993338258e-18   -6.5275939886e-18   -8.1517994403e-18   -9.7706960834e-18   -1.1383336044e-17   
+-1.2988867347e-17   -1.4585908180e-17   -1.6173361581e-17   -1.7751658168e-17   -1.9318460855e-17   
+-2.0872690390e-17   -2.2413915539e-17   -2.3940862716e-17   -2.5452179267e-17   -2.6947589382e-17   
+-2.8426995837e-17   -2.9887919302e-17   -3.1329344861e-17   -3.2751669642e-17   -3.4152624033e-17   
+-3.5531230263e-17   -3.6890723023e-17   -3.8228429980e-17   -3.9541383192e-17   -4.0829812851e-17   
+-4.2094106355e-17   -4.3331113651e-17   -4.4539949582e-17   -4.5725575351e-17   -4.6881600402e-17   
+-4.8007183933e-17   -4.9108442679e-17   -5.0181468655e-17   -5.1222065968e-17   -5.2232396680e-17   
+-5.3214852059e-17   -5.4162898518e-17   -5.5075802496e-17   -5.5964621447e-17   -5.6817225982e-17   
+-5.7632927817e-17   -5.8422480284e-17   -5.9179857451e-17   -5.9898768345e-17   -6.0584477984e-17   
+-6.1242487177e-17   -6.1860516942e-17   -6.2437982453e-17   -6.2997763232e-17   -6.3516168769e-17   
+-6.3992646865e-17   -6.4444307718e-17   -6.4862005193e-17   -6.5236439094e-17   -6.5567115861e-17   
+-6.5853571272e-17   -6.6095370919e-17   -6.6292110675e-17   0.0000000000e+00    -1.6379210871e-18   
+-3.2747196248e-18   -4.9092738333e-18   -6.5408756816e-18   -8.1684574352e-18   -9.7907479753e-18   
+-1.1406813968e-17   -1.3015827517e-17   -1.4616375052e-17   -1.6207356956e-17   -1.7789359887e-17   
+-1.9359913222e-17   -2.0917934571e-17   -2.2463056251e-17   -2.3993979333e-17   -2.5509316488e-17   
+-2.7008868453e-17   -2.8492631965e-17   -2.9957971794e-17   -3.1403868570e-17   -3.2830860879e-17   
+-3.4236540801e-17   -3.5619925485e-17   -3.6984682470e-17   -3.8327954188e-17   -3.9646554849e-17   
+-4.0940828694e-17   -4.2211291678e-17   -4.3454551236e-17   -4.4669714025e-17   -4.5862341053e-17   
+-4.7025454913e-17   -4.8158204886e-17   -4.9267421555e-17   -5.0348862449e-17   -5.1397964814e-17   
+-5.2417184905e-17   -5.3409229678e-17   -5.4366947466e-17   -5.5289589335e-17   -5.6189425171e-17   
+-5.7053115925e-17   -5.7879954866e-17   -5.8681868115e-17   -5.9452248940e-17   -6.0184195173e-17   
+-6.0883563701e-17   -6.1556469009e-17   -6.2189387677e-17   -6.2781707852e-17   -6.3358727595e-17   
+-6.3894312564e-17   -6.4387878239e-17   -6.4858342594e-17   -6.5295624527e-17   -6.5689469837e-17   
+-6.6039346938e-17   -6.6344753653e-17   -6.6605217747e-17   -6.6820297420e-17   0.0000000000e+00    
+-1.6415667831e-18   -3.2820085184e-18   -4.9202009289e-18   -6.5554763072e-18   -8.1867696450e-18   
+-9.8127911114e-18   -1.1432623357e-17   -1.3045464955e-17   -1.4649867424e-17   -1.6244728226e-17   
+-1.7830805559e-17   -1.9405481999e-17   -2.0967671705e-17   -2.2517076860e-17   -2.4052370671e-17   
+-2.5572127695e-17   -2.7076232815e-17   -2.8564786059e-17   -3.0034980817e-17   -3.1485792823e-17   
+-3.2917916168e-17   -3.4328790887e-17   -3.5717428546e-17   -3.7087972518e-17   -3.8437361602e-17   
+-3.9762170532e-17   -4.1062868916e-17   -4.2340114037e-17   -4.3590246734e-17   -4.4812364668e-17   
+-4.6012688211e-17   -4.7183594834e-17   -4.8324222907e-17   -4.9442187758e-17   -5.0532879210e-17   
+-5.1591331216e-17   -5.2620323444e-17   -5.3622909880e-17   -5.4591259405e-17   -5.5524606181e-17   
+-5.6436552929e-17   -5.7312430813e-17   -5.8151512826e-17   -5.8967014340e-17   -5.9751690146e-17   
+-6.0497966186e-17   -6.1212349993e-17   -6.1901630667e-17   -6.2550916776e-17   -6.3159566748e-17   
+-6.3755537363e-17   -6.4310007761e-17   -6.4822357890e-17   -6.5313493019e-17   -6.5772304236e-17   
+-6.6187488597e-17   -6.6558472712e-17   -6.6884712684e-17   -6.7165694688e-17   -6.7400935515e-17   
+0.0000000000e+00    -1.6455745134e-18   -3.2900212322e-18   -4.9322131349e-18   -6.5715268414e-18   
+-8.2069003406e-18   -9.8370232314e-18   -1.1460995736e-17   -1.3078045525e-17   -1.4686685741e-17   
+-1.6285810634e-17   -1.7876366975e-17   -1.9455575962e-17   -2.1022347963e-17   -2.2576461962e-17   
+-2.4116560535e-17   -2.5641176342e-17   -2.7150286766e-17   -2.8644105384e-17   -3.0119637188e-17   
+-3.1575852528e-17   -3.3013616444e-17   -3.4430201826e-17   -3.5824614105e-17   -3.7201519738e-17   
+-3.8557633672e-17   -3.9889267378e-17   -4.1197028288e-17   -4.2481729043e-17   -4.3739417415e-17   
+-4.4969181170e-17   -4.6177965528e-17   -4.7357438768e-17   -4.8506727275e-17   -4.9634309041e-17   
+-5.0735169674e-17   -5.1803899784e-17   -5.2843634565e-17   -5.3857809500e-17   -5.4837846541e-17   
+-5.5782961271e-17   -5.6708221600e-17   -5.7597496852e-17   -5.8450037729e-17   -5.9280476883e-17   
+-6.0080867228e-17   -6.0842896090e-17   -6.1573786262e-17   -6.2281068451e-17   -6.2948347361e-17   
+-6.3574948755e-17   -6.4191752150e-17   -6.4766983385e-17   -6.5299983349e-17   -6.5813841955e-17   
+-6.6296320412e-17   -6.6734962890e-17   -6.7129150041e-17   -6.7478292107e-17   -6.7781829543e-17   
+-6.8039233619e-17   0.0000000000e+00    -1.6499802296e-18   -3.2988296451e-18   -4.9454182076e-18   
+-6.5891712669e-18   -8.2290301060e-18   -9.8636617114e-18   -1.1492185622e-17   -1.3113861494e-17   
+-1.4727160285e-17   -1.6330972713e-17   -1.7926452847e-17   -1.9510644484e-17   -2.1082453823e-17   
+-2.2641744274e-17   -2.4187124746e-17   -2.5717081833e-17   -2.7231694611e-17   -2.8731301480e-17   
+-3.0212700321e-17   -3.1674855571e-17   -3.3118820192e-17   -3.4541683334e-17   -3.5942443679e-17   
+-3.7326342715e-17   -3.8689849306e-17   -4.0028985521e-17   -4.1344510296e-17   -4.2637407065e-17   
+-4.3903401423e-17   -4.5141570265e-17   -4.6359655635e-17   -4.7548546198e-17   -4.8707355157e-17   
+-4.9845508843e-17   -5.0957548502e-17   -5.2037577379e-17   -5.3089121498e-17   -5.4116035722e-17   
+-5.5108920904e-17   -5.6066972199e-17   -5.7006868208e-17   -5.7910871247e-17   -5.8778207515e-17   
+-5.9625067686e-17   -6.0442733094e-17   -6.1222079105e-17   -6.1971114799e-17   -6.2698186136e-17   
+-6.3385244615e-17   -6.4031580088e-17   -6.4671285053e-17   -6.5269338771e-17   -6.5825039194e-17   
+-6.6363877821e-17   -6.6872373783e-17   -6.7336803874e-17   -6.7756498229e-17   -6.8130816671e-17   
+-6.8459149397e-17   -6.8740917634e-17   0.0000000000e+00    -1.6548234535e-18   -3.3085127736e-18   
+-4.9599346043e-18   -6.6085678642e-18   -8.2533574580e-18   -9.8929455138e-18   -1.1526472806e-17   
+-1.3153234153e-17   -1.4771654135e-17   -1.6380619591e-17   -1.7981512475e-17   -1.9571181562e-17   
+-2.1148528468e-17   -2.2713509418e-17   -2.4264696304e-17   -2.5800525086e-17   -2.7321186626e-17   
+-2.8827156545e-17   -3.0315005048e-17   -3.1783690068e-17   -3.3234471153e-17   -3.4664235463e-17   
+-3.6071974267e-17   -3.7463561182e-17   -3.8835194555e-17   -4.0182578312e-17   -4.1506637941e-17   
+-4.2808544624e-17   -4.4083669791e-17   -4.5331078382e-17   -4.6559388398e-17   -4.7758631466e-17   
+-4.8927906303e-17   -5.0077681747e-17   -5.1202010562e-17   -5.2294460224e-17   -5.3358986402e-17   
+-5.4399904986e-17   -5.5406914186e-17   -5.6379186706e-17   -5.7335171785e-17   -5.8255365148e-17   
+-5.9138966056e-17   -6.0003877926e-17   -6.0840533890e-17   -6.1638916721e-17   -6.2407899870e-17   
+-6.3156725508e-17   -6.3865527756e-17   -6.4533556993e-17   -6.5198437758e-17   -6.5821580335e-17   
+-6.6402235476e-17   -6.6968534755e-17   -6.7505631878e-17   -6.7998410411e-17   -6.8446144951e-17   
+-6.8848139898e-17   -6.9203730199e-17   -6.9512282069e-17   0.0000000000e+00    -1.6601476315e-18   
+-3.3191574808e-18   -4.9758925453e-18   -6.6298906320e-18   -8.2801006269e-18   -9.9251373312e-18   
+-1.1564164863e-17   -1.3196516695e-17   -1.4820566427e-17   -1.6435196631e-17   -1.8042039774e-17   
+-1.9637730247e-17   -2.1221164627e-17   -2.2792401168e-17   -2.4349971072e-17   -2.5892254634e-17   
+-2.7419565606e-17   -2.8932530454e-17   -3.0427469101e-17   -3.1903332326e-17   -3.3361606781e-17   
+-3.4798957578e-17   -3.6214367832e-17   -3.7614406068e-17   -3.8994973250e-17   -4.0351423567e-17   
+-4.1684865599e-17   -4.2996676923e-17   -4.4281839629e-17   -4.5539405520e-17   -4.6778955534e-17   
+-4.7989579159e-17   -4.9170359182e-17   -5.0332910479e-17   -5.1470748817e-17   -5.2576852706e-17   
+-5.3655650121e-17   -5.4711963760e-17   -5.5734499558e-17   -5.6722405536e-17   -5.7696077403e-17   
+-5.8634068863e-17   -5.9535549565e-17   -6.0420305749e-17   -6.1277838117e-17   -6.2097148212e-17   
+-6.2888059690e-17   -6.3660799929e-17   -6.4393505202e-17   -6.5085382493e-17   -6.5777939129e-17   
+-6.6428662004e-17   -6.7036749979e-17   -6.7633236877e-17   -6.8201775388e-17   -6.8725717492e-17   
+-6.9204276735e-17   -6.9636696590e-17   -7.0022251268e-17   -7.0360246507e-17   0.0000000000e+00    
+-1.6660005247e-18   -3.3308592559e-18   -4.9934351826e-18   -6.6533308477e-18   -8.3094995143e-18   
+-9.9605259428e-18   -1.1605599913e-17   -1.3244097392e-17   -1.4874335933e-17   -1.6495193419e-17   
+-1.8108577710e-17   -1.9710887520e-17   -2.1301013887e-17   -2.2879127228e-17   -2.4443714012e-17   
+-2.5993093344e-17   -2.7527714067e-17   -2.9048368474e-17   -3.0551101346e-17   -3.2034855606e-17   
+-3.3501367556e-17   -3.4947058212e-17   -3.6370901727e-17   -3.7780230538e-17   -3.9170618697e-17   
+-4.0537035925e-17   -4.1880792076e-17   -4.3203491615e-17   -4.4499688635e-17   -4.5768420491e-17   
+-4.7020326687e-17   -4.8243461010e-17   -4.9436888738e-17   -5.0613484587e-17   -5.1766174007e-17   
+-5.2887288048e-17   -5.3981773899e-17   -5.5055011393e-17   -5.6094615651e-17   -5.7099707561e-17   
+-5.8092822593e-17   -5.9050379582e-17   -5.9971515623e-17   -6.0878086752e-17   -6.1758568647e-17   
+-6.2600884178e-17   -6.3415901567e-17   -6.4214931237e-17   -6.4973913215e-17   -6.5692006779e-17   
+-6.6414987627e-17   -6.7096029649e-17   -6.7734274664e-17   -6.8363946949e-17   -6.8967049121e-17   
+-6.9525249480e-17   -7.0037694460e-17   -7.0503560555e-17   -7.0922055208e-17   -7.1292417678e-17   
+0.0000000000e+00    -1.6724346369e-18   -3.3437230707e-18   -5.0127198836e-18   -6.6790987838e-18   
+-8.3418178452e-18   -9.9994288048e-18   -1.1651149652e-17   -1.3296403068e-17   -1.4933444995e-17   
+-1.6561148162e-17   -1.8181723167e-17   -1.9791309644e-17   -2.1388792543e-17   -2.2974465581e-17   
+-2.4546766054e-17   -2.6103945798e-17   -2.7646602163e-17   -2.9175709736e-17   -3.0687010837e-17   
+-3.2179439747e-17   -3.3655007213e-17   -3.5109865914e-17   -3.6542980151e-17   -3.7962522134e-17   
+-3.9363706537e-17   -4.0741080436e-17   -4.2096174944e-17   -4.3430843950e-17   -4.4739171041e-17   
+-4.6020177693e-17   -4.7285667096e-17   -4.8522554486e-17   -4.9729885892e-17   -5.0921920983e-17   
+-5.2090936264e-17   -5.3228551034e-17   -5.4340283254e-17   -5.5432125219e-17   -5.6490492913e-17   
+-5.7514477395e-17   -5.8528966389e-17   -5.9508031853e-17   -6.0450775097e-17   -6.1381327495e-17   
+-6.2287037909e-17   -6.3154643421e-17   -6.3996160548e-17   -6.4824090308e-17   -6.5611958388e-17   
+-6.6358871621e-17   -6.7115297944e-17   -6.7829669942e-17   -6.8501066728e-17   -6.9167219861e-17   
+-6.9808318022e-17   -7.0404178638e-17   -7.0953874363e-17   -7.1456508062e-17   -7.1911213780e-17   
+-7.2317157694e-17   0.0000000000e+00    -1.6788687491e-18   -3.3565868854e-18   -5.0320045847e-18   
+-6.7048667198e-18   -8.3741361761e-18   -1.0038331667e-17   -1.1696699391e-17   -1.3348708745e-17   
+-1.4992554058e-17   -1.6627102905e-17   -1.8254868623e-17   -1.9871731768e-17   -2.1476571199e-17   
+-2.3069803934e-17   -2.4649818095e-17   -2.6214798252e-17   -2.7765490259e-17   -2.9303050998e-17   
+-3.0822920327e-17   -3.2324023888e-17   -3.3808646870e-17   -3.5272673617e-17   -3.6715058575e-17   
+-3.8144813730e-17   -3.9556794377e-17   -4.0945124947e-17   -4.2311557813e-17   -4.3658196284e-17   
+-4.4978653446e-17   -4.6271934894e-17   -4.7551007505e-17   -4.8801647962e-17   -5.0022883047e-17   
+-5.1230357378e-17   -5.2415698521e-17   -5.3569814021e-17   -5.4698792609e-17   -5.5809239045e-17   
+-5.6886370175e-17   -5.7929247230e-17   -5.8965110185e-17   -5.9965684124e-17   -6.0930034571e-17   
+-6.1884568238e-17   -6.2815507171e-17   -6.3708402664e-17   -6.4576419529e-17   -6.5433249380e-17   
+-6.6250003561e-17   -6.7025736462e-17   -6.7815608260e-17   -6.8563310235e-17   -6.9267858792e-17   
+-6.9970492774e-17   -7.0649586924e-17   -7.1283107796e-17   -7.1870054266e-17   -7.2409455569e-17   
+-7.2900372352e-17   -7.3341897710e-17   0.0000000000e+00    -1.6853028613e-18   -3.3694507001e-18   
+-5.0512892858e-18   -6.7306346558e-18   -8.4064545070e-18   -1.0077234529e-17   -1.1742249131e-17   
+-1.3401014422e-17   -1.5051663121e-17   -1.6693057648e-17   -1.8328014079e-17   -1.9952153891e-17   
+-2.1564349855e-17   -2.3165142287e-17   -2.4752870137e-17   -2.6325650705e-17   -2.7884378355e-17   
+-2.9430392261e-17   -3.0958829818e-17   -3.2468608028e-17   -3.3962286527e-17   -3.5435481319e-17   
+-3.6887136999e-17   -3.8327105327e-17   -3.9749882217e-17   -4.1149169458e-17   -4.2526940682e-17   
+-4.3885548618e-17   -4.5218135851e-17   -4.6523692096e-17   -4.7816347914e-17   -4.9080741438e-17   
+-5.0315880202e-17   -5.1538793774e-17   -5.2740460777e-17   -5.3911077007e-17   -5.5057301964e-17   
+-5.6186352871e-17   -5.7282247437e-17   -5.8344017064e-17   -5.9401253981e-17   -6.0423336395e-17   
+-6.1409294046e-17   -6.2387808980e-17   -6.3343976433e-17   -6.4262161908e-17   -6.5156678511e-17   
+-6.6042408452e-17   -6.6888048734e-17   -6.7692601304e-17   -6.8515918577e-17   -6.9296950528e-17   
+-7.0034650857e-17   -7.0773765686e-17   -7.1490855825e-17   -7.2162036953e-17   -7.2786234169e-17   
+-7.3362403076e-17   -7.3889530925e-17   -7.4366637726e-17   0.0000000000e+00    -1.6917369734e-18   
+-3.3823145149e-18   -5.0705739869e-18   -6.7564025919e-18   -8.4387728379e-18   -1.0116137391e-17   
+-1.1787798870e-17   -1.3453320098e-17   -1.5110772183e-17   -1.6759012391e-17   -1.8401159536e-17   
+-2.0032576015e-17   -2.1652128511e-17   -2.3260480640e-17   -2.4855922178e-17   -2.6436503159e-17   
+-2.8003266451e-17   -2.9557733523e-17   -3.1094739309e-17   -3.2613192169e-17   -3.4115926184e-17   
+-3.5598289021e-17   -3.7059215423e-17   -3.8509396923e-17   -3.9942970058e-17   -4.1353213969e-17   
+-4.2742323551e-17   -4.4112900953e-17   -4.5457618256e-17   -4.6775449298e-17   -4.8081688323e-17   
+-4.9359834914e-17   -5.0608877356e-17   -5.1847230170e-17   -5.3065223034e-17   -5.4252339994e-17   
+-5.5415811319e-17   -5.6563466697e-17   -5.7678124699e-17   -5.8758786898e-17   -5.9837397777e-17   
+-6.0880988666e-17   -6.1888553520e-17   -6.2891049723e-17   -6.3872445696e-17   -6.4815921151e-17   
+-6.5736937492e-17   -6.6651567524e-17   -6.7526093907e-17   -6.8359466146e-17   -6.9216228894e-17   
+-7.0030590821e-17   -7.0801442921e-17   -7.1577038598e-17   -7.2332124727e-17   -7.3040966111e-17   
+-7.3702414072e-17   -7.4315350583e-17   -7.4878689497e-17   -7.5391377742e-17   0.0000000000e+00    
+-1.6981710856e-18   -3.3951783296e-18   -5.0898586880e-18   -6.7821705279e-18   -8.4710911688e-18   
+-1.0155040253e-17   -1.1833348609e-17   -1.3505625775e-17   -1.5169881246e-17   -1.6824967134e-17   
+-1.8474304992e-17   -2.0112998138e-17   -2.1739907167e-17   -2.3355818993e-17   -2.4958974220e-17   
+-2.6547355612e-17   -2.8122154547e-17   -2.9685074785e-17   -3.1230648799e-17   -3.2757776310e-17   
+-3.4269565841e-17   -3.5761096723e-17   -3.7231293847e-17   -3.8691688519e-17   -4.0136057898e-17   
+-4.1557258480e-17   -4.2957706419e-17   -4.4340253287e-17   -4.5697100661e-17   -4.7027206499e-17   
+-4.8347028731e-17   -4.9638928389e-17   -5.0901874511e-17   -5.2155666565e-17   -5.3389985291e-17   
+-5.4593602980e-17   -5.5774320674e-17   -5.6940580524e-17   -5.8074001961e-17   -5.9173556733e-17   
+-6.0273541573e-17   -6.1338640937e-17   -6.2367812994e-17   -6.3394290466e-17   -6.4400914958e-17   
+-6.5369680394e-17   -6.6317196473e-17   -6.7260726595e-17   -6.8164139080e-17   -6.9026330988e-17   
+-6.9916539210e-17   -7.0764231113e-17   -7.1568234986e-17   -7.2380311510e-17   -7.3173393628e-17   
+-7.3919895269e-17   -7.4618593974e-17   -7.5268298090e-17   -7.5867848069e-17   -7.6416117758e-17   
+0.0000000000e+00    -1.7046051978e-18   -3.4080421443e-18   -5.1091433890e-18   -6.8079384639e-18   
+-8.5034094997e-18   -1.0193943115e-17   -1.1878898349e-17   -1.3557931451e-17   -1.5228990309e-17   
+-1.6890921878e-17   -1.8547450448e-17   -2.0193420262e-17   -2.1827685822e-17   -2.3451157346e-17   
+-2.5062026261e-17   -2.6658208066e-17   -2.8241042643e-17   -2.9812416048e-17   -3.1366558290e-17   
+-3.2902360451e-17   -3.4423205498e-17   -3.5923904425e-17   -3.7403372271e-17   -3.8873980115e-17   
+-4.0329145738e-17   -4.1761302991e-17   -4.3173089288e-17   -4.4567605621e-17   -4.5936583067e-17   
+-4.7278963701e-17   -4.8612369140e-17   -4.9918021865e-17   -5.1194871665e-17   -5.2464102961e-17   
+-5.3714747548e-17   -5.4934865966e-17   -5.6132830030e-17   -5.7317694350e-17   -5.8469879223e-17   
+-5.9588326567e-17   -6.0709685368e-17   -6.1796293208e-17   -6.2847072468e-17   -6.3897531209e-17   
+-6.4929384220e-17   -6.5923439637e-17   -6.6897455454e-17   -6.7869885667e-17   -6.8802184253e-17   
+-6.9693195830e-17   -7.0616849527e-17   -7.1497871406e-17   -7.2335027050e-17   -7.3183584422e-17   
+-7.4014662530e-17   -7.4798824427e-17   -7.5534773877e-17   -7.6221245597e-17   -7.6857006641e-17   
+-7.7440857773e-17   0.0000000000e+00    -1.7110393100e-18   -3.4209059591e-18   -5.1284280901e-18   
+-6.8337064000e-18   -8.5357278306e-18   -1.0232845977e-17   -1.1924448088e-17   -1.3610237128e-17   
+-1.5288099371e-17   -1.6956876621e-17   -1.8620595905e-17   -2.0273842385e-17   -2.1915464478e-17   
+-2.3546495699e-17   -2.5165078303e-17   -2.6769060519e-17   -2.8359930740e-17   -2.9939757310e-17   
+-3.1502467781e-17   -3.3046944591e-17   -3.4576845155e-17   -3.6086712127e-17   -3.7575450695e-17   
+-3.9056271711e-17   -4.0522233579e-17   -4.1965347502e-17   -4.3388472157e-17   -4.4794957955e-17   
+-4.6176065472e-17   -4.7530720903e-17   -4.8877709549e-17   -5.0197115341e-17   -5.1487868820e-17   
+-5.2772539356e-17   -5.4039509805e-17   -5.5276128953e-17   -5.6491339385e-17   -5.7694808176e-17   
+-5.8865756485e-17   -6.0003096402e-17   -6.1145829164e-17   -6.2253945479e-17   -6.3326331943e-17   
+-6.4400771952e-17   -6.5457853482e-17   -6.6477198880e-17   -6.7477714435e-17   -6.8479044739e-17   
+-6.9440229426e-17   -7.0360060672e-17   -7.1317159844e-17   -7.2231511699e-17   -7.3101819114e-17   
+-7.3986857334e-17   -7.4855931431e-17   -7.5677753585e-17   -7.6450953780e-17   -7.7174193104e-17   
+-7.7846165213e-17   -7.8465597789e-17   0.0000000000e+00    -1.7174734222e-18   -3.4337697738e-18   
+-5.1477127912e-18   -6.8594743360e-18   -8.5680461615e-18   -1.0271748839e-17   -1.1969997827e-17   
+-1.3662542804e-17   -1.5347208434e-17   -1.7022831364e-17   -1.8693741361e-17   -2.0354264509e-17   
+-2.2003243134e-17   -2.3641834052e-17   -2.5268130344e-17   -2.6879912973e-17   -2.8478818836e-17   
+-3.0067098572e-17   -3.1638377271e-17   -3.3191528732e-17   -3.4730484812e-17   -3.6249519830e-17   
+-3.7747529119e-17   -3.9238563307e-17   -4.0715321419e-17   -4.2169392013e-17   -4.3603855026e-17   
+-4.5022310290e-17   -4.6415547877e-17   -4.7782478104e-17   -4.9143049958e-17   -5.0476208817e-17   
+-5.1780865975e-17   -5.3080975752e-17   -5.4364272062e-17   -5.5617391939e-17   -5.6849848740e-17   
+-5.8071922002e-17   -5.9261633747e-17   -6.0417866236e-17   -6.1581972960e-17   -6.2711597750e-17   
+-6.3805591417e-17   -6.4904012695e-17   -6.5986322744e-17   -6.7030958123e-17   -6.8057973416e-17   
+-6.9088203811e-17   -7.0078274599e-17   -7.1026925514e-17   -7.2017470160e-17   -7.2965151992e-17   
+-7.3868611179e-17   -7.4790130246e-17   -7.5697200333e-17   -7.6556682743e-17   -7.7367133683e-17   
+-7.8127140611e-17   -7.8835323785e-17   -7.9490337805e-17   0.0000000000e+00    -1.7239075343e-18   
+-3.4466335886e-18   -5.1669974923e-18   -6.8852422721e-18   -8.6003644924e-18   -1.0310651701e-17   
+-1.2015547566e-17   -1.3714848481e-17   -1.5406317496e-17   -1.7088786107e-17   -1.8766886817e-17   
+-2.0434686633e-17   -2.2091021790e-17   -2.3737172405e-17   -2.5371182386e-17   -2.6990765427e-17   
+-2.8597706932e-17   -3.0194439835e-17   -3.1774286762e-17   -3.3336112873e-17   -3.4884124469e-17   
+-3.6412327532e-17   -3.7919607543e-17   -3.9420854903e-17   -4.0908409259e-17   -4.2373436524e-17   
+-4.3819237894e-17   -4.5249662624e-17   -4.6655030282e-17   -4.8034235306e-17   -4.9408390367e-17   
+-5.0755302293e-17   -5.2073863129e-17   -5.3389412147e-17   -5.4689034319e-17   -5.5958654925e-17   
+-5.7208358095e-17   -5.8449035828e-17   -5.9657511009e-17   -6.0832636071e-17   -6.2018116756e-17   
+-6.3169250021e-17   -6.4284850891e-17   -6.5407253437e-17   -6.6514792006e-17   -6.7584717366e-17   
+-6.8638232398e-17   -6.9697362883e-17   -7.0716319772e-17   -7.1693790355e-17   -7.2717780477e-17   
+-7.3698792285e-17   -7.4635403243e-17   -7.5593403159e-17   -7.6538469234e-17   -7.7435611900e-17   
+-7.8283313586e-17   -7.9080088118e-17   -7.9824482358e-17   -8.0515077821e-17   0.0000000000e+00    
+-1.7303416465e-18   -3.4594974033e-18   -5.1862821934e-18   -6.9110102081e-18   -8.6326828233e-18   
+-1.0349554563e-17   -1.2061097306e-17   -1.3767154157e-17   -1.5465426559e-17   -1.7154740850e-17   
+-1.8840032274e-17   -2.0515108756e-17   -2.2178800446e-17   -2.3832510758e-17   -2.5474234427e-17   
+-2.7101617880e-17   -2.8716595028e-17   -3.0321781097e-17   -3.1910196253e-17   -3.3480697014e-17   
+-3.5037764126e-17   -3.6575135234e-17   -3.8091685967e-17   -3.9603146499e-17   -4.1101497099e-17   
+-4.2577481035e-17   -4.4034620763e-17   -4.5477014958e-17   -4.6894512687e-17   -4.8285992508e-17   
+-4.9673730775e-17   -5.1034395769e-17   -5.2366860284e-17   -5.3697848543e-17   -5.5013796576e-17   
+-5.6299917912e-17   -5.7566867450e-17   -5.8826149654e-17   -6.0053388271e-17   -6.1247405905e-17   
+-6.2454260552e-17   -6.3626902292e-17   -6.4764110365e-17   -6.5910494180e-17   -6.7043261269e-17   
+-6.8138476610e-17   -6.9218491379e-17   -7.0306521954e-17   -7.1354364945e-17   -7.2360655197e-17   
+-7.3418090793e-17   -7.4432432578e-17   -7.5402195308e-17   -7.6396676071e-17   -7.7379738136e-17   
+-7.8314541058e-17   -7.9199493489e-17   -8.0033035625e-17   -8.0813640930e-17   -8.1539817837e-17   
+0.0000000000e+00    -1.7367757587e-18   -3.4723612180e-18   -5.2055668944e-18   -6.9367781441e-18   
+-8.6650011542e-18   -1.0388457425e-17   -1.2106647045e-17   -1.3819459834e-17   -1.5524535622e-17   
+-1.7220695593e-17   -1.8913177730e-17   -2.0595530880e-17   -2.2266579101e-17   -2.3927849111e-17   
+-2.5577286469e-17   -2.7212470334e-17   -2.8835483124e-17   -3.0449122359e-17   -3.2046105743e-17   
+-3.3625281155e-17   -3.5191403784e-17   -3.6737942936e-17   -3.8263764392e-17   -3.9785438096e-17   
+-4.1294584940e-17   -4.2781525547e-17   -4.4250003632e-17   -4.5704367293e-17   -4.7133995093e-17   
+-4.8537749709e-17   -4.9939071184e-17   -5.1313489244e-17   -5.2659857438e-17   -5.4006284938e-17   
+-5.5338558832e-17   -5.6641180898e-17   -5.7925376805e-17   -5.9203263480e-17   -6.0449265533e-17   
+-6.1662175740e-17   -6.2890404348e-17   -6.4084554563e-17   -6.5243369840e-17   -6.6413734923e-17   
+-6.7571730531e-17   -6.8692235853e-17   -6.9798750360e-17   -7.0915681026e-17   -7.1992410118e-17   
+-7.3027520039e-17   -7.4118401110e-17   -7.5166072871e-17   -7.6168987372e-17   -7.7199948983e-17   
+-7.8221007037e-17   -7.9193470216e-17   -8.0115673392e-17   -8.0985983131e-17   -8.1802799502e-17   
+-8.2564557853e-17   0.0000000000e+00    -1.7432098709e-18   -3.4852250328e-18   -5.2248515955e-18   
+-6.9625460802e-18   -8.6973194851e-18   -1.0427360287e-17   -1.2152196784e-17   -1.3871765510e-17   
+-1.5583644684e-17   -1.7286650336e-17   -1.8986323186e-17   -2.0675953003e-17   -2.2354357757e-17   
+-2.4023187464e-17   -2.5680338510e-17   -2.7323322787e-17   -2.8954371220e-17   -3.0576463622e-17   
+-3.2182015234e-17   -3.3769865295e-17   -3.5345043441e-17   -3.6900750638e-17   -3.8435842816e-17   
+-3.9967729692e-17   -4.1487672780e-17   -4.2985570058e-17   -4.4465386501e-17   -4.5931719627e-17   
+-4.7373477498e-17   -4.8789506911e-17   -5.0204411593e-17   -5.1592582720e-17   -5.2952854593e-17   
+-5.4314721334e-17   -5.5663321089e-17   -5.6982443884e-17   -5.8283886160e-17   -5.9580377306e-17   
+-6.0845142795e-17   -6.2076945574e-17   -6.3326548143e-17   -6.4542206834e-17   -6.5722629314e-17   
+-6.6916975666e-17   -6.8100199793e-17   -6.9245995096e-17   -7.0379009341e-17   -7.1524840098e-17   
+-7.2630455290e-17   -7.3694384881e-17   -7.4818711427e-17   -7.5899713164e-17   -7.6935779436e-17   
+-7.8003221895e-17   -7.9062275939e-17   -8.0072399374e-17   -8.1031853295e-17   -8.1938930638e-17   
+-8.2791958074e-17   -8.3589297869e-17   0.0000000000e+00    -1.7496439830e-18   -3.4980888475e-18   
+-5.2441362966e-18   -6.9883140162e-18   -8.7296378160e-18   -1.0466263148e-17   -1.2197746524e-17   
+-1.3924071187e-17   -1.5642753747e-17   -1.7352605079e-17   -1.9059468643e-17   -2.0756375127e-17   
+-2.2442136413e-17   -2.4118525817e-17   -2.5783390552e-17   -2.7434175241e-17   -2.9073259316e-17   
+-3.0703804884e-17   -3.2317924725e-17   -3.3914449436e-17   -3.5498683098e-17   -3.7063558341e-17   
+-3.8607921240e-17   -4.0150021288e-17   -4.1680760620e-17   -4.3189614569e-17   -4.4680769369e-17   
+-4.6159071961e-17   -4.7612959903e-17   -4.9041264113e-17   -5.0469752002e-17   -5.1871676196e-17   
+-5.3245851748e-17   -5.4623157730e-17   -5.5988083346e-17   -5.7323706871e-17   -5.8642395516e-17   
+-5.9957491132e-17   -6.1241020057e-17   -6.2491715409e-17   -6.3762691939e-17   -6.4999859105e-17   
+-6.6201888788e-17   -6.7420216409e-17   -6.8628669055e-17   -6.9799754339e-17   -7.0959268322e-17   
+-7.2133999170e-17   -7.3268500463e-17   -7.4361249723e-17   -7.5519021743e-17   -7.6633353457e-17   
+-7.7702571501e-17   -7.8806494807e-17   -7.9903544840e-17   -8.0951328532e-17   -8.1948033197e-17   
+-8.2891878145e-17   -8.3781116646e-17   -8.4614037885e-17   0.0000000000e+00    -1.7560780952e-18   
+-3.5109526622e-18   -5.2634209977e-18   -7.0140819522e-18   -8.7619561469e-18   -1.0505166010e-17   
+-1.2243296263e-17   -1.3976376863e-17   -1.5701862810e-17   -1.7418559822e-17   -1.9132614099e-17   
+-2.0836797250e-17   -2.2529915069e-17   -2.4213864170e-17   -2.5886442594e-17   -2.7545027695e-17   
+-2.9192147412e-17   -3.0831146146e-17   -3.2453834215e-17   -3.4059033577e-17   -3.5652322755e-17   
+-3.7226366043e-17   -3.8779999664e-17   -4.0332312884e-17   -4.1873848461e-17   -4.3393659080e-17   
+-4.4896152238e-17   -4.6386424296e-17   -4.7852442308e-17   -4.9293021314e-17   -5.0735092411e-17   
+-5.2150769672e-17   -5.3538848902e-17   -5.4931594125e-17   -5.6312845603e-17   -5.7664969857e-17   
+-5.9000904871e-17   -6.0334604958e-17   -6.1636897319e-17   -6.2906485243e-17   -6.4198835735e-17   
+-6.5457511376e-17   -6.6681148262e-17   -6.7923457152e-17   -6.9157138317e-17   -7.0353513582e-17   
+-7.1539527304e-17   -7.2743158241e-17   -7.3906545636e-17   -7.5028114565e-17   -7.6219332060e-17   
+-7.7366993750e-17   -7.8469363565e-17   -7.9609767719e-17   -8.0744813742e-17   -8.1830257689e-17   
+-8.2864213100e-17   -8.3844825652e-17   -8.4770275218e-17   -8.5638777901e-17   0.0000000000e+00    
+-1.7625122074e-18   -3.5238164770e-18   -5.2827056988e-18   -7.0398498883e-18   -8.7942744778e-18   
+-1.0544068872e-17   -1.2288846002e-17   -1.4028682540e-17   -1.5760971872e-17   -1.7484514565e-17   
+-1.9205759556e-17   -2.0917219374e-17   -2.2617693725e-17   -2.4309202523e-17   -2.5989494635e-17   
+-2.7655880148e-17   -2.9311035508e-17   -3.0958487409e-17   -3.2589743706e-17   -3.4203617718e-17   
+-3.5805962412e-17   -3.7389173745e-17   -3.8952078088e-17   -4.0514604480e-17   -4.2066936301e-17   
+-4.3597703591e-17   -4.5111535107e-17   -4.6613776630e-17   -4.8091924713e-17   -4.9544778516e-17   
+-5.1000432820e-17   -5.2429863148e-17   -5.3831846057e-17   -5.5240030521e-17   -5.6637607860e-17   
+-5.8006232844e-17   -5.9359414226e-17   -6.0711718785e-17   -6.2032774581e-17   -6.3321255078e-17   
+-6.4634979531e-17   -6.5915163647e-17   -6.7160407737e-17   -6.8426697894e-17   -6.9685607579e-17   
+-7.0907272825e-17   -7.2119786285e-17   -7.3352317313e-17   -7.4544590809e-17   -7.5694979407e-17   
+-7.6919642377e-17   -7.8100634043e-17   -7.9236155630e-17   -8.0413040631e-17   -8.1586082643e-17   
+-8.2709186847e-17   -8.3780393003e-17   -8.4797773159e-17   -8.5759433790e-17   -8.6663517917e-17   
+0.0000000000e+00    -1.7689463196e-18   -3.5366802917e-18   -5.3019903998e-18   -7.0656178243e-18   
+-8.8265928087e-18   -1.0582971734e-17   -1.2334395742e-17   -1.4080988216e-17   -1.5820080935e-17   
+-1.7550469308e-17   -1.9278905012e-17   -2.0997641498e-17   -2.2705472380e-17   -2.4404540876e-17   
+-2.6092546677e-17   -2.7766732602e-17   -2.9429923604e-17   -3.1085828671e-17   -3.2725653197e-17   
+-3.4348201858e-17   -3.5959602069e-17   -3.7551981447e-17   -3.9124156512e-17   -4.0696896076e-17   
+-4.2260024141e-17   -4.3801748102e-17   -4.5326917976e-17   -4.6841128964e-17   -4.8331407119e-17   
+-4.9796535718e-17   -5.1265773228e-17   -5.2708956624e-17   -5.4124843211e-17   -5.5548466916e-17   
+-5.6962370117e-17   -5.8347495830e-17   -5.9717923581e-17   -6.1088832611e-17   -6.2428651843e-17   
+-6.3736024912e-17   -6.5071123327e-17   -6.6372815918e-17   -6.7639667211e-17   -6.8929938637e-17   
+-7.0214076841e-17   -7.1461032068e-17   -7.2700045266e-17   -7.3961476385e-17   -7.5182635982e-17   
+-7.6361844248e-17   -7.7619952693e-17   -7.8834274336e-17   -8.0002947694e-17   -8.1216313544e-17   
+-8.2427351545e-17   -8.3588116005e-17   -8.4696572906e-17   -8.5750720666e-17   -8.6748592363e-17   
+-8.7688257933e-17   0.0000000000e+00    -1.7753804318e-18   -3.5495441065e-18   -5.3212751009e-18   
+-7.0913857603e-18   -8.8589111396e-18   -1.0621874596e-17   -1.2379945481e-17   -1.4133293893e-17   
+-1.5879189998e-17   -1.7616424051e-17   -1.9352050468e-17   -2.1078063621e-17   -2.2793251036e-17   
+-2.4499879229e-17   -2.6195598718e-17   -2.7877585055e-17   -2.9548811700e-17   -3.1213169933e-17   
+-3.2861562687e-17   -3.4492785999e-17   -3.6113241726e-17   -3.7714789149e-17   -3.9296234936e-17   
+-4.0879187672e-17   -4.2453111981e-17   -4.4005792613e-17   -4.5542300844e-17   -4.7068481298e-17   
+-4.8570889524e-17   -5.0048292919e-17   -5.1531113637e-17   -5.2988050099e-17   -5.4417840366e-17   
+-5.5856903312e-17   -5.7287132374e-17   -5.8688758816e-17   -6.0076432936e-17   -6.1465946437e-17   
+-6.2824529105e-17   -6.4150794747e-17   -6.5507267123e-17   -6.6830468189e-17   -6.8118926685e-17   
+-6.9433179380e-17   -7.0742546104e-17   -7.2014791311e-17   -7.3280304247e-17   -7.4570635457e-17   
+-7.5820681155e-17   -7.7028709090e-17   -7.8320263010e-17   -7.9567914629e-17   -8.0769739758e-17   
+-8.2019586456e-17   -8.3268620446e-17   -8.4467045163e-17   -8.5612752809e-17   -8.6703668173e-17   
+-8.7737750935e-17   -8.8712997949e-17   0.0000000000e+00    -1.7818145439e-18   -3.5624079212e-18   
+-5.3405598020e-18   -7.1171536964e-18   -8.8912294705e-18   -1.0660777458e-17   -1.2425495220e-17   
+-1.4185599569e-17   -1.5938299060e-17   -1.7682378794e-17   -1.9425195925e-17   -2.1158485745e-17   
+-2.2881029692e-17   -2.4595217582e-17   -2.6298650760e-17   -2.7988437509e-17   -2.9667699796e-17   
+-3.1340511196e-17   -3.2997472178e-17   -3.4637370140e-17   -3.6266881383e-17   -3.7877596851e-17   
+-3.9468313360e-17   -4.1061479268e-17   -4.2646199822e-17   -4.4209837124e-17   -4.5757683713e-17   
+-4.7295833633e-17   -4.8810371929e-17   -5.0300050121e-17   -5.1796454046e-17   -5.3267143575e-17   
+-5.4710837521e-17   -5.6165339707e-17   -5.7611894631e-17   -5.9030021803e-17   -6.0434942291e-17   
+-6.1843060263e-17   -6.3220406367e-17   -6.4565564581e-17   -6.5943410918e-17   -6.7288120460e-17   
+-6.8598186159e-17   -6.9936420123e-17   -7.1271015366e-17   -7.2568550555e-17   -7.3860563228e-17   
+-7.5179794528e-17   -7.6458726328e-17   -7.7695573932e-17   -7.9020573327e-17   -8.0301554922e-17   
+-8.1536531823e-17   -8.2822859368e-17   -8.4109889348e-17   -8.5345974321e-17   -8.6528932712e-17   
+-8.7656615680e-17   -8.8726909507e-17   -8.9737737965e-17   0.0000000000e+00    -1.7882486561e-18   
+-3.5752717359e-18   -5.3598445031e-18   -7.1429216324e-18   -8.9235478014e-18   -1.0699680320e-17   
+-1.2471044960e-17   -1.4237905246e-17   -1.5997408123e-17   -1.7748333537e-17   -1.9498341381e-17   
+-2.1238907868e-17   -2.2968808348e-17   -2.4690555935e-17   -2.6401702801e-17   -2.8099289962e-17   
+-2.9786587892e-17   -3.1467852458e-17   -3.3133381669e-17   -3.4781954281e-17   -3.6420521040e-17   
+-3.8040404554e-17   -3.9640391784e-17   -4.1243770865e-17   -4.2839287662e-17   -4.4413881635e-17   
+-4.5973066582e-17   -4.7523185967e-17   -4.9049854334e-17   -5.0551807323e-17   -5.2061794455e-17   
+-5.3546237051e-17   -5.5003834675e-17   -5.6473776103e-17   -5.7936656887e-17   -5.9371284789e-17   
+-6.0793451646e-17   -6.2220174089e-17   -6.3616283629e-17   -6.4980334416e-17   -6.6379554714e-17   
+-6.7745772731e-17   -6.9077445634e-17   -7.0439660866e-17   -7.1799484628e-17   -7.3122309798e-17   
+-7.4440822209e-17   -7.5788953600e-17   -7.7096771501e-17   -7.8362438774e-17   -7.9720883643e-17   
+-8.1035195215e-17   -8.2303323887e-17   -8.3626132280e-17   -8.4951158249e-17   -8.6224903479e-17   
+-8.7445112615e-17   -8.8609563187e-17   -8.9716068079e-17   -9.0762477981e-17   0.0000000000e+00    
+-1.7946827683e-18   -3.5881355507e-18   -5.3791292042e-18   -7.1686895684e-18   -8.9558661323e-18   
+-1.0738583182e-17   -1.2516594699e-17   -1.4290210922e-17   -1.6056517186e-17   -1.7814288280e-17   
+-1.9571486837e-17   -2.1319329992e-17   -2.3056587004e-17   -2.4785894288e-17   -2.6504754843e-17   
+-2.8210142416e-17   -2.9905475989e-17   -3.1595193720e-17   -3.3269291159e-17   -3.4926538422e-17   
+-3.6574160697e-17   -3.8203212256e-17   -3.9812470208e-17   -4.1426062461e-17   -4.3032375502e-17   
+-4.4617926146e-17   -4.6188449451e-17   -4.7750538301e-17   -4.9289336739e-17   -5.0803564524e-17   
+-5.2327134864e-17   -5.3825330527e-17   -5.5296831830e-17   -5.6782212498e-17   -5.8261419144e-17   
+-5.9712547775e-17   -6.1151961002e-17   -6.2597287915e-17   -6.4012160891e-17   -6.5395104250e-17   
+-6.6815698510e-17   -6.8203425002e-17   -6.9556705108e-17   -7.0942901609e-17   -7.2327953890e-17   
+-7.3676069041e-17   -7.5021081191e-17   -7.6398112672e-17   -7.7734816674e-17   -7.9029303616e-17   
+-8.0421193960e-17   -8.1768835507e-17   -8.3070115952e-17   -8.4429405192e-17   -8.5792427151e-17   
+-8.7103832636e-17   -8.8361292518e-17   -8.9562510694e-17   -9.0705226651e-17   -9.1787217997e-17   
+0.0000000000e+00    -1.8011168805e-18   -3.6009993654e-18   -5.3984139052e-18   -7.1944575045e-18   
+-8.9881844632e-18   -1.0777486044e-17   -1.2562144438e-17   -1.4342516599e-17   -1.6115626248e-17   
+-1.7880243023e-17   -1.9644632294e-17   -2.1399752115e-17   -2.3144365659e-17   -2.4881232641e-17   
+-2.6607806884e-17   -2.8320994870e-17   -3.0024364085e-17   -3.1722534983e-17   -3.3405200650e-17   
+-3.5071122562e-17   -3.6727800354e-17   -3.8366019958e-17   -3.9984548632e-17   -4.1608354057e-17   
+-4.3225463342e-17   -4.4821970657e-17   -4.6403832319e-17   -4.7977890636e-17   -4.9528819144e-17   
+-5.1055321726e-17   -5.2592475273e-17   -5.4104424003e-17   -5.5589828985e-17   -5.7090648894e-17   
+-5.8586181401e-17   -6.0053810762e-17   -6.1510470357e-17   -6.2974401741e-17   -6.4408038153e-17   
+-6.5809874084e-17   -6.7251842306e-17   -6.8661077273e-17   -7.0035964582e-17   -7.1446142351e-17   
+-7.2856423152e-17   -7.4229828284e-17   -7.5601340172e-17   -7.7007271744e-17   -7.8372861847e-17   
+-7.9696168458e-17   -8.1121504277e-17   -8.2502475800e-17   -8.3836908016e-17   -8.5232678104e-17   
+-8.6633696052e-17   -8.7982761794e-17   -8.9277472421e-17   -9.0515458201e-17   -9.1694385223e-17   
+-9.2811958012e-17   0.0000000000e+00    -1.8075509926e-18   -3.6138631801e-18   -5.4176986063e-18   
+-7.2202254405e-18   -9.0205027941e-18   -1.0816388906e-17   -1.2607694177e-17   -1.4394822275e-17   
+-1.6174735311e-17   -1.7946197766e-17   -1.9717777750e-17   -2.1480174239e-17   -2.3232144315e-17   
+-2.4976570994e-17   -2.6710858926e-17   -2.8431847323e-17   -3.0143252181e-17   -3.1849876245e-17   
+-3.3541110141e-17   -3.5215706703e-17   -3.6881440011e-17   -3.8528827660e-17   -4.0156627056e-17   
+-4.1790645653e-17   -4.3418551183e-17   -4.5026015168e-17   -4.6619215188e-17   -4.8205242970e-17   
+-4.9768301550e-17   -5.1307078928e-17   -5.2857815681e-17   -5.4383517479e-17   -5.5882826139e-17   
+-5.7399085290e-17   -5.8910943658e-17   -6.0395073748e-17   -6.1868979712e-17   -6.3351515567e-17   
+-6.4803915415e-17   -6.6224643919e-17   -6.7687986102e-17   -6.9118729543e-17   -7.0515224056e-17   
+-7.1949383094e-17   -7.3384892414e-17   -7.4783587527e-17   -7.6181599153e-17   -7.7616430816e-17   
+-7.9010907020e-17   -8.0363033300e-17   -8.1821814593e-17   -8.3236116093e-17   -8.4603700080e-17   
+-8.6035951016e-17   -8.7474964954e-17   -8.8861690952e-17   -9.0193652323e-17   -9.1468405708e-17   
+-9.2683543796e-17   -9.3836698028e-17   0.0000000000e+00    -1.8139851048e-18   -3.6267269949e-18   
+-5.4369833074e-18   -7.2459933765e-18   -9.0528211250e-18   -1.0855291768e-17   -1.2653243917e-17   
+-1.4447127952e-17   -1.6233844373e-17   -1.8012152509e-17   -1.9790923206e-17   -2.1560596363e-17   
+-2.3319922971e-17   -2.5071909347e-17   -2.6813910967e-17   -2.8542699777e-17   -3.0262140277e-17   
+-3.1977217507e-17   -3.3677019631e-17   -3.5360290844e-17   -3.7035079668e-17   -3.8691635362e-17   
+-4.0328705480e-17   -4.1972937249e-17   -4.3611639023e-17   -4.5230059679e-17   -4.6834598057e-17   
+-4.8432595304e-17   -5.0007783955e-17   -5.1558836129e-17   -5.3123156090e-17   -5.4662610954e-17   
+-5.6175823294e-17   -5.7707521685e-17   -5.9235705915e-17   -6.0736336735e-17   -6.2227489067e-17   
+-6.3728629393e-17   -6.5199792677e-17   -6.6639413753e-17   -6.8124129898e-17   -6.9576381814e-17   
+-7.0994483531e-17   -7.2452623837e-17   -7.3913361676e-17   -7.5337346770e-17   -7.6761858134e-17   
+-7.8225589887e-17   -7.9648952193e-17   -8.1029898142e-17   -8.2522124910e-17   -8.3969756386e-17   
+-8.5370492145e-17   -8.6839223929e-17   -8.8316233855e-17   -8.9740620110e-17   -9.1109832226e-17   
+-9.2421353215e-17   -9.3672702368e-17   -9.4861438044e-17   0.0000000000e+00    -1.8204192170e-18   
+-3.6395908096e-18   -5.4562680085e-18   -7.2717613126e-18   -9.0851394559e-18   -1.0894194630e-17   
+-1.2698793656e-17   -1.4499433628e-17   -1.6292953436e-17   -1.8078107252e-17   -1.9864068663e-17   
+-2.1641018486e-17   -2.3407701627e-17   -2.5167247700e-17   -2.6916963009e-17   -2.8653552230e-17   
+-3.0381028373e-17   -3.2104558770e-17   -3.3812929122e-17   -3.5504874985e-17   -3.7188719325e-17   
+-3.8854443064e-17   -4.0500783904e-17   -4.2155228845e-17   -4.3804726863e-17   -4.5434104190e-17   
+-4.7049980926e-17   -4.8659947639e-17   -5.0247266360e-17   -5.1810593331e-17   -5.3388496499e-17   
+-5.4941704430e-17   -5.6468820448e-17   -5.8015958081e-17   -5.9560468172e-17   -6.1077599721e-17   
+-6.2585998422e-17   -6.4105743219e-17   -6.5595669939e-17   -6.7054183588e-17   -6.8560273693e-17   
+-7.0034034085e-17   -7.1473743005e-17   -7.2955864580e-17   -7.4441830939e-17   -7.5891106013e-17   
+-7.7342117115e-17   -7.8834748959e-17   -8.0286997366e-17   -8.1696762983e-17   -8.3222435226e-17   
+-8.4703396679e-17   -8.6137284209e-17   -8.7642496841e-17   -8.9157502757e-17   -9.0619549268e-17   
+-9.2026012129e-17   -9.3374300722e-17   -9.4661860940e-17   -9.5886178060e-17   0.0000000000e+00    
+-1.8268533292e-18   -3.6524546243e-18   -5.4755527096e-18   -7.2975292486e-18   -9.1174577868e-18   
+-1.0933097492e-17   -1.2744343395e-17   -1.4551739305e-17   -1.6352062499e-17   -1.8144061995e-17   
+-1.9937214119e-17   -2.1721440610e-17   -2.3495480283e-17   -2.5262586053e-17   -2.7020015050e-17   
+-2.8764404684e-17   -3.0499916469e-17   -3.2231900032e-17   -3.3948838613e-17   -3.5649459125e-17   
+-3.7342358982e-17   -3.9017250767e-17   -4.0672862328e-17   -4.2337520441e-17   -4.3997814704e-17   
+-4.5638148701e-17   -4.7265363794e-17   -4.8887299973e-17   -5.0486748765e-17   -5.2062350533e-17   
+-5.3653836908e-17   -5.5220797906e-17   -5.6761817603e-17   -5.8324394476e-17   -5.9885230429e-17   
+-6.1418862707e-17   -6.2944507777e-17   -6.4482857046e-17   -6.5991547201e-17   -6.7468953422e-17   
+-6.8996417489e-17   -7.0491686356e-17   -7.1953002479e-17   -7.3459105323e-17   -7.4970300201e-17   
+-7.6444865256e-17   -7.7922376097e-17   -7.9443908031e-17   -8.0925042539e-17   -8.2363627825e-17   
+-8.3922745543e-17   -8.5437036972e-17   -8.6904076274e-17   -8.8445769753e-17   -8.9998771658e-17   
+-9.1498478425e-17   -9.2942192032e-17   -9.4327248229e-17   -9.5651019512e-17   -9.6910918076e-17   
+0.0000000000e+00    -1.8332874414e-18   -3.6653184391e-18   -5.4948374106e-18   -7.3232971846e-18   
+-9.1497761177e-18   -1.0972000354e-17   -1.2789893135e-17   -1.4604044981e-17   -1.6411171561e-17   
+-1.8210016738e-17   -2.0010359575e-17   -2.1801862733e-17   -2.3583258939e-17   -2.5357924406e-17   
+-2.7123067092e-17   -2.8875257138e-17   -3.0618804565e-17   -3.2359241294e-17   -3.4084748103e-17   
+-3.5794043266e-17   -3.7495998639e-17   -3.9180058469e-17   -4.0844940752e-17   -4.2519812038e-17   
+-4.4190902544e-17   -4.5842193212e-17   -4.7480746663e-17   -4.9114652307e-17   -5.0726231170e-17   
+-5.2314107734e-17   -5.3919177317e-17   -5.5499891382e-17   -5.7054814758e-17   -5.8632830872e-17   
+-6.0209992686e-17   -6.1760125694e-17   -6.3303017132e-17   -6.4859970872e-17   -6.6387424463e-17   
+-6.7883723257e-17   -6.9432561285e-17   -7.0949338627e-17   -7.2432261953e-17   -7.3962346066e-17   
+-7.5498769463e-17   -7.6998624500e-17   -7.8502635078e-17   -8.0053067103e-17   -8.1563087712e-17   
+-8.3030492667e-17   -8.4623055860e-17   -8.6170677265e-17   -8.7670868338e-17   -8.9249042665e-17   
+-9.0840040560e-17   -9.2377407583e-17   -9.3858371935e-17   -9.5280195736e-17   -9.6640178084e-17   
+-9.7935658092e-17   0.0000000000e+00    -1.8397215535e-18   -3.6781822538e-18   -5.5141221117e-18   
+-7.3490651207e-18   -9.1820944486e-18   -1.1010903216e-17   -1.2835442874e-17   -1.4656350658e-17   
+-1.6470280624e-17   -1.8275971481e-17   -2.0083505032e-17   -2.1882284857e-17   -2.3671037594e-17   
+-2.5453262759e-17   -2.7226119134e-17   -2.8986109591e-17   -3.0737692661e-17   -3.2486582557e-17   
+-3.4220657594e-17   -3.5938627407e-17   -3.7649638296e-17   -3.9342866171e-17   -4.1017019176e-17   
+-4.2702103634e-17   -4.4383990384e-17   -4.6046237724e-17   -4.7696129532e-17   -4.9342004641e-17   
+-5.0965713576e-17   -5.2565864936e-17   -5.4184517726e-17   -5.5778984858e-17   -5.7347811912e-17   
+-5.8941267267e-17   -6.0534754942e-17   -6.2101388680e-17   -6.3661526488e-17   -6.5237084698e-17   
+-6.6783301725e-17   -6.8298493091e-17   -6.9868705081e-17   -7.1406990898e-17   -7.2911521428e-17   
+-7.4465586808e-17   -7.6027238725e-17   -7.7552383743e-17   -7.9082894059e-17   -8.0662226174e-17   
+-8.2201132885e-17   -8.3697357509e-17   -8.5323366176e-17   -8.6904317558e-17   -8.8437660402e-17   
+-9.0052315577e-17   -9.1681309461e-17   -9.3256336741e-17   -9.4774551838e-17   -9.6233143242e-17   
+-9.7629336656e-17   -9.8960398108e-17   0.0000000000e+00    -1.8461556657e-18   -3.6910460686e-18   
+-5.5334068128e-18   -7.3748330567e-18   -9.2144127795e-18   -1.1049806078e-17   -1.2880992613e-17   
+-1.4708656334e-17   -1.6529389687e-17   -1.8341926224e-17   -2.0156650488e-17   -2.1962706980e-17   
+-2.3758816250e-17   -2.5548601112e-17   -2.7329171175e-17   -2.9096962045e-17   -3.0856580757e-17   
+-3.2613923819e-17   -3.4356567085e-17   -3.6083211548e-17   -3.7803277953e-17   -3.9505673873e-17   
+-4.1189097601e-17   -4.2884395230e-17   -4.4577078224e-17   -4.6250282235e-17   -4.7911512401e-17   
+-4.9569356976e-17   -5.1205195981e-17   -5.2817622138e-17   -5.4449858134e-17   -5.6058078333e-17   
+-5.7640809067e-17   -5.9249703663e-17   -6.0859517199e-17   -6.2442651666e-17   -6.4020035843e-17   
+-6.5614198524e-17   -6.7179178987e-17   -6.8713262926e-17   -7.0304848877e-17   -7.1864643169e-17   
+-7.3390780902e-17   -7.4968827551e-17   -7.6555707987e-17   -7.8106142986e-17   -7.9663153040e-17   
+-8.1271385246e-17   -8.2839178058e-17   -8.4364222351e-17   -8.6023676493e-17   -8.7637957851e-17   
+-8.9204452467e-17   -9.0855588489e-17   -9.2522578363e-17   -9.4135265899e-17   -9.5690731741e-17   
+-9.7186090749e-17   -9.8618495228e-17   -9.9985138124e-17   0.0000000000e+00    -1.8525897779e-18   
+-3.7039098833e-18   -5.5526915139e-18   -7.4006009927e-18   -9.2467311104e-18   -1.1088708940e-17   
+-1.2926542353e-17   -1.4760962011e-17   -1.6588498749e-17   -1.8407880967e-17   -2.0229795944e-17   
+-2.2043129104e-17   -2.3846594906e-17   -2.5643939465e-17   -2.7432223217e-17   -2.9207814498e-17   
+-3.0975468853e-17   -3.2741265081e-17   -3.4492476575e-17   -3.6227795689e-17   -3.7956917610e-17   
+-3.9668481575e-17   -4.1361176025e-17   -4.3066686826e-17   -4.4770166065e-17   -4.6454326746e-17   
+-4.8126895269e-17   -4.9796709310e-17   -5.1444678386e-17   -5.3069379339e-17   -5.4715198543e-17   
+-5.6337171809e-17   -5.7933806221e-17   -5.9558140058e-17   -6.1184279456e-17   -6.2783914653e-17   
+-6.4378545198e-17   -6.5991312350e-17   -6.7575056249e-17   -6.9128032760e-17   -7.0740992673e-17   
+-7.2322295440e-17   -7.3870040376e-17   -7.5472068294e-17   -7.7084177249e-17   -7.8659902229e-17   
+-8.0243412021e-17   -8.1880544318e-17   -8.3477223231e-17   -8.5031087193e-17   -8.6723986810e-17   
+-8.8371598144e-17   -8.9971244531e-17   -9.1658861401e-17   -9.3363847264e-17   -9.5014195057e-17   
+-9.6606911644e-17   -9.8139038256e-17   -9.9607653801e-17   -1.0100987814e-16   0.0000000000e+00    
+-1.8590238901e-18   -3.7167736980e-18   -5.5719762150e-18   -7.4263689288e-18   -9.2790494413e-18   
+-1.1127611802e-17   -1.2972092092e-17   -1.4813267687e-17   -1.6647607812e-17   -1.8473835710e-17   
+-2.0302941401e-17   -2.2123551228e-17   -2.3934373562e-17   -2.5739277818e-17   -2.7535275258e-17   
+-2.9318666952e-17   -3.1094356949e-17   -3.2868606344e-17   -3.4628386066e-17   -3.6372379829e-17   
+-3.8110557267e-17   -3.9831289278e-17   -4.1533254449e-17   -4.3248978422e-17   -4.4963253905e-17   
+-4.6658371257e-17   -4.8342278138e-17   -5.0024061644e-17   -5.1684160791e-17   -5.3321136541e-17   
+-5.4980538952e-17   -5.6616265285e-17   -5.8226803376e-17   -5.9866576454e-17   -6.1509041713e-17   
+-6.3125177639e-17   -6.4737054553e-17   -6.6368426176e-17   -6.7970933511e-17   -6.9542802595e-17   
+-7.1177136468e-17   -7.2779947711e-17   -7.4349299850e-17   -7.5975309037e-17   -7.7612646511e-17   
+-7.9213661472e-17   -8.0823671002e-17   -8.2489703390e-17   -8.4115268404e-17   -8.5697952035e-17   
+-8.7424297126e-17   -8.9105238437e-17   -9.0738036595e-17   -9.2462134314e-17   -9.4205116166e-17   
+-9.5893124214e-17   -9.7523091546e-17   -9.9091985763e-17   -1.0059681237e-16   -1.0203461816e-16   
+0.0000000000e+00    -1.8654580023e-18   -3.7296375128e-18   -5.5912609160e-18   -7.4521368648e-18   
+-9.3113677722e-18   -1.1166514664e-17   -1.3017641831e-17   -1.4865573364e-17   -1.6706716875e-17   
+-1.8539790453e-17   -2.0376086857e-17   -2.2203973351e-17   -2.4022152218e-17   -2.5834616171e-17   
+-2.7638327300e-17   -2.9429519405e-17   -3.1213245045e-17   -3.2995947606e-17   -3.4764295557e-17   
+-3.6516963970e-17   -3.8264196924e-17   -3.9994096980e-17   -4.1705332873e-17   -4.3431270018e-17   
+-4.5156341745e-17   -4.6862415768e-17   -4.8557661007e-17   -5.0251413979e-17   -5.1923643196e-17   
+-5.3572893743e-17   -5.5245879361e-17   -5.6895358761e-17   -5.8519800531e-17   -6.0175012850e-17   
+-6.1833803970e-17   -6.3466440626e-17   -6.5095563908e-17   -6.6745540002e-17   -6.8366810773e-17   
+-6.9957572429e-17   -7.1613280264e-17   -7.3237599982e-17   -7.4828559325e-17   -7.6478549780e-17   
+-7.8141115774e-17   -7.9767420715e-17   -8.1403929984e-17   -8.3098862461e-17   -8.4753313577e-17   
+-8.6364816876e-17   -8.8124607443e-17   -8.9838878730e-17   -9.1504828660e-17   -9.3265407226e-17   
+-9.5046385067e-17   -9.6772053372e-17   -9.8439271449e-17   -1.0004493327e-16   -1.0158597094e-16   
+-1.0305935817e-16   0.0000000000e+00    -1.8718921144e-18   -3.7425013275e-18   -5.6105456171e-18   
+-7.4779048008e-18   -9.3436861031e-18   -1.1205417526e-17   -1.3063191571e-17   -1.4917879040e-17   
+-1.6765825937e-17   -1.8605745196e-17   -2.0449232313e-17   -2.2284395475e-17   -2.4109930873e-17   
+-2.5929954524e-17   -2.7741379341e-17   -2.9540371859e-17   -3.1332133141e-17   -3.3123288868e-17   
+-3.4900205047e-17   -3.6661548111e-17   -3.8417836581e-17   -4.0156904682e-17   -4.1877411297e-17   
+-4.3613561614e-17   -4.5349429586e-17   -4.7066460279e-17   -4.8773043876e-17   -5.0478766313e-17   
+-5.2163125602e-17   -5.3824650944e-17   -5.5511219770e-17   -5.7174452237e-17   -5.8812797685e-17   
+-6.0483449245e-17   -6.2158566227e-17   -6.3807703612e-17   -6.5454073263e-17   -6.7122653828e-17   
+-6.8762688035e-17   -7.0372342264e-17   -7.2049424060e-17   -7.3695252253e-17   -7.5307818799e-17   
+-7.6981790523e-17   -7.8669585036e-17   -8.0321179958e-17   -8.1984188965e-17   -8.3708021533e-17   
+-8.5391358750e-17   -8.7031681718e-17   -8.8824917760e-17   -9.0572519023e-17   -9.2271620724e-17   
+-9.4068680138e-17   -9.5887653969e-17   -9.7650982530e-17   -9.9355451352e-17   -1.0099788078e-16   
+-1.0257512952e-16   -1.0408409819e-16   0.0000000000e+00    -1.8783262266e-18   -3.7553651422e-18   
+-5.6298303182e-18   -7.5036727369e-18   -9.3760044340e-18   -1.1244320388e-17   -1.3108741310e-17   
+-1.4970184717e-17   -1.6824935000e-17   -1.8671699939e-17   -2.0522377770e-17   -2.2364817598e-17   
+-2.4197709529e-17   -2.6025292877e-17   -2.7844431383e-17   -2.9651224313e-17   -3.1451021238e-17   
+-3.3250630131e-17   -3.5036114538e-17   -3.6806132252e-17   -3.8571476238e-17   -4.0319712384e-17   
+-4.2049489721e-17   -4.3795853210e-17   -4.5542517426e-17   -4.7270504790e-17   -4.8988426744e-17   
+-5.0706118647e-17   -5.2402608007e-17   -5.4076408146e-17   -5.5776560179e-17   -5.7453545713e-17   
+-5.9105794840e-17   -6.0791885641e-17   -6.2483328484e-17   -6.4148966598e-17   -6.5812582619e-17   
+-6.7499767654e-17   -6.9158565297e-17   -7.0787112098e-17   -7.2485567856e-17   -7.4152904524e-17   
+-7.5787078273e-17   -7.7485031265e-17   -7.9198054298e-17   -8.0874939202e-17   -8.2564447946e-17   
+-8.4317180605e-17   -8.6029403923e-17   -8.7698546560e-17   -8.9525228076e-17   -9.1306159316e-17   
+-9.3038412789e-17   -9.4871953050e-17   -9.6728922870e-17   -9.8529911688e-17   -1.0027163126e-16   
+-1.0195082828e-16   -1.0356428809e-16   -1.0510883820e-16   0.0000000000e+00    -1.8847603388e-18   
+-3.7682289570e-18   -5.6491150193e-18   -7.5294406729e-18   -9.4083227649e-18   -1.1283223250e-17   
+-1.3154291049e-17   -1.5022490393e-17   -1.6884044063e-17   -1.8737654682e-17   -2.0595523226e-17   
+-2.2445239722e-17   -2.4285488185e-17   -2.6120631230e-17   -2.7947483424e-17   -2.9762076766e-17   
+-3.1569909334e-17   -3.3377971393e-17   -3.5172024029e-17   -3.6950716392e-17   -3.8725115895e-17   
+-4.0482520086e-17   -4.2221568145e-17   -4.3978144807e-17   -4.5735605266e-17   -4.7474549301e-17   
+-4.9203809613e-17   -5.0933470982e-17   -5.2642090412e-17   -5.4328165348e-17   -5.6041900587e-17   
+-5.7732639188e-17   -5.9398791994e-17   -6.1100322036e-17   -6.2808090741e-17   -6.4490229585e-17   
+-6.6171091974e-17   -6.7876881481e-17   -6.9554442559e-17   -7.1201881933e-17   -7.2921711652e-17   
+-7.4610556795e-17   -7.6266337747e-17   -7.7988272008e-17   -7.9726523560e-17   -8.1428698445e-17   
+-8.3144706927e-17   -8.4926339677e-17   -8.6667449096e-17   -8.8365411402e-17   -9.0225538393e-17   
+-9.2039799609e-17   -9.3805204853e-17   -9.5675225962e-17   -9.7570191772e-17   -9.9408840846e-17   
+-1.0118781116e-16   -1.0290377579e-16   -1.0455344666e-16   -1.0613357822e-16   0.0000000000e+00    
+-1.8911944510e-18   -3.7810927717e-18   -5.6683997204e-18   -7.5552086089e-18   -9.4406410958e-18   
+-1.1322126112e-17   -1.3199840788e-17   -1.5074796070e-17   -1.6943153125e-17   -1.8803609425e-17   
+-2.0668668682e-17   -2.2525661845e-17   -2.4373266841e-17   -2.6215969583e-17   -2.8050535466e-17   
+-2.9872929220e-17   -3.1688797430e-17   -3.3505312655e-17   -3.5307933519e-17   -3.7095300533e-17   
+-3.8878755552e-17   -4.0645327788e-17   -4.2393646569e-17   -4.4160436403e-17   -4.5928693106e-17   
+-4.7678593812e-17   -4.9419192482e-17   -5.1160823316e-17   -5.2881572817e-17   -5.4579922549e-17   
+-5.6307240996e-17   -5.8011732664e-17   -5.9691789149e-17   -6.1408758432e-17   -6.3132852998e-17   
+-6.4831492571e-17   -6.6529601329e-17   -6.8253995307e-17   -6.9950319821e-17   -7.1616651767e-17   
+-7.3357855448e-17   -7.5068209066e-17   -7.6745597222e-17   -7.8491512751e-17   -8.0254992822e-17   
+-8.1982457688e-17   -8.3724965908e-17   -8.5535498749e-17   -8.7305494269e-17   -8.9032276244e-17   
+-9.0925848710e-17   -9.2773439901e-17   -9.4571996917e-17   -9.6478498874e-17   -9.8411460673e-17   
+-1.0028777000e-16   -1.0210399106e-16   -1.0385672330e-16   -1.0554260523e-16   -1.0715831824e-16   
+0.0000000000e+00    -1.8976285631e-18   -3.7939565865e-18   -5.6876844214e-18   -7.5809765450e-18   
+-9.4729594267e-18   -1.1361028974e-17   -1.3245390528e-17   -1.5127101746e-17   -1.7002262188e-17   
+-1.8869564168e-17   -2.0741814139e-17   -2.2606083969e-17   -2.4461045497e-17   -2.6311307936e-17   
+-2.8153587507e-17   -2.9983781673e-17   -3.1807685526e-17   -3.3632653918e-17   -3.5443843010e-17   
+-3.7239884674e-17   -3.9032395209e-17   -4.0808135491e-17   -4.2565724993e-17   -4.4342727999e-17   
+-4.6121780947e-17   -4.7882638323e-17   -4.9634575351e-17   -5.1388175650e-17   -5.3121055222e-17   
+-5.4831679751e-17   -5.6572581405e-17   -5.8290826140e-17   -5.9984786304e-17   -6.1717194827e-17   
+-6.3457615254e-17   -6.5172755557e-17   -6.6888110684e-17   -6.8631109133e-17   -7.0346197083e-17   
+-7.2031421601e-17   -7.3793999243e-17   -7.5525861337e-17   -7.7224856696e-17   -7.8994753494e-17   
+-8.0783462084e-17   -8.2536216931e-17   -8.4305224890e-17   -8.6144657820e-17   -8.7943539442e-17   
+-8.9699141086e-17   -9.1626159026e-17   -9.3507080194e-17   -9.5338788982e-17   -9.7281771786e-17   
+-9.9252729575e-17   -1.0116669916e-16   -1.0302017096e-16   -1.0480967080e-16   -1.0653176381e-16   
+-1.0818305825e-16   0.0000000000e+00    -1.9040626753e-18   -3.8068204012e-18   -5.7069691225e-18   
+-7.6067444810e-18   -9.5052777576e-18   -1.1399931836e-17   -1.3290940267e-17   -1.5179407423e-17   
+-1.7061371250e-17   -1.8935518911e-17   -2.0814959595e-17   -2.2686506093e-17   -2.4548824152e-17   
+-2.6406646289e-17   -2.8256639549e-17   -3.0094634127e-17   -3.1926573622e-17   -3.3759995180e-17   
+-3.5579752501e-17   -3.7384468815e-17   -3.9186034866e-17   -4.0970943193e-17   -4.2737803417e-17   
+-4.4525019595e-17   -4.6314868787e-17   -4.8086682834e-17   -4.9849958219e-17   -5.1615527984e-17   
+-5.3360537628e-17   -5.5083436953e-17   -5.6837921814e-17   -5.8569919616e-17   -6.0277783458e-17   
+-6.2025631223e-17   -6.3782377511e-17   -6.5514018544e-17   -6.7246620039e-17   -6.9008222959e-17   
+-7.0742074345e-17   -7.2446191436e-17   -7.4230143039e-17   -7.5983513608e-17   -7.7704116170e-17   
+-7.9497994237e-17   -8.1311931346e-17   -8.3089976174e-17   -8.4885483871e-17   -8.6753816892e-17   
+-8.8581584615e-17   -9.0366005928e-17   -9.2326469343e-17   -9.4240720487e-17   -9.6105581046e-17   
+-9.8085044699e-17   -1.0009399848e-16   -1.0204562832e-16   -1.0393635087e-16   -1.0576261831e-16   
+-1.0752092238e-16   -1.0920779827e-16   0.0000000000e+00    -1.9104967875e-18   -3.8196842159e-18   
+-5.7262538236e-18   -7.6325124170e-18   -9.5375960885e-18   -1.1438834698e-17   -1.3336490006e-17   
+-1.5231713099e-17   -1.7120480313e-17   -1.9001473654e-17   -2.0888105051e-17   -2.2766928216e-17   
+-2.4636602808e-17   -2.6501984642e-17   -2.8359691590e-17   -3.0205486580e-17   -3.2045461718e-17   
+-3.3887336442e-17   -3.5715661991e-17   -3.7529052955e-17   -3.9339674523e-17   -4.1133750895e-17   
+-4.2909881841e-17   -4.4707311191e-17   -4.6507956627e-17   -4.8290727345e-17   -5.0065341088e-17   
+-5.1842880319e-17   -5.3600020033e-17   -5.5335194154e-17   -5.7103262223e-17   -5.8849013092e-17   
+-6.0570780613e-17   -6.2334067618e-17   -6.4107139768e-17   -6.5855281530e-17   -6.7605129394e-17   
+-6.9385336785e-17   -7.1137951607e-17   -7.2860961270e-17   -7.4666286835e-17   -7.6441165879e-17   
+-7.8183375644e-17   -8.0001234980e-17   -8.1840400609e-17   -8.3643735417e-17   -8.5465742852e-17   
+-8.7362975964e-17   -8.9219629788e-17   -9.1032870770e-17   -9.3026779659e-17   -9.4974360780e-17   
+-9.6872373111e-17   -9.8888317611e-17   -1.0093526738e-16   -1.0292455748e-16   -1.0485253077e-16   
+-1.0671556582e-16   -1.0851008095e-16   -1.1023253828e-16   0.0000000000e+00    -1.9169308997e-18   
+-3.8325480307e-18   -5.7455385247e-18   -7.6582803531e-18   -9.5699144194e-18   -1.1477737560e-17   
+-1.3382039746e-17   -1.5284018776e-17   -1.7179589376e-17   -1.9067428397e-17   -2.0961250508e-17   
+-2.2847350340e-17   -2.4724381464e-17   -2.6597322995e-17   -2.8462743632e-17   -3.0316339034e-17   
+-3.2164349814e-17   -3.4014677705e-17   -3.5851571482e-17   -3.7673637096e-17   -3.9493314180e-17   
+-4.1296558597e-17   -4.3081960265e-17   -4.4889602787e-17   -4.6701044468e-17   -4.8494771856e-17   
+-5.0280723957e-17   -5.2070232653e-17   -5.3839502438e-17   -5.5586951356e-17   -5.7368602632e-17   
+-5.9128106568e-17   -6.0863777768e-17   -6.2642504014e-17   -6.4431902025e-17   -6.6196544516e-17   
+-6.7963638749e-17   -6.9762450611e-17   -7.1533828869e-17   -7.3275731105e-17   -7.5102430631e-17   
+-7.6898818150e-17   -7.8662635118e-17   -8.0504475722e-17   -8.2368869871e-17   -8.4197494660e-17   
+-8.6046001833e-17   -8.7972135036e-17   -8.9857674961e-17   -9.1699735611e-17   -9.3727089976e-17   
+-9.5708001073e-17   -9.7639165175e-17   -9.9691590523e-17   -1.0177653628e-16   -1.0380348663e-16   
+-1.0576871067e-16   -1.0766851333e-16   -1.0949923952e-16   -1.1125727830e-16   0.0000000000e+00    
+-1.9233650119e-18   -3.8454118454e-18   -5.7648232258e-18   -7.6840482891e-18   -9.6022327503e-18   
+-1.1516640422e-17   -1.3427589485e-17   -1.5336324452e-17   -1.7238698438e-17   -1.9133383140e-17   
+-2.1034395964e-17   -2.2927772463e-17   -2.4812160120e-17   -2.6692661348e-17   -2.8565795673e-17   
+-3.0427191488e-17   -3.2283237910e-17   -3.4142018967e-17   -3.5987480973e-17   -3.7818221237e-17   
+-3.9646953837e-17   -4.1459366299e-17   -4.3254038689e-17   -4.5071894383e-17   -4.6894132308e-17   
+-4.8698816367e-17   -5.0496106826e-17   -5.2297584987e-17   -5.4078984843e-17   -5.5838708558e-17   
+-5.7633943040e-17   -5.9407200043e-17   -6.1156774922e-17   -6.2950940410e-17   -6.4756664282e-17   
+-6.6537807503e-17   -6.8322148105e-17   -7.0139564437e-17   -7.1929706131e-17   -7.3690500939e-17   
+-7.5538574427e-17   -7.7356470421e-17   -7.9141894593e-17   -8.1007716465e-17   -8.2897339133e-17   
+-8.4751253903e-17   -8.6626260814e-17   -8.8581294107e-17   -9.0495720133e-17   -9.2366600453e-17   
+-9.4427400293e-17   -9.6441641366e-17   -9.8405957239e-17   -1.0049486343e-16   -1.0261780518e-16   
+-1.0468241579e-16   -1.0668489058e-16   -1.0862146083e-16   -1.1048839809e-16   -1.1228201832e-16   
+0.0000000000e+00    -1.9297991240e-18   -3.8582756601e-18   -5.7841079268e-18   -7.7098162251e-18   
+-9.6345510812e-18   -1.1555543284e-17   -1.3473139224e-17   -1.5388630129e-17   -1.7297807501e-17   
+-1.9199337883e-17   -2.1107541420e-17   -2.3008194587e-17   -2.4899938776e-17   -2.6787999701e-17   
+-2.8668847715e-17   -3.0538043941e-17   -3.2402126006e-17   -3.4269360229e-17   -3.6123390463e-17   
+-3.7962805378e-17   -3.9800593494e-17   -4.1622174001e-17   -4.3426117113e-17   -4.5254185980e-17   
+-4.7087220148e-17   -4.8902860878e-17   -5.0711489694e-17   -5.2524937322e-17   -5.4318467248e-17   
+-5.6090465759e-17   -5.7899283449e-17   -5.9686293519e-17   -6.1449772077e-17   -6.3259376805e-17   
+-6.5081426539e-17   -6.6879070489e-17   -6.8680657460e-17   -7.0516678263e-17   -7.2325583393e-17   
+-7.4105270774e-17   -7.5974718223e-17   -7.7814122692e-17   -7.9621154067e-17   -8.1510957208e-17   
+-8.3425808395e-17   -8.5305013147e-17   -8.7206519795e-17   -8.9190453179e-17   -9.1133765306e-17   
+-9.3033465295e-17   -9.5127710609e-17   -9.7175281659e-17   -9.9172749304e-17   -1.0129813635e-16   
+-1.0345907408e-16   -1.0556134495e-16   -1.0760107048e-16   -1.0957440834e-16   -1.1147755667e-16   
+-1.1330675833e-16   
+1.1331676959e+00    1.1342921975e+00    1.1357061692e+00    1.1357192432e+00    1.1344736454e+00    
+1.1323615000e+00    1.1300257086e+00    1.1273619369e+00    1.1242858333e+00    1.1211800613e+00    
+1.1175911275e+00    1.1128927507e+00    1.1078349428e+00    1.1028874025e+00    1.0977532444e+00    
+1.0925730693e+00    1.0874762713e+00    1.0820068707e+00    1.0760412950e+00    1.0701981236e+00    
+1.0645944125e+00    1.0589937887e+00    1.0536803314e+00    1.0482837908e+00    1.0419510485e+00    
+1.0351222223e+00    1.0286166613e+00    1.0223326954e+00    1.0161796310e+00    1.0105765308e+00    
+1.0052467088e+00    9.9972371267e-01    9.9458840182e-01    9.8983863676e-01    9.8477876681e-01    
+9.7977151042e-01    9.7541137937e-01    9.7143097643e-01    9.6773019866e-01    9.6486667495e-01    
+9.6261515924e-01    9.6049996031e-01    9.5917834087e-01    9.5876945187e-01    9.5868220684e-01    
+9.5931204613e-01    9.6125331063e-01    9.6424283689e-01    9.6831280210e-01    9.7436492779e-01    
+9.8234316319e-01    9.9196084390e-01    1.0046349261e+00    1.0213710344e+00    1.0425187788e+00    
+1.0702111694e+00    1.1082618366e+00    1.1620234182e+00    1.2408632114e+00    1.3639019451e+00    
+1.4397159353e+00    1.0346715216e+00    1.0347085914e+00    1.0347448985e+00    1.0347412892e+00    
+1.0347393628e+00    1.0347393767e+00    1.0347352069e+00    1.0347287036e+00    1.0347212267e+00    
+1.0347083741e+00    1.0346957895e+00    1.0346914363e+00    1.0346863787e+00    1.0346748460e+00    
+1.0346606087e+00    1.0346419395e+00    1.0346171518e+00    1.0345922369e+00    1.0345690438e+00    
+1.0345393672e+00    1.0345014326e+00    1.0344583612e+00    1.0344060389e+00    1.0343494261e+00    
+1.0343009138e+00    1.0342544959e+00    1.0341978932e+00    1.0341320970e+00    1.0340581104e+00    
+1.0339689124e+00    1.0338678926e+00    1.0337619878e+00    1.0336413845e+00    1.0335047656e+00    
+1.0333626499e+00    1.0332084049e+00    1.0330305282e+00    1.0328315684e+00    1.0326117272e+00    
+1.0323595823e+00    1.0320757426e+00    1.0317659884e+00    1.0314165413e+00    1.0310205610e+00    
+1.0305836884e+00    1.0300949755e+00    1.0295380531e+00    1.0289090864e+00    1.0281995488e+00    
+1.0273856385e+00    1.0264527661e+00    1.0253890655e+00    1.0241560360e+00    1.0227116467e+00    
+1.0210162568e+00    1.0190012034e+00    1.0165671487e+00    1.0135842769e+00    1.0098667151e+00    
+1.0050644943e+00    1.0023325427e+00    1.0015035205e+00    1.0015073580e+00    1.0015123223e+00    
+1.0015136111e+00    1.0015135782e+00    1.0015128434e+00    1.0015120906e+00    1.0015112360e+00    
+1.0015102008e+00    1.0015093620e+00    1.0015082507e+00    1.0015062147e+00    1.0015039932e+00    
+1.0015020473e+00    1.0015000580e+00    1.0014981645e+00    1.0014964914e+00    1.0014945183e+00    
+1.0014920855e+00    1.0014898682e+00    1.0014879822e+00    1.0014861509e+00    1.0014847067e+00    
+1.0014831734e+00    1.0014804779e+00    1.0014771272e+00    1.0014741100e+00    1.0014712800e+00    
+1.0014685256e+00    1.0014664072e+00    1.0014645229e+00    1.0014622390e+00    1.0014603656e+00    
+1.0014588448e+00    1.0014566766e+00    1.0014543926e+00    1.0014528194e+00    1.0014515252e+00    
+1.0014503731e+00    1.0014501776e+00    1.0014504851e+00    1.0014505752e+00    1.0014514025e+00    
+1.0014529306e+00    1.0014541782e+00    1.0014556343e+00    1.0014578378e+00    1.0014600149e+00    
+1.0014618774e+00    1.0014640143e+00    1.0014652764e+00    1.0014644057e+00    1.0014616065e+00    
+1.0014553341e+00    1.0014428139e+00    1.0014214715e+00    1.0013868328e+00    1.0013307283e+00    
+1.0012395575e+00    1.0010863501e+00    1.0009896166e+00    1.0000533292e+00    1.0000535556e+00    
+1.0000538705e+00    1.0000539946e+00    1.0000540539e+00    1.0000540867e+00    1.0000541384e+00    
+1.0000542033e+00    1.0000542764e+00    1.0000543837e+00    1.0000544942e+00    1.0000545645e+00    
+1.0000546456e+00    1.0000547697e+00    1.0000549163e+00    1.0000550963e+00    1.0000553197e+00    
+1.0000555527e+00    1.0000557867e+00    1.0000560697e+00    1.0000564118e+00    1.0000567973e+00    
+1.0000572523e+00    1.0000577473e+00    1.0000582119e+00    1.0000586858e+00    1.0000592420e+00    
+1.0000598760e+00    1.0000605870e+00    1.0000614228e+00    1.0000623629e+00    1.0000633728e+00    
+1.0000645235e+00    1.0000658231e+00    1.0000672137e+00    1.0000687546e+00    1.0000705297e+00    
+1.0000725321e+00    1.0000747854e+00    1.0000773961e+00    1.0000803715e+00    1.0000837131e+00    
+1.0000875790e+00    1.0000920500e+00    1.0000971508e+00    1.0001030770e+00    1.0001100648e+00    
+1.0001182690e+00    1.0001279867e+00    1.0001397245e+00    1.0001538859e+00    1.0001711213e+00    
+1.0001926234e+00    1.0002197382e+00    1.0002544282e+00    1.0003000087e+00    1.0003615344e+00    
+1.0004469921e+00    1.0005699191e+00    1.0007541666e+00    1.0008654392e+00    1.0000015237e+00    
+1.0000015330e+00    1.0000015463e+00    1.0000015520e+00    1.0000015552e+00    1.0000015575e+00    
+1.0000015608e+00    1.0000015649e+00    1.0000015696e+00    1.0000015760e+00    1.0000015828e+00    
+1.0000015880e+00    1.0000015940e+00    1.0000016020e+00    1.0000016114e+00    1.0000016225e+00    
+1.0000016358e+00    1.0000016498e+00    1.0000016643e+00    1.0000016813e+00    1.0000017013e+00    
+1.0000017238e+00    1.0000017500e+00    1.0000017785e+00    1.0000018061e+00    1.0000018347e+00    
+1.0000018679e+00    1.0000019054e+00    1.0000019475e+00    1.0000019965e+00    1.0000020517e+00    
+1.0000021115e+00    1.0000021797e+00    1.0000022571e+00    1.0000023409e+00    1.0000024346e+00    
+1.0000025432e+00    1.0000026668e+00    1.0000028077e+00    1.0000029728e+00    1.0000031638e+00    
+1.0000033824e+00    1.0000036401e+00    1.0000039445e+00    1.0000043001e+00    1.0000047245e+00    
+1.0000052394e+00    1.0000058631e+00    1.0000066283e+00    1.0000075894e+00    1.0000087975e+00    
+1.0000103365e+00    1.0000123580e+00    1.0000150513e+00    1.0000187122e+00    1.0000238616e+00    
+1.0000313634e+00    1.0000427114e+00    1.0000606795e+00    1.0000907242e+00    1.0001096760e+00    
+1.0000000371e+00    1.0000000374e+00    1.0000000378e+00    1.0000000380e+00    1.0000000382e+00    
+1.0000000382e+00    1.0000000384e+00    1.0000000385e+00    1.0000000387e+00    1.0000000389e+00    
+1.0000000391e+00    1.0000000393e+00    1.0000000395e+00    1.0000000398e+00    1.0000000402e+00    
+1.0000000406e+00    1.0000000410e+00    1.0000000415e+00    1.0000000420e+00    1.0000000427e+00    
+1.0000000434e+00    1.0000000442e+00    1.0000000451e+00    1.0000000461e+00    1.0000000471e+00    
+1.0000000482e+00    1.0000000494e+00    1.0000000508e+00    1.0000000523e+00    1.0000000541e+00    
+1.0000000562e+00    1.0000000584e+00    1.0000000610e+00    1.0000000640e+00    1.0000000672e+00    
+1.0000000708e+00    1.0000000751e+00    1.0000000801e+00    1.0000000858e+00    1.0000000926e+00    
+1.0000001006e+00    1.0000001099e+00    1.0000001211e+00    1.0000001347e+00    1.0000001509e+00    
+1.0000001708e+00    1.0000001957e+00    1.0000002267e+00    1.0000002661e+00    1.0000003176e+00    
+1.0000003848e+00    1.0000004743e+00    1.0000005979e+00    1.0000007714e+00    1.0000010214e+00    
+1.0000013968e+00    1.0000019852e+00    1.0000029514e+00    1.0000046297e+00    1.0000077483e+00    
+1.0000097934e+00    1.0000000008e+00    1.0000000008e+00    1.0000000008e+00    1.0000000008e+00    
+1.0000000008e+00    1.0000000008e+00    1.0000000008e+00    1.0000000008e+00    1.0000000008e+00    
+1.0000000009e+00    1.0000000009e+00    1.0000000009e+00    1.0000000009e+00    1.0000000009e+00    
+1.0000000009e+00    1.0000000009e+00    1.0000000009e+00    1.0000000009e+00    1.0000000009e+00    
+1.0000000010e+00    1.0000000010e+00    1.0000000010e+00    1.0000000010e+00    1.0000000011e+00    
+1.0000000011e+00    1.0000000011e+00    1.0000000012e+00    1.0000000012e+00    1.0000000012e+00    
+1.0000000013e+00    1.0000000014e+00    1.0000000014e+00    1.0000000015e+00    1.0000000016e+00    
+1.0000000017e+00    1.0000000018e+00    1.0000000019e+00    1.0000000021e+00    1.0000000023e+00    
+1.0000000025e+00    1.0000000028e+00    1.0000000031e+00    1.0000000035e+00    1.0000000040e+00    
+1.0000000046e+00    1.0000000054e+00    1.0000000064e+00    1.0000000076e+00    1.0000000093e+00    
+1.0000000115e+00    1.0000000146e+00    1.0000000188e+00    1.0000000250e+00    1.0000000341e+00    
+1.0000000481e+00    1.0000000705e+00    1.0000001083e+00    1.0000001756e+00    1.0000003040e+00    
+1.0000005692e+00    1.0000007495e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000001e+00    
+1.0000000001e+00    1.0000000001e+00    1.0000000001e+00    1.0000000001e+00    1.0000000001e+00    
+1.0000000001e+00    1.0000000001e+00    1.0000000002e+00    1.0000000002e+00    1.0000000002e+00    
+1.0000000003e+00    1.0000000004e+00    1.0000000005e+00    1.0000000007e+00    1.0000000010e+00    
+1.0000000014e+00    1.0000000021e+00    1.0000000033e+00    1.0000000054e+00    1.0000000096e+00    
+1.0000000183e+00    1.0000000385e+00    1.0000000526e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000001e+00    1.0000000001e+00    1.0000000001e+00    1.0000000003e+00    
+1.0000000005e+00    1.0000000010e+00    1.0000000025e+00    1.0000000035e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000001e+00    1.0000000002e+00    1.0000000002e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    9.7425090130e-01    9.7422079438e-01    9.7418263695e-01    9.7418286739e-01    
+9.7421928917e-01    9.7428085444e-01    9.7434916695e-01    9.7442739557e-01    9.7451813459e-01    
+9.7461025295e-01    9.7471732086e-01    9.7485831695e-01    9.7501126037e-01    9.7516221402e-01    
+9.7532021308e-01    9.7548100523e-01    9.7564061753e-01    9.7581343959e-01    9.7600367725e-01    
+9.7619181245e-01    9.7637400655e-01    9.7655776778e-01    9.7673360188e-01    9.7691378988e-01    
+9.7712732057e-01    9.7735995627e-01    9.7758387757e-01    9.7780233426e-01    9.7801819273e-01    
+9.7821617866e-01    9.7840581957e-01    9.7860378988e-01    9.7878864791e-01    9.7896014903e-01    
+9.7914399729e-01    9.7932650197e-01    9.7948475164e-01    9.7962838376e-01    9.7976075710e-01    
+9.7985968923e-01    9.7993335578e-01    9.7999991281e-01    9.8003314353e-01    9.8002786542e-01    
+9.8000693578e-01    9.7995450992e-01    9.7984709584e-01    9.7969497809e-01    9.7949723700e-01    
+9.7922029239e-01    9.7886783378e-01    9.7845291293e-01    9.7792796211e-01    9.7726453193e-01    
+9.7646250638e-01    9.7547077654e-01    9.7420627940e-01    9.7258295673e-01    9.7048687005e-01    
+9.6777370342e-01    9.6624387836e-01    9.9914496406e-01    9.9914279179e-01    9.9913997550e-01    
+9.9913953506e-01    9.9914057735e-01    9.9914257520e-01    9.9914476893e-01    9.9914727617e-01    
+9.9915019623e-01    9.9915308331e-01    9.9915648101e-01    9.9916114553e-01    9.9916619916e-01    
+9.9917108988e-01    9.9917617970e-01    9.9918130030e-01    9.9918629685e-01    9.9919174608e-01    
+9.9919781510e-01    9.9920372830e-01    9.9920933884e-01    9.9921494653e-01    9.9922017420e-01    
+9.9922551948e-01    9.9923213671e-01    9.9923945392e-01    9.9924636932e-01    9.9925301847e-01    
+9.9925951302e-01    9.9926524448e-01    9.9927060316e-01    9.9927624672e-01    9.9928131263e-01    
+9.9928580670e-01    9.9929075064e-01    9.9929558176e-01    9.9929938741e-01    9.9930255752e-01    
+9.9930520647e-01    9.9930642416e-01    9.9930655366e-01    9.9930629519e-01    9.9930454175e-01    
+9.9930109215e-01    9.9929684033e-01    9.9929105989e-01    9.9928273897e-01    9.9927225682e-01    
+9.9925944040e-01    9.9924271404e-01    9.9922216329e-01    9.9919807814e-01    9.9916800328e-01    
+9.9913039043e-01    9.9908463515e-01    9.9902744818e-01    9.9895366661e-01    9.9885716337e-01    
+9.9872909615e-01    9.9855723510e-01    9.9845864740e-01    9.9997937769e-01    9.9997929248e-01    
+9.9997917750e-01    9.9997914825e-01    9.9997916690e-01    9.9997921443e-01    9.9997926418e-01    
+9.9997932021e-01    9.9997938598e-01    9.9997944600e-01    9.9997951928e-01    9.9997963213e-01    
+9.9997975402e-01    9.9997986589e-01    9.9997998042e-01    9.9998009180e-01    9.9998019479e-01    
+9.9998030951e-01    9.9998044176e-01    9.9998056469e-01    9.9998067340e-01    9.9998077829e-01    
+9.9998086631e-01    9.9998095494e-01    9.9998108424e-01    9.9998123419e-01    9.9998136669e-01    
+9.9998148658e-01    9.9998159757e-01    9.9998167846e-01    9.9998174300e-01    9.9998181372e-01    
+9.9998186021e-01    9.9998188297e-01    9.9998191728e-01    9.9998194276e-01    9.9998192725e-01    
+9.9998188417e-01    9.9998181639e-01    9.9998169060e-01    9.9998151871e-01    9.9998132368e-01    
+9.9998106350e-01    9.9998073008e-01    9.9998035298e-01    9.9997990140e-01    9.9997933460e-01    
+9.9997866234e-01    9.9997787001e-01    9.9997688785e-01    9.9997571183e-01    9.9997433647e-01    
+9.9997264139e-01    9.9997054283e-01    9.9996797819e-01    9.9996475118e-01    9.9996055960e-01    
+9.9995500958e-01    9.9994750369e-01    9.9993719401e-01    9.9993121819e-01    9.9999956750e-01    
+9.9999956494e-01    9.9999956140e-01    9.9999956033e-01    9.9999956053e-01    9.9999956147e-01    
+9.9999956239e-01    9.9999956339e-01    9.9999956459e-01    9.9999956554e-01    9.9999956678e-01    
+9.9999956905e-01    9.9999957149e-01    9.9999957357e-01    9.9999957564e-01    9.9999957754e-01    
+9.9999957912e-01    9.9999958095e-01    9.9999958320e-01    9.9999958510e-01    9.9999958652e-01    
+9.9999958775e-01    9.9999958842e-01    9.9999958902e-01    9.9999959070e-01    9.9999959288e-01    
+9.9999959448e-01    9.9999959563e-01    9.9999959643e-01    9.9999959626e-01    9.9999959552e-01    
+9.9999959484e-01    9.9999959332e-01    9.9999959099e-01    9.9999958884e-01    9.9999958625e-01    
+9.9999958227e-01    9.9999957725e-01    9.9999957125e-01    9.9999956319e-01    9.9999955340e-01    
+9.9999954250e-01    9.9999952906e-01    9.9999951277e-01    9.9999949441e-01    9.9999947278e-01    
+9.9999944637e-01    9.9999941522e-01    9.9999937843e-01    9.9999933307e-01    9.9999927852e-01    
+9.9999921363e-01    9.9999913276e-01    9.9999903149e-01    9.9999890521e-01    9.9999874297e-01    
+9.9999852816e-01    9.9999823793e-01    9.9999783746e-01    9.9999728157e-01    9.9999695880e-01    
+9.9999999172e-01    9.9999999166e-01    9.9999999157e-01    9.9999999154e-01    9.9999999154e-01    
+9.9999999155e-01    9.9999999157e-01    9.9999999158e-01    9.9999999160e-01    9.9999999161e-01    
+9.9999999162e-01    9.9999999166e-01    9.9999999170e-01    9.9999999173e-01    9.9999999176e-01    
+9.9999999179e-01    9.9999999180e-01    9.9999999182e-01    9.9999999185e-01    9.9999999187e-01    
+9.9999999187e-01    9.9999999187e-01    9.9999999185e-01    9.9999999183e-01    9.9999999183e-01    
+9.9999999185e-01    9.9999999185e-01    9.9999999183e-01    9.9999999180e-01    9.9999999175e-01    
+9.9999999168e-01    9.9999999160e-01    9.9999999151e-01    9.9999999138e-01    9.9999999126e-01    
+9.9999999112e-01    9.9999999093e-01    9.9999999072e-01    9.9999999046e-01    9.9999999015e-01    
+9.9999998977e-01    9.9999998934e-01    9.9999998883e-01    9.9999998822e-01    9.9999998751e-01    
+9.9999998668e-01    9.9999998566e-01    9.9999998444e-01    9.9999998298e-01    9.9999998116e-01    
+9.9999997892e-01    9.9999997619e-01    9.9999997269e-01    9.9999996821e-01    9.9999996244e-01    
+9.9999995480e-01    9.9999994438e-01    9.9999992994e-01    9.9999990966e-01    9.9999988190e-01    
+9.9999986603e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    
+9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    
+9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    
+9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    
+9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    
+9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999984e-01    9.9999999984e-01    
+9.9999999984e-01    9.9999999984e-01    9.9999999983e-01    9.9999999983e-01    9.9999999983e-01    
+9.9999999982e-01    9.9999999982e-01    9.9999999981e-01    9.9999999980e-01    9.9999999980e-01    
+9.9999999979e-01    9.9999999977e-01    9.9999999976e-01    9.9999999974e-01    9.9999999972e-01    
+9.9999999970e-01    9.9999999967e-01    9.9999999963e-01    9.9999999959e-01    9.9999999954e-01    
+9.9999999947e-01    9.9999999939e-01    9.9999999928e-01    9.9999999914e-01    9.9999999895e-01    
+9.9999999869e-01    9.9999999834e-01    9.9999999785e-01    9.9999999714e-01    9.9999999612e-01    
+9.9999999478e-01    9.9999999404e-01    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    9.9999999999e-01    9.9999999999e-01    
+9.9999999999e-01    9.9999999999e-01    9.9999999999e-01    9.9999999999e-01    9.9999999999e-01    
+9.9999999999e-01    9.9999999999e-01    9.9999999998e-01    9.9999999998e-01    9.9999999997e-01    
+9.9999999996e-01    9.9999999995e-01    9.9999999994e-01    9.9999999991e-01    9.9999999988e-01    
+9.9999999983e-01    9.9999999976e-01    9.9999999973e-01    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+9.9999999999e-01    9.9999999999e-01    9.9999999999e-01    9.9999999999e-01    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    -3.6851719335e-08   1.7671924273e-04    3.5370515765e-04    5.3020663804e-04    
+7.0476101893e-04    8.7689058539e-04    1.0465399801e-03    1.2131355786e-03    1.3761132268e-03    
+1.5356321043e-03    1.6904444561e-03    1.8387200134e-03    1.9813477417e-03    2.1189757635e-03    
+2.2506108000e-03    2.3763344450e-03    2.4962575522e-03    2.6086557225e-03    2.7127033628e-03    
+2.8102145292e-03    2.9014687645e-03    2.9854648008e-03    3.0632496404e-03    3.1331063943e-03    
+3.1909436158e-03    3.2383284442e-03    3.2789420190e-03    3.3123304669e-03    3.3380959753e-03    
+3.3585160997e-03    3.3722519653e-03    3.3768295742e-03    3.3755381849e-03    3.3685275112e-03    
+3.3519438400e-03    3.3280022091e-03    3.3003957888e-03    3.2678119270e-03    3.2298921599e-03    
+3.1901420563e-03    3.1475063140e-03    3.0994474109e-03    3.0499583002e-03    2.9999558676e-03    
+2.9463804238e-03    2.8916361873e-03    2.8390253543e-03    2.7873372181e-03    2.7368996078e-03    
+2.6919275791e-03    2.6522200822e-03    2.6168574726e-03    2.5916339900e-03    2.5802456825e-03    
+2.5842010329e-03    2.6107665816e-03    2.6707747204e-03    2.7770577532e-03    2.9485867052e-03    
+3.2159244886e-03    3.3782709738e-03    -3.8197380805e-08   1.3683961290e-05    2.7435699626e-05    
+4.1186585503e-05    5.4884236748e-05    6.8522558355e-05    8.2123159212e-05    9.5671784867e-05    
+1.0915704312e-04    1.2261753388e-04    1.3598864217e-04    1.4916919805e-04    1.6224992072e-04    
+1.7529925651e-04    1.8827296488e-04    2.0120519281e-04    2.1412989923e-04    2.2694393028e-04    
+2.3961344654e-04    2.5230334681e-04    2.6505999813e-04    2.7783847242e-04    2.9075650953e-04    
+3.0369920106e-04    3.1635789430e-04    3.2888963571e-04    3.4162805099e-04    3.5456562126e-04    
+3.6771246658e-04    3.8132549068e-04    3.9531707672e-04    4.0950726180e-04    4.2428387086e-04    
+4.3970291562e-04    4.5542560562e-04    4.7177026244e-04    4.8923056030e-04    5.0775483732e-04    
+5.2744685313e-04    5.4893302626e-04    5.7222578719e-04    5.9720817489e-04    6.2477002063e-04    
+6.5532517822e-04    6.8875905554e-04    7.2600590227e-04    7.6827072232e-04    8.1602093884e-04    
+8.7032803795e-04    9.3348475512e-04    1.0068056376e-03    1.0920733705e-03    1.1938435892e-03    
+1.3166534662e-03    1.4658261881e-03    1.6511616674e-03    1.8872402670e-03    2.1947973548e-03    
+2.6059871620e-03    3.1729356457e-03    3.5034365329e-03    -1.3159041720e-09   4.0460524524e-07    
+8.1265411231e-07    1.2212042301e-06    1.6282869102e-06    2.0338821650e-06    2.4393867496e-06    
+2.8443914314e-06    3.2486689667e-06    3.6545034845e-06    4.0588637273e-06    4.4569456881e-06    
+4.8536698896e-06    5.2527125927e-06    5.6520831397e-06    6.0537922755e-06    6.4597815305e-06    
+6.8649193562e-06    7.2676804867e-06    7.6767629615e-06    8.0946672992e-06    8.5192737267e-06    
+8.9569632302e-06    9.4016741108e-06    9.8371434807e-06    1.0271767602e-05    1.0723230581e-05    
+1.1191127511e-05    1.1676221184e-05    1.2192666887e-05    1.2735632722e-05    1.3295582507e-05    
+1.3894378106e-05    1.4535016288e-05    1.5198848824e-05    1.5904574953e-05    1.6680878519e-05    
+1.7525576951e-05    1.8446505152e-05    1.9482872366e-05    2.0637046787e-05    2.1905779393e-05    
+2.3348688220e-05    2.4995803528e-05    2.6847566587e-05    2.8975195286e-05    3.1470705655e-05    
+3.4382640179e-05    3.7811872082e-05    4.1957321060e-05    4.6956729677e-05    5.3016514278e-05    
+6.0594762142e-05    7.0194023451e-05    8.2487270781e-05    9.8695874884e-05    1.2074297709e-04    
+1.5163954834e-04    1.9647919434e-04    2.6434127164e-04    3.0548996433e-04    -3.2957603653e-11   
+9.3543132231e-09    1.8824007402e-08    2.8316952249e-08    3.7774721437e-08    4.7200016910e-08    
+5.6642674651e-08    6.6092414531e-08    7.5545811798e-08    8.5082980808e-08    9.4604976960e-08    
+1.0395558957e-07    1.1330348457e-07    1.2277345372e-07    1.3230232533e-07    1.4196133404e-07    
+1.5181828669e-07    1.6170302611e-07    1.7156842287e-07    1.8171126866e-07    1.9221776633e-07    
+2.0302169981e-07    2.1434610250e-07    2.2598480780e-07    2.3738592277e-07    2.4884375746e-07    
+2.6096810369e-07    2.7374978756e-07    2.8722855375e-07    3.0191172740e-07    3.1763772574e-07    
+3.3409599801e-07    3.5208787849e-07    3.7173197443e-07    3.9239687675e-07    4.1480813341e-07    
+4.4005384654e-07    4.6811847990e-07    4.9940545131e-07    5.3552150986e-07    5.7668184944e-07    
+6.2300519585e-07    6.7712313221e-07    7.4052464718e-07    8.1373780394e-07    9.0039836873e-07    
+1.0052223407e-06    1.1314799938e-06    1.2854802087e-06    1.4788206435e-06    1.7211230707e-06    
+2.0278958451e-06    2.4303262442e-06    2.9661434320e-06    3.6917340764e-06    4.7102103676e-06    
+6.1943921572e-06    8.4410601953e-06    1.1999541299e-05    1.7951455944e-05    2.1706284853e-05    
+-7.1177195956e-13   1.8995224754e-10    3.8303265373e-10    5.7683039554e-10    7.6990397783e-10    
+9.6238874473e-10    1.1556544277e-09    1.3494820483e-09    1.5438549613e-09    1.7409651455e-09    
+1.9382206018e-09    2.1315635119e-09    2.3255568527e-09    2.5235443954e-09    2.7239239149e-09    
+2.9286844591e-09    3.1396995508e-09    3.3524885394e-09    3.5659140406e-09    3.7880398323e-09    
+4.0212498804e-09    4.2639519567e-09    4.5223928445e-09    4.7910438209e-09    5.0550765914e-09    
+5.3227917298e-09    5.6110268147e-09    5.9197839982e-09    6.2507048736e-09    6.6184916894e-09    
+7.0190423600e-09    7.4446411052e-09    7.9191220845e-09    8.4465492789e-09    9.0103653568e-09    
+9.6337145068e-09    1.0350430126e-08    1.1162886330e-08    1.2087857310e-08    1.3179795455e-08    
+1.4450962514e-08    1.5915537535e-08    1.7670341232e-08    1.9777311304e-08    2.2277036920e-08    
+2.5324741586e-08    2.9124055825e-08    3.3848738303e-08    3.9821430376e-08    4.7611242440e-08    
+5.7764258425e-08    7.1212272030e-08    8.9741448093e-08    1.1571113468e-07    1.5297144402e-07    
+2.0876963655e-07    2.9608773300e-07    4.3924216044e-07    6.8744229980e-07    1.1477382837e-06    
+1.4493754484e-06    -1.4000980902e-14   3.5346886731e-12    7.1434081492e-12    1.0770266347e-11    
+1.4384177638e-11    1.7989616968e-11    2.1618756822e-11    2.5267584068e-11    2.8937238678e-11    
+3.2679234604e-11    3.6434811595e-11    4.0113015762e-11    4.3820284592e-11    4.7633844848e-11    
+5.1518796075e-11    5.5523211126e-11    5.9691972972e-11    6.3923371067e-11    6.8194440699e-11    
+7.2695278464e-11    7.7483516715e-11    8.2527610068e-11    8.7980385312e-11    9.3714260793e-11    
+9.9385047525e-11    1.0519769908e-10    1.1155800460e-10    1.1847468677e-10    1.2600432501e-10    
+1.3452249697e-10    1.4394362181e-10    1.5411041740e-10    1.6565039284e-10    1.7868990188e-10    
+1.9286397949e-10    2.0883220542e-10    2.2753531192e-10    2.4913271799e-10    2.7422744429e-10    
+3.0447972330e-10    3.4042705582e-10    3.8283412413e-10    4.3492146064e-10    4.9900033712e-10    
+5.7714424161e-10    6.7531585009e-10    8.0148220456e-10    9.6357391023e-10    1.1761332087e-09    
+1.4643976898e-09    1.8555278191e-09    2.3982379062e-09    3.1847281428e-09    4.3467390665e-09    
+6.1159685232e-09    8.9476660548e-09    1.3715878877e-08    2.2201144885e-08    3.8343522524e-08    
+7.1620032770e-08    9.4227550248e-08    -2.5727469047e-16   6.1550321440e-14    1.2468833185e-13    
+1.8822963156e-13    2.5156924904e-13    3.1482844606e-13    3.7868429292e-13    4.4307302581e-13    
+5.0804937589e-13    5.7470166257e-13    6.4182932776e-13    7.0760042837e-13    7.7425139565e-13    
+8.4338758852e-13    9.1433077393e-13    9.8813199633e-13    1.0657649537e-12    1.1451538359e-12    
+1.2259005199e-12    1.3120635410e-12    1.4049132334e-12    1.5039272701e-12    1.6125119129e-12    
+1.7280221720e-12    1.8432523434e-12    1.9628232833e-12    2.0956457695e-12    2.2421531126e-12    
+2.4040444316e-12    2.5901370621e-12    2.7989458424e-12    3.0278336859e-12    3.2920455282e-12    
+3.5952164626e-12    3.9304197843e-12    4.3151019894e-12    4.7736124363e-12    5.3126966860e-12    
+5.9518269180e-12    6.7382405582e-12    7.6918949575e-12    8.8441337717e-12    1.0295124753e-11    
+1.2124478673e-11    1.4418709765e-11    1.7390251594e-11    2.1329740605e-11    2.6562249489e-11    
+3.3686246403e-11    4.3742195198e-11    5.7958251972e-11    7.8643279870e-11    1.1020898564e-10    
+1.5942579443e-10    2.3903495425e-10    3.7538959555e-10    6.2281082919e-10    1.1014768320e-09    
+2.1022702421e-09    4.3992885393e-09    6.0135397568e-09    -4.4785394282e-18   1.0151680855e-15    
+2.0618399477e-15    3.1166873751e-15    4.1688718181e-15    5.2212033750e-15    6.2868103492e-15    
+7.3648657804e-15    8.4570377728e-15    9.5844171650e-15    1.0724422512e-14    1.1843167952e-14    
+1.2983951843e-14    1.4177675095e-14    1.5412108188e-14    1.6708733182e-14    1.8087233833e-14    
+1.9508331419e-14    2.0966358167e-14    2.2541596513e-14    2.4260200682e-14    2.6115387542e-14    
+2.8177787367e-14    3.0397163059e-14    3.2633980123e-14    3.4985701202e-14    3.7635074859e-14    
+4.0596459154e-14    4.3916616258e-14    4.7789681107e-14    5.2195152767e-14    5.7100658023e-14    
+6.2855074875e-14    6.9556220053e-14    7.7093333860e-14    8.5903330043e-14    9.6584461120e-14    
+1.0936849927e-13    1.2483441573e-13    1.4425732229e-13    1.6829745313e-13    1.9805654325e-13    
+2.3649183856e-13    2.8617295898e-13    3.5027778943e-13    4.3593174525e-13    5.5315270830e-13    
+7.1421660099e-13    9.4205655133e-13    1.2771032581e-12    1.7709051423e-12    2.5249438551e-12    
+3.7377042939e-12    5.7346685227e-12    9.1686644698e-12    1.5468279467e-11    2.7797892880e-11    
+5.3754724909e-11    1.1345659446e-10    2.6615439616e-10    3.7688805272e-10    -7.2734417428e-20   
+1.5973588909e-17    3.2531610520e-17    4.9269280535e-17    6.5985856023e-17    8.2650597455e-17    
+9.9657563287e-17    1.1698219717e-16    1.3447761360e-16    1.5272722525e-16    1.7126650371e-16    
+1.8949041739e-16    2.0821449945e-16    2.2802634602e-16    2.4864436374e-16    2.7037704120e-16    
+2.9395836377e-16    3.1835758872e-16    3.4345215855e-16    3.7124056574e-16    4.0185164119e-16    
+4.3516880267e-16    4.7293221604e-16    5.1397608819e-16    5.5537867535e-16    5.9978512587e-16    
+6.5063648077e-16    7.0770567848e-16    7.7295768255e-16    8.5042087078e-16    9.3951504571e-16    
+1.0404368818e-15    1.1604234701e-15    1.3020772551e-15    1.4642137203e-15    1.6574242449e-15    
+1.8955921374e-15    2.1855172885e-15    2.5436955131e-15    3.0030547787e-15    3.5835717807e-15    
+4.3196117758e-15    5.2951310182e-15    6.5891807624e-15    8.3075594929e-15    1.0677410094e-14    
+1.4027426825e-14    1.8791419139e-14    2.5797504329e-14    3.6538570695e-14    5.3049686515e-14    
+7.9523763116e-14    1.2442913669e-13    2.0255058655e-13    3.4541952876e-13    6.2626285680e-13    
+1.2194484702e-12    2.5790268806e-12    6.0204053523e-12    1.5830669166e-11    2.3153634942e-11    
+-3.1820866957e-21   2.4358588551e-19    4.9465916062e-19    7.5293262406e-19    9.9294525948e-19    
+1.2376310738e-18    1.4916754162e-18    1.7307895211e-18    2.0312204492e-18    2.3950560347e-18    
+2.6748054420e-18    2.9795967695e-18    3.2663297925e-18    3.5095606215e-18    3.8831845313e-18    
+4.1839526468e-18    4.5402508175e-18    4.9854314055e-18    5.3302745828e-18    5.8248531698e-18    
+6.4254956991e-18    7.1162510642e-18    8.0485093486e-18    8.6566779830e-18    9.0594666117e-18    
+9.7957449181e-18    1.0830853009e-17    1.2180267477e-17    1.3280872257e-17    1.4739306174e-17    
+1.6646741628e-17    1.8487804000e-17    2.0836975975e-17    2.3788430168e-17    2.7231833196e-17    
+3.1064373653e-17    3.6050922507e-17    4.2476653994e-17    4.9877880640e-17    6.0437822530e-17    
+7.4551367942e-17    9.1929781387e-17    1.1578509670e-16    1.4818410582e-16    1.9257506746e-16    
+2.5606396942e-16    3.4847912298e-16    4.8462513108e-16    6.9274957561e-16    1.0252347804e-15    
+1.5584681307e-15    2.4577294102e-15    4.0672515181e-15    7.0247733075e-15    1.2777653161e-14    
+2.4897119021e-14    5.2525317447e-14    1.2147009919e-13    3.1349953261e-13    9.2335698867e-13    
+1.3907878365e-12    -4.0509237157e-21   6.4362625111e-21    1.7674212390e-20    -2.4717872922e-21   
+-1.9078557995e-20   1.5825966888e-20    -2.1240822316e-20   -6.4113994527e-20   9.3853090826e-20    
+5.6461837001e-20    1.2611966845e-20    6.6755602360e-20    -3.1605233702e-21   9.4052253584e-20    
+1.2497468767e-19    1.0449414017e-19    5.8749739928e-20    9.4379410356e-20    1.5081131000e-19    
+1.5675234708e-19    1.7199595985e-19    1.6805814882e-19    2.0977456490e-19    1.2002457994e-19    
+3.4984783948e-19    4.8309175234e-19    3.7018998120e-19    4.5087624926e-19    3.1567874526e-19    
+2.6915035930e-19    3.8712830889e-19    3.8369963800e-19    4.4737775790e-19    4.9355463218e-19    
+6.6422397219e-19    7.4074684378e-19    7.9270999077e-19    9.8013197644e-19    7.4977281044e-19    
+9.5034590370e-19    1.3936543861e-18    2.0000905382e-18    2.8394038961e-18    3.2510652174e-18    
+4.2324769282e-18    5.7607919987e-18    7.9333295791e-18    1.1489293281e-17    1.7907243431e-17    
+2.8288997311e-17    4.4583944739e-17    7.4215201759e-17    1.3042041346e-16    2.3879377291e-16    
+4.6340414459e-16    9.7097739546e-16    2.2186314049e-15    5.6067826980e-15    1.5984400495e-14    
+5.2664613928e-14    8.1462239939e-14    -4.4702817668e-21   -1.0792419598e-20   -1.3102780881e-20   
+-2.8646458049e-20   -3.5197799803e-20   1.5814684096e-21    2.2427912695e-20    4.1323484131e-20    
+1.1241736269e-20    -7.3145946345e-20   -6.9552647570e-20   -1.1059607074e-19   -8.6222465767e-20   
+7.3694841830e-21    5.1753573848e-20    7.3640693582e-20    6.7381711787e-20    8.3417410829e-20    
+5.7381765013e-21    -8.2767397166e-21   5.5819065506e-20    -6.8422384901e-21   -2.1926035467e-19   
+-2.0685310902e-19   1.7839187790e-20    1.0680938530e-19    4.8544895277e-20    -1.2001559933e-19   
+-1.2139770638e-19   -1.4960059495e-19   -2.0980575429e-19   -1.8178492789e-19   -5.9124178911e-20   
+9.8030777352e-20    2.5819431737e-20    1.5157889507e-19    2.4039318010e-19    1.7169275119e-19    
+3.7386861185e-19    3.4845867568e-19    6.2324965908e-20    -1.5451296562e-19   -1.9202231626e-19   
+2.0933330199e-19    2.5861548906e-19    -1.2505227084e-19   1.8008600986e-19    3.1348922489e-19    
+5.1757463583e-19    1.1837548778e-18    2.0486265556e-18    2.9136355074e-18    4.2222940545e-18    
+7.6346388835e-18    1.6127327918e-17    3.7531055686e-17    9.2277819526e-17    2.5303699398e-16    
+7.9621187037e-16    2.9291211081e-15    4.6400640325e-15    -3.3137752264e-21   -6.4770218457e-21   
+-2.9905536637e-21   6.9830222235e-21    2.7347724968e-20    3.6274617675e-20    4.1615102970e-20    
+8.4418707946e-20    1.3340025727e-20    -2.2529447492e-20   -7.5203793667e-20   -4.8866350255e-20   
+4.3122362794e-20    -4.2498216302e-20   -5.6667606791e-21   3.6176134884e-20    8.7078329928e-20    
+3.6523579414e-20    7.0271402884e-20    6.7150498310e-20    9.7813205247e-21    1.0084403611e-19    
+3.8716079414e-20    -9.4139864481e-21   -1.3597894165e-19   -2.7087602929e-19   -1.7259024606e-19   
+4.5637683391e-20    1.2098029280e-19    -4.8157198631e-21   -2.0355645550e-19   -2.7911238799e-19   
+-1.5557661858e-19   -6.7886481671e-20   -1.6420948889e-19   -2.3732639282e-19   -1.7346427547e-19   
+-2.6936226836e-19   -7.0815255257e-20   1.6555745871e-20    8.5043983430e-20    2.0011276558e-19    
+2.0386365781e-19    3.2596817342e-19    2.3932533278e-19    4.0805451541e-19    5.7452186147e-19    
+7.1485672149e-19    4.6279971655e-19    6.4191254505e-20    2.0676897348e-19    1.3246267585e-19    
+2.7826412383e-19    7.2671719086e-19    1.1111520228e-18    1.5308993541e-18    3.2271856728e-18    
+1.0786128050e-17    3.8391670687e-17    1.5833525191e-16    2.5666072815e-16    5.8806496022e-21    
+6.8782938125e-21    1.9266686429e-20    2.0114061410e-20    4.9909863917e-20    5.0130848748e-20    
+3.7075622982e-20    4.9135588763e-21    -1.2424639801e-20   5.1236322935e-20    5.8571750780e-20    
+7.1673164033e-20    1.2139507271e-19    1.8861416895e-21    -1.3395934045e-19   -1.1127042839e-19   
+-6.0829166179e-20   -3.3440842370e-20   4.5166186751e-20    1.0709523130e-19    5.0768672305e-20    
+-2.6439206060e-20   -5.6715496532e-20   -6.0886634570e-22   6.0737613940e-20    -6.8424672741e-21   
+1.6923860383e-20    1.1925492697e-19    1.1909638258e-19    3.6571813965e-20    -4.8890636834e-20   
+5.0498718516e-20    1.4067890137e-19    6.6256308414e-20    -6.6262455283e-20   4.4733464676e-21    
+-2.1145285473e-20   -7.4517733436e-20   1.2042300155e-19    1.1268886815e-19    -2.9720745582e-20   
+1.1968867787e-19    2.8417453237e-19    9.1109939404e-20    1.0938031099e-19    2.1770788331e-19    
+-9.3995008194e-20   -2.0978719798e-19   -2.4493028656e-19   -2.3160537277e-19   -4.0808673911e-19   
+-5.1442260299e-19   -3.6228634135e-19   1.9867834915e-20    1.0838916007e-19    -4.7217865575e-19   
+-3.7375192289e-19   6.3360442242e-19    2.5539072080e-18    8.5207901623e-18    1.3280873970e-17    
+6.9488265773e-21    3.0757478376e-21    2.8102622640e-21    -3.4621312663e-21   -1.6011568654e-20   
+-8.5134229072e-21   1.1031478809e-20    -3.5093052500e-20   -8.9545728052e-20   -6.1032208276e-20   
+1.0820615303e-19    1.6017836119e-19    1.2056713812e-19    6.8594961788e-21    -1.1040833841e-19   
+3.6017346952e-22    -7.3555889157e-20   -1.2149468370e-19   -8.0184683648e-20   9.9639210209e-21    
+9.0702737913e-21    -1.3308360586e-19   -1.2425659003e-19   -5.5074309437e-20   -7.1969776627e-21   
+4.7908645704e-20    1.0026483814e-19    -1.8330285034e-20   -1.5835813375e-20   4.9234109351e-20    
+2.0467540367e-19    3.5656733393e-19    2.1577612458e-19    3.8278655539e-20    -3.5062666347e-20   
+7.0737415099e-20    1.0984278255e-19    6.9994346376e-20    4.4673030650e-20    9.6868826261e-20    
+-1.5540343562e-19   -5.2384907596e-19   -6.0908539209e-19   -6.0335138314e-19   -4.7999465929e-19   
+-5.2618189836e-19   -3.9717101701e-19   -3.3995178792e-19   -5.0495334958e-19   -1.9460169603e-19   
+1.5200830361e-19    1.5390823616e-20    -3.4221177625e-19   -7.6304270491e-19   -7.8009598190e-19   
+2.1721660332e-20    2.9863389695e-19    8.5810722541e-20    2.5633945209e-19    4.4171290733e-19    
+5.3636963484e-19    7.8361903153e-22    -6.0011365200e-21   -1.4293427819e-20   -1.0236652684e-20   
+-2.3125695252e-20   -3.2954189368e-20   -2.6534291885e-20   -7.7390360369e-21   3.9658285727e-21    
+-1.0140832324e-20   -1.8350110566e-20   -3.8808063435e-20   -1.1257174184e-19   -6.2340062199e-20   
+2.0464435653e-20    7.9751599182e-20    2.9556010553e-20    -6.4496952932e-20   8.4608926245e-21    
+-8.6249328749e-20   -1.5665328077e-19   -5.4192826626e-20   1.1395278240e-19    1.0641050205e-19    
+-3.6576311951e-20   -7.2932902202e-20   -1.3003969957e-19   -1.5615875534e-19   -2.3747251077e-21   
+6.3990620631e-20    1.2417473085e-20    -6.5171742772e-20   -1.6922840604e-19   -2.7226199291e-19   
+-1.3447046172e-19   -1.3933489327e-19   -3.3166013353e-19   -2.7886777565e-19   -5.2564115124e-20   
+5.9257992620e-20    1.5242421360e-19    1.9533081582e-20    -2.7523824270e-19   -3.9685139745e-19   
+-4.5512986572e-19   -1.0060237422e-19   2.5608431958e-19    5.7436538147e-19    4.8190472311e-19    
+9.7434692416e-20    8.1142815664e-20    1.3824836162e-20    2.8008606223e-19    2.4676866327e-19    
+6.2048478025e-20    4.1096010290e-19    3.1533059727e-20    -8.5897927775e-20   -5.3651586833e-19   
+-5.9277073012e-19   1.6110342353e-19    -6.4661462019e-23   5.9650382617e-21    -1.5970785001e-22   
+8.0576088571e-21    5.3721410437e-21    -2.2877871557e-20   -3.8369589584e-20   5.3561054765e-20    
+7.5428327903e-20    1.0085321893e-19    6.3255094477e-20    -1.2651252370e-19   -1.5742726781e-19   
+-1.9252224883e-20   1.3291066437e-19    1.1178545971e-20    1.1766232529e-20    7.2737463217e-20    
+2.2600651526e-20    2.2376971057e-20    1.2131929208e-20    6.3046026165e-20    9.6472711103e-20    
+5.2169652628e-20    2.1880868930e-20    3.2509845784e-21    -6.1336595843e-20   -1.5058673506e-19   
+-2.6796937935e-20   8.5746619933e-20    -1.3118682816e-19   -1.9365338418e-19   -2.0708958897e-19   
+-2.4872200001e-19   1.8494241339e-19    1.1014723771e-19    -9.5161073157e-20   1.9459153909e-19    
+2.6015388964e-19    1.1866431590e-19    -8.7147876038e-20   7.9421654373e-20    1.4483976915e-19    
+1.1758455379e-19    1.9051072278e-19    3.3225285944e-19    2.8065834284e-19    2.1932602325e-19    
+4.5438626381e-19    1.6402188084e-19    -1.9369576198e-19   -6.4000168724e-20   2.5122224046e-19    
+8.6995063870e-19    7.2019562147e-19    -5.3806850514e-19   -4.0045323556e-19   1.0228824871e-19    
+-1.2552150974e-21   8.8985537880e-21    -1.9981674149e-19   -1.8248654752e-21   -1.7182945332e-21   
+4.4015885880e-21    -4.0697340574e-21   -2.7751490832e-20   -2.9285273372e-20   1.4519746691e-20    
+5.4234483383e-20    1.3979451922e-20    1.4343269120e-21    2.8616132330e-20    -2.3926464926e-20   
+-6.0237495240e-20   -5.1368510904e-20   5.9280325107e-20    6.0765254701e-20    -6.1168560570e-20   
+-3.5116094392e-20   1.9553356030e-20    9.6034344075e-20    7.9736462629e-20    5.0182985507e-20    
+-1.0627930335e-20   -2.5241588794e-20   -9.7607668377e-22   -1.5295929126e-20   3.7020708900e-20    
+-5.4388770757e-20   -4.9126005299e-20   1.7007873572e-19    1.8907713890e-19    8.4225892885e-20    
+-2.4478206824e-19   -1.6646492173e-19   6.5697128824e-20    1.3645494545e-19    5.0958529739e-19    
+3.3060358189e-19    -7.4884215290e-20   -9.0678940633e-20   -2.1896070878e-19   -1.4080038127e-19   
+1.0751647219e-19    -5.1445342543e-20   1.2468689798e-19    1.9402839907e-19    -3.0035088165e-19   
+-5.9214908349e-19   -3.9411555414e-19   -1.9489011903e-19   9.8975126831e-20    6.0038691688e-19    
+6.4006017722e-20    -1.1001364823e-19   1.8189419525e-19    -4.0194138415e-19   -6.0717985675e-20   
+5.7550044138e-20    1.3647255796e-19    6.8454007014e-19    5.9719564823e-19    -5.1947672129e-21   
+-6.7836258698e-21   8.6017580092e-22    -1.7854508107e-20   -8.2956188033e-21   2.3484038385e-20    
+-1.3477159492e-20   -9.1382157567e-20   -3.4366274053e-20   -4.7516104468e-20   -1.2124153670e-19   
+-3.5125223262e-20   1.6171142775e-20    2.8456472872e-20    -3.4735791294e-20   -2.9871361792e-21   
+4.8561685701e-20    3.2987594439e-20    -5.9410389630e-21   -3.3282565219e-20   2.4271559573e-20    
+3.7479402508e-20    2.7482901007e-20    -2.7111973567e-20   1.6884654031e-20    6.2490088188e-21    
+1.0474875853e-20    1.2176501711e-19    2.9972540593e-20    -9.1994316551e-20   -3.7498432237e-20   
+-2.3693322858e-19   -2.4030146641e-19   1.0863865588e-19    -4.6268705143e-20   7.2759611724e-20    
+-2.3323705910e-20   -1.7242001344e-19   1.5042772084e-19    1.7200107569e-20    1.6051966975e-19    
+4.0227084289e-19    2.1511490190e-19    1.2938821548e-20    1.4241657322e-19    1.4195839013e-20    
+-3.3528886228e-19   -1.8116259043e-19   -1.3622374242e-19   -1.8134586186e-19   -1.4326199587e-19   
+2.8560161827e-19    1.0980733238e-19    -6.8178999175e-19   -4.3475871506e-19   3.1498960686e-19    
+1.2564681782e-19    -2.8743104573e-20   4.1664000119e-20    -3.5955928959e-19   -4.1883100823e-19   
+-6.1328889723e-21   2.4623105119e-21    -5.7619146140e-22   1.2014294822e-20    2.6889133068e-20    
+2.0460260506e-20    -4.0617664489e-20   -5.5294297852e-20   1.8095618744e-20    5.9540654905e-21    
+-1.4552538445e-20   3.4228222685e-20    6.5387819332e-20    5.3899749417e-20    -5.0979557179e-20   
+-1.5040835563e-19   8.8202841102e-21    5.9849226479e-20    -9.0506901230e-20   -1.1822806466e-19   
+-6.8185118527e-20   -1.0797193521e-19   -6.5948951950e-20   -3.6223946821e-20   -3.3184980965e-20   
+1.5116768709e-19    2.1955908483e-19    2.3717348168e-19    9.4133464693e-20    -2.0443002943e-19   
+-1.5175802503e-19   9.3597449521e-22    3.6436289781e-19    2.6265802725e-19    4.9586315276e-20    
+8.9221103462e-20    -2.8292655767e-19   -8.3732649513e-20   -1.2554880429e-20   -1.5887322510e-19   
+1.3622937624e-19    1.2882219042e-19    -3.9016564102e-20   7.4101079791e-20    -1.0597748375e-21   
+9.9297645133e-20    1.6146042197e-19    8.7174785660e-20    8.7421649356e-20    -1.4793092184e-19   
+-2.1019521718e-19   -2.8521623609e-19   5.3933266860e-20    1.8206008558e-19    -1.0688935041e-19   
+1.5204367847e-19    2.1812466567e-19    2.2756159701e-19    1.7140173781e-20    -8.0707969106e-19   
+-1.2434634591e-18   7.4918543100e-21    1.1307133873e-21    1.2542910804e-21    4.0505709376e-21    
+-1.4777585399e-20   7.4506119093e-21    7.1166705696e-20    7.7690200931e-20    4.5465015522e-20    
+4.5203197944e-20    1.0811394517e-19    9.6274505036e-20    3.6471036479e-20    1.2980035489e-20    
+-4.6532884934e-20   -8.7500062633e-20   -5.2402377648e-21   -3.7169269716e-21   3.6110473244e-21    
+-7.6517387247e-20   -7.2089743195e-20   -3.9767690997e-20   -1.4568266581e-19   -5.2017559311e-20   
+-1.4094940020e-19   -1.0395375967e-19   -1.3145928713e-20   -3.6281615345e-20   -1.2300311688e-20   
+1.7494420304e-20    4.1951980089e-20    3.7416048298e-19    6.1073923996e-19    3.0616595159e-19    
+3.7578700438e-20    -1.1636656850e-19   2.0134250770e-21    -6.5897907003e-20   -4.1287268000e-19   
+-1.5569315112e-19   -8.1080731638e-20   -4.3983989162e-19   -3.3801582374e-19   -7.9837337653e-20   
+-3.1824709522e-19   -1.6127941438e-19   4.5797630463e-19    2.7087161386e-19    -2.9234805558e-20   
+2.8672166697e-19    4.5730698960e-19    -2.3397887864e-19   -3.2828571890e-19   2.1044288987e-19    
+2.0232166464e-19    -4.7652156972e-21   2.3985629669e-20    -2.3440473377e-19   -1.6700611780e-19   
+3.1386061000e-19    3.0842555095e-19    1.2293402933e-20    8.0710571884e-21    1.9035183129e-20    
+8.1205476839e-21    7.0327354481e-21    3.2266192759e-20    8.5285010018e-20    3.8645717993e-20    
+-2.3292669092e-20   2.2721893376e-20    1.6845441967e-20    9.5728209669e-22    -9.0583604416e-21   
+4.6846633863e-20    9.5401469544e-20    6.1949066607e-20    3.0154817923e-20    8.4639352431e-20    
+1.6683172959e-19    1.2107202538e-19    7.3921836367e-20    1.9360113139e-19    1.6975176149e-19    
+1.4177131600e-20    2.9451770450e-20    -5.0280565393e-20   -2.7095859954e-19   -1.9284332521e-19   
+-1.0995298099e-20   2.4047941569e-20    -3.3879756393e-21   1.1044322504e-21    6.7609743978e-20    
+8.5364688153e-20    -3.8583980923e-20   -1.3474825377e-19   -1.5447981537e-21   3.5525848129e-20    
+1.7653322305e-19    1.1052725891e-19    -1.1847086081e-19   -5.2580315482e-20   4.0190119344e-20    
+3.1153539243e-19    4.0549173042e-20    -4.8824487050e-19   2.1879297335e-20    3.3729345317e-19    
+1.0171838081e-19    3.1867277538e-19    2.5591058403e-19    -1.4636743871e-19   -2.7600343789e-19   
+-3.6783692836e-19   -5.3211404172e-20   -2.0556412381e-19   -3.0929310791e-19   -2.8740302293e-19   
+1.6773346235e-21    5.1953015415e-19    3.3029706865e-19    -1.1956847984e-20   7.1235591289e-21    
+1.9723849359e-20    -3.7336927194e-22   2.8646888767e-20    -1.0461376593e-20   -6.1875478929e-20   
+-4.9317176881e-20   -3.8688211352e-20   -3.1147933306e-20   -5.0277529324e-20   -6.8794886110e-20   
+-9.3042991605e-20   -7.7672082043e-20   -1.2243451674e-20   2.9449868101e-20    1.8902412974e-20    
+5.8458510595e-20    5.8726733311e-20    1.0468986551e-19    9.4651700222e-20    3.2076967708e-20    
+9.1330439395e-20    1.7154206625e-19    2.5561559795e-19    1.7855748844e-19    1.6688582799e-19    
+6.8003804534e-20    -5.8007946838e-22   6.6391998569e-20    -5.3735590501e-20   -3.1991052868e-19   
+-4.1205715123e-19   -8.1794996968e-20   1.2727235896e-19    2.1850775394e-20    -1.8139658330e-19   
+-1.2546616084e-20   1.9905721504e-19    -6.4518213339e-20   2.1640283592e-19    3.4826965684e-19    
+2.6617108761e-19    4.9303878686e-19    3.9388175734e-19    1.3291780267e-20    -2.8212939603e-19   
+-1.9293924207e-19   -9.3334769422e-20   -2.0157310116e-19   -2.8642570201e-19   2.0784173720e-19    
+1.8733800049e-19    -1.6902457489e-19   -6.5192047180e-20   -3.3455623151e-19   -1.2900299438e-19   
+3.5420043863e-19    2.4382860168e-19    2.0707569794e-19    3.0616748402e-19    -2.8405730844e-21   
+3.6369336892e-21    -2.9239632770e-20   -6.3205066558e-21   1.3334340720e-20    -3.1027551574e-20   
+-9.5629762941e-20   -5.5731380212e-20   2.0655432795e-20    2.2081800305e-20    -1.1641717449e-20   
+-7.9536265384e-20   -8.8584665384e-21   -6.1176253739e-20   -1.5258752196e-19   -4.8761931795e-20   
+-4.5081226353e-20   -1.3830613966e-19   -1.5957128326e-19   -1.8000263976e-20   8.1534371534e-20    
+-2.3587191487e-20   -1.9356381490e-19   -9.9907669342e-20   4.0371687466e-22    -8.5325877830e-20   
+1.4742249363e-19    1.3884896785e-19    -6.2354892347e-20   7.6624446835e-20    2.4460241062e-20    
+-1.1025441481e-19   -1.7410357680e-19   -2.3767416203e-20   7.7609140011e-20    1.4297542377e-19    
+1.4953477403e-19    -1.7121469184e-19   -2.9535623036e-19   -1.8028899598e-19   -4.5912981385e-21   
+1.0850415732e-19    3.1732676056e-20    -1.2818527672e-19   1.5714579641e-19    2.7838738547e-19    
+-1.0257418301e-19   -2.8627861917e-19   -2.8909200118e-19   -7.7814459313e-20   6.9631919332e-20    
+1.2391389110e-19    1.2849790559e-19    1.4652276464e-19    -1.1352725590e-20   -1.4854862531e-20   
+1.6674264890e-19    2.4434102214e-19    1.9127355160e-19    2.7463173024e-19    5.7079451023e-19    
+2.2074212984e-21    -8.7660907301e-21   -3.0986625492e-20   1.0742371307e-20    -6.1159581429e-21   
+-4.8954592189e-21   3.2359264138e-20    -3.2664823997e-21   -1.5745562894e-20   -9.7889683131e-22   
+-7.8069761814e-21   1.2974688475e-20    7.2053822736e-20    1.2281567835e-19    8.6052672227e-20    
+2.6526146104e-20    -9.8938365592e-20   -1.5151476660e-19   -1.4389068595e-20   -3.0514373412e-20   
+-1.0951051835e-19   2.8202109301e-20    1.0846696307e-19    -4.9046150640e-21   -9.5669806632e-20   
+-1.6440286633e-19   -2.1596303562e-19   -9.7496549839e-20   -1.5760609091e-19   -6.3011550066e-20   
+2.4221357752e-19    2.0183232330e-19    8.7425501023e-20    -2.0427565739e-19   -3.7588152053e-19   
+-2.2117126429e-19   2.0960256898e-19    2.0070825375e-19    -1.4042217778e-19   -3.8132825719e-21   
+-2.1444802711e-19   -1.5612196152e-19   8.5380074788e-20    -1.8002333977e-19   -2.0152400370e-19   
+7.2513333785e-20    4.8418982901e-20    -8.5408876504e-20   -9.1784799135e-21   -1.3641243937e-19   
+-1.5249244426e-19   -2.1650115021e-19   -2.9209633974e-22   2.3296708734e-19    -1.1913346865e-19   
+2.4964513212e-19    3.9397313681e-19    -2.0154868243e-19   -2.3430084024e-19   7.8255494300e-20    
+2.4125572648e-19    -2.5965007550e-20   -2.3674202559e-20   1.3386507720e-20    -1.1559645665e-20   
+-3.2970990266e-20   -1.8347239806e-20   1.8444999546e-20    -1.1430088032e-20   -8.4489831451e-20   
+-8.9245182970e-20   -1.6927375075e-20   9.0503428531e-20    3.3088732874e-20    7.1152131453e-20    
+7.5457422948e-20    -5.9402180649e-20   5.1655116806e-20    6.5539330641e-20    4.1426927698e-20    
+5.4749633169e-20    -1.7481090026e-20   1.8632108226e-20    1.3608880841e-19    1.5729226193e-19    
+-1.4503882964e-20   1.2152945737e-20    9.3349357724e-21    2.0206121214e-20    1.1219554479e-19    
+-8.2285546052e-20   -2.6603003282e-20   1.4281130903e-19    -6.4672851125e-20   -2.3391180824e-19   
+4.5939052754e-20    -8.1301922198e-20   -1.5001726634e-19   3.4824667753e-19    1.2497439153e-19    
+-8.5582831510e-20   4.3997769291e-20    -8.9575266656e-20   -1.2050209254e-19   7.5699828692e-21    
+-7.5060405961e-20   4.9969989251e-20    3.3940265017e-19    8.6203668399e-20    -6.8618462053e-22   
+-5.9584502662e-20   -6.0001276565e-20   2.2049943148e-19    1.4653707177e-20    -4.5852764303e-20   
+2.4841934053e-19    4.1793981846e-19    1.8974745203e-19    -2.7765236268e-19   -5.5855302038e-19   
+1.3003115886e-20    7.1457816907e-19    -5.7726369300e-21   -1.9398048818e-21   2.5679034728e-20    
+-1.0501967014e-20   -1.3084361168e-20   1.2769555659e-20    4.7372173703e-21    6.2497394082e-21    
+1.3052978044e-20    6.6984919162e-20    8.6849606362e-20    9.5095425859e-21    4.5238294378e-20    
+-1.9472317125e-20   -5.8677766897e-20   -4.4378391161e-20   -4.7871599642e-20   2.6621053508e-20    
+3.0521155178e-20    1.0819226495e-19    5.8594797795e-20    -1.2409922533e-19   -2.4752587640e-19   
+-1.1726196902e-19   8.3732362881e-21    5.8489059349e-20    1.0746485929e-19    -1.2353519938e-20   
+-2.1064929632e-20   5.3582268474e-21    -1.1056745502e-19   -3.4048201479e-20   -8.0083309474e-20   
+-1.2673893420e-20   2.0407610248e-19    2.3205299499e-19    1.5328797060e-19    6.3115228238e-20    
+2.9154028187e-20    2.7969414379e-19    4.1140378755e-19    3.2153630029e-20    -1.0642656708e-20   
+-5.1291956161e-22   3.4370258426e-20    -2.2862850912e-20   1.4882300124e-19    2.8226872154e-19    
+-1.3802001553e-20   6.0401026511e-20    1.4506646588e-19    1.3664625701e-19    1.4668624340e-19    
+-9.1613095785e-20   5.1768905551e-20    4.2894759781e-21    -2.9425359067e-19   -3.6671474296e-20   
+-1.2735488568e-19   -9.4117996182e-20   1.9849643365e-19    1.1529443820e-20    1.5171751254e-20    
+2.9970157340e-21    1.8245308139e-20    3.3245652232e-20    3.3630463901e-20    2.7958199768e-20    
+5.7907328264e-20    7.1814680550e-20    2.5115152476e-20    1.2398531337e-20    -5.6408264206e-21   
+1.1357124860e-20    5.2652806524e-21    3.3141865372e-20    6.5362791972e-20    -1.2605865500e-20   
+-4.9584937031e-20   -7.9520034436e-20   -7.6819390826e-20   -2.5690390064e-20   -7.7441861791e-20   
+-2.1119463349e-19   -2.0804175779e-19   7.4377371730e-20    1.6980250321e-19    8.5889162615e-22    
+-1.9864527789e-19   -2.6933099463e-19   -1.7336479987e-20   -1.1542060365e-19   -2.9634895729e-19   
+-7.6250245019e-20   6.7833545591e-20    -2.6955397837e-19   -1.5931922090e-19   7.2983170101e-20    
+-3.2063391306e-19   -1.5928625591e-19   2.7817058067e-19    2.8447692866e-19    2.3912968158e-20    
+6.8248469718e-20    1.0846291193e-19    -2.1770569168e-20   -1.4334650831e-19   -1.7980313627e-19   
+2.8419153280e-19    4.9503528649e-19    2.7825000513e-19    -3.3599528749e-20   -1.7519169298e-19   
+3.9315913758e-19    4.8369350778e-19    -5.8471558545e-20   -2.6074273623e-19   -7.6339959143e-20   
+2.6390300011e-19    1.7016930459e-20    -3.2582704680e-19   -3.1915654442e-19   -8.5426616264e-21   
+-1.0124294328e-20   -3.7212253728e-21   -1.8491005031e-20   1.0828292980e-20    -1.5198718771e-21   
+-4.2023372578e-20   -9.6002270936e-21   -3.5791075741e-20   -7.8426774362e-20   -8.8722972040e-20   
+-5.7710748596e-20   -1.1367860091e-19   -1.8328743328e-19   -1.0926929169e-19   -3.0884469758e-20   
+8.1719429941e-20    5.3631074023e-20    -8.8016366856e-20   -1.7619414018e-19   -2.6162763547e-20   
+2.1537202660e-19    2.4580291934e-19    6.8798667893e-20    4.2345211327e-20    7.5632301605e-20    
+-5.9717894314e-20   -1.9836783041e-20   1.9349305788e-20    -6.6762606132e-20   -9.7501049224e-20   
+-3.6442793400e-20   1.8210238874e-19    2.9626188951e-19    1.5285593237e-19    6.4919256708e-20    
+-1.6335301129e-19   -2.4437423287e-19   -3.5645343474e-20   -2.7279313105e-19   -4.4876652412e-19   
+-1.5870488767e-19   -2.2894774718e-19   -2.0162826394e-19   7.7148456418e-20    4.5327231510e-21    
+-1.4511655861e-19   -4.0284869479e-20   1.8925918428e-19    2.0785860314e-19    1.7373329695e-19    
+-5.7837183266e-21   -9.3877813317e-21   2.8625033428e-19    1.8991936961e-20    -2.2177350506e-19   
+-1.5561197159e-19   1.7208653754e-20    1.2229250705e-19    -1.9307375174e-20   -4.2335842906e-20   
+1.5800109420e-20    -3.3477561473e-20   -1.1832044281e-20   -8.5706095412e-21   -9.3401274144e-21   
+-2.3954039437e-20   -3.7433357448e-20   -5.9372035212e-20   -6.6328975503e-20   1.0963014347e-22    
+-3.2611668659e-20   -7.6625207784e-20   1.3577713786e-20    -1.7723680243e-20   -5.8958845726e-20   
+-1.2600861104e-20   -1.2751837809e-21   1.0809303596e-19    1.4521507040e-19    -2.1053035915e-20   
+3.4057817227e-21    9.0784256439e-20    1.6568217552e-19    2.3664800541e-19    2.6051816217e-22    
+-1.3055392032e-19   -3.9501575418e-20   1.6454582386e-19    1.7641706109e-19    1.4305776533e-20    
+2.1789423989e-19    2.3217019981e-19    -6.3011864008e-21   6.2786650329e-20    2.5903469592e-19    
+5.8539617900e-21    -1.7637002724e-19   7.2384650934e-22    2.8712024646e-20    -1.9121681608e-19   
+-3.6259385225e-19   8.1824342224e-20    9.5019785639e-20    -1.6249662199e-19   -1.6323080177e-20   
+-7.2772617407e-20   -2.5311754713e-19   -3.6305087929e-19   -3.3589067800e-19   -2.1854241166e-19   
+-1.0263496258e-19   -1.6242439718e-19   -2.5245963974e-19   -3.0506107617e-20   5.7909505399e-20    
+-8.4118238785e-20   -1.4499541979e-19   -1.6965470772e-19   2.5577473716e-19    2.2970884660e-19    
+-1.9729259438e-19   1.0791154547e-20    1.3574908674e-20    -1.0761540161e-20   5.4923540701e-20    
+1.7044039572e-20    -3.7076457593e-20   -2.2527937547e-20   2.5689148584e-20    9.3756795613e-20    
+4.5480244643e-20    2.9765777984e-20    6.8051992063e-20    9.0930295778e-20    1.3403454573e-19    
+9.8192362021e-20    7.3553205289e-20    9.6785202439e-20    1.0553715518e-19    1.2464141117e-19    
+7.1313069009e-20    -5.9414218876e-20   -1.5106924017e-19   -9.7474019688e-20   -2.7710102211e-20   
+-1.1520069682e-19   -1.5648198495e-19   -5.4982113577e-20   3.5582155811e-20    8.1962926816e-20    
+4.5800603150e-20    7.7085913784e-20    -7.1675619124e-20   -3.3075313271e-19   -2.8518885286e-19   
+-1.8765929442e-19   -1.6174547600e-19   1.3423493217e-19    1.9176412256e-19    7.1732311547e-20    
+9.0901208316e-20    2.1461922905e-20    1.2316946687e-19    2.6688352986e-19    2.3114716370e-19    
+-9.6810907145e-20   -6.5224619681e-20   1.5827985677e-19    -1.2438781063e-20   -6.2441457996e-20   
+-1.0220682929e-19   -2.7592881221e-19   -5.1579028156e-20   5.7221986023e-20    5.5642884323e-20    
+1.9884441325e-19    2.0147759846e-19    2.0258239030e-19    7.5148342678e-20    2.2277790536e-19    
+1.2431660886e-19    -2.2648282901e-19   -3.2336680666e-20   3.9272704898e-21    2.6705606043e-21    
+1.6536585630e-20    -4.3500706965e-21   -2.6029758296e-20   3.0882426105e-21    5.4406200256e-20    
+3.2235481884e-20    -1.6715123644e-20   3.8736964246e-20    1.1748077674e-19    4.4486345086e-20    
+3.8527742523e-20    1.0378017971e-19    6.1373663387e-20    -1.0647138818e-20   -1.4682914176e-19   
+-1.0467402376e-19   1.1771244170e-20    -4.4000495827e-20   -4.3890187925e-20   -9.6461658879e-20   
+-1.6744848407e-19   -1.0789636588e-19   -1.8576234465e-20   -4.8145114896e-20   -1.6090673963e-19   
+-4.9713953940e-20   4.3525805516e-20    -5.2509470669e-20   -3.7786470677e-20   1.4157590433e-20    
+8.6480408384e-20    1.8566443507e-19    5.6745266020e-20    -7.3700698470e-20   5.5456430979e-21    
+5.1363927622e-20    1.1625440365e-19    1.9293334857e-19    -2.8291459358e-20   -4.4219778380e-20   
+3.9203594600e-20    5.9900730014e-21    1.4999594254e-19    1.1163498493e-19    -5.3862249637e-20   
+-1.7401850971e-19   -4.5280958486e-20   2.2033960266e-19    2.1977686461e-19    -1.6689052163e-19   
+-2.5233471787e-19   -1.3917344178e-19   5.8397670665e-21    2.6386141753e-19    7.2020305568e-20    
+-6.0817076326e-20   -3.3816336150e-20   -7.1407285391e-20   -1.8541988049e-20   7.5145724183e-21    
+1.7796814452e-20    -1.6901044787e-20   -2.3727795221e-20   8.1910564166e-21    7.5991140363e-20    
+4.1256188410e-20    -5.6722750542e-20   -4.4020742127e-20   4.4787989549e-20    7.2889689720e-20    
+7.7420150084e-21    3.7773098315e-20    4.5369972144e-20    -7.8791170784e-20   -1.9901986403e-19   
+-2.9409542620e-19   -1.8058081236e-19   -1.7537427944e-20   5.7533032643e-20    1.0845294946e-19    
+-9.2980856302e-21   -4.7356805463e-20   -1.4075539879e-20   4.1344534046e-20    1.0269494707e-19    
+6.6766675748e-20    6.0671475903e-20    4.5582690639e-21    -1.8335662202e-20   6.7555986960e-20    
+1.6775981874e-19    2.6756752713e-19    2.6366718869e-19    1.0544008326e-19    -5.2928344045e-20   
+-2.6981399979e-20   3.6345668009e-20    -2.7734283745e-20   1.2731472993e-19    2.1489754515e-19    
+-1.3751024312e-19   -2.4031313889e-19   9.6991041051e-20    1.2852788526e-19    -1.1794240714e-19   
+-6.4506716230e-20   -1.1024227794e-19   4.8702986724e-20    3.5110445977e-19    2.1992701766e-19    
+-2.4019031117e-20   -1.2907313504e-19   -7.9471701120e-20   -1.4176466922e-19   4.4625885964e-20    
+1.8517547479e-19    -1.9445209242e-19   -3.8105052024e-19   -3.1605733812e-19   8.3271792997e-21    
+7.6169856490e-21    9.3033689221e-22    -4.0524594149e-20   -2.7914891348e-20   1.1179709170e-20    
+1.9407454491e-20    -1.3646782303e-20   2.9642287573e-20    8.6764602605e-20    5.9639923872e-20    
+-3.5761968221e-20   -6.1940558888e-20   -5.8521055104e-21   1.1437793410e-20    -2.9497598006e-20   
+-3.2265537405e-21   7.3034346390e-20    3.2255397408e-20    1.0100335467e-20    5.1379315870e-20    
+5.4785005870e-20    8.2111480738e-20    9.9712097346e-20    5.2882425078e-20    7.1246781960e-20    
+1.7839844753e-19    1.1555232467e-19    -1.8922232034e-20   -1.4937434465e-21   -5.5670994016e-20   
+-1.4569501782e-19   2.9538431185e-20    2.0878480539e-20    -2.0213744754e-19   1.3399398493e-19    
+2.2301050577e-19    -7.6479198286e-21   7.1821983428e-20    1.8830055165e-19    1.3822104885e-19    
+-1.0357516846e-20   -1.3910206013e-19   -1.2953325301e-19   5.9888514112e-20    1.1511450760e-19    
+8.8196307376e-20    8.9323182229e-20    1.5062354470e-19    1.4172938035e-19    6.3738110742e-20    
+8.7619477668e-20    1.7979919547e-19    1.2829999192e-19    1.9948415682e-19    1.4078353622e-19    
+-1.8862017740e-19   1.2890317789e-19    7.1992824872e-20    -2.3940524957e-19   -8.0247675057e-20   
+2.5775902584e-20    -2.8253482600e-20   -7.0724391330e-21   -2.5197541877e-20   -3.5295386320e-21   
+-4.0560036493e-21   -1.3727309477e-20   1.7976447306e-20    4.8859961535e-20    5.2391397069e-20    
+-5.0972108764e-20   -9.8671283805e-20   3.9639832863e-21    -8.0245861210e-21   -2.7902206018e-20   
+3.9191753238e-20    1.1360202156e-19    2.4060809417e-19    2.3695925180e-19    1.6021439360e-19    
+1.0879023152e-20    -3.7450505040e-20   8.5396874112e-20    8.6417384549e-20    7.6990954746e-20    
+3.7631362050e-20    -2.9557817380e-20   -1.4293890303e-20   6.8466115904e-20    1.5095858545e-20    
+-1.1793460890e-19   -7.1510988810e-20   5.2040059039e-20    -1.5842118969e-19   -1.3366782403e-19   
+-3.4398510151e-20   -3.5067068664e-19   -1.1569895499e-19   7.7402502329e-20    1.3827013005e-19    
+5.4255976008e-20    -3.9536008098e-19   1.0682264316e-20    1.7907265757e-19    -2.6872283872e-19   
+-2.3605546578e-19   -1.1305839597e-19   3.8797708650e-20    3.6272261608e-20    -1.2615534910e-19   
+-1.2055588100e-19   -8.2686783518e-20   -8.2169607461e-20   2.1401643978e-20    2.3338256429e-19    
+2.5911830554e-19    -2.0158475310e-21   1.4735767965e-20    5.4606234890e-20    2.3559919856e-19    
+5.8489556713e-19    1.6089160984e-20    4.0309603560e-20    1.9251101023e-20    2.7430314480e-20    
+2.2628036123e-20    -9.7732659890e-21   -4.8555525433e-20   2.6705063919e-20    -2.2540568662e-20   
+-8.1206934876e-20   1.1214895433e-20    1.7798098478e-20    -2.1089379879e-20   -9.3947840984e-20   
+-1.5556571807e-19   -4.6965213125e-20   -6.9323194999e-22   9.7525630862e-21    7.5522764924e-20    
+3.2184867116e-21    -1.2225188104e-19   -4.9180197729e-20   -3.3578086673e-21   -5.4344315669e-20   
+5.4377465937e-20    -1.3080886173e-19   -2.2708794363e-19   -3.8697805361e-20   -7.3366805897e-20   
+-4.8598023867e-20   9.7399966431e-20    2.0928561338e-19    1.0487628877e-19    1.3434031203e-19    
+2.3354915063e-19    -6.6059490776e-20   4.9871356722e-20    2.2238808256e-19    -1.7055721880e-19   
+-2.9742623811e-19   -2.2639482621e-19   -2.0097536184e-19   1.2999021634e-19    2.6021990517e-19    
+1.5794424046e-19    1.7843508143e-20    -1.0999767278e-19   3.7173157756e-20    4.1766257757e-20    
+-1.1910314602e-19   -1.6427156912e-19   -2.9009797631e-19   -1.0294717254e-19   6.7063870865e-20    
+-2.4809483185e-20   1.6784292090e-20    5.0194570162e-20    5.8346698608e-20    -6.7485359715e-20   
+-3.7723996987e-20   8.2560109923e-20    -1.1105530081e-20   2.7385598851e-20    -3.8416223536e-22   
+1.3236511342e-20    -4.3936211727e-21   1.6851517008e-20    3.3105110846e-20    -2.3336106154e-20   
+-4.3943514350e-20   -1.0691955892e-20   2.0616121999e-20    6.4486080575e-20    3.7475060981e-20    
+8.7063019641e-21    -1.1199675614e-20   5.1841525085e-20    1.0290727110e-20    -1.4109067465e-19   
+-2.0569303452e-19   -1.9603683794e-19   4.7616752754e-20    4.1268610527e-20    -1.4808033484e-19   
+-5.6435924701e-20   7.4566999735e-20    -4.0056415205e-20   -6.9809051834e-20   7.1844447558e-21    
+-1.5279982608e-19   -8.4835520324e-20   1.0025142167e-19    1.1680192288e-19    -4.1912572013e-20   
+4.2334871554e-21    -1.0662912863e-20   1.5222414138e-20    4.5964676770e-19    1.1486756952e-19    
+-2.4294470021e-19   -7.4846379986e-20   -1.5768553078e-19   -9.8041703066e-21   -8.3159611677e-20   
+-2.3124300558e-19   1.5881814692e-19    2.3554532686e-19    -6.5637904248e-20   -1.8860261907e-19   
+-1.7875753547e-19   -2.5457316825e-19   -1.2393037822e-19   -1.5726419091e-19   -6.4515366910e-20   
+3.1427828053e-20    -2.4881248801e-19   -3.6694177363e-20   1.4280229306e-19    1.9424103048e-20    
+-2.9571867617e-20   -1.0599251969e-19   -1.5648025658e-19   -8.1754798375e-21   -4.6352336177e-20   
+-7.5047678834e-21   1.1967468692e-20    1.8366760974e-20    3.5696284256e-20    6.8126494014e-20    
+-2.8622640629e-20   1.5694388704e-21    4.7167298553e-20    -2.6923603041e-20   2.1345288521e-20    
+1.6300293533e-20    7.9257824919e-21    8.8172617059e-20    2.4398441323e-20    2.0800347587e-20    
+3.6854916049e-20    -3.4454392037e-20   7.1170052698e-21    1.4446320859e-19    -1.9506709146e-21   
+-2.1244390495e-19   -5.8310647157e-21   -1.0050831577e-20   1.0664143511e-21    6.1499466342e-20    
+6.8044610257e-20    1.1568990990e-19    -1.7416102765e-20   -1.5306532256e-20   2.1049194285e-20    
+-2.0277955866e-20   -1.9125788079e-19   -2.1245798596e-19   1.3666969293e-19    3.2461920204e-20    
+-2.6404174444e-19   -5.6930462088e-20   8.8070041678e-20    5.8920752329e-21    6.7794841080e-20    
+-2.0945063383e-20   -2.1268982945e-19   -1.4391832723e-19   -5.4343908554e-20   -1.1764503964e-19   
+-1.4444129797e-19   -2.1722155535e-19   -2.3812999064e-19   1.7136393757e-20    1.5388259476e-19    
+-3.4780129873e-20   5.2476737462e-21    -1.4676997583e-20   -1.6263471805e-19   2.1344485286e-20    
+-1.1600140349e-19   -1.2081165100e-19   4.3085898848e-20    -1.8719759002e-20   1.7983888750e-20    
+-2.1640107397e-21   3.4297970621e-20    3.3375710442e-20    8.2145599660e-21    1.0282745757e-20    
+-7.3657184703e-21   9.2099146934e-21    7.8377071072e-20    3.6395025190e-20    -8.2242368759e-20   
+-1.4147684643e-19   -6.9082036881e-20   -4.8345865895e-20   -7.6070442438e-20   -1.1533282592e-19   
+-6.9375643019e-20   7.2932942252e-20    1.2839332198e-19    8.3904024884e-20    -6.5387792115e-20   
+-1.2031416135e-19   -4.5966412706e-20   5.8182931519e-20    -3.0313604326e-20   4.0395398057e-20    
+1.5128130142e-19    3.1384412709e-20    1.0536604485e-19    9.9475868782e-20    7.8939014316e-20    
+-8.9981381388e-21   -1.7448851475e-20   3.7177392893e-20    -2.4741528915e-20   -2.7680760112e-20   
+-2.4305768687e-19   -7.0748437024e-20   3.2080266406e-19    1.5255489139e-19    9.8457988616e-20    
+1.8379029207e-19    1.1394509364e-19    9.8846366353e-20    9.9412203282e-20    8.0114139956e-20    
+5.6430524299e-20    1.1015099236e-20    1.4407276800e-19    3.0866359482e-19    8.4542296299e-20    
+-3.2564723115e-20   -3.2457477939e-20   4.9326086696e-20    1.8614425095e-19    -1.2362474715e-19   
+-1.5708137149e-19   -1.1604491584e-19   -1.1814297259e-19   -6.5376740289e-20   -2.1696831229e-19   
+-3.6762562144e-20   -1.3250291169e-20   -3.3790632075e-21   9.7953831682e-22    -2.0463550696e-20   
+-2.2528200085e-20   -1.8630254191e-20   3.6303001737e-20    8.1484050895e-20    2.1214879329e-21    
+-7.8046910007e-20   -4.1375836586e-20   6.8109523203e-20    5.3463684812e-21    -1.0620253867e-19   
+-3.1823547418e-20   -6.7658717279e-20   -7.2264751001e-20   -2.1007178012e-20   2.2258156233e-20    
+1.8199075475e-20    5.9047429341e-20    1.7702309996e-19    1.1873311556e-19    8.0875573871e-21    
+-2.5320861662e-20   1.1245271167e-19    1.2342204075e-20    -5.3603462099e-20   -3.5491791157e-20   
+-8.8363917863e-21   -4.5264717152e-20   -2.2982806139e-19   2.7605798802e-20    9.5018648601e-21    
+-3.3152677656e-19   -1.2206127508e-19   1.9532839141e-19    2.7939324991e-19    1.7132211552e-19    
+1.6252987201e-19    1.0067195414e-19    -8.7159117208e-21   -3.9386927783e-21   7.6084837431e-20    
+8.3503775548e-20    4.8330931533e-20    1.2359583556e-19    3.4357108363e-19    3.6700675697e-19    
+1.7396345346e-20    4.9801944340e-20    1.2404232943e-19    -1.5686559830e-19   -1.8929633140e-19   
+5.5490430356e-20    7.8293032230e-20    -7.5519348219e-20   2.3328001518e-21    1.3097072202e-19    
+8.0924066284e-20    -3.4826575479e-20   -8.4387402268e-20   -3.6102723441e-20   3.1246408990e-21    
+6.0030522528e-22    -3.6929211513e-20   -4.9814610110e-20   -7.7114824261e-21   1.4048498701e-21    
+-2.9896445391e-20   3.7586645549e-20    4.3292100551e-20    -2.9886171335e-20   -4.7473974168e-21   
+1.2625407320e-19    8.2444567443e-20    -3.6738191923e-21   -3.9242547135e-20   -5.4039372225e-20   
+1.1606733194e-20    3.9018793097e-20    8.7854645388e-20    4.5965300659e-22    -1.7209519018e-20   
+-1.3496867738e-20   -1.2065456497e-19   -1.1152171462e-19   -1.6398442254e-19   -2.0955477414e-19   
+-1.2451625823e-19   -6.5558410448e-20   5.8472425298e-20    1.2410419419e-19    2.0440380120e-19    
+2.4056454603e-20    -1.8285081393e-19   1.0192341504e-19    5.6271885548e-20    -9.0411076086e-20   
+-2.9273845101e-20   3.9585393418e-20    4.0943935091e-20    3.0575510522e-20    7.2895045153e-20    
+2.1533916144e-20    8.7650701461e-20    1.7270332622e-19    8.2621780227e-20    3.0605832053e-20    
+-4.5158723526e-20   -9.5764470502e-20   8.7336677583e-20    8.6929449773e-20    -2.0666329508e-20   
+-6.4693126270e-20   5.3782667799e-20    1.2618835677e-19    -6.6274585121e-20   5.5489731003e-21    
+1.3159879272e-19    8.2865112469e-20    1.7138748854e-20    4.0303959117e-21    2.4304845711e-20    
+4.5348021267e-20    2.7831029445e-21    -2.5473940439e-20   -2.5789519620e-20   -2.9220534318e-20   
+-4.8881500828e-20   -7.2378418580e-20   -8.4572327460e-20   -5.3749106254e-20   2.1643772980e-21    
+1.2964127080e-19    1.6708992524e-19    -9.0946269483e-20   -2.1373676956e-20   1.3190705262e-19    
+8.3717551471e-20    -2.7511224753e-20   -5.6836912754e-20   5.8786037685e-22    -1.5019984547e-19   
+-7.9722432353e-20   5.8260847601e-20    1.6266405514e-20    -4.1321586586e-20   7.0140147011e-22    
+-1.0197790297e-22   1.0044948365e-19    1.7316163069e-20    -7.7196912472e-20   1.7472842162e-19    
+8.4986160546e-20    3.1339625189e-20    1.6730480174e-19    -1.8643279901e-20   -2.5614355907e-19   
+-1.5246912908e-19   -5.8237588584e-20   -1.6228170785e-19   -4.6072686402e-20   -1.0543773319e-19   
+-1.2506235674e-19   2.2249593291e-20    1.0739251807e-20    -7.2991998842e-20   -1.7199482361e-19   
+-2.7059529495e-19   -2.2335572944e-19   -3.2107248840e-20   -2.4871234217e-19   -2.6866276735e-19   
+9.4028940202e-20    1.5935683914e-19    5.3610095798e-21    4.7027169852e-20    2.2903786013e-19    
+1.1430632913e-19    -5.0498556308e-20   -4.1752851628e-20   1.1071833631e-20    4.6552249924e-20    
+1.2668732230e-20    2.4522024031e-20    -6.0512324433e-21   3.3081871783e-21    3.4588715815e-20    
+2.0455688525e-20    1.2304796797e-21    3.6304955758e-20    5.8963356742e-20    4.1352434475e-20    
+2.0522160892e-20    -1.3008341024e-20   -1.0586682794e-19   -2.1242663683e-19   -6.5730526076e-20   
+7.4383111781e-20    -8.4969915808e-20   -1.0834169723e-19   4.6850343036e-20    4.2459422785e-22    
+-4.6992997412e-20   4.9648915182e-20    -3.9448992357e-20   -1.0280718062e-19   -2.0917913387e-20   
+8.2685265231e-20    6.4474272031e-20    1.0548041472e-19    1.9459058210e-21    -2.2349772880e-19   
+-1.9126124711e-19   -2.1848286771e-19   4.2279477277e-21    1.8691895447e-19    -2.6059995390e-20   
+-1.6435435165e-19   -9.4291616093e-20   -6.8518358405e-20   -2.2247402527e-19   -1.7000696262e-19   
+-8.1297560702e-20   -4.5522385020e-21   2.9872885784e-20    -2.6259735962e-19   -2.7944525012e-19   
+-5.7993107606e-21   -1.0219029128e-19   -1.1218535024e-19   2.6080180678e-20    -1.3985596863e-19   
+-1.5945852223e-19   -5.5154330723e-21   1.9398190479e-20    -1.2016066438e-19   -1.7676582281e-19   
+7.1628085418e-20    5.0147798057e-20    3.7718949978e-20    2.5187072797e-19    6.0531564666e-21    
+2.1244727843e-20    -4.1647868918e-21   -3.5609617225e-20   -2.0074175014e-20   4.5630009964e-20    
+5.7704145111e-20    -8.8281881625e-22   6.6051403743e-22    1.1571090546e-19    1.1350842196e-19    
+1.7973591483e-20    -2.1288347962e-20   -7.2283466091e-20   -1.2490450876e-19   -9.9675034497e-20   
+-3.1021433045e-20   -8.1529152633e-20   -1.5581892630e-19   -1.0439169775e-20   2.8053115159e-20    
+-7.7465872865e-20   1.6339146082e-20    3.1909687211e-20    -8.1442237819e-20   -3.6673420454e-20   
+-4.9271529154e-20   -5.7291136778e-20   2.9074820072e-20    -3.2417399114e-20   2.8434061993e-20    
+1.2145344740e-19    4.4293837112e-21    -5.4714866238e-20   3.1832018190e-20    -1.4490809200e-20   
+-2.5866870620e-20   1.6035277143e-19    1.1333370790e-19    -1.5236508069e-19   -1.5714099222e-19   
+-2.6849129587e-20   -1.1195468380e-20   5.8411638437e-20    -6.3101408329e-20   -4.1900792851e-20   
+1.2524043887e-19    1.1207519931e-19    -1.2526699640e-20   -9.5875424299e-20   8.8606558273e-20    
+2.3907304380e-19    6.7549988443e-20    -5.8775299553e-20   4.0128405522e-20    -3.8231391655e-20   
+-1.5861282468e-19   -1.1924892692e-19   -5.5508852449e-20   5.0329583130e-21    5.9501732770e-20    
+4.4709213682e-21    2.3167261098e-20    -9.3531365747e-21   -4.3961738858e-20   2.9430488954e-20    
+3.7332587486e-20    -5.2667371936e-20   -1.0046298981e-19   -5.3939328324e-20   -2.6067669139e-20   
+-1.3133998259e-19   -1.2927732948e-19   2.3701178161e-20    9.4454937741e-20    9.2499570308e-20    
+1.2950831449e-19    1.4933849367e-19    8.6436399424e-20    8.5378945276e-20    7.9055488682e-20    
+-7.6468574508e-22   -2.6999686234e-20   -8.5216081653e-22   -3.8176042474e-20   2.8805231416e-20    
+8.4828024980e-20    -6.3405019877e-22   -5.4833137203e-20   -1.1118691163e-19   -1.3734635018e-19   
+-1.4508917553e-20   9.9164452767e-20    5.5371844616e-20    9.2758337328e-20    1.2747568124e-20    
+-4.3609717536e-20   -2.1105599201e-20   -6.1181643625e-21   1.6417553213e-20    8.3838628781e-20    
+2.6325422199e-19    1.4676145293e-19    3.8565219847e-20    -1.5383511626e-20   -6.7848533861e-20   
+1.9281808475e-19    1.2862576519e-19    -4.5525028437e-20   -5.9516383649e-20   -1.3996373084e-19   
+-7.9391390820e-20   4.1412330108e-21    9.5789366230e-20    2.6369875555e-20    1.8309078644e-19    
+2.7796927468e-19    2.2150576057e-19    1.6412453345e-19    1.0054150763e-19    -3.0197077986e-20   
+-2.6525562187e-19   7.1403500881e-21    -1.1169565865e-20   4.0590487977e-21    -1.3549209812e-20   
+5.9739638781e-21    -2.0046816991e-20   -4.5481668157e-20   6.1590461175e-21    3.5314273970e-20    
+1.2525161849e-20    3.0944111269e-20    -1.9144661726e-20   -1.6733329604e-20   2.5901623002e-20    
+5.6953548406e-20    7.3301118903e-20    4.6328875927e-20    1.2403862404e-19    1.5552492159e-19    
+1.0877226208e-19    -5.9433316325e-20   -4.8509256145e-20   3.7634186733e-20    7.2211686471e-20    
+-1.4242646641e-21   -1.1813712104e-19   -4.2059908009e-20   -5.6166942928e-20   -1.4107082366e-19   
+-8.5366128564e-20   -8.5013612837e-20   -1.0253473419e-20   8.9956295915e-20    5.2805160905e-22    
+-9.8829375838e-20   -3.2987268729e-20   1.9923588777e-20    -1.2024843552e-19   -5.1008158013e-20   
+1.3872942899e-19    2.2998413545e-19    1.3653513092e-19    2.6936349370e-19    1.3916304022e-19    
+-6.7038080283e-21   8.8883678732e-21    1.1475477869e-19    1.6027079657e-19    4.9580355914e-20    
+1.0910712532e-19    -1.1135143120e-19   -2.0296502000e-19   -1.8579061670e-19   -1.1266431281e-19   
+-8.4469117602e-20   -3.6406610280e-20   -9.5528254028e-22   -8.3483488049e-20   1.1667101329e-20    
+9.9964437391e-21    -8.8568389063e-20   -4.9777754633e-22   -2.0648975549e-20   1.4906559611e-20    
+2.2657195081e-20    -3.0311899092e-20   -2.9749245426e-20   4.4039141512e-20    8.6436495635e-20    
+6.7192991959e-20    7.7394082576e-20    1.2497570472e-19    1.0286394623e-19    -3.3160935122e-21   
+-7.6608105501e-20   -7.1624720313e-20   -1.0085987133e-19   -1.4820184280e-19   -6.0250423845e-20   
+8.3140889300e-20    3.8608300917e-20    -5.3139754368e-20   -1.6199233224e-20   -6.8144428360e-21   
+7.0396040451e-20    7.3183884372e-20    6.2070540959e-20    7.2553424911e-20    8.1305619741e-20    
+2.4105672131e-19    2.1862064405e-19    5.4652781972e-20    4.5496178258e-20    1.8407613822e-19    
+5.3436618380e-20    6.9110855045e-20    2.3565173821e-19    1.5426844179e-19    7.9789512184e-20    
+3.4443594120e-21    -5.2824524162e-20   -6.4267582181e-20   -6.7074460956e-20   -8.9517273459e-20   
+2.8058701271e-20    8.2657834194e-20    8.7303176495e-20    2.0238641845e-19    1.1399931653e-19    
+1.1694699435e-19    1.7989930689e-19    8.4847371139e-20    7.0986454500e-20    -3.8601510330e-20   
+-1.9310849564e-19   -4.0226412775e-19   -3.1361546974e-19   -1.8007199982e-19   -8.0125077195e-20   
+6.8963083934e-20    1.5971234700e-19    3.2948278292e-19    -9.1474562505e-21   -1.0728518284e-20   
+1.1852904867e-20    1.5956662399e-20    -1.5171587831e-20   3.2234668831e-21    2.5613373775e-20    
+1.1475130832e-20    4.8756436981e-20    9.3335700443e-20    -3.0561534333e-20   -8.5442962187e-20   
+-5.9891666554e-20   6.1190616005e-21    3.3399494514e-21    -7.1537638247e-20   -4.9411646637e-21   
+-3.1289300901e-20   -3.0619035862e-20   -3.9105770021e-20   5.1355972593e-20    1.7947579607e-19    
+4.5393944410e-20    6.9747509071e-20    2.0230676506e-19    1.6847791887e-19    1.0624048716e-19    
+1.5920958575e-19    2.3542743958e-19    5.7498043941e-20    -3.2458803152e-20   -4.3132457652e-20   
+-4.5706528778e-20   -4.7357616046e-20   2.0214874372e-20    1.2384297707e-19    8.1874621797e-20    
+9.8020828340e-21    5.8523747182e-22    2.1662154488e-19    1.5623048500e-19    -4.7649244393e-20   
+-2.5160923186e-19   -4.7804983952e-20   3.0457698425e-20    3.4867549863e-22    1.4198505002e-19    
+-1.6148538876e-20   -9.5576195583e-20   3.5352831973e-20    1.9561707028e-19    4.8915347725e-20    
+2.4653285903e-19    2.5881735354e-19    -1.0177161733e-19   -7.9516059502e-20   -1.2900858754e-19   
+-1.2977299651e-20   1.4902381200e-19    8.4034876336e-20    1.0242161966e-19    -1.4533804818e-20   
+-4.5634872239e-20   -9.0388607551e-21   2.9008965552e-20    2.7567570963e-20    -1.5651903165e-20   
+-4.1891646921e-20   -4.0412251125e-21   3.4127447353e-20    -2.3264199909e-21   -4.6593433437e-20   
+-3.2341601213e-20   1.3600371032e-20    5.9010610148e-20    6.0450461404e-20    2.9752407547e-20    
+7.8824513837e-20    -1.2192358609e-20   -1.4480099998e-19   -4.8422316441e-20   5.5176843108e-20    
+8.9213299887e-20    -1.6992246563e-20   -3.7675899072e-20   -6.8588543933e-20   -8.3291358806e-20   
+4.6975045019e-20    1.8761476579e-20    -6.9178270125e-20   -1.4773214913e-19   -1.5210207688e-19   
+-5.6561790710e-20   -2.3362237104e-19   -2.2459769663e-19   -5.3882299210e-21   -1.4672778962e-19   
+-2.1546762711e-19   -7.2938864761e-20   5.2464710471e-20    1.0990241947e-19    -1.0868438421e-20   
+2.3551659243e-20    -6.4727034532e-20   -2.1976423765e-19   -1.6168023203e-19   -2.1978242850e-19   
+-6.6663859519e-20   -1.7144995814e-20   -1.0088371760e-19   4.9869087489e-20    1.9678525995e-19    
+5.0899135187e-20    -3.5547550386e-21   2.0594766452e-19    2.0788795067e-19    2.0952856838e-19    
+1.5549692525e-20    -1.5409551249e-19   -8.8152452564e-20   -1.1214949170e-19   -9.6852029432e-20   
+1.6172560199e-21    -2.3272234736e-20   -3.5056966940e-21   3.5741476695e-20    2.6961309188e-20    
+-6.1448327205e-20   -8.8101664836e-20   -4.3258297824e-20   -5.8955870390e-20   -7.5365247249e-20   
+1.5904472930e-20    7.0983437538e-20    1.3782175782e-19    5.5243614246e-20    -1.5812428864e-20   
+1.2851765247e-19    1.1677074296e-19    -1.6699096051e-20   -8.2121845976e-20   -5.5098878884e-20   
+-2.4900018935e-20   -6.2145945185e-20   -5.1700005375e-20   -7.8102062154e-20   -8.3765840602e-20   
+2.5012804587e-20    -1.0252026647e-19   -2.0633526494e-19   -1.6245805443e-19   -9.1108378283e-21   
+5.9979448523e-20    -8.1611584082e-20   -7.0110403560e-20   9.1189432208e-20    1.0137048066e-19    
+5.5821560734e-20    6.1551803375e-20    1.8124603633e-19    8.8129354527e-20    -2.2569788678e-19   
+-2.2723824903e-19   -2.3635715411e-20   -2.6214149812e-21   -6.9712992737e-20   -9.3489267770e-21   
+-8.6714877398e-21   -1.4408432976e-19   -1.3852012613e-19   2.3771098534e-20    5.9942145732e-21    
+1.0099422026e-19    1.7488763660e-19    -7.6711625210e-20   -6.2431349884e-20   1.3979925459e-19    
+9.4316734961e-20    1.6544933451e-19    8.9169304058e-20    -1.1647114671e-19   -4.5470824951e-20   
+4.2782387051e-20    2.0863701940e-20    3.5808822566e-20    -5.6504723331e-21   -1.9971541187e-20   
+-9.2078422158e-21   -6.5085415117e-22   5.2854448414e-22    -2.3032770824e-20   -3.2791229689e-20   
+2.3338646623e-20    -2.3360600268e-20   -4.3580382498e-20   -1.7773929323e-21   -2.2624634630e-20   
+2.8499583420e-20    1.2560592936e-19    1.4744659638e-21    -6.1011802478e-20   2.1214866444e-20    
+1.2499680215e-20    5.7088880807e-20    8.5476245809e-20    5.5311399059e-20    7.4136983590e-21    
+5.9743459358e-20    4.9231721742e-20    -1.3104584737e-19   -1.2987974010e-19   -2.2664168877e-20   
+7.6791879584e-20    1.6037986183e-19    3.3938539342e-20    4.8438451224e-20    1.1752003046e-19    
+-8.1119441251e-21   -3.7665894720e-20   6.2736887949e-20    1.3900335153e-19    3.3297181586e-20    
+-4.1644585180e-20   3.7188642311e-20    -4.7497674126e-20   5.1609063918e-20    2.0785256816e-19    
+1.5004709970e-19    1.1042358787e-19    6.7133481482e-22    -1.4025322997e-21   -6.9642271547e-20   
+-1.6528104884e-19   -5.4648651816e-20   2.4077380709e-20    -1.4999359746e-20   -6.8061694905e-20   
+-5.0529921197e-21   -1.5636083136e-19   -1.1222771757e-19   1.6417288315e-19    1.6414469346e-19    
+3.8224200755e-20    -7.6861899207e-20   7.5115360814e-20    2.0588185530e-20    -4.8726130767e-20   
+5.4213119731e-22    1.0938659902e-20    4.0882393361e-20    7.2879465045e-20    3.9635301379e-20    
+5.6076169903e-20    5.4753468813e-20    -2.2044570590e-20   -3.0639026197e-20   -8.7017543465e-20   
+-6.8944448835e-20   3.1808828128e-20    -6.0876298718e-20   -1.9336650115e-19   -9.0946247767e-21   
+1.1304834734e-19    3.3894789295e-20    8.3956717881e-20    6.7909916504e-21    -1.1087459596e-19   
+-5.3322098837e-20   -6.5491348108e-20   -8.8944497159e-20   5.0242668509e-20    2.1794119964e-20    
+2.5638241087e-20    5.4780616567e-20    1.8325480899e-20    1.4439652463e-19    1.8761034711e-20    
+-1.2175358500e-19   -1.2143204909e-19   -1.5784986628e-19   -1.6779155611e-19   -2.3420388902e-19   
+-7.5994971443e-20   2.6011363473e-19    2.3711070028e-19    3.5422449841e-20    1.7591802009e-19    
+1.2684482549e-19    1.2895833318e-20    7.0749245222e-20    -1.6857964196e-20   7.0913099424e-20    
+9.4212081980e-20    6.4272576700e-20    -1.2492352011e-19   -2.0181865509e-19   -2.6978117755e-20   
+4.6584217311e-20    8.3918168605e-21    -1.3663576647e-19   -7.0991307407e-20   2.3579554467e-20    
+3.3081750742e-20    1.3925271161e-20    1.5411411574e-21    7.9376421080e-20    2.4321668894e-20    
+1.1542260522e-20    4.5828035638e-20    -2.8055332038e-20   -3.5942826399e-20   8.3234029545e-21    
+-3.4600001180e-20   2.0311130545e-20    5.6451751616e-20    1.7726165507e-20    1.0159173474e-20    
+4.2317881281e-20    1.7850830682e-20    -5.0083277465e-20   -7.3661399496e-20   3.9415484858e-21    
+9.6641889856e-20    1.1734693584e-19    6.5688813440e-20    -6.9191321470e-20   -1.3182137647e-19   
+-8.1746656380e-20   8.8918955573e-20    1.0213401552e-19    5.5168066813e-20    7.9301021357e-20    
+-6.5153445079e-20   -6.8508742870e-20   -4.1042176417e-20   -3.6034615552e-20   1.6718185647e-19    
+1.2471381712e-19    4.2214524467e-20    4.7996828898e-20    1.5005668211e-19    1.2357032110e-19    
+-5.3387741273e-20   -1.0724054502e-21   -1.0977922028e-19   -1.7003036980e-19   3.7291275452e-20    
+1.7680256485e-19    9.9816324292e-21    -2.0756775878e-19   -1.5733036208e-19   -1.5133801160e-19   
+-9.0024027040e-20   1.0888075393e-19    1.7306186519e-19    7.1921305222e-21    -8.4596720897e-20   
+6.4105682097e-20    3.6920702228e-20    4.2885634547e-20    1.8597909487e-19    1.7399197952e-19    
+-1.9920743995e-20   -2.2839345075e-19   -6.2952596900e-20   1.7686688284e-19    1.6713766052e-20    
+3.8061227116e-20    4.0164559966e-20    1.6525027808e-20    -3.4124831549e-20   -4.7229722014e-21   
+2.0443128656e-20    -1.6549643152e-20   -1.6600088149e-21   -1.4240627328e-20   8.1647145084e-21    
+8.1064463654e-20    3.6983456975e-20    -2.2012461022e-20   -1.4892003356e-20   2.1400891970e-20    
+4.7703810891e-20    -8.1389416293e-20   -5.5689826773e-20   2.2945928179e-21    -2.0587525721e-20   
+-1.4731356044e-21   5.0542545949e-20    1.5989331829e-19    1.3641458239e-19    -3.5471956027e-20   
+-1.1761188404e-19   1.5276505782e-20    4.9355888929e-21    -4.5740244017e-20   -3.0688013779e-20   
+-6.6565273047e-20   9.1568993859e-20    1.5797911953e-19    1.2995509758e-19    1.5844552554e-19    
+6.7789925613e-20    -7.0692545885e-20   2.3614908709e-20    -2.7254617290e-19   -4.2442029082e-19   
+-8.9743776974e-20   -1.6848465896e-19   -1.4871528060e-19   -3.2958227388e-20   -1.2787116298e-19   
+-1.6806723246e-19   -1.8849179524e-19   -1.2713301963e-19   -2.8315700152e-20   1.0948459732e-19    
+1.2381538050e-19    6.0914530877e-20    -5.3353902803e-22   7.6637292587e-20    1.8835491442e-19    
+2.8937566359e-20    -6.3736164254e-21   -1.5140768910e-19   -4.9461701107e-20   1.6630891320e-19    
+-2.4133784561e-20   -2.5171036931e-20   2.2279488199e-20    -1.3265680738e-20   2.3746147241e-20    
+2.6523138558e-20    -2.0807431225e-20   -7.9092880608e-21   2.4405062589e-20    2.1581800843e-20    
+5.7955799887e-20    7.8526995236e-20    -4.9081564317e-20   -7.3121246460e-20   -1.5831671508e-20   
+-7.3542490154e-21   -1.3067000765e-20   -7.5170027535e-20   -9.0664285921e-20   -8.3908381040e-20   
+-3.1398738348e-20   1.5695173253e-20    -2.4824294960e-20   -1.1742731433e-19   -1.0587927768e-19   
+-1.6885793672e-19   -1.4875417399e-19   9.4330897394e-20    3.3440151719e-20    9.4453388204e-21    
+4.3112729939e-20    -4.6098826302e-20   5.8238644783e-20    4.9314975940e-20    -4.8108341325e-20   
+-9.7638966118e-20   -2.4409538633e-19   -1.9264978371e-19   5.6346087340e-20    4.8758665938e-20    
+2.1623622153e-20    -3.8078198890e-20   -1.8379414447e-19   -6.0475387507e-20   1.2821948803e-19    
+1.2600389698e-19    7.5959078549e-20    -9.9447609748e-20   -1.2877747817e-19   1.2634491699e-19    
+1.6436381324e-19    -4.1574687989e-20   -1.0365035692e-19   2.1870912440e-19    1.2878469948e-19    
+-1.6195762081e-19   -7.4178337877e-20   1.1181344372e-19    2.1345914730e-19    7.7924874287e-20    
+-4.9063833496e-20   -9.7862463458e-23   -2.4657380666e-21   -3.1145431370e-20   -1.8760100541e-20   
+4.2004222789e-20    -6.5848504218e-21   -3.7898863897e-20   1.5978057210e-20    3.0955381095e-21    
+6.1424636907e-22    -1.8541935257e-20   -5.1484000442e-20   3.4344889220e-20    5.6582001250e-20    
+5.5060339590e-21    5.0381658731e-20    5.5530764839e-20    6.1630270790e-20    1.0944052498e-19    
+3.5174795118e-20    -1.0028855217e-19   5.0252018859e-20    5.1015245968e-20    -1.2821877355e-19   
+-1.2591399039e-19   3.2870167238e-20    1.8184993994e-19    8.5362478947e-20    5.3488550235e-20    
+2.3979641818e-20    1.0600557180e-19    2.0196564455e-19    -9.5679282611e-20   -1.8690966370e-19   
+5.6983085125e-21    6.8145765447e-20    8.2329626786e-20    1.5442471486e-19    1.6708032497e-19    
+2.5307594663e-19    2.6636956634e-19    1.3324991906e-19    2.6562856370e-19    2.7329284643e-19    
+4.0179788695e-20    -2.6348000004e-20   1.2288920860e-19    1.9753062214e-19    1.4197877870e-19    
+-2.3310828909e-20   -1.0769939199e-19   -1.1991985875e-19   -1.9065243570e-19   -1.2107569764e-19   
+-7.6136570749e-20   5.6227014685e-20    1.0439381260e-19    8.2080774012e-20    3.0787299476e-19    
+1.8065200183e-19    -6.4464905388e-20   -3.3975422486e-20   3.8928070483e-21    -3.4892050980e-20   
+3.3284663851e-21    4.3059217915e-21    6.1883307528e-21    4.5095458958e-20    5.1385360330e-20    
+-6.7426412953e-20   -9.4219132706e-20   -3.6871148572e-20   -7.1538327580e-20   -3.9712350210e-20   
+5.9050667240e-22    5.9457893249e-21    6.0618058868e-21    -9.3303832383e-20   6.4280725491e-21    
+1.5419953035e-19    1.1590740644e-19    5.3809759008e-20    3.9064569331e-20    3.4678554283e-20    
+4.5275845470e-20    -8.0104597676e-21   1.0739680717e-19    1.2253339916e-19    -4.6107858111e-20   
+-6.5760644251e-22   -6.3625137561e-20   1.6512277310e-20    -2.4726829446e-20   -2.3877406898e-19   
+-1.2875744085e-19   -4.7036290332e-20   1.5798381413e-19    3.1662729699e-19    7.5715590043e-20    
+-1.0744244313e-20   8.3209830927e-20    5.9653873213e-20    1.7633548061e-19    1.5024052777e-19    
+-6.7874684130e-20   -3.5121247239e-20   -1.0611171815e-19   -1.7386032041e-19   9.2341750770e-20    
+1.4203991050e-19    -1.6413439091e-19   -8.6986285268e-20   2.4202021407e-19    1.7789152174e-19    
+-2.2455977923e-19   -2.9530354146e-19   -7.0425583560e-20   -1.7103580083e-20   -1.7005129547e-19   
+-2.6131890607e-19   -2.4610371585e-20   1.6392964574e-19    -2.9617199757e-20   -4.5948861364e-20   
+1.5992957120e-20    1.2408811818e-20    -2.3613280295e-20   -2.1559815605e-21   -3.5140379153e-21   
+-3.8498117418e-20   -9.6176492172e-21   2.3042426282e-20    3.9729612144e-20    2.3032609282e-20    
+-1.0047396477e-19   -1.2541958819e-19   -4.9605000302e-20   -1.6083177445e-20   4.0745009572e-20    
+3.6592904615e-20    -1.0121936118e-19   -6.5593721326e-20   6.6495285348e-20    -6.9260886601e-20   
+-1.5455030867e-19   1.1246126523e-20    7.6888329380e-20    -8.5558078322e-22   -8.4681136718e-20   
+-1.4484327177e-19   -3.0927492429e-20   1.3995199751e-19    -9.1457068567e-21   -1.3241709070e-19   
+1.2432630671e-19    2.2257489994e-19    3.4593797478e-20    -8.1236188625e-20   -1.9331827236e-19   
+-1.9730834786e-19   -9.7393956111e-20   -1.0571489411e-19   -5.2292667497e-20   -8.9233039456e-20   
+-1.9068254806e-19   -2.8503379285e-19   -8.4226731944e-20   2.4797092901e-19    1.1873838009e-19    
+-5.9016766422e-20   -9.4111452341e-20   -2.0898468263e-20   -2.1048685642e-20   3.2972663568e-20    
+2.2419267526e-19    1.9329496452e-19    1.0735307063e-19    -7.3380288062e-20   -1.4201242396e-19   
+-6.6397239024e-20   -1.5201829429e-19   -2.6137053298e-19   -3.0598339768e-19   5.1395014392e-20    
+3.8319242752e-22    -2.5921202998e-20   -7.7832238881e-21   -5.9675635485e-21   -4.2216116806e-20   
+-3.0688232316e-20   -2.5108755208e-20   3.6418605280e-21    4.2572985246e-20    2.6451664666e-20    
+2.3035990926e-20    6.0231490520e-20    3.5933287526e-20    -1.7219865615e-20   -5.2181780246e-20   
+1.3147816388e-19    1.2951203696e-19    -4.7388326849e-20   -6.5769278436e-20   -7.3403513922e-20   
+-2.3379552774e-20   -5.2486254870e-20   5.0541725719e-20    7.7107181975e-20    -5.2833940812e-20   
+-4.5695808780e-20   -5.2318656069e-22   9.0224098162e-20    1.2470995150e-19    -6.3600175400e-20   
+-5.9227199131e-20   8.9036270057e-22    -1.2596284036e-20   5.9718651818e-20    -1.5402398662e-19   
+-3.0902613073e-19   -7.1177753944e-20   1.6070293976e-19    5.2680189889e-20    -1.1933786537e-19   
+-1.9968541687e-19   -1.3473626834e-19   -5.5443038800e-20   2.6356250264e-20    1.5880789075e-19    
+1.0472638256e-19    7.4683781979e-20    -2.4597879368e-20   -6.5140546081e-21   1.1844681012e-20    
+-1.4778009755e-19   -8.4554332234e-20   9.9159618630e-20    2.6562683256e-19    2.5503623527e-19    
+2.0756326893e-19    2.1978648262e-19    1.7397150174e-19    -2.1750060102e-20   -1.9514995846e-19   
+2.0165990275e-20    -4.4835301428e-20   -3.6195186064e-20   1.4622398624e-20    6.8232148572e-21    
+5.1817144162e-22    4.9211521910e-20    3.3236672761e-20    1.6509506930e-20    1.4973416507e-21    
+-2.7010564046e-20   -1.9094792536e-20   2.4572492178e-20    6.4356835285e-20    7.7161515223e-20    
+-8.9312236561e-20   -2.0758417697e-19   -6.4463992239e-20   6.2495308394e-20    1.3953819899e-20    
+2.1071306765e-20    9.1646232711e-20    3.6912170498e-20    3.5801033444e-20    1.2108766842e-20    
+-3.9588111446e-22   9.5526582619e-21    3.7655827851e-20    -1.3616808772e-20   -1.1906887943e-19   
+-8.1497636531e-20   7.4651538499e-20    -1.1473375502e-19   -1.5362619740e-19   -1.2521564748e-20   
+-8.7976268476e-20   4.3810008255e-20    1.3361436529e-19    3.6752878170e-20    -1.5820708764e-19   
+-2.1058646558e-19   -7.2955436197e-20   -1.5696354282e-21   7.6240599447e-20    1.1734403425e-20    
+-1.7063544032e-19   -1.0186808574e-19   -7.1419552937e-20   -8.6231597056e-20   9.1362596725e-20    
+1.5448614163e-19    1.0325281336e-20    -1.0656609714e-19   -8.8053360205e-20   -9.6808015365e-20   
+-9.7014839340e-20   6.5196854591e-20    -1.8378082892e-20   -1.9864129365e-20   3.1615400804e-19    
+4.9571712845e-19    -1.2293045746e-20   9.2468275277e-21    4.5005926046e-21    1.0896995147e-20    
+2.1719230003e-20    6.0503383830e-20    3.6819159768e-20    1.6566522107e-20    3.5435943569e-20    
+-2.1886151697e-20   -2.3744703214e-20   1.3303108311e-20    -1.9297230489e-20   -1.2194112134e-20   
+4.9961554560e-20    -4.0127221129e-20   -2.2730850926e-19   -1.7864000281e-19   -1.0803819281e-19   
+-1.0141863913e-19   2.6471522183e-20    5.9433471860e-20    -2.2113331975e-20   -8.1635081647e-20   
+-3.0027294700e-21   -3.7632954988e-20   -5.0374291624e-20   4.1859476348e-20    -2.2031868663e-20   
+-6.9016694151e-20   9.3728810169e-20    1.2624161699e-19    8.8778985752e-20    8.8751321524e-20    
+5.5987165655e-20    1.7561514657e-19    2.7897997011e-19    1.6221173592e-19    -1.3379267507e-19   
+-1.4962055318e-19   -7.0793560290e-20   -8.4240377284e-20   2.2830518767e-20    2.4015183968e-19    
+7.8698432343e-20    -1.0660018579e-19   5.7700991949e-20    -4.6643120163e-20   -7.3542662178e-20   
+-6.9557056470e-21   -5.5356455042e-20   -1.3749443921e-19   -7.0192024646e-20   1.3656648582e-19    
+4.6726135403e-20    -1.5134742065e-19   -8.2225614306e-20   -1.4907736477e-19   -2.2012045540e-19   
+2.1621416094e-20    1.3077997078e-19    -1.2483954370e-20   5.9826715744e-20    6.9322932119e-21    
+-3.1540160533e-20   -1.0093711210e-20   -1.3459880602e-20   -2.7054667561e-20   -2.5714756929e-21   
+-3.0989814090e-20   1.1727046623e-20    3.8419523264e-20    -8.2305760117e-21   2.1737844075e-20    
+-3.1453451780e-20   -7.7203734395e-20   -3.6725276081e-20   4.8591644471e-20    8.3578594741e-20    
+4.1501183104e-20    2.6576532711e-20    -1.1957264167e-20   1.9190387912e-20    1.3979033944e-20    
+-6.1885171011e-20   -1.6574819062e-20   -9.1393546951e-20   -7.6037044263e-20   2.7220831866e-20    
+-2.2957575730e-20   -6.7914007868e-21   1.1757003540e-19    -1.2299206828e-19   -8.5974984600e-20   
+5.0481385920e-20    -5.3504139942e-20   1.6206417015e-19    1.4027396384e-19    3.9736273714e-20    
+7.7666113041e-20    1.1096346825e-19    1.3667978716e-19    2.1518281616e-19    1.9727555494e-19    
+1.3869103700e-19    1.0672125889e-19    -9.0431617867e-21   -1.6903973733e-20   6.8355827622e-20    
+6.0491884901e-20    -1.2864219715e-19   -9.8610277936e-20   -1.1066867063e-20   6.1494055666e-20    
+1.1030040349e-19    7.3631595342e-20    7.7613577260e-20    -3.6839148060e-20   2.5233046628e-20    
+8.7137604262e-20    -1.5701935195e-19   -3.7075565522e-19   -2.2873817646e-20   -2.1088945722e-20   
+-3.4849158363e-20   -6.3361503997e-21   3.2002610214e-21    -1.8569602210e-20   -2.5306205557e-20   
+-3.5302683605e-20   -1.2847254699e-21   4.3937736391e-20    -1.5430226889e-20   -6.4660580217e-20   
+-6.3578992174e-20   2.3852829307e-20    8.2219123783e-20    6.7997261115e-20    1.2942488213e-19    
+1.2912163000e-19    1.2473539500e-19    8.1703172950e-20    1.9867977497e-20    -9.7353980762e-21   
+3.7635756034e-20    8.2987535974e-20    -4.7704918695e-21   -1.0541990088e-19   -1.1091218164e-19   
+-3.6075446722e-20   4.7315153854e-20    1.1703881334e-19    -1.0842692133e-19   -2.3532318938e-19   
+-1.1612319725e-19   -5.4488278787e-20   -2.4591864321e-20   -8.4046732400e-20   -2.1297923567e-19   
+-2.6049015451e-19   -1.8396318248e-20   1.7773068774e-19    3.1363037700e-19    3.7448124631e-19    
+2.0620968227e-19    4.2787573361e-21    -6.9845547251e-20   3.7173102479e-20    7.3123348794e-20    
+1.0556977298e-20    4.1226331589e-20    1.2970809508e-20    -3.3667274918e-20   1.3702769066e-19    
+-5.6703183666e-20   -2.8987326993e-19   -2.4455486285e-19   3.1391004779e-20    1.5532084130e-20    
+-9.1627898583e-21   5.5213679107e-20    -2.1194794307e-19   -2.3259572845e-19   1.2058311794e-20    
+-2.6278315223e-21   -2.3634408264e-21   4.0606783568e-20    -1.2144089271e-20   -2.4440670710e-20   
+2.2467718770e-20    1.7001979211e-20    1.9611537055e-21    -4.2688110619e-20   -6.3278124396e-21   
+6.1457995147e-20    2.0652900089e-21    3.3919320894e-20    -4.6835651534e-21   3.5140725392e-21    
+8.3396233886e-20    -7.2895046595e-20   -1.0630217344e-19   -9.1713720834e-20   -7.6244996905e-20   
+2.4685914270e-20    7.6288770451e-20    1.0511328467e-19    4.6166954430e-20    8.6479583862e-21    
+-1.0076114877e-21   3.0996622574e-20    1.7989965867e-19    4.9373568017e-20    -1.7394532274e-19   
+4.8853478283e-20    -3.6659691707e-20   -2.0384567792e-19   8.9029783159e-21    1.2929612715e-20    
+-5.0190798321e-20   -9.4903904873e-20   -8.7906101979e-20   1.2461116451e-21    2.8254759841e-20    
+-1.9470232235e-19   -2.8827500235e-19   -9.0806668340e-20   -8.3396361059e-20   -1.2892620697e-20   
+3.9937336517e-20    -5.8761638468e-20   -1.0409052289e-19   -3.5345844485e-20   2.2159082726e-20    
+6.8117843210e-20    1.7967927132e-20    -1.4463056960e-19   -1.6653746288e-19   4.9314150137e-20    
+1.6859184068e-19    1.2656526756e-19    -1.1318589558e-19   -7.6433190439e-20   2.6677250364e-19    
+2.8782337491e-20    1.2238728031e-20    2.5257504361e-20    1.2455567039e-20    -3.3915107179e-20   
+-2.6492615052e-20   2.6601707176e-20    2.1431217775e-20    -8.7317059795e-21   2.0784008129e-20    
+8.9170687418e-20    1.1638765624e-19    2.2709357259e-20    -6.1621362078e-20   -4.6841253035e-20   
+-7.0041536165e-20   -4.2906861214e-20   -2.1873176122e-20   -1.1117778449e-19   -9.4963352818e-20   
+-3.4557465554e-20   6.0670823589e-20    -1.5018222735e-20   -2.0724585357e-20   6.1240918835e-20    
+1.6430509968e-19    1.5444159234e-19    1.3692361522e-20    -6.5874081465e-20   -1.1647906499e-19   
+4.7523131827e-20    1.9545138534e-19    1.2244285580e-19    -7.9740134654e-21   8.1779043462e-20    
+8.6770403722e-20    -4.0776169845e-20   9.9646327669e-20    1.1425683167e-19    -9.3356791851e-20   
+-1.8057656547e-19   -3.8102978198e-19   -4.8197040115e-19   -2.2329459167e-19   3.7676808939e-20    
+-9.5985223059e-22   -1.4001234557e-19   -1.0573935550e-19   -4.5892995622e-20   1.0795406363e-19    
+2.4570793741e-19    6.5169812146e-20    1.7031191424e-19    1.8090716694e-19    9.2224883846e-20    
+-1.1875290159e-19   -1.3996148793e-19   9.5098126896e-20    4.3313204544e-20    1.9548847427e-19    
+3.1149020824e-19    1.6433195417e-20    1.1422925110e-20    -2.2148966046e-20   -3.9125036260e-20   
+1.7648499283e-20    3.2613415113e-20    6.0930606542e-21    1.6549166626e-20    -2.3184268442e-20   
+-3.0124108176e-20   2.7876971419e-21    -7.2581949676e-20   -6.7870689865e-20   4.3871631124e-20    
+1.2484817019e-19    5.2705410505e-20    -9.3610060283e-20   4.1055362750e-20    8.8421483772e-20    
+3.4699747420e-20    7.2903628071e-20    3.6104033875e-20    -3.9113050604e-20   -6.0590317841e-20   
+-4.4900512300e-20   1.1277452193e-19    2.1208361043e-20    -1.4404027631e-19   -1.0892989444e-19   
+-3.8839063958e-20   4.3366648248e-20    -3.2044376752e-20   1.3125578616e-19    2.3826593938e-19    
+7.6063865489e-20    -2.9753785773e-20   -3.5818797977e-20   -2.7956778242e-20   1.0663517648e-19    
+1.3297242559e-19    -4.1075759717e-20   -2.1088580720e-20   -2.8381545164e-20   -7.1144077635e-20   
+4.5472349674e-21    6.8465829386e-21    2.4929783960e-20    -2.6308361363e-21   2.3757376273e-20    
+7.3951545591e-20    4.7872451060e-20    -7.5530309551e-20   -7.0792614984e-20   1.2747709374e-19    
+1.8942422414e-19    -8.0204439782e-20   -1.0330728586e-19   9.1412269057e-21    6.4022546027e-20    
+8.8985298446e-20    -7.8114566574e-20   2.6495575860e-20    4.1025175984e-20    -2.6575923237e-21   
+-1.6052467123e-20   1.3886734076e-20    1.5433160429e-20    -2.1746706068e-20   -2.2818249992e-20   
+-4.2293119144e-20   -3.9953291757e-20   -2.3044493984e-20   -2.1758552264e-20   1.1839947807e-19    
+1.3728463719e-19    -2.0454763758e-20   -6.0602097688e-21   2.0250143407e-20    3.1056266789e-20    
+1.2974336805e-19    7.7846165723e-20    3.7758682262e-20    2.7145759176e-20    -5.5383675599e-20   
+-6.0981958492e-20   -6.2197394673e-20   -6.5588711422e-20   2.2913944921e-20    1.5940345347e-20    
+6.6795162456e-21    -4.7748161173e-20   -3.3607029535e-20   -2.7571441038e-20   -4.9580379509e-20   
+7.0534357982e-20    -3.7324208385e-20   -6.5557994841e-20   -2.7522029643e-20   -1.5280008732e-19   
+-3.1840197251e-20   1.6175380776e-19    1.7114664856e-20    6.8392548239e-20    7.6304841252e-20    
+-1.4356070721e-20   1.5672081980e-20    5.9604833376e-20    1.4554648314e-19    1.2381422973e-19    
+7.4252700415e-20    -1.4246010897e-19   -2.4912633485e-19   -1.3806431119e-19   -2.3019911935e-20   
+-9.3053084580e-22   -6.4411508036e-20   4.3340664385e-20    1.8160196324e-19    1.2773947514e-19    
+1.1762885067e-19    6.8796348224e-20    -3.6485827764e-20   2.6882171720e-20    1.6861730639e-20    
+-1.0333472003e-21   5.8294139108e-21    -3.3296882940e-21   -1.6074428926e-20   -7.5956971467e-21   
+2.9274869565e-21    4.8765429861e-21    5.1322701475e-20    4.0140994544e-20    1.5143440924e-20    
+3.7538030597e-20    8.7699376180e-21    -4.4110501917e-20   -9.6379003254e-20   3.4131923918e-20    
+9.6076920075e-21    -3.1986291904e-20   1.1340268178e-19    8.8053898466e-20    -3.2171936463e-20   
+-8.6079947719e-20   3.3444289337e-20    5.5632218306e-20    -1.4051108789e-19   -6.2447358525e-20   
+1.2059030997e-19    -4.7048691940e-20   -5.3181270383e-20   3.1998053199e-20    -1.7890453067e-20   
+-7.5687391449e-20   -1.0126815318e-19   -2.4713648035e-20   5.1805168389e-20    -1.5444608644e-20   
+-2.3418379731e-20   1.6304615202e-20    -1.4533038844e-19   -1.7250457558e-19   1.4453222809e-20    
+7.1700517612e-20    9.0371338138e-20    9.5398304739e-20    1.6848497922e-19    1.0825154709e-19    
+8.3259721383e-20    8.2381052472e-20    9.3252184414e-20    1.7351874876e-19    8.0913264723e-20    
+-3.3713121368e-20   -1.2359817478e-19   -9.7471771100e-20   6.0853986452e-20    1.2617181617e-19    
+7.8374625013e-20    -7.3333064499e-20   -1.6871056903e-19   -6.1827209700e-20   3.2870312525e-20    
+-2.4879335857e-20   -7.6279119697e-22   1.5197106285e-21    -2.7662391625e-20   -7.5261364785e-21   
+6.2411940904e-20    5.7126231836e-20    -9.6776992071e-21   6.8143305777e-21    -3.6832514730e-21   
+-2.7145070044e-20   -6.8280608175e-20   -1.0741653746e-19   -4.3229907670e-20   -3.3232507326e-20   
+4.2518907288e-20    -6.5016395792e-21   -6.6256959817e-20   1.0255849075e-19    9.2699010206e-20    
+4.6048952705e-21    1.2304113963e-19    9.5629092148e-20    1.8195412489e-20    -8.4369755080e-21   
+-1.1426305450e-19   2.5590783000e-20    1.7049833018e-20    9.0185375413e-20    1.4107576684e-19    
+5.3211653750e-20    9.1325537849e-21    -1.0776795262e-19   -6.2299764585e-20   1.4672182195e-20    
+1.0376438194e-19    3.9973530352e-20    -1.0918593529e-19   -3.2386787146e-20   -1.3121362969e-20   
+-3.9822937125e-20   1.2284413219e-19    1.5504298808e-19    -5.3915377761e-20   -8.1569199046e-20   
+8.1305919683e-20    1.2379634186e-19    4.9709119605e-20    1.0333760658e-19    2.2526068863e-19    
+1.1060386164e-19    -8.3593384097e-20   -2.6766011765e-20   2.8653420268e-20    -4.7495641814e-20   
+-7.8888172099e-20   -1.3193506735e-19   -9.1398510818e-20   -3.5642434327e-20   -2.4218740557e-20   
+4.5617251916e-20    2.6160109558e-20    -1.4587830240e-20   -3.1794646875e-20   -8.3161240016e-21   
+8.5426289508e-21    -7.0568858923e-21   -1.4636646074e-20   1.9796679269e-20    5.9811257915e-20    
+3.7672516708e-20    1.5957328815e-20    4.1977107341e-20    2.0779484714e-20    3.5809175955e-21    
+3.8336256983e-20    2.3280220312e-21    -3.9999890438e-20   -1.6502167024e-20   -1.4898653115e-19   
+-1.3491663470e-19   2.0917807018e-20    -2.6033698394e-21   -3.8713751181e-20   4.8237207490e-20    
+1.1645784903e-19    -4.2818044899e-22   -1.4693646835e-20   7.9096003297e-20    1.9759645470e-19    
+2.4565334297e-19    1.4562820196e-19    6.7397723009e-20    1.2283369175e-19    8.1851269913e-20    
+4.7498479903e-22    9.8452146622e-20    2.2946309844e-20    -1.6992679587e-19   7.0060033087e-20    
+1.8115812418e-19    -1.6649995964e-19   -1.9473353641e-19   -4.6062026628e-20   -2.4387535339e-19   
+-3.1522981363e-19   -1.3047067203e-19   -2.9818648584e-20   7.5683339646e-20    -2.0753034040e-20   
+-1.9713495962e-19   -6.9548742289e-20   3.4973943742e-20    -8.3016469294e-20   -1.2472756145e-19   
+-5.5521685448e-20   -4.4247274235e-20   -5.3612452814e-20   7.3746444051e-21    1.0062351908e-19    
+1.4913614413e-19    1.6709852534e-20    2.3903099969e-20    -4.0661425401e-20   -1.8998596903e-20   
+2.1563168706e-20    -3.7815330244e-21   -1.4043200067e-20   -3.6317681672e-20   2.1605022966e-20    
+6.1926400784e-20    1.7033723742e-20    -1.6992955512e-20   -1.2859590296e-20   2.4969049241e-20    
+1.1675070466e-20    5.9774319608e-21    -1.0912782409e-19   -8.2021546683e-20   -2.5097643878e-20   
+-1.5476338377e-19   -2.9413845537e-20   5.4732513536e-20    -1.3335241652e-19   -5.1052642610e-20   
+6.9158033664e-20    7.6094479899e-20    8.8843738778e-20    -3.0127076727e-20   -9.3931280114e-20   
+5.8654678496e-21    4.3857966043e-20    -1.4567969798e-19   -1.9670341404e-20   1.4244225950e-19    
+1.0549741878e-20    -9.8525466140e-20   -3.2944219629e-20   1.3077937945e-19    1.0492765903e-19    
+-9.2448735491e-20   -5.8173341572e-21   6.9976627397e-20    -1.2235114336e-19   -4.4508500784e-20   
+7.0138986423e-20    -2.7852660509e-21   -2.4970732555e-19   -1.8621228954e-19   1.6020911803e-19    
+1.4810021716e-19    -7.9177012721e-20   -6.0238566963e-20   -3.3204208932e-20   -2.0041094824e-19   
+-5.0927996191e-20   6.6272147161e-21    -1.1356701629e-19   -5.8300552664e-20   -1.0795839743e-19   
+-1.3975844644e-19   -1.0121748699e-19   -3.7447117381e-21   -5.5486988803e-21   2.0628156430e-21    
+2.3124830326e-20    1.5701624862e-20    -3.1470051621e-20   1.4202731358e-20    2.0990118664e-20    
+1.9868078961e-20    -1.6603042850e-20   -3.9586941253e-20   3.6896962204e-20    3.0217590998e-20    
+-4.5327160767e-21   2.9526152064e-20    7.6694698895e-20    5.3782978785e-20    4.9159475421e-20    
+-3.5584972142e-20   -2.6306128247e-20   6.5599170082e-20    7.0542010967e-21    2.0262061938e-20    
+5.5823211961e-20    2.6038118276e-21    -4.5745401639e-20   -1.8532168979e-20   -9.0338853416e-20   
+-9.6678600357e-20   -1.1467385236e-19   -2.4475394476e-19   -2.5375962320e-19   -9.7575240885e-20   
+-3.2416590490e-20   -8.8881364994e-20   4.2431299530e-20    -4.5179000414e-21   -1.6777931425e-20   
+1.5287677308e-19    3.2049670178e-20    -1.0936191871e-19   5.1559428675e-20    6.8115732737e-20    
+-4.6451599882e-20   2.2449273330e-19    1.5294798208e-19    -6.1723402422e-20   -1.2526271258e-20   
+-6.6763130348e-20   -3.1767558382e-20   -5.6827949057e-20   -1.1656738681e-19   1.1493260369e-20    
+1.9454852002e-19    1.7883155311e-19    -4.4993654761e-20   -8.7053918872e-20   -9.5559655619e-20   
+-1.1263964053e-20   5.9169189513e-20    -7.7694188367e-20   1.6847394835e-21    1.4464526543e-20    
+1.4940243274e-20    1.0185964377e-20    -4.8525421283e-21   -3.7577096120e-20   5.5292235371e-21    
+6.0887880804e-20    2.9066059122e-20    -3.8479776510e-20   5.5575897517e-21    4.9988294047e-20    
+5.6426489070e-21    2.0605745100e-20    5.9674426026e-20    2.6160758422e-20    6.8407508546e-20    
+4.3561866413e-21    -3.4492245655e-20   1.5992284603e-20    -8.4986642802e-20   -1.2513194327e-19   
+-3.6857672675e-20   1.2967996638e-20    -1.0477056623e-20   -7.2353462718e-20   -1.0788955878e-19   
+-9.2963344778e-21   1.5789350254e-19    5.2161806154e-20    -2.9142520542e-20   1.8922473986e-19    
+5.3229589619e-20    -7.1296594970e-20   5.2902717070e-20    7.8869495111e-20    -1.4592925437e-19   
+-1.9200773497e-19   -3.0401425551e-20   4.3382957837e-20    -6.8948138271e-20   -1.9725688602e-19   
+-3.2769522768e-20   -1.1543624351e-19   -1.2617561914e-19   1.6595713408e-20    2.2346395417e-21    
+-7.9600735979e-20   -2.1384329985e-19   -7.1395004431e-20   -6.3478678864e-22   -8.2582632741e-20   
+3.1045200271e-20    9.8974699644e-20    -1.0356310935e-19   -7.5322683220e-20   5.6004684602e-20    
+1.6142598968e-19    2.1382431516e-19    -1.8889296060e-21   -6.5359411833e-20   2.7076691186e-21    
+-3.6454352580e-20   1.2888930471e-21    2.4271705803e-20    -1.9113876737e-20   -2.1377467795e-20   
+2.8929075230e-20    -2.8069639056e-20   -5.2414959345e-20   3.1942470036e-20    -1.6273299811e-22   
+-8.2626429285e-20   -7.4120759187e-20   -4.1297137300e-20   -5.2656684000e-20   -1.0113156294e-19   
+-6.1285749277e-20   -1.3846910959e-20   5.4954301814e-20    8.3834270333e-20    4.8217506713e-20    
+9.3293727108e-20    2.8524437993e-20    1.0187112611e-21    -4.7184797495e-20   -9.7551077255e-20   
+-4.6277119826e-20   1.0546830303e-19    1.0028567658e-19    4.3420448455e-21    1.9393234732e-19    
+1.7943437317e-19    -4.2711992283e-20   -6.6285458806e-20   1.4979005134e-19    -5.3919723415e-20   
+-2.3626848988e-19   -3.1656974557e-20   -3.1895270508e-20   -8.3024977222e-21   1.2562895056e-19    
+-1.4811533157e-20   -5.9776699588e-20   5.7300009660e-20    -5.5369006809e-20   -5.1974258374e-20   
+3.7735557497e-21    -9.5493867796e-21   6.9559241792e-20    2.4727662058e-20    1.4603002776e-19    
+1.9618419848e-19    -1.1790733622e-19   -1.1443508963e-19   -2.3837961027e-20   8.7746150529e-21    
+3.8832529801e-20    6.7143574840e-20    -2.6207012957e-20   -1.2804234946e-19   -6.6446646049e-20   
+2.4478466224e-20    5.0721112221e-21    -4.1918617855e-21   -6.3334412608e-21   1.3439533315e-20    
+-7.1280253306e-22   -1.7307098254e-20   -3.4026413525e-20   -4.1829041415e-20   -3.3612003089e-20   
+-4.4498720217e-20   -5.1362125070e-20   5.1177320844e-21    7.3062973373e-20    2.3329895083e-20    
+-3.4752975731e-20   -2.1234195457e-20   5.1508259093e-20    1.0790447591e-20    -4.2311883305e-20   
+8.5138693781e-20    1.7201279997e-19    1.1841097052e-19    1.7460865033e-20    1.5211538410e-20    
+4.6143194683e-21    1.2264958213e-20    8.1530203501e-20    -5.5262699847e-20   -1.3266185916e-19   
+-1.1500612732e-19   -2.0584026751e-19   -6.0840772460e-20   5.9181169409e-20    6.8001046628e-20    
+1.2620014407e-19    2.1957714227e-19    1.5129046813e-19    2.3565491957e-20    4.6170599325e-20    
+3.8203438638e-20    1.5019296158e-19    2.1539402854e-19    9.4651216680e-20    -1.8369584819e-21   
+-3.3952478998e-20   1.1442147392e-19    1.1153779684e-19    -8.4047734036e-20   -1.2661632691e-19   
+2.3052077582e-19    2.0754636539e-19    -1.7896194747e-19   -6.6027050660e-20   1.7036412556e-19    
+1.4231699249e-19    6.3358208570e-20    1.5477482561e-21    -3.8916788543e-20   1.1926508349e-19    
+1.8123926765e-19    -8.5230183931e-21   -1.8305528845e-21   -1.7461800728e-21   1.9489348372e-21    
+7.2213099054e-21    6.2275376962e-21    8.7322592374e-21    2.8007636703e-20    -1.9776211107e-20   
+-1.1186672022e-19   -5.7213083511e-20   -1.2174209713e-20   -2.1334593895e-20   4.6191014672e-21    
+4.4330711087e-20    6.8461293058e-20    7.4456798104e-20    8.4564883864e-20    1.5790572802e-20    
+-4.4990207713e-20   -1.1908893188e-19   -1.4808391487e-19   -6.7557877350e-20   -3.6556985572e-20   
+4.2260213013e-22    -5.0557068712e-21   4.6088707070e-20    -5.0094049656e-20   -7.5258164343e-20   
+6.7672634241e-20    -1.4380518313e-19   -1.2317130933e-19   1.3126592313e-19    2.5259047442e-20    
+-1.4524252993e-19   -7.0391219756e-21   1.1865033938e-19    1.5048446359e-20    3.3961404664e-20    
+6.4634054809e-20    -5.1174483701e-20   3.8334401193e-20    2.3917372787e-20    -3.6989297614e-20   
+7.9410820721e-21    5.4292566794e-20    1.1774630496e-19    -8.4466330649e-21   -1.5336643796e-19   
+3.8588080475e-20    -1.1560495609e-20   -8.3533541448e-20   1.4199507852e-19    -1.7050740881e-20   
+1.1789168933e-20    2.0907171290e-19    3.7152624401e-20    6.2498677181e-21    1.4861326154e-19    
+1.4273353238e-19    1.4915227033e-19    -3.0734118228e-20   -5.4275819178e-20   1.0436439598e-20    
+3.9545428811e-20    -1.3851575011e-20   -2.2151401842e-20   -1.8017003969e-20   1.6748204829e-20    
+1.4799209044e-20    1.6019942038e-20    2.1918681184e-20    1.5635277406e-20    2.4209770634e-21    
+-1.1836564922e-20   4.6129677802e-20    7.4097700705e-20    8.9095632365e-20    3.1843983918e-20    
+-4.9712271173e-20   -4.1446756449e-20   -1.1376501863e-19   -2.1373805579e-19   -1.4019595886e-19   
+7.3875983295e-22    -3.4941452406e-20   -7.1151821308e-20   -3.0835479333e-21   -1.2771339992e-19   
+-8.3250707844e-20   1.0186140144e-19    3.5845854539e-20    1.4581181355e-19    1.1367411009e-19    
+-6.8305314512e-20   -1.2309279487e-19   -1.1119038533e-19   -2.0913598561e-20   -3.7499849391e-21   
+-1.8159464958e-20   -1.3182180418e-20   5.4730819298e-20    -9.1302892912e-20   -2.0899758662e-19   
+7.2438275656e-20    3.4046375686e-21    -4.3606481333e-20   -1.0199508621e-21   -1.4486359445e-19   
+2.0003487691e-20    1.1787213287e-20    -2.8796216703e-19   -1.8854710652e-19   2.3879604978e-19    
+2.7206303968e-19    1.1824798295e-19    2.4787552085e-19    1.3845760763e-19    -1.5727721164e-19   
+-1.8914333576e-19   -9.2364205394e-20   1.6506216368e-20    1.2783262269e-20    -1.8083132654e-20   
+3.4467723379e-21    -1.9838404601e-20   -3.2159118372e-20   -5.5960430314e-20   -4.0420850084e-20   
+2.2226715436e-20    2.8618542385e-20    7.5610980159e-20    8.8152301508e-20    2.7158791736e-20    
+-6.7920373276e-20   -5.5758845169e-21   2.3366355813e-20    -6.7382139835e-20   -1.1088214042e-19   
+-1.1111297139e-19   -8.0032357521e-20   -7.8195409333e-20   4.3230669411e-20    -1.2112867107e-20   
+-8.3350474263e-20   2.8010091309e-20    6.2212943964e-20    3.0189918516e-20    -4.4985284130e-20   
+7.9848395004e-21    2.9110356032e-21    -5.6690047206e-20   1.0134909147e-19    1.6386301440e-19    
+-1.4912206704e-20   1.0109276956e-19    1.3707577720e-19    1.3081124885e-20    2.2737689704e-20    
+5.7285845283e-20    2.0413358779e-20    -1.0931138017e-19   -1.2162885577e-20   1.2384801518e-19    
+1.2696444987e-19    7.3631421891e-20    3.6637397811e-20    7.2275016501e-20    2.9659588952e-20    
+5.8126051144e-20    7.3641175214e-21    -2.8549183474e-19   -1.5746404315e-19   -9.1302119981e-20   
+-1.2197043187e-19   1.1509553486e-19    -4.9833024171e-20   -7.6638855172e-20   9.9474487716e-20    
+-5.8831340095e-20   -9.3871428620e-20   5.3005704233e-20    1.2776995620e-19    3.3662135836e-20    
+7.6954065065e-20    -4.7265655227e-21   -3.2601611702e-20   -3.5591161919e-21   -2.7741384675e-21   
+4.2743628333e-20    4.5066212577e-20    -2.2261995464e-21   3.7758418497e-20    4.2205835142e-20    
+-4.5019015259e-20   -5.0236513514e-21   5.3776950653e-20    -6.1198141582e-20   -1.0377922911e-19   
+-7.2475618288e-20   -6.4022497365e-20   -3.7780757228e-20   -1.2669727729e-20   3.5924220153e-20    
+6.3445836311e-20    2.8135267180e-20    2.3861124238e-20    7.7665333130e-20    8.2854057167e-20    
+1.5225234728e-20    1.0920810945e-19    1.4463816601e-19    1.0812150356e-19    9.0422941495e-20    
+-1.5311949143e-19   -2.1118181592e-19   3.1248618592e-21    3.2960571385e-20    3.9847223379e-20    
+-1.0211973269e-21   2.7883890834e-20    1.7871362698e-19    -2.2962488316e-20   -1.0522336650e-19   
+1.5480351507e-19    2.1696030119e-19    3.6880999827e-20    5.0827933733e-20    5.0040683987e-20    
+3.7561890569e-20    1.9614200390e-19    9.2371493376e-20    -2.4831846686e-20   4.4661354141e-20    
+1.0672828907e-19    -1.1600996082e-20   -1.3864193649e-19   -1.8353493005e-19   -2.7659446349e-19   
+-6.2559467914e-20   1.3745083057e-19    2.5995313336e-19    3.2550418308e-19    2.5477603651e-19    
+-7.5824230472e-20   8.5679639800e-20    4.9025789958e-22    3.8033886010e-21    2.7969320978e-20    
+2.7081070927e-20    2.2266964224e-20    1.5282806493e-20    -1.0353893237e-21   1.4838689288e-20    
+3.3461534045e-21    -1.9133500756e-20   1.0436217787e-19    1.0600186441e-19    -1.4673610000e-20   
+-1.5834171680e-20   4.7278597191e-20    -1.3019386862e-20   -9.6666754228e-20   -1.4607954322e-20   
+1.1049028957e-21    2.4038503257e-20    6.2553509205e-20    2.7925022543e-20    2.6085178500e-20    
+5.3819120921e-20    5.1880417119e-20    6.8305840766e-20    1.0491732593e-19    1.2307727384e-19    
+1.4814694739e-20    -1.7031656067e-19   -1.2835802951e-19   -8.5258749673e-20   -1.2519185271e-19   
+1.6090263926e-20    4.0553421614e-20    -3.2157491225e-21   9.2960867495e-20    4.0555305300e-20    
+-5.7830695673e-20   -4.1447122998e-20   2.8981473350e-20    1.7664854096e-20    -7.0777923650e-20   
+-1.1031717495e-19   -5.3162374364e-20   4.6562849672e-20    1.4701761588e-19    1.7757727652e-19    
+9.1204138930e-20    1.4955601978e-19    1.4226409384e-19    -5.4481211945e-20   -5.9627709836e-20   
+-1.0888544471e-19   -5.9404022298e-20   9.6017790892e-20    1.1378113414e-19    1.2531558304e-19    
+1.2193461827e-19    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    8.5078162895e-06    -1.1858461262e-20   -2.1069944563e-20   -3.0069669628e-20   
+-3.7481207916e-20   -3.6845933206e-20   -5.0186702125e-20   -5.5904174519e-20   -6.0986372202e-20   
+-9.5714723040e-20   -7.7079998200e-20   -8.9785492409e-20   -9.9949887776e-20   -1.3891340335e-19   
+-1.1858461262e-19   -1.1604351377e-19   -1.1604351377e-19   -1.3298417272e-19   -1.8380614955e-19   
+-1.7448878713e-19   -1.9142944608e-19   -1.7533582008e-19   -1.7364175419e-19   -1.8634724840e-19   
+-1.2874900798e-19   -1.5415999640e-19   -1.5331296345e-19   -1.9481757787e-19   -1.9312351197e-19   
+-1.7448878713e-19   -1.7618285303e-19   -1.9481757787e-19   -1.9989977555e-19   -2.0328790734e-19   
+-1.7787691892e-19   -2.1514636860e-19   -2.0328790734e-19   -1.8973538018e-19   -2.1006417092e-19   
+-2.0837010502e-19   -2.2192263218e-19   -1.9142944608e-19   -1.9481757787e-19   -1.5754812819e-19   
+-1.7787691892e-19   -1.6940658945e-19   -1.6263032587e-19   -1.4907779872e-19   -1.5246593051e-19   
+-1.6263032587e-19   -1.4230153514e-19   -1.2874900798e-19   -1.6263032587e-19   -1.3891340335e-19   
+-1.4907779872e-19   -1.1519648083e-19   -1.4907779872e-19   -1.6940658945e-19   -1.4230153514e-19   
+-2.1684043450e-19   -2.0328790734e-19   -1.2248065629e-07   -8.4703294725e-22   -1.8495758497e-21   
+-1.5087774373e-21   -1.1514354127e-21   -2.8455013072e-21   -4.7248556589e-21   -6.2468679860e-21   
+-5.5057141572e-21   -5.9557004104e-21   -8.4173899133e-21   -8.4967992521e-21   -7.9806385499e-21   
+-8.9335506156e-21   -1.1884931041e-20   -1.1567293686e-20   -1.0429093163e-20   -9.1056041830e-21   
+-1.6225974896e-20   -1.4955425475e-20   -1.3208420021e-20   -1.5114244153e-20   -1.7814161672e-20   
+-1.7258296300e-20   -1.9402348448e-20   -2.1466991257e-20   -2.0487609412e-20   -2.1969917069e-20   
+-1.9905274260e-20   -2.3346345609e-20   -2.4458076352e-20   -2.5199230181e-20   -2.6363900483e-20   
+-2.9328515799e-20   -2.9275576239e-20   -2.7899147700e-20   -2.6363900483e-20   -3.1393158608e-20   
+-3.6581235410e-20   -3.6951812324e-20   -3.4781290397e-20   -3.8857636455e-20   -3.7057691442e-20   
+-4.3516317665e-20   -4.3833955020e-20   -3.6422416732e-20   -2.6258021365e-20   -3.9492911166e-20   
+-6.2468679860e-20   -5.1139614190e-20   -6.1198130439e-20   -7.1997800517e-20   -6.6703844596e-20   
+-8.5973844146e-20   -5.7386482176e-20   -7.7079998200e-20   -1.1265538198e-19   -1.3383120567e-19   
+-1.3637230451e-19   -1.9227647903e-19   -2.1938153334e-19   -6.3732119491e-09   -1.9128551665e-23   
+-4.4357560348e-23   -7.1757918139e-23   -8.3648639444e-23   -1.1932080336e-22   -1.4475660720e-22   
+-1.4806532965e-22   -1.8446127660e-22   -1.8983795058e-22   -2.4195032917e-22   -2.8248217919e-22   
+-2.9861220113e-22   -3.0109374297e-22   -3.0440246542e-22   -3.9125642974e-22   -4.2434365424e-22   
+-4.5081343384e-22   -4.1938057056e-22   -4.2517083485e-22   -3.7884872055e-22   -4.8224629712e-22   
+-4.9217246447e-22   -5.7819924817e-22   -5.9308849920e-22   -6.3527471044e-22   -6.3610189105e-22   
+-6.9400453393e-22   -6.9731325638e-22   -7.7093233090e-22   -9.5870232995e-22   -7.8747594315e-22   
+-8.6357655951e-22   -6.1211365329e-22   -6.7332501862e-22   -9.4629462076e-22   -1.1249656331e-21   
+-9.7276440036e-22   -1.0306670432e-21   -1.2076836943e-21   -1.2440796413e-21   -1.2771668658e-21   
+-8.6688528196e-22   -1.2143011392e-21   -1.5650257190e-21   -1.2209185841e-21   -1.4889251026e-21   
+-2.0878038661e-21   -2.3061795478e-21   -2.7065349643e-21   -2.6072732908e-21   -2.7859443031e-21   
+-3.5270981319e-21   -4.6454463201e-21   -5.1086674631e-21   -7.3585987293e-21   -7.3850685089e-21   
+-7.6762360845e-21   -1.1752582143e-20   -1.6040686439e-20   -1.6887719386e-20   -1.6504961113e-10   
+-5.4849183196e-25   -7.4478566872e-25   -1.3199346884e-24   -2.1422685395e-24   -2.0873385770e-24   
+-1.3538620182e-24   -2.8111216130e-24   -5.0923306460e-24   -3.4250447239e-24   -2.5073912318e-24   
+-4.3620852615e-24   -7.2119809657e-24   -5.7514901967e-24   -6.5011226268e-24   -8.5173753699e-24   
+-9.4867276502e-24   -1.0042489624e-23   -9.2282337088e-24   -9.4867276502e-24   -1.1658076758e-23   
+-1.3209040407e-23   -1.3816501169e-23   -1.3183191013e-23   -1.2743751312e-23   -1.5690582244e-23   
+-1.7396642258e-23   -1.6491913463e-23   -1.6026624368e-23   -1.7551738623e-23   -1.9723087731e-23   
+-2.0653665920e-23   -2.2230478962e-23   -1.9335346818e-23   -2.4531075041e-23   -2.5306556865e-23   
+-2.7090165061e-23   -2.5177309895e-23   -3.0967574182e-23   -2.8382634768e-23   -2.9261514169e-23   
+-3.0553983876e-23   -3.4431392998e-23   -4.1876018510e-23   -4.9527439177e-23   -5.6144884077e-23   
+-4.7045897339e-23   -5.0044427059e-23   -7.5066640589e-23   -8.5199603093e-23   -1.1973439367e-22   
+-9.1817047993e-23   -1.1911400821e-22   -1.6709048374e-22   -2.5146290622e-22   -2.8785885317e-22   
+-3.9870105525e-22   -5.1946942468e-22   -7.7093233090e-22   -1.1745964698e-21   -1.4392942658e-21   
+-3.4035190100e-12   -1.0059554263e-26   -2.2542489228e-26   -3.5088533064e-26   -4.5286926847e-26   
+-6.2048643361e-26   -7.1085833891e-26   -8.8655343972e-26   -9.3300156982e-26   -1.0349855076e-25   
+-1.1995734469e-25   -1.4257556457e-25   -1.3914244191e-25   -1.6519378444e-25   -1.5974117786e-25   
+-2.0558346279e-25   -2.1083412097e-25   -2.3325039246e-25   -2.0861268866e-25   -2.4496339918e-25   
+-2.5021405736e-25   -2.5203159289e-25   -2.7222643206e-25   -2.7061084493e-25   -3.0938493614e-25   
+-3.1140442006e-25   -1.9669773355e-25   -2.9363296158e-25   -4.0106950599e-25   -4.3782411328e-25   
+-4.1722537733e-25   -4.0026171242e-25   -4.4509425539e-25   -3.6431489869e-25   -4.3136176475e-25   
+-6.2684780795e-25   -7.0439599038e-25   -4.8144496590e-25   -5.6141652903e-25   -7.6094154006e-25   
+-7.1893627458e-25   -7.5771036580e-25   -1.0420537014e-24   -1.1664539107e-24   -1.3167035141e-24   
+-1.5962000883e-24   -1.5832753912e-24   -1.8546940297e-24   -2.3878377839e-24   -3.2505613134e-24   
+-3.9420326067e-24   -4.2909994276e-24   -5.8031889849e-24   -7.4963243013e-24   -9.2282337088e-24   
+-1.2743751312e-23   -1.7008901346e-23   -2.6573177178e-23   -4.3220187006e-23   -6.6174449004e-23   
+-8.6026783706e-23   -6.1431453343e-14   -2.0313168309e-28   -3.8535855220e-28   -6.4134391594e-28   
+-9.3795561631e-28   -1.1659364179e-27   -1.1533146434e-27   -1.4436154566e-27   -1.8459345182e-27   
+-2.1441239404e-27   -2.3381837231e-27   -2.3539609412e-27   -2.6127073181e-27   -2.8367438152e-27   
+-3.3573920126e-27   -3.3258375764e-27   -3.5530295171e-27   -4.0074133985e-27   -3.4488998776e-27   
+-3.4962315319e-27   -4.7457872058e-27   -5.3516323810e-27   -4.1904291285e-27   -5.0423989062e-27   
+-6.6516751528e-27   -6.3676852269e-27   -6.3487525652e-27   -7.0681937108e-27   -8.7973768150e-27   
+-6.8283799956e-27   -7.6740388860e-27   -9.1381647261e-27   -1.0715886537e-26   -6.1972912714e-27   
+-7.7623913074e-27   -1.3745112413e-26   -1.3467433374e-26   -1.2066416406e-26   -1.2470313190e-26   
+-1.8225842354e-26   -2.2643463423e-26   -2.1255068230e-26   -2.7061084493e-26   -2.8070826451e-26   
+-3.4886584672e-26   -4.1550881600e-26   -4.5640336532e-26   -6.1897182067e-26   -7.4518956551e-26   
+-9.2492363415e-26   -1.0662875084e-25   -1.5994312626e-25   -1.9790942390e-25   -2.5687835429e-25   
+-3.7239283436e-25   -5.3960610272e-25   -9.2411584059e-25   -1.3700178895e-24   -2.2359725933e-24   
+-3.7481621506e-24   -4.9889330695e-24   -1.0047273167e-15   -3.8456969130e-30   -8.1905948675e-30   
+-1.0846837447e-29   -1.6048389041e-29   -1.7552155141e-29   -2.0362472116e-29   -2.3591871447e-29   
+-2.7018486004e-29   -3.4438708894e-29   -3.4216841764e-29   -4.0626336619e-29   -3.2885638986e-29   
+-4.0577032812e-29   -6.0150644023e-29   -5.8868745052e-29   -6.9123936820e-29   -6.6757354104e-29   
+-7.5040393609e-29   -8.1942926530e-29   -9.9297866445e-29   -1.1418761603e-28   -1.1517369216e-28   
+-9.9988119737e-29   -1.2039989566e-28   -1.2375255451e-28   -1.1034191912e-28   -1.1024331150e-28   
+-1.4534762179e-28   -1.5895547240e-28   -1.6349142261e-28   -2.0372332877e-28   -2.1220358350e-28   
+-2.0707598762e-28   -2.2245877527e-28   -2.4415245017e-28   -2.6190182053e-28   -3.0568360077e-28   
+-2.3113624523e-28   -1.9603193495e-28   -3.3921018925e-28   -5.4983605094e-28   -6.0742289702e-28   
+-8.0227154061e-28   -9.2612270273e-28   -9.7345435704e-28   -1.0523404476e-27   -1.4231050730e-27   
+-2.1867224293e-27   -3.1617545081e-27   -2.9408734547e-27   -3.5088533064e-27   -4.9098702741e-27   
+-7.2196550046e-27   -1.3883951932e-26   -2.0800684349e-26   -3.5139020162e-26   -6.5027382139e-26   
+-9.1684569848e-26   -2.0679515314e-25   -3.6189151799e-25   -1.5077367222e-17   3.0333396624e-32    
+-2.0896339897e-31   -3.7517115317e-31   9.8607613153e-32    7.2414965909e-31    8.5049066344e-31    
+2.3419308124e-31    -1.7672333170e-30   -3.0298729885e-30   -1.3851288160e-30   -4.9072694983e-31   
+-2.5121830195e-30   -2.9559172786e-30   -1.7109961626e-30   -9.6835757604e-31   -9.0980930573e-31   
+3.6053408559e-31    -7.9502388104e-31   -5.5497597277e-30   -6.8116290273e-30   -7.6405492754e-30   
+-7.3801635469e-30   -3.4882443153e-30   -2.1524193058e-30   -4.9658177686e-30   -5.7069156112e-30   
+-3.7316818602e-30   -1.2541655798e-30   -2.0954117795e-31   -8.8130554255e-31   -2.8811911968e-30   
+-3.8980822074e-30   -3.5498740735e-30   -5.3248111102e-30   -6.0150644023e-30   -5.7254045387e-30   
+-7.0812592195e-30   -7.3339412282e-30   -9.8730872669e-30   -1.1339875513e-29   -9.7744796538e-30   
+-1.1142660286e-29   -1.3040856839e-29   -1.6319559977e-29   -2.6278928905e-29   -3.3921018925e-29   
+-3.3625196085e-29   -4.4767856371e-29   -7.7900014391e-29   -1.1793470533e-28   -1.3607850615e-28   
+-1.9366535223e-28   -3.4946538101e-28   -5.3326997193e-28   -7.6677279987e-28   -1.5019911635e-27   
+-2.9913605526e-27   -5.7302856155e-27   -1.5953922947e-26   -2.2416271483e-26   -1.9597619880e-19   
+-1.8041600144e-31   -1.8271056641e-31   -9.8087010215e-32   -2.5967253255e-31   -4.1964207929e-31   
+-1.0317206712e-30   -1.5051924924e-30   -1.8545682214e-30   -3.1734149547e-30   -2.3108029696e-30   
+5.6458636320e-31    6.6413286720e-31    1.2608822605e-31    1.3558185697e-30    1.1879737750e-30    
+-1.0514373790e-31   4.4852500992e-31    -6.9923294043e-31   -2.6468055226e-30   -1.8825965206e-31   
+1.3020249389e-30    7.2297002700e-31    5.1359736792e-31    4.3545276043e-31    8.6787218119e-31    
+-7.2232002564e-31   -1.6387256414e-30   9.4803901512e-32    2.8561541075e-31    -4.5326761241e-31   
+-2.9452283675e-31   2.4574866090e-31    2.6028943198e-31    -7.9560166003e-31   -1.4301955767e-30   
+-1.5973662959e-30   -1.1235875296e-30   6.0859386243e-31    1.6499441834e-30    1.0777503969e-30    
+1.2402988842e-31    -4.9265287977e-31   1.0862244886e-31    2.0360931372e-30    2.1793823251e-30    
+4.7454913830e-31    -9.9994282713e-31   -1.6362700808e-30   -1.3157953380e-30   -2.0214560696e-30   
+-3.9443045261e-30   -5.6206339497e-30   -1.2030128805e-29   -2.1151333021e-29   -3.9147222422e-29   
+-7.6322292580e-29   -1.6092762467e-28   -2.3192510613e-28   -8.7090243936e-28   -1.1738250270e-27   
+-1.0200781414e-20   1.0650185705e-31    1.7211776364e-31    -1.7198013676e-31   -5.7055644040e-31   
+-9.0902952980e-31   -1.2891029646e-30   -5.4108414040e-31   1.4587647914e-30    3.1938337617e-30    
+2.1757465681e-30    3.5406115542e-31    1.7394683285e-31    8.5353528785e-31    2.1913351278e-30    
+1.3344990518e-30    -6.2079492955e-31   -1.4882332123e-30   -4.6405162110e-31   1.6862329165e-30    
+1.7159010773e-30    2.1068928798e-30    1.0032838642e-30    -1.6941608265e-30   -1.0955231191e-32   
+2.4019541870e-30    1.1827820396e-30    -1.5698616089e-30   -2.9862675083e-30   -2.5405227777e-30   
+-4.8206176971e-31   4.7057540315e-31    -1.0044537162e-30   -5.2762957312e-31   8.6375851520e-31    
+1.0635983853e-30    2.7078274092e-31    -8.3042789010e-31   -1.6280201793e-31   3.8733460447e-31    
+5.1432561018e-31    1.4034973728e-30    1.1984460191e-30    -4.5230464744e-31   -2.8828763855e-31   
+1.4983012744e-30    1.1785969036e-30    -1.4088177543e-31   -4.6328244812e-31   -6.9545330292e-31   
+-1.2703433913e-30   -8.8092035656e-31   -9.1674265353e-32   -1.1632616864e-31   -5.1152699323e-31   
+-1.3188768259e-30   -2.8719467331e-30   -6.6560138878e-30   -1.7650762754e-29   -5.4036972008e-29   
+-7.2969633733e-29   -2.4692240468e-20   7.1315079355e-32    2.9419035992e-31    2.6133816102e-31    
+6.3128748617e-34    1.9878822583e-31    8.6730267769e-31    5.1977774106e-31    -5.0170851209e-31   
+-5.5262039494e-31   -9.1010440183e-31   -1.2767922474e-30   5.3029371352e-32    6.6396886223e-31    
+1.3040323071e-31    9.6128768281e-31    8.2169970348e-31    -1.1548590647e-30   -2.8264272660e-31   
+2.5714841234e-30    3.6184518497e-30    2.9208961986e-30    1.0208150929e-30    3.2139633032e-31    
+5.5203772590e-31    -1.1737211411e-30   -1.5429869868e-30   -5.2383188001e-31   -2.6752144939e-31   
+8.5010547745e-31    8.9650459047e-31    3.5251411081e-31    2.7976690318e-31    4.7095005671e-33    
+7.7516649007e-31    8.4743174502e-31    -4.5217299207e-31   -6.4413027917e-31   -1.9374178156e-31   
+-8.0133468703e-31   -1.2859140835e-30   -9.5434643569e-31   -1.0603071892e-30   -1.9315820974e-30   
+-2.7819727027e-30   -1.4294101584e-30   7.4729203955e-31    1.2076114896e-30    4.1415919748e-31    
+-8.4476102186e-32   4.5779354778e-31    1.1052430468e-31    -5.5991598308e-31   -3.3482292083e-31   
+1.2229655147e-32    -1.9336336642e-31   -2.7656354001e-31   -2.8657837572e-31   -1.0014835711e-30   
+-3.2787031373e-30   -4.8564249478e-30   2.1490718161e-21    -1.6803268567e-32   -4.7656233694e-32   
+4.3316073452e-32    2.5405141260e-31    2.2061094931e-31    -4.4936045727e-32   -5.4261383471e-31   
+-1.3694701028e-30   -2.1887858097e-30   -8.3609396095e-31   9.1962026370e-31    4.3329323624e-31    
+-9.3817896851e-31   -2.8026405265e-30   -2.6830874848e-30   -8.2607084976e-31   3.3135775156e-31    
+1.7026358587e-30    2.8239257200e-30    3.0298088535e-30    2.1449375194e-30    1.6377989757e-30    
+2.6152667505e-30    2.7692818777e-30    5.4644820325e-31    -8.1173959879e-31   3.4828110863e-31    
+4.6482281592e-31    -5.3101405646e-31   -1.2543814946e-30   -1.5555156877e-30   -1.2711107540e-30   
+-1.1521958647e-30   -8.3724089079e-31   -5.0637287368e-31   -2.1387414417e-32   7.9603842671e-31    
+5.6347744885e-31    1.1795606209e-31    -5.5823004206e-32   -6.7991345568e-31   -5.0958827391e-31   
+1.0490705917e-30    1.3358663868e-30    -4.2478265714e-31   -1.6692245477e-30   -1.4152169575e-30   
+-6.0872833898e-32   7.6741386973e-31    9.9052683526e-31    8.4165056977e-31    9.6121959818e-32    
+-4.1685286629e-32   1.8738395579e-31    -7.2312650881e-32   -1.1127060254e-31   1.0395206875e-31    
+2.1570415377e-32    -1.2325951644e-31   -2.4651903288e-31   2.9107928906e-20    -8.0125456534e-32   
+-2.2516754157e-31   -1.0850151400e-31   3.5287588095e-32    -8.1515737213e-32   4.8090038129e-32    
+3.7578424400e-31    8.6999079817e-31    1.7188304915e-30    1.4038441907e-30    -8.4108181858e-31   
+-2.2225431862e-30   -1.4964433820e-30   -7.7983423708e-31   -1.1120827312e-30   -6.6712482946e-31   
+2.0140826167e-31    -1.3288457703e-30   -3.3119856142e-30   -2.6608253146e-30   -1.4246419772e-30   
+-2.3327762504e-30   -3.0956721958e-30   -2.2086879635e-30   -1.1018023279e-30   -5.4883135347e-31   
+-4.1558258008e-31   6.4914935793e-32    -5.1034435187e-31   -1.1464363185e-30   -4.3534997520e-31   
+-8.2733812671e-31   -1.1486957127e-30   -2.7904994566e-31   9.1513833884e-32    1.4246163984e-31    
+-1.7715094833e-31   -6.3599397747e-31   -5.9447890242e-31   -4.6025512699e-31   -3.1188780353e-31   
+6.5670449522e-31    1.9911787206e-30    2.2277758288e-30    9.9738043752e-31    -5.7354231360e-31   
+-1.0210844222e-30   -3.4455413327e-31   6.7785963195e-32    -3.0444137596e-31   -3.5808303881e-31   
+-9.4816771706e-32   -3.8774386458e-32   3.1157333528e-31    3.8842094933e-31    1.6868691881e-31    
+1.5257879058e-31    -1.4697252888e-32   -6.2111240706e-33   9.3937233037e-32    5.4123246600e-21    
+5.5870776297e-33    -6.8136589650e-32   -8.6247054955e-32   -3.3688238693e-31   -4.8520964954e-31   
+1.3804935126e-31    5.7259138569e-31    1.5795907524e-31    1.1766444545e-31    2.9256756646e-31    
+-3.0243946206e-31   -6.1932753644e-31   3.4733281383e-31    2.1432782856e-30    2.9799835036e-30    
+2.2554938446e-30    4.7026826999e-34    -2.1643702278e-30   -2.2437640566e-30   -2.8257125654e-30   
+-2.5973194674e-30   -6.1842964684e-31   -4.3123941251e-31   -3.2721869490e-31   6.9558533444e-31    
+3.2822360151e-31    -3.1364841195e-31   4.9725077891e-31    7.8137911878e-31    4.7875416371e-31    
+1.1455965454e-30    1.7514068372e-30    1.8493601232e-30    1.4059803931e-30    1.9235827173e-31    
+-8.9765065044e-31   -1.2350176232e-30   -5.7561306445e-31   6.7247154200e-31    1.1042289243e-30    
+6.6924109545e-31    6.7901067602e-32    -1.6550245759e-31   -4.4792052371e-31   -3.2725837959e-31   
+6.0177787598e-31    3.6513525260e-31    -7.1075842745e-32   3.0672333963e-31    2.4683801503e-31    
+1.2970536322e-31    3.0947437257e-31    1.9653513229e-31    9.4254710552e-32    3.0153593008e-32    
+-6.6075195737e-32   5.7590571552e-32    -2.7925984194e-32   7.5216592125e-33    1.7440348889e-31    
+3.3762350287e-21    4.9749036817e-32    1.4831992753e-31    1.9915526218e-31    -2.0139998619e-31   
+-7.3621982316e-31   -7.0381316013e-31   -4.9581486554e-31   -2.9355103206e-31   8.8590050295e-32    
+1.7199024601e-31    3.8449874786e-31    7.9348144438e-31    2.8406836615e-31    -9.6228788745e-33   
+7.9583469003e-31    6.4137379193e-31    -6.2231216362e-31   -4.8277082791e-32   1.1699222255e-30    
+-5.1178767086e-31   -1.8807181747e-30   3.9462755950e-32    1.6440010720e-30    1.2674119905e-30    
+1.1146579102e-30    1.1270222300e-30    4.2124526550e-31    -4.7097488315e-31   -9.2810864947e-31   
+-5.6243624297e-31   -3.2527903518e-31   -2.6733675572e-31   -2.3775417084e-31   -8.3172375507e-31   
+-6.2396298087e-31   7.7683061392e-31    1.0597971187e-30    1.3524241181e-31    3.6142971825e-32    
+3.0963762523e-31    2.5428218565e-31    -1.5908482267e-32   -2.3471217954e-31   -1.9522610178e-32   
+-1.5763962290e-31   -2.0065265391e-32   7.9168735788e-31    9.3723424721e-31    2.2912284496e-31    
+-2.0384012439e-31   9.4349878574e-32    2.2283987468e-31    -1.1021435033e-31   -4.2999846664e-31   
+-4.9683274961e-31   -2.5132332531e-31   -3.8007023746e-32   -1.2099654876e-31   -6.9637413817e-32   
+8.1364521619e-32    3.1132053915e-20    -4.3741696447e-32   -4.5283709936e-32   -7.9774171802e-32   
+1.1209622275e-31    2.9176277601e-31    1.6024179123e-31    1.3205494133e-31    2.3793134135e-31    
+-3.1691628625e-31   -1.1551092099e-30   -7.4820347085e-31   4.3367033483e-31    7.5409467238e-31    
+-2.7846638913e-31   -9.2929542856e-31   -1.1030218327e-31   1.2226810686e-30    1.8394333085e-30    
+1.6350863109e-30    2.0478140384e-30    1.9661055201e-30    1.1845860943e-30    6.7173878585e-31    
+-8.8041846749e-31   -1.7875556395e-30   -8.0998895856e-32   1.4264482888e-30    1.0810681121e-30    
+4.8878672587e-31    1.4075764323e-31    -2.8072986815e-31   -1.0479686362e-30   -1.5848530175e-30   
+-7.9379459607e-31   3.6482755520e-31    8.0585573235e-31    5.1649679527e-31    -5.7804981721e-32   
+-9.5317181121e-32   -2.6744847470e-31   -5.3798520816e-31   -1.7580054042e-31   5.0451465221e-32    
+4.0524161521e-31    9.0416843748e-31    5.4486213223e-31    1.5662926199e-31    1.3683882718e-31    
+-1.1991923169e-32   -4.2687334438e-31   -5.1443206295e-31   -2.7185103018e-31   -1.4954545092e-31   
+3.1323539026e-32    1.1626297406e-32    6.8347191218e-32    1.1461088728e-31    -6.3909276866e-32   
+-8.9134821397e-32   -1.6214298878e-32   6.2023858200e-20    8.3394271225e-33    6.5793077092e-32    
+7.0752346699e-32    2.8254972149e-31    3.6144777384e-31    -1.9723629116e-31   -1.7688237138e-31   
+2.3403058090e-32    -7.5992493628e-31   -6.9979830620e-31   1.8695306658e-31    1.6694675223e-31    
+-1.6038933928e-31   -3.1456905913e-31   -7.2017065773e-31   -7.5168594340e-31   3.5061253711e-31    
+7.5850004905e-31    -7.0958857547e-32   -3.9296870188e-32   1.9016263636e-31    -3.2407753889e-31   
+-7.6522143171e-31   -6.6355095047e-31   -3.2253909891e-31   2.1588094812e-31    6.3192958820e-31    
+7.5101186792e-31    5.6369110670e-31    8.2386919586e-32    8.0143775438e-31    1.5583270940e-30    
+8.3577018278e-31    3.9303716267e-31    1.8243898020e-31    -5.0959504475e-31   -3.4120764191e-31   
+3.6602072898e-31    6.3902882176e-31    7.0170053818e-31    6.6479076788e-31    2.8738561121e-31    
+-1.4657887933e-31   -1.1300017790e-31   5.3087694680e-31    7.4613008690e-31    -2.9396311336e-31   
+-8.6504873780e-31   -1.4042794057e-31   2.5857264599e-31    2.3991143808e-31    3.2633980128e-31    
+2.7666886431e-31    2.8608937007e-31    9.0193706708e-32    -9.5423810213e-33   1.2343254921e-31    
+3.8025079339e-32    -5.0482310193e-32   -1.4324480120e-32   8.5499575987e-20    -1.0328175485e-32   
+4.1905621290e-32    1.1913118028e-31    7.8306731674e-32    1.0472319304e-31    3.1030793913e-32    
+1.0640654797e-31    8.3082661778e-31    1.7915086859e-30    1.3359648933e-30    3.1288368235e-31    
+2.7315404216e-31    -4.2873796054e-31   -1.1663681888e-30   -1.0281516823e-30   -9.9912957311e-31   
+-9.0779460245e-31   -1.1309177242e-30   -9.7537349056e-31   2.2396684462e-31    3.0544242695e-31    
+-1.0793866850e-30   -1.0964228895e-30   1.5344555309e-31    6.9456105569e-32    -6.3051476320e-31   
+-1.1883751358e-30   -1.5841566664e-30   -5.8270590332e-31   3.1213719641e-31    -1.0743755056e-31   
+-2.1186809253e-31   1.4011967893e-31    3.8856238481e-31    2.7082336600e-31    -6.0357215056e-32   
+2.7693067041e-31    4.6861991834e-31    1.0739993474e-31    2.3173281858e-31    5.0687542102e-31    
+1.0168458717e-31    -5.9459776841e-31   -8.0629057122e-31   -7.7921620917e-31   -4.2717652788e-31   
+3.9183646572e-32    -4.1763866076e-31   -4.4675857105e-31   1.4777825973e-31    1.1829422830e-31    
+-1.9325503286e-32   -1.8222005613e-31   -1.1474404728e-31   4.7907507367e-33    -1.0865028457e-31   
+-4.4862130642e-32   -7.4014390542e-32   -1.1049270740e-31   -4.4728218326e-32   5.8939434756e-20    
+7.6954442973e-33    -9.5180812021e-32   -2.3657284604e-31   -2.7607152510e-31   -6.4832557148e-32   
+4.1052739013e-31    3.4096614835e-31    -2.5060806051e-31   -1.1305340429e-31   2.7776950318e-31    
+-1.6676221138e-31   -4.0892758934e-31   3.1078716466e-31    7.7827524945e-31    6.4881946719e-31    
+2.3093931287e-31    -2.9845646402e-31   3.0707373099e-31    8.3937255575e-31    2.8951918047e-31    
+7.6779830340e-31    1.1666863246e-30    -1.5919955092e-31   -5.5332493924e-31   -1.2008314263e-31   
+-6.5749104200e-31   -4.0737029442e-31   1.8462013347e-31    1.5709720278e-31    -1.0264623558e-31   
+-8.8314570843e-31   -1.1269977797e-30   -7.8826356601e-31   -6.0991502404e-31   -2.4781151243e-31   
+-2.9752156985e-31   -3.7658851724e-31   -2.3239880666e-31   -5.2063002148e-31   -4.6252862711e-31   
+-2.4035191932e-31   -1.5805264459e-31   -4.0605524538e-32   -4.1250560607e-31   -8.9236647420e-31   
+-9.5389090812e-31   -2.7848345143e-31   3.3291278953e-31    -3.1749632218e-32   -4.5263416202e-31   
+-5.9503373575e-31   -3.3484549032e-31   -3.6537749847e-32   3.7996491317e-32    6.4961767487e-32    
+1.2453845429e-32    2.1623077524e-32    6.4465990990e-33    -5.0326956859e-32   -1.1159560322e-31   
+-5.9838331034e-20   -2.3096865321e-32   -9.0469618742e-32   -6.0083748050e-32   -1.3592579721e-31   
+-3.0123032506e-31   -1.8771158958e-31   -1.7293760042e-31   -4.0274627581e-31   -6.9036106139e-31   
+-1.5338038369e-31   5.2709317154e-31    1.9912070265e-31    7.6610822465e-32    3.1953209032e-31    
+3.2659069879e-31    1.8924321170e-31    -5.5554088715e-31   -1.4713465306e-30   -1.7373539433e-30   
+-1.4769345486e-30   -1.0309841535e-30   -5.6144243303e-31   -5.6586894802e-32   2.7784022092e-31    
+8.9016256335e-31    1.2635848630e-30    1.3054193904e-30    1.7344463345e-30    1.2669226087e-30    
+3.2980327784e-31    7.5310180283e-31    1.1018681555e-30    2.0075412258e-31    -6.6085427239e-31   
+-3.7867694752e-31   9.1216104675e-32    -2.7854213211e-31   -3.1227449415e-31   2.4911452441e-32    
+-1.0136410039e-31   -1.4619463374e-31   -2.0918157072e-33   1.6717598539e-31    5.3940783844e-31    
+8.6536696763e-31    5.5561348568e-31    -4.2338861488e-32   6.9064148732e-32    1.3825619125e-31    
+-8.2978992580e-32   -1.8962886788e-32   7.5058605684e-32    3.9120451995e-34    -6.7151760483e-33   
+-2.2671806564e-32   3.6502390977e-32    6.7367769325e-32    8.6714995746e-32    1.4305408899e-31    
+4.3808511546e-32    -9.4275050964e-20   -5.0603433131e-32   -6.5276423815e-32   -1.0079846426e-31   
+-8.3671499812e-32   -7.1184176304e-33   -2.2240296694e-31   -2.8516693615e-31   5.4419969488e-31    
+7.0677693404e-31    1.0411569756e-31    4.9893998780e-31    5.5220342359e-31    -1.6967461618e-31   
+-5.6409267908e-31   -5.1971520476e-31   3.2570860783e-31    9.1048667259e-31    3.1642563491e-31    
+1.3800924340e-31    5.2639878352e-31    -6.6549155059e-32   -7.4293274226e-31   -9.4660209083e-34   
+5.5638837155e-31    4.5630922755e-31    5.3151284222e-31    6.5552335849e-32    -7.5626980713e-32   
+4.1894167273e-31    7.4243941079e-31    6.7034248664e-31    2.9047537460e-31    2.9751178974e-31    
+3.6379011090e-31    2.4250335610e-31    4.6610100146e-31    1.7667397974e-31    -3.3811750236e-31   
+9.4656823659e-32    3.7232062639e-31    3.8701411769e-32    -1.3960885611e-31   -1.6426090046e-31   
+-1.6169235126e-31   -2.2656760236e-32   2.9075824556e-31    2.5476291582e-31    3.8168019453e-32    
+3.2633077348e-31    5.5168620607e-31    2.6695044125e-31    -1.2652983576e-31   -2.9681411033e-31   
+-1.2511773791e-31   -9.0749386398e-32   -8.4545315293e-33   -4.5996623750e-33   -8.7550819249e-32   
+9.0238845691e-32    1.2791184096e-31    -2.6728665910e-20   6.0140077739e-32    1.6423969454e-31    
+2.0083819393e-31    1.3553637944e-31    -6.3546284210e-33   -1.5216652120e-31   -1.3643295249e-31   
+3.1365198545e-32    3.0746211432e-31    3.8345433876e-32    -5.8147680643e-31   -2.7418283482e-31   
+2.4258300760e-31    3.8693136289e-32    -1.2119459604e-31   -1.4057144492e-31   -7.0552230541e-32   
+4.1290508607e-31    8.7481192368e-31    2.6956323606e-31    -2.9961677099e-31   2.5022832882e-31    
+-1.6972107172e-31   -9.6852459028e-31   -1.1071637106e-30   -1.3678578888e-30   -1.2825489723e-30   
+-6.4739758922e-31   -1.3459090582e-31   -3.4791811598e-31   -8.7460353204e-31   -7.8803335720e-31   
+-1.8758538850e-31   1.6686932242e-31    2.2461844465e-31    -6.9342881953e-33   -2.7379050182e-32   
+7.2762536079e-32    -2.1611115694e-31   -2.7022414600e-31   -2.5445032837e-31   -3.3084918569e-31   
+-3.4018543202e-31   -7.6600304141e-31   -9.7269392768e-31   -5.2543055233e-31   -1.7919198268e-31   
+-5.6961635054e-33   5.1064979232e-32    7.4556434498e-32    1.6408142598e-31    9.2637982641e-32    
+1.4549046560e-32    2.8151679109e-33    -8.4670199813e-32   -4.5102871885e-32   -5.0443659938e-32   
+-1.4242853792e-31   -9.8571501966e-32   -6.7377455398e-32   -5.5652843477e-20   1.5994622493e-32    
+6.8414147376e-32    2.3910062909e-31    2.4818296865e-31    -3.2181461823e-32   -2.9874859788e-32   
+2.7005308806e-31    -1.7377191929e-32   -1.2728478526e-31   9.8850611345e-32    -3.8231580783e-31   
+-3.5227017222e-31   4.1347458957e-31    4.9254567469e-31    2.7165768487e-32    -8.9575678798e-32   
+7.7839919358e-32    -1.0830967333e-31   -3.4338150712e-31   -2.6520553744e-31   1.6275612663e-31    
+6.2653980554e-31    -1.0050194581e-32   -5.7891756714e-31   -2.4027405457e-31   3.7374325667e-31    
+7.5949874905e-31    1.3291549724e-31    -3.9694619860e-31   -1.2426084955e-31   3.9534075544e-31    
+6.2499210266e-31    4.4728895410e-31    2.7290841086e-32    -3.5016378039e-31   -3.9934232629e-31   
+-2.4711308071e-31   -4.4890718665e-32   9.2309220381e-33    -1.2792387802e-32   2.5377437209e-31    
+4.9809588882e-31    3.9891801984e-31    1.8800687376e-31    6.4079018250e-32    1.7013935963e-31    
+2.5908271650e-32    -3.5918696906e-31   -3.7303683158e-31   -2.9299394177e-31   -1.7657166471e-31   
+7.7532221957e-32    1.8202370155e-31    6.0549431892e-32    -2.9425350748e-32   4.4532992224e-32    
+4.1159981714e-32    -3.9474040696e-33   -1.0957864299e-31   -2.0365505456e-31   -1.3387998825e-20   
+-4.3061085218e-32   -1.2445946107e-31   -1.6231649174e-31   2.4867818091e-33    2.8320103940e-31    
+3.6844600893e-31    2.3767677630e-31    8.2277081394e-33    -4.2075400291e-31   -3.3171434953e-31   
+2.6709187673e-31    1.9713059071e-31    3.4134851315e-32    2.6051917060e-31    4.0040281027e-31    
+3.5659345237e-31    3.7145094865e-31    6.4340904285e-31    4.3890247194e-31    3.2114580896e-31    
+6.4202793103e-31    3.7331744560e-31    -7.7308031674e-33   -5.3564174262e-32   2.8179815742e-31    
+7.3891819396e-31    4.5006913930e-31    -1.7687484822e-31   -2.4616243492e-31   -3.3114304752e-32   
+3.6056493056e-31    5.3222039578e-31    4.4738750755e-31    4.4752057351e-31    2.8176844092e-31    
+2.1959513411e-31    7.9188822635e-32    -1.3356587475e-31   -3.5630832446e-32   2.0334359557e-31    
+2.1245264236e-31    -1.9447228077e-31   -3.4405685214e-31   9.0670675296e-32    4.3043556246e-31    
+4.7797405864e-31    4.7692269649e-31    2.2894040824e-31    9.1902217217e-32    1.7685528799e-31    
+-1.3540140330e-31   -2.7192776645e-31   -8.6302726367e-32   -2.4016195943e-32   -7.0014700484e-32   
+-1.4464599046e-32   6.5465443307e-32    1.0280478626e-31    5.5310300590e-33    -1.6471967239e-31   
+4.3940155982e-20    -1.0610670287e-32   -6.7349243534e-32   -1.5458173891e-31   -6.1174982966e-32   
+2.4599353989e-31    3.6295112532e-31    3.8033166741e-32    -2.3244742511e-31   -1.9016338867e-31   
+2.7149311566e-32    8.4631455519e-32    3.5910176923e-33    -6.7688914381e-32   -2.8027734985e-32   
+1.3390150190e-31    -3.9118477165e-31   -9.0622376584e-31   -6.2574329057e-31   -2.4801614249e-31   
+7.6853068340e-32    4.0060847476e-32    -2.2130213999e-31   -5.2126497651e-32   8.9620253544e-32    
+-1.1980205842e-31   -2.0532670156e-31   -4.1959280257e-31   -8.8422565860e-31   -5.8442870784e-31   
+-5.7400987823e-32   -7.8431804273e-32   -1.7315708872e-31   -4.9023192565e-32   4.3308747771e-31    
+6.1383901226e-31    2.7566828352e-31    1.6032652086e-31    3.0366235234e-31    8.9765638685e-32    
+-1.6202257113e-31   -2.2510321852e-31   -6.9760605625e-31   -6.7276118381e-31   -4.9269200023e-32   
+1.5739587239e-31    6.9930064891e-32    1.5749066425e-31    3.0533700861e-31    3.1214509574e-31    
+3.5944886920e-31    3.1777712427e-31    1.6692057397e-31    -2.0579614699e-33   3.9451471205e-32    
+9.6446960496e-32    1.2974824526e-32    -6.5853262403e-32   8.4121008852e-32    1.4461025543e-31    
+-2.8257003403e-33   1.9403328220e-20    5.6325927709e-33    1.6988808595e-32    1.5137357973e-32    
+3.6201182305e-32    1.1753025101e-31    1.2494743229e-31    -8.4172730604e-32   -2.0343801128e-31   
+1.1848578686e-31    3.2062735718e-31    3.2194777823e-31    4.8668007543e-31    3.2470802704e-31    
+-3.5879473011e-32   -2.2589916926e-31   -1.9227890235e-31   -1.3780555374e-31   -4.6710647230e-31   
+-4.9886701311e-31   -1.3335720099e-31   -2.3476408937e-31   -3.3892436168e-31   -1.4394201041e-31   
+-1.6225546007e-31   -1.4755331713e-31   2.4753543583e-31    5.5822402353e-31    5.7249019913e-32    
+-2.2230196846e-31   1.2528099057e-31    -7.4740375854e-32   -1.0430640977e-31   5.1715356747e-32    
+-2.6640726882e-31   -4.7515470597e-31   -4.2402991758e-31   -2.1885635942e-31   1.2117296695e-31    
+1.7812745500e-31    -1.9701210088e-31   -1.8605837432e-31   1.8369309161e-32    1.1371506655e-31    
+1.0702415270e-31    -2.1142695301e-31   -2.6852880103e-31   -1.1648754051e-31   -9.8326622983e-32   
+-5.8642309857e-32   -1.0346155847e-31   -3.5044777982e-32   8.9310487273e-32    5.2609484770e-32    
+9.0372758008e-32    2.1741567355e-31    2.4558540825e-31    2.2163240688e-32    -2.3378231649e-33   
+1.0873529632e-31    9.0333637556e-32    -2.9467255356e-20   4.7862368384e-32    4.7624918525e-32    
+2.1244286224e-32    -2.0888722693e-32   -1.0393532971e-31   -1.7832884069e-31   -5.7927233134e-32   
+1.6672403132e-31    1.6139669092e-31    1.4726217069e-32    5.4582058330e-32    -5.0861853809e-32   
+-3.3040042897e-31   -3.2676373156e-31   -7.5345614385e-32   4.5410794981e-31    5.9870278276e-31    
+8.4204892129e-32    -1.7160073420e-31   7.6270211221e-32    2.2686476734e-31    8.4555847722e-32    
+5.3914189460e-32    3.7630715091e-31    4.1425022776e-31    -1.9251665196e-31   -3.5238950841e-31   
+4.7781118214e-32    1.4226528526e-31    8.3402546705e-32    -7.7736852013e-32   -2.6775391515e-31   
+-3.3741728388e-31   -5.0004664520e-31   -3.4953221078e-31   1.0654605564e-31    9.9796273040e-32    
+-2.3054397061e-31   -1.7633242810e-31   -1.2598591102e-31   9.2985552811e-32    4.7270822010e-31    
+7.8538068963e-32    -1.9064148574e-31   -1.7376702923e-31   -2.2148984293e-31   -2.0045018676e-31   
+-9.5128149874e-32   3.9050486572e-32    -9.8826537221e-32   -1.5146837159e-31   -5.2355201832e-32   
+-4.7625388722e-32   -1.4630296730e-31   -4.6284008609e-32   1.4791969521e-31    7.0281396642e-32    
+-4.0080783860e-32   5.6213080252e-33    3.0736638206e-32    -4.5410154845e-20   1.6479490403e-32    
+4.4098529512e-32    -1.6785401053e-32   -1.0179332039e-31   -1.0822089999e-31   -7.3222389469e-32   
+5.9582329180e-32    1.9838978026e-31    1.0086305767e-31    -1.6861034710e-31   -5.0306841800e-31   
+-7.7855492307e-31   -4.7420232044e-31   1.0623948672e-31    2.1823945999e-31    7.2331082632e-32    
+6.6097765228e-32    1.5170234199e-31    -4.8425101039e-32   -3.6586274254e-32   9.7639005808e-32    
+-1.9848302929e-32   7.5520904102e-32    4.4757332970e-31    6.5757849878e-31    2.0807228021e-31    
+-2.4666046836e-31   -1.0457385824e-32   1.6218775160e-31    -6.1112916864e-32   -6.2131553249e-32   
+-4.2203444539e-32   -4.0478712208e-32   4.4010508495e-34    -8.7071969870e-32   -6.3104674492e-32   
+4.3539934596e-32    5.7108336749e-33    -5.6995489292e-33   -4.0768777194e-32   -1.4199257057e-31   
+8.4913574163e-32    -1.3589467012e-32   -2.6470929074e-31   -2.6547670048e-31   -2.4802930802e-31   
+-2.3264857570e-31   -6.6196318674e-32   7.1575380824e-32    9.5078873151e-32    1.4376368791e-31    
+9.7530296090e-33    -7.7916279471e-32   -2.4644511780e-31   -2.2848901841e-31   4.1169761827e-32    
+6.2649899238e-32    -5.0480429402e-34   4.0889147815e-32    5.0380371323e-32    -3.2752419888e-20   
+-2.9033393912e-32   -2.9563024646e-32   -3.9796469980e-32   -8.2188119981e-32   -1.2635755531e-31   
+-1.8689250511e-31   -1.8772832862e-31   1.1303553678e-32    9.6991355440e-32    6.6639715144e-32    
+7.8134451222e-32    6.3442840707e-32    1.6436307443e-31    1.3661764616e-31    -9.2232860268e-32   
+-3.0692778161e-31   -3.2378813218e-31   8.4547372408e-33    -8.9041158007e-32   -4.9103577571e-31   
+-2.8910014025e-31   -3.0999948941e-32   -8.2126806196e-32   -2.8814168917e-31   -2.9291544226e-31   
+5.3954062228e-32    3.0001625099e-31    4.1944008234e-31    1.6481700332e-31    -4.0351617759e-31   
+-4.3011733263e-31   -1.8864408574e-31   -8.2096525461e-32   1.2294203893e-31    1.7426468652e-31    
+-8.4986172694e-32   -2.0447526750e-31   -6.2047481893e-32   -2.4517990972e-32   2.7039755493e-32    
+6.8844096190e-32    1.2719112187e-31    3.8565999522e-31    3.2326583653e-31    -5.3116357934e-32   
+-8.8559675521e-32   -7.8162663087e-32   -1.5090262967e-31   -1.7782351918e-31   -2.1740739807e-31   
+-8.5899484785e-32   -8.3856193485e-32   -7.5926778792e-32   -2.7786805662e-32   -1.4840719623e-31   
+-1.2918626492e-31   7.1846214722e-33    -4.0125546685e-32   3.4330453575e-32    2.1229164665e-31    
+-9.0789021731e-20   -1.3219703509e-32   -2.0257999444e-32   3.0269637811e-32    9.8506050441e-32    
+-2.1261965659e-32   -1.5314434442e-31   -5.0295735729e-32   4.2648251602e-32    -5.5099275845e-32   
+-1.7545673183e-31   -9.7273568124e-32   2.1703349682e-31    3.8222449543e-31    2.5244296017e-31    
+1.3969424402e-31    1.2387998938e-31    -1.6522033895e-31   -2.5938966159e-31   3.5364084566e-31    
+4.6872153101e-31    1.1661280118e-31    1.3907283069e-31    3.0901997348e-31    1.9194487387e-31    
+-4.3597044814e-31   -6.5602440121e-31   -2.6960235651e-31   -3.8326193972e-32   6.3323786639e-32    
+9.7514497446e-32    5.2699762736e-33    -1.0154917022e-31   -1.1843792073e-31   -9.3232688743e-32   
+6.5827683646e-33    8.4296862807e-32    -4.1469183748e-32   -1.5837689295e-31   -1.2253654040e-31   
+-2.5446161311e-33   1.4320191916e-31    1.2234695667e-31    7.1854901626e-32    3.2038521710e-31    
+4.2723634879e-31    1.2762257531e-31    -8.7514378924e-32   -5.9429985112e-32   6.1625996638e-32    
+-5.6058855393e-32   -1.6431944008e-31   -8.9266100606e-33   -3.1299370862e-32   2.2057916394e-32    
+8.7055795068e-32    -1.5214771329e-31   -1.1910334457e-31   -5.9811033361e-32   3.2319511879e-33    
+1.9760944009e-31    1.1338198501e-19    1.5058364753e-32    4.9562603413e-32    8.8831261736e-32    
+8.9718995069e-32    1.1122226621e-31    1.6408321273e-31    9.5813510100e-32    -9.7590481401e-33   
+2.3588974276e-32    -6.6300514494e-32   -2.1765114857e-31   -6.6160583646e-32   9.9215484791e-32    
+1.4966807849e-31    2.2467684321e-31    2.3084969319e-31    2.8120476787e-31    1.7864081689e-31    
+8.3373112326e-32    2.6623649300e-31    8.5938041000e-32    -2.0941271993e-31   -2.9077366804e-31   
+-3.5720094785e-31   -3.8648072538e-31   -3.2421516577e-31   -2.8955961748e-31   -4.6275639089e-31   
+-2.8325854458e-31   6.1961529746e-32    1.5176741736e-31    2.8374947804e-31    2.6802963911e-31    
+-1.6401249499e-32   -1.1029785745e-31   5.6163427370e-32    1.3728871238e-31    1.2918476029e-31    
+7.3754465232e-32    1.3773709294e-31    1.3974502537e-31    -4.7754787141e-32   -2.3021577259e-31   
+-1.4046536831e-31   2.1780499728e-31    1.6763715533e-31    5.6485794941e-33    8.0273662862e-32    
+2.0187892961e-31    2.7150571696e-31    5.4586572228e-32    -5.8740487146e-32   -7.6702416984e-32   
+-5.4163018104e-32   1.9154652235e-31    1.3837975922e-31    -5.7929302004e-32   -4.7261267592e-32   
+3.6841309508e-32    9.1596024449e-32    8.0248188036e-20    -5.6694562738e-33   -2.1598439162e-32   
+-2.5913161707e-32   -2.5213131311e-32   1.0861473762e-32    8.8574721849e-32    8.9124665126e-32    
+-5.5444965223e-32   -5.9017527654e-32   1.3441629789e-31    1.0842139231e-31    -3.3933888801e-32   
+-7.1662273366e-32   -6.9723177885e-32   -3.2410542162e-32   -3.8176294933e-32   5.3446060590e-32    
+3.4797453971e-33    -4.1301680505e-31   -5.7409752309e-31   -4.9758017593e-31   -3.2454590286e-31   
+-1.0117376434e-31   1.0808132767e-31    3.4286217372e-31    3.2607385744e-31    3.4232840524e-31    
+2.0000589691e-31    -9.1096486370e-32   -1.3319949667e-32   8.1293051563e-32    5.6214208726e-32    
+1.5061825408e-31    2.5614567334e-31    1.6904624392e-31    1.0627898333e-31    1.1679711870e-31    
+1.6341499121e-31    1.8962021625e-31    1.4403999961e-31    1.5642688889e-31    2.7794982401e-31    
+2.6619699639e-31    -7.5662339583e-33   -5.9679377994e-32   1.5871317838e-31    7.0528156417e-32    
+-1.3310131938e-31   -7.5840262408e-32   1.7805071873e-31    2.0144926292e-31    -1.3483014243e-32   
+-1.3015825769e-32   1.4587414696e-32    9.3801063772e-32    1.3255513769e-31    3.9325834368e-32    
+-1.6731516392e-32   7.8842757098e-33    4.1108071883e-32    3.9454119200e-20    4.6701920360e-33    
+-2.8131366567e-32   -7.8878115968e-32   -6.7367675285e-32   5.6197563726e-33    1.8708603850e-32    
+-2.1196608174e-32   -1.4257298266e-31   -2.1686384948e-31   1.7987884754e-33    1.6167848043e-31    
+-4.9497833674e-33   -1.7574486901e-31   -1.9963251289e-31   -2.2665900880e-31   -1.5168865924e-31   
+9.5130406823e-32    3.8371746729e-31    3.1831841591e-31    -8.2740237923e-32   -1.4504208504e-31   
+2.3917981039e-31    4.4467427851e-31    3.4966391317e-31    3.7280666979e-31    2.5866593323e-31    
+1.1917951661e-31    3.2605655416e-31    3.7653623125e-31    1.9822934879e-31    3.3463785100e-32    
+-8.5335623655e-32   -1.8738395579e-31   -2.2195891219e-31   -1.9491614743e-31   -1.3672861283e-31   
+-4.3533163749e-32   -4.8641297960e-32   3.5249784197e-32    1.4324254425e-31    8.0422621506e-34    
+-9.5939899253e-32   1.7614359669e-32    -7.4616995966e-32   -2.4586978384e-31   -2.1486155942e-33   
+8.2065680490e-32    -1.5408379951e-31   -2.7856282081e-31   -1.3985138410e-31   1.5130286199e-31    
+5.4159044933e-32    -1.4530201035e-31   -4.1165718126e-32   6.8496526020e-32    -2.9386230296e-32   
+9.0578892697e-33    1.0433913553e-31    6.0423795056e-32    4.1865654483e-32    7.1725669908e-20    
+-9.4867096089e-33   1.1690996616e-32    1.8008949613e-32    -7.2639156192e-32   -1.2933503548e-31   
+-6.0503164435e-32   -2.3620853683e-32   2.4901672328e-34    -3.4015609168e-32   -6.3301969464e-32   
+3.6285347700e-32    -7.1860696813e-32   -1.8580503178e-31   -6.2663840601e-32   -8.3380917609e-32   
+-1.4668777713e-31   -5.9180216072e-32   1.3433737520e-32    -1.7359230375e-33   8.3451071112e-32    
+2.7647514284e-31    2.3776395096e-31    -1.6206775714e-33   -2.8828763855e-33   6.6344148844e-32    
+-3.2437625552e-32   -1.4045746899e-32   8.8364261340e-32    -1.2452340797e-32   -1.4867125928e-31   
+-1.9052939060e-31   -1.4285058741e-31   -1.8348620460e-31   -1.8391088720e-31   7.8360522296e-32    
+5.0883670984e-32    -1.0624475293e-31   -1.3924172571e-31   -1.5329349114e-31   3.9443571883e-32    
+2.1423111829e-31    6.2702185227e-32    1.1024481915e-31    2.1008380965e-31    -9.0666161398e-32   
+-1.6674265115e-31   9.1070813573e-32    9.1052475861e-32    -1.0637904140e-31   -2.0290207990e-31   
+7.6166156462e-34    3.6962761585e-32    -2.6222363741e-31   -1.6092047465e-31   5.8855215394e-32    
+-7.5792114159e-32   -7.9340038229e-32   6.0456520819e-32    5.3077425561e-32    5.4404511663e-32    
+-1.2005227393e-19   2.8136632781e-34    2.2440093118e-32    5.3486685674e-32    1.5970924527e-32    
+-6.9520804778e-32   -5.1126387057e-32   4.9696515729e-32    1.1710538034e-31    5.7678216411e-32    
+-1.4249474176e-31   -1.6620813036e-31   4.6658662168e-33    4.9033724994e-32    2.9621329166e-32    
+8.5259075463e-33    -1.0422609999e-31   -2.9851575596e-31   -4.2432901036e-31   -2.9127057302e-31   
+6.1698595170e-32    2.2192938377e-31    5.3420011635e-32    -9.8738704283e-33   6.6232418106e-32    
+1.4271441814e-32    -4.1023812448e-33   -4.0410298437e-32   -2.3683672101e-31   -2.7657858634e-31   
+-8.6840256424e-32   -1.0839449700e-31   -1.3507497440e-31   3.8473459905e-32    3.7680518435e-32    
+2.0965553004e-32    9.6860734508e-32    1.3329391238e-31    8.5902494051e-32    -1.4535956255e-31   
+-3.6948213667e-31   -2.7191572939e-31   -1.5698585996e-31   -7.5587484103e-32   1.2523509927e-31    
+1.7445539872e-31    -8.0579291393e-32   2.7083389843e-33    2.2849654157e-31    1.4601483012e-31    
+-1.1451830535e-32   7.4840433933e-33    1.2515873915e-31    -4.3930010642e-32   -1.0087377818e-31   
+6.2322077373e-32    2.1845198937e-32    7.1913923197e-33    6.9175491557e-33    -4.7707391208e-32   
+1.6516353906e-32    1.7206023080e-19    6.6107921499e-33    6.9636285343e-34    -1.6652147013e-32   
+-5.2233326578e-33   3.7787629481e-32    3.1780101032e-32    -2.9960529816e-32   -7.4459009526e-32   
+-3.1713144873e-32   7.2312650881e-32    1.3840552605e-31    1.7251630324e-31    3.5881165723e-32    
+-1.7346281129e-31   -8.3546991451e-32   1.2033893020e-31    7.2189082915e-32    -1.3840138831e-31   
+-2.1246467942e-31   -1.3969800560e-31   -2.4502117096e-31   -3.0853548172e-31   -7.1557701389e-32   
+-5.7682730309e-32   -1.2702260300e-31   1.0353001926e-32    -1.6283361522e-31   -2.8733370137e-31   
+-2.5072448147e-32   2.9304528737e-31    3.5347263242e-31    1.6490812765e-31    3.1177495608e-32    
+-5.5102661268e-32   -9.5476472360e-32   2.6100864645e-32    1.5445770075e-31    6.9291348280e-32    
+-4.6173794258e-32   1.5546618086e-32    5.0782766549e-32    -1.2603199040e-31   -2.5952244543e-31   
+-2.3801334384e-31   -1.0758199530e-31   -1.7900597246e-31   -1.7258833754e-31   3.6492046627e-32    
+6.7226239805e-32    6.2395616300e-32    4.9472325446e-33    4.6988929061e-32    1.0651295372e-31    
+2.7432464645e-32    -2.8430647428e-32   -4.3372168043e-32   1.1573108638e-31    1.2947364978e-31    
+-7.5645412464e-33   -3.5569518660e-33   2.2214496929e-19    -4.1631307929e-33   -1.6592337861e-32   
+-2.9829344646e-32   4.0361774030e-34    4.7999854203e-32    9.8173526599e-33    -5.3529567708e-32   
+-2.7711574024e-32   -9.2914835071e-33   1.9490260574e-32    5.9008311779e-32    1.5639435120e-32    
+7.2693699129e-32    1.6188676627e-31    1.2637767978e-31    8.0359991167e-32    4.0377572674e-32    
+-5.9294568163e-32   -2.2533051211e-31   -1.3040351283e-31   5.5064669291e-32    -5.5801375110e-32   
+-1.8034603602e-31   -1.7622738593e-31   -1.7543002460e-31   -2.6671919800e-32   1.2257171119e-31    
+1.6949180330e-31    1.3207854526e-31    8.0495596195e-32    1.8828711161e-31    1.9609126563e-31    
+8.7522231227e-32    3.4975188717e-32    4.4386666687e-35    -1.0068156135e-31   -3.7734685215e-32   
+4.0029250188e-32    -1.0506963474e-31   -8.1422826139e-32   8.6245738401e-32    8.9525649759e-32    
+8.2924825801e-32    1.7662846460e-31    2.5423892746e-31    1.6113187555e-31    -2.4190733344e-33   
+-4.2469012223e-32   -7.2972432350e-32   -1.3277255712e-32   -4.1140045330e-32   -1.4306593798e-31   
+-3.8170652560e-33   6.6352800482e-32    -2.5546407469e-32   -7.1463473762e-32   2.3952625209e-32    
+1.3811851735e-31    5.4091171889e-32    -5.3061250759e-32   -2.3893007728e-19   -7.9896000037e-34   
+5.1601380815e-33    2.0988122496e-32    3.0475960579e-32    3.7700454820e-32    7.4441706249e-33    
+-3.9127975159e-32   -1.6388460121e-32   -2.1231496846e-32   -7.7646950205e-32   -6.7848969692e-32   
+-4.1109617658e-32   -5.5017649517e-32   6.2579557656e-33    4.1983391997e-32    -5.2228060363e-32   
+-1.8913233907e-32   1.3193522899e-31    2.1348670123e-31    2.5164418825e-31    2.2896749163e-31    
+1.7077882855e-31    1.6288853431e-31    1.6138314923e-31    -3.1670921116e-32   -1.0304853677e-31   
+1.3111294718e-31    1.3477879684e-31    -7.9853118003e-32   -2.5356804933e-31   -2.5599521006e-31   
+-9.5806398360e-32   9.3047995071e-32    1.2809766311e-31    5.4779447342e-33    -8.0889057664e-32   
+-7.8904635121e-32   8.2637440942e-32    1.0280403395e-31    -1.5040986244e-31   -2.0633480552e-31   
+-7.5098478453e-32   -2.4065660746e-32   -1.5877637295e-32   1.6912373251e-31    3.0953380557e-31    
+1.8774770076e-31    1.4419572911e-31    3.3444977190e-32    3.6591540469e-32    1.1240660028e-31    
+-1.3088649995e-31   -6.1218993474e-32   4.1461284426e-32    -8.1400632806e-32   4.7316562847e-32    
+-2.6669615831e-32   4.3468840698e-33    1.2023069068e-31    2.0365204529e-32    -2.0551868124e-19   
+2.2870418090e-33    -3.2876226004e-33   1.2148404977e-32    2.8399943516e-32    -1.1466054017e-32   
+-1.8267558370e-32   4.0054828945e-32    2.1457191761e-32    -5.0166713469e-32   -4.9523106802e-33   
+1.1149817824e-31    1.0765083225e-31    -3.2027048885e-32   -1.4471031351e-31   -9.4379501032e-32   
+4.8306611209e-32    2.0049683037e-31    3.7636771238e-31    3.8912812673e-31    1.4680250538e-31    
+1.7853972438e-32    7.1853361728e-32    1.6697793810e-31    2.5676163238e-31    8.5749773825e-32    
+-1.5876847363e-31   -5.2793614205e-32   1.2050227689e-31    1.3671488306e-31    9.0798945239e-32    
+5.7574772908e-32    9.3136016088e-32    6.8658085964e-32    8.9074259928e-34    -2.8036574702e-32   
+9.7311889240e-33    -7.5115781729e-32   -1.0486538084e-31   5.4516982963e-32    3.0640905946e-32    
+-1.6065716392e-33   -5.2624531098e-32   -8.5735902991e-32   -1.1898339713e-31   -1.2880333588e-31   
+-8.6110133373e-33   -6.3159593588e-32   -5.2481590985e-33   -1.9759589840e-32   -3.8056676628e-32   
+1.2058728864e-31    -5.8778855281e-32   -4.9699336915e-32   1.1369757519e-32    -1.6516241058e-31   
+8.9984562753e-33    -5.7551074942e-32   -1.0579975779e-31   1.0714574584e-31    1.0716304912e-31    
+-2.7621700539e-21   1.1186192322e-32    4.0023231657e-33    -1.7527467127e-32   -3.1330286363e-32   
+-1.7267353737e-32   1.4137670557e-32    9.8899511910e-33    -5.8924710620e-32   -9.1821343206e-32   
+-1.9051001845e-32   -1.3463171899e-33   -4.3124279794e-32   -8.1332924331e-33   3.1132380134e-32    
+1.0249840541e-33    2.7234981594e-32    1.5846660668e-31    2.6487310764e-31    9.4396146032e-32    
+-1.3464394413e-31   3.6040844875e-32    7.5759200317e-32    -1.6269732840e-31   -9.6718734790e-32   
+7.8326291900e-32    8.0120566477e-32    5.1714228272e-33    -5.1110118216e-32   3.0229200805e-32    
+1.3289029464e-31    1.1252659474e-31    8.6150006141e-32    2.2221921366e-32    -1.9812251986e-32   
+-1.2073549497e-31   -1.6005832007e-31   -1.0530548592e-31   -1.8414937150e-31   -1.2904365394e-31   
+2.0443069275e-32    9.4366805693e-32    -4.2385505104e-33   -1.2292661644e-31   -3.9057633577e-32   
+8.6608542978e-33    -2.3340615830e-34   1.3631972888e-32    9.7476129310e-32    8.7275095294e-32    
+2.8225735253e-33    8.9194630549e-33    -5.2620769516e-33   1.1734630966e-32    -4.6074488496e-32   
+-8.2980497213e-32   3.2192370410e-32    -2.6075379927e-32   -9.4578206597e-32   1.3493546673e-32    
+5.8814590309e-32    -1.4085527915e-19   -9.1444056539e-33   1.7833659895e-33    5.7379170648e-33    
+-3.4593764310e-32   -5.0433033469e-32   -2.3135233457e-32   -8.5286346932e-33   3.3538452501e-32    
+7.4486469074e-32    4.4651105896e-32    -2.0226308117e-32   2.2324048315e-32    1.5480489476e-31    
+1.4103487182e-31    -4.4294131772e-32   -1.8701795387e-31   -2.2398527637e-31   -2.8096162862e-31   
+-2.3555326926e-31   -4.4602487450e-32   1.0685318881e-31    6.7313038308e-32    -1.5711770341e-31   
+-1.0933489248e-31   9.6459749875e-32    1.1657744231e-31    4.7777356632e-32    -4.9994433017e-32   
+-8.2490175010e-32   -1.4223519261e-31   -2.5963792599e-31   -2.1026340168e-31   -5.8230040479e-32   
+1.0427105090e-33    -9.0019545465e-32   -1.1133530175e-31   5.9691791214e-32    1.4840870086e-31    
+1.9321516009e-31    2.1287995806e-31    1.9173497760e-31    2.0729241024e-31    4.2003845598e-32    
+-8.9041158007e-32   -4.9231584203e-32   -3.3710921032e-32   -2.5082980576e-32   -2.6026385323e-32   
+7.0866698790e-32    1.9375306630e-31    9.8075537390e-32    9.4075659252e-32    1.5376444120e-31    
+3.6412865327e-32    -6.2682201823e-32   -4.4321215162e-32   3.0894248489e-32    1.0741197180e-32    
+1.0078782603e-32    3.5774148717e-32    8.3633832056e-20    -1.1627802039e-32   -3.3688727699e-33   
+3.5419055383e-33    1.2873637972e-32    4.3761491772e-32    7.0297947603e-32    8.4158624671e-32    
+7.9150454500e-32    6.4450192346e-32    3.8636712560e-32    -8.7088144673e-33   2.4300947695e-32    
+5.6683654150e-32    3.6310174141e-32    9.9863229198e-32    1.1164525610e-31    -6.3059159351e-33   
+-6.0513132627e-32   5.5636805901e-32    1.2763574085e-31    5.5994908500e-33    -3.9417993125e-32   
+-6.3456006244e-33   3.7916745780e-34    -6.2964931724e-32   -1.3207177441e-31   2.9635623177e-32    
+1.6037278832e-31    6.0962453587e-32    -1.7274641802e-32   3.1964418546e-32    6.2496614774e-32    
+3.1939592105e-32    6.5658412460e-32    1.4983095498e-31    1.0079384457e-31    9.3452741286e-32    
+1.3175185187e-31    6.7876617319e-32    4.4997171433e-32    3.6960269537e-32    9.6963049536e-32    
+1.4865997453e-31    2.5961309955e-32    -5.3734197765e-32   -1.5664731759e-32   -9.4446927388e-32   
+-2.2304563321e-31   -1.1342523666e-31   8.1667046845e-32    -7.2297604553e-33   -4.2452085104e-32   
+8.4376420265e-32    1.5436366120e-31    3.0334901257e-32    -6.3391683193e-32   5.9447288389e-32    
+9.4732713575e-32    6.2367310396e-32    3.2557525975e-32    2.0067056485e-19    2.8828763855e-33    
+-1.5746734245e-32   -2.4239633909e-32   1.7903625319e-32    7.5623219131e-32    6.1093403658e-32    
+-3.4927040468e-32   -5.9635367485e-32   -5.7251276862e-32   -1.1179534322e-31   -8.5725699700e-32   
+-6.3340525679e-32   -1.0990439598e-31   -5.7542611382e-32   9.3406097670e-32    1.2802092684e-31    
+1.3696672097e-32    -6.7412814268e-32   -1.0706947977e-31   -1.9772595509e-31   -1.7343318884e-31   
+-5.8623501948e-32   -3.0635075494e-32   -1.4113455374e-32   -7.8924947663e-32   -1.6074894651e-31   
+-1.2258205554e-31   -9.6100518801e-32   3.1241818658e-33    1.4354760854e-31    1.2425022308e-31    
+6.7086308957e-32    1.0049639748e-31    1.8487686144e-31    2.3348515152e-31    7.0064353366e-32    
+-5.1117265221e-32   -5.7684234942e-32   -1.8182621850e-31   -1.4951460594e-31   -9.0810982302e-32   
+-2.1397608304e-31   -1.3926843295e-31   1.2477919554e-32    -4.9332394599e-32   1.0048915643e-31    
+1.2572598571e-31    -1.2014699548e-31   -1.0929990977e-31   4.9226129910e-32    3.8882720018e-32    
+-1.0987618412e-31   -1.1824382311e-31   3.5854646570e-32    -2.0159069840e-32   -8.0696464670e-32   
+-1.1122539302e-32   1.7134005658e-32    3.7560147814e-32    -6.2457306243e-33   1.7993519605e-19    
+2.9295200013e-33    -1.3821556617e-32   -1.3353615825e-32   -1.2507259893e-33   -4.2710693861e-32   
+-7.9700209698e-32   -3.9595915950e-32   2.9947458319e-32    1.3487151984e-33    -9.1079559251e-32   
+-8.0760411563e-32   -6.1087150028e-32   -2.6922394137e-32   3.3362598546e-32    2.2155717524e-32    
+-2.9731919675e-32   -6.1119593672e-32   -1.6010120211e-31   -2.1697632078e-31   -1.0221760332e-31   
+6.4336921710e-32    1.8636019425e-31    9.1317667387e-32    -1.1377656841e-32   2.7445254024e-32    
+6.3669852176e-32    2.7836834702e-32    -5.6427114263e-32   -8.1384081845e-32   -4.6972378101e-32   
+-4.7477182395e-32   -9.7430990327e-32   -8.4408393711e-32   -6.0695381271e-32   4.6662423750e-34    
+5.9736554039e-32    7.3684875966e-32    6.4754880482e-32    -5.2419148725e-32   -1.1750354378e-31   
+-1.1065821700e-31   -9.3263157557e-32   -7.1054025569e-32   -7.9222676873e-33   -9.4496956428e-32   
+-7.2004201163e-33   7.4845465048e-32    -9.0019169307e-32   -1.0885416231e-31   -7.4993154159e-32   
+3.6462894367e-32    6.8639865801e-32    -4.7004351547e-32   1.8534019429e-33    1.4828155939e-33    
+-4.2561170980e-32   -7.9052653370e-32   -1.1955134898e-31   -5.6372195167e-32   -7.2796766474e-32   
+7.4231795332e-20    -1.1492761248e-32   -3.3297523179e-33   5.5701505110e-33    -3.0619276850e-32   
+-4.7683317084e-32   -2.2333264191e-32   5.2978119798e-33    5.4454164545e-32    9.3842817331e-32    
+6.5041136866e-32    4.4935857648e-33    -4.0329048267e-32   -3.2010309845e-32   1.5407627634e-32    
+8.3819329982e-33    -4.0816925442e-32   -6.9155367094e-32   -1.5290830515e-33   1.2525409526e-31    
+1.2592723034e-31    3.2642126304e-33    -6.6945249635e-32   -2.4889259107e-32   3.3201226682e-32    
+4.9869172339e-32    9.3015645466e-32    1.6931181160e-31    1.8832773670e-31    7.9262173483e-32    
+-5.8604694038e-32   4.0640131092e-33    8.5373615632e-32    1.6786435488e-32    -5.3005203188e-32   
+-1.3031624413e-32   -2.3655648316e-32   -1.6722864753e-31   -1.2540813203e-31   6.5046779239e-32    
+1.8839883059e-32    -1.6536685256e-31   -9.6815595525e-33   1.3645796701e-31    3.1738723630e-32    
+-1.6958866403e-31   -1.4495632097e-31   -3.0094160014e-32   -5.9541327937e-32   4.9652881379e-34    
+-2.0454730179e-32   -2.0886935942e-32   5.4946931777e-32    5.4742301720e-32    6.1571077542e-32    
+3.7473255271e-32    2.0317056281e-32    -3.5066971316e-32   -8.5918668853e-32   -6.4330385962e-32   
+-9.7839498124e-32   1.0805411878e-20    1.7212998878e-33    2.3034423061e-32    3.2928888151e-32    
+-1.7047489273e-33   -2.9213949844e-32   -1.7746391195e-32   -1.3519877746e-32   6.9621615173e-32    
+1.8360450636e-31    2.0027452088e-31    1.5390738131e-31    3.0767107020e-32    -9.6607580044e-32   
+-1.3840853532e-31   -1.6889653296e-31   -1.2912382266e-31   -6.6103783759e-32   -8.0029912353e-32   
+4.7923306011e-32    1.3190814560e-31    2.4106050731e-32    -5.8923017908e-32   -1.7080685234e-32   
+6.2616797317e-32    -5.0485601577e-32   -1.4082948944e-31   -8.4134926705e-32   -5.5141029404e-32   
+6.0051586525e-32    6.3974610842e-32    -8.3981830321e-32   -3.5061281923e-32   1.4462342097e-32    
+-5.7205761721e-32   -1.8297086788e-32   -6.6501006810e-32   -1.6119488205e-31   -1.4043019752e-32   
+2.3125001954e-31    2.7752800962e-31    2.1463586451e-32    -1.9194938777e-31   -1.4974744787e-31   
+5.1804506238e-33    6.5314980030e-32    6.7708474607e-34    -2.9420460691e-32   -1.7379636957e-32   
+-1.9794948710e-32   -6.7323664777e-32   -1.1841271813e-32   9.1933062189e-33    -5.9522708106e-32   
+-3.4922526570e-33   6.7539579579e-32    4.0820687024e-32    2.0954644416e-32    7.9902770884e-32    
+-3.0556623001e-33   -1.1000326681e-31   2.1152722667e-19    1.3595861701e-32    2.6403295831e-32    
+3.5405513689e-32    2.0373856168e-32    -4.1742274595e-32   -3.4811183745e-32   5.0547385560e-32    
+2.8389034928e-32    1.1416401135e-34    3.3424664648e-32    1.8481968540e-32    6.7598072178e-32    
+9.8611468774e-32    -2.9424222273e-32   -7.2622040994e-32   1.2028937135e-31    3.4435853101e-31    
+1.7373900545e-31    -1.1414294649e-31   -6.8050778562e-32   1.1936966457e-31    2.0268108696e-31    
+1.0844302141e-31    1.3194406870e-31    1.4747018617e-31    -3.7727538209e-32   -8.7735230803e-32   
+-5.8588895394e-32   -6.4493826696e-32   -1.7650376816e-32   -5.1459757255e-32   -1.2598440639e-31   
+-7.1953984044e-32   -5.0636911210e-32   1.5054603171e-32    2.3743180327e-31    2.1041205469e-31    
+2.0344703908e-32    1.4761600037e-31    2.9218971556e-31    1.6478437160e-31    -1.5724540911e-32   
+-6.7414318901e-32   -8.6373444107e-33   2.3874158610e-31    2.8720129369e-31    4.7508027366e-32    
+-1.7461545403e-32   -3.9110389764e-32   -1.0007622877e-31   -8.1186974953e-32   3.2757548094e-32    
+-4.1654253578e-32   -1.0154691327e-31   8.9858878897e-32    6.4926784776e-32    -2.0409591196e-32   
+7.6706178566e-32    5.3166951211e-32    -6.2592723193e-33   1.7851554135e-21    2.8888949166e-33    
+-1.8362914472e-32   -4.3346871404e-32   -1.0649790739e-32   5.8655099236e-32    5.0290093356e-32    
+-4.1557204765e-32   -1.0833355937e-31   -5.2747887475e-32   1.6681111194e-32    -5.4659546918e-33   
+3.4914533208e-32    1.4878542329e-31    1.3466237588e-31    3.5446891090e-32    -1.5405934922e-32   
+4.2087211658e-32    1.9045693312e-31    7.1143551219e-32    -1.8424754879e-31   -3.2851399563e-32   
+1.7922282765e-31    1.2474910288e-31    2.4910135887e-32    5.2575465963e-32    2.4439279870e-32    
+-1.6531287386e-31   -1.7719307805e-31   -6.5620044324e-32   -4.5405679230e-32   2.0432536846e-32    
+6.5059568617e-32    9.6569964225e-32    1.4028443622e-31    -5.3809805561e-32   -1.0640165792e-31   
+-4.6185079004e-32   -2.2683585017e-31   -1.2711288096e-31   7.2943280090e-32    1.5833626787e-31    
+3.1834794433e-31    3.1486697642e-31    1.0913251937e-31    6.8179424664e-32    2.2702952462e-31    
+1.5640845713e-31    8.9108866482e-32    1.0788630728e-31    8.1183589529e-32    1.7256633228e-32    
+3.6567090186e-32    1.9747552777e-32    -7.2171215400e-32   -1.4993665544e-32   4.7497494937e-33    
+-3.4121782757e-32   -3.5265864960e-32   3.5912574932e-32    9.1608061511e-32    -2.5425783810e-19   
+1.7017396618e-33    -1.8675501929e-32   -2.9382468714e-32   1.5867104866e-32    6.3187429295e-32    
+3.4413960694e-32    -2.8640684759e-33   6.3137400255e-32    1.5320189662e-31    1.0085233716e-31    
+-1.2326798000e-32   -7.1824585626e-32   -1.1662671904e-31   -3.6991020469e-32   1.8236525319e-32    
+-5.9877892541e-32   -7.6321368736e-32   -5.5006740929e-32   7.7470532013e-32    1.2832147723e-31    
+-7.6431583086e-33   -1.9392403020e-31   -2.5446274159e-31   -2.0457664213e-31   -2.8743770912e-31   
+-1.9820997664e-31   -4.2983032393e-32   -7.8215701392e-32   2.9813169844e-32    1.4865320368e-31    
+1.2291530818e-31    8.4586692694e-32    -4.1783651997e-33   -4.4046431602e-32   -1.0729385813e-31   
+-1.5520676101e-31   7.3058572576e-32    1.2138248706e-32    -1.6405011081e-31   1.5269013340e-32    
+5.2227119967e-32    -1.3829455939e-32   -2.7971123177e-33   -7.6026836871e-32   -1.6827408519e-31   
+-7.9499905460e-32   2.6277282837e-32    2.6635855634e-32    7.7918160262e-32    7.3402757322e-32    
+4.8671860813e-32    4.2238051093e-32    2.1718997863e-32    5.5368887229e-32    6.7858937884e-33    
+-3.3954295383e-32   -1.6031109838e-32   -9.0392506313e-32   -8.9979672697e-32   -5.5283969517e-33   
+-9.7759820029e-20   4.5364677987e-34    2.8437559335e-33    4.0552110075e-32    4.8383723638e-32    
+5.6032524320e-33    -1.2704366785e-32   -3.2507590975e-33   -2.0393792552e-32   -1.0898468920e-31   
+-1.5032485069e-31   -7.9546172918e-32   -6.0592313926e-32   -1.1384060935e-31   -6.7683272008e-32   
+6.6915909296e-32    8.8984593219e-32    -5.7049562032e-33   -2.1104806767e-31   -2.4813011842e-31   
+-5.6779198331e-32   -1.9364999896e-32   -1.8742157161e-31   -2.8565490736e-31   -2.8746009053e-33   
+1.6110126568e-31    7.3770640034e-32    2.4128516779e-31    2.6847388193e-31    1.3663965142e-31    
+1.3984884504e-31    3.0923964986e-32    -1.0087434242e-31   -8.5712346085e-32   3.8066644820e-32    
+2.1942285366e-31    2.2807966426e-31    2.1592533479e-31    9.3738621512e-32    -1.8566416054e-31   
+-1.6952123768e-31   -1.5981287685e-31   -2.0563975922e-31   -9.8252519819e-34   2.3652215872e-32    
+-1.4106816182e-31   -1.5479361001e-31   -6.3918304662e-32   -1.2856786085e-31   -1.2169958842e-31   
+-4.6022578665e-32   -2.7391651482e-32   2.5548288260e-32    -2.1130804000e-32   -1.9392835602e-32   
+-6.8686485907e-33   -4.8009822395e-32   1.4938934527e-32    5.5472236692e-32    -9.3828899478e-33   
+-2.3652827130e-33   1.6901627403e-19    -7.7714282522e-33   4.5943961603e-33    3.3565347812e-32    
+1.5093723623e-32    -1.2248274977e-32   5.4749824884e-33    -3.5133175157e-32   -1.0195965284e-31   
+-1.3195478921e-31   -1.4206291216e-31   -7.4730971899e-32   -4.0316635047e-32   -2.9830285042e-32   
+7.5414075176e-33    9.7834984226e-33    -2.5346291311e-32   2.0235806111e-32    1.9415028935e-31    
+2.4264159424e-31    1.1212448163e-31    1.0728407802e-31    2.1720240361e-31    1.0709769163e-31    
+6.5655403194e-32    2.7026542936e-31    2.1046483439e-31    -5.6882171636e-33   -1.5432755001e-31   
+-2.6543565221e-31   -2.4148716474e-31   -1.6084749996e-31   -3.5410403745e-32   2.5855985662e-32    
+-2.4374298542e-32   -3.0143060579e-32   -1.1257342644e-31   -1.4720160922e-31   7.8135814796e-32    
+6.0417776525e-32    3.0166382387e-32    2.0651272834e-31    1.3846044515e-31    1.7335626449e-32    
+-1.1333270175e-32   -5.2901947764e-32   -8.0633270094e-32   7.7271356250e-32    1.1468276876e-31    
+7.8924863542e-33    6.6768831443e-32    8.6580519192e-32    1.0754174638e-31    4.0245541148e-32    
+-5.0492278385e-32   5.0044838215e-32    1.2602051757e-32    9.8335274621e-33    1.3758963893e-31    
+1.0899146005e-31    6.5583180821e-32    1.2093071860e-20    -7.8586969528e-33   3.8067209057e-34    
+-4.8373943525e-32   -1.0317191666e-31   -1.0234963485e-31   -3.3498015496e-32   5.8218003417e-32    
+2.8645762895e-32    -3.9910384199e-33   2.8943115945e-32    8.4405760604e-32    1.8942348551e-31    
+2.0593269241e-31    1.1708111813e-31    3.2716734930e-32    -2.8484955267e-32   1.0797244751e-32    
+1.8344858878e-31    2.3256328183e-31    -1.2194108198e-32   -2.9129652793e-31   -1.9998299828e-31   
+-4.4676308495e-33   -3.8968484086e-32   5.4011943570e-32    1.5926001835e-31    5.3048649459e-32    
+-2.3462679163e-32   -5.7777146015e-32   -3.2248794139e-32   3.8894757080e-32    4.2317796630e-32    
+1.4166117521e-32    -2.9661578093e-32   -1.2024305688e-31   -2.4237452192e-31   -2.6659986182e-31   
+1.6605503397e-32    1.5381860798e-31    -8.0637031675e-33   -4.0872220697e-32   -4.0233880244e-32   
+-8.9864192132e-32   2.0293734473e-32    1.7669565586e-31    5.4648262172e-33    -8.3542477552e-32   
+8.8540115295e-33    -3.7763273238e-32   -2.8500001595e-32   -1.0254824637e-32   4.0639190697e-32    
+1.0613378626e-31    2.4206531989e-32    4.7086259993e-32    3.5427330864e-32    -2.4921984870e-32   
+5.9940807937e-32    1.2020454768e-31    1.3553675560e-31    -4.6126832915e-20   3.5208406796e-34    
+-2.1327417185e-32   -5.4436108952e-32   -3.5849380355e-32   2.4672215831e-32    1.8685282042e-32    
+3.7975990695e-32    6.7438204946e-32    2.2673969474e-32    1.8530304867e-32    -4.7777732790e-33   
+1.0954478875e-32    4.5874372337e-32    -3.8418916967e-32   -5.9437461256e-32   4.7292065544e-32    
+4.3228099455e-33    -2.0421252100e-31   -3.8041855995e-31   -4.6900983276e-31   -4.2959226281e-31   
+-2.2831871279e-31   -2.0180134699e-32   -2.7560617039e-32   -8.8547250546e-32   -9.8274713152e-32   
+5.1644639007e-32    2.0598384993e-31    1.3721216419e-31    1.3365051034e-31    5.4091548047e-32    
+-1.1758705090e-31   -1.3527400910e-32   1.2226420186e-31    -4.6327642959e-33   -7.4613986701e-32   
+-2.1441016959e-33   2.6300980803e-33    7.3080013593e-33    -1.8797151489e-31   -3.3978444739e-31   
+-8.3284056874e-32   1.2572636187e-31    6.6431793703e-32    1.8735160619e-31    1.4070686187e-31    
+-3.5130353971e-32   4.2644301940e-32    -3.9401066007e-32   -1.2210640350e-31   -1.0707925988e-31   
+-6.1343125678e-32   6.0738263305e-32    2.0387774021e-33    -1.3980370605e-31   -1.1472599169e-31   
+-6.9583058959e-32   6.8460790992e-34    2.9601768940e-32    6.1844168390e-33    5.7341844713e-20    
+4.1527864426e-34    2.6378093232e-33    2.7146020182e-32    5.9372809067e-32    6.7837873026e-32    
+2.4923113345e-32    -4.1744531545e-32   1.9785920913e-34    1.2953609204e-31    1.1930383689e-31    
+1.4453502380e-32    -3.8967355611e-32   -9.7164294169e-32   -1.2024442045e-31   -1.4350472651e-31   
+-5.0488328724e-32   8.2667157439e-32    2.5343963832e-32    6.8917070879e-32    1.4280319148e-31    
+1.3847812458e-31    1.7312379872e-31    1.1966682955e-31    -2.6903492187e-32   -1.0483980208e-31   
+-1.4299973413e-31   -1.1706945723e-31   -2.8204905493e-32   -7.0090872518e-32   -9.2271980720e-32   
+4.3704315726e-32    9.5142820044e-32    2.4826440689e-34    -3.2706954817e-32   3.3442720241e-32    
+7.2061001050e-32    4.9157857198e-32    -5.5924190760e-32   -3.8900023295e-32   5.1382456747e-32    
+5.9127271807e-32    6.7381216980e-32    3.8185698888e-32    -9.5001008405e-32   -6.0719455395e-33   
+6.3182868376e-32    -2.3317670180e-32   8.0405694387e-32    -2.8129109617e-33   7.8737432805e-33    
+9.4286683998e-32    -5.4099071211e-32   -7.8940558228e-32   -4.3696416404e-33   -3.7688041599e-32   
+-1.1642810751e-31   -1.6784178539e-31   -6.8706798450e-32   -3.2888263066e-32   -1.1215607892e-31   
+-1.1073648312e-19   -2.0986617863e-32   -4.4668785331e-33   8.2739755970e-33    -1.6991817861e-32   
+-4.8735055390e-32   -6.4989274055e-32   -8.2738251337e-32   -1.1145548429e-31   -5.1275627820e-32   
+4.1307153607e-32    5.0109913582e-33    -6.1890906045e-32   -2.5706462780e-32   1.1745238627e-31    
+1.6528691895e-31    6.6038332234e-33    -1.1220234638e-32   1.6256428595e-31    2.1180922377e-31    
+1.6644228883e-31    1.4416902187e-31    1.8190859715e-31    1.5777917759e-31    -6.2823120085e-33   
+2.6004568148e-32    1.1643450220e-31    1.2144361277e-32    -3.7584410017e-32   -3.2437437473e-32   
+-4.7822307536e-32   2.4385583288e-32    7.8226609979e-32    -4.3333423749e-32   -1.7285898336e-31   
+-2.0581119331e-32   1.8092720042e-31    1.4095249317e-31    5.1691282623e-32    5.3317038330e-32    
+1.1404589768e-31    1.9015172777e-32    -9.4428871795e-32   -1.6501119499e-32   3.6477940695e-32    
+6.1139247938e-32    -1.5917698143e-32   -8.0986106478e-32   3.0848733347e-32    -8.1756102297e-32   
+-1.1224090259e-31   1.7908515375e-32    -5.0299121153e-32   -7.5944834385e-32   -3.0865284308e-32   
+1.8894049839e-32    4.3663690642e-32    -4.3482382393e-32   -4.2623989398e-32   -2.7620731821e-32   
+-9.1645113093e-32   -3.3439455839e-20   -1.8732677975e-33   1.1405116389e-33    1.9780654698e-32    
+-2.4179448599e-33   -2.0132926845e-32   5.3899707369e-33    5.0800916182e-32    7.3189851785e-32    
+-5.2589172228e-32   -1.4723245419e-31   -7.9645196562e-32   -4.0682260810e-32   -1.0281531869e-31   
+-7.2615270146e-32   1.4460197995e-31    1.1120529207e-31    -1.0228192637e-31   -7.5406928170e-32   
+-5.9278017202e-32   -9.3550542416e-34   -2.7181190973e-32   -9.6986747502e-32   4.0382838889e-32    
+1.3482261927e-32    3.5616914593e-32    1.5815495962e-31    1.7292255409e-31    1.8533859562e-31    
+1.6342869748e-31    6.5962348279e-32    -1.5940192403e-31   -2.4911377209e-31   1.5955219923e-32    
+1.8148391455e-31    9.7140031966e-32    1.4461326470e-31    1.3620876221e-31    1.3172608503e-31    
+2.0088201636e-31    1.2570238178e-31    1.4176649950e-32    5.1783065222e-32    9.6434923434e-32    
+-4.6643239682e-32   -1.2796149384e-32   4.1794654624e-32    4.7859359118e-32    1.3653296355e-31    
+4.6565374937e-32    -1.8189223426e-32   9.3868772246e-32    1.6313679872e-31    1.4536181950e-31    
+5.3927919234e-32    1.4412877295e-32    2.7877459787e-32    -2.5316198656e-32   -8.2538981535e-32   
+-5.9582705338e-32   -1.5323180120e-32   4.4455680621e-21    3.2746827586e-32    3.0498906229e-32    
+3.2334558207e-33    -1.0831098988e-32   -2.6565455277e-32   2.3812318203e-32    3.7716441543e-32    
+1.6604657042e-32    3.7053274650e-32    3.8630694029e-32    7.8939805912e-32    1.0799313621e-31    
+5.4903179877e-32    -6.8568060729e-32   -7.4753917548e-32   7.4785514837e-32    -8.0621985348e-33   
+-7.9321230319e-32   8.5900989418e-32    1.4492397137e-31    -2.4350976734e-32   -1.4334612881e-31   
+-3.7608296062e-33   2.3425627581e-32    -8.8933576764e-32   -1.1968375667e-31   -8.4478735293e-32   
+-3.5036620051e-32   -8.0052858003e-32   -7.0110056586e-32   5.0808439345e-32    4.3805878438e-32    
+-1.4983603312e-32   1.2467217853e-31    2.5738624306e-31    5.4155494940e-32    -3.1777011832e-31   
+-2.1116486479e-31   1.2341374130e-31    1.2982385305e-31    7.8384032183e-32    2.0486327467e-32    
+5.3209833245e-32    4.3466583749e-32    -2.5104609673e-32   -3.5008196598e-32   6.2711213023e-32    
+1.4141968165e-31    5.1126669176e-32    -4.7748580530e-32   1.2953383509e-32    1.1799885008e-31    
+6.2585200029e-32    -2.4609021254e-32   4.0893661714e-32    8.5844189531e-32    5.7562735846e-32    
+1.4802577182e-32    -7.6134418114e-33   5.3120307595e-32    -1.1952209962e-19   -2.9566033912e-33   
+-1.3043661475e-32   -1.1123185824e-32   7.9651497212e-34    -3.4836010185e-33   -5.2293511888e-33   
+-4.7765789768e-32   -1.2180416039e-31   -5.6476202907e-32   3.7900194820e-32    -8.3337847496e-33   
+1.7215255827e-32    1.5187537476e-31    1.3288239532e-31    -1.3488139399e-31   -1.7212622720e-31   
+9.0071079137e-33    8.0268396647e-33    -7.5217438481e-32   -1.3812754515e-31   5.2756186465e-34    
+3.2205912105e-32    -1.3573028899e-31   -1.4129159978e-31   -1.1713716570e-31   -1.5130558914e-31   
+-1.1872455327e-31   -4.1096410979e-32   -4.1469936064e-32   -6.0384298446e-32   3.9213739227e-32    
+9.4987466710e-32    4.1652748946e-32    -7.1083177829e-32   -1.7682444302e-31   -1.4379323984e-31   
+-2.0330503936e-31   -2.8584016527e-31   -2.3721062226e-31   -1.9627407851e-31   -2.1070877298e-32   
+-5.5180714093e-32   -2.0287001241e-31   -7.3633342294e-32   -6.3498512120e-32   -1.4696549942e-31   
+7.9794437325e-33    5.2109570532e-32    -2.3350019785e-33   -8.2245484106e-32   -2.2928873073e-31   
+-1.0650091666e-31   -2.5428293797e-33   -1.1977704390e-31   -1.0072538378e-31   6.1283692684e-32    
+1.2567219509e-31    3.6953404650e-32    -7.8227362296e-32   -8.4941033711e-32   -8.4851821979e-20   
+-1.8630362946e-32   -1.6796215601e-32   -1.0236016728e-32   -4.3986058212e-33   4.8288179457e-32    
+5.1734164657e-32    5.4096814262e-32    7.3262450316e-32    3.0145317528e-32    1.2294542435e-32    
+-6.1689943531e-35   -4.4307109229e-32   -8.3108390999e-33   5.7464746637e-32    -5.7991180027e-32   
+-1.9518133896e-31   -2.1781797473e-31   -2.8293152205e-31   -2.1908130202e-31   2.1652982100e-32    
+6.5082890425e-33    -2.1017387603e-31   -2.6374632577e-31   -1.6909138290e-31   2.3591513344e-32    
+1.4669031620e-31    6.6740431500e-32    -3.4696831654e-32   3.1029289280e-32    1.2001026198e-31    
+1.3868952549e-32    -1.2410286311e-31   1.3294182831e-32    5.7509697541e-32    -2.1198695852e-31   
+-7.4849367690e-32   2.3471330802e-31    -1.6671331081e-32   -2.7283882159e-31   -3.6379989101e-31   
+-2.5405874769e-31   4.4572864992e-32    -5.5980614489e-32   -1.2775874458e-31   -7.9124499584e-32   
+-1.5356620583e-31   -3.9544006120e-32   2.3746866678e-33    -1.7396564076e-32   1.3952459667e-32    
+-2.4275745096e-32   3.4958261598e-33    4.8680959140e-32    2.5005491989e-32    -4.9589686802e-32   
+-3.8646492673e-32   7.7187661052e-34    -3.8892876289e-32   -8.6057471226e-32   -9.2953203207e-32   
+-1.6380300892e-19   4.6041762733e-34    2.3577595491e-33    -2.0047727015e-32   -3.5294547022e-32   
+-1.3552227351e-32   -4.0979801940e-32   -8.5970014446e-32   -9.7453559819e-32   -3.5643245666e-32   
+2.5528728034e-32    -7.5713120939e-33   -6.0191705451e-32   -1.1684282192e-31   -6.4917568900e-32   
+7.6649378679e-32    1.0615334649e-31    1.5278642990e-31    2.5484905605e-31    2.3289138581e-31    
+1.4077560478e-31    -2.4217816734e-32   -9.9583179424e-32   -2.9430240804e-32   -5.8304895959e-32   
+-8.7296489292e-32   -1.8106778955e-31   -2.6447494419e-31   -1.4791518131e-31   -6.2541753758e-32   
+-5.3146826748e-32   3.4744227587e-32    1.2948944842e-31    9.5427759874e-32    -7.6939396646e-33   
+6.1552551751e-32    1.8069511082e-32    4.4789720190e-32    1.9990099580e-31    4.6841851208e-32    
+-1.5024303628e-31   -3.0449779969e-31   -1.5042904651e-31   6.2986184662e-32    -2.8888949166e-34   
+-6.3947151293e-32   -1.2356128935e-31   -1.5775773657e-31   -1.3589631581e-31   -4.7111556632e-32   
+1.6359542959e-32    5.9699314378e-32    4.8223480248e-33    1.0547475711e-32    6.3976609182e-32    
+-6.2506206808e-32   -1.2157131847e-31   -6.0234963643e-32   7.8577941731e-32    1.8606288822e-32    
+-1.2129597068e-31   -5.0691662837e-20   1.3674102605e-32    2.8614071567e-32    4.1326243635e-32    
+2.1450420914e-32    -4.5424863298e-33   -2.6197537300e-33   -4.6594339117e-32   -1.0677964988e-31   
+-1.2403553079e-31   -1.2035435268e-31   -7.5990349526e-32   -5.8174369066e-32   -1.1380181803e-31   
+-6.1786522147e-32   9.4046601032e-32    1.0862080317e-31    1.1758028005e-31    2.3790312949e-31    
+9.3425158311e-32    -1.5664769374e-31   -2.5732464715e-32   1.8506400014e-31    1.3760177003e-31    
+-2.7051134278e-32   -1.1332066468e-31   -1.1447547034e-31   1.6724557465e-32    1.7517786931e-31    
+9.3342526936e-32    -1.2511623328e-31   -1.7115724369e-31   -1.5651942380e-31   -1.5554301117e-31   
+-1.3385476424e-31   -1.0072011756e-32   9.8342045469e-32    1.0000221965e-31    3.4565590061e-31    
+4.2543303466e-31    2.5705371921e-31    1.1032795011e-31    1.9719623032e-32    1.3806359826e-31    
+1.4771920289e-31    -6.5210784211e-32   -2.2475569537e-32   1.0566650375e-31    3.5492406231e-32    
+-4.6505189626e-32   -1.3838262742e-31   -7.6463556532e-32   -8.0436163201e-32   -5.7770375168e-32   
+8.8570207950e-32    7.6314880007e-32    6.4420852007e-33    -7.8908208624e-32   5.0220127933e-32    
+8.1022593823e-32    -5.0206962396e-32   1.0913758875e-20    -1.2775836842e-32   -2.6957000690e-32   
+-8.5871272921e-33   1.4547541928e-32    -8.2766087044e-33   3.3987397304e-32    1.3898104809e-31    
+1.1247581338e-31    -5.5185604150e-32   -1.3428433690e-31   -7.0037834213e-32   5.2980752906e-32    
+1.6886597011e-31    1.2522005294e-31    1.0773433937e-31    1.3738538503e-31    -9.3104794958e-32   
+-2.9594546703e-31   -1.9355859252e-31   1.9564457777e-32    1.3909784521e-31    2.0750766676e-31    
+1.7426066633e-31    -7.3090199986e-33   1.5452578538e-33    2.1928066586e-31    2.3617524683e-31    
+4.5996999908e-32    4.3280103325e-32    1.5976735583e-31    1.2867769904e-31    5.7212438529e-32    
+4.3696416404e-32    -5.9193945846e-32   -1.9786297071e-31   -1.7212096098e-31   -1.4236553142e-32   
+1.0465811768e-31    1.7696919339e-31    2.3225962813e-31    2.3575639468e-31    1.6922529522e-31    
+1.1530602762e-31    2.8828994252e-31    2.2779774692e-31    2.1775068944e-32    3.9703121035e-32    
+9.7253819819e-32    1.4668834137e-31    7.7178257098e-32    1.4497964278e-31    1.7630384008e-31    
+4.2701477986e-33    1.7114445432e-32    1.2352019407e-31    1.4768873408e-31    -4.5875359753e-32   
+-9.6039205016e-32   4.0620570866e-32    3.5610143745e-32    -8.7949021113e-20   5.1007050871e-34    
+-2.1353748258e-32   -2.0688700574e-32   -1.0403783282e-32   -5.9610447005e-32   -5.8264458953e-32   
+8.3569937101e-32    1.3818898824e-31    4.9571631209e-32    9.8621154848e-33    -1.2699288650e-32   
+2.7725491877e-32    1.4592530447e-31    1.0495716344e-31    -8.7168642526e-32   -1.9619734224e-31   
+-2.4316766910e-31   -2.8838017347e-31   -2.0928539038e-31   -9.5610008518e-33   -2.0072177297e-32   
+-9.7005931570e-32   1.8880978342e-32    1.3594357068e-32    4.1161110188e-32    1.2813941667e-31    
+2.4432603062e-32    -8.3142245236e-32   -1.9184067805e-35   1.5140592934e-31    1.4675247634e-31    
+8.6957993938e-32    1.6535237047e-31    1.6882205364e-31    1.1457026220e-32    -2.0678694767e-31   
+-2.3685853819e-31   -1.1569365864e-31   -1.1922710062e-31   -1.5649685431e-32   2.8766321595e-32    
+-3.6773224876e-32   -1.1918158548e-31   -5.9586090762e-32   7.5903456984e-32    -8.0212725235e-32   
+-2.0731197046e-31   -1.3282775246e-31   1.0659486217e-31    1.6266359171e-31    1.0373389700e-31    
+2.2435428756e-31    1.2855295558e-31    -1.5466872549e-32   -6.2761242063e-32   6.9284671472e-32    
+9.8661779932e-32    -8.0031416986e-32   -2.5440330859e-32   5.0063646125e-32    -4.9930715001e-20   
+3.5200883632e-32    5.2287869516e-32    4.8280656293e-32    5.5902373585e-32    7.3076252011e-32    
+3.1177871766e-32    -2.0424637524e-32   7.2770811559e-32    1.7945642189e-31    1.9012222286e-31    
+1.6832590098e-31    2.2048136281e-32    -1.1745556010e-31   -1.1694081113e-31   -1.9673280342e-31   
+-2.4381027072e-31   -1.4365556594e-31   -5.6396269291e-32   3.2643007925e-32    8.2113264501e-32    
+-7.5201545797e-33   -8.9448161171e-32   1.2964254481e-31    2.7564872329e-31    3.2287914591e-32    
+-1.2589111915e-31   4.5009960812e-32    1.7922057070e-31    2.3161564530e-32    -8.6554000040e-32   
+-1.0157926287e-31   -2.1014980190e-31   -1.5024472900e-31   8.0371087834e-32    1.3612534913e-31    
+-2.6176848600e-33   -1.2030404152e-31   -2.3469073853e-32   1.3679782594e-31    1.1908115124e-31    
+8.1107229416e-33    5.2767471211e-33    1.1514503192e-31    2.8400883911e-32    -2.2099293795e-34   
+1.2504589170e-31    1.0973122215e-31    1.5663979442e-32    1.2608822605e-32    -4.2102634144e-32   
+-1.8672708955e-31   -1.2749129610e-31   -9.2277435014e-32   1.5039180685e-32    2.9412937528e-32    
+-3.5978026457e-32   7.5897438453e-32    1.0083672660e-32    -6.0531376299e-33   7.8093449979e-32    
+-2.0746850524e-20   -2.3505373118e-32   -9.3527972924e-33   1.9314218540e-32    4.5397403750e-32    
+6.6459629409e-32    2.8995778092e-32    -1.0218882722e-31   -2.0645517614e-31   -9.4445046597e-32   
+4.4481270472e-32    2.8428155380e-32    -3.4511761824e-32   -9.2938815156e-32   -1.0901139643e-31   
+-4.9918449062e-32   1.0851486762e-31    2.9738991449e-31    3.4072070513e-31    2.1960566654e-31    
+1.0576928898e-31    1.3192911642e-31    2.1220136869e-31    2.7738506951e-31    2.8532351200e-31    
+4.3501190302e-32    -1.6440069024e-31   -1.0618707730e-31   -5.2234831210e-32   -5.6230383529e-32   
+-5.3748867934e-32   9.8128387616e-33    1.7866611353e-31    2.0735015052e-31    7.2084699016e-32    
+-4.9615265560e-32   -1.4366233679e-31   -1.7050724234e-31   -1.5402963273e-31   -6.0118918841e-32   
+-1.8100553537e-31   -2.3591927118e-31   3.0604230523e-32    1.4517811324e-31    4.9483610192e-32    
+5.4590709969e-32    2.4707198542e-31    1.2020323113e-31    -8.8827500154e-32   -2.0877155829e-32   
+2.4702308486e-32    2.4010765159e-33    -4.4869653806e-32   -1.2999613351e-31   -5.5423900364e-32   
+2.5258270294e-32    -4.9578402057e-32   -4.0331963493e-32   3.4603003695e-32    7.7526203425e-33    
+-5.6824713472e-32   7.5578690308e-20    -2.1062601818e-32   -4.7437309626e-33   7.8993220375e-33    
+-1.6000452945e-32   -1.9442206365e-32   -8.3300231677e-33   -5.2513611451e-32   -1.1858387011e-31   
+-6.0335021723e-32   3.4081813010e-32    -1.0538894602e-34   -6.6808516132e-32   -3.4063005100e-32   
+1.0295637801e-31    2.3201042333e-31    2.2851534948e-31    1.9867208698e-31    2.7889835391e-31    
+1.2035928976e-31    -1.6286652906e-31   -1.8886583099e-31   -1.1451477887e-31   -2.1105483851e-32   
+2.8798859279e-32    5.2086248724e-32    7.4158082972e-32    9.8106758520e-33    -6.1646309181e-32   
+3.7423790469e-32    8.8124836651e-32    -1.4569688241e-31   -2.4911847407e-31   -1.0645051146e-31   
+-1.5288949725e-32   -9.3427350608e-32   -1.6865616787e-31   -1.4541673860e-31   -2.4299969683e-31   
+-2.3160511287e-31   -2.3840661723e-31   -3.6881031814e-31   -2.9082821098e-31   -2.1538460739e-31   
+-1.7114370200e-31   -1.3202832814e-31   1.9796829501e-32    2.9886896850e-32    -8.1034442806e-32   
+3.3545787586e-33    5.2499270420e-32    9.0724842076e-32    3.1847621427e-32    -6.4526928617e-32   
+-1.2996077464e-32   6.7586223195e-32    1.0262648728e-31    -1.7337131081e-32   -3.9512408832e-32   
+5.9231373587e-32    4.2660852901e-32    1.8793308975e-19    2.9277144420e-32    1.8917559726e-32    
+-3.7916745780e-34   -8.3040682524e-33   -1.2382375373e-32   5.3760528838e-33    5.4056189177e-32    
+1.6534221420e-31    2.0876629207e-31    8.0346966689e-32    -3.5916712672e-32   -5.9999488615e-32   
+-1.1199658785e-31   -5.5266666240e-32   1.2123202378e-31    1.4679535837e-31    1.6809287098e-32    
+-2.0829007580e-32   1.1761977666e-31    1.3451290590e-31    -1.9518284359e-32   -1.1594098265e-31   
+-6.3657438956e-32   1.0677250287e-32    -5.3469758556e-32   -1.1797073226e-31   4.8627286068e-32    
+2.0817732238e-31    5.6346616410e-32    -4.0686022392e-32   -3.8253783520e-32   -1.6480487222e-31   
+-1.9975090868e-31   -2.8278068262e-32   1.7990668325e-31    1.1554977813e-31    -6.8357723647e-32   
+-2.1828582148e-31   -1.3604927114e-31   3.6608843746e-32    -1.0769653547e-31   -1.3603610560e-31   
+-1.1707133802e-31   -1.8166940756e-31   -2.2768366372e-31   -1.6193770044e-31   -9.0321600493e-32   
+-5.5908392116e-32   -3.6153316175e-32   -1.2770645859e-31   -3.0898762387e-32   7.8933787381e-32    
+2.4010929729e-32    3.1786119563e-32    6.0452383079e-32    1.2904031554e-31    1.0200319315e-31    
+-4.3094410482e-32   3.0483953941e-32    1.3078578359e-31    1.2838397665e-20    2.9024366115e-33    
+-1.3758362040e-32   -4.7446337423e-32   -7.5652935628e-32   -8.8122391622e-32   -3.2980797981e-32   
+1.0248354717e-31    1.1900027723e-31    -4.7058612366e-32   -1.3938917973e-31   -7.8843509415e-32   
+2.7721730295e-32    4.6614275502e-32    -7.2396157999e-32   -6.1194261073e-32   4.7449910926e-32    
+-1.5662850968e-32   -2.0735786176e-31   -2.0144023512e-31   1.0623459666e-32    1.5929058120e-31    
+4.8191506802e-32    -1.9449823568e-31   -1.2072468042e-31   -3.2270987472e-32   -1.3187730063e-31   
+-1.0643433666e-31   -4.1021555499e-32   -5.7637591326e-32   -5.9674487937e-32   6.8089146698e-32    
+-5.5265161607e-33   -7.8056139789e-32   1.8443938946e-31    3.5801833960e-31    1.9758837523e-31    
+7.3585194045e-32    1.6338713200e-31    2.6666606566e-31    2.9401803245e-31    6.5984917770e-32    
+1.8636381477e-32    1.6877127228e-31    4.0763228861e-32    -1.6241984120e-31   -1.5927327793e-31   
+-7.9878179542e-32   -2.9763893121e-32   -5.5746644093e-32   -4.8163294937e-32   4.4954430458e-32    
+5.5210242511e-32    -3.7535838591e-32   -9.3697620269e-32   -1.6284715691e-31   -1.4482974374e-31   
+1.1929857068e-32    -2.4401381932e-33   -4.5734441490e-32   -2.9473498997e-32   -1.8220844146e-19   
+-3.4295094705e-32   -3.0865096229e-32   -3.1257241144e-32   -7.2813693593e-32   -5.5896731212e-32   
+-1.4910158425e-32   -5.5990394602e-32   -1.1974356582e-31   -1.4405617442e-31   -4.4894856405e-32   
+1.8966347444e-31    2.8944187996e-31    2.2361889829e-31    9.3798806823e-32    -9.0852359703e-32   
+-1.3918906357e-31   -7.4900149046e-32   -1.7871633065e-31   -2.1877209999e-31   -2.1389671366e-32   
+1.2256268339e-31    5.7957701948e-32    -1.6344449612e-31   -1.3775063464e-31   5.0671047566e-32    
+6.9428504961e-32    -8.7998447498e-33   -6.7845584268e-32   4.5002813806e-32    1.6567210493e-31    
+1.5787509793e-31    9.7268678067e-32    -8.9980801171e-33   -8.0562458314e-32   1.0644374061e-31    
+2.0133213666e-31    1.7225788256e-32    1.3689901249e-32    2.5153848780e-31    3.3177321829e-31    
+6.0506173700e-32    -9.9976781953e-32   1.6686245753e-31    2.9413783884e-31    7.4300270769e-32    
+-7.5907594724e-32   -8.0937017834e-32   -9.2200134506e-33   -4.1222423974e-32   2.5082228260e-33    
+2.2308719869e-32    -1.1543166446e-32   -5.5693041551e-32   -4.8979934373e-32   -1.3689525091e-32   
+-4.9354870051e-32   -2.3288329841e-32   2.7200469080e-32    -3.8509265463e-32   -1.6653508236e-31   
+-9.3995685160e-20   1.3559750515e-32    2.8657799957e-32    4.0880872335e-32    6.1332593249e-32    
+6.8085667235e-32    2.3792005661e-32    -4.0705394538e-32   -9.1166851461e-32   -5.3422456663e-32   
+1.5342963690e-32    4.9440352000e-33    -4.0764921572e-32   -8.8130102865e-32   -1.1136718115e-31   
+-1.5054415092e-31   -1.6759201635e-31   -8.6385857328e-32   -1.6786482508e-32   6.0873680254e-32    
+9.3710879845e-32    -4.8479361858e-32   -8.7811873035e-32   -2.4965525181e-32   -6.7847653139e-33   
+4.6506882338e-32    9.5383937445e-32    3.1206835947e-32    -5.9533804773e-32   -5.0024525673e-32   
+5.5345847540e-32    3.3556235380e-31    4.1643758765e-31    1.1971723474e-31    -2.0405274781e-31   
+-8.4293759502e-32   1.3134917452e-31    3.1663868150e-32    -1.1379913791e-31   -1.0574446253e-31   
+6.3847563412e-32    1.6545543782e-31    6.8384430879e-32    -8.7626803204e-32   -4.6758720247e-32   
+6.1533743842e-32    1.1358548005e-31    7.4183849808e-32    1.3665356927e-31    1.3187692447e-31    
+5.7672574038e-32    5.1822561832e-32    9.1532453714e-32    1.1327101180e-31    5.0486447933e-32    
+-4.5090082507e-33   -2.9040917075e-32   -3.3614248377e-32   1.2119628876e-32    -2.4314865548e-33   
+-1.0516442660e-31   -3.9169728276e-20   2.4236624644e-32    2.6373156156e-32    1.7480071194e-32    
+6.4624729747e-32    5.4658794601e-32    -3.1730448150e-32   8.9427848629e-33    7.6861908058e-32    
+3.2982678772e-32    5.2118128131e-33    -1.0821883112e-32   -5.6304486693e-32   -9.5191344450e-32   
+-3.2776050375e-32   1.0723762248e-31    8.1293051563e-32    1.3385100266e-31    2.8254295064e-31    
+8.6009699136e-32    -1.5000097849e-31   -1.2983024774e-31   -5.7036796163e-32   -1.4856743962e-32   
+3.4682255524e-32    -3.9493412843e-32   -1.3642354854e-31   -7.5866123283e-32   -6.5544060369e-32   
+-8.9616680041e-32   -1.9388434551e-31   -3.0018928375e-31   -2.5208767876e-31   -1.4914672323e-31   
+-9.8467494226e-32   4.4613113919e-32    1.3218010797e-31    3.9940570894e-32    2.9134204307e-32    
+-3.4473393688e-32   9.8656513718e-32    1.7977728483e-31    -3.9353293916e-32   -9.8922833718e-32   
+1.2399979576e-31    2.2693285197e-31    1.0833017395e-31    2.0525447919e-32    6.4782716188e-32    
+1.5384545627e-31    1.0251664909e-31    2.0691051563e-32    -7.3099902957e-32   -1.1367425339e-31   
+-4.2338861488e-32   -9.2230227161e-32   -2.0400732670e-31   -1.4226678990e-31   -5.9955854265e-32   
+-2.9391120352e-32   -1.0218337293e-32   -1.3468477961e-19   -1.2905987577e-32   -4.3965369512e-32   
+-6.5114487714e-32   -7.0057441459e-32   -2.7614901369e-32   1.4873294922e-32    -4.2771443409e-32   
+-1.8524991633e-32   1.3582150735e-31    1.2448917757e-31    4.2398523704e-33    -5.4827877709e-32   
+-2.4877598204e-32   9.8643724339e-32    1.8190145014e-31    1.2202722220e-31    1.6797362883e-31    
+1.6558916205e-31    -1.7410105771e-32   6.9160445229e-33    1.6722808330e-31    2.5184580904e-31    
+1.4376201871e-31    2.9105616285e-32    -6.6365777940e-32   -2.6515127662e-31   -1.9418101678e-31   
+6.7912728506e-32    1.5558579917e-31    4.5205186913e-32    -1.7871501409e-31   -1.8663389636e-31   
+-1.1713622531e-31   -2.8636618724e-31   -1.8969657636e-31   2.0701113795e-31    1.9159561099e-31    
+3.5042521033e-32    6.8161745229e-32    1.7494967059e-31    2.0902019885e-31    1.1434588384e-31    
+1.5372908233e-31    2.0382282111e-31    1.4370898040e-31    -2.7793576510e-32   -1.0667658253e-31   
+-9.7396383774e-32   -5.9804544632e-32   -1.4760485080e-31   -2.2489332225e-31   -1.6574282267e-31   
+-2.0765060688e-31   -2.1299581479e-32   1.5705300420e-31    4.8582711322e-32    3.3713177982e-33    
+1.4134520232e-32    5.3971177426e-33    2.4320884079e-32    -4.8578864318e-20   2.8633161595e-33    
+7.6247265572e-33    -1.7430418313e-32   -8.2676561394e-32   -7.4485340599e-32   2.4224070364e-32    
+3.9258502052e-32    -7.4298766136e-32   -6.0378091836e-32   4.5552569004e-32    2.5415239932e-32    
+4.8836994260e-32    1.5197640850e-31    1.1216134514e-31    1.1070862220e-31    1.8065132365e-31    
+5.3878642511e-32    -2.0905367693e-32   9.9120316769e-32    1.1422739401e-31    -3.8630694029e-32   
+-1.0081001937e-31   -2.6211643232e-32   1.7947259669e-32    5.0901350419e-32    1.3277594255e-31    
+5.0355732961e-32    -6.8809113478e-32   4.2013014454e-32    2.6590020758e-31    3.8162226616e-31    
+2.5313048331e-31    4.0690536290e-32    -1.5123966741e-31   -1.5394650177e-31   7.5376835515e-32    
+1.6989805415e-31    9.6784750553e-32    -3.2213059111e-32   -1.9476215767e-31   -4.3501190302e-32   
+3.7847720752e-32    5.8248096072e-33    -5.7653013812e-32   -6.4095851329e-32   -1.1656390062e-32   
+-7.9651873370e-32   -1.4985808539e-31   -5.0722299119e-32   1.3744030413e-31    1.6317685957e-31    
+1.9982491780e-31    5.8492598897e-32    4.6520235954e-32    2.2426325728e-31    2.2753056734e-31    
+1.2454672977e-31    1.1996437068e-32    -1.3541130684e-32   2.7705179335e-32    -1.4238128248e-19   
+5.3083444092e-33    2.7348534349e-32    7.2440168508e-32    6.8585111274e-32    4.2189902844e-33    
+-1.4161885741e-32   4.3575669625e-32    6.6392297093e-32    -7.1263169524e-32   -1.7161013816e-31   
+-9.3890624319e-32   2.9084927584e-32    3.6781970554e-32    -1.6879158482e-31   -2.4887923746e-31   
+-2.1954755010e-31   -3.2392486569e-31   -1.9694185922e-31   6.9907871558e-32    1.0433142429e-31    
+-1.5354025092e-32   -9.6042590440e-32   -3.6009153548e-32   4.8847338610e-32    9.1433194971e-32    
+2.6825984792e-31    2.9636375494e-31    -5.5966320478e-32   -3.0170557743e-31   -1.9734650551e-31   
+5.8123963868e-32    2.7776846874e-31    3.2213341229e-31    1.8076357161e-31    8.1302831676e-32    
+-7.0424336756e-33   -7.8984944895e-32   -1.7855016277e-31   -2.2716541177e-31   -3.2986327507e-31   
+-3.5590508288e-31   -3.4681522016e-31   -3.1876924150e-31   -2.1045016422e-31   -7.5877502069e-32   
+4.4583021263e-32    1.8567920686e-32    -3.5180147912e-32   -4.5909355049e-32   2.2203865773e-32    
+9.2899036427e-32    2.1831619626e-31    1.6413737951e-31    2.1295067580e-32    3.2701688603e-32    
+3.3729352784e-32    -1.2186020797e-32   -3.4991927756e-32   -8.4986172694e-32   -9.5253598631e-32   
+-1.9851460855e-19   -1.0312752999e-32   -4.0399389849e-32   -3.3684213801e-32   2.0024405207e-32    
+6.4597975496e-32    4.6128279117e-32    -4.0647466177e-32   -1.0803714672e-31   -1.3636185859e-31   
+-1.5526380775e-31   -1.0690255957e-31   -8.5196821282e-32   -1.4514651596e-31   -2.5474335560e-31   
+-2.9390048302e-31   -2.3571812059e-31   -2.9295068358e-31   -3.6137028525e-31   -2.8230559482e-31   
+-7.1971475400e-32   1.4974660151e-31    2.0899085851e-31    1.1280344717e-31    2.2173773118e-32    
+-9.6367120920e-32   -1.5202470956e-31   5.7970867484e-32    2.2249192835e-31    5.7794449292e-32    
+-9.8049394395e-32   -5.8344204490e-32   1.3009807238e-32    1.0022471722e-31    2.9510550579e-32    
+-2.9892539223e-32   -8.8491214730e-33   -5.2063114996e-32   -2.1572559479e-31   -2.2082430154e-31   
+-9.4555637106e-32   -7.7783495629e-32   -3.8710063408e-32   -5.0992004543e-32   -1.0085177293e-31   
+-4.5719395162e-32   8.4734522864e-32    1.5403763490e-31    5.0903231210e-32    -3.7281038435e-32   
+-8.5612099926e-32   -2.0026549309e-31   -1.5610104185e-31   -8.4959089305e-32   -1.3545953738e-31   
+-1.1280513988e-31   -9.4636840255e-32   -7.6048654046e-32   4.4262534484e-33    1.2667503283e-32    
+2.5030318430e-32    -1.6792492580e-19   -1.0135206332e-32   -4.2749250076e-32   -7.8838243200e-32   
+-5.9002669406e-32   -1.3034633678e-32   -4.1731742166e-32   -8.5850960378e-32   -1.0782908422e-31   
+-4.7160081039e-32   3.4593011993e-32    1.3861429385e-33    -6.1468198277e-32   -1.4931411363e-32   
+2.2822645999e-31    2.4292013938e-31    -7.0695170654e-33   5.9836776687e-32    2.6149370244e-31    
+8.8433662526e-32    -1.7490077002e-31   -1.6067785262e-32   1.8623441636e-31    1.1160256214e-31    
+1.3198074413e-31    1.4693735809e-31    -4.5729175275e-32   -1.0018446829e-31   -1.8803771873e-32   
+4.3591844427e-32    1.2502745994e-32    -1.3461761306e-31   -2.4268899017e-31   -2.4897609819e-31   
+-2.5364346904e-31   -1.3518467153e-31   -2.9811100974e-32   3.8021693916e-32    1.5190095352e-31    
+-1.4892478990e-32   -6.1792258559e-32   -3.4755136174e-32   -2.3439921593e-32   2.0782740123e-31    
+2.4160650093e-31    3.0766354703e-32    -9.6409097823e-32   1.4379775374e-32    4.0295758267e-32    
+-2.4582972299e-32   7.5072147379e-32    1.0235866265e-31    2.3809685096e-32    -6.2846629972e-32   
+-8.8803802188e-32   2.9431745437e-32    4.9511445898e-32    3.8886951798e-32    7.1865586869e-32    
+7.5110703594e-32    1.0709543468e-31    -1.2083380624e-19   2.4537551198e-32    5.4374419008e-32    
+8.0266139698e-32    7.8722386477e-32    3.2414303744e-32    2.0073681930e-33    3.7171952559e-33    
+7.4791533368e-32    1.6178977623e-31    1.1131781039e-31    5.2887841832e-34    2.4669206565e-32    
+1.5246406233e-31    3.1299765828e-31    2.2475618908e-31    -1.0446481938e-31   -2.6339348939e-32   
+2.5577064362e-31    2.5833481998e-31    1.4114038419e-31    7.9218915291e-34    -2.1791469441e-31   
+-2.9778356404e-31   -3.0561724647e-32   2.7992846312e-31    2.2768507431e-31    6.4477275736e-33    
+-3.5105903688e-32   2.5153510238e-32    3.5323511203e-32    8.3893809304e-32    1.5421094097e-31    
+1.6628985073e-31    8.4020198457e-32    -6.1409705678e-32   -4.5941093397e-32   1.2886427351e-32    
+2.8526407900e-31    4.1076549827e-31    3.1621202407e-31    2.1262943671e-31    -7.3249178985e-32   
+-2.0503875247e-31   -1.3586683441e-31   -7.8003548171e-32   -1.2409157836e-31   2.6310196679e-32    
+1.9914002778e-31    2.7682233685e-32    -5.0177622057e-32   6.7791229410e-32    1.0692597542e-31    
+1.0741197180e-31    1.8530681025e-32    -2.8888949166e-33   3.8270522560e-32    -3.1773330184e-32   
+-5.4828065788e-32   -3.7306052955e-32   -4.8667346915e-32   -1.4572803832e-19   5.0749758667e-32    
+8.7494395520e-32    8.0822853822e-32    3.6060028943e-32    -2.1696804530e-32   1.9211903512e-32    
+1.8266918901e-31    2.1454144880e-31    7.2937825796e-32    2.3084781239e-32    1.2295858989e-32    
+4.5635888044e-32    7.9572127833e-32    -4.3924744427e-32   -3.3264045100e-32   7.8226609979e-32    
+-1.5208169753e-32   -2.2463339694e-31   -2.3599149355e-31   -5.3380232906e-32   -2.3608816621e-32   
+-2.0059237456e-31   -2.7784567521e-31   -1.5879330007e-31   -6.9217762334e-32   -9.3634049535e-32   
+-8.8170351792e-32   4.4305604597e-32    -5.1546250130e-33   -9.8646733605e-32   1.5200505530e-31    
+1.2085210401e-31    -1.7351274629e-31   -1.4927837860e-31   -1.1835178051e-31   2.0401127636e-32    
+1.5229516730e-32    -3.7931321910e-32   1.0840502943e-31    2.3081668530e-31    3.4942688649e-31    
+2.7005656753e-31    2.4535294249e-32    -4.6847493581e-32   1.4031076730e-32    -2.1294691422e-32   
+-4.6039505784e-32   -1.3940422605e-33   -4.2783856630e-32   -1.5699112617e-31   -1.5814818877e-31   
+-1.4316656029e-31   -9.9890688746e-33   -3.4042316400e-33   -1.5843632595e-31   -8.4577100660e-32   
+-9.7048061288e-32   -1.5108017634e-31   -1.3963104944e-31   -2.0115548337e-31   -6.1785139837e-20   
+-1.0547475711e-32   -5.0751263300e-33   2.2223708118e-32    1.1688175429e-32    -5.8373732908e-32   
+-9.0873800720e-32   1.3301470896e-32    1.0507969697e-31    6.1731902802e-32    3.9940853013e-32    
+9.4509745806e-33    -6.2641623758e-32   -9.9677783210e-32   -2.2699576443e-31   -1.8116342777e-31   
+9.3119747246e-32    4.2054485895e-32    -7.8588098002e-32   -7.2896448395e-32   -1.9464926320e-31   
+-4.5761901038e-32   2.1170954185e-31    1.2372143870e-31    -2.3263456381e-32   -4.4966890699e-32   
+-9.7540828519e-32   -7.7889572239e-32   -5.4503582327e-32   -6.4901582177e-32   -7.7673281279e-32   
+6.4563792120e-33    2.6882412047e-31    2.1048796812e-31    -7.0600754948e-32   -1.3751064571e-31   
+3.1756026907e-32    1.8523534020e-32    -1.3172721351e-31   -1.8989217862e-31   -2.6756132216e-32   
+5.7379734885e-32    1.1196160514e-32    1.1948476898e-31    1.1389618672e-31    -1.5811057295e-32   
+-5.1313713837e-32   -4.5352923043e-32   -4.2514903522e-32   7.9314835630e-32    1.4573572074e-31    
+1.8697920958e-31    5.9488853869e-32    -9.9978709763e-32   -1.7083412381e-32   3.6837924085e-32    
+7.4715549413e-32    8.7109209532e-32    1.0761744821e-32    1.9229206788e-33    1.7754666675e-32    
+3.2999555759e-19    3.6180630992e-20    -1.1254084979e-20   1.5436323674e-20    -2.1123613201e-21   
+6.1062704540e-21    -1.2267484108e-21   -1.0713065902e-20   3.7392377430e-23    6.3770255169e-22    
+-3.4852425754e-21   -4.5771441059e-21   -1.1072481618e-20   -4.8837219111e-21   6.7247103422e-21    
+6.9777792585e-21    6.3863920080e-21    4.7710383349e-21    6.8639237790e-21    7.4732339161e-22    
+-1.1573880520e-21   -7.0160740079e-21   -1.0320012538e-20   6.6808118315e-22    2.3717389055e-21    
+-2.2087000695e-21   1.5444437107e-21    -2.4747000598e-21   -6.4869561645e-21   -1.0077176017e-20   
+-3.8952021537e-21   1.9641956583e-20    1.4291227797e-20    4.8793695825e-21    1.0971819543e-20    
+-1.5722298394e-21   -2.1730368773e-21   -3.0979489452e-21   -1.3554087171e-20   -1.5693034603e-21   
+9.6686823469e-21    7.3590879931e-21    3.0981228480e-21    -1.2315010933e-21   -8.7267118316e-22   
+7.4673164419e-21    3.5467324600e-21    2.1290998881e-22    -7.6293116846e-21   -1.0225346286e-20   
+-1.8517042960e-21   -1.0008985044e-20   -1.0769650085e-20   1.2969104279e-21    3.8515520743e-21    
+6.1423490811e-21    -1.7381040041e-21   -1.1724340552e-20   -4.9889531961e-21   -1.5809945337e-20   
+-2.3355436282e-20   
+3.0017727763e-02    3.0044366287e-02    3.0077779504e-02    3.0078055339e-02    3.0048792459e-02    
+2.9999072716e-02    2.9943852448e-02    2.9880577779e-02    2.9807148969e-02    2.9732594692e-02    
+2.9645891557e-02    2.9531614197e-02    2.9407589963e-02    2.9285123665e-02    2.9156863472e-02    
+2.9026260165e-02    2.8896536119e-02    2.8755949164e-02    2.8601044839e-02    2.8447720916e-02    
+2.8299093675e-02    2.8149024040e-02    2.8005266973e-02    2.7857742601e-02    2.7682666616e-02    
+2.7491644176e-02    2.7307437112e-02    2.7127351128e-02    2.6949015188e-02    2.6784977091e-02    
+2.6627355496e-02    2.6462379414e-02    2.6307692804e-02    2.6163429994e-02    2.6008302541e-02    
+2.5853561700e-02    2.5718080198e-02    2.5593800458e-02    2.5477865246e-02    2.5388567129e-02    
+2.5318976151e-02    2.5253888535e-02    2.5214886789e-02    2.5206004546e-02    2.5207986100e-02    
+2.5233645593e-02    2.5301997757e-02    2.5403908437e-02    2.5539412058e-02    2.5735317272e-02    
+2.5987230106e-02    2.6282699669e-02    2.6658619729e-02    2.7135085470e-02    2.7707636967e-02    
+2.8411471093e-02    2.9304156948e-02    3.0439689972e-02    3.1884614494e-02    3.3731693405e-02    
+3.4769120967e-02    1.8783025138e-02    1.8796885277e-02    1.8814347108e-02    1.8814696632e-02    
+1.8799870643e-02    1.8774561973e-02    1.8746487065e-02    1.8714329035e-02    1.8677004814e-02    
+1.8639170531e-02    1.8595139668e-02    1.8536956508e-02    1.8473815001e-02    1.8411543699e-02    
+1.8346349971e-02    1.8280012218e-02    1.8214190482e-02    1.8142828447e-02    1.8064144489e-02    
+1.7986334905e-02    1.7911004382e-02    1.7834986772e-02    1.7762279820e-02    1.7687684100e-02    
+1.7598936757e-02    1.7502022778e-02    1.7408676436e-02    1.7317507400e-02    1.7227294406e-02    
+1.7144507335e-02    1.7065081722e-02    1.6981921441e-02    1.6904127361e-02    1.6831767856e-02    
+1.6753871250e-02    1.6676247106e-02    1.6608631917e-02    1.6546876554e-02    1.6489521432e-02    
+1.6446018186e-02    1.6412801711e-02    1.6382052201e-02    1.6364939955e-02    1.6363569380e-02    
+1.6368038637e-02    1.6385024023e-02    1.6424410417e-02    1.6481549918e-02    1.6556575341e-02    
+1.6663508123e-02    1.6800220274e-02    1.6960506793e-02    1.7163845575e-02    1.7421064409e-02    
+1.7730458374e-02    1.8111258818e-02    1.8594798934e-02    1.9211331231e-02    1.9998950138e-02    
+2.1011643705e-02    2.1582098550e-02    7.3490721655e-03    7.3496279989e-03    7.3504047505e-03    
+7.3506239925e-03    7.3504280350e-03    7.3499725645e-03    7.3495015666e-03    7.3489741631e-03    
+7.3483563752e-03    7.3477933726e-03    7.3471061613e-03    7.3460459367e-03    7.3448996505e-03    
+7.3438476210e-03    7.3427703611e-03    7.3417221493e-03    7.3407530022e-03    7.3396732721e-03    
+7.3384272922e-03    7.3372683893e-03    7.3362442146e-03    7.3352558911e-03    7.3344266099e-03    
+7.3335930470e-03    7.3323756241e-03    7.3309612066e-03    7.3297116827e-03    7.3285828682e-03    
+7.3275382750e-03    7.3267787770e-03    7.3261776241e-03    7.3255192425e-03    7.3250896044e-03    
+7.3248900347e-03    7.3245852307e-03    7.3243640870e-03    7.3245345613e-03    7.3249736838e-03    
+7.3256504051e-03    7.3268787371e-03    7.3285566199e-03    7.3304617022e-03    7.3329846632e-03    
+7.3362167984e-03    7.3398789079e-03    7.3442507452e-03    7.3497238966e-03    7.3562196388e-03    
+7.3638637188e-03    7.3733007187e-03    7.3846116412e-03    7.3978340586e-03    7.4140562104e-03    
+7.4341143245e-03    7.4585993993e-03    7.4892788020e-03    7.5289147007e-03    7.5810851370e-03    
+7.6511503009e-03    7.7476622668e-03    7.8038459579e-03    7.1463984864e-03    7.1464138776e-03    
+7.1464359305e-03    7.1464437701e-03    7.1464423816e-03    7.1464356296e-03    7.1464293480e-03    
+7.1464225840e-03    7.1464145432e-03    7.1464086743e-03    7.1464007178e-03    7.1463847796e-03    
+7.1463676783e-03    7.1463536766e-03    7.1463399412e-03    7.1463277702e-03    7.1463183487e-03    
+7.1463071676e-03    7.1462929260e-03    7.1462816665e-03    7.1462745199e-03    7.1462691710e-03    
+7.1462686130e-03    7.1462689258e-03    7.1462610423e-03    7.1462495161e-03    7.1462430688e-03    
+7.1462406790e-03    7.1462415925e-03    7.1462508146e-03    7.1462653276e-03    7.1462800840e-03    
+7.1463023361e-03    7.1463322056e-03    7.1463616730e-03    7.1463958244e-03    7.1464426857e-03    
+7.1464995812e-03    7.1465664518e-03    7.1466522022e-03    7.1467548790e-03    7.1468699856e-03    
+7.1470095170e-03    7.1471773349e-03    7.1473681793e-03    7.1475929970e-03    7.1478664075e-03    
+7.1481907778e-03    7.1485768673e-03    7.1490534145e-03    7.1496333204e-03    7.1503351482e-03    
+7.1512193603e-03    7.1523457234e-03    7.1537855848e-03    7.1556835261e-03    7.1582700031e-03    
+7.1618969485e-03    7.1671548512e-03    7.1750915659e-03    7.1798980124e-03    7.1429172088e-03    
+7.1429175799e-03    7.1429181161e-03    7.1429183251e-03    7.1429183464e-03    7.1429182655e-03    
+7.1429182073e-03    7.1429181521e-03    7.1429180833e-03    7.1429180745e-03    7.1429180350e-03    
+7.1429178394e-03    7.1429176334e-03    7.1429175077e-03    7.1429174021e-03    7.1429173451e-03    
+7.1429173622e-03    7.1429173570e-03    7.1429173025e-03    7.1429173294e-03    7.1429174625e-03    
+7.1429176535e-03    7.1429179693e-03    7.1429183249e-03    7.1429185233e-03    7.1429186661e-03    
+7.1429189461e-03    7.1429193427e-03    7.1429198438e-03    7.1429205662e-03    7.1429214451e-03    
+7.1429223739e-03    7.1429235260e-03    7.1429249085e-03    7.1429263458e-03    7.1429279699e-03    
+7.1429299821e-03    7.1429323350e-03    7.1429350541e-03    7.1429383889e-03    7.1429423195e-03    
+7.1429467841e-03    7.1429521543e-03    7.1429585916e-03    7.1429660550e-03    7.1429749783e-03    
+7.1429859293e-03    7.1429991899e-03    7.1430154078e-03    7.1430359074e-03    7.1430616343e-03    
+7.1430941131e-03    7.1431367524e-03    7.1431935172e-03    7.1432701611e-03    7.1433775034e-03    
+7.1435337106e-03    7.1437697553e-03    7.1441428109e-03    7.1447651989e-03    7.1451574545e-03    
+7.1428581476e-03    7.1428581559e-03    7.1428581678e-03    7.1428581727e-03    7.1428581740e-03    
+7.1428581734e-03    7.1428581735e-03    7.1428581738e-03    7.1428581741e-03    7.1428581758e-03    
+7.1428581772e-03    7.1428581756e-03    7.1428581741e-03    7.1428581745e-03    7.1428581755e-03    
+7.1428581778e-03    7.1428581818e-03    7.1428581857e-03    7.1428581888e-03    7.1428581940e-03    
+7.1428582017e-03    7.1428582109e-03    7.1428582232e-03    7.1428582367e-03    7.1428582474e-03    
+7.1428582575e-03    7.1428582710e-03    7.1428582876e-03    7.1428583071e-03    7.1428583322e-03    
+7.1428583616e-03    7.1428583932e-03    7.1428584310e-03    7.1428584754e-03    7.1428585226e-03    
+7.1428585761e-03    7.1428586409e-03    7.1428587165e-03    7.1428588041e-03    7.1428589110e-03    
+7.1428590374e-03    7.1428591838e-03    7.1428593615e-03    7.1428595771e-03    7.1428598330e-03    
+7.1428601461e-03    7.1428605384e-03    7.1428610267e-03    7.1428616434e-03    7.1428624489e-03    
+7.1428634973e-03    7.1428648816e-03    7.1428667864e-03    7.1428694511e-03    7.1428732639e-03    
+7.1428789604e-03    7.1428878580e-03    7.1429024188e-03    7.1429276197e-03    7.1429742770e-03    
+7.1430048347e-03    7.1428571594e-03    7.1428571595e-03    7.1428571598e-03    7.1428571599e-03    
+7.1428571599e-03    7.1428571599e-03    7.1428571600e-03    7.1428571600e-03    7.1428571600e-03    
+7.1428571601e-03    7.1428571601e-03    7.1428571602e-03    7.1428571602e-03    7.1428571602e-03    
+7.1428571603e-03    7.1428571604e-03    7.1428571605e-03    7.1428571607e-03    7.1428571608e-03    
+7.1428571610e-03    7.1428571612e-03    7.1428571615e-03    7.1428571618e-03    7.1428571622e-03    
+7.1428571625e-03    7.1428571629e-03    7.1428571633e-03    7.1428571637e-03    7.1428571643e-03    
+7.1428571650e-03    7.1428571658e-03    7.1428571667e-03    7.1428571677e-03    7.1428571689e-03    
+7.1428571702e-03    7.1428571718e-03    7.1428571736e-03    7.1428571757e-03    7.1428571782e-03    
+7.1428571813e-03    7.1428571850e-03    7.1428571893e-03    7.1428571947e-03    7.1428572013e-03    
+7.1428572093e-03    7.1428572195e-03    7.1428572325e-03    7.1428572492e-03    7.1428572711e-03    
+7.1428573007e-03    7.1428573408e-03    7.1428573962e-03    7.1428574763e-03    7.1428575945e-03    
+7.1428577739e-03    7.1428580603e-03    7.1428585418e-03    7.1428593972e-03    7.1428610223e-03    
+7.1428643688e-03    7.1428666415e-03    7.1428571431e-03    7.1428571431e-03    7.1428571431e-03    
+7.1428571431e-03    7.1428571431e-03    7.1428571431e-03    7.1428571431e-03    7.1428571431e-03    
+7.1428571431e-03    7.1428571431e-03    7.1428571431e-03    7.1428571431e-03    7.1428571431e-03    
+7.1428571431e-03    7.1428571431e-03    7.1428571431e-03    7.1428571432e-03    7.1428571432e-03    
+7.1428571432e-03    7.1428571432e-03    7.1428571432e-03    7.1428571432e-03    7.1428571432e-03    
+7.1428571432e-03    7.1428571432e-03    7.1428571432e-03    7.1428571432e-03    7.1428571432e-03    
+7.1428571432e-03    7.1428571433e-03    7.1428571433e-03    7.1428571433e-03    7.1428571433e-03    
+7.1428571434e-03    7.1428571434e-03    7.1428571434e-03    7.1428571435e-03    7.1428571435e-03    
+7.1428571436e-03    7.1428571437e-03    7.1428571438e-03    7.1428571439e-03    7.1428571441e-03    
+7.1428571442e-03    7.1428571445e-03    7.1428571448e-03    7.1428571452e-03    7.1428571457e-03    
+7.1428571465e-03    7.1428571475e-03    7.1428571490e-03    7.1428571511e-03    7.1428571543e-03    
+7.1428571593e-03    7.1428571673e-03    7.1428571811e-03    7.1428572060e-03    7.1428572542e-03    
+7.1428573547e-03    7.1428575853e-03    7.1428577473e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571430e-03    7.1428571430e-03    7.1428571430e-03    7.1428571431e-03    
+7.1428571432e-03    7.1428571434e-03    7.1428571438e-03    7.1428571444e-03    7.1428571457e-03    
+7.1428571483e-03    7.1428571543e-03    7.1428571696e-03    7.1428571807e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571430e-03    7.1428571431e-03    7.1428571435e-03    7.1428571444e-03    7.1428571452e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571430e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    6.1111828241e+00    6.1088500746e+00    6.1058828357e+00    6.1058174179e+00    
+6.1084479097e+00    6.1129509058e+00    6.1179442580e+00    6.1236720189e+00    6.1303377738e+00    
+6.1370998352e+00    6.1450007106e+00    6.1555160453e+00    6.1669805828e+00    6.1783245208e+00    
+6.1902542067e+00    6.2024444940e+00    6.2145856226e+00    6.2278255647e+00    6.2425230422e+00    
+6.2571290963e+00    6.2713304718e+00    6.2857349150e+00    6.2995628993e+00    6.3138259832e+00    
+6.3309618011e+00    6.3498357825e+00    6.3681224146e+00    6.3860874535e+00    6.4039713457e+00    
+6.4204374442e+00    6.4362947875e+00    6.4530098305e+00    6.4686857709e+00    6.4832824392e+00    
+6.4991099762e+00    6.5149457155e+00    6.5286858991e+00    6.5411859717e+00    6.5527391979e+00    
+6.5612606214e+00    6.5674864770e+00    6.5731060963e+00    6.5756499601e+00    6.5746264592e+00    
+6.5721944705e+00    6.5668770023e+00    6.5565053840e+00    6.5421138534e+00    6.5237054245e+00    
+6.4983268945e+00    6.4665647503e+00    6.4298729888e+00    6.3844007013e+00    6.3283266875e+00    
+6.2625242720e+00    6.1839337870e+00    6.0878063720e+00    5.9705674633e+00    5.8284903404e+00    
+5.6569084299e+00    5.5652473532e+00    9.8576744177e+00    9.8572991103e+00    9.8567749121e+00    
+9.8566299167e+00    9.8567714287e+00    9.8570929334e+00    9.8574267260e+00    9.8578009746e+00    
+9.8582390764e+00    9.8586411218e+00    9.8591302485e+00    9.8598777130e+00    9.8606860349e+00    
+9.8614310079e+00    9.8621948350e+00    9.8629400923e+00    9.8636322488e+00    9.8644018431e+00    
+9.8652872059e+00    9.8661137699e+00    9.8668485680e+00    9.8675596463e+00    9.8681620267e+00    
+9.8687681117e+00    9.8696394696e+00    9.8706473437e+00    9.8715421404e+00    9.8723541510e+00    
+9.8731084517e+00    9.8736664044e+00    9.8741152057e+00    9.8746034792e+00    9.8749339481e+00    
+9.8751054494e+00    9.8753491550e+00    9.8755347933e+00    9.8754498043e+00    9.8751788272e+00    
+9.8747432940e+00    9.8739267040e+00    9.8727992392e+00    9.8715142915e+00    9.8698028910e+00    
+9.8676021282e+00    9.8651045765e+00    9.8621183042e+00    9.8583746548e+00    9.8539288055e+00    
+9.8486963194e+00    9.8422379998e+00    9.8345021257e+00    9.8254691853e+00    9.8144061197e+00    
+9.8007588314e+00    9.7841514360e+00    9.7634306594e+00    9.7368135178e+00    9.7020499017e+00    
+9.6558563497e+00    9.5931573242e+00    9.5571671239e+00    9.9975823800e+00    9.9975718935e+00    
+9.9975568924e+00    9.9975517367e+00    9.9975531912e+00    9.9975585532e+00    9.9975637026e+00    
+9.9975693185e+00    9.9975759659e+00    9.9975812076e+00    9.9975880577e+00    9.9976006860e+00    
+9.9976142724e+00    9.9976258052e+00    9.9976372908e+00    9.9976478179e+00    9.9976565543e+00    
+9.9976666874e+00    9.9976791412e+00    9.9976896608e+00    9.9976974569e+00    9.9977041742e+00    
+9.9977077189e+00    9.9977108602e+00    9.9977199902e+00    9.9977319207e+00    9.9977405359e+00    
+9.9977465752e+00    9.9977506001e+00    9.9977491356e+00    9.9977443279e+00    9.9977397607e+00    
+9.9977304125e+00    9.9977162421e+00    9.9977029239e+00    9.9976869921e+00    9.9976629313e+00    
+9.9976327120e+00    9.9975965236e+00    9.9975483363e+00    9.9974896730e+00    9.9974239163e+00    
+9.9973430476e+00    9.9972446902e+00    9.9971329440e+00    9.9970008252e+00    9.9968388858e+00    
+9.9966463484e+00    9.9964170343e+00    9.9961326963e+00    9.9957863089e+00    9.9953681163e+00    
+9.9948406559e+00    9.9941681213e+00    9.9933099657e+00    9.9921800153e+00    9.9906400110e+00    
+9.9884811690e+00    9.9853552011e+00    9.9806470975e+00    9.9778010148e+00    9.9999612476e+00    
+9.9999610087e+00    9.9999606644e+00    9.9999605360e+00    9.9999605393e+00    9.9999606167e+00    
+9.9999606832e+00    9.9999607525e+00    9.9999608360e+00    9.9999608836e+00    9.9999609575e+00    
+9.9999611432e+00    9.9999613415e+00    9.9999614907e+00    9.9999616319e+00    9.9999617463e+00    
+9.9999618167e+00    9.9999619090e+00    9.9999620417e+00    9.9999621270e+00    9.9999621483e+00    
+9.9999621393e+00    9.9999620557e+00    9.9999619553e+00    9.9999619714e+00    9.9999620365e+00    
+9.9999620223e+00    9.9999619439e+00    9.9999618113e+00    9.9999615491e+00    9.9999612022e+00    
+9.9999608442e+00    9.9999603640e+00    9.9999597597e+00    9.9999591510e+00    9.9999584569e+00    
+9.9999575514e+00    9.9999564724e+00    9.9999552133e+00    9.9999536243e+00    9.9999517301e+00    
+9.9999495884e+00    9.9999469838e+00    9.9999438366e+00    9.9999402069e+00    9.9999358661e+00    
+9.9999305111e+00    9.9999240361e+00    9.9999161418e+00    9.9999061445e+00    9.9998936311e+00    
+9.9998779431e+00    9.9998573953e+00    9.9998301159e+00    9.9997935100e+00    9.9997425008e+00    
+9.9996685267e+00    9.9995571542e+00    9.9993818957e+00    9.9990909983e+00    9.9989080412e+00    
+9.9999993995e+00    9.9999993945e+00    9.9999993874e+00    9.9999993847e+00    9.9999993843e+00    
+9.9999993853e+00    9.9999993860e+00    9.9999993866e+00    9.9999993874e+00    9.9999993875e+00    
+9.9999993879e+00    9.9999993903e+00    9.9999993928e+00    9.9999993943e+00    9.9999993956e+00    
+9.9999993962e+00    9.9999993959e+00    9.9999993959e+00    9.9999993965e+00    9.9999993961e+00    
+9.9999993944e+00    9.9999993919e+00    9.9999993879e+00    9.9999993833e+00    9.9999993809e+00    
+9.9999993791e+00    9.9999993757e+00    9.9999993708e+00    9.9999993646e+00    9.9999993556e+00    
+9.9999993445e+00    9.9999993329e+00    9.9999993184e+00    9.9999993009e+00    9.9999992827e+00    
+9.9999992621e+00    9.9999992364e+00    9.9999992060e+00    9.9999991706e+00    9.9999991267e+00    
+9.9999990744e+00    9.9999990144e+00    9.9999989410e+00    9.9999988517e+00    9.9999987467e+00    
+9.9999986187e+00    9.9999984581e+00    9.9999982594e+00    9.9999980101e+00    9.9999976852e+00    
+9.9999972652e+00    9.9999967164e+00    9.9999959660e+00    9.9999949234e+00    9.9999934465e+00    
+9.9999912596e+00    9.9999878693e+00    9.9999823634e+00    9.9999729113e+00    9.9999555672e+00    
+9.9999442438e+00    9.9999999910e+00    9.9999999909e+00    9.9999999907e+00    9.9999999907e+00    
+9.9999999907e+00    9.9999999907e+00    9.9999999907e+00    9.9999999907e+00    9.9999999907e+00    
+9.9999999907e+00    9.9999999907e+00    9.9999999907e+00    9.9999999907e+00    9.9999999907e+00    
+9.9999999907e+00    9.9999999907e+00    9.9999999907e+00    9.9999999907e+00    9.9999999906e+00    
+9.9999999906e+00    9.9999999905e+00    9.9999999905e+00    9.9999999903e+00    9.9999999902e+00    
+9.9999999901e+00    9.9999999900e+00    9.9999999899e+00    9.9999999898e+00    9.9999999896e+00    
+9.9999999894e+00    9.9999999891e+00    9.9999999888e+00    9.9999999884e+00    9.9999999880e+00    
+9.9999999875e+00    9.9999999870e+00    9.9999999863e+00    9.9999999856e+00    9.9999999847e+00    
+9.9999999836e+00    9.9999999822e+00    9.9999999807e+00    9.9999999787e+00    9.9999999764e+00    
+9.9999999735e+00    9.9999999699e+00    9.9999999654e+00    9.9999999595e+00    9.9999999520e+00    
+9.9999999418e+00    9.9999999282e+00    9.9999999096e+00    9.9999998830e+00    9.9999998441e+00    
+9.9999997858e+00    9.9999996937e+00    9.9999995405e+00    9.9999992713e+00    9.9999987653e+00    
+9.9999977356e+00    9.9999970388e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    
+9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    
+9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    
+9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    
+9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    
+9.9999999998e+00    9.9999999998e+00    9.9999999998e+00    9.9999999998e+00    9.9999999998e+00    
+9.9999999998e+00    9.9999999998e+00    9.9999999998e+00    9.9999999998e+00    9.9999999998e+00    
+9.9999999998e+00    9.9999999998e+00    9.9999999998e+00    9.9999999998e+00    9.9999999997e+00    
+9.9999999997e+00    9.9999999997e+00    9.9999999997e+00    9.9999999996e+00    9.9999999996e+00    
+9.9999999995e+00    9.9999999994e+00    9.9999999993e+00    9.9999999992e+00    9.9999999990e+00    
+9.9999999988e+00    9.9999999985e+00    9.9999999981e+00    9.9999999975e+00    9.9999999965e+00    
+9.9999999951e+00    9.9999999928e+00    9.9999999889e+00    9.9999999820e+00    9.9999999689e+00    
+9.9999999417e+00    9.9999998802e+00    9.9999998372e+00    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    9.9999999999e+00    9.9999999999e+00    
+9.9999999999e+00    9.9999999998e+00    9.9999999998e+00    9.9999999996e+00    9.9999999993e+00    
+9.9999999986e+00    9.9999999972e+00    9.9999999935e+00    9.9999999908e+00    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    9.9999999999e+00    9.9999999999e+00    9.9999999996e+00    9.9999999995e+00    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    
+4.5749741240e-02    4.5803018289e-02    4.5869844722e-02    4.5870396392e-02    4.5811870631e-02    
+4.5712431146e-02    4.5601990609e-02    4.5475441272e-02    4.5328583652e-02    4.5179475099e-02    
+4.5006068827e-02    4.4777514107e-02    4.4529465640e-02    4.4284533044e-02    4.4028012658e-02    
+4.3766806045e-02    4.3507357953e-02    4.3226184043e-02    4.2916375393e-02    4.2609727546e-02    
+4.2312473063e-02    4.2012333794e-02    4.1724819661e-02    4.1429770916e-02    4.1079618946e-02    
+4.0697574066e-02    4.0329159938e-02    3.9968987970e-02    3.9612316090e-02    3.9284239896e-02    
+3.8968996707e-02    3.8639044543e-02    3.8329671323e-02    3.8041145702e-02    3.7730890796e-02    
+3.7421409114e-02    3.7150446110e-02    3.6901886629e-02    3.6670016206e-02    3.6491419972e-02    
+3.6352238016e-02    3.6222062785e-02    3.6144059292e-02    3.6126294807e-02    3.6130257914e-02    
+3.6181576900e-02    3.6318281228e-02    3.6522102588e-02    3.6793109831e-02    3.7184920258e-02    
+3.7688745926e-02    3.8279685053e-02    3.9031525173e-02    3.9984456654e-02    4.1129559649e-02    
+4.2537227901e-02    4.4322599611e-02    4.6593665659e-02    4.9483514702e-02    5.3177672524e-02    
+5.5252527648e-02    2.3280335989e-02    2.3308056268e-02    2.3342979931e-02    2.3343678979e-02    
+2.3314027001e-02    2.3263409661e-02    2.3207259843e-02    2.3142943785e-02    2.3068295342e-02    
+2.2992626777e-02    2.2904565050e-02    2.2788198730e-02    2.2661915717e-02    2.2537373112e-02    
+2.2406985656e-02    2.2274310150e-02    2.2142666679e-02    2.1999942608e-02    2.1842574692e-02    
+2.1686955525e-02    2.1536294479e-02    2.1384259259e-02    2.1238845354e-02    2.1089653915e-02    
+2.0912159227e-02    2.0718331270e-02    2.0531638587e-02    2.0349300515e-02    2.0168874525e-02    
+2.0003300384e-02    1.9844449159e-02    1.9678128596e-02    1.9522540437e-02    1.9377821426e-02    
+1.9222028213e-02    1.9066779927e-02    1.8931549549e-02    1.8808038821e-02    1.8693328579e-02    
+1.8606322087e-02    1.8539889137e-02    1.8478390117e-02    1.8444165625e-02    1.8441424473e-02    
+1.8450362988e-02    1.8484333760e-02    1.8563106549e-02    1.8677385549e-02    1.8827436397e-02    
+1.9041301961e-02    1.9314726263e-02    1.9635299301e-02    2.0041976864e-02    2.0556414533e-02    
+2.1175202463e-02    2.1936803350e-02    2.2903883583e-02    2.4136948176e-02    2.5712185990e-02    
+2.7737573125e-02    2.8878482814e-02    4.1243004523e-04    4.1354171210e-04    4.1509521521e-04    
+4.1553369927e-04    4.1514178435e-04    4.1423084326e-04    4.1328884756e-04    4.1223404048e-04    
+4.1099846465e-04    4.0987245958e-04    4.0849803691e-04    4.0637758775e-04    4.0408501522e-04    
+4.0198095637e-04    3.9982643657e-04    3.9773001281e-04    3.9579171871e-04    3.9363225841e-04    
+3.9114029873e-04    3.8882249282e-04    3.8677414340e-04    3.8479749657e-04    3.8313893411e-04    
+3.8147180821e-04    3.7903696258e-04    3.7620812744e-04    3.7370907976e-04    3.7145145072e-04    
+3.6936226425e-04    3.6784326837e-04    3.6664096243e-04    3.6532419926e-04    3.6446492300e-04    
+3.6406578364e-04    3.6345617561e-04    3.6301388822e-04    3.6335483680e-04    3.6423308180e-04    
+3.6558652456e-04    3.6804318848e-04    3.7139895417e-04    3.7520911876e-04    3.8025504060e-04    
+3.8671931115e-04    3.9404353009e-04    4.0278720464e-04    4.1373350745e-04    4.2672499184e-04    
+4.4201315182e-04    4.6088715160e-04    4.8350899668e-04    5.0995383143e-04    5.4239813509e-04    
+5.8251436327e-04    6.3148451283e-04    6.9284331835e-04    7.7211511564e-04    8.7645598823e-04    
+1.0165863160e-03    1.2096102479e-03    1.3219776300e-03    7.0826869884e-06    7.1134695273e-06    
+7.1575753554e-06    7.1732544726e-06    7.1704774394e-06    7.1569733895e-06    7.1444103674e-06    
+7.1308822314e-06    7.1148006677e-06    7.1030629398e-06    7.0871498216e-06    7.0552734531e-06    
+7.0210709762e-06    6.9930673938e-06    6.9655967362e-06    6.9412546508e-06    6.9224116044e-06    
+6.9000494105e-06    6.8715662128e-06    6.8490472485e-06    6.8347541432e-06    6.8240562954e-06    
+6.8229402919e-06    6.8235659031e-06    6.8077989078e-06    6.7847465784e-06    6.7718518367e-06    
+6.7670722726e-06    6.7688992994e-06    6.7873433926e-06    6.8163694160e-06    6.8458823535e-06    
+6.8903864141e-06    6.9501254624e-06    7.0090602776e-06    7.0773630068e-06    7.1710856122e-06    
+7.2848766027e-06    7.4186178144e-06    7.5901186054e-06    7.7954722793e-06    8.0256853993e-06    
+8.3047482154e-06    8.6403841850e-06    9.0220728579e-06    9.4717083420e-06    1.0018529244e-05    
+1.0667269860e-05    1.1439448789e-05    1.2392543229e-05    1.3552355025e-05    1.4956010749e-05    
+1.6724434787e-05    1.8977161170e-05    2.1856883841e-05    2.5652766479e-05    3.0825720496e-05    
+3.8079611270e-05    4.8595416601e-05    6.4468846174e-05    7.4081739015e-05    1.2013190886e-07    
+1.2087403433e-07    1.2194643929e-07    1.2236457087e-07    1.2240709629e-07    1.2224531224e-07    
+1.2212898425e-07    1.2201849477e-07    1.2188087019e-07    1.2186331303e-07    1.2178418757e-07    
+1.2139311719e-07    1.2098118542e-07    1.2072970329e-07    1.2051857611e-07    1.2040443621e-07    
+1.2043863936e-07    1.2042837027e-07    1.2031938396e-07    1.2037314973e-07    1.2063929677e-07    
+1.2102123076e-07    1.2165286453e-07    1.2236403698e-07    1.2276087639e-07    1.2304656961e-07    
+1.2360649714e-07    1.2439975205e-07    1.2540193252e-07    1.2684663092e-07    1.2860454007e-07    
+1.3046216926e-07    1.3276633165e-07    1.3553122030e-07    1.3840589365e-07    1.4165416228e-07    
+1.4567845638e-07    1.5038433005e-07    1.5582250249e-07    1.6249208875e-07    1.7035326933e-07    
+1.7928247841e-07    1.9002282520e-07    2.0289747754e-07    2.1782427265e-07    2.3567096744e-07    
+2.5757284773e-07    2.8409417780e-07    3.1652982701e-07    3.5752912674e-07    4.0898295498e-07    
+4.7394047661e-07    5.5921913379e-07    6.7274870158e-07    8.2603648218e-07    1.0407210184e-06    
+1.3531355383e-06    1.8252248152e-06    2.5713361679e-06    3.8161120788e-06    4.6006232329e-06    
+2.0095317543e-09    2.0260358187e-09    2.0499402527e-09    2.0597084168e-09    2.0622299111e-09    
+2.0610572715e-09    2.0612003350e-09    2.0618900944e-09    2.0624891929e-09    2.0659491362e-09    
+2.0686373192e-09    2.0655630227e-09    2.0625637994e-09    2.0632663486e-09    2.0652870208e-09    
+2.0698004768e-09    2.0778657371e-09    2.0856033033e-09    2.0919569315e-09    2.1022854031e-09    
+2.1176347694e-09    2.1361277985e-09    2.1606350173e-09    2.1876647963e-09    2.2090962306e-09    
+2.2292605453e-09    2.2562982949e-09    2.2894759109e-09    2.3285328023e-09    2.3787658644e-09    
+2.4375799734e-09    2.5007464008e-09    2.5763717956e-09    2.6650561003e-09    2.7595235342e-09    
+2.8665526528e-09    2.9961588896e-09    3.1471889227e-09    3.3225182072e-09    3.5361974811e-09    
+3.7891757193e-09    4.0817858113e-09    4.4373083784e-09    4.8685321907e-09    5.3803616809e-09    
+6.0065087262e-09    6.7911716606e-09    7.7675863207e-09    9.0011853878e-09    1.0612048453e-08    
+1.2708828802e-08    1.5477562689e-08    1.9286989041e-08    2.4616568530e-08    3.2242085437e-08    
+4.3634998339e-08    6.1430345935e-08    9.0551883227e-08    1.4095378379e-07    2.3426832433e-07    
+2.9538377126e-07    3.3010962236e-11    3.3356774808e-11    3.3857241229e-11    3.4066807101e-11    
+3.4141969200e-11    3.4152826834e-11    3.4195193118e-11    3.4254878881e-11    3.4320182113e-11    
+3.4447657834e-11    3.4568028127e-11    3.4586257903e-11    3.4614257641e-11    3.4721483067e-11    
+3.4862748105e-11    3.5061522262e-11    3.5338966996e-11    3.5620342179e-11    3.5886173807e-11    
+3.6242111309e-11    3.6709470966e-11    3.7253946455e-11    3.7935090399e-11    3.8684046851e-11    
+3.9339811356e-11    3.9991823221e-11    4.0806704803e-11    4.1772687739e-11    4.2890926488e-11    
+4.4279038335e-11    4.5887706829e-11    4.7638217589e-11    4.9716799254e-11    5.2144435037e-11    
+5.4777795147e-11    5.7788897365e-11    6.1424988793e-11    6.5689289078e-11    7.0696018050e-11    
+7.6837216711e-11    8.4193665061e-11    9.2876342034e-11    1.0360653654e-10    1.1685587133e-10    
+1.3298479202e-10    1.5324496316e-10    1.7930311879e-10    2.1272516170e-10    2.5645376014e-10    
+3.1567905148e-10    3.9583646517e-10    5.0669798522e-10    6.6698419184e-10    9.0324162776e-10    
+1.2620129295e-09    1.8349494944e-09    2.7979040330e-09    4.5087347324e-09    7.7589807157e-09    
+1.4451798460e-08    1.8997334408e-08    5.3016640557e-13    5.3705043884e-13    5.4695397517e-13    
+5.5115027126e-13    5.5301509899e-13    5.5370335053e-13    5.5508028729e-13    5.5692343098e-13    
+5.5894395015e-13    5.6220783237e-13    5.6551638372e-13    5.6707069596e-13    5.6889128824e-13    
+5.7235509734e-13    5.7659649624e-13    5.8205914047e-13    5.8918625187e-13    5.9651372383e-13    
+6.0375272490e-13    6.1296757600e-13    6.2449177773e-13    6.3779233631e-13    6.5404582791e-13    
+6.7189786720e-13    6.8832916797e-13    7.0511565337e-13    7.2567733073e-13    7.4968069946e-13    
+7.7728058365e-13    8.1118662135e-13    8.5046639869e-13    8.9376509665e-13    9.4525689359e-13    
+1.0055420038e-12    1.0720443630e-12    1.1490049363e-12    1.2423304573e-12    1.3529975751e-12    
+1.4849146218e-12    1.6486061648e-12    1.8477350726e-12    2.0878984305e-12    2.3907451539e-12    
+2.7725729698e-12    3.2498136127e-12    3.8666088560e-12    4.6830226329e-12    5.7640689097e-12    
+7.2309402389e-12    9.2959776161e-12    1.2205893848e-11    1.6425162879e-11    2.2845649417e-11    
+3.2829463540e-11    4.8935735238e-11    7.6460362347e-11    1.2631161915e-10    2.2260665750e-10    
+4.2370357440e-10    8.8488742115e-10    1.2089228195e-09    8.3396831108e-15    8.4953745427e-15    
+8.6731836990e-15    8.7616545963e-15    8.8058900449e-15    8.7616545963e-15    8.8284414501e-15    
+8.8731105796e-15    8.8731105796e-15    8.9394637526e-15    9.0504860550e-15    9.1172729089e-15    
+9.1836260818e-15    9.2499792548e-15    9.3167661086e-15    9.4503398163e-15    9.6498330160e-15    
+9.8050907671e-15    9.9607821991e-15    1.0182826804e-14    1.0449106858e-14    1.0737938316e-14    
+1.1048887499e-14    1.1470858985e-14    1.1870712746e-14    1.2203345973e-14    1.2669552907e-14    
+1.3202546695e-14    1.3757658207e-14    1.4490145195e-14    1.5422992744e-14    1.6444744871e-14    
+1.7621321069e-14    1.9042493277e-14    2.0641040960e-14    2.2483750972e-14    2.4682512978e-14    
+2.7369599642e-14    3.0677717311e-14    3.4763424778e-14    3.9870450691e-14    4.6176170526e-14    
+5.4236129476e-14    6.4650108184e-14    7.8084240462e-14    9.6003066608e-14    1.2038330402e-13    
+1.5377889934e-13    2.0080812013e-13    2.6968661679e-13    3.7082793433e-13    5.2466017642e-13    
+7.7135173249e-13    1.1763615256e-12    1.8708723806e-12    3.1420330747e-12    5.6251362075e-12    
+1.0844583044e-11    2.2836146168e-11    5.3485607002e-11    7.5708674573e-11    1.9081958236e-16    
+2.1293730668e-16    1.9038590149e-16    1.9038590149e-16    1.6826817717e-16    1.4615045285e-16    
+1.6826817717e-16    1.6826817717e-16    1.6826817717e-16    1.6826817717e-16    1.6826817717e-16    
+1.6826817717e-16    1.9038590149e-16    1.9038590149e-16    1.6826817717e-16    1.6826817717e-16    
+2.1250362581e-16    2.1250362581e-16    2.1250362581e-16    2.3462135013e-16    2.3462135013e-16    
+2.1250362581e-16    2.1250362581e-16    2.7929047963e-16    3.0184188482e-16    2.5717275531e-16    
+2.3462135013e-16    2.5717275531e-16    2.3505503099e-16    2.3462135013e-16    3.0140820395e-16    
+3.2395960914e-16    3.2395960914e-16    4.1286418728e-16    4.7921736024e-16    4.7878367937e-16    
+5.0133508456e-16    5.6812193838e-16    6.5659283566e-16    7.4549741380e-16    9.2374025096e-16    
+1.1015494072e-15    1.2789248827e-15    1.5005358067e-15    1.8561541193e-15    2.4116993125e-15    
+3.0552817221e-15    4.0544824442e-15    5.5198901006e-15    7.6956670203e-15    1.1093122948e-14    
+1.6488980320e-14    2.5614926846e-14    4.1468998374e-14    7.0379032463e-14    1.2706719357e-13    
+2.4652762470e-13    5.1988621741e-13    1.2111110725e-12    3.1803136513e-12    4.6500485754e-12    
+5.7245874707e-17    5.7245874707e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    5.7245874707e-17    3.5128150389e-17    1.2576745201e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    5.7245874707e-17    5.7245874707e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+7.9363599026e-17    1.0191500421e-16    1.0191500421e-16    7.9363599026e-17    5.7245874707e-17    
+1.0191500421e-16    1.0191500421e-16    1.2403272853e-16    1.6826817717e-16    2.1250362581e-16    
+3.2352592827e-16    5.0133508456e-16    8.5695339713e-16    1.4341826338e-15    2.5886411070e-15    
+5.1204700202e-15    1.0671585143e-14    2.4460034692e-14    6.3051560500e-14    1.8550916012e-13    
+2.7932257202e-13    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    1.2403272853e-16    1.2403272853e-16    
+1.0148132334e-16    3.0184188482e-16    5.6855561925e-16    1.1679025802e-15    3.2552086027e-15    
+1.0649033738e-14    1.6421759785e-14    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    7.9363599026e-17    
+7.9363599026e-17    3.4694469520e-17    7.9363599026e-17    1.0191500421e-16    7.9797279895e-17    
+1.9081958236e-16    6.3490879221e-16    9.6797569960e-16    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    5.7245874707e-17    7.9797279895e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+1.8865117801e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.8865117801e-17    
+zone T = "Zone0 SYMMETRY"
+I = 61
+J = 81
+K = 1
+f = BLOCK
+2.2204460493e-16    3.4267502444e-04    1.3704652454e-03    3.0826662669e-03    5.4781046317e-03    
+8.5551386262e-03    1.2311659405e-02    1.6745092436e-02    2.1852399266e-02    2.7630079602e-02    
+3.4074173711e-02    4.1180265132e-02    4.8943483705e-02    5.7358508908e-02    6.6419573503e-02    
+7.6120467489e-02    8.6454542357e-02    9.7414715650e-02    1.0899347581e-01    1.2118288734e-01    
+1.3397459622e-01    1.4735983565e-01    1.6132943205e-01    1.7587381138e-01    1.9098300563e-01    
+2.0664665971e-01    2.2285403854e-01    2.3959403440e-01    2.5685517452e-01    2.7462562899e-01    
+2.9289321881e-01    3.1164542431e-01    3.3086939364e-01    3.5055195167e-01    3.7067960895e-01    
+3.9123857099e-01    4.1221474771e-01    4.3359376308e-01    4.5536096498e-01    4.7750143528e-01    
+5.0000000000e-01    5.2284123974e-01    5.4600950026e-01    5.6948890319e-01    5.9326335692e-01    
+6.1731656763e-01    6.4163205045e-01    6.6619314077e-01    6.9098300563e-01    7.1598465530e-01    
+7.4118095490e-01    7.6655463614e-01    7.9208830918e-01    8.1776447451e-01    8.4356553496e-01    
+8.6947380778e-01    8.9547153673e-01    9.2154090427e-01    9.4766404376e-01    9.7382305169e-01    
+1.0000000000e+00    -1.0000000000e-04   2.4270929195e-04    1.2706022920e-03    2.9829745335e-03    
+5.3783599374e-03    8.4552651405e-03    1.2211728591e-02    1.6645104095e-02    2.1752282989e-02    
+2.7529911206e-02    3.3974029934e-02    4.1079800569e-02    4.8842783609e-02    5.7257660137e-02    
+6.6318527158e-02    7.6019248342e-02    8.6353246296e-02    9.7313307547e-02    1.0889179625e-01    
+1.2108104795e-01    1.3387271088e-01    1.4725783230e-01    1.6122743492e-01    1.7577194696e-01    
+1.9088092672e-01    2.0654428213e-01    2.2275152386e-01    2.3949143551e-01    2.5675244569e-01    
+2.7452295652e-01    2.9279079232e-01    3.1154298095e-01    3.3076715443e-01    3.5045014114e-01    
+3.7057799222e-01    3.9113718536e-01    4.1211387339e-01    4.3349351750e-01    4.5526132809e-01    
+4.7740273685e-01    4.9990257354e-01    5.2274489578e-01    5.4591462961e-01    5.6939590014e-01    
+5.9317220007e-01    6.1722750933e-01    6.4154556784e-01    6.6610954179e-01    6.9090247944e-01    
+7.1590776232e-01    7.4110825720e-01    7.6648623322e-01    7.9202486554e-01    8.1770665493e-01    
+8.4351377356e-01    8.6942874745e-01    8.9543395260e-01    9.2151156865e-01    9.4764372509e-01    
+9.7381251355e-01    1.0000000000e+00    -2.0993045568e-04   1.3281650668e-04    1.1608224921e-03    
+2.8733829567e-03    5.2687101403e-03    8.3454737625e-03    1.2101874192e-02    1.6535186457e-02    
+2.1642224708e-02    2.7419795631e-02    3.3863941424e-02    4.0969359417e-02    4.8732083534e-02    
+5.7146796624e-02    6.6207446451e-02    7.5907977673e-02    8.6241891074e-02    9.7201829158e-02    
+1.0878001945e-01    1.2096909545e-01    1.3376070787e-01    1.4714569957e-01    1.6111530901e-01    
+1.7565996695e-01    1.9076871092e-01    2.0643173800e-01    2.2263882899e-01    2.3937864809e-01    
+2.5663951541e-01    2.7441008821e-01    2.9267819442e-01    3.1143036451e-01    3.3065476239e-01    
+3.5033822036e-01    3.7046628449e-01    3.9102573167e-01    4.1200298179e-01    4.3338331709e-01    
+4.5515179679e-01    4.7729423721e-01    4.9979547219e-01    5.2263898443e-01    5.4581033787e-01    
+5.6929366146e-01    5.9307199093e-01    6.1712960713e-01    6.4145049711e-01    6.6601764105e-01    
+6.9081395663e-01    7.1582323353e-01    7.4102834029e-01    7.6641103758e-01    7.9195512166e-01    
+8.1764309360e-01    8.4345687201e-01    8.6937921243e-01    8.9539263620e-01    9.2147931987e-01    
+9.4762138870e-01    9.7380092892e-01    1.0000000000e+00    -3.3077750656e-04   1.2010867078e-05    
+1.0401410579e-03    2.7529084370e-03    5.1481716188e-03    8.2247796004e-03    1.1981110750e-02    
+1.6414353495e-02    2.1521237139e-02    2.7298745078e-02    3.3742920623e-02    4.0847950955e-02    
+4.8610390438e-02    5.7024923859e-02    6.6085334923e-02    7.5785657319e-02    8.6119477771e-02    
+9.7079280457e-02    1.0865714270e-01    1.2084602555e-01    1.3363758245e-01    1.4702243153e-01    
+1.6099204848e-01    1.7553686681e-01    1.9064535158e-01    2.0630801772e-01    2.2251494301e-01    
+2.3925466036e-01    2.5651537064e-01    2.7428601156e-01    2.9255441502e-01    3.1130656474e-01    
+3.3053120931e-01    3.5021518534e-01    3.7034348366e-01    3.9090321013e-01    4.1188107815e-01    
+4.3326217328e-01    4.5503138853e-01    4.7717496307e-01    4.9967773518e-01    5.2252255560e-01    
+5.4569568948e-01    5.6918127002e-01    5.9296183056e-01    6.1702198279e-01    6.4134598543e-01    
+6.6591661415e-01    6.9071664311e-01    7.1573031064e-01    7.4094048726e-01    7.6632837467e-01    
+7.9187845190e-01    8.1757322035e-01    8.4339431989e-01    8.6932475836e-01    8.9534721689e-01    
+9.2144386863e-01    9.4759683419e-01    9.7378819388e-01    1.0000000000e+00    -4.6362522026e-04   
+-1.2079132303e-04   9.0747540742e-04    2.6204702484e-03    5.0156630727e-03    8.0920999580e-03    
+1.1848354948e-02    1.6281521271e-02    2.1388234953e-02    2.7165673653e-02    3.3609881905e-02    
+4.0714486079e-02    4.8476612663e-02    5.6890948573e-02    6.5951097165e-02    7.5651189997e-02    
+8.5984908269e-02    9.6944562111e-02    1.0852206373e-01    1.2071073426e-01    1.3350223011e-01    
+1.4688692243e-01    1.6085654761e-01    1.7540154226e-01    1.9050974209e-01    2.0617201145e-01    
+2.2237875460e-01    2.3911836009e-01    2.5637889773e-01    2.7414961353e-01    2.9241834377e-01    
+3.1117047109e-01    3.3039538685e-01    3.5007993238e-01    3.7020848816e-01    3.9076852163e-01    
+4.1174706893e-01    4.3312899933e-01    4.5489902319e-01    4.7704384445e-01    4.9954830636e-01    
+5.2239456485e-01    5.4556965599e-01    5.6905771759e-01    5.9284073077e-01    6.1690367086e-01    
+6.4123109525e-01    6.6580555483e-01    6.9060966591e-01    7.1562816008e-01    7.4084391003e-01    
+7.6623750295e-01    7.9179416848e-01    8.1749640836e-01    8.4332555605e-01    8.6926489675e-01    
+8.9529728724e-01    9.2140489693e-01    9.4756984131e-01    9.7377419419e-01    1.0000000000e+00    
+-6.0966531730e-04   -2.6678137578e-04   7.6163545326e-04    2.4748803443e-03    4.8699958243e-03    
+7.9462446226e-03    1.1702415891e-02    1.6135498201e-02    2.1242025044e-02    2.7019387630e-02    
+3.3463631835e-02    4.0567767534e-02    4.8329550145e-02    5.6743668931e-02    6.5803528985e-02    
+7.5503369456e-02    8.5836975403e-02    9.6796465619e-02    1.0837357080e-01    1.2056200792e-01    
+1.3335343667e-01    1.4673795665e-01    1.6070759090e-01    1.7525277937e-01    1.9036066596e-01    
+2.0602249914e-01    2.2222904205e-01    2.3896852458e-01    2.5622887244e-01    2.7399967056e-01    
+2.9226876003e-01    3.1102086272e-01    3.3024607660e-01    3.4993124819e-01    3.7006008699e-01    
+3.9062045796e-01    4.1159975197e-01    4.3298260060e-01    4.5475351337e-01    4.7689970517e-01    
+4.9940602466e-01    5.2225386405e-01    5.4543110679e-01    5.6892189585e-01    5.9270760521e-01    
+6.1677361003e-01    6.4110479596e-01    6.6568346680e-01    6.9049206538e-01    7.1551586551e-01    
+7.4073774224e-01    7.6613760726e-01    7.9170151533e-01    8.1741196859e-01    8.4324996365e-01    
+8.6919909060e-01    8.9524239934e-01    9.2136205516e-01    9.4754016792e-01    9.7375880428e-01    
+1.0000000000e+00    -7.7020786146e-04   -4.2726890602e-04   6.0131292707e-04    2.3148326992e-03    
+4.7098631543e-03    7.7859051877e-03    1.1541984420e-02    1.5974974374e-02    2.1081295825e-02    
+2.6858574738e-02    3.3302858468e-02    4.0406479168e-02    4.8167883648e-02    5.6581763749e-02    
+6.5641306612e-02    7.5340869663e-02    8.5674352129e-02    9.6633662471e-02    1.0821033185e-01    
+1.2039851238e-01    1.3318986736e-01    1.4657419789e-01    1.6054384211e-01    1.7508924365e-01    
+1.9019678589e-01    2.0585813958e-01    2.2206446236e-01    2.3880380972e-01    2.5606394895e-01    
+2.7383483757e-01    2.9210432194e-01    3.1085639756e-01    3.3008193917e-01    3.4976779898e-01    
+3.6989694891e-01    3.9045769089e-01    4.1143780577e-01    4.3282166381e-01    4.5459355375e-01    
+4.7674125219e-01    4.9924961375e-01    5.2209919100e-01    5.4527879903e-01    5.6877258638e-01    
+5.9256125968e-01    6.1663063356e-01    6.4096595458e-01    6.6554925487e-01    6.9036278659e-01    
+7.1539241957e-01    7.4062103151e-01    7.6602779147e-01    7.9159966129e-01    8.1731914357e-01    
+8.4316686458e-01    8.6912674961e-01    8.9518206083e-01    9.2131495901e-01    9.4750754782e-01    
+9.7374188607e-01    1.0000000000e+00    -9.4669301182e-04   -6.0369357933e-04   4.2506964348e-04    
+2.1388915937e-03    4.5338285804e-03    7.6096433162e-03    1.1365621372e-02    1.5798509801e-02    
+2.0904605462e-02    2.6681792393e-02    3.3126119573e-02    4.0229174133e-02    4.7990162932e-02    
+5.6403780645e-02    6.5462974819e-02    7.5162232900e-02    8.5495579622e-02    9.6454692229e-02    
+1.0803088253e-01    1.2021878098e-01    1.3301005488e-01    1.4639417714e-01    1.6036383231e-01    
+1.7490946808e-01    1.9001663178e-01    2.0567745836e-01    2.2188353916e-01    2.3862273792e-01    
+2.5588264781e-01    2.7365363591e-01    2.9192355439e-01    3.1067560026e-01    3.2990150213e-01    
+3.4958811851e-01    3.6971761047e-01    3.9027876030e-01    4.1125977758e-01    4.3264474527e-01    
+4.5441770942e-01    4.7656706411e-01    4.9907767051e-01    5.2192915823e-01    5.4511136642e-01    
+5.6860844981e-01    5.9240038138e-01    6.1647345887e-01    6.4081332561e-01    6.6540171509e-01    
+6.9022066983e-01    7.1525671489e-01    7.4049273087e-01    7.6590707047e-01    7.9148769269e-01    
+8.1721710060e-01    8.4307551339e-01    8.6904722483e-01    8.9511573042e-01    9.2126318599e-01    
+9.4747168840e-01    9.7372328781e-01    1.0000000000e+00    -1.1407039418e-03   -7.9763802663e-04   
+2.3132459871e-04    1.9454787346e-03    4.3403129712e-03    7.4158778378e-03    1.1171744671e-02    
+1.5604521491e-02    2.0710368940e-02    2.6487454755e-02    3.2931829700e-02    4.0034261899e-02    
+4.7794793739e-02    5.6208123007e-02    6.5266933866e-02    7.4965856692e-02    8.5299054192e-02    
+9.6257949425e-02    1.0783361307e-01    1.2002120144e-01    1.3281238620e-01    1.4619627950e-01    
+1.6016594672e-01    1.7471183998e-01    1.8981858756e-01    2.0547883467e-01    2.2168464946e-01    
+2.3842368487e-01    2.5568334264e-01    2.7345444010e-01    2.9172483581e-01    3.1047684896e-01    
+3.2970314688e-01    3.4939059496e-01    3.6952046291e-01    3.9008206110e-01    4.1106407038e-01    
+4.3245025790e-01    4.5422440295e-01    4.7637557836e-01    4.9888865253e-01    5.2174224042e-01    
+5.4492730698e-01    5.6842801372e-01    5.9222352712e-01    6.1630067602e-01    6.4064553989e-01    
+6.6523952394e-01    6.9006444022e-01    7.1510753412e-01    7.4035168939e-01    7.6577436133e-01    
+7.9136460510e-01    8.1710492430e-01    8.4297509062e-01    8.6895980287e-01    8.9504281311e-01    
+9.2120627168e-01    9.4743226797e-01    9.7370284266e-01    1.0000000000e+00    -1.3539810413e-03   
+-1.0108420413e-03   1.8339788121e-05    1.7328590973e-03    4.1275803802e-03    7.2028705643e-03    
+1.0958615129e-02    1.5391269258e-02    2.0496843847e-02    2.6273818505e-02    3.2718245957e-02    
+3.9819993993e-02    4.7580023495e-02    5.5993035674e-02    6.5051425153e-02    7.4749979431e-02    
+8.5083012890e-02    9.6041669165e-02    1.0761675385e-01    1.1980400135e-01    1.3259508811e-01    
+1.4597872973e-01    1.5994841019e-01    1.7449458651e-01    1.8960087663e-01    2.0526048675e-01    
+2.2146600910e-01    2.3820486494e-01    2.5546424556e-01    2.7323546324e-01    2.9150638356e-01    
+3.1025836075e-01    3.2948509405e-01    3.4917345642e-01    3.6930373769e-01    3.8986582876e-01    
+4.1084892856e-01    4.3223645706e-01    4.5401190026e-01    4.7616507721e-01    4.9868086420e-01    
+5.2153676082e-01    5.4472496961e-01    5.6822965951e-01    5.9202911043e-01    6.1611073505e-01    
+6.4046109228e-01    6.6506122647e-01    6.8989269630e-01    7.1494353902e-01    7.4019664185e-01    
+7.6562847356e-01    7.9122929435e-01    8.1698160838e-01    8.4286469540e-01    8.6886369952e-01    
+8.9496265477e-01    9.2114370551e-01    9.4738893292e-01    9.7368036721e-01    1.0000000000e+00    
+-1.5884375285e-03   -1.2452181862e-03   -2.1579538469e-04   1.4991253611e-03    3.8937224736e-03    
+6.9687106980e-03    1.0724320853e-02    1.5156840106e-02    2.0262114740e-02    2.6038967201e-02    
+3.2483452376e-02    3.9584448307e-02    4.7343925587e-02    5.5756589190e-02    6.4814515442e-02    
+7.4512664575e-02    8.4845517703e-02    9.5803911290e-02    1.0737835953e-01    1.1956523230e-01    
+1.3235621134e-01    1.4573957628e-01    1.5970927129e-01    1.7425575878e-01    1.8936154602e-01    
+2.0502045589e-01    2.2122565677e-01    2.3796431520e-01    2.5522339114e-01    2.7299474097e-01    
+2.9126623801e-01    3.1001817567e-01    3.2924538757e-01    3.4893475503e-01    3.6906549067e-01    
+3.8962812357e-01    4.1061242217e-01    4.3200142481e-01    4.5377829508e-01    4.7593367233e-01    
+4.9845244155e-01    5.2131087616e-01    5.4450253921e-01    5.6801160783e-01    5.9181538728e-01    
+6.1590193207e-01    6.4025832819e-01    6.6486522324e-01    6.8970389743e-01    7.1476325845e-01    
+7.4002619738e-01    7.6546809847e-01    7.9108054663e-01    8.1684604663e-01    8.4274333744e-01    
+8.6875805266e-01    8.9487453634e-01    9.2107492625e-01    9.4734129449e-01    9.7365565984e-01    
+1.0000000000e+00    -1.8461766134e-03   -1.5028689503e-03   -4.7318124709e-04   1.2421807998e-03    
+3.6366414111e-03    6.7112976899e-03    1.0466760088e-02    1.4899131072e-02    2.0004075962e-02    
+2.5780794092e-02    3.2225342721e-02    3.9325511861e-02    4.7084382081e-02    5.5496662491e-02    
+6.4554079518e-02    7.4251783273e-02    8.4584438161e-02    9.5542542974e-02    1.0711629156e-01    
+1.1930275240e-01    1.3209361301e-01    1.4547667380e-01    1.5944638481e-01    1.7399321437e-01    
+1.8909844879e-01    2.0475658886e-01    2.2096143635e-01    2.3769987777e-01    2.5495861878e-01    
+2.7273011390e-01    2.9100224491e-01    3.0975413911e-01    3.2898187716e-01    3.4867234951e-01    
+3.6880358464e-01    3.8936681317e-01    4.1035242963e-01    4.3174305280e-01    4.5352149185e-01    
+4.7567928789e-01    4.9820133548e-01    5.2106256013e-01    5.4425802045e-01    5.6777190262e-01    
+5.9158044044e-01    6.1567239400e-01    6.4003542869e-01    6.6464975600e-01    6.8949634997e-01    
+7.1456507521e-01    7.3983882699e-01    7.6529179741e-01    7.9091702757e-01    8.1669702298e-01    
+8.4260992808e-01    8.6864191459e-01    8.9477766736e-01    9.2099931688e-01    9.4728892536e-01    
+9.7362849892e-01    1.0000000000e+00    -2.1295103638e-03   -1.7861056094e-03   -7.5612669848e-04   
+9.5972047278e-04    3.3540310276e-03    6.4283223971e-03    1.0183622365e-02    1.4615830355e-02    
+1.9720412757e-02    2.5496983218e-02    3.1941601602e-02    3.9040861847e-02    4.6799064722e-02    
+5.5210923887e-02    6.4267781120e-02    7.3964995268e-02    8.4297432231e-02    9.5255219594e-02    
+1.0682819905e-01    1.1901420704e-01    1.3180493747e-01    1.4518766391e-01    1.5915739250e-01    
+1.7370459810e-01    1.8880922481e-01    2.0446651864e-01    2.2067097764e-01    2.3740918050e-01    
+2.5466755331e-01    2.7243920814e-01    2.9071203610e-01    3.0946388252e-01    3.2869219895e-01    
+3.4838388592e-01    3.6851567015e-01    3.8907955346e-01    4.1006661864e-01    4.3145902326e-01    
+4.5323918689e-01    4.7539964191e-01    4.9792529344e-01    5.2078958518e-01    5.4398921987e-01    
+5.6750839358e-01    5.9132216231e-01    6.1542006176e-01    6.3979039426e-01    6.6441289189e-01    
+6.8926819210e-01    7.1434721146e-01    7.3963284988e-01    7.6509798885e-01    7.9073727033e-01    
+8.1653320060e-01    8.4246327056e-01    8.6851424348e-01    8.9467117884e-01    9.2091619916e-01    
+9.4723135573e-01    9.7359864080e-01    1.0000000000e+00    -2.4409804468e-03   -2.0974689594e-03   
+-1.0671699225e-03   6.4921054812e-04    3.0433561453e-03    6.1172463682e-03    9.8723677753e-03    
+1.4304396587e-02    1.9408580504e-02    2.5184988630e-02    3.1629683697e-02    3.8727944788e-02    
+4.6485414049e-02    5.4896810138e-02    6.3953051986e-02    7.3649727907e-02    8.3981925304e-02    
+9.4939363692e-02    1.0651149764e-01    1.1869700782e-01    1.3148759514e-01    1.4486995401e-01    
+1.5883970194e-01    1.7338732093e-01    1.8849127957e-01    2.0414764312e-01    2.2035167506e-01    
+2.3708961567e-01    2.5434758372e-01    2.7211941412e-01    2.9039300822e-01    3.0914480213e-01    
+3.2837375438e-01    3.4806677659e-01    3.6819916444e-01    3.8876376755e-01    4.0975242531e-01    
+4.3114678830e-01    4.5292884775e-01    4.7509222582e-01    4.9762183916e-01    5.2048950257e-01    
+5.4369372617e-01    5.6721871690e-01    5.9103823599e-01    6.1514267178e-01    6.3952102680e-01    
+6.6415250608e-01    6.8901737712e-01    7.1410771285e-01    7.3940641830e-01    7.6488493421e-01    
+7.9053966238e-01    8.1635310992e-01    8.4230204928e-01    8.6837389405e-01    8.9455411552e-01    
+9.2082482748e-01    9.4716806917e-01    9.7356581763e-01    1.0000000000e+00    -2.7833809284e-03   
+-2.4397521088e-03   -1.4091011561e-03   3.0786557299e-04    2.7018298314e-03    5.7752790722e-03    
+9.5302041871e-03    1.3962036027e-02    1.9065781888e-02    2.4842011558e-02    3.1286790923e-02    
+3.8383953640e-02    4.6140616436e-02    5.4551503462e-02    6.3607068815e-02    7.3303153062e-02    
+8.3635087102e-02    9.4592141860e-02    1.0616334634e-01    1.1834830927e-01    1.3113873927e-01    
+1.4452069408e-01    1.5849046326e-01    1.7303853668e-01    1.8814176091e-01    2.0379710181e-01    
+2.2000066427e-01    2.3673831659e-01    2.5399583969e-01    2.7176786310e-01    2.9004229943e-01    
+3.0879403560e-01    3.2802368682e-01    3.4771817685e-01    3.6785122827e-01    3.8841662266e-01    
+4.0940703116e-01    4.3080354699e-01    4.5258769053e-01    4.7475428191e-01    4.9728825049e-01    
+5.2015962040e-01    5.4336888860e-01    5.6690027401e-01    5.9072611449e-01    6.1483773571e-01    
+6.3922490992e-01    6.6386626278e-01    6.8874165506e-01    7.1384443094e-01    7.3915750103e-01    
+7.6465072228e-01    7.9032243106e-01    8.1615513540e-01    8.4212481799e-01    8.6821960727e-01    
+8.9442542729e-01    9.2072438217e-01    9.4709849797e-01    9.7352973497e-01    1.0000000000e+00    
+-3.1597833380e-03   -2.8160255347e-03   -1.7849877193e-03   -6.7376513630e-05   2.3263883983e-03    
+5.3993528654e-03    9.1540621953e-03    1.3585677503e-02    1.8688941806e-02    2.4464975300e-02    
+3.0909847333e-02    3.8005802604e-02    4.5761578847e-02    5.4171906260e-02    6.3226727939e-02    
+7.2922161754e-02    8.3253806286e-02    9.4210439318e-02    1.0578062203e-01    1.1796498336e-01    
+1.3075524041e-01    1.4413675104e-01    1.5810654359e-01    1.7265511657e-01    1.8775753346e-01    
+2.0341175015e-01    2.1961479652e-01    2.3635213191e-01    2.5360916588e-01    2.7138140145e-01    
+2.8965676365e-01    3.0840843636e-01    3.2763885595e-01    3.4733495957e-01    3.6746874045e-01    
+3.8803500470e-01    4.0902733779e-01    4.3042622024e-01    4.5221265484e-01    4.7438277863e-01    
+4.9692153495e-01    5.1979697942e-01    5.4301179318e-01    5.6655020829e-01    5.9038299790e-01    
+6.1450251810e-01    6.3889938728e-01    6.6355159422e-01    6.8843855255e-01    7.1355500394e-01    
+7.3888386514e-01    7.6439325204e-01    7.9008362768e-01    8.1593750112e-01    8.4192998683e-01    
+8.6804999912e-01    8.9428395973e-01    9.2061396218e-01    9.4702201804e-01    9.7349006914e-01    
+1.0000000000e+00    -3.5735642221e-03   -3.2296646265e-03   -2.1982015311e-03   -4.7988184937e-04   
+1.9136639201e-03    4.9860954732e-03    8.7405675897e-03    1.3171944862e-02    1.8274679787e-02    
+2.4050497624e-02    3.0495471528e-02    3.7590099446e-02    4.5344901099e-02    5.3754613326e-02    
+6.2808617481e-02    7.2503336274e-02    8.2834662547e-02    9.3790831974e-02    1.0535989145e-01    
+1.1754359145e-01    1.3033365838e-01    1.4371468071e-01    1.5768449894e-01    1.7223362109e-01    
+1.8733515047e-01    2.0298813131e-01    2.1919061033e-01    2.3592759733e-01    2.5318409359e-01    
+2.7095656241e-01    2.8923294242e-01    3.0798454536e-01    3.2721580962e-01    3.4691368706e-01    
+3.6704826984e-01    3.8761549034e-01    4.0860993915e-01    4.3001142324e-01    4.5180037639e-01    
+4.7397438338e-01    4.9651840288e-01    5.1939832654e-01    5.4261923655e-01    5.6616537944e-01    
+5.9000580827e-01    6.1413401185e-01    6.3854153876e-01    6.6320567763e-01    6.8810535057e-01    
+7.1323683551e-01    7.3858305596e-01    7.6411021383e-01    7.8982111003e-01    8.1569825476e-01    
+8.4171580805e-01    8.6786354811e-01    8.9412844379e-01    9.2049257698e-01    9.4693794329e-01    
+9.7344646431e-01    1.0000000000e+00    -4.0284354336e-03   -3.6843799649e-03   -2.6524493574e-03   
+-9.3335084467e-04   1.4599540205e-03    4.5317997388e-03    8.2860110856e-03    1.2717126685e-02    
+1.7819279662e-02    2.3594860425e-02    3.0039946316e-02    3.7133115070e-02    4.4886845352e-02    
+5.3295881301e-02    6.2348986748e-02    7.2042919514e-02    8.2373895925e-02    9.3329555709e-02    
+1.0489738040e-01    1.1708035340e-01    1.2987021133e-01    1.4325069688e-01    1.5722054334e-01    
+1.7177026919e-01    1.8687082293e-01    2.0252244520e-01    2.1872430053e-01    2.3546090454e-01    
+2.5271680969e-01    2.7048953491e-01    2.8876703380e-01    3.0751856004e-01    3.2675075286e-01    
+3.4645058028e-01    3.6658604459e-01    3.8715431628e-01    4.0815109091e-01    4.2955543499e-01    
+4.5134715682e-01    4.7352543262e-01    4.9607523796e-01    5.1896008561e-01    5.4218769726e-01    
+5.6574233533e-01    5.8959116200e-01    6.1372891125e-01    6.3814815426e-01    6.6282540996e-01    
+6.8773906013e-01    7.1288707151e-01    7.3825237506e-01    7.6379906863e-01    7.8953252319e-01    
+8.1543525014e-01    8.4148036034e-01    8.6765858166e-01    8.9395748441e-01    9.2035913769e-01    
+9.4684551955e-01    9.7339852933e-01    1.0000000000e+00    -4.5284774291e-03   -4.1842506085e-03   
+-3.1518060627e-03   -1.4318513776e-03   9.6118866029e-04    4.0323903678e-03    7.7863150492e-03    
+1.2217142990e-02    1.7318656229e-02    2.3093976376e-02    2.9539185376e-02    3.6630750064e-02    
+4.4383302583e-02    5.2791595097e-02    6.1843712590e-02    7.1536781273e-02    8.1867373078e-02    
+9.2822472609e-02    1.0438893990e-01    1.1657111370e-01    1.2936074187e-01    1.4274063733e-01    
+1.5671051484e-01    1.7126090434e-01    1.8636038555e-01    2.0201051433e-01    2.1821168404e-01    
+2.3494786703e-01    2.5220312237e-01    2.6997612945e-01    2.8825485834e-01    3.0700630026e-01    
+3.2623951384e-01    3.4594148488e-01    3.6607791827e-01    3.8664734555e-01    4.0764667695e-01    
+4.2905416504e-01    4.5084893048e-01    4.7303189900e-01    4.9558806475e-01    5.1847832537e-01    
+5.4171330416e-01    5.6527728102e-01    5.8913533946e-01    6.1328358232e-01    6.3771570488e-01    
+6.6240737996e-01    6.8733639537e-01    7.1250257435e-01    7.3788885604e-01    7.6345702530e-01    
+7.8921527835e-01    8.1514612797e-01    8.4122153160e-01    8.6743326111e-01    8.9376954799e-01    
+9.2021244726e-01    9.4674391770e-01    9.7334583418e-01    1.0000000000e+00    -5.0781758734e-03   
+-4.7337606849e-03   -3.7007511644e-03   -1.9798552850e-03   4.1289362706e-04    3.4833873706e-03    
+7.2369969194e-03    1.1667508636e-02    1.6768318609e-02    2.2543352259e-02    2.8988696592e-02    
+3.6078497923e-02    4.3829755721e-02    5.2237230974e-02    6.1288262405e-02    7.0980381198e-02    
+8.1310550205e-02    9.2265033846e-02    1.0383000894e-01    1.1601130417e-01    1.2880067978e-01    
+1.4217992655e-01    1.5614983817e-01    1.7070095724e-01    1.8579925941e-01    2.0144774639e-01    
+2.1764816239e-01    2.3438388255e-01    2.5163842356e-01    2.6941174049e-01    2.8769182152e-01    
+3.0644317076e-01    3.2567750647e-01    3.4538183399e-01    3.6551933268e-01    3.8609003031e-01    
+4.0709217239e-01    4.2850311670e-01    4.5030122800e-01    4.7248935524e-01    4.9505251301e-01    
+5.1794872413e-01    5.4119180165e-01    5.6476604470e-01    5.8863425166e-01    6.1279403019e-01    
+6.3724031130e-01    6.6194783769e-01    6.8689374417e-01    7.1207989488e-01    7.3748923792e-01    
+7.6308101551e-01    7.8886652966e-01    8.1482829465e-01    8.4093699998e-01    8.6718556520e-01    
+8.9356294862e-01    9.2005118980e-01    9.4663222633e-01    9.7328790616e-01    1.0000000000e+00    
+-5.6824618780e-03   -5.3378396158e-03   -4.3042090161e-03   -2.5822784776e-03   -1.8984960146e-04   
+2.8798658740e-03    6.6331289962e-03    1.1063293086e-02    1.6163329954e-02    2.1938048658e-02    
+2.8383541763e-02    3.5471404628e-02    4.3221239134e-02    5.1627815968e-02    6.0677653486e-02    
+7.0368728060e-02    8.0698432282e-02    9.1652238873e-02    1.0321557360e-01    1.1539590301e-01    
+1.2818500096e-01    1.4156353463e-01    1.5553348376e-01    1.7008540483e-01    1.8518241088e-01    
+2.0082909303e-01    2.1702868048e-01    2.3376389184e-01    2.5101764758e-01    2.6879130514e-01    
+2.8707287258e-01    3.0582411992e-01    3.2505968920e-01    3.4476660722e-01    3.6490527700e-01    
+3.8547737113e-01    4.0648260300e-01    4.2789734675e-01    4.4969913616e-01    4.7189293442e-01    
+4.9446377855e-01    5.1736653108e-01    5.4061851158e-01    5.6420404028e-01    5.8808340356e-01    
+6.1225586331e-01    6.3671770898e-01    6.6144266077e-01    6.8640713568e-01    7.1161524140e-01    
+7.3704993591e-01    7.6266766623e-01    7.8848314864e-01    8.1447889903e-01    8.4062421308e-01    
+8.6691327196e-01    8.9333583300e-01    9.1987391874e-01    9.4650944349e-01    9.7322422562e-01    
+1.0000000000e+00    -6.3467562366e-03   -6.0019063374e-03   -4.9675929824e-03   -3.2445250384e-03   
+-8.5244797919e-04   2.2164119426e-03    5.9692942365e-03    1.0399076179e-02    1.5498263170e-02    
+2.1272635651e-02    2.7718292302e-02    3.4804024202e-02    4.2552294076e-02    5.0957883274e-02    
+6.0006408318e-02    6.9696334978e-02    8.0025528260e-02    9.0978590568e-02    1.0254012202e-01    
+1.1471938971e-01    1.2750818244e-01    1.4088593218e-01    1.5485592255e-01    1.6940872527e-01    
+1.8450430649e-01    2.0014900458e-01    2.1634768119e-01    2.3308233323e-01    2.5033522571e-01    
+2.6810925772e-01    2.8639245918e-01    3.0514359452e-01    3.2438051986e-01    3.4409028563e-01    
+3.6423024280e-01    3.8480387210e-01    4.0581250059e-01    4.2723142108e-01    4.4903725386e-01    
+4.7123728630e-01    4.9381658007e-01    5.1672652360e-01    5.3998829118e-01    5.6358622626e-01    
+5.8747785373e-01    6.1166425400e-01    6.3614320987e-01    6.6088731748e-01    6.8587220475e-01    
+7.1110444572e-01    7.3656700920e-01    7.6221326948e-01    7.8806169613e-01    8.1409480684e-01    
+8.4028036501e-01    8.6661393876e-01    8.9308616376e-01    9.1967904386e-01    9.4637446776e-01    
+9.7315422132e-01    1.0000000000e+00    -7.0770180521e-03   -6.7319179104e-03   -5.6968539994e-03   
+-3.9725357004e-03   -1.5808453952e-03   1.4870740126e-03    5.2395376601e-03    9.6688995057e-03    
+1.4767152223e-02    2.0541144100e-02    2.6986980539e-02    3.4070369859e-02    4.1816919726e-02    
+5.0221423212e-02    5.9268505447e-02    6.8957170199e-02    7.9285801803e-02    9.0238045916e-02    
+1.0179759502e-01    1.1397569556e-01    1.2676415275e-01    1.4014104072e-01    1.5411107643e-01    
+1.6866484834e-01    1.8375886324e-01    1.9940138024e-01    2.1559905557e-01    2.3233309275e-01    
+2.4958503625e-01    2.6735947989e-01    2.8564447764e-01    3.0439548984e-01    3.2363390591e-01    
+3.4334680221e-01    3.6348817462e-01    3.8406349154e-01    4.0507585396e-01    4.2649936596e-01    
+4.4830964363e-01    4.7051652933e-01    4.9310511184e-01    5.1602296047e-01    5.3929548703e-01    
+5.6290706049e-01    5.8681217005e-01    6.1101389519e-01    6.3551166037e-01    6.6027682607e-01    
+6.8528415275e-01    7.1054292569e-01    7.3603612567e-01    7.6171374907e-01    7.8759839146e-01    
+8.1367257254e-01    8.3990237126e-01    8.6628488041e-01    8.9281170123e-01    9.1946481702e-01    
+9.4622608832e-01    9.7307726527e-01    1.0000000000e+00    -7.8797981936e-03   -7.5344229591e-03   
+-6.4985339586e-03   -4.7728411386e-03   -2.3815759938e-03   6.8530950268e-04    4.4373129303e-03    
+8.8662129618e-03    1.3963438628e-02    1.9737012105e-02    2.6183046185e-02    3.3263860296e-02    
+4.1008519352e-02    4.9411829309e-02    5.8457325458e-02    6.8144602990e-02    7.8472617138e-02    
+8.9423961806e-02    1.0098133171e-01    1.1315814918e-01    1.2594623752e-01    1.3932217815e-01    
+1.5329226368e-01    1.6784710105e-01    1.8293939408e-01    1.9857951340e-01    2.1477608802e-01    
+2.3150944927e-01    2.4876034956e-01    2.6653524571e-01    2.8482221812e-01    3.0357309496e-01    
+3.2281314979e-01    3.4252948751e-01    3.6267241569e-01    3.8324958783e-01    4.0426605496e-01    
+4.2569461443e-01    4.4750977838e-01    4.6972419790e-01    4.9232299156e-01    5.1524953031e-01    
+5.3853388427e-01    5.6216045047e-01    5.8608038094e-01    6.1029895279e-01    6.3481739513e-01    
+6.5960571009e-01    6.8463770450e-01    7.0992564417e-01    7.3545252298e-01    7.6116462400e-01    
+7.8708907854e-01    8.1320840845e-01    8.3948684101e-01    8.6592314507e-01    8.9250998331e-01    
+9.1922931647e-01    9.4606297413e-01    9.7299266714e-01    1.0000000000e+00    -8.7622980613e-03   
+-8.4166204161e-03   -7.3798243909e-03   -5.6526205537e-03   -3.2618227896e-03   -1.9607387661e-04   
+3.5554236292e-03    7.9838159863e-03    1.3079912610e-02    1.8853026139e-02    2.5299277486e-02    
+3.2377260659e-02    4.0119841138e-02    4.8521839042e-02    5.7565591600e-02    6.7251344153e-02    
+7.7578679529e-02    8.8529035434e-02    1.0008400973e-01    1.1225941673e-01    1.2504709959e-01    
+1.3842199879e-01    1.5239213911e-01    1.6694814772e-01    1.8203854790e-01    1.9767603143e-01    
+2.1387139603e-01    2.3060401424e-01    2.4785376771e-01    2.6562916132e-01    2.8391830448e-01    
+3.0266903252e-01    3.2191088885e-01    3.4163100974e-01    3.6177564818e-01    3.8235485976e-01    
+4.0337583924e-01    4.2480994740e-01    4.4663048288e-01    4.6885318436e-01    4.9146320318e-01    
+5.1439929501e-01    5.3769665088e-01    5.6133969866e-01    5.8527592185e-01    6.0951301335e-01    
+6.3405418620e-01    6.5886794923e-01    6.8392706100e-01    7.0924706379e-01    7.3481096589e-01    
+7.6056096831e-01    7.8652918852e-01    8.1269815075e-01    8.3903004672e-01    8.6552548775e-01    
+8.9217830344e-01    9.1897042965e-01    9.4588366196e-01    9.7289966802e-01    1.0000000000e+00    
+-9.7324341872e-03   -9.3864241006e-03   -8.3486309790e-03   -6.6197660738e-03   -4.2294821035e-03   
+-1.1649826418e-03   2.5859587018e-03    7.0137929702e-03    1.2108648432e-02    1.7881256338e-02    
+2.4327746528e-02    3.1402617638e-02    3.9142913127e-02    4.7543468687e-02    5.6585304506e-02    
+6.6269380644e-02    7.6595969843e-02    8.7545238795e-02    9.9097579585e-02    1.1127143605e-01    
+1.2405867316e-01    1.3743242753e-01    1.5140262806e-01    1.6595992423e-01    1.8104824358e-01    
+1.9668282959e-01    2.1287686401e-01    2.2960866539e-01    2.4685715816e-01    2.6463309861e-01    
+2.8292462810e-01    3.0167519256e-01    3.2091902928e-01    3.4064330902e-01    3.6078982758e-01    
+3.8137128112e-01    4.0239722103e-01    4.2383742891e-01    4.4566386932e-01    4.6789567520e-01    
+4.9051803390e-01    5.1346462747e-01    5.3677627640e-01    5.6043744247e-01    5.8439157629e-01    
+6.0864902654e-01    6.3321518713e-01    6.5805692535e-01    6.8314584736e-01    7.0850109727e-01    
+7.3410569926e-01    7.5989736686e-01    7.8591369886e-01    8.1213722214e-01    8.3852789067e-01    
+8.6508834126e-01    8.9181368623e-01    9.1868583418e-01    9.4568654327e-01    9.7279743367e-01    
+1.0000000000e+00    -1.0798909251e-02   -1.0452533710e-02   -9.4136444759e-03   -7.6829535510e-03   
+-5.2932343966e-03   -2.2301084625e-03   1.5202214895e-03    5.9474422484e-03    1.1040933296e-02    
+1.6812985367e-02    2.3259738118e-02    3.0331188123e-02    3.8068971713e-02    4.6467941697e-02    
+5.5507670437e-02    6.5189903684e-02    7.5515672607e-02    8.6463746667e-02    9.8013192436e-02    
+1.1018534438e-01    1.2297209148e-01    1.3634458732e-01    1.5031485405e-01    1.6487356565e-01    
+1.7995959754e-01    1.9559099828e-01    2.1178357043e-01    2.2851447386e-01    2.4576158074e-01    
+2.6353812234e-01    2.8183227513e-01    3.0058265976e-01    3.1982867354e-01    3.3955752513e-01    
+3.5970611049e-01    3.8029002864e-01    4.0132142157e-01    4.2276833489e-01    4.4460126663e-01    
+4.6684308101e-01    4.8947900499e-01    5.1243714319e-01    5.3576450455e-01    5.5944558812e-01    
+5.8341941120e-01    6.0769924191e-01    6.3229287164e-01    6.5716536311e-01    6.8228705564e-01    
+7.0768105289e-01    7.3333039643e-01    7.5916786676e-01    7.8523708828e-01    8.1152059076e-01    
+8.3797586823e-01    8.6460778412e-01    8.9141286088e-01    9.1837297709e-01    9.4546984980e-01    
+9.7268504698e-01    1.0000000000e+00    -1.1971290149e-02   -1.1624512862e-02   -1.0584418666e-02   
+-8.8517203896e-03   -6.4626221398e-03   -3.4010061309e-03   3.4865171564e-04    4.7751980407e-03    
+9.8671891811e-03    1.5638630222e-02    2.2085671607e-02    2.9153360776e-02    3.6888383022e-02    
+4.5285609976e-02    5.4323022394e-02    6.4003229742e-02    7.4328096933e-02    8.5274857443e-02    
+9.6821120701e-02    1.0899139887e-01    1.2177760729e-01    1.3514871962e-01    1.4911905913e-01    
+1.6367932671e-01    1.7876284398e-01    1.9439074315e-01    2.1058170781e-01    2.2731162412e-01    
+2.4455720749e-01    2.6233440994e-01    2.8063144653e-01    2.9938163348e-01    3.1863004051e-01    
+3.3836391794e-01    3.5851477536e-01    3.7910140287e-01    4.0013879033e-01    4.2159307498e-01    
+4.4343314266e-01    4.6568595943e-01    4.8833679579e-01    5.1130762503e-01    5.3465225914e-01    
+5.5835523812e-01    5.8235070568e-01    6.0665513933e-01    6.3127896601e-01    6.5618526467e-01    
+6.8134298199e-01    7.0677957436e-01    7.3247810250e-01    7.5836592398e-01    7.8449328719e-01    
+8.1084272507e-01    8.3736902745e-01    8.6407950547e-01    8.9097223175e-01    9.1802905186e-01    
+9.4523163768e-01    9.7256149978e-01    1.0000000000e+00    -1.3260093812e-02   -1.2912874884e-02   
+-1.1871456069e-02   -1.0136551101e-02   -7.7481354147e-03   -4.6881792733e-03   -9.3926027547e-04   
+3.4865446414e-03    8.5768869273e-03    1.4347656258e-02    2.0795014942e-02    2.7858569805e-02    
+3.5590556495e-02    4.3985867327e-02    5.3020733402e-02    6.2698713671e-02    7.3022589582e-02    
+8.3967906100e-02    9.5510670812e-02    1.0767888912e-01    1.2046450537e-01    1.3383409682e-01    
+1.4780451632e-01    1.6236649440e-01    1.7744724734e-01    1.9307129721e-01    2.0926049475e-01    
+2.2598932593e-01    2.4323323449e-01    2.6101116341e-01    2.7931137018e-01    2.9806133982e-01    
+3.1731237776e-01    3.3705178013e-01    3.5720513522e-01    3.7779474113e-01    3.9883871842e-01    
+4.2030110639e-01    4.4214901865e-01    4.6441393041e-01    4.8708116000e-01    5.1006594058e-01    
+5.3342956269e-01    5.5715661139e-01    5.8117587283e-01    6.0550735261e-01    6.3016437494e-01    
+6.5510783799e-01    6.8030515753e-01    7.0578857490e-01    7.3154117191e-01    7.5748434463e-01    
+7.8367562326e-01    8.1009754423e-01    8.3670192462e-01    8.6349876635e-01    8.9048784613e-01    
+9.1765097329e-01    9.4496977001e-01    9.7242568378e-01    1.0000000000e+00    -1.4676881552e-02   
+-1.4329177126e-02   -1.3286302150e-02   -1.1548971357e-02   -9.1613060156e-03   -6.1031745742e-03   
+-2.3550677961e-03   2.0699220874e-03    7.1584517799e-03    1.2928482698e-02    1.9376190188e-02    
+2.6435200191e-02    3.4163849880e-02    4.2557054310e-02    5.1589121178e-02    6.1264653209e-02    
+7.1587439403e-02    8.2531168534e-02    9.4070087277e-02    1.0623604118e-01    1.1902100645e-01    
+1.3238892597e-01    1.4635943342e-01    1.6092329186e-01    1.7600100596e-01    1.9162082428e-01    
+2.0780807922e-01    2.2453571750e-01    2.4177778494e-01    2.5955651248e-01    2.7786020423e-01    
+2.9660993498e-01    3.1586386509e-01    3.3560934105e-01    3.5576544185e-01    3.7635832194e-01    
+3.9740954344e-01    4.1888083944e-01    4.4073737527e-01    4.6301558310e-01    4.8570083386e-01    
+5.0870095120e-01    5.3208544691e-01    5.5583895557e-01    5.7988437373e-01    6.0424558544e-01    
+6.2893909989e-01    6.5392341794e-01    6.7916427237e-01    7.0469916468e-01    7.3051119983e-01    
+7.5651522043e-01    7.8277676157e-01    8.0927836354e-01    8.3596857544e-01    8.6286035718e-01    
+8.8995535882e-01    9.1723534980e-01    9.4468189769e-01    9.7227638064e-01    1.0000000000e+00    
+-1.6234362770e-02   -1.5886124635e-02   -1.4841648895e-02   -1.3101651381e-02   -1.0714810897e-02   
+-7.6586853564e-03   -3.9114714552e-03   5.1262245847e-04    5.5991595588e-03    1.1368378736e-02    
+1.7816469671e-02    2.4870483488e-02    3.2595464796e-02    4.0986353650e-02    5.0015343338e-02    
+5.9688184009e-02    7.0009772271e-02    8.0951756381e-02    9.2486447232e-02    1.0464991186e-01    
+1.1743416152e-01    1.3080024308e-01    1.4477084721e-01    1.5933677272e-01    1.7441114622e-01    
+1.9002631278e-01    2.0621143221e-01    2.2293775912e-01    2.4017780261e-01    2.5795740807e-01    
+2.7626493089e-01    2.9501439902e-01    3.1427150851e-01    3.3402366119e-01    3.5418278036e-01    
+3.7477925977e-01    3.9583844487e-01    4.1731953351e-01    4.3918554928e-01    4.6147837354e-01    
+4.8418343504e-01    5.0720041215e-01    5.3060785431e-01    5.5439045052e-01    5.7846462288e-01    
+6.0285851904e-01    6.2759214944e-01    6.5262137957e-01    6.7791009211e-01    7.0350157106e-01    
+7.2937894683e-01    7.5544985778e-01    7.8178863883e-01    8.0837783447e-01    8.3516240134e-01    
+8.6215855108e-01    8.8936999309e-01    9.1677845300e-01    9.4436543833e-01    9.7211225101e-01    
+1.0000000000e+00    -1.7946508971e-02   -1.7597684126e-02   -1.6551448658e-02   -1.4808519606e-02   
+-1.2422585892e-02   -9.3686654475e-03   -5.6224330899e-03   -1.1993241200e-03   3.8850225146e-03    
+9.6533493413e-03    1.6101861799e-02    2.3150383287e-02    3.0871331927e-02    3.9259675257e-02    
+4.8285282186e-02    5.7955164233e-02    6.8275435604e-02    7.9215501404e-02    9.0745544514e-02    
+1.0290627266e-01    1.1568973564e-01    1.2905379674e-01    1.4302450714e-01    1.5759270501e-01    
+1.7266340616e-01    1.8827345902e-01    2.0445623088e-01    2.2118111620e-01    2.3841893475e-01    
+2.5619950531e-01    2.7451123963e-01    2.9326041907e-01    3.1252102366e-01    3.3228051610e-01    
+3.5244295338e-01    3.7304338953e-01    3.9411132905e-01    4.1560318278e-01    4.3747961989e-01    
+4.5978851206e-01    4.8251535161e-01    5.0555086274e-01    5.2898353003e-01    5.5279810232e-01    
+5.7690388430e-01    6.0133371063e-01    6.2611144068e-01    6.5119004286e-01    6.7653136604e-01    
+7.0218505094e-01    7.2813425595e-01    7.5427869976e-01    7.8070239099e-01    8.0738787876e-01    
+8.3427617048e-01    8.6138705243e-01    8.8872649787e-01    9.1627618426e-01    9.4401755312e-01    
+9.7193182256e-01    1.0000000000e+00    -1.9828679091e-02   -1.9479209273e-02   -1.8431039330e-02   
+-1.6684887624e-02   -1.4299950726e-02   -1.1248454354e-02   -7.5033010115e-03   -3.0812747948e-03   
+2.0006638510e-03    7.7680097127e-03    1.4216985552e-02    2.1259469297e-02    2.8975984808e-02    
+3.7361529831e-02    4.6383418078e-02    5.6050047696e-02    6.6368871402e-02    7.7306828395e-02    
+8.8831762224e-02    1.0098948216e-01    1.1377208033e-01    1.2713392032e-01    1.4110474755e-01    
+1.5567544343e-01    1.7074210755e-01    1.8634653889e-01    2.0252673005e-01    2.1925003063e-01    
+2.3648540329e-01    2.5426703480e-01    2.7258339885e-01    2.9133226092e-01    3.1059670770e-01    
+3.3036426876e-01    3.5053035365e-01    3.7113513946e-01    3.9221270277e-01    4.1371639061e-01    
+4.3560428394e-01    4.5793083963e-01    4.8068161989e-01    5.0373750556e-01    5.2719790294e-01    
+5.5104762668e-01    5.7518815727e-01    5.9965748179e-01    6.2448369080e-01    6.4961656790e-01    
+6.7501572619e-01    7.0073779437e-01    7.2676596160e-01    7.5299124042e-01    7.7950827379e-01    
+8.0629961594e-01    8.3330193285e-01    8.6053894044e-01    8.8801910065e-01    9.1572403795e-01    
+9.4363512132e-01    9.7173347674e-01    1.0000000000e+00    -2.1897757281e-02   -2.1547578442e-02   
+-2.0497281920e-02   -1.8747587536e-02   -1.6363746443e-02   -1.3314914864e-02   -9.5709476885e-03   
+-5.1501117474e-03   -7.0820214750e-05   5.6954472677e-03    1.2144932505e-02    1.9180778932e-02    
+2.6892421082e-02    3.5274889915e-02    4.4292690198e-02    5.3955744406e-02    6.4272976688e-02    
+7.5208615460e-02    8.6727932631e-02    9.8882345618e-02    1.1166399311e-01    1.2502339141e-01    
+1.3899434708e-01    1.5356778904e-01    1.6863001523e-01    1.8422826681e-01    2.0040562100e-01    
+2.1712717947e-01    2.3435986335e-01    2.5214266116e-01    2.7046411469e-01    2.8921262788e-01    
+3.0848129839e-01    3.2825772933e-01    3.4842782405e-01    3.6903739147e-01    3.9012553424e-01    
+4.1164223137e-01    4.3354271859e-01    4.5588869187e-01    4.7866579025e-01    5.0174407374e-01    
+5.2523495496e-01    5.4912332084e-01    5.7330205072e-01    5.9781479579e-01    6.2269429793e-01    
+6.4788683970e-01    6.7334957639e-01    6.9914681863e-01    7.2526178938e-01    7.5157593050e-01    
+7.7819557531e-01    8.0510328367e-01    8.3223094899e-01    8.5960660708e-01    8.8724145566e-01    
+9.1511706100e-01    9.4321471230e-01    9.7151543429e-01    1.0000000000e+00    -2.4172304364e-02   
+-2.3821346094e-02   -2.2768711815e-02   -2.1015122949e-02   -1.8632486479e-02   -1.5586584320e-02   
+-1.1843921103e-02   -7.4243936367e-03   -2.3480120876e-03   3.4170699276e-03    9.8671151478e-03    
+1.6895665140e-02    2.4601949985e-02    3.2981037147e-02    4.1994343513e-02    5.1653467256e-02    
+6.1968950077e-02    7.2902040418e-02    8.4415183173e-02    9.6565960818e-02    1.0934656323e-01    
+1.2270327738e-01    1.3667437423e-01    1.5125083496e-01    1.6630818253e-01    1.8189964066e-01    
+1.9807387616e-01    2.1479351951e-01    2.3202324760e-01    2.4980732753e-01    2.6813437595e-01    
+2.8688250563e-01    3.0615581930e-01    3.2594200093e-01    3.4611650368e-01    3.6673132755e-01    
+3.8783110037e-01    4.0936209868e-01    4.3127643040e-01    4.5364374953e-01    4.7644977955e-01    
+4.9955268507e-01    5.2307707729e-01    5.4700792266e-01    5.7122864520e-01    5.9578912267e-01    
+6.2072721019e-01    6.4598534161e-01    6.7151797033e-01    6.9739785175e-01    7.2360824600e-01    
+7.5002007385e-01    7.7675251989e-01    8.0378815014e-01    8.3105361155e-01    8.5858168876e-01    
+8.8638658698e-01    9.1444980847e-01    9.4275255475e-01    9.7127573922e-01    1.0000000000e+00    
+-2.6672724336e-02   -2.6320909235e-02   -2.5265705049e-02   -2.3507834962e-02   -2.1126522739e-02   
+-1.8083840904e-02   -1.4342611134e-02   -9.9245220812e-03   -4.8513394903e-03   9.1243933550e-04    
+7.3631001477e-03    1.4383629137e-02    2.2084024669e-02    3.0459394347e-02    3.9467760528e-02    
+4.9122563494e-02    5.9436123125e-02    7.0366411965e-02    8.1872767154e-02    9.4019548452e-02    
+1.0679900199e-01    1.2015276544e-01    1.3412401751e-01    1.4870379679e-01    1.6375578125e-01    
+1.7933977133e-01    1.9551057843e-01    2.1222811649e-01    2.2945459527e-01    2.4724008463e-01    
+2.6557328354e-01    2.8432099161e-01    3.0359940953e-01    3.2339631015e-01    3.4357565867e-01    
+3.6419626097e-01    3.8530881876e-01    4.0685553841e-01    4.2878508946e-01    4.5117587418e-01    
+4.7401370888e-01    4.9714368151e-01    5.2070491254e-01    5.4468245580e-01    5.6894934107e-01    
+5.9356229098e-01    6.1856478168e-01    6.4389501609e-01    6.6950447743e-01    6.9547520449e-01    
+7.2179049823e-01    7.4830971355e-01    7.7516616250e-01    8.0234241787e-01    8.2975935914e-01    
+8.5745499138e-01    8.8544682594e-01    9.1371629472e-01    9.4224450285e-01    9.7101224133e-01    
+1.0000000000e+00    -2.9421447406e-02   -2.9068690387e-02   -2.8010661090e-02   -2.6248084636e-02   
+-2.3868228164e-02   -2.0829086447e-02   -1.7089432472e-02   -1.2672924673e-02   -7.6032587113e-03   
+-1.8409124877e-03   4.6104250477e-03    1.1622136511e-02    1.9316057897e-02    2.7687340925e-02    
+3.6690276340e-02    4.6340329455e-02    5.6651774915e-02    6.7578984051e-02    7.9077877640e-02    
+9.1220265735e-02    1.0399845631e-01    1.1734897605e-01    1.3132039874e-01    1.4590382611e-01    
+1.6094991490e-01    1.7652569530e-01    1.9269273355e-01    2.0940795725e-01    2.2663086405e-01    
+2.4441790282e-01    2.6275786299e-01    2.8150510758e-01    3.0078913663e-01    3.2059782068e-01    
+3.4078249617e-01    3.6140945072e-01    3.8253606309e-01    4.0410006529e-01    4.2604634702e-01    
+4.4846292757e-01    4.7133572530e-01    4.9449545292e-01    5.1809718101e-01    5.4212605948e-01    
+5.6644369165e-01    5.9111432476e-01    6.1618761417e-01    6.4159711172e-01    6.6729103552e-01    
+6.9336162959e-01    7.1979223983e-01    7.4642950667e-01    7.7342227258e-01    8.0075311779e-01    
+8.2833658157e-01    8.5621640782e-01    8.8441374235e-01    9.1290993971e-01    9.4168599908e-01    
+9.7072257691e-01    1.0000000000e+00    -3.2443131203e-02   -3.2089338728e-02   -3.1028203774e-02   
+-2.9260453590e-02   -2.6882197432e-02   -2.3846947382e-02   -2.0109025686e-02   -1.5694256166e-02   
+-1.0628456051e-02   -4.8676846935e-03   1.5843967667e-03    8.5864150841e-03    1.6273219410e-02    
+2.4640009967e-02    3.3636975315e-02    4.3281806898e-02    5.3590928240e-02    6.4514751844e-02    
+7.6005442861e-02    8.8143001488e-02    1.0091980369e-01    1.1426675760e-01    1.2823836785e-01    
+1.4282580559e-01    1.5786541323e-01    1.7343216871e-01    1.8959506384e-01    2.0630774335e-01    
+2.2352672346e-01    2.4131546549e-01    2.5966285834e-01    2.7840959343e-01    2.9769979082e-01    
+3.1752142845e-01    3.3771195990e-01    3.5834589752e-01    3.7948796014e-01    4.0107096113e-01    
+4.2303563498e-01    4.4548057300e-01    4.6839180574e-01    4.9158424316e-01    5.1523048987e-01    
+5.3931580136e-01    5.6368921982e-01    5.8842326433e-01    6.1357438308e-01    6.3907101498e-01    
+6.6485778874e-01    6.9103816708e-01    7.1759554526e-01    7.4436258669e-01    7.7150520645e-01    
+7.9900599297e-01    8.2677251570e-01    8.5485482726e-01    8.8327806885e-01    9.1202350998e-01    
+9.4107203333e-01    9.7040414749e-01    1.0000000000e+00    -3.5764881970e-02   -3.5409951213e-02   
+-3.4345402197e-02   -3.2571964508e-02   -3.0195467582e-02   -2.7164495660e-02   -2.3428478265e-02   
+-1.9015619644e-02   -1.3954069272e-02   -8.1950291719e-03   -1.7421299117e-03   5.2492326860e-03    
+1.2928213196e-02    2.1290065158e-02    3.0280467585e-02    3.9919559114e-02    5.0226125543e-02    
+6.1146227415e-02    7.2627901308e-02    8.4760150879e-02    9.7535426835e-02    1.1087846080e-01    
+1.2485027725e-01    1.3944212361e-01    1.5447460649e-01    1.7003144082e-01    1.8618978141e-01    
+2.0289966408e-01    2.2011432756e-01    2.3790494200e-01    2.5626050563e-01    2.7500668062e-01    
+2.9430365890e-01    3.1413953645e-01    3.3433650539e-01    3.5497811953e-01    3.7613716669e-01    
+3.9774105313e-01    4.1972594551e-01    4.4220205702e-01    4.6515554156e-01    4.8838393701e-01    
+5.1207912323e-01    5.3622647180e-01    5.6066121639e-01    5.8546496935e-01    6.1070164625e-01    
+6.3629406532e-01    6.6218290947e-01    6.8848397415e-01    7.1518070891e-01    7.4209041213e-01    
+7.6939776692e-01    7.9708537070e-01    8.2505313096e-01    8.5335803556e-01    8.8202961780e-01    
+9.1104905374e-01    9.4039709800e-01    9.7005409658e-01    1.0000000000e+00    -3.9416497724e-02   
+-3.9060315651e-02   -3.7992013539e-02   -3.6212323550e-02   -3.3837760557e-02   -3.0811491599e-02   
+-2.7077567612e-02   -2.2666809651e-02   -1.7609931040e-02   -1.1852794119e-02   -5.3989958478e-03   
+1.5806528687e-03    9.2510326226e-03    1.7607455565e-02    2.6590643342e-02    3.6223424803e-02    
+4.6527182604e-02    5.7443193160e-02    6.8914954488e-02    8.1041367789e-02    9.3814965934e-02    
+1.0715369070e-01    1.2112573381e-01    1.3572242658e-01    1.5074707719e-01    1.6629300516e-01    
+1.8244633891e-01    1.9915314701e-01    2.1636306520e-01    2.3415573798e-01    2.5252028379e-01    
+2.7126584306e-01    2.9057027560e-01    3.1042180716e-01    3.3062585287e-01    3.5127590583e-01    
+3.7245362417e-01    3.9408047008e-01    4.1608758879e-01    4.3859796948e-01    4.6159790160e-01    
+4.8486582588e-01    5.0861481152e-01    5.3283035774e-01    5.5733251842e-01    5.8221290219e-01    
+6.0754363355e-01    6.3324135191e-01    6.5924240249e-01    6.8567613822e-01    7.1252606831e-01    
+7.3959260028e-01    7.6708104904e-01    7.9497402188e-01    8.2316300349e-01    8.5171260561e-01    
+8.8065718987e-01    9.0997782955e-01    9.3965513851e-01    9.6966928402e-01    1.0000000000e+00    
+-4.3430735563e-02   -4.3073177911e-02   -4.2000750004e-02   -4.0214186833e-02   -3.7841749820e-02   
+-3.4820650854e-02   -3.1089028160e-02   -2.6680579463e-02   -2.1628836541e-02   -1.5873791794e-02   
+-9.4190052351e-03   -2.4522336415e-03   5.2086912616e-03    1.3559146058e-02    2.2534402738e-02    
+3.2160247513e-02    4.2460917776e-02    5.3372430730e-02    6.4833295129e-02    7.6953292592e-02    
+8.9725046312e-02    1.0305903395e-01    1.1703132624e-01    1.3163334670e-01    1.4664938724e-01    
+1.6218332580e-01    1.7833115552e-01    1.9503458373e-01    2.1223928539e-01    2.3003422092e-01    
+2.4840864088e-01    2.6715352329e-01    2.8646615032e-01    3.0633489042e-01    3.2654671564e-01    
+3.4720604544e-01    3.6840428910e-01    3.9005637446e-01    4.1208792667e-01    4.3463597961e-01    
+4.5768697177e-01    4.8099835027e-01    5.0480647787e-01    5.2909699408e-01    5.5367326557e-01    
+5.7863788994e-01    6.0407201581e-01    6.2988549014e-01    6.5600988978e-01    6.8258947139e-01    
+7.0960780979e-01    7.3684674434e-01    7.6453427051e-01    7.9265300650e-01    8.2108517774e-01    
+8.4990377698e-01    8.7914847359e-01    9.0880022791e-01    9.3883949906e-01    9.6924625782e-01    
+1.0000000000e+00    -4.7444973402e-02   -4.7086040170e-02   -4.6009486470e-02   -4.4216050116e-02   
+-4.1845739084e-02   -3.8829810109e-02   -3.5100488707e-02   -3.0694349275e-02   -2.5647742042e-02   
+-1.9894789468e-02   -1.3439014622e-02   -6.4851201518e-03   1.1663499007e-03    9.5108365511e-03    
+1.8478162134e-02    2.8097070223e-02    3.8394652948e-02    4.9301668300e-02    6.0751635770e-02    
+7.2865217395e-02    8.5635126690e-02    9.8964377204e-02    1.1293691866e-01    1.2754426681e-01    
+1.4255169730e-01    1.5807364645e-01    1.7421597212e-01    1.9091602044e-01    2.0811550558e-01    
+2.2591270386e-01    2.4429699797e-01    2.6304120352e-01    2.8236202505e-01    3.0224797367e-01    
+3.2246757841e-01    3.4313618506e-01    3.6435495403e-01    3.8603227884e-01    4.0808826455e-01    
+4.3067398974e-01    4.5377604195e-01    4.7713087467e-01    5.0099814422e-01    5.2536363042e-01    
+5.5001401273e-01    5.7506287769e-01    6.0060039806e-01    6.2652962837e-01    6.5277737706e-01    
+6.7950280456e-01    7.0668955128e-01    7.3410088839e-01    7.6198749199e-01    7.9033199113e-01    
+8.1900735199e-01    8.4809494834e-01    8.7763975732e-01    9.0762262628e-01    9.3802385961e-01    
+9.6882323162e-01    1.0000000000e+00    -5.1459211241e-02   -5.1098902430e-02   -5.0018222935e-02   
+-4.8217913400e-02   -4.5849728348e-02   -4.2838969364e-02   -3.9111949255e-02   -3.4708119087e-02   
+-2.9666647543e-02   -2.3915787142e-02   -1.7459024010e-02   -1.0518006662e-02   -2.8759914603e-03   
+5.4625270442e-03    1.4421921530e-02    2.4033892933e-02    3.4328388121e-02    4.5230905870e-02    
+5.6669976412e-02    6.8777142199e-02    8.1545207068e-02    9.4869720456e-02    1.0884251109e-01    
+1.2345518692e-01    1.3845400735e-01    1.5396396709e-01    1.7010078873e-01    1.8679745716e-01    
+2.0399172577e-01    2.2179118680e-01    2.4018535506e-01    2.5892888375e-01    2.7825789978e-01    
+2.9816105693e-01    3.1838844118e-01    3.3906632467e-01    3.6030561896e-01    3.8200818322e-01    
+4.0408860243e-01    4.2671199988e-01    4.4986511213e-01    4.7326339907e-01    4.9718981058e-01    
+5.2163026676e-01    5.4635475988e-01    5.7148786544e-01    5.9712878031e-01    6.2317376661e-01    
+6.4954486434e-01    6.7641613773e-01    7.0377129277e-01    7.3135503245e-01    7.5944071346e-01    
+7.8801097575e-01    8.1692952625e-01    8.4628611970e-01    8.7613104104e-01    9.0644502465e-01    
+9.3720822016e-01    9.6840020541e-01    1.0000000000e+00    -5.5473449080e-02   -5.5111764690e-02   
+-5.4026959401e-02   -5.2219776683e-02   -4.9853717612e-02   -4.6848128618e-02   -4.3123409802e-02   
+-3.8721888899e-02   -3.3685553044e-02   -2.7936784817e-02   -2.1479033397e-02   -1.4550893172e-02   
+-6.9183328213e-03   1.4142175372e-03    1.0365680926e-02    1.9970715643e-02    3.0262123293e-02    
+4.1160143440e-02    5.2588317053e-02    6.4689067002e-02    7.7455287446e-02    9.0775063708e-02    
+1.0474810352e-01    1.1936610703e-01    1.3435631741e-01    1.4985428773e-01    1.6598560534e-01    
+1.8267889387e-01    1.9986794597e-01    2.1766966974e-01    2.3607371215e-01    2.5481656398e-01    
+2.7415377450e-01    2.9407414018e-01    3.1430930395e-01    3.3499646429e-01    3.5625628389e-01    
+3.7798408760e-01    4.0008894032e-01    4.2275001001e-01    4.4595418230e-01    4.6939592346e-01    
+4.9338147693e-01    5.1789690310e-01    5.4269550703e-01    5.6791285320e-01    5.9365716257e-01    
+6.1981790484e-01    6.4631235163e-01    6.7332947090e-01    7.0085303426e-01    7.2860917651e-01    
+7.5689393494e-01    7.8568996037e-01    8.1485170050e-01    8.4447729107e-01    8.7462232476e-01    
+9.0526742301e-01    9.3639258071e-01    9.6797717921e-01    1.0000000000e+00    -5.9487686919e-02   
+-5.9124626950e-02   -5.8035695866e-02   -5.6221639967e-02   -5.3857706876e-02   -5.0857287873e-02   
+-4.7134870350e-02   -4.2735658711e-02   -3.7704458544e-02   -3.1957782491e-02   -2.5499042784e-02   
+-1.8583779683e-02   -1.0960674182e-02   -2.6340919697e-03   6.3094403222e-03    1.5907538353e-02    
+2.6195858465e-02    3.7089381010e-02    4.8506657694e-02    6.0600991805e-02    7.3365367824e-02    
+8.6680406960e-02    1.0065369595e-01    1.1527702714e-01    1.3025862746e-01    1.4574460838e-01    
+1.6187042195e-01    1.7856033058e-01    1.9574416616e-01    2.1354815268e-01    2.3196206924e-01    
+2.5070424420e-01    2.7004964923e-01    2.8998722344e-01    3.1023016673e-01    3.3092660390e-01    
+3.5220694882e-01    3.7395999198e-01    3.9608927820e-01    4.1878802015e-01    4.4204325248e-01    
+4.6552844786e-01    4.8957314328e-01    5.1416353944e-01    5.3903625419e-01    5.6433784095e-01    
+5.9018554482e-01    6.1646204307e-01    6.4307983891e-01    6.7024280407e-01    6.9793477574e-01    
+7.2586332056e-01    7.5434715641e-01    7.8336894500e-01    8.1277387475e-01    8.4266846243e-01    
+8.7311360848e-01    9.0408982138e-01    9.3557694126e-01    9.6755415301e-01    1.0000000000e+00    
+-6.3501924758e-02   -6.3137489210e-02   -6.2044432332e-02   -6.0223503250e-02   -5.7861696140e-02   
+-5.4866447128e-02   -5.1146330897e-02   -4.6749428523e-02   -4.1723364045e-02   -3.5978780166e-02   
+-2.9519052172e-02   -2.2616666193e-02   -1.5003015543e-02   -6.6824014766e-03   2.2531997182e-03    
+1.1844361063e-02    2.2129593637e-02    3.3018618580e-02    4.4424998335e-02    5.6512916608e-02    
+6.9275448202e-02    8.2585750211e-02    9.6559288374e-02    1.1118794725e-01    1.2616093751e-01    
+1.4163492902e-01    1.5775523855e-01    1.7444176730e-01    1.9162038635e-01    2.0942663562e-01    
+2.2785042633e-01    2.4659192443e-01    2.6594552395e-01    2.8590030670e-01    3.0615102950e-01    
+3.2685674352e-01    3.4815761375e-01    3.6993589636e-01    3.9208961608e-01    4.1482603028e-01    
+4.3813232265e-01    4.6166097226e-01    4.8576480964e-01    5.1043017578e-01    5.3537700134e-01    
+5.6076282870e-01    5.8671392708e-01    6.1310618131e-01    6.3984732620e-01    6.6715613724e-01    
+6.9501651723e-01    7.2311746462e-01    7.5180037789e-01    7.8104792962e-01    8.1069604900e-01    
+8.4085963380e-01    8.7160489221e-01    9.0291221975e-01    9.3476130181e-01    9.6713112680e-01    
+1.0000000000e+00    -6.7516162597e-02   -6.7150351470e-02   -6.6053168797e-02   -6.4225366533e-02   
+-6.1865685404e-02   -5.8875606383e-02   -5.5157791444e-02   -5.0763198335e-02   -4.5742269546e-02   
+-3.9999777840e-02   -3.3539061559e-02   -2.6649552703e-02   -1.9045356904e-02   -1.0730710984e-02   
+-1.8030408858e-03   7.7811837725e-03    1.8063328809e-02    2.8947856150e-02    4.0343338977e-02    
+5.2424841412e-02    6.5185528579e-02    7.8491093463e-02    9.2464880802e-02    1.0709886736e-01    
+1.2206324757e-01    1.3752524966e-01    1.5364005516e-01    1.7032320401e-01    1.8749660654e-01    
+2.0530511856e-01    2.2373878342e-01    2.4247960466e-01    2.6184139868e-01    2.8181338995e-01    
+3.0207189227e-01    3.2278688313e-01    3.4410827868e-01    3.6591180074e-01    3.8808995396e-01    
+4.1086404042e-01    4.3422139283e-01    4.5779349666e-01    4.8195647599e-01    5.0669681212e-01    
+5.3171774849e-01    5.5718781645e-01    5.8324230933e-01    6.0975031954e-01    6.3661481348e-01    
+6.6406947041e-01    6.9209825872e-01    7.2037160867e-01    7.4925359936e-01    7.7872691424e-01    
+8.0861822326e-01    8.3905080516e-01    8.7009617593e-01    9.0173461811e-01    9.3394566236e-01    
+9.6670810060e-01    1.0000000000e+00    -7.1530400436e-02   -7.1163213730e-02   -7.0061905263e-02   
+-6.8227229817e-02   -6.5869674668e-02   -6.2884765638e-02   -5.9169251992e-02   -5.4776968147e-02   
+-4.9761175047e-02   -4.4020775515e-02   -3.7559070946e-02   -3.0682439213e-02   -2.3087698265e-02   
+-1.4779020491e-02   -5.8592814898e-03   3.7180064824e-03    1.3997063982e-02    2.4877093720e-02    
+3.6261679618e-02    4.8336766215e-02    6.1095608957e-02    7.4396436715e-02    8.8370473229e-02    
+1.0300978748e-01    1.1796555762e-01    1.3341557031e-01    1.4952487177e-01    1.6620464073e-01    
+1.8337282673e-01    2.0118360150e-01    2.1962714050e-01    2.3836728489e-01    2.5773727341e-01    
+2.7772647321e-01    2.9799275504e-01    3.1871702274e-01    3.4005894361e-01    3.6188770512e-01    
+3.8409029184e-01    4.0690205055e-01    4.3031046301e-01    4.5392602105e-01    4.7814814234e-01    
+5.0296344846e-01    5.2805849564e-01    5.5361280420e-01    5.7977069158e-01    6.0639445777e-01    
+6.3338230076e-01    6.6098280358e-01    6.8918000020e-01    7.1762575273e-01    7.4670682084e-01    
+7.7640589887e-01    8.0654039751e-01    8.3724197652e-01    8.6858745965e-01    9.0055701648e-01    
+9.3313002291e-01    9.6628507440e-01    1.0000000000e+00    -7.5544638275e-02   -7.5176075990e-02   
+-7.4070641728e-02   -7.2229093100e-02   -6.9873663932e-02   -6.6893924892e-02   -6.3180712539e-02   
+-5.8790737959e-02   -5.3780080548e-02   -4.8041773189e-02   -4.1579080333e-02   -3.4715325724e-02   
+-2.7130039626e-02   -1.8827329997e-02   -9.9155220938e-03   -3.4517080772e-04   9.9307991538e-03    
+2.0806331290e-02    3.2180020259e-02    4.4248691018e-02    5.7005689335e-02    7.0301779967e-02    
+8.4276065657e-02    9.8920707587e-02    1.1386786768e-01    1.2930589095e-01    1.4540968837e-01    
+1.6208607744e-01    1.7924904692e-01    1.9706208444e-01    2.1551549759e-01    2.3425496512e-01    
+2.5363314813e-01    2.7363955646e-01    2.9391361781e-01    3.1464716236e-01    3.3600960854e-01    
+3.5786360950e-01    3.8009062972e-01    4.0294006069e-01    4.2639953318e-01    4.5005854545e-01    
+4.7433980870e-01    4.9923008479e-01    5.2439924280e-01    5.5003779196e-01    5.7629907384e-01    
+6.0303859601e-01    6.3014978805e-01    6.5789613675e-01    6.8626174169e-01    7.1487989679e-01    
+7.4416004231e-01    7.7408488349e-01    8.0446257176e-01    8.3543314789e-01    8.6707874337e-01    
+8.9937941485e-01    9.3231438346e-01    9.6586204820e-01    1.0000000000e+00    -7.9558876114e-02   
+-7.9188938250e-02   -7.8079378194e-02   -7.6230956384e-02   -7.3877653196e-02   -7.0903084147e-02   
+-6.7192173087e-02   -6.2804507771e-02   -5.7798986049e-02   -5.2062770863e-02   -4.5599089721e-02   
+-3.8748212234e-02   -3.1172380987e-02   -2.2875639504e-02   -1.3971762698e-02   -4.4083480978e-03   
+5.8645343260e-03    1.6735568860e-02    2.8098360900e-02    4.0160615822e-02    5.2915769713e-02    
+6.6207123219e-02    8.0181658084e-02    9.4831627698e-02    1.0977017773e-01    1.2519621159e-01    
+1.4129450498e-01    1.5796751416e-01    1.7512526712e-01    1.9294056738e-01    2.1140385468e-01    
+2.3014264534e-01    2.4952902286e-01    2.6955263972e-01    2.8983448059e-01    3.1057730197e-01    
+3.3196027346e-01    3.5383951388e-01    3.7609096760e-01    3.9897807082e-01    4.2248860336e-01    
+4.4619106985e-01    4.7053147505e-01    4.9549672113e-01    5.2073998995e-01    5.4646277971e-01    
+5.7282745609e-01    5.9968273424e-01    6.2691727533e-01    6.5480946992e-01    6.8334348318e-01    
+7.1213404084e-01    7.4161326379e-01    7.7176386811e-01    8.0238474602e-01    8.3362431925e-01    
+8.6557002710e-01    8.9820181322e-01    9.3149874401e-01    9.6543902199e-01    1.0000000000e+00    
+-8.3573113953e-02   -8.3201800510e-02   -8.2088114660e-02   -8.0232819667e-02   -7.7881642460e-02   
+-7.4912243402e-02   -7.1203633634e-02   -6.6818277583e-02   -6.1817891550e-02   -5.6083768538e-02   
+-4.9619099108e-02   -4.2781098744e-02   -3.5214722348e-02   -2.6923949011e-02   -1.8028003302e-02   
+-8.4715253880e-03   1.7982694981e-03    1.2664806430e-02    2.4016701541e-02    3.6072540625e-02    
+4.8825850091e-02    6.2112466470e-02    7.6087250512e-02    9.0742547810e-02    1.0567248779e-01    
+1.2108653223e-01    1.3717932159e-01    1.5384895087e-01    1.7100148731e-01    1.8881905032e-01    
+2.0729221177e-01    2.2603032557e-01    2.4542489758e-01    2.6546572297e-01    2.8575534336e-01    
+3.0650744159e-01    3.2791093839e-01    3.4981541826e-01    3.7209130549e-01    3.9501608096e-01    
+4.1857767354e-01    4.4232359425e-01    4.6672314140e-01    4.9176335747e-01    5.1708073710e-01    
+5.4288776746e-01    5.6935583834e-01    5.9632687247e-01    6.2368476261e-01    6.5172280309e-01    
+6.8042522467e-01    7.0938818490e-01    7.3906648526e-01    7.6944285274e-01    8.0030692027e-01    
+8.3181549062e-01    8.6406131082e-01    8.9702421158e-01    9.3068310456e-01    9.6501599579e-01    
+1.0000000000e+00    -8.7587351792e-02   -8.7214662770e-02   -8.6096851125e-02   -8.4234682950e-02   
+-8.1885631724e-02   -7.8921402657e-02   -7.5215094182e-02   -7.0832047395e-02   -6.5836797050e-02   
+-6.0104766212e-02   -5.3639108495e-02   -4.6813985254e-02   -3.9257063709e-02   -3.0972258518e-02   
+-2.2084243906e-02   -1.2534702678e-02   -2.2679953297e-03   8.5940440000e-03    1.9935042183e-02    
+3.1984465428e-02    4.4735930469e-02    5.8017809722e-02    7.1992842939e-02    8.6653467921e-02    
+1.0157479784e-01    1.1697685288e-01    1.3306413819e-01    1.4973038758e-01    1.6687770750e-01    
+1.8469753326e-01    2.0318056886e-01    2.2191800580e-01    2.4132077231e-01    2.6137880623e-01    
+2.8167620613e-01    3.0243758120e-01    3.2386160332e-01    3.4579132263e-01    3.6809164337e-01    
+3.9105409109e-01    4.1466674371e-01    4.3845611864e-01    4.6291480775e-01    4.8802999381e-01    
+5.1342148426e-01    5.3931275521e-01    5.6588422060e-01    5.9297101071e-01    6.2045224990e-01    
+6.4863613626e-01    6.7750696615e-01    7.0664232895e-01    7.3651970674e-01    7.6712183736e-01    
+7.9822909452e-01    8.3000666198e-01    8.6255259454e-01    8.9584660995e-01    9.2986746511e-01    
+9.6459296959e-01    1.0000000000e+00    -9.1601589631e-02   -9.1227525030e-02   -9.0105587591e-02   
+-8.8236546234e-02   -8.5889620988e-02   -8.2930561912e-02   -7.9226554729e-02   -7.4845817207e-02   
+-6.9855702551e-02   -6.4125763887e-02   -5.7659117883e-02   -5.0846871765e-02   -4.3299405070e-02   
+-3.5020568025e-02   -2.6140484510e-02   -1.6597879968e-02   -6.3342601575e-03   4.5232815700e-03    
+1.5853382824e-02    2.7896390231e-02    4.0646010847e-02    5.3923152974e-02    6.7898435367e-02    
+8.2564388032e-02    9.7477107895e-02    1.1286717352e-01    1.2894895480e-01    1.4561182430e-01    
+1.6275392769e-01    1.8057601620e-01    1.9906892595e-01    2.1780568603e-01    2.3721664704e-01    
+2.5729188948e-01    2.7759706890e-01    2.9836772082e-01    3.1981226825e-01    3.4176722701e-01    
+3.6409198125e-01    3.8709210122e-01    4.1075581389e-01    4.3458864304e-01    4.5910647411e-01    
+4.8429663015e-01    5.0976223141e-01    5.3573774297e-01    5.6241260285e-01    5.8961514894e-01    
+6.1721973718e-01    6.4554946942e-01    6.7458870764e-01    7.0389647301e-01    7.3397292821e-01    
+7.6480082198e-01    7.9615126877e-01    8.2819783334e-01    8.6104387826e-01    8.9466900832e-01    
+9.2905182566e-01    9.6416994338e-01    1.0000000000e+00    -9.5615827470e-02   -9.5240387290e-02   
+-9.4114324056e-02   -9.2238409517e-02   -8.9893610252e-02   -8.6939721166e-02   -8.3238015277e-02   
+-7.8859587019e-02   -7.3874608052e-02   -6.8146761561e-02   -6.1679127270e-02   -5.4879758275e-02   
+-4.7341746431e-02   -3.9068877532e-02   -3.0196725114e-02   -2.0661057258e-02   -1.0400524985e-02   
+4.5251913998e-04    1.1771723465e-02    2.3808315035e-02    3.6556091225e-02    4.9828496226e-02    
+6.3804027794e-02    7.8475308144e-02    9.3379417949e-02    1.0875749416e-01    1.2483377141e-01    
+1.4149326101e-01    1.5863014788e-01    1.7645449914e-01    1.9495728304e-01    2.1369336625e-01    
+2.3311252176e-01    2.5320497274e-01    2.7351793167e-01    2.9429786043e-01    3.1576293318e-01    
+3.3774313139e-01    3.6009231913e-01    3.8313011136e-01    4.0684488406e-01    4.3072116744e-01    
+4.5529814046e-01    4.8056326649e-01    5.0610297856e-01    5.3216273072e-01    5.5894098511e-01    
+5.8625928717e-01    6.1398722447e-01    6.4246280259e-01    6.7167044913e-01    7.0115061707e-01    
+7.3142614969e-01    7.6247980661e-01    7.9407344303e-01    8.2638900471e-01    8.5953516199e-01    
+8.9349140668e-01    9.2823618621e-01    9.6374691718e-01    1.0000000000e+00    -9.9630065309e-02   
+-9.9253249549e-02   -9.8123060522e-02   -9.6240272801e-02   -9.3897599516e-02   -9.0948880421e-02   
+-8.7249475824e-02   -8.2873356831e-02   -7.7893513553e-02   -7.2167759236e-02   -6.5699136657e-02   
+-5.8912644785e-02   -5.1384087792e-02   -4.3117187039e-02   -3.4252965718e-02   -2.4724234548e-02   
+-1.4466789813e-02   -3.6182432900e-03   7.6900641064e-03    1.9720239838e-02    3.2466171603e-02    
+4.5733839478e-02    5.9709620222e-02    7.4386228255e-02    8.9281728004e-02    1.0464781481e-01    
+1.2071858802e-01    1.3737469773e-01    1.5450636807e-01    1.7233298208e-01    1.9084564013e-01    
+2.0958104648e-01    2.2900839649e-01    2.4911805599e-01    2.6943879445e-01    2.9022800004e-01    
+3.1171359811e-01    3.3371903577e-01    3.5609265701e-01    3.7916812149e-01    4.0293395424e-01    
+4.2685369184e-01    4.5148980681e-01    4.7682990283e-01    5.0244372572e-01    5.2858771847e-01    
+5.5546936736e-01    5.8290342540e-01    6.1075471175e-01    6.3937613576e-01    6.6875219062e-01    
+6.9840476112e-01    7.2887937116e-01    7.6015879123e-01    7.9199561728e-01    8.2458017607e-01    
+8.5802644571e-01    8.9231380505e-01    9.2742054677e-01    9.6332389098e-01    1.0000000000e+00    
+-1.0364430315e-01   -1.0326611181e-01   -1.0213179699e-01   -1.0024213608e-01   -9.7901588779e-02   
+-9.4958039676e-02   -9.1260936371e-02   -8.6887126643e-02   -8.1912419054e-02   -7.6188756910e-02   
+-6.9719146045e-02   -6.2945531296e-02   -5.5426429153e-02   -4.7165496546e-02   -3.8309206322e-02   
+-2.8787411839e-02   -1.8533054641e-02   -7.6890057201e-03   3.6084047476e-03    1.5632164641e-02    
+2.8376251981e-02    4.1639182729e-02    5.5615212649e-02    7.0297148366e-02    8.5184038058e-02    
+1.0053813545e-01    1.1660340462e-01    1.3325613444e-01    1.5038258827e-01    1.6821146502e-01    
+1.8673399722e-01    2.0546872671e-01    2.2490427121e-01    2.4503113925e-01    2.6535965722e-01    
+2.8615813966e-01    3.0766426304e-01    3.2969494015e-01    3.5209299489e-01    3.7520613163e-01    
+3.9902302442e-01    4.2298621623e-01    4.4768147317e-01    4.7309653917e-01    4.9878447287e-01    
+5.2501270622e-01    5.5199774961e-01    5.7954756364e-01    6.0752219903e-01    6.3628946893e-01    
+6.6583393210e-01    6.9565890518e-01    7.2633259264e-01    7.5783777585e-01    7.8991779153e-01    
+8.2277134744e-01    8.5651772943e-01    8.9113620342e-01    9.2660490732e-01    9.6290086478e-01    
+1.0000000000e+00    -1.0765854099e-01   -1.0727897407e-01   -1.0614053345e-01   -1.0424399937e-01   
+-1.0190557804e-01   -9.8967198931e-02   -9.5272396919e-02   -9.0900896455e-02   -8.5931324555e-02   
+-8.0209754584e-02   -7.3739155432e-02   -6.6978417806e-02   -5.9468770514e-02   -5.1213806053e-02   
+-4.2365446926e-02   -3.2850589129e-02   -2.2599319469e-02   -1.1759768150e-02   -4.7325461117e-04   
+1.1544089445e-02    2.4286332359e-02    3.7544525981e-02    5.1520805077e-02    6.6208068478e-02    
+8.1086348112e-02    9.6428456092e-02    1.1248822123e-01    1.2913757115e-01    1.4625880846e-01    
+1.6408994796e-01    1.8262235431e-01    2.0135640694e-01    2.2080014594e-01    2.4094422250e-01    
+2.6128051999e-01    2.8208827927e-01    3.0361492797e-01    3.2567084453e-01    3.4809333278e-01    
+3.7124414176e-01    3.9511209459e-01    4.1911874063e-01    4.4387313952e-01    4.6936317551e-01    
+4.9512522002e-01    5.2143769398e-01    5.4852613187e-01    5.7619170187e-01    6.0428968632e-01    
+6.3320280210e-01    6.6291567359e-01    6.9291304923e-01    7.2378581411e-01    7.5551676048e-01    
+7.8783996578e-01    8.2096251880e-01    8.5500901315e-01    8.8995860178e-01    9.2578926787e-01    
+9.6247783857e-01    1.0000000000e+00    -1.1167277883e-01   -1.1129183633e-01   -1.1014926992e-01   
+-1.0824586265e-01   -1.0590956731e-01   -1.0297635819e-01   -9.9283857466e-02   -9.4914666267e-02   
+-8.9950230056e-02   -8.4230752259e-02   -7.7759164819e-02   -7.1011304316e-02   -6.3511111875e-02   
+-5.5262115560e-02   -4.6421687530e-02   -3.6913766419e-02   -2.6665584296e-02   -1.5830530580e-02   
+-4.5549139699e-03   7.4560142479e-03    2.0196412737e-02    3.3449869233e-02    4.7426397504e-02    
+6.2118988589e-02    7.6988658167e-02    9.2318776735e-02    1.0837303784e-01    1.2501900787e-01    
+1.4213502865e-01    1.5996843090e-01    1.7851071140e-01    1.9724408717e-01    2.1669602067e-01    
+2.3685730576e-01    2.5720138276e-01    2.7801841889e-01    2.9956559290e-01    3.2164674891e-01    
+3.4409367066e-01    3.6728215190e-01    3.9120116477e-01    4.1525126503e-01    4.4006480587e-01    
+4.6562981184e-01    4.9146596718e-01    5.1786268173e-01    5.4505451412e-01    5.7283584010e-01    
+6.0105717360e-01    6.3011613527e-01    6.5999741508e-01    6.9016719329e-01    7.2123903559e-01    
+7.5319574510e-01    7.8576214004e-01    8.1915369017e-01    8.5350029688e-01    8.8878100015e-01    
+9.2497362842e-01    9.6205481237e-01    1.0000000000e+00    -1.1568701666e-01   -1.1530469859e-01   
+-1.1415800638e-01   -1.1224772593e-01   -1.0991355657e-01   -1.0698551744e-01   -1.0329531801e-01   
+-9.8928436079e-02   -9.3969135556e-02   -8.8251749933e-02   -8.1779174206e-02   -7.5044190826e-02   
+-6.7553453236e-02   -5.9310425067e-02   -5.0477928134e-02   -4.0976943709e-02   -3.0731849124e-02   
+-1.9901293010e-02   -8.6365733287e-03   3.3679390512e-03    1.6106493115e-02    2.9355212485e-02    
+4.3331989932e-02    5.8029908700e-02    7.2890968221e-02    8.8209097378e-02    1.0425785444e-01    
+1.2090044458e-01    1.3801124884e-01    1.5584691384e-01    1.7439906849e-01    1.9313176739e-01    
+2.1259189539e-01    2.3277038902e-01    2.5312224553e-01    2.7394855850e-01    2.9551625783e-01    
+3.1762265329e-01    3.4009400854e-01    3.6332016203e-01    3.8729023494e-01    4.1138378943e-01    
+4.3625647223e-01    4.6189644818e-01    4.8780671433e-01    5.1428766948e-01    5.4158289637e-01    
+5.6947997834e-01    5.9782466088e-01    6.2702946844e-01    6.5707915656e-01    6.8742133734e-01    
+7.1869225706e-01    7.5087472972e-01    7.8368431429e-01    8.1734486153e-01    8.5199158060e-01    
+8.8760339852e-01    9.2415798897e-01    9.6163178617e-01    1.0000000000e+00    -1.1970125450e-01   
+-1.1931756085e-01   -1.1816674285e-01   -1.1624958922e-01   -1.1391754584e-01   -1.1099467670e-01   
+-1.0730677856e-01   -1.0294220589e-01   -9.7988041057e-02   -9.2272747608e-02   -8.5799183594e-02   
+-7.9077077337e-02   -7.1595794597e-02   -6.3358734574e-02   -5.4534168738e-02   -4.5040120999e-02   
+-3.4798113952e-02   -2.3972055440e-02   -1.2718232687e-02   -7.2013614550e-04   1.2016573493e-02    
+2.5260555737e-02    3.9237582359e-02    5.3940828812e-02    6.8793278275e-02    8.4099418021e-02    
+1.0014267105e-01    1.1678188130e-01    1.3388746903e-01    1.5172539679e-01    1.7028742558e-01    
+1.8901944762e-01    2.0848777012e-01    2.2868347227e-01    2.4904310831e-01    2.6987869812e-01    
+2.9146692275e-01    3.1359855767e-01    3.3609434642e-01    3.5935817217e-01    3.8337930512e-01    
+4.0751631382e-01    4.3244813858e-01    4.5816308452e-01    4.8414746148e-01    5.1071265723e-01    
+5.3811127863e-01    5.6612411657e-01    5.9459214817e-01    6.2394280161e-01    6.5416089805e-01    
+6.8467548140e-01    7.1614547854e-01    7.4855371435e-01    7.8160648854e-01    8.1553603289e-01    
+8.5048286432e-01    8.8642579688e-01    9.2334234952e-01    9.6120875996e-01    1.0000000000e+00    
+-1.2371549234e-01   -1.2333042311e-01   -1.2217547931e-01   -1.2025145250e-01   -1.1792153510e-01   
+-1.1500383595e-01   -1.1131823911e-01   -1.0695597570e-01   -1.0200694656e-01   -9.6293745282e-02   
+-8.9819192981e-02   -8.3109963847e-02   -7.5638135958e-02   -6.7407044081e-02   -5.8590409342e-02   
+-4.9103298289e-02   -3.8864378780e-02   -2.8042817870e-02   -1.6799892046e-02   -4.8082113422e-03   
+7.9266538707e-03    2.1165898988e-02    3.5143174787e-02    4.9851748923e-02    6.4695588330e-02    
+7.9989738663e-02    9.6027487657e-02    1.1266331801e-01    1.2976368923e-01    1.4760387973e-01    
+1.6617578266e-01    1.8490712785e-01    2.0438364484e-01    2.2459655553e-01    2.4496397108e-01    
+2.6580883773e-01    2.8741758768e-01    3.0957446205e-01    3.3209468430e-01    3.5539618230e-01    
+3.7946837530e-01    4.0364883822e-01    4.2863980493e-01    4.5442972086e-01    4.8048820864e-01    
+5.0713764498e-01    5.3463966088e-01    5.6276825480e-01    5.9135963545e-01    6.2085613478e-01    
+6.5124263954e-01    6.8192962546e-01    7.1359870001e-01    7.4623269897e-01    7.7952866279e-01    
+8.1372720426e-01    8.4897414804e-01    8.8524819525e-01    9.2252671007e-01    9.6078573376e-01    
+1.0000000000e+00    -1.2772973018e-01   -1.2734328537e-01   -1.2618421578e-01   -1.2425331578e-01   
+-1.2192552436e-01   -1.1901299520e-01   -1.1532969966e-01   -1.1096974552e-01   -1.0602585206e-01   
+-1.0031474296e-01   -9.3839202368e-02   -8.7142850357e-02   -7.9680477319e-02   -7.1455353588e-02   
+-6.2646649946e-02   -5.3166475579e-02   -4.2930643608e-02   -3.2113580300e-02   -2.0881551405e-02   
+-8.8962865389e-03   3.8367342486e-03    1.7071242240e-02    3.1048767214e-02    4.5762669035e-02    
+6.0597898384e-02    7.5880059306e-02    9.1912304264e-02    1.0854475473e-01    1.2563990942e-01    
+1.4348236267e-01    1.6206413975e-01    1.8079480808e-01    2.0027951957e-01    2.2050963878e-01    
+2.4088483385e-01    2.6173897734e-01    2.8336825261e-01    3.0555036643e-01    3.2809502218e-01    
+3.5143419244e-01    3.7555744547e-01    3.9978136262e-01    4.2483147129e-01    4.5069635720e-01    
+4.7682895579e-01    5.0356263274e-01    5.3116804314e-01    5.5941239304e-01    5.8812712274e-01    
+6.1776946795e-01    6.4832438103e-01    6.7918376951e-01    7.1105192149e-01    7.4391168359e-01    
+7.7745083705e-01    8.1191837562e-01    8.4746543176e-01    8.8407059362e-01    9.2171107062e-01    
+9.6036270756e-01    1.0000000000e+00    -1.3174396802e-01   -1.3135614763e-01   -1.3019295225e-01   
+-1.2825517907e-01   -1.2592951363e-01   -1.2302215446e-01   -1.1934116020e-01   -1.1498351533e-01   
+-1.1004475756e-01   -1.0433574063e-01   -9.7859211756e-02   -9.1175736867e-02   -8.3722818680e-02   
+-7.5503663095e-02   -6.6702890550e-02   -5.7229652870e-02   -4.6996908436e-02   -3.6184342730e-02   
+-2.4963210764e-02   -1.2984361736e-02   -2.5318537345e-04   1.2976585492e-02    2.6954359642e-02    
+4.1673589146e-02    5.6500208439e-02    7.1770379949e-02    8.7797120870e-02    1.0442619144e-01    
+1.2151612961e-01    1.3936084561e-01    1.5795249684e-01    1.7668248831e-01    1.9617539430e-01    
+2.1642272204e-01    2.3680569662e-01    2.5766911696e-01    2.7931891754e-01    3.0152627081e-01    
+3.2409536006e-01    3.4747220257e-01    3.7164651565e-01    3.9591388702e-01    4.2102313764e-01    
+4.4696299354e-01    4.7316970294e-01    4.9998762049e-01    5.2769642539e-01    5.5605653127e-01    
+5.8489461002e-01    6.1468280112e-01    6.4540612251e-01    6.7643791357e-01    7.0850514296e-01    
+7.4159066822e-01    7.7537301130e-01    8.1010954699e-01    8.4595671549e-01    8.8289299198e-01    
+9.2089543117e-01    9.5993968136e-01    1.0000000000e+00    -1.3575820586e-01   -1.3536900989e-01   
+-1.3420168871e-01   -1.3225704235e-01   -1.2993350289e-01   -1.2703131371e-01   -1.2335262075e-01   
+-1.1899728514e-01   -1.1406366306e-01   -1.0835673831e-01   -1.0187922114e-01   -9.5208623378e-02   
+-8.7765160041e-02   -7.9551972601e-02   -7.0759131154e-02   -6.1292830160e-02   -5.1063173263e-02   
+-4.0255105160e-02   -2.9044870123e-02   -1.7072436932e-02   -4.3431049955e-03   8.8819287437e-03    
+2.2859952069e-02    3.7584509257e-02    5.2402518493e-02    6.7660700592e-02    8.3681937477e-02    
+1.0030762815e-01    1.1739234980e-01    1.3523932855e-01    1.5384085393e-01    1.7257016853e-01    
+1.9207126902e-01    2.1233580529e-01    2.3272655939e-01    2.5359925657e-01    2.7526958247e-01    
+2.9750217519e-01    3.2009569795e-01    3.4351021270e-01    3.6773558582e-01    3.9204641141e-01    
+4.1721480399e-01    4.4322962988e-01    4.6951045010e-01    4.9641260824e-01    5.2422480764e-01    
+5.5270066950e-01    5.8166209730e-01    6.1159613429e-01    6.4248786400e-01    6.7369205762e-01    
+7.0595836444e-01    7.3926965284e-01    7.7329518555e-01    8.0830071835e-01    8.4444799921e-01    
+8.8171539035e-01    9.2007979172e-01    9.5951665515e-01    1.0000000000e+00    -1.3977244370e-01   
+-1.3938187215e-01   -1.3821042518e-01   -1.3625890563e-01   -1.3393749215e-01   -1.3104047297e-01   
+-1.2736408130e-01   -1.2301105495e-01   -1.1808256856e-01   -1.1237773598e-01   -1.0589923053e-01   
+-9.9241509888e-02   -9.1807501402e-02   -8.3600282108e-02   -7.4815371758e-02   -6.5356007450e-02   
+-5.5129438091e-02   -4.4325867590e-02   -3.3126529481e-02   -2.1160512129e-02   -8.4330246176e-03   
+4.7872719955e-03    1.8765544497e-02    3.3495429369e-02    4.8304828547e-02    6.3551021235e-02    
+7.9566754084e-02    9.6189064868e-02    1.1326856999e-01    1.3111781149e-01    1.4972921102e-01    
+1.6845784876e-01    1.8796714375e-01    2.0824888855e-01    2.2864742217e-01    2.4952939619e-01    
+2.7122024740e-01    2.9347807957e-01    3.1609603583e-01    3.3954822284e-01    3.6382465600e-01    
+3.8817893581e-01    4.1340647034e-01    4.3949626622e-01    4.6585119725e-01    4.9283759599e-01    
+5.2075318990e-01    5.4934480774e-01    5.7842958459e-01    6.0850946746e-01    6.3956960549e-01    
+6.7094620168e-01    7.0341158591e-01    7.3694863746e-01    7.7121735980e-01    8.0649188971e-01    
+8.4293928293e-01    8.8053778872e-01    9.1926415227e-01    9.5909362895e-01    1.0000000000e+00    
+-1.4378668154e-01   -1.4339473441e-01   -1.4221916164e-01   -1.4026076892e-01   -1.3794148142e-01   
+-1.3504963222e-01   -1.3137554185e-01   -1.2702482476e-01   -1.2210147406e-01   -1.1639873365e-01   
+-1.0991923992e-01   -1.0327439640e-01   -9.5849842762e-02   -8.7648591615e-02   -7.8871612362e-02   
+-6.9419184740e-02   -5.9195702919e-02   -4.8396630020e-02   -3.7208188840e-02   -2.5248587326e-02   
+-1.2522944240e-02   6.9261524726e-04    1.4671136925e-02    2.9406349480e-02    4.4207138602e-02    
+5.9441341878e-02    7.5451570691e-02    9.2070501582e-02    1.0914479018e-01    1.2699629443e-01    
+1.4561756811e-01    1.6434552899e-01    1.8386301847e-01    2.0416197180e-01    2.2456828494e-01    
+2.4545953580e-01    2.6717091233e-01    2.8945398395e-01    3.1209637371e-01    3.3558623297e-01    
+3.5991372618e-01    3.8431146021e-01    4.0959813670e-01    4.3576290255e-01    4.6219194440e-01    
+4.8926258375e-01    5.1728157215e-01    5.4598894597e-01    5.7519707187e-01    6.0542280063e-01    
+6.3665134698e-01    6.6820034574e-01    7.0086480739e-01    7.3462762209e-01    7.6913953406e-01    
+8.0468306108e-01    8.4143056665e-01    8.7936018708e-01    9.1844851282e-01    9.5867060275e-01    
+1.0000000000e+00    -1.4780091938e-01   -1.4740759667e-01   -1.4622789811e-01   -1.4426263220e-01   
+-1.4194547068e-01   -1.3905879148e-01   -1.3538700239e-01   -1.3103859458e-01   -1.2612037956e-01   
+-1.2041973133e-01   -1.1393924930e-01   -1.0730728291e-01   -9.9892184123e-02   -9.1696901122e-02   
+-8.2927852966e-02   -7.3482362030e-02   -6.3261967747e-02   -5.2467392450e-02   -4.1289848199e-02   
+-2.9336662522e-02   -1.6612863862e-02   -3.4020415009e-03   1.0576729352e-02    2.5317269591e-02    
+4.0109448656e-02    5.5331662521e-02    7.1336387298e-02    8.7951938296e-02    1.0502101038e-01    
+1.2287477737e-01    1.4150592520e-01    1.6023320922e-01    1.7975889320e-01    2.0007505506e-01    
+2.2048914771e-01    2.4138967542e-01    2.6312157726e-01    2.8542988832e-01    3.0809671159e-01    
+3.3162424311e-01    3.5600279635e-01    3.8044398461e-01    4.0578980305e-01    4.3202953889e-01    
+4.5853269155e-01    4.8568757150e-01    5.1380995440e-01    5.4263308420e-01    5.7196455915e-01    
+6.0233613380e-01    6.3373308846e-01    6.6545448979e-01    6.9831802886e-01    7.3230660671e-01    
+7.6706170831e-01    8.0287423244e-01    8.3992185038e-01    8.7818258545e-01    9.1763287337e-01    
+9.5824757654e-01    1.0000000000e+00    -1.5181515722e-01   -1.5142045893e-01   -1.5023663457e-01   
+-1.4826449548e-01   -1.4594945995e-01   -1.4306795073e-01   -1.3939846294e-01   -1.3505236439e-01   
+-1.3013928506e-01   -1.2444072900e-01   -1.1795925869e-01   -1.1134016942e-01   -1.0393452548e-01   
+-9.5745210629e-02   -8.6984093570e-02   -7.7545539320e-02   -6.7328232575e-02   -5.6538154880e-02   
+-4.5371507558e-02   -3.3424737719e-02   -2.0702783484e-02   -7.4966982491e-03   6.4823217795e-03    
+2.1228189703e-02    3.6011758710e-02    5.1221983164e-02    6.7221203905e-02    8.3833375010e-02    
+1.0089723057e-01    1.1875326031e-01    1.3739428229e-01    1.5612088944e-01    1.7565476793e-01    
+1.9598813831e-01    2.1641001048e-01    2.3731981503e-01    2.5907224219e-01    2.8140579270e-01    
+3.0409704947e-01    3.2766225324e-01    3.5209186653e-01    3.7657650900e-01    4.0198146940e-01    
+4.2829617523e-01    4.5487343871e-01    4.8211255925e-01    5.1033833666e-01    5.3927722243e-01    
+5.6873204644e-01    5.9924946697e-01    6.3081482995e-01    6.6270863385e-01    6.9577125034e-01    
+7.2998559133e-01    7.6498388256e-01    8.0106540381e-01    8.3841313410e-01    8.7700498382e-01    
+9.1681723392e-01    9.5782455034e-01    1.0000000000e+00    -1.5582939505e-01   -1.5543332119e-01   
+-1.5424537104e-01   -1.5226635877e-01   -1.4995344921e-01   -1.4707710999e-01   -1.4340992349e-01   
+-1.3906613420e-01   -1.3415819057e-01   -1.2846172668e-01   -1.2197926808e-01   -1.1537305593e-01   
+-1.0797686685e-01   -9.9793520136e-02   -9.1040334174e-02   -8.1608716610e-02   -7.1394497402e-02   
+-6.0608917310e-02   -4.9453166916e-02   -3.7512812916e-02   -2.4792703106e-02   -1.1591354997e-02   
+2.3879142071e-03    1.7139109814e-02    3.1914068765e-02    4.7112303807e-02    6.3106020512e-02    
+7.9714811724e-02    9.6773450759e-02    1.1463174325e-01    1.3328263938e-01    1.5200856967e-01    
+1.7155064265e-01    1.9190122157e-01    2.1233087325e-01    2.3324995464e-01    2.5502290712e-01    
+2.7738169708e-01    3.0009738735e-01    3.2370026338e-01    3.4818093671e-01    3.7270903340e-01    
+3.9817313576e-01    4.2456281157e-01    4.5121418586e-01    4.7853754700e-01    5.0686671891e-01    
+5.3592136067e-01    5.6549953372e-01    5.9616280014e-01    6.2789657144e-01    6.5996277790e-01    
+6.9322447181e-01    7.2766457596e-01    7.6290605682e-01    7.9925657517e-01    8.3690441782e-01    
+8.7582738218e-01    9.1600159447e-01    9.5740152414e-01    1.0000000000e+00    -1.5984363289e-01   
+-1.5944618345e-01   -1.5825410750e-01   -1.5626822205e-01   -1.5395743847e-01   -1.5108626924e-01   
+-1.4742138404e-01   -1.4307990401e-01   -1.3817709607e-01   -1.3248272435e-01   -1.2599927747e-01   
+-1.1940594244e-01   -1.1201920821e-01   -1.0384182964e-01   -9.5096574778e-02   -8.5671893900e-02   
+-7.5460762230e-02   -6.4679679740e-02   -5.3534826275e-02   -4.1600888113e-02   -2.8882622728e-02   
+-1.5686011746e-02   -1.7064933654e-03   1.3050029926e-02    2.7816378819e-02    4.3002624450e-02    
+5.8990837119e-02    7.5596248438e-02    9.2649670951e-02    1.1051022619e-01    1.2917099647e-01    
+1.4789624990e-01    1.6744651738e-01    1.8781430483e-01    2.0825173603e-01    2.2918009426e-01    
+2.5097357205e-01    2.7335760146e-01    2.9609772524e-01    3.1973827351e-01    3.4427000688e-01    
+3.6884155780e-01    3.9436480211e-01    4.2082944791e-01    4.4755493301e-01    4.7496253475e-01    
+5.0339510117e-01    5.3256549890e-01    5.6226702101e-01    5.9307613331e-01    6.2497831292e-01    
+6.5721692196e-01    6.9067769329e-01    7.2534356058e-01    7.6082823107e-01    7.9744774653e-01    
+8.3539570154e-01    8.7464978055e-01    9.1518595502e-01    9.5697849794e-01    1.0000000000e+00    
+-1.6385787073e-01   -1.6345904571e-01   -1.6226284397e-01   -1.6027008533e-01   -1.5796142774e-01   
+-1.5509542850e-01   -1.5143284458e-01   -1.4709367382e-01   -1.4219600157e-01   -1.3650372203e-01   
+-1.3001928685e-01   -1.2343882895e-01   -1.1606154957e-01   -1.0789013915e-01   -9.9152815382e-02   
+-8.9735071191e-02   -7.9527027058e-02   -6.8750442170e-02   -5.7616485634e-02   -4.5688963309e-02   
+-3.2972542350e-02   -1.9780668494e-02   -5.8009009379e-03   8.9609500369e-03    2.3718688873e-02    
+3.8892945093e-02    5.4875653726e-02    7.1477685152e-02    8.8525891143e-02    1.0638870913e-01    
+1.2505935356e-01    1.4378393013e-01    1.6334239210e-01    1.8372738808e-01    2.0417259880e-01    
+2.2511023387e-01    2.4692423697e-01    2.6933350584e-01    2.9209806312e-01    3.1577628365e-01    
+3.4035907706e-01    3.6497408219e-01    3.9055646846e-01    4.1709608425e-01    4.4389568017e-01    
+4.7138752251e-01    4.9992348342e-01    5.2920963713e-01    5.5903450829e-01    5.8998946648e-01    
+6.2206005441e-01    6.5447106602e-01    6.8813091476e-01    7.2302254520e-01    7.5875040532e-01    
+7.9563891790e-01    8.3388698527e-01    8.7347217892e-01    9.1437031557e-01    9.5655547173e-01    
+1.0000000000e+00    -1.6787210857e-01   -1.6747190797e-01   -1.6627158044e-01   -1.6427194862e-01   
+-1.6196541700e-01   -1.5910458775e-01   -1.5544430513e-01   -1.5110744364e-01   -1.4621490707e-01   
+-1.4052471970e-01   -1.3403929624e-01   -1.2747171546e-01   -1.2010389093e-01   -1.1193844866e-01   
+-1.0320905599e-01   -9.3798248481e-02   -8.3593291886e-02   -7.2821204600e-02   -6.1698144993e-02   
+-4.9777038506e-02   -3.7062461972e-02   -2.3875325242e-02   -9.8953085104e-03   4.8718701483e-03    
+1.9620998928e-02    3.4783265736e-02    5.0760470333e-02    6.7359121866e-02    8.4402111335e-02    
+1.0226719207e-01    1.2094771065e-01    1.3967161036e-01    1.5923826683e-01    1.7964047134e-01    
+2.0009346157e-01    2.2104037349e-01    2.4287490190e-01    2.6530941022e-01    2.8809840100e-01    
+3.1181429378e-01    3.3644814723e-01    3.6110660659e-01    3.8674813482e-01    4.1336272059e-01    
+4.4023642732e-01    4.6781251026e-01    4.9645186567e-01    5.2585377537e-01    5.5580199557e-01    
+5.8690279965e-01    6.1914179590e-01    6.5172521007e-01    6.8558413624e-01    7.2070152983e-01    
+7.5667257957e-01    7.9383008926e-01    8.3237826899e-01    8.7229457728e-01    9.1355467612e-01    
+9.5613244553e-01    1.0000000000e+00    -1.7188634641e-01   -1.7148477023e-01   -1.7028031690e-01   
+-1.6827381190e-01   -1.6596940627e-01   -1.6311374701e-01   -1.5945576568e-01   -1.5512121345e-01   
+-1.5023381257e-01   -1.4454571738e-01   -1.3805930563e-01   -1.3150460197e-01   -1.2414623229e-01   
+-1.1598675816e-01   -1.0726529659e-01   -9.7861425771e-02   -8.7659556714e-02   -7.6891967030e-02   
+-6.5779804352e-02   -5.3865113703e-02   -4.1152381594e-02   -2.7969981990e-02   -1.3989716083e-02   
+7.8279025965e-04    1.5523308982e-02    3.0673586379e-02    4.6645286940e-02    6.3240558581e-02    
+8.0278331526e-02    9.8145675007e-02    1.1683606773e-01    1.3555929058e-01    1.5513414156e-01    
+1.7555355459e-01    1.9601432434e-01    2.1697051310e-01    2.3882556683e-01    2.6128531460e-01    
+2.8409873888e-01    3.0785230392e-01    3.3253721741e-01    3.5723913099e-01    3.8293980117e-01    
+4.0962935693e-01    4.3657717447e-01    4.6423749801e-01    4.9298024793e-01    5.2249791360e-01    
+5.5256948286e-01    5.8381613282e-01    6.1622353739e-01    6.4897935413e-01    6.8303735771e-01    
+7.1838051445e-01    7.5459475383e-01    7.9202126063e-01    8.3086955271e-01    8.7111697565e-01    
+9.1273903667e-01    9.5570941933e-01    1.0000000000e+00    -1.7590058425e-01   -1.7549763249e-01   
+-1.7428905337e-01   -1.7227567519e-01   -1.6997339553e-01   -1.6712290626e-01   -1.6346722623e-01   
+-1.5913498326e-01   -1.5425271807e-01   -1.4856671505e-01   -1.4207931502e-01   -1.3553748848e-01   
+-1.2818857365e-01   -1.2003506767e-01   -1.1132153719e-01   -1.0192460306e-01   -9.1725821541e-02   
+-8.0962729461e-02   -6.9861463710e-02   -5.7953188899e-02   -4.5242301216e-02   -3.2064638738e-02   
+-1.8084123655e-02   -3.3062896290e-03   1.1425619037e-02    2.6563907022e-02    4.2530103547e-02    
+5.9121995295e-02    7.6154551718e-02    9.4024157947e-02    1.1272442482e-01    1.3144697081e-01    
+1.5103001628e-01    1.7146663785e-01    1.9193518711e-01    2.1290065272e-01    2.3477623176e-01    
+2.5726121898e-01    2.8009907676e-01    3.0389031405e-01    3.2862628759e-01    3.5337165539e-01    
+3.7913146752e-01    4.0589599327e-01    4.3291792163e-01    4.6066248576e-01    4.8950863018e-01    
+5.1914205183e-01    5.4933697014e-01    5.8072946599e-01    6.1330527887e-01    6.4623349818e-01    
+6.8049057919e-01    7.1605949907e-01    7.5251692808e-01    7.9021243199e-01    8.2936083643e-01    
+8.6993937402e-01    9.1192339723e-01    9.5528639313e-01    1.0000000000e+00    -1.7991482209e-01   
+-1.7951049475e-01   -1.7829778983e-01   -1.7627753847e-01   -1.7397738479e-01   -1.7113206552e-01   
+-1.6747868677e-01   -1.6314875307e-01   -1.5827162357e-01   -1.5258771272e-01   -1.4609932440e-01   
+-1.3957037499e-01   -1.3223091501e-01   -1.2408337718e-01   -1.1537777780e-01   -1.0598778035e-01   
+-9.5792086369e-02   -8.5033491891e-02   -7.3943123069e-02   -6.2041264096e-02   -4.9332220838e-02   
+-3.6159295487e-02   -2.2178531228e-02   -7.3953695176e-03   7.3279290909e-03    2.2454227665e-02    
+3.8414920154e-02    5.5003432009e-02    7.2030771910e-02    8.9902640887e-02    1.0861278191e-01    
+1.2733465104e-01    1.4692589101e-01    1.6737972110e-01    1.8785604989e-01    2.0883079233e-01    
+2.3072689669e-01    2.5323712336e-01    2.7609941464e-01    2.9992832418e-01    3.2471535776e-01    
+3.4950417978e-01    3.7532313388e-01    4.0216262960e-01    4.2925866878e-01    4.5708747352e-01    
+4.8603701243e-01    5.1578619007e-01    5.4610445742e-01    5.7764279916e-01    6.1038702036e-01    
+6.4348764224e-01    6.7794380066e-01    7.1373848370e-01    7.5043910233e-01    7.8840360336e-01    
+8.2785212016e-01    8.6876177238e-01    9.1110775778e-01    9.5486336692e-01    1.0000000000e+00    
+-1.8392905993e-01   -1.8352335701e-01   -1.8230652630e-01   -1.8027940175e-01   -1.7798137406e-01   
+-1.7514122477e-01   -1.7149014732e-01   -1.6716252288e-01   -1.6229052907e-01   -1.5660871040e-01   
+-1.5011933379e-01   -1.4360326150e-01   -1.3627325637e-01   -1.2813168668e-01   -1.1943401840e-01   
+-1.1005095764e-01   -9.9858351197e-02   -8.9104254321e-02   -7.8024782428e-02   -6.6129339293e-02   
+-5.3422140460e-02   -4.0253952235e-02   -2.6272938800e-02   -1.1484449406e-02   3.2302391452e-03    
+1.8344548308e-02    3.4299736761e-02    5.0884868723e-02    6.7906992102e-02    8.5781123827e-02    
+1.0450113900e-01    1.2322233127e-01    1.4282176573e-01    1.6329280436e-01    1.8377691266e-01    
+2.0476093194e-01    2.2667756162e-01    2.4921302774e-01    2.7209975252e-01    2.9596633432e-01    
+3.2080442794e-01    3.4563670418e-01    3.7151480023e-01    3.9842926594e-01    4.2559941593e-01    
+4.5351246127e-01    4.8256539469e-01    5.1243032830e-01    5.4287194471e-01    5.7455613233e-01    
+6.0746876185e-01    6.4074178630e-01    6.7539702214e-01    7.1141746832e-01    7.4836127658e-01    
+7.8659477472e-01    8.2634340388e-01    8.6758417075e-01    9.1029211833e-01    9.5444034072e-01    
+1.0000000000e+00    -1.8794329777e-01   -1.8753621927e-01   -1.8631526276e-01   -1.8428126504e-01   
+-1.8198536332e-01   -1.7915038403e-01   -1.7550160787e-01   -1.7117629270e-01   -1.6630943457e-01   
+-1.6062970807e-01   -1.5413934318e-01   -1.4763614801e-01   -1.4031559773e-01   -1.3217999619e-01   
+-1.2349025901e-01   -1.1411413493e-01   -1.0392461602e-01   -9.3175016751e-02   -8.2106441787e-02   
+-7.0217414490e-02   -5.7512060082e-02   -4.4348608983e-02   -3.0367346373e-02   -1.5573529295e-02   
+-8.6745080039e-04   1.4234868951e-02    3.0184553368e-02    4.6766305437e-02    6.3783212293e-02    
+8.1659606767e-02    1.0038949609e-01    1.1911001149e-01    1.3871764046e-01    1.5920588761e-01    
+1.7969777543e-01    2.0069107156e-01    2.2262822655e-01    2.4518893212e-01    2.6810009041e-01    
+2.9200434445e-01    3.1689349811e-01    3.4176922858e-01    3.6770646658e-01    3.9469590228e-01    
+4.2194016309e-01    4.4993744902e-01    4.7909377694e-01    5.0907446653e-01    5.3963943199e-01    
+5.7146946550e-01    6.0455050334e-01    6.3799593035e-01    6.7285024361e-01    7.0909645294e-01    
+7.4628345084e-01    7.8478594608e-01    8.2483468760e-01    8.6640656912e-01    9.0947647888e-01    
+9.5401731452e-01    1.0000000000e+00    -1.9195753561e-01   -1.9154908153e-01   -1.9032399923e-01   
+-1.8828312832e-01   -1.8598935259e-01   -1.8315954328e-01   -1.7951306842e-01   -1.7519006251e-01   
+-1.7032834007e-01   -1.6465070575e-01   -1.5815935257e-01   -1.5166903452e-01   -1.4435793909e-01   
+-1.3622830570e-01   -1.2754649961e-01   -1.1817731222e-01   -1.0799088085e-01   -9.7245779181e-02   
+-8.6188101145e-02   -7.4305489686e-02   -6.1601979704e-02   -4.8443265731e-02   -3.4461753945e-02   
+-1.9662609184e-02   -4.9651407460e-03   1.0125189594e-02    2.6069369974e-02    4.2647742151e-02    
+5.9659432485e-02    7.7538089707e-02    9.6277853181e-02    1.1499769172e-01    1.3461351519e-01    
+1.5511897087e-01    1.7561863820e-01    1.9662121117e-01    2.1857889148e-01    2.4116483650e-01    
+2.6410042829e-01    2.8804235459e-01    3.1298256829e-01    3.3790175298e-01    3.6389813293e-01    
+3.9096253862e-01    4.1828091024e-01    4.4636243677e-01    4.7562215919e-01    5.0571860477e-01    
+5.3640691928e-01    5.6838279867e-01    6.0163224482e-01    6.3525007441e-01    6.7030346509e-01    
+7.0677543757e-01    7.4420562509e-01    7.8297711745e-01    8.2332597132e-01    8.6522896749e-01    
+9.0866083943e-01    9.5359428831e-01    1.0000000000e+00    -1.9597177344e-01   -1.9556194379e-01   
+-1.9433273569e-01   -1.9228499160e-01   -1.8999334185e-01   -1.8716870254e-01   -1.8352452896e-01   
+-1.7920383232e-01   -1.7434724557e-01   -1.6867170342e-01   -1.6217936195e-01   -1.5570192103e-01   
+-1.4840028046e-01   -1.4027661521e-01   -1.3160274021e-01   -1.2224048951e-01   -1.1205714568e-01   
+-1.0131654161e-01   -9.0269760504e-02   -7.8393564883e-02   -6.5691899326e-02   -5.2537922479e-02   
+-3.8556161518e-02   -2.3751689072e-02   -9.0628306917e-03   6.0155102367e-03    2.1954186581e-02    
+3.8529178865e-02    5.5535652677e-02    7.3416572647e-02    9.2166210270e-02    1.1088537195e-01    
+1.3050938991e-01    1.5103205412e-01    1.7153950097e-01    1.9255135079e-01    2.1452955641e-01    
+2.3714074088e-01    2.6010076617e-01    2.8408036472e-01    3.0907163847e-01    3.3403427737e-01    
+3.6008979929e-01    3.8722917496e-01    4.1462165739e-01    4.4278742452e-01    4.7215054145e-01    
+5.0236274300e-01    5.3317440656e-01    5.6529613184e-01    5.9871398631e-01    6.3250421846e-01    
+6.6775668656e-01    7.0445442219e-01    7.4212779934e-01    7.8116828881e-01    8.2181725505e-01    
+8.6405136585e-01    9.0784519998e-01    9.5317126211e-01    1.0000000000e+00    -1.9998601128e-01   
+-1.9957480605e-01   -1.9834147216e-01   -1.9628685489e-01   -1.9399733111e-01   -1.9117786179e-01   
+-1.8753598951e-01   -1.8321760213e-01   -1.7836615107e-01   -1.7269270110e-01   -1.6619937134e-01   
+-1.5973480754e-01   -1.5244262182e-01   -1.4432492471e-01   -1.3565898082e-01   -1.2630366680e-01   
+-1.1612341051e-01   -1.0538730404e-01   -9.4351419863e-02   -8.2481640080e-02   -6.9781818948e-02   
+-5.6632579228e-02   -4.2650569090e-02   -2.7840768961e-02   -1.3160520637e-02   1.9058308797e-03    
+1.7839003188e-02    3.4410615580e-02    5.1411872869e-02    6.9295055588e-02    8.8054567359e-02    
+1.0677305218e-01    1.2640526464e-01    1.4694513738e-01    1.6746036375e-01    1.8848149040e-01    
+2.1048022134e-01    2.3311664526e-01    2.5610110405e-01    2.8011837486e-01    3.0516070864e-01    
+3.3016680177e-01    3.5628146564e-01    3.8349581130e-01    4.1096240455e-01    4.3921241228e-01    
+4.6867892370e-01    4.9900688123e-01    5.2994189384e-01    5.6220946501e-01    5.9579572780e-01    
+6.2975836252e-01    6.6520990804e-01    7.0213340681e-01    7.4004997359e-01    7.7935946018e-01    
+8.2030853877e-01    8.6287376422e-01    9.0702956053e-01    9.5274823591e-01    1.0000000000e+00    
+-2.0400024912e-01   -2.0358766831e-01   -2.0235020863e-01   -2.0028871817e-01   -1.9800132038e-01   
+-1.9518702105e-01   -1.9154745006e-01   -1.8723137194e-01   -1.8238505658e-01   -1.7671369877e-01   
+-1.7021938073e-01   -1.6376769405e-01   -1.5648496318e-01   -1.4837323422e-01   -1.3971522142e-01   
+-1.3036684409e-01   -1.2018967534e-01   -1.0945806647e-01   -9.8433079222e-02   -8.6569715276e-02   
+-7.3871738570e-02   -6.0727235976e-02   -4.6744976663e-02   -3.1929848849e-02   -1.7258210583e-02   
+-2.2038484774e-03   1.3723819795e-02    3.0292052294e-02    4.7288093060e-02    6.5173538528e-02    
+8.3942924449e-02    1.0266073241e-01    1.2230113936e-01    1.4285822063e-01    1.6338122652e-01    
+1.8441163002e-01    2.0643088626e-01    2.2909254964e-01    2.5210144193e-01    2.7615638499e-01    
+3.0124977882e-01    3.2629932617e-01    3.5247313199e-01    3.7976244764e-01    4.0730315170e-01    
+4.3563740003e-01    4.6520730596e-01    4.9565101947e-01    5.2670938113e-01    5.5912279818e-01    
+5.9287746928e-01    6.2701250657e-01    6.6266312951e-01    6.9981239144e-01    7.3797214785e-01    
+7.7755063154e-01    8.1879982249e-01    8.6169616259e-01    9.0621392108e-01    9.5232520971e-01    
+1.0000000000e+00    
+0.0000000000e+00    -2.6176948308e-02   -5.2335956243e-02   -7.8459095728e-02   -1.0452846327e-01   
+-1.3052619222e-01   -1.5643446504e-01   -1.8223552549e-01   -2.0791169082e-01   -2.3344536386e-01   
+-2.5881904510e-01   -2.8401534470e-01   -3.0901699437e-01   -3.3380685923e-01   -3.5836794955e-01   
+-3.8268343237e-01   -4.0673664308e-01   -4.3051109681e-01   -4.5399049974e-01   -4.7715876026e-01   
+-5.0000000000e-01   -5.2249856472e-01   -5.4463903502e-01   -5.6640623692e-01   -5.8778525229e-01   
+-6.0876142901e-01   -6.2932039105e-01   -6.4944804833e-01   -6.6913060636e-01   -6.8835457569e-01   
+-7.0710678119e-01   -7.2537437101e-01   -7.4314482548e-01   -7.6040596560e-01   -7.7714596146e-01   
+-7.9335334029e-01   -8.0901699437e-01   -8.2412618862e-01   -8.3867056795e-01   -8.5264016435e-01   
+-8.6602540378e-01   -8.7881711266e-01   -8.9100652419e-01   -9.0258528435e-01   -9.1354545764e-01   
+-9.2387953251e-01   -9.3358042650e-01   -9.4264149109e-01   -9.5105651630e-01   -9.5881973487e-01   
+-9.6592582629e-01   -9.7236992040e-01   -9.7814760073e-01   -9.8325490756e-01   -9.8768834060e-01   
+-9.9144486137e-01   -9.9452189537e-01   -9.9691733373e-01   -9.9862953475e-01   -9.9965732498e-01   
+-1.0000000000e+00   0.0000000000e+00    -2.6179566003e-02   -5.2341189839e-02   -7.8466941637e-02   
+-1.0453894686e-01   -1.3053934081e-01   -1.5645029253e-01   -1.8225405724e-01   -2.0793297119e-01   
+-2.3346941216e-01   -2.5884587855e-01   -2.8404510366e-01   -3.0904971382e-01   -3.3384257166e-01   
+-3.5840673760e-01   -3.8272535871e-01   -4.0678174299e-01   -4.3055946599e-01   -4.5404230806e-01   
+-4.7721405454e-01   -5.0005882352e-01   -5.2256107244e-01   -5.4470527273e-01   -5.6647624640e-01   
+-5.8785941696e-01   -6.0883998609e-01   -6.2940340581e-01   -6.4953567606e-01   -6.6922310382e-01   
+-6.8845200823e-01   -7.0720920768e-01   -7.2548232378e-01   -7.4325837363e-01   -7.6052517041e-01   
+-7.7727144767e-01   -7.9348546862e-01   -8.0915583596e-01   -8.2427204683e-01   -8.3882399532e-01   
+-8.5280122556e-01   -8.6619415136e-01   -8.7899455616e-01   -8.9119271833e-01   -9.0278026930e-01   
+-9.1375019928e-01   -9.2409453828e-01   -9.3380572140e-01   -9.4287756732e-01   -9.5130435042e-01   
+-9.5907932120e-01   -9.6619713779e-01   -9.7265483907e-01   -9.7844607958e-01   -9.8356687409e-01   
+-9.8801514922e-01   -9.9178712853e-01   -9.9487948446e-01   -9.9729007815e-01   -9.9901723794e-01   
+-1.0000597605e+00   -1.0004169117e+00   0.0000000000e+00    -2.6182443647e-02   -5.2346943154e-02   
+-7.8475566682e-02   -1.0455047152e-01   -1.3055379512e-01   -1.5646769175e-01   -1.8227442927e-01   
+-2.0795636480e-01   -2.3349584857e-01   -2.5887537667e-01   -2.8407781782e-01   -3.0908568245e-01   
+-3.3388183049e-01   -3.5844937749e-01   -3.8277144853e-01   -4.0683132153e-01   -4.3061263846e-01   
+-4.5409926119e-01   -4.7727483978e-01   -5.0012348849e-01   -5.2262978747e-01   -5.4477808815e-01   
+-5.6655320813e-01   -5.8794094651e-01   -6.0892634424e-01   -6.2949466431e-01   -6.4963200562e-01   
+-6.6932478670e-01   -6.8855911626e-01   -7.0732180558e-01   -7.2560099675e-01   -7.4338319763e-01   
+-7.6065621281e-01   -7.7740939523e-01   -7.9363071789e-01   -8.0930846515e-01   -8.2443238943e-01   
+-8.3899265872e-01   -8.5297828088e-01   -8.6637965635e-01   -8.7918962060e-01   -8.9139740240e-01   
+-9.0299461715e-01   -9.1397527270e-01   -9.2433089511e-01   -9.3405338912e-01   -9.4313708699e-01   
+-9.5157679560e-01   -9.5936468563e-01   -9.6649539176e-01   -9.7296805146e-01   -9.7877419874e-01   
+-9.8390982031e-01   -9.8837441143e-01   -9.9216338437e-01   -9.9527258377e-01   -9.9769983779e-01   
+-9.9944344181e-01   -1.0005021597e+00   -1.0008752246e+00   0.0000000000e+00    -2.6185607054e-02   
+-5.2353267800e-02   -7.8485048232e-02   -1.0456314062e-01   -1.3056968481e-01   -1.5648681880e-01   
+-1.8229682433e-01   -2.0798208150e-01   -2.3352491024e-01   -2.5890780410e-01   -2.8411378065e-01   
+-3.0912522294e-01   -3.3392498789e-01   -3.5849625172e-01   -3.8282211528e-01   -4.0688582344e-01   
+-4.3067109119e-01   -4.5416187002e-01   -4.7734166129e-01   -5.0019457499e-01   -5.2270532622e-01   
+-5.4485813447e-01   -5.6663781251e-01   -5.8803057232e-01   -6.0902127815e-01   -6.2959498519e-01   
+-6.4973790114e-01   -6.6943656715e-01   -6.8867686060e-01   -7.0744558498e-01   -7.2573145449e-01   
+-7.4352041722e-01   -7.6080026831e-01   -7.7756104162e-01   -7.9379039108e-01   -8.0947625112e-01   
+-8.2460865477e-01   -8.3917807118e-01   -8.5317291859e-01   -8.6658358282e-01   -8.7940405583e-01   
+-8.9162241252e-01   -9.0323025071e-01   -9.1422269694e-01   -9.2459072324e-01   -9.3432565137e-01   
+-9.4342237815e-01   -9.5187629583e-01   -9.5967838805e-01   -9.6682326372e-01   -9.7331236728e-01   
+-9.7913490163e-01   -9.8428682266e-01   -9.8876935001e-01   -9.9257700413e-01   -9.9570471964e-01   
+-9.9815028842e-01   -9.9991196967e-01   -1.0009884912e+00   -1.0013790501e+00   0.0000000000e+00    
+-2.6189084601e-02   -5.2360220512e-02   -7.8495471343e-02   -1.0457706783e-01   -1.3058715242e-01   
+-1.5650784526e-01   -1.8232144333e-01   -2.0801035199e-01   -2.3355685786e-01   -2.5894345172e-01   
+-2.8415331474e-01   -3.0916868997e-01   -3.3397243103e-01   -3.5854778076e-01   -3.8287781347e-01   
+-4.0694573764e-01   -4.3073534854e-01   -4.5423069619e-01   -4.7741511847e-01   -5.0027272070e-01   
+-5.2278836631e-01   -5.4494612976e-01   -5.6673081850e-01   -5.8812909838e-01   -6.0912563943e-01   
+-6.2970526840e-01   -6.4985431257e-01   -6.6955944791e-01   -6.8880629749e-01   -7.0758165623e-01   
+-7.2587486727e-01   -7.4367126335e-01   -7.6095862918e-01   -7.7772774718e-01   -7.9396592054e-01   
+-8.0966069900e-01   -8.2480242407e-01   -8.3938189593e-01   -8.5338688472e-01   -8.6680776012e-01   
+-8.7963978546e-01   -8.9186976718e-01   -9.0348928376e-01   -9.1449469153e-01   -9.2487635350e-01   
+-9.3462495051e-01   -9.4373600003e-01   -9.5220553780e-01   -9.6002324255e-01   -9.6718369485e-01   
+-9.7369087522e-01   -9.7953142396e-01   -9.8470126306e-01   -9.8920350780e-01   -9.9303169821e-01   
+-9.9617976857e-01   -9.9864547086e-01   -1.0004270245e+00   -1.0015231175e+00   -1.0019329078e+00   
+0.0000000000e+00    -2.6192907485e-02   -5.2367863660e-02   -7.8506929517e-02   -1.0459237808e-01   
+-1.3060635464e-01   -1.5653095973e-01   -1.8234850711e-01   -2.0804142986e-01   -2.3359197803e-01   
+-2.5898263930e-01   -2.8419677476e-01   -3.0921647348e-01   -3.3402458549e-01   -3.5860442688e-01   
+-3.8293904274e-01   -4.0701160160e-01   -4.3080598695e-01   -4.5430635712e-01   -4.7749587028e-01   
+-5.0035862663e-01   -5.2287965266e-01   -5.4504286338e-01   -5.6683306040e-01   -5.8823740853e-01   
+-6.0924036426e-01   -6.2982650323e-01   -6.4998228419e-01   -6.6969453129e-01   -6.8894858806e-01   
+-7.0773123997e-01   -7.2603252160e-01   -7.4383708918e-01   -7.6113271600e-01   -7.7791100736e-01   
+-7.9415888088e-01   -8.0986346339e-01   -8.2501543554e-01   -8.3960596141e-01   -8.5362209866e-01   
+-8.6705419925e-01   -8.7989892412e-01   -8.9214168528e-01   -9.0377403997e-01   -9.1479369642e-01   
+-9.2519034813e-01   -9.3495397141e-01   -9.4408076598e-01   -9.5256747499e-01   -9.6040234268e-01   
+-9.6757991843e-01   -9.7410697072e-01   -9.7996732276e-01   -9.8515685927e-01   -9.8968077943e-01   
+-9.9353154550e-01   -9.9670199202e-01   -9.9918982717e-01   -1.0009932266e+00   -1.0021108348e+00   
+-1.0025417660e+00   0.0000000000e+00    -2.6197109999e-02   -5.2376265808e-02   -7.8519525540e-02   
+-1.0460920870e-01   -1.3062746372e-01   -1.5655636958e-01   -1.8237825844e-01   -2.0807559391e-01   
+-2.3363058579e-01   -2.5902571840e-01   -2.8424455055e-01   -3.0926900211e-01   -3.3408191912e-01   
+-3.5866669821e-01   -3.8300635236e-01   -4.0708400615e-01   -4.3088364006e-01   -4.5438953152e-01   
+-4.7758464112e-01   -5.0045306341e-01   -5.2298000415e-01   -5.4514920309e-01   -5.6694545539e-01   
+-5.8835647437e-01   -6.0936648179e-01   -6.2995977724e-01   -6.5012296397e-01   -6.6984302906e-01   
+-6.8910500873e-01   -7.0789567806e-01   -7.2620583171e-01   -7.4401938227e-01   -7.6132409044e-01   
+-7.7811246612e-01   -7.9437100306e-01   -8.1008636320e-01   -8.2524960002e-01   -8.3985227761e-01   
+-8.5388067042e-01   -8.6732511090e-01   -8.8018379642e-01   -8.9244060609e-01   -9.0408707377e-01   
+-9.1512239386e-01   -9.2553552387e-01   -9.3531566559e-01   -9.4445976876e-01   -9.5296535420e-01   
+-9.6081908917e-01   -9.6801548882e-01   -9.7456438641e-01   -9.8044650830e-01   -9.8565769827e-01   
+-9.9020544631e-01   -9.9408102989e-01   -9.9727607464e-01   -9.9978824054e-01   -1.0016156551e+00   
+-1.0027569150e+00   -1.0032110867e+00   0.0000000000e+00    -2.6201729842e-02   -5.2385502327e-02   
+-7.8533372405e-02   -1.0462771068e-01   -1.3065066904e-01   -1.5658430274e-01   -1.8241096421e-01   
+-2.0811315061e-01   -2.3367302747e-01   -2.5907307544e-01   -2.8429707069e-01   -3.0932674707e-01   
+-3.3414494624e-01   -3.5873515338e-01   -3.8308034613e-01   -4.0716360079e-01   -4.3096900449e-01   
+-4.5448096552e-01   -4.7768222730e-01   -5.0055687820e-01   -5.2309032101e-01   -5.4526610282e-01   
+-5.6706901171e-01   -5.8848736399e-01   -6.0950512336e-01   -6.3010628596e-01   -6.5027761389e-01   
+-6.7000627334e-01   -6.8927696269e-01   -7.0807644561e-01   -7.2639635232e-01   -7.4421977790e-01   
+-7.6153446923e-01   -7.7833393065e-01   -7.9460418993e-01   -8.1033139799e-01   -8.2550701810e-01   
+-8.4012305414e-01   -8.5416491953e-01   -8.6762292532e-01   -8.8049695784e-01   -8.9276921110e-01   
+-9.0443119326e-01   -9.1548373246e-01   -9.2591497713e-01   -9.3571327764e-01   -9.4487640825e-01   
+-9.5340274462e-01   -9.6127722049e-01   -9.6849431333e-01   -9.7506722555e-01   -9.8097327915e-01   
+-9.8620827286e-01   -9.9078221500e-01   -9.9468508059e-01   -9.9790716629e-01   -1.0004460791e+00   
+-1.0022998937e+00   -1.0034671539e+00   -1.0039468739e+00   0.0000000000e+00    -2.6206808456e-02   
+-5.2395656075e-02   -7.8548594328e-02   -1.0464804999e-01   -1.3067617875e-01   -1.5661500980e-01   
+-1.8244691782e-01   -2.0815443686e-01   -2.3371968381e-01   -2.5912513526e-01   -2.8435480633e-01   
+-3.0939022637e-01   -3.3421423225e-01   -3.5881040645e-01   -3.8316168782e-01   -4.0725109955e-01   
+-4.3106284599e-01   -4.5458147933e-01   -4.7778950424e-01   -5.0067100227e-01   -5.2321159284e-01   
+-5.4539461123e-01   -5.6720483774e-01   -5.8863125154e-01   -6.0965753267e-01   -6.3026734366e-01   
+-6.5044762126e-01   -6.7018572852e-01   -6.8946599245e-01   -7.0827516419e-01   -7.2660579249e-01   
+-7.4444007373e-01   -7.6176573960e-01   -7.7857738761e-01   -7.9486053333e-01   -8.1060076585e-01   
+-8.2578999897e-01   -8.4042072001e-01   -8.5447739587e-01   -8.6795031407e-01   -8.8084121762e-01   
+-8.9313044808e-01   -9.0480948537e-01   -9.1588095362e-01   -9.2633211183e-01   -9.3615037439e-01   
+-9.4533442193e-01   -9.5388356991e-01   -9.6178084634e-01   -9.6902068731e-01   -9.7561999892e-01   
+-9.8155236074e-01   -9.8681352202e-01   -9.9141625946e-01   -9.9534911628e-01   -9.9860092820e-01   
+-1.0011692440e+00   -1.0030520802e+00   -1.0042479228e+00   -1.0047557282e+00   0.0000000000e+00    
+-2.6212391400e-02   -5.2406818135e-02   -7.8565327856e-02   -1.0467040909e-01   -1.3070422169e-01   
+-1.5664876620e-01   -1.8248644179e-01   -2.0819982302e-01   -2.3377097334e-01   -2.5918236485e-01   
+-2.8441827537e-01   -3.0946000945e-01   -3.3429039867e-01   -3.5889313249e-01   -3.8325110711e-01   
+-4.0734728734e-01   -4.3116600639e-01   -4.5469197462e-01   -4.7790743427e-01   -5.0079645937e-01   
+-5.2334490751e-01   -5.4553588110e-01   -5.6735415191e-01   -5.8878942778e-01   -6.0982507693e-01   
+-6.3044439513e-01   -6.5063451113e-01   -6.7038300442e-01   -6.8967379373e-01   -7.0849361644e-01   
+-7.2683603102e-01   -7.4468224593e-01   -7.6201997616e-01   -7.7884502096e-01   -7.9514233280e-01   
+-8.1089688316e-01   -8.2610108113e-01   -8.4074794545e-01   -8.5482090254e-01   -8.6831021401e-01   
+-8.8121966396e-01   -8.9352755754e-01   -9.0522534362e-01   -9.1631762066e-01   -9.2679066990e-01   
+-9.3663087683e-01   -9.4583791847e-01   -9.5441214334e-01   -9.6233448453e-01   -9.6959933261e-01   
+-9.7622766520e-01   -9.8218894777e-01   -9.8747887518e-01   -9.9211326741e-01   -9.9607909373e-01   
+-9.9936358384e-01   -1.0019642225e+00   -1.0038789623e+00   -1.0051062256e+00   -1.0056449054e+00   
+0.0000000000e+00    -2.6218528755e-02   -5.2419088640e-02   -7.8583723100e-02   -1.0469498854e-01   
+-1.3073504942e-01   -1.5668587477e-01   -1.8252989066e-01   -2.0824971623e-01   -2.3382735615e-01   
+-2.5924527760e-01   -2.8448804718e-01   -3.0953672231e-01   -3.3437412876e-01   -3.5898407361e-01   
+-3.8334940614e-01   -4.0745302701e-01   -4.3127941108e-01   -4.5481344259e-01   -4.7803707528e-01   
+-5.0093437495e-01   -5.2349146093e-01   -5.4569117972e-01   -5.6751829366e-01   -5.8896331165e-01   
+-6.1000925909e-01   -6.3063902861e-01   -6.5083996002e-01   -6.7059987072e-01   -6.8990223063e-01   
+-7.0873376199e-01   -7.2708913329e-01   -7.4494846694e-01   -7.6229945958e-01   -7.7913923153e-01   
+-7.9545211623e-01   -8.1122240627e-01   -8.2644305517e-01   -8.4110766588e-01   -8.5519852098e-01   
+-8.6870585365e-01   -8.8163569175e-01   -8.9396410178e-01   -9.0568249849e-01   -9.1679765072e-01   
+-9.2729476488e-01   -9.3715909536e-01   -9.4639141450e-01   -9.5499320652e-01   -9.6294310151e-01   
+-9.7023544003e-01   -9.7689567551e-01   -9.8288875080e-01   -9.8821030094e-01   -9.9287949143e-01   
+-9.9688156127e-01   -1.0002019747e+00   -1.0028381459e+00   -1.0047879576e+00   -1.0060497618e+00   
+-1.0066223819e+00   0.0000000000e+00    -2.6225275578e-02   -5.2432577661e-02   -7.8603945075e-02   
+-1.0472200885e-01   -1.3076893848e-01   -1.5672666839e-01   -1.8257765421e-01   -2.0830456406e-01   
+-2.3388933803e-01   -2.5931443787e-01   -2.8456474765e-01   -3.0962105311e-01   -3.3446617363e-01   
+-3.5908404559e-01   -3.8345746671e-01   -4.0756926711e-01   -4.3140407737e-01   -4.5494697289e-01   
+-4.7817959024e-01   -5.0108598616e-01   -5.2365256778e-01   -5.4586190019e-01   -5.6769873544e-01   
+-5.8915446298e-01   -6.1021173138e-01   -6.3085299009e-01   -6.5106581092e-01   -6.7083827282e-01   
+-6.9015335235e-01   -7.0899775509e-01   -7.2736736976e-01   -7.4524112491e-01   -7.6260669697e-01   
+-7.7946265854e-01   -7.9579266257e-01   -8.1158025531e-01   -8.2681898879e-01   -8.4150310818e-01   
+-8.5561363866e-01   -8.6914078212e-01   -8.8209303299e-01   -8.9444399686e-01   -9.0618505092e-01   
+-9.1732534995e-01   -9.2784891879e-01   -9.3773976839e-01   -9.4699987521e-01   -9.5563197193e-01   
+-9.6361215694e-01   -9.7093471582e-01   -9.7763002228e-01   -9.8365804745e-01   -9.8901436061e-01   
+-9.9372180499e-01   -9.9776371750e-01   -1.0011236215e+00   -1.0037988540e+00   -1.0057872202e+00   
+-1.0070869954e+00   -1.0076969263e+00   0.0000000000e+00    -2.6232692391e-02   -5.2447406204e-02   
+-7.8626175185e-02   -1.0475171240e-01   -1.3080619289e-01   -1.5677151300e-01   -1.8263016089e-01   
+-2.0836485854e-01   -2.3395747499e-01   -2.5939046608e-01   -2.8464906483e-01   -3.0971375834e-01   
+-3.3456735898e-01   -3.5919394525e-01   -3.8357625819e-01   -4.0769705038e-01   -4.3154112359e-01   
+-4.5509376335e-01   -4.7833625759e-01   -5.0125265306e-01   -5.2382967327e-01   -5.4604957399e-01   
+-5.6789709590e-01   -5.8936459650e-01   -6.1043431009e-01   -6.3108819891e-01   -6.5131408985e-01   
+-6.7110034934e-01   -6.9042941160e-01   -7.0928796390e-01   -7.2767323639e-01   -7.4556284515e-01   
+-7.6294444444e-01   -7.7981820333e-01   -7.9616702672e-01   -8.1197364039e-01   -8.2723225432e-01   
+-8.4193781970e-01   -8.5606997941e-01   -8.6961890096e-01   -8.8259579030e-01   -8.9497154770e-01   
+-9.0673750909e-01   -9.1790545212e-01   -9.2845810271e-01   -9.3837810490e-01   -9.4766875884e-01   
+-9.5633416964e-01   -9.6434765262e-01   -9.7170343288e-01   -9.7843729304e-01   -9.8450373877e-01   
+-9.8989826706e-01   -9.9464776412e-01   -9.9873347586e-01   -1.0021367921e+00   -1.0048549647e+00   
+-1.0068857142e+00   -1.0082272311e+00   -1.0088781778e+00   0.0000000000e+00    -2.6240845727e-02   
+-5.2463707289e-02   -7.8650612846e-02   -1.0478436565e-01   -1.3084714682e-01   -1.5682081088e-01   
+-1.8268788173e-01   -2.0843114053e-01   -2.3403237826e-01   -2.5947404423e-01   -2.8474175508e-01   
+-3.0981566962e-01   -3.3467859249e-01   -3.5931475845e-01   -3.8370684621e-01   -4.0783752312e-01   
+-4.3169177913e-01   -4.5525513078e-01   -4.7850848271e-01   -5.0143587074e-01   -5.2402436614e-01   
+-5.4625588465e-01   -5.6811515447e-01   -5.8959559724e-01   -6.1067899188e-01   -6.3134676505e-01   
+-6.5158702400e-01   -6.7138845126e-01   -6.9073288480e-01   -7.0960699178e-01   -7.2800947696e-01   
+-7.4591651367e-01   -7.6331573177e-01   -7.8020905533e-01   -7.9657856693e-01   -8.1240609040e-01   
+-8.2768655901e-01   -8.4241570006e-01   -8.5657163688e-01   -8.7014449919e-01   -8.8314847371e-01   
+-8.9555148674e-01   -9.0734482888e-01   -9.1854316109e-01   -9.2912778136e-01   -9.3907983114e-01   
+-9.4840406566e-01   -9.5710609879e-01   -9.6515618637e-01   -9.7254848704e-01   -9.7932472947e-01   
+-9.8543341110e-01   -9.9086994946e-01   -9.9566567521e-01   -9.9979953564e-01   -1.0032505751e+00   
+-1.0060159521e+00   -1.0080932936e+00   -1.0094806973e+00   -1.0101767331e+00   0.0000000000e+00    
+-2.6249808727e-02   -5.2481627145e-02   -7.8677477279e-02   -1.0482026151e-01   -1.3089216767e-01   
+-1.5687500427e-01   -1.8275133451e-01   -2.0850400463e-01   -2.3411471977e-01   -2.5956592207e-01   
+-2.8484364990e-01   -3.0992770116e-01   -3.3480087200e-01   -3.5944756894e-01   -3.8385040221e-01   
+-4.0799194543e-01   -4.3185739545e-01   -4.5543252273e-01   -4.7869781058e-01   -5.0163728277e-01   
+-5.2423839290e-01   -5.4648268291e-01   -5.6835486724e-01   -5.8984953741e-01   -6.1094797169e-01   
+-6.3163100798e-01   -6.5188706176e-01   -6.7170516300e-01   -6.9106649427e-01   -7.0995770057e-01   
+-7.2837910776e-01   -7.4630530309e-01   -7.6372388962e-01   -7.8063872072e-01   -7.9703097496e-01   
+-8.1288148467e-01   -8.2818597822e-01   -8.4294103612e-01   -8.5712311122e-01   -8.7072229171e-01   
+-8.8375604109e-01   -8.9618901637e-01   -9.0801245829e-01   -9.1924419745e-01   -9.2986396216e-01   
+-9.3985124199e-01   -9.4921239181e-01   -9.5795468403e-01   -9.6604501120e-01   -9.7347745894e-01   
+-9.8030029237e-01   -9.8645540411e-01   -9.9193812435e-01   -9.9678466952e-01   -1.0009714600e+00   
+-1.0044749619e+00   -1.0072922308e+00   -1.0094207912e+00   -1.0108586385e+00   -1.0116042407e+00   
+0.0000000000e+00    -2.6259661793e-02   -5.2501326525e-02   -7.8707009471e-02   -1.0485972199e-01   
+-1.3094165930e-01   -1.5693457931e-01   -1.8282108844e-01   -2.0858410446e-01   -2.3420523817e-01   
+-2.5966692380e-01   -2.8495566334e-01   -3.1005085793e-01   -3.3493529441e-01   -3.5959356813e-01   
+-3.8400821398e-01   -4.0816170259e-01   -4.3203945822e-01   -4.5562753051e-01   -4.7890593956e-01   
+-5.0185869594e-01   -5.2447367350e-01   -5.4673200326e-01   -5.6861838458e-01   -5.9012869499e-01   
+-6.1124366242e-01   -6.3194347752e-01   -6.5221689463e-01   -6.7205332567e-01   -6.9143323267e-01   
+-7.1034323635e-01   -7.2878544458e-01   -7.4673270107e-01   -7.6417257941e-01   -7.8111105384e-01   
+-7.9752830917e-01   -8.1340408775e-01   -8.2873499204e-01   -8.4351854044e-01   -8.5772934948e-01   
+-8.7135746166e-01   -8.8442394269e-01   -8.9688985560e-01   -9.0874638635e-01   -9.2001484993e-01   
+-9.3067324907e-01   -9.4069925745e-01   -9.5010098842e-01   -9.5888753764e-01   -9.6702210039e-01   
+-9.7449868197e-01   -9.8137273312e-01   -9.8757888570e-01   -9.9311237387e-01   -9.9801478505e-01   
+-1.0022597618e+00   -1.0058209358e+00   -1.0086952497e+00   -1.0108801153e+00   -1.0123734155e+00   
+-1.0131735064e+00   0.0000000000e+00    -2.6270493314e-02   -5.2522982144e-02   -7.8739474345e-02   
+-1.0490310108e-01   -1.3099606567e-01   -1.5700007042e-01   -1.8289776925e-01   -2.0867215857e-01   
+-2.3430474546e-01   -2.5977795546e-01   -2.8507880023e-01   -3.1018624474e-01   -3.3508306559e-01   
+-3.5975406569e-01   -3.8418169717e-01   -4.0834831740e-01   -4.3223960066e-01   -4.5584190345e-01   
+-4.7913473670e-01   -5.0210209644e-01   -5.2473231853e-01   -5.4700608225e-01   -5.6890807039e-01   
+-5.9043557420e-01   -6.1156871658e-01   -6.3228697672e-01   -6.5257948141e-01   -6.7243606248e-01   
+-6.9183638987e-01   -7.1076705758e-01   -7.2923213249e-01   -7.4720254162e-01   -7.6466582614e-01   
+-7.8163029180e-01   -7.9807503093e-01   -8.1397858771e-01   -8.2933852543e-01   -8.4415339357e-01   
+-8.5839578996e-01   -8.7205570689e-01   -8.8515816996e-01   -8.9766029136e-01   -9.0955319680e-01   
+-9.2086203170e-01   -9.3156290185e-01   -9.4163148471e-01   -9.5107782672e-01   -9.5991302787e-01   
+-9.6809621899e-01   -9.7562131711e-01   -9.8255167211e-01   -9.8881393412e-01   -9.9440323172e-01   
+-9.9936705667e-01   -1.0036759979e+00   -1.0073005711e+00   -1.0102375949e+00   -1.0124843569e+00   
+-1.0140386167e+00   -1.0148986073e+00   0.0000000000e+00    -2.6282400454e-02   -5.2546788264e-02   
+-7.8775163129e-02   -1.0495078791e-01   -1.3105587483e-01   -1.5707206510e-01   -1.8298206482e-01   
+-2.0876895685e-01   -2.3441413427e-01   -2.5990001308e-01   -2.8521416517e-01   -3.1033507608e-01   
+-3.3524551112e-01   -3.5993050140e-01   -3.8437240804e-01   -4.0855346392e-01   -4.3245961815e-01   
+-4.5607756459e-01   -4.7938625445e-01   -5.0236966772e-01   -5.2501664819e-01   -5.4730737854e-01   
+-5.6922652333e-01   -5.9077292790e-01   -6.1192605011e-01   -6.3266458695e-01   -6.5297807471e-01   
+-6.7285680679e-01   -6.9227958242e-01   -7.1123296620e-01   -7.2972317855e-01   -7.4771903948e-01   
+-7.6520805451e-01   -7.8220109244e-01   -7.9867604465e-01   -8.1461013812e-01   -8.3000199244e-01   
+-8.4485129050e-01   -8.5912841102e-01   -8.7282329104e-01   -8.8596530934e-01   -8.9850723490e-01   
+-9.1044012721e-01   -9.2179334249e-01   -9.3254090121e-01   -9.4265628638e-01   -9.5215166952e-01   
+-9.6104035395e-01   -9.6927700247e-01   -9.7685543504e-01   -9.8384768513e-01   -9.9017162848e-01   
+-9.9582227763e-01   -1.0008536150e+00   -1.0052328726e+00   -1.0089271409e+00   -1.0119331019e+00   
+-1.0142479071e+00   -1.0158691801e+00   -1.0167950186e+00   0.0000000000e+00    -2.6295490027e-02   
+-5.2572958440e-02   -7.8814395972e-02   -1.0500321027e-01   -1.3112162332e-01   -1.5715120917e-01   
+-1.8307473132e-01   -2.0887536765e-01   -2.3453438589e-01   -2.6003419156e-01   -2.8536297246e-01   
+-3.1049868704e-01   -3.3542408823e-01   -3.6012445798e-01   -3.8458205736e-01   -4.0877898242e-01   
+-4.3270148438e-01   -4.5633662797e-01   -4.7966274904e-01   -5.0266381005e-01   -5.2532921308e-01   
+-5.4763859493e-01   -5.6957660010e-01   -5.9114378237e-01   -6.1231886848e-01   -6.3307969560e-01   
+-6.5341625015e-01   -6.7331933293e-01   -6.9276678601e-01   -7.1174514166e-01   -7.3026298773e-01   
+-7.4828682792e-01   -7.6580412864e-01   -7.8282857620e-01   -7.9933674178e-01   -8.1530440437e-01   
+-8.3073134474e-01   -8.4561849179e-01   -8.5993378468e-01   -8.7366709980e-01   -8.8685260134e-01   
+-8.9943828379e-01   -9.1141513385e-01   -9.2281713668e-01   -9.3361602037e-01   -9.4378285553e-01   
+-9.5333214981e-01   -9.6227962865e-01   -9.7057504312e-01   -9.7821210649e-01   -9.8527239814e-01   
+-9.9166414808e-01   -9.9738224127e-01   -1.0024877954e+00   -1.0069443521e+00   -1.0107152366e+00   
+-1.0137969805e+00   -1.0161865858e+00   -1.0178815267e+00   -1.0188797522e+00   0.0000000000e+00    
+-2.6309879455e-02   -5.2601727433e-02   -7.8857524815e-02   -1.0506083840e-01   -1.3119390094e-01   
+-1.5723821262e-01   -1.8317660002e-01   -2.0899234552e-01   -2.3466657904e-01   -2.6018169459e-01   
+-2.8552655700e-01   -3.1067854532e-01   -3.3562039887e-01   -3.6033767533e-01   -3.8481252582e-01   
+-4.0902689594e-01   -4.3296736903e-01   -4.5662141752e-01   -4.7996670082e-01   -5.0298716205e-01   
+-5.2567281709e-01   -5.4800270261e-01   -5.6996144108e-01   -5.9155146437e-01   -6.1275069550e-01   
+-6.3353602643e-01   -6.5389793840e-01   -6.7382779003e-01   -6.9330237113e-01   -7.1230817848e-01   
+-7.3085640241e-01   -7.4891100035e-01   -7.6645939564e-01   -7.8351837195e-01   -8.0006304914e-01   
+-8.1606761442e-01   -8.3153312506e-01   -8.4646187966e-01   -8.6081913562e-01   -8.7459470262e-01   
+-8.8782800547e-01   -9.0046179009e-01   -9.1248696309e-01   -9.2394259830e-01   -9.3479790375e-01   
+-9.4502129814e-01   -9.5462985716e-01   -9.6364196897e-01   -9.7200198512e-01   -9.7970350161e-01   
+-9.8683859165e-01   -9.9330488167e-01   -9.9909711641e-01   -1.0042842573e+00   -1.0088257893e+00   
+-1.0126808982e+00   -1.0158459508e+00   -1.0183177842e+00   -1.0200937085e+00   -1.0211715093e+00   
+0.0000000000e+00    -2.6325697819e-02   -5.2633353319e-02   -7.8904936548e-02   -1.0512418926e-01   
+-1.3127335605e-01   -1.5733385590e-01   -1.8328858476e-01   -2.0912093983e-01   -2.3481189958e-01   
+-2.6034384534e-01   -2.8570638623e-01   -3.1087626434e-01   -3.3583620404e-01   -3.6057206613e-01   
+-3.8506588084e-01   -4.0929942840e-01   -4.3325965724e-01   -4.5693448796e-01   -4.8030083638e-01   
+-5.0334262438e-01   -5.2605054255e-01   -5.4840296785e-01   -5.7038449852e-01   -5.9199963106e-01   
+-6.1322540492e-01   -6.3403767299e-01   -6.5442746048e-01   -6.7438673923e-01   -6.9389114230e-01   
+-7.1292712742e-01   -7.3150874588e-01   -7.4959715594e-01   -7.6717973364e-01   -7.8427666756e-01   
+-8.0086148213e-01   -8.1690661471e-01   -8.3241452581e-01   -8.4738901979e-01   -8.6179240594e-01   
+-8.7561442062e-01   -8.8890027169e-01   -9.0158693522e-01   -9.1366522986e-01   -9.2517982339e-01   
+-9.3609715354e-01   -9.4638272373e-01   -9.5605643277e-01   -9.6513959589e-01   -9.7357062897e-01   
+-9.8134299905e-01   -9.8856031530e-01   -9.9510854759e-01   -1.0009822865e+00   -1.0062591161e+00   
+-1.0108940618e+00   -1.0148417590e+00   -1.0180983932e+00   -1.0206606203e+00   -1.0225255700e+00   
+-1.0236908484e+00   0.0000000000e+00    -2.6343087018e-02   -5.2668119800e-02   -7.8957056483e-02   
+-1.0519383116e-01   -1.3136070142e-01   -1.5743899700e-01   -1.8341169008e-01   -2.0926230414e-01   
+-2.3497165111e-01   -2.6052209839e-01   -2.8590407331e-01   -3.1109361777e-01   -3.3607343965e-01   
+-3.6082973301e-01   -3.8534439518e-01   -4.0959902457e-01   -4.3358097100e-01   -4.5727864773e-01   
+-4.8066815314e-01   -5.0373338574e-01   -5.2646577786e-01   -5.4884298124e-01   -5.7084956750e-01   
+-5.9249230274e-01   -6.1374725515e-01   -6.3458913535e-01   -6.5500956653e-01   -6.7500119463e-01   
+-6.9453838113e-01   -7.1360754082e-01   -7.3222587002e-01   -7.5035144991e-01   -7.6797160448e-01   
+-7.8511026538e-01   -8.0173920316e-01   -8.1782893155e-01   -8.3338345367e-01   -8.4840822915e-01   
+-8.6286232645e-01   -8.7673540126e-01   -8.9007901882e-01   -9.0282381238e-01   -9.1496050389e-01   
+-9.2653991057e-01   -9.3752542475e-01   -9.4787934509e-01   -9.5762467384e-01   -9.6678594400e-01   
+-9.7529504630e-01   -9.8314530606e-01   -9.9045301397e-01   -9.9709132575e-01   -1.0030546625e+00   
+-1.0084300873e+00   -1.0131677232e+00   -1.0172172032e+00   -1.0205745133e+00   -1.0232361106e+00   
+-1.0251989264e+00   -1.0264603693e+00   0.0000000000e+00    -2.6362203044e-02   -5.2706338750e-02   
+-7.9014352165e-02   -1.0527038881e-01   -1.3145672058e-01   -1.5755457908e-01   -1.8354702033e-01   
+-2.0941770657e-01   -2.3514726669e-01   -2.6071805279e-01   -2.8612139163e-01   -3.1133255538e-01   
+-3.3633423383e-01   -3.6111298738e-01   -3.8565056725e-01   -4.0992837201e-01   -4.3393419268e-01   
+-4.5765698414e-01   -4.8107194612e-01   -5.0416295148e-01   -5.2692224793e-01   -5.4932668997e-01   
+-5.7136081995e-01   -5.9303389896e-01   -6.1432092748e-01   -6.3519536042e-01   -6.5564947835e-01   
+-6.7567666826e-01   -6.9524989372e-01   -7.1435552236e-01   -7.3301420786e-01   -7.5118064871e-01   
+-7.6884211171e-01   -7.8602664326e-01   -8.0270408588e-01   -8.1884283866e-01   -8.3444860048e-01   
+-8.4952865066e-01   -8.6403849493e-01   -8.7796770040e-01   -8.9137482092e-01   -9.0418351709e-01   
+-9.1638440454e-01   -9.2803506060e-01   -9.3909552981e-01   -9.4952458777e-01   -9.5934864839e-01   
+-9.6859578197e-01   -9.7719070613e-01   -9.8512659038e-01   -9.9253366623e-01   -9.9927100282e-01   
+-1.0053328349e+00   -1.0108166459e+00   -1.0156671696e+00   -1.0198285398e+00   -1.0232965234e+00   
+-1.0260673589e+00   -1.0281377594e+00   -1.0295049162e+00   0.0000000000e+00    -2.6383217378e-02   
+-5.2748353016e-02   -7.9077337569e-02   -1.0535454899e-01   -1.3156227488e-01   -1.5768163900e-01   
+-1.8369578949e-01   -2.0958854117e-01   -2.3534032171e-01   -2.6093346635e-01   -2.8636029065e-01   
+-3.1159522058e-01   -3.3662092607e-01   -3.6142437021e-01   -3.8598714361e-01   -4.1029042515e-01   
+-4.3432249088e-01   -4.5807289107e-01   -4.8151583758e-01   -5.0463517505e-01   -5.2742404756e-01   
+-5.4985843318e-01   -5.7192284209e-01   -5.9362927816e-01   -6.1495156809e-01   -6.3586178641e-01   
+-6.5635293634e-01   -6.7641921950e-01   -6.9603206276e-01   -7.1517778188e-01   -7.3388083124e-01   
+-7.5209219072e-01   -7.6979906428e-01   -7.8703402164e-01   -8.0376478586e-01   -8.1995743136e-01   
+-8.3561952123e-01   -8.5076033512e-01   -8.6533146230e-01   -8.7932237245e-01   -8.9279930207e-01   
+-9.0567824667e-01   -9.1794970500e-01   -9.2967868584e-01   -9.4082155345e-01   -9.5133321055e-01   
+-9.6124382147e-01   -9.7058534510e-01   -9.7927461361e-01   -9.8730462525e-01   -9.9482093675e-01   
+-1.0016671317e+00   -1.0078372402e+00   -1.0134402007e+00   -1.0184148223e+00   -1.0226991940e+00   
+-1.0262888416e+00   -1.0291797631e+00   -1.0313684318e+00   -1.0328518006e+00   0.0000000000e+00    
+-2.6406318531e-02   -5.2794539491e-02   -7.9146577710e-02   -1.0544706666e-01   -1.3167831120e-01   
+-1.5782131654e-01   -1.8385933210e-01   -2.0977634042e-01   -2.3555254796e-01   -2.6117027146e-01   
+-2.8662291342e-01   -3.1188396964e-01   -3.3693608815e-01   -3.6176667476e-01   -3.8635714354e-01   
+-4.1068843181e-01   -4.3474934886e-01   -4.5853009945e-01   -4.8200380949e-01   -5.0515429258e-01   
+-5.2797567818e-01   -5.5044298092e-01   -5.7254067560e-01   -5.9428378122e-01   -6.1564483418e-01   
+-6.3659439153e-01   -6.5712625091e-01   -6.7723550945e-01   -6.9689190474e-01   -7.1608169552e-01   
+-7.3483351427e-01   -7.5309425302e-01   -7.7085104659e-01   -7.8814143729e-01   -8.0493081817e-01   
+-8.2118270819e-01   -8.3690671974e-01   -8.5211433146e-01   -8.6675282722e-01   -8.8081156961e-01   
+-8.9436524069e-01   -9.0732140971e-01   -9.1967044694e-01   -9.3148553056e-01   -9.4271897910e-01   
+-9.5332143781e-01   -9.6332719387e-01   -9.7277248091e-01   -9.8156546261e-01   -9.8969894891e-01   
+-9.9733534365e-01   -1.0043012072e+00   -1.0105903444e+00   -1.0163242864e+00   -1.0214353295e+00   
+-1.0258549172e+00   -1.0295783106e+00   -1.0326012431e+00   -1.0349199248e+00   -1.0365310458e+00   
+0.0000000000e+00    -2.6431713735e-02   -5.2845312493e-02   -7.9222693713e-02   -1.0554877175e-01   
+-1.3180587046e-01   -1.5797486470e-01   -1.8403911524e-01   -2.0998278899e-01   -2.3578584925e-01   
+-2.6143059240e-01   -2.8691161584e-01   -3.1220139279e-01   -3.3728254727e-01   -3.6214297172e-01   
+-3.8676388614e-01   -4.1112596236e-01   -4.3521859579e-01   -4.5903271071e-01   -4.8254023923e-01   
+-5.0572496085e-01   -5.2858208824e-01   -5.5108557691e-01   -5.7321986278e-01   -5.9500327942e-01   
+-6.1640694476e-01   -6.3739974768e-01   -6.5797635914e-01   -6.7813286072e-01   -6.9783713295e-01   
+-7.1707537190e-01   -7.3588080307e-01   -7.5419582466e-01   -7.7200749554e-01   -7.8935882435e-01   
+-8.0621264281e-01   -8.2252966060e-01   -8.3832174292e-01   -8.5360278581e-01   -8.6831534016e-01   
+-8.8244865083e-01   -8.9608668415e-01   -9.0912774633e-01   -9.2156206639e-01   -9.3347180319e-01   
+-9.4480482777e-01   -9.5550710510e-01   -9.6561745464e-01   -9.7517680928e-01   -9.8408380335e-01   
+-9.9233103982e-01   -1.0000994426e+00   -1.0071968584e+00   -1.0136168444e+00   -1.0194947749e+00   
+-1.0247557867e+00   -1.0293240181e+00   -1.0331944389e+00   -1.0363624918e+00   -1.0388240971e+00   
+-1.0405756568e+00   0.0000000000e+00    -2.6459630797e-02   -5.2901127485e-02   -7.9306368383e-02   
+-1.0566057662e-01   -1.3194609694e-01   -1.5814366089e-01   -1.8423675167e-01   -2.1020973885e-01   
+-2.3604231842e-01   -2.6171676439e-01   -2.8722898772e-01   -3.1255033751e-01   -3.3766341135e-01   
+-3.6255663669e-01   -3.8721102014e-01   -4.1160694167e-01   -4.3573444107e-01   -4.5958523356e-01   
+-4.8312993889e-01   -5.0635229907e-01   -5.2924871757e-01   -5.5179198561e-01   -5.7396649635e-01   
+-5.9579422707e-01   -6.1724473639e-01   -6.3828507937e-01   -6.5891088699e-01   -6.7911932306e-01   
+-6.9887622663e-01   -7.1816772487e-01   -7.3703209242e-01   -7.5540678739e-01   -7.7327878515e-01   
+-7.9069710350e-01   -8.0762175847e-01   -8.2401037152e-01   -8.3987728436e-01   -8.5523905046e-01   
+-8.7003301775e-01   -8.8424830168e-01   -8.9797907479e-01   -9.1111346040e-01   -9.2364153227e-01   
+-9.3565532174e-01   -9.4709781071e-01   -9.5790981911e-01   -9.6813514875e-01   -9.7781989840e-01   
+-9.8685222680e-01   -9.9522450935e-01   -1.0031380292e+00   -1.0103800609e+00   -1.0169438896e+00   
+-1.0229801074e+00   -1.0284059806e+00   -1.0331376166e+00   -1.0371696651e+00   -1.0404972495e+00   
+-1.0431159716e+00   -1.0450219161e+00   0.0000000000e+00    -2.6490320151e-02   -5.2962485160e-02   
+-7.9398352328e-02   -1.0578348422e-01   -1.3210024854e-01   -1.5832921932e-01   -1.8445401429e-01   
+-2.1045922586e-01   -2.3632425614e-01   -2.6203135456e-01   -2.8757787608e-01   -3.1293393403e-01   
+-3.3808209697e-01   -3.6301138046e-01   -3.8770255658e-01   -4.1213568443e-01   -4.3630151214e-01   
+-4.6019262445e-01   -4.8377819841e-01   -5.0704193484e-01   -5.2998154624e-01   -5.5256854391e-01   
+-5.7478727404e-01   -5.9666371943e-01   -6.1816572455e-01   -6.3925832853e-01   -6.5993821772e-01   
+-6.8020374561e-01   -7.0001850705e-01   -7.1936855347e-01   -7.3829771004e-01   -7.5673800424e-01   
+-7.7467631960e-01   -7.9216827987e-01   -8.0917080575e-01   -8.2563812378e-01   -8.4158729816e-01   
+-8.5703780364e-01   -8.7192126856e-01   -8.8622666606e-01   -9.0005938844e-01   -9.1329636493e-01   
+-9.2592749859e-01   -9.3805567364e-01   -9.4961849731e-01   -9.6055113357e-01   -9.7090286136e-01   
+-9.8072545833e-01   -9.8989556732e-01   -9.9840531359e-01   -1.0064783613e+00   -1.0138793699e+00   
+-1.0206013255e+00   -1.0268115492e+00   -1.0324186553e+00   -1.0373299228e+00   -1.0415396495e+00   
+-1.0450426076e+00   -1.0478340488e+00   -1.0499097092e+00   0.0000000000e+00    -2.6524057098e-02   
+-5.3029935932e-02   -7.9499470698e-02   -1.0591859711e-01   -1.3226970810e-01   -1.5853320454e-01   
+-1.8469285208e-01   -2.1073348807e-01   -2.3663419157e-01   -2.6237718497e-01   -2.8796141064e-01   
+-3.1335562343e-01   -3.3854235998e-01   -3.6351128237e-01   -3.8824290483e-01   -4.1271693375e-01   
+-4.3692489596e-01   -4.6086033202e-01   -4.8449083306e-01   -5.0780005459e-01   -5.3078714813e-01   
+-5.5342221799e-01   -5.7568955869e-01   -5.9761955634e-01   -6.1917817102e-01   -6.4032822577e-01   
+-6.6106756707e-01   -6.8139585625e-01   -7.0127422112e-01   -7.2068862982e-01   -7.3968900927e-01   
+-7.5820141698e-01   -7.7621263559e-01   -7.9378555075e-01   -8.1087368047e-01   -8.2742751926e-01   
+-8.4346712411e-01   -8.5901518121e-01   -8.7399703127e-01   -8.8840149104e-01   -9.0234628672e-01   
+-9.1569604183e-01   -9.2844047178e-01   -9.4069439142e-01   -9.5238949957e-01   -9.6345474259e-01   
+-9.7394542043e-01   -9.8391955359e-01   -9.9324112542e-01   -1.0019019862e+00   -1.0101504036e+00   
+-1.0177261762e+00   -1.0246219616e+00   -1.0310234708e+00   -1.0368298069e+00   -1.0419385440e+00   
+-1.0463435932e+00   -1.0500393404e+00   -1.0530206525e+00   -1.0552828825e+00   0.0000000000e+00    
+-2.6561144278e-02   -5.3104084874e-02   -7.9610630582e-02   -1.0606712733e-01   -1.3245599576e-01   
+-1.5875744642e-01   -1.8495540755e-01   -2.1103498577e-01   -2.3697490500e-01   -2.6275735792e-01   
+-2.8838303192e-01   -3.1381918851e-01   -3.3904832921e-01   -3.6406082682e-01   -3.8883691212e-01   
+-4.1335590378e-01   -4.3761018462e-01   -4.6159434599e-01   -4.8527423557e-01   -5.0863345907e-01   
+-5.3167274996e-01   -5.5436066580e-01   -5.7668144431e-01   -5.9867031221e-01   -6.2029115805e-01   
+-6.4150436867e-01   -6.6230906595e-01   -6.8270634892e-01   -7.0265463332e-01   -7.2213979577e-01   
+-7.4121847084e-01   -7.5981015328e-01   -7.7790151476e-01   -7.9556342401e-01   -8.1274565842e-01   
+-8.2939460986e-01   -8.4553362535e-01   -8.6118892139e-01   -8.7627892668e-01   -8.9079228604e-01   
+-9.0486028442e-01   -9.1833401758e-01   -9.3120299466e-01   -9.4359514590e-01   -9.5543567499e-01   
+-9.6664669322e-01   -9.7729011949e-01   -9.8743083707e-01   -9.9691891268e-01   -1.0057458943e+00   
+-1.0141870964e+00   -1.0219549880e+00   -1.0290418650e+00   -1.0356536553e+00   -1.0416790060e+00   
+-1.0470048224e+00   -1.0516245904e+00   -1.0555322715e+00   -1.0587223096e+00   -1.0611896363e+00   
+0.0000000000e+00    -2.6601914383e-02   -5.3185597143e-02   -7.9732829150e-02   -1.0623040727e-01   
+-1.3266078264e-01   -1.5900395654e-01   -1.8524403597e-01   -2.1136642357e-01   -2.3734945282e-01   
+-2.6317528377e-01   -2.8884652213e-01   -3.1432878771e-01   -3.3960454348e-01   -3.6466494353e-01   
+-3.8948990704e-01   -4.1405832644e-01   -4.3836352558e-01   -4.6240125090e-01   -4.8613543353e-01   
+-5.0954962443e-01   -5.3264629609e-01   -5.5539230575e-01   -5.7777182870e-01   -5.9982541292e-01   
+-6.2151466976e-01   -6.4279730793e-01   -6.6367385134e-01   -6.8414697948e-01   -7.0417212673e-01   
+-7.2373506911e-01   -7.4289981492e-01   -7.6157864443e-01   -7.7975810733e-01   -7.9751784817e-01   
+-8.1480353230e-01   -8.3155704153e-01   -8.4780533958e-01   -8.6357852387e-01   -8.7878742470e-01   
+-8.9342049789e-01   -9.0762393355e-01   -9.2123395634e-01   -9.3423984866e-01   -9.4678395852e-01   
+-9.5878434951e-01   -9.7015561909e-01   -9.8096696241e-01   -9.9129080700e-01   -1.0009619210e+00   
+-1.0099715200e+00   -1.0186246512e+00   -1.0266037400e+00   -1.0339006851e+00   -1.0407436382e+00   
+-1.0470097526e+00   -1.0525742053e+00   -1.0574300147e+00   -1.0615706757e+00   -1.0649901672e+00   
+-1.0676829577e+00   0.0000000000e+00    -2.6646733146e-02   -5.3275203951e-02   -7.9867162593e-02   
+-1.0640990166e-01   -1.3288590579e-01   -1.5927494624e-01   -1.8556132652e-01   -2.1173077464e-01   
+-2.3776119495e-01   -2.6363471157e-01   -2.8935603902e-01   -3.1488899244e-01   -3.4021599237e-01   
+-3.6532905178e-01   -3.9020774734e-01   -4.1483050288e-01   -4.3919167672e-01   -4.6328828514e-01   
+-4.8708215237e-01   -5.1055676917e-01   -5.3371651979e-01   -5.5652639225e-01   -5.7897049323e-01   
+-6.0109522040e-01   -6.2285968176e-01   -6.4421864194e-01   -6.6517416613e-01   -6.8573067122e-01   
+-7.0584031416e-01   -7.2548876037e-01   -7.4474812413e-01   -7.6352275480e-01   -7.8179906800e-01   
+-7.9966635557e-01   -8.1706576244e-01   -8.3393421251e-01   -8.5030264538e-01   -8.6620542476e-01   
+-8.8154502801e-01   -8.9630970315e-01   -9.1066202563e-01   -9.2442187224e-01   -9.3757827609e-01   
+-9.5028943476e-01   -9.6246556266e-01   -9.7401299729e-01   -9.8500893258e-01   -9.9553408953e-01   
+-1.0054064184e+00   -1.0146167696e+00   -1.0235028754e+00   -1.0317141343e+00   -1.0392420081e+00   
+-1.0463390797e+00   -1.0528698666e+00   -1.0586966533e+00   -1.0638119441e+00   -1.0682087210e+00   
+-1.0718804517e+00   -1.0748210955e+00   0.0000000000e+00    -2.6696002615e-02   -5.3373709124e-02   
+-8.0014835959e-02   -1.0660722065e-01   -1.3313338470e-01   -1.5957284646e-01   -1.8591012546e-01   
+-2.1213130744e-01   -2.3821382495e-01   -2.6413976263e-01   -2.8991615326e-01   -3.1550482805e-01   
+-3.4088816092e-01   -3.6605910901e-01   -3.9099687245e-01   -4.1567935995e-01   -4.4010206704e-01   
+-4.6426340592e-01   -4.8812288470e-01   -5.1166392798e-01   -5.3489302157e-01   -5.5777309870e-01   
+-5.8028819061e-01   -6.0249112555e-01   -6.2433825957e-01   -6.4578112090e-01   -6.6682346901e-01   
+-6.8747163076e-01   -7.0767416021e-01   -7.2741660115e-01   -7.4677997887e-01   -7.6565992419e-01   
+-7.8404270537e-01   -8.0202821954e-01   -8.1955264234e-01   -8.3654744740e-01   -8.5304794503e-01   
+-8.6909318889e-01   -8.8457647389e-01   -8.9948581965e-01   -9.1400181409e-01   -9.2792636271e-01   
+-9.4124822458e-01   -9.5414302077e-01   -9.6651233706e-01   -9.7825343072e-01   -9.8945228881e-01   
+-1.0001987494e+00   -1.0102922747e+00   -1.0197233137e+00   -1.0288655295e+00   -1.0373320140e+00   
+-1.0451137488e+00   -1.0524901740e+00   -1.0593119167e+00   -1.0654270883e+00   -1.0708276281e+00   
+-1.0755059545e+00   -1.0794549728e+00   -1.0826680830e+00   0.0000000000e+00    -2.6750164768e-02   
+-5.3481996310e-02   -8.0177173963e-02   -1.0682413432e-01   -1.3340543938e-01   -1.5990032952e-01   
+-1.8629356172e-01   -2.1257161497e-01   -2.3871140317e-01   -2.6469496757e-01   -2.9053188940e-01   
+-3.1618181894e-01   -3.4162707887e-01   -3.6686166425e-01   -3.9186436127e-01   -4.1661251240e-01   
+-4.4110286328e-01   -4.6533536064e-01   -4.8926696649e-01   -5.1288103271e-01   -5.3618635535e-01   
+-5.5914360879e-01   -5.8173674134e-01   -6.0402565044e-01   -6.2596366691e-01   -6.4749876114e-01   
+-6.6863655519e-01   -6.8938547552e-01   -7.0969011552e-01   -7.2953588531e-01   -7.4901360604e-01   
+-7.6800932425e-01   -7.8650914615e-01   -8.0462462736e-01   -8.2228648075e-01   -8.3942018843e-01   
+-8.5606586544e-01   -8.7226772115e-01   -8.8790895616e-01   -9.0297733900e-01   -9.1767325877e-01   
+-9.3177886505e-01   -9.4528261567e-01   -9.5837928543e-01   -9.7096097460e-01   -9.8291495852e-01   
+-9.9433689057e-01   -1.0053266312e+00   -1.0156633188e+00   -1.0253369608e+00   -1.0347607196e+00   
+-1.0435077748e+00   -1.0515685802e+00   -1.0592520999e+00   -1.0663936917e+00   -1.0728258862e+00   
+-1.0785400016e+00   -1.0835278365e+00   -1.0877816784e+00   -1.0912943120e+00   0.0000000000e+00    
+-2.6809705470e-02   -5.3601036906e-02   -8.0355632870e-02   -1.0706258851e-01   -1.3370451034e-01   
+-1.6026033314e-01   -1.8671507496e-01   -2.1305564705e-01   -2.3925839317e-01   -2.6530530690e-01   
+-2.9120877094e-01   -3.1692603812e-01   -3.4243937474e-01   -3.6774391689e-01   -3.9281799569e-01   
+-4.1763833114e-01   -4.4220304313e-01   -4.6651376534e-01   -4.9052466082e-01   -5.1421900148e-01   
+-5.3760812306e-01   -5.6065021678e-01   -5.8332913976e-01   -6.0571256064e-01   -6.2775048459e-01   
+-6.4938697089e-01   -6.7062968908e-01   -6.9148937378e-01   -7.1190626438e-01   -7.3186562405e-01   
+-7.5146904256e-01   -7.7059203043e-01   -7.8922051574e-01   -8.0747887031e-01   -8.2529180177e-01   
+-8.4257820573e-01   -8.5938347910e-01   -8.7575749893e-01   -8.9157236911e-01   -9.0681558213e-01   
+-9.2170929464e-01   -9.3601393843e-01   -9.4971764019e-01   -9.6303623047e-01   -9.7585138211e-01   
+-9.8803939726e-01   -9.9970655553e-01   -1.0109637350e+00   -1.0215677320e+00   -1.0315080687e+00   
+-1.0412413289e+00   -1.0502968168e+00   -1.0586644057e+00   -1.0666855160e+00   -1.0741787192e+00   
+-1.0809594184e+00   -1.0870182488e+00   -1.0923463279e+00   -1.0969352638e+00   -1.1007771649e+00   
+0.0000000000e+00    -2.6875158834e-02   -5.3731898777e-02   -8.0551813560e-02   -1.0732472228e-01   
+-1.3403328041e-01   -1.6065608676e-01   -1.8717844638e-01   -2.1358774571e-01   -2.3985970178e-01   
+-2.6597625569e-01   -2.9195286991e-01   -3.1774416165e-01   -3.4333233528e-01   -3.6871378123e-01   
+-3.9386633036e-01   -4.1876601835e-01   -4.4341247587e-01   -4.6780919101e-01   -4.9190724993e-01   
+-5.1568983664e-01   -5.3917107878e-01   -5.6230643780e-01   -5.8507967060e-01   -6.0756698872e-01   
+-6.2971474142e-01   -6.5146268846e-01   -6.7282075026e-01   -6.9380219873e-01   -7.1434248693e-01   
+-7.3442671646e-01   -7.5416831512e-01   -7.7343121111e-01   -7.9220113669e-01   -8.1061655259e-01   
+-8.2859556486e-01   -8.4604982854e-01   -8.6303054692e-01   -8.7959382754e-01   -8.9559957565e-01   
+-9.1103498030e-01   -9.2614612726e-01   -9.4066957389e-01   -9.5459308285e-01   -9.6815563137e-01   
+-9.8122742937e-01   -9.9367271613e-01   -1.0056094527e+00   -1.0171606289e+00   -1.0280584804e+00   
+-1.0382919957e+00   -1.0483654923e+00   -1.0577600415e+00   -1.0664648790e+00   -1.0748571041e+00   
+-1.0827368355e+00   -1.0899006474e+00   -1.0963384247e+00   -1.1020405357e+00   -1.1069978419e+00   
+-1.1112017083e+00   0.0000000000e+00    -2.6947112016e-02   -5.3875755827e-02   -8.0767475886e-02   
+-1.0761288713e-01   -1.3439469884e-01   -1.6109114052e-01   -1.8768783269e-01   -2.1417268420e-01   
+-2.4052072307e-01   -2.6671383276e-01   -2.9277086129e-01   -3.1864352857e-01   -3.4431397089e-01   
+-3.6977995751e-01   -3.9501876943e-01   -4.2000569004e-01   -4.4474201078e-01   -4.6923325834e-01   
+-4.9342713644e-01   -5.1730673244e-01   -5.4088924313e-01   -5.6412712912e-01   -5.8700403713e-01   
+-6.0960556995e-01   -6.3187405790e-01   -6.5374453425e-01   -6.7522939379e-01   -6.9634469774e-01   
+-7.1702063747e-01   -7.3724213701e-01   -7.5713563775e-01   -7.7655233536e-01   -7.9547774687e-01   
+-8.1406582102e-01   -8.3222740668e-01   -8.4986619931e-01   -8.6703978519e-01   -8.8381112107e-01   
+-9.0002670216e-01   -9.1567338393e-01   -9.3102355757e-01   -9.4578753518e-01   -9.5995267918e-01   
+-9.7378341212e-01   -9.8713734263e-01   -9.9986544923e-01   -1.0120985344e+00   -1.0239729026e+00   
+-1.0351937897e+00   -1.0457495976e+00   -1.0561971176e+00   -1.0659643986e+00   -1.0750399749e+00   
+-1.0838401681e+00   -1.0921448117e+00   -1.0997297812e+00   -1.1065841365e+00   -1.1126974225e+00   
+-1.1180596799e+00   -1.1226614564e+00   0.0000000000e+00    -2.7026210476e-02   -5.4033898538e-02   
+-8.1004554465e-02   -1.0792966807e-01   -1.3479200777e-01   -1.6156939710e-01   -1.8824780338e-01   
+-2.1481570974e-01   -2.4124738678e-01   -2.6752465460e-01   -2.9367008294e-01   -3.1963220673e-01   
+-3.4539308737e-01   -3.7095200996e-01   -3.9628565095e-01   -4.2136846678e-01   -4.4620357457e-01   
+-4.7079874206e-01   -4.9509795460e-01   -5.1908419336e-01   -5.4277802903e-01   -5.6612862338e-01   
+-5.8911950202e-01   -6.1184659159e-01   -6.3424780435e-01   -6.5625297773e-01   -6.7787722661e-01   
+-6.9913967849e-01   -7.1996474056e-01   -7.4033714166e-01   -7.6039762904e-01   -7.7998340148e-01   
+-7.9907973938e-01   -8.1785761753e-01   -8.3621990694e-01   -8.5406155309e-01   -8.7144715909e-01   
+-8.8844721107e-01   -9.0489346250e-01   -9.2077240217e-01   -9.3638533895e-01   -9.5141373334e-01   
+-9.6584450786e-01   -9.7997005713e-01   -9.9363413720e-01   -1.0066731489e+00   -1.0192320116e+00   
+-1.0314616662e+00   -1.0430376677e+00   -1.0539477734e+00   -1.0648064589e+00   -1.0749834856e+00   
+-1.0844666169e+00   -1.0937152914e+00   -1.1024870428e+00   -1.1105349927e+00   -1.1178472941e+00   
+-1.1244125867e+00   -1.1302200088e+00   -1.1352592097e+00   0.0000000000e+00    -2.7113163774e-02   
+-5.4207745541e-02   -8.1265176026e-02   -1.0827790679e-01   -1.3522877129e-01   -1.6209514674e-01   
+-1.8886338172e-01   -2.1552259066e-01   -2.4204621151e-01   -2.6841599473e-01   -2.9465860140e-01   
+-3.2071906513e-01   -3.4657936505e-01   -3.7224045257e-01   -3.9767833958e-01   -4.2286657347e-01   
+-4.4781027830e-01   -4.7251968543e-01   -4.9693469262e-01   -5.2103816425e-01   -5.4485437997e-01   
+-5.6832887514e-01   -5.9144504222e-01   -6.1431015689e-01   -6.3685727463e-01   -6.5901052107e-01   
+-6.8078800128e-01   -7.0221221355e-01   -7.2320120651e-01   -7.4373949437e-01   -7.6398355092e-01   
+-7.8375518810e-01   -8.0303942616e-01   -8.2202595670e-01   -8.4060888067e-01   -8.5867352463e-01   
+-8.7629220530e-01   -8.9354368593e-01   -9.1024351432e-01   -9.2637777616e-01   -9.4227956964e-01   
+-9.5759863861e-01   -9.7232142197e-01   -9.8677106419e-01   -1.0007760931e+00   -1.0141568843e+00   
+-1.0270738755e+00   -1.0396940981e+00   -1.0516604785e+00   -1.0629600653e+00   -1.0742707471e+00   
+-1.0848982091e+00   -1.0948293673e+00   -1.1045710594e+00   -1.1138563045e+00   -1.1224132110e+00   
+-1.1302289347e+00   -1.1372911201e+00   -1.1435879138e+00   -1.1491079772e+00   0.0000000000e+00    
+-2.7208751931e-02   -5.4398856343e-02   -8.1551678496e-02   -1.0866072721e-01   -1.3570890741e-01   
+-1.6267310572e-01   -1.8954008978e-01   -2.1629966806e-01   -2.4292436318e-01   -2.6939584901e-01   
+-2.9574528425e-01   -3.2191385352e-01   -3.4788344550e-01   -3.7365684339e-01   -3.9920932854e-01   
+-4.2451344897e-01   -4.4957653504e-01   -4.7441152633e-01   -4.9895382709e-01   -5.2318617335e-01   
+-5.4713692203e-01   -5.7074762193e-01   -5.9400151915e-01   -6.1701836546e-01   -6.3972587721e-01   
+-6.6204190103e-01   -6.8398782915e-01   -7.0558986536e-01   -7.2675906828e-01   -7.4747971621e-01   
+-7.6792557119e-01   -7.8790153031e-01   -8.0739232788e-01   -8.2660823095e-01   -8.4543369949e-01   
+-8.6374348594e-01   -8.8161838668e-01   -8.9914626396e-01   -9.1612485067e-01   -9.3253978933e-01   
+-9.4875912430e-01   -9.6439773317e-01   -9.7944152316e-01   -9.9424744224e-01   -1.0086272777e+00   
+-1.0223837886e+00   -1.0356944723e+00   -1.0487440480e+00   -1.0611395737e+00   -1.0728673189e+00   
+-1.0846748822e+00   -1.0957975098e+00   -1.1062211861e+00   -1.1165048546e+00   -1.1263545858e+00   
+-1.1354709905e+00   -1.1438401286e+00   -1.1514485506e+00   -1.1582833126e+00   -1.1643319905e+00   
+0.0000000000e+00    -2.7313832428e-02   -5.4608945319e-02   -8.1866631967e-02   -1.0908156344e-01   
+-1.3623672324e-01   -1.6330845865e-01   -1.9028399805e-01   -2.1715391280e-01   -2.4388971932e-01   
+-2.7047300728e-01   -2.9693987966e-01   -3.2322728985e-01   -3.4931702708e-01   -3.7521388827e-01   
+-4.0089235168e-01   -4.2632386671e-01   -4.5151818912e-01   -4.7649123565e-01   -5.0117347082e-01   
+-5.2554748955e-01   -5.4964613091e-01   -5.7340656130e-01   -5.9681186590e-01   -6.1999551147e-01   
+-6.4287934509e-01   -6.6537431084e-01   -6.8750541450e-01   -7.0930293337e-01   -7.3067024193e-01   
+-7.5159135912e-01   -7.7225905204e-01   -7.9245962320e-01   -8.1217749258e-01   -8.3164554592e-01   
+-8.5073764481e-01   -8.6931691753e-01   -8.8747348214e-01   -9.0530520352e-01   -9.2259023052e-01   
+-9.3931371849e-01   -9.5588212827e-01   -9.7187200879e-01   -9.8726868285e-01   -1.0024662587e+00   
+-1.0172581208e+00   -1.0314276620e+00   -1.0451711335e+00   -1.0586926992e+00   -1.0715599863e+00   
+-1.0837584080e+00   -1.0961121953e+00   -1.1077791607e+00   -1.1187442645e+00   -1.1296237300e+00   
+-1.1400940033e+00   -1.1498254671e+00   -1.1588029760e+00   -1.1670118784e+00   -1.1744380315e+00   
+-1.1810678177e+00   0.0000000000e+00    -2.7418912924e-02   -5.4819034295e-02   -8.2181585438e-02   
+-1.0950239967e-01   -1.3676453907e-01   -1.6394381158e-01   -1.9102790631e-01   -2.1800815753e-01   
+-2.4485507545e-01   -2.7155016555e-01   -2.9813447507e-01   -3.2454072618e-01   -3.5075060867e-01   
+-3.7677093316e-01   -4.0257537482e-01   -4.2813428445e-01   -4.5345984320e-01   -4.7857094497e-01   
+-5.0339311455e-01   -5.2790880574e-01   -5.5215533979e-01   -5.7606550066e-01   -5.9962221265e-01   
+-6.2297265748e-01   -6.4603281297e-01   -6.6870672064e-01   -6.9102299986e-01   -7.1301600139e-01   
+-7.3458141558e-01   -7.5570300203e-01   -7.7659253288e-01   -7.9701771610e-01   -8.1696265728e-01   
+-8.3668286088e-01   -8.5604159013e-01   -8.7489034911e-01   -8.9332857760e-01   -9.1146414309e-01   
+-9.2905561036e-01   -9.4608764765e-01   -9.6300513224e-01   -9.7934628441e-01   -9.9509584253e-01   
+-1.0106850752e+00   -1.0258889638e+00   -1.0404715355e+00   -1.0546477948e+00   -1.0686413504e+00   
+-1.0819803989e+00   -1.0946494970e+00   -1.1075495084e+00   -1.1197608116e+00   -1.1312673428e+00   
+-1.1427426055e+00   -1.1538334209e+00   -1.1641799436e+00   -1.1737658235e+00   -1.1825752062e+00   
+-1.1905927505e+00   -1.1978036449e+00   0.0000000000e+00    -2.7523993421e-02   -5.5029123271e-02   
+-8.2496538909e-02   -1.0992323590e-01   -1.3729235490e-01   -1.6457916452e-01   -1.9177181457e-01   
+-2.1886240227e-01   -2.4582043158e-01   -2.7262732382e-01   -2.9932907048e-01   -3.2585416250e-01   
+-3.5218419025e-01   -3.7832797804e-01   -4.0425839796e-01   -4.2994470220e-01   -4.5540149728e-01   
+-4.8065065429e-01   -5.0561275828e-01   -5.3027012194e-01   -5.5466454867e-01   -5.7872444003e-01   
+-6.0243255939e-01   -6.2594980349e-01   -6.4918628085e-01   -6.7203913045e-01   -6.9454058521e-01   
+-7.1672906941e-01   -7.3849258923e-01   -7.5981464494e-01   -7.8092601373e-01   -8.0157580899e-01   
+-8.2174782198e-01   -8.4172017585e-01   -8.6134553545e-01   -8.8046378069e-01   -8.9918367306e-01   
+-9.1762308265e-01   -9.3552099021e-01   -9.5286157681e-01   -9.7012813621e-01   -9.8682056004e-01   
+-1.0029230022e+00   -1.0189038916e+00   -1.0345198069e+00   -1.0495154089e+00   -1.0641244561e+00   
+-1.0785900015e+00   -1.0924008115e+00   -1.1055405860e+00   -1.1189868216e+00   -1.1317424626e+00   
+-1.1437904211e+00   -1.1558614810e+00   -1.1675728384e+00   -1.1785344201e+00   -1.1887286709e+00   
+-1.1981385340e+00   -1.2067474694e+00   -1.2145394721e+00   0.0000000000e+00    -2.7629073917e-02   
+-5.5239212247e-02   -8.2811492380e-02   -1.1034407213e-01   -1.3782017073e-01   -1.6521451745e-01   
+-1.9251572284e-01   -2.1971664700e-01   -2.4678578771e-01   -2.7370448208e-01   -3.0052366588e-01   
+-3.2716759883e-01   -3.5361777184e-01   -3.7988502293e-01   -4.0594142110e-01   -4.3175511994e-01   
+-4.5734315135e-01   -4.8273036361e-01   -5.0783240201e-01   -5.3263143813e-01   -5.5717375756e-01   
+-5.8138337940e-01   -6.0524290614e-01   -6.2892694950e-01   -6.5233974874e-01   -6.7537154025e-01   
+-6.9805817057e-01   -7.2044213742e-01   -7.4240376288e-01   -7.6392628785e-01   -7.8525949457e-01   
+-8.0613390188e-01   -8.2653298667e-01   -8.4675749081e-01   -8.6664948077e-01   -8.8603721227e-01   
+-9.0503876852e-01   -9.2378202221e-01   -9.4198637005e-01   -9.5963550597e-01   -9.7725114017e-01   
+-9.9429483566e-01   -1.0107501619e+00   -1.0271227081e+00   -1.0431506499e+00   -1.0585592823e+00   
+-1.0736011174e+00   -1.0885386527e+00   -1.1028212241e+00   -1.1164316751e+00   -1.1304241347e+00   
+-1.1437241135e+00   -1.1563134994e+00   -1.1689803564e+00   -1.1813122560e+00   -1.1928888966e+00   
+-1.2036915184e+00   -1.2137018618e+00   -1.2229021883e+00   -1.2312752993e+00   0.0000000000e+00    
+-2.7734154413e-02   -5.5449301223e-02   -8.3126445850e-02   -1.1076490836e-01   -1.3834798656e-01   
+-1.6584987038e-01   -1.9325963110e-01   -2.2057089174e-01   -2.4775114384e-01   -2.7478164035e-01   
+-3.0171826129e-01   -3.2848103516e-01   -3.5505135342e-01   -3.8144206781e-01   -4.0762444424e-01   
+-4.3356553768e-01   -4.5928480543e-01   -4.8481007293e-01   -5.1005204573e-01   -5.3499275433e-01   
+-5.5968296644e-01   -5.8404231877e-01   -6.0805325288e-01   -6.3190409552e-01   -6.5549321662e-01   
+-6.7870395006e-01   -7.0157575592e-01   -7.2415520544e-01   -7.4631493653e-01   -7.6803793076e-01   
+-7.8959297542e-01   -8.1069199477e-01   -8.3131815137e-01   -8.5179480577e-01   -8.7195342609e-01   
+-8.9161064385e-01   -9.1089386398e-01   -9.2994096178e-01   -9.4845174990e-01   -9.6640943513e-01   
+-9.8437414414e-01   -1.0017691113e+00   -1.0185773216e+00   -1.0353415245e+00   -1.0517814930e+00   
+-1.0676031557e+00   -1.0830777787e+00   -1.0984873039e+00   -1.1132416367e+00   -1.1273227641e+00   
+-1.1418614478e+00   -1.1557057644e+00   -1.1688365778e+00   -1.1820992319e+00   -1.1950516735e+00   
+-1.2072433732e+00   -1.2186543658e+00   -1.2292651897e+00   -1.2390569073e+00   -1.2480111265e+00   
+0.0000000000e+00    -2.7839234910e-02   -5.5659390198e-02   -8.3441399321e-02   -1.1118574459e-01   
+-1.3887580239e-01   -1.6648522332e-01   -1.9400353937e-01   -2.2142513647e-01   -2.4871649998e-01   
+-2.7585879862e-01   -3.0291285670e-01   -3.2979447149e-01   -3.5648493500e-01   -3.8299911270e-01   
+-4.0930746738e-01   -4.3537595543e-01   -4.6122645951e-01   -4.8688978225e-01   -5.1227168946e-01   
+-5.3735407052e-01   -5.6219217532e-01   -5.8670125813e-01   -6.1086359963e-01   -6.3488124153e-01   
+-6.5864668450e-01   -6.8203635986e-01   -7.0509334128e-01   -7.2786827346e-01   -7.5022611018e-01   
+-7.7214957367e-01   -7.9392645626e-01   -8.1525008766e-01   -8.3610331607e-01   -8.5683212074e-01   
+-8.7725737141e-01   -8.9718407543e-01   -9.1674895944e-01   -9.3609990134e-01   -9.5491712975e-01   
+-9.7318336429e-01   -9.9149714811e-01   -1.0092433869e+00   -1.0264044813e+00   -1.0435603410e+00   
+-1.0604123360e+00   -1.0766470292e+00   -1.0925544400e+00   -1.1084359550e+00   -1.1236620492e+00   
+-1.1382138532e+00   -1.1532987610e+00   -1.1676874154e+00   -1.1813596561e+00   -1.1952181073e+00   
+-1.2087910911e+00   -1.2215978497e+00   -1.2336172133e+00   -1.2448285175e+00   -1.2552116262e+00   
+-1.2647469537e+00   0.0000000000e+00    -2.7944315406e-02   -5.5869479174e-02   -8.3756352792e-02   
+-1.1160658082e-01   -1.3940361821e-01   -1.6712057625e-01   -1.9474744763e-01   -2.2227938121e-01   
+-2.4968185611e-01   -2.7693595689e-01   -3.0410745211e-01   -3.3110790781e-01   -3.5791851659e-01   
+-3.8455615759e-01   -4.1099049052e-01   -4.3718637317e-01   -4.6316811359e-01   -4.8896949157e-01   
+-5.1449133319e-01   -5.3971538672e-01   -5.6470138420e-01   -5.8936019750e-01   -6.1367394637e-01   
+-6.3785838754e-01   -6.6180015238e-01   -6.8536876967e-01   -7.0861092663e-01   -7.3158134148e-01   
+-7.5413728383e-01   -7.7626121658e-01   -7.9825993710e-01   -8.1980818055e-01   -8.4088848076e-01   
+-8.6186943570e-01   -8.8256131673e-01   -9.0275750702e-01   -9.2260405490e-01   -9.4225884090e-01   
+-9.6138250959e-01   -9.7995729345e-01   -9.9862015208e-01   -1.0167176625e+00   -1.0342316410e+00   
+-1.0517791575e+00   -1.0690431791e+00   -1.0856909026e+00   -1.1020311013e+00   -1.1183846062e+00   
+-1.1340824618e+00   -1.1491049422e+00   -1.1647360741e+00   -1.1796690663e+00   -1.1938827344e+00   
+-1.2083369828e+00   -1.2225305086e+00   -1.2359523262e+00   -1.2485800607e+00   -1.2603918453e+00   
+-1.2713663451e+00   -1.2814827809e+00   0.0000000000e+00    -2.8049395903e-02   -5.6079568150e-02   
+-8.4071306263e-02   -1.1202741705e-01   -1.3993143404e-01   -1.6775592919e-01   -1.9549135589e-01   
+-2.2313362594e-01   -2.5064721224e-01   -2.7801311516e-01   -3.0530204752e-01   -3.3242134414e-01   
+-3.5935209817e-01   -3.8611320247e-01   -4.1267351366e-01   -4.3899679091e-01   -4.6510976767e-01   
+-4.9104920089e-01   -5.1671097692e-01   -5.4207670291e-01   -5.6721059309e-01   -5.9201913687e-01   
+-6.1648429312e-01   -6.4083553355e-01   -6.6495362027e-01   -6.8870117947e-01   -7.1212851198e-01   
+-7.3529440949e-01   -7.5804845748e-01   -7.8037285950e-01   -8.0259341795e-01   -8.2436627345e-01   
+-8.4567364546e-01   -8.6690675067e-01   -8.8786526204e-01   -9.0833093860e-01   -9.2845915036e-01   
+-9.4841778047e-01   -9.6784788944e-01   -9.8673122261e-01   -1.0057431560e+00   -1.0241919382e+00   
+-1.0420588007e+00   -1.0599979739e+00   -1.0776740222e+00   -1.0947347760e+00   -1.1115077625e+00   
+-1.1283332574e+00   -1.1445028744e+00   -1.1599960312e+00   -1.1761733872e+00   -1.1916507172e+00   
+-1.2064058127e+00   -1.2214558583e+00   -1.2362699262e+00   -1.2503068027e+00   -1.2635429082e+00   
+-1.2759551731e+00   -1.2875210640e+00   -1.2982186081e+00   0.0000000000e+00    -2.8154476399e-02   
+-5.6289657126e-02   -8.4386259734e-02   -1.1244825328e-01   -1.4045924987e-01   -1.6839128212e-01   
+-1.9623526416e-01   -2.2398787068e-01   -2.5161256837e-01   -2.7909027343e-01   -3.0649664292e-01   
+-3.3373478047e-01   -3.6078567975e-01   -3.8767024736e-01   -4.1435653680e-01   -4.4080720866e-01   
+-4.6705142175e-01   -4.9312891021e-01   -5.1893062065e-01   -5.4443801911e-01   -5.6971980197e-01   
+-5.9467807624e-01   -6.1929463987e-01   -6.4381267956e-01   -6.6810708815e-01   -6.9203358928e-01   
+-7.1564609734e-01   -7.3900747751e-01   -7.6195963113e-01   -7.8448450241e-01   -8.0692689879e-01   
+-8.2892436634e-01   -8.5045881016e-01   -8.7194406563e-01   -8.9316920736e-01   -9.1390437018e-01   
+-9.3431424582e-01   -9.5457672003e-01   -9.7431326929e-01   -9.9350515177e-01   -1.0128661600e+00   
+-1.0316662138e+00   -1.0498859603e+00   -1.0682167904e+00   -1.0863048652e+00   -1.1037786494e+00   
+-1.1209844238e+00   -1.1382819085e+00   -1.1549232870e+00   -1.1708871203e+00   -1.1876107004e+00   
+-1.2036323682e+00   -1.2189288911e+00   -1.2345747337e+00   -1.2500093437e+00   -1.2646612793e+00   
+-1.2785057556e+00   -1.2915185010e+00   -1.3036757830e+00   -1.3149544353e+00   0.0000000000e+00    
+-2.8259556895e-02   -5.6499746102e-02   -8.4701213205e-02   -1.1286908951e-01   -1.4098706570e-01   
+-1.6902663505e-01   -1.9697917242e-01   -2.2484211541e-01   -2.5257792450e-01   -2.8016743170e-01   
+-3.0769123833e-01   -3.3504821679e-01   -3.6221926134e-01   -3.8922729224e-01   -4.1603955994e-01   
+-4.4261762640e-01   -4.6899307583e-01   -4.9520861953e-01   -5.2115026438e-01   -5.4679933530e-01   
+-5.7222901085e-01   -5.9733701560e-01   -6.2210498661e-01   -6.4678982558e-01   -6.7126055603e-01   
+-6.9536599908e-01   -7.1916368269e-01   -7.4272054553e-01   -7.6587080479e-01   -7.8859614532e-01   
+-8.1126037964e-01   -8.3348245923e-01   -8.5524397486e-01   -8.7698138059e-01   -8.9847315268e-01   
+-9.1947780176e-01   -9.4016934128e-01   -9.6073565959e-01   -9.8077864913e-01   -1.0002790809e+00   
+-1.0199891640e+00   -1.0391404894e+00   -1.0577131200e+00   -1.0764356068e+00   -1.0949357083e+00   
+-1.1128225229e+00   -1.1304610851e+00   -1.1482305597e+00   -1.1653436996e+00   -1.1817782093e+00   
+-1.1990480135e+00   -1.2156140191e+00   -1.2314519694e+00   -1.2476936092e+00   -1.2637487613e+00   
+-1.2790157558e+00   -1.2934686031e+00   -1.3070818288e+00   -1.3198305019e+00   -1.3316902625e+00   
+0.0000000000e+00    -2.8364637392e-02   -5.6709835078e-02   -8.5016166676e-02   -1.1328992574e-01   
+-1.4151488153e-01   -1.6966198799e-01   -1.9772308068e-01   -2.2569636015e-01   -2.5354328064e-01   
+-2.8124458997e-01   -3.0888583374e-01   -3.3636165312e-01   -3.6365284292e-01   -3.9078433713e-01   
+-4.1772258308e-01   -4.4442804414e-01   -4.7093472990e-01   -4.9728832885e-01   -5.2336990811e-01   
+-5.4916065150e-01   -5.7473821973e-01   -5.9999595497e-01   -6.2491533336e-01   -6.4976697159e-01   
+-6.7441402392e-01   -6.9869840889e-01   -7.2268126805e-01   -7.4643361354e-01   -7.6978197844e-01   
+-7.9270778823e-01   -8.1559386048e-01   -8.3804055212e-01   -8.6002913955e-01   -8.8201869556e-01   
+-9.0377709800e-01   -9.2505123334e-01   -9.4602443674e-01   -9.6689459916e-01   -9.8724402898e-01   
+-1.0070530101e+00   -1.0271121679e+00   -1.0466147650e+00   -1.0655402797e+00   -1.0846544233e+00   
+-1.1035665513e+00   -1.1218663963e+00   -1.1399377464e+00   -1.1581792109e+00   -1.1757641122e+00   
+-1.1926692984e+00   -1.2104853266e+00   -1.2275956700e+00   -1.2439750477e+00   -1.2608124846e+00   
+-1.2774881788e+00   -1.2933702323e+00   -1.3084314505e+00   -1.3226451566e+00   -1.3359852208e+00   
+-1.3484260897e+00   0.0000000000e+00    -2.8469717888e-02   -5.6919924054e-02   -8.5331120147e-02   
+-1.1371076197e-01   -1.4204269736e-01   -1.7029734092e-01   -1.9846698895e-01   -2.2655060488e-01   
+-2.5450863677e-01   -2.8232174824e-01   -3.1008042915e-01   -3.3767508945e-01   -3.6508642451e-01   
+-3.9234138201e-01   -4.1940560622e-01   -4.4623846189e-01   -4.7287638398e-01   -4.9936803817e-01   
+-5.2558955183e-01   -5.5152196769e-01   -5.7724742862e-01   -6.0265489434e-01   -6.2772568010e-01   
+-6.5274411760e-01   -6.7756749180e-01   -7.0203081869e-01   -7.2619885340e-01   -7.5014668156e-01   
+-7.7369315209e-01   -7.9681943114e-01   -8.1992734133e-01   -8.4259864501e-01   -8.6481430425e-01   
+-8.8705601052e-01   -9.0908104332e-01   -9.3062466492e-01   -9.5187953220e-01   -9.7305353872e-01   
+-9.9370940882e-01   -1.0138269393e+00   -1.0342351719e+00   -1.0540890407e+00   -1.0733674394e+00   
+-1.0928732397e+00   -1.1121973944e+00   -1.1309102697e+00   -1.1494144077e+00   -1.1681278621e+00   
+-1.1861845247e+00   -1.2035603874e+00   -1.2219226398e+00   -1.2395773209e+00   -1.2564981261e+00   
+-1.2739313601e+00   -1.2912275964e+00   -1.3077247088e+00   -1.3233942980e+00   -1.3382084844e+00   
+-1.3521399398e+00   -1.3651619169e+00   0.0000000000e+00    -2.8574798385e-02   -5.7130013030e-02   
+-8.5646073618e-02   -1.1413159820e-01   -1.4257051319e-01   -1.7093269385e-01   -1.9921089721e-01   
+-2.2740484962e-01   -2.5547399290e-01   -2.8339890650e-01   -3.1127502456e-01   -3.3898852578e-01   
+-3.6652000609e-01   -3.9389842690e-01   -4.2108862936e-01   -4.4804887963e-01   -4.7481803806e-01   
+-5.0144774749e-01   -5.2780919556e-01   -5.5388328389e-01   -5.7975663750e-01   -6.0531383370e-01   
+-6.3053602685e-01   -6.5572126361e-01   -6.8072095968e-01   -7.0536322850e-01   -7.2971643876e-01   
+-7.5385974958e-01   -7.7760432574e-01   -8.0093107405e-01   -8.2426082217e-01   -8.4715673790e-01   
+-8.6959946895e-01   -8.9209332549e-01   -9.1438498864e-01   -9.3619809651e-01   -9.5773462766e-01   
+-9.7921247828e-01   -1.0001747887e+00   -1.0206008684e+00   -1.0413581759e+00   -1.0615633163e+00   
+-1.0811945991e+00   -1.1010920562e+00   -1.1208282374e+00   -1.1399541432e+00   -1.1588910690e+00   
+-1.1780765132e+00   -1.1966049373e+00   -1.2144514764e+00   -1.2333599529e+00   -1.2515589719e+00   
+-1.2690212044e+00   -1.2870502355e+00   -1.3049670139e+00   -1.3220791853e+00   -1.3383571454e+00   
+-1.3537718123e+00   -1.3682946587e+00   -1.3818977441e+00   0.0000000000e+00    -2.8679878881e-02   
+-5.7340102006e-02   -8.5961027088e-02   -1.1455243443e-01   -1.4309832902e-01   -1.7156804679e-01   
+-1.9995480547e-01   -2.2825909435e-01   -2.5643934903e-01   -2.8447606477e-01   -3.1246961996e-01   
+-3.4030196210e-01   -3.6795358767e-01   -3.9545547178e-01   -4.2277165250e-01   -4.4985929737e-01   
+-4.7675969214e-01   -5.0352745680e-01   -5.3002883929e-01   -5.5624460008e-01   -5.8226584638e-01   
+-6.0797277307e-01   -6.3334637359e-01   -6.5869840962e-01   -6.8387442756e-01   -7.0869563831e-01   
+-7.3323402411e-01   -7.5757281760e-01   -7.8151549939e-01   -8.0504271696e-01   -8.2859430302e-01   
+-8.5171483080e-01   -8.7438463364e-01   -8.9713064045e-01   -9.1968893396e-01   -9.4177152809e-01   
+-9.6358972312e-01   -9.8537141785e-01   -1.0066401685e+00   -1.0273747976e+00   -1.0484811798e+00   
+-1.0690375919e+00   -1.0890217588e+00   -1.1093108727e+00   -1.1294590805e+00   -1.1489980166e+00   
+-1.1683677303e+00   -1.1880251644e+00   -1.2070253499e+00   -1.2253425655e+00   -1.2447972660e+00   
+-1.2635406228e+00   -1.2815442827e+00   -1.3001691110e+00   -1.3187064315e+00   -1.3364336619e+00   
+-1.3533199929e+00   -1.3693351401e+00   -1.3844493776e+00   -1.3986335712e+00   0.0000000000e+00    
+-2.8784959377e-02   -5.7550190981e-02   -8.6275980559e-02   -1.1497327066e-01   -1.4362614485e-01   
+-1.7220339972e-01   -2.0069871374e-01   -2.2911333909e-01   -2.5740470516e-01   -2.8555322304e-01   
+-3.1366421537e-01   -3.4161539843e-01   -3.6938716926e-01   -3.9701251667e-01   -4.2445467564e-01   
+-4.5166971512e-01   -4.7870134622e-01   -5.0560716612e-01   -5.3224848302e-01   -5.5860591628e-01   
+-5.8477505526e-01   -6.1063171244e-01   -6.3615672034e-01   -6.6167555564e-01   -6.8702789545e-01   
+-7.1202804811e-01   -7.3675160946e-01   -7.6128588561e-01   -7.8542667304e-01   -8.0915435987e-01   
+-8.3292778386e-01   -8.5627292369e-01   -8.7916979834e-01   -9.0216795541e-01   -9.2499287927e-01   
+-9.4734495967e-01   -9.6944481858e-01   -9.9153035741e-01   -1.0131055484e+00   -1.0341487267e+00   
+-1.0556041838e+00   -1.0765118675e+00   -1.0968489185e+00   -1.1175296891e+00   -1.1380899235e+00   
+-1.1580418900e+00   -1.1778443915e+00   -1.1979738156e+00   -1.2174457625e+00   -1.2362336545e+00   
+-1.2562345792e+00   -1.2755222737e+00   -1.2940673610e+00   -1.3132879865e+00   -1.3324458490e+00   
+-1.3507881384e+00   -1.3682828403e+00   -1.3848984679e+00   -1.4006040965e+00   -1.4153693984e+00   
+0.0000000000e+00    -2.8890039874e-02   -5.7760279957e-02   -8.6590934030e-02   -1.1539410689e-01   
+-1.4415396068e-01   -1.7283875266e-01   -2.0144262200e-01   -2.2996758382e-01   -2.5837006129e-01   
+-2.8663038131e-01   -3.1485881078e-01   -3.4292883476e-01   -3.7082075084e-01   -3.9856956155e-01   
+-4.2613769878e-01   -4.5348013286e-01   -4.8064300030e-01   -5.0768687544e-01   -5.3446812675e-01   
+-5.6096723247e-01   -5.8728426415e-01   -6.1329065181e-01   -6.3896706709e-01   -6.6465270165e-01   
+-6.9018136333e-01   -7.1536045792e-01   -7.4026919482e-01   -7.6499895363e-01   -7.8933784669e-01   
+-8.1326600278e-01   -8.3726126471e-01   -8.6083101658e-01   -8.8395496304e-01   -9.0720527038e-01   
+-9.3029682459e-01   -9.5291839125e-01   -9.7529991404e-01   -9.9768929697e-01   -1.0195709282e+00   
+-1.0409226559e+00   -1.0627271878e+00   -1.0839861431e+00   -1.1046760781e+00   -1.1257485056e+00   
+-1.1467207666e+00   -1.1670857634e+00   -1.1873210528e+00   -1.2079224667e+00   -1.2278661751e+00   
+-1.2471247436e+00   -1.2676718923e+00   -1.2875039247e+00   -1.3065904394e+00   -1.3264068619e+00   
+-1.3461852666e+00   -1.3651426149e+00   -1.3832456878e+00   -1.4004617957e+00   -1.4167588155e+00   
+-1.4321052256e+00   0.0000000000e+00    -2.8995120370e-02   -5.7970368933e-02   -8.6905887501e-02   
+-1.1581494312e-01   -1.4468177651e-01   -1.7347410559e-01   -2.0218653026e-01   -2.3082182856e-01   
+-2.5933541743e-01   -2.8770753958e-01   -3.1605340619e-01   -3.4424227108e-01   -3.7225433242e-01   
+-4.0012660644e-01   -4.2782072192e-01   -4.5529055060e-01   -4.8258465438e-01   -5.0976658476e-01   
+-5.3668777048e-01   -5.6332854866e-01   -5.8979347303e-01   -6.1594959117e-01   -6.4177741383e-01   
+-6.6762984766e-01   -6.9333483121e-01   -7.1869286772e-01   -7.4378678017e-01   -7.6871202165e-01   
+-7.9324902034e-01   -8.1737764569e-01   -8.4159474555e-01   -8.6538910947e-01   -8.8874012774e-01   
+-9.1224258534e-01   -9.3560076991e-01   -9.5849182283e-01   -9.8115500950e-01   -1.0038482365e+00   
+-1.0260363081e+00   -1.0476965851e+00   -1.0698501917e+00   -1.0914604188e+00   -1.1125032378e+00   
+-1.1339673220e+00   -1.1553516096e+00   -1.1761296369e+00   -1.1967977141e+00   -1.2178711179e+00   
+-1.2382865877e+00   -1.2580158326e+00   -1.2791092054e+00   -1.2994855756e+00   -1.3191135177e+00   
+-1.3395257374e+00   -1.3599246841e+00   -1.3794970914e+00   -1.3982085352e+00   -1.4160251235e+00   
+-1.4329135344e+00   -1.4488410528e+00   0.0000000000e+00    -2.9100200867e-02   -5.8180457909e-02   
+-8.7220840972e-02   -1.1623577934e-01   -1.4520959233e-01   -1.7410945852e-01   -2.0293043853e-01   
+-2.3167607329e-01   -2.6030077356e-01   -2.8878469785e-01   -3.1724800160e-01   -3.4555570741e-01   
+-3.7368791401e-01   -4.0168365132e-01   -4.2950374506e-01   -4.5710096835e-01   -4.8452630845e-01   
+-5.1184629408e-01   -5.3890741421e-01   -5.6568986486e-01   -5.9230268191e-01   -6.1860853054e-01   
+-6.4458776058e-01   -6.7060699367e-01   -6.9648829909e-01   -7.2202527753e-01   -7.4730436553e-01   
+-7.7242508966e-01   -7.9716019399e-01   -8.2148928860e-01   -8.4592822640e-01   -8.6994720236e-01   
+-8.9352529243e-01   -9.1727990031e-01   -9.4090471523e-01   -9.6406525441e-01   -9.8701010496e-01   
+-1.0100071761e+00   -1.0325016879e+00   -1.0544705142e+00   -1.0769731957e+00   -1.0989346944e+00   
+-1.1203303975e+00   -1.1421861385e+00   -1.1639824527e+00   -1.1851735103e+00   -1.2062743754e+00   
+-1.2278197691e+00   -1.2487070002e+00   -1.2689069216e+00   -1.2905465186e+00   -1.3114672265e+00   
+-1.3316365960e+00   -1.3526446128e+00   -1.3736641017e+00   -1.3938515680e+00   -1.4131713827e+00   
+-1.4315884514e+00   -1.4490682533e+00   -1.4655768800e+00   0.0000000000e+00    -2.9205281363e-02   
+-5.8390546885e-02   -8.7535794443e-02   -1.1665661557e-01   -1.4573740816e-01   -1.7474481146e-01   
+-2.0367434679e-01   -2.3253031803e-01   -2.6126612969e-01   -2.8986185612e-01   -3.1844259700e-01   
+-3.4686914374e-01   -3.7512149559e-01   -4.0324069621e-01   -4.3118676820e-01   -4.5891138609e-01   
+-4.8646796253e-01   -5.1392600340e-01   -5.4112705793e-01   -5.6805118105e-01   -5.9481189079e-01   
+-6.2126746991e-01   -6.4739810732e-01   -6.7358413969e-01   -6.9964176698e-01   -7.2535768733e-01   
+-7.5082195088e-01   -7.7613815768e-01   -8.0107136764e-01   -8.2560093151e-01   -8.5026170724e-01   
+-8.7450529526e-01   -8.9831045713e-01   -9.2231721527e-01   -9.4620866055e-01   -9.6963868599e-01   
+-9.9286520042e-01   -1.0161661157e+00   -1.0389670677e+00   -1.0612444434e+00   -1.0840961997e+00   
+-1.1064089700e+00   -1.1281575572e+00   -1.1504049550e+00   -1.1726132958e+00   -1.1942173837e+00   
+-1.2157510367e+00   -1.2377684203e+00   -1.2591274128e+00   -1.2797980107e+00   -1.3019838317e+00   
+-1.3234488775e+00   -1.3441596743e+00   -1.3657634883e+00   -1.3874035192e+00   -1.4082060445e+00   
+-1.4281342301e+00   -1.4471517792e+00   -1.4652229722e+00   -1.4823127072e+00   0.0000000000e+00    
+-2.9310361859e-02   -5.8600635861e-02   -8.7850747914e-02   -1.1707745180e-01   -1.4626522399e-01   
+-1.7538016439e-01   -2.0441825505e-01   -2.3338456276e-01   -2.6223148582e-01   -2.9093901439e-01   
+-3.1963719241e-01   -3.4818258006e-01   -3.7655507718e-01   -4.0479774109e-01   -4.3286979134e-01   
+-4.6072180383e-01   -4.8840961661e-01   -5.1600571272e-01   -5.4334670166e-01   -5.7041249725e-01   
+-5.9732109968e-01   -6.2392640927e-01   -6.5020845407e-01   -6.7656128570e-01   -7.0279523486e-01   
+-7.2869009714e-01   -7.5433953624e-01   -7.7985122570e-01   -8.0498254130e-01   -8.2971257442e-01   
+-8.5459518809e-01   -8.7906338815e-01   -9.0309562183e-01   -9.2735453023e-01   -9.5151260587e-01   
+-9.7521211758e-01   -9.9872029589e-01   -1.0223250552e+00   -1.0454324476e+00   -1.0680183725e+00   
+-1.0912192037e+00   -1.1138832456e+00   -1.1359847169e+00   -1.1586237714e+00   -1.1812441388e+00   
+-1.2032612572e+00   -1.2252276980e+00   -1.2477170714e+00   -1.2695478254e+00   -1.2906890997e+00   
+-1.3134211448e+00   -1.3354305284e+00   -1.3566827527e+00   -1.3788823638e+00   -1.4011429368e+00   
+-1.4225605210e+00   -1.4430970776e+00   -1.4627151070e+00   -1.4813776912e+00   -1.4990485344e+00   
+0.0000000000e+00    -2.9415442356e-02   -5.8810724837e-02   -8.8165701385e-02   -1.1749828803e-01   
+-1.4679303982e-01   -1.7601551732e-01   -2.0516216332e-01   -2.3423880750e-01   -2.6319684195e-01   
+-2.9201617266e-01   -3.2083178782e-01   -3.4949601639e-01   -3.7798865876e-01   -4.0635478598e-01   
+-4.3455281448e-01   -4.6253222158e-01   -4.9035127069e-01   -5.1808542204e-01   -5.4556634539e-01   
+-5.7277381344e-01   -5.9983030856e-01   -6.2658534864e-01   -6.5301880081e-01   -6.7953843171e-01   
+-7.0594870274e-01   -7.3202250694e-01   -7.5785712159e-01   -7.8356429372e-01   -8.0889371495e-01   
+-8.3382421734e-01   -8.5892866893e-01   -8.8362148104e-01   -9.0788078652e-01   -9.3239184520e-01   
+-9.5681655119e-01   -9.8078554916e-01   -1.0045753913e+00   -1.0284839948e+00   -1.0518978274e+00   
+-1.0747923017e+00   -1.0983422076e+00   -1.1213575213e+00   -1.1438118766e+00   -1.1668425879e+00   
+-1.1898749819e+00   -1.2123051306e+00   -1.2347043593e+00   -1.2576657226e+00   -1.2799682380e+00   
+-1.3015801888e+00   -1.3248584580e+00   -1.3474121793e+00   -1.3692058310e+00   -1.3920012392e+00   
+-1.4148823543e+00   -1.4369149975e+00   -1.4580599250e+00   -1.4782784348e+00   -1.4975324101e+00   
+-1.5157843616e+00   0.0000000000e+00    -2.9520522852e-02   -5.9020813813e-02   -8.8480654855e-02   
+-1.1791912426e-01   -1.4732085565e-01   -1.7665087026e-01   -2.0590607158e-01   -2.3509305223e-01   
+-2.6416219809e-01   -2.9309333092e-01   -3.2202638323e-01   -3.5080945272e-01   -3.7942224034e-01   
+-4.0791183086e-01   -4.3623583762e-01   -4.6434263932e-01   -4.9229292477e-01   -5.2016513136e-01   
+-5.4778598912e-01   -5.7513512964e-01   -6.0233951744e-01   -6.2924428801e-01   -6.5582914756e-01   
+-6.8251557772e-01   -7.0910217062e-01   -7.3535491675e-01   -7.6137470694e-01   -7.8727736173e-01   
+-8.1280488860e-01   -8.3793586025e-01   -8.6326214978e-01   -8.8817957393e-01   -9.1266595122e-01   
+-9.3742916016e-01   -9.6212049650e-01   -9.8635898074e-01   -1.0104304868e+00   -1.0346429344e+00   
+-1.0583632073e+00   -1.0815662308e+00   -1.1054652116e+00   -1.1288317969e+00   -1.1516390363e+00   
+-1.1750614043e+00   -1.1985058249e+00   -1.2213490040e+00   -1.2441810205e+00   -1.2676143738e+00   
+-1.2903886506e+00   -1.3124712778e+00   -1.3362957711e+00   -1.3593938302e+00   -1.3817289093e+00   
+-1.4051201147e+00   -1.4286217719e+00   -1.4512694741e+00   -1.4730227725e+00   -1.4938417627e+00   
+-1.5136871290e+00   -1.5325201888e+00   0.0000000000e+00    -2.9625603349e-02   -5.9230902789e-02   
+-8.8795608326e-02   -1.1833996049e-01   -1.4784867148e-01   -1.7728622319e-01   -2.0664997985e-01   
+-2.3594729697e-01   -2.6512755422e-01   -2.9417048919e-01   -3.2322097864e-01   -3.5212288905e-01   
+-3.8085582193e-01   -4.0946887575e-01   -4.3791886076e-01   -4.6615305706e-01   -4.9423457885e-01   
+-5.2224484068e-01   -5.5000563285e-01   -5.7749644583e-01   -6.0484872632e-01   -6.3190322738e-01   
+-6.5863949431e-01   -6.8549272373e-01   -7.1225563851e-01   -7.3868732655e-01   -7.6489229230e-01   
+-7.9099042975e-01   -8.1671606225e-01   -8.4204750316e-01   -8.6759563062e-01   -8.9273766682e-01   
+-9.1745111592e-01   -9.4246647512e-01   -9.6742444182e-01   -9.9193241232e-01   -1.0162855823e+00   
+-1.0408018739e+00   -1.0648285871e+00   -1.0883401600e+00   -1.1125882156e+00   -1.1363060725e+00   
+-1.1594661960e+00   -1.1832802208e+00   -1.2071366680e+00   -1.2303928774e+00   -1.2536576818e+00   
+-1.2775630249e+00   -1.3008090632e+00   -1.3233623668e+00   -1.3477330842e+00   -1.3713754812e+00   
+-1.3942519876e+00   -1.4182389901e+00   -1.4423611894e+00   -1.4656239506e+00   -1.4879856199e+00   
+-1.5094050905e+00   -1.5298418480e+00   -1.5492560160e+00   0.0000000000e+00    -2.9730683845e-02   
+-5.9440991764e-02   -8.9110561797e-02   -1.1876079672e-01   -1.4837648731e-01   -1.7792157612e-01   
+-2.0739388811e-01   -2.3680154170e-01   -2.6609291035e-01   -2.9524764746e-01   -3.2441557404e-01   
+-3.5343632537e-01   -3.8228940351e-01   -4.1102592064e-01   -4.3960188390e-01   -4.6796347481e-01   
+-4.9617623293e-01   -5.2432455000e-01   -5.5222527658e-01   -5.7985776203e-01   -6.0735793521e-01   
+-6.3456216674e-01   -6.6144984105e-01   -6.8846986975e-01   -7.1540910639e-01   -7.4201973636e-01   
+-7.6840987765e-01   -7.9470349777e-01   -8.2062723590e-01   -8.4615914607e-01   -8.7192911146e-01   
+-8.9729575971e-01   -9.2223628062e-01   -9.4750379009e-01   -9.7272838714e-01   -9.9750584390e-01   
+-1.0221406777e+00   -1.0469608135e+00   -1.0712939670e+00   -1.0951140892e+00   -1.1197112195e+00   
+-1.1437803481e+00   -1.1672933556e+00   -1.1914990373e+00   -1.2157675110e+00   -1.2394367509e+00   
+-1.2631343431e+00   -1.2875116761e+00   -1.3112294757e+00   -1.3342534559e+00   -1.3591703974e+00   
+-1.3833571321e+00   -1.4067750660e+00   -1.4313578656e+00   -1.4561006070e+00   -1.4799784271e+00   
+-1.5029484673e+00   -1.5249684183e+00   -1.5459965669e+00   -1.5659918432e+00   0.0000000000e+00    
+-2.9835764341e-02   -5.9651080740e-02   -8.9425515268e-02   -1.1918163295e-01   -1.4890430314e-01   
+-1.7855692906e-01   -2.0813779637e-01   -2.3765578644e-01   -2.6705826648e-01   -2.9632480573e-01   
+-3.2561016945e-01   -3.5474976170e-01   -3.8372298509e-01   -4.1258296552e-01   -4.4128490704e-01   
+-4.6977389255e-01   -4.9811788700e-01   -5.2640425932e-01   -5.5444492031e-01   -5.8221907822e-01   
+-6.0986714409e-01   -6.3722110611e-01   -6.6426018780e-01   -6.9144701576e-01   -7.1856257427e-01   
+-7.4535214616e-01   -7.7192746301e-01   -7.9841656578e-01   -8.2453840955e-01   -8.5027078898e-01   
+-8.7626259231e-01   -9.0185385261e-01   -9.2702144531e-01   -9.5254110505e-01   -9.7803233246e-01   
+-1.0030792755e+00   -1.0279957732e+00   -1.0531197530e+00   -1.0777593468e+00   -1.1018880183e+00   
+-1.1268342235e+00   -1.1512546238e+00   -1.1751205153e+00   -1.1997178537e+00   -1.2243983541e+00   
+-1.2484806243e+00   -1.2726110044e+00   -1.2974603273e+00   -1.3216498883e+00   -1.3451445449e+00   
+-1.3706077105e+00   -1.3953387830e+00   -1.4192981443e+00   -1.4444767411e+00   -1.4698400245e+00   
+-1.4943329036e+00   -1.5179113148e+00   -1.5405317461e+00   -1.5621512858e+00   -1.5827276704e+00   
+0.0000000000e+00    -2.9940844838e-02   -5.9861169716e-02   -8.9740468739e-02   -1.1960246918e-01   
+-1.4943211897e-01   -1.7919228199e-01   -2.0888170464e-01   -2.3851003117e-01   -2.6802362261e-01   
+-2.9740196400e-01   -3.2680476486e-01   -3.5606319803e-01   -3.8515656668e-01   -4.1414001041e-01   
+-4.4296793018e-01   -4.7158431030e-01   -5.0005954108e-01   -5.2848396864e-01   -5.5666456403e-01   
+-5.8458039442e-01   -6.1237635297e-01   -6.3988004548e-01   -6.6707053454e-01   -6.9442416177e-01   
+-7.2171604215e-01   -7.4868455597e-01   -7.7544504836e-01   -8.0212963380e-01   -8.2844958320e-01   
+-8.5438243189e-01   -8.8059607315e-01   -9.0641194550e-01   -9.3180661001e-01   -9.5757842002e-01   
+-9.8333627778e-01   -1.0086527071e+00   -1.0338508686e+00   -1.0592786926e+00   -1.0842247267e+00   
+-1.1086619475e+00   -1.1339572275e+00   -1.1587288994e+00   -1.1829476750e+00   -1.2079366702e+00   
+-1.2330291971e+00   -1.2575244977e+00   -1.2820876657e+00   -1.3074089784e+00   -1.3320703009e+00   
+-1.3560356339e+00   -1.3820450236e+00   -1.4073204340e+00   -1.4318212226e+00   -1.4575956165e+00   
+-1.4835794421e+00   -1.5086873802e+00   -1.5328741622e+00   -1.5560950740e+00   -1.5783060047e+00   
+-1.5994634976e+00   0.0000000000e+00    -3.0045925334e-02   -6.0071258692e-02   -9.0055422210e-02   
+-1.2002330541e-01   -1.4995993480e-01   -1.7982763493e-01   -2.0962561290e-01   -2.3936427591e-01   
+-2.6898897875e-01   -2.9847912227e-01   -3.2799936027e-01   -3.5737663435e-01   -3.8659014826e-01   
+-4.1569705529e-01   -4.4465095332e-01   -4.7339472804e-01   -5.0200119516e-01   -5.3056367796e-01   
+-5.5888420776e-01   -5.8694171061e-01   -6.1488556185e-01   -6.4253898485e-01   -6.6988088129e-01   
+-6.9740130778e-01   -7.2486951004e-01   -7.5201696578e-01   -7.7896263372e-01   -8.0584270182e-01   
+-8.3236075685e-01   -8.5849407480e-01   -8.8492955400e-01   -9.1097003839e-01   -9.3659177471e-01   
+-9.6261573498e-01   -9.8864022310e-01   -1.0142261386e+00   -1.0397059641e+00   -1.0654376322e+00   
+-1.0906901065e+00   -1.1154358766e+00   -1.1410802314e+00   -1.1662031750e+00   -1.1907748347e+00   
+-1.2161554866e+00   -1.2416600402e+00   -1.2665683711e+00   -1.2915643270e+00   -1.3173576296e+00   
+-1.3424907135e+00   -1.3669267230e+00   -1.3934823368e+00   -1.4193020849e+00   -1.4443443009e+00   
+-1.4707144920e+00   -1.4973188597e+00   -1.5230418567e+00   -1.5478370097e+00   -1.5716584018e+00   
+-1.5944607237e+00   -1.6161993248e+00   0.0000000000e+00    -3.0151005831e-02   -6.0281347668e-02   
+-9.0370375681e-02   -1.2044414164e-01   -1.5048775063e-01   -1.8046298786e-01   -2.1036952116e-01   
+-2.4021852064e-01   -2.6995433488e-01   -2.9955628054e-01   -3.2919395568e-01   -3.5869007068e-01   
+-3.8802372985e-01   -4.1725410018e-01   -4.4633397646e-01   -4.7520514578e-01   -5.0394284924e-01   
+-5.3264338728e-01   -5.6110385149e-01   -5.8930302681e-01   -6.1739477074e-01   -6.4519792421e-01   
+-6.7269122803e-01   -7.0037845379e-01   -7.2802297792e-01   -7.5534937558e-01   -7.8248021907e-01   
+-8.0955576984e-01   -8.3627193050e-01   -8.6260571771e-01   -8.8926303484e-01   -9.1552813128e-01   
+-9.4137693940e-01   -9.6765304994e-01   -9.9394416842e-01   -1.0197995702e+00   -1.0455610596e+00   
+-1.0715965717e+00   -1.0971554864e+00   -1.1222098058e+00   -1.1482032354e+00   -1.1736774506e+00   
+-1.1986019944e+00   -1.2243743031e+00   -1.2502908832e+00   -1.2756122446e+00   -1.3010409883e+00   
+-1.3273062808e+00   -1.3529111261e+00   -1.3778178120e+00   -1.4049196499e+00   -1.4312837358e+00   
+-1.4568673793e+00   -1.4838333674e+00   -1.5110582772e+00   -1.5373963332e+00   -1.5627998571e+00   
+-1.5872217296e+00   -1.6106154426e+00   -1.6329351520e+00   0.0000000000e+00    -3.0256086327e-02   
+-6.0491436644e-02   -9.0685329152e-02   -1.2086497787e-01   -1.5101556646e-01   -1.8109834079e-01   
+-2.1111342943e-01   -2.4107276538e-01   -2.7091969101e-01   -3.0063343881e-01   -3.3038855108e-01   
+-3.6000350701e-01   -3.8945731143e-01   -4.1881114506e-01   -4.4801699960e-01   -4.7701556353e-01   
+-5.0588450332e-01   -5.3472309660e-01   -5.6332349522e-01   -5.9166434300e-01   -6.1990397962e-01   
+-6.4785686358e-01   -6.7550157478e-01   -7.0335559981e-01   -7.3117644580e-01   -7.5868178539e-01   
+-7.8599780442e-01   -8.1326883785e-01   -8.4018310415e-01   -8.6671736062e-01   -8.9359651569e-01   
+-9.2008622417e-01   -9.4616210410e-01   -9.7269036491e-01   -9.9924811374e-01   -1.0253730018e+00   
+-1.0514161550e+00   -1.0777555113e+00   -1.1036208662e+00   -1.1289837350e+00   -1.1553262394e+00   
+-1.1811517263e+00   -1.2064291541e+00   -1.2325931196e+00   -1.2589217263e+00   -1.2846561180e+00   
+-1.3105176495e+00   -1.3372549320e+00   -1.3633315387e+00   -1.3887089011e+00   -1.4163569630e+00   
+-1.4432653868e+00   -1.4693904576e+00   -1.4969522429e+00   -1.5247976948e+00   -1.5517508097e+00   
+-1.5777627046e+00   -1.6027850574e+00   -1.6267701615e+00   -1.6496709792e+00   0.0000000000e+00    
+-3.0361166823e-02   -6.0701525620e-02   -9.1000282623e-02   -1.2128581410e-01   -1.5154338228e-01   
+-1.8173369373e-01   -2.1185733769e-01   -2.4192701011e-01   -2.7188504714e-01   -3.0171059708e-01   
+-3.3158314649e-01   -3.6131694334e-01   -3.9089089301e-01   -4.2036818995e-01   -4.4970002274e-01   
+-4.7882598127e-01   -5.0782615740e-01   -5.3680280592e-01   -5.6554313895e-01   -5.9402565920e-01   
+-6.2241318850e-01   -6.5051580295e-01   -6.7831192152e-01   -7.0633274582e-01   -7.3432991368e-01   
+-7.6201419519e-01   -7.8951538978e-01   -8.1698190587e-01   -8.4409427780e-01   -8.7082900353e-01   
+-8.9792999653e-01   -9.2464431706e-01   -9.5094726880e-01   -9.7772767987e-01   -1.0045520591e+00   
+-1.0309464334e+00   -1.0572712505e+00   -1.0839144509e+00   -1.1100862461e+00   -1.1357576641e+00   
+-1.1624492433e+00   -1.1886260019e+00   -1.2142563138e+00   -1.2408119360e+00   -1.2675525693e+00   
+-1.2936999914e+00   -1.3199943108e+00   -1.3472035831e+00   -1.3737519513e+00   -1.3995999901e+00   
+-1.4277942762e+00   -1.4552470377e+00   -1.4819135359e+00   -1.5100711184e+00   -1.5385371123e+00   
+-1.5661052862e+00   -1.5927255520e+00   -1.6183483852e+00   -1.6429248805e+00   -1.6664068064e+00   
+0.0000000000e+00    -3.0466247320e-02   -6.0911614596e-02   -9.1315236093e-02   -1.2170665033e-01   
+-1.5207119811e-01   -1.8236904666e-01   -2.1260124595e-01   -2.4278125485e-01   -2.7285040327e-01   
+-3.0278775534e-01   -3.3277774190e-01   -3.6263037966e-01   -3.9232447460e-01   -4.2192523483e-01   
+-4.5138304588e-01   -4.8063639901e-01   -5.0976781148e-01   -5.3888251524e-01   -5.6776278268e-01   
+-5.9638697539e-01   -6.2492239738e-01   -6.5317474231e-01   -6.8112226827e-01   -7.0930989183e-01   
+-7.3748338157e-01   -7.6534660500e-01   -7.9303297513e-01   -8.2069497389e-01   -8.4800545146e-01   
+-8.7494064644e-01   -9.0226347738e-01   -9.2920240996e-01   -9.5573243350e-01   -9.8276499484e-01   
+-1.0098560044e+00   -1.0365198650e+00   -1.0631263459e+00   -1.0900733904e+00   -1.1165516259e+00   
+-1.1425315933e+00   -1.1695722473e+00   -1.1961002775e+00   -1.2220834735e+00   -1.2490307525e+00   
+-1.2761834124e+00   -1.3027438649e+00   -1.3294709721e+00   -1.3571522343e+00   -1.3841723638e+00   
+-1.4104910791e+00   -1.4392315893e+00   -1.4672286886e+00   -1.4944366143e+00   -1.5231899938e+00   
+-1.5522765299e+00   -1.5804597628e+00   -1.6076883995e+00   -1.6339117131e+00   -1.6590795994e+00   
+-1.6831426336e+00   0.0000000000e+00    -3.0571327816e-02   -6.1121703572e-02   -9.1630189564e-02   
+-1.2212748656e-01   -1.5259901394e-01   -1.8300439959e-01   -2.1334515422e-01   -2.4363549958e-01   
+-2.7381575941e-01   -3.0386491361e-01   -3.3397233731e-01   -3.6394381599e-01   -3.9375805618e-01   
+-4.2348227972e-01   -4.5306606902e-01   -4.8244681676e-01   -5.1170946555e-01   -5.4096222455e-01   
+-5.6998242641e-01   -5.9874829159e-01   -6.2743160627e-01   -6.5583368168e-01   -6.8393261502e-01   
+-7.1228703784e-01   -7.4063684945e-01   -7.6867901480e-01   -7.9655056049e-01   -8.2440804190e-01   
+-8.5191662511e-01   -8.7905228935e-01   -9.0659695822e-01   -9.3376050285e-01   -9.6051759819e-01   
+-9.8780230980e-01   -1.0151599497e+00   -1.0420932966e+00   -1.0689814414e+00   -1.0962323300e+00   
+-1.1230170058e+00   -1.1493055224e+00   -1.1766952513e+00   -1.2035745531e+00   -1.2299106331e+00   
+-1.2572495689e+00   -1.2848142555e+00   -1.3117877383e+00   -1.3389476334e+00   -1.3671008855e+00   
+-1.3945927764e+00   -1.4213821682e+00   -1.4506689024e+00   -1.4792103396e+00   -1.5069596926e+00   
+-1.5363088693e+00   -1.5660159474e+00   -1.5948142393e+00   -1.6226512469e+00   -1.6494750409e+00   
+-1.6752343183e+00   -1.6998784607e+00   0.0000000000e+00    -3.0676408313e-02   -6.1331792547e-02   
+-9.1945143035e-02   -1.2254832279e-01   -1.5312682977e-01   -1.8363975253e-01   -2.1408906248e-01   
+-2.4448974432e-01   -2.7478111554e-01   -3.0494207188e-01   -3.3516693272e-01   -3.6525725232e-01   
+-3.9519163776e-01   -4.2503932460e-01   -4.5474909216e-01   -4.8425723450e-01   -5.1365111963e-01   
+-5.4304193387e-01   -5.7220207014e-01   -6.0110960778e-01   -6.2994081515e-01   -6.5849262105e-01   
+-6.8674296176e-01   -7.1526418385e-01   -7.4379031733e-01   -7.7201142461e-01   -8.0006814584e-01   
+-8.2812110992e-01   -8.5582779876e-01   -8.8316393227e-01   -9.1093043907e-01   -9.3831859574e-01   
+-9.6530276289e-01   -9.9283962476e-01   -1.0204638950e+00   -1.0476667281e+00   -1.0748365369e+00   
+-1.1023912695e+00   -1.1294823856e+00   -1.1560794516e+00   -1.1838182552e+00   -1.2110488288e+00   
+-1.2377377928e+00   -1.2654683854e+00   -1.2934450985e+00   -1.3208316117e+00   -1.3484242947e+00   
+-1.3770495366e+00   -1.4050131890e+00   -1.4322732572e+00   -1.4621062155e+00   -1.4911919905e+00   
+-1.5194827709e+00   -1.5494277447e+00   -1.5797553650e+00   -1.6091687158e+00   -1.6376140944e+00   
+-1.6650383687e+00   -1.6913890372e+00   -1.7166142879e+00   0.0000000000e+00    -3.0781488809e-02   
+-6.1541881523e-02   -9.2260096506e-02   -1.2296915902e-01   -1.5365464560e-01   -1.8427510546e-01   
+-2.1483297074e-01   -2.4534398905e-01   -2.7574647167e-01   -3.0601923015e-01   -3.3636152812e-01   
+-3.6657068864e-01   -3.9662521935e-01   -4.2659636949e-01   -4.5643211530e-01   -4.8606765224e-01   
+-5.1559277371e-01   -5.4512164319e-01   -5.7442171386e-01   -6.0347092398e-01   -6.3245002403e-01   
+-6.6115156042e-01   -6.8955330851e-01   -7.1824132987e-01   -7.4694378521e-01   -7.7534383441e-01   
+-8.0358573120e-01   -8.3183417794e-01   -8.5973897241e-01   -8.8727557518e-01   -9.1526391991e-01   
+-9.4287668863e-01   -9.7008792759e-01   -9.9787693973e-01   -1.0257678403e+00   -1.0532401597e+00   
+-1.0806916323e+00   -1.1085502091e+00   -1.1359477654e+00   -1.1628533808e+00   -1.1909412592e+00   
+-1.2185231044e+00   -1.2455649525e+00   -1.2736872018e+00   -1.3020759416e+00   -1.3298754851e+00   
+-1.3579009560e+00   -1.3869981878e+00   -1.4154336016e+00   -1.4431643463e+00   -1.4735435287e+00   
+-1.5031736414e+00   -1.5320058492e+00   -1.5625466202e+00   -1.5934947825e+00   -1.6235231923e+00   
+-1.6525769418e+00   -1.6806016965e+00   -1.7075437562e+00   -1.7333501151e+00   0.0000000000e+00    
+-3.0886569306e-02   -6.1751970499e-02   -9.2575049977e-02   -1.2338999525e-01   -1.5418246143e-01   
+-1.8491045840e-01   -2.1557687901e-01   -2.4619823379e-01   -2.7671182780e-01   -3.0709638842e-01   
+-3.3755612353e-01   -3.6788412497e-01   -3.9805880093e-01   -4.2815341437e-01   -4.5811513844e-01   
+-4.8787806999e-01   -5.1753442779e-01   -5.4720135251e-01   -5.7664135759e-01   -6.0583224017e-01   
+-6.3495923291e-01   -6.6381049978e-01   -6.9236365525e-01   -7.2121847588e-01   -7.5009725310e-01   
+-7.7867624422e-01   -8.0710331655e-01   -8.3554724596e-01   -8.6365014606e-01   -8.9138721809e-01   
+-9.1959740076e-01   -9.4743478152e-01   -9.7487309228e-01   -1.0029142547e+00   -1.0310717856e+00   
+-1.0588135913e+00   -1.0865467278e+00   -1.1147091487e+00   -1.1424131453e+00   -1.1696273099e+00   
+-1.1980642632e+00   -1.2259973800e+00   -1.2533921122e+00   -1.2819060183e+00   -1.3107067846e+00   
+-1.3389193586e+00   -1.3673776173e+00   -1.3969468390e+00   -1.4258540142e+00   -1.4540554353e+00   
+-1.4849808418e+00   -1.5151552923e+00   -1.5445289276e+00   -1.5756654957e+00   -1.6072342001e+00   
+-1.6378776689e+00   -1.6675397893e+00   -1.6961650244e+00   -1.7236984751e+00   -1.7500859423e+00   
+0.0000000000e+00    -3.0991649802e-02   -6.1962059475e-02   -9.2890003448e-02   -1.2381083148e-01   
+-1.5471027726e-01   -1.8554581133e-01   -2.1632078727e-01   -2.4705247852e-01   -2.7767718393e-01   
+-3.0817354669e-01   -3.3875071894e-01   -3.6919756130e-01   -3.9949238252e-01   -4.2971045926e-01   
+-4.5979816158e-01   -4.8968848773e-01   -5.1947608187e-01   -5.4928106183e-01   -5.7886100132e-01   
+-6.0819355637e-01   -6.3746844180e-01   -6.6646943915e-01   -6.9517400200e-01   -7.2419562189e-01   
+-7.5325072098e-01   -7.8200865402e-01   -8.1062090190e-01   -8.3926031397e-01   -8.6756131971e-01   
+-8.9549886100e-01   -9.2393088160e-01   -9.5199287442e-01   -9.7965825698e-01   -1.0079515697e+00   
+-1.0363757310e+00   -1.0643870229e+00   -1.0924018232e+00   -1.1208680882e+00   -1.1488785251e+00   
+-1.1764012391e+00   -1.2051872671e+00   -1.2334716556e+00   -1.2612192719e+00   -1.2901248348e+00   
+-1.3193376277e+00   -1.3479632320e+00   -1.3768542785e+00   -1.4068954902e+00   -1.4362744268e+00   
+-1.4649465243e+00   -1.4964181549e+00   -1.5271369433e+00   -1.5570520059e+00   -1.5887843711e+00   
+-1.6209736176e+00   -1.6522321454e+00   -1.6825026367e+00   -1.7117283522e+00   -1.7398531940e+00   
+-1.7668217695e+00   0.0000000000e+00    -3.1096730298e-02   -6.2172148451e-02   -9.3204956919e-02   
+-1.2423166771e-01   -1.5523809309e-01   -1.8618116426e-01   -2.1706469553e-01   -2.4790672326e-01   
+-2.7864254007e-01   -3.0925070496e-01   -3.3994531435e-01   -3.7051099763e-01   -4.0092596410e-01   
+-4.3126750414e-01   -4.6148118472e-01   -4.9149890547e-01   -5.2141773595e-01   -5.5136077115e-01   
+-5.8108064505e-01   -6.1055487256e-01   -6.3997765068e-01   -6.6912837852e-01   -6.9798434874e-01   
+-7.2717276790e-01   -7.5640418886e-01   -7.8534106383e-01   -8.1413848726e-01   -8.4297338199e-01   
+-8.7147249336e-01   -8.9961050391e-01   -9.2826436245e-01   -9.5655096731e-01   -9.8444342168e-01   
+-1.0129888846e+00   -1.0416796763e+00   -1.0699604545e+00   -1.0982569187e+00   -1.1270270278e+00   
+-1.1553439050e+00   -1.1831751682e+00   -1.2123102711e+00   -1.2409459312e+00   -1.2690464316e+00   
+-1.2983436512e+00   -1.3279684707e+00   -1.3570071054e+00   -1.3863309398e+00   -1.4168441413e+00   
+-1.4466948393e+00   -1.4758376134e+00   -1.5078554681e+00   -1.5391185942e+00   -1.5695750842e+00   
+-1.6019032466e+00   -1.6347130352e+00   -1.6665866219e+00   -1.6974654842e+00   -1.7272916800e+00   
+-1.7560079129e+00   -1.7835575967e+00   0.0000000000e+00    -3.1201810795e-02   -6.2382237427e-02   
+-9.3519910390e-02   -1.2465250394e-01   -1.5576590892e-01   -1.8681651720e-01   -2.1780860380e-01   
+-2.4876096799e-01   -2.7960789620e-01   -3.1032786323e-01   -3.4113990976e-01   -3.7182443395e-01   
+-4.0235954568e-01   -4.3282454903e-01   -4.6316420786e-01   -4.9330932322e-01   -5.2335939003e-01   
+-5.5344048047e-01   -5.8330028878e-01   -6.1291618875e-01   -6.4248685956e-01   -6.7178731788e-01   
+-7.0079469549e-01   -7.3014991391e-01   -7.5955765675e-01   -7.8867347363e-01   -8.1765607261e-01   
+-8.4668645001e-01   -8.7538366701e-01   -9.0372214682e-01   -9.3259784329e-01   -9.6110906020e-01   
+-9.8922858638e-01   -1.0180261996e+00   -1.0469836216e+00   -1.0755338860e+00   -1.1041120142e+00   
+-1.1331859674e+00   -1.1618092848e+00   -1.1899490974e+00   -1.2194332751e+00   -1.2484202069e+00   
+-1.2768735913e+00   -1.3065624677e+00   -1.3365993138e+00   -1.3660509788e+00   -1.3958076011e+00   
+-1.4267927925e+00   -1.4571152519e+00   -1.4867287024e+00   -1.5192927812e+00   -1.5511002451e+00   
+-1.5820981625e+00   -1.6150221220e+00   -1.6484524527e+00   -1.6809410984e+00   -1.7124283316e+00   
+-1.7428550078e+00   -1.7721626319e+00   -1.8002934239e+00   0.0000000000e+00    -3.1306891291e-02   
+-6.2592326403e-02   -9.3834863860e-02   -1.2507334017e-01   -1.5629372475e-01   -1.8745187013e-01   
+-2.1855251206e-01   -2.4961521273e-01   -2.8057325233e-01   -3.1140502150e-01   -3.4233450516e-01   
+-3.7313787028e-01   -4.0379312727e-01   -4.3438159392e-01   -4.6484723100e-01   -4.9511974096e-01   
+-5.2530104410e-01   -5.5552018979e-01   -5.8551993251e-01   -6.1527750495e-01   -6.4499606844e-01   
+-6.7444625725e-01   -7.0360504224e-01   -7.3312705993e-01   -7.6271112463e-01   -7.9200588344e-01   
+-8.2117365797e-01   -8.5039951802e-01   -8.7929484066e-01   -9.0783378973e-01   -9.3693132414e-01   
+-9.6566715309e-01   -9.9401375107e-01   -1.0230635145e+00   -1.0522875669e+00   -1.0811073176e+00   
+-1.1099671096e+00   -1.1393449069e+00   -1.1682746647e+00   -1.1967230266e+00   -1.2265562790e+00   
+-1.2558944825e+00   -1.2847007509e+00   -1.3147812841e+00   -1.3452301568e+00   -1.3750948523e+00   
+-1.4052842624e+00   -1.4367414437e+00   -1.4675356645e+00   -1.4976197915e+00   -1.5307300943e+00   
+-1.5630818961e+00   -1.5946212409e+00   -1.6281409975e+00   -1.6621918703e+00   -1.6952955750e+00   
+-1.7273911791e+00   -1.7584183356e+00   -1.7883173508e+00   -1.8170292511e+00   0.0000000000e+00    
+-3.1411971788e-02   -6.2802415379e-02   -9.4149817331e-02   -1.2549417640e-01   -1.5682154058e-01   
+-1.8808722306e-01   -2.1929642033e-01   -2.5046945746e-01   -2.8153860846e-01   -3.1248217976e-01   
+-3.4352910057e-01   -3.7445130661e-01   -4.0522670885e-01   -4.3593863880e-01   -4.6653025414e-01   
+-4.9693015870e-01   -5.2724269818e-01   -5.5759989911e-01   -5.8773957624e-01   -6.1763882114e-01   
+-6.4750527733e-01   -6.7710519662e-01   -7.0641538898e-01   -7.3610420594e-01   -7.6586459251e-01   
+-7.9533829324e-01   -8.2469124332e-01   -8.5411258604e-01   -8.8320601431e-01   -9.1194543264e-01   
+-9.4126480498e-01   -9.7022524598e-01   -9.9879891577e-01   -1.0281008295e+00   -1.0575915122e+00   
+-1.0866807492e+00   -1.1158222051e+00   -1.1455038465e+00   -1.1747400445e+00   -1.2034969557e+00   
+-1.2336792830e+00   -1.2633687581e+00   -1.2925279106e+00   -1.3230001006e+00   -1.3538609999e+00   
+-1.3841387257e+00   -1.4147609237e+00   -1.4466900948e+00   -1.4779560771e+00   -1.5085108805e+00   
+-1.5421674075e+00   -1.5750635470e+00   -1.6071443192e+00   -1.6412598730e+00   -1.6759312878e+00   
+-1.7096500515e+00   -1.7423540265e+00   -1.7739816635e+00   -1.8044720697e+00   -1.8337650783e+00   
+0.0000000000e+00    -3.1517052284e-02   -6.3012504355e-02   -9.4464770802e-02   -1.2591501263e-01   
+-1.5734935640e-01   -1.8872257600e-01   -2.2004032859e-01   -2.5132370220e-01   -2.8250396459e-01   
+-3.1355933803e-01   -3.4472369598e-01   -3.7576474293e-01   -4.0666029043e-01   -4.3749568369e-01   
+-4.6821327728e-01   -4.9874057645e-01   -5.2918435226e-01   -5.5967960843e-01   -5.8995921996e-01   
+-6.2000013734e-01   -6.5001448621e-01   -6.7976413599e-01   -7.0922573573e-01   -7.3908135195e-01   
+-7.6901806039e-01   -7.9867070305e-01   -8.2820882868e-01   -8.5782565406e-01   -8.8711718796e-01   
+-9.1605707555e-01   -9.4559828582e-01   -9.7478333887e-01   -1.0035840805e+00   -1.0331381445e+00   
+-1.0628954576e+00   -1.0922541808e+00   -1.1216773006e+00   -1.1516627861e+00   -1.1812054244e+00   
+-1.2102708849e+00   -1.2408022870e+00   -1.2708430337e+00   -1.3003550703e+00   -1.3312189171e+00   
+-1.3624918429e+00   -1.3931825991e+00   -1.4242375850e+00   -1.4566387460e+00   -1.4883764897e+00   
+-1.5194019695e+00   -1.5536047206e+00   -1.5870451979e+00   -1.6196673975e+00   -1.6543787484e+00   
+-1.6896707054e+00   -1.7240045280e+00   -1.7573168740e+00   -1.7895449913e+00   -1.8206267887e+00   
+-1.8505009055e+00   
+0.0000000000e+00    1.6028228611e-18    3.2045472274e-18    4.8040753572e-18    6.4003110136e-18    
+7.9921602166e-18    9.5785319923e-18    1.1158339120e-17    1.2730498880e-17    1.4293933792e-17    
+1.5847572356e-17    1.7390349785e-17    1.8921208738e-17    2.0439100038e-17    2.1942983401e-17    
+2.3431828139e-17    2.4904613872e-17    2.6360331227e-17    2.7797982528e-17    2.9216582480e-17    
+3.0615158846e-17    3.1992753111e-17    3.3348421141e-17    3.4681233829e-17    3.5990277732e-17    
+3.7274655696e-17    3.8533487473e-17    3.9765910323e-17    4.0971079604e-17    4.2148169354e-17    
+4.3296372854e-17    4.4414903182e-17    4.5502993754e-17    4.6559898848e-17    4.7584894112e-17    
+4.8577277067e-17    4.9536367583e-17    5.0461508347e-17    5.1352065313e-17    5.2207428140e-17    
+5.3027010602e-17    5.3810251001e-17    5.4556612541e-17    5.5265583704e-17    5.5936678597e-17    
+5.6569437284e-17    5.7163426105e-17    5.7718237968e-17    5.8233492635e-17    5.8708836974e-17    
+5.9143945210e-17    5.9538519139e-17    5.9892288342e-17    6.0205010361e-17    6.0476470874e-17    
+6.0706483835e-17    6.0894891604e-17    6.1041565056e-17    6.1146403669e-17    6.1209335591e-17    
+6.1230317691e-17    0.0000000000e+00    1.6029831434e-18    3.2048676821e-18    4.8045557647e-18    
+6.4009529272e-18    7.9929653092e-18    9.5795011143e-18    1.1159473825e-17    1.2731801884e-17    
+1.4295406278e-17    1.5849215376e-17    1.7392171936e-17    1.8923212160e-17    2.0441286721e-17    
+2.1945358406e-17    2.3434395302e-17    2.4907375354e-17    2.6363292888e-17    2.7801154768e-17    
+2.9219968166e-17    3.0618760629e-17    3.1996580479e-17    3.3352476897e-17    3.4685520531e-17    
+3.5994818858e-17    3.7279465771e-17    3.8538570493e-17    3.9771275797e-17    4.0976743253e-17    
+4.2154135179e-17    4.3302644460e-17    4.4421513164e-17    4.5509946344e-17    4.6567197796e-17    
+4.7592577673e-17    4.8585367327e-17    4.9544868898e-17    5.0470439291e-17    5.1361459720e-17    
+5.2217289968e-17    5.3037343070e-17    5.3821115922e-17    5.4568013267e-17    5.5277522695e-17    
+5.5949214993e-17    5.6582602156e-17    5.7177220983e-17    5.7732692991e-17    5.8248667597e-17    
+5.8724731528e-17    5.9160557699e-17    5.9555964800e-17    5.9910564297e-17    6.0224112171e-17    
+6.0496481470e-17    6.0727440962e-17    6.0916786898e-17    6.1064388315e-17    6.1170142858e-17    
+6.1233976845e-17    6.1255845327e-17    0.0000000000e+00    1.6031593424e-18    3.2052199595e-18    
+4.8050838789e-18    6.4016585857e-18    7.9938503512e-18    9.5805664745e-18    1.1160721211e-17    
+1.2733234283e-17    1.4297024988e-17    1.5851021556e-17    1.7394175034e-17    1.8925414530e-17    
+2.0443690552e-17    2.1947969260e-17    2.3437217397e-17    2.4910411064e-17    2.6366548654e-17    
+2.7804642026e-17    2.9223690066e-17    3.0622720085e-17    3.2000787922e-17    3.3356935409e-17    
+3.4690232923e-17    3.5999810938e-17    3.7284753508e-17    3.8544158280e-17    3.9777174086e-17    
+4.0982969328e-17    4.2160693438e-17    4.3309538866e-17    4.4428779548e-17    4.5517589357e-17    
+4.6575221564e-17    4.7601024246e-17    4.8594260986e-17    4.9554214432e-17    5.0480257119e-17    
+5.1371787034e-17    5.2228131122e-17    5.3048701599e-17    5.3833059780e-17    5.4580546138e-17    
+5.5290647281e-17    5.5962996310e-17    5.6597074359e-17    5.7192385756e-17    5.7748583463e-17    
+5.8265349502e-17    5.8742204483e-17    5.9178819885e-17    5.9575142894e-17    5.9930655137e-17    
+6.0245110877e-17    6.0518479210e-17    6.0750479226e-17    6.0940856494e-17    6.1089478028e-17    
+6.1196239456e-17    6.1261065089e-17    6.1283907973e-17    0.0000000000e+00    1.6033530388e-18    
+3.2056072196e-18    4.8056644372e-18    6.4024343192e-18    7.9948232818e-18    9.5817376298e-18    
+1.1162092468e-17    1.2734808924e-17    1.4298804443e-17    1.5853007098e-17    1.7396377049e-17    
+1.8927835607e-17    2.0446333094e-17    2.1950839384e-17    2.3440319738e-17    2.4913748233e-17    
+2.6370127734e-17    2.7808475584e-17    2.9227781568e-17    3.0627072734e-17    3.2005413183e-17    
+3.3361836670e-17    3.4695413276e-17    3.6005298755e-17    3.7290566342e-17    3.8550300960e-17    
+3.9783658103e-17    4.0989813681e-17    4.2167902961e-17    4.3317117917e-17    4.4436767517e-17    
+4.5525991356e-17    4.6584042128e-17    4.7610309602e-17    4.8604037826e-17    4.9564488019e-17    
+5.0491049903e-17    5.1383139898e-17    5.2240048851e-17    5.3061188082e-17    5.3846189718e-17    
+5.4594323579e-17    5.5305075199e-17    5.5978146174e-17    5.6612983718e-17    5.7209056461e-17    
+5.7766051931e-17    5.8283687996e-17    5.8761412582e-17    5.9198895588e-17    5.9596225461e-17    
+5.9952741089e-17    6.0268194851e-17    6.0542661425e-17    6.0775805296e-17    6.0967316310e-17    
+6.1117059264e-17    6.1224927566e-17    6.1290843319e-17    6.1314757368e-17    0.0000000000e+00    
+1.6035659702e-18    3.2060329363e-18    4.8063026477e-18    6.4032870867e-18    7.9958928289e-18    
+9.5830250863e-18    1.1163599897e-17    1.2736539935e-17    1.4300760606e-17    1.5855189813e-17    
+1.7398797735e-17    1.8930497107e-17    2.0449238052e-17    2.1953994524e-17    2.3443730155e-17    
+2.4917416799e-17    2.6374062232e-17    2.7812689833e-17    2.9232279374e-17    3.0631857620e-17    
+3.2010497754e-17    3.3367224650e-17    3.4701108062e-17    3.6011331537e-17    3.7296956416e-17    
+3.8557053636e-17    3.9790786012e-17    4.0997337709e-17    4.2175828423e-17    4.3325449603e-17    
+4.4445548727e-17    4.5535227713e-17    4.6593738614e-17    4.7620517037e-17    4.8614785551e-17    
+4.9575781822e-17    5.0502914458e-17    5.1395620152e-17    5.2253150065e-17    5.3074914529e-17    
+5.3860623518e-17    5.4609469184e-17    5.5320935875e-17    5.5994800489e-17    5.6630472950e-17    
+5.7227382642e-17    5.7785255098e-17    5.8303847587e-17    5.8782528132e-17    5.9220964901e-17    
+5.9619401622e-17    5.9977020277e-17    6.0293571168e-17    6.0569245044e-17    6.0803646359e-17    
+6.0996403707e-17    6.1147379442e-17    6.1256464536e-17    6.1323578662e-17    6.1348670249e-17    
+0.0000000000e+00    1.6038000466e-18    3.2065009287e-18    4.8070042353e-18    6.4042245378e-18    
+7.9970685869e-18    9.5844403930e-18    1.1165257021e-17    1.2738442843e-17    1.4302911025e-17    
+1.5857589281e-17    1.7401458805e-17    1.8933422907e-17    2.0452431486e-17    2.1957462983e-17    
+2.3447479243e-17    2.4921449670e-17    2.6378387444e-17    2.7817322575e-17    2.9237223833e-17    
+3.0637117668e-17    3.2016087246e-17    3.3373147680e-17    3.4707368366e-17    3.6017963402e-17    
+3.7303981054e-17    3.8564476883e-17    3.9798621754e-17    4.1005608907e-17    4.2184540920e-17    
+4.3334608663e-17    4.4455201951e-17    4.5545381281e-17    4.6604398006e-17    4.7631738116e-17    
+4.8626600573e-17    4.9588197150e-17    5.0515957218e-17    5.1409339753e-17    5.2267552289e-17    
+5.3090004075e-17    5.3876490660e-17    5.4626118815e-17    5.5338371588e-17    5.6013108654e-17    
+5.6649698941e-17    5.7247528696e-17    5.7806365227e-17    5.8326009116e-17    5.8805740553e-17    
+5.9245225797e-17    5.9644879282e-17    6.0003710500e-17    6.0321467469e-17    6.0598468537e-17    
+6.0834252167e-17    6.1028379615e-17    6.1180710551e-17    6.1291133271e-17    6.1359564774e-17    
+6.1385950833e-17    0.0000000000e+00    1.6040573678e-18    3.2070153949e-18    4.8077754938e-18    
+6.4052550822e-18    7.9983611030e-18    9.5859962461e-18    1.1167078704e-17    1.2740534719e-17    
+1.4305274990e-17    1.5860227028e-17    1.7404384132e-17    1.8936639251e-17    2.0455942043e-17    
+2.1961275877e-17    2.3451600633e-17    2.4925883023e-17    2.6383142169e-17    2.7822415370e-17    
+2.9242659300e-17    3.0642900062e-17    3.2022231800e-17    3.3379658894e-17    3.4714250347e-17    
+3.6025253841e-17    3.7311703270e-17    3.8572637293e-17    3.9807235622e-17    4.1014701473e-17    
+4.2194118607e-17    4.3344677260e-17    4.4465813785e-17    4.5556543145e-17    4.6616115923e-17    
+4.7644073500e-17    4.8639588882e-17    4.9601845376e-17    5.0530295184e-17    5.1424421772e-17    
+5.2283384720e-17    5.3106592082e-17    5.3893933481e-17    5.4644421832e-17    5.5357538747e-17    
+5.6033234903e-17    5.6670834161e-17    5.7269675345e-17    5.7829571688e-17    5.8350371386e-17    
+5.8831258074e-17    5.9271895910e-17    5.9672886990e-17    6.0033051182e-17    6.0352134000e-17    
+6.0630594057e-17    6.0867897271e-17    6.1063530876e-17    6.1217351592e-17    6.1329244769e-17    
+6.1399124472e-17    6.1426933549e-17    0.0000000000e+00    1.6043402423e-18    3.2075809499e-18    
+4.8086233417e-18    6.4063879642e-18    7.9997819718e-18    9.5877066025e-18    1.1169081289e-17    
+1.2742834328e-17    1.4307873708e-17    1.5863126715e-17    1.7407599957e-17    1.8940174994e-17    
+2.0459801213e-17    2.1965467408e-17    2.3456131295e-17    2.4930756629e-17    2.6388369060e-17    
+2.7828013903e-17    2.9248634533e-17    3.0649256675e-17    3.2028986537e-17    3.3386816702e-17    
+3.4721815740e-17    3.6033268254e-17    3.7320192338e-17    3.8581608068e-17    3.9816704886e-17    
+4.1024696972e-17    4.2204647402e-17    4.3355745714e-17    4.4477479422e-17    4.5568813433e-17    
+4.6628997484e-17    4.7657633843e-17    4.8653866988e-17    4.9616848934e-17    5.0546056975e-17    
+5.1441001505e-17    5.2300789383e-17    5.3124827353e-17    5.3913108455e-17    5.4664542421e-17    
+5.5378609293e-17    5.6055359779e-17    5.6694068205e-17    5.7294021258e-17    5.7855082656e-17    
+5.8377152941e-17    5.8859309600e-17    5.9301214487e-17    5.9703675991e-17    6.0065305529e-17    
+6.0385845857e-17    6.0665909787e-17    6.0904883487e-17    6.1102172818e-17    6.1257631255e-17    
+6.1371140912e-17    6.1442612627e-17    6.1471986035e-17    0.0000000000e+00    1.6046512074e-18    
+3.2082026671e-18    4.8095553849e-18    6.4076333466e-18    8.0013439394e-18    9.5895868051e-18    
+1.1171282740e-17    1.2745362298e-17    1.4310730490e-17    1.5866314354e-17    1.7411135128e-17    
+1.8944061851e-17    2.0464043617e-17    2.1970075178e-17    2.3461111872e-17    2.4936114206e-17    
+2.6394115005e-17    2.7834168396e-17    2.9255203134e-17    3.0656244528e-17    3.2036412049e-17    
+3.3394685312e-17    3.4730132411e-17    3.6042078535e-17    3.7329524408e-17    3.8591469683e-17    
+3.9827114491e-17    4.1035685070e-17    4.2216221755e-17    4.3367913316e-17    4.4490303510e-17    
+4.5582302216e-17    4.6643158242e-17    4.7672540791e-17    4.8669562976e-17    4.9633342414e-17    
+5.0563383983e-17    5.1459227680e-17    5.2319922409e-17    5.3144873470e-17    5.3934187590e-17    
+5.4686661076e-17    5.5401772239e-17    5.6079681758e-17    5.6719609495e-17    5.7320784830e-17    
+5.7883126979e-17    5.8406594026e-17    5.8890146771e-17    5.9333444533e-17    5.9737522480e-17    
+6.0100762879e-17    6.0422905455e-17    6.0704732531e-17    6.0945542603e-17    6.1144652081e-17    
+6.1301910872e-17    6.1417197533e-17    6.1490419355e-17    6.1521512439e-17    0.0000000000e+00    
+1.6049930528e-18    3.2088861236e-18    4.8105799841e-18    6.4090024012e-18    8.0030610175e-18    
+9.5916537204e-18    1.1173702805e-17    1.2748141307e-17    1.4313870964e-17    1.5869818540e-17    
+1.7415021358e-17    1.8948334691e-17    2.0468707311e-17    2.1975140520e-17    2.3466587044e-17    
+2.4942003814e-17    2.6400431549e-17    2.7840934057e-17    2.9262424027e-17    3.0663926306e-17    
+3.2044574949e-17    3.3403335312e-17    3.4739274965e-17    3.6051763716e-17    3.7339783196e-17    
+3.8602310600e-17    3.9838557818e-17    4.1047764336e-17    4.2228945494e-17    4.3381289217e-17    
+4.4504401089e-17    4.5597130497e-17    4.6658725228e-17    4.7688928066e-17    4.8686817647e-17    
+4.9651473771e-17    5.0582431643e-17    5.1479263798e-17    5.2340955431e-17    5.3166910258e-17    
+5.3957359980e-17    5.4710976214e-17    5.5427235372e-17    5.6106419019e-17    5.6747687151e-17    
+5.7350206148e-17    5.7913956232e-17    5.8438958745e-17    5.8924046213e-17    5.9368875169e-17    
+5.9774730079e-17    6.0139741305e-17    6.0463645240e-17    6.0747410549e-17    6.0990239355e-17    
+6.1191349727e-17    6.1350587657e-17    6.1467827787e-17    6.1542973508e-17    6.1575957040e-17    
+0.0000000000e+00    1.6053688451e-18    3.2096374505e-18    4.8117063308e-18    6.4105074091e-18    
+8.0049486093e-18    9.5939258898e-18    1.1176363193e-17    1.2751196284e-17    1.4317323302e-17    
+1.5873670707e-17    1.7419293508e-17    1.8953031844e-17    2.0473834132e-17    2.1980708873e-17    
+2.3472605924e-17    2.4948478288e-17    2.6407375354e-17    2.7848371580e-17    2.9270361988e-17    
+3.0672370920e-17    3.2053548461e-17    3.3412844295e-17    3.4749325417e-17    3.6062410681e-17    
+3.7351060729e-17    3.8614228070e-17    3.9851137518e-17    4.1061043128e-17    4.2242932757e-17    
+4.3395993405e-17    4.4519898621e-17    4.5613431294e-17    4.6675838086e-17    4.7706942672e-17    
+4.8705785785e-17    4.9671405654e-17    5.0603370822e-17    5.1501289594e-17    5.2364077129e-17    
+5.3191135399e-17    5.3982833494e-17    5.4737705957e-17    5.5455227110e-17    5.6135811412e-17    
+5.6778553047e-17    5.7382549136e-17    5.7947846970e-17    5.8474537428e-17    5.8961312024e-17    
+5.9407824228e-17    5.9815632562e-17    6.0182590466e-17    6.0508430672e-17    6.0794326689e-17    
+6.1039374697e-17    6.1242684664e-17    6.1404098269e-17    6.1523485856e-17    6.1600746528e-17    
+6.1635808238e-17    0.0000000000e+00    1.6057819552e-18    3.2104633876e-18    4.8129445287e-18    
+6.4121618712e-18    8.0070236475e-18    9.5964236959e-18    1.1179287770e-17    1.2754554634e-17    
+1.4321118472e-17    1.5877905413e-17    1.7423989902e-17    1.8958195446e-17    2.0479470068e-17    
+2.1986830190e-17    2.3479222508e-17    2.4955595706e-17    2.6415008710e-17    2.7856547683e-17    
+2.9279088224e-17    3.0681654123e-17    3.2063413085e-17    3.3423297564e-17    3.4760373924e-17    
+3.6074114937e-17    3.7363458171e-17    3.8627328999e-17    3.9864966441e-17    4.1075640564e-17    
+4.2258309020e-17    4.3412157786e-17    4.4536935129e-17    4.5631350835e-17    4.6694650329e-17    
+4.7726746211e-17    4.8726637546e-17    4.9693316865e-17    5.0626389356e-17    5.1525502652e-17    
+5.2389494916e-17    5.3217766207e-17    5.4010836643e-17    5.4767090085e-17    5.5485998555e-17    
+5.6168122604e-17    5.6812484067e-17    5.7418103930e-17    5.7985103213e-17    5.8513649237e-17    
+5.9002278500e-17    5.9450641107e-17    5.9860596849e-17    6.0229694745e-17    6.0557663501e-17    
+6.0845901816e-17    6.1093389403e-17    6.1299117393e-17    6.1462922728e-17    6.1584671024e-17    
+6.1664256673e-17    6.1701602933e-17    0.0000000000e+00    1.6062360890e-18    3.2113713440e-18    
+4.8143056854e-18    6.4139806289e-18    8.0093047465e-18    9.5991695457e-18    1.1182502771e-17    
+1.2758246484e-17    1.4325290520e-17    1.5882560644e-17    1.7429152670e-17    1.8963871816e-17    
+2.0485665679e-17    2.1993559381e-17    2.3486496148e-17    2.4963419917e-17    2.6423400094e-17    
+2.7865535709e-17    2.9288681015e-17    3.0691859190e-17    3.2074257310e-17    3.3434788891e-17    
+3.4772519598e-17    3.6086981480e-17    3.7377086736e-17    3.8641730911e-17    3.9880168638e-17    
+4.1091687593e-17    4.2275212216e-17    4.3429927364e-17    4.4555663439e-17    4.5651049867e-17    
+4.6715330714e-17    4.7748516331e-17    4.8749559981e-17    4.9717403958e-17    5.0651693736e-17    
+5.1552120177e-17    5.2417436805e-17    5.3247041576e-17    5.4041620633e-17    5.4799392190e-17    
+5.5519825744e-17    5.6203642444e-17    5.6849784592e-17    5.7457189478e-17    5.8026059170e-17    
+5.8556645026e-17    5.9047313134e-17    5.9497709897e-17    5.9910026294e-17    6.0281476693e-17    
+6.0611785374e-17    6.0902598588e-17    6.1152768016e-17    6.1361154149e-17    6.1527588724e-17    
+6.1651932159e-17    6.1734073664e-17    6.1773931341e-17    0.0000000000e+00    1.6067353203e-18    
+3.2123694645e-18    4.8158020112e-18    6.4159799975e-18    8.0118123691e-18    9.6021880707e-18    
+1.1186037037e-17    1.2762304951e-17    1.4329876871e-17    1.5887678161e-17    1.7434828124e-17    
+1.8970111877e-17    2.0492476542e-17    2.2000956811e-17    2.3494492094e-17    2.4972021107e-17    
+2.6432624781e-17    2.7875416288e-17    2.9299226414e-17    3.0703077667e-17    3.2086178417e-17    
+3.3447421358e-17    3.4785871393e-17    3.6101125728e-17    3.7392068680e-17    3.8657562997e-17    
+3.9896880483e-17    4.1109328165e-17    4.2293793976e-17    4.3449461542e-17    4.4576251556e-17    
+4.5672705103e-17    4.6738064755e-17    4.7772448323e-17    4.8774758719e-17    4.9743883010e-17    
+5.0679510957e-17    5.1581380943e-17    5.2448153452e-17    5.3279224122e-17    5.4075461614e-17    
+5.4834902042e-17    5.5557012128e-17    5.6242689566e-17    5.6890789229e-17    5.7500156398e-17    
+5.8071082240e-17    5.8603910493e-17    5.9096819913e-17    5.9549452832e-17    5.9964364308e-17    
+6.0338400825e-17    6.0671281796e-17    6.0964925607e-17    6.1218043195e-17    6.1429351438e-17    
+6.1598676348e-17    6.1725872630e-17    6.1810823801e-17    6.1853442290e-17    0.0000000000e+00    
+1.6072841277e-18    3.2134667031e-18    4.8174469289e-18    6.4181779126e-18    8.0145690099e-18    
+9.6055063491e-18    1.1189922270e-17    1.2766766443e-17    1.4334918668e-17    1.5893303870e-17    
+1.7441067176e-17    1.8976971603e-17    2.0499963756e-17    2.2009088840e-17    2.3503282073e-17    
+2.4981476434e-17    2.6442765520e-17    2.7886278054e-17    2.9310819020e-17    3.0715410190e-17    
+3.2099283343e-17    3.3461308287e-17    3.4800549082e-17    3.6116674566e-17    3.7408538399e-17    
+3.8674967282e-17    3.9915251890e-17    4.1128720526e-17    4.2314220990e-17    4.3470935553e-17    
+4.4598884168e-17    4.5696510803e-17    4.6763056390e-17    4.7798756872e-17    4.8802459806e-17    
+4.9772991552e-17    5.0710090554e-17    5.1613547436e-17    5.2481920401e-17    5.3314602542e-17    
+5.4112663158e-17    5.4873938184e-17    5.5597891289e-17    5.6285614246e-17    5.6935865813e-17    
+5.7547390129e-17    5.8120576307e-17    5.8655869637e-17    5.9151242940e-17    5.9606334076e-17    
+6.0024098334e-17    6.0400977782e-17    6.0736686484e-17    6.1033441984e-17    6.1289800497e-17    
+6.1504321028e-17    6.1676823297e-17    6.1807155728e-17    6.1895195576e-17    6.1940849038e-17    
+0.0000000000e+00    1.6078874340e-18    3.2146729024e-18    4.8192551944e-18    6.4205940906e-18    
+8.0175993978e-18    9.6091541477e-18    1.1194193326e-17    1.2771670981e-17    1.4340461138e-17    
+1.5899488238e-17    1.7447925794e-17    1.8984512532e-17    2.0508194483e-17    2.2018028416e-17    
+2.3512944938e-17    2.4991870719e-17    2.6453913282e-17    2.7898218442e-17    2.9323562824e-17    
+3.0728967388e-17    3.2113689649e-17    3.3476574251e-17    3.4816684333e-17    3.6133767473e-17    
+3.7426643636e-17    3.8694099892e-17    3.9935447662e-17    4.1150038636e-17    4.2336676499e-17    
+4.3494542031e-17    4.4623764300e-17    4.5722680517e-17    4.6790529808e-17    4.7827677979e-17    
+4.8832911738e-17    4.9804990704e-17    5.0743706844e-17    5.1648908209e-17    5.2519040562e-17    
+5.3353494200e-17    5.4153558984e-17    5.4916850792e-17    5.5642829937e-17    5.6332801542e-17    
+5.6985418707e-17    5.7599314385e-17    5.8174985360e-17    5.8712988560e-17    5.9211070421e-17    
+5.9668863887e-17    6.0089764222e-17    6.0469768916e-17    6.0808586155e-17    6.1108762349e-17    
+6.1368683626e-17    6.1586735441e-17    6.1762730594e-17    6.1896510607e-17    6.1987945852e-17    
+6.2036935674e-17    0.0000000000e+00    1.6085506515e-18    3.2159988827e-18    4.8212430290e-18    
+6.4232502061e-18    8.0209307170e-18    9.6131641893e-18    1.1198888516e-17    1.2777062562e-17    
+1.4346554001e-17    1.5906286742e-17    1.7455465505e-17    1.8992802309e-17    2.0517242559e-17    
+2.2027855733e-17    2.3523567369e-17    2.5003297203e-17    2.6466168067e-17    2.7911344565e-17    
+2.9337572145e-17    3.0743870878e-17    3.2129526566e-17    3.3493356195e-17    3.4834421887e-17    
+3.6152557784e-17    3.7446546806e-17    3.8715132457e-17    3.9957648966e-17    4.1173473732e-17    
+4.2361361942e-17    4.3520492740e-17    4.4651115143e-17    4.5751449003e-17    4.6820731462e-17    
+4.7859471084e-17    4.8866387685e-17    4.9840167519e-17    5.0780661386e-17    5.1687780468e-17    
+5.2559846924e-17    5.3396247977e-17    5.4198515953e-17    5.4964024819e-17    5.5692231197e-17    
+5.6384674751e-17    5.7039892430e-17    5.7656394957e-17    5.8234797479e-17    5.8775779652e-17    
+5.9276839045e-17    5.9737603193e-17    6.0161951031e-17    6.0545391324e-17    6.0887625791e-17    
+6.1191562370e-17    6.1455400209e-17    6.1677333980e-17    6.1857168878e-17    6.1994738833e-17    
+6.2089906654e-17    6.2142564151e-17    0.0000000000e+00    1.6092797295e-18    3.2174565390e-18    
+4.8234282646e-18    6.4261700860e-18    8.0245928513e-18    9.6175724462e-18    1.1204049961e-17    
+1.2782989552e-17    1.4353251913e-17    1.5913760369e-17    1.7463753943e-17    1.9001915299e-17    
+2.0527189151e-17    2.2038658948e-17    2.3535244656e-17    2.5015858390e-17    2.6479639808e-17    
+2.7925774172e-17    2.9352972656e-17    3.0760254353e-17    3.2146936162e-17    3.3511804663e-17    
+3.4853920862e-17    3.6173214059e-17    3.7468426451e-17    3.8738253651e-17    3.9982054960e-17    
+4.1199236040e-17    4.2388498763e-17    4.3549020473e-17    4.4681182049e-17    4.5783074331e-17    
+4.6853932278e-17    4.7894421389e-17    4.8903187946e-17    4.9878837552e-17    5.0821285681e-17    
+5.1730512919e-17    5.2604705544e-17    5.3443247399e-17    5.4247937354e-17    5.5015883441e-17    
+5.5746538228e-17    5.6441699206e-17    5.7099775641e-17    5.7719143889e-17    5.8300549215e-17    
+5.8844806186e-17    5.9349138792e-17    5.9813168626e-17    6.0241306320e-17    6.0628523381e-17    
+6.0974514423e-17    6.1282584810e-17    6.1550728144e-17    6.1776929367e-17    6.1960985313e-17    
+6.2102721570e-17    6.2201992628e-17    6.2258682017e-17    0.0000000000e+00    1.6100812082e-18    
+3.2190589472e-18    4.8258305040e-18    6.4293799232e-18    8.0286186523e-18    9.6224184632e-18    
+1.1209723960e-17    1.2789505119e-17    1.4360614958e-17    1.5921976160e-17    1.7472865461e-17    
+1.9011933250e-17    2.0538123484e-17    2.2050534970e-17    2.3548081551e-17    2.5029666959e-17    
+2.6494449354e-17    2.7941636705e-17    2.9369902509e-17    3.0778264781e-17    3.2166074610e-17    
+3.3532085147e-17    3.4875356173e-17    3.6195921596e-17    3.7492478845e-17    3.8763670886e-17    
+4.0008884581e-17    4.1227556663e-17    4.2418330393e-17    4.3580381139e-17    4.4714234737e-17    
+4.5817840198e-17    4.6890430086e-17    4.7932842418e-17    4.8943642641e-17    4.9921347695e-17    
+5.0865944155e-17    5.1777488898e-17    5.2654018829e-17    5.3494914077e-17    5.4302266525e-17    
+5.5072891860e-17    5.5806238194e-17    5.6504386450e-17    5.7165605529e-17    5.7788124076e-17    
+5.8372830398e-17    5.8920687370e-17    5.9428618233e-17    5.9896238050e-17    6.0328541950e-17    
+6.0719910830e-17    6.1070031493e-17    6.1382646193e-17    6.1655522578e-17    6.1886415030e-17    
+6.2075111193e-17    6.2221427484e-17    6.2325209250e-17    6.2386330917e-17    0.0000000000e+00    
+1.6109622775e-18    3.2208204818e-18    4.8284712967e-18    6.4329085119e-18    8.0330442337e-18    
+9.6277457118e-18    1.1215961413e-17    1.2796667711e-17    1.4368709186e-17    1.5931007817e-17    
+1.7482881794e-17    1.9022946030e-17    2.0550143646e-17    2.2063590336e-17    2.3562193207e-17    
+2.5044846783e-17    2.6510729556e-17    2.7959074459e-17    2.9388513572e-17    3.0798063727e-17    
+3.2187113592e-17    3.3554379576e-17    3.4898920109e-17    3.6220884094e-17    3.7518919751e-17    
+3.8791612167e-17    4.0038378506e-17    4.1258689653e-17    4.2451124440e-17    4.3614856062e-17    
+4.4750569706e-17    4.5856058474e-17    4.6930552292e-17    4.7975078831e-17    4.8988114672e-17    
+4.9968079289e-17    5.0915037418e-17    5.1829129805e-17    5.2708229149e-17    5.3551711492e-17    
+5.4361990830e-17    5.5135561476e-17    5.5871866639e-17    5.6573298822e-17    5.7237972624e-17    
+5.7863954310e-17    5.8452289431e-17    5.9004103901e-17    5.9515990345e-17    5.9987556646e-17    
+6.0424440476e-17    6.0820373469e-17    6.1175033842e-17    6.1492644127e-17    6.1770723576e-17    
+6.2006773118e-17    6.2200570293e-17    6.2351921436e-17    6.2460661844e-17    6.2526655934e-17    
+0.0000000000e+00    1.6119308409e-18    3.2227569449e-18    4.8313743323e-18    6.4367875056e-18    
+8.0379092955e-18    9.6336019804e-18    1.1222818274e-17    1.2804541582e-17    1.4377607209e-17    
+1.5940936359e-17    1.7493892795e-17    1.9035052428e-17    2.0563357465e-17    2.2077942160e-17    
+2.3577706216e-17    2.5061534032e-17    2.6528626455e-17    2.7978243862e-17    2.9408972799e-17    
+3.0819828798e-17    3.2210241842e-17    3.3578887944e-17    3.4924824051e-17    3.6248325483e-17    
+3.7547986360e-17    3.8822328146e-17    4.0070801311e-17    4.1292914290e-17    4.2487175086e-17    
+4.3652754503e-17    4.4790512904e-17    4.5898071999e-17    4.6974658817e-17    4.8021509512e-17    
+4.9037002978e-17    5.0019451543e-17    5.0969005866e-17    5.1885898889e-17    5.2767822800e-17    
+5.3614149149e-17    5.4427646031e-17    5.5204454469e-17    5.5944012288e-17    5.6649054508e-17    
+5.7317526101e-17    5.7947314831e-17    5.8539639109e-17    5.9095804073e-17    5.9612038907e-17    
+6.0087943596e-17    6.0529862163e-17    6.0930812506e-17    6.1290463404e-17    6.1613565358e-17    
+6.1897364559e-17    6.2139083312e-17    6.2338488054e-17    6.2495374033e-17    6.2609565498e-17    
+6.2680915864e-17    0.0000000000e+00    1.6129955871e-18    3.2248857075e-18    4.8345656524e-18    
+6.4410517010e-18    8.0432574800e-18    9.6400398031e-18    1.1230356052e-17    1.2813197363e-17    
+1.4387388846e-17    1.5951850850e-17    1.7505997238e-17    1.9048361048e-17    2.0577883477e-17    
+2.2093719185e-17    2.3594759737e-17    2.5079878400e-17    2.6548300599e-17    2.7999316874e-17    
+2.9431463721e-17    3.0843755240e-17    3.2235666832e-17    3.3605830104e-17    3.4953300372e-17    
+3.6278491926e-17    3.7579939415e-17    3.8856094361e-17    4.0106443849e-17    4.1330537589e-17    
+4.2526805725e-17    4.3694416431e-17    4.4834422643e-17    4.5944257658e-17    4.7023145320e-17    
+4.8072550972e-17    4.9090746115e-17    5.0075925296e-17    5.1028333627e-17    5.1948305403e-17    
+5.2833334372e-17    5.3682787151e-17    5.4499821093e-17    5.5280188851e-17    5.6023322328e-17    
+5.6732333077e-17    5.7404979601e-17    5.8038953433e-17    5.8635663008e-17    5.9196610490e-17    
+5.9717625527e-17    6.0198299427e-17    6.0645752703e-17    6.1052218643e-17    6.1417355646e-17    
+6.1746494617e-17    6.2036581568e-17    6.2284532512e-17    6.2490101677e-17    6.2653072126e-17    
+6.2773255963e-17    6.2850494509e-17    0.0000000000e+00    1.6141660674e-18    3.2272258660e-18    
+4.8380738852e-18    6.4457393504e-18    8.0491367637e-18    9.6471169310e-18    1.1238642366e-17    
+1.2822712703e-17    1.4398141844e-17    1.5963849200e-17    1.7519303708e-17    1.9062991273e-17    
+2.0593851988e-17    2.2111062940e-17    2.3613506751e-17    2.5100044449e-17    2.6569928475e-17    
+2.8022482532e-17    2.9456188093e-17    3.0870057687e-17    3.2263616639e-17    3.3635447743e-17    
+3.4984604522e-17    3.6311654035e-17    3.7615065554e-17    3.8893213714e-17    4.0145625854e-17    
+4.1371897054e-17    4.2570371867e-17    4.3740215579e-17    4.4882692820e-17    4.5995029764e-17    
+4.7076446755e-17    4.8128661081e-17    4.9149826190e-17    5.0138007150e-17    5.1093552904e-17    
+5.2016909167e-17    5.2905351542e-17    5.3758241218e-17    5.4579163467e-17    5.5363444003e-17    
+5.6110508217e-17    5.6823881589e-17    5.7501117632e-17    5.8139692165e-17    5.8741222517e-17    
+5.9307427444e-17    5.9833697381e-17    6.0319614095e-17    6.0773151703e-17    6.1185680962e-17    
+6.1556848867e-17    6.1892624358e-17    6.2189623460e-17    6.2444425480e-17    6.2656771223e-17    
+6.2826430359e-17    6.2953201637e-17    6.3036913085e-17    0.0000000000e+00    1.6154527818e-18    
+3.2297984129e-18    4.8419305015e-18    6.4508925048e-18    8.0555998871e-18    9.6548968500e-18    
+1.1247751549e-17    1.2833172960e-17    1.4409962664e-17    1.5977039041e-17    1.7533931570e-17    
+1.9079074347e-17    2.0611406245e-17    2.2130129009e-17    2.3634115428e-17    2.5122213077e-17    
+2.6593704097e-17    2.8047948646e-17    2.9483367708e-17    3.0898972087e-17    3.2294341990e-17    
+3.3668006549e-17    3.5019017316e-17    3.6348109292e-17    3.7653679879e-17    3.8934019189e-17    
+4.0188698810e-17    4.1417363702e-17    4.2618264326e-17    4.3790562790e-17    4.4935756444e-17    
+4.6050843771e-17    4.7135041264e-17    4.8190343179e-17    4.9214773187e-17    5.0206254015e-17    
+5.1165248754e-17    5.2092325598e-17    5.2984520345e-17    5.3841188218e-17    5.4666384900e-17    
+5.5454966770e-17    5.6206352062e-17    5.6924521285e-17    5.7606802608e-17    5.8250434712e-17    
+5.8857264567e-17    5.9429249027e-17    5.9961295698e-17    6.0452975862e-17    6.0913202003e-17    
+6.1332396698e-17    6.1710194400e-17    6.2053265448e-17    6.2357863110e-17    6.2620196548e-17    
+6.2839991815e-17    6.3017003854e-17    6.3151016737e-17    6.3241843876e-17    0.0000000000e+00    
+1.6168672727e-18    3.2326264254e-18    4.8461700974e-18    6.4565573909e-18    8.0627048280e-18    
+9.6634493504e-18    1.1257765315e-17    1.2844671968e-17    1.4422957345e-17    1.5991538693e-17    
+1.7550012047e-17    1.9096754544e-17    2.0630703719e-17    2.2151088426e-17    2.3656770641e-17    
+2.5146583152e-17    2.6619840747e-17    2.8075943660e-17    2.9513246383e-17    3.0930757818e-17    
+3.2328118508e-17    3.3703798593e-17    3.5056847458e-17    3.6388184723e-17    3.7696128782e-17    
+3.8978876834e-17    4.0236049106e-17    4.1467345396e-17    4.2670912724e-17    4.3845909709e-17    
+4.4994089529e-17    4.6112200364e-17    4.7199454475e-17    4.8258150591e-17    4.9286169716e-17    
+5.0281278105e-17    5.1244064327e-17    5.2175231224e-17    5.3071550970e-17    5.3932372233e-17    
+5.4762267819e-17    5.5555578165e-17    5.6311713637e-17    5.7035154961e-17    5.7722982584e-17    
+5.8372174499e-17    5.8984830121e-17    5.9563168047e-17    6.0101565110e-17    6.0599581060e-17    
+6.1067159936e-17    6.1493681975e-17    6.1878767844e-17    6.2229858930e-17    6.2542809723e-17    
+6.2813422485e-17    6.3041407046e-17    6.3226502165e-17    6.3368475778e-17    6.3467125228e-17    
+0.0000000000e+00    1.6184222291e-18    3.2357352724e-18    4.8508307044e-18    6.4627848260e-18    
+8.0705153219e-18    9.6728511530e-18    1.1268773494e-17    1.2857312880e-17    1.4437242457e-17    
+1.6007478227e-17    1.7567689387e-17    1.9116190464e-17    2.0651917521e-17    2.2174129208e-17    
+2.3681675620e-17    2.5173373286e-17    2.6648572885e-17    2.8106718708e-17    2.9546092147e-17    
+3.0965700017e-17    3.2365249189e-17    3.3743144949e-17    3.5098434305e-17    3.6432239826e-17    
+3.7742793055e-17    3.9028189047e-17    4.0288101503e-17    4.1522290499e-17    4.2728789347e-17    
+4.3906752830e-17    4.5058215355e-17    4.6179649945e-17    4.7270264212e-17    4.8332691588e-17    
+4.9364656246e-17    5.0363752429e-17    5.1330706647e-17    5.2266369757e-17    5.3167224134e-17    
+5.4032611237e-17    5.4867672349e-17    5.5666180730e-17    5.6427538097e-17    5.7156775065e-17    
+5.7850699760e-17    5.8506003601e-17    5.9125063516e-17    5.9710385837e-17    6.0255763914e-17    
+6.0760744823e-17    6.1236406594e-17    6.1670983615e-17    6.2064081398e-17    6.2423988950e-17    
+6.2746122378e-17    6.3025836637e-17    6.3262823728e-17    6.3456804613e-17    6.3607529492e-17    
+6.3714778046e-17    0.0000000000e+00    1.6201315997e-18    3.2391528421e-18    4.8559541310e-18    
+6.4696306738e-18    8.0791014335e-18    9.6831865974e-18    1.1280874835e-17    1.2871209092e-17    
+1.4452946145e-17    1.6025000628e-17    1.7587122168e-17    1.9137556460e-17    2.0675237950e-17    
+2.2199458045e-17    2.3709053777e-17    2.5202823803e-17    2.6680158256e-17    2.8140549857e-17    
+2.9582199644e-17    3.1004112136e-17    3.2406067115e-17    3.3786398578e-17    3.5144150916e-17    
+3.6480669802e-17    3.7794091302e-17    3.9082398187e-17    4.0345322941e-17    4.1582691901e-17    
+4.2792413383e-17    4.3973637949e-17    4.5128709167e-17    4.6253797578e-17    4.7348105678e-17    
+4.8414634845e-17    4.9450936846e-17    5.0454416829e-17    5.1425952943e-17    5.2366558761e-17    
+5.3272398079e-17    5.4142804430e-17    5.4983544029e-17    5.5787766633e-17    5.6554864454e-17    
+5.7290472600e-17    5.7991099834e-17    5.8653122544e-17    5.9279222726e-17    5.9872223024e-17    
+6.0425275361e-17    6.0937912882e-17    6.1422460216e-17    6.1865892115e-17    6.2267797433e-17    
+6.2637396966e-17    6.2969624906e-17    6.3259344483e-17    6.3506228095e-17    6.3709977144e-17    
+6.3870322329e-17    6.3987023916e-17    0.0000000000e+00    1.6220107186e-18    3.2429097921e-18    
+4.8615863372e-18    6.4771563455e-18    8.0885401851e-18    9.6945483986e-18    1.1294177894e-17    
+1.2886485261e-17    1.4470209282e-17    1.6044263085e-17    1.7608484713e-17    1.9161044197e-17    
+2.0700874203e-17    2.2227302151e-17    2.3739150709e-17    2.5235198889e-17    2.6714880198e-17    
+2.8177740594e-17    2.9621892781e-17    3.1046338753e-17    3.2450938447e-17    3.3833947490e-17    
+3.5194407394e-17    3.6533909095e-17    3.7850483700e-17    3.9141990543e-17    4.0408226727e-17    
+4.1649091438e-17    4.2862355576e-17    4.4047165066e-17    4.5206203337e-17    4.6335308408e-17    
+4.7433677157e-17    4.8504715441e-17    4.9545785502e-17    5.0554084617e-17    5.1530657631e-17    
+5.2476696990e-17    5.3388016275e-17    5.4263940309e-17    5.5110922295e-17    5.5921426571e-17    
+5.6694834898e-17    5.7437446909e-17    5.8145442276e-17    5.8814851067e-17    5.9448690648e-17    
+6.0050131381e-17    6.0611620068e-17    6.1132674536e-17    6.1626989811e-17    6.2080155918e-17    
+6.2491743399e-17    6.2871997369e-17    6.3215322254e-17    6.3516040722e-17    6.3773803625e-17    
+6.3988290861e-17    6.4159211693e-17    6.4286305042e-17    0.0000000000e+00    1.6240764426e-18    
+3.2470398243e-18    4.8677778471e-18    6.4854293506e-18    8.0989162477e-18    9.7070384784e-18    
+1.1308802008e-17    1.2903278423e-17    1.4489186726e-17    1.6065438391e-17    1.7631968656e-17    
+1.9186864373e-17    2.0729056254e-17    2.2257911304e-17    2.3772236404e-17    2.5270788970e-17    
+2.6753050187e-17    2.8218624541e-17    2.9665527627e-17    3.1092758666e-17    3.2500265706e-17    
+3.3886218225e-17    3.5249654570e-17    3.6592435293e-17    3.7912476119e-17    3.9207500690e-17    
+4.0477377147e-17    4.1722084752e-17    4.2939243348e-17    4.4127993760e-17    4.5291393030e-17    
+4.6424913636e-17    4.7527746273e-17    4.8603741451e-17    4.9650053063e-17    5.0663649871e-17    
+5.1645759971e-17    5.2597772447e-17    5.3515115886e-17    5.4397105533e-17    5.5250949803e-17    
+5.6068359550e-17    5.6848705045e-17    5.7599016437e-17    5.8315111625e-17    5.8992639970e-17    
+5.9634987507e-17    6.0245706849e-17    6.0816469653e-17    6.1346776910e-17    6.1851830126e-17    
+6.2315697093e-17    6.2737928219e-17    6.3129894662e-17    6.3485418468e-17    6.3798228067e-17    
+6.4067950624e-17    6.4294242398e-17    6.4476789087e-17    6.4615306147e-17    0.0000000000e+00    
+1.6263473024e-18    3.2515799875e-18    4.8745842022e-18    6.4945239029e-18    8.1103227007e-18    
+9.7207688801e-18    1.1324878363e-17    1.2921739223e-17    1.4510048718e-17    1.6088716501e-17    
+1.7657784661e-17    1.9215248610e-17    2.0760036910e-17    2.2291560085e-17    2.3808607659e-17    
+2.5309913308e-17    2.6795010629e-17    2.8263568449e-17    2.9713495612e-17    3.1143788287e-17    
+3.2554491388e-17    3.3943679682e-17    3.5310388042e-17    3.6656773409e-17    3.7980624668e-17    
+3.9279516294e-17    4.0553394518e-17    4.1802326634e-17    4.3023766425e-17    4.4216849113e-17    
+4.5385042448e-17    4.6523417070e-17    4.7631156881e-17    4.8712601195e-17    4.9764674867e-17    
+5.0784095453e-17    5.1772292499e-17    5.2730871249e-17    5.3654837067e-17    5.4543494671e-17    
+5.5404882681e-17    5.6229883643e-17    5.7017855198e-17    5.7776630555e-17    5.8501629913e-17    
+5.9188084121e-17    5.9839784493e-17    6.0460703852e-17    6.1041661736e-17    6.1582140625e-17    
+6.2098998109e-17    6.2574628580e-17    6.3008560314e-17    6.3413402331e-17    6.3782336467e-17    
+6.4108437901e-17    6.4391307761e-17    6.4630576318e-17    6.4825903363e-17    6.4976978561e-17    
+0.0000000000e+00    1.6288436689e-18    3.2565710096e-18    4.8820664593e-18    6.5045215857e-18    
+8.1228618664e-18    9.7358627732e-18    1.1342551173e-17    1.2942033264e-17    1.4532982400e-17    
+1.6114306234e-17    1.7686164314e-17    1.9246451531e-17    2.0794094087e-17    2.2328550343e-17    
+2.3848590746e-17    2.5352922871e-17    2.6841137935e-17    2.8312975493e-17    2.9766227036e-17    
+3.1199885383e-17    3.2614101927e-17    3.4006847324e-17    3.5377152624e-17    3.6727500592e-17    
+3.8055540679e-17    3.9358683375e-17    4.0636960761e-17    4.1890536901e-17    4.3116683029e-17    
+4.4314528206e-17    4.5487991680e-17    4.6631702345e-17    4.7744836634e-17    4.8832271208e-17    
+4.9890679139e-17    5.0916501831e-17    5.1911390282e-17    5.2877187368e-17    5.3808433197e-17    
+5.4704420918e-17    5.5574101795e-17    5.6407447815e-17    5.7203802733e-17    5.7971882565e-17    
+5.8706670318e-17    5.9402936767e-17    6.0064918753e-17    6.0697051037e-17    6.1289216418e-17    
+6.1840877030e-17    6.2370710999e-17    6.2859273143e-17    6.3306067409e-17    6.3725063604e-17    
+6.4108739776e-17    6.4449452985e-17    6.4746775735e-17    6.5000309727e-17    6.5209686278e-17    
+6.5374566695e-17    0.0000000000e+00    1.6315879359e-18    3.2620576630e-18    4.8902917387e-18    
+6.5155120839e-18    8.1366462284e-18    9.7524555587e-18    1.1361978974e-17    1.2964342596e-17    
+1.4558193501e-17    1.6142437144e-17    1.7717362195e-17    1.9280753045e-17    2.0831533296e-17    
+2.2369213902e-17    2.3892544335e-17    2.5400203479e-17    2.6891845893e-17    2.8367288881e-17    
+2.9824194931e-17    3.1261553176e-17    3.2679632063e-17    3.4076287801e-17    3.5450547234e-17    
+3.6805251308e-17    3.8137896191e-17    3.9445712109e-17    4.0728825512e-17    4.1987506849e-17    
+4.3218826675e-17    4.4421907279e-17    4.5601164240e-17    4.6750740841e-17    4.7869805305e-17    
+4.8963824998e-17    5.0029196209e-17    5.1062056765e-17    5.2064301110e-17    5.3038033344e-17    
+5.3977282124e-17    5.4881327873e-17    5.5760125138e-17    5.6602644918e-17    5.7408215705e-17    
+5.8186523989e-17    5.8932072169e-17    5.9639125259e-17    6.0312409871e-17    6.0956868574e-17    
+6.1561354409e-17    6.2125307139e-17    6.2669406218e-17    6.3172184209e-17    6.3633118315e-17    
+6.4067674261e-17    6.4467556421e-17    6.4824332422e-17    6.5137543298e-17    6.5406759350e-17    
+6.5631580585e-17    6.5811637141e-17    0.0000000000e+00    1.6346047212e-18    3.2680891660e-18    
+4.8993338258e-18    6.5275939886e-18    8.1517994403e-18    9.7706960834e-18    1.1383336044e-17    
+1.2988867347e-17    1.4585908180e-17    1.6173361581e-17    1.7751658168e-17    1.9318460855e-17    
+2.0872690390e-17    2.2413915539e-17    2.3940862716e-17    2.5452179267e-17    2.6947589382e-17    
+2.8426995837e-17    2.9887919302e-17    3.1329344861e-17    3.2751669642e-17    3.4152624033e-17    
+3.5531230263e-17    3.6890723023e-17    3.8228429980e-17    3.9541383192e-17    4.0829812851e-17    
+4.2094106355e-17    4.3331113651e-17    4.4539949582e-17    4.5725575351e-17    4.6881600402e-17    
+4.8007183933e-17    4.9108442679e-17    5.0181468655e-17    5.1222065968e-17    5.2232396680e-17    
+5.3214852059e-17    5.4162898518e-17    5.5075802496e-17    5.5964621447e-17    5.6817225982e-17    
+5.7632927817e-17    5.8422480284e-17    5.9179857451e-17    5.9898768345e-17    6.0584477984e-17    
+6.1242487177e-17    6.1860516942e-17    6.2437982453e-17    6.2997763232e-17    6.3516168769e-17    
+6.3992646865e-17    6.4444307718e-17    6.4862005193e-17    6.5236439094e-17    6.5567115861e-17    
+6.5853571272e-17    6.6095370919e-17    6.6292110675e-17    0.0000000000e+00    1.6379210871e-18    
+3.2747196248e-18    4.9092738333e-18    6.5408756816e-18    8.1684574352e-18    9.7907479753e-18    
+1.1406813968e-17    1.3015827517e-17    1.4616375052e-17    1.6207356956e-17    1.7789359887e-17    
+1.9359913222e-17    2.0917934571e-17    2.2463056251e-17    2.3993979333e-17    2.5509316488e-17    
+2.7008868453e-17    2.8492631965e-17    2.9957971794e-17    3.1403868570e-17    3.2830860879e-17    
+3.4236540801e-17    3.5619925485e-17    3.6984682470e-17    3.8327954188e-17    3.9646554849e-17    
+4.0940828694e-17    4.2211291678e-17    4.3454551236e-17    4.4669714025e-17    4.5862341053e-17    
+4.7025454913e-17    4.8158204886e-17    4.9267421555e-17    5.0348862449e-17    5.1397964814e-17    
+5.2417184905e-17    5.3409229678e-17    5.4366947466e-17    5.5289589335e-17    5.6189425171e-17    
+5.7053115925e-17    5.7879954866e-17    5.8681868115e-17    5.9452248940e-17    6.0184195173e-17    
+6.0883563701e-17    6.1556469009e-17    6.2189387677e-17    6.2781707852e-17    6.3358727595e-17    
+6.3894312564e-17    6.4387878239e-17    6.4858342594e-17    6.5295624527e-17    6.5689469837e-17    
+6.6039346938e-17    6.6344753653e-17    6.6605217747e-17    6.6820297420e-17    0.0000000000e+00    
+1.6415667831e-18    3.2820085184e-18    4.9202009289e-18    6.5554763072e-18    8.1867696450e-18    
+9.8127911114e-18    1.1432623357e-17    1.3045464955e-17    1.4649867424e-17    1.6244728226e-17    
+1.7830805559e-17    1.9405481999e-17    2.0967671705e-17    2.2517076860e-17    2.4052370671e-17    
+2.5572127695e-17    2.7076232815e-17    2.8564786059e-17    3.0034980817e-17    3.1485792823e-17    
+3.2917916168e-17    3.4328790887e-17    3.5717428546e-17    3.7087972518e-17    3.8437361602e-17    
+3.9762170532e-17    4.1062868916e-17    4.2340114037e-17    4.3590246734e-17    4.4812364668e-17    
+4.6012688211e-17    4.7183594834e-17    4.8324222907e-17    4.9442187758e-17    5.0532879210e-17    
+5.1591331216e-17    5.2620323444e-17    5.3622909880e-17    5.4591259405e-17    5.5524606181e-17    
+5.6436552929e-17    5.7312430813e-17    5.8151512826e-17    5.8967014340e-17    5.9751690146e-17    
+6.0497966186e-17    6.1212349993e-17    6.1901630667e-17    6.2550916776e-17    6.3159566748e-17    
+6.3755537363e-17    6.4310007761e-17    6.4822357890e-17    6.5313493019e-17    6.5772304236e-17    
+6.6187488597e-17    6.6558472712e-17    6.6884712684e-17    6.7165694688e-17    6.7400935515e-17    
+0.0000000000e+00    1.6455745134e-18    3.2900212322e-18    4.9322131349e-18    6.5715268414e-18    
+8.2069003406e-18    9.8370232314e-18    1.1460995736e-17    1.3078045525e-17    1.4686685741e-17    
+1.6285810634e-17    1.7876366975e-17    1.9455575962e-17    2.1022347963e-17    2.2576461962e-17    
+2.4116560535e-17    2.5641176342e-17    2.7150286766e-17    2.8644105384e-17    3.0119637188e-17    
+3.1575852528e-17    3.3013616444e-17    3.4430201826e-17    3.5824614105e-17    3.7201519738e-17    
+3.8557633672e-17    3.9889267378e-17    4.1197028288e-17    4.2481729043e-17    4.3739417415e-17    
+4.4969181170e-17    4.6177965528e-17    4.7357438768e-17    4.8506727275e-17    4.9634309041e-17    
+5.0735169674e-17    5.1803899784e-17    5.2843634565e-17    5.3857809500e-17    5.4837846541e-17    
+5.5782961271e-17    5.6708221600e-17    5.7597496852e-17    5.8450037729e-17    5.9280476883e-17    
+6.0080867228e-17    6.0842896090e-17    6.1573786262e-17    6.2281068451e-17    6.2948347361e-17    
+6.3574948755e-17    6.4191752150e-17    6.4766983385e-17    6.5299983349e-17    6.5813841955e-17    
+6.6296320412e-17    6.6734962890e-17    6.7129150041e-17    6.7478292107e-17    6.7781829543e-17    
+6.8039233619e-17    0.0000000000e+00    1.6499802296e-18    3.2988296451e-18    4.9454182076e-18    
+6.5891712669e-18    8.2290301060e-18    9.8636617114e-18    1.1492185622e-17    1.3113861494e-17    
+1.4727160285e-17    1.6330972713e-17    1.7926452847e-17    1.9510644484e-17    2.1082453823e-17    
+2.2641744274e-17    2.4187124746e-17    2.5717081833e-17    2.7231694611e-17    2.8731301480e-17    
+3.0212700321e-17    3.1674855571e-17    3.3118820192e-17    3.4541683334e-17    3.5942443679e-17    
+3.7326342715e-17    3.8689849306e-17    4.0028985521e-17    4.1344510296e-17    4.2637407065e-17    
+4.3903401423e-17    4.5141570265e-17    4.6359655635e-17    4.7548546198e-17    4.8707355157e-17    
+4.9845508843e-17    5.0957548502e-17    5.2037577379e-17    5.3089121498e-17    5.4116035722e-17    
+5.5108920904e-17    5.6066972199e-17    5.7006868208e-17    5.7910871247e-17    5.8778207515e-17    
+5.9625067686e-17    6.0442733094e-17    6.1222079105e-17    6.1971114799e-17    6.2698186136e-17    
+6.3385244615e-17    6.4031580088e-17    6.4671285053e-17    6.5269338771e-17    6.5825039194e-17    
+6.6363877821e-17    6.6872373783e-17    6.7336803874e-17    6.7756498229e-17    6.8130816671e-17    
+6.8459149397e-17    6.8740917634e-17    0.0000000000e+00    1.6548234535e-18    3.3085127736e-18    
+4.9599346043e-18    6.6085678642e-18    8.2533574580e-18    9.8929455138e-18    1.1526472806e-17    
+1.3153234153e-17    1.4771654135e-17    1.6380619591e-17    1.7981512475e-17    1.9571181562e-17    
+2.1148528468e-17    2.2713509418e-17    2.4264696304e-17    2.5800525086e-17    2.7321186626e-17    
+2.8827156545e-17    3.0315005048e-17    3.1783690068e-17    3.3234471153e-17    3.4664235463e-17    
+3.6071974267e-17    3.7463561182e-17    3.8835194555e-17    4.0182578312e-17    4.1506637941e-17    
+4.2808544624e-17    4.4083669791e-17    4.5331078382e-17    4.6559388398e-17    4.7758631466e-17    
+4.8927906303e-17    5.0077681747e-17    5.1202010562e-17    5.2294460224e-17    5.3358986402e-17    
+5.4399904986e-17    5.5406914186e-17    5.6379186706e-17    5.7335171785e-17    5.8255365148e-17    
+5.9138966056e-17    6.0003877926e-17    6.0840533890e-17    6.1638916721e-17    6.2407899870e-17    
+6.3156725508e-17    6.3865527756e-17    6.4533556993e-17    6.5198437758e-17    6.5821580335e-17    
+6.6402235476e-17    6.6968534755e-17    6.7505631878e-17    6.7998410411e-17    6.8446144951e-17    
+6.8848139898e-17    6.9203730199e-17    6.9512282069e-17    0.0000000000e+00    1.6601476315e-18    
+3.3191574808e-18    4.9758925453e-18    6.6298906320e-18    8.2801006269e-18    9.9251373312e-18    
+1.1564164863e-17    1.3196516695e-17    1.4820566427e-17    1.6435196631e-17    1.8042039774e-17    
+1.9637730247e-17    2.1221164627e-17    2.2792401168e-17    2.4349971072e-17    2.5892254634e-17    
+2.7419565606e-17    2.8932530454e-17    3.0427469101e-17    3.1903332326e-17    3.3361606781e-17    
+3.4798957578e-17    3.6214367832e-17    3.7614406068e-17    3.8994973250e-17    4.0351423567e-17    
+4.1684865599e-17    4.2996676923e-17    4.4281839629e-17    4.5539405520e-17    4.6778955534e-17    
+4.7989579159e-17    4.9170359182e-17    5.0332910479e-17    5.1470748817e-17    5.2576852706e-17    
+5.3655650121e-17    5.4711963760e-17    5.5734499558e-17    5.6722405536e-17    5.7696077403e-17    
+5.8634068863e-17    5.9535549565e-17    6.0420305749e-17    6.1277838117e-17    6.2097148212e-17    
+6.2888059690e-17    6.3660799929e-17    6.4393505202e-17    6.5085382493e-17    6.5777939129e-17    
+6.6428662004e-17    6.7036749979e-17    6.7633236877e-17    6.8201775388e-17    6.8725717492e-17    
+6.9204276735e-17    6.9636696590e-17    7.0022251268e-17    7.0360246507e-17    0.0000000000e+00    
+1.6660005247e-18    3.3308592559e-18    4.9934351826e-18    6.6533308477e-18    8.3094995143e-18    
+9.9605259428e-18    1.1605599913e-17    1.3244097392e-17    1.4874335933e-17    1.6495193419e-17    
+1.8108577710e-17    1.9710887520e-17    2.1301013887e-17    2.2879127228e-17    2.4443714012e-17    
+2.5993093344e-17    2.7527714067e-17    2.9048368474e-17    3.0551101346e-17    3.2034855606e-17    
+3.3501367556e-17    3.4947058212e-17    3.6370901727e-17    3.7780230538e-17    3.9170618697e-17    
+4.0537035925e-17    4.1880792076e-17    4.3203491615e-17    4.4499688635e-17    4.5768420491e-17    
+4.7020326687e-17    4.8243461010e-17    4.9436888738e-17    5.0613484587e-17    5.1766174007e-17    
+5.2887288048e-17    5.3981773899e-17    5.5055011393e-17    5.6094615651e-17    5.7099707561e-17    
+5.8092822593e-17    5.9050379582e-17    5.9971515623e-17    6.0878086752e-17    6.1758568647e-17    
+6.2600884178e-17    6.3415901567e-17    6.4214931237e-17    6.4973913215e-17    6.5692006779e-17    
+6.6414987627e-17    6.7096029649e-17    6.7734274664e-17    6.8363946949e-17    6.8967049121e-17    
+6.9525249480e-17    7.0037694460e-17    7.0503560555e-17    7.0922055208e-17    7.1292417678e-17    
+0.0000000000e+00    1.6724346369e-18    3.3437230707e-18    5.0127198836e-18    6.6790987838e-18    
+8.3418178452e-18    9.9994288048e-18    1.1651149652e-17    1.3296403068e-17    1.4933444995e-17    
+1.6561148162e-17    1.8181723167e-17    1.9791309644e-17    2.1388792543e-17    2.2974465581e-17    
+2.4546766054e-17    2.6103945798e-17    2.7646602163e-17    2.9175709736e-17    3.0687010837e-17    
+3.2179439747e-17    3.3655007213e-17    3.5109865914e-17    3.6542980151e-17    3.7962522134e-17    
+3.9363706537e-17    4.0741080436e-17    4.2096174944e-17    4.3430843950e-17    4.4739171041e-17    
+4.6020177693e-17    4.7285667096e-17    4.8522554486e-17    4.9729885892e-17    5.0921920983e-17    
+5.2090936264e-17    5.3228551034e-17    5.4340283254e-17    5.5432125219e-17    5.6490492913e-17    
+5.7514477395e-17    5.8528966389e-17    5.9508031853e-17    6.0450775097e-17    6.1381327495e-17    
+6.2287037909e-17    6.3154643421e-17    6.3996160548e-17    6.4824090308e-17    6.5611958388e-17    
+6.6358871621e-17    6.7115297944e-17    6.7829669942e-17    6.8501066728e-17    6.9167219861e-17    
+6.9808318022e-17    7.0404178638e-17    7.0953874363e-17    7.1456508062e-17    7.1911213780e-17    
+7.2317157694e-17    0.0000000000e+00    1.6788687491e-18    3.3565868854e-18    5.0320045847e-18    
+6.7048667198e-18    8.3741361761e-18    1.0038331667e-17    1.1696699391e-17    1.3348708745e-17    
+1.4992554058e-17    1.6627102905e-17    1.8254868623e-17    1.9871731768e-17    2.1476571199e-17    
+2.3069803934e-17    2.4649818095e-17    2.6214798252e-17    2.7765490259e-17    2.9303050998e-17    
+3.0822920327e-17    3.2324023888e-17    3.3808646870e-17    3.5272673617e-17    3.6715058575e-17    
+3.8144813730e-17    3.9556794377e-17    4.0945124947e-17    4.2311557813e-17    4.3658196284e-17    
+4.4978653446e-17    4.6271934894e-17    4.7551007505e-17    4.8801647962e-17    5.0022883047e-17    
+5.1230357378e-17    5.2415698521e-17    5.3569814021e-17    5.4698792609e-17    5.5809239045e-17    
+5.6886370175e-17    5.7929247230e-17    5.8965110185e-17    5.9965684124e-17    6.0930034571e-17    
+6.1884568238e-17    6.2815507171e-17    6.3708402664e-17    6.4576419529e-17    6.5433249380e-17    
+6.6250003561e-17    6.7025736462e-17    6.7815608260e-17    6.8563310235e-17    6.9267858792e-17    
+6.9970492774e-17    7.0649586924e-17    7.1283107796e-17    7.1870054266e-17    7.2409455569e-17    
+7.2900372352e-17    7.3341897710e-17    0.0000000000e+00    1.6853028613e-18    3.3694507001e-18    
+5.0512892858e-18    6.7306346558e-18    8.4064545070e-18    1.0077234529e-17    1.1742249131e-17    
+1.3401014422e-17    1.5051663121e-17    1.6693057648e-17    1.8328014079e-17    1.9952153891e-17    
+2.1564349855e-17    2.3165142287e-17    2.4752870137e-17    2.6325650705e-17    2.7884378355e-17    
+2.9430392261e-17    3.0958829818e-17    3.2468608028e-17    3.3962286527e-17    3.5435481319e-17    
+3.6887136999e-17    3.8327105327e-17    3.9749882217e-17    4.1149169458e-17    4.2526940682e-17    
+4.3885548618e-17    4.5218135851e-17    4.6523692096e-17    4.7816347914e-17    4.9080741438e-17    
+5.0315880202e-17    5.1538793774e-17    5.2740460777e-17    5.3911077007e-17    5.5057301964e-17    
+5.6186352871e-17    5.7282247437e-17    5.8344017064e-17    5.9401253981e-17    6.0423336395e-17    
+6.1409294046e-17    6.2387808980e-17    6.3343976433e-17    6.4262161908e-17    6.5156678511e-17    
+6.6042408452e-17    6.6888048734e-17    6.7692601304e-17    6.8515918577e-17    6.9296950528e-17    
+7.0034650857e-17    7.0773765686e-17    7.1490855825e-17    7.2162036953e-17    7.2786234169e-17    
+7.3362403076e-17    7.3889530925e-17    7.4366637726e-17    0.0000000000e+00    1.6917369734e-18    
+3.3823145149e-18    5.0705739869e-18    6.7564025919e-18    8.4387728379e-18    1.0116137391e-17    
+1.1787798870e-17    1.3453320098e-17    1.5110772183e-17    1.6759012391e-17    1.8401159536e-17    
+2.0032576015e-17    2.1652128511e-17    2.3260480640e-17    2.4855922178e-17    2.6436503159e-17    
+2.8003266451e-17    2.9557733523e-17    3.1094739309e-17    3.2613192169e-17    3.4115926184e-17    
+3.5598289021e-17    3.7059215423e-17    3.8509396923e-17    3.9942970058e-17    4.1353213969e-17    
+4.2742323551e-17    4.4112900953e-17    4.5457618256e-17    4.6775449298e-17    4.8081688323e-17    
+4.9359834914e-17    5.0608877356e-17    5.1847230170e-17    5.3065223034e-17    5.4252339994e-17    
+5.5415811319e-17    5.6563466697e-17    5.7678124699e-17    5.8758786898e-17    5.9837397777e-17    
+6.0880988666e-17    6.1888553520e-17    6.2891049723e-17    6.3872445696e-17    6.4815921151e-17    
+6.5736937492e-17    6.6651567524e-17    6.7526093907e-17    6.8359466146e-17    6.9216228894e-17    
+7.0030590821e-17    7.0801442921e-17    7.1577038598e-17    7.2332124727e-17    7.3040966111e-17    
+7.3702414072e-17    7.4315350583e-17    7.4878689497e-17    7.5391377742e-17    0.0000000000e+00    
+1.6981710856e-18    3.3951783296e-18    5.0898586880e-18    6.7821705279e-18    8.4710911688e-18    
+1.0155040253e-17    1.1833348609e-17    1.3505625775e-17    1.5169881246e-17    1.6824967134e-17    
+1.8474304992e-17    2.0112998138e-17    2.1739907167e-17    2.3355818993e-17    2.4958974220e-17    
+2.6547355612e-17    2.8122154547e-17    2.9685074785e-17    3.1230648799e-17    3.2757776310e-17    
+3.4269565841e-17    3.5761096723e-17    3.7231293847e-17    3.8691688519e-17    4.0136057898e-17    
+4.1557258480e-17    4.2957706419e-17    4.4340253287e-17    4.5697100661e-17    4.7027206499e-17    
+4.8347028731e-17    4.9638928389e-17    5.0901874511e-17    5.2155666565e-17    5.3389985291e-17    
+5.4593602980e-17    5.5774320674e-17    5.6940580524e-17    5.8074001961e-17    5.9173556733e-17    
+6.0273541573e-17    6.1338640937e-17    6.2367812994e-17    6.3394290466e-17    6.4400914958e-17    
+6.5369680394e-17    6.6317196473e-17    6.7260726595e-17    6.8164139080e-17    6.9026330988e-17    
+6.9916539210e-17    7.0764231113e-17    7.1568234986e-17    7.2380311510e-17    7.3173393628e-17    
+7.3919895269e-17    7.4618593974e-17    7.5268298090e-17    7.5867848069e-17    7.6416117758e-17    
+0.0000000000e+00    1.7046051978e-18    3.4080421443e-18    5.1091433890e-18    6.8079384639e-18    
+8.5034094997e-18    1.0193943115e-17    1.1878898349e-17    1.3557931451e-17    1.5228990309e-17    
+1.6890921878e-17    1.8547450448e-17    2.0193420262e-17    2.1827685822e-17    2.3451157346e-17    
+2.5062026261e-17    2.6658208066e-17    2.8241042643e-17    2.9812416048e-17    3.1366558290e-17    
+3.2902360451e-17    3.4423205498e-17    3.5923904425e-17    3.7403372271e-17    3.8873980115e-17    
+4.0329145738e-17    4.1761302991e-17    4.3173089288e-17    4.4567605621e-17    4.5936583067e-17    
+4.7278963701e-17    4.8612369140e-17    4.9918021865e-17    5.1194871665e-17    5.2464102961e-17    
+5.3714747548e-17    5.4934865966e-17    5.6132830030e-17    5.7317694350e-17    5.8469879223e-17    
+5.9588326567e-17    6.0709685368e-17    6.1796293208e-17    6.2847072468e-17    6.3897531209e-17    
+6.4929384220e-17    6.5923439637e-17    6.6897455454e-17    6.7869885667e-17    6.8802184253e-17    
+6.9693195830e-17    7.0616849527e-17    7.1497871406e-17    7.2335027050e-17    7.3183584422e-17    
+7.4014662530e-17    7.4798824427e-17    7.5534773877e-17    7.6221245597e-17    7.6857006641e-17    
+7.7440857773e-17    0.0000000000e+00    1.7110393100e-18    3.4209059591e-18    5.1284280901e-18    
+6.8337064000e-18    8.5357278306e-18    1.0232845977e-17    1.1924448088e-17    1.3610237128e-17    
+1.5288099371e-17    1.6956876621e-17    1.8620595905e-17    2.0273842385e-17    2.1915464478e-17    
+2.3546495699e-17    2.5165078303e-17    2.6769060519e-17    2.8359930740e-17    2.9939757310e-17    
+3.1502467781e-17    3.3046944591e-17    3.4576845155e-17    3.6086712127e-17    3.7575450695e-17    
+3.9056271711e-17    4.0522233579e-17    4.1965347502e-17    4.3388472157e-17    4.4794957955e-17    
+4.6176065472e-17    4.7530720903e-17    4.8877709549e-17    5.0197115341e-17    5.1487868820e-17    
+5.2772539356e-17    5.4039509805e-17    5.5276128953e-17    5.6491339385e-17    5.7694808176e-17    
+5.8865756485e-17    6.0003096402e-17    6.1145829164e-17    6.2253945479e-17    6.3326331943e-17    
+6.4400771952e-17    6.5457853482e-17    6.6477198880e-17    6.7477714435e-17    6.8479044739e-17    
+6.9440229426e-17    7.0360060672e-17    7.1317159844e-17    7.2231511699e-17    7.3101819114e-17    
+7.3986857334e-17    7.4855931431e-17    7.5677753585e-17    7.6450953780e-17    7.7174193104e-17    
+7.7846165213e-17    7.8465597789e-17    0.0000000000e+00    1.7174734222e-18    3.4337697738e-18    
+5.1477127912e-18    6.8594743360e-18    8.5680461615e-18    1.0271748839e-17    1.1969997827e-17    
+1.3662542804e-17    1.5347208434e-17    1.7022831364e-17    1.8693741361e-17    2.0354264509e-17    
+2.2003243134e-17    2.3641834052e-17    2.5268130344e-17    2.6879912973e-17    2.8478818836e-17    
+3.0067098572e-17    3.1638377271e-17    3.3191528732e-17    3.4730484812e-17    3.6249519830e-17    
+3.7747529119e-17    3.9238563307e-17    4.0715321419e-17    4.2169392013e-17    4.3603855026e-17    
+4.5022310290e-17    4.6415547877e-17    4.7782478104e-17    4.9143049958e-17    5.0476208817e-17    
+5.1780865975e-17    5.3080975752e-17    5.4364272062e-17    5.5617391939e-17    5.6849848740e-17    
+5.8071922002e-17    5.9261633747e-17    6.0417866236e-17    6.1581972960e-17    6.2711597750e-17    
+6.3805591417e-17    6.4904012695e-17    6.5986322744e-17    6.7030958123e-17    6.8057973416e-17    
+6.9088203811e-17    7.0078274599e-17    7.1026925514e-17    7.2017470160e-17    7.2965151992e-17    
+7.3868611179e-17    7.4790130246e-17    7.5697200333e-17    7.6556682743e-17    7.7367133683e-17    
+7.8127140611e-17    7.8835323785e-17    7.9490337805e-17    0.0000000000e+00    1.7239075343e-18    
+3.4466335886e-18    5.1669974923e-18    6.8852422721e-18    8.6003644924e-18    1.0310651701e-17    
+1.2015547566e-17    1.3714848481e-17    1.5406317496e-17    1.7088786107e-17    1.8766886817e-17    
+2.0434686633e-17    2.2091021790e-17    2.3737172405e-17    2.5371182386e-17    2.6990765427e-17    
+2.8597706932e-17    3.0194439835e-17    3.1774286762e-17    3.3336112873e-17    3.4884124469e-17    
+3.6412327532e-17    3.7919607543e-17    3.9420854903e-17    4.0908409259e-17    4.2373436524e-17    
+4.3819237894e-17    4.5249662624e-17    4.6655030282e-17    4.8034235306e-17    4.9408390367e-17    
+5.0755302293e-17    5.2073863129e-17    5.3389412147e-17    5.4689034319e-17    5.5958654925e-17    
+5.7208358095e-17    5.8449035828e-17    5.9657511009e-17    6.0832636071e-17    6.2018116756e-17    
+6.3169250021e-17    6.4284850891e-17    6.5407253437e-17    6.6514792006e-17    6.7584717366e-17    
+6.8638232398e-17    6.9697362883e-17    7.0716319772e-17    7.1693790355e-17    7.2717780477e-17    
+7.3698792285e-17    7.4635403243e-17    7.5593403159e-17    7.6538469234e-17    7.7435611900e-17    
+7.8283313586e-17    7.9080088118e-17    7.9824482358e-17    8.0515077821e-17    0.0000000000e+00    
+1.7303416465e-18    3.4594974033e-18    5.1862821934e-18    6.9110102081e-18    8.6326828233e-18    
+1.0349554563e-17    1.2061097306e-17    1.3767154157e-17    1.5465426559e-17    1.7154740850e-17    
+1.8840032274e-17    2.0515108756e-17    2.2178800446e-17    2.3832510758e-17    2.5474234427e-17    
+2.7101617880e-17    2.8716595028e-17    3.0321781097e-17    3.1910196253e-17    3.3480697014e-17    
+3.5037764126e-17    3.6575135234e-17    3.8091685967e-17    3.9603146499e-17    4.1101497099e-17    
+4.2577481035e-17    4.4034620763e-17    4.5477014958e-17    4.6894512687e-17    4.8285992508e-17    
+4.9673730775e-17    5.1034395769e-17    5.2366860284e-17    5.3697848543e-17    5.5013796576e-17    
+5.6299917912e-17    5.7566867450e-17    5.8826149654e-17    6.0053388271e-17    6.1247405905e-17    
+6.2454260552e-17    6.3626902292e-17    6.4764110365e-17    6.5910494180e-17    6.7043261269e-17    
+6.8138476610e-17    6.9218491379e-17    7.0306521954e-17    7.1354364945e-17    7.2360655197e-17    
+7.3418090793e-17    7.4432432578e-17    7.5402195308e-17    7.6396676071e-17    7.7379738136e-17    
+7.8314541058e-17    7.9199493489e-17    8.0033035625e-17    8.0813640930e-17    8.1539817837e-17    
+0.0000000000e+00    1.7367757587e-18    3.4723612180e-18    5.2055668944e-18    6.9367781441e-18    
+8.6650011542e-18    1.0388457425e-17    1.2106647045e-17    1.3819459834e-17    1.5524535622e-17    
+1.7220695593e-17    1.8913177730e-17    2.0595530880e-17    2.2266579101e-17    2.3927849111e-17    
+2.5577286469e-17    2.7212470334e-17    2.8835483124e-17    3.0449122359e-17    3.2046105743e-17    
+3.3625281155e-17    3.5191403784e-17    3.6737942936e-17    3.8263764392e-17    3.9785438096e-17    
+4.1294584940e-17    4.2781525547e-17    4.4250003632e-17    4.5704367293e-17    4.7133995093e-17    
+4.8537749709e-17    4.9939071184e-17    5.1313489244e-17    5.2659857438e-17    5.4006284938e-17    
+5.5338558832e-17    5.6641180898e-17    5.7925376805e-17    5.9203263480e-17    6.0449265533e-17    
+6.1662175740e-17    6.2890404348e-17    6.4084554563e-17    6.5243369840e-17    6.6413734923e-17    
+6.7571730531e-17    6.8692235853e-17    6.9798750360e-17    7.0915681026e-17    7.1992410118e-17    
+7.3027520039e-17    7.4118401110e-17    7.5166072871e-17    7.6168987372e-17    7.7199948983e-17    
+7.8221007037e-17    7.9193470216e-17    8.0115673392e-17    8.0985983131e-17    8.1802799502e-17    
+8.2564557853e-17    0.0000000000e+00    1.7432098709e-18    3.4852250328e-18    5.2248515955e-18    
+6.9625460802e-18    8.6973194851e-18    1.0427360287e-17    1.2152196784e-17    1.3871765510e-17    
+1.5583644684e-17    1.7286650336e-17    1.8986323186e-17    2.0675953003e-17    2.2354357757e-17    
+2.4023187464e-17    2.5680338510e-17    2.7323322787e-17    2.8954371220e-17    3.0576463622e-17    
+3.2182015234e-17    3.3769865295e-17    3.5345043441e-17    3.6900750638e-17    3.8435842816e-17    
+3.9967729692e-17    4.1487672780e-17    4.2985570058e-17    4.4465386501e-17    4.5931719627e-17    
+4.7373477498e-17    4.8789506911e-17    5.0204411593e-17    5.1592582720e-17    5.2952854593e-17    
+5.4314721334e-17    5.5663321089e-17    5.6982443884e-17    5.8283886160e-17    5.9580377306e-17    
+6.0845142795e-17    6.2076945574e-17    6.3326548143e-17    6.4542206834e-17    6.5722629314e-17    
+6.6916975666e-17    6.8100199793e-17    6.9245995096e-17    7.0379009341e-17    7.1524840098e-17    
+7.2630455290e-17    7.3694384881e-17    7.4818711427e-17    7.5899713164e-17    7.6935779436e-17    
+7.8003221895e-17    7.9062275939e-17    8.0072399374e-17    8.1031853295e-17    8.1938930638e-17    
+8.2791958074e-17    8.3589297869e-17    0.0000000000e+00    1.7496439830e-18    3.4980888475e-18    
+5.2441362966e-18    6.9883140162e-18    8.7296378160e-18    1.0466263148e-17    1.2197746524e-17    
+1.3924071187e-17    1.5642753747e-17    1.7352605079e-17    1.9059468643e-17    2.0756375127e-17    
+2.2442136413e-17    2.4118525817e-17    2.5783390552e-17    2.7434175241e-17    2.9073259316e-17    
+3.0703804884e-17    3.2317924725e-17    3.3914449436e-17    3.5498683098e-17    3.7063558341e-17    
+3.8607921240e-17    4.0150021288e-17    4.1680760620e-17    4.3189614569e-17    4.4680769369e-17    
+4.6159071961e-17    4.7612959903e-17    4.9041264113e-17    5.0469752002e-17    5.1871676196e-17    
+5.3245851748e-17    5.4623157730e-17    5.5988083346e-17    5.7323706871e-17    5.8642395516e-17    
+5.9957491132e-17    6.1241020057e-17    6.2491715409e-17    6.3762691939e-17    6.4999859105e-17    
+6.6201888788e-17    6.7420216409e-17    6.8628669055e-17    6.9799754339e-17    7.0959268322e-17    
+7.2133999170e-17    7.3268500463e-17    7.4361249723e-17    7.5519021743e-17    7.6633353457e-17    
+7.7702571501e-17    7.8806494807e-17    7.9903544840e-17    8.0951328532e-17    8.1948033197e-17    
+8.2891878145e-17    8.3781116646e-17    8.4614037885e-17    0.0000000000e+00    1.7560780952e-18    
+3.5109526622e-18    5.2634209977e-18    7.0140819522e-18    8.7619561469e-18    1.0505166010e-17    
+1.2243296263e-17    1.3976376863e-17    1.5701862810e-17    1.7418559822e-17    1.9132614099e-17    
+2.0836797250e-17    2.2529915069e-17    2.4213864170e-17    2.5886442594e-17    2.7545027695e-17    
+2.9192147412e-17    3.0831146146e-17    3.2453834215e-17    3.4059033577e-17    3.5652322755e-17    
+3.7226366043e-17    3.8779999664e-17    4.0332312884e-17    4.1873848461e-17    4.3393659080e-17    
+4.4896152238e-17    4.6386424296e-17    4.7852442308e-17    4.9293021314e-17    5.0735092411e-17    
+5.2150769672e-17    5.3538848902e-17    5.4931594125e-17    5.6312845603e-17    5.7664969857e-17    
+5.9000904871e-17    6.0334604958e-17    6.1636897319e-17    6.2906485243e-17    6.4198835735e-17    
+6.5457511376e-17    6.6681148262e-17    6.7923457152e-17    6.9157138317e-17    7.0353513582e-17    
+7.1539527304e-17    7.2743158241e-17    7.3906545636e-17    7.5028114565e-17    7.6219332060e-17    
+7.7366993750e-17    7.8469363565e-17    7.9609767719e-17    8.0744813742e-17    8.1830257689e-17    
+8.2864213100e-17    8.3844825652e-17    8.4770275218e-17    8.5638777901e-17    0.0000000000e+00    
+1.7625122074e-18    3.5238164770e-18    5.2827056988e-18    7.0398498883e-18    8.7942744778e-18    
+1.0544068872e-17    1.2288846002e-17    1.4028682540e-17    1.5760971872e-17    1.7484514565e-17    
+1.9205759556e-17    2.0917219374e-17    2.2617693725e-17    2.4309202523e-17    2.5989494635e-17    
+2.7655880148e-17    2.9311035508e-17    3.0958487409e-17    3.2589743706e-17    3.4203617718e-17    
+3.5805962412e-17    3.7389173745e-17    3.8952078088e-17    4.0514604480e-17    4.2066936301e-17    
+4.3597703591e-17    4.5111535107e-17    4.6613776630e-17    4.8091924713e-17    4.9544778516e-17    
+5.1000432820e-17    5.2429863148e-17    5.3831846057e-17    5.5240030521e-17    5.6637607860e-17    
+5.8006232844e-17    5.9359414226e-17    6.0711718785e-17    6.2032774581e-17    6.3321255078e-17    
+6.4634979531e-17    6.5915163647e-17    6.7160407737e-17    6.8426697894e-17    6.9685607579e-17    
+7.0907272825e-17    7.2119786285e-17    7.3352317313e-17    7.4544590809e-17    7.5694979407e-17    
+7.6919642377e-17    7.8100634043e-17    7.9236155630e-17    8.0413040631e-17    8.1586082643e-17    
+8.2709186847e-17    8.3780393003e-17    8.4797773159e-17    8.5759433790e-17    8.6663517917e-17    
+0.0000000000e+00    1.7689463196e-18    3.5366802917e-18    5.3019903998e-18    7.0656178243e-18    
+8.8265928087e-18    1.0582971734e-17    1.2334395742e-17    1.4080988216e-17    1.5820080935e-17    
+1.7550469308e-17    1.9278905012e-17    2.0997641498e-17    2.2705472380e-17    2.4404540876e-17    
+2.6092546677e-17    2.7766732602e-17    2.9429923604e-17    3.1085828671e-17    3.2725653197e-17    
+3.4348201858e-17    3.5959602069e-17    3.7551981447e-17    3.9124156512e-17    4.0696896076e-17    
+4.2260024141e-17    4.3801748102e-17    4.5326917976e-17    4.6841128964e-17    4.8331407119e-17    
+4.9796535718e-17    5.1265773228e-17    5.2708956624e-17    5.4124843211e-17    5.5548466916e-17    
+5.6962370117e-17    5.8347495830e-17    5.9717923581e-17    6.1088832611e-17    6.2428651843e-17    
+6.3736024912e-17    6.5071123327e-17    6.6372815918e-17    6.7639667211e-17    6.8929938637e-17    
+7.0214076841e-17    7.1461032068e-17    7.2700045266e-17    7.3961476385e-17    7.5182635982e-17    
+7.6361844248e-17    7.7619952693e-17    7.8834274336e-17    8.0002947694e-17    8.1216313544e-17    
+8.2427351545e-17    8.3588116005e-17    8.4696572906e-17    8.5750720666e-17    8.6748592363e-17    
+8.7688257933e-17    0.0000000000e+00    1.7753804318e-18    3.5495441065e-18    5.3212751009e-18    
+7.0913857603e-18    8.8589111396e-18    1.0621874596e-17    1.2379945481e-17    1.4133293893e-17    
+1.5879189998e-17    1.7616424051e-17    1.9352050468e-17    2.1078063621e-17    2.2793251036e-17    
+2.4499879229e-17    2.6195598718e-17    2.7877585055e-17    2.9548811700e-17    3.1213169933e-17    
+3.2861562687e-17    3.4492785999e-17    3.6113241726e-17    3.7714789149e-17    3.9296234936e-17    
+4.0879187672e-17    4.2453111981e-17    4.4005792613e-17    4.5542300844e-17    4.7068481298e-17    
+4.8570889524e-17    5.0048292919e-17    5.1531113637e-17    5.2988050099e-17    5.4417840366e-17    
+5.5856903312e-17    5.7287132374e-17    5.8688758816e-17    6.0076432936e-17    6.1465946437e-17    
+6.2824529105e-17    6.4150794747e-17    6.5507267123e-17    6.6830468189e-17    6.8118926685e-17    
+6.9433179380e-17    7.0742546104e-17    7.2014791311e-17    7.3280304247e-17    7.4570635457e-17    
+7.5820681155e-17    7.7028709090e-17    7.8320263010e-17    7.9567914629e-17    8.0769739758e-17    
+8.2019586456e-17    8.3268620446e-17    8.4467045163e-17    8.5612752809e-17    8.6703668173e-17    
+8.7737750935e-17    8.8712997949e-17    0.0000000000e+00    1.7818145439e-18    3.5624079212e-18    
+5.3405598020e-18    7.1171536964e-18    8.8912294705e-18    1.0660777458e-17    1.2425495220e-17    
+1.4185599569e-17    1.5938299060e-17    1.7682378794e-17    1.9425195925e-17    2.1158485745e-17    
+2.2881029692e-17    2.4595217582e-17    2.6298650760e-17    2.7988437509e-17    2.9667699796e-17    
+3.1340511196e-17    3.2997472178e-17    3.4637370140e-17    3.6266881383e-17    3.7877596851e-17    
+3.9468313360e-17    4.1061479268e-17    4.2646199822e-17    4.4209837124e-17    4.5757683713e-17    
+4.7295833633e-17    4.8810371929e-17    5.0300050121e-17    5.1796454046e-17    5.3267143575e-17    
+5.4710837521e-17    5.6165339707e-17    5.7611894631e-17    5.9030021803e-17    6.0434942291e-17    
+6.1843060263e-17    6.3220406367e-17    6.4565564581e-17    6.5943410918e-17    6.7288120460e-17    
+6.8598186159e-17    6.9936420123e-17    7.1271015366e-17    7.2568550555e-17    7.3860563228e-17    
+7.5179794528e-17    7.6458726328e-17    7.7695573932e-17    7.9020573327e-17    8.0301554922e-17    
+8.1536531823e-17    8.2822859368e-17    8.4109889348e-17    8.5345974321e-17    8.6528932712e-17    
+8.7656615680e-17    8.8726909507e-17    8.9737737965e-17    0.0000000000e+00    1.7882486561e-18    
+3.5752717359e-18    5.3598445031e-18    7.1429216324e-18    8.9235478014e-18    1.0699680320e-17    
+1.2471044960e-17    1.4237905246e-17    1.5997408123e-17    1.7748333537e-17    1.9498341381e-17    
+2.1238907868e-17    2.2968808348e-17    2.4690555935e-17    2.6401702801e-17    2.8099289962e-17    
+2.9786587892e-17    3.1467852458e-17    3.3133381669e-17    3.4781954281e-17    3.6420521040e-17    
+3.8040404554e-17    3.9640391784e-17    4.1243770865e-17    4.2839287662e-17    4.4413881635e-17    
+4.5973066582e-17    4.7523185967e-17    4.9049854334e-17    5.0551807323e-17    5.2061794455e-17    
+5.3546237051e-17    5.5003834675e-17    5.6473776103e-17    5.7936656887e-17    5.9371284789e-17    
+6.0793451646e-17    6.2220174089e-17    6.3616283629e-17    6.4980334416e-17    6.6379554714e-17    
+6.7745772731e-17    6.9077445634e-17    7.0439660866e-17    7.1799484628e-17    7.3122309798e-17    
+7.4440822209e-17    7.5788953600e-17    7.7096771501e-17    7.8362438774e-17    7.9720883643e-17    
+8.1035195215e-17    8.2303323887e-17    8.3626132280e-17    8.4951158249e-17    8.6224903479e-17    
+8.7445112615e-17    8.8609563187e-17    8.9716068079e-17    9.0762477981e-17    0.0000000000e+00    
+1.7946827683e-18    3.5881355507e-18    5.3791292042e-18    7.1686895684e-18    8.9558661323e-18    
+1.0738583182e-17    1.2516594699e-17    1.4290210922e-17    1.6056517186e-17    1.7814288280e-17    
+1.9571486837e-17    2.1319329992e-17    2.3056587004e-17    2.4785894288e-17    2.6504754843e-17    
+2.8210142416e-17    2.9905475989e-17    3.1595193720e-17    3.3269291159e-17    3.4926538422e-17    
+3.6574160697e-17    3.8203212256e-17    3.9812470208e-17    4.1426062461e-17    4.3032375502e-17    
+4.4617926146e-17    4.6188449451e-17    4.7750538301e-17    4.9289336739e-17    5.0803564524e-17    
+5.2327134864e-17    5.3825330527e-17    5.5296831830e-17    5.6782212498e-17    5.8261419144e-17    
+5.9712547775e-17    6.1151961002e-17    6.2597287915e-17    6.4012160891e-17    6.5395104250e-17    
+6.6815698510e-17    6.8203425002e-17    6.9556705108e-17    7.0942901609e-17    7.2327953890e-17    
+7.3676069041e-17    7.5021081191e-17    7.6398112672e-17    7.7734816674e-17    7.9029303616e-17    
+8.0421193960e-17    8.1768835507e-17    8.3070115952e-17    8.4429405192e-17    8.5792427151e-17    
+8.7103832636e-17    8.8361292518e-17    8.9562510694e-17    9.0705226651e-17    9.1787217997e-17    
+0.0000000000e+00    1.8011168805e-18    3.6009993654e-18    5.3984139052e-18    7.1944575045e-18    
+8.9881844632e-18    1.0777486044e-17    1.2562144438e-17    1.4342516599e-17    1.6115626248e-17    
+1.7880243023e-17    1.9644632294e-17    2.1399752115e-17    2.3144365659e-17    2.4881232641e-17    
+2.6607806884e-17    2.8320994870e-17    3.0024364085e-17    3.1722534983e-17    3.3405200650e-17    
+3.5071122562e-17    3.6727800354e-17    3.8366019958e-17    3.9984548632e-17    4.1608354057e-17    
+4.3225463342e-17    4.4821970657e-17    4.6403832319e-17    4.7977890636e-17    4.9528819144e-17    
+5.1055321726e-17    5.2592475273e-17    5.4104424003e-17    5.5589828985e-17    5.7090648894e-17    
+5.8586181401e-17    6.0053810762e-17    6.1510470357e-17    6.2974401741e-17    6.4408038153e-17    
+6.5809874084e-17    6.7251842306e-17    6.8661077273e-17    7.0035964582e-17    7.1446142351e-17    
+7.2856423152e-17    7.4229828284e-17    7.5601340172e-17    7.7007271744e-17    7.8372861847e-17    
+7.9696168458e-17    8.1121504277e-17    8.2502475800e-17    8.3836908016e-17    8.5232678104e-17    
+8.6633696052e-17    8.7982761794e-17    8.9277472421e-17    9.0515458201e-17    9.1694385223e-17    
+9.2811958012e-17    0.0000000000e+00    1.8075509926e-18    3.6138631801e-18    5.4176986063e-18    
+7.2202254405e-18    9.0205027941e-18    1.0816388906e-17    1.2607694177e-17    1.4394822275e-17    
+1.6174735311e-17    1.7946197766e-17    1.9717777750e-17    2.1480174239e-17    2.3232144315e-17    
+2.4976570994e-17    2.6710858926e-17    2.8431847323e-17    3.0143252181e-17    3.1849876245e-17    
+3.3541110141e-17    3.5215706703e-17    3.6881440011e-17    3.8528827660e-17    4.0156627056e-17    
+4.1790645653e-17    4.3418551183e-17    4.5026015168e-17    4.6619215188e-17    4.8205242970e-17    
+4.9768301550e-17    5.1307078928e-17    5.2857815681e-17    5.4383517479e-17    5.5882826139e-17    
+5.7399085290e-17    5.8910943658e-17    6.0395073748e-17    6.1868979712e-17    6.3351515567e-17    
+6.4803915415e-17    6.6224643919e-17    6.7687986102e-17    6.9118729543e-17    7.0515224056e-17    
+7.1949383094e-17    7.3384892414e-17    7.4783587527e-17    7.6181599153e-17    7.7616430816e-17    
+7.9010907020e-17    8.0363033300e-17    8.1821814593e-17    8.3236116093e-17    8.4603700080e-17    
+8.6035951016e-17    8.7474964954e-17    8.8861690952e-17    9.0193652323e-17    9.1468405708e-17    
+9.2683543796e-17    9.3836698028e-17    0.0000000000e+00    1.8139851048e-18    3.6267269949e-18    
+5.4369833074e-18    7.2459933765e-18    9.0528211250e-18    1.0855291768e-17    1.2653243917e-17    
+1.4447127952e-17    1.6233844373e-17    1.8012152509e-17    1.9790923206e-17    2.1560596363e-17    
+2.3319922971e-17    2.5071909347e-17    2.6813910967e-17    2.8542699777e-17    3.0262140277e-17    
+3.1977217507e-17    3.3677019631e-17    3.5360290844e-17    3.7035079668e-17    3.8691635362e-17    
+4.0328705480e-17    4.1972937249e-17    4.3611639023e-17    4.5230059679e-17    4.6834598057e-17    
+4.8432595304e-17    5.0007783955e-17    5.1558836129e-17    5.3123156090e-17    5.4662610954e-17    
+5.6175823294e-17    5.7707521685e-17    5.9235705915e-17    6.0736336735e-17    6.2227489067e-17    
+6.3728629393e-17    6.5199792677e-17    6.6639413753e-17    6.8124129898e-17    6.9576381814e-17    
+7.0994483531e-17    7.2452623837e-17    7.3913361676e-17    7.5337346770e-17    7.6761858134e-17    
+7.8225589887e-17    7.9648952193e-17    8.1029898142e-17    8.2522124910e-17    8.3969756386e-17    
+8.5370492145e-17    8.6839223929e-17    8.8316233855e-17    8.9740620110e-17    9.1109832226e-17    
+9.2421353215e-17    9.3672702368e-17    9.4861438044e-17    0.0000000000e+00    1.8204192170e-18    
+3.6395908096e-18    5.4562680085e-18    7.2717613126e-18    9.0851394559e-18    1.0894194630e-17    
+1.2698793656e-17    1.4499433628e-17    1.6292953436e-17    1.8078107252e-17    1.9864068663e-17    
+2.1641018486e-17    2.3407701627e-17    2.5167247700e-17    2.6916963009e-17    2.8653552230e-17    
+3.0381028373e-17    3.2104558770e-17    3.3812929122e-17    3.5504874985e-17    3.7188719325e-17    
+3.8854443064e-17    4.0500783904e-17    4.2155228845e-17    4.3804726863e-17    4.5434104190e-17    
+4.7049980926e-17    4.8659947639e-17    5.0247266360e-17    5.1810593331e-17    5.3388496499e-17    
+5.4941704430e-17    5.6468820448e-17    5.8015958081e-17    5.9560468172e-17    6.1077599721e-17    
+6.2585998422e-17    6.4105743219e-17    6.5595669939e-17    6.7054183588e-17    6.8560273693e-17    
+7.0034034085e-17    7.1473743005e-17    7.2955864580e-17    7.4441830939e-17    7.5891106013e-17    
+7.7342117115e-17    7.8834748959e-17    8.0286997366e-17    8.1696762983e-17    8.3222435226e-17    
+8.4703396679e-17    8.6137284209e-17    8.7642496841e-17    8.9157502757e-17    9.0619549268e-17    
+9.2026012129e-17    9.3374300722e-17    9.4661860940e-17    9.5886178060e-17    0.0000000000e+00    
+1.8268533292e-18    3.6524546243e-18    5.4755527096e-18    7.2975292486e-18    9.1174577868e-18    
+1.0933097492e-17    1.2744343395e-17    1.4551739305e-17    1.6352062499e-17    1.8144061995e-17    
+1.9937214119e-17    2.1721440610e-17    2.3495480283e-17    2.5262586053e-17    2.7020015050e-17    
+2.8764404684e-17    3.0499916469e-17    3.2231900032e-17    3.3948838613e-17    3.5649459125e-17    
+3.7342358982e-17    3.9017250767e-17    4.0672862328e-17    4.2337520441e-17    4.3997814704e-17    
+4.5638148701e-17    4.7265363794e-17    4.8887299973e-17    5.0486748765e-17    5.2062350533e-17    
+5.3653836908e-17    5.5220797906e-17    5.6761817603e-17    5.8324394476e-17    5.9885230429e-17    
+6.1418862707e-17    6.2944507777e-17    6.4482857046e-17    6.5991547201e-17    6.7468953422e-17    
+6.8996417489e-17    7.0491686356e-17    7.1953002479e-17    7.3459105323e-17    7.4970300201e-17    
+7.6444865256e-17    7.7922376097e-17    7.9443908031e-17    8.0925042539e-17    8.2363627825e-17    
+8.3922745543e-17    8.5437036972e-17    8.6904076274e-17    8.8445769753e-17    8.9998771658e-17    
+9.1498478425e-17    9.2942192032e-17    9.4327248229e-17    9.5651019512e-17    9.6910918076e-17    
+0.0000000000e+00    1.8332874414e-18    3.6653184391e-18    5.4948374106e-18    7.3232971846e-18    
+9.1497761177e-18    1.0972000354e-17    1.2789893135e-17    1.4604044981e-17    1.6411171561e-17    
+1.8210016738e-17    2.0010359575e-17    2.1801862733e-17    2.3583258939e-17    2.5357924406e-17    
+2.7123067092e-17    2.8875257138e-17    3.0618804565e-17    3.2359241294e-17    3.4084748103e-17    
+3.5794043266e-17    3.7495998639e-17    3.9180058469e-17    4.0844940752e-17    4.2519812038e-17    
+4.4190902544e-17    4.5842193212e-17    4.7480746663e-17    4.9114652307e-17    5.0726231170e-17    
+5.2314107734e-17    5.3919177317e-17    5.5499891382e-17    5.7054814758e-17    5.8632830872e-17    
+6.0209992686e-17    6.1760125694e-17    6.3303017132e-17    6.4859970872e-17    6.6387424463e-17    
+6.7883723257e-17    6.9432561285e-17    7.0949338627e-17    7.2432261953e-17    7.3962346066e-17    
+7.5498769463e-17    7.6998624500e-17    7.8502635078e-17    8.0053067103e-17    8.1563087712e-17    
+8.3030492667e-17    8.4623055860e-17    8.6170677265e-17    8.7670868338e-17    8.9249042665e-17    
+9.0840040560e-17    9.2377407583e-17    9.3858371935e-17    9.5280195736e-17    9.6640178084e-17    
+9.7935658092e-17    0.0000000000e+00    1.8397215535e-18    3.6781822538e-18    5.5141221117e-18    
+7.3490651207e-18    9.1820944486e-18    1.1010903216e-17    1.2835442874e-17    1.4656350658e-17    
+1.6470280624e-17    1.8275971481e-17    2.0083505032e-17    2.1882284857e-17    2.3671037594e-17    
+2.5453262759e-17    2.7226119134e-17    2.8986109591e-17    3.0737692661e-17    3.2486582557e-17    
+3.4220657594e-17    3.5938627407e-17    3.7649638296e-17    3.9342866171e-17    4.1017019176e-17    
+4.2702103634e-17    4.4383990384e-17    4.6046237724e-17    4.7696129532e-17    4.9342004641e-17    
+5.0965713576e-17    5.2565864936e-17    5.4184517726e-17    5.5778984858e-17    5.7347811912e-17    
+5.8941267267e-17    6.0534754942e-17    6.2101388680e-17    6.3661526488e-17    6.5237084698e-17    
+6.6783301725e-17    6.8298493091e-17    6.9868705081e-17    7.1406990898e-17    7.2911521428e-17    
+7.4465586808e-17    7.6027238725e-17    7.7552383743e-17    7.9082894059e-17    8.0662226174e-17    
+8.2201132885e-17    8.3697357509e-17    8.5323366176e-17    8.6904317558e-17    8.8437660402e-17    
+9.0052315577e-17    9.1681309461e-17    9.3256336741e-17    9.4774551838e-17    9.6233143242e-17    
+9.7629336656e-17    9.8960398108e-17    0.0000000000e+00    1.8461556657e-18    3.6910460686e-18    
+5.5334068128e-18    7.3748330567e-18    9.2144127795e-18    1.1049806078e-17    1.2880992613e-17    
+1.4708656334e-17    1.6529389687e-17    1.8341926224e-17    2.0156650488e-17    2.1962706980e-17    
+2.3758816250e-17    2.5548601112e-17    2.7329171175e-17    2.9096962045e-17    3.0856580757e-17    
+3.2613923819e-17    3.4356567085e-17    3.6083211548e-17    3.7803277953e-17    3.9505673873e-17    
+4.1189097601e-17    4.2884395230e-17    4.4577078224e-17    4.6250282235e-17    4.7911512401e-17    
+4.9569356976e-17    5.1205195981e-17    5.2817622138e-17    5.4449858134e-17    5.6058078333e-17    
+5.7640809067e-17    5.9249703663e-17    6.0859517199e-17    6.2442651666e-17    6.4020035843e-17    
+6.5614198524e-17    6.7179178987e-17    6.8713262926e-17    7.0304848877e-17    7.1864643169e-17    
+7.3390780902e-17    7.4968827551e-17    7.6555707987e-17    7.8106142986e-17    7.9663153040e-17    
+8.1271385246e-17    8.2839178058e-17    8.4364222351e-17    8.6023676493e-17    8.7637957851e-17    
+8.9204452467e-17    9.0855588489e-17    9.2522578363e-17    9.4135265899e-17    9.5690731741e-17    
+9.7186090749e-17    9.8618495228e-17    9.9985138124e-17    0.0000000000e+00    1.8525897779e-18    
+3.7039098833e-18    5.5526915139e-18    7.4006009927e-18    9.2467311104e-18    1.1088708940e-17    
+1.2926542353e-17    1.4760962011e-17    1.6588498749e-17    1.8407880967e-17    2.0229795944e-17    
+2.2043129104e-17    2.3846594906e-17    2.5643939465e-17    2.7432223217e-17    2.9207814498e-17    
+3.0975468853e-17    3.2741265081e-17    3.4492476575e-17    3.6227795689e-17    3.7956917610e-17    
+3.9668481575e-17    4.1361176025e-17    4.3066686826e-17    4.4770166065e-17    4.6454326746e-17    
+4.8126895269e-17    4.9796709310e-17    5.1444678386e-17    5.3069379339e-17    5.4715198543e-17    
+5.6337171809e-17    5.7933806221e-17    5.9558140058e-17    6.1184279456e-17    6.2783914653e-17    
+6.4378545198e-17    6.5991312350e-17    6.7575056249e-17    6.9128032760e-17    7.0740992673e-17    
+7.2322295440e-17    7.3870040376e-17    7.5472068294e-17    7.7084177249e-17    7.8659902229e-17    
+8.0243412021e-17    8.1880544318e-17    8.3477223231e-17    8.5031087193e-17    8.6723986810e-17    
+8.8371598144e-17    8.9971244531e-17    9.1658861401e-17    9.3363847264e-17    9.5014195057e-17    
+9.6606911644e-17    9.8139038256e-17    9.9607653801e-17    1.0100987814e-16    0.0000000000e+00    
+1.8590238901e-18    3.7167736980e-18    5.5719762150e-18    7.4263689288e-18    9.2790494413e-18    
+1.1127611802e-17    1.2972092092e-17    1.4813267687e-17    1.6647607812e-17    1.8473835710e-17    
+2.0302941401e-17    2.2123551228e-17    2.3934373562e-17    2.5739277818e-17    2.7535275258e-17    
+2.9318666952e-17    3.1094356949e-17    3.2868606344e-17    3.4628386066e-17    3.6372379829e-17    
+3.8110557267e-17    3.9831289278e-17    4.1533254449e-17    4.3248978422e-17    4.4963253905e-17    
+4.6658371257e-17    4.8342278138e-17    5.0024061644e-17    5.1684160791e-17    5.3321136541e-17    
+5.4980538952e-17    5.6616265285e-17    5.8226803376e-17    5.9866576454e-17    6.1509041713e-17    
+6.3125177639e-17    6.4737054553e-17    6.6368426176e-17    6.7970933511e-17    6.9542802595e-17    
+7.1177136468e-17    7.2779947711e-17    7.4349299850e-17    7.5975309037e-17    7.7612646511e-17    
+7.9213661472e-17    8.0823671002e-17    8.2489703390e-17    8.4115268404e-17    8.5697952035e-17    
+8.7424297126e-17    8.9105238437e-17    9.0738036595e-17    9.2462134314e-17    9.4205116166e-17    
+9.5893124214e-17    9.7523091546e-17    9.9091985763e-17    1.0059681237e-16    1.0203461816e-16    
+0.0000000000e+00    1.8654580023e-18    3.7296375128e-18    5.5912609160e-18    7.4521368648e-18    
+9.3113677722e-18    1.1166514664e-17    1.3017641831e-17    1.4865573364e-17    1.6706716875e-17    
+1.8539790453e-17    2.0376086857e-17    2.2203973351e-17    2.4022152218e-17    2.5834616171e-17    
+2.7638327300e-17    2.9429519405e-17    3.1213245045e-17    3.2995947606e-17    3.4764295557e-17    
+3.6516963970e-17    3.8264196924e-17    3.9994096980e-17    4.1705332873e-17    4.3431270018e-17    
+4.5156341745e-17    4.6862415768e-17    4.8557661007e-17    5.0251413979e-17    5.1923643196e-17    
+5.3572893743e-17    5.5245879361e-17    5.6895358761e-17    5.8519800531e-17    6.0175012850e-17    
+6.1833803970e-17    6.3466440626e-17    6.5095563908e-17    6.6745540002e-17    6.8366810773e-17    
+6.9957572429e-17    7.1613280264e-17    7.3237599982e-17    7.4828559325e-17    7.6478549780e-17    
+7.8141115774e-17    7.9767420715e-17    8.1403929984e-17    8.3098862461e-17    8.4753313577e-17    
+8.6364816876e-17    8.8124607443e-17    8.9838878730e-17    9.1504828660e-17    9.3265407226e-17    
+9.5046385067e-17    9.6772053372e-17    9.8439271449e-17    1.0004493327e-16    1.0158597094e-16    
+1.0305935817e-16    0.0000000000e+00    1.8718921144e-18    3.7425013275e-18    5.6105456171e-18    
+7.4779048008e-18    9.3436861031e-18    1.1205417526e-17    1.3063191571e-17    1.4917879040e-17    
+1.6765825937e-17    1.8605745196e-17    2.0449232313e-17    2.2284395475e-17    2.4109930873e-17    
+2.5929954524e-17    2.7741379341e-17    2.9540371859e-17    3.1332133141e-17    3.3123288868e-17    
+3.4900205047e-17    3.6661548111e-17    3.8417836581e-17    4.0156904682e-17    4.1877411297e-17    
+4.3613561614e-17    4.5349429586e-17    4.7066460279e-17    4.8773043876e-17    5.0478766313e-17    
+5.2163125602e-17    5.3824650944e-17    5.5511219770e-17    5.7174452237e-17    5.8812797685e-17    
+6.0483449245e-17    6.2158566227e-17    6.3807703612e-17    6.5454073263e-17    6.7122653828e-17    
+6.8762688035e-17    7.0372342264e-17    7.2049424060e-17    7.3695252253e-17    7.5307818799e-17    
+7.6981790523e-17    7.8669585036e-17    8.0321179958e-17    8.1984188965e-17    8.3708021533e-17    
+8.5391358750e-17    8.7031681718e-17    8.8824917760e-17    9.0572519023e-17    9.2271620724e-17    
+9.4068680138e-17    9.5887653969e-17    9.7650982530e-17    9.9355451352e-17    1.0099788078e-16    
+1.0257512952e-16    1.0408409819e-16    0.0000000000e+00    1.8783262266e-18    3.7553651422e-18    
+5.6298303182e-18    7.5036727369e-18    9.3760044340e-18    1.1244320388e-17    1.3108741310e-17    
+1.4970184717e-17    1.6824935000e-17    1.8671699939e-17    2.0522377770e-17    2.2364817598e-17    
+2.4197709529e-17    2.6025292877e-17    2.7844431383e-17    2.9651224313e-17    3.1451021238e-17    
+3.3250630131e-17    3.5036114538e-17    3.6806132252e-17    3.8571476238e-17    4.0319712384e-17    
+4.2049489721e-17    4.3795853210e-17    4.5542517426e-17    4.7270504790e-17    4.8988426744e-17    
+5.0706118647e-17    5.2402608007e-17    5.4076408146e-17    5.5776560179e-17    5.7453545713e-17    
+5.9105794840e-17    6.0791885641e-17    6.2483328484e-17    6.4148966598e-17    6.5812582619e-17    
+6.7499767654e-17    6.9158565297e-17    7.0787112098e-17    7.2485567856e-17    7.4152904524e-17    
+7.5787078273e-17    7.7485031265e-17    7.9198054298e-17    8.0874939202e-17    8.2564447946e-17    
+8.4317180605e-17    8.6029403923e-17    8.7698546560e-17    8.9525228076e-17    9.1306159316e-17    
+9.3038412789e-17    9.4871953050e-17    9.6728922870e-17    9.8529911688e-17    1.0027163126e-16    
+1.0195082828e-16    1.0356428809e-16    1.0510883820e-16    0.0000000000e+00    1.8847603388e-18    
+3.7682289570e-18    5.6491150193e-18    7.5294406729e-18    9.4083227649e-18    1.1283223250e-17    
+1.3154291049e-17    1.5022490393e-17    1.6884044063e-17    1.8737654682e-17    2.0595523226e-17    
+2.2445239722e-17    2.4285488185e-17    2.6120631230e-17    2.7947483424e-17    2.9762076766e-17    
+3.1569909334e-17    3.3377971393e-17    3.5172024029e-17    3.6950716392e-17    3.8725115895e-17    
+4.0482520086e-17    4.2221568145e-17    4.3978144807e-17    4.5735605266e-17    4.7474549301e-17    
+4.9203809613e-17    5.0933470982e-17    5.2642090412e-17    5.4328165348e-17    5.6041900587e-17    
+5.7732639188e-17    5.9398791994e-17    6.1100322036e-17    6.2808090741e-17    6.4490229585e-17    
+6.6171091974e-17    6.7876881481e-17    6.9554442559e-17    7.1201881933e-17    7.2921711652e-17    
+7.4610556795e-17    7.6266337747e-17    7.7988272008e-17    7.9726523560e-17    8.1428698445e-17    
+8.3144706927e-17    8.4926339677e-17    8.6667449096e-17    8.8365411402e-17    9.0225538393e-17    
+9.2039799609e-17    9.3805204853e-17    9.5675225962e-17    9.7570191772e-17    9.9408840846e-17    
+1.0118781116e-16    1.0290377579e-16    1.0455344666e-16    1.0613357822e-16    0.0000000000e+00    
+1.8911944510e-18    3.7810927717e-18    5.6683997204e-18    7.5552086089e-18    9.4406410958e-18    
+1.1322126112e-17    1.3199840788e-17    1.5074796070e-17    1.6943153125e-17    1.8803609425e-17    
+2.0668668682e-17    2.2525661845e-17    2.4373266841e-17    2.6215969583e-17    2.8050535466e-17    
+2.9872929220e-17    3.1688797430e-17    3.3505312655e-17    3.5307933519e-17    3.7095300533e-17    
+3.8878755552e-17    4.0645327788e-17    4.2393646569e-17    4.4160436403e-17    4.5928693106e-17    
+4.7678593812e-17    4.9419192482e-17    5.1160823316e-17    5.2881572817e-17    5.4579922549e-17    
+5.6307240996e-17    5.8011732664e-17    5.9691789149e-17    6.1408758432e-17    6.3132852998e-17    
+6.4831492571e-17    6.6529601329e-17    6.8253995307e-17    6.9950319821e-17    7.1616651767e-17    
+7.3357855448e-17    7.5068209066e-17    7.6745597222e-17    7.8491512751e-17    8.0254992822e-17    
+8.1982457688e-17    8.3724965908e-17    8.5535498749e-17    8.7305494269e-17    8.9032276244e-17    
+9.0925848710e-17    9.2773439901e-17    9.4571996917e-17    9.6478498874e-17    9.8411460673e-17    
+1.0028777000e-16    1.0210399106e-16    1.0385672330e-16    1.0554260523e-16    1.0715831824e-16    
+0.0000000000e+00    1.8976285631e-18    3.7939565865e-18    5.6876844214e-18    7.5809765450e-18    
+9.4729594267e-18    1.1361028974e-17    1.3245390528e-17    1.5127101746e-17    1.7002262188e-17    
+1.8869564168e-17    2.0741814139e-17    2.2606083969e-17    2.4461045497e-17    2.6311307936e-17    
+2.8153587507e-17    2.9983781673e-17    3.1807685526e-17    3.3632653918e-17    3.5443843010e-17    
+3.7239884674e-17    3.9032395209e-17    4.0808135491e-17    4.2565724993e-17    4.4342727999e-17    
+4.6121780947e-17    4.7882638323e-17    4.9634575351e-17    5.1388175650e-17    5.3121055222e-17    
+5.4831679751e-17    5.6572581405e-17    5.8290826140e-17    5.9984786304e-17    6.1717194827e-17    
+6.3457615254e-17    6.5172755557e-17    6.6888110684e-17    6.8631109133e-17    7.0346197083e-17    
+7.2031421601e-17    7.3793999243e-17    7.5525861337e-17    7.7224856696e-17    7.8994753494e-17    
+8.0783462084e-17    8.2536216931e-17    8.4305224890e-17    8.6144657820e-17    8.7943539442e-17    
+8.9699141086e-17    9.1626159026e-17    9.3507080194e-17    9.5338788982e-17    9.7281771786e-17    
+9.9252729575e-17    1.0116669916e-16    1.0302017096e-16    1.0480967080e-16    1.0653176381e-16    
+1.0818305825e-16    0.0000000000e+00    1.9040626753e-18    3.8068204012e-18    5.7069691225e-18    
+7.6067444810e-18    9.5052777576e-18    1.1399931836e-17    1.3290940267e-17    1.5179407423e-17    
+1.7061371250e-17    1.8935518911e-17    2.0814959595e-17    2.2686506093e-17    2.4548824152e-17    
+2.6406646289e-17    2.8256639549e-17    3.0094634127e-17    3.1926573622e-17    3.3759995180e-17    
+3.5579752501e-17    3.7384468815e-17    3.9186034866e-17    4.0970943193e-17    4.2737803417e-17    
+4.4525019595e-17    4.6314868787e-17    4.8086682834e-17    4.9849958219e-17    5.1615527984e-17    
+5.3360537628e-17    5.5083436953e-17    5.6837921814e-17    5.8569919616e-17    6.0277783458e-17    
+6.2025631223e-17    6.3782377511e-17    6.5514018544e-17    6.7246620039e-17    6.9008222959e-17    
+7.0742074345e-17    7.2446191436e-17    7.4230143039e-17    7.5983513608e-17    7.7704116170e-17    
+7.9497994237e-17    8.1311931346e-17    8.3089976174e-17    8.4885483871e-17    8.6753816892e-17    
+8.8581584615e-17    9.0366005928e-17    9.2326469343e-17    9.4240720487e-17    9.6105581046e-17    
+9.8085044699e-17    1.0009399848e-16    1.0204562832e-16    1.0393635087e-16    1.0576261831e-16    
+1.0752092238e-16    1.0920779827e-16    0.0000000000e+00    1.9104967875e-18    3.8196842159e-18    
+5.7262538236e-18    7.6325124170e-18    9.5375960885e-18    1.1438834698e-17    1.3336490006e-17    
+1.5231713099e-17    1.7120480313e-17    1.9001473654e-17    2.0888105051e-17    2.2766928216e-17    
+2.4636602808e-17    2.6501984642e-17    2.8359691590e-17    3.0205486580e-17    3.2045461718e-17    
+3.3887336442e-17    3.5715661991e-17    3.7529052955e-17    3.9339674523e-17    4.1133750895e-17    
+4.2909881841e-17    4.4707311191e-17    4.6507956627e-17    4.8290727345e-17    5.0065341088e-17    
+5.1842880319e-17    5.3600020033e-17    5.5335194154e-17    5.7103262223e-17    5.8849013092e-17    
+6.0570780613e-17    6.2334067618e-17    6.4107139768e-17    6.5855281530e-17    6.7605129394e-17    
+6.9385336785e-17    7.1137951607e-17    7.2860961270e-17    7.4666286835e-17    7.6441165879e-17    
+7.8183375644e-17    8.0001234980e-17    8.1840400609e-17    8.3643735417e-17    8.5465742852e-17    
+8.7362975964e-17    8.9219629788e-17    9.1032870770e-17    9.3026779659e-17    9.4974360780e-17    
+9.6872373111e-17    9.8888317611e-17    1.0093526738e-16    1.0292455748e-16    1.0485253077e-16    
+1.0671556582e-16    1.0851008095e-16    1.1023253828e-16    0.0000000000e+00    1.9169308997e-18    
+3.8325480307e-18    5.7455385247e-18    7.6582803531e-18    9.5699144194e-18    1.1477737560e-17    
+1.3382039746e-17    1.5284018776e-17    1.7179589376e-17    1.9067428397e-17    2.0961250508e-17    
+2.2847350340e-17    2.4724381464e-17    2.6597322995e-17    2.8462743632e-17    3.0316339034e-17    
+3.2164349814e-17    3.4014677705e-17    3.5851571482e-17    3.7673637096e-17    3.9493314180e-17    
+4.1296558597e-17    4.3081960265e-17    4.4889602787e-17    4.6701044468e-17    4.8494771856e-17    
+5.0280723957e-17    5.2070232653e-17    5.3839502438e-17    5.5586951356e-17    5.7368602632e-17    
+5.9128106568e-17    6.0863777768e-17    6.2642504014e-17    6.4431902025e-17    6.6196544516e-17    
+6.7963638749e-17    6.9762450611e-17    7.1533828869e-17    7.3275731105e-17    7.5102430631e-17    
+7.6898818150e-17    7.8662635118e-17    8.0504475722e-17    8.2368869871e-17    8.4197494660e-17    
+8.6046001833e-17    8.7972135036e-17    8.9857674961e-17    9.1699735611e-17    9.3727089976e-17    
+9.5708001073e-17    9.7639165175e-17    9.9691590523e-17    1.0177653628e-16    1.0380348663e-16    
+1.0576871067e-16    1.0766851333e-16    1.0949923952e-16    1.1125727830e-16    0.0000000000e+00    
+1.9233650119e-18    3.8454118454e-18    5.7648232258e-18    7.6840482891e-18    9.6022327503e-18    
+1.1516640422e-17    1.3427589485e-17    1.5336324452e-17    1.7238698438e-17    1.9133383140e-17    
+2.1034395964e-17    2.2927772463e-17    2.4812160120e-17    2.6692661348e-17    2.8565795673e-17    
+3.0427191488e-17    3.2283237910e-17    3.4142018967e-17    3.5987480973e-17    3.7818221237e-17    
+3.9646953837e-17    4.1459366299e-17    4.3254038689e-17    4.5071894383e-17    4.6894132308e-17    
+4.8698816367e-17    5.0496106826e-17    5.2297584987e-17    5.4078984843e-17    5.5838708558e-17    
+5.7633943040e-17    5.9407200043e-17    6.1156774922e-17    6.2950940410e-17    6.4756664282e-17    
+6.6537807503e-17    6.8322148105e-17    7.0139564437e-17    7.1929706131e-17    7.3690500939e-17    
+7.5538574427e-17    7.7356470421e-17    7.9141894593e-17    8.1007716465e-17    8.2897339133e-17    
+8.4751253903e-17    8.6626260814e-17    8.8581294107e-17    9.0495720133e-17    9.2366600453e-17    
+9.4427400293e-17    9.6441641366e-17    9.8405957239e-17    1.0049486343e-16    1.0261780518e-16    
+1.0468241579e-16    1.0668489058e-16    1.0862146083e-16    1.1048839809e-16    1.1228201832e-16    
+0.0000000000e+00    1.9297991240e-18    3.8582756601e-18    5.7841079268e-18    7.7098162251e-18    
+9.6345510812e-18    1.1555543284e-17    1.3473139224e-17    1.5388630129e-17    1.7297807501e-17    
+1.9199337883e-17    2.1107541420e-17    2.3008194587e-17    2.4899938776e-17    2.6787999701e-17    
+2.8668847715e-17    3.0538043941e-17    3.2402126006e-17    3.4269360229e-17    3.6123390463e-17    
+3.7962805378e-17    3.9800593494e-17    4.1622174001e-17    4.3426117113e-17    4.5254185980e-17    
+4.7087220148e-17    4.8902860878e-17    5.0711489694e-17    5.2524937322e-17    5.4318467248e-17    
+5.6090465759e-17    5.7899283449e-17    5.9686293519e-17    6.1449772077e-17    6.3259376805e-17    
+6.5081426539e-17    6.6879070489e-17    6.8680657460e-17    7.0516678263e-17    7.2325583393e-17    
+7.4105270774e-17    7.5974718223e-17    7.7814122692e-17    7.9621154067e-17    8.1510957208e-17    
+8.3425808395e-17    8.5305013147e-17    8.7206519795e-17    8.9190453179e-17    9.1133765306e-17    
+9.3033465295e-17    9.5127710609e-17    9.7175281659e-17    9.9172749304e-17    1.0129813635e-16    
+1.0345907408e-16    1.0556134495e-16    1.0760107048e-16    1.0957440834e-16    1.1147755667e-16    
+1.1330675833e-16    
+1.1331676776e+00    1.1342921905e+00    1.1357061714e+00    1.1357192433e+00    1.1344736457e+00    
+1.1323615003e+00    1.1300257090e+00    1.1273619374e+00    1.1242858337e+00    1.1211800618e+00    
+1.1175911280e+00    1.1128927512e+00    1.1078349434e+00    1.1028874031e+00    1.0977532449e+00    
+1.0925730699e+00    1.0874762719e+00    1.0820068713e+00    1.0760412957e+00    1.0701981243e+00    
+1.0645944132e+00    1.0589937895e+00    1.0536803322e+00    1.0482837917e+00    1.0419510494e+00    
+1.0351222233e+00    1.0286166624e+00    1.0223326965e+00    1.0161796321e+00    1.0105765320e+00    
+1.0052467101e+00    9.9972371410e-01    9.9458840337e-01    9.8983863846e-01    9.8477876866e-01    
+9.7977151245e-01    9.7541138162e-01    9.7143097893e-01    9.6773020145e-01    9.6486667808e-01    
+9.6261516278e-01    9.6049996431e-01    9.5917834545e-01    9.5876945714e-01    9.5868221295e-01    
+9.5931205327e-01    9.6125331907e-01    9.6424284694e-01    9.6831281419e-01    9.7436494254e-01    
+9.8234318139e-01    9.9196086668e-01    1.0046349552e+00    1.0213710723e+00    1.0425188294e+00    
+1.0702112390e+00    1.1082619361e+00    1.1620235677e+00    1.2408634518e+00    1.3639023859e+00    
+1.4397165172e+00    1.0346715216e+00    1.0347087660e+00    1.0347449598e+00    1.0347413292e+00    
+1.0347393926e+00    1.0347394007e+00    1.0347352272e+00    1.0347287213e+00    1.0347212425e+00    
+1.0347083885e+00    1.0346958027e+00    1.0346914487e+00    1.0346863904e+00    1.0346748571e+00    
+1.0346606194e+00    1.0346419498e+00    1.0346171618e+00    1.0345922467e+00    1.0345690534e+00    
+1.0345393767e+00    1.0345014420e+00    1.0344583706e+00    1.0344060483e+00    1.0343494355e+00    
+1.0343009233e+00    1.0342545056e+00    1.0341979031e+00    1.0341321071e+00    1.0340581207e+00    
+1.0339689230e+00    1.0338679035e+00    1.0337619991e+00    1.0336413962e+00    1.0335047779e+00    
+1.0333626628e+00    1.0332084185e+00    1.0330305424e+00    1.0328315836e+00    1.0326117433e+00    
+1.0323595995e+00    1.0320757610e+00    1.0317660083e+00    1.0314165627e+00    1.0310205843e+00    
+1.0305837139e+00    1.0300950036e+00    1.0295380841e+00    1.0289091209e+00    1.0281995874e+00    
+1.0273856820e+00    1.0264528156e+00    1.0253891222e+00    1.0241561016e+00    1.0227117233e+00    
+1.0210163475e+00    1.0190013121e+00    1.0165672807e+00    1.0135844399e+00    1.0098669200e+00    
+1.0050647606e+00    1.0023328462e+00    1.0015035205e+00    1.0015075330e+00    1.0015123876e+00    
+1.0015136531e+00    1.0015136097e+00    1.0015128688e+00    1.0015121121e+00    1.0015112547e+00    
+1.0015102176e+00    1.0015093773e+00    1.0015082647e+00    1.0015062278e+00    1.0015040056e+00    
+1.0015020591e+00    1.0015000694e+00    1.0014981755e+00    1.0014965020e+00    1.0014945287e+00    
+1.0014920957e+00    1.0014898783e+00    1.0014879922e+00    1.0014861609e+00    1.0014847167e+00    
+1.0014831834e+00    1.0014804880e+00    1.0014771374e+00    1.0014741204e+00    1.0014712907e+00    
+1.0014685364e+00    1.0014664184e+00    1.0014645345e+00    1.0014622510e+00    1.0014603780e+00    
+1.0014588577e+00    1.0014566902e+00    1.0014544069e+00    1.0014528345e+00    1.0014515412e+00    
+1.0014503902e+00    1.0014501958e+00    1.0014505047e+00    1.0014505964e+00    1.0014514254e+00    
+1.0014529556e+00    1.0014542055e+00    1.0014556645e+00    1.0014578713e+00    1.0014600523e+00    
+1.0014619195e+00    1.0014640622e+00    1.0014653312e+00    1.0014644691e+00    1.0014616807e+00    
+1.0014554219e+00    1.0014429196e+00    1.0014216008e+00    1.0013869941e+00    1.0013309340e+00    
+1.0012398273e+00    1.0010867167e+00    1.0009900417e+00    1.0000533292e+00    1.0000535684e+00    
+1.0000538753e+00    1.0000539977e+00    1.0000540562e+00    1.0000540886e+00    1.0000541400e+00    
+1.0000542046e+00    1.0000542776e+00    1.0000543848e+00    1.0000544952e+00    1.0000545654e+00    
+1.0000546465e+00    1.0000547705e+00    1.0000549171e+00    1.0000550971e+00    1.0000553205e+00    
+1.0000555535e+00    1.0000557875e+00    1.0000560704e+00    1.0000564126e+00    1.0000567981e+00    
+1.0000572531e+00    1.0000577480e+00    1.0000582127e+00    1.0000586866e+00    1.0000592428e+00    
+1.0000598768e+00    1.0000605879e+00    1.0000614237e+00    1.0000623638e+00    1.0000633737e+00    
+1.0000645245e+00    1.0000658241e+00    1.0000672148e+00    1.0000687558e+00    1.0000705310e+00    
+1.0000725334e+00    1.0000747869e+00    1.0000773978e+00    1.0000803734e+00    1.0000837151e+00    
+1.0000875813e+00    1.0000920525e+00    1.0000971536e+00    1.0001030803e+00    1.0001100685e+00    
+1.0001182734e+00    1.0001279919e+00    1.0001397307e+00    1.0001538935e+00    1.0001711306e+00    
+1.0001926351e+00    1.0002197531e+00    1.0002544477e+00    1.0003000347e+00    1.0003615703e+00    
+1.0004470434e+00    1.0005699951e+00    1.0007542853e+00    1.0008655850e+00    1.0000015237e+00    
+1.0000015336e+00    1.0000015465e+00    1.0000015522e+00    1.0000015553e+00    1.0000015576e+00    
+1.0000015609e+00    1.0000015650e+00    1.0000015697e+00    1.0000015761e+00    1.0000015828e+00    
+1.0000015881e+00    1.0000015940e+00    1.0000016021e+00    1.0000016114e+00    1.0000016225e+00    
+1.0000016358e+00    1.0000016499e+00    1.0000016643e+00    1.0000016813e+00    1.0000017014e+00    
+1.0000017238e+00    1.0000017500e+00    1.0000017785e+00    1.0000018061e+00    1.0000018348e+00    
+1.0000018679e+00    1.0000019055e+00    1.0000019475e+00    1.0000019966e+00    1.0000020517e+00    
+1.0000021115e+00    1.0000021798e+00    1.0000022572e+00    1.0000023409e+00    1.0000024347e+00    
+1.0000025432e+00    1.0000026669e+00    1.0000028077e+00    1.0000029729e+00    1.0000031640e+00    
+1.0000033825e+00    1.0000036403e+00    1.0000039446e+00    1.0000043003e+00    1.0000047247e+00    
+1.0000052396e+00    1.0000058634e+00    1.0000066287e+00    1.0000075899e+00    1.0000087981e+00    
+1.0000103373e+00    1.0000123590e+00    1.0000150527e+00    1.0000187141e+00    1.0000238645e+00    
+1.0000313676e+00    1.0000427180e+00    1.0000606902e+00    1.0000907431e+00    1.0001097003e+00    
+1.0000000371e+00    1.0000000374e+00    1.0000000379e+00    1.0000000380e+00    1.0000000382e+00    
+1.0000000382e+00    1.0000000384e+00    1.0000000385e+00    1.0000000387e+00    1.0000000389e+00    
+1.0000000391e+00    1.0000000393e+00    1.0000000395e+00    1.0000000398e+00    1.0000000402e+00    
+1.0000000406e+00    1.0000000410e+00    1.0000000415e+00    1.0000000420e+00    1.0000000427e+00    
+1.0000000434e+00    1.0000000442e+00    1.0000000451e+00    1.0000000461e+00    1.0000000471e+00    
+1.0000000482e+00    1.0000000494e+00    1.0000000508e+00    1.0000000523e+00    1.0000000541e+00    
+1.0000000562e+00    1.0000000584e+00    1.0000000610e+00    1.0000000640e+00    1.0000000672e+00    
+1.0000000709e+00    1.0000000751e+00    1.0000000801e+00    1.0000000858e+00    1.0000000926e+00    
+1.0000001006e+00    1.0000001099e+00    1.0000001212e+00    1.0000001347e+00    1.0000001509e+00    
+1.0000001708e+00    1.0000001957e+00    1.0000002267e+00    1.0000002662e+00    1.0000003176e+00    
+1.0000003848e+00    1.0000004744e+00    1.0000005980e+00    1.0000007715e+00    1.0000010215e+00    
+1.0000013970e+00    1.0000019856e+00    1.0000029520e+00    1.0000046308e+00    1.0000077504e+00    
+1.0000097962e+00    1.0000000008e+00    1.0000000008e+00    1.0000000008e+00    1.0000000008e+00    
+1.0000000008e+00    1.0000000008e+00    1.0000000008e+00    1.0000000008e+00    1.0000000008e+00    
+1.0000000009e+00    1.0000000009e+00    1.0000000009e+00    1.0000000009e+00    1.0000000009e+00    
+1.0000000009e+00    1.0000000009e+00    1.0000000009e+00    1.0000000009e+00    1.0000000009e+00    
+1.0000000010e+00    1.0000000010e+00    1.0000000010e+00    1.0000000010e+00    1.0000000011e+00    
+1.0000000011e+00    1.0000000011e+00    1.0000000012e+00    1.0000000012e+00    1.0000000012e+00    
+1.0000000013e+00    1.0000000014e+00    1.0000000014e+00    1.0000000015e+00    1.0000000016e+00    
+1.0000000017e+00    1.0000000018e+00    1.0000000019e+00    1.0000000021e+00    1.0000000023e+00    
+1.0000000025e+00    1.0000000028e+00    1.0000000031e+00    1.0000000035e+00    1.0000000040e+00    
+1.0000000046e+00    1.0000000054e+00    1.0000000064e+00    1.0000000076e+00    1.0000000093e+00    
+1.0000000115e+00    1.0000000146e+00    1.0000000188e+00    1.0000000250e+00    1.0000000342e+00    
+1.0000000481e+00    1.0000000705e+00    1.0000001083e+00    1.0000001757e+00    1.0000003041e+00    
+1.0000005694e+00    1.0000007498e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000001e+00    
+1.0000000001e+00    1.0000000001e+00    1.0000000001e+00    1.0000000001e+00    1.0000000001e+00    
+1.0000000001e+00    1.0000000001e+00    1.0000000002e+00    1.0000000002e+00    1.0000000002e+00    
+1.0000000003e+00    1.0000000004e+00    1.0000000005e+00    1.0000000007e+00    1.0000000010e+00    
+1.0000000014e+00    1.0000000021e+00    1.0000000033e+00    1.0000000054e+00    1.0000000096e+00    
+1.0000000184e+00    1.0000000385e+00    1.0000000526e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000001e+00    1.0000000001e+00    1.0000000001e+00    1.0000000003e+00    
+1.0000000005e+00    1.0000000010e+00    1.0000000025e+00    1.0000000035e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000001e+00    1.0000000002e+00    1.0000000002e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    9.7425090130e-01    9.7422070326e-01    9.7418260292e-01    9.7418284584e-01    
+9.7421927325e-01    9.7428084175e-01    9.7434915637e-01    9.7442738645e-01    9.7451812656e-01    
+9.7461024575e-01    9.7471731431e-01    9.7485831092e-01    9.7501125476e-01    9.7516220876e-01    
+9.7532020811e-01    9.7548100051e-01    9.7564061302e-01    9.7581343525e-01    9.7600367306e-01    
+9.7619180837e-01    9.7637400257e-01    9.7655776389e-01    9.7673359805e-01    9.7691378610e-01    
+9.7712731683e-01    9.7735995254e-01    9.7758387384e-01    9.7780233053e-01    9.7801818897e-01    
+9.7821617487e-01    9.7840581572e-01    9.7860378598e-01    9.7878864393e-01    9.7896014495e-01    
+9.7914399310e-01    9.7932649765e-01    9.7948474716e-01    9.7962837910e-01    9.7976075223e-01    
+9.7985968413e-01    9.7993335040e-01    9.7999990711e-01    9.8003313747e-01    9.8002785894e-01    
+9.8000692881e-01    9.7995450238e-01    9.7984708763e-01    9.7969496909e-01    9.7949722706e-01    
+9.7922028132e-01    9.7886782133e-01    9.7845289880e-01    9.7792794589e-01    9.7726451308e-01    
+9.7646248415e-01    9.7547074989e-01    9.7420624683e-01    9.7258291605e-01    9.7048681785e-01    
+9.6777363266e-01    9.6624379583e-01    9.9914496406e-01    9.9914269487e-01    9.9913993964e-01    
+9.9913951233e-01    9.9914056057e-01    9.9914256184e-01    9.9914475778e-01    9.9914726657e-01    
+9.9915018777e-01    9.9915307573e-01    9.9915647412e-01    9.9916113918e-01    9.9916619326e-01    
+9.9917108435e-01    9.9917617448e-01    9.9918129533e-01    9.9918629210e-01    9.9919174151e-01    
+9.9919781068e-01    9.9920372401e-01    9.9920933466e-01    9.9921494243e-01    9.9922017017e-01    
+9.9922551550e-01    9.9923213277e-01    9.9923945000e-01    9.9924636540e-01    9.9925301454e-01    
+9.9925950907e-01    9.9926524049e-01    9.9927059912e-01    9.9927624262e-01    9.9928130844e-01    
+9.9928580242e-01    9.9929074623e-01    9.9929557722e-01    9.9929938270e-01    9.9930255262e-01    
+9.9930520136e-01    9.9930641879e-01    9.9930654801e-01    9.9930628921e-01    9.9930453538e-01    
+9.9930108534e-01    9.9929683301e-01    9.9929105197e-01    9.9928273034e-01    9.9927224736e-01    
+9.9925942995e-01    9.9924270240e-01    9.9922215022e-01    9.9919806331e-01    9.9916798625e-01    
+9.9913037065e-01    9.9908461183e-01    9.9902742024e-01    9.9895363249e-01    9.9885712078e-01    
+9.9872904157e-01    9.9855716284e-01    9.9845856452e-01    9.9997937769e-01    9.9997928756e-01    
+9.9997917568e-01    9.9997914709e-01    9.9997916605e-01    9.9997921374e-01    9.9997926361e-01    
+9.9997931972e-01    9.9997938555e-01    9.9997944562e-01    9.9997951893e-01    9.9997963180e-01    
+9.9997975371e-01    9.9997986561e-01    9.9997998015e-01    9.9998009155e-01    9.9998019455e-01    
+9.9998030927e-01    9.9998044153e-01    9.9998056447e-01    9.9998067318e-01    9.9998077808e-01    
+9.9998086610e-01    9.9998095474e-01    9.9998108404e-01    9.9998123399e-01    9.9998136649e-01    
+9.9998148637e-01    9.9998159737e-01    9.9998167825e-01    9.9998174278e-01    9.9998181350e-01    
+9.9998185999e-01    9.9998188274e-01    9.9998191704e-01    9.9998194251e-01    9.9998192700e-01    
+9.9998188390e-01    9.9998181611e-01    9.9998169030e-01    9.9998151839e-01    9.9998132334e-01    
+9.9998106313e-01    9.9998072968e-01    9.9998035254e-01    9.9997990093e-01    9.9997933407e-01    
+9.9997866176e-01    9.9997786935e-01    9.9997688710e-01    9.9997571097e-01    9.9997433546e-01    
+9.9997264021e-01    9.9997054141e-01    9.9996797646e-01    9.9996474904e-01    9.9996055688e-01    
+9.9995500604e-01    9.9994749893e-01    9.9993718738e-01    9.9993121042e-01    9.9999956750e-01    
+9.9999956478e-01    9.9999956134e-01    9.9999956029e-01    9.9999956050e-01    9.9999956145e-01    
+9.9999956237e-01    9.9999956338e-01    9.9999956458e-01    9.9999956553e-01    9.9999956676e-01    
+9.9999956904e-01    9.9999957148e-01    9.9999957356e-01    9.9999957563e-01    9.9999957753e-01    
+9.9999957911e-01    9.9999958094e-01    9.9999958319e-01    9.9999958509e-01    9.9999958651e-01    
+9.9999958774e-01    9.9999958841e-01    9.9999958901e-01    9.9999959069e-01    9.9999959288e-01    
+9.9999959447e-01    9.9999959562e-01    9.9999959642e-01    9.9999959625e-01    9.9999959551e-01    
+9.9999959483e-01    9.9999959331e-01    9.9999959098e-01    9.9999958883e-01    9.9999958624e-01    
+9.9999958226e-01    9.9999957724e-01    9.9999957124e-01    9.9999956318e-01    9.9999955339e-01    
+9.9999954248e-01    9.9999952904e-01    9.9999951276e-01    9.9999949439e-01    9.9999947276e-01    
+9.9999944634e-01    9.9999941520e-01    9.9999937840e-01    9.9999933303e-01    9.9999927848e-01    
+9.9999921358e-01    9.9999913270e-01    9.9999903141e-01    9.9999890511e-01    9.9999874285e-01    
+9.9999852799e-01    9.9999823771e-01    9.9999783714e-01    9.9999728111e-01    9.9999695825e-01    
+9.9999999172e-01    9.9999999165e-01    9.9999999157e-01    9.9999999154e-01    9.9999999153e-01    
+9.9999999155e-01    9.9999999156e-01    9.9999999158e-01    9.9999999160e-01    9.9999999161e-01    
+9.9999999162e-01    9.9999999166e-01    9.9999999170e-01    9.9999999173e-01    9.9999999176e-01    
+9.9999999179e-01    9.9999999180e-01    9.9999999182e-01    9.9999999185e-01    9.9999999187e-01    
+9.9999999187e-01    9.9999999187e-01    9.9999999185e-01    9.9999999183e-01    9.9999999183e-01    
+9.9999999185e-01    9.9999999185e-01    9.9999999183e-01    9.9999999180e-01    9.9999999175e-01    
+9.9999999168e-01    9.9999999160e-01    9.9999999151e-01    9.9999999138e-01    9.9999999126e-01    
+9.9999999112e-01    9.9999999093e-01    9.9999999072e-01    9.9999999046e-01    9.9999999015e-01    
+9.9999998977e-01    9.9999998934e-01    9.9999998883e-01    9.9999998821e-01    9.9999998751e-01    
+9.9999998668e-01    9.9999998566e-01    9.9999998444e-01    9.9999998298e-01    9.9999998116e-01    
+9.9999997892e-01    9.9999997619e-01    9.9999997269e-01    9.9999996821e-01    9.9999996244e-01    
+9.9999995479e-01    9.9999994438e-01    9.9999992993e-01    9.9999990964e-01    9.9999988188e-01    
+9.9999986599e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    
+9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    
+9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    
+9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    
+9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    
+9.9999999985e-01    9.9999999985e-01    9.9999999985e-01    9.9999999984e-01    9.9999999984e-01    
+9.9999999984e-01    9.9999999984e-01    9.9999999983e-01    9.9999999983e-01    9.9999999983e-01    
+9.9999999982e-01    9.9999999982e-01    9.9999999981e-01    9.9999999980e-01    9.9999999980e-01    
+9.9999999979e-01    9.9999999977e-01    9.9999999976e-01    9.9999999974e-01    9.9999999972e-01    
+9.9999999970e-01    9.9999999967e-01    9.9999999963e-01    9.9999999959e-01    9.9999999954e-01    
+9.9999999947e-01    9.9999999939e-01    9.9999999928e-01    9.9999999914e-01    9.9999999895e-01    
+9.9999999869e-01    9.9999999834e-01    9.9999999785e-01    9.9999999713e-01    9.9999999611e-01    
+9.9999999478e-01    9.9999999404e-01    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    9.9999999999e-01    9.9999999999e-01    
+9.9999999999e-01    9.9999999999e-01    9.9999999999e-01    9.9999999999e-01    9.9999999999e-01    
+9.9999999999e-01    9.9999999999e-01    9.9999999998e-01    9.9999999998e-01    9.9999999997e-01    
+9.9999999996e-01    9.9999999995e-01    9.9999999994e-01    9.9999999991e-01    9.9999999988e-01    
+9.9999999983e-01    9.9999999976e-01    9.9999999973e-01    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+9.9999999999e-01    9.9999999999e-01    9.9999999999e-01    9.9999999999e-01    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    -3.6851719335e-08   -1.7662898347e-04   -3.5358592943e-04   -5.3022031648e-04   
+-7.0477145657e-04   -8.7689914131e-04   -1.0465473096e-03   -1.2131420499e-03   -1.3761190682e-03   
+-1.5356374677e-03   -1.6904494484e-03   -1.8387247136e-03   -1.9813522097e-03   -2.1189800454e-03   
+-2.2506149333e-03   -2.3763384606e-03   -2.4962614759e-03   -2.6086595772e-03   -2.7127071692e-03   
+-2.8102183051e-03   -2.9014725262e-03   -2.9854685641e-03   -3.0632534199e-03   -3.1331102051e-03   
+-3.1909474747e-03   -3.2383323678e-03   -3.2789460234e-03   -3.3123345687e-03   -3.3381001927e-03   
+-3.3585204514e-03   -3.3722564722e-03   -3.3768342611e-03   -3.3755430781e-03   -3.3685326396e-03   
+-3.3519492397e-03   -3.3280079204e-03   -3.3004018554e-03   -3.2678184004e-03   -3.2298991016e-03   
+-3.1901495350e-03   -3.1475144120e-03   -3.0994562314e-03   -3.0499679626e-03   -2.9999665140e-03   
+-2.9463922364e-03   -2.8916493889e-03   -2.8390402136e-03   -2.7873540786e-03   -2.7369189126e-03   
+-2.6919498845e-03   -2.6522461170e-03   -2.6168882354e-03   -2.5916708060e-03   -2.5802903504e-03   
+-2.5842561329e-03   -2.6108358385e-03   -2.6708635832e-03   -2.7771745184e-03   -2.9487445810e-03   
+-3.2161460327e-03   -3.3785315485e-03   -3.8197380805e-08   -1.3730028802e-05   -2.7451712458e-05   
+-4.1200715804e-05   -5.4895021481e-05   -6.8531401455e-05   -8.2130736939e-05   -9.5678477024e-05   
+-1.0916308549e-04   -1.2262308319e-04   -1.3599380864e-04   -1.4917406326e-04   -1.6225454630e-04   
+-1.7530369023e-04   -1.8827724544e-04   -2.0120935209e-04   -2.1413396396e-04   -2.2694792410e-04   
+-2.3961739070e-04   -2.5230725985e-04   -2.6506389696e-04   -2.7784237332e-04   -2.9076042782e-04   
+-3.0370315226e-04   -3.1636189569e-04   -3.2889370453e-04   -3.4163220359e-04   -3.5456987506e-04   
+-3.6771684049e-04   -3.8133000413e-04   -3.9532175156e-04   -4.0951212383e-04   -4.2428894719e-04   
+-4.3970823657e-04   -4.5543120863e-04   -4.7177618938e-04   -4.8923685655e-04   -5.0776155682e-04   
+-5.2745406002e-04   -5.4894079253e-04   -5.7223419928e-04   -5.9721734101e-04   -6.2478006603e-04   
+-6.5533625286e-04   -6.8877135154e-04   -7.2601965473e-04   -7.6828621610e-04   -8.1603853921e-04   
+-8.7034821729e-04   -9.3350810887e-04   -1.0068329500e-03   -1.0921057191e-03   -1.1938824116e-03   
+-1.3167007286e-03   -1.4658847311e-03   -1.6512356246e-03   -1.8873357551e-03   -2.1949238172e-03   
+-2.6061598706e-03   -3.1731806188e-03   -3.5037258975e-03   -1.3159041720e-09   -4.0624710487e-07   
+-8.1327308669e-07   -1.2217166859e-06   -1.6286850830e-06   -2.0342140310e-06   -2.4396755811e-06   
+-2.8446503117e-06   -3.2489060272e-06   -3.6547242087e-06   -4.0590719374e-06   -4.4571441496e-06   
+-4.8538607978e-06   -5.2528977240e-06   -5.6522639253e-06   -6.0539699341e-06   -6.4599571254e-06   
+-6.8650938000e-06   -7.2678546115e-06   -7.6769375893e-06   -8.0948432197e-06   -8.5194517038e-06   
+-8.9571440496e-06   -9.4018585452e-06   -9.8373322984e-06   -1.0271961661e-05   -1.0723430844e-05   
+-1.1191335009e-05   -1.1676437060e-05   -1.2192892434e-05   -1.2735869358e-05   -1.3295831842e-05   
+-1.3894642020e-05   -1.4535296910e-05   -1.5199148624e-05   -1.5904896878e-05   -1.6681226024e-05   
+-1.7525954110e-05   -1.8446916884e-05   -1.9483324598e-05   -2.0637546618e-05   -2.1906335653e-05   
+-2.3349311854e-05   -2.4996507977e-05   -2.6848368995e-05   -2.8976117677e-05   -3.1471776119e-05   
+-3.4383895372e-05   -3.7813361119e-05   -4.1959109717e-05   -4.6958907011e-05   -5.3019206912e-05   
+-6.0598150632e-05   -7.0198368045e-05   -8.2492966081e-05   -9.8703536044e-05   -1.2075358743e-04   
+-1.5165475124e-04   -1.9650188626e-04   -2.6437687715e-04   -3.0553380841e-04   -3.2957603653e-11   
+-9.3960771806e-09   -1.8840485076e-08   -2.8330469828e-08   -3.7785403204e-08   -4.7209054303e-08   
+-5.6650650134e-08   -6.6099655965e-08   -7.5552523285e-08   -8.5089302457e-08   -9.4611005243e-08   
+-1.0396139216e-07   -1.1330911862e-07   -1.2277896792e-07   -1.3230775858e-07   -1.4196672082e-07   
+-1.5182365832e-07   -1.6170840853e-07   -1.7157383996e-07   -1.8171674723e-07   -1.9222333334e-07   
+-2.0302738136e-07   -2.1435192757e-07   -2.2599080394e-07   -2.3739211432e-07   -2.4885017468e-07   
+-2.6097478510e-07   -2.7375677482e-07   -2.8723589357e-07   -3.0191947625e-07   -3.1764594468e-07   
+-3.3410475473e-07   -3.5209725806e-07   -3.7174207399e-07   -3.9240780515e-07   -4.1482002674e-07   
+-4.4006687309e-07   -4.6813283824e-07   -4.9942138572e-07   -5.3553932947e-07   -5.7670192684e-07   
+-6.2302799804e-07   -6.7714926763e-07   -7.4055488108e-07   -8.1377312325e-07   -9.0044009435e-07   
+-1.0052722292e-06   -1.1315403956e-06   -1.2855543942e-06   -1.4789132225e-06   -1.7212404976e-06   
+-2.0280476909e-06   -2.4305269955e-06   -2.9664151027e-06   -3.6921119446e-06   -4.7107533565e-06   
+-6.1952019494e-06   -8.4423213377e-06   -1.2001610203e-05   -1.7955072440e-05   -2.1710926774e-05   
+-7.1177195956e-13   -1.9086429390e-10   -3.8340618126e-10   -5.7713789944e-10   -7.7015085741e-10   
+-9.6260050695e-10   -1.1558436505e-09   -1.3496558227e-09   -1.5440177122e-09   -1.7411199758e-09   
+-1.9383696163e-09   -2.1317081300e-09   -2.3256983685e-09   -2.5236839734e-09   -2.7240624800e-09   
+-2.9288228669e-09   -3.1398386117e-09   -3.3526288988e-09   -3.5660563004e-09   -3.7881847531e-09   
+-4.0213982554e-09   -4.2641045572e-09   -4.5225505789e-09   -4.7912075325e-09   -5.0552469536e-09   
+-5.3229696631e-09   -5.6112136026e-09   -5.9199810379e-09   -6.2509137548e-09   -6.6187144233e-09   
+-7.0192811077e-09   -7.4448982457e-09   -7.9194007611e-09   -8.4468531107e-09   -9.0106983430e-09   
+-9.6340818318e-09   -1.0350838434e-08   -1.1163343524e-08   -1.2088373315e-08   -1.3180383298e-08   
+-1.4451638081e-08   -1.5916321080e-08   -1.7671260188e-08   -1.9778400988e-08   -2.2278343817e-08   
+-2.5326330247e-08   -2.9126015286e-08   -3.3851191275e-08   -3.9824554379e-08   -4.7615299541e-08   
+-5.7769629353e-08   -7.1219547944e-08   -8.9751575213e-08   -1.1572562939e-07   -1.5299288264e-07   
+-2.0880262765e-07   -2.9614085536e-07   -4.3933233321e-07   -6.8760537245e-07   -1.1480568738e-06   
+-1.4498008358e-06   -1.4000980902e-14   -3.5528009924e-12   -7.1510839265e-12   -1.0776636681e-11   
+-1.4389368602e-11   -1.7994125844e-11   -2.1622831159e-11   -2.5271363856e-11   -2.8940811521e-11   
+-3.2682663321e-11   -3.6438138133e-11   -4.0116267257e-11   -4.3823488027e-11   -4.7637025892e-11   
+-5.1521974980e-11   -5.5526407428e-11   -5.9695206120e-11   -6.3926656068e-11   -6.8197791766e-11   
+-7.2698715115e-11   -7.7487060142e-11   -8.2531281349e-11   -8.7984209826e-11   -9.3718261920e-11   
+-9.9389242821e-11   -1.0520211426e-10   -1.1156267780e-10   -1.1847965952e-10   -1.2600964548e-10   
+-1.3452822824e-10   -1.4394983145e-10   -1.5411718044e-10   -1.6565781181e-10   -1.7869809540e-10   
+-1.9287307918e-10   -2.0884238682e-10   -2.2754680562e-10   -2.4914580184e-10   -2.7424247481e-10   
+-3.0449718234e-10   -3.4044754023e-10   -3.8285841197e-10   -4.3495064061e-10   -4.9903584441e-10   
+-5.7718801363e-10   -6.7537067203e-10   -8.0155205185e-10   -9.6366444051e-10   -1.1762529368e-09   
+-1.4645597517e-09   -1.8557520533e-09   -2.3985566344e-09   -3.1851959871e-09   -4.3474483820e-09   
+-6.1170859360e-09   -8.9495108137e-09   -1.3719092028e-08   -2.2207101201e-08   -3.8355421209e-08   
+-7.1646069557e-08   -9.4263626608e-08   -2.5727469047e-16   -6.1886107982e-14   -1.2483535072e-13   
+-1.8835283659e-13   -2.5167104100e-13   -3.1491790686e-13   -3.7876595617e-13   -4.4314947440e-13   
+-5.0812225651e-13   -5.7477207435e-13   -6.4189812136e-13   -7.0766816467e-13   -7.7431850837e-13   
+-8.4345475438e-13   -9.1439827010e-13   -9.8820011567e-13   -1.0658343675e-12   -1.1452248322e-12   
+-1.2259733072e-12   -1.3121388184e-12   -1.4049914280e-12   -1.5040088598e-12   -1.6125979024e-12   
+-1.7281127830e-12   -1.8433477113e-12   -1.9629243250e-12   -2.0957536650e-12   -2.2422689767e-12   
+-2.4041696325e-12   -2.5902734194e-12   -2.7990951850e-12   -3.0279983426e-12   -3.2922283974e-12   
+-3.5954210758e-12   -3.9306502962e-12   -4.3153637713e-12   -4.7739128064e-12   -5.3130445775e-12   
+-5.9522340131e-12   -6.7387231226e-12   -7.6924735717e-12   -8.8448357270e-12   -1.0295989596e-11   
+-1.2125559456e-11   -1.4420080469e-11   -1.7392022878e-11   -2.1332074314e-11   -2.6565384191e-11   
+-3.3690556306e-11   -4.3748282932e-11   -5.7967064761e-11   -7.8656437854e-11   -1.1022937798e-10   
+-1.5945857698e-10   -2.3909001232e-10   -3.7548721837e-10   -6.2299496906e-10   -1.1018500297e-09   
+-2.1030947278e-09   -4.4013116104e-09   -6.0164408060e-09   -4.4785394282e-18   -1.0210724242e-15   
+-2.0645279648e-15   -3.1189333958e-15   -4.1707041430e-15   -5.2228486770e-15   -6.2883754959e-15   
+-7.3663182571e-15   -8.4583518368e-15   -9.5856863035e-15   -1.0725705767e-14   -1.1844406920e-14   
+-1.2985212754e-14   -1.4178925239e-14   -1.5413366816e-14   -1.6710042888e-14   -1.8088589518e-14   
+-1.9509807588e-14   -2.0967706338e-14   -2.2542997105e-14   -2.4261725493e-14   -2.6116957743e-14   
+-2.8179650171e-14   -3.0399144523e-14   -3.2635961508e-14   -3.4987791488e-14   -3.7637296718e-14   
+-4.0598920800e-14   -4.3919550194e-14   -4.7792838819e-14   -5.2198681256e-14   -5.7104551197e-14   
+-6.2859158014e-14   -6.9560964005e-14   -7.7098766027e-14   -8.5909573155e-14   -9.6591890537e-14   
+-1.0937733311e-13   -1.2484489293e-13   -1.4426992199e-13   -1.6831288950e-13   -1.9807542755e-13   
+-2.3651590146e-13   -2.8620407717e-13   -3.5031835621e-13   -4.3598608863e-13   -5.5322688148e-13   
+-7.1432008303e-13   -9.4220432574e-13   -1.2773211625e-12   -1.7712357378e-12   -2.5254631174e-12   
+-3.7385546820e-12   -5.7361184030e-12   -9.1712623383e-12   -1.5473230548e-11   -2.7808012258e-11   
+-5.3777159461e-11   -1.1351143439e-10   -2.6630533944e-10   -3.7711143377e-10   -7.2734417428e-20   
+-1.6079772691e-17   -3.2598860546e-17   -4.9328648040e-17   -6.6022316823e-17   -8.2746595809e-17   
+-9.9714671866e-17   -1.1698151423e-16   -1.3449457843e-16   -1.5273597937e-16   -1.7130172743e-16   
+-1.8950175998e-16   -2.0824812736e-16   -2.2803872977e-16   -2.4858619438e-16   -2.7050026140e-16   
+-2.9407818696e-16   -3.1839641034e-16   -3.4359454431e-16   -3.7130499735e-16   -4.0190509545e-16   
+-4.3528198881e-16   -4.7287775455e-16   -5.1377429913e-16   -5.5534359921e-16   -5.9989211297e-16   
+-6.5075083799e-16   -7.0784072752e-16   -7.7304870020e-16   -8.5047127596e-16   -9.3963611577e-16   
+-1.0404319903e-15   -1.1604061188e-15   -1.3022374553e-15   -1.4644074895e-15   -1.6575355673e-15   
+-1.8957034793e-15   -2.1856962468e-15   -2.5438891768e-15   -3.0032916962e-15   -3.5838663362e-15   
+-4.3202145243e-15   -5.2958260588e-15   -6.5896738413e-15   -8.3085526457e-15   -1.0678726461e-14   
+-1.4029428657e-14   -1.8794930674e-14   -2.5802720734e-14   -3.6546364412e-14   -5.3061500537e-14   
+-7.9543335312e-14   -1.2446309911e-13   -2.0261186567e-13   -3.4553731593e-13   -6.2650504494e-13   
+-1.2199849997e-12   -2.5803277771e-12   -6.0239233453e-12   -1.5841527698e-11   -2.3170172959e-11   
+-3.1820866957e-21   -2.4297355614e-19   -4.9618806818e-19   -7.6593836828e-19   -1.0286572766e-18   
+-1.2792990819e-18   -1.5206199629e-18   -1.7473571682e-18   -2.0597734075e-18   -2.3968850366e-18   
+-2.6316670227e-18   -2.8979740158e-18   -3.2187507313e-18   -3.5409386598e-18   -3.9036869248e-18   
+-4.1796090924e-18   -4.5109124420e-18   -4.9051976799e-18   -5.4047916381e-18   -5.8984367771e-18   
+-6.3657838474e-18   -7.0086908829e-18   -7.7249974683e-18   -8.4354958583e-18   -9.0767896307e-18   
+-9.8385914911e-18   -1.0895471833e-17   -1.2223387247e-17   -1.3128658023e-17   -1.4587011592e-17   
+-1.6491145325e-17   -1.8317837646e-17   -2.0820304552e-17   -2.3789414580e-17   -2.7302468239e-17   
+-3.1190680443e-17   -3.6007197078e-17   -4.2332217911e-17   -4.9954900812e-17   -6.0565921970e-17   
+-7.4639478303e-17   -9.2318832698e-17   -1.1606200412e-16   -1.4821014073e-16   -1.9273251278e-16   
+-2.5610922675e-16   -3.4851185638e-16   -4.8472225416e-16   -6.9296497962e-16   -1.0259669138e-15   
+-1.5594616581e-15   -2.4585963868e-15   -4.0685118338e-15   -7.0273205814e-15   -1.2783018069e-14   
+-2.4908761732e-14   -5.2553073194e-14   -1.2154320270e-13   -3.1371803872e-13   -9.2411182252e-13   
+-1.3919671141e-12   -4.0509237157e-21   -7.7867009131e-21   -1.9017053766e-20   -2.7522195324e-20   
+-1.1452738201e-20   1.2289703907e-20    1.9558767931e-20    7.7917563055e-21    -3.0816093783e-20   
+-1.9978593150e-20   -5.0336643732e-20   -7.5908948032e-20   -2.3228079958e-21   2.1471051959e-20    
+1.3868218711e-20    1.9133248146e-20    6.1254531370e-20    3.7521453281e-20    -4.0828945002e-22   
+-1.5764668794e-19   -1.9514623219e-19   -1.1505593156e-20   -1.1004211829e-21   -1.5235649174e-19   
+-4.6823876398e-19   -4.8585730572e-19   -3.4778156568e-19   -4.1625167608e-19   -2.7299725134e-19   
+-2.4813652804e-19   -2.8480465921e-19   -3.0146331789e-19   -4.7647338874e-19   -4.5749396282e-19   
+-5.2573077490e-19   -7.2127611476e-19   -8.5753609057e-19   -1.0849541487e-18   -9.1005850011e-19   
+-1.1531804954e-18   -1.5608986093e-18   -1.9276335777e-18   -2.8435266979e-18   -3.6026501489e-18   
+-4.5188295988e-18   -6.0128304334e-18   -8.1247389238e-18   -1.1427211023e-17   -1.7800263805e-17   
+-2.8364486216e-17   -4.4966416848e-17   -7.4335104229e-17   -1.3044891154e-16   -2.3898577723e-16   
+-4.6408950795e-16   -9.7161014678e-16   -2.2195005754e-15   -5.6106843854e-15   -1.5997858443e-14   
+-5.2715473132e-14   -8.1543139306e-14   -4.4702817668e-21   9.7385149013e-21    7.4031525326e-21    
+1.2892389992e-20    3.4933566933e-20    2.7045887114e-20    -1.0002127102e-20   -7.2351871002e-20   
+-3.9386682041e-20   3.5973714399e-20    -3.0860546306e-20   -7.3342557289e-20   -6.1786788831e-20   
+-2.5134347735e-20   2.6105254187e-21    -9.8836309748e-20   -1.2596059713e-19   -9.2419266716e-20   
+-1.5389770879e-20   -7.3713308604e-20   -2.2014741836e-19   -6.8734613820e-20   -2.8616257897e-20   
+-1.5721661989e-19   -1.6069942999e-19   -1.1171857071e-19   -6.8350969893e-20   8.9118943249e-20    
+1.7865196315e-19    1.2607649657e-19    5.0795769565e-20    5.4419748307e-20    3.0812692892e-21    
+-1.7263533289e-19   -4.9071775155e-20   -9.6336703132e-20   -3.1897582627e-19   -2.5807273474e-19   
+-2.5138514303e-19   -2.9972454898e-19   4.2456504964e-20    3.1245908506e-19    1.8738350933e-19    
+9.8859409243e-20    2.4047146267e-19    1.6281964168e-19    -3.9025701822e-19   -3.9678181308e-19   
+-5.8022478318e-19   -1.1197341006e-18   -1.8339888452e-18   -2.9516529141e-18   -4.3422716125e-18   
+-7.9963129066e-18   -1.6477609965e-17   -3.7028838762e-17   -9.1566293044e-17   -2.5302462880e-16   
+-7.9682119568e-16   -2.9320462695e-15   -4.6451755977e-15   -3.3137752264e-21   2.2333285145e-21    
+9.0720107276e-21    2.9418551330e-20    1.6987893376e-20    -1.8648867773e-20   -3.3520079289e-20   
+-6.9670893020e-20   -9.9832294194e-20   -3.3654276867e-20   -1.2406425503e-20   2.8344605418e-20    
+5.5827013221e-20    9.1754139686e-21    3.3118732716e-20    1.6750669985e-20    9.9962187425e-21    
+3.0926712061e-20    -1.4365555425e-19   -9.9201987777e-20   4.8946311031e-20    -2.9641096846e-20   
+-6.9722915221e-20   -2.0594015342e-20   1.1052450631e-19    2.9072259715e-19    2.5902982944e-19    
+-2.5004939698e-21   -1.4302400569e-19   -4.2302087585e-20   1.4824952000e-19    2.2583994126e-19    
+1.5364205172e-19    -1.4709986152e-20   -9.7977172854e-20   5.5725777284e-20    1.7959440661e-19    
+1.3386266808e-19    -7.5112016694e-20   9.2640855121e-20    4.4607709319e-20    -1.9114692173e-19   
+-2.4807479738e-19   -3.6338728121e-19   -2.4763682376e-20   -7.8672384715e-21   -2.4458612094e-19   
+-6.3105163207e-19   -7.9905384128e-19   -1.5180955997e-19   -3.3262211198e-20   -3.4603465028e-19   
+-4.2954684229e-19   -7.3832595140e-19   -7.1113227199e-19   -1.3896108156e-18   -3.7665173531e-18   
+-1.1032840604e-17   -3.8375533262e-17   -1.5838012415e-16   -2.5682632201e-16   5.8806496022e-21    
+-5.1299133408e-21   7.9251424244e-24    -1.2832554615e-21   -4.8556281969e-20   -2.8348225698e-20   
+2.1792539403e-20    4.3529153352e-20    3.0081776822e-20    -2.8939009498e-20   -1.0791055739e-20   
+4.5701920081e-20    5.8837827264e-21    -3.3413804924e-22   8.9084055302e-20    1.6010795428e-19    
+8.2666400530e-20    -8.1695936999e-21   1.4073161632e-20    8.7709673149e-21    -5.0999129544e-21   
+-1.0698235881e-19   -6.3967669608e-21   1.4578850837e-19    1.4569900354e-19    1.0549731785e-19    
+7.9981613872e-20    -1.6691186798e-20   -1.8045798217e-19   -2.7612546266e-20   9.3449061101e-20    
+-3.4546460708e-20   -3.9768653334e-20   1.2274381107e-19    6.8577970985e-20    -9.9350778412e-20   
+1.2962674277e-19    1.6760222579e-19    -9.8739297258e-20   -2.2215540811e-20   -5.7676111795e-21   
+-2.1544088537e-19   -3.2534574000e-19   -4.3539285418e-19   -5.1690957682e-19   -2.2731290354e-19   
+3.5462788670e-19    3.3045977689e-19    -5.4250910170e-20   1.2005156301e-19    5.5697761830e-19    
+6.5501158096e-19    4.4360611258e-19    1.3544357863e-19    -1.3215875213e-20   8.8859365667e-20    
+-7.9401646306e-20   -8.4904582077e-19   -2.5553390554e-18   -8.5072999603e-18   -1.3328960480e-17   
+6.9488265773e-21    -1.4194857711e-21   -3.1108474235e-21   -8.4041832014e-21   -2.5951794487e-21   
+-3.2303227698e-21   -1.6496206582e-20   2.7299834402e-20    6.3588784068e-20    2.2708267933e-20    
+7.1084235537e-21    -2.5526455059e-20   -1.2130130693e-19   -1.1294456910e-19   -8.6998140418e-20   
+-6.1167028676e-20   8.9777592134e-21    -1.3192163527e-20   6.0001158872e-22    3.8401360596e-20    
+-9.1534263877e-20   -1.4313249496e-19   -9.6335638357e-20   -4.4395928340e-20   1.3078881404e-19    
+-7.2196571549e-21   -1.6993113588e-19   8.9665720929e-21    8.8625894533e-20    3.5924569928e-20    
+-2.2198885395e-19   -3.1826987065e-19   -1.5284217937e-19   3.4633974442e-20    2.2189150031e-19    
+4.9630447700e-20    -7.4085574678e-20   1.2542887292e-19    1.4488482331e-19    -8.1331908212e-20   
+1.0978827182e-19    4.8792888546e-19    5.7989491791e-19    5.6899099443e-19    3.1503092242e-19    
+2.3947564845e-19    -6.4196374663e-20   6.5284340978e-23    6.8079821470e-19    3.6526177821e-19    
+4.2332638502e-20    9.8080725526e-20    2.3080208124e-19    7.0350921247e-19    3.9720854236e-19    
+-2.6296965496e-19   -1.0808941356e-19   5.4606491786e-20    -4.1859793577e-19   -4.5088668840e-19   
+-1.3570810686e-19   7.8361903153e-22    4.6495393648e-21    8.2060785984e-21    4.9539973087e-21    
+4.5919788462e-20    4.2675690867e-20    1.1687893485e-20    1.9099926089e-20    1.0106387036e-20    
+-4.1802881612e-20   -3.9015322561e-20   1.4181885483e-20    7.5111217590e-20    6.3795974936e-20    
+-1.5987772531e-20   -4.8913824685e-20   1.4373838082e-20    1.6550030666e-20    -5.8485766510e-20   
+5.1080868615e-20    4.7928258671e-20    5.0881179028e-20    4.8200334654e-20    -1.6805880916e-20   
+-9.6883916789e-20   -4.2941251385e-20   1.1541800412e-19    1.4389230788e-19    2.2542217444e-20    
+-8.1804677058e-20   -3.2443709533e-20   1.3787071182e-20    1.7553568211e-20    1.2978745614e-19    
+1.4387163699e-19    1.9129207010e-19    2.4784718031e-19    1.8293150969e-19    2.9006209346e-20    
+-8.1921333699e-20   -1.3467420457e-19   -5.5976550378e-21   3.2448201542e-19    4.5449641916e-19    
+4.6237064873e-19    8.9782504261e-20    -3.2928313597e-19   -4.3262174441e-19   -5.3671386561e-22   
+1.5130034333e-19    -6.6755793609e-20   -9.1930893634e-20   -3.7624635125e-19   -2.3099172510e-19   
+2.1934292695e-21    -4.3296242580e-19   -1.3521370537e-19   1.2702589473e-19    3.8366922799e-19    
+4.9749961709e-19    2.9292605538e-20    -6.4661462019e-23   1.1783255080e-22    -6.2348970613e-22   
+-7.3933897913e-21   -5.3679214536e-21   2.8985343665e-20    2.6880047320e-20    -1.6970478364e-20   
+6.4222708013e-21    -2.0688392800e-20   -4.2530401556e-20   -2.0780743551e-20   -1.2991065549e-20   
+-1.7322212827e-20   -6.8292806868e-20   -3.0851822451e-20   -4.1367621051e-20   5.5372742098e-21    
+1.4332890634e-19    4.6716308270e-20    1.6959220024e-20    9.2429327637e-20    8.3177316015e-20    
+5.5952673081e-20    -8.3049845529e-20   -7.4537258826e-20   7.0608900507e-20    1.7112370666e-19    
+-3.6610038837e-20   -1.9292999015e-19   9.2124310059e-20    9.4409109155e-20    1.3903623303e-19    
+2.7517528069e-19    -2.0320003096e-19   -1.2073287088e-19   5.9903307830e-20    -1.8247372359e-19   
+-2.0273697618e-19   -1.2456621709e-19   8.8596591617e-20    -7.7432806930e-20   -3.3853076788e-19   
+-2.9262310882e-19   -1.8133639297e-19   -1.6381773609e-19   2.3257461441e-19    1.8797381007e-19    
+-2.2833426426e-19   -8.0005386910e-21   -4.8345151411e-20   -6.4234031763e-21   -5.9821850507e-20   
+-7.5087509562e-19   -6.0185203350e-19   4.9004453793e-19    3.2842319080e-19    -1.7347599100e-19   
+5.6659193689e-20    -1.2944758779e-19   -2.9767901295e-19   -1.8248654752e-21   2.1331886458e-21    
+-6.7847289415e-21   1.1713062733e-21    9.8843311446e-21    4.5670967813e-21    -1.3669755862e-20   
+-6.1488694285e-20   -2.2822248522e-20   4.8775717532e-20    2.7625524942e-20    -4.2560320848e-20   
+-2.1669448153e-20   -3.8657750183e-20   -1.0210253421e-19   6.5137310513e-20    4.4712018879e-20    
+-3.7998609165e-20   1.6825673168e-20    -7.4161730147e-20   8.8230872084e-20    6.8806585090e-20    
+-1.0082318138e-19   -4.1406804685e-20   -2.3071262558e-21   -3.7107212221e-20   -1.1976045417e-19   
+3.9369736929e-20    2.5272281213e-19    1.3233687525e-19    -7.8375240367e-20   2.3076448325e-20    
+3.9760992622e-19    1.9503966496e-19    -1.6706836742e-19   -2.0683965054e-19   -3.7598650061e-19   
+-2.0225318798e-19   8.8894143725e-20    7.6906966063e-20    2.8652087074e-19    2.3391428849e-19    
+-1.1719006068e-19   2.3979465740e-20    -1.0898117628e-19   -2.1541428941e-19   9.4091455169e-20    
+3.1437859904e-19    4.2298425969e-19    3.2852396841e-19    -9.7465493609e-20   -5.2452267839e-19   
+5.4542309584e-21    4.4689060644e-20    -1.3585659683e-19   3.0738076659e-19    -1.5643842253e-19   
+-3.3938228275e-21   1.2100949099e-19    -5.5728667411e-19   -7.1707149167e-19   -5.1947672129e-21   
+-1.4929049264e-22   6.8629068557e-22    3.0723748122e-21    3.0785363214e-21    -1.2877567544e-20   
+-7.2638094595e-20   -7.3607534403e-20   -3.5847647216e-20   1.4832901035e-20    4.4471411137e-20    
+-1.1945132751e-20   6.4107770704e-20    1.1337057206e-19    6.3769497515e-20    -3.4714293349e-20   
+-1.0558746927e-19   -1.4237629263e-19   -8.5303261858e-20   -4.0410936105e-20   -5.5857431072e-20   
+-4.7076166524e-20   -2.1164849363e-20   1.8447894975e-20    -3.6363300459e-20   5.3272066840e-20    
+1.2023808320e-20    -1.4270280337e-19   7.3529855824e-20    2.9403736062e-19    2.1643913662e-19    
+3.2773473401e-19    1.8996785984e-19    -1.6658031541e-19   1.1690782362e-19    3.4423685754e-20    
+9.7721680509e-20    2.0101421326e-19    -1.5898150824e-19   -1.5811077685e-20   -7.6206631848e-20   
+-3.0544798399e-19   3.7584131226e-20    1.8017667619e-19    -6.0829741641e-20   -1.7499544419e-19   
+-1.1248764651e-19   1.1399166254e-20    4.3636645782e-21    4.8296234424e-20    2.4286677036e-19    
+-1.6279428824e-19   -4.3714340101e-20   6.9122271575e-19    5.0764349276e-19    -2.2237882343e-19   
+-3.1718704408e-19   -4.8330497605e-20   -4.9784499839e-20   1.8295621568e-19    2.4238362301e-19    
+-6.1328889723e-21   -1.0218465231e-20   -3.5193618090e-21   -5.0463387977e-21   -1.8966139874e-20   
+-3.1429913967e-20   -3.0347177720e-20   1.2258872295e-20    -8.9870649530e-22   6.2879030859e-21    
+3.4386005712e-20    3.3060066089e-20    -3.0809647620e-20   1.2833555131e-21    1.0521058869e-19    
+-6.9197622550e-20   -1.0749092251e-19   2.0119136938e-20    2.0697103970e-20    2.8194667430e-20    
+-5.6609160354e-20   -8.5379033196e-21   5.4637214025e-20    1.3418160783e-19    1.5380170524e-19    
+1.6697110027e-21    -9.6254033080e-20   -2.5451690651e-19   -2.9610994261e-19   -7.7470999355e-20   
+9.9277421007e-20    -3.7132383925e-20   -4.4607164168e-19   -2.6170637440e-19   1.6207493719e-19    
+7.3950949974e-20    4.7384239004e-20    -6.8862888231e-20   3.8209772684e-20    1.4916632091e-19    
+-2.1657428033e-19   -2.2282013869e-19   3.9040191404e-20    -2.2946700047e-19   -1.9533300950e-19   
+-1.0119899427e-19   -1.5412366330e-20   4.0529280762e-21    -2.6146228723e-19   1.1609334627e-20    
+2.1518300790e-19    2.6045412421e-19    5.7074751587e-20    -9.3977610644e-20   9.6692179336e-21    
+3.1033569456e-19    9.1219420624e-20    -2.9971669994e-19   -2.2668198033e-20   5.4666181199e-19    
+9.8803275169e-19    7.4918543100e-21    6.8420894589e-21    -3.5441936361e-21   1.0147443136e-20    
+2.2118095320e-20    1.3189928656e-20    5.2006069856e-20    7.0623045860e-20    2.6721043344e-20    
+1.2927567035e-20    -4.4646064564e-20   -5.0550274189e-20   -4.1316560913e-20   -3.0695912853e-20   
+8.7551406055e-20    9.1399876077e-20    6.6790415241e-21    9.1491882203e-20    -4.3172294177e-21   
+1.0521979868e-20    2.6953809284e-20    -4.0936369723e-20   9.7112893693e-20    1.1021635831e-19    
+1.5395656233e-19    1.9869192972e-20    -1.2824426764e-20   -5.7084801095e-21   -1.5895779098e-19   
+-1.8630493346e-19   -1.4493483946e-19   -3.4534804070e-19   -4.7544540529e-19   -2.5933372610e-19   
+-7.8098765665e-20   3.7543065659e-20    -2.1624078199e-19   6.4766913788e-20    5.6424164834e-19    
+1.4925584062e-19    -4.7384405146e-21   2.2142068171e-19    2.3557393654e-19    1.7081367219e-19    
+2.7173757635e-19    1.8199268438e-19    -2.8978666173e-19   -2.3362635834e-19   2.8687045587e-20    
+-2.8425934640e-19   -4.4581932926e-19   1.8067281959e-19    1.6281648816e-19    -4.2529972143e-19   
+-3.0661123710e-19   2.5987488097e-19    2.7141064700e-19    2.4660576607e-19    3.5636913292e-19    
+-2.0961079398e-19   -5.2334288333e-19   1.2293402933e-20    1.1001692468e-20    -8.2757460968e-21   
+6.7851227128e-21    -8.9847454729e-21   -3.3233957486e-20   -3.8878802352e-20   7.8513194354e-21    
+8.9089098366e-20    3.5393901673e-20    7.0029993026e-21    2.2049458360e-21    4.1078734736e-20    
+8.6102882336e-21    -1.5065293519e-19   -5.7831083916e-20   3.0200723757e-20    -1.8336828012e-20   
+-7.8367536055e-20   -3.3811693276e-20   3.6325888470e-20    6.3498904867e-20    1.8702631824e-19    
+5.9698643592e-20    -7.5500640069e-20   -3.9985110703e-20   1.6968622709e-19    2.3015698372e-19    
+4.4407263243e-20    -1.5364384890e-20   -3.1225484044e-20   -3.7283984868e-20   -6.3701439258e-20   
+-8.2939607130e-20   -5.4263547816e-20   5.9146597190e-20    1.1468578471e-19    -4.3809649942e-20   
+-2.5763127461e-19   -8.9989959057e-20   1.2999830828e-19    6.7799118986e-20    -6.6128440266e-20   
+-2.1310973917e-19   3.1738676560e-20    4.3694552511e-19    -1.6901519223e-20   -3.3013396270e-19   
+-9.8314767516e-20   -3.1589028102e-19   -2.4593278114e-19   1.7460131246e-19    9.0917550875e-20    
+2.2765725923e-19    9.3094639556e-20    -1.0954826653e-19   -4.2120758253e-20   2.2002280609e-19    
+1.4299384979e-19    -3.1629498074e-19   -2.1834927565e-19   -1.1956847984e-20   -1.2421407858e-20   
+-1.4449669337e-20   -1.2380167473e-20   -3.1517725809e-20   -1.9011420724e-20   7.3417708630e-21    
+1.9797000192e-20    -1.3926067157e-20   -5.1918381577e-20   1.2380979655e-20    7.3376179088e-20    
+9.2120988262e-20    4.6032827126e-20    -7.1309770258e-20   -4.6469554014e-20   5.5286461002e-20    
+4.1985358631e-22    -3.1911444107e-20   5.3931572226e-20    2.4030524889e-19    1.0803915738e-19    
+-2.2081579873e-19   -2.6590858823e-19   -2.3414352829e-19   -1.4145625400e-19   -1.6293819191e-19   
+-9.2476189265e-20   1.3428905661e-20    -3.1208256576e-20   -4.2790054532e-23   1.9926286959e-19    
+3.5761291288e-19    1.0440019952e-19    -1.1485375804e-19   -1.8746148629e-20   3.2676618207e-19    
+-7.4730861621e-20   -3.6791147590e-19   3.9163435564e-20    -2.7072122734e-19   -1.9396352557e-19   
+-3.1133715779e-19   -6.8150999951e-19   -5.1094214578e-19   -1.0650536345e-19   2.7895823496e-19    
+1.8699323116e-19    1.0797024550e-19    2.1515805841e-19    2.8543952755e-19    -1.9564708205e-19   
+-3.1794922870e-19   1.0884275674e-19    7.0965268258e-20    8.3587213323e-20    1.9955866698e-20    
+-9.9132991745e-20   -1.7349321658e-19   -1.6295659060e-19   1.9889245932e-20    -2.8405730844e-21   
+-1.5165844716e-20   6.1274614875e-21    -9.0859823267e-21   4.5026796991e-21    3.8872309295e-20    
+7.2708063262e-20    -1.6607352002e-21   -1.1848911938e-19   -5.2190098580e-20   -1.1056772850e-20   
+-1.1814018172e-22   -6.5801069052e-20   5.1068753126e-21    1.6228831058e-19    9.0361340695e-20    
+7.8438156977e-20    3.5013839540e-20    -2.3823093131e-20   8.5424251487e-21    2.1094148795e-20    
+-1.1008273388e-19   -2.0516822501e-19   -1.8450444050e-19   -1.8676141245e-19   3.0902528866e-21    
+-1.1016086800e-19   -1.9732420082e-19   -3.2721047198e-21   -7.8109445776e-20   -2.1350501145e-20   
+1.6360571003e-19    2.8876345053e-19    9.0824276167e-20    -4.7354086547e-21   -8.3593266817e-20   
+-1.4250685267e-19   2.5578327134e-19    3.6670443852e-19    3.0990198337e-19    1.2954512025e-19    
+-1.0974382516e-19   2.3049669804e-20    3.3130140255e-19    4.7805929725e-20    -2.1045107677e-19   
+1.1005454410e-19    2.7339777053e-19    2.8138618209e-19    5.2451916457e-20    -9.4823549934e-20   
+-1.0927469891e-19   -2.8455976897e-20   -2.5530359073e-20   1.0312116666e-19    7.1881928724e-20    
+9.6879652701e-20    -1.2117203615e-19   -3.9140794373e-19   -3.0461571729e-19   -5.0790395898e-19   
+2.2074212984e-21    7.5428215706e-21    2.7807283203e-20    7.8572820201e-22    2.1491361239e-20    
+1.5857465855e-20    -4.2014723006e-20   -6.8246766131e-20   -5.7322053095e-20   8.1069007366e-21    
+2.3076713507e-20    -2.3047090030e-20   -1.3236920402e-19   -1.8418007934e-19   -1.1538801905e-19   
+-6.3245489017e-20   6.1259401802e-21    3.7933911720e-20    1.1811586436e-20    -8.3672516344e-20   
+-1.6829126291e-19   -1.2426352899e-19   3.9129394765e-20    1.0932184932e-19    7.7439679949e-20    
+1.6082479445e-19    2.2670562200e-19    1.5504728282e-19    2.0782713711e-19    6.1562112546e-20    
+-2.0527825594e-19   -9.7247435616e-20   -4.5559494438e-20   1.7400146773e-19    3.3263552051e-19    
+1.5966915497e-19    -2.3868671004e-19   -2.7225974832e-20   2.2576913033e-19    2.7301697989e-20    
+3.6762813747e-19    1.8626184600e-19    2.2486386995e-19    6.0146149950e-19    2.5790302860e-19    
+-1.1859652426e-19   -2.7817874152e-20   9.3181625492e-20    -1.7127094069e-20   1.1903262179e-19    
+1.6223073738e-19    2.7542631208e-19    3.1802215988e-19    1.6225958245e-20    1.3042331945e-19    
+-2.2409871721e-19   -3.5254545361e-19   7.6164657125e-20    1.0937284260e-19    -4.4642499271e-20   
+-2.5368540267e-19   -2.5965007550e-20   1.4785979644e-20    1.8691338267e-20    1.3686890865e-20    
+1.0622564417e-20    -2.6915558774e-21   -4.7963128948e-20   -2.7255785875e-20   4.6514900174e-20    
+2.0266357241e-20    -4.9245042368e-20   2.1116427987e-21    8.8589397704e-20    -3.9007540216e-20   
+-6.1142773102e-20   3.1835988099e-20    2.4319562574e-20    9.8667822630e-20    1.4973931605e-19    
+8.2479724660e-21    -1.5765830905e-19   -7.0776985304e-20   4.5785314786e-20    9.6710084766e-20    
+2.1170154152e-19    -1.6579878437e-23   -6.4270142026e-20   1.3275948001e-20    -8.3797988328e-20   
+6.7970962269e-20    5.9867208995e-20    -1.7837427791e-19   -1.4101374735e-19   1.0835809684e-19    
+-4.7377267836e-20   9.6998605595e-20    1.3494628448e-19    -3.6649675373e-19   -1.5140237028e-19   
+-1.9540062277e-19   -3.3448865823e-19   4.1831521120e-20    9.8297643682e-20    -1.3261953878e-20   
+-2.8465879099e-20   -1.5488025409e-19   -1.7513074549e-19   4.6266087297e-20    -7.6733696494e-20   
+4.3766997303e-20    1.0702806232e-19    -2.1376159404e-19   -3.4925142480e-20   3.5565191130e-20    
+-3.0246200780e-19   -4.9234769499e-19   -1.8761566982e-19   1.8508082066e-19    5.6719440373e-19    
+2.0235629017e-19    -4.9219013255e-19   -5.7726369300e-21   -2.0872599861e-21   -1.0988525511e-20   
+4.5804854981e-21    -6.0690900152e-21   -1.0386320597e-20   1.5048440066e-20    6.4645423777e-20    
+8.8479571502e-20    -1.4545210845e-21   -5.4313046576e-21   5.4624041402e-20    1.1141574865e-19    
+1.2855661985e-19    5.4453542165e-20    1.1935091588e-19    7.3913308839e-20    -2.2914078811e-20   
+5.6411851589e-20    8.1004411339e-20    3.8229131708e-20    1.2282466860e-19    1.8459815893e-19    
+2.0726598922e-20    -2.5569808202e-20   -7.9486517373e-20   -1.2611383686e-19   1.4079616302e-20    
+1.9891675259e-20    8.0344643349e-20    1.7991190483e-19    -3.8675476055e-20   -4.2713450451e-20   
+-1.5116406674e-20   -1.7941896028e-19   -2.4081911934e-19   5.7350491414e-21    5.5061983961e-21    
+-8.9819307622e-20   -2.6017407134e-19   -6.3031545425e-19   -2.4644909030e-19   -1.0991645043e-19   
+-2.2799130979e-19   5.1635150741e-20    2.8769850511e-19    -4.7216144927e-20   -3.3823762672e-19   
+-1.2799329587e-19   -2.1153937556e-19   -2.4559848929e-19   -1.3471683947e-19   -3.1067472488e-19   
+-3.9574420086e-20   3.5743952432e-20    6.0694233234e-20    3.1313931574e-19    -3.9991822117e-20   
+1.2602184544e-19    3.0786912774e-19    6.9389107938e-20    1.1529443820e-20    -2.6608025100e-21   
+-6.9967943974e-21   -2.2760812347e-20   7.8820301371e-21    2.0386290342e-20    -4.4053924253e-21   
+-1.3401975892e-20   5.1974768917e-20    9.4498457920e-20    7.0268992523e-20    -8.7108138920e-22   
+-4.6643206397e-20   -1.4738648911e-20   -4.1906448881e-20   -7.6816925759e-20   -9.8284932743e-20   
+-6.3338891463e-20   -4.0318655214e-20   -6.2720521365e-20   6.2290117319e-20    9.1813645576e-20    
+-1.1338283594e-21   -3.7683538449e-21   -1.5070591770e-19   -8.9045198282e-20   8.6190243508e-20    
+1.8693521999e-19    2.5159946355e-19    5.4108633168e-20    2.1598576677e-20    1.9959797855e-19    
+1.6950663852e-19    2.3842777651e-20    1.4428697722e-19    -1.6763315011e-20   -2.5384317486e-20   
+3.7499972402e-19    1.1366646053e-19    -1.5299003935e-19   -1.0379621144e-19   8.5620791042e-21    
+-8.9655276524e-20   -2.2061377214e-19   -2.2313160462e-19   -4.8434514012e-20   3.9935081044e-20    
+-3.3222279147e-19   -2.5963860331e-19   -9.1460734290e-20   5.9181222256e-20    1.7739010956e-19    
+-4.0563185650e-19   -5.1961897058e-19   6.8867626709e-20    3.8654706853e-19    1.8776632548e-19    
+-1.5216187612e-19   4.7090161564e-20    3.4807618654e-19    3.9942531225e-19    -8.5426616264e-21   
+1.1129655756e-20    6.9680299529e-21    2.4120342670e-20    6.6166408995e-21    7.8813756342e-22    
+2.9869411219e-20    3.6807065458e-20    5.9542830170e-20    2.7658213823e-20    -2.8053694652e-20   
+1.8509400132e-21    3.6717597220e-20    9.6901036138e-20    1.6426039496e-19    -1.1165287526e-21   
+-1.0493591956e-19   -5.4420932826e-20   -9.7797454754e-20   -1.4163054345e-19   -1.0868683372e-19   
+-4.1924119660e-20   -5.9590002603e-20   8.0162781993e-21    -2.6311216820e-20   3.1791512692e-20    
+1.6964977659e-19    2.8118770512e-21    -3.9736582899e-20   -1.8641061879e-20   -1.7984460218e-20   
+2.3659722802e-20    -1.0178373461e-19   -1.3645197428e-19   -5.4727485580e-20   -4.4673485944e-20   
+3.0131367193e-20    1.0489710990e-19    8.5229994597e-20    3.5598495029e-19    6.6284599497e-19    
+3.3172741851e-19    1.4726242470e-19    1.3384810225e-19    -1.6599308241e-19   -1.7651828749e-19   
+1.1837092644e-20    9.6103551919e-20    -6.7455125223e-21   1.9758506034e-20    -3.6250530370e-21   
+2.2331159784e-21    8.2358911405e-20    -2.3926660329e-19   -5.0249445980e-20   2.8304671605e-19    
+1.6009440476e-19    4.3529566146e-21    -6.7755387594e-20   -1.6876204947e-19   -2.8815542171e-19   
+1.5800109420e-20    2.6886883693e-20    -3.2485569438e-21   2.2017511410e-20    -2.8689948630e-20   
+-3.5159881639e-20   2.6235932072e-20    7.4784898764e-20    1.0652434486e-21    -8.9127387757e-20   
+-5.6816034257e-20   -2.7652771949e-20   5.8868017728e-20    1.4747474897e-19    1.1031323564e-19    
+5.6311049670e-20    3.5678002070e-20    -4.0854019145e-20   -8.6663144470e-20   8.0271063295e-20    
+1.0447005081e-19    -4.5485943832e-20   -6.6817731297e-20   -1.3010650984e-19   1.0037145120e-20    
+1.8952761274e-19    3.5542145096e-20    -1.8859189575e-19   -1.7112177310e-19   -4.2325441834e-20   
+-1.6387327545e-19   -1.1588817031e-19   7.1256286081e-20    3.8611839070e-20    -4.3306949308e-20   
+9.0038456405e-20    1.1288471724e-19    -1.9239357637e-20   6.8122278415e-20    2.4643707813e-19    
+3.5105192781e-19    -8.0135443046e-20   -8.8537933161e-20   1.6175865024e-19    2.8280764624e-19    
+3.6840038228e-19    2.3213392852e-19    3.1055961722e-19    3.6884321232e-19    3.0785916081e-19    
+3.9361214022e-20    1.0920316576e-19    3.0583992249e-19    3.7257964402e-20    -5.3538067184e-20   
+9.3206422760e-21    2.5656469896e-20    1.2711880219e-19    -3.0081742330e-19   -3.9163417850e-19   
+-3.6692670024e-20   1.0791154547e-20    -3.5941404642e-20   -1.3840947685e-20   -3.8482172360e-20   
+-2.9660888767e-20   7.2351975444e-21    -1.3985192076e-20   -7.8109695883e-20   -9.9138187091e-20   
+1.1054906159e-20    4.8255281093e-20    -4.6160580966e-20   -1.0242096862e-19   -1.1350002903e-19   
+-1.6675749790e-19   -1.0244604888e-19   -4.7546076634e-20   -9.3338771706e-20   -1.0680562912e-20   
+1.6990791628e-19    1.1747912914e-19    -7.4364006673e-21   -6.5997571855e-21   -3.5427376886e-21   
+4.6794030538e-20    -6.2883553015e-21   -4.8996068969e-20   1.3828034441e-21    -5.8032666212e-20   
+-1.8226476500e-20   2.6834867879e-21    1.1382956541e-19    3.5143216580e-19    1.6337982091e-19    
+1.0741534353e-19    9.2372800498e-20    -1.9793767129e-19   -1.5671485890e-19   -1.1918106887e-19   
+-1.9012470315e-19   -8.3214414211e-20   -1.1621051887e-19   -2.2887605571e-19   -1.8273089625e-19   
+1.7080747082e-19    1.4096497767e-19    -1.2964012777e-19   4.8294870705e-20    1.4149069783e-19    
+1.1751304805e-19    1.3425506989e-19    -4.3250539612e-20   -6.2674474295e-20   -4.8374203108e-20   
+-1.9257459473e-19   -2.6469610574e-19   -2.0125513679e-19   -2.5250036265e-20   -2.7495430196e-19   
+-1.1362578850e-19   3.3154191626e-19    -3.2336680666e-20   -3.9639581660e-20   3.4083133995e-22    
+-2.2379107063e-20   -1.3089894202e-21   3.0399808268e-20    -2.1421554591e-20   -7.1254746829e-20   
+-7.6033145394e-21   2.5782308147e-20    -4.0578415252e-20   -1.5606442174e-20   -3.7009148597e-20   
+-1.3408724661e-19   -1.5865320228e-19   -1.2855673790e-19   -9.4144256800e-20   -1.2953388377e-20   
+3.4438096140e-20    -2.8398248129e-20   -4.1217412897e-20   4.3082097643e-20    1.2734929104e-19    
+1.4877849004e-19    3.5766159393e-21    -1.7767707919e-19   3.7640601699e-20    1.9745884937e-19    
+6.6182686531e-20    -4.3188355778e-20   -1.1176995713e-20   -1.0957208884e-19   -2.0892685052e-19   
+-2.3557386281e-19   -3.1302232483e-19   -1.8371152877e-19   -6.5929280801e-20   -1.8953105231e-19   
+-3.0690617078e-19   -2.8143575076e-19   -2.4120112280e-19   5.2805541227e-20    4.4180869096e-20    
+-5.6587340093e-20   4.3332586248e-20    -1.0183114632e-19   -9.8925343589e-20   3.6037558485e-20    
+-3.2452781657e-20   -2.0140969518e-19   -2.7860297478e-19   -2.4668313247e-19   1.0622493700e-19    
+2.9877208006e-19    1.6142935058e-19    -5.0934294553e-20   -2.3103828775e-19   -4.4282414338e-20   
+6.8642387391e-20    3.0723824787e-20    5.4573207671e-20    -1.8541988049e-20   1.0325048782e-20    
+1.7868210271e-20    -1.1987293122e-21   1.2940495764e-20    -2.5642091843e-21   -4.5377126988e-20   
+-5.0035609891e-21   1.0406595660e-20    -2.6471306843e-20   -1.0971901560e-19   -7.9597737093e-20   
+5.6524489892e-20    3.5972577006e-20    2.5717743850e-20    3.5424672448e-20    1.5278937698e-19    
+3.0039898574e-19    1.5676516273e-19    -2.1687300612e-20   -5.3239573239e-20   -1.2915866009e-19   
+-5.1559153673e-20   3.2874908083e-20    4.7606692354e-20    3.7824875929e-20    -6.8609453653e-20   
+-7.7043274669e-20   -4.3886687072e-20   -4.4920994747e-20   -7.7319388579e-20   -1.3315024575e-19   
+-1.4160994457e-19   -2.1900900413e-19   -2.4670983808e-19   6.8043260920e-20    1.9395850831e-19    
+-1.6526237956e-20   7.3721826062e-20    1.7473611456e-19    -1.3958367357e-19   -1.7972484186e-19   
+5.3189370434e-20    1.1499946639e-19    -1.9445292516e-19   -2.0433449554e-19   1.4457551840e-19    
+6.4708519912e-21    1.8879451417e-19    8.7121012771e-20    -1.8490107256e-19   -5.4827286473e-20   
+-7.7318634038e-23   1.1219105017e-19    1.8786783310e-20    7.7227565275e-20    -1.3282137977e-20   
+-1.5438422776e-19   2.0537885425e-19    4.1057997595e-19    3.5361512879e-19    8.3271792997e-21    
+1.2389225640e-20    4.4763080456e-21    1.8728785477e-20    1.4243115491e-20    -6.4086898271e-21   
+7.6616963425e-21    4.5085969689e-20    -5.1926541239e-20   -6.1561702774e-20   -1.7409682086e-21   
+-3.5309051201e-20   -2.8365975154e-20   3.5432068052e-20    3.4985448931e-20    2.5876430689e-20    
+1.6786442159e-20    -5.5656711320e-20   2.8439035102e-20    3.9408982987e-20    -5.3520694715e-20   
+-2.1692787346e-20   1.8208986170e-20    -2.7282795468e-20   2.3243474989e-20    1.2191843709e-19    
+-9.8860169930e-20   -8.5915716192e-20   3.1798231278e-20    -2.7872323563e-20   8.0548387634e-20    
+1.9685113160e-19    1.2764728597e-19    5.8595647703e-20    2.0135699206e-19    3.1050400978e-20    
+-5.2941493683e-20   2.3087152300e-19    2.3552388891e-19    -8.0558432028e-21   -7.6817309496e-20   
+-2.5535794121e-20   1.0996255511e-19    1.3968061536e-19    -1.0396085379e-19   -2.5177584991e-19   
+-2.0220658820e-19   -1.5291429139e-19   -1.3890771182e-19   -9.8908282986e-20   1.5159055934e-19    
+1.9303105861e-19    -1.4875431623e-19   -1.8822768237e-19   -1.7396800354e-19   -9.8528664362e-20   
+1.8454059518e-19    -2.0910271810e-19   -7.7951639346e-20   3.5121147499e-19    1.2949381785e-19    
+2.5775902584e-20    1.7687281074e-20    -3.3041770942e-20   1.6190052484e-20    9.4246505648e-21    
+2.7196361812e-20    6.5001731995e-20    1.1124933194e-20    -1.1640839863e-20   3.4473937252e-20    
+1.0220057468e-19    8.6518534747e-20    -2.3368139789e-20   -4.6706007052e-20   -1.3030242760e-20   
+6.7675774997e-20    -5.5592077371e-20   -1.4530906618e-19   -3.5459317568e-20   -5.1768438263e-20   
+2.4534757243e-20    1.7722552647e-19    5.1985690152e-20    -8.3225520542e-20   -6.3835731096e-20   
+-9.6712663542e-20   2.0396162703e-21    5.8757595329e-20    -1.4643865940e-20   -3.1610046391e-20   
+4.9156711743e-20    1.1894983251e-19    3.9077265448e-20    2.3757276821e-19    1.2654480216e-19    
+-6.1290618164e-20   1.3479223924e-19    1.7502964796e-20    -1.4894452093e-19   -2.7254328421e-19   
+-5.5992602477e-20   3.1134639564e-19    4.4402315253e-20    -3.8777355402e-20   3.3343948897e-19    
+2.3883692234e-19    5.5417838353e-20    3.5525898007e-21    -2.7127094543e-19   -1.8844166679e-19   
+5.6366372398e-20    7.8982675765e-20    1.4007090732e-19    5.8670086932e-20    -9.1314191041e-20   
+-2.5245691549e-19   -1.2163260320e-19   -1.0558946404e-19   -3.0063448573e-20   -1.4448525744e-19   
+-5.6283174725e-19   1.6089160984e-20    -2.9428719144e-20   9.9250819140e-21    5.1040692100e-20    
+2.4885332038e-20    9.8034651687e-21    1.9324784901e-20    -4.8420711190e-20   2.7172788025e-21    
+5.7613548086e-20    2.7324423899e-20    4.7484294849e-20    6.2094340854e-20    3.3555951060e-20    
+6.9504646654e-20    6.5125579166e-20    4.6902695480e-20    8.6149529349e-20    -5.2559506629e-20   
+-2.7612981331e-20   8.3937363700e-20    -6.4151942824e-20   -1.7815607991e-19   -8.2972642757e-20   
+-5.5410149838e-20   5.3670076665e-20    1.5480035777e-19    2.0013874471e-20    8.4786139784e-20    
+1.9349106265e-19    -4.1755572076e-21   -3.6960995869e-20   4.0440970394e-20    -1.2285098911e-19   
+-1.7098180567e-19   6.2927994171e-20    -4.1595660669e-20   -2.4644591360e-19   1.0546435980e-19    
+2.5371494649e-19    1.8780162136e-19    2.2583542414e-19    -5.4880945096e-20   -2.2382059044e-19   
+-1.4860304002e-19   8.3723196064e-20    2.3837082911e-19    4.2729603765e-20    5.7177602211e-20    
+1.9046691486e-19    -1.6013891482e-20   3.6557041014e-20    2.7021352137e-19    1.4085443435e-19    
+1.1800612613e-19    4.6050237660e-20    -6.6148569511e-20   4.3461810073e-20    6.2911031574e-20    
+-7.6058728254e-21   -1.0594888478e-20   -1.1105530081e-20   -2.6064188458e-20   2.9584098504e-20    
+-1.1506042746e-21   -3.0722292940e-20   -5.5963987776e-20   -6.1752915000e-20   3.7582055981e-20    
+9.9863604034e-20    -2.1207200299e-20   -7.5287207228e-20   1.9040221922e-21    4.0213484114e-20    
+6.2549331265e-21    -2.6178142575e-20   1.3424506861e-20    1.8183474270e-19    1.4014225852e-19    
+-7.7932592983e-20   -3.2909798505e-20   -2.3892312120e-20   -1.6382733594e-19   -8.6005042389e-20   
+1.5413265623e-20    -5.8120504133e-20   9.7960119495e-20    9.1385657047e-20    -5.5727346738e-20   
+6.8354071288e-20    1.2314749097e-19    -2.3855222402e-20   -5.0871195022e-20   1.9803805225e-20    
+-7.1777226077e-20   7.5475755153e-20    5.2558328893e-20    -2.9485526438e-19   -6.3760800025e-20   
+1.7481866523e-19    7.0710691704e-20    1.7489805805e-19    6.0928367032e-20    1.9266128980e-19    
+1.6497010047e-19    -2.8522278400e-19   -1.8660193603e-19   1.1597995916e-19    1.8508861932e-19    
+2.8147264195e-19    4.0233654402e-19    1.4590327487e-19    7.1464138447e-20    7.3054324401e-20    
+3.2088734872e-20    1.8772479545e-19    2.0596382938e-19    1.0249380851e-19    -1.5511107279e-20   
+-1.7457091569e-19   -7.2326024402e-20   1.4428467279e-19    -8.1754798375e-21   3.3752600267e-20    
+-3.9375286572e-20   -7.5291444731e-20   -3.7575836287e-20   -3.8015765569e-20   -5.4079903320e-20   
+1.5598036962e-20    2.0541686078e-20    -6.8637192775e-20   -5.5032420038e-20   -3.2485216576e-20   
+-5.1541435796e-20   -6.0496208218e-20   -1.8402205849e-20   -2.0725256630e-20   -5.4459561077e-20   
+3.4297764373e-20    2.7347828249e-20    -9.4528120135e-21   -9.0735312198e-20   -4.5745763152e-20   
+1.8865798987e-19    6.9666135023e-20    3.8298162266e-20    1.9231147347e-20    -4.2868480182e-20   
+-5.2882294185e-20   -1.7280993623e-19   -1.8694545181e-19   -5.4802771527e-20   2.3545371621e-20    
+-2.6649220977e-20   1.2585424225e-19    8.6912833470e-20    -1.5536106730e-19   -1.7734611092e-20   
+1.0953060976e-19    -1.0800875344e-19   -9.9534501252e-20   6.5793990421e-20    -9.8926456970e-20   
+-9.6355894241e-20   6.0893565064e-20    2.5204861212e-20    3.3871546498e-20    1.1401668707e-19    
+1.5141518153e-19    -5.2216569344e-20   -6.7497331286e-20   5.8634080616e-20    -1.4135373765e-19   
+-1.7711466852e-19   -1.0578901347e-19   -1.0443095447e-19   1.0533272740e-19    -2.0339633929e-20   
+1.0506255959e-19    9.7945899468e-20    -1.8179999200e-19   -7.1955150613e-20   1.7983888750e-20    
+1.5137807938e-20    -3.2987535649e-20   1.3538790523e-20    3.5062791409e-20    -1.9413389426e-21   
+-5.6685646899e-21   -3.9405080843e-20   -8.6431109759e-20   -3.4567267741e-20   -2.2364320422e-20   
+-8.8109827182e-21   -3.0220323255e-20   -4.4266279976e-21   6.8629986829e-20    -9.5885315438e-20   
+-2.1029929456e-19   -1.7864424164e-19   -6.2848058548e-20   6.5828941052e-20    2.9294478879e-20    
+6.2509169182e-20    9.4426856292e-20    -3.0361551369e-20   4.1034558071e-20    -3.6709678690e-20   
+-1.2473346189e-19   4.0505236541e-20    -7.1925643209e-20   -1.7789601007e-19   -4.4229692547e-23   
+3.7142573408e-21    -1.3894943037e-19   -1.0368875838e-19   -5.9480952362e-20   1.4496874660e-20    
+2.5290741369e-19    1.0067668365e-19    -1.0347337808e-19   3.9351411191e-20    -1.2880201951e-19   
+-2.3626976573e-19   -2.4079071283e-19   -5.9671522878e-20   5.8858924878e-20    -8.3940687351e-20   
+-5.5230117989e-20   5.5033174240e-21    -1.7748516413e-19   -3.4732268322e-19   -9.9558969498e-20   
+3.0194790142e-20    3.2478109212e-20    -1.0751852611e-19   -2.1347015125e-19   4.4355856166e-20    
+-4.4781540963e-20   9.4189737049e-20    2.0491327200e-19    6.6325553817e-20    2.1223748531e-19    
+-3.6762562144e-20   -5.4410969806e-21   4.4211670990e-20    2.6341132513e-20    1.0822919922e-20    
+1.5885427345e-20    1.2220475563e-20    -1.0820034747e-20   -3.4756720107e-20   -6.5677100535e-21   
+2.8828577474e-20    6.6424121548e-20    5.9989147550e-20    8.8825033959e-20    6.2942596316e-20    
+1.9970940860e-20    1.7934288428e-19    8.8886079941e-20    1.4353632732e-20    2.8015227234e-20    
+1.3326521632e-20    4.4017610344e-20    -9.4851429851e-20   -1.0795032087e-19   -4.8724992793e-20   
+7.4487389193e-21    -8.1721671923e-20   9.8864134117e-21    8.3253129888e-20    -9.3402191594e-21   
+-7.3125128823e-20   -9.4626145963e-20   1.2163947488e-19    1.0436571798e-20    -6.7563539968e-20   
+7.3931754320e-20    7.8565482934e-21    -3.5091505487e-20   -3.0456152183e-20   -7.1627600908e-20   
+-1.8866736866e-19   1.7351921559e-20    2.5506435306e-19    1.3649497232e-19    2.7183998126e-20    
+-4.4657207030e-20   -1.1754148427e-19   -1.3484590688e-19   -7.5190178034e-20   -7.6317980782e-20   
+-2.4584648306e-20   7.9068337474e-20    1.8821223900e-21    4.4518933782e-20    1.2493459978e-19    
+-1.4650293368e-19   -2.5498769538e-19   -1.4467538947e-19   -1.7392969220e-19   -1.6158627546e-19   
+-9.9685273734e-20   -3.4826575479e-20   5.6351552405e-20    3.2829899819e-20    -3.2238284592e-20   
+-1.2525052209e-20   3.6331503001e-20    2.4919638528e-20    -1.4197269295e-20   -1.0181104439e-20   
+4.3426159129e-20    4.0591285119e-20    -1.2439081851e-20   5.3342290292e-20    3.7679996293e-20    
+-1.1378860720e-19   -2.3153083808e-20   1.0899126670e-19    1.6767589668e-19    1.0966532509e-19    
+-9.9915770506e-20   -9.0002769180e-20   -6.0744320815e-20   -4.3420346566e-20   -2.1934083909e-20   
+-8.1839256774e-21   8.1660699918e-20    1.3217595348e-20    9.5740431747e-20    2.0516752417e-19    
+1.1286639240e-19    -7.3285227851e-20   -1.7426674398e-19   -6.6334792328e-20   -1.4603529215e-19   
+-4.8431175337e-20   1.1807600524e-19    -1.0201181997e-19   -1.8131967374e-20   5.4767199392e-20    
+-1.5007357899e-20   2.6587550376e-20    -1.1686009031e-20   1.4703397766e-19    -4.1582753946e-20   
+-1.7568898810e-19   1.2932363347e-20    -1.1362665301e-19   -8.5962012451e-20   4.0756842187e-20    
+2.9297495471e-20    4.6996772861e-20    2.0072382675e-20    -9.6724430892e-20   3.3240141102e-20    
+1.3771924727e-19    -1.2616455253e-19   -1.4473201903e-19   1.3839490322e-20    -9.4348591011e-20   
+-1.5756332987e-19   -1.0300690245e-19   1.7138748854e-20    1.9017143151e-21    -9.5807437605e-21   
+-1.2979690271e-20   -1.0666756203e-20   -5.7160918290e-21   1.9427054879e-20    5.7343330994e-20    
+5.1339711272e-20    6.8370118734e-20    5.2304679459e-20    -7.2477188351e-20   -5.6048673291e-20   
+-8.7242850046e-20   -1.4856698498e-19   -1.8715550986e-20   -9.7199873764e-20   -1.0222756706e-19   
+-1.7832229037e-20   2.0198011421e-20    -1.1201221590e-20   -2.6915888211e-20   8.4261767188e-20    
+5.6123880301e-21    -3.4523713532e-20   -5.3521881540e-20   -3.7409905133e-20   -3.9050728714e-20   
+-8.2043892516e-20   -4.1239020089e-21   9.2634467849e-20    5.6035245781e-20    -1.1139052539e-19   
+-5.0894084572e-20   5.9025089480e-20    1.3422121193e-19    2.4527163420e-19    2.4370479843e-19    
+7.1493343929e-20    2.8863412388e-20    4.0958809717e-20    -1.3942927639e-19   8.5905581081e-21    
+9.6220467724e-20    -2.0566299285e-20   1.1753947800e-19    8.6860704463e-20    6.6926247076e-20    
+2.2236880219e-19    5.5766890921e-20    5.6367189022e-20    7.1912605527e-20    -9.5717518323e-20   
+-3.3757125823e-20   -5.6016285225e-20   2.1688367221e-20    7.4055689494e-20    -1.2496660816e-19   
+1.9749578362e-20    1.2811201763e-19    3.8524844205e-21    1.1071833631e-20    -5.6766510500e-20   
+-2.0427494442e-20   1.0191571998e-21    2.2715846591e-20    -1.3605577587e-20   -5.6504537442e-20   
+-3.0346558624e-20   5.1399952577e-23    -2.0474487222e-20   -2.4203259729e-21   -4.2382295857e-20   
+-8.3803186135e-20   -2.2408425313e-20   1.4642652134e-20    1.0889322552e-19    4.0063554386e-20    
+-1.2404684228e-19   -1.3136683980e-19   -2.6545372259e-20   1.6760650411e-20    7.3394645570e-21    
+1.3705607809e-20    -3.9837131816e-20   9.0660107798e-20    1.5938299235e-19    6.5400648721e-20    
+-1.2714882332e-19   -2.2065774465e-19   -8.9366639038e-20   2.7126704780e-20    2.2243599928e-19    
+2.7113840887e-19    2.2059136303e-19    4.3976687571e-20    -2.1214805867e-19   -3.4738718084e-20   
+1.8144834117e-19    4.8233611055e-20    -1.1139071748e-19   -1.7502607787e-19   -4.7232098666e-21   
+2.0607344306e-20    -8.4215402106e-20   4.9051953528e-20    2.3587172406e-19    1.3051989364e-19    
+-1.3875717105e-19   1.5232838056e-20    7.9832645316e-20    -4.6977404223e-20   3.2498645040e-20    
+5.0823372640e-20    -8.8782568393e-20   -1.1139765485e-19   7.2374109098e-20    1.7433595504e-19    
+-2.7198881160e-20   2.4285411796e-20    -4.4676132744e-20   -3.4925570729e-19   6.0531564666e-21    
+-1.8861343192e-20   -1.6674182218e-20   2.0922668096e-20    3.7845742001e-20    -1.8643655357e-20   
+-2.8236103943e-20   -2.0392758841e-21   1.9831755001e-20    -2.6622094857e-20   -8.2021845390e-20   
+-8.6809197775e-22   -4.0914020664e-21   -2.0848420918e-20   6.0348384199e-20    8.1323512723e-20    
+4.7785908598e-20    2.7559213600e-20    -1.1323014696e-20   -1.3113111049e-19   -4.3761124466e-20   
+1.2260836045e-20    -6.4319312377e-20   9.0749736728e-21    1.0610757244e-19    9.2010727015e-20    
+7.0510965682e-20    3.7485785133e-21    -5.2034990651e-20   8.9268012262e-21    -6.9433013698e-20   
+-1.2809549645e-19   5.1432503864e-21    3.8978992373e-20    1.0803114605e-20    -1.0012476632e-19   
+-1.7445891079e-19   -1.5114628701e-19   -6.4460337547e-20   -8.2582832223e-21   -1.5376769914e-20   
+1.5800569595e-19    2.2263695292e-19    -4.9210490931e-20   -1.1046700294e-19   7.2614295649e-20    
+2.8065245274e-20    -1.9464196116e-19   -1.4591004680e-19   1.3695796901e-19    -7.0210327474e-20   
+-8.8338638346e-20   1.6320427137e-19    3.8595019094e-21    -1.3564130009e-19   1.6570667481e-20    
+1.6634742038e-19    1.2616638022e-19    2.5488566069e-21    -9.0987686193e-20   -1.2041411746e-19   
+4.4709213682e-21    1.2272197240e-20    1.3284747986e-20    2.0809656909e-21    -2.4038984847e-20   
+3.4461935740e-22    6.1075303456e-20    9.0894124725e-20    8.3874004840e-20    -2.8551544715e-20   
+-7.0423011728e-20   3.3488275259e-21    2.3171035697e-20    -7.2981162774e-21   1.7386316812e-21    
+-4.1669392471e-20   -1.2430598847e-20   6.5619743817e-20    7.3509248795e-20    6.2021646156e-20    
+-1.2259352956e-20   -1.0155854002e-20   7.8188255275e-20    1.2932466578e-19    -4.4813683501e-20   
+-1.0716434155e-19   -3.5073828736e-20   4.2811941506e-20    1.7917306670e-19    1.6888099336e-19    
+6.4497714227e-20    -6.6072312207e-20   -8.9276538013e-20   -1.4574916603e-19   -6.6673255446e-21   
+1.3747620709e-19    8.6291187686e-20    -5.1621344907e-20   -1.9978375413e-19   2.0929994709e-20    
+2.8711826422e-19    2.0744776519e-19    4.6294509185e-20    8.5187007462e-20    -5.0977559239e-22   
+-2.4916254572e-19   -7.7945331319e-20   2.1046470097e-19    5.8031465848e-20    2.2992426333e-21    
+-5.0389587847e-20   -1.8467607744e-19   -1.3695496017e-19   -1.4324636250e-20   -2.2409328290e-19   
+-2.7660292461e-19   -1.6780428027e-19   -1.4057903743e-19   6.2652653697e-21    8.2310390170e-20    
+1.6209577799e-19    7.1403500881e-21    3.6795936237e-20    1.0269667611e-20    -9.8270092057e-21   
+1.2521947436e-20    3.2146647707e-20    1.2629633603e-21    -3.6167239087e-21   -4.9010801579e-21   
+-4.0642224286e-20   -3.3198580836e-20   4.0709858249e-20    1.7622316600e-20    -2.4328571902e-21   
+-3.1220582142e-20   -5.4962811394e-20   4.0976182167e-21    -7.7898283163e-20   -3.4239485935e-20   
+1.0252727087e-19    1.1215798862e-19    4.4485195366e-20    2.4812835820e-20    -3.5476128848e-20   
+-3.7673733695e-21   1.1078159068e-19    6.3874490082e-21    7.1627954248e-20    1.9137394294e-19    
+1.2158958773e-19    9.3172711385e-20    -9.2924691298e-21   -1.4526461980e-19   -8.4909589493e-20   
+6.9293130218e-20    1.0916327363e-19    1.0191054822e-19    3.4314217569e-20    -7.3766996988e-20   
+-2.4349220197e-20   1.5504248762e-20    -1.7524313827e-19   -4.7772945869e-19   -8.5291033430e-20   
+1.7923192410e-19    -1.3524805851e-19   -1.1658510386e-19   1.8438680751e-19    8.0388211645e-20    
+-1.3675410267e-19   2.2842689343e-20    5.7556133604e-20    1.6572826279e-19    1.3245135218e-19    
+1.4319774263e-20    3.5618113522e-20    4.3223276469e-20    7.7924160162e-20    4.6671339587e-21    
+5.1550587163e-20    1.6421030164e-19    -4.9777754633e-22   1.5921448844e-20    -1.8869956998e-20   
+-4.7103939237e-20   1.5394152624e-20    4.1451235980e-20    1.0972200946e-20    -3.1103063810e-22   
+-2.7535327189e-20   8.3898923242e-21    -2.1841670278e-20   -1.7602667494e-20   -4.7990592457e-21   
+-2.0508930430e-20   -2.5207271525e-20   2.8812837092e-20    -8.6329518567e-21   -7.9401681468e-20   
+-2.3613044491e-20   3.3185388506e-20    7.0527568237e-20    8.9362463343e-21    -5.4757194947e-20   
+-1.2125285761e-19   -8.7955358044e-20   -1.8259359249e-20   -4.7589233166e-21   -9.8581132978e-20   
+-1.5706083607e-19   -1.0379404082e-19   -4.8112101427e-20   -5.7102200960e-20   -1.3097090730e-19   
+2.3091935921e-20    -5.0680855324e-20   -2.1330006226e-19   -1.4442476651e-19   7.6020353642e-20    
+2.7758945169e-19    4.2414911837e-20    -1.1323132466e-19   -1.1833384450e-19   -4.2077623190e-20   
+-9.2484417611e-21   -7.5848790826e-20   -1.3364948007e-20   -1.1243426965e-19   -2.8492827312e-19   
+-2.4028099725e-19   -7.9553546221e-20   4.7233418551e-20    6.7597684218e-20    1.3837646647e-19    
+1.9162519298e-19    3.9353603995e-19    4.1101738015e-19    2.2540287719e-19    1.4201291493e-19    
+-7.9617529104e-20   -6.7090978060e-20   3.9048881234e-20    -9.1474562505e-21   -1.3205501596e-20   
+-1.5167327633e-20   -2.8006032717e-20   -2.5933142789e-21   -3.2874273151e-21   1.3030525117e-20    
+3.8516999171e-20    -5.0891286656e-20   -7.0627519793e-20   -3.7477101686e-20   -8.5305164929e-21   
+3.5599908888e-20    2.6215179483e-20    1.0457496558e-20    5.7820490670e-20    8.4266055897e-20    
+1.3161921575e-19    1.4913210042e-19    4.1834270212e-20    -1.1314314610e-19   -1.9630346440e-19   
+-7.4855924697e-20   -5.2874349623e-20   -2.0280103554e-19   -1.3147642401e-19   -5.4609919451e-20   
+-2.0803608227e-19   -2.4297473296e-19   -4.5304576518e-20   4.1520358256e-22    3.7439950532e-20    
+1.3477824683e-19    1.3049913088e-19    1.3580383471e-20    -1.2059539908e-20   -2.6779104044e-20   
+6.3434452359e-20    1.2621667803e-19    -1.5184282627e-19   -1.6402520270e-19   2.0401635744e-20    
+2.9646470312e-19    1.3268391358e-20    -1.3749033398e-19   5.8825074073e-20    -1.8802033818e-19   
+-1.8233977501e-19   1.9393693305e-20    -6.3509617570e-20   -1.9089988095e-19   -7.1968453392e-20   
+-2.0691689824e-19   -1.5336266303e-19   3.5123770807e-20    -5.5497988495e-20   -1.0136857035e-20   
+-9.9699723691e-20   -1.4703394877e-19   -5.6371651196e-21   5.1341047040e-20    -1.4533804818e-20   
+2.5639490903e-20    4.0488950953e-20    3.0110376839e-20    -7.0694428564e-21   -2.7972203804e-20   
+-1.2472625487e-20   4.2079636892e-21    -4.5727548007e-20   -1.5629304304e-21   3.5957867542e-20    
+-1.9447065178e-20   -8.1640026337e-21   1.1679909427e-20    4.0614297435e-20    -4.1498481681e-21   
+4.0291601661e-20    1.3580432439e-19    1.3183091752e-19    2.6172941642e-20    -1.5552879784e-19   
+-1.3692426407e-19   5.4999145202e-20    7.1847972548e-20    4.6573189926e-20    9.6274010601e-20    
+6.4933637257e-20    5.2480000297e-20    -4.9150777079e-21   3.5128074359e-20    -2.2287894498e-20   
+-5.3062181529e-20   2.1208173302e-19    1.5132909222e-19    -4.1458364577e-21   1.7444567942e-19    
+2.1189008377e-19    -7.6399224168e-20   -2.1331543793e-19   -8.7635967826e-20   -3.2835983258e-20   
+1.6931342563e-21    2.5522674688e-19    2.2903621452e-19    1.3668445416e-19    3.5160023837e-19    
+1.7871136276e-19    1.1061610577e-19    2.6217031953e-19    1.2847015958e-20    -1.9294162938e-19   
+-6.0216834356e-20   -2.4630181839e-20   -1.2064204691e-19   -1.7068101670e-19   -3.2226098947e-19   
+-9.2885902464e-20   6.9073630657e-20    5.2565908136e-20    1.3055647319e-21    -2.0056704420e-19   
+1.6172560199e-21    1.4474868294e-20    5.1642881570e-21    -5.0648447064e-21   -1.5093506042e-20   
+2.1134081921e-20    1.0785513925e-20    2.4400457576e-20    7.7456118745e-20    3.1064367499e-20    
+-2.5326246398e-20   -2.8771546629e-20   -6.3991386889e-20   -5.9066235373e-20   1.1329772225e-20    
+4.7011810019e-20    -6.5194897074e-20   -1.1392640925e-19   -3.7547346711e-20   4.5667410393e-20    
+3.7242778184e-20    7.7831864780e-20    1.1656693452e-19    8.6104265036e-20    8.8159434155e-20    
+2.3831323514e-21    -2.2539051754e-20   6.0583498634e-20    1.4360062403e-19    -6.0942123756e-21   
+-2.5009219812e-20   1.1465576866e-19    5.0502120199e-20    -1.3307081727e-19   -9.2410752996e-20   
+-8.7200646060e-20   -1.4682288230e-19   -2.3669240047e-19   -1.1535089556e-19   2.4483074651e-19    
+2.3629823720e-19    7.0718468964e-20    4.6199487399e-20    8.6080583551e-20    3.7423784665e-20    
+1.6870249692e-20    7.2364961160e-20    -9.5750423544e-21   -2.3880402883e-20   2.0064220105e-20    
+-1.0155925784e-19   -1.1877366567e-19   -4.8839005025e-22   -2.6245861141e-20   -6.2607273416e-20   
+4.4588660950e-21    -4.2743959580e-20   3.6904715323e-20    1.9131423380e-19    7.2309545858e-20    
+-1.0064754540e-19   2.0863701940e-20    -2.6653034047e-20   1.6533519870e-21    3.5146856618e-20    
+2.9989026505e-20    -2.0589934493e-21   -1.8427762427e-21   5.5354101548e-20    8.6548605182e-20    
+-4.5745102447e-20   -4.0150015835e-20   7.1099510278e-20    2.4175491307e-20    -3.9879141460e-20   
+2.3144799962e-20    6.1602036503e-20    5.9996931198e-21    -1.5740399405e-20   -7.4314484217e-20   
+-3.1165996987e-20   2.9445744963e-20    -3.1469347148e-20   -5.9477515459e-20   -1.9419096232e-20   
+-4.9665732815e-20   -5.7603548362e-20   -3.2068427411e-20   -3.7463794931e-20   -9.2706056660e-21   
+-6.7295377747e-20   2.4048527394e-21    6.5251358432e-20    -7.7704808612e-20   -6.7852834845e-20   
+9.1971320762e-20    5.9500171658e-20    -8.0943167248e-20   -1.2089951297e-19   5.8808930098e-20    
+9.9561617110e-20    -4.3425020278e-20   -3.7189797341e-20   -8.1572593299e-20   -8.4566135479e-20   
+-1.0892654860e-19   -2.1640874431e-19   -2.5353553498e-19   -2.1343905424e-19   -5.2536810529e-20   
+3.1233139163e-20    3.2610291521e-20    -3.5657027307e-20   -7.2825132831e-20   -2.5985776061e-20   
+7.2550948738e-20    3.0934779139e-19    9.2838290521e-20    -1.8848161522e-19   -1.7657673863e-19   
+2.3802469252e-20    2.3741157620e-19    7.5115360814e-20    7.3773301255e-20    5.8748749646e-20    
+-7.4471740883e-21   -9.5123638609e-21   -1.6693554528e-20   -7.6011976309e-21   9.2734896423e-21    
+-1.8876579436e-20   3.9958248516e-21    5.0675462674e-20    1.0321844462e-20    2.0659596975e-21    
+1.1461167810e-20    -2.2044604153e-20   -2.3100918000e-20   1.0138413116e-19    2.4023440403e-20    
+-1.3010748907e-19   -1.0626479197e-19   -1.0238268168e-19   -5.5915726743e-20   2.7115167229e-20    
+2.2268432620e-20    4.6777478543e-20    6.3915860002e-20    6.0541696765e-20    9.0607576300e-20    
+-9.5343912546e-21   -4.1867631778e-20   -8.5107422737e-20   -1.4966937756e-19   2.3101521872e-20    
+1.6543995845e-19    1.2410928661e-19    9.8561691898e-20    1.7555574808e-19    2.8175209309e-19    
+1.0546193719e-19    -2.6164829753e-19   -2.4435773848e-19   -7.4034074632e-20   -1.3981186742e-19   
+-5.8874206418e-20   -4.3301567199e-20   -4.6852036727e-20   1.5339257062e-20    -1.0133324437e-19   
+-8.3114371113e-20   5.0903086417e-21    1.2438903690e-19    1.8620343302e-19    8.4097255182e-20    
+-8.1381313395e-20   7.0814606022e-20    2.5305705260e-19    6.8118991105e-20    1.3272209399e-20    
+-1.6656575165e-20   -6.7519554572e-20   -5.1545171945e-20   7.9376421080e-20    6.3834339690e-20    
+-1.7806414764e-20   -6.6123193010e-20   1.9475191591e-20    3.4610645098e-20    -4.7155973910e-20   
+-1.7527696675e-20   -4.9426136683e-20   -1.1950991756e-20   1.8908722855e-20    -3.2977452373e-20   
+-4.8528121698e-20   -1.1240003898e-20   -3.3343286579e-20   -2.0033184915e-20   1.8897557548e-20    
+-3.0912145698e-20   -5.6141408296e-20   -1.3920296744e-19   -9.0763102173e-20   4.2207882222e-20    
+9.7731822627e-20    -3.7469357121e-20   -4.4476215762e-20   -2.0869231050e-20   -6.3789191215e-20   
+8.4589417391e-20    9.5455274702e-20    2.9985261082e-20    2.7178026777e-20    -1.3326069323e-19   
+-1.3124261794e-19   -8.6529777653e-20   -1.3676437782e-19   -2.0103734158e-19   -1.6802890166e-19   
+2.4394646993e-20    -4.5231151912e-20   -1.0316928481e-19   1.0947415029e-20    3.9672063828e-20    
+-1.6970094196e-19   -1.7416955021e-19   1.5448859259e-19    8.5177360916e-20    9.7031942813e-20    
+1.3944436957e-19    3.1399485401e-20    6.3174119323e-20    3.3239463868e-20    1.1891922992e-19    
+2.0341642010e-21    -6.1827548168e-20   -1.3429154625e-19   -2.8488474265e-19   -1.4351012641e-19   
+1.7573536615e-19    3.0149892790e-19    3.2392579373e-20    -1.4500553358e-19   1.6713766052e-20    
+-2.8300532629e-20   -3.8994292426e-20   -5.9601824945e-21   8.8681425427e-21    -2.1206281546e-20   
+-3.4558511948e-20   -3.1793898708e-20   -1.9121443018e-20   -3.9757421741e-20   -4.5428750533e-20   
+-4.3696044412e-20   -3.0122460438e-20   -1.0752937720e-20   -1.9455401750e-20   4.2992711132e-20    
+4.9408998408e-21    1.6829748525e-20    -6.0408694163e-20   -5.4734986447e-20   1.8718586689e-20    
+2.5739830288e-20    6.3564392872e-20    -8.3590225103e-20   -8.9888113348e-20   8.6281023462e-20    
+2.6775990499e-20    -8.3324064808e-20   2.1487586155e-20    3.2715986959e-20    1.1376940812e-19    
+9.9689225794e-20    -1.5950854265e-19   -1.3956848077e-19   -1.0987917054e-19   -1.6794855711e-19   
+-1.4501107880e-19   8.8647667164e-21    3.6858642988e-20    2.6503968242e-19    3.7001551939e-19    
+1.1374369886e-19    1.5265439812e-19    2.5634225546e-21    1.3425283265e-20    5.7008110369e-20    
+8.3286589758e-20    2.6183988677e-19    1.1889937442e-19    -1.1968536074e-20   -1.1099403535e-19   
+-1.9728718271e-19   -1.2149650716e-19   1.7802980291e-20    -1.1931167126e-19   -2.0921750106e-19   
+-7.1083335570e-20   -4.5652545388e-20   -3.5442216749e-21   -4.7496441360e-20   -7.9603387870e-20   
+-2.4133784561e-20   2.3859076436e-21    -1.5107166491e-20   1.7393907365e-20    -4.9321919294e-20   
+-3.6192128843e-20   5.5834405411e-20    -3.1360981829e-21   9.2083054135e-21    -4.9878251095e-20   
+-6.9253083002e-20   3.8371036742e-20    6.4382483563e-20    2.6947147904e-20    1.5984108448e-20    
+4.2145528362e-21    2.1923055774e-20    3.3504160045e-20    5.3912036769e-21    2.0122636200e-19    
+1.3623737769e-19    -2.3609435339e-20   -2.8996080012e-20   -2.1400483185e-20   -1.5296184679e-20   
+1.2770281496e-19    1.7135941643e-19    -8.0197991330e-20   -4.6739596658e-20   -3.4845212566e-20   
+-7.7510353912e-21   1.2908432769e-19    -2.8682137844e-20   1.4156202969e-20    1.1841878756e-19    
+1.8286591394e-19    3.4835997898e-19    2.2038919498e-19    -1.6108966372e-20   9.7428199724e-20    
+1.2141753125e-19    7.9315108191e-20    1.7672524037e-19    2.0119114929e-20    -1.8794027499e-19   
+-5.6600248938e-20   -1.8823148233e-21   5.5086299977e-20    -2.9379571961e-20   -2.7672971537e-19   
+-1.5800771189e-19   4.1277462192e-20    1.1303100868e-19    -1.1837270880e-19   6.4423363491e-20    
+2.6695126114e-19    6.4414334260e-20    -1.9802383936e-19   -1.4795423191e-19   5.4151980678e-20    
+6.8114846281e-21    -9.7862463458e-23   -1.5311735171e-21   3.6847913179e-20    3.0546457995e-20    
+-2.4657404741e-20   3.0038030246e-20    2.2001869220e-20    -3.7103697286e-20   1.3458861875e-21    
+4.0442677102e-21    1.3096948553e-20    4.0273651182e-20    5.1379488140e-20    7.0404629382e-20    
+6.4458232231e-20    -6.6502480106e-20   3.5339957797e-21    1.2343729091e-19    1.2646964682e-19    
+1.2180667368e-19    1.1695099709e-19    -2.0911985743e-20   -8.6011200749e-20   -4.3538316758e-21   
+-8.4039381326e-20   -1.9014245991e-19   -1.5567996308e-19   -6.4340481494e-20   -6.3098873054e-20   
+-4.4790360584e-20   -7.3616027000e-20   -1.2142940041e-19   9.6834462369e-20    1.9518407128e-19    
+2.1751055352e-20    1.7827657504e-20    1.5923883834e-19    -1.1423763510e-21   -1.4280553476e-19   
+-1.4679529499e-19   -2.0898140294e-19   -1.2984447961e-19   -2.6519813474e-19   -2.1141760459e-19   
+-7.7579319433e-20   -9.0115880803e-20   -2.4955856614e-19   -2.5240986441e-19   -8.6168768370e-20   
+-6.4109892051e-20   3.3111255134e-20    2.0320045765e-19    1.2801977662e-19    -7.0285347706e-21   
+1.1190081284e-19    -3.4266654699e-20   2.4142047391e-20    2.9444110595e-20    -2.2578297341e-19   
+-1.4996696328e-19   -8.3848411876e-20   -3.3975422486e-20   -1.8153039548e-20   7.4386418431e-20    
+2.7704249984e-20    7.2037000515e-21    5.4114048931e-21    -4.8140276601e-20   -2.5849080757e-20   
+4.6677264150e-20    6.8950150636e-20    4.1896868822e-20    4.5240033302e-21    1.0662204914e-20    
+4.8130718155e-21    2.7516788724e-20    6.6769484095e-20    -2.9592774661e-20   -5.5044119743e-20   
+8.1123780740e-21    -1.4468839430e-19   -9.7872118526e-20   3.6243656087e-20    5.1203194628e-20    
+7.1406094114e-20    9.7862472247e-20    -7.2209535049e-20   -2.4125196010e-19   1.3985233831e-21    
+1.2781800598e-19    8.9528747437e-20    -5.6836410525e-20   -1.2384304899e-21   2.2990248405e-19    
+1.2034722428e-19    8.3631320619e-20    -1.6949943867e-19   -4.1202169316e-19   -1.6889032002e-19   
+5.9542588400e-21    -4.2010580444e-20   -1.0443587641e-19   -2.0421787442e-19   -1.0663945150e-19   
+1.0892307515e-19    7.2295885550e-20    2.4252124215e-20    1.3318463888e-19    8.2868148504e-20    
+1.0412477734e-20    1.1696676722e-19    5.6075476154e-21    -2.0277234766e-19   -1.2998406875e-19   
+1.7043908760e-19    1.2447570639e-19    2.5681969544e-20    1.0483136010e-19    1.6990771172e-19    
+7.8228361370e-20    -1.2501576194e-19   -1.5311780396e-19   -2.9617199757e-20   4.4098884666e-20    
+7.7364252581e-21    -1.5341673309e-20   -6.9930993082e-21   -2.8032696164e-20   -8.3374159843e-21   
+6.1891031497e-20    3.8080474702e-20    -2.1719959858e-20   -5.9566745928e-20   -2.2772629391e-20   
+4.2959435266e-20    -2.5989851829e-20   -6.1878538298e-20   1.1358657089e-21    -4.1513232940e-20   
+-1.5812108000e-19   -9.8630913410e-20   -6.5810392457e-20   -1.6660146614e-19   -2.7566239560e-20   
+8.5040848220e-20    4.7819268588e-20    1.2608477741e-19    1.3128113957e-19    1.2874157720e-19    
+2.1779487987e-19    9.6746861849e-20    -1.0807604807e-19   -2.7016293167e-20   1.3243876328e-19    
+-7.0200026448e-20   -2.3280707541e-19   -1.8131533271e-20   6.3703134101e-20    -9.9708102650e-22   
+2.5578093182e-20    4.7313546099e-20    -3.0723383754e-21   -6.9753698424e-21   1.0352232666e-19    
+2.2741968292e-19    1.8781222143e-19    -1.8533405193e-20   -1.4526726594e-19   1.4646042565e-19    
+2.7190292454e-19    8.9134969003e-20    9.7653644761e-20    1.3674889876e-19    -6.1990116500e-20   
+-1.5461836713e-19   -6.7981816997e-20   -1.1381657115e-19   8.4310432874e-20    7.4975682549e-20    
+-6.5927234143e-20   8.4688622821e-20    2.3974345612e-19    3.4463284812e-19    5.1395014392e-20    
+4.4790652219e-20    -1.9165801606e-20   -1.2988101450e-20   2.1739436619e-20    5.6028482678e-20    
+3.8563705441e-20    -9.1443624436e-22   -1.3410166333e-20   -5.1726772275e-20   -2.2315763212e-20   
+5.5520961798e-20    -2.1376747180e-20   -1.0907105940e-19   -1.0465638447e-19   -2.4787922471e-20   
+1.0654439332e-21    -7.2819128509e-20   3.1073715555e-21    1.0225585334e-19    -1.0034020902e-20   
+-9.1176492485e-20   1.5899713214e-21    -1.4649491577e-20   -3.7123153799e-20   -1.3271825646e-20   
+1.2218049686e-19    1.1594668338e-19    -1.2237651589e-19   -1.0210341180e-19   7.9510608491e-20    
+2.2295915951e-20    -3.6835209043e-20   -1.0841017573e-20   -1.1870382450e-19   1.0323256713e-19    
+3.2328382051e-19    1.3828274620e-19    -8.3860790364e-20   -3.8751259241e-20   1.4790060289e-19    
+2.1008160152e-19    1.2141600191e-19    2.0916814375e-21    -1.0828542266e-19   -6.7180465986e-20   
+-6.8414306247e-20   -2.4016342947e-19   -1.2552757856e-19   8.9023078096e-20    1.2884105548e-19    
+7.8385225511e-20    -4.0011013338e-21   -1.3094072704e-19   -2.6205263864e-19   -3.0247508353e-19   
+-3.3996800557e-19   -2.1010539556e-19   -1.0411714009e-19   -4.4793387559e-20   8.2639587975e-20    
+2.0165990275e-20    2.5954980350e-20    -1.1070639233e-20   4.3335778482e-21    2.5392671060e-20    
+2.5465445386e-20    -4.4719383246e-20   -5.8332801528e-20   3.8789311377e-20    6.2498557157e-20    
+7.1010213020e-20    5.2525134122e-20    -7.9241340901e-20   -4.3207979401e-20   5.7330683588e-20    
+6.0740038464e-20    4.8687450635e-20    7.7869809905e-20    5.6957267709e-20    -1.0864254094e-20   
+-1.6126771611e-20   -2.5760855263e-20   5.0069932132e-20    1.2014712666e-20    -8.4005206543e-20   
+-8.0866537401e-20   3.7598638403e-20    7.1225138091e-20    -3.9704340577e-20   3.6540603296e-20    
+2.6945061121e-20    -1.7053356632e-19   4.1282900756e-20    1.0163395433e-19    -1.4592126391e-20   
+8.9001938112e-20    -6.9996231334e-20   -1.5272312590e-19   -2.0092329030e-20   1.6250595591e-19    
+2.0944446015e-19    6.2445118291e-20    3.1933844537e-20    -8.7426773075e-21   3.8897619581e-20    
+1.7483707728e-19    -2.1590194851e-20   -6.4533963737e-20   6.4120025092e-20    -9.0406423840e-20   
+-1.6047325576e-19   8.0529936164e-21    1.3997040538e-19    1.0618858752e-19    7.3141092333e-20    
+8.9834076690e-22    -1.6269622719e-19   2.6178806316e-22    5.9440649324e-20    -3.0342348090e-19   
+-5.2135260872e-19   -1.2293045746e-20   -4.6648070217e-20   -8.4136643999e-21   -6.4218557455e-21   
+-5.6471973224e-20   -4.1363214799e-20   1.2601716254e-21    2.1209294943e-20    -6.0544653419e-22   
+-8.2206305253e-21   -4.1052569223e-20   -1.1514593133e-19   -1.2991724173e-19   4.7717206254e-20    
+1.3491947472e-19    2.4567325663e-20    1.3064469873e-19    1.2575053554e-19    -3.7093254138e-20   
+-1.7247073186e-20   3.5882147548e-20    4.4208737178e-20    9.0888759460e-20    8.4002530279e-20    
+-1.1281072651e-19   -1.9973536265e-20   4.8298589023e-20    -1.4075189242e-19   -4.1022478552e-20   
+9.3919996713e-20    -8.0420217106e-20   -8.0991814651e-20   4.6358576572e-20    -1.8372334955e-20   
+-2.6534755709e-20   -1.1012295982e-19   -2.4584861215e-19   -1.6726099860e-19   8.9472706810e-20    
+1.1050957978e-19    1.0252158276e-20    3.9288894972e-20    -2.7246404789e-20   -2.3888295031e-19   
+-7.6744527764e-20   1.3086072273e-20    -1.0306377274e-19   1.5060591372e-19    1.5737378754e-19    
+-2.0704056867e-20   1.3804062210e-20    2.0571261153e-19    1.7406807230e-19    -6.9292415908e-20   
+-2.5457016892e-20   1.0487643791e-19    6.1432915901e-20    7.6042597054e-20    1.3692472271e-19    
+3.0020397027e-20    -5.9644222824e-20   -1.2483954370e-20   -6.6172319921e-20   3.2891884603e-23    
+1.2736647898e-20    -6.7732314821e-21   5.2336778832e-21    3.6306412823e-20    3.2708568141e-20    
+-3.1696024984e-20   -8.0101813398e-20   -3.2936035645e-20   2.4072058552e-20    7.6915896037e-20    
+6.3835542137e-20    -3.3964057550e-21   2.0665719440e-20    6.6381885410e-20    4.1896861589e-20    
+-6.8570231027e-21   2.1871113587e-20    3.8629362944e-20    -1.7597617776e-20   -6.4824216281e-20   
+-2.1660005695e-20   4.8466108643e-20    1.1755194402e-19    -3.1950987761e-20   -2.0727713082e-19   
+3.3111212881e-20    1.5024167771e-19    -6.7054528105e-20   1.7941052392e-19    1.9965138687e-19    
+9.8007796131e-21    6.1842692255e-20    -1.7118960184e-19   -8.2014152675e-20   4.8947915268e-20    
+-9.7281781850e-20   -1.4432555171e-19   -1.4252952232e-19   -1.2027538218e-19   -1.5088415546e-19   
+-2.1315836453e-19   -2.0191455156e-19   -3.7708086738e-20   2.3127216863e-20    -9.9235502829e-20   
+-4.0720880256e-20   1.5970981349e-19    1.0555357240e-19    4.7357616604e-20    -3.9746309532e-20   
+-1.0636405305e-19   -5.9485407004e-21   -2.6370783074e-20   5.4177926560e-20    1.5989491745e-20    
+-9.8779104635e-20   1.0324567462e-19    3.0267478111e-19    -2.2873817646e-20   8.0850909811e-21    
+3.6021033145e-20    1.1466705817e-20    1.1574092609e-20    1.5140283791e-20    -1.1186526412e-20   
+-2.7412478241e-20   -1.2512940541e-20   -3.3878512034e-20   1.6516114305e-20    1.0689862784e-19    
+1.1643603784e-19    3.3641612669e-20    1.3293879720e-21    -1.4368684982e-21   -8.6777315143e-20   
+-2.1405443502e-20   4.8204596322e-20    -5.2252294378e-20   -7.2554151101e-20   1.4744211769e-20    
+-9.3894377365e-20   -1.9367520140e-19   4.6361126931e-20    1.3451055893e-19    9.4375401785e-20    
+1.0423311710e-19    -8.7314179639e-20   -1.4927379337e-19   7.6625827695e-20    1.9278778301e-19    
+5.4682035728e-20    -2.7598020338e-20   1.9117771604e-20    4.1750818183e-20    2.0047949062e-19    
+2.7319233576e-19    8.3619535525e-21    -1.5852474076e-19   -2.0055014990e-19   -2.8772288877e-19   
+-2.3662759954e-19   3.3234665507e-20    1.1876231424e-19    -3.2641796586e-20   -7.4546624931e-20   
+-1.6332169207e-20   2.6366817605e-21    3.1642404921e-20    8.3979001468e-21    -1.8037879321e-19   
+3.2223317587e-20    2.4293443624e-19    1.7881294476e-19    2.3774427081e-20    9.0137859942e-20    
+1.1495669515e-21    -1.5436084747e-19   1.4356661111e-19    2.4095057479e-19    1.2058311794e-20    
+1.3626648105e-20    -4.0583477561e-22   -3.3089804891e-20   -3.6899924780e-21   4.1860611566e-20    
+1.3359805970e-20    -3.6709184614e-20   1.0507699688e-20    -3.7125557834e-20   -1.0898791084e-19   
+-7.3728070871e-20   -1.3905948256e-19   -1.0234108688e-19   -7.8629038764e-21   -8.1019112460e-20   
+-1.4873685616e-19   -2.5074464524e-20   -3.0090321472e-22   -8.5257442846e-20   9.0671416089e-21    
+-2.1308501222e-20   -5.8224058628e-20   -5.2667501516e-20   -7.3316244271e-20   -5.5666399287e-20   
+7.4859765114e-21    1.6407179237e-20    -1.8241112858e-19   -9.1430452644e-20   1.6043529974e-19    
+-3.3475694147e-20   -1.2560351729e-19   2.9080710923e-20    -1.0208543762e-20   -2.4804586417e-20   
+3.1989519107e-20    9.9790036780e-20    1.4786325372e-19    2.9047144026e-20    5.0139835110e-20    
+1.6202406097e-19    1.6927282523e-19    2.1562873117e-19    2.2934549239e-19    6.3317692808e-20    
+-6.5548497013e-20   -4.1780082571e-20   -9.0083031693e-20   -1.0918885331e-19   -4.4172539974e-20   
+-7.7484010193e-20   2.3753103871e-20    2.0188195703e-19    1.8966132663e-19    -1.2535546678e-20   
+-1.3245835610e-19   -1.3590602513e-19   1.2504746038e-19    2.3169020561e-19    4.6327742042e-21    
+2.8782337491e-20    3.2194815844e-20    -1.6488489153e-20   -3.4304453586e-20   1.3691086426e-20    
+-9.0740270301e-21   -6.6090925848e-20   -2.6349516128e-20   3.3010625619e-21    -3.1627778757e-20   
+-6.2061144929e-20   -9.9704176316e-20   -4.5425138425e-20   8.8471420894e-21    -3.6889545557e-20   
+-4.3833778974e-20   4.7631629450e-20    5.6501983422e-21    4.0292145492e-21    6.6207691894e-20    
+-5.0459153043e-22   -1.0925247959e-19   3.4482621505e-20    1.0818510541e-19    -3.4242896779e-20   
+-1.5802955848e-19   -2.0017535582e-19   -4.6945272548e-20   2.0832865585e-19    1.8554777249e-19    
+-2.7641916043e-20   -1.2166456820e-19   -1.0630129027e-19   1.1011005505e-20    -9.0061021119e-20   
+-7.7880470263e-20   5.4658904914e-22    -1.0996401805e-19   -6.0062197410e-20   1.4921758333e-19    
+1.6069848294e-19    2.1887888179e-19    4.4728385028e-19    2.5476588471e-19    -7.0614664091e-20   
+5.1384207559e-20    1.6065473917e-19    6.1492328354e-20    -3.9186596150e-20   -1.8595829285e-19   
+-2.2154470407e-19   -3.6775381953e-20   -1.5968670098e-19   -1.9951658831e-19   -4.9430946330e-20   
+1.2096214310e-19    4.1869927584e-20    -4.4413962498e-20   7.4765313014e-20    -1.5686537169e-20   
+-2.6672559789e-20   1.6433195417e-20    9.8246582665e-21    -2.9564870208e-20   -2.4782271062e-20   
+3.8241944114e-22    -3.6209265440e-20   -2.1025252737e-20   1.5529078009e-20    -8.6243564583e-21   
+6.1624788545e-20    8.0418942350e-20    3.5642933437e-20    9.7886252065e-20    5.6524573964e-20    
+4.6055562077e-20    8.9617012823e-20    1.0231290236e-19    6.7521363554e-21    2.5515094265e-20    
+9.7518551865e-20    -4.6269745157e-20   -5.1624367851e-20   6.1828879948e-20    8.3250931524e-20    
+5.5453495628e-20    -4.3026825075e-20   -1.2744283625e-20   1.1602063125e-19    1.0860705818e-19    
+-1.8238567170e-20   -3.0276044595e-20   5.6797870044e-20    -8.7619566871e-21   -1.3256712202e-19   
+-8.0180018708e-20   1.2336781901e-19    1.1337606848e-19    -6.6073644901e-20   -2.2457261393e-19   
+-1.2088472517e-19   -5.6617248162e-20   -1.5123562539e-20   8.2368002582e-20    -3.4240673366e-20   
+-7.1328331036e-20   3.0330331265e-20    5.1560692900e-20    8.2850121644e-20    1.9224668520e-19    
+1.0168031120e-19    -3.2718997508e-20   9.8242167044e-20    7.1136989282e-21    -2.7444489553e-19   
+-3.3866978803e-19   -4.0831541304e-20   6.9990906454e-20    6.7668550523e-20    3.9083808055e-20    
+-1.2031337922e-19   -5.6422810236e-20   2.6495575860e-20    -1.5635630510e-20   -2.3320147996e-20   
+-4.3820863052e-21   -3.6789892704e-22   1.7484379260e-20    7.8621438477e-20    2.7019062049e-20    
+9.9429110193e-21    3.2024968807e-20    3.9729482489e-20    8.6569853208e-20    -1.6258371230e-20   
+-8.0950052785e-20   1.8569492249e-20    1.0372611933e-19    2.5877620939e-20    -1.0049636828e-20   
+-6.8997274363e-20   -2.5046795761e-20   6.3199600450e-21    1.4024909170e-20    7.7367306801e-20    
+2.5488487002e-22    4.5313260791e-20    1.5087365384e-19    9.4168098998e-20    1.5719233603e-20    
+-8.5515865873e-20   -3.0698796068e-20   1.8361674410e-19    1.6505964266e-19    5.9009467575e-20    
+-6.2430503916e-20   7.8963667926e-20    1.7234379008e-19    -4.7048037552e-20   -3.3416683032e-20   
+-2.2444197611e-20   -2.2524272730e-19   -1.2962853912e-19   -7.3463790204e-20   -1.1121497364e-19   
+-4.4367553872e-20   -1.2151033543e-20   -7.7007576250e-20   -1.1858077367e-19   -1.1015214661e-19   
+2.0595062031e-20    1.3618100466e-19    1.2622209481e-19    6.8882430825e-20    -1.1876659712e-19   
+-6.5291332321e-20   2.8956824206e-20    -9.5444521583e-20   -2.1048939006e-19   -1.7571358883e-19   
+-1.0959223122e-19   -1.5008104680e-19   -2.0579955689e-19   2.6882171720e-20    4.2059940234e-21    
+-5.9773764069e-22   -1.7155783551e-20   -1.8093336463e-20   9.2657905269e-22    1.4279545596e-20    
+-1.0452836099e-21   3.1626094468e-20    -2.4608813777e-21   -3.7924008663e-21   3.4583900449e-20    
+-7.6805838442e-20   -1.2931132697e-19   -1.3108161361e-19   -2.7484020678e-20   -8.4771813945e-21   
+-1.2967289369e-21   8.9085826974e-21    -1.0250648997e-19   -1.6194763448e-19   -1.1940135740e-19   
+-3.1839163779e-20   -8.4483821217e-20   -5.9936986986e-20   6.6860723132e-20    -2.2632902326e-21   
+-1.0226739119e-19   7.2354134002e-20    9.5265089369e-20    3.2757472684e-20    3.2429557384e-20    
+8.5783920664e-20    1.3601440869e-19    7.5292464581e-20    -1.6829202115e-20   -3.1025268704e-20   
+8.3832595771e-20    8.8535139467e-20    1.0835826581e-19    -3.3147595721e-20   -2.6604019654e-19   
+-1.7678148889e-19   -4.3263835996e-20   -6.5786718880e-21   -1.6665286715e-19   -1.2711842238e-19   
+-6.7990110255e-20   -1.1627750837e-19   -1.2037987381e-19   -1.5828290114e-19   -7.5523435055e-20   
+-4.6272122918e-20   8.5324772482e-20    1.6615324981e-19    -1.6269265711e-20   -7.3962638342e-20   
+-9.8334207661e-20   -4.8253257796e-20   1.4929666580e-19    1.4162826647e-19    3.2870312525e-20    
+2.2303486515e-20    -4.3472028333e-20   -2.4188227153e-20   2.5144424733e-20    1.2555585541e-22    
+-5.3353255183e-20   -1.7052286528e-20   2.2079895127e-20    2.0820208002e-20    8.3133711702e-21    
+-2.9139951069e-20   -3.5971554735e-20   1.0037892918e-20    6.5650198200e-20    8.2414911754e-20    
+-3.6662814817e-20   -4.1016568545e-20   3.9510511127e-20    -1.0708729270e-19   -1.0774954611e-19   
+-1.1161631893e-19   -7.6167617209e-20   4.9186610989e-20    -3.2339655947e-20   -4.2354447596e-20   
+2.6286491064e-20    -1.4569790168e-20   2.6708289675e-20    -7.6501808456e-20   -2.5330455235e-19   
+-1.7950092764e-19   -2.7384604336e-20   9.1678620480e-20    1.9202029460e-20    -1.2074848383e-19   
+1.2135000978e-20    1.7973791129e-19    1.5286570625e-19    1.2824826128e-19    7.9040954250e-20    
+9.6262972842e-20    -1.7998364875e-20   -8.9432392914e-20   1.8179070604e-20    7.1704790517e-20    
+-2.2878888051e-20   -8.7391775163e-20   -6.7368201154e-20   -4.5992996180e-20   -2.5803879828e-20   
+-2.4353140279e-20   9.9441351066e-20    5.4729871303e-20    -2.8267379803e-20   5.2911845701e-20    
+2.5869689294e-19    2.5566947483e-19    4.5220020600e-20    1.9472089039e-20    1.7090149729e-20    
+4.5617251916e-20    -9.6883161556e-21   -1.5805019646e-20   3.3936164039e-20    4.4634529475e-20    
+3.2410880881e-20    1.2133804649e-20    1.2049670329e-20    -1.2646527449e-20   -5.6409554668e-20   
+-8.9493776390e-20   -1.2442594191e-19   -5.7879698763e-20   4.3792798913e-20    1.0542889213e-19    
+9.8487099093e-20    -1.6015356964e-20   -4.3547945859e-20   -5.9205379569e-20   7.4946590314e-20    
+1.9344599145e-19    1.1979446044e-19    6.7728594319e-20    5.7120071899e-21    -5.3755193257e-20   
+-4.7673628435e-20   2.3221614867e-20    2.6635116833e-21    -6.0928572214e-20   -1.9177653254e-19   
+-2.8823507159e-19   -1.6901133914e-19   -7.7290502450e-20   -1.1035907074e-19   -8.5164531074e-20   
+-7.5222992787e-20   -1.2033311633e-19   -2.1084464546e-21   1.8387606627e-19    -2.5111235170e-20   
+-4.9639218249e-20   2.3000172337e-19    1.6630387279e-19    5.9156734050e-20    2.0950278503e-19    
+2.7131281003e-19    1.0862320498e-19    5.6254547664e-20    -2.9681966198e-20   6.9157160200e-20    
+1.8532929791e-19    -4.4464558480e-20   -8.6545432293e-21   1.0342616193e-19    2.0076850917e-20    
+5.4444644414e-20    2.4477869442e-19    1.8309718756e-19    -2.5660668783e-21   -1.3221195677e-19   
+-2.7362003942e-19   1.6709852534e-20    -9.3689820512e-21   3.1498752499e-20    2.4493321616e-20    
+-3.3352838148e-20   -1.5934387911e-20   2.0669582053e-20    1.3466424940e-20    8.3869403969e-21    
+-6.0575117771e-20   -7.7368987492e-20   1.6573788284e-20    9.4416471397e-20    7.6645258935e-20    
+3.0793913074e-20    -1.9692001474e-20   -1.0347010744e-19   -5.3149570065e-20   3.3476216882e-20    
+1.2479987053e-19    6.5529992465e-20    2.5282672013e-20    6.7439126714e-20    -8.5807418818e-20   
+-1.0242350223e-19   -9.9915277196e-20   -1.3220527468e-19   -2.1398008992e-20   8.0427013753e-20    
+-3.3123993133e-21   -5.4132597491e-20   1.1136550839e-19    -6.2461121556e-21   -1.8820301849e-19   
+-4.5970247072e-20   1.1392613677e-19    3.8259546850e-20    -1.0325426730e-19   -4.3685410928e-20   
+3.0984647545e-20    -7.3421933246e-20   -1.2300858342e-19   1.9775781575e-21    4.2942437107e-20    
+2.5746830215e-20    -2.9996007338e-20   1.4091672428e-19    1.3869267963e-19    -1.7023477123e-19   
+-2.6231957056e-20   -3.1548351642e-20   -1.1339197347e-19   9.7195000602e-20    4.1322370991e-20    
+-2.2452748695e-19   -1.5589942018e-19   -1.0042408702e-19   -1.3983950386e-19   9.0521640141e-20    
+2.0742100090e-19    2.1462747650e-19    -3.7447117381e-21   2.4968046924e-20    1.4665943733e-20    
+-3.3443733463e-20   -4.1759443203e-20   -1.8711442862e-21   -1.2470584852e-20   -2.2856989806e-20   
+-2.1629857669e-20   -4.5854126884e-21   3.1811663675e-20    7.7104648365e-20    1.4597777649e-19    
+1.0502748325e-19    4.5954484507e-21    1.7925630321e-20    6.5926469651e-20    3.1622581006e-20    
+7.9576478168e-20    3.4206267412e-20    -5.1180426688e-20   -3.4165963026e-20   -2.2886706629e-20   
+2.1200240535e-21    1.1203431847e-20    6.6794189786e-20    9.2972611611e-20    1.2116075311e-19    
+6.9126532868e-20    1.2621792834e-19    1.4092754911e-19    4.0752361699e-20    -3.5557153560e-20   
+-6.8795472001e-20   3.9490652310e-20    -8.4439820661e-21   4.3250260578e-20    2.3168873252e-20    
+-1.4164247040e-19   -7.4110678910e-20   7.2234180030e-20    -1.5943976385e-20   -4.7556571198e-20   
+1.3486989027e-19    -1.6913744368e-19   -1.6870034996e-19   2.8336277029e-20    -4.4241593425e-20   
+5.0266457876e-20    3.2900999333e-20    -7.0629130141e-21   1.4935163224e-20    -4.6798795874e-20   
+-1.3381588992e-19   -3.1623710689e-20   7.5672809990e-20    -2.9249040985e-19   -2.1322005944e-19   
+-2.7836206780e-20   -6.8285600552e-20   1.6941698088e-19    1.6847394835e-21    1.5839684892e-20    
+-7.3622332274e-21   -1.8671677386e-20   2.1657541148e-20    8.1581046236e-21    -7.9912111987e-21   
+-1.4265050402e-20   -3.6444100866e-20   3.1128565384e-20    4.6576526816e-20    3.2009240834e-21    
+3.0449210234e-20    -9.7374396437e-21   -1.0565716197e-19   -1.8257960694e-20   1.2231666194e-19    
+9.9472501692e-20    -1.3367612012e-20   -5.8839893205e-21   1.0129659210e-19    1.0229977396e-19    
+9.4381349062e-21    3.4169308720e-22    3.9213512002e-20    1.8830846834e-19    2.0814652219e-19    
+4.8772784691e-20    -8.0856650992e-20   -3.4403306059e-21   7.2920265946e-20    -9.6356616440e-20   
+-1.3126689746e-20   1.3597930121e-19    4.9893243964e-20    -1.3437043515e-19   7.2208632446e-20    
+1.5835760981e-19    -7.3150063406e-20   -1.6855069005e-19   9.9310738494e-21    1.9186823212e-19    
+3.7521805156e-20    3.2233198445e-20    8.5984104718e-20    7.0984249478e-20    5.1122311797e-20    
+9.1173537161e-20    1.9365278945e-19    -8.0597864469e-20   -7.9812230986e-20   1.1240597107e-19    
+-6.3493631442e-20   7.9155304619e-20    4.6102126517e-19    2.6925677685e-19    -3.4987451574e-21   
+-3.4390118083e-20   -2.1806947650e-19   -1.2507385203e-19   2.2890530037e-20    2.7076691186e-21    
+4.3261398603e-20    -2.5693361045e-20   -1.6106940503e-20   2.4732743100e-20    3.2935308075e-22    
+8.1490914736e-21    -1.3116583865e-21   -6.0971199293e-21   -1.5201038107e-20   1.7215156684e-20    
+7.4511357397e-20    -4.2633513825e-20   -9.1845898431e-20   -2.0778316714e-20   -3.2098811381e-20   
+-1.1795321819e-19   -9.4818221305e-20   -3.8175461816e-20   -4.7215804759e-20   -7.5000961340e-20   
+-5.9353203099e-20   6.7864318917e-20    1.0166973085e-20    -2.3273806343e-21   5.2290824203e-20    
+4.2314542128e-20    -1.6171667120e-20   -5.3534223949e-20   -3.8677441131e-20   -3.0345523333e-20   
+1.1623108881e-19    1.4842178080e-19    7.3693241223e-20    -6.4442402304e-20   -3.1312158306e-20   
+1.0154171736e-19    4.0270992210e-20    2.6843720486e-20    2.9192415720e-20    -1.0852916318e-19   
+-1.0612929217e-20   4.7805351060e-20    -1.2247315335e-19   1.5258234822e-20    8.2542082481e-20    
+2.5084866840e-20    1.6600445982e-20    -2.6051635368e-20   -4.1795573785e-20   -9.3701680862e-20   
+2.4063777277e-20    2.1543353167e-19    9.0445244292e-20    -6.9968631978e-20   -9.1916113302e-20   
+1.3835467938e-19    1.1853835146e-19    8.9692036507e-20    7.7266623328e-20    -1.8124459366e-19   
+2.4478466224e-20    8.3458326671e-22    -5.1210841902e-20   -1.1992943187e-20   1.2583443955e-20    
+2.0673910620e-20    2.0918794787e-20    1.2533093365e-20    -1.9553719018e-22   -2.4314443159e-20   
+-2.9544487184e-20   -6.3872107886e-20   -1.2864821511e-19   -1.5480673902e-19   -4.0639342583e-20   
+-3.2221643894e-20   -8.7887732330e-20   -1.1235469816e-20   4.2901820758e-20    -1.0318584099e-20   
+-8.3255290496e-20   -1.1120512419e-19   -6.9079618773e-20   -2.8601263443e-20   -9.1429440245e-20   
+-1.1334069987e-19   -5.6757607757e-20   -8.7098215546e-20   -4.0562770115e-20   1.4572535327e-19    
+1.7444367522e-19    1.3225750522e-19    3.0068851071e-20    -1.4205122206e-19   -1.2665779954e-19   
+-2.3253627865e-20   -1.4440407286e-19   -1.3664025008e-19   4.1003681843e-20    1.2755494349e-19    
+8.1472273435e-20    -8.9047107600e-20   -1.2512036896e-19   -1.1267727623e-20   3.7208768154e-20    
+3.4549587514e-21    -1.2976943794e-19   -1.1313619834e-19   1.0102473518e-19    1.8358697386e-19    
+-1.5079690445e-19   -1.5648682072e-19   1.6967872052e-19    2.9007426822e-20    -3.3164679683e-19   
+-3.0689368906e-19   -1.3873071448e-20   5.4164858776e-20    1.7853497208e-19    -2.2603785099e-20   
+-3.2055132503e-19   -8.5230183931e-21   -6.9280300551e-21   2.3739270950e-20    3.2407824270e-20    
+-7.9202284849e-21   -3.1173184826e-20   -2.1773105742e-20   7.4493803318e-23    3.7395539389e-20    
+5.5317748728e-20    2.5416057464e-20    -1.7692044452e-20   3.4910121029e-20    1.5271996293e-20    
+-6.6525174722e-20   -4.1394277244e-20   1.5886524902e-20    -3.8189671329e-21   -4.7074948233e-20   
+2.3510737010e-20    1.1926511606e-19    1.0288539280e-19    2.4121202116e-20    1.6584409311e-21    
+-5.1409455634e-20   -1.8978095760e-20   -5.0346477471e-20   -2.7962375880e-20   1.0079798110e-19    
+7.5521918926e-20    1.1885464504e-19    -4.8355261019e-20   -1.4029847041e-19   5.3194245424e-20    
+8.5863911029e-20    6.8262836700e-20    -8.1116682065e-21   -4.3670827339e-20   9.0162020846e-20    
+1.0959816737e-19    6.8953743759e-20    -1.7960015192e-20   3.0748562816e-20    6.6287540326e-20    
+1.2239316954e-20    -5.2026635179e-20   -1.2065364271e-19   -1.2308337671e-20   7.9692470957e-20    
+6.4331467432e-20    1.1432319587e-19    1.0779936998e-21    -2.1455102675e-19   8.9588332568e-21    
+4.3900880965e-20    -8.0084217918e-20   -2.6641953155e-21   1.3089078238e-20    -9.9036656476e-20   
+-5.3933368818e-20   7.8167681450e-20    -3.0734118228e-20   1.5838728121e-20    2.3802812661e-20    
+9.9776912524e-22    -2.0316584264e-20   -5.2725043698e-20   -4.8856820558e-20   -2.9835911585e-20   
+1.2005086599e-21    -2.1087297739e-20   -3.1893718841e-20   -9.2488587403e-21   1.5562577696e-20    
+5.4520016156e-20    7.5519926581e-20    9.1469627927e-20    4.6477896129e-20    2.0650400561e-20    
+-2.5357744729e-20   -2.7417382934e-20   5.7864959872e-20    1.8171519890e-19    1.4384169324e-19    
+-3.9752300458e-20   5.6694938880e-20    9.3236202018e-20    1.3557765354e-20    1.1740131605e-19    
+9.2021669894e-20    -1.3224369560e-19   -1.6029881750e-19   -1.3274931943e-19   -3.3091710749e-20   
+1.7058230692e-19    2.0173823687e-19    1.3032383161e-19    1.9375743666e-20    4.0007549892e-20    
+-4.6216391433e-20   -1.9809892967e-19   -1.5232862444e-19   4.6209993565e-20    1.6297066126e-19    
+-1.0114315103e-19   -4.9739369171e-21   4.2843293133e-20    -5.0167319243e-21   1.5134531011e-19    
+2.5920843646e-20    3.0297917670e-21    2.6939505796e-19    2.0909509584e-19    -1.9041091403e-19   
+-1.8755068773e-19   -1.7075652514e-20   7.5474617800e-20    6.9779661334e-20    6.0763485818e-20    
+1.9387597629e-20    1.4725593441e-20    7.8984619587e-20    1.2783262269e-20    1.1022143376e-20    
+-4.3350253401e-20   -1.6526073890e-20   1.3168237852e-20    2.3019651674e-20    -1.3271008631e-20   
+-2.4997130219e-20   -8.4041494976e-22   -4.4843937823e-20   -8.8157930570e-20   -6.8309924862e-20   
+-9.9881149345e-20   -8.9941868569e-20   2.9784010012e-20    8.1281364744e-20    9.1153457106e-20    
+1.1605603694e-19    5.7010651732e-20    -8.7530230852e-21   -2.6331814895e-20   9.0245559822e-20    
+8.3484371853e-20    -7.5291864631e-20   3.2463833412e-21    3.7946120814e-20    3.7308964550e-20    
+-6.8780670641e-20   -1.2408385556e-19   2.7964305514e-20    -3.9824226194e-20   -6.0068504561e-20   
+9.8939914228e-20    -9.1564474723e-20   -1.3893712816e-19   -7.8587412303e-21   -3.2438681182e-20   
+1.1926951581e-20    -1.9823846541e-19   -1.8012022749e-19   1.2684834753e-20    -8.3247870437e-20   
+-1.5462339972e-19   -1.4095201145e-19   -5.3014287867e-20   -8.1384318518e-20   -1.8327764108e-20   
+8.1798712567e-20    7.8143164858e-20    1.2113889987e-19    1.7433941692e-20    9.2677746130e-20    
+1.5125184048e-19    -6.1381874846e-20   3.7889802405e-20    -1.1164753489e-20   -1.1894975169e-19   
+-1.4854032685e-20   -6.0837639754e-21   -5.5301574889e-20   -1.3954049796e-19   3.3662135836e-20    
+-2.6501735907e-20   5.8382692917e-21    2.2415681896e-20    2.9676900296e-20    1.1907191984e-20    
+-1.5368114962e-20   3.6634252975e-20    3.5571591206e-20    -3.0939165976e-20   9.2626866718e-21    
+5.6182060329e-20    6.1883389402e-20    3.0649383869e-20    -7.4331480397e-20   -4.8514032962e-20   
+4.4871039981e-20    -7.5717748502e-20   -9.0065775800e-20   1.4121992324e-20    1.5469797718e-20    
+-9.5972780846e-21   -3.0391607174e-20   -2.4545565779e-20   -8.9949439162e-20   -7.5847623339e-20   
+4.1619542128e-20    -2.7405622236e-20   -8.6359161480e-20   8.2919577754e-20    9.1686047754e-20    
+1.1520570292e-19    1.2764665233e-19    -1.4863608470e-19   -2.0167787690e-19   -3.0314860341e-20   
+5.8773668510e-20    -9.7501078740e-20   -1.3051256122e-19   1.1788675406e-19    1.0849111009e-19    
+-1.4983726654e-19   -1.7675150939e-19   1.9669258664e-20    -1.1923972799e-19   -1.1174955296e-19   
+5.8841056120e-20    -7.9347156019e-20   -1.2383738768e-19   -3.9917092857e-20   -3.2214568913e-20   
+-1.0567456723e-19   -7.6448113879e-21   1.0426688708e-19    1.7496694666e-19    7.5823081514e-20    
+-1.1946922058e-19   -1.0388671644e-19   -1.0529589012e-19   -1.4381655768e-19   -1.8206078877e-19   
+1.0905444579e-19    -4.9801846703e-20   1.8680091882e-20    1.1097305912e-20    1.6794507184e-20    
+-2.0969513862e-20   -2.4821890477e-20   3.1199277055e-20    -2.9770049361e-21   -4.4909585893e-20   
+1.6058797007e-20    3.7656673153e-20    7.7993913584e-20    7.7936549621e-20    -7.0755416209e-21   
+-1.9065344028e-20   -1.0137273479e-20   -6.6943380440e-20   -5.5671093172e-20   -3.4099143581e-21   
+3.4494028000e-20    -7.9369019815e-22   -4.6927099506e-20   -7.7266096745e-22   -6.4009220723e-20   
+-7.6516675560e-20   2.1830457633e-21    5.6784652910e-20    8.5844898938e-21    7.1428883459e-21    
+4.4884288304e-20    1.1909012698e-19    6.3772782303e-20    -4.6557062855e-20   1.2883978876e-20    
+2.5670277363e-20    2.2621853083e-20    -6.6924229910e-20   -4.6275621288e-20   5.4764675044e-20    
+5.7003033135e-20    2.7109200950e-20    1.0043923608e-20    5.0213100079e-20    -1.0708977718e-21   
+6.4020634323e-20    1.3548320872e-19    -3.0794417051e-20   -1.9035004313e-19   -1.9205679551e-19   
+-8.9294807865e-20   -1.4831772758e-19   -1.4043700877e-19   3.1501826185e-20    5.4231032887e-20    
+1.3384558174e-19    5.2518573054e-20    -7.4090611086e-20   1.2031737413e-21    -3.1391680568e-21   
+-2.9161943403e-20   
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    8.5078162895e-06    8.5232690317e-21    2.1175823681e-20    3.3246043180e-20    
+4.2563405600e-20    6.7550877544e-20    7.7079998200e-20    9.3597140672e-20    9.5291206566e-20    
+9.7408788934e-20    1.2705494209e-19    1.4653669987e-19    1.1985516204e-19    1.2705494209e-19    
+1.7025362240e-19    1.6771252356e-19    1.7279472124e-19    1.9651164376e-19    1.8804131429e-19    
+1.8126505071e-19    1.6347735882e-19    1.7618285303e-19    1.9651164376e-19    1.6771252356e-19    
+2.3801625818e-19    2.3039296165e-19    1.8719428134e-19    1.8634724840e-19    1.9312351197e-19    
+1.9651164376e-19    1.8126505071e-19    2.1684043450e-19    1.6940658945e-19    2.1514636860e-19    
+1.8804131429e-19    2.1514636860e-19    1.9820570966e-19    1.7448878713e-19    2.0159384145e-19    
+1.7957098482e-19    1.8973538018e-19    1.7957098482e-19    1.9312351197e-19    1.8126505071e-19    
+1.7448878713e-19    1.8295911661e-19    2.0667603913e-19    1.8634724840e-19    1.5585406229e-19    
+1.5246593051e-19    1.9312351197e-19    1.8634724840e-19    1.6940658945e-19    1.6263032587e-19    
+1.8973538018e-19    2.0328790734e-19    1.6940658945e-19    1.8295911661e-19    2.1006417092e-19    
+2.5749801597e-19    2.3039296165e-19    -1.2248065629e-07   8.6192219828e-22    1.6709048374e-21    
+3.2491654461e-21    4.7579428834e-21    4.6057416507e-21    5.0689627937e-21    5.8498212920e-21    
+7.9409338805e-21    9.9791069098e-21    9.1717786320e-21    8.7482621584e-21    1.1276126110e-20    
+1.2599615090e-20    1.0164395367e-20    1.1355535449e-20    1.7814161672e-20    1.6808310047e-20    
+1.3102540903e-20    1.6305384235e-20    2.1758158833e-20    2.2552252221e-20    1.7814161672e-20    
+1.6623021590e-20    1.8952362195e-20    2.1122884122e-20    2.0275851175e-20    1.9217059991e-20    
+1.9693516024e-20    2.2552252221e-20    2.3822801642e-20    2.9910850950e-20    2.9593213595e-20    
+2.7263872990e-20    2.5199230181e-20    2.8746180647e-20    2.7687389463e-20    3.3034284943e-20    
+3.6951812324e-20    3.5522444225e-20    3.4781290397e-20    3.4622471719e-20    3.9387032047e-20    
+4.0339944113e-20    4.1928130889e-20    4.0975218823e-20    4.9657306533e-20    6.4268624873e-20    
+5.3468954795e-20    5.7915877769e-20    6.0986372202e-20    6.7762635780e-20    7.4538899358e-20    
+8.2162195884e-20    1.0884373372e-19    1.1900812909e-19    1.2239626088e-19    1.3721933746e-19    
+1.7787691892e-19    2.2446373102e-19    2.6512131249e-19    -6.3732119491e-09   3.2156646313e-23    
+6.0177389563e-23    7.2481701175e-23    9.1196662534e-23    1.2366350158e-22    1.4744494419e-22    
+1.5757790669e-22    1.9128551665e-22    2.2664748784e-22    2.4236391948e-22    2.7875986643e-22    
+3.0647041695e-22    3.2384120981e-22    3.2384120981e-22    3.6809537259e-22    4.3426982159e-22    
+4.4502316955e-22    4.1689902873e-22    4.1193594505e-22    6.0632338900e-22    6.2452136248e-22    
+5.3601303693e-22    5.3518585632e-22    5.8812541553e-22    6.6918911556e-22    6.3444752983e-22    
+6.4933678085e-22    6.3362034922e-22    7.3205484211e-22    8.8673761666e-22    9.0658995136e-22    
+8.3545241868e-22    1.0521737392e-21    1.0670629902e-21    9.5291206566e-22    1.0356301269e-21    
+1.2093380556e-21    1.0819522412e-21    1.1712877474e-21    1.3019822842e-21    1.2804755882e-21    
+1.6808310047e-21    1.7668577884e-21    1.8131799027e-21    2.1837568171e-21    2.3988237764e-21    
+2.3425754948e-21    2.5377901193e-21    2.7396221888e-21    2.9315280909e-21    3.2425480012e-21    
+3.9770843852e-21    4.3939834139e-21    5.3071908101e-21    6.3130424350e-21    7.9938734397e-21    
+1.0640851400e-20    1.3446648038e-20    1.6887719386e-20    1.8581785280e-20    -1.6504961113e-10   
+5.8241916177e-25    1.4960336860e-24    2.1180347325e-24    2.1713491080e-24    3.6770763167e-24    
+4.8112184847e-24    4.5688804146e-24    4.5365686720e-24    6.7466918711e-24    8.8469551452e-24    
+7.9616133958e-24    6.6368319460e-24    9.0666749954e-24    1.0171736595e-23    8.9180409791e-24    
+1.0391456445e-23    1.0249284777e-23    9.4350288619e-24    9.8486191682e-24    1.2872998283e-23    
+1.3532157833e-23    1.3532157833e-23    1.2821299495e-23    1.4488585417e-23    1.6233419521e-23    
+1.8249672264e-23    1.5716431639e-23    1.5251142544e-23    1.7784383170e-23    2.0576117737e-23    
+2.0653665920e-23    2.3419551093e-23    2.0808762285e-23    2.7969044462e-23    2.8382634768e-23    
+2.7374508397e-23    2.7917345674e-23    3.1122670547e-23    4.0118259709e-23    3.8774091213e-23    
+4.4099066407e-23    4.7304391280e-23    3.6602742105e-23    4.3943970042e-23    4.9734234330e-23    
+6.8655990842e-23    8.0753507300e-23    7.9822929111e-23    9.6159746209e-23    1.1394412938e-22    
+1.4868571511e-22    1.7660306078e-22    1.6419535159e-22    2.5435803836e-22    2.6387061540e-22    
+3.6313228891e-22    5.1781506346e-22    7.2461021660e-22    1.0488650167e-21    1.2076836943e-21    
+-3.4035190100e-12   1.1675141397e-26    2.2012374699e-26    3.2917587853e-26    5.0386123738e-26    
+6.2704975634e-26    7.6437466272e-26    7.7952079210e-26    9.7036202229e-26    9.9964453910e-26    
+1.2086611245e-25    1.2662164162e-25    1.5065350024e-25    1.5509636485e-25    1.7650289438e-25    
+1.7912822347e-25    2.1022827580e-25    2.1830621147e-25    2.2517245679e-25    2.2739388910e-25    
+2.7646734829e-25    2.6536018674e-25    2.7707319346e-25    3.1059662649e-25    3.0776934901e-25    
+3.4896682092e-25    4.1964875803e-25    4.8427224338e-25    4.4549815217e-25    4.0995523523e-25    
+4.4186308112e-25    4.3863190685e-25    4.8386834660e-25    6.5350499566e-25    6.0261400094e-25    
+5.4687624482e-25    6.6966086700e-25    8.0617797981e-25    1.0105497522e-24    9.7581462887e-25    
+1.0226666558e-24    1.1696850849e-24    1.1050615996e-24    1.1906877177e-24    1.1745318463e-24    
+1.4217166778e-24    1.6511300508e-24    1.8288446356e-24    2.6043264598e-24    3.2182495707e-24    
+4.1100536686e-24    4.9436966297e-24    5.9065865615e-24    7.5609477866e-24    9.9778661389e-24    
+1.2795450100e-23    1.6957202557e-23    2.8744526286e-23    4.5908523997e-23    6.8655990842e-23    
+8.1890880643e-23    -6.1431453343e-14   2.0825927898e-28    3.8535855220e-28    6.7210949125e-28    
+8.7169130027e-28    1.0965166583e-27    1.2211566813e-27    1.3994392459e-27    1.8254241347e-27    
+1.9500641577e-27    2.2088105346e-27    2.5464430021e-27    2.3066292869e-27    2.5306657839e-27    
+3.7265789163e-27    2.9471843419e-27    3.7392006907e-27    4.2945587680e-27    5.0581761243e-27    
+5.1181295531e-27    4.9351138231e-27    4.4428646182e-27    5.0171553572e-27    5.3516323810e-27    
+6.4939029718e-27    6.5317682952e-27    5.9385448945e-27    8.0590030077e-27    7.9138526012e-27    
+9.5294397351e-27    1.0854726056e-26    1.0122663136e-26    9.5294397351e-27    1.3252863208e-26    
+1.4035413226e-26    1.3593651119e-26    1.3139267237e-26    1.7493779434e-26    2.0623979506e-26    
+1.7367561689e-26    2.0270569821e-26    2.3678448931e-26    2.9938849075e-26    3.1756384601e-26    
+3.6653633100e-26    3.9531397682e-26    4.0086755760e-26    5.6141652903e-26    6.8359530603e-26    
+1.0057029908e-25    1.3126645463e-25    1.5630805520e-25    1.7771458473e-25    2.7868878060e-25    
+3.6108372443e-25    4.8629172730e-25    9.3704053766e-25    1.3829425866e-24    2.2165855477e-24    
+4.0583548803e-24    4.8855354929e-24    -1.0047273167e-15   3.7470892998e-30    7.9810536895e-30    
+1.0933119108e-29    1.7589132996e-29    1.9622915017e-29    2.0904813988e-29    2.6081713679e-29    
+2.7141745520e-29    3.4586620313e-29    3.5449436928e-29    3.7224373965e-29    6.2813049578e-29    
+6.2122796286e-29    5.9854821184e-29    6.4735898035e-29    6.8778810174e-29    7.4498051737e-29    
+7.1096089083e-29    8.7464952866e-29    8.8845459451e-29    1.0067837303e-28    1.1566673023e-28    
+9.8706220766e-29    1.2533027632e-28    1.3745901273e-28    1.4544622940e-28    1.5027800244e-28    
+1.5343344607e-28    1.6171648557e-28    1.6921066417e-28    1.9267927610e-28    1.9208763042e-28    
+2.1575345758e-28    2.4158865222e-28    2.4494131107e-28    2.8359549543e-28    2.9700613082e-28    
+4.6030033820e-28    6.4686594228e-28    6.2477783694e-28    5.4115858098e-28    6.4686594228e-28    
+7.6992824350e-28    9.7660980066e-28    1.3079313809e-27    1.3947060804e-27    1.4388822911e-27    
+1.9185097215e-27    2.6884379650e-27    4.5627714758e-27    5.1875493127e-27    8.2798840612e-27    
+1.0501316370e-26    1.2874209973e-26    2.2113348895e-26    3.8370194430e-26    5.7959188428e-26    
+1.4378725492e-25    3.0049920690e-25    3.0049920690e-25    -1.5077367222e-17   -2.5711164758e-32   
+1.9220780845e-31    4.0155639340e-31    -9.6103904225e-32   -4.8071211412e-31   -6.6560138878e-31   
+-2.4613384689e-31   1.7957370801e-30    3.0560656358e-30    1.4783438253e-30    5.7161600749e-31    
+2.4898422321e-30    2.8318873902e-30    1.6863442593e-30    9.4370567275e-31    8.9286112222e-31    
+-2.1878564168e-31   1.1139578798e-30    5.3849001245e-30    6.8871254811e-30    8.2907432246e-30    
+8.0087870807e-30    3.4743776197e-30    2.0091301180e-30    4.6854023687e-30    6.4803690769e-30    
+6.0890201122e-30    4.0983789217e-30    1.6054552016e-30    6.1321609429e-31    2.6377536518e-30    
+3.6854595416e-30    4.0244232118e-30    5.3926038443e-30    5.6206339497e-30    5.9842495232e-30    
+5.6452858530e-30    7.3092893249e-30    1.0255191768e-29    1.0698926027e-29    1.1130334335e-29    
+1.7354939915e-29    2.4134213319e-29    2.6254277002e-29    2.6722663164e-29    3.4216841764e-29    
+5.3839756781e-29    6.8828113981e-29    8.0069381880e-29    1.1892078146e-28    1.3607850615e-28    
+2.1338687486e-28    3.4552107649e-28    5.1433731020e-28    1.1328042599e-27    1.7733593149e-27    
+3.0797129740e-27    8.4818324529e-27    1.6559768122e-26    1.9790942390e-26    -1.9597619880e-19   
+1.8038816573e-31    1.8275570539e-31    9.7996732248e-32    2.5996443131e-31    4.2300643816e-31    
+1.0340197501e-30    1.5053971225e-30    1.8544598879e-30    3.1731260652e-30    2.3103455613e-30    
+-5.6361136116e-31   -6.6404860776e-31   -1.2600396661e-31   -1.3553852354e-30   -1.1893941483e-30   
+1.0508355259e-31    -4.3326201511e-31   7.1037925999e-31    2.6471425603e-30    1.8915039466e-31    
+-1.3029156815e-30   -7.2470336395e-31   -4.9703437040e-31   -4.2500459048e-31   -8.6984625938e-31   
+7.2145335717e-31    1.6459478787e-30    -8.9459445917e-32   -2.8628948623e-31   4.5495280111e-31    
+2.9808580714e-31    -2.4343754497e-31   -2.5605238611e-31   8.0542390274e-31    1.4252844553e-30    
+1.6042033472e-30    1.1245504945e-30    -4.9111213582e-31   -1.5576921390e-30   -9.9801689718e-31   
+-3.1200065099e-32   5.5274189404e-31    -1.5022253566e-31   -2.0592042965e-30   -2.2379305954e-30   
+-4.0367491634e-31   1.0168910106e-30    2.3573382519e-30    2.2186712959e-30    3.8518598888e-30    
+5.6206339497e-30    8.7514256673e-30    1.2005476901e-29    2.3271396704e-29    3.7668108224e-29    
+7.0997481470e-29    1.5540559833e-28    4.7647198675e-28    1.0791617183e-27    1.3820843059e-27    
+-1.0200781414e-20   -1.0649941203e-31   -1.7211701132e-31   1.7197802087e-31    5.7056370495e-31    
+9.0903606554e-31    1.2891046573e-30    5.4108004968e-31    -1.4587064869e-30   -3.1937706612e-30   
+-2.1757256913e-30   -3.5396899666e-31   -1.7384019200e-31   -8.5352701237e-31   -2.1912993928e-30   
+-1.3344856982e-30   6.2080170040e-31    1.4882194825e-30    4.6421607276e-31    -1.6860549937e-30   
+-1.7158191689e-30   -2.1066178612e-30   -1.0030611785e-30   1.6943206938e-30    1.0925890852e-32    
+-2.4020190743e-30   -1.1828911255e-30   1.5699172803e-30    2.9862724924e-30    2.5405212730e-30    
+4.8193161898e-31    -4.7061753287e-31   1.0045590405e-30    5.2836308160e-31    -8.6284369848e-31   
+-1.0634533763e-30   -2.7072556487e-31   8.3084015948e-31    1.6320902109e-31    -3.8570358255e-31   
+-5.1206866103e-31   -1.4028654271e-30   -1.1974950912e-30   4.5963521829e-31    3.0246729777e-31    
+-1.4913920007e-30   -1.1655728023e-30   1.4901882945e-31    4.5991207072e-31    6.9988294179e-31    
+1.3115582921e-30    9.4832790462e-31    9.3215009308e-32    1.0862244886e-31    5.8702344705e-31    
+1.2942249226e-30    2.8103169748e-30    6.6313619845e-30    1.8439623660e-29    6.0742289702e-29    
+8.5985838669e-29    -2.4692240468e-20   -7.1311693931e-32   -2.9418918443e-31   -2.6133609215e-31   
+-6.2884245792e-34   -1.9878907218e-31   -8.6730197239e-31   -5.1977426159e-31   5.0170512667e-31    
+5.5261794991e-31    9.1010637666e-31    1.2767951626e-30    -5.3025515731e-32   -6.6397111917e-31   
+-1.3040710984e-31   -9.6129558214e-31   -8.2170685049e-31   1.1548519177e-30    2.8263021934e-31    
+-2.5714866154e-30   -3.6184488404e-30   -2.9209044741e-30   -1.0208305154e-30   -3.2139708263e-31   
+-5.5202117494e-31   1.1737301689e-30    1.5429832252e-30    5.2384523363e-31    2.6753057122e-31    
+-8.5010848672e-31   -8.9650985668e-31   -3.5251890683e-31   -2.7976314160e-31   -4.7036701152e-33   
+-7.7514956295e-31   -8.4741820333e-31   4.5217524902e-31    6.4413479306e-31    1.9375306630e-31    
+8.0141104715e-31    1.2860081231e-30    9.5438292304e-31    1.0603891917e-30    1.9317810851e-30    
+2.7820751941e-30    1.4294259570e-30    -7.4726420385e-31   -1.2076197651e-30   -4.1409600290e-31   
+8.4891380830e-32    -4.5743845445e-31   -1.1089745361e-31   5.5969931596e-31    3.3694144377e-31    
+-1.3192620119e-32   1.8469668167e-31    3.6592668943e-31    4.0829714821e-31    8.8438703046e-31    
+2.7733391199e-30    4.7454913830e-30    2.1490718163e-21    1.6804820220e-32    4.7658866802e-32    
+-4.3315086037e-32   -2.5405103644e-31   -2.2061287712e-31   4.4935199371e-32    5.4261618570e-31    
+1.3694723597e-30    2.1887879726e-30    8.3610044968e-31    -9.1960907299e-31   -4.3328383229e-31   
+9.3818066122e-31    2.8026365769e-30    2.6830880491e-30    8.2607498750e-31    -3.3135568269e-31   
+-1.7026387739e-30   -2.8239234630e-30   -3.0297985092e-30   -2.1449328174e-30   -1.6377867506e-30   
+-2.6152488595e-30   -2.7692630697e-30   -5.4643785889e-31   8.1174119746e-31    -3.4827922784e-31   
+-4.6482643644e-31   5.3101514967e-31    1.2543890178e-30    1.5555217063e-30    1.2711156441e-30    
+1.1522000025e-30    8.3724312423e-31    5.0636158893e-31    2.1381960123e-32    -7.9603800353e-31   
+-5.6348045811e-31   -1.1794703429e-31   5.5823004206e-32    6.7990292325e-31    5.0958827391e-31    
+-1.0490931612e-30   -1.3359047550e-30   4.2477344127e-31    1.6692380894e-30    1.4152199668e-30    
+6.0869918672e-32    -7.6741537436e-31   -9.9052683526e-31   -8.4158925598e-31   -9.6118950553e-32   
+4.1743026912e-32    -1.8751335421e-31   7.2414965909e-32    1.1139097316e-31    -1.0279651078e-31   
+-2.1377822383e-32   1.3019286424e-31    2.6577833233e-31    2.9107928906e-20    8.0124704218e-32    
+2.2516669522e-31    1.0849906898e-31    -3.5290691400e-32   8.1514232580e-32    -4.8090743426e-32   
+-3.7578523142e-31   -8.6998487368e-31   -1.7188268358e-30   -1.4038377960e-30   8.4108294705e-31    
+2.2225374498e-30    1.4964460622e-30    7.7983235629e-31    1.1120799101e-30    6.6712069172e-31    
+-2.0140976631e-31   1.3288495319e-30    3.3119869307e-30    2.6608219291e-30    1.4246370871e-30    
+2.3327773789e-30    3.0956750934e-30    2.2086895621e-30    1.1018027040e-30    5.4882646342e-31    
+4.1557957081e-31    -6.4912866922e-32   5.1034698498e-31    1.1464395159e-30    4.3535542949e-31    
+8.2733737439e-31    1.1487006028e-30    2.7906348736e-31    -9.1511012697e-32   -1.4246841069e-31   
+1.7715895345e-31    6.3600187679e-31    5.9447438852e-31    4.6024459456e-31    3.1188479427e-31    
+-6.5669847669e-31   -1.9911783444e-30   -2.2277968937e-30   -9.9741504407e-31   5.7351936795e-31    
+1.0210799083e-30    3.4458648287e-31    -6.7782201613e-32   3.0444363291e-31    3.5811764536e-31    
+9.4824402134e-32    3.8793946684e-32    -3.1157709687e-31   -3.8837430572e-31   -1.6858507398e-31   
+-1.5262994809e-31   1.6298182154e-32    7.0777925456e-33    -9.3840936540e-32   5.4123246599e-21    
+-5.5874537879e-33   6.8134755879e-32    8.6245738401e-32    3.3688201078e-31    4.8520776875e-31    
+-1.3805287775e-31   -5.7259477111e-31   -1.5795935736e-31   -1.1766547988e-31   -2.9257001149e-31   
+3.0243231505e-31    6.1931963712e-31    -3.4733347211e-31   -2.1432764989e-30   -2.9799868891e-30   
+-2.2554949260e-30   -4.6700039569e-34   2.1643660900e-30    2.2437569096e-30    2.8257089919e-30    
+2.5973260501e-30    6.1843265610e-31    4.3123151319e-31    3.2720646975e-31    -6.9559248145e-31   
+-3.2822900878e-31   3.1364276958e-31    -4.9724689978e-31   -7.8137911878e-31   -4.7875627960e-31   
+-1.1455980500e-30   -1.7514149246e-30   -1.8493729125e-30   -1.4059807692e-30   -1.9234924393e-31   
+8.9764735906e-31    1.2350070907e-30    5.7560855055e-31    -6.7247756053e-31   -1.1042259151e-30   
+-6.6923507692e-31   -6.7901067602e-32   1.6552051318e-31    4.4794723094e-31    3.2725837959e-31    
+-6.0179517926e-31   -3.6514127113e-31   7.1099916869e-32    -3.0671449991e-31   -2.4685907989e-31   
+-1.2972492345e-31   -3.0948640963e-31   -1.9652159060e-31   -9.4239664224e-32   -3.0129518884e-32   
+6.6105194352e-32    -5.7580039122e-32   2.7944039787e-32    -7.5652935628e-33   -1.7439897500e-31   
+3.3762350287e-21    -4.9750682509e-32   -1.4832011560e-31   -1.9915460391e-31   2.0140111467e-31    
+7.3622038740e-31    7.0381388894e-31    4.9581580593e-31    2.9355225457e-31    -8.8587628777e-32   
+-1.7199551223e-31   -3.8450502500e-31   -7.9348106822e-31   -2.8406206550e-31   9.6349159366e-33    
+-7.9582942381e-31   -6.4136852572e-31   6.2231968678e-31    4.8282913243e-32    -1.1699245765e-30   
+5.1179117383e-31    1.8807334091e-30    -3.9451001007e-32   -1.6439947713e-30   -1.2674211124e-30   
+-1.1146605433e-30   -1.1270169638e-30   -4.2124188008e-31   4.7097262620e-31    9.2810338325e-31    
+5.6243624297e-31    3.2527706035e-31    2.6733205374e-31    2.3774984502e-31    8.3170908490e-31    
+6.2395841995e-31    -7.7682986160e-31   -1.0598132935e-30   -1.3525595351e-31   -3.6146357248e-32   
+-3.0963273517e-31   -2.5427992870e-31   1.5912996165e-32    2.3470766564e-31    1.9531637975e-32    
+1.5765241228e-31    2.0098884529e-32    -7.9165275132e-31   -9.3724177037e-31   -2.2913347143e-31   
+2.0382662971e-31    -9.4361915637e-32   -2.2284307202e-31   1.1022789203e-31    4.3002855929e-31    
+4.9683876814e-31    2.5130827899e-31    3.7997995950e-32    1.2100858582e-31    6.9638918450e-32    
+-8.1388595744e-32   3.1132053915e-20    4.3741555387e-32    4.5283075169e-32    7.9774218822e-32    
+-1.1209815056e-31   -2.9176258793e-31   -1.6023995746e-31   -1.3205517643e-31   -2.3793246983e-31   
+3.1691967167e-31    1.1551154165e-30    7.4820685628e-31    -4.3366638517e-31   -7.5409401410e-31   
+2.7846501968e-31    9.2929430009e-31    1.1029898593e-31    -1.2226808570e-30   -1.8394316158e-30   
+-1.6350859348e-30   -2.0478063272e-30   -1.9661063194e-30   -1.1845973791e-30   -6.7174386398e-31   
+8.8042533238e-31    1.7875624103e-30    8.0999648173e-32    -1.4264445272e-30   -1.0810681121e-30   
+-4.8878522124e-31   -1.4075538628e-31   2.8073250126e-31    1.0479789806e-30    1.5848620452e-30    
+7.9378932986e-31    -3.6483432604e-31   -8.0584971382e-31   -5.1648776747e-31   5.7811000253e-32    
+9.5318673999e-32    2.6744584159e-31    5.3798407968e-31    1.7579602652e-31    -5.0458612227e-32   
+-4.0523973442e-31   -9.0417295138e-31   -5.4485103556e-31   -1.5662324346e-31   -1.3686515825e-31   
+1.1974619893e-32    4.2687165166e-31    5.1443845764e-31    2.7186005798e-31    1.4954695555e-31    
+-3.1326454252e-32   -1.1627802039e-32   -6.8338915738e-32   -1.1460486875e-31   6.3912286131e-32    
+8.9121655860e-32    1.6202637974e-32    6.2023858200e-20    -8.3388041105e-33   -6.5794534705e-32   
+-7.0753099016e-32   -2.8255084996e-31   -3.6144937251e-31   1.9723779580e-31    1.7687989109e-31    
+-2.3407571988e-32   7.5992079854e-31    6.9979755388e-31    -1.8694328647e-31   -1.6693562030e-31   
+1.6039159623e-31    3.1456830681e-31    7.2017554779e-31    7.5168820035e-31    -3.5061780332e-31   
+-7.5851170995e-31   7.0953215174e-32    3.9294989397e-32    -1.9017153485e-31   3.2406705348e-31    
+7.6521522510e-31    6.6355447696e-31    3.2254286049e-31    -2.1588170044e-31   -6.3193034052e-31   
+-7.5100848249e-31   -5.6368433585e-31   -8.2383910320e-32   -8.0143023122e-31   -1.5583346172e-30   
+-8.3578184369e-31   -3.9303866730e-31   -1.8243879212e-31   5.0960106328e-31    3.4120858230e-31    
+-3.6602148130e-31   -6.3902731713e-31   -7.0170730902e-31   -6.6480017183e-31   -2.8737583109e-31   
+1.4659110447e-31    1.1300017790e-31    -5.3088409380e-31   -7.4616093187e-31   2.9394129618e-31    
+8.6503632458e-31    1.4041759622e-31    -2.5855759967e-31   -2.3990730034e-31   -3.2635146218e-31   
+-2.7667638747e-31   -2.8609745748e-31   -9.0196715974e-32   9.5453902869e-33    -1.2343104458e-31   
+-3.8034107136e-32   5.0481934034e-32    1.4354948933e-32    8.5499575987e-20    1.0305605993e-32    
+-4.1904586855e-32   -1.1913118028e-31   -7.8306731674e-32   -1.0472262881e-31   -3.1030605833e-32   
+-1.0640593672e-31   -8.3082586547e-31   -1.7915109429e-30   -1.3359680436e-30   -3.1287954461e-31   
+-2.7314802363e-31   4.2874397907e-31    1.1663758589e-30    1.0281509300e-30    9.9913220622e-31    
+9.0779798787e-31    1.1309146621e-30    9.7537217401e-31    -2.2397737705e-31   -3.0544910376e-31   
+1.0793937380e-30    1.0964274034e-30    -1.5344508290e-31   -6.9452720145e-32   6.3052031153e-31    
+1.1883758881e-30    1.5841450877e-30    5.8268869408e-31    -3.1214396726e-31   1.0743228434e-31    
+2.1185455083e-31    -1.4013472526e-31   -3.8855749475e-31   -2.7081960442e-31   6.0347058785e-32    
+-2.7693951013e-31   -4.6861782890e-31   -1.0739843011e-31   -2.3174316293e-31   -5.0689009119e-31   
+-1.0168533948e-31   5.9460002536e-31    8.0629132353e-31    7.7921583301e-31    4.2718781263e-31    
+-3.9176123408e-32   4.1762662369e-31    4.4674822670e-31    -1.4777938820e-31   -1.1829874220e-31   
+1.9319484755e-32    1.8221403760e-31    1.1473577180e-31    -4.7817229400e-33   1.0866232163e-31    
+4.4856112111e-32    7.3999344215e-32    1.1048819350e-31    4.4735741489e-32    5.8939434756e-20    
+-7.7153806815e-33   9.5181188179e-32    2.3657437418e-31    2.7607312377e-31    6.4832369069e-32    
+-4.1052099544e-31   -3.4095448744e-31   2.5061335024e-31    1.1305556720e-31    -2.7776555352e-31   
+1.6676486799e-31    4.0892316948e-31    -3.1079506398e-31   -7.7827713024e-31   -6.4881645793e-31   
+-2.3093456388e-31   2.9846196533e-31    -3.0706808862e-31   -8.3936804185e-31   -2.8951692352e-31   
+-7.6779717493e-31   -1.1666877352e-30   1.5919842245e-31    5.5332794850e-31    1.2008135587e-31    
+6.5748916121e-31    4.0737104674e-31    -1.8462521161e-31   -1.5710623058e-31   1.0263250581e-31    
+8.8312765283e-31    1.1269925135e-30    7.8826469449e-31    6.0990891147e-31    2.4780549390e-31    
+2.9752006522e-31    3.7658926955e-31    2.3240181593e-31    5.2063002148e-31    4.6252862711e-31    
+2.4034778158e-31    1.5803609363e-31    4.0587468945e-32    4.1249733058e-31    8.9237512583e-31    
+9.5391310145e-31    2.7847968985e-31    -3.3291880806e-31   3.1759788489e-32    4.5262964812e-31    
+5.9502621259e-31    3.3484323337e-31    3.6533988265e-32    -3.8006788647e-32   -6.4964024437e-32   
+-1.2442560684e-32   -2.1618563626e-32   -6.4469752572e-33   5.0335984656e-32    1.1160764028e-31    
+-5.9838331034e-20   2.3097617638e-32    9.0469759801e-32    6.0083371892e-32    1.3592544456e-31    
+3.0123095983e-31    1.8771723195e-31    1.7294173816e-31    4.0274561753e-31    6.9036042662e-31    
+1.5337869097e-31    -5.2709768544e-31   -1.9912347681e-31   -7.6614701596e-32   -3.1953359495e-31   
+-3.2657678094e-31   -1.8923796899e-31   5.5553599709e-31    1.4713514207e-30    1.7373597737e-30    
+1.4769424480e-30    1.0309886674e-30    5.6143810721e-31    5.6578706015e-32    -2.7784623945e-31   
+-8.9017083883e-31   -1.2635900352e-30   -1.3054182855e-30   -1.7344330749e-30   -1.2669065280e-30   
+-3.2980139704e-31   -7.5311383989e-31   -1.1018771833e-30   -2.0075788416e-31   6.6083884991e-31    
+3.7866829588e-31    -9.1203315296e-32   2.7855539168e-31    3.1227599879e-31    -2.4904681593e-32   
+1.0137425666e-31    1.4620591849e-31    2.0891825998e-33    -1.6717297612e-31   -5.3939382655e-31   
+-8.6536583915e-31   -5.5562100884e-31   4.2332842957e-32    -6.9052111670e-32   -1.3825920052e-31   
+8.2968460151e-32    1.8962886788e-32    -7.5065376532e-32   -3.9421378549e-34   6.7219468957e-33    
+2.2644723174e-32    -3.6529474367e-32   -6.7369932234e-32   -8.6715748062e-32   -1.4304393272e-31   
+-4.3787822845e-32   -9.4275050964e-20   5.0603433131e-32    6.5273414550e-32    1.0079692436e-31    
+8.3670571172e-32    7.1169247526e-33    2.2239657225e-31    2.8516025934e-31    -5.4420385539e-31   
+-7.0677989629e-31   -1.0411757835e-31   -4.9894111627e-31   -5.5220334718e-31   1.6967536850e-31    
+5.6409039862e-31    5.1971520476e-31    -3.2571011247e-31   -9.1049316132e-31   -3.1642427133e-31   
+-1.3800529374e-31   -5.2639615041e-31   6.6551600087e-32    7.4293198995e-31    9.4190011343e-34    
+-5.5638950003e-31   -4.5630330306e-31   -5.3151340646e-31   -6.5551395454e-32   7.5635068114e-32    
+-4.1893339725e-31   -7.4243235783e-31   -6.7034624822e-31   -2.9048816398e-31   -2.9751329437e-31   
+-3.6378616124e-31   -2.4249790181e-31   -4.6608708360e-31   -1.7667698901e-31   3.3810753417e-31    
+-9.4651228306e-32   -3.7231272706e-31   -3.8688622391e-32   1.3961487464e-31    1.6425474087e-31    
+1.6169836979e-31    2.2659769502e-32    -2.9076727335e-31   -2.5476517277e-31   -3.8168207532e-32   
+-3.2634581981e-31   -5.5169466963e-31   -2.6695946905e-31   1.2652080797e-31    2.9681965867e-31    
+1.2511924254e-31    9.0734622189e-32    8.4376984502e-33    4.5989100586e-33    8.7540286820e-32    
+-9.0238845691e-32   -1.2789679464e-31   -2.6728665910e-20   -6.0145061836e-32   -1.6424373824e-31   
+-2.0083951049e-31   -1.3553661454e-31   6.3568853702e-33    1.5216764967e-31    1.3643107170e-31    
+-3.1369336286e-32   -3.0746582888e-31   -3.8345566119e-32   5.8147784086e-31    2.7418020171e-31    
+-2.4258667514e-31   -3.8688622391e-32   1.2119403181e-31    1.4056683699e-31    7.0546588168e-32    
+-4.1291035228e-31   -8.7481709585e-31   -2.6956925459e-31   2.9960097234e-31    -2.5025014599e-31   
+1.6971862669e-31    9.6852910417e-31    1.1071701053e-30    1.3678620265e-30    1.2825457280e-30    
+6.4739382764e-31    1.3458864888e-31    3.4792074909e-31    8.7460428436e-31    7.8802997177e-31    
+1.8758632890e-31    -1.6686255157e-31   -2.2461355459e-31   6.9213107376e-33    2.7369270069e-32    
+-7.2761031446e-32   2.1610814767e-31    2.7022424004e-31    2.5444957605e-31    3.3085219495e-31    
+3.4017941349e-31    7.6599801030e-31    9.7269844158e-31    5.2543130465e-31    1.7919198268e-31    
+5.6961635054e-33    -5.1067236182e-32   -7.4556246418e-32   -1.6409412132e-31   -9.2640991907e-32   
+-1.4546789611e-32   -2.8226910747e-33   8.4687126932e-32    4.5126193693e-32    5.0450336746e-32    
+1.4241951012e-31    9.8560969537e-32    6.7371436867e-32    -5.5652843477e-20   -1.5994998651e-32   
+-6.8415652009e-32   -2.3910260392e-31   -2.4818287461e-31   3.2184659167e-32    2.9878245211e-32    
+-2.7005219469e-31   1.7379636957e-32    1.2728666605e-31    -9.8850235187e-32   3.8231420916e-31    
+3.5227007818e-31    -4.1347308494e-31   -4.9254078463e-31   -2.7163511538e-32   8.9572011256e-32    
+-7.7846125968e-32   1.0830572367e-31    3.4337224423e-31    2.6518475470e-31    -1.6276364979e-31   
+-6.2653134198e-31   1.0056589270e-32    5.7891780224e-31    2.4027443073e-31    -3.7374099972e-31   
+-7.5949752654e-31   -1.3291587339e-31   3.9694469397e-31    1.2426461113e-31    -3.9533473690e-31   
+-6.2498984571e-31   -4.4729121105e-31   -2.7289712611e-32   3.5016716581e-31    3.9933104154e-31    
+2.4711411514e-31    4.4901251094e-32    -9.2301697218e-33   1.2810443396e-32    -2.5377211514e-31   
+-4.9809363187e-31   -3.9890297352e-31   -1.8800235986e-31   -6.4072341442e-32   -1.7014161658e-31   
+-2.5913537865e-32   3.5918499423e-31    3.7303532695e-31    2.9299168482e-31    1.7657166471e-31    
+-7.7528084216e-32   -1.8201316912e-31   -6.0544917994e-32   2.9438140127e-32    -4.4524340585e-32   
+-4.1174275725e-32   3.9428901713e-33    1.0957789067e-31    2.0363699896e-31    -1.3387998825e-20   
+4.3061085218e-32    1.2445720412e-31    1.6231376459e-31    -2.4868758486e-33   -2.8319991092e-31   
+-3.6844553873e-31   -2.3767480147e-31   -8.2231942411e-33   4.2075315655e-31    3.3171378529e-31    
+-2.6708698668e-31   -1.9712570066e-31   -3.4131465891e-32   -2.6051914709e-31   -4.0040346855e-31   
+-3.5659382853e-31   -3.7144568243e-31   -6.4339977996e-31   -4.3890137873e-31   -3.2115182749e-31   
+-6.4201939694e-31   -3.7329224300e-31   7.7482945233e-33    5.3576023245e-32    -2.8179514815e-31   
+-7.3892280189e-31   -4.5006641216e-31   1.7687898596e-31    2.4616262299e-31    3.3114710298e-32    
+-3.6056433106e-31   -5.3222716663e-31   -4.4739202145e-31   -4.4752367682e-31   -2.8176844092e-31   
+-2.1959062021e-31   -7.9194841166e-32   1.3356136085e-31    3.5626694706e-32    -2.0334058631e-31   
+-2.1244060530e-31   1.9446024371e-31    3.4403879654e-31    -9.0679326934e-32   -4.3043857172e-31   
+-4.7797631559e-31   -4.7692457728e-31   -2.2894492214e-31   -9.1906731116e-32   -1.7685509991e-31   
+1.3539814131e-31    2.7192080753e-31    8.6301221735e-32    2.4021462158e-32    7.0010938902e-32    
+1.4451809668e-32    -6.5473342629e-32   -1.0279049225e-31   -5.5283969517e-33   1.6472381013e-31    
+4.3940155982e-20    1.0609165655e-32    6.7347738901e-32    1.5458066921e-31    6.1174442239e-32    
+-2.4599100082e-31   -3.6294902118e-31   -3.8029405159e-32   2.3245099861e-31    1.9016263636e-31    
+-2.7149969843e-32   -8.4630891282e-32   -3.5881729960e-33   6.7700199127e-32    2.8035446228e-32    
+-1.3389952707e-31   3.9119116634e-31    9.0623053669e-31    6.2574366673e-31    2.4802338353e-31    
+-7.6835776818e-32   -4.0053700470e-32   2.2129273603e-31    5.2120667199e-32    -8.9618936990e-32   
+1.1979430015e-31    2.0531993072e-31    4.1959016946e-31    8.8422264933e-31    5.8443021247e-31    
+5.7399483190e-32    7.8427337395e-32    1.7315549005e-31    4.9026954147e-32    -4.3308540884e-31   
+-6.1383750763e-31   -2.7566828352e-31   -1.6033780561e-31   -3.0366724240e-31   -8.9758867838e-32   
+1.6201977346e-31    2.2510020926e-31    6.9757934902e-31    6.7272838752e-31    4.9268447706e-32    
+-1.5739361544e-31   -6.9931569524e-32   -1.5749066425e-31   -3.0534114635e-31   -3.1216315133e-31   
+-3.5946015395e-31   -3.1778253154e-31   -1.6694163883e-31   2.0406581930e-33    -3.9451847363e-32   
+-9.6445455863e-32   -1.2973319893e-32   6.5858528618e-32    -8.4114990321e-32   -1.4460574154e-31   
+2.8332235041e-33    1.9403328220e-20    -5.6339093246e-33   -1.6992570177e-32   -1.5138298369e-32   
+-3.6199583632e-32   -1.1752686559e-31   -1.2494329455e-31   8.4175175632e-32    2.0344064439e-31    
+-1.1848155508e-31   -3.2062294907e-31   -3.2195266828e-31   -4.8668738700e-31   -3.2470285487e-31   
+3.5885491542e-32    2.2590105005e-31    1.9227438845e-31    1.3779426899e-31    4.6709462332e-31    
+4.9886249921e-31    1.3336801554e-31    2.3476709864e-31    3.3891310045e-31    1.4392677600e-31    
+1.6224379917e-31    1.4755030786e-31    -2.4753409576e-31   -5.5822628048e-31   -5.7250524546e-32   
+2.2229594993e-31    -1.2529528458e-31   7.4739623537e-32    1.0432023358e-31    -5.1707081267e-32   
+2.6640576419e-31    4.7515061525e-31    4.2403165731e-31    2.1885335016e-31    -1.2117183847e-31   
+-1.7809585771e-31   1.9704256970e-31    1.8605987896e-31    -1.8370813794e-32   -1.1371537218e-31   
+-1.0701662954e-31   2.1143424107e-31    2.6852052555e-31    1.1647888887e-31    9.8331136881e-32    
+5.8631025112e-32    1.0344425519e-31    3.5044777982e-32    -8.9307478007e-32   -5.2610848343e-32   
+-9.0371253375e-32   -2.1741266428e-31   -2.4558315130e-31   -2.2159761225e-32   2.3359423740e-33    
+-1.0874272545e-31   -9.0335048149e-32   -2.9467255356e-20   -4.7860863751e-32   -4.7625670841e-32   
+-2.1244286224e-32   2.0890932623e-32    1.0393532971e-31    1.7832757116e-31    5.7923471552e-32    
+-1.6673155448e-31   -1.6140139290e-31   -1.4731107125e-32   -5.4586760308e-32   5.0854095546e-32    
+3.3039647930e-31    3.2676391964e-31    7.5342417040e-32    -4.5410983060e-31   -5.9870090197e-31   
+-8.4204630582e-32   1.7158982562e-31    -7.6276605911e-32   -2.2686288654e-31   -8.4550957666e-32   
+-5.3908735166e-32   -3.7630639859e-31   -4.1424872313e-31   1.9251729260e-31    3.5238725146e-31    
+-4.7782622847e-32   -1.4227845080e-31   -8.3416840716e-32   7.7737228171e-32    2.6776087408e-31    
+3.3742142162e-31    5.0005026572e-31    3.4953822931e-31    -1.0655357881e-31   -9.9802291571e-32   
+2.3054585141e-31    1.7634145590e-31    1.2601449904e-31    -9.2973139591e-32   -4.7270220157e-31   
+-7.8523586872e-32   1.9063998110e-31    1.7375047827e-31    2.2148344824e-31    2.0047426088e-31    
+9.5155797501e-32    -3.9039201826e-32   9.8832132574e-32    1.5146837159e-31    5.2368743527e-32    
+4.7633664203e-32    1.4629694877e-31    4.6283256292e-32    -1.4792496142e-31   -7.0282901275e-32   
+4.0081160018e-32    -5.6348497201e-33   -3.0756198432e-32   -4.5410154845e-20   -1.6477233454e-32   
+-4.4100034145e-32   1.6784930855e-32    1.0179179225e-31    1.0821760861e-31    7.3220320599e-32    
+-5.9585338445e-32   -1.9839711535e-31   -1.0087170931e-31   1.6860522195e-31    5.0306799482e-31    
+7.7855887273e-31    4.7420551779e-31    -1.0623882844e-31   -2.1823833151e-31   -7.2324523374e-32   
+-6.6088173194e-32   -1.5169030493e-31   4.8435257310e-32    3.6583735186e-32    -9.7639758124e-32   
+1.9861904868e-32    -7.5507738566e-32   -4.4756806348e-31   -6.5758282460e-31   -2.0807735834e-31   
+2.4665670678e-31    1.0453060005e-32    -1.6219250060e-31   6.1119499633e-32    6.2139076413e-32    
+4.2197614087e-32    4.0476136406e-32    -4.3032497195e-34   8.7083630774e-32    6.3103075820e-32    
+-4.3544824653e-32   -5.7074482512e-33   5.6965396636e-33    4.0758150725e-32    1.4198918515e-31    
+-8.4911411254e-32   1.3596120310e-32    2.6472508939e-31    2.6548944283e-31    2.4803570271e-31    
+2.3266813593e-31    6.6197470659e-32    -7.1586289411e-32   -9.5080001626e-32   -1.4376681473e-31   
+-9.7545342418e-33   7.7915903313e-32    2.4644366018e-31    2.2848318796e-31    -4.1183303522e-32   
+-6.2658174718e-32   5.0555661040e-34    -4.0889900132e-32   -5.0388646803e-32   -3.2752419888e-20   
+2.9033393912e-32    2.9559263064e-32    3.9793399001e-32    8.2185768993e-32    1.2635710862e-31    
+1.8689344551e-31    1.8772663591e-31    -1.1308114596e-32   -9.6992389875e-32   -6.6632544628e-32   
+-7.8130689640e-32   -6.3437950651e-32   -1.6435705589e-31   -1.3662065543e-31   9.2233988743e-32    
+3.0693135511e-31    3.2378982489e-31    -8.4422123485e-33   8.9059401679e-32    4.9104104192e-31    
+2.8909073629e-31    3.0992425777e-32    8.2125301563e-32    2.8814168917e-31    2.9290949426e-31    
+-5.3960880095e-32   -3.0001926025e-31   -4.1944610087e-31   -1.6481408810e-31   4.0352407691e-31    
+4.3011958958e-31    1.8863957184e-31    8.2085804953e-32    -1.2294692898e-31   -1.7426506268e-31   
+8.4993789898e-32    2.0448260258e-31    6.2043532232e-32    2.4511220124e-32    -2.7054801820e-32   
+-6.8854628619e-32   -1.2718510334e-31   -3.8565750317e-31   -3.2326057032e-31   5.3126984403e-32    
+8.8565694052e-32    7.8144607494e-32    1.5087554628e-31    1.7780997748e-31    2.1739761795e-31    
+8.5896475520e-32    8.3850174954e-32    7.5923017210e-32    2.7788310295e-32    1.4840240021e-31    
+1.2918626492e-31    -7.1861261050e-33   4.0121032787e-32    -3.4319168829e-32   -2.1227058179e-31   
+-9.0789021731e-20   1.3207666447e-32    2.0250100122e-32    -3.0272458997e-32   -9.8503793492e-32   
+2.1266338498e-32    1.5314481462e-31    5.0294983413e-32    -4.2646841008e-32   5.5100592398e-32    
+1.7546180997e-31    9.7279962813e-32    -2.1703293259e-31   -3.8222844509e-31   -2.5244700387e-31   
+-1.3969762944e-31   -1.2388168209e-31   1.6521620121e-31    2.5938665232e-31    -3.5365114299e-31   
+-4.6873298033e-31   -1.1661430582e-31   -1.3907527571e-31   -3.0902110195e-31   -1.9194562619e-31   
+4.3596358325e-31    6.5602534160e-31    2.6960649425e-31    3.8326382051e-32    -6.3322846244e-32   
+-9.7516754395e-32   -5.2752424883e-33   1.0154315169e-31    1.1843114988e-31    9.3219946385e-32    
+-6.5887868957e-33   -8.4292160830e-32   4.1471440697e-32    1.5836861747e-31    1.2252920531e-31    
+2.5448982498e-33    -1.4320191916e-31   -1.2234733282e-31   -7.1856370993e-32   -3.2040101574e-31   
+-4.2725347574e-31   -1.2762182300e-31   8.7502671001e-32    5.9413434152e-32    -6.1630510537e-32   
+5.6062805054e-32    1.6432212020e-31    8.9260458233e-33    3.1299370862e-32    -2.2058668711e-32   
+-8.7054666594e-32   1.5215203911e-31    1.1909995915e-31    5.9809152570e-32    -3.2217949167e-33   
+-1.9759326529e-31   1.1338198501e-19    -1.5068144866e-32   -4.9570878893e-32   -8.8830509419e-32   
+-8.9717678516e-32   -1.1122226621e-31   -1.6408255445e-31   -9.5807491569e-32   9.7619633661e-33    
+-2.3592612431e-32   6.6295436358e-32    2.1764983202e-31    6.6165473703e-32    -9.9212851684e-32   
+-1.4966168380e-31   -2.2467383394e-31   -2.3085430112e-31   -2.8120608442e-31   -1.7864617714e-31   
+-8.3391261959e-32   -2.6624251153e-31   -8.5927320491e-32   2.0942024309e-31    2.9077931042e-31    
+3.5720621406e-31    3.8648787238e-31    3.2421977371e-31    2.8955867708e-31    4.6275465116e-31    
+2.8325577041e-31    -6.1967172119e-32   -1.5177028556e-31   -2.8375079459e-31   -2.6801948283e-31   
+1.6408020347e-32    1.1030387598e-31    -5.6158913472e-32   -1.3729021701e-31   -1.2918043447e-31   
+-7.3746189751e-32   -1.3773107441e-31   -1.3974558961e-31   4.7757796406e-32    2.3022141496e-31    
+1.4046254713e-31    -2.1780951117e-31   -1.6763865996e-31   -5.6514006806e-33   -8.0281186026e-32   
+-2.0188128060e-31   -2.7149744148e-31   -5.4581306014e-32   5.8742367937e-32    7.6700160035e-32    
+5.4158880364e-32    -1.9154501772e-31   -1.3838267444e-31   5.7925846051e-32    4.7265029174e-32    
+-3.6842061825e-32   -9.1602419138e-32   8.0248188036e-20    5.6761330817e-33    2.1598627242e-32    
+2.5915230577e-32    2.5213131311e-32    -1.0863730711e-32   -8.8573899003e-32   -8.9119022753e-32   
+5.5446846014e-32    5.9017527654e-32    -1.3441636842e-31   -1.0842759892e-31   3.3932290129e-32    
+7.1668291897e-32    6.9728444100e-32    3.2417171950e-32    3.8181937306e-32    -5.3435528160e-32   
+-3.4741970637e-33   4.1301793352e-31    5.7410278930e-31    4.9758095176e-31    3.2454477439e-31    
+1.0117639745e-31    -1.0807429234e-31   -3.4285088897e-31   -3.2607498591e-31   -3.4232915756e-31   
+-2.0000632009e-31   9.1096486370e-32    1.3323335091e-32    -8.1284776083e-32   -5.6202547822e-32   
+-1.5060809781e-31   -2.5613664554e-31   -1.6903721612e-31   -1.0626920321e-31   -1.1678508164e-31   
+-1.6339935714e-31   -1.8960253681e-31   -1.4402946718e-31   -1.5642839352e-31   -2.7794366442e-31   
+-2.6618759244e-31   7.5655286617e-33    5.9675992570e-32    -1.5871468301e-31   -7.0525617349e-32   
+1.3311335645e-31    7.5854556419e-32    -1.7804770946e-31   -2.0145151987e-31   1.3482261927e-32    
+1.3011311870e-32    -1.4588731250e-32   -9.3797302190e-32   -1.3255814695e-31   -3.9327339001e-32   
+1.6731328313e-32    -7.8842757098e-33   -4.1108071883e-32   3.9454119200e-20    -4.6752701716e-33   
+2.8130614250e-32    7.8878115968e-32    6.7367299127e-32    -5.6207437879e-33   -1.8709732325e-32   
+2.1194821422e-32    1.4257636809e-31    2.1686873953e-31    -1.7946507353e-33   -1.6167843341e-31   
+4.9449755955e-33    1.7573974385e-31    1.9962875131e-31    2.2666214737e-31    1.5169256188e-31    
+-9.5132663772e-32   -3.8371746729e-31   -3.1831597088e-31   8.2739379812e-32    1.4504810357e-31    
+-2.3917078260e-31   -4.4467315003e-31   -3.4966762773e-31   -3.7281414593e-31   -2.5866819018e-31   
+-1.1917838813e-31   -3.2605881111e-31   -3.7653435046e-31   -1.9822314218e-31   -3.3458518885e-32   
+8.5333977963e-32    1.8738771737e-31    2.2196493072e-31    1.9490608520e-31    1.3672325258e-31    
+4.3538241884e-32    4.8629731096e-32    -3.5261068943e-32   -1.4323803035e-31   -8.0648316421e-34   
+9.5943660835e-32    -1.7608341138e-32   7.4622262181e-32    2.4587316927e-31    2.1471109614e-33    
+-8.2062295066e-32   1.5407890945e-31    2.7855680227e-31    1.3984132187e-31    -1.5131583945e-31   
+-5.4158128047e-32   1.4530238651e-31    4.1171266460e-32    -6.8491635964e-32   2.9379835607e-32    
+-9.0629203855e-33   -1.0434026400e-31   -6.0426052005e-32   -4.1870920697e-32   7.1725669908e-20    
+9.4761771795e-33    -1.1691748932e-32   -1.8008949613e-32   7.2630880711e-32    1.2932699510e-31    
+6.0502482648e-32    2.3618596734e-32    -2.4713593232e-34   3.4014762812e-32    6.3298866159e-32    
+-3.6280081486e-32   7.1867373621e-32    1.8580333907e-31    6.2661183984e-32    8.3381105688e-32    
+1.4668664865e-31    5.9181720705e-32    -1.3435242153e-32   1.7337131081e-33    -8.3451259191e-32   
+-2.7647401436e-31   -2.3776545559e-31   1.6151762578e-33    2.8768578544e-33    -6.6358442855e-32   
+3.2433487812e-32    1.4043019752e-32    -8.8366236171e-32   1.2453845429e-32    1.4866825001e-31    
+1.9052219657e-31    1.4284113644e-31    1.8348319534e-31    1.8391022893e-31    -7.8369926251e-32   
+-5.0891946464e-32   1.0623271587e-31    1.3921765159e-31    1.5327543555e-31    -3.9448085781e-32   
+-2.1422961366e-31   -6.2699175961e-32   -1.1024557146e-31   -2.1008134111e-31   9.0672179929e-32    
+1.6674798789e-31    -9.1067146031e-32   -9.1054356652e-32   1.0637828909e-31    2.0289182958e-31    
+-7.7827129979e-34   -3.6963560921e-32   2.6223040826e-31    1.6092197928e-31    -5.8858224660e-32   
+7.5789104894e-32    7.9339285912e-32    -6.0456896977e-32   -5.3084948725e-32   -5.4407520929e-32   
+-1.2005227393e-19   -3.0092655381e-34   -2.2449685152e-32   -5.3487061832e-32   -1.5980775170e-32   
+6.9511024665e-32    5.1125164543e-32    -4.9695763413e-32   -1.1710594457e-31   -5.7681977993e-32   
+1.4249022786e-31    1.6620963499e-31    -4.6598476858e-33   -4.9026860107e-32   -2.9619448375e-32   
+-8.5315969389e-33   1.0422309073e-31    2.9851086590e-31    4.2431998257e-31    2.9126474256e-31    
+-6.1702215692e-32   -2.2194010428e-31   -5.3430261945e-32   9.8733061910e-33    -6.6233182177e-32   
+-1.4268056391e-32   4.1046381940e-33    4.0407665329e-32    2.3683389983e-31    2.7657999693e-31    
+8.6843265690e-32    1.0839275727e-31    1.3507163599e-31    -3.8496029396e-32   -3.7697821712e-32   
+-2.0970066902e-32   -9.6858853717e-32   -1.3328751769e-31   -8.5897592239e-32   1.4536181950e-31    
+3.6948063203e-31    2.7192250024e-31    1.5698209838e-31    7.5578456306e-32    -1.2524036548e-31   
+-1.7445765567e-31   8.0582488738e-32    -2.7070224306e-33   -2.2847999061e-31   -1.4599677453e-31   
+1.1456273904e-32    -7.4836672351e-33   -1.2516663848e-31   4.3925120585e-32    1.0087058084e-31    
+-6.2322641611e-32   -2.1835606903e-32   -7.1853737886e-33   -6.9213107376e-33   4.7702877310e-32    
+-1.6520867804e-32   1.7206023080e-19    -6.6324212460e-33   -7.0792971784e-34   1.6648009273e-32    
+5.2225803414e-33    -3.7786595046e-32   -3.1778596399e-32   2.9963068884e-32    7.4461266475e-32    
+3.1715589902e-32    -7.2316036304e-32   -1.3841060419e-31   -1.7251517477e-31   -3.5876463745e-32   
+1.7346516228e-31    8.3546427214e-32    -1.2034184542e-31   -7.2195665683e-32   1.3840101215e-31    
+2.1246733898e-31    1.3969838176e-31    2.4502643717e-31    3.0854676647e-31    7.1566164948e-32    
+5.7682542230e-32    1.2702862153e-31    -1.0346842335e-32   1.6282910132e-31    2.8732542589e-31    
+2.5062668034e-32    -2.9304980126e-31   -3.5347434864e-31   -1.6491452234e-31   -3.1192541935e-32   
+5.5087614941e-32    9.5466692247e-32    -2.6112149391e-32   -1.5445581996e-31   -6.9285329749e-32   
+4.6174546575e-32    -1.5542856504e-32   -5.0785117537e-32   1.2602503147e-31    2.5951868385e-31    
+2.3800882994e-31    1.0757635293e-31    1.7899675658e-31    1.7258814946e-31    -3.6497124763e-32   
+-6.7231506020e-32   -6.2383579238e-32   -4.9306815842e-33   -4.7005480022e-32   -1.0652912852e-31   
+-2.7438483176e-32   2.8428155380e-32    4.3374307442e-32    -1.1573691683e-31   -1.2947064051e-31   
+7.5694313029e-33    3.5475479112e-33    2.2214496929e-19    4.1573003409e-33    1.6592431900e-32    
+2.9833106228e-32    -4.0023231657e-34   -4.7996468779e-32   -9.8136851175e-33   5.3529661748e-32    
+2.7709693233e-32    9.2922358235e-33    -1.9486875150e-32   -5.9013201835e-32   -1.5644043058e-32   
+-7.2699717661e-32   -1.6188851776e-31   -1.2638539102e-31   -8.0373720941e-32   -4.0377760753e-32   
+5.9308156878e-32    2.2534245513e-31    1.3040200820e-31    -5.5057522285e-32   5.5815857201e-32    
+1.8034866912e-31    1.7622595183e-31    1.7542626302e-31    2.6670838346e-32    -1.2257490853e-31   
+-1.6949330793e-31   -1.3208399955e-31   -8.0498229303e-32   -1.8828711161e-31   -1.9609004311e-31   
+-8.7522983543e-32   -3.4982993999e-32   -4.5515141264e-35   1.0067761168e-31    3.7732428266e-32    
+-4.0019470075e-32   1.0507452479e-31    8.1422073823e-32    -8.6250816537e-32   -8.9531668290e-32   
+-8.2927082750e-32   -1.7662959308e-31   -2.5424043209e-31   -1.6113413250e-31   2.4196375717e-33    
+4.2462241375e-32    7.2965661502e-32    1.3275374921e-32    4.1147568493e-32    1.4306499758e-31    
+3.8112348040e-33    -6.6350308434e-32   2.5536468665e-32    7.1448615513e-32    -2.3952531169e-32   
+-1.3810492864e-31   -5.4078570590e-32   5.3060874601e-32    -2.3893007728e-19   8.0046463314e-34    
+-5.1582572905e-33   -2.0989627128e-32   -3.0474832104e-32   -3.7699326345e-32   -7.4434183085e-33   
+3.9129855950e-32    1.6387707804e-32    2.1232155123e-32    7.7651840262e-32    6.7850662404e-32    
+4.1112033299e-32    5.5018777991e-32    -6.2667954831e-33   -4.1989786686e-32   5.2225803414e-32    
+1.8910553780e-32    -1.3193729786e-31   -2.1349018069e-31   -2.5164719752e-31   -2.2896471746e-31   
+-1.7077882855e-31   -1.6289229589e-31   -1.6138540618e-31   3.1669110855e-32    1.0304778445e-31    
+-1.3111332334e-31   -1.3477508228e-31   7.9865155065e-32    2.5357087051e-31    2.5599222431e-31    
+9.5808808123e-32    -9.3049875862e-32   -1.2808713068e-31   -5.4659546918e-33   8.0892066930e-32    
+7.8917236420e-32    -8.2620137665e-32   -1.0279669886e-31   1.5040534854e-31    2.0633555783e-31    
+7.5105249300e-32    2.4065660746e-32    1.5878389612e-32    -1.6912222787e-31   -3.0953342941e-31   
+-1.8774694845e-31   -1.4417993046e-31   -3.3426169281e-32   -3.6595960328e-32   -1.1240660028e-31   
+1.3090154627e-31    6.1223507373e-32    -4.1457146686e-32   8.1397623540e-32    -4.7325590643e-32   
+2.6669615831e-32    -4.3446271206e-33   -1.2022241520e-31   -2.0359938314e-32   -2.0551868124e-19   
+-2.2900510745e-33   3.2891272331e-33    -1.2153295034e-32   -2.8402952781e-32   1.1466524214e-32    
+1.8270003398e-32    -4.0051819679e-32   -2.1458696394e-32   5.0165584995e-32    4.9592696068e-33    
+-1.1148744304e-31   -1.0764481372e-31   3.2030246229e-32    1.4470880888e-31    9.4387682473e-32    
+-4.8289307932e-32   -2.0048780258e-31   -3.7636996933e-31   -3.8914091611e-31   -1.4680495041e-31   
+-1.7850210856e-32   -7.1856370993e-32   -1.6697963081e-31   -2.5676219662e-31   -8.5750149983e-32   
+1.5876659284e-31    5.2790040702e-32    -1.2050314676e-31   -1.3671036916e-31   -9.0803694237e-32   
+-5.7574020591e-32   -9.3125483659e-32   -6.8651550215e-32   -8.8133864447e-34   2.8040336284e-32    
+-9.7302250186e-33   7.5121047944e-32    1.0486744971e-31    -5.4522249178e-32   -3.0635451652e-32   
+1.6114616957e-33    5.2632054261e-32    8.5733975181e-32    1.1897168921e-31    1.2880258356e-31    
+8.6140226028e-33    6.3160722063e-32    5.2491839826e-33    1.9761094472e-32    3.8057428944e-32    
+-1.2058653633e-31   5.8779983756e-32    4.9703286576e-32    -1.1367500570e-32   1.6516015364e-31    
+-8.9969516425e-33   5.7552955733e-32    1.0579486773e-31    -1.0714602796e-31   -1.0716370739e-31   
+-2.7621700539e-21   -1.1187696954e-32   -4.0083416968e-33   1.7523705545e-32    3.1328335043e-32    
+1.7265661025e-32    -1.4138657973e-32   -9.8907035074e-33   5.8922547711e-32    9.1820402811e-32    
+1.9053540913e-32    1.3447655373e-33    4.3116756630e-32    8.1220076873e-33    -3.1136682444e-32   
+-1.0235264411e-33   -2.7241376284e-32   -1.5846867555e-31   -2.6487329571e-31   -9.4404421512e-32   
+1.3463670308e-31    -3.6047991881e-32   -7.5765783086e-32   1.6269561218e-31    9.6721085779e-32    
+-7.8326479979e-32   -8.0125456534e-32   -5.1736797764e-33   5.1108989741e-32    -3.0225439223e-32   
+-1.3288465226e-31   -1.1251643847e-31   -8.6141730661e-32   -2.2220228654e-32   1.9814132777e-32    
+1.2074823733e-31    1.6006546708e-31    1.0530247666e-31    1.8414955958e-31    1.2904464136e-31    
+-2.0438555377e-32   -9.4371319591e-32   4.2238803409e-33    1.2291946943e-31    3.9051732596e-32    
+-8.6631112469e-33   2.4027104531e-34    -1.3627458989e-32   -9.7491927954e-32   -8.7292586650e-32   
+-2.8200579674e-33   -8.9247292696e-33   5.2549299459e-33    -1.1724098536e-32   4.6077497761e-32    
+8.2984258795e-32    -3.2179769111e-32   2.6088827583e-32    9.4588362868e-32    -1.3492042040e-32   
+-5.8811581044e-32   -1.4085527915e-19   9.1481672358e-33    -1.7931461025e-33   -5.7413024885e-33   
+3.4592259677e-32    5.0429224868e-32    2.3126957977e-32    8.5248731113e-33    -3.3537324027e-32   
+-7.4486939271e-32   -4.4656372111e-32   2.0224709444e-32    -2.2325552948e-32   -1.5481392256e-31   
+-1.4103863340e-31   4.4294696009e-32    1.8700902011e-31    2.2397568434e-31    2.8095857233e-31    
+2.3555966395e-31    4.4603804004e-32    -1.0685591595e-31   -6.7312003873e-32   1.5711901996e-31    
+1.0933611499e-31    -9.6458809479e-32   -1.1657368073e-31   -4.7772842734e-32   4.9996501887e-32    
+8.2490363089e-32    1.4224459656e-31    2.5964620148e-31    2.1026189705e-31    5.8227783530e-32    
+-1.0381966106e-33   9.0026316313e-32    1.1133501963e-31    -5.9694800479e-32   -1.4840682007e-31   
+-1.9321131622e-31   -2.1288371965e-31   -1.9173685839e-31   -2.0730454134e-31   -4.2007466121e-32   
+8.9050938120e-32    4.9224813356e-32    3.3706030976e-32    2.5084485209e-32    2.6023376057e-32    
+-7.0865570315e-32   -1.9374420308e-31   -9.8079581090e-32   -9.4075047995e-32   -1.5376312465e-31   
+-3.6420388491e-32   6.2682625001e-32    4.4324976744e-32    -3.0893872331e-32   -1.0739222350e-32   
+-1.0076525654e-32   -3.5771139451e-32   8.3633832056e-20    1.1615764977e-32    3.3654873462e-33    
+-3.5452909621e-33   -1.2871757181e-32   -4.3760739455e-32   -7.0301333027e-32   -8.4167276310e-32   
+-7.9151959132e-32   -6.4448687713e-32   -3.8635207927e-32   8.7178422639e-33    -2.4297562271e-32   
+-5.6681773359e-32   -3.6304531768e-32   -9.9853166967e-32   -1.1163923757e-31   6.3029066696e-33    
+6.0508336610e-32    -5.5635301268e-32   -1.2763085079e-31   -5.5994908500e-33   3.9421660668e-32    
+6.3497383645e-33    -3.8104824876e-34   6.2966248278e-32    1.3207666447e-31    -2.9632237754e-32   
+-1.6036752211e-31   -6.0969412514e-32   1.7268106053e-32    -3.1968180128e-32   -6.2504043899e-32   
+-3.1943353687e-32   -6.5663678674e-32   -1.4984578972e-31   -1.0080738626e-31   -9.3458759817e-32   
+-1.3175392074e-31   -6.7874360370e-32   -4.4989648269e-32   -3.6950395384e-32   -9.6959358484e-32   
+-1.4865828182e-31   -2.5961733133e-32   5.3725169968e-32    1.5660123821e-32    9.4453133998e-32    
+2.2304901863e-31    1.1343802604e-31    -8.1669209755e-32   7.2382240146e-33    4.2474654596e-32    
+-8.4379805688e-32   -1.5437193668e-31   -3.0341672104e-32   6.3380586526e-32    -5.9456316185e-32   
+-9.4744468518e-32   -6.2370789859e-32   -3.2552729958e-32   2.0067056485e-19    -2.8858856510e-33   
+1.5767046787e-32    2.4238458415e-32    -1.7910396166e-32   -7.5628109187e-32   -6.1090723531e-32   
+3.4930049734e-32    5.9638376751e-32    5.7249396071e-32    1.1179233395e-31    8.5726640096e-32    
+6.3345039577e-32    1.0990890988e-31    5.7549946467e-32    -9.3399538412e-32   -1.2802017452e-31   
+-1.3694133029e-32   6.7424099014e-32    1.0707944796e-31    1.9772115907e-31    1.7343074381e-31    
+5.8623125790e-32    3.0632066229e-32    1.4108941475e-32    7.8920621844e-32    1.6074255183e-31    
+1.2258280785e-31    9.6108041965e-32    -3.1251222613e-33   -1.4354847841e-31   -1.2425558333e-31   
+-6.7097593703e-32   -1.0049743191e-31   -1.8488161044e-31   -2.3348289457e-31   -7.0057958676e-32   
+5.1108613583e-32    5.7683118222e-32    1.8184013635e-31    1.4954131318e-31    9.0820386256e-32    
+2.1398059693e-31    1.3927322896e-31    -1.2482057294e-32   4.9333899232e-32    -1.0048332598e-31   
+-1.2571808639e-31   1.2015282593e-31    1.0929878129e-31    -4.9230079571e-32   -3.8878958436e-32   
+1.0987656028e-31    1.1824579794e-31    -3.5848604529e-32   2.0159069840e-32    8.0682922975e-32    
+1.1108515655e-32    -1.7137767240e-32   -3.7561652447e-32   6.2532537882e-33    1.7993519605e-19    
+-2.9445663290e-33   1.3819299667e-32    1.3346844978e-32    1.2369962153e-33    4.2702982618e-32    
+7.9699269302e-32    3.9588392787e-32    -2.9958743065e-32   -1.3569436588e-33   9.1076644025e-32    
+8.0756179783e-32    6.1088278503e-32    2.6929917301e-32    -3.3357708490e-32   -2.2154589050e-32   
+2.9731167358e-32    6.1123073135e-32    1.6010910143e-31    2.1698459626e-31    1.0221750928e-31    
+-6.4332830990e-32   -1.8636005319e-31   -9.1323685918e-32   1.1374271418e-32    -2.7449579843e-32   
+-6.3673801837e-32   -2.7833825437e-32   5.6431910280e-32    8.1385210320e-32    4.6973882733e-32    
+4.7477182395e-32    9.7429485694e-32    8.4409898344e-32    6.0693312401e-32    -4.5891299456e-34   
+-5.9726773926e-32   -7.3687885232e-32   -6.4757325510e-32   5.2430433470e-32    1.1751576892e-31    
+1.1064918920e-31    9.3248111229e-32    7.1051745110e-32    7.9344928285e-33    9.4498461060e-32    
+7.1936492688e-33    -7.4839681616e-32   9.0028573262e-32    1.0884776762e-31    7.4989392577e-32    
+-3.6468912898e-32   -6.8655452856e-32   4.7003223072e-32    -1.8471248031e-33   -1.4816871193e-33   
+4.2547253127e-32    7.9039863991e-32    1.1955511056e-31    5.6376991184e-32    7.2797048593e-32    
+7.4231795332e-20    1.1502917519e-32    3.3101920919e-33    -5.5776736749e-33   3.0611753686e-32    
+4.7681812451e-32    2.2332699954e-32    -5.3062755392e-33   -5.4469681070e-32   -9.3842065015e-32   
+-6.5029099804e-32   -4.4896361038e-33   4.0326227081e-32    3.2006548263e-32    -1.5413128948e-32   
+-8.3870111338e-33   4.0810342674e-32    6.9146903535e-32    1.5189267804e-33    -1.2526284093e-31   
+-1.2592610187e-31   -3.2620438433e-33   6.6939560243e-32    2.4881735944e-32    -3.3201320721e-32   
+-4.9867479627e-32   -9.3013388517e-32   -1.6930805002e-31   -1.8832811285e-31   -7.9263207918e-32   
+5.8601684773e-32    -4.0692793239e-33   -8.5374932186e-32   -1.6783966950e-32   5.3002946239e-32    
+1.3023560522e-32    2.3647560915e-32    1.6722488595e-31    1.2541603136e-31    -6.5049788504e-32   
+-1.8874865771e-32   1.6534371883e-31    9.6732840722e-33    -1.3646342131e-31   -3.1733457416e-32   
+1.6959468256e-31    1.4495556865e-31    3.0085132217e-32    5.9539917344e-32    -4.8938180813e-34   
+2.0460372552e-32    2.0899631281e-32    -5.4941665562e-32   -5.4743430195e-32   -6.1569572910e-32   
+-3.7471374480e-32   -2.0321570179e-32   3.5063962050e-32    8.5912274164e-32    6.4327564775e-32    
+9.7846268971e-32    1.0805411878e-20    -1.7243091533e-33   -2.3076270660e-32   -3.2928888151e-32   
+1.7092628256e-33    2.9210188262e-32    1.7742994016e-32    1.3520065825e-32    -6.9623119806e-32   
+-1.8360222590e-31   -2.0027414472e-31   -1.5390888595e-31   -3.0766824901e-32   9.6606263491e-32    
+1.3840632539e-31    1.6889516939e-31    1.2912076637e-31    6.6100774494e-32    8.0022577268e-32    
+-4.7936847706e-32   -1.3191040255e-31   -2.4106567949e-32   5.8919162287e-32    1.7078945502e-32    
+-6.2615292684e-32   5.0486824091e-32    1.4083174639e-31    8.4135302863e-32    5.5138772455e-32    
+-6.0052714999e-32   -6.3975104549e-32   8.3979573372e-32    3.5062081259e-32    -1.4460085148e-32   
+5.7203775136e-32    1.8293325206e-32    6.6493718745e-32    1.6119657476e-31    1.4047627690e-32    
+-2.3125603807e-31   -2.7754305595e-31   -2.1461047383e-32   1.9196330562e-31    1.4974443860e-31    
+-5.1875976295e-33   -6.5306140312e-32   -6.7633242969e-34   2.9401276624e-32    1.7371173398e-32    
+1.9796077184e-32    6.7330811782e-32    1.1850863847e-32    -9.2008293828e-33   5.9510482965e-32    
+3.4877387587e-33    -6.7547102743e-32   -4.0821439341e-32   -2.0952763625e-32   -7.9904651675e-32   
+3.0513952556e-33    1.0999918785e-31    2.1152722667e-19    -1.3634982153e-32   -2.6433388487e-32   
+-3.5422064649e-32   -2.0389654812e-32   4.1739265330e-32    3.4798394366e-32    -5.0559140503e-32   
+-2.8387906454e-32   -1.1585672322e-34   -3.3429930863e-32   -1.8486012240e-32   -6.7597225822e-32   
+-9.8604980045e-32   2.9430240804e-32    7.2626366813e-32    -1.2027977932e-31   -3.4434950321e-31   
+-1.7374220279e-31   1.1413843259e-31    6.8050778562e-32    -1.1937079305e-31   -2.0268024060e-31   
+-1.0843963598e-31   -1.3194237599e-31   -1.4747197292e-31   3.7723400469e-32    8.7736641396e-32    
+5.8584898713e-32    6.4486303532e-32    1.7650071187e-32    5.1459945334e-32    1.2598177328e-31    
+7.1948717830e-32    5.0636535052e-32    -1.5050841589e-32   -2.3743180327e-31   -2.1042138812e-31   
+-2.0358997919e-32   -1.4761293820e-31   -2.9217824273e-31   -1.6477271070e-31   1.5733944866e-32    
+6.7414318901e-32    8.6390371226e-33    -2.3874610000e-31   -2.8720919301e-31   -4.7498247253e-32   
+1.7468034132e-32    3.9103195738e-32    1.0006776522e-31    8.1178323314e-32    -3.2773158659e-32   
+4.1639959567e-32    1.0153261926e-31    -8.9874348403e-32   -6.4928289408e-32   2.0406958088e-32    
+-7.6703921617e-32   -5.3172781663e-32   6.2372670650e-33    1.7851554135e-21    -2.8768578544e-33   
+1.8371566110e-32    4.3333423749e-32    1.0627221248e-32    -5.8661870083e-32   -5.0298086718e-32   
+4.1549681601e-32    1.0833699182e-31    5.2748968930e-32    -1.6677725770e-32   5.4706272818e-33    
+-3.4912934536e-32   -1.4878711600e-31   -1.3466331628e-31   -3.5445574536e-32   1.5400903807e-32    
+-4.2093606347e-32   -1.9046393907e-31   -7.1145055852e-32   1.8425093421e-31    3.2850647247e-32    
+-1.7922508460e-31   -1.2475135983e-31   -2.4909947808e-32   -5.2577229205e-32   -2.4442900393e-32   
+1.6531588313e-31    1.7719364228e-31    6.5620796640e-32    4.5407560021e-32    -2.0432913004e-32   
+-6.5065587149e-32   -9.6574101965e-32   -1.4027841769e-31   5.3810181720e-32    1.0639747316e-31    
+4.6180188948e-32    2.2683021588e-31    1.2710911938e-31    -7.2944596644e-32   -1.5833365827e-31   
+-3.1834794433e-31   -3.1486471947e-31   -1.0912499621e-31   -6.8184690879e-32   -2.2702124914e-31   
+-1.5639002538e-31   -8.9104352583e-32   -1.0788517881e-31   -8.1184623964e-32   -1.7255880912e-32   
+-3.6570851768e-32   -1.9762975263e-32   7.2168206135e-32    1.5001243074e-32    -4.7427317924e-33   
+3.4128832784e-32    3.5268121909e-32    -3.5915960355e-32   -9.1616713149e-32   -2.5425783810e-19   
+-1.6812390403e-33   1.8673997297e-32    2.9383973347e-32    -1.5875380346e-32   -6.3196457091e-32   
+-3.4413396456e-32   2.8644446341e-33    -6.3136177741e-32   -1.5320208470e-31   -1.0085177293e-31   
+1.2329557473e-32    7.1824021389e-32    1.1662234620e-31    3.6984813859e-32    -1.8237277635e-32   
+5.9869714039e-32    7.6313657493e-32    5.5008057483e-32    -7.7469967776e-32   -1.2831433023e-31   
+7.6427821504e-33    1.9391707128e-31    2.5445860385e-31    2.0457739444e-31    2.8743601640e-31    
+1.9820414619e-31    4.2978706573e-32    7.8220967607e-32    -2.9805458601e-32   -1.4864135470e-31   
+-1.2290903105e-31   -8.4592335067e-32   4.1821267816e-33    4.4055177280e-32    1.0729724355e-31    
+1.5520587939e-31    -7.3048040147e-32   -1.2127716277e-32   1.6404409228e-31    -1.5279545770e-32   
+-5.2234078894e-32   1.3819675826e-32    2.7971123177e-33    7.6024956080e-32    1.6826684415e-31    
+7.9498776986e-32    -2.6276812639e-32   -2.6644789391e-32   -7.7923426476e-32   -7.3402005005e-32   
+-4.8672054770e-32   -4.2236922618e-32   -2.1722383287e-32   -5.5369357427e-32   -6.7802514155e-33   
+3.3958997360e-32    1.6028852889e-32    9.0388556652e-32    8.9985315070e-32    5.5453240703e-33    
+-9.7759820029e-20   -4.5421101716e-34   -2.8452605663e-33   -4.0561137872e-32   -4.8387485220e-32   
+-5.6013716410e-33   1.2700981362e-32    3.2485021484e-33    2.0392946196e-32    1.0898581768e-31    
+1.5032503877e-31    7.9543633850e-32    6.0587047711e-32    1.1384126762e-31    6.7683930285e-32    
+-6.6926817884e-32   -8.8987743544e-32   5.7127144659e-33    2.1105596699e-31    2.4813199921e-31    
+5.6779198331e-32    1.9364077133e-32    1.8741668155e-31    2.8565265041e-31    2.8727201143e-33    
+-1.6110403985e-31   -7.3763116870e-32   -2.4127614000e-31   -2.6847388193e-31   -1.3663905192e-31   
+-1.3985110199e-31   -3.0925845777e-32   1.0087058084e-31    8.5712346085e-32    -3.8063823633e-32   
+-2.1941533050e-31   -2.2806734508e-31   -2.1592006857e-31   -9.3736364563e-32   1.8565889432e-31    
+1.6950755492e-31    1.5980384906e-31    2.0563740823e-31    9.8026824904e-34    -2.3655084079e-32   
+1.4106759758e-31    1.5479699544e-31    6.3929213250e-32    1.2856394645e-31    1.2169432220e-31    
+4.6022202507e-32    2.7388830295e-32    -2.5540388938e-32   2.1141877157e-32    1.9389450178e-32    
+6.8558592122e-33    4.7995528384e-32    -1.4951512316e-32   -5.5483850576e-32   9.3809151173e-33    
+2.3685740971e-33    1.6901627403e-19    7.7789514160e-33    -4.5966531095e-33   -3.3569861710e-32   
+-1.5100494470e-32   1.2247710740e-32    -5.4791202285e-33   3.5125651994e-32    1.0195605583e-31    
+1.3195619981e-31    1.4206592142e-31    7.4729655345e-32    4.0314942335e-32    2.9833482387e-32    
+-7.5442287040e-33   -9.7932785356e-33   2.5344786678e-32    -2.0232420687e-32   -1.9414690393e-31   
+-2.4263952537e-31   -1.1212993593e-31   -1.0728746344e-31   -2.1720126338e-31   -1.0709910222e-31   
+-6.5656343589e-32   -2.7026479459e-31   -2.1045373772e-31   5.6986085337e-33    1.5432943081e-31    
+2.6543452374e-31    2.4147682039e-31    1.6084110527e-31    3.5411532220e-32    -2.5860311481e-32   
+2.4369032328e-32    3.0149079110e-32    1.1258207807e-31    1.4719972843e-31    -7.8141598228e-32   
+-6.0419281158e-32   -3.0165630070e-32   -2.0650746213e-31   -1.3845781204e-31   -1.7344278087e-32   
+1.1329884751e-32    5.2908154375e-32    8.0646811788e-32    -7.7258378793e-32   -1.1467821960e-31   
+-7.8887896081e-33   -6.6767702969e-32   -8.6581083430e-32   -1.0753384706e-31   -4.0237077589e-32   
+5.0487200249e-32    -5.0059132226e-32   -1.2605813339e-32   -9.8301420384e-33   -1.3758813430e-31   
+-1.0899540971e-31   -6.5592020539e-32   1.2093071860e-20    7.8474122070e-33    -3.7465355949e-34   
+4.8373755446e-32    1.0317036501e-31    1.0234972889e-31    3.3493877755e-32    -5.8225526580e-32   
+-2.8652345663e-32   3.9812583069e-33    -2.8952519900e-32   -8.4405196366e-32   -1.8942017062e-31   
+-2.0592987122e-31   -1.1708149429e-31   -3.2712221032e-32   2.8487964533e-32    -1.0798749383e-32   
+-1.8344651991e-31   -2.3255716926e-31   1.2197587661e-32    2.9129916104e-31    1.9998751218e-31    
+4.4693235614e-33    3.8968107927e-32    -5.4010862115e-32   -1.5926627198e-31   -5.3054667990e-32   
+2.3461362610e-32    5.7775970521e-32    3.2253308037e-32    -3.8894004764e-32   -4.2322686686e-32   
+-1.4170255261e-32   2.9662706567e-32    1.2024677144e-31    2.4237452192e-31    2.6659083402e-31    
+-1.6612650403e-32   -1.5381710335e-31   8.0633270094e-33    4.0875229962e-32    4.0233504086e-32    
+8.9859678233e-32    -2.0288468258e-32   -1.7669304626e-31   -5.4678354827e-33   8.3541725236e-32    
+-8.8607823770e-33   3.7756126232e-32    2.8499249279e-32    1.0249558423e-32    -4.0646149623e-32   
+-1.0613077700e-31   -2.4214055152e-32   -4.7092372564e-32   -3.5427707022e-32   2.4920856396e-32    
+-5.9943817203e-32   -1.2020172650e-31   -1.3553468673e-31   -4.6126832915e-20   -4.0324158211e-34   
+2.1286039784e-32    5.4433099686e-32    3.5845994932e-32    -2.4670758218e-32   -1.8683401252e-32   
+-3.7978059565e-32   -6.7438016867e-32   -2.2683843626e-32   -1.8540084980e-32   4.7760805672e-33    
+-1.0957670342e-32   -4.5874184258e-32   3.8423807023e-32    5.9442774491e-32    -4.7293617197e-32   
+-4.3273238438e-33   2.0420951173e-31    3.8042382616e-31    4.6901998903e-31    4.2959748201e-31    
+2.2831654988e-31    2.0176749275e-32    2.7556596849e-32    8.8545005351e-32    9.8273208520e-32    
+-5.1645955560e-32   -2.0598535456e-31   -1.3721094167e-31   -1.3364971101e-31   -5.4090795731e-32   
+1.1758968401e-31    1.3530410176e-32    -1.2225968797e-31   4.6493152564e-33    7.4626776079e-32    
+2.1395877976e-33    -2.6319788713e-33   -7.2967166135e-33   1.8797997845e-31    3.3977993349e-31    
+8.3283680716e-32    -1.2571470096e-31   -6.6425022855e-32   -1.8734248435e-31   -1.4070328837e-31   
+3.5125275835e-32    -4.2658219794e-32   3.9382634255e-32    1.2210245384e-31    1.0707211287e-31    
+6.1335226356e-32    -6.0744281836e-32   -2.0447959331e-33   1.3980596300e-31    1.1472411090e-31    
+6.9573843083e-32    -6.9288339015e-34   -2.9601392782e-32   -6.1859214718e-33   5.7341844713e-20    
+-4.5740836179e-34   -2.6752370634e-33   -2.7142070521e-32   -5.9366790536e-32   -6.7839753816e-32   
+-2.4924053740e-32   4.1748293127e-32    -1.9503802269e-34   -1.2953157814e-31   -1.1930157994e-31   
+-1.4456887803e-32   3.8964910583e-32    9.7166551118e-32    1.2024573700e-31    1.4350021261e-31    
+5.0485695616e-32    -8.2663019699e-32   -2.5337075435e-32   -6.8914813930e-32   -1.4280187492e-31   
+-1.3847887690e-31   -1.7313169805e-31   -1.1967266000e-31   2.6900953120e-32    1.0482926965e-31    
+1.4299691295e-31    1.1707397113e-31    2.8203306821e-32    7.0092189072e-32    9.2267090664e-32    
+-4.3704315726e-32   -9.5136425354e-32   -2.4826440689e-34   3.2705450185e-32    -3.3437454027e-32   
+-7.2051314977e-32   -4.9154847932e-32   5.5921933811e-32    3.8890243182e-32    -5.1391860702e-32   
+-5.9130657231e-32   -6.7381216980e-32   -3.8175542616e-32   9.5002324959e-32    6.0743905678e-33    
+-6.3178025340e-32   2.3312780124e-32    -8.0405318229e-32   2.8151679109e-33    -7.8617062183e-33   
+-9.4269380721e-32   5.4103585110e-32    7.8932470827e-32    4.3611780811e-33    3.7683527701e-32    
+1.1642848367e-31    1.6784629929e-31    6.8712064664e-32    3.2889955778e-32    1.1215325774e-31    
+-1.1073648312e-19   2.1010691987e-32    4.4461898326e-33    -8.2754802298e-33   1.7000845658e-32    
+4.8734679231e-32    6.4984901216e-32    8.2739755970e-32    1.1145285118e-31    5.1277884769e-32    
+-4.1306307251e-32   -5.0185145221e-33   6.1889965650e-32    2.5709095888e-32    -1.1745323262e-31   
+-1.6528691895e-31   -6.6038332234e-33   1.1223243903e-32    -1.6255864358e-31   -2.1181618270e-31   
+-1.6644661465e-31   -1.4416601261e-31   -1.8190634020e-31   -1.5777094913e-31   6.2897411328e-33    
+-2.6009834362e-32   -1.1644428231e-31   -1.2145207633e-32   3.7585538492e-32    3.2439130184e-32    
+4.7819486350e-32    -2.4391225661e-32   -7.8228678849e-32   4.3333423749e-32    1.7285898336e-31    
+2.0568329953e-32    -1.8093961364e-31   -1.4095399780e-31   -5.1693727651e-32   -5.3335093923e-32   
+-1.1406508175e-31   -1.9017053568e-32   9.4433761851e-32    1.6508078426e-32    -3.6474555271e-32   
+-6.1143385678e-32   1.5914500798e-32    8.0990996534e-32    -3.0838200918e-32   8.1771524783e-32    
+1.1225632508e-31    -1.7896102155e-32   5.0299873469e-32    7.5935806589e-32    3.0844971766e-32    
+-1.8904958427e-32   -4.3664725077e-32   4.3485391658e-32    4.2615713918e-32    2.7613584815e-32    
+9.1648686596e-32    -3.3439455839e-20   1.9108836167e-33    -1.1585672322e-33   -1.9791469246e-32   
+2.4186971763e-33    2.0131610292e-32    -5.3908170929e-33   -5.0797906916e-32   -7.3186842519e-32   
+5.2588419911e-32    1.4723160784e-31    7.9646230997e-32    4.0678311149e-32    1.0280873592e-31    
+7.2610844410e-32    -1.4460122764e-31   -1.1120966491e-31   1.0227064163e-31    7.5392163961e-32    
+5.9269459603e-32    9.3287231681e-34    2.7178934024e-32    9.6990885242e-32    -4.0373434934e-32   
+-1.3472481814e-32   -3.5613153011e-32   -1.5815684041e-31   -1.7292330641e-31   -1.8533671483e-31   
+-1.6342803920e-31   -6.5963147615e-32   1.5939853860e-31    2.4910850588e-31    -1.5957994089e-32   
+-1.8147902449e-31   -9.7136834621e-32   -1.4462342097e-31   -1.3622192775e-31   -1.3173022277e-31   
+-2.0088803489e-31   -1.2570680164e-31   -1.4176649950e-32   -5.1776482453e-32   -9.6431914169e-32   
+4.6645872790e-32    1.2802544074e-32    -4.1784968550e-32   -4.7853716745e-32   -1.3653611388e-31   
+-4.6556347140e-32   1.8199285658e-32    -9.3873662303e-32   -1.6313266098e-31   -1.4535655329e-31   
+-5.3934690081e-32   -1.4410620346e-32   -2.7881785606e-32   2.5304255633e-32    8.2530612015e-32    
+5.9580542428e-32    1.5331643679e-32    4.4455680621e-21    -3.2744006399e-32   -3.0506429393e-32   
+-3.2364650862e-33   1.0833544016e-32    2.6565231933e-32    -2.3812318203e-32   -3.7715124989e-32   
+-1.6600237183e-32   -3.7052710412e-32   -3.8631446345e-32   -7.8935292014e-32   -1.0798899847e-31   
+-5.4902545110e-32   6.8565997736e-32    7.4748275176e-32    -7.4781000938e-32   8.0647376026e-33    
+7.9311074048e-32    -8.5898732469e-32   -1.4492227865e-31   2.4345710520e-32    1.4334189703e-31    
+3.7540587588e-33    -2.3435031536e-32   8.8927370154e-32    1.1969203215e-31    8.4482120717e-32    
+3.5028038943e-32    8.0050601054e-32    7.0114758563e-32    -5.0803173131e-32   -4.3811520811e-32   
+1.4977114583e-32    -1.2467274277e-31   -2.5737044441e-31   -5.4136687031e-32   3.1777345673e-31    
+2.1116317207e-31    -1.2341524593e-31   -1.2982159610e-31   -7.8382903708e-32   -2.0486327467e-32   
+-5.3211714036e-32   -4.3469463710e-32   2.5109687808e-32    3.5010571097e-32    -6.2720805057e-32   
+-1.4142870944e-31   -5.1121967199e-32   4.7753846745e-32    -1.2955264300e-32   -1.1800101299e-31   
+-6.2586704662e-32   2.4613535153e-32    -4.0885386233e-32   -8.5846634559e-32   -5.7564240478e-32   
+-1.4788283171e-32   7.6228457662e-33    -5.3121812228e-32   -1.1952209962e-19   2.9505848601e-33    
+1.3047046899e-32    1.1119988480e-32    -7.9783152579e-34   3.4852937304e-33    5.2278465561e-33    
+4.7762310304e-32    1.2180340808e-31    5.6476390986e-32    -3.7898125950e-32   8.3349132242e-33    
+-1.7212246562e-32   -1.5186728736e-31   -1.3287600063e-31   1.3488177015e-31    1.7212547488e-31    
+-9.0007132245e-33   -8.0155549189e-33   7.5225431842e-32    1.3813130673e-31    -5.2229564996e-34   
+-3.2200645890e-32   1.3572676251e-31    1.4127768193e-31    1.1712851407e-31    1.5129910041e-31    
+1.1871326853e-31    4.1088511657e-32    4.1463917533e-32    6.0387683870e-32    -3.9212939891e-32   
+-9.4989723659e-32   -4.1653501262e-32   7.1084118225e-32    1.7683347082e-31    1.4381242391e-31    
+2.0331538371e-31    2.8584298646e-31    2.3721814542e-31    1.9627929770e-31    2.1070124981e-32    
+5.5179397539e-32    2.0287527862e-31    7.3639736983e-32    6.3492493588e-32    1.4694845476e-31    
+-7.9920450319e-33   -5.2109946691e-32   2.3295476847e-33    8.2235703993e-32    2.2928901285e-31    
+1.0649753124e-31    2.5292876848e-33    1.1977403463e-31    1.0072895728e-31    -6.1276921836e-32   
+-1.2566279113e-31   -3.6949172870e-32   7.8231876194e-32    8.4945547610e-32    -8.4851821979e-20   
+1.8622087466e-32    1.6799977183e-32    1.0236016728e-32    4.3942800020e-33    -4.8287050983e-32   
+-5.1737173922e-32   -5.4100199686e-32   -7.3265083423e-32   -3.0144189053e-32   -1.2293978198e-32   
+5.7364124320e-35    4.4304288043e-32    8.3138483654e-33    -5.7458351947e-32   5.7995317767e-32    
+1.9517372176e-31    2.1781477739e-31    2.8293265053e-31    2.1907866891e-31    -2.1647998004e-32   
+-6.5022705115e-33   2.1017669722e-31    2.6374444498e-31    1.6908668093e-31    -2.3589256395e-32   
+-1.4669718108e-31   -6.6752844720e-32   3.4694950863e-32    -3.1030041596e-32   -1.2001063813e-31   
+-1.3865002888e-32   1.2410737701e-31    -1.3289857012e-32   -5.7503490930e-32   2.1199015586e-31    
+7.4845323989e-32    -2.3471857423e-31   1.6666064866e-32    2.7283731696e-31    3.6379688175e-31    
+2.5405855961e-31    -4.4573241150e-32   5.5983435675e-32    1.2776361113e-31    7.9118104895e-32    
+1.5356282041e-31    3.9552281600e-32    -2.3686681367e-33   1.7390169387e-32    -1.3961863622e-32   
+2.4279882836e-32    -3.4904659056e-33   -4.8677879344e-32   -2.4999473458e-32   4.9597209966e-32    
+3.8649501939e-32    -7.7267594668e-34   3.8887986233e-32    8.6064994390e-32    9.2962231003e-32    
+-1.6380300892e-19   -4.6041762733e-34   -2.3630257638e-33   2.0035689953e-32    3.5294170864e-32    
+1.3550534639e-32    4.0980930414e-32    8.5968509813e-32    9.7446412813e-32    3.5639484084e-32    
+-2.5529856509e-32   7.5694313029e-33    6.0196595508e-32    1.1684169344e-31    6.4909105341e-32    
+-7.6649378679e-32   -1.0614243790e-31   -1.5278680606e-31   -2.5485808385e-31   -2.3289119773e-31   
+-1.4077522862e-31   2.4213867073e-32    9.9578101289e-32    2.9427607697e-32    5.8307905225e-32    
+8.7300109814e-32    1.8106543856e-31    2.6446873758e-31    1.4791800250e-31    6.2547066992e-32    
+5.3149271776e-32    -3.4738209056e-32   -1.2949245769e-31   -9.5431333377e-32   7.6961966137e-33    
+-6.1551658376e-32   -1.8069887240e-32   -4.4790284427e-32   -1.9990927128e-31   -4.6852007479e-32   
+1.5024218993e-31    3.0449704737e-31    1.5042678956e-31    -6.2990698560e-32   2.8663254250e-34    
+6.3947645001e-32    1.2356909463e-31    1.5776525973e-31    1.3589716217e-31    4.7113061265e-32    
+-1.6359213821e-32   -5.9703075960e-32   -4.8336327706e-33   -1.0557255824e-32   -6.3977737656e-32   
+6.2510720707e-32    1.2157733700e-31    6.0236844434e-32    -7.8580574838e-32   -1.8610050404e-32   
+1.2129220910e-31    -5.0691662837e-20   -1.3677111871e-32   -2.8627143064e-32   -4.1339785330e-32   
+-2.1448540123e-32   4.5424863298e-33    2.6195656509e-33    4.6592064536e-32    1.0677739293e-31    
+1.2403741158e-31    1.2035707983e-31    7.5996509117e-32    5.8184713417e-32    1.1380026638e-31    
+6.1775331441e-32    -9.4046318913e-32   -1.0861436146e-31   -1.1757727079e-31   -2.3789428977e-31   
+-9.3417758574e-32   1.5664336793e-31    2.5726052394e-32    -1.8506983059e-31   -1.3760318063e-31   
+2.7059127640e-32    1.1332480242e-31    1.1447547034e-31    -1.6718727013e-32   -1.7517386087e-31   
+-9.3345912359e-32   1.2511529288e-31    1.7115197748e-31    1.5650174437e-31    1.5553276086e-31    
+1.3385363577e-31    1.0065993225e-32    -9.8347687842e-32   -1.0000447660e-31   -3.4566342377e-31   
+-4.2543942935e-31   -2.5705108611e-31   -1.1032719779e-31   -1.9719717071e-32   -1.3806096515e-31   
+-1.4772108368e-31   6.5215063010e-32    2.2478837411e-32    -1.0567087659e-31   -3.5497296287e-32   
+4.6499923411e-32    1.3837710260e-31    7.6453400261e-32    8.0419236082e-32    5.7762099688e-32    
+-8.8569314575e-32   -7.6311964781e-32   -6.4398282515e-33   7.8905199358e-32    -5.0220127933e-32   
+-8.1026355404e-32   5.0203576972e-32    1.0913758875e-20    1.2777341475e-32    2.6961984786e-32    
+8.5861868966e-33    -1.4548294244e-32   8.2773610208e-33    -3.3986644987e-32   -1.3898292888e-31   
+-1.1247176968e-31   5.5187673020e-32    1.3428245611e-31    7.0037458055e-32    -5.2985642962e-32   
+-1.6886719262e-31   -1.2521553904e-31   -1.0773396321e-31   -1.3739309628e-31   9.3097271794e-32    
+2.9594396240e-31    1.9355523060e-31    -1.9565492212e-32   -1.3909718693e-31   -2.0750672637e-31   
+-1.7425697528e-31   7.3087536757e-33    -1.5465744075e-33   -2.1927389502e-31   -2.3616320977e-31   
+-4.5995871434e-32   -4.3290729794e-32   -1.5977102925e-31   -1.2868070831e-31   -5.7218927258e-32   
+-4.3700177986e-32   5.9193569688e-32    1.9786381707e-31    1.7211569477e-31    1.4229406136e-32    
+-1.0465849383e-31   -1.7696832353e-31   -2.3226113276e-31   -2.3576391785e-31   -1.6922717601e-31   
+-1.1530132565e-31   -2.8828500544e-31   -2.2779651118e-31   -2.1776550066e-32   -3.9701522363e-32   
+-9.7252691344e-32   -1.4670094267e-31   -7.7190764357e-32   -1.4498340436e-31   -1.7630534471e-31   
+-4.2716524313e-33   -1.7119523567e-32   -1.2352357949e-31   -1.4768873408e-31   4.5864968383e-32    
+9.6034691118e-32    -4.0615022533e-32   -3.5606852361e-32   -8.7949021113e-20   -5.0856587594e-34   
+2.1356757524e-32    2.0688700574e-32    1.0400774016e-32    5.9610541044e-32    5.8266551333e-32    
+-8.3565047044e-32   -1.3818848278e-31   -4.9572383526e-32   -9.8621154848e-33   1.2696843622e-32    
+-2.7729253459e-32   -1.4592756142e-31   -1.0496200647e-31   8.7162623995e-32    1.9619433297e-31    
+2.4316069254e-31    2.8836973508e-31    2.0928303939e-31    9.5647624338e-33    2.0072553456e-32    
+9.7011573943e-32    -1.8870351873e-32   -1.3596237859e-32   -4.1161110188e-32   -1.2813753588e-31   
+-2.4436740802e-32   8.3144502185e-32    2.4262203401e-35    -1.5140216775e-31   -1.4675021939e-31   
+-8.6953480040e-32   -1.6534805641e-31   -1.6882242980e-31   -1.1454581192e-32   2.0678694767e-31    
+2.3685703356e-31    1.1569478712e-31    1.1922634830e-31    1.5638024527e-32    -2.8771587810e-32   
+3.6775293746e-32    1.1917970469e-31    5.9583457654e-32    -7.5900447718e-32   8.0215734500e-32    
+2.0730980755e-31    1.3282578351e-31    -1.0659947011e-31   -1.6266735330e-31   -1.0372261225e-31   
+-2.2434225050e-31   -1.2855478935e-31   1.5466120233e-32    6.2758232797e-32    -6.9292664834e-32   
+-9.8661779932e-32   8.0040444783e-32    2.5448606339e-32    -5.0064774599e-32   -4.9930715001e-20   
+-3.5199378999e-32   -5.2287493357e-32   -4.8285170192e-32   -5.5900868952e-32   -7.3077756644e-32   
+-3.1184266455e-32   2.0420687862e-32    -7.2771469836e-32   -1.7945115568e-31   -1.9011500533e-31   
+-1.6832514866e-31   -2.2041365434e-32   1.1745972135e-31    1.1694193960e-31    1.9673741136e-31    
+2.4381520780e-31    1.4365707057e-31    5.6397397766e-32    -3.2632522515e-32   -8.2108938682e-32   
+7.5209068961e-33    8.9451170437e-32    -1.2964235673e-31   -2.7564665442e-31   -3.2284905326e-32   
+1.2589111915e-31    -4.5014474710e-32   -1.7922099388e-31   -2.3157050632e-32   8.6557385463e-32    
+1.0157926287e-31    2.1016080453e-31    1.5025361573e-31    -8.0371087834e-32   -1.3612393854e-31   
+2.6188133345e-33    1.2030404152e-31    2.3466158627e-32    -1.3679942020e-31   -1.1908641746e-31   
+-8.1159891563e-33   -5.2790040702e-33   -1.1515100343e-31   -2.8408877273e-32   2.2155717524e-34    
+-1.2504137780e-31   -1.0972760163e-31   -1.5653823171e-32   -1.2599042492e-32   4.2102257985e-32    
+1.8673545907e-31    1.2750032390e-31    9.2273109195e-32    -1.5040309159e-32   -2.9414066002e-32   
+3.5976333745e-32    -7.5897038785e-32   -1.0082920344e-32   6.0467429406e-33    -7.8106991674e-32   
+-2.0746850524e-20   2.3509887016e-32    9.3618250890e-33    -1.9309704642e-32   -4.5400789173e-32   
+-6.6460381725e-32   -2.9002548940e-32   1.0218450140e-31    2.0645416521e-31    9.4444929048e-32    
+-4.4482587026e-32   -2.8429283855e-32   3.4510257191e-32    9.2940037670e-32    1.0901666265e-31    
+4.9926724543e-32    -1.0851336299e-31   -2.9739292375e-31   -3.4071882434e-31   -2.1960352714e-31   
+-1.0576703203e-31   -1.3192507272e-31   -2.1220118061e-31   -2.7739127612e-31   -2.8532487557e-31   
+-4.3494043297e-32   1.6441065256e-31    1.0618870536e-31    5.2224298781e-32    5.6227374263e-32    
+5.3746987143e-32    -9.8181049763e-33   -1.7866536121e-31   -2.0734855185e-31   -7.2084981135e-32   
+4.9614137085e-32    1.4365782289e-31    1.7050197612e-31    1.5402624730e-31    6.0115345338e-32    
+1.8100995522e-31    2.3592119899e-31    -3.0610249054e-32   -1.4517637351e-31   -4.9480789006e-32   
+-5.4593343076e-32   -2.4707349006e-31   -1.2020360729e-31   8.8831261736e-32    2.0882610123e-32    
+-2.4704377356e-32   -2.4036508486e-33   4.4871910755e-32    1.2999951893e-31    5.5420891099e-32    
+-2.5255261029e-32   4.9585172904e-32    4.0327919793e-32    -3.4610315270e-32   -7.7614600601e-33   
+5.6809290987e-32    7.5578690308e-20    2.1067491874e-32    4.7456117536e-33    -7.8976293257e-33   
+1.5997631759e-32    1.9440701732e-32    8.3273900603e-33    5.2510555165e-32    1.1858612706e-31    
+6.0333893248e-32    -3.4086514987e-32   1.0805144073e-34    6.6805318788e-32    3.4056234253e-32    
+-1.0296653428e-31   -2.3201822861e-31   -2.2851459717e-31   -1.9867396777e-31   -2.7890098702e-31   
+-1.2036460299e-31   1.6286460125e-31    1.8886695947e-31    1.1451195768e-31    2.1103979219e-32    
+-2.8799611595e-32   -5.2084556013e-32   -7.4153569074e-32   -9.8083013534e-33   6.1647813814e-32    
+-3.7419041472e-32   -8.8126341283e-32   1.4569580096e-31    2.4911113898e-31    1.0644524525e-31    
+1.5289325883e-32    9.3419263207e-32    1.6864714008e-31    1.4541673860e-31    2.4300571537e-31    
+2.3160511287e-31    2.3841432847e-31    3.6881144661e-31    2.9082444940e-31    2.1539307095e-31    
+1.7114821590e-31    1.3202663543e-31    -1.9801801842e-32   -2.9895877627e-32   8.1019208399e-32    
+-3.3711297191e-33   -5.2506605504e-32   -9.0727851341e-32   -3.1841414817e-32   6.4538965679e-32    
+1.3009054921e-32    -6.7575502686e-32   -1.0262423033e-31   1.7332993341e-32    3.9508647250e-32    
+-5.9227517965e-32   -4.2652013183e-32   1.8793308975e-19    -2.9283162951e-32   -1.8914738540e-32   
+3.7973169509e-34    8.3017642835e-33    1.2381246898e-32    -5.3790621494e-33   -5.4056001098e-32   
+-1.6533882878e-31   -2.0876553976e-31   -8.0347954105e-32   3.5912951090e-32    5.9991965451e-32    
+1.1199357858e-31    5.5267700675e-32    -1.2123860655e-31   -1.4679761532e-31   -1.6810345043e-32   
+2.0827126789e-32    -1.1762043494e-31   -1.3451567419e-31   1.9516027410e-32    1.1593966610e-31    
+6.3661670735e-32    -1.0678754920e-32   5.3462611550e-32    1.1796847531e-31    -4.8624982099e-32   
+-2.0817045750e-31   -5.6340033642e-32   4.0675678041e-32    3.8243251091e-32    1.6480308547e-31    
+1.9975104974e-31    2.8275058996e-32    -1.7991439449e-31   -1.1554263113e-31   6.8366751444e-32    
+2.1828422281e-31    1.3605239795e-31    -3.6602778195e-32   1.0769785203e-31    1.3603911486e-31    
+1.1707509960e-31    1.8166917246e-31    2.2768432200e-31    1.6193741832e-31    9.0321788573e-32    
+5.5901621269e-32    3.6146169169e-32    1.2770796322e-31    3.0903652444e-32    -7.8924759584e-32   
+-2.4004911197e-32   -3.1783862613e-32   -6.0448809576e-32   -1.2903881091e-31   -1.0199792694e-31   
+4.3098701037e-32    -3.0474267867e-32   -1.3076857435e-31   1.2838397665e-20    -2.8700870070e-33   
+1.3758550119e-32    4.7445585107e-32    7.5654440261e-32    8.8123332018e-32    3.2980233744e-32    
+-1.0248392332e-31   -1.1900253418e-31   4.7055320982e-32    1.3938692278e-31    7.8841628624e-32    
+-2.7718509441e-32   -4.6606752338e-32   7.2407442745e-32    6.1201690198e-32    -4.7451791717e-32   
+1.5662321995e-32    2.0735795580e-31    2.0143873049e-31    -1.0619321926e-32   -1.5928192956e-31   
+-4.8185112113e-32   1.9450124495e-31    1.2072383407e-31    3.2272115947e-32    1.3188444763e-31    
+1.0643701679e-31    4.1020050866e-32    5.7634205902e-32    5.9665836299e-32    -6.8095165229e-32   
+5.5242592116e-33    7.8054235488e-32    -1.8444230469e-31   -3.5802050251e-31   -1.9758536597e-31   
+-7.3592341051e-32   -1.6339625383e-31   -2.6666004713e-31   -2.9400599539e-31   -6.5967614494e-32   
+-1.8623592099e-32   -1.6876769878e-31   -4.0766896403e-32   1.6242510742e-31    1.5928004877e-31    
+7.9876439811e-32    2.9766150070e-32    5.5756048048e-32    4.8176084316e-32    -4.4947518552e-32   
+-5.5204223980e-32   3.7538330639e-32    9.3693858687e-32    1.6284414765e-31    1.4482917950e-31    
+-1.1927647138e-32   2.4461567243e-33    4.5734159371e-32    2.9471053968e-32    -1.8220844146e-19   
+3.4327444310e-32    3.0869798206e-32    3.1258745777e-32    7.2810496248e-32    5.5895790817e-32    
+1.4910158425e-32    5.5988137653e-32    1.1974262542e-31    1.4405466978e-31    4.4894339187e-32    
+-1.8965896054e-31   -2.8943595547e-31   -2.2361400824e-31   -9.3801063772e-32   9.0848974279e-32    
+1.3918793509e-31    7.4903252351e-32    1.7871670681e-31    2.1877106555e-31    2.1389859445e-32    
+-1.2255647678e-31   -5.7960335055e-32   1.6343659680e-31    1.3775270351e-31    -5.0668132340e-32   
+-6.9423050667e-32   8.7994685916e-33    6.7842716062e-32    -4.5003942281e-32   -1.6566984799e-31   
+-1.5787246482e-31   -9.7266609197e-32   8.9995847499e-33    8.0566690093e-32    -1.0643095124e-31   
+-2.0133679162e-31   -1.7239329951e-32   -1.3690653566e-32   -2.5154450633e-31   -3.3177754411e-31   
+-6.0508806807e-32   9.9975324340e-32    -1.6686151714e-31   -2.9413464149e-31   -7.4295756870e-32   
+7.5906842408e-32    8.0932692015e-32    9.2211419251e-33    4.1225433239e-32    -2.5074705096e-33   
+-2.2308437750e-32   1.1541473734e-32    5.5690972681e-32    4.8980686689e-32    1.3690277407e-32    
+4.9344431661e-32    2.3281182836e-32    -2.7202067753e-32   3.8506561826e-32    1.6653614030e-31    
+-9.3995685160e-20   -1.3568778311e-32   -2.8662125776e-32   -4.0883881601e-32   -6.1334850198e-32   
+-6.8089146698e-32   -2.3792005661e-32   4.0707557448e-32    9.1168332584e-32    5.3421798386e-32    
+-1.5339731080e-32   -4.9374524316e-33   4.0765767928e-32    8.8126717442e-32    1.1135975203e-31    
+1.5053399465e-31    1.6759135807e-31    8.6389806989e-32    1.6791701703e-32    -6.0869166356e-32   
+-9.3715299704e-32   4.8471744655e-32    8.7808863769e-32    2.4967876170e-32    6.7843891557e-33    
+-4.6511396236e-32   -9.5385630157e-32   -3.1206835947e-32   5.9533052457e-32    5.0032048837e-32    
+-5.5339170732e-32   -3.3556169552e-31   -4.1643533070e-31   -1.1971591819e-31   2.0405491072e-31    
+8.4304762129e-32    -1.3134541294e-31   -3.1667629732e-32   1.1379838559e-31    1.0574088903e-31    
+-6.3857178956e-32   -1.6545894079e-31   -6.8381821281e-32   8.7625110492e-32    4.6760977197e-32    
+-6.1529700141e-32   -1.1358472774e-31   -7.4186294836e-32   -1.3665902357e-31   -1.3188012181e-31   
+-5.7672950196e-32   -5.1816543301e-32   -9.1533582189e-32   -1.1327176412e-31   -5.0478924769e-32   
+4.5081618947e-33    2.9028127697e-32    3.3605596739e-32    -1.2120193113e-32   2.4311103966e-33    
+1.0516781203e-31    -3.9169728276e-20   -2.4246780915e-32   -2.6375083967e-32   -1.7480071194e-32   
+-6.4621720482e-32   -5.4657289969e-32   3.1731200467e-32    -8.9414800641e-33   -7.6864823284e-32   
+-3.2983384069e-32   -5.2079101719e-33   1.0822071191e-32    5.6300725111e-32    9.5181564337e-32    
+3.2769397077e-32    -1.0723687016e-31   -8.1281390659e-32   -1.3384498413e-31   -2.8254370295e-31   
+-8.6007042518e-32   1.5000173080e-31    1.2982723848e-31    5.7039123642e-32    1.4865395600e-32    
+-3.4680468773e-32   3.9493412843e-32    1.3642580549e-31    7.5869602747e-32    6.5545565002e-32    
+8.9623450889e-32    1.9389102232e-31    3.0019003607e-31    2.5208767876e-31    1.4914898018e-31    
+9.8469939254e-32    -4.4613866235e-32   -1.3218086029e-31   -3.9942733804e-32   -2.9137589731e-32   
+3.4477907586e-32    -9.8649366712e-32   -1.7977201861e-31   3.9361193238e-32    9.8923209876e-32    
+-1.2400581429e-31   -2.2693097118e-31   -1.0832152231e-31   -2.0522814812e-32   -6.4777449973e-32   
+-1.5384757216e-31   -1.0250874976e-31   -2.0679296620e-32   7.3096141375e-32    1.1368478581e-31    
+4.2358421714e-32    9.2240007274e-32    2.0401917569e-31    1.4227882696e-31    5.9953597316e-32    
+2.9380211765e-32    1.0207428705e-32    -1.3468477961e-19   1.2900345204e-32    4.3966121828e-32    
+6.5113735397e-32    7.0057206360e-32    2.7617158318e-32    -1.4873671080e-32   4.2766177195e-32    
+1.8520524754e-32    -1.3582019080e-31   -1.2448861333e-31   -4.2472021488e-33   5.4817533359e-32    
+2.4870169079e-32    -9.8646357446e-32   -1.8190671635e-31   -1.2203549768e-31   -1.6797945929e-31   
+-1.6559160708e-31   1.7409823652e-32    -6.9130352574e-33   -1.6722639059e-31   -2.5184693752e-31   
+-1.4376690877e-31   -2.9107497076e-32   6.6362580595e-32    2.6514563425e-31    1.9418014691e-31    
+-6.7909343082e-32   -1.5558354222e-31   -4.5197851829e-32   1.7872629884e-31    1.8663464867e-31    
+1.1713578284e-31    2.8636885561e-31    1.8969507173e-31    -2.0701301874e-31   -1.9159542291e-31   
+-3.5042709112e-32   -6.8158359805e-32   -1.7494478053e-31   -2.0901982269e-31   -1.1434870502e-31   
+-1.5373510086e-31   -2.0382056416e-31   -1.4371048504e-31   2.7791319561e-32    1.0668034412e-31    
+9.7403906937e-32    5.9812161835e-32    1.4760974086e-31    2.2490028118e-31    1.6574470347e-31    
+2.0764421219e-31    2.1289801366e-32    -1.5705469691e-31   -4.8562022621e-32   -3.3534502840e-33   
+-1.4137529498e-32   -5.3974939008e-33   -2.4319379446e-32   -4.8578864318e-20   -2.8723439561e-33   
+-7.6224696080e-33   1.7420638200e-32    8.2670542863e-32    7.4487726853e-32    -2.4223835265e-32   
+-3.9264896741e-32   7.4294510846e-32    6.0378279915e-32    -4.5556001447e-32   -2.5420018317e-32   
+-4.8840940982e-32   -1.5197374013e-31   -1.1215495045e-31   -1.1071031491e-31   -1.8066313737e-31   
+-5.3885131239e-32   2.0908376959e-32    -9.9120504848e-32   -1.1422852248e-31   3.8631258266e-32    
+1.0081171208e-31    2.6210679327e-32    -1.7949892777e-32   -5.0909249741e-32   -1.3278308955e-31   
+-5.0357801831e-32   6.8803094947e-32    -4.2015365443e-32   -2.6590030162e-31   -3.8162891946e-31   
+-2.5313828859e-31   -4.0701068719e-32   1.5123327272e-31    1.5394941699e-31    -7.5371569300e-32   
+-1.6989429256e-31   -9.6778732022e-32   3.2220394196e-32    1.9476587224e-31    4.3500814144e-32    
+-3.7848661147e-32   -5.8184149179e-33   5.7660536976e-32    6.4089832798e-32    1.1647362265e-32    
+7.9652249528e-32    1.4986217611e-31    5.0731703074e-32    -1.3743560215e-31   -1.6317798804e-31   
+-1.9982350721e-31   -5.8504635959e-32   -4.6542805445e-32   -2.2428065459e-31   -2.2753357660e-31   
+-1.2455425294e-31   -1.1997189384e-32   1.3550722718e-32    -2.7695399222e-32   -1.4238128248e-19   
+-5.3173722058e-33   -2.7348205210e-32   -7.2439134073e-32   -6.8589249015e-32   -4.2171094935e-33   
+1.4160921836e-32    -4.3573882873e-32   -6.6389287827e-32   7.1261100654e-32    1.7160788121e-31    
+9.3888426512e-32    -2.9080789844e-32   -3.6774353350e-32   1.6879692157e-31    2.4888763930e-31    
+2.1955902293e-31    3.2393238885e-31    1.9694157122e-31    -6.9908623874e-32   -1.0432973157e-31   
+1.5351391984e-32    9.6037418264e-32    3.6008683350e-32    -4.8844070736e-32   -9.1429762528e-32   
+-2.6825871945e-31   -2.9636977347e-31   5.5958044997e-32    3.0170341452e-31    1.9733860619e-31    
+-5.8141267145e-32   -2.7777552171e-31   -3.2213360037e-31   -1.8076968418e-31   -8.1296813145e-32   
+7.0537184213e-33    7.8984944895e-32    1.7855058594e-31    2.2716381310e-31    3.2985988964e-31    
+3.5590621135e-31    3.4681571387e-31    3.1877450772e-31    2.1045486620e-31    7.5875433199e-32    
+-4.4583397422e-32   -1.8564159105e-32   3.5178690299e-32    4.5908602733e-32    -2.2206875038e-32   
+-9.2914082755e-32   -2.1832447174e-31   -1.6413737951e-31   -2.1283030518e-32   -3.2690215778e-32   
+-3.3742142162e-32   1.2174924130e-32    3.4989482728e-32    8.4989934276e-32    9.5271089987e-32    
+-1.9851460855e-19   1.0290183508e-32    4.0401458719e-32    3.3687975383e-32    -2.0026662156e-32   
+-6.4598774832e-32   -4.6123765219e-32   4.0654237024e-32    1.0804053214e-31    1.3636449170e-31    
+1.5526756934e-31    1.0690867214e-31    8.5203027892e-32    1.4515117091e-31    2.5474655294e-31    
+2.9390556115e-31    2.3572554971e-31    2.9294786239e-31    3.6136671175e-31    2.8230930938e-31    
+7.1971381361e-32    -1.4974932866e-31   -2.0899311546e-31   -1.1280198956e-31   -2.2168506903e-32   
+9.6374079847e-32    1.5202997578e-31    -5.7969739010e-32   -2.2248967140e-31   -5.7798963190e-32   
+9.8044316260e-32    5.8347025677e-32    -1.3006797972e-32   -1.0021832253e-31   -2.9507917471e-32   
+2.9884639901e-32    8.8479929984e-33    5.2066688498e-32    2.1572277360e-31    2.2081388666e-31    
+9.4546609309e-32    7.7778981731e-32    3.8707806458e-32    5.0987490645e-32    1.0084937492e-31    
+4.5721369993e-32    -8.4730761282e-32   -1.5403508702e-31   -5.0904735843e-32   3.7275772221e-32    
+8.5607586028e-32    2.0026126131e-31    1.5609662199e-31    8.4960405858e-32    1.3547675837e-31    
+1.1282263124e-31    9.4633125693e-32    7.6044892464e-32    -4.4341527704e-33   -1.2670324469e-32   
+-2.5018845605e-32   -1.6792492580e-19   1.0129187801e-32    4.2745112336e-32    7.8841252466e-32    
+5.9003233643e-32    1.3038019102e-32    4.1738513014e-32    8.5854345802e-32    1.0782837892e-31    
+4.7161773750e-32    -3.4590378886e-32   -1.3835098311e-33   6.1467634040e-32    1.4930000770e-32    
+-2.2822457920e-31   -2.4292145593e-31   7.0659435626e-33    -5.9841878333e-32   -2.6149012893e-31   
+-8.8430018494e-32   1.7490095810e-31    1.6070339758e-32    -1.8623479251e-31   -1.1160406677e-31   
+-1.3197717063e-31   -1.4693491306e-31   4.5730867987e-32    1.0019199146e-31    1.8801514924e-32    
+-4.3600496065e-32   -1.2508388367e-32   1.3462776933e-31    2.4269388022e-31    2.4896932735e-31    
+2.5364422136e-31    1.3517507950e-31    2.9805270522e-32    -3.8017180017e-32   -1.5190922900e-31   
+1.4881946561e-32    6.1789249294e-32    3.4751468632e-32    2.3436160011e-32    -2.0783116281e-31   
+-2.4160960424e-31   -3.0767483178e-32   9.6408592361e-32    -1.4382032323e-32   -4.0298579454e-32   
+2.4573662384e-32    -7.5081175176e-32   -1.0235490106e-31   -2.3806675830e-32   6.2846253814e-32    
+8.8799476368e-32    -2.9439456680e-32   -4.9516900192e-32   -3.8892123973e-32   -7.1868784214e-32   
+-7.5114653255e-32   -1.0710822406e-31   -1.2083380624e-19   -2.4557487582e-32   -5.4377240194e-32   
+-8.0275167494e-32   -7.8721634160e-32   -3.2407909054e-32   -2.0022900574e-33   -3.7171952559e-33   
+-7.4793790317e-32   -1.6179090471e-31   -1.1131686999e-31   -5.2887841832e-34   -2.4669958881e-32   
+-1.5246650736e-31   -3.1300536952e-31   -2.2476608674e-31   1.0445734324e-31    2.6336715831e-32    
+-2.5576457807e-31   -2.5832870741e-31   -1.4113784512e-31   -7.8993220375e-34   2.1791135600e-31    
+2.9778196536e-31    3.0560596172e-32    -2.7992959160e-31   -2.2768601471e-31   -6.4462229408e-33   
+3.5104963293e-32    -2.5150312893e-32   -3.5319749621e-32   -8.3895031818e-32   -1.5421507871e-31   
+-1.6629746793e-31   -8.4028473937e-32   6.1403875226e-32    4.5940388100e-32    -1.2889436616e-32   
+-2.8526031742e-31   -4.1075270889e-31   -3.1620572342e-31   -2.1262717976e-31   7.3250413254e-32    
+2.0503969286e-31    1.3586232051e-31    7.8001855460e-32    1.2408781678e-31    -2.6320823148e-32   
+-1.9914917312e-31   -2.7692766114e-32   5.0170475051e-32    -6.7794238675e-32   -1.0693011316e-31   
+-1.0741799033e-31   -1.8536323398e-32   2.8689585324e-33    -3.8286885441e-32   3.1775210975e-32    
+5.4840102850e-32    3.7311883407e-32    4.8661328384e-32    -1.4572803832e-19   -5.0764052679e-32   
+-8.7496652470e-32   -8.0824358455e-32   -3.6060781259e-32   2.1701412468e-32    -1.9207013455e-32   
+-1.8266994133e-31   -2.1454408191e-31   -7.2940458904e-32   -2.3086520971e-32   -1.2293602040e-32   
+-4.5625402634e-32   -7.9565733144e-32   4.3921359003e-32    3.3262916625e-32    -7.8225481505e-32   
+1.5207464456e-32    2.2463386714e-31    2.3599713593e-31    5.3380232906e-32    2.3604020604e-32    
+2.0059237456e-31    2.7784924872e-31    1.5878944445e-31    6.9214259361e-32    9.3634425693e-32    
+8.8173737216e-32    -4.4298739710e-32   5.1533672340e-33    9.8639586599e-32    -1.5201079171e-31   
+-1.2086075565e-31   1.7350823240e-31    1.4927743820e-31    1.1834914740e-31    -2.0404230942e-32   
+-1.5233654470e-32   3.7942324537e-32    -1.0838622152e-31   -2.3081668530e-31   -3.4942989575e-31   
+-2.7005449866e-31   -2.4530968429e-32   4.6843731999e-32    -1.4034462153e-32   2.1290365603e-32    
+4.6032358778e-32    1.3925376278e-33    4.2786113579e-32    1.5699187849e-31    1.5814856493e-31    
+1.4316355103e-31    9.9847430554e-33    3.4042316400e-33    1.5844083985e-31    8.4574655632e-32    
+9.7048813604e-32    1.5108769950e-31    1.3963321235e-31    2.0115727012e-31    -6.1785139837e-20   
+1.0532429383e-32    5.0607559116e-33    -2.2224930632e-32   -1.1684790005e-32   5.8373356750e-32    
+9.0872296087e-32    -1.3307160289e-32   -1.0508054333e-31   -6.1731697090e-32   -3.9944614595e-32   
+-9.4498461060e-33   6.2641247599e-32    9.9672046797e-32    2.2700394587e-31    1.8117226748e-31    
+-9.3118900890e-32   -4.2046210415e-32   7.8594492691e-32    7.2894873233e-32    1.9464681817e-31    
+4.5758139456e-32    -2.1170972993e-31   -1.2372195592e-31   2.3265384191e-32    4.4967313877e-32    
+9.7537066937e-32    7.7886562974e-32    5.4502218754e-32    6.4886065651e-32    7.7659457465e-32    
+-6.4511129973e-33   -2.6882107594e-31   -2.1048430058e-31   7.0606397321e-32    1.3750462718e-31    
+-3.1762421597e-32   -1.8521277071e-32   1.3172345192e-31    1.8988785280e-31    2.6755003741e-32    
+-5.7379006079e-32   -1.1197477067e-32   -1.1948514514e-31   -1.1389153176e-31   1.5812561928e-32    
+5.1309482057e-32    4.5351794569e-32    4.2519417421e-32    -7.9312578680e-32   -1.4573760154e-31   
+-1.8697920958e-31   -5.9488571750e-32   9.9979838238e-32    1.7084070658e-32    -3.6827015497e-32   
+-7.4708026249e-32   -8.7114663825e-32   -1.0768656728e-32   -1.9372146902e-33   -1.7759932890e-32   
+3.3732434500e-19    2.5004222628e-20    -4.2102207856e-20   2.0175769721e-20    1.7185615540e-20    
+2.4156476762e-21    -8.5714369158e-21   -1.6076710603e-20   -1.0629814124e-20   -1.4650291398e-20   
+-9.5164522549e-21   -7.5435645950e-21   2.4956759444e-22    5.4164489824e-21    -1.8061228321e-21   
+-4.0024466399e-21   -3.7876487424e-21   -8.8820144984e-21   -2.0045936315e-21   3.8077133271e-21    
+3.5279199990e-21    -1.8007324621e-21   -6.8160470113e-21   -7.8422618615e-22   -4.8728698222e-21   
+-5.7645557901e-21   4.3304495040e-21    8.9167043354e-22    -3.1166270606e-21   2.0434190804e-21    
+4.3073142568e-22    1.1577443133e-20    8.8345345642e-21    -4.2194358770e-21   1.5469647660e-21    
+-3.8805101100e-21   -4.0747799164e-21   -3.2605065153e-21   -1.2287695953e-21   5.2700262874e-21    
+7.8842390694e-21    6.3610717863e-21    6.1550490706e-21    2.7884312294e-21    -4.2596143714e-21   
+1.4543095874e-21    7.1084126103e-21    4.5510157400e-21    -1.2309336014e-20   -1.2719015936e-20   
+-1.8937098384e-21   -1.1511354258e-20   -1.1606847819e-20   5.0409674578e-21    6.9643452746e-21    
+7.5258665616e-21    -2.3171984457e-21   -1.1982325401e-20   2.1520412820e-21    -7.6981631618e-21   
+-1.9394848192e-20   
+3.0017727476e-02    3.0044366197e-02    3.0077779560e-02    3.0078055347e-02    3.0048792469e-02    
+2.9999072727e-02    2.9943852459e-02    2.9880577791e-02    2.9807148981e-02    2.9732594705e-02    
+2.9645891570e-02    2.9531614210e-02    2.9407589977e-02    2.9285123679e-02    2.9156863487e-02    
+2.9026260181e-02    2.8896536135e-02    2.8755949181e-02    2.8601044857e-02    2.8447720934e-02    
+2.8299093694e-02    2.8149024061e-02    2.8005266995e-02    2.7857742624e-02    2.7682666640e-02    
+2.7491644202e-02    2.7307437140e-02    2.7127351158e-02    2.6949015220e-02    2.6784977126e-02    
+2.6627355534e-02    2.6462379455e-02    2.6307692849e-02    2.6163430043e-02    2.6008302595e-02    
+2.5853561760e-02    2.5718080265e-02    2.5593800533e-02    2.5477865330e-02    2.5388567224e-02    
+2.5318976259e-02    2.5253888658e-02    2.5214886930e-02    2.5206004709e-02    2.5207986289e-02    
+2.5233645814e-02    2.5301998017e-02    2.5403908745e-02    2.5539412427e-02    2.5735317716e-02    
+2.5987230646e-02    2.6282700333e-02    2.6658620557e-02    2.7135086513e-02    2.7707638300e-02    
+2.8411472826e-02    2.9304159242e-02    3.0439693064e-02    3.1884618751e-02    3.3731699686e-02    
+3.4769128577e-02    1.8783025138e-02    1.8796907668e-02    1.8814355446e-02    1.8814701913e-02    
+1.8799874548e-02    1.8774565088e-02    1.8746489667e-02    1.8714331279e-02    1.8677006794e-02    
+1.8639172311e-02    1.8595141289e-02    1.8536958003e-02    1.8473816394e-02    1.8411545007e-02    
+1.8346351210e-02    1.8280013398e-02    1.8214191614e-02    1.8142829539e-02    1.8064145547e-02    
+1.7986335937e-02    1.7911005392e-02    1.7834987765e-02    1.7762280799e-02    1.7687685071e-02    
+1.7598937723e-02    1.7502023744e-02    1.7408677406e-02    1.7317508377e-02    1.7227295393e-02    
+1.7144508337e-02    1.7065082744e-02    1.6981922486e-02    1.6904128435e-02    1.6831768964e-02    
+1.6753872397e-02    1.6676248301e-02    1.6608633166e-02    1.6546877865e-02    1.6489522817e-02    
+1.6446019655e-02    1.6412803278e-02    1.6382053882e-02    1.6364941769e-02    1.6363571349e-02    
+1.6368040790e-02    1.6385026394e-02    1.6424413048e-02    1.6481552861e-02    1.6556578664e-02    
+1.6663511911e-02    1.6800224637e-02    1.6960511879e-02    1.7163851582e-02    1.7421071604e-02    
+1.7730467136e-02    1.8111269690e-02    1.8594812712e-02    1.9211349115e-02    1.9998974022e-02    
+2.1011676851e-02    2.1582137374e-02    7.3490721655e-03    7.3496512565e-03    7.3504133653e-03    
+7.3506294630e-03    7.3504320787e-03    7.3499757888e-03    7.3495042594e-03    7.3489764840e-03    
+7.3483584224e-03    7.3477952110e-03    7.3471078358e-03    7.3460474802e-03    7.3449010875e-03    
+7.3438489705e-03    7.3427716380e-03    7.3417233657e-03    7.3407541682e-03    7.3396743960e-03    
+7.3384283814e-03    7.3372694498e-03    7.3362452521e-03    7.3352569106e-03    7.3344276158e-03    
+7.3335940435e-03    7.3323766155e-03    7.3309621968e-03    7.3297126755e-03    7.3285838675e-03    
+7.3275392846e-03    7.3267798011e-03    7.3261786668e-03    7.3255203084e-03    7.3250906984e-03    
+7.3248911622e-03    7.3245863977e-03    7.3243653002e-03    7.3245358282e-03    7.3249750129e-03    
+7.3256518064e-03    7.3268802218e-03    7.3285582013e-03    7.3304633962e-03    7.3329864886e-03    
+7.3362187776e-03    7.3398810684e-03    7.3442531208e-03    7.3497265286e-03    7.3562225790e-03    
+7.3638670334e-03    7.3733044918e-03    7.3846159818e-03    7.3978391135e-03    7.4140621762e-03    
+7.4341214682e-03    7.4586081003e-03    7.4892896092e-03    7.5289284227e-03    7.5811030119e-03    
+7.6511743099e-03    7.7476957418e-03    7.8038852182e-03    7.1463984864e-03    7.1464147209e-03    
+7.1464362440e-03    7.1464439695e-03    7.1464425291e-03    7.1464357473e-03    7.1464294465e-03    
+7.1464226689e-03    7.1464146182e-03    7.1464087418e-03    7.1464007793e-03    7.1463848363e-03    
+7.1463677313e-03    7.1463537263e-03    7.1463399884e-03    7.1463278152e-03    7.1463183919e-03    
+7.1463072094e-03    7.1462929666e-03    7.1462817062e-03    7.1462745589e-03    7.1462692094e-03    
+7.1462686511e-03    7.1462689637e-03    7.1462610802e-03    7.1462495542e-03    7.1462431071e-03    
+7.1462407178e-03    7.1462416319e-03    7.1462508548e-03    7.1462653689e-03    7.1462801266e-03    
+7.1463023802e-03    7.1463322515e-03    7.1463617210e-03    7.1463958749e-03    7.1464427391e-03    
+7.1464996379e-03    7.1465665125e-03    7.1466522676e-03    7.1467549499e-03    7.1468700630e-03    
+7.1470096022e-03    7.1471774295e-03    7.1473682850e-03    7.1475931164e-03    7.1478665437e-03    
+7.1481909348e-03    7.1485770505e-03    7.1490536312e-03    7.1496335802e-03    7.1503354648e-03    
+7.1512197529e-03    7.1523462200e-03    7.1537862270e-03    7.1556843790e-03    7.1582711704e-03    
+7.1618986026e-03    7.1671572950e-03    7.1750953644e-03    7.1799026734e-03    7.1429172088e-03    
+7.1429176026e-03    7.1429181246e-03    7.1429183306e-03    7.1429183504e-03    7.1429182687e-03    
+7.1429182100e-03    7.1429181544e-03    7.1429180853e-03    7.1429180764e-03    7.1429180366e-03    
+7.1429178410e-03    7.1429176349e-03    7.1429175091e-03    7.1429174034e-03    7.1429173463e-03    
+7.1429173634e-03    7.1429173582e-03    7.1429173037e-03    7.1429173305e-03    7.1429174636e-03    
+7.1429176546e-03    7.1429179704e-03    7.1429183260e-03    7.1429185244e-03    7.1429186672e-03    
+7.1429189472e-03    7.1429193439e-03    7.1429198450e-03    7.1429205674e-03    7.1429214464e-03    
+7.1429223752e-03    7.1429235274e-03    7.1429249099e-03    7.1429263473e-03    7.1429279716e-03    
+7.1429299838e-03    7.1429323369e-03    7.1429350562e-03    7.1429383911e-03    7.1429423220e-03    
+7.1429467869e-03    7.1429521574e-03    7.1429585951e-03    7.1429660591e-03    7.1429749831e-03    
+7.1429859349e-03    7.1429991966e-03    7.1430154159e-03    7.1430359174e-03    7.1430616468e-03    
+7.1430941291e-03    7.1431367733e-03    7.1431935452e-03    7.1432701997e-03    7.1433775584e-03    
+7.1435337921e-03    7.1437698813e-03    7.1441430164e-03    7.1447655562e-03    7.1451579122e-03    
+7.1428581476e-03    7.1428581564e-03    7.1428581680e-03    7.1428581728e-03    7.1428581741e-03    
+7.1428581735e-03    7.1428581735e-03    7.1428581739e-03    7.1428581742e-03    7.1428581759e-03    
+7.1428581772e-03    7.1428581757e-03    7.1428581742e-03    7.1428581745e-03    7.1428581755e-03    
+7.1428581778e-03    7.1428581818e-03    7.1428581857e-03    7.1428581889e-03    7.1428581940e-03    
+7.1428582017e-03    7.1428582109e-03    7.1428582232e-03    7.1428582367e-03    7.1428582474e-03    
+7.1428582575e-03    7.1428582710e-03    7.1428582876e-03    7.1428583072e-03    7.1428583323e-03    
+7.1428583617e-03    7.1428583933e-03    7.1428584311e-03    7.1428584754e-03    7.1428585227e-03    
+7.1428585762e-03    7.1428586410e-03    7.1428587165e-03    7.1428588042e-03    7.1428589110e-03    
+7.1428590375e-03    7.1428591838e-03    7.1428593616e-03    7.1428595772e-03    7.1428598332e-03    
+7.1428601463e-03    7.1428605387e-03    7.1428610269e-03    7.1428616438e-03    7.1428624493e-03    
+7.1428634978e-03    7.1428648824e-03    7.1428667874e-03    7.1428694526e-03    7.1428732660e-03    
+7.1428789636e-03    7.1428878632e-03    7.1429024276e-03    7.1429276356e-03    7.1429743080e-03    
+7.1430048761e-03    7.1428571594e-03    7.1428571595e-03    7.1428571598e-03    7.1428571599e-03    
+7.1428571599e-03    7.1428571599e-03    7.1428571600e-03    7.1428571600e-03    7.1428571600e-03    
+7.1428571601e-03    7.1428571601e-03    7.1428571602e-03    7.1428571602e-03    7.1428571602e-03    
+7.1428571603e-03    7.1428571604e-03    7.1428571605e-03    7.1428571607e-03    7.1428571608e-03    
+7.1428571610e-03    7.1428571612e-03    7.1428571615e-03    7.1428571618e-03    7.1428571622e-03    
+7.1428571625e-03    7.1428571629e-03    7.1428571633e-03    7.1428571637e-03    7.1428571643e-03    
+7.1428571650e-03    7.1428571658e-03    7.1428571667e-03    7.1428571677e-03    7.1428571689e-03    
+7.1428571702e-03    7.1428571718e-03    7.1428571736e-03    7.1428571757e-03    7.1428571782e-03    
+7.1428571813e-03    7.1428571850e-03    7.1428571893e-03    7.1428571947e-03    7.1428572013e-03    
+7.1428572094e-03    7.1428572195e-03    7.1428572325e-03    7.1428572492e-03    7.1428572711e-03    
+7.1428573007e-03    7.1428573408e-03    7.1428573962e-03    7.1428574764e-03    7.1428575945e-03    
+7.1428577740e-03    7.1428580605e-03    7.1428585421e-03    7.1428593978e-03    7.1428610235e-03    
+7.1428643713e-03    7.1428666450e-03    7.1428571431e-03    7.1428571431e-03    7.1428571431e-03    
+7.1428571431e-03    7.1428571431e-03    7.1428571431e-03    7.1428571431e-03    7.1428571431e-03    
+7.1428571431e-03    7.1428571431e-03    7.1428571431e-03    7.1428571431e-03    7.1428571431e-03    
+7.1428571431e-03    7.1428571431e-03    7.1428571431e-03    7.1428571432e-03    7.1428571432e-03    
+7.1428571432e-03    7.1428571432e-03    7.1428571432e-03    7.1428571432e-03    7.1428571432e-03    
+7.1428571432e-03    7.1428571432e-03    7.1428571432e-03    7.1428571432e-03    7.1428571432e-03    
+7.1428571432e-03    7.1428571433e-03    7.1428571433e-03    7.1428571433e-03    7.1428571433e-03    
+7.1428571434e-03    7.1428571434e-03    7.1428571434e-03    7.1428571435e-03    7.1428571435e-03    
+7.1428571436e-03    7.1428571437e-03    7.1428571438e-03    7.1428571439e-03    7.1428571441e-03    
+7.1428571442e-03    7.1428571445e-03    7.1428571448e-03    7.1428571452e-03    7.1428571457e-03    
+7.1428571465e-03    7.1428571475e-03    7.1428571490e-03    7.1428571511e-03    7.1428571543e-03    
+7.1428571593e-03    7.1428571673e-03    7.1428571811e-03    7.1428572060e-03    7.1428572542e-03    
+7.1428573548e-03    7.1428575855e-03    7.1428577476e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571430e-03    7.1428571430e-03    7.1428571430e-03    7.1428571431e-03    
+7.1428571432e-03    7.1428571434e-03    7.1428571438e-03    7.1428571444e-03    7.1428571457e-03    
+7.1428571483e-03    7.1428571543e-03    7.1428571696e-03    7.1428571807e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571430e-03    7.1428571431e-03    7.1428571435e-03    7.1428571444e-03    7.1428571452e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571430e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    6.1111828241e+00    6.1088463800e+00    6.1058814502e+00    6.1058165439e+00    
+6.1084472634e+00    6.1129503900e+00    6.1179438268e+00    6.1236716469e+00    6.1303374451e+00    
+6.1370995397e+00    6.1450004409e+00    6.1555157959e+00    6.1669803498e+00    6.1783243014e+00    
+6.1902539983e+00    6.2024442948e+00    6.2145854310e+00    6.2278253793e+00    6.2425228617e+00    
+6.2571289198e+00    6.2713302984e+00    6.2857347438e+00    6.2995627296e+00    6.3138258144e+00    
+6.3309616323e+00    6.3498356129e+00    6.3681222435e+00    6.3860872803e+00    6.4039711697e+00    
+6.4204372646e+00    6.4362946037e+00    6.4530096417e+00    6.4686855761e+00    6.4832822375e+00    
+6.4991097664e+00    6.5149454962e+00    6.5286856691e+00    6.5411857293e+00    6.5527389415e+00    
+6.5612603489e+00    6.5674861863e+00    6.5731057843e+00    6.5756496237e+00    6.5746260947e+00    
+6.5721940731e+00    6.5668765663e+00    6.5565049029e+00    6.5421133190e+00    6.5237048264e+00    
+6.4983262205e+00    6.4665639846e+00    6.4298721102e+00    6.3843996834e+00    6.3283254964e+00    
+6.2625228610e+00    6.1839320928e+00    6.0878043100e+00    5.9705649165e+00    5.8284871406e+00    
+5.6569043082e+00    5.5652427202e+00    9.8576744177e+00    9.8572834192e+00    9.8567691031e+00    
+9.8566262316e+00    9.8567687066e+00    9.8570907644e+00    9.8574249159e+00    9.8577994155e+00    
+9.8582377021e+00    9.8586398887e+00    9.8591291261e+00    9.8598766792e+00    9.8606850731e+00    
+9.8614301054e+00    9.8621939817e+00    9.8629392801e+00    9.8636314709e+00    9.8644010939e+00    
+9.8652864805e+00    9.8661130642e+00    9.8668478783e+00    9.8675589692e+00    9.8681613593e+00    
+9.8687674511e+00    9.8696388131e+00    9.8706466887e+00    9.8715414844e+00    9.8723534915e+00    
+9.8731077862e+00    9.8736657301e+00    9.8741145201e+00    9.8746027792e+00    9.8749332305e+00    
+9.8751047109e+00    9.8753483918e+00    9.8755340010e+00    9.8754489782e+00    9.8751779618e+00    
+9.8747423832e+00    9.8739257405e+00    9.8727982147e+00    9.8715131959e+00    9.8698017127e+00    
+9.8676008530e+00    9.8651031872e+00    9.8621167798e+00    9.8583729695e+00    9.8539269273e+00    
+9.8486942074e+00    9.8422356023e+00    9.8344993759e+00    9.8254659939e+00    9.8144023678e+00    
+9.8007543590e+00    9.7841460178e+00    9.7634239736e+00    9.7368050981e+00    9.7020390494e+00    
+9.6558419776e+00    9.5931376693e+00    9.5571443294e+00    9.9975823800e+00    9.9975713188e+00    
+9.9975566789e+00    9.9975516011e+00    9.9975530910e+00    9.9975584733e+00    9.9975636359e+00    
+9.9975692610e+00    9.9975759152e+00    9.9975811621e+00    9.9975880163e+00    9.9976006478e+00    
+9.9976142369e+00    9.9976257718e+00    9.9976372593e+00    9.9976477878e+00    9.9976565255e+00    
+9.9976666596e+00    9.9976791143e+00    9.9976896345e+00    9.9976974312e+00    9.9977041488e+00    
+9.9977076938e+00    9.9977108353e+00    9.9977199654e+00    9.9977318959e+00    9.9977405110e+00    
+9.9977465501e+00    9.9977505747e+00    9.9977491096e+00    9.9977443014e+00    9.9977397335e+00    
+9.9977303844e+00    9.9977162130e+00    9.9977028935e+00    9.9976869603e+00    9.9976628978e+00    
+9.9976326766e+00    9.9975964858e+00    9.9975482958e+00    9.9974896293e+00    9.9974238688e+00    
+9.9973429955e+00    9.9972446327e+00    9.9971328800e+00    9.9970007534e+00    9.9968388042e+00    
+9.9966462548e+00    9.9964169257e+00    9.9961325684e+00    9.9957861564e+00    9.9953679317e+00    
+9.9948404281e+00    9.9941678348e+00    9.9933095971e+00    9.9921795286e+00    9.9906393488e+00    
+9.9884802360e+00    9.9853538308e+00    9.9806449814e+00    9.9777984257e+00    9.9999612476e+00    
+9.9999609941e+00    9.9999606589e+00    9.9999605325e+00    9.9999605367e+00    9.9999606146e+00    
+9.9999606815e+00    9.9999607510e+00    9.9999608347e+00    9.9999608825e+00    9.9999609564e+00    
+9.9999611422e+00    9.9999613406e+00    9.9999614898e+00    9.9999616311e+00    9.9999617456e+00    
+9.9999618160e+00    9.9999619082e+00    9.9999620410e+00    9.9999621263e+00    9.9999621477e+00    
+9.9999621387e+00    9.9999620550e+00    9.9999619546e+00    9.9999619707e+00    9.9999620358e+00    
+9.9999620216e+00    9.9999619432e+00    9.9999618106e+00    9.9999615484e+00    9.9999612015e+00    
+9.9999608435e+00    9.9999603632e+00    9.9999597589e+00    9.9999591502e+00    9.9999584560e+00    
+9.9999575504e+00    9.9999564713e+00    9.9999552121e+00    9.9999536231e+00    9.9999517287e+00    
+9.9999495869e+00    9.9999469822e+00    9.9999438347e+00    9.9999402047e+00    9.9999358637e+00    
+9.9999305082e+00    9.9999240327e+00    9.9999161377e+00    9.9999061395e+00    9.9998936249e+00    
+9.9998779353e+00    9.9998573852e+00    9.9998301025e+00    9.9997934917e+00    9.9997424751e+00    
+9.9996684890e+00    9.9995570965e+00    9.9993818027e+00    9.9990908381e+00    9.9989078366e+00    
+9.9999993995e+00    9.9999993942e+00    9.9999993873e+00    9.9999993846e+00    9.9999993843e+00    
+9.9999993853e+00    9.9999993860e+00    9.9999993866e+00    9.9999993874e+00    9.9999993874e+00    
+9.9999993878e+00    9.9999993903e+00    9.9999993928e+00    9.9999993943e+00    9.9999993956e+00    
+9.9999993962e+00    9.9999993959e+00    9.9999993959e+00    9.9999993965e+00    9.9999993961e+00    
+9.9999993944e+00    9.9999993919e+00    9.9999993878e+00    9.9999993833e+00    9.9999993808e+00    
+9.9999993791e+00    9.9999993757e+00    9.9999993708e+00    9.9999993646e+00    9.9999993555e+00    
+9.9999993445e+00    9.9999993329e+00    9.9999993184e+00    9.9999993009e+00    9.9999992827e+00    
+9.9999992621e+00    9.9999992363e+00    9.9999992060e+00    9.9999991706e+00    9.9999991267e+00    
+9.9999990744e+00    9.9999990143e+00    9.9999989410e+00    9.9999988517e+00    9.9999987466e+00    
+9.9999986186e+00    9.9999984580e+00    9.9999982593e+00    9.9999980099e+00    9.9999976850e+00    
+9.9999972650e+00    9.9999967161e+00    9.9999959656e+00    9.9999949228e+00    9.9999934457e+00    
+9.9999912584e+00    9.9999878673e+00    9.9999823601e+00    9.9999729054e+00    9.9999555560e+00    
+9.9999442289e+00    9.9999999910e+00    9.9999999909e+00    9.9999999907e+00    9.9999999907e+00    
+9.9999999907e+00    9.9999999907e+00    9.9999999907e+00    9.9999999907e+00    9.9999999907e+00    
+9.9999999907e+00    9.9999999907e+00    9.9999999907e+00    9.9999999907e+00    9.9999999907e+00    
+9.9999999907e+00    9.9999999907e+00    9.9999999907e+00    9.9999999907e+00    9.9999999906e+00    
+9.9999999906e+00    9.9999999905e+00    9.9999999905e+00    9.9999999903e+00    9.9999999902e+00    
+9.9999999901e+00    9.9999999900e+00    9.9999999899e+00    9.9999999898e+00    9.9999999896e+00    
+9.9999999894e+00    9.9999999891e+00    9.9999999888e+00    9.9999999884e+00    9.9999999880e+00    
+9.9999999875e+00    9.9999999870e+00    9.9999999863e+00    9.9999999856e+00    9.9999999847e+00    
+9.9999999836e+00    9.9999999822e+00    9.9999999807e+00    9.9999999787e+00    9.9999999764e+00    
+9.9999999735e+00    9.9999999699e+00    9.9999999654e+00    9.9999999595e+00    9.9999999520e+00    
+9.9999999418e+00    9.9999999282e+00    9.9999999096e+00    9.9999998829e+00    9.9999998440e+00    
+9.9999997857e+00    9.9999996936e+00    9.9999995404e+00    9.9999992711e+00    9.9999987650e+00    
+9.9999977348e+00    9.9999970378e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    
+9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    
+9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    
+9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    
+9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    9.9999999999e+00    
+9.9999999998e+00    9.9999999998e+00    9.9999999998e+00    9.9999999998e+00    9.9999999998e+00    
+9.9999999998e+00    9.9999999998e+00    9.9999999998e+00    9.9999999998e+00    9.9999999998e+00    
+9.9999999998e+00    9.9999999998e+00    9.9999999998e+00    9.9999999998e+00    9.9999999997e+00    
+9.9999999997e+00    9.9999999997e+00    9.9999999997e+00    9.9999999996e+00    9.9999999996e+00    
+9.9999999995e+00    9.9999999994e+00    9.9999999993e+00    9.9999999992e+00    9.9999999990e+00    
+9.9999999988e+00    9.9999999985e+00    9.9999999981e+00    9.9999999975e+00    9.9999999965e+00    
+9.9999999951e+00    9.9999999928e+00    9.9999999889e+00    9.9999999820e+00    9.9999999689e+00    
+9.9999999417e+00    9.9999998801e+00    9.9999998371e+00    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    9.9999999999e+00    9.9999999999e+00    
+9.9999999999e+00    9.9999999998e+00    9.9999999998e+00    9.9999999996e+00    9.9999999993e+00    
+9.9999999986e+00    9.9999999972e+00    9.9999999935e+00    9.9999999908e+00    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    9.9999999999e+00    9.9999999999e+00    9.9999999996e+00    9.9999999995e+00    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    
+4.5749740666e-02    4.5803018108e-02    4.5869844835e-02    4.5870396409e-02    4.5811870652e-02    
+4.5712431168e-02    4.5601990632e-02    4.5475441296e-02    4.5328583676e-02    4.5179475124e-02    
+4.5006068854e-02    4.4777514135e-02    4.4529465668e-02    4.4284533073e-02    4.4028012688e-02    
+4.3766806076e-02    4.3507357985e-02    4.3226184077e-02    4.2916375428e-02    4.2609727583e-02    
+4.2312473102e-02    4.2012333835e-02    4.1724819704e-02    4.1429770961e-02    4.1079618995e-02    
+4.0697574118e-02    4.0329159994e-02    3.9968988030e-02    3.9612316154e-02    3.9284239966e-02    
+3.8968996783e-02    3.8639044625e-02    3.8329671413e-02    3.8041145801e-02    3.7730890905e-02    
+3.7421409235e-02    3.7150446244e-02    3.6901886780e-02    3.6670016375e-02    3.6491420163e-02    
+3.6352238233e-02    3.6222063031e-02    3.6144059574e-02    3.6126295132e-02    3.6130258292e-02    
+3.6181577341e-02    3.6318281748e-02    3.6522103203e-02    3.6793110567e-02    3.7184921146e-02    
+3.7688747006e-02    3.8279686380e-02    3.9031526827e-02    3.9984458740e-02    4.1129562314e-02    
+4.2537231366e-02    4.4322604198e-02    4.6593671843e-02    4.9483523216e-02    5.3177685086e-02    
+5.5252542869e-02    2.3280335989e-02    2.3308101051e-02    2.3342996606e-02    2.3343689540e-02    
+2.3314034811e-02    2.3263415891e-02    2.3207265049e-02    2.3142948273e-02    2.3068299303e-02    
+2.2992630335e-02    2.2904568293e-02    2.2788201720e-02    2.2661918502e-02    2.2537375728e-02    
+2.2406988133e-02    2.2274312511e-02    2.2142668943e-02    2.1999944792e-02    2.1842576809e-02    
+2.1686957588e-02    2.1536296497e-02    2.1384261244e-02    2.1238847313e-02    2.1089655857e-02    
+2.0912161161e-02    2.0718333203e-02    2.0531640526e-02    2.0349302468e-02    2.0168876500e-02    
+2.0003302389e-02    1.9844451202e-02    1.9678130687e-02    1.9522542584e-02    1.9377823642e-02    
+1.9222030509e-02    1.9066782316e-02    1.8931552046e-02    1.8808041445e-02    1.8693331348e-02    
+1.8606325025e-02    1.8539892270e-02    1.8478393479e-02    1.8444169253e-02    1.8441428412e-02    
+1.8450367294e-02    1.8484338503e-02    1.8563111811e-02    1.8677391437e-02    1.8827443043e-02    
+1.9041309537e-02    1.9314734988e-02    1.9635309472e-02    2.0041988877e-02    2.0556428923e-02    
+2.1175219986e-02    2.1936825095e-02    2.2903911139e-02    2.4136983945e-02    2.5712233758e-02    
+2.7737639416e-02    2.8878560463e-02    4.1243004523e-04    4.1358822733e-04    4.1511244487e-04    
+4.1554464035e-04    4.1514987171e-04    4.1423729193e-04    4.1329423302e-04    4.1223868221e-04    
+4.1100255905e-04    4.0987613623e-04    4.0850138593e-04    4.0638067466e-04    4.0408788919e-04    
+4.0198365525e-04    3.9982899033e-04    3.9773244572e-04    3.9579405072e-04    3.9363450634e-04    
+3.9114247700e-04    3.8882461395e-04    3.8677621840e-04    3.8479953539e-04    3.8314094587e-04    
+3.8147380136e-04    3.7903894536e-04    3.7621010780e-04    3.7371106537e-04    3.7145344926e-04    
+3.6936428358e-04    3.6784531654e-04    3.6664304786e-04    3.6532633115e-04    3.6446711118e-04    
+3.6406803871e-04    3.6345850963e-04    3.6301631470e-04    3.6335737063e-04    3.6423574004e-04    
+3.6558932704e-04    3.6804615787e-04    3.7140211691e-04    3.7521250675e-04    3.8025869147e-04    
+3.8672326949e-04    3.9404785109e-04    4.0279195596e-04    4.1373877155e-04    4.2673087232e-04    
+4.4201978116e-04    4.6089469798e-04    4.8351767790e-04    5.0996394125e-04    5.4241006672e-04    
+5.8252865059e-04    6.3150191482e-04    6.9286493267e-04    7.7214255964e-04    8.7649173812e-04    
+1.0166343341e-03    1.2096771979e-03    1.3220561507e-03    7.0826869884e-06    7.1151560917e-06    
+7.1582023058e-06    7.1736533082e-06    7.1707725458e-06    7.1572088637e-06    7.1446071942e-06    
+7.1310520537e-06    7.1149506332e-06    7.1031978009e-06    7.0872728495e-06    7.0553869733e-06    
+7.0211767875e-06    6.9931669161e-06    6.9656910769e-06    6.9413447167e-06    6.9224981537e-06    
+6.9001330558e-06    6.8716474744e-06    6.8491266167e-06    6.8348320610e-06    6.8241331545e-06    
+6.8230164724e-06    6.8236417422e-06    6.8078746863e-06    6.7848226001e-06    6.7719284488e-06    
+6.7671498219e-06    6.7689781443e-06    6.7874239373e-06    6.8164520719e-06    6.8459675471e-06    
+6.8904746578e-06    6.9502173174e-06    7.0091563392e-06    7.0774639932e-06    7.1711923867e-06    
+7.2849901455e-06    7.4187392865e-06    7.5902494312e-06    7.7956141199e-06    8.0258402577e-06    
+8.3049186156e-06    8.6405732002e-06    9.0222843032e-06    9.4719471288e-06    1.0018801657e-05    
+1.0667583978e-05    1.1439815356e-05    1.2392976682e-05    1.3552874690e-05    1.4956643797e-05    
+1.6725220014e-05    1.8978154215e-05    2.1858168334e-05    2.5654472358e-05    3.0828054987e-05    
+3.8082919441e-05    4.8600304261e-05    6.4476443084e-05    7.4091061073e-05    1.2013190886e-07    
+1.2091957041e-07    1.2196343181e-07    1.2237539998e-07    1.2241511781e-07    1.2225171830e-07    
+1.2213434476e-07    1.2202312577e-07    1.2188496551e-07    1.2186700248e-07    1.2178755961e-07    
+1.2139623352e-07    1.2098409504e-07    1.2073244588e-07    1.2052118227e-07    1.2040693126e-07    
+1.2044104480e-07    1.2043070291e-07    1.2032165792e-07    1.2037537943e-07    1.2064149576e-07    
+1.2102341064e-07    1.2165503708e-07    1.2236621266e-07    1.2276306291e-07    1.2304877596e-07    
+1.2360873526e-07    1.2440203400e-07    1.2540427091e-07    1.2684904093e-07    1.2860703708e-07    
+1.3046476902e-07    1.3276905443e-07    1.3553408870e-07    1.3840893115e-07    1.4165739869e-07    
+1.4568192938e-07    1.5038808260e-07    1.5582658674e-07    1.6249657150e-07    1.7035822938e-07    
+1.7928801285e-07    1.9002906166e-07    2.0290457520e-07    2.1783243350e-07    2.3568046209e-07    
+2.5758403596e-07    2.8410753644e-07    3.1654601661e-07    3.5754907825e-07    4.0900796324e-07    
+4.7397245035e-07    5.5926095962e-07    6.7280475112e-07    8.2611373021e-07    1.0408310872e-06    
+1.3532984444e-06    1.8254768056e-06    2.5717470981e-06    3.8168266285e-06    4.6015387647e-06    
+2.0095317543e-09    2.0271156221e-09    2.0503448184e-09    2.0599667215e-09    2.0624214914e-09    
+2.0612104159e-09    2.0613285657e-09    2.0620010499e-09    2.0625875361e-09    2.0660378651e-09    
+2.0687185654e-09    2.0656382958e-09    2.0626341876e-09    2.0633328509e-09    2.0653504146e-09    
+2.0698613617e-09    2.0779246674e-09    2.0856607014e-09    2.0920131092e-09    2.1023407368e-09    
+2.1176896812e-09    2.1361824440e-09    2.1606897959e-09    2.1877201071e-09    2.2091521633e-09    
+2.2293172998e-09    2.2563563370e-09    2.2895356852e-09    2.3285946192e-09    2.3788301680e-09    
+2.4376472971e-09    2.5008172998e-09    2.5764469577e-09    2.6651362805e-09    2.7596095543e-09    
+2.8666456674e-09    2.9962603197e-09    3.1473004337e-09    3.3226418860e-09    3.5363359485e-09    
+3.7893321723e-09    4.0819644015e-09    4.4375147688e-09    4.8687735315e-09    5.3806472082e-09    
+6.0068513852e-09    6.7915893040e-09    7.7681032180e-09    9.0018366888e-09    1.0612885850e-08    
+1.2709927213e-08    1.5479038087e-08    1.9289026501e-08    2.4619464258e-08    3.2246341455e-08    
+4.3641510930e-08    6.1440781231e-08    9.0569522917e-08    1.4098557372e-07    2.3433025464e-07    
+2.9546639019e-07    3.3010962236e-11    3.3380356205e-11    3.3866123447e-11    3.4072536025e-11    
+3.4146232716e-11    3.4156246841e-11    3.4198035462e-11    3.4257299254e-11    3.4322380441e-11    
+3.4449634118e-11    3.4569826602e-11    3.4587967906e-11    3.4615857056e-11    3.4722993144e-11    
+3.4864168844e-11    3.5062898765e-11    3.5340298830e-11    3.5621674013e-11    3.5887461839e-11    
+3.6243355105e-11    3.6710825352e-11    3.7255256172e-11    3.7936377997e-11    3.8685378685e-11    
+3.9341121073e-11    3.9993177606e-11    4.0808103424e-11    4.1774219500e-11    4.2892547153e-11    
+4.4280659001e-11    4.5889394281e-11    4.7640038182e-11    4.9718752986e-11    5.2146522343e-11    
+5.4780038578e-11    5.7791407510e-11    6.1427765218e-11    6.5692353900e-11    7.0699503977e-11    
+7.6841279867e-11    8.4198327997e-11    9.2881670671e-11    1.0361288693e-10    1.1686353231e-10    
+1.3299416256e-10    1.5325659882e-10    1.7931779629e-10    2.1274392447e-10    2.5647836242e-10    
+3.1571206933e-10    3.9588176270e-10    5.0676193450e-10    6.6707742889e-10    9.0338222710e-10    
+1.2622334423e-09    1.8353120265e-09    2.7985332181e-09    4.5098977348e-09    7.7612986389e-09    
+1.4456862054e-08    1.9004347375e-08    5.3016640557e-13    5.3760555035e-13    5.4722025522e-13    
+5.5130552901e-13    5.5308188585e-13    5.5383692424e-13    5.5523597872e-13    5.5696810011e-13    
+5.5896650156e-13    5.6225250150e-13    5.6553850145e-13    5.6709324736e-13    5.6895850878e-13    
+5.7244400192e-13    5.7664073169e-13    5.8205870679e-13    5.8916370047e-13    5.9655795928e-13    
+6.0379696035e-13    6.1296757600e-13    6.2458024863e-13    6.3785825580e-13    6.5406751196e-13    
+6.7196422038e-13    6.8839552114e-13    7.0520455794e-13    7.2572199986e-13    7.4972493491e-13    
+7.7736905454e-13    8.1125340820e-13    8.5055530327e-13    8.9385356755e-13    9.4527901132e-13    
+1.0056309084e-12    1.0721337013e-12    1.1490279214e-12    1.2424419132e-12    1.3531085974e-12    
+1.4849588573e-12    1.6487835403e-12    1.8479349995e-12    2.0880094528e-12    2.3909450808e-12    
+2.7728618013e-12    3.2501687973e-12    3.8670308275e-12    4.6835556267e-12    5.7647797126e-12    
+7.2318505351e-12    9.2971763101e-12    1.2207648087e-11    1.6427827848e-11    2.2849690889e-11    
+3.2835969620e-11    4.8946682211e-11    7.6479590889e-11    1.2634774520e-10    2.2267975441e-10    
+4.2386468987e-10    8.8528232748e-10    1.2094890332e-09    8.3396831108e-15    8.4953745427e-15    
+8.6731836990e-15    8.7395368720e-15    8.7395368720e-15    8.7842060015e-15    8.8509928553e-15    
+8.8952283039e-15    8.9173460283e-15    8.9615814769e-15    9.0504860550e-15    9.0951551845e-15    
+9.1615083575e-15    9.2499792548e-15    9.3167661086e-15    9.4056706867e-15    9.6051638865e-15    
+9.8050907671e-15    9.9607821991e-15    1.0160709080e-14    1.0426989133e-14    1.0693269187e-14    
+1.1026336094e-14    1.1470425304e-14    1.1870279065e-14    1.2225463697e-14    1.2647435182e-14    
+1.3180428970e-14    1.3779775931e-14    1.4534814324e-14    1.5467661874e-14    1.6488980320e-14    
+1.7621321069e-14    1.9064611001e-14    2.0663158684e-14    2.2439515523e-14    2.4704630702e-14    
+2.7391283686e-14    3.0655165906e-14    3.4807660226e-14    3.9892568415e-14    4.6154052802e-14    
+5.4280798606e-14    6.4761564167e-14    7.8195262765e-14    9.6025184332e-14    1.2040585542e-13    
+1.5382356847e-13    2.0080812013e-13    2.6966449906e-13    3.7082793433e-13    5.2477119872e-13    
+7.7152910796e-13    1.1766941588e-12    1.8714942790e-12    3.1430322754e-12    5.6270895062e-12    
+1.0848979267e-11    2.2846915332e-11    5.3515183604e-11    7.5752418227e-11    1.9081958236e-16    
+1.4615045285e-16    1.4615045285e-16    1.6826817717e-16    1.4615045285e-16    1.2403272853e-16    
+1.4615045285e-16    1.9038590149e-16    1.9038590149e-16    1.6826817717e-16    1.6826817717e-16    
+1.6826817717e-16    1.6826817717e-16    1.6826817717e-16    1.6826817717e-16    1.6826817717e-16    
+2.1250362581e-16    2.1250362581e-16    2.1250362581e-16    2.1250362581e-16    1.9038590149e-16    
+1.9038590149e-16    2.1250362581e-16    2.3462135013e-16    2.5717275531e-16    2.5717275531e-16    
+2.1250362581e-16    2.3505503099e-16    2.5717275531e-16    2.5673907444e-16    3.0140820395e-16    
+3.6819505778e-16    3.6819505778e-16    4.1286418728e-16    4.7921736024e-16    4.7878367937e-16    
+5.0133508456e-16    5.6812193838e-16    6.5659283566e-16    7.4549741380e-16    9.0162252664e-16    
+1.0794316829e-15    1.2342557532e-15    1.4784180824e-15    1.8787055245e-15    2.3895815882e-15    
+3.0557154029e-15    3.9881292713e-15    5.4309855224e-15    7.6735492960e-15    1.1048887499e-14    
+1.6466862596e-14    2.5637044571e-14    4.1535351547e-14    7.0490054765e-14    1.2713354675e-13    
+2.4663777964e-13    5.2019716659e-13    1.2117997578e-12    3.1824009573e-12    4.6532465381e-12    
+5.7245874707e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    5.7245874707e-17    5.7245874707e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    5.7245874707e-17    5.7245874707e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+5.7245874707e-17    7.9797279895e-17    5.7245874707e-17    3.4694469520e-17    5.7245874707e-17    
+1.0191500421e-16    1.0191500421e-16    7.9797279895e-17    1.2403272853e-16    2.1250362581e-16    
+3.2352592827e-16    5.0133508456e-16    8.5695339713e-16    1.4563003581e-15    2.5886411070e-15    
+5.0758008907e-15    1.0649033738e-14    2.4527255227e-14    6.3118781035e-14    1.8562018242e-13    
+2.7954461662e-13    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    7.9363599026e-17    7.9363599026e-17    
+5.7245874707e-17    2.1293730668e-16    4.7965104111e-16    1.1462185368e-15    3.2330908784e-15    
+1.0604364609e-14    1.6421759785e-14    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    5.7245874707e-17    7.9797279895e-17    
+1.4615045285e-16    5.9023966270e-16    9.6797569960e-16    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    5.7245874707e-17    7.9797279895e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+1.8865117801e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.8865117801e-17    
+zone T = "Zone0 POLE3"
+I = 1
+J = 81
+K = 19
+f = BLOCK
+2.2204460493e-16    -1.0000000000e-04   -2.0993045568e-04   -3.3077750656e-04   -4.6362522026e-04   
+-6.0966531730e-04   -7.7020786146e-04   -9.4669301182e-04   -1.1407039418e-03   -1.3539810413e-03   
+-1.5884375285e-03   -1.8461766134e-03   -2.1295103638e-03   -2.4409804468e-03   -2.7833809284e-03   
+-3.1597833380e-03   -3.5735642221e-03   -4.0284354336e-03   -4.5284774291e-03   -5.0781758734e-03   
+-5.6824618780e-03   -6.3467562366e-03   -7.0770180521e-03   -7.8797981936e-03   -8.7622980613e-03   
+-9.7324341872e-03   -1.0798909251e-02   -1.1971290149e-02   -1.3260093812e-02   -1.4676881552e-02   
+-1.6234362770e-02   -1.7946508971e-02   -1.9828679091e-02   -2.1897757281e-02   -2.4172304364e-02   
+-2.6672724336e-02   -2.9421447406e-02   -3.2443131203e-02   -3.5764881970e-02   -3.9416497724e-02   
+-4.3430735563e-02   -4.7444973402e-02   -5.1459211241e-02   -5.5473449080e-02   -5.9487686919e-02   
+-6.3501924758e-02   -6.7516162597e-02   -7.1530400436e-02   -7.5544638275e-02   -7.9558876114e-02   
+-8.3573113953e-02   -8.7587351792e-02   -9.1601589631e-02   -9.5615827470e-02   -9.9630065309e-02   
+-1.0364430315e-01   -1.0765854099e-01   -1.1167277883e-01   -1.1568701666e-01   -1.1970125450e-01   
+-1.2371549234e-01   -1.2772973018e-01   -1.3174396802e-01   -1.3575820586e-01   -1.3977244370e-01   
+-1.4378668154e-01   -1.4780091938e-01   -1.5181515722e-01   -1.5582939505e-01   -1.5984363289e-01   
+-1.6385787073e-01   -1.6787210857e-01   -1.7188634641e-01   -1.7590058425e-01   -1.7991482209e-01   
+-1.8392905993e-01   -1.8794329777e-01   -1.9195753561e-01   -1.9597177344e-01   -1.9998601128e-01   
+-2.0400024912e-01   2.2204460493e-16    -1.0000000000e-04   -2.0993045568e-04   -3.3077750656e-04   
+-4.6362522026e-04   -6.0966531730e-04   -7.7020786146e-04   -9.4669301182e-04   -1.1407039418e-03   
+-1.3539810413e-03   -1.5884375285e-03   -1.8461766134e-03   -2.1295103638e-03   -2.4409804468e-03   
+-2.7833809284e-03   -3.1597833380e-03   -3.5735642221e-03   -4.0284354336e-03   -4.5284774291e-03   
+-5.0781758734e-03   -5.6824618780e-03   -6.3467562366e-03   -7.0770180521e-03   -7.8797981936e-03   
+-8.7622980613e-03   -9.7324341872e-03   -1.0798909251e-02   -1.1971290149e-02   -1.3260093812e-02   
+-1.4676881552e-02   -1.6234362770e-02   -1.7946508971e-02   -1.9828679091e-02   -2.1897757281e-02   
+-2.4172304364e-02   -2.6672724336e-02   -2.9421447406e-02   -3.2443131203e-02   -3.5764881970e-02   
+-3.9416497724e-02   -4.3430735563e-02   -4.7444973402e-02   -5.1459211241e-02   -5.5473449080e-02   
+-5.9487686919e-02   -6.3501924758e-02   -6.7516162597e-02   -7.1530400436e-02   -7.5544638275e-02   
+-7.9558876114e-02   -8.3573113953e-02   -8.7587351792e-02   -9.1601589631e-02   -9.5615827470e-02   
+-9.9630065309e-02   -1.0364430315e-01   -1.0765854099e-01   -1.1167277883e-01   -1.1568701666e-01   
+-1.1970125450e-01   -1.2371549234e-01   -1.2772973018e-01   -1.3174396802e-01   -1.3575820586e-01   
+-1.3977244370e-01   -1.4378668154e-01   -1.4780091938e-01   -1.5181515722e-01   -1.5582939505e-01   
+-1.5984363289e-01   -1.6385787073e-01   -1.6787210857e-01   -1.7188634641e-01   -1.7590058425e-01   
+-1.7991482209e-01   -1.8392905993e-01   -1.8794329777e-01   -1.9195753561e-01   -1.9597177344e-01   
+-1.9998601128e-01   -2.0400024912e-01   2.2204460493e-16    -1.0000000000e-04   -2.0993045568e-04   
+-3.3077750656e-04   -4.6362522026e-04   -6.0966531730e-04   -7.7020786146e-04   -9.4669301182e-04   
+-1.1407039418e-03   -1.3539810413e-03   -1.5884375285e-03   -1.8461766134e-03   -2.1295103638e-03   
+-2.4409804468e-03   -2.7833809284e-03   -3.1597833380e-03   -3.5735642221e-03   -4.0284354336e-03   
+-4.5284774291e-03   -5.0781758734e-03   -5.6824618780e-03   -6.3467562366e-03   -7.0770180521e-03   
+-7.8797981936e-03   -8.7622980613e-03   -9.7324341872e-03   -1.0798909251e-02   -1.1971290149e-02   
+-1.3260093812e-02   -1.4676881552e-02   -1.6234362770e-02   -1.7946508971e-02   -1.9828679091e-02   
+-2.1897757281e-02   -2.4172304364e-02   -2.6672724336e-02   -2.9421447406e-02   -3.2443131203e-02   
+-3.5764881970e-02   -3.9416497724e-02   -4.3430735563e-02   -4.7444973402e-02   -5.1459211241e-02   
+-5.5473449080e-02   -5.9487686919e-02   -6.3501924758e-02   -6.7516162597e-02   -7.1530400436e-02   
+-7.5544638275e-02   -7.9558876114e-02   -8.3573113953e-02   -8.7587351792e-02   -9.1601589631e-02   
+-9.5615827470e-02   -9.9630065309e-02   -1.0364430315e-01   -1.0765854099e-01   -1.1167277883e-01   
+-1.1568701666e-01   -1.1970125450e-01   -1.2371549234e-01   -1.2772973018e-01   -1.3174396802e-01   
+-1.3575820586e-01   -1.3977244370e-01   -1.4378668154e-01   -1.4780091938e-01   -1.5181515722e-01   
+-1.5582939505e-01   -1.5984363289e-01   -1.6385787073e-01   -1.6787210857e-01   -1.7188634641e-01   
+-1.7590058425e-01   -1.7991482209e-01   -1.8392905993e-01   -1.8794329777e-01   -1.9195753561e-01   
+-1.9597177344e-01   -1.9998601128e-01   -2.0400024912e-01   2.2204460493e-16    -1.0000000000e-04   
+-2.0993045568e-04   -3.3077750656e-04   -4.6362522026e-04   -6.0966531730e-04   -7.7020786146e-04   
+-9.4669301182e-04   -1.1407039418e-03   -1.3539810413e-03   -1.5884375285e-03   -1.8461766134e-03   
+-2.1295103638e-03   -2.4409804468e-03   -2.7833809284e-03   -3.1597833380e-03   -3.5735642221e-03   
+-4.0284354336e-03   -4.5284774291e-03   -5.0781758734e-03   -5.6824618780e-03   -6.3467562366e-03   
+-7.0770180521e-03   -7.8797981936e-03   -8.7622980613e-03   -9.7324341872e-03   -1.0798909251e-02   
+-1.1971290149e-02   -1.3260093812e-02   -1.4676881552e-02   -1.6234362770e-02   -1.7946508971e-02   
+-1.9828679091e-02   -2.1897757281e-02   -2.4172304364e-02   -2.6672724336e-02   -2.9421447406e-02   
+-3.2443131203e-02   -3.5764881970e-02   -3.9416497724e-02   -4.3430735563e-02   -4.7444973402e-02   
+-5.1459211241e-02   -5.5473449080e-02   -5.9487686919e-02   -6.3501924758e-02   -6.7516162597e-02   
+-7.1530400436e-02   -7.5544638275e-02   -7.9558876114e-02   -8.3573113953e-02   -8.7587351792e-02   
+-9.1601589631e-02   -9.5615827470e-02   -9.9630065309e-02   -1.0364430315e-01   -1.0765854099e-01   
+-1.1167277883e-01   -1.1568701666e-01   -1.1970125450e-01   -1.2371549234e-01   -1.2772973018e-01   
+-1.3174396802e-01   -1.3575820586e-01   -1.3977244370e-01   -1.4378668154e-01   -1.4780091938e-01   
+-1.5181515722e-01   -1.5582939505e-01   -1.5984363289e-01   -1.6385787073e-01   -1.6787210857e-01   
+-1.7188634641e-01   -1.7590058425e-01   -1.7991482209e-01   -1.8392905993e-01   -1.8794329777e-01   
+-1.9195753561e-01   -1.9597177344e-01   -1.9998601128e-01   -2.0400024912e-01   2.2204460493e-16    
+-1.0000000000e-04   -2.0993045568e-04   -3.3077750656e-04   -4.6362522026e-04   -6.0966531730e-04   
+-7.7020786146e-04   -9.4669301182e-04   -1.1407039418e-03   -1.3539810413e-03   -1.5884375285e-03   
+-1.8461766134e-03   -2.1295103638e-03   -2.4409804468e-03   -2.7833809284e-03   -3.1597833380e-03   
+-3.5735642221e-03   -4.0284354336e-03   -4.5284774291e-03   -5.0781758734e-03   -5.6824618780e-03   
+-6.3467562366e-03   -7.0770180521e-03   -7.8797981936e-03   -8.7622980613e-03   -9.7324341872e-03   
+-1.0798909251e-02   -1.1971290149e-02   -1.3260093812e-02   -1.4676881552e-02   -1.6234362770e-02   
+-1.7946508971e-02   -1.9828679091e-02   -2.1897757281e-02   -2.4172304364e-02   -2.6672724336e-02   
+-2.9421447406e-02   -3.2443131203e-02   -3.5764881970e-02   -3.9416497724e-02   -4.3430735563e-02   
+-4.7444973402e-02   -5.1459211241e-02   -5.5473449080e-02   -5.9487686919e-02   -6.3501924758e-02   
+-6.7516162597e-02   -7.1530400436e-02   -7.5544638275e-02   -7.9558876114e-02   -8.3573113953e-02   
+-8.7587351792e-02   -9.1601589631e-02   -9.5615827470e-02   -9.9630065309e-02   -1.0364430315e-01   
+-1.0765854099e-01   -1.1167277883e-01   -1.1568701666e-01   -1.1970125450e-01   -1.2371549234e-01   
+-1.2772973018e-01   -1.3174396802e-01   -1.3575820586e-01   -1.3977244370e-01   -1.4378668154e-01   
+-1.4780091938e-01   -1.5181515722e-01   -1.5582939505e-01   -1.5984363289e-01   -1.6385787073e-01   
+-1.6787210857e-01   -1.7188634641e-01   -1.7590058425e-01   -1.7991482209e-01   -1.8392905993e-01   
+-1.8794329777e-01   -1.9195753561e-01   -1.9597177344e-01   -1.9998601128e-01   -2.0400024912e-01   
+2.2204460493e-16    -1.0000000000e-04   -2.0993045568e-04   -3.3077750656e-04   -4.6362522026e-04   
+-6.0966531730e-04   -7.7020786146e-04   -9.4669301182e-04   -1.1407039418e-03   -1.3539810413e-03   
+-1.5884375285e-03   -1.8461766134e-03   -2.1295103638e-03   -2.4409804468e-03   -2.7833809284e-03   
+-3.1597833380e-03   -3.5735642221e-03   -4.0284354336e-03   -4.5284774291e-03   -5.0781758734e-03   
+-5.6824618780e-03   -6.3467562366e-03   -7.0770180521e-03   -7.8797981936e-03   -8.7622980613e-03   
+-9.7324341872e-03   -1.0798909251e-02   -1.1971290149e-02   -1.3260093812e-02   -1.4676881552e-02   
+-1.6234362770e-02   -1.7946508971e-02   -1.9828679091e-02   -2.1897757281e-02   -2.4172304364e-02   
+-2.6672724336e-02   -2.9421447406e-02   -3.2443131203e-02   -3.5764881970e-02   -3.9416497724e-02   
+-4.3430735563e-02   -4.7444973402e-02   -5.1459211241e-02   -5.5473449080e-02   -5.9487686919e-02   
+-6.3501924758e-02   -6.7516162597e-02   -7.1530400436e-02   -7.5544638275e-02   -7.9558876114e-02   
+-8.3573113953e-02   -8.7587351792e-02   -9.1601589631e-02   -9.5615827470e-02   -9.9630065309e-02   
+-1.0364430315e-01   -1.0765854099e-01   -1.1167277883e-01   -1.1568701666e-01   -1.1970125450e-01   
+-1.2371549234e-01   -1.2772973018e-01   -1.3174396802e-01   -1.3575820586e-01   -1.3977244370e-01   
+-1.4378668154e-01   -1.4780091938e-01   -1.5181515722e-01   -1.5582939505e-01   -1.5984363289e-01   
+-1.6385787073e-01   -1.6787210857e-01   -1.7188634641e-01   -1.7590058425e-01   -1.7991482209e-01   
+-1.8392905993e-01   -1.8794329777e-01   -1.9195753561e-01   -1.9597177344e-01   -1.9998601128e-01   
+-2.0400024912e-01   2.2204460493e-16    -1.0000000000e-04   -2.0993045568e-04   -3.3077750656e-04   
+-4.6362522026e-04   -6.0966531730e-04   -7.7020786146e-04   -9.4669301182e-04   -1.1407039418e-03   
+-1.3539810413e-03   -1.5884375285e-03   -1.8461766134e-03   -2.1295103638e-03   -2.4409804468e-03   
+-2.7833809284e-03   -3.1597833380e-03   -3.5735642221e-03   -4.0284354336e-03   -4.5284774291e-03   
+-5.0781758734e-03   -5.6824618780e-03   -6.3467562366e-03   -7.0770180521e-03   -7.8797981936e-03   
+-8.7622980613e-03   -9.7324341872e-03   -1.0798909251e-02   -1.1971290149e-02   -1.3260093812e-02   
+-1.4676881552e-02   -1.6234362770e-02   -1.7946508971e-02   -1.9828679091e-02   -2.1897757281e-02   
+-2.4172304364e-02   -2.6672724336e-02   -2.9421447406e-02   -3.2443131203e-02   -3.5764881970e-02   
+-3.9416497724e-02   -4.3430735563e-02   -4.7444973402e-02   -5.1459211241e-02   -5.5473449080e-02   
+-5.9487686919e-02   -6.3501924758e-02   -6.7516162597e-02   -7.1530400436e-02   -7.5544638275e-02   
+-7.9558876114e-02   -8.3573113953e-02   -8.7587351792e-02   -9.1601589631e-02   -9.5615827470e-02   
+-9.9630065309e-02   -1.0364430315e-01   -1.0765854099e-01   -1.1167277883e-01   -1.1568701666e-01   
+-1.1970125450e-01   -1.2371549234e-01   -1.2772973018e-01   -1.3174396802e-01   -1.3575820586e-01   
+-1.3977244370e-01   -1.4378668154e-01   -1.4780091938e-01   -1.5181515722e-01   -1.5582939505e-01   
+-1.5984363289e-01   -1.6385787073e-01   -1.6787210857e-01   -1.7188634641e-01   -1.7590058425e-01   
+-1.7991482209e-01   -1.8392905993e-01   -1.8794329777e-01   -1.9195753561e-01   -1.9597177344e-01   
+-1.9998601128e-01   -2.0400024912e-01   2.2204460493e-16    -1.0000000000e-04   -2.0993045568e-04   
+-3.3077750656e-04   -4.6362522026e-04   -6.0966531730e-04   -7.7020786146e-04   -9.4669301182e-04   
+-1.1407039418e-03   -1.3539810413e-03   -1.5884375285e-03   -1.8461766134e-03   -2.1295103638e-03   
+-2.4409804468e-03   -2.7833809284e-03   -3.1597833380e-03   -3.5735642221e-03   -4.0284354336e-03   
+-4.5284774291e-03   -5.0781758734e-03   -5.6824618780e-03   -6.3467562366e-03   -7.0770180521e-03   
+-7.8797981936e-03   -8.7622980613e-03   -9.7324341872e-03   -1.0798909251e-02   -1.1971290149e-02   
+-1.3260093812e-02   -1.4676881552e-02   -1.6234362770e-02   -1.7946508971e-02   -1.9828679091e-02   
+-2.1897757281e-02   -2.4172304364e-02   -2.6672724336e-02   -2.9421447406e-02   -3.2443131203e-02   
+-3.5764881970e-02   -3.9416497724e-02   -4.3430735563e-02   -4.7444973402e-02   -5.1459211241e-02   
+-5.5473449080e-02   -5.9487686919e-02   -6.3501924758e-02   -6.7516162597e-02   -7.1530400436e-02   
+-7.5544638275e-02   -7.9558876114e-02   -8.3573113953e-02   -8.7587351792e-02   -9.1601589631e-02   
+-9.5615827470e-02   -9.9630065309e-02   -1.0364430315e-01   -1.0765854099e-01   -1.1167277883e-01   
+-1.1568701666e-01   -1.1970125450e-01   -1.2371549234e-01   -1.2772973018e-01   -1.3174396802e-01   
+-1.3575820586e-01   -1.3977244370e-01   -1.4378668154e-01   -1.4780091938e-01   -1.5181515722e-01   
+-1.5582939505e-01   -1.5984363289e-01   -1.6385787073e-01   -1.6787210857e-01   -1.7188634641e-01   
+-1.7590058425e-01   -1.7991482209e-01   -1.8392905993e-01   -1.8794329777e-01   -1.9195753561e-01   
+-1.9597177344e-01   -1.9998601128e-01   -2.0400024912e-01   2.2204460493e-16    -1.0000000000e-04   
+-2.0993045568e-04   -3.3077750656e-04   -4.6362522026e-04   -6.0966531730e-04   -7.7020786146e-04   
+-9.4669301182e-04   -1.1407039418e-03   -1.3539810413e-03   -1.5884375285e-03   -1.8461766134e-03   
+-2.1295103638e-03   -2.4409804468e-03   -2.7833809284e-03   -3.1597833380e-03   -3.5735642221e-03   
+-4.0284354336e-03   -4.5284774291e-03   -5.0781758734e-03   -5.6824618780e-03   -6.3467562366e-03   
+-7.0770180521e-03   -7.8797981936e-03   -8.7622980613e-03   -9.7324341872e-03   -1.0798909251e-02   
+-1.1971290149e-02   -1.3260093812e-02   -1.4676881552e-02   -1.6234362770e-02   -1.7946508971e-02   
+-1.9828679091e-02   -2.1897757281e-02   -2.4172304364e-02   -2.6672724336e-02   -2.9421447406e-02   
+-3.2443131203e-02   -3.5764881970e-02   -3.9416497724e-02   -4.3430735563e-02   -4.7444973402e-02   
+-5.1459211241e-02   -5.5473449080e-02   -5.9487686919e-02   -6.3501924758e-02   -6.7516162597e-02   
+-7.1530400436e-02   -7.5544638275e-02   -7.9558876114e-02   -8.3573113953e-02   -8.7587351792e-02   
+-9.1601589631e-02   -9.5615827470e-02   -9.9630065309e-02   -1.0364430315e-01   -1.0765854099e-01   
+-1.1167277883e-01   -1.1568701666e-01   -1.1970125450e-01   -1.2371549234e-01   -1.2772973018e-01   
+-1.3174396802e-01   -1.3575820586e-01   -1.3977244370e-01   -1.4378668154e-01   -1.4780091938e-01   
+-1.5181515722e-01   -1.5582939505e-01   -1.5984363289e-01   -1.6385787073e-01   -1.6787210857e-01   
+-1.7188634641e-01   -1.7590058425e-01   -1.7991482209e-01   -1.8392905993e-01   -1.8794329777e-01   
+-1.9195753561e-01   -1.9597177344e-01   -1.9998601128e-01   -2.0400024912e-01   2.2204460493e-16    
+-1.0000000000e-04   -2.0993045568e-04   -3.3077750656e-04   -4.6362522026e-04   -6.0966531730e-04   
+-7.7020786146e-04   -9.4669301182e-04   -1.1407039418e-03   -1.3539810413e-03   -1.5884375285e-03   
+-1.8461766134e-03   -2.1295103638e-03   -2.4409804468e-03   -2.7833809284e-03   -3.1597833380e-03   
+-3.5735642221e-03   -4.0284354336e-03   -4.5284774291e-03   -5.0781758734e-03   -5.6824618780e-03   
+-6.3467562366e-03   -7.0770180521e-03   -7.8797981936e-03   -8.7622980613e-03   -9.7324341872e-03   
+-1.0798909251e-02   -1.1971290149e-02   -1.3260093812e-02   -1.4676881552e-02   -1.6234362770e-02   
+-1.7946508971e-02   -1.9828679091e-02   -2.1897757281e-02   -2.4172304364e-02   -2.6672724336e-02   
+-2.9421447406e-02   -3.2443131203e-02   -3.5764881970e-02   -3.9416497724e-02   -4.3430735563e-02   
+-4.7444973402e-02   -5.1459211241e-02   -5.5473449080e-02   -5.9487686919e-02   -6.3501924758e-02   
+-6.7516162597e-02   -7.1530400436e-02   -7.5544638275e-02   -7.9558876114e-02   -8.3573113953e-02   
+-8.7587351792e-02   -9.1601589631e-02   -9.5615827470e-02   -9.9630065309e-02   -1.0364430315e-01   
+-1.0765854099e-01   -1.1167277883e-01   -1.1568701666e-01   -1.1970125450e-01   -1.2371549234e-01   
+-1.2772973018e-01   -1.3174396802e-01   -1.3575820586e-01   -1.3977244370e-01   -1.4378668154e-01   
+-1.4780091938e-01   -1.5181515722e-01   -1.5582939505e-01   -1.5984363289e-01   -1.6385787073e-01   
+-1.6787210857e-01   -1.7188634641e-01   -1.7590058425e-01   -1.7991482209e-01   -1.8392905993e-01   
+-1.8794329777e-01   -1.9195753561e-01   -1.9597177344e-01   -1.9998601128e-01   -2.0400024912e-01   
+2.2204460493e-16    -1.0000000000e-04   -2.0993045568e-04   -3.3077750656e-04   -4.6362522026e-04   
+-6.0966531730e-04   -7.7020786146e-04   -9.4669301182e-04   -1.1407039418e-03   -1.3539810413e-03   
+-1.5884375285e-03   -1.8461766134e-03   -2.1295103638e-03   -2.4409804468e-03   -2.7833809284e-03   
+-3.1597833380e-03   -3.5735642221e-03   -4.0284354336e-03   -4.5284774291e-03   -5.0781758734e-03   
+-5.6824618780e-03   -6.3467562366e-03   -7.0770180521e-03   -7.8797981936e-03   -8.7622980613e-03   
+-9.7324341872e-03   -1.0798909251e-02   -1.1971290149e-02   -1.3260093812e-02   -1.4676881552e-02   
+-1.6234362770e-02   -1.7946508971e-02   -1.9828679091e-02   -2.1897757281e-02   -2.4172304364e-02   
+-2.6672724336e-02   -2.9421447406e-02   -3.2443131203e-02   -3.5764881970e-02   -3.9416497724e-02   
+-4.3430735563e-02   -4.7444973402e-02   -5.1459211241e-02   -5.5473449080e-02   -5.9487686919e-02   
+-6.3501924758e-02   -6.7516162597e-02   -7.1530400436e-02   -7.5544638275e-02   -7.9558876114e-02   
+-8.3573113953e-02   -8.7587351792e-02   -9.1601589631e-02   -9.5615827470e-02   -9.9630065309e-02   
+-1.0364430315e-01   -1.0765854099e-01   -1.1167277883e-01   -1.1568701666e-01   -1.1970125450e-01   
+-1.2371549234e-01   -1.2772973018e-01   -1.3174396802e-01   -1.3575820586e-01   -1.3977244370e-01   
+-1.4378668154e-01   -1.4780091938e-01   -1.5181515722e-01   -1.5582939505e-01   -1.5984363289e-01   
+-1.6385787073e-01   -1.6787210857e-01   -1.7188634641e-01   -1.7590058425e-01   -1.7991482209e-01   
+-1.8392905993e-01   -1.8794329777e-01   -1.9195753561e-01   -1.9597177344e-01   -1.9998601128e-01   
+-2.0400024912e-01   2.2204460493e-16    -1.0000000000e-04   -2.0993045568e-04   -3.3077750656e-04   
+-4.6362522026e-04   -6.0966531730e-04   -7.7020786146e-04   -9.4669301182e-04   -1.1407039418e-03   
+-1.3539810413e-03   -1.5884375285e-03   -1.8461766134e-03   -2.1295103638e-03   -2.4409804468e-03   
+-2.7833809284e-03   -3.1597833380e-03   -3.5735642221e-03   -4.0284354336e-03   -4.5284774291e-03   
+-5.0781758734e-03   -5.6824618780e-03   -6.3467562366e-03   -7.0770180521e-03   -7.8797981936e-03   
+-8.7622980613e-03   -9.7324341872e-03   -1.0798909251e-02   -1.1971290149e-02   -1.3260093812e-02   
+-1.4676881552e-02   -1.6234362770e-02   -1.7946508971e-02   -1.9828679091e-02   -2.1897757281e-02   
+-2.4172304364e-02   -2.6672724336e-02   -2.9421447406e-02   -3.2443131203e-02   -3.5764881970e-02   
+-3.9416497724e-02   -4.3430735563e-02   -4.7444973402e-02   -5.1459211241e-02   -5.5473449080e-02   
+-5.9487686919e-02   -6.3501924758e-02   -6.7516162597e-02   -7.1530400436e-02   -7.5544638275e-02   
+-7.9558876114e-02   -8.3573113953e-02   -8.7587351792e-02   -9.1601589631e-02   -9.5615827470e-02   
+-9.9630065309e-02   -1.0364430315e-01   -1.0765854099e-01   -1.1167277883e-01   -1.1568701666e-01   
+-1.1970125450e-01   -1.2371549234e-01   -1.2772973018e-01   -1.3174396802e-01   -1.3575820586e-01   
+-1.3977244370e-01   -1.4378668154e-01   -1.4780091938e-01   -1.5181515722e-01   -1.5582939505e-01   
+-1.5984363289e-01   -1.6385787073e-01   -1.6787210857e-01   -1.7188634641e-01   -1.7590058425e-01   
+-1.7991482209e-01   -1.8392905993e-01   -1.8794329777e-01   -1.9195753561e-01   -1.9597177344e-01   
+-1.9998601128e-01   -2.0400024912e-01   2.2204460493e-16    -1.0000000000e-04   -2.0993045568e-04   
+-3.3077750656e-04   -4.6362522026e-04   -6.0966531730e-04   -7.7020786146e-04   -9.4669301182e-04   
+-1.1407039418e-03   -1.3539810413e-03   -1.5884375285e-03   -1.8461766134e-03   -2.1295103638e-03   
+-2.4409804468e-03   -2.7833809284e-03   -3.1597833380e-03   -3.5735642221e-03   -4.0284354336e-03   
+-4.5284774291e-03   -5.0781758734e-03   -5.6824618780e-03   -6.3467562366e-03   -7.0770180521e-03   
+-7.8797981936e-03   -8.7622980613e-03   -9.7324341872e-03   -1.0798909251e-02   -1.1971290149e-02   
+-1.3260093812e-02   -1.4676881552e-02   -1.6234362770e-02   -1.7946508971e-02   -1.9828679091e-02   
+-2.1897757281e-02   -2.4172304364e-02   -2.6672724336e-02   -2.9421447406e-02   -3.2443131203e-02   
+-3.5764881970e-02   -3.9416497724e-02   -4.3430735563e-02   -4.7444973402e-02   -5.1459211241e-02   
+-5.5473449080e-02   -5.9487686919e-02   -6.3501924758e-02   -6.7516162597e-02   -7.1530400436e-02   
+-7.5544638275e-02   -7.9558876114e-02   -8.3573113953e-02   -8.7587351792e-02   -9.1601589631e-02   
+-9.5615827470e-02   -9.9630065309e-02   -1.0364430315e-01   -1.0765854099e-01   -1.1167277883e-01   
+-1.1568701666e-01   -1.1970125450e-01   -1.2371549234e-01   -1.2772973018e-01   -1.3174396802e-01   
+-1.3575820586e-01   -1.3977244370e-01   -1.4378668154e-01   -1.4780091938e-01   -1.5181515722e-01   
+-1.5582939505e-01   -1.5984363289e-01   -1.6385787073e-01   -1.6787210857e-01   -1.7188634641e-01   
+-1.7590058425e-01   -1.7991482209e-01   -1.8392905993e-01   -1.8794329777e-01   -1.9195753561e-01   
+-1.9597177344e-01   -1.9998601128e-01   -2.0400024912e-01   2.2204460493e-16    -1.0000000000e-04   
+-2.0993045568e-04   -3.3077750656e-04   -4.6362522026e-04   -6.0966531730e-04   -7.7020786146e-04   
+-9.4669301182e-04   -1.1407039418e-03   -1.3539810413e-03   -1.5884375285e-03   -1.8461766134e-03   
+-2.1295103638e-03   -2.4409804468e-03   -2.7833809284e-03   -3.1597833380e-03   -3.5735642221e-03   
+-4.0284354336e-03   -4.5284774291e-03   -5.0781758734e-03   -5.6824618780e-03   -6.3467562366e-03   
+-7.0770180521e-03   -7.8797981936e-03   -8.7622980613e-03   -9.7324341872e-03   -1.0798909251e-02   
+-1.1971290149e-02   -1.3260093812e-02   -1.4676881552e-02   -1.6234362770e-02   -1.7946508971e-02   
+-1.9828679091e-02   -2.1897757281e-02   -2.4172304364e-02   -2.6672724336e-02   -2.9421447406e-02   
+-3.2443131203e-02   -3.5764881970e-02   -3.9416497724e-02   -4.3430735563e-02   -4.7444973402e-02   
+-5.1459211241e-02   -5.5473449080e-02   -5.9487686919e-02   -6.3501924758e-02   -6.7516162597e-02   
+-7.1530400436e-02   -7.5544638275e-02   -7.9558876114e-02   -8.3573113953e-02   -8.7587351792e-02   
+-9.1601589631e-02   -9.5615827470e-02   -9.9630065309e-02   -1.0364430315e-01   -1.0765854099e-01   
+-1.1167277883e-01   -1.1568701666e-01   -1.1970125450e-01   -1.2371549234e-01   -1.2772973018e-01   
+-1.3174396802e-01   -1.3575820586e-01   -1.3977244370e-01   -1.4378668154e-01   -1.4780091938e-01   
+-1.5181515722e-01   -1.5582939505e-01   -1.5984363289e-01   -1.6385787073e-01   -1.6787210857e-01   
+-1.7188634641e-01   -1.7590058425e-01   -1.7991482209e-01   -1.8392905993e-01   -1.8794329777e-01   
+-1.9195753561e-01   -1.9597177344e-01   -1.9998601128e-01   -2.0400024912e-01   2.2204460493e-16    
+-1.0000000000e-04   -2.0993045568e-04   -3.3077750656e-04   -4.6362522026e-04   -6.0966531730e-04   
+-7.7020786146e-04   -9.4669301182e-04   -1.1407039418e-03   -1.3539810413e-03   -1.5884375285e-03   
+-1.8461766134e-03   -2.1295103638e-03   -2.4409804468e-03   -2.7833809284e-03   -3.1597833380e-03   
+-3.5735642221e-03   -4.0284354336e-03   -4.5284774291e-03   -5.0781758734e-03   -5.6824618780e-03   
+-6.3467562366e-03   -7.0770180521e-03   -7.8797981936e-03   -8.7622980613e-03   -9.7324341872e-03   
+-1.0798909251e-02   -1.1971290149e-02   -1.3260093812e-02   -1.4676881552e-02   -1.6234362770e-02   
+-1.7946508971e-02   -1.9828679091e-02   -2.1897757281e-02   -2.4172304364e-02   -2.6672724336e-02   
+-2.9421447406e-02   -3.2443131203e-02   -3.5764881970e-02   -3.9416497724e-02   -4.3430735563e-02   
+-4.7444973402e-02   -5.1459211241e-02   -5.5473449080e-02   -5.9487686919e-02   -6.3501924758e-02   
+-6.7516162597e-02   -7.1530400436e-02   -7.5544638275e-02   -7.9558876114e-02   -8.3573113953e-02   
+-8.7587351792e-02   -9.1601589631e-02   -9.5615827470e-02   -9.9630065309e-02   -1.0364430315e-01   
+-1.0765854099e-01   -1.1167277883e-01   -1.1568701666e-01   -1.1970125450e-01   -1.2371549234e-01   
+-1.2772973018e-01   -1.3174396802e-01   -1.3575820586e-01   -1.3977244370e-01   -1.4378668154e-01   
+-1.4780091938e-01   -1.5181515722e-01   -1.5582939505e-01   -1.5984363289e-01   -1.6385787073e-01   
+-1.6787210857e-01   -1.7188634641e-01   -1.7590058425e-01   -1.7991482209e-01   -1.8392905993e-01   
+-1.8794329777e-01   -1.9195753561e-01   -1.9597177344e-01   -1.9998601128e-01   -2.0400024912e-01   
+2.2204460493e-16    -1.0000000000e-04   -2.0993045568e-04   -3.3077750656e-04   -4.6362522026e-04   
+-6.0966531730e-04   -7.7020786146e-04   -9.4669301182e-04   -1.1407039418e-03   -1.3539810413e-03   
+-1.5884375285e-03   -1.8461766134e-03   -2.1295103638e-03   -2.4409804468e-03   -2.7833809284e-03   
+-3.1597833380e-03   -3.5735642221e-03   -4.0284354336e-03   -4.5284774291e-03   -5.0781758734e-03   
+-5.6824618780e-03   -6.3467562366e-03   -7.0770180521e-03   -7.8797981936e-03   -8.7622980613e-03   
+-9.7324341872e-03   -1.0798909251e-02   -1.1971290149e-02   -1.3260093812e-02   -1.4676881552e-02   
+-1.6234362770e-02   -1.7946508971e-02   -1.9828679091e-02   -2.1897757281e-02   -2.4172304364e-02   
+-2.6672724336e-02   -2.9421447406e-02   -3.2443131203e-02   -3.5764881970e-02   -3.9416497724e-02   
+-4.3430735563e-02   -4.7444973402e-02   -5.1459211241e-02   -5.5473449080e-02   -5.9487686919e-02   
+-6.3501924758e-02   -6.7516162597e-02   -7.1530400436e-02   -7.5544638275e-02   -7.9558876114e-02   
+-8.3573113953e-02   -8.7587351792e-02   -9.1601589631e-02   -9.5615827470e-02   -9.9630065309e-02   
+-1.0364430315e-01   -1.0765854099e-01   -1.1167277883e-01   -1.1568701666e-01   -1.1970125450e-01   
+-1.2371549234e-01   -1.2772973018e-01   -1.3174396802e-01   -1.3575820586e-01   -1.3977244370e-01   
+-1.4378668154e-01   -1.4780091938e-01   -1.5181515722e-01   -1.5582939505e-01   -1.5984363289e-01   
+-1.6385787073e-01   -1.6787210857e-01   -1.7188634641e-01   -1.7590058425e-01   -1.7991482209e-01   
+-1.8392905993e-01   -1.8794329777e-01   -1.9195753561e-01   -1.9597177344e-01   -1.9998601128e-01   
+-2.0400024912e-01   2.2204460493e-16    -1.0000000000e-04   -2.0993045568e-04   -3.3077750656e-04   
+-4.6362522026e-04   -6.0966531730e-04   -7.7020786146e-04   -9.4669301182e-04   -1.1407039418e-03   
+-1.3539810413e-03   -1.5884375285e-03   -1.8461766134e-03   -2.1295103638e-03   -2.4409804468e-03   
+-2.7833809284e-03   -3.1597833380e-03   -3.5735642221e-03   -4.0284354336e-03   -4.5284774291e-03   
+-5.0781758734e-03   -5.6824618780e-03   -6.3467562366e-03   -7.0770180521e-03   -7.8797981936e-03   
+-8.7622980613e-03   -9.7324341872e-03   -1.0798909251e-02   -1.1971290149e-02   -1.3260093812e-02   
+-1.4676881552e-02   -1.6234362770e-02   -1.7946508971e-02   -1.9828679091e-02   -2.1897757281e-02   
+-2.4172304364e-02   -2.6672724336e-02   -2.9421447406e-02   -3.2443131203e-02   -3.5764881970e-02   
+-3.9416497724e-02   -4.3430735563e-02   -4.7444973402e-02   -5.1459211241e-02   -5.5473449080e-02   
+-5.9487686919e-02   -6.3501924758e-02   -6.7516162597e-02   -7.1530400436e-02   -7.5544638275e-02   
+-7.9558876114e-02   -8.3573113953e-02   -8.7587351792e-02   -9.1601589631e-02   -9.5615827470e-02   
+-9.9630065309e-02   -1.0364430315e-01   -1.0765854099e-01   -1.1167277883e-01   -1.1568701666e-01   
+-1.1970125450e-01   -1.2371549234e-01   -1.2772973018e-01   -1.3174396802e-01   -1.3575820586e-01   
+-1.3977244370e-01   -1.4378668154e-01   -1.4780091938e-01   -1.5181515722e-01   -1.5582939505e-01   
+-1.5984363289e-01   -1.6385787073e-01   -1.6787210857e-01   -1.7188634641e-01   -1.7590058425e-01   
+-1.7991482209e-01   -1.8392905993e-01   -1.8794329777e-01   -1.9195753561e-01   -1.9597177344e-01   
+-1.9998601128e-01   -2.0400024912e-01   2.2204460493e-16    -1.0000000000e-04   -2.0993045568e-04   
+-3.3077750656e-04   -4.6362522026e-04   -6.0966531730e-04   -7.7020786146e-04   -9.4669301182e-04   
+-1.1407039418e-03   -1.3539810413e-03   -1.5884375285e-03   -1.8461766134e-03   -2.1295103638e-03   
+-2.4409804468e-03   -2.7833809284e-03   -3.1597833380e-03   -3.5735642221e-03   -4.0284354336e-03   
+-4.5284774291e-03   -5.0781758734e-03   -5.6824618780e-03   -6.3467562366e-03   -7.0770180521e-03   
+-7.8797981936e-03   -8.7622980613e-03   -9.7324341872e-03   -1.0798909251e-02   -1.1971290149e-02   
+-1.3260093812e-02   -1.4676881552e-02   -1.6234362770e-02   -1.7946508971e-02   -1.9828679091e-02   
+-2.1897757281e-02   -2.4172304364e-02   -2.6672724336e-02   -2.9421447406e-02   -3.2443131203e-02   
+-3.5764881970e-02   -3.9416497724e-02   -4.3430735563e-02   -4.7444973402e-02   -5.1459211241e-02   
+-5.5473449080e-02   -5.9487686919e-02   -6.3501924758e-02   -6.7516162597e-02   -7.1530400436e-02   
+-7.5544638275e-02   -7.9558876114e-02   -8.3573113953e-02   -8.7587351792e-02   -9.1601589631e-02   
+-9.5615827470e-02   -9.9630065309e-02   -1.0364430315e-01   -1.0765854099e-01   -1.1167277883e-01   
+-1.1568701666e-01   -1.1970125450e-01   -1.2371549234e-01   -1.2772973018e-01   -1.3174396802e-01   
+-1.3575820586e-01   -1.3977244370e-01   -1.4378668154e-01   -1.4780091938e-01   -1.5181515722e-01   
+-1.5582939505e-01   -1.5984363289e-01   -1.6385787073e-01   -1.6787210857e-01   -1.7188634641e-01   
+-1.7590058425e-01   -1.7991482209e-01   -1.8392905993e-01   -1.8794329777e-01   -1.9195753561e-01   
+-1.9597177344e-01   -1.9998601128e-01   -2.0400024912e-01   2.2204460493e-16    -1.0000000000e-04   
+-2.0993045568e-04   -3.3077750656e-04   -4.6362522026e-04   -6.0966531730e-04   -7.7020786146e-04   
+-9.4669301182e-04   -1.1407039418e-03   -1.3539810413e-03   -1.5884375285e-03   -1.8461766134e-03   
+-2.1295103638e-03   -2.4409804468e-03   -2.7833809284e-03   -3.1597833380e-03   -3.5735642221e-03   
+-4.0284354336e-03   -4.5284774291e-03   -5.0781758734e-03   -5.6824618780e-03   -6.3467562366e-03   
+-7.0770180521e-03   -7.8797981936e-03   -8.7622980613e-03   -9.7324341872e-03   -1.0798909251e-02   
+-1.1971290149e-02   -1.3260093812e-02   -1.4676881552e-02   -1.6234362770e-02   -1.7946508971e-02   
+-1.9828679091e-02   -2.1897757281e-02   -2.4172304364e-02   -2.6672724336e-02   -2.9421447406e-02   
+-3.2443131203e-02   -3.5764881970e-02   -3.9416497724e-02   -4.3430735563e-02   -4.7444973402e-02   
+-5.1459211241e-02   -5.5473449080e-02   -5.9487686919e-02   -6.3501924758e-02   -6.7516162597e-02   
+-7.1530400436e-02   -7.5544638275e-02   -7.9558876114e-02   -8.3573113953e-02   -8.7587351792e-02   
+-9.1601589631e-02   -9.5615827470e-02   -9.9630065309e-02   -1.0364430315e-01   -1.0765854099e-01   
+-1.1167277883e-01   -1.1568701666e-01   -1.1970125450e-01   -1.2371549234e-01   -1.2772973018e-01   
+-1.3174396802e-01   -1.3575820586e-01   -1.3977244370e-01   -1.4378668154e-01   -1.4780091938e-01   
+-1.5181515722e-01   -1.5582939505e-01   -1.5984363289e-01   -1.6385787073e-01   -1.6787210857e-01   
+-1.7188634641e-01   -1.7590058425e-01   -1.7991482209e-01   -1.8392905993e-01   -1.8794329777e-01   
+-1.9195753561e-01   -1.9597177344e-01   -1.9998601128e-01   -2.0400024912e-01   
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+1.1331676959e+00    1.0346715216e+00    1.0015035205e+00    1.0000533292e+00    1.0000015237e+00    
+1.0000000371e+00    1.0000000008e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.1332478155e+00    1.0346745472e+00    1.0015037316e+00    1.0000533399e+00    
+1.0000015241e+00    1.0000000371e+00    1.0000000008e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.1333279564e+00    1.0346775860e+00    1.0015039433e+00    
+1.0000533506e+00    1.0000015245e+00    1.0000000371e+00    1.0000000008e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.1333279776e+00    1.0346775991e+00    
+1.0015039439e+00    1.0000533506e+00    1.0000015245e+00    1.0000000371e+00    1.0000000008e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.1333279776e+00    
+1.0346775991e+00    1.0015039439e+00    1.0000533506e+00    1.0000015245e+00    1.0000000371e+00    
+1.0000000008e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.1333279776e+00    1.0346775991e+00    1.0015039439e+00    1.0000533506e+00    1.0000015245e+00    
+1.0000000371e+00    1.0000000008e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.1333279776e+00    1.0346775991e+00    1.0015039439e+00    1.0000533506e+00    
+1.0000015245e+00    1.0000000371e+00    1.0000000008e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.1333279776e+00    1.0346775991e+00    1.0015039439e+00    
+1.0000533506e+00    1.0000015245e+00    1.0000000371e+00    1.0000000008e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.1333279776e+00    1.0346775991e+00    
+1.0015039439e+00    1.0000533506e+00    1.0000015245e+00    1.0000000371e+00    1.0000000008e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.1333279777e+00    
+1.0346775991e+00    1.0015039439e+00    1.0000533506e+00    1.0000015245e+00    1.0000000371e+00    
+1.0000000008e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.1333279777e+00    1.0346775991e+00    1.0015039439e+00    1.0000533506e+00    1.0000015245e+00    
+1.0000000371e+00    1.0000000008e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.1333279777e+00    1.0346775991e+00    1.0015039439e+00    1.0000533506e+00    
+1.0000015245e+00    1.0000000371e+00    1.0000000008e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.1333279777e+00    1.0346775991e+00    1.0015039439e+00    
+1.0000533506e+00    1.0000015245e+00    1.0000000371e+00    1.0000000008e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.1333279777e+00    1.0346775991e+00    
+1.0015039439e+00    1.0000533506e+00    1.0000015245e+00    1.0000000371e+00    1.0000000008e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.1333279777e+00    
+1.0346775991e+00    1.0015039439e+00    1.0000533506e+00    1.0000015245e+00    1.0000000371e+00    
+1.0000000008e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.1333279777e+00    1.0346775991e+00    1.0015039439e+00    1.0000533506e+00    1.0000015245e+00    
+1.0000000371e+00    1.0000000008e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.1333279564e+00    1.0346775860e+00    1.0015039433e+00    1.0000533506e+00    
+1.0000015245e+00    1.0000000371e+00    1.0000000008e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.1332478064e+00    1.0346745472e+00    1.0015037316e+00    
+1.0000533399e+00    1.0000015241e+00    1.0000000371e+00    1.0000000008e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.1331676776e+00    1.0346715216e+00    
+1.0015035205e+00    1.0000533292e+00    1.0000015237e+00    1.0000000371e+00    1.0000000008e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+0.0000000000e+00    9.7425090130e-01    9.9914496406e-01    9.9997937769e-01    9.9999956750e-01    
+9.9999999172e-01    9.9999999985e-01    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    0.0000000000e+00    9.7424879602e-01    9.9914484497e-01    9.9997937358e-01    
+9.9999956739e-01    9.9999999172e-01    9.9999999985e-01    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    9.7424669093e-01    9.9914472585e-01    
+9.9997936947e-01    9.9999956727e-01    9.9999999172e-01    9.9999999985e-01    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    9.7424669113e-01    
+9.9914472582e-01    9.9997936947e-01    9.9999956727e-01    9.9999999172e-01    9.9999999985e-01    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    
+9.7424669113e-01    9.9914472582e-01    9.9997936947e-01    9.9999956727e-01    9.9999999172e-01    
+9.9999999985e-01    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+0.0000000000e+00    9.7424669113e-01    9.9914472582e-01    9.9997936947e-01    9.9999956727e-01    
+9.9999999172e-01    9.9999999985e-01    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    0.0000000000e+00    9.7424669113e-01    9.9914472582e-01    9.9997936947e-01    
+9.9999956727e-01    9.9999999172e-01    9.9999999985e-01    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    9.7424669113e-01    9.9914472582e-01    
+9.9997936947e-01    9.9999956727e-01    9.9999999172e-01    9.9999999985e-01    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    9.7424669113e-01    
+9.9914472582e-01    9.9997936947e-01    9.9999956727e-01    9.9999999172e-01    9.9999999985e-01    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    
+9.7424669113e-01    9.9914472582e-01    9.9997936947e-01    9.9999956727e-01    9.9999999172e-01    
+9.9999999985e-01    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+0.0000000000e+00    9.7424669113e-01    9.9914472582e-01    9.9997936947e-01    9.9999956727e-01    
+9.9999999172e-01    9.9999999985e-01    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    0.0000000000e+00    9.7424669113e-01    9.9914472582e-01    9.9997936947e-01    
+9.9999956727e-01    9.9999999172e-01    9.9999999985e-01    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    9.7424669113e-01    9.9914472582e-01    
+9.9997936947e-01    9.9999956727e-01    9.9999999172e-01    9.9999999985e-01    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    9.7424669113e-01    
+9.9914472582e-01    9.9997936947e-01    9.9999956727e-01    9.9999999172e-01    9.9999999985e-01    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    
+9.7424669113e-01    9.9914472582e-01    9.9997936947e-01    9.9999956727e-01    9.9999999172e-01    
+9.9999999985e-01    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+0.0000000000e+00    9.7424669113e-01    9.9914472582e-01    9.9997936947e-01    9.9999956727e-01    
+9.9999999172e-01    9.9999999985e-01    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    0.0000000000e+00    9.7424669093e-01    9.9914472585e-01    9.9997936947e-01    
+9.9999956727e-01    9.9999999172e-01    9.9999999985e-01    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    9.7424879602e-01    9.9914484497e-01    
+9.9997937358e-01    9.9999956739e-01    9.9999999172e-01    9.9999999985e-01    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    9.7425090130e-01    
+9.9914496406e-01    9.9997937769e-01    9.9999956750e-01    9.9999999172e-01    9.9999999985e-01    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+0.0000000000e+00    -3.6851719335e-08   -3.8197380805e-08   -1.3159041720e-09   -3.2957603653e-11   
+-7.1177195956e-13   -1.4000980902e-14   -2.5727469047e-16   -4.4785394282e-18   -7.2734417428e-20   
+-3.1820866957e-21   -4.0509237157e-21   -4.4702817668e-21   -3.3137752264e-21   5.8806496022e-21    
+6.9488265773e-21    7.8361903153e-22    -6.4661462019e-23   -1.8248654752e-21   -5.1947672129e-21   
+-6.1328889723e-21   7.4918543100e-21    1.2293402933e-20    -1.1956847984e-20   -2.8405730844e-21   
+2.2074212984e-21    -2.5965007550e-20   -5.7726369300e-21   1.1529443820e-20    -8.5426616264e-21   
+1.5800109420e-20    1.0791154547e-20    -3.2336680666e-20   -1.8541988049e-20   8.3271792997e-21    
+2.5775902584e-20    1.6089160984e-20    -1.1105530081e-20   -8.1754798375e-21   1.7983888750e-20    
+-3.6762562144e-20   -3.4826575479e-20   1.7138748854e-20    1.1071833631e-20    6.0531564666e-21    
+4.4709213682e-21    7.1403500881e-21    -4.9777754633e-22   -9.1474562505e-21   -1.4533804818e-20   
+1.6172560199e-21    2.0863701940e-20    7.5115360814e-20    7.9376421080e-20    1.6713766052e-20    
+-2.4133784561e-20   -9.7862463458e-23   -3.3975422486e-20   -2.9617199757e-20   5.1395014392e-20    
+2.0165990275e-20    -1.2293045746e-20   -1.2483954370e-20   -2.2873817646e-20   1.2058311794e-20    
+2.8782337491e-20    1.6433195417e-20    2.6495575860e-20    2.6882171720e-20    3.2870312525e-20    
+4.5617251916e-20    1.6709852534e-20    -3.7447117381e-21   1.6847394835e-21    2.7076691186e-21    
+2.4478466224e-20    -8.5230183931e-21   -3.0734118228e-20   1.2783262269e-20    3.3662135836e-20    
+-7.5824230472e-20   0.0000000000e+00    -5.4045832379e-08   -5.6121879813e-08   -1.9172646160e-09   
+-4.7596617410e-11   -1.0184851500e-12   -1.9843798095e-14   -3.6108514000e-16   -6.2217692010e-18   
+-1.0234471578e-19   -4.0712587090e-21   -1.6533651692e-21   -2.8884495671e-21   -1.0106323744e-21   
+7.8566448252e-21    7.6503677535e-21    2.7528694867e-21    1.4319101287e-21    5.7588369603e-21    
+-4.4428731206e-21   -7.9656743210e-21   6.7019679170e-21    -9.1855547071e-22   -3.6880488114e-21   
+1.4448402603e-20    3.0989275010e-21    -8.9288064264e-21   8.2188993993e-21    -4.9966301201e-21   
+-1.0073965882e-20   2.4308209541e-20    1.0301414290e-21    -1.2598481269e-20   -9.7215241630e-21   
+3.2670445678e-21    4.9397074960e-20    2.0159182958e-21    -3.9547210746e-20   -1.1672286829e-20   
+1.2904754872e-20    -3.8139842402e-22   -2.6324218968e-20   -3.1694429530e-20   -3.6514804177e-20   
+1.4563635621e-20    3.8353439295e-20    1.2918827414e-22    -2.3317555757e-21   1.1527311877e-21    
+-2.2302375432e-20   -9.6653094723e-21   2.2545292640e-20    2.6037829144e-20    2.3438638063e-20    
+6.8783356005e-21    -2.0268698006e-22   2.3904056686e-20    -8.6435513891e-21   -2.2165473064e-20   
+1.0722374321e-21    -5.1579830528e-21   1.3109770956e-20    7.2529042023e-22    -7.7846321735e-21   
+-2.1021486011e-20   -2.8815457376e-20   2.7431613608e-21    1.0182636060e-20    2.5173973902e-20    
+1.1218711929e-20    2.8324298622e-20    1.9144142225e-20    -2.1283706845e-20   8.3607246115e-21    
+1.1068031488e-20    3.4511441376e-20    -3.2010051379e-21   -1.8426216984e-20   5.2713800261e-20    
+6.4366421153e-21    -1.1108704532e-19   0.0000000000e+00    -9.3784469287e-08   -9.7477254679e-08   
+-3.3156026643e-09   -8.1929041604e-11   -1.7445364938e-12   -3.3814833778e-14   -6.1201156148e-16   
+-1.0491259261e-17   -1.7137360625e-19   -8.1569637945e-22   -2.3688163070e-21   4.4477925138e-21    
+9.3608030359e-21    -2.1631083520e-23   3.8659288764e-21    6.6613496502e-21    2.5819502031e-21    
+2.0666502931e-21    -3.0947252796e-21   -5.3978318925e-21   -2.1023934540e-21   -5.1896781606e-21   
+4.6566934317e-21    1.6019633517e-20    7.1750398329e-21    1.3091774981e-20    3.7050022104e-20    
+-5.9995910262e-21   -2.5494482307e-20   -7.0185351248e-21   -4.6262823856e-21   6.0355895967e-20    
+-2.8773040369e-20   -4.6235515058e-20   3.0955717696e-20    -3.7154417598e-20   -4.0096643803e-20   
+-3.0481475275e-20   2.3406733409e-20    6.0947077887e-20    -1.5577669823e-21   -1.2262808745e-20   
+-3.0305871051e-21   -1.5579624234e-20   -2.0888719820e-20   7.6408301603e-21    4.0550687499e-21    
+-1.9892599527e-20   -4.0053750768e-21   4.3835725698e-20    1.2812271084e-20    -4.7693780786e-20   
+7.7508170554e-21    1.9271120678e-20    1.9834091281e-20    3.8068505554e-20    2.4938673050e-20    
+-1.2015217214e-20   -2.9084287604e-21   1.8350542802e-20    1.6673760377e-20    6.9916436742e-22    
+-2.6836109403e-20   -2.6443168800e-20   -1.1815725679e-20   2.9668332661e-20    -2.8312535715e-20   
+-1.4563263317e-20   2.8419833325e-20    8.7198554291e-21    -5.2657897486e-21   -4.8481032731e-20   
+-5.3592160103e-20   -1.2333464725e-20   5.3216281252e-20    2.9017077538e-20    -1.9167027968e-20   
+2.2875925931e-20    -2.7089456546e-21   -1.0581419245e-19   0.0000000000e+00    -1.3710622466e-07   
+-1.4250221724e-07   -4.8470834239e-09   -1.1977213571e-10   -2.5503410054e-12   -4.9434067368e-14   
+-8.9470028174e-16   -1.5332871289e-17   -2.5016526896e-19   -4.0476003839e-21   -4.3333933045e-21   
+5.4360766185e-23    4.0691656284e-21    -7.8590421767e-22   5.8358667114e-21    3.9065218259e-21    
+-7.4636245527e-21   -5.5591470308e-21   4.3148355238e-21    4.4246663836e-21    -6.6554740014e-21   
+-1.0160550002e-21   1.1361670835e-20    7.9155738585e-22    2.3311763146e-21    2.4182779524e-21    
+7.5962663634e-21    1.0966758699e-20    -1.3031772357e-20   -4.6810322766e-20   7.9568469960e-21    
+6.3736197112e-20    -4.6233610239e-20   -5.4962225753e-21   2.0241865251e-20    -1.4938178804e-20   
+4.6598541525e-20    -1.6924216118e-20   2.2740907474e-20    -6.7092948380e-21   -1.3128655835e-20   
+1.3760344103e-20    3.2958784163e-20    -3.2424662407e-20   -7.5194574714e-20   1.9529445996e-20    
+-3.6110252955e-20   -7.9869169236e-20   -1.5658759607e-20   7.1324960443e-20    6.5588308032e-21    
+-1.4247389272e-20   4.8986114313e-20    -1.9471858395e-20   -3.1225562822e-20   -3.0299025678e-20   
+-5.7376249788e-20   1.9171136452e-21    3.5014643135e-20    1.2066927193e-20    5.0483204887e-22    
+-3.6434870815e-20   -5.6855586821e-20   2.1105382678e-20    4.5229653888e-20    3.7892850081e-20    
+-1.4960275933e-20   -7.7264730005e-21   7.9272337900e-20    5.7383732988e-20    2.6037733572e-21    
+1.7458915650e-20    -6.5522342524e-21   2.9183820483e-20    5.0877898464e-20    -5.1532219535e-20   
+-7.2274589996e-20   -3.5261035110e-20   -1.1297949498e-20   -1.3150708384e-19   0.0000000000e+00    
+-1.7626199373e-07   -1.8319739210e-07   -6.2312925901e-09   -1.5397615004e-10   -3.2786566868e-12   
+-6.3551259261e-14   -1.1502102851e-15   -1.9705252287e-17   -3.1391251044e-19   -1.0860431585e-20   
+-8.0826802623e-21   -4.1816498338e-21   5.0232243613e-22    1.0136013325e-20    -8.5955892044e-22   
+-7.6482286361e-21   -6.8023355372e-21   7.5742916535e-21    7.5197209370e-21    6.9571901185e-21    
+-1.6787633995e-20   -3.5748382419e-20   -1.2270889126e-20   -4.9334363571e-21   9.2874172050e-21    
+-2.3907246937e-20   -3.7285684099e-20   5.2560133670e-21    -3.2909900496e-21   1.2265860758e-20    
+-3.2113890565e-21   -7.8978184001e-20   -3.0015633420e-20   6.7443112714e-20    4.2661870513e-20    
+-2.4378551438e-20   -1.9974233376e-22   2.2263624353e-20    -2.7081388296e-20   -4.8056963467e-20   
+7.3641712534e-20    2.9001105355e-20    -2.2618705549e-20   -3.0774916059e-21   -3.4097787177e-20   
+-3.0050099583e-20   2.2979769224e-20    2.3474744733e-20    -2.1491949258e-20   -1.6102333297e-20   
+2.1433351767e-20    4.2015198103e-20    -1.0196429969e-20   -6.6933113323e-20   -4.6661775087e-20   
+-5.6108596384e-20   -2.0433208068e-20   6.2916406970e-20    4.7793162120e-21    -1.8586253128e-20   
+3.9434043492e-21    -3.6246380818e-20   -2.0710932337e-20   1.3220133948e-20    -3.1869209014e-20   
+-1.9123011651e-20   4.2245271767e-20    1.3282067525e-20    -7.5661046539e-20   -1.1929881125e-20   
+1.5542689853e-20    3.5391569966e-20    6.5713959952e-20    4.5629478557e-20    1.2758007109e-20    
+-8.5582672512e-20   -2.9543636210e-20   4.9957049790e-20    1.6609702447e-20    -1.0932323814e-19   
+0.0000000000e+00    -2.1006195542e-07   -2.1832619628e-07   -7.4261666740e-09   -1.8350166361e-10   
+-3.9073516521e-12   -7.5737445731e-14   -1.3707651162e-15   -2.3500421997e-17   -3.8527367355e-19   
+2.1918744061e-22    -1.7344236107e-21   -4.1304252527e-21   2.3405734554e-21    1.3231610333e-20    
+6.4217031274e-22    -1.0947881411e-20   5.9137360651e-21    1.0216973960e-20    -2.3405237848e-21   
+2.1154330178e-21    -9.8785188777e-21   -3.9717957265e-20   -1.6561499608e-20   -1.5679172166e-20   
+1.9173850463e-21    -9.6472495941e-22   -1.9910130284e-21   1.8476158683e-20    -6.9720312947e-21   
+1.8563984478e-20    -4.2420456206e-21   -8.7801374534e-20   5.2770797900e-20    3.7440107591e-20    
+-5.0066022583e-20   -5.7319647562e-20   -7.7598116834e-20   8.9623306058e-20    -1.8688841614e-20   
+-1.5957307557e-20   8.4570181576e-20    6.5137937408e-20    3.7935654774e-20    -4.8500876645e-20   
+-4.2455688508e-20   -1.4132695881e-20   6.7544617285e-20    4.3972599047e-20    -4.0250369796e-20   
+-4.9557349434e-20   6.9995968657e-20    8.1039627455e-20    -1.1018430266e-19   -6.0592208765e-20   
+-8.4094457859e-21   -4.7936788837e-20   5.3335664018e-20    5.5547505397e-20    1.2064377230e-20    
+4.3860454302e-20    7.7424716898e-21    -5.1722131429e-21   4.2593835471e-20    2.0072499663e-20    
+1.9089280385e-20    4.1600426786e-20    -4.5055696663e-23   -6.1869361579e-20   -1.0056141051e-19   
+-3.0866618334e-20   -2.2888786474e-20   1.3531261951e-21    8.0884388188e-20    -1.4073452493e-21   
+-6.5428611802e-21   4.2175481929e-20    7.5044922192e-20    2.3639124988e-20    3.0560593292e-21    
+8.0213859043e-21    0.0000000000e+00    -2.3747911808e-07   -2.4682126212e-07   -8.3954002267e-09   
+-2.0745156659e-10   -4.4173235806e-12   -8.5622393599e-14   -1.5496633170e-15   -2.6564539414e-17   
+-4.5253258845e-19   -2.9847788872e-21   8.8559907136e-21    -5.1754385020e-21   -5.0415471803e-21   
+1.4069797110e-20    7.5682279451e-21    -1.5056412914e-20   7.2752334423e-21    2.7818938876e-21    
+-7.8062754463e-21   -2.2607514489e-20   7.1433007023e-21    3.1014499380e-20    1.0279624174e-20    
+-2.1804577675e-20   -2.1111506443e-20   2.9156266082e-20    -2.5103123165e-22   -1.3137886911e-21   
+1.6523091516e-20    -6.0208444181e-20   1.3247440524e-20    1.0044559149e-19    1.9168354832e-20    
+-9.4661290146e-20   -1.0026451093e-19   3.5256334259e-20    5.5405976460e-20    1.0408757676e-19    
+6.8451325769e-20    -1.3011517687e-20   -8.1456609410e-20   -1.5353213910e-20   6.5362718242e-20    
+-3.3749175456e-20   2.5903736682e-21    3.0770062542e-20    -1.8754365422e-20   -4.8288140802e-20   
+1.9936736892e-20    -1.7868073979e-20   -7.3777480864e-20   1.9714168542e-20    -3.4603933305e-20   
+-4.1747308206e-21   2.8830430282e-20    -7.4027211347e-22   -3.5445982763e-20   -3.0243359252e-20   
+3.6726411357e-20    1.0824336347e-19    1.3568767982e-20    -2.4196816293e-20   1.2239364220e-20    
+-1.5097048378e-20   6.4209467083e-20    6.4800239893e-20    -1.1068232030e-21   -3.9941186008e-20   
+3.6259203319e-20    4.7975352870e-20    2.8058733733e-21    2.5455648391e-20    1.2708230128e-19    
+-4.4774495904e-20   -1.3047575731e-19   3.8775827633e-20    8.1086684264e-20    -2.9211972714e-20   
+-3.7804132099e-20   -3.6102423714e-20   0.0000000000e+00    -2.5768042501e-07   -2.6781678151e-07   
+-9.1095435783e-09   -2.2509815335e-10   -4.7930772459e-12   -9.2905745455e-14   -1.6815008437e-15   
+-2.8812799581e-17   -4.6237673936e-19   -1.7052045390e-20   -1.6052283432e-21   4.2069260467e-21    
+3.2312291827e-21    3.8335571992e-21    -1.6235829569e-20   -1.4089359219e-20   2.0602093810e-21    
+-6.3970503333e-21   8.4096184979e-21    8.8969189376e-22    5.3118149418e-21    3.5025257281e-20    
+9.5193666677e-21    2.9817551273e-20    -9.5547498416e-21   -2.9693985380e-20   -3.3659946272e-21   
+-1.8882261445e-20   1.4671507261e-20    -2.2423090759e-20   -4.5999661906e-21   1.1267080803e-19    
+-7.5977363873e-20   -1.4325546687e-19   -3.8136307609e-20   1.2158387806e-19    9.3759526101e-20    
+-9.8712306931e-20   6.4487149475e-20    5.2925337517e-20    -7.9832371116e-20   -8.3907732385e-21   
+-5.0803009221e-21   6.1364915945e-20    9.2701025957e-20    -3.2365308991e-20   -6.5359669436e-20   
+-1.8527633137e-20   7.1593332493e-20    4.4234050530e-20    -1.1375324863e-19   -7.4029334663e-20   
+9.5791331444e-20    3.4247000081e-20    8.0675804217e-21    6.3748801695e-20    -4.7834303936e-20   
+-1.6548055891e-20   1.9518867659e-20    3.3840502977e-20    5.2728173992e-20    3.8067537311e-20    
+3.1578147195e-20    -9.1475274800e-20   -1.0123916869e-19   -1.7674645160e-20   1.8562168364e-20    
+-2.3194005171e-20   1.5214672381e-20    5.4604574773e-20    1.1161386396e-20    -3.9748620444e-20   
+1.5167091280e-20    -6.3638388093e-20   -1.7700725117e-19   6.7798032244e-21    9.5112128700e-21    
+-1.0089723837e-20   6.7659360887e-20    -7.2688982819e-20   0.0000000000e+00    -2.7005206968e-07   
+-2.8067481620e-07   -9.5468978455e-09   -2.3590524130e-10   -5.0231955859e-12   -9.7366209217e-14   
+-1.7622352296e-15   -3.0201423315e-17   -4.8382287528e-19   -1.0371395020e-20   -7.8512632492e-21   
+3.9983132170e-21    1.0344338133e-20    -9.9239315737e-21   -1.3147497461e-20   5.7651419828e-21    
+-2.3079614912e-21   -1.7119525669e-21   8.1082702948e-21    1.9147521093e-20    7.2889801924e-21    
+-1.0805493018e-20   -6.9553598079e-21   2.7810631845e-20    1.0280319761e-20    -2.4145629741e-20   
+1.4926773482e-20    6.8761610880e-21    -8.2872814461e-21   6.1365881850e-20    -5.6004361761e-21   
+-6.5420316651e-20   1.5184318112e-20    2.3935358303e-20    5.5709490419e-20    4.7243709637e-20    
+-6.8547323670e-20   -1.5110193049e-19   -1.7811833368e-20   5.5423193913e-20    2.8853012507e-20    
+3.3931648494e-20    -3.5806988692e-20   5.3717530018e-21    4.5294832502e-20    9.8283701143e-21    
+-2.1951070690e-20   1.7958216986e-20    1.6906442365e-20    5.4423819683e-20    4.8666253246e-20    
+-2.8854123077e-20   6.2773645133e-20    1.7678410263e-20    -4.6538286676e-20   1.3302580116e-20    
+4.5253559753e-20    -1.7494270970e-21   -5.9371428886e-20   -7.8500390280e-20   2.3190665063e-20    
+5.6414239502e-20    3.1910776754e-20    -9.7222777123e-22   -4.7676186982e-20   -3.4356962371e-20   
+-2.1808258869e-21   4.9834063148e-20    3.0567317013e-20    -6.8496324083e-20   -5.4674627021e-20   
+-1.9620487951e-21   -1.0011743348e-19   2.1307469328e-20    6.4763064898e-20    3.4271216019e-21    
+-2.8994962295e-20   7.9878020715e-21    3.8754275255e-20    -8.4987916278e-20   0.0000000000e+00    
+-2.7421814596e-07   -2.8500468136e-07   -9.6941742407e-09   -2.3954446257e-10   -5.1006865466e-12   
+-9.8868259314e-14   -1.7894127133e-15   -3.0667763844e-17   -5.1569678299e-19   -3.3432563534e-21   
+-4.2916410702e-21   -7.7707096295e-22   9.7573858393e-21    -1.3870671122e-20   6.0178770400e-21    
+1.6983017832e-20    -2.4553502722e-21   1.1557673947e-20    -7.6229004339e-21   -8.8623932619e-21   
+7.6167812422e-21    -1.5910084590e-20   -2.1799688808e-20   -2.7412748616e-20   1.7884483969e-20    
+3.6763798847e-20    2.1912073672e-21    1.0038981662e-20    -1.8829461654e-20   8.1332075036e-20    
+1.0119867132e-20    -1.5154500572e-19   9.0909411010e-20    1.2537958549e-19    1.2102781794e-19    
+-4.4660629279e-20   -1.6440647687e-19   -4.3268881517e-20   -5.0974376634e-20   1.4086345751e-20    
+7.3564250505e-20    1.0146053760e-20    -3.9713960253e-20   -7.8021945149e-20   -3.6540084344e-20   
+9.7197417760e-20    4.4675147541e-20    4.3899930805e-20    2.1394249711e-20    1.7522828096e-20    
+6.8438805458e-20    7.8768210516e-21    1.4761056585e-20    2.6274602603e-20    -4.9664634628e-20   
+-2.9887515849e-20   1.1568754365e-19    -2.9302573117e-20   -1.2549349668e-19   -9.0039286844e-20   
+-4.5710347577e-20   -1.3515028400e-20   -4.8731146521e-20   9.6111446731e-20    1.0595041190e-19    
+-3.0713193656e-20   2.0306804198e-20    1.7933726611e-19    6.1752303368e-20    -2.2073671800e-19   
+-8.6514885563e-20   1.0150413281e-19    -1.1586186486e-19   7.1953406374e-20    2.2132320313e-19    
+-2.5692430835e-20   -1.1682658808e-20   5.3996539825e-20    -6.8344289934e-20   -8.1029032943e-20   
+0.0000000000e+00    -2.7005206968e-07   -2.8067481620e-07   -9.5468978455e-09   -2.3590524130e-10   
+-5.0231955859e-12   -9.7366209217e-14   -1.7622352296e-15   -3.0201423315e-17   -4.8382287528e-19   
+-1.0371395020e-20   -7.8512632492e-21   3.9983132170e-21    1.0344338133e-20    -9.9239315737e-21   
+-1.3147497461e-20   5.7651419828e-21    -2.3079614912e-21   -1.7119525669e-21   8.1082702948e-21    
+1.9147521093e-20    7.2889801924e-21    -1.0805493018e-20   -6.9553598079e-21   2.7810631845e-20    
+1.0280319761e-20    -2.4145629741e-20   1.4926773482e-20    6.8761610880e-21    -8.2872814461e-21   
+6.1365881850e-20    -5.6004361761e-21   -6.5420316651e-20   1.5184318112e-20    2.3935358303e-20    
+5.5709490419e-20    4.7243709637e-20    -6.8547323670e-20   -1.5110193049e-19   -1.7811833368e-20   
+5.5423193913e-20    2.8853012507e-20    3.3931648494e-20    -3.5806988692e-20   5.3717530018e-21    
+4.5294832502e-20    9.8283701143e-21    -2.1951070690e-20   1.7958216986e-20    1.6906442365e-20    
+5.4423819683e-20    4.8666253246e-20    -2.8854123077e-20   6.2773645133e-20    1.7678410263e-20    
+-4.6538286676e-20   1.3302580116e-20    4.5253559753e-20    -1.7494270970e-21   -5.9371428886e-20   
+-7.8500390280e-20   2.3190665063e-20    5.6414239502e-20    3.1910776754e-20    -9.7222777123e-22   
+-4.7676186982e-20   -3.4356962371e-20   -2.1808258869e-21   4.9834063148e-20    3.0567317013e-20    
+-6.8496324083e-20   -5.4674627021e-20   -1.9620487951e-21   -1.0011743348e-19   2.1307469328e-20    
+6.4763064898e-20    3.4271216019e-21    -2.8994962295e-20   7.9878020715e-21    3.8754275255e-20    
+2.8867128283e-20    0.0000000000e+00    -2.5768042501e-07   -2.6781678151e-07   -9.1095435783e-09   
+-2.2509815335e-10   -4.7930772459e-12   -9.2905745455e-14   -1.6815008437e-15   -2.8812799581e-17   
+-4.6237673936e-19   -1.7052045390e-20   -1.6052283432e-21   4.2069260467e-21    3.2312291827e-21    
+3.8335571992e-21    -1.6235829569e-20   -1.4089359219e-20   2.0602093810e-21    -6.3970503333e-21   
+8.4096184979e-21    8.8969189376e-22    5.3118149418e-21    3.5025257281e-20    9.5193666677e-21    
+2.9817551273e-20    -9.5547498416e-21   -2.9693985380e-20   -3.3659946272e-21   -1.8882261445e-20   
+1.4671507261e-20    -2.2423090759e-20   -4.5999661906e-21   1.1267080803e-19    -7.5977363873e-20   
+-1.4325546687e-19   -3.8136307609e-20   1.2158387806e-19    9.3759526101e-20    -9.8712306931e-20   
+6.4487149475e-20    5.2925337517e-20    -7.9832371116e-20   -8.3907732385e-21   -5.0803009221e-21   
+6.1364915945e-20    9.2701025957e-20    -3.2365308991e-20   -6.5359669436e-20   -1.8527633137e-20   
+7.1593332493e-20    4.4234050530e-20    -1.1375324863e-19   -7.4029334663e-20   9.5791331444e-20    
+3.4247000081e-20    8.0675804217e-21    6.3748801695e-20    -4.7834303936e-20   -1.6548055891e-20   
+1.9518867659e-20    3.3840502977e-20    5.2728173992e-20    3.8067537311e-20    3.1578147195e-20    
+-9.1475274800e-20   -1.0123916869e-19   -1.7674645160e-20   1.8562168364e-20    -2.3194005171e-20   
+1.5214672381e-20    5.4604574773e-20    1.1161386396e-20    -3.9748620444e-20   1.5167091280e-20    
+-6.3638388093e-20   -1.7700725117e-19   6.7798032244e-21    9.5112128700e-21    -1.0089723837e-20   
+6.7659360887e-20    1.0653523766e-19    0.0000000000e+00    -2.3747911808e-07   -2.4682126212e-07   
+-8.3954002267e-09   -2.0745156659e-10   -4.4173235806e-12   -8.5622393599e-14   -1.5496633170e-15   
+-2.6564539414e-17   -4.5253258845e-19   -2.9847788872e-21   8.8559907136e-21    -5.1754385020e-21   
+-5.0415471803e-21   1.4069797110e-20    7.5682279451e-21    -1.5056412914e-20   7.2752334423e-21    
+2.7818938876e-21    -7.8062754463e-21   -2.2607514489e-20   7.1433007023e-21    3.1014499380e-20    
+1.0279624174e-20    -2.1804577675e-20   -2.1111506443e-20   2.9156266082e-20    -2.5103123165e-22   
+-1.3137886911e-21   1.6523091516e-20    -6.0208444181e-20   1.3247440524e-20    1.0044559149e-19    
+1.9168354832e-20    -9.4661290146e-20   -1.0026451093e-19   3.5256334259e-20    5.5405976460e-20    
+1.0408757676e-19    6.8451325769e-20    -1.3011517687e-20   -8.1456609410e-20   -1.5353213910e-20   
+6.5362718242e-20    -3.3749175456e-20   2.5903736682e-21    3.0770062542e-20    -1.8754365422e-20   
+-4.8288140802e-20   1.9936736892e-20    -1.7868073979e-20   -7.3777480864e-20   1.9714168542e-20    
+-3.4603933305e-20   -4.1747308206e-21   2.8830430282e-20    -7.4027211347e-22   -3.5445982763e-20   
+-3.0243359252e-20   3.6726411357e-20    1.0824336347e-19    1.3568767982e-20    -2.4196816293e-20   
+1.2239364220e-20    -1.5097048378e-20   6.4209467083e-20    6.4800239893e-20    -1.1068232030e-21   
+-3.9941186008e-20   3.6259203319e-20    4.7975352870e-20    2.8058733733e-21    2.5455648391e-20    
+1.2708230128e-19    -4.4774495904e-20   -1.3047575731e-19   3.8775827633e-20    8.1086684264e-20    
+-2.9211972714e-20   -3.7804132099e-20   1.0154049349e-19    0.0000000000e+00    -2.1006195542e-07   
+-2.1832619628e-07   -7.4261666740e-09   -1.8350166361e-10   -3.9073516521e-12   -7.5737445731e-14   
+-1.3707651162e-15   -2.3500421997e-17   -3.8527367355e-19   2.1918744061e-22    -1.7344236107e-21   
+-4.1304252527e-21   2.3405734554e-21    1.3231610333e-20    6.4217031274e-22    -1.0947881411e-20   
+5.9137360651e-21    1.0216973960e-20    -2.3405237848e-21   2.1154330178e-21    -9.8785188777e-21   
+-3.9717957265e-20   -1.6561499608e-20   -1.5679172166e-20   1.9173850463e-21    -9.6472495941e-22   
+-1.9910130284e-21   1.8476158683e-20    -6.9720312947e-21   1.8563984478e-20    -4.2420456206e-21   
+-8.7801374534e-20   5.2770797900e-20    3.7440107591e-20    -5.0066022583e-20   -5.7319647562e-20   
+-7.7598116834e-20   8.9623306058e-20    -1.8688841614e-20   -1.5957307557e-20   8.4570181576e-20    
+6.5137937408e-20    3.7935654774e-20    -4.8500876645e-20   -4.2455688508e-20   -1.4132695881e-20   
+6.7544617285e-20    4.3972599047e-20    -4.0250369796e-20   -4.9557349434e-20   6.9995968657e-20    
+8.1039627455e-20    -1.1018430266e-19   -6.0592208765e-20   -8.4094457859e-21   -4.7936788837e-20   
+5.3335664018e-20    5.5547505397e-20    1.2064377230e-20    4.3860454302e-20    7.7424716898e-21    
+-5.1722131429e-21   4.2593835471e-20    2.0072499663e-20    1.9089280385e-20    4.1600426786e-20    
+-4.5055696663e-23   -6.1869361579e-20   -1.0056141051e-19   -3.0866618334e-20   -2.2888786474e-20   
+1.3531261951e-21    8.0884388188e-20    -1.4073452493e-21   -6.5428611802e-21   4.2175481929e-20    
+7.5044922192e-20    2.3639124988e-20    3.0560593292e-21    6.9371079522e-20    0.0000000000e+00    
+-1.7626199373e-07   -1.8319739210e-07   -6.2312925901e-09   -1.5397615004e-10   -3.2786566868e-12   
+-6.3551259261e-14   -1.1502102851e-15   -1.9705252287e-17   -3.1391251044e-19   -1.0860431585e-20   
+-8.0826802623e-21   -4.1816498338e-21   5.0232243613e-22    1.0136013325e-20    -8.5955892044e-22   
+-7.6482286361e-21   -6.8023355372e-21   7.5742916535e-21    7.5197209370e-21    6.9571901185e-21    
+-1.6787633995e-20   -3.5748382419e-20   -1.2270889126e-20   -4.9334363571e-21   9.2874172050e-21    
+-2.3907246937e-20   -3.7285684099e-20   5.2560133670e-21    -3.2909900496e-21   1.2265860758e-20    
+-3.2113890565e-21   -7.8978184001e-20   -3.0015633420e-20   6.7443112714e-20    4.2661870513e-20    
+-2.4378551438e-20   -1.9974233376e-22   2.2263624353e-20    -2.7081388296e-20   -4.8056963467e-20   
+7.3641712534e-20    2.9001105355e-20    -2.2618705549e-20   -3.0774916059e-21   -3.4097787177e-20   
+-3.0050099583e-20   2.2979769224e-20    2.3474744733e-20    -2.1491949258e-20   -1.6102333297e-20   
+2.1433351767e-20    4.2015198103e-20    -1.0196429969e-20   -6.6933113323e-20   -4.6661775087e-20   
+-5.6108596384e-20   -2.0433208068e-20   6.2916406970e-20    4.7793162120e-21    -1.8586253128e-20   
+3.9434043492e-21    -3.6246380818e-20   -2.0710932337e-20   1.3220133948e-20    -3.1869209014e-20   
+-1.9123011651e-20   4.2245271767e-20    1.3282067525e-20    -7.5661046539e-20   -1.1929881125e-20   
+1.5542689853e-20    3.5391569966e-20    6.5713959952e-20    4.5629478557e-20    1.2758007109e-20    
+-8.5582672512e-20   -2.9543636210e-20   4.9957049790e-20    1.6609702447e-20    1.3737836984e-19    
+0.0000000000e+00    -1.3710622466e-07   -1.4250221724e-07   -4.8470834239e-09   -1.1977213571e-10   
+-2.5503410054e-12   -4.9434067368e-14   -8.9470028174e-16   -1.5332871289e-17   -2.5016526896e-19   
+-4.0476003839e-21   -4.3333933045e-21   5.4360766185e-23    4.0691656284e-21    -7.8590421767e-22   
+5.8358667114e-21    3.9065218259e-21    -7.4636245527e-21   -5.5591470308e-21   4.3148355238e-21    
+4.4246663836e-21    -6.6554740014e-21   -1.0160550002e-21   1.1361670835e-20    7.9155738585e-22    
+2.3311763146e-21    2.4182779524e-21    7.5962663634e-21    1.0966758699e-20    -1.3031772357e-20   
+-4.6810322766e-20   7.9568469960e-21    6.3736197112e-20    -4.6233610239e-20   -5.4962225753e-21   
+2.0241865251e-20    -1.4938178804e-20   4.6598541525e-20    -1.6924216118e-20   2.2740907474e-20    
+-6.7092948380e-21   -1.3128655835e-20   1.3760344103e-20    3.2958784163e-20    -3.2424662407e-20   
+-7.5194574714e-20   1.9529445996e-20    -3.6110252955e-20   -7.9869169236e-20   -1.5658759607e-20   
+7.1324960443e-20    6.5588308032e-21    -1.4247389272e-20   4.8986114313e-20    -1.9471858395e-20   
+-3.1225562822e-20   -3.0299025678e-20   -5.7376249788e-20   1.9171136452e-21    3.5014643135e-20    
+1.2066927193e-20    5.0483204887e-22    -3.6434870815e-20   -5.6855586821e-20   2.1105382678e-20    
+4.5229653888e-20    3.7892850081e-20    -1.4960275933e-20   -7.7264730005e-21   7.9272337900e-20    
+5.7383732988e-20    2.6037733572e-21    1.7458915650e-20    -6.5522342524e-21   2.9183820483e-20    
+5.0877898464e-20    -5.1532219535e-20   -7.2274589996e-20   -3.5261035110e-20   -1.1297949498e-20   
+1.4004660338e-19    0.0000000000e+00    -9.3784469287e-08   -9.7477254679e-08   -3.3156026643e-09   
+-8.1929041604e-11   -1.7445364938e-12   -3.3814833778e-14   -6.1201156148e-16   -1.0491259261e-17   
+-1.7137360625e-19   -8.1569637945e-22   -2.3688163070e-21   4.4477925138e-21    9.3608030359e-21    
+-2.1631083520e-23   3.8659288764e-21    6.6613496502e-21    2.5819502031e-21    2.0666502931e-21    
+-3.0947252796e-21   -5.3978318925e-21   -2.1023934540e-21   -5.1896781606e-21   4.6566934317e-21    
+1.6019633517e-20    7.1750398329e-21    1.3091774981e-20    3.7050022104e-20    -5.9995910262e-21   
+-2.5494482307e-20   -7.0185351248e-21   -4.6262823856e-21   6.0355895967e-20    -2.8773040369e-20   
+-4.6235515058e-20   3.0955717696e-20    -3.7154417598e-20   -4.0096643803e-20   -3.0481475275e-20   
+2.3406733409e-20    6.0947077887e-20    -1.5577669823e-21   -1.2262808745e-20   -3.0305871051e-21   
+-1.5579624234e-20   -2.0888719820e-20   7.6408301603e-21    4.0550687499e-21    -1.9892599527e-20   
+-4.0053750768e-21   4.3835725698e-20    1.2812271084e-20    -4.7693780786e-20   7.7508170554e-21    
+1.9271120678e-20    1.9834091281e-20    3.8068505554e-20    2.4938673050e-20    -1.2015217214e-20   
+-2.9084287604e-21   1.8350542802e-20    1.6673760377e-20    6.9916436742e-22    -2.6836109403e-20   
+-2.6443168800e-20   -1.1815725679e-20   2.9668332661e-20    -2.8312535715e-20   -1.4563263317e-20   
+2.8419833325e-20    8.7198554291e-21    -5.2657897486e-21   -4.8481032731e-20   -5.3592160103e-20   
+-1.2333464725e-20   5.3216281252e-20    2.9017077538e-20    -1.9167027968e-20   2.2875925931e-20    
+-2.7089456546e-21   3.1961979597e-20    0.0000000000e+00    -5.4045832379e-08   -5.6121879813e-08   
+-1.9172646160e-09   -4.7596617410e-11   -1.0184851500e-12   -1.9843798095e-14   -3.6108514000e-16   
+-6.2217692010e-18   -1.0234471578e-19   -4.0712587090e-21   -1.6533651692e-21   -2.8884495671e-21   
+-1.0106323744e-21   7.8566448252e-21    7.6503677535e-21    2.7528694867e-21    1.4319101287e-21    
+5.7588369603e-21    -4.4428731206e-21   -7.9656743210e-21   6.7019679170e-21    -9.1855547071e-22   
+-3.6880488114e-21   1.4448402603e-20    3.0989275010e-21    -8.9288064264e-21   8.2188993993e-21    
+-4.9966301201e-21   -1.0073965882e-20   2.4308209541e-20    1.0301414290e-21    -1.2598481269e-20   
+-9.7215241630e-21   3.2670445678e-21    4.9397074960e-20    2.0159182958e-21    -3.9547210746e-20   
+-1.1672286829e-20   1.2904754872e-20    -3.8139842402e-22   -2.6324218968e-20   -3.1694429530e-20   
+-3.6514804177e-20   1.4563635621e-20    3.8353439295e-20    1.2918827414e-22    -2.3317555757e-21   
+1.1527311877e-21    -2.2302375432e-20   -9.6653094723e-21   2.2545292640e-20    2.6037829144e-20    
+2.3438638063e-20    6.8783356005e-21    -2.0268698006e-22   2.3904056686e-20    -8.6435513891e-21   
+-2.2165473064e-20   1.0722374321e-21    -5.1579830528e-21   1.3109770956e-20    7.2529042023e-22    
+-7.7846321735e-21   -2.1021486011e-20   -2.8815457376e-20   2.7431613608e-21    1.0182636060e-20    
+2.5173973902e-20    1.1218711929e-20    2.8324298622e-20    1.9144142225e-20    -2.1283706845e-20   
+8.3607246115e-21    1.1068031488e-20    3.4511441376e-20    -3.2010051379e-21   -1.8426216984e-20   
+5.2713800261e-20    6.4366421153e-21    5.1195061545e-20    0.0000000000e+00    -3.6851719335e-08   
+-3.8197380805e-08   -1.3159041720e-09   -3.2957603653e-11   -7.1177195956e-13   -1.4000980902e-14   
+-2.5727469047e-16   -4.4785394282e-18   -7.2734417428e-20   -3.1820866957e-21   -4.0509237157e-21   
+-4.4702817668e-21   -3.3137752264e-21   5.8806496022e-21    6.9488265773e-21    7.8361903153e-22    
+-6.4661462019e-23   -1.8248654752e-21   -5.1947672129e-21   -6.1328889723e-21   7.4918543100e-21    
+1.2293402933e-20    -1.1956847984e-20   -2.8405730844e-21   2.2074212984e-21    -2.5965007550e-20   
+-5.7726369300e-21   1.1529443820e-20    -8.5426616264e-21   1.5800109420e-20    1.0791154547e-20    
+-3.2336680666e-20   -1.8541988049e-20   8.3271792997e-21    2.5775902584e-20    1.6089160984e-20    
+-1.1105530081e-20   -8.1754798375e-21   1.7983888750e-20    -3.6762562144e-20   -3.4826575479e-20   
+1.7138748854e-20    1.1071833631e-20    6.0531564666e-21    4.4709213682e-21    7.1403500881e-21    
+-4.9777754633e-22   -9.1474562505e-21   -1.4533804818e-20   1.6172560199e-21    2.0863701940e-20    
+7.5115360814e-20    7.9376421080e-20    1.6713766052e-20    -2.4133784561e-20   -9.7862463458e-23   
+-3.3975422486e-20   -2.9617199757e-20   5.1395014392e-20    2.0165990275e-20    -1.2293045746e-20   
+-1.2483954370e-20   -2.2873817646e-20   1.2058311794e-20    2.8782337491e-20    1.6433195417e-20    
+2.6495575860e-20    2.6882171720e-20    3.2870312525e-20    4.5617251916e-20    1.6709852534e-20    
+-3.7447117381e-21   1.6847394835e-21    2.7076691186e-21    2.4478466224e-20    -8.5230183931e-21   
+-3.0734118228e-20   1.2783262269e-20    3.3662135836e-20    1.0905444579e-19    
+0.0000000000e+00    8.5078162895e-06    -1.2248065629e-07   -6.3732119491e-09   -1.6504961113e-10   
+-3.4035190100e-12   -6.1431453343e-14   -1.0047273167e-15   -1.5077367222e-17   -1.9597619880e-19   
+-1.0200781414e-20   -2.4692240468e-20   2.1490718161e-21    2.9107928906e-20    5.4123246600e-21    
+3.3762350287e-21    3.1132053915e-20    6.2023858200e-20    8.5499575987e-20    5.8939434756e-20    
+-5.9838331034e-20   -9.4275050964e-20   -2.6728665910e-20   -5.5652843477e-20   -1.3387998825e-20   
+4.3940155982e-20    1.9403328220e-20    -2.9467255356e-20   -4.5410154845e-20   -3.2752419888e-20   
+-9.0789021731e-20   1.1338198501e-19    8.0248188036e-20    3.9454119200e-20    7.1725669908e-20    
+-1.2005227393e-19   1.7206023080e-19    2.2214496929e-19    -2.3893007728e-19   -2.0551868124e-19   
+-2.7621700539e-21   -1.4085527915e-19   8.3633832056e-20    2.0067056485e-19    1.7993519605e-19    
+7.4231795332e-20    1.0805411878e-20    2.1152722667e-19    1.7851554135e-21    -2.5425783810e-19   
+-9.7759820029e-20   1.6901627403e-19    1.2093071860e-20    -4.6126832915e-20   5.7341844713e-20    
+-1.1073648312e-19   -3.3439455839e-20   4.4455680621e-21    -1.1952209962e-19   -8.4851821979e-20   
+-1.6380300892e-19   -5.0691662837e-20   1.0913758875e-20    -8.7949021113e-20   -4.9930715001e-20   
+-2.0746850524e-20   7.5578690308e-20    1.8793308975e-19    1.2838397665e-20    -1.8220844146e-19   
+-9.3995685160e-20   -3.9169728276e-20   -1.3468477961e-19   -4.8578864318e-20   -1.4238128248e-19   
+-1.9851460855e-19   -1.6792492580e-19   -1.2083380624e-19   -1.4572803832e-19   -6.1785139837e-20   
+3.2999555759e-19    0.0000000000e+00    2.0036300795e-07    2.0824466704e-07    7.0818715112e-09    
+1.7495600570e-10    3.7244849049e-12    7.2173478252e-14    1.3058797387e-15    2.2376740508e-17    
+3.6270404671e-19    -5.1979921848e-21   -7.3740747615e-21   6.7549319103e-21    1.7837632096e-20    
+2.0039875195e-22    -1.4600600181e-20   1.7640038201e-20    4.5436924170e-21    -1.7629849895e-20   
+1.7190730622e-20    1.0707968349e-20    -3.5614683323e-21   1.0859008566e-20    -9.9959618447e-21   
+-1.7007354019e-20   -3.9594614018e-21   -9.9928705581e-21   -1.5942035869e-20   -8.0492785874e-21   
+1.6701892615e-20    1.2569815747e-20    1.6823388456e-20    -4.5238895916e-20   -2.9627927234e-20   
+7.2953635914e-20    -1.0381956401e-20   -1.2079101342e-20   4.1449478882e-20    -3.6956595918e-20   
+-9.8611827268e-20   -2.5628995206e-21   1.1072986611e-19    -6.4976073520e-21   3.0144024427e-20    
+5.6043065056e-20    -7.4385657190e-20   -2.8150917892e-20   1.9295217525e-20    -1.5425825647e-20   
+-1.3674819831e-22   2.2632138012e-20    5.7462707903e-21    3.8719469073e-21    -3.2521315676e-20   
+-6.2279892700e-20   3.7299967461e-21    -2.1996496229e-20   1.6099095592e-20    1.0490041956e-19    
+-3.9769094405e-20   -2.2175738459e-20   5.7431307911e-20    -2.9947932779e-20   -6.8514580812e-20   
+2.8966154424e-20    1.1360748855e-19    2.1600243768e-20    -1.1209128831e-19   -3.8009427162e-20   
+7.9319980196e-20    -1.2525381597e-20   -1.9804869839e-21   8.0979592267e-20    3.8761882480e-20    
+-4.1743059841e-20   -1.0069837009e-19   -1.4869993056e-20   3.4925195278e-20    -5.0283913121e-20   
+3.2177199608e-20    6.4435643471e-20    0.0000000000e+00    2.5763506814e-07    2.6776339401e-07    
+9.1070742466e-09    2.2501834628e-10    4.7909127490e-12    9.2853321652e-14    1.6803387217e-15    
+2.8799863922e-17    4.6577880193e-19    -7.3511441456e-21   -6.4367377861e-22   -4.4504610119e-21   
+-4.6730283555e-21   4.0323336063e-21    -4.9293153096e-21   9.1358847372e-21    3.8990003376e-21    
+-1.4230195896e-20   3.0940484827e-21    1.5308071404e-22    1.2633885352e-20    2.2120055118e-20    
+-3.4067762960e-20   -1.6404410307e-20   2.2039476920e-20    -4.0729118726e-20   -5.8837698158e-20   
+7.9326094276e-20    1.0736072154e-19    4.9010200363e-20    3.2780790615e-20    -1.7787566058e-19   
+-2.9368647703e-21   1.1958713422e-19    -6.0538206120e-20   4.6294302080e-20    7.4805710662e-20    
+5.9788265868e-20    -4.1828739292e-20   -9.0298183016e-20   9.3753125666e-20    -3.4845387780e-21   
+-7.3532714137e-20   -1.8029183038e-21   -1.9993973339e-20   -7.4064673196e-21   2.7305441710e-20    
+2.1663270265e-20    -2.4732881937e-20   -1.2638490801e-19   -1.3747665063e-19   1.3283460024e-19    
+3.3306692983e-20    5.4481835058e-20    1.4419868454e-19    -6.7208310128e-20   -1.0354173698e-19   
+3.4370050800e-20    8.9170036170e-20    -2.4192055756e-20   -3.9869491466e-20   -1.0997442319e-21   
+-1.6827242425e-20   5.0555102203e-20    9.7055894593e-20    6.3085272875e-21    2.3703629671e-20    
+1.9745977774e-21    7.8302465531e-21    3.6501374534e-21    2.9620824692e-20    9.5989127489e-20    
+9.3969947606e-20    -4.2747760853e-21   -8.3840374008e-20   -5.7502555396e-20   2.7406838387e-20    
+1.1836625775e-20    -4.4551301409e-21   -7.6292770857e-20   0.0000000000e+00    2.3748478083e-07    
+2.4682147650e-07    8.3954056887e-09    2.0745167929e-10    4.4173254933e-12    8.5622437543e-14    
+1.5496705656e-15    2.6551197625e-17    4.4401431327e-19    8.7174580527e-21    -5.6868299118e-21   
+-4.6119352126e-21   -1.1900752090e-21   1.2527116907e-20    -1.0926193620e-21   -2.0802051325e-20   
+7.0460902417e-21    1.9361396845e-20    -1.4791014507e-20   -2.1536104269e-20   1.7133215247e-20    
+1.0978233167e-20    -2.1765995848e-20   1.7333528797e-20    4.0049276999e-20    1.1401890586e-20    
+-1.6466705906e-20   4.7411630575e-21    1.4818034728e-20    1.7591834997e-20    -3.0359912490e-20   
+-9.0127406025e-20   3.9181935316e-20    3.1323191053e-21    -4.1525565368e-21   3.9172436017e-20    
+-4.3945643281e-20   6.4229615352e-20    2.8586217267e-20    8.1887110288e-21    1.5977173817e-20    
+-3.8941908728e-20   -1.5777693575e-19   -1.6046349074e-20   1.0637880035e-19    -5.4111797163e-20   
+3.1760697501e-20    1.2204143508e-19    3.4843538176e-20    -5.4759498077e-20   2.6029308851e-20    
+6.0607542591e-20    -3.5862723812e-21   2.9683257621e-20    -3.6035132722e-20   -3.9613736625e-20   
+-3.6060231898e-20   -8.0415515372e-20   1.2967323521e-20    -1.8668023821e-20   -4.8556906355e-20   
+-4.0682738530e-21   4.4051718955e-20    1.3725751602e-20    -3.7253431192e-20   1.6527986900e-21    
+1.0923902880e-19    4.2566461976e-20    -1.0944058131e-19   -7.4472306780e-20   1.7749800266e-20    
+-4.3665208240e-21   1.8132313361e-20    1.0763541404e-20    -2.0514869569e-20   2.0485176352e-20    
+4.4361683936e-20    2.4915739867e-20    -6.0087378693e-20   -6.1277815152e-20   0.0000000000e+00    
+2.1006764425e-07    2.1832643740e-07    7.4261737212e-09    1.8350184046e-10    3.9073556853e-12    
+7.5737540786e-14    1.3707617931e-15    2.3487931410e-17    3.8901583289e-19    1.2308703435e-20    
+-9.5139250036e-21   7.1330329892e-21    2.4019614629e-20    7.6852109392e-21    -6.4766074001e-21   
+-1.4019460613e-20   8.6637125929e-21    3.9858986364e-21    -1.1724052518e-20   -1.4047753462e-20   
+1.8656971785e-20    1.5298789253e-20    -6.8702075080e-22   2.4591803354e-20    -9.3217266906e-22   
+3.3857304990e-20    4.0581177084e-20    -6.0469174397e-20   -6.0049012826e-20   -3.8613307924e-20   
+-2.0296833432e-20   9.2171188597e-20    5.3436281602e-20    -4.5541503757e-20   -4.2607415196e-20   
+-2.2329182234e-20   -4.6046257427e-20   -4.4985440912e-20   5.2322402874e-20    7.6251989767e-20    
+-8.7806318694e-20   -3.6056728922e-20   3.2583604581e-20    2.2560630233e-20    3.4870741690e-20    
+2.0758610241e-20    4.1843064884e-21    2.1920824983e-21    3.0103601835e-20    8.1191584288e-20    
+5.9971592417e-20    -6.0327015139e-20   1.6399989175e-20    3.8913761196e-20    -3.6004640281e-20   
+5.9697177407e-20    2.8468500988e-20    -8.3600295119e-20   -2.6558126565e-20   5.6308290497e-21    
+3.5094850605e-20    2.7533535010e-20    -3.7060742584e-20   -3.3420339194e-20   1.0734431639e-20    
+5.1800347376e-20    -4.3224844146e-21   -3.8599460039e-20   5.0885945770e-20    -1.4084841184e-20   
+-5.7814184961e-20   -3.9037384071e-20   -5.7849221452e-20   -2.9997678635e-20   3.9541934130e-20    
+7.6796036807e-20    3.1073134207e-21    -4.3700609036e-20   -3.2615867258e-20   -2.3766657968e-20   
+0.0000000000e+00    1.7626768302e-07    1.8319763299e-07    6.2312996252e-09    1.5397632646e-10    
+3.2786606974e-12    6.3551335611e-14    1.1502212734e-15    1.9722582255e-17    3.2283404434e-19    
+3.4598295175e-21    -6.8548820793e-21   6.8889136434e-21    8.2051655719e-21    -9.6355591746e-21   
+-2.8666998782e-21   -1.5621406758e-21   -4.2498390024e-21   -3.7789777454e-21   1.1848298907e-20    
+5.9779342905e-21    -1.1092776474e-20   -2.0146901283e-21   -1.2785615841e-21   1.2708229171e-20    
+-8.6695187780e-24   -1.2352053302e-21   1.5173444769e-20    -1.3579339516e-20   -5.5280673856e-21   
+-1.1175304907e-20   1.8983369583e-20    9.5627701053e-20    -3.5995349450e-20   -4.5510335674e-20   
+6.0094216174e-21    8.5720008232e-21    4.5592963064e-20    -4.7237907372e-20   4.6553415268e-20    
+-1.5769372376e-20   -8.3941229868e-20   6.7315231312e-21    6.1157587264e-20    3.3755199974e-20    
+-2.5739927340e-20   6.4365329355e-21    -7.5001633745e-20   -8.3511536122e-20   1.1988691493e-20    
+4.8418469180e-20    -5.0670976197e-20   -7.1481918836e-20   7.1489241749e-20    7.2402426365e-20    
+7.7214123664e-20    1.2123440250e-19    -1.0249077722e-20   -7.0792255219e-20   2.6864946531e-21    
+-9.0945980199e-21   6.6105673727e-21    4.8372973479e-20    -2.5064577148e-20   -2.8154779342e-20   
+-2.1764285910e-20   -3.3406675010e-20   -1.7008341502e-20   5.0672824201e-22    6.4530185498e-20    
+1.3633670430e-20    -2.6211175892e-20   -1.0619487776e-20   -5.9711985662e-20   -1.0057679836e-21   
+5.1479666403e-20    -1.7219082674e-20   -4.8308072668e-20   -6.3816765174e-21   -2.2733283920e-20   
+-1.0911950088e-19   0.0000000000e+00    1.3711191733e-07    1.4250246127e-07    4.8470906458e-09    
+1.1977231978e-10    2.5503452841e-12    4.9434161599e-14    8.9470960026e-16    1.5335034708e-17    
+2.4818736073e-19    1.1524158937e-21    -3.8415640905e-21   4.4515989815e-21    6.4754991713e-21    
+-5.9762981916e-21   -2.3167877100e-21   4.0465930017e-21    -1.0565757371e-20   -2.8997668509e-21   
+1.3645613315e-21    9.4385153931e-21    -4.2675031255e-21   -2.1068081188e-20   -2.3102787253e-21   
+1.3143206204e-20    1.5206615527e-20    -9.8394779975e-21   1.1156158254e-21    -2.9723265685e-21   
+-3.5989788467e-21   4.1233125830e-20    1.2463846209e-21    -2.6131280757e-20   -3.5861142788e-20   
+4.2432444343e-20    1.0429959207e-19    -1.1882325804e-20   -5.6296352437e-21   -1.9755670008e-20   
+-2.1946239516e-20   -1.8782831061e-20   5.2591874397e-20    2.7373766980e-20    -2.4102608101e-20   
+2.5097865613e-20    -5.1800673181e-20   -6.0881819894e-20   6.2592764568e-22    3.9420953413e-20    
+8.4381626358e-21    -1.0490213802e-21   2.8329596801e-20    2.0995532820e-21    2.4926881445e-20    
+-3.2421016771e-21   -1.9066026461e-20   1.9336593365e-20    3.5732861429e-20    4.4350245320e-20    
+-3.8435834907e-22   -1.5834266548e-20   1.5867942222e-20    2.2194911319e-20    1.3987851966e-20    
+-1.4170469712e-20   -5.6132689578e-20   -2.9191016972e-20   -2.1282559897e-21   1.5502187945e-20    
+-3.0732574893e-20   -3.5080833820e-20   -9.6722931537e-21   -5.5111457147e-21   -2.9159612013e-20   
+3.1620582271e-20    5.1374345442e-20    -6.7038872694e-20   -7.6254544089e-20   2.6182792823e-20    
+1.6105689692e-20    -1.0174983939e-19   0.0000000000e+00    9.3790075312e-08    9.7477424422e-08    
+3.3156052729e-09    8.1929091891e-11    1.7445389219e-12    3.3814958226e-14    6.1201056408e-16    
+1.0483500691e-17    1.6580475757e-19    3.9377280583e-21    7.1014500335e-21    4.2377536060e-21    
+-2.8056889612e-21   -8.0191229285e-23   7.6898768116e-21    1.8374714417e-21    -6.5683579239e-22   
+3.5890818739e-21    -1.3804104195e-20   -1.0064397389e-21   9.6314901229e-21    -1.4651702181e-20   
+5.0234998553e-21    -6.2661719812e-21   -9.0789538942e-21   5.7527834993e-21    1.0797892900e-20    
+-2.3270735332e-21   -1.1527540268e-20   2.4009674514e-20    -2.7521971710e-21   -5.2196121729e-20   
+1.9510043465e-21    2.8954871675e-20    -5.0773367889e-21   -6.4189734087e-20   -2.5437343433e-20   
+4.0488750170e-20    -3.4279130139e-20   -4.0602853644e-20   4.2639788460e-20    3.3812844228e-20    
+3.2591145954e-20    -1.7870101514e-20   -5.2954251984e-20   3.5120239317e-20    5.9308092422e-20    
+2.0229236433e-20    -4.9955897658e-20   -4.1320673575e-20   4.6352561951e-20    4.5584212413e-20    
+-1.8040379496e-20   -2.9818953125e-20   -5.1137878994e-20   -4.8710514935e-20   3.7244563427e-22    
+1.1450324247e-20    3.1753274431e-22    1.8112757322e-20    1.7263757235e-20    -6.4631409623e-21   
+-2.0985185994e-21   3.8313535330e-21    1.3802756183e-20    4.4471102652e-20    4.4860583729e-21    
+-1.2425463013e-20   -1.6310079595e-20   1.1180892715e-20    -1.4815284360e-20   -2.0155519060e-20   
+4.1880945679e-20    2.6335737315e-20    2.8325744236e-20    -9.2013515308e-21   -1.3807044315e-20   
+1.6454968329e-20    1.9687083667e-20    -7.7210784332e-20   0.0000000000e+00    4.7618469218e-08    
+4.9490585397e-08    1.6833769137e-09    4.1596490070e-11    8.8572561914e-13    1.7168306112e-14    
+3.1072702398e-16    5.3192803385e-18    9.0049639083e-20    7.3207119146e-21    2.7783723314e-21    
+1.4711348484e-21    -5.0509499190e-21   1.2498583018e-21    2.6643222011e-21    -6.0349130593e-21   
+1.2528642536e-20    1.4471698809e-20    -7.7446625205e-21   -7.6160667734e-21   -1.9040846427e-21   
+6.5998953416e-21    1.7812885546e-22    -2.7754729445e-20   -4.2944170636e-21   1.2882966601e-20    
+1.7189055856e-21    7.7786291582e-21    7.8588768824e-21    -1.6740136211e-20   7.5246159217e-21    
+1.6369228504e-20    -1.7116333747e-20   -3.2628853975e-20   -3.9862984911e-20   -2.4302597320e-20   
+1.1449736595e-20    6.7901678191e-20    1.0605339440e-20    -4.4361678844e-20   -4.2551416311e-21   
+5.9283190644e-21    3.1478009929e-20    -1.0167081419e-20   -2.1752514400e-20   2.1102851007e-20    
+2.3589236689e-20    3.8326698132e-21    -1.6945673274e-20   -8.2344858096e-21   -4.8974647720e-21   
+1.7268549851e-20    -1.7562725345e-21   -1.8551858757e-21   -7.2188086565e-21   -3.8151306066e-20   
+-4.9700484227e-20   -3.8928423817e-20   1.9470237243e-20    3.5482884391e-20    -1.1714727930e-20   
+-2.5431021581e-20   -7.2924636902e-21   2.4799805060e-20    2.4422948369e-20    1.6743711967e-20    
+1.1511383522e-20    -1.5044449624e-20   -2.7945686429e-20   -6.5982053231e-21   9.7942128002e-21    
+4.6132163545e-21    2.8612145512e-20    -4.0744207634e-21   -2.2203634875e-20   5.6116985395e-21    
+2.8897367586e-20    -5.6565825674e-22   -1.5036297784e-20   -1.0835304004e-19   0.0000000000e+00    
+1.6940658945e-21    -2.9778502052e-22   8.2718061255e-25    -2.9080568410e-26   1.6155871339e-27    
+-6.3108872418e-30   6.6560138878e-31    -3.0044507132e-32   -1.8341473455e-32   -1.8014591986e-32   
+-1.8018729726e-32   -1.8019293963e-32   -1.8020234359e-32   -1.8018541647e-32   -1.8019105884e-32   
+-1.8019858200e-32   -1.8018729726e-32   -1.8019858200e-32   -1.8017789330e-32   -1.8017977409e-32   
+-1.8019482042e-32   -1.8019482042e-32   -1.8017977409e-32   -1.8017225093e-32   -1.8020234359e-32   
+-1.8020234359e-32   -1.8020986675e-32   -1.8019482042e-32   -1.8016472777e-32   -1.8021738991e-32   
+-1.8016472777e-32   -1.8007444980e-32   -1.8023995940e-32   -1.8025500573e-32   -1.8023055545e-32   
+-1.8015720460e-32   -1.8007444980e-32   -1.8014215827e-32   -1.8017319133e-32   -1.8025500573e-32   
+-1.8025500573e-32   -1.8025500573e-32   -1.8019482042e-32   -1.8013463511e-32   -1.8013463511e-32   
+-1.8019670121e-32   -1.8019482042e-32   -1.8020234359e-32   -1.8022491308e-32   -1.8019482042e-32   
+-1.8022491308e-32   -1.8019482042e-32   -1.8019482042e-32   -1.8017977409e-32   -1.8011958878e-32   
+-1.8016472777e-32   -1.8028509839e-32   -1.8016472777e-32   -1.8007444980e-32   -1.8010454246e-32   
+-1.8007444980e-32   -1.8013463511e-32   -1.8016472777e-32   -1.8020986675e-32   -1.8020986675e-32   
+-1.8014968144e-32   -1.8020986675e-32   -1.8034528370e-32   -1.8019482042e-32   -1.8001426449e-32   
+-1.8014968144e-32   -1.8024372099e-32   -1.8011018483e-32   -1.8023995940e-32   -1.8032271421e-32   
+-1.8018729726e-32   -1.8019482042e-32   -1.8025500573e-32   -1.8013463511e-32   -1.1968030783e-19   
+0.0000000000e+00    -4.7618469218e-08   -4.9490585397e-08   -1.6833769137e-09   -4.1596490070e-11   
+-8.8572561914e-13   -1.7168306112e-14   -3.1072702398e-16   -5.3192803385e-18   -9.0049639083e-20   
+-7.3207119146e-21   -2.7783723315e-21   -1.4711348485e-21   5.0509499190e-21    -1.2498583018e-21   
+-2.6643222012e-21   6.0349130593e-21    -1.2528642536e-20   -1.4471698809e-20   7.7446625205e-21    
+7.6160667733e-21    1.9040846427e-21    -6.5998953416e-21   -1.7812885550e-22   2.7754729445e-20    
+4.2944170635e-21    -1.2882966601e-20   -1.7189055857e-21   -7.7786291582e-21   -7.8588768825e-21   
+1.6740136211e-20    -7.5246159217e-21   -1.6369228504e-20   1.7116333747e-20    3.2628853975e-20    
+3.9862984911e-20    2.4302597320e-20    -1.1449736595e-20   -6.7901678191e-20   -1.0605339440e-20   
+4.4361678844e-20    4.2551416311e-21    -5.9283190645e-21   -3.1478009929e-20   1.0167081419e-20    
+2.1752514400e-20    -2.1102851007e-20   -2.3589236689e-20   -3.8326698133e-21   1.6945673274e-20    
+8.2344858095e-21    4.8974647719e-21    -1.7268549851e-20   1.7562725345e-21    1.8551858756e-21    
+7.2188086564e-21    3.8151306066e-20    4.9700484227e-20    3.8928423817e-20    -1.9470237243e-20   
+-3.5482884391e-20   1.1714727930e-20    2.5431021581e-20    7.2924636902e-21    -2.4799805060e-20   
+-2.4422948369e-20   -1.6743711967e-20   -1.1511383522e-20   1.5044449624e-20    2.7945686429e-20    
+6.5982053231e-21    -9.7942128002e-21   -4.6132163545e-21   -2.8612145512e-20   4.0744207633e-21    
+2.2203634875e-20    -5.6116985396e-21   -2.8897367586e-20   5.6565825670e-22    1.5036297784e-20    
+-1.3262077805e-19   0.0000000000e+00    -9.3790075312e-08   -9.7477424422e-08   -3.3156052729e-09   
+-8.1929091891e-11   -1.7445389219e-12   -3.3814958226e-14   -6.1201056408e-16   -1.0483500691e-17   
+-1.6580475757e-19   -3.9377280583e-21   -7.1014500335e-21   -4.2377536060e-21   2.8056889612e-21    
+8.0191229249e-23    -7.6898768117e-21   -1.8374714417e-21   6.5683579235e-22    -3.5890818740e-21   
+1.3804104195e-20    1.0064397389e-21    -9.6314901230e-21   1.4651702181e-20    -5.0234998553e-21   
+6.2661719812e-21    9.0789538942e-21    -5.7527834993e-21   -1.0797892900e-20   2.3270735331e-21    
+1.1527540268e-20    -2.4009674514e-20   2.7521971710e-21    5.2196121729e-20    -1.9510043465e-21   
+-2.8954871675e-20   5.0773367889e-21    6.4189734087e-20    2.5437343433e-20    -4.0488750170e-20   
+3.4279130139e-20    4.0602853644e-20    -4.2639788460e-20   -3.3812844228e-20   -3.2591145954e-20   
+1.7870101514e-20    5.2954251984e-20    -3.5120239317e-20   -5.9308092422e-20   -2.0229236433e-20   
+4.9955897658e-20    4.1320673575e-20    -4.6352561951e-20   -4.5584212413e-20   1.8040379496e-20    
+2.9818953125e-20    5.1137878994e-20    4.8710514935e-20    -3.7244563430e-22   -1.1450324247e-20   
+-3.1753274435e-22   -1.8112757322e-20   -1.7263757235e-20   6.4631409623e-21    2.0985185993e-21    
+-3.8313535330e-21   -1.3802756183e-20   -4.4471102652e-20   -4.4860583730e-21   1.2425463013e-20    
+1.6310079595e-20    -1.1180892715e-20   1.4815284360e-20    2.0155519060e-20    -4.1880945679e-20   
+-2.6335737315e-20   -2.8325744236e-20   9.2013515308e-21    1.3807044315e-20    -1.6454968329e-20   
+-1.9687083667e-20   -9.9834695007e-20   0.0000000000e+00    -1.3711191733e-07   -1.4250246127e-07   
+-4.8470906458e-09   -1.1977231978e-10   -2.5503452841e-12   -4.9434161599e-14   -8.9470960026e-16   
+-1.5335034708e-17   -2.4818736073e-19   -1.1524158938e-21   3.8415640905e-21    -4.4515989815e-21   
+-6.4754991714e-21   5.9762981915e-21    2.3167877100e-21    -4.0465930017e-21   1.0565757371e-20    
+2.8997668509e-21    -1.3645613315e-21   -9.4385153932e-21   4.2675031255e-21    2.1068081188e-20    
+2.3102787253e-21    -1.3143206204e-20   -1.5206615527e-20   9.8394779974e-21    -1.1156158254e-21   
+2.9723265685e-21    3.5989788467e-21    -4.1233125830e-20   -1.2463846209e-21   2.6131280756e-20    
+3.5861142788e-20    -4.2432444343e-20   -1.0429959207e-19   1.1882325804e-20    5.6296352437e-21    
+1.9755670008e-20    2.1946239516e-20    1.8782831061e-20    -5.2591874397e-20   -2.7373766980e-20   
+2.4102608101e-20    -2.5097865613e-20   5.1800673181e-20    6.0881819894e-20    -6.2592764572e-22   
+-3.9420953413e-20   -8.4381626358e-21   1.0490213802e-21    -2.8329596801e-20   -2.0995532820e-21   
+-2.4926881445e-20   3.2421016771e-21    1.9066026461e-20    -1.9336593365e-20   -3.5732861429e-20   
+-4.4350245320e-20   3.8435834903e-22    1.5834266548e-20    -1.5867942222e-20   -2.2194911319e-20   
+-1.3987851966e-20   1.4170469711e-20    5.6132689578e-20    2.9191016972e-20    2.1282559897e-21    
+-1.5502187945e-20   3.0732574893e-20    3.5080833820e-20    9.6722931536e-21    5.5111457146e-21    
+2.9159612013e-20    -3.1620582272e-20   -5.1374345442e-20   6.7038872694e-20    7.6254544089e-20    
+-2.6182792823e-20   -1.6105689692e-20   -4.6635345106e-20   0.0000000000e+00    -1.7626768302e-07   
+-1.8319763299e-07   -6.2312996252e-09   -1.5397632646e-10   -3.2786606974e-12   -6.3551335611e-14   
+-1.1502212734e-15   -1.9722582255e-17   -3.2283404434e-19   -3.4598295176e-21   6.8548820793e-21    
+-6.8889136435e-21   -8.2051655720e-21   9.6355591745e-21    2.8666998782e-21    1.5621406757e-21    
+4.2498390023e-21    3.7789777454e-21    -1.1848298907e-20   -5.9779342905e-21   1.1092776474e-20    
+2.0146901283e-21    1.2785615840e-21    -1.2708229171e-20   8.6695187420e-24    1.2352053301e-21    
+-1.5173444769e-20   1.3579339516e-20    5.5280673856e-21    1.1175304907e-20    -1.8983369583e-20   
+-9.5627701053e-20   3.5995349450e-20    4.5510335674e-20    -6.0094216174e-21   -8.5720008232e-21   
+-4.5592963064e-20   4.7237907372e-20    -4.6553415268e-20   1.5769372376e-20    8.3941229868e-20    
+-6.7315231312e-21   -6.1157587264e-20   -3.3755199974e-20   2.5739927340e-20    -6.4365329355e-21   
+7.5001633745e-20    8.3511536121e-20    -1.1988691493e-20   -4.8418469180e-20   5.0670976197e-20    
+7.1481918836e-20    -7.1489241749e-20   -7.2402426365e-20   -7.7214123664e-20   -1.2123440250e-19   
+1.0249077722e-20    7.0792255219e-20    -2.6864946532e-21   9.0945980198e-21    -6.6105673727e-21   
+-4.8372973479e-20   2.5064577148e-20    2.8154779342e-20    2.1764285910e-20    3.3406675010e-20    
+1.7008341502e-20    -5.0672824205e-22   -6.4530185498e-20   -1.3633670430e-20   2.6211175892e-20    
+1.0619487776e-20    5.9711985662e-20    1.0057679836e-21    -5.1479666403e-20   1.7219082673e-20    
+4.8308072668e-20    6.3816765173e-21    2.2733283920e-20    -4.5257302267e-20   0.0000000000e+00    
+-2.1006764425e-07   -2.1832643740e-07   -7.4261737212e-09   -1.8350184046e-10   -3.9073556853e-12   
+-7.5737540786e-14   -1.3707617931e-15   -2.3487931410e-17   -3.8901583289e-19   -1.2308703435e-20   
+9.5139250036e-21    -7.1330329892e-21   -2.4019614629e-20   -7.6852109393e-21   6.4766074000e-21    
+1.4019460613e-20    -8.6637125929e-21   -3.9858986364e-21   1.1724052518e-20    1.4047753462e-20    
+-1.8656971785e-20   -1.5298789253e-20   6.8702075077e-22    -2.4591803354e-20   9.3217266902e-22    
+-3.3857304990e-20   -4.0581177084e-20   6.0469174397e-20    6.0049012826e-20    3.8613307924e-20    
+2.0296833432e-20    -9.2171188597e-20   -5.3436281602e-20   4.5541503757e-20    4.2607415196e-20    
+2.2329182234e-20    4.6046257427e-20    4.4985440912e-20    -5.2322402874e-20   -7.6251989768e-20   
+8.7806318694e-20    3.6056728922e-20    -3.2583604581e-20   -2.2560630233e-20   -3.4870741690e-20   
+-2.0758610241e-20   -4.1843064884e-21   -2.1920824983e-21   -3.0103601835e-20   -8.1191584288e-20   
+-5.9971592417e-20   6.0327015139e-20    -1.6399989175e-20   -3.8913761196e-20   3.6004640281e-20    
+-5.9697177407e-20   -2.8468500988e-20   8.3600295119e-20    2.6558126565e-20    -5.6308290497e-21   
+-3.5094850605e-20   -2.7533535010e-20   3.7060742584e-20    3.3420339194e-20    -1.0734431639e-20   
+-5.1800347376e-20   4.3224844145e-21    3.8599460039e-20    -5.0885945770e-20   1.4084841184e-20    
+5.7814184961e-20    3.9037384071e-20    5.7849221452e-20    2.9997678635e-20    -3.9541934130e-20   
+-7.6796036807e-20   -3.1073134208e-21   4.3700609036e-20    3.2615867258e-20    2.8870730890e-20    
+0.0000000000e+00    -2.3748478083e-07   -2.4682147650e-07   -8.3954056887e-09   -2.0745167929e-10   
+-4.4173254933e-12   -8.5622437543e-14   -1.5496705656e-15   -2.6551197625e-17   -4.4401431327e-19   
+-8.7174580528e-21   5.6868299117e-21    4.6119352125e-21    1.1900752089e-21    -1.2527116907e-20   
+1.0926193620e-21    2.0802051324e-20    -7.0460902417e-21   -1.9361396845e-20   1.4791014507e-20    
+2.1536104269e-20    -1.7133215247e-20   -1.0978233167e-20   2.1765995848e-20    -1.7333528797e-20   
+-4.0049276999e-20   -1.1401890586e-20   1.6466705906e-20    -4.7411630575e-21   -1.4818034728e-20   
+-1.7591834997e-20   3.0359912490e-20    9.0127406024e-20    -3.9181935316e-20   -3.1323191053e-21   
+4.1525565368e-21    -3.9172436017e-20   4.3945643281e-20    -6.4229615352e-20   -2.8586217267e-20   
+-8.1887110288e-21   -1.5977173817e-20   3.8941908728e-20    1.5777693575e-19    1.6046349074e-20    
+-1.0637880035e-19   5.4111797163e-20    -3.1760697501e-20   -1.2204143508e-19   -3.4843538176e-20   
+5.4759498077e-20    -2.6029308851e-20   -6.0607542591e-20   3.5862723812e-21    -2.9683257621e-20   
+3.6035132722e-20    3.9613736625e-20    3.6060231898e-20    8.0415515372e-20    -1.2967323521e-20   
+1.8668023821e-20    4.8556906355e-20    4.0682738530e-21    -4.4051718955e-20   -1.3725751603e-20   
+3.7253431192e-20    -1.6527986900e-21   -1.0923902880e-19   -4.2566461976e-20   1.0944058131e-19    
+7.4472306780e-20    -1.7749800266e-20   4.3665208240e-21    -1.8132313361e-20   -1.0763541404e-20   
+2.0514869569e-20    -2.0485176353e-20   -4.4361683936e-20   -2.4915739867e-20   6.0087378693e-20    
+3.6867982882e-20    0.0000000000e+00    -2.5763506814e-07   -2.6776339401e-07   -9.1070742466e-09   
+-2.2501834628e-10   -4.7909127490e-12   -9.2853321652e-14   -1.6803387217e-15   -2.8799863922e-17   
+-4.6577880193e-19   7.3511441456e-21    6.4367377858e-22    4.4504610119e-21    4.6730283555e-21    
+-4.0323336064e-21   4.9293153095e-21    -9.1358847372e-21   -3.8990003376e-21   1.4230195896e-20    
+-3.0940484827e-21   -1.5308071407e-22   -1.2633885352e-20   -2.2120055118e-20   3.4067762960e-20    
+1.6404410307e-20    -2.2039476920e-20   4.0729118726e-20    5.8837698158e-20    -7.9326094276e-20   
+-1.0736072154e-19   -4.9010200363e-20   -3.2780790615e-20   1.7787566058e-19    2.9368647703e-21    
+-1.1958713422e-19   6.0538206120e-20    -4.6294302080e-20   -7.4805710662e-20   -5.9788265868e-20   
+4.1828739292e-20    9.0298183016e-20    -9.3753125666e-20   3.4845387779e-21    7.3532714137e-20    
+1.8029183038e-21    1.9993973339e-20    7.4064673196e-21    -2.7305441710e-20   -2.1663270265e-20   
+2.4732881937e-20    1.2638490801e-19    1.3747665063e-19    -1.3283460024e-19   -3.3306692983e-20   
+-5.4481835058e-20   -1.4419868454e-19   6.7208310128e-20    1.0354173698e-19    -3.4370050800e-20   
+-8.9170036170e-20   2.4192055756e-20    3.9869491466e-20    1.0997442319e-21    1.6827242425e-20    
+-5.0555102203e-20   -9.7055894593e-20   -6.3085272875e-21   -2.3703629671e-20   -1.9745977775e-21   
+-7.8302465532e-21   -3.6501374534e-21   -2.9620824692e-20   -9.5989127489e-20   -9.3969947606e-20   
+4.2747760852e-21    8.3840374008e-20    5.7502555396e-20    -2.7406838387e-20   -1.1836625775e-20   
+4.4551301409e-21    -1.8281918992e-19   0.0000000000e+00    -2.0036300795e-07   -2.0824466704e-07   
+-7.0818715112e-09   -1.7495600570e-10   -3.7244849049e-12   -7.2173478252e-14   -1.3058797387e-15   
+-2.2376740508e-17   -3.6270404671e-19   5.1979921847e-21    7.3740747614e-21    -6.7549319103e-21   
+-1.7837632097e-20   -2.0039875198e-22   1.4600600181e-20    -1.7640038201e-20   -4.5436924171e-21   
+1.7629849895e-20    -1.7190730622e-20   -1.0707968349e-20   3.5614683323e-21    -1.0859008566e-20   
+9.9959618447e-21    1.7007354019e-20    3.9594614018e-21    9.9928705580e-21    1.5942035869e-20    
+8.0492785873e-21    -1.6701892615e-20   -1.2569815747e-20   -1.6823388456e-20   4.5238895916e-20    
+2.9627927234e-20    -7.2953635914e-20   1.0381956401e-20    1.2079101342e-20    -4.1449478882e-20   
+3.6956595918e-20    9.8611827268e-20    2.5628995206e-21    -1.1072986611e-19   6.4976073519e-21    
+-3.0144024427e-20   -5.6043065056e-20   7.4385657190e-20    2.8150917892e-20    -1.9295217525e-20   
+1.5425825647e-20    1.3674819827e-22    -2.2632138012e-20   -5.7462707904e-21   -3.8719469073e-21   
+3.2521315676e-20    6.2279892700e-20    -3.7299967462e-21   2.1996496229e-20    -1.6099095592e-20   
+-1.0490041956e-19   3.9769094405e-20    2.2175738459e-20    -5.7431307911e-20   2.9947932779e-20    
+6.8514580812e-20    -2.8966154424e-20   -1.1360748855e-19   -2.1600243768e-20   1.1209128831e-19    
+3.8009427162e-20    -7.9319980196e-20   1.2525381597e-20    1.9804869838e-21    -8.0979592267e-20   
+-3.8761882480e-20   4.1743059841e-20    1.0069837009e-19    1.4869993056e-20    -3.4925195278e-20   
+5.0283913121e-20    -3.2177199608e-20   -1.0313142051e-19   0.0000000000e+00    8.5078162895e-06    
+-1.2248065629e-07   -6.3732119491e-09   -1.6504961113e-10   -3.4035190100e-12   -6.1431453343e-14   
+-1.0047273167e-15   -1.5077367222e-17   -1.9597619880e-19   -1.0200781414e-20   -2.4692240468e-20   
+2.1490718163e-21    2.9107928906e-20    5.4123246599e-21    3.3762350287e-21    3.1132053915e-20    
+6.2023858200e-20    8.5499575987e-20    5.8939434756e-20    -5.9838331034e-20   -9.4275050964e-20   
+-2.6728665910e-20   -5.5652843477e-20   -1.3387998825e-20   4.3940155982e-20    1.9403328220e-20    
+-2.9467255356e-20   -4.5410154845e-20   -3.2752419888e-20   -9.0789021731e-20   1.1338198501e-19    
+8.0248188036e-20    3.9454119200e-20    7.1725669908e-20    -1.2005227393e-19   1.7206023080e-19    
+2.2214496929e-19    -2.3893007728e-19   -2.0551868124e-19   -2.7621700539e-21   -1.4085527915e-19   
+8.3633832056e-20    2.0067056485e-19    1.7993519605e-19    7.4231795332e-20    1.0805411878e-20    
+2.1152722667e-19    1.7851554135e-21    -2.5425783810e-19   -9.7759820029e-20   1.6901627403e-19    
+1.2093071860e-20    -4.6126832915e-20   5.7341844713e-20    -1.1073648312e-19   -3.3439455839e-20   
+4.4455680621e-21    -1.1952209962e-19   -8.4851821979e-20   -1.6380300892e-19   -5.0691662837e-20   
+1.0913758875e-20    -8.7949021113e-20   -4.9930715001e-20   -2.0746850524e-20   7.5578690308e-20    
+1.8793308975e-19    1.2838397665e-20    -1.8220844146e-19   -9.3995685160e-20   -3.9169728276e-20   
+-1.3468477961e-19   -4.8578864318e-20   -1.4238128248e-19   -1.9851460855e-19   -1.6792492580e-19   
+-1.2083380624e-19   -1.4572803832e-19   -6.1785139837e-20   3.3732434500e-19    
+3.0017727763e-02    1.8783025138e-02    7.3490721655e-03    7.1463984864e-03    7.1429172088e-03    
+7.1428581476e-03    7.1428571594e-03    7.1428571431e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    3.0019631576e-02    1.8784005063e-02    7.3491008366e-03    7.1463991908e-03    
+7.1429172248e-03    7.1428581480e-03    7.1428571594e-03    7.1428571431e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    3.0021535969e-02    1.8784985289e-02    7.3491295197e-03    
+7.1463998957e-03    7.1429172408e-03    7.1428581483e-03    7.1428571594e-03    7.1428571431e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    3.0021536549e-02    1.8784985591e-02    
+7.3491295318e-03    7.1463998961e-03    7.1429172408e-03    7.1428581483e-03    7.1428571594e-03    
+7.1428571431e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    3.0021536549e-02    
+1.8784985591e-02    7.3491295318e-03    7.1463998961e-03    7.1429172408e-03    7.1428581483e-03    
+7.1428571594e-03    7.1428571431e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+3.0021536549e-02    1.8784985591e-02    7.3491295318e-03    7.1463998961e-03    7.1429172408e-03    
+7.1428581483e-03    7.1428571594e-03    7.1428571431e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    3.0021536549e-02    1.8784985591e-02    7.3491295318e-03    7.1463998961e-03    
+7.1429172408e-03    7.1428581483e-03    7.1428571594e-03    7.1428571431e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    3.0021536549e-02    1.8784985591e-02    7.3491295318e-03    
+7.1463998961e-03    7.1429172408e-03    7.1428581483e-03    7.1428571594e-03    7.1428571431e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    3.0021536549e-02    1.8784985591e-02    
+7.3491295318e-03    7.1463998961e-03    7.1429172408e-03    7.1428581483e-03    7.1428571594e-03    
+7.1428571431e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    3.0021536549e-02    
+1.8784985591e-02    7.3491295318e-03    7.1463998961e-03    7.1429172408e-03    7.1428581483e-03    
+7.1428571594e-03    7.1428571431e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+3.0021536550e-02    1.8784985591e-02    7.3491295318e-03    7.1463998961e-03    7.1429172408e-03    
+7.1428581483e-03    7.1428571594e-03    7.1428571431e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    3.0021536550e-02    1.8784985591e-02    7.3491295318e-03    7.1463998961e-03    
+7.1429172408e-03    7.1428581483e-03    7.1428571594e-03    7.1428571431e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    3.0021536550e-02    1.8784985591e-02    7.3491295318e-03    
+7.1463998961e-03    7.1429172408e-03    7.1428581483e-03    7.1428571594e-03    7.1428571431e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    3.0021536550e-02    1.8784985591e-02    
+7.3491295318e-03    7.1463998961e-03    7.1429172408e-03    7.1428581483e-03    7.1428571594e-03    
+7.1428571431e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    3.0021536551e-02    
+1.8784985591e-02    7.3491295318e-03    7.1463998961e-03    7.1429172408e-03    7.1428581483e-03    
+7.1428571594e-03    7.1428571431e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+3.0021536551e-02    1.8784985591e-02    7.3491295318e-03    7.1463998961e-03    7.1429172408e-03    
+7.1428581483e-03    7.1428571594e-03    7.1428571431e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    3.0021535971e-02    1.8784985289e-02    7.3491295197e-03    7.1463998957e-03    
+7.1429172408e-03    7.1428581483e-03    7.1428571594e-03    7.1428571431e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    3.0019631434e-02    1.8784005063e-02    7.3491008366e-03    
+7.1463991908e-03    7.1429172248e-03    7.1428581480e-03    7.1428571594e-03    7.1428571431e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    3.0017727476e-02    1.8783025138e-02    
+7.3490721655e-03    7.1463984864e-03    7.1429172088e-03    7.1428581476e-03    7.1428571594e-03    
+7.1428571431e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+0.0000000000e+00    6.1111828241e+00    9.8576744177e+00    9.9975823800e+00    9.9999612476e+00    
+9.9999993995e+00    9.9999999910e+00    9.9999999999e+00    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    0.0000000000e+00    6.1110191468e+00    9.8576550530e+00    9.9975818995e+00    
+9.9999612373e+00    9.9999993993e+00    9.9999999910e+00    9.9999999999e+00    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    6.1108554737e+00    9.8576356828e+00    
+9.9975814188e+00    9.9999612270e+00    9.9999993990e+00    9.9999999910e+00    9.9999999999e+00    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    6.1108554649e+00    
+9.8576356771e+00    9.9975814186e+00    9.9999612270e+00    9.9999993990e+00    9.9999999910e+00    
+9.9999999999e+00    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    
+6.1108554649e+00    9.8576356771e+00    9.9975814186e+00    9.9999612270e+00    9.9999993990e+00    
+9.9999999910e+00    9.9999999999e+00    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+0.0000000000e+00    6.1108554648e+00    9.8576356771e+00    9.9975814186e+00    9.9999612270e+00    
+9.9999993990e+00    9.9999999910e+00    9.9999999999e+00    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    0.0000000000e+00    6.1108554648e+00    9.8576356771e+00    9.9975814186e+00    
+9.9999612270e+00    9.9999993990e+00    9.9999999910e+00    9.9999999999e+00    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    6.1108554648e+00    9.8576356771e+00    
+9.9975814186e+00    9.9999612270e+00    9.9999993990e+00    9.9999999910e+00    9.9999999999e+00    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    6.1108554648e+00    
+9.8576356771e+00    9.9975814186e+00    9.9999612270e+00    9.9999993990e+00    9.9999999910e+00    
+9.9999999999e+00    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    
+6.1108554648e+00    9.8576356771e+00    9.9975814186e+00    9.9999612270e+00    9.9999993990e+00    
+9.9999999910e+00    9.9999999999e+00    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+0.0000000000e+00    6.1108554648e+00    9.8576356771e+00    9.9975814186e+00    9.9999612270e+00    
+9.9999993990e+00    9.9999999910e+00    9.9999999999e+00    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    0.0000000000e+00    6.1108554648e+00    9.8576356771e+00    9.9975814186e+00    
+9.9999612270e+00    9.9999993990e+00    9.9999999910e+00    9.9999999999e+00    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    6.1108554648e+00    9.8576356771e+00    
+9.9975814186e+00    9.9999612270e+00    9.9999993990e+00    9.9999999910e+00    9.9999999999e+00    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    6.1108554648e+00    
+9.8576356771e+00    9.9975814186e+00    9.9999612270e+00    9.9999993990e+00    9.9999999910e+00    
+9.9999999999e+00    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    
+6.1108554649e+00    9.8576356771e+00    9.9975814186e+00    9.9999612270e+00    9.9999993990e+00    
+9.9999999910e+00    9.9999999999e+00    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+0.0000000000e+00    6.1108554649e+00    9.8576356771e+00    9.9975814186e+00    9.9999612270e+00    
+9.9999993990e+00    9.9999999910e+00    9.9999999999e+00    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    0.0000000000e+00    6.1108554737e+00    9.8576356828e+00    9.9975814188e+00    
+9.9999612270e+00    9.9999993990e+00    9.9999999910e+00    9.9999999999e+00    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    6.1110191468e+00    9.8576550530e+00    
+9.9975818995e+00    9.9999612373e+00    9.9999993993e+00    9.9999999910e+00    9.9999999999e+00    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    6.1111828241e+00    
+9.8576744177e+00    9.9975823800e+00    9.9999612476e+00    9.9999993995e+00    9.9999999910e+00    
+9.9999999999e+00    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+4.5749741240e-02    2.3280335989e-02    4.1243004523e-04    7.0826869884e-06    1.2013190886e-07    
+2.0095317543e-09    3.3010962236e-11    5.3016640557e-13    8.3396831108e-15    1.9081958236e-16    
+5.7245874707e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+1.8865117801e-17    4.5753548866e-02    2.3282295840e-02    4.1248738747e-04    7.0840958931e-06    
+1.2016383910e-07    2.0102160735e-09    3.3024962539e-11    5.3045523703e-13    8.3618008351e-15    
+1.7954387976e-16    4.5970172113e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    1.7347234760e-17    4.5757357652e-02    2.3284256293e-02    4.1254475377e-04    
+7.0855056012e-06    1.2019579288e-07    2.0109010258e-09    3.3038996235e-11    5.3074406849e-13    
+8.3728596972e-15    1.5720931501e-16    2.3635607360e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    4.5757358812e-02    2.3284256896e-02    
+4.1254477782e-04    7.0855064048e-06    1.2019581640e-07    2.0109016477e-09    3.3039029845e-11    
+5.3075534419e-13    8.3839185594e-15    1.5720931501e-16    1.2576745201e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    4.5757358812e-02    
+2.3284256896e-02    4.1254477782e-04    7.0855064050e-06    1.2019581641e-07    2.0109016366e-09    
+3.3039029845e-11    5.3076640305e-13    8.3949774216e-15    1.6826817717e-16    2.3635607360e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    
+4.5757358812e-02    2.3284256896e-02    4.1254477782e-04    7.0855064049e-06    1.2019581642e-07    
+2.0109016587e-09    3.3039029845e-11    5.3076640305e-13    8.3839185594e-15    1.6826817717e-16    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+1.7347234760e-17    4.5757358812e-02    2.3284256896e-02    4.1254477781e-04    7.0855064047e-06    
+1.2019581641e-07    2.0109016808e-09    3.3039029845e-11    5.3076640305e-13    8.4060362837e-15    
+1.7932703933e-16    2.3635607360e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    1.7347234760e-17    4.5757358813e-02    2.3284256896e-02    4.1254477781e-04    
+7.0855064046e-06    1.2019581641e-07    2.0109016808e-09    3.3039029845e-11    5.3076640305e-13    
+8.4060362837e-15    1.6826817717e-16    1.2576745201e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    4.5757358813e-02    2.3284256895e-02    
+4.1254477781e-04    7.0855064046e-06    1.2019581641e-07    2.0109016808e-09    3.3039029845e-11    
+5.3076640305e-13    8.3949774216e-15    1.6826817717e-16    2.3635607360e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    4.5757358813e-02    
+2.3284256895e-02    4.1254477781e-04    7.0855064045e-06    1.2019581640e-07    2.0109016808e-09    
+3.3039029845e-11    5.3076640305e-13    8.4060362837e-15    1.9038590149e-16    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    
+4.5757358814e-02    2.3284256895e-02    4.1254477781e-04    7.0855064046e-06    1.2019581641e-07    
+2.0109016808e-09    3.3039029845e-11    5.3076640305e-13    8.3949774216e-15    1.6826817717e-16    
+2.3635607360e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+1.7347234760e-17    4.5757358814e-02    2.3284256896e-02    4.1254477781e-04    7.0855064046e-06    
+1.2019581641e-07    2.0109016808e-09    3.3039029845e-11    5.3076640305e-13    8.4060362837e-15    
+1.6826817717e-16    1.2576745201e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    1.7347234760e-17    4.5757358815e-02    2.3284256896e-02    4.1254477781e-04    
+7.0855064047e-06    1.2019581641e-07    2.0109016808e-09    3.3039029845e-11    5.3076640305e-13    
+8.4060362837e-15    1.7932703933e-16    2.3635607360e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    4.5757358815e-02    2.3284256896e-02    
+4.1254477782e-04    7.0855064049e-06    1.2019581642e-07    2.0109016587e-09    3.3039029845e-11    
+5.3076640305e-13    8.3839185594e-15    1.6826817717e-16    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    4.5757358816e-02    
+2.3284256896e-02    4.1254477782e-04    7.0855064050e-06    1.2019581641e-07    2.0109016366e-09    
+3.3039029845e-11    5.3076640305e-13    8.3949774216e-15    1.6826817717e-16    2.3635607360e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    
+4.5757358816e-02    2.3284256896e-02    4.1254477782e-04    7.0855064048e-06    1.2019581640e-07    
+2.0109016477e-09    3.3039029845e-11    5.3075534419e-13    8.3839185594e-15    1.5720931501e-16    
+1.2576745201e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+1.7347234760e-17    4.5757357657e-02    2.3284256293e-02    4.1254475377e-04    7.0855056012e-06    
+1.2019579288e-07    2.0109010258e-09    3.3038996235e-11    5.3074406849e-13    8.3728596972e-15    
+1.5720931501e-16    2.3635607360e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    1.7347234760e-17    4.5753548582e-02    2.3282295840e-02    4.1248738747e-04    
+7.0840958931e-06    1.2016383910e-07    2.0102160735e-09    3.3024962539e-11    5.3045523703e-13    
+8.3618008351e-15    1.7954387976e-16    4.5970172113e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    4.5749740666e-02    2.3280335989e-02    
+4.1243004523e-04    7.0826869884e-06    1.2013190886e-07    2.0095317543e-09    3.3010962236e-11    
+5.3016640557e-13    8.3396831108e-15    1.9081958236e-16    5.7245874707e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    1.8865117801e-17    
+zone T = "Zone0 OUTFLOW"
+I = 1
+J = 81
+K = 19
+f = BLOCK
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0004169117e+00    1.0008752246e+00    1.0013790501e+00    1.0019329078e+00    
+1.0025417660e+00    1.0032110867e+00    1.0039468739e+00    1.0047557282e+00    1.0056449054e+00    
+1.0066223819e+00    1.0076969263e+00    1.0088781778e+00    1.0101767331e+00    1.0116042407e+00    
+1.0131735064e+00    1.0148986073e+00    1.0167950186e+00    1.0188797522e+00    1.0211715093e+00    
+1.0236908484e+00    1.0264603693e+00    1.0295049162e+00    1.0328518006e+00    1.0365310458e+00    
+1.0405756568e+00    1.0450219161e+00    1.0499097092e+00    1.0552828825e+00    1.0611896363e+00    
+1.0676829577e+00    1.0748210955e+00    1.0826680830e+00    1.0912943120e+00    1.1007771649e+00    
+1.1112017083e+00    1.1226614564e+00    1.1352592097e+00    1.1491079772e+00    1.1643319905e+00    
+1.1810678177e+00    1.1978036449e+00    1.2145394721e+00    1.2312752993e+00    1.2480111265e+00    
+1.2647469537e+00    1.2814827809e+00    1.2982186081e+00    1.3149544353e+00    1.3316902625e+00    
+1.3484260897e+00    1.3651619169e+00    1.3818977441e+00    1.3986335712e+00    1.4153693984e+00    
+1.4321052256e+00    1.4488410528e+00    1.4655768800e+00    1.4823127072e+00    1.4990485344e+00    
+1.5157843616e+00    1.5325201888e+00    1.5492560160e+00    1.5659918432e+00    1.5827276704e+00    
+1.5994634976e+00    1.6161993248e+00    1.6329351520e+00    1.6496709792e+00    1.6664068064e+00    
+1.6831426336e+00    1.6998784607e+00    1.7166142879e+00    1.7333501151e+00    1.7500859423e+00    
+1.7668217695e+00    1.7835575967e+00    1.8002934239e+00    1.8170292511e+00    1.8337650783e+00    
+1.8505009055e+00    9.8480775301e-01    9.8521833089e-01    9.8566968101e-01    9.8616585227e-01    
+9.8671129558e-01    9.8731090391e-01    9.8797005607e-01    9.8869466505e-01    9.8949123100e-01    
+9.9036689958e-01    9.9132952605e-01    9.9238774570e-01    9.9355105139e-01    9.9482987863e-01    
+9.9623569925e-01    9.9778112426e-01    9.9948001702e-01    1.0013476176e+00    1.0034006794e+00    
+1.0056576195e+00    1.0081386842e+00    1.0108661298e+00    1.0138644233e+00    1.0171604609e+00    
+1.0207838101e+00    1.0247669744e+00    1.0291456850e+00    1.0339592216e+00    1.0392507643e+00    
+1.0450677812e+00    1.0514624545e+00    1.0584921480e+00    1.0662199221e+00    1.0747150993e+00    
+1.0840538864e+00    1.0943200575e+00    1.1056057063e+00    1.1180120713e+00    1.1316504450e+00    
+1.1466431714e+00    1.1631247437e+00    1.1796063161e+00    1.1960878885e+00    1.2125694608e+00    
+1.2290510332e+00    1.2455326056e+00    1.2620141780e+00    1.2784957503e+00    1.2949773227e+00    
+1.3114588951e+00    1.3279404675e+00    1.3444220398e+00    1.3609036122e+00    1.3773851846e+00    
+1.3938667570e+00    1.4103483293e+00    1.4268299017e+00    1.4433114741e+00    1.4597930465e+00    
+1.4762746188e+00    1.4927561912e+00    1.5092377636e+00    1.5257193360e+00    1.5422009083e+00    
+1.5586824807e+00    1.5751640531e+00    1.5916456255e+00    1.6081271978e+00    1.6246087702e+00    
+1.6410903426e+00    1.6575719149e+00    1.6740534873e+00    1.6905350597e+00    1.7070166321e+00    
+1.7234982044e+00    1.7399797768e+00    1.7564613492e+00    1.7729429216e+00    1.7894244939e+00    
+1.8059060663e+00    1.8223876387e+00    9.3969262079e-01    9.4008438963e-01    9.4051506291e-01    
+9.4098850401e-01    9.4150895997e-01    9.4208109957e-01    9.4271005525e-01    9.4340146909e-01    
+9.4416154347e-01    9.4499709671e-01    9.4591562418e-01    9.4692536563e-01    9.4803537900e-01    
+9.4925562175e-01    9.5059704017e-01    9.5207166755e-01    9.5369273215e-01    9.5547477586e-01    
+9.5743378462e-01    9.5958733188e-01    9.6195473619e-01    9.6455723455e-01    9.6741817285e-01    
+9.7056321535e-01    9.7402057491e-01    9.7782126603e-01    9.8199938310e-01    9.8659240623e-01    
+9.9164153749e-01    9.9719207049e-01    1.0032937967e+00    1.0100014521e+00    1.0173752083e+00    
+1.0254812121e+00    1.0343921790e+00    1.0441880455e+00    1.0549566862e+00    1.0667947020e+00    
+1.0798082867e+00    1.0941141796e+00    1.1098407130e+00    1.1255672463e+00    1.1412937796e+00    
+1.1570203129e+00    1.1727468462e+00    1.1884733795e+00    1.2041999129e+00    1.2199264462e+00    
+1.2356529795e+00    1.2513795128e+00    1.2671060461e+00    1.2828325794e+00    1.2985591128e+00    
+1.3142856461e+00    1.3300121794e+00    1.3457387127e+00    1.3614652460e+00    1.3771917794e+00    
+1.3929183127e+00    1.4086448460e+00    1.4243713793e+00    1.4400979126e+00    1.4558244459e+00    
+1.4715509793e+00    1.4872775126e+00    1.5030040459e+00    1.5187305792e+00    1.5344571125e+00    
+1.5501836458e+00    1.5659101792e+00    1.5816367125e+00    1.5973632458e+00    1.6130897791e+00    
+1.6288163124e+00    1.6445428457e+00    1.6602693791e+00    1.6759959124e+00    1.6917224457e+00    
+1.7074489790e+00    1.7231755123e+00    1.7389020457e+00    8.6602540378e-01    8.6638645991e-01    
+8.6678337055e-01    8.6721969622e-01    8.6769935103e-01    8.6822663774e-01    8.6880628643e-01    
+8.6944349687e-01    8.7014398521e-01    8.7091403524e-01    8.7176055474e-01    8.7269113749e-01    
+8.7371413134e-01    8.7483871315e-01    8.7607497105e-01    8.7743399500e-01    8.7892797621e-01    
+8.8057031657e-01    8.8237574881e-01    8.8436046870e-01    8.8654228032e-01    8.8894075578e-01    
+8.9157741078e-01    8.9447589763e-01    8.9766221744e-01    9.0116495332e-01    9.0501552684e-01    
+9.0924847985e-01    9.1390178439e-01    9.1901718327e-01    9.2464056457e-01    9.3082237326e-01    
+9.3761806372e-01    9.4508859722e-01    9.5330098872e-01    9.6232890813e-01    9.7225334108e-01    
+9.8316331544e-01    9.9515669997e-01    1.0083410822e+00    1.0228347337e+00    1.0373283852e+00    
+1.0518220367e+00    1.0663156882e+00    1.0808093398e+00    1.0953029913e+00    1.1097966428e+00    
+1.1242902943e+00    1.1387839458e+00    1.1532775973e+00    1.1677712488e+00    1.1822649003e+00    
+1.1967585518e+00    1.2112522033e+00    1.2257458548e+00    1.2402395063e+00    1.2547331578e+00    
+1.2692268093e+00    1.2837204608e+00    1.2982141123e+00    1.3127077638e+00    1.3272014153e+00    
+1.3416950668e+00    1.3561887183e+00    1.3706823698e+00    1.3851760213e+00    1.3996696728e+00    
+1.4141633243e+00    1.4286569758e+00    1.4431506273e+00    1.4576442788e+00    1.4721379304e+00    
+1.4866315819e+00    1.5011252334e+00    1.5156188849e+00    1.5301125364e+00    1.5446061879e+00    
+1.5590998394e+00    1.5735934909e+00    1.5880871424e+00    1.6025807939e+00    7.6604444312e-01    
+7.6636381601e-01    7.6671490408e-01    7.6710085680e-01    7.6752513639e-01    7.6799154887e-01    
+7.6850427823e-01    7.6906792396e-01    7.6968754227e-01    7.7036869151e-01    7.7111748197e-01    
+7.7194063074e-01    7.7284552192e-01    7.7384027293e-01    7.7493380725e-01    7.7613593450e-01    
+7.7745743847e-01    7.7891017381e-01    7.8050717239e-01    7.8226276020e-01    7.8419268588e-01    
+7.8631426197e-01    7.8864652024e-01    7.9121038239e-01    7.9402884772e-01    7.9712719951e-01    
+8.0053323175e-01    8.0427749851e-01    8.0839358803e-01    8.1291842399e-01    8.1789259677e-01    
+8.2336072759e-01    8.2937186871e-01    8.3597994353e-01    8.4324423030e-01    8.5122989384e-01    
+8.6000857017e-01    8.6965900905e-01    8.8026778050e-01    8.9193005129e-01    9.0475043871e-01    
+9.1757082613e-01    9.3039121356e-01    9.4321160098e-01    9.5603198840e-01    9.6885237583e-01    
+9.8167276325e-01    9.9449315067e-01    1.0073135381e+00    1.0201339255e+00    1.0329543129e+00    
+1.0457747004e+00    1.0585950878e+00    1.0714154752e+00    1.0842358626e+00    1.0970562501e+00    
+1.1098766375e+00    1.1226970249e+00    1.1355174123e+00    1.1483377998e+00    1.1611581872e+00    
+1.1739785746e+00    1.1867989620e+00    1.1996193494e+00    1.2124397369e+00    1.2252601243e+00    
+1.2380805117e+00    1.2509008991e+00    1.2637212866e+00    1.2765416740e+00    1.2893620614e+00    
+1.3021824488e+00    1.3150028363e+00    1.3278232237e+00    1.3406436111e+00    1.3534639985e+00    
+1.3662843859e+00    1.3791047734e+00    1.3919251608e+00    1.4047455482e+00    1.4175659356e+00    
+6.4278760969e-01    6.4305559536e-01    6.4335019323e-01    6.4367404602e-01    6.4403005886e-01    
+6.4442142540e-01    6.4485165642e-01    6.4532461134e-01    6.4584453284e-01    6.4641608492e-01    
+6.4704439472e-01    6.4773509854e-01    6.4849439240e-01    6.4932908761e-01    6.5024667185e-01    
+6.5125537639e-01    6.5236424988e-01    6.5358323956e-01    6.5492328048e-01    6.5639639357e-01    
+6.5801579349e-01    6.5979600721e-01    6.6175300426e-01    6.6390434004e-01    6.6626931327e-01    
+6.6886913911e-01    6.7172713951e-01    6.7486895237e-01    6.7832276156e-01    6.8211954974e-01    
+6.8629337630e-01    6.9088168284e-01    6.9592562914e-01    7.0147046229e-01    7.0756592264e-01    
+7.1426668997e-01    7.2163287404e-01    7.2973055375e-01    7.3863236995e-01    7.4841817707e-01    
+7.5917575943e-01    7.6993334179e-01    7.8069092415e-01    7.9144850651e-01    8.0220608886e-01    
+8.1296367122e-01    8.2372125358e-01    8.3447883594e-01    8.4523641830e-01    8.5599400066e-01    
+8.6675158301e-01    8.7750916537e-01    8.8826674773e-01    8.9902433009e-01    9.0978191245e-01    
+9.2053949481e-01    9.3129707716e-01    9.4205465952e-01    9.5281224188e-01    9.6356982424e-01    
+9.7432740660e-01    9.8508498896e-01    9.9584257131e-01    1.0066001537e+00    1.0173577360e+00    
+1.0281153184e+00    1.0388729007e+00    1.0496304831e+00    1.0603880655e+00    1.0711456478e+00    
+1.0819032302e+00    1.0926608125e+00    1.1034183949e+00    1.1141759773e+00    1.1249335596e+00    
+1.1356911420e+00    1.1464487243e+00    1.1572063067e+00    1.1679638890e+00    1.1787214714e+00    
+1.1894790538e+00    5.0000000000e-01    5.0020845585e-01    5.0043761232e-01    5.0068952506e-01    
+5.0096645389e-01    5.0127088302e-01    5.0160554334e-01    5.0197343696e-01    5.0237786409e-01    
+5.0282245268e-01    5.0331119095e-01    5.0384846315e-01    5.0443908892e-01    5.0508836653e-01    
+5.0580212037e-01    5.0658675321e-01    5.0744930366e-01    5.0839750931e-01    5.0943987610e-01    
+5.1058575467e-01    5.1184542419e-01    5.1323018464e-01    5.1475245812e-01    5.1642590028e-01    
+5.1826552288e-01    5.2028782838e-01    5.2251095804e-01    5.2495485460e-01    5.2764144123e-01    
+5.3059481815e-01    5.3384147886e-01    5.3741054777e-01    5.4133404149e-01    5.4564715601e-01    
+5.5038858246e-01    5.5560085416e-01    5.6133072819e-01    5.6762960483e-01    5.7455398861e-01    
+5.8216599526e-01    5.9053390886e-01    5.9890182246e-01    6.0726973605e-01    6.1563764965e-01    
+6.2400556325e-01    6.3237347685e-01    6.4074139044e-01    6.4910930404e-01    6.5747721764e-01    
+6.6584513123e-01    6.7421304483e-01    6.8258095843e-01    6.9094887203e-01    6.9931678562e-01    
+7.0768469922e-01    7.1605261282e-01    7.2442052642e-01    7.3278844001e-01    7.4115635361e-01    
+7.4952426721e-01    7.5789218080e-01    7.6626009440e-01    7.7462800800e-01    7.8299592160e-01    
+7.9136383519e-01    7.9973174879e-01    8.0809966239e-01    8.1646757598e-01    8.2483548958e-01    
+8.3320340318e-01    8.4157131678e-01    8.4993923037e-01    8.5830714397e-01    8.6667505757e-01    
+8.7504297116e-01    8.8341088476e-01    8.9177879836e-01    9.0014671196e-01    9.0851462555e-01    
+9.1688253915e-01    9.2525045275e-01    3.4202014333e-01    3.4216273552e-01    3.4231948778e-01    
+3.4249180625e-01    3.4268123672e-01    3.4288947851e-01    3.4311839965e-01    3.4337005371e-01    
+3.4364669816e-01    3.4395081467e-01    3.4428513133e-01    3.4465264716e-01    3.4505665899e-01    
+3.4550079103e-01    3.4598902740e-01    3.4652574788e-01    3.4711576714e-01    3.4776437800e-01    
+3.4847739888e-01    3.4926122598e-01    3.5012289069e-01    3.5107012262e-01    3.5211141900e-01    
+3.5325612086e-01    3.5451449683e-01    3.5589783527e-01    3.5741854552e-01    3.5909026922e-01    
+3.6092800271e-01    3.6294823150e-01    3.6516907823e-01    3.6761046515e-01    3.7029429291e-01    
+3.7324463701e-01    3.7648796371e-01    3.8005336754e-01    3.8397283222e-01    3.8828151760e-01    
+3.9301807507e-01    3.9822499428e-01    4.0394898429e-01    4.0967297431e-01    4.1539696433e-01    
+4.2112095434e-01    4.2684494436e-01    4.3256893437e-01    4.3829292439e-01    4.4401691440e-01    
+4.4974090442e-01    4.5546489444e-01    4.6118888445e-01    4.6691287447e-01    4.7263686448e-01    
+4.7836085450e-01    4.8408484451e-01    4.8980883453e-01    4.9553282455e-01    5.0125681456e-01    
+5.0698080458e-01    5.1270479459e-01    5.1842878461e-01    5.2415277462e-01    5.2987676464e-01    
+5.3560075465e-01    5.4132474467e-01    5.4704873469e-01    5.5277272470e-01    5.5849671472e-01    
+5.6422070473e-01    5.6994469475e-01    5.7566868476e-01    5.8139267478e-01    5.8711666480e-01    
+5.9284065481e-01    5.9856464483e-01    6.0428863484e-01    6.1001262486e-01    6.1573661487e-01    
+6.2146060489e-01    6.2718459491e-01    6.3290858492e-01    1.7364817767e-01    1.7372057362e-01    
+1.7380015883e-01    1.7388764721e-01    1.7398382358e-01    1.7408955071e-01    1.7420577702e-01    
+1.7433354513e-01    1.7447400120e-01    1.7462840520e-01    1.7479814221e-01    1.7498473489e-01    
+1.7518985707e-01    1.7541534882e-01    1.7566323292e-01    1.7593573305e-01    1.7623529368e-01    
+1.7656460205e-01    1.7692661223e-01    1.7732457168e-01    1.7776205032e-01    1.7824297257e-01    
+1.7877165260e-01    1.7935283297e-01    1.7999172719e-01    1.8069406652e-01    1.8146615135e-01    
+1.8231490772e-01    1.8324794946e-01    1.8427364650e-01    1.8540119993e-01    1.8664072456e-01    
+1.8800333963e-01    1.8950126858e-01    1.9114794871e-01    1.9295815167e-01    1.9494811604e-01    
+1.9713569294e-01    1.9954050619e-01    2.0218412835e-01    2.0509027425e-01    2.0799642014e-01    
+2.1090256604e-01    2.1380871193e-01    2.1671485782e-01    2.1962100372e-01    2.2252714961e-01    
+2.2543329551e-01    2.2833944140e-01    2.3124558729e-01    2.3415173319e-01    2.3705787908e-01    
+2.3996402498e-01    2.4287017087e-01    2.4577631676e-01    2.4868246266e-01    2.5158860855e-01    
+2.5449475445e-01    2.5740090034e-01    2.6030704624e-01    2.6321319213e-01    2.6611933802e-01    
+2.6902548392e-01    2.7193162981e-01    2.7483777571e-01    2.7774392160e-01    2.8065006749e-01    
+2.8355621339e-01    2.8646235928e-01    2.8936850518e-01    2.9227465107e-01    2.9518079696e-01    
+2.9808694286e-01    3.0099308875e-01    3.0389923465e-01    3.0680538054e-01    3.0971152643e-01    
+3.1261767233e-01    3.1552381822e-01    3.1842996412e-01    3.2133611001e-01    6.1230317691e-17    
+6.1255845327e-17    6.1283907973e-17    6.1314757368e-17    6.1348670249e-17    6.1385950833e-17    
+6.1426933549e-17    6.1471986035e-17    6.1521512439e-17    6.1575957040e-17    6.1635808238e-17    
+6.1701602933e-17    6.1773931341e-17    6.1853442290e-17    6.1940849038e-17    6.2036935674e-17    
+6.2142564151e-17    6.2258682017e-17    6.2386330917e-17    6.2526655934e-17    6.2680915864e-17    
+6.2850494509e-17    6.3036913085e-17    6.3241843876e-17    6.3467125228e-17    6.3714778046e-17    
+6.3987023916e-17    6.4286305042e-17    6.4615306147e-17    6.4976978561e-17    6.5374566695e-17    
+6.5811637141e-17    6.6292110675e-17    6.6820297420e-17    6.7400935515e-17    6.8039233619e-17    
+6.8740917634e-17    6.9512282069e-17    7.0360246507e-17    7.1292417678e-17    7.2317157694e-17    
+7.3341897710e-17    7.4366637726e-17    7.5391377742e-17    7.6416117758e-17    7.7440857773e-17    
+7.8465597789e-17    7.9490337805e-17    8.0515077821e-17    8.1539817837e-17    8.2564557853e-17    
+8.3589297869e-17    8.4614037885e-17    8.5638777901e-17    8.6663517917e-17    8.7688257933e-17    
+8.8712997949e-17    8.9737737965e-17    9.0762477981e-17    9.1787217997e-17    9.2811958012e-17    
+9.3836698028e-17    9.4861438044e-17    9.5886178060e-17    9.6910918076e-17    9.7935658092e-17    
+9.8960398108e-17    9.9985138124e-17    1.0100987814e-16    1.0203461816e-16    1.0305935817e-16    
+1.0408409819e-16    1.0510883820e-16    1.0613357822e-16    1.0715831824e-16    1.0818305825e-16    
+1.0920779827e-16    1.1023253828e-16    1.1125727830e-16    1.1228201832e-16    1.1330675833e-16    
+-1.7364817767e-01   -1.7372057362e-01   -1.7380015883e-01   -1.7388764721e-01   -1.7398382358e-01   
+-1.7408955071e-01   -1.7420577702e-01   -1.7433354513e-01   -1.7447400120e-01   -1.7462840520e-01   
+-1.7479814221e-01   -1.7498473489e-01   -1.7518985707e-01   -1.7541534882e-01   -1.7566323292e-01   
+-1.7593573305e-01   -1.7623529368e-01   -1.7656460205e-01   -1.7692661223e-01   -1.7732457168e-01   
+-1.7776205032e-01   -1.7824297257e-01   -1.7877165260e-01   -1.7935283297e-01   -1.7999172719e-01   
+-1.8069406652e-01   -1.8146615135e-01   -1.8231490772e-01   -1.8324794946e-01   -1.8427364650e-01   
+-1.8540119993e-01   -1.8664072456e-01   -1.8800333963e-01   -1.8950126858e-01   -1.9114794871e-01   
+-1.9295815167e-01   -1.9494811604e-01   -1.9713569294e-01   -1.9954050619e-01   -2.0218412835e-01   
+-2.0509027425e-01   -2.0799642014e-01   -2.1090256604e-01   -2.1380871193e-01   -2.1671485782e-01   
+-2.1962100372e-01   -2.2252714961e-01   -2.2543329551e-01   -2.2833944140e-01   -2.3124558729e-01   
+-2.3415173319e-01   -2.3705787908e-01   -2.3996402498e-01   -2.4287017087e-01   -2.4577631676e-01   
+-2.4868246266e-01   -2.5158860855e-01   -2.5449475445e-01   -2.5740090034e-01   -2.6030704624e-01   
+-2.6321319213e-01   -2.6611933802e-01   -2.6902548392e-01   -2.7193162981e-01   -2.7483777571e-01   
+-2.7774392160e-01   -2.8065006749e-01   -2.8355621339e-01   -2.8646235928e-01   -2.8936850518e-01   
+-2.9227465107e-01   -2.9518079696e-01   -2.9808694286e-01   -3.0099308875e-01   -3.0389923465e-01   
+-3.0680538054e-01   -3.0971152643e-01   -3.1261767233e-01   -3.1552381822e-01   -3.1842996412e-01   
+-3.2133611001e-01   -3.4202014333e-01   -3.4216273552e-01   -3.4231948778e-01   -3.4249180625e-01   
+-3.4268123672e-01   -3.4288947851e-01   -3.4311839965e-01   -3.4337005371e-01   -3.4364669816e-01   
+-3.4395081467e-01   -3.4428513133e-01   -3.4465264716e-01   -3.4505665899e-01   -3.4550079103e-01   
+-3.4598902740e-01   -3.4652574788e-01   -3.4711576714e-01   -3.4776437800e-01   -3.4847739888e-01   
+-3.4926122598e-01   -3.5012289069e-01   -3.5107012262e-01   -3.5211141900e-01   -3.5325612086e-01   
+-3.5451449683e-01   -3.5589783527e-01   -3.5741854552e-01   -3.5909026922e-01   -3.6092800271e-01   
+-3.6294823150e-01   -3.6516907823e-01   -3.6761046515e-01   -3.7029429291e-01   -3.7324463701e-01   
+-3.7648796371e-01   -3.8005336754e-01   -3.8397283222e-01   -3.8828151760e-01   -3.9301807507e-01   
+-3.9822499428e-01   -4.0394898429e-01   -4.0967297431e-01   -4.1539696433e-01   -4.2112095434e-01   
+-4.2684494436e-01   -4.3256893437e-01   -4.3829292439e-01   -4.4401691440e-01   -4.4974090442e-01   
+-4.5546489444e-01   -4.6118888445e-01   -4.6691287447e-01   -4.7263686448e-01   -4.7836085450e-01   
+-4.8408484451e-01   -4.8980883453e-01   -4.9553282455e-01   -5.0125681456e-01   -5.0698080458e-01   
+-5.1270479459e-01   -5.1842878461e-01   -5.2415277462e-01   -5.2987676464e-01   -5.3560075465e-01   
+-5.4132474467e-01   -5.4704873469e-01   -5.5277272470e-01   -5.5849671472e-01   -5.6422070473e-01   
+-5.6994469475e-01   -5.7566868476e-01   -5.8139267478e-01   -5.8711666480e-01   -5.9284065481e-01   
+-5.9856464483e-01   -6.0428863484e-01   -6.1001262486e-01   -6.1573661487e-01   -6.2146060489e-01   
+-6.2718459491e-01   -6.3290858492e-01   -5.0000000000e-01   -5.0020845585e-01   -5.0043761232e-01   
+-5.0068952506e-01   -5.0096645389e-01   -5.0127088302e-01   -5.0160554334e-01   -5.0197343696e-01   
+-5.0237786409e-01   -5.0282245268e-01   -5.0331119095e-01   -5.0384846315e-01   -5.0443908892e-01   
+-5.0508836653e-01   -5.0580212037e-01   -5.0658675321e-01   -5.0744930366e-01   -5.0839750931e-01   
+-5.0943987610e-01   -5.1058575467e-01   -5.1184542419e-01   -5.1323018464e-01   -5.1475245812e-01   
+-5.1642590028e-01   -5.1826552288e-01   -5.2028782838e-01   -5.2251095804e-01   -5.2495485460e-01   
+-5.2764144123e-01   -5.3059481815e-01   -5.3384147886e-01   -5.3741054777e-01   -5.4133404149e-01   
+-5.4564715601e-01   -5.5038858246e-01   -5.5560085416e-01   -5.6133072819e-01   -5.6762960483e-01   
+-5.7455398861e-01   -5.8216599526e-01   -5.9053390886e-01   -5.9890182246e-01   -6.0726973605e-01   
+-6.1563764965e-01   -6.2400556325e-01   -6.3237347685e-01   -6.4074139044e-01   -6.4910930404e-01   
+-6.5747721764e-01   -6.6584513123e-01   -6.7421304483e-01   -6.8258095843e-01   -6.9094887203e-01   
+-6.9931678562e-01   -7.0768469922e-01   -7.1605261282e-01   -7.2442052642e-01   -7.3278844001e-01   
+-7.4115635361e-01   -7.4952426721e-01   -7.5789218080e-01   -7.6626009440e-01   -7.7462800800e-01   
+-7.8299592160e-01   -7.9136383519e-01   -7.9973174879e-01   -8.0809966239e-01   -8.1646757598e-01   
+-8.2483548958e-01   -8.3320340318e-01   -8.4157131678e-01   -8.4993923037e-01   -8.5830714397e-01   
+-8.6667505757e-01   -8.7504297116e-01   -8.8341088476e-01   -8.9177879836e-01   -9.0014671196e-01   
+-9.0851462555e-01   -9.1688253915e-01   -9.2525045275e-01   -6.4278760969e-01   -6.4305559536e-01   
+-6.4335019323e-01   -6.4367404602e-01   -6.4403005886e-01   -6.4442142540e-01   -6.4485165642e-01   
+-6.4532461134e-01   -6.4584453284e-01   -6.4641608492e-01   -6.4704439472e-01   -6.4773509854e-01   
+-6.4849439240e-01   -6.4932908761e-01   -6.5024667185e-01   -6.5125537639e-01   -6.5236424988e-01   
+-6.5358323956e-01   -6.5492328048e-01   -6.5639639357e-01   -6.5801579349e-01   -6.5979600721e-01   
+-6.6175300426e-01   -6.6390434004e-01   -6.6626931327e-01   -6.6886913911e-01   -6.7172713951e-01   
+-6.7486895237e-01   -6.7832276156e-01   -6.8211954974e-01   -6.8629337630e-01   -6.9088168284e-01   
+-6.9592562914e-01   -7.0147046229e-01   -7.0756592264e-01   -7.1426668997e-01   -7.2163287404e-01   
+-7.2973055375e-01   -7.3863236995e-01   -7.4841817707e-01   -7.5917575943e-01   -7.6993334179e-01   
+-7.8069092415e-01   -7.9144850651e-01   -8.0220608886e-01   -8.1296367122e-01   -8.2372125358e-01   
+-8.3447883594e-01   -8.4523641830e-01   -8.5599400066e-01   -8.6675158301e-01   -8.7750916537e-01   
+-8.8826674773e-01   -8.9902433009e-01   -9.0978191245e-01   -9.2053949481e-01   -9.3129707716e-01   
+-9.4205465952e-01   -9.5281224188e-01   -9.6356982424e-01   -9.7432740660e-01   -9.8508498896e-01   
+-9.9584257131e-01   -1.0066001537e+00   -1.0173577360e+00   -1.0281153184e+00   -1.0388729007e+00   
+-1.0496304831e+00   -1.0603880655e+00   -1.0711456478e+00   -1.0819032302e+00   -1.0926608125e+00   
+-1.1034183949e+00   -1.1141759773e+00   -1.1249335596e+00   -1.1356911420e+00   -1.1464487243e+00   
+-1.1572063067e+00   -1.1679638890e+00   -1.1787214714e+00   -1.1894790538e+00   -7.6604444312e-01   
+-7.6636381601e-01   -7.6671490408e-01   -7.6710085680e-01   -7.6752513639e-01   -7.6799154887e-01   
+-7.6850427823e-01   -7.6906792396e-01   -7.6968754227e-01   -7.7036869151e-01   -7.7111748197e-01   
+-7.7194063074e-01   -7.7284552192e-01   -7.7384027293e-01   -7.7493380725e-01   -7.7613593450e-01   
+-7.7745743847e-01   -7.7891017381e-01   -7.8050717239e-01   -7.8226276020e-01   -7.8419268588e-01   
+-7.8631426197e-01   -7.8864652024e-01   -7.9121038239e-01   -7.9402884772e-01   -7.9712719951e-01   
+-8.0053323175e-01   -8.0427749851e-01   -8.0839358803e-01   -8.1291842399e-01   -8.1789259677e-01   
+-8.2336072759e-01   -8.2937186871e-01   -8.3597994353e-01   -8.4324423030e-01   -8.5122989384e-01   
+-8.6000857017e-01   -8.6965900905e-01   -8.8026778050e-01   -8.9193005129e-01   -9.0475043871e-01   
+-9.1757082613e-01   -9.3039121356e-01   -9.4321160098e-01   -9.5603198840e-01   -9.6885237583e-01   
+-9.8167276325e-01   -9.9449315067e-01   -1.0073135381e+00   -1.0201339255e+00   -1.0329543129e+00   
+-1.0457747004e+00   -1.0585950878e+00   -1.0714154752e+00   -1.0842358626e+00   -1.0970562501e+00   
+-1.1098766375e+00   -1.1226970249e+00   -1.1355174123e+00   -1.1483377998e+00   -1.1611581872e+00   
+-1.1739785746e+00   -1.1867989620e+00   -1.1996193494e+00   -1.2124397369e+00   -1.2252601243e+00   
+-1.2380805117e+00   -1.2509008991e+00   -1.2637212866e+00   -1.2765416740e+00   -1.2893620614e+00   
+-1.3021824488e+00   -1.3150028363e+00   -1.3278232237e+00   -1.3406436111e+00   -1.3534639985e+00   
+-1.3662843859e+00   -1.3791047734e+00   -1.3919251608e+00   -1.4047455482e+00   -1.4175659356e+00   
+-8.6602540378e-01   -8.6638645991e-01   -8.6678337055e-01   -8.6721969622e-01   -8.6769935103e-01   
+-8.6822663774e-01   -8.6880628643e-01   -8.6944349687e-01   -8.7014398521e-01   -8.7091403524e-01   
+-8.7176055474e-01   -8.7269113749e-01   -8.7371413134e-01   -8.7483871315e-01   -8.7607497105e-01   
+-8.7743399500e-01   -8.7892797621e-01   -8.8057031657e-01   -8.8237574881e-01   -8.8436046870e-01   
+-8.8654228032e-01   -8.8894075578e-01   -8.9157741078e-01   -8.9447589763e-01   -8.9766221744e-01   
+-9.0116495332e-01   -9.0501552684e-01   -9.0924847985e-01   -9.1390178439e-01   -9.1901718327e-01   
+-9.2464056457e-01   -9.3082237326e-01   -9.3761806372e-01   -9.4508859722e-01   -9.5330098872e-01   
+-9.6232890813e-01   -9.7225334108e-01   -9.8316331544e-01   -9.9515669997e-01   -1.0083410822e+00   
+-1.0228347337e+00   -1.0373283852e+00   -1.0518220367e+00   -1.0663156882e+00   -1.0808093398e+00   
+-1.0953029913e+00   -1.1097966428e+00   -1.1242902943e+00   -1.1387839458e+00   -1.1532775973e+00   
+-1.1677712488e+00   -1.1822649003e+00   -1.1967585518e+00   -1.2112522033e+00   -1.2257458548e+00   
+-1.2402395063e+00   -1.2547331578e+00   -1.2692268093e+00   -1.2837204608e+00   -1.2982141123e+00   
+-1.3127077638e+00   -1.3272014153e+00   -1.3416950668e+00   -1.3561887183e+00   -1.3706823698e+00   
+-1.3851760213e+00   -1.3996696728e+00   -1.4141633243e+00   -1.4286569758e+00   -1.4431506273e+00   
+-1.4576442788e+00   -1.4721379304e+00   -1.4866315819e+00   -1.5011252334e+00   -1.5156188849e+00   
+-1.5301125364e+00   -1.5446061879e+00   -1.5590998394e+00   -1.5735934909e+00   -1.5880871424e+00   
+-1.6025807939e+00   -9.3969262079e-01   -9.4008438963e-01   -9.4051506291e-01   -9.4098850401e-01   
+-9.4150895997e-01   -9.4208109957e-01   -9.4271005525e-01   -9.4340146909e-01   -9.4416154347e-01   
+-9.4499709671e-01   -9.4591562418e-01   -9.4692536563e-01   -9.4803537900e-01   -9.4925562175e-01   
+-9.5059704017e-01   -9.5207166755e-01   -9.5369273215e-01   -9.5547477586e-01   -9.5743378462e-01   
+-9.5958733188e-01   -9.6195473619e-01   -9.6455723455e-01   -9.6741817285e-01   -9.7056321535e-01   
+-9.7402057491e-01   -9.7782126603e-01   -9.8199938310e-01   -9.8659240623e-01   -9.9164153749e-01   
+-9.9719207049e-01   -1.0032937967e+00   -1.0100014521e+00   -1.0173752083e+00   -1.0254812121e+00   
+-1.0343921790e+00   -1.0441880455e+00   -1.0549566862e+00   -1.0667947020e+00   -1.0798082867e+00   
+-1.0941141796e+00   -1.1098407130e+00   -1.1255672463e+00   -1.1412937796e+00   -1.1570203129e+00   
+-1.1727468462e+00   -1.1884733795e+00   -1.2041999129e+00   -1.2199264462e+00   -1.2356529795e+00   
+-1.2513795128e+00   -1.2671060461e+00   -1.2828325794e+00   -1.2985591128e+00   -1.3142856461e+00   
+-1.3300121794e+00   -1.3457387127e+00   -1.3614652460e+00   -1.3771917794e+00   -1.3929183127e+00   
+-1.4086448460e+00   -1.4243713793e+00   -1.4400979126e+00   -1.4558244459e+00   -1.4715509793e+00   
+-1.4872775126e+00   -1.5030040459e+00   -1.5187305792e+00   -1.5344571125e+00   -1.5501836458e+00   
+-1.5659101792e+00   -1.5816367125e+00   -1.5973632458e+00   -1.6130897791e+00   -1.6288163124e+00   
+-1.6445428457e+00   -1.6602693791e+00   -1.6759959124e+00   -1.6917224457e+00   -1.7074489790e+00   
+-1.7231755123e+00   -1.7389020457e+00   -9.8480775301e-01   -9.8521833089e-01   -9.8566968101e-01   
+-9.8616585227e-01   -9.8671129558e-01   -9.8731090391e-01   -9.8797005607e-01   -9.8869466505e-01   
+-9.8949123100e-01   -9.9036689958e-01   -9.9132952605e-01   -9.9238774570e-01   -9.9355105139e-01   
+-9.9482987863e-01   -9.9623569925e-01   -9.9778112426e-01   -9.9948001702e-01   -1.0013476176e+00   
+-1.0034006794e+00   -1.0056576195e+00   -1.0081386842e+00   -1.0108661298e+00   -1.0138644233e+00   
+-1.0171604609e+00   -1.0207838101e+00   -1.0247669744e+00   -1.0291456850e+00   -1.0339592216e+00   
+-1.0392507643e+00   -1.0450677812e+00   -1.0514624545e+00   -1.0584921480e+00   -1.0662199221e+00   
+-1.0747150993e+00   -1.0840538864e+00   -1.0943200575e+00   -1.1056057063e+00   -1.1180120713e+00   
+-1.1316504450e+00   -1.1466431714e+00   -1.1631247437e+00   -1.1796063161e+00   -1.1960878885e+00   
+-1.2125694608e+00   -1.2290510332e+00   -1.2455326056e+00   -1.2620141780e+00   -1.2784957503e+00   
+-1.2949773227e+00   -1.3114588951e+00   -1.3279404675e+00   -1.3444220398e+00   -1.3609036122e+00   
+-1.3773851846e+00   -1.3938667570e+00   -1.4103483293e+00   -1.4268299017e+00   -1.4433114741e+00   
+-1.4597930465e+00   -1.4762746188e+00   -1.4927561912e+00   -1.5092377636e+00   -1.5257193360e+00   
+-1.5422009083e+00   -1.5586824807e+00   -1.5751640531e+00   -1.5916456255e+00   -1.6081271978e+00   
+-1.6246087702e+00   -1.6410903426e+00   -1.6575719149e+00   -1.6740534873e+00   -1.6905350597e+00   
+-1.7070166321e+00   -1.7234982044e+00   -1.7399797768e+00   -1.7564613492e+00   -1.7729429216e+00   
+-1.7894244939e+00   -1.8059060663e+00   -1.8223876387e+00   -1.0000000000e+00   -1.0004169117e+00   
+-1.0008752246e+00   -1.0013790501e+00   -1.0019329078e+00   -1.0025417660e+00   -1.0032110867e+00   
+-1.0039468739e+00   -1.0047557282e+00   -1.0056449054e+00   -1.0066223819e+00   -1.0076969263e+00   
+-1.0088781778e+00   -1.0101767331e+00   -1.0116042407e+00   -1.0131735064e+00   -1.0148986073e+00   
+-1.0167950186e+00   -1.0188797522e+00   -1.0211715093e+00   -1.0236908484e+00   -1.0264603693e+00   
+-1.0295049162e+00   -1.0328518006e+00   -1.0365310458e+00   -1.0405756568e+00   -1.0450219161e+00   
+-1.0499097092e+00   -1.0552828825e+00   -1.0611896363e+00   -1.0676829577e+00   -1.0748210955e+00   
+-1.0826680830e+00   -1.0912943120e+00   -1.1007771649e+00   -1.1112017083e+00   -1.1226614564e+00   
+-1.1352592097e+00   -1.1491079772e+00   -1.1643319905e+00   -1.1810678177e+00   -1.1978036449e+00   
+-1.2145394721e+00   -1.2312752993e+00   -1.2480111265e+00   -1.2647469537e+00   -1.2814827809e+00   
+-1.2982186081e+00   -1.3149544353e+00   -1.3316902625e+00   -1.3484260897e+00   -1.3651619169e+00   
+-1.3818977441e+00   -1.3986335712e+00   -1.4153693984e+00   -1.4321052256e+00   -1.4488410528e+00   
+-1.4655768800e+00   -1.4823127072e+00   -1.4990485344e+00   -1.5157843616e+00   -1.5325201888e+00   
+-1.5492560160e+00   -1.5659918432e+00   -1.5827276704e+00   -1.5994634976e+00   -1.6161993248e+00   
+-1.6329351520e+00   -1.6496709792e+00   -1.6664068064e+00   -1.6831426336e+00   -1.6998784607e+00   
+-1.7166142879e+00   -1.7333501151e+00   -1.7500859423e+00   -1.7668217695e+00   -1.7835575967e+00   
+-1.8002934239e+00   -1.8170292511e+00   -1.8337650783e+00   -1.8505009055e+00   
+-6.1230317691e-17   -6.1255845327e-17   -6.1283907973e-17   -6.1314757368e-17   -6.1348670249e-17   
+-6.1385950833e-17   -6.1426933549e-17   -6.1471986035e-17   -6.1521512439e-17   -6.1575957040e-17   
+-6.1635808238e-17   -6.1701602933e-17   -6.1773931341e-17   -6.1853442290e-17   -6.1940849038e-17   
+-6.2036935674e-17   -6.2142564151e-17   -6.2258682017e-17   -6.2386330917e-17   -6.2526655934e-17   
+-6.2680915864e-17   -6.2850494509e-17   -6.3036913085e-17   -6.3241843876e-17   -6.3467125228e-17   
+-6.3714778046e-17   -6.3987023916e-17   -6.4286305042e-17   -6.4615306147e-17   -6.4976978561e-17   
+-6.5374566695e-17   -6.5811637141e-17   -6.6292110675e-17   -6.6820297420e-17   -6.7400935515e-17   
+-6.8039233619e-17   -6.8740917634e-17   -6.9512282069e-17   -7.0360246507e-17   -7.1292417678e-17   
+-7.2317157694e-17   -7.3341897710e-17   -7.4366637726e-17   -7.5391377742e-17   -7.6416117758e-17   
+-7.7440857773e-17   -7.8465597789e-17   -7.9490337805e-17   -8.0515077821e-17   -8.1539817837e-17   
+-8.2564557853e-17   -8.3589297869e-17   -8.4614037885e-17   -8.5638777901e-17   -8.6663517917e-17   
+-8.7688257933e-17   -8.8712997949e-17   -8.9737737965e-17   -9.0762477981e-17   -9.1787217997e-17   
+-9.2811958012e-17   -9.3836698028e-17   -9.4861438044e-17   -9.5886178060e-17   -9.6910918076e-17   
+-9.7935658092e-17   -9.8960398108e-17   -9.9985138124e-17   -1.0100987814e-16   -1.0203461816e-16   
+-1.0305935817e-16   -1.0408409819e-16   -1.0510883820e-16   -1.0613357822e-16   -1.0715831824e-16   
+-1.0818305825e-16   -1.0920779827e-16   -1.1023253828e-16   -1.1125727830e-16   -1.1228201832e-16   
+-1.1330675833e-16   1.7364817767e-01    1.7372057362e-01    1.7380015883e-01    1.7388764721e-01    
+1.7398382358e-01    1.7408955071e-01    1.7420577702e-01    1.7433354513e-01    1.7447400120e-01    
+1.7462840520e-01    1.7479814221e-01    1.7498473489e-01    1.7518985707e-01    1.7541534882e-01    
+1.7566323292e-01    1.7593573305e-01    1.7623529368e-01    1.7656460205e-01    1.7692661223e-01    
+1.7732457168e-01    1.7776205032e-01    1.7824297257e-01    1.7877165260e-01    1.7935283297e-01    
+1.7999172719e-01    1.8069406652e-01    1.8146615135e-01    1.8231490772e-01    1.8324794946e-01    
+1.8427364650e-01    1.8540119993e-01    1.8664072456e-01    1.8800333963e-01    1.8950126858e-01    
+1.9114794871e-01    1.9295815167e-01    1.9494811604e-01    1.9713569294e-01    1.9954050619e-01    
+2.0218412835e-01    2.0509027425e-01    2.0799642014e-01    2.1090256604e-01    2.1380871193e-01    
+2.1671485782e-01    2.1962100372e-01    2.2252714961e-01    2.2543329551e-01    2.2833944140e-01    
+2.3124558729e-01    2.3415173319e-01    2.3705787908e-01    2.3996402498e-01    2.4287017087e-01    
+2.4577631676e-01    2.4868246266e-01    2.5158860855e-01    2.5449475445e-01    2.5740090034e-01    
+2.6030704624e-01    2.6321319213e-01    2.6611933802e-01    2.6902548392e-01    2.7193162981e-01    
+2.7483777571e-01    2.7774392160e-01    2.8065006749e-01    2.8355621339e-01    2.8646235928e-01    
+2.8936850518e-01    2.9227465107e-01    2.9518079696e-01    2.9808694286e-01    3.0099308875e-01    
+3.0389923465e-01    3.0680538054e-01    3.0971152643e-01    3.1261767233e-01    3.1552381822e-01    
+3.1842996412e-01    3.2133611001e-01    3.4202014333e-01    3.4216273552e-01    3.4231948778e-01    
+3.4249180625e-01    3.4268123672e-01    3.4288947851e-01    3.4311839965e-01    3.4337005371e-01    
+3.4364669816e-01    3.4395081467e-01    3.4428513133e-01    3.4465264716e-01    3.4505665899e-01    
+3.4550079103e-01    3.4598902740e-01    3.4652574788e-01    3.4711576714e-01    3.4776437800e-01    
+3.4847739888e-01    3.4926122598e-01    3.5012289069e-01    3.5107012262e-01    3.5211141900e-01    
+3.5325612086e-01    3.5451449683e-01    3.5589783527e-01    3.5741854552e-01    3.5909026922e-01    
+3.6092800271e-01    3.6294823150e-01    3.6516907823e-01    3.6761046515e-01    3.7029429291e-01    
+3.7324463701e-01    3.7648796371e-01    3.8005336754e-01    3.8397283222e-01    3.8828151760e-01    
+3.9301807507e-01    3.9822499428e-01    4.0394898429e-01    4.0967297431e-01    4.1539696433e-01    
+4.2112095434e-01    4.2684494436e-01    4.3256893437e-01    4.3829292439e-01    4.4401691440e-01    
+4.4974090442e-01    4.5546489444e-01    4.6118888445e-01    4.6691287447e-01    4.7263686448e-01    
+4.7836085450e-01    4.8408484451e-01    4.8980883453e-01    4.9553282455e-01    5.0125681456e-01    
+5.0698080458e-01    5.1270479459e-01    5.1842878461e-01    5.2415277462e-01    5.2987676464e-01    
+5.3560075465e-01    5.4132474467e-01    5.4704873469e-01    5.5277272470e-01    5.5849671472e-01    
+5.6422070473e-01    5.6994469475e-01    5.7566868476e-01    5.8139267478e-01    5.8711666480e-01    
+5.9284065481e-01    5.9856464483e-01    6.0428863484e-01    6.1001262486e-01    6.1573661487e-01    
+6.2146060489e-01    6.2718459491e-01    6.3290858492e-01    5.0000000000e-01    5.0020845585e-01    
+5.0043761232e-01    5.0068952506e-01    5.0096645389e-01    5.0127088302e-01    5.0160554334e-01    
+5.0197343696e-01    5.0237786409e-01    5.0282245268e-01    5.0331119095e-01    5.0384846315e-01    
+5.0443908892e-01    5.0508836653e-01    5.0580212037e-01    5.0658675321e-01    5.0744930366e-01    
+5.0839750931e-01    5.0943987610e-01    5.1058575467e-01    5.1184542419e-01    5.1323018464e-01    
+5.1475245812e-01    5.1642590028e-01    5.1826552288e-01    5.2028782838e-01    5.2251095804e-01    
+5.2495485460e-01    5.2764144123e-01    5.3059481815e-01    5.3384147886e-01    5.3741054777e-01    
+5.4133404149e-01    5.4564715601e-01    5.5038858246e-01    5.5560085416e-01    5.6133072819e-01    
+5.6762960483e-01    5.7455398861e-01    5.8216599526e-01    5.9053390886e-01    5.9890182246e-01    
+6.0726973605e-01    6.1563764965e-01    6.2400556325e-01    6.3237347685e-01    6.4074139044e-01    
+6.4910930404e-01    6.5747721764e-01    6.6584513123e-01    6.7421304483e-01    6.8258095843e-01    
+6.9094887203e-01    6.9931678562e-01    7.0768469922e-01    7.1605261282e-01    7.2442052642e-01    
+7.3278844001e-01    7.4115635361e-01    7.4952426721e-01    7.5789218080e-01    7.6626009440e-01    
+7.7462800800e-01    7.8299592160e-01    7.9136383519e-01    7.9973174879e-01    8.0809966239e-01    
+8.1646757598e-01    8.2483548958e-01    8.3320340318e-01    8.4157131678e-01    8.4993923037e-01    
+8.5830714397e-01    8.6667505757e-01    8.7504297116e-01    8.8341088476e-01    8.9177879836e-01    
+9.0014671196e-01    9.0851462555e-01    9.1688253915e-01    9.2525045275e-01    6.4278760969e-01    
+6.4305559536e-01    6.4335019323e-01    6.4367404602e-01    6.4403005886e-01    6.4442142540e-01    
+6.4485165642e-01    6.4532461134e-01    6.4584453284e-01    6.4641608492e-01    6.4704439472e-01    
+6.4773509854e-01    6.4849439240e-01    6.4932908761e-01    6.5024667185e-01    6.5125537639e-01    
+6.5236424988e-01    6.5358323956e-01    6.5492328048e-01    6.5639639357e-01    6.5801579349e-01    
+6.5979600721e-01    6.6175300426e-01    6.6390434004e-01    6.6626931327e-01    6.6886913911e-01    
+6.7172713951e-01    6.7486895237e-01    6.7832276156e-01    6.8211954974e-01    6.8629337630e-01    
+6.9088168284e-01    6.9592562914e-01    7.0147046229e-01    7.0756592264e-01    7.1426668997e-01    
+7.2163287404e-01    7.2973055375e-01    7.3863236995e-01    7.4841817707e-01    7.5917575943e-01    
+7.6993334179e-01    7.8069092415e-01    7.9144850651e-01    8.0220608886e-01    8.1296367122e-01    
+8.2372125358e-01    8.3447883594e-01    8.4523641830e-01    8.5599400066e-01    8.6675158301e-01    
+8.7750916537e-01    8.8826674773e-01    8.9902433009e-01    9.0978191245e-01    9.2053949481e-01    
+9.3129707716e-01    9.4205465952e-01    9.5281224188e-01    9.6356982424e-01    9.7432740660e-01    
+9.8508498896e-01    9.9584257131e-01    1.0066001537e+00    1.0173577360e+00    1.0281153184e+00    
+1.0388729007e+00    1.0496304831e+00    1.0603880655e+00    1.0711456478e+00    1.0819032302e+00    
+1.0926608125e+00    1.1034183949e+00    1.1141759773e+00    1.1249335596e+00    1.1356911420e+00    
+1.1464487243e+00    1.1572063067e+00    1.1679638890e+00    1.1787214714e+00    1.1894790538e+00    
+7.6604444312e-01    7.6636381601e-01    7.6671490408e-01    7.6710085680e-01    7.6752513639e-01    
+7.6799154887e-01    7.6850427823e-01    7.6906792396e-01    7.6968754227e-01    7.7036869151e-01    
+7.7111748197e-01    7.7194063074e-01    7.7284552192e-01    7.7384027293e-01    7.7493380725e-01    
+7.7613593450e-01    7.7745743847e-01    7.7891017381e-01    7.8050717239e-01    7.8226276020e-01    
+7.8419268588e-01    7.8631426197e-01    7.8864652024e-01    7.9121038239e-01    7.9402884772e-01    
+7.9712719951e-01    8.0053323175e-01    8.0427749851e-01    8.0839358803e-01    8.1291842399e-01    
+8.1789259677e-01    8.2336072759e-01    8.2937186871e-01    8.3597994353e-01    8.4324423030e-01    
+8.5122989384e-01    8.6000857017e-01    8.6965900905e-01    8.8026778050e-01    8.9193005129e-01    
+9.0475043871e-01    9.1757082613e-01    9.3039121356e-01    9.4321160098e-01    9.5603198840e-01    
+9.6885237583e-01    9.8167276325e-01    9.9449315067e-01    1.0073135381e+00    1.0201339255e+00    
+1.0329543129e+00    1.0457747004e+00    1.0585950878e+00    1.0714154752e+00    1.0842358626e+00    
+1.0970562501e+00    1.1098766375e+00    1.1226970249e+00    1.1355174123e+00    1.1483377998e+00    
+1.1611581872e+00    1.1739785746e+00    1.1867989620e+00    1.1996193494e+00    1.2124397369e+00    
+1.2252601243e+00    1.2380805117e+00    1.2509008991e+00    1.2637212866e+00    1.2765416740e+00    
+1.2893620614e+00    1.3021824488e+00    1.3150028363e+00    1.3278232237e+00    1.3406436111e+00    
+1.3534639985e+00    1.3662843859e+00    1.3791047734e+00    1.3919251608e+00    1.4047455482e+00    
+1.4175659356e+00    8.6602540378e-01    8.6638645991e-01    8.6678337055e-01    8.6721969622e-01    
+8.6769935103e-01    8.6822663774e-01    8.6880628643e-01    8.6944349687e-01    8.7014398521e-01    
+8.7091403524e-01    8.7176055474e-01    8.7269113749e-01    8.7371413134e-01    8.7483871315e-01    
+8.7607497105e-01    8.7743399500e-01    8.7892797621e-01    8.8057031657e-01    8.8237574881e-01    
+8.8436046870e-01    8.8654228032e-01    8.8894075578e-01    8.9157741078e-01    8.9447589763e-01    
+8.9766221744e-01    9.0116495332e-01    9.0501552684e-01    9.0924847985e-01    9.1390178439e-01    
+9.1901718327e-01    9.2464056457e-01    9.3082237326e-01    9.3761806372e-01    9.4508859722e-01    
+9.5330098872e-01    9.6232890813e-01    9.7225334108e-01    9.8316331544e-01    9.9515669997e-01    
+1.0083410822e+00    1.0228347337e+00    1.0373283852e+00    1.0518220367e+00    1.0663156882e+00    
+1.0808093398e+00    1.0953029913e+00    1.1097966428e+00    1.1242902943e+00    1.1387839458e+00    
+1.1532775973e+00    1.1677712488e+00    1.1822649003e+00    1.1967585518e+00    1.2112522033e+00    
+1.2257458548e+00    1.2402395063e+00    1.2547331578e+00    1.2692268093e+00    1.2837204608e+00    
+1.2982141123e+00    1.3127077638e+00    1.3272014153e+00    1.3416950668e+00    1.3561887183e+00    
+1.3706823698e+00    1.3851760213e+00    1.3996696728e+00    1.4141633243e+00    1.4286569758e+00    
+1.4431506273e+00    1.4576442788e+00    1.4721379304e+00    1.4866315819e+00    1.5011252334e+00    
+1.5156188849e+00    1.5301125364e+00    1.5446061879e+00    1.5590998394e+00    1.5735934909e+00    
+1.5880871424e+00    1.6025807939e+00    9.3969262079e-01    9.4008438963e-01    9.4051506291e-01    
+9.4098850401e-01    9.4150895997e-01    9.4208109957e-01    9.4271005525e-01    9.4340146909e-01    
+9.4416154347e-01    9.4499709671e-01    9.4591562418e-01    9.4692536563e-01    9.4803537900e-01    
+9.4925562175e-01    9.5059704017e-01    9.5207166755e-01    9.5369273215e-01    9.5547477586e-01    
+9.5743378462e-01    9.5958733188e-01    9.6195473619e-01    9.6455723455e-01    9.6741817285e-01    
+9.7056321535e-01    9.7402057491e-01    9.7782126603e-01    9.8199938310e-01    9.8659240623e-01    
+9.9164153749e-01    9.9719207049e-01    1.0032937967e+00    1.0100014521e+00    1.0173752083e+00    
+1.0254812121e+00    1.0343921790e+00    1.0441880455e+00    1.0549566862e+00    1.0667947020e+00    
+1.0798082867e+00    1.0941141796e+00    1.1098407130e+00    1.1255672463e+00    1.1412937796e+00    
+1.1570203129e+00    1.1727468462e+00    1.1884733795e+00    1.2041999129e+00    1.2199264462e+00    
+1.2356529795e+00    1.2513795128e+00    1.2671060461e+00    1.2828325794e+00    1.2985591128e+00    
+1.3142856461e+00    1.3300121794e+00    1.3457387127e+00    1.3614652460e+00    1.3771917794e+00    
+1.3929183127e+00    1.4086448460e+00    1.4243713793e+00    1.4400979126e+00    1.4558244459e+00    
+1.4715509793e+00    1.4872775126e+00    1.5030040459e+00    1.5187305792e+00    1.5344571125e+00    
+1.5501836458e+00    1.5659101792e+00    1.5816367125e+00    1.5973632458e+00    1.6130897791e+00    
+1.6288163124e+00    1.6445428457e+00    1.6602693791e+00    1.6759959124e+00    1.6917224457e+00    
+1.7074489790e+00    1.7231755123e+00    1.7389020457e+00    9.8480775301e-01    9.8521833089e-01    
+9.8566968101e-01    9.8616585227e-01    9.8671129558e-01    9.8731090391e-01    9.8797005607e-01    
+9.8869466505e-01    9.8949123100e-01    9.9036689958e-01    9.9132952605e-01    9.9238774570e-01    
+9.9355105139e-01    9.9482987863e-01    9.9623569925e-01    9.9778112426e-01    9.9948001702e-01    
+1.0013476176e+00    1.0034006794e+00    1.0056576195e+00    1.0081386842e+00    1.0108661298e+00    
+1.0138644233e+00    1.0171604609e+00    1.0207838101e+00    1.0247669744e+00    1.0291456850e+00    
+1.0339592216e+00    1.0392507643e+00    1.0450677812e+00    1.0514624545e+00    1.0584921480e+00    
+1.0662199221e+00    1.0747150993e+00    1.0840538864e+00    1.0943200575e+00    1.1056057063e+00    
+1.1180120713e+00    1.1316504450e+00    1.1466431714e+00    1.1631247437e+00    1.1796063161e+00    
+1.1960878885e+00    1.2125694608e+00    1.2290510332e+00    1.2455326056e+00    1.2620141780e+00    
+1.2784957503e+00    1.2949773227e+00    1.3114588951e+00    1.3279404675e+00    1.3444220398e+00    
+1.3609036122e+00    1.3773851846e+00    1.3938667570e+00    1.4103483293e+00    1.4268299017e+00    
+1.4433114741e+00    1.4597930465e+00    1.4762746188e+00    1.4927561912e+00    1.5092377636e+00    
+1.5257193360e+00    1.5422009083e+00    1.5586824807e+00    1.5751640531e+00    1.5916456255e+00    
+1.6081271978e+00    1.6246087702e+00    1.6410903426e+00    1.6575719149e+00    1.6740534873e+00    
+1.6905350597e+00    1.7070166321e+00    1.7234982044e+00    1.7399797768e+00    1.7564613492e+00    
+1.7729429216e+00    1.7894244939e+00    1.8059060663e+00    1.8223876387e+00    1.0000000000e+00    
+1.0004169117e+00    1.0008752246e+00    1.0013790501e+00    1.0019329078e+00    1.0025417660e+00    
+1.0032110867e+00    1.0039468739e+00    1.0047557282e+00    1.0056449054e+00    1.0066223819e+00    
+1.0076969263e+00    1.0088781778e+00    1.0101767331e+00    1.0116042407e+00    1.0131735064e+00    
+1.0148986073e+00    1.0167950186e+00    1.0188797522e+00    1.0211715093e+00    1.0236908484e+00    
+1.0264603693e+00    1.0295049162e+00    1.0328518006e+00    1.0365310458e+00    1.0405756568e+00    
+1.0450219161e+00    1.0499097092e+00    1.0552828825e+00    1.0611896363e+00    1.0676829577e+00    
+1.0748210955e+00    1.0826680830e+00    1.0912943120e+00    1.1007771649e+00    1.1112017083e+00    
+1.1226614564e+00    1.1352592097e+00    1.1491079772e+00    1.1643319905e+00    1.1810678177e+00    
+1.1978036449e+00    1.2145394721e+00    1.2312752993e+00    1.2480111265e+00    1.2647469537e+00    
+1.2814827809e+00    1.2982186081e+00    1.3149544353e+00    1.3316902625e+00    1.3484260897e+00    
+1.3651619169e+00    1.3818977441e+00    1.3986335712e+00    1.4153693984e+00    1.4321052256e+00    
+1.4488410528e+00    1.4655768800e+00    1.4823127072e+00    1.4990485344e+00    1.5157843616e+00    
+1.5325201888e+00    1.5492560160e+00    1.5659918432e+00    1.5827276704e+00    1.5994634976e+00    
+1.6161993248e+00    1.6329351520e+00    1.6496709792e+00    1.6664068064e+00    1.6831426336e+00    
+1.6998784607e+00    1.7166142879e+00    1.7333501151e+00    1.7500859423e+00    1.7668217695e+00    
+1.7835575967e+00    1.8002934239e+00    1.8170292511e+00    1.8337650783e+00    1.8505009055e+00    
+9.8480775301e-01    9.8521833089e-01    9.8566968101e-01    9.8616585227e-01    9.8671129558e-01    
+9.8731090391e-01    9.8797005607e-01    9.8869466505e-01    9.8949123100e-01    9.9036689958e-01    
+9.9132952605e-01    9.9238774570e-01    9.9355105139e-01    9.9482987863e-01    9.9623569925e-01    
+9.9778112426e-01    9.9948001702e-01    1.0013476176e+00    1.0034006794e+00    1.0056576195e+00    
+1.0081386842e+00    1.0108661298e+00    1.0138644233e+00    1.0171604609e+00    1.0207838101e+00    
+1.0247669744e+00    1.0291456850e+00    1.0339592216e+00    1.0392507643e+00    1.0450677812e+00    
+1.0514624545e+00    1.0584921480e+00    1.0662199221e+00    1.0747150993e+00    1.0840538864e+00    
+1.0943200575e+00    1.1056057063e+00    1.1180120713e+00    1.1316504450e+00    1.1466431714e+00    
+1.1631247437e+00    1.1796063161e+00    1.1960878885e+00    1.2125694608e+00    1.2290510332e+00    
+1.2455326056e+00    1.2620141780e+00    1.2784957503e+00    1.2949773227e+00    1.3114588951e+00    
+1.3279404675e+00    1.3444220398e+00    1.3609036122e+00    1.3773851846e+00    1.3938667570e+00    
+1.4103483293e+00    1.4268299017e+00    1.4433114741e+00    1.4597930465e+00    1.4762746188e+00    
+1.4927561912e+00    1.5092377636e+00    1.5257193360e+00    1.5422009083e+00    1.5586824807e+00    
+1.5751640531e+00    1.5916456255e+00    1.6081271978e+00    1.6246087702e+00    1.6410903426e+00    
+1.6575719149e+00    1.6740534873e+00    1.6905350597e+00    1.7070166321e+00    1.7234982044e+00    
+1.7399797768e+00    1.7564613492e+00    1.7729429216e+00    1.7894244939e+00    1.8059060663e+00    
+1.8223876387e+00    9.3969262079e-01    9.4008438963e-01    9.4051506291e-01    9.4098850401e-01    
+9.4150895997e-01    9.4208109957e-01    9.4271005525e-01    9.4340146909e-01    9.4416154347e-01    
+9.4499709671e-01    9.4591562418e-01    9.4692536563e-01    9.4803537900e-01    9.4925562175e-01    
+9.5059704017e-01    9.5207166755e-01    9.5369273215e-01    9.5547477586e-01    9.5743378462e-01    
+9.5958733188e-01    9.6195473619e-01    9.6455723455e-01    9.6741817285e-01    9.7056321535e-01    
+9.7402057491e-01    9.7782126603e-01    9.8199938310e-01    9.8659240623e-01    9.9164153749e-01    
+9.9719207049e-01    1.0032937967e+00    1.0100014521e+00    1.0173752083e+00    1.0254812121e+00    
+1.0343921790e+00    1.0441880455e+00    1.0549566862e+00    1.0667947020e+00    1.0798082867e+00    
+1.0941141796e+00    1.1098407130e+00    1.1255672463e+00    1.1412937796e+00    1.1570203129e+00    
+1.1727468462e+00    1.1884733795e+00    1.2041999129e+00    1.2199264462e+00    1.2356529795e+00    
+1.2513795128e+00    1.2671060461e+00    1.2828325794e+00    1.2985591128e+00    1.3142856461e+00    
+1.3300121794e+00    1.3457387127e+00    1.3614652460e+00    1.3771917794e+00    1.3929183127e+00    
+1.4086448460e+00    1.4243713793e+00    1.4400979126e+00    1.4558244459e+00    1.4715509793e+00    
+1.4872775126e+00    1.5030040459e+00    1.5187305792e+00    1.5344571125e+00    1.5501836458e+00    
+1.5659101792e+00    1.5816367125e+00    1.5973632458e+00    1.6130897791e+00    1.6288163124e+00    
+1.6445428457e+00    1.6602693791e+00    1.6759959124e+00    1.6917224457e+00    1.7074489790e+00    
+1.7231755123e+00    1.7389020457e+00    8.6602540378e-01    8.6638645991e-01    8.6678337055e-01    
+8.6721969622e-01    8.6769935103e-01    8.6822663774e-01    8.6880628643e-01    8.6944349687e-01    
+8.7014398521e-01    8.7091403524e-01    8.7176055474e-01    8.7269113749e-01    8.7371413134e-01    
+8.7483871315e-01    8.7607497105e-01    8.7743399500e-01    8.7892797621e-01    8.8057031657e-01    
+8.8237574881e-01    8.8436046870e-01    8.8654228032e-01    8.8894075578e-01    8.9157741078e-01    
+8.9447589763e-01    8.9766221744e-01    9.0116495332e-01    9.0501552684e-01    9.0924847985e-01    
+9.1390178439e-01    9.1901718327e-01    9.2464056457e-01    9.3082237326e-01    9.3761806372e-01    
+9.4508859722e-01    9.5330098872e-01    9.6232890813e-01    9.7225334108e-01    9.8316331544e-01    
+9.9515669997e-01    1.0083410822e+00    1.0228347337e+00    1.0373283852e+00    1.0518220367e+00    
+1.0663156882e+00    1.0808093398e+00    1.0953029913e+00    1.1097966428e+00    1.1242902943e+00    
+1.1387839458e+00    1.1532775973e+00    1.1677712488e+00    1.1822649003e+00    1.1967585518e+00    
+1.2112522033e+00    1.2257458548e+00    1.2402395063e+00    1.2547331578e+00    1.2692268093e+00    
+1.2837204608e+00    1.2982141123e+00    1.3127077638e+00    1.3272014153e+00    1.3416950668e+00    
+1.3561887183e+00    1.3706823698e+00    1.3851760213e+00    1.3996696728e+00    1.4141633243e+00    
+1.4286569758e+00    1.4431506273e+00    1.4576442788e+00    1.4721379304e+00    1.4866315819e+00    
+1.5011252334e+00    1.5156188849e+00    1.5301125364e+00    1.5446061879e+00    1.5590998394e+00    
+1.5735934909e+00    1.5880871424e+00    1.6025807939e+00    7.6604444312e-01    7.6636381601e-01    
+7.6671490408e-01    7.6710085680e-01    7.6752513639e-01    7.6799154887e-01    7.6850427823e-01    
+7.6906792396e-01    7.6968754227e-01    7.7036869151e-01    7.7111748197e-01    7.7194063074e-01    
+7.7284552192e-01    7.7384027293e-01    7.7493380725e-01    7.7613593450e-01    7.7745743847e-01    
+7.7891017381e-01    7.8050717239e-01    7.8226276020e-01    7.8419268588e-01    7.8631426197e-01    
+7.8864652024e-01    7.9121038239e-01    7.9402884772e-01    7.9712719951e-01    8.0053323175e-01    
+8.0427749851e-01    8.0839358803e-01    8.1291842399e-01    8.1789259677e-01    8.2336072759e-01    
+8.2937186871e-01    8.3597994353e-01    8.4324423030e-01    8.5122989384e-01    8.6000857017e-01    
+8.6965900905e-01    8.8026778050e-01    8.9193005129e-01    9.0475043871e-01    9.1757082613e-01    
+9.3039121356e-01    9.4321160098e-01    9.5603198840e-01    9.6885237583e-01    9.8167276325e-01    
+9.9449315067e-01    1.0073135381e+00    1.0201339255e+00    1.0329543129e+00    1.0457747004e+00    
+1.0585950878e+00    1.0714154752e+00    1.0842358626e+00    1.0970562501e+00    1.1098766375e+00    
+1.1226970249e+00    1.1355174123e+00    1.1483377998e+00    1.1611581872e+00    1.1739785746e+00    
+1.1867989620e+00    1.1996193494e+00    1.2124397369e+00    1.2252601243e+00    1.2380805117e+00    
+1.2509008991e+00    1.2637212866e+00    1.2765416740e+00    1.2893620614e+00    1.3021824488e+00    
+1.3150028363e+00    1.3278232237e+00    1.3406436111e+00    1.3534639985e+00    1.3662843859e+00    
+1.3791047734e+00    1.3919251608e+00    1.4047455482e+00    1.4175659356e+00    6.4278760969e-01    
+6.4305559536e-01    6.4335019323e-01    6.4367404602e-01    6.4403005886e-01    6.4442142540e-01    
+6.4485165642e-01    6.4532461134e-01    6.4584453284e-01    6.4641608492e-01    6.4704439472e-01    
+6.4773509854e-01    6.4849439240e-01    6.4932908761e-01    6.5024667185e-01    6.5125537639e-01    
+6.5236424988e-01    6.5358323956e-01    6.5492328048e-01    6.5639639357e-01    6.5801579349e-01    
+6.5979600721e-01    6.6175300426e-01    6.6390434004e-01    6.6626931327e-01    6.6886913911e-01    
+6.7172713951e-01    6.7486895237e-01    6.7832276156e-01    6.8211954974e-01    6.8629337630e-01    
+6.9088168284e-01    6.9592562914e-01    7.0147046229e-01    7.0756592264e-01    7.1426668997e-01    
+7.2163287404e-01    7.2973055375e-01    7.3863236995e-01    7.4841817707e-01    7.5917575943e-01    
+7.6993334179e-01    7.8069092415e-01    7.9144850651e-01    8.0220608886e-01    8.1296367122e-01    
+8.2372125358e-01    8.3447883594e-01    8.4523641830e-01    8.5599400066e-01    8.6675158301e-01    
+8.7750916537e-01    8.8826674773e-01    8.9902433009e-01    9.0978191245e-01    9.2053949481e-01    
+9.3129707716e-01    9.4205465952e-01    9.5281224188e-01    9.6356982424e-01    9.7432740660e-01    
+9.8508498896e-01    9.9584257131e-01    1.0066001537e+00    1.0173577360e+00    1.0281153184e+00    
+1.0388729007e+00    1.0496304831e+00    1.0603880655e+00    1.0711456478e+00    1.0819032302e+00    
+1.0926608125e+00    1.1034183949e+00    1.1141759773e+00    1.1249335596e+00    1.1356911420e+00    
+1.1464487243e+00    1.1572063067e+00    1.1679638890e+00    1.1787214714e+00    1.1894790538e+00    
+5.0000000000e-01    5.0020845585e-01    5.0043761232e-01    5.0068952506e-01    5.0096645389e-01    
+5.0127088302e-01    5.0160554334e-01    5.0197343696e-01    5.0237786409e-01    5.0282245268e-01    
+5.0331119095e-01    5.0384846315e-01    5.0443908892e-01    5.0508836653e-01    5.0580212037e-01    
+5.0658675321e-01    5.0744930366e-01    5.0839750931e-01    5.0943987610e-01    5.1058575467e-01    
+5.1184542419e-01    5.1323018464e-01    5.1475245812e-01    5.1642590028e-01    5.1826552288e-01    
+5.2028782838e-01    5.2251095804e-01    5.2495485460e-01    5.2764144123e-01    5.3059481815e-01    
+5.3384147886e-01    5.3741054777e-01    5.4133404149e-01    5.4564715601e-01    5.5038858246e-01    
+5.5560085416e-01    5.6133072819e-01    5.6762960483e-01    5.7455398861e-01    5.8216599526e-01    
+5.9053390886e-01    5.9890182246e-01    6.0726973605e-01    6.1563764965e-01    6.2400556325e-01    
+6.3237347685e-01    6.4074139044e-01    6.4910930404e-01    6.5747721764e-01    6.6584513123e-01    
+6.7421304483e-01    6.8258095843e-01    6.9094887203e-01    6.9931678562e-01    7.0768469922e-01    
+7.1605261282e-01    7.2442052642e-01    7.3278844001e-01    7.4115635361e-01    7.4952426721e-01    
+7.5789218080e-01    7.6626009440e-01    7.7462800800e-01    7.8299592160e-01    7.9136383519e-01    
+7.9973174879e-01    8.0809966239e-01    8.1646757598e-01    8.2483548958e-01    8.3320340318e-01    
+8.4157131678e-01    8.4993923037e-01    8.5830714397e-01    8.6667505757e-01    8.7504297116e-01    
+8.8341088476e-01    8.9177879836e-01    9.0014671196e-01    9.0851462555e-01    9.1688253915e-01    
+9.2525045275e-01    3.4202014333e-01    3.4216273552e-01    3.4231948778e-01    3.4249180625e-01    
+3.4268123672e-01    3.4288947851e-01    3.4311839965e-01    3.4337005371e-01    3.4364669816e-01    
+3.4395081467e-01    3.4428513133e-01    3.4465264716e-01    3.4505665899e-01    3.4550079103e-01    
+3.4598902740e-01    3.4652574788e-01    3.4711576714e-01    3.4776437800e-01    3.4847739888e-01    
+3.4926122598e-01    3.5012289069e-01    3.5107012262e-01    3.5211141900e-01    3.5325612086e-01    
+3.5451449683e-01    3.5589783527e-01    3.5741854552e-01    3.5909026922e-01    3.6092800271e-01    
+3.6294823150e-01    3.6516907823e-01    3.6761046515e-01    3.7029429291e-01    3.7324463701e-01    
+3.7648796371e-01    3.8005336754e-01    3.8397283222e-01    3.8828151760e-01    3.9301807507e-01    
+3.9822499428e-01    4.0394898429e-01    4.0967297431e-01    4.1539696433e-01    4.2112095434e-01    
+4.2684494436e-01    4.3256893437e-01    4.3829292439e-01    4.4401691440e-01    4.4974090442e-01    
+4.5546489444e-01    4.6118888445e-01    4.6691287447e-01    4.7263686448e-01    4.7836085450e-01    
+4.8408484451e-01    4.8980883453e-01    4.9553282455e-01    5.0125681456e-01    5.0698080458e-01    
+5.1270479459e-01    5.1842878461e-01    5.2415277462e-01    5.2987676464e-01    5.3560075465e-01    
+5.4132474467e-01    5.4704873469e-01    5.5277272470e-01    5.5849671472e-01    5.6422070473e-01    
+5.6994469475e-01    5.7566868476e-01    5.8139267478e-01    5.8711666480e-01    5.9284065481e-01    
+5.9856464483e-01    6.0428863484e-01    6.1001262486e-01    6.1573661487e-01    6.2146060489e-01    
+6.2718459491e-01    6.3290858492e-01    1.7364817767e-01    1.7372057362e-01    1.7380015883e-01    
+1.7388764721e-01    1.7398382358e-01    1.7408955071e-01    1.7420577702e-01    1.7433354513e-01    
+1.7447400120e-01    1.7462840520e-01    1.7479814221e-01    1.7498473489e-01    1.7518985707e-01    
+1.7541534882e-01    1.7566323292e-01    1.7593573305e-01    1.7623529368e-01    1.7656460205e-01    
+1.7692661223e-01    1.7732457168e-01    1.7776205032e-01    1.7824297257e-01    1.7877165260e-01    
+1.7935283297e-01    1.7999172719e-01    1.8069406652e-01    1.8146615135e-01    1.8231490772e-01    
+1.8324794946e-01    1.8427364650e-01    1.8540119993e-01    1.8664072456e-01    1.8800333963e-01    
+1.8950126858e-01    1.9114794871e-01    1.9295815167e-01    1.9494811604e-01    1.9713569294e-01    
+1.9954050619e-01    2.0218412835e-01    2.0509027425e-01    2.0799642014e-01    2.1090256604e-01    
+2.1380871193e-01    2.1671485782e-01    2.1962100372e-01    2.2252714961e-01    2.2543329551e-01    
+2.2833944140e-01    2.3124558729e-01    2.3415173319e-01    2.3705787908e-01    2.3996402498e-01    
+2.4287017087e-01    2.4577631676e-01    2.4868246266e-01    2.5158860855e-01    2.5449475445e-01    
+2.5740090034e-01    2.6030704624e-01    2.6321319213e-01    2.6611933802e-01    2.6902548392e-01    
+2.7193162981e-01    2.7483777571e-01    2.7774392160e-01    2.8065006749e-01    2.8355621339e-01    
+2.8646235928e-01    2.8936850518e-01    2.9227465107e-01    2.9518079696e-01    2.9808694286e-01    
+3.0099308875e-01    3.0389923465e-01    3.0680538054e-01    3.0971152643e-01    3.1261767233e-01    
+3.1552381822e-01    3.1842996412e-01    3.2133611001e-01    6.1230317691e-17    6.1255845327e-17    
+6.1283907973e-17    6.1314757368e-17    6.1348670249e-17    6.1385950833e-17    6.1426933549e-17    
+6.1471986035e-17    6.1521512439e-17    6.1575957040e-17    6.1635808238e-17    6.1701602933e-17    
+6.1773931341e-17    6.1853442290e-17    6.1940849038e-17    6.2036935674e-17    6.2142564151e-17    
+6.2258682017e-17    6.2386330917e-17    6.2526655934e-17    6.2680915864e-17    6.2850494509e-17    
+6.3036913085e-17    6.3241843876e-17    6.3467125228e-17    6.3714778046e-17    6.3987023916e-17    
+6.4286305042e-17    6.4615306147e-17    6.4976978561e-17    6.5374566695e-17    6.5811637141e-17    
+6.6292110675e-17    6.6820297420e-17    6.7400935515e-17    6.8039233619e-17    6.8740917634e-17    
+6.9512282069e-17    7.0360246507e-17    7.1292417678e-17    7.2317157694e-17    7.3341897710e-17    
+7.4366637726e-17    7.5391377742e-17    7.6416117758e-17    7.7440857773e-17    7.8465597789e-17    
+7.9490337805e-17    8.0515077821e-17    8.1539817837e-17    8.2564557853e-17    8.3589297869e-17    
+8.4614037885e-17    8.5638777901e-17    8.6663517917e-17    8.7688257933e-17    8.8712997949e-17    
+8.9737737965e-17    9.0762477981e-17    9.1787217997e-17    9.2811958012e-17    9.3836698028e-17    
+9.4861438044e-17    9.5886178060e-17    9.6910918076e-17    9.7935658092e-17    9.8960398108e-17    
+9.9985138124e-17    1.0100987814e-16    1.0203461816e-16    1.0305935817e-16    1.0408409819e-16    
+1.0510883820e-16    1.0613357822e-16    1.0715831824e-16    1.0818305825e-16    1.0920779827e-16    
+1.1023253828e-16    1.1125727830e-16    1.1228201832e-16    1.1330675833e-16    
+1.4397159353e+00    1.0023325427e+00    1.0009896166e+00    1.0008654392e+00    1.0001096760e+00    
+1.0000097934e+00    1.0000007495e+00    1.0000000526e+00    1.0000000035e+00    1.0000000002e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.4397694834e+00    1.0023327243e+00    1.0009898589e+00    1.0008655407e+00    
+1.0001096922e+00    1.0000097952e+00    1.0000007497e+00    1.0000000526e+00    1.0000000035e+00    
+1.0000000002e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.4398230328e+00    1.0023329081e+00    1.0009901015e+00    
+1.0008656423e+00    1.0001097084e+00    1.0000097971e+00    1.0000007498e+00    1.0000000526e+00    
+1.0000000035e+00    1.0000000002e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.4398230340e+00    1.0023329103e+00    
+1.0009901018e+00    1.0008656424e+00    1.0001097084e+00    1.0000097971e+00    1.0000007498e+00    
+1.0000000526e+00    1.0000000035e+00    1.0000000002e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.4398230340e+00    
+1.0023329103e+00    1.0009901018e+00    1.0008656424e+00    1.0001097084e+00    1.0000097971e+00    
+1.0000007498e+00    1.0000000526e+00    1.0000000035e+00    1.0000000002e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.4398230340e+00    1.0023329103e+00    1.0009901018e+00    1.0008656424e+00    1.0001097084e+00    
+1.0000097971e+00    1.0000007498e+00    1.0000000526e+00    1.0000000035e+00    1.0000000002e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.4398230340e+00    1.0023329103e+00    1.0009901018e+00    1.0008656424e+00    
+1.0001097084e+00    1.0000097971e+00    1.0000007498e+00    1.0000000526e+00    1.0000000035e+00    
+1.0000000002e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.4398230340e+00    1.0023329103e+00    1.0009901018e+00    
+1.0008656424e+00    1.0001097084e+00    1.0000097971e+00    1.0000007498e+00    1.0000000526e+00    
+1.0000000035e+00    1.0000000002e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.4398230340e+00    1.0023329103e+00    
+1.0009901018e+00    1.0008656424e+00    1.0001097084e+00    1.0000097971e+00    1.0000007498e+00    
+1.0000000526e+00    1.0000000035e+00    1.0000000002e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.4398230340e+00    
+1.0023329103e+00    1.0009901018e+00    1.0008656424e+00    1.0001097084e+00    1.0000097971e+00    
+1.0000007498e+00    1.0000000526e+00    1.0000000035e+00    1.0000000002e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.4398230340e+00    1.0023329103e+00    1.0009901018e+00    1.0008656424e+00    1.0001097084e+00    
+1.0000097971e+00    1.0000007498e+00    1.0000000526e+00    1.0000000035e+00    1.0000000002e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.4398230340e+00    1.0023329103e+00    1.0009901018e+00    1.0008656424e+00    
+1.0001097084e+00    1.0000097971e+00    1.0000007498e+00    1.0000000526e+00    1.0000000035e+00    
+1.0000000002e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.4398230340e+00    1.0023329103e+00    1.0009901018e+00    
+1.0008656424e+00    1.0001097084e+00    1.0000097971e+00    1.0000007498e+00    1.0000000526e+00    
+1.0000000035e+00    1.0000000002e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.4398230340e+00    1.0023329103e+00    
+1.0009901018e+00    1.0008656424e+00    1.0001097084e+00    1.0000097971e+00    1.0000007498e+00    
+1.0000000526e+00    1.0000000035e+00    1.0000000002e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.4398230340e+00    
+1.0023329103e+00    1.0009901018e+00    1.0008656424e+00    1.0001097084e+00    1.0000097971e+00    
+1.0000007498e+00    1.0000000526e+00    1.0000000035e+00    1.0000000002e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.4398230340e+00    1.0023329103e+00    1.0009901018e+00    1.0008656424e+00    1.0001097084e+00    
+1.0000097971e+00    1.0000007498e+00    1.0000000526e+00    1.0000000035e+00    1.0000000002e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.4398230328e+00    1.0023329084e+00    1.0009901017e+00    1.0008656424e+00    
+1.0001097084e+00    1.0000097971e+00    1.0000007498e+00    1.0000000526e+00    1.0000000035e+00    
+1.0000000002e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.4397697744e+00    1.0023328763e+00    1.0009900717e+00    
+1.0008656137e+00    1.0001097044e+00    1.0000097966e+00    1.0000007498e+00    1.0000000526e+00    
+1.0000000035e+00    1.0000000002e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.4397165172e+00    1.0023328462e+00    
+1.0009900417e+00    1.0008655850e+00    1.0001097003e+00    1.0000097962e+00    1.0000007498e+00    
+1.0000000526e+00    1.0000000035e+00    1.0000000002e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+0.0000000000e+00    9.6624387836e-01    9.9845864740e-01    9.9993121819e-01    9.9999695880e-01    
+9.9999986603e-01    9.9999999404e-01    9.9999999973e-01    9.9999999999e-01    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    0.0000000000e+00    9.6624296406e-01    9.9845856085e-01    9.9993121204e-01    
+9.9999695841e-01    9.9999986600e-01    9.9999999404e-01    9.9999999973e-01    9.9999999999e-01    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    9.6624204984e-01    9.9845847430e-01    
+9.9993120589e-01    9.9999695803e-01    9.9999986598e-01    9.9999999404e-01    9.9999999973e-01    
+9.9999999999e-01    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    9.6624204991e-01    
+9.9845847429e-01    9.9993120589e-01    9.9999695803e-01    9.9999986598e-01    9.9999999404e-01    
+9.9999999973e-01    9.9999999999e-01    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    
+9.6624204991e-01    9.9845847429e-01    9.9993120589e-01    9.9999695803e-01    9.9999986598e-01    
+9.9999999404e-01    9.9999999973e-01    9.9999999999e-01    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+0.0000000000e+00    9.6624204991e-01    9.9845847429e-01    9.9993120589e-01    9.9999695803e-01    
+9.9999986598e-01    9.9999999404e-01    9.9999999973e-01    9.9999999999e-01    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    0.0000000000e+00    9.6624204991e-01    9.9845847429e-01    9.9993120589e-01    
+9.9999695803e-01    9.9999986598e-01    9.9999999404e-01    9.9999999973e-01    9.9999999999e-01    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    9.6624204991e-01    9.9845847429e-01    
+9.9993120589e-01    9.9999695803e-01    9.9999986598e-01    9.9999999404e-01    9.9999999973e-01    
+9.9999999999e-01    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    9.6624204991e-01    
+9.9845847429e-01    9.9993120589e-01    9.9999695803e-01    9.9999986598e-01    9.9999999404e-01    
+9.9999999973e-01    9.9999999999e-01    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    
+9.6624204991e-01    9.9845847429e-01    9.9993120589e-01    9.9999695803e-01    9.9999986598e-01    
+9.9999999404e-01    9.9999999973e-01    9.9999999999e-01    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+0.0000000000e+00    9.6624204991e-01    9.9845847429e-01    9.9993120589e-01    9.9999695803e-01    
+9.9999986598e-01    9.9999999404e-01    9.9999999973e-01    9.9999999999e-01    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    0.0000000000e+00    9.6624204991e-01    9.9845847429e-01    9.9993120589e-01    
+9.9999695803e-01    9.9999986598e-01    9.9999999404e-01    9.9999999973e-01    9.9999999999e-01    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    9.6624204991e-01    9.9845847429e-01    
+9.9993120589e-01    9.9999695803e-01    9.9999986598e-01    9.9999999404e-01    9.9999999973e-01    
+9.9999999999e-01    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    9.6624204991e-01    
+9.9845847429e-01    9.9993120589e-01    9.9999695803e-01    9.9999986598e-01    9.9999999404e-01    
+9.9999999973e-01    9.9999999999e-01    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    
+9.6624204991e-01    9.9845847429e-01    9.9993120589e-01    9.9999695803e-01    9.9999986598e-01    
+9.9999999404e-01    9.9999999973e-01    9.9999999999e-01    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+0.0000000000e+00    9.6624204991e-01    9.9845847429e-01    9.9993120589e-01    9.9999695803e-01    
+9.9999986598e-01    9.9999999404e-01    9.9999999973e-01    9.9999999999e-01    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    0.0000000000e+00    9.6624204983e-01    9.9845847429e-01    9.9993120589e-01    
+9.9999695803e-01    9.9999986598e-01    9.9999999404e-01    9.9999999973e-01    9.9999999999e-01    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    9.6624292280e-01    9.9845851941e-01    
+9.9993120816e-01    9.9999695814e-01    9.9999986599e-01    9.9999999404e-01    9.9999999973e-01    
+9.9999999999e-01    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    0.0000000000e+00    9.6624379583e-01    
+9.9845856452e-01    9.9993121042e-01    9.9999695825e-01    9.9999986599e-01    9.9999999404e-01    
+9.9999999973e-01    9.9999999999e-01    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+0.0000000000e+00    3.3782709738e-03    3.5034365329e-03    3.0548996433e-04    2.1706284853e-05    
+1.4493754484e-06    9.4227550248e-08    6.0135397568e-09    3.7688805272e-10    2.3153634942e-11    
+1.3907878365e-12    8.1462239939e-14    4.6400640325e-15    2.5666072815e-16    1.3280873970e-17    
+5.3636963484e-19    1.6110342353e-19    -1.9981674149e-19   5.9719564823e-19    -4.1883100823e-19   
+-1.2434634591e-18   3.0842555095e-19    3.3029706865e-19    3.0616748402e-19    5.7079451023e-19    
+2.4125572648e-19    7.1457816907e-19    1.9849643365e-19    -3.1915654442e-19   -4.2335842906e-20   
+-1.9729259438e-19   -2.2648282901e-19   -7.1407285391e-20   -3.1605733812e-19   -8.0247675057e-20   
+5.8489556713e-19    8.2560109923e-20    -1.5648025658e-19   -1.8719759002e-20   -2.1696831229e-19   
+8.0924066284e-20    8.2865112469e-20    -4.1752851628e-20   2.5187072797e-19    5.9501732770e-20    
+-2.6525562187e-19   -8.8568389063e-20   3.2948278292e-19    1.0242161966e-19    -9.6852029432e-20   
+4.2782387051e-20    -7.6861899207e-20   1.5411411574e-21    1.7686688284e-19    1.6630891320e-19    
+-4.9063833496e-20   -6.4464905388e-20   1.6392964574e-19    -3.0598339768e-19   -1.9514995846e-19   
+4.9571712845e-19    1.3077997078e-19    -3.7075565522e-19   -2.3259572845e-19   2.6677250364e-19    
+3.1149020824e-19    -7.8114566574e-20   -3.6485827764e-20   -6.1827209700e-20   -2.4218740557e-20   
+1.4913614413e-19    -1.0121748699e-19   -7.7694188367e-20   -6.5359411833e-20   -6.6446646049e-20   
+1.8123926765e-19    1.4915227033e-19    1.6506216368e-20    1.2776995620e-19    2.5477603651e-19    
+1.2193461827e-19    0.0000000000e+00    3.3274297657e-03    3.4504080171e-03    3.0087575481e-04    
+2.1379248788e-05    1.4276003811e-06    9.2816370935e-08    5.9237948112e-09    3.7128522145e-10    
+2.2810899312e-11    1.3702967415e-12    8.0268465513e-14    4.5724779206e-15    2.5262532493e-16    
+1.3259085176e-17    5.0386753482e-19    -1.8119072092e-19   -1.0080221020e-20   2.2029509003e-19    
+-4.5736138705e-19   -3.3992117662e-19   3.8338710697e-19    5.9528068576e-20    1.9396982356e-19    
+4.3476362502e-19    3.3123602260e-19    5.1793177337e-19    6.0282433175e-20    -2.3810332183e-19   
+-1.0896117607e-19   -1.3933577556e-19   -6.7080171500e-20   -1.2815908381e-20   -1.4136550154e-19   
+-1.1803335081e-19   1.1275062887e-19    -1.8907551248e-20   -7.0058541431e-20   -4.7102152009e-20   
+-8.2018523498e-20   1.5719144901e-19    9.3692564331e-20    -1.9502629458e-20   2.1668647113e-19    
+7.4857419804e-20    -2.0820870194e-19   -1.4648553972e-20   2.0969433740e-19    3.8537928754e-20    
+-1.0123300444e-20   1.8126025191e-20    -3.4977538650e-20   3.8557066579e-20    8.9427685182e-20    
+1.4424406846e-19    -8.3683479558e-20   -1.1081155668e-19   1.1223213762e-19    -2.3554698578e-19   
+-1.1088229218e-19   3.1954104145e-19    -1.1105603005e-20   -1.7752907475e-19   -9.4555579438e-20   
+1.5219207513e-19    1.7070873037e-19    -1.6146944818e-19   1.0263996934e-19    3.3858910837e-20    
+-1.4236561834e-20   1.6080091359e-19    -1.9231150777e-19   -3.5879179857e-20   1.1301506120e-19    
+-1.6078616097e-20   1.2991861137e-19    -2.2882679502e-20   -1.1078495276e-19   2.0512238004e-19    
+2.5697725561e-19    3.9828270294e-20    0.0000000000e+00    3.1754384114e-03    3.2925030142e-03    
+2.8711603245e-04    2.0402336292e-05    1.3624275926e-06    8.8583488853e-08    5.6539483787e-09    
+3.5439328773e-10    2.1774527087e-11    1.3081337441e-12    7.6633342482e-14    4.3659236118e-15    
+2.4093517499e-16    1.2447094510e-17    5.9327456936e-19    -6.3130666020e-20   -8.7326788884e-21   
+1.7410910132e-19    5.1669600497e-20    1.7327529060e-19    2.3077918527e-20    -3.8074022976e-19   
+1.3654293995e-19    2.3435855912e-19    1.6045347639e-19    4.0799749228e-19    3.3927887696e-19    
+-2.0299915941e-20   -3.5235352565e-19   -2.8905987456e-19   -3.1213261437e-20   1.8190600407e-19    
+1.6297775804e-19    -1.0892960789e-19   -1.3782005955e-19   1.5138676627e-20    -2.8058478937e-20   
+-4.3090853289e-20   1.9209176308e-20    7.7519292395e-20    -1.0513081742e-20   -4.5462940248e-21   
+1.1604366870e-19    9.3911833894e-20    -5.3756106345e-20   -1.9458146785e-20   4.9910729855e-20    
+1.0227593269e-19    6.1452831791e-20    -9.5608921057e-20   8.7787614906e-20    1.2469372111e-19    
+-1.0571128274e-19   -1.8995172823e-20   3.7082698257e-20    3.3938737144e-20    -4.7014108941e-20   
+-2.0947445780e-19   -3.2655420612e-20   3.8117019566e-20    1.2879123646e-20    9.2215386514e-20    
+-1.9691496425e-20   1.0921317977e-19    -3.4709830316e-20   -1.1300759064e-19   2.1772710310e-19    
+2.0104833458e-20    2.2050845161e-20    8.2888913520e-20    -1.6511202508e-19   7.8188460143e-20    
+1.8052879754e-19    -1.2310553466e-19   2.0484610898e-20    1.0532558475e-19    -1.6780497512e-19   
+-8.5424403177e-20   1.3314661827e-19    6.3500981510e-20    0.0000000000e+00    2.9264327565e-03    
+3.0343228103e-03    2.6460200572e-04    1.8802498620e-05    1.2555930603e-06    8.1637162727e-08    
+5.2105847699e-09    3.2660250587e-10    2.0066982699e-11    1.2055487165e-12    7.0623697486e-14    
+4.0234072540e-15    2.2190264360e-16    1.1530882224e-17    8.6362563793e-19    1.7267006475e-19    
+9.8220592015e-21    3.4127044293e-19    1.3864140174e-19    -4.9364213441e-19   -4.4811112517e-19   
+1.0137543150e-19    2.1849424635e-19    -2.4377089220e-20   -1.3386638140e-19   3.1481490951e-19    
+6.3177783660e-19    -3.2332027038e-21   -2.6243861605e-19   -1.9795030636e-19   -1.1335823147e-19   
+9.6552600162e-20    1.2718440227e-19    4.7799466553e-20    -4.4653865124e-20   1.0544977418e-19    
+7.7522723378e-20    6.7549359900e-21    4.9923424376e-20    -2.6705841761e-20   -1.5351207755e-19   
+2.4194437499e-20    1.1769533602e-19    -1.5913540803e-20   -4.9388351978e-22   3.8843462037e-20    
+4.6895303798e-20    1.0351869767e-19    -2.8745843736e-20   -1.0299875561e-19   1.2267373702e-19    
+5.5490888510e-20    -8.3003771647e-20   -1.4631675455e-19   8.7305624018e-20    3.1663912136e-19    
+1.3761935533e-20    -1.4507256710e-19   -1.6547711424e-20   -1.5430974381e-19   1.2091955686e-20    
+1.9021039105e-19    -3.5268578174e-20   6.4024897934e-20    1.1351393716e-20    8.9015195768e-21    
+-8.8025549191e-21   -1.1559154652e-19   1.1216680043e-19    5.0195115877e-20    -1.7456507677e-19   
+1.6705017027e-19    2.2734991023e-19    -2.3390431302e-19   -8.7424534563e-20   2.5545098599e-19    
+-3.9155901905e-20   -2.8162119538e-19   1.1706249312e-20    1.2600869460e-19    0.0000000000e+00    
+2.5885089074e-03    2.6839462230e-03    2.3404817671e-04    1.6631355980e-05    1.1106079054e-06    
+7.2210326367e-08    4.6088995780e-09    2.8888801859e-10    1.7749708342e-11    1.0663332318e-12    
+6.2468457574e-14    3.5585727317e-15    1.9621414421e-16    1.0570549701e-17    8.6094589492e-19    
+1.2458627567e-19    2.3966821482e-19    1.2300753631e-19    -2.8408017479e-19   -6.3052128384e-19   
+-2.4238529034e-19   4.0252632423e-19    4.0937885510e-20    1.0238460645e-20    -2.0471514252e-20   
+-1.8492505173e-21   2.1736321260e-19    -1.8247365287e-20   5.1255549133e-20    1.2747060737e-19    
+9.1666425766e-21    -1.8055868492e-20   -4.7931311211e-20   4.1061938567e-20    -1.2370722700e-19   
+-1.2220319809e-20   9.9351275741e-20    7.5281502148e-21    1.0218889172e-19    2.5245448233e-20    
+-1.0617960318e-19   3.1789774862e-20    1.5605047981e-19    -3.5864476612e-20   -3.8830739493e-20   
+9.7225086628e-20    2.7810895180e-21    -9.7332124472e-20   -4.6033809190e-20   1.4771580607e-19    
+6.4509564821e-20    -1.1583618717e-19   1.9002038902e-20    -3.9295820218e-20   -4.1331802860e-20   
+1.9617366221e-19    1.5597919892e-19    -4.2590988253e-20   2.1947819600e-20    -1.6169528423e-19   
+-1.4230730783e-19   1.9073751580e-19    1.4139759824e-20    -9.7359101899e-20   1.2484414852e-19    
+1.1287867769e-19    -1.4237000844e-19   -1.5262838306e-19   5.6498042420e-20    4.1821859144e-20    
+-1.0359122632e-19   1.6042377625e-19    1.8673194894e-19    -1.0546293018e-19   -2.1781657182e-20   
+1.0679785890e-19    -7.8459628745e-20   -5.5014885783e-20   1.5137597722e-19    8.7081527362e-20    
+0.0000000000e+00    2.1719345250e-03    2.2520192877e-03    1.9638291229e-04    1.3954878005e-05    
+9.3187749134e-07    6.0589415780e-08    3.8671753044e-09    2.4239581466e-10    1.4893118321e-11    
+8.9471791649e-13    5.2414843427e-14    2.9858672941e-15    1.6479221994e-16    9.0390275808e-18    
+4.8698756403e-19    1.2688896408e-20    1.1639970223e-19    4.8319530974e-20    -2.5648554700e-19   
+-5.3618285143e-19   5.7321796298e-20    1.5512903065e-19    -2.4913658517e-20   5.4426475740e-20    
+1.9145931297e-20    8.5579561352e-20    -2.5554621249e-20   -1.2397819462e-20   1.4593857320e-19    
+1.9621613081e-19    -2.0222601538e-20   -3.1388271230e-20   -3.4930154752e-20   -3.2089421221e-20   
+-1.0343149511e-19   -4.2793344974e-20   3.0398130345e-20    8.0740801496e-20    1.1605356049e-19    
+-2.7782917426e-20   -5.5803208183e-20   -3.8476620278e-20   9.3374343383e-20    2.3216955578e-21    
+-1.1251886492e-20   9.5335216989e-20    -5.2879557491e-20   -8.8783567819e-20   3.0875552987e-20    
+1.2253183132e-19    4.9378270517e-20    -9.2686602365e-20   -6.5616031367e-20   -2.1926114857e-20   
+-1.2935868689e-20   8.2956166321e-20    1.5633836041e-20    -1.1386316690e-19   7.0404517086e-20    
+-2.3904854068e-20   -7.7442210312e-20   7.6028642002e-20    -1.3365991641e-20   -4.0588687078e-21   
+1.1072496003e-19    9.4380733566e-20    -2.7653833493e-20   -8.4429799753e-20   -1.0519179003e-19   
+-2.8586815362e-20   6.3189025755e-20    8.7118392184e-20    3.2264878765e-20    1.6145893068e-20    
+1.1387740700e-19    5.3568339835e-20    -1.8996998065e-19   6.2536578988e-20    2.5925955159e-19    
+4.1611632797e-20    0.0000000000e+00    1.6893670110e-03    1.7516658860e-03    1.5275065245e-04    
+1.0854388123e-05    7.2483245124e-07    4.7127526454e-08    3.0079488662e-09    1.8853853634e-10    
+1.1584008654e-11    6.9591696977e-13    4.0768320552e-14    2.3223254210e-15    1.2810006808e-16    
+7.1954749309e-18    3.4718176663e-19    -1.1604007256e-19   -8.1772567559e-20   -3.0028983881e-20   
+-8.3569195494e-20   -5.0612616673e-19   -5.8146985731e-20   3.6139577393e-19    4.5774593682e-20    
+-1.0110069761e-19   1.7783001980e-19    2.4758500675e-19    -7.8708661779e-20   -1.2847430438e-19   
+1.1533304929e-19    1.3241403875e-19    -1.4130282502e-19   -1.3867344503e-19   2.5598740886e-21    
+6.7494129118e-20    2.3074913620e-21    1.2720982578e-20    3.6473640197e-20    4.5484167379e-20    
+9.0033335510e-20    -3.0187109064e-20   -8.7776018394e-20   1.7368366456e-20    6.9336617625e-20    
+-5.1607797888e-20   1.0043316784e-20    9.7315747215e-20    -1.2732112927e-20   -1.5689156090e-20   
+2.0129248145e-20    -1.5100598150e-20   6.5484954182e-20    -1.4251773799e-20   -1.3772065907e-19   
+-6.3286709706e-20   3.5582065412e-20    1.7237170449e-19    2.8548982168e-20    -1.5645154592e-19   
+-3.7635370059e-21   -6.3858235701e-21   5.6161911208e-20    4.0835989944e-20    -3.5682995975e-20   
+3.7327461979e-20    -2.5398504447e-20   -2.6796214392e-20   5.2720043736e-20    3.2825904005e-20    
+-1.2925945154e-19   -8.9843641036e-20   5.7457453050e-20    1.1517605191e-19    2.4898537499e-20    
+-2.6263650110e-20   1.3908124621e-19    1.6644327154e-20    -2.0114992328e-19   7.2223145997e-20    
+1.7687737791e-19    9.9034623566e-21    0.0000000000e+00    1.1554689353e-03    1.1980890028e-03    
+1.0447714133e-04    7.4240931511e-06    4.9576374390e-07    3.2233691085e-08    2.0573274235e-09    
+1.2895261002e-10    7.9229246845e-12    4.7597099089e-13    2.7883045272e-14    1.5883070434e-15    
+8.7557476215e-17    4.7835342582e-18    2.7462318760e-19    6.5338068236e-21    1.0260508644e-20    
+2.3108927119e-20    -7.6138922457e-20   -2.9725082847e-19   1.8673371440e-20    3.3137740397e-19    
+-1.7728156636e-20   -1.1222411363e-19   1.1728297497e-19    1.3125725172e-19    -8.7535302427e-21   
+-1.1427460177e-19   1.3872865594e-20    9.8229305437e-20    -4.8961436854e-20   -1.2099960277e-19   
+-2.4033544871e-20   1.0107363956e-19    1.1278629633e-19    6.4637032659e-21    -5.5520331327e-20   
+-7.6825557321e-20   5.7105481573e-20    3.2666297448e-20    -7.1208767249e-20   8.5296715607e-20    
+1.0057902069e-19    -3.9797564131e-20   -2.4703066696e-20   4.1994058167e-20    2.3656629598e-20    
+-1.1656109212e-20   -7.5665707426e-21   2.5780367047e-20    1.9808670636e-20    -1.1553359972e-20   
+-3.8853457086e-20   -2.1925142732e-20   -1.5829415093e-20   8.8055437120e-20    6.9742002590e-20    
+-7.8255804601e-20   -9.5062689361e-21   -3.7661293298e-20   2.1046019586e-20    7.7134367273e-20    
+3.5390293431e-20    -6.1094761188e-20   -1.2018569886e-19   5.3373852368e-21    8.2224389510e-20    
+3.6241233239e-20    -1.1284229906e-19   -6.5524778306e-20   7.6886385720e-20    1.1026239882e-19    
+1.0204569651e-20    -4.2343379116e-20   8.8765945243e-20    3.3033902088e-20    -1.3547461749e-19   
+-4.1273954889e-20   8.8806903093e-20    4.8379714329e-20    0.0000000000e+00    5.8646252074e-04    
+6.0810879143e-04    5.3029145137e-05    3.7682208651e-06    2.5163150606e-07    1.6360451323e-08    
+1.0441951282e-09    6.5448524058e-11    4.0211064704e-12    2.4156276563e-13    1.4150631043e-14    
+8.0609553465e-16    4.4520031624e-17    2.3668973899e-18    4.0198338972e-20    -4.9670456510e-20   
+9.9484716517e-20    1.0579801331e-19    -1.3688639700e-19   -1.0067044602e-19   1.7329866257e-19    
+1.1450292770e-19    3.9679637638e-21    -5.2882411973e-20   -1.1004423870e-19   3.4232830147e-20    
+5.5645194472e-20    -5.6418849159e-20   1.3542420429e-20    9.1828719572e-20    2.8801277824e-20    
+-5.8269145423e-20   -4.4511759599e-20   3.7948032319e-20    7.3076469039e-20    3.9387770710e-21    
+-5.1495693992e-20   -4.7306019348e-20   3.0694735206e-20    4.6646855520e-20    -2.7886196476e-20   
+1.0951257623e-20    8.6432053562e-20    -8.5553251136e-21   -3.9196783982e-20   2.8822774458e-20    
+2.8639820911e-20    6.6079510427e-21    -1.1642457261e-20   6.0519303646e-21    -2.3155712529e-20   
+-1.5288716856e-20   3.5488142160e-20    -4.8113790482e-21   -3.8765723709e-20   1.8346761662e-21    
+-4.2729923931e-21   -3.2662026623e-20   4.4586824751e-20    1.1980674000e-20    -5.5988097365e-20   
+1.7718757555e-20    4.5951620457e-20    -3.1032222719e-20   -4.3715516179e-20   1.1655738745e-20    
+3.7701301887e-20    2.6533746912e-21    -5.6927063350e-20   -3.3878902324e-21   3.0465684127e-20    
+2.2129887366e-20    2.4152054379e-20    8.6702817453e-21    1.9312963773e-20    1.6205756596e-20    
+-3.2934859913e-20   -3.9746442289e-20   3.9154552998e-20    4.2278034043e-20    0.0000000000e+00    
+-3.6326078546e-07   -3.4849782370e-07   -3.0114793645e-08   -2.1469050463e-09   -1.4642775156e-10   
+-9.8924737985e-12   -6.6450755891e-13   -4.4182127078e-14   -2.8909670674e-15   -1.8521066534e-16   
+-1.1571977938e-17   -6.8788821236e-19   -2.5875449728e-20   4.9550068600e-21    -3.8202131823e-20   
+-3.2906090371e-20   6.5060832037e-21    3.3475182588e-20    2.1093656243e-20    -9.4157545978e-21   
+9.9991349724e-21    1.1313183443e-20    5.3955306553e-21    -1.0201753583e-20   -4.2742674590e-20   
+-1.9997022694e-20   1.6339237059e-20    2.2181521372e-20    1.7507989108e-20    7.4270676843e-21    
+1.0050365538e-20    1.3450164415e-21    -5.2585947928e-21   -1.4496851993e-21   -1.7120124112e-21   
+3.4228144992e-21    -2.3784002156e-21   -9.0140166293e-21   -2.3676184210e-21   5.8044604387e-21    
+5.3742007369e-21    3.6674972377e-21    1.6970525373e-20    -8.2978784833e-22   -1.3975928990e-20   
+-3.8148224321e-21   6.9491128051e-21    8.4205778031e-21    -1.5900481022e-20   -1.9888145611e-20   
+6.7569598222e-22    2.9398400423e-21    -1.5457880777e-20   -1.0085220101e-20   -8.8926072472e-22   
+-6.4272464470e-22   6.7807905773e-21    -3.2660059533e-21   1.4979120441e-20    1.3805709799e-20    
+-1.5255185014e-20   -5.0829847044e-21   -4.1805713287e-21   -1.1683800110e-20   -5.2352787241e-21   
+1.0464244076e-20    1.1803989251e-20    -3.4925982028e-21   3.7586928033e-21    1.0673223724e-20    
+6.6350349911e-21    4.7409154223e-21    -9.7214159270e-21   -1.5697875020e-20   2.2880265614e-21    
+1.0663613860e-20    -4.2696392168e-21   -2.8234813041e-21   9.9255442437e-21    7.1520182585e-21    
+0.0000000000e+00    -5.8717800482e-04   -6.0879519815e-04   -5.3088459702e-05   -3.7724494426e-06   
+-2.5191991243e-07   -1.6379935693e-08   -1.0455039526e-09   -6.5535545985e-11   -4.0268006374e-12   
+-2.4192748561e-13   -1.4173394804e-14   -8.0750745384e-16   -4.4654526079e-17   -2.3564165269e-18   
+-4.5108258186e-20   -6.8058876689e-20   -1.3073081732e-19   -3.6347970961e-22   1.8155264248e-19    
+9.5248672781e-20    -8.5109728433e-20   -6.5360304814e-20   -1.0491785167e-19   -3.2092620013e-20   
+1.1041899458e-19    -1.9707675542e-20   -2.2495660409e-20   4.0376651112e-20    3.4488023509e-20    
+4.5353374652e-20    5.3487203255e-21    -4.7966430737e-20   -4.6554710297e-20   -1.6623409188e-20   
+-1.2865420356e-20   2.9328227825e-20    6.5459797824e-21    -3.9712568088e-21   1.3488976585e-20    
+-4.0713372922e-21   9.7654577783e-21    1.4584260755e-20    -2.1846323435e-20   -4.6323426705e-20   
+-3.9265632789e-21   1.3607484814e-20    -2.8265921061e-20   -7.5853443206e-21   -2.0000895047e-20   
+-2.4009705515e-20   3.3218562054e-20    2.5277198464e-20    -3.2382407230e-20   -2.2507301810e-20   
+1.1855200109e-20    -1.1413818014e-20   4.1235238023e-21    4.9584457663e-20    -3.8770413628e-21   
+-1.1274591859e-20   5.3858441496e-20    -9.0698320189e-21   -6.0376376452e-20   -8.9090040103e-21   
+3.6075446247e-20    -7.1861960818e-21   -1.1509388299e-20   5.1528914398e-21    1.4513380552e-20    
+4.5636235611e-21    -2.2271190281e-20   -1.6486507709e-20   -6.9771399145e-22   4.4631501062e-21    
+-1.6714509000e-20   -3.9396025612e-22   -4.1547475126e-21   -2.6251184928e-20   -1.0260630428e-21   
+1.7788782342e-20    0.0000000000e+00    -1.1561516423e-03   -1.1987439645e-03   -1.0453373863e-04   
+-7.4281280128e-06   -4.9603893805e-07   -3.2252282854e-08   -2.0585762890e-09   -1.2903564536e-10   
+-7.9283579501e-12   -4.7631905250e-13   -2.7904559334e-14   -1.5896167124e-15   -8.7919936485e-17   
+-4.7288204576e-18   -6.8433907177e-20   1.9289372966e-20    -2.2585356728e-19   -1.6576580774e-19   
+8.6861835431e-20    1.5373830839e-19    4.7535665450e-21    -1.2342878951e-19   -1.0940536960e-19   
+-1.0501881692e-20   1.5083438662e-19    -1.2498823722e-20   -1.9486332026e-19   -4.6756570920e-20   
+8.2610004263e-20    8.3736110231e-20    6.6340275443e-20    -3.9064748060e-20   -7.3729764726e-20   
+-1.8287284758e-21   2.4532396231e-20    -2.0098112969e-20   -5.1352542453e-20   1.2318945541e-20    
+6.6341912473e-20    5.1516299571e-20    3.1998627724e-20    -8.5516059511e-20   -1.5922607486e-19   
+-1.1981566907e-20   8.5830273474e-20    -1.4756025892e-20   -5.9623009522e-20   -1.0877992584e-20   
+-4.2499906656e-20   -1.3604089856e-20   1.0642182591e-21    1.9391981829e-20    5.3567686991e-20    
+2.2372313879e-20    9.3359245173e-21    -7.4053182722e-20   -4.2288259503e-20   1.1375976583e-19    
+2.0006370855e-20    -1.4323968704e-20   4.9542983794e-22    -3.3455272524e-20   -2.7753299850e-20   
+1.7785305829e-20    6.8074994785e-20    -2.2463918121e-20   -4.5546716778e-20   -2.1919746269e-20   
+3.6031686676e-20    4.2529117187e-21    -5.6069579499e-20   -4.2358143615e-20   1.6275773201e-20    
+6.4721286011e-20    -5.7660206928e-20   -7.2766295203e-20   6.7947743985e-20    3.2695566295e-20    
+-5.5336886079e-20   -2.3630663863e-20   0.0000000000e+00    -1.6899961972e-03   -1.7522695020e-03   
+-1.5280281280e-04   -1.0858106672e-05   -7.2508607155e-07   -4.7144660721e-08   -3.0090998268e-09   
+-1.8861506192e-10   -1.1589015882e-11   -6.9623788538e-13   -4.0788166894e-14   -2.3233772280e-15   
+-1.2816835436e-16   -6.9964068406e-18   -5.0832914750e-19   -4.3417631853e-20   -3.7109697756e-20   
+1.0479118880e-20    -6.3139137423e-20   2.3046971424e-19    1.7025544081e-19    -2.3423477970e-19   
+-7.8740008806e-20   1.6250612777e-20    1.9320110697e-19    -1.1913019448e-19   -2.9518985918e-19   
+-3.5848903665e-20   6.3793684452e-20    5.7741251950e-20    2.5149465810e-20    3.0936002524e-21    
+-3.8448247891e-20   -7.0157123661e-20   3.4830582742e-21    -1.8448819058e-20   -9.6887197356e-20   
+1.0167743516e-20    5.2814656981e-20    -8.8308967030e-21   2.9355879301e-20    -5.8799814098e-20   
+-1.5443630490e-19   8.3580896894e-20    1.2871028697e-19    -9.8464771187e-20   -7.8173019228e-20   
+-2.0035338574e-21   -1.7952472912e-20   -7.8886690603e-21   -5.3112498120e-20   9.3265877335e-20    
+1.1278786296e-19    3.3838233096e-20    2.1621956096e-20    -1.7110907099e-19   -1.5644693175e-20   
+9.4076820630e-20    -1.4810448718e-20   8.8882981931e-20    -2.9520982911e-20   -7.8100347444e-20   
+3.0206596453e-20    -1.4630872950e-20   9.6143926110e-21    4.8240614652e-20    -9.6982209952e-21   
+-3.3119422731e-20   -4.0194482128e-20   -2.4525605001e-20   7.3921531720e-20    -7.0709000018e-20   
+-1.0459294521e-19   7.4442957200e-20    -5.9657709658e-20   -1.0294878940e-19   1.6321336819e-19    
+1.0871720973e-19    -1.1072723908e-19   -6.3157591520e-20   0.0000000000e+00    -2.1724910728e-03   
+-2.2525532174e-03   -1.9642905083e-04   -1.3958167255e-05   -9.3210183167e-07   -6.0604571929e-08   
+-3.8681933890e-09   -2.4246350556e-10   -1.4897547797e-11   -8.9500172895e-13   -5.2432251597e-14   
+-2.9867563348e-15   -1.6465390046e-16   -9.0607882291e-18   -7.8397090860e-19   -2.4053775939e-19   
+-5.2123686183e-20   1.8104542838e-19    5.7414178346e-20    4.0613584876e-19    9.8281080514e-21    
+-3.1236955579e-19   1.6232477884e-19    -7.6907169478e-20   5.6104091356e-20    -3.0058793783e-21   
+-1.3807333153e-19   -9.1646500582e-20   -1.5484176238e-19   -3.0460628830e-20   6.4448821328e-20    
+4.8245515441e-20    7.0976742294e-21    -5.5978699607e-20   -4.1429159278e-20   4.1543449348e-20    
+2.8438172171e-20    1.9448586472e-20    -7.3214814858e-20   -4.6143660623e-20   -6.4360545444e-20   
+-3.0444687193e-20   3.4471698802e-20    -1.4313590268e-20   8.2545536754e-20    -1.4628540246e-20   
+-3.0902845883e-20   6.6658162518e-20    -1.0720402224e-20   -1.1504461131e-19   -2.4529035832e-20   
+1.4417529009e-19    -5.6506355591e-20   -1.6384781965e-20   1.0169000156e-19    -1.9610313450e-19   
+-1.4420567470e-20   1.8596348361e-19    -4.0946082324e-21   3.9977191889e-20    1.3877021998e-20    
+-8.9233129369e-20   7.2219559469e-21    3.1608191742e-20    -8.5660059180e-20   -9.8580812459e-21   
+6.2686766031e-20    2.5986648717e-20    -4.9022472918e-20   -2.7706264944e-20   4.9147945284e-20    
+-1.1190359951e-19   -9.3212668015e-20   7.4562406381e-20    -1.0715677480e-19   -1.3133125233e-19   
+2.2389846542e-19    6.5059902657e-20    -2.0500415835e-19   -7.2832566165e-20   0.0000000000e+00    
+-2.5889759065e-03   -2.6843942431e-03   -2.3408689154e-04   -1.6634115988e-05   -1.1107961493e-06   
+-7.2223043886e-08   -4.6097538524e-09   -2.8894481812e-10   -1.7753425038e-11   -1.0665711988e-12   
+-6.2482970195e-14   -3.5594093272e-15   -1.9634407257e-16   -1.0650806455e-17   -1.1685365806e-18   
+-2.8615667199e-19   2.1316164780e-19    5.8654471386e-20    1.7645564593e-19    6.4413270900e-19    
+2.0604226036e-20    -6.0332092438e-19   -1.4701789922e-20   1.2815139733e-19    -8.4089362720e-20   
+-9.5023315242e-20   5.9047413870e-20    -1.6366865841e-19   -4.6966027984e-19   -4.0010207486e-20   
+3.4652919361e-19    2.0521785255e-19    5.1864551284e-21    -1.5621295200e-19   5.3794392300e-21    
+1.1092574580e-19    4.4455583648e-20    -2.4875171946e-20   -1.2378172438e-19   -1.9448995540e-20   
+-4.1707381911e-20   -5.8111873880e-20   -1.2508857513e-20   -1.3727107871e-20   4.5537300529e-20    
+-2.6910006477e-20   1.9959079936e-21    -2.2038401336e-20   -5.6344426269e-20   -1.5160143295e-21   
+-5.0733118611e-20   1.7795199447e-20    -1.2807376437e-20   1.4745750600e-19    8.0982641540e-20    
+-3.0718276834e-19   -1.4571730266e-19   1.7415770779e-19    1.0375463483e-19    6.9721853684e-20    
+3.4416109162e-20    -5.2828371194e-20   -5.8570367282e-20   -4.6290494262e-20   -6.4895818520e-20   
+-9.0907207387e-21   1.7718363294e-19    4.8115761403e-20    -8.9651297002e-20   1.7547114313e-20    
+4.9062457880e-21    -1.0512464513e-19   -8.9321866777e-20   1.5347371278e-19    -5.3249282572e-20   
+-2.5189037835e-19   1.2629598104e-19    1.0519478866e-19    -1.4286579489e-19   -9.4103677488e-20   
+0.0000000000e+00    -2.9267960173e-03   -3.0346713082e-03   -2.6463212051e-04   -1.8804645525e-05   
+-1.2557394880e-06   -8.1647055202e-08   -5.2112492780e-09   -3.2664668838e-10   -2.0069873432e-11   
+-1.2057339167e-12   -7.0635283095e-14   -4.0237145580e-15   -2.2197874508e-16   -1.1954233591e-17   
+-1.3789855257e-18   -2.7046887681e-19   3.3677114586e-19    1.2917286281e-19    1.8129696981e-19    
+6.0817354060e-19    2.7275692619e-19    -7.2646027307e-19   -2.8716986836e-19   1.4397586544e-19    
+-2.0604114651e-20   -1.8411931480e-19   -1.7202026636e-19   -8.0613152254e-20   -2.0535271229e-19   
+-4.5346210122e-21   2.7681810589e-19    2.1301162708e-19    -8.6856089202e-20   -2.6259974687e-19   
+1.1959242605e-21    1.0871745869e-19    -3.0129890149e-20   -8.4874318936e-20   -1.3265036230e-19   
+-6.9150028091e-21   1.6544376743e-19    -9.0735705002e-20   -1.7781087619e-19   5.8789619698e-20    
+2.5064208942e-21    -1.2702769580e-19   -3.6755776090e-20   2.7952939043e-20    3.5194290735e-20    
+3.8766852244e-20    -1.4467661813e-19   -1.7731027438e-20   1.8984532826e-19    1.2514566172e-19    
+-7.0049495940e-20   -2.7589531533e-19   -2.1358642777e-19   9.0317305740e-20    2.2468832629e-19    
+2.5014326310e-19    -1.0296689317e-19   -2.0325721276e-19   -4.6856714074e-20   -3.6717885482e-20   
+9.2628379606e-20    3.8914032487e-20    1.0741621922e-19    1.5425453769e-21    -9.7458926896e-20   
+5.8008531882e-20    7.7223666903e-20    -1.8381517334e-19   -1.0102907840e-19   2.1705047315e-19    
+-8.6064407069e-20   -2.4687920833e-19   8.8045568727e-20    1.3855957345e-19    2.7589293336e-22    
+-2.0731905395e-20   0.0000000000e+00    -3.1756869079e-03   -3.2927414157e-03   -2.8713663575e-04   
+-2.0403805364e-05   -1.3625278129e-06   -8.8590261662e-08   -5.6544034995e-09   -3.5442356172e-10   
+-2.1776508993e-11   -1.3082612520e-12   -7.6641282262e-14   -4.3656886588e-15   -2.4107313740e-16   
+-1.3052656604e-17   -6.9794744174e-19   -2.5649824096e-19   -2.2835653845e-19   4.5258325604e-19    
+4.9236198437e-19    4.4860374680e-20    -3.6758362903e-19   -4.5547381094e-19   -2.5014364937e-20   
+5.5410812869e-21    2.0866968272e-19    -9.1246411057e-20   -4.0600576860e-19   1.7614838532e-19    
+1.1533350727e-19    -1.4232119783e-19   1.6477231867e-20    3.4930949953e-20    3.1842088346e-21    
+-1.9505824144e-19   -1.8722526656e-19   3.7929174155e-20    1.3882479934e-19    1.3923842639e-19    
+-1.8749918093e-19   -1.1528989576e-19   1.8744865621e-19    -1.0989999844e-19   -2.5691793045e-19   
+1.7376930693e-20    6.8059249909e-20    -1.0754305588e-19   -6.8177803410e-20   9.9142657317e-20    
+1.1155299893e-19    1.3984296193e-20    -5.7309439527e-21   -4.4914669161e-20   -3.1081407294e-20   
+4.3975126999e-20    2.0989432937e-20    -1.3113635774e-19   -8.0276884407e-20   1.8396262116e-19    
+3.8927922734e-20    1.1400852485e-19    -7.3365237841e-20   -2.7533660275e-19   -1.2506603411e-20   
+2.0996587269e-19    1.6357315517e-19    -6.9928083453e-20   -1.1442862881e-19   -2.3130037756e-20   
+1.9229748873e-19    3.1856656832e-20    -1.9164353086e-19   -2.1358117157e-19   4.5817790377e-20    
+1.8439392424e-19    -2.4450367239e-19   -2.5674724511e-19   2.6587314510e-19    2.0055431671e-19    
+-1.3585949783e-19   -1.0313815814e-19   0.0000000000e+00    -3.3276544425e-03   -3.4506432566e-03   
+-3.0090550448e-04   -2.1382128033e-05   -1.4278511756e-06   -9.2836985213e-08   -5.9254185503e-09   
+-3.7140844215e-10   -2.2819923878e-11   -1.3709352058e-12   -8.0311897880e-14   -4.5749051702e-15   
+-2.5285267563e-16   -1.3373955118e-17   -2.3750154520e-19   -1.4926701984e-19   -3.7483762271e-19   
+2.3379454830e-20    5.5081909089e-19    3.3131855879e-19    -7.8205693708e-19   -3.0119562700e-19   
+2.5910406261e-20    -1.5904430142e-19   1.5236309049e-19    -3.5590995475e-19   -1.6625691847e-19   
+3.9854507166e-19    -1.2184836908e-19   -1.4690320219e-19   1.4345086234e-19    -1.1197503856e-21   
+2.4713273582e-19    -5.2747636701e-20   -4.2637831938e-19   3.1496865118e-20    2.1619279622e-19    
+1.3639050670e-19    -4.3896063141e-21   -1.7742832579e-19   -9.1877451953e-21   -2.4097453248e-20   
+-3.0927953062e-19   -4.4797350158e-20   1.5281127567e-19    2.1118970220e-20    -2.6789670891e-20   
+6.4886781571e-21    -5.8061857531e-20   4.1026071926e-20    2.0912586145e-19    -9.2845443300e-20   
+-2.0989761808e-19   4.4603215302e-20    9.1946263260e-20    -1.2082470464e-19   -4.6723803419e-20   
+2.6589128900e-19    -9.1191884920e-20   -2.6272973213e-19   5.0961297942e-20    5.7316333129e-20    
+8.7016045491e-20    1.4193230237e-19    6.5388875580e-20    -8.4708930016e-20   -1.9858508538e-19   
+6.7679802405e-20    1.9255803825e-19    -1.6343375472e-19   -1.0929795772e-19   2.0662467123e-20    
+5.1135131165e-20    -1.7689584095e-20   -2.8322810542e-19   -1.3220427624e-19   2.1838709163e-19    
+9.6111904189e-20    -2.2017679694e-19   -1.4281367677e-19   0.0000000000e+00    -3.3785315485e-03   
+-3.5037258975e-03   -3.0553380841e-04   -2.1710926774e-05   -1.4498008358e-06   -9.4263626608e-08   
+-6.0164408060e-09   -3.7711143377e-10   -2.3170172959e-11   -1.3919671141e-12   -8.1543139306e-14   
+-4.6451755977e-15   -2.5682632201e-16   -1.3328960480e-17   -1.3570810686e-19   2.9292605538e-20    
+-2.9767901295e-19   -7.1707149167e-19   2.4238362301e-19    9.8803275169e-19    -5.2334288333e-19   
+-2.1834927565e-19   1.9889245932e-20    -5.0790395898e-19   -2.5368540267e-19   -4.9219013255e-19   
+6.9389107938e-20    3.9942531225e-19    -2.8815542171e-19   -3.6692670024e-20   3.3154191626e-19    
+5.4573207671e-20    3.5361512879e-19    1.2949381785e-19    -5.6283174725e-19   -1.0594888478e-20   
+1.4428467279e-19    -7.1955150613e-20   2.1223748531e-19    -9.9685273734e-20   -1.0300690245e-19   
+3.8524844205e-21    -3.4925570729e-19   -1.2041411746e-19   1.6209577799e-19    1.6421030164e-19    
+3.9048881234e-20    5.1341047040e-20    -2.0056704420e-19   -1.0064754540e-19   2.3741157620e-19    
+-5.1545171945e-20   -1.4500553358e-19   -7.9603387870e-20   6.8114846281e-21    -8.3848411876e-20   
+-1.5311780396e-19   3.4463284812e-19    8.2639587975e-20    -5.2135260872e-19   -5.9644222824e-20   
+3.0267478111e-19    2.4095057479e-19    4.6327742042e-21    -2.6672559789e-20   -5.6422810236e-20   
+-2.0579955689e-19   1.4162826647e-19    1.7090149729e-20    -2.7362003942e-19   2.1462747650e-19    
+1.6941698088e-19    2.2890530037e-20    -1.8124459366e-19   -3.2055132503e-19   7.8167681450e-20    
+7.8984619587e-20    -1.3954049796e-19   -1.8206078877e-19   -2.9161943403e-20   
+0.0000000000e+00    -2.0328790734e-19   -2.1938153334e-19   -1.6887719386e-20   -1.4392942658e-21   
+-8.6026783706e-23   -4.9889330695e-24   -3.6189151799e-25   -2.2416271483e-26   -1.1738250270e-27   
+-7.2969633733e-29   -4.8564249478e-30   -2.4651903288e-31   9.3937233037e-32    1.7440348889e-31    
+8.1364521619e-32    -1.6214298878e-32   -1.4324480120e-32   -4.4728218326e-32   -1.1159560322e-31   
+4.3808511546e-32    1.2791184096e-31    -6.7377455398e-32   -2.0365505456e-31   -1.6471967239e-31   
+-2.8257003403e-33   9.0333637556e-32    3.0736638206e-32    5.0380371323e-32    2.1229164665e-31    
+1.9760944009e-31    9.1596024449e-32    4.1108071883e-32    4.1865654483e-32    5.4404511663e-32    
+1.6516353906e-32    -3.5569518660e-33   -5.3061250759e-32   2.0365204529e-32    1.0716304912e-31    
+5.8814590309e-32    3.5774148717e-32    3.2557525975e-32    -6.2457306243e-33   -7.2796766474e-32   
+-9.7839498124e-32   -1.1000326681e-31   -6.2592723193e-33   9.1608061511e-32    -5.5283969517e-33   
+-2.3652827130e-33   6.5583180821e-32    1.3553675560e-31    6.1844168390e-33    -1.1215607892e-31   
+-9.1645113093e-32   -1.5323180120e-32   5.3120307595e-32    -8.4941033711e-32   -9.2953203207e-32   
+-1.2129597068e-31   -5.0206962396e-32   3.5610143745e-32    5.0063646125e-32    7.8093449979e-32    
+-5.6824713472e-32   4.2660852901e-32    1.3078578359e-31    -2.9473498997e-32   -1.6653508236e-31   
+-1.0516442660e-31   -1.0218337293e-32   2.4320884079e-32    2.7705179335e-32    -9.5253598631e-32   
+2.5030318430e-32    1.0709543468e-31    -4.8667346915e-32   -2.0115548337e-31   1.7754666675e-32    
+-2.3355436282e-20   0.0000000000e+00    5.8318297498e-04    6.0842450312e-04    5.3060314096e-05    
+3.7704032075e-06    2.5177304747e-07    1.6369475101e-08    1.0447672537e-09    6.5484503048e-11    
+4.0233370188e-12    2.4169817417e-13    1.4158663078e-14    8.0658330417e-16    4.4559192873e-17    
+2.3884142850e-18    7.8931064004e-20    -1.1558062085e-19   4.0907590571e-20    4.1744687478e-20    
+-1.2403461533e-19   1.9292530043e-20    1.0059436830e-19    6.5981259277e-20    3.1038883844e-20    
+1.4377083763e-20    8.3185485591e-20    7.8235083814e-20    -4.4099503190e-20   -7.5856707242e-20   
+-4.8022003523e-21   4.9630282932e-20    9.5881200068e-21    -3.5506309195e-20   4.6010106180e-21    
+1.3451529174e-20    -1.4174703731e-20   -2.7808480885e-20   7.5569329685e-21    3.0480922535e-21    
+-1.4713375422e-20   2.3392826585e-20    4.6331566718e-21    -3.9356589576e-21   5.1586045629e-20    
+2.5915475906e-20    -3.6336842239e-20   -2.9388161342e-21   3.4479397962e-20    4.7545991199e-21    
+2.2973727377e-21    -5.1749421830e-21   6.1426968275e-21    2.0454244478e-20    7.0404181396e-21    
+2.9354776693e-20    -1.4026739735e-20   -2.7564328340e-20   8.7534908713e-21    -3.9906703003e-20   
+-6.3553594464e-21   3.9465024040e-20    -9.8518786837e-21   -6.8625526219e-21   -7.9778730892e-21   
+1.3376109698e-20    1.5964057557e-20    -2.9352990841e-20   3.2261532386e-20    2.2137319969e-20    
+1.2381979128e-21    2.8298367058e-20    -5.0614251065e-20   -8.4187155867e-21   4.6203975762e-20    
+-4.1552250876e-21   8.3366919311e-21    -1.0484260691e-20   -3.2903479090e-20   3.4227790541e-20    
+5.6395905717e-20    1.0092397406e-20    0.0000000000e+00    1.1561512048e-03    1.1987438980e-03    
+1.0453373113e-04    7.4281272630e-06    4.9603886759e-07    3.2252276511e-08    2.0585757393e-09    
+1.2903559932e-10    7.9283540742e-12    4.7631864518e-13    2.7904594880e-14    1.5897228580e-15    
+8.7710080949e-17    4.5320083079e-18    2.4564092573e-19    5.9789434855e-21    8.4078105927e-20    
+7.9850868966e-20    -1.8245915879e-20   4.4977885221e-20    -4.1151356490e-20   1.4994684999e-20    
+8.6859352301e-20    1.8001136215e-21    3.1174031795e-20    1.1987286162e-19    1.4525638945e-19    
+-2.8405669915e-20   -1.2998204191e-19   -4.8286793019e-20   -5.4352444244e-20   2.1051603465e-20    
+5.2183738144e-20    1.3298831359e-20    9.7745117631e-21    -2.2329053171e-20   1.9617607568e-20    
+1.9472823508e-20    -1.6437530530e-20   1.4177030514e-20    -3.4672425517e-20   1.1692785351e-20    
+1.0312647279e-19    1.7446301591e-20    -4.3713069230e-20   -1.1179992242e-20   2.9319606405e-20    
+5.3069765805e-20    3.7103115052e-20    -4.9276617592e-20   2.8258488528e-20    5.9660776839e-20    
+-6.2636499665e-20   -1.2130946140e-20   3.4058077726e-20    2.5145622821e-20    -3.5407023147e-20   
+-1.0351480381e-19   -3.4760065848e-21   3.2516137624e-20    3.6705104202e-20    2.4108628767e-20    
+-3.9421456062e-20   1.4784997629e-20    -2.2439015393e-20   4.9127207848e-21    8.7814206275e-20    
+-2.2636171691e-20   1.9579541808e-20    5.0664681540e-20    -7.9916358359e-20   1.0109274508e-20    
+7.3926719832e-20    -4.9609543151e-20   8.8017798169e-21    4.9473861910e-20    -6.9937739492e-20   
+-3.2008978707e-20   1.7682940670e-20    -9.3047438374e-21   0.0000000000e+00    1.6899961971e-03    
+1.7522695020e-03    1.5280281280e-04    1.0858106672e-05    7.2508607153e-07    4.7144660719e-08    
+3.0090998268e-09    1.8861506196e-10    1.1589015896e-11    6.9623756689e-13    4.0788130238e-14    
+2.3236532691e-15    1.2801477583e-16    6.8991577090e-18    4.4501926414e-19    5.8994862788e-20    
+2.2004949934e-19    1.3978538762e-19    -6.8521255632e-20   -3.6662263627e-19   -8.6716505011e-20   
+2.8729060410e-19    -5.9759228226e-22   -5.9296457151e-20   -7.2833876059e-20   8.3793185350e-20    
+3.3108283860e-19    5.9309826021e-20    -1.0263312419e-19   -7.7186184296e-20   -3.4546909530e-20   
+-3.8052081867e-20   5.5753643611e-21    8.3893951975e-20    -2.3162498111e-20   1.9262128523e-20    
+1.1398098180e-19    4.1483163884e-20    -5.6997200537e-21   -3.7049330373e-20   -9.7519519309e-20   
+2.4364842885e-21    1.3897606760e-19    1.0263320820e-20    -2.2877971496e-20   2.3765059755e-20    
+1.5393195972e-20    4.8630963722e-20    7.2774436080e-21    -6.1677755754e-20   2.2521334297e-20    
+1.1240785024e-20    -4.4913016282e-20   -7.4786897016e-20   1.4436865720e-20    2.0036582727e-19    
+4.3741583095e-20    -9.3670892693e-20   1.9364255853e-20    -6.5990129377e-20   -1.4363062037e-20   
+1.0156996613e-19    -5.5748541387e-20   -1.2474491586e-20   4.5846631184e-20    3.6347263275e-20    
+1.6418998819e-21    -8.1841292763e-20   7.0770210689e-20    6.1517220920e-20    -1.3372918187e-19   
+6.1279978193e-20    1.3942790178e-19    -1.1725195230e-19   -2.6977438178e-20   1.0356988634e-19    
+-4.1261066017e-20   -8.2901759601e-20   -9.4738577261e-21   2.2385087872e-20    0.0000000000e+00    
+2.1724910728e-03    2.2525532174e-03    1.9642905083e-04    1.3958167255e-05    9.3210183167e-07    
+6.0604571929e-08    3.8681933891e-09    2.4246350559e-10    1.4897547695e-11    8.9500153411e-13    
+5.2432391275e-14    2.9869564414e-15    1.6457073955e-16    9.1068923522e-18    7.1399237069e-19    
+1.6360393216e-20    2.9902773419e-19    1.1307455373e-19    -2.7865943202e-19   -6.0955968897e-19   
+-1.6671386052e-20   3.2303161295e-19    -7.5329171297e-20   7.2890837835e-20    -2.0215948498e-20   
+-6.1558205629e-20   1.1301088446e-19    9.8347897691e-20    6.4483676029e-20    4.9028107881e-20    
+9.2999818413e-20    -2.6168963515e-20   -4.9051466922e-20   3.5112550049e-20    -1.8939251993e-19   
+-3.2211053687e-20   1.2726664039e-19    1.8321966484e-20    6.4314413672e-20    -8.7875854651e-22   
+-5.3250200033e-20   -9.8293193495e-21   1.1681625373e-19    4.2715364797e-20    -5.4932961571e-20   
+2.1228138702e-20    -3.4856503681e-20   -6.9200376550e-20   1.1528482868e-20    1.3797819440e-19    
+6.1962490511e-20    -9.5310089496e-20   -5.4449971344e-20   -7.5164535288e-20   -2.9400878847e-20   
+2.1075721969e-19    1.4530162490e-19    -1.0426244390e-19   4.7784279247e-20    -1.1311405371e-19   
+-1.7264673321e-19   1.7863118600e-19    8.2235653328e-21    -1.1032978807e-19   1.2758192190e-19    
+1.3418381122e-19    -8.2152821722e-20   -1.3284805722e-19   2.2043199812e-20    1.9342008153e-20    
+-5.1614833112e-20   1.1447905766e-19    9.6723966216e-20    -8.5073726333e-20   1.1495542856e-20    
+9.4274894333e-20    -9.5896152113e-20   -2.5062733729e-20   1.6166813726e-19    7.3908227934e-20    
+0.0000000000e+00    2.5889759065e-03    2.6843942431e-03    2.3408689154e-04    1.6634115988e-05    
+1.1107961493e-06    7.2223043886e-08    4.6097538524e-09    2.8894481820e-10    1.7753425118e-11    
+1.0665713796e-12    6.2483464194e-14    3.5596104166e-15    1.9631118212e-16    1.0757098765e-17    
+7.8269089090e-19    -5.8290854054e-21   6.6649023486e-20    -1.2084632266e-19   -3.5340780090e-19   
+-5.4698033894e-19   -2.1371304447e-19   7.2440969529e-20    2.2563451489e-19    2.0311158957e-19    
+-7.1533476041e-20   1.2367783798e-19    -2.6733920810e-21   -1.5058209350e-20   2.6768076934e-19    
+1.6745088337e-19    -7.0451562885e-20   -1.7160535003e-20   -4.4469420516e-20   -5.3381556977e-21   
+-1.8391363901e-19   -7.2291966838e-20   8.8548223295e-20    4.3856455511e-20    1.7683105380e-19    
+3.5443532561e-20    -6.8481901780e-20   -2.2567267202e-20   1.2885857266e-19    1.2062069381e-20    
+-6.4081719746e-20   3.7088886436e-20    -5.2432527783e-20   -1.3434065889e-21   4.4091319846e-20    
+1.0260023088e-19    1.5420849956e-19    -6.4732926863e-20   -1.5461657877e-19   -1.1283481430e-19   
+3.9970180225e-20    1.8375030892e-19    -2.4027934922e-21   -1.7072856661e-19   8.0943492818e-20    
+-7.7314760633e-20   -1.0123042700e-19   1.4878368846e-19    -4.8747127767e-21   2.7452784562e-20    
+1.1629024086e-19    8.1451480035e-20    -3.6833355633e-20   -9.6314883025e-20   -9.2023165571e-20   
+-7.9933448217e-20   4.1100613424e-20    1.3636202276e-19    8.2005547284e-20    2.1674867796e-21    
+9.2660337496e-20    6.2996941327e-20    -2.5380168592e-19   5.9118156092e-20    3.4662681910e-19    
+7.1486739513e-20    0.0000000000e+00    2.9267960173e-03    3.0346713082e-03    2.6463212051e-04    
+1.8804645525e-05    1.2557394880e-06    8.1647055201e-08    5.2112492779e-09    3.2664668851e-10    
+2.0069873607e-11    1.2057339957e-12    7.0635804549e-14    4.0241053620e-15    2.2192588103e-16    
+1.2120881448e-17    8.9035744045e-19    1.1860907657e-19    -2.4574029842e-19   -4.8287743819e-19   
+-1.5447422258e-19   -4.9996227138e-19   -2.5658811713e-19   3.6188670624e-19    1.6405082229e-19    
+-3.7469798167e-20   2.6486690293e-19    4.4056944970e-19    -1.6032568722e-19   -2.0530958494e-19   
+3.9225310992e-19    1.5242457705e-19    -4.0078121657e-19   -2.3992804743e-19   3.4067318456e-20    
+2.0174692935e-19    6.5307397443e-20    -2.2073268348e-20   7.0294433603e-20    2.4447259354e-21    
+1.2933336426e-19    5.3240440921e-20    -1.6945694052e-19   6.9506889778e-20    1.9285597956e-19    
+-5.6604284204e-20   -2.3248848938e-20   8.1216802121e-20    2.4073894383e-22    1.4205231954e-20    
+3.7134540003e-20    -1.0841746751e-20   1.1172078996e-19    -1.0837619835e-20   -1.7737758081e-19   
+-7.3651702213e-20   3.9322091802e-20    2.6700086527e-19    9.6713934741e-20    -2.8161715543e-19   
+-6.2951978444e-20   -7.4477536374e-20   1.0833478868e-19    2.2990493865e-19    6.1637966084e-21    
+5.5862530746e-20    -1.0248238508e-19   -7.7270087567e-20   7.5809502947e-20    5.5952047248e-20    
+-2.0706485844e-19   -2.3878444158e-19   5.8781578174e-20    2.6635392764e-19    9.9133687240e-20    
+-6.8128781899e-20   1.9966873324e-19    7.8130859877e-20    -2.9336174878e-19   4.3809744680e-20    
+2.9971597957e-19    7.5938148784e-20    0.0000000000e+00    3.1756869122e-03    3.2927414211e-03    
+2.8713663641e-04    2.0403805423e-05    1.3625278178e-06    8.8590262060e-08    5.6544035306e-09    
+3.5442356414e-10    2.1776509097e-11    1.3082611917e-12    7.6641517963e-14    4.3659305589e-15    
+2.4089245980e-16    1.3032272699e-17    7.0593819513e-19    1.2420522964e-19    3.3900716489e-20    
+-2.1593072081e-19   -2.5203832404e-19   -3.1924921334e-19   4.1072151291e-19    4.7736690005e-19    
+-1.7675848118e-19   -3.1863387124e-19   6.0563066600e-20    4.5790932909e-19    1.2134110399e-19    
+-2.2906808863e-19   1.0789454703e-19    1.4934029321e-19    -1.6208240170e-19   -2.1130731255e-19   
+-6.0286967295e-20   2.9521891380e-19    2.7961042234e-19    -3.2914752919e-20   -1.3920552826e-19   
+-2.2314127811e-19   1.2389035113e-19    1.7307742072e-19    -1.7419818033e-19   1.5789455614e-19    
+3.0450510268e-19    -1.0084319646e-19   -9.9419735923e-20   1.4968971510e-19    4.9529110884e-20    
+-8.9052799967e-20   -4.9043054035e-21   8.0082525230e-21    -7.8371624658e-20   1.3369469781e-20    
+4.2236455199e-20    -7.4880656826e-20   -7.7138614519e-20   2.2356575729e-19    1.2573578716e-19    
+-2.9100248026e-19   8.3587821720e-21    -5.3787518944e-20   -6.4443757907e-20   2.8045856839e-19    
+1.5680618879e-19    -1.8110188545e-19   -2.3297708902e-19   2.9515302709e-20    1.8858811704e-19    
+6.5940653805e-20    -3.5645941060e-19   -1.5919497141e-19   2.0818476113e-19    2.5674366676e-19    
+7.1660171464e-20    -2.7407901698e-20   2.3875326916e-19    1.2519248040e-19    -2.9232465363e-19   
+-1.8981259726e-19   2.3406892020e-19    1.8486159206e-19    0.0000000000e+00    3.3280861672e-03    
+3.4507632522e-03    3.0091665091e-04    2.1383006018e-05    1.4279164294e-06    9.2841698635e-08    
+5.9257515931e-09    3.7143145946e-10    2.2821476749e-11    1.3710372153e-12    8.0318405691e-14    
+4.5753135529e-15    2.5292444298e-16    1.3510923944e-17    1.8808106044e-19    -3.0719066026e-19   
+2.9199508250e-19    5.6179472122e-19    -4.4167035272e-19   -5.9725775984e-19   7.5343591849e-19    
+2.8539064522e-19    -6.0901708911e-20   3.0547099221e-20    -3.2295876393e-19   4.5612636484e-19    
+3.6952333161e-19    -3.0527130730e-19   9.0646763497e-20    1.4726518282e-19    -8.5182001441e-20   
+-9.5047103887e-20   -2.3360757338e-19   3.7405864801e-20    3.7673008240e-19    9.9993025814e-21    
+-2.1600615290e-19   -1.3443680509e-19   7.7030742039e-21    2.5277246851e-19    -2.0018092121e-20   
+2.7657248842e-20    3.8806324933e-19    -8.6384959788e-20   -2.3968677542e-19   2.5880256955e-20    
+1.1440321884e-19    1.5904154053e-20    -5.1929142090e-20   -8.0540822861e-21   -1.4740178383e-19   
+4.7059179385e-20    2.1272600491e-19    -4.3197090722e-20   -8.5807401891e-20   1.2305380174e-19    
+3.6089826308e-20    -2.7616038486e-19   8.5864013287e-20    2.1821575957e-19    -2.2991990960e-19   
+-3.1067984668e-20   6.0780972480e-20    -1.1221876368e-19   -3.7935371262e-20   6.8350538999e-20    
+1.9130108366e-19    -2.8048602647e-20   -3.0256013912e-19   6.5223401151e-20    2.0024388996e-19    
+5.5762453741e-20    3.3267287620e-20    2.0478883359e-20    1.6347151372e-19    6.3839078793e-20    
+-1.5959277762e-19   -1.0056196458e-20   2.1951422978e-19    1.0196644757e-19    0.0000000000e+00    
+3.3793632082e-03    3.5039353880e-03    3.0555346524e-04    2.1712494796e-05    1.4499185228e-06    
+9.4272187176e-08    6.0170486925e-09    3.7715359808e-10    2.3173025340e-11    1.3921548711e-12    
+8.1555244314e-14    4.6459492686e-15    2.5693096620e-16    1.3479521518e-17    2.7024746817e-19    
+-1.1549244749e-19   5.0394348289e-19    4.4350139997e-19    -7.2585919974e-19   -7.9406032989e-19   
+5.0766495736e-19    1.4679918015e-19    1.2301834782e-19    7.4133303993e-19    2.3556571993e-19    
+4.6662122519e-19    -1.0967555856e-19   -6.3278151035e-19   7.0769363665e-20    1.0858650895e-19    
+-1.6421681069e-19   -1.6725612423e-20   -2.2287142713e-19   -1.9110259992e-19   4.6960198997e-19    
+1.3037088282e-19    -1.4480099513e-19   2.4267194151e-20    -2.1517984099e-19   2.4152949081e-19    
+7.4194279152e-20    -1.2926376583e-19   3.7216977590e-19    4.7448895775e-20    -2.3837830864e-19   
+-1.3453708477e-19   8.6078878693e-20    -2.1572667139e-20   1.1903150146e-20    1.6648619326e-19    
+-1.3272361228e-19   -8.4437949423e-20   1.9399313160e-19    1.6206326349e-19    -1.2388879722e-21   
+6.5391652314e-21    1.1957610867e-19    -3.2074131234e-19   -3.1829328416e-19   4.2212487636e-19    
+6.2989015350e-20    -2.3818485746e-19   -7.3869338627e-20   1.2746474706e-19    1.4354422374e-19    
+-7.1390717308e-20   7.3426254172e-20    1.2397881100e-20    -1.4985102216e-19   1.9752639973e-21    
+1.9557444952e-20    -1.0211853785e-20   3.5523624432e-20    9.1069525267e-20    1.6879871396e-19    
+-5.9703445895e-20   -3.5751292873e-22   2.9983755597e-19    1.1857749862e-19    -1.0237044691e-19   
+0.0000000000e+00    3.3279600081e-03    3.4506422202e-03    3.0090619215e-04    2.1382260406e-05    
+1.4278655756e-06    9.2838263014e-08    5.9255208121e-09    3.7141611545e-10    2.2820472909e-11    
+1.3709726979e-12    8.0314393753e-14    4.5751250680e-15    2.5284135988e-16    1.3393838670e-17    
+5.5578984820e-19    3.7638399849e-19    6.5729805438e-19    -8.4437999177e-20   -1.0116175727e-18   
+-5.4114621209e-19   4.2221702500e-19    6.3599338064e-20    3.8916088261e-19    5.9784505786e-19    
+-2.0819988887e-19   2.8986510141e-19    1.1056245645e-19    -4.0699247279e-19   -2.6384892388e-19   
+-2.9530875029e-19   4.2511759985e-20    3.6583575091e-19    -3.3820637313e-20   -5.6785548456e-20   
+2.3006831025e-19    -4.4577131864e-20   -6.4874562027e-20   -6.1776493003e-20   -1.4954339033e-19   
+1.6514634226e-19    4.9074322450e-20    -1.0631507526e-19   2.1136575680e-19    2.1883695819e-19    
+-1.0475596454e-19   -5.4023479204e-20   1.0394472442e-19    -9.4148808040e-20   8.1458009009e-20    
+1.7927823808e-19    -2.3023798713e-19   -1.8357722085e-19   2.1336533737e-19    1.4446757847e-19    
+2.6236324192e-20    1.1324195853e-20    6.1017128458e-21    -2.5934858535e-19   -1.8224322458e-19   
+1.5726988040e-19    -1.8493828632e-19   -1.6881409164e-20   2.7848252049e-19    8.2170900806e-20    
+-4.6505355806e-20   -2.9389367431e-20   -9.8414372292e-21   -4.6460654810e-21   -9.4592416783e-20   
+-6.3985016930e-21   4.7332089621e-20    2.6166810980e-20    2.1246465032e-20    3.7365982954e-20    
+1.9537255992e-19    2.7319675989e-20    1.1846401219e-20    1.8993963984e-19    1.4427078589e-20    
+-1.1894224971e-19   0.0000000000e+00    3.1754384272e-03    3.2925030346e-03    2.8711603668e-04    
+2.0402336854e-05    1.3624276554e-06    8.8583495209e-08    5.6539489803e-09    3.5439334211e-10    
+2.1774531947e-11    1.3081342935e-12    7.6633207973e-14    4.3653674503e-15    2.4126742637e-16    
+1.3070941889e-17    4.2715772786e-19    4.2232062097e-20    3.5400363797e-19    1.9916726502e-19    
+-6.1000331201e-20   -2.8753448492e-19   -6.1268022350e-20   5.9858522784e-20    3.6706604745e-19    
+9.8165670918e-20    -5.8380488005e-19   3.3445978476e-20    6.4128983242e-19    2.1521997323e-19    
+-2.7531510401e-19   -5.2092311956e-19   -1.8162293599e-19   3.4836254722e-19    1.7716024130e-19    
+-1.6567768678e-20   -2.0861371475e-20   3.5134970757e-20    1.1814790461e-19    -9.9048662575e-20   
+-1.5783548444e-19   -8.2562639916e-20   -1.7136031719e-20   1.5772660020e-19    2.3880510977e-19    
+1.4055323433e-19    -1.6684035376e-19   1.7187198546e-20    1.3596070325e-19    -2.6185849744e-20   
+8.8447121031e-20    7.6540384870e-20    -2.3953320013e-20   -7.9419149402e-20   -4.6627363068e-20   
+-5.0017339421e-20   6.5899905269e-20    1.8075869575e-19    2.3318827964e-20    -2.5306004790e-19   
+1.9072664971e-20    -5.1181856082e-20   -2.3503807357e-19   1.9028130428e-19    2.6226265871e-19    
+-4.1712914375e-20   -1.8621021515e-19   5.9672403194e-20    4.4969990977e-20    3.3372065745e-20    
+-8.0844980759e-20   -3.4890285408e-20   1.6080924344e-19    9.6292449067e-20    -3.3931264796e-20   
+-1.9335205091e-19   1.6257662250e-19    2.5677316483e-19    -1.3384241865e-19   -1.0960898881e-19   
+1.0247298063e-19    7.8912922773e-20    0.0000000000e+00    2.9264327565e-03    3.0343228103e-03    
+2.6460200572e-04    1.8802498620e-05    1.2555930603e-06    8.1637162728e-08    5.2105847699e-09    
+3.2660250620e-10    2.0066982781e-11    1.2055488454e-12    7.0623731896e-14    4.0230537071e-15    
+2.2201608916e-16    1.1861612362e-17    9.0189337255e-19    1.5967528036e-19    -6.7690329777e-20   
+7.6963618255e-20    2.8701422574e-19    -2.9818768538e-19   -5.2868465505e-19   2.3082563555e-19    
+3.3058030008e-19    -9.2782220800e-20   -1.4744582202e-19   2.3711360929e-19    3.8959574209e-19    
+6.5554704541e-20    -9.1075235459e-20   -1.4459605488e-19   -2.1145277645e-19   1.2842977558e-19    
+1.1857028638e-19    -6.0167616312e-20   1.0585028413e-20    1.2325571281e-19    1.3084149805e-19    
+-6.8918796457e-20   -1.0128848166e-19   -3.8769096467e-20   -3.8988736439e-20   1.4669725464e-19    
+2.5174715062e-19    -3.8576620440e-20   -2.2605343790e-19   7.2743720090e-20    1.0795788963e-19    
+-2.4840147691e-21   -7.1471658644e-21   5.4828886602e-20    1.9422644402e-19    -1.0425247779e-19   
+-1.7336445765e-19   -8.2725805773e-20   4.3570346515e-20    2.7377383596e-19    -2.1830982717e-20   
+-1.2962613928e-19   1.5099014863e-21    -2.2871857011e-19   4.7557780487e-20    2.2995555771e-19    
+-3.3264449318e-21   3.5647614132e-20    -3.0707297537e-20   -6.0512318185e-20   -2.2645927884e-20   
+8.4339702210e-20    6.7494617646e-20    -3.6429657927e-20   -7.4692473793e-20   1.4871241036e-19    
+2.0162192747e-19    -1.5650011091e-19   6.1214922887e-20    2.1977662583e-19    -2.7602875958e-19   
+-2.6732544646e-19   1.9147743196e-19    1.7347632230e-19    0.0000000000e+00    2.5885089074e-03    
+2.6839462230e-03    2.3404817671e-04    1.6631355980e-05    1.1106079054e-06    7.2210326367e-08    
+4.6088995778e-09    2.8888801866e-10    1.7749708747e-11    1.0663333604e-12    6.2468183029e-14    
+3.5584304638e-15    1.9611550322e-16    1.0538618151e-17    1.1782708405e-18    4.7823115646e-19    
+-6.5553162597e-20   -1.9839587175e-19   -1.1100126900e-19   -4.8295264846e-19   -2.2824461167e-19   
+3.2452445906e-19    6.0741421572e-20    2.4543401497e-20    1.1174301622e-19    1.5648629258e-19    
+-3.5835076858e-21   1.8305791465e-20    1.6686538426e-19    -4.8247286247e-21   -9.6213648697e-20   
+3.7520763721e-20    -2.5705518254e-20   1.2262149929e-20    5.1174701638e-20    -4.2639144723e-20   
+-2.1855713930e-20   -4.1043446504e-20   8.7337400811e-20    1.4762370464e-19    8.5463213748e-20    
+-3.5193419192e-20   -4.1987450392e-20   8.3344692243e-20    -5.4803363667e-20   -1.0498013839e-20   
+5.3701604789e-20    -9.7122385164e-20   -5.6292900640e-20   1.3707001724e-19    9.9353689017e-20    
+-1.8405113641e-19   1.0610257631e-20    6.9292386685e-20    -5.3356231388e-20   1.6056119574e-19    
+-4.6057918193e-20   -1.2224710639e-19   8.0089743984e-21    -1.6924186536e-19   -1.7551453941e-20   
+1.8366278770e-19    4.1892965205e-20    -2.6033276073e-20   8.0754411042e-20    -7.4863346282e-21   
+-1.2648619720e-19   -2.6417561158e-20   9.7525189495e-20    2.1670032781e-20    -1.0596780908e-19   
+1.5720702919e-19    1.7605845215e-19    -1.0126850855e-19   9.1174275594e-20    1.5495447683e-19    
+-2.5158180745e-19   -1.0943994948e-19   2.2028311651e-19    8.9051722924e-20    0.0000000000e+00    
+2.1719345250e-03    2.2520192877e-03    1.9638291229e-04    1.3954878005e-05    9.3187749134e-07    
+6.0589415780e-08    3.8671753042e-09    2.4239581469e-10    1.4893118662e-11    8.9471781050e-13    
+5.2414340545e-14    2.9857278378e-15    1.6461182723e-16    9.1341651810e-18    8.7142394080e-19    
+4.9058052591e-20    -3.9912235914e-20   8.2776020967e-20    -1.7819464708e-19   -6.0751804832e-19   
+1.7900883931e-19    4.9095476307e-19    -1.6352127663e-19   -2.4442770592e-20   -6.9604591222e-20   
+6.1634024762e-21    1.2934800007e-19    1.2033228255e-19    3.1768270738e-19    4.3845603508e-20    
+-2.3037790921e-19   -1.5238842584e-19   -3.1932738372e-20   6.9754786643e-20    -1.6158961877e-20   
+-6.0503178739e-20   -3.4442591940e-21   -5.9241459035e-21   8.5886215443e-20    7.2091044023e-20    
+7.5997714548e-20    -2.3496392613e-20   -7.4280838855e-20   6.9000007419e-20    2.8505379908e-20    
+3.9959980743e-21    -1.2769306965e-20   -4.7171948663e-20   3.3066358387e-20    5.1130232153e-20    
+2.6527354960e-20    -9.9820541007e-20   -2.2421429570e-20   2.0312414286e-21    -8.3829437861e-20   
+1.8537810752e-19    1.3035906072e-19    -1.3087607964e-19   -9.6614582200e-20   -8.2276578943e-20   
+-5.3859421910e-20   7.7206103485e-20    8.5043449327e-20    1.3102458309e-20    6.8113775392e-20    
+4.0316737678e-21    -1.2706406123e-19   -5.9656895622e-20   3.6026312178e-20    2.3944637350e-20    
+1.4987966780e-20    6.4628257232e-20    3.6667037024e-20    -7.9238779901e-20   9.7956600198e-20    
+1.8564394995e-19    -1.1882640864e-19   -8.1772448208e-20   1.2524466460e-19    7.5444692705e-20    
+0.0000000000e+00    1.6893670110e-03    1.7516658860e-03    1.5275065245e-04    1.0854388123e-05    
+7.2483245124e-07    4.7127526454e-08    3.0079488661e-09    1.8853853632e-10    1.1584008739e-11    
+6.9591685785e-13    4.0767958665e-14    2.3222200411e-15    1.2810195178e-16    7.1279356242e-18    
+6.8987964912e-19    -1.1047009258e-19   -1.8296633222e-19   1.5272120464e-19    -1.0974718367e-19   
+-5.8164524782e-19   -3.6747503767e-20   5.5809481086e-19    8.7766609197e-20    -1.1703937439e-19   
+-9.0619755080e-20   1.7824357946e-19    2.2376290503e-19    -3.4424275795e-20   5.7480769146e-20    
+3.1222636944e-20    -1.0665040620e-19   -1.1960332683e-19   2.0179749070e-21    9.4802124393e-20    
+-1.6169311966e-20   -4.7097120467e-20   2.7937231605e-20    1.6381037606e-21    6.3846636414e-20    
+1.6504307707e-20    -7.0998001159e-20   3.5902108627e-20    6.3412211832e-20    -3.2605491041e-20   
+2.2798817028e-20    6.2962287577e-20    7.5653524044e-22    1.4635074230e-20    1.5611442113e-20    
+-1.9502153138e-20   5.9729243659e-20    -4.3472693857e-20   -1.4812870150e-19   -7.8406720379e-20   
+-3.9259213977e-21   2.0050310028e-19    1.6082016393e-19    -3.7972365541e-20   -1.0607040539e-19   
+-1.5001134683e-19   3.6906926999e-20    8.5072004587e-20    2.9930913275e-20    3.7186438964e-20    
+-4.3051221182e-20   -4.0794424919e-20   -5.4230007587e-20   -2.5661719175e-20   6.5553634378e-20    
+3.1555359750e-20    -3.3067085706e-20   5.8834299756e-20    3.1355687091e-20    -7.4627598058e-20   
+6.8173659603e-20    9.9711034142e-20    -6.7329520720e-20   -7.6330608817e-20   -2.4150915336e-20   
+-2.4089423532e-21   0.0000000000e+00    1.1554685410e-03    1.1980889807e-03    1.0447713978e-04    
+7.4240930307e-06    4.9576373427e-07    3.2233690320e-08    2.0573273638e-09    1.2895260545e-10    
+7.9229243737e-12    4.7597095200e-13    2.7882860676e-14    1.5882645626e-15    8.7704940928e-17    
+4.7918481209e-18    2.7339549877e-19    -2.9279974176e-21   6.1963519387e-20    -2.5200264840e-20   
+-1.4488825876e-19   -1.9661814220e-19   -9.5425957110e-21   3.0268712434e-19    6.3289999814e-20    
+-4.7781313204e-20   1.2912345644e-20    8.7768430216e-20    1.1949892902e-19    -7.6939142788e-20   
+-8.8699999409e-20   7.5632831477e-20    2.6225552405e-20    -8.4240855645e-20   -8.5705402902e-21   
+7.7765181788e-20    7.2290479976e-20    3.4880069142e-21    -5.8664191068e-20   -5.1157553888e-20   
+8.9346087293e-20    1.8760000152e-20    -8.5292469581e-20   7.2672523048e-20    8.6426187284e-20    
+5.9565579533e-21    -1.1457812675e-20   1.7605254184e-20    2.1780402822e-20    -2.6608375975e-20   
+-3.6483701272e-20   1.4068802729e-20    3.9849117319e-20    -5.6348765232e-21   -4.2730568671e-20   
+-7.9545245738e-21   -9.4410417046e-21   3.8804564835e-20    6.0011643365e-20    -4.4280413506e-20   
+-2.7613503737e-20   -4.4005980102e-20   6.8579262316e-20    8.6545483630e-20    -1.1463811256e-20   
+-8.4176923682e-20   -8.2632743351e-20   2.9710243977e-20    5.0408320629e-20    5.1264850671e-21    
+-3.9008851843e-20   6.5900647582e-21    5.6047061844e-20    7.7795715770e-20    -2.3971398545e-20   
+-4.9030180430e-20   8.4255395670e-20    3.9170476638e-20    -1.1387053728e-19   -4.5436737396e-20   
+2.5791265249e-20    7.2033474206e-22    0.0000000000e+00    5.8265917292e-04    6.0792371407e-04    
+5.3017865551e-05    3.7674435530e-06    2.5157596368e-07    1.6356482820e-08    1.0439155344e-09    
+6.5429216213e-11    4.0198042047e-12    2.4147723006e-13    1.4145176758e-14    8.0575919552e-16    
+4.4510693310e-17    2.3557145105e-18    6.8992981869e-20    3.3803932158e-20    8.4558796677e-20    
+-6.5735571017e-20   -1.6739094174e-19   -4.2586618318e-21   1.8103270956e-19    1.1670594124e-19    
+1.8176291236e-20    -4.2334219349e-20   -8.0197419547e-20   4.1659848222e-20    2.4152336175e-20    
+-6.9924291822e-20   2.2874878508e-20    8.5607640666e-20    -1.0631414684e-20   -3.3044269069e-20   
+-7.0315280080e-21   4.0633958274e-20    7.5090230367e-20    5.4902850733e-21    -4.7775679704e-20   
+-4.5194698126e-20   3.6904129083e-20    4.9626263072e-20    -1.2573149285e-20   3.5459119419e-21    
+5.0000570254e-20    1.7472037148e-20    -9.8631359581e-21   1.1363652453e-20    1.3034645814e-20    
+1.8057539048e-20    -2.1610071922e-21   -2.0463206655e-20   -1.8056431672e-20   5.2906415021e-21    
+3.7938601738e-20    1.7601879123e-21    -2.9965146136e-20   2.8075323433e-21    -4.2655985357e-21   
+-2.4347183237e-20   4.4297202173e-20    1.5846170791e-20    -2.6304366088e-20   1.8725408972e-20    
+2.2674551480e-20    -3.6396434416e-20   -4.3817203995e-20   1.3907867291e-20    3.8617088972e-20    
+2.2890020765e-22    -4.7219169333e-20   1.1830072560e-20    5.0287485954e-20    1.7991927043e-20    
+-5.2301897634e-21   -1.0019488309e-22   4.1068260270e-20    3.0770669499e-20    -4.0634729205e-20   
+-4.1097113374e-20   4.3848594577e-20    4.9696296855e-20    0.0000000000e+00    2.3039296165e-19    
+2.6512131249e-19    1.8581785280e-20    1.2076836943e-21    8.1890880643e-23    4.8855354929e-24    
+3.0049920690e-25    1.9790942390e-26    1.3820843059e-27    8.5985838669e-29    4.7454913830e-30    
+2.6577833233e-31    -9.3840936540e-32   -1.7439897500e-31   -8.1388595744e-32   1.6202637974e-32    
+1.4354948933e-32    4.4735741489e-32    1.1160764028e-31    -4.3787822845e-32   -1.2789679464e-31   
+6.7371436867e-32    2.0363699896e-31    1.6472381013e-31    2.8332235041e-33    -9.0335048149e-32   
+-3.0756198432e-32   -5.0388646803e-32   -2.1227058179e-31   -1.9759326529e-31   -9.1602419138e-32   
+-4.1108071883e-32   -4.1870920697e-32   -5.4407520929e-32   -1.6520867804e-32   3.5475479112e-33    
+5.3060874601e-32    -2.0359938314e-32   -1.0716370739e-31   -5.8811581044e-32   -3.5771139451e-32   
+-3.2552729958e-32   6.2532537882e-33    7.2797048593e-32    9.7846268971e-32    1.0999918785e-31    
+6.2372670650e-33    -9.1616713149e-32   5.5453240703e-33    2.3685740971e-33    -6.5592020539e-32   
+-1.3553468673e-31   -6.1859214718e-33   1.1215325774e-31    9.1648686596e-32    1.5331643679e-32    
+-5.3121812228e-32   8.4945547610e-32    9.2962231003e-32    1.2129220910e-31    5.0203576972e-32    
+-3.5606852361e-32   -5.0064774599e-32   -7.8106991674e-32   5.6809290987e-32    -4.2652013183e-32   
+-1.3076857435e-31   2.9471053968e-32    1.6653614030e-31    1.0516781203e-31    1.0207428705e-32    
+-2.4319379446e-32   -2.7695399222e-32   9.5271089987e-32    -2.5018845605e-32   -1.0710822406e-31   
+4.8661328384e-32    2.0115727012e-31    -1.7759932890e-32   -1.9394848192e-20   
+3.4769120967e-02    2.1582098550e-02    7.8038459579e-03    7.1798980124e-03    7.1451574545e-03    
+7.1430048347e-03    7.1428666415e-03    7.1428577473e-03    7.1428571807e-03    7.1428571452e-03    
+7.1428571430e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    3.4769814292e-02    2.1582480712e-02    7.8038847187e-03    7.1799015629e-03    
+7.1451577684e-03    7.1430048615e-03    7.1428666437e-03    7.1428577475e-03    7.1428571807e-03    
+7.1428571452e-03    7.1428571430e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    3.4770507694e-02    2.1582862918e-02    7.8039234861e-03    
+7.1799051143e-03    7.1451580824e-03    7.1430048883e-03    7.1428666459e-03    7.1428577477e-03    
+7.1428571807e-03    7.1428571452e-03    7.1428571430e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    3.4770507771e-02    2.1582862962e-02    
+7.8039234926e-03    7.1799051151e-03    7.1451580825e-03    7.1430048883e-03    7.1428666459e-03    
+7.1428577477e-03    7.1428571807e-03    7.1428571452e-03    7.1428571430e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    3.4770507771e-02    
+2.1582862962e-02    7.8039234926e-03    7.1799051151e-03    7.1451580825e-03    7.1430048883e-03    
+7.1428666459e-03    7.1428577477e-03    7.1428571807e-03    7.1428571452e-03    7.1428571430e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+3.4770507770e-02    2.1582862962e-02    7.8039234926e-03    7.1799051151e-03    7.1451580825e-03    
+7.1430048883e-03    7.1428666459e-03    7.1428577477e-03    7.1428571807e-03    7.1428571452e-03    
+7.1428571430e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    3.4770507771e-02    2.1582862962e-02    7.8039234926e-03    7.1799051151e-03    
+7.1451580825e-03    7.1430048883e-03    7.1428666459e-03    7.1428577477e-03    7.1428571807e-03    
+7.1428571452e-03    7.1428571430e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    3.4770507771e-02    2.1582862962e-02    7.8039234926e-03    
+7.1799051151e-03    7.1451580825e-03    7.1430048883e-03    7.1428666459e-03    7.1428577477e-03    
+7.1428571807e-03    7.1428571452e-03    7.1428571430e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    3.4770507770e-02    2.1582862962e-02    
+7.8039234926e-03    7.1799051151e-03    7.1451580825e-03    7.1430048883e-03    7.1428666459e-03    
+7.1428577477e-03    7.1428571807e-03    7.1428571452e-03    7.1428571430e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    3.4770507770e-02    
+2.1582862962e-02    7.8039234926e-03    7.1799051151e-03    7.1451580825e-03    7.1430048883e-03    
+7.1428666459e-03    7.1428577477e-03    7.1428571807e-03    7.1428571452e-03    7.1428571430e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+3.4770507770e-02    2.1582862962e-02    7.8039234926e-03    7.1799051151e-03    7.1451580825e-03    
+7.1430048883e-03    7.1428666459e-03    7.1428577477e-03    7.1428571807e-03    7.1428571452e-03    
+7.1428571430e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    3.4770507771e-02    2.1582862962e-02    7.8039234926e-03    7.1799051151e-03    
+7.1451580825e-03    7.1430048883e-03    7.1428666459e-03    7.1428577477e-03    7.1428571807e-03    
+7.1428571452e-03    7.1428571430e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    3.4770507771e-02    2.1582862962e-02    7.8039234926e-03    
+7.1799051151e-03    7.1451580825e-03    7.1430048883e-03    7.1428666459e-03    7.1428577477e-03    
+7.1428571807e-03    7.1428571452e-03    7.1428571430e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    3.4770507771e-02    2.1582862962e-02    
+7.8039234926e-03    7.1799051151e-03    7.1451580825e-03    7.1430048883e-03    7.1428666459e-03    
+7.1428577477e-03    7.1428571807e-03    7.1428571452e-03    7.1428571430e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    3.4770507771e-02    
+2.1582862962e-02    7.8039234926e-03    7.1799051151e-03    7.1451580825e-03    7.1430048883e-03    
+7.1428666459e-03    7.1428577477e-03    7.1428571807e-03    7.1428571452e-03    7.1428571430e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+3.4770507771e-02    2.1582862962e-02    7.8039234926e-03    7.1799051151e-03    7.1451580825e-03    
+7.1430048883e-03    7.1428666459e-03    7.1428577477e-03    7.1428571807e-03    7.1428571452e-03    
+7.1428571430e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    3.4770507695e-02    2.1582862923e-02    7.8039234905e-03    7.1799051149e-03    
+7.1451580825e-03    7.1430048883e-03    7.1428666459e-03    7.1428577477e-03    7.1428571807e-03    
+7.1428571452e-03    7.1428571430e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    3.4769818098e-02    2.1582500128e-02    7.8039043533e-03    
+7.1799038941e-03    7.1451579974e-03    7.1430048822e-03    7.1428666455e-03    7.1428577476e-03    
+7.1428571807e-03    7.1428571452e-03    7.1428571430e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    3.4769128577e-02    2.1582137374e-02    
+7.8038852182e-03    7.1799026734e-03    7.1451579122e-03    7.1430048761e-03    7.1428666450e-03    
+7.1428577476e-03    7.1428571807e-03    7.1428571452e-03    7.1428571430e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    3.7215189873e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+0.0000000000e+00    5.5652473532e+00    9.5571671239e+00    9.9778010148e+00    9.9989080412e+00    
+9.9999442438e+00    9.9999970388e+00    9.9999998372e+00    9.9999999908e+00    9.9999999995e+00    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    0.0000000000e+00    5.5651933168e+00    9.5571437244e+00    9.9777989927e+00    
+9.9989078986e+00    9.9999442340e+00    9.9999970381e+00    9.9999998371e+00    9.9999999908e+00    
+9.9999999995e+00    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    5.5651393095e+00    9.5571203257e+00    
+9.9777969702e+00    9.9989077559e+00    9.9999442243e+00    9.9999970375e+00    9.9999998371e+00    
+9.9999999908e+00    9.9999999995e+00    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    5.5651393102e+00    
+9.5571203233e+00    9.9777969699e+00    9.9989077559e+00    9.9999442243e+00    9.9999970375e+00    
+9.9999998371e+00    9.9999999908e+00    9.9999999995e+00    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    
+5.5651393102e+00    9.5571203233e+00    9.9777969699e+00    9.9989077559e+00    9.9999442243e+00    
+9.9999970375e+00    9.9999998371e+00    9.9999999908e+00    9.9999999995e+00    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+0.0000000000e+00    5.5651393102e+00    9.5571203233e+00    9.9777969699e+00    9.9989077559e+00    
+9.9999442243e+00    9.9999970375e+00    9.9999998371e+00    9.9999999908e+00    9.9999999995e+00    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    0.0000000000e+00    5.5651393102e+00    9.5571203233e+00    9.9777969699e+00    
+9.9989077559e+00    9.9999442243e+00    9.9999970375e+00    9.9999998371e+00    9.9999999908e+00    
+9.9999999995e+00    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    5.5651393102e+00    9.5571203233e+00    
+9.9777969699e+00    9.9989077559e+00    9.9999442243e+00    9.9999970375e+00    9.9999998371e+00    
+9.9999999908e+00    9.9999999995e+00    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    5.5651393102e+00    
+9.5571203233e+00    9.9777969699e+00    9.9989077559e+00    9.9999442243e+00    9.9999970375e+00    
+9.9999998371e+00    9.9999999908e+00    9.9999999995e+00    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    
+5.5651393102e+00    9.5571203233e+00    9.9777969699e+00    9.9989077559e+00    9.9999442243e+00    
+9.9999970375e+00    9.9999998371e+00    9.9999999908e+00    9.9999999995e+00    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+0.0000000000e+00    5.5651393102e+00    9.5571203233e+00    9.9777969699e+00    9.9989077559e+00    
+9.9999442243e+00    9.9999970375e+00    9.9999998371e+00    9.9999999908e+00    9.9999999995e+00    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    0.0000000000e+00    5.5651393102e+00    9.5571203233e+00    9.9777969699e+00    
+9.9989077559e+00    9.9999442243e+00    9.9999970375e+00    9.9999998371e+00    9.9999999908e+00    
+9.9999999995e+00    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    5.5651393102e+00    9.5571203233e+00    
+9.9777969699e+00    9.9989077559e+00    9.9999442243e+00    9.9999970375e+00    9.9999998371e+00    
+9.9999999908e+00    9.9999999995e+00    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    5.5651393102e+00    
+9.5571203233e+00    9.9777969699e+00    9.9989077559e+00    9.9999442243e+00    9.9999970375e+00    
+9.9999998371e+00    9.9999999908e+00    9.9999999995e+00    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    
+5.5651393102e+00    9.5571203233e+00    9.9777969699e+00    9.9989077559e+00    9.9999442243e+00    
+9.9999970375e+00    9.9999998371e+00    9.9999999908e+00    9.9999999995e+00    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+0.0000000000e+00    5.5651393102e+00    9.5571203233e+00    9.9777969699e+00    9.9989077559e+00    
+9.9999442243e+00    9.9999970375e+00    9.9999998371e+00    9.9999999908e+00    9.9999999995e+00    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    0.0000000000e+00    5.5651393095e+00    9.5571203241e+00    9.9777969700e+00    
+9.9989077559e+00    9.9999442243e+00    9.9999970375e+00    9.9999998371e+00    9.9999999908e+00    
+9.9999999995e+00    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    5.5651910004e+00    9.5571323256e+00    
+9.9777976978e+00    9.9989077963e+00    9.9999442266e+00    9.9999970376e+00    9.9999998371e+00    
+9.9999999908e+00    9.9999999995e+00    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    0.0000000000e+00    5.5652427202e+00    
+9.5571443294e+00    9.9777984257e+00    9.9989078366e+00    9.9999442289e+00    9.9999970378e+00    
+9.9999998371e+00    9.9999999908e+00    9.9999999995e+00    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+5.5252527648e-02    2.8878482814e-02    1.3219776300e-03    7.4081739015e-05    4.6006232329e-06    
+2.9538377126e-07    1.8997334408e-08    1.2089228195e-09    7.5708674573e-11    4.6500485754e-12    
+2.7932257202e-13    1.6421759785e-14    9.6797569960e-16    7.9797279895e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+1.8865117801e-17    5.5253914299e-02    2.8879247139e-02    1.3220551518e-03    7.4088840170e-05    
+4.6012510874e-06    2.9543727206e-07    1.9001712439e-08    1.2092673438e-09    7.5734764814e-11    
+4.6519585059e-12    2.7947826345e-13    1.6421759785e-14    9.6797569960e-16    7.9797279895e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    1.7347234760e-17    5.5255301103e-02    2.8880011551e-02    1.3221326865e-03    
+7.4095942883e-05    4.6018791095e-06    2.9549078983e-07    1.9006092091e-08    1.2096120013e-09    
+7.5760877172e-11    4.6538684365e-12    2.7963395488e-13    1.6421759785e-14    9.6797569960e-16    
+7.9797279895e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    5.5255301255e-02    2.8880011639e-02    
+1.3221326995e-03    7.4095944440e-05    4.6018792772e-06    2.9549080677e-07    1.9006093690e-08    
+1.2096121344e-09    7.5760899290e-11    4.6538684365e-12    2.7963395488e-13    1.6421759785e-14    
+9.6797569960e-16    7.9797279895e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    5.5255301255e-02    
+2.8880011639e-02    1.3221326995e-03    7.4095944440e-05    4.6018792772e-06    2.9549080675e-07    
+1.9006093646e-08    1.2096121123e-09    7.5760899290e-11    4.6538684365e-12    2.7963395488e-13    
+1.6421759785e-14    9.6797569960e-16    7.9797279895e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    
+5.5255301255e-02    2.8880011639e-02    1.3221326995e-03    7.4095944440e-05    4.6018792772e-06    
+2.9549080675e-07    1.9006093646e-08    1.2096121123e-09    7.5760899290e-11    4.6538684365e-12    
+2.7963395488e-13    1.6421759785e-14    9.6797569960e-16    7.9797279895e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+1.7347234760e-17    5.5255301255e-02    2.8880011639e-02    1.3221326995e-03    7.4095944440e-05    
+4.6018792772e-06    2.9549080675e-07    1.9006093668e-08    1.2096121344e-09    7.5760899290e-11    
+4.6538684365e-12    2.7963395488e-13    1.6421759785e-14    9.6797569960e-16    7.9797279895e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    1.7347234760e-17    5.5255301255e-02    2.8880011639e-02    1.3221326995e-03    
+7.4095944440e-05    4.6018792772e-06    2.9549080675e-07    1.9006093668e-08    1.2096121344e-09    
+7.5760899290e-11    4.6538684365e-12    2.7963395488e-13    1.6421759785e-14    9.6797569960e-16    
+7.9797279895e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    5.5255301255e-02    2.8880011639e-02    
+1.3221326995e-03    7.4095944440e-05    4.6018792772e-06    2.9549080675e-07    1.9006093668e-08    
+1.2096121344e-09    7.5760899290e-11    4.6538684365e-12    2.7963395488e-13    1.6421759785e-14    
+9.6797569960e-16    7.9797279895e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    5.5255301255e-02    
+2.8880011639e-02    1.3221326995e-03    7.4095944440e-05    4.6018792772e-06    2.9549080675e-07    
+1.9006093668e-08    1.2096121344e-09    7.5760899290e-11    4.6538684365e-12    2.7963395488e-13    
+1.6421759785e-14    9.6797569960e-16    7.9797279895e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    
+5.5255301255e-02    2.8880011639e-02    1.3221326995e-03    7.4095944440e-05    4.6018792772e-06    
+2.9549080675e-07    1.9006093668e-08    1.2096121344e-09    7.5760899290e-11    4.6538684365e-12    
+2.7963395488e-13    1.6421759785e-14    9.6797569960e-16    7.9797279895e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+1.7347234760e-17    5.5255301255e-02    2.8880011639e-02    1.3221326995e-03    7.4095944440e-05    
+4.6018792772e-06    2.9549080675e-07    1.9006093668e-08    1.2096121344e-09    7.5760899290e-11    
+4.6538684365e-12    2.7963395488e-13    1.6421759785e-14    9.6797569960e-16    7.9797279895e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    1.7347234760e-17    5.5255301255e-02    2.8880011639e-02    1.3221326995e-03    
+7.4095944440e-05    4.6018792772e-06    2.9549080675e-07    1.9006093668e-08    1.2096121344e-09    
+7.5760899290e-11    4.6538684365e-12    2.7963395488e-13    1.6421759785e-14    9.6797569960e-16    
+7.9797279895e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    5.5255301255e-02    2.8880011639e-02    
+1.3221326995e-03    7.4095944440e-05    4.6018792772e-06    2.9549080675e-07    1.9006093646e-08    
+1.2096121123e-09    7.5760899290e-11    4.6538684365e-12    2.7963395488e-13    1.6421759785e-14    
+9.6797569960e-16    7.9797279895e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    5.5255301255e-02    
+2.8880011639e-02    1.3221326995e-03    7.4095944440e-05    4.6018792772e-06    2.9549080675e-07    
+1.9006093646e-08    1.2096121123e-09    7.5760899290e-11    4.6538684365e-12    2.7963395488e-13    
+1.6421759785e-14    9.6797569960e-16    7.9797279895e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    
+5.5255301255e-02    2.8880011639e-02    1.3221326995e-03    7.4095944440e-05    4.6018792772e-06    
+2.9549080675e-07    1.9006093668e-08    1.2096121344e-09    7.5760899290e-11    4.6538684365e-12    
+2.7963395488e-13    1.6421759785e-14    9.6797569960e-16    7.9797279895e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+1.7347234760e-17    5.5255301104e-02    2.8880011559e-02    1.3221326953e-03    7.4095944144e-05    
+4.6018792543e-06    2.9549080493e-07    1.9006093512e-08    1.2096120902e-09    7.5760899290e-11    
+4.6538684365e-12    2.7963395488e-13    1.6421759785e-14    9.6797569960e-16    7.9797279895e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    1.7347234760e-17    5.5253921911e-02    2.8879285971e-02    1.3220944208e-03    
+7.4093502460e-05    4.6017089980e-06    2.9547859665e-07    1.9005220366e-08    1.2095505396e-09    
+7.5756658759e-11    4.6535574873e-12    2.7958928575e-13    1.6421759785e-14    9.6797569960e-16    
+7.9797279895e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    1.7347234760e-17    5.5252542869e-02    2.8878560463e-02    
+1.3220561507e-03    7.4091061073e-05    4.6015387647e-06    2.9546639019e-07    1.9004347375e-08    
+1.2094890332e-09    7.5752418227e-11    4.6532465381e-12    2.7954461662e-13    1.6421759785e-14    
+9.6797569960e-16    7.9797279895e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    
+3.4694469520e-17    3.4694469520e-17    3.4694469520e-17    1.8865117801e-17    
+zone T = "Zone0 SOLID_SURFACE"
+I = 61
+J = 1
+K = 19
+f = BLOCK
+2.2204460493e-16    3.4267502444e-04    1.3704652454e-03    3.0826662669e-03    5.4781046317e-03    
+8.5551386262e-03    1.2311659405e-02    1.6745092436e-02    2.1852399266e-02    2.7630079602e-02    
+3.4074173711e-02    4.1180265132e-02    4.8943483705e-02    5.7358508908e-02    6.6419573503e-02    
+7.6120467489e-02    8.6454542357e-02    9.7414715650e-02    1.0899347581e-01    1.2118288734e-01    
+1.3397459622e-01    1.4735983565e-01    1.6132943205e-01    1.7587381138e-01    1.9098300563e-01    
+2.0664665971e-01    2.2285403854e-01    2.3959403440e-01    2.5685517452e-01    2.7462562899e-01    
+2.9289321881e-01    3.1164542431e-01    3.3086939364e-01    3.5055195167e-01    3.7067960895e-01    
+3.9123857099e-01    4.1221474771e-01    4.3359376308e-01    4.5536096498e-01    4.7750143528e-01    
+5.0000000000e-01    5.2284123974e-01    5.4600950026e-01    5.6948890319e-01    5.9326335692e-01    
+6.1731656763e-01    6.4163205045e-01    6.6619314077e-01    6.9098300563e-01    7.1598465530e-01    
+7.4118095490e-01    7.6655463614e-01    7.9208830918e-01    8.1776447451e-01    8.4356553496e-01    
+8.6947380778e-01    8.9547153673e-01    9.2154090427e-01    9.4766404376e-01    9.7382305169e-01    
+1.0000000000e+00    2.2204460493e-16    3.4267502444e-04    1.3704652454e-03    3.0826662669e-03    
+5.4781046317e-03    8.5551386262e-03    1.2311659405e-02    1.6745092436e-02    2.1852399266e-02    
+2.7630079602e-02    3.4074173711e-02    4.1180265132e-02    4.8943483705e-02    5.7358508908e-02    
+6.6419573503e-02    7.6120467489e-02    8.6454542357e-02    9.7414715650e-02    1.0899347581e-01    
+1.2118288734e-01    1.3397459622e-01    1.4735983565e-01    1.6132943205e-01    1.7587381138e-01    
+1.9098300563e-01    2.0664665971e-01    2.2285403854e-01    2.3959403440e-01    2.5685517452e-01    
+2.7462562899e-01    2.9289321881e-01    3.1164542431e-01    3.3086939364e-01    3.5055195167e-01    
+3.7067960895e-01    3.9123857099e-01    4.1221474771e-01    4.3359376308e-01    4.5536096498e-01    
+4.7750143528e-01    5.0000000000e-01    5.2284123974e-01    5.4600950026e-01    5.6948890319e-01    
+5.9326335692e-01    6.1731656763e-01    6.4163205045e-01    6.6619314077e-01    6.9098300563e-01    
+7.1598465530e-01    7.4118095490e-01    7.6655463614e-01    7.9208830918e-01    8.1776447451e-01    
+8.4356553496e-01    8.6947380778e-01    8.9547153673e-01    9.2154090427e-01    9.4766404376e-01    
+9.7382305169e-01    1.0000000000e+00    2.2204460493e-16    3.4267502444e-04    1.3704652454e-03    
+3.0826662669e-03    5.4781046317e-03    8.5551386262e-03    1.2311659405e-02    1.6745092436e-02    
+2.1852399266e-02    2.7630079602e-02    3.4074173711e-02    4.1180265132e-02    4.8943483705e-02    
+5.7358508908e-02    6.6419573503e-02    7.6120467489e-02    8.6454542357e-02    9.7414715650e-02    
+1.0899347581e-01    1.2118288734e-01    1.3397459622e-01    1.4735983565e-01    1.6132943205e-01    
+1.7587381138e-01    1.9098300563e-01    2.0664665971e-01    2.2285403854e-01    2.3959403440e-01    
+2.5685517452e-01    2.7462562899e-01    2.9289321881e-01    3.1164542431e-01    3.3086939364e-01    
+3.5055195167e-01    3.7067960895e-01    3.9123857099e-01    4.1221474771e-01    4.3359376308e-01    
+4.5536096498e-01    4.7750143528e-01    5.0000000000e-01    5.2284123974e-01    5.4600950026e-01    
+5.6948890319e-01    5.9326335692e-01    6.1731656763e-01    6.4163205045e-01    6.6619314077e-01    
+6.9098300563e-01    7.1598465530e-01    7.4118095490e-01    7.6655463614e-01    7.9208830918e-01    
+8.1776447451e-01    8.4356553496e-01    8.6947380778e-01    8.9547153673e-01    9.2154090427e-01    
+9.4766404376e-01    9.7382305169e-01    1.0000000000e+00    2.2204460493e-16    3.4267502444e-04    
+1.3704652454e-03    3.0826662669e-03    5.4781046317e-03    8.5551386262e-03    1.2311659405e-02    
+1.6745092436e-02    2.1852399266e-02    2.7630079602e-02    3.4074173711e-02    4.1180265132e-02    
+4.8943483705e-02    5.7358508908e-02    6.6419573503e-02    7.6120467489e-02    8.6454542357e-02    
+9.7414715650e-02    1.0899347581e-01    1.2118288734e-01    1.3397459622e-01    1.4735983565e-01    
+1.6132943205e-01    1.7587381138e-01    1.9098300563e-01    2.0664665971e-01    2.2285403854e-01    
+2.3959403440e-01    2.5685517452e-01    2.7462562899e-01    2.9289321881e-01    3.1164542431e-01    
+3.3086939364e-01    3.5055195167e-01    3.7067960895e-01    3.9123857099e-01    4.1221474771e-01    
+4.3359376308e-01    4.5536096498e-01    4.7750143528e-01    5.0000000000e-01    5.2284123974e-01    
+5.4600950026e-01    5.6948890319e-01    5.9326335692e-01    6.1731656763e-01    6.4163205045e-01    
+6.6619314077e-01    6.9098300563e-01    7.1598465530e-01    7.4118095490e-01    7.6655463614e-01    
+7.9208830918e-01    8.1776447451e-01    8.4356553496e-01    8.6947380778e-01    8.9547153673e-01    
+9.2154090427e-01    9.4766404376e-01    9.7382305169e-01    1.0000000000e+00    2.2204460493e-16    
+3.4267502444e-04    1.3704652454e-03    3.0826662669e-03    5.4781046317e-03    8.5551386262e-03    
+1.2311659405e-02    1.6745092436e-02    2.1852399266e-02    2.7630079602e-02    3.4074173711e-02    
+4.1180265132e-02    4.8943483705e-02    5.7358508908e-02    6.6419573503e-02    7.6120467489e-02    
+8.6454542357e-02    9.7414715650e-02    1.0899347581e-01    1.2118288734e-01    1.3397459622e-01    
+1.4735983565e-01    1.6132943205e-01    1.7587381138e-01    1.9098300563e-01    2.0664665971e-01    
+2.2285403854e-01    2.3959403440e-01    2.5685517452e-01    2.7462562899e-01    2.9289321881e-01    
+3.1164542431e-01    3.3086939364e-01    3.5055195167e-01    3.7067960895e-01    3.9123857099e-01    
+4.1221474771e-01    4.3359376308e-01    4.5536096498e-01    4.7750143528e-01    5.0000000000e-01    
+5.2284123974e-01    5.4600950026e-01    5.6948890319e-01    5.9326335692e-01    6.1731656763e-01    
+6.4163205045e-01    6.6619314077e-01    6.9098300563e-01    7.1598465530e-01    7.4118095490e-01    
+7.6655463614e-01    7.9208830918e-01    8.1776447451e-01    8.4356553496e-01    8.6947380778e-01    
+8.9547153673e-01    9.2154090427e-01    9.4766404376e-01    9.7382305169e-01    1.0000000000e+00    
+2.2204460493e-16    3.4267502444e-04    1.3704652454e-03    3.0826662669e-03    5.4781046317e-03    
+8.5551386262e-03    1.2311659405e-02    1.6745092436e-02    2.1852399266e-02    2.7630079602e-02    
+3.4074173711e-02    4.1180265132e-02    4.8943483705e-02    5.7358508908e-02    6.6419573503e-02    
+7.6120467489e-02    8.6454542357e-02    9.7414715650e-02    1.0899347581e-01    1.2118288734e-01    
+1.3397459622e-01    1.4735983565e-01    1.6132943205e-01    1.7587381138e-01    1.9098300563e-01    
+2.0664665971e-01    2.2285403854e-01    2.3959403440e-01    2.5685517452e-01    2.7462562899e-01    
+2.9289321881e-01    3.1164542431e-01    3.3086939364e-01    3.5055195167e-01    3.7067960895e-01    
+3.9123857099e-01    4.1221474771e-01    4.3359376308e-01    4.5536096498e-01    4.7750143528e-01    
+5.0000000000e-01    5.2284123974e-01    5.4600950026e-01    5.6948890319e-01    5.9326335692e-01    
+6.1731656763e-01    6.4163205045e-01    6.6619314077e-01    6.9098300563e-01    7.1598465530e-01    
+7.4118095490e-01    7.6655463614e-01    7.9208830918e-01    8.1776447451e-01    8.4356553496e-01    
+8.6947380778e-01    8.9547153673e-01    9.2154090427e-01    9.4766404376e-01    9.7382305169e-01    
+1.0000000000e+00    2.2204460493e-16    3.4267502444e-04    1.3704652454e-03    3.0826662669e-03    
+5.4781046317e-03    8.5551386262e-03    1.2311659405e-02    1.6745092436e-02    2.1852399266e-02    
+2.7630079602e-02    3.4074173711e-02    4.1180265132e-02    4.8943483705e-02    5.7358508908e-02    
+6.6419573503e-02    7.6120467489e-02    8.6454542357e-02    9.7414715650e-02    1.0899347581e-01    
+1.2118288734e-01    1.3397459622e-01    1.4735983565e-01    1.6132943205e-01    1.7587381138e-01    
+1.9098300563e-01    2.0664665971e-01    2.2285403854e-01    2.3959403440e-01    2.5685517452e-01    
+2.7462562899e-01    2.9289321881e-01    3.1164542431e-01    3.3086939364e-01    3.5055195167e-01    
+3.7067960895e-01    3.9123857099e-01    4.1221474771e-01    4.3359376308e-01    4.5536096498e-01    
+4.7750143528e-01    5.0000000000e-01    5.2284123974e-01    5.4600950026e-01    5.6948890319e-01    
+5.9326335692e-01    6.1731656763e-01    6.4163205045e-01    6.6619314077e-01    6.9098300563e-01    
+7.1598465530e-01    7.4118095490e-01    7.6655463614e-01    7.9208830918e-01    8.1776447451e-01    
+8.4356553496e-01    8.6947380778e-01    8.9547153673e-01    9.2154090427e-01    9.4766404376e-01    
+9.7382305169e-01    1.0000000000e+00    2.2204460493e-16    3.4267502444e-04    1.3704652454e-03    
+3.0826662669e-03    5.4781046317e-03    8.5551386262e-03    1.2311659405e-02    1.6745092436e-02    
+2.1852399266e-02    2.7630079602e-02    3.4074173711e-02    4.1180265132e-02    4.8943483705e-02    
+5.7358508908e-02    6.6419573503e-02    7.6120467489e-02    8.6454542357e-02    9.7414715650e-02    
+1.0899347581e-01    1.2118288734e-01    1.3397459622e-01    1.4735983565e-01    1.6132943205e-01    
+1.7587381138e-01    1.9098300563e-01    2.0664665971e-01    2.2285403854e-01    2.3959403440e-01    
+2.5685517452e-01    2.7462562899e-01    2.9289321881e-01    3.1164542431e-01    3.3086939364e-01    
+3.5055195167e-01    3.7067960895e-01    3.9123857099e-01    4.1221474771e-01    4.3359376308e-01    
+4.5536096498e-01    4.7750143528e-01    5.0000000000e-01    5.2284123974e-01    5.4600950026e-01    
+5.6948890319e-01    5.9326335692e-01    6.1731656763e-01    6.4163205045e-01    6.6619314077e-01    
+6.9098300563e-01    7.1598465530e-01    7.4118095490e-01    7.6655463614e-01    7.9208830918e-01    
+8.1776447451e-01    8.4356553496e-01    8.6947380778e-01    8.9547153673e-01    9.2154090427e-01    
+9.4766404376e-01    9.7382305169e-01    1.0000000000e+00    2.2204460493e-16    3.4267502444e-04    
+1.3704652454e-03    3.0826662669e-03    5.4781046317e-03    8.5551386262e-03    1.2311659405e-02    
+1.6745092436e-02    2.1852399266e-02    2.7630079602e-02    3.4074173711e-02    4.1180265132e-02    
+4.8943483705e-02    5.7358508908e-02    6.6419573503e-02    7.6120467489e-02    8.6454542357e-02    
+9.7414715650e-02    1.0899347581e-01    1.2118288734e-01    1.3397459622e-01    1.4735983565e-01    
+1.6132943205e-01    1.7587381138e-01    1.9098300563e-01    2.0664665971e-01    2.2285403854e-01    
+2.3959403440e-01    2.5685517452e-01    2.7462562899e-01    2.9289321881e-01    3.1164542431e-01    
+3.3086939364e-01    3.5055195167e-01    3.7067960895e-01    3.9123857099e-01    4.1221474771e-01    
+4.3359376308e-01    4.5536096498e-01    4.7750143528e-01    5.0000000000e-01    5.2284123974e-01    
+5.4600950026e-01    5.6948890319e-01    5.9326335692e-01    6.1731656763e-01    6.4163205045e-01    
+6.6619314077e-01    6.9098300563e-01    7.1598465530e-01    7.4118095490e-01    7.6655463614e-01    
+7.9208830918e-01    8.1776447451e-01    8.4356553496e-01    8.6947380778e-01    8.9547153673e-01    
+9.2154090427e-01    9.4766404376e-01    9.7382305169e-01    1.0000000000e+00    2.2204460493e-16    
+3.4267502444e-04    1.3704652454e-03    3.0826662669e-03    5.4781046317e-03    8.5551386262e-03    
+1.2311659405e-02    1.6745092436e-02    2.1852399266e-02    2.7630079602e-02    3.4074173711e-02    
+4.1180265132e-02    4.8943483705e-02    5.7358508908e-02    6.6419573503e-02    7.6120467489e-02    
+8.6454542357e-02    9.7414715650e-02    1.0899347581e-01    1.2118288734e-01    1.3397459622e-01    
+1.4735983565e-01    1.6132943205e-01    1.7587381138e-01    1.9098300563e-01    2.0664665971e-01    
+2.2285403854e-01    2.3959403440e-01    2.5685517452e-01    2.7462562899e-01    2.9289321881e-01    
+3.1164542431e-01    3.3086939364e-01    3.5055195167e-01    3.7067960895e-01    3.9123857099e-01    
+4.1221474771e-01    4.3359376308e-01    4.5536096498e-01    4.7750143528e-01    5.0000000000e-01    
+5.2284123974e-01    5.4600950026e-01    5.6948890319e-01    5.9326335692e-01    6.1731656763e-01    
+6.4163205045e-01    6.6619314077e-01    6.9098300563e-01    7.1598465530e-01    7.4118095490e-01    
+7.6655463614e-01    7.9208830918e-01    8.1776447451e-01    8.4356553496e-01    8.6947380778e-01    
+8.9547153673e-01    9.2154090427e-01    9.4766404376e-01    9.7382305169e-01    1.0000000000e+00    
+2.2204460493e-16    3.4267502444e-04    1.3704652454e-03    3.0826662669e-03    5.4781046317e-03    
+8.5551386262e-03    1.2311659405e-02    1.6745092436e-02    2.1852399266e-02    2.7630079602e-02    
+3.4074173711e-02    4.1180265132e-02    4.8943483705e-02    5.7358508908e-02    6.6419573503e-02    
+7.6120467489e-02    8.6454542357e-02    9.7414715650e-02    1.0899347581e-01    1.2118288734e-01    
+1.3397459622e-01    1.4735983565e-01    1.6132943205e-01    1.7587381138e-01    1.9098300563e-01    
+2.0664665971e-01    2.2285403854e-01    2.3959403440e-01    2.5685517452e-01    2.7462562899e-01    
+2.9289321881e-01    3.1164542431e-01    3.3086939364e-01    3.5055195167e-01    3.7067960895e-01    
+3.9123857099e-01    4.1221474771e-01    4.3359376308e-01    4.5536096498e-01    4.7750143528e-01    
+5.0000000000e-01    5.2284123974e-01    5.4600950026e-01    5.6948890319e-01    5.9326335692e-01    
+6.1731656763e-01    6.4163205045e-01    6.6619314077e-01    6.9098300563e-01    7.1598465530e-01    
+7.4118095490e-01    7.6655463614e-01    7.9208830918e-01    8.1776447451e-01    8.4356553496e-01    
+8.6947380778e-01    8.9547153673e-01    9.2154090427e-01    9.4766404376e-01    9.7382305169e-01    
+1.0000000000e+00    2.2204460493e-16    3.4267502444e-04    1.3704652454e-03    3.0826662669e-03    
+5.4781046317e-03    8.5551386262e-03    1.2311659405e-02    1.6745092436e-02    2.1852399266e-02    
+2.7630079602e-02    3.4074173711e-02    4.1180265132e-02    4.8943483705e-02    5.7358508908e-02    
+6.6419573503e-02    7.6120467489e-02    8.6454542357e-02    9.7414715650e-02    1.0899347581e-01    
+1.2118288734e-01    1.3397459622e-01    1.4735983565e-01    1.6132943205e-01    1.7587381138e-01    
+1.9098300563e-01    2.0664665971e-01    2.2285403854e-01    2.3959403440e-01    2.5685517452e-01    
+2.7462562899e-01    2.9289321881e-01    3.1164542431e-01    3.3086939364e-01    3.5055195167e-01    
+3.7067960895e-01    3.9123857099e-01    4.1221474771e-01    4.3359376308e-01    4.5536096498e-01    
+4.7750143528e-01    5.0000000000e-01    5.2284123974e-01    5.4600950026e-01    5.6948890319e-01    
+5.9326335692e-01    6.1731656763e-01    6.4163205045e-01    6.6619314077e-01    6.9098300563e-01    
+7.1598465530e-01    7.4118095490e-01    7.6655463614e-01    7.9208830918e-01    8.1776447451e-01    
+8.4356553496e-01    8.6947380778e-01    8.9547153673e-01    9.2154090427e-01    9.4766404376e-01    
+9.7382305169e-01    1.0000000000e+00    2.2204460493e-16    3.4267502444e-04    1.3704652454e-03    
+3.0826662669e-03    5.4781046317e-03    8.5551386262e-03    1.2311659405e-02    1.6745092436e-02    
+2.1852399266e-02    2.7630079602e-02    3.4074173711e-02    4.1180265132e-02    4.8943483705e-02    
+5.7358508908e-02    6.6419573503e-02    7.6120467489e-02    8.6454542357e-02    9.7414715650e-02    
+1.0899347581e-01    1.2118288734e-01    1.3397459622e-01    1.4735983565e-01    1.6132943205e-01    
+1.7587381138e-01    1.9098300563e-01    2.0664665971e-01    2.2285403854e-01    2.3959403440e-01    
+2.5685517452e-01    2.7462562899e-01    2.9289321881e-01    3.1164542431e-01    3.3086939364e-01    
+3.5055195167e-01    3.7067960895e-01    3.9123857099e-01    4.1221474771e-01    4.3359376308e-01    
+4.5536096498e-01    4.7750143528e-01    5.0000000000e-01    5.2284123974e-01    5.4600950026e-01    
+5.6948890319e-01    5.9326335692e-01    6.1731656763e-01    6.4163205045e-01    6.6619314077e-01    
+6.9098300563e-01    7.1598465530e-01    7.4118095490e-01    7.6655463614e-01    7.9208830918e-01    
+8.1776447451e-01    8.4356553496e-01    8.6947380778e-01    8.9547153673e-01    9.2154090427e-01    
+9.4766404376e-01    9.7382305169e-01    1.0000000000e+00    2.2204460493e-16    3.4267502444e-04    
+1.3704652454e-03    3.0826662669e-03    5.4781046317e-03    8.5551386262e-03    1.2311659405e-02    
+1.6745092436e-02    2.1852399266e-02    2.7630079602e-02    3.4074173711e-02    4.1180265132e-02    
+4.8943483705e-02    5.7358508908e-02    6.6419573503e-02    7.6120467489e-02    8.6454542357e-02    
+9.7414715650e-02    1.0899347581e-01    1.2118288734e-01    1.3397459622e-01    1.4735983565e-01    
+1.6132943205e-01    1.7587381138e-01    1.9098300563e-01    2.0664665971e-01    2.2285403854e-01    
+2.3959403440e-01    2.5685517452e-01    2.7462562899e-01    2.9289321881e-01    3.1164542431e-01    
+3.3086939364e-01    3.5055195167e-01    3.7067960895e-01    3.9123857099e-01    4.1221474771e-01    
+4.3359376308e-01    4.5536096498e-01    4.7750143528e-01    5.0000000000e-01    5.2284123974e-01    
+5.4600950026e-01    5.6948890319e-01    5.9326335692e-01    6.1731656763e-01    6.4163205045e-01    
+6.6619314077e-01    6.9098300563e-01    7.1598465530e-01    7.4118095490e-01    7.6655463614e-01    
+7.9208830918e-01    8.1776447451e-01    8.4356553496e-01    8.6947380778e-01    8.9547153673e-01    
+9.2154090427e-01    9.4766404376e-01    9.7382305169e-01    1.0000000000e+00    2.2204460493e-16    
+3.4267502444e-04    1.3704652454e-03    3.0826662669e-03    5.4781046317e-03    8.5551386262e-03    
+1.2311659405e-02    1.6745092436e-02    2.1852399266e-02    2.7630079602e-02    3.4074173711e-02    
+4.1180265132e-02    4.8943483705e-02    5.7358508908e-02    6.6419573503e-02    7.6120467489e-02    
+8.6454542357e-02    9.7414715650e-02    1.0899347581e-01    1.2118288734e-01    1.3397459622e-01    
+1.4735983565e-01    1.6132943205e-01    1.7587381138e-01    1.9098300563e-01    2.0664665971e-01    
+2.2285403854e-01    2.3959403440e-01    2.5685517452e-01    2.7462562899e-01    2.9289321881e-01    
+3.1164542431e-01    3.3086939364e-01    3.5055195167e-01    3.7067960895e-01    3.9123857099e-01    
+4.1221474771e-01    4.3359376308e-01    4.5536096498e-01    4.7750143528e-01    5.0000000000e-01    
+5.2284123974e-01    5.4600950026e-01    5.6948890319e-01    5.9326335692e-01    6.1731656763e-01    
+6.4163205045e-01    6.6619314077e-01    6.9098300563e-01    7.1598465530e-01    7.4118095490e-01    
+7.6655463614e-01    7.9208830918e-01    8.1776447451e-01    8.4356553496e-01    8.6947380778e-01    
+8.9547153673e-01    9.2154090427e-01    9.4766404376e-01    9.7382305169e-01    1.0000000000e+00    
+2.2204460493e-16    3.4267502444e-04    1.3704652454e-03    3.0826662669e-03    5.4781046317e-03    
+8.5551386262e-03    1.2311659405e-02    1.6745092436e-02    2.1852399266e-02    2.7630079602e-02    
+3.4074173711e-02    4.1180265132e-02    4.8943483705e-02    5.7358508908e-02    6.6419573503e-02    
+7.6120467489e-02    8.6454542357e-02    9.7414715650e-02    1.0899347581e-01    1.2118288734e-01    
+1.3397459622e-01    1.4735983565e-01    1.6132943205e-01    1.7587381138e-01    1.9098300563e-01    
+2.0664665971e-01    2.2285403854e-01    2.3959403440e-01    2.5685517452e-01    2.7462562899e-01    
+2.9289321881e-01    3.1164542431e-01    3.3086939364e-01    3.5055195167e-01    3.7067960895e-01    
+3.9123857099e-01    4.1221474771e-01    4.3359376308e-01    4.5536096498e-01    4.7750143528e-01    
+5.0000000000e-01    5.2284123974e-01    5.4600950026e-01    5.6948890319e-01    5.9326335692e-01    
+6.1731656763e-01    6.4163205045e-01    6.6619314077e-01    6.9098300563e-01    7.1598465530e-01    
+7.4118095490e-01    7.6655463614e-01    7.9208830918e-01    8.1776447451e-01    8.4356553496e-01    
+8.6947380778e-01    8.9547153673e-01    9.2154090427e-01    9.4766404376e-01    9.7382305169e-01    
+1.0000000000e+00    2.2204460493e-16    3.4267502444e-04    1.3704652454e-03    3.0826662669e-03    
+5.4781046317e-03    8.5551386262e-03    1.2311659405e-02    1.6745092436e-02    2.1852399266e-02    
+2.7630079602e-02    3.4074173711e-02    4.1180265132e-02    4.8943483705e-02    5.7358508908e-02    
+6.6419573503e-02    7.6120467489e-02    8.6454542357e-02    9.7414715650e-02    1.0899347581e-01    
+1.2118288734e-01    1.3397459622e-01    1.4735983565e-01    1.6132943205e-01    1.7587381138e-01    
+1.9098300563e-01    2.0664665971e-01    2.2285403854e-01    2.3959403440e-01    2.5685517452e-01    
+2.7462562899e-01    2.9289321881e-01    3.1164542431e-01    3.3086939364e-01    3.5055195167e-01    
+3.7067960895e-01    3.9123857099e-01    4.1221474771e-01    4.3359376308e-01    4.5536096498e-01    
+4.7750143528e-01    5.0000000000e-01    5.2284123974e-01    5.4600950026e-01    5.6948890319e-01    
+5.9326335692e-01    6.1731656763e-01    6.4163205045e-01    6.6619314077e-01    6.9098300563e-01    
+7.1598465530e-01    7.4118095490e-01    7.6655463614e-01    7.9208830918e-01    8.1776447451e-01    
+8.4356553496e-01    8.6947380778e-01    8.9547153673e-01    9.2154090427e-01    9.4766404376e-01    
+9.7382305169e-01    1.0000000000e+00    2.2204460493e-16    3.4267502444e-04    1.3704652454e-03    
+3.0826662669e-03    5.4781046317e-03    8.5551386262e-03    1.2311659405e-02    1.6745092436e-02    
+2.1852399266e-02    2.7630079602e-02    3.4074173711e-02    4.1180265132e-02    4.8943483705e-02    
+5.7358508908e-02    6.6419573503e-02    7.6120467489e-02    8.6454542357e-02    9.7414715650e-02    
+1.0899347581e-01    1.2118288734e-01    1.3397459622e-01    1.4735983565e-01    1.6132943205e-01    
+1.7587381138e-01    1.9098300563e-01    2.0664665971e-01    2.2285403854e-01    2.3959403440e-01    
+2.5685517452e-01    2.7462562899e-01    2.9289321881e-01    3.1164542431e-01    3.3086939364e-01    
+3.5055195167e-01    3.7067960895e-01    3.9123857099e-01    4.1221474771e-01    4.3359376308e-01    
+4.5536096498e-01    4.7750143528e-01    5.0000000000e-01    5.2284123974e-01    5.4600950026e-01    
+5.6948890319e-01    5.9326335692e-01    6.1731656763e-01    6.4163205045e-01    6.6619314077e-01    
+6.9098300563e-01    7.1598465530e-01    7.4118095490e-01    7.6655463614e-01    7.9208830918e-01    
+8.1776447451e-01    8.4356553496e-01    8.6947380778e-01    8.9547153673e-01    9.2154090427e-01    
+9.4766404376e-01    9.7382305169e-01    1.0000000000e+00    2.2204460493e-16    3.4267502444e-04    
+1.3704652454e-03    3.0826662669e-03    5.4781046317e-03    8.5551386262e-03    1.2311659405e-02    
+1.6745092436e-02    2.1852399266e-02    2.7630079602e-02    3.4074173711e-02    4.1180265132e-02    
+4.8943483705e-02    5.7358508908e-02    6.6419573503e-02    7.6120467489e-02    8.6454542357e-02    
+9.7414715650e-02    1.0899347581e-01    1.2118288734e-01    1.3397459622e-01    1.4735983565e-01    
+1.6132943205e-01    1.7587381138e-01    1.9098300563e-01    2.0664665971e-01    2.2285403854e-01    
+2.3959403440e-01    2.5685517452e-01    2.7462562899e-01    2.9289321881e-01    3.1164542431e-01    
+3.3086939364e-01    3.5055195167e-01    3.7067960895e-01    3.9123857099e-01    4.1221474771e-01    
+4.3359376308e-01    4.5536096498e-01    4.7750143528e-01    5.0000000000e-01    5.2284123974e-01    
+5.4600950026e-01    5.6948890319e-01    5.9326335692e-01    6.1731656763e-01    6.4163205045e-01    
+6.6619314077e-01    6.9098300563e-01    7.1598465530e-01    7.4118095490e-01    7.6655463614e-01    
+7.9208830918e-01    8.1776447451e-01    8.4356553496e-01    8.6947380778e-01    8.9547153673e-01    
+9.2154090427e-01    9.4766404376e-01    9.7382305169e-01    1.0000000000e+00    
+0.0000000000e+00    2.6176948308e-02    5.2335956243e-02    7.8459095728e-02    1.0452846327e-01    
+1.3052619222e-01    1.5643446504e-01    1.8223552549e-01    2.0791169082e-01    2.3344536386e-01    
+2.5881904510e-01    2.8401534470e-01    3.0901699437e-01    3.3380685923e-01    3.5836794955e-01    
+3.8268343237e-01    4.0673664308e-01    4.3051109681e-01    4.5399049974e-01    4.7715876026e-01    
+5.0000000000e-01    5.2249856472e-01    5.4463903502e-01    5.6640623692e-01    5.8778525229e-01    
+6.0876142901e-01    6.2932039105e-01    6.4944804833e-01    6.6913060636e-01    6.8835457569e-01    
+7.0710678119e-01    7.2537437101e-01    7.4314482548e-01    7.6040596560e-01    7.7714596146e-01    
+7.9335334029e-01    8.0901699437e-01    8.2412618862e-01    8.3867056795e-01    8.5264016435e-01    
+8.6602540378e-01    8.7881711266e-01    8.9100652419e-01    9.0258528435e-01    9.1354545764e-01    
+9.2387953251e-01    9.3358042650e-01    9.4264149109e-01    9.5105651630e-01    9.5881973487e-01    
+9.6592582629e-01    9.7236992040e-01    9.7814760073e-01    9.8325490756e-01    9.8768834060e-01    
+9.9144486137e-01    9.9452189537e-01    9.9691733373e-01    9.9862953475e-01    9.9965732498e-01    
+1.0000000000e+00    0.0000000000e+00    2.5779261644e-02    5.1540855469e-02    7.7267125767e-02    
+1.0294044104e-01    1.2854320607e-01    1.5405787401e-01    1.7946695838e-01    2.0475304506e-01    
+2.2989880423e-01    2.5488700224e-01    2.7970051344e-01    3.0432233187e-01    3.2873558298e-01    
+3.5292353514e-01    3.7686961114e-01    4.0055739954e-01    4.2397066589e-01    4.4709336394e-01    
+4.6990964652e-01    4.9240387651e-01    5.1456063747e-01    5.3636474428e-01    5.5780125348e-01    
+5.7885547356e-01    5.9951297502e-01    6.1975960023e-01    6.3958147317e-01    6.5896500892e-01    
+6.7789692296e-01    6.9636424032e-01    7.1435430441e-01    7.3185478574e-01    7.4885369036e-01    
+7.6533936806e-01    7.8130052040e-01    7.9672620838e-01    8.1160586002e-01    8.2592927754e-01    
+8.3968664439e-01    8.5286853195e-01    8.6546590603e-01    8.7747013301e-01    8.8887298578e-01    
+8.9966664942e-01    9.0984372647e-01    9.1939724207e-01    9.2832064874e-01    9.3660783080e-01    
+9.4425310864e-01    9.5125124256e-01    9.5759743640e-01    9.6328734079e-01    9.6831705616e-01    
+9.7268313538e-01    9.7638258617e-01    9.7941287310e-01    9.8177191937e-01    9.8345810821e-01    
+9.8447028399e-01    9.8480775301e-01    0.0000000000e+00    2.4598285160e-02    4.9179711883e-02    
+7.3727433289e-02    9.8224625595e-02    1.2265449965e-01    1.4700031243e-01    1.7124537855e-01    
+1.9537308164e-01    2.1936688577e-01    2.4321034680e-01    2.6688712361e-01    2.9038098931e-01    
+3.1367584239e-01    3.3675571771e-01    3.5960479749e-01    3.8220742210e-01    4.0454810084e-01    
+4.2661152251e-01    4.4838256596e-01    4.6984631039e-01    4.9098804563e-01    5.1179328220e-01    
+5.3224776121e-01    5.5233746419e-01    5.7204862266e-01    5.9136772758e-01    6.1028153860e-01    
+6.2877709314e-01    6.4684171526e-01    6.6446302439e-01    6.8162894375e-01    6.9832770868e-01    
+7.1454787468e-01    7.3027832525e-01    7.4550827955e-01    7.6022729970e-01    7.7442529804e-01    
+7.8809254397e-01    8.0121967063e-01    8.1379768135e-01    8.2581795579e-01    8.3727225585e-01    
+8.4815273133e-01    8.5845192530e-01    8.6816277920e-01    8.7727863769e-01    8.8579325323e-01    
+8.9370079031e-01    9.0099582952e-01    9.0767337119e-01    9.1372883887e-01    9.1915808245e-01    
+9.2395738099e-01    9.2812344529e-01    9.3165342015e-01    9.3454488629e-01    9.3679586204e-01    
+9.3840480471e-01    9.3937061159e-01    9.3969262079e-01    0.0000000000e+00    2.2669902228e-02    
+4.5324267638e-02    6.7947570058e-02    9.0524304608e-02    1.1303899832e-01    1.3547622075e-01    
+1.5782059455e-01    1.8005680599e-01    2.0216961549e-01    2.2414386804e-01    2.4596450358e-01    
+2.6761656733e-01    2.8908522005e-01    3.1035574821e-01    3.3141357404e-01    3.5224426555e-01    
+3.7283354645e-01    3.9316730585e-01    4.1323160802e-01    4.3301270189e-01    4.5249703048e-01    
+4.7167124022e-01    4.9052219004e-01    5.0903696046e-01    5.2720286237e-01    5.4500744577e-01    
+5.6243850829e-01    5.7948410356e-01    5.9613254936e-01    6.1237243570e-01    6.2819263255e-01    
+6.4358229755e-01    6.5853088340e-01    6.7302814507e-01    6.8706414687e-01    7.0062926922e-01    
+7.1371421527e-01    7.2631001725e-01    7.3840804262e-01    7.5000000000e-01    7.6107794485e-01    
+7.7163428488e-01    7.8166178533e-01    7.9115357383e-01    8.0010314519e-01    8.0850436582e-01    
+8.1635147795e-01    8.2363910355e-01    8.3036224805e-01    8.3651630374e-01    8.4209705294e-01    
+8.4710067089e-01    8.5152372835e-01    8.5536319398e-01    8.5861643640e-01    8.6128122601e-01    
+8.6335573649e-01    8.6483854607e-01    8.6572863851e-01    8.6602540378e-01    0.0000000000e+00    
+2.0052705789e-02    4.0091668455e-02    6.0103154294e-02    8.0073448434e-02    9.9988864232e-02    
+1.1983575266e-01    1.3960051164e-01    1.5926959541e-01    1.7882952375e-01    1.9826689127e-01    
+2.1756837657e-01    2.3672075137e-01    2.5571088959e-01    2.7452577634e-01    2.9315251684e-01    
+3.1157834524e-01    3.2979063341e-01    3.4777689955e-01    3.6552481678e-01    3.8302222156e-01    
+4.0025712204e-01    4.1721770628e-01    4.3389235034e-01    4.5026962627e-01    4.6633830988e-01    
+4.8208738851e-01    4.9750606852e-01    5.1258378272e-01    5.2731019761e-01    5.4167522042e-01    
+5.5566900609e-01    5.6928196399e-01    5.8250476446e-01    5.9532834527e-01    6.0774391776e-01    
+6.1974297293e-01    6.3131728722e-01    6.4245892818e-01    6.5316025988e-01    6.6341394817e-01    
+6.7321296567e-01    6.8255059664e-01    6.9142044152e-01    6.9981642136e-01    7.0773278199e-01    
+7.1516409792e-01    7.2210527610e-01    7.2855155940e-01    7.3449852985e-01    7.3994211169e-01    
+7.4487857418e-01    7.4930453409e-01    7.5321695811e-01    7.5661316485e-01    7.5949082671e-01    
+7.6184797151e-01    7.6368298376e-01    7.6499460583e-01    7.6578193882e-01    7.6604444312e-01    
+0.0000000000e+00    1.6826218032e-02    3.3640904214e-02    5.0432534601e-02    6.7189601048e-02    
+8.3900619099e-02    1.0055413586e-01    1.1713873783e-01    1.3364305877e-01    1.5005578743e-01    
+1.6636567534e-01    1.8256154454e-01    1.9863229517e-01    2.1456691314e-01    2.3035447768e-01    
+2.4598416876e-01    2.6144527457e-01    2.7672719886e-01    2.9181946815e-01    3.0671173895e-01    
+3.2139380484e-01    3.3585560348e-01    3.5008722346e-01    3.6407891114e-01    3.7782107733e-01    
+3.9130430382e-01    4.0451934989e-01    4.1745715860e-01    4.3010886303e-01    4.4246579233e-01    
+4.5451947767e-01    4.6626165807e-01    4.7768428602e-01    4.8877953302e-01    4.9953979494e-01    
+5.0995769724e-01    5.2002610001e-01    5.2973810286e-01    5.3908704968e-01    5.4806653317e-01    
+5.5667039923e-01    5.6489275120e-01    5.7272795390e-01    5.8017063747e-01    5.8721570106e-01    
+5.9385831634e-01    6.0009393080e-01    6.0591827085e-01    6.1132734479e-01    6.1631744550e-01    
+6.2088515301e-01    6.2502733686e-01    6.2874115820e-01    6.3202407175e-01    6.3487382757e-01    
+6.3728847258e-01    6.3926635190e-01    6.4080611001e-01    6.4190669161e-01    6.4256734243e-01    
+6.4278760969e-01    0.0000000000e+00    1.3088474154e-02    2.6167978121e-02    3.9229547864e-02    
+5.2264231634e-02    6.5263096110e-02    7.8217232520e-02    9.1117762746e-02    1.0395584541e-01    
+1.1672268193e-01    1.2940952255e-01    1.4200767235e-01    1.5450849719e-01    1.6690342962e-01    
+1.7918397477e-01    1.9134171618e-01    2.0336832154e-01    2.1525554840e-01    2.2699524987e-01    
+2.3857938013e-01    2.5000000000e-01    2.6124928236e-01    2.7231951751e-01    2.8320311846e-01    
+2.9389262615e-01    3.0438071450e-01    3.1466019552e-01    3.2472402417e-01    3.3456530318e-01    
+3.4417728785e-01    3.5355339059e-01    3.6268718551e-01    3.7157241274e-01    3.8020298280e-01    
+3.8857298073e-01    3.9667667015e-01    4.0450849719e-01    4.1206309431e-01    4.1933528397e-01    
+4.2632008218e-01    4.3301270189e-01    4.3940855633e-01    4.4550326209e-01    4.5129264217e-01    
+4.5677272882e-01    4.6193976626e-01    4.6679021325e-01    4.7132074555e-01    4.7552825815e-01    
+4.7940986743e-01    4.8296291314e-01    4.8618496020e-01    4.8907380037e-01    4.9162745378e-01    
+4.9384417030e-01    4.9572243069e-01    4.9726094768e-01    4.9845866687e-01    4.9931476738e-01    
+4.9982866249e-01    5.0000000000e-01    0.0000000000e+00    8.9530436121e-03    1.7899951255e-02    
+2.6834591166e-02    3.5750839988e-02    4.4642586971e-02    5.3503738154e-02    6.2328220548e-02    
+7.1109986293e-02    7.9843016805e-02    8.8521326901e-02    9.7138968902e-02    1.0569003671e-01    
+1.1416866984e-01    1.2256905747e-01    1.3088544239e-01    1.3911212496e-01    1.4724346703e-01    
+1.5527389579e-01    1.6319790757e-01    1.7101007166e-01    1.7870503399e-01    1.8627752082e-01    
+1.9372234233e-01    2.0103439623e-01    2.0820867120e-01    2.1524025034e-01    2.2212431457e-01    
+2.2885614589e-01    2.3543113064e-01    2.4184476265e-01    2.4809264634e-01    2.5417049972e-01    
+2.6007415734e-01    2.6579957312e-01    2.7134282315e-01    2.7670010837e-01    2.8186775715e-01    
+2.8684222785e-01    2.9162011122e-01    2.9619813273e-01    3.0057315483e-01    3.0474217911e-01    
+3.0870234832e-01    3.1245094836e-01    3.1598541013e-01    3.1930331128e-01    3.2240237789e-01    
+3.2528048601e-01    3.2793566314e-01    3.3036608955e-01    3.3257009954e-01    3.3454618260e-01    
+3.3629298441e-01    3.3780930781e-01    3.3909411359e-01    3.4014652119e-01    3.4096580937e-01    
+3.4155141661e-01    3.4190294156e-01    3.4202014333e-01    0.0000000000e+00    4.5455793705e-03    
+9.0880434280e-03    1.3624278995e-02    1.8151177161e-02    2.2665635417e-02    2.7164559779e-02    
+3.1644866908e-02    3.6103486226e-02    4.0537362018e-02    4.4943455528e-02    4.9318747037e-02    
+5.3660237941e-02    5.7964952799e-02    6.2229941373e-02    6.6452280654e-02    7.0629076860e-02    
+7.4757467426e-02    7.8834622958e-02    8.2857749177e-02    8.6824088833e-02    9.0730923597e-02    
+9.4575575917e-02    9.8355410861e-02    1.0206783792e-01    1.0571031278e-01    1.0928033907e-01    
+1.1277547008e-01    1.1619331042e-01    1.1953151766e-01    1.2278780397e-01    1.2595993765e-01    
+1.2904574469e-01    1.3204311021e-01    1.3494997999e-01    1.3776436179e-01    1.4048432677e-01    
+1.4310801082e-01    1.4563361579e-01    1.4805941075e-01    1.5038373318e-01    1.5260499012e-01    
+1.5472165921e-01    1.5673228982e-01    1.5863550394e-01    1.6042999720e-01    1.6211453977e-01    
+1.6368797712e-01    1.6514923091e-01    1.6649729967e-01    1.6773125950e-01    1.6885026470e-01    
+1.6985354836e-01    1.7074042288e-01    1.7151028045e-01    1.7216259343e-01    1.7269691478e-01    
+1.7311287829e-01    1.7341019887e-01    1.7358867277e-01    1.7364817767e-01    0.0000000000e+00    
+1.6028228611e-18    3.2045472274e-18    4.8040753572e-18    6.4003110136e-18    7.9921602166e-18    
+9.5785319923e-18    1.1158339120e-17    1.2730498880e-17    1.4293933792e-17    1.5847572356e-17    
+1.7390349785e-17    1.8921208738e-17    2.0439100038e-17    2.1942983401e-17    2.3431828139e-17    
+2.4904613872e-17    2.6360331227e-17    2.7797982528e-17    2.9216582480e-17    3.0615158846e-17    
+3.1992753111e-17    3.3348421141e-17    3.4681233829e-17    3.5990277732e-17    3.7274655696e-17    
+3.8533487473e-17    3.9765910323e-17    4.0971079604e-17    4.2148169354e-17    4.3296372854e-17    
+4.4414903182e-17    4.5502993754e-17    4.6559898848e-17    4.7584894112e-17    4.8577277067e-17    
+4.9536367583e-17    5.0461508347e-17    5.1352065313e-17    5.2207428140e-17    5.3027010602e-17    
+5.3810251001e-17    5.4556612541e-17    5.5265583704e-17    5.5936678597e-17    5.6569437284e-17    
+5.7163426105e-17    5.7718237968e-17    5.8233492635e-17    5.8708836974e-17    5.9143945210e-17    
+5.9538519139e-17    5.9892288342e-17    6.0205010361e-17    6.0476470874e-17    6.0706483835e-17    
+6.0894891604e-17    6.1041565056e-17    6.1146403669e-17    6.1209335591e-17    6.1230317691e-17    
+0.0000000000e+00    -4.5455793705e-03   -9.0880434280e-03   -1.3624278995e-02   -1.8151177161e-02   
+-2.2665635417e-02   -2.7164559779e-02   -3.1644866908e-02   -3.6103486226e-02   -4.0537362018e-02   
+-4.4943455528e-02   -4.9318747037e-02   -5.3660237941e-02   -5.7964952799e-02   -6.2229941373e-02   
+-6.6452280654e-02   -7.0629076860e-02   -7.4757467426e-02   -7.8834622958e-02   -8.2857749177e-02   
+-8.6824088833e-02   -9.0730923597e-02   -9.4575575917e-02   -9.8355410861e-02   -1.0206783792e-01   
+-1.0571031278e-01   -1.0928033907e-01   -1.1277547008e-01   -1.1619331042e-01   -1.1953151766e-01   
+-1.2278780397e-01   -1.2595993765e-01   -1.2904574469e-01   -1.3204311021e-01   -1.3494997999e-01   
+-1.3776436179e-01   -1.4048432677e-01   -1.4310801082e-01   -1.4563361579e-01   -1.4805941075e-01   
+-1.5038373318e-01   -1.5260499012e-01   -1.5472165921e-01   -1.5673228982e-01   -1.5863550394e-01   
+-1.6042999720e-01   -1.6211453977e-01   -1.6368797712e-01   -1.6514923091e-01   -1.6649729967e-01   
+-1.6773125950e-01   -1.6885026470e-01   -1.6985354836e-01   -1.7074042288e-01   -1.7151028045e-01   
+-1.7216259343e-01   -1.7269691478e-01   -1.7311287829e-01   -1.7341019887e-01   -1.7358867277e-01   
+-1.7364817767e-01   0.0000000000e+00    -8.9530436121e-03   -1.7899951255e-02   -2.6834591166e-02   
+-3.5750839988e-02   -4.4642586971e-02   -5.3503738154e-02   -6.2328220548e-02   -7.1109986293e-02   
+-7.9843016805e-02   -8.8521326901e-02   -9.7138968902e-02   -1.0569003671e-01   -1.1416866984e-01   
+-1.2256905747e-01   -1.3088544239e-01   -1.3911212496e-01   -1.4724346703e-01   -1.5527389579e-01   
+-1.6319790757e-01   -1.7101007166e-01   -1.7870503399e-01   -1.8627752082e-01   -1.9372234233e-01   
+-2.0103439623e-01   -2.0820867120e-01   -2.1524025034e-01   -2.2212431457e-01   -2.2885614589e-01   
+-2.3543113064e-01   -2.4184476265e-01   -2.4809264634e-01   -2.5417049972e-01   -2.6007415734e-01   
+-2.6579957312e-01   -2.7134282315e-01   -2.7670010837e-01   -2.8186775715e-01   -2.8684222785e-01   
+-2.9162011122e-01   -2.9619813273e-01   -3.0057315483e-01   -3.0474217911e-01   -3.0870234832e-01   
+-3.1245094836e-01   -3.1598541013e-01   -3.1930331128e-01   -3.2240237789e-01   -3.2528048601e-01   
+-3.2793566314e-01   -3.3036608955e-01   -3.3257009954e-01   -3.3454618260e-01   -3.3629298441e-01   
+-3.3780930781e-01   -3.3909411359e-01   -3.4014652119e-01   -3.4096580937e-01   -3.4155141661e-01   
+-3.4190294156e-01   -3.4202014333e-01   0.0000000000e+00    -1.3088474154e-02   -2.6167978121e-02   
+-3.9229547864e-02   -5.2264231634e-02   -6.5263096110e-02   -7.8217232520e-02   -9.1117762746e-02   
+-1.0395584541e-01   -1.1672268193e-01   -1.2940952255e-01   -1.4200767235e-01   -1.5450849719e-01   
+-1.6690342962e-01   -1.7918397477e-01   -1.9134171618e-01   -2.0336832154e-01   -2.1525554840e-01   
+-2.2699524987e-01   -2.3857938013e-01   -2.5000000000e-01   -2.6124928236e-01   -2.7231951751e-01   
+-2.8320311846e-01   -2.9389262615e-01   -3.0438071450e-01   -3.1466019552e-01   -3.2472402417e-01   
+-3.3456530318e-01   -3.4417728785e-01   -3.5355339059e-01   -3.6268718551e-01   -3.7157241274e-01   
+-3.8020298280e-01   -3.8857298073e-01   -3.9667667015e-01   -4.0450849719e-01   -4.1206309431e-01   
+-4.1933528397e-01   -4.2632008218e-01   -4.3301270189e-01   -4.3940855633e-01   -4.4550326209e-01   
+-4.5129264217e-01   -4.5677272882e-01   -4.6193976626e-01   -4.6679021325e-01   -4.7132074555e-01   
+-4.7552825815e-01   -4.7940986743e-01   -4.8296291314e-01   -4.8618496020e-01   -4.8907380037e-01   
+-4.9162745378e-01   -4.9384417030e-01   -4.9572243069e-01   -4.9726094768e-01   -4.9845866687e-01   
+-4.9931476738e-01   -4.9982866249e-01   -5.0000000000e-01   0.0000000000e+00    -1.6826218032e-02   
+-3.3640904214e-02   -5.0432534601e-02   -6.7189601048e-02   -8.3900619099e-02   -1.0055413586e-01   
+-1.1713873783e-01   -1.3364305877e-01   -1.5005578743e-01   -1.6636567534e-01   -1.8256154454e-01   
+-1.9863229517e-01   -2.1456691314e-01   -2.3035447768e-01   -2.4598416876e-01   -2.6144527457e-01   
+-2.7672719886e-01   -2.9181946815e-01   -3.0671173895e-01   -3.2139380484e-01   -3.3585560348e-01   
+-3.5008722346e-01   -3.6407891114e-01   -3.7782107733e-01   -3.9130430382e-01   -4.0451934989e-01   
+-4.1745715860e-01   -4.3010886303e-01   -4.4246579233e-01   -4.5451947767e-01   -4.6626165807e-01   
+-4.7768428602e-01   -4.8877953302e-01   -4.9953979494e-01   -5.0995769724e-01   -5.2002610001e-01   
+-5.2973810286e-01   -5.3908704968e-01   -5.4806653317e-01   -5.5667039923e-01   -5.6489275120e-01   
+-5.7272795390e-01   -5.8017063747e-01   -5.8721570106e-01   -5.9385831634e-01   -6.0009393080e-01   
+-6.0591827085e-01   -6.1132734479e-01   -6.1631744550e-01   -6.2088515301e-01   -6.2502733686e-01   
+-6.2874115820e-01   -6.3202407175e-01   -6.3487382757e-01   -6.3728847258e-01   -6.3926635190e-01   
+-6.4080611001e-01   -6.4190669161e-01   -6.4256734243e-01   -6.4278760969e-01   0.0000000000e+00    
+-2.0052705789e-02   -4.0091668455e-02   -6.0103154294e-02   -8.0073448434e-02   -9.9988864232e-02   
+-1.1983575266e-01   -1.3960051164e-01   -1.5926959541e-01   -1.7882952375e-01   -1.9826689127e-01   
+-2.1756837657e-01   -2.3672075137e-01   -2.5571088959e-01   -2.7452577634e-01   -2.9315251684e-01   
+-3.1157834524e-01   -3.2979063341e-01   -3.4777689955e-01   -3.6552481678e-01   -3.8302222156e-01   
+-4.0025712204e-01   -4.1721770628e-01   -4.3389235034e-01   -4.5026962627e-01   -4.6633830988e-01   
+-4.8208738851e-01   -4.9750606852e-01   -5.1258378272e-01   -5.2731019761e-01   -5.4167522042e-01   
+-5.5566900609e-01   -5.6928196399e-01   -5.8250476446e-01   -5.9532834527e-01   -6.0774391776e-01   
+-6.1974297293e-01   -6.3131728722e-01   -6.4245892818e-01   -6.5316025988e-01   -6.6341394817e-01   
+-6.7321296567e-01   -6.8255059664e-01   -6.9142044152e-01   -6.9981642136e-01   -7.0773278199e-01   
+-7.1516409792e-01   -7.2210527610e-01   -7.2855155940e-01   -7.3449852985e-01   -7.3994211169e-01   
+-7.4487857418e-01   -7.4930453409e-01   -7.5321695811e-01   -7.5661316485e-01   -7.5949082671e-01   
+-7.6184797151e-01   -7.6368298376e-01   -7.6499460583e-01   -7.6578193882e-01   -7.6604444312e-01   
+0.0000000000e+00    -2.2669902228e-02   -4.5324267638e-02   -6.7947570058e-02   -9.0524304608e-02   
+-1.1303899832e-01   -1.3547622075e-01   -1.5782059455e-01   -1.8005680599e-01   -2.0216961549e-01   
+-2.2414386804e-01   -2.4596450358e-01   -2.6761656733e-01   -2.8908522005e-01   -3.1035574821e-01   
+-3.3141357404e-01   -3.5224426555e-01   -3.7283354645e-01   -3.9316730585e-01   -4.1323160802e-01   
+-4.3301270189e-01   -4.5249703048e-01   -4.7167124022e-01   -4.9052219004e-01   -5.0903696046e-01   
+-5.2720286237e-01   -5.4500744577e-01   -5.6243850829e-01   -5.7948410356e-01   -5.9613254936e-01   
+-6.1237243570e-01   -6.2819263255e-01   -6.4358229755e-01   -6.5853088340e-01   -6.7302814507e-01   
+-6.8706414687e-01   -7.0062926922e-01   -7.1371421527e-01   -7.2631001725e-01   -7.3840804262e-01   
+-7.5000000000e-01   -7.6107794485e-01   -7.7163428488e-01   -7.8166178533e-01   -7.9115357383e-01   
+-8.0010314519e-01   -8.0850436582e-01   -8.1635147795e-01   -8.2363910355e-01   -8.3036224805e-01   
+-8.3651630374e-01   -8.4209705294e-01   -8.4710067089e-01   -8.5152372835e-01   -8.5536319398e-01   
+-8.5861643640e-01   -8.6128122601e-01   -8.6335573649e-01   -8.6483854607e-01   -8.6572863851e-01   
+-8.6602540378e-01   0.0000000000e+00    -2.4598285160e-02   -4.9179711883e-02   -7.3727433289e-02   
+-9.8224625595e-02   -1.2265449965e-01   -1.4700031243e-01   -1.7124537855e-01   -1.9537308164e-01   
+-2.1936688577e-01   -2.4321034680e-01   -2.6688712361e-01   -2.9038098931e-01   -3.1367584239e-01   
+-3.3675571771e-01   -3.5960479749e-01   -3.8220742210e-01   -4.0454810084e-01   -4.2661152251e-01   
+-4.4838256596e-01   -4.6984631039e-01   -4.9098804563e-01   -5.1179328220e-01   -5.3224776121e-01   
+-5.5233746419e-01   -5.7204862266e-01   -5.9136772758e-01   -6.1028153860e-01   -6.2877709314e-01   
+-6.4684171526e-01   -6.6446302439e-01   -6.8162894375e-01   -6.9832770868e-01   -7.1454787468e-01   
+-7.3027832525e-01   -7.4550827955e-01   -7.6022729970e-01   -7.7442529804e-01   -7.8809254397e-01   
+-8.0121967063e-01   -8.1379768135e-01   -8.2581795579e-01   -8.3727225585e-01   -8.4815273133e-01   
+-8.5845192530e-01   -8.6816277920e-01   -8.7727863769e-01   -8.8579325323e-01   -8.9370079031e-01   
+-9.0099582952e-01   -9.0767337119e-01   -9.1372883887e-01   -9.1915808245e-01   -9.2395738099e-01   
+-9.2812344529e-01   -9.3165342015e-01   -9.3454488629e-01   -9.3679586204e-01   -9.3840480471e-01   
+-9.3937061159e-01   -9.3969262079e-01   0.0000000000e+00    -2.5779261644e-02   -5.1540855469e-02   
+-7.7267125767e-02   -1.0294044104e-01   -1.2854320607e-01   -1.5405787401e-01   -1.7946695838e-01   
+-2.0475304506e-01   -2.2989880423e-01   -2.5488700224e-01   -2.7970051344e-01   -3.0432233187e-01   
+-3.2873558298e-01   -3.5292353514e-01   -3.7686961114e-01   -4.0055739954e-01   -4.2397066589e-01   
+-4.4709336394e-01   -4.6990964652e-01   -4.9240387651e-01   -5.1456063747e-01   -5.3636474428e-01   
+-5.5780125348e-01   -5.7885547356e-01   -5.9951297502e-01   -6.1975960023e-01   -6.3958147317e-01   
+-6.5896500892e-01   -6.7789692296e-01   -6.9636424032e-01   -7.1435430441e-01   -7.3185478574e-01   
+-7.4885369036e-01   -7.6533936806e-01   -7.8130052040e-01   -7.9672620838e-01   -8.1160586002e-01   
+-8.2592927754e-01   -8.3968664439e-01   -8.5286853195e-01   -8.6546590603e-01   -8.7747013301e-01   
+-8.8887298578e-01   -8.9966664942e-01   -9.0984372647e-01   -9.1939724207e-01   -9.2832064874e-01   
+-9.3660783080e-01   -9.4425310864e-01   -9.5125124256e-01   -9.5759743640e-01   -9.6328734079e-01   
+-9.6831705616e-01   -9.7268313538e-01   -9.7638258617e-01   -9.7941287310e-01   -9.8177191937e-01   
+-9.8345810821e-01   -9.8447028399e-01   -9.8480775301e-01   0.0000000000e+00    -2.6176948308e-02   
+-5.2335956243e-02   -7.8459095728e-02   -1.0452846327e-01   -1.3052619222e-01   -1.5643446504e-01   
+-1.8223552549e-01   -2.0791169082e-01   -2.3344536386e-01   -2.5881904510e-01   -2.8401534470e-01   
+-3.0901699437e-01   -3.3380685923e-01   -3.5836794955e-01   -3.8268343237e-01   -4.0673664308e-01   
+-4.3051109681e-01   -4.5399049974e-01   -4.7715876026e-01   -5.0000000000e-01   -5.2249856472e-01   
+-5.4463903502e-01   -5.6640623692e-01   -5.8778525229e-01   -6.0876142901e-01   -6.2932039105e-01   
+-6.4944804833e-01   -6.6913060636e-01   -6.8835457569e-01   -7.0710678119e-01   -7.2537437101e-01   
+-7.4314482548e-01   -7.6040596560e-01   -7.7714596146e-01   -7.9335334029e-01   -8.0901699437e-01   
+-8.2412618862e-01   -8.3867056795e-01   -8.5264016435e-01   -8.6602540378e-01   -8.7881711266e-01   
+-8.9100652419e-01   -9.0258528435e-01   -9.1354545764e-01   -9.2387953251e-01   -9.3358042650e-01   
+-9.4264149109e-01   -9.5105651630e-01   -9.5881973487e-01   -9.6592582629e-01   -9.7236992040e-01   
+-9.7814760073e-01   -9.8325490756e-01   -9.8768834060e-01   -9.9144486137e-01   -9.9452189537e-01   
+-9.9691733373e-01   -9.9862953475e-01   -9.9965732498e-01   -1.0000000000e+00   
+0.0000000000e+00    -1.6028228611e-18   -3.2045472274e-18   -4.8040753572e-18   -6.4003110136e-18   
+-7.9921602166e-18   -9.5785319923e-18   -1.1158339120e-17   -1.2730498880e-17   -1.4293933792e-17   
+-1.5847572356e-17   -1.7390349785e-17   -1.8921208738e-17   -2.0439100038e-17   -2.1942983401e-17   
+-2.3431828139e-17   -2.4904613872e-17   -2.6360331227e-17   -2.7797982528e-17   -2.9216582480e-17   
+-3.0615158846e-17   -3.1992753111e-17   -3.3348421141e-17   -3.4681233829e-17   -3.5990277732e-17   
+-3.7274655696e-17   -3.8533487473e-17   -3.9765910323e-17   -4.0971079604e-17   -4.2148169354e-17   
+-4.3296372854e-17   -4.4414903182e-17   -4.5502993754e-17   -4.6559898848e-17   -4.7584894112e-17   
+-4.8577277067e-17   -4.9536367583e-17   -5.0461508347e-17   -5.1352065313e-17   -5.2207428140e-17   
+-5.3027010602e-17   -5.3810251001e-17   -5.4556612541e-17   -5.5265583704e-17   -5.5936678597e-17   
+-5.6569437284e-17   -5.7163426105e-17   -5.7718237968e-17   -5.8233492635e-17   -5.8708836974e-17   
+-5.9143945210e-17   -5.9538519139e-17   -5.9892288342e-17   -6.0205010361e-17   -6.0476470874e-17   
+-6.0706483835e-17   -6.0894891604e-17   -6.1041565056e-17   -6.1146403669e-17   -6.1209335591e-17   
+-6.1230317691e-17   0.0000000000e+00    4.5455793705e-03    9.0880434280e-03    1.3624278995e-02    
+1.8151177161e-02    2.2665635417e-02    2.7164559779e-02    3.1644866908e-02    3.6103486226e-02    
+4.0537362018e-02    4.4943455528e-02    4.9318747037e-02    5.3660237941e-02    5.7964952799e-02    
+6.2229941373e-02    6.6452280654e-02    7.0629076860e-02    7.4757467426e-02    7.8834622958e-02    
+8.2857749177e-02    8.6824088833e-02    9.0730923597e-02    9.4575575917e-02    9.8355410861e-02    
+1.0206783792e-01    1.0571031278e-01    1.0928033907e-01    1.1277547008e-01    1.1619331042e-01    
+1.1953151766e-01    1.2278780397e-01    1.2595993765e-01    1.2904574469e-01    1.3204311021e-01    
+1.3494997999e-01    1.3776436179e-01    1.4048432677e-01    1.4310801082e-01    1.4563361579e-01    
+1.4805941075e-01    1.5038373318e-01    1.5260499012e-01    1.5472165921e-01    1.5673228982e-01    
+1.5863550394e-01    1.6042999720e-01    1.6211453977e-01    1.6368797712e-01    1.6514923091e-01    
+1.6649729967e-01    1.6773125950e-01    1.6885026470e-01    1.6985354836e-01    1.7074042288e-01    
+1.7151028045e-01    1.7216259343e-01    1.7269691478e-01    1.7311287829e-01    1.7341019887e-01    
+1.7358867277e-01    1.7364817767e-01    0.0000000000e+00    8.9530436121e-03    1.7899951255e-02    
+2.6834591166e-02    3.5750839988e-02    4.4642586971e-02    5.3503738154e-02    6.2328220548e-02    
+7.1109986293e-02    7.9843016805e-02    8.8521326901e-02    9.7138968902e-02    1.0569003671e-01    
+1.1416866984e-01    1.2256905747e-01    1.3088544239e-01    1.3911212496e-01    1.4724346703e-01    
+1.5527389579e-01    1.6319790757e-01    1.7101007166e-01    1.7870503399e-01    1.8627752082e-01    
+1.9372234233e-01    2.0103439623e-01    2.0820867120e-01    2.1524025034e-01    2.2212431457e-01    
+2.2885614589e-01    2.3543113064e-01    2.4184476265e-01    2.4809264634e-01    2.5417049972e-01    
+2.6007415734e-01    2.6579957312e-01    2.7134282315e-01    2.7670010837e-01    2.8186775715e-01    
+2.8684222785e-01    2.9162011122e-01    2.9619813273e-01    3.0057315483e-01    3.0474217911e-01    
+3.0870234832e-01    3.1245094836e-01    3.1598541013e-01    3.1930331128e-01    3.2240237789e-01    
+3.2528048601e-01    3.2793566314e-01    3.3036608955e-01    3.3257009954e-01    3.3454618260e-01    
+3.3629298441e-01    3.3780930781e-01    3.3909411359e-01    3.4014652119e-01    3.4096580937e-01    
+3.4155141661e-01    3.4190294156e-01    3.4202014333e-01    0.0000000000e+00    1.3088474154e-02    
+2.6167978121e-02    3.9229547864e-02    5.2264231634e-02    6.5263096110e-02    7.8217232520e-02    
+9.1117762746e-02    1.0395584541e-01    1.1672268193e-01    1.2940952255e-01    1.4200767235e-01    
+1.5450849719e-01    1.6690342962e-01    1.7918397477e-01    1.9134171618e-01    2.0336832154e-01    
+2.1525554840e-01    2.2699524987e-01    2.3857938013e-01    2.5000000000e-01    2.6124928236e-01    
+2.7231951751e-01    2.8320311846e-01    2.9389262615e-01    3.0438071450e-01    3.1466019552e-01    
+3.2472402417e-01    3.3456530318e-01    3.4417728785e-01    3.5355339059e-01    3.6268718551e-01    
+3.7157241274e-01    3.8020298280e-01    3.8857298073e-01    3.9667667015e-01    4.0450849719e-01    
+4.1206309431e-01    4.1933528397e-01    4.2632008218e-01    4.3301270189e-01    4.3940855633e-01    
+4.4550326209e-01    4.5129264217e-01    4.5677272882e-01    4.6193976626e-01    4.6679021325e-01    
+4.7132074555e-01    4.7552825815e-01    4.7940986743e-01    4.8296291314e-01    4.8618496020e-01    
+4.8907380037e-01    4.9162745378e-01    4.9384417030e-01    4.9572243069e-01    4.9726094768e-01    
+4.9845866687e-01    4.9931476738e-01    4.9982866249e-01    5.0000000000e-01    0.0000000000e+00    
+1.6826218032e-02    3.3640904214e-02    5.0432534601e-02    6.7189601048e-02    8.3900619099e-02    
+1.0055413586e-01    1.1713873783e-01    1.3364305877e-01    1.5005578743e-01    1.6636567534e-01    
+1.8256154454e-01    1.9863229517e-01    2.1456691314e-01    2.3035447768e-01    2.4598416876e-01    
+2.6144527457e-01    2.7672719886e-01    2.9181946815e-01    3.0671173895e-01    3.2139380484e-01    
+3.3585560348e-01    3.5008722346e-01    3.6407891114e-01    3.7782107733e-01    3.9130430382e-01    
+4.0451934989e-01    4.1745715860e-01    4.3010886303e-01    4.4246579233e-01    4.5451947767e-01    
+4.6626165807e-01    4.7768428602e-01    4.8877953302e-01    4.9953979494e-01    5.0995769724e-01    
+5.2002610001e-01    5.2973810286e-01    5.3908704968e-01    5.4806653317e-01    5.5667039923e-01    
+5.6489275120e-01    5.7272795390e-01    5.8017063747e-01    5.8721570106e-01    5.9385831634e-01    
+6.0009393080e-01    6.0591827085e-01    6.1132734479e-01    6.1631744550e-01    6.2088515301e-01    
+6.2502733686e-01    6.2874115820e-01    6.3202407175e-01    6.3487382757e-01    6.3728847258e-01    
+6.3926635190e-01    6.4080611001e-01    6.4190669161e-01    6.4256734243e-01    6.4278760969e-01    
+0.0000000000e+00    2.0052705789e-02    4.0091668455e-02    6.0103154294e-02    8.0073448434e-02    
+9.9988864232e-02    1.1983575266e-01    1.3960051164e-01    1.5926959541e-01    1.7882952375e-01    
+1.9826689127e-01    2.1756837657e-01    2.3672075137e-01    2.5571088959e-01    2.7452577634e-01    
+2.9315251684e-01    3.1157834524e-01    3.2979063341e-01    3.4777689955e-01    3.6552481678e-01    
+3.8302222156e-01    4.0025712204e-01    4.1721770628e-01    4.3389235034e-01    4.5026962627e-01    
+4.6633830988e-01    4.8208738851e-01    4.9750606852e-01    5.1258378272e-01    5.2731019761e-01    
+5.4167522042e-01    5.5566900609e-01    5.6928196399e-01    5.8250476446e-01    5.9532834527e-01    
+6.0774391776e-01    6.1974297293e-01    6.3131728722e-01    6.4245892818e-01    6.5316025988e-01    
+6.6341394817e-01    6.7321296567e-01    6.8255059664e-01    6.9142044152e-01    6.9981642136e-01    
+7.0773278199e-01    7.1516409792e-01    7.2210527610e-01    7.2855155940e-01    7.3449852985e-01    
+7.3994211169e-01    7.4487857418e-01    7.4930453409e-01    7.5321695811e-01    7.5661316485e-01    
+7.5949082671e-01    7.6184797151e-01    7.6368298376e-01    7.6499460583e-01    7.6578193882e-01    
+7.6604444312e-01    0.0000000000e+00    2.2669902228e-02    4.5324267638e-02    6.7947570058e-02    
+9.0524304608e-02    1.1303899832e-01    1.3547622075e-01    1.5782059455e-01    1.8005680599e-01    
+2.0216961549e-01    2.2414386804e-01    2.4596450358e-01    2.6761656733e-01    2.8908522005e-01    
+3.1035574821e-01    3.3141357404e-01    3.5224426555e-01    3.7283354645e-01    3.9316730585e-01    
+4.1323160802e-01    4.3301270189e-01    4.5249703048e-01    4.7167124022e-01    4.9052219004e-01    
+5.0903696046e-01    5.2720286237e-01    5.4500744577e-01    5.6243850829e-01    5.7948410356e-01    
+5.9613254936e-01    6.1237243570e-01    6.2819263255e-01    6.4358229755e-01    6.5853088340e-01    
+6.7302814507e-01    6.8706414687e-01    7.0062926922e-01    7.1371421527e-01    7.2631001725e-01    
+7.3840804262e-01    7.5000000000e-01    7.6107794485e-01    7.7163428488e-01    7.8166178533e-01    
+7.9115357383e-01    8.0010314519e-01    8.0850436582e-01    8.1635147795e-01    8.2363910355e-01    
+8.3036224805e-01    8.3651630374e-01    8.4209705294e-01    8.4710067089e-01    8.5152372835e-01    
+8.5536319398e-01    8.5861643640e-01    8.6128122601e-01    8.6335573649e-01    8.6483854607e-01    
+8.6572863851e-01    8.6602540378e-01    0.0000000000e+00    2.4598285160e-02    4.9179711883e-02    
+7.3727433289e-02    9.8224625595e-02    1.2265449965e-01    1.4700031243e-01    1.7124537855e-01    
+1.9537308164e-01    2.1936688577e-01    2.4321034680e-01    2.6688712361e-01    2.9038098931e-01    
+3.1367584239e-01    3.3675571771e-01    3.5960479749e-01    3.8220742210e-01    4.0454810084e-01    
+4.2661152251e-01    4.4838256596e-01    4.6984631039e-01    4.9098804563e-01    5.1179328220e-01    
+5.3224776121e-01    5.5233746419e-01    5.7204862266e-01    5.9136772758e-01    6.1028153860e-01    
+6.2877709314e-01    6.4684171526e-01    6.6446302439e-01    6.8162894375e-01    6.9832770868e-01    
+7.1454787468e-01    7.3027832525e-01    7.4550827955e-01    7.6022729970e-01    7.7442529804e-01    
+7.8809254397e-01    8.0121967063e-01    8.1379768135e-01    8.2581795579e-01    8.3727225585e-01    
+8.4815273133e-01    8.5845192530e-01    8.6816277920e-01    8.7727863769e-01    8.8579325323e-01    
+8.9370079031e-01    9.0099582952e-01    9.0767337119e-01    9.1372883887e-01    9.1915808245e-01    
+9.2395738099e-01    9.2812344529e-01    9.3165342015e-01    9.3454488629e-01    9.3679586204e-01    
+9.3840480471e-01    9.3937061159e-01    9.3969262079e-01    0.0000000000e+00    2.5779261644e-02    
+5.1540855469e-02    7.7267125767e-02    1.0294044104e-01    1.2854320607e-01    1.5405787401e-01    
+1.7946695838e-01    2.0475304506e-01    2.2989880423e-01    2.5488700224e-01    2.7970051344e-01    
+3.0432233187e-01    3.2873558298e-01    3.5292353514e-01    3.7686961114e-01    4.0055739954e-01    
+4.2397066589e-01    4.4709336394e-01    4.6990964652e-01    4.9240387651e-01    5.1456063747e-01    
+5.3636474428e-01    5.5780125348e-01    5.7885547356e-01    5.9951297502e-01    6.1975960023e-01    
+6.3958147317e-01    6.5896500892e-01    6.7789692296e-01    6.9636424032e-01    7.1435430441e-01    
+7.3185478574e-01    7.4885369036e-01    7.6533936806e-01    7.8130052040e-01    7.9672620838e-01    
+8.1160586002e-01    8.2592927754e-01    8.3968664439e-01    8.5286853195e-01    8.6546590603e-01    
+8.7747013301e-01    8.8887298578e-01    8.9966664942e-01    9.0984372647e-01    9.1939724207e-01    
+9.2832064874e-01    9.3660783080e-01    9.4425310864e-01    9.5125124256e-01    9.5759743640e-01    
+9.6328734079e-01    9.6831705616e-01    9.7268313538e-01    9.7638258617e-01    9.7941287310e-01    
+9.8177191937e-01    9.8345810821e-01    9.8447028399e-01    9.8480775301e-01    0.0000000000e+00    
+2.6176948308e-02    5.2335956243e-02    7.8459095728e-02    1.0452846327e-01    1.3052619222e-01    
+1.5643446504e-01    1.8223552549e-01    2.0791169082e-01    2.3344536386e-01    2.5881904510e-01    
+2.8401534470e-01    3.0901699437e-01    3.3380685923e-01    3.5836794955e-01    3.8268343237e-01    
+4.0673664308e-01    4.3051109681e-01    4.5399049974e-01    4.7715876026e-01    5.0000000000e-01    
+5.2249856472e-01    5.4463903502e-01    5.6640623692e-01    5.8778525229e-01    6.0876142901e-01    
+6.2932039105e-01    6.4944804833e-01    6.6913060636e-01    6.8835457569e-01    7.0710678119e-01    
+7.2537437101e-01    7.4314482548e-01    7.6040596560e-01    7.7714596146e-01    7.9335334029e-01    
+8.0901699437e-01    8.2412618862e-01    8.3867056795e-01    8.5264016435e-01    8.6602540378e-01    
+8.7881711266e-01    8.9100652419e-01    9.0258528435e-01    9.1354545764e-01    9.2387953251e-01    
+9.3358042650e-01    9.4264149109e-01    9.5105651630e-01    9.5881973487e-01    9.6592582629e-01    
+9.7236992040e-01    9.7814760073e-01    9.8325490756e-01    9.8768834060e-01    9.9144486137e-01    
+9.9452189537e-01    9.9691733373e-01    9.9862953475e-01    9.9965732498e-01    1.0000000000e+00    
+0.0000000000e+00    2.5779261644e-02    5.1540855469e-02    7.7267125767e-02    1.0294044104e-01    
+1.2854320607e-01    1.5405787401e-01    1.7946695838e-01    2.0475304506e-01    2.2989880423e-01    
+2.5488700224e-01    2.7970051344e-01    3.0432233187e-01    3.2873558298e-01    3.5292353514e-01    
+3.7686961114e-01    4.0055739954e-01    4.2397066589e-01    4.4709336394e-01    4.6990964652e-01    
+4.9240387651e-01    5.1456063747e-01    5.3636474428e-01    5.5780125348e-01    5.7885547356e-01    
+5.9951297502e-01    6.1975960023e-01    6.3958147317e-01    6.5896500892e-01    6.7789692296e-01    
+6.9636424032e-01    7.1435430441e-01    7.3185478574e-01    7.4885369036e-01    7.6533936806e-01    
+7.8130052040e-01    7.9672620838e-01    8.1160586002e-01    8.2592927754e-01    8.3968664439e-01    
+8.5286853195e-01    8.6546590603e-01    8.7747013301e-01    8.8887298578e-01    8.9966664942e-01    
+9.0984372647e-01    9.1939724207e-01    9.2832064874e-01    9.3660783080e-01    9.4425310864e-01    
+9.5125124256e-01    9.5759743640e-01    9.6328734079e-01    9.6831705616e-01    9.7268313538e-01    
+9.7638258617e-01    9.7941287310e-01    9.8177191937e-01    9.8345810821e-01    9.8447028399e-01    
+9.8480775301e-01    0.0000000000e+00    2.4598285160e-02    4.9179711883e-02    7.3727433289e-02    
+9.8224625595e-02    1.2265449965e-01    1.4700031243e-01    1.7124537855e-01    1.9537308164e-01    
+2.1936688577e-01    2.4321034680e-01    2.6688712361e-01    2.9038098931e-01    3.1367584239e-01    
+3.3675571771e-01    3.5960479749e-01    3.8220742210e-01    4.0454810084e-01    4.2661152251e-01    
+4.4838256596e-01    4.6984631039e-01    4.9098804563e-01    5.1179328220e-01    5.3224776121e-01    
+5.5233746419e-01    5.7204862266e-01    5.9136772758e-01    6.1028153860e-01    6.2877709314e-01    
+6.4684171526e-01    6.6446302439e-01    6.8162894375e-01    6.9832770868e-01    7.1454787468e-01    
+7.3027832525e-01    7.4550827955e-01    7.6022729970e-01    7.7442529804e-01    7.8809254397e-01    
+8.0121967063e-01    8.1379768135e-01    8.2581795579e-01    8.3727225585e-01    8.4815273133e-01    
+8.5845192530e-01    8.6816277920e-01    8.7727863769e-01    8.8579325323e-01    8.9370079031e-01    
+9.0099582952e-01    9.0767337119e-01    9.1372883887e-01    9.1915808245e-01    9.2395738099e-01    
+9.2812344529e-01    9.3165342015e-01    9.3454488629e-01    9.3679586204e-01    9.3840480471e-01    
+9.3937061159e-01    9.3969262079e-01    0.0000000000e+00    2.2669902228e-02    4.5324267638e-02    
+6.7947570058e-02    9.0524304608e-02    1.1303899832e-01    1.3547622075e-01    1.5782059455e-01    
+1.8005680599e-01    2.0216961549e-01    2.2414386804e-01    2.4596450358e-01    2.6761656733e-01    
+2.8908522005e-01    3.1035574821e-01    3.3141357404e-01    3.5224426555e-01    3.7283354645e-01    
+3.9316730585e-01    4.1323160802e-01    4.3301270189e-01    4.5249703048e-01    4.7167124022e-01    
+4.9052219004e-01    5.0903696046e-01    5.2720286237e-01    5.4500744577e-01    5.6243850829e-01    
+5.7948410356e-01    5.9613254936e-01    6.1237243570e-01    6.2819263255e-01    6.4358229755e-01    
+6.5853088340e-01    6.7302814507e-01    6.8706414687e-01    7.0062926922e-01    7.1371421527e-01    
+7.2631001725e-01    7.3840804262e-01    7.5000000000e-01    7.6107794485e-01    7.7163428488e-01    
+7.8166178533e-01    7.9115357383e-01    8.0010314519e-01    8.0850436582e-01    8.1635147795e-01    
+8.2363910355e-01    8.3036224805e-01    8.3651630374e-01    8.4209705294e-01    8.4710067089e-01    
+8.5152372835e-01    8.5536319398e-01    8.5861643640e-01    8.6128122601e-01    8.6335573649e-01    
+8.6483854607e-01    8.6572863851e-01    8.6602540378e-01    0.0000000000e+00    2.0052705789e-02    
+4.0091668455e-02    6.0103154294e-02    8.0073448434e-02    9.9988864232e-02    1.1983575266e-01    
+1.3960051164e-01    1.5926959541e-01    1.7882952375e-01    1.9826689127e-01    2.1756837657e-01    
+2.3672075137e-01    2.5571088959e-01    2.7452577634e-01    2.9315251684e-01    3.1157834524e-01    
+3.2979063341e-01    3.4777689955e-01    3.6552481678e-01    3.8302222156e-01    4.0025712204e-01    
+4.1721770628e-01    4.3389235034e-01    4.5026962627e-01    4.6633830988e-01    4.8208738851e-01    
+4.9750606852e-01    5.1258378272e-01    5.2731019761e-01    5.4167522042e-01    5.5566900609e-01    
+5.6928196399e-01    5.8250476446e-01    5.9532834527e-01    6.0774391776e-01    6.1974297293e-01    
+6.3131728722e-01    6.4245892818e-01    6.5316025988e-01    6.6341394817e-01    6.7321296567e-01    
+6.8255059664e-01    6.9142044152e-01    6.9981642136e-01    7.0773278199e-01    7.1516409792e-01    
+7.2210527610e-01    7.2855155940e-01    7.3449852985e-01    7.3994211169e-01    7.4487857418e-01    
+7.4930453409e-01    7.5321695811e-01    7.5661316485e-01    7.5949082671e-01    7.6184797151e-01    
+7.6368298376e-01    7.6499460583e-01    7.6578193882e-01    7.6604444312e-01    0.0000000000e+00    
+1.6826218032e-02    3.3640904214e-02    5.0432534601e-02    6.7189601048e-02    8.3900619099e-02    
+1.0055413586e-01    1.1713873783e-01    1.3364305877e-01    1.5005578743e-01    1.6636567534e-01    
+1.8256154454e-01    1.9863229517e-01    2.1456691314e-01    2.3035447768e-01    2.4598416876e-01    
+2.6144527457e-01    2.7672719886e-01    2.9181946815e-01    3.0671173895e-01    3.2139380484e-01    
+3.3585560348e-01    3.5008722346e-01    3.6407891114e-01    3.7782107733e-01    3.9130430382e-01    
+4.0451934989e-01    4.1745715860e-01    4.3010886303e-01    4.4246579233e-01    4.5451947767e-01    
+4.6626165807e-01    4.7768428602e-01    4.8877953302e-01    4.9953979494e-01    5.0995769724e-01    
+5.2002610001e-01    5.2973810286e-01    5.3908704968e-01    5.4806653317e-01    5.5667039923e-01    
+5.6489275120e-01    5.7272795390e-01    5.8017063747e-01    5.8721570106e-01    5.9385831634e-01    
+6.0009393080e-01    6.0591827085e-01    6.1132734479e-01    6.1631744550e-01    6.2088515301e-01    
+6.2502733686e-01    6.2874115820e-01    6.3202407175e-01    6.3487382757e-01    6.3728847258e-01    
+6.3926635190e-01    6.4080611001e-01    6.4190669161e-01    6.4256734243e-01    6.4278760969e-01    
+0.0000000000e+00    1.3088474154e-02    2.6167978121e-02    3.9229547864e-02    5.2264231634e-02    
+6.5263096110e-02    7.8217232520e-02    9.1117762746e-02    1.0395584541e-01    1.1672268193e-01    
+1.2940952255e-01    1.4200767235e-01    1.5450849719e-01    1.6690342962e-01    1.7918397477e-01    
+1.9134171618e-01    2.0336832154e-01    2.1525554840e-01    2.2699524987e-01    2.3857938013e-01    
+2.5000000000e-01    2.6124928236e-01    2.7231951751e-01    2.8320311846e-01    2.9389262615e-01    
+3.0438071450e-01    3.1466019552e-01    3.2472402417e-01    3.3456530318e-01    3.4417728785e-01    
+3.5355339059e-01    3.6268718551e-01    3.7157241274e-01    3.8020298280e-01    3.8857298073e-01    
+3.9667667015e-01    4.0450849719e-01    4.1206309431e-01    4.1933528397e-01    4.2632008218e-01    
+4.3301270189e-01    4.3940855633e-01    4.4550326209e-01    4.5129264217e-01    4.5677272882e-01    
+4.6193976626e-01    4.6679021325e-01    4.7132074555e-01    4.7552825815e-01    4.7940986743e-01    
+4.8296291314e-01    4.8618496020e-01    4.8907380037e-01    4.9162745378e-01    4.9384417030e-01    
+4.9572243069e-01    4.9726094768e-01    4.9845866687e-01    4.9931476738e-01    4.9982866249e-01    
+5.0000000000e-01    0.0000000000e+00    8.9530436121e-03    1.7899951255e-02    2.6834591166e-02    
+3.5750839988e-02    4.4642586971e-02    5.3503738154e-02    6.2328220548e-02    7.1109986293e-02    
+7.9843016805e-02    8.8521326901e-02    9.7138968902e-02    1.0569003671e-01    1.1416866984e-01    
+1.2256905747e-01    1.3088544239e-01    1.3911212496e-01    1.4724346703e-01    1.5527389579e-01    
+1.6319790757e-01    1.7101007166e-01    1.7870503399e-01    1.8627752082e-01    1.9372234233e-01    
+2.0103439623e-01    2.0820867120e-01    2.1524025034e-01    2.2212431457e-01    2.2885614589e-01    
+2.3543113064e-01    2.4184476265e-01    2.4809264634e-01    2.5417049972e-01    2.6007415734e-01    
+2.6579957312e-01    2.7134282315e-01    2.7670010837e-01    2.8186775715e-01    2.8684222785e-01    
+2.9162011122e-01    2.9619813273e-01    3.0057315483e-01    3.0474217911e-01    3.0870234832e-01    
+3.1245094836e-01    3.1598541013e-01    3.1930331128e-01    3.2240237789e-01    3.2528048601e-01    
+3.2793566314e-01    3.3036608955e-01    3.3257009954e-01    3.3454618260e-01    3.3629298441e-01    
+3.3780930781e-01    3.3909411359e-01    3.4014652119e-01    3.4096580937e-01    3.4155141661e-01    
+3.4190294156e-01    3.4202014333e-01    0.0000000000e+00    4.5455793705e-03    9.0880434280e-03    
+1.3624278995e-02    1.8151177161e-02    2.2665635417e-02    2.7164559779e-02    3.1644866908e-02    
+3.6103486226e-02    4.0537362018e-02    4.4943455528e-02    4.9318747037e-02    5.3660237941e-02    
+5.7964952799e-02    6.2229941373e-02    6.6452280654e-02    7.0629076860e-02    7.4757467426e-02    
+7.8834622958e-02    8.2857749177e-02    8.6824088833e-02    9.0730923597e-02    9.4575575917e-02    
+9.8355410861e-02    1.0206783792e-01    1.0571031278e-01    1.0928033907e-01    1.1277547008e-01    
+1.1619331042e-01    1.1953151766e-01    1.2278780397e-01    1.2595993765e-01    1.2904574469e-01    
+1.3204311021e-01    1.3494997999e-01    1.3776436179e-01    1.4048432677e-01    1.4310801082e-01    
+1.4563361579e-01    1.4805941075e-01    1.5038373318e-01    1.5260499012e-01    1.5472165921e-01    
+1.5673228982e-01    1.5863550394e-01    1.6042999720e-01    1.6211453977e-01    1.6368797712e-01    
+1.6514923091e-01    1.6649729967e-01    1.6773125950e-01    1.6885026470e-01    1.6985354836e-01    
+1.7074042288e-01    1.7151028045e-01    1.7216259343e-01    1.7269691478e-01    1.7311287829e-01    
+1.7341019887e-01    1.7358867277e-01    1.7364817767e-01    0.0000000000e+00    1.6028228611e-18    
+3.2045472274e-18    4.8040753572e-18    6.4003110136e-18    7.9921602166e-18    9.5785319923e-18    
+1.1158339120e-17    1.2730498880e-17    1.4293933792e-17    1.5847572356e-17    1.7390349785e-17    
+1.8921208738e-17    2.0439100038e-17    2.1942983401e-17    2.3431828139e-17    2.4904613872e-17    
+2.6360331227e-17    2.7797982528e-17    2.9216582480e-17    3.0615158846e-17    3.1992753111e-17    
+3.3348421141e-17    3.4681233829e-17    3.5990277732e-17    3.7274655696e-17    3.8533487473e-17    
+3.9765910323e-17    4.0971079604e-17    4.2148169354e-17    4.3296372854e-17    4.4414903182e-17    
+4.5502993754e-17    4.6559898848e-17    4.7584894112e-17    4.8577277067e-17    4.9536367583e-17    
+5.0461508347e-17    5.1352065313e-17    5.2207428140e-17    5.3027010602e-17    5.3810251001e-17    
+5.4556612541e-17    5.5265583704e-17    5.5936678597e-17    5.6569437284e-17    5.7163426105e-17    
+5.7718237968e-17    5.8233492635e-17    5.8708836974e-17    5.9143945210e-17    5.9538519139e-17    
+5.9892288342e-17    6.0205010361e-17    6.0476470874e-17    6.0706483835e-17    6.0894891604e-17    
+6.1041565056e-17    6.1146403669e-17    6.1209335591e-17    6.1230317691e-17    
+1.1331676959e+00    1.1342921975e+00    1.1357061692e+00    1.1357192432e+00    1.1344736454e+00    
+1.1323615000e+00    1.1300257086e+00    1.1273619369e+00    1.1242858333e+00    1.1211800613e+00    
+1.1175911275e+00    1.1128927507e+00    1.1078349428e+00    1.1028874025e+00    1.0977532444e+00    
+1.0925730693e+00    1.0874762713e+00    1.0820068707e+00    1.0760412950e+00    1.0701981236e+00    
+1.0645944125e+00    1.0589937887e+00    1.0536803314e+00    1.0482837908e+00    1.0419510485e+00    
+1.0351222223e+00    1.0286166613e+00    1.0223326954e+00    1.0161796310e+00    1.0105765308e+00    
+1.0052467088e+00    9.9972371267e-01    9.9458840182e-01    9.8983863676e-01    9.8477876681e-01    
+9.7977151042e-01    9.7541137937e-01    9.7143097643e-01    9.6773019866e-01    9.6486667495e-01    
+9.6261515924e-01    9.6049996031e-01    9.5917834087e-01    9.5876945187e-01    9.5868220684e-01    
+9.5931204613e-01    9.6125331063e-01    9.6424283689e-01    9.6831280210e-01    9.7436492779e-01    
+9.8234316319e-01    9.9196084390e-01    1.0046349261e+00    1.0213710344e+00    1.0425187788e+00    
+1.0702111694e+00    1.1082618366e+00    1.1620234182e+00    1.2408632114e+00    1.3639019451e+00    
+1.4397159353e+00    1.1332478155e+00    1.1343444186e+00    1.1357254919e+00    1.1357314838e+00    
+1.1344826622e+00    1.1323686571e+00    1.1300316554e+00    1.1273670334e+00    1.1242903003e+00    
+1.1211840456e+00    1.1175947298e+00    1.1128960421e+00    1.1078379786e+00    1.1028902261e+00    
+1.0977558893e+00    1.0925755630e+00    1.0874786361e+00    1.0820091246e+00    1.0760434531e+00    
+1.0702001995e+00    1.0645964184e+00    1.0589957350e+00    1.0536822275e+00    1.0482856451e+00    
+1.0419528673e+00    1.0351240121e+00    1.0286184294e+00    1.0223344485e+00    1.0161813754e+00    
+1.0105782735e+00    1.0052484563e+00    9.9972547098e-01    9.9459017797e-01    9.8984043800e-01    
+9.8478060010e-01    9.7977338376e-01    9.7541330210e-01    9.7143295848e-01    9.6773225107e-01    
+9.6486881083e-01    9.6261739315e-01    9.6050230853e-01    9.5918082336e-01    9.5877209209e-01    
+9.5868503191e-01    9.5931508955e-01    9.6125661419e-01    9.6424645150e-01    9.6831679195e-01    
+9.7436937707e-01    9.8234817992e-01    9.9196657040e-01    1.0046415613e+00    1.0213788574e+00    
+1.0425281917e+00    1.0702227883e+00    1.1082766608e+00    1.1620431782e+00    1.2408911967e+00    
+1.3639453137e+00    1.4397694834e+00    1.1333279564e+00    1.1343966512e+00    1.1357448159e+00    
+1.1357437249e+00    1.1344916794e+00    1.1323758144e+00    1.1300376023e+00    1.1273721301e+00    
+1.1242947673e+00    1.1211880299e+00    1.1175983321e+00    1.1128993336e+00    1.1078410144e+00    
+1.1028930497e+00    1.0977585343e+00    1.0925780566e+00    1.0874810010e+00    1.0820113787e+00    
+1.0760456112e+00    1.0702022755e+00    1.0645984244e+00    1.0589976813e+00    1.0536841237e+00    
+1.0482874993e+00    1.0419546860e+00    1.0351258020e+00    1.0286201975e+00    1.0223362015e+00    
+1.0161831199e+00    1.0105800163e+00    1.0052502038e+00    9.9972722931e-01    9.9459195415e-01    
+9.8984223927e-01    9.8478243343e-01    9.7977525714e-01    9.7541522486e-01    9.7143494056e-01    
+9.6773430351e-01    9.6487094675e-01    9.6261962710e-01    9.6050465680e-01    9.5918330591e-01    
+9.5877473237e-01    9.5868785705e-01    9.5931813306e-01    9.6125991784e-01    9.6425006622e-01    
+9.6832078195e-01    9.7437382652e-01    9.8235319684e-01    9.9197229714e-01    1.0046481967e+00    
+1.0213866807e+00    1.0425376050e+00    1.0702344078e+00    1.1082914859e+00    1.1620629392e+00    
+1.2409191833e+00    1.3639886835e+00    1.4398230328e+00    1.1333279776e+00    1.1343966628e+00    
+1.1357448172e+00    1.1357437254e+00    1.1344916797e+00    1.1323758146e+00    1.1300376025e+00    
+1.1273721302e+00    1.1242947674e+00    1.1211880300e+00    1.1175983321e+00    1.1128993337e+00    
+1.1078410145e+00    1.1028930498e+00    1.0977585344e+00    1.0925780567e+00    1.0874810010e+00    
+1.0820113787e+00    1.0760456112e+00    1.0702022755e+00    1.0645984244e+00    1.0589976813e+00    
+1.0536841237e+00    1.0482874994e+00    1.0419546861e+00    1.0351258020e+00    1.0286201975e+00    
+1.0223362016e+00    1.0161831200e+00    1.0105800163e+00    1.0052502038e+00    9.9972722934e-01    
+9.9459195417e-01    9.8984223929e-01    9.8478243346e-01    9.7977525717e-01    9.7541522489e-01    
+9.7143494060e-01    9.6773430355e-01    9.6487094679e-01    9.6261962715e-01    9.6050465685e-01    
+9.5918330596e-01    9.5877473244e-01    9.5868785712e-01    9.5931813315e-01    9.6125991794e-01    
+9.6425006634e-01    9.6832078209e-01    9.7437382669e-01    9.8235319704e-01    9.9197229738e-01    
+1.0046481970e+00    1.0213866810e+00    1.0425376055e+00    1.0702344084e+00    1.1082914867e+00    
+1.1620629402e+00    1.2409191845e+00    1.3639886849e+00    1.4398230340e+00    1.1333279776e+00    
+1.1343966628e+00    1.1357448171e+00    1.1357437254e+00    1.1344916797e+00    1.1323758146e+00    
+1.1300376025e+00    1.1273721302e+00    1.1242947674e+00    1.1211880300e+00    1.1175983321e+00    
+1.1128993337e+00    1.1078410145e+00    1.1028930498e+00    1.0977585344e+00    1.0925780567e+00    
+1.0874810010e+00    1.0820113787e+00    1.0760456112e+00    1.0702022755e+00    1.0645984244e+00    
+1.0589976813e+00    1.0536841237e+00    1.0482874994e+00    1.0419546861e+00    1.0351258020e+00    
+1.0286201975e+00    1.0223362016e+00    1.0161831200e+00    1.0105800163e+00    1.0052502038e+00    
+9.9972722934e-01    9.9459195417e-01    9.8984223930e-01    9.8478243346e-01    9.7977525717e-01    
+9.7541522489e-01    9.7143494060e-01    9.6773430355e-01    9.6487094679e-01    9.6261962715e-01    
+9.6050465685e-01    9.5918330596e-01    9.5877473244e-01    9.5868785712e-01    9.5931813315e-01    
+9.6125991794e-01    9.6425006634e-01    9.6832078209e-01    9.7437382669e-01    9.8235319704e-01    
+9.9197229738e-01    1.0046481970e+00    1.0213866810e+00    1.0425376055e+00    1.0702344084e+00    
+1.1082914867e+00    1.1620629402e+00    1.2409191845e+00    1.3639886849e+00    1.4398230340e+00    
+1.1333279776e+00    1.1343966628e+00    1.1357448171e+00    1.1357437254e+00    1.1344916797e+00    
+1.1323758146e+00    1.1300376025e+00    1.1273721302e+00    1.1242947674e+00    1.1211880300e+00    
+1.1175983321e+00    1.1128993337e+00    1.1078410145e+00    1.1028930498e+00    1.0977585344e+00    
+1.0925780567e+00    1.0874810010e+00    1.0820113787e+00    1.0760456112e+00    1.0702022755e+00    
+1.0645984244e+00    1.0589976813e+00    1.0536841237e+00    1.0482874994e+00    1.0419546861e+00    
+1.0351258020e+00    1.0286201975e+00    1.0223362016e+00    1.0161831200e+00    1.0105800163e+00    
+1.0052502038e+00    9.9972722934e-01    9.9459195417e-01    9.8984223930e-01    9.8478243346e-01    
+9.7977525717e-01    9.7541522489e-01    9.7143494060e-01    9.6773430354e-01    9.6487094679e-01    
+9.6261962715e-01    9.6050465685e-01    9.5918330596e-01    9.5877473244e-01    9.5868785712e-01    
+9.5931813315e-01    9.6125991794e-01    9.6425006634e-01    9.6832078209e-01    9.7437382669e-01    
+9.8235319704e-01    9.9197229738e-01    1.0046481970e+00    1.0213866810e+00    1.0425376055e+00    
+1.0702344084e+00    1.1082914867e+00    1.1620629402e+00    1.2409191845e+00    1.3639886849e+00    
+1.4398230340e+00    1.1333279776e+00    1.1343966628e+00    1.1357448171e+00    1.1357437254e+00    
+1.1344916797e+00    1.1323758146e+00    1.1300376025e+00    1.1273721302e+00    1.1242947674e+00    
+1.1211880300e+00    1.1175983321e+00    1.1128993337e+00    1.1078410145e+00    1.1028930498e+00    
+1.0977585344e+00    1.0925780567e+00    1.0874810010e+00    1.0820113787e+00    1.0760456112e+00    
+1.0702022755e+00    1.0645984244e+00    1.0589976813e+00    1.0536841237e+00    1.0482874994e+00    
+1.0419546861e+00    1.0351258020e+00    1.0286201975e+00    1.0223362016e+00    1.0161831200e+00    
+1.0105800163e+00    1.0052502038e+00    9.9972722934e-01    9.9459195417e-01    9.8984223930e-01    
+9.8478243346e-01    9.7977525717e-01    9.7541522489e-01    9.7143494060e-01    9.6773430354e-01    
+9.6487094679e-01    9.6261962715e-01    9.6050465685e-01    9.5918330596e-01    9.5877473243e-01    
+9.5868785712e-01    9.5931813315e-01    9.6125991794e-01    9.6425006634e-01    9.6832078209e-01    
+9.7437382669e-01    9.8235319704e-01    9.9197229739e-01    1.0046481970e+00    1.0213866810e+00    
+1.0425376055e+00    1.0702344084e+00    1.1082914867e+00    1.1620629402e+00    1.2409191845e+00    
+1.3639886849e+00    1.4398230340e+00    1.1333279776e+00    1.1343966628e+00    1.1357448172e+00    
+1.1357437254e+00    1.1344916797e+00    1.1323758146e+00    1.1300376025e+00    1.1273721302e+00    
+1.1242947674e+00    1.1211880300e+00    1.1175983321e+00    1.1128993337e+00    1.1078410145e+00    
+1.1028930498e+00    1.0977585344e+00    1.0925780567e+00    1.0874810010e+00    1.0820113787e+00    
+1.0760456112e+00    1.0702022755e+00    1.0645984244e+00    1.0589976813e+00    1.0536841237e+00    
+1.0482874994e+00    1.0419546861e+00    1.0351258020e+00    1.0286201975e+00    1.0223362016e+00    
+1.0161831200e+00    1.0105800163e+00    1.0052502038e+00    9.9972722934e-01    9.9459195417e-01    
+9.8984223930e-01    9.8478243346e-01    9.7977525717e-01    9.7541522489e-01    9.7143494060e-01    
+9.6773430354e-01    9.6487094679e-01    9.6261962715e-01    9.6050465685e-01    9.5918330596e-01    
+9.5877473244e-01    9.5868785712e-01    9.5931813315e-01    9.6125991794e-01    9.6425006634e-01    
+9.6832078209e-01    9.7437382669e-01    9.8235319704e-01    9.9197229739e-01    1.0046481970e+00    
+1.0213866810e+00    1.0425376055e+00    1.0702344084e+00    1.1082914867e+00    1.1620629402e+00    
+1.2409191845e+00    1.3639886849e+00    1.4398230340e+00    1.1333279776e+00    1.1343966629e+00    
+1.1357448173e+00    1.1357437254e+00    1.1344916797e+00    1.1323758146e+00    1.1300376025e+00    
+1.1273721302e+00    1.1242947674e+00    1.1211880300e+00    1.1175983321e+00    1.1128993337e+00    
+1.1078410145e+00    1.1028930498e+00    1.0977585344e+00    1.0925780567e+00    1.0874810010e+00    
+1.0820113787e+00    1.0760456112e+00    1.0702022755e+00    1.0645984244e+00    1.0589976813e+00    
+1.0536841237e+00    1.0482874994e+00    1.0419546861e+00    1.0351258020e+00    1.0286201975e+00    
+1.0223362016e+00    1.0161831200e+00    1.0105800163e+00    1.0052502038e+00    9.9972722934e-01    
+9.9459195417e-01    9.8984223930e-01    9.8478243346e-01    9.7977525717e-01    9.7541522489e-01    
+9.7143494060e-01    9.6773430354e-01    9.6487094679e-01    9.6261962715e-01    9.6050465685e-01    
+9.5918330596e-01    9.5877473244e-01    9.5868785712e-01    9.5931813315e-01    9.6125991794e-01    
+9.6425006634e-01    9.6832078209e-01    9.7437382669e-01    9.8235319704e-01    9.9197229738e-01    
+1.0046481970e+00    1.0213866810e+00    1.0425376055e+00    1.0702344084e+00    1.1082914867e+00    
+1.1620629402e+00    1.2409191845e+00    1.3639886849e+00    1.4398230340e+00    1.1333279777e+00    
+1.1343966631e+00    1.1357448174e+00    1.1357437254e+00    1.1344916797e+00    1.1323758146e+00    
+1.1300376025e+00    1.1273721302e+00    1.1242947674e+00    1.1211880300e+00    1.1175983321e+00    
+1.1128993337e+00    1.1078410145e+00    1.1028930498e+00    1.0977585344e+00    1.0925780567e+00    
+1.0874810010e+00    1.0820113787e+00    1.0760456112e+00    1.0702022755e+00    1.0645984244e+00    
+1.0589976813e+00    1.0536841237e+00    1.0482874994e+00    1.0419546861e+00    1.0351258020e+00    
+1.0286201975e+00    1.0223362016e+00    1.0161831200e+00    1.0105800163e+00    1.0052502038e+00    
+9.9972722934e-01    9.9459195417e-01    9.8984223930e-01    9.8478243346e-01    9.7977525717e-01    
+9.7541522489e-01    9.7143494060e-01    9.6773430354e-01    9.6487094679e-01    9.6261962715e-01    
+9.6050465685e-01    9.5918330596e-01    9.5877473244e-01    9.5868785712e-01    9.5931813315e-01    
+9.6125991794e-01    9.6425006634e-01    9.6832078209e-01    9.7437382669e-01    9.8235319704e-01    
+9.9197229738e-01    1.0046481970e+00    1.0213866810e+00    1.0425376055e+00    1.0702344084e+00    
+1.1082914867e+00    1.1620629402e+00    1.2409191845e+00    1.3639886849e+00    1.4398230340e+00    
+1.1333279777e+00    1.1343966632e+00    1.1357448176e+00    1.1357437254e+00    1.1344916797e+00    
+1.1323758146e+00    1.1300376025e+00    1.1273721302e+00    1.1242947674e+00    1.1211880300e+00    
+1.1175983321e+00    1.1128993337e+00    1.1078410145e+00    1.1028930498e+00    1.0977585344e+00    
+1.0925780567e+00    1.0874810010e+00    1.0820113787e+00    1.0760456112e+00    1.0702022755e+00    
+1.0645984244e+00    1.0589976813e+00    1.0536841237e+00    1.0482874994e+00    1.0419546861e+00    
+1.0351258020e+00    1.0286201975e+00    1.0223362016e+00    1.0161831200e+00    1.0105800163e+00    
+1.0052502038e+00    9.9972722934e-01    9.9459195417e-01    9.8984223930e-01    9.8478243346e-01    
+9.7977525717e-01    9.7541522489e-01    9.7143494060e-01    9.6773430354e-01    9.6487094679e-01    
+9.6261962715e-01    9.6050465685e-01    9.5918330596e-01    9.5877473244e-01    9.5868785712e-01    
+9.5931813315e-01    9.6125991794e-01    9.6425006634e-01    9.6832078209e-01    9.7437382669e-01    
+9.8235319704e-01    9.9197229738e-01    1.0046481970e+00    1.0213866810e+00    1.0425376055e+00    
+1.0702344084e+00    1.1082914867e+00    1.1620629402e+00    1.2409191845e+00    1.3639886849e+00    
+1.4398230340e+00    1.1333279777e+00    1.1343966634e+00    1.1357448177e+00    1.1357437254e+00    
+1.1344916797e+00    1.1323758146e+00    1.1300376025e+00    1.1273721302e+00    1.1242947674e+00    
+1.1211880300e+00    1.1175983321e+00    1.1128993337e+00    1.1078410145e+00    1.1028930498e+00    
+1.0977585344e+00    1.0925780567e+00    1.0874810010e+00    1.0820113787e+00    1.0760456112e+00    
+1.0702022755e+00    1.0645984244e+00    1.0589976813e+00    1.0536841237e+00    1.0482874994e+00    
+1.0419546861e+00    1.0351258020e+00    1.0286201975e+00    1.0223362016e+00    1.0161831200e+00    
+1.0105800163e+00    1.0052502038e+00    9.9972722934e-01    9.9459195417e-01    9.8984223930e-01    
+9.8478243346e-01    9.7977525717e-01    9.7541522489e-01    9.7143494060e-01    9.6773430354e-01    
+9.6487094679e-01    9.6261962715e-01    9.6050465685e-01    9.5918330596e-01    9.5877473244e-01    
+9.5868785712e-01    9.5931813315e-01    9.6125991794e-01    9.6425006634e-01    9.6832078209e-01    
+9.7437382669e-01    9.8235319704e-01    9.9197229739e-01    1.0046481970e+00    1.0213866810e+00    
+1.0425376055e+00    1.0702344084e+00    1.1082914867e+00    1.1620629402e+00    1.2409191845e+00    
+1.3639886849e+00    1.4398230340e+00    1.1333279777e+00    1.1343966636e+00    1.1357448179e+00    
+1.1357437254e+00    1.1344916797e+00    1.1323758146e+00    1.1300376025e+00    1.1273721302e+00    
+1.1242947674e+00    1.1211880300e+00    1.1175983321e+00    1.1128993337e+00    1.1078410145e+00    
+1.1028930498e+00    1.0977585344e+00    1.0925780567e+00    1.0874810010e+00    1.0820113787e+00    
+1.0760456112e+00    1.0702022755e+00    1.0645984244e+00    1.0589976813e+00    1.0536841237e+00    
+1.0482874994e+00    1.0419546861e+00    1.0351258020e+00    1.0286201975e+00    1.0223362016e+00    
+1.0161831200e+00    1.0105800163e+00    1.0052502038e+00    9.9972722934e-01    9.9459195417e-01    
+9.8984223929e-01    9.8478243346e-01    9.7977525717e-01    9.7541522489e-01    9.7143494060e-01    
+9.6773430354e-01    9.6487094679e-01    9.6261962715e-01    9.6050465685e-01    9.5918330596e-01    
+9.5877473244e-01    9.5868785712e-01    9.5931813315e-01    9.6125991794e-01    9.6425006634e-01    
+9.6832078209e-01    9.7437382669e-01    9.8235319704e-01    9.9197229739e-01    1.0046481970e+00    
+1.0213866810e+00    1.0425376055e+00    1.0702344084e+00    1.1082914867e+00    1.1620629402e+00    
+1.2409191845e+00    1.3639886849e+00    1.4398230340e+00    1.1333279777e+00    1.1343966638e+00    
+1.1357448181e+00    1.1357437254e+00    1.1344916797e+00    1.1323758146e+00    1.1300376025e+00    
+1.1273721302e+00    1.1242947674e+00    1.1211880300e+00    1.1175983321e+00    1.1128993337e+00    
+1.1078410145e+00    1.1028930498e+00    1.0977585344e+00    1.0925780567e+00    1.0874810010e+00    
+1.0820113787e+00    1.0760456112e+00    1.0702022755e+00    1.0645984244e+00    1.0589976813e+00    
+1.0536841237e+00    1.0482874994e+00    1.0419546861e+00    1.0351258020e+00    1.0286201975e+00    
+1.0223362016e+00    1.0161831200e+00    1.0105800163e+00    1.0052502038e+00    9.9972722934e-01    
+9.9459195417e-01    9.8984223930e-01    9.8478243346e-01    9.7977525717e-01    9.7541522489e-01    
+9.7143494060e-01    9.6773430354e-01    9.6487094679e-01    9.6261962715e-01    9.6050465685e-01    
+9.5918330596e-01    9.5877473244e-01    9.5868785712e-01    9.5931813315e-01    9.6125991794e-01    
+9.6425006634e-01    9.6832078209e-01    9.7437382669e-01    9.8235319704e-01    9.9197229739e-01    
+1.0046481970e+00    1.0213866810e+00    1.0425376055e+00    1.0702344084e+00    1.1082914867e+00    
+1.1620629402e+00    1.2409191845e+00    1.3639886849e+00    1.4398230340e+00    1.1333279777e+00    
+1.1343966640e+00    1.1357448183e+00    1.1357437254e+00    1.1344916797e+00    1.1323758146e+00    
+1.1300376025e+00    1.1273721302e+00    1.1242947674e+00    1.1211880300e+00    1.1175983321e+00    
+1.1128993337e+00    1.1078410145e+00    1.1028930498e+00    1.0977585344e+00    1.0925780567e+00    
+1.0874810010e+00    1.0820113787e+00    1.0760456112e+00    1.0702022755e+00    1.0645984244e+00    
+1.0589976813e+00    1.0536841237e+00    1.0482874994e+00    1.0419546861e+00    1.0351258020e+00    
+1.0286201975e+00    1.0223362016e+00    1.0161831200e+00    1.0105800163e+00    1.0052502038e+00    
+9.9972722934e-01    9.9459195417e-01    9.8984223930e-01    9.8478243346e-01    9.7977525717e-01    
+9.7541522489e-01    9.7143494060e-01    9.6773430354e-01    9.6487094679e-01    9.6261962715e-01    
+9.6050465685e-01    9.5918330596e-01    9.5877473243e-01    9.5868785712e-01    9.5931813315e-01    
+9.6125991794e-01    9.6425006634e-01    9.6832078209e-01    9.7437382669e-01    9.8235319704e-01    
+9.9197229738e-01    1.0046481970e+00    1.0213866810e+00    1.0425376055e+00    1.0702344084e+00    
+1.1082914867e+00    1.1620629402e+00    1.2409191845e+00    1.3639886849e+00    1.4398230340e+00    
+1.1333279777e+00    1.1343966642e+00    1.1357448185e+00    1.1357437254e+00    1.1344916797e+00    
+1.1323758146e+00    1.1300376025e+00    1.1273721302e+00    1.1242947674e+00    1.1211880300e+00    
+1.1175983321e+00    1.1128993337e+00    1.1078410145e+00    1.1028930498e+00    1.0977585344e+00    
+1.0925780567e+00    1.0874810010e+00    1.0820113787e+00    1.0760456112e+00    1.0702022755e+00    
+1.0645984244e+00    1.0589976813e+00    1.0536841237e+00    1.0482874994e+00    1.0419546861e+00    
+1.0351258020e+00    1.0286201975e+00    1.0223362016e+00    1.0161831200e+00    1.0105800163e+00    
+1.0052502038e+00    9.9972722934e-01    9.9459195417e-01    9.8984223930e-01    9.8478243346e-01    
+9.7977525717e-01    9.7541522489e-01    9.7143494060e-01    9.6773430354e-01    9.6487094679e-01    
+9.6261962715e-01    9.6050465685e-01    9.5918330596e-01    9.5877473244e-01    9.5868785712e-01    
+9.5931813315e-01    9.6125991794e-01    9.6425006634e-01    9.6832078209e-01    9.7437382669e-01    
+9.8235319704e-01    9.9197229739e-01    1.0046481970e+00    1.0213866810e+00    1.0425376055e+00    
+1.0702344084e+00    1.1082914867e+00    1.1620629402e+00    1.2409191845e+00    1.3639886849e+00    
+1.4398230340e+00    1.1333279564e+00    1.1343966527e+00    1.1357448173e+00    1.1357437249e+00    
+1.1344916794e+00    1.1323758144e+00    1.1300376023e+00    1.1273721301e+00    1.1242947673e+00    
+1.1211880299e+00    1.1175983321e+00    1.1128993336e+00    1.1078410144e+00    1.1028930497e+00    
+1.0977585343e+00    1.0925780566e+00    1.0874810010e+00    1.0820113787e+00    1.0760456112e+00    
+1.0702022755e+00    1.0645984244e+00    1.0589976813e+00    1.0536841237e+00    1.0482874993e+00    
+1.0419546860e+00    1.0351258020e+00    1.0286201975e+00    1.0223362015e+00    1.0161831199e+00    
+1.0105800163e+00    1.0052502038e+00    9.9972722931e-01    9.9459195415e-01    9.8984223927e-01    
+9.8478243343e-01    9.7977525714e-01    9.7541522486e-01    9.7143494056e-01    9.6773430351e-01    
+9.6487094675e-01    9.6261962710e-01    9.6050465680e-01    9.5918330591e-01    9.5877473237e-01    
+9.5868785705e-01    9.5931813306e-01    9.6125991784e-01    9.6425006622e-01    9.6832078195e-01    
+9.7437382652e-01    9.8235319684e-01    9.9197229714e-01    1.0046481967e+00    1.0213866807e+00    
+1.0425376050e+00    1.0702344078e+00    1.1082914859e+00    1.1620629392e+00    1.2409191833e+00    
+1.3639886836e+00    1.4398230328e+00    1.1332478064e+00    1.1343444159e+00    1.1357254937e+00    
+1.1357314838e+00    1.1344826624e+00    1.1323686573e+00    1.1300316556e+00    1.1273670337e+00    
+1.1242903005e+00    1.1211840458e+00    1.1175947300e+00    1.1128960424e+00    1.1078379789e+00    
+1.1028902264e+00    1.0977558896e+00    1.0925755633e+00    1.0874786364e+00    1.0820091250e+00    
+1.0760434534e+00    1.0702001999e+00    1.0645964188e+00    1.0589957354e+00    1.0536822279e+00    
+1.0482856455e+00    1.0419528677e+00    1.0351240126e+00    1.0286184299e+00    1.0223344490e+00    
+1.0161813760e+00    1.0105782741e+00    1.0052484569e+00    9.9972547169e-01    9.9459017875e-01    
+9.8984043885e-01    9.8478060103e-01    9.7977338478e-01    9.7541330322e-01    9.7143295973e-01    
+9.6773225246e-01    9.6486881239e-01    9.6261739492e-01    9.6050231053e-01    9.5918082565e-01    
+9.5877209473e-01    9.5868503496e-01    9.5931509312e-01    9.6125661841e-01    9.6424645652e-01    
+9.6831679800e-01    9.7436938445e-01    9.8234818902e-01    9.9196658179e-01    1.0046415758e+00    
+1.0213788763e+00    1.0425282170e+00    1.0702228231e+00    1.1082767106e+00    1.1620432529e+00    
+1.2408913169e+00    1.3639455341e+00    1.4397697744e+00    1.1331676776e+00    1.1342921905e+00    
+1.1357061714e+00    1.1357192433e+00    1.1344736457e+00    1.1323615003e+00    1.1300257090e+00    
+1.1273619374e+00    1.1242858337e+00    1.1211800618e+00    1.1175911280e+00    1.1128927512e+00    
+1.1078349434e+00    1.1028874031e+00    1.0977532449e+00    1.0925730699e+00    1.0874762719e+00    
+1.0820068713e+00    1.0760412957e+00    1.0701981243e+00    1.0645944132e+00    1.0589937895e+00    
+1.0536803322e+00    1.0482837917e+00    1.0419510494e+00    1.0351222233e+00    1.0286166624e+00    
+1.0223326965e+00    1.0161796321e+00    1.0105765320e+00    1.0052467101e+00    9.9972371410e-01    
+9.9458840337e-01    9.8983863846e-01    9.8477876866e-01    9.7977151245e-01    9.7541138162e-01    
+9.7143097893e-01    9.6773020145e-01    9.6486667808e-01    9.6261516278e-01    9.6049996431e-01    
+9.5917834545e-01    9.5876945714e-01    9.5868221295e-01    9.5931205327e-01    9.6125331907e-01    
+9.6424284694e-01    9.6831281419e-01    9.7436494254e-01    9.8234318139e-01    9.9196086668e-01    
+1.0046349552e+00    1.0213710723e+00    1.0425188294e+00    1.0702112390e+00    1.1082619361e+00    
+1.1620235677e+00    1.2408634518e+00    1.3639023859e+00    1.4397165172e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+3.0017727763e-02    3.0044366287e-02    3.0077779504e-02    3.0078055339e-02    3.0048792459e-02    
+2.9999072716e-02    2.9943852448e-02    2.9880577779e-02    2.9807148969e-02    2.9732594692e-02    
+2.9645891557e-02    2.9531614197e-02    2.9407589963e-02    2.9285123665e-02    2.9156863472e-02    
+2.9026260165e-02    2.8896536119e-02    2.8755949164e-02    2.8601044839e-02    2.8447720916e-02    
+2.8299093675e-02    2.8149024040e-02    2.8005266973e-02    2.7857742601e-02    2.7682666616e-02    
+2.7491644176e-02    2.7307437112e-02    2.7127351128e-02    2.6949015188e-02    2.6784977091e-02    
+2.6627355496e-02    2.6462379414e-02    2.6307692804e-02    2.6163429994e-02    2.6008302541e-02    
+2.5853561700e-02    2.5718080198e-02    2.5593800458e-02    2.5477865246e-02    2.5388567129e-02    
+2.5318976151e-02    2.5253888535e-02    2.5214886789e-02    2.5206004546e-02    2.5207986100e-02    
+2.5233645593e-02    2.5301997757e-02    2.5403908437e-02    2.5539412058e-02    2.5735317272e-02    
+2.5987230106e-02    2.6282699669e-02    2.6658619729e-02    2.7135085470e-02    2.7707636967e-02    
+2.8411471093e-02    2.9304156948e-02    3.0439689972e-02    3.1884614494e-02    3.3731693405e-02    
+3.4769120967e-02    3.0019631576e-02    3.0045606205e-02    3.0078236956e-02    3.0078345061e-02    
+3.0049006288e-02    2.9999243036e-02    2.9943994513e-02    2.9880700064e-02    2.9807256693e-02    
+2.9732691268e-02    2.9645979387e-02    2.9531695077e-02    2.9407665193e-02    2.9285194217e-02    
+2.9156930130e-02    2.9026323558e-02    2.8896596753e-02    2.8756007490e-02    2.8601101249e-02    
+2.8447775719e-02    2.8299147135e-02    2.8149076405e-02    2.8005318453e-02    2.7857793407e-02    
+2.7682716994e-02    2.7491694341e-02    2.7307487228e-02    2.7127401362e-02    2.6949065712e-02    
+2.6785028056e-02    2.6627407073e-02    2.6462431810e-02    2.6307746202e-02    2.6163484589e-02    
+2.6008358596e-02    2.5853619476e-02    2.5718139938e-02    2.5593862455e-02    2.5477929840e-02    
+2.5388634656e-02    2.5319047015e-02    2.5253963252e-02    2.5214965892e-02    2.5206088646e-02    
+2.5208075994e-02    2.5233742186e-02    2.5302102058e-02    2.5404021716e-02    2.5539535887e-02    
+2.5735453458e-02    2.5987380947e-02    2.6282868204e-02    2.6658809640e-02    2.7135301431e-02    
+2.7707885346e-02    2.8411760323e-02    2.9304498228e-02    3.0440098829e-02    3.1885113262e-02    
+3.3732315241e-02    3.4769814292e-02    3.0021535969e-02    3.0046846441e-02    3.0078694446e-02    
+3.0078634799e-02    3.0049220126e-02    2.9999413362e-02    2.9944136582e-02    2.9880822351e-02    
+2.9807364419e-02    2.9732787846e-02    2.9646067220e-02    2.9531775958e-02    2.9407740425e-02    
+2.9285264770e-02    2.9156996790e-02    2.9026386951e-02    2.8896657388e-02    2.8756065816e-02    
+2.8601157660e-02    2.8447830523e-02    2.8299200596e-02    2.8149128771e-02    2.8005369933e-02    
+2.7857844213e-02    2.7682767373e-02    2.7491744506e-02    2.7307537345e-02    2.7127451597e-02    
+2.6949116238e-02    2.6785079022e-02    2.6627458649e-02    2.6462484205e-02    2.6307799600e-02    
+2.6163539186e-02    2.6008414652e-02    2.5853677253e-02    2.5718199680e-02    2.5593924454e-02    
+2.5477994436e-02    2.5388702184e-02    2.5319117879e-02    2.5254037970e-02    2.5215044997e-02    
+2.5206172748e-02    2.5208165889e-02    2.5233838781e-02    2.5302206362e-02    2.5404134999e-02    
+2.5539659719e-02    2.5735589649e-02    2.5987531793e-02    2.6283036744e-02    2.6658999559e-02    
+2.7135517403e-02    2.7708133738e-02    2.8412049569e-02    2.9304839530e-02    3.0440507716e-02    
+3.1885612073e-02    3.3732937140e-02    3.4770507694e-02    3.0021536549e-02    3.0046846758e-02    
+3.0078694484e-02    3.0078634815e-02    3.0049220135e-02    2.9999413368e-02    2.9944136585e-02    
+2.9880822354e-02    2.9807364422e-02    2.9732787848e-02    2.9646067221e-02    2.9531775959e-02    
+2.9407740426e-02    2.9285264771e-02    2.9156996791e-02    2.9026386952e-02    2.8896657389e-02    
+2.8756065817e-02    2.8601157661e-02    2.8447830524e-02    2.8299200597e-02    2.8149128771e-02    
+2.8005369934e-02    2.7857844213e-02    2.7682767373e-02    2.7491744507e-02    2.7307537345e-02    
+2.7127451597e-02    2.6949116238e-02    2.6785079022e-02    2.6627458650e-02    2.6462484206e-02    
+2.6307799601e-02    2.6163539186e-02    2.6008414652e-02    2.5853677254e-02    2.5718199680e-02    
+2.5593924455e-02    2.5477994437e-02    2.5388702185e-02    2.5319117880e-02    2.5254037972e-02    
+2.5215044999e-02    2.5206172750e-02    2.5208165891e-02    2.5233838783e-02    2.5302206364e-02    
+2.5404135002e-02    2.5539659723e-02    2.5735589653e-02    2.5987531798e-02    2.6283036751e-02    
+2.6658999566e-02    2.7135517413e-02    2.7708133751e-02    2.8412049586e-02    2.9304839553e-02    
+3.0440507747e-02    3.1885612117e-02    3.3732937204e-02    3.4770507771e-02    3.0021536549e-02    
+3.0046846757e-02    3.0078694482e-02    3.0078634815e-02    3.0049220135e-02    2.9999413368e-02    
+2.9944136585e-02    2.9880822354e-02    2.9807364422e-02    2.9732787848e-02    2.9646067221e-02    
+2.9531775959e-02    2.9407740426e-02    2.9285264771e-02    2.9156996791e-02    2.9026386952e-02    
+2.8896657389e-02    2.8756065817e-02    2.8601157661e-02    2.8447830524e-02    2.8299200597e-02    
+2.8149128771e-02    2.8005369934e-02    2.7857844213e-02    2.7682767373e-02    2.7491744507e-02    
+2.7307537345e-02    2.7127451597e-02    2.6949116238e-02    2.6785079022e-02    2.6627458650e-02    
+2.6462484206e-02    2.6307799601e-02    2.6163539186e-02    2.6008414652e-02    2.5853677254e-02    
+2.5718199680e-02    2.5593924455e-02    2.5477994437e-02    2.5388702185e-02    2.5319117880e-02    
+2.5254037972e-02    2.5215044999e-02    2.5206172750e-02    2.5208165891e-02    2.5233838783e-02    
+2.5302206364e-02    2.5404135002e-02    2.5539659723e-02    2.5735589653e-02    2.5987531798e-02    
+2.6283036751e-02    2.6658999566e-02    2.7135517413e-02    2.7708133751e-02    2.8412049586e-02    
+2.9304839553e-02    3.0440507747e-02    3.1885612117e-02    3.3732937204e-02    3.4770507771e-02    
+3.0021536549e-02    3.0046846757e-02    3.0078694482e-02    3.0078634815e-02    3.0049220135e-02    
+2.9999413368e-02    2.9944136585e-02    2.9880822354e-02    2.9807364422e-02    2.9732787848e-02    
+2.9646067221e-02    2.9531775959e-02    2.9407740426e-02    2.9285264771e-02    2.9156996791e-02    
+2.9026386952e-02    2.8896657389e-02    2.8756065817e-02    2.8601157661e-02    2.8447830524e-02    
+2.8299200597e-02    2.8149128771e-02    2.8005369934e-02    2.7857844213e-02    2.7682767373e-02    
+2.7491744507e-02    2.7307537345e-02    2.7127451597e-02    2.6949116238e-02    2.6785079022e-02    
+2.6627458650e-02    2.6462484206e-02    2.6307799601e-02    2.6163539186e-02    2.6008414652e-02    
+2.5853677254e-02    2.5718199680e-02    2.5593924455e-02    2.5477994437e-02    2.5388702185e-02    
+2.5319117880e-02    2.5254037972e-02    2.5215044999e-02    2.5206172750e-02    2.5208165891e-02    
+2.5233838783e-02    2.5302206364e-02    2.5404135002e-02    2.5539659723e-02    2.5735589653e-02    
+2.5987531798e-02    2.6283036751e-02    2.6658999566e-02    2.7135517413e-02    2.7708133751e-02    
+2.8412049586e-02    2.9304839553e-02    3.0440507747e-02    3.1885612117e-02    3.3732937204e-02    
+3.4770507770e-02    3.0021536549e-02    3.0046846757e-02    3.0078694482e-02    3.0078634815e-02    
+3.0049220135e-02    2.9999413368e-02    2.9944136585e-02    2.9880822354e-02    2.9807364422e-02    
+2.9732787848e-02    2.9646067221e-02    2.9531775959e-02    2.9407740426e-02    2.9285264771e-02    
+2.9156996791e-02    2.9026386952e-02    2.8896657389e-02    2.8756065817e-02    2.8601157661e-02    
+2.8447830524e-02    2.8299200597e-02    2.8149128771e-02    2.8005369934e-02    2.7857844213e-02    
+2.7682767373e-02    2.7491744507e-02    2.7307537345e-02    2.7127451597e-02    2.6949116238e-02    
+2.6785079022e-02    2.6627458650e-02    2.6462484206e-02    2.6307799601e-02    2.6163539186e-02    
+2.6008414652e-02    2.5853677254e-02    2.5718199680e-02    2.5593924455e-02    2.5477994437e-02    
+2.5388702185e-02    2.5319117880e-02    2.5254037972e-02    2.5215044999e-02    2.5206172750e-02    
+2.5208165891e-02    2.5233838783e-02    2.5302206364e-02    2.5404135002e-02    2.5539659723e-02    
+2.5735589653e-02    2.5987531798e-02    2.6283036751e-02    2.6658999566e-02    2.7135517413e-02    
+2.7708133751e-02    2.8412049586e-02    2.9304839553e-02    3.0440507747e-02    3.1885612117e-02    
+3.3732937204e-02    3.4770507771e-02    3.0021536549e-02    3.0046846758e-02    3.0078694483e-02    
+3.0078634815e-02    3.0049220135e-02    2.9999413368e-02    2.9944136585e-02    2.9880822354e-02    
+2.9807364422e-02    2.9732787848e-02    2.9646067221e-02    2.9531775959e-02    2.9407740426e-02    
+2.9285264771e-02    2.9156996791e-02    2.9026386952e-02    2.8896657389e-02    2.8756065817e-02    
+2.8601157661e-02    2.8447830524e-02    2.8299200597e-02    2.8149128771e-02    2.8005369934e-02    
+2.7857844213e-02    2.7682767373e-02    2.7491744507e-02    2.7307537345e-02    2.7127451597e-02    
+2.6949116238e-02    2.6785079022e-02    2.6627458650e-02    2.6462484206e-02    2.6307799601e-02    
+2.6163539186e-02    2.6008414652e-02    2.5853677254e-02    2.5718199680e-02    2.5593924455e-02    
+2.5477994437e-02    2.5388702185e-02    2.5319117880e-02    2.5254037972e-02    2.5215044999e-02    
+2.5206172750e-02    2.5208165891e-02    2.5233838783e-02    2.5302206364e-02    2.5404135002e-02    
+2.5539659723e-02    2.5735589653e-02    2.5987531798e-02    2.6283036751e-02    2.6658999566e-02    
+2.7135517413e-02    2.7708133751e-02    2.8412049586e-02    2.9304839553e-02    3.0440507747e-02    
+3.1885612117e-02    3.3732937204e-02    3.4770507771e-02    3.0021536549e-02    3.0046846759e-02    
+3.0078694484e-02    3.0078634815e-02    3.0049220135e-02    2.9999413368e-02    2.9944136585e-02    
+2.9880822354e-02    2.9807364422e-02    2.9732787848e-02    2.9646067221e-02    2.9531775959e-02    
+2.9407740426e-02    2.9285264771e-02    2.9156996791e-02    2.9026386952e-02    2.8896657389e-02    
+2.8756065817e-02    2.8601157661e-02    2.8447830524e-02    2.8299200597e-02    2.8149128771e-02    
+2.8005369934e-02    2.7857844213e-02    2.7682767373e-02    2.7491744507e-02    2.7307537345e-02    
+2.7127451597e-02    2.6949116238e-02    2.6785079022e-02    2.6627458650e-02    2.6462484206e-02    
+2.6307799601e-02    2.6163539186e-02    2.6008414652e-02    2.5853677254e-02    2.5718199680e-02    
+2.5593924455e-02    2.5477994437e-02    2.5388702185e-02    2.5319117880e-02    2.5254037972e-02    
+2.5215044999e-02    2.5206172750e-02    2.5208165891e-02    2.5233838783e-02    2.5302206364e-02    
+2.5404135002e-02    2.5539659723e-02    2.5735589653e-02    2.5987531798e-02    2.6283036751e-02    
+2.6658999566e-02    2.7135517413e-02    2.7708133751e-02    2.8412049586e-02    2.9304839553e-02    
+3.0440507747e-02    3.1885612117e-02    3.3732937204e-02    3.4770507770e-02    3.0021536549e-02    
+3.0046846762e-02    3.0078694487e-02    3.0078634815e-02    3.0049220135e-02    2.9999413368e-02    
+2.9944136585e-02    2.9880822354e-02    2.9807364422e-02    2.9732787848e-02    2.9646067221e-02    
+2.9531775959e-02    2.9407740426e-02    2.9285264771e-02    2.9156996791e-02    2.9026386952e-02    
+2.8896657389e-02    2.8756065817e-02    2.8601157661e-02    2.8447830524e-02    2.8299200597e-02    
+2.8149128771e-02    2.8005369934e-02    2.7857844213e-02    2.7682767373e-02    2.7491744507e-02    
+2.7307537345e-02    2.7127451597e-02    2.6949116238e-02    2.6785079022e-02    2.6627458650e-02    
+2.6462484206e-02    2.6307799601e-02    2.6163539186e-02    2.6008414652e-02    2.5853677254e-02    
+2.5718199680e-02    2.5593924455e-02    2.5477994437e-02    2.5388702185e-02    2.5319117880e-02    
+2.5254037972e-02    2.5215044999e-02    2.5206172750e-02    2.5208165891e-02    2.5233838783e-02    
+2.5302206364e-02    2.5404135002e-02    2.5539659723e-02    2.5735589653e-02    2.5987531798e-02    
+2.6283036751e-02    2.6658999566e-02    2.7135517413e-02    2.7708133751e-02    2.8412049586e-02    
+2.9304839553e-02    3.0440507747e-02    3.1885612117e-02    3.3732937204e-02    3.4770507770e-02    
+3.0021536550e-02    3.0046846765e-02    3.0078694489e-02    3.0078634815e-02    3.0049220135e-02    
+2.9999413368e-02    2.9944136585e-02    2.9880822354e-02    2.9807364422e-02    2.9732787848e-02    
+2.9646067221e-02    2.9531775959e-02    2.9407740426e-02    2.9285264771e-02    2.9156996791e-02    
+2.9026386952e-02    2.8896657389e-02    2.8756065817e-02    2.8601157661e-02    2.8447830524e-02    
+2.8299200597e-02    2.8149128771e-02    2.8005369934e-02    2.7857844213e-02    2.7682767373e-02    
+2.7491744507e-02    2.7307537345e-02    2.7127451597e-02    2.6949116238e-02    2.6785079022e-02    
+2.6627458650e-02    2.6462484206e-02    2.6307799601e-02    2.6163539186e-02    2.6008414652e-02    
+2.5853677254e-02    2.5718199680e-02    2.5593924455e-02    2.5477994437e-02    2.5388702185e-02    
+2.5319117880e-02    2.5254037972e-02    2.5215044999e-02    2.5206172750e-02    2.5208165891e-02    
+2.5233838783e-02    2.5302206364e-02    2.5404135002e-02    2.5539659723e-02    2.5735589653e-02    
+2.5987531798e-02    2.6283036751e-02    2.6658999566e-02    2.7135517413e-02    2.7708133751e-02    
+2.8412049586e-02    2.9304839553e-02    3.0440507747e-02    3.1885612117e-02    3.3732937204e-02    
+3.4770507770e-02    3.0021536550e-02    3.0046846768e-02    3.0078694492e-02    3.0078634815e-02    
+3.0049220135e-02    2.9999413368e-02    2.9944136585e-02    2.9880822354e-02    2.9807364422e-02    
+2.9732787848e-02    2.9646067221e-02    2.9531775959e-02    2.9407740426e-02    2.9285264771e-02    
+2.9156996791e-02    2.9026386952e-02    2.8896657389e-02    2.8756065817e-02    2.8601157661e-02    
+2.8447830524e-02    2.8299200597e-02    2.8149128771e-02    2.8005369934e-02    2.7857844213e-02    
+2.7682767373e-02    2.7491744507e-02    2.7307537345e-02    2.7127451597e-02    2.6949116238e-02    
+2.6785079022e-02    2.6627458650e-02    2.6462484206e-02    2.6307799601e-02    2.6163539186e-02    
+2.6008414652e-02    2.5853677254e-02    2.5718199680e-02    2.5593924455e-02    2.5477994437e-02    
+2.5388702185e-02    2.5319117880e-02    2.5254037972e-02    2.5215044999e-02    2.5206172750e-02    
+2.5208165891e-02    2.5233838783e-02    2.5302206364e-02    2.5404135002e-02    2.5539659723e-02    
+2.5735589653e-02    2.5987531798e-02    2.6283036751e-02    2.6658999566e-02    2.7135517413e-02    
+2.7708133751e-02    2.8412049586e-02    2.9304839553e-02    3.0440507747e-02    3.1885612117e-02    
+3.3732937204e-02    3.4770507771e-02    3.0021536550e-02    3.0046846772e-02    3.0078694496e-02    
+3.0078634815e-02    3.0049220135e-02    2.9999413368e-02    2.9944136585e-02    2.9880822354e-02    
+2.9807364422e-02    2.9732787848e-02    2.9646067221e-02    2.9531775959e-02    2.9407740426e-02    
+2.9285264771e-02    2.9156996791e-02    2.9026386952e-02    2.8896657389e-02    2.8756065817e-02    
+2.8601157661e-02    2.8447830524e-02    2.8299200597e-02    2.8149128771e-02    2.8005369934e-02    
+2.7857844213e-02    2.7682767373e-02    2.7491744507e-02    2.7307537345e-02    2.7127451597e-02    
+2.6949116238e-02    2.6785079022e-02    2.6627458650e-02    2.6462484206e-02    2.6307799601e-02    
+2.6163539186e-02    2.6008414652e-02    2.5853677254e-02    2.5718199680e-02    2.5593924455e-02    
+2.5477994437e-02    2.5388702185e-02    2.5319117880e-02    2.5254037972e-02    2.5215044999e-02    
+2.5206172750e-02    2.5208165891e-02    2.5233838783e-02    2.5302206364e-02    2.5404135002e-02    
+2.5539659723e-02    2.5735589653e-02    2.5987531798e-02    2.6283036751e-02    2.6658999566e-02    
+2.7135517413e-02    2.7708133751e-02    2.8412049586e-02    2.9304839553e-02    3.0440507747e-02    
+3.1885612117e-02    3.3732937204e-02    3.4770507771e-02    3.0021536550e-02    3.0046846776e-02    
+3.0078694500e-02    3.0078634815e-02    3.0049220135e-02    2.9999413368e-02    2.9944136585e-02    
+2.9880822354e-02    2.9807364422e-02    2.9732787848e-02    2.9646067221e-02    2.9531775959e-02    
+2.9407740426e-02    2.9285264771e-02    2.9156996791e-02    2.9026386952e-02    2.8896657389e-02    
+2.8756065817e-02    2.8601157661e-02    2.8447830524e-02    2.8299200597e-02    2.8149128771e-02    
+2.8005369934e-02    2.7857844213e-02    2.7682767373e-02    2.7491744507e-02    2.7307537345e-02    
+2.7127451597e-02    2.6949116238e-02    2.6785079022e-02    2.6627458650e-02    2.6462484206e-02    
+2.6307799601e-02    2.6163539186e-02    2.6008414652e-02    2.5853677254e-02    2.5718199680e-02    
+2.5593924455e-02    2.5477994437e-02    2.5388702185e-02    2.5319117880e-02    2.5254037972e-02    
+2.5215044999e-02    2.5206172750e-02    2.5208165891e-02    2.5233838783e-02    2.5302206364e-02    
+2.5404135002e-02    2.5539659723e-02    2.5735589653e-02    2.5987531798e-02    2.6283036751e-02    
+2.6658999566e-02    2.7135517413e-02    2.7708133751e-02    2.8412049586e-02    2.9304839553e-02    
+3.0440507747e-02    3.1885612117e-02    3.3732937204e-02    3.4770507771e-02    3.0021536551e-02    
+3.0046846780e-02    3.0078694504e-02    3.0078634815e-02    3.0049220135e-02    2.9999413368e-02    
+2.9944136585e-02    2.9880822354e-02    2.9807364422e-02    2.9732787848e-02    2.9646067221e-02    
+2.9531775959e-02    2.9407740426e-02    2.9285264771e-02    2.9156996791e-02    2.9026386952e-02    
+2.8896657389e-02    2.8756065817e-02    2.8601157661e-02    2.8447830524e-02    2.8299200597e-02    
+2.8149128771e-02    2.8005369934e-02    2.7857844213e-02    2.7682767373e-02    2.7491744507e-02    
+2.7307537345e-02    2.7127451597e-02    2.6949116238e-02    2.6785079022e-02    2.6627458650e-02    
+2.6462484206e-02    2.6307799601e-02    2.6163539186e-02    2.6008414652e-02    2.5853677254e-02    
+2.5718199680e-02    2.5593924455e-02    2.5477994437e-02    2.5388702185e-02    2.5319117880e-02    
+2.5254037972e-02    2.5215044999e-02    2.5206172750e-02    2.5208165891e-02    2.5233838783e-02    
+2.5302206364e-02    2.5404135002e-02    2.5539659723e-02    2.5735589653e-02    2.5987531798e-02    
+2.6283036751e-02    2.6658999566e-02    2.7135517413e-02    2.7708133751e-02    2.8412049586e-02    
+2.9304839553e-02    3.0440507747e-02    3.1885612117e-02    3.3732937204e-02    3.4770507771e-02    
+3.0021536551e-02    3.0046846784e-02    3.0078694508e-02    3.0078634815e-02    3.0049220135e-02    
+2.9999413368e-02    2.9944136585e-02    2.9880822354e-02    2.9807364422e-02    2.9732787848e-02    
+2.9646067221e-02    2.9531775959e-02    2.9407740426e-02    2.9285264771e-02    2.9156996791e-02    
+2.9026386952e-02    2.8896657389e-02    2.8756065817e-02    2.8601157661e-02    2.8447830524e-02    
+2.8299200597e-02    2.8149128771e-02    2.8005369934e-02    2.7857844213e-02    2.7682767373e-02    
+2.7491744507e-02    2.7307537345e-02    2.7127451597e-02    2.6949116238e-02    2.6785079022e-02    
+2.6627458650e-02    2.6462484206e-02    2.6307799601e-02    2.6163539186e-02    2.6008414652e-02    
+2.5853677254e-02    2.5718199680e-02    2.5593924455e-02    2.5477994437e-02    2.5388702185e-02    
+2.5319117880e-02    2.5254037972e-02    2.5215044999e-02    2.5206172750e-02    2.5208165891e-02    
+2.5233838783e-02    2.5302206364e-02    2.5404135002e-02    2.5539659723e-02    2.5735589653e-02    
+2.5987531798e-02    2.6283036751e-02    2.6658999566e-02    2.7135517413e-02    2.7708133751e-02    
+2.8412049586e-02    2.9304839553e-02    3.0440507747e-02    3.1885612117e-02    3.3732937204e-02    
+3.4770507771e-02    3.0021535971e-02    3.0046846469e-02    3.0078694472e-02    3.0078634799e-02    
+3.0049220126e-02    2.9999413362e-02    2.9944136582e-02    2.9880822351e-02    2.9807364419e-02    
+2.9732787846e-02    2.9646067220e-02    2.9531775958e-02    2.9407740425e-02    2.9285264770e-02    
+2.9156996790e-02    2.9026386951e-02    2.8896657388e-02    2.8756065816e-02    2.8601157660e-02    
+2.8447830523e-02    2.8299200596e-02    2.8149128771e-02    2.8005369933e-02    2.7857844213e-02    
+2.7682767373e-02    2.7491744506e-02    2.7307537345e-02    2.7127451597e-02    2.6949116238e-02    
+2.6785079022e-02    2.6627458649e-02    2.6462484205e-02    2.6307799600e-02    2.6163539186e-02    
+2.6008414652e-02    2.5853677253e-02    2.5718199680e-02    2.5593924454e-02    2.5477994436e-02    
+2.5388702184e-02    2.5319117879e-02    2.5254037970e-02    2.5215044997e-02    2.5206172748e-02    
+2.5208165889e-02    2.5233838781e-02    2.5302206362e-02    2.5404134999e-02    2.5539659719e-02    
+2.5735589649e-02    2.5987531793e-02    2.6283036744e-02    2.6658999559e-02    2.7135517403e-02    
+2.7708133738e-02    2.8412049569e-02    2.9304839531e-02    3.0440507716e-02    3.1885612074e-02    
+3.3732937141e-02    3.4770507695e-02    3.0019631434e-02    3.0045606174e-02    3.0078236998e-02    
+3.0078345065e-02    3.0049006293e-02    2.9999243042e-02    2.9943994519e-02    2.9880700070e-02    
+2.9807256699e-02    2.9732691274e-02    2.9645979394e-02    2.9531695083e-02    2.9407665200e-02    
+2.9285194224e-02    2.9156930138e-02    2.9026323566e-02    2.8896596761e-02    2.8756007498e-02    
+2.8601101258e-02    2.8447775729e-02    2.8299147145e-02    2.8149076415e-02    2.8005318464e-02    
+2.7857793418e-02    2.7682717006e-02    2.7491694354e-02    2.7307487242e-02    2.7127401377e-02    
+2.6949065729e-02    2.6785028074e-02    2.6627407092e-02    2.6462431830e-02    2.6307746224e-02    
+2.6163484614e-02    2.6008358623e-02    2.5853619506e-02    2.5718139972e-02    2.5593862493e-02    
+2.5477929882e-02    2.5388634703e-02    2.5319047069e-02    2.5253963314e-02    2.5214965963e-02    
+2.5206088728e-02    2.5208076088e-02    2.5233742296e-02    2.5302102188e-02    2.5404021870e-02    
+2.5539536071e-02    2.5735453680e-02    2.5987381217e-02    2.6282868536e-02    2.6658810054e-02    
+2.7135301953e-02    2.7707886013e-02    2.8411761189e-02    2.9304499375e-02    3.0440100375e-02    
+3.1885115391e-02    3.3732318382e-02    3.4769818098e-02    3.0017727476e-02    3.0044366197e-02    
+3.0077779560e-02    3.0078055347e-02    3.0048792469e-02    2.9999072727e-02    2.9943852459e-02    
+2.9880577791e-02    2.9807148981e-02    2.9732594705e-02    2.9645891570e-02    2.9531614210e-02    
+2.9407589977e-02    2.9285123679e-02    2.9156863487e-02    2.9026260181e-02    2.8896536135e-02    
+2.8755949181e-02    2.8601044857e-02    2.8447720934e-02    2.8299093694e-02    2.8149024061e-02    
+2.8005266995e-02    2.7857742624e-02    2.7682666640e-02    2.7491644202e-02    2.7307437140e-02    
+2.7127351158e-02    2.6949015220e-02    2.6784977126e-02    2.6627355534e-02    2.6462379455e-02    
+2.6307692849e-02    2.6163430043e-02    2.6008302595e-02    2.5853561760e-02    2.5718080265e-02    
+2.5593800533e-02    2.5477865330e-02    2.5388567224e-02    2.5318976259e-02    2.5253888658e-02    
+2.5214886930e-02    2.5206004709e-02    2.5207986289e-02    2.5233645814e-02    2.5301998017e-02    
+2.5403908745e-02    2.5539412427e-02    2.5735317716e-02    2.5987230646e-02    2.6282700333e-02    
+2.6658620557e-02    2.7135086513e-02    2.7707638300e-02    2.8411472826e-02    2.9304159242e-02    
+3.0439693064e-02    3.1884618751e-02    3.3731699686e-02    3.4769128577e-02    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    3.7215189873e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    0.0000000000e+00    
+4.5749741240e-02    4.5803018289e-02    4.5869844722e-02    4.5870396392e-02    4.5811870631e-02    
+4.5712431146e-02    4.5601990609e-02    4.5475441272e-02    4.5328583652e-02    4.5179475099e-02    
+4.5006068827e-02    4.4777514107e-02    4.4529465640e-02    4.4284533044e-02    4.4028012658e-02    
+4.3766806045e-02    4.3507357953e-02    4.3226184043e-02    4.2916375393e-02    4.2609727546e-02    
+4.2312473063e-02    4.2012333794e-02    4.1724819661e-02    4.1429770916e-02    4.1079618946e-02    
+4.0697574066e-02    4.0329159938e-02    3.9968987970e-02    3.9612316090e-02    3.9284239896e-02    
+3.8968996707e-02    3.8639044543e-02    3.8329671323e-02    3.8041145702e-02    3.7730890796e-02    
+3.7421409114e-02    3.7150446110e-02    3.6901886629e-02    3.6670016206e-02    3.6491419972e-02    
+3.6352238016e-02    3.6222062785e-02    3.6144059292e-02    3.6126294807e-02    3.6130257914e-02    
+3.6181576900e-02    3.6318281228e-02    3.6522102588e-02    3.6793109831e-02    3.7184920258e-02    
+3.7688745926e-02    3.8279685053e-02    3.9031525173e-02    3.9984456654e-02    4.1129559649e-02    
+4.2537227901e-02    4.4322599611e-02    4.6593665659e-02    4.9483514702e-02    5.3177672524e-02    
+5.5252527648e-02    4.5753548866e-02    4.5805498125e-02    4.5870759626e-02    4.5870975837e-02    
+4.5812298291e-02    4.5712771787e-02    4.5602274740e-02    4.5475685842e-02    4.5328799100e-02    
+4.5179668250e-02    4.5006244489e-02    4.4777675867e-02    4.4529616101e-02    4.4284674148e-02    
+4.4028145975e-02    4.3766932830e-02    4.3507479221e-02    4.3226300694e-02    4.2916488213e-02    
+4.2609837153e-02    4.2312579984e-02    4.2012438525e-02    4.1724922620e-02    4.1429872527e-02    
+4.1079719702e-02    4.0697674396e-02    4.0329260170e-02    3.9969088438e-02    3.9612417139e-02    
+3.9284341826e-02    3.8969099859e-02    3.8639149333e-02    3.8329778118e-02    3.8041254893e-02    
+3.7731002906e-02    3.7421524666e-02    3.7150565591e-02    3.6902010625e-02    3.6670145395e-02    
+3.6491555026e-02    3.6352379744e-02    3.6222212218e-02    3.6144217499e-02    3.6126463007e-02    
+3.6130437702e-02    3.6181770086e-02    3.6318489831e-02    3.6522329147e-02    3.6793357489e-02    
+3.7185192631e-02    3.7689047608e-02    3.8280022122e-02    3.9031904994e-02    3.9984888577e-02    
+4.1130056407e-02    4.2537806360e-02    4.4323282171e-02    4.6594483372e-02    4.9484512238e-02    
+5.3178916195e-02    5.5253914299e-02    4.5757357652e-02    4.5807978597e-02    4.5871674606e-02    
+4.5871555313e-02    4.5812725967e-02    4.5713112439e-02    4.5602558878e-02    4.5475930417e-02    
+4.5329014553e-02    4.5179861406e-02    4.5006420154e-02    4.4777837630e-02    4.4529766564e-02    
+4.4284815253e-02    4.4028279294e-02    4.3767059616e-02    4.3507600490e-02    4.3226417346e-02    
+4.2916601035e-02    4.2609946761e-02    4.2312686906e-02    4.2012543256e-02    4.1725025581e-02    
+4.1429974140e-02    4.1079820459e-02    4.0697774727e-02    4.0329360404e-02    3.9969188908e-02    
+3.9612518190e-02    3.9284443758e-02    3.8969203013e-02    3.8639254125e-02    3.8329884915e-02    
+3.8041364085e-02    3.7731115017e-02    3.7421640220e-02    3.7150685074e-02    3.6902134622e-02    
+3.6670274586e-02    3.6491690082e-02    3.6352521473e-02    3.6222361655e-02    3.6144375709e-02    
+3.6126631211e-02    3.6130617493e-02    3.6181963276e-02    3.6318698438e-02    3.6522555712e-02    
+3.6793605153e-02    3.7185465012e-02    3.7689349300e-02    3.8280359203e-02    3.9032284831e-02    
+3.9985320520e-02    4.1130553190e-02    4.2538384853e-02    4.4323964775e-02    4.6595301147e-02    
+4.9485509861e-02    5.3180159995e-02    5.5255301103e-02    4.5757358812e-02    4.5807979231e-02    
+4.5871674681e-02    4.5871555344e-02    4.5812725984e-02    4.5713112450e-02    4.5602558885e-02    
+4.5475930423e-02    4.5329014557e-02    4.5179861409e-02    4.5006420157e-02    4.4777837632e-02    
+4.4529766566e-02    4.4284815255e-02    4.4028279296e-02    4.3767059618e-02    4.3507600492e-02    
+4.3226417348e-02    4.2916601036e-02    4.2609946762e-02    4.2312686907e-02    4.2012543257e-02    
+4.1725025582e-02    4.1429974141e-02    4.1079820460e-02    4.0697774728e-02    4.0329360405e-02    
+3.9969188909e-02    3.9612518191e-02    3.9284443759e-02    3.8969203014e-02    3.8639254126e-02    
+3.8329884916e-02    3.8041364087e-02    3.7731115019e-02    3.7421640221e-02    3.7150685075e-02    
+3.6902134624e-02    3.6670274588e-02    3.6491690084e-02    3.6352521475e-02    3.6222361657e-02    
+3.6144375712e-02    3.6126631214e-02    3.6130617497e-02    3.6181963280e-02    3.6318698443e-02    
+3.6522555718e-02    3.6793605160e-02    3.7185465020e-02    3.7689349310e-02    3.8280359216e-02    
+3.9032284847e-02    3.9985320540e-02    4.1130553215e-02    4.2538384886e-02    4.4323964820e-02    
+4.6595301208e-02    4.9485509948e-02    5.3180160123e-02    5.5255301255e-02    4.5757358812e-02    
+4.5807979229e-02    4.5871674679e-02    4.5871555344e-02    4.5812725984e-02    4.5713112450e-02    
+4.5602558885e-02    4.5475930423e-02    4.5329014557e-02    4.5179861409e-02    4.5006420157e-02    
+4.4777837632e-02    4.4529766566e-02    4.4284815255e-02    4.4028279296e-02    4.3767059618e-02    
+4.3507600492e-02    4.3226417348e-02    4.2916601036e-02    4.2609946762e-02    4.2312686907e-02    
+4.2012543257e-02    4.1725025582e-02    4.1429974141e-02    4.1079820460e-02    4.0697774728e-02    
+4.0329360405e-02    3.9969188909e-02    3.9612518191e-02    3.9284443759e-02    3.8969203014e-02    
+3.8639254126e-02    3.8329884916e-02    3.8041364087e-02    3.7731115019e-02    3.7421640221e-02    
+3.7150685075e-02    3.6902134624e-02    3.6670274588e-02    3.6491690084e-02    3.6352521475e-02    
+3.6222361657e-02    3.6144375712e-02    3.6126631214e-02    3.6130617497e-02    3.6181963280e-02    
+3.6318698443e-02    3.6522555718e-02    3.6793605160e-02    3.7185465020e-02    3.7689349310e-02    
+3.8280359215e-02    3.9032284847e-02    3.9985320540e-02    4.1130553215e-02    4.2538384886e-02    
+4.4323964820e-02    4.6595301208e-02    4.9485509948e-02    5.3180160123e-02    5.5255301255e-02    
+4.5757358812e-02    4.5807979228e-02    4.5871674678e-02    4.5871555344e-02    4.5812725984e-02    
+4.5713112450e-02    4.5602558885e-02    4.5475930423e-02    4.5329014557e-02    4.5179861409e-02    
+4.5006420157e-02    4.4777837632e-02    4.4529766566e-02    4.4284815255e-02    4.4028279296e-02    
+4.3767059618e-02    4.3507600492e-02    4.3226417348e-02    4.2916601036e-02    4.2609946762e-02    
+4.2312686907e-02    4.2012543257e-02    4.1725025582e-02    4.1429974141e-02    4.1079820460e-02    
+4.0697774728e-02    4.0329360405e-02    3.9969188909e-02    3.9612518191e-02    3.9284443759e-02    
+3.8969203014e-02    3.8639254126e-02    3.8329884916e-02    3.8041364087e-02    3.7731115019e-02    
+3.7421640221e-02    3.7150685075e-02    3.6902134624e-02    3.6670274588e-02    3.6491690084e-02    
+3.6352521475e-02    3.6222361657e-02    3.6144375712e-02    3.6126631214e-02    3.6130617497e-02    
+3.6181963280e-02    3.6318698443e-02    3.6522555718e-02    3.6793605160e-02    3.7185465020e-02    
+3.7689349310e-02    3.8280359215e-02    3.9032284847e-02    3.9985320540e-02    4.1130553215e-02    
+4.2538384886e-02    4.4323964820e-02    4.6595301208e-02    4.9485509948e-02    5.3180160122e-02    
+5.5255301255e-02    4.5757358812e-02    4.5807979228e-02    4.5871674678e-02    4.5871555344e-02    
+4.5812725984e-02    4.5713112450e-02    4.5602558885e-02    4.5475930423e-02    4.5329014557e-02    
+4.5179861409e-02    4.5006420157e-02    4.4777837632e-02    4.4529766566e-02    4.4284815255e-02    
+4.4028279296e-02    4.3767059618e-02    4.3507600492e-02    4.3226417348e-02    4.2916601036e-02    
+4.2609946762e-02    4.2312686907e-02    4.2012543257e-02    4.1725025582e-02    4.1429974141e-02    
+4.1079820460e-02    4.0697774728e-02    4.0329360405e-02    3.9969188909e-02    3.9612518191e-02    
+3.9284443759e-02    3.8969203014e-02    3.8639254126e-02    3.8329884916e-02    3.8041364087e-02    
+3.7731115019e-02    3.7421640221e-02    3.7150685075e-02    3.6902134624e-02    3.6670274588e-02    
+3.6491690084e-02    3.6352521475e-02    3.6222361657e-02    3.6144375712e-02    3.6126631214e-02    
+3.6130617497e-02    3.6181963280e-02    3.6318698443e-02    3.6522555718e-02    3.6793605160e-02    
+3.7185465020e-02    3.7689349310e-02    3.8280359216e-02    3.9032284847e-02    3.9985320540e-02    
+4.1130553215e-02    4.2538384886e-02    4.4323964820e-02    4.6595301208e-02    4.9485509948e-02    
+5.3180160123e-02    5.5255301255e-02    4.5757358813e-02    4.5807979230e-02    4.5871674680e-02    
+4.5871555344e-02    4.5812725984e-02    4.5713112450e-02    4.5602558885e-02    4.5475930423e-02    
+4.5329014557e-02    4.5179861409e-02    4.5006420157e-02    4.4777837632e-02    4.4529766566e-02    
+4.4284815255e-02    4.4028279296e-02    4.3767059618e-02    4.3507600492e-02    4.3226417348e-02    
+4.2916601036e-02    4.2609946762e-02    4.2312686907e-02    4.2012543257e-02    4.1725025582e-02    
+4.1429974141e-02    4.1079820460e-02    4.0697774728e-02    4.0329360405e-02    3.9969188909e-02    
+3.9612518191e-02    3.9284443759e-02    3.8969203014e-02    3.8639254126e-02    3.8329884916e-02    
+3.8041364087e-02    3.7731115019e-02    3.7421640221e-02    3.7150685075e-02    3.6902134624e-02    
+3.6670274588e-02    3.6491690084e-02    3.6352521475e-02    3.6222361657e-02    3.6144375711e-02    
+3.6126631214e-02    3.6130617497e-02    3.6181963280e-02    3.6318698443e-02    3.6522555718e-02    
+3.6793605160e-02    3.7185465020e-02    3.7689349310e-02    3.8280359216e-02    3.9032284847e-02    
+3.9985320540e-02    4.1130553215e-02    4.2538384886e-02    4.4323964820e-02    4.6595301208e-02    
+4.9485509948e-02    5.3180160123e-02    5.5255301255e-02    4.5757358813e-02    4.5807979233e-02    
+4.5871674683e-02    4.5871555344e-02    4.5812725984e-02    4.5713112450e-02    4.5602558885e-02    
+4.5475930423e-02    4.5329014557e-02    4.5179861409e-02    4.5006420157e-02    4.4777837632e-02    
+4.4529766566e-02    4.4284815255e-02    4.4028279296e-02    4.3767059618e-02    4.3507600492e-02    
+4.3226417348e-02    4.2916601036e-02    4.2609946762e-02    4.2312686907e-02    4.2012543257e-02    
+4.1725025582e-02    4.1429974141e-02    4.1079820460e-02    4.0697774728e-02    4.0329360405e-02    
+3.9969188909e-02    3.9612518191e-02    3.9284443759e-02    3.8969203014e-02    3.8639254126e-02    
+3.8329884916e-02    3.8041364087e-02    3.7731115019e-02    3.7421640221e-02    3.7150685075e-02    
+3.6902134624e-02    3.6670274588e-02    3.6491690084e-02    3.6352521475e-02    3.6222361657e-02    
+3.6144375712e-02    3.6126631214e-02    3.6130617497e-02    3.6181963280e-02    3.6318698443e-02    
+3.6522555718e-02    3.6793605160e-02    3.7185465020e-02    3.7689349310e-02    3.8280359215e-02    
+3.9032284847e-02    3.9985320540e-02    4.1130553215e-02    4.2538384886e-02    4.4323964820e-02    
+4.6595301208e-02    4.9485509948e-02    5.3180160122e-02    5.5255301255e-02    4.5757358813e-02    
+4.5807979238e-02    4.5871674687e-02    4.5871555344e-02    4.5812725984e-02    4.5713112450e-02    
+4.5602558885e-02    4.5475930423e-02    4.5329014557e-02    4.5179861409e-02    4.5006420157e-02    
+4.4777837632e-02    4.4529766566e-02    4.4284815255e-02    4.4028279296e-02    4.3767059618e-02    
+4.3507600492e-02    4.3226417348e-02    4.2916601036e-02    4.2609946762e-02    4.2312686907e-02    
+4.2012543257e-02    4.1725025582e-02    4.1429974141e-02    4.1079820460e-02    4.0697774728e-02    
+4.0329360405e-02    3.9969188909e-02    3.9612518191e-02    3.9284443759e-02    3.8969203014e-02    
+3.8639254126e-02    3.8329884916e-02    3.8041364087e-02    3.7731115019e-02    3.7421640221e-02    
+3.7150685075e-02    3.6902134624e-02    3.6670274588e-02    3.6491690084e-02    3.6352521475e-02    
+3.6222361657e-02    3.6144375712e-02    3.6126631214e-02    3.6130617497e-02    3.6181963280e-02    
+3.6318698443e-02    3.6522555718e-02    3.6793605160e-02    3.7185465020e-02    3.7689349310e-02    
+3.8280359215e-02    3.9032284847e-02    3.9985320540e-02    4.1130553215e-02    4.2538384886e-02    
+4.4323964820e-02    4.6595301208e-02    4.9485509948e-02    5.3180160122e-02    5.5255301255e-02    
+4.5757358814e-02    4.5807979243e-02    4.5871674693e-02    4.5871555344e-02    4.5812725984e-02    
+4.5713112450e-02    4.5602558885e-02    4.5475930423e-02    4.5329014557e-02    4.5179861409e-02    
+4.5006420157e-02    4.4777837632e-02    4.4529766566e-02    4.4284815255e-02    4.4028279296e-02    
+4.3767059618e-02    4.3507600492e-02    4.3226417348e-02    4.2916601036e-02    4.2609946762e-02    
+4.2312686907e-02    4.2012543257e-02    4.1725025582e-02    4.1429974141e-02    4.1079820460e-02    
+4.0697774728e-02    4.0329360405e-02    3.9969188909e-02    3.9612518191e-02    3.9284443759e-02    
+3.8969203014e-02    3.8639254126e-02    3.8329884916e-02    3.8041364087e-02    3.7731115019e-02    
+3.7421640221e-02    3.7150685075e-02    3.6902134624e-02    3.6670274588e-02    3.6491690084e-02    
+3.6352521475e-02    3.6222361657e-02    3.6144375712e-02    3.6126631214e-02    3.6130617497e-02    
+3.6181963280e-02    3.6318698443e-02    3.6522555718e-02    3.6793605160e-02    3.7185465020e-02    
+3.7689349310e-02    3.8280359215e-02    3.9032284847e-02    3.9985320540e-02    4.1130553215e-02    
+4.2538384886e-02    4.4323964820e-02    4.6595301208e-02    4.9485509948e-02    5.3180160122e-02    
+5.5255301255e-02    4.5757358814e-02    4.5807979250e-02    4.5871674699e-02    4.5871555344e-02    
+4.5812725984e-02    4.5713112450e-02    4.5602558885e-02    4.5475930423e-02    4.5329014557e-02    
+4.5179861409e-02    4.5006420157e-02    4.4777837632e-02    4.4529766566e-02    4.4284815255e-02    
+4.4028279296e-02    4.3767059618e-02    4.3507600492e-02    4.3226417348e-02    4.2916601036e-02    
+4.2609946762e-02    4.2312686907e-02    4.2012543257e-02    4.1725025582e-02    4.1429974141e-02    
+4.1079820460e-02    4.0697774728e-02    4.0329360405e-02    3.9969188909e-02    3.9612518191e-02    
+3.9284443759e-02    3.8969203014e-02    3.8639254126e-02    3.8329884916e-02    3.8041364087e-02    
+3.7731115019e-02    3.7421640221e-02    3.7150685075e-02    3.6902134624e-02    3.6670274588e-02    
+3.6491690084e-02    3.6352521475e-02    3.6222361657e-02    3.6144375711e-02    3.6126631214e-02    
+3.6130617497e-02    3.6181963280e-02    3.6318698443e-02    3.6522555718e-02    3.6793605160e-02    
+3.7185465020e-02    3.7689349310e-02    3.8280359216e-02    3.9032284847e-02    3.9985320540e-02    
+4.1130553215e-02    4.2538384886e-02    4.4323964820e-02    4.6595301208e-02    4.9485509948e-02    
+5.3180160123e-02    5.5255301255e-02    4.5757358815e-02    4.5807979257e-02    4.5871674706e-02    
+4.5871555344e-02    4.5812725984e-02    4.5713112450e-02    4.5602558885e-02    4.5475930423e-02    
+4.5329014557e-02    4.5179861409e-02    4.5006420157e-02    4.4777837632e-02    4.4529766566e-02    
+4.4284815255e-02    4.4028279296e-02    4.3767059618e-02    4.3507600492e-02    4.3226417348e-02    
+4.2916601036e-02    4.2609946762e-02    4.2312686907e-02    4.2012543257e-02    4.1725025582e-02    
+4.1429974141e-02    4.1079820460e-02    4.0697774728e-02    4.0329360405e-02    3.9969188909e-02    
+3.9612518191e-02    3.9284443759e-02    3.8969203014e-02    3.8639254126e-02    3.8329884916e-02    
+3.8041364087e-02    3.7731115019e-02    3.7421640221e-02    3.7150685075e-02    3.6902134624e-02    
+3.6670274588e-02    3.6491690084e-02    3.6352521475e-02    3.6222361657e-02    3.6144375711e-02    
+3.6126631214e-02    3.6130617497e-02    3.6181963280e-02    3.6318698443e-02    3.6522555718e-02    
+3.6793605160e-02    3.7185465020e-02    3.7689349310e-02    3.8280359216e-02    3.9032284847e-02    
+3.9985320540e-02    4.1130553215e-02    4.2538384886e-02    4.4323964820e-02    4.6595301208e-02    
+4.9485509948e-02    5.3180160123e-02    5.5255301255e-02    4.5757358815e-02    4.5807979265e-02    
+4.5871674714e-02    4.5871555344e-02    4.5812725984e-02    4.5713112450e-02    4.5602558885e-02    
+4.5475930423e-02    4.5329014557e-02    4.5179861409e-02    4.5006420157e-02    4.4777837632e-02    
+4.4529766566e-02    4.4284815255e-02    4.4028279296e-02    4.3767059618e-02    4.3507600492e-02    
+4.3226417348e-02    4.2916601036e-02    4.2609946762e-02    4.2312686907e-02    4.2012543257e-02    
+4.1725025582e-02    4.1429974141e-02    4.1079820460e-02    4.0697774728e-02    4.0329360405e-02    
+3.9969188909e-02    3.9612518191e-02    3.9284443759e-02    3.8969203014e-02    3.8639254126e-02    
+3.8329884916e-02    3.8041364087e-02    3.7731115019e-02    3.7421640221e-02    3.7150685075e-02    
+3.6902134624e-02    3.6670274588e-02    3.6491690084e-02    3.6352521475e-02    3.6222361657e-02    
+3.6144375711e-02    3.6126631214e-02    3.6130617497e-02    3.6181963280e-02    3.6318698443e-02    
+3.6522555718e-02    3.6793605160e-02    3.7185465020e-02    3.7689349310e-02    3.8280359216e-02    
+3.9032284847e-02    3.9985320540e-02    4.1130553215e-02    4.2538384886e-02    4.4323964820e-02    
+4.6595301208e-02    4.9485509948e-02    5.3180160123e-02    5.5255301255e-02    4.5757358816e-02    
+4.5807979274e-02    4.5871674722e-02    4.5871555344e-02    4.5812725984e-02    4.5713112450e-02    
+4.5602558885e-02    4.5475930423e-02    4.5329014557e-02    4.5179861409e-02    4.5006420157e-02    
+4.4777837632e-02    4.4529766566e-02    4.4284815255e-02    4.4028279296e-02    4.3767059618e-02    
+4.3507600492e-02    4.3226417348e-02    4.2916601036e-02    4.2609946762e-02    4.2312686907e-02    
+4.2012543257e-02    4.1725025582e-02    4.1429974141e-02    4.1079820460e-02    4.0697774728e-02    
+4.0329360405e-02    3.9969188909e-02    3.9612518191e-02    3.9284443759e-02    3.8969203014e-02    
+3.8639254126e-02    3.8329884916e-02    3.8041364087e-02    3.7731115019e-02    3.7421640221e-02    
+3.7150685075e-02    3.6902134624e-02    3.6670274588e-02    3.6491690084e-02    3.6352521475e-02    
+3.6222361657e-02    3.6144375712e-02    3.6126631214e-02    3.6130617497e-02    3.6181963280e-02    
+3.6318698443e-02    3.6522555718e-02    3.6793605160e-02    3.7185465020e-02    3.7689349310e-02    
+3.8280359216e-02    3.9032284847e-02    3.9985320540e-02    4.1130553215e-02    4.2538384886e-02    
+4.4323964820e-02    4.6595301208e-02    4.9485509948e-02    5.3180160123e-02    5.5255301255e-02    
+4.5757358816e-02    4.5807979282e-02    4.5871674730e-02    4.5871555344e-02    4.5812725984e-02    
+4.5713112450e-02    4.5602558885e-02    4.5475930423e-02    4.5329014557e-02    4.5179861409e-02    
+4.5006420157e-02    4.4777837632e-02    4.4529766566e-02    4.4284815255e-02    4.4028279296e-02    
+4.3767059618e-02    4.3507600492e-02    4.3226417348e-02    4.2916601036e-02    4.2609946762e-02    
+4.2312686907e-02    4.2012543257e-02    4.1725025582e-02    4.1429974141e-02    4.1079820460e-02    
+4.0697774728e-02    4.0329360405e-02    3.9969188909e-02    3.9612518191e-02    3.9284443759e-02    
+3.8969203014e-02    3.8639254126e-02    3.8329884916e-02    3.8041364087e-02    3.7731115019e-02    
+3.7421640221e-02    3.7150685075e-02    3.6902134624e-02    3.6670274588e-02    3.6491690084e-02    
+3.6352521475e-02    3.6222361657e-02    3.6144375711e-02    3.6126631214e-02    3.6130617497e-02    
+3.6181963280e-02    3.6318698443e-02    3.6522555718e-02    3.6793605160e-02    3.7185465020e-02    
+3.7689349310e-02    3.8280359216e-02    3.9032284847e-02    3.9985320540e-02    4.1130553215e-02    
+4.2538384886e-02    4.4323964820e-02    4.6595301208e-02    4.9485509948e-02    5.3180160123e-02    
+5.5255301255e-02    4.5757357657e-02    4.5807978652e-02    4.5871674659e-02    4.5871555313e-02    
+4.5812725967e-02    4.5713112439e-02    4.5602558878e-02    4.5475930417e-02    4.5329014553e-02    
+4.5179861406e-02    4.5006420154e-02    4.4777837630e-02    4.4529766564e-02    4.4284815253e-02    
+4.4028279294e-02    4.3767059616e-02    4.3507600490e-02    4.3226417346e-02    4.2916601035e-02    
+4.2609946761e-02    4.2312686906e-02    4.2012543256e-02    4.1725025581e-02    4.1429974140e-02    
+4.1079820459e-02    4.0697774727e-02    4.0329360404e-02    3.9969188908e-02    3.9612518189e-02    
+3.9284443758e-02    3.8969203013e-02    3.8639254125e-02    3.8329884915e-02    3.8041364085e-02    
+3.7731115017e-02    3.7421640220e-02    3.7150685074e-02    3.6902134622e-02    3.6670274586e-02    
+3.6491690082e-02    3.6352521473e-02    3.6222361655e-02    3.6144375709e-02    3.6126631211e-02    
+3.6130617493e-02    3.6181963276e-02    3.6318698438e-02    3.6522555712e-02    3.6793605153e-02    
+3.7185465012e-02    3.7689349300e-02    3.8280359203e-02    3.9032284832e-02    3.9985320520e-02    
+4.1130553190e-02    4.2538384853e-02    4.4323964775e-02    4.6595301147e-02    4.9485509861e-02    
+5.3180159996e-02    5.5255301104e-02    4.5753548582e-02    4.5805498063e-02    4.5870759709e-02    
+4.5870975845e-02    4.5812298301e-02    4.5712771798e-02    4.5602274751e-02    4.5475685854e-02    
+4.5328799113e-02    4.5179668263e-02    4.5006244502e-02    4.4777675881e-02    4.4529616115e-02    
+4.4284674162e-02    4.4028145990e-02    4.3766932845e-02    4.3507479237e-02    4.3226300711e-02    
+4.2916488231e-02    4.2609837171e-02    4.2312580004e-02    4.2012438545e-02    4.1724922642e-02    
+4.1429872550e-02    4.1079719727e-02    4.0697674422e-02    4.0329260198e-02    3.9969088468e-02    
+3.9612417171e-02    3.9284341861e-02    3.8969099897e-02    3.8639149375e-02    3.8329778163e-02    
+3.8041254942e-02    3.7731002961e-02    3.7421524727e-02    3.7150565658e-02    3.6902010700e-02    
+3.6670145479e-02    3.6491555121e-02    3.6352379852e-02    3.6222212342e-02    3.6144217640e-02    
+3.6126463170e-02    3.6130437891e-02    3.6181770306e-02    3.6318490090e-02    3.6522329455e-02    
+3.6793357857e-02    3.7185193075e-02    3.7689048148e-02    3.8280022785e-02    3.9031905822e-02    
+3.9984889620e-02    4.1130057739e-02    4.2537808093e-02    4.4323284464e-02    4.6594486464e-02    
+4.9484516495e-02    5.3178922478e-02    5.5253921911e-02    4.5749740666e-02    4.5803018108e-02    
+4.5869844835e-02    4.5870396409e-02    4.5811870652e-02    4.5712431168e-02    4.5601990632e-02    
+4.5475441296e-02    4.5328583676e-02    4.5179475124e-02    4.5006068854e-02    4.4777514135e-02    
+4.4529465668e-02    4.4284533073e-02    4.4028012688e-02    4.3766806076e-02    4.3507357985e-02    
+4.3226184077e-02    4.2916375428e-02    4.2609727583e-02    4.2312473102e-02    4.2012333835e-02    
+4.1724819704e-02    4.1429770961e-02    4.1079618995e-02    4.0697574118e-02    4.0329159994e-02    
+3.9968988030e-02    3.9612316154e-02    3.9284239966e-02    3.8968996783e-02    3.8639044625e-02    
+3.8329671413e-02    3.8041145801e-02    3.7730890905e-02    3.7421409235e-02    3.7150446244e-02    
+3.6901886780e-02    3.6670016375e-02    3.6491420163e-02    3.6352238233e-02    3.6222063031e-02    
+3.6144059574e-02    3.6126295132e-02    3.6130258292e-02    3.6181577341e-02    3.6318281748e-02    
+3.6522103203e-02    3.6793110567e-02    3.7184921146e-02    3.7688747006e-02    3.8279686380e-02    
+3.9031526827e-02    3.9984458740e-02    4.1129562314e-02    4.2537231366e-02    4.4322604198e-02    
+4.6593671843e-02    4.9483523216e-02    5.3177685086e-02    5.5252542869e-02    
+zone T = "Zone0 INFLOW"
+I = 61
+J = 1
+K = 19
+f = BLOCK
+-2.0400024912e-01   -2.0358766831e-01   -2.0235020863e-01   -2.0028871817e-01   -1.9800132038e-01   
+-1.9518702105e-01   -1.9154745006e-01   -1.8723137194e-01   -1.8238505658e-01   -1.7671369877e-01   
+-1.7021938073e-01   -1.6376769405e-01   -1.5648496318e-01   -1.4837323422e-01   -1.3971522142e-01   
+-1.3036684409e-01   -1.2018967534e-01   -1.0945806647e-01   -9.8433079222e-02   -8.6569715276e-02   
+-7.3871738570e-02   -6.0727235976e-02   -4.6744976663e-02   -3.1929848849e-02   -1.7258210583e-02   
+-2.2038484774e-03   1.3723819795e-02    3.0292052294e-02    4.7288093060e-02    6.5173538528e-02    
+8.3942924449e-02    1.0266073241e-01    1.2230113936e-01    1.4285822063e-01    1.6338122652e-01    
+1.8441163002e-01    2.0643088626e-01    2.2909254964e-01    2.5210144193e-01    2.7615638499e-01    
+3.0124977882e-01    3.2629932617e-01    3.5247313199e-01    3.7976244764e-01    4.0730315170e-01    
+4.3563740003e-01    4.6520730596e-01    4.9565101947e-01    5.2670938113e-01    5.5912279818e-01    
+5.9287746928e-01    6.2701250657e-01    6.6266312951e-01    6.9981239144e-01    7.3797214785e-01    
+7.7755063154e-01    8.1879982249e-01    8.6169616259e-01    9.0621392108e-01    9.5232520971e-01    
+1.0000000000e+00    -2.0400024912e-01   -2.0358766831e-01   -2.0235020863e-01   -2.0028871817e-01   
+-1.9800132038e-01   -1.9518702105e-01   -1.9154745006e-01   -1.8723137194e-01   -1.8238505658e-01   
+-1.7671369877e-01   -1.7021938073e-01   -1.6376769405e-01   -1.5648496318e-01   -1.4837323422e-01   
+-1.3971522142e-01   -1.3036684409e-01   -1.2018967534e-01   -1.0945806647e-01   -9.8433079222e-02   
+-8.6569715276e-02   -7.3871738570e-02   -6.0727235976e-02   -4.6744976663e-02   -3.1929848849e-02   
+-1.7258210583e-02   -2.2038484774e-03   1.3723819795e-02    3.0292052294e-02    4.7288093060e-02    
+6.5173538528e-02    8.3942924449e-02    1.0266073241e-01    1.2230113936e-01    1.4285822063e-01    
+1.6338122652e-01    1.8441163002e-01    2.0643088626e-01    2.2909254964e-01    2.5210144193e-01    
+2.7615638499e-01    3.0124977882e-01    3.2629932617e-01    3.5247313199e-01    3.7976244764e-01    
+4.0730315170e-01    4.3563740003e-01    4.6520730596e-01    4.9565101947e-01    5.2670938113e-01    
+5.5912279818e-01    5.9287746928e-01    6.2701250657e-01    6.6266312951e-01    6.9981239144e-01    
+7.3797214785e-01    7.7755063154e-01    8.1879982249e-01    8.6169616259e-01    9.0621392108e-01    
+9.5232520971e-01    1.0000000000e+00    -2.0400024912e-01   -2.0358766831e-01   -2.0235020863e-01   
+-2.0028871817e-01   -1.9800132038e-01   -1.9518702105e-01   -1.9154745006e-01   -1.8723137194e-01   
+-1.8238505658e-01   -1.7671369877e-01   -1.7021938073e-01   -1.6376769405e-01   -1.5648496318e-01   
+-1.4837323422e-01   -1.3971522142e-01   -1.3036684409e-01   -1.2018967534e-01   -1.0945806647e-01   
+-9.8433079222e-02   -8.6569715276e-02   -7.3871738570e-02   -6.0727235976e-02   -4.6744976663e-02   
+-3.1929848849e-02   -1.7258210583e-02   -2.2038484774e-03   1.3723819795e-02    3.0292052294e-02    
+4.7288093060e-02    6.5173538528e-02    8.3942924449e-02    1.0266073241e-01    1.2230113936e-01    
+1.4285822063e-01    1.6338122652e-01    1.8441163002e-01    2.0643088626e-01    2.2909254964e-01    
+2.5210144193e-01    2.7615638499e-01    3.0124977882e-01    3.2629932617e-01    3.5247313199e-01    
+3.7976244764e-01    4.0730315170e-01    4.3563740003e-01    4.6520730596e-01    4.9565101947e-01    
+5.2670938113e-01    5.5912279818e-01    5.9287746928e-01    6.2701250657e-01    6.6266312951e-01    
+6.9981239144e-01    7.3797214785e-01    7.7755063154e-01    8.1879982249e-01    8.6169616259e-01    
+9.0621392108e-01    9.5232520971e-01    1.0000000000e+00    -2.0400024912e-01   -2.0358766831e-01   
+-2.0235020863e-01   -2.0028871817e-01   -1.9800132038e-01   -1.9518702105e-01   -1.9154745006e-01   
+-1.8723137194e-01   -1.8238505658e-01   -1.7671369877e-01   -1.7021938073e-01   -1.6376769405e-01   
+-1.5648496318e-01   -1.4837323422e-01   -1.3971522142e-01   -1.3036684409e-01   -1.2018967534e-01   
+-1.0945806647e-01   -9.8433079222e-02   -8.6569715276e-02   -7.3871738570e-02   -6.0727235976e-02   
+-4.6744976663e-02   -3.1929848849e-02   -1.7258210583e-02   -2.2038484774e-03   1.3723819795e-02    
+3.0292052294e-02    4.7288093060e-02    6.5173538528e-02    8.3942924449e-02    1.0266073241e-01    
+1.2230113936e-01    1.4285822063e-01    1.6338122652e-01    1.8441163002e-01    2.0643088626e-01    
+2.2909254964e-01    2.5210144193e-01    2.7615638499e-01    3.0124977882e-01    3.2629932617e-01    
+3.5247313199e-01    3.7976244764e-01    4.0730315170e-01    4.3563740003e-01    4.6520730596e-01    
+4.9565101947e-01    5.2670938113e-01    5.5912279818e-01    5.9287746928e-01    6.2701250657e-01    
+6.6266312951e-01    6.9981239144e-01    7.3797214785e-01    7.7755063154e-01    8.1879982249e-01    
+8.6169616259e-01    9.0621392108e-01    9.5232520971e-01    1.0000000000e+00    -2.0400024912e-01   
+-2.0358766831e-01   -2.0235020863e-01   -2.0028871817e-01   -1.9800132038e-01   -1.9518702105e-01   
+-1.9154745006e-01   -1.8723137194e-01   -1.8238505658e-01   -1.7671369877e-01   -1.7021938073e-01   
+-1.6376769405e-01   -1.5648496318e-01   -1.4837323422e-01   -1.3971522142e-01   -1.3036684409e-01   
+-1.2018967534e-01   -1.0945806647e-01   -9.8433079222e-02   -8.6569715276e-02   -7.3871738570e-02   
+-6.0727235976e-02   -4.6744976663e-02   -3.1929848849e-02   -1.7258210583e-02   -2.2038484774e-03   
+1.3723819795e-02    3.0292052294e-02    4.7288093060e-02    6.5173538528e-02    8.3942924449e-02    
+1.0266073241e-01    1.2230113936e-01    1.4285822063e-01    1.6338122652e-01    1.8441163002e-01    
+2.0643088626e-01    2.2909254964e-01    2.5210144193e-01    2.7615638499e-01    3.0124977882e-01    
+3.2629932617e-01    3.5247313199e-01    3.7976244764e-01    4.0730315170e-01    4.3563740003e-01    
+4.6520730596e-01    4.9565101947e-01    5.2670938113e-01    5.5912279818e-01    5.9287746928e-01    
+6.2701250657e-01    6.6266312951e-01    6.9981239144e-01    7.3797214785e-01    7.7755063154e-01    
+8.1879982249e-01    8.6169616259e-01    9.0621392108e-01    9.5232520971e-01    1.0000000000e+00    
+-2.0400024912e-01   -2.0358766831e-01   -2.0235020863e-01   -2.0028871817e-01   -1.9800132038e-01   
+-1.9518702105e-01   -1.9154745006e-01   -1.8723137194e-01   -1.8238505658e-01   -1.7671369877e-01   
+-1.7021938073e-01   -1.6376769405e-01   -1.5648496318e-01   -1.4837323422e-01   -1.3971522142e-01   
+-1.3036684409e-01   -1.2018967534e-01   -1.0945806647e-01   -9.8433079222e-02   -8.6569715276e-02   
+-7.3871738570e-02   -6.0727235976e-02   -4.6744976663e-02   -3.1929848849e-02   -1.7258210583e-02   
+-2.2038484774e-03   1.3723819795e-02    3.0292052294e-02    4.7288093060e-02    6.5173538528e-02    
+8.3942924449e-02    1.0266073241e-01    1.2230113936e-01    1.4285822063e-01    1.6338122652e-01    
+1.8441163002e-01    2.0643088626e-01    2.2909254964e-01    2.5210144193e-01    2.7615638499e-01    
+3.0124977882e-01    3.2629932617e-01    3.5247313199e-01    3.7976244764e-01    4.0730315170e-01    
+4.3563740003e-01    4.6520730596e-01    4.9565101947e-01    5.2670938113e-01    5.5912279818e-01    
+5.9287746928e-01    6.2701250657e-01    6.6266312951e-01    6.9981239144e-01    7.3797214785e-01    
+7.7755063154e-01    8.1879982249e-01    8.6169616259e-01    9.0621392108e-01    9.5232520971e-01    
+1.0000000000e+00    -2.0400024912e-01   -2.0358766831e-01   -2.0235020863e-01   -2.0028871817e-01   
+-1.9800132038e-01   -1.9518702105e-01   -1.9154745006e-01   -1.8723137194e-01   -1.8238505658e-01   
+-1.7671369877e-01   -1.7021938073e-01   -1.6376769405e-01   -1.5648496318e-01   -1.4837323422e-01   
+-1.3971522142e-01   -1.3036684409e-01   -1.2018967534e-01   -1.0945806647e-01   -9.8433079222e-02   
+-8.6569715276e-02   -7.3871738570e-02   -6.0727235976e-02   -4.6744976663e-02   -3.1929848849e-02   
+-1.7258210583e-02   -2.2038484774e-03   1.3723819795e-02    3.0292052294e-02    4.7288093060e-02    
+6.5173538528e-02    8.3942924449e-02    1.0266073241e-01    1.2230113936e-01    1.4285822063e-01    
+1.6338122652e-01    1.8441163002e-01    2.0643088626e-01    2.2909254964e-01    2.5210144193e-01    
+2.7615638499e-01    3.0124977882e-01    3.2629932617e-01    3.5247313199e-01    3.7976244764e-01    
+4.0730315170e-01    4.3563740003e-01    4.6520730596e-01    4.9565101947e-01    5.2670938113e-01    
+5.5912279818e-01    5.9287746928e-01    6.2701250657e-01    6.6266312951e-01    6.9981239144e-01    
+7.3797214785e-01    7.7755063154e-01    8.1879982249e-01    8.6169616259e-01    9.0621392108e-01    
+9.5232520971e-01    1.0000000000e+00    -2.0400024912e-01   -2.0358766831e-01   -2.0235020863e-01   
+-2.0028871817e-01   -1.9800132038e-01   -1.9518702105e-01   -1.9154745006e-01   -1.8723137194e-01   
+-1.8238505658e-01   -1.7671369877e-01   -1.7021938073e-01   -1.6376769405e-01   -1.5648496318e-01   
+-1.4837323422e-01   -1.3971522142e-01   -1.3036684409e-01   -1.2018967534e-01   -1.0945806647e-01   
+-9.8433079222e-02   -8.6569715276e-02   -7.3871738570e-02   -6.0727235976e-02   -4.6744976663e-02   
+-3.1929848849e-02   -1.7258210583e-02   -2.2038484774e-03   1.3723819795e-02    3.0292052294e-02    
+4.7288093060e-02    6.5173538528e-02    8.3942924449e-02    1.0266073241e-01    1.2230113936e-01    
+1.4285822063e-01    1.6338122652e-01    1.8441163002e-01    2.0643088626e-01    2.2909254964e-01    
+2.5210144193e-01    2.7615638499e-01    3.0124977882e-01    3.2629932617e-01    3.5247313199e-01    
+3.7976244764e-01    4.0730315170e-01    4.3563740003e-01    4.6520730596e-01    4.9565101947e-01    
+5.2670938113e-01    5.5912279818e-01    5.9287746928e-01    6.2701250657e-01    6.6266312951e-01    
+6.9981239144e-01    7.3797214785e-01    7.7755063154e-01    8.1879982249e-01    8.6169616259e-01    
+9.0621392108e-01    9.5232520971e-01    1.0000000000e+00    -2.0400024912e-01   -2.0358766831e-01   
+-2.0235020863e-01   -2.0028871817e-01   -1.9800132038e-01   -1.9518702105e-01   -1.9154745006e-01   
+-1.8723137194e-01   -1.8238505658e-01   -1.7671369877e-01   -1.7021938073e-01   -1.6376769405e-01   
+-1.5648496318e-01   -1.4837323422e-01   -1.3971522142e-01   -1.3036684409e-01   -1.2018967534e-01   
+-1.0945806647e-01   -9.8433079222e-02   -8.6569715276e-02   -7.3871738570e-02   -6.0727235976e-02   
+-4.6744976663e-02   -3.1929848849e-02   -1.7258210583e-02   -2.2038484774e-03   1.3723819795e-02    
+3.0292052294e-02    4.7288093060e-02    6.5173538528e-02    8.3942924449e-02    1.0266073241e-01    
+1.2230113936e-01    1.4285822063e-01    1.6338122652e-01    1.8441163002e-01    2.0643088626e-01    
+2.2909254964e-01    2.5210144193e-01    2.7615638499e-01    3.0124977882e-01    3.2629932617e-01    
+3.5247313199e-01    3.7976244764e-01    4.0730315170e-01    4.3563740003e-01    4.6520730596e-01    
+4.9565101947e-01    5.2670938113e-01    5.5912279818e-01    5.9287746928e-01    6.2701250657e-01    
+6.6266312951e-01    6.9981239144e-01    7.3797214785e-01    7.7755063154e-01    8.1879982249e-01    
+8.6169616259e-01    9.0621392108e-01    9.5232520971e-01    1.0000000000e+00    -2.0400024912e-01   
+-2.0358766831e-01   -2.0235020863e-01   -2.0028871817e-01   -1.9800132038e-01   -1.9518702105e-01   
+-1.9154745006e-01   -1.8723137194e-01   -1.8238505658e-01   -1.7671369877e-01   -1.7021938073e-01   
+-1.6376769405e-01   -1.5648496318e-01   -1.4837323422e-01   -1.3971522142e-01   -1.3036684409e-01   
+-1.2018967534e-01   -1.0945806647e-01   -9.8433079222e-02   -8.6569715276e-02   -7.3871738570e-02   
+-6.0727235976e-02   -4.6744976663e-02   -3.1929848849e-02   -1.7258210583e-02   -2.2038484774e-03   
+1.3723819795e-02    3.0292052294e-02    4.7288093060e-02    6.5173538528e-02    8.3942924449e-02    
+1.0266073241e-01    1.2230113936e-01    1.4285822063e-01    1.6338122652e-01    1.8441163002e-01    
+2.0643088626e-01    2.2909254964e-01    2.5210144193e-01    2.7615638499e-01    3.0124977882e-01    
+3.2629932617e-01    3.5247313199e-01    3.7976244764e-01    4.0730315170e-01    4.3563740003e-01    
+4.6520730596e-01    4.9565101947e-01    5.2670938113e-01    5.5912279818e-01    5.9287746928e-01    
+6.2701250657e-01    6.6266312951e-01    6.9981239144e-01    7.3797214785e-01    7.7755063154e-01    
+8.1879982249e-01    8.6169616259e-01    9.0621392108e-01    9.5232520971e-01    1.0000000000e+00    
+-2.0400024912e-01   -2.0358766831e-01   -2.0235020863e-01   -2.0028871817e-01   -1.9800132038e-01   
+-1.9518702105e-01   -1.9154745006e-01   -1.8723137194e-01   -1.8238505658e-01   -1.7671369877e-01   
+-1.7021938073e-01   -1.6376769405e-01   -1.5648496318e-01   -1.4837323422e-01   -1.3971522142e-01   
+-1.3036684409e-01   -1.2018967534e-01   -1.0945806647e-01   -9.8433079222e-02   -8.6569715276e-02   
+-7.3871738570e-02   -6.0727235976e-02   -4.6744976663e-02   -3.1929848849e-02   -1.7258210583e-02   
+-2.2038484774e-03   1.3723819795e-02    3.0292052294e-02    4.7288093060e-02    6.5173538528e-02    
+8.3942924449e-02    1.0266073241e-01    1.2230113936e-01    1.4285822063e-01    1.6338122652e-01    
+1.8441163002e-01    2.0643088626e-01    2.2909254964e-01    2.5210144193e-01    2.7615638499e-01    
+3.0124977882e-01    3.2629932617e-01    3.5247313199e-01    3.7976244764e-01    4.0730315170e-01    
+4.3563740003e-01    4.6520730596e-01    4.9565101947e-01    5.2670938113e-01    5.5912279818e-01    
+5.9287746928e-01    6.2701250657e-01    6.6266312951e-01    6.9981239144e-01    7.3797214785e-01    
+7.7755063154e-01    8.1879982249e-01    8.6169616259e-01    9.0621392108e-01    9.5232520971e-01    
+1.0000000000e+00    -2.0400024912e-01   -2.0358766831e-01   -2.0235020863e-01   -2.0028871817e-01   
+-1.9800132038e-01   -1.9518702105e-01   -1.9154745006e-01   -1.8723137194e-01   -1.8238505658e-01   
+-1.7671369877e-01   -1.7021938073e-01   -1.6376769405e-01   -1.5648496318e-01   -1.4837323422e-01   
+-1.3971522142e-01   -1.3036684409e-01   -1.2018967534e-01   -1.0945806647e-01   -9.8433079222e-02   
+-8.6569715276e-02   -7.3871738570e-02   -6.0727235976e-02   -4.6744976663e-02   -3.1929848849e-02   
+-1.7258210583e-02   -2.2038484774e-03   1.3723819795e-02    3.0292052294e-02    4.7288093060e-02    
+6.5173538528e-02    8.3942924449e-02    1.0266073241e-01    1.2230113936e-01    1.4285822063e-01    
+1.6338122652e-01    1.8441163002e-01    2.0643088626e-01    2.2909254964e-01    2.5210144193e-01    
+2.7615638499e-01    3.0124977882e-01    3.2629932617e-01    3.5247313199e-01    3.7976244764e-01    
+4.0730315170e-01    4.3563740003e-01    4.6520730596e-01    4.9565101947e-01    5.2670938113e-01    
+5.5912279818e-01    5.9287746928e-01    6.2701250657e-01    6.6266312951e-01    6.9981239144e-01    
+7.3797214785e-01    7.7755063154e-01    8.1879982249e-01    8.6169616259e-01    9.0621392108e-01    
+9.5232520971e-01    1.0000000000e+00    -2.0400024912e-01   -2.0358766831e-01   -2.0235020863e-01   
+-2.0028871817e-01   -1.9800132038e-01   -1.9518702105e-01   -1.9154745006e-01   -1.8723137194e-01   
+-1.8238505658e-01   -1.7671369877e-01   -1.7021938073e-01   -1.6376769405e-01   -1.5648496318e-01   
+-1.4837323422e-01   -1.3971522142e-01   -1.3036684409e-01   -1.2018967534e-01   -1.0945806647e-01   
+-9.8433079222e-02   -8.6569715276e-02   -7.3871738570e-02   -6.0727235976e-02   -4.6744976663e-02   
+-3.1929848849e-02   -1.7258210583e-02   -2.2038484774e-03   1.3723819795e-02    3.0292052294e-02    
+4.7288093060e-02    6.5173538528e-02    8.3942924449e-02    1.0266073241e-01    1.2230113936e-01    
+1.4285822063e-01    1.6338122652e-01    1.8441163002e-01    2.0643088626e-01    2.2909254964e-01    
+2.5210144193e-01    2.7615638499e-01    3.0124977882e-01    3.2629932617e-01    3.5247313199e-01    
+3.7976244764e-01    4.0730315170e-01    4.3563740003e-01    4.6520730596e-01    4.9565101947e-01    
+5.2670938113e-01    5.5912279818e-01    5.9287746928e-01    6.2701250657e-01    6.6266312951e-01    
+6.9981239144e-01    7.3797214785e-01    7.7755063154e-01    8.1879982249e-01    8.6169616259e-01    
+9.0621392108e-01    9.5232520971e-01    1.0000000000e+00    -2.0400024912e-01   -2.0358766831e-01   
+-2.0235020863e-01   -2.0028871817e-01   -1.9800132038e-01   -1.9518702105e-01   -1.9154745006e-01   
+-1.8723137194e-01   -1.8238505658e-01   -1.7671369877e-01   -1.7021938073e-01   -1.6376769405e-01   
+-1.5648496318e-01   -1.4837323422e-01   -1.3971522142e-01   -1.3036684409e-01   -1.2018967534e-01   
+-1.0945806647e-01   -9.8433079222e-02   -8.6569715276e-02   -7.3871738570e-02   -6.0727235976e-02   
+-4.6744976663e-02   -3.1929848849e-02   -1.7258210583e-02   -2.2038484774e-03   1.3723819795e-02    
+3.0292052294e-02    4.7288093060e-02    6.5173538528e-02    8.3942924449e-02    1.0266073241e-01    
+1.2230113936e-01    1.4285822063e-01    1.6338122652e-01    1.8441163002e-01    2.0643088626e-01    
+2.2909254964e-01    2.5210144193e-01    2.7615638499e-01    3.0124977882e-01    3.2629932617e-01    
+3.5247313199e-01    3.7976244764e-01    4.0730315170e-01    4.3563740003e-01    4.6520730596e-01    
+4.9565101947e-01    5.2670938113e-01    5.5912279818e-01    5.9287746928e-01    6.2701250657e-01    
+6.6266312951e-01    6.9981239144e-01    7.3797214785e-01    7.7755063154e-01    8.1879982249e-01    
+8.6169616259e-01    9.0621392108e-01    9.5232520971e-01    1.0000000000e+00    -2.0400024912e-01   
+-2.0358766831e-01   -2.0235020863e-01   -2.0028871817e-01   -1.9800132038e-01   -1.9518702105e-01   
+-1.9154745006e-01   -1.8723137194e-01   -1.8238505658e-01   -1.7671369877e-01   -1.7021938073e-01   
+-1.6376769405e-01   -1.5648496318e-01   -1.4837323422e-01   -1.3971522142e-01   -1.3036684409e-01   
+-1.2018967534e-01   -1.0945806647e-01   -9.8433079222e-02   -8.6569715276e-02   -7.3871738570e-02   
+-6.0727235976e-02   -4.6744976663e-02   -3.1929848849e-02   -1.7258210583e-02   -2.2038484774e-03   
+1.3723819795e-02    3.0292052294e-02    4.7288093060e-02    6.5173538528e-02    8.3942924449e-02    
+1.0266073241e-01    1.2230113936e-01    1.4285822063e-01    1.6338122652e-01    1.8441163002e-01    
+2.0643088626e-01    2.2909254964e-01    2.5210144193e-01    2.7615638499e-01    3.0124977882e-01    
+3.2629932617e-01    3.5247313199e-01    3.7976244764e-01    4.0730315170e-01    4.3563740003e-01    
+4.6520730596e-01    4.9565101947e-01    5.2670938113e-01    5.5912279818e-01    5.9287746928e-01    
+6.2701250657e-01    6.6266312951e-01    6.9981239144e-01    7.3797214785e-01    7.7755063154e-01    
+8.1879982249e-01    8.6169616259e-01    9.0621392108e-01    9.5232520971e-01    1.0000000000e+00    
+-2.0400024912e-01   -2.0358766831e-01   -2.0235020863e-01   -2.0028871817e-01   -1.9800132038e-01   
+-1.9518702105e-01   -1.9154745006e-01   -1.8723137194e-01   -1.8238505658e-01   -1.7671369877e-01   
+-1.7021938073e-01   -1.6376769405e-01   -1.5648496318e-01   -1.4837323422e-01   -1.3971522142e-01   
+-1.3036684409e-01   -1.2018967534e-01   -1.0945806647e-01   -9.8433079222e-02   -8.6569715276e-02   
+-7.3871738570e-02   -6.0727235976e-02   -4.6744976663e-02   -3.1929848849e-02   -1.7258210583e-02   
+-2.2038484774e-03   1.3723819795e-02    3.0292052294e-02    4.7288093060e-02    6.5173538528e-02    
+8.3942924449e-02    1.0266073241e-01    1.2230113936e-01    1.4285822063e-01    1.6338122652e-01    
+1.8441163002e-01    2.0643088626e-01    2.2909254964e-01    2.5210144193e-01    2.7615638499e-01    
+3.0124977882e-01    3.2629932617e-01    3.5247313199e-01    3.7976244764e-01    4.0730315170e-01    
+4.3563740003e-01    4.6520730596e-01    4.9565101947e-01    5.2670938113e-01    5.5912279818e-01    
+5.9287746928e-01    6.2701250657e-01    6.6266312951e-01    6.9981239144e-01    7.3797214785e-01    
+7.7755063154e-01    8.1879982249e-01    8.6169616259e-01    9.0621392108e-01    9.5232520971e-01    
+1.0000000000e+00    -2.0400024912e-01   -2.0358766831e-01   -2.0235020863e-01   -2.0028871817e-01   
+-1.9800132038e-01   -1.9518702105e-01   -1.9154745006e-01   -1.8723137194e-01   -1.8238505658e-01   
+-1.7671369877e-01   -1.7021938073e-01   -1.6376769405e-01   -1.5648496318e-01   -1.4837323422e-01   
+-1.3971522142e-01   -1.3036684409e-01   -1.2018967534e-01   -1.0945806647e-01   -9.8433079222e-02   
+-8.6569715276e-02   -7.3871738570e-02   -6.0727235976e-02   -4.6744976663e-02   -3.1929848849e-02   
+-1.7258210583e-02   -2.2038484774e-03   1.3723819795e-02    3.0292052294e-02    4.7288093060e-02    
+6.5173538528e-02    8.3942924449e-02    1.0266073241e-01    1.2230113936e-01    1.4285822063e-01    
+1.6338122652e-01    1.8441163002e-01    2.0643088626e-01    2.2909254964e-01    2.5210144193e-01    
+2.7615638499e-01    3.0124977882e-01    3.2629932617e-01    3.5247313199e-01    3.7976244764e-01    
+4.0730315170e-01    4.3563740003e-01    4.6520730596e-01    4.9565101947e-01    5.2670938113e-01    
+5.5912279818e-01    5.9287746928e-01    6.2701250657e-01    6.6266312951e-01    6.9981239144e-01    
+7.3797214785e-01    7.7755063154e-01    8.1879982249e-01    8.6169616259e-01    9.0621392108e-01    
+9.5232520971e-01    1.0000000000e+00    -2.0400024912e-01   -2.0358766831e-01   -2.0235020863e-01   
+-2.0028871817e-01   -1.9800132038e-01   -1.9518702105e-01   -1.9154745006e-01   -1.8723137194e-01   
+-1.8238505658e-01   -1.7671369877e-01   -1.7021938073e-01   -1.6376769405e-01   -1.5648496318e-01   
+-1.4837323422e-01   -1.3971522142e-01   -1.3036684409e-01   -1.2018967534e-01   -1.0945806647e-01   
+-9.8433079222e-02   -8.6569715276e-02   -7.3871738570e-02   -6.0727235976e-02   -4.6744976663e-02   
+-3.1929848849e-02   -1.7258210583e-02   -2.2038484774e-03   1.3723819795e-02    3.0292052294e-02    
+4.7288093060e-02    6.5173538528e-02    8.3942924449e-02    1.0266073241e-01    1.2230113936e-01    
+1.4285822063e-01    1.6338122652e-01    1.8441163002e-01    2.0643088626e-01    2.2909254964e-01    
+2.5210144193e-01    2.7615638499e-01    3.0124977882e-01    3.2629932617e-01    3.5247313199e-01    
+3.7976244764e-01    4.0730315170e-01    4.3563740003e-01    4.6520730596e-01    4.9565101947e-01    
+5.2670938113e-01    5.5912279818e-01    5.9287746928e-01    6.2701250657e-01    6.6266312951e-01    
+6.9981239144e-01    7.3797214785e-01    7.7755063154e-01    8.1879982249e-01    8.6169616259e-01    
+9.0621392108e-01    9.5232520971e-01    1.0000000000e+00    -2.0400024912e-01   -2.0358766831e-01   
+-2.0235020863e-01   -2.0028871817e-01   -1.9800132038e-01   -1.9518702105e-01   -1.9154745006e-01   
+-1.8723137194e-01   -1.8238505658e-01   -1.7671369877e-01   -1.7021938073e-01   -1.6376769405e-01   
+-1.5648496318e-01   -1.4837323422e-01   -1.3971522142e-01   -1.3036684409e-01   -1.2018967534e-01   
+-1.0945806647e-01   -9.8433079222e-02   -8.6569715276e-02   -7.3871738570e-02   -6.0727235976e-02   
+-4.6744976663e-02   -3.1929848849e-02   -1.7258210583e-02   -2.2038484774e-03   1.3723819795e-02    
+3.0292052294e-02    4.7288093060e-02    6.5173538528e-02    8.3942924449e-02    1.0266073241e-01    
+1.2230113936e-01    1.4285822063e-01    1.6338122652e-01    1.8441163002e-01    2.0643088626e-01    
+2.2909254964e-01    2.5210144193e-01    2.7615638499e-01    3.0124977882e-01    3.2629932617e-01    
+3.5247313199e-01    3.7976244764e-01    4.0730315170e-01    4.3563740003e-01    4.6520730596e-01    
+4.9565101947e-01    5.2670938113e-01    5.5912279818e-01    5.9287746928e-01    6.2701250657e-01    
+6.6266312951e-01    6.9981239144e-01    7.3797214785e-01    7.7755063154e-01    8.1879982249e-01    
+8.6169616259e-01    9.0621392108e-01    9.5232520971e-01    1.0000000000e+00    
+0.0000000000e+00    3.1517052284e-02    6.3012504355e-02    9.4464770802e-02    1.2591501263e-01    
+1.5734935640e-01    1.8872257600e-01    2.2004032859e-01    2.5132370220e-01    2.8250396459e-01    
+3.1355933803e-01    3.4472369598e-01    3.7576474293e-01    4.0666029043e-01    4.3749568369e-01    
+4.6821327728e-01    4.9874057645e-01    5.2918435226e-01    5.5967960843e-01    5.8995921996e-01    
+6.2000013734e-01    6.5001448621e-01    6.7976413599e-01    7.0922573573e-01    7.3908135195e-01    
+7.6901806039e-01    7.9867070305e-01    8.2820882868e-01    8.5782565406e-01    8.8711718796e-01    
+9.1605707555e-01    9.4559828582e-01    9.7478333887e-01    1.0035840805e+00    1.0331381445e+00    
+1.0628954576e+00    1.0922541808e+00    1.1216773006e+00    1.1516627861e+00    1.1812054244e+00    
+1.2102708849e+00    1.2408022870e+00    1.2708430337e+00    1.3003550703e+00    1.3312189171e+00    
+1.3624918429e+00    1.3931825991e+00    1.4242375850e+00    1.4566387460e+00    1.4883764897e+00    
+1.5194019695e+00    1.5536047206e+00    1.5870451979e+00    1.6196673975e+00    1.6543787484e+00    
+1.6896707054e+00    1.7240045280e+00    1.7573168740e+00    1.7895449913e+00    1.8206267887e+00    
+1.8505009055e+00    0.0000000000e+00    3.1038237441e-02    6.2055202825e-02    9.3029638673e-02    
+1.2400208065e-01    1.5495886612e-01    1.8585545601e-01    2.1669742157e-01    2.4750553044e-01    
+2.7821209459e-01    3.0879566712e-01    3.3948656845e-01    3.7005603215e-01    4.0048220686e-01    
+4.3084914120e-01    4.6110006553e-01    4.9116358643e-01    5.2114485288e-01    5.5117681758e-01    
+5.8099641378e-01    6.1058094212e-01    6.4013930559e-01    6.6943699134e-01    6.9845100318e-01    
+7.2785304551e-01    7.5733494808e-01    7.8653710047e-01    8.1562647559e-01    8.4479335485e-01    
+8.7363988454e-01    9.0214011020e-01    9.3123252311e-01    9.5997418963e-01    9.8833738324e-01    
+1.0174424546e+00    1.0467476872e+00    1.0756603855e+00    1.1046365020e+00    1.1341664406e+00    
+1.1632602598e+00    1.1918841507e+00    1.2219517122e+00    1.2515360725e+00    1.2805997549e+00    
+1.3109947105e+00    1.3417925303e+00    1.3720170250e+00    1.4026002158e+00    1.4345091304e+00    
+1.4657647064e+00    1.4963188395e+00    1.5300019740e+00    1.5629344153e+00    1.5950610104e+00    
+1.6292450179e+00    1.6640008107e+00    1.6978130254e+00    1.7306192820e+00    1.7623577818e+00    
+1.7929673768e+00    1.8223876387e+00    0.0000000000e+00    2.9616341460e-02    5.9212385359e-02    
+8.8767848047e-02    1.1832140821e-01    1.4786002910e-01    1.7734121204e-01    2.0677027305e-01    
+2.3616702838e-01    2.6546689087e-01    2.9464939613e-01    3.2393431332e-01    3.5310335609e-01    
+3.8213567409e-01    4.1111146559e-01    4.3997656161e-01    4.6866283937e-01    4.9727063086e-01    
+5.2592679805e-01    5.5438032556e-01    5.8260955394e-01    6.1081381609e-01    6.3876934246e-01    
+6.6645419033e-01    6.9450929259e-01    7.2264059660e-01    7.5050496609e-01    7.7826172478e-01    
+8.0609243704e-01    8.3361747530e-01    8.6081207411e-01    8.8857173142e-01    9.1599671040e-01    
+9.4306055475e-01    9.7083229062e-01    9.9879501813e-01    1.0263831937e+00    1.0540318822e+00    
+1.0822090217e+00    1.1099700209e+00    1.1372826197e+00    1.1659727529e+00    1.1942018210e+00    
+1.2219340640e+00    1.2509365930e+00    1.2803235307e+00    1.3091634078e+00    1.3383455488e+00    
+1.3687926808e+00    1.3986164043e+00    1.4277708188e+00    1.4599108916e+00    1.4913346613e+00    
+1.5219895016e+00    1.5546075019e+00    1.5877710934e+00    1.6200343332e+00    1.6513376989e+00    
+1.6816222229e+00    1.7108295585e+00    1.7389020457e+00    0.0000000000e+00    2.7294567930e-02    
+5.4570429527e-02    8.1808891277e-02    1.0904559965e-01    1.3626853992e-01    1.6343854508e-01    
+1.9056051442e-01    2.1765271067e-01    2.4465561001e-01    2.7155035233e-01    2.9853947800e-01    
+3.2542181323e-01    3.5217814223e-01    3.7888237612e-01    4.0548459251e-01    4.3192200910e-01    
+4.5828709234e-01    4.8469675888e-01    5.1091967169e-01    5.3693586929e-01    5.6292905788e-01    
+5.8869301035e-01    6.1420750416e-01    6.4006322625e-01    6.6598917627e-01    6.9166911810e-01    
+7.1724988527e-01    7.4289880843e-01    7.6826602091e-01    7.9332869874e-01    8.1891213730e-01    
+8.4418713465e-01    8.6912930852e-01    8.9472387874e-01    9.2049446781e-01    9.4591986795e-01    
+9.7140103713e-01    9.9736922932e-01    1.0229539046e+00    1.0481253318e+00    1.0745663016e+00    
+1.1005823514e+00    1.1261405248e+00    1.1528694002e+00    1.1799525484e+00    1.2065315230e+00    
+1.2334259296e+00    1.2614861582e+00    1.2889718504e+00    1.3158407042e+00    1.3454611555e+00    
+1.3744214584e+00    1.4026731119e+00    1.4327340236e+00    1.4632977549e+00    1.4930317175e+00    
+1.5218810554e+00    1.5497914237e+00    1.5767090498e+00    1.6025807939e+00    0.0000000000e+00    
+2.4143462766e-02    4.8270378808e-02    7.2364212744e-02    9.6456495727e-02    1.2053660010e-01    
+1.4456988063e-01    1.6856067098e-01    1.9252512549e-01    2.1641059224e-01    2.4020038849e-01    
+2.6407367172e-01    2.8785249324e-01    3.1151985572e-01    3.3514113738e-01    3.5867217925e-01    
+3.8205744714e-01    4.0537873244e-01    4.2873945396e-01    4.5193498212e-01    4.7494765994e-01    
+4.9793998511e-01    5.2072953900e-01    5.4329843377e-01    5.6616916268e-01    5.8910201182e-01    
+6.1181725395e-01    6.3444477095e-01    6.5713257546e-01    6.7957119224e-01    7.0174043231e-01    
+7.2437031228e-01    7.4672735999e-01    7.6879000804e-01    7.9142973455e-01    8.1422515888e-01    
+8.3671524567e-01    8.5925466306e-01    8.8222487760e-01    9.0485585152e-01    9.2712128604e-01    
+9.5050969694e-01    9.7352224408e-01    9.9612977570e-01    1.0197728540e+00    1.0437293051e+00    
+1.0672397883e+00    1.0910292876e+00    1.1158500170e+00    1.1401625392e+00    1.1639294356e+00    
+1.1901302630e+00    1.2157471548e+00    1.2407372096e+00    1.2673276470e+00    1.2943628545e+00    
+1.3206640886e+00    1.3461828261e+00    1.3708709963e+00    1.3946810344e+00    1.4175659356e+00    
+0.0000000000e+00    2.0258770702e-02    4.0503657054e-02    6.0720784224e-02    8.0936609989e-02    
+1.0114221669e-01    1.2130853352e-01    1.4143919685e-01    1.6154776179e-01    1.8159004813e-01    
+2.0155205739e-01    2.2158412054e-01    2.4153692091e-01    2.6139619604e-01    2.8121680476e-01    
+3.0096169333e-01    3.2058426299e-01    3.4015314487e-01    3.5975511769e-01    3.7921847681e-01    
+3.9852840629e-01    4.1782125785e-01    4.3694396412e-01    4.5588151540e-01    4.7507233558e-01    
+4.9431528085e-01    5.1337563214e-01    5.3236237331e-01    5.5139970170e-01    5.7022793676e-01    
+5.8883013793e-01    6.0781886187e-01    6.2657865236e-01    6.4509141220e-01    6.6408839836e-01    
+6.8321603051e-01    7.0208745404e-01    7.2100027086e-01    7.4027456941e-01    7.5926421128e-01    
+7.7794712917e-01    7.9757233613e-01    8.1688215595e-01    8.3585212740e-01    8.5569102567e-01    
+8.7579287494e-01    8.9552051275e-01    9.1548227287e-01    9.3630933772e-01    9.5670996611e-01    
+9.7665276015e-01    9.9863786476e-01    1.0201329892e+00    1.0411021349e+00    1.0634141612e+00    
+1.0860993939e+00    1.1081687496e+00    1.1295815129e+00    1.1502973474e+00    1.1702763416e+00    
+1.1894790538e+00    0.0000000000e+00    1.5758526142e-02    3.1506252177e-02    4.7232385401e-02    
+6.2957506313e-02    7.8674678202e-02    9.4361287999e-02    1.1002016429e-01    1.2566185110e-01    
+1.4125198230e-01    1.5677966902e-01    1.7236184799e-01    1.8788237147e-01    2.0333014522e-01    
+2.1874784184e-01    2.3410663864e-01    2.4937028822e-01    2.6459217613e-01    2.7983980422e-01    
+2.9497960998e-01    3.1000006867e-01    3.2500724310e-01    3.3988206799e-01    3.5461286786e-01    
+3.6954067598e-01    3.8450903020e-01    3.9933535153e-01    4.1410441434e-01    4.2891282703e-01    
+4.4355859398e-01    4.5802853778e-01    4.7279914291e-01    4.8739166944e-01    5.0179204023e-01    
+5.1656907224e-01    5.3144772878e-01    5.4612709039e-01    5.6083865028e-01    5.7583139303e-01    
+5.9060271218e-01    6.0513544244e-01    6.2040114348e-01    6.3542151687e-01    6.5017753516e-01    
+6.6560945853e-01    6.8124592147e-01    6.9659129957e-01    7.1211879249e-01    7.2831937300e-01    
+7.4418824483e-01    7.5970098477e-01    7.7680236031e-01    7.9352259896e-01    8.0983369876e-01    
+8.2718937421e-01    8.4483535268e-01    8.6200226400e-01    8.7865843699e-01    8.9477249565e-01    
+9.1031339433e-01    9.2525045275e-01    0.0000000000e+00    1.0779466739e-02    2.1551545771e-02    
+3.2308854449e-02    4.3065470665e-02    5.3816649430e-02    6.4546922491e-02    7.5258224721e-02    
+8.5957768646e-02    9.6622046460e-02    1.0724360974e-01    1.1790244791e-01    1.2851911123e-01    
+1.3908601082e-01    1.4963233644e-01    1.6013837220e-01    1.7057932344e-01    1.8099170801e-01    
+1.9142169989e-01    2.0177793697e-01    2.1205253583e-01    2.2231804774e-01    2.3249302722e-01    
+2.4256948778e-01    2.5278070992e-01    2.6301966724e-01    2.7316146833e-01    2.8326410229e-01    
+2.9339365315e-01    3.0341194777e-01    3.1330997227e-01    3.2341366125e-01    3.3339553727e-01    
+3.4324597104e-01    3.5335405625e-01    3.6353165673e-01    3.7357293146e-01    3.8363623110e-01    
+3.9389187115e-01    4.0399604854e-01    4.1393702151e-01    4.2437937603e-01    4.3465391655e-01    
+4.4474762753e-01    4.5530368481e-01    4.6599965540e-01    4.7649651223e-01    4.8711794294e-01    
+4.9819979268e-01    5.0905474032e-01    5.1966607939e-01    5.3136410921e-01    5.4280142606e-01    
+5.5395887544e-01    5.6583085665e-01    5.7790141682e-01    5.8964427576e-01    6.0103776911e-01    
+6.1206043441e-01    6.2269103520e-01    6.3290858492e-01    0.0000000000e+00    5.4728786945e-03    
+1.0942006551e-02    1.6403635304e-02    2.1864912483e-02    2.7323428997e-02    3.2771331407e-02    
+3.8209602073e-02    4.3641902891e-02    4.9056298635e-02    5.4449007640e-02    5.9860641605e-02    
+6.5250862842e-02    7.0615818363e-02    7.5970328209e-02    8.1304382359e-02    8.6605392228e-02    
+9.1891898420e-02    9.7187344081e-02    1.0244534344e-01    1.0766189400e-01    1.1287383099e-01    
+1.1803980346e-01    1.2315575656e-01    1.2834012991e-01    1.3353858478e-01    1.3868771214e-01    
+1.4381695383e-01    1.4895986158e-01    1.5404628307e-01    1.5907164181e-01    1.6420141914e-01    
+1.6926935042e-01    1.7427054671e-01    1.7940255607e-01    1.8456985926e-01    1.8966794804e-01    
+1.9477721917e-01    1.9998414409e-01    2.0511416939e-01    2.1016133364e-01    2.1546305598e-01    
+2.2067957691e-01    2.2580428828e-01    2.3116373902e-01    2.3659422561e-01    2.4192361950e-01    
+2.4731626119e-01    2.5294266376e-01    2.5845386511e-01    2.6384138315e-01    2.6978062855e-01    
+2.7558750649e-01    2.8125229201e-01    2.8727985483e-01    2.9340823884e-01    2.9937024458e-01    
+3.0515487275e-01    3.1075122659e-01    3.1614852406e-01    3.2133611001e-01    0.0000000000e+00    
+1.9297991240e-18    3.8582756601e-18    5.7841079268e-18    7.7098162251e-18    9.6345510812e-18    
+1.1555543284e-17    1.3473139224e-17    1.5388630129e-17    1.7297807501e-17    1.9199337883e-17    
+2.1107541420e-17    2.3008194587e-17    2.4899938776e-17    2.6787999701e-17    2.8668847715e-17    
+3.0538043941e-17    3.2402126006e-17    3.4269360229e-17    3.6123390463e-17    3.7962805378e-17    
+3.9800593494e-17    4.1622174001e-17    4.3426117113e-17    4.5254185980e-17    4.7087220148e-17    
+4.8902860878e-17    5.0711489694e-17    5.2524937322e-17    5.4318467248e-17    5.6090465759e-17    
+5.7899283449e-17    5.9686293519e-17    6.1449772077e-17    6.3259376805e-17    6.5081426539e-17    
+6.6879070489e-17    6.8680657460e-17    7.0516678263e-17    7.2325583393e-17    7.4105270774e-17    
+7.5974718223e-17    7.7814122692e-17    7.9621154067e-17    8.1510957208e-17    8.3425808395e-17    
+8.5305013147e-17    8.7206519795e-17    8.9190453179e-17    9.1133765306e-17    9.3033465295e-17    
+9.5127710609e-17    9.7175281659e-17    9.9172749304e-17    1.0129813635e-16    1.0345907408e-16    
+1.0556134495e-16    1.0760107048e-16    1.0957440834e-16    1.1147755667e-16    1.1330675833e-16    
+0.0000000000e+00    -5.4728786945e-03   -1.0942006551e-02   -1.6403635304e-02   -2.1864912483e-02   
+-2.7323428997e-02   -3.2771331407e-02   -3.8209602073e-02   -4.3641902891e-02   -4.9056298635e-02   
+-5.4449007640e-02   -5.9860641605e-02   -6.5250862842e-02   -7.0615818363e-02   -7.5970328209e-02   
+-8.1304382359e-02   -8.6605392228e-02   -9.1891898420e-02   -9.7187344081e-02   -1.0244534344e-01   
+-1.0766189400e-01   -1.1287383099e-01   -1.1803980346e-01   -1.2315575656e-01   -1.2834012991e-01   
+-1.3353858478e-01   -1.3868771214e-01   -1.4381695383e-01   -1.4895986158e-01   -1.5404628307e-01   
+-1.5907164181e-01   -1.6420141914e-01   -1.6926935042e-01   -1.7427054671e-01   -1.7940255607e-01   
+-1.8456985926e-01   -1.8966794804e-01   -1.9477721917e-01   -1.9998414409e-01   -2.0511416939e-01   
+-2.1016133364e-01   -2.1546305598e-01   -2.2067957691e-01   -2.2580428828e-01   -2.3116373902e-01   
+-2.3659422561e-01   -2.4192361950e-01   -2.4731626119e-01   -2.5294266376e-01   -2.5845386511e-01   
+-2.6384138315e-01   -2.6978062855e-01   -2.7558750649e-01   -2.8125229201e-01   -2.8727985483e-01   
+-2.9340823884e-01   -2.9937024458e-01   -3.0515487275e-01   -3.1075122659e-01   -3.1614852406e-01   
+-3.2133611001e-01   0.0000000000e+00    -1.0779466739e-02   -2.1551545771e-02   -3.2308854449e-02   
+-4.3065470665e-02   -5.3816649430e-02   -6.4546922491e-02   -7.5258224721e-02   -8.5957768646e-02   
+-9.6622046460e-02   -1.0724360974e-01   -1.1790244791e-01   -1.2851911123e-01   -1.3908601082e-01   
+-1.4963233644e-01   -1.6013837220e-01   -1.7057932344e-01   -1.8099170801e-01   -1.9142169989e-01   
+-2.0177793697e-01   -2.1205253583e-01   -2.2231804774e-01   -2.3249302722e-01   -2.4256948778e-01   
+-2.5278070992e-01   -2.6301966724e-01   -2.7316146833e-01   -2.8326410229e-01   -2.9339365315e-01   
+-3.0341194777e-01   -3.1330997227e-01   -3.2341366125e-01   -3.3339553727e-01   -3.4324597104e-01   
+-3.5335405625e-01   -3.6353165673e-01   -3.7357293146e-01   -3.8363623110e-01   -3.9389187115e-01   
+-4.0399604854e-01   -4.1393702151e-01   -4.2437937603e-01   -4.3465391655e-01   -4.4474762753e-01   
+-4.5530368481e-01   -4.6599965540e-01   -4.7649651223e-01   -4.8711794294e-01   -4.9819979268e-01   
+-5.0905474032e-01   -5.1966607939e-01   -5.3136410921e-01   -5.4280142606e-01   -5.5395887544e-01   
+-5.6583085665e-01   -5.7790141682e-01   -5.8964427576e-01   -6.0103776911e-01   -6.1206043441e-01   
+-6.2269103520e-01   -6.3290858492e-01   0.0000000000e+00    -1.5758526142e-02   -3.1506252177e-02   
+-4.7232385401e-02   -6.2957506313e-02   -7.8674678202e-02   -9.4361287999e-02   -1.1002016429e-01   
+-1.2566185110e-01   -1.4125198230e-01   -1.5677966902e-01   -1.7236184799e-01   -1.8788237147e-01   
+-2.0333014522e-01   -2.1874784184e-01   -2.3410663864e-01   -2.4937028822e-01   -2.6459217613e-01   
+-2.7983980422e-01   -2.9497960998e-01   -3.1000006867e-01   -3.2500724310e-01   -3.3988206799e-01   
+-3.5461286786e-01   -3.6954067598e-01   -3.8450903020e-01   -3.9933535153e-01   -4.1410441434e-01   
+-4.2891282703e-01   -4.4355859398e-01   -4.5802853778e-01   -4.7279914291e-01   -4.8739166944e-01   
+-5.0179204023e-01   -5.1656907224e-01   -5.3144772878e-01   -5.4612709039e-01   -5.6083865028e-01   
+-5.7583139303e-01   -5.9060271218e-01   -6.0513544244e-01   -6.2040114348e-01   -6.3542151687e-01   
+-6.5017753516e-01   -6.6560945853e-01   -6.8124592147e-01   -6.9659129957e-01   -7.1211879249e-01   
+-7.2831937300e-01   -7.4418824483e-01   -7.5970098477e-01   -7.7680236031e-01   -7.9352259896e-01   
+-8.0983369876e-01   -8.2718937421e-01   -8.4483535268e-01   -8.6200226400e-01   -8.7865843699e-01   
+-8.9477249565e-01   -9.1031339433e-01   -9.2525045275e-01   0.0000000000e+00    -2.0258770702e-02   
+-4.0503657054e-02   -6.0720784224e-02   -8.0936609989e-02   -1.0114221669e-01   -1.2130853352e-01   
+-1.4143919685e-01   -1.6154776179e-01   -1.8159004813e-01   -2.0155205739e-01   -2.2158412054e-01   
+-2.4153692091e-01   -2.6139619604e-01   -2.8121680476e-01   -3.0096169333e-01   -3.2058426299e-01   
+-3.4015314487e-01   -3.5975511769e-01   -3.7921847681e-01   -3.9852840629e-01   -4.1782125785e-01   
+-4.3694396412e-01   -4.5588151540e-01   -4.7507233558e-01   -4.9431528085e-01   -5.1337563214e-01   
+-5.3236237331e-01   -5.5139970170e-01   -5.7022793676e-01   -5.8883013793e-01   -6.0781886187e-01   
+-6.2657865236e-01   -6.4509141220e-01   -6.6408839836e-01   -6.8321603051e-01   -7.0208745404e-01   
+-7.2100027086e-01   -7.4027456941e-01   -7.5926421128e-01   -7.7794712917e-01   -7.9757233613e-01   
+-8.1688215595e-01   -8.3585212740e-01   -8.5569102567e-01   -8.7579287494e-01   -8.9552051275e-01   
+-9.1548227287e-01   -9.3630933772e-01   -9.5670996611e-01   -9.7665276015e-01   -9.9863786476e-01   
+-1.0201329892e+00   -1.0411021349e+00   -1.0634141612e+00   -1.0860993939e+00   -1.1081687496e+00   
+-1.1295815129e+00   -1.1502973474e+00   -1.1702763416e+00   -1.1894790538e+00   0.0000000000e+00    
+-2.4143462766e-02   -4.8270378808e-02   -7.2364212744e-02   -9.6456495727e-02   -1.2053660010e-01   
+-1.4456988063e-01   -1.6856067098e-01   -1.9252512549e-01   -2.1641059224e-01   -2.4020038849e-01   
+-2.6407367172e-01   -2.8785249324e-01   -3.1151985572e-01   -3.3514113738e-01   -3.5867217925e-01   
+-3.8205744714e-01   -4.0537873244e-01   -4.2873945396e-01   -4.5193498212e-01   -4.7494765994e-01   
+-4.9793998511e-01   -5.2072953900e-01   -5.4329843377e-01   -5.6616916268e-01   -5.8910201182e-01   
+-6.1181725395e-01   -6.3444477095e-01   -6.5713257546e-01   -6.7957119224e-01   -7.0174043231e-01   
+-7.2437031228e-01   -7.4672735999e-01   -7.6879000804e-01   -7.9142973455e-01   -8.1422515888e-01   
+-8.3671524567e-01   -8.5925466306e-01   -8.8222487760e-01   -9.0485585152e-01   -9.2712128604e-01   
+-9.5050969694e-01   -9.7352224408e-01   -9.9612977570e-01   -1.0197728540e+00   -1.0437293051e+00   
+-1.0672397883e+00   -1.0910292876e+00   -1.1158500170e+00   -1.1401625392e+00   -1.1639294356e+00   
+-1.1901302630e+00   -1.2157471548e+00   -1.2407372096e+00   -1.2673276470e+00   -1.2943628545e+00   
+-1.3206640886e+00   -1.3461828261e+00   -1.3708709963e+00   -1.3946810344e+00   -1.4175659356e+00   
+0.0000000000e+00    -2.7294567930e-02   -5.4570429527e-02   -8.1808891277e-02   -1.0904559965e-01   
+-1.3626853992e-01   -1.6343854508e-01   -1.9056051442e-01   -2.1765271067e-01   -2.4465561001e-01   
+-2.7155035233e-01   -2.9853947800e-01   -3.2542181323e-01   -3.5217814223e-01   -3.7888237612e-01   
+-4.0548459251e-01   -4.3192200910e-01   -4.5828709234e-01   -4.8469675888e-01   -5.1091967169e-01   
+-5.3693586929e-01   -5.6292905788e-01   -5.8869301035e-01   -6.1420750416e-01   -6.4006322625e-01   
+-6.6598917627e-01   -6.9166911810e-01   -7.1724988527e-01   -7.4289880843e-01   -7.6826602091e-01   
+-7.9332869874e-01   -8.1891213730e-01   -8.4418713465e-01   -8.6912930852e-01   -8.9472387874e-01   
+-9.2049446781e-01   -9.4591986795e-01   -9.7140103713e-01   -9.9736922932e-01   -1.0229539046e+00   
+-1.0481253318e+00   -1.0745663016e+00   -1.1005823514e+00   -1.1261405248e+00   -1.1528694002e+00   
+-1.1799525484e+00   -1.2065315230e+00   -1.2334259296e+00   -1.2614861582e+00   -1.2889718504e+00   
+-1.3158407042e+00   -1.3454611555e+00   -1.3744214584e+00   -1.4026731119e+00   -1.4327340236e+00   
+-1.4632977549e+00   -1.4930317175e+00   -1.5218810554e+00   -1.5497914237e+00   -1.5767090498e+00   
+-1.6025807939e+00   0.0000000000e+00    -2.9616341460e-02   -5.9212385359e-02   -8.8767848047e-02   
+-1.1832140821e-01   -1.4786002910e-01   -1.7734121204e-01   -2.0677027305e-01   -2.3616702838e-01   
+-2.6546689087e-01   -2.9464939613e-01   -3.2393431332e-01   -3.5310335609e-01   -3.8213567409e-01   
+-4.1111146559e-01   -4.3997656161e-01   -4.6866283937e-01   -4.9727063086e-01   -5.2592679805e-01   
+-5.5438032556e-01   -5.8260955394e-01   -6.1081381609e-01   -6.3876934246e-01   -6.6645419033e-01   
+-6.9450929259e-01   -7.2264059660e-01   -7.5050496609e-01   -7.7826172478e-01   -8.0609243704e-01   
+-8.3361747530e-01   -8.6081207411e-01   -8.8857173142e-01   -9.1599671040e-01   -9.4306055475e-01   
+-9.7083229062e-01   -9.9879501813e-01   -1.0263831937e+00   -1.0540318822e+00   -1.0822090217e+00   
+-1.1099700209e+00   -1.1372826197e+00   -1.1659727529e+00   -1.1942018210e+00   -1.2219340640e+00   
+-1.2509365930e+00   -1.2803235307e+00   -1.3091634078e+00   -1.3383455488e+00   -1.3687926808e+00   
+-1.3986164043e+00   -1.4277708188e+00   -1.4599108916e+00   -1.4913346613e+00   -1.5219895016e+00   
+-1.5546075019e+00   -1.5877710934e+00   -1.6200343332e+00   -1.6513376989e+00   -1.6816222229e+00   
+-1.7108295585e+00   -1.7389020457e+00   0.0000000000e+00    -3.1038237441e-02   -6.2055202825e-02   
+-9.3029638673e-02   -1.2400208065e-01   -1.5495886612e-01   -1.8585545601e-01   -2.1669742157e-01   
+-2.4750553044e-01   -2.7821209459e-01   -3.0879566712e-01   -3.3948656845e-01   -3.7005603215e-01   
+-4.0048220686e-01   -4.3084914120e-01   -4.6110006553e-01   -4.9116358643e-01   -5.2114485288e-01   
+-5.5117681758e-01   -5.8099641378e-01   -6.1058094212e-01   -6.4013930559e-01   -6.6943699134e-01   
+-6.9845100318e-01   -7.2785304551e-01   -7.5733494808e-01   -7.8653710047e-01   -8.1562647559e-01   
+-8.4479335485e-01   -8.7363988454e-01   -9.0214011020e-01   -9.3123252311e-01   -9.5997418963e-01   
+-9.8833738324e-01   -1.0174424546e+00   -1.0467476872e+00   -1.0756603855e+00   -1.1046365020e+00   
+-1.1341664406e+00   -1.1632602598e+00   -1.1918841507e+00   -1.2219517122e+00   -1.2515360725e+00   
+-1.2805997549e+00   -1.3109947105e+00   -1.3417925303e+00   -1.3720170250e+00   -1.4026002158e+00   
+-1.4345091304e+00   -1.4657647064e+00   -1.4963188395e+00   -1.5300019740e+00   -1.5629344153e+00   
+-1.5950610104e+00   -1.6292450179e+00   -1.6640008107e+00   -1.6978130254e+00   -1.7306192820e+00   
+-1.7623577818e+00   -1.7929673768e+00   -1.8223876387e+00   0.0000000000e+00    -3.1517052284e-02   
+-6.3012504355e-02   -9.4464770802e-02   -1.2591501263e-01   -1.5734935640e-01   -1.8872257600e-01   
+-2.2004032859e-01   -2.5132370220e-01   -2.8250396459e-01   -3.1355933803e-01   -3.4472369598e-01   
+-3.7576474293e-01   -4.0666029043e-01   -4.3749568369e-01   -4.6821327728e-01   -4.9874057645e-01   
+-5.2918435226e-01   -5.5967960843e-01   -5.8995921996e-01   -6.2000013734e-01   -6.5001448621e-01   
+-6.7976413599e-01   -7.0922573573e-01   -7.3908135195e-01   -7.6901806039e-01   -7.9867070305e-01   
+-8.2820882868e-01   -8.5782565406e-01   -8.8711718796e-01   -9.1605707555e-01   -9.4559828582e-01   
+-9.7478333887e-01   -1.0035840805e+00   -1.0331381445e+00   -1.0628954576e+00   -1.0922541808e+00   
+-1.1216773006e+00   -1.1516627861e+00   -1.1812054244e+00   -1.2102708849e+00   -1.2408022870e+00   
+-1.2708430337e+00   -1.3003550703e+00   -1.3312189171e+00   -1.3624918429e+00   -1.3931825991e+00   
+-1.4242375850e+00   -1.4566387460e+00   -1.4883764897e+00   -1.5194019695e+00   -1.5536047206e+00   
+-1.5870451979e+00   -1.6196673975e+00   -1.6543787484e+00   -1.6896707054e+00   -1.7240045280e+00   
+-1.7573168740e+00   -1.7895449913e+00   -1.8206267887e+00   -1.8505009055e+00   
+0.0000000000e+00    -1.9297991240e-18   -3.8582756601e-18   -5.7841079268e-18   -7.7098162251e-18   
+-9.6345510812e-18   -1.1555543284e-17   -1.3473139224e-17   -1.5388630129e-17   -1.7297807501e-17   
+-1.9199337883e-17   -2.1107541420e-17   -2.3008194587e-17   -2.4899938776e-17   -2.6787999701e-17   
+-2.8668847715e-17   -3.0538043941e-17   -3.2402126006e-17   -3.4269360229e-17   -3.6123390463e-17   
+-3.7962805378e-17   -3.9800593494e-17   -4.1622174001e-17   -4.3426117113e-17   -4.5254185980e-17   
+-4.7087220148e-17   -4.8902860878e-17   -5.0711489694e-17   -5.2524937322e-17   -5.4318467248e-17   
+-5.6090465759e-17   -5.7899283449e-17   -5.9686293519e-17   -6.1449772077e-17   -6.3259376805e-17   
+-6.5081426539e-17   -6.6879070489e-17   -6.8680657460e-17   -7.0516678263e-17   -7.2325583393e-17   
+-7.4105270774e-17   -7.5974718223e-17   -7.7814122692e-17   -7.9621154067e-17   -8.1510957208e-17   
+-8.3425808395e-17   -8.5305013147e-17   -8.7206519795e-17   -8.9190453179e-17   -9.1133765306e-17   
+-9.3033465295e-17   -9.5127710609e-17   -9.7175281659e-17   -9.9172749304e-17   -1.0129813635e-16   
+-1.0345907408e-16   -1.0556134495e-16   -1.0760107048e-16   -1.0957440834e-16   -1.1147755667e-16   
+-1.1330675833e-16   0.0000000000e+00    5.4728786945e-03    1.0942006551e-02    1.6403635304e-02    
+2.1864912483e-02    2.7323428997e-02    3.2771331407e-02    3.8209602073e-02    4.3641902891e-02    
+4.9056298635e-02    5.4449007640e-02    5.9860641605e-02    6.5250862842e-02    7.0615818363e-02    
+7.5970328209e-02    8.1304382359e-02    8.6605392228e-02    9.1891898420e-02    9.7187344081e-02    
+1.0244534344e-01    1.0766189400e-01    1.1287383099e-01    1.1803980346e-01    1.2315575656e-01    
+1.2834012991e-01    1.3353858478e-01    1.3868771214e-01    1.4381695383e-01    1.4895986158e-01    
+1.5404628307e-01    1.5907164181e-01    1.6420141914e-01    1.6926935042e-01    1.7427054671e-01    
+1.7940255607e-01    1.8456985926e-01    1.8966794804e-01    1.9477721917e-01    1.9998414409e-01    
+2.0511416939e-01    2.1016133364e-01    2.1546305598e-01    2.2067957691e-01    2.2580428828e-01    
+2.3116373902e-01    2.3659422561e-01    2.4192361950e-01    2.4731626119e-01    2.5294266376e-01    
+2.5845386511e-01    2.6384138315e-01    2.6978062855e-01    2.7558750649e-01    2.8125229201e-01    
+2.8727985483e-01    2.9340823884e-01    2.9937024458e-01    3.0515487275e-01    3.1075122659e-01    
+3.1614852406e-01    3.2133611001e-01    0.0000000000e+00    1.0779466739e-02    2.1551545771e-02    
+3.2308854449e-02    4.3065470665e-02    5.3816649430e-02    6.4546922491e-02    7.5258224721e-02    
+8.5957768646e-02    9.6622046460e-02    1.0724360974e-01    1.1790244791e-01    1.2851911123e-01    
+1.3908601082e-01    1.4963233644e-01    1.6013837220e-01    1.7057932344e-01    1.8099170801e-01    
+1.9142169989e-01    2.0177793697e-01    2.1205253583e-01    2.2231804774e-01    2.3249302722e-01    
+2.4256948778e-01    2.5278070992e-01    2.6301966724e-01    2.7316146833e-01    2.8326410229e-01    
+2.9339365315e-01    3.0341194777e-01    3.1330997227e-01    3.2341366125e-01    3.3339553727e-01    
+3.4324597104e-01    3.5335405625e-01    3.6353165673e-01    3.7357293146e-01    3.8363623110e-01    
+3.9389187115e-01    4.0399604854e-01    4.1393702151e-01    4.2437937603e-01    4.3465391655e-01    
+4.4474762753e-01    4.5530368481e-01    4.6599965540e-01    4.7649651223e-01    4.8711794294e-01    
+4.9819979268e-01    5.0905474032e-01    5.1966607939e-01    5.3136410921e-01    5.4280142606e-01    
+5.5395887544e-01    5.6583085665e-01    5.7790141682e-01    5.8964427576e-01    6.0103776911e-01    
+6.1206043441e-01    6.2269103520e-01    6.3290858492e-01    0.0000000000e+00    1.5758526142e-02    
+3.1506252177e-02    4.7232385401e-02    6.2957506313e-02    7.8674678202e-02    9.4361287999e-02    
+1.1002016429e-01    1.2566185110e-01    1.4125198230e-01    1.5677966902e-01    1.7236184799e-01    
+1.8788237147e-01    2.0333014522e-01    2.1874784184e-01    2.3410663864e-01    2.4937028822e-01    
+2.6459217613e-01    2.7983980422e-01    2.9497960998e-01    3.1000006867e-01    3.2500724310e-01    
+3.3988206799e-01    3.5461286786e-01    3.6954067598e-01    3.8450903020e-01    3.9933535153e-01    
+4.1410441434e-01    4.2891282703e-01    4.4355859398e-01    4.5802853778e-01    4.7279914291e-01    
+4.8739166944e-01    5.0179204023e-01    5.1656907224e-01    5.3144772878e-01    5.4612709039e-01    
+5.6083865028e-01    5.7583139303e-01    5.9060271218e-01    6.0513544244e-01    6.2040114348e-01    
+6.3542151687e-01    6.5017753516e-01    6.6560945853e-01    6.8124592147e-01    6.9659129957e-01    
+7.1211879249e-01    7.2831937300e-01    7.4418824483e-01    7.5970098477e-01    7.7680236031e-01    
+7.9352259896e-01    8.0983369876e-01    8.2718937421e-01    8.4483535268e-01    8.6200226400e-01    
+8.7865843699e-01    8.9477249565e-01    9.1031339433e-01    9.2525045275e-01    0.0000000000e+00    
+2.0258770702e-02    4.0503657054e-02    6.0720784224e-02    8.0936609989e-02    1.0114221669e-01    
+1.2130853352e-01    1.4143919685e-01    1.6154776179e-01    1.8159004813e-01    2.0155205739e-01    
+2.2158412054e-01    2.4153692091e-01    2.6139619604e-01    2.8121680476e-01    3.0096169333e-01    
+3.2058426299e-01    3.4015314487e-01    3.5975511769e-01    3.7921847681e-01    3.9852840629e-01    
+4.1782125785e-01    4.3694396412e-01    4.5588151540e-01    4.7507233558e-01    4.9431528085e-01    
+5.1337563214e-01    5.3236237331e-01    5.5139970170e-01    5.7022793676e-01    5.8883013793e-01    
+6.0781886187e-01    6.2657865236e-01    6.4509141220e-01    6.6408839836e-01    6.8321603051e-01    
+7.0208745404e-01    7.2100027086e-01    7.4027456941e-01    7.5926421128e-01    7.7794712917e-01    
+7.9757233613e-01    8.1688215595e-01    8.3585212740e-01    8.5569102567e-01    8.7579287494e-01    
+8.9552051275e-01    9.1548227287e-01    9.3630933772e-01    9.5670996611e-01    9.7665276015e-01    
+9.9863786476e-01    1.0201329892e+00    1.0411021349e+00    1.0634141612e+00    1.0860993939e+00    
+1.1081687496e+00    1.1295815129e+00    1.1502973474e+00    1.1702763416e+00    1.1894790538e+00    
+0.0000000000e+00    2.4143462766e-02    4.8270378808e-02    7.2364212744e-02    9.6456495727e-02    
+1.2053660010e-01    1.4456988063e-01    1.6856067098e-01    1.9252512549e-01    2.1641059224e-01    
+2.4020038849e-01    2.6407367172e-01    2.8785249324e-01    3.1151985572e-01    3.3514113738e-01    
+3.5867217925e-01    3.8205744714e-01    4.0537873244e-01    4.2873945396e-01    4.5193498212e-01    
+4.7494765994e-01    4.9793998511e-01    5.2072953900e-01    5.4329843377e-01    5.6616916268e-01    
+5.8910201182e-01    6.1181725395e-01    6.3444477095e-01    6.5713257546e-01    6.7957119224e-01    
+7.0174043231e-01    7.2437031228e-01    7.4672735999e-01    7.6879000804e-01    7.9142973455e-01    
+8.1422515888e-01    8.3671524567e-01    8.5925466306e-01    8.8222487760e-01    9.0485585152e-01    
+9.2712128604e-01    9.5050969694e-01    9.7352224408e-01    9.9612977570e-01    1.0197728540e+00    
+1.0437293051e+00    1.0672397883e+00    1.0910292876e+00    1.1158500170e+00    1.1401625392e+00    
+1.1639294356e+00    1.1901302630e+00    1.2157471548e+00    1.2407372096e+00    1.2673276470e+00    
+1.2943628545e+00    1.3206640886e+00    1.3461828261e+00    1.3708709963e+00    1.3946810344e+00    
+1.4175659356e+00    0.0000000000e+00    2.7294567930e-02    5.4570429527e-02    8.1808891277e-02    
+1.0904559965e-01    1.3626853992e-01    1.6343854508e-01    1.9056051442e-01    2.1765271067e-01    
+2.4465561001e-01    2.7155035233e-01    2.9853947800e-01    3.2542181323e-01    3.5217814223e-01    
+3.7888237612e-01    4.0548459251e-01    4.3192200910e-01    4.5828709234e-01    4.8469675888e-01    
+5.1091967169e-01    5.3693586929e-01    5.6292905788e-01    5.8869301035e-01    6.1420750416e-01    
+6.4006322625e-01    6.6598917627e-01    6.9166911810e-01    7.1724988527e-01    7.4289880843e-01    
+7.6826602091e-01    7.9332869874e-01    8.1891213730e-01    8.4418713465e-01    8.6912930852e-01    
+8.9472387874e-01    9.2049446781e-01    9.4591986795e-01    9.7140103713e-01    9.9736922932e-01    
+1.0229539046e+00    1.0481253318e+00    1.0745663016e+00    1.1005823514e+00    1.1261405248e+00    
+1.1528694002e+00    1.1799525484e+00    1.2065315230e+00    1.2334259296e+00    1.2614861582e+00    
+1.2889718504e+00    1.3158407042e+00    1.3454611555e+00    1.3744214584e+00    1.4026731119e+00    
+1.4327340236e+00    1.4632977549e+00    1.4930317175e+00    1.5218810554e+00    1.5497914237e+00    
+1.5767090498e+00    1.6025807939e+00    0.0000000000e+00    2.9616341460e-02    5.9212385359e-02    
+8.8767848047e-02    1.1832140821e-01    1.4786002910e-01    1.7734121204e-01    2.0677027305e-01    
+2.3616702838e-01    2.6546689087e-01    2.9464939613e-01    3.2393431332e-01    3.5310335609e-01    
+3.8213567409e-01    4.1111146559e-01    4.3997656161e-01    4.6866283937e-01    4.9727063086e-01    
+5.2592679805e-01    5.5438032556e-01    5.8260955394e-01    6.1081381609e-01    6.3876934246e-01    
+6.6645419033e-01    6.9450929259e-01    7.2264059660e-01    7.5050496609e-01    7.7826172478e-01    
+8.0609243704e-01    8.3361747530e-01    8.6081207411e-01    8.8857173142e-01    9.1599671040e-01    
+9.4306055475e-01    9.7083229062e-01    9.9879501813e-01    1.0263831937e+00    1.0540318822e+00    
+1.0822090217e+00    1.1099700209e+00    1.1372826197e+00    1.1659727529e+00    1.1942018210e+00    
+1.2219340640e+00    1.2509365930e+00    1.2803235307e+00    1.3091634078e+00    1.3383455488e+00    
+1.3687926808e+00    1.3986164043e+00    1.4277708188e+00    1.4599108916e+00    1.4913346613e+00    
+1.5219895016e+00    1.5546075019e+00    1.5877710934e+00    1.6200343332e+00    1.6513376989e+00    
+1.6816222229e+00    1.7108295585e+00    1.7389020457e+00    0.0000000000e+00    3.1038237441e-02    
+6.2055202825e-02    9.3029638673e-02    1.2400208065e-01    1.5495886612e-01    1.8585545601e-01    
+2.1669742157e-01    2.4750553044e-01    2.7821209459e-01    3.0879566712e-01    3.3948656845e-01    
+3.7005603215e-01    4.0048220686e-01    4.3084914120e-01    4.6110006553e-01    4.9116358643e-01    
+5.2114485288e-01    5.5117681758e-01    5.8099641378e-01    6.1058094212e-01    6.4013930559e-01    
+6.6943699134e-01    6.9845100318e-01    7.2785304551e-01    7.5733494808e-01    7.8653710047e-01    
+8.1562647559e-01    8.4479335485e-01    8.7363988454e-01    9.0214011020e-01    9.3123252311e-01    
+9.5997418963e-01    9.8833738324e-01    1.0174424546e+00    1.0467476872e+00    1.0756603855e+00    
+1.1046365020e+00    1.1341664406e+00    1.1632602598e+00    1.1918841507e+00    1.2219517122e+00    
+1.2515360725e+00    1.2805997549e+00    1.3109947105e+00    1.3417925303e+00    1.3720170250e+00    
+1.4026002158e+00    1.4345091304e+00    1.4657647064e+00    1.4963188395e+00    1.5300019740e+00    
+1.5629344153e+00    1.5950610104e+00    1.6292450179e+00    1.6640008107e+00    1.6978130254e+00    
+1.7306192820e+00    1.7623577818e+00    1.7929673768e+00    1.8223876387e+00    0.0000000000e+00    
+3.1517052284e-02    6.3012504355e-02    9.4464770802e-02    1.2591501263e-01    1.5734935640e-01    
+1.8872257600e-01    2.2004032859e-01    2.5132370220e-01    2.8250396459e-01    3.1355933803e-01    
+3.4472369598e-01    3.7576474293e-01    4.0666029043e-01    4.3749568369e-01    4.6821327728e-01    
+4.9874057645e-01    5.2918435226e-01    5.5967960843e-01    5.8995921996e-01    6.2000013734e-01    
+6.5001448621e-01    6.7976413599e-01    7.0922573573e-01    7.3908135195e-01    7.6901806039e-01    
+7.9867070305e-01    8.2820882868e-01    8.5782565406e-01    8.8711718796e-01    9.1605707555e-01    
+9.4559828582e-01    9.7478333887e-01    1.0035840805e+00    1.0331381445e+00    1.0628954576e+00    
+1.0922541808e+00    1.1216773006e+00    1.1516627861e+00    1.1812054244e+00    1.2102708849e+00    
+1.2408022870e+00    1.2708430337e+00    1.3003550703e+00    1.3312189171e+00    1.3624918429e+00    
+1.3931825991e+00    1.4242375850e+00    1.4566387460e+00    1.4883764897e+00    1.5194019695e+00    
+1.5536047206e+00    1.5870451979e+00    1.6196673975e+00    1.6543787484e+00    1.6896707054e+00    
+1.7240045280e+00    1.7573168740e+00    1.7895449913e+00    1.8206267887e+00    1.8505009055e+00    
+0.0000000000e+00    3.1038237441e-02    6.2055202825e-02    9.3029638673e-02    1.2400208065e-01    
+1.5495886612e-01    1.8585545601e-01    2.1669742157e-01    2.4750553044e-01    2.7821209459e-01    
+3.0879566712e-01    3.3948656845e-01    3.7005603215e-01    4.0048220686e-01    4.3084914120e-01    
+4.6110006553e-01    4.9116358643e-01    5.2114485288e-01    5.5117681758e-01    5.8099641378e-01    
+6.1058094212e-01    6.4013930559e-01    6.6943699134e-01    6.9845100318e-01    7.2785304551e-01    
+7.5733494808e-01    7.8653710047e-01    8.1562647559e-01    8.4479335485e-01    8.7363988454e-01    
+9.0214011020e-01    9.3123252311e-01    9.5997418963e-01    9.8833738324e-01    1.0174424546e+00    
+1.0467476872e+00    1.0756603855e+00    1.1046365020e+00    1.1341664406e+00    1.1632602598e+00    
+1.1918841507e+00    1.2219517122e+00    1.2515360725e+00    1.2805997549e+00    1.3109947105e+00    
+1.3417925303e+00    1.3720170250e+00    1.4026002158e+00    1.4345091304e+00    1.4657647064e+00    
+1.4963188395e+00    1.5300019740e+00    1.5629344153e+00    1.5950610104e+00    1.6292450179e+00    
+1.6640008107e+00    1.6978130254e+00    1.7306192820e+00    1.7623577818e+00    1.7929673768e+00    
+1.8223876387e+00    0.0000000000e+00    2.9616341460e-02    5.9212385359e-02    8.8767848047e-02    
+1.1832140821e-01    1.4786002910e-01    1.7734121204e-01    2.0677027305e-01    2.3616702838e-01    
+2.6546689087e-01    2.9464939613e-01    3.2393431332e-01    3.5310335609e-01    3.8213567409e-01    
+4.1111146559e-01    4.3997656161e-01    4.6866283937e-01    4.9727063086e-01    5.2592679805e-01    
+5.5438032556e-01    5.8260955394e-01    6.1081381609e-01    6.3876934246e-01    6.6645419033e-01    
+6.9450929259e-01    7.2264059660e-01    7.5050496609e-01    7.7826172478e-01    8.0609243704e-01    
+8.3361747530e-01    8.6081207411e-01    8.8857173142e-01    9.1599671040e-01    9.4306055475e-01    
+9.7083229062e-01    9.9879501813e-01    1.0263831937e+00    1.0540318822e+00    1.0822090217e+00    
+1.1099700209e+00    1.1372826197e+00    1.1659727529e+00    1.1942018210e+00    1.2219340640e+00    
+1.2509365930e+00    1.2803235307e+00    1.3091634078e+00    1.3383455488e+00    1.3687926808e+00    
+1.3986164043e+00    1.4277708188e+00    1.4599108916e+00    1.4913346613e+00    1.5219895016e+00    
+1.5546075019e+00    1.5877710934e+00    1.6200343332e+00    1.6513376989e+00    1.6816222229e+00    
+1.7108295585e+00    1.7389020457e+00    0.0000000000e+00    2.7294567930e-02    5.4570429527e-02    
+8.1808891277e-02    1.0904559965e-01    1.3626853992e-01    1.6343854508e-01    1.9056051442e-01    
+2.1765271067e-01    2.4465561001e-01    2.7155035233e-01    2.9853947800e-01    3.2542181323e-01    
+3.5217814223e-01    3.7888237612e-01    4.0548459251e-01    4.3192200910e-01    4.5828709234e-01    
+4.8469675888e-01    5.1091967169e-01    5.3693586929e-01    5.6292905788e-01    5.8869301035e-01    
+6.1420750416e-01    6.4006322625e-01    6.6598917627e-01    6.9166911810e-01    7.1724988527e-01    
+7.4289880843e-01    7.6826602091e-01    7.9332869874e-01    8.1891213730e-01    8.4418713465e-01    
+8.6912930852e-01    8.9472387874e-01    9.2049446781e-01    9.4591986795e-01    9.7140103713e-01    
+9.9736922932e-01    1.0229539046e+00    1.0481253318e+00    1.0745663016e+00    1.1005823514e+00    
+1.1261405248e+00    1.1528694002e+00    1.1799525484e+00    1.2065315230e+00    1.2334259296e+00    
+1.2614861582e+00    1.2889718504e+00    1.3158407042e+00    1.3454611555e+00    1.3744214584e+00    
+1.4026731119e+00    1.4327340236e+00    1.4632977549e+00    1.4930317175e+00    1.5218810554e+00    
+1.5497914237e+00    1.5767090498e+00    1.6025807939e+00    0.0000000000e+00    2.4143462766e-02    
+4.8270378808e-02    7.2364212744e-02    9.6456495727e-02    1.2053660010e-01    1.4456988063e-01    
+1.6856067098e-01    1.9252512549e-01    2.1641059224e-01    2.4020038849e-01    2.6407367172e-01    
+2.8785249324e-01    3.1151985572e-01    3.3514113738e-01    3.5867217925e-01    3.8205744714e-01    
+4.0537873244e-01    4.2873945396e-01    4.5193498212e-01    4.7494765994e-01    4.9793998511e-01    
+5.2072953900e-01    5.4329843377e-01    5.6616916268e-01    5.8910201182e-01    6.1181725395e-01    
+6.3444477095e-01    6.5713257546e-01    6.7957119224e-01    7.0174043231e-01    7.2437031228e-01    
+7.4672735999e-01    7.6879000804e-01    7.9142973455e-01    8.1422515888e-01    8.3671524567e-01    
+8.5925466306e-01    8.8222487760e-01    9.0485585152e-01    9.2712128604e-01    9.5050969694e-01    
+9.7352224408e-01    9.9612977570e-01    1.0197728540e+00    1.0437293051e+00    1.0672397883e+00    
+1.0910292876e+00    1.1158500170e+00    1.1401625392e+00    1.1639294356e+00    1.1901302630e+00    
+1.2157471548e+00    1.2407372096e+00    1.2673276470e+00    1.2943628545e+00    1.3206640886e+00    
+1.3461828261e+00    1.3708709963e+00    1.3946810344e+00    1.4175659356e+00    0.0000000000e+00    
+2.0258770702e-02    4.0503657054e-02    6.0720784224e-02    8.0936609989e-02    1.0114221669e-01    
+1.2130853352e-01    1.4143919685e-01    1.6154776179e-01    1.8159004813e-01    2.0155205739e-01    
+2.2158412054e-01    2.4153692091e-01    2.6139619604e-01    2.8121680476e-01    3.0096169333e-01    
+3.2058426299e-01    3.4015314487e-01    3.5975511769e-01    3.7921847681e-01    3.9852840629e-01    
+4.1782125785e-01    4.3694396412e-01    4.5588151540e-01    4.7507233558e-01    4.9431528085e-01    
+5.1337563214e-01    5.3236237331e-01    5.5139970170e-01    5.7022793676e-01    5.8883013793e-01    
+6.0781886187e-01    6.2657865236e-01    6.4509141220e-01    6.6408839836e-01    6.8321603051e-01    
+7.0208745404e-01    7.2100027086e-01    7.4027456941e-01    7.5926421128e-01    7.7794712917e-01    
+7.9757233613e-01    8.1688215595e-01    8.3585212740e-01    8.5569102567e-01    8.7579287494e-01    
+8.9552051275e-01    9.1548227287e-01    9.3630933772e-01    9.5670996611e-01    9.7665276015e-01    
+9.9863786476e-01    1.0201329892e+00    1.0411021349e+00    1.0634141612e+00    1.0860993939e+00    
+1.1081687496e+00    1.1295815129e+00    1.1502973474e+00    1.1702763416e+00    1.1894790538e+00    
+0.0000000000e+00    1.5758526142e-02    3.1506252177e-02    4.7232385401e-02    6.2957506313e-02    
+7.8674678202e-02    9.4361287999e-02    1.1002016429e-01    1.2566185110e-01    1.4125198230e-01    
+1.5677966902e-01    1.7236184799e-01    1.8788237147e-01    2.0333014522e-01    2.1874784184e-01    
+2.3410663864e-01    2.4937028822e-01    2.6459217613e-01    2.7983980422e-01    2.9497960998e-01    
+3.1000006867e-01    3.2500724310e-01    3.3988206799e-01    3.5461286786e-01    3.6954067598e-01    
+3.8450903020e-01    3.9933535153e-01    4.1410441434e-01    4.2891282703e-01    4.4355859398e-01    
+4.5802853778e-01    4.7279914291e-01    4.8739166944e-01    5.0179204023e-01    5.1656907224e-01    
+5.3144772878e-01    5.4612709039e-01    5.6083865028e-01    5.7583139303e-01    5.9060271218e-01    
+6.0513544244e-01    6.2040114348e-01    6.3542151687e-01    6.5017753516e-01    6.6560945853e-01    
+6.8124592147e-01    6.9659129957e-01    7.1211879249e-01    7.2831937300e-01    7.4418824483e-01    
+7.5970098477e-01    7.7680236031e-01    7.9352259896e-01    8.0983369876e-01    8.2718937421e-01    
+8.4483535268e-01    8.6200226400e-01    8.7865843699e-01    8.9477249565e-01    9.1031339433e-01    
+9.2525045275e-01    0.0000000000e+00    1.0779466739e-02    2.1551545771e-02    3.2308854449e-02    
+4.3065470665e-02    5.3816649430e-02    6.4546922491e-02    7.5258224721e-02    8.5957768646e-02    
+9.6622046460e-02    1.0724360974e-01    1.1790244791e-01    1.2851911123e-01    1.3908601082e-01    
+1.4963233644e-01    1.6013837220e-01    1.7057932344e-01    1.8099170801e-01    1.9142169989e-01    
+2.0177793697e-01    2.1205253583e-01    2.2231804774e-01    2.3249302722e-01    2.4256948778e-01    
+2.5278070992e-01    2.6301966724e-01    2.7316146833e-01    2.8326410229e-01    2.9339365315e-01    
+3.0341194777e-01    3.1330997227e-01    3.2341366125e-01    3.3339553727e-01    3.4324597104e-01    
+3.5335405625e-01    3.6353165673e-01    3.7357293146e-01    3.8363623110e-01    3.9389187115e-01    
+4.0399604854e-01    4.1393702151e-01    4.2437937603e-01    4.3465391655e-01    4.4474762753e-01    
+4.5530368481e-01    4.6599965540e-01    4.7649651223e-01    4.8711794294e-01    4.9819979268e-01    
+5.0905474032e-01    5.1966607939e-01    5.3136410921e-01    5.4280142606e-01    5.5395887544e-01    
+5.6583085665e-01    5.7790141682e-01    5.8964427576e-01    6.0103776911e-01    6.1206043441e-01    
+6.2269103520e-01    6.3290858492e-01    0.0000000000e+00    5.4728786945e-03    1.0942006551e-02    
+1.6403635304e-02    2.1864912483e-02    2.7323428997e-02    3.2771331407e-02    3.8209602073e-02    
+4.3641902891e-02    4.9056298635e-02    5.4449007640e-02    5.9860641605e-02    6.5250862842e-02    
+7.0615818363e-02    7.5970328209e-02    8.1304382359e-02    8.6605392228e-02    9.1891898420e-02    
+9.7187344081e-02    1.0244534344e-01    1.0766189400e-01    1.1287383099e-01    1.1803980346e-01    
+1.2315575656e-01    1.2834012991e-01    1.3353858478e-01    1.3868771214e-01    1.4381695383e-01    
+1.4895986158e-01    1.5404628307e-01    1.5907164181e-01    1.6420141914e-01    1.6926935042e-01    
+1.7427054671e-01    1.7940255607e-01    1.8456985926e-01    1.8966794804e-01    1.9477721917e-01    
+1.9998414409e-01    2.0511416939e-01    2.1016133364e-01    2.1546305598e-01    2.2067957691e-01    
+2.2580428828e-01    2.3116373902e-01    2.3659422561e-01    2.4192361950e-01    2.4731626119e-01    
+2.5294266376e-01    2.5845386511e-01    2.6384138315e-01    2.6978062855e-01    2.7558750649e-01    
+2.8125229201e-01    2.8727985483e-01    2.9340823884e-01    2.9937024458e-01    3.0515487275e-01    
+3.1075122659e-01    3.1614852406e-01    3.2133611001e-01    0.0000000000e+00    1.9297991240e-18    
+3.8582756601e-18    5.7841079268e-18    7.7098162251e-18    9.6345510812e-18    1.1555543284e-17    
+1.3473139224e-17    1.5388630129e-17    1.7297807501e-17    1.9199337883e-17    2.1107541420e-17    
+2.3008194587e-17    2.4899938776e-17    2.6787999701e-17    2.8668847715e-17    3.0538043941e-17    
+3.2402126006e-17    3.4269360229e-17    3.6123390463e-17    3.7962805378e-17    3.9800593494e-17    
+4.1622174001e-17    4.3426117113e-17    4.5254185980e-17    4.7087220148e-17    4.8902860878e-17    
+5.0711489694e-17    5.2524937322e-17    5.4318467248e-17    5.6090465759e-17    5.7899283449e-17    
+5.9686293519e-17    6.1449772077e-17    6.3259376805e-17    6.5081426539e-17    6.6879070489e-17    
+6.8680657460e-17    7.0516678263e-17    7.2325583393e-17    7.4105270774e-17    7.5974718223e-17    
+7.7814122692e-17    7.9621154067e-17    8.1510957208e-17    8.3425808395e-17    8.5305013147e-17    
+8.7206519795e-17    8.9190453179e-17    9.1133765306e-17    9.3033465295e-17    9.5127710609e-17    
+9.7175281659e-17    9.9172749304e-17    1.0129813635e-16    1.0345907408e-16    1.0556134495e-16    
+1.0760107048e-16    1.0957440834e-16    1.1147755667e-16    1.1330675833e-16    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+-7.5824230472e-20   8.5679639800e-20    4.9025789958e-22    3.8033886010e-21    2.7969320978e-20    
+2.7081070927e-20    2.2266964224e-20    1.5282806493e-20    -1.0353893237e-21   1.4838689288e-20    
+3.3461534045e-21    -1.9133500756e-20   1.0436217787e-19    1.0600186441e-19    -1.4673610000e-20   
+-1.5834171680e-20   4.7278597191e-20    -1.3019386862e-20   -9.6666754228e-20   -1.4607954322e-20   
+1.1049028957e-21    2.4038503257e-20    6.2553509205e-20    2.7925022543e-20    2.6085178500e-20    
+5.3819120921e-20    5.1880417119e-20    6.8305840766e-20    1.0491732593e-19    1.2307727384e-19    
+1.4814694739e-20    -1.7031656067e-19   -1.2835802951e-19   -8.5258749673e-20   -1.2519185271e-19   
+1.6090263926e-20    4.0553421614e-20    -3.2157491225e-21   9.2960867495e-20    4.0555305300e-20    
+-5.7830695673e-20   -4.1447122998e-20   2.8981473350e-20    1.7664854096e-20    -7.0777923650e-20   
+-1.1031717495e-19   -5.3162374364e-20   4.6562849672e-20    1.4701761588e-19    1.7757727652e-19    
+9.1204138930e-20    1.4955601978e-19    1.4226409384e-19    -5.4481211945e-20   -5.9627709836e-20   
+-1.0888544471e-19   -5.9404022298e-20   9.6017790892e-20    1.1378113414e-19    1.2531558304e-19    
+1.2193461827e-19    -1.1108704532e-19   2.4786307710e-20    -9.2315856717e-21   7.3988115101e-21    
+2.1925219366e-20    2.5020209254e-20    1.5155756055e-20    1.3062771798e-20    2.5735161121e-20    
+-2.6448246901e-21   -5.2098409988e-21   4.5591159337e-21    1.0107845008e-20    1.0460017096e-20    
+-2.7711639911e-20   -6.2713650263e-20   -6.6481858108e-21   6.6164030906e-21    -6.2822059861e-20   
+-4.9304650853e-20   -2.8982727242e-20   4.4634027052e-20    7.0956735433e-20    2.9563138105e-21    
+8.4898878693e-21    2.0516181779e-20    -3.3982554762e-21   4.6259120688e-20    7.6896380418e-20    
+7.0842814530e-20    1.9863796066e-21    -1.8665863141e-19   -1.5646893593e-19   -7.4145359064e-20   
+-9.1894220681e-20   1.5463873629e-20    5.0629830950e-20    4.6193585502e-20    9.9109634083e-20    
+2.9730262862e-20    9.2381385339e-21    3.9229974589e-20    8.1751573728e-21    2.2986569450e-20    
+-2.1627681353e-20   -9.3106694746e-20   -3.7606375824e-20   1.3557326050e-20    3.6781583719e-20    
+1.1332300010e-19    6.6194709501e-20    1.6086382864e-20    2.5013252571e-20    -5.0178321347e-20   
+-4.3100394937e-20   -6.7473262146e-20   -2.0763216984e-20   5.8002512184e-20    2.9520943316e-20    
+4.0502973204e-20    3.9828270294e-20    -1.0581419245e-19   -1.4043071970e-20   -3.9981012326e-20   
+-1.7870319518e-21   7.4334276234e-21    2.6429207059e-20    1.8592931860e-20    -1.3025958748e-21   
+1.7761353791e-20    -2.3557436643e-20   -5.4006146982e-21   3.5856043420e-20    -4.1949060286e-20   
+-4.7386329282e-20   -2.7481089979e-20   -1.2739932000e-19   -9.5373177741e-20   2.4892697497e-20    
+-1.8951698229e-20   -9.1654352773e-20   -5.1338887393e-20   2.3336966610e-20    3.7628465175e-20    
+6.3686514469e-21    1.8695976428e-20    7.9082788761e-21    -2.8186853229e-20   -1.3603197978e-20   
+-2.2779655014e-20   -6.4161454138e-21   -6.0276041715e-21   -7.5058461864e-20   -5.1496780643e-20   
+-1.6691459462e-20   -2.3615959250e-21   2.1886304860e-20    2.3005912004e-20    5.2778528969e-20    
+3.4792110293e-20    -1.7405425121e-20   1.6406038903e-20    3.8363209095e-20    -3.5793588777e-20   
+-1.7224725612e-20   4.9866379051e-21    -2.2772400448e-20   1.3417988866e-21    -3.0536240378e-20   
+-4.4190135880e-20   3.3505333594e-20    -7.9521647915e-21   -1.1379600448e-19   -9.6405138961e-20   
+6.6854520087e-21    4.4978381998e-20    -4.0642258751e-20   -2.3018190984e-20   8.6437270487e-21    
+-5.3400723849e-20   -4.1113999387e-21   6.3500981510e-20    -1.3150708384e-19   5.1221414296e-20    
+-2.7627070500e-20   -1.5185478527e-20   -2.6067780139e-21   2.6292443617e-20    3.1149897423e-20    
+3.8302825288e-21    -1.2131827206e-21   4.4225342403e-22    8.4347035624e-21    3.2532608937e-20    
+-7.4573635930e-21   -3.4851640464e-20   -1.6645565595e-20   -7.4798303948e-20   -7.3096240746e-20   
+-9.9082666488e-21   -1.1453061636e-20   -5.6059893813e-20   -5.1190444367e-20   -2.0138495053e-20   
+1.9484797467e-21    2.1441638410e-20    3.2403483428e-20    2.0974285063e-20    9.1935205739e-21    
+-2.4304811228e-21   -2.8274462114e-20   1.3134984322e-20    -5.6308517365e-21   -2.0309398418e-20   
+2.1243551397e-20    3.2413120546e-20    2.9943659108e-20    2.4153047496e-20    2.3462638717e-20    
+-1.1910760860e-20   -3.7751977994e-20   -8.0750265597e-21   -4.0594455831e-20   -7.0591179940e-20   
+-3.9501515695e-20   -2.1472905813e-20   6.9777657231e-21    6.9356036308e-21    5.9054245793e-21    
+6.3877825699e-21    2.1626101227e-20    3.8548795931e-20    3.8684356392e-21    8.8737438512e-21    
+-2.6945802968e-20   9.2337628659e-22    8.7513714130e-20    -1.6859059277e-20   -9.7421374537e-20   
+-3.7174279916e-20   -1.3025972940e-20   4.7922692709e-20    1.2600869460e-19    -1.0932323814e-19   
+7.6922398783e-20    1.3066216408e-20    -8.0138130520e-22   -6.4694883273e-21   1.1723777739e-20    
+3.1969028988e-20    8.5940625338e-21    -1.1897318093e-20   4.5605005692e-21    2.4795737966e-20    
+1.3900883516e-20    -4.7923802137e-20   -7.0847055731e-20   -2.8475155741e-20   2.0667367463e-20    
+1.5608619636e-20    -4.3073213237e-20   -3.0271703635e-20   2.3153419165e-21    -2.7619762625e-20   
+1.7969743113e-20    6.1331384526e-20    2.0901562400e-20    -4.3874864098e-21   -1.7188317696e-20   
+2.2863825955e-20    6.1596231076e-20    5.2769468253e-20    6.4676429448e-20    1.8814602792e-20    
+-6.4994530836e-20   -4.4760599572e-20   3.3331150394e-20    3.6894102362e-20    4.2694469003e-20    
+6.1374377553e-20    -1.0497362724e-20   -2.2303265003e-20   4.1120159280e-20    -2.7315854642e-20   
+-5.2839204069e-20   1.5584512378e-20    4.0968705477e-20    6.1892291907e-20    -3.0301522242e-20   
+-4.0661362484e-20   1.8310801295e-20    -5.3904881797e-21   3.3969628266e-20    7.3300309549e-20    
+6.9769695022e-20    6.6738688010e-20    -2.8335980952e-21   -5.9243579909e-21   -1.8456275273e-20   
+-8.1876906672e-20   -2.4378462963e-20   1.1289498206e-20    4.7463078455e-20    8.7081527362e-20    
+8.0213859043e-21    3.7800010443e-20    -1.2664618272e-20   -1.2272505925e-20   -4.3319432727e-21   
+8.9570902272e-22    1.3968605756e-20    -1.4534604276e-20   -3.1629381023e-20   -2.4520534469e-20   
+1.4234710609e-20    -3.3444967878e-21   -5.7989619516e-20   -5.6274563308e-20   -3.2101963944e-20   
+3.9997365985e-20    3.0374593496e-20    -3.6252330322e-21   -1.8817710072e-21   1.0392030295e-20    
+4.4563639757e-21    2.3207272073e-20    6.6179920158e-20    6.6477015736e-21    -3.1738128059e-20   
+-4.8373521075e-21   2.8123755698e-20    9.8478260079e-21    1.0479461982e-20    3.1487761160e-20    
+3.4854112204e-20    -2.5454345305e-20   -5.2544424613e-20   -6.0997644860e-21   2.4527645765e-20    
+4.4696153167e-20    1.0026734480e-20    -3.4216598965e-20   -3.0848733072e-20   -2.1169297910e-22   
+-3.2863705893e-20   -1.9858231181e-20   1.5018520724e-20    3.5780239356e-20    5.1551119948e-20    
+-5.5334084275e-20   -7.5671036161e-20   -3.4911892574e-20   1.3678814647e-21    5.5726705754e-20    
+5.0146801630e-20    3.8129541229e-21    2.7878142353e-20    2.3295269398e-20    -3.4082138386e-20   
+-5.5692258116e-20   -3.5816022569e-20   1.1247664064e-20    1.4733551428e-20    3.5603287405e-20    
+4.1611632797e-20    -3.6102423714e-20   4.5125102226e-20    -3.1647639624e-20   -2.8978540606e-20   
+-1.2188171654e-20   -5.5047644556e-21   -3.3131305975e-21   -2.1354513768e-20   -1.5237147162e-20   
+-1.9942401966e-20   -2.7244486766e-21   4.5798938959e-21    -1.5144198207e-20   -3.3140676069e-20   
+-3.1218923345e-20   5.6407603616e-21    -2.0396400880e-20   -2.2749085757e-20   2.2624267919e-21    
+-5.4108899360e-21   -1.8429572915e-21   -1.9404417838e-20   -2.3518288809e-20   -1.5084358539e-20   
+1.0746216470e-22    2.5466416166e-20    2.4862652559e-20    -1.6502492104e-20   -2.2223205906e-20   
+-1.0444792848e-20   -6.6833601445e-21   -2.6917740900e-20   -2.7745805580e-20   -3.3115616248e-21   
+-3.8163278365e-21   1.3317378593e-20    -2.9343248266e-20   -5.4829964052e-20   -3.2094467985e-20   
+-2.0118934256e-20   -2.4524001284e-20   -2.7511074197e-20   -1.6114337024e-20   4.7789785423e-21    
+-1.3348394423e-20   -4.3758588341e-20   -5.4850897093e-20   -4.5180698708e-20   3.0939907553e-20    
+5.6686803202e-20    1.1000437961e-20    -1.0812283233e-20   -3.3717524795e-20   -3.2823232208e-20   
+-5.5542858156e-21   -2.8076776603e-20   -1.5323216322e-20   2.3311078876e-20    5.4291017924e-20    
+4.9566880303e-20    9.9034623566e-21    -7.2688982819e-20   3.7703774610e-20    -1.1208297787e-20   
+8.4436917393e-21    -1.3718744787e-20   -1.5426902029e-20   -6.9599356365e-22   -8.1558835126e-21   
+-3.4740380845e-21   -4.2994411057e-22   2.0221183509e-21    8.4789280213e-21    5.1380149991e-21    
+-2.1294926672e-20   -2.2444012920e-20   -6.0754982196e-21   -1.4274320442e-20   -3.5986198589e-20   
+-2.8774632546e-20   -2.9971422742e-21   5.3450914616e-21    -1.5103665342e-20   -3.6904657766e-20   
+-9.3376976403e-21   1.9964610600e-20    9.4834412586e-21    7.9975672973e-21    9.9364955908e-21    
+4.2757579525e-21    1.6031480037e-21    -1.1844330261e-20   -2.1356690611e-20   -6.2437739785e-22   
+1.9569258841e-20    1.3436005574e-20    7.5677002419e-21    -6.8198497749e-21   -1.6712740377e-22   
+4.8267509342e-21    9.9453986093e-21    1.3179728177e-20    -8.7384253704e-21   -7.2942090578e-21   
+-5.5696426425e-22   -2.8409529991e-20   -2.0852386283e-20   -2.6033750654e-20   -3.1514341460e-20   
+5.5922096007e-21    3.1214532138e-20    1.6729093662e-20    -1.9438531273e-20   -2.9478403243e-20   
+-4.0302482577e-20   -1.5291429657e-20   1.0249222152e-21    1.7734267034e-20    3.8568034678e-20    
+4.1509262088e-20    5.2112857478e-20    4.8379714329e-20    -8.4987916278e-20   5.0113108710e-21    
+2.8505459589e-21    5.9409360373e-21    -5.1824575979e-21   -7.0304174081e-22   5.1149413562e-21    
+1.1751439853e-20    1.1109446012e-20    1.2232277387e-20    5.5852022202e-21    2.5118050446e-21    
+8.0707008801e-21    -1.3600536234e-21   -6.1761687853e-21   6.1128002929e-21    1.6559701709e-20    
+1.0196627529e-20    -7.7243602569e-21   3.5834539877e-21    7.0664276281e-21    -6.6362018149e-21   
+-5.0409229123e-21   -3.6859915976e-21   3.6827120340e-21    6.0096998013e-21    -3.7096545320e-21   
+-4.0642602751e-22   6.7990488549e-21    1.0599090846e-20    7.5814195692e-21    -7.2225839550e-21   
+-5.1621763902e-21   4.6911949766e-22    7.9161157744e-21    8.0846086175e-21    2.0881987604e-21    
+1.6967244036e-20    1.0913257216e-20    3.2642988043e-21    1.1239790875e-20    1.7595682677e-21    
+-4.4992427930e-21   1.8126664210e-22    -7.6028477590e-21   -1.3758647582e-20   -1.7455898543e-20   
+-1.6104184806e-20   1.4406488163e-20    3.3503494477e-20    1.7132932728e-20    -3.8898523442e-21   
+-7.8955895081e-21   -1.3798304055e-20   -8.6393698840e-21   1.5725533678e-21    1.3652336181e-20    
+1.8626312527e-20    1.5379966710e-21    1.8978534452e-20    4.2278034043e-20    -8.1029032943e-20   
+-2.3842205177e-20   2.4157856061e-20    -5.3848798303e-21   -2.9851316964e-21   9.8054432298e-21    
+3.5109592920e-21    7.8886435023e-21    9.4098720510e-21    5.0593923469e-21    3.5775613519e-21    
+4.0047289415e-21    3.3905795902e-21    3.0154778231e-21    5.0707339300e-22    1.4975777437e-21    
+-1.5716573033e-21   2.6069547307e-21    5.2589320025e-21    -5.4281708610e-22   -2.1948020779e-21   
+-1.0781071111e-21   -7.5412082309e-22   -1.8486554781e-22   5.8868985694e-22    -3.5681083698e-22   
+1.2177961412e-21    4.9786957821e-21    3.9255561574e-21    -3.1044050775e-22   -2.6305737097e-21   
+-6.4648922359e-21   -3.8426384937e-21   -1.3569148977e-21   -1.0835241301e-21   2.6682444293e-22    
+-9.0724552938e-22   4.6903966890e-21    3.1634247700e-21    -5.2703658026e-21   -3.8444061090e-21   
+2.4990587343e-22    2.0150136518e-21    1.3030632435e-21    2.3633740301e-21    1.4833073005e-21    
+2.3441097091e-21    3.8005169852e-22    -3.0770012013e-21   -3.5662867505e-21   -2.4197949569e-21   
+2.6440027381e-22    -5.0748591450e-24   -2.1694974196e-21   -7.2365439306e-22   -1.9244935776e-21   
+-3.1998240565e-21   1.3815491856e-21    1.4563823394e-21    4.2853876896e-21    7.1520182585e-21    
+2.8867128283e-20    -3.7987784108e-20   3.3590000234e-21    -3.0220077242e-21   4.5795366776e-21    
+6.8163623798e-21    -7.0065562227e-21   -1.3822927562e-20   -1.0722380798e-20   -7.9465586114e-21   
+-9.2192458591e-21   -7.8710702646e-21   -1.1041913588e-20   -7.7187043146e-21   6.8434485310e-21    
+5.5541176524e-21    -1.6411212091e-23   -7.5780377508e-21   -7.3389087431e-21   -3.6799340927e-21   
+-9.3196646267e-21   -1.2235824929e-20   -7.0414599479e-21   -9.5475093052e-22   -7.1231113148e-21   
+-1.1464803394e-20   2.6521421495e-21    1.2691444009e-20    1.2207490439e-21    -3.8649955532e-21   
+-1.1507179729e-20   -4.7734151951e-22   1.8318008119e-20    1.4890998388e-21    -1.0834316675e-20   
+-1.9489638187e-21   4.8843514661e-21    5.0465560108e-21    3.1443384121e-21    6.1927212878e-21    
+1.6199552664e-20    1.0717876774e-20    6.6948499743e-21    3.6737344707e-21    -7.1576726219e-21   
+-4.4849083479e-21   -5.9364872773e-21   8.5178847236e-21    1.9014067998e-20    -2.0165235618e-21   
+-1.1796677727e-20   -1.6690185314e-21   9.9614983793e-21    1.5322126872e-20    1.1234765886e-20    
+-2.7942867284e-21   1.1860833218e-20    2.7734536938e-20    2.1850984336e-20    1.9938554355e-20    
+1.7788782342e-20    1.0653523766e-19    -4.5560514652e-20   -2.5797727594e-20   -1.0470179588e-20   
+9.5392788297e-21    -8.2313312252e-21   -1.6113990866e-20   8.7634448107e-22    3.9622450003e-21    
+-8.4171851914e-21   -2.4267776204e-20   -2.4189076151e-20   -1.7931768053e-20   -2.4768809681e-20   
+-1.1030982868e-20   1.8384187541e-20    3.5251366261e-20    4.0970992002e-21    -1.8633331207e-20   
+4.2039242326e-21    -1.1997885676e-21   -1.3343403733e-20   3.6945993980e-21    8.4567280239e-21    
+-3.6751531104e-21   -7.1313862594e-21   -1.1005458491e-20   -2.0240598304e-21   3.5398164433e-21    
+9.7071251299e-21    2.2310224453e-20    4.0653571770e-20    3.8594760042e-20    -1.7658721567e-21   
+-2.3723228734e-21   1.4947872745e-20    -8.4664594892e-21   -8.2535335607e-21   -8.0484490708e-21   
+-2.4868285508e-20   2.9097871238e-20    2.7076055747e-20    -4.1820144034e-21   1.9696096663e-21    
+-1.7780708198e-22   9.3040506369e-21    -1.8683342719e-20   -1.0311543947e-20   -8.4846788618e-21   
+-3.8564645532e-20   -1.5144934523e-20   3.1317948679e-20    5.4620731991e-20    3.6458306334e-20    
+-4.3900042317e-21   5.1137138229e-21    7.1545425380e-20    8.0404179883e-20    2.2338256119e-20    
+-1.8342129278e-20   -2.3630663863e-20   1.0154049349e-19    -1.8529672176e-20   -7.6325804322e-21   
+7.2720966997e-21    1.5662585179e-20    -5.8810196308e-21   -7.2706348466e-21   1.0959806263e-20    
+8.6238139632e-21    -5.2893645980e-21   -2.2704517446e-20   -1.8581128681e-20   7.1137925229e-21    
+-4.7243684304e-21   -1.4384212034e-20   1.2531924241e-20    3.0968164104e-20    3.6805831653e-20    
+8.6961881425e-21    -2.4136222231e-21   2.0734553792e-20    4.2187333324e-20    3.2905809312e-20    
+2.2915894497e-22    -4.5792133396e-21   -8.4771753968e-22   -7.8968796343e-21   -3.8101865139e-22   
+2.6156325781e-20    9.9693199018e-21    1.2477610521e-20    4.7482150998e-20    3.6621138431e-20    
+2.0758841533e-20    3.1205626128e-20    1.5313878461e-20    -7.5887859171e-21   1.0521946240e-20    
+-9.1794267043e-21   -3.3066172989e-20   2.0058365806e-20    1.2936018988e-22    -2.4467672334e-20   
+-1.1674172761e-20   -7.2668290705e-21   1.1273859433e-20    3.0749386524e-20    2.7000877138e-20    
+-5.7604190827e-20   -1.0141612002e-19   -5.4059697360e-20   -1.9767334005e-20   2.5210383256e-20    
+3.4374530459e-20    -2.0407034215e-20   -4.6813612733e-21   7.6763901861e-20    6.6983831895e-20    
+-1.4562903335e-20   -5.1828614182e-20   -6.3157591520e-20   6.9371079522e-20    -9.2097841346e-22   
+6.8415269687e-21    1.4825542055e-20    1.4412594090e-20    5.5041972897e-21    -1.1151422009e-20   
+6.7975266491e-21    7.6308850620e-21    1.2190029903e-20    -1.3463652152e-20   5.5449110489e-21    
+7.1988278280e-20    5.8148968531e-20    3.4196089758e-20    2.3200572892e-20    1.2527684307e-20    
+3.0405909248e-20    1.8541214972e-20    -8.6383354966e-21   6.6908893586e-21    3.9252860718e-20    
+4.3297370736e-20    7.7383113901e-21    -5.8570552510e-22   1.9276042453e-20    2.2069138418e-21    
+-2.6177918434e-20   -1.9452510698e-20   -1.4684244656e-20   -1.2701721121e-20   4.5862208158e-20    
+6.5865936613e-20    1.5417726746e-20    7.6767140985e-21    -9.7723903871e-21   4.7423831105e-21    
+2.2960388141e-20    6.3267974645e-21    -1.1423148053e-20   1.9568625452e-20    1.5583591671e-20    
+-2.7198502384e-20   -1.2517207750e-20   2.9537345708e-20    1.1849393648e-20    4.4418410919e-20    
+8.5935520246e-20    -1.4886000118e-20   -5.3115466323e-20   -7.3366346420e-20   -1.2719249429e-19   
+-1.1779440620e-19   -1.4588813854e-20   3.0287396339e-20    1.6937598441e-20    3.6460204845e-20    
+5.8364290404e-21    -1.8985671655e-20   -4.3010997096e-20   -7.2832566165e-20   1.3737836984e-19    
+-4.7569544165e-20   2.1817786125e-20    1.7899745547e-20    8.4256843702e-21    -2.3257956929e-20   
+-4.8123113495e-20   4.1529725830e-21    1.6655593667e-20    2.4614897869e-20    5.6436350296e-21    
+1.4914672535e-20    5.8347308636e-20    4.5434158193e-20    2.5651009653e-20    -1.2774369787e-21   
+1.4731752006e-20    -2.2770510250e-20   -5.4787261638e-20   -1.4348027420e-20   -7.5070931550e-21   
+1.5297953621e-20    4.1090374628e-20    3.0172345083e-20    7.9454836725e-21    -1.0068338752e-20   
+-4.6767416218e-20   -5.7355379574e-20   -3.2937758512e-21   -3.3477767321e-21   3.3811287147e-21    
+9.5203158328e-20    8.4677252097e-20    -4.0926321300e-20   -6.1844899911e-20   -4.3615616022e-20   
+-1.8301036162e-20   -5.9789197426e-21   8.8117521765e-21    1.6112046343e-20    3.9300489303e-20    
+5.9692497833e-20    -2.6658021629e-20   -4.8405142511e-20   4.2723468736e-20    3.4654895860e-20    
+2.7632301101e-20    6.2931617056e-20    -5.9589533532e-21   4.6971212290e-22    -2.4289416604e-20   
+-1.3906794010e-19   -1.0392954455e-19   2.1199737271e-20    3.4370950632e-20    3.2376216827e-20    
+9.9508797264e-20    8.3171695295e-20    1.3772918806e-20    -4.8995715659e-20   -9.4103677488e-20   
+1.4004660338e-19    -5.3963240814e-20   1.9737128742e-20    6.3237477903e-21    1.3083123727e-22    
+-3.5065474091e-20   -5.6353216125e-20   -5.2981559199e-21   7.1882751029e-21    -5.7816729802e-21   
+-2.5016289727e-20   -1.3028981737e-20   -2.8811515155e-21   1.8680660341e-20    3.0892225641e-20    
+1.7048384876e-20    6.0244169158e-20    4.2591308900e-20    -3.3693821556e-20   -3.5294281639e-20   
+-2.2511671408e-20   2.8889308181e-20    5.2793365898e-20    8.0405338510e-21    -2.0489008382e-20   
+-5.7672209547e-20   -4.0686005882e-20   -1.5846974068e-21   5.2609162944e-20    2.9494170581e-20    
+8.6221561721e-21    8.1136744627e-20    5.3455308047e-20    -2.4089798567e-20   -1.0829466930e-20   
+-2.8655800090e-20   -3.6470586367e-20   -1.9176379137e-20   1.8699828976e-20    4.2306485216e-20    
+-7.4993023385e-21   4.3553896986e-21    -1.5426826842e-20   -5.0602987505e-20   3.5690018036e-20    
+9.1142013524e-20    8.3218880855e-20    8.4013417075e-20    6.6317782812e-20    -3.6527316217e-21   
+1.1768456376e-20    -9.6228048116e-21   1.8913264227e-20    4.5081059063e-20    -5.0050481272e-20   
+-3.2664955790e-20   1.1104092079e-19    1.0970429804e-19    -6.7795996365e-20   -6.7154894422e-20   
+-2.0731905395e-20   3.1961979597e-20    -5.1461156315e-20   9.5481723824e-21    2.0439207873e-21    
+-9.5246198473e-21   -2.2481528143e-20   -2.0706728450e-20   7.8105379847e-21    1.2865649204e-20    
+-6.0879123506e-21   -5.7864715824e-20   -5.3427771978e-20   -5.4406767330e-20   -5.2100259285e-20   
+7.0656332705e-21    2.8109167626e-20    7.2958685256e-20    9.3330005461e-20    5.4758824911e-20    
+-1.3533835280e-20   -5.0300554443e-20   3.3375241648e-20    6.6797776048e-20    7.0713737143e-21    
+-3.2461922444e-20   -3.2090434134e-20   1.9532132562e-21    1.9832609335e-20    2.2799243958e-20    
+1.6600432774e-20    1.2112254294e-22    8.1479063429e-20    7.9220033755e-20    1.8243494889e-20    
+1.0150317400e-20    -2.4470104985e-20   2.3449838504e-21    -4.3831250906e-20   8.8918881062e-21    
+3.3501993452e-20    -1.3061695326e-21   3.5428593571e-20    1.8834663782e-20    8.1367435861e-21    
+6.9297134326e-20    1.0229647946e-19    2.1596882258e-20    2.5397661537e-20    1.4435273516e-20    
+-1.0654370338e-19   -3.3870462887e-20   9.7747447869e-20    7.2166044185e-20    3.2156568491e-20    
+-1.3945748026e-20   1.2517126259e-20    3.3016780702e-20    1.2969637218e-20    1.2094988235e-20    
+-4.9966695465e-20   -1.0313815814e-19   5.1195061545e-20    -5.1818088309e-20   1.6758451459e-20    
+1.2339335517e-20    2.7530847516e-21    -1.8597480257e-20   -1.1491320498e-20   2.5562898536e-20    
+9.5429769448e-21    -1.2348960879e-20   -1.2498026875e-20   -1.3412824518e-20   -1.0120708982e-20   
+-3.2989265193e-20   -3.4711257795e-20   -2.4051013800e-20   1.0804185813e-20    -7.7250454053e-21   
+3.9331144821e-21    4.0903664739e-21    -1.2741383799e-20   1.9193403479e-20    1.0754650086e-20    
+1.2835507439e-20    -4.2040796998e-20   -4.3876185794e-20   -8.4707195558e-22   2.9612035648e-20    
+1.4199943944e-20    1.6063249512e-21    1.3041836008e-20    1.1647193026e-19    9.1699266950e-20    
+-1.2487939460e-20   -1.8249405532e-20   -1.6525055894e-20   3.3854944541e-20    -6.5013182092e-20   
+-2.9158466476e-20   4.5127049188e-20    6.3361887593e-20    7.1264785353e-20    2.1488238690e-20    
+3.7484948537e-20    3.1694773270e-20    5.8579694040e-20    2.5683819845e-20    -5.5314385490e-20   
+-1.6125212328e-19   -1.9899503849e-19   -8.7356494506e-20   -2.4967743117e-20   -1.9159345321e-20   
+5.0274691978e-20    6.3251956518e-20    1.1583280077e-19    3.1561230727e-20    -3.9944440419e-20   
+9.4615176608e-20    -9.7863478770e-21   -1.4281367677e-19   1.0905444579e-19    -4.9801846703e-20   
+1.8680091882e-20    1.1097305912e-20    1.6794507184e-20    -2.0969513862e-20   -2.4821890477e-20   
+3.1199277055e-20    -2.9770049361e-21   -4.4909585893e-20   1.6058797007e-20    3.7656673153e-20    
+7.7993913584e-20    7.7936549621e-20    -7.0755416209e-21   -1.9065344028e-20   -1.0137273479e-20   
+-6.6943380440e-20   -5.5671093172e-20   -3.4099143581e-21   3.4494028000e-20    -7.9369019815e-22   
+-4.6927099506e-20   -7.7266096745e-22   -6.4009220723e-20   -7.6516675560e-20   2.1830457633e-21    
+5.6784652910e-20    8.5844898938e-21    7.1428883459e-21    4.4884288304e-20    1.1909012698e-19    
+6.3772782303e-20    -4.6557062855e-20   1.2883978876e-20    2.5670277363e-20    2.2621853083e-20    
+-6.6924229910e-20   -4.6275621288e-20   5.4764675044e-20    5.7003033135e-20    2.7109200950e-20    
+1.0043923608e-20    5.0213100079e-20    -1.0708977718e-21   6.4020634323e-20    1.3548320872e-19    
+-3.0794417051e-20   -1.9035004313e-19   -1.9205679551e-19   -8.9294807865e-20   -1.4831772758e-19   
+-1.4043700877e-19   3.1501826185e-20    5.4231032887e-20    1.3384558174e-19    5.2518573054e-20    
+-7.4090611086e-20   1.2031737413e-21    -3.1391680568e-21   -2.9161943403e-20   
+3.2999555759e-19    3.6180630992e-20    -1.1254084979e-20   1.5436323674e-20    -2.1123613201e-21   
+6.1062704540e-21    -1.2267484108e-21   -1.0713065902e-20   3.7392377430e-23    6.3770255169e-22    
+-3.4852425754e-21   -4.5771441059e-21   -1.1072481618e-20   -4.8837219111e-21   6.7247103422e-21    
+6.9777792585e-21    6.3863920080e-21    4.7710383349e-21    6.8639237790e-21    7.4732339161e-22    
+-1.1573880520e-21   -7.0160740079e-21   -1.0320012538e-20   6.6808118315e-22    2.3717389055e-21    
+-2.2087000695e-21   1.5444437107e-21    -2.4747000598e-21   -6.4869561645e-21   -1.0077176017e-20   
+-3.8952021537e-21   1.9641956583e-20    1.4291227797e-20    4.8793695825e-21    1.0971819543e-20    
+-1.5722298394e-21   -2.1730368773e-21   -3.0979489452e-21   -1.3554087171e-20   -1.5693034603e-21   
+9.6686823469e-21    7.3590879931e-21    3.0981228480e-21    -1.2315010933e-21   -8.7267118316e-22   
+7.4673164419e-21    3.5467324600e-21    2.1290998881e-22    -7.6293116846e-21   -1.0225346286e-20   
+-1.8517042960e-21   -1.0008985044e-20   -1.0769650085e-20   1.2969104279e-21    3.8515520743e-21    
+6.1423490811e-21    -1.7381040041e-21   -1.1724340552e-20   -4.9889531961e-21   -1.5809945337e-20   
+-2.3355436282e-20   6.4435643471e-20    4.9824755451e-20    -7.7324395976e-21   -1.2456275920e-20   
+-8.2668037859e-21   1.9342586482e-22    5.4682089443e-21    9.0615023977e-21    1.1928374243e-20    
+-2.0721039602e-23   3.4747406871e-21    1.3836337675e-20    1.3748878471e-21    -5.8293418276e-21   
+-7.1232931202e-21   -1.7334001565e-20   -1.3159692978e-20   -1.0332038794e-21   -7.2716365657e-21   
+-8.7127545898e-21   -8.6785763019e-21   8.2609735564e-21    1.5433328930e-20    -4.1632107754e-21   
+-2.7205402005e-21   -9.6965343958e-23   -1.2512298473e-20   -2.7942648497e-21   8.4921047292e-21    
+6.7584256609e-21    1.0670530684e-21    -3.0840217847e-20   -3.0017660411e-20   -1.3191387793e-20   
+-1.2771025222e-20   9.3722565428e-21    1.7953818838e-20    1.8708254377e-20    1.9342615075e-20    
+6.6340710407e-21    1.0437802464e-20    8.5739406432e-21    -8.3747617148e-21   -1.1783285551e-21   
+-1.4870043765e-21   -1.8458658192e-20   -4.4729020788e-21   3.2677804078e-21    1.1480211644e-21    
+1.7171000133e-20    7.0705660533e-21    -7.1721461152e-21   -3.9421574269e-21   -1.2991054591e-20   
+-8.0800057796e-21   -1.2936741412e-21   7.6571017986e-21    9.0055834880e-21    -3.8275528346e-21   
+3.9200817178e-21    1.0092397406e-20    -7.6292770857e-20   9.2954151246e-20    5.5180290571e-21    
+-1.8397119339e-22   -1.5087305469e-20   2.0141585281e-21    8.9454559406e-21    8.7056931532e-22    
+7.2938901508e-21    -1.2614186591e-20   2.7765161136e-21    2.8173609297e-20    -3.8837483464e-21   
+-1.1649252624e-20   -5.9387669680e-21   -4.2574844745e-20   -3.7885523615e-20   5.3965537939e-21    
+-4.1899301566e-21   -2.9210657932e-20   -1.8190610907e-20   2.7333439339e-21    9.6430869853e-21    
+2.8928911467e-21    3.7428733312e-21    -3.3352412887e-21   -1.1250636130e-20   -1.1717381008e-20   
+-9.7396727890e-21   -2.3279019998e-21   -2.7020242067e-22   -7.3307471944e-21   -1.8903025057e-21   
+-2.3066376180e-21   -5.5280918374e-21   1.5396037212e-20    2.1277484792e-20    1.3739634244e-20    
+1.2212456656e-20    9.9803847399e-21    8.2649519720e-21    -3.4234959276e-21   -3.0822618101e-20   
+-1.1971687284e-20   2.1917505003e-21    -3.8611175110e-23   1.0647460009e-20    -6.8816411152e-21   
+-1.0686585413e-20   1.2475407945e-20    -4.1381651393e-22   -2.9287025461e-20   -3.8545035080e-20   
+-9.8523068937e-21   2.9738401488e-20    5.5089573087e-21    -1.0514674053e-20   -6.7454829642e-21   
+-1.8786278657e-20   -1.5298844622e-20   -9.3047438374e-21   -6.1277815152e-20   3.8977566459e-22    
+1.4525481305e-20    5.2467652412e-21    6.8620600996e-21    2.8981313034e-21    2.3200555671e-21    
+-7.5681677185e-21   -2.0039133732e-21   -4.0203268367e-21   7.8933036193e-21    2.3356112170e-20    
+-1.2055969835e-20   -3.5355878545e-20   -1.2559377645e-20   -2.3139297332e-20   -3.3149649582e-20   
+-1.5305859630e-20   -7.5384741291e-21   -2.2306544029e-20   -2.7602429148e-20   -1.2415699692e-20   
+6.8035123567e-21    1.4042765463e-20    3.1679914850e-21    -7.5722916045e-21   -1.5625143798e-21   
+5.9137176044e-21    1.1064088608e-20    3.8509646965e-20    1.8787078485e-20    -2.5246238362e-21   
+8.8763275924e-21    1.7019632617e-20    8.8277258872e-21    2.5855423591e-20    2.5573738130e-20    
+-3.0440726338e-20   -2.8916076641e-20   7.9452583015e-22    -2.8053540010e-20   -4.7083291868e-20   
+-3.4162237033e-20   7.8308484761e-21    3.4874434258e-20    2.6247280510e-20    1.8912284715e-20    
+3.5890937309e-21    6.9066202323e-21    1.3348704449e-20    5.5970822824e-21    2.8653559480e-20    
+-1.5646861455e-21   -1.0288610885e-20   4.5869364353e-20    -9.7692275977e-21   -6.8827739856e-20   
+-2.7916302305e-20   3.8519362500e-21    7.4858950648e-21    2.2385087872e-20    -2.3766657968e-20   
+-2.8874667462e-20   -2.2344243686e-20   -1.4192813314e-21   -4.7070077350e-21   -4.2413646731e-21   
+1.0443837903e-20    -8.3705989289e-21   -1.6276283156e-20   -6.9851718775e-22   2.5722173497e-20    
+3.2485231324e-22    -6.6095290844e-20   -7.8865853240e-20   -3.0207946600e-20   2.7875618834e-20    
+2.5455217393e-20    -2.3653503929e-20   -2.1680378053e-20   7.5228055128e-21    -2.2241835333e-20   
+9.7826437598e-21    4.8018572217e-20    1.3445289012e-20    -2.5850233358e-20   -3.5763220978e-20   
+1.9881239384e-20    3.9659504668e-20    4.5475218922e-20    7.2992409197e-20    4.4776890087e-20    
+-3.4503874594e-20   -3.9267024941e-20   2.9251669909e-20    3.7356603770e-20    4.8236608513e-20    
+4.3959077473e-20    -3.1522729465e-20   -2.5553632955e-20   2.6330254945e-20    -2.7406572721e-20   
+-4.8370970042e-20   -6.4835351722e-21   2.8134169068e-20    6.3689027236e-20    -6.8157346328e-21   
+-4.4549564176e-20   -6.8786683320e-22   -2.0224021710e-20   6.1413323716e-21    6.3701451741e-20    
+6.3830354957e-20    7.3087059484e-20    1.3395987461e-20    -2.4179250882e-20   -4.1714915689e-20   
+-6.5840721946e-20   -5.8702876126e-21   1.7044722044e-20    4.2672182482e-20    7.3908227934e-20    
+-1.0911950088e-19   8.5542894567e-22    -1.8518082812e-20   -3.1902623273e-21   -2.7355838995e-20   
+-3.2447577881e-21   2.4383893829e-20    -1.3034689302e-20   -2.3918451752e-20   -1.1026562085e-20   
+1.2286128135e-20    -2.2831520304e-20   -7.8591392325e-20   -7.5849614082e-20   -2.8777768235e-20   
+6.4062904468e-20    6.3320327229e-20    4.9966781982e-20    2.8752546115e-20    4.1453664306e-21    
+-4.0835888520e-21   1.2334757928e-20    4.2459948500e-20    -5.8129483838e-21   -3.6778528278e-20   
+-1.4683918250e-20   3.1650227860e-20    -7.1779631305e-21   -2.1502299252e-20   2.1041742927e-20    
+3.2111562857e-20    -4.1430380251e-20   -5.6145008890e-20   2.4011993599e-21    1.4489058109e-21    
+2.4413339313e-20    1.7185470978e-21    -4.7525224715e-20   -1.8724419781e-20   2.8348786935e-20    
+-2.5950249094e-20   -5.2033121458e-20   -1.9835225173e-20   1.4257378017e-20    3.2916560172e-20    
+-8.6239149754e-20   -1.3642463084e-19   -6.4500621479e-20   5.7847796872e-21    5.3542980541e-20    
+6.4161640290e-20    4.6487658053e-21    3.8089395439e-21    4.2256070417e-20    4.4851321922e-21    
+-5.7972095058e-20   -1.7888285715e-20   2.1386757570e-20    -1.8887963907e-20   3.7169994032e-20    
+7.1486739513e-20    -1.0174983939e-19   2.3506769666e-20    9.3270144698e-21    9.0037717667e-23    
+-1.6409231152e-20   1.0568056017e-20    1.6751830698e-20    -1.7783072629e-20   -7.1120607396e-21   
+-3.6229615804e-21   -7.2630691687e-21   -1.0056956147e-20   -1.5672285849e-20   -6.1391399636e-20   
+-4.4418427533e-20   1.2385498540e-20    -3.1871485180e-20   -2.5440932339e-20   7.8191473441e-21    
+8.6654466379e-23    4.5522992092e-21    -2.3643603024e-20   -5.3276557317e-20   -2.8306007367e-20   
+2.2906723851e-20    4.5422894722e-20    2.1306788372e-20    -3.1368398608e-20   -4.7990314808e-20   
+-3.8183076442e-20   -3.7345418098e-20   -6.0131205623e-20   -1.8543385488e-20   1.7905675701e-20    
+-2.7347896213e-20   4.9465366401e-21    -2.4633223450e-20   -5.5823740031e-20   -4.3605632814e-20   
+-4.9181390157e-20   -5.7535855507e-20   -5.4259277401e-20   -2.4370011424e-20   9.2727900202e-21    
+-3.7620675713e-20   -1.1469516075e-19   -1.4128728423e-19   -9.2288701140e-20   4.9653158033e-21    
+5.2041865141e-20    1.0225320667e-20    -5.7265234740e-20   -4.9423531998e-20   3.0116554126e-20    
+9.0968876437e-20    -9.2117922751e-21   -1.1577043380e-20   5.5345757181e-20    7.0292405251e-20    
+9.4062898936e-20    7.5938148784e-20    -7.7210784332e-20   5.7691491602e-20    -1.5410229412e-21   
+-8.5236722641e-21   2.2702878239e-21    1.3446330320e-20    1.0314533378e-20    -1.6709390474e-20   
+-5.9705103002e-21   2.2098519715e-20    2.3847815265e-20    6.7492444117e-21    -1.0810749215e-20   
+-5.3183569247e-20   -4.4205637241e-20   -2.5078992139e-20   -2.9330426507e-20   -6.5590517095e-20   
+-7.1334879259e-20   1.1402110558e-20    3.5038962903e-20    -3.5447069000e-20   -9.1218225923e-20   
+-3.9673655909e-20   2.8799975525e-20    3.4551446244e-20    1.4771350131e-20    1.0619327332e-20    
+-1.3344496628e-21   -2.6560055218e-20   -3.7241839540e-20   -5.9318853738e-20   -1.9276084824e-21   
+3.7926055307e-20    1.5208118646e-20    3.1821179283e-20    -2.3254103078e-20   -7.9340412219e-21   
+-3.5565289707e-20   -6.7784591803e-20   -2.9360885555e-20   -2.8362078252e-20   -1.5486935691e-20   
+-8.9563235125e-21   -6.8492256232e-20   -7.8414713841e-20   -1.0764969540e-19   -9.3825047838e-20   
+-5.9123322512e-21   7.6301237101e-20    5.3493341537e-20    -1.0609611552e-19   -7.8096739324e-20   
+-1.8012338811e-20   2.5731454150e-20    2.3714024612e-20    2.8443868413e-20    6.5927224330e-20    
+5.4137065934e-20    1.2289416600e-19    1.8486159206e-19    -1.0835304004e-19   6.8619251401e-20    
+-2.2220812194e-20   -8.0035572212e-21   2.0856857721e-20    2.2718648034e-20    2.0793873314e-20    
+2.1229582649e-21    1.6478348186e-20    3.5775003260e-20    4.5897354342e-20    2.1006988219e-20    
+-4.3848720955e-20   -3.6582205749e-20   1.1792567772e-20    3.4193957461e-20    4.5163426355e-20    
+4.3147828804e-20    -1.9139728584e-20   -1.1275971593e-21   1.2391852085e-20    -6.5563982597e-20   
+-5.6313803476e-20   -2.3234496082e-20   2.0836904166e-20    4.1668526679e-20    1.2604062691e-20    
+3.0310112217e-20    4.6143304359e-20    4.7740496727e-20    2.4954410738e-20    -8.5339979587e-20   
+-6.3491914066e-20   -5.0822989032e-21   -2.6910920837e-21   2.8951336279e-20    -2.6399491099e-20   
+1.3229802507e-20    1.2813791271e-21    -8.0496026149e-20   -5.6329002253e-22   2.6273551031e-20    
+1.5249926247e-21    -1.1201880250e-20   -3.0064427634e-20   -5.4355696566e-20   -9.4045412481e-20   
+-6.2130889240e-20   1.1989427456e-19    2.3242941930e-19    1.1312250451e-19    9.9706696939e-21    
+-3.6576401816e-20   -8.3896953504e-20   -4.3080729246e-20   -5.3757152124e-20   2.4147644857e-22    
+6.0386460482e-20    -2.2748824045e-20   2.2314258880e-20    1.0196644757e-19    -1.1968030783e-19   
+5.9311070268e-20    -1.1297499257e-20   2.1049123837e-23    3.9178761235e-21    2.1970126109e-20    
+2.4641004157e-20    -2.1815239810e-20   -1.3132964424e-20   2.7396263139e-20    2.2013116158e-20    
+-3.3122729100e-21   -4.8405046334e-20   -3.2373732446e-20   1.4057542875e-20    3.0889145697e-20    
+4.6970120517e-20    4.3604429666e-20    -1.6387533878e-20   -1.7364170150e-20   -2.9262214484e-20   
+-8.5952352200e-20   -2.9223985474e-20   7.7500065776e-21    5.1281545685e-20    6.9127147128e-20    
+1.5089048545e-20    -5.3730430112e-21   3.4395122391e-20    9.4504895694e-20    5.8963825486e-20    
+-8.9760127532e-20   -8.5018128961e-20   -8.6124821616e-21   -3.2217246662e-20   -1.7983041256e-20   
+-2.7091358483e-20   -1.7072393546e-20   2.6804611804e-20    -3.8806589874e-20   2.0367410271e-20    
+6.2393612747e-20    2.5012159577e-20    1.3525277755e-20    -2.1120079025e-20   -6.4156454442e-20   
+-8.1777104088e-20   -3.0965180418e-20   1.9045548879e-19    3.1772890322e-19    1.3152990473e-19    
+1.5064001195e-19    6.9205769641e-20    -8.3854973633e-20   -3.3738008293e-20   -6.3986774698e-20   
+1.8022519032e-21    7.6320022106e-20    1.9361393593e-20    -5.7941179755e-20   -1.0237044691e-19   
+-1.3262077805e-19   4.8733741765e-20    1.5348078378e-21    6.8217965305e-21    -1.6299179858e-20   
+8.5865829908e-21    2.8153280383e-20    -2.1234363884e-20   -3.3531058773e-20   8.9829656294e-21    
+2.9081691754e-20    6.0851102438e-22    -2.7736347963e-20   -2.3822194795e-20   -3.9596574278e-20   
+-2.8635158092e-20   8.6799655692e-21    7.1747330023e-21    -1.4074659360e-20   -1.0251208714e-20   
+1.4624265502e-20    1.8439862902e-20    4.1170658842e-21    -2.0400469633e-21   3.4104208285e-20    
+6.6103233264e-20    7.6591883433e-21    -4.3531459773e-20   2.3865529623e-21    3.5496688206e-20    
+5.4334480429e-20    -1.4206339270e-20   -6.3754747904e-20   7.1576787413e-21    3.1834875325e-20    
+-7.9347871770e-22   -5.0980621039e-20   -7.9233619522e-20   -2.5897279497e-20   -1.1526001715e-20   
+4.6814421331e-21    3.2009918796e-20    -4.8512481542e-21   1.4536399889e-20    9.7737251804e-21    
+-1.6269695959e-20   3.5628101300e-21    -2.2178890787e-20   2.3354326234e-20    1.2991695326e-19    
+1.1483404144e-19    6.5782363735e-20    -3.4874297652e-20   -9.9959150085e-20   -5.0409781155e-20   
+5.4935122517e-21    -9.8310068197e-21   -7.1573319532e-20   -6.6470827437e-20   -8.1475521505e-20   
+-1.1894224971e-19   -9.9834695007e-20   2.8287801351e-20    -6.5489899543e-21   2.3250366195e-21    
+-7.7290879177e-21   2.4942966528e-20    3.9430420488e-20    2.2089700157e-21    -1.0817542915e-20   
+3.9642384092e-21    5.0381681778e-20    5.0972380356e-20    8.9532251296e-21    6.3207900260e-21    
+-1.5930585484e-20   -6.3181080345e-20   -8.1342227944e-20   -8.5382435794e-21   4.4657234125e-20    
+-1.7838858726e-20   -4.9066700575e-22   4.6170295315e-20    -1.1258748777e-20   -2.7940273170e-20   
+2.0141020766e-20    5.5794796452e-20    3.4693963336e-20    -8.4485096493e-21   -3.1416237423e-20   
+-6.0301033136e-20   -3.8531328389e-20   -4.6362309205e-20   -6.5521680508e-20   6.6120782219e-21    
+2.6737239819e-20    -1.6290598153e-20   -1.2172467452e-20   -2.7106822565e-20   -2.3235658077e-20   
+1.9099381195e-20    -4.9930149505e-20   -5.2006311704e-20   -1.5113262411e-20   3.4473036550e-21    
+1.4368937849e-20    -3.2143740768e-20   2.1456618265e-20    3.5784718232e-20    -1.2400276948e-20   
+3.8292335318e-20    3.3372165979e-20    -5.6742427542e-20   -8.7089628766e-20   -1.1316300907e-19   
+-2.7757516464e-20   1.7373536246e-21    -1.5813476688e-19   -1.7511740859e-19   -3.8993469636e-20   
+5.7060249516e-20    7.8912922773e-20    -4.6635345106e-20   4.1251734498e-20    -2.6249449925e-20   
+-1.7540932017e-20   -1.0952117349e-20   1.6467061239e-20    3.6950386395e-20    4.0898931097e-22    
+-4.2908112170e-21   2.0489165743e-20    2.9684260626e-20    2.5256067506e-20    -5.9174035577e-21   
+3.3242700548e-21    2.0120960849e-20    -2.9633492152e-20   -4.0006353810e-20   -1.7451130730e-20   
+1.4662847518e-20    -7.2982959287e-22   -3.9761176639e-20   -6.6922953956e-20   -6.1893851277e-20   
+-1.6765138683e-20   2.6458346834e-20    3.9201714536e-20    3.5297821309e-20    -5.0518520521e-21   
+-6.7075717603e-20   -4.9691762086e-20   -2.7589991656e-20   -4.7752860519e-20   -4.2370961654e-20   
+-3.1359585085e-20   -6.8160046002e-20   -7.0658270219e-20   -1.1937507021e-21   4.4452816275e-21    
+1.8068702438e-20    5.1162012076e-20    -3.8239063068e-20   -3.4436874577e-20   2.2355206168e-20    
+2.3816910944e-20    2.0526156076e-20    -4.4848630446e-20   -1.0701824200e-19   -4.4401625314e-20   
+9.8669096164e-20    1.5804103960e-19    6.1844438047e-20    8.9543797967e-21    -1.9737444373e-20   
+-7.5869135323e-20   1.3960181452e-20    2.8766041155e-20    -1.2536992941e-19   -1.0277552991e-19   
+4.5798491756e-20    1.3048860082e-19    1.7347632230e-19    -4.5257302267e-20   6.0080751526e-20    
+-6.5842599920e-21   -8.3889206000e-21   -1.2447252709e-20   -6.8166225346e-21   2.6544115888e-20    
+4.1522015085e-21    -3.7994283934e-21   5.5202765094e-22    1.2670424027e-20    -2.9435739963e-21   
+-5.5166354011e-20   -4.6722541026e-20   -2.5868843170e-20   -1.8004531875e-20   -1.6035976576e-21   
+-2.4365707595e-20   -1.5644893249e-20   1.2151290117e-20    1.5943480219e-21    -5.1462036958e-20   
+-6.2671526090e-20   -1.8471085478e-20   9.6418957283e-21    7.9927327953e-21    6.9446777752e-21    
+2.1548048433e-20    1.4619724199e-20    1.0614562351e-20    2.3587315031e-20    -2.6504787676e-20   
+-5.6114211991e-20   -1.4583060226e-20   -3.0508820685e-20   -2.4072228950e-20   -2.0186274948e-20   
+-2.5985642971e-20   -2.6127603623e-21   5.3703683229e-21    -2.8219570183e-20   7.9085595546e-21    
+6.8669213748e-20    5.5177586885e-20    1.0412667631e-20    -4.4188880942e-21   -9.0320499951e-20   
+-1.2718748647e-19   2.8014059512e-20    9.1725903213e-20    9.6073323104e-20    1.3723706094e-19    
+1.0817049452e-19    -2.3219767781e-21   -2.6046822547e-20   1.1036758820e-20    -2.9123775734e-20   
+-2.1453199726e-20   1.0808498175e-20    4.8071916433e-20    8.9051722924e-20    2.8870730890e-20    
+6.5448376880e-21    1.4094672583e-21    9.4862676308e-21    5.5454153650e-21    1.6233308568e-20    
+2.2135349210e-20    -1.4252355773e-20   -1.8876100844e-20   -2.2684179320e-20   -3.6167815466e-21   
+-5.7505922598e-21   -4.5273196805e-20   -4.3317158033e-20   -3.1703767660e-20   -1.1852291218e-20   
+-2.9982344247e-20   -4.8692169478e-21   2.7003872623e-20    2.0788649569e-21    1.0461792460e-20    
+-1.2976459719e-20   -3.3879628348e-20   -2.2442905800e-20   -1.0764642229e-20   1.8147952053e-20    
+4.0027506859e-20    4.2048376375e-20    1.7682675302e-20    1.2435368229e-20    5.2384376796e-21    
+-7.5327802854e-20   -7.8353836510e-20   3.3675655867e-20    5.1968898007e-20    4.0237836812e-20    
+2.7107251338e-21    -1.1656725456e-20   -1.6881368687e-20   -2.2375260775e-20   -3.4335935921e-20   
+-2.3790431879e-20   6.1187628837e-20    6.3461688209e-20    -2.0361723186e-20   -2.6106330228e-20   
+-2.3697412395e-20   -5.8236312857e-20   9.6501116583e-21    1.7788552757e-20    2.1816477648e-20    
+1.2443958885e-19    1.2506056914e-19    -2.2120137557e-21   -4.2410105995e-20   -2.3599105516e-20   
+-6.1911386164e-20   -4.2492936231e-20   1.5885598935e-20    5.2705751535e-20    7.5444692705e-20    
+3.6867982882e-20    1.7129655760e-20    -1.6533844598e-20   3.7128332208e-22    1.0356361289e-20    
+2.6947655200e-20    2.1863311546e-20    -1.2891372504e-20   -1.4114630516e-20   -1.0686457275e-20   
+8.1318671103e-21    5.5430302978e-21    -1.0984997436e-20   -1.6220612201e-20   -2.3083560387e-20   
+-1.6940845227e-20   -4.8788175873e-20   -3.7585087413e-20   1.4219669789e-20    1.9405189098e-20    
+1.1321793992e-20    -2.5457041253e-20   -3.0446402662e-20   6.7648851989e-22    8.8845757786e-21    
+3.3933239855e-20    3.4493712859e-20    2.1138709832e-21    -2.2621360182e-20   -4.2896842739e-21   
+-9.5601457281e-22   -5.4969035153e-20   -3.8989504655e-20   2.1653081175e-20    2.9545585238e-20    
+3.6697477027e-20    2.5414053329e-21    -1.1005947784e-20   -6.7116327440e-21   -1.4352224849e-20   
+1.0583517222e-20    -1.8587116249e-21   1.0053178605e-20    3.2198365802e-20    -1.1422572120e-20   
+-3.9488600120e-20   -3.9634795980e-20   -3.5037795059e-20   -8.5866170429e-21   1.4131920760e-20    
+-8.9280554807e-21   4.8391163439e-21    -3.5052513620e-20   -5.9405650803e-20   7.6213627063e-21    
+2.2401956614e-20    -6.5599409296e-20   -7.6399429184e-20   4.8362611988e-20    4.3505466655e-20    
+-2.4089423532e-21   -1.8281918992e-19   4.3356934353e-20    -2.6076759904e-21   -5.7402412874e-21   
+8.4059701683e-22    1.0525798015e-20    1.1259108399e-20    -3.7340761428e-21   -9.0017401047e-21   
+8.7291135028e-22    2.5333584166e-20    1.7282856876e-20    1.1575324405e-20    1.1815139615e-20    
+-1.1915123918e-20   -2.1593071505e-20   -3.2790790315e-20   -4.3450685403e-20   -2.5241924614e-20   
+1.3454241258e-20    2.5450339079e-20    -1.1548699039e-20   -2.5406359962e-20   -9.2765599980e-22   
+1.2738386608e-20    7.3681534637e-21    -4.5783529130e-21   -1.7307847324e-20   -8.6761356064e-21   
+3.2620526025e-21    -1.6778837717e-21   -3.1100531200e-20   -2.6494725621e-20   -7.0768240497e-22   
+1.5373254920e-21    5.8807973809e-21    -5.0187600073e-21   1.2332986866e-20    1.2233962131e-20    
+1.7357043256e-20    2.4798520171e-20    -9.1403331968e-21   -8.9691296497e-21   -8.8443332373e-22   
+-2.8933146540e-20   -3.8526828668e-20   -9.6664426855e-21   -1.1850390970e-20   -3.5759942721e-21   
+4.2109684848e-20    9.2156767618e-21    -4.8040232794e-20   -6.3655401683e-20   -4.3746221720e-20   
+4.1612550373e-21    1.0007659498e-20    -1.3382365790e-20   -1.2642133134e-20   1.8130218035e-20    
+1.9503701387e-20    7.2033474206e-22    -1.0313142051e-19   -8.0704042232e-21   2.5275941092e-20    
+-9.7009310641e-21   -1.1356200500e-20   -1.7259653485e-21   5.3666711099e-21    8.0191236731e-21    
+1.8094618080e-21    5.2495140483e-21    1.3417500420e-20    1.1535953479e-20    1.4246183274e-20    
+1.8459481406e-20    9.1651503158e-21    7.4052491339e-21    2.5460633131e-21    1.7565418742e-21    
+-6.7224513057e-21   -1.3358742719e-21   8.2640303556e-21    -1.3232722009e-21   -3.0134637914e-22   
+-3.7280850789e-21   3.0051964590e-21    3.7544531063e-21    -5.5579963451e-21   -1.2568614405e-20   
+-8.6889910578e-21   5.4626519331e-21    6.3653059263e-21    -1.9592705461e-20   -2.0872303566e-20   
+-1.0206071464e-21   6.4407014716e-21    5.1099664758e-21    -2.2379559391e-21   1.7052663263e-20    
+8.8686252156e-21    9.6928010736e-23    -8.9865992821e-21   -1.9530591124e-20   -5.8174307369e-21   
+-1.9166163196e-21   -8.2838594598e-21   -9.0445767354e-21   8.5290649992e-21    7.8362577716e-21    
+2.6606103738e-20    4.0173451602e-20    1.3848832878e-20    -6.8627916449e-21   -8.9157134571e-21   
+-1.7410634482e-20   -1.4744061857e-20   -1.1209225387e-20   5.5127554775e-21    1.3732613561e-20    
+-1.4248557724e-20   1.4560492492e-20    4.9696296855e-20    3.3732434500e-19    2.5004222628e-20    
+-4.2102207856e-20   2.0175769721e-20    1.7185615540e-20    2.4156476762e-21    -8.5714369158e-21   
+-1.6076710603e-20   -1.0629814124e-20   -1.4650291398e-20   -9.5164522549e-21   -7.5435645950e-21   
+2.4956759444e-22    5.4164489824e-21    -1.8061228321e-21   -4.0024466399e-21   -3.7876487424e-21   
+-8.8820144984e-21   -2.0045936315e-21   3.8077133271e-21    3.5279199990e-21    -1.8007324621e-21   
+-6.8160470113e-21   -7.8422618615e-22   -4.8728698222e-21   -5.7645557901e-21   4.3304495040e-21    
+8.9167043354e-22    -3.1166270606e-21   2.0434190804e-21    4.3073142568e-22    1.1577443133e-20    
+8.8345345642e-21    -4.2194358770e-21   1.5469647660e-21    -3.8805101100e-21   -4.0747799164e-21   
+-3.2605065153e-21   -1.2287695953e-21   5.2700262874e-21    7.8842390694e-21    6.3610717863e-21    
+6.1550490706e-21    2.7884312294e-21    -4.2596143714e-21   1.4543095874e-21    7.1084126103e-21    
+4.5510157400e-21    -1.2309336014e-20   -1.2719015936e-20   -1.8937098384e-21   -1.1511354258e-20   
+-1.1606847819e-20   5.0409674578e-21    6.9643452746e-21    7.5258665616e-21    -2.3171984457e-21   
+-1.1982325401e-20   2.1520412820e-21    -7.6981631618e-21   -1.9394848192e-20   
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    7.1428571429e-03    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    1.0000000000e+00    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    1.0000000000e+01    
+1.8865117801e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.8865117801e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.8865117801e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    
+1.7347234760e-17    1.7347234760e-17    1.7347234760e-17    1.8865117801e-17    
diff --git a/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/tecflow.plt.bak b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/tecflow.plt.bak
new file mode 100644
index 0000000..bf85231
Binary files /dev/null and b/phenglei/tutorials/A11_ThreeD_Sphere_Laminar_Ma10_Struct/results/tecflow.plt.bak differ
diff --git a/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..540eba0
--- /dev/null
+++ b/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,194 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 30000;
+
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 2000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 8.15;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 296.0;
+
+int inflowParaType = 0;
+double refReNumber = 1.6e7;
+double refDimensionalTemperature = 56.0;
+double freestream_vibration_temperature = 10000.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 0.01;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd = 1.0;
+
+double ktmax  = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/DoubleEllipse__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
diff --git a/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..7aa1a7f
--- /dev/null
+++ b/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/DoubleEllipse.grd";
+string out_gfile  = "./grid/DoubleEllipse.fts";
diff --git a/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/bin/key.hypara b/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..b892406
--- /dev/null
+++ b/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/bin/partition.hypara b/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..db58cff
--- /dev/null
+++ b/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/DoubleEllipse.fts";
+string partition_grid_file = "./grid/DoubleEllipse__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/grid/网格地址.txt b/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..98dd61f
--- /dev/null
+++ b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,49 @@
+# nBoundaryConditions : number of global boundary conditions.
+# bcName             : Boundary Condition Name.
+# bcType(in PHengLEI): Boundary Condition Type.
+
+# Account of how to set boundarycondition.
+# string bcName = "Farfield";          
+# {                                      
+#   int bcType = 4;                      
+#   int inflowParaType = 1;              
+#   double attackd = 0;                  
+#   double refReNumber = 6.5e6;          
+#   double refMachNumber = 3.5;          
+#   double angleSlide = 0;               
+# }                                      
+
+int nBoundaryConditions = 4;
+string bcName = "SOLID_SURFACE";
+{
+  int bcType = 2;
+}
+string bcName = "SYMMETRY";
+{
+  int bcType = 3;
+}
+string bcName = "FARFIELD";
+{
+  int bcType = 4;
+}
+string bcName = "OUTFLOW";
+{
+  int bcType = 62;
+  double staticPressure = 101783.4; 
+}
+
+# 'bcType' is defined as following:
+#    99: PERIODIC              	
+#    -2: WAKE                  	
+#    -1: INTERFACE             	
+#    0 : NO_BOUNDARY_CONDITION 	
+#    1 : EXTRAPOLATION         	
+#    2 : SOLID_SURFACE         	
+#    3 : SYMMETRY              	
+#    4 : FARFIELD              	
+#    5 : INFLOW                	
+#    6 : OUTFLOW               	
+#    52: PRESSURE_INLET		    
+#    62: PRESSURE_OUTLET		   	
+#    61: OUTFLOW_CONFINED      	
+#    7 : POLE						
diff --git a/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..fbd5b29
--- /dev/null
+++ b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,196 @@
+	#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 200000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 50;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.128;
+double attackd       = 0;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 2834645.7;
+double refDimensionalTemperature = 298.33;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 0.0127;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name = "nolim";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 20.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/2D_BackwardStep__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 9;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 8, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
+double MUSCLCoefXk = 0.333333;
diff --git a/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..23beed3
--- /dev/null
+++ b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/2D_BackwardStep.grd";
+string out_gfile  = "./grid/2D_BackwardStep.fts";
diff --git a/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/key.hypara b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/partition.hypara b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..e2d6d8a
--- /dev/null
+++ b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/2D_BackwardStep.fts";
+string partition_grid_file = "./grid/2D_BackwardStep__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/grid/网格地址.txt b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/二维结构后台阶低速湍流算例说明文档.pdf b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/二维结构后台阶低速湍流算例说明文档.pdf
new file mode 100644
index 0000000..1e22411
Binary files /dev/null and b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/二维结构后台阶低速湍流算例说明文档.pdf differ
diff --git a/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/低速后台阶.pdf b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/低速后台阶.pdf
new file mode 100644
index 0000000..7e89f82
Binary files /dev/null and b/phenglei/tutorials/A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU/低速后台阶.pdf differ
diff --git a/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..912c0d9
--- /dev/null
+++ b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,56 @@
+# nBoundaryConditions : number of global boundary conditions.
+# bcName             : Boundary Condition Name.
+# bcType(in PHengLEI): Boundary Condition Type.
+
+# Account of how to set boundarycondition.
+# string bcName = "Farfield";          
+# {                                      
+#   int bcType = 4;                      
+#   int inflowParaType = 1;              
+#   double attackd = 0;                  
+#   double refReNumber = 6.5e6;          
+#   double refMachNumber = 3.5;          
+#   double angleSlide = 0;               
+# }                                      
+
+int nBoundaryConditions = 5;
+string bcName = "SOLID_SURFACE";
+{
+  int bcType = 2;
+}
+string bcName = "SYMMETRY";
+{
+  int bcType = 3;
+}
+string bcName = "FARFIELD";
+{
+  int bcType = 4;
+}
+string bcName = "INFLOW";
+{
+  int bcType = 52;
+  double totalPressure = 118309.784;
+  double totalTemperature = 302.4;
+  double direction_inlet[] = 1, 0, 0;
+}
+string bcName = "OUTFLOW";
+{
+  int bcType = 62;
+  double staticPressure = 115056.0;
+}
+
+# 'bcType' is defined as following:
+#    99: PERIODIC              	
+#    -2: WAKE                  	
+#    -1: INTERFACE             	
+#    0 : NO_BOUNDARY_CONDITION 	
+#    1 : EXTRAPOLATION         	
+#    2 : SOLID_SURFACE         	
+#    3 : SYMMETRY              	
+#    4 : FARFIELD              	
+#    5 : INFLOW                	
+#    6 : OUTFLOW               	
+#    52: PRESSURE_INLET		    
+#    62: PRESSURE_OUTLET		   	
+#    61: OUTFLOW_CONFINED      	
+#    7 : POLE						
diff --git a/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..4dd8dba
--- /dev/null
+++ b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,198 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 100000;
+
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 2000;
+int intervalStepForce = 200;
+int intervalStepRes   = 20;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 5000000.0;
+double refDimensionalTemperature = 300.00;
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 302.4;      // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 118309.784;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 40.0;
+
+int nLUSGSSweeps = 5;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/mesh0_545x385_plate__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 10;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
diff --git a/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..603812a
--- /dev/null
+++ b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/mesh0_545x385_plate.grd";
+string out_gfile  = "./grid/mesh0_545x385_plate.fts";
diff --git a/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/key.hypara b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/partition.hypara b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..996788d
--- /dev/null
+++ b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/mesh0_545x385_plate.fts";
+string partition_grid_file = "./grid/mesh0_545x385_plate__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/grid/网格地址.txt b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/二维结构平板低速湍流算例说明文档.pdf b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/二维结构平板低速湍流算例说明文档.pdf
new file mode 100644
index 0000000..fed16bd
Binary files /dev/null and b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/二维结构平板低速湍流算例说明文档.pdf differ
diff --git a/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/低速湍流平板.pdf b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/低速湍流平板.pdf
new file mode 100644
index 0000000..b446c21
Binary files /dev/null and b/phenglei/tutorials/A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU/低速湍流平板.pdf differ
diff --git a/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..2fa0e25
--- /dev/null
+++ b/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,204 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 20000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 50;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 7.11;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 311.0;
+int inflowParaType = 0;
+double refReNumber = 5.706e6;
+double refDimensionalTemperature = 80;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 0.01;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "minvan";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 5.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 10.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/3D_shock_wave__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double MUSCLCoefXk = 0.333333;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+int periodicType = 2; 
+double translationLength[] = [0.0,0.0,0.0];
+double rotationAngle = 1.0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..1a27200
--- /dev/null
+++ b/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,45 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/3D_shock_wave.cgns";
+string out_gfile  = "./grid/3D_shock_wave.fts";
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+int periodicType = 2; 
+double translationLength[] = [0.0,0.0,0.0];
+double rotationAngle = 1.0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/bin/key.hypara b/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..b892406
--- /dev/null
+++ b/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/bin/partition.hypara b/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..38ec799
--- /dev/null
+++ b/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/bin/partition.hypara
@@ -0,0 +1,31 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/3D_shock_wave.fts";
+string partition_grid_file = "./grid/3D_shock_wave__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+int periodicType = 2; 
+double translationLength[] = [0.0,0.0,0.0];
+double rotationAngle = 1.0;
diff --git a/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/grid/网格地址.txt b/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/三维结构激波边界层干扰算例说明文档.pdf b/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/三维结构激波边界层干扰算例说明文档.pdf
new file mode 100644
index 0000000..28783a2
Binary files /dev/null and b/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/三维结构激波边界层干扰算例说明文档.pdf differ
diff --git a/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/激波边界层(旋转周期).pdf b/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/激波边界层(旋转周期).pdf
new file mode 100644
index 0000000..15d1963
Binary files /dev/null and b/phenglei/tutorials/A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU/激波边界层(旋转周期).pdf differ
diff --git a/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..bcc16c2
--- /dev/null
+++ b/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,195 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 80000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.185;
+double attackd       = 6.00;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 2.51e6;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+int    viscousType    = 4;
+string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 10.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/2D_NLR7301_Str.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
diff --git a/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..6c1771c
--- /dev/null
+++ b/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/2D_NLR7301_Str.grd";
+string out_gfile  = "./grid/2D_NLR7301_Str.fts";
diff --git a/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/bin/key.hypara b/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/bin/partition.hypara b/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/bin/partition.hypara
new file mode 100644
index 0000000..161b4b4
--- /dev/null
+++ b/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 1;
+
+string original_grid_file  = "./grid/2D_NLR7301_Str.fts";
+string partition_grid_file = "./grid/2D_NLR7301_Str.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/grid/网格地址.txt b/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A16-TwoD_NLR7301_SST_Struct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/bin/cfd_para.hypara b/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/bin/cfd_para_supersonic.hypara b/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/bin/cfd_para_supersonic.hypara
new file mode 100644
index 0000000..981255a
--- /dev/null
+++ b/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/bin/cfd_para_supersonic.hypara
@@ -0,0 +1,191 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 20000;
+
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 2000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 2.85;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = -1.0;
+
+int inflowParaType = 0;
+double refReNumber = 6.567e7;
+double refDimensionalTemperature = 102.1;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 0.026;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*************************************************
+******************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "vanleer";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd = 1.0;
+
+double ktmax  = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/3d_16ramp_str.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
diff --git a/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/bin/grid_para.hypara b/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/bin/grid_para.hypara
new file mode 100644
index 0000000..a04d669
--- /dev/null
+++ b/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes     = 1;
+int axisRotateOrder[]    = [1];
+double axisRotateAngles[]= [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/3d_16ramp_str.cgns";
+string out_gfile  = "./grid/3d_16ramp_str.fts";
diff --git a/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/bin/key.hypara b/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/bin/key.hypara
new file mode 100644
index 0000000..6b51089
--- /dev/null
+++ b/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/bin/partition.hypara b/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/bin/partition.hypara
new file mode 100644
index 0000000..4c96957
--- /dev/null
+++ b/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 1;
+
+string original_grid_file  = "./grid/3d_16ramp_str.fts";
+string partition_grid_file = "./grid/3d_16ramp_str.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/grid/网格地址.txt b/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A17-ThreeD_Compression_Ramp-16_SA_Struct/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/bin/cfd_para.hypara b/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..fff22b7
--- /dev/null
+++ b/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,194 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 2000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 9.91;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 293;
+
+int inflowParaType = 0;
+double refReNumber = 1.86e5;
+double refDimensionalTemperature = 51;
+double freestream_vibration_temperature = 10000.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 0.001;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 0.1017;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd = 3.0;
+
+double ktmax  = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/3d_HCFlare_str__16.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
diff --git a/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/bin/grid_para.hypara b/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..812a1ae
--- /dev/null
+++ b/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes     = 1;
+int axisRotateOrder[]    = [1];
+double axisRotateAngles[]= [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/3d_HCFlare_str.cgns";
+string out_gfile  = "./grid/3d_HCFlare_str.fts";
diff --git a/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/bin/key.hypara b/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/bin/key.hypara
new file mode 100644
index 0000000..b892406
--- /dev/null
+++ b/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/bin/partition.hypara b/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/bin/partition.hypara
new file mode 100644
index 0000000..a043bcd
--- /dev/null
+++ b/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 16;
+
+string original_grid_file  = "./grid/3d_HCFlare_str.fts";
+string partition_grid_file = "./grid/3d_HCFlare_str__16.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/grid/网格地址.txt b/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A18-ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/PHengLEIv3d0.exe b/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/PHengLEIv3d0.exe
new file mode 100644
index 0000000..ddfe62a
Binary files /dev/null and b/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/PHengLEIv3d0.exe differ
diff --git a/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/bin/cfd_para.hypara b/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..ab833e4
--- /dev/null
+++ b/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,206 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 2000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 10.6;
+double attackd       = 20.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 294.44;
+
+int inflowParaType = 0;
+double refReNumber = 3.937e6;
+double refDimensionalTemperature = 47.3;
+double freestream_vibration_temperature = 10000.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+//The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity = 1.0e3;
+
+//The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 0.02794;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw", "ausmpw+".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd      = 1.0;
+int    CFLVaryStep = 1000;
+double ktmax       = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/3D_bluntcone_str__64.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
diff --git a/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/bin/grid_para.hypara b/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..ba2fdb6
--- /dev/null
+++ b/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/3D_bluntcone_str.grd";
+string out_gfile  = "./grid/3D_bluntcone_str.fts";
diff --git a/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/bin/key.hypara b/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/bin/key.hypara
new file mode 100644
index 0000000..b892406
--- /dev/null
+++ b/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/bin/partition.hypara b/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/bin/partition.hypara
new file mode 100644
index 0000000..95acdb9
--- /dev/null
+++ b/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 64;
+
+string original_grid_file  = "./grid/3D_bluntcone_str.fts";
+string partition_grid_file = "./grid/3D_bluntcone_str__64.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/grid/网格地址.txt b/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A19-ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/bin/cfd_para.hypara b/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..7b4e112
--- /dev/null
+++ b/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,206 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 2000;
+int intervalStepForce = 100;
+int intervalStepRes   = 20;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 20.00;
+double attackd       = 20.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 1500.0;
+
+//int inflowParaType = 0;
+//double refReNumber = 1.0e5;
+//double refDimensionalTemperature = 288.15;
+//double freestream_vibration_temperature = 300.0;
+
+int inflowParaType = 1;
+double height = 50.0;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+//The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity = 1.0e3;
+
+//The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+double gridScaleFactor = 0.001;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw", "ausmpw+".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd      = 2.0;
+int    CFLVaryStep = 1000;
+double ktmax       = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/OV102__24.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
\ No newline at end of file
diff --git a/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/bin/grid_para.hypara b/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..9d4868c
--- /dev/null
+++ b/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/OV102.grd";
+string out_gfile  = "./grid/OV102.fts";
diff --git a/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/bin/key.hypara b/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/bin/key.hypara
new file mode 100644
index 0000000..b892406
--- /dev/null
+++ b/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/bin/partition.hypara b/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/bin/partition.hypara
new file mode 100644
index 0000000..b27bf10
--- /dev/null
+++ b/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 24;
+
+string original_grid_file  = "./grid/OV102.fts";
+string partition_grid_file = "./grid/OV102__24.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/grid/网格地址.txt b/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A20-ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..0ae5048
--- /dev/null
+++ b/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,59 @@
+# nBoundaryConditons : number of global boundary conditions.
+# bcName             : Boundary Condition Name.
+# bcType(in PHengLEI): Boundary Condition Type.
+
+# Account of how to set boundaryconditon.
+# string bcName = "Farfield";          
+# {                                      
+#   int bcType = 4;                      
+#   int inflowParaType = 1;              
+#   double attackd = 0;                  
+#   double refReNumber = 6.5e6;          
+#   double refMachNumber = 3.5;          
+#   double angleSlide = 0;               
+# }                                      
+
+int nBoundaryConditions = 5;
+string bcName = "Wall";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "Symmetry";
+{
+  int bcType = 3;
+}
+string bcName = "Inlet1";
+{
+  int bcType = 5;
+  int inflowParaType = 9;
+  double primDensity = 1.129985;
+  double primU = 0.9666364;
+  double primV = -0.052199312;
+  double primW = 0;
+  double primPressure = 0.2119350;
+}
+string bcName = "Inlet2";
+{
+  int bcType = 5;
+}
+string bcName = "Outlet";
+{
+  int bcType = 6;
+}
+
+# 'bcType' is defined as following:
+#    99: PERIODIC                  
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/cfd_para_supersonic.hypara b/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/cfd_para_supersonic.hypara
new file mode 100644
index 0000000..db26f40
--- /dev/null
+++ b/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/cfd_para_supersonic.hypara
@@ -0,0 +1,190 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 10000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 2.00;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = -1.0;
+
+int inflowParaType = 0;
+double refReNumber = 2.96e5;
+double refDimensionalTemperature = 117;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "minvan";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd = 30.0;
+
+double ktmax  = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/3D_plate_UDB_str.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
diff --git a/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..7e5981e
--- /dev/null
+++ b/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/3D_plate_UDB_str.cgns";
+string out_gfile  = "./grid/3D_plate_UDB_str.fts";
diff --git a/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/key.hypara b/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..6b51089
--- /dev/null
+++ b/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/partition.hypara b/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/partition.hypara
new file mode 100644
index 0000000..48acc11
--- /dev/null
+++ b/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 1;
+
+string original_grid_file  = "./grid/3D_plate_UDB_str.fts";
+string partition_grid_file = "./grid/3D_plate_UDB_str.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/grid/网格地址.txt b/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/三维结构激波干扰超声速层流平板_算例说明文档.pdf b/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/三维结构激波干扰超声速层流平板_算例说明文档.pdf
new file mode 100644
index 0000000..f92a274
Binary files /dev/null and b/phenglei/tutorials/A21-ThreeD_ShockwaveInteractionPlate_Ma2_Laminar_UDB_Struct_1CPU/三维结构激波干扰超声速层流平板_算例说明文档.pdf differ
diff --git a/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..ac853b0
--- /dev/null
+++ b/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,76 @@
+# nBoundaryConditons : Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 6;
+string bcName = "Solid";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "jet";
+{
+  string bodyName = "body";
+  int bcType = 5;
+  int inflowParaType = 9;
+  double primDensity = 41.45637;
+  double primU = 0.0;
+  double primV = 0.543918;
+  double primW = 0.0;
+  double primPressure = 8.76743560;
+}
+string bcName = "Symmetry";
+{
+  int bcType = 3;
+}
+string bcName = "Farfield";
+{
+  int bcType = 4;
+}
+string bcName = "Outflow";
+{
+  int bcType = 6;
+}
+string bcName = "Pole";
+{
+  int bcType = 73;
+}
+
+# 'bcType' is defined as following:
+#    99: PERIODIC                  
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/cfd_para.hypara b/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/cfd_para_supersonic.hypara b/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/cfd_para_supersonic.hypara
new file mode 100644
index 0000000..42ef92c
--- /dev/null
+++ b/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/cfd_para_supersonic.hypara
@@ -0,0 +1,190 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 500;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 3.33;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = -1.0;
+
+int inflowParaType = 0;
+double refReNumber = 8.22818e7;
+double refDimensionalTemperature = 84.22;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 0.001;
+
+double forceReferenceLengthSpanWise = 0.415;    // unit of meter.
+double forceReferenceLength = 0.415;            // unit of meter.
+double forceReferenceArea = 0.00196;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+int    viscousType    = 4;
+string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw", "ausmpw+".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minvan";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd = 5.0;
+
+double ktmax  = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/3D_jet__8.fts";
+int plotFieldType = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
diff --git a/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/grid_para.hypara b/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..9cfa477
--- /dev/null
+++ b/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes     = 1;
+int axisRotateOrder[]    = [1];
+double axisRotateAngles[]= [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/3D_jet.cgns";
+string out_gfile  = "./grid/3D_jet.fts";
diff --git a/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/key.hypara b/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/key.hypara
new file mode 100644
index 0000000..6b51089
--- /dev/null
+++ b/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/partition.hypara b/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/partition.hypara
new file mode 100644
index 0000000..3e87df2
--- /dev/null
+++ b/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/bin/partition.hypara
@@ -0,0 +1,23 @@
+// pgridtype: The grid type.
+//               0 -- unstruct grid
+//               1 -- struct grid
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//			  Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//			           30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file     : original grid file that want to be divided(HyperFLOW/PHengLEI type, *.fts).
+// partition_grid_file    : target partition grid file(HyperFLOW/PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 8;
+
+string original_grid_file  = "./grid/3D_jet.fts";
+string partition_grid_file = "./grid/3D_jet__8.fts";
+
+
+// Number of multi-grid levels, ONLY used for structured grid.
+//               1 -- single level, 2 -- 2 level, N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+
+
diff --git a/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/grid/网格地址.txt b/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/三维结构弹体喷流_算例说明文档.pdf b/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/三维结构弹体喷流_算例说明文档.pdf
new file mode 100644
index 0000000..7023f25
Binary files /dev/null and b/phenglei/tutorials/A22-ThreeD_Jet_Ma3d33_SST_Struct_8CPU/三维结构弹体喷流_算例说明文档.pdf differ
diff --git a/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..1f4d942
--- /dev/null
+++ b/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,201 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 1;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.1467;
+double attackd       = 0.0;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 3.34e6;
+double refDimensionalTemperature = 290.5;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+double wallTemperature = -300.0;
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// iviscous: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when iviscous = 3.
+//              -- "2eq-kw-menter-sst", when iviscous = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+int    viscousType    = 4;
+string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+int transitionType   = 2;
+double turbIntensity = 0.18;
+double freeStreamViscosity = 5.0;
+int freeturbIntensitySRModify = 1;
+
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "minvan";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 1.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               0 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+double CFLEnd  = 50.0;
+int nLUSGSSweeps = 3;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 4;
+int flowInitStep = 0;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// isPlotVolumeField: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/sk-flat-2D_str__4.fts";
+int  walldistMethod     = 3;
+int plotFieldType       = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 15;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 8, 15, 18, 19, 20, 21, 51, 52];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 0;
+int limitVariables = 0;
+int limitVector = 0;
+
+
diff --git a/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..14fdd24
--- /dev/null
+++ b/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,39 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//               0 -- Unstructured grid.
+//               1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//              -1 -- MULTI_TYPE
+//               1 -- HyperFLOW( PHengLEI ), *.fts.
+//               2 -- CGNS, *.cgns.
+//               3 -- Plot3D type of structured grid, *.dat/*.grd.
+//               4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//               5 -- Fluent, *.cas/*.msh.
+//               6 -- Ustar, mgrid.in.
+//               7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//               8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/sk-flat-2D_str.cgns";
+string out_gfile  = "./grid/sk-flat-2D_str.fts";
+
+
+
+
diff --git a/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/bin/key.hypara b/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..431e270
--- /dev/null
+++ b/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
\ No newline at end of file
diff --git a/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/bin/partition.hypara b/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..a0a62f6
--- /dev/null
+++ b/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/bin/partition.hypara
@@ -0,0 +1,23 @@
+// pgridtype: The grid type.
+//               0 -- unstruct grid
+//               1 -- struct grid
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//			  Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//			           30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file     : original grid file that want to be divided(HyperFLOW/PHengLEI type, *.fts).
+// partition_grid_file    : target partition grid file(HyperFLOW/PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/sk-flat-2D_str.fts";
+string partition_grid_file = "./grid/sk-flat-2D_str__4.fts";
+
+
+// Number of multi-grid levels, ONLY used for structured grid.
+//               1 -- single level, 2 -- 2 level, N -- N level, ..., et al.
+int   numberOfMultigrid = 4;
+
+
+
diff --git a/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/grid/网格地址.txt b/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/二维结构低速平板转捩算例说明文档.pdf b/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/二维结构低速平板转捩算例说明文档.pdf
new file mode 100644
index 0000000..ac66474
Binary files /dev/null and b/phenglei/tutorials/A23-TwoD_Plate_S-KSR_SST_Struct_4CPU/二维结构低速平板转捩算例说明文档.pdf differ
diff --git a/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..cd7e4bb
--- /dev/null
+++ b/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,197 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 60000;
+
+int intervalStepFlow  = 500;
+int intervalStepPlot  = 500;
+int intervalStepForce = 50;
+int intervalStepRes   = 50;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 19.0;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 9.0e6;
+double refDimensionalTemperature = 288.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+double MUSCLCoefXk = 0.333333;
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 10.0;
+
+int tscheme      = 8;
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/30p30n_str__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
diff --git a/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..e922724
--- /dev/null
+++ b/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,36 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+//             9 -- Gridgen type of structured grid, *.dat/*.grd.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/30p30n_str.grd";
+string out_gfile  = "./grid/30p30n_str.fts";
diff --git a/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/bin/key.hypara b/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/bin/partition.hypara b/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..ed5ca7d
--- /dev/null
+++ b/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/bin/partition.hypara
@@ -0,0 +1,24 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+
+int pgridtype = 1;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/30p30n_str.fts";
+string partition_grid_file = "./grid/30p30n_str__4.fts";
+
+int numberOfMultifile = 1;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/grid/网格地址.txt b/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/二维结构30p30n翼型低速绕流(Matrix LUSGS)算例说明文档.pdf b/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/二维结构30p30n翼型低速绕流(Matrix LUSGS)算例说明文档.pdf
new file mode 100644
index 0000000..990aa60
Binary files /dev/null and b/phenglei/tutorials/A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU/二维结构30p30n翼型低速绕流(Matrix LUSGS)算例说明文档.pdf differ
diff --git a/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..7b9a764
--- /dev/null
+++ b/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,197 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 100000;
+
+int intervalStepFlow  = 5000;
+int intervalStepPlot  = 5000;
+int intervalStepForce = 100;
+int intervalStepRes   = 100;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 5.0e6;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 0.001;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 2.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+int    viscousType    = 4;
+string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "nolim";
+
+double MUSCLCoefXk        =0.333333;
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 500.0;
+
+int tscheme      = 8;
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/Mesh4_137_97.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
diff --git a/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..571ac6f
--- /dev/null
+++ b/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,36 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+//             9 -- Gridgen type of structured grid, *.dat/*.grd.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/Mesh4_137_97.grd";
+string out_gfile  = "./grid/Mesh4_137_97.fts";
diff --git a/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/bin/key.hypara b/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/grid/网格地址.txt b/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/二维结构低速湍流平板(Matrix LUSGS)算例说明文档.pdf b/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/二维结构低速湍流平板(Matrix LUSGS)算例说明文档.pdf
new file mode 100644
index 0000000..029b8d8
Binary files /dev/null and b/phenglei/tutorials/A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU/二维结构低速湍流平板(Matrix LUSGS)算例说明文档.pdf differ
diff --git a/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/bin/cfd_para_transonic.hypara b/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..7f2f809
--- /dev/null
+++ b/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/bin/cfd_para_transonic.hypara
@@ -0,0 +1,204 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 10000;
+
+int intervalStepFlow  = 500;
+int intervalStepPlot  = 500;
+int intervalStepForce = 50;
+int intervalStepRes   = 50;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.73;
+double attackd       = 2.31;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "smooth";
+double MUSCLCoefXk = 0.333333;
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 5.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 10.0;
+
+int tscheme      = 8;
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/rae2822_vis2d__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), iblank(81).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
diff --git a/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..675cf00
--- /dev/null
+++ b/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/rae2822_vis2d.grd";
+string out_gfile  = "./grid/rae2822_vis2d.fts";
diff --git a/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/bin/key.hypara b/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..686cff9
--- /dev/null
+++ b/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/bin/partition.hypara b/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..2a1a0e5
--- /dev/null
+++ b/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/rae2822_vis2d.fts";
+string partition_grid_file = "./grid/rae2822_vis2d__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/grid/网格地址.txt b/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/二维结构Rae2822翼型跨声速绕流(Matrix LUSGS)算例说明文档.pdf b/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/二维结构Rae2822翼型跨声速绕流(Matrix LUSGS)算例说明文档.pdf
new file mode 100644
index 0000000..bf1eaed
Binary files /dev/null and b/phenglei/tutorials/A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU/二维结构Rae2822翼型跨声速绕流(Matrix LUSGS)算例说明文档.pdf differ
diff --git a/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..05e1ebe
--- /dev/null
+++ b/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,196 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 60000;
+
+int intervalStepFlow  = 500;
+int intervalStepPlot  = 500;
+int intervalStepForce = 50;
+int intervalStepRes   = 50;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 19.0;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 9.0e6;
+double refDimensionalTemperature = 288.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 6;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+double MUSCLCoefXk = 0.333333;
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 10.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/30p30n_str__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
diff --git a/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..7aeb09c
--- /dev/null
+++ b/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,36 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+//             9 -- Gridgen type of structured grid, *.dat/*.grd.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/30p30n_str.grd";
+string out_gfile  = "./grid/30p30n_str.fts";
diff --git a/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/bin/key.hypara b/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/bin/partition.hypara b/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..ed5ca7d
--- /dev/null
+++ b/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/bin/partition.hypara
@@ -0,0 +1,24 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+
+int pgridtype = 1;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/30p30n_str.fts";
+string partition_grid_file = "./grid/30p30n_str__4.fts";
+
+int numberOfMultifile = 1;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/grid/网格地址.txt b/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/二维结构30p30n翼型低速绕流(熵修正)算例说明文档.pdf b/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/二维结构30p30n翼型低速绕流(熵修正)算例说明文档.pdf
new file mode 100644
index 0000000..80d383f
Binary files /dev/null and b/phenglei/tutorials/A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU/二维结构30p30n翼型低速绕流(熵修正)算例说明文档.pdf differ
diff --git a/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/bin/cfd_para_supersonic.hypara b/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/bin/cfd_para_supersonic.hypara
new file mode 100644
index 0000000..d186123
--- /dev/null
+++ b/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/bin/cfd_para_supersonic.hypara
@@ -0,0 +1,195 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 5000;
+
+int intervalStepFlow  = 500;
+int intervalStepPlot  = 500;
+int intervalStepForce = 50;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 3.0;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = -1.0;
+
+int inflowParaType = 0;
+double refReNumber = 1.0e5;
+double refDimensionalTemperature = 293;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+int    viscousType    = 0;
+string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 6;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw", "ausmpw+".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "minvan";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLStart = 0.1;
+
+double CFLEnd = 20.0;
+
+int CFLVaryStep = 100;
+
+double ktmax = 1.0e10;
+
+double LUSGSTolerance = 0.1;
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/cylinder.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 0;
+int limitVariables = 0;
+int limitVector = 1;
diff --git a/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..b9f1533
--- /dev/null
+++ b/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,36 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+//             9 -- Gridgen type of structured grid, *.dat/*.grd.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/cylinder.grd";
+string out_gfile  = "./grid/cylinder.fts";
diff --git a/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/bin/key.hypara b/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..5c88d75
--- /dev/null
+++ b/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/grid/网格地址.txt b/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/二维结构圆柱超声速绕流(熵修正)算例说明文档.pdf b/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/二维结构圆柱超声速绕流(熵修正)算例说明文档.pdf
new file mode 100644
index 0000000..1c1d749
Binary files /dev/null and b/phenglei/tutorials/A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU/二维结构圆柱超声速绕流(熵修正)算例说明文档.pdf differ
diff --git a/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/bin/cfd_para_transonic.hypara b/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..6d191af
--- /dev/null
+++ b/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/bin/cfd_para_transonic.hypara
@@ -0,0 +1,203 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 10000;
+
+int intervalStepFlow  = 500;
+int intervalStepPlot  = 500;
+int intervalStepForce = 50;
+int intervalStepRes   = 50;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.73;
+double attackd       = 2.31;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 6;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "smooth";
+double MUSCLCoefXk = 0.333333;
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 5.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 10.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/rae2822_vis2d__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), iblank(81).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
diff --git a/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..675cf00
--- /dev/null
+++ b/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/rae2822_vis2d.grd";
+string out_gfile  = "./grid/rae2822_vis2d.fts";
diff --git a/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/bin/key.hypara b/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..686cff9
--- /dev/null
+++ b/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/bin/partition.hypara b/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..2a1a0e5
--- /dev/null
+++ b/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/rae2822_vis2d.fts";
+string partition_grid_file = "./grid/rae2822_vis2d__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/grid/网格地址.txt b/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/二维结构Rae2822翼型跨声速绕流(熵修正)算例说明文档.pdf b/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/二维结构Rae2822翼型跨声速绕流(熵修正)算例说明文档.pdf
new file mode 100644
index 0000000..f5ec176
Binary files /dev/null and b/phenglei/tutorials/A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU/二维结构Rae2822翼型跨声速绕流(熵修正)算例说明文档.pdf differ
diff --git a/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..cff387c
--- /dev/null
+++ b/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,208 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 10000;
+
+int intervalStepFlow  = 500;
+int intervalStepPlot  = 500;
+int intervalStepForce = 50;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 10.00;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = -1.0;
+
+int inflowParaType = 0;
+double refReNumber = 1.835e5;
+double refDimensionalTemperature = 293;
+double freestream_vibration_temperature = 300.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+//The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity = 1.0e3;
+
+//The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 6;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw", "ausmpw+".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth", "vanalbada".
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "minvan";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLStart = 0.1;
+double CFLEnd   = 20.0;
+int CFLVaryStep = 100;
+
+double ktmax    = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/cylinder.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
\ No newline at end of file
diff --git a/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..b9f1533
--- /dev/null
+++ b/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,36 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+//             9 -- Gridgen type of structured grid, *.dat/*.grd.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/cylinder.grd";
+string out_gfile  = "./grid/cylinder.fts";
diff --git a/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/bin/key.hypara b/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..63c7ada
--- /dev/null
+++ b/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/grid/网格地址.txt b/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/二维结构圆柱高超声速绕流(熵修正)算例说明文档.pdf b/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/二维结构圆柱高超声速绕流(熵修正)算例说明文档.pdf
new file mode 100644
index 0000000..8839eba
Binary files /dev/null and b/phenglei/tutorials/A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU/二维结构圆柱高超声速绕流(熵修正)算例说明文档.pdf differ
diff --git a/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/bin/cfd_para.hypara b/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/bin/cfd_para_transonic.hypara b/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..884f859
--- /dev/null
+++ b/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/bin/cfd_para_transonic.hypara
@@ -0,0 +1,205 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 15000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.785;
+double attackd       = 2.61;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 1.703665e7;
+double refDimensionalTemperature = 298.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 0.1937;            // unit of meter.
+double forceReferenceArea = 0.12892;              // unit of meter^2.
+double TorqueRefX = 0.66087;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+int    viscousType    = 4;
+string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "smooth";
+double MUSCLCoefXk        = 0.333333;
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 5.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int tscheme = 8;
+
+int iunsteady = 0;
+
+double CFLEnd = 30.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/chn-t-structure__256.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), iblank(81).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
diff --git a/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/bin/grid_para.hypara b/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..f9a43b9
--- /dev/null
+++ b/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/bin/grid_para.hypara
@@ -0,0 +1,38 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//               0 -- Unstructured grid.
+//               1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//              -1 -- MULTI_TYPE
+//               1 -- HyperFLOW( PHengLEI ), *.fts.
+//               2 -- CGNS, *.cgns.
+//               3 -- Plot3D type of structured grid, *.dat/*.grd.
+//               4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//               5 -- Fluent, *.cas/*.msh.
+//               6 -- Ustar, mgrid.in.
+//               7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//               8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes     = 1;
+int axisRotateOrder[]    = [1];
+double axisRotateAngles[]= [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/chn-t-structure.cgns";
+string out_gfile  = "./grid/chn-t-structure.fts";
+
+
+
diff --git a/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/bin/key.hypara b/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/bin/key.hypara
new file mode 100644
index 0000000..1e90187
--- /dev/null
+++ b/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/bin/partition.hypara b/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/bin/partition.hypara
new file mode 100644
index 0000000..e115581
--- /dev/null
+++ b/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/bin/partition.hypara
@@ -0,0 +1,22 @@
+// pgridtype: The grid type.
+//               0 -- unstruct grid
+//               1 -- struct grid
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//			  Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//			           30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file     : original grid file that want to be divided(HyperFLOW/PHengLEI type, *.fts).
+// partition_grid_file    : target partition grid file(HyperFLOW/PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 256;
+
+string original_grid_file  = "./grid/chn-t-structure.fts";
+string partition_grid_file = "./grid/chn-t-structure__256.fts";
+
+
+// Number of multi-grid levels, ONLY used for structured grid.
+//               1 -- single level, 2 -- 2 level, N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+
diff --git a/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/grid/网格地址.txt b/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/三维结构CHNT跨声速流动(Matrix LUSGS)算例说明文档.pdf b/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/三维结构CHNT跨声速流动(Matrix LUSGS)算例说明文档.pdf
new file mode 100644
index 0000000..f67a27c
Binary files /dev/null and b/phenglei/tutorials/A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU/三维结构CHNT跨声速流动(Matrix LUSGS)算例说明文档.pdf differ
diff --git a/phenglei/tutorials/A32_TwoD_NACA0012_Inv_Ma0d2_Precondition_Struct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/A32_TwoD_NACA0012_Inv_Ma0d2_Precondition_Struct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/A32_TwoD_NACA0012_Inv_Ma0d2_Precondition_Struct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/A32_TwoD_NACA0012_Inv_Ma0d2_Precondition_Struct_1CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/A32_TwoD_NACA0012_Inv_Ma0d2_Precondition_Struct_1CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..30202cf
--- /dev/null
+++ b/phenglei/tutorials/A32_TwoD_NACA0012_Inv_Ma0d2_Precondition_Struct_1CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,196 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 8000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 1;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 2;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+int    viscousType    = 0;
+string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 5.0;
+double LUSGSTolerance = 0.1;
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/naca.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
+double MUSCLCoefXk = 0.333333;
\ No newline at end of file
diff --git a/phenglei/tutorials/A32_TwoD_NACA0012_Inv_Ma0d2_Precondition_Struct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/A32_TwoD_NACA0012_Inv_Ma0d2_Precondition_Struct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..a01481e
--- /dev/null
+++ b/phenglei/tutorials/A32_TwoD_NACA0012_Inv_Ma0d2_Precondition_Struct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/naca.grd";
+string out_gfile  = "./grid/naca.fts";
diff --git a/phenglei/tutorials/A32_TwoD_NACA0012_Inv_Ma0d2_Precondition_Struct_1CPU/bin/key.hypara b/phenglei/tutorials/A32_TwoD_NACA0012_Inv_Ma0d2_Precondition_Struct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..7c8a93a
--- /dev/null
+++ b/phenglei/tutorials/A32_TwoD_NACA0012_Inv_Ma0d2_Precondition_Struct_1CPU/bin/key.hypara
@@ -0,0 +1,63 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 2;
+int nparafile = 1;
+
+int nsimutask = 0;
+string parafilename = ./bin/cfd_para_subsonic.hypara
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 4;
+//string parafilename = "./bin/repository.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 13;
+//string parafilename = "./bin/lbm_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 15;
+//string parafilename = "./bin/gridcheck_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
+afilename2 = "";
diff --git a/phenglei/tutorials/A32_TwoD_NACA0012_Inv_Ma0d2_Precondition_Struct_1CPU/grid/网格地址.txt b/phenglei/tutorials/A32_TwoD_NACA0012_Inv_Ma0d2_Precondition_Struct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/A32_TwoD_NACA0012_Inv_Ma0d2_Precondition_Struct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..e13b446
--- /dev/null
+++ b/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,195 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 50;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.15;
+double attackd       = 15;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 6.0e6;
+double refDimensionalTemperature = 300.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 50.0;
+
+int nLUSGSSweeps = 4;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 4;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/NACA0012_unstr.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
diff --git a/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..07f4e0b
--- /dev/null
+++ b/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/NACA0012_unstr.cas";
+string out_gfile  = "./grid/NACA0012_unstr.fts";
diff --git a/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/bin/key.hypara b/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/bin/partition.hypara b/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/bin/partition.hypara
new file mode 100644
index 0000000..ff5b66f
--- /dev/null
+++ b/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 1;
+
+string original_grid_file  = "./grid/NACA0012_unstr.fts";
+string partition_grid_file = "./grid/NACA0012_unstr.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/grid/网格地址.txt b/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B01_TwoD_NACA0012_SA_Unstruct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/bin/cfd_para.hypara b/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..6cbdb9a
--- /dev/null
+++ b/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,195 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 50;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 1;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.09;
+double attackd       = 13.87;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 1.52e6;
+double refDimensionalTemperature = 297.78;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 10.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/NACA4412_unstr__2.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/bin/grid_para.hypara b/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..1886567
--- /dev/null
+++ b/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/NACA4412_unstr.cgns";
+string out_gfile  = "./grid/NACA4412_unstr.fts";
diff --git a/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/bin/key.hypara b/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/bin/partition.hypara b/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/bin/partition.hypara
new file mode 100644
index 0000000..8fa7892
--- /dev/null
+++ b/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 2;
+
+string original_grid_file  = "./grid/NACA4412_unstr.fts";
+string partition_grid_file = "./grid/NACA4412_unstr__2.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/grid/网格地址.txt b/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B02_TwoD_NACA4412_SA_Unstruct_2CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/bin/cfd_para_transonic.hypara b/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..6334a18
--- /dev/null
+++ b/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/bin/cfd_para_transonic.hypara
@@ -0,0 +1,203 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 20000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "nolim";
+double venkatCoeff      = 5.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 20.0;
+
+int nLUSGSSweeps = 5;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/rae2822_hybrid2d_fine.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), iblank(81).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
diff --git a/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..ae49410
--- /dev/null
+++ b/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/rae2822_hybrid2d_fine.cas";
+string out_gfile  = "./grid/rae2822_hybrid2d_fine.fts";
diff --git a/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/bin/key.hypara b/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..686cff9
--- /dev/null
+++ b/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/bin/partition.hypara b/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/bin/partition.hypara
new file mode 100644
index 0000000..d23a392
--- /dev/null
+++ b/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 1;
+
+string original_grid_file  = "./grid/rae2822_hybrid2d_fine.fts";
+string partition_grid_file = "./grid/rae2822_hybrid2d_fine.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/grid/网格地址.txt b/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B03_TwoD_Rae2822_SA_Unstruct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/bin/cfd_para.hypara b/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..76f17cf
--- /dev/null
+++ b/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,197 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 10000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.750;
+double attackd       = -0.304;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 2.12e7;
+double refDimensionalTemperature = 274.1;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 0.001;
+
+double forceReferenceLengthSpanWise = 0.58565;    // unit of meter.
+double forceReferenceLength = 0.1412;             // unit of meter.
+double forceReferenceArea = 0.0727;               // unit of meter^2.
+double TorqueRefX = 0.1579;                       // unit of meter. 
+double TorqueRefY = 0.0;                          // unit of meter.
+double TorqueRefZ = -0.03392;                     // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 50.0;
+
+int nLUSGSSweeps = 4;
+
+double LUSGSTolerance = 1e-20;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 4;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/F6WB_unstr__60.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
diff --git a/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/bin/grid_para.hypara b/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..5245e41
--- /dev/null
+++ b/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes     = 1;
+int axisRotateOrder[]    = [1];
+double axisRotateAngles[]= [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/F6WB_unstr.cgns";
+string out_gfile  = "./grid/F6WB_unstr.fts";
diff --git a/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/bin/key.hypara b/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/bin/key.hypara
new file mode 100644
index 0000000..a0551c1
--- /dev/null
+++ b/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/bin/partition.hypara b/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/bin/partition.hypara
new file mode 100644
index 0000000..0f9d857
--- /dev/null
+++ b/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 60;
+
+string original_grid_file  = "./grid/F6WB_unstr.fts";
+string partition_grid_file = "./grid/F6WB_unstr__60.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/grid/网格地址.txt b/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B04_ThreeD_DLR-F6_SA_Unstruct_60CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/bin/cfd_para.hypara b/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..cab8aa3
--- /dev/null
+++ b/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,195 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 2000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 6.00;
+double attackd       = 25.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 300.0;
+
+int inflowParaType = 0;
+double refReNumber = 1.106e7;
+double refDimensionalTemperature = 216.7;
+double freestream_vibration_temperature = 10000.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 0.001;
+
+double forceReferenceLengthSpanWise = 0.0847;    // unit of meter.
+double forceReferenceLength = 0.2805;            // unit of meter.
+double forceReferenceArea = 0.0121;              // unit of meter^2.
+double TorqueRefX = 0.16;                        // unit of meter. 
+double TorqueRefY = 0.0;                         // unit of meter.
+double TorqueRefZ = 0.0;                         // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd = 1.0;
+
+double ktmax  = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/X-38_unstr__128.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
+
diff --git a/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/bin/grid_para.hypara b/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..77af35a
--- /dev/null
+++ b/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes     = 1;
+int axisRotateOrder[]    = [1];
+double axisRotateAngles[]= [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/X-38_unstr.cgns";
+string out_gfile  = "./grid/X-38_unstr.fts";
diff --git a/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/bin/key.hypara b/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/bin/key.hypara
new file mode 100644
index 0000000..b892406
--- /dev/null
+++ b/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/bin/partition.hypara b/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/bin/partition.hypara
new file mode 100644
index 0000000..9e7f5ac
--- /dev/null
+++ b/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 128;
+
+string original_grid_file  = "./grid/X-38_unstr.fts";
+string partition_grid_file = "./grid/X-38_unstr__128.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/grid/网格地址.txt b/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B05_ThreeD_x38_Laminar_Unstruct_128CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/bin/cfd_para.hypara b/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/bin/cfd_para_transonic.hypara b/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..c81bea1
--- /dev/null
+++ b/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/bin/cfd_para_transonic.hypara
@@ -0,0 +1,204 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 4000;
+
+int intervalStepFlow  = 200;
+int intervalStepPlot  = 200;
+int intervalStepForce = 50;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 1.6;
+double attackd       = 40.0;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 2.5e5;
+double refDimensionalTemperature = 300;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 0.01;
+
+double forceReferenceLengthSpanWise = 0.0381;    // unit of meter.
+double forceReferenceLength = 0.0381;            // unit of meter.
+double forceReferenceArea = 0.00456;             // unit of meter^2.
+double TorqueRefX = 0.29845;                     // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 5.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLStart  = 5.0
+double CFLEnd    = 10.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/10zy__64.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), iblank(81).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
diff --git a/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/bin/grid_para.hypara b/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..eb37041
--- /dev/null
+++ b/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/10zy.cgns";
+string out_gfile  = "./grid/10zy.fts";
diff --git a/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/bin/key.hypara b/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/bin/key.hypara
new file mode 100644
index 0000000..1e90187
--- /dev/null
+++ b/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/bin/partition.hypara b/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/bin/partition.hypara
new file mode 100644
index 0000000..fc219fd
--- /dev/null
+++ b/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 64;
+
+string original_grid_file  = "./grid/10zy.fts";
+string partition_grid_file = "./grid/10zy__64.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/grid/网格地址.txt b/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..5b03509
--- /dev/null
+++ b/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,194 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 10.00;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 294;
+
+int inflowParaType = 0;
+double refReNumber = 1.0e5;
+double refDimensionalTemperature = 79;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "steger";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd      = 3.0;
+int    CFLVaryStep = 1000;
+
+double ktmax       = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/sphere_m10__4.fts";
+int plotFieldType = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
diff --git a/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..bdf9c04
--- /dev/null
+++ b/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/sphere_m10.cas";
+string out_gfile  = "./grid/sphere_m10.fts";
diff --git a/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/bin/key.hypara b/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..b892406
--- /dev/null
+++ b/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/bin/partition.hypara b/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..bb32185
--- /dev/null
+++ b/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/sphere_m10.fts";
+string partition_grid_file = "./grid/sphere_m10__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/grid/网格地址.txt b/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B07_ThreeD_Sphere_Laminar_Unstruct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..104c08e
--- /dev/null
+++ b/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,195 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 60000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.1;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 2.0e5;
+double refDimensionalTemperature = 293;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 10.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/2d_plate_laminar_unstr.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
diff --git a/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..8cf4417
--- /dev/null
+++ b/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/2d_plate_laminar_unstr.cas";
+string out_gfile  = "./grid/2d_plate_laminar_unstr.fts";
diff --git a/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/bin/key.hypara b/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/bin/partition.hypara b/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/bin/partition.hypara
new file mode 100644
index 0000000..abd839e
--- /dev/null
+++ b/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//			  Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//			           30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 1;
+
+string original_grid_file  = "./grid/2d_plate_laminar_unstr.fts";
+string partition_grid_file = "./grid/2d_plate_laminar_unstr.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/grid/网格地址.txt b/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B08_TwoD_Plate_Laminar_Unstruct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..c16c73f
--- /dev/null
+++ b/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,195 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+
+int intervalStepFlow  = 5000;
+int intervalStepPlot  = 5000;
+int intervalStepForce = 200;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 1.03e7;
+double refDimensionalTemperature = 293;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 100.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/2d_plate_turb_unstr.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
diff --git a/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..dfa1a28
--- /dev/null
+++ b/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/2d_plate_turb_unstr.cas";
+string out_gfile  = "./grid/2d_plate_turb_unstr.fts";
diff --git a/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/bin/key.hypara b/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/bin/partition.hypara b/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/bin/partition.hypara
new file mode 100644
index 0000000..80f9e64
--- /dev/null
+++ b/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 1;
+
+string original_grid_file  = "./grid/2d_plate_turb_unstr.fts";
+string partition_grid_file = "./grid/2d_plate_turb_unstr.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/grid/网格地址.txt b/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B09_TwoD_plate_SA_Unstruct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/bin/cfd_para_supersonic.hypara b/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/bin/cfd_para_supersonic.hypara
new file mode 100644
index 0000000..5e83027
--- /dev/null
+++ b/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/bin/cfd_para_supersonic.hypara
@@ -0,0 +1,190 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 20000;
+
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 2000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 2.85;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 268;
+
+int inflowParaType = 0;
+double refReNumber = 6.567e7;
+double refDimensionalTemperature = 102.1;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 0.026;  // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "minvan";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd = 2.0;
+
+double ktmax  = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/3d_16ramp_unstr.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
diff --git a/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..dbdab0a
--- /dev/null
+++ b/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes     = 1;
+int axisRotateOrder[]    = [1];
+double axisRotateAngles[]= [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/3d_16ramp_unstr.cgns";
+string out_gfile  = "./grid/3d_16ramp_unstr.fts";
diff --git a/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/bin/key.hypara b/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..6b51089
--- /dev/null
+++ b/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/bin/partition.hypara b/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/bin/partition.hypara
new file mode 100644
index 0000000..08f280b
--- /dev/null
+++ b/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 1;
+
+string original_grid_file  = "./grid/3d_16ramp_unstr.fts";
+string partition_grid_file = "./grid/3d_16ramp_unstr.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/grid/网格地址.txt b/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/bin/cfd_para.hypara b/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..50538d1
--- /dev/null
+++ b/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,196 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 15000;
+
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 2000;
+int intervalStepForce = 50;
+int intervalStepRes   = 20;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 7.00;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = -1.0;
+
+int inflowParaType = 0;
+double refReNumber = 4.0e6;
+double refDimensionalTemperature = 46.3;
+double freestream_vibration_temperature = 10000.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.1;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLStart = 1.0;
+double CFLEnd   = 5.0;
+
+double ktmax    = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/GK01_unstr__8.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
+
diff --git a/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/bin/grid_para.hypara b/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..31bbff0
--- /dev/null
+++ b/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes     = 1;
+int axisRotateOrder[]    = [1];
+double axisRotateAngles[]= [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/GK01_unstr.cgns";
+string out_gfile  = "./grid/GK01_unstr.fts";
diff --git a/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/bin/key.hypara b/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/bin/key.hypara
new file mode 100644
index 0000000..b892406
--- /dev/null
+++ b/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/bin/partition.hypara b/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/bin/partition.hypara
new file mode 100644
index 0000000..d4dc523
--- /dev/null
+++ b/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 8;
+
+string original_grid_file  = "./grid/GK01_unstr.fts";
+string partition_grid_file = "./grid/GK01_unstr__8.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/grid/网格地址.txt b/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..119a4b8
--- /dev/null
+++ b/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,196 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 30000;
+
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 2000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 8.15;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 288.0;
+
+int inflowParaType = 0;
+double refReNumber = 1.67e7;
+double refDimensionalTemperature = 56.0;
+double freestream_vibration_temperature = 10000.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "steger";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.01;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLStart    = 0.1;
+double CFLEnd      = 1.0;
+int    CFLVaryStep = 5000;
+
+double ktmax = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/3d_DoubleEllipse_unstr__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
diff --git a/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..be75fbb
--- /dev/null
+++ b/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/3d_DoubleEllipse_unstr.cas";
+string out_gfile  = "./grid/3d_DoubleEllipse_unstr.fts";
diff --git a/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/bin/key.hypara b/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..b892406
--- /dev/null
+++ b/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/bin/partition.hypara b/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..74ec350
--- /dev/null
+++ b/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/3d_DoubleEllipse_unstr.fts";
+string partition_grid_file = "./grid/3d_DoubleEllipse_unstr__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/grid/网格地址.txt b/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/bin/cfd_para.hypara b/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..f6bc07f
--- /dev/null
+++ b/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,195 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 30000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.78;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 17.03665e6;
+double refDimensionalTemperature = 298.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 0.1937;            // unit of meter.
+double forceReferenceArea = 0.12937;              // unit of meter^2.
+double TorqueRefX = 0.66087;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 100.0;
+
+int nLUSGSSweeps = 5;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/grid_chnt-1_m_2065W__100.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
diff --git a/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/bin/grid_para.hypara b/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..6f5da54
--- /dev/null
+++ b/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes     = 1;
+int axisRotateOrder[]    = [1];
+double axisRotateAngles[]= [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/grid_chnt-1_m_2065W.cgns";
+string out_gfile  = "./grid/grid_chnt-1_m_2065W.fts";
diff --git a/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/bin/key.hypara b/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/bin/key.hypara
new file mode 100644
index 0000000..a0551c1
--- /dev/null
+++ b/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/bin/partition.hypara b/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/bin/partition.hypara
new file mode 100644
index 0000000..cafd208
--- /dev/null
+++ b/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 100;
+
+string original_grid_file  = "./grid/grid_chnt-1_m_2065W.fts";
+string partition_grid_file = "./grid/grid_chnt-1_m_2065W__100.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/grid/网格地址.txt b/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B13_ThreeD_Chnt_SA_Unstruct_100CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..cf1d9ba
--- /dev/null
+++ b/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,195 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 10000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 19.0;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 9.0e6;
+double refDimensionalTemperature = 288.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 10.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 100.0;
+
+int nLUSGSSweeps = 5;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 2;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/30p30n_hygrid_2d__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
diff --git a/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..5d53edf
--- /dev/null
+++ b/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/30p30n_hygrid_2d.cas";
+string out_gfile  = "./grid/30p30n_hygrid_2d.fts";
diff --git a/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/bin/key.hypara b/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/bin/partition.hypara b/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..5d0be15
--- /dev/null
+++ b/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/30p30n_hygrid_2d.fts";
+string partition_grid_file = "./grid/30p30n_hygrid_2d__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/grid/网格地址.txt b/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B14-TwoD_30p30n_SA_Unstruct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..cf38747
--- /dev/null
+++ b/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,195 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 10000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.185;
+double attackd       = 6.00;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 2.51e6;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 100.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 2;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/2D_NLR7301_Unstr.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
diff --git a/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..c4e7572
--- /dev/null
+++ b/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/2D_NLR7301_Unstr.cgns";
+string out_gfile  = "./grid/2D_NLR7301_Unstr.fts";
diff --git a/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/bin/key.hypara b/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/bin/partition.hypara b/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/bin/partition.hypara
new file mode 100644
index 0000000..194744f
--- /dev/null
+++ b/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 1;
+
+string original_grid_file  = "./grid/2D_NLR7301_Unstr.fts";
+string partition_grid_file = "./grid/2D_NLR7301_Unstr.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/grid/网格地址.txt b/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B15-TwoD_NLR7301_SA_Unstruct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/bin/cfd_para.hypara b/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..f59b843
--- /dev/null
+++ b/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,194 @@
+x#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 30000;
+
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 2000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 9.91;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 293;
+
+int inflowParaType = 0;
+double refReNumber = 1.86e5;
+double refDimensionalTemperature = 51;
+double freestream_vibration_temperature = 10000.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 0.001;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 0.1017;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "steger";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd = 3.0;
+
+double ktmax  = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/3d_HCFlare_unstr__16.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
\ No newline at end of file
diff --git a/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/bin/grid_para.hypara b/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..42bc90a
--- /dev/null
+++ b/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes     = 1;
+int axisRotateOrder[]    = [1];
+double axisRotateAngles[]= [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/3d_HCFlare_unstr.cgns";
+string out_gfile  = "./grid/3d_HCFlare_unstr.fts";
diff --git a/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/bin/key.hypara b/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/bin/key.hypara
new file mode 100644
index 0000000..b892406
--- /dev/null
+++ b/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/bin/partition.hypara b/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/bin/partition.hypara
new file mode 100644
index 0000000..4591179
--- /dev/null
+++ b/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 16;
+
+string original_grid_file  = "./grid/3d_HCFlare_unstr.fts";
+string partition_grid_file = "./grid/3d_HCFlare_unstr__16.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/grid/网格地址.txt b/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B16-ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..a9bfcab
--- /dev/null
+++ b/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,201 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 20000;
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 1;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.1467;
+double attackd       = 0.0;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 3.34e6;
+double refDimensionalTemperature = 290.5;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+double wallTemperature = -300.0;
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// iviscous: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when iviscous = 3.
+//              -- "2eq-kw-menter-sst", when iviscous = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+int    viscousType    = 4;
+string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+int transitionType   = 2;
+double turbIntensity = 0.18;
+double freeStreamViscosity = 5.0;
+int freeturbIntensitySRModify = 1;
+
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "minvan";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 1.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               0 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+double CFLEnd  = 50.0;
+int nLUSGSSweeps = 3;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 4;
+int flowInitStep = 1000;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// isPlotVolumeField: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/sk-flat-2D_unstr__4.fts";
+int  walldistMethod     = 1;
+int plotFieldType       = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 15;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 8, 15, 18, 19, 20, 21, 51, 52];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 0;
+int limitVariables = 0;
+int limitVector = 0;
+
+
diff --git a/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..8336ce7
--- /dev/null
+++ b/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,39 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//               0 -- Unstructured grid.
+//               1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//              -1 -- MULTI_TYPE
+//               1 -- HyperFLOW( PHengLEI ), *.fts.
+//               2 -- CGNS, *.cgns.
+//               3 -- Plot3D type of structured grid, *.dat/*.grd.
+//               4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//               5 -- Fluent, *.cas/*.msh.
+//               6 -- Ustar, mgrid.in.
+//               7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//               8 -- GMSH, *.msh.
+int gridtype         = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype       = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string   from_gfile = "./grid/sk-flat-2D_unstr.cgns";
+string   out_gfile = "./grid/sk-flat-2D_unstr.fts";
+
+
+
+
diff --git a/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/bin/key.hypara b/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..431e270
--- /dev/null
+++ b/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
\ No newline at end of file
diff --git a/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/bin/partition.hypara b/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..0496837
--- /dev/null
+++ b/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/bin/partition.hypara
@@ -0,0 +1,23 @@
+// pgridtype: The grid type.
+//               0 -- unstruct grid
+//               1 -- struct grid
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//			  Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//			           30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file     : original grid file that want to be divided(HyperFLOW/PHengLEI type, *.fts).
+// partition_grid_file    : target partition grid file(HyperFLOW/PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/sk-flat-2D_unstr.fts";
+string partition_grid_file = "./grid/sk-flat-2D_unstr__4.fts";
+
+
+// Number of multi-grid levels, ONLY used for structured grid.
+//               1 -- single level, 2 -- 2 level, N -- N level, ..., et al.
+int   numberOfMultigrid = 1;
+
+
+
diff --git a/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/grid/网格地址.txt b/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/二维非结构低速平板转捩算例说明文档.pdf b/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/二维非结构低速平板转捩算例说明文档.pdf
new file mode 100644
index 0000000..98b7820
Binary files /dev/null and b/phenglei/tutorials/B17-TwoD_Plate_S-KSR_SST_Unstruct_4CPU/二维非结构低速平板转捩算例说明文档.pdf differ
diff --git a/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/README.txt b/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/README.txt
new file mode 100644
index 0000000..b944936
--- /dev/null
+++ b/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/README.txt
@@ -0,0 +1,2 @@
+本算例在定常状态下采用RANS方法模拟CRM-HL高升力外形标模（B型网格）在大攻角状态下的气动特性。
+网格下载地址：http://hiliftpw.larc.nasa.gov/Workshop4/grids_downloads.html
\ No newline at end of file
diff --git a/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/bin/cfd_para.hypara b/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..a2a8621
--- /dev/null
+++ b/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,194 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 50；
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 17.05;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 7.8369E05;
+double refDimensionalTemperature = 289.44;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 0.0254;
+
+double forceReferenceLengthSpanWise = 29.38145;    // unit of meter.
+double forceReferenceLength = 7.00532;            // unit of meter.
+double forceReferenceArea = 191.8488;              // unit of meter^2.
+double TorqueRefX = 33.67786;                      // unit of meter. 
+double TorqueRefY = 4.51993;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 100.0;
+
+int nLUSGSSweeps = 5;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/CRM-HL_40-37_Nominal_Unstr_LevelB_Q1__1024.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
diff --git a/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/bin/grid_para.hypara b/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..1724043
--- /dev/null
+++ b/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/bin/grid_para.hypara
@@ -0,0 +1,36 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+//             9 -- Gridgen type of structured grid, *.dat/*.grd.
+int gridtype   = 0;
+int nAxisRotateTimes     = 1;
+int axisRotateOrder[]    = [1];
+double axisRotateAngles[]= [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/CRM-HL_40-37_Nominal_Unstr_LevelB_Q1.cgns";
+string out_gfile  = "./grid/CRM-HL_40-37_Nominal_Unstr_LevelB_Q1.fts";
diff --git a/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/bin/key.hypara b/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/bin/key.hypara
new file mode 100644
index 0000000..1dd9f3c
--- /dev/null
+++ b/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/bin/key.hypara
@@ -0,0 +1,55 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int nsimutask = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 13;
+//string parafilename = "./bin/lbm_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/bin/partition.hypara b/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/bin/partition.hypara
new file mode 100644
index 0000000..bce7f1e
--- /dev/null
+++ b/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 1024;
+
+string original_grid_file  = "./grid/CRM-HL_40-37_Nominal_Unstr_LevelB_Q1.fts";
+string partition_grid_file = "./grid/CRM-HL_40-37_Nominal_Unstr_LevelB_Q1__1024.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/grid/网格地址.txt b/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B18-ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/bin/cfd_para.hypara b/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..93bb4c7
--- /dev/null
+++ b/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,194 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 10000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 13;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 4271366;
+double refDimensionalTemperature = 288.89;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 0.0254;
+
+double forceReferenceLengthSpanWise = 2.160371;    // unit of meter.
+double forceReferenceLength = 1.007;            // unit of meter.
+double forceReferenceArea = 2.046468;              // unit of meter^2.
+double TorqueRefX = 0.872287;                      // unit of meter. 
+double TorqueRefY = 0;                      // unit of meter.
+double TorqueRefZ = 0.02413;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 100.0;
+
+int nLUSGSSweeps = 5;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/trap21_coarse_fixed__256.fts";
+int plotFieldType = 0;
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
diff --git a/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/bin/grid_para.hypara b/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..382ffc0
--- /dev/null
+++ b/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/bin/grid_para.hypara
@@ -0,0 +1,36 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+//             9 -- Gridgen type of structured grid, *.dat/*.grd.
+int gridtype   = 0;
+int nAxisRotateTimes      = 1;
+int axisRotateOrder[]     = [1];
+double axisRotateAngles[] = [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/trap21_coarse_fixed.cgns";
+string out_gfile  = "./grid/trap21_coarse_fixed.fts";
diff --git a/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/bin/key.hypara b/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/bin/key.hypara
new file mode 100644
index 0000000..1dd9f3c
--- /dev/null
+++ b/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/bin/key.hypara
@@ -0,0 +1,55 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int nsimutask = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 13;
+//string parafilename = "./bin/lbm_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/bin/partition.hypara b/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/bin/partition.hypara
new file mode 100644
index 0000000..eaf08fb
--- /dev/null
+++ b/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 256;
+
+string original_grid_file  = "./grid/trap21_coarse_fixed.fts";
+string partition_grid_file = "./grid/trap21_coarse_fixed__256.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/grid/网格地址.txt b/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B19_ThreeD_TrapWing_SA_AoA13_256CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..f5e81ad
--- /dev/null
+++ b/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,204 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 3000;
+
+int intervalStepFlow  = 100;
+int intervalStepPlot  = 100;
+int intervalStepForce = 100;
+int intervalStepRes   = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.15;
+double attackd       = 15.0;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 6.0e6;
+double refDimensionalTemperature = 300.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "nolim";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLStart     = 500;
+double CFLEnd       = 500;
+int    CFLVaryStep  = 1;
+
+int nLUSGSSweeps = 4;
+
+// GMRES control parameters
+double GMRESCFLScale = 1.006
+int flowInitMethod = 3;
+int OriginalTscheme = 9;
+int tscheme = 9;
+string gradientName     = "ggcell";
+string uns_scheme_name  = "GMRESRoe";
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 2200;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/NACA0012_unstr.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
diff --git a/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..07f4e0b
--- /dev/null
+++ b/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/NACA0012_unstr.cas";
+string out_gfile  = "./grid/NACA0012_unstr.fts";
diff --git a/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/bin/key.hypara b/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/bin/partition.hypara b/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/bin/partition.hypara
new file mode 100644
index 0000000..ff5b66f
--- /dev/null
+++ b/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 1;
+
+string original_grid_file  = "./grid/NACA0012_unstr.fts";
+string partition_grid_file = "./grid/NACA0012_unstr.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/grid/网格地址.txt b/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..e67d482
--- /dev/null
+++ b/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,216 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 2200;
+
+int intervalStepFlow  = 100;
+int intervalStepPlot  = 100;
+int intervalStepForce = 100;
+int intervalStepRes   = 1;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 10.00;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 294;
+
+int inflowParaType = 0;
+double refReNumber = 1.0e5;
+double refDimensionalTemperature = 79;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "1st";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLStart    = 0.01; 
+double CFLEnd      = 3.0;
+int    CFLVaryStep = 1000;
+
+double ktmax       = 1.0e10;
+
+int flowInitStep = 0;
+
+// the controlling parameters for GMRES
+double GMRESCFLScale = 1.009;
+int OriginalTscheme = 9;
+int tscheme = 9;
+int flowInitMethod = 3;
+string uns_scheme_name = "GMRESSteger";
+string gradientName = "ggcell";
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 2000;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/sphere_m10.fts";
+int plotFieldType = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
diff --git a/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..bdf9c04
--- /dev/null
+++ b/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/sphere_m10.cas";
+string out_gfile  = "./grid/sphere_m10.fts";
diff --git a/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/bin/key.hypara b/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..b892406
--- /dev/null
+++ b/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/bin/partition.hypara b/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/bin/partition.hypara
new file mode 100644
index 0000000..bb32185
--- /dev/null
+++ b/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/sphere_m10.fts";
+string partition_grid_file = "./grid/sphere_m10__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/grid/网格地址.txt b/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..3ad68f4
--- /dev/null
+++ b/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,71 @@
+# nBoundaryConditions: Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 5;
+string bcName = "blade";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "hub";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "shroud";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "inlet";
+{
+  int bcType = 52;
+  double totalPressure = 101325;
+  double totalTemperature = 288;
+  double direction_inlet[] = 1,0,0;
+  int directionMethod =0;
+}
+string bcName = "outlet";
+{
+  int bcType = 62;
+  double staticPressure = 100000 ;
+}
+
+# 'bcType' is defined as following:
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/cfd_para.hypara b/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..c14a82b
--- /dev/null
+++ b/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,236 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+
+int maxSimuStep       = 4000;
+
+int intervalStepFlow  = 200;
+int intervalStepPlot  = 200;
+int intervalStepForce = 20;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number. 
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = -1;
+int inflowParaType = 0;
+double refReNumber = 6e6;
+double refDimensionalTemperature = 288;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1;
+
+double forceReferenceLengthSpanWise = 1;    // unit of meter.
+double forceReferenceLength = 1;            // unit of meter.
+double forceReferenceArea = 1;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "minvan";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat" , "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat" ;
+double venkatCoeff      = 0.05;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 5;
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/R67.fts";
+int plotFieldType = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 15;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6,15, 38,39,40,41,42,43,44];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+
+int periodicType = 2; 
+double translationLength[] = [0.0,0.0,0.0];
+double rotationAngle = 16.363636;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+
+int referenceFrame = 2;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 1;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 10;
diff --git a/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/grid_para.hypara b/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..cd490de
--- /dev/null
+++ b/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/grid_para.hypara
@@ -0,0 +1,45 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/R67.cgns";
+string out_gfile  = "./grid/R67.fts";
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+int periodicType = 2; 
+double translationLength[] = [0.0,0.0,0.0];
+double rotationAngle = 16.363636;
\ No newline at end of file
diff --git a/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/key.hypara b/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/key.hypara
new file mode 100644
index 0000000..a0551c1
--- /dev/null
+++ b/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/partition.hypara b/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/partition.hypara
new file mode 100644
index 0000000..5c042c1
--- /dev/null
+++ b/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/bin/partition.hypara
@@ -0,0 +1,31 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 6;
+
+string original_grid_file  = "./grid/R67.fts";
+string partition_grid_file = "./grid/R67__6.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+int periodicType = 2; 
+double translationLength[] = [0.0,0.0,0.0];
+double rotationAngle = 16.363636;
diff --git a/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/grid/网格地址.txt b/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/三维非结构R67算例说明文档.pdf b/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/三维非结构R67算例说明文档.pdf
new file mode 100644
index 0000000..bfef966
Binary files /dev/null and b/phenglei/tutorials/B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU/三维非结构R67算例说明文档.pdf differ
diff --git a/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..753117b
--- /dev/null
+++ b/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,94 @@
+# nBoundaryConditions: Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 10;
+string bcName = "blade1";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "blade2";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "hub";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "hub2";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "shroud";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "shroud2";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "inlet1";
+{
+  int bcType = 52;
+  double totalPressure = 101325;
+  double totalTemperature = 288;
+  double direction_inlet[] = 1,0,0;
+  int directionMethod = 0;
+}
+string bcName = "inlet2";
+{
+  int bcType = 5;
+}
+string bcName = "outlet1";
+{
+  int bcType = 6;
+}
+string bcName = "outlet2";
+{
+  int bcType = 63;
+  double massFlow = 0.45;
+}
+
+# 'bcType' is defined as following:
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..6bdb35e
--- /dev/null
+++ b/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,235 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+
+int maxSimuStep       = 5000;
+
+int intervalStepFlow  = 200;
+int intervalStepPlot  = 200;
+int intervalStepForce = 20;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number. 
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = -1;
+int inflowParaType = 0;
+double refReNumber = 6e6;
+double refDimensionalTemperature = 288;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature =288;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 100000;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1;
+
+double forceReferenceLengthSpanWise = 1;    // unit of meter.
+double forceReferenceLength = 1;            // unit of meter.
+double forceReferenceArea = 1;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "minvan";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat" , "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat" ;
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 10;
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/stage35.fts";
+int plotFieldType = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 15;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6,15, 38,39,40,41,42,43,44];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+int periodicType = 2; 
+double translationLength[] = [0.0,0.0,0.0];
+double rotationAngle = 16.363636;
+
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 2;
+
+// nZone: the number of Global zone.
+int nTurboZone = 2;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "per11, per12, per21, per22";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [10, 7.826086957];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "outlet1, inlet2";
+
+//Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1800.0 , 0.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud,shroud2";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 20;
\ No newline at end of file
diff --git a/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/bin/grid_para.hypara b/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..d37daf4
--- /dev/null
+++ b/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/bin/grid_para.hypara
@@ -0,0 +1,74 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/stage35.cgns";
+string out_gfile  = "./grid/stage35.fts";
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+int periodicType = 2; 
+double translationLength[] = [0.0,0.0,0.0];
+double rotationAngle = 16.363636;
+
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 2;
+
+// nZone: the number of Global zone.
+int nTurboZone = 2;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "per11, per12, per21, per22";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [10, 7.826086957];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "outlet1, inlet2";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1800.0,0.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud1,shroud2";
\ No newline at end of file
diff --git a/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/bin/key.hypara b/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/bin/key.hypara
new file mode 100644
index 0000000..a0551c1
--- /dev/null
+++ b/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/grid/网格地址.txt b/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/三维非结构Stage35算例说明文档.pdf b/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/三维非结构Stage35算例说明文档.pdf
new file mode 100644
index 0000000..aa5b80e
Binary files /dev/null and b/phenglei/tutorials/B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU/三维非结构Stage35算例说明文档.pdf differ
diff --git a/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..5052b8e
--- /dev/null
+++ b/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,73 @@
+# nBoundaryConditions: Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 5;
+string bcName = "blade";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "hub";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "shroud";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "inlet";
+{
+  int bcType = 52;
+  double totalPressure = 169000;
+  double totalTemperature = 305;
+  //double massFlow = 1.5;
+  double direction_inlet[] = 1,0,0;
+  int directionMethod =0;
+}
+string bcName = "outlet";
+{
+  int bcType = 62;
+  //double massFlow = 1.5;
+  double staticPressure = 100000.0;
+}
+
+# 'bcType' is defined as following:
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..167ff62
--- /dev/null
+++ b/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,231 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 2000;
+
+int intervalStepFlow  = 100;
+int intervalStepPlot  = 100;
+int intervalStepForce = 20;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = -1.0;
+int inflowParaType = 0;
+double refReNumber = 1.5e7;
+double refDimensionalTemperature = 288;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1;
+
+double forceReferenceLengthSpanWise = 1;    // unit of meter.
+double forceReferenceLength = 1;            // unit of meter.
+double forceReferenceArea = 1;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "minvan";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 10;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/Aachen_1__4.fts";
+int plotFieldType = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 17;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 7,8,15, 38,39,40,41,42,43,44];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 1;
+int limitVector    = 0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+int periodicType = 2; 
+double translationLength[] = [0.0,0.0,0.0];
+double rotationAngle = 10;
+
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 2;
+
+// nZone: the number of Global zone.
+int nTurboZone = 1;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [10];
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [0.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+//nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 20;
\ No newline at end of file
diff --git a/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/grid_para.hypara b/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..ee29077
--- /dev/null
+++ b/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/grid_para.hypara
@@ -0,0 +1,73 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+int periodicType = 2; 
+double translationLength[] = [0.0,0.1,0.0];
+double rotationAngle = 10.0;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/Aachen_1.cgns";
+string out_gfile  = "./grid/Aachen_1.fts";
+
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 2;
+
+// nZone: the number of Global zone.
+int nTurboZone = 1;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [10];
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [0.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 20;
\ No newline at end of file
diff --git a/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/key.hypara b/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/key.hypara
new file mode 100644
index 0000000..a0551c1
--- /dev/null
+++ b/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/partition.hypara b/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..edd8bf9
--- /dev/null
+++ b/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/bin/partition.hypara
@@ -0,0 +1,31 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/Aachen_1.fts";
+string partition_grid_file = "./grid/Aachen_1__4.fts";
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+int periodicType = 2; 
+double translationLength[] = [0.0,0.0,0.0];
+double rotationAngle = 10;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/grid/网格地址.txt b/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/三维非结构Aachen算例说明文档.pdf b/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/三维非结构Aachen算例说明文档.pdf
new file mode 100644
index 0000000..669a1ed
Binary files /dev/null and b/phenglei/tutorials/B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU/三维非结构Aachen算例说明文档.pdf differ
diff --git a/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..c7c7ceb
--- /dev/null
+++ b/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,210 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 10000;
+
+int intervalStepFlow  = 300;
+int intervalStepPlot  = 200;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 8.03;
+double attackd       = 0.0;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 1.835e5;
+double refDimensionalTemperature = 124.94;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double wallTemperature = 294.44;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "3rdsmooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name   = "roe";
+string uns_limiter_name  = "vencat";
+double venkatCoeff       = 0.5; 
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady       = 0;
+int    tscheme      = 4;
+double CFLStart     = 0.01;
+double CFLEnd       = 2.0;
+int    CFLVaryStep  = 100;
+
+int    nLUSGSSweeps         = 4;
+double LUSGSTolerance       = 1.0e-20;
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/cylinder_mix__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), iblank(81).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 1;
+int limitVector = 1;
diff --git a/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/bin/grid_para.hypara b/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..73bf5c2
--- /dev/null
+++ b/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/bin/grid_para.hypara
@@ -0,0 +1,64 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+//           2 -- Hybrid grid, include both of unstructured and structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+
+// struct
+//int gridtype = 1;
+
+// unstrut
+//int gridtype = 0;
+
+// mix
+int gridtype   = 2;
+
+// default
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype       = 2;
+int omit_no_bound_bc = 1;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+
+// struct
+//string from_gfile = "./grid/str.cgns";
+//string out_gfile  = "./grid/str.fts";
+
+// unstruct
+//string from_gfile = "./grid/unstr.cgns";
+//string out_gfile  = "./grid/unstr.fts";
+
+// mix
+string mixgrid_uns = "./grid/unstr__4.fts";
+string mixgrid_str = "./grid/str__4.fts";
+string out_gfile   = "./grid/cylinder_mix__4.fts";
diff --git a/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/bin/key.hypara b/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/bin/key.hypara
new file mode 100644
index 0000000..015f693
--- /dev/null
+++ b/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
\ No newline at end of file
diff --git a/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/bin/partition.hypara b/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..20b2fdf
--- /dev/null
+++ b/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/bin/partition.hypara
@@ -0,0 +1,33 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+// struct
+//int pgridtype = 1;
+
+// unstruct
+int pgridtype = 0;
+
+// default
+int maxproc          = 4;
+int omit_no_bound_bc = 1;
+
+// struct
+//string original_grid_file  = "./grid/str.fts";
+//string partition_grid_file = "./grid/str__4.fts";
+
+// unstruct
+string original_grid_file  = "./grid/unstr.fts";
+string partition_grid_file = "./grid/unstr__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/grid/网格地址.txt b/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/二维圆柱混合求解算例说明文档.pdf b/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/二维圆柱混合求解算例说明文档.pdf
new file mode 100644
index 0000000..a1a37f8
Binary files /dev/null and b/phenglei/tutorials/C01_TwoD_Cylinder_Laminar_Mix_4CPU/二维圆柱混合求解算例说明文档.pdf differ
diff --git a/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/bin/cfd_para_transonic.hypara b/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..35ab8c1
--- /dev/null
+++ b/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/bin/cfd_para_transonic.hypara
@@ -0,0 +1,210 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 20000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 500;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+int    viscousType    = 4;
+string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "3rdsmooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+int    ivencat          = 5;
+string gradientName     = "ggcell";
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int    iunsteady        = 0;
+int    tscheme      = 4;
+double CFLStart     = 0.01;
+double CFLEnd       = 10.0;
+int    CFLVaryStep  = 100;
+
+int    nLUSGSSweeps         = 4;
+double LUSGSTolerance       = 1.0e-20;
+double coefofstrflux        = 0.0;
+double limitcoefofinterface = 1.0;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 0;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/rae2822_mix__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), iblank(81).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
diff --git a/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/bin/grid_para.hypara b/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..75768db
--- /dev/null
+++ b/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/bin/grid_para.hypara
@@ -0,0 +1,64 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+//           2 -- Hybrid grid, include both of unstructured and structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+
+// struct
+//int gridtype = 1;
+
+// unstrut
+//int gridtype = 0;
+
+// mix
+int gridtype   = 2;
+
+// default
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype       = 2;
+int omit_no_bound_bc = 1;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+
+// struct
+//string from_gfile = "./grid/str.cgns";
+//string out_gfile  = "./grid/str.fts";
+
+// unstruct
+//string from_gfile = "./grid/unstr.cgns";
+//string out_gfile  = "./grid/unstr.fts";
+
+// mix
+string mixgrid_uns = "./grid/unstr__4.fts";
+string mixgrid_str = "./grid/str__4.fts";
+string out_gfile   = "./grid/rae2822_mix__4.fts";
diff --git a/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/bin/key.hypara b/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/bin/key.hypara
new file mode 100644
index 0000000..5173939
--- /dev/null
+++ b/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/bin/partition.hypara b/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..4182108
--- /dev/null
+++ b/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/bin/partition.hypara
@@ -0,0 +1,33 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+// struct
+//int pgridtype = 1;
+
+// unstruct
+int pgridtype   = 0;
+
+// default
+int maxproc          = 4;
+int omit_no_bound_bc = 1;
+
+// struct
+//string original_grid_file  = "./grid/str.fts";
+//string partition_grid_file = "./grid/str__4.fts";
+
+// unstruct
+string original_grid_file  = "./grid/unstr.fts";
+string partition_grid_file = "./grid/unstr__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/grid/网格地址.txt b/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/二维rae2822混合求解算例说明文档.pdf b/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/二维rae2822混合求解算例说明文档.pdf
new file mode 100644
index 0000000..20a0f79
Binary files /dev/null and b/phenglei/tutorials/C02_TwoD_Rae2822_SST_Mix_4CPU/二维rae2822混合求解算例说明文档.pdf differ
diff --git a/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/bin/cfd_para.hypara b/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/bin/cfd_para_transonic.hypara b/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..acee54e
--- /dev/null
+++ b/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/bin/cfd_para_transonic.hypara
@@ -0,0 +1,212 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 40000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 500;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.8395;
+double attackd       = 3.06;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 1.814e7;
+double refDimensionalTemperature = 270;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double wallTemperature = -1.0;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+int    viscousType = 4;
+string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "3rdsmooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+int    ivencat     = 5;
+string gradientName     = "ggcell";
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+int    tscheme     = 4;
+double CFLStart    = 0.01;
+double CFLEnd      = 2.0;
+int    CFLVaryStep = 100;
+
+int    nLUSGSSweeps         = 4;
+double LUSGSTolerance       = 1.0e-20;
+double coefofstrflux        = 0.0;
+double limitcoefofinterface = 1.0;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 0;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/M6_mix__64.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), iblank(81).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
diff --git a/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/bin/grid_para.hypara b/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..884245e
--- /dev/null
+++ b/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/bin/grid_para.hypara
@@ -0,0 +1,64 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+//           2 -- Hybrid grid, include both of unstructured and structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+
+// struct
+//int gridtype = 1;
+
+// unstrut
+//int gridtype = 0;
+
+// mix
+int gridtype   = 2;
+
+// default
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype       = 2;
+int omit_no_bound_bc = 1;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+
+// struct
+//string from_gfile = "./grid/str.cgns";
+//string out_gfile  = "./grid/str.fts";
+
+// unstruct
+//string from_gfile = "./grid/unstr.cgns";
+//string out_gfile  = "./grid/unstr.fts";
+
+// mix
+string mixgrid_uns = "./grid/unstr__64.fts";
+string mixgrid_str = "./grid/str__64.fts";
+string out_gfile   = "./grid/M6_mix__64.fts";
diff --git a/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/bin/key.hypara b/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/bin/key.hypara
new file mode 100644
index 0000000..08941cb
--- /dev/null
+++ b/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/bin/partition.hypara b/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/bin/partition.hypara
new file mode 100644
index 0000000..0d11daf
--- /dev/null
+++ b/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/bin/partition.hypara
@@ -0,0 +1,33 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+// struct
+int pgridtype = 1;
+
+// unstruct
+//int pgridtype = 0;
+
+// default
+int maxproc          = 64;
+int omit_no_bound_bc = 1;
+
+// struct
+string original_grid_file  = "./grid/str.fts";
+string partition_grid_file = "./grid/str__64.fts";
+
+// unstruct
+//string original_grid_file  = "./grid/unstr.fts";
+//string partition_grid_file = "./grid/unstr__64.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/grid/网格地址.txt b/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/三维M6机翼混合求解算例说明文档.pdf b/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/三维M6机翼混合求解算例说明文档.pdf
new file mode 100644
index 0000000..f3378c8
Binary files /dev/null and b/phenglei/tutorials/C03_ThreeD_M6_SST_Mix_64CPU/三维M6机翼混合求解算例说明文档.pdf differ
diff --git a/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/bin/cfd_para.hypara b/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/bin/cfd_para_transonic.hypara b/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..625a633
--- /dev/null
+++ b/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/bin/cfd_para_transonic.hypara
@@ -0,0 +1,212 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 70000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 500;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.750;
+double attackd       = -0.304;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 2.12464589e7;
+double refDimensionalTemperature = 274.1;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double wallTemperature = -1.0;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 0.001;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+int    viscousType = 4;
+string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "3rdsmooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+int    ivencat = 5;
+string gradientName     = "ggcell";
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+int    tscheme     = 4;
+double CFLStart    = 0.01;
+double CFLEnd      = 2.0;
+int    CFLVaryStep = 100;
+
+int    nLUSGSSweeps         = 4;
+double LUSGSTolerance       = 1.0e-20;
+double coefofstrflux        = 0.0;
+double limitcoefofinterface = 1.0;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 0;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/F6_mix__256.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), iblank(81).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
diff --git a/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/bin/grid_para.hypara b/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..cd6c6ee
--- /dev/null
+++ b/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/bin/grid_para.hypara
@@ -0,0 +1,64 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+//           2 -- Hybrid grid, include both of unstructured and structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+
+// struct
+//int gridtype   = 1;
+
+// unstrut
+//int gridtype   = 0;
+
+// mix
+int gridtype     = 2;
+
+// default
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype       = 2;
+int omit_no_bound_bc = 1;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+
+// struct
+//string from_gfile = "./grid/str.cgns";
+//string out_gfile  = "./grid/str.fts";
+
+// unstruct
+//string from_gfile = "./grid/unstr.cgns";
+//string out_gfile  = "./grid/unstr.fts";
+
+// mix
+string mixgrid_uns = "./grid/unstr__256.fts";
+string mixgrid_str = "./grid/str__256.fts";
+string out_gfile   = "./grid/F6_mix__256.fts";
diff --git a/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/bin/key.hypara b/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/bin/key.hypara
new file mode 100644
index 0000000..08941cb
--- /dev/null
+++ b/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/bin/partition.hypara b/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/bin/partition.hypara
new file mode 100644
index 0000000..f024c73
--- /dev/null
+++ b/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/bin/partition.hypara
@@ -0,0 +1,33 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+// struct
+int pgridtype   = 1;
+
+// unstruct
+//int pgridtype = 0;
+
+// default
+int maxproc          = 256;
+int omit_no_bound_bc = 1;
+
+// struct
+string original_grid_file  = "./grid/str.fts";
+string partition_grid_file = "./grid/str__256.fts";
+
+// unstruct
+//string original_grid_file  = "./grid/unstr.fts";
+//string partition_grid_file = "./grid/unstr__256.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/grid/网格地址.txt b/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/三维DLR-F6混合求解算例说明文档.pdf b/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/三维DLR-F6混合求解算例说明文档.pdf
new file mode 100644
index 0000000..54af65a
Binary files /dev/null and b/phenglei/tutorials/C04_ThreeD_F6-WB_SST_Mix_256CPU/三维DLR-F6混合求解算例说明文档.pdf differ
diff --git a/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..a819540
--- /dev/null
+++ b/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,220 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 20000;
+
+int intervalStepFlow  = 500;
+int intervalStepPlot  = 200;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 8.03;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 294.44;
+
+int inflowParaType = 0;
+double refReNumber = 1.835e5;
+double refDimensionalTemperature = 124.94;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd   = 10.0;
+int CFLVaryStep = 100;
+
+int    nLUSGSSweeps   = 4;
+double LUSGSTolerance = 1.0e-20;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/cylinder_str.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
+
+#########################################################################
+#                       High Order Struct Solver                        #
+#########################################################################
+// isFVMOrFDM:
+//        0 -- NSSolverStruct using Finite Volume Method.
+//        1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 1;
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-4;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
diff --git a/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..ad6339e
--- /dev/null
+++ b/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/cylinder_str.cgns";
+string out_gfile  = "./grid/cylinder_str.fts";
diff --git a/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/bin/key.hypara b/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..63c7ada
--- /dev/null
+++ b/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/bin/partition.hypara b/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/bin/partition.hypara
new file mode 100644
index 0000000..770b851
--- /dev/null
+++ b/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 1;
+
+string original_grid_file  = "./grid/cylinder_str.fts";
+string partition_grid_file = "./grid/cylinder_str.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/grid/网格地址.txt b/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/bin/cfd_para.hypara b/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..595a5da
--- /dev/null
+++ b/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,223 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+
+int intervalStepFlow  = 500;
+int intervalStepPlot  = 500;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 8.15;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 288.0;
+
+int inflowParaType = 0;
+double refReNumber = 1.67e7;
+double refDimensionalTemperature = 56.0;
+double freestream_vibration_temperature = 10000.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 0.01;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName    = "Euler";
+
+int    viscousType = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName    = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName    = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd      = 2.0;
+int    CFLVaryStep = 100;
+
+int    nLUSGSSweeps   = 4;
+double LUSGSTolerance = 1.0e-20;
+
+double ktmax = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/dbl_yzg__48.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
+
+#########################################################################
+#                       High Order Struct Solver                        #
+#########################################################################
+// isFVMOrFDM:
+//        0 -- NSSolverStruct using Finite Volume Method.
+//        1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 1;
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-4;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
diff --git a/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/bin/grid_para.hypara b/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..3719a2a
--- /dev/null
+++ b/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/dbl_yzg.cgns";
+string out_gfile  = "./grid/dbl_yzg.fts";
diff --git a/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/bin/key.hypara b/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/bin/key.hypara
new file mode 100644
index 0000000..b892406
--- /dev/null
+++ b/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/bin/partition.hypara b/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/bin/partition.hypara
new file mode 100644
index 0000000..fa9f294
--- /dev/null
+++ b/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 48;
+
+string original_grid_file  = "./grid/dbl_yzg.fts";
+string partition_grid_file = "./grid/dbl_yzg__48.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/grid/网格地址.txt b/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/bin/cfd_para.hypara b/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..6b8a8c9
--- /dev/null
+++ b/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,196 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 19.0;
+double angleSlide    = 0.00;
+
+int    inflowParaType = 0;
+double refReNumber    = 9.0e6;
+double refDimensionalTemperature = 288.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+int    viscousType       = 4;
+string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#			  			Struct Solver		                       *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+string str_limiter_name    = "wenn3_prm211";
+
+#*******************************************************************
+#			  			UnStruct Solver                  		   *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid
+//                         - "vencat"
+//                         - "1st", meaning accuracy of first-order.
+//                         - "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'
+//			    The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady:           Steady or unsteady.
+//                          0 - steady
+//                          1 - unsteay 
+// CFLEnd:             The CFL number, [0.1, 100]
+//						The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps:              Number of Sub-iteration of LU-SGS.
+//						    1  : is recommended for structured solver.
+//						    1-3: is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 10.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+int plotFieldType = 1;		
+string gridfile   = "./grid/30p30n_str__6.fts";
+int plotFieldType = 0;
+
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+
diff --git a/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/bin/grid_para.hypara b/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..88e11ec
--- /dev/null
+++ b/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/bin/grid_para.hypara
@@ -0,0 +1,39 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//               0 -- Unstructured grid.
+//               1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order
+// from_gtype: Type of grid data type in grid conversion process.
+//              -1 -- MULTI_TYPE
+//               1 -- HyperFLOW( PHengLEI ), *.fts.
+//               2 -- CGNS, *.cgns.
+//               3 -- Plot3D type of structured grid, *.dat/*.grd.
+//               4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//               5 -- Fluent, *.cas/*.msh.
+//               6 -- Ustar, mgrid.in.
+//               7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//               8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/30p30n_str.grd";
+string out_gfile  = "./grid/30p30n_str.fts";
+
+
+
+
diff --git a/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/bin/key.hypara b/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/bin/partition.hypara b/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/bin/partition.hypara
new file mode 100644
index 0000000..b2bb210
--- /dev/null
+++ b/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/bin/partition.hypara
@@ -0,0 +1,23 @@
+// pgridtype: The grid type.
+//               0 -- unstruct grid
+//               1 -- struct grid
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//			  Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//			           30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file     : original grid file that want to be divided(HyperFLOW/PHengLEI type, *.fts).
+// partition_grid_file    : target partition grid file(HyperFLOW/PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 6;
+
+string original_grid_file  = "./grid/30p30n_str.fts";
+string partition_grid_file = "./grid/30p30n_str__6.fts";
+
+
+// Number of multi-grid levels, ONLY used for structured grid.
+//               1 -- single level, 2 -- 2 level, N -- N level, ..., et al.
+int numberOfMultigrid = 2;
+
+
+
diff --git a/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/grid/网格地址.txt b/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/二维结构30P30N高精度WENN格式算例说明文档.pdf b/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/二维结构30P30N高精度WENN格式算例说明文档.pdf
new file mode 100644
index 0000000..a35bd77
Binary files /dev/null and b/phenglei/tutorials/D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU/二维结构30P30N高精度WENN格式算例说明文档.pdf differ
diff --git a/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/bin/cfd_para.hypara b/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/bin/cfd_para_transonic.hypara b/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..a9b26df
--- /dev/null
+++ b/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/bin/cfd_para_transonic.hypara
@@ -0,0 +1,205 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 10000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.8395;
+double attackd       = 3.06;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 1.171e7;
+double refDimensionalTemperature = 288;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceRefenenceLengthSpanWise = 1.0;    // unit of meter.
+double forceRefenenceLength = 1.0;            // unit of meter.
+double forceRefenenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+int    viscousType    = 4;
+string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "wenn3_zm";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 5.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               0 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 10.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 2;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/m6_str__8.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+
+double MUSCLCoefXk = 0.333333;
diff --git a/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/bin/grid_para.hypara b/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..046d6df
--- /dev/null
+++ b/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//               0 -- Unstructured grid.
+//               1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//               2 -- CGNS, *.cgns.
+//               3 -- Plot3D type of structured grid, *.dat/*.grd.
+//               4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//               5 -- Fluent, *.cas/*.msh.
+//               6 -- Ustar, mgrid.in.
+//               7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//               8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 1;
+int axisRotateOrder[]     = [1];
+double axisRotateAngles[] = [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/m6_str.cgns";
+string out_gfile  = "./grid/m6_str.fts";
diff --git a/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/bin/key.hypara b/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/bin/key.hypara
new file mode 100644
index 0000000..1e90187
--- /dev/null
+++ b/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/bin/partition.hypara b/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/bin/partition.hypara
new file mode 100644
index 0000000..5d43175
--- /dev/null
+++ b/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//			  Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//			           30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 8;
+
+string original_grid_file  = "./grid/m6_str.fts";
+string partition_grid_file = "./grid/m6_str__8.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 2;
\ No newline at end of file
diff --git a/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/grid/网格地址.txt b/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/三维结构ONERA_M6高精度WENN格式算例说明文档.pdf b/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/三维结构ONERA_M6高精度WENN格式算例说明文档.pdf
new file mode 100644
index 0000000..918bc24
Binary files /dev/null and b/phenglei/tutorials/D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU/三维结构ONERA_M6高精度WENN格式算例说明文档.pdf differ
diff --git a/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/bin/cfd_para.hypara b/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..21f7e04
--- /dev/null
+++ b/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,204 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 2000;
+int intervalStepForce = 2000;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// dump_Q: Dump out thermal flux Q of solid wall.
+//         0 -- no dump out.
+//         1 -- dump out wall Q only.
+//         2 -- dump out wall Q & the typical position Q of ball.
+//         3 -- dump out wall Q & the typical position Q of cone.
+//         4 -- dump out wall Q & the typical position Q of double sphere.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 8.15;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 288.0;
+int    dump_Q = 1;
+
+int inflowParaType = 0;
+double refReNumber = 1.67e7;
+double refDimensionalTemperature = 56.0;
+double freestream_vibration_temperature = 10000.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 0.01;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "wenn3_prm211";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd       = 2.0;
+int    CFLVaryStep  = 100;
+
+int    nLUSGSSweeps   = 4;
+double LUSGSTolerance = 1.0e-20;
+
+double ktmax = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+int plotFieldType = 1;
+
+string gridfile   = "./grid/dbl_yzg__48.fts";
+int plotFieldType = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 0;
+int limitVariables = 0;
+int limitVector = 1;
+
diff --git a/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/bin/grid_para.hypara b/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..3719a2a
--- /dev/null
+++ b/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/dbl_yzg.cgns";
+string out_gfile  = "./grid/dbl_yzg.fts";
diff --git a/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/bin/key.hypara b/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/bin/key.hypara
new file mode 100644
index 0000000..b892406
--- /dev/null
+++ b/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/bin/partition.hypara b/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/bin/partition.hypara
new file mode 100644
index 0000000..fa9f294
--- /dev/null
+++ b/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 48;
+
+string original_grid_file  = "./grid/dbl_yzg.fts";
+string partition_grid_file = "./grid/dbl_yzg__48.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/grid/网格地址.txt b/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/三维结构双椭球高精度WENN格式算例说明文档.pdf b/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/三维结构双椭球高精度WENN格式算例说明文档.pdf
new file mode 100644
index 0000000..159b61e
Binary files /dev/null and b/phenglei/tutorials/D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct_48CPU/三维结构双椭球高精度WENN格式算例说明文档.pdf differ
diff --git a/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/bin/cfd_para.hypara b/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..f30ba11
--- /dev/null
+++ b/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,300 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 3000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice:Periodic boundary only support translation or rotation along the X axis!
+// periodicType: Which symmetry plane is used in the mesh.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+int periodicType = 1; 
+double translationLength[] = [0,3.14,0];
+double rotationAngle = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 3900.0;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+double limit_angle = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName  = "roe";
+string str_limiter_name    = "vanalbada";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+int ivencat             = 4;
+string uns_limiter_name = "nolim";
+double venkatCoeff      = 100.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 1;
+double physicalTimeStep = 0.005;
+int    ifStartFromSteadyResults = 0;
+int min_sub_iter = 20;
+int max_sub_iter = 20;
+double tol_sub_iter = 0.01;
+
+double ktmax = 1.0e10;
+
+double CFLStart = 0.01;
+double CFLEnd 	= 10.0;
+int CFLVaryStep = 500;
+
+int    nLUSGSSweeps   = 1;
+double LUSGSTolerance = 0.01;
+double dtau_max       = 1E-01;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 0;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/cylinder_270w_split120.fts";
+int walldistMethod = 0;
+int plotFieldType = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 10;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 11, 12, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
+
+//-----------------------------------------------------------------------
+#                           Turbulence Parameter                        #
+//-----------------------------------------------------------------------
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+//                   1 -- Edwards.
+//                   2 -- new.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+
+int turbInterval     = 1;
+int turb_vis_kind    = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double turb_relax    = 1.0;
+double turb_min_coef = 1.0e-1;
+double freeStreamViscosity = 1.0e-3;
+double muoo          =  1.0e-1;
+double kwoo          =  1.0;
+
+# maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e5;
+double sdilim = 1.0e20;
+double coef_kvist = 1.0;
+int monitor_vistmax = 0;
+
+//-----------------------------------------------------------------------
+#                           LES Parameter                               #
+//-----------------------------------------------------------------------
+// iLES: Create LESSolver or not.
+//       >= 1 - Create LESSolver;
+//       <  1 - not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 - in only first sub-iter;
+//             != 0 - in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 - not;
+//            != 0 - Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsm";
+//           = "wale".
+// deltaFunctionType: = 1 - MAX(deltai, deltaj, deltak);
+//                    = 2 - pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 - Devloped by Scotti.
+// wallDampingFunctionType: = 0 - no wall function;
+//                          = 1 - van Driest;
+//                          = 2 - developed by Dr. Deng Xiaobing;
+//                          = 3 - developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 - mu_total = mut           + mul;
+//                     = 1 - mu_total = max(mut-mul,0)+ mul;
+//                     = 2 - mu_total = max(mut    ,0)+ mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection[3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+
+int    iLES               = 1;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.11;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [1, 1, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+double MUSCLCoefXk = 0.8;
diff --git a/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/bin/grid_para.hypara b/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..1c422e0
--- /dev/null
+++ b/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/bin/grid_para.hypara
@@ -0,0 +1,46 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 1;
+int axisRotateOrder[]     = [1];
+double axisRotateAngles[] = [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/cylinder_270w_split120.cgns";
+string out_gfile  = "./grid/cylinder_270w_split120.fts";
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice:Periodic boundary only support translation or rotation along the X axis!
+// periodicType: Which symmetry plane is used in the mesh.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+int periodicType           = 1; 
+double translationLength[] = [0,3.14,0];
+double rotationAngle       = 0;
+
diff --git a/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/bin/key.hypara b/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/bin/key.hypara
new file mode 100644
index 0000000..0518a0f
--- /dev/null
+++ b/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/grid/网格地址.txt b/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/三维结构层流圆柱LES算例说明文档.pdf b/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/三维结构层流圆柱LES算例说明文档.pdf
new file mode 100644
index 0000000..caadc4c
Binary files /dev/null and b/phenglei/tutorials/E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU/三维结构层流圆柱LES算例说明文档.pdf differ
diff --git a/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/bin/cfd_para.hypara b/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..44e01f9
--- /dev/null
+++ b/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,261 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 10000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 3900.0;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+int ivencat             = 4;
+string uns_limiter_name = "nolim";
+double venkatCoeff      = 100.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 1;
+double physicalTimeStep = 0.1;
+int min_sub_iter = 25;
+int max_sub_iter = 25;
+double tol_sub_iter = -1.0;
+
+double ktmax = 1.0e5;
+
+double CFLStart = 0.1;
+double CFLEnd   = 10.0;
+int CFLVaryStep = 100;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/cylinder_les_unstr__120.fts";
+int walldistMethod = 0;
+int plotFieldType = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 10;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 11, 12, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
+
+//-----------------------------------------------------------------------
+#                           LES Parameter                               #
+//-----------------------------------------------------------------------
+// iLES: Create LESSolver or not.
+//       >= 1 - Create LESSolver;
+//       <  1 - not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 - in only first sub-iter;
+//             != 0 - in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 - not;
+//            != 0 - Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsm";
+//           = "wale".
+// deltaFunctionType: = 1 - MAX(deltai, deltaj, deltak);
+//                    = 2 - pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 - Devloped by Scotti.
+// wallDampingFunctionType: = 0 - no wall function;
+//                          = 1 - van Driest;
+//                          = 2 - developed by Dr. Deng Xiaobing;
+//                          = 3 - developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 - mu_total = mut           + mul;
+//                     = 1 - mu_total = max(mut-mul,0)+ mul;
+//                     = 2 - mu_total = max(mut    ,0)+ mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection[3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+
+int    iLES               = 1;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.11;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+double eddyViscosityLimit = 1.0e4;
+
diff --git a/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/bin/grid_para.hypara b/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..03c9f50
--- /dev/null
+++ b/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 1;
+int axisRotateOrder[]     = [1];
+double axisRotateAngles[] = [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/cylinder_les_unstr.cgns";
+string out_gfile  = "./grid/cylinder_les_unstr.fts";
diff --git a/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/bin/key.hypara b/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/bin/key.hypara
new file mode 100644
index 0000000..0518a0f
--- /dev/null
+++ b/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/bin/partition.hypara b/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/bin/partition.hypara
new file mode 100644
index 0000000..37eacba
--- /dev/null
+++ b/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 120;
+
+string original_grid_file  = "./grid/cylinder_les_unstr.fts";
+string partition_grid_file = "./grid/cylinder_les_unstr__120.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/grid/网格地址.txt b/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/三维非结构层流圆柱LES算例说明文档.pdf b/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/三维非结构层流圆柱LES算例说明文档.pdf
new file mode 100644
index 0000000..cb4545a
Binary files /dev/null and b/phenglei/tutorials/E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU/三维非结构层流圆柱LES算例说明文档.pdf differ
diff --git a/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/bin/cfd_para.hypara b/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..5839cd0
--- /dev/null
+++ b/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,300 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 400;
+
+int intervalStepFlow  = 100;
+int intervalStepPlot  = 100;
+int intervalStepForce = 10;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice:Periodic boundary only support translation or rotation along the X axis!
+// periodicType: Which symmetry plane is used in the mesh.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+int periodicType = 1; 
+double translationLength[] = [0.0,0.0,0.5];
+double rotationAngle = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.4;
+double attackd       = 9.29;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 50000.0;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName     = "roe";
+string str_limiter_name    = "3rdsmooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 1;
+double physicalTimeStep = 0.002;
+int    ifStaticsFlowField = 1;
+int    ifStaticsReynoldsStress = 1;
+int    startStatisticStep = 30010;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+
+int    min_sub_iter = 20;
+int    max_sub_iter = 20;
+
+double CFLStart     = 10.0;
+double CFLEnd       = 10.0;
+int    CFLVaryStep  = 1;
+
+int    nLUSGSSweeps        = 4;
+double LUSGSTolerance      = 1.0e-20;
+
+//-----------------------------------------------------------------------
+#                           LES Parameter                               #
+//-----------------------------------------------------------------------
+// iLES: Create LESSolver or not.
+//       >= 1 - Create LESSolver;
+//       <  1 - not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 - in only first sub-iter;
+//             != 0 - in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 - not;
+//            != 0 - Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsm";
+//           = "wale".
+// deltaFunctionType: = 1 - MAX(deltai, deltaj, deltak);
+//                    = 2 - pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 - Devloped by Scotti.
+// wallDampingFunctionType: = 0 - no wall function;
+//                          = 1 - van Driest;
+//                          = 2 - developed by Dr. Deng Xiaobing;
+//                          = 3 - developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 - mu_total = mut           + mul;
+//                     = 1 - mu_total = max(mut-mul,0)+ mul;
+//                     = 2 - mu_total = max(mut    ,0)+ mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection[3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+
+int    iLES               = 1;
+string sgsmodel           = "sigma";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 0;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.11;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [1, 1, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#########################################################################
+#                       High Order Struct Solver                        #
+#########################################################################
+// ifvfd:
+//        0 -- NSSolverStruct using Finite Volume Method.
+//        1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    ifvfd                               = 1;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-4;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "roe";
+string structhighordergradient             = "conservation";
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 0;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/naca0012_str_26m_yup__400.fts";
+int plotFieldType = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 9;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 8, 12, 14];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
+
+double eddyViscosityLimit = 1.0e5;
+double MUSCLCoefXk = 0.8;
\ No newline at end of file
diff --git a/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/bin/grid_para.hypara b/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..158e52d
--- /dev/null
+++ b/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/bin/grid_para.hypara
@@ -0,0 +1,45 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/naca0012_str_26m_yup.cgns";
+string out_gfile  = "./grid/naca0012_str_26m_yup.fts";
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice:Periodic boundary only support translation or rotation along the X axis!
+// periodicType: Which symmetry plane is used in the mesh.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+int periodicType           = 1; 
+double translationLength[] = [0.0,0.0,0.5];
+double rotationAngle       = 0.0;
diff --git a/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/bin/key.hypara b/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/bin/key.hypara
new file mode 100644
index 0000000..0518a0f
--- /dev/null
+++ b/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/bin/partition.hypara b/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/bin/partition.hypara
new file mode 100644
index 0000000..7783251
--- /dev/null
+++ b/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/bin/partition.hypara
@@ -0,0 +1,31 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 400;
+
+string original_grid_file  = "./grid/naca0012_str_26m_yup.fts";
+string partition_grid_file = "./grid/naca0012_str_26m_yup__400.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice:Periodic boundary only support translation or rotation along the X axis!
+// periodicType: Which symmetry plane is used in the mesh.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+int periodicType           = 1; 
+double translationLength[] = [0.0,0.0,0.5];
+double rotationAngle       = 0.0;
\ No newline at end of file
diff --git a/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/grid/网格地址.txt b/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/三维结构层流NACA0012翼型LES算例说明文档.pdf b/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/三维结构层流NACA0012翼型LES算例说明文档.pdf
new file mode 100644
index 0000000..07676c2
Binary files /dev/null and b/phenglei/tutorials/E03-ThreeD_NACA0012_LES_Struct_400CPU/三维结构层流NACA0012翼型LES算例说明文档.pdf differ
diff --git a/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/README.txt b/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/README.txt
new file mode 100644
index 0000000..472a79c
--- /dev/null
+++ b/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/README.txt
@@ -0,0 +1,2 @@
+本算例结构网格重叠装配过程在读网格阶段会在结构网格上重新构建非结构网格信息，然后按照非结构的方式进行重叠网格装配过程
+用户如需使用结构重叠，则需使用2171版本代码及相应算例库版本的F01结构重叠算例
\ No newline at end of file
diff --git a/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..3348a00
--- /dev/null
+++ b/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,41 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//               0 -- Unstructured grid.
+//               1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//              -1 -- MULTI_TYPE
+//               1 -- HyperFLOW( PHengLEI ), *.fts.
+//               2 -- CGNS, *.cgns.
+//               3 -- Plot3D type of structured grid, *.dat/*.grd.
+//               4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//               5 -- Fluent, *.cas/*.msh.
+//               6 -- Ustar, mgrid.in.
+//               7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//               8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 4;
+string   from_gfile  = "./grid/30p30n-background.cgns";
+string   from_gfile1 = "./grid/30p30n-main.cgns"; 
+string   from_gfile2 = "./grid/30p30n-flap.cgns"; 
+string   from_gfile3 = "./grid/30p30n-slat.cgns"; 
+
+
+
diff --git a/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/bin/key.hypara b/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..55a54b9
--- /dev/null
+++ b/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/bin/key.hypara
@@ -0,0 +1,57 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 2;
+int nparafile = 1;
+
+//int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+//string parafilename1  = "./bin/overset_config.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+int    nsimutask    = 6;
+string parafilename = "./bin/overset_config.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/bin/overset_config.hypara b/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/bin/overset_config.hypara
new file mode 100644
index 0000000..45446ad
--- /dev/null
+++ b/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/bin/overset_config.hypara
@@ -0,0 +1,35 @@
+// ----------------- overlap configuration ------------------------------
+// numberOfGridGroups: The number of grid groups.
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+                 the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid
+//             0 -- no.
+//             1 -- yes.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+
+int    numberOfGridGroups         = 4;
+string gridfile                   = "./grid/30p30n-background__4.fts";
+string gridfile1                  = "./grid/30p30n-main__4.fts";
+string gridfile2                  = "./grid/30p30n-slat__4.fts";
+string gridfile3                  = "./grid/30p30n-flap__4.fts";
+int    codeOfOversetGrid          = 1; 
+int    twoOrderInterpolationOrNot = 1;
+int    keyEnlargeOfActiveNodes    = 0;
+double gridScaleFactor            = 0.001;
+int    outTecplotOverset          = 1;      
+
+
diff --git a/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/bin/partition.hypara b/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..cad069c
--- /dev/null
+++ b/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/bin/partition.hypara
@@ -0,0 +1,31 @@
+// pgridtype: The grid type.
+//               0 -- unstruct grid
+//               1 -- struct grid
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//			  Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//			           30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file     : original grid file that want to be divided(HyperFLOW/PHengLEI type, *.fts).
+// partition_grid_file    : target partition grid file(HyperFLOW/PHengLEI type, *.fts).
+
+int numberOfGridFile = 4;
+int pgridtype  = 1;
+int pgridtype1 = 1;
+int pgridtype2 = 1;
+int pgridtype3 = 1;
+int maxproc  = 4;
+int maxproc1 = 4;
+int maxproc2 = 4;
+int maxproc3 = 4;
+
+string original_grid_file  = "./grid/30p30n-background.fts";
+string original_grid_file1 = "./grid/30p30n-main.fts"; 
+string original_grid_file2 = "./grid/30p30n-flap.fts"; 
+string original_grid_file3 = "./grid/30p30n-slat.fts"; 
+
+// Number of multi-grid levels, ONLY used for structured grid.
+//               1 -- single level, 2 -- 2 level, N -- N level, ..., et al.
+int   numberOfMultigrid = 1;
+
+
+
diff --git a/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/grid/网格地址.txt b/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/结构二维30p30n网格重叠装配_算例说明文档.pdf b/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/结构二维30p30n网格重叠装配_算例说明文档.pdf
new file mode 100644
index 0000000..84c22b2
Binary files /dev/null and b/phenglei/tutorials/F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU/结构二维30p30n网格重叠装配_算例说明文档.pdf differ
diff --git a/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/README.txt b/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/README.txt
new file mode 100644
index 0000000..472a79c
--- /dev/null
+++ b/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/README.txt
@@ -0,0 +1,2 @@
+本算例结构网格重叠装配过程在读网格阶段会在结构网格上重新构建非结构网格信息，然后按照非结构的方式进行重叠网格装配过程
+用户如需使用结构重叠，则需使用2171版本代码及相应算例库版本的F01结构重叠算例
\ No newline at end of file
diff --git a/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/bin/cfd_para.hypara b/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/bin/grid_para.hypara b/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..d7a5b01
--- /dev/null
+++ b/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/bin/grid_para.hypara
@@ -0,0 +1,42 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//               0 -- Unstructured grid.
+//               1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//         1 -- X-axis.
+//         2 -- Y-axis.
+//         3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//              -1 -- MULTI_TYPE
+//               1 -- HyperFLOW( PHengLEI ), *.fts.
+//               2 -- CGNS, *.cgns.
+//               3 -- Plot3D type of structured grid, *.dat/*.grd.
+//               4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//               5 -- Fluent, *.cas/*.msh.
+//               6 -- Ustar, mgrid.in.
+//               7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//               8 -- GMSH, *.msh.
+int gridtype         = 1;
+int nAxisRotateTimes      = 1;
+int axisRotateOrder[]     = [1];
+double axisRotateAngles[] = [90.0];
+int from_gtype       = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 4;
+string from_gfile    = "./grid/wing.cgns";
+string from_gfile1   = "./grid/missile1.cgns";
+string from_gfile2   = "./grid/missile2.cgns";
+string from_gfile3   = "./grid/missile3.cgns";
+
+
+
+
diff --git a/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/bin/key.hypara b/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/bin/key.hypara
new file mode 100644
index 0000000..75ed4d8
--- /dev/null
+++ b/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/bin/key.hypara
@@ -0,0 +1,58 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 3;
+int nparafile = 1;
+
+//int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+//string parafilename1  = "./bin/overset_config.hypara";
+//string parafilename2  = "./bin/kinetic_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+int    nsimutask    = 6;
+string parafilename = "./bin/overset_config.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/bin/overset_config.hypara b/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/bin/overset_config.hypara
new file mode 100644
index 0000000..9b23a21
--- /dev/null
+++ b/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/bin/overset_config.hypara
@@ -0,0 +1,36 @@
+// ----------------- overlap configuration ------------------------------
+// numberOfGridGroups: The number of grid groups.
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+                 the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid
+//             0 -- no.
+//             1 -- yes.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+
+int    numberOfGridGroups = 4;
+string gridfile           = "./grid/wing__8.fts"; 
+string gridfile1          = "./grid/missile1__8.fts";
+string gridfile2          = "./grid/missile2__8.fts";
+string gridfile3          = "./grid/missile3__8.fts";
+int    codeOfOversetGrid        = 1; 
+int    symetryOrNot             = 0; 
+double walldistMainZone          = 1.0;
+double toleranceForOversetSearch = 1.0e-5;
+double toleranceForOversetBox    = 1.0e-5;
+
+int twoOrderInterpolationOrNot = 0;  
+int keyEnlargeOfActiveNodes    = 0;
+int oversetInterpolationMethod = 1;  
+int outTecplotOverset          = 1;
+int outPutOversetVisualization = 0;
diff --git a/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/bin/partition.hypara b/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/bin/partition.hypara
new file mode 100644
index 0000000..57686d3
--- /dev/null
+++ b/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/bin/partition.hypara
@@ -0,0 +1,30 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int numberOfGridFile = 4;
+int pgridtype        = 1;
+int pgridtype1       = 1;
+int pgridtype2       = 1;
+int pgridtype3       = 1;
+int maxproc          = 8;
+int maxproc1         = 8;
+int maxproc2         = 8;
+int maxproc3         = 8;
+
+string original_grid_file  = "./grid/wing.fts";
+string original_grid_file1 = "./grid/missile1.fts";
+string original_grid_file2 = "./grid/missile2.fts";
+string original_grid_file3 = "./grid/missile3.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/grid/网格地址.txt b/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/结构三维多弹网格重叠装配_算例说明文档.pdf b/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/结构三维多弹网格重叠装配_算例说明文档.pdf
new file mode 100644
index 0000000..dc5bf5f
Binary files /dev/null and b/phenglei/tutorials/F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU/结构三维多弹网格重叠装配_算例说明文档.pdf differ
diff --git a/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/cfd_para_transonic.hypara b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..1ddbbaa
--- /dev/null
+++ b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/cfd_para_transonic.hypara
@@ -0,0 +1,202 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 300;
+
+int intervalStepFlow  = 100;
+int intervalStepPlot  = 100;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.755;
+double attackd       = 0.016;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 0.001;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+int    viscousType = 0;
+string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 5.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 30.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+int plotFieldType = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), iblank(81).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
diff --git a/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..bdab584
--- /dev/null
+++ b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,41 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+
+int numberOfGridFile = 5;
+string from_gfile    = "./grid/aux-lower.cgns";
+string from_gfile1   = "./grid/aux-upper.cgns";
+string from_gfile2   = "./grid/background.cgns";
+string from_gfile3   = "./grid/lowerwing.cgns";
+string from_gfile4   = "./grid/upperwing.cgns";
+
diff --git a/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/key.hypara b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..1a8b02d
--- /dev/null
+++ b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/key.hypara
@@ -0,0 +1,56 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 2;
+int nparafile = 1;
+
+//int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+int    nsimutask    = 6;
+string parafilename = "./bin/overset_config.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/overset_config.hypara b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/overset_config.hypara
new file mode 100644
index 0000000..e986101
--- /dev/null
+++ b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/overset_config.hypara
@@ -0,0 +1,43 @@
+// ----------------- overlap configuration ------------------------------
+// numberOfGridGroups: The number of grid groups.
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+                 the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid
+//             0 -- no.
+//             1 -- yes.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+
+int    numberOfGridGroups   = 3;
+string gridfile             = "./grid/background__4.fts"; 
+string gridfile1            = "./grid/upperwing__4.fts";
+string gridfile2            = "./grid/lowerwing__4.fts";
+int    codeOfOversetGrid          = 1;            
+int    readOversetFileOrNot       = 0;      
+int    symetryOrNot               = 0;      
+int    readInAuxiliaryInnerGrid   = 1;    
+double gridScaleFactor            = 0.001;        
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string oversetGridFileName        = "./grid/overlap.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1e-3;
+double toleranceForOversetBox     = 1e-3;
+int    twoOrderInterpolationOrNot = 1;     
+int    keyEnlargeOfActiveNodes    = 1;      
+int    outTecplotOverset          = 1;      
+
+
diff --git a/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/partition.hypara b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..fdddd46
--- /dev/null
+++ b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/bin/partition.hypara
@@ -0,0 +1,27 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int numberOfGridFile = 3;
+int pgridtype        = 0;
+int pgridtype1       = 0;
+int pgridtype2       = 0;
+int maxproc          = 4;
+int maxproc1         = 4;
+int maxproc2         = 4;
+
+string original_grid_file  = "./grid/background.fts";
+string original_grid_file1 = "./grid/lowerwing.fts";
+string original_grid_file2 = "./grid/upperwing.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int   numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/grid/网格地址.txt b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/二维双NACA0012翼型非结构重叠网格装配说明文档.pdf b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/二维双NACA0012翼型非结构重叠网格装配说明文档.pdf
new file mode 100644
index 0000000..acfd1a5
Binary files /dev/null and b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/二维双NACA0012翼型非结构重叠网格装配说明文档.pdf differ
diff --git a/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/补充说明.txt b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/补充说明.txt
new file mode 100644
index 0000000..6f1a3a5
--- /dev/null
+++ b/phenglei/tutorials/F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU/补充说明.txt
@@ -0,0 +1,3 @@
+针对本算例，风雷代码cmake构建的时候请不要勾选USE_OVERSET选项！！！
+请不要勾选USE_OVERSET选项！！！
+请不要勾选USE_OVERSET选项！！！
\ No newline at end of file
diff --git a/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/cfd_para_transonic.hypara b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..1ddbbaa
--- /dev/null
+++ b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/cfd_para_transonic.hypara
@@ -0,0 +1,202 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 300;
+
+int intervalStepFlow  = 100;
+int intervalStepPlot  = 100;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.755;
+double attackd       = 0.016;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 0.001;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+int    viscousType = 0;
+string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 5.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 30.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+int plotFieldType = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), iblank(81).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
diff --git a/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..034abce
--- /dev/null
+++ b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,41 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+
+int    numberOfGridFile   =   5;
+string from_gfile  = "./grid/aux-lower.cgns";
+string from_gfile1 = "./grid/aux-upper.cgns";
+string from_gfile2 = "./grid/background.cgns";
+string from_gfile3 = "./grid/lowerwing.cgns";
+string from_gfile4 = "./grid/upperwing.cgns";
+
diff --git a/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/key.hypara b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..9ee4753
--- /dev/null
+++ b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/key.hypara
@@ -0,0 +1,57 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 2;
+int nparafile = 2;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+string parafilename1  = "./bin/overset_config.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 6;
+//string parafilename = "./bin/overset_config.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/overset_config.hypara b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/overset_config.hypara
new file mode 100644
index 0000000..503512b
--- /dev/null
+++ b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/overset_config.hypara
@@ -0,0 +1,38 @@
+// ----------------- overlap configuration ------------------------------
+// numberOfGridGroups: The number of grid groups.
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+                 the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+
+int    numberOfGridGroups   = 3;
+string gridfile             = "./grid/background__4.fts"; 
+string gridfile1            = "./grid/upperwing__4.fts";
+string gridfile2            = "./grid/lowerwing__4.fts";
+int    codeOfOversetGrid          = 1;      
+int    readOversetFileOrNot       = 0;      
+int    symetryOrNot               = 0;      
+int    readInAuxiliaryInnerGrid   = 1;     
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string oversetGridFileName        = "./grid/overlap.ovs";
+double walldistMainZone           = 1.0;
+double toleranceForOversetSearch  = 1e-3;
+double toleranceForOversetBox     = 1e-3;
+int    twoOrderInterpolationOrNot = 1;      
+int    keyEnlargeOfActiveNodes    = 1;      
+
+
diff --git a/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/partition.hypara b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..fdddd46
--- /dev/null
+++ b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/bin/partition.hypara
@@ -0,0 +1,27 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int numberOfGridFile = 3;
+int pgridtype        = 0;
+int pgridtype1       = 0;
+int pgridtype2       = 0;
+int maxproc          = 4;
+int maxproc1         = 4;
+int maxproc2         = 4;
+
+string original_grid_file  = "./grid/background.fts";
+string original_grid_file1 = "./grid/lowerwing.fts";
+string original_grid_file2 = "./grid/upperwing.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int   numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/grid/网格地址.txt b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/二维双NACA0012翼型非结构重叠网格计算算例说明文档.pdf b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/二维双NACA0012翼型非结构重叠网格计算算例说明文档.pdf
new file mode 100644
index 0000000..bf613a2
Binary files /dev/null and b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/二维双NACA0012翼型非结构重叠网格计算算例说明文档.pdf differ
diff --git a/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/补充说明.txt b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/补充说明.txt
new file mode 100644
index 0000000..6f1a3a5
--- /dev/null
+++ b/phenglei/tutorials/F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU/补充说明.txt
@@ -0,0 +1,3 @@
+针对本算例，风雷代码cmake构建的时候请不要勾选USE_OVERSET选项！！！
+请不要勾选USE_OVERSET选项！！！
+请不要勾选USE_OVERSET选项！！！
\ No newline at end of file
diff --git a/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..5a02dd4
--- /dev/null
+++ b/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,65 @@
+# nBoundaryConditions: Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 5;
+string bcName = "missile";
+{
+  string bodyName = "body1";
+  int bcType = 2;
+}
+string bcName = "wing";
+{
+  string bodyName = "body0";
+  int bcType = 2;
+}
+string bcName = "symmetry";
+{
+  int bcType = 3;
+}
+string bcName = "farfield";
+{
+  int bcType = 4;
+}
+string bcName = "overset";
+{
+  int bcType = 1000;
+}
+
+# 'bcType' is defined as following:
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/cfd_para.hypara b/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/grid_para.hypara b/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..2847188
--- /dev/null
+++ b/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/grid_para.hypara
@@ -0,0 +1,40 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 1;
+int axisRotateOrder[]     = [1];
+double axisRotateAngles[] = [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+
+int numberOfGridFile = 4;
+string from_gfile    = "./grid/Missile.cgns";
+string from_gfile1   = "./grid/MissileIn.cgns";
+string from_gfile2   = "./grid/Wing.cgns";
+string from_gfile3   = "./grid/WingIn.cgns";
+
diff --git a/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/key.hypara b/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/key.hypara
new file mode 100644
index 0000000..75ed4d8
--- /dev/null
+++ b/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/key.hypara
@@ -0,0 +1,58 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 3;
+int nparafile = 1;
+
+//int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+//string parafilename1  = "./bin/overset_config.hypara";
+//string parafilename2  = "./bin/kinetic_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+int    nsimutask    = 6;
+string parafilename = "./bin/overset_config.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/overset_config.hypara b/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/overset_config.hypara
new file mode 100644
index 0000000..8e46233
--- /dev/null
+++ b/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/overset_config.hypara
@@ -0,0 +1,32 @@
+// ----------------- overlap configuration ------------------------------
+// numberOfGridGroups: The number of grid groups.
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+                 the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid
+//             0 -- no.
+//             1 -- yes.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+
+int    numberOfGridGroups = 2;
+string gridfile           = "./grid/Wing__8.fts"; 
+string gridfile1          = "./grid/Missile__8.fts";
+int    codeOfOversetGrid        = 1; 
+int    symetryOrNot             = 1; 
+int    readInAuxiliaryInnerGrid = 1; 
+string auxiliaryInnerGrid0      = "./grid/WingIn.fts";
+string auxiliaryInnerGrid1      = "./grid/MissileIn.fts";
+
+int twoOrderInterpolationOrNot = 1;  
+int keyEnlargeOfActiveNodes    = 3;  
+int outTecplotOverset          = 1;
diff --git a/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/partition.hypara b/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/partition.hypara
new file mode 100644
index 0000000..565ab94
--- /dev/null
+++ b/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/bin/partition.hypara
@@ -0,0 +1,25 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int numberOfGridFile = 2;
+int pgridtype        = 0;
+int pgridtype1       = 0;
+int maxproc          = 8;
+int maxproc1         = 8;
+
+string original_grid_file  = "./grid/Missile.fts";
+string original_grid_file1 = "./grid/Wing.fts";
+
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/grid/网格地址.txt b/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/非结构三维AEDC吊舱分离_重叠装配算例说明文档.pdf b/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/非结构三维AEDC吊舱分离_重叠装配算例说明文档.pdf
new file mode 100644
index 0000000..3516c64
Binary files /dev/null and b/phenglei/tutorials/F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU/非结构三维AEDC吊舱分离_重叠装配算例说明文档.pdf differ
diff --git a/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..5a02dd4
--- /dev/null
+++ b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,65 @@
+# nBoundaryConditions: Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 5;
+string bcName = "missile";
+{
+  string bodyName = "body1";
+  int bcType = 2;
+}
+string bcName = "wing";
+{
+  string bodyName = "body0";
+  int bcType = 2;
+}
+string bcName = "symmetry";
+{
+  int bcType = 3;
+}
+string bcName = "farfield";
+{
+  int bcType = 4;
+}
+string bcName = "overset";
+{
+  int bcType = 1000;
+}
+
+# 'bcType' is defined as following:
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/cfd_para.hypara b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/cfd_para_transonic.hypara b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..d687d21
--- /dev/null
+++ b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/cfd_para_transonic.hypara
@@ -0,0 +1,209 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 10000;
+
+int intervalStepFlow  = 500;
+int intervalStepPlot  = 500;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.95;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+//int inflowParaType = 0;
+//double refReNumber = 7.87E6;
+//double refDimensionalTemperature = 288.15;
+
+int inflowParaType = 1;
+double height = 8.0;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+int    viscousType    = 0;
+string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 6;
+double roeEntropyScale  = 0.1;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 1.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady       = 0;
+double physicalTimeStepDimensional = 0.003;
+int min_sub_iter    = 20;
+int max_sub_iter    = 30;
+double tol_sub_iter = 1.0e-5;
+int aleStartStrategy = 1;
+int ifStartFromSteadyResults = 1;
+int nLUSGSSweeps = 2;
+
+int ifLocalTimeStep = 0;
+double CFLEnd       = 10.0;
+int CFLVaryStep     = 200;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 0;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+int plotFieldType = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
diff --git a/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/cfd_para_transonic_unsteady.hypara b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/cfd_para_transonic_unsteady.hypara
new file mode 100644
index 0000000..cbc441e
--- /dev/null
+++ b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/cfd_para_transonic_unsteady.hypara
@@ -0,0 +1,209 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 100;
+
+int intervalStepFlow  = 5;
+int intervalStepPlot  = 5;
+int intervalStepForce = 1;
+int intervalStepRes   = 1;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.95;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+//int inflowParaType = 0;
+//double refReNumber = 7.87E6;
+//double refDimensionalTemperature = 288.15;
+
+int inflowParaType = 1;
+double height = 8.0;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+int    viscousType    = 0;
+string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 6;
+double roeEntropyScale  = 0.1;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 1.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int    iunsteady        = 1;
+double physicalTimeStepDimensional = 0.003;
+int    min_sub_iter     = 20;
+int    max_sub_iter     = 30;
+double tol_sub_iter     = 1.0e-5;
+int    aleStartStrategy = 1;
+int    ifStartFromSteadyResults = 1;
+int nLUSGSSweeps        = 2;
+
+int    ifLocalTimeStep  = 0;
+double CFLEnd           = 10.0;
+int    CFLVaryStep      = 20;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 0;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// isPlotVolumeField: If dump out the whole field results to tecplot or not, 0 / 1.
+
+int plotFieldType  = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
diff --git a/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/grid_para.hypara b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..2847188
--- /dev/null
+++ b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/grid_para.hypara
@@ -0,0 +1,40 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 1;
+int axisRotateOrder[]     = [1];
+double axisRotateAngles[] = [90.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+
+int numberOfGridFile = 4;
+string from_gfile    = "./grid/Missile.cgns";
+string from_gfile1   = "./grid/MissileIn.cgns";
+string from_gfile2   = "./grid/Wing.cgns";
+string from_gfile3   = "./grid/WingIn.cgns";
+
diff --git a/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/key.hypara b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/key.hypara
new file mode 100644
index 0000000..cf5420f
--- /dev/null
+++ b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/key.hypara
@@ -0,0 +1,58 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 3;
+int nparafile = 3;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+string parafilename1  = "./bin/overset_config.hypara";
+string parafilename2  = "./bin/kinetic_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 6;
+//string parafilename = "./bin/overset_config.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/kinetic_para.hypara b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/kinetic_para.hypara
new file mode 100644
index 0000000..83ac8fb
--- /dev/null
+++ b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/kinetic_para.hypara
@@ -0,0 +1,62 @@
+int    codeOfAleModel = 1;
+
+#########################################################################
+#                           motive information                          #
+#########################################################################
+int numberOfMovingBodies     = 2;
+double referenceLength       = 1.0;
+double referenceVelocity     = 292.715;
+double referenceDensity      = 0.526445;
+
+int methodForKineticEquation = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0                 = 0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[]         = 0.0,     0.0,     0.0,     0.0,      0.0,      0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[]         = 0.0,    0.0,      0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[]      = 0.0 ,     0.0,      0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0,      0.0,      0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[]    = 0.0,      0.0,      0.0;
+// the object that the parts belong to.
+int    fartherIndex_0         = -1;
+// the moving method of parts.	 
+int  RBDMethod_0              = 0;
+
+##############################    body1    ##############################
+// mass of parts.
+double mass_1                 = 907.184;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_1[]         = 27.116,     488.094,     488.094,     0.0,      0.0,      0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_1[]         = 4.2615,    -0.89916,      3.302;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_1[]      = 0.0 ,     0.0,      0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_1[] = 0.0,      0.0,      0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_1[]    = 0.0,      0.0,      0.0;
+// the object that the parts belong to.
+int    fartherIndex_1         = -1;
+// the moving method of parts.	 
+int  RBDMethod_1              = 1;
+
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_1 = 9.8;
+
+// dimensional physical time for additional force(s).
+double addedForceTime_1[] = 0.054;
+
+// additional force(inertia system) fX fY fZ.  
+double addedForce_1[] = 0.0, -53342.42, 0.0;
+
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_1[] = 0.0, 0.0, -12129;
+
+// the deformation method of the parts.
+int morphing_1 = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/overset_config.hypara b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/overset_config.hypara
new file mode 100644
index 0000000..c234533
--- /dev/null
+++ b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/overset_config.hypara
@@ -0,0 +1,32 @@
+// ----------------- overlap configuration ------------------------------
+// numberOfGridGroups: The number of grid groups.
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+                 the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid
+//             0 -- no.
+//             1 -- yes.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+
+int    numberOfGridGroups = 2;
+string gridfile           = "./grid/Wing__8.fts"; 
+string gridfile1          = "./grid/Missile__8.fts";
+int    codeOfOversetGrid        = 1; 
+int    symetryOrNot             = 1; 
+int    readInAuxiliaryInnerGrid = 1; 
+string auxiliaryInnerGrid0      = "./grid/WingIn.fts";
+string auxiliaryInnerGrid1      = "./grid/MissileIn.fts";
+
+int twoOrderInterpolationOrNot = 1;  
+int keyEnlargeOfActiveNodes    = 3;  
+int oversetInterpolationMethod = 1;
diff --git a/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/partition.hypara b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/partition.hypara
new file mode 100644
index 0000000..565ab94
--- /dev/null
+++ b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/bin/partition.hypara
@@ -0,0 +1,25 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int numberOfGridFile = 2;
+int pgridtype        = 0;
+int pgridtype1       = 0;
+int maxproc          = 8;
+int maxproc1         = 8;
+
+string original_grid_file  = "./grid/Missile.fts";
+string original_grid_file1 = "./grid/Wing.fts";
+
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/grid/网格地址.txt b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/非结构三维AEDC吊舱分离非定常计算_算例说明文档.pdf b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/非结构三维AEDC吊舱分离非定常计算_算例说明文档.pdf
new file mode 100644
index 0000000..33508ab
Binary files /dev/null and b/phenglei/tutorials/F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady_InvisCal_Unstruct_8CPU/非结构三维AEDC吊舱分离非定常计算_算例说明文档.pdf differ
diff --git a/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..6ba1f52
--- /dev/null
+++ b/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,201 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 4000;
+
+int intervalStepFlow  = 100;
+int intervalStepPlot  = 100;
+int intervalStepForce = 1;
+int intervalStepRes   = 1;
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.6;
+double attackd       = 2.89;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 4.8e6;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.265;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// iviscous: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when iviscous = 3.
+//              -- "2eq-kw-menter-sst", when iviscous = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType  = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 5.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               0 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 1;
+double physicalTimeStep = 0.05;
+int    min_sub_iter = 20;
+int    max_sub_iter = 200;
+double tol_sub_iter = 0.001;
+int    aleStartStrategy = 1;
+
+int    ifLocalTimeStep = 1;
+double         dtau    = 0.05;
+
+double ktmax = 1.0e10;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 0;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/2D_NACA0012_PM_Str__4.fts";
+int plotFieldType = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
+int SSTProductType = 1;
\ No newline at end of file
diff --git a/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..5c5fff0
--- /dev/null
+++ b/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,39 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//               0 -- Unstructured grid.
+//               1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//              -1 -- MULTI_TYPE
+//               1 -- HyperFLOW( PHengLEI ), *.fts.
+//               2 -- CGNS, *.cgns.
+//               3 -- Plot3D type of structured grid, *.dat/*.grd.
+//               4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//               5 -- Fluent, *.cas/*.msh.
+//               6 -- Ustar, mgrid.in.
+//               7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//               8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/2D_NACA0012_PM_Str.cgns";
+string out_gfile  = "./grid/2D_NACA0012_PM_Str.fts";
+
+
+
+
diff --git a/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/key.hypara b/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..9c8bb90
--- /dev/null
+++ b/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title       =   "PHengLEI Main Parameter Control File";
+// IMPORTANT NOTICE：DON NOT MODIFY THE FOWLLOWING LINE
+string defaultParaFile   =   "./bin/cfd_para.hypara";
+// ndim: Dimensional of the grid: 2 or 3.
+// nparafile: the number of the parameter file.
+// nsimutask: simulation task type.
+//    0 -- CFD Solver of NS or Turbulation.
+//    1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//         Grid conversion: from other format to HyperFLOW format (.fts).
+//         Grid reconstruction: such as grid adaptation.
+//         Grid merging: merge two blocks into one block.
+//         Grid repairing: repair the original grid in order to remove the negative volume cells.
+//    2 -- Wall distance computation for turb-solver.
+//    3 -- Grid partition.
+//    4 -- Knowledge repository / examples of PHengLEI-API.
+int  ndim         =   2;
+int  nparafile    =   2;
+
+int    nsimutask          =   0;
+string parafilename       =   "./bin/cfd_para_subsonic.hypara";
+//string parafilename    = "./bin/cfd_para_transonic.hypara";
+//string parafilename    = "./bin/cfd_para_supersonic.hypara";
+//string parafilename    = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+string parafilename1      =   "./bin/kinetic_para.hypara"
+//string parafilename2      =   "./bin/overset_config.hypara";
+
diff --git a/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/kinetic_para.hypara b/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/kinetic_para.hypara
new file mode 100644
index 0000000..ef3858d
--- /dev/null
+++ b/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/kinetic_para.hypara
@@ -0,0 +1,56 @@
+#########################################################################
+#                           Parameter for RBD                           #
+#                           *����ѧ���������ٵ���ʽ                     #
+#########################################################################
+int    codeOfAleModel = 1;
+
+#########################################################################
+#                ��Ҫ����������Ϣ��NS���������ٻ���أ�                 #
+#########################################################################
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+                                  
+int strategyForFaceNormalVelocity = 0; //0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd; 
+int strategyForGCLSource          = 0; //0-present; 1-Ahn;
+
+#########################################################################
+#                          ����ѧ���̼�����ز���                       #
+#########################################################################
+//0:1st-Admas-Bashforth; 1:2nd-Admas-Bashforth; 2:1st-Implicit-Euler; 3:2nd-Implicit Euler; 4:2nd-Adams-Moulton; 5:3rd-Adams-Moulton
+int methodForKineticEquation   = 0;
+double relaxParameterOfKinetic = 0.1;
+
+#########################################################################
+#                           ��������˶���Ϣ                            #
+#########################################################################
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0                  = 1.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[]          = 1e-7,     1e-6,     1e-6,     0.0,      0.0,      0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[]          = 0.265 ,    0.0,      0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[]       = 0.0 ,     0.0,      0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[]  = 0.0,      0.0,      0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[]     = 0.0,      0.0,      0.0;
+// the object that the parts belong to.
+int    fartherIndex_0          = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[]     = 0.0      ,0.0      ,0.0      ,0.0      ,0.0      ,0.0;
+// the moving method of parts.	 
+int  RBDMethod_0                = 14;
+double amplitude_0              = 2.41;
+double reduceFrequency_0        = 0.0808;
+//string uDFSixDofFileName_0    = "./Bin/UDFSixDof.Parameter";
+// additional force(inertia system) fX fY fZ.        
+double addedForce_0[]           = 0.0      ,0.0      ,0.0       ;
+// additional moment(inertia system) mX mY mZ.       
+double addedMoment_0[]          = 0.0      ,0.0      ,0.0       ;
+// the deformation method of the parts.
+int    morphing_0               = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/partition.hypara b/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..a5a50e9
--- /dev/null
+++ b/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/bin/partition.hypara
@@ -0,0 +1,23 @@
+// pgridtype: The grid type.
+//               0 -- unstruct grid
+//               1 -- struct grid
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//			  Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//			           30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file     : original grid file that want to be divided(HyperFLOW/PHengLEI type, *.fts).
+// partition_grid_file    : target partition grid file(HyperFLOW/PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 4;
+
+string   original_grid_file  = "./grid/2D_NACA0012_PM_Str.fts";
+string   partition_grid_file = "./grid/2D_NACA0012_PM_Str__4.fts";
+
+
+// Number of multi-grid levels, ONLY used for structured grid.
+//               1 -- single level, 2 -- 2 level, N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+
+
diff --git a/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/grid/网格地址.txt b/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/二维结构NACA0012翼型俯仰振荡_算例说明文档.pdf b/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/二维结构NACA0012翼型俯仰振荡_算例说明文档.pdf
new file mode 100644
index 0000000..fd3d441
Binary files /dev/null and b/phenglei/tutorials/F07-TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU/二维结构NACA0012翼型俯仰振荡_算例说明文档.pdf differ
diff --git a/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/cfd_para.hypara b/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/cfd_para_supersonic.hypara b/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/cfd_para_supersonic.hypara
new file mode 100644
index 0000000..447ea5d
--- /dev/null
+++ b/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/cfd_para_supersonic.hypara
@@ -0,0 +1,206 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 2000;
+
+int intervalStepFlow  = 50;
+int intervalStepPlot  = 50;
+int intervalStepForce = 1;
+int intervalStepRes   = 1;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// dump_Q: Dump out thermal flux Q of solid wall.
+//         0 -- no dump out.
+//         1 -- dump out wall Q only.
+//         2 -- dump out wall Q & the typical position Q of ball.
+//         3 -- dump out wall Q & the typical position Q of cone.
+//         4 -- dump out wall Q & the typical position Q of double sphere.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 2.50;
+double attackd       = 0.0;
+double angleSlide    = 0.0;
+
+double wallTemperature = -1.0;
+int    dump_Q = 0;
+
+int inflowParaType = 0;
+double refReNumber = 4.8e6;
+double refDimensionalTemperature = 51.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temper ature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength         = 1.0;            // unit of meter.
+double forceReferenceArea           = 0.7854;              // unit of meter^2.
+double TorqueRefX = 5.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName   = "steger";
+string str_limiter_name     = "minvan";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int    iunsteady        = 1;
+double physicalTimeStep = 0.05;
+int    min_sub_iter     = 15;
+int    max_sub_iter     = 31;
+double tol_sub_iter     = 0.0001;
+int    aleStartStrategy = 1;
+int    ifStartFromSteadyResults = 1;
+
+int    ifLocalTimeStep  = 0;
+double CFLStart         = 0.1;
+double CFLEnd           = 20.0;
+int    CFLVaryStep      = 10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/finner__16.fts";
+int plotFieldType  = 1;
+int visualfileType = 1;
+int walldistMethod = 3;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 0;
+int limitVariables = 0;
+int limitVector = 0;
diff --git a/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/grid_para.hypara b/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..2676cea
--- /dev/null
+++ b/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/grid_para.hypara
@@ -0,0 +1,39 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//               0 -- Unstructured grid.
+//               1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//              -1 -- MULTI_TYPE
+//               1 -- HyperFLOW( PHengLEI ), *.fts.
+//               2 -- CGNS, *.cgns.
+//               3 -- Plot3D type of structured grid, *.dat/*.grd.
+//               4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//               5 -- Fluent, *.cas/*.msh.
+//               6 -- Ustar, mgrid.in.
+//               7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//               8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/finner.cgns";
+string out_gfile = "./grid/finner.fts";
+
+
+
+
diff --git a/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/key.hypara b/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/key.hypara
new file mode 100644
index 0000000..583f20e
--- /dev/null
+++ b/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title       =   "PHengLEI Main Parameter Control File";
+// IMPORTANT NOTICE：DON NOT MODIFY THE FOWLLOWING LINE
+string defaultParaFile   =   "./bin/cfd_para.hypara";
+// ndim: Dimensional of the grid: 2 or 3.
+// nparafile: the number of the parameter file.
+// nsimutask: simulation task type.
+//    0 -- CFD Solver of NS or Turbulation.
+//    1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//         Grid conversion: from other format to HyperFLOW format (.fts).
+//         Grid reconstruction: such as grid adaptation.
+//         Grid merging: merge two blocks into one block.
+//         Grid repairing: repair the original grid in order to remove the negative volume cells.
+//    2 -- Wall distance computation for turb-solver.
+//    3 -- Grid partition.
+//    4 -- Knowledge repository / examples of PHengLEI-API.
+int  ndim         =   3;
+int  nparafile    =   2;
+
+int    nsimutask          =   0;
+//string parafilename       =   "./bin/cfd_para_subsonic.hypara";
+//string parafilename    = "./bin/cfd_para_transonic.hypara";
+string parafilename    = "./bin/cfd_para_supersonic.hypara";
+//string parafilename    = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ----------------  advanced Parameters, DO NOT care it -----------
+int  numberOfGridProcessor    =   0;
+// ATP read
+string parafilename1      =   "./bin/kinetic_para.hypara"
+//string parafilename2      =   "./bin/overset_config.hypara";
+
diff --git a/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/kinetic_para.hypara b/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/kinetic_para.hypara
new file mode 100644
index 0000000..85e97a7
--- /dev/null
+++ b/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/kinetic_para.hypara
@@ -0,0 +1,48 @@
+#########################################################################
+#                           Parameter for RBD                           #
+#                           *����ѧ���������ٵ���ʽ                     #
+#########################################################################
+int    codeOfAleModel = 1;
+int strategyForFaceNormalVelocity = 0; //0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd; 
+int strategyForGCLSource          = 0; //0-present; 1-Ahn;
+
+#########################################################################
+#                          ����ѧ���̼�����ز���                       #
+#########################################################################
+//0:1st-Admas-Bashforth; 1:2nd-Admas-Bashforth; 2:1st-Implicit-Euler; 3:2nd-Implicit Euler; 4:2nd-Adams-Moulton; 5:3rd-Adams-Moulton
+int methodForKineticEquation   = 0;
+double relaxParameterOfKinetic = 1.0;
+
+#########################################################################
+#                           ��������˶���Ϣ                            #
+#########################################################################
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0                  = 1.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[]          = 1e-7,     1e-6,     1e-6,     0.0,      0.0,      0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[]          = 5.0 ,    0.0,      0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[]       = 0.0 ,     0.0,      0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[]  = 0.0,      0.0,      0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[]     = 0.0,      0.0,      0.0;
+// the object that the parts belong to.
+int    fartherIndex_0          = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[]     = 0.0      ,0.0      ,0.0      ,0.0      ,0.0      ,0.0;
+// the moving method of parts.	 
+int  RBDMethod_0                = 14;
+double amplitude_0              = 5.0;
+double reduceFrequency_0        = 0.05;
+//string uDFSixDofFileName_0    = "./Bin/UDFSixDof.Parameter";
+// additional force(inertia system) fX fY fZ.        
+double addedForce_0[]           = 0.0      ,0.0      ,0.0       ;
+// additional moment(inertia system) mX mY mZ.       
+double addedMoment_0[]          = 0.0      ,0.0      ,0.0       ;
+// the deformation method of the parts.
+int    morphing_0               = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/partition.hypara b/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/partition.hypara
new file mode 100644
index 0000000..6c56e18
--- /dev/null
+++ b/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/bin/partition.hypara
@@ -0,0 +1,23 @@
+// pgridtype: The grid type.
+//               0 -- unstruct grid
+//               1 -- struct grid
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//			  Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//			           30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file     : original grid file that want to be divided(HyperFLOW/PHengLEI type, *.fts).
+// partition_grid_file    : target partition grid file(HyperFLOW/PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 16;
+
+string original_grid_file  = "./grid/finner.fts";
+string partition_grid_file = "./grid/finner__16.fts";
+
+
+// Number of multi-grid levels, ONLY used for structured grid.
+//               1 -- single level, 2 -- 2 level, N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+
+
diff --git a/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/grid/网格地址.txt b/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/三维结构Finner弹体俯仰振荡_算例说明文档.pdf b/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/三维结构Finner弹体俯仰振荡_算例说明文档.pdf
new file mode 100644
index 0000000..ad36b04
Binary files /dev/null and b/phenglei/tutorials/F08-ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU/三维结构Finner弹体俯仰振荡_算例说明文档.pdf differ
diff --git a/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..8bb9a79
--- /dev/null
+++ b/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,69 @@
+# nBoundaryConditions : Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 4;
+string bcName = "BODY";
+{
+  int isSecondSegment = 0;
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "Segment1";
+{
+  int isSecondSegment = 0;
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "Segment2";
+{
+  int isSecondSegment = 1;
+  string bodyName = "body";
+  int bcType = 2;
+  double secondSegmentRotatePostionX = 6.0200968;
+  double secondSegmentRotatePostionY = 6.0266381;
+  double secondSegmentRotatePostionZ = 19.680012;
+}
+string bcName = "FAR";
+{
+  int bcType = 4;
+}
+
+# 'bcType' is defined as following:
+#    99: PERIODIC                  
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..5b8dd94
--- /dev/null
+++ b/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,195 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 0;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 100.0;
+
+int nLUSGSSweeps = 5;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/walldisttest1.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
diff --git a/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/grid_deform_para.hypara b/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/grid_deform_para.hypara
new file mode 100644
index 0000000..b4cb49c
--- /dev/null
+++ b/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/grid_deform_para.hypara
@@ -0,0 +1,34 @@
+// ----------------- Grid Deform Parameters -----------------------------
+// gridobj:  Task type of grid treatment.
+//           4 -- Grid deformation, achieve unstructured grid deformation.
+// deformationMethod: Grid Deform.
+//                1 -- SPRING.
+//                2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        :   The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    gridobj       = 4;
+int    nDeformStep   = 40;
+double flapAngle     = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 1;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP : Number of reference Control Points.
+// influencePara       : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara = 25.0;
diff --git a/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..3899a80
--- /dev/null
+++ b/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,36 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/Segment2Brid.cgns";
+string out_gfile  = "./grid/Segment2Brid.fts";
+
diff --git a/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/key.hypara b/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..c1b706a
--- /dev/null
+++ b/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 3;
+int nparafile = 1;
+
+//int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+int    nsimutask    = 1;
+string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/grid/网格地址.txt b/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/三维非结构扑翼动网格_算例说明文档 - SPRING.pdf b/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/三维非结构扑翼动网格_算例说明文档 - SPRING.pdf
new file mode 100644
index 0000000..d592ad1
Binary files /dev/null and b/phenglei/tutorials/F09-ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU/三维非结构扑翼动网格_算例说明文档 - SPRING.pdf differ
diff --git a/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..8bb9a79
--- /dev/null
+++ b/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,69 @@
+# nBoundaryConditions : Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 4;
+string bcName = "BODY";
+{
+  int isSecondSegment = 0;
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "Segment1";
+{
+  int isSecondSegment = 0;
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "Segment2";
+{
+  int isSecondSegment = 1;
+  string bodyName = "body";
+  int bcType = 2;
+  double secondSegmentRotatePostionX = 6.0200968;
+  double secondSegmentRotatePostionY = 6.0266381;
+  double secondSegmentRotatePostionZ = 19.680012;
+}
+string bcName = "FAR";
+{
+  int bcType = 4;
+}
+
+# 'bcType' is defined as following:
+#    99: PERIODIC                  
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/bin/grid_deform_para.hypara b/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/bin/grid_deform_para.hypara
new file mode 100644
index 0000000..7142976
--- /dev/null
+++ b/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/bin/grid_deform_para.hypara
@@ -0,0 +1,34 @@
+// ----------------- Grid Deform Parameters -----------------------------
+// gridobj:  Task type of grid treatment.
+//           4 -- Grid deformation, achieve unstructured grid deformation.
+// deformationMethod: Grid Deform.
+//                1 -- SPRING.
+//                2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        :   The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    gridobj       = 4;
+int    nDeformStep   = 40;
+double flapAngle     = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP : Number of reference Control Points.
+// influencePara       : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara = 25.0;
diff --git a/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..3899a80
--- /dev/null
+++ b/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,36 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/Segment2Brid.cgns";
+string out_gfile  = "./grid/Segment2Brid.fts";
+
diff --git a/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/bin/key.hypara b/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..c1b706a
--- /dev/null
+++ b/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 3;
+int nparafile = 1;
+
+//int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+int    nsimutask    = 1;
+string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/grid/网格地址.txt b/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/三维非结构扑翼动网格RBF_算例说明文档 - RBF.pdf b/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/三维非结构扑翼动网格RBF_算例说明文档 - RBF.pdf
new file mode 100644
index 0000000..c1300bf
Binary files /dev/null and b/phenglei/tutorials/F10-ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU/三维非结构扑翼动网格RBF_算例说明文档 - RBF.pdf differ
diff --git a/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..68e7bf8
--- /dev/null
+++ b/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,36 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+//             9 -- Gridgen type of structured grid, *.dat/*.grd.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/M6_unstr.cgns";
+string out_gfile  = "./grid/M6_unstr.fts";
diff --git a/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/bin/grid_refine_para.hypara b/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/bin/grid_refine_para.hypara
new file mode 100644
index 0000000..b6e8d71
--- /dev/null
+++ b/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/bin/grid_refine_para.hypara
@@ -0,0 +1,31 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// gridobj:  Task type of grid treatment.
+//           0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//           1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//           2 -- Grid refinement.
+//           3 -- Grid merging, merge two blocks into one block.
+//           4 -- Grid deformation, achieve unstructured grid deformation.
+//           5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//           6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//			 7 -- Grid type change, convert structured grid to unstructured grid.
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int gridtype    = 0;
+int gridobj     = 2;
+int anisoRefine = 0;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/M6_unstr__4.fts";
+string out_gfile  = "./grid/M6_unstr_refined__4.fts";
+
+
diff --git a/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/bin/key.hypara b/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..589b5d6
--- /dev/null
+++ b/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+int    nsimutask    = 1;
+string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/bin/partition.hypara b/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..6b6fc73
--- /dev/null
+++ b/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/M6_unstr.fts";
+string partition_grid_file = "./grid/M6_unstr__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/grid/网格地址.txt b/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/非结构三维M6机翼并行加密_算例说明文档.pdf b/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/非结构三维M6机翼并行加密_算例说明文档.pdf
new file mode 100644
index 0000000..8be234f
Binary files /dev/null and b/phenglei/tutorials/F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU/非结构三维M6机翼并行加密_算例说明文档.pdf differ
diff --git a/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/bin/cfd_para.hypara b/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..ae5f16c
--- /dev/null
+++ b/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,238 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 10000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 100;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// dump_Q: Dump out thermal flux Q of solid wall.
+//         0 -- no dump out.
+//         1 -- dump out wall Q only.
+//         2 -- dump out wall Q & the typical position Q of ball.
+//         3 -- dump out wall Q & the typical position Q of cone.
+//         4 -- dump out wall Q & the typical position Q of double sphere.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 8.7569;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 300.0;
+int    dump_Q = 0;
+
+int inflowParaType = 0;
+double refReNumber = 4.7001e5;
+double refDimensionalTemperature = 694.00;
+double freestream_vibration_temperature = 694.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceRefenenceLengthSpanWise = 1.0;    // unit of meter.
+double forceRefenenceLength = 1.0;            // unit of meter.
+double forceRefenenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+int    viscousType = 1;
+string viscousName = "laminar";
+
+//int    viscousType = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "ausmdv";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd = 10.0;
+int    CFLVaryStep = 1000;
+double ktmax = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// isPlotVolumeField: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/2D_HEG_CYLINDER_65X88_DY2D-7__4.fts";
+int isPlotVolumeField = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 0;
+int limitVariables = 0;
+int limitVector = 1;
+
+#########################################################################
+#                       Non-equilibrium gas                             #
+#########################################################################
+// nchem: 
+//          0 -- without chemical reaction flow.
+//          1 -- the chemical reaction flow is considered.
+// nchemsrc:
+//          0 -- the source terms are not computed.
+//          1 -- the source terms are computed.
+// nchemrad:
+//          0 -- compute the spectrum radius without considering chemical reaction flow.
+//          1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//          1 -- One-temperature model.
+//          2 -- Two-temperature model.
+//          3 -- Three-temperature model.
+// catalyticCoef:
+//          0.0 -- full non-catalytic wall boundary condition.
+//          1.0 -- full catalytic wall boundary condition.
+//          in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//          "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//          "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//          "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//          For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+
+int nchem    = 1;
+int ntmodel  = 1;
+int nchemsrc = 1;
+int nchemrad = 1;
+double catalyticCoef = 1.0;
+string gasfile = "DK11";
+string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+string initMassFraction = "0.07955,0.134,0.0509,1.0e-9,0.0,0.0,0.0,0.0,0.0,0.73555,0.0";
+int ifStartFromPerfectGasResults = 0;
diff --git a/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/bin/grid_para.hypara b/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/bin/grid_para.hypara
new file mode 100644
index 0000000..c02b51d
--- /dev/null
+++ b/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/2D_HEG_CYLINDER_65X88_DY2D-7.grd";
+string out_gfile  = "./grid/2D_HEG_CYLINDER_65X88_DY2D-7.fts";
diff --git a/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/bin/key.hypara b/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/bin/key.hypara
new file mode 100644
index 0000000..83d5041
--- /dev/null
+++ b/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/bin/key.hypara
@@ -0,0 +1,51 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 4;
+//string parafilename = "./bin/repository.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int iovrlap               = 0;
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/bin/partition.hypara b/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/bin/partition.hypara
new file mode 100644
index 0000000..e44a726
--- /dev/null
+++ b/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/2D_HEG_CYLINDER_65X88_DY2D-7.fts";
+string partition_grid_file = "./grid/2D_HEG_CYLINDER_65X88_DY2D-7__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/grid/网格地址.txt b/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/bin/cfd_para.hypara b/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..7f3f061
--- /dev/null
+++ b/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,240 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 30000;
+
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 100;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// dump_Q: Dump out thermal flux Q of solid wall.
+//         0 -- no dump out.
+//         1 -- dump out wall Q only.
+//         2 -- dump out wall Q & the typical position Q of ball.
+//         3 -- dump out wall Q & the typical position Q of cone.
+//         4 -- dump out wall Q & the typical position Q of double sphere.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 12.935;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 343.0;
+int    dump_Q = 0;
+
+int inflowParaType = 0;
+double refReNumber = 1.628325e5;
+double refDimensionalTemperature = 265.0;
+double freestream_vibration_temperature = 265.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceRefenenceLengthSpanWise = 1.0;    // unit of meter.
+double forceRefenenceLength = 1.0;            // unit of meter.
+double forceRefenenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+int    viscousType = 1;
+string viscousName = "laminar";
+
+//int    viscousType = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw","ausmdv".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "ausmdv";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLStart = 0.1;
+double CFLEnd = 10.0;
+int    CFLVaryStep = 1000;
+
+double ktmax = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// isPlotVolumeField: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/3D_Electre_Half_Model_dy1D-5__6.fts";
+int isPlotVolumeField = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 0;
+int limitVariables = 0;
+int limitVector = 1;
+
+#########################################################################
+#                       Non-equilibrium gas                             #
+#########################################################################
+// nchem: 
+//          0 -- without chemical reaction flow.
+//          1 -- the chemical reaction flow is considered.
+// nchemsrc:
+//          0 -- the source terms are not computed.
+//          1 -- the source terms are computed.
+// nchemrad:
+//          0 -- compute the spectrum radius without considering chemical reaction flow.
+//          1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//          1 -- One-temperature model.
+//          2 -- Two-temperature model.
+//          3 -- Three-temperature model.
+// catalyticCoef:
+//          0.0 -- full non-catalytic wall boundary condition.
+//          1.0 -- full catalytic wall boundary condition.
+//          in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//          "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//          "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//          "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//          For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+
+int nchem     	= 1;
+int ntmodel   	= 1;
+int nchemsrc 	= 1;
+int nchemrad 	= 1;
+double catalyticCoef = 0.0;
+string gasfile = "DK5";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+int ifStartFromPerfectGasResults = 0;
diff --git a/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/bin/grid_para.hypara b/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/bin/grid_para.hypara
new file mode 100644
index 0000000..eb53699
--- /dev/null
+++ b/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/3D_Electre_Half_Model_dy1D-5.grd";
+string out_gfile  = "./grid/3D_Electre_Half_Model_dy1D-5.fts";
diff --git a/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/bin/key.hypara b/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/bin/key.hypara
new file mode 100644
index 0000000..43cfd72
--- /dev/null
+++ b/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/bin/key.hypara
@@ -0,0 +1,51 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim     	= 3;
+int nparafile 	= 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 4;
+//string parafilename = "./bin/repository.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int iovrlap               = 0;
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/bin/partition.hypara b/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/bin/partition.hypara
new file mode 100644
index 0000000..5b9e09f
--- /dev/null
+++ b/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 6;
+
+string original_grid_file  = "./grid/3D_Electre_Half_Model_dy1D-5.fts";
+string partition_grid_file = "./grid/3D_Electre_Half_Model_dy1D-5__6.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/grid/网格地址.txt b/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..cece4a6
--- /dev/null
+++ b/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,237 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 20000;
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 8.7569;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 1000.0;
+
+int inflowParaType = 0;
+double refReNumber = 4.7001e5;
+double refDimensionalTemperature = 694.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+//The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity = 1.0e3;
+
+//The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 10.0;
+//double refDimensionalPressure = 101325.0;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw", "ausmpw+".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "steger";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+double CFLStart = 0.1;
+double CFLEnd = 1.0;
+int CFLVaryStep = 1000;
+double ktmax = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/2D_Cylinder_Rn0d045_160X131_dy1d-5.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 6;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 0;
+int limitVariables = 0;
+int limitVector = 1;
+
+#########################################################################
+#                       Non-equilibrium gas                             #
+#########################################################################
+// nGasModel: The type of gas.
+//          0 -- Earth gas.
+//          1 -- Mars gas.
+// nchem: 
+//          0 -- without chemical reaction flow.
+//          1 -- the chemical reaction flow is considered.
+// nchemsrc:
+//          0 -- the source terms are not computed.
+//          1 -- the source terms are computed.
+// nchemrad:
+//          0 -- compute the spectrum radius without considering chemical reaction flow.
+//          1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//          1 -- One-temperature model.
+//          2 -- Two-temperature model.
+//          3 -- Three-temperature model.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+int    nchem       = 1;
+int    nIdealState = 1;
+int    nchemsrc    = 0;
+int    nchemrad    = 0;
+int    ntmodel     = 1;
+string gasfile     = "Gas-Mixture";
+string speciesName  = "O2, N2";
+string initMassFraction = "0.23, 0.77";
\ No newline at end of file
diff --git a/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..ded8b44
--- /dev/null
+++ b/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,34 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/2D_Cylinder_Rn0d045_160X131_dy1d-5.cgns";
+string out_gfile  = "./grid/2D_Cylinder_Rn0d045_160X131_dy1d-5.fts";
diff --git a/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/bin/key.hypara b/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..63c7ada
--- /dev/null
+++ b/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/grid/网格地址.txt b/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/二维非结构圆柱高超声速两气体组分预混算例说明文档.pdf b/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/二维非结构圆柱高超声速两气体组分预混算例说明文档.pdf
new file mode 100644
index 0000000..d361379
Binary files /dev/null and b/phenglei/tutorials/G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU/二维非结构圆柱高超声速两气体组分预混算例说明文档.pdf differ
diff --git a/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..1474248
--- /dev/null
+++ b/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,237 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 50000;
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+//double refMachNumber = 8.7569;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = 2000.0;
+
+//int inflowParaType = 0;
+//double refReNumber = 4.7001e5;
+
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+//The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity = 1.0e3;
+
+//The velocity, temperature and pressure are fixed.
+int inflowParaType = 5;
+double refDimensionalVelocity = 5280.0;
+double refDimensionalPressure = 664.0;
+double refDimensionalTemperature = 293.0;
+double freestream_vibration_temperature = 293.0;
+
+double gridScaleFactor = 0.001;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw", "ausmpw+".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "steger";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.1;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+double CFLEnd = 0.5;
+double ktmax = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/R6d35MM_HalfModel_DY6d25E-4MM.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 6;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 1;
+
+#########################################################################
+#                       Non-equilibrium gas                             #
+#########################################################################
+// nGasModel: The type of gas.
+//          0 -- Earth gas.
+//          1 -- Mars gas.
+// nchem: 
+//          0 -- without chemical reaction flow.
+//          1 -- the chemical reaction flow is considered.
+// nchemsrc:
+//          0 -- the source terms are not computed.
+//          1 -- the source terms are computed.
+// nchemrad:
+//          0 -- compute the spectrum radius without considering chemical reaction flow.
+//          1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//          1 -- One-temperature model.
+//          2 -- Two-temperature model.
+//          3 -- Three-temperature model.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+int    nchem       = 1;
+int    nIdealState = 1;
+int    nchemsrc    = 0;
+int    nchemrad    = 0;
+int    ntmodel     = 1;
+string gasfile     = "Gas-Mixture";
+string speciesName  = " O2, N2";
+string initMassFraction = "0.23, 0.77";
\ No newline at end of file
diff --git a/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..e70cb41
--- /dev/null
+++ b/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,34 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/R6d35MM_HalfModel_DY6d25E-4MM.cgns";
+string out_gfile  = "./grid/R6d35MM_HalfModel_DY6d25E-4MM.fts";
diff --git a/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/bin/key.hypara b/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..b892406
--- /dev/null
+++ b/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/grid/网格地址.txt b/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/三维非结构球头高超声速两气体组分预混算例说明文档.pdf b/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/三维非结构球头高超声速两气体组分预混算例说明文档.pdf
new file mode 100644
index 0000000..d763a99
Binary files /dev/null and b/phenglei/tutorials/G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU/三维非结构球头高超声速两气体组分预混算例说明文档.pdf differ
diff --git a/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..21a9e85
--- /dev/null
+++ b/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,79 @@
+# nBoundaryConditions: Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 6;
+string bcName = "jetwall";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "pipelinetop";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "symmetry";
+{
+  int bcType = 3;
+}
+string bcName = "inlet";
+{
+  int bcType = 5;
+  int inflowParaType = 5; 
+  double refDimensionalVelocity = 68.9;
+  double refDimensionalPressure = 101325.0;
+  string speciesName ="Air, CH4";
+  double initMassFraction[2] = [1.0, 0.0];
+}
+string bcName = "jet";
+{
+  int bcType = 5;
+  int inflowParaType = 5; 
+  double refDimensionalVelocity = 340.5;
+  double refDimensionalPressure = 101325.0;
+  string speciesName ="Air, CH4";
+  double initMassFraction[2] = [0.0, 1.0];
+}
+string bcName = "outlet";
+{
+  int bcType = 6;
+}
+
+# 'bcType' is defined as following:
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..e23deef
--- /dev/null
+++ b/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,256 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 10000;
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 1000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+//double refMachNumber = 0.2;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = -1.0;
+
+//int inflowParaType = 0;
+//double refReNumber = 1.0e5;
+double refDimensionalTemperature = 300.0;
+double freestream_vibration_temperature = 300.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+//The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity = 1.0e3;
+
+//The velocity, temperature and pressure are fixed.
+int inflowParaType = 5;
+double refDimensionalVelocity = 340.5;
+double refDimensionalPressure = 101325.0;
+
+double gridScaleFactor = 0.001;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType    = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw", "ausmpw+".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+double CFLEnd = 10.0;
+
+int nLUSGSSweeps = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/multi-species.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 6;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 0;
+int limitVariables = 0;
+int limitVector = 1;
+
+#########################################################################
+#                       Non-equilibrium gas                             #
+#########################################################################
+// nGasModel: The type of gas.
+//          0 -- Earth gas.
+//          1 -- Mars gas.
+// nchem: 
+//          0 -- without chemical reaction flow.
+//          1 -- the chemical reaction flow is considered.
+// nchemsrc:
+//          0 -- the source terms are not computed.
+//          1 -- the source terms are computed.
+// nchemrad:
+//          0 -- compute the spectrum radius without considering chemical reaction flow.
+//          1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//          1 -- One-temperature model.
+//          2 -- Two-temperature model.
+//          3 -- Three-temperature model.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+int    nchem       = 1;
+int    nIdealState = 1;
+int    nchemsrc    = 0;
+int    nchemrad    = 0;
+int    ntmodel     = 1;
+string gasfile     = "Gas-Mixture";
+string speciesName ="Air, CH4";
+string initMassFraction = "1.0, 0.0";
\ No newline at end of file
diff --git a/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..1835fd7
--- /dev/null
+++ b/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/multi-species.cgns";
+string out_gfile  = "./grid/multi-species.fts";
diff --git a/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/bin/key.hypara b/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..a628c1c
--- /dev/null
+++ b/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/grid/网格地址.txt b/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/二维非结构管道喷流气体混合算例说明文档.pdf b/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/二维非结构管道喷流气体混合算例说明文档.pdf
new file mode 100644
index 0000000..5961cf0
Binary files /dev/null and b/phenglei/tutorials/G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU/二维非结构管道喷流气体混合算例说明文档.pdf differ
diff --git a/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..a7dbdaf
--- /dev/null
+++ b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,35 @@
+int nBoundaryConditions = 4;
+string bcName = "farinlet";
+{
+	int bcType = 5;
+	int inflowParaType = 5;
+	double angleSlide = 0;
+	double attackd = 0;
+	int directionMethod = 0;
+	double initMassFraction[] = [1.0,0.0,0.0,0.0];
+	double refDimensionalPressure = 101325;
+	double refDimensionalTemperature = 308.15;
+	double refDimensionalVelocity = 2;
+	string speciesName = "Air,CH4,H2S,CO2";
+}
+string bcName = "outlet";
+{
+	int bcType = 6;
+}
+string bcName = "wall";
+{
+	int bcType = 2;
+	int dumpHingeMoment = 0;
+	int twall_control_select = 0;
+	double wallTemperature = -1.0;
+}
+string bcName = "ycinlet";
+{
+	int bcType = 52;
+	int directionMethod = 1;
+	double direction_inlet[] = [0,1,0];
+	double initMassFraction[] = [0.0,0.75,0.16,0.09];
+	string speciesName = "Air,CH4,H2S,CO2";
+	double totalPressure = 8.3e6;
+	double totalTemperature = 308.15;
+}
diff --git a/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/cfd_para_hypersonic.hypara b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/cfd_para_hypersonic.hypara
new file mode 100644
index 0000000..7c12e7d
--- /dev/null
+++ b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/cfd_para_hypersonic.hypara
@@ -0,0 +1,225 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 5000;
+
+int intervalStepFlow  = 100;
+int intervalStepPlot  = 10;
+int intervalStepSample =  1;
+int intervalStepForce = 100;
+int intervalStepRes   = 1;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.20;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = -1.0;
+double freestream_vibration_temperature = 300.0;
+
+//The velocity, temperature and pressure are fixed.
+int inflowParaType = 5;
+double refDimensionalVelocity = 2.0;
+double refDimensionalPressure = 101325;
+double refDimensionalTemperature = 308.15;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		              // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType: Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+int    viscousType = 1;
+string viscousName = "laminar";
+
+//int    viscousType = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw", "ausmpw+".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth", "vanalbada".
+
+string inviscidSchemeName = "steger";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "vanleer";
+string uns_limiter_name = "1st";
+double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+
+int iunsteady = 1;
+double physicalTimeStep =  0.2;
+int min_sub_iter =  50;
+int max_sub_iter =  50;
+double tol_sub_iter =  0.001;
+
+double CFLEnd = 50.0;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/yanchongCase14__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21),
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40).
+//                   -- Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62)
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 13;
+int visualVariables[] = [0,1,2,3,4,5,6,38,39,40,53,54,55];
+
+int ifSetDataMonitor =  1;
+
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+// -coefficient of pressure(cp, 0), -coefficient of friction(cf, 1), yplus(2), -non-dimensional heat flux(Q_NonDim, 3), -dimensional heat flux(Q_Dim, 4),
+// -pressure on wall(pw, 5), -temperature on wall(Tw, 6), -density on wall(rhow, 7), -heat flux of translational-rotational temperature term(Qtr, 8),
+// -heat flux of species diffusion term(Qs, 9), -heat flux of vibrational temperature term(Qv, 10), -heat flux of electron temperature term(Qe, 11),
+// -species mass fractions(Ns, 12), -x component of wall velocity(Vx, 13), -y component of wall velocity(Vy, 14), -z component of wall velocity(Vz, 15)
+// -slip translational-rotational temperature(Tts, 16), -slip vibrational temperature(Tvs, 17), -slip electron temperature(Tes, 18), -absolute wall velocity(Vs, 19)
+// -Stanton number(St, 20), -coefficient of heat rate(Ch, 21), -temperature jump(deltaT, 22), -Grid Reynolds number on wall(Re_w, 23) , -Knudsen number(Kn_wall, 24)
+
+int nVisualWallVariables = 6;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
+
+
+int nchem =  1;
+int nchemsrc =  0;
+int nchemrad =  0;
+int ntmodel =  1;
+int nIdealState =  1;
+
+string gasfile  =  "Gas-Mixture";
+string speciesName  =  "Air,CH4,H2S,CO2";
+string initMassFraction  =  "1.0,0.0,0.0,0.0";
+int nFraction =  1;
+int nLeakageMonitor =  1;
+double totalLeakageVolume =  1000.0;
+double monitorThresholdValue =  0.05;
diff --git a/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/grid_para.hypara b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..05ea4ff
--- /dev/null
+++ b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/grid_para.hypara
@@ -0,0 +1,36 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+//             9 -- Gridgen type of structured grid, *.dat/*.grd.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/yanchongCase14.cas";
+string out_gfile  = "./grid/yanchongCase14.fts";
diff --git a/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/key.hypara b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/key.hypara
new file mode 100644
index 0000000..1acf624
--- /dev/null
+++ b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/key.hypara
@@ -0,0 +1,58 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 13;
+//string parafilename = "./bin/lbm_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/partition.hypara b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..85a3249
--- /dev/null
+++ b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/partition.hypara
@@ -0,0 +1,24 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/yanchongCase14.fts";
+string partition_grid_file = "./grid/yanchongCase14__4.fts";
+
+int numberOfMultifile = 1;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/probes_XYZ.dat b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/probes_XYZ.dat
new file mode 100644
index 0000000..e713b1d
--- /dev/null
+++ b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/bin/probes_XYZ.dat
@@ -0,0 +1,5 @@
+4
+28.678 55.643 0
+80.785 116.821 0
+125.335 158.357 0
+162.272 308.038 0
diff --git a/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/grid/网格地址.txt b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/二维储罐泄露多组分气体非定常算例说明文档.pdf b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/二维储罐泄露多组分气体非定常算例说明文档.pdf
new file mode 100644
index 0000000..48bb123
Binary files /dev/null and b/phenglei/tutorials/G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady_4CPU/二维储罐泄露多组分气体非定常算例说明文档.pdf differ
diff --git a/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..a64b84c
--- /dev/null
+++ b/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,52 @@
+# nBoundaryConditons : number of global boundary conditions.
+# bcName             : Boundary Condition Name.
+# bcType(in PHengLEI): Boundary Condition Type.
+
+# Account of how to set boundaryconditon.
+# string bcName = "Farfield";          
+# {                                      
+#   int bcType = 4;                      
+#   int inflowParaType = 1;              
+#   double attackd = 0;                  
+#   double refReNumber = 6.5e6;          
+#   double refMachNumber = 3.5;          
+#   double angleSlide = 0;               
+# }                                      
+
+int nBoundaryConditions = 3;
+string bcName = "wall_1";
+{
+  int bcType = 2;
+}
+
+string bcName = "inlet_1";
+{
+  int bcType = 52;
+  double totalPressure = 200;
+  double initKinetic = 1.5;
+  double initEpsilon = 2025;
+}
+
+string bcName = "outlet_1";
+{
+  int bcType = 6;
+  double initP =0;
+  double initKinetic = 1.5;
+  double initEpsilon = 2025;
+}
+
+# 'bcType' is defined as following:
+#    99: PERIODIC                  
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/cfd_para_incompressible.hypara b/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
new file mode 100644
index 0000000..250c8ee
--- /dev/null
+++ b/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
@@ -0,0 +1,211 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+int maxSimuStep       = 2000;
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 500;
+int intervalStepForce = 1;
+int intervalStepRes   = 1;
+
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+string gridfile = "./grid/back__4.fts";
+
+#########################################################################
+#                               Flow Parameter                          #
+#########################################################################
+
+//flowSolverName : SIMPLE/CompressibleSIMPLE/PISO
+string flowSolverName = "SIMPLE";
+
+// Initial value of flow variables 
+double initRho = 1.0;
+double initU = 20;
+double initV   = 0;
+double initW   = 0;
+double initP   = 0;
+double initMu = 0.00001;
+double initRg  = 296.928571;
+double refP    = 101325;
+int refPLocate = 0；
+
+//Parameters For Solving the Momentum Equation
+// MomEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int MomEqSolMethod = 2;
+// MomEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int MomEqPrecondMethod = 1;
+int MomEqMaxSweep = 30;
+double MomEqIterSolvTol = 1e-8;
+double MomEqRelaxCoeff = 0.5;
+
+//Parameters For Solving the Pressure Possion Equation
+// PPEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int PPEqSolMethod= 3;
+// PPEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int PPEqPrecondMethod= 1;
+int PPEqMaxSweep = 30;
+double PPEqIterSolvTol = 1e-8;
+double PPEqRelaxCoeff = 0.3;
+
+//Relaxation factor of surface flux
+double FaceFluxRelaxCoeff = 0.5;
+
+int isCalGravityVisSource = 0;
+int bodyForceFlag = 0;
+double gravityX = 0.0;
+double gravityY = -9.81;
+double gravityZ = 0.0;
+
+int isBoussinesqApproximation        = 0;
+double thermalExpansionCoeff = 3.44827e-3;
+
+#########################################################################
+#                  Turbulence Equation Parameter                        #
+#########################################################################
+// isSolveTurb : is(1)/not(0);
+int isSolveTurb = 1；
+// TurbEqSolverName : k-epsilon(KE)/Spalart-Allmaras(SA)
+string TurbEqSolverName = "KE";
+
+// Initial value of Turbulence variables 
+double initKinetic = 1.5;
+double initEpsilon = 2025;
+
+//Parameters For Solving the Turbulence Equation
+// TurbEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int TurbEqSolMethod  = 2;
+// TurbEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int TurbEqPrecondMethod = 1;
+int    TurbEqMaxSweep    = 30;
+double TurbEqIterSolvTol = 1e-8;
+double TurbEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                     Energy Equation Parameter                         #
+#########################################################################
+// isSolveEnergy : is(1)/not(0);
+int isSolveEnergy = 0;
+
+// Initial value of Energy variables 
+double initT   = 273.15;
+double initCPg = 1007.0;
+double initK   = 0.0454;
+double initkappa = 1.4;
+double refT = 300;
+
+//Parameters For Solving the Energy Equation
+// EnergyEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int EnergyEqSolMethod = 2;
+// EnergyEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int EnergyEqPrecondMethod = 1;
+int    EnergyEqMaxSweep    = 30;
+double EnergyEqIterSolvTol = 1e-8;
+double EnergyEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                    Species Equation Parameter                         #
+#########################################################################
+// isSolveSpecies : is(1)/not(0);
+int isSolveSpecies = 0;
+
+//Parameters For Solving the Species Equation
+int numberOfSpeciesIncom = 1;
+string speciesNameIncom[] = [AIR];
+double initMassFractionIncom[] = [1.0];
+
+//Parameters For Solving the Species Equation
+// SpeciesEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int SpeciesEqSolMethod = 2;
+// SpeciesEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int SpeciesEqPrecondMethod = 1;
+int    SpeciesEqMaxSweep   = 30;
+double SpeciesEqIterSolvTol  = 1e-8;
+double SpeciesEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                               Unsteady Parameter                      #
+#########################################################################
+// iunsteady : is(1)/not(0);
+int iunsteady    = 0;
+double startTime = 0.0;
+double endTime   = 20;
+double dt = 0.1;
+int min_sub_iter = 50;
+int max_sub_iter = 50;
+
+// isStableUnsteadyMethod : is(1)/not(0);
+int isStableUnsteadyMethod = 0;
+
+#########################################################################
+#                               Solution Method                         #
+#########################################################################
+// ConvCalcMethod : UPWIND/CDS/QUICK/SUDS
+string ConvCalcMethod = "UPWIND"
+
+// DiffCalcMethod : NON_ORTHOGONAL(default)
+string DiffCalcMethod = "NON_ORTHOGONAL";
+
+//TranCalcMethod : IMPLICIT_EULER(1st)/IMPLICIT_2ND_ORDER(2st)
+string TranCalcMethod = "IMPLICIT_EULER";
+
+// GradCalcMethod : GAUSS/LSQ
+string GradCalcMethod = "GAUSS";
+
+// mathLibType : hypre(0)/unap(1)/yhamg(2)
+int mathLibType = 0;
+
+// compressible : is(0, default)/not(1)
+int compressible = 0;
+
+// SIMPLEC : SIMPLE(0)/SIMPLEC(1)
+int SIMPLEC = 1;
+
+// isSkewness : stable gradient method: is(1)/not(0)
+int isSkewness = 0;
+
+//rhoType : Constant(0)/IncompressibleIdealGas(1)/IdealGas(2)
+int rhoType = 0;
+
+//muType:  Constant(0)/SutherLand(1)/IdealGasMixingLaw(2),
+int muType  = 0;
+
+//kType : Constant(0)/MassWeightedMixingLaw(1)/IdealGasMixingLaw(2)
+int kType   = 0;
+
+//cpType : Constant(0)/Mixing(1)
+int cpType  = 0;
+
+//massdiffType : ConstantDiluteApprox(1)/DiluteApprox(2)
+int massdiffType = 0;
+
+#########################################################################
+#                              Post-Processing                          #
+#########################################################################
+/ nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+// -- U(22), V(23), W(24), P(25), CP(26), T(27), DEN(28), VIS(29), TE(31), ED(32), enthalpy(70), species(from 71 ~ 70 + numberOfSpecies)
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 7;
+int visualVariables[] = [22, 23, 24, 25, 29, 31, 32];
+int plotFieldType = 1;
+
+string resSaveFile      = "results/res.dat";
+string aircoeffile      = "results/aircoef.dat";
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/grid_para.hypara b/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..3be02df
--- /dev/null
+++ b/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/back.cas";
+string out_gfile  = "./grid/back.fts";
diff --git a/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/key.hypara b/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/key.hypara
new file mode 100644
index 0000000..fdf7cad
--- /dev/null
+++ b/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/key.hypara
@@ -0,0 +1,55 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
\ No newline at end of file
diff --git a/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/partition.hypara b/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..e521e4a
--- /dev/null
+++ b/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/bin/partition.hypara
@@ -0,0 +1,24 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/back.fts";
+string partition_grid_file = "./grid/back__4.fts";
+
+int numberOfMultifile = 1;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/grid/网格地址.txt b/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/H01_TwoD_BackStep_KE_UPWIND_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..edcc301
--- /dev/null
+++ b/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,51 @@
+# nBoundaryConditons : number of global boundary conditions.
+# bcName             : Boundary Condition Name.
+# bcType(in PHengLEI): Boundary Condition Type.
+
+# Account of how to set boundaryconditon.
+# string bcName = "Farfield";          
+# {                                      
+#   int bcType = 4;                      
+#   int inflowParaType = 1;              
+#   double attackd = 0;                  
+#   double refReNumber = 6.5e6;          
+#   double refMachNumber = 3.5;          
+#   double angleSlide = 0;               
+# }                                      
+
+int nBoundaryConditions = 4;
+string bcName = "bottom";
+{
+  int bcType = 2;
+}
+string bcName = "left";
+{
+  int bcType = 2;
+  double initT=300;
+}
+string bcName = "right";
+{
+  int bcType = 2;
+  double initT=500;
+}
+string bcName = "top";
+{
+  int bcType = 2;
+  double initU=1.0;
+}
+
+# 'bcType' is defined as following:
+#    99: PERIODIC              	
+#    -2: WAKE                  	
+#    -1: INTERFACE             	
+#    0 : NO_BOUNDARY_CONDITION 	
+#    1 : EXTRAPOLATION         	
+#    2 : SOLID_SURFACE         	
+#    3 : SYMMETRY              	
+#    4 : FARFIELD              	
+#    5 : INFLOW                	
+#    6 : OUTFLOW               	
+#    52: PRESSURE_INLET		    
+#    62: PRESSURE_OUTLET		   	
+#    61: OUTFLOW_CONFINED      	
+#    7 : POLE						
diff --git a/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/cfd_para_incompressible.hypara b/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
new file mode 100644
index 0000000..5b5f992
--- /dev/null
+++ b/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
@@ -0,0 +1,211 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+int maxSimuStep       = 2000;
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 500;
+int intervalStepForce = 1;
+int intervalStepRes   = 1;
+
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+string gridfile = "./grid/cavity__4.fts";
+
+#########################################################################
+#                               Flow Parameter                          #
+#########################################################################
+
+//flowSolverName : SIMPLE/CompressibleSIMPLE/PISO
+string flowSolverName = "SIMPLE";
+
+// Initial value of flow variables 
+double initRho = 1;
+double initU   = 0;
+double initV   = 0;
+double initW   = 0;
+double initP   = 0;
+double initMu =0.01;
+double initRg =287.0425;
+double refP    = 101325;
+int refPLocate = 0；
+
+//Parameters For Solving the Momentum Equation
+// MomEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int MomEqSolMethod = 2;
+// MomEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int MomEqPrecondMethod = 1;
+int MomEqMaxSweep = 30;
+double MomEqIterSolvTol = 1e-8;
+double MomEqRelaxCoeff = 0.5;
+
+//Parameters For Solving the Pressure Possion Equation
+// PPEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int PPEqSolMethod= 3;
+// PPEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int PPEqPrecondMethod= 1;
+int PPEqMaxSweep = 30;
+double PPEqIterSolvTol = 1e-8;
+double PPEqRelaxCoeff = 0.3;
+
+//Relaxation factor of surface flux
+double FaceFluxRelaxCoeff = 0.5;
+
+int isCalGravityVisSource = 0;
+int bodyForceFlag = 0;
+double gravityX = 0.0;
+double gravityY = -9.81;
+double gravityZ = 0.0;
+
+int isBoussinesqApproximation        = 0;
+double thermalExpansionCoeff = 3.44827e-3;
+
+#########################################################################
+#                  Turbulence Equation Parameter                        #
+#########################################################################
+// isSolveTurb : is(1)/not(0);
+int isSolveTurb = 0；
+// TurbEqSolverName : k-epsilon(KE)/Spalart-Allmaras(SA)
+string TurbEqSolverName = "KE";
+
+// Initial value of Turbulence variables 
+double initKinetic = 0.64;
+double initEpsilon = 5771;
+
+//Parameters For Solving the Turbulence Equation
+// TurbEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int TurbEqSolMethod  = 2;
+// TurbEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int TurbEqPrecondMethod = 1;
+int    TurbEqMaxSweep    = 30;
+double TurbEqIterSolvTol = 1e-8;
+double TurbEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                     Energy Equation Parameter                         #
+#########################################################################
+// isSolveEnergy : is(1)/not(0);
+int isSolveEnergy = 1;
+
+// Initial value of Energy variables 
+double initT             = 400;
+double initCPg           = 1006;
+double initK             = 0.0242;
+double initkappa = 1.4;
+double refT = 300;
+
+//Parameters For Solving the Energy Equation
+// EnergyEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int EnergyEqSolMethod = 2;
+// EnergyEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int EnergyEqPrecondMethod = 1;
+int    EnergyEqMaxSweep    = 30;
+double EnergyEqIterSolvTol = 1e-8;
+double EnergyEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                    Species Equation Parameter                         #
+#########################################################################
+// isSolveSpecies : is(1)/not(0);
+int isSolveSpecies = 0;
+
+//Parameters For Solving the Species Equation
+int numberOfSpeciesIncom = 1;
+string speciesNameIncom[] = [AIR];
+double initMassFractionIncom[] = [1.0];
+
+//Parameters For Solving the Species Equation
+// SpeciesEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int SpeciesEqSolMethod = 2;
+// SpeciesEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int SpeciesEqPrecondMethod = 1;
+int    SpeciesEqMaxSweep   = 30;
+double SpeciesEqIterSolvTol  = 1e-8;
+double SpeciesEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                               Unsteady Parameter                      #
+#########################################################################
+// iunsteady : is(1)/not(0);
+int iunsteady    = 0;
+double startTime = 0.0;
+double endTime   = 20;
+double dt = 0.1;
+int min_sub_iter = 50;
+int max_sub_iter = 50;
+
+// isStableUnsteadyMethod : is(1)/not(0);
+int isStableUnsteadyMethod = 0;
+
+#########################################################################
+#                               Solution Method                         #
+#########################################################################
+// ConvCalcMethod : UPWIND/CDS/QUICK/SUDS
+string ConvCalcMethod = "UPWIND"
+
+// DiffCalcMethod : NON_ORTHOGONAL(default)
+string DiffCalcMethod = "NON_ORTHOGONAL";
+
+//TranCalcMethod : IMPLICIT_EULER(1st)/IMPLICIT_2ND_ORDER(2st)
+string TranCalcMethod = "IMPLICIT_EULER";
+
+// GradCalcMethod : GAUSS/LSQ
+string GradCalcMethod = "GAUSS";
+
+// mathLibType : hypre(0)/unap(1)/yhamg(2)
+int mathLibType = 0;
+
+// compressible : is(0, default)/not(1)
+int compressible = 0;
+
+// SIMPLEC : SIMPLE(0)/SIMPLEC(1)
+int SIMPLEC = 1;
+
+// isSkewness : stable gradient method: is(1)/not(0)
+int isSkewness = 0;
+
+//rhoType : Constant(0)/IncompressibleIdealGas(1)/IdealGas(2)
+int rhoType = 0;
+
+//muType:  Constant(0)/SutherLand(1)/IdealGasMixingLaw(2),
+int muType  = 0;
+
+//kType : Constant(0)/MassWeightedMixingLaw(1)/IdealGasMixingLaw(2)
+int kType   = 0;
+
+//cpType : Constant(0)/Mixing(1)
+int cpType  = 0;
+
+//massdiffType : ConstantDiluteApprox(1)/DiluteApprox(2)
+int massdiffType = 0;
+
+#########################################################################
+#                              Post-Processing                          #
+#########################################################################
+/ nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+// -- U(22), V(23), W(24), P(25), CP(26), T(27), DEN(28), VIS(29), TE(31), ED(32), enthalpy(70), species(from 71 ~ 70 + numberOfSpecies)
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 6;
+int visualVariables[] = [22, 23, 24, 25, 27, 70];
+int plotFieldType = 1;
+
+string resSaveFile      = "results/res.dat";
+string aircoeffile      = "results/aircoef.dat";
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/grid_para.hypara b/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..f55d3c0
--- /dev/null
+++ b/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/cavity.cas";
+string out_gfile  = "./grid/cavity.fts";
diff --git a/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/key.hypara b/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/key.hypara
new file mode 100644
index 0000000..2ce4108
--- /dev/null
+++ b/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 4;
+//string parafilename = "./bin/repository.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/partition.hypara b/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..db4d91a
--- /dev/null
+++ b/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/cavity.fts";
+string partition_grid_file = "./grid/cavity__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/grid/网格地址.txt b/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/H02_TwoD_Cavitity_Re100_UPWIND_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..b7f5b59
--- /dev/null
+++ b/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,76 @@
+# nBoundaryConditions: Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 4;
+string bcName = "wall";
+{
+  string bodyName = "body";
+  int bcType = 2;
+  double initT = 294;
+}
+string bcName = "farinlet";
+{
+  int bcType = 5;
+  double initU= 1.0;
+  double initT = 294;
+  double initMassFractionIncom[] = [1.0, 0.0, 0.0];
+  double initKinetic = 18.375;
+  double initEpsilon = 322881.7;
+}
+string bcName = "ycinlet";
+{
+  int bcType = 52;
+  double totalPressure = 1000;
+  double initT = 294;
+  double initMassFractionIncom[] = [0.0, 0.9, 0.1];
+  double initKinetic = 0.3243375;
+  double initEpsilon = 66;
+}
+string bcName = "outlet";
+{
+  int bcType = 6;
+  double initP = 0;
+  double initT = 294;
+  double initMassFractionIncom[] = [1.0, 0.0, 0.0];
+  double initKinetic = 0.3243375;
+  double initEpsilon = 66;
+}
+
+# 'bcType' is defined as following:
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/cfd_para_incompressible.hypara b/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
new file mode 100644
index 0000000..07367f4
--- /dev/null
+++ b/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
@@ -0,0 +1,211 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+int maxSimuStep       = 2000;
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 500;
+int intervalStepForce = 1;
+int intervalStepRes   = 1;
+
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+string gridfile = "./grid/yanchongCase14__4.fts";
+
+#########################################################################
+#                               Flow Parameter                          #
+#########################################################################
+
+//flowSolverName : SIMPLE/CompressibleSIMPLE/PISO
+string flowSolverName = "CompressibleSIMPLE";
+
+// Initial value of flow variables 
+double initRho = 1.225;
+double initU   = 0;
+double initV   = 0;
+double initW   = 0;
+double initP   = 0;
+double initMu  = 1.7894e-05;
+double initRg = 296.928571;
+double refP    = 101325;
+int refPLocate = 0；
+
+//Parameters For Solving the Momentum Equation
+// MomEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int MomEqSolMethod = 2;
+// MomEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int MomEqPrecondMethod = 1;
+int MomEqMaxSweep = 30;
+double MomEqIterSolvTol = 1e-8;
+double MomEqRelaxCoeff = 0.5;
+
+//Parameters For Solving the Pressure Possion Equation
+// PPEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int PPEqSolMethod= 3;
+// PPEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int PPEqPrecondMethod= 1;
+int PPEqMaxSweep = 30;
+double PPEqIterSolvTol = 1e-8;
+double PPEqRelaxCoeff = 0.3;
+
+//Relaxation factor of surface flux
+double FaceFluxRelaxCoeff = 0.5;
+
+int isCalGravityVisSource = 0;
+int bodyForceFlag = 0;
+double gravityX = 0.0;
+double gravityY = -9.81;
+double gravityZ = 0.0;
+
+int isBoussinesqApproximation        = 0;
+double thermalExpansionCoeff = 3.44827e-3;
+
+#########################################################################
+#                  Turbulence Equation Parameter                        #
+#########################################################################
+// isSolveTurb : is(1)/not(0);
+int isSolveTurb = 1；
+// TurbEqSolverName : k-epsilon(KE)/Spalart-Allmaras(SA)
+string TurbEqSolverName = "KE";
+
+// Initial value of Turbulence variables 
+double initKinetic = 0.64;
+double initEpsilon = 5771;
+
+//Parameters For Solving the Turbulence Equation
+// TurbEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int TurbEqSolMethod  = 2;
+// TurbEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int TurbEqPrecondMethod = 1;
+int    TurbEqMaxSweep    = 30;
+double TurbEqIterSolvTol = 1e-8;
+double TurbEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                     Energy Equation Parameter                         #
+#########################################################################
+// isSolveEnergy : is(1)/not(0);
+int isSolveEnergy = 1;
+
+// Initial value of Energy variables 
+double initT   = 273.15;
+double initCPg = 1006.43;
+double initK             = 0.0242;
+double initkappa = 1.4;
+double refT = 300;
+
+//Parameters For Solving the Energy Equation
+// EnergyEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int EnergyEqSolMethod = 2;
+// EnergyEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int EnergyEqPrecondMethod = 1;
+int    EnergyEqMaxSweep    = 30;
+double EnergyEqIterSolvTol = 1e-8;
+double EnergyEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                    Species Equation Parameter                         #
+#########################################################################
+// isSolveSpecies : is(1)/not(0);
+int isSolveSpecies = 1;
+
+//Parameters For Solving the Species Equation
+int numberOfSpeciesIncom = 3;
+string speciesNameIncom[] = [AIR, CH4, H2S];
+double initMassFractionIncom[] = [1.0, 0.0, 0.0];
+
+//Parameters For Solving the Species Equation
+// SpeciesEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int SpeciesEqSolMethod = 2;
+// SpeciesEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int SpeciesEqPrecondMethod = 1;
+int    SpeciesEqMaxSweep   = 30;
+double SpeciesEqIterSolvTol  = 1e-8;
+double SpeciesEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                               Unsteady Parameter                      #
+#########################################################################
+// iunsteady : is(1)/not(0);
+int iunsteady    = 0;
+double startTime = 0.0;
+double endTime   = 20;
+double dt = 0.1;
+int min_sub_iter = 50;
+int max_sub_iter = 50;
+
+// isStableUnsteadyMethod : is(1)/not(0);
+int isStableUnsteadyMethod = 0;
+
+#########################################################################
+#                               Solution Method                         #
+#########################################################################
+// ConvCalcMethod : UPWIND/CDS/QUICK/SUDS
+string ConvCalcMethod = "UPWIND"
+
+// DiffCalcMethod : NON_ORTHOGONAL(default)
+string DiffCalcMethod = "NON_ORTHOGONAL";
+
+//TranCalcMethod : IMPLICIT_EULER(1st)/IMPLICIT_2ND_ORDER(2st)
+string TranCalcMethod = "IMPLICIT_EULER";
+
+// GradCalcMethod : GAUSS/LSQ
+string GradCalcMethod = "GAUSS";
+
+// mathLibType : hypre(0)/unap(1)/yhamg(2)
+int mathLibType = 0;
+
+// compressible : is(0, default)/not(1)
+int compressible = 0;
+
+// SIMPLEC : SIMPLE(0)/SIMPLEC(1)
+int SIMPLEC = 1;
+
+// isSkewness : stable gradient method: is(1)/not(0)
+int isSkewness = 0;
+
+//rhoType : Constant(0)/IncompressibleIdealGas(1)/IdealGas(2)
+int rhoType = 2;
+
+//muType:  Constant(0)/SutherLand(1)/IdealGasMixingLaw(2),
+int muType  = 0;
+
+//kType : Constant(0)/MassWeightedMixingLaw(1)/IdealGasMixingLaw(2)
+int kType   = 0;
+
+//cpType : Constant(0)/Mixing(1)
+int cpType  = 0;
+
+//massdiffType : ConstantDiluteApprox(1)/DiluteApprox(2)
+int massdiffType = 0;
+
+#########################################################################
+#                              Post-Processing                          #
+#########################################################################
+/ nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+// -- U(22), V(23), W(24), P(25), CP(26), T(27), DEN(28), VIS(29), TE(31), ED(32), enthalpy(70), species(from 71 ~ 70 + numberOfSpecies)
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 13;
+int visualVariables[] = [22, 23, 24, 25, 27, 28, 29, 31, 32, 70, 71, 72, 73];
+int plotFieldType = 1;
+
+string resSaveFile      = "results/res.dat";
+string aircoeffile      = "results/aircoef.dat";
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/grid_para.hypara b/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..eb8b953
--- /dev/null
+++ b/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/grid_para.hypara
@@ -0,0 +1,36 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfMultifile = 1;
+string from_gfile = "./grid/yanchongCase14.cas";
+string out_gfile  = "./grid/yanchongCase14.fts";
diff --git a/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/key.hypara b/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/key.hypara
new file mode 100644
index 0000000..fdf7cad
--- /dev/null
+++ b/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/key.hypara
@@ -0,0 +1,55 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
\ No newline at end of file
diff --git a/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/partition.hypara b/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..5f56d22
--- /dev/null
+++ b/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/bin/partition.hypara
@@ -0,0 +1,22 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/yanchongCase14.fts";
+string partition_grid_file = "./grid/yanchongCase14__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level. 
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
+
diff --git a/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/grid/网格地址.txt b/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/H03_TwoD_GasLeakage_Steady_UPWIND_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..218dfdd
--- /dev/null
+++ b/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,48 @@
+# nBoundaryConditons : number of global boundary conditions.
+# bcName             : Boundary Condition Name.
+# bcType(in PHengLEI): Boundary Condition Type.
+
+# Account of how to set boundaryconditon.
+# string bcName = "Farfield";          
+# {                                      
+#   int bcType = 4;                      
+#   int inflowParaType = 1;              
+#   double attackd = 0;                  
+#   double refReNumber = 6.5e6;          
+#   double refMachNumber = 3.5;          
+#   double angleSlide = 0;               
+# }                                      
+
+int nBoundaryConditions = 3;
+string bcName = "airfoil_lower";
+{
+  int bcType = 2;
+}
+string bcName = "airfoil_upper";
+{
+  int bcType = 2;
+}
+
+string bcName = "farfield";
+{
+  int bcType = 5;
+  double initU = 1;
+  double initV = 0;
+  double initKinetic =0.0001460735;
+}
+
+# 'bcType' is defined as following:
+#    99: PERIODIC              	
+#    -2: WAKE                  	
+#    -1: INTERFACE             	
+#    0 : NO_BOUNDARY_CONDITION 	
+#    1 : EXTRAPOLATION         	
+#    2 : SOLID_SURFACE         	
+#    3 : SYMMETRY              	
+#    4 : FARFIELD              	
+#    5 : INFLOW                	
+#    6 : OUTFLOW               	
+#    52: PRESSURE_INLET		    
+#    62: PRESSURE_OUTLET		   	
+#    61: OUTFLOW_CONFINED      	
+#    7 : POLE						
diff --git a/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/cfd_para_incompressible.hypara b/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/cfd_para_incompressible.hypara
new file mode 100644
index 0000000..2a4ab7c
--- /dev/null
+++ b/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/cfd_para_incompressible.hypara
@@ -0,0 +1,211 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+int maxSimuStep       = 2000;
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 500;
+int intervalStepForce = 1;
+int intervalStepRes   = 1;
+
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+string gridfile = "./grid/NACA0012__4.fts";
+
+#########################################################################
+#                               Flow Parameter                          #
+#########################################################################
+
+//flowSolverName : SIMPLE/CompressibleSIMPLE/PISO
+string flowSolverName = "PISO";
+
+// Initial value of flow variables 
+double initRho = 1.225;
+double initU   = 1;
+double initV   = 0;
+double initW   = 0;
+double initP   = 0;
+double initMu = 1.7894e-05;
+double initRg  = 296.928571;
+double refP    = 101325;
+int refPLocate = 0；
+
+//Parameters For Solving the Momentum Equation
+// MomEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int MomEqSolMethod = 2;
+// MomEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int MomEqPrecondMethod = 1;
+int MomEqMaxSweep = 30;
+double MomEqIterSolvTol = 1e-8;
+double MomEqRelaxCoeff = 0.5;
+
+//Parameters For Solving the Pressure Possion Equation
+// PPEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int PPEqSolMethod= 3;
+// PPEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int PPEqPrecondMethod= 1;
+int PPEqMaxSweep = 30;
+double PPEqIterSolvTol = 1e-8;
+double PPEqRelaxCoeff = 0.7;
+
+//Relaxation factor of surface flux
+double FaceFluxRelaxCoeff = 0.5;
+
+int isCalGravityVisSource = 0;
+int bodyForceFlag = 0;
+double gravityX = 0.0;
+double gravityY = -9.81;
+double gravityZ = 0.0;
+
+int isBoussinesqApproximation        = 0;
+double thermalExpansionCoeff = 3.44827e-3;
+
+#########################################################################
+#                  Turbulence Equation Parameter                        #
+#########################################################################
+// isSolveTurb : is(1)/not(0);
+int isSolveTurb = 1；
+// TurbEqSolverName : k-epsilon(KE)/Spalart-Allmaras(SA)
+string TurbEqSolverName = "SA";
+
+// Initial value of Turbulence variables 
+double initKinetic = 0.0001460735;
+double initEpsilon = 2025;
+
+//Parameters For Solving the Turbulence Equation
+// TurbEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int TurbEqSolMethod  = 2;
+// TurbEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int TurbEqPrecondMethod = 1;
+int    TurbEqMaxSweep    = 30;
+double TurbEqIterSolvTol = 1e-8;
+double TurbEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                     Energy Equation Parameter                         #
+#########################################################################
+// isSolveEnergy : is(1)/not(0);
+int isSolveEnergy = 0;
+
+// Initial value of Energy variables 
+double initT   = 273.15;
+double initCPg = 1007.0;
+double initK   = 0.0454;
+double initkappa = 1.4;
+double refT = 273;
+
+//Parameters For Solving the Energy Equation
+// EnergyEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int EnergyEqSolMethod = 2;
+// EnergyEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int EnergyEqPrecondMethod = 1;
+int    EnergyEqMaxSweep    = 30;
+double EnergyEqIterSolvTol = 1e-8;
+double EnergyEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                    Species Equation Parameter                         #
+#########################################################################
+// isSolveSpecies : is(1)/not(0);
+int isSolveSpecies = 0;
+
+//Parameters For Solving the Species Equation
+int numberOfSpeciesIncom = 1;
+string speciesNameIncom[] = [AIR];
+double initMassFractionIncom[] = [1.0];
+
+//Parameters For Solving the Species Equation
+// SpeciesEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int SpeciesEqSolMethod = 2;
+// SpeciesEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int SpeciesEqPrecondMethod = 1;
+int    SpeciesEqMaxSweep   = 30;
+double SpeciesEqIterSolvTol  = 1e-8;
+double SpeciesEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                               Unsteady Parameter                      #
+#########################################################################
+// iunsteady : is(1)/not(0);
+int iunsteady    = 0;
+double startTime = 0.0;
+double endTime   = 20;
+double dt = 0.1;
+int min_sub_iter = 50;
+int max_sub_iter = 50;
+
+// isStableUnsteadyMethod : is(1)/not(0);
+int isStableUnsteadyMethod = 0;
+
+#########################################################################
+#                               Solution Method                         #
+#########################################################################
+// ConvCalcMethod : UPWIND/CDS/QUICK/SUDS
+string ConvCalcMethod = "UPWIND"
+
+// DiffCalcMethod : NON_ORTHOGONAL(default)
+string DiffCalcMethod = "NON_ORTHOGONAL";
+
+//TranCalcMethod : IMPLICIT_EULER(1st)/IMPLICIT_2ND_ORDER(2st)
+string TranCalcMethod = "IMPLICIT_EULER";
+
+// GradCalcMethod : GAUSS/LSQ
+string GradCalcMethod = "GAUSS";
+
+// mathLibType : hypre(0)/unap(1)/yhamg(2)
+int mathLibType = 0;
+
+// compressible : is(0, default)/not(1)
+int compressible = 0;
+
+// SIMPLEC : SIMPLE(0)/SIMPLEC(1)
+int SIMPLEC = 1;
+
+// isSkewness : stable gradient method: is(1)/not(0)
+int isSkewness = 0;
+
+//rhoType : Constant(0)/IncompressibleIdealGas(1)/IdealGas(2)
+int rhoType = 0;
+
+//muType:  Constant(0)/SutherLand(1)/IdealGasMixingLaw(2),
+int muType  = 0;
+
+//kType : Constant(0)/MassWeightedMixingLaw(1)/IdealGasMixingLaw(2)
+int kType   = 0;
+
+//cpType : Constant(0)/Mixing(1)
+int cpType  = 0;
+
+//massdiffType : ConstantDiluteApprox(1)/DiluteApprox(2)
+int massdiffType = 0;
+
+#########################################################################
+#                              Post-Processing                          #
+#########################################################################
+/ nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+// -- U(22), V(23), W(24), P(25), CP(26), T(27), DEN(28), VIS(29), TE(31), ED(32), enthalpy(70), species(from 71 ~ 70 + numberOfSpecies)
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 6;
+int visualVariables[] = [22, 23, 24, 25, 29, 31];
+int plotFieldType = 1;
+
+string resSaveFile      = "results/res.dat";
+string aircoeffile      = "results/aircoef.dat";
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/grid_para.hypara b/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..b71758e
--- /dev/null
+++ b/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/NACA0012.cas";
+string out_gfile  = "./grid/NACA0012.fts";
diff --git a/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/key.hypara b/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/key.hypara
new file mode 100644
index 0000000..2ce4108
--- /dev/null
+++ b/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 4;
+//string parafilename = "./bin/repository.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/partition.hypara b/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..031a019
--- /dev/null
+++ b/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/bin/partition.hypara
@@ -0,0 +1,22 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/NACA0012.fts";
+string partition_grid_file = "./grid/NACA0012__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
+
diff --git a/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/grid/网格地址.txt b/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/H04_TwoD_NACA0012_UPWIND_SA_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..a8d5907
--- /dev/null
+++ b/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,48 @@
+# nBoundaryConditons : number of global boundary conditions.
+# bcName             : Boundary Condition Name.
+# bcType(in PHengLEI): Boundary Condition Type.
+
+# Account of how to set boundaryconditon.
+# string bcName = "Farfield";          
+# {                                      
+#   int bcType = 4;                      
+#   int inflowParaType = 1;              
+#   double attackd = 0;                  
+#   double refReNumber = 6.5e6;          
+#   double refMachNumber = 3.5;          
+#   double angleSlide = 0;               
+# }                                      
+
+int nBoundaryConditions = 3;
+string bcName = "airfoil_lower";
+{
+  int bcType = 2;
+}
+string bcName = "airfoil_upper";
+{
+  int bcType = 2;
+}
+
+string bcName = "farfield";
+{
+  int bcType = 5;
+  double initU = 100;
+  double initKinetic = 0.0001460735;
+  double initEpsilon = 2025;
+}
+
+# 'bcType' is defined as following:
+#    99: PERIODIC              	
+#    -2: WAKE                  	
+#    -1: INTERFACE             	
+#    0 : NO_BOUNDARY_CONDITION 	
+#    1 : EXTRAPOLATION         	
+#    2 : SOLID_SURFACE         	
+#    3 : SYMMETRY              	
+#    4 : FARFIELD              	
+#    5 : INFLOW                	
+#    6 : OUTFLOW               	
+#    52: PRESSURE_INLET		    
+#    62: PRESSURE_OUTLET		   	
+#    61: OUTFLOW_CONFINED      	
+#    7 : POLE						
diff --git a/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/cfd_para_incompressible.hypara b/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/cfd_para_incompressible.hypara
new file mode 100644
index 0000000..2a1eab3
--- /dev/null
+++ b/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/cfd_para_incompressible.hypara
@@ -0,0 +1,211 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+int maxSimuStep       = 2000;
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 500;
+int intervalStepForce = 1;
+int intervalStepRes   = 1;
+
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+string gridfile = "./grid/NACA0012__4.fts";
+
+#########################################################################
+#                               Flow Parameter                          #
+#########################################################################
+
+//flowSolverName : SIMPLE/CompressibleSIMPLE/PISO
+string flowSolverName = "SIMPLE";
+
+// Initial value of flow variables 
+double initRho = 1.0;
+double initU = 100;
+double initV   = 0;
+double initW   = 0;
+double initP   = 0;
+double initMu = 0.00001;
+double initRg  = 296.928571;
+double refP    = 101325;
+int refPLocate = 0；
+
+//Parameters For Solving the Momentum Equation
+// MomEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int MomEqSolMethod = 2;
+// MomEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int MomEqPrecondMethod = 1;
+int MomEqMaxSweep = 30;
+double MomEqIterSolvTol = 1e-8;
+double MomEqRelaxCoeff = 0.5;
+
+//Parameters For Solving the Pressure Possion Equation
+// PPEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int PPEqSolMethod= 3;
+// PPEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int PPEqPrecondMethod= 1;
+int PPEqMaxSweep = 30;
+double PPEqIterSolvTol = 1e-8;
+double PPEqRelaxCoeff = 0.3;
+
+//Relaxation factor of surface flux
+double FaceFluxRelaxCoeff = 0.5;
+
+int isCalGravityVisSource = 0;
+int bodyForceFlag = 0;
+double gravityX = 0.0;
+double gravityY = -9.81;
+double gravityZ = 0.0;
+
+int isBoussinesqApproximation        = 0;
+double thermalExpansionCoeff = 3.44827e-3;
+
+#########################################################################
+#                  Turbulence Equation Parameter                        #
+#########################################################################
+// isSolveTurb : is(1)/not(0);
+int isSolveTurb = 1；
+// TurbEqSolverName : k-epsilon(KE)/Spalart-Allmaras(SA)
+string TurbEqSolverName = "KE";
+
+// Initial value of Turbulence variables 
+double initKinetic = 0.0001460735;
+double initEpsilon = 2025;
+
+//Parameters For Solving the Turbulence Equation
+// TurbEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int TurbEqSolMethod  = 2;
+// TurbEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int TurbEqPrecondMethod = 1;
+int    TurbEqMaxSweep    = 30;
+double TurbEqIterSolvTol = 1e-8;
+double TurbEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                     Energy Equation Parameter                         #
+#########################################################################
+// isSolveEnergy : is(1)/not(0);
+int isSolveEnergy = 0;
+
+// Initial value of Energy variables 
+double initT   = 273.15;
+double initCPg = 1007.0;
+double initK   = 0.0454;
+double initkappa = 1.4;
+double refT = 273;
+
+//Parameters For Solving the Energy Equation
+// EnergyEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int EnergyEqSolMethod = 2;
+// EnergyEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int EnergyEqPrecondMethod = 1;
+int    EnergyEqMaxSweep    = 30;
+double EnergyEqIterSolvTol = 1e-8;
+double EnergyEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                    Species Equation Parameter                         #
+#########################################################################
+// isSolveSpecies : is(1)/not(0);
+int isSolveSpecies = 0;
+
+//Parameters For Solving the Species Equation
+int numberOfSpeciesIncom = 1;
+string speciesNameIncom[] = [AIR];
+double initMassFractionIncom[] = [1.0];
+
+//Parameters For Solving the Species Equation
+// SpeciesEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int SpeciesEqSolMethod = 2;
+// SpeciesEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int SpeciesEqPrecondMethod = 1;
+int    SpeciesEqMaxSweep   = 30;
+double SpeciesEqIterSolvTol  = 1e-8;
+double SpeciesEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                               Unsteady Parameter                      #
+#########################################################################
+// iunsteady : is(1)/not(0);
+int iunsteady    = 0;
+double startTime = 0.0;
+double endTime   = 20;
+double dt = 0.1;
+int min_sub_iter = 50;
+int max_sub_iter = 50;
+
+// isStableUnsteadyMethod : is(1)/not(0);
+int isStableUnsteadyMethod = 0;
+
+#########################################################################
+#                               Solution Method                         #
+#########################################################################
+// ConvCalcMethod : UPWIND/CDS/QUICK/SUDS
+string ConvCalcMethod = "UPWIND"
+
+// DiffCalcMethod : NON_ORTHOGONAL(default)
+string DiffCalcMethod = "NON_ORTHOGONAL";
+
+//TranCalcMethod : IMPLICIT_EULER(1st)/IMPLICIT_2ND_ORDER(2st)
+string TranCalcMethod = "IMPLICIT_EULER";
+
+// GradCalcMethod : GAUSS/LSQ
+string GradCalcMethod = "GAUSS";
+
+// mathLibType : hypre(0)/unap(1)/yhamg(2)
+int mathLibType = 0;
+
+// compressible : is(0, default)/not(1)
+int compressible = 0;
+
+// SIMPLEC : SIMPLE(0)/SIMPLEC(1)
+int SIMPLEC = 1;
+
+// isSkewness : stable gradient method: is(1)/not(0)
+int isSkewness = 0;
+
+//rhoType : Constant(0)/IncompressibleIdealGas(1)/IdealGas(2)
+int rhoType = 0;
+
+//muType:  Constant(0)/SutherLand(1)/IdealGasMixingLaw(2),
+int muType  = 0;
+
+//kType : Constant(0)/MassWeightedMixingLaw(1)/IdealGasMixingLaw(2)
+int kType   = 0;
+
+//cpType : Constant(0)/Mixing(1)
+int cpType  = 0;
+
+//massdiffType : ConstantDiluteApprox(1)/DiluteApprox(2)
+int massdiffType = 0;
+
+#########################################################################
+#                              Post-Processing                          #
+#########################################################################
+/ nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+// -- U(22), V(23), W(24), P(25), CP(26), T(27), DEN(28), VIS(29), TE(31), ED(32), enthalpy(70), species(from 71 ~ 70 + numberOfSpecies)
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 7;
+int visualVariables[] = [22, 23, 24, 25, 29, 31,32];
+int plotFieldType = 1;
+
+string resSaveFile      = "results/res.dat";
+string aircoeffile      = "results/aircoef.dat";
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/grid_para.hypara b/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..b71758e
--- /dev/null
+++ b/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/NACA0012.cas";
+string out_gfile  = "./grid/NACA0012.fts";
diff --git a/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/key.hypara b/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/key.hypara
new file mode 100644
index 0000000..fdf7cad
--- /dev/null
+++ b/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/key.hypara
@@ -0,0 +1,55 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
\ No newline at end of file
diff --git a/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/partition.hypara b/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..031a019
--- /dev/null
+++ b/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/bin/partition.hypara
@@ -0,0 +1,22 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/NACA0012.fts";
+string partition_grid_file = "./grid/NACA0012__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
+
diff --git a/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/grid/网格地址.txt b/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/H05_TwoD_NACA0012_SIMPLEC_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..bf72a26
--- /dev/null
+++ b/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,65 @@
+# nBoundaryConditions: Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 4;
+string bcName = "bottomwall";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "coldwall";
+{
+  string bodyName = "body";
+  int bcType = 2;
+  double initT = 290.0;
+}
+string bcName = "hotwall";
+{
+  string bodyName = "body";
+  int bcType = 2;
+  double initT = 305.0;
+}
+string bcName = "topwall";
+{
+  string bodyName = "body";
+  int bcType = 2;  
+}
+
+# 'bcType' is defined as following:
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/cfd_para_incompressible.hypara b/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/cfd_para_incompressible.hypara
new file mode 100644
index 0000000..868047c
--- /dev/null
+++ b/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/cfd_para_incompressible.hypara
@@ -0,0 +1,211 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+int maxSimuStep       = 2000;
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 500;
+int intervalStepForce = 1;
+int intervalStepRes   = 1;
+
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+string gridfile = "./grid/run__4.fts";
+
+#########################################################################
+#                               Flow Parameter                          #
+#########################################################################
+
+//flowSolverName : SIMPLE/CompressibleSIMPLE/PISO
+string flowSolverName = "SIMPLE";
+
+// Initial value of flow variables 
+double initRho = 1.1405;
+double initU   = 0;
+double initV   = 0;
+double initW   = 0;
+double initP   = 0;
+double initMu = 1.7894e-05;
+double initRg  = 296.928571;
+double refP    = 101325;
+int refPLocate = 0；
+
+//Parameters For Solving the Momentum Equation
+// MomEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int MomEqSolMethod = 2;
+// MomEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int MomEqPrecondMethod = 1;
+int MomEqMaxSweep = 30;
+double MomEqIterSolvTol = 1e-8;
+double MomEqRelaxCoeff = 0.5;
+
+//Parameters For Solving the Pressure Possion Equation
+// PPEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int PPEqSolMethod= 3;
+// PPEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int PPEqPrecondMethod= 1;
+int PPEqMaxSweep = 30;
+double PPEqIterSolvTol = 1e-8;
+double PPEqRelaxCoeff = 0.3;
+
+//Relaxation factor of surface flux
+double FaceFluxRelaxCoeff = 0.5;
+
+int isCalGravityVisSource = 1;
+int bodyForceFlag = 0;
+double gravityX = 0.0;
+double gravityY = -9.81;
+double gravityZ = 0.0;
+
+int isBoussinesqApproximation        = 1;
+double thermalExpansionCoeff = 3.44827e-3;
+
+#########################################################################
+#                  Turbulence Equation Parameter                        #
+#########################################################################
+// isSolveTurb : is(1)/not(0);
+int isSolveTurb = 0；
+// TurbEqSolverName : k-epsilon(KE)/Spalart-Allmaras(SA)
+string TurbEqSolverName = "KE";
+
+// Initial value of Turbulence variables 
+double initKinetic = 0.64;
+double initEpsilon = 5771;
+
+//Parameters For Solving the Turbulence Equation
+// TurbEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int TurbEqSolMethod  = 2;
+// TurbEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int TurbEqPrecondMethod = 1;
+int    TurbEqMaxSweep    = 30;
+double TurbEqIterSolvTol = 1e-8;
+double TurbEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                     Energy Equation Parameter                         #
+#########################################################################
+// isSolveEnergy : is(1)/not(0);
+int isSolveEnergy = 1;
+
+// Initial value of Energy variables 
+double initT             = 295;
+double initCPg           = 1006.43;
+double initK             = 0.0242;
+double initkappa = 1.4;
+double refT             = 290;
+
+//Parameters For Solving the Energy Equation
+// EnergyEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int EnergyEqSolMethod = 2;
+// EnergyEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int EnergyEqPrecondMethod = 1;
+int    EnergyEqMaxSweep    = 30;
+double EnergyEqIterSolvTol = 1e-8;
+double EnergyEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                    Species Equation Parameter                         #
+#########################################################################
+// isSolveSpecies : is(1)/not(0);
+int isSolveSpecies = 0;
+
+//Parameters For Solving the Species Equation
+int numberOfSpeciesIncom = 1;
+string speciesNameIncom[] = [AIR];
+double initMassFractionIncom[] = [1.0];
+
+//Parameters For Solving the Species Equation
+// SpeciesEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int SpeciesEqSolMethod = 2;
+// SpeciesEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int SpeciesEqPrecondMethod = 1;
+int    SpeciesEqMaxSweep   = 30;
+double SpeciesEqIterSolvTol  = 1e-8;
+double SpeciesEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                               Unsteady Parameter                      #
+#########################################################################
+// iunsteady : is(1)/not(0);
+int iunsteady    = 0;
+double startTime = 0.0;
+double endTime   = 20;
+double dt = 0.1;
+int min_sub_iter = 50;
+int max_sub_iter = 50;
+
+// isStableUnsteadyMethod : is(1)/not(0);
+int isStableUnsteadyMethod = 0;
+
+#########################################################################
+#                               Solution Method                         #
+#########################################################################
+// ConvCalcMethod : UPWIND/CDS/QUICK/SUDS
+string ConvCalcMethod = "CDS"
+
+// DiffCalcMethod : NON_ORTHOGONAL(default)
+string DiffCalcMethod = "NON_ORTHOGONAL";
+
+//TranCalcMethod : IMPLICIT_EULER(1st)/IMPLICIT_2ND_ORDER(2st)
+string TranCalcMethod = "IMPLICIT_EULER";
+
+// GradCalcMethod : GAUSS/LSQ
+string GradCalcMethod = "GAUSS";
+
+// mathLibType : hypre(0)/unap(1)/yhamg(2)
+int mathLibType = 0;
+
+// compressible : is(0, default)/not(1)
+int compressible = 0;
+
+// SIMPLEC : SIMPLE(0)/SIMPLEC(1)
+int SIMPLEC = 1;
+
+// isSkewness : stable gradient method: is(1)/not(0)
+int isSkewness = 0;
+
+//rhoType : Constant(0)/IncompressibleIdealGas(1)/IdealGas(2)
+int rhoType = 0;
+
+//muType:  Constant(0)/SutherLand(1)/IdealGasMixingLaw(2),
+int muType  = 0;
+
+//kType : Constant(0)/MassWeightedMixingLaw(1)/IdealGasMixingLaw(2)
+int kType   = 0;
+
+//cpType : Constant(0)/Mixing(1)
+int cpType  = 0;
+
+//massdiffType : ConstantDiluteApprox(1)/DiluteApprox(2)
+int massdiffType = 0;
+
+#########################################################################
+#                              Post-Processing                          #
+#########################################################################
+/ nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+// -- U(22), V(23), W(24), P(25), CP(26), T(27), DEN(28), VIS(29), TE(31), ED(32), enthalpy(70), species(from 71 ~ 70 + numberOfSpecies)
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 6;
+int visualVariables[] = [22, 23, 24, 25, 27, 70];
+int plotFieldType = 1;
+
+string resSaveFile      = "results/res.dat";
+string aircoeffile      = "results/aircoef.dat";
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/grid_para.hypara b/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..33ef8e1
--- /dev/null
+++ b/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/run.cas";
+string out_gfile  = "./grid/run.fts";
diff --git a/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/key.hypara b/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/key.hypara
new file mode 100644
index 0000000..9c32184
--- /dev/null
+++ b/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/key.hypara
@@ -0,0 +1,52 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int nsimutask = 0;
+string parafilename = "./bin/cfd_para_incompressible.hypara"
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/partition.hypara b/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..753e3df
--- /dev/null
+++ b/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/bin/partition.hypara
@@ -0,0 +1,23 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+int numberOfMultifile = 1;
+int isWennScheme = 0;
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/run.fts";
+string partition_grid_file = "./grid/run__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
+
diff --git a/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/grid/网格地址.txt b/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/H06_TwoD_NaturalConvection_CDS_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..b29c04b
--- /dev/null
+++ b/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,68 @@
+# nBoundaryConditions: Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 4;
+string bcName = "in";
+{
+  string bodyName = "body";
+  int bcType = 5;
+  double initU = 20;
+  double initKinetic = 0.135;
+  double initEpsilon = 1.64025;
+}
+string bcName = "out";
+{
+  string bodyName = "body";
+  int bcType = 6;
+  double initP =0;
+  double initKinetic = 0.135;
+  double initEpsilon = 1.64025;
+}
+string bcName = "wall";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "symmetry";
+{
+  int bcType = 3;
+}
+
+# 'bcType' is defined as following:
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/cfd_para_incompressible.hypara b/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
new file mode 100644
index 0000000..46441d2
--- /dev/null
+++ b/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
@@ -0,0 +1,211 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+int maxSimuStep       = 2000;
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 500;
+int intervalStepForce = 1;
+int intervalStepRes   = 1;
+
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+string gridfile = "./grid/TurbPlate__4.fts";
+
+#########################################################################
+#                               Flow Parameter                          #
+#########################################################################
+
+//flowSolverName : SIMPLE/CompressibleSIMPLE/PISO
+string flowSolverName = "CompressibleSIMPLE";
+
+// Initial value of flow variables 
+double initRho = 1.0;
+double initU   = 0;
+double initV   = 0;
+double initW   = 0;
+double initP   = 0;
+double initMu = 0.00001;
+double initRg  = 296.928571;
+double refP    = 101325;
+int refPLocate = 0；
+
+//Parameters For Solving the Momentum Equation
+// MomEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int MomEqSolMethod = 2;
+// MomEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int MomEqPrecondMethod = 1;
+int MomEqMaxSweep = 30;
+double MomEqIterSolvTol = 1e-8;
+double MomEqRelaxCoeff = 0.5;
+
+//Parameters For Solving the Pressure Possion Equation
+// PPEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int PPEqSolMethod= 3;
+// PPEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int PPEqPrecondMethod= 1;
+int PPEqMaxSweep = 30;
+double PPEqIterSolvTol = 1e-8;
+double PPEqRelaxCoeff = 0.3;
+
+//Relaxation factor of surface flux
+double FaceFluxRelaxCoeff = 0.5;
+
+int isCalGravityVisSource = 0;
+int bodyForceFlag = 0;
+double gravityX = 0.0;
+double gravityY = -9.81;
+double gravityZ = 0.0;
+
+int isBoussinesqApproximation        = 0;
+double thermalExpansionCoeff = 3.44827e-3;
+
+#########################################################################
+#                  Turbulence Equation Parameter                        #
+#########################################################################
+// isSolveTurb : is(1)/not(0);
+int isSolveTurb = 1；
+// TurbEqSolverName : k-epsilon(KE)/Spalart-Allmaras(SA)
+string TurbEqSolverName = "KE";
+
+// Initial value of Turbulence variables 
+double initKinetic = 0.135;
+double initEpsilon = 1.64025;
+
+//Parameters For Solving the Turbulence Equation
+// TurbEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int TurbEqSolMethod  = 2;
+// TurbEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int TurbEqPrecondMethod = 1;
+int    TurbEqMaxSweep    = 30;
+double TurbEqIterSolvTol = 1e-8;
+double TurbEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                     Energy Equation Parameter                         #
+#########################################################################
+// isSolveEnergy : is(1)/not(0);
+int isSolveEnergy = 0;
+
+// Initial value of Energy variables 
+double initT   = 273.15;
+double initCPg = 1007.0;
+double initK   = 0.0454;
+double initkappa = 1.4;
+double refT = 273;
+
+//Parameters For Solving the Energy Equation
+// EnergyEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int EnergyEqSolMethod = 2;
+// EnergyEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int EnergyEqPrecondMethod = 1;
+int    EnergyEqMaxSweep    = 30;
+double EnergyEqIterSolvTol = 1e-8;
+double EnergyEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                    Species Equation Parameter                         #
+#########################################################################
+// isSolveSpecies : is(1)/not(0);
+int isSolveSpecies = 0;
+
+//Parameters For Solving the Species Equation
+int numberOfSpeciesIncom = 1;
+string speciesNameIncom[] = [AIR];
+double initMassFractionIncom[] = [1.0];
+
+//Parameters For Solving the Species Equation
+// SpeciesEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int SpeciesEqSolMethod = 2;
+// SpeciesEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int SpeciesEqPrecondMethod = 1;
+int    SpeciesEqMaxSweep   = 30;
+double SpeciesEqIterSolvTol  = 1e-8;
+double SpeciesEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                               Unsteady Parameter                      #
+#########################################################################
+// iunsteady : is(1)/not(0);
+int iunsteady    = 0;
+double startTime = 0.0;
+double endTime   = 20;
+double dt = 0.1;
+int min_sub_iter = 50;
+int max_sub_iter = 50;
+
+// isStableUnsteadyMethod : is(1)/not(0);
+int isStableUnsteadyMethod = 0;
+
+#########################################################################
+#                               Solution Method                         #
+#########################################################################
+// ConvCalcMethod : UPWIND/CDS/QUICK/SUDS
+string ConvCalcMethod = "UPWIND"
+
+// DiffCalcMethod : NON_ORTHOGONAL(default)
+string DiffCalcMethod = "NON_ORTHOGONAL";
+
+//TranCalcMethod : IMPLICIT_EULER(1st)/IMPLICIT_2ND_ORDER(2st)
+string TranCalcMethod = "IMPLICIT_EULER";
+
+// GradCalcMethod : GAUSS/LSQ
+string GradCalcMethod = "GAUSS";
+
+// mathLibType : hypre(0)/unap(1)/yhamg(2)
+int mathLibType = 0;
+
+// compressible : is(0, default)/not(1)
+int compressible = 0;
+
+// SIMPLEC : SIMPLE(0)/SIMPLEC(1)
+int SIMPLEC = 1;
+
+// isSkewness : stable gradient method: is(1)/not(0)
+int isSkewness = 0;
+
+//rhoType : Constant(0)/IncompressibleIdealGas(1)/IdealGas(2)
+int rhoType = 0;
+
+//muType:  Constant(0)/SutherLand(1)/IdealGasMixingLaw(2),
+int muType  = 0;
+
+//kType : Constant(0)/MassWeightedMixingLaw(1)/IdealGasMixingLaw(2)
+int kType   = 0;
+
+//cpType : Constant(0)/Mixing(1)
+int cpType  = 0;
+
+//massdiffType : ConstantDiluteApprox(1)/DiluteApprox(2)
+int massdiffType = 0;
+
+#########################################################################
+#                              Post-Processing                          #
+#########################################################################
+/ nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+// -- U(22), V(23), W(24), P(25), CP(26), T(27), DEN(28), VIS(29), TE(31), ED(32), enthalpy(70), species(from 71 ~ 70 + numberOfSpecies)
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 7;
+int visualVariables[] = [22, 23, 24, 25, 29, 31, 32];
+int plotFieldType = 1;
+
+string resSaveFile      = "results/res.dat";
+string aircoeffile      = "results/aircoef.dat";
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/grid_para.hypara b/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..10315bd
--- /dev/null
+++ b/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/TurbPlate.cas";
+string out_gfile  = "./grid/TurbPlate.fts";
diff --git a/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/key.hypara b/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/key.hypara
new file mode 100644
index 0000000..fdf7cad
--- /dev/null
+++ b/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/key.hypara
@@ -0,0 +1,55 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
\ No newline at end of file
diff --git a/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/partition.hypara b/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..ee52748
--- /dev/null
+++ b/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/bin/partition.hypara
@@ -0,0 +1,23 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+int numberOfMultifile = 1;
+int isWennScheme = 0;
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/TurbPlate.fts";
+string partition_grid_file = "./grid/TurbPlate__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
+
diff --git a/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/grid/网格地址.txt b/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/H07_TwoD_Plate_Turb_UPWIND_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..8d57f2c
--- /dev/null
+++ b/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,86 @@
+# nBoundaryConditions: Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 6;
+string bcName = "in1";
+{
+  int bcType = 5;
+  double initU= 53;
+  double initT = 300;
+  double initMassFractionIncom[] = [1.0, 0.0];
+  double initKinetic = 18.375;
+  double initEpsilon = 322881.7;
+}
+string bcName = "in2";
+{
+  int bcType = 5;
+  double initU= 9.3;
+  double initT = 294;
+  double initMassFractionIncom[] = [0.03, 0.97];
+  double initKinetic = 0.3243375;
+  double initEpsilon = 66;
+}
+string bcName = "out";
+{
+  int bcType = 6;
+  double initP = 0;
+  double initT = 294;
+  double initMassFractionIncom[] = [1.0, 0.0];
+  double initKinetic = 0.3243375;
+  double initEpsilon = 66;
+}
+string bcName = "wall1";
+{
+  string bodyName = "body";
+  int bcType = 2;
+  double initT = 294;
+}
+string bcName = "wall2";
+{
+  string bodyName = "body";
+  int bcType = 2;
+  double initT = 294;
+}
+string bcName = "sym";
+{
+  int bcType = 3;
+}
+
+# 'bcType' is defined as following:
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/cfd_para_incompressible.hypara b/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
new file mode 100644
index 0000000..9379fd8
--- /dev/null
+++ b/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
@@ -0,0 +1,211 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+int maxSimuStep       = 4000;
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 500;
+int intervalStepForce = 1;
+int intervalStepRes   = 1;
+
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+string gridfile = "./grid/airmixture__4.fts";
+
+#########################################################################
+#                               Flow Parameter                          #
+#########################################################################
+
+//flowSolverName : SIMPLE/CompressibleSIMPLE/PISO
+string flowSolverName = "CompressibleSIMPLE";
+
+// Initial value of flow variables 
+double initRho = 1.225;
+double initU   = 0;
+double initV   = 0;
+double initW   = 0;
+double initP   = 0;
+double initMu = 1.7894e-05;
+double initRg  = 296.928571;
+double refP    = 101325;
+int refPLocate = 0；
+
+//Parameters For Solving the Momentum Equation
+// MomEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int MomEqSolMethod = 2;
+// MomEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int MomEqPrecondMethod = 1;
+int MomEqMaxSweep = 30;
+double MomEqIterSolvTol = 1e-8;
+double MomEqRelaxCoeff = 0.5;
+
+//Parameters For Solving the Pressure Possion Equation
+// PPEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int PPEqSolMethod= 3;
+// PPEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int PPEqPrecondMethod= 1;
+int PPEqMaxSweep = 30;
+double PPEqIterSolvTol = 1e-8;
+double PPEqRelaxCoeff = 0.7;
+
+//Relaxation factor of surface flux
+double FaceFluxRelaxCoeff = 0.5;
+
+int isCalGravityVisSource = 0;
+int bodyForceFlag = 0;
+double gravityX = 0.0;
+double gravityY = -9.81;
+double gravityZ = 0.0;
+
+int isBoussinesqApproximation        = 0;
+double thermalExpansionCoeff = 3.44827e-3;
+
+#########################################################################
+#                  Turbulence Equation Parameter                        #
+#########################################################################
+// isSolveTurb : is(1)/not(0);
+int isSolveTurb = 1；
+// TurbEqSolverName : k-epsilon(KE)/Spalart-Allmaras(SA)
+string TurbEqSolverName = "KE";
+
+// Initial value of Turbulence variables 
+double initKinetic = 0.64;
+double initEpsilon = 5771;
+
+//Parameters For Solving the Turbulence Equation
+// TurbEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int TurbEqSolMethod  = 2;
+// TurbEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int TurbEqPrecondMethod = 1;
+int    TurbEqMaxSweep    = 30;
+double TurbEqIterSolvTol = 1e-8;
+double TurbEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                     Energy Equation Parameter                         #
+#########################################################################
+// isSolveEnergy : is(1)/not(0);
+int isSolveEnergy = 1;
+
+// Initial value of Energy variables 
+double initT   = 273.15;
+double initCPg = 1007.0;
+double initK   = 0.0454;
+double initkappa = 1.4;
+double refT = 273;
+
+//Parameters For Solving the Energy Equation
+// EnergyEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int EnergyEqSolMethod = 2;
+// EnergyEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int EnergyEqPrecondMethod = 1;
+int    EnergyEqMaxSweep    = 30;
+double EnergyEqIterSolvTol = 1e-8;
+double EnergyEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                    Species Equation Parameter                         #
+#########################################################################
+// isSolveSpecies : is(1)/not(0);
+int isSolveSpecies = 1;
+
+//Parameters For Solving the Species Equation
+int numberOfSpeciesIncom = 2;
+string speciesNameIncom[] = [C3H8, AIR];
+double initMassFractionIncom[] = [1.0, 0.0];
+
+//Parameters For Solving the Species Equation
+// SpeciesEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int SpeciesEqSolMethod = 2;
+// SpeciesEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int SpeciesEqPrecondMethod = 1;
+int    SpeciesEqMaxSweep   = 30;
+double SpeciesEqIterSolvTol  = 1e-8;
+double SpeciesEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                               Unsteady Parameter                      #
+#########################################################################
+// iunsteady : is(1)/not(0);
+int iunsteady    = 0;
+double startTime = 0.0;
+double endTime   = 20;
+double dt = 0.1;
+int min_sub_iter = 50;
+int max_sub_iter = 50;
+
+// isStableUnsteadyMethod : is(1)/not(0);
+int isStableUnsteadyMethod = 0;
+
+#########################################################################
+#                               Solution Method                         #
+#########################################################################
+// ConvCalcMethod : UPWIND/CDS/QUICK/SUDS
+string ConvCalcMethod = "UPWIND"
+
+// DiffCalcMethod : NON_ORTHOGONAL(default)
+string DiffCalcMethod = "NON_ORTHOGONAL";
+
+//TranCalcMethod : IMPLICIT_EULER(1st)/IMPLICIT_2ND_ORDER(2st)
+string TranCalcMethod = "IMPLICIT_EULER";
+
+// GradCalcMethod : GAUSS/LSQ
+string GradCalcMethod = "GAUSS";
+
+// mathLibType : hypre(0)/unap(1)/yhamg(2)
+int mathLibType = 0;
+
+// compressible : is(0, default)/not(1)
+int compressible = 0;
+
+// SIMPLEC : SIMPLE(0)/SIMPLEC(1)
+int SIMPLEC = 1;
+
+// isSkewness : stable gradient method: is(1)/not(0)
+int isSkewness = 0;
+
+//rhoType : Constant(0)/IncompressibleIdealGas(1)/IdealGas(2)
+int rhoType = 2;
+
+//muType:  Constant(0)/SutherLand(1)/IdealGasMixingLaw(2),
+int muType  = 0;
+
+//kType : Constant(0)/MassWeightedMixingLaw(1)/IdealGasMixingLaw(2)
+int kType   = 0;
+
+//cpType : Constant(0)/Mixing(1)
+int cpType  = 0;
+
+//massdiffType : ConstantDiluteApprox(1)/DiluteApprox(2)
+int massdiffType = 0;
+
+#########################################################################
+#                              Post-Processing                          #
+#########################################################################
+/ nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+// -- U(22), V(23), W(24), P(25), CP(26), T(27), DEN(28), VIS(29), TE(31), ED(32), enthalpy(70), species(from 71 ~ 70 + numberOfSpecies)
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 12;
+int visualVariables[] = [22, 23, 24, 25, 27, 28, 29, 31, 32, 70, 71, 72];
+int plotFieldType = 1;
+
+string resSaveFile      = "results/res.dat";
+string aircoeffile      = "results/aircoef.dat";
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/grid_para.hypara b/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..3e24373
--- /dev/null
+++ b/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/airmixture.cas";
+string out_gfile  = "./grid/airmixture.fts";
diff --git a/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/key.hypara b/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/key.hypara
new file mode 100644
index 0000000..fdf7cad
--- /dev/null
+++ b/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/key.hypara
@@ -0,0 +1,55 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
\ No newline at end of file
diff --git a/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/partition.hypara b/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..3e3b4be
--- /dev/null
+++ b/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/airmixture.fts";
+string partition_grid_file = "./grid/airmixture__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/grid/网格地址.txt b/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/H08_TwoD_Species_Turb_UPWIND_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..d310286
--- /dev/null
+++ b/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,71 @@
+# nBoundaryConditions: Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 5;
+string bcName = "car_1";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "wall_1";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "sym_1";
+{
+  int bcType = 3;
+}
+string bcName = "inlet_1";
+{
+ int bcType = 5;
+  double initU =10;
+  double initKinetic = 0.375;
+  double initEpsilon =86.64304;
+}
+string bcName = "outlet_1";
+{
+  int bcType = 6;
+  double flowP =0;
+  double initKinetic =0.375;
+  double initEpsilon =86.64304;
+}
+
+# 'bcType' is defined as following:
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/cfd_para_incompressible.hypara b/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
new file mode 100644
index 0000000..b830b81
--- /dev/null
+++ b/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
@@ -0,0 +1,211 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+int maxSimuStep       = 1000;
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 100;
+int intervalStepForce = 1;
+int intervalStepRes   = 1;
+
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+string gridfile = "./grid/car__4.fts";
+
+#########################################################################
+#                               Flow Parameter                          #
+#########################################################################
+
+//flowSolverName : SIMPLE/CompressibleSIMPLE/PISO
+string flowSolverName = "SIMPLE";
+
+// Initial value of flow variables 
+double initRho = 1.225;
+double initU = 10;
+double initV   = 0;
+double initW   = 0;
+double initP   = 0;
+double initMu = 1.7894e-05;
+double initRg  = 296.928571;
+double refP    = 101325;
+int refPLocate = 0；
+
+//Parameters For Solving the Momentum Equation
+// MomEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int MomEqSolMethod = 2;
+// MomEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int MomEqPrecondMethod = 1;
+int MomEqMaxSweep = 30;
+double MomEqIterSolvTol = 1e-8;
+double MomEqRelaxCoeff = 0.5;
+
+//Parameters For Solving the Pressure Possion Equation
+// PPEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int PPEqSolMethod= 3;
+// PPEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int PPEqPrecondMethod= 1;
+int PPEqMaxSweep = 30;
+double PPEqIterSolvTol = 1e-8;
+double PPEqRelaxCoeff = 0.3;
+
+//Relaxation factor of surface flux
+double FaceFluxRelaxCoeff = 0.5;
+
+int isCalGravityVisSource = 0;
+int bodyForceFlag = 0;
+double gravityX = 0.0;
+double gravityY = -9.81;
+double gravityZ = 0.0;
+
+int isBoussinesqApproximation        = 0;
+double thermalExpansionCoeff = 3.44827e-3;
+
+#########################################################################
+#                  Turbulence Equation Parameter                        #
+#########################################################################
+// isSolveTurb : is(1)/not(0);
+int isSolveTurb = 1；
+// TurbEqSolverName : k-epsilon(KE)/Spalart-Allmaras(SA)
+string TurbEqSolverName = "KE";
+
+// Initial value of Turbulence variables 
+double initKinetic = 0.375;
+double initEpsilon = 86.643;
+
+//Parameters For Solving the Turbulence Equation
+// TurbEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int TurbEqSolMethod  = 2;
+// TurbEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int TurbEqPrecondMethod = 1;
+int    TurbEqMaxSweep    = 30;
+double TurbEqIterSolvTol = 1e-8;
+double TurbEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                     Energy Equation Parameter                         #
+#########################################################################
+// isSolveEnergy : is(1)/not(0);
+int isSolveEnergy = 0;
+
+// Initial value of Energy variables 
+double initT   = 273.15;
+double initCPg = 1007.0;
+double initK   = 0.0454;
+double initkappa = 1.4;
+double refT = 273;
+
+//Parameters For Solving the Energy Equation
+// EnergyEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int EnergyEqSolMethod = 2;
+// EnergyEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int EnergyEqPrecondMethod = 1;
+int    EnergyEqMaxSweep    = 30;
+double EnergyEqIterSolvTol = 1e-8;
+double EnergyEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                    Species Equation Parameter                         #
+#########################################################################
+// isSolveSpecies : is(1)/not(0);
+int isSolveSpecies = 0;
+
+//Parameters For Solving the Species Equation
+int numberOfSpeciesIncom = 1;
+string speciesNameIncom[] = [AIR];
+double initMassFractionIncom[] = [1.0];
+
+//Parameters For Solving the Species Equation
+// SpeciesEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int SpeciesEqSolMethod = 2;
+// SpeciesEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int SpeciesEqPrecondMethod = 1;
+int    SpeciesEqMaxSweep   = 30;
+double SpeciesEqIterSolvTol  = 1e-8;
+double SpeciesEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                               Unsteady Parameter                      #
+#########################################################################
+// iunsteady : is(1)/not(0);
+int iunsteady    = 0;
+double startTime = 0.0;
+double endTime   = 20;
+double dt = 0.1;
+int min_sub_iter = 50;
+int max_sub_iter = 50;
+
+// isStableUnsteadyMethod : is(1)/not(0);
+int isStableUnsteadyMethod = 0;
+
+#########################################################################
+#                               Solution Method                         #
+#########################################################################
+// ConvCalcMethod : UPWIND/CDS/QUICK/SUDS
+string ConvCalcMethod = "UPWIND"
+
+// DiffCalcMethod : NON_ORTHOGONAL(default)
+string DiffCalcMethod = "NON_ORTHOGONAL";
+
+//TranCalcMethod : IMPLICIT_EULER(1st)/IMPLICIT_2ND_ORDER(2st)
+string TranCalcMethod = "IMPLICIT_EULER";
+
+// GradCalcMethod : GAUSS/LSQ
+string GradCalcMethod = "GAUSS";
+
+// mathLibType : hypre(0)/unap(1)/yhamg(2)
+int mathLibType = 0;
+
+// compressible : is(0, default)/not(1)
+int compressible = 0;
+
+// SIMPLEC : SIMPLE(0)/SIMPLEC(1)
+int SIMPLEC = 1;
+
+// isSkewness : stable gradient method: is(1)/not(0)
+int isSkewness = 0;
+
+//rhoType : Constant(0)/IncompressibleIdealGas(1)/IdealGas(2)
+int rhoType = 0;
+
+//muType:  Constant(0)/SutherLand(1)/IdealGasMixingLaw(2),
+int muType  = 0;
+
+//kType : Constant(0)/MassWeightedMixingLaw(1)/IdealGasMixingLaw(2)
+int kType   = 0;
+
+//cpType : Constant(0)/Mixing(1)
+int cpType  = 0;
+
+//massdiffType : ConstantDiluteApprox(1)/DiluteApprox(2)
+int massdiffType = 0;
+
+#########################################################################
+#                              Post-Processing                          #
+#########################################################################
+/ nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+// -- U(22), V(23), W(24), P(25), CP(26), T(27), DEN(28), VIS(29), TE(31), ED(32), enthalpy(70), species(from 71 ~ 70 + numberOfSpecies)
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 7;
+int visualVariables[] = [22, 23, 24, 25, 29, 31, 32];
+int plotFieldType = 1;
+
+string resSaveFile      = "results/res.dat";
+string aircoeffile      = "results/aircoef.dat";
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/grid_para.hypara b/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..e7ac6bb
--- /dev/null
+++ b/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/grid_para.hypara
@@ -0,0 +1,36 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfMultifile = 1;
+string from_gfile = "./grid/car.cas";
+string out_gfile  = "./grid/car.fts";
diff --git a/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/key.hypara b/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/key.hypara
new file mode 100644
index 0000000..2efb135
--- /dev/null
+++ b/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 4;
+//string parafilename = "./bin/repository.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/partition.hypara b/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..1db1b52
--- /dev/null
+++ b/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/bin/partition.hypara
@@ -0,0 +1,22 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/car.fts";
+string partition_grid_file = "./grid/car__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
+
diff --git a/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/grid/网格地址.txt b/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/H09_ThreeD_Car_Turb_UPWIND_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..24a3b48
--- /dev/null
+++ b/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,62 @@
+# nBoundaryConditions: Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 4;
+string bcName = "wall";
+{
+  string bodyName = "body";
+  int bcType = 2;
+}
+string bcName = "symmetry";
+{
+  int bcType = 3;
+}
+string bcName = "pressure_inlet";
+{
+  int bcType = 5;
+  double initU = 10;
+}
+string bcName = "pressure_outlet";
+{
+  int bcType = 6;
+  double initP = 0;
+}
+
+# 'bcType' is defined as following:
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/cfd_para_incompressible.hypara b/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
new file mode 100644
index 0000000..7600c56
--- /dev/null
+++ b/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
@@ -0,0 +1,211 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+int maxSimuStep       = 1000;
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 500;
+int intervalStepForce = 1;
+int intervalStepRes   = 1;
+
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+string gridfile = "./grid/chnt_InOutBC_test1__4.fts";
+
+#########################################################################
+#                               Flow Parameter                          #
+#########################################################################
+
+//flowSolverName : SIMPLE/CompressibleSIMPLE/PISO
+string flowSolverName = "SIMPLE";
+
+// Initial value of flow variables 
+double initRho = 1.225;
+double initU = 10;
+double initV   = 0;
+double initW   = 0;
+double initP   = 0;
+double initMu = 1.7894e-05;
+double initRg  = 296.928571;
+double refP    = 101325;
+int refPLocate = 0；
+
+//Parameters For Solving the Momentum Equation
+// MomEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int MomEqSolMethod = 2;
+// MomEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int MomEqPrecondMethod = 1;
+int MomEqMaxSweep = 30;
+double MomEqIterSolvTol = 1e-8;
+double MomEqRelaxCoeff = 0.5;
+
+//Parameters For Solving the Pressure Possion Equation
+// PPEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int PPEqSolMethod= 3;
+// PPEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int PPEqPrecondMethod= 1;
+int PPEqMaxSweep = 30;
+double PPEqIterSolvTol = 1e-8;
+double PPEqRelaxCoeff = 0.1;
+
+//Relaxation factor of surface flux
+double FaceFluxRelaxCoeff = 0.5;
+
+int isCalGravityVisSource = 0;
+int bodyForceFlag = 0;
+double gravityX = 0.0;
+double gravityY = -9.81;
+double gravityZ = 0.0;
+
+int isBoussinesqApproximation        = 0;
+double thermalExpansionCoeff = 3.44827e-3;
+
+#########################################################################
+#                  Turbulence Equation Parameter                        #
+#########################################################################
+// isSolveTurb : is(1)/not(0);
+int isSolveTurb = 0；
+// TurbEqSolverName : k-epsilon(KE)/Spalart-Allmaras(SA)
+string TurbEqSolverName = "KE";
+
+// Initial value of Turbulence variables 
+double initKinetic = 0.375;
+double initEpsilon = 86.643;
+
+//Parameters For Solving the Turbulence Equation
+// TurbEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int TurbEqSolMethod  = 2;
+// TurbEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int TurbEqPrecondMethod = 1;
+int    TurbEqMaxSweep    = 30;
+double TurbEqIterSolvTol = 1e-8;
+double TurbEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                     Energy Equation Parameter                         #
+#########################################################################
+// isSolveEnergy : is(1)/not(0);
+int isSolveEnergy = 0;
+
+// Initial value of Energy variables 
+double initT   = 273.15;
+double initCPg = 1007.0;
+double initK   = 0.0454;
+double initkappa = 1.4;
+double refT = 273;
+
+//Parameters For Solving the Energy Equation
+// EnergyEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int EnergyEqSolMethod = 2;
+// EnergyEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int EnergyEqPrecondMethod = 1;
+int    EnergyEqMaxSweep    = 30;
+double EnergyEqIterSolvTol = 1e-8;
+double EnergyEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                    Species Equation Parameter                         #
+#########################################################################
+// isSolveSpecies : is(1)/not(0);
+int isSolveSpecies = 0;
+
+//Parameters For Solving the Species Equation
+int numberOfSpeciesIncom = 1;
+string speciesNameIncom[] = [AIR];
+double initMassFractionIncom[] = [1.0];
+
+//Parameters For Solving the Species Equation
+// SpeciesEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int SpeciesEqSolMethod = 2;
+// SpeciesEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int SpeciesEqPrecondMethod = 1;
+int    SpeciesEqMaxSweep   = 30;
+double SpeciesEqIterSolvTol  = 1e-8;
+double SpeciesEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                               Unsteady Parameter                      #
+#########################################################################
+// iunsteady : is(1)/not(0);
+int iunsteady    = 0;
+double startTime = 0.0;
+double endTime   = 20;
+double dt = 0.1;
+int min_sub_iter = 50;
+int max_sub_iter = 50;
+
+// isStableUnsteadyMethod : is(1)/not(0);
+int isStableUnsteadyMethod = 0;
+
+#########################################################################
+#                               Solution Method                         #
+#########################################################################
+// ConvCalcMethod : UPWIND/CDS/QUICK/SUDS
+string ConvCalcMethod = "UPWIND"
+
+// DiffCalcMethod : NON_ORTHOGONAL(default)
+string DiffCalcMethod = "NON_ORTHOGONAL";
+
+//TranCalcMethod : IMPLICIT_EULER(1st)/IMPLICIT_2ND_ORDER(2st)
+string TranCalcMethod = "IMPLICIT_EULER";
+
+// GradCalcMethod : GAUSS/LSQ
+string GradCalcMethod = "GAUSS";
+
+// mathLibType : hypre(0)/unap(1)/yhamg(2)
+int mathLibType = 0;
+
+// compressible : is(0, default)/not(1)
+int compressible = 0;
+
+// SIMPLEC : SIMPLE(0)/SIMPLEC(1)
+int SIMPLEC = 1;
+
+// isSkewness : stable gradient method: is(1)/not(0)
+int isSkewness = 0;
+
+//rhoType : Constant(0)/IncompressibleIdealGas(1)/IdealGas(2)
+int rhoType = 0;
+
+//muType:  Constant(0)/SutherLand(1)/IdealGasMixingLaw(2),
+int muType  = 0;
+
+//kType : Constant(0)/MassWeightedMixingLaw(1)/IdealGasMixingLaw(2)
+int kType   = 0;
+
+//cpType : Constant(0)/Mixing(1)
+int cpType  = 0;
+
+//massdiffType : ConstantDiluteApprox(1)/DiluteApprox(2)
+int massdiffType = 0;
+
+#########################################################################
+#                              Post-Processing                          #
+#########################################################################
+/ nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+// -- U(22), V(23), W(24), P(25), CP(26), T(27), DEN(28), VIS(29), TE(31), ED(32), enthalpy(70), species(from 71 ~ 70 + numberOfSpecies)
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 4;
+int visualVariables[] = [22, 23, 24, 25];
+int plotFieldType = 1;
+
+string resSaveFile      = "results/res.dat";
+string aircoeffile      = "results/aircoef.dat";
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/grid_para.hypara b/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..67ed103
--- /dev/null
+++ b/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/chnt_InOutBC_test1.cas";
+string out_gfile  = "./grid/chnt_InOutBC_test1.fts";
diff --git a/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/key.hypara b/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/key.hypara
new file mode 100644
index 0000000..2efb135
--- /dev/null
+++ b/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 4;
+//string parafilename = "./bin/repository.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/partition.hypara b/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..465aa66
--- /dev/null
+++ b/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/bin/partition.hypara
@@ -0,0 +1,22 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/chnt_InOutBC_test1.fts";
+string partition_grid_file = "./grid/chnt_InOutBC_test1__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
+
diff --git a/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/grid/网格地址.txt b/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/H10_ThreeD_Chnt_Lam_UPWIND_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..e0a37fa
--- /dev/null
+++ b/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,76 @@
+# nBoundaryConditions: Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 4;
+string bcName = "wall";
+{
+  string bodyName = "body";
+  int bcType = 2;
+  double initT = 300;
+}
+string bcName = "inlet1";
+{
+  int bcType = 5;
+  double totalVelocity = 1.0;
+  double initT = 300.0;
+  double initMassFractionIncom[] = [0.21, 0.008, 0.002, 0.78,  0.0];
+  double initKinetic = 0.00375;
+  double initEpsilon = 8.61435e-6;
+}
+string bcName = "inlet2";
+{
+  int bcType = 5;
+  double initV = 5;
+  double initT = 300.0;
+  double initMassFractionIncom[] = [0.0, 0.0, 0.0, 0.0,  1.0];
+  double initKinetic = 0.09375;
+  double initEpsilon = 0.02411757;
+}
+string bcName = "outlet";
+{
+  int bcType = 6;
+  double initP = 0;
+  double initT = 300.0;
+  double initMassFractionIncom[] = [0.21, 0.008, 0.002, 0.78,  0.0];
+  double initKinetic = 0.09375;
+  double initEpsilon = 0.02411757;
+}
+
+# 'bcType' is defined as following:
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/cfd_para_incompressible.hypara b/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
new file mode 100644
index 0000000..0ddd023
--- /dev/null
+++ b/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
@@ -0,0 +1,211 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+int maxSimuStep       = 1000;
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 100;
+int intervalStepForce = 1;
+int intervalStepRes   = 1;
+
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+string gridfile = "./grid/gasleak__4.fts";
+
+#########################################################################
+#                               Flow Parameter                          #
+#########################################################################
+
+//flowSolverName : SIMPLE/CompressibleSIMPLE/PISO
+string flowSolverName = "CompressibleSIMPLE";
+
+// Initial value of flow variables 
+double initRho = 1.225;
+double initU   = 0;
+double initV   = 0;
+double initW   = 0;
+double initP   = 0;
+double initMu  = 1.7894e-05;
+double initRg  = 296.928571;
+double refP    = 101325;
+int refPLocate = 0；
+
+//Parameters For Solving the Momentum Equation
+// MomEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int MomEqSolMethod = 2;
+// MomEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int MomEqPrecondMethod = 1;
+int MomEqMaxSweep = 30;
+double MomEqIterSolvTol = 1e-8;
+double MomEqRelaxCoeff = 0.5;
+
+//Parameters For Solving the Pressure Possion Equation
+// PPEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int PPEqSolMethod= 3;
+// PPEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int PPEqPrecondMethod= 1;
+int PPEqMaxSweep = 30;
+double PPEqIterSolvTol = 1e-8;
+double PPEqRelaxCoeff = 0.3;
+
+//Relaxation factor of surface flux
+double FaceFluxRelaxCoeff = 0.5;
+
+int isCalGravityVisSource = 0;
+int bodyForceFlag = 0;
+double gravityX = 0.0;
+double gravityY = -9.81;
+double gravityZ = 0.0;
+
+int isBoussinesqApproximation        = 0;
+double thermalExpansionCoeff = 3.44827e-3;
+
+#########################################################################
+#                  Turbulence Equation Parameter                        #
+#########################################################################
+// isSolveTurb : is(1)/not(0);
+int isSolveTurb = 0；
+// TurbEqSolverName : k-epsilon(KE)/Spalart-Allmaras(SA)
+string TurbEqSolverName = "KE";
+
+// Initial value of Turbulence variables 
+double initKinetic = 0.64;
+double initEpsilon = 5771;
+
+//Parameters For Solving the Turbulence Equation
+// TurbEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int TurbEqSolMethod  = 2;
+// TurbEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int TurbEqPrecondMethod = 1;
+int    TurbEqMaxSweep    = 30;
+double TurbEqIterSolvTol = 1e-8;
+double TurbEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                     Energy Equation Parameter                         #
+#########################################################################
+// isSolveEnergy : is(1)/not(0);
+int isSolveEnergy = 1;
+
+// Initial value of Energy variables 
+double initT   = 273.0;
+double initCPg = 1006.0;
+double initK   = 0.0242;
+double initkappa = 1.4;
+double refT = 273;
+
+//Parameters For Solving the Energy Equation
+// EnergyEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int EnergyEqSolMethod = 2;
+// EnergyEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int EnergyEqPrecondMethod = 1;
+int    EnergyEqMaxSweep    = 30;
+double EnergyEqIterSolvTol = 1e-8;
+double EnergyEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                    Species Equation Parameter                         #
+#########################################################################
+// isSolveSpecies : is(1)/not(0);
+int isSolveSpecies = 1;
+
+//Parameters For Solving the Species Equation
+int numberOfSpeciesIncom = 5;
+string speciesNameIncom[] = [C2H4, H2_l, LNG, H2S, NH3];
+double initMassFractionIncom[] = [0.164, 0.008, 0.624, 0.2,  0.004];
+
+//Parameters For Solving the Species Equation
+// SpeciesEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int SpeciesEqSolMethod = 2;
+// SpeciesEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int SpeciesEqPrecondMethod = 1;
+int    SpeciesEqMaxSweep   = 30;
+double SpeciesEqIterSolvTol  = 1e-8;
+double SpeciesEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                               Unsteady Parameter                      #
+#########################################################################
+// iunsteady : is(1)/not(0);
+int iunsteady    = 1;
+double startTime = 0.0;
+double endTime   = 200;
+double dt = 0.1;
+int min_sub_iter = 50;
+int max_sub_iter = 50;
+
+// isStableUnsteadyMethod : is(1)/not(0);
+int isStableUnsteadyMethod = 1;
+
+#########################################################################
+#                               Solution Method                         #
+#########################################################################
+// ConvCalcMethod : UPWIND/CDS/QUICK/SUDS
+string ConvCalcMethod = "UPWIND"
+
+// DiffCalcMethod : NON_ORTHOGONAL(default)
+string DiffCalcMethod = "NON_ORTHOGONAL";
+
+//TranCalcMethod : IMPLICIT_EULER(1st)/IMPLICIT_2ND_ORDER(2st)
+string TranCalcMethod = "IMPLICIT_EULER";
+
+// GradCalcMethod : GAUSS/LSQ
+string GradCalcMethod = "GAUSS";
+
+// mathLibType : hypre(0)/unap(1)/yhamg(2)
+int mathLibType = 0;
+
+// compressible : is(0, default)/not(1)
+int compressible = 0;
+
+// SIMPLEC : SIMPLE(0)/SIMPLEC(1)
+int SIMPLEC = 1;
+
+// isSkewness : stable gradient method: is(1)/not(0)
+int isSkewness = 0;
+
+//rhoType : Constant(0)/IncompressibleIdealGas(1)/IdealGas(2)
+int rhoType = 2;
+
+//muType:  Constant(0)/SutherLand(1)/IdealGasMixingLaw(2),
+int muType  = 0;
+
+//kType : Constant(0)/MassWeightedMixingLaw(1)/IdealGasMixingLaw(2)
+int kType   = 0;
+
+//cpType : Constant(0)/Mixing(1)
+int cpType  = 0;
+
+//massdiffType : ConstantDiluteApprox(1)/DiluteApprox(2)
+int massdiffType = 0;
+
+#########################################################################
+#                              Post-Processing                          #
+#########################################################################
+/ nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+// -- U(22), V(23), W(24), P(25), CP(26), T(27), DEN(28), VIS(29), TE(31), ED(32), enthalpy(70), species(from 71 ~ 70 + numberOfSpecies)
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 13;
+int visualVariables[] = [22, 23, 24, 25, 27, 28, 70, 71, 72, 73, 74, 75, 76];
+int plotFieldType = 1;
+
+string resSaveFile      = "results/res.dat";
+string aircoeffile      = "results/aircoef.dat";
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/grid_para.hypara b/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..9e40f91
--- /dev/null
+++ b/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/grid_para.hypara
@@ -0,0 +1,36 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfMultifile = 1;
+string from_gfile = "./grid/gasleak.cas";
+string out_gfile  = "./grid/gasleak.fts";
diff --git a/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/key.hypara b/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/key.hypara
new file mode 100644
index 0000000..2efb135
--- /dev/null
+++ b/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 4;
+//string parafilename = "./bin/repository.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/partition.hypara b/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..3b1bdef
--- /dev/null
+++ b/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/bin/partition.hypara
@@ -0,0 +1,22 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/gasleak.fts";
+string partition_grid_file = "./grid/gasleak__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level. 
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
+
diff --git a/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/grid/网格地址.txt b/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..76915cc
--- /dev/null
+++ b/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,88 @@
+# nBoundaryConditions: Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 7;
+string bcName = "wall_down";//壁面的边界条件
+{
+  string bodyName = "body";
+  int bcType = 2;
+  double initT = 500.0;
+}
+string bcName = "wall_fb";//边界类型为壁面
+{
+  string bodyName = "body";
+  int bcType = 2;
+  double initT = 500.0;
+}
+string bcName = "wall_in";
+{
+  string bodyName = "body";
+  int bcType = 2;
+  double initT = 500.0;
+}
+string bcName = "wall_up";
+{
+  string bodyName = "body";
+  int bcType = 2;
+  double initT = 500.0;
+}
+string bcName = "inlet_down";
+{
+  int bcType = 5;
+  double initU = 0.05;
+  double initT = 300.0;
+  double initMassFractionIncom[] = [0.0, 0.0, 0.0,  0.97,  0.03,  0.0];
+}
+string bcName = "inlet_up";
+{
+  int bcType = 5;
+  double initU = 0.5;
+  double initT = 600.0;
+  double initMassFractionIncom[] = [0.21, 0.78, 0.009,  0.0,  0.0,  0.001];
+}
+string bcName = "outlet";
+{
+  int bcType = 6;
+  double initP = 0;
+  double initT = 300.0;
+  double initMassFractionIncom[] = [0.1, 0.1, 0.1,  0.1,  0.5,  0.1];
+}
+
+# 'bcType' is defined as following:
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/cfd_para_incompressible.hypara b/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
new file mode 100644
index 0000000..47d12ac
--- /dev/null
+++ b/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
@@ -0,0 +1,211 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+int maxSimuStep       = 1000;
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 100;
+int intervalStepForce = 1;
+int intervalStepRes   = 1;
+
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+string gridfile = "./grid/methaneair__4.fts";
+
+#########################################################################
+#                               Flow Parameter                          #
+#########################################################################
+
+//flowSolverName : SIMPLE/CompressibleSIMPLE/PISO
+string flowSolverName = "CompressibleSIMPLE";
+
+// Initial value of flow variables 
+double initRho = 1.225;
+double initU   = 0;
+double initV   = 0;
+double initW   = 0;
+double initP   = 0;
+double initMu  = 1.72e-5;
+double initRg  = 296.928571;
+double refP    = 101325;
+int refPLocate = 0；
+
+//Parameters For Solving the Momentum Equation
+// MomEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int MomEqSolMethod = 2;
+// MomEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int MomEqPrecondMethod = 1;
+int MomEqMaxSweep = 30;
+double MomEqIterSolvTol = 1e-8;
+double MomEqRelaxCoeff = 0.5;
+
+//Parameters For Solving the Pressure Possion Equation
+// PPEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int PPEqSolMethod= 3;
+// PPEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int PPEqPrecondMethod= 1;
+int PPEqMaxSweep = 30;
+double PPEqIterSolvTol = 1e-8;
+double PPEqRelaxCoeff = 0.3;
+
+//Relaxation factor of surface flux
+double FaceFluxRelaxCoeff = 0.5;
+
+int isCalGravityVisSource = 0;
+int bodyForceFlag = 0;
+double gravityX = 0.0;
+double gravityY = -9.81;
+double gravityZ = 0.0;
+
+int isBoussinesqApproximation        = 0;
+double thermalExpansionCoeff = 3.44827e-3;
+
+#########################################################################
+#                  Turbulence Equation Parameter                        #
+#########################################################################
+// isSolveTurb : is(1)/not(0);
+int isSolveTurb = 0；
+// TurbEqSolverName : k-epsilon(KE)/Spalart-Allmaras(SA)
+string TurbEqSolverName = "KE";
+
+// Initial value of Turbulence variables 
+double initKinetic = 0.64;
+double initEpsilon = 5771;
+
+//Parameters For Solving the Turbulence Equation
+// TurbEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int TurbEqSolMethod  = 2;
+// TurbEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int TurbEqPrecondMethod = 1;
+int    TurbEqMaxSweep    = 30;
+double TurbEqIterSolvTol = 1e-8;
+double TurbEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                     Energy Equation Parameter                         #
+#########################################################################
+// isSolveEnergy : is(1)/not(0);
+int isSolveEnergy = 1;
+
+// Initial value of Energy variables 
+double initT   = 273.0;
+double initCPg = 1006.0;
+double initK   = 0.0454;
+double initkappa = 1.4;
+double refT = 273;
+
+//Parameters For Solving the Energy Equation
+// EnergyEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int EnergyEqSolMethod = 2;
+// EnergyEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int EnergyEqPrecondMethod = 1;
+int    EnergyEqMaxSweep    = 30;
+double EnergyEqIterSolvTol = 1e-8;
+double EnergyEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                    Species Equation Parameter                         #
+#########################################################################
+// isSolveSpecies : is(1)/not(0);
+int isSolveSpecies = 1;
+
+//Parameters For Solving the Species Equation
+int numberOfSpeciesIncom = 6;
+string speciesNameIncom[] =  [C2H4, H2_l, C3H8, NG, H2S, Cl2];
+double initMassFractionIncom[] = [0.21, 0.78, 0.009,  0.0,  0.001,  0.0];
+
+//Parameters For Solving the Species Equation
+// SpeciesEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int SpeciesEqSolMethod = 2;
+// SpeciesEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int SpeciesEqPrecondMethod = 1;
+int    SpeciesEqMaxSweep   = 30;
+double SpeciesEqIterSolvTol  = 1e-8;
+double SpeciesEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                               Unsteady Parameter                      #
+#########################################################################
+// iunsteady : is(1)/not(0);
+int iunsteady    = 1;
+double startTime = 0.0;
+double endTime   = 200;
+double dt = 0.1;
+int min_sub_iter = 50;
+int max_sub_iter = 50;
+
+// isStableUnsteadyMethod : is(1)/not(0);
+int isStableUnsteadyMethod = 1;
+
+#########################################################################
+#                               Solution Method                         #
+#########################################################################
+// ConvCalcMethod : UPWIND/CDS/QUICK/SUDS
+string ConvCalcMethod = "UPWIND"
+
+// DiffCalcMethod : NON_ORTHOGONAL(default)
+string DiffCalcMethod = "NON_ORTHOGONAL";
+
+//TranCalcMethod : IMPLICIT_EULER(1st)/IMPLICIT_2ND_ORDER(2st)
+string TranCalcMethod = "IMPLICIT_EULER";
+
+// GradCalcMethod : GAUSS/LSQ
+string GradCalcMethod = "GAUSS";
+
+// mathLibType : hypre(0)/unap(1)/yhamg(2)
+int mathLibType = 0;
+
+// compressible : is(0, default)/not(1)
+int compressible = 0;
+
+// SIMPLEC : SIMPLE(0)/SIMPLEC(1)
+int SIMPLEC = 1;
+
+// isSkewness : stable gradient method: is(1)/not(0)
+int isSkewness = 0;
+
+//rhoType : Constant(0)/IncompressibleIdealGas(1)/IdealGas(2)
+int rhoType = 2;
+
+//muType:  Constant(0)/SutherLand(1)/IdealGasMixingLaw(2),
+int muType  = 0;
+
+//kType : Constant(0)/MassWeightedMixingLaw(1)/IdealGasMixingLaw(2)
+int kType   = 0;
+
+//cpType : Constant(0)/Mixing(1)
+int cpType  = 0;
+
+//massdiffType : ConstantDiluteApprox(1)/DiluteApprox(2)
+int massdiffType = 0;
+
+#########################################################################
+#                              Post-Processing                          #
+#########################################################################
+/ nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+// -- U(22), V(23), W(24), P(25), CP(26), T(27), DEN(28), VIS(29), TE(31), ED(32), enthalpy(70), species(from 71 ~ 70 + numberOfSpecies)
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 13;
+int visualVariables[] = [22, 23, 24, 25, 27, 28, 70, 71, 72, 73, 74, 75, 76];
+int plotFieldType = 1;
+
+string resSaveFile      = "results/res.dat";
+string aircoeffile      = "results/aircoef.dat";
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/grid_para.hypara b/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..e71fdbf
--- /dev/null
+++ b/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/grid_para.hypara
@@ -0,0 +1,36 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfMultifile = 1;
+string from_gfile = "./grid/methaneair.cas";
+string out_gfile  = "./grid/methaneair.fts";
diff --git a/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/key.hypara b/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/key.hypara
new file mode 100644
index 0000000..7136bec
--- /dev/null
+++ b/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 4;
+//string parafilename = "./bin/repository.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
\ No newline at end of file
diff --git a/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/partition.hypara b/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..87e2e13
--- /dev/null
+++ b/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/bin/partition.hypara
@@ -0,0 +1,22 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/methaneair.fts";
+string partition_grid_file = "./grid/methaneair__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level. 
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
+
diff --git a/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/grid/网格地址.txt b/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/H12_ThreeD_Species_Transient_UPWIND_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/boundary_condition_ref.hypara b/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/boundary_condition_ref.hypara
new file mode 100644
index 0000000..7c398fd
--- /dev/null
+++ b/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/boundary_condition_ref.hypara
@@ -0,0 +1,71 @@
+# nBoundaryConditions: Number of global boundary conditions.
+# bcName             : Boundary condition name.
+# bcType(in PHengLEI): Boundary condition type.
+
+# How to set boundary condition, for example: 
+# string bcName = "Wall";                   
+# {                                           
+#   int bcType = 2;                           
+#   int viscousType = 1;                      
+#   double wallTemperature = -1.0;            
+#   double uWall = 0.0;                       
+#   double vWall = 0.0;                       
+#   double wWall = 0.0;                       
+# }                                           
+# string bcName = "Inflow";                 
+# {                                           
+#   int bcType = 5;                           
+#   int inflowParaType = 0;                   
+#   double refMachNumber = 0.73;              
+#   double attackd = 2.79;                    
+#   double angleSlide = 0.0;                  
+#   double refReNumber = 6.5e6;               
+#   double refDimensionalTemperature = 288.15;
+# }                                           
+
+# For more information, see examples/bin/boundary_condition.hypara file!!!
+
+int nBoundaryConditions = 5;
+string bcName = "in_1";
+{
+  string bodyName = "body";
+ int bcType = 5;
+  double initU =3.05;
+  double initKinetic = 0.375;
+  double initEpsilon =86.64304;
+}
+string bcName = "out_1";
+{
+  string bodyName = "body";
+  int bcType = 6;
+  double initP =0;
+  double initKinetic = 0.3756;
+  double initEpsilon = 86.64304;
+}
+string bcName = "wall_1";
+{
+ int bcType = 2;
+}
+string bcName = "sym_1";
+{
+   int bcType = 3;
+}
+string bcName = "symf_1";
+{
+ int bcType = 3;
+}
+
+# 'bcType' is defined as following:
+#    -2: WAKE                      
+#    -1: INTERFACE                 
+#    0 : NO_BOUNDARY_CONDITION     
+#    1 : EXTRAPOLATION             
+#    2 : SOLID_SURFACE             
+#    3 : SYMMETRY                  
+#    4 : FARFIELD                  
+#    5 : INFLOW                    
+#    6 : OUTFLOW                   
+#    52: PRESSURE_INLET            
+#    62: PRESSURE_OUTLET           
+#    61: OUTFLOW_CONFINED          
+#    7 : POLE                      
diff --git a/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/cfd_para_incompressible.hypara b/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
new file mode 100644
index 0000000..11bbad5
--- /dev/null
+++ b/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/cfd_para_incompressible.hypara
@@ -0,0 +1,211 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+int maxSimuStep       = 1000;
+int intervalStepFlow  = 1000;
+int intervalStepPlot  = 100;
+int intervalStepForce = 1;
+int intervalStepRes   = 1;
+
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+string gridfile = "./grid/sub__4.fts";
+
+#########################################################################
+#                               Flow Parameter                          #
+#########################################################################
+
+//flowSolverName : SIMPLE/CompressibleSIMPLE/PISO
+string flowSolverName = "SIMPLE";
+
+// Initial value of flow variables 
+double initRho = 998.2;
+double initU = 3.05;
+double initV   = 0;
+double initW   = 0;
+double initP   = 0;
+double initMu =0.001003;
+double initRg  = 296.928571;
+double refP    = 101325;
+int refPLocate = 0；
+
+//Parameters For Solving the Momentum Equation
+// MomEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int MomEqSolMethod = 2;
+// MomEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int MomEqPrecondMethod = 1;
+int MomEqMaxSweep = 30;
+double MomEqIterSolvTol = 1e-8;
+double MomEqRelaxCoeff = 0.5;
+
+//Parameters For Solving the Pressure Possion Equation
+// PPEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int PPEqSolMethod= 3;
+// PPEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int PPEqPrecondMethod= 1;
+int PPEqMaxSweep = 30;
+double PPEqIterSolvTol = 1e-8;
+double PPEqRelaxCoeff = 0.3;
+
+//Relaxation factor of surface flux
+double FaceFluxRelaxCoeff = 0.5;
+
+int isCalGravityVisSource = 0;
+int bodyForceFlag = 0;
+double gravityX = 0.0;
+double gravityY = -9.81;
+double gravityZ = 0.0;
+
+int isBoussinesqApproximation        = 0;
+double thermalExpansionCoeff = 3.44827e-3;
+
+#########################################################################
+#                  Turbulence Equation Parameter                        #
+#########################################################################
+// isSolveTurb : is(1)/not(0);
+int isSolveTurb = 1；
+// TurbEqSolverName : k-epsilon(KE)/Spalart-Allmaras(SA)
+string TurbEqSolverName = "SA";
+
+// Initial value of Turbulence variables 
+double initKinetic = 0.0348844;
+double initEpsilon = 10.89987;
+
+//Parameters For Solving the Turbulence Equation
+// TurbEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int TurbEqSolMethod  = 2;
+// TurbEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int TurbEqPrecondMethod = 1;
+int    TurbEqMaxSweep    = 30;
+double TurbEqIterSolvTol = 1e-8;
+double TurbEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                     Energy Equation Parameter                         #
+#########################################################################
+// isSolveEnergy : is(1)/not(0);
+int isSolveEnergy = 0;
+
+// Initial value of Energy variables 
+double initT   = 273.15;
+double initCPg = 1007.0;
+double initK   = 0.0454;
+double initkappa = 1.4;
+double refT = 273;
+
+//Parameters For Solving the Energy Equation
+// EnergyEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int EnergyEqSolMethod = 2;
+// EnergyEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int EnergyEqPrecondMethod = 1;
+int    EnergyEqMaxSweep    = 30;
+double EnergyEqIterSolvTol = 1e-8;
+double EnergyEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                    Species Equation Parameter                         #
+#########################################################################
+// isSolveSpecies : is(1)/not(0);
+int isSolveSpecies = 0;
+
+//Parameters For Solving the Species Equation
+int numberOfSpeciesIncom = 1;
+string speciesNameIncom[] = [AIR];
+double initMassFractionIncom[] = [1.0];
+
+//Parameters For Solving the Species Equation
+// SpeciesEqSolMethod : GaussSeidel(0)/GMRES(1)/Bicgstab(2)/AMG(3)/PCG(4)/FlexGMRES(5)/ILU(10)/AMGDD(11)/Hybrid(12)
+int SpeciesEqSolMethod = 2;
+// SpeciesEqPrecondMethod : None(0)/ILU(1)/AMG(2)/Euclid(3)/LduDiag(8) /LduDIC(9) /LduDILU(10)
+int SpeciesEqPrecondMethod = 1;
+int    SpeciesEqMaxSweep   = 30;
+double SpeciesEqIterSolvTol  = 1e-8;
+double SpeciesEqRelaxCoeff = 0.5;
+
+#########################################################################
+#                               Unsteady Parameter                      #
+#########################################################################
+// iunsteady : is(1)/not(0);
+int iunsteady    = 0;
+double startTime = 0.0;
+double endTime   = 20;
+double dt = 0.1;
+int min_sub_iter = 50;
+int max_sub_iter = 50;
+
+// isStableUnsteadyMethod : is(1)/not(0);
+int isStableUnsteadyMethod = 0;
+
+#########################################################################
+#                               Solution Method                         #
+#########################################################################
+// ConvCalcMethod : UPWIND/CDS/QUICK/SUDS
+string ConvCalcMethod = "UPWIND"
+
+// DiffCalcMethod : NON_ORTHOGONAL(default)
+string DiffCalcMethod = "NON_ORTHOGONAL";
+
+//TranCalcMethod : IMPLICIT_EULER(1st)/IMPLICIT_2ND_ORDER(2st)
+string TranCalcMethod = "IMPLICIT_EULER";
+
+// GradCalcMethod : GAUSS/LSQ
+string GradCalcMethod = "GAUSS";
+
+// mathLibType : hypre(0)/unap(1)/yhamg(2)
+int mathLibType = 0;
+
+// compressible : is(0, default)/not(1)
+int compressible = 0;
+
+// SIMPLEC : SIMPLE(0)/SIMPLEC(1)
+int SIMPLEC = 1;
+
+// isSkewness : stable gradient method: is(1)/not(0)
+int isSkewness = 0;
+
+//rhoType : Constant(0)/IncompressibleIdealGas(1)/IdealGas(2)
+int rhoType = 0;
+
+//muType:  Constant(0)/SutherLand(1)/IdealGasMixingLaw(2),
+int muType  = 0;
+
+//kType : Constant(0)/MassWeightedMixingLaw(1)/IdealGasMixingLaw(2)
+int kType   = 0;
+
+//cpType : Constant(0)/Mixing(1)
+int cpType  = 0;
+
+//massdiffType : ConstantDiluteApprox(1)/DiluteApprox(2)
+int massdiffType = 0;
+
+#########################################################################
+#                              Post-Processing                          #
+#########################################################################
+/ nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+// -- U(22), V(23), W(24), P(25), CP(26), T(27), DEN(28), VIS(29), TE(31), ED(32), enthalpy(70), species(from 71 ~ 70 + numberOfSpecies)
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 6;
+int visualVariables[] = [22, 23, 24, 25, 29, 31];
+int plotFieldType = 1;
+
+string resSaveFile      = "results/res.dat";
+string aircoeffile      = "results/aircoef.dat";
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/grid_para.hypara b/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..7eb3978
--- /dev/null
+++ b/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/grid_para.hypara
@@ -0,0 +1,36 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfMultifile = 1;
+string from_gfile = "./grid/sub.cas";
+string out_gfile  = "./grid/sub.fts";
diff --git a/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/key.hypara b/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/key.hypara
new file mode 100644
index 0000000..2efb135
--- /dev/null
+++ b/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 4;
+//string parafilename = "./bin/repository.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/partition.hypara b/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..34215b8
--- /dev/null
+++ b/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/bin/partition.hypara
@@ -0,0 +1,22 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/sub.fts";
+string partition_grid_file = "./grid/sub__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
+
diff --git a/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/grid/网格地址.txt b/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/H13_ThreeD_SUBOFF_UPWIND_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/L01_TwoD_Cavity_BGK_MPI_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/L01_TwoD_Cavity_BGK_MPI_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/L01_TwoD_Cavity_BGK_MPI_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/L01_TwoD_Cavity_BGK_MPI_1CPU/bin/input.txt b/phenglei/tutorials/L01_TwoD_Cavity_BGK_MPI_1CPU/bin/input.txt
new file mode 100644
index 0000000..c49c94a
--- /dev/null
+++ b/phenglei/tutorials/L01_TwoD_Cavity_BGK_MPI_1CPU/bin/input.txt
@@ -0,0 +1,35 @@
+0           ！MRT set 1,   BGK set 0
+0  continue.plt   ！CONTI,   resume :1 ,  new 0 //follows input datafile name //use ASCII文件 continue.plt
+0	！LES   yes: 1 ,   no: 0 
+0  mesh_3d.dat ！GEO  read complex geo?  yes:1, no:0 //follows input datafile name
+0	! MB   multiblock LBM?   yes:1, no:0
+1  2e-3  !CONV   using converge criterion?   yes:1, no:0
+201     ！NX
+201     !  NY
+1     ! NZ
+1    ！ NX2
+1    ！ NY2
+1    !  NZ2
+0      ! LowX
+0      ! LowY
+0    ! LowZ
+1      ! x_np
+1      ! y_np
+1      ! z_np
+500  !  framerate 
+50000   ！total steps to terminate
+1.0      !  density
+0.6  ！ tau
+(0.0, 0.0, 0.0000000)   ！ Volumetric force vector (gx, gy, gz)
+D2Q9          ! velocity set
+Cavity        ! boundary condition
+! note: in the following, boundary types: periodic,velocity, pressure
+! are allowed. if "velocity" is applied, please strictly follow the format "velocity (%lf, %lf, %lf)".
+nonslip                  ！xmin face
+nonslip                 ！xmax face
+nonslip  	！ymin face
+velocity (0.1, 0.0, 0.0)   	！ymax face, 
+periodic                    ！zmin face
+periodic                    ！zmax face
+-------------------！ initial velocity field
+(0.0, 0.00, 0.0)
\ No newline at end of file
diff --git a/phenglei/tutorials/L01_TwoD_Cavity_BGK_MPI_1CPU/bin/key.hypara b/phenglei/tutorials/L01_TwoD_Cavity_BGK_MPI_1CPU/bin/key.hypara
new file mode 100644
index 0000000..98d46f2
--- /dev/null
+++ b/phenglei/tutorials/L01_TwoD_Cavity_BGK_MPI_1CPU/bin/key.hypara
@@ -0,0 +1,55 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+//int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+int    nsimutask    = 13;
+string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/L02_ThreeD_Channel_Turb_BGK_MPI_32CPU/bin/cfd_para.hypara b/phenglei/tutorials/L02_ThreeD_Channel_Turb_BGK_MPI_32CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/L02_ThreeD_Channel_Turb_BGK_MPI_32CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/L02_ThreeD_Channel_Turb_BGK_MPI_32CPU/bin/input.txt b/phenglei/tutorials/L02_ThreeD_Channel_Turb_BGK_MPI_32CPU/bin/input.txt
new file mode 100644
index 0000000..4c52feb
--- /dev/null
+++ b/phenglei/tutorials/L02_ThreeD_Channel_Turb_BGK_MPI_32CPU/bin/input.txt
@@ -0,0 +1,35 @@
+0           ！MRT set 1,   BGK set 0
+1  continue.plt   ！CONTI,   resume :1 ,  new 0 //follows input datafile name //use ASCII文件 continue.plt
+1	！LES   yes: 1 ,   no: 0 
+0  mesh_3d.dat ！GEO  read complex geo?  yes:1, no:0 //follows input datafile name
+0	! MB   multiblock LBM?   yes:1, no:0
+0  2e-3  !CONV   using converge criterion?   yes:1, no:0
+128     ！NX
+128    !  NY
+256     ! NZ
+1    ！ NX2
+1    ！ NY2
+1    !  NZ2
+0      ! LowX
+0      ! LowY
+0    ! LowZ
+4      ! x_np
+4      ! y_np
+2      ! z_np
+5000  !  framerate 
+20000   ！total steps to terminate
+1.0      !  density
+0.506  ！ tau
+(9.2e-8,0.0,0.0)    ！ Volumetric force
+D3Q19           ! velocity set
+ChannelTurb        ! boundary condition
+! note: in the following, boundary types: periodic,velocity, pressure
+! are allowed. if "velocity" is applied, please strictly follow the format "velocity (%lf, %lf, %lf)".
+periodic                     ！xmin face
+periodic                    ！xmax face
+periodic                   ！ymin face
+periodic      	！ymax face, 
+nonslip                    ！zmin face
+nonslip                    ！zmax face
+-------------------！ initial velocity field
+(0.0, 0.00, 0.0)
diff --git a/phenglei/tutorials/L02_ThreeD_Channel_Turb_BGK_MPI_32CPU/bin/key.hypara b/phenglei/tutorials/L02_ThreeD_Channel_Turb_BGK_MPI_32CPU/bin/key.hypara
new file mode 100644
index 0000000..1a572c7
--- /dev/null
+++ b/phenglei/tutorials/L02_ThreeD_Channel_Turb_BGK_MPI_32CPU/bin/key.hypara
@@ -0,0 +1,55 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+//int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+int    nsimutask    = 13;
+string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/L03_ThreeD_Poiseuille_MRT_MPI_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/L03_ThreeD_Poiseuille_MRT_MPI_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/L03_ThreeD_Poiseuille_MRT_MPI_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/L03_ThreeD_Poiseuille_MRT_MPI_4CPU/bin/input.txt b/phenglei/tutorials/L03_ThreeD_Poiseuille_MRT_MPI_4CPU/bin/input.txt
new file mode 100644
index 0000000..ec63d5b
--- /dev/null
+++ b/phenglei/tutorials/L03_ThreeD_Poiseuille_MRT_MPI_4CPU/bin/input.txt
@@ -0,0 +1,35 @@
+1           ！MRT set 1,   BGK set 0
+0  continue.plt   ！CONTI,   resume :1 ,  new 0 //follows input datafile name //use ASCII文件 continue.plt
+0	！LES   yes: 1 ,   no: 0 
+0  mesh_3d.dat ！GEO  read complex geo?  yes:1, no:0 //follows input datafile name
+0	! MB   multiblock LBM?   yes:1, no:0
+1  2e-3  !CONV   using converge criterion?   yes:1, no:0
+100     ！NX
+100     !  NY
+100     ! NZ
+1    ！ NX2
+1    ！ NY2
+1    !  NZ2
+0      ! LowX
+0      ! LowY
+0    ! LowZ
+2      ! x_np
+2      ! y_np
+1      ! z_np
+500  !  framerate 
+50000   ！total steps to terminate
+1.0      !  density
+0.6  ！ tau
+(2.2e-7,0.0,0.0)    ！ Volumetric force
+D3Q19           ! velocity set
+Poiseuille        ! boundary condition
+! note: in the following, boundary types: periodic,velocity, pressure
+! are allowed. if "velocity" is applied, please strictly follow the format "velocity (%lf, %lf, %lf)".
+periodic                     ！xmin face
+periodic                    ！xmax face
+periodic                   ！ymin face
+periodic      	！ymax face, 
+nonslip                    ！zmin face
+nonslip                    ！zmax face
+-------------------！ initial velocity field
+(0.0, 0.00, 0.0)
\ No newline at end of file
diff --git a/phenglei/tutorials/L03_ThreeD_Poiseuille_MRT_MPI_4CPU/bin/key.hypara b/phenglei/tutorials/L03_ThreeD_Poiseuille_MRT_MPI_4CPU/bin/key.hypara
new file mode 100644
index 0000000..1a572c7
--- /dev/null
+++ b/phenglei/tutorials/L03_ThreeD_Poiseuille_MRT_MPI_4CPU/bin/key.hypara
@@ -0,0 +1,55 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+//int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+int    nsimutask    = 13;
+string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/L04_ThreeD_Spoiler_BGK_MPI_8CPU/bin/cfd_para.hypara b/phenglei/tutorials/L04_ThreeD_Spoiler_BGK_MPI_8CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/L04_ThreeD_Spoiler_BGK_MPI_8CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/L04_ThreeD_Spoiler_BGK_MPI_8CPU/bin/input.txt b/phenglei/tutorials/L04_ThreeD_Spoiler_BGK_MPI_8CPU/bin/input.txt
new file mode 100644
index 0000000..b6ed269
--- /dev/null
+++ b/phenglei/tutorials/L04_ThreeD_Spoiler_BGK_MPI_8CPU/bin/input.txt
@@ -0,0 +1,35 @@
+0           ！MRT set 1,   BGK set 0
+0  continue.plt   ！CONTI,   resume :1 ,  new 0 //follows input datafile name //use ASCII文件 continue.plt
+0	！LES   yes: 1 ,   no: 0 
+1  mesh_3d.dat ！GEO  read complex geo?  yes:1, no:0 //follows input datafile name
+0	! MB   multiblock LBM?   yes:1, no:0
+0  2e-3  !CONV   using converge criterion?   yes:1, no:0
+100     ！NX
+300    !  NY
+100     ! NZ
+1    ！ NX2
+1    ！ NY2
+1    !  NZ2
+0      ! LowX
+0      ! LowY
+0    ! LowZ
+2      ! x_np
+2      ! y_np
+2      ! z_np
+400  !  framerate 
+2000   ！total steps to terminate
+1.0      !  density
+0.56   ！ tau
+(0.0,0.0,0.0)    ！ Volumetric force
+D3Q19           ! velocity set
+3Dspoiler       ! boundary condition
+! note: in the following, boundary types: periodic,velocity, pressure
+! are allowed. if "velocity" is applied, please strictly follow the format "velocity (%lf, %lf, %lf)".
+velocity (0.00, 0.1, 0.0)                     ！xmin face
+velocity (0.00, 0.1, 0.0)                    ！xmax face
+velocity (0.00, 0.1, 0.0)	！ymin face
+pressure 1.0	！ymax face, 
+velocity (0.00, 0.1, 0.0)                    ！zmin face
+velocity (0.00, 0.1, 0.0)                    ！zmax face
+-------------------！ initial velocity field
+(0.0, 0.1, 0.0)
\ No newline at end of file
diff --git a/phenglei/tutorials/L04_ThreeD_Spoiler_BGK_MPI_8CPU/bin/key.hypara b/phenglei/tutorials/L04_ThreeD_Spoiler_BGK_MPI_8CPU/bin/key.hypara
new file mode 100644
index 0000000..1a572c7
--- /dev/null
+++ b/phenglei/tutorials/L04_ThreeD_Spoiler_BGK_MPI_8CPU/bin/key.hypara
@@ -0,0 +1,55 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+//int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+int    nsimutask    = 13;
+string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/L04_ThreeD_Spoiler_BGK_MPI_8CPU/mesh_3d.dat b/phenglei/tutorials/L04_ThreeD_Spoiler_BGK_MPI_8CPU/mesh_3d.dat
new file mode 100644
index 0000000..d1ce06f
--- /dev/null
+++ b/phenglei/tutorials/L04_ThreeD_Spoiler_BGK_MPI_8CPU/mesh_3d.dat
@@ -0,0 +1,1937 @@
+ TITLE = "3D FE-SURFACE ZONES"
+     VARIABLES = "X", "Y", "Z"
+ZONE T="TRIANGLES", N=     646    ,E=    1288, DATAPACKING=POINT, ZONETYPE=FETRIANGLE
+  46.173165675999996  50.000000000000000  40.761204675000002
+  46.232179848000001  51.510759295000000  40.861010030999999
+  44.932443067999998  50.710878776000001  41.408462413000002
+  48.251382738000004  50.150051954999995  59.844786542999998
+  47.146359803999999  51.867895842999999  59.400409711999998
+  45.041987949000003  52.249442897000002  41.612025086000003
+  46.385309511999999  53.022693801000003  41.179720250000003
+  47.621705492000004  52.249116819999998  40.550915982999996
+  47.528806834000001  50.717467016000001  40.336747678999998
+  44.942039102000003  49.162758787000001  41.414194346999999
+  46.243516908000004  48.390864151000002  40.873143114999998
+  47.530868276000000  49.179877235999996  40.344390895000004
+  48.912146120999999  51.453944105000005  40.166250945000002
+  48.872004980000000  49.921942833999999  40.064128910000001
+  43.836236573000001  51.447597971999997  42.259684727000000
+  43.786089756999999  49.895405232000002  42.165692153999998
+  45.268188721000001  53.745803288000005  42.026360947000001
+  44.006812721000003  52.965755353999995  42.564544302999998
+  47.802943772999996  53.734695966000004  40.987509224999997
+  46.643240734000003  54.467160972999999  41.706831723000001
+  49.050218567999998  52.954220085000003  40.493660067000000
+  44.293378269999998  54.405286739000005  43.069782314000001
+  45.582099483999997  55.148070955000001  42.652924358999996
+  48.077967710999999  55.119129537999996  41.627407531000003
+  46.969467975000001  55.806622716000000  42.443611426000004
+  42.875066826999998  52.137828916000004  43.316811029999997
+  43.113368432999998  53.612446777999999  43.713145943000001
+  42.761545788999996  50.612052280000000  43.127578837000001
+  43.868053160999999  48.334212706999999  42.278317498999996
+  42.780605881000000  49.082324853000003  43.141558422000003
+  45.079228020999999  47.590585521999998  41.634551715000001
+  47.641171378999999  47.625966477999995  40.576630518999998
+  46.430018274999995  46.836842951999998  41.210820972999997
+  48.926948306000000  48.389856999999999  40.188985803000001
+  50.258695795000001  50.640356839999995  40.023877526999996
+  50.276109547000004  49.151253355999998  40.039910008000000
+  50.341653159000003  52.135211495000000  40.236591527999998
+  49.283526664999997  54.373901231000005  41.035868475999997
+  50.371354534000005  47.664714115999999  40.283594510000000
+  49.075116710000003  46.891486486000005  40.540521439999999
+  47.848161055999995  46.124376713000004  41.036232193000004
+  45.358766848999998  46.064229557000004  42.064720178000002
+  46.734326359999997  45.364782101999999  41.762880921000004
+  44.092781764000001  46.790376146000000  42.597089260000004
+  42.946606267999996  47.542368897999999  43.350963512000000
+  44.672717046999999  55.750548515999995  43.791034861000000
+  46.001191366000000  56.428406273999997  43.466614792000001
+  43.465012932000000  54.992644459000005  44.310760565999999
+  48.429725148000003  56.371402031999999  42.454175126000003
+  47.395653271000000  56.992442097000001  43.342438012000002
+  42.099967704000001  52.780950337999997  44.535953427000003
+  42.397712317000000  54.168969828000002  45.017539507999999
+  41.922462447000001  51.306177816999998  44.251323057999997
+  41.876772629999998  49.788470525999998  44.171755634999997
+  51.602575763000004  49.868554720999995  40.130122946000000
+  51.621271743999998  51.323779584999997  40.221498808999996
+  41.976429273999997  48.271540470000005  44.287317578000000
+  50.517009815000002  53.579500057000004  40.676916808999998
+  51.752835144000002  52.739915823000004  40.543762362999999
+  49.570068501000002  55.683733309000004  41.783532719000000
+  51.675815495999998  48.418026472999998  40.269172585000000
+  41.155555382000003  50.466813809000001  45.356953126999997
+  41.182906639999999  48.982334621000000  45.393133184999996
+  41.265921972000001  51.932646501000001  45.530015827000000
+  41.507205122000002  53.335304781000005  45.907546312000001
+  52.892749972000004  50.545322014000000  40.443085146999998
+  52.957850205000000  49.167547278000001  40.483795682000000
+  49.313048086999999  45.475712594000001  41.108491661999999
+  50.536677496999999  46.238551705999996  40.749946811000001
+  48.164971784000002  44.732662202000000  41.700131087000003
+  45.749939495999996  44.640915976999999  42.704987721000002
+  47.129222435000003  44.024597614999998  42.513131328000000
+  44.458667931999997  45.318030161999999  43.117210061000002
+  43.266874080999997  46.045570134000002  43.752800643000000
+  46.510680770000000  57.542715717999997  44.438337396999998
+  45.184816136000002  56.958613090000000  44.671612981999999
+  43.943354298000003  56.257800740999997  45.085025664000000
+  42.824542680000000  55.468933871000004  45.686813872999998
+  48.816350561999997  57.445848940000005  43.430501726000003
+  49.917495701999997  56.841335982000004  42.706899491999998
+  42.231499708000001  46.785436666999999  44.585483789000001
+  41.364566240999999  47.532748495999996  45.602051181999997
+  41.879712226000002  54.638581916999996  46.458180655000000
+  51.805873771000002  47.006799149000003  40.630924880999999
+  53.072453484000000  47.781106952999998  40.745998528999998
+  50.776157499999997  54.922660090999997  41.330225079999998
+  51.992977678999999  54.095033399000002  41.097262137999998
+  51.086984024000003  56.143876053000000  42.185190163999998
+  52.946469660000005  51.919394698000005  40.638683825000001
+  47.880024216999999  57.986144119000002  44.367309276000000
+  40.604608810000002  49.687391195000004  46.589882680999999
+  40.707711936999999  48.262748481000003  46.738813143000002
+  40.649506618000004  51.110040122000001  46.633089777999999
+  40.817873333000001  52.479852309000002  46.911491882000000
+  43.716343924000000  44.651947081000003  44.350752589999999
+  42.641979073999998  45.372608000000000  45.055632361999997
+  44.930298945000004  43.970091648999997  43.840589598000001
+  46.259431698000000  43.358640417000004  43.526941088000001
+  48.571011510000005  43.487473401000003  42.547148921000002
+  47.646452374999996  42.842587155000004  43.424876050999998
+  49.619103539000001  44.190275679999999  41.869685048000001
+  50.769780501000000  44.929541884999999  41.415252334000002
+  54.137289721000002  49.880133764999997  40.896788158000000
+  54.261036924999999  48.553012060000000  41.069726195999998
+  44.528638973000000  57.361940396000001  46.016779931000002
+  45.805817005000002  57.992697878000001  45.695861336000000
+  43.380345487000000  56.628241506999998  46.500487370000002
+  50.247224736000000  57.816144508999997  43.767282700000003
+  51.383908083999998  57.206594555999999  43.206636082000003
+  52.280563596999997  55.343006047999999  41.860508858000003
+  52.573798619000002  56.473117000000002  42.825439598000003
+  41.712990259000001  46.123276957000002  45.963109117000002
+  51.986370894000004  45.689413485000003  41.198115283000000
+  53.213629554999997  46.456188206999997  41.218543226999998
+  54.396910168000005  47.233774576999998  41.455108082000002
+  42.386665117000000  55.817198822000002  47.136902059000001
+  41.120894487000001  53.780449726000001  47.378991577000001
+  53.149709368000003  53.236053585000001  41.077708360999999
+  40.982520987000001  46.867032178000002  47.021815169999996
+  47.148134888000001  58.463882058999999  45.502271030999999
+  54.059790566000004  51.157842388999995  40.934819275999999
+  49.220261203999996  58.300461427000002  44.477831268000003
+  55.347938577999997  49.356908645000004  41.574681816999998
+  55.497482783999999  48.062733279000000  41.874442744999996
+  40.242114174000001  50.342920511000003  47.839891268999999
+  40.260085715999999  48.997840889999999  47.967822136999999
+  40.347615552000001  51.654021608000001  47.976219628999999
+  51.627766010999999  58.108373211000000  44.378197647000000
+  52.814015499999996  57.445057591000001  43.945874610000004
+  43.171443338000003  44.082005750999997  45.716525011000002
+  44.305360577999998  43.381618584999998  45.124745208000000
+  45.556207940999997  42.762906286000003  44.720114897000002
+  46.879089319999999  42.254910907999999  44.497863006999999
+  49.052336908000001  42.412414878999996  43.555584844000002
+  48.236138232999998  41.871792189000004  44.448330931000001
+  50.010902642000005  43.058386259000002  42.801814131000000
+  51.067173056000001  43.757229697000000  42.261204188999997
+  44.055185573999999  57.622460583999995  47.439282116000001
+  43.007529335999997  56.854837356000004  47.971069534999998
+  45.242206510000003  58.290105912000001  47.061029929000000
+  41.570651097999999  54.981888832999999  47.968532367999998
+  52.187306434000000  44.493919683999998  41.944022709000002
+  40.568396907999997  52.913698029999999  48.401492286000000
+  53.429974591000004  54.467142815000003  41.736834180000002
+  53.732260902999997  55.615271910000004  42.614950919000002
+  53.978526260999999  56.643525294000000  43.672686157999998
+  53.341707997000000  45.234128591000001  41.868612826000003
+  54.522332986999999  45.988982616999998  42.033806183999999
+  55.638063372000005  46.796574491000001  42.387490137000000
+  46.564741788999996  58.831946844000001  46.806926877999999
+  42.149968229000002  56.035141750999998  48.602121162000003
+  40.453978208999999  47.631251054000003  48.193761811000002
+  55.200178988000005  50.584722599999999  41.478483822000001
+  48.453812176000000  58.768404496999999  45.447595602999996
+  54.188368290000000  52.382237574000001  41.237436721000002
+  50.522527695000001  58.600923848999997  44.925448418000002
+  42.206393535000004  44.818462789000002  46.477022509000001
+  41.417326920000001  45.565641450000001  47.416555196000004
+  40.094600313000001  50.915489037000000  48.977778463999996
+  40.215969426000001  51.976587339999995  49.395146131000004
+  40.033067627999998  49.794167376000004  49.213938919000000
+  50.438222139000004  42.108634330000001  43.873474946999998
+  49.606358485000001  41.530402324999997  44.698022860999998
+  51.395562968000000  42.761224268999996  43.243334408999999
+  56.429902665000000  48.924973600000001  42.417080380000002
+  56.294581801999996  50.200399263999998  42.232240986999997
+  52.961316783000001  58.268038148000002  45.217725637000001
+  51.744355571000000  58.848667008999996  45.680472733000002
+  44.826114736000001  58.422718398000001  48.487146385999999
+  46.092546518999995  59.026732475000003  48.197249843000002
+  43.720065325999997  57.706488438000001  48.917199718999996
+  43.849013130000003  42.921570031999998  46.527077640000002
+  42.829765682000001  43.636949448999999  47.154068252999998
+  45.025316122999996  42.274267506000001  46.054676469000000
+  46.309181730999995  41.744209187999999  45.731536742000003
+  47.635531630999999  41.367561667000004  45.540145994000000
+  40.829830602999998  46.292399594000003  48.529730481000001
+  48.841396740999997  41.169881316000001  45.451742914999997
+  54.506560335000003  53.542484467999998  41.805995011999997
+  40.141079820000002  48.435085944999997  49.406083445000000
+  47.925987253000002  59.187204562000005  46.639383469999999
+  54.822393898000001  54.665121784999997  42.585072095999998
+  55.097895151000003  55.708582729000000  43.563887178000002
+  52.440749515000000  43.442902449000002  42.855266729000000
+  53.471199452000000  44.157381470000004  42.664157642999996
+  54.568084868000000  44.850970216000000  42.746029161999999
+  55.682234248000000  45.579574039000001  43.059391362000000
+  40.950394971999998  54.122169233999998  48.945310641999995
+  41.497448214000002  55.238743642999999  49.487966623999995
+  40.527571162000001  53.204805833999998  49.951922155999995
+  47.470142374999995  59.462251898000005  47.983664359000002
+  41.986455874000001  44.390538378000002  47.922248607000000
+  56.626043254999999  47.699007461999997  42.872519089999997
+  42.798215745999997  56.915726378999999  49.445895129999997
+  54.154502237999999  57.525014075000001  44.889787251999998
+  55.022629930999997  51.631860091000000  41.508226262000001
+  56.060654846999995  51.416105432999998  42.172924670000000
+  49.597308931000001  58.904807535000003  45.467644909000001
+  50.549984019999997  59.222190495000000  46.172635364000001
+  40.044526078000004  50.836946142000002  50.433659007000003
+  51.755466976999998  41.960340627999997  44.318256175999998
+  50.902722468000000  41.350245874999999  45.063721470000004
+  44.511025559000004  58.358184284000004  49.890843898000000
+  45.692661810000004  59.016503103000005  49.613335397000000
+  57.138067012999997  49.760768542999998  43.000659486000004
+  57.432755317000002  48.680706826000005  43.441523505999996
+  52.981398943999999  58.919798732000004  46.601698819999996
+  54.221541770999998  58.236129168000005  46.212552125000002
+  44.646538194999998  41.943302863000000  47.464240165000000
+  43.549735576000003  42.623825615000001  48.003467931000003
+  45.890081070000001  41.364323855999999  47.078756440999996
+  47.229582573999998  40.938636764000002  46.803676551999999
+  42.115103102999996  56.149578374000001  49.894706378999999
+  50.092559585000004  40.776149305000004  46.138392680999999
+  55.422880296000002  52.546307634000001  41.993209960999998
+  55.797711281000005  53.608260975999997  42.694728162000004
+  56.738963572999999  46.453217449999997  43.518742136000000
+  49.256704775999999  59.336253076999995  46.495447149000000
+  47.028165536000003  59.528753339000005  49.390853288999999
+  48.891953139000002  59.686561490999999  47.776768425000000
+  48.621172649999998  40.707694906000000  46.571895396000002
+  56.100303237999995  54.668977787000003  43.597895125000001
+  57.638505354999999  47.476167525999998  44.060007947000003
+  40.443467222999999  47.073561491999996  49.670395783000004
+  41.032551749000000  54.388615537999996  50.570022393000002
+  57.242891161000003  51.042992365000003  43.184378637999998
+  51.679851409000001  59.416321963000001  47.082641616000004
+  41.363769642000001  45.070332074999996  48.944585696000004
+  42.645067323999996  43.365956171000001  48.623617851999995
+  55.278989754000001  56.633554382000000  44.696395240999998
+  55.370292304000003  57.401171777000002  45.952455448000002
+  40.270798159000002  52.202942243999999  50.699769246999999
+  52.705882963999997  42.584991178999999  43.860306069000004
+  53.708346796000001  43.245068943999996  43.626690775000000
+  54.508892391000003  43.904365356000000  43.479790823999998
+  55.560408596999999  44.401283991000000  43.857017395000000
+  40.043667923999998  49.329361742000003  50.649381176999995
+  43.516016446000002  57.601410792999999  50.420132393999999
+  57.956279772000002  49.846367547000000  43.944093027000001
+  44.389262170999999  41.790424193999996  48.940525553000001
+  45.559542207000000  41.166249995000001  48.500935143000000
+  46.856620884999998  40.680436720000003  48.193094357000000
+  54.181182571000001  58.774181893000005  47.648097702000001
+  52.882382526000001  59.381087182000002  48.079824419000005
+  52.096601257000003  41.411433088000003  45.326587801999999
+  53.044051503999995  41.904001321999999  44.981179834999999
+  45.344276172000001  58.793357956000001  51.000545598000002
+  46.606369295999997  59.370243862999999  50.825712170000003
+  40.933263232000002  45.782307645000003  50.073181805000004
+  41.960708650000001  44.102781999999998  49.230185438999996
+  53.842847997000000  42.533028592000001  44.570740634000003
+  56.677448616999996  45.221923021999999  44.291965279999999
+  57.676704379000000  46.235227393999999  44.813990253000000
+  41.776950581000001  55.604170174000004  50.987286644000001
+  42.643350761999997  56.705515855000002  50.956958259000004
+  51.645786940999997  40.882076760000004  46.237705336000005
+  44.310081953000001  58.142562357000003  51.150439429999999
+  58.320235762999999  48.613095987999998  44.628764191000002
+  55.011123104999996  43.198774821000001  44.649113970999998
+  48.470334829999999  59.847925762000003  49.176299419000003
+  48.007300204000003  59.779728270999996  50.621339247999998
+  48.263384005999995  40.371458834999999  47.932305650000004
+  40.254494899000001  47.925847091000001  50.850305848000005
+  40.695450553000001  53.250581811000004  51.690880683000003
+  55.363958307000004  58.003057428000005  47.320630096999999
+  56.310385220000001  55.621419618000004  44.654096909000003
+  56.429450399000004  56.437666770999996  45.850468206999999
+  56.605530780999999  52.415068165999998  42.891244212000004
+  56.960910079000001  53.513581289000001  43.738971538000001
+  50.319384083999999  59.676674179000003  47.498006668000002
+  51.474705834000005  59.787013673000004  48.571852222000004
+  43.388297546000004  42.514060053999998  49.503921603999999
+  53.058997062000003  41.294172160999999  46.146287684000001
+  40.188037940000001  50.160530710000003  51.923442340000001
+  40.316016142999999  51.639659221999999  51.879354753000001
+  46.196404908000005  58.980348231999997  52.210432085999997
+  44.896401060000002  58.295167227999997  52.267923836000001
+  54.057299584999996  59.099573922000005  49.142052144000004
+  55.285387131000000  58.398672103999999  48.764285732000005
+  58.269337508999996  51.037648563000005  44.473577773999999
+  57.668237843000000  52.260313711999999  43.992578731000002
+  45.319316782000001  41.163585077000000  49.905258625999998
+  44.258426540000002  41.824892964000000  50.449398654999996
+  46.548691102999996  40.622363636999999  49.614768722000001
+  42.514380426000002  43.370184672999997  50.105111022000003
+  47.899972778999995  40.242981721999996  49.375116009999999
+  43.346149029999999  42.603692156999998  51.010394759000000
+  56.434141761999996  57.093870291000002  47.122705422999999
+  43.580809164999998  57.391535871999999  52.039408361000000
+  56.363144642000002  57.562479353000001  48.477076397000005
+  54.430205078000000  42.065975508000001  45.825729006000003
+  41.668239297000000  44.494361595000001  50.519335472000002
+  58.489278399000000  47.384743853000003  45.407333285000000
+  41.453671506999996  54.743134163000001  52.112568957000001
+  49.997336558000001  59.944848864999997  48.951203566000004
+  49.510426062999997  59.979807950000001  50.404661153999996
+  47.563784034999998  59.480035753999999  52.047870572999997
+  57.208157455999995  54.510735314000001  44.737326439000000
+  57.366076790999998  55.358925814000003  45.874127143999999
+  40.651905993000000  46.630543111999998  51.122452097999997
+  40.287584187000000  48.748553532999999  52.025551977999996
+  52.699950595000004  59.621104248999998  49.619710886999997
+  58.773372985999998  49.826086513999996  45.204410303000003
+  56.372267894000004  44.014898703000000  45.144820873000000
+  57.504969269000000  44.999971197999997  45.678524760000002
+  49.730187510999997  40.281814218999997  47.658191650999996
+  51.188337257000001  40.397598545999998  47.473789225000004
+  52.657213464000002  40.727279957999997  47.362599834000001
+  45.157193168999996  41.330137526000001  51.175034756999999
+  46.240707033999996  40.789659026000002  51.018496706000001
+  40.577499525000000  50.887383720000003  53.229401636999995
+  40.575705233000001  49.449097703999996  53.298359411999996
+  58.521394035000000  52.125315764999996  45.217858575999998
+  57.945126232000000  53.318591064000003  44.914538121999996
+  45.802347902000001  58.365806864000000  53.520368216999998
+  47.173185376999996  58.954066752000003  53.440030187000005
+  55.109830716000005  58.592785055000000  50.231678772999999
+  53.878288454000000  59.194620665000002  50.646397320999995
+  57.390485686000005  56.067712548000003  47.073639502999995
+  57.302988177000003  56.616677893000002  48.301195317999998
+  47.550640775000005  40.340255088999996  50.830642905000005
+  56.241891035999998  57.812054971999999  49.897075700000002
+  58.431739077000003  46.142727856999997  46.254705919000003
+  41.239378344999999  45.442039569000002  51.573691496999999
+  44.406837123999999  41.978742406000002  52.091878500999997
+  58.149677194999995  54.195438297999999  46.002368313000005
+  40.594714390000000  47.442860146000001  52.236434294999995
+  40.707053932999997  48.194263781000004  53.221873696000003
+  59.012860297000003  50.989641478999999  45.782304064000002
+  58.732447979000000  53.018265057000001  46.174502864000004
+  59.062778326000000  48.609977475000001  46.008272757000000
+  49.349629078999996  40.057960745000003  49.143919914999998
+  50.817561361000003  40.091975536999996  48.921739979999998
+  52.254345606000001  40.342880991999998  48.712374920000002
+  42.504821843000002  43.564961159999996  51.553248054000001
+  51.186979640000004  59.926302050000004  50.244145357999997
+  52.605097774000001  59.588856586999995  51.125741951999998
+  48.962331096000000  59.775818477000001  51.832107077000003
+  48.558188713999996  59.346885467999996  53.249140233999995
+  55.889310576000000  42.907876877000000  46.124718004000002
+  57.131979639000001  43.858728726999999  46.620702206000004
+  42.481354784000004  56.103976967000001  52.492275929000002
+  40.810306918000002  52.366375660000003  53.154331513000002
+  41.303456417999996  53.737297439999999  53.225327515000004
+  54.054141756999996  41.289973588000002  47.225225322000000
+  44.517874216999999  57.623518731000004  53.439223612999996
+  45.797491712999999  41.227359372999999  52.319418145000000
+  54.852206991999999  58.581707601000005  51.676419385000003
+  56.013919916999996  57.879845299999999  51.319395802000003
+  41.076439926999996  50.135207115000000  54.511296340000001
+  41.216031524000002  48.508063687000003  54.540487182000000
+  46.810168179000001  58.208619106000000  54.737461908000000
+  45.454717047000003  57.549445832000004  54.727184206000004
+  41.913209932999997  44.487123873000002  52.052321425000002
+  41.022186681999997  46.316829185000003  52.415185455000000
+  58.231445678000000  54.929739830000003  47.182027810000001
+  58.151714847999997  55.556754497000000  48.365367167999999
+  59.092352708999996  51.959477735000000  46.327185110000002
+  41.214247817000000  46.960294484999999  53.683849746999996
+  41.158567576999999  51.576859791000004  54.398020680000002
+  41.511422604000003  52.907105555000001  54.415064108999999
+  47.147993718999999  40.678961309999998  52.232554121999996
+  57.211933564999995  56.916968183999998  49.621099759000003
+  57.078372397999999  56.991018621999999  51.011089920000003
+  43.487710641000000  56.815181804000005  53.338170798999997
+  48.981641789999998  40.071560629000004  50.623729276999995
+  48.242696828999996  58.704006186000001  54.599147950999999
+  55.377684076999998  42.016695458999997  47.289398117000005
+  50.457481827999999  40.018888289000003  50.410023633000002
+  51.921557906000004  40.187966842000002  50.177821621000000
+  53.592150837999995  40.787861313000001  48.505693078999997
+  43.352294974000003  42.895427480000002  52.309343455000004
+  58.900978206000005  53.702780830999998  47.342557415999998
+  56.626377868999995  42.885587154999996  47.659861927000001
+  59.134438321000005  47.394708649999998  46.873581356999999
+  58.161420344000000  44.957134111000002  47.178524926000001
+  50.381357494000000  59.856120019000002  51.646652551999999
+  51.584375989999998  59.731853279999996  51.667568424999999
+  49.899929573000001  59.544164193000000  52.983105053999999
+  44.206380397000004  56.755488428000000  54.560410945000001
+  53.644795052999996  59.062978611999995  52.139599891000003
+  59.403909025000004  49.880453101000001  46.601146725999996
+  42.092848494999998  54.962143869000002  53.585259168000000
+  45.331875949999997  41.905850868000002  53.562775279000000
+  44.038469430999996  42.778200265999999  53.507956938999996
+  41.806463246000000  49.559137828000004  55.715907276999999
+  41.768755624000001  50.971507275999997  55.594889598999998
+  46.483800520999999  57.265469346000003  55.903329264999996
+  47.928555888000005  57.849613716000000  55.838894056000001
+  55.651542496000005  57.813158498000000  52.648513111000000
+  54.511251770000001  58.382198271999997  53.063879827999997
+  57.926021559999995  56.062906808999998  49.352432813999997
+  59.511636863000000  51.145431240999997  47.133512347999996
+  41.850952016000001  52.183513159000000  55.368918628000003
+  43.062190252000001  55.900566214000001  54.129178398999997
+  59.345435159000004  52.426980182999998  47.397576344000001
+  52.441786528000002  59.340978389000000  52.604573150999997
+  53.301403261000004  58.710984732000000  53.635860489999999
+  41.749273451999997  45.344276874999998  53.201523640000005
+  41.977063135999998  53.981404682000004  54.447572465000000
+  51.190656055000005  59.516948831000001  52.830198421999995
+  56.730135331000000  56.996413954000005  52.399056107999996
+  57.990167327999998  55.979617001000001  50.633566568999996
+  48.590030248000005  40.320474216999997  52.078164071000003
+  42.770674354000001  43.881924640000001  53.210296653000000
+  58.889021862999996  54.364763625999998  48.609270406000000
+  53.277315013999996  40.552788114000002  49.903077996000000
+  57.711088173999997  43.898542218000003  48.180293399999996
+  49.656441900000004  59.002884840999997  54.339358521000001
+  49.435648737000001  58.253449619000001  55.618013619999999
+  59.600921067000002  48.703095016999995  47.522026608000004
+  50.079386271000004  40.177503268999999  51.874101327999995
+  51.562459590000003  40.260907498000002  51.645842418000001
+  46.734817378999999  41.248790740000004  53.571402937000002
+  54.841822135000001  41.383095972999996  48.481539132999998
+  56.023996769999997  42.115732106999999  48.755097309000000
+  45.131897090999999  56.527638498999998  55.804438791999999
+  58.977059130000001  46.183486271000000  47.798493170000000
+  55.206642105000000  57.661815140000002  53.766625379000004
+  56.163316383000002  56.953393069000001  53.696465336999999
+  42.038906177000001  48.295584949000002  55.806544107999997
+  41.926527284000002  47.175421573000001  55.180810266000002
+  45.011510784999999  42.795121125999998  54.817125259999997
+  46.369778292999996  42.034495849999999  54.834483839000001
+  42.607802655000000  50.463248284999999  56.718691794999998
+  42.724054727000002  48.969248176000001  56.782195150000000
+  47.622043871999999  56.797319880000003  56.938426847000002
+  46.215349682999999  56.138278577000001  56.928055866000001
+  59.458168755000003  52.999273647999999  48.756054109000004
+  58.613956622000003  55.075909522000003  49.813201051000000
+  42.503472062000000  53.361041145000002  55.701356969999999
+  57.755551824999998  55.963775044999998  52.069976596000004
+  57.174350142999998  56.015392974000001  53.513366959999999
+  42.801535416000000  54.771324004999997  55.041485383000001
+  43.886208318999998  55.674357026999999  55.515725121000003
+  50.769709417000001  59.163381446000002  53.929374999000004
+  57.115887420999996  43.019323677999999  49.203567772000000
+  51.033484923000003  58.486817156000001  55.187084294000002
+  42.593123863999999  51.935924851999999  56.433535642999999
+  54.223082289000004  57.906052164999998  54.433950287000002
+  59.816468057000002  50.086133472000000  48.094865905999995
+  41.981883154000002  46.034124442000000  54.470082024000000
+  51.988344075000001  58.955402589000002  53.980860749000001
+  54.332455105000001  40.998226754000001  49.555127905999996
+  53.024829023999999  40.566477851999998  51.363476899999995
+  55.337924740999995  41.545936431999998  49.811934444000002
+  49.072505719999995  57.286755901999996  56.785495028000000
+  48.181442840000003  40.796479243999997  53.462377152999998
+  47.801717320000002  41.490765074000002  54.770793879999999
+  44.875576504000001  55.325280708000001  56.736591810000000
+  59.558597063999997  47.507606637999999  48.443980236000002
+  58.600497746000002  45.052328885000001  48.754211472999998
+  43.763744553000002  43.746373788000000  54.690551909000000
+  49.673411091999995  40.558533066000003  53.279030622000001
+  51.162712631000005  40.552198279000002  53.063844313000004
+  42.901870170999999  47.398624583000000  56.545945224000000
+  55.293080509999996  56.994541177999999  54.802050856999998
+  43.637024107000002  49.877385595999996  57.713462484000004
+  43.606115043999999  51.451807780999999  57.550529077000000
+  47.398375995999999  55.561488122000000  57.893123742000000
+  48.790900358000002  56.178199618999997  57.769680014999999
+  46.115395294999999  42.996605717999998  55.988515242999995
+  44.827442595000001  43.828645897000001  55.929505749000000
+  52.649578887000004  40.776412233999999  52.811611716000002
+  56.358134997000001  56.030472291999999  54.817418736999997
+  52.822933512999995  58.087695726999996  55.159479063999996
+  58.049480529000000  44.072056079999996  49.744375087999998
+  59.278912040000002  53.725356026000000  50.153342187999996
+  54.452497281999996  41.095954646999999  50.945116025000004
+  47.497557243000003  42.368330803999996  55.957802072000000
+  56.395324345999995  42.314479722000002  50.180567346000004
+  42.702208710999997  44.881692846999997  54.532678478000001
+  50.536885088999995  57.589946730000001  56.488795191999998
+  50.242003104999995  56.531089690999998  57.568771495999997
+  42.757979372000001  46.027333534999997  55.636582153999996
+  49.255003266999999  41.158311257000001  54.611888989000001
+  43.690108017000000  44.849846487000001  55.801825743999999
+  59.898518095000000  48.899462409000002  49.101024729000002
+  50.734318293000001  41.051244292000000  54.402334370999995
+  59.777478178999999  51.539815012999995  48.575257851000003
+  43.636008117000003  54.387314168000003  56.344374020000004
+  46.016502040999995  54.881002226999996  57.765794311000001
+  58.706828082000001  54.674266211999999  51.530483629999999
+  58.106909391000002  54.901962654999998  53.201371934000001
+  43.782749698000003  48.360361290000000  57.658810846999998
+  43.582962565000003  52.975352991000001  57.068868731999999
+  54.150263370000005  57.097609102999996  55.692034696000000
+  59.277819577999999  46.323375279000004  49.364001150000000
+  45.974386089999996  44.102174755999997  57.000720680000001
+  47.268557104999999  43.409175116000000  57.007156846000001
+  44.716386684000000  50.763919510999997  58.455758825000004
+  44.801487731999998  49.207710867999999  58.505747946000000
+  48.690953694000001  54.936116951000002  58.597740819999999
+  47.257749001999997  54.131265498000005  58.684048873999998
+  57.330624212000004  43.238754495999999  50.739937759000000
+  54.065968075000001  41.209493987000002  52.488957141000000
+  59.789725083999997  52.024579838000001  50.249718354999999
+  51.818028339999998  57.672485055999999  56.150426491000005
+  52.957302315999996  56.996972002000000  56.503594837999998
+  51.641049733000003  56.730232600999997  57.211860016999999
+  58.789207845999996  45.241619686999996  50.328088762999997
+  59.985191419000003  50.389560856999999  49.620270274999996
+  55.625864069999999  41.789228772999998  50.965861957000001
+  49.891126201999995  55.478685538999997  58.364935819999999
+  44.716401005999998  53.985849707000000  57.496438073000000
+  57.342060611000001  54.969042271999996  54.626312233000000
+  45.817552456000001  53.674400575000000  58.306979772999995
+  52.212806233999999  41.184381459000001  54.169935049999999
+  48.911792282000000  41.955310140999998  55.839415127999999
+  50.341552825000001  41.749238238000004  55.639882268999997
+  48.632612515999995  42.913720584000004  56.922058618000001
+  44.862535780000002  52.455694558000005  58.220463832999997
+  44.785381125000001  44.993176505999998  56.909375404999999
+  59.727548894000002  47.682189429000005  50.050464453000004
+  55.329173339999997  56.058167065999996  55.907497212999999
+  59.388783813000003  53.020415485000001  51.651614000999999
+  58.826350188999996  53.633978020000001  52.981567725000005
+  43.749081222000001  46.053160149000000  56.734127235000003
+  44.012262573999998  47.122172234000004  57.474296480000000
+  45.045123384999997  47.652908296000000  58.363035230999998
+  47.142141269000000  44.559126434000000  57.888570106000003
+  45.923437956000001  45.288926465999999  57.822239324999998
+  48.738882751999995  53.766893373999999  59.177150843000000
+  50.224266981000000  54.181955645000002  59.080801248000000
+  45.946391863000002  50.010670472000001  59.141561531000001
+  45.943080506000001  51.459003890999995  59.022899304999996
+  46.432646261999999  52.787389743999995  58.916526550000000
+  55.339692190999997  41.823958654000002  52.154074096999999
+  47.928361828999996  52.823161948999996  59.366860301000003
+  44.869167296000001  46.227319773000005  57.709827473000004
+  58.132363694999995  44.331575831000002  51.316673144999996
+  53.644242622000000  41.549708547999998  53.913064028000001
+  51.365829396999999  55.438083668000004  58.280202658999997
+  46.128193531000001  48.595700819000001  59.112467199999998
+  58.147657189000000  53.818781242000000  54.362635918999999
+  59.929970189999999  49.136781462000002  50.806564186000003
+  54.136670314000000  56.031257933999996  56.819962349999997
+  51.730278706000000  41.751933507000004  55.382892783999999
+  50.034960592000004  42.627122086000000  56.755697522999995
+  56.445534918000000  42.524200145999998  51.602340835999996
+  48.437670744000002  44.011241526999996  57.854546405999997
+  59.325326744000002  46.498069111000000  50.880205183000001
+  56.390540693999995  54.952312371000005  55.885201084999998
+  59.699881392000002  51.485675712000003  51.924855491999999
+  59.935892828000000  50.618828640000004  50.946089225000001
+  59.246081998999998  52.207144220000004  53.104590481000002
+  49.560128020000001  52.589605583000001  59.648857734000003
+  47.116687044000003  50.708139289999998  59.549086088999999
+  47.305967039999999  49.340752174999999  59.607683316999996
+  47.064301588999996  45.742867971000003  58.559118045999995
+  48.284028684999996  45.201474156000003  58.604045104999997
+  58.701449197000002  52.755727460999999  54.085431192000001
+  52.837695425999996  55.881589620000000  57.573267999999999
+  58.761426913999998  45.538916428000000  51.826508087000001
+  51.383157134000001  42.519315483000000  56.490472670999999
+  57.280459387999997  43.526750739999997  52.256536089000001
+  53.146936749999995  42.045864557000002  55.179625318999996
+  54.995607202000002  42.098376356000003  53.550810114000001
+  47.025490966000000  46.810285766999996  58.998778756999997
+  45.971705194999998  46.501555397000004  58.457761306999998
+  46.317842084999995  47.506685087999998  58.956846198999997
+  47.605856629000002  47.886199730000001  59.476282284999996
+  49.751194448999996  43.621144172999998  57.697291350000000
+  49.601838685000004  44.764713870000001  58.510772392000000
+  57.317612428000004  53.773957463999999  55.675367249000004
+  55.249616861999996  54.932455243000000  56.936310841000001
+  59.608647961999999  47.730796580000003  51.588899049999995
+  48.408959987000003  51.471929232999997  59.762275145000004
+  51.918973699999995  54.008077415000002  58.958395803999998
+  51.176006340000001  52.783291452000000  59.532591347000000
+  59.763498803000005  49.996038186000000  52.161961015000003
+  59.383898076000001  50.748316758000001  53.373792958999999
+  48.106032948999996  46.479038524000003  59.166008896999998
+  48.973858190000001  48.907296415000005  59.887013292999995
+  49.557224275999999  51.455114598999998  59.883652724000001
+  56.850080482999999  47.177628210000002  56.716443615999999
+  52.566588885000002  42.535995557999996  56.140135111999996
+  58.091559269000001  52.551410836999999  55.293106019999996
+  58.795339986000002  51.532551400999999  54.504806403000003
+  59.653529950999996  48.724843617000005  52.276694026000001
+  51.145233048000001  43.477601239999998  57.493113883999996
+  50.763400520000005  44.396409625000004  58.247241633000002
+  56.232866930000000  42.780931037000002  53.006062729999996
+  58.010884359000002  44.733322620999999  52.843913004000001
+  52.745957470000000  54.802194017000005  58.330585225000000
+  54.518486154000001  42.549367867999997  54.906257608000004
+  59.174214880000001  46.684636835999996  52.200488226000004
+  49.452430034999999  50.404676608999999  59.976793270999998
+  50.754265255999996  51.227545667000001  59.895666504000005
+  49.405538645000000  45.980105324999997  59.137125505000000
+  49.113011323999999  47.362321248000001  59.604993590999996
+  53.990058476000002  54.870077852999998  57.769284076999995
+  59.339807936000000  49.250025356999998  53.493640757999998
+  56.249728965999999  53.702557210999998  56.872551051000002
+  52.526134941999999  52.871198301000000  59.239851868999999
+  53.538792346000001  53.619817994999998  58.624028432999999
+  58.805403935000001  50.039885139999996  54.739543303000005
+  52.284451300000001  51.612853330000000  59.601040902000001
+  59.157829355000004  47.646388532000003  53.254946168000004
+  53.826229034000001  43.193516281000001  56.247539576999998
+  52.505788089999996  43.420769487000001  57.101742877999996
+  52.174584991000003  44.660204827999998  58.170542677000000
+  58.607516415999996  46.084585802999996  53.252720832000001
+  57.167873595000003  52.456165525999999  56.526012491000003
+  50.915022464000003  45.605288735999999  58.935840576000004
+  55.846571279999999  43.188039044000000  54.406221985999998
+  57.033518121000000  43.945946890999998  53.725327340999996
+  54.998401104999999  53.714685470999996  57.824135623000004
+  50.648105068000000  49.523369794000004  59.967586642000001
+  50.455642041000004  48.033801335999996  59.794205079999998
+  53.595254185999998  52.128038017999998  59.085460996999998
+  54.621549911999999  52.640197283999996  58.465851092000001
+  52.129535063999995  50.089941639999999  59.770209358999999
+  55.908485321000001  52.291453527000002  57.735569916999999
+  50.319022841999995  46.763101043999995  59.456252407000001
+  51.982870861999999  48.483346960999995  59.683387151000005
+  55.289349313999999  43.699814861000000  55.685987253000000
+  57.704057071999998  45.298716259000003  54.306441202000002
+  53.558916605999997  50.662567451000001  59.321755037000003
+  57.965155155000005  51.023042423999996  55.959000549999999
+  58.687085611000001  48.413649968000001  54.692338133000000
+  53.609748535000001  44.380070900000000  57.442184654000002
+  58.290268619000003  46.804581943000002  54.589199239999999
+  54.712938875999996  44.277076903000001  56.710913379000004
+  51.607851994000001  47.022569411999996  59.410086027999995
+  53.465179629000005  49.064500731999999  59.333668692000003
+  52.341741581999997  46.025447295999996  58.872382834999996
+  53.529984400000004  45.715937531000002  58.317813348000001
+  56.575220299999998  44.484258404000002  55.132550307999999
+  56.895696552000004  51.299773255000005  57.124602342999999
+  54.810533337999999  51.366845659999996  58.659705649999999
+  58.011826729999996  49.280021527000002  55.940729200999996
+  55.982553889999998  50.652605417000004  57.986435696000001
+  55.852990360000000  44.989477747000002  56.374729060999996
+  57.097599321000004  49.972622221000002  57.044383177000000
+  54.788777240999998  45.370794613999998  57.459093111000001
+  57.119851206000000  46.029085914999996  55.791334918000004
+  53.281807807999996  47.324016620999998  59.059185971000005
+  54.807265547000000  49.844048733000001  58.767318697999997
+  57.782507440000003  47.663639361999998  55.828721723000001
+  54.739683627000005  48.263516879999997  58.632498217999995
+  54.748151634999999  46.734283348999995  58.172524139000004
+  57.044065015000001  48.485917241999999  56.934601752999995
+  55.954012359000004  46.276117649000000  57.119159855999996
+  56.005827683000000  49.144036372999999  57.949676730000000
+  55.938433912000001  47.665867777999999  57.699794116999996
+         3         2         1
+         6         2         3
+         7         2         6
+         8         2         7
+         9         2         8
+         1         2         9
+        10         3         1
+        11        10         1
+        12        11         1
+         9        12         1
+        13         9         8
+        14         9        13
+        12         9        14
+        15         6         3
+        16        15         3
+        10        16         3
+        17         7         6
+        18        17         6
+        15        18         6
+        19         8         7
+        20        19         7
+        17        20         7
+        21        13         8
+        19        21         8
+        22        17        18
+        23        17        22
+        20        17        23
+        24        19        20
+        25        24        20
+        23        25        20
+        26        18        15
+        27        18        26
+        22        18        27
+        28        15        16
+        26        15        28
+        29        16        10
+        30        16        29
+        28        16        30
+        31        10        11
+        29        10        31
+        32        11        12
+        33        11        32
+        31        11        33
+        34        12        14
+        32        12        34
+        35        14        13
+        36        14        35
+        34        14        36
+        37        13        21
+        35        13        37
+        38        19        24
+        21        19        38
+        39        34        36
+        40        34        39
+        32        34        40
+        41        33        32
+        40        41        32
+        42        31        33
+        43        42        33
+        41        43        33
+        44        29        31
+        42        44        31
+        45        30        29
+        44        45        29
+        46        23        22
+        47        23        46
+        25        23        47
+        48        22        27
+        46        22        48
+        49        24        25
+        50        49        25
+        47        50        25
+        51        27        26
+        52        27        51
+        48        27        52
+        53        26        28
+        51        26        53
+        54        28        30
+        53        28        54
+        55        36        35
+        56        55        35
+        37        56        35
+        57        54        30
+        45        57        30
+        58        21        38
+        37        21        58
+        59        56        37
+        58        59        37
+        60        24        49
+        38        24        60
+        61        36        55
+        39        36        61
+        62        53        54
+        63        62        54
+        57        63        54
+        64        51        53
+        62        64        53
+        65        52        51
+        64        65        51
+        66        55        56
+        67        55        66
+        61        55        67
+        68        41        40
+        69        68        40
+        39        69        40
+        70        43        41
+        68        70        41
+        71        42        43
+        72        71        43
+        70        72        43
+        73        44        42
+        71        73        42
+        74        45        44
+        73        74        44
+        75        50        47
+        76        75        47
+        46        76        47
+        77        46        48
+        76        46        77
+        78        48        52
+        77        48        78
+        79        49        50
+        80        49        79
+        60        49        80
+        81        57        45
+        74        81        45
+        82        63        57
+        81        82        57
+        83        52        65
+        78        52        83
+        84        69        39
+        61        84        39
+        85        61        67
+        84        61        85
+        86        38        60
+        58        38        86
+        87        59        58
+        86        87        58
+        88        60        80
+        86        60        88
+        89        56        59
+        66        56        89
+        90        79        50
+        75        90        50
+        91        62        63
+        92        91        63
+        82        92        63
+        93        64        62
+        91        93        62
+        94        65        64
+        93        94        64
+        95        74        73
+        96        74        95
+        81        74        96
+        97        73        71
+        95        73        97
+        98        71        72
+        97        71        98
+        99        72        70
+       100        72        99
+        98        72       100
+       101        70        68
+        99        70       101
+       102        68        69
+       101        68       102
+       103        67        66
+       104        67       103
+        85        67       104
+       105        76        77
+       106        76       105
+        75        76       106
+       107        77        78
+       105        77       107
+       108        80        79
+       109        80       108
+        88        80       109
+       110        86        88
+        87        86       110
+       111        88       109
+       110        88       111
+       112        81        96
+        82        81       112
+       113        69        84
+       102        69       113
+       114        84        85
+       113        84       114
+       115        85       104
+       114        85       115
+       116       107        78
+        83       116        78
+       117        83        65
+        94       117        65
+       118        59        87
+        89        59       118
+       119        92        82
+       112       119        82
+       120        75       106
+        90        75       120
+       121        66        89
+       103        66       121
+       122       108        79
+        90       122        79
+       123       104       103
+       124       104       123
+       115       104       124
+       125        93        91
+       126       125        91
+        92       126        91
+       127        94        93
+       125       127        93
+       128       109       108
+       129       109       128
+       111       109       129
+       130        96        95
+       131       130        95
+        97       131        95
+       132        97        98
+       131        97       132
+       133        98       100
+       132        98       133
+       134       100        99
+       135       100       134
+       133       100       135
+       136        99       101
+       134        99       136
+       137       101       102
+       136       101       137
+       138       105       107
+       139       138       107
+       116       139       107
+       140       106       105
+       138       140       105
+       141        83       117
+       116        83       141
+       142       137       102
+       113       142       102
+       143       117        94
+       127       143        94
+       144        87       110
+       118        87       144
+       145       110       111
+       144       110       145
+       146       111       129
+       145       111       146
+       147       113       114
+       142       113       147
+       148       114       115
+       147       114       148
+       149       115       124
+       148       115       149
+       150       106       140
+       120       106       150
+       151       139       116
+       141       151       116
+       152        92       119
+       126        92       152
+       153       103       121
+       123       103       153
+       154        90       120
+       122        90       154
+       155       121        89
+       118       155        89
+       156       108       122
+       128       108       156
+       157        96       130
+       112        96       157
+       158       119       112
+       157       158       112
+       159       127       125
+       160       127       159
+       143       127       160
+       161       125       126
+       159       125       161
+       162       134       136
+       163       134       162
+       135       134       163
+       164       136       137
+       162       136       164
+       165       124       123
+       166       165       123
+       153       166       123
+       167       129       128
+       168       167       128
+       156       168       128
+       169       140       138
+       170       140       169
+       150       140       170
+       171       138       139
+       169       138       171
+       172       130       131
+       173       130       172
+       157       130       173
+       174       131       132
+       172       131       174
+       175       132       133
+       174       132       175
+       176       133       135
+       175       133       176
+       177       152       119
+       158       177       119
+       178       135       163
+       176       135       178
+       179       155       118
+       144       179       118
+       180       161       126
+       152       180       126
+       181       120       150
+       154       120       181
+       182       144       145
+       179       144       182
+       183       145       146
+       182       145       183
+       184       164       137
+       142       184       137
+       185       142       147
+       184       142       185
+       186       147       148
+       185       147       186
+       187       148       149
+       186       148       187
+       188       141       117
+       143       188       117
+       189       151       141
+       188       189       141
+       190       143       160
+       188       143       190
+       191       150       170
+       181       150       191
+       192       157       173
+       158       157       192
+       193       124       165
+       149       124       193
+       194       171       139
+       151       194       139
+       195       146       129
+       167       195       129
+       196       153       121
+       155       196       121
+       197       166       153
+       196       197       153
+       198       122       154
+       156       122       198
+       199       168       156
+       198       199       156
+       200       160       159
+       161       200       159
+       201       162       164
+       202       162       201
+       163       162       202
+       203       169       171
+       204       169       203
+       170       169       204
+       205       165       166
+       206       165       205
+       193       165       206
+       207       167       168
+       208       167       207
+       195       167       208
+       209       172       174
+       210       172       209
+       173       172       210
+       211       174       175
+       209       174       211
+       212       175       176
+       211       175       212
+       213       151       189
+       194       151       213
+       214       163       202
+       178       163       214
+       215       196       155
+       179       215       155
+       215       197       196
+       216       179       182
+       215       179       216
+       217       149       193
+       187       149       217
+       218       198       154
+       181       218       154
+       218       199       198
+       219       191       170
+       204       219       170
+       220       181       191
+       218       181       220
+       221       176       178
+       212       176       221
+       222       182       183
+       216       182       222
+       223       193       206
+       217       193       223
+       224       180       152
+       177       224       152
+       225       189       188
+       190       225       188
+       226       166       197
+       205       166       226
+       227       168       199
+       207       168       227
+       228       158       192
+       177       158       228
+       229       173       210
+       192       173       229
+       230       183       146
+       195       230       146
+       231       195       208
+       230       195       231
+       232       160       200
+       190       160       232
+       233       201       164
+       184       233       164
+       234       184       185
+       233       184       234
+       235       185       186
+       234       185       235
+       236       186       187
+       235       186       236
+       237       161       180
+       200       161       237
+       238       203       171
+       194       238       171
+       239       206       205
+       226       239       205
+       240       210       209
+       241       240       209
+       211       241       209
+       242       211       212
+       241       211       242
+       243       208       207
+       244       243       207
+       227       244       207
+       245       202       201
+       246       245       201
+       233       246       201
+       247       204       203
+       248       204       247
+       219       204       248
+       214       221       178
+       249       224       177
+       228       249       177
+       250       228       192
+       229       250       192
+       251       233       234
+       246       233       251
+       252       187       217
+       236       187       252
+       253       217       223
+       252       217       253
+       254       189       225
+       213       189       254
+       255       238       194
+       213       255       194
+       256       202       245
+       214       202       256
+       257       203       238
+       247       203       257
+       258       223       206
+       239       258       206
+       259       234       235
+       251       234       259
+       259       235       236
+       260       191       219
+       220       191       260
+       261       219       248
+       260       219       261
+       262       212       221
+       242       212       262
+       263       180       224
+       237       180       263
+       264       190       232
+       225       190       264
+       265       231       208
+       243       265       208
+       266       183       230
+       222       183       266
+       267       230       231
+       266       230       267
+       268       215       216
+       197       215       268
+       268       226       197
+       269       216       222
+       268       216       269
+       270       199       218
+       220       270       218
+       270       227       199
+       271       244       227
+       270       271       227
+       272       210       240
+       229       210       272
+       273       245       246
+       256       245       273
+       274       200       237
+       275       200       274
+       232       200       275
+       276       248       247
+       277       276       247
+       257       277       247
+       278       243       244
+       279       243       278
+       265       243       279
+       280       239       226
+       281       280       226
+       268       281       226
+       282       240       241
+       283       240       282
+       272       240       283
+       284       241       242
+       282       241       284
+       269       281       268
+       264       232       275
+       254       255       213
+       285       229       272
+       250       229       285
+       286       242       262
+       284       242       286
+       287       272       283
+       285       272       287
+       288       231       265
+       267       231       288
+       289       257       238
+       255       289       238
+       289       277       257
+       290       265       279
+       288       265       290
+       291       246       251
+       273       246       291
+       291       251       259
+       292       249       228
+       250       292       228
+       293       223       258
+       253       223       293
+       294       254       225
+       264       294       225
+       295       270       220
+       260       295       220
+       295       271       270
+       296       260       261
+       295       260       296
+       297       261       248
+       276       297       248
+       298       222       266
+       269       222       298
+       299       266       267
+       298       266       299
+       300       224       249
+       263       224       300
+       301       274       237
+       263       301       237
+       302       244       271
+       278       244       302
+       303       258       239
+       280       303       239
+       304       236       252
+       259       236       304
+       305       252       253
+       304       252       305
+       306       262       221
+       214       306       221
+       307       214       256
+       306       214       307
+       308       256       273
+       307       256       308
+       309       283       282
+       310       309       282
+       284       310       282
+       311       275       274
+       312       311       274
+       301       312       274
+       313       280       281
+       314       313       281
+       269       314       281
+       315       276       277
+       316       276       315
+       297       276       316
+       317       279       278
+       318       317       278
+       302       318       278
+       298       314       269
+       292       250       285
+       319       267       288
+       299       267       319
+       320       288       290
+       319       288       320
+       321       284       286
+       310       284       321
+       322       279       317
+       290       279       322
+       323       253       293
+       305       253       323
+       324       249       292
+       300       249       324
+       325       287       283
+       309       325       283
+       326       298       299
+       314       298       326
+       327       263       300
+       301       263       327
+       328       312       301
+       327       328       301
+       329       303       280
+       313       329       280
+       330       313       314
+       326       330       314
+       331       293       258
+       303       331       258
+       332       262       306
+       286       262       332
+       333       306       307
+       332       306       333
+       334       307       308
+       333       307       334
+       335       285       287
+       292       285       335
+       336       271       295
+       296       336       295
+       336       302       271
+       337       318       302
+       336       337       302
+       338       296       261
+       297       338       261
+       339       297       316
+       338       297       339
+       340       259       304
+       291       259       340
+       341       304       305
+       340       304       341
+       342       255       254
+       289       255       342
+       342       254       294
+       343       275       311
+       264       275       343
+       344       294       264
+       343       344       264
+       345       308       273
+       291       345       273
+       346       315       277
+       289       346       277
+       347       309       310
+       325       309       347
+       348       317       318
+       349       317       348
+       322       317       349
+       350       311       312
+       351       350       312
+       328       351       312
+       352       316       315
+       353       352       315
+       346       353       315
+       354       324       292
+       335       354       292
+       355       327       300
+       324       355       300
+       356       326       299
+       319       356       299
+       357       319       320
+       356       319       357
+       358       313       330
+       329       313       358
+       359       328       327
+       355       359       327
+       359       351       328
+       360       343       311
+       350       360       311
+       361       344       343
+       360       361       343
+       362       347       310
+       321       362       310
+       363       320       290
+       322       363       290
+       364       322       349
+       363       322       364
+       365       289       342
+       346       289       365
+       366       321       286
+       332       366       286
+       367       339       316
+       352       367       316
+       368       291       340
+       345       291       368
+       369       332       333
+       366       332       369
+       370       333       334
+       369       333       370
+       371       308       345
+       334       308       371
+       372       287       325
+       335       287       372
+       373       330       326
+       356       373       326
+       374       340       341
+       368       340       374
+       375       323       293
+       331       375       293
+       376       341       305
+       323       376       305
+       377       296       338
+       336       296       377
+       378       337       336
+       377       378       336
+       379       338       339
+       377       338       379
+       380       353       346
+       365       380       346
+       381       318       337
+       348       318       381
+       382       303       329
+       331       303       382
+       383       294       344
+       342       294       383
+       384       325       347
+       385       325       384
+       372       325       385
+       386       350       351
+       387       350       386
+       360       350       387
+       388       352       353
+       389       352       388
+       367       352       389
+       390       349       348
+       391       390       348
+       381       391       348
+       392       357       320
+       363       392       320
+       393       329       358
+       382       329       393
+       394       361       360
+       387       394       360
+       395       365       342
+       383       395       342
+       395       380       365
+       396       358       330
+       373       396       330
+       397       337       378
+       381       337       397
+       398       391       381
+       397       398       381
+       399       355       324
+       354       399       324
+       399       359       355
+       400       383       344
+       361       400       344
+       401       378       377
+       379       401       377
+       402       364       349
+       390       402       349
+       403       363       364
+       392       363       403
+       404       321       366
+       362       321       404
+       405       335       372
+       354       335       405
+       405       372       385
+       406       373       356
+       357       406       356
+       407       370       334
+       371       407       334
+       408       374       341
+       376       408       341
+       409       379       339
+       367       409       339
+       410       367       389
+       409       367       410
+       411       375       331
+       382       411       331
+       412       366       369
+       404       366       412
+       413       369       370
+       412       369       413
+       414       384       347
+       362       414       347
+       415       345       368
+       371       345       415
+       416       368       374
+       415       368       416
+       417       353       380
+       388       353       417
+       418       376       323
+       375       418       323
+       419       390       391
+       420       390       419
+       402       390       420
+       421       386       351
+       422       421       351
+       359       422       351
+       423       385       384
+       424       423       384
+       414       424       384
+       425       387       386
+       426       425       386
+       421       426       386
+       427       389       388
+       428       427       388
+       417       428       388
+       397       378       401
+       405       399       354
+       393       358       396
+       429       396       373
+       406       429       373
+       430       406       357
+       392       430       357
+       430       392       403
+       431       400       361
+       394       431       361
+       432       364       402
+       403       364       432
+       433       402       420
+       432       402       433
+       434       395       383
+       400       434       383
+       435       380       395
+       434       435       395
+       435       417       380
+       436       401       379
+       409       436       379
+       437       374       408
+       416       374       437
+       438       409       410
+       436       409       438
+       439       394       387
+       425       439       387
+       440       419       391
+       398       440       391
+       441       411       382
+       393       441       382
+       442       359       399
+       422       359       442
+       443       398       397
+       401       443       397
+       444       371       415
+       407       371       444
+       445       413       370
+       407       445       370
+       446       415       416
+       444       415       446
+       447       410       389
+       427       447       389
+       448       362       404
+       414       362       448
+       449       424       414
+       448       449       414
+       450       428       417
+       435       450       417
+       451       375       411
+       418       375       451
+       452       408       376
+       418       452       376
+       453       405       385
+       423       453       385
+       454       404       412
+       448       404       454
+       455       412       413
+       454       412       455
+       456       421       422
+       426       421       456
+       457       420       419
+       440       457       419
+       458       425       426
+       459       425       458
+       439       425       459
+       460       427       428
+       461       427       460
+       447       427       461
+       462       423       424
+       463       423       462
+       453       423       463
+       436       443       401
+       431       394       439
+       434       400       431
+       464       413       445
+       455       413       464
+       465       433       420
+       457       465       420
+       466       440       398
+       443       466       398
+       467       437       408
+       452       467       408
+       443       436       438
+       468       429       406
+       430       468       406
+       469       445       407
+       444       469       407
+       469       444       446
+       470       424       449
+       462       424       470
+       471       446       416
+       437       471       416
+       472       399       405
+       442       399       472
+       472       405       453
+       473       410       447
+       438       410       473
+       474       447       461
+       473       447       474
+       475       456       422
+       442       475       422
+       476       449       448
+       454       476       448
+       477       453       463
+       472       453       477
+       478       451       411
+       441       478       411
+       479       454       455
+       476       454       479
+       480       396       429
+       393       396       480
+       480       441       393
+       481       435       434
+       431       481       434
+       481       450       435
+       482       428       450
+       460       428       482
+       483       430       403
+       468       430       483
+       483       403       432
+       484       432       433
+       483       432       484
+       485       458       426
+       456       485       426
+       486       439       459
+       431       439       486
+       487       457       440
+       466       487       440
+       488       418       451
+       452       418       488
+       489       463       462
+       490       489       462
+       470       490       462
+       491       459       458
+       492       491       458
+       485       492       458
+       493       461       460
+       494       493       460
+       482       494       460
+       481       431       486
+       438       466       443
+       475       442       472
+       475       472       477
+       495       437       467
+       471       437       495
+       496       464       445
+       469       496       445
+       497       480       429
+       468       497       429
+       498       438       473
+       466       438       498
+       499       487       466
+       498       499       466
+       500       473       474
+       498       473       500
+       501       452       488
+       467       452       501
+       502       441       480
+       478       441       502
+       503       446       471
+       469       446       503
+       504       461       493
+       474       461       504
+       505       450       481
+       486       505       481
+       505       482       450
+       506       484       433
+       465       506       433
+       507       494       482
+       505       507       482
+       508       479       455
+       464       508       455
+       509       470       449
+       476       509       449
+       510       476       479
+       509       476       510
+       511       490       470
+       509       511       470
+       512       486       459
+       491       512       459
+       513       477       463
+       489       513       463
+       514       488       451
+       478       514       451
+       515       457       487
+       465       457       515
+       516       468       483
+       497       468       516
+       517       483       484
+       516       483       517
+       518       456       475
+       477       518       475
+       519       485       456
+       518       519       456
+       520       492       485
+       519       520       485
+       521       489       490
+       522       489       521
+       513       489       522
+       523       493       494
+       524       493       523
+       504       493       524
+       525       491       492
+       526       491       525
+       512       491       526
+       513       518       477
+       502       480       497
+       500       499       498
+       505       486       512
+       512       507       505
+       527       512       526
+       507       512       527
+       528       469       503
+       496       469       528
+       527       494       507
+       529       523       494
+       527       529       494
+       530       513       522
+       518       513       530
+       530       519       518
+       530       520       519
+       531       495       467
+       501       531       467
+       532       508       464
+       496       532       464
+       533       474       504
+       500       474       533
+       533       504       524
+       534       492       520
+       525       492       534
+       535       517       484
+       506       535       484
+       536       514       478
+       502       536       478
+       537       487       499
+       515       487       537
+       538       479       508
+       510       479       538
+       539       511       509
+       510       539       509
+       540       503       471
+       495       540       471
+       541       521       490
+       511       541       490
+       542       488       514
+       501       488       542
+       543       465       515
+       506       465       543
+       544       497       516
+       545       497       544
+       502       497       545
+       546       516       517
+       544       516       546
+       547       524       523
+       529       547       523
+       548       526       525
+       549       548       525
+       534       549       525
+       550       522       521
+       551       550       521
+       541       551       521
+       545       536       502
+       540       528       503
+       552       517       535
+       546       517       552
+       553       499       500
+       537       499       553
+       553       500       533
+       554       501       542
+       531       501       554
+       555       510       538
+       539       510       555
+       556       495       531
+       540       495       556
+       557       538       508
+       532       557       508
+         5       526       548
+       527       526         5
+         5       529       527
+       558       532       496
+       528       558       496
+       560       530       522
+       550       560       522
+       560       520       530
+       561       534       520
+       560       561       520
+       562       549       534
+       561       562       534
+       563       541       511
+       539       563       511
+       564       551       541
+       563       564       541
+       565       535       506
+       543       565       506
+       566       543       515
+       537       566       515
+       567       514       536
+       542       514       567
+       568       547       529
+         5       568       529
+       569       533       524
+       570       569       524
+       547       570       524
+       571       545       544
+       572       571       544
+       546       572       544
+       573       550       551
+       559       550       573
+       560       550       559
+         4       548       549
+       574         4       549
+       562       574       549
+       561       560       559
+       548       568         5
+       568       548         4
+       577       555       538
+       557       577       538
+       559       562       561
+       562       559       573
+       578       552       535
+       565       578       535
+       579       572       546
+       552       579       546
+       571       536       545
+       580       567       536
+       571       580       536
+       581       539       555
+       563       539       581
+       582       564       563
+       581       582       563
+       583       558       528
+       540       583       528
+       583       540       556
+       584       556       531
+       554       584       531
+       585       533       569
+       553       533       585
+       586       557       532
+       558       586       532
+       587       542       567
+       554       542       587
+       588         4       574
+       568         4       588
+       575       547       568
+       588       575       568
+       589       570       547
+       575       589       547
+       590       573       551
+       564       590       551
+       591       574       562
+       573       591       562
+       592       566       537
+       553       592       537
+       593       571       572
+       580       571       593
+       594       543       566
+       565       543       594
+       595       569       570
+       596       569       595
+       585       569       596
+       585       592       553
+       590       591       573
+       578       579       552
+       592       585       596
+       589       575       588
+       597       593       572
+       579       597       572
+       598       595       570
+       589       598       570
+       599       567       580
+       587       567       599
+       599       580       593
+       600       557       586
+       577       557       600
+       601       581       555
+       577       601       555
+       602       582       581
+       601       602       581
+       603       584       554
+       587       603       554
+       604       565       594
+       578       565       604
+       605       564       582
+       590       564       605
+       606       586       558
+       583       606       558
+       607       583       556
+       584       607       556
+       608       566       592
+       594       566       608
+       609       588       574
+       589       588       609
+       610       574       591
+       609       574       610
+       611       596       595
+       598       611       595
+       608       592       596
+       607       606       583
+       600       601       577
+       599       603       587
+       605       582       602
+       612       596       611
+       608       596       612
+       613       598       589
+       609       613       589
+       614       594       608
+       612       614       608
+       614       604       594
+       615       591       590
+       610       591       615
+       615       590       605
+       616       609       610
+       613       609       616
+       617       600       586
+       606       617       586
+       618       584       603
+       607       584       618
+       619       611       598
+       613       619       598
+       620       579       578
+       597       579       620
+       620       578       604
+       621       593       597
+       599       593       621
+       622       602       601
+       600       622       601
+       623       599       621
+       603       599       623
+       623       618       603
+       624       600       617
+       622       600       624
+       625       610       615
+       616       610       625
+       625       615       605
+       626       613       616
+       619       613       626
+       627       605       602
+       625       605       627
+       628       602       622
+       627       602       628
+       629       606       607
+       617       606       629
+       629       607       618
+       630       604       614
+       620       604       630
+       631       612       611
+       619       631       611
+       631       614       612
+       632       597       620
+       621       597       632
+       633       630       614
+       631       633       614
+       634       624       617
+       629       634       617
+       635       632       620
+       630       635       620
+       636       622       624
+       628       622       636
+       637       629       618
+       634       629       637
+       637       618       623
+       638       626       616
+       625       638       616
+       638       625       627
+       638       627       628
+       639       631       619
+       626       639       619
+       640       623       621
+       632       640       621
+       640       637       623
+       636       624       634
+       639       633       631
+       635       630       633
+       641       626       638
+       639       626       641
+       642       638       628
+       641       638       642
+       642       628       636
+       643       632       635
+       640       632       643
+       644       634       637
+       636       634       644
+       644       642       636
+       576       644       637
+       640       576       637
+       576       640       643
+       645       639       641
+       633       639       645
+       645       635       633
+       645       643       635
+       646       641       642
+       645       641       646
+       646       642       644
+       643       645       646
+       646       576       643
+       646       644       576
diff --git a/phenglei/tutorials/L05_TwoD_Cavity_BGK_OMP_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/L05_TwoD_Cavity_BGK_OMP_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/L05_TwoD_Cavity_BGK_OMP_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/L05_TwoD_Cavity_BGK_OMP_1CPU/bin/input.txt b/phenglei/tutorials/L05_TwoD_Cavity_BGK_OMP_1CPU/bin/input.txt
new file mode 100644
index 0000000..f567ed4
--- /dev/null
+++ b/phenglei/tutorials/L05_TwoD_Cavity_BGK_OMP_1CPU/bin/input.txt
@@ -0,0 +1,33 @@
+0           ！MRT set 1,   BGK set 0
+1  ic.plt   ！CONTI,   resume :1 ,  new 0 //follows input datafile name
+0	！LES   yes: 1 ,   no: 0 
+0  mesh_3d.dat ！GEO  read complex geo?  yes:1, no:0 //follows input datafile name
+0	! MB   multiblock LBM?   yes:1, no:0
+0  2.e-3  !CONV   using converge criterion?   yes:1, no:0
+201    ！NX
+201      !  NY
+1         ! NZ
+240    ！ NX2
+160    ！ NY2
+1        !  NZ2
+500      ! LowX
+160      ! LowY
+0     ! LowZ
+200   !  framerate 
+50000   ！total steps to terminate
+1.0      !  density
+0.8    ！ tau
+(0.0, 0.0, 0.0000000)   ！ Volumetric force vector (gx, gy, gz)
+D2Q9          ! velocity set
+Cavity        ! boundary condition
+! note: in the following, boundary types: periodic,velocity, pressure
+! are allowed. if "velocity" is applied, please strictly follow the format "velocity (%lf, %lf, %lf)".
+nonslip                  ！xmin face
+nonslip                 ！xmax face
+nonslip  	！ymin face
+velocity (0.1, 0.00, 0.0)   	！ymax face, 
+nonslip                    ！zmin face
+nonslip                    ！zmax face
+-------------------！ initial velocity field
+(0.0, 0.00, 0.0)
+
diff --git a/phenglei/tutorials/L05_TwoD_Cavity_BGK_OMP_1CPU/bin/key.hypara b/phenglei/tutorials/L05_TwoD_Cavity_BGK_OMP_1CPU/bin/key.hypara
new file mode 100644
index 0000000..9470ea6
--- /dev/null
+++ b/phenglei/tutorials/L05_TwoD_Cavity_BGK_OMP_1CPU/bin/key.hypara
@@ -0,0 +1,58 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+//int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+int    nsimutask    = 17;
+string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/L06_TwoD_Cylinder_BGK_OMP_4CPU/Readme.txt b/phenglei/tutorials/L06_TwoD_Cylinder_BGK_OMP_4CPU/Readme.txt
new file mode 100644
index 0000000..482326a
--- /dev/null
+++ b/phenglei/tutorials/L06_TwoD_Cylinder_BGK_OMP_4CPU/Readme.txt
@@ -0,0 +1 @@
+使用LBM_OMP模块时，只打开LBMSolverOMP编译选项，不打开USE_OMP
\ No newline at end of file
diff --git a/phenglei/tutorials/L06_TwoD_Cylinder_BGK_OMP_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/L06_TwoD_Cylinder_BGK_OMP_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/L06_TwoD_Cylinder_BGK_OMP_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/L06_TwoD_Cylinder_BGK_OMP_4CPU/bin/input.txt b/phenglei/tutorials/L06_TwoD_Cylinder_BGK_OMP_4CPU/bin/input.txt
new file mode 100644
index 0000000..ba067cb
--- /dev/null
+++ b/phenglei/tutorials/L06_TwoD_Cylinder_BGK_OMP_4CPU/bin/input.txt
@@ -0,0 +1,33 @@
+0         ！MRT set 1,   BGK set 0
+0  ic.plt   ！CONTI,   resume :1 ,  new 0 //follows input datafile name
+0	！LES   yes: 1 ,   no: 0 
+1  mesh_2d.dat ！GEO  read complex geo?  yes:1, no:0 //follows input datafile name
+1	! MB   multiblock LBM?   yes:1, no:0
+0  2.e-3  !CONV   using converge criterion?   yes:1, no:0
+600     ！NX
+400      !  NY
+1     ! NZ
+240    ！ NX2
+160    ！ NY2
+1    !  NZ2
+200      ! LowX
+160      ! LowY
+0     ! LowZ
+200   !  framerate 
+50000   ！total steps to terminate
+1.0      !  density
+0.54    ！ tau
+(0.0, 0.0, 0.0000000)   ！ Volumetric force vector (gx, gy, gz)
+D2Q9          ! velocity set
+Poiseuille        ! boundary condition
+! note: in the following, boundary types: periodic,velocity, pressure
+! are allowed. if "velocity" is applied, please strictly follow the format "velocity (%lf, %lf, %lf)".
+velocity (0.1, 0.00, 0.0)                    ！xmin face
+pressure 1.0                   ！xmax face
+velocity (0.1, 0.00, 0.0)   	！ymin face
+velocity (0.1, 0.00, 0.0)   	！ymax face, 
+nonslip                    ！zmin face
+nonslip                    ！zmax face
+-------------------！ initial velocity field
+(0.1, 0.00, 0.0)
+
diff --git a/phenglei/tutorials/L06_TwoD_Cylinder_BGK_OMP_4CPU/bin/key.hypara b/phenglei/tutorials/L06_TwoD_Cylinder_BGK_OMP_4CPU/bin/key.hypara
new file mode 100644
index 0000000..c267e0a
--- /dev/null
+++ b/phenglei/tutorials/L06_TwoD_Cylinder_BGK_OMP_4CPU/bin/key.hypara
@@ -0,0 +1,55 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 2;
+int nparafile = 1;
+
+//int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+int    nsimutask    = 17;
+string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/L06_TwoD_Cylinder_BGK_OMP_4CPU/mesh_2d.dat b/phenglei/tutorials/L06_TwoD_Cylinder_BGK_OMP_4CPU/mesh_2d.dat
new file mode 100644
index 0000000..0f2d10d
--- /dev/null
+++ b/phenglei/tutorials/L06_TwoD_Cylinder_BGK_OMP_4CPU/mesh_2d.dat
@@ -0,0 +1,303 @@
+Title = "finite-element data"
+variables = x, y, z
+zone n= 150, E= 150,f=FEpoint,et = triangle
+100  80  0
+99.9825  80.8375  0
+99.9299  81.6736  0
+99.8423  82.5067  0
+99.7199  83.3354  0
+99.563  84.1582  0
+99.3717  84.9738  0
+99.1464  85.7806  0
+98.8875  86.5773  0
+98.5955  87.3625  0
+98.2709  88.1347  0
+97.9142  88.8927  0
+97.5261  89.6351  0
+97.1073  90.3605  0
+96.6584  91.0678  0
+96.1803  91.7557  0
+95.6739  92.423  0
+95.1399  93.0684  0
+94.5794  93.6909  0
+93.9933  94.2895  0
+93.3826  94.8629  0
+92.7485  95.4103  0
+92.092  95.9306  0
+91.4143  96.423  0
+90.7165  96.8866  0
+90  97.3205  0
+89.2659  97.7241  0
+88.5156  98.0965  0
+87.7503  98.4373  0
+86.9714  98.7456  0
+86.1803  99.0211  0
+85.3784  99.2633  0
+84.567  99.4716  0
+83.7476  99.6457  0
+82.9217  99.7854  0
+82.0906  99.8904  0
+81.2558  99.9605  0
+80.4188  99.9956  0
+79.5812  99.9956  0
+78.7442  99.9605  0
+77.9094  99.8904  0
+77.0783  99.7854  0
+76.2524  99.6457  0
+75.433  99.4716  0
+74.6216  99.2633  0
+73.8197  99.0211  0
+73.0286  98.7456  0
+72.2497  98.4373  0
+71.4844  98.0965  0
+70.7341  97.7241  0
+70  97.3205  0
+69.2835  96.8866  0
+68.5857  96.423  0
+67.908  95.9306  0
+67.2515  95.4103  0
+66.6174  94.8629  0
+66.0067  94.2895  0
+65.4206  93.6909  0
+64.8601  93.0684  0
+64.3261  92.423  0
+63.8197  91.7557  0
+63.3416  91.0678  0
+62.8927  90.3605  0
+62.4739  89.6351  0
+62.0858  88.8927  0
+61.7291  88.1347  0
+61.4045  87.3625  0
+61.1125  86.5773  0
+60.8536  85.7806  0
+60.6283  84.9738  0
+60.437  84.1582  0
+60.2801  83.3354  0
+60.1577  82.5067  0
+60.0701  81.6736  0
+60.0175  80.8375  0
+60  80  0
+60.0175  79.1625  0
+60.0701  78.3264  0
+60.1577  77.4933  0
+60.2801  76.6646  0
+60.437  75.8418  0
+60.6283  75.0262  0
+60.8536  74.2194  0
+61.1125  73.4227  0
+61.4045  72.6375  0
+61.7291  71.8653  0
+62.0858  71.1073  0
+62.4739  70.3649  0
+62.8927  69.6395  0
+63.3416  68.9322  0
+63.8197  68.2443  0
+64.3261  67.577  0
+64.8601  66.9316  0
+65.4206  66.3091  0
+66.0067  65.7105  0
+66.6174  65.1371  0
+67.2515  64.5897  0
+67.908  64.0694  0
+68.5857  63.577  0
+69.2835  63.1134  0
+70  62.6795  0
+70.7341  62.2759  0
+71.4844  61.9035  0
+72.2497  61.5627  0
+73.0286  61.2544  0
+73.8197  60.9789  0
+74.6216  60.7367  0
+75.433  60.5284  0
+76.2524  60.3543  0
+77.0783  60.2146  0
+77.9094  60.1096  0
+78.7442  60.0395  0
+79.5812  60.0044  0
+80.4188  60.0044  0
+81.2558  60.0395  0
+82.0906  60.1096  0
+82.9217  60.2146  0
+83.7476  60.3543  0
+84.567  60.5284  0
+85.3784  60.7367  0
+86.1803  60.9789  0
+86.9714  61.2544  0
+87.7503  61.5627  0
+88.5156  61.9035  0
+89.2659  62.2759  0
+90  62.6795  0
+90.7165  63.1134  0
+91.4143  63.577  0
+92.092  64.0694  0
+92.7485  64.5897  0
+93.3826  65.1371  0
+93.9933  65.7105  0
+94.5794  66.3091  0
+95.1399  66.9316  0
+95.6739  67.577  0
+96.1803  68.2443  0
+96.6584  68.9322  0
+97.1073  69.6395  0
+97.5261  70.3649  0
+97.9142  71.1073  0
+98.2709  71.8653  0
+98.5955  72.6375  0
+98.8875  73.4227  0
+99.1464  74.2194  0
+99.3717  75.0262  0
+99.563  75.8418  0
+99.7199  76.6646  0
+99.8423  77.4933  0
+99.9299  78.3264  0
+99.9825  79.1625  0
+1  2  1  
+2  3  2  
+3  4  3  
+4  5  4  
+5  6  5  
+6  7  6  
+7  8  7  
+8  9  8  
+9  10  9  
+10  11  10  
+11  12  11  
+12  13  12  
+13  14  13  
+14  15  14  
+15  16  15  
+16  17  16  
+17  18  17  
+18  19  18  
+19  20  19  
+20  21  20  
+21  22  21  
+22  23  22  
+23  24  23  
+24  25  24  
+25  26  25  
+26  27  26  
+27  28  27  
+28  29  28  
+29  30  29  
+30  31  30  
+31  32  31  
+32  33  32  
+33  34  33  
+34  35  34  
+35  36  35  
+36  37  36  
+37  38  37  
+38  39  38  
+39  40  39  
+40  41  40  
+41  42  41  
+42  43  42  
+43  44  43  
+44  45  44  
+45  46  45  
+46  47  46  
+47  48  47  
+48  49  48  
+49  50  49  
+50  51  50  
+51  52  51  
+52  53  52  
+53  54  53  
+54  55  54  
+55  56  55  
+56  57  56  
+57  58  57  
+58  59  58  
+59  60  59  
+60  61  60  
+61  62  61  
+62  63  62  
+63  64  63  
+64  65  64  
+65  66  65  
+66  67  66  
+67  68  67  
+68  69  68  
+69  70  69  
+70  71  70  
+71  72  71  
+72  73  72  
+73  74  73  
+74  75  74  
+75  76  75  
+76  77  76  
+77  78  77  
+78  79  78  
+79  80  79  
+80  81  80  
+81  82  81  
+82  83  82  
+83  84  83  
+84  85  84  
+85  86  85  
+86  87  86  
+87  88  87  
+88  89  88  
+89  90  89  
+90  91  90  
+91  92  91  
+92  93  92  
+93  94  93  
+94  95  94  
+95  96  95  
+96  97  96  
+97  98  97  
+98  99  98  
+99  100  99  
+100  101  100  
+101  102  101  
+102  103  102  
+103  104  103  
+104  105  104  
+105  106  105  
+106  107  106  
+107  108  107  
+108  109  108  
+109  110  109  
+110  111  110  
+111  112  111  
+112  113  112  
+113  114  113  
+114  115  114  
+115  116  115  
+116  117  116  
+117  118  117  
+118  119  118  
+119  120  119  
+120  121  120  
+121  122  121  
+122  123  122  
+123  124  123  
+124  125  124  
+125  126  125  
+126  127  126  
+127  128  127  
+128  129  128  
+129  130  129  
+130  131  130  
+131  132  131  
+132  133  132  
+133  134  133  
+134  135  134  
+135  136  135  
+136  137  136  
+137  138  137  
+138  139  138  
+139  140  139  
+140  141  140  
+141  142  141  
+142  143  142  
+143  144  143  
+144  145  144  
+145  146  145  
+146  147  146  
+147  148  147  
+148  149  148  
+149  150  149  
+150  1  150  
diff --git a/phenglei/tutorials/LICENSE b/phenglei/tutorials/LICENSE
new file mode 100644
index 0000000..1d80ac3
--- /dev/null
+++ b/phenglei/tutorials/LICENSE
@@ -0,0 +1,319 @@
+GNU GENERAL PUBLIC LICENSE
+
+Version 2, June 1991
+
+Copyright (C) 1989, 1991 Free Software Foundation, Inc. 
+
+51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA
+
+Everyone is permitted to copy and distribute verbatim copies of this license
+document, but changing it is not allowed.
+
+Preamble
+
+The licenses for most software are designed to take away your freedom to share
+and change it. By contrast, the GNU General Public License is intended to
+guarantee your freedom to share and change free software--to make sure the
+software is free for all its users. This General Public License applies to
+most of the Free Software Foundation's software and to any other program whose
+authors commit to using it. (Some other Free Software Foundation software
+is covered by the GNU Lesser General Public License instead.) You can apply
+it to your programs, too.
+
+When we speak of free software, we are referring to freedom, not price. Our
+General Public Licenses are designed to make sure that you have the freedom
+to distribute copies of free software (and charge for this service if you
+wish), that you receive source code or can get it if you want it, that you
+can change the software or use pieces of it in new free programs; and that
+you know you can do these things.
+
+To protect your rights, we need to make restrictions that forbid anyone to
+deny you these rights or to ask you to surrender the rights. These restrictions
+translate to certain responsibilities for you if you distribute copies of
+the software, or if you modify it.
+
+For example, if you distribute copies of such a program, whether gratis or
+for a fee, you must give the recipients all the rights that you have. You
+must make sure that they, too, receive or can get the source code. And you
+must show them these terms so they know their rights.
+
+We protect your rights with two steps: (1) copyright the software, and (2)
+offer you this license which gives you legal permission to copy, distribute
+and/or modify the software.
+
+Also, for each author's protection and ours, we want to make certain that
+everyone understands that there is no warranty for this free software. If
+the software is modified by someone else and passed on, we want its recipients
+to know that what they have is not the original, so that any problems introduced
+by others will not reflect on the original authors' reputations.
+
+Finally, any free program is threatened constantly by software patents. We
+wish to avoid the danger that redistributors of a free program will individually
+obtain patent licenses, in effect making the program proprietary. To prevent
+this, we have made it clear that any patent must be licensed for everyone's
+free use or not licensed at all.
+
+The precise terms and conditions for copying, distribution and modification
+follow.
+
+TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
+
+0. This License applies to any program or other work which contains a notice
+placed by the copyright holder saying it may be distributed under the terms
+of this General Public License. The "Program", below, refers to any such program
+or work, and a "work based on the Program" means either the Program or any
+derivative work under copyright law: that is to say, a work containing the
+Program or a portion of it, either verbatim or with modifications and/or translated
+into another language. (Hereinafter, translation is included without limitation
+in the term "modification".) Each licensee is addressed as "you".
+
+Activities other than copying, distribution and modification are not covered
+by this License; they are outside its scope. The act of running the Program
+is not restricted, and the output from the Program is covered only if its
+contents constitute a work based on the Program (independent of having been
+made by running the Program). Whether that is true depends on what the Program
+does.
+
+1. You may copy and distribute verbatim copies of the Program's source code
+as you receive it, in any medium, provided that you conspicuously and appropriately
+publish on each copy an appropriate copyright notice and disclaimer of warranty;
+keep intact all the notices that refer to this License and to the absence
+of any warranty; and give any other recipients of the Program a copy of this
+License along with the Program.
+
+You may charge a fee for the physical act of transferring a copy, and you
+may at your option offer warranty protection in exchange for a fee.
+
+2. You may modify your copy or copies of the Program or any portion of it,
+thus forming a work based on the Program, and copy and distribute such modifications
+or work under the terms of Section 1 above, provided that you also meet all
+of these conditions:
+
+a) You must cause the modified files to carry prominent notices stating that
+you changed the files and the date of any change.
+
+b) You must cause any work that you distribute or publish, that in whole or
+in part contains or is derived from the Program or any part thereof, to be
+licensed as a whole at no charge to all third parties under the terms of this
+License.
+
+c) If the modified program normally reads commands interactively when run,
+you must cause it, when started running for such interactive use in the most
+ordinary way, to print or display an announcement including an appropriate
+copyright notice and a notice that there is no warranty (or else, saying that
+you provide a warranty) and that users may redistribute the program under
+these conditions, and telling the user how to view a copy of this License.
+(Exception: if the Program itself is interactive but does not normally print
+such an announcement, your work based on the Program is not required to print
+an announcement.)
+
+These requirements apply to the modified work as a whole. If identifiable
+sections of that work are not derived from the Program, and can be reasonably
+considered independent and separate works in themselves, then this License,
+and its terms, do not apply to those sections when you distribute them as
+separate works. But when you distribute the same sections as part of a whole
+which is a work based on the Program, the distribution of the whole must be
+on the terms of this License, whose permissions for other licensees extend
+to the entire whole, and thus to each and every part regardless of who wrote
+it.
+
+Thus, it is not the intent of this section to claim rights or contest your
+rights to work written entirely by you; rather, the intent is to exercise
+the right to control the distribution of derivative or collective works based
+on the Program.
+
+In addition, mere aggregation of another work not based on the Program with
+the Program (or with a work based on the Program) on a volume of a storage
+or distribution medium does not bring the other work under the scope of this
+License.
+
+3. You may copy and distribute the Program (or a work based on it, under Section
+2) in object code or executable form under the terms of Sections 1 and 2 above
+provided that you also do one of the following:
+
+a) Accompany it with the complete corresponding machine-readable source code,
+which must be distributed under the terms of Sections 1 and 2 above on a medium
+customarily used for software interchange; or,
+
+b) Accompany it with a written offer, valid for at least three years, to give
+any third party, for a charge no more than your cost of physically performing
+source distribution, a complete machine-readable copy of the corresponding
+source code, to be distributed under the terms of Sections 1 and 2 above on
+a medium customarily used for software interchange; or,
+
+c) Accompany it with the information you received as to the offer to distribute
+corresponding source code. (This alternative is allowed only for noncommercial
+distribution and only if you received the program in object code or executable
+form with such an offer, in accord with Subsection b above.)
+
+The source code for a work means the preferred form of the work for making
+modifications to it. For an executable work, complete source code means all
+the source code for all modules it contains, plus any associated interface
+definition files, plus the scripts used to control compilation and installation
+of the executable. However, as a special exception, the source code distributed
+need not include anything that is normally distributed (in either source or
+binary form) with the major components (compiler, kernel, and so on) of the
+operating system on which the executable runs, unless that component itself
+accompanies the executable.
+
+If distribution of executable or object code is made by offering access to
+copy from a designated place, then offering equivalent access to copy the
+source code from the same place counts as distribution of the source code,
+even though third parties are not compelled to copy the source along with
+the object code.
+
+4. You may not copy, modify, sublicense, or distribute the Program except
+as expressly provided under this License. Any attempt otherwise to copy, modify,
+sublicense or distribute the Program is void, and will automatically terminate
+your rights under this License. However, parties who have received copies,
+or rights, from you under this License will not have their licenses terminated
+so long as such parties remain in full compliance.
+
+5. You are not required to accept this License, since you have not signed
+it. However, nothing else grants you permission to modify or distribute the
+Program or its derivative works. These actions are prohibited by law if you
+do not accept this License. Therefore, by modifying or distributing the Program
+(or any work based on the Program), you indicate your acceptance of this License
+to do so, and all its terms and conditions for copying, distributing or modifying
+the Program or works based on it.
+
+6. Each time you redistribute the Program (or any work based on the Program),
+the recipient automatically receives a license from the original licensor
+to copy, distribute or modify the Program subject to these terms and conditions.
+You may not impose any further restrictions on the recipients' exercise of
+the rights granted herein. You are not responsible for enforcing compliance
+by third parties to this License.
+
+7. If, as a consequence of a court judgment or allegation of patent infringement
+or for any other reason (not limited to patent issues), conditions are imposed
+on you (whether by court order, agreement or otherwise) that contradict the
+conditions of this License, they do not excuse you from the conditions of
+this License. If you cannot distribute so as to satisfy simultaneously your
+obligations under this License and any other pertinent obligations, then as
+a consequence you may not distribute the Program at all. For example, if a
+patent license would not permit royalty-free redistribution of the Program
+by all those who receive copies directly or indirectly through you, then the
+only way you could satisfy both it and this License would be to refrain entirely
+from distribution of the Program.
+
+If any portion of this section is held invalid or unenforceable under any
+particular circumstance, the balance of the section is intended to apply and
+the section as a whole is intended to apply in other circumstances.
+
+It is not the purpose of this section to induce you to infringe any patents
+or other property right claims or to contest validity of any such claims;
+this section has the sole purpose of protecting the integrity of the free
+software distribution system, which is implemented by public license practices.
+Many people have made generous contributions to the wide range of software
+distributed through that system in reliance on consistent application of that
+system; it is up to the author/donor to decide if he or she is willing to
+distribute software through any other system and a licensee cannot impose
+that choice.
+
+This section is intended to make thoroughly clear what is believed to be a
+consequence of the rest of this License.
+
+8. If the distribution and/or use of the Program is restricted in certain
+countries either by patents or by copyrighted interfaces, the original copyright
+holder who places the Program under this License may add an explicit geographical
+distribution limitation excluding those countries, so that distribution is
+permitted only in or among countries not thus excluded. In such case, this
+License incorporates the limitation as if written in the body of this License.
+
+9. The Free Software Foundation may publish revised and/or new versions of
+the General Public License from time to time. Such new versions will be similar
+in spirit to the present version, but may differ in detail to address new
+problems or concerns.
+
+Each version is given a distinguishing version number. If the Program specifies
+a version number of this License which applies to it and "any later version",
+you have the option of following the terms and conditions either of that version
+or of any later version published by the Free Software Foundation. If the
+Program does not specify a version number of this License, you may choose
+any version ever published by the Free Software Foundation.
+
+10. If you wish to incorporate parts of the Program into other free programs
+whose distribution conditions are different, write to the author to ask for
+permission. For software which is copyrighted by the Free Software Foundation,
+write to the Free Software Foundation; we sometimes make exceptions for this.
+Our decision will be guided by the two goals of preserving the free status
+of all derivatives of our free software and of promoting the sharing and reuse
+of software generally.
+
+   NO WARRANTY
+
+11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY FOR
+THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN OTHERWISE
+STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM
+"AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
+FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE
+OF THE PROGRAM IS WITH YOU. SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME
+THE COST OF ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
+
+12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR REDISTRIBUTE
+THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY
+GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE
+OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF DATA
+OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES
+OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS), EVEN IF SUCH
+HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.
+END OF TERMS AND CONDITIONS
+
+How to Apply These Terms to Your New Programs
+
+If you develop a new program, and you want it to be of the greatest possible
+use to the public, the best way to achieve this is to make it free software
+which everyone can redistribute and change under these terms.
+
+To do so, attach the following notices to the program. It is safest to attach
+them to the start of each source file to most effectively convey the exclusion
+of warranty; and each file should have at least the "copyright" line and a
+pointer to where the full notice is found.
+
+<one line to give the program's name and an idea of what it does.>
+
+Copyright (C) <yyyy> <name of author>
+
+This program is free software; you can redistribute it and/or modify it under
+the terms of the GNU General Public License as published by the Free Software
+Foundation; either version 2 of the License, or (at your option) any later
+version.
+
+This program is distributed in the hope that it will be useful, but WITHOUT
+ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License along with
+this program; if not, write to the Free Software Foundation, Inc., 51 Franklin
+Street, Fifth Floor, Boston, MA 02110-1301, USA.
+
+Also add information on how to contact you by electronic and paper mail.
+
+If the program is interactive, make it output a short notice like this when
+it starts in an interactive mode:
+
+Gnomovision version 69, Copyright (C) year name of author Gnomovision comes
+with ABSOLUTELY NO WARRANTY; for details type `show w'. This is free software,
+and you are welcome to redistribute it under certain conditions; type `show
+c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License. Of course, the commands you use may be
+called something other than `show w' and `show c'; they could even be mouse-clicks
+or menu items--whatever suits your program.
+
+You should also get your employer (if you work as a programmer) or your school,
+if any, to sign a "copyright disclaimer" for the program, if necessary. Here
+is a sample; alter the names:
+
+Yoyodyne, Inc., hereby disclaims all copyright interest in the program `Gnomovision'
+(which makes passes at compilers) written by James Hacker.
+
+<signature of Ty Coon>, 1 April 1989 Ty Coon, President of Vice This General
+Public License does not permit incorporating your program into proprietary
+programs. If your program is a subroutine library, you may consider it more
+useful to permit linking proprietary applications with the library. If this
+is what you want to do, use the GNU Lesser General Public License instead
+of this License.
diff --git a/phenglei/tutorials/README.md b/phenglei/tutorials/README.md
new file mode 100644
index 0000000..08fcb76
--- /dev/null
+++ b/phenglei/tutorials/README.md
@@ -0,0 +1,218 @@
+# 国家数值风洞风雷软件算例库
+
+<img src="logo.png" alt="PHengLEI" style="zoom: 40%;float:left" />
+
+<img src="build-passing.png" alt="build pass" style="inline-block;zoom:75%" />  <img src="license.png" alt="license" style="inline-block;zoom:75%"/>  <img src="version.png" alt="version" style="inline-block;zoom:75%" />
+
+国家数值风洞风雷软件算例库，按类别分类，如：结构、非结构、混合、高阶、LES、重叠、非平衡等，具体包含Plate、Cylinder、NACA0012、Rae2822、30p30n、M6、CHNT、Sphere、Electre、DoubleEllipse等多种模型算例，持续更新中。 
+
+**重要提示：由于本算例库参数的版本与代码的版本可能不一致，导致运行风雷软件某版本时可能会报找不到数据的情况，如屏幕出现“This data does not exist......”。解决办法：用代码文件夹phenglei/example/bin里面的cfd_para.hypara替换算例文件夹bin里面的cfd_para.hypara。** 
+
+## 导航
+
+- [算例中英文对照表](#算例中英文对照表)
+- [算例库使用说明](#算例库使用说明)
+- [License](#license)
+
+## 算例中英文对照表
+
+A 结构
+
+| <span style="display:inline-block;width: 400px"> 中文 </span> | <span style="display:inline-block;width: 380px"> 英文 </span> |
+| :----------------------------------------------------------- | :----------------------------------------------------------- |
+| 二维结构低速层流平板                                         | A01_TwoD_Plate_Laminar_Struct_1CPU                           |
+| 二维结构高速层流平板                                         | A02_TwoD_Plate_Laminar_Ma5_Struct_1CPU                       |
+| 二维结构低速湍流平板                                         | A03_TwoD_plate_SST_LowMach_Struct                            |
+| 二维结构高速湍流平板                                         | A04_TwoD_Plate_SST_Ma5_Struct_1CPU                           |
+| 二维结构圆柱高速绕流                                         | A05_TwoD_Cylinder_Laminar_Ma8d03_Struct                      |
+| 三维结构NACA0012翼型低速绕流                                 | A06_ThreeD_NACA0012_SA_Struct_4CPU                           |
+| 二维结构Rae2822翼型跨声速绕流                                | A07_TwoD_Rae2822_SST_Struct_4CPU                             |
+| 二维结构30p30n翼型低速绕流                                   | A08_TwoD_30p30n_SST_Struct_4CPU                              |
+| 三维结构M6机翼跨声速绕流                                     | A09_ThreeD_M6_SST_Struct_MG2_4CPU                            |
+| 三维结构客机标模模拟                                         | A10_ThreeD_CHNT_SST_Struct_16CPU                             |
+| 三维结构球头高速绕流                                         | A11_ThreeD_Sphere_Laminar_Ma10_Struct                        |
+| 三维结构高超声速双椭球模拟                                   | A12_ThreeD_DoubleEllipse_Laminar_Struct_4CPU                 |
+| 二维结构低速后台阶（压力出口）                               | A13_TwoD_BackwardStep_PressureOutlet_SA_Struct_4CPU          |
+| 二维结构低速湍流平板（压力出口，总温总压入口）               | A14_TwoD_Plate_TotalPressTempBC_SA_Struct_4CPU               |
+| 三维结构激波干扰（周期边界）                                 | A15_ThreeD_ShockWave_PeriodicBoundary_SA_Struct_4CPU         |
+| 二维结构NLR7301翼型低速绕流                                  | A16_TwoD_NLR7301_SST_Struct_4CPU                             |
+| 三维结构16度压缩拐角模拟                                     | A17_ThreeD_Compression_Ramp-16_SA_Struct                     |
+| 三维结构空心圆柱裙                                           | A18_ThreeD_Hollow_Cylinder_Flare_Laminar_Struct_16CPU        |
+| 三维结构钝锥高速流动                                         | A19_ThreeD_BluntCone_Ma10d6_Laminar_Struct_64CPU             |
+| 三维结构类航天飞机                                           | A20_ThreeD_OV102_Ma20_Laminar_H50_Struct_24CPU               |
+| 三维结构激波干扰超声速层流平板                               | A21_ThreeD_ShockwaveInteractionPlate_Ma2_Laminar<br />_UDB_Struct_1CPU |
+| 三维结构弹体喷流（自定义边界）                               | A22_ThreeD_Jet_Ma3d33_SST_Struct_8CPU                        |
+| 二维结构S-K低速平板转捩模拟                                  | A23_TwoD_Plate_S-KSR_SST_Struct_4CPU                         |
+| 二维结构30p30n翼型低速绕流(Matrix LUSGS)                     | A24_TwoD_30p30n_SA_MatrixLUSGS_Struct_4CPU                   |
+| 二维结构低速湍流平板(Matrix LUSGS)                           | A25_TwoD_Plate_SST_LowMach_MatrixLUSGS_Struct_1CPU           |
+| 二维结构Rae2822翼型跨声速绕流(Matrix LUSGS)                  | A26_TwoD_Rae2822_SA_MatrixLUSGS_Struct_4CPU                  |
+| 二维结构30p30n翼型低速绕流(熵修正)                           | A27_TwoD_30p30n_SA_Entropyfix6_Struct_4CPU                   |
+| 二维结构圆柱超声速绕流(熵修正)                               | A28_TwoD_Cylinder_Inv_Ma3d0_Entropyfix6_Struct_1CPU          |
+| 二维结构Rae2822翼型跨声速绕流(熵修正)                        | A29_TwoD_Rae2822_SA_Entropyfix6_Struct_4CPU                  |
+| 二维结构圆柱高超声速绕流(熵修正)                             | A30_TwoD_Cylinder_Inv_Ma10d0_Entropyfix6_Struct_1CPU         |
+| 三维结构CHNT跨声速流动(Matrix LUSGS)                         | A31_ThreeD_CHNT_SST_MatrixLUSGS_Struct_256CPU                |
+| 二维结构NACA0012翼型低速绕流（低速预处理）                   | A32_TwoD_NACA0012_Inv_Ma0d2_Precondition_Struct_1CPU         |
+
+B 非结构
+
+| <span style="display:inline-block;width: 400px"> 中文 </span> | <span style="display:inline-block;width: 380px"> 英文 </span> |
+| :----------------------------------------------------------- | :----------------------------------------------------------- |
+| 二维非结构NACA0012低速绕流                                   | B01_TwoD_NACA0012_SA_Unstruct_1CPU                           |
+| 二维非结构NACA4412绕流                                       | B02_TwoD_NACA4412_SA_Unstruct_2CPU                           |
+| 二维非结构Rae2822翼型跨声速绕流                              | B03_TwoD_Rae2822_SA_Unstruct_1CPU                            |
+| 三维非结构DLR-F6模拟                                         | B04_ThreeD_DLR-F6_SA_Unstruct_60CPU                          |
+| 三维非结构类X38外形模拟                                      | B05_ThreeD_x38_Laminar_Unstruct_128CPU                       |
+| 三维非结构类轴对称外形模拟                                   | B06_ThreeD_Axisymmetric_SA_Unstruct_64CPU                    |
+| 三维非结构球头高速绕流                                       | B07_ThreeD_Sphere_Laminar_Unstruct_4CPU                      |
+| 二维非结构低速层流平板                                       | B08_TwoD_Plate_Laminar_Unstruct_1CPU                         |
+| 二维非结构低速湍流平板                                       | B09_TwoD_plate_SA_Unstruct_1CPU                              |
+| 三维非结构16度压缩拐角模拟                                   | B10_ThreeD_CompRamp-16_SA_Unstruct_1CPU                      |
+| 三维非结构DLR-GK01进气道模拟                                 | B11_ThreeD_DLR-GK01_Ma7_SA_Unstruct_8CPU                     |
+| 三维非结构高超声速双椭球模拟                                 | B12_ThreeD_DoubleEllipse_Laminar_Unstruct_4CPU               |
+| 三维非结构客机标模模拟                                       | B13_ThreeD_Chnt_SA_Unstruct_100CPU                           |
+| 三维非结构30p30n翼型低速绕流                                 | B14_TwoD_30p30n_SA_Unstruct_4CPU                             |
+| 二维非结构NLR7301翼型低速绕流                                | B15_TwoD_NLR7301_SA_Unstruct_4CPU                            |
+| 三维非结构空心圆柱裙                                         | B16_ThreeD_Hollow_Cylinder_Flare_Laminar_Unstruct_16CPU      |
+| 二维非结构S-K低速平板转捩模拟                                | B17_TwoD_Plate_S-KSR_SST_Unstruct_4CPU                       |
+| 三维非结构CRM-HL高升力外形模拟                               | B18_ThreeD_CRM-HL_Level-B_SA_Unstruct_1024CPU                |
+| 三维非结构TrapWing外形模拟                                   | B19_ThreeD_TrapWing_SA_AoA13_256CPU                          |
+| 二维非结构NACA0012低速绕流（Gmresh）                         | B20_TwoD_NACA0012_SA_Gmresh_Unstruct_1CPU                    |
+| 三维非结构球头高速绕流（Gmresh）                             | B21_ThreeD_Sphere_Laminar_Gmresh_Unstruct_1CPU               |
+| 三维非结构Rotor67转子叶片（多参考系）                        | B22_ThreeD_Rotor67_SngleZone_RotatingFrame_6CPU              |
+| 三维非结构Stage35（多参考系、掺混面）                        | B23_ThreeD_Stage35_MultiZone_MixingPlane_1CPU                |
+| 三维非结构Aachen 涡轮（周期边界）                            | B24_ThreeD_Aachen-row1_SngleZone_Periodicity_4CPU            |
+
+C 混合
+
+| <span style="display:inline-block;width: 335px"> 中文 </span> | <span style="display:inline-block;width: 380px"> 英文 </span> |
+| :------------------------- | :--------------------------------- |
+| 二维圆柱混合算例 | C01_TwoD_Cylinder_Laminar_Mix_4CPU |
+| 二维Rae2822混合算例 | C02_TwoD_Rae2822_SST_Mix_4CPU |
+| 三维M6混合算例 | C03_ThreeD_M6_SST_Mix_64CPU |
+| 三维F6混合算例 | C04_ThreeD_F6-WB_SST_Mix_256CPU |
+
+D 高阶
+
+| <span style="display:inline-block;width: 425px"> 中文 </span> | <span style="display:inline-block;width: 380px"> 英文 </span> |
+| :------------------------- | :--------------------------------- |
+| 二维结构高阶圆柱 | D01_TwoD_Cylinder_Laminar_HighOrder_Struct_1CPU |
+| 三维结构高阶双椭球 | D02_ThreeD_DoubleEllipse_Laminar_HighOrder_Struct_48CPU |
+| 二维WENN结构高阶30P30N翼型 | D03_TwoD_30P30N_SST_HighOrderWENN_Struct_6CPU |
+| 三维WENN结构高阶M6机翼 | D04_ThreeD_ONERA_M6_SST_HighOrderWENN_Struct_8CPU |
+| 三维WENN结构高阶双椭球 | D05_ThreeD_DoubleEllipse_Laminar_HighOrderWENN_Struct<br />_48CPU |
+
+E LES
+
+| <span style="display:inline-block;width: 345px"> 中文 </span> | <span style="display:inline-block;width: 380px"> 英文 </span> |
+| :------------------------- | :--------------------------------- |
+| 三维结构圆柱LES模拟 | E01_ThreeD_Cylinder_LES_Re3900_Struct_120CPU |
+| 三维非结构圆柱LES模拟 | E02_ThreeD_Cylinder_LES_Re3900_Unstruct_120CPU |
+| 三维结构NACA0012翼型LES模拟 | E03_ThreeD_NACA0012_LES_Struct_400CPU |
+
+F 重叠网格、动网格
+
+| <span style="display:inline-block;width: 430px"> 中文 </span> | <span style="display:inline-block;width: 380px"> 英文 </span> |
+| :------------------------- | :--------------------------------- |
+| 二维结构30p30n重叠网格装配 | F01_TwoD_30p30n_OversetGrid_SA_Struct_4CPU |
+| 三维结构多弹体重叠网格装配 | F02_ThreeD_duodan_OversetGrid_SA_Struct_8CPU |
+| 二维非结构双0012重叠网格装配 | F03_TwoD_Dual0012_OversetConfig_Unstruct_4CPU |
+| 二维非结构双0012重叠网格计算 | F04_TwoD_Dual0012_OversetGrid_InvisCal_Unstruct_4CPU |
+| 三维非结构AEDC吊舱分离重叠网格装配 | F05_ThreeD_AEDC_OversetConfig_Unstruct_8CPU |
+| 三维非结构AEDC吊舱分离非定常计算 | F06_ThreeD_AEDC_Separation_OversetGrid_Unsteady<br />_InvisCal_Unstruct_8CPU |
+| 二维结构NACA0012翼型俯仰振荡 | F07_TwoD_NACA0012_PitchingMovement_SA_Struct_4CPU |
+| 三维结构Finner弹体俯仰振荡 | F08_ThreeD_Finner_Laminar_Ma2d5_Struct_16CPU |
+| 鸟类扑翼网格变形（弹簧法） | F09_ThreeD_Brid_GridDeformationSPRING_Unstruct_1CPU |
+| 鸟类扑翼网格变形（RBF方法） | F10_ThreeD_Brid_GridDeformationRBF_Unstruct_1CPU |
+| 非结构三维M6机翼并行加密 | F11_ThreeD_M6_GridParallelRefine_Unstruct_4CPU |
+
+G 非平衡
+
+| <span style="display:inline-block;width: 440px"> 中文 </span> | <span style="display:inline-block;width: 380px"> 英文 </span> |
+| :-------------------------   | :--------------------------------- |
+| 二维结构圆柱化学非平衡       | G01_TwoD_Cylinder_Laminar_OneTemperMode_FCW_Struct |
+| 三维结构钝锥化学非平衡       | G02_ThreeD_Electre_Laminar_OneTemperMode_NCW_Struct |
+| 三维结构类返回舱化学非平衡    | G03_ |
+| 三维结构类航天飞机化学非平衡 | G04_ |
+| 二维非结构高速圆柱两气体组分预混 | G05_TwoD_Cylinder_N2-O2_Premixing-Unstruct_1CPU     |
+| 三维非结构高速球头两气体组分预混 | G06_ThreeD_Sphere_N2-O2_Premixing-Unstruct_1CPU |
+| 二维非结构管道喷流两气体组分预混 | G07_TwoD_Pipe_Air-CH4_Mixing-Unstruct_1CPU |
+| 二维储气罐泄漏非定常模拟 | G08_TwoD_TankLeak_NG_Multispecies_Unstruct_Unsteady<br />_4CPU |
+
+H 不可压
+
+| <span style="display:inline-block;width: 360px"> 中文 </span> | <span style="display:inline-block;width: 380px"> 英文 </span> |
+| :----------------------------------------------------------- | :----------------------------------------------------------- |
+| 二维后台阶流动                                               | H01_TwoD_BackStep_KE_UPWIND_4CPU                             |
+| 二维方腔驱动流                                               | H02_TwoD_Cavitity_Re100_UPWIND_4CPU                          |
+| 二维两组分混合气体模拟                                       | H03_TwoD_GasLeakage_Steady_UPWIND_4CPU                       |
+| NACA0012翼型低速绕流PISO方法模拟                             | H04_TwoD_NACA0012_PISO_UPWIND_4CPU                           |
+| NACA0012翼型高速流动SIMPLEC方法模拟                          | H05_TwoD_NACA0012_SIMPLEC_4CPU                               |
+| 二维自然对流模拟                                             | H06_TwoD_NaturalConvection_CDS_4CPU                          |
+| 二维湍流平板模拟                                             | H07_TwoD_Plate_Turb_UPWIND_4CPU                              |
+| 二维湍流多组分混合气体模拟                                   | H08_TwoD_Species_Turb_UPWIND_4CPU                            |
+| 三维小车湍流模拟                                             | H09_ThreeD_Car_Turb_UPWIND_4CPU                              |
+| 三维CHNT模型层流模拟                                         | H10_ThreeD_Chnt_Lam_UPWIND_4CPU                              |
+| 三维多组分泄漏非定常流动模拟                                 | H11_ThreeD_GasLeakage_Unsteady_UPWIND_4CPU                   |
+| 三维多组分扩散非定常流动模拟                                 | H12_ThreeD_Species_Transient_UPWIND_4CPU                     |
+| 三维半艇绕流模拟                                             | H13_ThreeD_SUBOFF_UPWIND_4CPU                                |
+
+L LBM
+
+| <span style="display:inline-block;width: 355px"> 中文 </span> | <span style="display:inline-block;width: 380px"> 英文 </span> |
+| :----------------------------------------------------------- | :----------------------------------------------------------- |
+| 二维方腔流动（MPI）                                          | L01_TwoD_Cavity_BGK_MPI_1CPU                                 |
+| 三维槽道湍流（MPI）                                          | L02_ThreeD_Channel_Turb_BGK_MPI_32CPU                        |
+| 三维泊肃叶流动（MPI）                                        | L03_ThreeD_Poiseuille_MRT_MPI_4CPU                           |
+| 三维圆球绕流（MPI）                                          | L04_ThreeD_Spoiler_BGK_MPI_8CPU                              |
+| 二维方腔流动（OMP）                                          | L05_TwoD_Cavity_BGK_OMP_1CPU                                 |
+| 二维圆柱绕流（OMP）                                          | L06_TwoD_Cylinder_BGK_OMP_4CPU                               |
+
+
+
+X 用户分享算例
+
+| <span style="display:inline-block;width: 355px"> 中文 </span> | <span style="display:inline-block;width: 380px"> 英文 </span> |
+| :----------------------------------------------------------- | :----------------------------------------------------------- |
+| 三维结构SEEB-ALR旋成体算例                                   | X01_ThreeD_SEEBALR_Euler_Struct_8CPU                         |
+
+
+
+Y 天河分支GPU算例
+
+| <span style="display:inline-block;width: 355px"> 中文 </span> | <span style="display:inline-block;width: 380px"> 英文 </span> |
+| :----------------------------------------------------------- | :----------------------------------------------------------- |
+| 三维非结构客机标模模拟                                       | Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH                        |
+
+
+
+Z 其它
+
+| <span style="display:inline-block;width: 420px"> 中文 </span> | <span style="display:inline-block;width: 380px"> 英文 </span> |
+| :------------------------- | :--------------------------------- |
+| 二维结构30p30n点监控算例 | Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU |
+| 三维非结构圆柱线监控算例 | Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU |
+
+
+
+## 算例库使用说明
+
+本算例库配套国家数值风洞风雷软件使用，使用时应切换到对应的版本。
+
+具体使用说明如下：
+
+```shell
+# 1、查看历史版本号，记住你需要的版本hash值
+# 如： f3ef592
+git log
+
+# 2、使用第一步得到的hash值，切换到对应版本
+git reset --hard f3ef592
+
+# 3、使用国家数值风洞风雷软件进行测试和计算
+```
+
+
+
+## License
+
+[GPL](LICENSE)
\ No newline at end of file
diff --git a/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/bin/cfd_para.hypara b/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/bin/cfd_para_supersonic.hypara b/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/bin/cfd_para_supersonic.hypara
new file mode 100644
index 0000000..c3df0b6
--- /dev/null
+++ b/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/bin/cfd_para_supersonic.hypara
@@ -0,0 +1,190 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 20000;
+
+int intervalStepFlow  = 2000;
+int intervalStepPlot  = 2000;
+int intervalStepForce = 100;
+int intervalStepRes   = 10;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 1.600;
+double attackd       = 0.00;
+double angleSlide    = 0.00;
+
+double wallTemperature = -1.0;
+
+//int inflowParaType = 0;
+//double refReNumber = 1.0e5;
+//double refDimensionalTemperature = 288.15;
+
+int inflowParaType = 1;
+double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+int    viscousType    = 0;
+string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+//int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "minmod", "3rd_minmod_smooth".
+
+string inviscidSchemeName = "ausmpw";
+string str_limiter_name   = "minmod";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+//string uns_scheme_name  = "ausmpwplus";
+//string uns_limiter_name = "minmod";
+//double venkatCoeff      = 0.5;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// ktmax: The lower the value, the more robustness, 1.0e5 - 1.0e10.
+
+int iunsteady = 0;
+
+double CFLEnd = 2.0;
+
+double ktmax  = 1.0e10;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile   = "./grid/seeb__8.fts";
+int plotFieldType = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables  = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth      = 0;
+int limitVariables = 0;
+int limitVector    = 1;
diff --git a/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/bin/grid_para.hypara b/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..64f2ea1
--- /dev/null
+++ b/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/seeb.cgns";
+string out_gfile  = "./grid/seeb.fts";
diff --git a/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/bin/key.hypara b/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/bin/key.hypara
new file mode 100644
index 0000000..82ad0a8
--- /dev/null
+++ b/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/bin/key.hypara
@@ -0,0 +1,55 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/bin/partition.hypara b/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/bin/partition.hypara
new file mode 100644
index 0000000..d0b2c67
--- /dev/null
+++ b/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 8;
+
+string original_grid_file  = "./grid/seeb.fts";
+string partition_grid_file = "./grid/seeb__8.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/grid/网格地址.txt b/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/算例说明.pdf b/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/算例说明.pdf
new file mode 100644
index 0000000..f510e54
Binary files /dev/null and b/phenglei/tutorials/X01_ThreeD_SEEBALR_Euler_Struct_8CPU/算例说明.pdf differ
diff --git a/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/boundary_condition.hypara b/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/boundary_condition.hypara
new file mode 100644
index 0000000..feb4669
--- /dev/null
+++ b/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/boundary_condition.hypara
@@ -0,0 +1,65 @@
+# Boundary Face Information of Grid ./grid/chn-t-unstructure.cgns
+# nBoundaryConditons : number of global boundary conditions.
+# bcName             : Boundary Condition Name.
+# bcType(in PHengLEI): Boundary Condition Type.
+
+# Account of how to set boundaryconditon.
+# string bcName = "Farfield";		  
+# {									  
+#   int bcType = 4;					  
+#   int inflowParaType = 1;			  
+#   double attackd = 0;				  
+#   double reynolds = 6.5e6;			  
+#   double reference_mach_number = 3.5;  
+#   double sideslipd = 0;				  
+# }									  
+
+int nBoundaryConditons = 8;
+string bcName = "body";
+{
+  int bcType = 2;
+}
+string bcName = "fairing";
+{
+  int bcType = 2;
+}
+string bcName = "htail";
+{
+  int bcType = 2;
+}
+string bcName = "nose";
+{
+  int bcType = 2;
+}
+string bcName = "vtail";
+{
+  int bcType = 2;
+}
+string bcName = "wing";
+{
+  int bcType = 2;
+}
+string bcName = "symm";
+{
+  int bcType = 3;
+}
+string bcName = "farfield";
+{
+  int bcType = 4;
+}
+
+# 'bcType' is defined as following:
+#    99: PERIODIC              	
+#    -2: WAKE                  	
+#    -1: INTERFACE             	
+#    0 : NO_BOUNDARY_CONDITION 	
+#    1 : EXTRAPOLATION         	
+#    2 : SOLID_SURFACE         	
+#    3 : SYMMETRY              	
+#    4 : FARFIELD              	
+#    5 : INFLOW                	
+#    6 : OUTFLOW               	
+#    52: PRESSURE_INLET		    
+#    62: PRESSURE_OUTLET		   	
+#    61: OUTFLOW_CONFINED      	
+#    7 : POLE						
diff --git a/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/cfd_para.hypara b/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/cfd_para_transonic.hypara b/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..e8c278e
--- /dev/null
+++ b/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/cfd_para_transonic.hypara
@@ -0,0 +1,203 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxsimustep: the max simulation step, don't care simulation is restart or not.
+// ndisk:       the step intervals for flow variables file 'flow.dat' saved.
+// nplotsave:   the step intervals for tecplot visual file 'tecflow.dat' saved.
+// nforcsave:   the step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// nressave:    the step intervals for residual 'res.dat' saved.
+
+int    maxsimustep  = 200000;
+
+int    ndisk        = 5000;
+int    nplotsave    = 5000;
+int    nforcsave    = 100;
+int    nressave     = 100;
+
+#########################################################################
+#                        		Inflow Parameter                        #
+#########################################################################
+// reference_mach_number:             Mach number per meter.
+// attackd:                           Angle of attack.
+// sideslipd:                         Angle of sideslip.
+// reynolds:                          Reynolds number, which is based unit length, unit of 1/m.
+// reference_temperature_dimensional: dimensional reference temperature, or the total temperature only for the experiment condition.
+// reference_pressure_dimensional:    dimensional reference pressure   , or the total pressure    only for the experiment condition.
+// inflowParaType: the type of inflow parameters.
+//                    0 - the nondimensional conditions.
+//                    1 - the flight conditions.
+//                    2 - the experiment conditions.
+// height:                            Fly height, unit of km.
+// gridUnit:       The unit of the grid.
+//                    0 - meter.
+//                    1 - decimeter,  1 dm = 0.1  m.
+//                    2 - centimeter, 1 cm = 0.01 m.
+//                    3 - millimeter, 1 mm = 0.001m.
+//                    4 - inch,       1 inch             = 0.0254m.
+//                    5 - foot,       1 foot = 12 inches = 0.3048m.
+//                    6 - yard,       1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceArea:            Reference length and area, independent to grid scale.
+// forceRefenenceX, forceRefenenceY, forceRefenenceZ:   Reference point, independent to grid scale.
+
+double reference_mach_number    = 0.78;
+double attackd                  = -1;
+double sideslipd                = 0.00;
+
+int    inflowParaType                       = 0;
+double reynolds                             = 17.03665e6;
+double reference_temperature_dimensional    = 288.15;
+
+//int    inflowParaType                     = 1;
+//double height                             = 0.001;
+
+//int    inflowParaType                     = 2;
+//double reference_temperature_dimensional  = 6051.024;         //the total temperature, T*(1+(gama0-1)*M*M/2).
+//double reference_pressure_dimensional     = 4.299696E09;      //the total pressure, p*(T0/T)^(gama0/(gama0-1)).
+
+int gridUnit        = 0;
+
+double forceRefenenceLength   = 0.1937;	// unit of meter.
+double forceRefenenceLengthSpanWise = 1.0;	// unit of meter.
+double forceRefenenceArea     = 0.12937;	// unit of meter^2
+double forceRefenenceX        = 0.66087;	// unit of meter. 
+double forceRefenenceY        = 0.0;	// unit of meter.
+double forceRefenenceZ        = 0.0;	// unit of meter.
+
+#*******************************************************************
+#			          Physical models   	                       *
+#*******************************************************************
+// iviscous:           Viscous model 
+//                         0 - Euler 
+//                         1 - Lamilar
+//                         3 - 1eq turbulent
+//                         4 - 2eq turbulent
+// visname :           Laminar or tubulent model
+//                         - "1eq-sa", when iviscous = 3
+//                         - "2eq-kw-menter-sst", when iviscous = 4
+// codeofDES :         Type of DES
+//                        0 - RANS (default);
+//                        1 - DES;
+//                        2 - DDES;
+//                        3 - IDDES;
+
+//int    iviscous        = 0;
+//string visname         = "Euler";
+
+//int    iviscous          = 1;
+//string visname           = "laminar";
+
+int    iviscous        = 3;
+string visname         = "1eq-sa";
+
+//int    iviscous        = 4;
+//string visname         = "2eq-kw-menter-sst";
+
+int     codeofDES        = 0;
+
+
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#			  Struct Solver		       	                           *
+#*******************************************************************
+// str_scheme_name:    Spatial discretisation scheme of struct grid
+//                     Using this when solve structered grid or hybrid.
+//                         - "roe", "vanleer", "ausm+up", "ausmpw"
+// str_limiter_name:   Limiter of struct grid
+//                         - "3rdsmooth",  "smooth"
+//                         - "nolim" - no limiter
+
+string str_scheme_name     = "roe";
+string str_limiter_name    = "vanalbada";
+
+#*******************************************************************
+#			  			UnStruct Solver                  		   *
+#*******************************************************************
+// uns_scheme_name:    Spatial discretisation scheme of Unstruct grid
+//                     Using this when solve Unstructered grid or hybrid.
+//                         - "vanleer",  "roe",  "steger",  "kfvs",  "lax_f",  "hlle"
+//                         - "ausm+",  "ausmdv",  "ausm+w",  "ausmpw",  "ausmpwplus"
+// uns_limiter_name:   Limiter of Unstruct grid
+//                         - "vencat", "barth"
+//                         - "1st", meaning accuracy of first-order.
+//                         - "nolim", no limiter.
+// eps_vencat:         Coefficient of vencat limiter, when uns_limiter_name = 'vencat'
+//					   The smaller the value, the more robust it is.
+
+string uns_scheme_name   = "roe";
+string uns_limiter_name  = "vencat";
+double eps_vencat        = 100;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady:           Steady or unsteady.
+//                          0 - steady
+//                          1 - unsteay 
+// cfl_end:             The CFL number, [0.1, 100]
+//						The bigger the value, the convergence faster but lower robustness.
+// sweeps:              Number of Sub-iteration of LU-SGS.
+//						    1  : is recommended for structured solver.
+//						    1-3: is recommended for unstructured solver.
+
+int    iunsteady     = 0;
+
+double cfl_end       = 0.1;
+
+int    sweeps        = 1;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// mgrid: 	   The number of Multi-Grid level
+//  			= 1 : Single level.
+//              > 1 : multi-level.
+// mgInitStep:  Number of step computing on coarse grid, during flow initialization.
+//				0~500 is suggested.  
+           
+//int mgrid          = 2;
+int mgrid          = 1;
+int mgInitStep     = 100;
+
+
+#########################################################################
+#                           File In or Out                              #
+#########################################################################
+// gridfile:       The partitioned Grid file path, using relative path,
+//				   which is relative to the working directory.
+//		IMPORTANT WARNNING: the file index should be ignored,
+// 		                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//					   			 Please use 'rae2822_hybrid2d__4.fts' here!
+// visual_field:   If dump out the whole field results to tecplot or not, 0/1.
+		
+string gridfile           = "./grid/grid_chnt-1_m_2065W__100.fts";
+int    visual_field       = 0;
+
+
+
+// ----------------  advanced Parameters, DO NOT care it -----------
+// nVisualVariables:  number of variables want to be dumped for tecplot visualization.
+// visualVariables :  variable types dumped, listed as following:
+//                      -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6)
+//                      -- viscosityLaminar(7), viscosityTurbulent(8)
+//                      -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12), strain_rate(13), Q_criteria(14)
+//                      -- Cp(15), timeStep(16), volume(17)
+//                      -- modeledTKE(18),modeleddissipationrate(19), SSTF1(20), SSTF2(21) 
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!.
+// Arriables order must from small to larger.
+int    nVisualVariables     = 8;
+int    visualVariables[8]  = 0, 1, 2, 3, 4, 5, 6, 15;
+
+// limit_mode:         limit model.
+//                         0 - limit only for pressure and denstiny, then get the min value
+//                         1 - limit for every variables, then get the min value
+// limiter_vec:         
+//			   			   0 - Each variable use the same limiter coefficient.
+//                         1 - Each variable use the respective limiter coefficients.
+// reconmeth:
+//                         0 - When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//                         1 - Q+, Q- use the min limiter coefficients of left and right cell.
+int reconmeth            = 1;
+int limit_mode           = 0;
+int limiter_vec          = 0;
diff --git a/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/grid_para.hypara b/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/grid_para.hypara
new file mode 100644
index 0000000..67d24c2
--- /dev/null
+++ b/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/grid_para.hypara
@@ -0,0 +1,30 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//               0 -- Unstructured grid.
+//               1 -- Structured grid.
+// axisup: Type of Cartisien coordinates system, used in grid conversion.
+//               1 -- Y upward. (default)
+//               2 -- Z upward.
+// from_gtype: Type of grid data type in grid conversion process.
+//              -1 -- MULTI_TYPE
+//               1 -- HyperFLOW( PHengLEI ), *.fts.
+//               2 -- CGNS, *.cgns.
+//               3 -- Plot3D type of structured grid, *.dat/*.grd.
+//               4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//               5 -- Fluent, *.cas/*.msh.
+//               6 -- Ustar, mgrid.in.
+//               7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//               8 -- GMSH, *.msh.    
+int gridtype            = 0;
+int axisup              = 2;
+int from_gtype          = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/grid_chnt-1_m_2065W.cgns";
+string out_gfile  = "./grid/grid_chnt-1_m_2065W.fts";
diff --git a/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/key.hypara b/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/key.hypara
new file mode 100644
index 0000000..0e90fe8
--- /dev/null
+++ b/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/key.hypara
@@ -0,0 +1,51 @@
+string title     = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE��DON NOT MODIFY THE FOWLLOWING LINE
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid: 2 or 3.
+// nparafile: the number of the parameter file.
+// nsimutask: simulation task type.
+//    0 -- CFD Solver of NS or Turbulation.
+//    1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//         Grid conversion: from other format to HyperFLOW format (.fts).
+//         Grid reconstruction: such as grid adaptation.
+//         Grid merging: merge two blocks into one block.
+//         Grid repairing: repair the original grid in order to remove the negative volume cells.
+//    2 -- Wall distance computation for turb-solver.
+//    3 -- Grid partition.
+//    4 -- Knowledge repository / examples of PHengLEI-API.
+int  ndim       = 3;
+int  nparafile  = 1;
+
+int    nsimutask        = 0;
+//string parafilename     = "./bin/cfd_para_subsonic.hypara";
+string parafilename    = "./bin/cfd_para_transonic.hypara";
+//string parafilename    = "./bin/cfd_para_supersonic.hypara";
+//string parafilename    = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename    =  "./bin/incompressible.hypara";
+
+//int    nsimutask      = 1;
+//string parafilename   = "./bin/grid_para.hypara";
+
+//int    nsimutask      = 2;
+//string parafilename   = "./bin/cfd_para.hypara";
+
+//int    nsimutask      = 3;
+//string parafilename   = "./bin/partition.hypara";
+
+//int    nsimutask      = 4;
+//string parafilename   = "./bin/repository.hypara";
+
+//int    nsimutask      = 5;
+//string parafilename   = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask      = 99;
+//string parafilename   = "./bin/post_processing.hypara";
+
+// ----------------  advanced Parameters, DO NOT care it -----------
+int    iovrlap              = 0;
+int  numberOfGridProcessor  = 0;
+// ATP read
+//@string parafilename1    = ""
+//@string parafilename2    = "";
diff --git a/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/partition.hypara b/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/partition.hypara
new file mode 100644
index 0000000..812dea5
--- /dev/null
+++ b/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/bin/partition.hypara
@@ -0,0 +1,20 @@
+// pgridtype: The grid type. 
+//               0 -- unstruct grid 
+//               1 -- struct grid 
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//			  Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//			           30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file     : original grid file that want to be divided(HyperFLOW/PHengLEI type, *.fts).
+// partition_grid_file    : target partition grid file(HyperFLOW/PHengLEI type, *.fts).
+
+int pgridtype    = 0; 
+int maxproc      = 100;
+
+string original_grid_file      = "./grid/grid_chnt-1_m_2065W.fts";
+string partition_grid_file     = "./grid/grid_chnt-1_m_2065W__100.fts";
+
+
+// Number of multi-grid levels, ONLY used for structured grid.
+//               1 -- single level, 2 -- 2 level, N -- N level, ..., et al.
+int numberOfMultigrid       = 1;
diff --git a/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/grid/网格地址.txt b/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/Y01_ThreeD_Chnt_SA_Unstruct_Branch_TH/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/acllite_logger.cpython-37.pyc b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/acllite_logger.cpython-37.pyc
new file mode 100644
index 0000000..e4daf0d
Binary files /dev/null and b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/acllite_logger.cpython-37.pyc differ
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/acllite_resource.cpython-37.pyc b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/acllite_resource.cpython-37.pyc
new file mode 100644
index 0000000..de94be5
Binary files /dev/null and b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/acllite_resource.cpython-37.pyc differ
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/acllite_utils.cpython-37.pyc b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/acllite_utils.cpython-37.pyc
new file mode 100644
index 0000000..81c1c7d
Binary files /dev/null and b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/acllite_utils.cpython-37.pyc differ
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/constant.cpython-37.pyc b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/constant.cpython-37.pyc
new file mode 100644
index 0000000..ca13c29
Binary files /dev/null and b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/constant.cpython-37.pyc differ
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/constants.cpython-37.pyc b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/constants.cpython-37.pyc
new file mode 100644
index 0000000..ad762c8
Binary files /dev/null and b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/constants.cpython-37.pyc differ
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/my_module.cpython-37.pyc b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/my_module.cpython-37.pyc
new file mode 100644
index 0000000..72cee85
Binary files /dev/null and b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/my_module.cpython-37.pyc differ
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/omaclitemodel.cpython-37.pyc b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/omaclitemodel.cpython-37.pyc
new file mode 100644
index 0000000..42542c6
Binary files /dev/null and b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/__pycache__/omaclitemodel.cpython-37.pyc differ
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/acllite_logger.py b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/acllite_logger.py
new file mode 100644
index 0000000..6df732e
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/acllite_logger.py
@@ -0,0 +1,97 @@
+# -*- coding: utf-8 -*-
+# @Author: sun
+# @Date:   2022-03-23 19:31:47
+# @Last Modified by:   sun
+# @Last Modified time: 2022-03-23 19:32:05
+import sys
+import os
+
+import acl
+
+_ACL_DEBUG = 0
+_ACL_INFO = 1
+_ACL_WARNING = 2
+_ACL_ERROR = 3
+
+def log_error(*log_msg):
+    """Recode error level log to file
+    Args:
+        *log_msg: format string and args list
+    """
+    log_str = [str(i) for i in log_msg]
+    log_str = "".join(log_str)
+
+    print(log_str)
+
+    caller_frame = sys._getframe().f_back
+    # caller file
+    filename = caller_frame.f_code.co_filename
+    # caller line no
+    line_no = caller_frame.f_lineno
+    # caller function
+    func_name = caller_frame.f_code.co_name
+
+    message = "[" + filename + ":" + str(line_no) + \
+              " " + func_name + "]" + log_str
+    acl.app_log(_ACL_ERROR, message)
+
+def log_warning(*log_msg):
+    """Recode warning level log to file
+    Args:
+        *log_msg: format string and args list
+    """
+    log_str = [str(i) for i in log_msg]
+    log_str = "[WARNING]"+"".join(log_str)
+    
+    print(log_str)
+
+    caller_frame = sys._getframe().f_back
+    # caller file
+    filename = caller_frame.f_code.co_filename
+    # caller line no
+    line_no = caller_frame.f_lineno
+    # caller function
+    func_name = caller_frame.f_code.co_name
+
+    message = "[" + filename + ":" + str(line_no) + \
+              " " + func_name + "]" + log_str
+    acl.app_log(_ACL_WARNING, message)
+
+def log_info(*log_msg):
+    """Recode info level log to file
+    Args:
+        *log_msg: format string and args list
+    """
+    log_str = [str(i) for i in log_msg]
+    log_str = "".join(log_str)
+    print(log_str)
+    caller_frame = sys._getframe().f_back
+    # caller file
+    filename = caller_frame.f_code.co_filename
+    # caller line no
+    line_no = caller_frame.f_lineno
+    # caller function
+    func_name = caller_frame.f_code.co_name
+
+    message = "[" + filename + ":" + str(line_no) + \
+              " " + func_name + "]" + log_str
+    acl.app_log(_ACL_INFO, message)
+
+def log_debug(*log_msg):
+    """Recode debug level log to file
+    Args:
+        *log_msg: format string and args list
+    """
+    log_str = [str(i) for i in log_msg]
+    log_str = "".join(log_str)
+    caller_frame = sys._getframe().f_back
+    # caller file
+    filename = caller_frame.f_code.co_filename
+    # caller line no
+    line_no = caller_frame.f_lineno
+    # caller function
+    func_name = caller_frame.f_code.co_name
+
+    message = "[" + filename + ":" + str(line_no) + \
+              " " + func_name + "]" + log_str
+    acl.app_log(_ACL_DEBUG, message)
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/acllite_resource.py b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/acllite_resource.py
new file mode 100644
index 0000000..810938a
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/acllite_resource.py
@@ -0,0 +1,116 @@
+# -*- coding: utf-8 -*-
+# @Author: sun
+# @Date:   2022-03-23 19:32:36
+# @Last Modified by:   sun
+# @Last Modified time: 2022-03-23 19:32:51
+"""
+Copyright (R) @huawei.com, all rights reserved
+-*- coding:utf-8 -*-
+CREATED:  2021-01-20 20:12:13
+MODIFIED: 2021-02-03 14:04:45
+"""
+import threading
+import acl
+
+import acllite_utils as utils
+
+REGISTER = 0
+UNREGISTER = 1
+
+class _ResourceList(object):
+    """Acl resources of current application
+    This class provide register inferace of acl resource, when application
+    exit, all register resource will release befor acl.rt.reset_device to
+    avoid program abnormal 
+    """
+    _instance_lock = threading.Lock()
+
+    def __init__(self):
+        self.resources = []
+
+    def __new__(cls, *args, **kwargs):
+        if not hasattr(_ResourceList, "_instance"):
+            with _ResourceList._instance_lock:
+                if not hasattr(_ResourceList, "_instance"):
+                    _ResourceList._instance = object.__new__(
+                        cls, *args, **kwargs)
+        return _ResourceList._instance
+
+    def register(self, resource):
+        """Resource register interface
+        Args:
+            resource: object with acl resource, the object must be has
+                      method destroy()
+        """
+        item = {"resource": resource, "status": REGISTER}
+        self.resources.append(item)
+
+    def unregister(self, resource):
+        """Resource unregister interface
+        If registered resource release by self and no need _ResourceList 
+        release, the resource object should unregister self
+        Args:
+            resource: registered resource
+        """
+        for item in self.resources:
+            if resource == item["resource"]:
+                item["status"] = UNREGISTER
+
+    def destroy(self):
+        """Destroy all register resource"""
+        for item in self.resources:
+            if item["status"] == REGISTER:
+                item["resource"].destroy()
+                item["status"] = UNREGISTER
+
+resource_list = _ResourceList()
+
+class AclLiteResource(object):
+    """
+    AclLiteResource
+    """
+
+    def __init__(self, device_id=0):
+        self.device_id = device_id
+        self.context = None
+        self.stream = None
+        self.run_mode = None
+
+    def init(self):
+        """
+        init resource
+        """
+        print("init resource stage:")
+        ret = acl.init()
+        print(f"resource ret:{ret}")
+        utils.check_ret("acl.init", ret)
+
+        ret = acl.rt.set_device(self.device_id)
+        utils.check_ret("acl.rt.set_device", ret)
+
+        self.context, ret = acl.rt.create_context(self.device_id)
+        utils.check_ret("acl.rt.create_context", ret)
+
+        self.stream, ret = acl.rt.create_stream()
+        utils.check_ret("acl.rt.create_stream", ret)
+
+        self.run_mode, ret = acl.rt.get_run_mode()
+        utils.check_ret("acl.rt.get_run_mode", ret)
+
+        print("Init resource success")
+
+    def __del__(self):
+        print("acl resource release all resource")
+        resource_list.destroy()
+        if self.stream:
+            print("acl resource release stream")
+            acl.rt.destroy_stream(self.stream)
+
+        if self.context:
+            print("acl resource release context")
+            acl.rt.destroy_context(self.context)
+
+        print("Reset acl device ", self.device_id)
+        acl.rt.reset_device(self.device_id)
+        acl.finalize()
+        print("Release acl resource success")
\ No newline at end of file
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/acllite_utils.py b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/acllite_utils.py
new file mode 100644
index 0000000..93c935b
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/acllite_utils.py
@@ -0,0 +1,252 @@
+# -*- coding: utf-8 -*-
+# @Author: sun
+# @Date:   2022-03-23 19:31:05
+# @Last Modified by:   sun
+# @Last Modified time: 2022-03-23 19:31:26
+import numpy as np
+import acl
+import constants as const
+from acllite_logger import log_error, log_info
+import time
+
+from functools import wraps
+DEBUG = True
+
+def check_ret(message, ret_int):
+    """Check int value is 0 or not
+    Args:
+        message: output log str
+        ret_int: check value that type is int
+    """
+    if ret_int != 0:
+        raise Exception("{} failed ret_int={}"
+                        .format(message, ret_int))
+
+def check_none(message, ret_none):
+    """Check object is None or not
+    Args:
+        message: output log str
+        ret_none: check object
+    """
+    if ret_none is None:
+        raise Exception("{} failed"
+                        .format(message))
+
+def copy_data_device_to_host(device_data, data_size):
+    """Copy device data to host
+    Args:
+        device_data: data that to be copyed
+        data_size: data size
+    Returns:
+        None: copy failed
+        others: host data which copy from device_data
+    """
+    host_buffer, ret = acl.rt.malloc_host(data_size)
+    if ret != const.ACL_SUCCESS:
+        log_error("Malloc host memory failed, error: ", ret)
+        return None
+
+    ret = acl.rt.memcpy(host_buffer, data_size,
+                        device_data, data_size,
+                        const.ACL_MEMCPY_DEVICE_TO_HOST)
+    if ret != const.ACL_SUCCESS:
+        log_error("Copy device data to host memory failed, error: ", ret)
+        acl.rt.free_host(host_buffer)
+        return None
+
+    return host_buffer
+
+def copy_data_device_to_device(device_data, data_size):
+    """Copy device data to device
+    Args:
+        device_data: data that to be copyed
+        data_size: data size
+    Returns:
+        None: copy failed
+        others: device data which copy from device_data
+    """
+    device_buffer, ret = acl.rt.malloc(data_size,
+                                       const.ACL_MEM_MALLOC_NORMAL_ONLY)
+    if ret != const.ACL_SUCCESS:
+        log_error("Malloc device memory failed, error: ", ret)
+        return None
+
+    ret = acl.rt.memcpy(device_buffer, data_size,
+                        device_data, data_size,
+                        const.ACL_MEMCPY_DEVICE_TO_DEVICE)
+    if ret != const.ACL_SUCCESS:
+        log_error("Copy device data to device memory failed, error: ", ret)
+        acl.rt.free(device_buffer)
+        return None
+
+    return device_buffer
+
+def copy_data_host_to_device(host_data, data_size):
+    """Copy host data to device
+    Args:
+        host_data: data that to be copyed
+        data_size: data size
+    Returns:
+        None: copy failed
+        others: device data which copy from host_data
+    """
+    device_buffer, ret = acl.rt.malloc(data_size,
+                                       const.ACL_MEM_MALLOC_NORMAL_ONLY)
+    if ret != const.ACL_SUCCESS:
+        log_error("Malloc device memory failed, error: ", ret)
+        return None
+
+    ret = acl.rt.memcpy(device_buffer, data_size,
+                        host_data, data_size,
+                        const.ACL_MEMCPY_HOST_TO_DEVICE)
+    if ret != const.ACL_SUCCESS:
+        log_error("Copy device data to device memory failed, error: ", ret)
+        acl.rt.free(device_buffer)
+        return None
+
+    return device_buffer
+
+def copy_data_host_to_host(host_data, data_size):
+    """Copy host data to host
+    Args:
+        host_data: data that to be copyed
+        data_size: data size
+    Returns:
+        None: copy failed
+        others: host data which copy from host_data
+    """
+    host_buffer, ret = acl.rt.malloc_host(data_size)
+    if ret != const.ACL_SUCCESS:
+        log_error("Malloc host memory failed, error: ", ret)
+        return None
+
+    ret = acl.rt.memcpy(host_buffer, data_size,
+                        host_data, data_size,
+                        const.ACL_MEMCPY_HOST_TO_HOST)
+    if ret != const.ACL_SUCCESS:
+        log_error("Copy host data to host memory failed, error: ", ret)
+        acl.rt.free_host(host_buffer)
+        return None
+
+    return host_buffer
+
+def copy_data_to_dvpp(data, size, run_mode):
+    """Copy data to dvpp
+    Args:
+        data: data that to be copyed
+        data_size: data size
+        run_mode: device run mode
+    Returns:
+        None: copy failed
+        others: data which copy from host_data
+    """
+    policy = const.ACL_MEMCPY_HOST_TO_DEVICE
+    if run_mode == const.ACL_DEVICE:
+        policy = const.ACL_MEMCPY_DEVICE_TO_DEVICE
+
+    dvpp_buf, ret = acl.media.dvpp_malloc(size)
+    check_ret("acl.rt.malloc_host", ret)
+
+    ret = acl.rt.memcpy(dvpp_buf, size, data, size, policy)
+    check_ret("acl.rt.memcpy", ret)
+
+    return dvpp_buf
+
+def copy_data_as_numpy(data, size, data_mem_type, run_mode):
+    """Copy data as numpy array
+    Args:
+        data: data that to be copyed
+        size: data size
+        data_mem_type: src data memory type
+        run_mode: device run mode
+    Returns:
+        None: copy failed
+        others: numpy array whoes data copy from host_data
+    """
+    np_data = np.zeros(size, dtype=np.byte)
+    np_data_ptr = acl.util.numpy_to_ptr(np_data)
+
+    policy = const.ACL_MEMCPY_DEVICE_TO_DEVICE
+    if run_mode == const.ACL_HOST:
+        if ((data_mem_type == const.MEMORY_DEVICE) or
+                (data_mem_type == const.MEMORY_DVPP)):
+            policy = const.ACL_MEMCPY_DEVICE_TO_HOST
+        elif data_mem_type == const.MEMORY_HOST:
+            policy = const.ACL_MEMCPY_HOST_TO_HOST
+
+    ret = acl.rt.memcpy(np_data_ptr, size, data, size, policy)
+    check_ret("acl.rt.memcpy", ret)
+
+    return np_data
+
+def align_up(value, align):
+    """Align up int value
+    Args:
+        value:input data
+        align: align data
+    Return:
+        aligned data
+    """
+    return int(int((value + align - 1) / align) * align)
+
+def align_up16(value):
+    """Align up data with 16
+    Args:
+        value:input data
+    Returns:
+        16 aligned data
+    """
+    return align_up(value, 16)
+
+def align_up128(value):
+    """Align up data with 128
+    Args:
+        value:input data
+    Returns:
+        128 aligned data
+    """
+    return align_up(value, 128)
+
+def align_up2(value):
+    """Align up data with 2
+    Args:
+        value:input data
+    Returns:
+        2 aligned data
+    """
+    return align_up(value, 2)
+
+def yuv420sp_size(width, height):
+    """Calculate yuv420sp image size
+    Args:
+        width: image width
+        height: image height
+    Returns:
+        image data size
+    """
+    return int(width * height * 3 / 2)
+
+def rgbu8_size(width, height):
+    """Calculate rgb 24bit image size
+    Args:
+        width: image width
+        height: image height
+    Returns:
+        rgb 24bit image data size
+    """
+    return int(width * height * 3)
+
+def display_time(func):
+    """print func execute time"""
+    @wraps(func)
+    def wrapper(*args, **kwargs):
+        """wrapper caller"""
+        if DEBUG:
+            btime = time.time()
+            res = func(*args, **kwargs)
+            use_time = time.time() - btime
+            print("in %s, use time:%s" % (func.__name__, use_time))
+            return res
+        else:
+            return func(*args, **kwargs)
+    return wrapper
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/cfd_para.hypara b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/cfd_para.hypara
new file mode 100644
index 0000000..29b35c1
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/cfd_para.hypara
@@ -0,0 +1,697 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +  
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+#########################################################################
+#                     Default parameters for Grid conversion            #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//               0 -- Unstructured grid.
+//               1 -- Structured grid.
+//               2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//               0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//               1 -- Grid conversion, from other grid data to PHenglEI( HyperFLOW ), such as Fluent, CGNS.
+//               2 -- Grid refinement.
+//               3 -- Grid merging, merge two blocks into one block.
+//               5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//		 6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//               0 -- Not.
+//               1 -- Yes.
+// grid_database_index: Case of typical case, only for gridobj=0.
+//               1 - Laminar flat plate of subsonic flow.  
+//               2 - Laminar flat plate of supersonic flow.
+//               3 - Turbulent flat plate of subsonic flow.
+//               4 - Turbulent flat plate of supersonic flow.
+// iadapt: Adaptation number for unstructure grid.
+// iovrlap: Overlapping( overset ) grid or not.
+//               0 -- NON-overlapping grid.
+//               1 -- Overlapping grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//				 0 -- X axis.
+//  			 1 -- Y axis.
+//				 2 -- Z axis.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 1;
+int grid_database_index = 3;
+int iadapt              = 0;
+int iovrlap             = 0;
+int SymmetryFaceVector	= 1;
+
+// axisup: Type of Cartisien coordinates system, used in grid conversion.
+//               1 -- Y upward. (default)
+//               2 -- Z upward.
+int axisup              = 1;
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//               0 -- Interface. (default)
+//               1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc    = 0; 
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//              -1 -- MULTI_TYPE
+//               1 -- HyperFLOW( PHengLEI ), *.fts.
+//               2 -- CGNS, *.cgns.
+//               3 -- Plot3D type of structured grid, *.dat/*.grd.
+//               4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//               5 -- Fluent, *.cas/*.msh.
+//               6 -- Ustar, mgrid.in.
+//               7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//               8 -- GMSH, *.msh.    
+int from_gtype          = 2;
+int to_gtype            = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/rae2822_hybrid2d.cas";
+string out_gfile  = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------  some advanced choices -----------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady           = 0;
+int iale                = 0;
+
+// fileformat : Ustar Grid file format.
+//				0 --- ASCII
+//              1 --- BINARY
+int fileformat          = 0;
+
+// .skl meaning skeleton.
+string original_grid_info_file = "./grid/FLUENT_test.skl";
+
+// Parameters for hybrid solver.
+string mixgrid_uns          = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str          = "./grid/flat_laminr_133_85_2d.fts";
+string mixgrid_str_bc       = "./grid/flat_laminr_133_85_2d.inp";
+
+// Some parameters for structured overlapping grid of GuoYongHeng start.
+int    codeOfDigHoles       = 1;
+string holeBasicFileName    = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName     = "./oversetGridView/holeFullFile.dat";
+string linkFileName         = "./oversetGridView/topology.dat";
+string zoneInverseFileName  = "./oversetGridView/zoneInverseMapping.inp";
+
+#########################################################################
+#                     Default parameters for Partition                  #
+#########################################################################
+// pgridtype: The grid type. 
+//               0 -- unstruct grid 
+//               1 -- struct grid 
+//               2 -- refine structured grid.
+// maxproc:   The number of partition zones that want to be divided into.
+int pgridtype    = 0; 
+int maxproc      = 4;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file     : original grid file that want to be divided(HyperFLOW/PHengLEI type, *.fts).
+// partition_grid_file    : target partition grid file(HyperFLOW/PHengLEI type, *.fts).
+string original_grid_file      = "./grid/rae2822_hybrid2d.fts";
+string partition_grid_file     = "./grid/rae2822_hybrid2d__4.fts";
+
+// ------------------ Sompe advanced parameters ------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//         0 -- Interface. (default)
+//         1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default 1.
+// parallelPartMethod: Method of parallel partition, this is set only when execute parallel partition.It would be skipped when serial partition.
+//         1 -- Using ParMetis for homogeneous MPI. 
+//         2 -- Using Metis for homogeneous MPI.
+//         3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: is used to specify the imbalance tolerance.
+//        1       --  perfect balance;
+//        maxproc --  perfect imbalance;
+//        1.05    --  recommended.
+
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance = 1.05;
+
+// Number of multi-grid levels, ONLY used for structured grid.
+//               1 -- single level, 2 -- 2 level, N -- N level, ..., et all.
+int numberOfMultigrid       = 1;
+
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxsimustep: the max simulation step, don't care simulation is restart or not.
+// ndisk:       the step intervals for 'flow.dat    ' saved.
+// nplotsave:   the step intervals for 'tecflow.dat ' saved.
+// nforcsave:   the step intervals for 'aircoef.dat ' saved.
+// nressave:    the step intervals for 'res.dat     ' saved.
+// precon:      precondition process to accelerate convergence for low speed flow.
+//              0 -- no precondition process. (default)
+//              1 -- carry out precondition process.
+
+int    ndisk        = 1000;
+int    maxsimustep  = 20000;
+
+int    nplotsave    = 1000;
+int    nforcsave    = 100;
+int    nressave     = 10;
+int    precon       = 0;
+
+// m_block_proc: Method of grid zone distribution among different processors.
+//               0 -- Each zone is distributed by grid partition. (default)
+//               1 -- Each zone is distributed randomly.
+//compressible:  0 for incompressible flow, 1 for compressible flow (default).
+
+int compressible        = 1;
+
+//-----------------------------------------------------------------------
+#                        CFD Control Parameter                          #
+//-----------------------------------------------------------------------
+// attackd:                           Angle of attack.
+// sideslipd:                         Angle of yaw.
+// reference_mach_number:             Mach number.
+// reynolds:                          Reynolds number, which is based unit length, unit of 1/m.
+// reference_temperature_dimensional: dimensional reference temperature, or the total temperature only for the experiment condition.
+// reference_pressure_dimensional:    dimensional reference pressure   , or the total pressure    only for the experiment condition.
+// height:                            Fly height, unit of km.
+// inflowParaType: the type of inflow parameters.
+//                    0 - the nondimensional conditions.
+//                    1 - the flight conditions.
+//                    2 - the experiment conditions.
+//                    3 - the subsonic boundary conditions.
+// twall:          Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// dump_Q:         Dump out thermal flux Q of solid wall.
+//                    0 - no dump out.
+//                    1 - dump out wall Q only.
+//                    2 - dump out wall Q & the typical position Q of ball.
+//                    3 - dump out wall Q & the typical position Q of cone.
+//                    4 - dump out wall Q & the typical position Q of double sphere.
+// Qstag:          The Q of the stagnation point, calculated by Fay-Riddle formula.
+// gridUnit:       The unit of the grid.
+//                    0 - meter.
+//                    1 - decimeter,  1 dm = 0.1  m.
+//                    2 - centimeter, 1 cm = 0.01 m.
+//                    3 - millimeter, 1 mm = 0.001m.
+//                    4 - inch,       1 inch             = 0.0254m.
+//                    5 - foot,       1 foot = 12 inches = 0.3048m.
+//                    6 - yard,       1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceArea:            Reference length and area, independent of grid unit.
+// forceRefenenceX, forceRefenenceY, forceRefenenceZ:   Reference point, independent of grid unit.
+
+double reference_mach_number    = 0.73;
+double attackd                  = 2.79;
+double sideslipd                = 0.00;
+
+int    inflowParaType                       = 0;
+double reynolds                             = 6.5e6;
+double reference_temperature_dimensional    = 288.15;
+
+//int    inflowParaType                     = 1;
+//double height                             = 0.001;
+
+//int    inflowParaType                     = 2;
+//double reference_temperature_dimensional  = 6051.024;         //the total temperature, T*(1+(gama0-1)*M*M/2).
+//double reference_pressure_dimensional     = 4.299696E09;      //the total pressure, p*(T0/T)^(gama0/(gama0-1)).
+
+//int    inflowParaType                     = 3;
+//int nsubsonicInlet                        = 1;
+//int nsubsonicOutlet                       = 1;
+//string inLetFileName                      = "./bin/subsonicInlet.hypara";
+//string outLetFileName                     = "./bin/subsonicOutlet.hypara";
+//double reference_temperature_dimensional  = 288.144;
+//double reference_pressure_dimensional     = 1.01313E05;
+
+
+double twall        = -1.0 ;
+int    dump_Q       = 0;
+double Qstag        = 1.825e-3;
+
+int gridUnit        = 0;
+
+double forceRefenenceLength   = 1.0;
+double forceRefenenceLengthSpanWise = 1.0;
+double forceRefenenceArea     = 1.0;
+double forceRefenenceX        = 0.0;
+double forceRefenenceY        = 0.0;
+double forceRefenenceZ        = 0.0;
+
+int    directionMethod      = 2;							// 1 -- using direciton; 2 -- using face normal.
+double totalP_inlet         = 1.2e6;
+double totalT_inlet         = 1300;
+double direction_inlet[3]   = 1, 0, 0;
+
+double totalP_outlet        = 17.8571428;
+double totalT_outlet        = 1.0;
+double direction_outlet[3]  = 1, 0, 0;
+
+//-----------------------------------------------------------------------
+#                       Spatial Discretisation                          #
+//-----------------------------------------------------------------------
+#*******************************************************************
+#			  Struct Solver		       	                           *
+#*******************************************************************
+// str_scheme_name:    Spatial discretisation scheme of struct grid
+//                     Using this when solve structered grid or hybrid.
+//                         - "vanleer",  "steger",  "hlle",  "lax_f"
+//                         - "roe","modified_roe"  
+//                         - "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw"
+// str_limiter_name:   Limiter of struct grid
+//                         - "vanalbada",  "vanleer",  "minmod",  "smooth"  "minvan" "3rdsmooth" "3rd_minmod_smooth"
+//                         - "nolim" - no limiter
+//                         - "vanalbada_clz" clz supersonic version
+string str_scheme_name     = "roe";
+string str_limiter_name    = "vanalbada";
+
+#*******************************************************************
+#			  UnStruct Solver or Common   	                       *
+#*******************************************************************
+// iviscous:           Viscous model 
+//                         0 - Euler 
+//                         1 - Lamilar
+//                         2 - Algebraic
+//                         3 - 1eq turbulent
+//                         4 - 2eq turbulent
+// visname :           Laminar or tubulent model
+//                         - "0eq-bl"
+//                         - "1eq-sa"
+//                         - "2eq-kw-menter-sst"
+//                         - "2eq-kw-menter-bsl"
+//                         - "2eq-kw-wilcox-1988"
+//                         - "2eq-kw-wilcox-1998"
+//                         - "2eq-kw-kok-tnt"
+//                         - "2eq-kw-wilcox-2006"
+//                         - "easm-kw-2003"
+//                         - "easm-kw-2005"
+// codeofDES :         Type of DES
+//                        0 - RANS (default);
+//                        1 - DES;
+//                        2 - DDES;
+//                        3 - IDDES;
+// uns_scheme_name:    Spatial discretisation scheme of Unstruct grid
+//                     Using this when solve Unstructered grid or hybrid.
+//                         - "vanleer",  "roe",  "steger",  "kfvs",  "lax_f",  "hlle"
+//                         - "ausm+",  "ausmdv",  "ausm+w",  "ausmpw",  "ausmpwplus"
+// uns_limiter_name:   Limiter of Unstruct grid
+//                         - "barth",  "vencat",  "vanleer",  "minmod"
+//                         - "vanalbada",  "smooth",  "nnd",  "lpz",  "1st",
+//                         - "nolim" - no limiter
+// uns_vis_name:       Discretisation method of viscous term.
+//                         - "std",  "test",  "aver",  "new1",  "new2"
+// uns_gradient:       Gradient reconstruction method
+//                         - "default",  "ggcell",  "ggnode",  "lsq"
+// ivencat:            Variation of vencat limiter
+//                         0 - org method, it is independent of grid scale
+//                         1 - new method, it is dependent of grid scale 
+//                         4 - Ustar limiter model, without grid size unitary.
+//						   7 - default used. 
+// eps_vencat:         Cofficient of vencat, when using vencat limter
+// limit_mode:         limit model.
+//                         0 - limit only for pressure and denstiny, then get the min value
+//                         1 - limit for every variables, then get the min value
+// limiter_vec:         
+//			   			   0 - Each variable use the same limiter coefficient.
+//                         1 - Each variable use the respective limiter coefficients.
+// reconmeth:
+//                         0 - When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//                         1 - Q+, Q- use the min limiter coefficients of left and right cell. 
+// nentrfix:           Entropy fix.
+//                         1 - common entropy fix.
+//                         2 - Harte's method, to be continued.
+//                         3 - Method in ZYB 's Doctor thesis, to be continued.
+//                         4 - Method in Ustar.
+// alf_l, alf_n:       Entropy fix cofficient for Roe scheme. 
+
+//int    iviscous        = 0;
+//string visname         = "Euler";
+
+//int    iviscous          = 1;
+//string visname           = "laminar";
+
+int    iviscous        = 3;
+string visname         = "1eq-sa";
+
+//int    iviscous        = 4;
+//string visname         = "2eq-kw-menter-sst";
+
+int     codeofDES        = 0;
+
+string uns_scheme_name   = "roe";
+string uns_limiter_name  = "vencat";
+string uns_vis_name      = "test";
+string uns_gradient_name = "ggnode";
+
+int ivencat              = 7;
+double eps_vencat        = 5.0;
+int reconmeth            = 1;
+int limit_mode           = 0;
+int limiter_vec          = 0;
+double limit_angle       = 0;
+double skewnessAngle     = 60.0;
+
+int nentrfix      = 1;
+double alf_l      = 0.0001;
+double alf_n      = 0.0001;
+
+//-----------------------------------------------------------------------
+#                       Temporal Discretisation                         #
+//-----------------------------------------------------------------------
+// iunsteady:           Steady or unsteady.
+//                          0 - steady
+//                          1 - unsteay
+// physicalTimeStep:    the nondimensional physical time step.
+// startFromSteady:     the unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// statisticsDES:       Statistical variables for DES simulation.
+// startStatisticStep:  Outer step when start statistics.
+//                      when the value is larger than "maxsimustep", it is useless.  
+// min_sub_iter:        the min sub iteration of unsteady simulation.
+// max_sub_iter:        the max sub iteration of unsteady simulation.
+// tol_sub_iter:        the tolerance of sub iteration of unsteady simulation.
+// tscheme:             Temporal Discretisation method
+//                          1 - Runge-Kutta Multi-State
+//                          2 - Point implicit
+//                          3 - Full implicit
+//                          4 - LU-SGS
+//                          5 - Block LU-SGS
+//                          6 - Jacobian iteration
+//                          7 - Lower G-S iteration
+//                          8 - Upper G-S iteration
+//                          9 - Lower/Upper G-S iteration
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                      Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// cfl_start:           Started cfl
+// cfl_end:             End cfl
+// cfl_nstep:           The number of step when cfl increase from cfl_start to cfl_end
+// ktmax:               Dtratio. dt[i] = MIN( dt[i], ktmax * dtmin / vol[i] )
+// swapDq:              Communication dq between forward/backward sweep of LUSGS or not, default 0.
+// sweeps:              Sub iteration of LU-SGS or Block LU-SGS.
+// epsilon:             Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ntmst:               Time step method
+//                          0 - Local 
+//                          1 - Gloable
+// n_state:             The number of Runge-Kutta step
+// lamda:               Cofficient of Runge-Kutta step
+
+int    iunsteady        = 0;
+double physicalTimeStep = 0.01;
+int    startFromSteady  = 0;
+int    statisticsDES    = 0;
+int    startStatisticStep = 800000;
+
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme       = 1;
+int iSimplifyViscousTerm = 1;
+double cfl_start     = 0.001;
+double cfl_end       = 0.1;
+int    cfl_nstep     = 500;
+
+double ktmax         = 1.0e10;
+
+int    swapDq        = 1;
+
+int    sweeps        = 1;
+double epsilon       = 0.1;
+int    turb_sweeps   = 1;
+double turb_epsilon  = 0.1;
+
+int    ismooth_ns    = 0;
+int    icalvis       = 1;
+int    vis_run       = 1;
+int    iupdate       = 1;
+int    order         = 2;
+
+double limit_p   = 3.0;
+double limit_r   = 3.0;
+double visl_min  = 0.01;
+int nnegtive_max = 0;
+
+double cflturb       = 1.0;
+double timemax       = 1.0e10;
+double dtsave        = -1.0;
+int    iale          = 0;
+int    ialetype      = 2;
+int    maxale        = 10;
+int    ntmst         = 0;
+double dtau          = 0.001;
+double dtau_max      = 1E-01;
+
+int iwallfunction    = 0;
+
+
+int n_stage          = 2;
+double lamda[2]      = 0.5, 1.0;
+
+//int n_stage        = 1;
+//double lamda[1]    = 1.0;
+
+//int n_stage        = 4;
+//double lamda[4]    = 0.25,0.33333333333,0.5,1.0;
+
+//-----------------------------------------------------------------------
+#                           File In or Out                              #
+//-----------------------------------------------------------------------
+// gridfile:       The partitioned Grid file path, using relative path,
+//				   which is relative to the working directory.
+//		IMPORTANT WARNNING: the file index should be ignored,
+// 		                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//					   			 Please use 'rae2822_hybrid2d__4.fts' here!
+// visual_field:          If dump out the field results to visulization
+// walldistMethod:        The method to compute wall distance.
+//							  0 - accurate but not fast enough.
+//							  1 - fast but not accurate enough.
+//							  2 - Super fast but more non-accurate!
+		
+int    numberOfGridGroups = 1;
+string gridfile           = "./grid/rae2822_hybrid2d__4.fts";
+
+int    walldistMethod     = 1;
+
+string resfile            = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string flowfile           = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+
+string visualfile         = "results/tecflow.plt";
+string Qwall_file         = "results/Qwall.dat";	
+string wall_aircoefile    = "results/wall_aircoef.dat";
+
+string surfacefile        = "";
+
+string wall_varfile       = "";
+
+string componentDefineFile  = "bin/component.hypara";
+string jetDefineFile        = "bin/jet.hypara";
+
+string componentforcefile = "results/component_aircoef.dat";
+
+string overset_gridfile  = "iblank.ovs";
+
+int    visual_field       = 0;
+
+//visualSlice:			  The slice of tecflow
+//							0 - Do not save slice data
+//							1 - comput and save it to sliceFile
+//sliceAxis:			  Normal vector of slice
+//							1 - X_DIR
+//							2 - Y_DIR
+//							3 - Z_DIR
+//slicePostion:			  Coordinate of slice
+
+int    visualSlice		  = 0;
+int    sliceAxis		  = 1;
+double slicePostion		  = -0.5;
+string sliceFile		  = "results/Slice.plt";
+
+// min-max box of the visual block.
+double visual_block_min[3] = [0.0 0.0 0.0];
+double visual_block_max[3] = [1.0 1.0 1.0];
+
+// nVisualVariables:  number of variables want to be dumped for tecplot visualization.
+// visualVariables :  variable types dumped, listed as following:
+//                      -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6)
+//                      -- viscosityLaminar(7), viscosityTurbulent(8)
+//                      -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12), strain_rate(13), Q_criteria(14)
+//                      -- Cp(15), timeStep(16), volume(17)
+//                      -- modeledTKE(18),modeleddissipationrate(19), SSTF1(20), SSTF2(21) 
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!.
+// Arriables order must from small to larger.
+int    nVisualVariables     = 8;
+int    visualVariables[8]  = 0, 1, 2, 3, 4, 5, 6, 15;
+
+//-----------------------------------------------------------------------
+#                           Turbulence Parameter                        #
+//-----------------------------------------------------------------------
+//turb_vis_kind : 
+// const int VIS_STD         = 0;
+// const int VIS_AVER        = 1;
+// const int VIS_TEST        = 2;
+// const int VIS_NEW1        = 3;
+// const int VIS_NEW2        = 4;
+// const int VIS_ERIC        = 5;
+int turbInterval     = 1;
+int turb_vis_kind    = 2;
+int turb_s_kind      = 0;           //turb_s_kind = 0:original 1:edwards 2:new
+int mod_turb_res     = 0;
+double turb_relax    = 1.0;
+double turb_min_coef = 1.0e-1;
+double vistoo         =  1.0e-3;
+double muoo           =  1.0e-1;
+double kwoo           =  1.0;
+
+
+# maximum eddy viscosity (myt/my)max
+double mytmax       = 1.0e10;
+double sdilim       = 1.0e20;
+double coef_kvist   = 1.0;
+int monitor_vistmax = 0;
+
+//-----------------------------------------------------------------------
+#                           Other Parameter                             #
+//-----------------------------------------------------------------------
+// iapplication: 0 - NS
+//               1 - MHD
+// nm:           equation number of the physics , but is out of commision now. 
+//                   4 - for 2D
+//                   5 - for 3D
+//ncatamod: 	 0 - full non-catalytic wall boundary condition;
+//			 	 1 - full catalytic wall boundary condition;
+
+int    dg_high_order = 0;      //0 ���澫��       �� 1 DG �߽׾���
+int    iapplication  = 0;
+int    nm            = 5;
+
+//MHD���
+double bxoo       = 0.0;
+double byoo       = 0.0;
+double bzoo       = 0.0;
+
+double gama0      = 1.4;
+double prl        = 0.72;
+double prt        = 0.90;
+double sc_l       = 0.5;
+double sc_t       = 0.5;
+
+int    nchem       = 0;
+int    nchemsrc    = 0;
+int    nchemrad    = 0;
+int    ntmodel     = 1;
+string gasfile     = "./chemical/Gupta_air5s6r.dat";
+int    ncatamod    = 0;
+
+#########################################################################
+// Multi-Grid parameters.
+// mgrid: 	   The number of level of Multi-Grid
+//  			<= 1 : Single level.
+//              >  1 : multi-level.
+// npre   :        for each grid, the number of pre-smoothing steps
+// npost  :        for each grid, the number of post-smoothing steps
+// n_solve:        for the coarest grid the number of smoothing steps
+// n_fas  :        V-multi cycle or W-multi cycle.
+//                 1      : V-multi cycle
+//                 2      : W-multi cycle
+// mgvisl :        If calculate the viscous term on coarse grid
+//                      0    : No
+//                      1    : Yes
+// mgvist :        If consideration the turbulent model on coarse grid.
+//                      0    : No
+//                      1    : Yes
+// mgInitStep:     Number of step computing on coarse grid, during flow initialization.
+// cflMGTimes:		 CFL number enlarge times for coarse grid.
+// mprol:		   Multi-grid interpolation method, interpolation from coarse cell to fine grid:
+//					    1: zero order;
+//                      2: first-order(default).               
+int mgrid          = 1;
+int n_solve        = 1;
+int n_pre          = 1;
+int n_fas          = 1;
+int n_post         = 0;
+int mgvisl         = 1;
+int mgvist         = 0;
+int mgInitStep     = 100;
+int mprol          = 2;
+double cflMGTimes  = 1.0;
+double correctionLimit= 0.01;
+
+//----------------------- Some parameter for turbulent model. -----------------------------
+int neasm       = -3;			// the variation of kw turbulent model
+int ivortsource = 0;
+int ismooth_turb = 0;			// Residual smooth for turb or not.
+
+int isplt = 2;
+
+int    inflowtype   = 0;
+
+//string n_turb_scheme   = "roe","center","nnd";
+string n_turb_scheme   = "nnd";
+
+// ----------------  Overset Grid parameter -------------------------------------
+int    codeOfDigHoles            = 1;
+int    codeOfTurbulentModel      = 0;
+string masterFileName            = "./grid/searchFile.inp";
+string holeBasicFileName         = "./grid/holeBasicFile.inp";
+string holeFullFileName          = "./grid/holeFullFile.dat";
+string linkFileName              = "./grid/topology.dat";
+string zoneInverseFileName       = "./grid/zoneInverseMapping.inp";
+
+#########################################################################
+#			             High Order Struct Solver		       	        #
+#########################################################################
+// ifvfd :       0 - NSSolverStruct using Finite Volume Method;
+//               1 - NSSolverStruct using Finite Differ Method;
+//               =0  default
+// SolverStructOrder:    Spatial discretisation order of NS equations with struct grid
+//                       =<2 finite volume method 
+//                       >=3 finite difference order (to be completed)
+//                       =0  default
+// str_highorder_interpolation_name:   interpolation method: "prim", "char"
+// str_highorder_flux_name:    flux evaluation method: "roe",  "steger", "godunov", "hllc"
+int     ifvfd                              =  0; 
+int     SolverStructOrder                  =  0;
+string  str_highorder_interpolation_name   =  "char";
+string  str_highorder_flux_name            =  "steger";
+
+
+
+// ----------------  advanced choices -------------------------------------------
+// xkmuscl:             the parameter of MUSCL interpolations, belongs to [-1,1].
+//                          -1   - seconde-order fully-upwind differencing
+//                           0   - seconde-order upwind-biased differencing
+//                    0.333333   - third-order upwind-biased differencing
+//                           1   - seconde-order central differencing
+// xbmuscl:             the limiter parameter.
+//                           0   - the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep:       iteration intervals for MPI AllReduce operation, default '1'.
+string outtimesc   = "impbd2";
+double unxk1       = 1.0;
+double unxk2       = 0.0;
+double xkmuscl     = -1;
+double xbmuscl     = 1.0;
+int  allReduceStep = 1;
+
+
+// ---------------  ATP read ----------------------------------------------------
+//@int    inflowParaType                       = 0;
+//@double reynolds                             = 2.329418E08;
+//@double reference_temperature_dimensional    = 288.144;
+//@double reference_pressure_dimensional       = 1.01313E05;
+//@double height                               = -0.001;
+//@int nsubsonicInlet                          = 0;
+//@int nsubsonicOutlet                         = 0;
+//@string inLetFileName                        = "./bin/subsonicInlet.hypara";
+//@string outLetFileName                       = "./bin/subsonicOutlet.hypara";
\ No newline at end of file
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/cfd_para_transonic.hypara b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/cfd_para_transonic.hypara
new file mode 100644
index 0000000..e9a43f2
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/cfd_para_transonic.hypara
@@ -0,0 +1,210 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep       = 10000;
+
+int intervalStepFlow  = 10000;
+int intervalStepPlot  = 10000;
+int intervalStepForce = 100;
+int intervalStepRes   = 500;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.76;
+double attackd       = 1.25;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 1.171e7;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+double gridScaleFactor = 1.0;
+
+double forceRefenenceLengthSpanWise = 1.0;    // unit of meter.
+double forceRefenenceLength = 1.0;            // unit of meter.
+double forceRefenenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = 1eq-sa;
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+//int    viscousType    = 5;
+//string viscousName = DNN;
+//double TimeBeta = 0.8;
+//double SpaceBeta = 1.0;
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "roe", "vanleer", "ausm+up", "ausmpw".
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string inviscidSchemeName = "roe";
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "steger", "kfvs", "lax_f", "hlle".
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpwplus".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat", "barth".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 100.0;
+
+int nLUSGSSweeps = 5;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = ./grid/M6__48.fts;
+int plotFieldType = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), iblank(81).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 9;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 8, 15];
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
+
+double MUSCLCoefXk = 0.333333;
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/grid_para.hypara b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/grid_para.hypara
new file mode 100644
index 0000000..0d27857
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/grid_para.hypara
@@ -0,0 +1,30 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// axisup:   Type of Cartisien coordinates system, used in grid conversion.
+//           1 -- Y upward. (default)
+//           2 -- Z upward.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int axisup     = 1;
+int from_gtype = 5;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/M6_240w.cas";
+string out_gfile  = "./grid/M6.fts";
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/key.hypara b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/key.hypara
new file mode 100644
index 0000000..cf1eb28
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/key.hypara
@@ -0,0 +1,59 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+//string parafilename = "./bin/cfd_para_subsonic.hypara";
+string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 4;
+//string parafilename = "./bin/repository.hypara";
+
+//int    nsimutask    = 5;
+//string parafilename = "./bin/overset_grid_view.hypara";
+
+//int    nsimutask    = 13;
+//string parafilename = "./bin/lbm_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/lines_XYZ.dat b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/lines_XYZ.dat
new file mode 100644
index 0000000..bf49ff1
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/lines_XYZ.dat
@@ -0,0 +1,44 @@
+31
+  1.000000000000000e+00   1.000000000000000e+00   0.000000000000000e+00
+  9.333333333333333e-01   1.000000000000000e+00   0.000000000000000e+00
+  8.666666666666667e-01   1.000000000000000e+00   0.000000000000000e+00
+  8.000000000000000e-01   1.000000000000000e+00   0.000000000000000e+00
+  7.333333333333334e-01   1.000000000000000e+00   0.000000000000000e+00
+  6.666666666666667e-01   1.000000000000000e+00   0.000000000000000e+00
+  6.000000000000001e-01   1.000000000000000e+00   0.000000000000000e+00
+  5.333333333333332e-01   1.000000000000000e+00   0.000000000000000e+00
+  4.666666666666667e-01   1.000000000000000e+00   0.000000000000000e+00
+  4.000000000000000e-01   1.000000000000000e+00   0.000000000000000e+00
+  3.333333333333334e-01   1.000000000000000e+00   0.000000000000000e+00
+  2.666666666666667e-01   1.000000000000000e+00   0.000000000000000e+00
+  2.000000000000000e-01   1.000000000000000e+00   0.000000000000000e+00
+  1.333333333333333e-01   1.000000000000000e+00   0.000000000000000e+00
+  6.666666666666665e-02   1.000000000000000e+00   0.000000000000000e+00
+  0.000000000000000e+00   1.000000000000000e+00   0.000000000000000e+00
+ -6.666666666666665e-02   1.000000000000000e+00   0.000000000000000e+00
+ -1.333333333333333e-01   1.000000000000000e+00   0.000000000000000e+00
+ -2.000000000000000e-01   1.000000000000000e+00   0.000000000000000e+00
+ -2.666666666666666e-01   1.000000000000000e+00   0.000000000000000e+00
+ -3.333333333333333e-01   1.000000000000000e+00   0.000000000000000e+00
+ -3.999999999999999e-01   1.000000000000000e+00   0.000000000000000e+00
+ -4.666666666666666e-01   1.000000000000000e+00   0.000000000000000e+00
+ -5.333333333333332e-01   1.000000000000000e+00   0.000000000000000e+00
+ -6.000000000000001e-01   1.000000000000000e+00   0.000000000000000e+00
+ -6.666666666666667e-01   1.000000000000000e+00   0.000000000000000e+00
+ -7.333333333333334e-01   1.000000000000000e+00   0.000000000000000e+00
+ -8.000000000000000e-01   1.000000000000000e+00   0.000000000000000e+00
+ -8.666666666666667e-01   1.000000000000000e+00   0.000000000000000e+00
+ -9.333333333333333e-01   1.000000000000000e+00   0.000000000000000e+00
+ -1.000000000000000e+00   1.000000000000000e+00   0.000000000000000e+00
+11
+ -1.000000000000000e+00   1.000000000000000e+00   0.000000000000000e+00
+ -1.000000000000000e+00   1.000000000000000e+00   1.000000000000000e-01
+ -1.000000000000000e+00   1.000000000000000e+00   2.000000000000000e-01
+ -1.000000000000000e+00   1.000000000000000e+00   3.000000000000000e-01
+ -1.000000000000000e+00   1.000000000000000e+00   4.000000000000000e-01
+ -1.000000000000000e+00   1.000000000000000e+00   5.000000000000000e-01
+ -1.000000000000000e+00   1.000000000000000e+00   6.000000000000000e-01
+ -1.000000000000000e+00   1.000000000000000e+00   7.000000000000000e-01
+ -1.000000000000000e+00   1.000000000000000e+00   7.999999999999999e-01
+ -1.000000000000000e+00   1.000000000000000e+00   8.999999999999999e-01
+ -1.000000000000000e+00   1.000000000000000e+00   9.999999999999999e-01
\ No newline at end of file
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/partition.hypara b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/partition.hypara
new file mode 100644
index 0000000..9c5fb84
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 0;
+int maxproc   = 94;
+
+string original_grid_file  = "./grid/M6.fts";
+string partition_grid_file = "./grid/M6__94.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 1;
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/post_processing.hypara b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/post_processing.hypara
new file mode 100644
index 0000000..73afc3e
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/post_processing.hypara
@@ -0,0 +1,15 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// gridfile:    The partitioned Grid file path, using relative path,
+//              which is relative to the working directory.
+// gridfile:    The flow data file.
+
+string gridfile      = "./grid/rae2822_vis2d.fts";
+string restartNSFile = "results/flow.dat";
+string turbfile      = "results/turb.dat";
+
+
+// isFVMOrFDM : 0 - NSSolverStruct using Finite Volume Method;
+//              1 - NSSolverStruct using Finite Differ Method.
+int isFVMOrFDM = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/probes_XYZ.dat b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/probes_XYZ.dat
new file mode 100644
index 0000000..a4027c5
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/probes_XYZ.dat
@@ -0,0 +1,11 @@
+#----------------------------------#
+#  Total Probes Number             #
+#----------------------------------#
+     3
+#----------------------------------#
+#  Probes Coordinate,unit of m.    #
+#  x         y          z          #
+#----------------------------------#
+0.0254     0.0253      0.0
+0.0508     0.0253      0.0
+0.0762     0.0253      0.0
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/surfaces_XYZ.dat b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/surfaces_XYZ.dat
new file mode 100644
index 0000000..5a96267
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/bin/surfaces_XYZ.dat
@@ -0,0 +1,342 @@
+31 11
+1.000000000000000e+00 1.000000000000000e+00 0.000000000000000e+00
+1.000000000000000e+00 1.000000000000000e+00 1.000000000000000e-01
+1.000000000000000e+00 1.000000000000000e+00 2.000000000000000e-01
+1.000000000000000e+00 1.000000000000000e+00 3.000000000000000e-01
+1.000000000000000e+00 1.000000000000000e+00 4.000000000000000e-01
+1.000000000000000e+00 1.000000000000000e+00 5.000000000000000e-01
+1.000000000000000e+00 1.000000000000000e+00 6.000000000000000e-01
+1.000000000000000e+00 1.000000000000000e+00 7.000000000000000e-01
+1.000000000000000e+00 1.000000000000000e+00 7.999999999999999e-01
+1.000000000000000e+00 1.000000000000000e+00 8.999999999999999e-01
+1.000000000000000e+00 1.000000000000000e+00 9.999999999999999e-01
+9.333333333333333e-01 1.000000000000000e+00 0.000000000000000e+00
+9.333333333333333e-01 1.000000000000000e+00 1.000000000000000e-01
+9.333333333333333e-01 1.000000000000000e+00 2.000000000000000e-01
+9.333333333333333e-01 1.000000000000000e+00 3.000000000000000e-01
+9.333333333333333e-01 1.000000000000000e+00 4.000000000000000e-01
+9.333333333333333e-01 1.000000000000000e+00 5.000000000000000e-01
+9.333333333333333e-01 1.000000000000000e+00 6.000000000000000e-01
+9.333333333333333e-01 1.000000000000000e+00 7.000000000000000e-01
+9.333333333333333e-01 1.000000000000000e+00 7.999999999999999e-01
+9.333333333333333e-01 1.000000000000000e+00 8.999999999999999e-01
+9.333333333333333e-01 1.000000000000000e+00 9.999999999999999e-01
+8.666666666666667e-01 1.000000000000000e+00 0.000000000000000e+00
+8.666666666666667e-01 1.000000000000000e+00 1.000000000000000e-01
+8.666666666666667e-01 1.000000000000000e+00 2.000000000000000e-01
+8.666666666666667e-01 1.000000000000000e+00 3.000000000000000e-01
+8.666666666666667e-01 1.000000000000000e+00 4.000000000000000e-01
+8.666666666666667e-01 1.000000000000000e+00 5.000000000000000e-01
+8.666666666666667e-01 1.000000000000000e+00 6.000000000000000e-01
+8.666666666666667e-01 1.000000000000000e+00 7.000000000000000e-01
+8.666666666666667e-01 1.000000000000000e+00 7.999999999999999e-01
+8.666666666666667e-01 1.000000000000000e+00 8.999999999999999e-01
+8.666666666666667e-01 1.000000000000000e+00 9.999999999999999e-01
+8.000000000000000e-01 1.000000000000000e+00 0.000000000000000e+00
+8.000000000000000e-01 1.000000000000000e+00 1.000000000000000e-01
+8.000000000000000e-01 1.000000000000000e+00 2.000000000000000e-01
+8.000000000000000e-01 1.000000000000000e+00 3.000000000000000e-01
+8.000000000000000e-01 1.000000000000000e+00 4.000000000000000e-01
+8.000000000000000e-01 1.000000000000000e+00 5.000000000000000e-01
+8.000000000000000e-01 1.000000000000000e+00 6.000000000000000e-01
+8.000000000000000e-01 1.000000000000000e+00 7.000000000000000e-01
+8.000000000000000e-01 1.000000000000000e+00 7.999999999999999e-01
+8.000000000000000e-01 1.000000000000000e+00 8.999999999999999e-01
+8.000000000000000e-01 1.000000000000000e+00 9.999999999999999e-01
+7.333333333333334e-01 1.000000000000000e+00 0.000000000000000e+00
+7.333333333333334e-01 1.000000000000000e+00 1.000000000000000e-01
+7.333333333333334e-01 1.000000000000000e+00 2.000000000000000e-01
+7.333333333333334e-01 1.000000000000000e+00 3.000000000000000e-01
+7.333333333333334e-01 1.000000000000000e+00 4.000000000000000e-01
+7.333333333333334e-01 1.000000000000000e+00 5.000000000000000e-01
+7.333333333333334e-01 1.000000000000000e+00 6.000000000000000e-01
+7.333333333333334e-01 1.000000000000000e+00 7.000000000000000e-01
+7.333333333333334e-01 1.000000000000000e+00 7.999999999999999e-01
+7.333333333333334e-01 1.000000000000000e+00 8.999999999999999e-01
+7.333333333333334e-01 1.000000000000000e+00 9.999999999999999e-01
+6.666666666666667e-01 1.000000000000000e+00 0.000000000000000e+00
+6.666666666666667e-01 1.000000000000000e+00 1.000000000000000e-01
+6.666666666666667e-01 1.000000000000000e+00 2.000000000000000e-01
+6.666666666666667e-01 1.000000000000000e+00 3.000000000000000e-01
+6.666666666666667e-01 1.000000000000000e+00 4.000000000000000e-01
+6.666666666666667e-01 1.000000000000000e+00 5.000000000000000e-01
+6.666666666666667e-01 1.000000000000000e+00 6.000000000000000e-01
+6.666666666666667e-01 1.000000000000000e+00 7.000000000000000e-01
+6.666666666666667e-01 1.000000000000000e+00 7.999999999999999e-01
+6.666666666666667e-01 1.000000000000000e+00 8.999999999999999e-01
+6.666666666666667e-01 1.000000000000000e+00 9.999999999999999e-01
+6.000000000000001e-01 1.000000000000000e+00 0.000000000000000e+00
+6.000000000000001e-01 1.000000000000000e+00 1.000000000000000e-01
+6.000000000000001e-01 1.000000000000000e+00 2.000000000000000e-01
+6.000000000000001e-01 1.000000000000000e+00 3.000000000000000e-01
+6.000000000000001e-01 1.000000000000000e+00 4.000000000000000e-01
+6.000000000000001e-01 1.000000000000000e+00 5.000000000000000e-01
+6.000000000000001e-01 1.000000000000000e+00 6.000000000000000e-01
+6.000000000000001e-01 1.000000000000000e+00 7.000000000000000e-01
+6.000000000000001e-01 1.000000000000000e+00 7.999999999999999e-01
+6.000000000000001e-01 1.000000000000000e+00 8.999999999999999e-01
+6.000000000000001e-01 1.000000000000000e+00 9.999999999999999e-01
+5.333333333333332e-01 1.000000000000000e+00 0.000000000000000e+00
+5.333333333333332e-01 1.000000000000000e+00 1.000000000000000e-01
+5.333333333333332e-01 1.000000000000000e+00 2.000000000000000e-01
+5.333333333333332e-01 1.000000000000000e+00 3.000000000000000e-01
+5.333333333333332e-01 1.000000000000000e+00 4.000000000000000e-01
+5.333333333333332e-01 1.000000000000000e+00 5.000000000000000e-01
+5.333333333333332e-01 1.000000000000000e+00 6.000000000000000e-01
+5.333333333333332e-01 1.000000000000000e+00 7.000000000000000e-01
+5.333333333333332e-01 1.000000000000000e+00 7.999999999999999e-01
+5.333333333333332e-01 1.000000000000000e+00 8.999999999999999e-01
+5.333333333333332e-01 1.000000000000000e+00 9.999999999999999e-01
+4.666666666666667e-01 1.000000000000000e+00 0.000000000000000e+00
+4.666666666666667e-01 1.000000000000000e+00 1.000000000000000e-01
+4.666666666666667e-01 1.000000000000000e+00 2.000000000000000e-01
+4.666666666666667e-01 1.000000000000000e+00 3.000000000000000e-01
+4.666666666666667e-01 1.000000000000000e+00 4.000000000000000e-01
+4.666666666666667e-01 1.000000000000000e+00 5.000000000000000e-01
+4.666666666666667e-01 1.000000000000000e+00 6.000000000000000e-01
+4.666666666666667e-01 1.000000000000000e+00 7.000000000000000e-01
+4.666666666666667e-01 1.000000000000000e+00 7.999999999999999e-01
+4.666666666666667e-01 1.000000000000000e+00 8.999999999999999e-01
+4.666666666666667e-01 1.000000000000000e+00 9.999999999999999e-01
+4.000000000000000e-01 1.000000000000000e+00 0.000000000000000e+00
+4.000000000000000e-01 1.000000000000000e+00 1.000000000000000e-01
+4.000000000000000e-01 1.000000000000000e+00 2.000000000000000e-01
+4.000000000000000e-01 1.000000000000000e+00 3.000000000000000e-01
+4.000000000000000e-01 1.000000000000000e+00 4.000000000000000e-01
+4.000000000000000e-01 1.000000000000000e+00 5.000000000000000e-01
+4.000000000000000e-01 1.000000000000000e+00 6.000000000000000e-01
+4.000000000000000e-01 1.000000000000000e+00 7.000000000000000e-01
+4.000000000000000e-01 1.000000000000000e+00 7.999999999999999e-01
+4.000000000000000e-01 1.000000000000000e+00 8.999999999999999e-01
+4.000000000000000e-01 1.000000000000000e+00 9.999999999999999e-01
+3.333333333333334e-01 1.000000000000000e+00 0.000000000000000e+00
+3.333333333333334e-01 1.000000000000000e+00 1.000000000000000e-01
+3.333333333333334e-01 1.000000000000000e+00 2.000000000000000e-01
+3.333333333333334e-01 1.000000000000000e+00 3.000000000000000e-01
+3.333333333333334e-01 1.000000000000000e+00 4.000000000000000e-01
+3.333333333333334e-01 1.000000000000000e+00 5.000000000000000e-01
+3.333333333333334e-01 1.000000000000000e+00 6.000000000000000e-01
+3.333333333333334e-01 1.000000000000000e+00 7.000000000000000e-01
+3.333333333333334e-01 1.000000000000000e+00 7.999999999999999e-01
+3.333333333333334e-01 1.000000000000000e+00 8.999999999999999e-01
+3.333333333333334e-01 1.000000000000000e+00 9.999999999999999e-01
+2.666666666666667e-01 1.000000000000000e+00 0.000000000000000e+00
+2.666666666666667e-01 1.000000000000000e+00 1.000000000000000e-01
+2.666666666666667e-01 1.000000000000000e+00 2.000000000000000e-01
+2.666666666666667e-01 1.000000000000000e+00 3.000000000000000e-01
+2.666666666666667e-01 1.000000000000000e+00 4.000000000000000e-01
+2.666666666666667e-01 1.000000000000000e+00 5.000000000000000e-01
+2.666666666666667e-01 1.000000000000000e+00 6.000000000000000e-01
+2.666666666666667e-01 1.000000000000000e+00 7.000000000000000e-01
+2.666666666666667e-01 1.000000000000000e+00 7.999999999999999e-01
+2.666666666666667e-01 1.000000000000000e+00 8.999999999999999e-01
+2.666666666666667e-01 1.000000000000000e+00 9.999999999999999e-01
+2.000000000000000e-01 1.000000000000000e+00 0.000000000000000e+00
+2.000000000000000e-01 1.000000000000000e+00 1.000000000000000e-01
+2.000000000000000e-01 1.000000000000000e+00 2.000000000000000e-01
+2.000000000000000e-01 1.000000000000000e+00 3.000000000000000e-01
+2.000000000000000e-01 1.000000000000000e+00 4.000000000000000e-01
+2.000000000000000e-01 1.000000000000000e+00 5.000000000000000e-01
+2.000000000000000e-01 1.000000000000000e+00 6.000000000000000e-01
+2.000000000000000e-01 1.000000000000000e+00 7.000000000000000e-01
+2.000000000000000e-01 1.000000000000000e+00 7.999999999999999e-01
+2.000000000000000e-01 1.000000000000000e+00 8.999999999999999e-01
+2.000000000000000e-01 1.000000000000000e+00 9.999999999999999e-01
+1.333333333333333e-01 1.000000000000000e+00 0.000000000000000e+00
+1.333333333333333e-01 1.000000000000000e+00 1.000000000000000e-01
+1.333333333333333e-01 1.000000000000000e+00 2.000000000000000e-01
+1.333333333333333e-01 1.000000000000000e+00 3.000000000000000e-01
+1.333333333333333e-01 1.000000000000000e+00 4.000000000000000e-01
+1.333333333333333e-01 1.000000000000000e+00 5.000000000000000e-01
+1.333333333333333e-01 1.000000000000000e+00 6.000000000000000e-01
+1.333333333333333e-01 1.000000000000000e+00 7.000000000000000e-01
+1.333333333333333e-01 1.000000000000000e+00 7.999999999999999e-01
+1.333333333333333e-01 1.000000000000000e+00 8.999999999999999e-01
+1.333333333333333e-01 1.000000000000000e+00 9.999999999999999e-01
+6.666666666666665e-02 1.000000000000000e+00 0.000000000000000e+00
+6.666666666666665e-02 1.000000000000000e+00 1.000000000000000e-01
+6.666666666666665e-02 1.000000000000000e+00 2.000000000000000e-01
+6.666666666666665e-02 1.000000000000000e+00 3.000000000000000e-01
+6.666666666666665e-02 1.000000000000000e+00 4.000000000000000e-01
+6.666666666666665e-02 1.000000000000000e+00 5.000000000000000e-01
+6.666666666666665e-02 1.000000000000000e+00 6.000000000000000e-01
+6.666666666666665e-02 1.000000000000000e+00 7.000000000000000e-01
+6.666666666666665e-02 1.000000000000000e+00 7.999999999999999e-01
+6.666666666666665e-02 1.000000000000000e+00 8.999999999999999e-01
+6.666666666666665e-02 1.000000000000000e+00 9.999999999999999e-01
+0.000000000000000e+00 1.000000000000000e+00 0.000000000000000e+00
+0.000000000000000e+00 1.000000000000000e+00 1.000000000000000e-01
+0.000000000000000e+00 1.000000000000000e+00 2.000000000000000e-01
+0.000000000000000e+00 1.000000000000000e+00 3.000000000000000e-01
+0.000000000000000e+00 1.000000000000000e+00 4.000000000000000e-01
+0.000000000000000e+00 1.000000000000000e+00 5.000000000000000e-01
+0.000000000000000e+00 1.000000000000000e+00 6.000000000000000e-01
+0.000000000000000e+00 1.000000000000000e+00 7.000000000000000e-01
+0.000000000000000e+00 1.000000000000000e+00 7.999999999999999e-01
+0.000000000000000e+00 1.000000000000000e+00 8.999999999999999e-01
+0.000000000000000e+00 1.000000000000000e+00 9.999999999999999e-01
+-6.666666666666665e-02 1.000000000000000e+00 0.000000000000000e+00
+-6.666666666666665e-02 1.000000000000000e+00 1.000000000000000e-01
+-6.666666666666665e-02 1.000000000000000e+00 2.000000000000000e-01
+-6.666666666666665e-02 1.000000000000000e+00 3.000000000000000e-01
+-6.666666666666665e-02 1.000000000000000e+00 4.000000000000000e-01
+-6.666666666666665e-02 1.000000000000000e+00 5.000000000000000e-01
+-6.666666666666665e-02 1.000000000000000e+00 6.000000000000000e-01
+-6.666666666666665e-02 1.000000000000000e+00 7.000000000000000e-01
+-6.666666666666665e-02 1.000000000000000e+00 7.999999999999999e-01
+-6.666666666666665e-02 1.000000000000000e+00 8.999999999999999e-01
+-6.666666666666665e-02 1.000000000000000e+00 9.999999999999999e-01
+-1.333333333333333e-01 1.000000000000000e+00 0.000000000000000e+00
+-1.333333333333333e-01 1.000000000000000e+00 1.000000000000000e-01
+-1.333333333333333e-01 1.000000000000000e+00 2.000000000000000e-01
+-1.333333333333333e-01 1.000000000000000e+00 3.000000000000000e-01
+-1.333333333333333e-01 1.000000000000000e+00 4.000000000000000e-01
+-1.333333333333333e-01 1.000000000000000e+00 5.000000000000000e-01
+-1.333333333333333e-01 1.000000000000000e+00 6.000000000000000e-01
+-1.333333333333333e-01 1.000000000000000e+00 7.000000000000000e-01
+-1.333333333333333e-01 1.000000000000000e+00 7.999999999999999e-01
+-1.333333333333333e-01 1.000000000000000e+00 8.999999999999999e-01
+-1.333333333333333e-01 1.000000000000000e+00 9.999999999999999e-01
+-2.000000000000000e-01 1.000000000000000e+00 0.000000000000000e+00
+-2.000000000000000e-01 1.000000000000000e+00 1.000000000000000e-01
+-2.000000000000000e-01 1.000000000000000e+00 2.000000000000000e-01
+-2.000000000000000e-01 1.000000000000000e+00 3.000000000000000e-01
+-2.000000000000000e-01 1.000000000000000e+00 4.000000000000000e-01
+-2.000000000000000e-01 1.000000000000000e+00 5.000000000000000e-01
+-2.000000000000000e-01 1.000000000000000e+00 6.000000000000000e-01
+-2.000000000000000e-01 1.000000000000000e+00 7.000000000000000e-01
+-2.000000000000000e-01 1.000000000000000e+00 7.999999999999999e-01
+-2.000000000000000e-01 1.000000000000000e+00 8.999999999999999e-01
+-2.000000000000000e-01 1.000000000000000e+00 9.999999999999999e-01
+-2.666666666666666e-01 1.000000000000000e+00 0.000000000000000e+00
+-2.666666666666666e-01 1.000000000000000e+00 1.000000000000000e-01
+-2.666666666666666e-01 1.000000000000000e+00 2.000000000000000e-01
+-2.666666666666666e-01 1.000000000000000e+00 3.000000000000000e-01
+-2.666666666666666e-01 1.000000000000000e+00 4.000000000000000e-01
+-2.666666666666666e-01 1.000000000000000e+00 5.000000000000000e-01
+-2.666666666666666e-01 1.000000000000000e+00 6.000000000000000e-01
+-2.666666666666666e-01 1.000000000000000e+00 7.000000000000000e-01
+-2.666666666666666e-01 1.000000000000000e+00 7.999999999999999e-01
+-2.666666666666666e-01 1.000000000000000e+00 8.999999999999999e-01
+-2.666666666666666e-01 1.000000000000000e+00 9.999999999999999e-01
+-3.333333333333333e-01 1.000000000000000e+00 0.000000000000000e+00
+-3.333333333333333e-01 1.000000000000000e+00 1.000000000000000e-01
+-3.333333333333333e-01 1.000000000000000e+00 2.000000000000000e-01
+-3.333333333333333e-01 1.000000000000000e+00 3.000000000000000e-01
+-3.333333333333333e-01 1.000000000000000e+00 4.000000000000000e-01
+-3.333333333333333e-01 1.000000000000000e+00 5.000000000000000e-01
+-3.333333333333333e-01 1.000000000000000e+00 6.000000000000000e-01
+-3.333333333333333e-01 1.000000000000000e+00 7.000000000000000e-01
+-3.333333333333333e-01 1.000000000000000e+00 7.999999999999999e-01
+-3.333333333333333e-01 1.000000000000000e+00 8.999999999999999e-01
+-3.333333333333333e-01 1.000000000000000e+00 9.999999999999999e-01
+-3.999999999999999e-01 1.000000000000000e+00 0.000000000000000e+00
+-3.999999999999999e-01 1.000000000000000e+00 1.000000000000000e-01
+-3.999999999999999e-01 1.000000000000000e+00 2.000000000000000e-01
+-3.999999999999999e-01 1.000000000000000e+00 3.000000000000000e-01
+-3.999999999999999e-01 1.000000000000000e+00 4.000000000000000e-01
+-3.999999999999999e-01 1.000000000000000e+00 5.000000000000000e-01
+-3.999999999999999e-01 1.000000000000000e+00 6.000000000000000e-01
+-3.999999999999999e-01 1.000000000000000e+00 7.000000000000000e-01
+-3.999999999999999e-01 1.000000000000000e+00 7.999999999999999e-01
+-3.999999999999999e-01 1.000000000000000e+00 8.999999999999999e-01
+-3.999999999999999e-01 1.000000000000000e+00 9.999999999999999e-01
+-4.666666666666666e-01 1.000000000000000e+00 0.000000000000000e+00
+-4.666666666666666e-01 1.000000000000000e+00 1.000000000000000e-01
+-4.666666666666666e-01 1.000000000000000e+00 2.000000000000000e-01
+-4.666666666666666e-01 1.000000000000000e+00 3.000000000000000e-01
+-4.666666666666666e-01 1.000000000000000e+00 4.000000000000000e-01
+-4.666666666666666e-01 1.000000000000000e+00 5.000000000000000e-01
+-4.666666666666666e-01 1.000000000000000e+00 6.000000000000000e-01
+-4.666666666666666e-01 1.000000000000000e+00 7.000000000000000e-01
+-4.666666666666666e-01 1.000000000000000e+00 7.999999999999999e-01
+-4.666666666666666e-01 1.000000000000000e+00 8.999999999999999e-01
+-4.666666666666666e-01 1.000000000000000e+00 9.999999999999999e-01
+-5.333333333333332e-01 1.000000000000000e+00 0.000000000000000e+00
+-5.333333333333332e-01 1.000000000000000e+00 1.000000000000000e-01
+-5.333333333333332e-01 1.000000000000000e+00 2.000000000000000e-01
+-5.333333333333332e-01 1.000000000000000e+00 3.000000000000000e-01
+-5.333333333333332e-01 1.000000000000000e+00 4.000000000000000e-01
+-5.333333333333332e-01 1.000000000000000e+00 5.000000000000000e-01
+-5.333333333333332e-01 1.000000000000000e+00 6.000000000000000e-01
+-5.333333333333332e-01 1.000000000000000e+00 7.000000000000000e-01
+-5.333333333333332e-01 1.000000000000000e+00 7.999999999999999e-01
+-5.333333333333332e-01 1.000000000000000e+00 8.999999999999999e-01
+-5.333333333333332e-01 1.000000000000000e+00 9.999999999999999e-01
+-6.000000000000001e-01 1.000000000000000e+00 0.000000000000000e+00
+-6.000000000000001e-01 1.000000000000000e+00 1.000000000000000e-01
+-6.000000000000001e-01 1.000000000000000e+00 2.000000000000000e-01
+-6.000000000000001e-01 1.000000000000000e+00 3.000000000000000e-01
+-6.000000000000001e-01 1.000000000000000e+00 4.000000000000000e-01
+-6.000000000000001e-01 1.000000000000000e+00 5.000000000000000e-01
+-6.000000000000001e-01 1.000000000000000e+00 6.000000000000000e-01
+-6.000000000000001e-01 1.000000000000000e+00 7.000000000000000e-01
+-6.000000000000001e-01 1.000000000000000e+00 7.999999999999999e-01
+-6.000000000000001e-01 1.000000000000000e+00 8.999999999999999e-01
+-6.000000000000001e-01 1.000000000000000e+00 9.999999999999999e-01
+-6.666666666666667e-01 1.000000000000000e+00 0.000000000000000e+00
+-6.666666666666667e-01 1.000000000000000e+00 1.000000000000000e-01
+-6.666666666666667e-01 1.000000000000000e+00 2.000000000000000e-01
+-6.666666666666667e-01 1.000000000000000e+00 3.000000000000000e-01
+-6.666666666666667e-01 1.000000000000000e+00 4.000000000000000e-01
+-6.666666666666667e-01 1.000000000000000e+00 5.000000000000000e-01
+-6.666666666666667e-01 1.000000000000000e+00 6.000000000000000e-01
+-6.666666666666667e-01 1.000000000000000e+00 7.000000000000000e-01
+-6.666666666666667e-01 1.000000000000000e+00 7.999999999999999e-01
+-6.666666666666667e-01 1.000000000000000e+00 8.999999999999999e-01
+-6.666666666666667e-01 1.000000000000000e+00 9.999999999999999e-01
+-7.333333333333334e-01 1.000000000000000e+00 0.000000000000000e+00
+-7.333333333333334e-01 1.000000000000000e+00 1.000000000000000e-01
+-7.333333333333334e-01 1.000000000000000e+00 2.000000000000000e-01
+-7.333333333333334e-01 1.000000000000000e+00 3.000000000000000e-01
+-7.333333333333334e-01 1.000000000000000e+00 4.000000000000000e-01
+-7.333333333333334e-01 1.000000000000000e+00 5.000000000000000e-01
+-7.333333333333334e-01 1.000000000000000e+00 6.000000000000000e-01
+-7.333333333333334e-01 1.000000000000000e+00 7.000000000000000e-01
+-7.333333333333334e-01 1.000000000000000e+00 7.999999999999999e-01
+-7.333333333333334e-01 1.000000000000000e+00 8.999999999999999e-01
+-7.333333333333334e-01 1.000000000000000e+00 9.999999999999999e-01
+-8.000000000000000e-01 1.000000000000000e+00 0.000000000000000e+00
+-8.000000000000000e-01 1.000000000000000e+00 1.000000000000000e-01
+-8.000000000000000e-01 1.000000000000000e+00 2.000000000000000e-01
+-8.000000000000000e-01 1.000000000000000e+00 3.000000000000000e-01
+-8.000000000000000e-01 1.000000000000000e+00 4.000000000000000e-01
+-8.000000000000000e-01 1.000000000000000e+00 5.000000000000000e-01
+-8.000000000000000e-01 1.000000000000000e+00 6.000000000000000e-01
+-8.000000000000000e-01 1.000000000000000e+00 7.000000000000000e-01
+-8.000000000000000e-01 1.000000000000000e+00 7.999999999999999e-01
+-8.000000000000000e-01 1.000000000000000e+00 8.999999999999999e-01
+-8.000000000000000e-01 1.000000000000000e+00 9.999999999999999e-01
+-8.666666666666667e-01 1.000000000000000e+00 0.000000000000000e+00
+-8.666666666666667e-01 1.000000000000000e+00 1.000000000000000e-01
+-8.666666666666667e-01 1.000000000000000e+00 2.000000000000000e-01
+-8.666666666666667e-01 1.000000000000000e+00 3.000000000000000e-01
+-8.666666666666667e-01 1.000000000000000e+00 4.000000000000000e-01
+-8.666666666666667e-01 1.000000000000000e+00 5.000000000000000e-01
+-8.666666666666667e-01 1.000000000000000e+00 6.000000000000000e-01
+-8.666666666666667e-01 1.000000000000000e+00 7.000000000000000e-01
+-8.666666666666667e-01 1.000000000000000e+00 7.999999999999999e-01
+-8.666666666666667e-01 1.000000000000000e+00 8.999999999999999e-01
+-8.666666666666667e-01 1.000000000000000e+00 9.999999999999999e-01
+-9.333333333333333e-01 1.000000000000000e+00 0.000000000000000e+00
+-9.333333333333333e-01 1.000000000000000e+00 1.000000000000000e-01
+-9.333333333333333e-01 1.000000000000000e+00 2.000000000000000e-01
+-9.333333333333333e-01 1.000000000000000e+00 3.000000000000000e-01
+-9.333333333333333e-01 1.000000000000000e+00 4.000000000000000e-01
+-9.333333333333333e-01 1.000000000000000e+00 5.000000000000000e-01
+-9.333333333333333e-01 1.000000000000000e+00 6.000000000000000e-01
+-9.333333333333333e-01 1.000000000000000e+00 7.000000000000000e-01
+-9.333333333333333e-01 1.000000000000000e+00 7.999999999999999e-01
+-9.333333333333333e-01 1.000000000000000e+00 8.999999999999999e-01
+-9.333333333333333e-01 1.000000000000000e+00 9.999999999999999e-01
+-1.000000000000000e+00 1.000000000000000e+00 0.000000000000000e+00
+-1.000000000000000e+00 1.000000000000000e+00 1.000000000000000e-01
+-1.000000000000000e+00 1.000000000000000e+00 2.000000000000000e-01
+-1.000000000000000e+00 1.000000000000000e+00 3.000000000000000e-01
+-1.000000000000000e+00 1.000000000000000e+00 4.000000000000000e-01
+-1.000000000000000e+00 1.000000000000000e+00 5.000000000000000e-01
+-1.000000000000000e+00 1.000000000000000e+00 6.000000000000000e-01
+-1.000000000000000e+00 1.000000000000000e+00 7.000000000000000e-01
+-1.000000000000000e+00 1.000000000000000e+00 7.999999999999999e-01
+-1.000000000000000e+00 1.000000000000000e+00 8.999999999999999e-01
+-1.000000000000000e+00 1.000000000000000e+00 9.999999999999999e-01
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/constant.py b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/constant.py
new file mode 100644
index 0000000..5f14ea0
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/constant.py
@@ -0,0 +1,27 @@
+ACL_SUCCESS = 0
+
+# rule for mem
+ACL_MEM_MALLOC_HUGE_FIRST = 0
+ACL_MEM_MALLOC_HUGE_ONLY = 1
+ACL_MEM_MALLOC_NORMAL_ONLY = 2
+
+# rule for memory copy
+ACL_MEMCPY_HOST_TO_HOST = 0
+ACL_MEMCPY_HOST_TO_DEVICE = 1
+ACL_MEMCPY_DEVICE_TO_HOST = 2
+ACL_MEMCPY_DEVICE_TO_DEVICE = 3
+
+#numpy data type
+NPY_FLOAT32 = 11
+NPY_FLOAT16 = 23
+
+#profile para
+ACL_PROF_ACL_API = 1
+ACL_PROF_TASK_TIME = 2
+ACL_PROF_AICPU_TRACE = 4
+ACL_PROF_AICORE_METRICS = 8
+ACL_PROF_L2CACHE = 16
+
+
+
+
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/constants.py b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/constants.py
new file mode 100644
index 0000000..f0da3a1
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/constants.py
@@ -0,0 +1,222 @@
+# -*- coding: utf-8 -*-
+# @Author: sun
+# @Date:   2022-03-23 19:25:46
+# @Last Modified by:   sun
+# @Last Modified time: 2022-03-23 19:26:10
+"""
+Copyright (R) @huawei.com, all rights reserved
+-*- coding:utf-8 -*-
+CREATED:  2020-6-04 20:12:13
+MODIFIED: 2020-6-06 14:04:45
+"""
+SUCCESS = 0
+FAILED = 1
+
+ACL_DEVICE = 0
+ACL_HOST = 1
+
+MEMORY_NORMAL = 0
+MEMORY_HOST = 1
+MEMORY_DEVICE = 2
+MEMORY_DVPP = 3
+MEMORY_CTYPES = 4
+
+IMAGE_DATA_NUMPY = 0
+IMAGE_DATA_BUFFER = 1
+
+READ_VIDEO_OK = 0
+
+# error code
+ACL_SUCCESS = 0
+ACL_ERROR_INVALID_PARAM = 100000
+ACL_ERROR_UNINITIALIZE = 100001
+ACL_ERROR_REPEAT_INITIALIZE = 100002
+ACL_ERROR_INVALID_FILE = 100003
+ACL_ERROR_WRITE_FILE = 100004
+ACL_ERROR_INVALID_FILE_SIZE = 100005
+ACL_ERROR_PARSE_FILE = 100006
+ACL_ERROR_FILE_MISSING_ATTR = 100007
+ACL_ERROR_FILE_ATTR_INVALID = 100008
+ACL_ERROR_INVALID_DUMP_CONFIG = 100009
+ACL_ERROR_INVALID_PROFILING_CONFIG = 100010
+ACL_ERROR_INVALID_MODEL_ID = 100011
+ACL_ERROR_DESERIALIZE_MODEL = 100012
+ACL_ERROR_PARSE_MODEL = 100013
+ACL_ERROR_READ_MODEL_FAILURE = 100014
+ACL_ERROR_MODEL_SIZE_INVALID = 100015
+ACL_ERROR_MODEL_MISSING_ATTR = 100016
+ACL_ERROR_MODEL_INPUT_NOT_MATCH = 100017
+ACL_ERROR_MODEL_OUTPUT_NOT_MATCH = 100018
+ACL_ERROR_MODEL_NOT_DYNAMIC = 100019
+ACL_ERROR_OP_TYPE_NOT_MATCH = 100020
+ACL_ERROR_OP_INPUT_NOT_MATCH = 100021
+ACL_ERROR_OP_OUTPUT_NOT_MATCH = 100022
+ACL_ERROR_OP_ATTR_NOT_MATCH = 100023
+ACL_ERROR_OP_NOT_FOUND = 100024
+ACL_ERROR_OP_LOAD_FAILED = 100025
+ACL_ERROR_UNSUPPORTED_DATA_TYPE = 100026
+ACL_ERROR_FORMAT_NOT_MATCH = 100027
+ACL_ERROR_BIN_SELECTOR_NOT_REGISTERED = 100028
+ACL_ERROR_KERNEL_NOT_FOUND = 100029
+ACL_ERROR_BIN_SELECTOR_ALREADY_REGISTERED = 100030
+ACL_ERROR_KERNEL_ALREADY_REGISTERED = 100031
+ACL_ERROR_INVALID_QUEUE_ID = 100032
+ACL_ERROR_REPEAT_SUBSCRIBE = 100033
+ACL_ERROR_STREAM_NOT_SUBSCRIBE = 100034
+ACL_ERROR_THREAD_NOT_SUBSCRIBE = 100035
+ACL_ERROR_WAIT_CALLBACK_TIMEOUT = 100036
+ACL_ERROR_REPEAT_FINALIZE = 100037
+ACL_ERROR_BAD_ALLOC = 200000
+ACL_ERROR_API_NOT_SUPPORT = 200001
+ACL_ERROR_INVALID_DEVICE = 200002
+ACL_ERROR_MEMORY_ADDRESS_UNALIGNED = 200003
+ACL_ERROR_RESOURCE_NOT_MATCH = 200004
+ACL_ERROR_INVALID_RESOURCE_HANDLE = 200005
+ACL_ERROR_STORAGE_OVER_LIMIT = 300000
+ACL_ERROR_INTERNAL_ERROR = 500000
+ACL_ERROR_FAILURE = 500001
+ACL_ERROR_GE_FAILURE = 500002
+ACL_ERROR_RT_FAILURE = 500003
+ACL_ERROR_DRV_FAILURE = 500004
+# rule for mem
+ACL_MEM_MALLOC_HUGE_FIRST = 0
+ACL_MEM_MALLOC_HUGE_ONLY = 1
+ACL_MEM_MALLOC_NORMAL_ONLY = 2
+# rule for memory copy
+ACL_MEMCPY_HOST_TO_HOST = 0
+ACL_MEMCPY_HOST_TO_DEVICE = 1
+ACL_MEMCPY_DEVICE_TO_HOST = 2
+ACL_MEMCPY_DEVICE_TO_DEVICE = 3
+# input
+LAST_ONE = -1
+LAST_TWO = -2
+type_dict = {
+    "bool": 0,
+    "int8": 1,
+    "int16": 2,
+    "int32": 4,
+    "int64": 8,
+    "uint8": 1,
+    "uint16": 2,
+    "uint32": 4,
+    "uint64": 8,
+    "float16": 2,
+    "float32": 4,
+    "float64": 8,
+    "float_": 8
+}
+NPY_BOOL = 0
+NPY_BYTE = 1
+NPY_UBYTE = 2
+NPY_SHORT = 3
+NPY_USHORT = 4
+NPY_INT = 5
+NPY_UINT = 6
+NPY_LONG = 7
+NPY_ULONG = 8
+NPY_LONGLONG = 9
+NPY_ULONGLONG = 10
+
+ACL_DT_UNDEFINED = -1
+ACL_FLOAT = 0
+ACL_FLOAT16 = 1
+ACL_INT8 = 2
+ACL_INT32 = 3
+ACL_UINT8 = 4
+ACL_INT16 = 6
+ACL_UINT16 = 7
+ACL_UINT32 = 8
+ACL_INT64 = 9
+ACL_UINT64 = 10
+ACL_DOUBLE = 11
+ACL_BOOL = 12
+
+# data format
+ACL_FORMAT_UNDEFINED = -1
+ACL_FORMAT_NCHW = 0
+ACL_FORMAT_NHWC = 1
+ACL_FORMAT_ND = 2
+ACL_FORMAT_NC1HWC0 = 3
+ACL_FORMAT_FRACTAL_Z = 4
+ACL_DT_UNDEFINED = -1
+ACL_FLOAT = 0
+ACL_FLOAT16 = 1
+ACL_INT8 = 2
+ACL_INT32 = 3
+ACL_UINT8 = 4
+ACL_INT16 = 6
+ACL_UINT16 = 7
+ACL_UINT32 = 8
+ACL_INT64 = 9
+ACL_UINT64 = 10
+ACL_DOUBLE = 11
+ACL_BOOL = 12
+acl_dtype = {
+    "dt_undefined": -1,
+    "float": 0,
+    "float16": 1,
+    "int8": 2,
+    "int32": 3,
+    "uint8": 4,
+    "int16": 6,
+    "uint16": 7,
+    "uint32": 8,
+    "int64": 9,
+    "double": 11,
+    "bool": 12
+}
+ACL_CALLBACK_NO_BLOCK = 0
+ACL_CALLBACK_BLOCK = 1
+PIXEL_FORMAT_YUV_400 = 0  # 0, YUV400 8bit
+PIXEL_FORMAT_YUV_SEMIPLANAR_420 = 1  # 1, YUV420SP NV12 8bit
+PIXEL_FORMAT_YVU_SEMIPLANAR_420 = 2  # 2, YUV420SP NV21 8bit
+PIXEL_FORMAT_YUV_SEMIPLANAR_422 = 3  # 3, YUV422SP NV12 8bit
+PIXEL_FORMAT_YVU_SEMIPLANAR_422 = 4  # 4, YUV422SP NV21 8bit
+PIXEL_FORMAT_YUV_SEMIPLANAR_444 = 5  # 5, YUV444SP NV12 8bit
+PIXEL_FORMAT_YVU_SEMIPLANAR_444 = 6  # 6, YUV444SP NV21 8bit
+PIXEL_FORMAT_YUYV_PACKED_422 = 7  # 7, YUV422P YUYV 8bit
+PIXEL_FORMAT_UYVY_PACKED_422 = 8  # 8, YUV422P UYVY 8bit
+PIXEL_FORMAT_YVYU_PACKED_422 = 9  # 9, YUV422P YVYU 8bit
+PIXEL_FORMAT_VYUY_PACKED_422 = 10  # 10, YUV422P VYUY 8bit
+PIXEL_FORMAT_YUV_PACKED_444 = 11  # 11, YUV444P 8bit
+PIXEL_FORMAT_RGB_888 = 12  # 12, RGB888
+PIXEL_FORMAT_BGR_888 = 13  # 13, BGR888
+PIXEL_FORMAT_ARGB_8888 = 14  # 14, ARGB8888
+PIXEL_FORMAT_ABGR_8888 = 15  # 15, ABGR8888
+PIXEL_FORMAT_RGBA_8888 = 16  # 16, RGBA8888
+PIXEL_FORMAT_BGRA_8888 = 17  # 17, BGRA8888
+PIXEL_FORMAT_YUV_SEMI_PLANNER_420_10BIT = 18  # 18, YUV420SP 10bit
+PIXEL_FORMAT_YVU_SEMI_PLANNER_420_10BIT = 19  # 19, YVU420sp 10bit
+PIXEL_FORMAT_YVU_PLANAR_420 = 20  # 20, YUV420P 8bit
+# images format
+IMG_EXT = ['.jpg', '.JPG', '.png', '.PNG', '.bmp', '.BMP', '.jpeg', '.JPEG']
+
+ENCODE_FORMAT_UNKNOW = 0
+ENCODE_FORMAT_JPEG = 1
+ENCODE_FORMAT_PNG = 2
+ENCODE_FORMAT_YUV420_SP = 3
+
+"""
+enType 0
+0 H265 main level
+1 H264 baseline level
+2 H264 main level
+3 H264 high level
+"""
+ENTYPE_H265_MAIN = 0
+ENTYPE_H264_BASE = 1
+ENTYPE_H264_MAIN = 2
+ENTYPE_H264_HIGH = 3
+
+# h264 stream codec id
+AV_CODEC_ID_H264 = 27
+# h265 stream codec id
+AV_CODEC_ID_HEVC = 173
+# h264 baseline level
+FF_PROFILE_H264_BASELINE = 66
+# h264 main level profile
+FF_PROFILE_H264_MAIN = 77
+# h264 high level profile
+FF_PROFILE_H264_HIGH = 100
+# h265 main level profile
+FF_PROFILE_HEVC_MAIN = 1
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/grid/网格地址.txt b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/model/bf_op.om b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/model/bf_op.om
new file mode 100644
index 0000000..9a78683
Binary files /dev/null and b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/model/bf_op.om differ
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/model/model16.om b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/model/model16.om
new file mode 100644
index 0000000..a8c29ab
Binary files /dev/null and b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/model/model16.om differ
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/model/post_op.om b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/model/post_op.om
new file mode 100644
index 0000000..8dcc14b
Binary files /dev/null and b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/model/post_op.om differ
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/model/sca_max.dat b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/model/sca_max.dat
new file mode 100644
index 0000000..b729120
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/model/sca_max.dat
@@ -0,0 +1,11 @@
+1.758059999999999956e+00
+2.000000000000000000e+00
+2.439897850385851780e+04
+2.807202554172891773e-01
+1.568428388959923536e+00
+3.252984655737341745e+04
+6.350657835524052608e+00
+8.335128990177707919e+00
+2.718280000000000030e+00
+9.912202386492101613e-01
+8.296507258753202052e+01
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/model/sca_min.dat b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/model/sca_min.dat
new file mode 100644
index 0000000..fa25ae7
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/model/sca_min.dat
@@ -0,0 +1,11 @@
+-3.161399999999999766e-01
+1.000000000000000000e+00
+6.785513369607711652e-09
+-2.952159685173983972e-01
+-1.570732481737654673e+00
+9.089549089516115914e-08
+0.000000000000000000e+00
+0.000000000000000000e+00
+3.849111030207388786e-03
+-9.999999973001819642e-01
+8.539709649871904494e-07
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/my_module.py b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/my_module.py
new file mode 100644
index 0000000..191dddb
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/my_module.py
@@ -0,0 +1,615 @@
+# -*- coding: utf-8 -*-
+"""
+Created on Sun Nov 10 18:13:57 2019
+
+@author: sun
+
+Fortran 调用Python时的模块，包含一些必要的函数和类。如果需要改动增加新的函数与类，则需要写好之后重新
+编译DLL，如果只是更改函数内部的处理方式，则不需要。
+
+这个版本的程序传递过来的数据是最原始的流场变量数据，特征的构建和顺序需要在BuildFeatures函数里面完成
+模型的预测赋值也直接在pred函数里面完成，所以一定不要改pred函数里面x的值，否则数据可能会传递不过去
+这里只是不分区涡粘模型的写法，其他的类似
+如果需要提高运行速度，一个优化策略是有选择性的取消属性访问，比如把np.vstack改为form numpy import vstack，而且要尽量使用局部变量
+----2020.1.25s
+
+调用华为om模型执行推理  2022.4.20
+"""
+import numpy as np
+import time
+import acl
+
+import constants as const
+import acllite_utils as utils
+from acllite_logger import log_error, log_info, log_warning
+from acllite_resource import resource_list, AclLiteResource
+from omaclitemodel import AclLiteModel
+
+from constant import ACL_MEM_MALLOC_HUGE_FIRST, \
+    ACL_MEMCPY_HOST_TO_DEVICE, ACL_MEMCPY_DEVICE_TO_HOST, \
+    NPY_FLOAT32, ACL_SUCCESS, NPY_FLOAT16,ACL_PROF_ACL_API, \
+    ACL_PROF_TASK_TIME, ACL_PROF_AICPU_TRACE, ACL_PROF_AICORE_METRICS, ACL_PROF_L2CACHE
+
+buffer_method = {
+    "in": acl.mdl.get_input_size_by_index,
+    "out": acl.mdl.get_output_size_by_index
+    }
+
+# create the dictionary mapping ctypes to np dtypes
+
+ctype2dtype = {}
+
+# Intertypes
+for prefix in ('int', 'uint'):
+    for log_bytes in range(4):
+        ctype = '%s%d_t' % (prefix, 8 * (2 ** log_bytes))
+        dtype = '%s%d' % (prefix[0], 2 ** log_bytes)
+        ctype2dtype[ctype] = np.dtype(dtype)
+
+# Floating point types
+ctype2dtype['float'] = np.dtype('f4')
+ctype2dtype['double'] = np.dtype('f8')
+ctype2dtype['int'] = np.dtype('int32')
+
+def check_ret(message, ret):
+    if ret != ACL_SUCCESS:
+        raise Exception("{} failed ret={}"
+                        .format(message, ret))
+
+def GetDataFromPointer(ffi, pointer):
+    """
+    将指针的数据获取出来
+    """
+    T = ffi.getctype(ffi.typeof(pointer).item)
+    value = np.frombuffer(ffi.buffer(pointer, ffi.sizeof(T)),
+                          ctype2dtype[T])
+    value = value.item()
+    return value
+
+class BFNet(object):
+    def __init__(self, device_id, model_path, model_path_2, model_path_3):
+        self.device_id = device_id      # int
+        self.model_path = model_path    # string
+        self.model_path_2 = model_path_2
+        self.model_path_3 = model_path_3
+        self.model_id = None            # pointer
+        self.model_id_2 = None
+        self.model_id_3 = None
+        self.context = None             # pointer
+
+        self.input_data = []
+        self.output_data = []
+        self.output_data_2 = []
+        self.output_data_3 = []
+        self.model_desc = None          # pointer when using
+        self.model_desc_2 = None
+        self.model_desc_3 = None
+        self.load_input_dataset = None
+        self.load_output_dataset = None
+        self.load_output_dataset_2 = None
+        self.load_output_dataset_3 = None
+        self.prof_config = None
+
+        self.init_resource()
+
+    def __del__(self):
+        print("Releasing resources stage:")
+        ret = acl.mdl.unload(self.model_id)
+        # check_ret("acl.mdl.unload", ret)
+        ret = acl.mdl.unload(self.model_id_2)
+        # ret = acl.mdl.unload(self.model_id_3)
+        if self.model_desc:
+            acl.mdl.destroy_desc(self.model_desc)
+            self.model_desc = None
+        if self.model_desc_2:
+            acl.mdl.destroy_desc(self.model_desc_2)
+            self.model_desc_2 = None
+        if self.model_desc_3:
+            acl.mdl.destroy_desc(self.model_desc_3)
+            self.model_desc_3 = None
+
+        while self.input_data:
+            item = self.input_data.pop()
+            ret = acl.rt.free(item["buffer"])
+            # check_ret("acl.rt.free", ret)
+
+        while self.output_data:
+            item = self.output_data.pop()
+            ret = acl.rt.free(item["buffer"])
+            # check_ret("acl.rt.free", ret)
+
+        while self.output_data_2:
+            item = self.output_data_2.pop()
+            ret = acl.rt.free(item["buffer"])
+            # check_ret("acl.rt.free", ret)
+
+        while self.output_data_3:
+            item = self.output_data_3.pop()
+            ret = acl.rt.free(item["buffer"])
+            # check_ret("acl.rt.free", ret)
+
+        if self.context:
+            ret = acl.rt.destroy_context(self.context)
+            # check_ret("acl.rt.destroy_context", ret)
+            self.context = None
+
+
+        ret = acl.rt.reset_device(self.device_id)
+        # check_ret("acl.rt.reset_device", ret)
+        ret = acl.finalize()
+        # check_ret("acl.finalize", ret)
+        # print('Resources released successfully.')
+
+    def init_resource(self):
+        # print("init resource stage:")
+        ret = acl.init()
+        # check_ret("acl.init", ret)
+        ret = acl.rt.set_device(self.device_id)
+        # check_ret("acl.rt.set_device", ret)
+
+        self.context, ret = acl.rt.create_context(self.device_id)
+        # check_ret("acl.rt.create_context", ret)
+
+        # load_model
+        self.model_id, ret = acl.mdl.load_from_file(self.model_path)
+        # check_ret("acl.mdl.load_from_file", ret)
+        # print("model_id:{}".format(self.model_id))
+
+        self.model_id_2, ret = acl.mdl.load_from_file(self.model_path_2)
+        # check_ret("acl.mdl.load_from_file", ret)
+        # print("model_id_2:{}".format(self.model_id_2))
+
+        self.model_id_3, ret = acl.mdl.load_from_file(self.model_path_3)
+        check_ret("acl.mdl.load_from_file", ret)
+        # print("model_id_2:{}".format(self.model_id_2))
+
+        self.model_desc = acl.mdl.create_desc()
+        self._get_model_info()
+
+        self.model_desc_2 = acl.mdl.create_desc()
+        self._get_model_info_2()
+
+        self.model_desc_3 = acl.mdl.create_desc()
+        self._get_model_info_3()
+        # print("init resource success")
+
+    def _get_model_info(self,):
+        ret = acl.mdl.get_desc(self.model_desc, self.model_id)
+        # check_ret("acl.mdl.get_desc", ret)
+        input_size = acl.mdl.get_num_inputs(self.model_desc)
+        # print("input_size")
+        # print(input_size)
+        output_size = acl.mdl.get_num_outputs(self.model_desc)
+        # print("output_size")
+        # print(output_size)
+        self._gen_data_buffer(input_size, des="in")
+        self._gen_data_buffer(output_size, des="out")
+
+    def _get_model_info_2(self,):
+        ret = acl.mdl.get_desc(self.model_desc_2, self.model_id_2)
+        # check_ret("acl.mdl.get_desc", ret)
+        input_size = acl.mdl.get_num_inputs(self.model_desc_2)
+        # print("model_2_input_size")
+        # print(input_size)
+        output_size = acl.mdl.get_num_outputs(self.model_desc_2)
+        # print("model2_output_size")
+        # print(output_size)
+        # self._gen_data_buffer(input_size, des="in")
+        self._gen_data_buffer_2(output_size, des="out")
+
+    def _get_model_info_3(self,):
+        ret = acl.mdl.get_desc(self.model_desc_3, self.model_id_3)
+        # check_ret("acl.mdl.get_desc", ret)
+        input_size = acl.mdl.get_num_inputs(self.model_desc_3)
+        # print("model_3_input_size")
+        # print(input_size)
+        output_size = acl.mdl.get_num_outputs(self.model_desc_3)
+        # print("model_3_output_size")
+        # print(output_size)
+        # self._gen_data_buffer(input_size, des="in")
+        self._gen_data_buffer_3(output_size, des="out")
+
+    def _gen_data_buffer(self, size, des):
+        func = buffer_method[des]
+        for i in range(size):
+            # check temp_buffer dtype
+            temp_buffer_size = func(self.model_desc, i)
+            temp_buffer, ret = acl.rt.malloc(temp_buffer_size,
+                                             ACL_MEM_MALLOC_HUGE_FIRST)
+            # check_ret("acl.rt.malloc", ret)
+
+            if des == "in":
+                self.input_data.append({"buffer": temp_buffer,
+                                        "size": temp_buffer_size})
+            elif des == "out":
+                self.output_data.append({"buffer": temp_buffer,
+                                         "size": temp_buffer_size})
+
+    def _gen_data_buffer_2(self, size, des):
+        func = buffer_method[des]
+        for i in range(size):
+            # check temp_buffer dtype
+            temp_buffer_size = func(self.model_desc_2, i)
+            temp_buffer, ret = acl.rt.malloc(temp_buffer_size,
+                                             ACL_MEM_MALLOC_HUGE_FIRST)
+            # check_ret("acl.rt.malloc", ret)
+            #
+            # if des == "in":
+            #     self.input_data.append({"buffer": temp_buffer,
+            #                             "size": temp_buffer_size})
+            # elif des == "out":
+            self.output_data_2.append({"buffer": temp_buffer,
+                                    "size": temp_buffer_size})
+
+    def _gen_data_buffer_3(self, size, des):
+        func = buffer_method[des]
+        for i in range(size):
+            # check temp_buffer dtype
+            temp_buffer_size = func(self.model_desc_3, i)
+            temp_buffer, ret = acl.rt.malloc(temp_buffer_size,
+                                             ACL_MEM_MALLOC_HUGE_FIRST)
+            # check_ret("acl.rt.malloc", ret)
+            #
+            # if des == "in":
+            #     self.input_data.append({"buffer": temp_buffer,
+            #                             "size": temp_buffer_size})
+            # elif des == "out":
+            self.output_data_3.append({"buffer": temp_buffer,
+                                    "size": temp_buffer_size})
+
+    def _data_interaction(self, dataset, policy=ACL_MEMCPY_HOST_TO_DEVICE):
+        temp_data_buffer = self.input_data \
+            if policy == ACL_MEMCPY_HOST_TO_DEVICE \
+            else self.output_data_3
+        if len(dataset) == 0 and policy == ACL_MEMCPY_DEVICE_TO_HOST:
+            for item in self.output_data_3:
+                begin = time.time()
+                temp, ret = acl.rt.malloc_host(item["size"])
+                end = time.time()
+                # print(f"ACL_MEMCPY_HOST_TO_DEVICE malloc = {end-begin}")
+                # print("item[size]")
+                # print(item["size"])
+                if ret != 0:
+                    raise Exception("can't malloc_host ret={}".format(ret))
+                dataset.append({"size": item["size"], "buffer": temp})
+
+        for i, item in enumerate(temp_data_buffer):
+            if policy == ACL_MEMCPY_HOST_TO_DEVICE:
+                # print(f"i is {i}")
+                a = item["size"]
+                # print(f"size is {a}")
+                # print(i)
+                # print(dataset.shape)
+                ptr,_ = acl.util.numpy_contiguous_to_ptr(dataset[i])
+                begin = time.time()
+                ret = acl.rt.memcpy(item["buffer"],
+                                    item["size"],
+                                    ptr,
+                                    item["size"],
+                                    policy)
+                end = time.time()
+                # print(f"ACL_MEMCPY_HOST_TO_DEVICE = {end-begin}")
+                check_ret("acl.rt.memcpy", ret)
+
+            else:
+                # print(f"i is {i}")
+                a = item["size"]
+                # print(f"size is {a}")
+                ptr = dataset[i]["buffer"]
+                begin = time.time()
+                ret = acl.rt.memcpy(ptr,
+                                    item["size"],
+                                    item["buffer"],
+                                    item["size"],
+                                    policy)
+                end = time.time()
+                # print(f"ACL_MEMCPY_DEVICE_TO_HOST = {end-begin}")
+                check_ret("acl.rt.memcpy", ret)
+
+    def _gen_dataset(self, type_str="in"):
+        dataset = acl.mdl.create_dataset()
+
+        temp_dataset = None
+        if type_str == "in":
+            self.load_input_dataset = dataset
+            temp_dataset = self.input_data
+        elif type_str == "out":
+            self.load_output_dataset = dataset
+            temp_dataset = self.output_data
+        elif type_str == "out2":
+            self.load_output_dataset_2 = dataset
+            temp_dataset = self.output_data_2
+        elif type_str == "out3":
+            self.load_output_dataset_3 = dataset
+            temp_dataset = self.output_data_3
+
+        for item in temp_dataset:
+            data = acl.create_data_buffer(item["buffer"], item["size"])
+            _, ret = acl.mdl.add_dataset_buffer(dataset, data)
+
+            if ret != ACL_SUCCESS:
+                ret = acl.destroy_data_buffer(data)
+                # check_ret("acl.destroy_data_buffer", ret)
+
+    def _data_from_host_to_device(self, images):
+        # print("data interaction from host to device")
+        # copy images to device
+
+        begin = time.time()
+        # print("images is ", images)
+        # print(len(images))
+        self._data_interaction(images, ACL_MEMCPY_HOST_TO_DEVICE)
+
+        end = time.time()
+
+        # print(f"_data_from_host_to_device = {end-begin}")
+        # load input data into model
+        self._gen_dataset("in")
+        # load output data into model
+        self._gen_dataset("out")
+        # load second output data into model
+        self._gen_dataset("out2")
+        # # load third output data into model
+        self._gen_dataset("out3")
+        # # print("data interaction from host to device success")
+
+    def _data_from_device_to_host(self):
+        # print("data interaction from device to host")
+        res = []
+        # copy device to host
+        begin = time.time()
+
+        self._data_interaction(res, ACL_MEMCPY_DEVICE_TO_HOST)
+
+        end = time.time()
+
+        # print(f"_data_from_device_to_host = {end-begin}")
+        # print("data interaction from device to host success")
+        # result = self.get_result(res,self.model_desc_3, NPY_FLOAT32)
+        result = self.get_result(res, self.model_desc_3, NPY_FLOAT32)
+        # self._print_result(result)
+        # free host memory
+        # for item in res:
+        #     ptr = item['buffer']
+        #     ret = acl.rt.free_host(ptr)
+            # check_ret('acl.rt.free_host', ret)
+        return result
+    def run(self, images):
+        start = time.time()
+        self._data_from_host_to_device(images)
+        end = time.time()
+        # print(f"_data_from_host_to_device = {end-start}")
+        # self.start_profile()
+        self.forward()
+        end2 = time.time()
+        # print(f"forward = {end2-end}")
+        # self.end_profile(self.prof_config)
+        result = self._data_from_device_to_host()
+        end3 = time.time()
+        # print(f"_data_from_device_to_host = {end3-end2}")
+        return result
+
+    def forward(self):
+        # print('execute stage:')
+        start = time.time()
+        ret = acl.mdl.execute(self.model_id, self.load_input_dataset, self.load_output_dataset)
+        end1 = time.time()
+        # print(f"first om  time={end1 - start}")
+        # check_ret("acl.mdl.execute", ret)
+        # start = time.time()
+        ret = acl.mdl.execute(self.model_id_2, self.load_output_dataset, self.load_output_dataset_2)
+        end2 = time.time()
+        # print(f"second om time={end2 - end1}")
+        # check_ret("acl.mdl.execute", ret)
+        # start = time.time()
+        ret = acl.mdl.execute(self.model_id_3, self.load_output_dataset_2, self.load_output_dataset_3)
+        end3 = time.time()
+        # print(f"third om time={end3 - end2}")
+        # check_ret("acl.mdl.execute", ret)
+        self._destroy_databuffer()
+        # print('execute stage success')
+
+    def _print_result(self, result):
+        print(result)
+
+    def _destroy_databuffer(self):
+        # for dataset in [self.load_input_dataset, self.load_output_dataset, self.load_output_dataset_2, self.load_output_dataset_3]:
+        for dataset in [self.load_input_dataset, self.load_output_dataset, self.load_output_dataset_2, self.load_output_dataset_3]:
+        # for dataset in [self.load_input_dataset, self.load_output_dataset, self.load_output_dataset_2]:
+            if not dataset:
+                continue
+            number = acl.mdl.get_dataset_num_buffers(dataset)
+            for i in range(number):
+                data_buf = acl.mdl.get_dataset_buffer(dataset, i)
+                if data_buf:
+                    ret = acl.destroy_data_buffer(data_buf)
+                    # check_ret("acl.destroy_data_buffer", ret)
+            ret = acl.mdl.destroy_dataset(dataset)
+            # check_ret("acl.mdl.destroy_dataset", ret)
+
+    def get_result(self, output_data, model_desc, data_type):
+        result = []
+        dims, ret = acl.mdl.get_cur_output_dims(model_desc, 0)
+        # check_ret("acl.mdl.get_cur_output_dims", ret)
+        out_dim = dims['dims']
+        # print(tuple(out_dim))
+        for temp in output_data:
+            ptr = temp["buffer"]
+            # print(temp)
+            # 转化为float32类型的数据
+            data = acl.util.ptr_to_numpy(ptr, tuple(out_dim), data_type)
+            # print(data)
+            result.append(data)
+        return result
+
+def asarray(ffi, x_ptr, shape1_ptr, shape2_ptr):
+    """
+    x_ptr : Fortran传递过来的数组的地址
+    size_ptr : Fortran数组的大小的地址
+    因为传递过来的都是地址，因此需要先把地址中的数值取出来，才可以进行数据处理
+    """
+    shape = [GetDataFromPointer(ffi, pointer) for pointer in (shape1_ptr,
+                                                              shape2_ptr)]
+    length = np.prod(shape)
+    # Get the canonical C type of the elments of ptr as a string
+    T = ffi.getctype(ffi.typeof(x_ptr).item)
+    x = np.frombuffer(ffi.buffer(x_ptr, length * ffi.sizeof(T)),
+                      ctype2dtype[T]).reshape(shape, order='C')
+    return x
+
+def read_data(file_path):
+    with open(file_path, 'r') as f:
+        return np.array([float(x) for x in f.read().split()]).reshape(-1, 1)
+
+class pythonmodel(object):
+    def __init__(self):
+        """
+        类初始化
+        """
+        self.sca_min = np.loadtxt('./model/sca_min.dat').reshape(-1, 1)
+        self.sca_max = np.loadtxt('./model/sca_max.dat').reshape(-1, 1)
+        self.temp = np.ones((1300000, 17))
+        self.model1_path = "./model/bf_op.om"
+        self.model2_path = "./model/model16.om"
+        self.model3_path = "./model/post_op.om"
+        self.flag = 0
+        print('model loaded!')
+
+    def modelInit(self, zone_id):
+        """
+        om模型初始化
+        """
+        self.dev_id = zone_id % 8
+        # self.DSTURB_min = dis_min
+        self.bfnet = BFNet(self.dev_id, self.model1_path, self.model2_path, self.model3_path)
+
+    def BuildFeatures(self, x):
+        """
+        基于原始变量，构建模型需要的输入特征
+        x : 包含原始变量，依次为：Ru, U, V, W, P, Ux, Uy, Uz, Vx, Vy, Vz, Wx, Wy, Wz, Px, Py, Pz, x, y, z, dis, ma, aoa, re
+        """
+        ma = x[:, -2]
+        self.Re = x[:, -1]
+        print(self.Re.shape)
+        # eps = 1e-13
+        # aoa = x[:, -2]
+        Ru, P = x[:, 0], x[:, 3] * ma ** 2
+        U, V = x[:, 1], x[:, 2]
+        Ux, Uy, Uz = x[:, 4], x[:, 5], x[:, 6]
+        Vx, Vy, Vz = x[:, 7], x[:, 8], x[:, 9]
+        Wx, Wy, Wz = x[:, 10], x[:, 11], x[:, 12]
+        # Px, Py, Pz = x[:, 14] * ma ** 2, x[:, 15] * ma ** 2, x[:, 16] * ma ** 2
+        Y = x[:, 13]
+        dis = x[:, 14]
+        self.dis = dis
+
+        # q1 = np.sqrt(U**2 + V**2 + W**2)
+        q1 = U  # / np.sqrt(U**2 + V**2 + W**2)
+        # q1_2 = V / np.sqrt(U**2 + V**2 + W**2)
+
+        w1 = 0.5 * (Wy - Vz)
+        w2 = 0.5 * (Uz - Wx)
+        w3 = 0.5 * (Vx - Uy)
+        RF = np.sqrt(w1 ** 2 + w2 ** 2 + w3 ** 2)
+        # q2 = np.log(np.abs(RF) + 1.0)
+
+        q3 = (P / Ru ** 1.4) - 1.0
+
+        label = np.where(dis < 0.001, 1, 2)
+
+        sigY = np.sign(Y)
+        q5 = np.arctan(sigY * V / U)
+
+        S11 = Ux
+        S12 = 0.5 * (Uy + Vx)
+        S13 = 0.5 * (Uz + Wx)
+        S22 = Vy
+        S23 = 0.5 * (Vz + Wy)
+        S33 = Wz
+        SF = np.sqrt(S11 ** 2 + S12 ** 2 + S13 ** 2 + S22 ** 2 + S23 ** 2 + S33 ** 2)
+        # q7 = np.log(np.abs(SF) + 1.0)
+
+        q8 = dis ** 2 * RF * (1 - np.tanh(dis))
+        q9 = dis ** 2 * SF * (1 - np.tanh(dis))
+
+        Dref0 = 1.0 / np.sqrt(self.Re)
+        Dref1 = np.min([dis, Dref0], axis=0)
+        Dref2 = np.max([dis, Dref0], axis=0)
+        expfunc = 2.71828 ** (np.sqrt(Dref1 / (dis)))
+        q10 = expfunc * np.sqrt(Dref0 / (Dref2))
+
+        q11 = (RF ** 2 - SF ** 2) / (RF ** 2 + SF ** 2)
+
+        data = np.vstack((q1, label, RF, q3, q5, SF, q8, q9, q10, q11)).T  # 输入特征顺序
+
+        col = data.shape[1]
+        x = (data - self.sca_min[0:col, 0]) / (self.sca_max[0:col, 0] - self.sca_min[0:col, 0])
+        return x
+
+    def GetFueatures(self, x):
+        ma = x[:, -3]
+        self.Re = x[:, -1]
+        aoa = x[:, -2]
+        Ru, P = x[:, 0], x[:, 3]
+        U, V = x[:, 1], x[:, 2]
+        Ux, Uy = x[:, 4], x[:, 5]
+        Vx, Vy = x[:, 6], x[:, 7]
+        Y, self.dis = x[:, 8], x[:, 9]
+        data = [ma, aoa, self.Re, self.dis, Ux, U, V, Uy, Vx, Vy, Y, P, Ru]
+        return data
+
+    def ACT(self, x, low, up, length):
+        """
+        调用om模型预测涡粘
+        low: 归一化下界
+        up: 归一化上界
+        x: 输入特征，np.array格式
+        """
+        x = x.astype(np.float32)
+        ptr, data_out = acl.util.numpy_contiguous_to_ptr(x)
+        pred = self.bfnet.run([data_out])[0]
+        pred = pred[0:length]
+        return pred
+
+    def Pred(self, x):
+        """
+        模型预测涡粘
+        """
+        start = time.time()
+        length = x.shape[0]
+        self.temp[0:length, :] = x[:, :]
+        low, up = 0.0, 1.0
+        pred = self.ACT(self.temp, low, up, length)
+        x[:, 0] = pred[:].copy()
+        end = time.time()
+
+def post_op(pred, low, high) :
+    sca_min = np.loadtxt('./model/sca_min.dat').reshape(-1, )
+    sca_max = np.loadtxt('./model/sca_max.dat').reshape(-1, )
+
+    Re = 11710000
+
+    pred = np.clip(pred[:, 0], low, high).reshape(-1, 1)
+    
+    mut_min = 8.539709649871904494e-07
+    mut_max = 8.296507258753202052e+01
+    pred = pred * (mut_max - mut_min) + mut_min
+    pred = pred * (Re / 1e6)
+    return pred
+
+if __name__ == "__main__" :
+
+    model_2 = pythonmodel()
+    model_2.modelInit(5)
+
+    np.random.seed(4)
+    x = np.random.rand(1300000, 17).astype(np.float32)
+    y = x.copy()
+    model_2.Pred(y)
+    pred_2 = y[:, 0]
+    print("**********")
+    print(pred_2)
+    print(type(pred_2))
+    print(pred_2.mean())
+    print(pred_2.std())
+    print(pred_2.shape)
diff --git a/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/omaclitemodel.py b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/omaclitemodel.py
new file mode 100644
index 0000000..ed0167f
--- /dev/null
+++ b/phenglei/tutorials/Y02_ThreeD_M6_Unstruct_Branch_Ascend/omaclitemodel.py
@@ -0,0 +1,347 @@
+"""
+Copyright (R) @huawei.com, all rights reserved
+-*- coding:utf-8 -*-
+CREATED:  2020-6-04 20:12:13
+MODIFIED: 2020-6-28 14:04:45
+"""
+import acl
+import struct
+import numpy as np
+import datetime
+import sys
+import os
+import time
+#from tqdm import tqdm
+
+import constants as const
+import acllite_utils as utils
+from acllite_logger import log_error, log_info, log_warning
+from acllite_resource import resource_list, AclLiteResource
+
+class AclLiteModel(object):
+    """
+    wrap acl model inference interface, include input dataset construction,
+    execute, and output transform to numpy array
+    Attributes:
+        model_path: om offline mode file path
+    """
+
+    def __init__(self, model_path):
+        self._run_mode, ret = acl.rt.get_run_mode()
+        utils.check_ret("acl.rt.get_run_mode", ret)
+        self._copy_policy = const.ACL_MEMCPY_DEVICE_TO_DEVICE
+        if self._run_mode == const.ACL_HOST:
+            self._copy_policy = const.ACL_MEMCPY_DEVICE_TO_HOST
+
+        self._model_path = model_path    # string
+        self._model_id = None            # pointer
+        self._input_num = 0
+        self._input_buffer = []
+        self._input_dataset = None
+        self._output_dataset = None
+        self._model_desc = None          # pointer when using
+        self._output_size = 0
+        self._is_destroyed = False
+        self._init_resource()
+        resource_list.register(self)
+
+    def _init_resource(self):
+        log_info("Init model resource start...")
+        if not os.path.isfile(self._model_path):
+            log_error(
+                "model_path failed, please check. model_path=%s" %
+                self._model_path)
+            return const.FAILED
+
+        self._model_id, ret = acl.mdl.load_from_file(self._model_path)
+        print(self._model_id, ret)
+        utils.check_ret("acl.mdl.load_from_file", ret)
+        self._model_desc = acl.mdl.create_desc()
+        ret = acl.mdl.get_desc(self._model_desc, self._model_id)
+        utils.check_ret("acl.mdl.get_desc", ret)
+        # get outputs num of model
+        self._output_size = acl.mdl.get_num_outputs(self._model_desc)
+        # create output dataset
+        self._gen_output_dataset(self._output_size)
+        # recode input data address,if need malloc memory,the memory will be
+        # reuseable
+        self._init_input_buffer()
+
+        log_info("Init model resource success")
+
+        return const.SUCCESS
+
+    def _gen_output_dataset(self, ouput_num):
+        log_info("[AclLiteModel] create model output dataset:")
+        dataset = acl.mdl.create_dataset()
+        for i in range(ouput_num):
+            # malloc device memory for output
+            size = acl.mdl.get_output_size_by_index(self._model_desc, i)
+            buf, ret = acl.rt.malloc(size, const.ACL_MEM_MALLOC_NORMAL_ONLY)
+            utils.check_ret("acl.rt.malloc", ret)
+            # crate oputput data buffer
+            dataset_buffer = acl.create_data_buffer(buf, size)
+            _, ret = acl.mdl.add_dataset_buffer(dataset, dataset_buffer)
+            log_info("malloc output %d, size %d" % (i, size))
+            if ret:
+                acl.rt.free(buf)
+                acl.destroy_data_buffer(dataset_buffer)
+                utils.check_ret("acl.destroy_data_buffer", ret)
+        self._output_dataset = dataset
+        log_info("Create model output dataset success")
+
+    def _init_input_buffer(self):
+        self._input_num = acl.mdl.get_num_inputs(self._model_desc)
+        for i in range(self._input_num):
+            item = {"addr": None, "size": 0}
+            self._input_buffer.append(item)
+
+    def _gen_input_dataset(self, input_list):
+        ret = const.SUCCESS
+        if len(input_list) != self._input_num:
+            log_error("Current input data num %d unequal to model "
+                      "input num %d" % (len(input_list), self._input_num))
+            return const.FAILED
+
+        self._input_dataset = acl.mdl.create_dataset()
+        for i in range(self._input_num):
+            item = input_list[i]
+            data, size = self._parse_input_data(item, i)
+            if (data is None) or (size == 0):
+                ret = const.FAILED
+                log_error("The %d input is invalid" % (i))
+                break
+
+            model_size = acl.mdl.get_input_size_by_index(self._model_desc, i)
+            if size != model_size:
+                log_warning(" Input[%d] size: %d not equal om size: %d" % (i, size, model_size) +\
+                        ", may cause inference result error, please check model input")
+
+
+            dataset_buffer = acl.create_data_buffer(data, size)
+            _, ret = acl.mdl.add_dataset_buffer(self._input_dataset,
+                                                dataset_buffer)
+            if ret:
+                log_error("Add input dataset buffer failed")
+                acl.destroy_data_buffer(self._input_dataset)
+                ret = const.FAILED
+                break
+        if ret == const.FAILED:
+            self._release_dataset(self._input_dataset)
+            self._input_dataset = None
+
+        return ret
+
+    def _parse_input_data(self, input_data, index):
+        data = None
+        size = 0
+        if isinstance(input_data, np.ndarray):
+            ptr = acl.util.numpy_to_ptr(input_data)
+            size = input_data.size * input_data.itemsize
+            data = self._copy_input_to_device(ptr, size, index)
+            if data is None:
+                size = 0
+                log_error("Copy input to device failed")
+        elif (isinstance(input_data, dict) and
+              ('data' in input_data.keys()) and ('size' in input_data.keys())):
+            size = input_data['size']
+            data = input_data['data']
+        else:
+            log_error("Unsupport input")
+
+        return data, size
+
+    def _copy_input_to_device(self, input_ptr, size, index):
+        buffer_item = self._input_buffer[index]
+        data = None
+        if buffer_item['addr'] is None:
+            if self._run_mode == const.ACL_HOST:
+                data = utils.copy_data_host_to_device(input_ptr, size)
+            else:
+                data = utils.copy_data_device_to_device(input_ptr, size)
+            if data is None:
+                log_error("Malloc memory and copy model %dth "
+                          "input to device failed" % (index))
+                return None
+            buffer_item['addr'] = data
+            buffer_item['size'] = size
+        elif size == buffer_item['size']:
+            if self._run_mode == const.ACL_HOST:
+                ret = acl.rt.memcpy(buffer_item['addr'], size,
+                                    input_ptr, size,
+                                    const.ACL_MEMCPY_HOST_TO_DEVICE)
+            else:
+                ret = acl.rt.memcpy(buffer_item['addr'], size,
+                                    input_ptr, size,
+                                    const.ACL_MEMCPY_DEVICE_TO_DEVICE)
+            if ret != const.ACL_SUCCESS:
+                log_error("Copy model %dth input to device failed" % (index))
+                return None
+            data = buffer_item['addr']
+        else:
+            log_error("The model %dth input size %d is change,"
+                      " before is %d" % (index, size, buffer_item['size']))
+            return None
+
+        return data
+
+    def execute(self, input_list):
+        """
+        inference input data
+        Args:
+            input_list: input data list, support AclLiteImage,
+            numpy array and {'data': ,'size':} dict
+        returns:
+            inference result data, which is a numpy array list,
+            each corresponse to a model output
+        """
+        ret = self._gen_input_dataset(input_list)
+        if ret == const.FAILED:
+            log_error("Gen model input dataset failed")
+            return None
+
+        ret = acl.mdl.execute(self._model_id,
+                              self._input_dataset,
+                              self._output_dataset)
+        if ret != const.ACL_SUCCESS:
+            log_error("Execute model failed for acl.mdl.execute error ", ret)
+            return None
+
+        self._release_dataset(self._input_dataset)
+        self._input_dataset = None
+
+        return self._output_dataset_to_numpy()
+
+    def _output_dataset_to_numpy(self):
+        dataset = []
+        output_tensor_list = self._gen_output_tensor()
+        num = acl.mdl.get_dataset_num_buffers(self._output_dataset)
+
+        for i in range(num):
+            buf = acl.mdl.get_dataset_buffer(self._output_dataset, i)
+            data = acl.get_data_buffer_addr(buf)
+            size = int(acl.get_data_buffer_size(buf))
+            output_ptr = output_tensor_list[i]["ptr"]
+            output_tensor = output_tensor_list[i]["tensor"]
+            ret = acl.rt.memcpy(output_ptr,
+                                output_tensor.size * output_tensor.itemsize,
+                                data, size, self._copy_policy)
+            if ret != const.ACL_SUCCESS:
+                log_error("Memcpy inference output to local failed")
+                return None
+
+            dataset.append(output_tensor)
+
+        return dataset
+
+    def _gen_output_tensor(self):
+        output_tensor_list = []
+        for i in range(self._output_size):
+            dims = acl.mdl.get_output_dims(self._model_desc, i)
+            shape = tuple(dims[0]["dims"])
+            datatype = acl.mdl.get_output_data_type(self._model_desc, i)
+            size = acl.mdl.get_output_size_by_index(self._model_desc, i)
+
+            if datatype == const.ACL_FLOAT:
+                np_type = np.float32
+                output_tensor = np.zeros(
+                    size // 4, dtype=np_type).reshape(shape)
+            elif datatype == const.ACL_INT32:
+                np_type = np.int32
+                output_tensor = np.zeros(
+                    size // 4, dtype=np_type).reshape(shape)
+            elif datatype == const.ACL_UINT32:
+                np_type = np.uint32
+                output_tensor = np.zeros(
+                    size // 4, dtype=np_type).reshape(shape)
+            elif datatype == const.ACL_FLOAT16:
+                np_type = np.float16
+                output_tensor = np.zeros(
+                    size // 2, dtype=np_type).reshape(shape)
+            elif datatype == const.ACL_BOOL or datatype == const.ACL_UINT8:
+                np_type = np.uint8
+                output_tensor = np.zeros(
+                    size, dtype=np_type).reshape(shape)
+            else:
+                print("Unspport model output datatype ", datatype)
+                return None
+
+            if not output_tensor.flags['C_CONTIGUOUS']:
+                output_tensor = np.ascontiguousarray(output_tensor)
+
+            tensor_ptr = acl.util.numpy_to_ptr(output_tensor)
+            output_tensor_list.append({"ptr": tensor_ptr,
+                                       "tensor": output_tensor})
+
+        return output_tensor_list
+
+    def _release_dataset(self, dataset, free_memory=False):
+        if not dataset:
+            return
+
+        num = acl.mdl.get_dataset_num_buffers(dataset)
+        for i in range(num):
+            data_buf = acl.mdl.get_dataset_buffer(dataset, i)
+            if data_buf:
+                self._release_databuffer(data_buf, free_memory)
+
+        ret = acl.mdl.destroy_dataset(dataset)
+        if ret != const.ACL_SUCCESS:
+            log_error("Destroy data buffer error ", ret)
+
+    def _release_databuffer(self, data_buffer, free_memory=False):
+        if free_memory:
+            data_addr = acl.get_data_buffer_addr(data_buffer)
+            if data_addr:
+                acl.rt.free(data_addr)
+
+        ret = acl.destroy_data_buffer(data_buffer)
+        if ret != const.ACL_SUCCESS:
+            log_error("Destroy data buffer error ", ret)
+
+    def destroy(self):
+        """
+        release resource of model inference
+        Args:
+            null
+        Returns:
+            null
+        """
+        if self._is_destroyed:
+            return
+
+        self._release_dataset(self._output_dataset, free_memory=True)
+        if self._model_id:
+            ret = acl.mdl.unload(self._model_id)
+            if ret != const.ACL_SUCCESS:
+                log_info("acl.mdl.unload error:", ret)
+
+        if self._model_desc:
+            ret = acl.mdl.destroy_desc(self._model_desc)
+            if ret != const.ACL_SUCCESS:
+                log_info("acl.mdl.destroy_desc error:", ret)
+
+        self._is_destroyed = True
+        resource_list.unregister(self)
+        log_info("AclLiteModel release source success")
+
+    def __del__(self):
+        self.destroy()
+
+'''
+# 初始化模型
+model_path = './model/model.om'
+acl_resource = AclLiteResource()
+acl_resource.init()
+model = AclLiteModel(model_path)
+data = np.load('./data/data.npy').astype(np.float32)
+x = data[:, 0:8].copy()
+ptr = acl.util.numpy_to_ptr(x)
+y = data[:, -1]
+pred = model.execute([x])[0][:, 0]
+mse = mean_squared_error(y, pred)
+r2 = r2_score(y, pred)
+print("---------")
+print(f"mse = {mse}")
+print(f"r2 = {r2}")
+'''
diff --git a/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/cfd_para.hypara b/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..ccb0172
--- /dev/null
+++ b/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,234 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep        = 20000;
+
+int intervalStepFlow   = 20000;
+int intervalStepPlot   = 20000;
+int intervalStepSample = 100;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 19;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 9.0e6;
+double refDimensionalTemperature = 288.0;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+//int    viscousType    = 1;
+//string viscousName = "laminar";
+
+int    viscousType    = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 2;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 10.0;
+
+int nLUSGSSweeps = 5;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/30p30n_str__4.fts";
+int plotFieldType = 0;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//              0 -- No.
+//              1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                 0 -- Probes data monitor.
+//                 1 -- Lines data monitor.
+//                 2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                 0 -- Nearest cell nearest to the probe.
+//                 1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                 0 -- Take the value of probe's cell as probe real value.
+//                 1 -- Interpolation from probe's and neighbouring cell to probe.
+//                 2 -- Interpolation from probe's cell nodes to probe.
+
+int ifSetDataMonitor = 1;
+
+int dataMonitorType = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables = 6;
+int probeVariables[] = [0, 1, 2, 3, 4, 5];
+
+int probeVariablesInterpolationMethod = 0;
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
diff --git a/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/grid_para.hypara b/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..380a737
--- /dev/null
+++ b/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 1;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 3;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/30p30n_str.grd";
+string out_gfile  = "./grid/30p30n_str.fts";
diff --git a/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/key.hypara b/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/key.hypara
new file mode 100644
index 0000000..7056af2
--- /dev/null
+++ b/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 2;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/partition.hypara b/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/partition.hypara
new file mode 100644
index 0000000..0028d2c
--- /dev/null
+++ b/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/partition.hypara
@@ -0,0 +1,21 @@
+// pgridtype: The grid type. 
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+// maxproc:   The number of partition zones that want to be divided into,
+//            which is equal to the number of CPU processors you want.
+//            Usually, 50~100 thousands structured cells per CPU-Core is suggested.
+//            30~70  thousands unstructured cells per CPU-Core is suggested.
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+
+int pgridtype = 1;
+int maxproc   = 4;
+
+string original_grid_file  = "./grid/30p30n_str.fts";
+string partition_grid_file = "./grid/30p30n_str__4.fts";
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level. 
+//                    N -- N level,..., et al.
+int numberOfMultigrid = 3;
diff --git a/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/probes_XYZ.dat b/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/probes_XYZ.dat
new file mode 100644
index 0000000..ea2751a
--- /dev/null
+++ b/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/bin/probes_XYZ.dat
@@ -0,0 +1,12 @@
+#----------------------------------#
+#  Total Probes Number             #
+#----------------------------------#
+    4
+#----------------------------------#
+#  Probes Coordinate,unit of m.    #
+#  x         y          z          #
+#----------------------------------#
+-0.148 -0.102 0.0
+0.041 0.179 0.0
+0.802 0.059 0.0
+1.551 -0.374 0.0
diff --git a/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/grid/网格地址.txt b/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/二维结构30P30N点监控算例测试说明.pdf b/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/二维结构30P30N点监控算例测试说明.pdf
new file mode 100644
index 0000000..ea0d815
Binary files /dev/null and b/phenglei/tutorials/Z01_TwoD_30p30n_ProbesMonitor_SA_Struct_4CPU/二维结构30P30N点监控算例测试说明.pdf differ
diff --git a/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/bin/cfd_para.hypara b/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/bin/cfd_para.hypara
new file mode 100644
index 0000000..e757191
--- /dev/null
+++ b/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/bin/cfd_para.hypara
@@ -0,0 +1,1499 @@
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+//          PPPPP  H   H  EEEEE  N    N  GGGGG  L      EEEEE  III         +
+//          P   P  H   H  E      NN   N  G      L      E       I          +
+//          PPPPP  HHHHH  EEEEE  N N  N  G  GG  L      EEEEE   I          +
+//          P      H   H  E      N  N N  G   G  L      E       I          +
+//          P      H   H  EEEEE  N    N  GGGGG  LLLLL  EEEEE  III         +
+//------------------------------------------------------------------------+
+//          Platform for Hybrid Engineering Simulation of Flows           +
+//          China Aerodynamics Research and Development Center            +
+//                     (C) Copyright, Since 2010                          +
+//                         PHengLEI 2312                                  +
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+###########################################################################
+#                       Default parameters for Grid conversion            #
+###########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//             0 -- Unstructured grid.
+//             1 -- Structured grid.
+//             2 -- Hybrid grid, include both of unstructured and structured grid.
+// gridobj: Task type of grid treatment.
+//             0 -- Grid generation of typical case, such as cylinder, flat plate, etc.
+//             1 -- Grid conversion, from other grid data to PHenglEI, such as Fluent, CGNS.
+//             2 -- Grid refinement.
+//             3 -- Grid merging, merge two blocks into one block.
+//             4 -- Grid deformation, achieve unstructured grid deformation.
+//             5 -- Grid repairing, repair the original grid in order to remove the negative volume cells.
+//             6 -- Grid mirroring, mirror a symmetry grid to whole grid.
+//             7 -- Grid type change, convert structured grid to unstructured grid.
+// multiblock: Multi-block grid or not, only for structured grid conversion.
+//             0 -- Not.
+//             1 -- Yes.
+// iadapt: Adaptation number for unstructure grid.
+// SymmetryFaceVector: The vector of symmetry face.
+//             0 -- X axis.
+//             1 -- Y axis.
+//             2 -- Z axis.
+// gridReorder: Reorder cell and face of grid or not, only for 3D unstructured grid conversion,
+//              which is CGNS type.
+//             0 -- Not.
+//             1 -- Yes.
+// faceReorderMethod: the reorder method face of unstructured grid.
+//             0 -- BSFCELLFACEORG.
+//             1 -- BSFCELLFACELEFT. 
+//             2 -- BSFCELLFACERIGHT.
+int gridtype            = 0;
+int gridobj             = 1;
+int multiblock          = 0;
+int iadapt              = 0;
+int SymmetryFaceVector  = 1;
+int gridReorder         = 0;
+int faceReorderMethod   = 0;
+
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order. The size of array "axisRotateOrder" is equal to nAxisRotateTimes.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order. 
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0]; 
+
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+int omit_no_bound_bc = 0;
+int omitRepeatInterface = 1;
+
+//-----------------------------------------------------------------------
+#                           Grid data type                              #
+//-----------------------------------------------------------------------
+// from_gtype/to_gtype: Type of grid data type in grid conversion process.
+//                     -1 -- MULTI_TYPE.
+//                      1 -- PHengLEI, *.fts.
+//                      2 -- CGNS, *.cgns.
+//                      3 -- Plot3D type of structured grid, *.dat/*.grd.
+//                      4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//                      5 -- Fluent, *.cas/*.msh.
+//                      6 -- Ustar, mgrid.in.
+//                      7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//                      8 -- GMSH, *.msh.
+//                      9 -- Gridgen type of structured grid, *.dat/*.grd.
+// dumpOldGrid: If dump out the old grid file.
+//              0 -- Not. (default)
+//              1 -- Yes.
+int from_gtype  = 2;
+int to_gtype    = 1;
+int dumpOldGrid = 0;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+int numberOfGridFile = 1;
+string from_gfile    = "./grid/rae2822_hybrid2d.cas";
+string from_gfile1   = "";
+string out_gfile     = "./grid/flat_laminr_133_85_2d.fts";
+
+// ----------------- some advanced choices ------------------------------
+// iunsteady: The Grid is for unsteady simulation or not.
+int iunsteady = 0;
+
+// fileformat: Ustar Grid file format.
+//             0 -- BINARY.
+//             1 -- ASCII.
+int fileformat = 0;
+
+// Parameters for hybrid solver.
+// mixgrid_uns: path of unstructure grid file for hybrid solver, *.fts type.
+// mixgrid_str: path of structure   grid file for hybrid solver, *.fts type.
+string mixgrid_uns = "./grid/rae2822_uns2d_4.fts";
+string mixgrid_str = "./grid/flat_laminr_133_85_2d.fts";
+
+// Some parameters for structured overlapping grid.
+int    codeOfDigHoles      = 1;
+string holeBasicFileName   = "./oversetGridView/holeBasicFile.inp";
+string holeFullFileName    = "./oversetGridView/holeFullFile.dat";
+string linkFileName        = "./oversetGridView/topology.dat";
+string zoneInverseFileName = "./oversetGridView/zoneInverseMapping.inp";
+
+// ----------------- Grid Refine Parameters -----------------------------
+// anisoRefine: If refine grid by anisoRefine type.
+//              0 -- Not. (default)
+//              1 -- Yes.
+// geometryUnit: Geometry unit.
+//              1 -- meter.
+//              2 -- millimeter.
+//              3 -- inch.
+// exclusiveCase: Parallel projection exclusive case.
+//              0 -- NON case.
+//              1 -- JSM-C2-NPOFF case.
+//              2 -- CHNT.
+// projectOrgPoint: If the original wall points need to be projected or not.
+int anisoRefine     = 0;
+int geometryUnit    = 1;
+int isProject       = 0;
+int readDist        = 0;
+int isDeform        = 0;
+int exclusiveCase   = 0;
+int projectOrgPoint = 0;
+string geometryFileName = "./grid/jsm.igs";
+
+// ----------------- Grid Deform Parameters -----------------------------
+// deformationMethod: Grid Deform.
+//                    1 -- SPRING.
+//                    2 -- RBF.
+// stationalGridFile: Original grid file.
+// visualFileName   : The visualization file path of deform grid.
+// nDeformStep      : The max deform step.
+// flapAngle        : The max flap angle.
+// rotatePostionZ   : Rotate postion.
+// rotatePostionY   : Rotate postion.
+// gridSlice        : If dump slice grid.
+// sliceAxis        : Grid slice axis.
+// slicePosition    : Grid slice position.
+int    nDeformStep    = 40;
+double flapAngle      = 10.0;
+double rotatePostionZ = 4.00003;
+double rotatePostionY = 3.05;
+
+int    deformationMethod = 2;
+string stationalGridFile = "./grid/Segment2Brid.fts";
+string visualFileName    = "./results/deformedGrid.dat"
+
+int    gridSlice     = 1;
+int    sliceAxis     = 1;
+double slicePosition = 13;
+
+// ----------------- RBF Parameters -------------------------------------
+// numberOfReferenceCP: Number of reference Control Points.
+// influencePara      : The RBF influence radius parameter.
+int numberOfReferenceCP = 40;
+double influencePara    = 25.0;
+
+// ----------------- Periodic Parameters --------------------------------
+// Notice: Rotational periodicity only support rotation along the X axis!
+// periodicType: Which periodic boundary is used.
+//               0 -- without Periodic Boundary.
+//               1 -- Translational periodicity.
+//               2 -- Rotational periodicity.
+// translationLength[]: The relative distance between two periodic face
+                        which only support one direction.
+// rotationAngle: The relative angle between two periodic face.
+                  which is recorded in degrees.  
+int periodicType = 0; 
+double translationLength[] = [0.0, 0.0, 0.0];
+double rotationAngle = 0.0;
+
+#########################################################################
+#                       Default parameters for Partition                #
+#########################################################################
+// pgridtype: The grid type.
+//            0 -- unstruct grid.
+//            1 -- struct grid.
+//            2 -- refine structured grid.
+// maxproc: The number of partition zones that want to be divided into.
+// numberOfMultifile: The number of partition grid files that want to be dumped out.
+int pgridtype = 0;
+int maxproc   = 4;
+int numberOfMultifile = 1;
+
+// traceMark: Trace mark or not, only for structured grid partition.
+//            0 -- Not.
+//            1 -- Yes.
+// blockIndexOfMark: the block index of mark, only for structured grid partition.
+// cellIndexOfMark : the cell  index of mark, only for structured grid partition.
+int traceMark        = 0;
+int blockIndexOfMark = 0;
+int cellIndexOfMark[] = [185, 30, 1];
+
+// parallelStrategy:
+//            0 -- each zone is assigned to the one that defined in grid partition procedure.
+//            1 -- random assigned for each zone or by some else ways.
+int parallelStrategy = 1;
+
+//-----------------------------------------------------------------------
+#                           File path                                   #
+//-----------------------------------------------------------------------
+// original_grid_file:  Original grid file that want to be divided(PHengLEI type, *.fts).
+// partition_grid_file: Target partition grid file(PHengLEI type, *.fts).
+string original_grid_file  = "./grid/sphere_mixed.fts";
+string partition_grid_file = "./grid/sphere_mixed__4.fts";
+
+// ------------------ Sompe advanced parameters -------------------------
+// omit_no_bound_bc: What's boundary condition for the type of "no_boundary_condition".
+//                   0 -- Interface. (default)
+//                   1 -- Physical boundary condition, used in Hybrid solver.
+// npartmethod: Method of interface reconstruction, default is 1.
+// parallelPartitionMethod: Method of parallel partition, this is set only when execute parallel partition. It would be skipped when serial partition.
+//                   1 -- Using ParMetis for homogeneous MPI.
+//                   2 -- Using Metis for homogeneous MPI.
+//                   3 -- using METIS partition for homogeneous OpenMP.
+// parmetisBalance: Used to specify the imbalance tolerance.
+//                   1 -- perfect balance.
+//             maxproc -- perfect imbalance.
+//                1.05 -- recommended.
+int omit_no_bound_bc        = 0;
+int npartmethod             = 1;
+int parallelPartitionMethod = 2;
+double parmetisBalance      = 1.05;
+
+// numberOfMultigrid: Number of multi-grid levels, ONLY used for structured grid.
+//                    1 -- single level.
+//                    2 -- 2 level.
+//                    N -- N level, ..., et al.
+int numberOfMultigrid = 1;
+
+#########################################################################
+#                     Default parameters for CFD simulation             #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow:   The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot:   The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce:  The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes:    The step intervals for residual file 'res.dat' saved.
+int maxSimuStep        = 20000;
+int intervalStepFlow   = 1000;
+int intervalStepPlot   = 1000;
+int intervalStepSample = 1000;
+int intervalStepForce  = 100;
+int intervalStepRes    = 10;
+
+// compressible:
+//               0 -- incompressible flow.
+//               1 -- compressible flow. (default)
+int compressible = 1;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+// Kprec: The coefficient K for the cut-off velocity.
+//        1.0~3.0 is suggested. (default, 3.0)
+// preconFarfieldBCMethod: The precondition method for farfield boundary condition.
+//                         0 -- precondition far-field boundary based on riemann invariants. 
+//                         1 -- Turkel's simplified far-field boundary condition.
+int ifLowSpeedPrecon = 0;
+double Kprec = 3.0;
+int preconFarfieldBCMethod = 1;
+
+//-----------------------------------------------------------------------
+#                           CFD Control Parameter                       #
+//-----------------------------------------------------------------------
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions. (Useless!)
+//                 4 -- the condition that the velocity, temperature and density are given.
+//                 5 -- the condition that the velocity, temperature and pressure are given.
+//flowInitMethod: Flow field initialization method.
+//                 0 -- The entire flow field is initialized according to Infinite velocity.
+//                 1 -- The velocity near the wall is initialized according to the boundary layer of the plate.
+//                 2 -- The entire flow field is initialized by flowInitStep iterations of FirstOrder method.
+//                 3 -- The entire flow field is initialized by flowInitStep iterations of LUSGS method.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// freestream_vibration_temperature: Dimensional freestream vibration temperature.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// wallTemperature: Temprature of the solid wall, minus value is for adiabatic boundary condition.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter. Common dimensions like:
+//                 1 dm = 0.1 m.
+//                 1 cm = 0.01 m.
+//                 1 mm = 0.001 m.
+//                 1 inch = 0.0254 m.
+//                 1 foot = 12 inches = 0.3048 m.
+//                 1 yard = 3  feet   = 0.9144 m.
+// forceReferenceLength, forceReferenceLengthSpanWise, forceReferenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+// radiationCoef: The radiation coefficient on wall, it is used to compute the radiation heat flux on wall when the boundary
+//                condition is radiation equilibrium temperature, and 0.8 is the default value.
+// refMolecularWeight: the reference molecular weight of gas used for perfect gas. The unit is g/mol.
+// Generally, the gas is air. Sometimes, it is experiment gas, such as Nitrogen, Argon, and so on.
+int directionMethod  = 0;
+double refMachNumber = 0.73;
+double attackd       = 2.79;
+double angleSlide    = 0.00;
+int flowInitMethod = 0;
+
+int inflowParaType = 0;
+double refReNumber = 6.5e6;
+double refDimensionalTemperature = 288.15;
+double freestream_vibration_temperature = 300.00;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+//int inflowParaType = 2;
+//double refDimensionalTemperature = 6051.024;    // The total temperature, T*(1+(refGama-1)*M*M/2).
+//double refDimensionalPressure = 4.299696E09;    // The total pressure, p*(T0/T)^(refGama/(refGama-1)).
+
+// The velocity, temperature and density are fixed.
+//int inflowParaType = 4;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalDensity  = 1.0e3;
+
+// The velocity, temperature and pressure are fixed.
+//int inflowParaType = 5;
+//double refDimensionalVelocity = 1000.0;
+//double refDimensionalPressure = 1.0e5;
+
+// The MachNumber, temperature and pressure are fixed.
+//int inflowParaType = 6;
+//double refDimensionalTemperature = 293.0;
+//double refDimensionalPressure = 8886.06;
+
+// The velocity, temperature and pressure are read from file.
+//int inflowParaType = 7;
+//string weatherDataFilePath   = "./WRFData/";
+//double longitude = 110.95    
+//double latitude = 19.61;
+
+double wallTemperature = -1.0;
+
+double radiationCoef = 0.8;
+double gridScaleFactor = 1.0;
+double gridTranslationVector[] = [0.0, 0.0, 0.0];
+
+int numberOfAerodynamicForceComponents = 1;
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+double knudsenLength = 1.0;		          // unit of meter.
+double refMolecularWeight = 28.9644;          // unit of g/mol.
+
+//-----------------------------------------------------------------------
+#                           Spatial Discretisation                      #
+//-----------------------------------------------------------------------
+#************************************************************************
+#                         Struct Solver                                 *
+#************************************************************************
+// inviscidSchemeName: Spatial discretisation scheme of struct grid.
+//                     Using this when solve structered grid or hybrid.
+//                     -- "vanleer", "steger", "hlle", "lax_f",
+//                     -- "roe", "modified_roe",
+//                     -- "ausm+", "ausm+w", "ausm+up", "ausmdv", "ausmpw", "ausmpw+".
+// isWennScheme: If using WENN Scheme of struct grid.
+//                   0 -- NO. (default)
+//                   1 -- Yes.
+// str_limiter_name: Limiter of struct grid.
+//                     -- "vanalbada", "vanleer", "minmod", "smooth", "minvan", "3rdsmooth", "3rd_minmod_smooth",
+//                     -- "nolim", no limiter,
+//                     -- "vanalbada_clz", clz supersonic version,
+//                     -- "weno3_js", "wenn3_prm211", "wenn3_zm", "wenn3_zes2", "wenn3_zes3".
+string inviscidSchemeName = "roe";
+int isWennScheme = 0;
+string str_limiter_name = "vanalbada";
+
+#************************************************************************
+#                         UnStruct Solver or Common                     *
+#************************************************************************
+// viscousType: Viscous model.
+//              0 -- Euler.
+//              1 -- Laminar.
+//              2 -- Algebraic.
+//              3 -- 1eq turbulent.
+//              4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "0eq-bl".
+//              -- "1eq-sa".
+//              -- "2eq-kw-menter-sst".
+//              -- "2eq-kw-menter-bsl".
+//              -- "2eq-kw-wilcox-1988".
+//              -- "2eq-kw-wilcox-1998".
+//              -- "2eq-kw-kok-tnt".
+//              -- "2eq-kw-wilcox-2006".
+//              -- "easm-kw-2003".
+//              -- "easm-kw-2005".
+// DESType: Type of DES.
+//          0 -- RANS. (default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+// uns_scheme_name: Spatial discretisation scheme of Unstruct grid.
+//                  Using this when solve Unstructered grid or hybrid.
+//                  -- "vanleer", "roe", "GMRESRoe", "GMRESSteger", "steger", "kfvs", "lax_f", "hlle",
+//                  -- "ausm+", "ausmdv", "ausm+w", "ausmpw", "ausmpw+".
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "barth", "vencat", "vanleer", "minmod",
+//                   -- "vanalbada", "smooth", "nnd", "lpz", "1st",
+//                   -- "nolim", no limiter.
+// uns_vis_name: Discretisation method of viscous term.
+//               -- "std", "test", "aver", "new1", "new2".
+// gradientName: Gradient reconstruction method.
+//               -- "default", "ggcell", "ggnode", "lsq".
+// ivencat: Variation of vencat limiter.
+//          0 -- org method, it is independent of grid scale.
+//          1 -- new method, it is dependent of grid scale.
+//          4 -- Ustar limiter model, without grid size unitary.
+//          7 -- default used.
+// venkatCoeff: Cofficient of vencat, when using vencat limter.
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//              0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//              1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+// skewnessAngle: The skewness angle of grid cells.
+// roeEntropyFixMethod: Entropy fix (correction) method.
+//              1 -- direct fix, which limits the minimum eigenvalue directly.
+//              2 -- multi-dimensional fix, which is derived from structured solver and now is only valid for struct solver.
+//              3 -- Harten type, which is default used.
+// roeEntropyScale: Entropy fix (correction) coefficient scale, default is 1.0.
+//                  It is used to scale the default Roe entropy fix coefficients.
+// AusmpwPlusLimiter: A Limiter to make "function w" not change acutely in AusmpwPlus scheme, default is 1.0.
+
+//int    viscousType = 0;
+//string viscousName = "Euler";
+
+//int    viscousType = 1;
+//string viscousName = "laminar";
+
+int    viscousType = 3;
+string viscousName = "1eq-sa";
+
+//int    viscousType = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+string uns_scheme_name  = "roe";
+string uns_limiter_name = "vencat";
+string uns_vis_name     = "test";
+string gradientName     = "ggnode";
+
+int ivencat = 7;
+double venkatCoeff = 5.0;
+int reconmeth      = 1;
+int limitVariables = 0;
+int limitVector    = 0;
+double skewnessAngle = 60.0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+
+double AusmpwPlusLimiter = 1.0;
+
+#************************************************************************
+#                       Temporal Discretisation                         *
+#************************************************************************
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// physicalTimeStep: The nondimensional physical time step.
+// ifStartFromSteadyResults: The unsteady simulation is start from steady flowfield or not, 0 is for no and else is for yes.
+// ifStaticsFlowField: Statistical variables for unsteady simulation.
+// ifStaticsReynoldsStress: Statistical Reynolds stress for unsteady simulation.
+// startStatisticStep: Outer step when start statistics.
+//                     when the value is larger than "maxSimuStep", it is useless.
+// statisticalTimePeriod: Used as time period of statistic analysis.
+//                        when the value is negative, time period is treated as infinite.
+// statisticMethod: Statistic reynolds stress method.
+//                  0 -- tau = <q^2> - <q>^2
+//                  1 -- tau = <u'u'>
+// min_sub_iter: The min sub iteration of unsteady simulation.
+// max_sub_iter: The max sub iteration of unsteady simulation.
+// tol_sub_iter: The tolerance of sub iteration of unsteady simulation.
+// tscheme: Temporal Discretisation method.
+//          1 -- Runge-Kutta Multi-State.
+//          2 -- Point implicit.
+//          3 -- Full implicit.
+//          4 -- LU-SGS.
+//          5 -- Block LU-SGS.
+//          6 -- Jacobian iteration.
+//          7 -- Line LU-SGS.
+//          8 -- Matrix LU-SGS.
+//          9 -- GMRES.
+// iSimplifyViscousTerm: Simplify the computation of viscous term in the Block LU-SGS method. The default value assigns 1 that could speed up the computation.
+//                       Otherwise, the viscous Jacobian matrix Mv should be computed that will increase the memory and time in iteration of the BLUSGS method.
+// CFLStart: Started cfl number.
+// CFLEnd: End cfl number.
+// CFLVaryStep: The number of step when cfl increase from CFLStart to CFLEnd.
+// GMRESCFLScale : CFL = CFLStart * GMRESCFLScal^iteration.
+// OriginalTscheme : Used for LUSGS and GMres hybrid computing.
+// ktmax: Dtratio. dt[i] = MIN(dt[i], ktmax * dtmin / vol[i])
+// swapDq: Communication dq between forward/backward sweep of LUSGS or not, default is 0.
+// nLUSGSSweeps: Sub iteration of LU-SGS or Block LU-SGS.
+// LUSGSTolerance: Sub iter tolerance of LU-SGS or Block LU-SGS.
+// ifLocalTimeStep: Time step method.
+//                 0 --Local.
+//                 1 --Global.
+// isUseLocalCFL: use variable number of CFL or not.
+//                 0 -- global unified CFL number.
+//                 1 -- local CFL number.
+// isUsePreTwall: use the previous temperatures on wall. 1 indicates yes, and 0 indicates no.
+// visl_min: Minimum value of laminar viscosity coefficient.
+// turbCFLScale: Turbulence model cfl number factor.
+// codeOfAleModel: Arbitrary Lagrangian-Eulerian method.
+//                 0 -- no ALE method.
+//                 1 -- ALE method for non-moving grids.
+//                 2 -- ALE method for moving grids.
+//                 3 -- ALE method for deforming grids.
+// wallFunctionType: The type of wall function to implement.
+//                 0 -- no wall function. (default)
+//                 1 -- standard wall function.
+//                 2 -- Pab3D wall function.
+// RKStage: The number of Runge-Kutta step.
+// lamda: Cofficient of Runge-Kutta step.
+int    iunsteady = 0;
+double physicalTimeStep = 0.01;
+double physicalTimeStepDimensional = -0.001;
+int    ifStartFromSteadyResults = 0;
+int    ifStaticsFlowField = 0;
+int    ifStaticsReynoldsStress = 0;
+int    startStatisticStep = 800000;
+double statisticalTimePeriod = -1.0;
+int    statisticMethod = 0;
+int    linearTwoStepMethods = 1;    // 1--BDF1; 2--C-N; 3--BDF2.
+
+int    methodOfDualTime = 3;
+int    min_sub_iter = 50;
+int    max_sub_iter = 50;
+double tol_sub_iter = 0.01;
+
+int    tscheme = 4;
+int    iSimplifyViscousTerm = 1;
+int    ifLocalTimeStep = 0;
+int    isUseLocalCFL = 0;
+int    isUsePreTwall = 0;
+double CFLStart    = 0.01;
+double CFLEnd      = 10.0;
+int    CFLVaryStep = 500;
+double GMRESCFLScale = 1.0;
+int    OriginalTscheme = 0;
+double pMaxForCFL = 0.2;
+double pMinForCFL = 0.1;
+double deltaMaxForCFL = 0.2;
+double magnifyFactorForCFL = 1.1;
+double reduceFactorForCFL = 0.5;
+
+double ktmax = 1.0e10;
+
+int    swapDq = 1;
+
+int    nLUSGSSweeps = 1;
+double LUSGSTolerance = 0.01;
+int    order = 2;
+
+double visl_min = 0.01;
+double turbCFLScale = 1.0;
+double csrv     = 1.0;
+double timemax  = 1.0e10;
+double dtsave   = -1.0;
+int    maxale   = 10;
+double dtau     = 0.001;
+
+int wallFunctionType = 0;
+
+int RKStage    = 2;
+double lamda[] = [0.5, 1.0];
+
+//int RKStage    = 1;
+//double lamda[] = 1.0;
+
+//int RKStage    = 4;
+//double lamda[] = [0.25, 0.33333333333, 0.5, 1.0];
+#************************************************************************
+#                           File In or Out                              *
+#************************************************************************
+// numberOfGridGroups: The number of grid groups.
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                    e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                    please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the field results to visulization.
+// walldistMethod: The method to compute wall distance.
+//                 0 -- accurate but not fast enough.
+//                 1 -- fast but not accurate enough.
+//                 2 -- super fast but more non-accurate!
+// resSaveFile: The file path to save the residual convergence process, write data for every default (intervalStepRes) steps.
+// turbresfile: The file path to save the residual convergence process of turbulence, write data for every default (intervalStepRes) steps.
+// aircoeffile: The file path to save the aerodynamic force coefficients convergence process, write data for every default (intervalStepForce) steps.
+// restartNSFile: The file path to write restart flowfield variables, write data for every default (intervalStepFlow) steps.
+// turbfile: The file path to write restart flowfield variables of turbulence , write data for every default(intervalStepFlow) steps.
+// visualfile: The visualization file path of flowfield, write data for every default (intervalStepPlot) steps.
+// wall_aircoefile: The file path to save flowfield variables of wall, write data for every default steps.
+// nDumpSurfaceInfo = 0 the "wall_varfile" write the informations including heat flux.
+// nDumpSurfaceInfo = 1 the "wall_varfile" write the informations without heat flux.
+// nIsComputeWallDist: Whether to compute the wall distance.  
+//                     0 -- Compute wall distance.
+//                     1 -- Not compute.
+// protectionFile0 and protectionFile1: Two continuation file of the data protection mechanism.
+// wall_heatfluxfile: The file to output the MaxHeatFlux of wall.
+int    numberOfGridGroups  = 1;
+string gridfile            = "./grid/rae2822_hybrid2d__4.fts";
+string wallTemperaturefile = "";
+
+int    nIsComputeWallDist = 0;
+int    walldistMethod     = 1;
+int    cellMethodOrNodeMethod = 0;
+
+string resSaveFile        = "results/res.dat";
+string turbresfile        = "results/turbres.dat";
+string transitionResFile  = "results/transitionRes.dat";
+string aircoeffile        = "results/aircoef.dat";
+
+string restartNSFile      = "results/flow.dat";
+string turbfile           = "results/turb.dat";
+string transitionFile     = "results/transition.dat";
+
+string visualfile         = "results/tecflow.plt";
+string wall_aircoefile    = "results/wall_aircoef.dat";
+string samplefile         = "results/sample.dat";
+
+string protectionFile0    = "results/flow0.dat";
+string protectionFile1    = "results/flow1.dat";
+string wall_heatfluxfile  = "results/wall_heatflux.dat";
+
+string protectionTurbFile0 = "results/turb0.dat";
+string protectionTurbFile1 = "results/turb1.dat";
+
+string protectionTransitionFile0 = "results/transition0.dat";
+string protectionTransitionFile1 = "results/transition1.dat";
+
+int    nDumpSurfaceInfo   = 0;
+string wall_varfile       = "";
+
+string sixDofFileName     = "results/sixDofInfo.dat";
+string derivativeFileName = "results/identify.dat";
+string hysteresisFileName = "results/force_beta.plt";
+
+int plotFieldType = 0;
+
+// visualfileType: The file type of visualfile.
+//                 0 -- Tecplot binary.
+//                 1 -- Tecplot ASCII.
+//                 2 -- Ensight binary.
+//                 3 -- Ensight ASCII.
+int visualfileType = 1;
+
+// samplefileMode: The dump mode of sample file.
+//                 0 -- dump out every probe/line/surface data for all step intervals.
+//                 1 -- dump out all probe/line/surface data for every step intervals.
+int samplefileMode = 0;
+
+// visualSlice: The slice of tecflow.
+//              0 -- Do not save slice data.
+//              1 -- comput and save it to sliceFile.
+// sliceAxis: Normal vector of slice.
+//            1 -- X_DIR.
+//            2 -- Y_DIR.
+//            3 -- Z_DIR.
+// slicePostion: Coordinate of slice.
+
+int    visualSlice  = 0;
+int    sliceAxis    = 1;
+double slicePostion = -0.5;
+string sliceFile    = "results/Slice.plt";
+int    dumpWallFaceCenter = 0;
+
+// min-max box of the visual block.
+double lowerPlotFieldBox[] = [0.0 0.0 0.0];
+double upperPlotFieldBox[] = [1.0 1.0 1.0];
+
+//-----------the optional parameters list for the flow field output----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8), 
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21), 
+//                   -- vibration temperature(Tv, 33), electron temperature(Te, 34), vibrational energy(Ev, 35), electric energy(Ee, 36),
+//                   -- number density of electron(Ne, 37), dimensioanl density(rho, 38), dimensioanl pressure(p, 39), dimensioanl temperature(T, 40),
+//                   -- gradientUx(41), gradientUy(42), gradientVx(43), gradientVy(44), streamline_u(45), streamline_v(46), streamline_w(47),
+//                   -- transition intermittency(intermittency, 51), transition momentum thickness reynolds(MomentumThicknessReynolds, 52),
+//                   -- local CFL Number(localCFL, 57), minimal CFL Number(minCFL, 58),
+//                   -- overlap iblank(iblank, 81),
+//                   -- specific heat ratio(gama, 56), Knudsen number(kn, 60), Damkohler number(Da, 61), vibrational nonequilibrium number(Vi, 62).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+//-----------the optional parameters list for the wall boundary condition----------------
+// nVisualWallVariables: The number of visual variables on wall.
+// visualWallVariables : dumped variable types, listed as following:
+//                   -- coefficient of pressure(cp, 0), coefficient of friction(cf, 1), yplus(2), non-dimensional heat flux(Q_NonDim, 3), dimensional heat flux(Q_Dim, 4),
+//                   -- pressure on wall(pw, 5), temperature on wall(Tw, 6), density on wall(rhow, 7), heat flux of translational-rotational temperature term(Qtr, 8),
+//                   -- heat flux of species diffusion term(Qs, 9), heat flux of vibrational temperature term(Qv, 10), heat flux of electron temperature term(Qe, 11),
+//                   -- species mass fractions(Ns, 12), x component of wall velocity(Vx, 13), y component of wall velocity(Vy, 14), z component of wall velocity(Vz, 15),
+//                   -- slip translational-rotational temperature(Tts, 16), slip vibrational temperature(Tvs, 17), slip electron temperature(Tes, 18), absolute wall velocity(Vs, 19),
+//                   -- Stanton number(St, 20), coefficient of heat rate(Ch, 21), temperature jump(deltaT, 22), Grid Reynolds number on wall(Re_w, 23), Knudsen number(Kn_wall, 24).
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+int nVisualWallVariables = 9;
+int visualWallVariables[] = [0, 1, 2, 3, 4, 5, 9, 10, 11];
+
+// dumpStandardModel: Dump many standard model data.
+//                    1 -- Turbulent flat plate.
+int dumpStandardModel = 0;
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//                   0 -- No.
+//                   1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                  0 -- Probes data monitor.
+//                  1 -- Lines data monitor.
+//                  2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                    0 -- Nearest cell to the probe.
+//                    1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                  -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                  -- dimensioanl_density(7), dimensioanl_u(8), dimensioanl_v(9), 
+//                  -- dimensioanl_w(10), dimensioanl_pressure(11), dimensioanl_temperature(12).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                  0 -- Take the value of probe's cell as probe real value.
+//                  1 -- Interpolation from probe's and neighbouring cell to probe.
+//                  2 -- Interpolation from probe's cell nodes to probe.
+int ifSetDataMonitor = 0;
+
+int    dataMonitorType  = 0;
+string probesDefineFile = "bin/probes_XYZ.dat";
+
+//int    dataMonitorType = 1;
+//int    nLines = 1;
+//string linesDefineFile = "bin/lines_XYZ.dat";
+
+//int    dataMonitorType = 2;
+//int    nSurfaces = 4;
+//string surfacesDefineFile = "bin/surfaces_XYZ.dat";
+
+int searchCellsMethod = 0;
+
+int nProbeVariables  = 14;
+int probeVariables[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13];
+int probeVariablesInterpolationMethod = 0;
+
+#************************************************************************
+#                           Turbulence Parameter                        *
+#************************************************************************
+// turbInterval: Iteration number of turbulence.
+// kindOfTurbSource: Kinds of turbulent source.
+//                   0 -- Original.
+// mod_turb_res: If modify the residuals for the cells next to the wall or not, default is 0.
+// transitionType: transition model type
+//                   0 -- none.
+//                   2 -- gama-re-theta.
+// turbIntensity: (valid while greater than 0.0 ) turbulent intensity of free stream(*100) in transition.
+// freeturbIntensitySRModify: to use SR modify in free stream turbulent intensity decay or not.
+int turbInterval     = 1;
+int turbOrderStruct  = 2;
+int kindOfTurbSource = 0;
+int mod_turb_res     = 0;
+double freeStreamViscosity = 1.0e-3;
+double muoo          = 3.0;
+double kwoo          = 5.0;
+int transitionType   = 0;
+double turbIntensity = -1.0;
+int freeturbIntensitySRModify = 0;
+double freeDecayXLocation = 0.0;
+int compressibleCorrection = 0;
+int transitionMaFix = 1;
+
+// maximum eddy viscosity (myt/my) max.
+double eddyViscosityLimit = 1.0e10;
+int monitor_vistmax = 0;
+
+#************************************************************************
+#                           LES Parameter                               *
+#************************************************************************
+// iLES: Create LESSolver or not.
+//       = 1 -- Create LESSolver;
+//      != 1 -- not.
+// amplitudeofDisturb: Amplitude of adding disturb.
+// disturbstep: Unsteady time step or steady iteration of adding random disturb.
+// iterdisturb: Add random disturb in every sub-iter or only first sub-iter.
+//              = 0 -- in only first sub-iter;
+//             != 0 -- in every sub-iter.
+// ipraddisturb: Add density and pressure disturb or not.
+// ibodyforce: Add body force in source flux of NS equations or not.
+//             = 0 -- not;
+//            != 0 -- Add body force.
+// bodyforce: Body force in source flux of NS equations or not.
+// utau: friction velocity, using in DNSDisturb.
+// sgsmodel: subgrid scale model.
+//           = "smagorinsky";
+//           = "dsmCom";
+//           = "wale";
+//           = "sigma".
+// deltaFunctionType: = 1 -- MAX(deltai, deltaj, deltak);
+//                    = 2 -- pow(deltai * deltaj *deltak, 1/3);
+//                    = 3 -- Devloped by Scotti.
+// wallDampingFunctionType: = 0 -- no wall function;
+//                          = 1 -- van Driest;
+//                          = 2 -- developed by Dr. Deng Xiaobing;
+//                          = 3 -- developed by Piomelli.
+// turbViscousCutType: turbulent viscosity cut type.
+//                     = 0 -- mu_total = mut             + mul;
+//                     = 1 -- mu_total = max(mut-mul, 0) + mul;
+//                     = 2 -- mu_total = max(mut    , 0) + mul.
+// smagConstant: constant of smagorinsky model.
+// waleConstant: constant of wale model.
+// filterDirection [3]: filter variables in i, j, k direction or not.
+// averageDirection[3]: average variables in i, j, k direction or not.
+// isotropicConstant: constant of isotropic part of SGS stress.
+int    iLES               = 0;
+string sgsmodel           = "smagorinsky";
+int    deltaFunctionType  = 2;
+int    wallDampingFunctionType = 1;
+int    turbViscousCutType = 2;
+double smagConstant       = 0.1;
+double isotropicConstant  = 0.0;
+double waleConstant       = 0.6;
+double sigmaConstant      = 1.35;
+int    filterDirection[]  = [1, 1, 0];
+int    averageDirection[] = [0, 0, 0];
+double testFilterScale    = 2.0;
+int    averageWidth       = 1;
+int    monitorNegativeConstant = 0;
+
+#************************************************************************
+#          Other Parameters for Hypersonic Non-equilibrium Gas          *
+#************************************************************************
+// dg_high_order:
+//               0 -- generic order accuracy.
+//               1 -- high order accuracy.
+// iapplication:
+//               0 -- gas model is fixed in the codes.
+//               1 -- gas model is imported from library files.
+// isAdaptiveSolver: isAdaptiveSolver = 0 indicates the generic Navier-Stokes solver.
+// nm: Equation number of the physics, but is out of commision now.
+//               4 -- for 2D.
+//               5 -- for 3D.
+// nGasModel: The type of gas. less than and equal to 1 represents the mixture gas. 
+//            Otherwise, the pure gas with one component is used for perfect gas.
+//               0 -- Earth gas.
+//               1 -- Mars gas.
+//               2 -- Argon.
+//               3 -- Nitrogen.
+// nEnergyRecycle: The type of EnergyModel Recycle. 
+//               0 -- not used.
+//               1 -- used.
+// nDensityModify: The type of densitymodify. 
+//               0 -- not used.
+//               1 -- used.
+// nchem:
+//               0 -- without chemical reaction flow.
+//               1 -- the chemical reaction flow is considered.
+// nEquilibriumGas: the variable is valid when the condition of nchem = 0 is satisfied.
+//               0 -- perfect gas.
+//               5, 7, 11 -- equilibrium gas, meanwhile, its value denotes the number of gas component.
+// nPCWCycleStep: The maximum step number of iteration in the module of computing species mass fractions with the partial catalytic wall(PCW) condition.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nRETCycleStep: The maximum step number of iteration in the module of computing radiation equilibrium temperature on wall.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSLIPCycleStep:The maximum step number of iteration in the module of computing slip temperature, slip velocity and slip species mass fraction.
+//                The value equals to or is greater than 1, and 3 is for default value.
+// nSlipBCModel:  The computational model of slip boundary conditions.
+//               0 -- no slip.
+//               1 -- the conventional Maxwell slip conditions.
+//               2 -- the Gokcen slip conditions. 
+//               3 -- the Knudsen-layer correction of the standard slip conditions proposed by Lockerby, et al.
+//               4 -- the Kogan simplified slip conditions.
+// nMeanFreePathType: the method to the mean free-path for the slip conditions. For the mixture, 0 is suggested.
+//               0 -- the equivalent mean free-path is calculated by the simple hard sphere model(HS).
+//               1 -- calculated by the definition that includes the variables of the number density and the molecule diameter.
+//               2 -- the equivalent mean free-path is calculated by the variable hard sphere model(VHS).
+// nchemsrc:
+//               0 -- the source terms are not computed.
+//               1 -- the source terms are computed.
+// nchemrad:
+//               0 -- compute the spectrum radius without considering chemical reaction flow.
+//               1 -- compute the spectrum radius that need to count the contribution from chemical reaction flow.
+// ntmodel: The thermodynamic temperature model.
+//               1 -- One-temperature model.
+//               2 -- Two-temperature model.
+//               3 -- Three-temperature model.
+// isUseNoneqCond:
+//               0 -- compute the source terms without any conditions.
+//               1 -- compute the source terms using the non-equilibrium condition.
+// frozenCondition: the threshold value of frozen chemical flow condition, 0.1 is the default value.
+// nIdealState: whether take all gas species as ideal gas for gas-mixture process.
+//               0 -- No.
+//               1 -- Yes. 
+// nTEnergyModel: the method to computing temperature energy model.
+//               0 -- the energy term is computed using the conventional method.
+//               1 -- the energy term is computed using the polynomial fitting method.
+//               2 -- the energy term is computed using the piecewise polynomial fitting method.
+// parkVDPower: the power of translational-rotational temperature in the Park V-D(vibration-dissociation) coupling model.
+//              The value is in range of [0.0, 1.0], DPLR suggests 0.5, LAURA suggests 0.7, while 0.6 is given as default value.
+// catalyticCoef:
+//              0.0 -- full non-catalytic wall boundary condition.
+//              1.0 -- full catalytic wall boundary condition.
+//              in range of (0.0, 1.0) -- partial catalytic condition, the value indicates the catalytic coefficient.
+// nIsSuperCatalytic: the super catalytic condition for the fully catalytic wall, and assigned with the value of 1.
+//              0 -- equilibrium condition for the fully catalytic wall where the mass fractions are assigned with the values of the free stream.
+//              1 -- super catalytic condition for the fully catalytic wall where all the atomic components combine into molecular components.
+// nTemperatureJump: the method to calculate the temperature jump.
+//              0 -- calculated by the variables of heat conductivity and constant volume specific heat for each energy mode.
+//              1 -- the general method where the iteration is calculated with the translation-rotation temperature.
+// nSurfGradMethod: the method to compute the surface heating ratio.
+//              0 -- the gradient of variable is computed with the first-order difference method.
+//              1 -- the gradient of variable is computed with the Green-Guass integral method.
+// nRapidFlowfield: initialize the flowfield using the rapid engineering method when it is greater than zero.
+// nSurfHeatMonitor: To exam the surface heating change or not. 0 is no, 1 is yes.
+// nInitPressureStep: the steps to initialize the boundary variables when the rapid method is used. 100 is the default value.
+// nDumpCFLNumber: 1 indicates dumping the CFL number to file, 0 denotes no dumping.
+// sigmaVelocity: the coordination coefficient of tangential momentum for computation of slip velocity. The value is in range of (0.0, 2.0].
+// sigmaTemperature: the heat coordination coefficient for computation of slip temperature. The value is in range of (0.0, 2.0].
+// sigmaMassFraction: the species coordination coefficient for computation of slip mass fractions. The value is in range of (0.0, 2.0].
+// velocitySlipCorrectConstant: the correction constant to the velocity slip condition. For the diffuse reflection, 1.0 is used.
+//              1.0 -- proposed by Maxwell.
+//              sqrt(2/PI)~0.8 -- used for "micro-slip", namely the actual velocity slip at the wall.
+//              1.146 -- proposed for an additional "fictitious" velocity slip.
+// chemicalRelaxCorf:       The value is in range of [0.001, 1.0].
+// spectrumRadiusCoef: 	    The value is in range of [0.0, 2.0].
+// staticPressureRelaxCorf: The value is in range of [0.1, 1.0].
+// nIsChemicalFreeze: the flag to freeze the chemical reactions.
+//              0 -- not freeze, the chemical reaction sources will be calculated.
+//              1 -- freezes the chemical reactions, the chemical reaction sources will not be calculated. 
+// veTemperatureMin: The minimum of Tv and Te.
+// maxViscous: the maximum of Viscous.
+// trTemperatureMin: the minimum value of trTemperature.
+// veTemperatureMin: the minimum value of veTemperature.
+// densityMin: the minimum value of density.
+// tAdjustmentFactor: magnification of temperature, this value is in range of (1.0, 10.0].
+// nDebug: cout the Wrong place and abort
+//              0 -- not used.
+//              1 -- used.
+// nSpeciesLimit: limitter of gas species
+//              0 -- not used.
+//              1 -- used.
+// nTurblenceForChemical: the coupled mode of Turblence and Chemical reaction.
+//              0 -- method 0.
+//              1 -- method 1.
+// nViscosityFluxSublevelModified: Modified for ViscosityFlux on Sublevel grid.
+//              0 -- not used.
+//              1 -- used.
+// nViscosityPeModified: Pe Modified for ViscosityCoef.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceModified: Modified on ChemcalSource.
+//              0 -- not used.
+//              1 -- used.
+// nChemcalSourceEsMethod: Modified on ChemcalSource.
+//              0 -- approximation algorithm 1 (Ori).
+//              1 -- approximation algorithm 2 (New).
+// nMaxStepTemperature: the iterative steps of temperature.
+// veTemperatureMinModified: Modified on the minimum of Tve for Cvvs.
+//              0 -- not used.
+//              1 -- used.
+// nDiagonalModified: Modified on Diagonal.
+//              0 -- not used.
+//              1 -- new.
+// nDiagonalModifiedTurb: Modified on Diagonal for turbulence.
+//              0 -- not used.
+//              1 -- new.
+// nGradPrimtiveMethod: 
+//              0 -- Ori.
+//              1 -- new.
+// nAblation:
+//              0 -- The wall ablation is not computed.
+//              1 -- The wall ablation is computed.
+// isInjection:
+//              0 -- The injection velocity of ablation wall is not computed.
+//              1 -- The injection velocity of ablation wall is computed.
+// nViscosityModel:
+//              0 -- Blottner fitting method(N89).
+//              1 -- Gupta fitting method(N90).
+// nContinueModel: The new continue model can switch different computation model.
+//              0 -- Not use the new continue model.
+//              1 -- use the new continue model.
+// nSutherland:
+//              0 -- stands for selecting the Blotter curve fits mode.
+//              1 -- stands for Sutherland relation.
+// gasfile: Indicates the gas model, 9 models are provided, namely "Gu5", "Gu7", "Gu11", "Pa5", "Pa7", "Pa11", "DK5", "DK7", "DK11".
+//              "Gu" -- indicates the Gupta Model, three-Type Models are embeded in the library, namely, the 5-species-6-reactions, the 7-species-9-reactions, the 11-species-20-reactions.
+//              "Pa" -- indicates the Park  Model, three-Type Models are embeded in the library, namely, the 5-species-17-reactions, the 7-species-22-reactions, the 11-species-48-reactions.
+//              "DK" -- indicates the Dunn-Kang Model, three-Type Models are embeded in the library, namely, the 5-species-11-reactions, the 7-species-15-reactions, the 11-species-26-reactions.
+//              "Mars-Pa8" is for Park model of Mars gas, "Mars-Mc8" for McKenzie model of Mars gas.
+//              "Combustion-12" -- indicates the Combustion Chamber Gas Model which includes 12-species-20-reactions.
+//              "Gas-Mixture" -- indicates the process of mixing gas without reacting.
+//                               for struct solver mixing two species "SpeciesA, SpeciesB".
+//                               for unstruct solver mixing multi-species "O2 NO CO CO2 H2 N2 Air CH4".
+//              For self-definition model, the gasfile is used to indicate the file path of the new gas model.
+// speciesName: Used to list the names of each species, while each species name is separated by the symbol of comma.
+// initMassFraction: Used to list the initial mass fractions of species in accordance with the sequence of names in the parameter speciesName.
+// ifStartFromPerfectGasResults: The chemical reaction simulation is start from perfect gas flowfield or not, 0 is for no and else is for yes.
+// nIterFirstStep : the maximum number of iteration in the first step for the self-adaptive calculation.
+// nIterSecondStep: the maximum number of iteration in the second step for the self-adaptive calculation.
+// nIterThirdStep : the maximum number of iteration in the third step for the self-adaptive calculation.
+// nEnergyAssembly: the vibration energy is computed with combined method which includes the fitting method and the molecular kinetic theory.
+//                  0 -- no, 
+//                  1 -- yes.
+// nControlVariable: the variable to computing the residual error that determines the convergence is meet or not in the one-temperature model.
+//                  0 -- the density.
+//                  1 -- the translation temperature.
+//                  2 -- the vibration temperature.
+//                  3 -- the electron temperature.
+//                  4 -- the pressure.
+//                  5 -- the mass fraction of oxygen.
+//                  6 -- the mass fraction of nitrogen.
+// firstStepError  : the residual error of the first step iteration for the self-adaptive calculation.
+// secondStepError : the residual error of the second step iteration for the self-adaptive calculation.
+// thirdStepError  : the residual error of the third step iteration for the self-adaptive calculation.
+//  nProtectData: Use the continuation file data protection mechanism.
+//                  0 -- no.
+//                  1 -- yes.
+//  nTvChange: Judge whether the Tv equals Ttr.
+//                  0 -- yes.
+//                  1 -- no.
+// isMoleFractionType: 1 indicates the mass fractions, or else the mole fractions.
+// nFraction: the initial fractions type of species. 
+//            0 -- mass fraction.
+//            1 -- mole fraction.
+int dg_high_order = 0;
+int iapplication  = 0;
+int isAdaptiveSolver = 0;
+int nm = 5;
+int nEquilibriumGas = 0;
+int nPCWCycleStep  = 3;
+int nRETCycleStep  = 3;
+int nSLIPCycleStep = 3;
+int nIterFirstStep = 1000;
+int nIterSecondStep= 2000;
+int nIterThirdStep = 2000;
+int nEnergyAssembly = 0;
+int nControlVariable = 1;
+double firstStepError  = 0.01;
+double secondStepError = 0.001;
+double thirdStepError  = 0.001;
+double predictCFLError = 0.1;
+
+double refGama = 1.4;
+double prl     = 0.72;
+double prt     = 0.90;
+double sc_l    = 0.5;
+double sc_t    = 0.5;
+
+int nGasModel  = 0;
+int nchem      = 0;
+int nchemsrc   = 1;
+int nchemrad   = 1;
+int ntmodel    = 1;
+
+int nIdealState = 0;
+int nEnergyRecycle = 1;
+int nSlipBCModel   = 0;
+int nDensityModify = 1;
+int nTEnergyModel  = 0;
+int nMeanFreePathType = 0;
+int nIsChemicalFreeze = 0;
+int nIsSuperCatalytic = 1;
+int nTemperatureJump  = 0;
+int nSurfGradMethod = 0;
+int nRapidFlowfield = 0;
+int nSurfHeatMonitor = 0;
+int nInitPressureStep = 100;
+int nDumpCFLNumber = 0;
+
+double parkVDPower   = 0.6;
+double catalyticCoef = 0.0;
+double sigmaVelocity = 1.0;
+double sigmaTemperature = 1.0;
+double sigmaMassFraction = 1.0;
+double velocitySlipCorrectConstant = 1.0;
+
+double chemicalRelaxCorf = 1.0;
+double chemicalSpectrumRadiusCoef = 1.0;
+double viscousSpectrumRadiusCoef  = 1.5;
+double inviscidSpectrumRadiusCoef = 1.5;
+double spectrumRadiusCoef = 0.5;
+double staticPressureRelaxCorf = 0.2;
+
+double maxViscous = 10000.0;
+double trTemperatureMin = 10.0;
+double veTemperatureMin = 30.0;
+double maxTemperature = 50000.0;
+double densityMin = 1.0e-8;
+double densityMinFactor = 0.1;
+double tAdjustmentFactor = 10.0;
+double iniSpeedCoef = 1.0;
+int iniSpeedMode = 0;
+
+int nDebug = 0;
+int nSpeciesLimit = 1;
+int nTurblenceForChemical = 0;
+int nViscosityFluxSublevelModified = 1;
+int nViscosityPeModified = 0;
+int nChemcalSourceModified = 2;
+int nChemcalSourceEsMethod = 1;
+int nMaxStepTemperature = 5;
+int veTemperatureMinModified = 1;
+int nDiagonalModified = 0;
+int nDiagonalModifiedTurb = 0;
+int nGradPrimtiveMethod = 1;
+int nInviscidFluxModify = 1;
+int nQlLimitMethod = 2;
+int nSpeciesForWallMethod = 1;
+int nDensityForWallMethod = 0;
+int wallMultiTemperature = 0;
+
+int nProtectData = 0;
+int nAblation = 0;
+int isInjection = 0;
+int nViscosityModel = 0;
+int nMarsModel = 0;
+int nTvChange = 0;
+int isMoleFractionType = 0;
+string gasfile = "DK5";
+//string gasfile = "./chemical/Dunn-Kang_air5s11r.dat";
+string speciesName = "O, O2, NO, N, N2";
+string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.767";
+
+//string speciesName = "O, O2, NO, N, NO+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string speciesName = "O, O2, NO, N, O+, O2+, NO+, N+, N2+, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Mars-Pa8";
+//string speciesName = "O, O2, NO, N, N2, C, CO, CO2";
+//string initMassFraction = "0.0015, 0.0429, 0.0, 0.0, 0.0, 0.0, 0.0777, 0.8779";
+
+//string gasfile = "Pa";
+//string speciesName = "O, O2, NO, N, NO+, C, C2, CO, CO2, CN, N2, e-";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767, 0.0";
+
+//string gasfile = "Combustion-12";
+//string speciesName = "O, O2, NO, N, C, CO, CO2, H, H2, OH, H2O, N2";
+//string initMassFraction = "0.0, 0.233, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.767";
+ 
+//string gasfile = "Gas-Mixture";
+//string speciesName = "SpeciesA, SpeciesB";
+//string initMassFraction = "1.0, 0.0";
+int    nSutherland  = 0;
+double gamaSpeciesA = 1.4;
+double gamaSpeciesB = 1.3;
+double molecularWeightSpeciesA = 29.0;
+double molecularWeightSpeciesB = 30.0;
+
+//string gasfile = "Gas-Mixture";
+//string speciesName = "O2, N2";
+//string initMassFraction = "1.0, 0.0";
+
+int nFraction = 0;
+int nContinueModel = 0;
+int nChemicalFlowStep = 0;
+int ifStartFromPerfectGasResults = 0;
+int isUseNoneqCond = 0;
+double frozenCondition = 0.01;
+
+int nLeakageMonitor = 0;
+double totalLeakageVolume = 1000.0;
+double monitorThresholdValue = 0.05;
+double sprayFactor = 0.0;
+
+#########################################################################
+// Multi-Grid parameters.
+// nMGLevel: The number of level of Multi-Grid.
+//           <= 1 -- Single-level.
+//           >  1 -- multi-level.
+// MGPreIteration: For each grid, the number of pre-smoothing steps.
+// n_post: For each grid, the number of post-smoothing steps.
+// MGCoarsestIteration: For the coarest grid the number of smoothing steps.
+// MGFasType: V-multi cycle or W-multi cycle.
+//            1 -- V-multi cycle.
+//            2 -- W-multi cycle.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+// mgCFLScale: CFL number enlarge times for coarse grid.
+// mprol: Multi-grid interpolation method, interpolation from coarse cell to fine grid.
+//        1 -- zero order.
+//        2 -- first-order. (default)
+// mgCorrectionLimit: Multi-grid correction limit.
+int nMGLevel = 1;
+int MGCoarsestIteration = 1;
+int MGPreIteration = 1;
+int MGFasType = 1;
+int n_post = 0;
+int flowInitStep = 100;
+int mprol = 2;
+double mgCFLScale = 1.0;
+double mgCorrectionLimit = 0.01;
+
+//--------------- Some parameter for turbulent model --------------------
+// neasm: The variation of kw turbulent model.
+// ismooth_turb: Residual smooth for turb or not.
+// SSTProductType: The type of product term based on vorticity for SST.
+// SAProductType: The type of product term based on vorticity for SA.
+int neasm = -3;
+int SSTProductType = 0;
+int ismooth_turb = 0;
+int SAProductType = 2;
+
+// ----------------- Overset Grid parameter -----------------------------
+int codeOfDigHoles       = 1;
+int codeOfTurbulentModel = 0;
+string masterFileName      = "./grid/searchFile.inp";
+string holeBasicFileName   = "./grid/holeBasicFile.inp";
+string holeFullFileName    = "./grid/holeFullFile.dat";
+string linkFileName        = "./grid/topology.dat";
+string zoneInverseFileName = "./grid/zoneInverseMapping.inp";
+
+#************************************************************************
+#                       High Order Struct Solver                        *
+#************************************************************************
+// isFVMOrFDM:
+//             0 -- NSSolverStruct using Finite Volume Method.
+//             1 -- NSSolverStruct using Finite Differ Method.
+// SolverStructOrder: Spatial discretisation order of NS equations with struct grid.
+//                    <= 2 -- finite volume method.
+//                    >= 3 -- finite difference order. (to be completed)
+//                       0 -- default.
+// str_highorder_interpolation_epsilon: Epsilon in weighted interpolation, bigger epsilon, better convergence,
+//                                      smaller epsilon, robuster for shock-detecting.
+// str_highorder_interpolation_type:
+//                    -- "classical", "test".
+// str_highorder_flux_name:
+//                    -- "roe", "steger".
+// structhighordergradient:
+//                    -- "conservation", "chain_rule".
+int    isFVMOrFDM                          = 0;
+string str_highorder_solver                = "WCNS";
+int    SolverStructOrder                   = 0;
+double str_highorder_interpolation_epsilon = 1.0e-6;
+string str_highorder_interpolation_type    = "test";
+string str_highorder_flux_name             = "steger";
+string structhighordergradient             = "conservation";
+double coefofstrflux        = 0.5;
+double limitcoefofinterface = 0.0;
+
+// ----------------- Advanced choices -----------------------------------
+// outtimesc: Time stepping scheme for the outer loop.
+// MUSCLCoefXk: The parameter of MUSCL interpolations, belongs to [-1, 1].
+//             -1 -- seconde-order fully-upwind differencing.
+//              0 -- seconde-order upwind-biased differencing.
+//       0.333333 -- third-order upwind-biased differencing.
+//              1 -- seconde-order central differencing.
+// MUSCLCoefXb: The limiter parameter.
+//              0 -- the effect of the limiter is cancelled, means the first-order interpolations.
+// allReduceStep: Iteration intervals for MPI AllReduce operation, default is 1.
+string outtimesc   = "impbd2";
+double MUSCLCoefXk = -1;
+double MUSCLCoefXb = 1.0;
+int  allReduceStep = 1;
+
+// ----------------- overlap configuration ------------------------------
+// codeOfOversetGrid: Overlapping(overset) grid or not.
+//             0 -- NON-overlapping grid.
+//             1 -- Overlapping grid.
+// oversetInterpolationMethod: the method of overset interpolation while field simulation.
+//             0 -- set the acceptor cell value by donor cell value.
+//             1 -- set the acceptor cell value by distance weight of donor cell value.
+// readOversetFileOrNo: Whether to read overset-file(.ovs) that has been generated.
+//             0 -- no.
+//             1 -- yes.
+// symetryOrNot: If there exist symetryplanes(XY plane, the coordinate of Z direction is 0) in 
+//               the current overset grid(only for three dimension).
+//             0 -- no.
+//             1 -- yes.
+// readInAuxiliaryInnerGrid: Whether to read auxiliary inner grid.
+//             0 -- no.
+//             1 -- yes.
+// walldistMainZone: The initial value of background grid which does not exist wall boundary condition.
+// toleranceForOversetSearch: The tolerance of overset searching zone to judge whether the obtained node is in the current computing cell.
+// toleranceForOversetBox: The tolerance of building the minimum box of computing cells in the overlapping region.
+// twoOrderInterpolationOrNot: The number of interpolated cell layers in the overlapping boundary.
+//             0 -- one layer.
+//             1 -- two layers.
+// keyEnlargeOfActiveNodes: The number of enlarged overset-boundary layers in the buffer region.
+// outTecplotOverset: Whether to dump out the flowfield data after the progress of overset configure.
+//             0 -- no.
+//             1 -- yes.
+int    codeOfOversetGrid          = 0;
+int    oversetInterpolationMethod = 0;
+int    readOversetFileOrNot       = 0;
+int    symetryOrNot               = 0;
+int    readInAuxiliaryInnerGrid   = 0;
+int    readInAuxiliaryOuterGrid   = 0;
+int    readInSklFileOrNot         = 0;
+string auxiliaryInnerGrid0        = "./grid/aux-upper.fts";
+string auxiliaryInnerGrid1        = "./grid/aux-lower.fts";
+string auxiliaryInnerGrid2        = "";
+string oversetGridFileName        = "./grid/iblank.ovs";
+double walldistMainZone           = 1.0
+double toleranceForOversetSearch  = 1.0e-3;
+double toleranceForOversetBox     = 1.0e-3;
+int    twoOrderInterpolationOrNot = 0;
+int    keyEnlargeOfActiveNodes    = 0;
+int    outTecplotOverset          = 0;
+int    outPutOversetVisualization = 0;
+int    numberOfMovingBodies       = 2;
+
+// ----------------- ALE configuration ------------------------------
+int codeOfAleModel                = 0;
+int aleStartStrategy              = -1;
+
+double referenceLength            = 1.0;
+double referenceVelocity          = 1.0;
+double referenceDensity           = 1.0;
+
+int strategyForFaceNormalVelocity = 0; // 0-By Sweeping volume; 1-By face center 1st; 2-By face center 2nd.
+int strategyForGCLSource          = 0; // 0-present; 1-Ahn.
+
+// 0: 1st-Admas-Bashforth; 1: 2nd-Admas-Bashforth; 2: 1st-Implicit-Euler; 3: 2nd-Implicit Euler; 4: 2nd-Adams-Moulton; 5: 3rd-Adams-Moulton.
+int    methodForKineticEquation   = 0;
+double relaxParameterOfKinetic    = 1.0;
+
+#************************************************************************
+#                           motive information                          *
+#************************************************************************
+int    numberOfMovingBodies = 1;
+
+##############################    body0    ##############################
+// mass of parts.
+double mass_0 = 1.0;
+// gravity of parts (along negative direction in Y-axis, eg. 9.8).
+double gravity_0 = 0.0;
+// mass matrix of parts Ixx   Iyy   Izz   Ixy  Ixz  Iyz.
+double massMatrix_0[] = 1e-7, 1e-6, 1e-6, 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. xc yc zc.
+double massCenter_0[] = 0.0, 0.0, 0.0;
+// if reset mass center while restart.
+int resetMassCenter_0 = 0;
+// position offset of parts. dx dy dz.
+double massCenterDxyz_0[] = 0.0, 0.0, 0.0;
+// initial six DOF position information of parts. angleX angleY angleZ.
+double attitudeAngle_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. vc vy vz.
+double massCenterVelocity_0[] = 0.0, 0.0, 0.0;
+// initial six DOF move information of parts. omigX omigY omigZ.
+double angularVelocity_0[] = 0.0, 0.0, 0.0;
+// the object that the parts belong to.
+int fartherIndex_0 = -1;
+// the assembly position of the parts. xc yc zc angleX angleY angleZ.
+double configPamameter_0[] = 0.0, 0.0, 0.0, 0.0, 0.0, 0.0;
+// the move pattern of the parts.
+// -1  given motion partten.
+//  0  still.
+//  1  six DOF motion.
+//  2  three DOF motion.
+// 11  X-axis forced motion.
+// 12  Y-axis forced motion.
+// 13  Z-axis forced motion.
+// 14  forced pitch motion.
+// 15  forced yaw motion.
+// 16  forced roll motion.
+int  RBDMethod_0 = 0;
+double amplitude_0 = 0.0;
+double reduceFrequency_0 = 0.0;
+// direction of rotation.
+//         1 -- clockwise from the point of view along the positive x axis.
+//        -1 -- anticlockwise from the point of view along the positive x axis.
+int direction_0 = -1;
+double rotateFrequency_0 = 0.0;
+//string uDFSixDofFileName_0 = "./Bin/UDFSixDof.Parameter";
+// dimensional physical time for additional force(s).
+double addedForceTime_0[] = 0.0;
+// additional force(inertia system) fX fY fZ.  
+double addedForce_0[] = 0.0, 0.0, 0.0;
+// additional moment(inertia system) mX mY mZ.  
+double addedMoment_0[] = 0.0, 0.0, 0.0;
+// the deformation method of the parts.
+int morphing_0 = 0;
+
+// post indentify.
+int integralOrder = 4;
+
+#************************************************************************
+#                         TurboMachinery Parameter                      *
+#************************************************************************
+// ----------------- Rotating Frame --------------------------------
+// referenceFrame: whether rotating reference frame used.
+//               0 -- Stationary Frame.
+//               1 -- Translational Frame.
+//               2 -- Rotational Frame.
+int referenceFrame = 0;
+
+// nTurboZone: number of rows of TurboMachinery.
+int nTurboZone = 0;
+
+// Periodic_Name: a list of periodic boundary name, the  number of name equals to 2*nZone
+//                "Periodic_up, Periodic_down" means a pair of name of one zone
+string Periodic_Name[] = "Periodic_up, Periodic_down";
+
+// PeriodicRotationAngle means rotating angle for each zone.
+// PeriodicRotationAngle[] = [theta1, theta2...]
+//                theta1, theta2 means rotating angle for zone1,zone2.
+double PeriodicRotationAngle[] = [16.363636363636];
+
+// MixingPlane: a list of mixing plane name, the  number of name equals to 2*nZone-2
+//                "MixOut, MixIn" the first is upstream zone outlet, the second is downstream zone inlet.
+string MixingPlane[] = "";
+
+// Omega: angular velocity(rad/s) of each zone.
+double Omega[] = [-1680.0];
+
+// shroud: define turbomachinery shroud of each zone, because shroud do not rotate.
+string shroud[] = "shroud";
+
+// nSpanSection: number of spanwise section used for mixing plane.
+int nSpanSection = 0;
+
+// ---------------- ATP read --------------------------------------------
+//@int    inflowParaType = 0;
+//@double refReNumber = 6.5e6;
+//@double refDimensionalTemperature = 288.15;
+//@double freestream_vibration_temperature = 300.00;
+//@double refDimensionalPressure = 0;
+//@double height                 = 0;
+//@int nsubsonicInlet            = 0;
+//@int nsubsonicOutlet           = 0;
+//@string inLetFileName          = "./bin/subsonicInlet.hypara";
+//@string outLetFileName         = "./bin/subsonicOutlet.hypara";
+//@double refDimensionalVelocity = 0;
+//@double refDimensionalDensity = 0;
+//@string weatherDataFilePath   = "./WRFData/";
+//@double longitude = 110.95    
+//@double latitude = 19.61;
+#************************************************************************
+#                             Old Parameter                             *
+#************************************************************************
+int isPlotVolumeField = 0;
+
+#************************************************************************
+#                         partial flow field setting Parameter          *
+#************************************************************************
+//int nPartialParameter = 0;       // 0/1/2
+//int nNumberOfPartialField = 0;   //   
+//int nStartGridIndex[] = [0];
+//int nEndGridIndex[] = [0];
+
+//double partialCFL[] = [0.0];
+//double partialSpeedCoef[] = [0.0];
+//double partialSpeed[] = [0.0];
+//double partialAttackd[] = [0.0];
+//double partialSlide[] = [0.0];
+//double partialPressure[] = [0.0];
+//double partialTemperature[] = [0.0];
+//double partialMassFractions[] = [0.0];
+
+#************************************************************************
+#                         Incompressible Parameter                      *
+#************************************************************************
+int isSolveEnergyEquation = 0;
+int isSolveTurbEquation = 0;
+int isSolveSpeciesEquation = 0;
\ No newline at end of file
diff --git a/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/bin/cfd_para_subsonic.hypara b/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/bin/cfd_para_subsonic.hypara
new file mode 100644
index 0000000..03d3e52
--- /dev/null
+++ b/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/bin/cfd_para_subsonic.hypara
@@ -0,0 +1,235 @@
+#########################################################################
+#                     General Control Parameter                         #
+#########################################################################
+// maxSimuStep: The max simulation step, don't care simulation is restart or not.
+// intervalStepFlow: The step intervals for flow variables file 'flow.dat' saved.
+// intervalStepPlot: The step intervals for tecplot visual file 'tecflow.dat' saved.
+// intervalStepSample: The step intervals for monitored probes variables file 'sample.dat' saved.
+// intervalStepForce: The step intervals for aerodynamics coefficients file 'aircoef.dat' saved.
+// intervalStepRes: The step intervals for residual 'res.dat' saved.
+
+int maxSimuStep        = 4000;
+
+int intervalStepFlow   = 4000;
+int intervalStepPlot   = 4000;
+int intervalStepSample = 4000;
+int intervalStepForce  = 10;
+int intervalStepRes    = 10;
+
+// ifLowSpeedPrecon: Precondition process to accelerate convergence for low speed flow.
+//                   0 -- no precondition process. (default, mach > 0.3)
+//                   1 -- carry out precondition process. (mach number <= 0.3)
+int ifLowSpeedPrecon = 0;
+
+#########################################################################
+#                       Inflow Parameter                                #
+#########################################################################
+// refMachNumber: Mach number.
+// attackd: Angle of attack.
+// angleSlide: Angle of sideslip.
+// inflowParaType: The type of inflow parameters.
+//                 0 -- the nondimensional conditions.
+//                 1 -- the flight conditions.
+//                 2 -- the experiment conditions.
+//                 3 -- the subsonic boundary conditions.
+// refReNumber: Reynolds number, which is based unit length, unit of 1/m.
+// refDimensionalTemperature: Dimensional reference temperature, or the total temperature only for the experiment condition.
+// refDimensionalPressure: Dimensional reference pressure, or the total pressure only for the experiment condition.
+// height: Fly height, unit of km.
+// gridScaleFactor: The customizable unit of the grid, default value is 1.0 for meter.Common dimensions like:
+//                    1 dm = 0.1  m.
+//                    1 cm = 0.01 m.
+//                    1 mm = 0.001m.
+//                    1 inch             = 0.0254m.
+//                    1 foot = 12 inches = 0.3048m.
+//                    1 yard = 3  feet   = 0.9144m.
+// forceRefenenceLength, forceRefenenceLengthSpanWise, forceRefenenceArea: Reference length, SpanWise length and area, independent of grid unit.
+// TorqueRefX, TorqueRefY, TorqueRefZ: Reference point, independent of grid unit.
+
+double refMachNumber = 0.2;
+double attackd       = 0.0;
+double angleSlide    = 0.00;
+
+int inflowParaType = 0;
+double refReNumber = 40;
+double refDimensionalTemperature = 288.15;
+
+//int inflowParaType = 1;
+//double height = 0.001;
+
+double gridScaleFactor = 1.0;
+
+double forceReferenceLengthSpanWise = 1.0;    // unit of meter.
+double forceReferenceLength = 1.0;            // unit of meter.
+double forceReferenceArea = 1.0;              // unit of meter^2.
+double TorqueRefX = 0.0;                      // unit of meter. 
+double TorqueRefY = 0.0;                      // unit of meter.
+double TorqueRefZ = 0.0;                      // unit of meter.
+
+#########################################################################
+#                       Physical models                                 #
+#########################################################################
+// viscousType : Viscous model.
+//           0 -- Euler.
+//           1 -- Lamilar.
+//           3 -- 1eq turbulent.
+//           4 -- 2eq turbulent.
+// viscousName: Laminar or tubulent model.
+//              -- "1eq-sa", when viscousType = 3.
+//              -- "2eq-kw-menter-sst", when viscousType = 4.
+// DESType: Type of DES.
+//          0 -- RANS.(default)
+//          1 -- DES.
+//          2 -- DDES.
+//          3 -- IDDES.
+
+//int    viscousType    = 0;
+//string viscousName = "Euler";
+
+int    viscousType = 1;
+string viscousName = "laminar";
+
+//int    viscousType    = 3;
+//string viscousName = "1eq-sa";
+
+//int    viscousType    = 4;
+//string viscousName = "2eq-kw-menter-sst";
+
+int DESType = 0;
+
+int roeEntropyFixMethod = 3;
+double roeEntropyScale  = 1.0;
+#########################################################################
+#                       Spatial Discretisation                          #
+#########################################################################
+#*******************************************************************
+#                       Struct Solver                              *
+#*******************************************************************
+// str_limiter_name: Limiter of struct grid.
+//                   -- "3rdsmooth", "smooth".
+//                   -- "nolim", no limiter.
+
+string str_limiter_name   = "smooth";
+
+#*******************************************************************
+#                       UnStruct Solver                            *
+#*******************************************************************
+// uns_limiter_name: Limiter of Unstruct grid.
+//                   -- "vencat".
+//                   -- "1st", meaning accuracy of first-order.
+//                   --  "nolim", no limiter.
+// venkatCoeff: Coefficient of vencat limiter, when uns_limiter_name = 'vencat'.
+//              The smaller the value, the more robust it is.
+
+string uns_limiter_name = "vencat";
+double venkatCoeff      = 50.0;
+
+#########################################################################
+#                       Temporal Discretisation                         #
+#########################################################################
+// iunsteady: Steady or unsteady.
+//            0 -- steady.
+//            1 -- unsteay.
+// CFLEnd: The CFL number, [0.1, 100].
+//         The bigger the value, the convergence faster but lower robustness.
+// nLUSGSSweeps: Number of Sub-iteration of LU-SGS.
+//               1 -- is recommended for structured solver.
+//             1-3 -- is recommended for unstructured solver.
+
+int iunsteady = 0;
+
+double CFLEnd = 100.0;
+
+int nLUSGSSweeps = 5;
+
+#########################################################################
+#                       Multi-Grid parameters                           #
+#########################################################################
+// nMGLevel: The number of Multi-Grid level.
+//           = 1 -- single-level.
+//           > 1 -- multi-level.
+// flowInitStep: Flow initialization step, 0 - 500 is suggested.
+//               Multi-Grid : Number of steps computing on coarse grid, during flow initialization.
+//               Single-Grid: Number of steps computing using first-order with vanleer, during flow initialization.
+
+int nMGLevel = 1;
+int flowInitStep = 100;
+
+#########################################################################
+#                       File In or Out                                  #
+#########################################################################
+// gridfile: The partitioned Grid file path, using relative path,
+//           which is relative to the working directory.
+// IMPORTANT WARNING: The file index should be ignored,
+//                     e.g. if the partitioned grid is rae2822_hybrid2d__4_0.fts,
+//                     Please use 'rae2822_hybrid2d__4.fts' here!
+// plotFieldType: If dump out the whole field results to tecplot or not, 0 / 1.
+
+string gridfile = "./grid/cylinder_unstr.fts";
+int plotFieldType = 1;
+
+// ----------------- Advanced Parameters, DO NOT care it ----------------
+// nVisualVariables: Number of variables want to be dumped for tecplot visualization.
+// visualVariables:  Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5), mach(6),
+//                   -- viscosityLaminar(7), viscosityTurbulent(8),
+//                   -- vorticity_x(9), vorticity_y(10), vorticity_z(11), vorticityMagnitude(12),
+//                   -- strain_rate(13), Q_criteria(14), Cp(15), timeStep(16), volume(17),
+//                   -- modeledTKE(18), modeleddissipationrate(19), SSTF1(20), SSTF2(21).
+// Important Warning: Array size of visualVariables MUST be equal to nVisualVariables!!!
+// Variables order must from small to big.
+
+int nVisualVariables = 8;
+int visualVariables[] = [0, 1, 2, 3, 4, 5, 6, 15];
+
+// ifSetDataMonitor: Whether to set the data monitor.
+//              0 -- No.
+//              1 -- Yes.
+// dataMonitorType: The type of data Monitor.
+//                 0 -- Probes data monitor.
+//                 1 -- Lines data monitor.
+//                 2 -- Surfaces data monitor.
+// probesDefineFile: Probes location information file.
+// nLines: The number of lines need to be monitored.
+// linesDefineFile: Lines location information file.
+// nSurfaces: The number of surfaces need to be monitored.
+// surfacesDefineFile: Surfaces location information file.
+// searchCellsMethod: method to search the cell of each probe.
+//                 0 -- Nearest cell nearest to the probe.
+//                 1 -- Real cell where the probe is located.
+// nProbeVariables: Number of variables want to be dumped for probes monitered.
+// probeVariables : Variable types dumped, listed as following:
+//                   -- density(0), u(1), v(2), w(3), pressure(4), temperature(5).
+// Important Warning: Array size of probeVariables MUST be equal to nProbeVariables!!!
+// probeVariables order must from small to big.
+// probeVariablesInterpolationMethod: Interpolation method used to compute the probe variables.
+//                 0 -- Take the value of probe's cell as probe real value.
+//                 1 -- Interpolation from probe's and neighbouring cell to probe.
+//                 2 -- Interpolation from probe's cell nodes to probe.
+
+int ifSetDataMonitor = 1;
+
+int dataMonitorType = 1;
+int nLines = 4;
+string linesDefineFile = "bin/lines_XYZ.dat";
+
+int searchCellsMethod = 1;
+
+int nProbeVariables = 6;
+int probeVariables[] = [0, 1, 2, 3, 4, 5];
+
+int probeVariablesInterpolationMethod = 1;
+
+// limitVariables: Limit model (It is useful only if limitVector is 0).
+//                 0 -- limit only for pressure and denstiny, then get the min value.
+//                 1 -- limit for every variables, then get the min value.
+// limitVector:
+//              0 -- Each variable use the same limiter coefficient.
+//              1 -- Each variable use the respective limiter coefficients.
+// reconmeth:
+//            0 -- When reconstruct face value, Q+, Q- use respective limiter coefficients.
+//            1 -- Q+, Q- use the min limiter coefficients of left and right cell.
+
+int reconmeth = 1;
+int limitVariables = 0;
+int limitVector = 0;
diff --git a/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/bin/grid_para.hypara b/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/bin/grid_para.hypara
new file mode 100644
index 0000000..54ee425
--- /dev/null
+++ b/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/bin/grid_para.hypara
@@ -0,0 +1,35 @@
+#########################################################################
+#                           Grid data type                              #
+#########################################################################
+// gridtype: Grid type for generation, conversion, reconstruction, merging.
+//           0 -- Unstructured grid.
+//           1 -- Structured grid.
+// nAxisRotateTimes: number of axis rotating times, zero (default) meaning without rotating.
+// axisRotateOrder : axis rotating order.
+//             1 -- X-axis.
+//             2 -- Y-axis.
+//             3 -- Z-axis.
+// axisRotateAngles: axis rotating angles (degree), which are corresponding to the axis rotating order.
+// from_gtype: Type of grid data type in grid conversion process.
+//            -1 -- MULTI_TYPE.
+//             1 -- PHengLEI, *.fts.
+//             2 -- CGNS, *.cgns.
+//             3 -- Plot3D type of structured grid, *.dat/*.grd.
+//             4 -- Fieldview type of unstructured grid, *.dat/*.inp.
+//             5 -- Fluent, *.cas/*.msh.
+//             6 -- Ustar, mgrid.in.
+//             7 -- Hybrid, include both of unstructured and structured grid, *.fts.
+//             8 -- GMSH, *.msh.
+int gridtype   = 0;
+int nAxisRotateTimes      = 0;
+int axisRotateOrder[]     = [1, 2, 3];
+double axisRotateAngles[] = [0.0, 0.0, 0.0];
+int from_gtype = 2;
+
+#########################################################################
+#                           File path                                   #
+#########################################################################
+// from_gfile: path of original data file for unstructure grid convert from.
+// out_gfile:  path of target file for grid convert to, *.fts type of file usually.
+string from_gfile = "./grid/cylinder_unstr.cgns";
+string out_gfile  = "./grid/cylinder_unstr.fts";
diff --git a/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/bin/key.hypara b/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/bin/key.hypara
new file mode 100644
index 0000000..0518a0f
--- /dev/null
+++ b/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/bin/key.hypara
@@ -0,0 +1,53 @@
+string title = "PHengLEI Main Parameter Control File";
+
+// IMPORTANT NOTICE: DON NOT MODIFY THE FOWLLOWING LINE.
+string defaultParaFile = "./bin/cfd_para.hypara";
+
+// ndim: Dimensional of the grid, 2 or 3.
+// nparafile: the number of parameter files.
+// nsimutask: simulation task type.
+//            0 -- CFD Solver of NS or Turbulation.
+//            1 -- Grid generation: for special typical cases, such as cylinder, flat plate, etc.
+//                 Grid conversion: from other format to PHengLEI format (.fts).
+//                 Grid reconstruction: such as grid adaptation.
+//                 Grid merging: merge two blocks into one block.
+//                 Grid repairing: repair the original grid in order to remove the negative volume cells.
+//            2 -- Wall distance computation for turb-solver.
+//            3 -- Grid partition.
+//            4 -- Knowledge repository / examples of PHengLEI-API.
+int ndim      = 3;
+int nparafile = 1;
+
+int    nsimutask    = 0;
+string parafilename = "./bin/cfd_para_subsonic.hypara";
+//string parafilename = "./bin/cfd_para_transonic.hypara";
+//string parafilename = "./bin/cfd_para_supersonic.hypara";
+//string parafilename = "./bin/cfd_para_hypersonic.hypara";
+//string parafilename = "./bin/cfd_para_incompressible.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_para.hypara";
+
+//int    nsimutask    = 2;
+//string parafilename = "./bin/cfd_para.hypara";
+
+//int    nsimutask    = 3;
+//string parafilename = "./bin/partition.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_deform_para.hypara";
+
+//int    nsimutask    = 1;
+//string parafilename = "./bin/grid_refine_para.hypara";
+
+//int    nsimutask    = 14;
+//string parafilename = "./bin/integrative_solver.hypara";
+
+//int    nsimutask    = 99;
+//string parafilename = "./bin/post_processing.hypara";
+
+// ---------------- Advanced Parameters, DO NOT care it ----------------
+int numberOfGridProcessor = 0;
+// ATP read
+//@string parafilename1 = ""
+//@string parafilename2 = "";
diff --git a/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/bin/lines_XYZ.dat b/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/bin/lines_XYZ.dat
new file mode 100644
index 0000000..1b7bd47
--- /dev/null
+++ b/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/bin/lines_XYZ.dat
@@ -0,0 +1,128 @@
+31
+  1.000000000000000e+00   1.000000000000000e+00   0.000000000000000e+00
+  9.333333333333333e-01   1.000000000000000e+00   0.000000000000000e+00
+  8.666666666666667e-01   1.000000000000000e+00   0.000000000000000e+00
+  8.000000000000000e-01   1.000000000000000e+00   0.000000000000000e+00
+  7.333333333333334e-01   1.000000000000000e+00   0.000000000000000e+00
+  6.666666666666667e-01   1.000000000000000e+00   0.000000000000000e+00
+  6.000000000000001e-01   1.000000000000000e+00   0.000000000000000e+00
+  5.333333333333332e-01   1.000000000000000e+00   0.000000000000000e+00
+  4.666666666666667e-01   1.000000000000000e+00   0.000000000000000e+00
+  4.000000000000000e-01   1.000000000000000e+00   0.000000000000000e+00
+  3.333333333333334e-01   1.000000000000000e+00   0.000000000000000e+00
+  2.666666666666667e-01   1.000000000000000e+00   0.000000000000000e+00
+  2.000000000000000e-01   1.000000000000000e+00   0.000000000000000e+00
+  1.333333333333333e-01   1.000000000000000e+00   0.000000000000000e+00
+  6.666666666666665e-02   1.000000000000000e+00   0.000000000000000e+00
+  0.000000000000000e+00   1.000000000000000e+00   0.000000000000000e+00
+ -6.666666666666665e-02   1.000000000000000e+00   0.000000000000000e+00
+ -1.333333333333333e-01   1.000000000000000e+00   0.000000000000000e+00
+ -2.000000000000000e-01   1.000000000000000e+00   0.000000000000000e+00
+ -2.666666666666666e-01   1.000000000000000e+00   0.000000000000000e+00
+ -3.333333333333333e-01   1.000000000000000e+00   0.000000000000000e+00
+ -3.999999999999999e-01   1.000000000000000e+00   0.000000000000000e+00
+ -4.666666666666666e-01   1.000000000000000e+00   0.000000000000000e+00
+ -5.333333333333332e-01   1.000000000000000e+00   0.000000000000000e+00
+ -6.000000000000001e-01   1.000000000000000e+00   0.000000000000000e+00
+ -6.666666666666667e-01   1.000000000000000e+00   0.000000000000000e+00
+ -7.333333333333334e-01   1.000000000000000e+00   0.000000000000000e+00
+ -8.000000000000000e-01   1.000000000000000e+00   0.000000000000000e+00
+ -8.666666666666667e-01   1.000000000000000e+00   0.000000000000000e+00
+ -9.333333333333333e-01   1.000000000000000e+00   0.000000000000000e+00
+ -1.000000000000000e+00   1.000000000000000e+00   0.000000000000000e+00
+31
+ -1.000000000000000e+00  -1.000000000000000e+00   0.000000000000000e+00
+ -9.333333333333333e-01  -1.000000000000000e+00   0.000000000000000e+00
+ -8.666666666666667e-01  -1.000000000000000e+00   0.000000000000000e+00
+ -8.000000000000000e-01  -1.000000000000000e+00   0.000000000000000e+00
+ -7.333333333333334e-01  -1.000000000000000e+00   0.000000000000000e+00
+ -6.666666666666667e-01  -1.000000000000000e+00   0.000000000000000e+00
+ -6.000000000000001e-01  -1.000000000000000e+00   0.000000000000000e+00
+ -5.333333333333332e-01  -1.000000000000000e+00   0.000000000000000e+00
+ -4.666666666666667e-01  -1.000000000000000e+00   0.000000000000000e+00
+ -4.000000000000000e-01  -1.000000000000000e+00   0.000000000000000e+00
+ -3.333333333333334e-01  -1.000000000000000e+00   0.000000000000000e+00
+ -2.666666666666667e-01  -1.000000000000000e+00   0.000000000000000e+00
+ -2.000000000000000e-01  -1.000000000000000e+00   0.000000000000000e+00
+ -1.333333333333333e-01  -1.000000000000000e+00   0.000000000000000e+00
+ -6.666666666666665e-02  -1.000000000000000e+00   0.000000000000000e+00
+  0.000000000000000e+00  -1.000000000000000e+00   0.000000000000000e+00
+  6.666666666666665e-02  -1.000000000000000e+00   0.000000000000000e+00
+  1.333333333333333e-01  -1.000000000000000e+00   0.000000000000000e+00
+  2.000000000000000e-01  -1.000000000000000e+00   0.000000000000000e+00
+  2.666666666666666e-01  -1.000000000000000e+00   0.000000000000000e+00
+  3.333333333333333e-01  -1.000000000000000e+00   0.000000000000000e+00
+  3.999999999999999e-01  -1.000000000000000e+00   0.000000000000000e+00
+  4.666666666666666e-01  -1.000000000000000e+00   0.000000000000000e+00
+  5.333333333333332e-01  -1.000000000000000e+00   0.000000000000000e+00
+  6.000000000000001e-01  -1.000000000000000e+00   0.000000000000000e+00
+  6.666666666666667e-01  -1.000000000000000e+00   0.000000000000000e+00
+  7.333333333333334e-01  -1.000000000000000e+00   0.000000000000000e+00
+  8.000000000000000e-01  -1.000000000000000e+00   0.000000000000000e+00
+  8.666666666666667e-01  -1.000000000000000e+00   0.000000000000000e+00
+  9.333333333333333e-01  -1.000000000000000e+00   0.000000000000000e+00
+  1.000000000000000e+00  -1.000000000000000e+00   0.000000000000000e+00
+31
+ -1.000000000000000e+00   1.000000000000000e+00   0.000000000000000e+00
+ -1.000000000000000e+00   9.333333333333333e-01   0.000000000000000e+00
+ -1.000000000000000e+00   8.666666666666667e-01   0.000000000000000e+00
+ -1.000000000000000e+00   8.000000000000000e-01   0.000000000000000e+00
+ -1.000000000000000e+00   7.333333333333334e-01   0.000000000000000e+00
+ -1.000000000000000e+00   6.666666666666667e-01   0.000000000000000e+00
+ -1.000000000000000e+00   6.000000000000001e-01   0.000000000000000e+00
+ -1.000000000000000e+00   5.333333333333332e-01   0.000000000000000e+00
+ -1.000000000000000e+00   4.666666666666667e-01   0.000000000000000e+00
+ -1.000000000000000e+00   4.000000000000000e-01   0.000000000000000e+00
+ -1.000000000000000e+00   3.333333333333334e-01   0.000000000000000e+00
+ -1.000000000000000e+00   2.666666666666667e-01   0.000000000000000e+00
+ -1.000000000000000e+00   2.000000000000000e-01   0.000000000000000e+00
+ -1.000000000000000e+00   1.333333333333333e-01   0.000000000000000e+00
+ -1.000000000000000e+00   6.666666666666665e-02   0.000000000000000e+00
+ -1.000000000000000e+00   0.000000000000000e+00   0.000000000000000e+00
+ -1.000000000000000e+00  -6.666666666666665e-02   0.000000000000000e+00
+ -1.000000000000000e+00  -1.333333333333333e-01   0.000000000000000e+00
+ -1.000000000000000e+00  -2.000000000000000e-01   0.000000000000000e+00
+ -1.000000000000000e+00  -2.666666666666666e-01   0.000000000000000e+00
+ -1.000000000000000e+00  -3.333333333333333e-01   0.000000000000000e+00
+ -1.000000000000000e+00  -3.999999999999999e-01   0.000000000000000e+00
+ -1.000000000000000e+00  -4.666666666666666e-01   0.000000000000000e+00
+ -1.000000000000000e+00  -5.333333333333332e-01   0.000000000000000e+00
+ -1.000000000000000e+00  -6.000000000000001e-01   0.000000000000000e+00
+ -1.000000000000000e+00  -6.666666666666667e-01   0.000000000000000e+00
+ -1.000000000000000e+00  -7.333333333333334e-01   0.000000000000000e+00
+ -1.000000000000000e+00  -8.000000000000000e-01   0.000000000000000e+00
+ -1.000000000000000e+00  -8.666666666666667e-01   0.000000000000000e+00
+ -1.000000000000000e+00  -9.333333333333333e-01   0.000000000000000e+00
+ -1.000000000000000e+00  -1.000000000000000e+00   0.000000000000000e+00
+31
+  1.000000000000000e+00  -1.000000000000000e+00   0.000000000000000e+00
+  1.000000000000000e+00  -9.333333333333333e-01   0.000000000000000e+00
+  1.000000000000000e+00  -8.666666666666667e-01   0.000000000000000e+00
+  1.000000000000000e+00  -8.000000000000000e-01   0.000000000000000e+00
+  1.000000000000000e+00  -7.333333333333334e-01   0.000000000000000e+00
+  1.000000000000000e+00  -6.666666666666667e-01   0.000000000000000e+00
+  1.000000000000000e+00  -6.000000000000001e-01   0.000000000000000e+00
+  1.000000000000000e+00  -5.333333333333332e-01   0.000000000000000e+00
+  1.000000000000000e+00  -4.666666666666667e-01   0.000000000000000e+00
+  1.000000000000000e+00  -4.000000000000000e-01   0.000000000000000e+00
+  1.000000000000000e+00  -3.333333333333334e-01   0.000000000000000e+00
+  1.000000000000000e+00  -2.666666666666667e-01   0.000000000000000e+00
+  1.000000000000000e+00  -2.000000000000000e-01   0.000000000000000e+00
+  1.000000000000000e+00  -1.333333333333333e-01   0.000000000000000e+00
+  1.000000000000000e+00  -6.666666666666665e-02   0.000000000000000e+00
+  1.000000000000000e+00   0.000000000000000e+00   0.000000000000000e+00
+  1.000000000000000e+00   6.666666666666665e-02   0.000000000000000e+00
+  1.000000000000000e+00   1.333333333333333e-01   0.000000000000000e+00
+  1.000000000000000e+00   2.000000000000000e-01   0.000000000000000e+00
+  1.000000000000000e+00   2.666666666666666e-01   0.000000000000000e+00
+  1.000000000000000e+00   3.333333333333333e-01   0.000000000000000e+00
+  1.000000000000000e+00   3.999999999999999e-01   0.000000000000000e+00
+  1.000000000000000e+00   4.666666666666666e-01   0.000000000000000e+00
+  1.000000000000000e+00   5.333333333333332e-01   0.000000000000000e+00
+  1.000000000000000e+00   6.000000000000001e-01   0.000000000000000e+00
+  1.000000000000000e+00   6.666666666666667e-01   0.000000000000000e+00
+  1.000000000000000e+00   7.333333333333334e-01   0.000000000000000e+00
+  1.000000000000000e+00   8.000000000000000e-01   0.000000000000000e+00
+  1.000000000000000e+00   8.666666666666667e-01   0.000000000000000e+00
+  1.000000000000000e+00   9.333333333333333e-01   0.000000000000000e+00
+  1.000000000000000e+00   1.000000000000000e+00   0.000000000000000e+00
diff --git a/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/grid/网格地址.txt b/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/grid/网格地址.txt
new file mode 100644
index 0000000..899f977
--- /dev/null
+++ b/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/grid/网格地址.txt
@@ -0,0 +1,5 @@
+红山开源风雷算例库原始网格获取百度网盘链接：
+链接：http://pan.baidu.com/s/1aZ9cdkp6CkT9il4fEpnTcA 
+提取码：w47m
+
+注：plot3D格式网格需同时下载.grd和.inp文件
\ No newline at end of file
diff --git a/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/三维非结构圆柱低速绕流线监控算例测试说明.pdf b/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/三维非结构圆柱低速绕流线监控算例测试说明.pdf
new file mode 100644
index 0000000..d691735
Binary files /dev/null and b/phenglei/tutorials/Z02_ThreeD_Cylinder_LinesMonitor_Laminar_Unstruct_1CPU/三维非结构圆柱低速绕流线监控算例测试说明.pdf differ
diff --git a/phenglei/tutorials/build-passing.png b/phenglei/tutorials/build-passing.png
new file mode 100644
index 0000000..2b23498
Binary files /dev/null and b/phenglei/tutorials/build-passing.png differ
diff --git a/phenglei/tutorials/license.png b/phenglei/tutorials/license.png
new file mode 100644
index 0000000..3ec09c5
Binary files /dev/null and b/phenglei/tutorials/license.png differ
diff --git a/phenglei/tutorials/logo.png b/phenglei/tutorials/logo.png
new file mode 100644
index 0000000..f6d5f1b
Binary files /dev/null and b/phenglei/tutorials/logo.png differ
diff --git a/phenglei/tutorials/version.png b/phenglei/tutorials/version.png
new file mode 100644
index 0000000..1cade0f
Binary files /dev/null and b/phenglei/tutorials/version.png differ
diff --git a/快速入门.pdf b/快速入门.pdf
new file mode 100644
index 0000000..a4ab627
Binary files /dev/null and b/快速入门.pdf differ